mason.child: Also allow 32bit build on Windows.

diff --git a/extra/mason/child/child.factor b/extra/mason/child/child.factor
index 00b0e136582c223e8d16f4bd7d12d953b147bcf9..ed251bb4dc5887188e14e84a15ca20ef2131122f 100644 (file)
--- a/extra/mason/child/child.factor
+++ b/extra/mason/child/child.factor
@@ -2,7 +2,7 @@
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors arrays calendar combinators
 combinators.short-circuit continuations fry io.directories
-io.launcher io.pathnames kernel macros make mason.config
+io.launcher io.pathnames kernel layouts macros make mason.config
 mason.notify mason.platform mason.report math.parser namespaces
 quotations sequences splitting system system-info ;
 IN: mason.child
@@ -10,8 +10,10 @@ IN: mason.child
 HOOK: compile-factor-command os ( -- array )
 M: unix compile-factor-command ( -- array )
     { "make" "-j" } cpus number>string suffix ;
+! Windows has separate 32/64 bit shells, so assuming the cell bits here is fine
+! because it won't find the right toolchain otherwise.
 M: windows compile-factor-command ( -- array )
-    { "nmake" "/f" "NMakefile" "x86-64" } ;
+    { "nmake" "/f" "NMakefile" } cell-bits 64 = "x86-64" "x86-32" ? suffix ;
 
 HOOK: factor-path os ( -- path )
 M: unix factor-path "./factor" ;