(define f (new-Foo))
(define g (new-Foo f))

(exit 0)