blob: 4598a8b4ff53e043e246a53871f72522023d3524 [file] [log] [blame]
(define f (create-Foo))
(test1 f 42)
(define b (new-Bar))
(test1 b 37)
(exit 0)