Fix mzscheme name and unions testcases

Examples/test-suite/mzscheme/Makefile.in

@@ -61,10 +61,8 @@ valuewrapper_opaque \
 FAILING_C_TESTS = \
 enums \
 integers \
-name \
 preproc_constants_c \
 preproc_line_file \
-unions \
 
 FAILING_MULTI_CPP_TESTS = \
 multi_import \

Examples/test-suite/mzscheme/name_runme.scm

@@ -1,7 +1,7 @@
 ;; The SWIG modules have "passive" Linkage, i.e., they don't generate
 ;; Guile modules (namespaces) but simply put all the bindings into the
 ;; current module.  That's enough for such a simple test.
-(load-extension "./name.so")
+(load-extension "name.so")
 
 (foo-2)
 bar-2

Examples/test-suite/mzscheme/unions_runme.scm

@@ -25,13 +25,15 @@
   (if (not (= Jill1 200))
       (begin
 	(display "Runtime test 1 failed.")
-	(exit 1))))
+	(exit 1))
+      (void)))
 
 (let ((Num1 (EmbeddedUnionTest-number-get eut)))
   (if (not (= Num1 1))
       (begin
 	(display "Runtime test 2 failed.")
-	(exit 1))))
+	(exit 1))
+      (void)))
 
 ;; that should do