File testbuild/m1.scm artifact 7d00309785 part of check-in 39f1ace0d3
;; a module used by both command line (cl.scm) and gui (gui.scm) (declare (unit m1)) (module m1 * (import scheme chicken.base chicken.port ) (define (a) (print "I'm from module m1")) (define (do-an-eval thestring ht) (with-input-from-string thestring (lambda () ((eval (read)) ht)))) )