X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?a=blobdiff_plain;f=base%2Ftables-examples.tct;h=e69de29bb2d1d6434b8b29ae775ad8c2e48c5391;hb=1cb2da359930d980b7ef827d4d46225e1988c478;hp=6bdc7ff4afc95966cbc0182826be367ce232524f;hpb=12cb589d468d6c93b04dfabe645ce761a81c5328;p=chiark-tcl.git diff --git a/base/tables-examples.tct b/base/tables-examples.tct index 6bdc7ff..e69de29 100644 --- a/base/tables-examples.tct +++ b/base/tables-examples.tct @@ -1,116 +0,0 @@ -Type hb: HBytes_Value @ -Init hb hbytes_sentinel(&@); - -Type hbv: HBytes_Var @ -Init hbv @.hb=0; @.obj=0; @.var=0; -Fini hbv fini_hbv(ip, rc, &@); - -Type sockaddr: SockAddr_Value @ -Init sockaddr sockaddr_clear(&@); - -Type sockid: DgramSockID @ -Type ulong: unsigned long @ - -H-Include "hbytes.h" - -Untabled - hbytes - subcmd enum(HBytes_SubCommand, "hbytes subcommand") - obj ... - dgram-socket - subcmd enum(DgramSocket_SubCommand,"dgram-socket subcommand") - obj ... - -Table hbytes HBytes_SubCommand - raw2h - binary obj - => hb - 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 - prepend - v hbv - str ... - append - v hbv - str ... - rep-info - v obj - => obj - concat - str ... - => hb - unprepend - v hbv - length int - => hb - unappend - v hbv - length int - => hb - chopto - v hbv - length int - => hb - pkcs5 - meth enum(PadMethod, "hbytes pad subcommand") - v hbv - block obj - => int - blockcipher - encrypt charfrom("de","encrypt/decrypt") - v hbv - alg enum(BlockCipherAlgInfo, "alg") - key obj - mode enum(BlockCipherModeInfo, "mode") - ?iv hb - => hb - hash - alg enum(HashAlgInfo, "hash alg") - message hb - => hb - hmac - alg enum(HashAlgInfo, "hash alg for hmac") - message hb - key obj - ?maclen obj - => hb - zeroes - length int - => hb - random - length int - => hb - -Table dgram_socket DgramSocket_SubCommand - create - local sockaddr - => sockid - close - sock sockid - transmit - sock sockid - data hb - remote sockaddr - on-receive - sock sockid - ?script obj