cleanups

mes/module/mes/boot-5.mes

@@ -181,3 +181,7 @@
 
 (mes-use-module (srfi srfi-9))
 (mes-use-module (mes guile module))
+(top-main)
+;; (top-load 0)
+(primitive-load 0)
+(primitive-load (open-input-string %main))

mes/module/mes/main.mes

@@ -107,9 +107,7 @@ General help using GNU software: <http://gnu.org/gethelp/>
              (mes-use-module (mes repl))
              (set-current-input-port 0)
              (repl))
-            (else #t))
-    (display "top\n")
-    (display "**********************load hack:\n"))))
+            (else #t)))))
 
 (define (top-load *undefined*)
   (primitive-load 0)