jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Run garbage collection in test for guile >= 2.0.12

Browse source
This commit is contained in:
Chris Hogan 2018-08-22 08:39:50 -05:00
commit 63b689d7cd
1 changed files with 8 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

8
Examples/test-suite/schemerunme/reference_global_vars.scm
View file

@ -56,4 +56,12 @@
(if (!= (TestClass-num-get (value-TestClass (var-TestClass))) 20)
(begin (display "Runtime test 13 failed.\n") (exit 1)))
; Test garbage collection on guile >= 2.0.12
(if (or (and (string=? (major-version) "2")
(string=? (minor-version) "0")
(string>=? (micro-version) "12"))
(and (string>=? (major-version) "2")
(string>=? (minor-version) "1")))
(gc))
(exit 0)