From: ian Date: Sun, 5 Oct 2003 18:44:31 +0000 (+0000) Subject: document some undocumented hbytes ops X-Git-Tag: debian/1.1.1~134 X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=chiark-tcl.git;a=commitdiff_plain;h=2fbe5a5eee8d5d28af55ea9e161d89543a9d8565 document some undocumented hbytes ops --- diff --git a/base/chiark-tcl.h b/base/chiark-tcl.h index afdae9a..1014182 100644 --- a/base/chiark-tcl.h +++ b/base/chiark-tcl.h @@ -17,6 +17,9 @@ * hbytes overwrite VAR START VALUE * hbytes trimleft VAR removes any leading 0 octets * hbytes repeat VALUE COUNT => COUNT copies of VALUE + * hbytes zeroes COUNT => COUNT zero bytes + * hbytes random COUNT => COUNT random bytes + * hbytes xor VAR VALUE $VAR (+)= VALUE * * hbytes ushort2h LONG => LONG must be <2^16, returns as hex * hbytes h2ushort HEX => |HEX| must be 2 bytes, returns as ulong diff --git a/hbytes/hbytes.h b/hbytes/hbytes.h index afdae9a..1014182 100644 --- a/hbytes/hbytes.h +++ b/hbytes/hbytes.h @@ -17,6 +17,9 @@ * hbytes overwrite VAR START VALUE * hbytes trimleft VAR removes any leading 0 octets * hbytes repeat VALUE COUNT => COUNT copies of VALUE + * hbytes zeroes COUNT => COUNT zero bytes + * hbytes random COUNT => COUNT random bytes + * hbytes xor VAR VALUE $VAR (+)= VALUE * * hbytes ushort2h LONG => LONG must be <2^16, returns as hex * hbytes h2ushort HEX => |HEX| must be 2 bytes, returns as ulong