Windows32/64 (примеры): учитывается разрядность

SamplesWin32.cmd

@@ -0,0 +1,2 @@
+for %%f in (samples\Windows\Console\*.ob07) do Compiler.exe %%f win32con
+@pause

samples/Windows/Console/fact.ob07

@@ -18,7 +18,7 @@ IMPORT In, Out, Console;
 
 
 CONST
-    MAX_INTEGER = 2147483647;
+    MAX_INTEGER = ROR(-2, 1);
 
 
 VAR

samples/Windows/Console/hailst.ob07

@@ -17,7 +17,7 @@ IMPORT In, Out, API, Console;
 
 
 CONST
-    maxCard = 7FFFFFFFH DIV 3;
+    maxCard = ROR(-2, 1) DIV 3;
     List    = 1;
     Count   = 2;
     Max     = 3;
@@ -109,7 +109,7 @@ BEGIN
     Out.String("Iterations total = "); Out.Int(HailStone(27, Count), 1);
     Out.String(" max value = ");       Out.Int(HailStone(27, Max), 1);
     Out.Ln;
-    FindMax(1000000);
+    FindMax(100000);
     Out.String("Done.");
     Out.Ln; In.Ln;