The guile and chicken _runme scripts are now shared

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

Examples/test-suite/guile/dynamic_cast_runme.scm

@@ -1,13 +1,2 @@
 (dynamic-call "scm_init_dynamic_cast_module" (dynamic-link "./libdynamic_cast.so"))
-
-(define f (new-Foo))
-(define b (new-Bar))
-
-(define x (Foo-blah f))
-(define y (Bar-blah b))
-
-(define a (do-test y))
-(if (not (string=? a "Bar::test"))
-    (error "Failed!"))
-
-(exit 0)
+(load "../schemerunme/dynamic_cast.scm")