/tags/rel-1-3-25/SWIG/Examples/test-suite/schemerunme/imports.scm

# · Lisp · 13 lines · 3 code · 4 blank · 6 comment · 0 complexity · 0004c831996c66f23ecf1c90ddf19fb5 MD5 · raw file 

    

  1. ;;; This file is part of a test for SF bug #231619. 
    2. 

  2. ;;; It shows that the %import directive does not work properly in SWIG
    3. 

  3. ;;; 1.3a5:  Type information is not properly generated if a base class
    4. 

  4. ;;; comes from an %import-ed file. 
    5. 

  5. 

  6. (define x (new-B))
    7. 

  7. 

  8. ;; This fails in 1.3a5 because the SWIG runtime code does not know
    9. 

  9. ;; that x (an instance of class B) can be passed to methods of class A. 
    10. 

  10. 

  11. (A-hello x)				
    12. 

  12. 

  13. (exit 0)
    14.