cleanups
This commit is contained in:
parent
2377552677
commit
accae96fa6
|
@ -181,3 +181,7 @@
|
||||||
|
|
||||||
(mes-use-module (srfi srfi-9))
|
(mes-use-module (srfi srfi-9))
|
||||||
(mes-use-module (mes guile module))
|
(mes-use-module (mes guile module))
|
||||||
|
(top-main)
|
||||||
|
;; (top-load 0)
|
||||||
|
(primitive-load 0)
|
||||||
|
(primitive-load (open-input-string %main))
|
||||||
|
|
|
@ -107,9 +107,7 @@ General help using GNU software: <http://gnu.org/gethelp/>
|
||||||
(mes-use-module (mes repl))
|
(mes-use-module (mes repl))
|
||||||
(set-current-input-port 0)
|
(set-current-input-port 0)
|
||||||
(repl))
|
(repl))
|
||||||
(else #t))
|
(else #t)))))
|
||||||
(display "top\n")
|
|
||||||
(display "**********************load hack:\n"))))
|
|
||||||
|
|
||||||
(define (top-load *undefined*)
|
(define (top-load *undefined*)
|
||||||
(primitive-load 0)
|
(primitive-load 0)
|
||||||
|
|
Loading…
Reference in New Issue