(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED "11-Aug-2022 17:56:18" ("compiled on " {DSK}larry>medley>lispusers>PICK.;3) "11-Aug-2022 15:33:44" brecompiled changes%: PICK in "FULL 11-Aug-2022 ..." dated "11-Aug-2022 15:33:46") (FILECREATED "11-Aug-2022 17:53:58" {DSK}larry>medley>lispusers>PICK.;3 4261 :CHANGES-TO (VARS PICKCOMS) (FNS PICK) :PREVIOUS-DATE "10-Aug-2022 16:57:49" {DSK}larry>medley>lispusers>PICK.;1) PICK :D8 (P 6 $L P 5 S P 3 TITLE P 2 COMMENTS P 1 STR P 0 ISSUE I 1 CHOICES I 0 TYPE F 11 GIT-PROJECTS) ¢ @ dgð²AkA d³go hb¿b¿¿°¹dg𢱋gAµ o ihoH Lµ>IhdgighoH [h ¿J²hoH K½IoM ¿L\°¯dgð²gob¿b¿¿±ÿ dgð²>ggAµ g hi µAW hgð²QgdWg 2 N°dkO_¿Oµ Oh_‚O&_¿µãOoh b¿b±þo@o (415 HELP 396 PICK 343 CL:SYMBOL-FUNCTION 313 PICK 308 DIRECTORY 288 MEDLEYDIR 281 PICK 213 CL:FORMAT 197 GIT-COMMAND 192 CL:FORMAT 176 TEDIT 165 CL:FORMAT 132 GIT-COMMAND 127 CL:FORMAT 111 OPENTEXTSTREAM 106 PICK 101 GIT-COMMAND 62 PICK 42 NTH 37 RAND 32 LENGTH 15 MKATOM 10 U-CASE 5 MKSTRING) (338 CAR 330 ONEOF 322 PROJECT 276 DIR 267 ONEOF 262 FILE 254 FILE 233 ONEOF 225 DIR 153 TITLE 147 READONLY 88 ONEOF 78 ISSUE 52 ONEOF 21 ONEOF) ( 410 "Unknown type" 388 (CLOS ROOMS ONLINE WEBSITE COMMUNITY ENVOS) 238 (LISPUSERS LIBRARY DOCTOOLS SOURCES INTERNAL) 207 "~a~&" 186 "gh issue view -R interlisp/medley ~a -w" 159 "Issue #~d" 121 "gh issue view -R interlisp/medley ~d" 96 "gh issue list -L 5000 -R interlisp/medley | sed 's/\([0-9]*\).*/\1/'" 57 (FILE ISSUE PROJECT)) (PRETTYCOMPRINT PICKCOMS) (RPAQQ PICKCOMS ((COMMANDS "pick") (DECLARE%: EVAL@COMPILE DONTCOPY (FILES (LOADCOP) GITFNS)) (FILES GITFNS) (FNS PICK))) (DEFCOMMAND "pick" (FIRST . REST) (PICK FIRST REST)) (FILESLOAD GITFNS) NIL