Fixes needed to get airtest to compile and run on windows.

Copied from Perforce
 Change: 184029
 ServerID: perforce.ravenbrook.com

mps/code/airtest.c

@@ -25,14 +25,14 @@ void test_main(void)
     mps_addr_t ref = obj;
     mps_finalize(scheme_arena, &ref);
     s[j] = obj->string.string;
-    sprintf(s[j], "%lu", (unsigned long)j);
-    ++ s[j];
+    *s[j]++ = '0' + (char)j;
+    *s[j] = '\0';
   }
   mps_message_type_enable(scheme_arena, mps_message_type_finalization());
   for (i = 0; i + 3 < size; ++i) {
     mps_message_t msg;
     for (j = 0; j < 10; ++j) {
-      *s[j]++ = '0';
+      *s[j]++ = '.';
       *s[j] = '\0';
     }
     mps_arena_collect(scheme_arena);

mps/code/commpre.nmk

@@ -14,24 +14,25 @@
 # %%PART: When adding a new part, add a new parameter for the files included
 # in the part
 # Parameters:
-#   PFM      platform code, e.g. "w3i3mv"
-#   PFMDEFS  /D options to define platforms preprocessor symbols
-#            to the compiler.  Eg "/DOS_NT /DARCH_386 /DBUILD_MVC"
+#   PFM        platform code, e.g. "w3i3mv"
+#   PFMDEFS    /D options to define platforms preprocessor symbols
+#              to the compiler.  Eg "/DOS_NT /DARCH_386 /DBUILD_MVC"
 #   MPMCOMMON  list of sources which make up the "mpm" part for all
-#            platforms.  Each source is stripped of its .c extension
-#            and surrounded in angle brackets (<>)
-#   MPM      as above, plus sources for the "mpm" part for the current
-#            platform.
-#   PLINTH   as above for the "plinth" part
-#   AMC      as above for the "amc" part
-#   AMS      as above for the "ams" part
-#   LO       as above for the "lo" part
-#   POOLN    as above for the "pooln" part
-#   SNC      as above for the "snc" part
-#   DW       as above for the "dw" part
-#   FMTTEST  as above for the "fmttest" part
-#   TESTLIB  as above for the "testlib" part
-#   NOISY    if defined, causes command to be emitted
+#              platforms.  Each source is stripped of its .c extension
+#              and surrounded in angle brackets (<>)
+#   MPM        as above, plus sources for the "mpm" part for the current
+#              platform.
+#   PLINTH     as above for the "plinth" part
+#   AMC        as above for the "amc" part
+#   AMS        as above for the "ams" part
+#   LO         as above for the "lo" part
+#   POOLN      as above for the "pooln" part
+#   SNC        as above for the "snc" part
+#   DW         as above for the "dw" part
+#   FMTTEST    as above for the "fmttest" part
+#   FMTSCHEME  as above for the "fmtscheme" part
+#   TESTLIB    as above for the "testlib" part
+#   NOISY      if defined, causes command to be emitted
 #
 #
 # EDITING
@@ -138,6 +139,24 @@ TESTLIB = <testlib>
 !IFNDEF AMS
 !ERROR commpre.nmk: AMS not defined
 !ENDIF
+!IFNDEF POOLN
+!ERROR commpre.nmk: POOLN not defined
+!ENDIF
+!IFNDEF SNC
+!ERROR commpre.nmk: SNC not defined
+!ENDIF
+!IFNDEF DW
+!ERROR commpre.nmk: DW not defined
+!ENDIF
+!IFNDEF FMTTEST
+!ERROR commpre.nmk: FMTTEST not defined
+!ENDIF
+!IFNDEF FMTSCHEME
+!ERROR commpre.nmk: FMTSCHEME not defined
+!ENDIF
+!IFNDEF TESTLIB
+!ERROR commpre.nmk: TESTLIB not defined
+!ENDIF
 !IFNDEF TESTLIB
 !ERROR commpre.nmk: TESTLIB not defined
 !ENDIF

mps/code/nailboard.c

@@ -82,7 +82,7 @@ void NailboardDestroy(Nailboard board)
 
 Align NailboardAlignment(Nailboard board)
 {
-  return 1 << board->markShift;
+    return (Align)1 << board->markShift;
 }
 
 /* nailboardIndex -- return the index of the nail corresponding to addr */

mps/code/w3i3mv.nmk

@@ -44,6 +44,7 @@ SNCOBJ0 = $(SNC:<=w3i3mv\hot\)
 MVFFOBJ0 = $(MVFF:<=w3i3mv\hot\)
 DWOBJ0 = $(DW:<=w3i3mv\hot\)
 FMTTESTOBJ0 = $(FMTTEST:<=w3i3mv\hot\)
+FMTSCHEMEOBJ0 = $(FMTSCHEME:<=w3i3mv\hot\)
 POOLNOBJ0 = $(POOLN:<=w3i3mv\hot\)
 TESTLIBOBJ0 = $(TESTLIB:<=w3i3mv\hot\)
 
@@ -62,6 +63,7 @@ SNCOBJ0 = $(SNC:<=w3i3mv\cool\)
 MVFFOBJ0 = $(MVFF:<=w3i3mv\cool\)
 DWOBJ0 = $(DW:<=w3i3mv\cool\)
 FMTTESTOBJ0 = $(FMTTEST:<=w3i3mv\cool\)
+FMTSCHEMEOBJ0 = $(FMTSCHEME:<=w3i3mv\cool\)
 POOLNOBJ0 = $(POOLN:<=w3i3mv\cool\)
 TESTLIBOBJ0 = $(TESTLIB:<=w3i3mv\cool\)
 
@@ -80,6 +82,7 @@ SNCOBJ0 = $(SNC:<=w3i3mv\rash\)
 MVFFOBJ0 = $(MVFF:<=w3i3mv\rash\)
 DWOBJ0 = $(DW:<=w3i3mv\rash\)
 FMTTESTOBJ0 = $(FMTTEST:<=w3i3mv\rash\)
+FMTSCHEMEOBJ0 = $(FMTSCHEME:<=w3i3mv\rash\)
 POOLNOBJ0 = $(POOLN:<=w3i3mv\rash\)
 TESTLIBOBJ0 = $(TESTLIB:<=w3i3mv\rash\)
 
@@ -123,6 +126,7 @@ SNCOBJ = $(SNCOBJ0:>=.obj)
 MVFFOBJ = $(MVFFOBJ0:>=.obj)
 DWOBJ = $(DWOBJ0:>=.obj)
 FMTTESTOBJ = $(FMTTESTOBJ0:>=.obj)
+FMTSCHEMEOBJ = $(FMTSCHEMEOBJ0:>=.obj)
 POOLNOBJ = $(POOLNOBJ0:>=.obj)
 TESTLIBOBJ = $(TESTLIBOBJ0:>=.obj)
 

mps/code/w3i6mv.nmk

@@ -45,6 +45,7 @@ SNCOBJ0 = $(SNC:<=w3i6mv\hot\)
 MVFFOBJ0 = $(MVFF:<=w3i6mv\hot\)
 DWOBJ0 = $(DW:<=w3i6mv\hot\)
 FMTTESTOBJ0 = $(FMTTEST:<=w3i6mv\hot\)
+FMTSCHEMEOBJ0 = $(FMTSCHEME:<=w3i6mv\hot\)
 POOLNOBJ0 = $(POOLN:<=w3i6mv\hot\)
 TESTLIBOBJ0 = $(TESTLIB:<=w3i6mv\hot\)
 
@@ -63,6 +64,7 @@ SNCOBJ0 = $(SNC:<=w3i6mv\cool\)
 MVFFOBJ0 = $(MVFF:<=w3i6mv\cool\)
 DWOBJ0 = $(DW:<=w3i6mv\cool\)
 FMTTESTOBJ0 = $(FMTTEST:<=w3i6mv\cool\)
+FMTSCHEMEOBJ0 = $(FMTSCHEME:<=w3i6mv\cool\)
 POOLNOBJ0 = $(POOLN:<=w3i6mv\cool\)
 TESTLIBOBJ0 = $(TESTLIB:<=w3i6mv\cool\)
 
@@ -81,6 +83,7 @@ SNCOBJ0 = $(SNC:<=w3i6mv\rash\)
 MVFFOBJ0 = $(MVFF:<=w3i6mv\rash\)
 DWOBJ0 = $(DW:<=w3i6mv\rash\)
 FMTTESTOBJ0 = $(FMTTEST:<=w3i6mv\rash\)
+FMTSCHEMEOBJ0 = $(FMTSCHEME:<=w3i6mv\rash\)
 POOLNOBJ0 = $(POOLN:<=w3i6mv\rash\)
 TESTLIBOBJ0 = $(TESTLIB:<=w3i6mv\rash\)
 
@@ -124,6 +127,7 @@ SNCOBJ = $(SNCOBJ0:>=.obj)
 MVFFOBJ = $(MVFFOBJ0:>=.obj)
 DWOBJ = $(DWOBJ0:>=.obj)
 FMTTESTOBJ = $(FMTTESTOBJ0:>=.obj)
+FMTSCHEMEOBJ = $(FMTSCHEMEOBJ0:>=.obj)
 POOLNOBJ = $(POOLNOBJ0:>=.obj)
 TESTLIBOBJ = $(TESTLIBOBJ0:>=.obj)