/tags/rel-1-3-25/SWIG/Examples/test-suite/tcl/import_nomodule_runme.tcl

# · TCL · 4 lines · 3 code · 1 blank · 0 comment · 1 complexity · e234a858b8f9d3c7444dc8e083d7ccf0 MD5 · raw file 

    

  1. if [ catch { load ./import_nomodule[info sharedlibextension] import_nomodule} err_msg ] {
    2. 

  2. 	puts stderr "Could not load shared object:\n$err_msg"
    3. 

  3. }
    4.