diff --git a/ldo.c b/ldo.c
index ef9a3a2d..3c38fd25 100644
--- a/ldo.c
+++ b/ldo.c
@@ -134,7 +134,7 @@ void luaD_lineHook (lua_State *L, int line, lua_Hook linehook) {
 }
 
 
-void luaD_callHook (lua_State *L, lua_Hook callhook, const char *event) {
+static void luaD_callHook (lua_State *L, lua_Hook callhook, const char *event) {
   if (L->allowhooks) {
     lua_Debug ar;
     ar.event = event;
diff --git a/ldo.h b/ldo.h
index 6b3649d6..c3dd7cfa 100644
--- a/ldo.h
+++ b/ldo.h
@@ -23,7 +23,6 @@
 
 
 void luaD_lineHook (lua_State *L, int line, lua_Hook linehook);
-void luaD_callHook (lua_State *L, lua_Hook callhook, const char *event);
 StkId luaD_precall (lua_State *L, StkId func);
 void luaD_call (lua_State *L, StkId func, int nResults);
 void luaD_poscall (lua_State *L, int wanted, StkId firstResult);