/trunk/Examples/test-suite/mzscheme/casts_runme.scm

# · Lisp · 7 lines · 4 code · 3 blank · 0 comment · 0 complexity · 20fb03c901b6b29f577f0612c9b2aa78 MD5 · raw file 

    

  1. (load-extension "casts.so")
    2. 

  2. 

  3. (define x (new-B))
    4. 

  4. 

  5. (A-hello x)				
    6. 

  6. 

  7. (exit 0)
    8.