h2hexquote et al - check in before revert as I have changed my mind

[chiark-tcl.git] / hbytes / hbytes.tct

diff --git a/hbytes/hbytes.tct b/hbytes/hbytes.tct
index 299d4a912131522146fd4636d9d1a522ba31dc73..c07bf1e9988d3a157d5c04504b292b89905e1086 100644 (file)
--- a/hbytes/hbytes.tct
+++ b/hbytes/hbytes.tct
@@ -1,13 +1,3 @@
-Type hb:                       HBytes_Value @
-Init hb                                cht_hb_sentinel(&@);
-
-Type hbv:                      HBytes_Var @
-Init hbv                       @.hb=0; cht_init_somethingv(&@.sth);
-Fini hbv                       cht_fini_somethingv(ip, rc, &@.sth);
-
-Type addrmapv:                 AddrMap_Var @
-Init addrmapv                  @.am=0; cht_init_somethingv(&@.sth);
-Fini addrmapv                  cht_fini_somethingv(ip, rc, &@.sth);
 
 Table *hbytestoplevel TopLevel_Command
        hbytes
@@ -65,6 +55,22 @@ Table hbytes HBytes_SubCommand
        h2raw
                hex     hb
                =>      obj
+       h2hexquote
+               how     hexquotehow
+               hex     hb
+               =>      str
+       raw2hexquote
+               how     hexquotehow
+               binary  obj
+               =>      str
+       hexquote2h
+               how     hexquotehow
+               hex     hb
+               =>      str
+       hexquote2raw
+               how     hexquotehow
+               binary  obj
+               =>      str
        ushort2h
                value   long
                =>      hb