X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=chiark-tcl.git;a=blobdiff_plain;f=hbytes%2Fhbytes.c;h=626b2da6cdd497dfbece6a6ef8cc8d51f183ed5a;hp=d095531a03c47325d26be59467cde9a99cdea93b;hb=b740135c3efcb63e0c7741384e5fa8ff229d2919;hpb=310a482133795d0bee9621003c0a0b3813a47037

diff --git a/hbytes/hbytes.c b/hbytes/hbytes.c
index d095531..626b2da 100644
--- a/hbytes/hbytes.c
+++ b/hbytes/hbytes.c
@@ -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;
 }