(FILECREATED "18-Sep-86 19:40:28" ("compiled on " {ERIS}<LISPCORE>SOURCES>LLINTERP.;37) 
"16-Sep-86 11:57:30" in "Xerox Lisp 16-Sep-86 ..." dated "16-Sep-86 12:29:41")
(FILECREATED "18-Sep-86 19:38:36" {ERIS}<LISPCORE>SOURCES>LLINTERP.;37 124289 changes to: (VARS 
LLINTERPCOMS) (FNS \STKNAME) previous date: "28-Aug-86 12:34:47" {ERIS}<LISPCORE>SOURCES>LLINTERP.;35)
(RPAQQ LLINTERPCOMS ((E (* ; "Don't fontify these common functions") (SETQ FNSLST (LDIFFERENCE FNSLST 
(QUOTE (EVALV PROG SET SETQ RETURN GO QUOTE AND OR PROGN COND PROG1 FUNCTION EVAL APPLY))))) (COMS (* 
; "For calling interpreted functions") (FNS \INTERPRETER \INTERPRETER1 \SETUP-COMPILED-CLOSURE-CALL 
\STKNAME)) (COMS (* ; "recursive interpreter") (FNS EVAL \EVAL \EVALFORM \EVALFORMASLAMBDA \EVALOTHER 
APPLY APPLY* \CHECKAPPLY* \CKAPPLYARGS DEFEVAL) (DECLARE: DONTCOPY (MACROS .APPLY.)) (VARS (
\DEFEVALFNS NIL) (\EVALHOOK)) (SPECVARS *EVALHOOK*) (ADDVARS (LAMBDASPLST LAMBDA NLAMBDA CL:LAMBDA 
OPENLAMBDA)) (GLOBALVARS \DEFEVALFNS \EVALHOOK LAMBDASPLST CLISPARRAY) (DECLARE: DONTEVAL@LOAD DOCOPY 
(VARS (CLISPARRAY))) (GLOBALVARS CLISPARRAY) (COMS (* ; "Free variable manipulation") (FNS EVALV 
\EVALV1 \EVALVAR BOUNDP SET \SETVAR SETQ SETN \STKSCAN \SETFVARSLOT)) (COMS (* ; "PROG and friends") (
FNS PROG \PROG0 \EVPROG1 RETURN GO EVALA \EVALA ERRORSET)) (FNS QUOTE AND OR PROGN COND \EVPROGN PROG1
) (COMS (* ; "Evaluating in different stack environment") (FNS ENVEVAL ENVAPPLY FUNCTION \FUNCT1 
\MAKEFUNARGFRAME STKEVAL STKAPPLY RETEVAL RETAPPLY)) (COMS (* ; "Blip and other stack funniness") (FNS
 BLIPVAL SETBLIPVAL BLIPSCAN) (FNS DUMMYFRAMEP REALFRAMEP REALSTKNTH \REALFRAMEP) (INITVARS (OPENFNS (
QUOTE (APPLY* SETQ AND OR COND SELECTQ PROG PROGN PROG1 ARG SETARG ERSETQ NLSETQ RESETFORM RESETLST 
RESETVARS RPTQ SAVESETQ SETN UNDONLSETQ XNLSETQ)))) (VARS \BLIPNAMES) (GLOBALVARS BRKINFOLST) (
GLOBALVARS \BLIPNAMES OPENFNS))) (COMS (FNS RAIDCOMMAND RAIDSHOWFRAME RAIDSTACKCMD RAIDROOTFRAME 
PRINTADDRS PRINTVA READVA READATOM READOCT SHOWSTACKBLOCKS SHOWSTACKBLOCK1 PRINCOPY NOSUCHATOM) (FNS 
BACKTRACE \BACKTRACE \SCANFORNTENTRY \PRINTSTK \PRINTFRAME \PRINTBF) (DECLARE: EVAL@COMPILE DONTCOPY (
COMS * RAIDCOMS))) (COMS (FNS CCODEP EXPRP SUBRP FNTYP ARGTYPE NARGS ARGLIST \CCODEARGLIST 
\CCODEIVARSCAN) (COMS (* ; "Translation machinery for new LAMBDA words") (PROP VARTYPE LAMBDATRANFNS) 
(ALISTS (LAMBDATRANFNS))) (DECLARE: DONTCOPY (MACROS \CCODENARGS \CCODEFNTYP \CCODEARGTYPE))) (COMS (*
 ;; 
"proclaim and friends need to come first because DEFVARs put it out.  With package code in the init, also need this here rather than CMLEVAL"
) (FUNCTIONS PROCLAIM) (* ; "used by the codewalker, too") (MACROS VARIABLE-GLOBALLY-SPECIAL-P 
VARIABLE-GLOBAL-P)) (FUNCTIONS SPECIAL-FORM-P) (PROP FILETYPE LLINTERP) (DECLARE: EVAL@COMPILE 
DONTCOPY (ADDVARS (LAMS FAULTEVAL FAULTAPPLY))) (DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY 
COMPILERVARS (ADDVARS (NLAMA PROG1 COND PROGN OR AND QUOTE GO PROG SETN SETQ) (NLAML FUNCTION RETURN) 
(LAMA APPLY* \INTERPRETER))) (LOCALVARS . T) (SPECVARS *TAIL* *FN* *FORM* *ARGVAL*)))
\INTERPRETER D1
(L (0 N) P 16Q \INTERRUPTABLE) Ÿ��e�HaHkÙj£
Idlð“Á
É�\dl
ð²#¿`��g��Î0`��LÎ2`��hÎ4l~`��É6d`��ðš	��_¿L	��\²-Ldg��ð™¿HLOI��dg��ð¬dg��ð¦dg��ð²w¿LµIJk2O dOó¢±�î¿O"
��]d²-°d_d��—¿Oið—Ol#
��¿KkØ»µãKJñ²KJÙ°²Mdið•l#
��†��¿k»j^KlØmüå_lØØ_°;g��ð²hL	��
��LHkÙk2O*dO(ó²,¿O,_¿_¿j_¿O°QhýkÙdjñ³ù¿MOOJNIL
��a_0¿O.µO0h_._,¿O*kÔ_*°¹O0&_.¿°òdýOkØ_n�ñ–hl4
��¿µêOOa_&¿O$µO&h_$_"¿O kÔ_ ±þöO&&_$¿°ñ�(562Q \LISPERROR 473Q \INTERPRETER1 400Q \SMASHLINK 375Q \STACKARGPTR 325Q \LISPERROR 266Q \LISPERROR 227Q FAULTAPPLY 146Q \INTERPRETER-LAMBDA 121Q CLOSURE-FUNCTION 112Q CLOSURE-ENVIRONMENT)
(362Q FUNARG 331Q LITATOM 250Q LITATOM 167Q OPENLAMBDA 161Q NLAMBDA 153Q LAMBDA 133Q CL:LAMBDA 105Q CLOSURETYPE# 75Q \InterfacePage 64Q \InterfacePage 56Q \InterfacePage 51Q \SETUP-COMPILED-CLOSURE-CALL 46Q \InterfacePage)
()
\INTERPRETER1 D1
(L (6 DEF 5 FN 4 NPVARARGS 3 NACTUAL 2 NTSIZE 1 NNILS 0 ARGLIST) P 14Q \INTERRUPTABLE P 6 \INTERRUPTABLE P 0 *TAIL*) <
��FfBkIÑÊ‡kIÑÈÑºkdIÑÈAàÙ\DàlØØmüåÑ»@µ±�ª²e@jlBlØOµ±�“_¿KOÐO��ÓÍ�¿KOÐCOñ”OjØLIl
ØÙâOCÙn€�ØØÍ�¿O_¿OkÔ_¿OkÔ_¿OkÔ_¿°ªK@��ÓÍ¿KBlØÐFg��ð’j°%`��kdIÑÊðjð”IlÙ„kIÑÈÑÈCàØÐCÎ�¿CjØÍ�¿Kl	EÒlÿåÇ¿KEÓÍKBÍ¿KJÊÏ¿kIÑjÏ�0¿KÒ½kIÑMÏ¿kIÑMÏ‡¿kIÑKÓÍ¿kIÑkÏ�`¿kjðhðH˜H,¿HX°÷H,�NIL
(263Q \STACKSPACE 253Q NLAMBDA 234Q LITATOM 125Q LITATOM)
()
\SETUP-COMPILED-CLOSURE-CALL D1
(L (0 CLOSURE)) I��`��È@É�ò kHÑÊðjð”HlÙ„kHÑÈ\_kLÑÈ]kHÑÈ^kHÑÊðjðhð_—kHÑÈ	_¿kHÑÈ_kLÑÊ�p•LlÙ\€LMÙâ[IÈdnÿñ•nÿÿÙkÙZO¬OLÙIÈ�ýñ¢±� IÈ�KàØH
��_ kO ÑÈØ_¿kOÑÊ�lðšOkOÑÈÔ°ékO ÑkMÑKàÄ¿O KàØ¼kHÑÊ�‡jð®kHÑdÊ�‡mÿÔÏ�‡°BkOÑÊ�‡jð®kOÑdÊ�‡mÿÔÏ�‡ŠMOMÙlØ
��¿OHlÙð‘HƒHlÙ_kHÑÈOÙ
��¿O ½i_¿JKó²JKÕdjñŸkLÑhÎ�¿LlÔ¼kÙ°î¿`��LÐjÍ�¿kLÑMÍ¿kLÑlÏ�LlØ_¿`��OÐjÍ�¿kOÑlÏ�¿kOÑkÏ�p¿O²kOÑLÍ¿kOÑOµNÍ	¿kOÑNkä„kOÑNÍ¿IÒ_"¿kOÑO"Ï¿kOÑO"Ï‡¿kOÑIÓÍ¿kOÑIÈÍOl
Ø_¿IÈdnÿñ•nÿÿÙkÙkØà_¿@É_²`��OÐOÎ�¿OlÔ_¿OmÿÔO_$jñ²`��OÐnÿÿÍ�¿OlÔ_¿O$kÙ°âkOÑOlÔ_Í¿OOOÙ
��`��OÍO�(1075Q \MAKEFREEBLOCK 422Q \MAKEFREEBLOCK 366Q \MAKEFREEBLOCK 207Q \FREESTACKBLOCK)
(1100Q \InterfacePage 1016Q \STACKSPACE 755Q \STACKSPACE 531Q \STACKSPACE 472Q \STACKSPACE 2 \InterfacePage)
()
\STKNAME D1
(L (0 POS)) �d��k@ÑÊ�`jð«k@ÑÊ‡k@ÑÈŠk@ÑÊ‡k@ÑÈÑÉdg��ð²:¿`��k@ÑÊðjð”@lÙ„k@ÑÈ�kHÑÈHkHÑÈÙâkHÑÊ�pÙkÕlÖÔÐÉ��NIL
(55Q \STACKSPACE 46Q \INTERPRETER)
()
EVAL D1
(L (0 U) I 1 \INTERNAL) ����@,�NIL
NIL
()
\EVAL D1
(L (0 FORM)) ����@d“	��lð”@	��@d3³û	���(32Q \EVALOTHER 20Q \EVALVAR 6 \EVALFORM)
NIL
()
\EVALFORM D1
(L (1 TEMP) P 3 *FN* P 2 *TAIL* P 1 *ARGVAL* I 0 *FORM*) �ä��@bdlð²0dÁ
Ê��jð³ ¿AÁ
Ê�!dkð’¿°`lð²@�@kHÁ
É�bd`��ð²(¿j@dg��JZd²j,IkØYlPñ²ðJl4
��¿°çlð²8Adg��ð²¿Ab¢A³©@@j¾M°Rdg��ð³¯dg��ð³¨dg��ð³¡¿`��™@`��
��µ@	��b�±ÿI–Jl
��¿Ih¹KdýNkØ^n�ñ–hl4
��¿µìNL�(333Q \LISPERROR 301Q \LISPERROR 264Q FAULTEVAL 255Q GETHASH 143Q \LISPERROR)
(252Q CLISPARRAY 245Q CLISPARRAY 236Q OPENLAMBDA 227Q LAMBDA 220Q CL:LAMBDA 162Q NLAMBDA 113Q *ARGVAL* 75Q CLOSURETYPE#)
()
\EVALFORMASLAMBDA D1
(L (0 FAULTX) P 2 *FN* P 1 *TAIL* P 0 *ARGVAL*) �4��j@dg��IYd²,HkØXlPñ²ðIl4
��¿°ç–Il
��¿Hh¸J�(53Q \LISPERROR 41Q \LISPERROR)
(11Q *ARGVAL*)
()
\EVALOTHER D1
(L (0 X)) ���@	��`��µ@�@kH�(3 TYPENAME)
(6 \DEFEVALFNS)
()
APPLY D1
(L (1 V 0 U) I 2 \INTERNAL) �y��@Hdlð²¿HdÁ
Ê��jð²&¿HÁ
É�X²1Hdg��ð²¿H³)H²$Ak@Á
Ê�!lð°ñg��ðHX°¶H¥@A
��j¹A°dýIkØYn�ñ–hl4
��¿µìI@�(160Q \LISPERROR 127Q FAULTAPPLY)
(110Q FUNARG 47Q NLAMBDA)
()
APPLY* D1
(L (0 U)) ›��e�Hjñ´ka	Idlð²8¿IdÁ
Ê��jð¯¿IÁ
Ê�!lð¢±�‡°`Á
É�µ°Ydg��ð¦dg��ð²'¿°i	��³dIµèIHl2OdOó¢±�ó¿O
��dg��ð–¿IY°–dg��ð²-¿I²,I³&ka_¿Hl2O dOó¢±�×¿O"kOg��ð²¤Hdkð—¿kaºjJlð™ka»lakKHdlðž¿ka¼lalalLlð²ka½lalalalMkaHl2O*dO(óŸ¿O,_¿¾j_¿O°9a_0¿O.µO0h_._,¿O*kÔ_*°ÔO0&_.¿°òdýOkØ_n�ñ–hl4
��¿µêONa_¿OµOh__¿OkÔ_±þñO&_¿°ña_&¿O$µO&h_$_"¿O kÔ_ ±ÿ
O&&_$¿°ñ�(515Q \LISPERROR 154Q FAULTAPPLY 116Q CCODEP)
(257Q OPENLAMBDA 176Q NLAMBDA 161Q FUNARG 105Q CL:LAMBDA 77Q LAMBDA)
()
\CHECKAPPLY* D1
(L (0 FN)) �Y��@�Hdlð²dÁ
Ê��jð²8¿HÁ
É�X²8Hg��ð²0HX²*H²&H³!g��hg����k@hhÁ
Ê�!lð³ã@�(100Q \CKAPPLYARGS)
(75Q QUOTE 71Q LAMBDA 44Q NLAMBDA)
()
\CKAPPLYARGS D1
NIL �3���kfÑÈmþål
Ù!kdHÑÈlÙYÑÉ�ddjñŸkIlÙYÑÉ�JºkÙ°îJ�NIL
NIL
()
DEFEVAL D1
(L (1 FN 0 TYPE)) �(��@`���HµAš@A`����¿H`��
����¿°æ�(40Q DREMOVE)
(43Q \DEFEVALFNS 35Q \DEFEVALFNS 26Q \DEFEVALFNS 22Q \DEFEVALFNS 3 \DEFEVALFNS)
()
(RPAQQ \DEFEVALFNS NIL)
(RPAQQ \EVALHOOK NIL)
(ADDTOVAR LAMBDASPLST LAMBDA NLAMBDA CL:LAMBDA OPENLAMBDA)
(RPAQQ CLISPARRAY NIL)
EVALV D1
(L (2 RELFLG 1 POS 0 VAR)) ����A˜hA	��
��¿@	��B”A	��¿�(24Q RELSTK 16Q \EVALV1 11Q \SMASHLINK 6 \STACKARGPTR)
NIL
()
\EVALV1 D1
(L (0 VAR)) ����@d��•¿@dið/É��NIL
(4 LITATOM)
()
\EVALVAR D1
(L (0 VAR)) �+��@d“dið/HÉ�Ydg��ð²¿HÒmþå`��Òð”@	��I�(46Q FAULTEVAL)
(37Q \VALSPACE 23Q NOBIND)
()
BOUNDP D1
(L (0 VAR)) �"���@lð´@	��g��ðhðµ@/Òmþå`��Òðhð�(12Q GETTOPVAL)
(33Q \VALSPACE 15Q NOBIND)
()
SET D1
(L (1 VALUE 0 VAR)) �6��@µAd”l
����/�HÒkð–HAÎ�¿°@ið›Adið«l
��¿ƒHA�A�(54Q \LISPERROR 12Q \LISPERROR)
(16Q LITATOM)
()
\SETVAR D1
(L (1 VALUE 0 VAR)) �6��@µAd”l
����/�HÒkð–HAÎ�¿°@ið›Adið«l
��¿ƒHA�A�(54Q \LISPERROR 12Q \LISPERROR)
(16Q LITATOM)
()
SETQ D1
(L (0 U) P 0 *TAIL*) ��@@�H,HXµ
��,¿°ò�(23Q \SETVAR)
NIL
()
SETN D1
(L (0 U) P 0 *TAIL*) ��@@�H,HXµ
��,¿°ò�(23Q \SETVAR)
NIL
()
\STKSCAN D1
(L (0 VAR)) �Ü��kfÑÈmþål
Ù@��ÓRHjð—`��IÐIÐkHÑÊ�`jð«kHÑÊ‡kHÑÈŠkHÑÊ‡kHÑÈÑ]ÈºMlÐ]È�djðž¿kHÑÈmþål
ÙX°¸Ið²vMJÐ[Ê�djð²#¿kKÊ�‡àkdHÑÊðjð”HlÙ„kHÑÈÑÈØÑdl€ð²¿KÊ�‡àHl
ØØ¼kLÑÊ�jð²-kLÑlÀð² kKÊ�‡àHl
ØØÑ^È�kåjð²‰NÊNÈ�Ñ��¿Mk±ÿo�(324Q SHOULDNT)
(31Q \VALSPACE 16Q LITATOM)
()
\SETFVARSLOT D1
(L (1 NEWBINDING 0 VAR)) �y��f@��ÓRkHÑÊ�`jð«kHÑÊ‡kHÑÈŠkHÑÊ‡kHÑÈÑ\ÈºLlÐ\È�djð¿o���@
��¿Lk°ìIð²úLJÐ[Ê�lÀð²îkKÊ�‡àHl
ØØÑ^AÓÍ�¿NdAÒ]Ï‡¿MÏA�(101Q ERROR)
(4 LITATOM)
( 75Q "Binding slot not found in caller's frame")
PROG D1
(L (0 U)) �M�j@2I°d\d‘\��“Lið–Ll#
��¿HkÔ¸µãHdlØmüåZlØØ[ƒhýkÙdjñ³ù¿@dKHJI
���(112Q \PROG0 36Q \LISPERROR)
(23Q LITATOM)
()
\PROG0 D1
(L (5 VARLST 4 NTSIZE 3 NVARS 2 NNILS) P 15Q \INTERRUPTABLE P 7 \INTERRUPTABLE I 1 *TAIL* I 0 *FIRSTTAIL*) ��E¢±�›f1kHÑÊ‡kHÑÈÑ¿kdHÑÈBàÙZCàlØØmüåÑ¹EJLµsEJHl
ØÙâlDlØOµu
Il	g��ÒlÿåÇ¿Ig��ÓÍIDÍ¿kHÑjÏ�0¿IÒ»kHÑKÏ¿kHÑKÏ‡¿kHÑIÓÍ¿kHÑkÏ�`¿kjðhðAbd³_^œ`��MÐN	��Î�¿L¼MlÔ½±ÿr_¿IOÐOd��ÓÍ�¿IOÐOn€�ØÍ�¿O_¿OkÔ_¿OkÔ_¿OkÔ_¿±ÿKµ°˜,¿°”�(262Q \EVPROG1)
(321Q LITATOM 253Q \STACKSPACE 141Q PROG 127Q PROG)
()
\EVPROG1 D1
(I 0 *TAIL*) ����@,@b�µ,¿°õ�NIL
NIL
()
RETURN D1
(L (0 FORM)) �|�@,	��f¹kIÑÊ�`jð«kIÑÊ‡kIÑÈŠkIÑÊ‡kIÑÈÑÉg��ð²&kIÑÊðjð•kIÑÈ„kIÑÈ	l
Ù¹hId��¿H	��kIÑÊðjð•kIÑÈ„kIÑÈ	l
ÙYjð²™hl
��h�(170Q \LISPERROR 125Q VALUES-LIST 120Q \SMASHLINK 4 \MVLIST)
(57Q \PROG0)
()
GO D1
(L (0 U)) �ˆ�f@"kHÑÊ�`jð«kHÑÊ‡kHÑÈŠkHÑÊ‡kHÑÈÑÉg��ð²6IkddHÑÊðjð”HlÙ„kHÑÈÑÈ[ÑÉ�Z²kKlØÑJÎ�¿hHd��hkHÑÊðjð•kHÑÈ„kHÑÈ	l
ÙXjð²‰Il
��h�(204Q \LISPERROR 140Q \SMASHLINK)
(53Q \PROG0)
()
EVALA D1
(L (1 A 0 X)) �I��j1A°d����[d“ið–Kl#
��¿HkÔ¸µäHdlØmüåYlØØZƒhýkÙdjñ³ù¿JHI@A
���(106Q \EVALA 33Q \LISPERROR)
(17Q LITATOM 13Q LISTP)
()
\EVALA D1
(L (4 ALIST 3 FORM 2 NTSIZE 1 NVARS 0 NNILS) P 13Q \INTERRUPTABLE P 4 \INTERRUPTABLE) �Ú��f1kHÑÊ‡kHÑÈÑkdHÑÈ@àÙYAàlØØmüåÑZDIHl
ØÙâlBlØI
MµSJl	g��ÒlÿåÇ¿Jg��ÓÍJBÍ¿kHÑjÏ�0¿JÒ»kHÑKÏ¿kHÑKÏ‡¿kHÑJÓÍ¿kHÑkÏ�`¿kjðhðC,_¿`��OÐOÎ�¿JOÐO��ÓÍ�¿JOÐNn€�ØÍ�¿M½NkÔ¾OkÔ_¿OkÔ_¿OlÔ_¿±ÿd�NIL
(250Q LITATOM 225Q \STACKSPACE 121Q EVALA 107Q EVALA)
()
ERRORSET D1
(L (2 W 1 V 0 U)) ����@,h�NIL
NIL
()
QUOTE D1
(L (0 U)) ���@�NIL
NIL
()
AND D1
(L (0 U) P 0 *TAIL*) ��@hðµ@�Hd¤¿H,,´ýHX°ð�NIL
NIL
()
OR D1
(L (0 U) P 0 *TAIL*) ��@´@�Hd¤¿H,,µýHX°ð�NIL
NIL
()
PROGN D1
(L (0 U) P 0 *TAIL*) ��@´@�Hd¤¿H,,¿HX°ñ�NIL
NIL
()
COND D1
(L (0 U) P 0 *TAIL*) �)�@HµHd”l
��,YœH–H	��IHX°ß�(37Q \EVPROGN 17Q \LISPERROR)
NIL
()
\EVPROGN D1
(I 0 *TAIL*) ����@™@,¿@b�°ö@,�NIL
NIL
()
PROG1 D1
(L (0 U) P 0 *TAIL*) ��@´@�H,HXµ,¿°ö�NIL
NIL
()
ENVEVAL D1
(NAME *ENV* L (4 CFLG 3 AFLG 2 CPOS 1 APOS 0 FORM)) �"���hAd’	��Bd’	����C”A	��¿D”B	��¿@,�(34Q RELSTK 25Q RELSTK 17Q \SMASHLINK 14Q \STACKARGPTR 6 \STACKARGPTR)
NIL
()
ENVAPPLY D1
(NAME *ENV* L (5 CFLG 4 AFLG 3 CPOS 2 APOS 1 ARGS 0 FN)) �—��hBd’	��Cd’	����D”B	��¿E”C	��¿@Hdlð²¿HdÁ
Ê��jð²&¿HÁ
É�X²1Hdg��ð²¿H³)H²$Ak@Á
Ê�!lð°ñg��ðHX°¶H¥@A
��j¹A°dýIkØYn�ñ–hl4
��¿µìI@�(216Q \LISPERROR 165Q FAULTAPPLY 34Q RELSTK 25Q RELSTK 17Q \SMASHLINK 14Q \STACKARGPTR 6 \STACKARGPTR)
(146Q FUNARG 105Q NLAMBDA)
()
FUNCTION D1
(L (1 ENV 0 FN)) ���A²g��@mÿg��
��h@�(16Q STKNTH)
(13Q FUNCTION 5 FUNARG)
()
\FUNCT1 D1
(L (3 VARLST 2 NTSIZE 1 NVARS 0 NNILS) P 15Q \INTERRUPTABLE P 7 \INTERRUPTABLE) �î��f1kHÑÊ‡kHÑÈÑkdHÑÈ@àÙZAàlØØmüåÑYCJLµpCJHl
ØÙâlBlØOµk
Il	g��ÒlÿåÇ¿Ig��ÓÍIBÍ¿kHÑjÏ�0¿IÒ»kHÑKÏ¿kHÑKÏ‡¿kHÑIÓÍ¿kHÑkÏ�`¿kjðhðhH
��¾kMÑN,Î�¿L¼MlÔ½±ÿ|_¿IOÐO��ÓÍ�¿IOÐOn€�ØÍ�¿O_¿OkÔ_¿OkÔ_¿OkÔ_¿±ÿY�(232Q \MAKESTACKP)
(275Q LITATOM 133Q *FUNARG* 121Q *FUNARG*)
()
\MAKEFUNARGFRAME D1
(NAME FUNARG L (0 ENV)) �P��j1@°d[d��•¿Kið–Kl#
��¿HkÔ¸µæHdlØmüåYlØØZƒhýkÙdjñ³ù¿JHI@��b�dÈjd��@�(114Q \SMASHLINK 102Q \FUNCT1 31Q \LISPERROR)
(15Q LITATOM)
()
STKEVAL D1
(L (3 INTERNALFLG 2 FLG 1 FORM 0 POS)) ����h@	��
��B”@	��¿A,�(15Q RELSTK 7 \SMASHLINK 4 \STACKARGPTR)
NIL
()
STKAPPLY D1
(NAME *ENV* L (3 FLG 2 ARGS 1 FN 0 POS)) �ˆ��h@	��
��C”@	��¿AHdlð²¿HdÁ
Ê��jð²&¿HÁ
É�X²1Hdg��ð²¿H³)H²$BkAÁ
Ê�!lð°ñg��ðHX°¶H¥AB
��j¹B°dýIkØYn�ñ–hl4
��¿µìIA�(177Q \LISPERROR 146Q FAULTAPPLY 15Q RELSTK 7 \SMASHLINK 4 \STACKARGPTR)
(127Q FUNARG 66Q NLAMBDA)
()
RETEVAL D1
(NAME *ENV* L (3 INTERNALFLG 2 FLG 1 FORM 0 POS)) �9��@	���hHkHÑÊðjð•kHÑÈ„kHÑÈ	l
Ùdjð–¿@l
����B”@	��¿A,�(63Q RELSTK 55Q \SMASHLINK 52Q \LISPERROR 3 \STACKARGPTR)
NIL
()
RETAPPLY D1
(NAME *ENV* L (3 FLG 2 ARGS 1 FN 0 POS)) �©��@	��!hHkHÑÊðjð•kHÑÈ„kHÑÈ	l
ÙXdjð–¿@l
����C”@	��¿AYdlð²dÁ
Ê��jð²&¿IÁ
É�Y²0Idg��ð²¿I³(I²#BkAÁ
Ê�!lð°ñg��ðœI°¸I¥AB
��jºB°dýJkØZn�ñ–hl4
��¿µìJA�(240Q \LISPERROR 207Q FAULTAPPLY 64Q RELSTK 56Q \SMASHLINK 53Q \LISPERROR 3 \STACKARGPTR)
(171Q FUNARG 130Q NLAMBDA)
()
BLIPVAL D1
(L (2 FLG 1 IPOS 0 BLIPTYP)) 	��Aµf‚	��@��Ó"@g��ð³!@g��ð³@g��ð³@g��ðªBið´‚±�ÖjBdið²"¿HI
��Z²@g��ðž`��JÐÉ�µ‚±�²jk£kb¿HI
��Z²@g��ð²wB`��JÐÉ�µjZñ²BJÙb¿kHÑÊðjð²ikHÑÈ°gkHÑÈHkHÑÊ‡kHÑÈÑÈdnÿñ•nÿÿÙkÙkØààlØØ»¿`��KÐÉ�g��ð²KJBÙkØàÔ»`��KÐÉ�KlÔ[°ÜkBkÙbñ²™`��JÐÉ�kHÑÈ	l
ÙXdjð¢±ÿ_h�(145Q \VAROFFSET 101Q \VAROFFSET 7 \STACKARGPTR)
(360Q \STACKSPACE 330Q \STACKSPACE 311Q *ARGVAL* 302Q \STACKSPACE 163Q \STACKSPACE 154Q *ARGVAL* 115Q \STACKSPACE 110Q *ARGVAL* 50Q *ARGVAL* 41Q *FN* 32Q *FORM* 23Q *TAIL* 13Q LITATOM)
()
SETBLIPVAL D1
(L (3 VAL 2 N 1 IPOS 0 BLIPTYP)) �é��Aµf‚	��@��Ó"@g��ð³@g��ð³@g��ðª@g��ð´‚±�»B£kb‡kBñ”B	��¿HI
��Z²@g��ð²x`��JÐÉ�ZšBJñ²BJÙb¿kHÑÊðjð²mkHÑÈ°kkHÑÈHkHÑÊ‡kHÑÈÑÈdnÿñ•nÿÿÙkÙkØààlØØ»¿`��KÐÉ�g��ð²KJBÙkØàÔ»`��KÐCÎ�CKlÔ[°ÚkBkÙbñ²—`��JÐCÎ�CkHÑÈ	l
ÙXdjð¢±ÿ\h�(102Q \VAROFFSET 74Q \ILLEGAL.ARG 7 \STACKARGPTR)
(316Q \STACKSPACE 264Q \STACKSPACE 245Q *ARGVAL* 236Q \STACKSPACE 117Q \STACKSPACE 111Q *ARGVAL* 47Q *ARGVAL* 41Q *FN* 32Q *FORM* 23Q *TAIL* 13Q LITATOM)
()
BLIPSCAN D1
(L (1 IPOS 0 BLIPTYP)) �h��Aµf‚	��!@dg��ð³dg��ð¬dg��ð¦g��ð´C@��ÓºHJ
��Y²@g��ð´`��IÐÉ�•hH
��kHÑÊðjð•kHÑÈ„kHÑÈ	l
ÙXdjð²Éh�(106Q \MAKESTACKP 57Q \VAROFFSET 7 \STACKARGPTR)
(74Q \STACKSPACE 66Q *ARGVAL* 50Q LITATOM 41Q *ARGVAL* 34Q *FN* 26Q *TAIL* 17Q *FORM*)
()
DUMMYFRAMEP D1
(L (0 POS)) �	���@i
��hð�(4 REALFRAMEP)
NIL
()
REALFRAMEP D1
(L (1 INTERPFLG 0 POS)) �
���@	��A
���(7 \REALFRAMEP 3 \STACKARGPTR)
NIL
()
REALSTKNTH D1
(L (3 OLDPOS 2 INTERPFLG 1 POS 0 N)) �Q��A	��j@ñ“j@Ù€@j@ñ²kHÑÊðjð•kHÑÈkHÑÈ	‡kHÑÈmþål
ÙXdjð‘hB
��²ÐIkÙYjñ³ÈCH
���(116Q \MAKESTACKP 77Q \REALFRAMEP 3 \STACKARGPTR)
NIL
()
\REALFRAMEP D1
(L (1 INTERPFLG 0 FRAME) F 1 \INTERNAL) �l�k@ÑÊ‡k@ÑÈÑÉ�Hdg��ð³+dg��ð‘ig��ð¨Hdg��ð²¿h@
��Qdg��ð¦dg��ð²ßhlðhðµ Hd`��‘A	��l\ðhðµ
H	��µH`���(142Q EXPRP 127Q CHCON1 63Q \SMASHLINK)
(150Q BRKINFOLST 120Q OPENFNS 76Q SELECTQ 70Q INTERNAL 52Q APPLY 43Q EVAL 34Q \INTERPRETER 25Q *ENV*)
()
(RPAQ? OPENFNS (QUOTE (APPLY* SETQ AND OR COND SELECTQ PROG PROGN PROG1 ARG SETARG ERSETQ NLSETQ 
RESETFORM RESETLST RESETVARS RPTQ SAVESETQ SETN UNDONLSETQ XNLSETQ)))
(RPAQQ \BLIPNAMES (*TAIL* *FORM* *FN* *ARGVALS*))
BACKTRACEA0001 D1
(NAME ERRORSET F 0 FLAGS F 1 IPOS F 2 EPOS F 3 MACROY F 4 PRINTFN) �F��Qµmÿ	��Rµi	��Pµjc�låjðPkåjðhðPlåjðhðPl åjðhðPlåjðTµg��
��ci�(100Q \BACKTRACE 16Q \STACKARGPTR 7 \STACKARGPTR)
(74Q PRINT)
()
BACKTRACE D1
(L (3 FILE) P 3 RESETSTATE P 2 MACROY P 0 OLDVALUE I 4 PRINTFN I 2 FLAGS I 1 EPOS I 0 IPOS F 4 RESETVARSLST) �;�C	��1g��HhhTcYo���g��
��£g��»Icg��I
��K“��J�(66Q ERROR! 61Q APPLY 36Q BACKTRACEA0001 3 OUTPUT)
(52Q OUTPUT 42Q ERROR 33Q INTERNAL 11Q OUTPUT)
( 30Q (BACKTRACEA0001))
\BACKTRACE D1
(L (11Q RADIX 10Q CNT 7 PRINTFN 6 ALINKS 5 JUNK 4 LOCALS 3 VARS 2 NAMES 1 EPOS 0 IPOS) P 0 .I7) X��
G¤lb¿g��lGh!G²o���G
��¿o���	��¿GkÔb¿@	��¹E¢±���¿��¿o���	��¿Hk@ÑÊðjð”@lÙ„k@ÑÈZ
��¿��¿Jk@ÑÊ�`jð«k@ÑÊ‡k@ÑÈŠk@ÑÊ‡k@ÑÈÑG��¿��¿o���	��¿H@
��¿o���	��¿IkG¿@G
��°kC¢D²^k@ÑÊðjð”@lÙ„k@ÑÈk@ÑÊ�`jð«k@ÑÊ‡k@ÑÈŠk@ÑÊ‡k@ÑÈÑGD“g��€i��¿BšIkG¿��¿@GD“g��€i��‡B–IkG¿A@ð³-F™k@ÑÈmþå°k@ÑÊðjð•k@ÑÈ„k@ÑÈ	l
Ùb�jð¢±þÄi�(432Q \PRINTFRAME 414Q TERPRI 377Q \PRINTBF 270Q \PRINTFRAME 252Q PRIN1 242Q PRINTNUM 234Q PRIN1 224Q TERPRI 220Q \PRINTBF 150Q TERPRI 144Q PRINTNUM 113Q PRIN1 103Q TERPRI 77Q TERPRI 66Q \STKNAME 52Q PRIN1 42Q PRINTNUM)
(425Q LOCALS 372Q LOCALS 12Q FIX)
( 247Q ", frame name= " 231Q "Frame xtn at " 110Q "Basic frame at " 47Q ": " 35Q (FIX 3))
\SCANFORNTENTRY D1
(L (1 NTENTRY 0 NMT)) �-��l@ÈlØ@HÐÈ�Zjð‘hA@IÐÈ�ð“jJÑHkÔ¸IkÔ¹°á�NIL
NIL
()
\PRINTSTK D1
(L (0 I) F 0 .I7) �*��P@
��o���	��P`��@ÐÈ�
��P`��@kØÐÈ�
��k	���(47Q SPACES 43Q PRINTNUM 26Q PRINTNUM 13Q PRIN1 4 PRINTNUM)
(32Q \STACKSPACE 17Q \STACKSPACE)
( 10Q ": ")
\PRINTFRAME D1
(L (2 VARSONLY 1 PRINTFN 0 FRAME)) –��k@ÑÊ�`jð«k@ÑÊ‡k@ÑÈŠk@ÑÊ‡k@ÑÈÑj@k@ÑÊ‡k@ÑÈÑÈdnÿñ•nÿÿÙkÙkØààlØØSB’±*@	��¿o���	��¿k@ÑÊ�0jð§o���	��¿k@ÑÊ�Pjð§o���	��¿k@ÑÊ�`jð§o���	��¿k@ÑÊ�pjð§o���	��¿k@ÑÊ�‡]jð³o���	��¿k	��¿M	��¿o���	��¿k@ÑÊðjð§o���	��¿k@Ñ¿o���	��¿��¿@lØ	��¿k@ÑÊ‡k@ÑÈÑ¿o���	��¿��¿@lØ	��¿k@Ñ¿o���	��¿��¿@lØ	��¿k@ÑÊ�`jð«k@ÑÊ‡k@ÑÈŠk@ÑÊ‡k@ÑÈÑ¿o���	��¿��¿@lØ	��¿k@ÑÊðjð£k@Ñ¿o���	��¿��¿HÊ\@l
Øj_¿¹JIñ¢±�ÜB¤I	��¿LOñ²RHOn€�Ø
��[®Bið’±�g��[¢±�¥kIÑÊ�jð²B•l	��¿K	��¿k	��¿kIÑÉ�kA°|B³zK	��¿o���°fB³lHOnÀ�Ø
��[²Ro���	��¿K	��¿o���	��¿kIÑÈ�kåjð²-kIÑ^ÊNÈ�ÑÒ[dkð–¿o���°mþå`��Òð¤o���o���ˆo���ƒo���	��¿h	��¿IlÔ¹OkÔ_¿±ÿ#B³0k@ÑÈºJIñ´&I	��¿kIÑÊ�jð™kIÑÉ�kA‚��¿IlÔ¹°Úh�(1212Q TERPRI 1163Q \PRINTSTK 1121Q TERPRI 1114Q PRIN1 1011Q PRIN1 1001Q PRIN2 774Q PRIN1 762Q \SCANFORNTENTRY 736Q PRIN1 713Q SPACES 706Q PRIN2 701Q SPACES 637Q \SCANFORNTENTRY 616Q \PRINTSTK 562Q TERPRI 556Q PRIN1 531Q \PRINTSTK 521Q TERPRI 515Q PRIN1 443Q \PRINTSTK 433Q TERPRI 427Q PRIN1 413Q \PRINTSTK 403Q TERPRI 377Q PRIN1 352Q \PRINTSTK 342Q TERPRI 336Q PRIN1 322Q PRIN1 301Q PRIN1 271Q PRIN1 264Q SPACES 257Q PRIN1 234Q PRIN1 213Q PRIN1 172Q PRIN1 151Q PRIN1 130Q PRIN1 120Q \PRINTSTK)
(1063Q \VALSPACE 653Q *local*)
( 1111Q "[padding]" 1104Q " not looked up]" 1077Q " top value]" 1072Q " non-stack binding]" 1053Q " on stack]"
 1006Q " " 771Q "[fvar " 743Q " [unbound]" 553Q "[blink, clink]" 512Q "[nametable]" 424Q "[next, pc]" 374Q
 "[fn header]" 333Q " alink]" 317Q "X, " 276Q ", " 254Q "USE=" 231Q "N, " 210Q "V, " 167Q "C, " 146Q "F, "
 125Q "[")
\PRINTBF D1
(L (3 VARSONLY 2 PRINTFN 1 NMT 0 BL)) �Ô��@k@ÑÈÙâk@ÑÊ�pÙkÙk@ÑÈjJHó’±�C¤I	��¿AµHC£��¿C’±�@	��k@ÑÊ�`jð§o���	��¿k@ÑÊ�‡jð³o���	��¿k@ÑÊ�‡	��¿k	��¿��JjØ
��[ªCið³&g��[² C•l	��¿K	��¿k	��¿`��IÐÉ�kB¿IlÔ¹JkÔZ±ÿpC³‚@Iñ¢±ÿ|I	��¿o���	��¿h	��¿IlÔ¹°âh�(310Q TERPRI 303Q PRIN1 273Q \PRINTSTK 224Q SPACES 217Q PRIN2 212Q SPACES 166Q \SCANFORNTENTRY 157Q TERPRI 153Q SPACES 146Q PRIN1 134Q PRIN1 112Q PRIN1 72Q \PRINTSTK 57Q TERPRI 46Q \PRINTSTK)
(230Q \STACKSPACE 200Q *local*)
( 300Q "[padding]" 131Q "usecnt= " 107Q "residual ")
CCODEP D1
(L (0 FN)) �?���@dlð²%dÁ
Ê��jð¿@Á
Ê�@jðhðhðÁ
É�l
ð´il
ð³ú@´	@Ê�Clð�NIL
NIL
()
EXPRP D1
(L (0 FN)) �+��@�Hdlð²dÁ
Ê��jð«¿HÁ
Ê�@jðhðÁ
É�´i�NIL
NIL
()
SUBRP D1
(L (0 FN)) ����h�NIL
NIL
()
FNTYP D1
(L (0 FN)) �±��@�Hdlð²=Á
XdÊ�@jð¥	��X°-Ê��jðhðHÉ�¸²HÊ!djð“g��dkð“g��lð³lg��H²HHdg��ð³dg��ð¥dg��ðž¿HX³'H²$g��dg��ð²¿HX¥H“g��g��g��ð´g��Hl
ð´úHÉ�Ê!djð³‘dkð³”lð²˜g���(30Q \PSEUDOCODE.REALDEF)
(256Q CEXPR* 216Q EXPR 210Q FUNARG 204Q FEXPR 200Q FEXPR* 161Q NLAMBDA 154Q EXPR* 134Q OPENLAMBDA 126Q LAMBDA 117Q CL:LAMBDA 104Q CFEXPR* 73Q CFEXPR 63Q CEXPR)
()
ARGTYPE D1
(L (0 FN)) �®��@HYdlð²"Á
Ê��jðhðHÁ
É�¸”HÊ!Hd¢±�‡b�°Õlð²fHdg��ð’ldg��ð¥dg��ð›¿HX¢H³éjdg��ð›¿HX¢H³0kg��ð—Hb�°H	��dg��ð³Ödg��ð³ádg��ð³¯g��ð´lId`��ð³l
ð´HÉ�Ê!�(170Q FNTYP)
(234Q CLOSURETYPE# 220Q FEXPR* 212Q EXPR* 203Q FEXPR 174Q EXPR 152Q FUNARG 131Q NLAMBDA 107Q OPENLAMBDA 101Q LAMBDA 70Q CL:LAMBDA)
()
NARGS D1
(L (0 FN)) �Ÿ��@AHdlð²,Á
Ê��jðhðHÁ
É�¸²HÈdnÿñ•nÿÿÙkÙ¹jIñ‘kIH²GHdg��ð³ñdg��ð¬dg��ð¦dg��ð²¿HXµj²ÒHj»Z¡KKkÔ»J°õg��ð´H	��Hl
ð´úHÉ�Èdnÿñ•nÿÿÙkÙ¼jLñ³—L�(174Q NARGS)
(163Q FUNARG 121Q OPENLAMBDA 113Q NLAMBDA 105Q LAMBDA 76Q CL:LAMBDA)
()
ARGLIST D1
(L (0 FN)) �‹��@�Hdlð²"Á
Ê��jðhðHÁ
É�¸”H	��Hµ
@g��
��X²3Hdg��ð“g��dg��ð«dg��ð¥dg��ð”¿Hg��ð²Hb�°¢Hl
ð–HÉ�	��@i
��Xµo���@
��h@ð³ôHb�±ÿy�(174Q ERROR 161Q FNCHECK 153Q \CCODEARGLIST 52Q GETPROP 37Q \CCODEARGLIST)
(124Q FUNARG 112Q OPENLAMBDA 104Q NLAMBDA 76Q LAMBDA 71Q U 64Q CL:LAMBDA 47Q EXPR)
( 170Q "Args not available:")
\CCODEARGLIST D1
(L (1 SMARTP 0 FNHD)) �ø
��@Èdnÿñ•nÿÿÙkÙAjHñ“g��Hjð‘h@ÈZ@ÈâJdjð“¿l€àlØ\Ù[djð’¿°lñ˜@LKâ��¹ˆ@LÐÉ�\µ-Jjð¨@lJI��¹HkÙj2	NdMó²]¿OY@Ê!lð²zd\²ÒA‘LLA	MµN_g��ð³$Odg��ð³d•¿O	��_¿OµOh_^¿M]°ÍO&_°õIµ	g��N
��_¿OµOh__¿NkÔ^±ÿ€O&_¿°óI�(325Q PACK* 256Q MKATOM 140Q \CCODEIVARSCAN 111Q \CCODEIVARSCAN)
(321Q *ARG* 241Q &INTERLISP 230Q &OPTIONAL 30Q U)
()
\CCODEIVARSCAN D1
(L (3 IVARS 2 SIZE 1 START 0 FNHD)) �.��@AÐ!jHÈ�ÑY²HBÐÈ�ZnÀ�åjð™JjØICb¿HkÐ¸°ÝC�NIL
NIL
()
(PUTPROPS LAMBDATRANFNS VARTYPE ALIST)
(ADDTOVAR LAMBDATRANFNS)
PROCLAIM D1
(L (0 PROCLAMATION)) �9���@´5@dg��ð²¿@‰dg��i��¿µôhg��ð´@‰dg��i��¿µôh�(60Q PUTPROP 30Q PUTPROP)
(54Q GLOBALVAR 42Q GLOBAL 24Q GLOBALLY-SPECIAL 11Q SPECIAL)
()
(PUTPROPS VARIABLE-GLOBALLY-SPECIAL-P MACRO ((VARIABLE) (GET VARIABLE (QUOTE GLOBALLY-SPECIAL))))
(PUTPROPS VARIABLE-GLOBAL-P MACRO ((VARIABLE) (GET VARIABLE (QUOTE GLOBALVAR))))
SPECIAL-FORM-P D1
(L (0 X)) ����@ÁÉ�g��'�NIL
(7 SPECIAL-FORM)
()
(PUTPROPS LLINTERP FILETYPE COMPILE-FILE)
(PUTPROPS LLINTERP COPYRIGHT ("Xerox Corporation" T 1981 1982 1983 1984 1985 1986))
NIL