hbytes range

[chiark-tcl.git] / base / tables-examples.tct

diff --git a/base/tables-examples.tct b/base/tables-examples.tct
index 6f8755a8495d88d182bb358081c80372660458d0..b5a104b825409384e6a206df5bde3175996ecd46 100644 (file)
--- a/base/tables-examples.tct
+++ b/base/tables-examples.tct
@@ -8,8 +8,8 @@ Fini hbv                        fini_hbv(ip, rc, &@);
 Type sockaddr:                 SockAddr_Value @
 Init sockaddr                  sockaddr_clear(&@);
 
-Type sockid:                   int @
-Init sockid                    @=-1;
+Type sockid:                   DgramSockID @
+Type ulong:                    unsigned long @
 
 H-Include      "hbytes.h"
 
@@ -28,9 +28,30 @@ Table hbytes HBytes_SubCommand
        h2raw
                hex     hb
                =>      obj
+       ulong2h
+               value   ulong
+               =>      hb
+       h2ulong
+               hex     hb
+               =>      ulong
+       ushort2h
+               value   ulong
+               =>      hb
+       h2ushort
+               hex     hb
+               =>      ulong
        length
                v       hb
                =>      int
+       compare
+               a       hb
+               b       hb
+               =>      int
+       range
+               v       hb
+               start   int
+               size    int
+               =>      hb
        prepend
                v       hbv
                str     ...
@@ -91,5 +112,10 @@ Table dgram_socket DgramSocket_SubCommand
                =>      sockid
        close
                sock    sockid
-#      transmit
-#              
+       transmit
+               sock    sockid
+               data    hb
+               remote  sockaddr
+       on-receive
+               sock    sockid
+               ?script obj