summaryrefslogtreecommitdiffstats
path: root/otherlibs/labltk/support/cltkWait.c
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/labltk/support/cltkWait.c')
-rw-r--r--otherlibs/labltk/support/cltkWait.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/otherlibs/labltk/support/cltkWait.c b/otherlibs/labltk/support/cltkWait.c
index a46860b85..e13091f2d 100644
--- a/otherlibs/labltk/support/cltkWait.c
+++ b/otherlibs/labltk/support/cltkWait.c
@@ -62,7 +62,7 @@ static void WaitVisibilityProc(clientData, eventPtr)
CAMLprim value camltk_wait_vis(value win, value cbid)
{
struct WinCBData *vis =
- (struct WinCBData *)stat_alloc(sizeof(struct WinCBData));
+ (struct WinCBData *)caml_stat_alloc(sizeof(struct WinCBData));
vis->win = Tk_NameToWindow(cltclinterp, String_val(win), cltk_mainWindow);
if (vis -> win == NULL) {
stat_free((char *)vis);
@@ -89,7 +89,7 @@ static void WaitWindowProc(ClientData clientData, XEvent *eventPtr)
CAMLprim value camltk_wait_des(value win, value cbid)
{
struct WinCBData *vis =
- (struct WinCBData *)stat_alloc(sizeof(struct WinCBData));
+ (struct WinCBData *)caml_stat_alloc(sizeof(struct WinCBData));
vis->win = Tk_NameToWindow(cltclinterp, String_val(win), cltk_mainWindow);
if (vis -> win == NULL) {
stat_free((char *)vis);