Merge branch 'ChristopherHogan-chogan/guile_gc'

* ChristopherHogan-chogan/guile_gc:
  Run garbage collection in test for guile >= 2.0.12
  Fix garbage collection for guile >= 2.0.12
This commit is contained in:
William S Fulton 2018-09-01 09:53:02 +01:00
commit de7fa2c499
2 changed files with 27 additions and 5 deletions

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)