8 lines
75 B
Scheme
8 lines
75 B
Scheme
|
(load-extension "casts.so")
|
||
|
|
|
||
|
|
(define x (new-B))
|
||
|
|
|
||
|
|
(A-hello x)
|
||
|
|
|
||
|
|
(exit 0)
|