(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED " 5-Mar-87 19:34:53" ("compiled on " {ERIS}LIBRARY>FILEBROWSER.;56) "26-Feb-87 21:01:45" bcompl'd in "Xerox Lisp 26-Feb-87 ..." dated "26-Feb-87 21:33:01") (FILECREATED " 5-Mar-87 19:29:51" {ERIS}LIBRARY>FILEBROWSER.;56 181587 changes to%: (FNS FB.HARDCOPY.DIRECTORY FILEBROWSER FB.HARDCOPY.MAXWIDTH FB.COMPILECOMMAND FB.PRINTFN FB.GREATEST.PREFIX ) (FILES TABLEBROWSER) (VARS FB.INFOFIELDS FILEBROWSERCOMS FB.MENU.ITEMS) (RECORDS INFOFIELD) previous date%: "13-Jan-87 23:09:45" {ERIS}LIBRARY>FILEBROWSER.;55) FB :D4 (L (0 PATTERN)) @ HH h(13 FILEBROWSER 3 NLAMBDA.ARGS) NIL () FILEBROWSER :D4 (L (2 OPTIONS 1 ATTRIBUTES 0 FILESPEC)) Uh` `Bd+d%dl Bd3ihB_hbBg'_`d`Bg'`_dOdi dkdgBg'o_dOdg dgjdndh_dO _ `` Hi \OM`lKLIl _OOM^OLKIO _`O Og`dOd`la` l_dOdgBg'_dOkjpZ JhOgggggJggggh ONI` OHNLO O Ogg JO``  O Ogg Ogg Aj`bJA,Ogg gJO@ddi3 g@hhgggg Od_` `Olc`hO ݰ(588 MISSPELLED? 566 FB.\ItemWithTag 553 ADD.PROCESS 507 PUTWINDOWPROP 483 PUTWINDOWPROP 472 PUTWINDOWPROP 461 TOTOPW 454 FB.MAKERIGIDWINDOW 451 GETPROMPTWINDOW 439 ATTACHWINDOW 428 MENUWINDOW 423 FB.MAKECOUNTERWINDOW 412 FB.MAKEHEADINGWINDOW 400 TB.MAKE.BROWSER 353 PUTWINDOWPROP 311 CHARWIDTH 280 DSPFONT 269 CREATEW 229 GETREGION 205 HEIGHTIFWINDOW 194 HEIGHTIFWINDOW 176 CHECK/MENU/IMAGE 34 EQLENGTH 6 DSPFONT) (581 DIRCOMMANDS 571 DIRCOMMANDS 563 FB.INFOMENUITEMS 549 DON'T 546 BEFOREEXIT 543 FB-Update 540 NAME 528 QUOTE 510 FB.STARTUP 504 FB.ICONFN 501 ICONFN 489 FB.DEFAULT.INFO 480 FB.HARDCOPY.DIRECTORY 477 HARDCOPYFN 469 FB.SCROLLFN 466 SCROLLFN 448 FB.PROMPTFONT 445 FB.PROMPTLINES 436 TOP 433 RIGHT 409 FB.BROWSERFONT 386 FB.AFTERCLOSEFN 383 AFTERCLOSEFN 380 FB.CLOSEFN 377 CLOSEFN 373 USERDATA 370 FB.COPYFN 367 COPYFN 364 FB.PRINTFN 361 PRINTFN 334 TITLE 327 FB.NAMES.DECREASING.VERSION 308 FB.BROWSERFONT 300 FB.BROWSERFONT 289 |FILEBROWSERTYPE#| 286 FILEBROWSER 275 FB.BROWSERFONT 214 FB.DEFAULT.NAME.WIDTH 199 FONTDESCRIPTOR 188 FONTDESCRIPTOR 185 FB.PROMPTFONT 182 FB.PROMPTLINES 148 DEFAULTMENUHELDFN 141 CLRPROMPT 121 MENU.TITLE 114 FB.MENU.WHENSELECTEDFN 91 FB.MENU.ITEMS 85 MENU.ITEMS 78 FB.MENUFONT 73 |MENUTYPE#| 66 REGION 12 FONTDESCRIPTOR 9 FB.BROWSERFONT 3 WindowTitleDisplayStream) ( 128 "FB Commands") FB.PRINTFN :D4 (L (2 WINDOW 1 ITEM 0 TBROWSER)) @ AIdjoB IB I _jgB oOB H^H \I]`_h__LO_MO'_hB N_OO3 OKB@AKOK OB ; _NOOHZ Kl0J _dOO_OoB OOB NOԾOa(226 PRIN1 216 PRIN1 188 CHARWIDTH 180 STRINGWIDTH 162 MKSTRING 157 DSPXPOSITION 150 TB.CLEAR.LINE 119 DSPXPOSITION 61 PRINTNUM 50 PRIN1 34 PRIN1 26 PRIN1 3 TB.USERDATA) (79 FB.INFOFIELDS 46 ;) ( 212 " " 55 (FIX 1) 22 " ") FB.COPYFN :D4 (L (1 ITEM 0 TBROWSER)) A (7 BKSYSBUF) NIL () FB.STARTUPA0001 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 BROWSER F 1 FILESPEC F 2 COMMANDMENU) "PgRR QPQ cP P (31 FB.NEWPATTERNCOMMAND 26 FB.UPDATEBROWSERITEMS 18 DIRECTORY.FILL.PATTERN 11 FB.MAKE.BROWSER.BUSY) (3 Recompute) () FB.STARTUP :D4 (P 1 SI::*RESETFORMS* P 0 LISPXHIST I 2 FILESPEC I 1 COMMANDMENU I 0 BROWSER F 2 LISPXHIST) Rg  (19 CL:VALUES-LIST 15 SI::RESETUNWIND 12 \MVLIST 9 FB.STARTUPA0001) (6 SI::RESETUNWIND) () FB.MAKERIGIDWINDOW :D4 (L (0 WINDOW)) &@ @gjH @g`H @(34 PUTWINDOWPROP 22 PUTWINDOWPROP 3 \INSUREWINDOW) (29 SCREENWIDTH 26 MAXSIZE 16 MINSIZE) () FB.MENU.WHENSELECTEDFN :D4 (L (2 Key 1 Menu 0 Item)) Vg@ddi3 g@hAddi3 gAhBddi3 gBhhgg@ gg (83 ADD.PROCESS 73 PACK*) (79 DON'T 76 BEFOREEXIT 68 FB- 65 NAME 53 QUOTE 34 QUOTE 16 QUOTE 2 FB.COMMANDSELECTEDFN) () FB.COMMANDSELECTEDFNA0001 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 8 ITEM F 9 MENU F 10 KEY) WAW g Yg WW Wh[4hcJWW CHJ N N M"JWHWOlMWL LiK_MI (126 FLASHWINDOW 101 FB.SUBITEMP 75 CLEARW 70 OPENWP 55 FB.MAKE.BROWSER.BUSY 32 MEMBER 22 GETWINDOWUSERPROP 15 GETWINDOWUSERPROP 9 WFROMMENU) (19 FILEBROWSER 12 MAINWINDOW) () FB.COMMANDSELECTEDFN :D4 (P 1 SI::*RESETFORMS* P 0 LISPXHIST I 2 KEY I 1 MENU I 0 ITEM F 2 LISPXHIST) Rg  (19 CL:VALUES-LIST 15 SI::RESETUNWIND 12 \MVLIST 9 FB.COMMANDSELECTEDFNA0001) (6 SI::RESETUNWIND) () FB.SUBITEMP :D4 (L (1 ITEM 0 SUBITEM)) 4A!Hdg@H HYh@J JiI(41 FB.SUBITEMP 24 MEMBER) (16 SUBITEMS) () FB.MAKE.BROWSER.BUSYA0001 :D4 (L (1 MENU 0 ITEM)) @A` (7 SHADEITEM) (4 FB.ITEMUNSELECTEDSHADE) () FB.MAKE.BROWSER.BUSY :D4 (L (3 DONTWAIT 2 MENU 1 ITEM 0 BROWSER) F 0 SI::*RESETFORMS*) (@Ci gABhhdPcAB` i(36 SHADEITEM 9 OBTAIN.MONITORLOCK) (33 FB.ITEMSELECTEDSHADE 14 FB.MAKE.BROWSER.BUSYA0001) () FB.SELECTEDFILES :D4 (L (1 NOERRORFLG 0 BROWSER)) @g A@io h(21 FB.PROMPTWPRINT 8 TB.COLLECT.ITEMS) (5 SELECTED) ( 18 "No files are selected") FB.TABLEBROWSER :D4 (L (0 FILEBROWSER)) @NIL NIL () FB.FETCHFILENAME :D4 (L (0 ITEM)) @NIL NIL () FB.DELETECOMMAND :D4 (L (0 BROWSER)) @g @ (12 FB.UPDATE.COUNTERS 8 TB.MAP.SELECTED.ITEMS) (5 FB.DELETE.FILE) () FB.DELVERCOMMANDA0001 :D4 (L (1 ITEM 0 BROWSER)) A0jhh A jhNIL NIL () FB.DELVERCOMMAND :D4 (L (0 FBROWSER)) uoo@i 1Hda X3 @ioHo @Yg [I@dgKgKg Kg H Z@g @ioJo (114 FB.PROMPTWPRINT 99 FB.UPDATE.COUNTERS 91 FB.DELVER.FILES 87 SORT 79 FB.SORT.VERSIONS 52 TB.COLLECT.ITEMS 41 FB.PROMPTWPRINT 22 MKATOM 12 FB.PROMPTFORINPUT) (96 DELETED 84 FB.NAMES.DECREASING.VERSION 76 FB.DECREASING.VERSION 70 FB.NAMES.INCREASING.VERSION 61 FB.NAMES.DECREASING.VERSION 49 FB.DELVERCOMMANDA0001) ( 110 " files marked for deletion." 105 "Done, " 37 " not an integer." 32 "?? " 7 "1" 3 "Number of versions to keep: ") FB.IS.NOT.SUBDIRECTORY.ITEM :D4 (L (1 ITEM 0 BROWSER)) A0jhhNIL NIL () FB.DELVER.FILES :D4 (L (2 NVERSIONS 1 FILES 0 TBROWSER)) 5Ajd#HI[dL JkZB@K IkԹkHX(37 FB.DELETE.FILE 22 STRING-EQUAL) NIL () FB.DELETE.FILE :D4 (L (1 ITEM 0 TBROWSER)) .Aj&@ @A HdkA YHd"I"i(19 TB.DELETE.ITEM 11 TB.USERDATA) NIL () FB.UNDELETE.FILE :D4 (L (1 ITEM 0 TBROWSER)) 5Aj,@ !@A HdmA YHd"jIZ"Jh(19 TB.UNDELETE.ITEM 11 TB.USERDATA) NIL () FB.UNDELETECOMMAND :D4 (L (0 BROWSER)) @g @ (12 FB.UPDATE.COUNTERS 8 TB.MAP.SELECTED.ITEMS) (5 FB.UNDELETE.FILE) () FB.UNDELETEALLCOMMAND :D4 (L (0 BROWSER)) @g @ (12 FB.UPDATE.COUNTERS 8 TB.MAP.ITEMS) (5 FB.UNDELETE.FILE) () FB.HARDCOPYCOMMAND :D4 (L (4 OPTION 3 MENU 2 ITEM 1 KEY 0 BROWSER)) D@ H:Ddg@H hgYgIhiHd I h(59 LISTFILES1 55 FB.FETCHFILENAME 34 GetPrinterName 22 FB.HARDCOPY.TOFILE 3 FB.SELECTEDFILES) (40 SERVER 29 PRINTER 14 FILE) () FB.HARDCOPY.TOFILE :D4 (L (1 FILES 0 BROWSER) F 18 PRINTFILETYPES) AooAggg ghggA @i  HAH Y_h@oK hgAgO \-OOkLk oOLk o_/o[gO o[Odg _O{Hg _W$h__hZ,o Zh_OgOOOAJg BOh _ g_OO'_"a@ioA%MNOg O ghgIgO H_ g OO lO"_ @o @O $_ @ioOooOoJ O_a(452 FB.PROMPTWPRINT 416 FB.MAYBE.INSERT.FILE 409 FB.PROMPTWPRINT 385 FB.PROMPTWPRINT 374 PACKFILENAME.STRING 355 CONCAT 350 FILENAMEFIELD 313 PRINTFILETYPE 308 FB.FETCHFILENAME 294 PRINTFILEPROP 254 MENU 251 MakeMenuOfImageTypes 226 U-CASE 223 FILENAMEFIELD 206 MKATOM 203 U-CASE 181 STRPOS 153 SUBSTRING 136 SUBSTRING 118 STRPOS 99 FB.PROMPTWPRINT 79 UNPACKFILENAME.STRING 59 FB.PROMPTFORINPUT 54 PACKFILENAME.STRING 50 FB.FETCHFILENAME 42 PRINTERTYPE 30 PACKFILENAME.STRING 27 PRINTERTYPE) (381 |...| 368 BODY 364 BODY 360 VERSION 347 NAME 318 TEXT 291 CONVERSION 268 EXTENSION 220 EXTENSION 196 EXTENSION 174 * 111 * 105 NAME 45 BODY 39 EXTENSION 35 VERSION 24 EXTENSION 21 * 18 NAME) ( 447 " file to format " 441 "Can't convert a " 437 " -- " 431 "Failed to hardcopy " 406 "done." 336 "Writing " 248 "File type?" 186 "Only name portion can contain *" 168 "Name must have * for multiple hardcopy files" 159 "" 142 "" 95 "Bad pattern -- " 11 "Hardcopy file name: " 6 "Hardcopy file name pattern: ") FB.LOADCOMMAND :D4 (L (4 LOADOP 3 MENU 2 ITEM 1 KEY 0 BROWSER)) N@ HDgDgYddi3 gIhHddi3 gHhhgggg (75 ADD.PROCESS 3 FB.SELECTEDFILES) (71 DON'T 68 BEFOREEXIT 65 LOAD 62 NAME 51 QUOTE 32 QUOTE 18 LOAD 12 FB.OPERATE.ON.FILES) () FB.EDITCOMMANDA0001 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 4 SI::*RESETFORMS* F 5 FILE) }hU Ug "Id gIhhdTcIJ J> 8gIhhdTcggghgIg hh IK KIHhdo (122 OPENTEXTSTREAM 107 COPYBYTES 101 OPENSTREAM 92 GETFILEINFO 54 RANDACCESSP 47 COPY.TEXT.TO.IMAGE 41 OPENTEXTSTREAM 19 LISPSOURCEFILEP 11 OPENSTREAM 4 CREATEW) (89 TYPE 85 TYPE 81 NEW 78 BOTH 75 {NODIRCORE} 59 CLOSEF 25 CLOSEF 8 INPUT) ( 118 (READONLY T)) FB.EDITCOMMAND :D4 (L (4 OPTION 3 MENU 2 ITEM 1 KEY 0 BROWSER) P 2 SI::*RESETFORMS* P 1 LISPXHIST P 0 FILE F 3 LISPXHIST) @ dH X@ rD`dg*g @ABC SSg  =dgH ,dgH@ H H@ H H kDzh(130 MKATOM 125 TEDIT 122 MKATOM 117 FB.EDITLISPFILE 111 LISPSOURCEFILEP 103 FB.EDITLISPFILE 89 TEDIT 86 MKATOM 72 CL:VALUES-LIST 68 SI::RESETUNWIND 65 \MVLIST 62 FB.EDITCOMMANDA0001 50 FB.FASTSEECOMMAND 42 \DEFINEDP 20 FB.VIEW.SUBDIRECTORY? 15 FB.FETCHFILENAME 3 FB.SELECTEDFILES) (95 LISP 79 TEDIT 59 SI::RESETUNWIND 39 OPENTEXTSTREAM 32 READONLY 28 FB.DEFAULT.EDITOR) () FB.VIEW.SUBDIRECTORY? :D4 (L (1 BROWSER 0 FILENAME)) N@ !Hg'YI j8Hg'ZJ j)@ #gggggggH A i(74 FILEBROWSER 68 PACKFILENAME.STRING 40 DIRECTORYNAMEP 32 NCHARS 17 NCHARS 3 UNPACKFILENAME.STRING) (63 BODY 60 * 57 EXTENSION 54 * 51 NAME 48 * 45 VERSION 25 EXTENSION 10 NAME) () FB.EDITLISPFILE :D4 (L (1 BROWSER 0 FILE)) ^@ Xg @ 1o@o@o hA *gg@ho ggHho h(90 LISPXEVAL 70 LISPXEVAL 49 MOUSECONFIRM 42 CONCAT 22 STRING-EQUAL 16 GETPROP 9 U-CASE 6 ROOTFILENAME) (77 QUOTE 74 EDITDEF 57 QUOTE 54 LOAD 13 FILEDATES) ( 85 ((QUOTE FILES)) 65 ((QUOTE PROP)) 38 " 'PROP)?" 33 " is not loaded or is not current. (LOAD '" 28 "The file ") FB.COMPILECOMMAND :D4 (L (4 COMPILEOP 3 MENU 2 ITEM 1 KEY 0 BROWSER) F 2 *DEFAULT-CLEANUP-COMPILER*) L@ HBgDRYddi3 gIhHddi3 gHhhgggg (73 ADD.PROCESS 3 FB.SELECTEDFILES) (69 DON'T 66 BEFOREEXIT 63 COMPILE 60 NAME 49 QUOTE 30 QUOTE 12 FB.OPERATE.ON.FILES) () FB.OPERATE.ON.FILES :D4 (L (1 FILELIST 0 FN) F 6 \TERM.OFD) w0@dgg@gbg0AJd@J Yddi3 gIhHdddi3 gHhhLKh]\Kh\M V (116 CLOSEW 112 LISPXEVAL 42 MKATOM 39 FB.FETCHFILENAME) (78 QUOTE 56 QUOTE 25 PROGN 19 LOAD 12 SYSLOAD 7 PROP) () FB.COPYCOMMAND :D4 (L (0 BROWSER)) @gg (9 FB.COPY/RENAME.COMMAND) (6 COPYFILE 3 Copy) () FB.RENAMECOMMAND :D4 (L (0 BROWSER)) @gg (9 FB.COPY/RENAME.COMMAND) (6 RENAMEFILE 3 Rename) () FB.COPY/RENAME.COMMAND :D4 (L (2 MOVEFN 1 CMD 0 FBROWSER)) 3@ !Hh'Hd@HAB  Y@A Z @HIJAB (48 FB.COPY/RENAME.ONE 34 FB.GET.NEW.FILE.SPEC 28 FB.FETCHFILENAME 23 FB.COPY/RENAME.MANY 3 FB.SELECTEDFILES) NIL () FB.COPY/RENAME.ONE :D4 (L (5 MOVEFN 4 CMD 3 NEWNAME 2 OLDNAME 1 ITEM 0 FBROWSER))  BClEX[@iBDdgogoH Dg@@A Ajgg@HAD IgYI@I @ioD oBoC (124 FB.PROMPTWPRINT 110 L-CASE 99 FB.UPDATE.COUNTERS 83 FB.MAYBE.INSERT.FILE 60 FB.REMOVE.FILE 45 FB.PROMPTWPRINT 40 SHOULDNT) (89 TOTAL 75 TOTAL 71 BOTH 49 Rename 30 Rename 19 Copy) ( 119 " to " 114 " " 106 "Could not " 36 " renamed to " 26 " copied to ") FB.COPY/RENAME.MANY :D4 (L (3 MOVEFN 2 CMD 1 FILELIST 0 FBROWSER))   BoA o @0i @i XoH @o kH Zdg'Jdg'Jg' Jg'Jg'Jg'@o 1@gJgi 0AAh]Fh@o oAh__?K@k@k [o o@id \d-KN NiM_KO Oo Ldo K kػio Lo h@dg"@o hgAg bAg H A:d_@Od YgHgLIKO k ghgI BC h(415 FB.COPY/RENAME.ONE 409 PACKFILENAME.STRING 397 SUBSTRING 373 FB.FETCHFILENAME 357 \ADD.CONNECTED.DIR 352 SORT 342 FB.SORT.VERSIONS 328 FB.PROMPTWPRINT 306 STRING-EQUAL 297 STRING-EQUAL 284 NCHARS 278 STRING-EQUAL 268 STRING-EQUAL 255 FB.GREATEST.PREFIX 230 STRING-EQUAL 214 FB.PROMPTFORINPUT 203 CONCAT 195 SUBSTRING 164 FB.PROMPTWPRINT 133 PACKFILENAME.STRING 130 DIRECTORYNAME 114 FB.PROMPTWPRINT 64 UNPACKFILENAME.STRING 56 FB.PROMPTWPRINT 47 STRPOS 32 FB.PROMPTFORINPUT 27 DIRECTORYNAME 18 CONCAT 11 LENGTH) (404 BODY 400 VERSION 381 DIRECTORY 377 DIRECTORY 349 FB.NAMES.INCREASING.VERSION 339 FB.INCREASING.VERSION 333 FB.NAMES.DECREASING.VERSION 316 FB.NAMES.INCREASING.VERSION 126 DIRECTORY 122 BODY 104 VERSION 98 EXTENSION 92 NAME 85 DEVICE 78 DIRECTORY 69 HOST) ( 325 "?? ...Aborted." 303 "N" 294 "NO" 275 "Y" 265 "YES" 207 "Yes" 200 "?" 169 "Retain subdirectory names below level of " 161 "Selected files are in multiple subdirectories" 111 "Not a well-formed directory specification." 53 "Sorry, patterns not supported" 43 "*" 15 " files to which directory? " 7 " ") FB.GREATEST.PREFIX :D4 (L (1 Y 0 X)) W@AA>@Akhih` @A@khih` Ak!@H ZJAH I@kI Jl/Jl>HYHkԸ(65 SUBSTRING 54 NTHCHARCODE 46 NTHCHARCODE 34 STRPOS 18 STRPOS) (30 UPPERCASEARRAY 14 UPPERCASEARRAY) () FB.MAYBE.INSERT.FILE :D4 (L (3 CMD 2 OLDITEM 1 NEWNAME 0 FBROWSER)) @A zAk@kY @kI bB@ h_^@AH \d j A ZHg'[4K [Jg BCgBjLk@L iKj@gAgogJg H X%d]dgdg𑿊gCgMhܱa_AO YOIHNA(229 GETFILEINFO 168 FB.CREATE.FILEBUCKET 164 PACKFILENAME.STRING 160 FILENAMEFIELD 130 FB.INSERT.FILE 101 GETFILEINFO 92 IDATE 77 INFILEP 63 FB.CREATE.FILEBUCKET 33 STRING-EQUAL 30 SUBSTRING 22 SUBSTRING 9 DIRECTORY.MATCH) (204 Rename 198 AUTHOR 191 READDATE 185 WRITEDATE 157 VERSION 153 VERSION 146 EXTENSION 142 BODY 110 Rename 98 ICREATIONDATE 84 CREATIONDATE) ( 150 "") FB.GET.NEW.FILE.SPEC :D4 (L (2 CMD 1 BROWSER 0 OLDNAME)) 0Bo@Bdgogo gA0i ghg@ Ai Xx Yg'AH 0gHghg@ XT jAo hXAI!K\)dgdgdgL]LIhYMhAIi 0HH  IgJJ (215 \ADD.CONNECTED.DIR 200 PACKFILENAME.STRING 196 \ADD.CONNECTED.DIR 186 DIRECTORYNAME 122 FB.PROMPTWPRINT 111 NCHARS 105 PACKFILENAME.STRING 86 \ADD.CONNECTED.DIR 74 UNPACKFILENAME.STRING 66 FB.PROMPTFORINPUT 61 PACKFILENAME.STRING 49 DIRECTORYNAME 37 CONCAT 34 SHOULDNT) (206 HOST 155 DEVICE 149 DIRECTORY 143 HOST 100 BODY 96 VERSION 92 DIRECTORY 78 NAME 56 BODY 52 VERSION 40 DIRECTORY 24 Copy 13 Rename) ( 119 "Failed, malformed name" 30 " to new file name: " 20 " to be: " 7 " file ") FB.UPDATECOMMAND :D4 (L (0 BROWSER)) @g @ (12 FB.UPDATEBROWSERITEMS 6 FB.MAYBE.EXPUNGE) (3 Recompute) () FB.MAYBE.EXPUNGE :D4 (L (1 COMMAND 0 BROWSER)) .@dj%o  dg@hddA gi(35 FB.EXPUNGECOMMAND 20 MENU 17 FB.EXPUNGE?.MENU 14 FB.PROMPTWPRINT) (39 NOEXPUNGE 24 EXPUNGE) ( 11 "Some files are marked for deletion. Do you want to expunge them first?") FB.UPDATEBROWSERITEMSA0001 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 13 BROWSER F 14 SI::*RESETFORMS*)  WWWCW[gWhhdWcW`.Hggi WioKg Wd,\ WpjJgKo J Ih W WgL gL $Wdddjj j"jWdj0jdh4WjWh2WgKLo ]Wd ` M ^,OIWOOO I jrWgoK N WNdML __O2OO OO_OIWOOO O_h_O_O_rWg W Wd W WH W h(407 FB.DISPLAY.COUNTERS 402 FB.UPDATE.HEADING.EXTENT 395 TB.REDISPLAY.ITEMS 387 FB.HEADINGW.DISPLAY 377 FB.MAYBE.WIDEN.NAMES 371 FB.PROMPTWPRINT 334 FB.ADD.FILEGROUP 306 STRING-EQUAL 286 FB.CREATE.FILEBUCKET 283 FB.GETALLFILEINFO 273 CONCATCODES 264 FB.PROMPTWPRINT 247 TB.NUMBER.OF.ITEMS 241 FB.ADD.FILEGROUP 222 \GENERATENEXTFILE 215 FB.HEADINGW.DISPLAY 206 \GENERATEFILES 139 MEMB 130 MEMB 121 FB.SET.DEFAULT.NAME.WIDTH 116 TB.REPLACE.ITEMS 111 CLEARW 106 PUTWINDOWPROP 103 CONCAT 75 FB.PROMPTWPRINT 60 WINDOWADDPROP) (368 done 256 CLEAR 195 FB.NAMES.DECREASING.VERSION 135 LENGTH 126 SIZE 95 TITLE 71 |...| 56 FB.ABORT.UPDATE 53 CLOSEFN 47 \RUNNING.PROCESS 28 FB.CLEANUP.UPDATE) ( 260 "No files in group " 203 (SORT RESETLST) 100 " browser" 67 "Enumerating ") FB.UPDATEBROWSERITEMS :D4 (P 1 SI::*RESETFORMS* P 0 LISPXHIST I 0 BROWSER F 2 LISPXHIST) Rg  (19 CL:VALUES-LIST 15 SI::RESETUNWIND 12 \MVLIST 9 FB.UPDATEBROWSERITEMSA0001) (6 SI::RESETUNWIND) () FB.CLEANUP.UPDATE :D4 (L (0 BROWSER) F 0 RESETSTATE) @gg @h.P @o (26 FB.PROMPTWPRINT 11 WINDOWDELPROP) (8 FB.ABORT.UPDATE 5 CLOSEFN) ( 23 " aborted.") FB.ABORT.UPDATE :D4 (L (0 WINDOW)) O@g Hd#.YH`j` o` gI Hk`kjhI (74 BLOCK 69 PROCESSP 65 ALLOW.BUTTON.EVENTS 51 DEL.PROCESS 43 PRIN1 32 TERPRI 6 GETWINDOWUSERPROP) (46 DON'T 40 PROMPTWINDOW 29 PROMPTWINDOW 3 FILEBROWSER) ( 37 "Abort is already in progress on that File Browser") FB.MAYBE.WIDEN.NAMES :D4 (L (0 BROWSER)) I@*@2H#@` dkkd``ZH[h\IjJLZ@LiK(21 FIXR) (37 FB.OVERFLOW.MAXABSOLUTE 31 FB.OVERFLOW.MAXABSOLUTE 17 FB.OVERFLOW.MAXFRAC) () FB.SET.DEFAULT.NAME.WIDTH :D4 (L (0 BROWSER)) 8@@dh@ l H l;H YI`@l8H @h*h(46 CHARWIDTH 26 CHARWIDTH 20 CHARWIDTH 14 DSPLEFTMARGIN) (36 FB.DEFAULT.NAME.WIDTH) () FB.CREATE.FILEBUCKET :D4 (L (2 FILEINFO 1 FILENAME 0 BROWSER)) ;@d0jA @A AI ^_l0OOl92Nl;Nl. AIk IkٹH_AOk_ dl>OIkٹKHKkZi_@jJAkK H`dAdBAHI _dOMj_dO IAkI A_dO@$dgBg'gBg'Ydn_dO dLdJ dOkjb@A @2_BO'_@@jO _AO`dA(294 IDATE 268 FB.CHECK.NAME.LENGTH 183 SUBSTRING 153 SUBSTRING 129 SUBSTRING 81 NTHCHARCODE 62 SUBATOM 27 NTHCHARCODE 19 NCHARS 11 FB.ANALYZE.PATTERN) (306 |TABLEITEMTYPE#| 221 LENGTH 214 LENGTH 208 SIZE 201 SIZE 136 |FBFILEDATATYPE#|) () FB.CHECK.NAME.LENGTH :D4 (L (1 FILEDATA 0 BROWSER)) pA@ @A @QH@L@*@YHI@HkhI[*KI\L]\HdLHMJMHkhLMMkh(17 NCHARS 8 STRINGWIDTH) NIL () FB.ADD.FILEGROUP :D4 (L (4 LASTSUBDIR 3 OTHERFILES 2 LASTFILE 1 FBROWSER 0 TBROWSER)) F AjBXDHD @AH CBCg d@AI h@AB (67 FB.ADD.FILE 54 FB.ADD.FILE 44 SORT 31 FB.INSERT.DIRECTORY 24 STRING-EQUAL) (41 FB.DECREASING.VERSION) () FB.INSERT.DIRECTORY :D4 (L (3 BEFOREITEM 2 SUBDIRECTORY 1 FBROWSER 0 TBROWSER)) @AB C (9 TB.INSERT.ITEM 5 FB.MAKE.SUBDIRECTORY.ITEM) NIL () FB.MAKE.SUBDIRECTORY.ITEM :D4 (L (1 SUBDIRECTORY 0 FBROWSER)) P`dk0`A@k@k bHdIA@ HdIdAdkHdI(47 SUBSTRING 28 SUBSTRING) (12 |FBFILEDATATYPE#| 2 |TABLEITEMTYPE#|) () FB.ADD.FILE :D4 (L (3 BEFOREITEM 2 ITEM 1 FBROWSER 0 TBROWSER)) #B HAd H Adk@BC (32 TB.INSERT.ITEM) NIL () FB.INSERT.FILEA0001 :D4 (L (1 ITEM 0 BROWSER) F 0 FILE F 1 FBSORTFN) A0jhhPAlQNIL NIL () FB.INSERT.FILE :D4 (L (0 BROWSER) P 1 FBSORTFN I 1 FILE) @@A@jhDHg ]d)K&d_kHOk ^0jMJ NHAM KNM&Md0j\J 8MM0jH@LM A_kJhHOk J H@JA @Ag (164 FB.COUNT.FILE.CHANGE 155 FB.INSERT.DIRECTORY 147 STRING-EQUAL 139 TB.NTH.ITEM 118 FB.INSERT.DIRECTORY 100 STRING-EQUAL 77 TB.INSERT.ITEM 68 STRING-EQUAL 52 TB.NTH.ITEM 28 TB.FIND.ITEM) (161 ADD 25 FB.INSERT.FILEA0001) () FB.ANALYZE.PATTERN :D4 (L (1 SAMPLE 0 BROWSER)) @jd3HIkY dl'IkԹdl}6I]HMk] dl'Mk԰dl:dl>M[ddl*dl#҃jYAJkZ dl'JkZdl}jZK&HIkK AJkhdi` \AkLk HK$JkؼIJHkI AkI AkJ HIk @H @dpjgHo @k0kjh@Jk@LL(232 PUTWINDOWPROP 229 CONCAT 207 FB.SETNEWPATTERN 201 CONCAT 198 SUBSTRING 191 SUBSTRING 183 STREQUAL 180 SUBSTRING 174 SUBSTRING 155 SUBSTRING 145 STRPOS 131 SUBSTRING 98 NTHCHARCODE 45 NTHCHARCODE 15 NTHCHARCODE) (221 TITLE 141 UPPERCASEARRAY) ( 226 " browser") FB.GETALLFILEINFO :D4 (L (2 ATTRIBUTES 1 GENERATOR 0 FILE)) B1HKAI ZIJKHX(16 \GENERATEFILEINFO) NIL () FB.SORT.VERSIONS :D4 (L (1 SORTFN 0 ITEMS)) {@AHd@\H ZHZLJ J0HdJ#MA IKbJXK YJKH_N Oh^Oh^HYX(78 LAST 62 SORT 42 STRING-EQUAL 25 STRING-EQUAL) NIL () FB.DECREASING.VERSION :D4 (L (1 Y 0 X)) A bjh@ bj@ANIL NIL () FB.INCREASING.VERSION :D4 (L (1 Y 0 X)) A bj@ bjhA@NIL NIL () FB.NAMES.DECREASING.VERSION :D4 (L (1 Y 0 X)) ;@bAb` dgigA bjh@ bj@A(19 ALPHORDER) (30 EQUAL 23 LESSP 16 UPPERCASEARRAY) () FB.NAMES.INCREASING.VERSION :D4 (L (1 Y 0 X)) ;@bAb` dgigA bj@ bjhA@(19 ALPHORDER) (30 EQUAL 23 LESSP 16 UPPERCASEARRAY) () FB.DECREASING.NUMERIC.ATTR :D4 (L (1 Y 0 X)) &@jAjHIIHh@A (35 FB.NAMES.DECREASING.VERSION) NIL () FB.INCREASING.NUMERIC.ATTR :D4 (L (1 Y 0 X)) &@jAjIHHIh@A (35 FB.NAMES.DECREASING.VERSION) NIL () FB.ALPHABETIC.ATTR :D4 (L (1 Y 0 X)) %@A` dgig@A (34 FB.NAMES.DECREASING.VERSION 15 ALPHORDER) (26 EQUAL 19 LESSP 12 UPPERCASEARRAY) () FB.SORTCOMMAND :D4 (L (0 BROWSER)) @@ @jh IdgdiIYgIgIdgLg>g9gIgIdgiLgggi_Lggg[@oIg Hg ]O[dJh@"Ox_I'_NO _OOOOjOdO @O O_J0@ M%d_jOdO @O MK ]OdJ@ O@M @d HM @Okj_Ojh@K@OhI2@Nkj_@Ojh@o (382 FB.PROMPTWPRINT 323 TB.REPLACE.ITEMS 318 FB.HEADINGW.DISPLAY 310 FB.INSERT.SUBDIRECTORIES 301 FB.MAYBE.WIDEN.NAMES 289 SORT 279 FB.CHECK.NAME.LENGTH 270 SUBSTRING 242 FB.SET.DEFAULT.NAME.WIDTH 227 FB.CHECK.NAME.LENGTH 218 SUBSTRING 185 IDATE 141 TB.COLLECT.ITEMS 134 FB.PROMPTWPRINT 9 MENU 6 FB.GET.SORT.MENU) (138 FB.IS.NOT.SUBDIRECTORY.ITEM 131 |...| 121 FB.ALPHABETIC.ATTR 117 FB.NAMES.DECREASING.VERSION 113 FB.NAMES.INCREASING.VERSION 102 NAME 97 FB.DECREASING.NUMERIC.ATTR 92 FB.INCREASING.NUMERIC.ATTR 82 READDATE 75 WRITEDATE 69 CREATIONDATE 64 FB.DECREASING.NUMERIC.ATTR 59 FB.INCREASING.NUMERIC.ATTR 51 BYTESIZE 44 LENGTH 38 SIZE) ( 379 "done" 127 "Sorting by ") FB.INSERT.SUBDIRECTORIES :D4 (L (1 FILES 0 BROWSER)) ?A@@h@k@k HZIJY @I J JJ(52 ATTACH 48 FB.MAKE.SUBDIRECTORY.ITEM 42 STRING-EQUAL 23 SUBSTRING) NIL () FB.GET.SORT.MENU :D4 (L (0 BROWSER)) @4@`o@@ d[gKhoKgKgKdg-gogKhoogKohoO OhA _A oH _ AggO Ag  O oo ALK H$HoH o ALK Jl _"H _I __&VMjNl;A MA Ծ`AO2gO4_KOjO2O4_LNO"_(OdO(O(__djA dNNO jdMM]O&{_:ONO"O:O:gO$OO:Ai _$A OO:A hO:_8O6O8h_6_4O2_2>O8h_6_6O4O6_4O2_21LO(_KA O_,OUd_*_O* _O,OO"OA lA OA O*O,dO_,O*O*O,O"A A OQO2 KA _dj'OA LJlA OA OA tA O _8jAoO8 OUO_4MhA _:O6O_<(O:O