diff options
Diffstat (limited to 'otherlibs/labltk/support/cltkUtf.c')
| -rw-r--r-- | otherlibs/labltk/support/cltkUtf.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/otherlibs/labltk/support/cltkUtf.c b/otherlibs/labltk/support/cltkUtf.c index 448e06a1c..61dbfb2f5 100644 --- a/otherlibs/labltk/support/cltkUtf.c +++ b/otherlibs/labltk/support/cltkUtf.c @@ -43,7 +43,7 @@ char *external_to_utf( char *str ){ Tcl_ExternalToUtfDString(NULL, str, strlen(str), &dstr); length = Tcl_DStringLength(&dstr); - res = stat_alloc(length + 1); + res = caml_stat_alloc(length + 1); memmove( res, Tcl_DStringValue(&dstr), length+1); Tcl_DStringFree(&dstr); @@ -57,7 +57,7 @@ char *utf_to_external( char *str ){ Tcl_UtfToExternalDString(NULL, str, strlen(str), &dstr); length = Tcl_DStringLength(&dstr); - res = stat_alloc(length + 1); + res = caml_stat_alloc(length + 1); memmove( res, Tcl_DStringValue(&dstr), length+1); Tcl_DStringFree(&dstr); |