‘XCL Compiler output for source file {DSK}frank>il>medley>gmedley>library>UNIXUTILS.;26 Source file created 13-Nov-2023 12:57:10 FASL file created Monday, 13 November 2023, 12:57:38 ÿ˜–#ogg o ˜•ŒFILECREATEDLOC˜Œ*STANDARD-INPUT*˜Œ1 top-level form˜ŒFUNCTION˜“€˜•ŒDEFINE-FILE-INFO˜ŒOPEN ˜ŒOUTPUT˜Œ DIRECTION˜“˜ŒPACKAGE˜Œ INTERLISP˜Œ READTABLE˜Œ INTERLISP˜ŒBASE ˜Œ{Null}˜–Iggo ¿o¿`gð–h¿`gð–hh˜Œ4 top-level forms™˜“€˜•ŒPUTPROP A˜•Œ ShellOpener9˜•ŒNOBIND4™.˜•Œ ShellBrowser&™!™˜•Œ UNIXUTILSCOMS˜•Œ FILEDATES˜•Œ UNIXUTILS˜“˜“˜•ŒDECLARE:˜•Œ EVAL@COMPILE˜•ŒDONTCOPY˜“˜•Œ*˜•Œ;˜ŒFor PROCESS-COMMAND˜“˜•ŒFILES˜“˜•ŒFROM˜•ŒLOADUPS˜•Œ EXPORTS.ALL˜“˜•Œ GLOBALVARS™™˜“˜•ŒINITVARS˜“™˜“™˜“˜•Œ FUNCTIONS˜•Œ ShellCommand˜•Œ ShellWhich˜“˜•ŒADDVARS˜“˜•ŒMEDLEY-INIT-VARS˜“™˜“™˜“˜•ŒFNS™˜•Œ ShellBrowse™˜•Œ ShellOpen˜•ŒPROCESS-COMMAND˜•ŒSLASHIT˜•ŒUNIX-FILE-NAME˜“˜•ŒPROPS˜“™˜•ŒFILETYPE ˜“˜”˜Œ13-Nov-2023 12:57:10•Œ8{DSK}frank>il>medley>gmedley>library>UNIXUTILS.;26œ™/˜–Wn¸ejó”eló˜kl ¿ekÙjð¨laHý¿…iHý¿@ Hý¿iHý¿noHkoH-¿h™/‚ÿÿÿÿ™˜“˜“˜ŒCmd˜Œ &OPTIONAL˜ŒOutput.˜•ŒCREATE-PROCESS-STREAM˜’ŒARGUMENT-ERROR˜‘˜ŒSYSTEMM˜–bnHZ¿ggYJý¿HÉgnoJ ¿HÉ HÉ ¿°ïh¹„°úh»hHý¿K»j@¿K˜’Œ*CATCH-RETURN-TO*™O˜’Œ*UNWIND-PROTECT*™O˜ŒCLOSURE˜“˜“˜ŒG30B˜•Œ PRINTCCODE:˜•Œ READCCODE1˜•Œ SETFILEINFO˜•Œ ENDOFSTREAMOP™R ˜ŒTAGBODY'˜– HÉnp ˜Œlambda in *UNWIND-PROTECT*™S˜“˜“˜Œs˜’Œ NON-LOCAL-GO™O#˜•ŒCOMPILED-CLOSURE˜•Œ \PTRHUNK2B˜–HÉgHÉ ˜ŒClean-up forms™S˜“€ ˜ŒCLOSE˜ŒABORT>™b˜•Œ \PTRHUNK4œ™0˜–;nX@¿gg Hý¿iHý¿noHkoH-™0™˜“˜“˜ŒCmd˜•Œ OPENSTREAM˜•ŒBOTH ˜•Œ {NODIRCORE}3˜–NoHÉ HÉ ¿HÉ jð”hh°HÉj ¿HÉ hHý¿j@¿ ™R™S˜“˜“˜ŒG32H˜Œ VALUES-LIST9˜•Œ\MVLIST4˜•ŒRSTRING+˜•Œ SETFILEPTR˜•Œ GETEOFPTR™/ ˜•ŒCONCAT˜Œ command -v (˜–HÉgHÉ ™e™S˜“€ ™g™h$™b™j˜– o ˜Œ1 top-level form™˜“€˜•ŒADDTOVAR˜“™3˜“™˜“™œ™˜–|`¸`‘Ho ²So YœIo °5o Y²#o ZœJoI ‚Ih„o„`˜•ŒCMDPATH2˜•ŒCMDPATH™™˜“€˜Œ INTERLISP_™zQ™0A™05™z(™0˜•ŒSTREQUAL™v™q™™™j˜ŒtrueY˜Œ -e L˜Œxterm<˜Œlynx0˜Œ web--browse#˜Œgit˜Œtrueœ™9˜–T@ b¿o@ kðX’H°+o@ kðY’I°o@ kð–@ h˜•ŒURL™9™˜“˜“™I™‚”™‚‰L™:C˜•ŒSTRPOS>˜•ŒL-CASE,™‚—'™‚˜™‚—™‚˜˜•ŒMKSTRING8˜Œfile:///!˜Œhttps:// ˜Œhttp://œ™˜–Y`¸`‘Ho Y’I°3o Y’I°$o Y’I°o Y‘I„o™‚ˆ™™˜“€™‚‰D™05™0&™0™0S™™™M˜Œtrue?˜Œopen0˜Œxdg-open!˜Œcygstart˜Œwslviewœ™:˜–‚_i ¿@ b¿o@ kðX’H°+o@ kðY’I°o@ kð²cJo ›o@ J² ghJo@o Jo@oo  ¿i@ L¢±ŒKo ›o@ @g L Ng'oNg'o Ng'N  Ogh ¿Ogh ¿O _mÿ o œW&kmþ _¿O _ oO  onèn'  gogOgOgO ghgOgOgO  M‘M…O‘h€ižLO ¿O_ ¿„O_ ¿onèn' g inokoh-o@ ˜•ŒA0113˜•Œ SHELLSTREAM˜•ŒUNIXFILE˜•ŒTARGETFILE.UNIX˜•ŒTARGETFILE.LISP ˜•ŒTMPDIR ˜•ŒUNVERSIONED.EXISTS ˜•Œ UNVERSIONED ˜•ŒFN ˜•ŒUNPACKED˜•Œ EXTENSION˜•ŒNEWNAME™‚®˜•ŒVERSION.SPECIFIED˜•ŒFULLNAME˜•ŒOPENER˜•ŒBROWSER˜•Œ FilenameOrURL™‚§™:™˜“˜“™I™‚µ™‚‰*‚Y™z‚6™o‚,™z‚'˜•ŒRAND‚ ˜•ŒCOPYFILE‚ò™<‚형ŒPACKFILENAME.STRING‚É™‚º‚¡™z‚œ™‚¸‚‰˜•ŒINFILEP‚„™z‚r™<‚h˜•Œ SUBSTRING‚]™‚‹‚S™‚¼‚J™‚º‚B˜•ŒLISTPUT‚4™‚½‚$˜•ŒCOPY‚™z‚ñ˜•ŒUNPACKFILENAME.STRING‚蘕Œ FILENAMEFIELD‚Ü™z‚Й‚‹‚½™‚²‚´™‚¬™/‚§™z‚˜•ŒCHAT‚Š™zm™za™‚‹S™J™‚—E™‚˜3™‚—.™‚˜™‚—™‚˜ ™‚™˜•ŒRANDSET‚1™p‚噂¯‚Þ˜•ŒNAME‚ט•Œ DIRECTORY‚ј•ŒHOST‚Á™‚¯‚º™‚³™‚Ä‚©™‚Å‚<™‚Å‚.˜•ŒVERSION‚™‚¯‚™‚Æ‚ú™‚Â㙂Æw˜•ŒSHELL‚S˜ŒFile not found: ‚K˜–‚nX¿SoToo R ¿R jð”ih°BR o Yg Hý¿iHý¿noHkoH-¿Ihhc ¿j@¿ ™‚¦™‚³™‚§™‚¥™R™S˜“˜“˜ŒG33{™uI˜•ŒOPENSTRINGSTREAM>˜•Œ ALLOCSTRING4˜•Œ GETFILEPTR&™‚Ι/™zD˜•ŒOUTPUTh˜–fnHZ¿Tj ¿ggYJý¿TgnoJ ¿T HÉ ¿°ñh¹„°úh»hHý¿K»j@¿K™Q™‚¦™R™S˜“˜“˜ŒG34F™W>™X7™Y ™x$™Z™R™[-˜– HÉn„ ˜Œlambda in *UNWIND-PROTECT*™S˜“˜“˜Œs™`)™b™c]˜–HÉgHÉ ™e™S˜“€ ™g™h9˜Œ ˜Œ# >>/tmp/ShellOpener-warnings-$$.txt˜Œ'˜Œ 'Y™b™c‚C˜–PgQ ™‚¦™‚¥™e™S˜“€™g™h‚˜Œ{CORE}SHELLOUT‚®˜Œ{UNIX}‚‘˜Œ/tmp/‚}˜Œ{UNIX}‚X˜Œ.‚ ˜Œ~‚˜Œ~‚Ö˜Œ&Unable to find a file opener to open: ‚˘Œtrue‚¡˜Œ$ >>/tmp/ShellBrowser-warnings-$$.txt‚œ˜Œ'‚–˜Œ '‚…˜Œ'˜Œ 'g˜Œ"Unable to find a browser to open: \˜Œtrue?˜Œfile://(˜Œhttps://˜Œhttp://‚?™bœ™;˜–@ inokoh-˜•ŒA0117˜•ŒPS˜•ŒCMD™;™˜“˜“™I™‚ø™‚‰™M˜–3h¸ilRÉ}uY‘I€jX𠇿°ãHhhc¿j@¿ ™‚÷™‚ö™R™S˜“˜“˜ŒG36-™u˜•ŒBLOCK˜ŒSTREAM˜–PgQ ™‚÷™‚ö™e™S˜“€™g™h ™bœ™<˜–‚ºo@ X‘H€jkØ!h¸h¼h½I@N _¡°8Ol<ð_’O„Ol>ð”N»l/ŒOl/ð”N»OO½L”LM&¼„Mh\¸NkÔ¾°ÀH  ºA‘K€h²-KIÙkØ»JkK JKkØ ]‘M„o ºIkð]‘M€B‘J@kIkÙ J ˜•ŒC˜•ŒI˜•Œ LASTDIRPOS˜•ŒSLASHED˜•ŒDIRPOS˜•ŒNOHOST˜•Œ LCASEDIRS˜•ŒX™< ™˜“˜“™I™‚ ™‚ ™‚ ™‚‰ ‚´™z‚®™‚¼‚˜™z‚Š™‚¼‚™‚˜|™‚¼f˜•Œ CONCATCODES"˜•Œ NTHCHARCODE™‚—‚“˜Œ˜Œ}œ™=˜–‚ @Ai @ X‘H€@b¿@¢±@ b ³?@Agð–g°'Agð–g°A–A Œgb¿g b¿@g Xgðš@lkØ Hgð²e@g ghghg@  b¿I“Ikñ€h²,@@g •o„ooIo @B›Agð‘@‚h€h²U!nokoh-hh˜’Œ *RESETFORMS*™O˜•Œ RESETSTATE˜•Œ LISPXHIST™‚Æ™‚¾˜•ŒACCESS˜•ŒFILE™‚™=™˜“˜“™I™‚™‚™‚¾™‚‰ ‚ë™z‚Ι‚À‚¶™<‚±˜•Œ PACKFILENAME‚–™‚À‚™‚¼o™‚Àa˜•Œ \GETFILENAMEN˜•Œ \ILLEGAL.ARG%˜ŒSTREAMP˜•Œ TRUEFILENAME ™‚²˜•Œ \GETSTREAM‚ö˜•ŒINPUT‚É™‚¯‚ª˜•ŒBODY‚¤™‚Æ‚ž™‚Å‚‘™‚Æ‚ˆ˜•ŒDSKu˜•ŒUNIXj™‚Å\˜•ŒOLDT™‚ D™‚$=™‚ 5˜•ŒNEW.™‚Ï‚˜–‚”Pgi ²%ggPohP hQc¿PoR ooPg ²oPg „o  j@¿ ™‚™‚™‚¾™R™S˜“˜“˜ŒG38 ‚Ž™u‚…™v‚€™‚¹{™zo™zj™‚ÀX™‚ÀM™‚¸C˜•ŒIDATE9™‚˜%™‚Ι‚e™‚¯S™‚¯™x˜ŒPROGN™‚ u˜Œ_˜Œ.H˜Œ->˜Œ-3˜Œ{UNIX}/tmp/medley-˜“˜•ŒOLDVALUE‚ ˜–™e™S˜“€˜’Œ RESETUNWIND™O‚嘌~‚ߘŒ~‚Ú˜Œ‚Ô˜Œ.‚™b˜– o ˜Œ1 top-level form™˜“€˜•ŒPUTPROPS˜“™™@˜Œ COMPILE-FILEš‚Aÿÿ