X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?a=blobdiff_plain;f=base%2Ftables-examples.tct;h=e69de29bb2d1d6434b8b29ae775ad8c2e48c5391;hb=4988e4a246c7cc6893c83cec6683542b4b9dad8f;hp=b40198f0d90380843078318c843cee7b36cced2f;hpb=b78c59b29c46210ccbfc0fe4815b4e49fba8817b;p=chiark-tcl.git diff --git a/base/tables-examples.tct b/base/tables-examples.tct index b40198f..e69de29 100644 --- a/base/tables-examples.tct +++ b/base/tables-examples.tct @@ -1,80 +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, &@); - -H-Include "hbytes.h" - -Untabled - hbytes - subcmd enum(HBytes_SubCommand, "hbytes subcommand") - obj ... - -Table hbytes HBytes_SubCommand - raw2h - binary obj - => hb - h2raw - hex hb - => obj - length - v 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 udp UDP_SubCommand -# create -#