Index: /trunk/source/lisp-kernel/pmcl-kernel.c
===================================================================
--- /trunk/source/lisp-kernel/pmcl-kernel.c	(revision 15431)
+++ /trunk/source/lisp-kernel/pmcl-kernel.c	(revision 15432)
@@ -1439,5 +1439,5 @@
       *work = ((instr >> 26) << 26) | disp;
     }
-    xMakeDataExecutable(new, (void*)work-(void*)new);
+    xMakeDataExecutable((void *)new, (natural)work-(natural)new);
     ProtectMemory(new, 0x1000);
   }