(FILECREATED "27-Nov-86 14:59:44" ("compiled on " {ERIS}LIBRARY>TABLEBROWSER.;3) "25-Nov-86 00:46:57" bcompl'd in "Xerox Lisp 25-Nov-86 ..." dated "25-Nov-86 01:18:01") (FILECREATED "20-Oct-85 18:19:57" {DSK2}TABLEBROWSER.;30 62946 changes to: (FNS TB.REPLACE.ITEMS TB.COPYBUTTONEVENTFN) previous date: "15-Oct-85 01:12:34" {DSK2}TABLEBROWSER.;28) TB.MAKE.BROWSER D4 (P 14 TAIL P 11 BROWSER P 10 USERPROPS P 9 WINDOW P 8 USERDATA P 7 COLUMNS P 6 TITLE P 5 AFTERCLOSEFN P 4 CLOSEFN P 3 COPYFN P 2 PRINTFN P 1 FONT P 0 LINESPERITEM I 2 PROPS I 1 WINDOWSPEC I 0 ITEMS) Kk BddOdg7dg0dg)dg"dgdgdgdgdgOO OOhO_AhdN _dg`dO dIO (o _dOHk_dOdOdJdKdL dM"dO_ O@ Ogg Ogg Ogg Ogg Ogg Ogg Ogg Ogg lO OkkjhO(311 DSPLEFTMARGIN 304 WINDOWADDPROP 293 WINDOWADDPROP 282 WINDOWADDPROP 271 PUTWINDOWPROP 260 PUTWINDOWPROP 249 PUTWINDOWPROP 238 PUTWINDOWPROP 227 PUTWINDOWPROP 216 TB.REPLACE.ITEMS 210 PUTWINDOWPROP 151 CREATE.MONITORLOCK 140 \INSUREWINDOW 114 DECODE.WINDOW.ARG 84 SET) (316 TABLEBROWSER 301 TB.RESHAPEFN 298 RESHAPEFN 290 TB.SHRINKFN 287 SHRINKFN 279 TB.CLOSEFN 276 CLOSEFN 268 TB.COPYBUTTONEVENTFN 265 COPYBUTTONEVENTFN 257 TB.BUTTONEVENTFN 254 RIGHTBUTTONFN 246 TB.BUTTONEVENTFN 243 BUTTONEVENTFN 235 TB.REPAINTFN 232 REPAINTFN 224 TB.SCROLLFN 221 SCROLLFN 123 TABLEBROWSERTYPE# 120 TABLEBROWSER 71 LINESPERITEM 65 USERDATA 59 COLUMNS 52 TITLE 45 AFTERCLOSEFN 38 CLOSEFN 31 COPYFN 24 PRINTFN 17 FONT) ( 148 "Table Browser") TB.REPLACE.ITEMS D4 (P 6 REGION P 5 ITEM P 2 ITEM P 1 FIRSTSEL P 0 #ITEMS I 1 NEWITEMS I 0 BROWSER) jAdJHkX@A@H@AjK#L@kH Y*@I@@IH %]jLkؼK[@Hk@j@ h@ @dN @N (155 TB.DISPLAY.LINES 152 TB.LAST.VISIBLE.ITEM# 147 TB.FIRST.VISIBLE.ITEM# 138 DSPCLIPPINGREGION 128 TB.SET.FONT 84 TB.REV.FIND.SELECTED.ITEM 63 TB.FIND.SELECTED.ITEM) (133 TABLEBROWSER 120 TABLEBROWSER 110 TABLEBROWSER 91 TABLEITEM 78 TABLEBROWSER 70 TABLEBROWSER 44 TABLEBROWSER 37 TABLEBROWSER 30 TABLEBROWSER 15 TABLEITEM) () TB.DELETE.ITEM D4 (I 1 ITEM I 0 BROWSER) 7Aj,Akkjh@@k@A@ g (52 TB.SHOW.DELETION) (49 REPLACE 44 TABLEBROWSER 32 TABLEBROWSER 28 TABLEBROWSER 14 TABLEITEM 3 TABLEITEM) () TB.UNDELETE.ITEM D4 (P 0 WINDOW I 1 ITEM I 0 BROWSER) XAjLAjjdh@@m@A '@A @ @AHg @AH@ h(83 TB.PRINT.LINE 71 TB.SHOW.DELETION 51 TB.ITEM.UPDATABLE? 44 TB.ITEM.VISIBLE?) (78 TABLEBROWSER 68 ERASE 57 TABLEBROWSER 32 TABLEBROWSER 28 TABLEBROWSER 14 TABLEITEM 3 TABLEITEM) () TB.INSERT.ITEM D4 (P 9 ITEM P 8 I P 4 N P 3 TAIL P 2 BEFORE# P 1 LASTITEM# P 0 OLDITEMS I 2 BEFOREITEM I 1 NEWITEM I 0 BROWSER) @@2B[AIkZ@HAh @IkAj@@k@\Js@Aj^J^d3 BB ZIB HJ [AKKMNOKJ O_OO_Ok_Lk@\J@Lk؎Aj@J@Jg (246 TB.UPDATE.DISPLAY 139 NTH 133 \ILLEGAL.ARG 125 \ILLEGAL.ARG 39 \NCONC2) (243 INSERT 234 TABLEBROWSER 224 TABLEITEM 216 TABLEBROWSER 205 TABLEBROWSER 175 TABLEITEM 118 TABLEITEM 113 TABLEITEM 96 TABLEITEM 92 TABLEBROWSER 80 TABLEBROWSER 69 TABLEBROWSER 65 TABLEBROWSER 55 TABLEITEM 46 TABLEBROWSER 32 TABLEBROWSER 21 TABLEITEM 9 TABLEBROWSER 3 TABLEBROWSER) () TB.REMOVE.ITEM D4 (P 7 ITEM P 6 I P 4 TAIL P 3 N P 2 ITEM# P 1 LASTITEM# P 0 OLDITEMS I 1 ITEM I 0 BROWSER) @@AAA #Jk@H\HJk d\LJMK@IkAj@@m@[J4@Aj@J I_NMNkԾKk@[J@Aj@J jKk@Jg (213 TB.UPDATE.DISPLAY 195 TB.REV.FIND.SELECTED.ITEM 134 TB.FIND.SELECTED.ITEM 51 NTH 27 \ILLEGAL.ARG) (210 REMOVE 184 TABLEITEM 180 TABLEBROWSER 168 TABLEBROWSER 145 TABLEITEM 122 TABLEITEM 118 TABLEBROWSER 106 TABLEBROWSER 94 TABLEBROWSER 90 TABLEBROWSER 80 TABLEITEM 71 TABLEBROWSER 38 TABLEBROWSER 20 TABLEITEM 15 TABLEITEM 9 TABLEBROWSER 3 TABLEBROWSER) () TB.NORMALIZE.ITEM D4 (P 2 CLIPREGION P 1 YPOS P 0 WINDOW I 1 ITEM I 0 BROWSER) A@ @A hH ZIJJkIHjJJljI h(61 SCROLLBYREPAINTFN 18 DSPCLIPPINGREGION 10 TB.YCOORD.FROM.ITEM) (3 TABLEBROWSER) () TB.REDISPLAY.ITEMS D4 (P 0 REGION I 2 LASTITEM I 1 FIRSTITEM I 0 BROWSER) dh@ !@Ak3 AAA @H dIIB @3 BBB @H dJJ (97 TB.DISPLAY.LINES 87 TB.LAST.VISIBLE.ITEM# 82 \ILLEGAL.ARG 44 TB.FIRST.VISIBLE.ITEM# 39 \ILLEGAL.ARG 9 DSPCLIPPINGREGION) (75 TABLEITEM 70 TABLEITEM 58 TABLEBROWSER 32 TABLEITEM 27 TABLEITEM 4 TABLEBROWSER) () TB.SELECT.ITEM D4 (P 0 N I 1 ITEM I 0 BROWSER) A@Hdi @Ag h(23 TB.SHOW.SELECTION 15 TB.SELECTRANGE) (20 REPLACE 3 TABLEITEM) () TB.NUMBER.OF.ITEMS D4 (P 4 ITEM P 2 $$ITEMLAST P 1 $$ITEM# P 0 $$ITEMS I 1 TYPE I 0 BROWSER) \A @g@Adg;@@k@jIkYJHI \jKkԻK (89 \ILLEGAL.ARG 67 TB.FETCHNTH) (71 TABLEITEM 48 TABLEBROWSER 40 TABLEBROWSER 34 TABLEBROWSER 26 SELECTED 18 TABLEBROWSER 12 DELETED 6 TABLEBROWSER) () TB.NTH.ITEM D4 (I 1 N I 0 BROWSER) kAA@@A h(23 TB.FETCHNTH) (17 TABLEBROWSER 9 TABLEBROWSER) () TB.COLLECT.ITEMS D4 (P 4 ITEM I 1 PREDFN I 0 BROWSER) GAdggggb@AHIA@LlALJ KhZHXK&NIL (26 TABLEBROWSER 19 TB.ITEM.SELECTED? 14 SELECTED 10 TB.ITEM.DELETED? 4 DELETED) () TB.MAP.ITEMS D4 (P 1 ITEM P 0 ITEMS I 2 NULLFN I 1 MAPFN I 0 BROWSER) )@HB@kBd@IlAhNIL (3 TABLEBROWSER) () TB.MAP.DELETED.ITEMS D4 (P 1 ITEM I 2 NULLFN I 1 MAPFN I 0 BROWSER) ;@j)@HhYj@IlAHXB@kBNIL (29 TABLEITEM 13 TABLEBROWSER 3 TABLEBROWSER) () TB.MAP.SELECTED.ITEMS D4 (P 3 ITEM P 2 LASTITEM# P 1 ITEM# P 0 ITEMS I 2 NULLFN I 1 MAPFN I 0 BROWSER) I@@k@JI%IkYJhHI [j@KlAB@kB(41 TB.FETCHNTH) (45 TABLEITEM 17 TABLEBROWSER 9 TABLEBROWSER 3 TABLEBROWSER) () TB.FIND.ITEM D4 (P 6 ITEM P 5 INCREMENT P 4 END P 3 I P 2 ITEMS P 1 HI P 0 LO I 4 BACKWARDSFLG I 3 LAST# I 2 FIRST# I 1 PREDFN I 0 BROWSER)  B=kC#@@CHIcD*IkػHm'@OdOOdkÿHkٻIkAdggggb@JKM[ ^lANKLh(109 TB.FETCHNTH) (97 TB.ITEM.SELECTED? 92 SELECTED 88 TB.ITEM.DELETED? 82 DELETED 43 TABLEBROWSER 16 TABLEBROWSER 10 TABLEBROWSER) () TB.ITEM.SELECTED? D4 (I 1 ITEM I 0 BROWSER) AjhNIL (3 TABLEITEM) () TB.ITEM.DELETED? D4 (I 1 ITEM I 0 BROWSER) AjhNIL (3 TABLEITEM) () TB.CLEAR.LINE D4 (I 3 WIDTH I 2 LEFT I 1 ITEM I 0 BROWSER) 'j@ Bj@A @ C@ g (36 BLTSHADE 15 TB.YCOORD.FROM.ITEM) (32 REPLACE 27 TABLEBROWSER 19 TABLEBROWSER 4 TABLEBROWSER) () TB.USERDATA D4 (P 1 BROWSER P 0 ARGS) &eHjkaIHkIlahNIL (27 TABLEBROWSER 17 TABLEBROWSER) () TB.WINDOW D4 (I 0 BROWSER) @ NIL (3 TABLEBROWSER) () TB.REPAINTFNA0001 D4 (NAME SI*UNWIND-PROTECT* I 0 SI*CLEANUP-FORMS* F 0 BROWSER F 1 REGION) !Pid PdQ PQ P (30 TB.BROWSER.BUSY 25 TB.DISPLAY.LINES 22 TB.LAST.VISIBLE.ITEM# 17 TB.FIRST.VISIBLE.ITEM# 10 OBTAIN.MONITORLOCK) (3 TABLEBROWSER) () TB.REPAINTFN D4 (P 2 SI*RESETFORMS* P 1 LISPXHIST P 0 BROWSER I 1 REGION I 0 WINDOW F 3 LISPXHIST) +@g HjSg  h(39 CLVALUES-LIST 35 SIRESETUNWIND 32 \MVLIST 29 TB.REPAINTFNA0001 6 GETWINDOWUSERPROP) (26 SIRESETUNWIND 13 TABLEBROWSER 3 TABLEBROWSER) () TB.RESHAPEFNA0001 D4 (NAME SI*UNWIND-PROTECT* P 2 ITEM# P 1 REGION P 0 BROWSER I 0 SI*CLEANUP-FORMS* F 3 WINDOW F 4 OLDIMAGEBM F 5 OLDREGION) cSg hS Hid 6Hhi HI ZH JkH S HJHI hHjSTU (96 RESHAPEBYREPAINTFN 77 TB.DISPLAY.LINES 74 TB.LAST.VISIBLE.ITEM# 67 WYOFFSET 53 TB.SET.FONT 48 TB.FIRST.VISIBLE.ITEM# 42 OBTAIN.MONITORLOCK 30 ALLOW.BUTTON.EVENTS 25 OBTAIN.MONITORLOCK 11 DSPCLIPPINGREGION 6 GETWINDOWUSERPROP) (83 TABLEBROWSER 60 TABLEBROWSER 35 TABLEBROWSER 18 TABLEBROWSER 3 TABLEBROWSER) () TB.RESHAPEFN D4 (P 1 SI*RESETFORMS* P 0 LISPXHIST I 2 OLDREGION I 1 OLDIMAGEBM I 0 WINDOW F 2 LISPXHIST) Rg  (19 CLVALUES-LIST 15 SIRESETUNWIND 12 \MVLIST 9 TB.RESHAPEFNA0001) (6 SIRESETUNWIND) () TB.SCROLLFNA0001 D4 (NAME SI*UNWIND-PROTECT* P 0 BROWSER I 0 SI*CLEANUP-FORMS* F 1 WINDOW F 2 DX F 3 DY F 4 CONTINUOUSFLG) %Qg Hid QRST H h(33 TB.BROWSER.BUSY 28 SCROLLBYREPAINTFN 20 OBTAIN.MONITORLOCK 6 GETWINDOWUSERPROP) (13 TABLEBROWSER 3 TABLEBROWSER) () TB.SCROLLFN D4 (P 1 SI*RESETFORMS* P 0 LISPXHIST I 3 CONTINUOUSFLG I 2 DY I 1 DX I 0 WINDOW F 2 LISPXHIST) Rg  (19 CLVALUES-LIST 15 SIRESETUNWIND 12 \MVLIST 9 TB.SCROLLFNA0001) (6 SIRESETUNWIND) () TB.DISPLAY.LINES D4 (P 10 EXTENT P 9 HERE P 8 ITEM P 7 EXTENTCHANGED P 6 PRINTFN P 5 MAXXPOS P 4 ITEMS P 3 WINDOW P 2 ITEM# I 2 LAST# I 1 FIRST# I 0 BROWSER) B@HdIIAdkk@ @@@F JI+LJ _@OKN MhK _Oi_JkZO!@M@_MKgO h(131 PUTWINDOWPROP 79 DSPXPOSITION 72 TB.PRINT.LINE 61 TB.FETCHNTH) (126 EXTENT 113 TABLEBROWSER 105 TABLEBROWSER 46 TABLEBROWSER 40 TABLEBROWSER 34 TABLEBROWSER 28 TABLEBROWSER 4 TABLEBROWSER) () TB.PRINT.LINE D4 (P 0 YPOS I 3 PRINTFN I 2 WINDOW I 1 ITEM I 0 BROWSER) I@A lHB Bj @ABlC@Adjgg Aj@ABg h(68 TB.SHOW.DELETION 49 TB.SHOW.SELECTION 19 POSITION 14 MOVETO 4 TB.YCOORD.FROM.ITEM) (65 REPLACE 53 TABLEITEM 46 ERASE 42 REPLACE 33 TABLEITEM) () TB.FIRST.VISIBLE.ITEM# D4 (L (1 REGION 0 BROWSER)) ,@(AAk@ @ kHHkNIL (28 TABLEBROWSER 19 TABLEBROWSER 3 TABLEBROWSER) () TB.LAST.VISIBLE.ITEM# D4 (L (1 REGION 0 BROWSER)) 2@@(A@ @ k@ HdIINIL (35 TABLEBROWSER 26 TABLEBROWSER 18 TABLEBROWSER 9 TABLEBROWSER 3 TABLEBROWSER) () TB.ITEM.VISIBLE? D4 (P 1 CLIP P 0 YPOS I 1 ITEM I 0 BROWSER) ;@A h@ H@ IhH@ IIkh(14 DSPCLIPPINGREGION 4 TB.YCOORD.FROM.ITEM) (39 TABLEBROWSER 22 TABLEBROWSER 9 TABLEBROWSER) () TB.YCOORD.FROM.ITEM D4 (I 1 ITEM I 0 BROWSER) @(@ Ad3 NIL (19 TABLEITEM 9 TABLEBROWSER 3 TABLEBROWSER) () TB.ITEM#.FROM.YCOORD D4 (L (1 YPOS 0 BROWSER)) -@(A@ @ djk@HdIINIL (31 TABLEBROWSER 18 TABLEBROWSER 11 TABLEBROWSER 3 TABLEBROWSER) () TB.ITEM.FROM.YCOORD D4 (P 0 N I 1 YPOS I 0 BROWSER) 9@(A@ @ @Hdjk@dII (54 TB.FETCHNTH) (42 TABLEBROWSER 28 TABLEBROWSER 18 TABLEBROWSER 11 TABLEBROWSER 3 TABLEBROWSER) () TB.SHOW.DELETION D4 (I 3 OPERATION I 2 WINDOW I 1 ITEM I 0 BROWSER) #nBl@A @ `h`C (32 BLTSHADE 10 TB.YCOORD.FROM.ITEM) (27 TB.DELETEDLINEHEIGHT 21 TB.DELETEDLINEHEIGHT 14 TABLEBROWSER) () TB.SHOW.SELECTION D4 (I 2 OPERATION I 1 ITEM I 0 BROWSER) (`jd@ j@A @ lhdgB (37 BKBITBLT 16 TB.YCOORD.FROM.ITEM) (32 INPUT 20 TABLEBROWSER 8 TABLEBROWSER 2 TB.SELECTION.BITMAP) () TB.UPDATE.DISPLAY D4 (P 10 EXTENTBOTTOM P 9 BOTTOM P 8 CLIP P 7 LAST# P 6 HEIGHT P 5 DELTA P 4 YPOS P 3 FONTHEIGHT P 2 LASTITEM# P 1 EXTENT P 0 WINDOW I 2 TYPE I 1 FROMITEM# I 0 BROWSER)  @ @@@ @A @ u IIBdgjKىgK]LhH __Ok@@(M(IIM_LKO_@A Bdg(HjOKHjOILOgg @Ad TgKHjOHjOKILOgg @ALOK_dk OOjHjOhOOg h(279 SHOULDNT 275 BLTSHADE 249 TB.DISPLAY.LINES 231 BKBITBLT 195 TB.DISPLAY.LINES 188 BKBITBLT 145 TB.ITEM.UPDATABLE? 78 DSPCLIPPINGREGION 69 SHOULDNT 28 TB.YCOORD.FROM.ITEM) (271 REPLACE 227 REPLACE 224 INPUT 200 REMOVE 184 REPLACE 181 INPUT 156 INSERT 104 TABLEBROWSER 100 TABLEBROWSER 62 INSERT 52 REMOVE 32 TABLEBROWSER 21 TABLEBROWSER 15 TABLEBROWSER 9 TABLEBROWSER 3 TABLEBROWSER) () TB.BUTTONEVENTFN D4 (P 0 FN I 0 WINDOW) N@ h@ @ @ @g `dll@ lk@g $X@H (75 TB.DO.UNLESS.BUSY 62 GETWINDOWUSERPROP 47 DOWINDOWCOM 30 TB.DO.UNLESS.BUSY 22 INSIDEP 19 LASTMOUSEY 15 LASTMOUSEX 11 DSPCLIPPINGREGION 3 TOTOPW) (65 TABLEBROWSER 59 TABLEBROWSER 34 LASTMOUSEBUTTONS 27 TB.DO.ITEM.SELECTION) () TB.DO.UNLESS.BUSYA0001 D4 (NAME SI*UNWIND-PROTECT* P 0 BROWSER I 0 SI*CLEANUP-FORMS* F 1 WINDOW F 2 ARGUMENT F 3 FN) -Qg HjHid QHRlSh(31 OBTAIN.MONITORLOCK 6 GETWINDOWUSERPROP) (24 TABLEBROWSER 13 TABLEBROWSER 3 TABLEBROWSER) () TB.DO.UNLESS.BUSY D4 (P 1 SI*RESETFORMS* P 0 LISPXHIST I 2 ARGUMENT I 1 FN I 0 WINDOW F 2 LISPXHIST) Rg  (19 CLVALUES-LIST 15 SIRESETUNWIND 12 \MVLIST 9 TB.DO.UNLESS.BUSYA0001) (6 SIRESETUNWIND) () TB.DO.ITEM.SELECTION D4 (P 22 ITEM P 21 $$ITEMLAST P 20 $$ITEM# P 19 $$ITEMS P 16 LASTY P 15 LASTX P 14 ITEM P 13 OLDLASTMOUSEBUTTONS P 12 CTRLDOWN P 11 OLDSEL# P 10 SEL# P 9 OLDSELECTION P 8 NEWSELECTION P 7 SELECTIONSTATE P 6 LASTVISIBLE# P 5 FIRSTVISIBLE# P 4 LAST# P 3 FIRST# P 2 SELECTIONREGION P 1 ITEMS P 0 BROWSER I 0 WINDOW) @g 0Hjh@ ZH\H[HJ ]HJ ^HYJ@ _@ _ -Ojh_`l_"jO"O" `l_$jMO$BHO _dO`OO0j`dljOj OO_OdkdHHkHO(k_(O*!O&O( _,jO,jOkHHOOlHOdi OdlHOd lHLkOO OdlHOKkO lHOkL oOleHKOk W`ljAg 9OdlHOg jOjHOg lj`dlj(OkHOg MN k_HOg kj9OdlHOg jOjHOg lhjd`dlj]O_Od_Odl.OdOOkOO #LOj_LkO l-OdOOOkO KOOj_Kk Odl=OOOkLOOj_L KdOOkO L jl5OdOKOj_KOk yLOOk kKL j`KL^Ojg _OLLkOO l5KOOKkO l!OLKOkL lKOk l_`_O_V(983 TB.DECONSIDERRANGE 971 TB.DECONSIDERRANGE 950 TB.CONSIDERRANGE 930 TB.CONSIDERRANGE 912 SHIFTDOWNP 905 TB.UNDOSELECTION 888 TB.RECONSIDERRANGE 881 TB.DECONSIDERRANGE 867 TB.RECONSIDERRANGE 831 TB.RECONSIDERRANGE 824 TB.DECONSIDERRANGE 805 TB.RECONSIDERRANGE 766 TB.RECONSIDERRANGE 745 TB.CONSIDERRANGE 718 TB.RECONSIDERRANGE 697 TB.CONSIDERRANGE 623 TB.SHOW.SELECTION 602 TB.UNDOSELECTION 595 TB.SHOW.SELECTION 569 TB.SHOW.SELECTION 555 TB.DECONSIDERRANGE 549 TB.SHOW.SELECTION 513 TB.SHOW.SELECTION 492 TB.UNDOSELECTION 485 TB.SHOW.SELECTION 466 SHIFTDOWNP 446 TB.DESELECTRANGE 422 TB.DESELECTRANGE 405 TB.SELECTRANGE 382 TB.SELECTRANGE 363 TB.DESELECTRANGE 344 TB.SELECTRANGE 276 TB.FETCHNTH 212 \FZEROP 206 TB.UNDOSELECTION 151 TB.ITEM.FROM.YCOORD 124 BLOCK 119 \FZEROP 92 TB.UNDOSELECTION 82 INSIDEP 77 LASTMOUSEY 71 LASTMOUSEX 65 GETMOUSESTATE 54 TB.LAST.VISIBLE.ITEM# 48 TB.FIRST.VISIBLE.ITEM# 28 DSPCLIPPINGREGION 6 GETWINDOWUSERPROP) (992 LASTMOUSEBUTTONS 909 CTRL 664 TABLEITEM 652 TABLEITEM 636 LASTMOUSEBUTTONS 620 REPLACE 608 TABLEITEM 592 ERASE 566 REPLACE 546 ERASE 526 LASTMOUSEBUTTONS 510 ERASE 498 TABLEITEM 482 REPLACE 463 CTRL 453 LASTMOUSEBUTTONS 319 TABLEBROWSER 315 TABLEBROWSER 306 TABLEITEM 293 TABLEITEM 281 TABLEITEM 253 TABLEBROWSER 245 TABLEBROWSER 239 TABLEBROWSER 222 TABLEITEM 184 LASTMOUSEBUTTONS 172 TABLEITEM 162 LASTMOUSEBUTTONS 130 LASTMOUSEBUTTONS 100 LASTMOUSEBUTTONS 59 TABLEBROWSER 40 TABLEBROWSER 33 TABLEBROWSER 16 TABLEBROWSER 3 TABLEBROWSER) () TB.DECONSIDERRANGE D4 (P 1 I I 1 LAST# I 0 FIRST# F 2 LASTVISIBLE# F 3 FIRSTVISIBLE# F 4 BROWSER F 5 ITEMS) +AdRR@dSSIHhTUI g IkY(34 TB.SHOW.SELECTION 28 TB.FETCHNTH) (31 ERASE) () TB.CONSIDERRANGE D4 (P 2 ITEM P 1 I I 2 EVENIFDELETED I 1 LAST# I 0 FIRST# F 3 LASTVISIBLE# F 4 FIRSTVISIBLE# F 5 ITEMS F 6 BROWSER) CAdSS@dTTIHhUI Z0jBJjVJg IkY(58 TB.SHOW.SELECTION 27 TB.FETCHNTH) (55 REPLACE 44 TABLEITEM 31 TABLEITEM) () TB.DESELECTRANGE D4 (P 2 I P 0 ITEMS I 2 LAST# I 1 FIRST# I 0 BROWSER) ABz@BAJIHJ jJkZA@)@@Bk@ @j@k"B@@@dAk kh(119 TB.REV.FIND.SELECTED.ITEM 70 TB.FIND.SELECTED.ITEM 28 TB.FETCHNTH) (111 TABLEBROWSER 106 TABLEBROWSER 97 TABLEBROWSER 84 TABLEBROWSER 76 TABLEBROWSER 65 TABLEBROWSER 57 TABLEBROWSER 48 TABLEBROWSER 31 TABLEITEM 8 TABLEBROWSER) () TB.RECONSIDERRANGE D4 (P 2 ITEM P 1 I I 1 LAST# I 0 FIRST# F 3 LASTVISIBLE# F 4 FIRSTVISIBLE# F 5 BROWSER F 6 ITEMS) :AdSS@dTTIHhUVI Zdjgg IkY(49 TB.SHOW.SELECTION 28 TB.FETCHNTH) (46 ERASE 42 REPLACE 33 TABLEITEM) () TB.SELECTRANGE D4 (P 5 I P 3 ITEM P 2 LASTSEL P 1 FIRSTSEL P 0 ITEMS I 3 EVENIFDELETED I 2 LAST# I 1 FIRST# I 0 BROWSER) y@@@BAML-HM [0jCKjKkMk]IJA@@AIJB@ @Bh(35 TB.FETCHNTH) (114 TABLEBROWSER 105 TABLEBROWSER 92 TABLEBROWSER 83 TABLEBROWSER 62 TABLEITEM 52 TABLEITEM 39 TABLEITEM 15 TABLEBROWSER 9 TABLEBROWSER 3 TABLEBROWSER) () TB.UNDOSELECTION D4 (F 0 FIRSTVISIBLE# F 1 LASTVISIBLE# F 2 SELECTIONSTATE) PQ jc(4 TB.RECONSIDERRANGE) NIL () TB.FIND.SELECTED.ITEM D4 (P 2 ITEMS P 1 I I 2 LAST# I 1 FIRST# I 0 BROWSER) 7B@Ak@IHJI jIiIkYh(31 TB.FETCHNTH) (34 TABLEITEM 16 TABLEBROWSER 6 TABLEBROWSER) () TB.REV.FIND.SELECTED.ITEM D4 (P 2 ITEMS P 1 I I 2 LAST# I 1 FIRST# I 0 BROWSER) 8AkB@@HIJI jIiImԹh(31 TB.FETCHNTH) (34 TABLEITEM 16 TABLEBROWSER 10 TABLEBROWSER) () TB.COPYBUTTONEVENTFN D4 (P 7 LASTY P 6 LASTX P 5 NEWITEM P 4 CURRENTITEM P 3 COPYFN P 2 SELECTIONREGION P 1 ITEMS P 0 BROWSER I 0 WINDOW) @g H[HY@ h@ @ J@ ^@ _ HO ]IM ]@jhLMLHL M\HL l@`ljjkj:l`ljjkj'l@`l jjkjLHL HLlKh`l_jOVO M(214 \FZEROP 188 GETMOUSESTATE 175 TB.SHOW.COPY.SELECTION 109 BLOCK 105 TB.SHOW.COPY.SELECTION 96 TB.SHOW.COPY.SELECTION 72 TB.FETCHNTH 64 TB.ITEM#.FROM.YCOORD 56 INSIDEP 51 LASTMOUSEY 46 LASTMOUSEX 40 TOTOPW 35 DSPCLIPPINGREGION 29 TOTOPW 6 GETWINDOWUSERPROP) (192 LASTMOUSEBUTTONS 153 \LASTKEYSTATE 134 \LASTKEYSTATE 115 \LASTKEYSTATE 76 TABLEITEM 21 TABLEBROWSER 13 TABLEBROWSER 3 TABLEBROWSER) () TB.SHOW.COPY.SELECTION D4 (P 0 WINDOW I 1 ITEM I 0 BROWSER) '@ `Hl@A @ hlg (36 BLTSHADE 19 TB.YCOORD.FROM.ITEM) (32 INVERT 23 TABLEBROWSER 11 GRAYSHADE 3 TABLEBROWSER) () TB.BROWSER.BUSYA0001 D4 (NAME SI*UNWIND-PROTECT* I 0 SI*CLEANUP-FORMS*) n (5 BLOCK) NIL () TB.BROWSER.BUSY D4 (P 0 SI*RESETFORMS* I 0 BROWSER) %g` hhhg  (34 CLVALUES-LIST 30 SIRESETUNWIND 27 \MVLIST 24 TB.BROWSER.BUSYA0001 8 CURSOR) (21 SIRESETUNWIND 5 TB.CROSSCURSOR 2 CURSOR) () TB.CLOSE/SHRINKA0001 D4 (NAME SI*UNWIND-PROTECT* P 1 HOW? P 0 BROWSER I 0 SI*CLEANUP-FORMS* F 2 WINDOW F 3 FLG) Rg Hid jH YHRSlIY HRSi hgDIHddi3 gHhRddi3 gRhSddi3 gShhg g` o` g(143 PRIN1 132 TERPRI 122 TB.PROCESS 48 TB.FINISH.CLOSE 20 OBTAIN.MONITORLOCK 6 GETWINDOWUSERPROP) (146 DON'T 140 PROMPTWINDOW 129 PROMPTWINDOW 125 DON'T 119 TB.UPDATE 107 QUOTE 89 QUOTE 71 QUOTE 53 DON'T 26 TABLEBROWSER 13 TABLEBROWSER 3 TABLEBROWSER) ( 137 "Browser is busy, can't close") TB.CLOSE/SHRINK D4 (P 1 SI*RESETFORMS* P 0 LISPXHIST I 1 FLG I 0 WINDOW F 2 LISPXHIST) Rg  (19 CLVALUES-LIST 15 SIRESETUNWIND 12 \MVLIST 9 TB.CLOSE/SHRINKA0001) (6 SIRESETUNWIND) () TB.CLOSEFN D4 (I 0 WINDOW) @g (6 TB.CLOSE/SHRINK) (3 CLOSE) () TB.FINISH.CLOSEA0001 D4 (NAME SI*UNWIND-PROTECT* I 0 SI*CLEANUP-FORMS* F 0 WINDOW F 1 DONTCLOSE F 2 SI*LOCKED-MONITOR* F 3 CLOSEFLG F 4 BROWSER) @R SdgTP cQ*d gPgg Pgg QP (61 SHRINKW 53 WINDOWDELPROP 42 WINDOWADDPROP 25 CLOSEW 16 TB.FLUSH.WINDOW 3 OBTAIN.MONITORLOCK) (50 TB.SHRINKFN 47 SHRINKFN 39 TB.EXPANDFN 36 EXPANDFN 29 SHRINK 8 CLOSE) () TB.FINISH.CLOSE D4 (P 1 SI*RESETFORMS* P 0 SI*LOCKED-MONITOR* I 3 DONTCLOSE I 2 CLOSEFLG I 1 WINDOW I 0 BROWSER) @g  (24 CLVALUES-LIST 20 SIMONITOR-UNWIND 17 \MVLIST 14 TB.FINISH.CLOSEA0001) (11 SIMONITOR-UNWIND 3 TABLEBROWSER) () TB.FLUSH.WINDOWA0001 D4 (P 4 FN P 3 SI*NLSETQFLAG* P 2 *PROCEED-CASES* P 1 SI*CATCH-RETURN-FROM* P 0 SI*DUMMY-FOR-CATCH* F 5 BROWSER F 6 PROCEED-CASE0522 F 7 *PROCEED-CASES* F 8 WINDOW) Pi@ggggVgjgg gg W U"\ UWlLh (75 \MVLIST 43 MAKE-PROCEED-CASE 39 CLSYMBOL-FUNCTION 30 CLSYMBOL-FUNCTION) (56 TABLEBROWSER 36 SIERRORSET-PRINT-FUNCTION 33 REPORT 27 TRUE 24 TEST 20 SELECTOR 16 TAG 13 ABORT 10 NAME 7 NORMAL) () TB.FLUSH.WINDOW D4 (P 4 PROCEED-CASE0520 P 3 A0524 P 2 PROCEED-CASE0521 P 1 A0523 P 0 PROCEED-CASE0522 I 1 WINDOW I 0 BROWSER) WAgg hhH 1II[LdgJ j:@@h hAg A Ag (84 OPENWP 81 GETWINDOWUSERPROP 72 OPENWP 68 PUTWINDOWPROP 42 CLVALUES-LIST 19 TB.FLUSH.WINDOWA0001 9 WINDOWDELPROP) (78 ICONWINDOW 65 TABLEBROWSER 54 TABLEBROWSER 50 TABLEBROWSER 35 NORMAL 6 TB.CLOSEFN 3 CLOSEFN) () TB.SET.FONT D4 (P 7 FN P 6 ORIGIN P 5 ASCENT P 4 TOTALHEIGHT P 3 HEIGHT P 2 WIDTH P 1 WINDOW P 0 FONTGIVEN I 1 FONT I 0 BROWSER) A@ rI A@dI bdI nI nI @A@A[ @A] @A @hI M^(@K\Ig@jNLIg ZLh_O @JH@_ @IlOh(156 PUTWINDOWPROP 139 GETWINDOWPROP 106 DSPYPOSITION 52 LINELENGTH 45 DSPRIGHTMARGIN 38 DSPFONT 31 FONTCREATE 28 DSPFONT 13 CLEARW) (170 TABLEBROWSER 160 TABLEBROWSER 136 WIDTH 128 TABLEBROWSER 124 EXTENT 115 TABLEBROWSER 101 TABLEBROWSER 93 FONTDESCRIPTOR 89 TABLEBROWSER 80 FONTDESCRIPTOR 76 TABLEBROWSER 67 FONTDESCRIPTOR 63 TABLEBROWSER 56 TABLEBROWSER 20 TABLEBROWSER 4 TABLEBROWSER) () TB.SHRINKFN D4 (I 0 WINDOW) @g (6 TB.CLOSE/SHRINK) (3 SHRINK) () TB.EXPANDFNA0001 D4 (NAME SI*UNWIND-PROTECT* P 2 FN P 1 REGION P 0 FIRSTCHANGEDITEM# I 0 SI*CLEANUP-FORMS* F 4 BROWSER F 5 WINDOW F 6 SI*LOCKED-MONITOR*) WV T1Uggi Hd;jT&ZTUlJTHThU Y dKKTI Thh(75 TB.DISPLAY.LINES 72 TB.LAST.VISIBLE.ITEM# 60 TB.FIRST.VISIBLE.ITEM# 56 DSPCLIPPINGREGION 23 WINDOWADDPROP 3 OBTAIN.MONITORLOCK) (80 TABLEBROWSER 35 TABLEBROWSER 19 TB.SHRINKFN 16 SHRINKFN 7 TABLEBROWSER) () TB.EXPANDFN D4 (P 2 SI*RESETFORMS* P 1 SI*LOCKED-MONITOR* P 0 BROWSER I 0 WINDOW) %@g !Hhg  (34 CLVALUES-LIST 30 SIMONITOR-UNWIND 27 \MVLIST 24 TB.EXPANDFNA0001 6 GETWINDOWUSERPROP) (21 SIMONITOR-UNWIND 13 TABLEBROWSER 3 TABLEBROWSER) () TB.ITEM.UPDATABLE? D4 (P 0 N I 1 ITEM I 0 BROWSER) 0@ %@HHAd3 b @Ah(8 OPENWP) (41 TABLEBROWSER 30 TABLEITEM 14 TABLEBROWSER 3 TABLEBROWSER) () TB.PROCESS D4 (I 3 RESTARTABLE I 2 ALLOWLOGOUT I 1 NAME I 0 FORM) @gAgCggBhg (27 ADD.PROCESS) (23 DON'T 16 BEFOREEXIT 13 NO 7 RESTARTABLE 3 NAME) () TB.FETCHNTH D4 (I 1 N I 0 ITEMS) @A (4 NTH) NIL () (PRETTYCOMPRINT TABLEBROWSERCOMS) (RPAQQ TABLEBROWSERCOMS ((FNS) (COMS (* Entries) (FNS TB.MAKE.BROWSER TB.REPLACE.ITEMS) (FNS TB.DELETE.ITEM TB.UNDELETE.ITEM TB.INSERT.ITEM TB.REMOVE.ITEM TB.NORMALIZE.ITEM TB.REDISPLAY.ITEMS TB.SELECT.ITEM) (FNS TB.NUMBER.OF.ITEMS TB.NTH.ITEM TB.COLLECT.ITEMS TB.MAP.ITEMS TB.MAP.DELETED.ITEMS TB.MAP.SELECTED.ITEMS TB.FIND.ITEM TB.ITEM.SELECTED? TB.ITEM.DELETED?) (FNS TB.CLEAR.LINE TB.USERDATA TB.WINDOW)) (COMS (* Display) (FNS TB.REPAINTFN TB.RESHAPEFN TB.SCROLLFN TB.DISPLAY.LINES TB.PRINT.LINE TB.FIRST.VISIBLE.ITEM# TB.LAST.VISIBLE.ITEM# TB.ITEM.VISIBLE? TB.YCOORD.FROM.ITEM TB.ITEM#.FROM.YCOORD TB.ITEM.FROM.YCOORD TB.SHOW.DELETION TB.SHOW.SELECTION TB.UPDATE.DISPLAY)) (COMS (* Selection) (FNS TB.BUTTONEVENTFN TB.DO.UNLESS.BUSY TB.DO.ITEM.SELECTION TB.DECONSIDERRANGE TB.CONSIDERRANGE TB.DESELECTRANGE TB.RECONSIDERRANGE TB.SELECTRANGE TB.UNDOSELECTION TB.FIND.SELECTED.ITEM TB.REV.FIND.SELECTED.ITEM) (FNS TB.COPYBUTTONEVENTFN TB.SHOW.COPY.SELECTION)) ( COMS (* Misc state change) (FNS TB.BROWSER.BUSY TB.CLOSE/SHRINK TB.CLOSEFN TB.FINISH.CLOSE TB.FLUSH.WINDOW TB.SET.FONT TB.SHRINKFN TB.EXPANDFN TB.ITEM.UPDATABLE?)) (COMS (* Misc) (FNS TB.PROCESS TB.FETCHNTH) (VARS TB.DELETEDLINEHEIGHT) (BITMAPS TB.SELECTION.BITMAP) (CURSORS TB.CROSSCURSOR) (DECLARE: EVAL@COMPILE DONTCOPY (FILES (SOURCE) TABLEBROWSERDECLS) (CONSTANTS * TOCSTATES) (USERMACROS TB) (I.S.OPRS selectedfrom) (MACROS .COPYKEYDOWNP.) (GLOBALVARS TB.CROSSCURSOR TB.SELECTION.BITMAP TB.DELETEDLINEHEIGHT))) (DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) (LAMA TB.USERDATA))) (INITRECORDS TABLEBROWSER TABLEITEM) ( SYSRECORDS TABLEBROWSER TABLEITEM))) (RPAQQ TB.DELETEDLINEHEIGHT 1) (RPAQ TB.SELECTION.BITMAP (READBITMAP)) (8 10 "L@@@" "N@@@" "O@@@" "OH@@" "OL@@" "OH@@" "O@@@" "N@@@" "L@@@" "@@@@") (RPAQ TB.CROSSCURSOR (CURSORCREATE (READBITMAP) 8 8)) (16 16 "L@@C" "N@@G" "G@@N" "CHAL" "ALCH" "@NG@" "@GN@" "@CL@" "@CL@" "@GN@" "@NG@" "ALCH" "CHAL" "G@@N" "N@@G" "L@@C") (/DECLAREDATATYPE (QUOTE TABLEBROWSER) (QUOTE (FLAG FLAG FLAG FLAG FLAG FLAG FLAG FLAG POINTER WORD WORD WORD WORD WORD WORD WORD WORD WORD WORD POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER)) (QUOTE (( TABLEBROWSER 0 (FLAGBITS . 0)) (TABLEBROWSER 0 (FLAGBITS . 16)) (TABLEBROWSER 0 (FLAGBITS . 32)) ( TABLEBROWSER 0 (FLAGBITS . 48)) (TABLEBROWSER 0 (FLAGBITS . 64)) (TABLEBROWSER 0 (FLAGBITS . 80)) ( TABLEBROWSER 0 (FLAGBITS . 96)) (TABLEBROWSER 0 (FLAGBITS . 112)) (TABLEBROWSER 0 POINTER) ( TABLEBROWSER 2 (BITS . 15)) (TABLEBROWSER 3 (BITS . 15)) (TABLEBROWSER 4 (BITS . 15)) (TABLEBROWSER 5 (BITS . 15)) (TABLEBROWSER 6 (BITS . 15)) (TABLEBROWSER 7 (BITS . 15)) (TABLEBROWSER 8 (BITS . 15)) ( TABLEBROWSER 9 (BITS . 15)) (TABLEBROWSER 10 (BITS . 15)) (TABLEBROWSER 11 (BITS . 15)) (TABLEBROWSER 12 POINTER) (TABLEBROWSER 14 POINTER) (TABLEBROWSER 16 POINTER) (TABLEBROWSER 18 POINTER) ( TABLEBROWSER 20 POINTER) (TABLEBROWSER 22 POINTER) (TABLEBROWSER 24 POINTER) (TABLEBROWSER 26 POINTER) (TABLEBROWSER 28 POINTER) (TABLEBROWSER 30 POINTER) (TABLEBROWSER 32 POINTER) (TABLEBROWSER 34 POINTER) (TABLEBROWSER 36 POINTER) (TABLEBROWSER 38 POINTER) (TABLEBROWSER 40 POINTER) (TABLEBROWSER 42 POINTER) (TABLEBROWSER 44 POINTER) (TABLEBROWSER 46 POINTER))) (QUOTE 48)) (/DECLAREDATATYPE (QUOTE TABLEITEM) (QUOTE (FLAG FLAG FLAG FLAG FLAG FLAG FLAG FLAG POINTER WORD WORD) ) (QUOTE ((TABLEITEM 0 (FLAGBITS . 0)) (TABLEITEM 0 (FLAGBITS . 16)) (TABLEITEM 0 (FLAGBITS . 32)) ( TABLEITEM 0 (FLAGBITS . 48)) (TABLEITEM 0 (FLAGBITS . 64)) (TABLEITEM 0 (FLAGBITS . 80)) (TABLEITEM 0 (FLAGBITS . 96)) (TABLEITEM 0 (FLAGBITS . 112)) (TABLEITEM 0 POINTER) (TABLEITEM 2 (BITS . 15)) ( TABLEITEM 3 (BITS . 15)))) (QUOTE 4)) (ADDTOVAR SYSTEMRECLST (DATATYPE TABLEBROWSER ((TBREADY FLAG) (NIL 7 FLAG) (TBITEMS POINTER) (TB#ITEMS WORD) (TB#DELETED WORD) (TB#LINESPERITEM WORD) (TBFIRSTSELECTEDITEM WORD) (TBLASTSELECTEDITEM WORD) ( NIL WORD) (TBMAXXPOS WORD) (TBFONTHEIGHT WORD) (TBFONTASCENT WORD) (TBFONTDESCENT WORD) (TBWINDOW POINTER) (TBLOCK POINTER) (TBUSERDATA POINTER) (TBFONT POINTER) (TBEXTENT POINTER) (TBUPDATEFROMHERE POINTER) (TBCOLUMNS POINTER) (TBPRINTFN POINTER) (TBCOPYFN POINTER) (TBFONTCHANGEFN POINTER) ( TBCLOSEFN POINTER) (TBAFTERCLOSEFN POINTER) (TBTITLEEVENTFN POINTER) (TBAFTEREXPUNGEFN POINTER) ( TBORIGIN POINTER) (NIL POINTER) (NIL POINTER) (NIL POINTER))) (DATATYPE TABLEITEM ((TISELECTED FLAG) ( TIDELETED FLAG) (TIUNDELETABLE FLAG) (TIUNSELECTABLE FLAG) (TIUNCOPYSELECTABLE FLAG) (NIL 3 FLAG) ( TIDATA POINTER) (TI# WORD) (NIL WORD)))) (PUTPROPS TABLEBROWSER COPYRIGHT ("Xerox Corporation" 1985)) NIL