X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?a=blobdiff_plain;f=base%2Ftables-examples.tct;h=e69de29bb2d1d6434b8b29ae775ad8c2e48c5391;hb=82f88c53ddb84e42c770c23feb9bb0ee18341188;hp=5115813ad127f13c2ea6d43ecad882f81d800049;hpb=b845521abfac164a92742f984eafb91d5d7c743d;p=chiark-tcl.git diff --git a/base/tables-examples.tct b/base/tables-examples.tct index 5115813..e69de29 100644 --- a/base/tables-examples.tct +++ b/base/tables-examples.tct @@ -1,70 +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