update swig on windows
This commit is contained in:
@@ -0,0 +1,12 @@
|
||||
(define f (new-Foo))
|
||||
|
||||
(if (not (= (Foo-test f 3) 1))
|
||||
(error "test integer bad"))
|
||||
|
||||
(if (not (= (Foo-test f "hello") 2))
|
||||
(error "test string bad"))
|
||||
|
||||
(if (not (= (Foo-test f 3.5 2.5) 6.0))
|
||||
(error "test reals bad"))
|
||||
|
||||
(exit 0)
|
||||
Reference in New Issue
Block a user