code: purgatorio

Download patch

ref: 6c2f8fd5e4f0e0be44495a5526930fa3760cd87e
parent: c116550e6a41572796e4db65e4f6acbcb3d9d6f8
author: henesy <devnull@localhost>
date: Thu Oct 3 01:31:12 EDT 2019

remove generated .h files ;; fix typo in emptydirs (this should really be a proto file)

--- a/lib/emptydirs
+++ b/lib/emptydirs
@@ -5,7 +5,7 @@
 FreeBSD/386/include
 FreeBSD/386/lib
 Inferno/386/bin
-Infenro/386/include
+Inferno/386/include
 Inferno/386/lib
 Inferno/arm/bin
 Inferno/arm/include
--- a/libinterp/cryptmod.h
+++ /dev/null
@@ -1,41 +1,0 @@
-typedef struct{char *name; long sig; void (*fn)(void*); int size; int np; uchar map[16];} Runtab;
-Runtab Cryptmodtab[]={
-	"aescbc",0xac616ba,Crypt_aescbc,48,2,{0x0,0xc0,},
-	"aessetup",0x44452583,Crypt_aessetup,40,2,{0x0,0xc0,},
-	"blowfishcbc",0xac616ba,Crypt_blowfishcbc,48,2,{0x0,0xc0,},
-	"blowfishsetup",0x44452583,Crypt_blowfishsetup,40,2,{0x0,0xc0,},
-	"DigestState.copy",0x491fbd11,DigestState_copy,40,2,{0x0,0x80,},
-	"descbc",0xac616ba,Crypt_descbc,48,2,{0x0,0xc0,},
-	"desecb",0xac616ba,Crypt_desecb,48,2,{0x0,0xc0,},
-	"dessetup",0x44452583,Crypt_dessetup,40,2,{0x0,0xc0,},
-	"dhparams",0x6abb2418,Crypt_dhparams,40,0,{0},
-	"dsagen",0xfca97ad3,Crypt_dsagen,40,2,{0x0,0x80,},
-	"eggen",0x6e59448f,Crypt_eggen,40,0,{0},
-	"genSK",0x5d82edbe,Crypt_genSK,40,2,{0x0,0x80,},
-	"genSKfromPK",0x368c3183,Crypt_genSKfromPK,40,2,{0x0,0x80,},
-	"hmac_md5",0xec9ac159,Crypt_hmac_md5,56,2,{0x0,0xb8,},
-	"hmac_sha1",0xec9ac159,Crypt_hmac_sha1,56,2,{0x0,0xb8,},
-	"ideacbc",0xac616ba,Crypt_ideacbc,48,2,{0x0,0xc0,},
-	"ideaecb",0xac616ba,Crypt_ideaecb,48,2,{0x0,0xc0,},
-	"ideasetup",0x44452583,Crypt_ideasetup,40,2,{0x0,0xc0,},
-	"md4",0x7656377,Crypt_md4,48,2,{0x0,0xb0,},
-	"md5",0x7656377,Crypt_md5,48,2,{0x0,0xb0,},
-	"rc4",0xd051c505,Crypt_rc4,48,2,{0x0,0xc0,},
-	"rc4back",0x3643caf7,Crypt_rc4back,40,2,{0x0,0x80,},
-	"rc4setup",0x6fa90725,Crypt_rc4setup,40,2,{0x0,0x80,},
-	"rc4skip",0x3643caf7,Crypt_rc4skip,40,2,{0x0,0x80,},
-	"rsadecrypt",0x91e80677,Crypt_rsadecrypt,40,2,{0x0,0xc0,},
-	"rsaencrypt",0x3cddeb19,Crypt_rsaencrypt,40,2,{0x0,0xc0,},
-	"rsafill",0x621f5851,Crypt_rsafill,56,2,{0x0,0xf8,},
-	"rsagen",0xa59005ba,Crypt_rsagen,48,0,{0},
-	"sha1",0x7656377,Crypt_sha1,48,2,{0x0,0xb0,},
-	"sha224",0x7656377,Crypt_sha224,48,2,{0x0,0xb0,},
-	"sha256",0x7656377,Crypt_sha256,48,2,{0x0,0xb0,},
-	"sha384",0x7656377,Crypt_sha384,48,2,{0x0,0xb0,},
-	"sha512",0x7656377,Crypt_sha512,48,2,{0x0,0xb0,},
-	"sign",0xe955b4f2,Crypt_sign,40,2,{0x0,0xc0,},
-	"sktopk",0x132f856e,Crypt_sktopk,40,2,{0x0,0x80,},
-	"verify",0xff419b7b,Crypt_verify,48,2,{0x0,0xe0,},
-	0
-};
-#define Cryptmodlen	36
--- a/libinterp/drawmod.h
+++ /dev/null
@@ -1,94 +1,0 @@
-typedef struct{char *name; long sig; void (*fn)(void*); int size; int np; uchar map[16];} Runtab;
-Runtab Drawmodtab[]={
-	"Rect.Xrect",0xd1fbcdc0,Rect_Xrect,64,0,{0},
-	"Point.add",0x95a87a7,Point_add,48,0,{0},
-	"Rect.addpt",0xbcba91ad,Rect_addpt,56,0,{0},
-	"Display.allocate",0x74694470,Display_allocate,40,2,{0x0,0x80,},
-	"Screen.allocate",0x1e813b8a,Screen_allocate,48,2,{0x0,0xc0,},
-	"Image.arc",0x1685a04e,Image_arc,80,2,{0x0,0x82,},
-	"Image.arcop",0x8521de24,Image_arcop,80,2,{0x0,0x82,},
-	"Image.arrow",0x7b3fc6d3,Image_arrow,48,0,{0},
-	"Font.bbox",0x541e2d08,Font_bbox,40,2,{0x0,0xc0,},
-	"Image.bezier",0x5baca124,Image_bezier,96,3,{0x0,0x80,0x8,},
-	"Image.bezierop",0xae13ba0e,Image_bezierop,96,3,{0x0,0x80,0x8,},
-	"Image.bezspline",0x70f06194,Image_bezspline,64,2,{0x0,0xc4,},
-	"Image.bezsplineop",0x94b3bea1,Image_bezsplineop,72,2,{0x0,0xc4,},
-	"Image.border",0x59381f67,Image_border,72,2,{0x0,0x82,},
-	"Image.bottom",0x642fa8b1,Image_bottom,40,2,{0x0,0x80,},
-	"Screen.bottom",0xe2817b5f,Screen_bottom,40,2,{0x0,0xc0,},
-	"Font.build",0x7fddba2c,Font_build,48,2,{0x0,0xe0,},
-	"bytesperline",0xab1724b2,Draw_bytesperline,56,0,{0},
-	"Rect.canon",0xe969971c,Rect_canon,48,0,{0},
-	"Rect.clip",0x1ad68a89,Rect_clip,64,0,{0},
-	"Display.cmap2rgb",0xda836903,Display_cmap2rgb,40,2,{0x0,0x80,},
-	"Display.cmap2rgba",0xa64b341,Display_cmap2rgba,40,2,{0x0,0x80,},
-	"Display.color",0xac54c4aa,Display_color,40,2,{0x0,0x80,},
-	"Display.colormix",0x9e941050,Display_colormix,48,2,{0x0,0x80,},
-	"Rect.combine",0x35d786ac,Rect_combine,64,0,{0},
-	"Rect.contains",0x5f13af31,Rect_contains,56,0,{0},
-	"Chans.depth",0x90b71a6,Chans_depth,40,0,{0},
-	"Point.div",0x7f0ac44e,Point_div,48,0,{0},
-	"Image.draw",0xe2951762,Image_draw,72,2,{0x0,0x86,},
-	"Image.drawop",0x7e2751d3,Image_drawop,72,2,{0x0,0x86,},
-	"Rect.dx",0x8db540cc,Rect_dx,48,0,{0},
-	"Rect.dy",0x8db540cc,Rect_dy,48,0,{0},
-	"Image.ellipse",0xea6f2000,Image_ellipse,72,2,{0x0,0x82,},
-	"Image.ellipseop",0xc0af34c6,Image_ellipseop,72,2,{0x0,0x82,},
-	"Chans.eq",0x2ba41fd4,Chans_eq,40,0,{0},
-	"Point.eq",0xd0634e59,Point_eq,48,0,{0},
-	"Rect.eq",0xd1fbcdc0,Rect_eq,64,0,{0},
-	"Image.fillarc",0x784ac6f8,Image_fillarc,72,2,{0x0,0x84,},
-	"Image.fillarcop",0xbbcdbdd,Image_fillarcop,80,2,{0x0,0x84,},
-	"Image.fillbezier",0x4a07ed44,Image_fillbezier,88,3,{0x0,0x80,0x20,},
-	"Image.fillbezierop",0xb3796aa0,Image_fillbezierop,88,3,{0x0,0x80,0x20,},
-	"Image.fillbezspline",0x4aac99aa,Image_fillbezspline,56,2,{0x0,0xd0,},
-	"Image.fillbezsplineop",0x6288a256,Image_fillbezsplineop,64,2,{0x0,0xd0,},
-	"Image.fillellipse",0xc2961c2b,Image_fillellipse,64,2,{0x0,0x84,},
-	"Image.fillellipseop",0x9816222d,Image_fillellipseop,72,2,{0x0,0x84,},
-	"Image.fillpoly",0x4aac99aa,Image_fillpoly,56,2,{0x0,0xd0,},
-	"Image.fillpolyop",0x6288a256,Image_fillpolyop,64,2,{0x0,0xd0,},
-	"Image.flush",0xb09fc26e,Image_flush,40,2,{0x0,0x80,},
-	"Image.gendraw",0xa30a11c7,Image_gendraw,80,3,{0x0,0x84,0x80,},
-	"Image.gendrawop",0x3e8228a,Image_gendrawop,80,3,{0x0,0x84,0x80,},
-	"Display.getwindow",0xdfbf1d73,Display_getwindow,56,2,{0x0,0xf0,},
-	"icossin",0x10ea0ce,Draw_icossin,40,0,{0},
-	"icossin2",0xd07585f7,Draw_icossin2,40,0,{0},
-	"Point.in",0xcf69adf9,Point_in,56,0,{0},
-	"Rect.inrect",0xd1fbcdc0,Rect_inrect,64,0,{0},
-	"Rect.inset",0x1fabb24,Rect_inset,56,0,{0},
-	"Image.line",0x7288c7b9,Image_line,80,3,{0x0,0x80,0x80,},
-	"Image.lineop",0xe34363b9,Image_lineop,80,3,{0x0,0x80,0x80,},
-	"Chans.mk",0xadae6aad,Chans_mk,40,2,{0x0,0x80,},
-	"Point.mul",0x7f0ac44e,Point_mul,48,0,{0},
-	"Image.name",0xdff53107,Image_name,48,2,{0x0,0xc0,},
-	"Display.namedimage",0x47522dfe,Display_namedimage,40,2,{0x0,0xc0,},
-	"Display.newimage",0xb8479988,Display_newimage,64,2,{0x0,0x80,},
-	"Screen.newwindow",0xcf19f7a8,Screen_newwindow,64,2,{0x0,0x80,},
-	"Display.open",0x47522dfe,Display_open,40,2,{0x0,0xc0,},
-	"Font.open",0xddcb2ff0,Font_open,40,2,{0x0,0xc0,},
-	"Image.origin",0x9171b0bd,Image_origin,56,2,{0x0,0x80,},
-	"Image.poly",0x70f06194,Image_poly,64,2,{0x0,0xc4,},
-	"Image.polyop",0x94b3bea1,Image_polyop,72,2,{0x0,0xc4,},
-	"Display.publicscreen",0x507e0780,Display_publicscreen,40,2,{0x0,0x80,},
-	"Display.readimage",0xd38f4d48,Display_readimage,40,2,{0x0,0xc0,},
-	"Image.readpixels",0x93d30c7c,Image_readpixels,56,2,{0x0,0x84,},
-	"Display.rgb",0x8e71a513,Display_rgb,48,2,{0x0,0x80,},
-	"Display.rgb2cmap",0xbf6c3d95,Display_rgb2cmap,48,2,{0x0,0x80,},
-	"setalpha",0x6584767b,Draw_setalpha,40,0,{0},
-	"Rect.size",0x3ecfd83e,Rect_size,48,0,{0},
-	"Display.startrefresh",0xf0df9cae,Display_startrefresh,40,2,{0x0,0x80,},
-	"Point.sub",0x95a87a7,Point_sub,48,0,{0},
-	"Rect.subpt",0xbcba91ad,Rect_subpt,56,0,{0},
-	"Chans.text",0xb20b7b7b,Chans_text,40,0,{0},
-	"Image.text",0xa5927686,Image_text,64,2,{0x0,0x93,},
-	"Image.textbg",0xbbb55403,Image_textbg,80,3,{0x0,0x93,0x80,},
-	"Image.textbgop",0xea84ed21,Image_textbgop,80,3,{0x0,0x93,0x80,},
-	"Image.textop",0x22b71b43,Image_textop,72,2,{0x0,0x93,},
-	"Image.top",0x642fa8b1,Image_top,40,2,{0x0,0x80,},
-	"Screen.top",0xe2817b5f,Screen_top,40,2,{0x0,0xc0,},
-	"Font.width",0x1c70cba4,Font_width,40,2,{0x0,0xc0,},
-	"Display.writeimage",0x7bd53940,Display_writeimage,48,2,{0x0,0xe0,},
-	"Image.writepixels",0x93d30c7c,Image_writepixels,56,2,{0x0,0x84,},
-	0
-};
-#define Drawmodlen	89
--- a/libinterp/freetypemod.h
+++ /dev/null
@@ -1,11 +1,0 @@
-typedef struct{char *name; long sig; void (*fn)(void*); int size; int np; uchar map[16];} Runtab;
-Runtab Freetypemodtab[]={
-	"Face.haschar",0x6a7da190,Face_haschar,40,2,{0x0,0x80,},
-	"Face.loadglyph",0xdd275b67,Face_loadglyph,40,2,{0x0,0x80,},
-	"newface",0x18a90be,Freetype_newface,40,2,{0x0,0x80,},
-	"newmemface",0xc56f82dd,Freetype_newmemface,40,2,{0x0,0x80,},
-	"Face.setcharsize",0xb282ce87,Face_setcharsize,48,2,{0x0,0x80,},
-	"Face.settransform",0xcf26b85e,Face_settransform,48,2,{0x0,0xe0,},
-	0
-};
-#define Freetypemodlen	6
--- a/libinterp/ipintsmod.h
+++ /dev/null
@@ -1,40 +1,0 @@
-typedef struct{char *name; long sig; void (*fn)(void*); int size; int np; uchar map[16];} Runtab;
-Runtab IPintsmodtab[]={
-	"DSAprimes",0x40d03bb6,IPints_DSAprimes,32,0,{0},
-	"IPint.add",0xa47c1b24,IPint_add,40,2,{0x0,0xc0,},
-	"IPint.and",0xa47c1b24,IPint_and,40,2,{0x0,0xc0,},
-	"IPint.b64toip",0xa803ee03,IPint_b64toip,40,2,{0x0,0x80,},
-	"IPint.bebytestoip",0x6fa90725,IPint_bebytestoip,40,2,{0x0,0x80,},
-	"IPint.bits",0xeb4c9bad,IPint_bits,40,2,{0x0,0x80,},
-	"IPint.bytestoip",0x6fa90725,IPint_bytestoip,40,2,{0x0,0x80,},
-	"IPint.cmp",0x79774f9e,IPint_cmp,40,2,{0x0,0xc0,},
-	"IPint.copy",0x491fbd11,IPint_copy,40,2,{0x0,0x80,},
-	"IPint.div",0x4672bf61,IPint_div,40,2,{0x0,0xc0,},
-	"IPint.eq",0x79774f9e,IPint_eq,40,2,{0x0,0xc0,},
-	"IPint.expmod",0xe6105024,IPint_expmod,48,2,{0x0,0xe0,},
-	"genprime",0x70bcd6f1,IPints_genprime,40,0,{0},
-	"gensafeprime",0x9a3f0392,IPints_gensafeprime,40,0,{0},
-	"genstrongprime",0x70bcd6f1,IPints_genstrongprime,40,0,{0},
-	"IPint.inttoip",0x95dc8b6d,IPint_inttoip,40,0,{0},
-	"IPint.invert",0xa47c1b24,IPint_invert,40,2,{0x0,0xc0,},
-	"IPint.iptob64",0xfab4eb8a,IPint_iptob64,40,2,{0x0,0x80,},
-	"IPint.iptob64z",0xfab4eb8a,IPint_iptob64z,40,2,{0x0,0x80,},
-	"IPint.iptobebytes",0xc8e5162d,IPint_iptobebytes,40,2,{0x0,0x80,},
-	"IPint.iptobytes",0xc8e5162d,IPint_iptobytes,40,2,{0x0,0x80,},
-	"IPint.iptoint",0xeb4c9bad,IPint_iptoint,40,2,{0x0,0x80,},
-	"IPint.iptostr",0xf9fdc03d,IPint_iptostr,40,2,{0x0,0x80,},
-	"IPint.mod",0xa47c1b24,IPint_mod,40,2,{0x0,0xc0,},
-	"IPint.mul",0xa47c1b24,IPint_mul,40,2,{0x0,0xc0,},
-	"IPint.neg",0x491fbd11,IPint_neg,40,2,{0x0,0x80,},
-	"IPint.not",0x491fbd11,IPint_not,40,2,{0x0,0x80,},
-	"IPint.ori",0xa47c1b24,IPint_ori,40,2,{0x0,0xc0,},
-	"probably_prime",0xd67dfdfa,IPints_probably_prime,40,2,{0x0,0x80,},
-	"IPint.random",0x95dc8b6d,IPint_random,40,0,{0},
-	"IPint.shl",0xc7b0bc01,IPint_shl,40,2,{0x0,0x80,},
-	"IPint.shr",0xc7b0bc01,IPint_shr,40,2,{0x0,0x80,},
-	"IPint.strtoip",0x12d7a943,IPint_strtoip,40,2,{0x0,0x80,},
-	"IPint.sub",0xa47c1b24,IPint_sub,40,2,{0x0,0xc0,},
-	"IPint.xor",0xa47c1b24,IPint_xor,40,2,{0x0,0xc0,},
-	0
-};
-#define IPintsmodlen	35
--- a/libinterp/keyring.h
+++ /dev/null
@@ -1,99 +1,0 @@
-typedef struct{char *name; long sig; void (*fn)(void*); int size; int np; uchar map[16];} Runtab;
-Runtab Keyringmodtab[]={
-	"IPint.add",0xa47c1b24,IPint_add,40,2,{0x0,0xc0,},
-	"aescbc",0xac616ba,Keyring_aescbc,48,2,{0x0,0xc0,},
-	"aessetup",0x44452583,Keyring_aessetup,40,2,{0x0,0xc0,},
-	"IPint.and",0xa47c1b24,IPint_and,40,2,{0x0,0xc0,},
-	"auth",0x9c576bb,Keyring_auth,48,2,{0x0,0xc0,},
-	"IPint.b64toip",0xa803ee03,IPint_b64toip,40,2,{0x0,0x80,},
-	"IPint.bebytestoip",0x6fa90725,IPint_bebytestoip,40,2,{0x0,0x80,},
-	"IPint.bits",0xeb4c9bad,IPint_bits,40,2,{0x0,0x80,},
-	"blowfishcbc",0xac616ba,Keyring_blowfishcbc,48,2,{0x0,0xc0,},
-	"blowfishsetup",0x44452583,Keyring_blowfishsetup,40,2,{0x0,0xc0,},
-	"IPint.bytestoip",0x6fa90725,IPint_bytestoip,40,2,{0x0,0x80,},
-	"certtoattr",0xbc65254a,Keyring_certtoattr,40,2,{0x0,0x80,},
-	"certtostr",0xbc65254a,Keyring_certtostr,40,2,{0x0,0x80,},
-	"IPint.cmp",0x79774f9e,IPint_cmp,40,2,{0x0,0xc0,},
-	"IPint.copy",0x491fbd11,IPint_copy,40,2,{0x0,0x80,},
-	"DigestState.copy",0x491fbd11,DigestState_copy,40,2,{0x0,0x80,},
-	"RSAsk.decrypt",0xf3b51b95,RSAsk_decrypt,40,2,{0x0,0xc0,},
-	"descbc",0xac616ba,Keyring_descbc,48,2,{0x0,0xc0,},
-	"desecb",0xac616ba,Keyring_desecb,48,2,{0x0,0xc0,},
-	"dessetup",0x44452583,Keyring_dessetup,40,2,{0x0,0xc0,},
-	"dhparams",0x6abb2418,Keyring_dhparams,40,0,{0},
-	"IPint.div",0x4672bf61,IPint_div,40,2,{0x0,0xc0,},
-	"RSApk.encrypt",0xdc0ec366,RSApk_encrypt,40,2,{0x0,0xc0,},
-	"IPint.eq",0x79774f9e,IPint_eq,40,2,{0x0,0xc0,},
-	"IPint.expmod",0xe6105024,IPint_expmod,48,2,{0x0,0xe0,},
-	"RSAsk.fill",0x2ab0d50a,RSAsk_fill,56,2,{0x0,0xf8,},
-	"RSAsk.gen",0xc197fd0,RSAsk_gen,48,0,{0},
-	"DSAsk.gen",0x46f0eb94,DSAsk_gen,40,2,{0x0,0x80,},
-	"EGsk.gen",0x4a59c528,EGsk_gen,40,0,{0},
-	"genSK",0xadd8cbd9,Keyring_genSK,48,2,{0x0,0xc0,},
-	"genSKfromPK",0x5416d1ee,Keyring_genSKfromPK,40,2,{0x0,0xc0,},
-	"getbytearray",0x4e02ce80,Keyring_getbytearray,40,2,{0x0,0x80,},
-	"getmsg",0xd9de1bb7,Keyring_getmsg,40,2,{0x0,0x80,},
-	"getstring",0x92f10e56,Keyring_getstring,40,2,{0x0,0x80,},
-	"hmac_md5",0xec9ac159,Keyring_hmac_md5,56,2,{0x0,0xb8,},
-	"hmac_sha1",0xec9ac159,Keyring_hmac_sha1,56,2,{0x0,0xb8,},
-	"ideacbc",0xac616ba,Keyring_ideacbc,48,2,{0x0,0xc0,},
-	"ideaecb",0xac616ba,Keyring_ideaecb,48,2,{0x0,0xc0,},
-	"ideasetup",0x44452583,Keyring_ideasetup,40,2,{0x0,0xc0,},
-	"IPint.inttoip",0x95dc8b6d,IPint_inttoip,40,0,{0},
-	"IPint.invert",0xa47c1b24,IPint_invert,40,2,{0x0,0xc0,},
-	"IPint.iptob64",0xfab4eb8a,IPint_iptob64,40,2,{0x0,0x80,},
-	"IPint.iptob64z",0xfab4eb8a,IPint_iptob64z,40,2,{0x0,0x80,},
-	"IPint.iptobebytes",0xc8e5162d,IPint_iptobebytes,40,2,{0x0,0x80,},
-	"IPint.iptobytes",0xc8e5162d,IPint_iptobytes,40,2,{0x0,0x80,},
-	"IPint.iptoint",0xeb4c9bad,IPint_iptoint,40,2,{0x0,0x80,},
-	"IPint.iptostr",0xf9fdc03d,IPint_iptostr,40,2,{0x0,0x80,},
-	"md4",0x7656377,Keyring_md4,48,2,{0x0,0xb0,},
-	"md5",0x7656377,Keyring_md5,48,2,{0x0,0xb0,},
-	"IPint.mod",0xa47c1b24,IPint_mod,40,2,{0x0,0xc0,},
-	"IPint.mul",0xa47c1b24,IPint_mul,40,2,{0x0,0xc0,},
-	"IPint.neg",0x491fbd11,IPint_neg,40,2,{0x0,0x80,},
-	"IPint.not",0x491fbd11,IPint_not,40,2,{0x0,0x80,},
-	"IPint.ori",0xa47c1b24,IPint_ori,40,2,{0x0,0xc0,},
-	"pktoattr",0xfb4e61ba,Keyring_pktoattr,40,2,{0x0,0x80,},
-	"pktostr",0xfb4e61ba,Keyring_pktostr,40,2,{0x0,0x80,},
-	"putbytearray",0x7cfef557,Keyring_putbytearray,48,2,{0x0,0xc0,},
-	"puterror",0xd2526222,Keyring_puterror,40,2,{0x0,0xc0,},
-	"putstring",0xd2526222,Keyring_putstring,40,2,{0x0,0xc0,},
-	"IPint.random",0x70bcd6f1,IPint_random,40,0,{0},
-	"rc4",0xd051c505,Keyring_rc4,48,2,{0x0,0xc0,},
-	"rc4back",0x3643caf7,Keyring_rc4back,40,2,{0x0,0x80,},
-	"rc4setup",0x6fa90725,Keyring_rc4setup,40,2,{0x0,0x80,},
-	"rc4skip",0x3643caf7,Keyring_rc4skip,40,2,{0x0,0x80,},
-	"readauthinfo",0xb2c82015,Keyring_readauthinfo,40,2,{0x0,0x80,},
-	"senderrmsg",0xd2526222,Keyring_senderrmsg,40,2,{0x0,0xc0,},
-	"sendmsg",0x7cfef557,Keyring_sendmsg,48,2,{0x0,0xc0,},
-	"sha1",0x7656377,Keyring_sha1,48,2,{0x0,0xb0,},
-	"sha224",0x7656377,Keyring_sha224,48,2,{0x0,0xb0,},
-	"sha256",0x7656377,Keyring_sha256,48,2,{0x0,0xb0,},
-	"sha384",0x7656377,Keyring_sha384,48,2,{0x0,0xb0,},
-	"sha512",0x7656377,Keyring_sha512,48,2,{0x0,0xb0,},
-	"IPint.shl",0xc7b0bc01,IPint_shl,40,2,{0x0,0x80,},
-	"IPint.shr",0xc7b0bc01,IPint_shr,40,2,{0x0,0x80,},
-	"sign",0xdacb7a7e,Keyring_sign,48,2,{0x0,0xb0,},
-	"RSAsk.sign",0x5dbdc2fe,RSAsk_sign,40,2,{0x0,0xc0,},
-	"DSAsk.sign",0x6e51e1b3,DSAsk_sign,40,2,{0x0,0xc0,},
-	"EGsk.sign",0xca053e70,EGsk_sign,40,2,{0x0,0xc0,},
-	"signm",0xba5bd10f,Keyring_signm,48,2,{0x0,0xe0,},
-	"sktoattr",0xfb4e61ba,Keyring_sktoattr,40,2,{0x0,0x80,},
-	"sktopk",0x6f74c7c9,Keyring_sktopk,40,2,{0x0,0x80,},
-	"sktostr",0xfb4e61ba,Keyring_sktostr,40,2,{0x0,0x80,},
-	"strtocert",0x2c0ee68a,Keyring_strtocert,40,2,{0x0,0x80,},
-	"IPint.strtoip",0x12d7a943,IPint_strtoip,40,2,{0x0,0x80,},
-	"strtopk",0xcc511522,Keyring_strtopk,40,2,{0x0,0x80,},
-	"strtosk",0xcc511522,Keyring_strtosk,40,2,{0x0,0x80,},
-	"IPint.sub",0xa47c1b24,IPint_sub,40,2,{0x0,0xc0,},
-	"verify",0x8b5b9f76,Keyring_verify,48,2,{0x0,0xe0,},
-	"RSApk.verify",0x1857beff,RSApk_verify,48,2,{0x0,0xe0,},
-	"DSApk.verify",0xeca448ff,DSApk_verify,48,2,{0x0,0xe0,},
-	"EGpk.verify",0xfb1e256c,EGpk_verify,48,2,{0x0,0xe0,},
-	"verifym",0x8b5b9f76,Keyring_verifym,48,2,{0x0,0xe0,},
-	"writeauthinfo",0x5ba03002,Keyring_writeauthinfo,40,2,{0x0,0xc0,},
-	"IPint.xor",0xa47c1b24,IPint_xor,40,2,{0x0,0xc0,},
-	0
-};
-#define Keyringmodlen	94
--- a/libinterp/keyringif.h
+++ /dev/null
@@ -1,1692 +1,0 @@
-typedef struct Sys_Qid Sys_Qid;
-typedef struct Sys_Dir Sys_Dir;
-typedef struct Sys_FD Sys_FD;
-typedef struct Sys_Connection Sys_Connection;
-typedef struct Sys_FileIO Sys_FileIO;
-typedef struct Keyring_IPint Keyring_IPint;
-typedef struct Keyring_SigAlg Keyring_SigAlg;
-typedef struct Keyring_PK Keyring_PK;
-typedef struct Keyring_SK Keyring_SK;
-typedef struct Keyring_Certificate Keyring_Certificate;
-typedef struct Keyring_DigestState Keyring_DigestState;
-typedef struct Keyring_AESstate Keyring_AESstate;
-typedef struct Keyring_DESstate Keyring_DESstate;
-typedef struct Keyring_IDEAstate Keyring_IDEAstate;
-typedef struct Keyring_RC4state Keyring_RC4state;
-typedef struct Keyring_BFstate Keyring_BFstate;
-typedef struct Keyring_Authinfo Keyring_Authinfo;
-typedef struct Keyring_RSApk Keyring_RSApk;
-typedef struct Keyring_RSAsk Keyring_RSAsk;
-typedef struct Keyring_RSAsig Keyring_RSAsig;
-typedef struct Keyring_DSApk Keyring_DSApk;
-typedef struct Keyring_DSAsk Keyring_DSAsk;
-typedef struct Keyring_DSAsig Keyring_DSAsig;
-typedef struct Keyring_EGpk Keyring_EGpk;
-typedef struct Keyring_EGsk Keyring_EGsk;
-typedef struct Keyring_EGsig Keyring_EGsig;
-struct Sys_Qid
-{
-	LONG	path;
-	WORD	vers;
-	WORD	qtype;
-};
-#define Sys_Qid_size 16
-#define Sys_Qid_map {0}
-struct Sys_Dir
-{
-	String*	name;
-	String*	uid;
-	String*	gid;
-	String*	muid;
-	Sys_Qid	qid;
-	WORD	mode;
-	WORD	atime;
-	WORD	mtime;
-	uchar	_pad44[4];
-	LONG	length;
-	WORD	dtype;
-	WORD	dev;
-};
-#define Sys_Dir_size 64
-#define Sys_Dir_map {0xf0,}
-struct Sys_FD
-{
-	WORD	fd;
-};
-#define Sys_FD_size 4
-#define Sys_FD_map {0}
-struct Sys_Connection
-{
-	Sys_FD*	dfd;
-	Sys_FD*	cfd;
-	String*	dir;
-};
-#define Sys_Connection_size 12
-#define Sys_Connection_map {0xe0,}
-typedef struct{ Array* t0; String* t1; } Sys_Rread;
-#define Sys_Rread_size 8
-#define Sys_Rread_map {0xc0,}
-typedef struct{ WORD t0; String* t1; } Sys_Rwrite;
-#define Sys_Rwrite_size 8
-#define Sys_Rwrite_map {0x40,}
-struct Sys_FileIO
-{
-	Channel*	read;
-	Channel*	write;
-};
-typedef struct{ WORD t0; WORD t1; WORD t2; Channel* t3; } Sys_FileIO_read;
-#define Sys_FileIO_read_size 16
-#define Sys_FileIO_read_map {0x10,}
-typedef struct{ WORD t0; Array* t1; WORD t2; Channel* t3; } Sys_FileIO_write;
-#define Sys_FileIO_write_size 16
-#define Sys_FileIO_write_map {0x50,}
-#define Sys_FileIO_size 8
-#define Sys_FileIO_map {0xc0,}
-struct Keyring_IPint
-{
-	WORD	x;
-};
-#define Keyring_IPint_size 4
-#define Keyring_IPint_map {0}
-struct Keyring_SigAlg
-{
-	String*	name;
-};
-#define Keyring_SigAlg_size 4
-#define Keyring_SigAlg_map {0x80,}
-struct Keyring_PK
-{
-	Keyring_SigAlg*	sa;
-	String*	owner;
-};
-#define Keyring_PK_size 8
-#define Keyring_PK_map {0xc0,}
-struct Keyring_SK
-{
-	Keyring_SigAlg*	sa;
-	String*	owner;
-};
-#define Keyring_SK_size 8
-#define Keyring_SK_map {0xc0,}
-struct Keyring_Certificate
-{
-	Keyring_SigAlg*	sa;
-	String*	ha;
-	String*	signer;
-	WORD	exp;
-};
-#define Keyring_Certificate_size 16
-#define Keyring_Certificate_map {0xe0,}
-struct Keyring_DigestState
-{
-	WORD	x;
-};
-#define Keyring_DigestState_size 4
-#define Keyring_DigestState_map {0}
-struct Keyring_AESstate
-{
-	WORD	x;
-};
-#define Keyring_AESstate_size 4
-#define Keyring_AESstate_map {0}
-struct Keyring_DESstate
-{
-	WORD	x;
-};
-#define Keyring_DESstate_size 4
-#define Keyring_DESstate_map {0}
-struct Keyring_IDEAstate
-{
-	WORD	x;
-};
-#define Keyring_IDEAstate_size 4
-#define Keyring_IDEAstate_map {0}
-struct Keyring_RC4state
-{
-	WORD	x;
-};
-#define Keyring_RC4state_size 4
-#define Keyring_RC4state_map {0}
-struct Keyring_BFstate
-{
-	WORD	x;
-};
-#define Keyring_BFstate_size 4
-#define Keyring_BFstate_map {0}
-struct Keyring_Authinfo
-{
-	Keyring_SK*	mysk;
-	Keyring_PK*	mypk;
-	Keyring_Certificate*	cert;
-	Keyring_PK*	spk;
-	Keyring_IPint*	alpha;
-	Keyring_IPint*	p;
-};
-#define Keyring_Authinfo_size 24
-#define Keyring_Authinfo_map {0xfc,}
-struct Keyring_RSApk
-{
-	Keyring_IPint*	n;
-	Keyring_IPint*	ek;
-};
-#define Keyring_RSApk_size 8
-#define Keyring_RSApk_map {0xc0,}
-struct Keyring_RSAsk
-{
-	Keyring_RSApk*	pk;
-	Keyring_IPint*	dk;
-	Keyring_IPint*	p;
-	Keyring_IPint*	q;
-	Keyring_IPint*	kp;
-	Keyring_IPint*	kq;
-	Keyring_IPint*	c2;
-};
-#define Keyring_RSAsk_size 28
-#define Keyring_RSAsk_map {0xfe,}
-struct Keyring_RSAsig
-{
-	Keyring_IPint*	n;
-};
-#define Keyring_RSAsig_size 4
-#define Keyring_RSAsig_map {0x80,}
-struct Keyring_DSApk
-{
-	Keyring_IPint*	p;
-	Keyring_IPint*	q;
-	Keyring_IPint*	alpha;
-	Keyring_IPint*	key;
-};
-#define Keyring_DSApk_size 16
-#define Keyring_DSApk_map {0xf0,}
-struct Keyring_DSAsk
-{
-	Keyring_DSApk*	pk;
-	Keyring_IPint*	secret;
-};
-#define Keyring_DSAsk_size 8
-#define Keyring_DSAsk_map {0xc0,}
-struct Keyring_DSAsig
-{
-	Keyring_IPint*	r;
-	Keyring_IPint*	s;
-};
-#define Keyring_DSAsig_size 8
-#define Keyring_DSAsig_map {0xc0,}
-struct Keyring_EGpk
-{
-	Keyring_IPint*	p;
-	Keyring_IPint*	alpha;
-	Keyring_IPint*	key;
-};
-#define Keyring_EGpk_size 12
-#define Keyring_EGpk_map {0xe0,}
-struct Keyring_EGsk
-{
-	Keyring_EGpk*	pk;
-	Keyring_IPint*	secret;
-};
-#define Keyring_EGsk_size 8
-#define Keyring_EGsk_map {0xc0,}
-struct Keyring_EGsig
-{
-	Keyring_IPint*	r;
-	Keyring_IPint*	s;
-};
-#define Keyring_EGsig_size 8
-#define Keyring_EGsig_map {0xc0,}
-void Sys_announce(void*);
-typedef struct F_Sys_announce F_Sys_announce;
-struct F_Sys_announce
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; Sys_Connection t1; }*	ret;
-	uchar	temps[12];
-	String*	addr;
-};
-void Sys_aprint(void*);
-typedef struct F_Sys_aprint F_Sys_aprint;
-struct F_Sys_aprint
-{
-	WORD	regs[NREG-1];
-	Array**	ret;
-	uchar	temps[12];
-	String*	s;
-	WORD	vargs;
-};
-void Sys_bind(void*);
-typedef struct F_Sys_bind F_Sys_bind;
-struct F_Sys_bind
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	s;
-	String*	on;
-	WORD	flags;
-};
-void Sys_byte2char(void*);
-typedef struct F_Sys_byte2char F_Sys_byte2char;
-struct F_Sys_byte2char
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; WORD t1; WORD t2; }*	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-};
-void Sys_char2byte(void*);
-typedef struct F_Sys_char2byte F_Sys_char2byte;
-struct F_Sys_char2byte
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	WORD	c;
-	Array*	buf;
-	WORD	n;
-};
-void Sys_chdir(void*);
-typedef struct F_Sys_chdir F_Sys_chdir;
-struct F_Sys_chdir
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	path;
-};
-void Sys_create(void*);
-typedef struct F_Sys_create F_Sys_create;
-struct F_Sys_create
-{
-	WORD	regs[NREG-1];
-	Sys_FD**	ret;
-	uchar	temps[12];
-	String*	s;
-	WORD	mode;
-	WORD	perm;
-};
-void Sys_dial(void*);
-typedef struct F_Sys_dial F_Sys_dial;
-struct F_Sys_dial
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; Sys_Connection t1; }*	ret;
-	uchar	temps[12];
-	String*	addr;
-	String*	local;
-};
-void Sys_dirread(void*);
-typedef struct F_Sys_dirread F_Sys_dirread;
-struct F_Sys_dirread
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; Array* t1; }*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-};
-void Sys_dup(void*);
-typedef struct F_Sys_dup F_Sys_dup;
-struct F_Sys_dup
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	WORD	old;
-	WORD	new;
-};
-void Sys_export(void*);
-typedef struct F_Sys_export F_Sys_export;
-struct F_Sys_export
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	c;
-	String*	dir;
-	WORD	flag;
-};
-void Sys_fauth(void*);
-typedef struct F_Sys_fauth F_Sys_fauth;
-struct F_Sys_fauth
-{
-	WORD	regs[NREG-1];
-	Sys_FD**	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	String*	aname;
-};
-void Sys_fd2path(void*);
-typedef struct F_Sys_fd2path F_Sys_fd2path;
-struct F_Sys_fd2path
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-};
-void Sys_fildes(void*);
-typedef struct F_Sys_fildes F_Sys_fildes;
-struct F_Sys_fildes
-{
-	WORD	regs[NREG-1];
-	Sys_FD**	ret;
-	uchar	temps[12];
-	WORD	fd;
-};
-void Sys_file2chan(void*);
-typedef struct F_Sys_file2chan F_Sys_file2chan;
-struct F_Sys_file2chan
-{
-	WORD	regs[NREG-1];
-	Sys_FileIO**	ret;
-	uchar	temps[12];
-	String*	dir;
-	String*	file;
-};
-void Sys_fprint(void*);
-typedef struct F_Sys_fprint F_Sys_fprint;
-struct F_Sys_fprint
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	String*	s;
-	WORD	vargs;
-};
-void Sys_fstat(void*);
-typedef struct F_Sys_fstat F_Sys_fstat;
-struct F_Sys_fstat
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; uchar	_pad4[4]; Sys_Dir t1; }*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-};
-void Sys_fversion(void*);
-typedef struct F_Sys_fversion F_Sys_fversion;
-struct F_Sys_fversion
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; String* t1; }*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	WORD	msize;
-	String*	version;
-};
-void Sys_fwstat(void*);
-typedef struct F_Sys_fwstat F_Sys_fwstat;
-struct F_Sys_fwstat
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	uchar	_pad36[4];
-	Sys_Dir	d;
-};
-void Sys_iounit(void*);
-typedef struct F_Sys_iounit F_Sys_iounit;
-struct F_Sys_iounit
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-};
-void Sys_listen(void*);
-typedef struct F_Sys_listen F_Sys_listen;
-struct F_Sys_listen
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; Sys_Connection t1; }*	ret;
-	uchar	temps[12];
-	Sys_Connection	c;
-};
-void Sys_millisec(void*);
-typedef struct F_Sys_millisec F_Sys_millisec;
-struct F_Sys_millisec
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-};
-void Sys_mount(void*);
-typedef struct F_Sys_mount F_Sys_mount;
-struct F_Sys_mount
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Sys_FD*	afd;
-	String*	on;
-	WORD	flags;
-	String*	spec;
-};
-void Sys_open(void*);
-typedef struct F_Sys_open F_Sys_open;
-struct F_Sys_open
-{
-	WORD	regs[NREG-1];
-	Sys_FD**	ret;
-	uchar	temps[12];
-	String*	s;
-	WORD	mode;
-};
-void Sys_pctl(void*);
-typedef struct F_Sys_pctl F_Sys_pctl;
-struct F_Sys_pctl
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	WORD	flags;
-	List*	movefd;
-};
-void Sys_pipe(void*);
-typedef struct F_Sys_pipe F_Sys_pipe;
-struct F_Sys_pipe
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Array*	fds;
-};
-void Sys_pread(void*);
-typedef struct F_Sys_pread F_Sys_pread;
-struct F_Sys_pread
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Array*	buf;
-	WORD	n;
-	uchar	_pad44[4];
-	LONG	off;
-};
-void Sys_print(void*);
-typedef struct F_Sys_print F_Sys_print;
-struct F_Sys_print
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	s;
-	WORD	vargs;
-};
-void Sys_pwrite(void*);
-typedef struct F_Sys_pwrite F_Sys_pwrite;
-struct F_Sys_pwrite
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Array*	buf;
-	WORD	n;
-	uchar	_pad44[4];
-	LONG	off;
-};
-void Sys_read(void*);
-typedef struct F_Sys_read F_Sys_read;
-struct F_Sys_read
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Array*	buf;
-	WORD	n;
-};
-void Sys_readn(void*);
-typedef struct F_Sys_readn F_Sys_readn;
-struct F_Sys_readn
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Array*	buf;
-	WORD	n;
-};
-void Sys_remove(void*);
-typedef struct F_Sys_remove F_Sys_remove;
-struct F_Sys_remove
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	s;
-};
-void Sys_seek(void*);
-typedef struct F_Sys_seek F_Sys_seek;
-struct F_Sys_seek
-{
-	WORD	regs[NREG-1];
-	LONG*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	uchar	_pad36[4];
-	LONG	off;
-	WORD	start;
-};
-void Sys_sleep(void*);
-typedef struct F_Sys_sleep F_Sys_sleep;
-struct F_Sys_sleep
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	WORD	period;
-};
-void Sys_sprint(void*);
-typedef struct F_Sys_sprint F_Sys_sprint;
-struct F_Sys_sprint
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	String*	s;
-	WORD	vargs;
-};
-void Sys_stat(void*);
-typedef struct F_Sys_stat F_Sys_stat;
-struct F_Sys_stat
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; uchar	_pad4[4]; Sys_Dir t1; }*	ret;
-	uchar	temps[12];
-	String*	s;
-};
-void Sys_stream(void*);
-typedef struct F_Sys_stream F_Sys_stream;
-struct F_Sys_stream
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	src;
-	Sys_FD*	dst;
-	WORD	bufsiz;
-};
-void Sys_tokenize(void*);
-typedef struct F_Sys_tokenize F_Sys_tokenize;
-struct F_Sys_tokenize
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; List* t1; }*	ret;
-	uchar	temps[12];
-	String*	s;
-	String*	delim;
-};
-void Sys_unmount(void*);
-typedef struct F_Sys_unmount F_Sys_unmount;
-struct F_Sys_unmount
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	s1;
-	String*	s2;
-};
-void Sys_utfbytes(void*);
-typedef struct F_Sys_utfbytes F_Sys_utfbytes;
-struct F_Sys_utfbytes
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-};
-void Sys_werrstr(void*);
-typedef struct F_Sys_werrstr F_Sys_werrstr;
-struct F_Sys_werrstr
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	s;
-};
-void Sys_write(void*);
-typedef struct F_Sys_write F_Sys_write;
-struct F_Sys_write
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Array*	buf;
-	WORD	n;
-};
-void Sys_wstat(void*);
-typedef struct F_Sys_wstat F_Sys_wstat;
-struct F_Sys_wstat
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	s;
-	uchar	_pad36[4];
-	Sys_Dir	d;
-};
-#define Sys_PATH "$Sys"
-#define Sys_Maxint 2147483647
-#define Sys_QTDIR 128
-#define Sys_QTAPPEND 64
-#define Sys_QTEXCL 32
-#define Sys_QTAUTH 8
-#define Sys_QTTMP 4
-#define Sys_QTFILE 0
-#define Sys_ATOMICIO 8192
-#define Sys_SEEKSTART 0
-#define Sys_SEEKRELA 1
-#define Sys_SEEKEND 2
-#define Sys_NAMEMAX 256
-#define Sys_ERRMAX 128
-#define Sys_WAITLEN 192
-#define Sys_OREAD 0
-#define Sys_OWRITE 1
-#define Sys_ORDWR 2
-#define Sys_OTRUNC 16
-#define Sys_ORCLOSE 64
-#define Sys_OEXCL 4096
-#define Sys_DMDIR -2147483648
-#define Sys_DMAPPEND 1073741824
-#define Sys_DMEXCL 536870912
-#define Sys_DMAUTH 134217728
-#define Sys_DMTMP 67108864
-#define Sys_MREPL 0
-#define Sys_MBEFORE 1
-#define Sys_MAFTER 2
-#define Sys_MCREATE 4
-#define Sys_MCACHE 16
-#define Sys_NEWFD 1
-#define Sys_FORKFD 2
-#define Sys_NEWNS 4
-#define Sys_FORKNS 8
-#define Sys_NEWPGRP 16
-#define Sys_NODEVS 32
-#define Sys_NEWENV 64
-#define Sys_FORKENV 128
-#define Sys_EXPWAIT 0
-#define Sys_EXPASYNC 1
-#define Sys_UTFmax 4
-#define Sys_UTFerror 65533
-#define Sys_Runemax 1114111
-#define Sys_Runemask 2097151
-void IPint_add(void*);
-typedef struct F_IPint_add F_IPint_add;
-struct F_IPint_add
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i1;
-	Keyring_IPint*	i2;
-};
-void Keyring_aescbc(void*);
-typedef struct F_Keyring_aescbc F_Keyring_aescbc;
-struct F_Keyring_aescbc
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Keyring_AESstate*	state;
-	Array*	buf;
-	WORD	n;
-	WORD	direction;
-};
-void Keyring_aessetup(void*);
-typedef struct F_Keyring_aessetup F_Keyring_aessetup;
-struct F_Keyring_aessetup
-{
-	WORD	regs[NREG-1];
-	Keyring_AESstate**	ret;
-	uchar	temps[12];
-	Array*	key;
-	Array*	ivec;
-};
-void IPint_and(void*);
-typedef struct F_IPint_and F_IPint_and;
-struct F_IPint_and
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i1;
-	Keyring_IPint*	i2;
-};
-void Keyring_auth(void*);
-typedef struct F_Keyring_auth F_Keyring_auth;
-struct F_Keyring_auth
-{
-	WORD	regs[NREG-1];
-	struct{ String* t0; Array* t1; }*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Keyring_Authinfo*	info;
-	WORD	setid;
-};
-void IPint_b64toip(void*);
-typedef struct F_IPint_b64toip F_IPint_b64toip;
-struct F_IPint_b64toip
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	String*	str;
-};
-void IPint_bebytestoip(void*);
-typedef struct F_IPint_bebytestoip F_IPint_bebytestoip;
-struct F_IPint_bebytestoip
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Array*	mag;
-};
-void IPint_bits(void*);
-typedef struct F_IPint_bits F_IPint_bits;
-struct F_IPint_bits
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i;
-};
-void Keyring_blowfishcbc(void*);
-typedef struct F_Keyring_blowfishcbc F_Keyring_blowfishcbc;
-struct F_Keyring_blowfishcbc
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Keyring_BFstate*	state;
-	Array*	buf;
-	WORD	n;
-	WORD	direction;
-};
-void Keyring_blowfishsetup(void*);
-typedef struct F_Keyring_blowfishsetup F_Keyring_blowfishsetup;
-struct F_Keyring_blowfishsetup
-{
-	WORD	regs[NREG-1];
-	Keyring_BFstate**	ret;
-	uchar	temps[12];
-	Array*	key;
-	Array*	ivec;
-};
-void IPint_bytestoip(void*);
-typedef struct F_IPint_bytestoip F_IPint_bytestoip;
-struct F_IPint_bytestoip
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Array*	buf;
-};
-void Keyring_certtoattr(void*);
-typedef struct F_Keyring_certtoattr F_Keyring_certtoattr;
-struct F_Keyring_certtoattr
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Keyring_Certificate*	c;
-};
-void Keyring_certtostr(void*);
-typedef struct F_Keyring_certtostr F_Keyring_certtostr;
-struct F_Keyring_certtostr
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Keyring_Certificate*	c;
-};
-void IPint_cmp(void*);
-typedef struct F_IPint_cmp F_IPint_cmp;
-struct F_IPint_cmp
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i1;
-	Keyring_IPint*	i2;
-};
-void IPint_copy(void*);
-typedef struct F_IPint_copy F_IPint_copy;
-struct F_IPint_copy
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i;
-};
-void DigestState_copy(void*);
-typedef struct F_DigestState_copy F_DigestState_copy;
-struct F_DigestState_copy
-{
-	WORD	regs[NREG-1];
-	Keyring_DigestState**	ret;
-	uchar	temps[12];
-	Keyring_DigestState*	d;
-};
-void RSAsk_decrypt(void*);
-typedef struct F_RSAsk_decrypt F_RSAsk_decrypt;
-struct F_RSAsk_decrypt
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_RSAsk*	k;
-	Keyring_IPint*	m;
-};
-void Keyring_descbc(void*);
-typedef struct F_Keyring_descbc F_Keyring_descbc;
-struct F_Keyring_descbc
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Keyring_DESstate*	state;
-	Array*	buf;
-	WORD	n;
-	WORD	direction;
-};
-void Keyring_desecb(void*);
-typedef struct F_Keyring_desecb F_Keyring_desecb;
-struct F_Keyring_desecb
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Keyring_DESstate*	state;
-	Array*	buf;
-	WORD	n;
-	WORD	direction;
-};
-void Keyring_dessetup(void*);
-typedef struct F_Keyring_dessetup F_Keyring_dessetup;
-struct F_Keyring_dessetup
-{
-	WORD	regs[NREG-1];
-	Keyring_DESstate**	ret;
-	uchar	temps[12];
-	Array*	key;
-	Array*	ivec;
-};
-void Keyring_dhparams(void*);
-typedef struct F_Keyring_dhparams F_Keyring_dhparams;
-struct F_Keyring_dhparams
-{
-	WORD	regs[NREG-1];
-	struct{ Keyring_IPint* t0; Keyring_IPint* t1; }*	ret;
-	uchar	temps[12];
-	WORD	nbits;
-};
-void IPint_div(void*);
-typedef struct F_IPint_div F_IPint_div;
-struct F_IPint_div
-{
-	WORD	regs[NREG-1];
-	struct{ Keyring_IPint* t0; Keyring_IPint* t1; }*	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i1;
-	Keyring_IPint*	i2;
-};
-void RSApk_encrypt(void*);
-typedef struct F_RSApk_encrypt F_RSApk_encrypt;
-struct F_RSApk_encrypt
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_RSApk*	k;
-	Keyring_IPint*	m;
-};
-void IPint_eq(void*);
-typedef struct F_IPint_eq F_IPint_eq;
-struct F_IPint_eq
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i1;
-	Keyring_IPint*	i2;
-};
-void IPint_expmod(void*);
-typedef struct F_IPint_expmod F_IPint_expmod;
-struct F_IPint_expmod
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	base;
-	Keyring_IPint*	exp;
-	Keyring_IPint*	mod;
-};
-void RSAsk_fill(void*);
-typedef struct F_RSAsk_fill F_RSAsk_fill;
-struct F_RSAsk_fill
-{
-	WORD	regs[NREG-1];
-	Keyring_RSAsk**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	n;
-	Keyring_IPint*	e;
-	Keyring_IPint*	d;
-	Keyring_IPint*	p;
-	Keyring_IPint*	q;
-};
-void RSAsk_gen(void*);
-typedef struct F_RSAsk_gen F_RSAsk_gen;
-struct F_RSAsk_gen
-{
-	WORD	regs[NREG-1];
-	Keyring_RSAsk**	ret;
-	uchar	temps[12];
-	WORD	nlen;
-	WORD	elen;
-	WORD	nrep;
-};
-void DSAsk_gen(void*);
-typedef struct F_DSAsk_gen F_DSAsk_gen;
-struct F_DSAsk_gen
-{
-	WORD	regs[NREG-1];
-	Keyring_DSAsk**	ret;
-	uchar	temps[12];
-	Keyring_DSApk*	oldpk;
-};
-void EGsk_gen(void*);
-typedef struct F_EGsk_gen F_EGsk_gen;
-struct F_EGsk_gen
-{
-	WORD	regs[NREG-1];
-	Keyring_EGsk**	ret;
-	uchar	temps[12];
-	WORD	nlen;
-	WORD	nrep;
-};
-void Keyring_genSK(void*);
-typedef struct F_Keyring_genSK F_Keyring_genSK;
-struct F_Keyring_genSK
-{
-	WORD	regs[NREG-1];
-	Keyring_SK**	ret;
-	uchar	temps[12];
-	String*	algname;
-	String*	owner;
-	WORD	length;
-};
-void Keyring_genSKfromPK(void*);
-typedef struct F_Keyring_genSKfromPK F_Keyring_genSKfromPK;
-struct F_Keyring_genSKfromPK
-{
-	WORD	regs[NREG-1];
-	Keyring_SK**	ret;
-	uchar	temps[12];
-	Keyring_PK*	pk;
-	String*	owner;
-};
-void Keyring_getbytearray(void*);
-typedef struct F_Keyring_getbytearray F_Keyring_getbytearray;
-struct F_Keyring_getbytearray
-{
-	WORD	regs[NREG-1];
-	struct{ Array* t0; String* t1; }*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-};
-void Keyring_getmsg(void*);
-typedef struct F_Keyring_getmsg F_Keyring_getmsg;
-struct F_Keyring_getmsg
-{
-	WORD	regs[NREG-1];
-	Array**	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-};
-void Keyring_getstring(void*);
-typedef struct F_Keyring_getstring F_Keyring_getstring;
-struct F_Keyring_getstring
-{
-	WORD	regs[NREG-1];
-	struct{ String* t0; String* t1; }*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-};
-void Keyring_hmac_md5(void*);
-typedef struct F_Keyring_hmac_md5 F_Keyring_hmac_md5;
-struct F_Keyring_hmac_md5
-{
-	WORD	regs[NREG-1];
-	Keyring_DigestState**	ret;
-	uchar	temps[12];
-	Array*	data;
-	WORD	n;
-	Array*	key;
-	Array*	digest;
-	Keyring_DigestState*	state;
-};
-void Keyring_hmac_sha1(void*);
-typedef struct F_Keyring_hmac_sha1 F_Keyring_hmac_sha1;
-struct F_Keyring_hmac_sha1
-{
-	WORD	regs[NREG-1];
-	Keyring_DigestState**	ret;
-	uchar	temps[12];
-	Array*	data;
-	WORD	n;
-	Array*	key;
-	Array*	digest;
-	Keyring_DigestState*	state;
-};
-void Keyring_ideacbc(void*);
-typedef struct F_Keyring_ideacbc F_Keyring_ideacbc;
-struct F_Keyring_ideacbc
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Keyring_IDEAstate*	state;
-	Array*	buf;
-	WORD	n;
-	WORD	direction;
-};
-void Keyring_ideaecb(void*);
-typedef struct F_Keyring_ideaecb F_Keyring_ideaecb;
-struct F_Keyring_ideaecb
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Keyring_IDEAstate*	state;
-	Array*	buf;
-	WORD	n;
-	WORD	direction;
-};
-void Keyring_ideasetup(void*);
-typedef struct F_Keyring_ideasetup F_Keyring_ideasetup;
-struct F_Keyring_ideasetup
-{
-	WORD	regs[NREG-1];
-	Keyring_IDEAstate**	ret;
-	uchar	temps[12];
-	Array*	key;
-	Array*	ivec;
-};
-void IPint_inttoip(void*);
-typedef struct F_IPint_inttoip F_IPint_inttoip;
-struct F_IPint_inttoip
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	WORD	i;
-};
-void IPint_invert(void*);
-typedef struct F_IPint_invert F_IPint_invert;
-struct F_IPint_invert
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	base;
-	Keyring_IPint*	mod;
-};
-void IPint_iptob64(void*);
-typedef struct F_IPint_iptob64 F_IPint_iptob64;
-struct F_IPint_iptob64
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i;
-};
-void IPint_iptob64z(void*);
-typedef struct F_IPint_iptob64z F_IPint_iptob64z;
-struct F_IPint_iptob64z
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i;
-};
-void IPint_iptobebytes(void*);
-typedef struct F_IPint_iptobebytes F_IPint_iptobebytes;
-struct F_IPint_iptobebytes
-{
-	WORD	regs[NREG-1];
-	Array**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i;
-};
-void IPint_iptobytes(void*);
-typedef struct F_IPint_iptobytes F_IPint_iptobytes;
-struct F_IPint_iptobytes
-{
-	WORD	regs[NREG-1];
-	Array**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i;
-};
-void IPint_iptoint(void*);
-typedef struct F_IPint_iptoint F_IPint_iptoint;
-struct F_IPint_iptoint
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i;
-};
-void IPint_iptostr(void*);
-typedef struct F_IPint_iptostr F_IPint_iptostr;
-struct F_IPint_iptostr
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i;
-	WORD	base;
-};
-void Keyring_md4(void*);
-typedef struct F_Keyring_md4 F_Keyring_md4;
-struct F_Keyring_md4
-{
-	WORD	regs[NREG-1];
-	Keyring_DigestState**	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-	Array*	digest;
-	Keyring_DigestState*	state;
-};
-void Keyring_md5(void*);
-typedef struct F_Keyring_md5 F_Keyring_md5;
-struct F_Keyring_md5
-{
-	WORD	regs[NREG-1];
-	Keyring_DigestState**	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-	Array*	digest;
-	Keyring_DigestState*	state;
-};
-void IPint_mod(void*);
-typedef struct F_IPint_mod F_IPint_mod;
-struct F_IPint_mod
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i1;
-	Keyring_IPint*	i2;
-};
-void IPint_mul(void*);
-typedef struct F_IPint_mul F_IPint_mul;
-struct F_IPint_mul
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i1;
-	Keyring_IPint*	i2;
-};
-void IPint_neg(void*);
-typedef struct F_IPint_neg F_IPint_neg;
-struct F_IPint_neg
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i;
-};
-void IPint_not(void*);
-typedef struct F_IPint_not F_IPint_not;
-struct F_IPint_not
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i1;
-};
-void IPint_ori(void*);
-typedef struct F_IPint_ori F_IPint_ori;
-struct F_IPint_ori
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i1;
-	Keyring_IPint*	i2;
-};
-void Keyring_pktoattr(void*);
-typedef struct F_Keyring_pktoattr F_Keyring_pktoattr;
-struct F_Keyring_pktoattr
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Keyring_PK*	pk;
-};
-void Keyring_pktostr(void*);
-typedef struct F_Keyring_pktostr F_Keyring_pktostr;
-struct F_Keyring_pktostr
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Keyring_PK*	pk;
-};
-void Keyring_putbytearray(void*);
-typedef struct F_Keyring_putbytearray F_Keyring_putbytearray;
-struct F_Keyring_putbytearray
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Array*	a;
-	WORD	n;
-};
-void Keyring_puterror(void*);
-typedef struct F_Keyring_puterror F_Keyring_puterror;
-struct F_Keyring_puterror
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	String*	s;
-};
-void Keyring_putstring(void*);
-typedef struct F_Keyring_putstring F_Keyring_putstring;
-struct F_Keyring_putstring
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	String*	s;
-};
-void IPint_random(void*);
-typedef struct F_IPint_random F_IPint_random;
-struct F_IPint_random
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	WORD	minbits;
-	WORD	maxbits;
-};
-void Keyring_rc4(void*);
-typedef struct F_Keyring_rc4 F_Keyring_rc4;
-struct F_Keyring_rc4
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Keyring_RC4state*	state;
-	Array*	buf;
-	WORD	n;
-};
-void Keyring_rc4back(void*);
-typedef struct F_Keyring_rc4back F_Keyring_rc4back;
-struct F_Keyring_rc4back
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Keyring_RC4state*	state;
-	WORD	n;
-};
-void Keyring_rc4setup(void*);
-typedef struct F_Keyring_rc4setup F_Keyring_rc4setup;
-struct F_Keyring_rc4setup
-{
-	WORD	regs[NREG-1];
-	Keyring_RC4state**	ret;
-	uchar	temps[12];
-	Array*	seed;
-};
-void Keyring_rc4skip(void*);
-typedef struct F_Keyring_rc4skip F_Keyring_rc4skip;
-struct F_Keyring_rc4skip
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Keyring_RC4state*	state;
-	WORD	n;
-};
-void Keyring_readauthinfo(void*);
-typedef struct F_Keyring_readauthinfo F_Keyring_readauthinfo;
-struct F_Keyring_readauthinfo
-{
-	WORD	regs[NREG-1];
-	Keyring_Authinfo**	ret;
-	uchar	temps[12];
-	String*	filename;
-};
-void Keyring_senderrmsg(void*);
-typedef struct F_Keyring_senderrmsg F_Keyring_senderrmsg;
-struct F_Keyring_senderrmsg
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	String*	s;
-};
-void Keyring_sendmsg(void*);
-typedef struct F_Keyring_sendmsg F_Keyring_sendmsg;
-struct F_Keyring_sendmsg
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Array*	buf;
-	WORD	n;
-};
-void Keyring_sha1(void*);
-typedef struct F_Keyring_sha1 F_Keyring_sha1;
-struct F_Keyring_sha1
-{
-	WORD	regs[NREG-1];
-	Keyring_DigestState**	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-	Array*	digest;
-	Keyring_DigestState*	state;
-};
-void Keyring_sha224(void*);
-typedef struct F_Keyring_sha224 F_Keyring_sha224;
-struct F_Keyring_sha224
-{
-	WORD	regs[NREG-1];
-	Keyring_DigestState**	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-	Array*	digest;
-	Keyring_DigestState*	state;
-};
-void Keyring_sha256(void*);
-typedef struct F_Keyring_sha256 F_Keyring_sha256;
-struct F_Keyring_sha256
-{
-	WORD	regs[NREG-1];
-	Keyring_DigestState**	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-	Array*	digest;
-	Keyring_DigestState*	state;
-};
-void Keyring_sha384(void*);
-typedef struct F_Keyring_sha384 F_Keyring_sha384;
-struct F_Keyring_sha384
-{
-	WORD	regs[NREG-1];
-	Keyring_DigestState**	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-	Array*	digest;
-	Keyring_DigestState*	state;
-};
-void Keyring_sha512(void*);
-typedef struct F_Keyring_sha512 F_Keyring_sha512;
-struct F_Keyring_sha512
-{
-	WORD	regs[NREG-1];
-	Keyring_DigestState**	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-	Array*	digest;
-	Keyring_DigestState*	state;
-};
-void IPint_shl(void*);
-typedef struct F_IPint_shl F_IPint_shl;
-struct F_IPint_shl
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i;
-	WORD	n;
-};
-void IPint_shr(void*);
-typedef struct F_IPint_shr F_IPint_shr;
-struct F_IPint_shr
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i;
-	WORD	n;
-};
-void Keyring_sign(void*);
-typedef struct F_Keyring_sign F_Keyring_sign;
-struct F_Keyring_sign
-{
-	WORD	regs[NREG-1];
-	Keyring_Certificate**	ret;
-	uchar	temps[12];
-	Keyring_SK*	sk;
-	WORD	exp;
-	Keyring_DigestState*	state;
-	String*	ha;
-};
-void RSAsk_sign(void*);
-typedef struct F_RSAsk_sign F_RSAsk_sign;
-struct F_RSAsk_sign
-{
-	WORD	regs[NREG-1];
-	Keyring_RSAsig**	ret;
-	uchar	temps[12];
-	Keyring_RSAsk*	k;
-	Keyring_IPint*	m;
-};
-void DSAsk_sign(void*);
-typedef struct F_DSAsk_sign F_DSAsk_sign;
-struct F_DSAsk_sign
-{
-	WORD	regs[NREG-1];
-	Keyring_DSAsig**	ret;
-	uchar	temps[12];
-	Keyring_DSAsk*	k;
-	Keyring_IPint*	m;
-};
-void EGsk_sign(void*);
-typedef struct F_EGsk_sign F_EGsk_sign;
-struct F_EGsk_sign
-{
-	WORD	regs[NREG-1];
-	Keyring_EGsig**	ret;
-	uchar	temps[12];
-	Keyring_EGsk*	k;
-	Keyring_IPint*	m;
-};
-void Keyring_signm(void*);
-typedef struct F_Keyring_signm F_Keyring_signm;
-struct F_Keyring_signm
-{
-	WORD	regs[NREG-1];
-	Keyring_Certificate**	ret;
-	uchar	temps[12];
-	Keyring_SK*	sk;
-	Keyring_IPint*	m;
-	String*	ha;
-};
-void Keyring_sktoattr(void*);
-typedef struct F_Keyring_sktoattr F_Keyring_sktoattr;
-struct F_Keyring_sktoattr
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Keyring_SK*	sk;
-};
-void Keyring_sktopk(void*);
-typedef struct F_Keyring_sktopk F_Keyring_sktopk;
-struct F_Keyring_sktopk
-{
-	WORD	regs[NREG-1];
-	Keyring_PK**	ret;
-	uchar	temps[12];
-	Keyring_SK*	sk;
-};
-void Keyring_sktostr(void*);
-typedef struct F_Keyring_sktostr F_Keyring_sktostr;
-struct F_Keyring_sktostr
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Keyring_SK*	sk;
-};
-void Keyring_strtocert(void*);
-typedef struct F_Keyring_strtocert F_Keyring_strtocert;
-struct F_Keyring_strtocert
-{
-	WORD	regs[NREG-1];
-	Keyring_Certificate**	ret;
-	uchar	temps[12];
-	String*	s;
-};
-void IPint_strtoip(void*);
-typedef struct F_IPint_strtoip F_IPint_strtoip;
-struct F_IPint_strtoip
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	String*	str;
-	WORD	base;
-};
-void Keyring_strtopk(void*);
-typedef struct F_Keyring_strtopk F_Keyring_strtopk;
-struct F_Keyring_strtopk
-{
-	WORD	regs[NREG-1];
-	Keyring_PK**	ret;
-	uchar	temps[12];
-	String*	s;
-};
-void Keyring_strtosk(void*);
-typedef struct F_Keyring_strtosk F_Keyring_strtosk;
-struct F_Keyring_strtosk
-{
-	WORD	regs[NREG-1];
-	Keyring_SK**	ret;
-	uchar	temps[12];
-	String*	s;
-};
-void IPint_sub(void*);
-typedef struct F_IPint_sub F_IPint_sub;
-struct F_IPint_sub
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i1;
-	Keyring_IPint*	i2;
-};
-void Keyring_verify(void*);
-typedef struct F_Keyring_verify F_Keyring_verify;
-struct F_Keyring_verify
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Keyring_PK*	pk;
-	Keyring_Certificate*	cert;
-	Keyring_DigestState*	state;
-};
-void RSApk_verify(void*);
-typedef struct F_RSApk_verify F_RSApk_verify;
-struct F_RSApk_verify
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Keyring_RSApk*	k;
-	Keyring_RSAsig*	sig;
-	Keyring_IPint*	m;
-};
-void DSApk_verify(void*);
-typedef struct F_DSApk_verify F_DSApk_verify;
-struct F_DSApk_verify
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Keyring_DSApk*	k;
-	Keyring_DSAsig*	sig;
-	Keyring_IPint*	m;
-};
-void EGpk_verify(void*);
-typedef struct F_EGpk_verify F_EGpk_verify;
-struct F_EGpk_verify
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Keyring_EGpk*	k;
-	Keyring_EGsig*	sig;
-	Keyring_IPint*	m;
-};
-void Keyring_verifym(void*);
-typedef struct F_Keyring_verifym F_Keyring_verifym;
-struct F_Keyring_verifym
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Keyring_PK*	pk;
-	Keyring_Certificate*	cert;
-	Keyring_IPint*	m;
-};
-void Keyring_writeauthinfo(void*);
-typedef struct F_Keyring_writeauthinfo F_Keyring_writeauthinfo;
-struct F_Keyring_writeauthinfo
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	filename;
-	Keyring_Authinfo*	info;
-};
-void IPint_xor(void*);
-typedef struct F_IPint_xor F_IPint_xor;
-struct F_IPint_xor
-{
-	WORD	regs[NREG-1];
-	Keyring_IPint**	ret;
-	uchar	temps[12];
-	Keyring_IPint*	i1;
-	Keyring_IPint*	i2;
-};
-#define Keyring_PATH "$Keyring"
-#define Keyring_SHA1dlen 20
-#define Keyring_SHA224dlen 28
-#define Keyring_SHA256dlen 32
-#define Keyring_SHA384dlen 48
-#define Keyring_SHA512dlen 64
-#define Keyring_MD5dlen 16
-#define Keyring_MD4dlen 16
-#define Keyring_Encrypt 0
-#define Keyring_Decrypt 1
-#define Keyring_AESbsize 16
-#define Keyring_DESbsize 8
-#define Keyring_IDEAbsize 8
-#define Keyring_BFbsize 8
--- a/libinterp/loadermod.h
+++ /dev/null
@@ -1,13 +1,0 @@
-typedef struct{char *name; long sig; void (*fn)(void*); int size; int np; uchar map[16];} Runtab;
-Runtab Loadermodtab[]={
-	"compile",0x9af56bb1,Loader_compile,40,2,{0x0,0x80,},
-	"dnew",0x62a7cf80,Loader_dnew,40,2,{0x0,0x40,},
-	"ext",0xcd936c80,Loader_ext,48,2,{0x0,0x80,},
-	"ifetch",0xfb64be19,Loader_ifetch,40,2,{0x0,0x80,},
-	"link",0xe2473595,Loader_link,40,2,{0x0,0x80,},
-	"newmod",0x6de26f71,Loader_newmod,56,2,{0x0,0x98,},
-	"tdesc",0xb933ef75,Loader_tdesc,40,2,{0x0,0x80,},
-	"tnew",0xc1d58785,Loader_tnew,48,2,{0x0,0xa0,},
-	0
-};
-#define Loadermodlen	8
--- a/libinterp/mathmod.h
+++ /dev/null
@@ -1,73 +1,0 @@
-typedef struct{char *name; long sig; void (*fn)(void*); int size; int np; uchar map[16];} Runtab;
-Runtab Mathmodtab[]={
-	"FPcontrol",0x6584767b,Math_FPcontrol,40,0,{0},
-	"FPstatus",0x6584767b,Math_FPstatus,40,0,{0},
-	"acos",0xa1d1fe48,Math_acos,40,0,{0},
-	"acosh",0xa1d1fe48,Math_acosh,40,0,{0},
-	"asin",0xa1d1fe48,Math_asin,40,0,{0},
-	"asinh",0xa1d1fe48,Math_asinh,40,0,{0},
-	"atan",0xa1d1fe48,Math_atan,40,0,{0},
-	"atan2",0xf293f6cf,Math_atan2,48,0,{0},
-	"atanh",0xa1d1fe48,Math_atanh,40,0,{0},
-	"bits32real",0x40a58596,Math_bits32real,40,0,{0},
-	"bits64real",0x5463c72c,Math_bits64real,40,0,{0},
-	"cbrt",0xa1d1fe48,Math_cbrt,40,0,{0},
-	"ceil",0xa1d1fe48,Math_ceil,40,0,{0},
-	"copysign",0xf293f6cf,Math_copysign,48,0,{0},
-	"cos",0xa1d1fe48,Math_cos,40,0,{0},
-	"cosh",0xa1d1fe48,Math_cosh,40,0,{0},
-	"dot",0xfeca4db6,Math_dot,40,2,{0x0,0xc0,},
-	"erf",0xa1d1fe48,Math_erf,40,0,{0},
-	"erfc",0xa1d1fe48,Math_erfc,40,0,{0},
-	"exp",0xa1d1fe48,Math_exp,40,0,{0},
-	"expm1",0xa1d1fe48,Math_expm1,40,0,{0},
-	"export_int",0x3f1d94ee,Math_export_int,40,2,{0x0,0xc0,},
-	"export_real",0xd1fb0c8c,Math_export_real,40,2,{0x0,0xc0,},
-	"export_real32",0xd1fb0c8c,Math_export_real32,40,2,{0x0,0xc0,},
-	"fabs",0xa1d1fe48,Math_fabs,40,0,{0},
-	"fdim",0xf293f6cf,Math_fdim,48,0,{0},
-	"finite",0x7b2e5f52,Math_finite,40,0,{0},
-	"floor",0xa1d1fe48,Math_floor,40,0,{0},
-	"fmax",0xf293f6cf,Math_fmax,48,0,{0},
-	"fmin",0xf293f6cf,Math_fmin,48,0,{0},
-	"fmod",0xf293f6cf,Math_fmod,48,0,{0},
-	"gemm",0x53b8cd34,Math_gemm,96,3,{0x0,0x0,0xa2,},
-	"getFPcontrol",0x616977e8,Math_getFPcontrol,32,0,{0},
-	"getFPstatus",0x616977e8,Math_getFPstatus,32,0,{0},
-	"hypot",0xf293f6cf,Math_hypot,48,0,{0},
-	"iamax",0xa5fc2e4d,Math_iamax,40,2,{0x0,0x80,},
-	"ilogb",0x7b2e5f52,Math_ilogb,40,0,{0},
-	"import_int",0x3f1d94ee,Math_import_int,40,2,{0x0,0xc0,},
-	"import_real",0xd1fb0c8c,Math_import_real,40,2,{0x0,0xc0,},
-	"import_real32",0xd1fb0c8c,Math_import_real32,40,2,{0x0,0xc0,},
-	"isnan",0x7b2e5f52,Math_isnan,40,0,{0},
-	"j0",0xa1d1fe48,Math_j0,40,0,{0},
-	"j1",0xa1d1fe48,Math_j1,40,0,{0},
-	"jn",0xb61ffc5b,Math_jn,48,0,{0},
-	"lgamma",0x6e97c646,Math_lgamma,40,0,{0},
-	"log",0xa1d1fe48,Math_log,40,0,{0},
-	"log10",0xa1d1fe48,Math_log10,40,0,{0},
-	"log1p",0xa1d1fe48,Math_log1p,40,0,{0},
-	"modf",0x6e97c646,Math_modf,40,0,{0},
-	"nextafter",0xf293f6cf,Math_nextafter,48,0,{0},
-	"norm1",0x1629207e,Math_norm1,40,2,{0x0,0x80,},
-	"norm2",0x1629207e,Math_norm2,40,2,{0x0,0x80,},
-	"pow",0xf293f6cf,Math_pow,48,0,{0},
-	"pow10",0x40a58596,Math_pow10,40,0,{0},
-	"realbits32",0x7b2e5f52,Math_realbits32,40,0,{0},
-	"realbits64",0x9589d476,Math_realbits64,40,0,{0},
-	"remainder",0xf293f6cf,Math_remainder,48,0,{0},
-	"rint",0xa1d1fe48,Math_rint,40,0,{0},
-	"scalbn",0x64fa84ba,Math_scalbn,48,0,{0},
-	"sin",0xa1d1fe48,Math_sin,40,0,{0},
-	"sinh",0xa1d1fe48,Math_sinh,40,0,{0},
-	"sort",0xfc7c7b8,Math_sort,40,2,{0x0,0xc0,},
-	"sqrt",0xa1d1fe48,Math_sqrt,40,0,{0},
-	"tan",0xa1d1fe48,Math_tan,40,0,{0},
-	"tanh",0xa1d1fe48,Math_tanh,40,0,{0},
-	"y0",0xa1d1fe48,Math_y0,40,0,{0},
-	"y1",0xa1d1fe48,Math_y1,40,0,{0},
-	"yn",0xb61ffc5b,Math_yn,48,0,{0},
-	0
-};
-#define Mathmodlen	68
--- a/libinterp/runt.h
+++ /dev/null
@@ -1,4002 +1,0 @@
-typedef struct Sys_Qid Sys_Qid;
-typedef struct Sys_Dir Sys_Dir;
-typedef struct Sys_FD Sys_FD;
-typedef struct Sys_Connection Sys_Connection;
-typedef struct Sys_FileIO Sys_FileIO;
-typedef struct Draw_Chans Draw_Chans;
-typedef struct Draw_Point Draw_Point;
-typedef struct Draw_Rect Draw_Rect;
-typedef struct Draw_Image Draw_Image;
-typedef struct Draw_Display Draw_Display;
-typedef struct Draw_Font Draw_Font;
-typedef struct Draw_Screen Draw_Screen;
-typedef struct Draw_Pointer Draw_Pointer;
-typedef struct Draw_Context Draw_Context;
-typedef struct Draw_Wmcontext Draw_Wmcontext;
-typedef struct Prefab_Style Prefab_Style;
-typedef struct Prefab_Environ Prefab_Environ;
-typedef struct Prefab_Layout Prefab_Layout;
-typedef struct Prefab_Element Prefab_Element;
-typedef struct Prefab_Compound Prefab_Compound;
-typedef struct Tk_Toplevel Tk_Toplevel;
-typedef struct IPints_IPint IPints_IPint;
-typedef struct Crypt_DigestState Crypt_DigestState;
-typedef struct Crypt_AESstate Crypt_AESstate;
-typedef struct Crypt_DESstate Crypt_DESstate;
-typedef struct Crypt_IDEAstate Crypt_IDEAstate;
-typedef struct Crypt_RC4state Crypt_RC4state;
-typedef struct Crypt_BFstate Crypt_BFstate;
-typedef struct Crypt_PK Crypt_PK;
-typedef struct Crypt_SK Crypt_SK;
-typedef struct Crypt_PKsig Crypt_PKsig;
-typedef struct Loader_Inst Loader_Inst;
-typedef struct Loader_Typedesc Loader_Typedesc;
-typedef struct Loader_Link Loader_Link;
-typedef struct Loader_Niladt Loader_Niladt;
-typedef struct Freetype_Matrix Freetype_Matrix;
-typedef struct Freetype_Vector Freetype_Vector;
-typedef struct Freetype_Face Freetype_Face;
-typedef struct Freetype_Glyph Freetype_Glyph;
-struct Sys_Qid
-{
-	LONG	path;
-	WORD	vers;
-	WORD	qtype;
-};
-#define Sys_Qid_size 16
-#define Sys_Qid_map {0}
-struct Sys_Dir
-{
-	String*	name;
-	String*	uid;
-	String*	gid;
-	String*	muid;
-	Sys_Qid	qid;
-	WORD	mode;
-	WORD	atime;
-	WORD	mtime;
-	uchar	_pad44[4];
-	LONG	length;
-	WORD	dtype;
-	WORD	dev;
-};
-#define Sys_Dir_size 64
-#define Sys_Dir_map {0xf0,}
-struct Sys_FD
-{
-	WORD	fd;
-};
-#define Sys_FD_size 4
-#define Sys_FD_map {0}
-struct Sys_Connection
-{
-	Sys_FD*	dfd;
-	Sys_FD*	cfd;
-	String*	dir;
-};
-#define Sys_Connection_size 12
-#define Sys_Connection_map {0xe0,}
-typedef struct{ Array* t0; String* t1; } Sys_Rread;
-#define Sys_Rread_size 8
-#define Sys_Rread_map {0xc0,}
-typedef struct{ WORD t0; String* t1; } Sys_Rwrite;
-#define Sys_Rwrite_size 8
-#define Sys_Rwrite_map {0x40,}
-struct Sys_FileIO
-{
-	Channel*	read;
-	Channel*	write;
-};
-typedef struct{ WORD t0; WORD t1; WORD t2; Channel* t3; } Sys_FileIO_read;
-#define Sys_FileIO_read_size 16
-#define Sys_FileIO_read_map {0x10,}
-typedef struct{ WORD t0; Array* t1; WORD t2; Channel* t3; } Sys_FileIO_write;
-#define Sys_FileIO_write_size 16
-#define Sys_FileIO_write_map {0x50,}
-#define Sys_FileIO_size 8
-#define Sys_FileIO_map {0xc0,}
-struct Draw_Chans
-{
-	WORD	desc;
-};
-#define Draw_Chans_size 4
-#define Draw_Chans_map {0}
-struct Draw_Point
-{
-	WORD	x;
-	WORD	y;
-};
-#define Draw_Point_size 8
-#define Draw_Point_map {0}
-struct Draw_Rect
-{
-	Draw_Point	min;
-	Draw_Point	max;
-};
-#define Draw_Rect_size 16
-#define Draw_Rect_map {0}
-struct Draw_Image
-{
-	Draw_Rect	r;
-	Draw_Rect	clipr;
-	WORD	depth;
-	Draw_Chans	chans;
-	WORD	repl;
-	Draw_Display*	display;
-	Draw_Screen*	screen;
-	String*	iname;
-};
-#define Draw_Image_size 56
-#define Draw_Image_map {0x0,0x1c,}
-struct Draw_Display
-{
-	Draw_Image*	image;
-	Draw_Image*	white;
-	Draw_Image*	black;
-	Draw_Image*	opaque;
-	Draw_Image*	transparent;
-};
-#define Draw_Display_size 20
-#define Draw_Display_map {0xf8,}
-struct Draw_Font
-{
-	String*	name;
-	WORD	height;
-	WORD	ascent;
-	Draw_Display*	display;
-};
-#define Draw_Font_size 16
-#define Draw_Font_map {0x90,}
-struct Draw_Screen
-{
-	WORD	id;
-	Draw_Image*	image;
-	Draw_Image*	fill;
-	Draw_Display*	display;
-};
-#define Draw_Screen_size 16
-#define Draw_Screen_map {0x70,}
-struct Draw_Pointer
-{
-	WORD	buttons;
-	Draw_Point	xy;
-	WORD	msec;
-};
-#define Draw_Pointer_size 16
-#define Draw_Pointer_map {0}
-struct Draw_Context
-{
-	Draw_Display*	display;
-	Draw_Screen*	screen;
-	Channel*	wm;
-};
-typedef struct{ String* t0; Channel* t1; } Draw_Context_wm;
-#define Draw_Context_wm_size 8
-#define Draw_Context_wm_map {0xc0,}
-#define Draw_Context_size 12
-#define Draw_Context_map {0xe0,}
-struct Draw_Wmcontext
-{
-	Channel*	kbd;
-	Channel*	ptr;
-	Channel*	ctl;
-	Channel*	wctl;
-	Channel*	images;
-	Sys_FD*	connfd;
-	Draw_Context*	ctxt;
-};
-typedef WORD Draw_Wmcontext_kbd;
-#define Draw_Wmcontext_kbd_size 4
-#define Draw_Wmcontext_kbd_map {0}
-typedef Draw_Pointer* Draw_Wmcontext_ptr;
-#define Draw_Wmcontext_ptr_size 4
-#define Draw_Wmcontext_ptr_map {0x80,}
-typedef String* Draw_Wmcontext_ctl;
-#define Draw_Wmcontext_ctl_size 4
-#define Draw_Wmcontext_ctl_map {0x80,}
-typedef String* Draw_Wmcontext_wctl;
-#define Draw_Wmcontext_wctl_size 4
-#define Draw_Wmcontext_wctl_map {0x80,}
-typedef Draw_Image* Draw_Wmcontext_images;
-#define Draw_Wmcontext_images_size 4
-#define Draw_Wmcontext_images_map {0x80,}
-#define Draw_Wmcontext_size 28
-#define Draw_Wmcontext_map {0xfe,}
-struct Prefab_Style
-{
-	Draw_Font*	titlefont;
-	Draw_Font*	textfont;
-	Draw_Image*	elemcolor;
-	Draw_Image*	edgecolor;
-	Draw_Image*	titlecolor;
-	Draw_Image*	textcolor;
-	Draw_Image*	highlightcolor;
-};
-#define Prefab_Style_size 28
-#define Prefab_Style_map {0xfe,}
-struct Prefab_Environ
-{
-	Draw_Screen*	screen;
-	Prefab_Style*	style;
-};
-#define Prefab_Environ_size 8
-#define Prefab_Environ_map {0xc0,}
-struct Prefab_Layout
-{
-	Draw_Font*	font;
-	Draw_Image*	color;
-	String*	text;
-	Draw_Image*	icon;
-	Draw_Image*	mask;
-	String*	tag;
-};
-#define Prefab_Layout_size 24
-#define Prefab_Layout_map {0xfc,}
-struct Prefab_Element
-{
-	WORD	kind;
-	Draw_Rect	r;
-	Prefab_Environ*	environ;
-	String*	tag;
-	List*	kids;
-	String*	str;
-	Draw_Image*	mask;
-	Draw_Image*	image;
-	Draw_Font*	font;
-};
-#define Prefab_Element_size 48
-#define Prefab_Element_map {0x7,0xf0,}
-struct Prefab_Compound
-{
-	Draw_Image*	image;
-	Prefab_Environ*	environ;
-	Draw_Rect	r;
-	Prefab_Element*	title;
-	Prefab_Element*	contents;
-};
-#define Prefab_Compound_size 32
-#define Prefab_Compound_map {0xc3,}
-struct Tk_Toplevel
-{
-	Draw_Display*	display;
-	Channel*	wreq;
-	Draw_Image*	image;
-	Draw_Wmcontext*	ctxt;
-	Draw_Rect	screenr;
-};
-typedef String* Tk_Toplevel_wreq;
-#define Tk_Toplevel_wreq_size 4
-#define Tk_Toplevel_wreq_map {0x80,}
-#define Tk_Toplevel_size 32
-#define Tk_Toplevel_map {0xf0,}
-struct IPints_IPint
-{
-	WORD	x;
-};
-#define IPints_IPint_size 4
-#define IPints_IPint_map {0}
-struct Crypt_DigestState
-{
-	WORD	x;
-};
-#define Crypt_DigestState_size 4
-#define Crypt_DigestState_map {0}
-struct Crypt_AESstate
-{
-	WORD	x;
-};
-#define Crypt_AESstate_size 4
-#define Crypt_AESstate_map {0}
-struct Crypt_DESstate
-{
-	WORD	x;
-};
-#define Crypt_DESstate_size 4
-#define Crypt_DESstate_map {0}
-struct Crypt_IDEAstate
-{
-	WORD	x;
-};
-#define Crypt_IDEAstate_size 4
-#define Crypt_IDEAstate_map {0}
-struct Crypt_RC4state
-{
-	WORD	x;
-};
-#define Crypt_RC4state_size 4
-#define Crypt_RC4state_map {0}
-struct Crypt_BFstate
-{
-	WORD	x;
-};
-#define Crypt_BFstate_size 4
-#define Crypt_BFstate_map {0}
-#define Crypt_PK_RSA 0
-#define Crypt_PK_Elgamal 1
-#define Crypt_PK_DSA 2
-struct Crypt_PK
-{
-	int	pick;
-	union{
-		struct{
-			IPints_IPint*	n;
-			IPints_IPint*	ek;
-		} RSA;
-		struct{
-			IPints_IPint*	p;
-			IPints_IPint*	alpha;
-			IPints_IPint*	key;
-		} Elgamal;
-		struct{
-			IPints_IPint*	p;
-			IPints_IPint*	q;
-			IPints_IPint*	alpha;
-			IPints_IPint*	key;
-		} DSA;
-	} u;
-};
-#define Crypt_PK_RSA_size 12
-#define Crypt_PK_RSA_map {0x60,}
-#define Crypt_PK_Elgamal_size 16
-#define Crypt_PK_Elgamal_map {0x70,}
-#define Crypt_PK_DSA_size 20
-#define Crypt_PK_DSA_map {0x78,}
-#define Crypt_SK_RSA 0
-#define Crypt_SK_Elgamal 1
-#define Crypt_SK_DSA 2
-struct Crypt_SK
-{
-	int	pick;
-	union{
-		struct{
-			Crypt_PK*	pk;
-			IPints_IPint*	dk;
-			IPints_IPint*	p;
-			IPints_IPint*	q;
-			IPints_IPint*	kp;
-			IPints_IPint*	kq;
-			IPints_IPint*	c2;
-		} RSA;
-		struct{
-			Crypt_PK*	pk;
-			IPints_IPint*	secret;
-		} Elgamal;
-		struct{
-			Crypt_PK*	pk;
-			IPints_IPint*	secret;
-		} DSA;
-	} u;
-};
-#define Crypt_SK_RSA_size 32
-#define Crypt_SK_RSA_map {0x7f,}
-#define Crypt_SK_Elgamal_size 12
-#define Crypt_SK_Elgamal_map {0x60,}
-#define Crypt_SK_DSA_size 12
-#define Crypt_SK_DSA_map {0x60,}
-#define Crypt_PKsig_RSA 0
-#define Crypt_PKsig_Elgamal 1
-#define Crypt_PKsig_DSA 2
-struct Crypt_PKsig
-{
-	int	pick;
-	union{
-		struct{
-			IPints_IPint*	n;
-		} RSA;
-		struct{
-			IPints_IPint*	r;
-			IPints_IPint*	s;
-		} Elgamal;
-		struct{
-			IPints_IPint*	r;
-			IPints_IPint*	s;
-		} DSA;
-	} u;
-};
-#define Crypt_PKsig_RSA_size 8
-#define Crypt_PKsig_RSA_map {0x40,}
-#define Crypt_PKsig_Elgamal_size 12
-#define Crypt_PKsig_Elgamal_map {0x60,}
-#define Crypt_PKsig_DSA_size 12
-#define Crypt_PKsig_DSA_map {0x60,}
-struct Loader_Inst
-{
-	BYTE	op;
-	BYTE	addr;
-	uchar	_pad2[2];
-	WORD	src;
-	WORD	mid;
-	WORD	dst;
-};
-#define Loader_Inst_size 16
-#define Loader_Inst_map {0}
-struct Loader_Typedesc
-{
-	WORD	size;
-	Array*	map;
-};
-#define Loader_Typedesc_size 8
-#define Loader_Typedesc_map {0x40,}
-struct Loader_Link
-{
-	String*	name;
-	WORD	sig;
-	WORD	pc;
-	WORD	tdesc;
-};
-#define Loader_Link_size 16
-#define Loader_Link_map {0x80,}
-struct Loader_Niladt
-{
-	char	dummy[1];
-	uchar	_pad1[3];
-};
-#define Loader_Niladt_size 4
-#define Loader_Niladt_map {0}
-struct Freetype_Matrix
-{
-	WORD	a;
-	WORD	b;
-	WORD	c;
-	WORD	d;
-};
-#define Freetype_Matrix_size 16
-#define Freetype_Matrix_map {0}
-struct Freetype_Vector
-{
-	WORD	dx;
-	WORD	dy;
-};
-#define Freetype_Vector_size 8
-#define Freetype_Vector_map {0}
-struct Freetype_Face
-{
-	WORD	nfaces;
-	WORD	index;
-	WORD	style;
-	WORD	height;
-	WORD	ascent;
-	String*	familyname;
-	String*	stylename;
-};
-#define Freetype_Face_size 28
-#define Freetype_Face_map {0x6,}
-struct Freetype_Glyph
-{
-	WORD	top;
-	WORD	left;
-	WORD	height;
-	WORD	width;
-	Draw_Point	advance;
-	Array*	bitmap;
-};
-#define Freetype_Glyph_size 28
-#define Freetype_Glyph_map {0x2,}
-void Sys_announce(void*);
-typedef struct F_Sys_announce F_Sys_announce;
-struct F_Sys_announce
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; Sys_Connection t1; }*	ret;
-	uchar	temps[12];
-	String*	addr;
-};
-void Sys_aprint(void*);
-typedef struct F_Sys_aprint F_Sys_aprint;
-struct F_Sys_aprint
-{
-	WORD	regs[NREG-1];
-	Array**	ret;
-	uchar	temps[12];
-	String*	s;
-	WORD	vargs;
-};
-void Sys_bind(void*);
-typedef struct F_Sys_bind F_Sys_bind;
-struct F_Sys_bind
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	s;
-	String*	on;
-	WORD	flags;
-};
-void Sys_byte2char(void*);
-typedef struct F_Sys_byte2char F_Sys_byte2char;
-struct F_Sys_byte2char
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; WORD t1; WORD t2; }*	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-};
-void Sys_char2byte(void*);
-typedef struct F_Sys_char2byte F_Sys_char2byte;
-struct F_Sys_char2byte
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	WORD	c;
-	Array*	buf;
-	WORD	n;
-};
-void Sys_chdir(void*);
-typedef struct F_Sys_chdir F_Sys_chdir;
-struct F_Sys_chdir
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	path;
-};
-void Sys_create(void*);
-typedef struct F_Sys_create F_Sys_create;
-struct F_Sys_create
-{
-	WORD	regs[NREG-1];
-	Sys_FD**	ret;
-	uchar	temps[12];
-	String*	s;
-	WORD	mode;
-	WORD	perm;
-};
-void Sys_dial(void*);
-typedef struct F_Sys_dial F_Sys_dial;
-struct F_Sys_dial
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; Sys_Connection t1; }*	ret;
-	uchar	temps[12];
-	String*	addr;
-	String*	local;
-};
-void Sys_dirread(void*);
-typedef struct F_Sys_dirread F_Sys_dirread;
-struct F_Sys_dirread
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; Array* t1; }*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-};
-void Sys_dup(void*);
-typedef struct F_Sys_dup F_Sys_dup;
-struct F_Sys_dup
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	WORD	old;
-	WORD	new;
-};
-void Sys_export(void*);
-typedef struct F_Sys_export F_Sys_export;
-struct F_Sys_export
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	c;
-	String*	dir;
-	WORD	flag;
-};
-void Sys_fauth(void*);
-typedef struct F_Sys_fauth F_Sys_fauth;
-struct F_Sys_fauth
-{
-	WORD	regs[NREG-1];
-	Sys_FD**	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	String*	aname;
-};
-void Sys_fd2path(void*);
-typedef struct F_Sys_fd2path F_Sys_fd2path;
-struct F_Sys_fd2path
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-};
-void Sys_fildes(void*);
-typedef struct F_Sys_fildes F_Sys_fildes;
-struct F_Sys_fildes
-{
-	WORD	regs[NREG-1];
-	Sys_FD**	ret;
-	uchar	temps[12];
-	WORD	fd;
-};
-void Sys_file2chan(void*);
-typedef struct F_Sys_file2chan F_Sys_file2chan;
-struct F_Sys_file2chan
-{
-	WORD	regs[NREG-1];
-	Sys_FileIO**	ret;
-	uchar	temps[12];
-	String*	dir;
-	String*	file;
-};
-void Sys_fprint(void*);
-typedef struct F_Sys_fprint F_Sys_fprint;
-struct F_Sys_fprint
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	String*	s;
-	WORD	vargs;
-};
-void Sys_fstat(void*);
-typedef struct F_Sys_fstat F_Sys_fstat;
-struct F_Sys_fstat
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; uchar	_pad4[4]; Sys_Dir t1; }*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-};
-void Sys_fversion(void*);
-typedef struct F_Sys_fversion F_Sys_fversion;
-struct F_Sys_fversion
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; String* t1; }*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	WORD	msize;
-	String*	version;
-};
-void Sys_fwstat(void*);
-typedef struct F_Sys_fwstat F_Sys_fwstat;
-struct F_Sys_fwstat
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	uchar	_pad36[4];
-	Sys_Dir	d;
-};
-void Sys_iounit(void*);
-typedef struct F_Sys_iounit F_Sys_iounit;
-struct F_Sys_iounit
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-};
-void Sys_listen(void*);
-typedef struct F_Sys_listen F_Sys_listen;
-struct F_Sys_listen
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; Sys_Connection t1; }*	ret;
-	uchar	temps[12];
-	Sys_Connection	c;
-};
-void Sys_millisec(void*);
-typedef struct F_Sys_millisec F_Sys_millisec;
-struct F_Sys_millisec
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-};
-void Sys_mount(void*);
-typedef struct F_Sys_mount F_Sys_mount;
-struct F_Sys_mount
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Sys_FD*	afd;
-	String*	on;
-	WORD	flags;
-	String*	spec;
-};
-void Sys_open(void*);
-typedef struct F_Sys_open F_Sys_open;
-struct F_Sys_open
-{
-	WORD	regs[NREG-1];
-	Sys_FD**	ret;
-	uchar	temps[12];
-	String*	s;
-	WORD	mode;
-};
-void Sys_pctl(void*);
-typedef struct F_Sys_pctl F_Sys_pctl;
-struct F_Sys_pctl
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	WORD	flags;
-	List*	movefd;
-};
-void Sys_pipe(void*);
-typedef struct F_Sys_pipe F_Sys_pipe;
-struct F_Sys_pipe
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Array*	fds;
-};
-void Sys_pread(void*);
-typedef struct F_Sys_pread F_Sys_pread;
-struct F_Sys_pread
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Array*	buf;
-	WORD	n;
-	uchar	_pad44[4];
-	LONG	off;
-};
-void Sys_print(void*);
-typedef struct F_Sys_print F_Sys_print;
-struct F_Sys_print
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	s;
-	WORD	vargs;
-};
-void Sys_pwrite(void*);
-typedef struct F_Sys_pwrite F_Sys_pwrite;
-struct F_Sys_pwrite
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Array*	buf;
-	WORD	n;
-	uchar	_pad44[4];
-	LONG	off;
-};
-void Sys_read(void*);
-typedef struct F_Sys_read F_Sys_read;
-struct F_Sys_read
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Array*	buf;
-	WORD	n;
-};
-void Sys_readn(void*);
-typedef struct F_Sys_readn F_Sys_readn;
-struct F_Sys_readn
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Array*	buf;
-	WORD	n;
-};
-void Sys_remove(void*);
-typedef struct F_Sys_remove F_Sys_remove;
-struct F_Sys_remove
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	s;
-};
-void Sys_seek(void*);
-typedef struct F_Sys_seek F_Sys_seek;
-struct F_Sys_seek
-{
-	WORD	regs[NREG-1];
-	LONG*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	uchar	_pad36[4];
-	LONG	off;
-	WORD	start;
-};
-void Sys_sleep(void*);
-typedef struct F_Sys_sleep F_Sys_sleep;
-struct F_Sys_sleep
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	WORD	period;
-};
-void Sys_sprint(void*);
-typedef struct F_Sys_sprint F_Sys_sprint;
-struct F_Sys_sprint
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	String*	s;
-	WORD	vargs;
-};
-void Sys_stat(void*);
-typedef struct F_Sys_stat F_Sys_stat;
-struct F_Sys_stat
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; uchar	_pad4[4]; Sys_Dir t1; }*	ret;
-	uchar	temps[12];
-	String*	s;
-};
-void Sys_stream(void*);
-typedef struct F_Sys_stream F_Sys_stream;
-struct F_Sys_stream
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	src;
-	Sys_FD*	dst;
-	WORD	bufsiz;
-};
-void Sys_tokenize(void*);
-typedef struct F_Sys_tokenize F_Sys_tokenize;
-struct F_Sys_tokenize
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; List* t1; }*	ret;
-	uchar	temps[12];
-	String*	s;
-	String*	delim;
-};
-void Sys_unmount(void*);
-typedef struct F_Sys_unmount F_Sys_unmount;
-struct F_Sys_unmount
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	s1;
-	String*	s2;
-};
-void Sys_utfbytes(void*);
-typedef struct F_Sys_utfbytes F_Sys_utfbytes;
-struct F_Sys_utfbytes
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-};
-void Sys_werrstr(void*);
-typedef struct F_Sys_werrstr F_Sys_werrstr;
-struct F_Sys_werrstr
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	s;
-};
-void Sys_write(void*);
-typedef struct F_Sys_write F_Sys_write;
-struct F_Sys_write
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Sys_FD*	fd;
-	Array*	buf;
-	WORD	n;
-};
-void Sys_wstat(void*);
-typedef struct F_Sys_wstat F_Sys_wstat;
-struct F_Sys_wstat
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	s;
-	uchar	_pad36[4];
-	Sys_Dir	d;
-};
-#define Sys_PATH "$Sys"
-#define Sys_Maxint 2147483647
-#define Sys_QTDIR 128
-#define Sys_QTAPPEND 64
-#define Sys_QTEXCL 32
-#define Sys_QTAUTH 8
-#define Sys_QTTMP 4
-#define Sys_QTFILE 0
-#define Sys_ATOMICIO 8192
-#define Sys_SEEKSTART 0
-#define Sys_SEEKRELA 1
-#define Sys_SEEKEND 2
-#define Sys_NAMEMAX 256
-#define Sys_ERRMAX 128
-#define Sys_WAITLEN 192
-#define Sys_OREAD 0
-#define Sys_OWRITE 1
-#define Sys_ORDWR 2
-#define Sys_OTRUNC 16
-#define Sys_ORCLOSE 64
-#define Sys_OEXCL 4096
-#define Sys_DMDIR -2147483648
-#define Sys_DMAPPEND 1073741824
-#define Sys_DMEXCL 536870912
-#define Sys_DMAUTH 134217728
-#define Sys_DMTMP 67108864
-#define Sys_MREPL 0
-#define Sys_MBEFORE 1
-#define Sys_MAFTER 2
-#define Sys_MCREATE 4
-#define Sys_MCACHE 16
-#define Sys_NEWFD 1
-#define Sys_FORKFD 2
-#define Sys_NEWNS 4
-#define Sys_FORKNS 8
-#define Sys_NEWPGRP 16
-#define Sys_NODEVS 32
-#define Sys_NEWENV 64
-#define Sys_FORKENV 128
-#define Sys_EXPWAIT 0
-#define Sys_EXPASYNC 1
-#define Sys_UTFmax 4
-#define Sys_UTFerror 65533
-#define Sys_Runemax 1114111
-#define Sys_Runemask 2097151
-void Rect_Xrect(void*);
-typedef struct F_Rect_Xrect F_Rect_Xrect;
-struct F_Rect_Xrect
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Rect	r;
-	Draw_Rect	s;
-};
-void Point_add(void*);
-typedef struct F_Point_add F_Point_add;
-struct F_Point_add
-{
-	WORD	regs[NREG-1];
-	Draw_Point*	ret;
-	uchar	temps[12];
-	Draw_Point	p;
-	Draw_Point	q;
-};
-void Rect_addpt(void*);
-typedef struct F_Rect_addpt F_Rect_addpt;
-struct F_Rect_addpt
-{
-	WORD	regs[NREG-1];
-	Draw_Rect*	ret;
-	uchar	temps[12];
-	Draw_Rect	r;
-	Draw_Point	p;
-};
-void Display_allocate(void*);
-typedef struct F_Display_allocate F_Display_allocate;
-struct F_Display_allocate
-{
-	WORD	regs[NREG-1];
-	Draw_Display**	ret;
-	uchar	temps[12];
-	String*	dev;
-};
-void Screen_allocate(void*);
-typedef struct F_Screen_allocate F_Screen_allocate;
-struct F_Screen_allocate
-{
-	WORD	regs[NREG-1];
-	Draw_Screen**	ret;
-	uchar	temps[12];
-	Draw_Image*	image;
-	Draw_Image*	fill;
-	WORD	public;
-};
-void Image_arc(void*);
-typedef struct F_Image_arc F_Image_arc;
-struct F_Image_arc
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	c;
-	WORD	a;
-	WORD	b;
-	WORD	thick;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	WORD	alpha;
-	WORD	phi;
-};
-void Image_arcop(void*);
-typedef struct F_Image_arcop F_Image_arcop;
-struct F_Image_arcop
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	c;
-	WORD	a;
-	WORD	b;
-	WORD	thick;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	WORD	alpha;
-	WORD	phi;
-	WORD	op;
-};
-void Image_arrow(void*);
-typedef struct F_Image_arrow F_Image_arrow;
-struct F_Image_arrow
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	WORD	a;
-	WORD	b;
-	WORD	c;
-};
-void Font_bbox(void*);
-typedef struct F_Font_bbox F_Font_bbox;
-struct F_Font_bbox
-{
-	WORD	regs[NREG-1];
-	Draw_Rect*	ret;
-	uchar	temps[12];
-	Draw_Font*	f;
-	String*	str;
-};
-void Image_bezier(void*);
-typedef struct F_Image_bezier F_Image_bezier;
-struct F_Image_bezier
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	a;
-	Draw_Point	b;
-	Draw_Point	c;
-	Draw_Point	d;
-	WORD	end0;
-	WORD	end1;
-	WORD	radius;
-	Draw_Image*	src;
-	Draw_Point	sp;
-};
-void Image_bezierop(void*);
-typedef struct F_Image_bezierop F_Image_bezierop;
-struct F_Image_bezierop
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	a;
-	Draw_Point	b;
-	Draw_Point	c;
-	Draw_Point	d;
-	WORD	end0;
-	WORD	end1;
-	WORD	radius;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	WORD	op;
-};
-void Image_bezspline(void*);
-typedef struct F_Image_bezspline F_Image_bezspline;
-struct F_Image_bezspline
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Array*	p;
-	WORD	end0;
-	WORD	end1;
-	WORD	radius;
-	Draw_Image*	src;
-	Draw_Point	sp;
-};
-void Image_bezsplineop(void*);
-typedef struct F_Image_bezsplineop F_Image_bezsplineop;
-struct F_Image_bezsplineop
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Array*	p;
-	WORD	end0;
-	WORD	end1;
-	WORD	radius;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	WORD	op;
-};
-void Image_border(void*);
-typedef struct F_Image_border F_Image_border;
-struct F_Image_border
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Rect	r;
-	WORD	i;
-	Draw_Image*	src;
-	Draw_Point	sp;
-};
-void Image_bottom(void*);
-typedef struct F_Image_bottom F_Image_bottom;
-struct F_Image_bottom
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	win;
-};
-void Screen_bottom(void*);
-typedef struct F_Screen_bottom F_Screen_bottom;
-struct F_Screen_bottom
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Screen*	screen;
-	Array*	wins;
-};
-void Font_build(void*);
-typedef struct F_Font_build F_Font_build;
-struct F_Font_build
-{
-	WORD	regs[NREG-1];
-	Draw_Font**	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	String*	name;
-	String*	desc;
-};
-void Draw_bytesperline(void*);
-typedef struct F_Draw_bytesperline F_Draw_bytesperline;
-struct F_Draw_bytesperline
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Rect	r;
-	WORD	d;
-};
-void Rect_canon(void*);
-typedef struct F_Rect_canon F_Rect_canon;
-struct F_Rect_canon
-{
-	WORD	regs[NREG-1];
-	Draw_Rect*	ret;
-	uchar	temps[12];
-	Draw_Rect	r;
-};
-void Rect_clip(void*);
-typedef struct F_Rect_clip F_Rect_clip;
-struct F_Rect_clip
-{
-	WORD	regs[NREG-1];
-	struct{ Draw_Rect t0; WORD t1; }*	ret;
-	uchar	temps[12];
-	Draw_Rect	r;
-	Draw_Rect	s;
-};
-void Display_cmap2rgb(void*);
-typedef struct F_Display_cmap2rgb F_Display_cmap2rgb;
-struct F_Display_cmap2rgb
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; WORD t1; WORD t2; }*	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	WORD	c;
-};
-void Display_cmap2rgba(void*);
-typedef struct F_Display_cmap2rgba F_Display_cmap2rgba;
-struct F_Display_cmap2rgba
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	WORD	c;
-};
-void Display_color(void*);
-typedef struct F_Display_color F_Display_color;
-struct F_Display_color
-{
-	WORD	regs[NREG-1];
-	Draw_Image**	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	WORD	color;
-};
-void Display_colormix(void*);
-typedef struct F_Display_colormix F_Display_colormix;
-struct F_Display_colormix
-{
-	WORD	regs[NREG-1];
-	Draw_Image**	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	WORD	c1;
-	WORD	c2;
-};
-void Rect_combine(void*);
-typedef struct F_Rect_combine F_Rect_combine;
-struct F_Rect_combine
-{
-	WORD	regs[NREG-1];
-	Draw_Rect*	ret;
-	uchar	temps[12];
-	Draw_Rect	r;
-	Draw_Rect	s;
-};
-void Rect_contains(void*);
-typedef struct F_Rect_contains F_Rect_contains;
-struct F_Rect_contains
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Rect	r;
-	Draw_Point	p;
-};
-void Chans_depth(void*);
-typedef struct F_Chans_depth F_Chans_depth;
-struct F_Chans_depth
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Chans	c;
-};
-void Point_div(void*);
-typedef struct F_Point_div F_Point_div;
-struct F_Point_div
-{
-	WORD	regs[NREG-1];
-	Draw_Point*	ret;
-	uchar	temps[12];
-	Draw_Point	p;
-	WORD	i;
-};
-void Image_draw(void*);
-typedef struct F_Image_draw F_Image_draw;
-struct F_Image_draw
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Rect	r;
-	Draw_Image*	src;
-	Draw_Image*	matte;
-	Draw_Point	p;
-};
-void Image_drawop(void*);
-typedef struct F_Image_drawop F_Image_drawop;
-struct F_Image_drawop
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Rect	r;
-	Draw_Image*	src;
-	Draw_Image*	matte;
-	Draw_Point	p;
-	WORD	op;
-};
-void Rect_dx(void*);
-typedef struct F_Rect_dx F_Rect_dx;
-struct F_Rect_dx
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Rect	r;
-};
-void Rect_dy(void*);
-typedef struct F_Rect_dy F_Rect_dy;
-struct F_Rect_dy
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Rect	r;
-};
-void Image_ellipse(void*);
-typedef struct F_Image_ellipse F_Image_ellipse;
-struct F_Image_ellipse
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	c;
-	WORD	a;
-	WORD	b;
-	WORD	thick;
-	Draw_Image*	src;
-	Draw_Point	sp;
-};
-void Image_ellipseop(void*);
-typedef struct F_Image_ellipseop F_Image_ellipseop;
-struct F_Image_ellipseop
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	c;
-	WORD	a;
-	WORD	b;
-	WORD	thick;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	WORD	op;
-};
-void Chans_eq(void*);
-typedef struct F_Chans_eq F_Chans_eq;
-struct F_Chans_eq
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Chans	c;
-	Draw_Chans	d;
-};
-void Point_eq(void*);
-typedef struct F_Point_eq F_Point_eq;
-struct F_Point_eq
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Point	p;
-	Draw_Point	q;
-};
-void Rect_eq(void*);
-typedef struct F_Rect_eq F_Rect_eq;
-struct F_Rect_eq
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Rect	r;
-	Draw_Rect	s;
-};
-void Image_fillarc(void*);
-typedef struct F_Image_fillarc F_Image_fillarc;
-struct F_Image_fillarc
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	c;
-	WORD	a;
-	WORD	b;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	WORD	alpha;
-	WORD	phi;
-};
-void Image_fillarcop(void*);
-typedef struct F_Image_fillarcop F_Image_fillarcop;
-struct F_Image_fillarcop
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	c;
-	WORD	a;
-	WORD	b;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	WORD	alpha;
-	WORD	phi;
-	WORD	op;
-};
-void Image_fillbezier(void*);
-typedef struct F_Image_fillbezier F_Image_fillbezier;
-struct F_Image_fillbezier
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	a;
-	Draw_Point	b;
-	Draw_Point	c;
-	Draw_Point	d;
-	WORD	wind;
-	Draw_Image*	src;
-	Draw_Point	sp;
-};
-void Image_fillbezierop(void*);
-typedef struct F_Image_fillbezierop F_Image_fillbezierop;
-struct F_Image_fillbezierop
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	a;
-	Draw_Point	b;
-	Draw_Point	c;
-	Draw_Point	d;
-	WORD	wind;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	WORD	op;
-};
-void Image_fillbezspline(void*);
-typedef struct F_Image_fillbezspline F_Image_fillbezspline;
-struct F_Image_fillbezspline
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Array*	p;
-	WORD	wind;
-	Draw_Image*	src;
-	Draw_Point	sp;
-};
-void Image_fillbezsplineop(void*);
-typedef struct F_Image_fillbezsplineop F_Image_fillbezsplineop;
-struct F_Image_fillbezsplineop
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Array*	p;
-	WORD	wind;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	WORD	op;
-};
-void Image_fillellipse(void*);
-typedef struct F_Image_fillellipse F_Image_fillellipse;
-struct F_Image_fillellipse
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	c;
-	WORD	a;
-	WORD	b;
-	Draw_Image*	src;
-	Draw_Point	sp;
-};
-void Image_fillellipseop(void*);
-typedef struct F_Image_fillellipseop F_Image_fillellipseop;
-struct F_Image_fillellipseop
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	c;
-	WORD	a;
-	WORD	b;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	WORD	op;
-};
-void Image_fillpoly(void*);
-typedef struct F_Image_fillpoly F_Image_fillpoly;
-struct F_Image_fillpoly
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Array*	p;
-	WORD	wind;
-	Draw_Image*	src;
-	Draw_Point	sp;
-};
-void Image_fillpolyop(void*);
-typedef struct F_Image_fillpolyop F_Image_fillpolyop;
-struct F_Image_fillpolyop
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Array*	p;
-	WORD	wind;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	WORD	op;
-};
-void Image_flush(void*);
-typedef struct F_Image_flush F_Image_flush;
-struct F_Image_flush
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	win;
-	WORD	func;
-};
-void Image_gendraw(void*);
-typedef struct F_Image_gendraw F_Image_gendraw;
-struct F_Image_gendraw
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Rect	r;
-	Draw_Image*	src;
-	Draw_Point	p0;
-	Draw_Image*	matte;
-	Draw_Point	p1;
-};
-void Image_gendrawop(void*);
-typedef struct F_Image_gendrawop F_Image_gendrawop;
-struct F_Image_gendrawop
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Rect	r;
-	Draw_Image*	src;
-	Draw_Point	p0;
-	Draw_Image*	matte;
-	Draw_Point	p1;
-	WORD	op;
-};
-void Display_getwindow(void*);
-typedef struct F_Display_getwindow F_Display_getwindow;
-struct F_Display_getwindow
-{
-	WORD	regs[NREG-1];
-	struct{ Draw_Screen* t0; Draw_Image* t1; }*	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	String*	winname;
-	Draw_Screen*	screen;
-	Draw_Image*	image;
-	WORD	backup;
-};
-void Draw_icossin(void*);
-typedef struct F_Draw_icossin F_Draw_icossin;
-struct F_Draw_icossin
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; WORD t1; }*	ret;
-	uchar	temps[12];
-	WORD	deg;
-};
-void Draw_icossin2(void*);
-typedef struct F_Draw_icossin2 F_Draw_icossin2;
-struct F_Draw_icossin2
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; WORD t1; }*	ret;
-	uchar	temps[12];
-	Draw_Point	p;
-};
-void Point_in(void*);
-typedef struct F_Point_in F_Point_in;
-struct F_Point_in
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Point	p;
-	Draw_Rect	r;
-};
-void Rect_inrect(void*);
-typedef struct F_Rect_inrect F_Rect_inrect;
-struct F_Rect_inrect
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Rect	r;
-	Draw_Rect	s;
-};
-void Rect_inset(void*);
-typedef struct F_Rect_inset F_Rect_inset;
-struct F_Rect_inset
-{
-	WORD	regs[NREG-1];
-	Draw_Rect*	ret;
-	uchar	temps[12];
-	Draw_Rect	r;
-	WORD	n;
-};
-void Image_line(void*);
-typedef struct F_Image_line F_Image_line;
-struct F_Image_line
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	p0;
-	Draw_Point	p1;
-	WORD	end0;
-	WORD	end1;
-	WORD	radius;
-	Draw_Image*	src;
-	Draw_Point	sp;
-};
-void Image_lineop(void*);
-typedef struct F_Image_lineop F_Image_lineop;
-struct F_Image_lineop
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	p0;
-	Draw_Point	p1;
-	WORD	end0;
-	WORD	end1;
-	WORD	radius;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	WORD	op;
-};
-void Chans_mk(void*);
-typedef struct F_Chans_mk F_Chans_mk;
-struct F_Chans_mk
-{
-	WORD	regs[NREG-1];
-	Draw_Chans*	ret;
-	uchar	temps[12];
-	String*	s;
-};
-void Point_mul(void*);
-typedef struct F_Point_mul F_Point_mul;
-struct F_Point_mul
-{
-	WORD	regs[NREG-1];
-	Draw_Point*	ret;
-	uchar	temps[12];
-	Draw_Point	p;
-	WORD	i;
-};
-void Image_name(void*);
-typedef struct F_Image_name F_Image_name;
-struct F_Image_name
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Image*	src;
-	String*	name;
-	WORD	in;
-};
-void Display_namedimage(void*);
-typedef struct F_Display_namedimage F_Display_namedimage;
-struct F_Display_namedimage
-{
-	WORD	regs[NREG-1];
-	Draw_Image**	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	String*	name;
-};
-void Display_newimage(void*);
-typedef struct F_Display_newimage F_Display_newimage;
-struct F_Display_newimage
-{
-	WORD	regs[NREG-1];
-	Draw_Image**	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	Draw_Rect	r;
-	Draw_Chans	chans;
-	WORD	repl;
-	WORD	color;
-};
-void Screen_newwindow(void*);
-typedef struct F_Screen_newwindow F_Screen_newwindow;
-struct F_Screen_newwindow
-{
-	WORD	regs[NREG-1];
-	Draw_Image**	ret;
-	uchar	temps[12];
-	Draw_Screen*	screen;
-	Draw_Rect	r;
-	WORD	backing;
-	WORD	color;
-};
-void Display_open(void*);
-typedef struct F_Display_open F_Display_open;
-struct F_Display_open
-{
-	WORD	regs[NREG-1];
-	Draw_Image**	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	String*	name;
-};
-void Font_open(void*);
-typedef struct F_Font_open F_Font_open;
-struct F_Font_open
-{
-	WORD	regs[NREG-1];
-	Draw_Font**	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	String*	name;
-};
-void Image_origin(void*);
-typedef struct F_Image_origin F_Image_origin;
-struct F_Image_origin
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Image*	win;
-	Draw_Point	log;
-	Draw_Point	scr;
-};
-void Image_poly(void*);
-typedef struct F_Image_poly F_Image_poly;
-struct F_Image_poly
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Array*	p;
-	WORD	end0;
-	WORD	end1;
-	WORD	radius;
-	Draw_Image*	src;
-	Draw_Point	sp;
-};
-void Image_polyop(void*);
-typedef struct F_Image_polyop F_Image_polyop;
-struct F_Image_polyop
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Array*	p;
-	WORD	end0;
-	WORD	end1;
-	WORD	radius;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	WORD	op;
-};
-void Display_publicscreen(void*);
-typedef struct F_Display_publicscreen F_Display_publicscreen;
-struct F_Display_publicscreen
-{
-	WORD	regs[NREG-1];
-	Draw_Screen**	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	WORD	id;
-};
-void Display_readimage(void*);
-typedef struct F_Display_readimage F_Display_readimage;
-struct F_Display_readimage
-{
-	WORD	regs[NREG-1];
-	Draw_Image**	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	Sys_FD*	fd;
-};
-void Image_readpixels(void*);
-typedef struct F_Image_readpixels F_Image_readpixels;
-struct F_Image_readpixels
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Image*	src;
-	Draw_Rect	r;
-	Array*	data;
-};
-void Display_rgb(void*);
-typedef struct F_Display_rgb F_Display_rgb;
-struct F_Display_rgb
-{
-	WORD	regs[NREG-1];
-	Draw_Image**	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	WORD	r;
-	WORD	g;
-	WORD	b;
-};
-void Display_rgb2cmap(void*);
-typedef struct F_Display_rgb2cmap F_Display_rgb2cmap;
-struct F_Display_rgb2cmap
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	WORD	r;
-	WORD	g;
-	WORD	b;
-};
-void Draw_setalpha(void*);
-typedef struct F_Draw_setalpha F_Draw_setalpha;
-struct F_Draw_setalpha
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	WORD	c;
-	WORD	a;
-};
-void Rect_size(void*);
-typedef struct F_Rect_size F_Rect_size;
-struct F_Rect_size
-{
-	WORD	regs[NREG-1];
-	Draw_Point*	ret;
-	uchar	temps[12];
-	Draw_Rect	r;
-};
-void Display_startrefresh(void*);
-typedef struct F_Display_startrefresh F_Display_startrefresh;
-struct F_Display_startrefresh
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Display*	d;
-};
-void Point_sub(void*);
-typedef struct F_Point_sub F_Point_sub;
-struct F_Point_sub
-{
-	WORD	regs[NREG-1];
-	Draw_Point*	ret;
-	uchar	temps[12];
-	Draw_Point	p;
-	Draw_Point	q;
-};
-void Rect_subpt(void*);
-typedef struct F_Rect_subpt F_Rect_subpt;
-struct F_Rect_subpt
-{
-	WORD	regs[NREG-1];
-	Draw_Rect*	ret;
-	uchar	temps[12];
-	Draw_Rect	r;
-	Draw_Point	p;
-};
-void Chans_text(void*);
-typedef struct F_Chans_text F_Chans_text;
-struct F_Chans_text
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Draw_Chans	c;
-};
-void Image_text(void*);
-typedef struct F_Image_text F_Image_text;
-struct F_Image_text
-{
-	WORD	regs[NREG-1];
-	Draw_Point*	ret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	p;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	Draw_Font*	font;
-	String*	str;
-};
-void Image_textbg(void*);
-typedef struct F_Image_textbg F_Image_textbg;
-struct F_Image_textbg
-{
-	WORD	regs[NREG-1];
-	Draw_Point*	ret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	p;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	Draw_Font*	font;
-	String*	str;
-	Draw_Image*	bg;
-	Draw_Point	bgp;
-};
-void Image_textbgop(void*);
-typedef struct F_Image_textbgop F_Image_textbgop;
-struct F_Image_textbgop
-{
-	WORD	regs[NREG-1];
-	Draw_Point*	ret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	p;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	Draw_Font*	font;
-	String*	str;
-	Draw_Image*	bg;
-	Draw_Point	bgp;
-	WORD	op;
-};
-void Image_textop(void*);
-typedef struct F_Image_textop F_Image_textop;
-struct F_Image_textop
-{
-	WORD	regs[NREG-1];
-	Draw_Point*	ret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Point	p;
-	Draw_Image*	src;
-	Draw_Point	sp;
-	Draw_Font*	font;
-	String*	str;
-	WORD	op;
-};
-void Image_top(void*);
-typedef struct F_Image_top F_Image_top;
-struct F_Image_top
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Image*	win;
-};
-void Screen_top(void*);
-typedef struct F_Screen_top F_Screen_top;
-struct F_Screen_top
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Draw_Screen*	screen;
-	Array*	wins;
-};
-void Font_width(void*);
-typedef struct F_Font_width F_Font_width;
-struct F_Font_width
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Font*	f;
-	String*	str;
-};
-void Display_writeimage(void*);
-typedef struct F_Display_writeimage F_Display_writeimage;
-struct F_Display_writeimage
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	Sys_FD*	fd;
-	Draw_Image*	i;
-};
-void Image_writepixels(void*);
-typedef struct F_Image_writepixels F_Image_writepixels;
-struct F_Image_writepixels
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Draw_Image*	dst;
-	Draw_Rect	r;
-	Array*	data;
-};
-#define Draw_PATH "$Draw"
-#define Draw_Opaque -1
-#define Draw_Transparent 0
-#define Draw_Black 255
-#define Draw_White -1
-#define Draw_Red -16776961
-#define Draw_Green 16711935
-#define Draw_Blue 65535
-#define Draw_Cyan 16777215
-#define Draw_Magenta -16711681
-#define Draw_Yellow -65281
-#define Draw_Grey -286331137
-#define Draw_Paleyellow -21761
-#define Draw_Darkyellow -286351617
-#define Draw_Darkgreen 1149781247
-#define Draw_Palegreen -1426085121
-#define Draw_Medgreen -1999861505
-#define Draw_Darkblue 22015
-#define Draw_Palebluegreen -1426063361
-#define Draw_Paleblue 48127
-#define Draw_Bluegreen 8947967
-#define Draw_Greygreen 1437248255
-#define Draw_Palegreygreen -1628508417
-#define Draw_Yellowgreen -1718006529
-#define Draw_Medblue 39423
-#define Draw_Greyblue 6142975
-#define Draw_Palegreyblue 1234427391
-#define Draw_Purpleblue -2004300545
-#define Draw_Notacolor -256
-#define Draw_Nofill -256
-#define Draw_Endsquare 0
-#define Draw_Enddisc 1
-#define Draw_Endarrow 2
-#define Draw_Flushoff 0
-#define Draw_Flushon 1
-#define Draw_Flushnow 2
-#define Draw_Refbackup 0
-#define Draw_Refnone 1
-#define Draw_SinD 8
-#define Draw_DinS 4
-#define Draw_SoutD 2
-#define Draw_DoutS 1
-#define Draw_S 10
-#define Draw_SoverD 11
-#define Draw_SatopD 9
-#define Draw_SxorD 3
-#define Draw_D 5
-#define Draw_DoverS 7
-#define Draw_DatopS 6
-#define Draw_DxorS 3
-#define Draw_Clear 0
-#define Draw_CRed 0
-#define Draw_CGreen 1
-#define Draw_CBlue 2
-#define Draw_CGrey 3
-#define Draw_CAlpha 4
-#define Draw_CMap 5
-#define Draw_CIgnore 6
-void Element_adjust(void*);
-typedef struct F_Element_adjust F_Element_adjust;
-struct F_Element_adjust
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Prefab_Element*	elem;
-	WORD	equal;
-	WORD	dir;
-};
-void Element_append(void*);
-typedef struct F_Element_append F_Element_append;
-struct F_Element_append
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Prefab_Element*	elist;
-	Prefab_Element*	elem;
-};
-void Compound_box(void*);
-typedef struct F_Compound_box F_Compound_box;
-struct F_Compound_box
-{
-	WORD	regs[NREG-1];
-	Prefab_Compound**	ret;
-	uchar	temps[12];
-	Prefab_Environ*	env;
-	Draw_Point	p;
-	Prefab_Element*	title;
-	Prefab_Element*	elist;
-};
-void Element_clip(void*);
-typedef struct F_Element_clip F_Element_clip;
-struct F_Element_clip
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Prefab_Element*	elem;
-	Draw_Rect	r;
-};
-void Compound_draw(void*);
-typedef struct F_Compound_draw F_Compound_draw;
-struct F_Compound_draw
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Prefab_Compound*	comp;
-};
-void Element_elist(void*);
-typedef struct F_Element_elist F_Element_elist;
-struct F_Element_elist
-{
-	WORD	regs[NREG-1];
-	Prefab_Element**	ret;
-	uchar	temps[12];
-	Prefab_Environ*	env;
-	Prefab_Element*	elem;
-	WORD	kind;
-};
-void Compound_highlight(void*);
-typedef struct F_Compound_highlight F_Compound_highlight;
-struct F_Compound_highlight
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Prefab_Compound*	comp;
-	Prefab_Element*	elem;
-	WORD	on;
-};
-void Element_icon(void*);
-typedef struct F_Element_icon F_Element_icon;
-struct F_Element_icon
-{
-	WORD	regs[NREG-1];
-	Prefab_Element**	ret;
-	uchar	temps[12];
-	Prefab_Environ*	env;
-	Draw_Rect	r;
-	Draw_Image*	icon;
-	Draw_Image*	mask;
-};
-void Compound_iconbox(void*);
-typedef struct F_Compound_iconbox F_Compound_iconbox;
-struct F_Compound_iconbox
-{
-	WORD	regs[NREG-1];
-	Prefab_Compound**	ret;
-	uchar	temps[12];
-	Prefab_Environ*	env;
-	Draw_Point	p;
-	String*	title;
-	Draw_Image*	icon;
-	Draw_Image*	mask;
-};
-void Element_layout(void*);
-typedef struct F_Element_layout F_Element_layout;
-struct F_Element_layout
-{
-	WORD	regs[NREG-1];
-	Prefab_Element**	ret;
-	uchar	temps[12];
-	Prefab_Environ*	env;
-	List*	lay;
-	Draw_Rect	r;
-	WORD	kind;
-};
-void Compound_layoutbox(void*);
-typedef struct F_Compound_layoutbox F_Compound_layoutbox;
-struct F_Compound_layoutbox
-{
-	WORD	regs[NREG-1];
-	Prefab_Compound**	ret;
-	uchar	temps[12];
-	Prefab_Environ*	env;
-	Draw_Rect	r;
-	String*	title;
-	List*	lay;
-};
-void Compound_redraw(void*);
-typedef struct F_Compound_redraw F_Compound_redraw;
-struct F_Compound_redraw
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Prefab_Compound*	comp;
-	Draw_Rect	r;
-};
-void Element_scroll(void*);
-typedef struct F_Element_scroll F_Element_scroll;
-struct F_Element_scroll
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Prefab_Element*	elem;
-	Draw_Point	d;
-};
-void Compound_scroll(void*);
-typedef struct F_Compound_scroll F_Compound_scroll;
-struct F_Compound_scroll
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Prefab_Compound*	comp;
-	Prefab_Element*	elem;
-	Draw_Point	d;
-};
-void Compound_select(void*);
-typedef struct F_Compound_select F_Compound_select;
-struct F_Compound_select
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; WORD t1; Prefab_Element* t2; }*	ret;
-	uchar	temps[12];
-	Prefab_Compound*	comp;
-	Prefab_Element*	elem;
-	WORD	i;
-	Channel*	c;
-};
-void Element_separator(void*);
-typedef struct F_Element_separator F_Element_separator;
-struct F_Element_separator
-{
-	WORD	regs[NREG-1];
-	Prefab_Element**	ret;
-	uchar	temps[12];
-	Prefab_Environ*	env;
-	Draw_Rect	r;
-	Draw_Image*	icon;
-	Draw_Image*	mask;
-};
-void Element_show(void*);
-typedef struct F_Element_show F_Element_show;
-struct F_Element_show
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Prefab_Element*	elist;
-	Prefab_Element*	elem;
-};
-void Compound_show(void*);
-typedef struct F_Compound_show F_Compound_show;
-struct F_Compound_show
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Prefab_Compound*	comp;
-	Prefab_Element*	elem;
-};
-void Compound_tagselect(void*);
-typedef struct F_Compound_tagselect F_Compound_tagselect;
-struct F_Compound_tagselect
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; WORD t1; Prefab_Element* t2; }*	ret;
-	uchar	temps[12];
-	Prefab_Compound*	comp;
-	Prefab_Element*	elem;
-	WORD	i;
-	Channel*	c;
-};
-void Element_text(void*);
-typedef struct F_Element_text F_Element_text;
-struct F_Element_text
-{
-	WORD	regs[NREG-1];
-	Prefab_Element**	ret;
-	uchar	temps[12];
-	Prefab_Environ*	env;
-	String*	text;
-	Draw_Rect	r;
-	WORD	kind;
-};
-void Compound_textbox(void*);
-typedef struct F_Compound_textbox F_Compound_textbox;
-struct F_Compound_textbox
-{
-	WORD	regs[NREG-1];
-	Prefab_Compound**	ret;
-	uchar	temps[12];
-	Prefab_Environ*	env;
-	Draw_Rect	r;
-	String*	title;
-	String*	text;
-};
-void Element_translate(void*);
-typedef struct F_Element_translate F_Element_translate;
-struct F_Element_translate
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Prefab_Element*	elem;
-	Draw_Point	d;
-};
-#define Prefab_PATH "$Prefab"
-#define Prefab_EIcon 0
-#define Prefab_EText 1
-#define Prefab_ETitle 2
-#define Prefab_EHorizontal 3
-#define Prefab_EVertical 4
-#define Prefab_ESeparator 5
-#define Prefab_Adjpack 10
-#define Prefab_Adjequal 11
-#define Prefab_Adjfill 12
-#define Prefab_Adjleft 20
-#define Prefab_Adjup 20
-#define Prefab_Adjcenter 21
-#define Prefab_Adjright 22
-#define Prefab_Adjdown 22
-void Tk_cmd(void*);
-typedef struct F_Tk_cmd F_Tk_cmd;
-struct F_Tk_cmd
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Tk_Toplevel*	t;
-	String*	arg;
-};
-void Tk_color(void*);
-typedef struct F_Tk_color F_Tk_color;
-struct F_Tk_color
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	String*	col;
-};
-void Tk_getimage(void*);
-typedef struct F_Tk_getimage F_Tk_getimage;
-struct F_Tk_getimage
-{
-	WORD	regs[NREG-1];
-	struct{ Draw_Image* t0; Draw_Image* t1; String* t2; }*	ret;
-	uchar	temps[12];
-	Tk_Toplevel*	t;
-	String*	name;
-};
-void Tk_keyboard(void*);
-typedef struct F_Tk_keyboard F_Tk_keyboard;
-struct F_Tk_keyboard
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Tk_Toplevel*	t;
-	WORD	key;
-};
-void Tk_namechan(void*);
-typedef struct F_Tk_namechan F_Tk_namechan;
-struct F_Tk_namechan
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Tk_Toplevel*	t;
-	Channel*	c;
-	String*	n;
-};
-void Tk_pointer(void*);
-typedef struct F_Tk_pointer F_Tk_pointer;
-struct F_Tk_pointer
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Tk_Toplevel*	t;
-	Draw_Pointer	p;
-};
-void Tk_putimage(void*);
-typedef struct F_Tk_putimage F_Tk_putimage;
-struct F_Tk_putimage
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Tk_Toplevel*	t;
-	String*	name;
-	Draw_Image*	i;
-	Draw_Image*	m;
-};
-void Tk_quote(void*);
-typedef struct F_Tk_quote F_Tk_quote;
-struct F_Tk_quote
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	String*	s;
-};
-void Tk_rect(void*);
-typedef struct F_Tk_rect F_Tk_rect;
-struct F_Tk_rect
-{
-	WORD	regs[NREG-1];
-	Draw_Rect*	ret;
-	uchar	temps[12];
-	Tk_Toplevel*	t;
-	String*	name;
-	WORD	flags;
-};
-void Tk_toplevel(void*);
-typedef struct F_Tk_toplevel F_Tk_toplevel;
-struct F_Tk_toplevel
-{
-	WORD	regs[NREG-1];
-	Tk_Toplevel**	ret;
-	uchar	temps[12];
-	Draw_Display*	d;
-	String*	arg;
-};
-#define Tk_PATH "$Tk"
-#define Tk_Border 1
-#define Tk_Required 2
-#define Tk_Local 4
-void Math_FPcontrol(void*);
-typedef struct F_Math_FPcontrol F_Math_FPcontrol;
-struct F_Math_FPcontrol
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	WORD	r;
-	WORD	mask;
-};
-void Math_FPstatus(void*);
-typedef struct F_Math_FPstatus F_Math_FPstatus;
-struct F_Math_FPstatus
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	WORD	r;
-	WORD	mask;
-};
-void Math_acos(void*);
-typedef struct F_Math_acos F_Math_acos;
-struct F_Math_acos
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_acosh(void*);
-typedef struct F_Math_acosh F_Math_acosh;
-struct F_Math_acosh
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_asin(void*);
-typedef struct F_Math_asin F_Math_asin;
-struct F_Math_asin
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_asinh(void*);
-typedef struct F_Math_asinh F_Math_asinh;
-struct F_Math_asinh
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_atan(void*);
-typedef struct F_Math_atan F_Math_atan;
-struct F_Math_atan
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_atan2(void*);
-typedef struct F_Math_atan2 F_Math_atan2;
-struct F_Math_atan2
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	y;
-	REAL	x;
-};
-void Math_atanh(void*);
-typedef struct F_Math_atanh F_Math_atanh;
-struct F_Math_atanh
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_bits32real(void*);
-typedef struct F_Math_bits32real F_Math_bits32real;
-struct F_Math_bits32real
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	WORD	b;
-};
-void Math_bits64real(void*);
-typedef struct F_Math_bits64real F_Math_bits64real;
-struct F_Math_bits64real
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	LONG	b;
-};
-void Math_cbrt(void*);
-typedef struct F_Math_cbrt F_Math_cbrt;
-struct F_Math_cbrt
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_ceil(void*);
-typedef struct F_Math_ceil F_Math_ceil;
-struct F_Math_ceil
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_copysign(void*);
-typedef struct F_Math_copysign F_Math_copysign;
-struct F_Math_copysign
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-	REAL	s;
-};
-void Math_cos(void*);
-typedef struct F_Math_cos F_Math_cos;
-struct F_Math_cos
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_cosh(void*);
-typedef struct F_Math_cosh F_Math_cosh;
-struct F_Math_cosh
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_dot(void*);
-typedef struct F_Math_dot F_Math_dot;
-struct F_Math_dot
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	Array*	x;
-	Array*	y;
-};
-void Math_erf(void*);
-typedef struct F_Math_erf F_Math_erf;
-struct F_Math_erf
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_erfc(void*);
-typedef struct F_Math_erfc F_Math_erfc;
-struct F_Math_erfc
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_exp(void*);
-typedef struct F_Math_exp F_Math_exp;
-struct F_Math_exp
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_expm1(void*);
-typedef struct F_Math_expm1 F_Math_expm1;
-struct F_Math_expm1
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_export_int(void*);
-typedef struct F_Math_export_int F_Math_export_int;
-struct F_Math_export_int
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Array*	b;
-	Array*	x;
-};
-void Math_export_real(void*);
-typedef struct F_Math_export_real F_Math_export_real;
-struct F_Math_export_real
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Array*	b;
-	Array*	x;
-};
-void Math_export_real32(void*);
-typedef struct F_Math_export_real32 F_Math_export_real32;
-struct F_Math_export_real32
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Array*	b;
-	Array*	x;
-};
-void Math_fabs(void*);
-typedef struct F_Math_fabs F_Math_fabs;
-struct F_Math_fabs
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_fdim(void*);
-typedef struct F_Math_fdim F_Math_fdim;
-struct F_Math_fdim
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-	REAL	y;
-};
-void Math_finite(void*);
-typedef struct F_Math_finite F_Math_finite;
-struct F_Math_finite
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_floor(void*);
-typedef struct F_Math_floor F_Math_floor;
-struct F_Math_floor
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_fmax(void*);
-typedef struct F_Math_fmax F_Math_fmax;
-struct F_Math_fmax
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-	REAL	y;
-};
-void Math_fmin(void*);
-typedef struct F_Math_fmin F_Math_fmin;
-struct F_Math_fmin
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-	REAL	y;
-};
-void Math_fmod(void*);
-typedef struct F_Math_fmod F_Math_fmod;
-struct F_Math_fmod
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-	REAL	y;
-};
-void Math_gemm(void*);
-typedef struct F_Math_gemm F_Math_gemm;
-struct F_Math_gemm
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	WORD	transa;
-	WORD	transb;
-	WORD	m;
-	WORD	n;
-	WORD	k;
-	uchar	_pad52[4];
-	REAL	alpha;
-	Array*	a;
-	WORD	lda;
-	Array*	b;
-	WORD	ldb;
-	REAL	beta;
-	Array*	c;
-	WORD	ldc;
-};
-void Math_getFPcontrol(void*);
-typedef struct F_Math_getFPcontrol F_Math_getFPcontrol;
-struct F_Math_getFPcontrol
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-};
-void Math_getFPstatus(void*);
-typedef struct F_Math_getFPstatus F_Math_getFPstatus;
-struct F_Math_getFPstatus
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-};
-void Math_hypot(void*);
-typedef struct F_Math_hypot F_Math_hypot;
-struct F_Math_hypot
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-	REAL	y;
-};
-void Math_iamax(void*);
-typedef struct F_Math_iamax F_Math_iamax;
-struct F_Math_iamax
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Array*	x;
-};
-void Math_ilogb(void*);
-typedef struct F_Math_ilogb F_Math_ilogb;
-struct F_Math_ilogb
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_import_int(void*);
-typedef struct F_Math_import_int F_Math_import_int;
-struct F_Math_import_int
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Array*	b;
-	Array*	x;
-};
-void Math_import_real(void*);
-typedef struct F_Math_import_real F_Math_import_real;
-struct F_Math_import_real
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Array*	b;
-	Array*	x;
-};
-void Math_import_real32(void*);
-typedef struct F_Math_import_real32 F_Math_import_real32;
-struct F_Math_import_real32
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Array*	b;
-	Array*	x;
-};
-void Math_isnan(void*);
-typedef struct F_Math_isnan F_Math_isnan;
-struct F_Math_isnan
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_j0(void*);
-typedef struct F_Math_j0 F_Math_j0;
-struct F_Math_j0
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_j1(void*);
-typedef struct F_Math_j1 F_Math_j1;
-struct F_Math_j1
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_jn(void*);
-typedef struct F_Math_jn F_Math_jn;
-struct F_Math_jn
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	WORD	n;
-	uchar	_pad36[4];
-	REAL	x;
-};
-void Math_lgamma(void*);
-typedef struct F_Math_lgamma F_Math_lgamma;
-struct F_Math_lgamma
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; uchar	_pad4[4]; REAL t1; }*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_log(void*);
-typedef struct F_Math_log F_Math_log;
-struct F_Math_log
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_log10(void*);
-typedef struct F_Math_log10 F_Math_log10;
-struct F_Math_log10
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_log1p(void*);
-typedef struct F_Math_log1p F_Math_log1p;
-struct F_Math_log1p
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_modf(void*);
-typedef struct F_Math_modf F_Math_modf;
-struct F_Math_modf
-{
-	WORD	regs[NREG-1];
-	struct{ WORD t0; uchar	_pad4[4]; REAL t1; }*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_nextafter(void*);
-typedef struct F_Math_nextafter F_Math_nextafter;
-struct F_Math_nextafter
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-	REAL	y;
-};
-void Math_norm1(void*);
-typedef struct F_Math_norm1 F_Math_norm1;
-struct F_Math_norm1
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	Array*	x;
-};
-void Math_norm2(void*);
-typedef struct F_Math_norm2 F_Math_norm2;
-struct F_Math_norm2
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	Array*	x;
-};
-void Math_pow(void*);
-typedef struct F_Math_pow F_Math_pow;
-struct F_Math_pow
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-	REAL	y;
-};
-void Math_pow10(void*);
-typedef struct F_Math_pow10 F_Math_pow10;
-struct F_Math_pow10
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	WORD	p;
-};
-void Math_realbits32(void*);
-typedef struct F_Math_realbits32 F_Math_realbits32;
-struct F_Math_realbits32
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_realbits64(void*);
-typedef struct F_Math_realbits64 F_Math_realbits64;
-struct F_Math_realbits64
-{
-	WORD	regs[NREG-1];
-	LONG*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_remainder(void*);
-typedef struct F_Math_remainder F_Math_remainder;
-struct F_Math_remainder
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-	REAL	p;
-};
-void Math_rint(void*);
-typedef struct F_Math_rint F_Math_rint;
-struct F_Math_rint
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_scalbn(void*);
-typedef struct F_Math_scalbn F_Math_scalbn;
-struct F_Math_scalbn
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-	WORD	n;
-};
-void Math_sin(void*);
-typedef struct F_Math_sin F_Math_sin;
-struct F_Math_sin
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_sinh(void*);
-typedef struct F_Math_sinh F_Math_sinh;
-struct F_Math_sinh
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_sort(void*);
-typedef struct F_Math_sort F_Math_sort;
-struct F_Math_sort
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Array*	x;
-	Array*	pi;
-};
-void Math_sqrt(void*);
-typedef struct F_Math_sqrt F_Math_sqrt;
-struct F_Math_sqrt
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_tan(void*);
-typedef struct F_Math_tan F_Math_tan;
-struct F_Math_tan
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_tanh(void*);
-typedef struct F_Math_tanh F_Math_tanh;
-struct F_Math_tanh
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_y0(void*);
-typedef struct F_Math_y0 F_Math_y0;
-struct F_Math_y0
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_y1(void*);
-typedef struct F_Math_y1 F_Math_y1;
-struct F_Math_y1
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	REAL	x;
-};
-void Math_yn(void*);
-typedef struct F_Math_yn F_Math_yn;
-struct F_Math_yn
-{
-	WORD	regs[NREG-1];
-	REAL*	ret;
-	uchar	temps[12];
-	WORD	n;
-	uchar	_pad36[4];
-	REAL	x;
-};
-#define Math_PATH "$Math"
-#define Math_Infinity Infinity
-#define Math_NaN NaN
-#define Math_MachEps 2.220446049250313e-16
-#define Math_Pi 3.141592653589793
-#define Math_Degree .017453292519943295
-#define Math_INVAL 1
-#define Math_ZDIV 2
-#define Math_OVFL 4
-#define Math_UNFL 8
-#define Math_INEX 16
-#define Math_RND_NR 0
-#define Math_RND_NINF 256
-#define Math_RND_PINF 512
-#define Math_RND_Z 768
-#define Math_RND_MASK 768
-void IPints_DSAprimes(void*);
-typedef struct F_IPints_DSAprimes F_IPints_DSAprimes;
-struct F_IPints_DSAprimes
-{
-	WORD	regs[NREG-1];
-	struct{ IPints_IPint* t0; IPints_IPint* t1; Array* t2; }*	ret;
-	uchar	temps[12];
-};
-void IPint_add(void*);
-typedef struct F_IPint_add F_IPint_add;
-struct F_IPint_add
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i1;
-	IPints_IPint*	i2;
-};
-void IPint_and(void*);
-typedef struct F_IPint_and F_IPint_and;
-struct F_IPint_and
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i1;
-	IPints_IPint*	i2;
-};
-void IPint_b64toip(void*);
-typedef struct F_IPint_b64toip F_IPint_b64toip;
-struct F_IPint_b64toip
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	String*	str;
-};
-void IPint_bebytestoip(void*);
-typedef struct F_IPint_bebytestoip F_IPint_bebytestoip;
-struct F_IPint_bebytestoip
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	Array*	mag;
-};
-void IPint_bits(void*);
-typedef struct F_IPint_bits F_IPint_bits;
-struct F_IPint_bits
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	IPints_IPint*	i;
-};
-void IPint_bytestoip(void*);
-typedef struct F_IPint_bytestoip F_IPint_bytestoip;
-struct F_IPint_bytestoip
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	Array*	buf;
-};
-void IPint_cmp(void*);
-typedef struct F_IPint_cmp F_IPint_cmp;
-struct F_IPint_cmp
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	IPints_IPint*	i1;
-	IPints_IPint*	i2;
-};
-void IPint_copy(void*);
-typedef struct F_IPint_copy F_IPint_copy;
-struct F_IPint_copy
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i;
-};
-void IPint_div(void*);
-typedef struct F_IPint_div F_IPint_div;
-struct F_IPint_div
-{
-	WORD	regs[NREG-1];
-	struct{ IPints_IPint* t0; IPints_IPint* t1; }*	ret;
-	uchar	temps[12];
-	IPints_IPint*	i1;
-	IPints_IPint*	i2;
-};
-void IPint_eq(void*);
-typedef struct F_IPint_eq F_IPint_eq;
-struct F_IPint_eq
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	IPints_IPint*	i1;
-	IPints_IPint*	i2;
-};
-void IPint_expmod(void*);
-typedef struct F_IPint_expmod F_IPint_expmod;
-struct F_IPint_expmod
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	IPints_IPint*	base;
-	IPints_IPint*	exp;
-	IPints_IPint*	mod;
-};
-void IPints_genprime(void*);
-typedef struct F_IPints_genprime F_IPints_genprime;
-struct F_IPints_genprime
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	WORD	nbits;
-	WORD	nrep;
-};
-void IPints_gensafeprime(void*);
-typedef struct F_IPints_gensafeprime F_IPints_gensafeprime;
-struct F_IPints_gensafeprime
-{
-	WORD	regs[NREG-1];
-	struct{ IPints_IPint* t0; IPints_IPint* t1; }*	ret;
-	uchar	temps[12];
-	WORD	nbits;
-	WORD	nrep;
-};
-void IPints_genstrongprime(void*);
-typedef struct F_IPints_genstrongprime F_IPints_genstrongprime;
-struct F_IPints_genstrongprime
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	WORD	nbits;
-	WORD	nrep;
-};
-void IPint_inttoip(void*);
-typedef struct F_IPint_inttoip F_IPint_inttoip;
-struct F_IPint_inttoip
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	WORD	i;
-};
-void IPint_invert(void*);
-typedef struct F_IPint_invert F_IPint_invert;
-struct F_IPint_invert
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	IPints_IPint*	base;
-	IPints_IPint*	mod;
-};
-void IPint_iptob64(void*);
-typedef struct F_IPint_iptob64 F_IPint_iptob64;
-struct F_IPint_iptob64
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i;
-};
-void IPint_iptob64z(void*);
-typedef struct F_IPint_iptob64z F_IPint_iptob64z;
-struct F_IPint_iptob64z
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i;
-};
-void IPint_iptobebytes(void*);
-typedef struct F_IPint_iptobebytes F_IPint_iptobebytes;
-struct F_IPint_iptobebytes
-{
-	WORD	regs[NREG-1];
-	Array**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i;
-};
-void IPint_iptobytes(void*);
-typedef struct F_IPint_iptobytes F_IPint_iptobytes;
-struct F_IPint_iptobytes
-{
-	WORD	regs[NREG-1];
-	Array**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i;
-};
-void IPint_iptoint(void*);
-typedef struct F_IPint_iptoint F_IPint_iptoint;
-struct F_IPint_iptoint
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	IPints_IPint*	i;
-};
-void IPint_iptostr(void*);
-typedef struct F_IPint_iptostr F_IPint_iptostr;
-struct F_IPint_iptostr
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i;
-	WORD	base;
-};
-void IPint_mod(void*);
-typedef struct F_IPint_mod F_IPint_mod;
-struct F_IPint_mod
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i1;
-	IPints_IPint*	i2;
-};
-void IPint_mul(void*);
-typedef struct F_IPint_mul F_IPint_mul;
-struct F_IPint_mul
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i1;
-	IPints_IPint*	i2;
-};
-void IPint_neg(void*);
-typedef struct F_IPint_neg F_IPint_neg;
-struct F_IPint_neg
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i;
-};
-void IPint_not(void*);
-typedef struct F_IPint_not F_IPint_not;
-struct F_IPint_not
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i1;
-};
-void IPint_ori(void*);
-typedef struct F_IPint_ori F_IPint_ori;
-struct F_IPint_ori
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i1;
-	IPints_IPint*	i2;
-};
-void IPints_probably_prime(void*);
-typedef struct F_IPints_probably_prime F_IPints_probably_prime;
-struct F_IPints_probably_prime
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	IPints_IPint*	n;
-	WORD	nrep;
-};
-void IPint_random(void*);
-typedef struct F_IPint_random F_IPint_random;
-struct F_IPint_random
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	WORD	nbits;
-};
-void IPint_shl(void*);
-typedef struct F_IPint_shl F_IPint_shl;
-struct F_IPint_shl
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i;
-	WORD	n;
-};
-void IPint_shr(void*);
-typedef struct F_IPint_shr F_IPint_shr;
-struct F_IPint_shr
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i;
-	WORD	n;
-};
-void IPint_strtoip(void*);
-typedef struct F_IPint_strtoip F_IPint_strtoip;
-struct F_IPint_strtoip
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	String*	str;
-	WORD	base;
-};
-void IPint_sub(void*);
-typedef struct F_IPint_sub F_IPint_sub;
-struct F_IPint_sub
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i1;
-	IPints_IPint*	i2;
-};
-void IPint_xor(void*);
-typedef struct F_IPint_xor F_IPint_xor;
-struct F_IPint_xor
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	IPints_IPint*	i1;
-	IPints_IPint*	i2;
-};
-#define IPints_PATH "$IPints"
-void Crypt_aescbc(void*);
-typedef struct F_Crypt_aescbc F_Crypt_aescbc;
-struct F_Crypt_aescbc
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Crypt_AESstate*	state;
-	Array*	buf;
-	WORD	n;
-	WORD	direction;
-};
-void Crypt_aessetup(void*);
-typedef struct F_Crypt_aessetup F_Crypt_aessetup;
-struct F_Crypt_aessetup
-{
-	WORD	regs[NREG-1];
-	Crypt_AESstate**	ret;
-	uchar	temps[12];
-	Array*	key;
-	Array*	ivec;
-};
-void Crypt_blowfishcbc(void*);
-typedef struct F_Crypt_blowfishcbc F_Crypt_blowfishcbc;
-struct F_Crypt_blowfishcbc
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Crypt_BFstate*	state;
-	Array*	buf;
-	WORD	n;
-	WORD	direction;
-};
-void Crypt_blowfishsetup(void*);
-typedef struct F_Crypt_blowfishsetup F_Crypt_blowfishsetup;
-struct F_Crypt_blowfishsetup
-{
-	WORD	regs[NREG-1];
-	Crypt_BFstate**	ret;
-	uchar	temps[12];
-	Array*	key;
-	Array*	ivec;
-};
-void DigestState_copy(void*);
-typedef struct F_DigestState_copy F_DigestState_copy;
-struct F_DigestState_copy
-{
-	WORD	regs[NREG-1];
-	Crypt_DigestState**	ret;
-	uchar	temps[12];
-	Crypt_DigestState*	d;
-};
-void Crypt_descbc(void*);
-typedef struct F_Crypt_descbc F_Crypt_descbc;
-struct F_Crypt_descbc
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Crypt_DESstate*	state;
-	Array*	buf;
-	WORD	n;
-	WORD	direction;
-};
-void Crypt_desecb(void*);
-typedef struct F_Crypt_desecb F_Crypt_desecb;
-struct F_Crypt_desecb
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Crypt_DESstate*	state;
-	Array*	buf;
-	WORD	n;
-	WORD	direction;
-};
-void Crypt_dessetup(void*);
-typedef struct F_Crypt_dessetup F_Crypt_dessetup;
-struct F_Crypt_dessetup
-{
-	WORD	regs[NREG-1];
-	Crypt_DESstate**	ret;
-	uchar	temps[12];
-	Array*	key;
-	Array*	ivec;
-};
-void Crypt_dhparams(void*);
-typedef struct F_Crypt_dhparams F_Crypt_dhparams;
-struct F_Crypt_dhparams
-{
-	WORD	regs[NREG-1];
-	struct{ IPints_IPint* t0; IPints_IPint* t1; }*	ret;
-	uchar	temps[12];
-	WORD	nbits;
-};
-void Crypt_dsagen(void*);
-typedef struct F_Crypt_dsagen F_Crypt_dsagen;
-struct F_Crypt_dsagen
-{
-	WORD	regs[NREG-1];
-	Crypt_SK**	ret;
-	uchar	temps[12];
-	Crypt_PK*	oldpk;
-};
-void Crypt_eggen(void*);
-typedef struct F_Crypt_eggen F_Crypt_eggen;
-struct F_Crypt_eggen
-{
-	WORD	regs[NREG-1];
-	Crypt_SK**	ret;
-	uchar	temps[12];
-	WORD	nlen;
-	WORD	nrep;
-};
-void Crypt_genSK(void*);
-typedef struct F_Crypt_genSK F_Crypt_genSK;
-struct F_Crypt_genSK
-{
-	WORD	regs[NREG-1];
-	Crypt_SK**	ret;
-	uchar	temps[12];
-	String*	algname;
-	WORD	length;
-};
-void Crypt_genSKfromPK(void*);
-typedef struct F_Crypt_genSKfromPK F_Crypt_genSKfromPK;
-struct F_Crypt_genSKfromPK
-{
-	WORD	regs[NREG-1];
-	Crypt_SK**	ret;
-	uchar	temps[12];
-	Crypt_PK*	pk;
-};
-void Crypt_hmac_md5(void*);
-typedef struct F_Crypt_hmac_md5 F_Crypt_hmac_md5;
-struct F_Crypt_hmac_md5
-{
-	WORD	regs[NREG-1];
-	Crypt_DigestState**	ret;
-	uchar	temps[12];
-	Array*	data;
-	WORD	n;
-	Array*	key;
-	Array*	digest;
-	Crypt_DigestState*	state;
-};
-void Crypt_hmac_sha1(void*);
-typedef struct F_Crypt_hmac_sha1 F_Crypt_hmac_sha1;
-struct F_Crypt_hmac_sha1
-{
-	WORD	regs[NREG-1];
-	Crypt_DigestState**	ret;
-	uchar	temps[12];
-	Array*	data;
-	WORD	n;
-	Array*	key;
-	Array*	digest;
-	Crypt_DigestState*	state;
-};
-void Crypt_ideacbc(void*);
-typedef struct F_Crypt_ideacbc F_Crypt_ideacbc;
-struct F_Crypt_ideacbc
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Crypt_IDEAstate*	state;
-	Array*	buf;
-	WORD	n;
-	WORD	direction;
-};
-void Crypt_ideaecb(void*);
-typedef struct F_Crypt_ideaecb F_Crypt_ideaecb;
-struct F_Crypt_ideaecb
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Crypt_IDEAstate*	state;
-	Array*	buf;
-	WORD	n;
-	WORD	direction;
-};
-void Crypt_ideasetup(void*);
-typedef struct F_Crypt_ideasetup F_Crypt_ideasetup;
-struct F_Crypt_ideasetup
-{
-	WORD	regs[NREG-1];
-	Crypt_IDEAstate**	ret;
-	uchar	temps[12];
-	Array*	key;
-	Array*	ivec;
-};
-void Crypt_md4(void*);
-typedef struct F_Crypt_md4 F_Crypt_md4;
-struct F_Crypt_md4
-{
-	WORD	regs[NREG-1];
-	Crypt_DigestState**	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-	Array*	digest;
-	Crypt_DigestState*	state;
-};
-void Crypt_md5(void*);
-typedef struct F_Crypt_md5 F_Crypt_md5;
-struct F_Crypt_md5
-{
-	WORD	regs[NREG-1];
-	Crypt_DigestState**	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-	Array*	digest;
-	Crypt_DigestState*	state;
-};
-void Crypt_rc4(void*);
-typedef struct F_Crypt_rc4 F_Crypt_rc4;
-struct F_Crypt_rc4
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Crypt_RC4state*	state;
-	Array*	buf;
-	WORD	n;
-};
-void Crypt_rc4back(void*);
-typedef struct F_Crypt_rc4back F_Crypt_rc4back;
-struct F_Crypt_rc4back
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Crypt_RC4state*	state;
-	WORD	n;
-};
-void Crypt_rc4setup(void*);
-typedef struct F_Crypt_rc4setup F_Crypt_rc4setup;
-struct F_Crypt_rc4setup
-{
-	WORD	regs[NREG-1];
-	Crypt_RC4state**	ret;
-	uchar	temps[12];
-	Array*	seed;
-};
-void Crypt_rc4skip(void*);
-typedef struct F_Crypt_rc4skip F_Crypt_rc4skip;
-struct F_Crypt_rc4skip
-{
-	WORD	regs[NREG-1];
-	WORD	noret;
-	uchar	temps[12];
-	Crypt_RC4state*	state;
-	WORD	n;
-};
-void Crypt_rsadecrypt(void*);
-typedef struct F_Crypt_rsadecrypt F_Crypt_rsadecrypt;
-struct F_Crypt_rsadecrypt
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	Crypt_SK*	k;
-	IPints_IPint*	m;
-};
-void Crypt_rsaencrypt(void*);
-typedef struct F_Crypt_rsaencrypt F_Crypt_rsaencrypt;
-struct F_Crypt_rsaencrypt
-{
-	WORD	regs[NREG-1];
-	IPints_IPint**	ret;
-	uchar	temps[12];
-	Crypt_PK*	k;
-	IPints_IPint*	m;
-};
-void Crypt_rsafill(void*);
-typedef struct F_Crypt_rsafill F_Crypt_rsafill;
-struct F_Crypt_rsafill
-{
-	WORD	regs[NREG-1];
-	Crypt_SK**	ret;
-	uchar	temps[12];
-	IPints_IPint*	n;
-	IPints_IPint*	ek;
-	IPints_IPint*	dk;
-	IPints_IPint*	p;
-	IPints_IPint*	q;
-};
-void Crypt_rsagen(void*);
-typedef struct F_Crypt_rsagen F_Crypt_rsagen;
-struct F_Crypt_rsagen
-{
-	WORD	regs[NREG-1];
-	Crypt_SK**	ret;
-	uchar	temps[12];
-	WORD	nlen;
-	WORD	elen;
-	WORD	nrep;
-};
-void Crypt_sha1(void*);
-typedef struct F_Crypt_sha1 F_Crypt_sha1;
-struct F_Crypt_sha1
-{
-	WORD	regs[NREG-1];
-	Crypt_DigestState**	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-	Array*	digest;
-	Crypt_DigestState*	state;
-};
-void Crypt_sha224(void*);
-typedef struct F_Crypt_sha224 F_Crypt_sha224;
-struct F_Crypt_sha224
-{
-	WORD	regs[NREG-1];
-	Crypt_DigestState**	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-	Array*	digest;
-	Crypt_DigestState*	state;
-};
-void Crypt_sha256(void*);
-typedef struct F_Crypt_sha256 F_Crypt_sha256;
-struct F_Crypt_sha256
-{
-	WORD	regs[NREG-1];
-	Crypt_DigestState**	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-	Array*	digest;
-	Crypt_DigestState*	state;
-};
-void Crypt_sha384(void*);
-typedef struct F_Crypt_sha384 F_Crypt_sha384;
-struct F_Crypt_sha384
-{
-	WORD	regs[NREG-1];
-	Crypt_DigestState**	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-	Array*	digest;
-	Crypt_DigestState*	state;
-};
-void Crypt_sha512(void*);
-typedef struct F_Crypt_sha512 F_Crypt_sha512;
-struct F_Crypt_sha512
-{
-	WORD	regs[NREG-1];
-	Crypt_DigestState**	ret;
-	uchar	temps[12];
-	Array*	buf;
-	WORD	n;
-	Array*	digest;
-	Crypt_DigestState*	state;
-};
-void Crypt_sign(void*);
-typedef struct F_Crypt_sign F_Crypt_sign;
-struct F_Crypt_sign
-{
-	WORD	regs[NREG-1];
-	Crypt_PKsig**	ret;
-	uchar	temps[12];
-	Crypt_SK*	sk;
-	IPints_IPint*	m;
-};
-void Crypt_sktopk(void*);
-typedef struct F_Crypt_sktopk F_Crypt_sktopk;
-struct F_Crypt_sktopk
-{
-	WORD	regs[NREG-1];
-	Crypt_PK**	ret;
-	uchar	temps[12];
-	Crypt_SK*	sk;
-};
-void Crypt_verify(void*);
-typedef struct F_Crypt_verify F_Crypt_verify;
-struct F_Crypt_verify
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Crypt_PK*	pk;
-	Crypt_PKsig*	sig;
-	IPints_IPint*	m;
-};
-#define Crypt_PATH "$Crypt"
-#define Crypt_SHA1dlen 20
-#define Crypt_SHA224dlen 28
-#define Crypt_SHA256dlen 32
-#define Crypt_SHA384dlen 48
-#define Crypt_SHA512dlen 64
-#define Crypt_MD5dlen 16
-#define Crypt_MD4dlen 16
-#define Crypt_Encrypt 0
-#define Crypt_Decrypt 1
-#define Crypt_AESbsize 16
-#define Crypt_DESbsize 8
-#define Crypt_IDEAbsize 8
-#define Crypt_BFbsize 8
-void Loader_compile(void*);
-typedef struct F_Loader_compile F_Loader_compile;
-struct F_Loader_compile
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Modlink*	mp;
-	WORD	flag;
-};
-void Loader_dnew(void*);
-typedef struct F_Loader_dnew F_Loader_dnew;
-struct F_Loader_dnew
-{
-	WORD	regs[NREG-1];
-	Loader_Niladt**	ret;
-	uchar	temps[12];
-	WORD	size;
-	Array*	map;
-};
-void Loader_ext(void*);
-typedef struct F_Loader_ext F_Loader_ext;
-struct F_Loader_ext
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Modlink*	mp;
-	WORD	idx;
-	WORD	pc;
-	WORD	tdesc;
-};
-void Loader_ifetch(void*);
-typedef struct F_Loader_ifetch F_Loader_ifetch;
-struct F_Loader_ifetch
-{
-	WORD	regs[NREG-1];
-	Array**	ret;
-	uchar	temps[12];
-	Modlink*	mp;
-};
-void Loader_link(void*);
-typedef struct F_Loader_link F_Loader_link;
-struct F_Loader_link
-{
-	WORD	regs[NREG-1];
-	Array**	ret;
-	uchar	temps[12];
-	Modlink*	mp;
-};
-void Loader_newmod(void*);
-typedef struct F_Loader_newmod F_Loader_newmod;
-struct F_Loader_newmod
-{
-	WORD	regs[NREG-1];
-	Modlink**	ret;
-	uchar	temps[12];
-	String*	name;
-	WORD	ss;
-	WORD	nlink;
-	Array*	inst;
-	Loader_Niladt*	data;
-};
-void Loader_tdesc(void*);
-typedef struct F_Loader_tdesc F_Loader_tdesc;
-struct F_Loader_tdesc
-{
-	WORD	regs[NREG-1];
-	Array**	ret;
-	uchar	temps[12];
-	Modlink*	mp;
-};
-void Loader_tnew(void*);
-typedef struct F_Loader_tnew F_Loader_tnew;
-struct F_Loader_tnew
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Modlink*	mp;
-	WORD	size;
-	Array*	map;
-};
-#define Loader_PATH "$Loader"
-void Face_haschar(void*);
-typedef struct F_Face_haschar F_Face_haschar;
-struct F_Face_haschar
-{
-	WORD	regs[NREG-1];
-	WORD*	ret;
-	uchar	temps[12];
-	Freetype_Face*	face;
-	WORD	c;
-};
-void Face_loadglyph(void*);
-typedef struct F_Face_loadglyph F_Face_loadglyph;
-struct F_Face_loadglyph
-{
-	WORD	regs[NREG-1];
-	Freetype_Glyph**	ret;
-	uchar	temps[12];
-	Freetype_Face*	face;
-	WORD	c;
-};
-void Freetype_newface(void*);
-typedef struct F_Freetype_newface F_Freetype_newface;
-struct F_Freetype_newface
-{
-	WORD	regs[NREG-1];
-	Freetype_Face**	ret;
-	uchar	temps[12];
-	String*	path;
-	WORD	index;
-};
-void Freetype_newmemface(void*);
-typedef struct F_Freetype_newmemface F_Freetype_newmemface;
-struct F_Freetype_newmemface
-{
-	WORD	regs[NREG-1];
-	Freetype_Face**	ret;
-	uchar	temps[12];
-	Array*	data;
-	WORD	index;
-};
-void Face_setcharsize(void*);
-typedef struct F_Face_setcharsize F_Face_setcharsize;
-struct F_Face_setcharsize
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Freetype_Face*	face;
-	WORD	pts;
-	WORD	hdpi;
-	WORD	vdpi;
-};
-void Face_settransform(void*);
-typedef struct F_Face_settransform F_Face_settransform;
-struct F_Face_settransform
-{
-	WORD	regs[NREG-1];
-	String**	ret;
-	uchar	temps[12];
-	Freetype_Face*	face;
-	Freetype_Matrix*	m;
-	Freetype_Vector*	v;
-};
-#define Freetype_PATH "$Freetype"
-#define Freetype_STYLE_ITALIC 1
-#define Freetype_STYLE_BOLD 2
--- a/libinterp/sysmod.h
+++ /dev/null
@@ -1,48 +1,0 @@
-typedef struct{char *name; long sig; void (*fn)(void*); int size; int np; uchar map[16];} Runtab;
-Runtab Sysmodtab[]={
-	"announce",0xb7c4ac0,Sys_announce,40,2,{0x0,0x80,},
-	"aprint",0x77442d46,Sys_aprint,0,0,{0},
-	"bind",0x66326d91,Sys_bind,48,2,{0x0,0xc0,},
-	"byte2char",0x3d6094f9,Sys_byte2char,40,2,{0x0,0x80,},
-	"char2byte",0x2ba5ab41,Sys_char2byte,48,2,{0x0,0x40,},
-	"chdir",0xc6935858,Sys_chdir,40,2,{0x0,0x80,},
-	"create",0x54db77d9,Sys_create,48,2,{0x0,0x80,},
-	"dial",0x29e90174,Sys_dial,40,2,{0x0,0xc0,},
-	"dirread",0x72210d71,Sys_dirread,40,2,{0x0,0x80,},
-	"dup",0x6584767b,Sys_dup,40,0,{0},
-	"export",0x6fc6dc03,Sys_export,48,2,{0x0,0xc0,},
-	"fauth",0x20ccc34b,Sys_fauth,40,2,{0x0,0xc0,},
-	"fd2path",0x749c6042,Sys_fd2path,40,2,{0x0,0x80,},
-	"fildes",0x1478f993,Sys_fildes,40,0,{0},
-	"file2chan",0x9f34d686,Sys_file2chan,40,2,{0x0,0xc0,},
-	"fprint",0xf46486c8,Sys_fprint,0,0,{0},
-	"fstat",0xda4499c2,Sys_fstat,40,2,{0x0,0x80,},
-	"fversion",0xfe9c0a06,Sys_fversion,48,2,{0x0,0xa0,},
-	"fwstat",0x50a6c7e0,Sys_fwstat,104,2,{0x0,0xbc,},
-	"iounit",0x5583b730,Sys_iounit,40,2,{0x0,0x80,},
-	"listen",0xb97416e0,Sys_listen,48,2,{0x0,0xe0,},
-	"millisec",0x616977e8,Sys_millisec,32,0,{0},
-	"mount",0x74c17b3a,Sys_mount,56,2,{0x0,0xe8,},
-	"open",0x8f477f99,Sys_open,40,2,{0x0,0x80,},
-	"pctl",0x5df27fb,Sys_pctl,40,2,{0x0,0x40,},
-	"pipe",0x1f2c52ea,Sys_pipe,40,2,{0x0,0x80,},
-	"pread",0x9d8aac6,Sys_pread,56,2,{0x0,0xc0,},
-	"print",0xac849033,Sys_print,0,0,{0},
-	"pwrite",0x9d8aac6,Sys_pwrite,56,2,{0x0,0xc0,},
-	"read",0x7cfef557,Sys_read,48,2,{0x0,0xc0,},
-	"readn",0x7cfef557,Sys_readn,48,2,{0x0,0xc0,},
-	"remove",0xc6935858,Sys_remove,40,2,{0x0,0x80,},
-	"seek",0xaeccaddb,Sys_seek,56,2,{0x0,0x80,},
-	"sleep",0xe67bf126,Sys_sleep,40,0,{0},
-	"sprint",0x4c0624b6,Sys_sprint,0,0,{0},
-	"stat",0x319328dd,Sys_stat,40,2,{0x0,0x80,},
-	"stream",0xb9e8f9ea,Sys_stream,48,2,{0x0,0xc0,},
-	"tokenize",0x57338f20,Sys_tokenize,40,2,{0x0,0xc0,},
-	"unmount",0x21e337e3,Sys_unmount,40,2,{0x0,0xc0,},
-	"utfbytes",0x1d4a1f4,Sys_utfbytes,40,2,{0x0,0x80,},
-	"werrstr",0xc6935858,Sys_werrstr,40,2,{0x0,0x80,},
-	"write",0x7cfef557,Sys_write,48,2,{0x0,0xc0,},
-	"wstat",0x56b02096,Sys_wstat,104,2,{0x0,0xbc,},
-	0
-};
-#define Sysmodlen	43
--- a/libinterp/tkmod.h
+++ /dev/null
@@ -1,15 +1,0 @@
-typedef struct{char *name; long sig; void (*fn)(void*); int size; int np; uchar map[16];} Runtab;
-Runtab Tkmodtab[]={
-	"cmd",0x1ee9697,Tk_cmd,40,2,{0x0,0xc0,},
-	"color",0xc6935858,Tk_color,40,2,{0x0,0x80,},
-	"getimage",0x80bea378,Tk_getimage,40,2,{0x0,0xc0,},
-	"keyboard",0x8671bae6,Tk_keyboard,40,2,{0x0,0x80,},
-	"namechan",0x35182638,Tk_namechan,48,2,{0x0,0xe0,},
-	"pointer",0x21188625,Tk_pointer,56,2,{0x0,0x80,},
-	"putimage",0x2dc55622,Tk_putimage,48,2,{0x0,0xf0,},
-	"quote",0xb2cd7190,Tk_quote,40,2,{0x0,0x80,},
-	"rect",0x683e6bae,Tk_rect,48,2,{0x0,0xc0,},
-	"toplevel",0x96ab1cc9,Tk_toplevel,40,2,{0x0,0xc0,},
-	0
-};
-#define Tkmodlen	10