SWIG chicken module now returns multiple values instead of returning a list.

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@7156 626c5289-ae23-0410-ae9c-e8d60b6d4f22

Examples/test-suite/guile/li_typemaps_runme.scm

@@ -6,3 +6,13 @@
 ;; current module.  That's enough for such a simple test.
 (dynamic-call "scm_init_li_typemaps_module" (dynamic-link "./libli_typemaps.so"))
 (load "../schemerunme/li_typemaps.scm")
+
+(let ((lst (inoutr-int2 3 -2)))
+  (if (not (and (= (car lst) 3) (= (cadr lst) -2)))
+    (error "Error in inoutr-int2")))
+
+(let ((lst (out-foo 4)))
+  (if (not (and (= (Foo-a-get (car lst)) 4) (= (cadr lst) 8)))
+    (error "Error in out-foo")))
+
+(exit 0)