hbytes and crypto compile now

[chiark-tcl.git] / base / hook.c

diff --git a/base/hook.c b/base/hook.c
index 56a32681a52756138a73cd4d5f5f42fbe5b7aeab..9243724ecc91b3deaf08976949f6a6fa86a3be11 100644 (file)
--- a/base/hook.c
+++ b/base/hook.c
@@ -1,9 +1,7 @@
 /*
  */
 
-#include <errno.h>
-
-#include "chiark-tcl.h"
+#include "chiark-tcl-base.h"
 
 int cht_staticerr(Tcl_Interp *ip, const char *m, const char *ec) {
   Tcl_SetResult(ip, (char*)m, TCL_STATIC);
@@ -99,6 +97,7 @@ int cht_initextension(Tcl_Interp *ip, const TopLevel_Command *cmds,
 
   if (!cht_initd) {
     cht_initd= 1;
+    Tcl_RegisterObjType(&cht_tabledataid_nearlytype);
     Tcl_RegisterObjType(&cht_enum_nearlytype);
     Tcl_RegisterObjType(&cht_enum1_nearlytype);
   }