/tags/rel-1.3.35/Examples/test-suite/mzscheme/imports_runme.scm
Lisp | 16 lines | 5 code | 5 blank | 6 comment | 0 complexity | 56eb25945f106a3c4ccae88ce3e4420d MD5 | raw file
Possible License(s): LGPL-2.1, Cube, GPL-3.0, 0BSD, GPL-2.0
- ;;; This file is part of a test for SF bug #231619.
- ;;; It shows that the %import directive does not work properly in SWIG
- ;;; 1.3a5: Type information is not properly generated if a base class
- ;;; comes from an %import-ed file.
- (load-extension "imports_a.so")
- (load-extension "imports_b.so")
- (define x (new-B))
- ;; This fails in 1.3a5 because the SWIG runtime code does not know
- ;; that x (an instance of class B) can be passed to methods of class A.
- (A-hello x)
- (exit 0)