New test case integers.

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@8816 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Matthias Köppe 2006-02-14 19:03:55 +00:00
commit 3c2bc16ff4

View file

@ -0,0 +1,6 @@
(load "integers.so")
(define-macro (throws-exception? form)
`(condition-case (begin ,form #f)
((exn) #t)))
(include "../schemerunme/integers.scm")