steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

mason.child: update for Nmakefile change

release
Slava Pestov 2010-04-08 16:40:51 -07:00
parent ea81faffca
commit 618915a084
2 changed files with 11 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/mason/child/child-tests.factor
View File

@ -1,7 +1,7 @@
IN: mason.child.tests
USING: mason.child mason.config tools.test namespaces io kernel sequences ;
[ { "nmake" "/f" "nmakefile" } ] [
[ { "nmake" "/f" "nmakefile" "x86-32" } ] [
[
"winnt" target-os set
"x86.32" target-cpu set

13
extra/mason/child/child.factor
View File

@ -4,13 +4,20 @@ USING: accessors arrays calendar combinators.short-circuit fry
continuations debugger io.directories io.files io.launcher
io.pathnames io.encodings.ascii kernel make mason.common mason.config
mason.platform mason.report mason.notify namespaces sequences
quotations macros system combinators ;
quotations macros system combinators splitting ;
IN: mason.child
: nmake-cmd ( -- args )
{ "nmake" "/f" "nmakefile" }
target-cpu get "." split "-" join suffix ;
: gnu-make-cmd ( -- args )
gnu-make platform 2array ;
: make-cmd ( -- args )
{
{ [ target-os get "winnt" = ] [ { "nmake" "/f" "nmakefile" } ] }
[ gnu-make platform 2array ]
{ [ target-os get "winnt" = ] [ nmake-cmd ] }
[ gnu-make-cmd ]
} cond ;
: make-vm ( -- )