nmosh: oops.

higepon · Jun 10, 2011 · ba7f393 · ba7f393
1 parent b374371
commit ba7f393
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/lib/nmosh/bootstrap/util.nmosh.ss b/lib/nmosh/bootstrap/util.nmosh.ss
@@ -32,10 +32,10 @@
     (put-string p s)))
 
 (define (compile-to-codevector/toplevel l)
-  (compile-w/o-halt l))
+  (compile l))
 
 (define (compile-to-codevector l)
-  (compile l))
+  (compile-w/o-halt l))
 
 (define (obj->fasl obj)
   (receive (port bv-proc) (open-bytevector-output-port)