diff --git a/tools/worldcom.lisp b/tools/worldcom.lisp
index 8ca0b20891f45a071030a4e17035bdbbfc0c32c0..5549125553172e050c432d855d39fa1b3970ccb7 100644
--- a/tools/worldcom.lisp
+++ b/tools/worldcom.lisp
@@ -98,14 +98,15 @@
 (comf "ncode:mmlispdefs")
 (comf "nicode:machdefs")
 (comf "nicode:netnamedefs")
-#-new-compiler ; Leave these out for now...
-(load "nicode:machmsgdefs.lisp")
-#-new-compiler
-(comf "nicode:machuser")
-#-new-compiler
-(load "nicode:netnamemsgdefs.lisp")
-#-new-compiler
-(comf "nicode:netnameuser")
+
+(let ((system:*alien-eval-when* '(compile)))
+  (unless (probe-file "nicode:machuser.nfasl")
+    (load "nicode:machmsgdefs.lisp")
+    (comf "nicode:machuser"))
+  
+  (unless (probe-file "nicode:netnameuser.nfasl")
+    (load "nicode:netnamemsgdefs.lisp")
+    (comf "nicode:netnameuser")))
 
 (comf "ncode:defstruct")
 (comf "ncode:defmacro")