hbytes compiles

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

diff --git a/hbytes/hbytes.tct b/hbytes/hbytes.tct
index abfd45a50620b8134ba5b540cd90073f2ee1a963..299d4a912131522146fd4636d9d1a522ba31dc73 100644 (file)
--- a/hbytes/hbytes.tct
+++ b/hbytes/hbytes.tct
@@ -9,7 +9,7 @@ Type addrmapv:                  AddrMap_Var @
 Init addrmapv                  @.am=0; cht_init_somethingv(&@.sth);
 Fini addrmapv                  cht_fini_somethingv(ip, rc, &@.sth);
 
-Table hbytestoplevel TopLevel_Command
+Table *hbytestoplevel TopLevel_Command
        hbytes
                subcmd  enum(HBytes/_SubCommand, "hbytes subcommand")
                ...     obj
@@ -126,24 +126,3 @@ Table hbytes HBytes_SubCommand
        random
                length  int
                =>      hb
-#      addr-map
-#              subcmd  enum(AddrMap/_SubCommand, "hbytes addr-map subcommand")
-#              ...     obj
-
-#Table addrmap AddrMap_SubCommand
-#      lookup
-#              map     constv(&cht_addrmap_type)
-#              addr    hb
-#              ?def    obj
-#              =>      obj
-#      amend-range
-#              map     addrmapv
-#              start   hb
-#              end     hb
-#              data    obj
-#      amend-mask
-#              map     addrmapv
-#              prefix  hb
-#              preflen obj
-#              data    obj
-