diff options
Diffstat (limited to 'otherlibs/labltk/support/cltkMisc.c')
-rw-r--r-- | otherlibs/labltk/support/cltkMisc.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/otherlibs/labltk/support/cltkMisc.c b/otherlibs/labltk/support/cltkMisc.c index 23364ad11..b19713cda 100644 --- a/otherlibs/labltk/support/cltkMisc.c +++ b/otherlibs/labltk/support/cltkMisc.c @@ -47,7 +47,7 @@ CAMLprim value camltk_splitlist (value v) case TCL_ERROR: default: stat_free( utf ); - tk_error(cltclinterp->result); + tk_error(Tcl_GetStringResult(cltclinterp)); } } |