/trunk/Examples/test-suite/schemerunme/import_nomodule.scm

# · Lisp · 7 lines · 5 code · 2 blank · 0 comment · 0 complexity · 333cf72d8032a406a9161b5d0834232b MD5 · raw file 

    

  1. (define f (create-Foo))
    2. 

  2. (test1 f 42)
    3. 

  3. 

  4. (define b (new-Bar))
    5. 

  5. (test1 b 37)
    6. 

  6. 

  7. (exit 0)
    8.