Guile testing - call gc instead of explicitly calling the destructor
This commit is contained in:
parent
5b16e4fbd3
commit
63143e8773
2 changed files with 11 additions and 9 deletions
|
|
@ -7,10 +7,12 @@
|
|||
(define foo2 (Foo-makeMore foo1))
|
||||
(check (= (Foo-fooCount) 2))
|
||||
|
||||
(delete-Foo foo1)
|
||||
(set! foo1 '())
|
||||
(gc)
|
||||
(check (= (Foo-fooCount) 1))
|
||||
|
||||
(delete-Foo foo2)
|
||||
(set! foo2 '())
|
||||
(gc)
|
||||
(check (= (Foo-fooCount) 0))
|
||||
|
||||
(exit 0)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue