8 lines
82 B
Scheme
8 lines
82 B
Scheme
(define f (create-Foo))
|
|
(test1 f 42)
|
|
|
|
(define b (new-Bar))
|
|
(test1 b 37)
|
|
|
|
(exit 0)
|