diff options
Diffstat (limited to 'Examples/test-suite/tcl/member_pointer_runme.tcl')
-rw-r--r-- | Examples/test-suite/tcl/member_pointer_runme.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Examples/test-suite/tcl/member_pointer_runme.tcl b/Examples/test-suite/tcl/member_pointer_runme.tcl index e4d099163..7ba5321b5 100644 --- a/Examples/test-suite/tcl/member_pointer_runme.tcl +++ b/Examples/test-suite/tcl/member_pointer_runme.tcl @@ -1,6 +1,6 @@ # Example using pointers to member functions -if [ catch { load ./member_pointer[info sharedlibextension] member_pointer} err_msg ] { +if [ catch { load ./member_pointer[info sharedlibextension] Member_pointer} err_msg ] { puts stderr "Could not load shared object:\n$err_msg" } |