import source from 1.3.40
[external/swig.git] / Examples / test-suite / guile / contract_runme.scm
1 ;; The SWIG modules have "passive" Linkage, i.e., they don't generate
2 ;; Guile modules (namespaces) but simply put all the bindings into the
3 ;; current module.  That's enough for such a simple test.
4 (dynamic-call "scm_init_contract_module" (dynamic-link "./libcontract.so"))
5 (load "testsuite.scm")
6 (load "../schemerunme/contract.scm")