test-load-require.scm 168 B

12345678
  1. (begin
  2. (require "test-load-require-1.scm")
  3. (define (mytest)
  4. (format #t "mytest before mytest1~%~!")
  5. (mytest1)
  6. (format #t "mytest after mytest1~%~!")))