chiark / gitweb /
all compiles again. more pat to do.
[chiark-tcl.git] / hbytes / hbytes.c
index d095531a03c47325d26be59467cde9a99cdea93b..626b2da6cdd497dfbece6a6ef8cc8d51f183ed5a 100644 (file)
@@ -141,7 +141,7 @@ HC_DEFINE(pkcs5) {
 #endif
 
 int do__hbytes(ClientData cd, Tcl_Interp *ip,
-              const ParserCommandTableEntry *subcmd,
+              const HBytes_SubCommand *subcmd,
               int objc, Tcl_Obj *const *objv) {
   return subcmd->func(0,ip,objc,objv);
 }
@@ -149,6 +149,7 @@ int do__hbytes(ClientData cd, Tcl_Interp *ip,
 int Hbytes_Init(Tcl_Interp *ip) {
   Tcl_RegisterObjType(&hbytes_type);
   Tcl_RegisterObjType(&enum_nearlytype);
+  Tcl_RegisterObjType(&enum1_nearlytype);
   Tcl_CreateObjCommand(ip,"hbytes", pa__hbytes,0,0);
   return TCL_OK;
 }