(FILECREATED "19-Nov-84 17:43:39" ("compiled on " {AZTEC}BIRTHDAY84>RERELEASE>TRI-IO.;2) " 8-Jun-84 11:17:20" recompiled exprs: CONVERT.DIALOG.RECORDS.TO.PROPLISTS CONVERT.FRAME.RECORD.TO.PROPLIST CONVERT.GRIDDED.OFFSET CONVERT.GRIDDED.OFFSETS CONVERT.ITEM.GRID.VALUES DELDEF.DIALOG DELDEF.INTERFACE DELDEF.ITEMTYPE DELDEF.PTYPE DUMP.DIALOG DUMP.INTERFACE DUMP.ITEMTYPE DUMP.PTYPE GETDEF.DIALOG GETDEF.INTERFACE GETDEF.ITEMTYPE GETDEF.PTYPE INSERT.ITEM.VERSIONS INSTALL.ITEM.TYPE INSTALL.ITEM.TYPE.DEFAULTS INSTALL.PTYPE ITEMTYPE.FNS MAKE.ITEMTYPES.COMS MAKE.PTYPES.COMS MARKASCHANGEDP PUTDEF.DIALOG PUTDEF.INTERFACE PUTDEF.ITEMTYPE PUTDEF.PTYPE READ.BITMAPS READ.DIALOG READ.INTERFACE READ.INTERFACEQ READ.ITEMTYPE READ.PTYPE REGISTER.ITEM.TYPE REGISTER.PTYPE SET.ITEM.TYPE.DESCRIPTION SET.PTYPE.DESCRIPTION TRILLIUM.ITEMTYPE.FNS UNINSTALL.ITEM.TYPE UNINSTALL.PTYPE UNREGISTER.ITEM.TYPE UNREGISTER.PTYPE UPDATE.INTERFACE UPDATE.ITEM in WORK dated "21-Jun-84 10:50:28") (FILECREATED "19-Nov-84 17:41:08" {AZTEC}BIRTHDAY84>RERELEASE>TRI-IO.;2 27772 changes to: ( FNS INSTALL.ITEM.TYPE MAKE.ITEMTYPES.COMS INSTALL.PTYPE MAKE.PTYPES.COMS UPDATE.INTERFACE UPDATE.ITEM) previous date: "22-Aug-84 11:26:38" {AZTEC}BIRTHDAY84>RERELEASE>TRI-IO.;1) CONVERT.DIALOG.RECORDS.TO.PROPLISTS D1 (I 0 DIALOG) o (6 OBS) NIL ( 3 "Missing DIALOG record definition!") CONVERT.FRAME.RECORD.TO.PROPLIST D1 (I 0 FRAME) o (6 OBS) NIL ( 3 "Missing FRAME record definition!") CONVERT.GRIDDED.OFFSET D1 (P 0 VALUE I 1 PARAM I 0 ITEM) @A X´@A`H`ÚØ h(30Q LISTPUT 7 LISTGET) (23Q TRILLIUM.GRID.DX 17Q TRILLIUM.GRID.X0) () CONVERT.GRIDDED.OFFSETS D1 (P 2 DEFAULT.OFFSET P 1 Y P 0 X I 3 NEW.PARAM I 2 Y.PARAM I 1 X.PARAM I 0 ITEM) N@A @B H¢I´<@C º@A ¿@B ¿@CH™`H`ÚØJI™`I`ÚØJ ¿@ h(112Q COMPRESS.PROPLIST 105Q LISTPUT 42Q LISTPUT 34Q LISTPUT 26Q GET.PARAM.DEFAULT 11Q LISTGET 4 LISTGET) (74Q TRILLIUM.GRID.DY 70Q TRILLIUM.GRID.Y0 56Q TRILLIUM.GRID.DX 52Q TRILLIUM.GRID.X0) () CONVERT.ITEM.GRID.VALUES D1 (P 5 PARAMETER P 4 VALUE P 3 PNAME P 2 GTYPE P 1 DESCRIPTION P 0 ITYPE I 0 ITEM) FP@XdgYdg °,dMg Z²Mg »@K \™@KL ¿µÕh(74Q LISTPUT 71Q COORDS 61Q LISTGET 53Q LISTGET 41Q LISTGET 23Q LISTGET) (50Q NAME 36Q GRID.TYPE 20Q PARAMETERS 12Q TYPE.DESCRIPTION) () DELDEF.DIALOG D1 (I 1 TYPE I 0 NAME) @g (6 SET) (3 NOBIND) () DELDEF.INTERFACE D1 (I 1 TYPE I 0 NAME) @g (6 REMPROP) (3 INTERFACE.DESCRIPTION) () DELDEF.ITEMTYPE D1 (I 1 TYPE I 0 NAME) @ (3 UNREGISTER.ITEM.TYPE) NIL () DELDEF.PTYPE D1 (I 1 TYPE I 0 NAME) @ (3 UNREGISTER.PTYPE) NIL () DUMP.DIALOG D1 (I 0 NAME) @ (3 DUMP.INTERFACE) NIL () DUMP.INTERFACE D1 (P 0 INTERFACE I 0 NAME) C@ Hµgg ¹oI ¿@I hi H g@`h Hhi h(77Q HPRINT 71Q PRINT 53Q INSERT.ITEM.VERSIONS 47Q RESET.INTERFACE 41Q PRIN1 33Q PRIN1 22Q GET.TRILLIUM.PRINTOUT.WINDOW 3 FIND.INTERFACE) (62Q TRILLIUM.INTERFACE.REPRESENTATION.VERSION 56Q READ.INTERFACEQ 17Q NEW.BLOCK 14Q TRILLIUM.WARNINGS) ( 27Q "No definition as an INTERFACES for ") DUMP.ITEMTYPE D1 (P 0 DESCRIPTION I 0 ITYPE) >@gXd²d ¿g@`h ¿Hhi °i ¿@i ¿oi h(72Q PRIN1 61Q PRIN1 53Q TERPRI 45Q HPRINT 36Q PRINT 17Q RESET.ITEM.TYPE.DESCRIPTION) (27Q TRILLIUM.ITEMTYPE.REPRESENTATION.VERSION 23Q READ.ITEMTYPE 6 TYPE.DESCRIPTION) ( 66Q " unprintable as an ITEMTYPE") DUMP.PTYPE D1 (P 0 DESCRIPTION I 0 PTYPE) 9@gXd²g@`h ¿Hhi °i ¿@i ¿oi h(65Q PRIN1 54Q PRIN1 46Q TERPRI 40Q HPRINT 31Q PRINT) (22Q TRILLIUM.PTYPE.REPRESENTATION.VERSION 16Q READ.PTYPE 6 PTYPE.DESCRIPTION) ( 61Q " unprintable as a PTYPE") GETDEF.DIALOG D1 (P 1 BITMAP.NAME P 0 DIALOG I 1 TYPE I 0 NAME) " @-Xddgð‘h´þHdgð´ô H(36Q RESET.INTERFACE) (30Q DIALOG 12Q NOBIND) () GETDEF.INTERFACE D1 (L (1 TYPE 0 NAME)) @gNIL (3 INTERFACE.DESCRIPTION) () GETDEF.ITEMTYPE D1 (L (1 TYPE 0 NAME)) @gNIL (3 TYPE.DESCRIPTION) () GETDEF.PTYPE D1 (L (1 TYPE 0 NAME)) @gNIL (3 PTYPE.DESCRIPTION) () INSERT.ITEM.VERSIONS D1 (P 5 ITYPE.VERSION P 4 ITEM.VERSION P 3 ITEM P 0 FRAME I 0 INTERFACE) ’@g °dH 1Jµ µìh[g µj¼Kgµj½LMñ²Dgg ¹oI ¿KI ¿oI ¿LI ¿oI ¿MI ¿oI ‹MLñ˜KgM ¿JZ°‡(212Q LISTPUT 175Q PRIN1 164Q PRIN1 156Q PRIN1 145Q PRIN1 137Q PRIN1 126Q PRIN1 116Q PRIN1 105Q GET.TRILLIUM.PRINTOUT.WINDOW 50Q LISTGET 21Q DEFINING.ITEMS.OF.FRAME 6 LISTGET) (206Q VERSION 102Q NEW.BLOCK 77Q TRILLIUM.WARNINGS 62Q VERSION 45Q VERSION 3 FRAMES) ( 171Q ")." 152Q ") than loaded itemtype (" 133Q " encountered has a more recent version (" 112Q "Item of type ") INSTALL.ITEM.TYPE D1 (P 13Q SPEC P 12Q NAME P 10Q BITMAPSPEC P 6 FNNAME P 5 ACTION P 4 FNSPEC P 1 OTHER P 0 DESCRIPTION I 0 ITYPE)  @g!Hg Y@`dd @gHg gð Ig 1KµFIg OµQHg ³HgHg h ¿@H @gHg @ h\½L¾M–@MN ¿N ¿K[° _¿`O Oµ%OO ¿O `i O_±ÿ|_¿OOð²)gg ºoJ ¿OJ ¿OO °ÆO_°¢(406Q BITMAPCOPY 373Q PRIN1 364Q PRIN1 353Q GET.TRILLIUM.PRINTOUT.WINDOW 312Q SORT 302Q COPYALL 274Q SET 233Q NOTE.INTERNAL.FN 226Q PUTPROP 204Q COMPILE.ITEM.TYPE 200Q PUTPROP 175Q LISTGET 162Q INSTALL.ITEM.TYPE.DEFAULTS 154Q LISTPUT 147Q LISTGET 132Q LISTGET 112Q LISTGET 73Q LISTGET 64Q PUTPROP 55Q LISTGET 37Q SORT 34Q INTERSECTION 16Q LISTGET) (350Q NEW.BLOCK 345Q TRILLIUM.TRACE 315Q INITIAL.BITMAPS 305Q INITIAL.BITMAPS 250Q INITIAL.BITMAPS 172Q VERSION 166Q VERSION 144Q KIND 140Q CLASSES 127Q CLASSES 107Q BITMAPS 70Q FNS 60Q COMPOSITE 52Q KIND 46Q COMPOSITE? 42Q ITEM.TYPES 27Q ITEM.TYPES 23Q ITEM.TYPES 13Q OTHER 3 TYPE.DESCRIPTION) ( 360Q "Redefining bitmap: ") INSTALL.ITEM.TYPE.DEFAULTS D1 (P 3 PARAMETER I 1 DESCRIPTION I 0 ITYPE) <@g0Ag °$dKg Kg ¸IµHhZH&¹µÝJ (71Q PUTPROP 42Q LISTGET 33Q LISTGET 15Q LISTGET) (37Q DEFAULT 30Q NAME 12Q PARAMETERS 3 DEFAULTS) () INSTALL.PTYPE D1 (P 4 FNNAME P 3 ACTION P 2 FNSPEC P 0 DESCRIPTION I 0 PTYPE) M@g@`dd Hg g 1IµhZ»J¼K–@KL ¿L ¿IY°â(105Q NOTE.INTERNAL.FN 100Q PUTPROP 47Q LISTGET 41Q LISTGET 27Q SORT 24Q INTERSECTION) (44Q FNS 36Q OTHER 32Q PTYPES 17Q PTYPES 13Q PTYPES 3 PTYPE.DESCRIPTION) () ITEMTYPE.FNS D1 (P 3 ITYPE) S0`°?d0Kgg g °d¼MµLh^L&½µîNX–Iµ HZY¿µÂJ YH°ó(114Q LAST 40Q LISTGET 32Q LISTGET) (35Q FNS 27Q OTHER 23Q TYPE.DESCRIPTION 5 ITEM.TYPES) () MAKE.ITEMTYPES.COMS D1 (P 5 FNS P 4 OTHER P 3 DESCRIPTION P 2 ITYPE I 0 ITYPES)  @QHµIºIJg ¼0Lg °d¾OµNh_N&_¿µêO½ggJd²dið³d¥d¡µ gJhhhM´ gMh ¹HX°‰(167Q \NCONC2 43Q LISTGET 30Q LISTGET) (157Q FNS 137Q QUOTE 107Q DUMP.ITEMTYPE 104Q E 40Q FNS 25Q OTHER 20Q TYPE.DESCRIPTION) () MAKE.PTYPES.COMS D1 (P 5 FNS P 4 OTHER P 3 DESCRIPTION P 2 PTYPE I 0 PTYPES)  @QHµIºIJg ¼0Lg °d¾OµNh_N&_¿µêO½ggJd²dið³d¥d¡µ gJhhhM´ gMh ¹HX°‰(167Q \NCONC2 43Q LISTGET 30Q LISTGET) (157Q FNS 137Q QUOTE 107Q DUMP.PTYPE 104Q E 40Q FNS 25Q OTHER 20Q PTYPE.DESCRIPTION) () MARKASCHANGEDP D1 (P 1 FILE I 1 TYPE I 0 NAME) 2@A µ `Hµh¹@AIg ”IµiHX°â(45Q MEMBER 42Q ASSOC 7 MEMBER 4 FILEPKGCHANGES) (35Q FILE 14Q FILELST) () PUTDEF.DIALOG D1 (I 2 DIALOG I 1 TYPE I 0 NAME) @B @ h(10Q REGISTER.DIALOG.NAME 4 SET) NIL () PUTDEF.INTERFACE D1 (I 2 INTERFACE I 1 TYPE I 0 NAME) @gB @ (13Q REGISTER.INTERFACE.NAME 7 PUTPROP) (3 INTERFACE.DESCRIPTION) () PUTDEF.ITEMTYPE D1 (I 2 DESCRIPTION I 1 TYPE I 0 NAME) @B (4 REGISTER.ITEM.TYPE) NIL () PUTDEF.PTYPE D1 (I 2 DESCRIPTION I 1 TYPE I 0 NAME) @B (4 REGISTER.PTYPE) NIL () READ.BITMAPSA0001 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) P 1 I F 2 LOW F 3 HIGH F 4 CHAR) ,gRn'Ø ¿SRIHñ”hhT  ¿IkØY°é(43Q SET 40Q READBITMAP 35Q GENSYM 12Q SETTOPVAL) (2 GENNUM) () READ.BITMAPS D1 (P 1 MACROY P 0 MACROX I 2 HIGH I 1 LOW I 0 CHAR F 2 RESETVARSLST) 3 gd RcXog YgH HcIµh(55Q ERROR! 43Q SETTOPVAL 31Q READ.BITMAPSA0001 11Q GETTOPVAL) (35Q GENNUM 26Q INTERNAL 5 GENNUM) ( 23Q (DUMMY.FOR.ERRORSET)) READ.DIALOG D1 (I 1 VERSION I 0 NAME) @A (4 READ.INTERFACE) NIL () READ.INTERFACE D1 (P 13Q ITEM P 12Q FRAME P 11Q OLD.FORM P 10Q VALUE P 7 FIELD.NAME P 6 GTYPE P 5 DESCRIPTION P 4 ITYPE P 3 FRAME P 2 CLASS P 1 PROFILE P 0 INTERFACE I 1 VERSION I 0 NAME F 14Q FILE) Ÿ Ad²U O Xg °:d Og °%d Ogð²OgOg - ¿µÜhµÇlb° –AkÙjð² O ¸lbƒ¸HA @gH @ @gW g h(233Q ADD.OBJECT.TO.FILE 230Q LISTGET 222Q UNPACKFILENAME 211Q REGISTER.INTERFACE.NAME 205Q PUTDEF.INTERFACE 175Q UPDATE.INTERFACE 167Q HREAD 155Q CONVERT.DIALOG.RECORDS.TO.PROPLISTS 145Q HREAD 107Q LISTPUT 103Q LISTGET 45Q LISTGET 26Q LISTGET 17Q CONVERT.DIALOG.RECORDS.TO.PROPLISTS) (225Q NAME 215Q INTERFACE.NAMES 201Q INTERFACES 100Q \BITMAP.NAME 73Q BITMAP 63Q BITMAP 42Q ITEMS 23Q FRAMES) () READ.INTERFACEQ D1 (I 1 VERSION I 0 NAME) @A (4 READ.INTERFACE) NIL () READ.ITEMTYPE D1 (P 11Q PARAMETER P 4 CHANGED P 3 PTYPE P 2 NEW.PARAMETERS P 1 PARAMETERS P 0 DESCRIPTION I 1 VERSION I 0 NAME F 12Q FILE) æ `XAkð§Adlð²P¿gggHgHgHgHgHgHh¸lblð²dHg ¹0I°Ad½gggMgMgMgMh¾OµNh_N&_¿µÀOºHgJ ¿lb€Alð¢±óHg ³HgHg h ¿Hg ¹h¼I°d Og [µµìlb±°dgð«dgð¥dgð’¿i¿h²ÜOgK ¿OgKdgð•¿g°dgð”¿ggð“g†o h ¿OgOg ¿L³&i\ ¿oi ¿Hg i ¿oi ¿Og i ¿oi ¿±ÿKAlð§o ¿@H @gW g h(742Q ADD.OBJECT.TO.FILE 737Q LISTGET 731Q UNPACKFILENAME 720Q REGISTER.ITEM.TYPE 712Q TROUBLE.WITH.TRILLIUM 672Q PRIN1 661Q PRIN1 655Q LISTGET 644Q PRIN1 633Q PRIN1 627Q LISTGET 617Q PRIN1 606Q TERPRI 575Q LISTPUT 572Q COORDS 567Q LISTGET 551Q LISTPUT 544Q TROUBLE.WITH.TRILLIUM 465Q LISTPUT 402Q LISTGET 357Q LISTGET 347Q LISTPUT 342Q LISTGET 325Q LISTGET 300Q LISTPUT 153Q LISTGET 5 HREAD) (734Q NAME 724Q ITEMTYPE.NAMES 652Q NAME 624Q NAME 564Q DEFAULT 557Q DEFAULT 534Q POSITION2 527Q LOCATION2 523Q REGION 515Q GRIDREGION 507Q POSITION 501Q LOCATION 473Q TYPE 461Q GRID.TYPE 443Q LOCATION2 435Q GRIDREGION 427Q LOCATION 377Q TYPE 354Q PARAMETERS 337Q KIND 333Q CLASSES 322Q CLASSES 274Q PARAMETERS 221Q COMMENT 211Q DEFAULT 203Q TYPE 176Q NAME 173Q PARAMETER 170Q \TYPE 150Q PARAMETERS 103Q OTHER 71Q SUBITEM.SPECS 60Q PARAMETERS 50Q KIND 41Q COMMENT 33Q NAME 30Q ITEM.TYPE 25Q \TYPE) ( 707Q ("Unrecognized version number" VERSION) 666Q " " 640Q ", changed PTYPES in characteristics: " 613Q "In " 541Q ("Unrecognized GRID PType" (CAR PTYPE))) READ.PTYPE D1 (P 1 DESCRIPTION P 0 OLD.DESCRIPTION I 1 VERSION I 0 NAME)  Akð”Y†o ¿@I h(30Q REGISTER.PTYPE 22Q TROUBLE.WITH.TRILLIUM 11Q HREAD) NIL ( 17Q ("Unrecognized version number" VERSION)) REGISTER.ITEM.TYPE D1 (I 1 DESCRIPTION I 0 ITYPE) @A h@ (14Q INSTALL.ITEM.TYPE 4 SET.ITEM.TYPE.DESCRIPTION) (10Q ITEM.TYPE.MENU) () REGISTER.PTYPE D1 (I 1 DESCRIPTION I 0 PTYPE) @A @ (10Q INSTALL.PTYPE 4 SET.PTYPE.DESCRIPTION) NIL () SET.ITEM.TYPE.DESCRIPTION D1 (I 1 DESCRIPTION I 0 ITEM.TYPE) A˜@gA @g (21Q REMPROP 11Q PUTPROP) (16Q TYPE.DESCRIPTION 5 TYPE.DESCRIPTION) () SET.PTYPE.DESCRIPTION D1 (I 1 DESCRIPTION I 0 ITEM.TYPE) A˜@gA @g (21Q REMPROP 11Q PUTPROP) (16Q PTYPE.DESCRIPTION 5 PTYPE.DESCRIPTION) () TRILLIUM.ITEMTYPE.FNS D1 (P 3 ITYPE) S0`°?d0Kgg g °d¼MµLh^L&½µîNX–Iµ HZY¿µÂJ YH°ó(114Q LAST 40Q LISTGET 32Q LISTGET) (35Q FNS 27Q OTHER 23Q TYPE.DESCRIPTION 5 TRILLIUM.ITEM.TYPES) () UNINSTALL.ITEM.TYPE D1 (P 1 FNSPEC P 0 OTHER I 0 ITYPE) >@gg @` Hg Œd@I µò@g @ h(72Q SET.ANALYSISFN 66Q REMPROP 52Q REMPROP 36Q LISTGET 24Q DREMOVE 12Q LISTGET) (63Q COMPOSITE? 33Q FNS 27Q ITEM.TYPES 21Q ITEM.TYPES 7 OTHER 3 TYPE.DESCRIPTION) () UNINSTALL.PTYPE D1 (P 1 FNSPEC P 0 OTHER I 0 PTYPE) 3@gg @` Hg Œd@I µòh(52Q REMPROP 36Q LISTGET 24Q DREMOVE 12Q LISTGET) (33Q FNS 27Q PTYPES 21Q PTYPES 7 OTHER 3 PTYPE.DESCRIPTION) () UNREGISTER.ITEM.TYPE D1 (I 0 ITYPE) @ @ h(7 SET.ITEM.TYPE.DESCRIPTION 3 UNINSTALL.ITEM.TYPE) (13Q ITEM.TYPE.MENU) () UNREGISTER.PTYPE D1 (I 0 PTYPE) @ @ (7 SET.PTYPE.DESCRIPTION 3 UNINSTALL.PTYPE) NIL () UPDATE.INTERFACEA0001 D1 (I 0 OBJECT) @ ´@ h(11Q UPDATE.ITEM 3 ITEMP) NIL () UPDATE.INTERFACE D1 (P 14Q PARAMETER P 13Q ITEM P 12Q FRAME P 11Q FRAME.NAME P 10Q ELEM P 7 PVAL P 6 PNAME P 5 GTYPE P 4 DESCRIPTION P 3 ITYPE P 2 FRAME P 1 CLASS P 0 PROFILE I 1 INTERFACE.VERSION I 0 INTERFACE)  AdlÙjð¢±É¿€@g¿@g Xµ @g ±¡g °%d O¹OŽd_¿@O ZµµðhµÜ@g ¿°ÀI ¿°æd O °Od O[g\g °2d Og ]² Og ¾ON _›ONO ¿µÏhµ²hµ lbAlÙjð¨oA ¿@g §@g ¿@g ª@gg ¿@hg (412Q WALK.INTERFACE 401Q LISTPUT 366Q LISTGET 356Q LISTPUT 346Q LISTGET 336Q SHOULDNT 270Q LISTPUT 265Q COORDS 252Q LISTGET 243Q LISTGET 230Q LISTGET 211Q LISTGET 162Q DEFINING.ITEMS.OF.FRAME 145Q ADD.FRAME.CLASS 136Q LISTPUT 111Q FIND.FRAME 57Q LISTGET 46Q LISTGET 34Q LISTGET) (407Q UPDATE.INTERFACEA0001 376Q WHITE 373Q BACKGROUND.COLOR 363Q BACKGROUND.COLOR 353Q COLOR.MAP 343Q COLOR.MAP 240Q NAME 225Q GRID.TYPE 206Q PARAMETERS 201Q TYPE.DESCRIPTION 133Q PROFILE 54Q FRAME.CLASSES 43Q FRAMES 31Q PROFILE 23Q INTERFACE) ( 332Q "Unrecognized interface version number") UPDATE.ITEM D1 (P 3 UPDATE.FN P 2 ITYPE.VERSION P 1 ITYPE P 0 ITEM.VERSION I 0 ITEM) wP@g X¡j¸@YgZ¡jºHJñ²Rgg ¼oL ¿IL ¿oL ¿HL ¿oL ¿JL ¿oL hHkظIH[•@kK¿JHñ³îh(135Q PRIN1 124Q PRIN1 116Q PRIN1 105Q PRIN1 77Q PRIN1 66Q PRIN1 60Q PRIN1 47Q GET.TRILLIUM.PRINTOUT.WINDOW 11Q LISTGET) (44Q NEW.BLOCK 41Q TRILLIUM.WARNINGS 24Q VERSION 6 VERSION) ( 131Q ")." 112Q ") than loaded itemtype (" 73Q " encountered has a more recent version (" 54Q "Item of type ") (PRETTYCOMPRINT TRI-IOCOMS) (RPAQQ TRI-IOCOMS ((VARS TRILLIUM.INTERFACE.REPRESENTATION.VERSION TRILLIUM.ITEMTYPE.REPRESENTATION.VERSION TRILLIUM.PTYPE.REPRESENTATION.VERSION) (FNS CONVERT.DIALOG.RECORDS.TO.PROPLISTS CONVERT.FRAME.RECORD.TO.PROPLIST CONVERT.GRIDDED.OFFSET CONVERT.GRIDDED.OFFSETS CONVERT.ITEM.GRID.VALUES DELDEF.DIALOG DELDEF.INTERFACE DELDEF.ITEMTYPE DELDEF.PTYPE DUMP.DIALOG DUMP.INTERFACE DUMP.ITEMTYPE DUMP.PTYPE GETDEF.DIALOG GETDEF.INTERFACE GETDEF.ITEMTYPE GETDEF.PTYPE INSERT.ITEM.VERSIONS INSTALL.ITEM.TYPE INSTALL.ITEM.TYPE.DEFAULTS INSTALL.PTYPE ITEMTYPE.FNS MAKE.ITEMTYPES.COMS MAKE.PTYPES.COMS MARKASCHANGEDP PUTDEF.DIALOG PUTDEF.INTERFACE PUTDEF.ITEMTYPE PUTDEF.PTYPE READ.BITMAPS READ.DIALOG READ.INTERFACE READ.INTERFACEQ READ.ITEMTYPE READ.PTYPE REGISTER.ITEM.TYPE REGISTER.PTYPE SET.ITEM.TYPE.DESCRIPTION SET.PTYPE.DESCRIPTION TRILLIUM.ITEMTYPE.FNS UNINSTALL.ITEM.TYPE UNINSTALL.PTYPE UNREGISTER.ITEM.TYPE UNREGISTER.PTYPE UPDATE.INTERFACE UPDATE.ITEM) (MACROS CONVERT.GRIDDED.OFFSETSQ) (FILEPKGCOMS DIALOGS INTERFACES ITEMTYPES PTYPES) (DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS ( NLAMA) (NLAML READ.PTYPE READ.ITEMTYPE READ.INTERFACEQ READ.DIALOG MAKE.PTYPES.COMS MAKE.ITEMTYPES.COMS) (LAMA))))) (RPAQQ TRILLIUM.INTERFACE.REPRESENTATION.VERSION 3) (RPAQQ TRILLIUM.ITEMTYPE.REPRESENTATION.VERSION 5) (RPAQQ TRILLIUM.PTYPE.REPRESENTATION.VERSION 1) (PUTPROPS CONVERT.GRIDDED.OFFSETSQ MACRO ((item x.param y.param new.param) (CONVERT.GRIDDED.OFFSETS item (QUOTE x.param) (QUOTE y.param) (QUOTE new.param)))) (PUTDEF (QUOTE DIALOGS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (E (MAPC (QUOTE X) (FUNCTION DUMP.DIALOG))))) (TYPE DESCRIPTION "TRILLIUM dialogs" GETDEF GETDEF.DIALOG PUTDEF PUTDEF.DIALOG DELDEF DELDEF.DIALOG)))) (PUTDEF (QUOTE INTERFACES) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (E (MAPC (QUOTE X) (FUNCTION DUMP.INTERFACE))))) (TYPE DESCRIPTION "Trillium interfaces" GETDEF GETDEF.INTERFACE PUTDEF PUTDEF.INTERFACE DELDEF DELDEF.INTERFACE)))) (PUTDEF (QUOTE ITEMTYPES) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (COMS * (MAKE.ITEMTYPES.COMS X)))) (TYPE DESCRIPTION "TRILLIUM item types" GETDEF GETDEF.ITEMTYPE PUTDEF PUTDEF.ITEMTYPE DELDEF DELDEF.ITEMTYPE)))) (PUTDEF (QUOTE PTYPES) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (COMS * (MAKE.PTYPES.COMS X)))) (TYPE DESCRIPTION "TRILLIUM parameter types" GETDEF GETDEF.PTYPE PUTDEF PUTDEF.PTYPE DELDEF DELDEF.PTYPE))) ) (PUTPROPS TRI-IO COPYRIGHT ("Xerox Corporation" 1984)) NIL