racket/collects/tests/mzscheme/embed-me1.ss
2005-05-27 18:56:37 +00:00

6 lines
113 B
Scheme

(module embed-me1 mzscheme
(with-output-to-file "stdout"
(lambda () (printf "This is 1~n"))
'append))