diff --git a/.gitignore b/.gitignore index f0b27cf7a..7b55af800 100644 --- a/.gitignore +++ b/.gitignore @@ -27,3 +27,4 @@ core # set up by install-diff-filter.sh script .gitattributes +sources/LLREAD.LCOM.~1~ diff --git a/library/BIGBITMAPS b/library/BIGBITMAPS index b2d1ec8cb..a0da1ffcc 100644 --- a/library/BIGBITMAPS +++ b/library/BIGBITMAPS @@ -1,26 +1,30 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "XCL" BASE 10) -(FILECREATED "13-Jul-94 15:32:54" |{DSK}export>lispcore>library>BIGBITMAPS.;2| 105325 +(FILECREATED "13-Jun-2021 14:02:38"  +|{DSK}kaplan>Local>medley3.5>git-medley>library>BIGBITMAPS.;5| 113115 - |changes| |to:| (VARS BIGBITMAPSCOMS) + |changes| |to:| (FNS \\DRAWLINE.BIGBM.DASH \\DRAWLINE.BIGBM.NODASH BIGBITMAPP) + (VARS BIGBITMAPSCOMS) - |previous| |date:| "20-Jan-93 13:40:44" |{PELE:MV:ENVOS}LIBRARY>BIGBITMAPS.;10|) + |previous| |date:| "10-May-2021 15:37:51" +|{DSK}kaplan>Local>medley3.5>git-medley>library>BIGBITMAPS.;1|) -; Copyright (c) 1991, 1993, 1994 by Venue. All rights reserved. +; Copyright (c) 1991, 1993-1994, 2021 by Venue. (PRETTYCOMPRINT BIGBITMAPSCOMS) (RPAQQ BIGBITMAPSCOMS - ((DECLARE\: DONTEVAL@LOAD EVAL@COMPILE DONTCOPY (RECORDS BIGBM) + ((DECLARE\: EVAL@COMPILE DONTCOPY (RECORDS BIGBM) (CONSTANTS (|\\MaxBitMapHeight| 65535) (|\\MaxBitMapWidth| 65535) (|\\MaxBitMapWords| 131066)) (MACROS |GetNewFragment|) (MACROS |\\SFInvert|)) (INITRECORDS BIGBM) - (FNS BITBLT.BIGBM BITMAPCREATE.BIGBM BITMAPCREATE BITMAPCOPY BLTSHADE.BIGBM BITBLT + (FNS BIGBITMAPP BITBLT.BIGBM BITMAPCREATE.BIGBM BITMAPCREATE BITMAPCOPY BLTSHADE.BIGBM BITBLT \\ORG.BITBLT \\BLTSHADE.DISPLAY \\RESHOWBORDER1) - (FNS \\DRAWCIRCLE.BIGBM \\FILLCIRCLE.BIGBM \\DRAWELLIPSE.BIGBM \\DRAWCURVE.BIGBM) + (FNS \\DRAWCIRCLE.BIGBM \\FILLCIRCLE.BIGBM \\DRAWELLIPSE.BIGBM \\DRAWCURVE.BIGBM + \\DRAWLINE.BIGBM.DASH \\DRAWLINE.BIGBM.NODASH) (FNS DSPCREATE DSPDESTINATION |\\SFFixY| |\\SFFixDestination| |\\SFFixClippingRegion|) (FNS \\SW2BM BITMAPHEIGHT BITMAPWIDTH |\\SFFixFont| BITSPERPIXEL) (FNS COLORIZEBITMAP \\BWTOCOLORBLT UNCOLORIZEBITMAP) @@ -28,7 +32,7 @@ (MOVD? 'BLTSHADE 'ORG.BLTSHADE) (MOVD 'BLTSHADE.BIGBM 'BLTSHADE) (MOVD 'BITBLT 'BKBITBLT))))) -(DECLARE\: DONTEVAL@LOAD EVAL@COMPILE DONTCOPY +(DECLARE\: EVAL@COMPILE DONTCOPY (DECLARE\: EVAL@COMPILE (DATATYPE BIGBM (BIGBMWIDTH BIGBMHEIGHT BIGBMLIST)) @@ -65,11 +69,11 @@ (PUTPROPS |\\SFInvert| MACRO ((|BitMap| \y) - (* |corrects| |for| |the| |fact| |that| |alto| |bitmaps| |are| |stored| |with| - 0\,0 |as| |upper| |left| |while| |lisp| |bitmaps| |have| 0\,0 |as| |lower| - |left.| |The| |correction| |is| |actually| |off| |by| |one| - (|greater|) |because| \a |majority| |of| |the| |places| |that| |it| |is| - |called| |actually| |need| |one| |more| |than| |corrected| Y |value.|) + (* |corrects| |for| |the| |fact| |that| |alto| |bitmaps| |are| |stored| |with| + 0\,0 |as| |upper| |left| |while| |lisp| |bitmaps| |have| 0\,0 |as| |lower| + |left.| |The| |correction| |is| |actually| |off| |by| |one| + (|greater|) |because| \a |majority| |of| |the| |places| |that| |it| |is| + |called| |actually| |need| |one| |more| |than| |corrected| Y |value.|) (IDIFFERENCE (|fetch| (BITMAP BITMAPHEIGHT) |of| |BitMap|) @@ -84,6 +88,10 @@ '6) (DEFINEQ +(BIGBITMAPP + (LAMBDA (X) (* \; "Edited 13-Jun-2021 13:27 by rmk:") + (TYPE? BIGBM X))) + (BITBLT.BIGBM (LAMBDA (SRCE SRCELEFT SRCEBOTTOM DEST DESTLEFT DESTBOTTOM WIDTH HEIGHT SRCETYPE OPERATION TEXTURE CLIPPINGREGION) (* \; "Edited 24-Jan-91 11:19 by matsuda") @@ -989,6 +997,114 @@ ) (RETURN DISPLAYSTREAM))) (T (\\DRAWCURVE.DISPLAY DISPLAYSTREAM KNOTS CLOSED BRUSH DASHING)))))) + +(\\DRAWLINE.BIGBM.DASH + (LAMBDA (DISPLAYSTREAM X1 Y1 X2 Y2 BRUSH DASHING OPERATION) + (* \; "Edited 13-Jun-2021 14:02 by rmk:") + (GLOBALRESOURCES \\BRUSHBBT (LET ((DD (|fetch| IMAGEDATA |of| DISPLAYSTREAM)) + BITMAP BIGBMLIST HEIGHT BOTTOM BM YY1 YY2 |ClippingTop| + |ClippingBottom| |CTop| |CBottom|) + (SETQ BITMAP (|ffetch| |DDDestination| |of| DD)) + (SETQ BIGBMLIST (|fetch| (BIGBM BIGBMLIST) |of| BITMAP)) + (SETQ HEIGHT (BITMAPHEIGHT BITMAP)) + (SETQ |ClippingTop| (|ffetch| |DDClippingTop| |of| + DD)) + (SETQ |ClippingBottom| (|ffetch| |DDClippingBottom| + |of| DD)) + (SETQ BM (|GetNewFragment| BIGBMLIST)) + (|while| (AND BM (IGREATERP HEIGHT |ClippingBottom|)) + |do| (SETQ BOTTOM (IDIFFERENCE HEIGHT (BITMAPHEIGHT + BM))) + (SETQ |CTop| (COND + ((IGREATERP |ClippingTop| HEIGHT) + (IDIFFERENCE HEIGHT BOTTOM)) + (T (IDIFFERENCE |ClippingTop| BOTTOM))) + ) + (|if| (IGEQ |CTop| 0) + |then| (SETQ |CBottom| + (COND + ((ILESSP |ClippingBottom| BOTTOM) + 0) + (T (IDIFFERENCE |ClippingBottom| + BOTTOM)))) + (|replace| |DDDestination| |of| + DD + |with| BM) + (|replace| |DDClippingTop| |of| + DD + |with| |CTop|) + (|replace| |DDClippingBottom| + |of| DD |with| |CBottom|) + (\\LINEWITHBRUSH X1 (IDIFFERENCE Y1 BOTTOM) + X2 + (IDIFFERENCE Y2 BOTTOM) + BRUSH + (\\GOOD.DASHLST DASHING BRUSH) + DISPLAYSTREAM \\BRUSHBBT OPERATION) + (SETQ BM (|GetNewFragment| BIGBMLIST)) + (SETQ HEIGHT BOTTOM))) + (|freplace| |DDDestination| |of| DD |with| BITMAP) + (|freplace| |DDClippingTop| |of| DD |with| + |ClippingTop|) + (|freplace| |DDClippingBottom| |of| DD |with| + |ClippingBottom| + ))))) + +(\\DRAWLINE.BIGBM.NODASH + (LAMBDA (DISPLAYSTREAM X1 Y1 X2 Y2 WIDTH OPERATION COLOR) + (* \; "Edited 13-Jun-2021 13:59 by rmk:") + (LET ((DD (|fetch| IMAGEDATA |of| DISPLAYSTREAM)) + BITMAP BIGBMLIST HEIGHT BOTTOM BM |CTop| |CBottom| |ClippingTop| |ClippingBottom| YY1 YY2) + (SETQ BITMAP (|ffetch| |DDDestination| |of| DD)) + (SETQ BIGBMLIST (|fetch| (BIGBM BIGBMLIST) |of| BITMAP)) + (SETQ HEIGHT (BITMAPHEIGHT BITMAP)) + (SETQ BM (|GetNewFragment| BIGBMLIST)) + (SETQ |ClippingTop| (|ffetch| |DDClippingTop| |of| DD)) + (SETQ |ClippingBottom| (|ffetch| |DDClippingBottom| |of| DD)) + (SETQ YY1 (\\DSPTRANSFORMY (OR (FIXP Y1) + (FIXR Y1)) + DD)) + (SETQ YY2 (\\DSPTRANSFORMY (OR (FIXP Y2) + (FIXR Y2)) + DD)) + (|while| (AND BM (IGREATERP HEIGHT |ClippingBottom|)) + |do| (SETQ BOTTOM (IDIFFERENCE HEIGHT (BITMAPHEIGHT BM))) + (SETQ |CTop| (COND + ((IGREATERP |ClippingTop| HEIGHT) + (IDIFFERENCE HEIGHT BOTTOM)) + (T (IDIFFERENCE |ClippingTop| BOTTOM)))) + (COND + ((IGEQ |CTop| 0) + (SETQ |CBottom| (COND + ((ILESSP |ClippingBottom| BOTTOM) + 0) + (T (IDIFFERENCE |ClippingBottom| BOTTOM)))) + (\\CLIPANDDRAWLINE (\\DSPTRANSFORMX (OR (FIXP X1) + (FIXR X1)) + DD) + (IDIFFERENCE YY1 BOTTOM) + (\\DSPTRANSFORMX (OR (FIXP X2) + (FIXR X2)) + DD) + (IDIFFERENCE YY2 BOTTOM) + (COND + ((NULL WIDTH) + 1) + ((OR (FIXP WIDTH) + (FIXR WIDTH)))) + (SELECTQ OPERATION + (NIL (|ffetch| DDOPERATION |of| DD)) + ((REPLACE PAINT INVERT ERASE) + OPERATION) + (\\ILLEGAL.ARG OPERATION)) + BM + (|ffetch| |DDClippingLeft| |of| DD) + (SUB1 (|ffetch| |DDClippingRight| |of| DD)) + |CBottom| + (SUB1 |CTop|) + DISPLAYSTREAM COLOR))) + (SETQ BM (|GetNewFragment| BIGBMLIST)) + (SETQ HEIGHT BOTTOM))))) ) (DEFINEQ @@ -1400,14 +1516,14 @@ (RETURN COLORBITMAP)))) (\\BWTOCOLORBLT - (LAMBDA (SOURCEBWBM SLEFT SBOTTOM DESTCOLORBM DLEFT DBOTTOM WIDTH HEIGHT 0COLOR 1COLOR DESTNBITS) - (* \; "Edited 13-Jul-90 14:11 by matsuda") - - (* |blits| |from| \a |black| |and| |white| |bitmap| |into| \a |color| |bitmap| - |which| |has| DESTNBITS |bits| |per| |pixel.| - DESTCOLORBM |is| \a |pointer| |to| |the| |color| |bitmap.|) - (* |assumes| |all| |datatypes| |and| - |bounds| |have| |been| |checked|) + (LAMBDA (SOURCEBWBM SLEFT SBOTTOM DESTCOLORBM DLEFT DBOTTOM WIDTH HEIGHT 0COLOR 1COLOR DESTNBITS) + (* \; "Edited 8-May-2021 22:31 by rmk:") + + (* |blits| |from| \a |black| |and| |white| |bitmap| |into| \a |color| |bitmap| + |which| |has| DESTNBITS |bits| |per| |pixel.| + DESTCOLORBM |is| \a |pointer| |to| |the| |color| |bitmap.|) + (* |assumes| |all| |datatypes| |and| + |bounds| |have| |been| |checked|) (SELECTQ DESTNBITS (4 (PROG (MAP SRCBASE SRCHEIGHT SRCRW SRCWRD SRCOFFSET DESBASE DESHEIGHT DESRW DESWRD DESOFF NBITS DESALIGNLEFT SCR) @@ -1422,24 +1538,24 @@ (SETQ DESRW (|fetch| (BITMAP BITMAPRASTERWIDTH) |of| DESTCOLORBM)) (SETQ DESWRD (FOLDLO DLEFT 4)) (SETQ DESOFF (MOD DLEFT 4)) - (SETQ NBITS 4) (* DESTCOLORBM |is| |used| |to| - |allow| |one| |bit| |per| |pixel| - |bitblt| |operations| |on| |the| - |bitmap.|) + (SETQ NBITS 4) (* DESTCOLORBM |is| |used| |to| + |allow| |one| |bit| |per| |pixel| + |bitblt| |operations| |on| |the| + |bitmap.|) (COND - ((NOT (EQ 0 DESOFF)) (* |save| |the| |left| |bits| |of| - |the| |destination| |bitmap| |so| - |it| |can| |be| |word| |aligned.|) + ((NOT (EQ 0 DESOFF)) (* |save| |the| |left| |bits| |of| + |the| |destination| |bitmap| |so| + |it| |can| |be| |word| |aligned.|) (SETQ SCR (BITMAPCREATE 4 HEIGHT 4)) (BITBLT DESTCOLORBM (SETQ DESALIGNLEFT (LLSH DESWRD 2)) DBOTTOM SCR 0 0 DESOFF HEIGHT 'INPUT 'REPLACE))) (|for| LINECOUNTER |from| 1 |to| HEIGHT |do| - (* |linecounter| |goes| |from| 1 |to| |height| |because| |bitmaps| |are| - |stored| |internally| |with| |top| |first| |so| |subtracting| |height| |is| - |necessary| |to| |get| |offset| |of| |line| |and| |the| 1 |corrects| |for| - |height| |difference.|) + (* |linecounter| |goes| |from| 1 |to| |height| |because| |bitmaps| |are| + |stored| |internally| |with| |top| |first| |so| |subtracting| |height| |is| + |necessary| |to| |get| |offset| |of| |line| |and| |the| 1 |corrects| |for| + |height| |difference.|) (\\4BITLINEBLT (\\ADDBASE SRCBASE (IPLUS (ITIMES (IDIFFERENCE SRCHEIGHT (IPLUS LINECOUNTER @@ -1454,9 +1570,9 @@ DESWRD)) WIDTH MAP 0COLOR 1COLOR)) (COND - (DESALIGNLEFT (* |move| |the| |color| |bits| |to| - |the| |right| |and| |restore| |the| - |saved| |color| |bits.|) + (DESALIGNLEFT (* |move| |the| |color| |bits| |to| + |the| |right| |and| |restore| |the| + |saved| |color| |bits.|) (BITBLT DESTCOLORBM DESALIGNLEFT DBOTTOM DESTCOLORBM (IPLUS DESALIGNLEFT DESOFF) @@ -1464,32 +1580,32 @@ (BITBLT SCR 0 0 DESTCOLORBM DESALIGNLEFT DBOTTOM DESOFF HEIGHT 'INPUT 'REPLACE))))) - (8 ((OPCODES SUBRCALL 142 11) - SOURCEBWBM SLEFT SBOTTOM DESTCOLORBM DLEFT DBOTTOM WIDTH HEIGHT 0COLOR 1COLOR DESTNBITS) - - (* PROG (MAP SRCBASE SRCHEIGHT SRCRW SRCWRD SRCOFFSET DESBASE DESHEIGHT DESRW - DESWRD DESOFF) (SETQ MAP (|fetch| (ARRAYP BASE) |of| - (\\MAP8 0COLOR 1COLOR))) (SETQ SRCBASE (|fetch| - (BITMAP BITMAPBASE) |of| SOURCEBWBM)) (SETQ SRCHEIGHT - (|fetch| (BITMAP BITMAPHEIGHT) |of| SOURCEBWBM)) - (SETQ SRCRW (|fetch| (BITMAP BITMAPRASTERWIDTH) |of| SOURCEBWBM)) - (SETQ SRCWRD (FOLDLO SLEFT BITSPERWORD)) - (SETQ SRCOFFSET (MOD SLEFT BITSPERWORD)) - (SETQ DESBASE (|fetch| (BITMAP BITMAPBASE) |of| DESTCOLORBM)) - (SETQ DESHEIGHT (|fetch| (BITMAP BITMAPHEIGHT) |of| DESTCOLORBM)) - (SETQ DESRW (|fetch| (BITMAP BITMAPRASTERWIDTH) |of| DESTCOLORBM)) - (SETQ DESWRD (FOLDLO DLEFT 2)) (SETQ DESOFF - (MOD DLEFT 2)) (|for| LINECOUNTER |from| 1 |to| HEIGHT |do| - (* |linecounter| |goes| |from| 1 |to| |height| |because| |bitmaps| |are| - |stored| |internally| |with| |top| |first| |so| |subtracting| |height| |is| - |necessary| |to| |get| |offset| |of| |line| |and| |the| 1 |corrects| |for| - |height| |difference.|) (\\8BITLINEBLT (\\ADDBASE SRCBASE - (IPLUS (ITIMES (IDIFFERENCE SRCHEIGHT (IPLUS LINECOUNTER SBOTTOM)) SRCRW) - SRCWRD)) SRCOFFSET (\\ADDBASE DESBASE (IPLUS - (ITIMES (IDIFFERENCE DESHEIGHT (IPLUS LINECOUNTER DBOTTOM)) DESRW) DESWRD)) - DESOFF WIDTH MAP 0COLOR 1COLOR)) *) - - ) + (8 + + (* PROG (MAP SRCBASE SRCHEIGHT SRCRW SRCWRD SRCOFFSET DESBASE DESHEIGHT DESRW + DESWRD DESOFF) (SETQ MAP (|fetch| (ARRAYP BASE) |of| + (\\MAP8 0COLOR 1COLOR))) (SETQ SRCBASE (|fetch| + (BITMAP BITMAPBASE) |of| SOURCEBWBM)) (SETQ SRCHEIGHT + (|fetch| (BITMAP BITMAPHEIGHT) |of| SOURCEBWBM)) + (SETQ SRCRW (|fetch| (BITMAP BITMAPRASTERWIDTH) |of| SOURCEBWBM)) + (SETQ SRCWRD (FOLDLO SLEFT BITSPERWORD)) + (SETQ SRCOFFSET (MOD SLEFT BITSPERWORD)) + (SETQ DESBASE (|fetch| (BITMAP BITMAPBASE) |of| DESTCOLORBM)) + (SETQ DESHEIGHT (|fetch| (BITMAP BITMAPHEIGHT) |of| DESTCOLORBM)) + (SETQ DESRW (|fetch| (BITMAP BITMAPRASTERWIDTH) |of| DESTCOLORBM)) + (SETQ DESWRD (FOLDLO DLEFT 2)) (SETQ DESOFF + (MOD DLEFT 2)) (|for| LINECOUNTER |from| 1 |to| HEIGHT |do| + (* |linecounter| |goes| |from| 1 |to| |height| |because| |bitmaps| |are| + |stored| |internally| |with| |top| |first| |so| |subtracting| |height| |is| + |necessary| |to| |get| |offset| |of| |line| |and| |the| 1 |corrects| |for| + |height| |difference.|) (\\8BITLINEBLT (\\ADDBASE SRCBASE + (IPLUS (ITIMES (IDIFFERENCE SRCHEIGHT (IPLUS LINECOUNTER SBOTTOM)) SRCRW) + SRCWRD)) SRCOFFSET (\\ADDBASE DESBASE (IPLUS + (ITIMES (IDIFFERENCE DESHEIGHT (IPLUS LINECOUNTER DBOTTOM)) DESRW) DESWRD)) + DESOFF WIDTH MAP 0COLOR 1COLOR)) *) + + ((OPCODES SUBRCALL 142 11) + SOURCEBWBM SLEFT SBOTTOM DESTCOLORBM DLEFT DBOTTOM WIDTH HEIGHT 0COLOR 1COLOR DESTNBITS)) (24 (PROG (SRCBASE SRCHEIGHT SRCRW DESBASE DESHEIGHT DESRW) (SETQ SRCBASE (|fetch| (BITMAP BITMAPBASE) |of| SOURCEBWBM)) (SETQ SRCHEIGHT (|fetch| (BITMAP BITMAPHEIGHT) |of| SOURCEBWBM)) @@ -1500,10 +1616,10 @@ (|for| LINECOUNTER |from| 1 |to| HEIGHT |do| - (* |linecounter| |goes| |from| 1 |to| |height| |because| |bitmaps| |are| - |stored| |internally| |with| |top| |first| |so| |subtracting| |height| |is| - |necessary| |to| |get| |offset| |of| |line| |and| |the| 1 |corrects| |for| - |height| |difference.|) + (* |linecounter| |goes| |from| 1 |to| |height| |because| |bitmaps| |are| + |stored| |internally| |with| |top| |first| |so| |subtracting| |height| |is| + |necessary| |to| |get| |offset| |of| |line| |and| |the| 1 |corrects| |for| + |height| |difference.|) (\\24BITLINEBLT (\\ADDBASE SRCBASE (ITIMES (IDIFFERENCE SRCHEIGHT (IPLUS LINECOUNTER @@ -1630,16 +1746,17 @@ (MOVD 'BITBLT 'BKBITBLT) ) -(PUTPROPS BIGBITMAPS COPYRIGHT ("Venue" 1991 1993 1994)) +(PUTPROPS BIGBITMAPS COPYRIGHT ("Venue" 1991 1993 1994 2021)) (DECLARE\: DONTCOPY - (FILEMAP (NIL (3181 47731 (BITBLT.BIGBM 3191 . 14014) (BITMAPCREATE.BIGBM 14016 . 15358) (BITMAPCREATE - 15360 . 16962) (BITMAPCOPY 16964 . 17499) (BLTSHADE.BIGBM 17501 . 20637) (BITBLT 20639 . 22287) ( -\\ORG.BITBLT 22289 . 33858) (\\BLTSHADE.DISPLAY 33860 . 43098) (\\RESHOWBORDER1 43100 . 47729)) (47732 - 63529 (\\DRAWCIRCLE.BIGBM 47742 . 51105) (\\FILLCIRCLE.BIGBM 51107 . 55153) (\\DRAWELLIPSE.BIGBM -55155 . 59675) (\\DRAWCURVE.BIGBM 59677 . 63527)) (63530 79105 (DSPCREATE 63540 . 65970) ( -DSPDESTINATION 65972 . 69870) (|\\SFFixY| 69872 . 75594) (|\\SFFixDestination| 75596 . 76779) ( -|\\SFFixClippingRegion| 76781 . 79103)) (79106 87192 (\\SW2BM 79116 . 84140) (BITMAPHEIGHT 84142 . -84640) (BITMAPWIDTH 84642 . 85134) (|\\SFFixFont| 85136 . 86108) (BITSPERPIXEL 86110 . 87190)) (87193 -105083 (COLORIZEBITMAP 87203 . 89840) (\\BWTOCOLORBLT 89842 . 98124) (UNCOLORIZEBITMAP 98126 . 105081) -)))) + (FILEMAP (NIL (3337 48035 (BIGBITMAPP 3347 . 3493) (BITBLT.BIGBM 3495 . 14318) (BITMAPCREATE.BIGBM +14320 . 15662) (BITMAPCREATE 15664 . 17266) (BITMAPCOPY 17268 . 17803) (BLTSHADE.BIGBM 17805 . 20941) +(BITBLT 20943 . 22591) (\\ORG.BITBLT 22593 . 34162) (\\BLTSHADE.DISPLAY 34164 . 43402) ( +\\RESHOWBORDER1 43404 . 48033)) (48036 71314 (\\DRAWCIRCLE.BIGBM 48046 . 51409) (\\FILLCIRCLE.BIGBM +51411 . 55457) (\\DRAWELLIPSE.BIGBM 55459 . 59979) (\\DRAWCURVE.BIGBM 59981 . 63831) ( +\\DRAWLINE.BIGBM.DASH 63833 . 68192) (\\DRAWLINE.BIGBM.NODASH 68194 . 71312)) (71315 86890 (DSPCREATE +71325 . 73755) (DSPDESTINATION 73757 . 77655) (|\\SFFixY| 77657 . 83379) (|\\SFFixDestination| 83381 + . 84564) (|\\SFFixClippingRegion| 84566 . 86888)) (86891 94977 (\\SW2BM 86901 . 91925) (BITMAPHEIGHT +91927 . 92425) (BITMAPWIDTH 92427 . 92919) (|\\SFFixFont| 92921 . 93893) (BITSPERPIXEL 93895 . 94975)) + (94978 112868 (COLORIZEBITMAP 94988 . 97625) (\\BWTOCOLORBLT 97627 . 105909) (UNCOLORIZEBITMAP 105911 + . 112866))))) STOP diff --git a/library/BIGBITMAPS.LCOM b/library/BIGBITMAPS.LCOM index 7dcf77641..0e338ef46 100644 Binary files a/library/BIGBITMAPS.LCOM and b/library/BIGBITMAPS.LCOM differ diff --git a/library/CHAT.LCOM b/library/CHAT.LCOM index 8afdbd261..3c443781b 100644 Binary files a/library/CHAT.LCOM and b/library/CHAT.LCOM differ diff --git a/library/CLIPBOARD b/library/CLIPBOARD index ecc0e6547..ebbfaafac 100644 --- a/library/CLIPBOARD +++ b/library/CLIPBOARD @@ -1,11 +1,11 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED "23-Feb-2021 22:13:09"  -{DSK}kaplan>Local>medley3.5>git-medley>library>CLIPBOARD.;52 9082 +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS) +(FILECREATED " 3-Jul-2021 13:16:26"  +{DSK}kaplan>Local>medley3.5>git-medley>library>CLIPBOARD.;6 9185 - changes to%: (FNS CLIPBOARD-COPY-STREAM CLIPBOARD-PASTE-STREAM) + changes to%: (VARS CLIPBOARDCOMS) - previous date%: "23-Feb-2021 11:34:57" -{DSK}kaplan>Local>medley3.5>git-medley>library>CLIPBOARD.;50) + previous date%: "24-Jun-2021 21:14:38" +{DSK}kaplan>Local>medley3.5>git-medley>library>CLIPBOARD.;5) (PRETTYCOMPRINT CLIPBOARDCOMS) @@ -16,7 +16,7 @@ CLIPBOARD-COPY-STREAM CLIPBOARD-PASTE-STREAM) (FNS TEDIT.COPYTOCLIPBOARD TEDIT.EXTRACTTOCLIPBOARD) (FNS SEDIT.COPYTOCLIPBOARD) - (INITVARS (CLIPBOARD-FORMAT :UTF8)) + (INITVARS (CLIPBOARD-FORMAT :UTF-8)) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DOCOPY (FILES (SYSLOAD) UNIXCOMM UNICODE) (P (INSTALL-CLIPBOARD))) @@ -30,49 +30,49 @@ (DEFINEQ -(INSTALL-CLIPBOARD - [LAMBDA NIL (* ; "Edited 8-Aug-2020 07:59 by rmk:") - (* ; "Edited 19-Apr-2020 12:15 by rmk:") - (* ; "Edited 18-Apr-2018 23:00 by rmk:") +(INSTALL-CLIPBOARD + [LAMBDA NIL (* ; "Edited 24-Jun-2021 21:14 by rmk:") + (* ; "Edited 19-Apr-2020 12:15 by rmk:") + (* ; "Edited 18-Apr-2018 23:00 by rmk:") (CL:WHEN (GETD 'LISPINTERRUPTS.PASTE) (MOVD? 'LISPINTERRUPTS 'LISPINTERRUPTS.ORIG) (MOVD 'LISPINTERRUPTS.PASTE 'LISPINTERRUPTS)) - (INTERRUPTCHAR (CHARCODE "1,v") - '(PASTEFROMCLIPBOARD)) - (INTERRUPTCHAR (CHARCODE "1,V") - '(PASTEFROMCLIPBOARD)) - (CL:WHEN (BOUNDP 'TEDIT.READTABLE) (* ; "TEDIT") + (INTERRUPTCHAR (CHARCODE "Meta,v") + '(PASTEFROMCLIPBOARD)) + (INTERRUPTCHAR (CHARCODE "Meta,V") + '(PASTEFROMCLIPBOARD)) + (CL:WHEN (BOUNDP 'TEDIT.READTABLE) (* ; "TEDIT") - (* ;; "Paste") + (* ;; "Paste") - (TEDIT.SETFUNCTION (CHARCODE "1,v") + (TEDIT.SETFUNCTION (CHARCODE "Meta,v") (FUNCTION PASTEFROMCLIPBOARD) TEDIT.READTABLE) - (TEDIT.SETFUNCTION (CHARCODE "1,V") + (TEDIT.SETFUNCTION (CHARCODE "Meta,V") (FUNCTION PASTEFROMCLIPBOARD) TEDIT.READTABLE) - (* ;; "Copy") + (* ;; "Copy") - (TEDIT.SETFUNCTION (CHARCODE "1,c") + (TEDIT.SETFUNCTION (CHARCODE "Meta,c") (FUNCTION TEDIT.COPYTOCLIPBOARD) TEDIT.READTABLE) - (TEDIT.SETFUNCTION (CHARCODE "1,C") + (TEDIT.SETFUNCTION (CHARCODE "Meta,C") (FUNCTION TEDIT.COPYTOCLIPBOARD) TEDIT.READTABLE) - (* ;; "Extract") + (* ;; "Extract") - (TEDIT.SETFUNCTION (CHARCODE "1,X") + (TEDIT.SETFUNCTION (CHARCODE "Meta,X") (FUNCTION TEDIT.EXTRACTTOCLIPBOARD) TEDIT.READTABLE) - (TEDIT.SETFUNCTION (CHARCODE "1,x") + (TEDIT.SETFUNCTION (CHARCODE "Meta,x") (FUNCTION TEDIT.EXTRACTTOCLIPBOARD) TEDIT.READTABLE)) - (CL:WHEN (GETP 'SEDIT 'FILEDATES) (* ; - "SEDIT copy: INTERRUPTCHAR does paste") - (SEDIT:ADD-COMMAND "1,c" 'SEDIT.COPYTOCLIPBOARD) - (SEDIT:ADD-COMMAND "1,C" 'SEDIT.COPYTOCLIPBOARD) + (CL:WHEN (GETP 'SEDIT 'FILEDATES) (* ; + "SEDIT copy: INTERRUPTCHAR does paste") + (SEDIT:ADD-COMMAND "Meta,c" 'SEDIT.COPYTOCLIPBOARD "M-c" "Copy to clipboard") + (SEDIT:ADD-COMMAND "Meta,C" 'SEDIT.COPYTOCLIPBOARD) (SEDIT:RESET-COMMANDS))]) (GETCLIPBOARD @@ -184,7 +184,7 @@ T]) ) -(RPAQ? CLIPBOARD-FORMAT :UTF8) +(RPAQ? CLIPBOARD-FORMAT :UTF-8) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DOCOPY (FILESLOAD (SYSLOAD) @@ -203,8 +203,8 @@ ) (PUTPROPS CLIPBOARD COPYRIGHT (NONE)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (1309 6429 (INSTALL-CLIPBOARD 1319 . 3141) (GETCLIPBOARD 3143 . 3517) (PUTCLIPBOARD 3519 - . 3924) (PASTEFROMCLIPBOARD 3926 . 4844) (LISPINTERRUPTS.PASTE 4846 . 5267) (CLIPBOARD-COPY-STREAM -5269 . 5769) (CLIPBOARD-PASTE-STREAM 5771 . 6427)) (6430 7189 (TEDIT.COPYTOCLIPBOARD 6440 . 6721) ( -TEDIT.EXTRACTTOCLIPBOARD 6723 . 7187)) (7190 8729 (SEDIT.COPYTOCLIPBOARD 7200 . 8727))))) + (FILEMAP (NIL (1301 6531 (INSTALL-CLIPBOARD 1311 . 3243) (GETCLIPBOARD 3245 . 3619) (PUTCLIPBOARD 3621 + . 4026) (PASTEFROMCLIPBOARD 4028 . 4946) (LISPINTERRUPTS.PASTE 4948 . 5369) (CLIPBOARD-COPY-STREAM +5371 . 5871) (CLIPBOARD-PASTE-STREAM 5873 . 6529)) (6532 7291 (TEDIT.COPYTOCLIPBOARD 6542 . 6823) ( +TEDIT.EXTRACTTOCLIPBOARD 6825 . 7289)) (7292 8831 (SEDIT.COPYTOCLIPBOARD 7302 . 8829))))) STOP diff --git a/library/CLIPBOARD.LCOM b/library/CLIPBOARD.LCOM index c77009e57..5ed5a0e87 100644 Binary files a/library/CLIPBOARD.LCOM and b/library/CLIPBOARD.LCOM differ diff --git a/library/FILEBROWSER b/library/FILEBROWSER index c658179df..d1e3c02b9 100644 --- a/library/FILEBROWSER +++ b/library/FILEBROWSER @@ -1,12 +1,11 @@ -(DEFINE-FILE-INFO READTABLE "XCL" PACKAGE "INTERLISP") -(FILECREATED "27-Feb-2021 20:08:26"  -|{DSK}kaplan>Local>medley3.5>git-medley>library>FILEBROWSER.;33| 261320 +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "XCL" BASE 10 FORMAT XCCS) +(FILECREATED " 9-Jul-2021 23:09:57"  +|{DSK}kaplan>Local>medley3.5>git-medley>library>FILEBROWSER.;4| 262331 - |changes| |to:| (FNS FB.EDITCOMMAND.ONEFILE FB.FINISH.COMMAND FB.MAKE.BROWSER.BUSY - FB.EDITCOMMAND) + |changes| |to:| (FNS FB.EDITCOMMAND.ONEFILE) - |previous| |date:| "25-Feb-2021 13:24:50" -|{DSK}kaplan>Local>medley3.5>git-medley>library>FILEBROWSER.;27|) + |previous| |date:| "27-Feb-2021 20:08:26" +|{DSK}kaplan>Local>medley3.5>git-medley>library>FILEBROWSER.;2|) ; Copyright (c) 1983-1991, 1993-1994, 1999-2001, 2021 by Venue & Xerox Corporation. @@ -1679,7 +1678,8 @@ Your deletions are thus ignored."))) ELSE (FB.FASTSEECOMMAND BROWSER KEY ITEM MENU))))) (FB.EDITCOMMAND.ONEFILE - (LAMBDA (BROWSER FILE OPTION ITEM MENU) (* \; "Edited 27-Feb-2021 20:07 by rmk:") + (LAMBDA (BROWSER FILE OPTION ITEM MENU) (* \; "Edited 9-Jul-2021 23:08 by rmk:") + (* \; "Edited 27-Feb-2021 20:07 by rmk:") (* \; "Edited 1-Feb-88 19:00 by bvm:") (* |;;| "Called when we know that FILE is a file, not a directory, and that TEDIT exists. If OPTION is READONLY, we don't want to edit, just view. If FILE is a lisp sourcefile, we execute the font changes by COPY.TEXT.TO.IMAGE.") @@ -1690,60 +1690,72 @@ Your deletions are thus ignored."))) (CL:MULTIPLE-VALUE-BIND (IGNORE CONDITION) (IGNORE-ERRORS - (IF (LISPSOURCEFILEP FILE) - THEN (SELECTQ OPTION - ((LISP NIL TEDIT) - (* |;;| + (LET ((ENV (LISPSOURCEFILEP FILE))) + (IF ENV + THEN (SELECTQ OPTION + ((LISP NIL TEDIT) + (* |;;| "Asks to load prop and edits the coms. We really don't want to use a text editor on a source file.") - - (* |;;| "The FUNCALL at the bottom is concerning.") - - (SHADEITEM ITEM MENU FB.ITEMUNSELECTEDSHADE) - (PUTMENUPROP MENU 'ITEMSHADE (CONS ITEM FB.ITEMUNSELECTEDSHADE)) - (FB.EDITLISPFILE FILE BROWSER)) - (READONLY (* \; "READONLY on call from SEE") - (CL:WITH-OPEN-FILE - (STREAM FILE :DIRECTION :INPUT) - (LET ((NSTR (OPENTEXTSTREAM))) - (COPY.TEXT.TO.IMAGE STREAM NSTR) + + (* |;;| "The FUNCALL at the bottom is concerning.") + + (SHADEITEM ITEM MENU FB.ITEMUNSELECTEDSHADE) + (PUTMENUPROP MENU 'ITEMSHADE (CONS ITEM FB.ITEMUNSELECTEDSHADE)) + (FB.EDITLISPFILE FILE BROWSER)) + (READONLY (* \; "READONLY on call from SEE") + (CL:WITH-OPEN-FILE + (STREAM FILE :DIRECTION :INPUT) + (LET ((NSTR (OPENTEXTSTREAM))) + (\\EXTERNALFORMAT STREAM (FETCH (READER-ENVIRONMENT + REFORMAT) + OF ENV)) + (COPY.TEXT.TO.IMAGE STREAM NSTR) (* |;;| "Unshade the item before we create the TEDIT window, and tell FB.FINISH.COMMAND that we did that. That way, the FB window won't pop up on top.") - (SHADEITEM ITEM MENU FB.ITEMUNSELECTEDSHADE) - (PUTMENUPROP MENU 'ITEMSHADE (CONS ITEM FB.ITEMUNSELECTEDSHADE - )) - (WINDOWPROP (WFROMDS (TEXTSTREAM (TEDIT NSTR NIL NIL - '(READONLY T)))) - 'TITLE - (CONCAT "SEE window for " (FULLNAME STREAM)))))) - (CL:FUNCALL OPTION (MKATOM FILE))) - ELSE (SELECTQ OPTION - (READONLY - (* |;;| "From SEE command. We want to be able to scroll around in the content, can't do that if it isn't random access. So in that case we do a secret NODIRCORE copy and look at that.") - - (CL:WITH-OPEN-FILE - (STREAM FILE :DIRECTION :INPUT) - (LET ((NSTR)) - (CL:UNLESS (RANDACCESSP STREAM) - (SETQ NSTR (OPENSTREAM '{NODIRCORE} 'BOTH 'NEW NIL - (LIST (LIST 'TYPE (GETFILEINFO - STREAM - 'TYPE))))) - (COPYBYTES STREAM NSTR)) - (SHADEITEM ITEM MENU FB.ITEMUNSELECTEDSHADE) - (PUTMENUPROP MENU 'ITEMSHADE (CONS ITEM FB.ITEMUNSELECTEDSHADE)) - (WINDOWPROP (WFROMDS (TEXTSTREAM (TEDIT (OR NSTR STREAM) - NIL NIL - '(READONLY T)))) - 'TITLE - (CONCAT "SEE window for " (FULLNAME STREAM)))))) - ((TEDIT NIL) - (SHADEITEM ITEM MENU FB.ITEMUNSELECTEDSHADE) - (PUTMENUPROP MENU 'ITEMSHADE (CONS ITEM FB.ITEMUNSELECTEDSHADE)) - (TEDIT (MKATOM FILE))) - (LISP (FB.PROMPTW.FORMAT BROWSER "Failed because not a Lisp source file")) - (CL:FUNCALL OPTION (MKATOM FILE))))) + (SHADEITEM ITEM MENU FB.ITEMUNSELECTEDSHADE) + (PUTMENUPROP MENU 'ITEMSHADE (CONS ITEM + FB.ITEMUNSELECTEDSHADE + )) + (WINDOWPROP (WFROMDS (TEXTSTREAM + (TEDIT NSTR NIL NIL + '(READONLY T)))) + 'TITLE + (CONCAT "SEE window for " (FULLNAME STREAM)))))) + (CL:FUNCALL OPTION (MKATOM FILE))) + ELSE (SELECTQ OPTION + (READONLY + + (* |;;| "From SEE command. We want to be able to scroll around in the content, can't do that if it isn't random access. So in that case we do a secret NODIRCORE copy and look at that.") + + (CL:WITH-OPEN-FILE + (STREAM FILE :DIRECTION :INPUT) + (LET ((NSTR)) + (CL:UNLESS (RANDACCESSP STREAM) + (SETQ NSTR (OPENSTREAM + '{NODIRCORE} + 'BOTH + 'NEW NIL (LIST (LIST 'TYPE + (GETFILEINFO + STREAM + 'TYPE))))) + (COPYBYTES STREAM NSTR)) + (SHADEITEM ITEM MENU FB.ITEMUNSELECTEDSHADE) + (PUTMENUPROP MENU 'ITEMSHADE (CONS ITEM + FB.ITEMUNSELECTEDSHADE)) + (WINDOWPROP (WFROMDS (TEXTSTREAM (TEDIT (OR NSTR STREAM) + NIL NIL + '(READONLY T)))) + 'TITLE + (CONCAT "SEE window for " (FULLNAME STREAM)))))) + ((TEDIT NIL) + (SHADEITEM ITEM MENU FB.ITEMUNSELECTEDSHADE) + (PUTMENUPROP MENU 'ITEMSHADE (CONS ITEM FB.ITEMUNSELECTEDSHADE)) + (TEDIT (MKATOM FILE))) + (LISP (FB.PROMPTW.FORMAT BROWSER + "Failed because not a Lisp source file")) + (CL:FUNCALL OPTION (MKATOM FILE)))))) (|if| CONDITION |then| (FB.PROMPTW.FORMAT BROWSER "Failed because ~A" CONDITION))))) @@ -4212,50 +4224,50 @@ then click Recompute")))) (PUTPROPS FILEBROWSER COPYRIGHT ("Venue & Xerox Corporation" 1983 1984 1985 1986 1987 1988 1989 1990 1991 1993 1994 1999 2000 2001 2021)) (DECLARE\: DONTCOPY - (FILEMAP (NIL (28186 50822 (FB 28196 . 29152) (FB.COPYBINARYCOMMAND 29154 . 29500) (FB.COPYTEXTCOMMAND - 29502 . 29844) (FILEBROWSER 29846 . 42952) (FB.TABLEBROWSER 42954 . 43171) (FB.SELECTEDFILES 43173 . -43810) (FB.FETCHFILENAME 43812 . 44204) (FB.DIRECTORYP 44206 . 44534) (FB.PROMPTWPRINT 44536 . 45582) -(FB.PROMPTW.FORMAT 45584 . 46321) (FB.PROMPTFORINPUT 46323 . 48575) (FB.YES-OR-NO-P 48577 . 49611) ( -FB.ALLOW.ABORT 49613 . 50467) (\\FB.HARDCOPY.TOFILE.EXTENSION 50469 . 50820)) (50846 51799 (FB.STARTUP - 50856 . 51371) (FB.MAKERIGIDWINDOW 51373 . 51797)) (51800 57172 (FB.PRINTFN 51810 . 56963) (FB.COPYFN - 56965 . 57170)) (57222 63264 (FB.MENU.WHENSELECTEDFN 57232 . 57590) (FB.COMMANDSELECTEDFN 57592 . -59131) (FB.SUBITEMP 59133 . 59568) (FB.MAKE.BROWSER.BUSY 59570 . 60308) (FB.FINISH.COMMAND 60310 . -62275) (FB.HANDLE.ABORT.BUTTON 62277 . 63262)) (63265 68781 (FB.DELETECOMMAND 63275 . 63556) ( -FB.DELVERCOMMAND 63558 . 66751) (FB.IS.NOT.SUBDIRECTORY.ITEM 66753 . 66934) (FB.DELVER.FILES 66936 . -68025) (FB.DELETE.FILE 68027 . 68779)) (68782 70107 (FB.UNDELETECOMMAND 68792 . 69077) ( -FB.UNDELETEALLCOMMAND 69079 . 69358) (FB.UNDELETE.FILE 69360 . 70105)) (70108 94289 (FB.COPYCOMMAND -70118 . 70387) (FB.RENAMECOMMAND 70389 . 70664) (FB.COPY/RENAME.COMMAND 70666 . 71589) ( -FB.COPY/RENAME.ONE 71591 . 73913) (FB.COPY/RENAME.MANY 73915 . 80135) (FB.MERGE.DIRECTORIES 80137 . -80555) (FB.GREATEST.PREFIX 80557 . 81913) (FB.MAYBE.INSERT.FILE 81915 . 89355) (FB.GET.NEW.FILE.SPEC -89357 . 93188) (FB.CANONICAL.DIRECTORY 93190 . 94287)) (94290 102074 (FB.HARDCOPYCOMMAND 94300 . 95430 -) (FB.HARDCOPY.TOFILE 95432 . 102072)) (102075 113638 (FB.EDITCOMMAND 102085 . 102886) ( -FB.EDITCOMMAND.ONEFILE 102888 . 107854) (FB.EDITLISPFILE 107856 . 108895) (FB.BROWSECOMMAND 108897 . -113636)) (113639 125432 (FB.FASTSEECOMMAND 113649 . 117099) (FB.FASTSEE.ONEFILE 117101 . 120130) ( -FB.SEEFULLFN 120132 . 124263) (FB.SEEBUTTONFN 124265 . 125430)) (125433 127179 (FB.LOADCOMMAND 125443 - . 125950) (FB.COMPILECOMMAND 125952 . 126490) (FB.OPERATE.ON.FILES 126492 . 127177)) (127180 174229 ( -FB.UPDATECOMMAND 127190 . 127415) (FB.MAYBE.EXPUNGE 127417 . 128412) (FB.UPDATEBROWSERITEMS 128414 . -141629) (FB.DATE 141631 . 142372) (FB.ADJUST.DATE.WIDTH 142374 . 145342) (FB.SET.BROWSER.TITLE 145344 - . 146201) (FB.MAYBE.WIDEN.NAMES 146203 . 148322) (FB.SET.DEFAULT.NAME.WIDTH 148324 . 149688) ( -FB.CREATE.FILEBUCKET 149690 . 156910) (FB.CHECK.NAME.LENGTH 156912 . 159333) (FB.ADD.FILEGROUP 159335 - . 160862) (FB.INSERT.DIRECTORY 160864 . 161102) (FB.MAKE.SUBDIRECTORY.ITEM 161104 . 162513) ( -FB.ADD.FILE 162515 . 163128) (FB.INSERT.FILE 163130 . 166542) (FB.ANALYZE.PATTERN 166544 . 171808) ( -FB.CANONICALIZE.PATTERN 171810 . 173122) (FB.GETALLFILEINFO 173124 . 174227)) (174230 182389 ( -FB.SORT.VERSIONS 174240 . 177011) (FB.DECREASING.VERSION 177013 . 177682) (FB.INCREASING.VERSION -177684 . 178305) (FB.NAMES.DECREASING.VERSION 178307 . 179342) (FB.NAMES.INCREASING.VERSION 179344 . -180341) (FB.DECREASING.NUMERIC.ATTR 180343 . 181023) (FB.INCREASING.NUMERIC.ATTR 181025 . 181699) ( -FB.ALPHABETIC.ATTR 181701 . 182387)) (182390 192232 (FB.SORTCOMMAND 182400 . 189230) ( -FB.INSERT.SUBDIRECTORIES 189232 . 190029) (FB.GET.SORT.MENU 190031 . 192230)) (192233 208322 ( -FB.EXPUNGECOMMAND 192243 . 194762) (FB.NEWPATTERNCOMMAND 194764 . 195162) (FB.NEWINFOCOMMAND 195164 . -197930) (FB.DEPTHCOMMAND 197932 . 199707) (FB.SHAPECOMMAND 199709 . 203051) (FB.REMOVE.FILE 203053 . -204874) (FB.COUNT.FILE.CHANGE 204876 . 206321) (FB.SETNEWPATTERN 206323 . 207493) (FB.GET.NEWPATTERN -207495 . 208079) (FB.OPTIONSCOMMAND 208081 . 208320)) (208357 209369 ( -FB.INFOMENU.SHADEINITIALSELECTIONS 208367 . 209014) (FB.INFO.ITEM.NAMED 209016 . 209367)) (209370 -218836 (FB.MAKECOUNTERWINDOW 209380 . 210842) (FB.COUNTERW.REDISPLAYFN 210844 . 211431) ( -FB.UPDATE.COUNTERS 211433 . 213505) (FB.DISPLAY.COUNTERS 213507 . 218567) (FB.COUNTER.STRING 218569 . -218834)) (218837 223480 (FB.MAKEHEADINGWINDOW 218847 . 220395) (FB.HEADINGW.REDISPLAYFN 220397 . -220663) (FB.HEADINGW.RESHAPEFN 220665 . 221041) (FB.HEADINGW.DISPLAY 221043 . 223478)) (223481 227664 -(FB.ICONFN 223491 . 223838) (FB.INFOMENU.WHENSELECTEDFN 223840 . 224570) (FB.CLOSEFN 224572 . 225775) -(FB.EXPUNGE?.MENU 225777 . 226189) (FB.AFTERCLOSEFN 226191 . 226552) (FB.CLOSE&EXPUNGE 226554 . 227662 -)) (227665 239723 (FB.HARDCOPY.DIRECTORY 227675 . 238032) (FB.HARDCOPY.PRINT.TITLE 238034 . 238360) ( -FB.HARDCOPY.MAXWIDTH 238362 . 239721))))) + (FILEMAP (NIL (28124 50760 (FB 28134 . 29090) (FB.COPYBINARYCOMMAND 29092 . 29438) (FB.COPYTEXTCOMMAND + 29440 . 29782) (FILEBROWSER 29784 . 42890) (FB.TABLEBROWSER 42892 . 43109) (FB.SELECTEDFILES 43111 . +43748) (FB.FETCHFILENAME 43750 . 44142) (FB.DIRECTORYP 44144 . 44472) (FB.PROMPTWPRINT 44474 . 45520) +(FB.PROMPTW.FORMAT 45522 . 46259) (FB.PROMPTFORINPUT 46261 . 48513) (FB.YES-OR-NO-P 48515 . 49549) ( +FB.ALLOW.ABORT 49551 . 50405) (\\FB.HARDCOPY.TOFILE.EXTENSION 50407 . 50758)) (50784 51737 (FB.STARTUP + 50794 . 51309) (FB.MAKERIGIDWINDOW 51311 . 51735)) (51738 57110 (FB.PRINTFN 51748 . 56901) (FB.COPYFN + 56903 . 57108)) (57160 63202 (FB.MENU.WHENSELECTEDFN 57170 . 57528) (FB.COMMANDSELECTEDFN 57530 . +59069) (FB.SUBITEMP 59071 . 59506) (FB.MAKE.BROWSER.BUSY 59508 . 60246) (FB.FINISH.COMMAND 60248 . +62213) (FB.HANDLE.ABORT.BUTTON 62215 . 63200)) (63203 68719 (FB.DELETECOMMAND 63213 . 63494) ( +FB.DELVERCOMMAND 63496 . 66689) (FB.IS.NOT.SUBDIRECTORY.ITEM 66691 . 66872) (FB.DELVER.FILES 66874 . +67963) (FB.DELETE.FILE 67965 . 68717)) (68720 70045 (FB.UNDELETECOMMAND 68730 . 69015) ( +FB.UNDELETEALLCOMMAND 69017 . 69296) (FB.UNDELETE.FILE 69298 . 70043)) (70046 94227 (FB.COPYCOMMAND +70056 . 70325) (FB.RENAMECOMMAND 70327 . 70602) (FB.COPY/RENAME.COMMAND 70604 . 71527) ( +FB.COPY/RENAME.ONE 71529 . 73851) (FB.COPY/RENAME.MANY 73853 . 80073) (FB.MERGE.DIRECTORIES 80075 . +80493) (FB.GREATEST.PREFIX 80495 . 81851) (FB.MAYBE.INSERT.FILE 81853 . 89293) (FB.GET.NEW.FILE.SPEC +89295 . 93126) (FB.CANONICAL.DIRECTORY 93128 . 94225)) (94228 102012 (FB.HARDCOPYCOMMAND 94238 . 95368 +) (FB.HARDCOPY.TOFILE 95370 . 102010)) (102013 114649 (FB.EDITCOMMAND 102023 . 102824) ( +FB.EDITCOMMAND.ONEFILE 102826 . 108865) (FB.EDITLISPFILE 108867 . 109906) (FB.BROWSECOMMAND 109908 . +114647)) (114650 126443 (FB.FASTSEECOMMAND 114660 . 118110) (FB.FASTSEE.ONEFILE 118112 . 121141) ( +FB.SEEFULLFN 121143 . 125274) (FB.SEEBUTTONFN 125276 . 126441)) (126444 128190 (FB.LOADCOMMAND 126454 + . 126961) (FB.COMPILECOMMAND 126963 . 127501) (FB.OPERATE.ON.FILES 127503 . 128188)) (128191 175240 ( +FB.UPDATECOMMAND 128201 . 128426) (FB.MAYBE.EXPUNGE 128428 . 129423) (FB.UPDATEBROWSERITEMS 129425 . +142640) (FB.DATE 142642 . 143383) (FB.ADJUST.DATE.WIDTH 143385 . 146353) (FB.SET.BROWSER.TITLE 146355 + . 147212) (FB.MAYBE.WIDEN.NAMES 147214 . 149333) (FB.SET.DEFAULT.NAME.WIDTH 149335 . 150699) ( +FB.CREATE.FILEBUCKET 150701 . 157921) (FB.CHECK.NAME.LENGTH 157923 . 160344) (FB.ADD.FILEGROUP 160346 + . 161873) (FB.INSERT.DIRECTORY 161875 . 162113) (FB.MAKE.SUBDIRECTORY.ITEM 162115 . 163524) ( +FB.ADD.FILE 163526 . 164139) (FB.INSERT.FILE 164141 . 167553) (FB.ANALYZE.PATTERN 167555 . 172819) ( +FB.CANONICALIZE.PATTERN 172821 . 174133) (FB.GETALLFILEINFO 174135 . 175238)) (175241 183400 ( +FB.SORT.VERSIONS 175251 . 178022) (FB.DECREASING.VERSION 178024 . 178693) (FB.INCREASING.VERSION +178695 . 179316) (FB.NAMES.DECREASING.VERSION 179318 . 180353) (FB.NAMES.INCREASING.VERSION 180355 . +181352) (FB.DECREASING.NUMERIC.ATTR 181354 . 182034) (FB.INCREASING.NUMERIC.ATTR 182036 . 182710) ( +FB.ALPHABETIC.ATTR 182712 . 183398)) (183401 193243 (FB.SORTCOMMAND 183411 . 190241) ( +FB.INSERT.SUBDIRECTORIES 190243 . 191040) (FB.GET.SORT.MENU 191042 . 193241)) (193244 209333 ( +FB.EXPUNGECOMMAND 193254 . 195773) (FB.NEWPATTERNCOMMAND 195775 . 196173) (FB.NEWINFOCOMMAND 196175 . +198941) (FB.DEPTHCOMMAND 198943 . 200718) (FB.SHAPECOMMAND 200720 . 204062) (FB.REMOVE.FILE 204064 . +205885) (FB.COUNT.FILE.CHANGE 205887 . 207332) (FB.SETNEWPATTERN 207334 . 208504) (FB.GET.NEWPATTERN +208506 . 209090) (FB.OPTIONSCOMMAND 209092 . 209331)) (209368 210380 ( +FB.INFOMENU.SHADEINITIALSELECTIONS 209378 . 210025) (FB.INFO.ITEM.NAMED 210027 . 210378)) (210381 +219847 (FB.MAKECOUNTERWINDOW 210391 . 211853) (FB.COUNTERW.REDISPLAYFN 211855 . 212442) ( +FB.UPDATE.COUNTERS 212444 . 214516) (FB.DISPLAY.COUNTERS 214518 . 219578) (FB.COUNTER.STRING 219580 . +219845)) (219848 224491 (FB.MAKEHEADINGWINDOW 219858 . 221406) (FB.HEADINGW.REDISPLAYFN 221408 . +221674) (FB.HEADINGW.RESHAPEFN 221676 . 222052) (FB.HEADINGW.DISPLAY 222054 . 224489)) (224492 228675 +(FB.ICONFN 224502 . 224849) (FB.INFOMENU.WHENSELECTEDFN 224851 . 225581) (FB.CLOSEFN 225583 . 226786) +(FB.EXPUNGE?.MENU 226788 . 227200) (FB.AFTERCLOSEFN 227202 . 227563) (FB.CLOSE&EXPUNGE 227565 . 228673 +)) (228676 240734 (FB.HARDCOPY.DIRECTORY 228686 . 239043) (FB.HARDCOPY.PRINT.TITLE 239045 . 239371) ( +FB.HARDCOPY.MAXWIDTH 239373 . 240732))))) STOP diff --git a/library/FILEBROWSER.LCOM b/library/FILEBROWSER.LCOM index 444d474dd..3589a1433 100644 Binary files a/library/FILEBROWSER.LCOM and b/library/FILEBROWSER.LCOM differ diff --git a/library/MASTERSCOPE b/library/MASTERSCOPE index 24d410140..654e187b7 100644 --- a/library/MASTERSCOPE +++ b/library/MASTERSCOPE @@ -1,9 +1,11 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED " 7-Mar-2021 19:39:11" {DSK}larry>ilisp>medley>library>MASTERSCOPE.;6 193444 +(FILECREATED "13-Jun-2021 09:05:17"  +{DSK}kaplan>Local>medley3.5>git-medley>library>MASTERSCOPE.;6 196680 - changes to%: (VARS MASTERSCOPECOMS MSDATABASECOMS) + changes to%: (FNS MSINTERPRETSET) - previous date%: " 3-Mar-2021 09:08:58" {DSK}larry>ilisp>medley>library>MASTERSCOPE.;5) + previous date%: " 9-Jun-2021 23:55:26" +{DSK}kaplan>Local>medley3.5>git-medley>library>MASTERSCOPE.;5) (* ; " @@ -1328,36 +1330,53 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo (DEFINEQ (DUMPDATABASE - [LAMBDA (FNLST) (* lmm "12-APR-81 15:57") - (PROG (DUMPEDFLG) - (DECLARE (SPECVARS DUMPEDFLG DUMPTABLE)) - (COND - (FNLST (MAPC FNLST (FUNCTION UPDATEFN))) - (T (UPDATECHANGED))) - (PRINT '(READATABASE)) - (PRIN1 '%() - (TERPRI) - [for DUMPTABLE in MSDATABASELST when (NOT (MEMB (CAR DUMPTABLE) - NODUMPRELATIONS)) - do (SETQ DUMPEDFLG NIL) - [COND - ((OR (NOT FNLST) - (EQ (CDDR DUMPTABLE) - T)) - - (* either dumping everything, or this is a permanent table which should be - dumped in entirity (e.g. templates)) - - (MAPTABLE (CADR DUMPTABLE) - (FUNCTION DUMPDATABASE1))) - (T (MAPC FNLST (FUNCTION (LAMBDA (FN) - (DUMPDATABASE1 (GETTABLE FN (CADR DUMPTABLE)) - FN] - (COND - (DUMPEDFLG (PRINT] - (TERPRI) - (PRIN1 '%)) - (TERPRI]) + [LAMBDA (FNLST FILE) (* ; "Edited 22-May-2021 00:01 by rmk:") + + (* ;; "RMK: Added FILE argument to provide an interface to a standard PRETTYDEF file (MAKEFILE but without all of the coms and fileproperty stuff.") + + (IF FILE + THEN + + (* ;; "If FILE is provided, then we construct a command for that file so that the database will be dumped by a call to PRETTYDEF that includes whatever contextual information (e.g. package, readtable) that makes the database LOAD(able).") + + (RESETLST + [PRETTYDEF NIL FILE `((E (DUMPDATABASE ,(CL:WHEN FNLST + (KWOTE (MKLIST FNLST)))]) + ELSE + + (* ;; "FILE is NIL, then we presume that it is already open and that whatever header information is needed to ensure LOADability has already been written.") + + (PROG (DUMPEDFLG) + (DECLARE (SPECVARS DUMPEDFLG DUMPTABLE)) + (COND + (FNLST (MAPC FNLST (FUNCTION UPDATEFN))) + (T (UPDATECHANGED))) + (PRINT '(READATABASE)) + (PRIN1 '%() + (TERPRI) + [for DUMPTABLE in MSDATABASELST when (NOT (MEMB (CAR DUMPTABLE) + NODUMPRELATIONS)) + do (SETQ DUMPEDFLG NIL) + [COND + ((OR (NOT FNLST) + (EQ (CDDR DUMPTABLE) + T)) + + (* either dumping everything, or this is a permanent table which should be + dumped in entirity (e.g. templates)) + + (MAPTABLE (CADR DUMPTABLE) + (FUNCTION DUMPDATABASE1))) + (T (MAPC FNLST (FUNCTION (LAMBDA (FN) + (DUMPDATABASE1 (GETTABLE FN (CADR + DUMPTABLE + )) + FN] + (COND + (DUMPEDFLG (PRINT] + (TERPRI) + (PRIN1 '%)) + (TERPRI]) (DUMPDATABASE1 [LAMBDA (VALUE FN) (* rmk%: "24-OCT-79 10:02") @@ -2559,7 +2578,7 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo (* ; "interactive routines") -(RPAQ MASTERSCOPEDATE " 7-Mar-2021") +(RPAQ MASTERSCOPEDATE "13-Jun-2021") (ADDTOVAR HISTORYCOMS %.) (DEFINEQ @@ -2649,10 +2668,10 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo (DEFINEQ (MSINTERPRETSET - [LAMBDA (SET OP ARG) (* ; "Edited 15-Aug-90 11:50 by jds") + [LAMBDA (SET OP ARG) (* ; "Edited 13-Jun-2021 09:04 by rmk:") - (* ;; "DECLARATIONS%%: (RECORDS SENTENCE MSSETPHRASE)") - (* ; "Edited 3-Jun-88 12:42 by jrb:") + (* ;; "DECLARATIONS%%: (RECORDS SENTENCE MSSETPHRASE)") + (* ; "Edited 3-Jun-88 12:42 by jrb:") (PROG (TEM TYPE (REP (fetch (MSSETPHRASE REP) of SET))) START [COND @@ -2698,7 +2717,7 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo (CHECK ARG) ((LIST HARD) - (* ;; "got a list of dotted pairs of hash tables and another set; want to know the set of all things which have the given relation to any in the other set") + (* ;; "got a list of dotted pairs of hash tables and another set; want to know the set of all things which have the given relation to any in the other set") (PROG ((HTABS (fetch (INRELATION HTABLES) of REP)) (INVERTED (fetch (INRELATION INVERTED) @@ -2759,8 +2778,9 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo (SHOULDNT 12))) (QUOTE (SELECTQ OP (CHECK (COND - (ARG (SETQ NEEDUPDATE (UNION NEEDUPDATE (fetch QUOTED - of REP))) + (ARG (SETQ NEEDUPDATE (UNION NEEDUPDATE (fetch + 'QUOTED of + REP))) NIL))) ((HARD LIST) (SETQ TYPE (OR (fetch (MSSETPHRASE TYPE) of SET) @@ -2768,7 +2788,7 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo (COND ([AND ARG (NEQ ARG 'FILES) (NEQ TYPE 'FILES) - (FMEMB (SETQ TEM (fetch QUOTED of REP)) + (FMEMB (SETQ TEM (fetch 'QUOTED of REP)) FILELST) (COND ((EQ ARG 'KNOWN) @@ -2779,28 +2799,29 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo ((EQ ARG 'KNOWN) 'FNS) (T ARG))) - (SETQ TEM (for FILE in (fetch QUOTED of REP) + (SETQ TEM (for FILE in (fetch 'QUOTED of + REP) join (ONFILE FILE ARG))) - (printout T (fetch QUOTED of REP) + (printout T (fetch 'QUOTED of REP) " => ON " - (fetch QUOTED of REP) + (fetch 'QUOTED of REP) T) - (replace QUOTED of (fetch (MSSETPHRASE REP) - of SET) with TEM)) + (replace 'QUOTED of (fetch (MSSETPHRASE REP) + of SET) with TEM)) (T (COND ([AND (EQ TYPE 'FNS) - (GETP (fetch QUOTED of REP) + (GETP (fetch 'QUOTED of REP) 'CLISPWORD) - (NOT (GETD (fetch QUOTED of REP] - (printout T "Warning: " (fetch QUOTED of REP) + (NOT (GETD (fetch 'QUOTED of REP] + (printout T "Warning: " (fetch 'QUOTED of REP) "is a CLISP word and is not treated like a function!" T))) - (fetch QUOTED of REP)))) - (MEMB (FMEMB ARG (fetch QUOTED of REP))) + (fetch 'QUOTED of REP)))) + (MEMB (FMEMB ARG (fetch 'QUOTED of REP))) (SHOULDNT 13))) (OR - (* ;; "I.e. WHO ON MYFILE OR @ EXPRP CALL X --- if either of the sets need to be KNOWN and are 'vague' then the entire world needs to be updated") + (* ;; "I.e. WHO ON MYFILE OR @ EXPRP CALL X --- if either of the sets need to be KNOWN and are 'vague' then the entire world needs to be updated") (SELECTQ OP (CHECK ([LAMBDA (X) @@ -2838,8 +2859,8 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo (MSINTERPRETSET (fetch (CSET SET2) of REP) 'MEMB ARG))) (SHOULDNT 14))) - (AND (* ; -"I.e. WHO ON MYFILE AND @ EXPRP CALL Z -- only if both sets are vague does the world need updating") + (AND (* ; +"I.e. WHO ON MYFILE AND @ EXPRP CALL Z -- only if both sets are vague does the world need updating") (SELECTQ OP (CHECK ([LAMBDA (X) (OR (MSINTERPRETSET (fetch (CSET SET2) of REP) @@ -2877,55 +2898,58 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo 'MEMB ARG))) (SHOULDNT 15))) (ANDNOT (replace (SENTENCE ID) of REP with 'AND) - [replace (MSSETPHRASE REP) of (fetch SET2 of REP) + [replace (MSSETPHRASE REP) of (fetch (CSET SET2) of REP) with (create NOT NEGATED _ (create MSSETPHRASE - using (fetch SET2 of REP) + using (fetch (CSET SET2) + of REP) REP _ (fetch (MSSETPHRASE REP) - of (fetch SET2 + of (fetch + (CSET SET2) of REP] (GO RETRY)) (IN [SETQ REP (create QUOTE QUOTED _ (MKLIST (CL:EVAL (fetch (IN EXPRESSION) of REP] (GO RETRY)) - (BLOCKS (* ; "Block set") + (BLOCKS (* ; "Block set") (SELECTQ OP (CHECK [[LAMBDA (X Y) (OR X Y] - (AND (fetch FNS of REP) - (MSINTERPRETSET (fetch FNS of REP) + (AND (fetch (BLOCKS FNS) of REP) + (MSINTERPRETSET (fetch (BLOCKS FNS) of REP) 'CHECK)) - (AND (fetch FILES of REP) - (MSINTERPRETSET (fetch FILES of REP) + (AND (fetch (BLOCKS FILES) of REP) + (MSINTERPRETSET (fetch (BLOCKS FILES) + of REP) 'CHECK]) (PROGN [SETQ REP (create QUOTE QUOTED _ - (MSGETBLOCKDEC (fetch TYPES - of REP) - (fetch FNS of REP) - (AND (fetch FILES of REP) - (MSINTERPRETSET (fetch - FILES - of - REP) - 'HARD] + (MSGETBLOCKDEC + (fetch (BLOCKS TYPES) of REP) + (fetch (BLOCKS FNS) of REP) + (AND (fetch (BLOCKS FILES) of REP) + (MSINTERPRETSET (fetch + (BLOCKS FILES) + of REP) + 'HARD] (GO RETRY)))) (FIELDS (SELECTQ OP - (CHECK (MSINTERPRETSET (fetch RECS of REP) + (CHECK (MSINTERPRETSET (fetch (FIELDS RECS) of REP) OP)) - (PROGN [SETQ REP - (create QUOTE - QUOTED _ - (PROG (VAL) - (for X - in (MSLISTSET (fetch RECS - of REP) - T) - do (SETQ VAL (UNION (RECORDFIELDNAMES - X) - VAL))) - (RETURN VAL] + (PROGN [SETQ REP (create + QUOTE + QUOTED _ + (PROG (VAL) + (for X + in (MSLISTSET (fetch + (FIELDS RECS) + of REP) + T) + do (SETQ VAL (UNION (RECORDFIELDNAMES + X) + VAL))) + (RETURN VAL] (GO RETRY)))) (THAT (PROG (TABLES (MSVERB (fetch (THAT MSVERB) of REP)) VALUE @@ -2934,34 +2958,39 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo ((AND OR ANDNOT) [SETQ REP (create CSET - ID _ (fetch (CVERB C) - of (fetch VPART of MSVERB)) + ID _ (fetch (CVERB C) of (fetch + (MSVERB VPART) + of MSVERB)) SET1 _ (create MSSETPHRASE using SET REP _ - (create THAT - MSVERB _ - (create MSVERB - TENSE _ (fetch TENSE - of MSVERB) - VPART _ - (fetch (CVERB VB1) - of (fetch VPART - of MSVERB))) - OTHERSET _ OS)) + (create + THAT + MSVERB _ (create + MSVERB + TENSE _ (fetch (MSVERB TENSE) + of MSVERB) + VPART _ + (fetch (CVERB VB1) + of (fetch (MSVERB + VPART) + of MSVERB))) + OTHERSET _ OS)) SET2 _ (create MSSETPHRASE using SET REP _ - (create THAT - MSVERB _ - (create MSVERB - TENSE _ (fetch TENSE - of MSVERB) - VPART _ - (fetch (CVERB VB2) - of (fetch VPART - of MSVERB))) - OTHERSET _ OS] + (create + THAT + MSVERB _ (create + MSVERB + TENSE _ (fetch (MSVERB TENSE) + of MSVERB) + VPART _ + (fetch (CVERB VB2) + of (fetch (MSVERB + VPART) + of MSVERB))) + OTHERSET _ OS] (GO RETRY)) (CALL (COND ((EQ (fetch (MSVERB MODIFIER) of MSVERB) @@ -2981,17 +3010,17 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo TOPFLG _ T] (GO RETRY)))) (CONTAIN (COND - ((EQ (fetch DET of OS) + ((EQ (fetch (MSSETPHRASE DET) of OS) 'WHICH) (SHOULDNT 16))) - (* ;; "JRB - Default types on files are now ignored - removed (|fetch| (MSSETPHRASE DEFAULTTYPE) |of| SET) from ORs below.") + (* ;; "JRB - Default types on files are now ignored - removed (|fetch| (MSSETPHRASE DEFAULTTYPE) |of| SET) from ORs below.") [SETQ REP (create QUOTE QUOTED _ - (SELECTQ (fetch TENSE of MSVERB) + (SELECTQ (fetch (MSVERB TENSE) of MSVERB) (ED (ONFILE (MSINTERPRETSET OS 'HARD) (OR (fetch (MSVERB MODIFIER) of MSVERB) @@ -3009,14 +3038,15 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo NIL) (SELECTQ OP (CHECK (SETQ VALUE (MSINTERPRETSET OS 'CHECK - (fetch KNOWN of OS)))) + (fetch (MSSETPHRASE KNOWN) + of OS)))) NIL) (SETQ TABLES (GETVERBTABLES (fetch (MSVERB ROOT) of MSVERB ) (fetch (MSVERB MODIFIER) of MSVERB))) - (replace REP of SET + (replace (MSSETPHRASE REP) of SET with (SETQ REP (create INRELATION - INVERTED _ (EQ (fetch TENSE + INVERTED _ (EQ (fetch (MSVERB TENSE) of MSVERB) 'ED) HTABLES _ TABLES @@ -3025,14 +3055,14 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo VALUE)))) (PATHS (COND ((EQ OP 'CHECK) - (CHECKPATHS (fetch MSPATHOPTIONS of REP))) + (CHECKPATHS (fetch (PATHS MSPATHOPTIONS) of REP))) (T (SETQ REP (create GETHASH HTABLE _ (LIST (MSONPATH REP)) BADMARKS _ T)) (GO RETRY)))) (SHOULDNT 17] RETRY - (replace REP of SET with REP) + (replace (MSSETPHRASE REP) of SET with REP) (GO START]) (MSINTERPA @@ -3148,12 +3178,12 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo (RETURN (OR VAL (NULL (FASSOC 'FROM OPTIONS]) (ONFILE - [LAMBDA (FILES TYPES FINDITEMS) (* ; "Edited 2-Jun-88 11:19 by jrb:") - (* ; - "MSHASHFILE uses cause GETRELATION barfs if CONTAINS table doesn't exist.") + [LAMBDA (FILES TYPES FINDITEMS) (* ; "Edited 9-Jun-2021 23:53 by rmk:") + (* ; + "MSHASHFILE uses cause GETRELATION barfs if CONTAINS table doesn't exist.") (PROG (VAL) - (* ;; "JRB - TYPES of 'ALL means gather all types Masterscope knows about") + (* ;; "JRB - TYPES of 'ALL means gather all types Masterscope knows about") [AND (EQ TYPES 'ALL) (SETQ TYPES (for FT in MSFNTYPES collect (fetch (MSANALYZABLE @@ -3167,8 +3197,8 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo ((FNS KNOWN NIL) T) NIL))) inside (OR FILES FILELST) - do (* ; - "Don't notice the file if we only care about FNS and the file is known to the database.") + do (* ; + "Don't notice the file if we only care about FNS and the file is known to the database.") (COND [(AND FNSONLY (NOT (MEMB FILE FILELST)) (GETRELATION FILE 'CONTAINS] @@ -3187,29 +3217,43 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo (T (SETQ VAL (UNION (FILECOMSLST FILE TYPE) VAL] [COND - ((AND MSHASHFILE (NULL VAL) + [(AND MSHASHFILE (NULL VAL) (find TYPE inside TYPES suchthat (SELECTQ TYPE ((FNS KNOWN NIL) T) NIL))) - (* ; - "Didn't find it in core; perhaps the CONTAINS table knows") + (* ; + "Didn't find it in core; perhaps the CONTAINS table knows") + (* ; "RMK: or the WHEREIS hashfile") (COND [FILES (for FILE inside FILES do (COND - (FINDITEMS (for X inside FINDITEMS - when (TESTRELATION X 'CONTAINS FILE T) - do (pushnew VAL FILE))) + [FINDITEMS (for X inside FINDITEMS + do (IF (OR (TESTRELATION X + 'CONTAINS FILE T) + (MEMB FILE + (WHEREIS X TYPES T))) + THEN (pushnew VAL FILE] (T (SETQ VAL (UNION (GETRELATION FILE 'CONTAINS) VAL] (FINDITEMS - (* ;; "No files: should use all known files, but that information isn't explicitly kept by MSHASH. Soooo, we'll only do the case where FINDITEMS is given") + (* ;; "No files: should use all known files, but that information isn't explicitly kept by MSHASH. Soooo, we'll only do the case where FINDITEMS is given") - (for X inside FINDITEMS do (SETQ VAL (UNION (GETRELATION - X - 'CONTAINS T) - VAL] + (for X inside FINDITEMS + do (SETQ VAL (UNION (OR (GETRELATION X 'CONTAINS T) + (WHEREIS X TYPES T)) + VAL] + (T + (* ;; "RMK: If we really have no information, maybe the WHEREIS hashfile knows.") + + (for X inside FINDITEMS + do (IF (FOR F IN (OR (GETRELATION X 'CONTAINS T) + (RETURN NIL)) DO (PUSHNEW VAL F) + FINALLY (RETURN T)) + ELSE (FOR TYPE INSIDE (OR TYPES 'FNS) + DO (FOR F IN (WHEREIS X TYPE T) + DO (PUSHNEW VAL F] (RETURN VAL]) ) (DEFINEQ @@ -3685,36 +3729,36 @@ Copyright (c) 1983-1988, 1990, 1993-1994, 2018, 2020-2021 by Venue & Xerox Corpo (PUTPROPS MASTERSCOPE COPYRIGHT ("Venue & Xerox Corporation" 1983 1984 1985 1986 1987 1988 1990 1993 1994 2018 2020 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (3402 19171 (UPDATEFN 3412 . 5029) (MSGETDEF 5031 . 6437) (MSNOTICEFILE 6439 . 8832) ( -MSSHOWUSE 8834 . 14337) (MSUPDATEFN1 14339 . 15027) (MSUPDATE 15029 . 17455) (MSNLAMBDACHECK 17457 . -18339) (MSCOLLECTDATA 18341 . 19169)) (19172 20071 (UPDATECHANGED 19182 . 19545) (UPDATECHANGED1 19547 - . 20069)) (20645 21068 (MSCLOSEFILES 20655 . 21066)) (21749 26181 (MSDESCRIBE 21759 . 24547) ( -MSDESCRIBE1 24549 . 25612) (FMAPRINT 25614 . 26179)) (26274 26714 (MSPRINTHELPFILE 26284 . 26712)) ( -26764 29902 (TEMPLATE 26774 . 28195) (GETTEMPLATE 28197 . 28332) (SETTEMPLATE 28334 . 29900)) (30772 -35696 (ADDTEMPLATEWORD 30782 . 31454) (MSADDANALYZE 31456 . 32954) (MSADDMODIFIER 32956 . 34037) ( -MSADDRELATION 34039 . 34786) (MSADDTYPE 34788 . 35694)) (37197 42418 (MSMARKCHANGE1 37207 . 38001) ( -MSINIT 38003 . 39184) (GETVERBTABLES 39186 . 39739) (MSSTOREDATA 39741 . 41420) (STORETABLE 41422 . -42416)) (43819 48889 (PARSERELATION 43829 . 44429) (PARSERELATION1 44431 . 45886) (GETRELATION 45888 - . 46917) (MAPRELATION 46919 . 48053) (TESTRELATION 48055 . 48887)) (48890 50530 (ADDHASH 48900 . -49378) (SUBHASH 49380 . 49608) (MAKEHASH 49610 . 49754) (MSREHASH 49756 . 50209) (EQMEMBHASH 50211 . -50528)) (50869 57084 (MSVBTABLES 50879 . 56658) (MSUSERVBTABLES 56660 . 57082)) (57167 59378 ( -BUILDGETRELQ 57177 . 58283) (BUILDTESTRELQ 58285 . 59376)) (59549 59937 (MSERASE 59559 . 59935)) ( -59938 63170 (DUMPDATABASE 59948 . 61285) (DUMPDATABASE1 61287 . 61632) (READATABASE 61634 . 63168)) ( -64252 93311 (MSCHECKBLOCKS 64262 . 68082) (MSCHECKBLOCK 68084 . 76704) (MSCHECKFNINBLOCK 76706 . 79706 -) (MSCHECKBLOCKBASIC 79708 . 82128) (MSCHECKBOUNDFREE 82130 . 84029) (GLOBALVARP 84031 . 84198) ( -PRINTERROR 84200 . 87416) (MSCHECKVARS1 87418 . 90371) (UNECCSPEC 90373 . 90651) (NECCSPEC 90653 . -91000) (SPECVARP 91002 . 91529) (SHORTLST 91531 . 91987) (DOERROR 91989 . 92699) (MSMSGPRINT 92701 . -93309)) (94455 109283 (MSPATHS 94465 . 97867) (MSPATHS1 97869 . 102104) (MSPATHS2 102106 . 105516) ( -MSONPATH 105518 . 106746) (MSPATHS4 106748 . 107830) (DASHES 107832 . 108358) (DOTABS 108360 . 108601) - (BELOWMARKER 108603 . 109066) (MSPATHSPRINTFN 109068 . 109281)) (109669 113093 (MSFIND 109679 . -109954) (MSEDITF 109956 . 110956) (MSEDITE 110958 . 111995) (EDITGETDEF 111997 . 113091)) (114099 -122700 (MSMARKCHANGED 114109 . 115833) (CHANGEMACRO 115835 . 116540) (CHANGEVAR 116542 . 116858) ( -CHANGEI.S. 116860 . 118193) (CHANGERECORD 118195 . 119066) (MSNEEDUNSAVE 119068 . 120060) (UNSAVEFNS -120062 . 122698)) (123141 126631 (%. 123151 . 123291) (MASTERSCOPE 123293 . 123819) (MASTERSCOPE1 -123821 . 124689) (MASTERSCOPEXEC 124691 . 126629)) (126670 164329 (MSINTERPRETSET 126680 . 154173) ( -MSINTERPA 154175 . 154709) (MSGETBLOCKDEC 154711 . 157224) (LISTHARD 157226 . 158444) (MSMEMBSET -158446 . 158591) (MSLISTSET 158593 . 158958) (MSHASHLIST 158960 . 159127) (MSHASHLIST1 159129 . 159455 -) (CHECKPATHS 159457 . 160097) (ONFILE 160099 . 164327)) (164330 187496 (MSINTERPRET 164340 . 181193) -(VERBNOTICELIST 181195 . 182305) (MSOUTPUT 182307 . 182624) (MSCHECKEMPTY 182626 . 183830) ( -CHECKFORCHANGED 183832 . 184352) (MSSOLVE 184354 . 187494))))) + (FILEMAP (NIL (3419 19188 (UPDATEFN 3429 . 5046) (MSGETDEF 5048 . 6454) (MSNOTICEFILE 6456 . 8849) ( +MSSHOWUSE 8851 . 14354) (MSUPDATEFN1 14356 . 15044) (MSUPDATE 15046 . 17472) (MSNLAMBDACHECK 17474 . +18356) (MSCOLLECTDATA 18358 . 19186)) (19189 20088 (UPDATECHANGED 19199 . 19562) (UPDATECHANGED1 19564 + . 20086)) (20662 21085 (MSCLOSEFILES 20672 . 21083)) (21766 26198 (MSDESCRIBE 21776 . 24564) ( +MSDESCRIBE1 24566 . 25629) (FMAPRINT 25631 . 26196)) (26291 26731 (MSPRINTHELPFILE 26301 . 26729)) ( +26781 29919 (TEMPLATE 26791 . 28212) (GETTEMPLATE 28214 . 28349) (SETTEMPLATE 28351 . 29917)) (30789 +35713 (ADDTEMPLATEWORD 30799 . 31471) (MSADDANALYZE 31473 . 32971) (MSADDMODIFIER 32973 . 34054) ( +MSADDRELATION 34056 . 34803) (MSADDTYPE 34805 . 35711)) (37214 42435 (MSMARKCHANGE1 37224 . 38018) ( +MSINIT 38020 . 39201) (GETVERBTABLES 39203 . 39756) (MSSTOREDATA 39758 . 41437) (STORETABLE 41439 . +42433)) (43836 48906 (PARSERELATION 43846 . 44446) (PARSERELATION1 44448 . 45903) (GETRELATION 45905 + . 46934) (MAPRELATION 46936 . 48070) (TESTRELATION 48072 . 48904)) (48907 50547 (ADDHASH 48917 . +49395) (SUBHASH 49397 . 49625) (MAKEHASH 49627 . 49771) (MSREHASH 49773 . 50226) (EQMEMBHASH 50228 . +50545)) (50886 57101 (MSVBTABLES 50896 . 56675) (MSUSERVBTABLES 56677 . 57099)) (57184 59395 ( +BUILDGETRELQ 57194 . 58300) (BUILDTESTRELQ 58302 . 59393)) (59566 59954 (MSERASE 59576 . 59952)) ( +59955 64415 (DUMPDATABASE 59965 . 62530) (DUMPDATABASE1 62532 . 62877) (READATABASE 62879 . 64413)) ( +65497 94556 (MSCHECKBLOCKS 65507 . 69327) (MSCHECKBLOCK 69329 . 77949) (MSCHECKFNINBLOCK 77951 . 80951 +) (MSCHECKBLOCKBASIC 80953 . 83373) (MSCHECKBOUNDFREE 83375 . 85274) (GLOBALVARP 85276 . 85443) ( +PRINTERROR 85445 . 88661) (MSCHECKVARS1 88663 . 91616) (UNECCSPEC 91618 . 91896) (NECCSPEC 91898 . +92245) (SPECVARP 92247 . 92774) (SHORTLST 92776 . 93232) (DOERROR 93234 . 93944) (MSMSGPRINT 93946 . +94554)) (95700 110528 (MSPATHS 95710 . 99112) (MSPATHS1 99114 . 103349) (MSPATHS2 103351 . 106761) ( +MSONPATH 106763 . 107991) (MSPATHS4 107993 . 109075) (DASHES 109077 . 109603) (DOTABS 109605 . 109846) + (BELOWMARKER 109848 . 110311) (MSPATHSPRINTFN 110313 . 110526)) (110914 114338 (MSFIND 110924 . +111199) (MSEDITF 111201 . 112201) (MSEDITE 112203 . 113240) (EDITGETDEF 113242 . 114336)) (115344 +123945 (MSMARKCHANGED 115354 . 117078) (CHANGEMACRO 117080 . 117785) (CHANGEVAR 117787 . 118103) ( +CHANGEI.S. 118105 . 119438) (CHANGERECORD 119440 . 120311) (MSNEEDUNSAVE 120313 . 121305) (UNSAVEFNS +121307 . 123943)) (124386 127876 (%. 124396 . 124536) (MASTERSCOPE 124538 . 125064) (MASTERSCOPE1 +125066 . 125934) (MASTERSCOPEXEC 125936 . 127874)) (127915 167565 (MSINTERPRETSET 127925 . 156459) ( +MSINTERPA 156461 . 156995) (MSGETBLOCKDEC 156997 . 159510) (LISTHARD 159512 . 160730) (MSMEMBSET +160732 . 160877) (MSLISTSET 160879 . 161244) (MSHASHLIST 161246 . 161413) (MSHASHLIST1 161415 . 161741 +) (CHECKPATHS 161743 . 162383) (ONFILE 162385 . 167563)) (167566 190732 (MSINTERPRET 167576 . 184429) +(VERBNOTICELIST 184431 . 185541) (MSOUTPUT 185543 . 185860) (MSCHECKEMPTY 185862 . 187066) ( +CHECKFORCHANGED 187068 . 187588) (MSSOLVE 187590 . 190730))))) STOP diff --git a/library/MASTERSCOPE.DFASL b/library/MASTERSCOPE.DFASL index cec7308b8..74bbde0d5 100644 Binary files a/library/MASTERSCOPE.DFASL and b/library/MASTERSCOPE.DFASL differ diff --git a/library/POSTSCRIPTSTREAM b/library/POSTSCRIPTSTREAM index a70c42bc2..6d5a17293 100644 --- a/library/POSTSCRIPTSTREAM +++ b/library/POSTSCRIPTSTREAM @@ -1,22 +1,20 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP") -(FILECREATED "14-May-2018 10:52:48"  -{DSK}Kaplan>Local>medley3.5>lispcore>library>POSTSCRIPTSTREAM.;7 267706 +(FILECREATED "21-Jun-2021 20:29:32"  +{DSK}kaplan>Local>medley3.5>git-medley>library>POSTSCRIPTSTREAM.;11 259283 - changes to%: (FNS POSTSCRIPT.INIT) - - previous date%: " 8-May-2018 19:34:01" -{DSK}Kaplan>Local>medley3.5>lispcore>library>POSTSCRIPTSTREAM.;5) + previous date%: "12-Jun-2021 19:14:50" +{DSK}kaplan>Local>medley3.5>git-medley>library>POSTSCRIPTSTREAM.;10) (* ; " -Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venue This program or documentation contains confidential information and trade secrets of Venue. Reverse engineering, reverse compiling and disassembling of object code are prohibited. Use of this program or documentation is governed by written agreement with Venue. Use of copyright notice is precautionary and does not imply publication or disclosure of trade secrets. All rights reserved. +Copyright (c) 1989-1995, 1997-1998, 2018, 2021 by Venue This program or documentation contains confidential information and trade secrets of Venue. Reverse engineering, reverse compiling and disassembling of object code are prohibited. Use of this program or documentation is governed by written agreement with Venue. Use of copyright notice is precautionary and does not imply publication or disclosure of trade secrets. ") (PRETTYCOMPRINT POSTSCRIPTSTREAMCOMS) -(RPAQQ POSTSCRIPTSTREAMCOMS +(RPAQQ POSTSCRIPTSTREAMCOMS [ - (* ;; "PostScript printer support for Medley") + (* ;; "PostScript printer support for Medley") (DECLARE%: EVAL@COMPILE DONTCOPY (RECORDS FONTID PSCFONT \POSTSCRIPTDATA POSTSCRIPTXFORM)) (INITRECORDS \POSTSCRIPTDATA) @@ -40,14 +38,14 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (ZAPFCHANCERY . ZC) (ZAPFDINGBATS . ZD))) - (* ;; "Font-reading code") + (* ;; "Font-reading code") (FNS PSCFONT.READFONT PSCFONT.SPELLFILE PSCFONT.COERCEFILE PSCFONTFROMCACHE.SPELLFILE PSCFONTFROMCACHE.COERCEFILE PSCFONT.WRITEFONT READ-AFM-FILE CONVERT-AFM-FILES POSTSCRIPT.GETFONTID POSTSCRIPT.FONTCREATE \POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS POSTSCRIPT.FONTSAVAILABLE) (COMS - (* ;; "Until macro in FONT is exported") + (* ;; "Until macro in FONT is exported") (MACROS \FSETCHARWIDTH)) (FNS OPENPOSTSCRIPTSTREAM CLOSEPOSTSCRIPTSTREAM) @@ -59,7 +57,7 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu \PS.SCALEREGION \SCALEDBITBLT.PSC \SETPOS.PSC \SETXFORM.PSC \STRINGWIDTH.PSC \SWITCHFONTS.PSC \TERPRI.PSC) - (* ;; "DIG operations: ") + (* ;; "DIG operations: ") (FNS \BITBLT.PSC \BLTSHADE.PSC \CHARWIDTH.PSC \CREATECHARSET.PSC \DRAWARC.PSC \DRAWCIRCLE.PSC \DRAWCURVE.PSC \DRAWELLIPSE.PSC \DRAWLINE.PSC \DRAWPOINT.PSC \DRAWPOLYGON.PSC @@ -69,19 +67,19 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu \DSPTOPMARGIN.PSC \DSPTRANSLATE.PSC \DSPXPOSITION.PSC \DSPYPOSITION.PSC \FILLCIRCLE.PSC \FILLPOLYGON.PSC \FIXLINELENGTH.PSC \MOVETO.PSC \NEWPAGE.PSC) (COMS - (* ;; "Character-output, plus special-cases:") + (* ;; "Character-output, plus special-cases:") (FNS \POSTSCRIPT.CHANGECHARSET \POSTSCRIPT.OUTCHARFN \POSTSCRIPT.PRINTSLUG \POSTSCRIPT.SPECIALOUTCHARFN \UPDATE.PSC \POSTSCRIPT.ACCENTFN \POSTSCRIPT.ACCENTPAIR) - (* ;; - "Spacing-character (M-quad, etc.) and ballot-box-check &c special-case functions") + (* ;; + "Spacing-character (M-quad, etc.) and ballot-box-check &c special-case functions") (FNS \PSC.SPACEDISP \PSC.SPACEWID \PSC.SYMBOLS) - (* ;; - "The mapping of NS characters to Postscript renderings, both as an AList and as a hashtable") + (* ;; + "The mapping of NS characters to Postscript renderings, both as an AList and as a hashtable") (FNS \POSTSCRIPT.NSHASH) (VARS (*POSTSCRIPT-UNACCENTED-FONTS* '(Dancer ZapfDingbats "Dancer" "ZapfDingbats")) @@ -178,7 +176,7 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (CREATECHARSET \CREATECHARSET.PSC] (INITVARS (POSTSCRIPT.PAGETYPE 'LETTER)) - (* ;; "NIL means initial clipping is same as paper size. Don't know why the other regions were specified--rmk") + (* ;; "NIL means initial clipping is same as paper size. Don't know why the other regions were specified--rmk") [APPENDVARS (POSTSCRIPT.PAGEREGIONS (LETTER (0 0 8.5 11) NIL @@ -215,57 +213,57 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (RECORD PSCFONT (FID IL-FONTID FIRSTCHAR LASTCHAR ASCENT DESCENT WIDTHS)) (DATATYPE \POSTSCRIPTDATA - ((POSTSCRIPTACCENTED FLAG) (* ; - "T if we're to do NS-to-PS translations on characters in the current font.") - POSTSCRIPTFONT (* ; - "The fontdescriptor of the current font") - POSTSCRIPTX (* ; "The current X") - POSTSCRIPTY (* ; "... and Y") - POSTSCRIPTLEFTMARGIN (* ; "The margins") + ((POSTSCRIPTACCENTED FLAG) (* ; + "T if we're to do NS-to-PS translations on characters in the current font.") + POSTSCRIPTFONT (* ; + "The fontdescriptor of the current font") + POSTSCRIPTX (* ; "The current X") + POSTSCRIPTY (* ; "... and Y") + POSTSCRIPTLEFTMARGIN (* ; "The margins") POSTSCRIPTRIGHTMARGIN POSTSCRIPTBOTTOMMARGIN POSTSCRIPTTOPMARGIN POSTSCRIPTLINESPACING - (* ; "Line to line spacing") - POSTSCRIPTCOLOR (* ; - "Color (or grey shade) in effect; 0.0=black, 1.0=white.") - POSTSCRIPTSCALE (* ; "Scale of the stream") - POSTSCRIPTOPERATION (* ; - "Default operation (PAINT, REPLACE, ...)") - POSTSCRIPTCLIPPINGREGION (* ; - "The current region available to be written into") - POSTSCRIPTPAGENUM (* ; "Current page number") - POSTSCRIPTHEADING (* ; "The heading") - POSTSCRIPTHEADINGFONT (* ; "Font for the heading") - POSTSCRIPTSPACEFACTOR (* ; - "Expansion factor for spaces (see DSPSPACEFACTOR)") - POSTSCRIPTSPACEWIDTH (* ; - "The width of a space in the current font") - POSTSCRIPTLANDSCAPE (* ; - "non-NIL for paper in 'landscape' mode") - POSTSCRIPTCHARSTOSHOW (* ; - "non-NIL if the string (PostScript-type string) of chars has already been started") - POSTSCRIPTFONTCHANGEDFLG (* ; "Font has changed") - POSTSCRIPTMOVEFLG (* ; "Need to move") - POSTSCRIPTWIDTHS (* ; - "The widths vector of the current font") - POSTSCRIPTTRANSX (* ; "Translation in X") - POSTSCRIPTTRANSY (* ; "... and Y") - POSTSCRIPTPENDINGXFORM (* ; - "A userspace to devicespace transform is pending") - POSTSCRIPTPAGEREGION (* ; "The whole page") - POSTSCRIPTPAGEBLANK (* ; "This page is blank flag") - POSTSCRIPTSCALEHACK (* ; - "For \PS.SCALEHACK since DSPSCALE doesn't change the scale of the stream") - POSTSCRIPTTEMPARRAY (* ; - "For converting FIXP to string of digit chars") - POSTSCRIPTXFORMSTACK (* ; "The stack of transformations. DSPPUSHSTATE pushes one onto this, DSPPOPSTATE uses it to reset values.") - POSTSCRIPTROTATION (* ; - "Rotation value currently in effect.") - POSTSCRIPTPENDINGROTATION (* ; - "Rotation to take effect at next SETXFORM.") - POSTSCRIPTFONTSUSED (* ; "List of FONTIDs of the fonts that've been used before. This is used to control the re-encoding of fonts for accented-character rendering.") - (POSTSCRIPTNSCHARSET BYTE) (* ; - "Current NSCHARSET--widths are in POSTSCRIPTWIDTHS") - (POSTSCRIPTNATURALSPACEWIDTH WORD) (* ; - "Width of the space in the current font, used to compute the scaled space width.") + (* ; "Line to line spacing") + POSTSCRIPTCOLOR (* ; + "Color (or grey shade) in effect; 0.0=black, 1.0=white.") + POSTSCRIPTSCALE (* ; "Scale of the stream") + POSTSCRIPTOPERATION (* ; + "Default operation (PAINT, REPLACE, ...)") + POSTSCRIPTCLIPPINGREGION (* ; + "The current region available to be written into") + POSTSCRIPTPAGENUM (* ; "Current page number") + POSTSCRIPTHEADING (* ; "The heading") + POSTSCRIPTHEADINGFONT (* ; "Font for the heading") + POSTSCRIPTSPACEFACTOR (* ; + "Expansion factor for spaces (see DSPSPACEFACTOR)") + POSTSCRIPTSPACEWIDTH (* ; + "The width of a space in the current font") + POSTSCRIPTLANDSCAPE (* ; + "non-NIL for paper in 'landscape' mode") + POSTSCRIPTCHARSTOSHOW (* ; + "non-NIL if the string (PostScript-type string) of chars has already been started") + POSTSCRIPTFONTCHANGEDFLG (* ; "Font has changed") + POSTSCRIPTMOVEFLG (* ; "Need to move") + POSTSCRIPTWIDTHS (* ; + "The widths vector of the current font") + POSTSCRIPTTRANSX (* ; "Translation in X") + POSTSCRIPTTRANSY (* ; "... and Y") + POSTSCRIPTPENDINGXFORM (* ; + "A userspace to devicespace transform is pending") + POSTSCRIPTPAGEREGION (* ; "The whole page") + POSTSCRIPTPAGEBLANK (* ; "This page is blank flag") + POSTSCRIPTSCALEHACK (* ; + "For \PS.SCALEHACK since DSPSCALE doesn't change the scale of the stream") + POSTSCRIPTTEMPARRAY (* ; + "For converting FIXP to string of digit chars") + POSTSCRIPTXFORMSTACK (* ; "The stack of transformations. DSPPUSHSTATE pushes one onto this, DSPPOPSTATE uses it to reset values.") + POSTSCRIPTROTATION (* ; + "Rotation value currently in effect.") + POSTSCRIPTPENDINGROTATION (* ; + "Rotation to take effect at next SETXFORM.") + POSTSCRIPTFONTSUSED (* ; "List of FONTIDs of the fonts that've been used before. This is used to control the re-encoding of fonts for accented-character rendering.") + (POSTSCRIPTNSCHARSET BYTE) (* ; + "Current NSCHARSET--widths are in POSTSCRIPTWIDTHS") + (POSTSCRIPTNATURALSPACEWIDTH WORD) (* ; + "Width of the space in the current font, used to compute the scaled space width.") ) POSTSCRIPTX _ 0 POSTSCRIPTY _ 0 POSTSCRIPTTRANSX _ 0 POSTSCRIPTTRANSY _ 0 POSTSCRIPTSPACEFACTOR _ 1 POSTSCRIPTPAGENUM _ 0 POSTSCRIPTSCALEHACK _ 1 POSTSCRIPTTEMPARRAY @@ -273,20 +271,20 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu POSTSCRIPTROTATION _ 0 POSTSCRIPTCOLOR _ 0.0) (RECORD POSTSCRIPTXFORM ( - (* ;; "Holds the transformation state as saved by DSPPUSHSTATE. Used by DSPPOPSTATE to restore the tranformation state.") - - PSXCLIP (* ; "Clipping region") - PSXPAGE (* ; "Page region") - PSXX (* ; "X position?") - PSXY (* ; "Y position?") - PSXLEFT (* ; "Left margin") - PSXRIGHT (* ; "Right margin") - PSXTOP (* ; "Top margin") - PSXBOTTOM (* ; "Bottom Margin") - PSXTRANX (* ; "X-translation in effect") - PSXTRANY (* ; "Y-translation in effect") - PSXLAND (* ; "Landscape?") - PSXXFORMPEND (* ; "Are there transforms pending? ") + (* ;; "Holds the transformation state as saved by DSPPUSHSTATE. Used by DSPPOPSTATE to restore the tranformation state.") + + PSXCLIP (* ; "Clipping region") + PSXPAGE (* ; "Page region") + PSXX (* ; "X position?") + PSXY (* ; "Y position?") + PSXLEFT (* ; "Left margin") + PSXRIGHT (* ; "Right margin") + PSXTOP (* ; "Top margin") + PSXBOTTOM (* ; "Bottom Margin") + PSXTRANX (* ; "X-translation in effect") + PSXTRANY (* ; "Y-translation in effect") + PSXLAND (* ; "Landscape?") + PSXXFORMPEND (* ; "Are there transforms pending? ") )) ) @@ -1113,59 +1111,63 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (DECLARE%: EVAL@COMPILE -(PUTPROPS \FSETCHARWIDTH MACRO (OPENLAMBDA (FONTDESC CHARCODE WIDTH) - (\FSETWIDTH (ffetch (CHARSETINFO WIDTHS) - of (\GETCHARSETINFO (\CHARSET CHARCODE) - FONTDESC)) - (\CHAR8CODE CHARCODE) - WIDTH))) +(PUTPROPS \FSETCHARWIDTH MACRO (OPENLAMBDA (FONTDESC CHARCODE WIDTH) + (\FSETWIDTH (ffetch (CHARSETINFO WIDTHS) + of (\GETCHARSETINFO (\CHARSET CHARCODE) + FONTDESC)) + (\CHAR8CODE CHARCODE) + WIDTH))) ) (DEFINEQ (OPENPOSTSCRIPTSTREAM - [LAMBDA (FILE OPTIONS) (* ; "Edited 17-Jun-97 21:15 by rmk:") - (* ; - "Edited 31-May-93 12:42 by sybalsky:mv:envos") + [LAMBDA (FILE OPTIONS) (* ; "Edited 12-Jun-2021 19:14 by rmk:") + (* ; + "Edited 31-May-93 12:42 by sybalsky:mv:envos") (* ; "Edited 23-Dec-92 01:17 by jds") - (LET [[FP (OPENSTREAM FILE 'OUTPUT NIL `((TYPE ,*POSTSCRIPT-FILE-TYPE*) - (SEQUENTIAL T] + + (* ;; "RMK: Note: At open, this does a lot of printing using generic functions which invoke the generic \OUTCHARFN of the stream. We set that up as BOUT. But after the stream is open, we install the \POSTSCRIPT.OUTCHARFN, below. We also have to make sure that other internal printing that may want to use generic functions (PRIN1, PRIN3...) for convenience, doesn't cycle through the postscript outcharfn.") + + (LET [[STREAM (OPENSTREAM (PACKFILENAME 'BODY FILE 'EXTENSION 'PS) + 'OUTPUT NIL `((TYPE ,*POSTSCRIPT-FILE-TYPE*) + (SEQUENTIAL T] (IMAGEDATA (create \POSTSCRIPTDATA)) PAPER IMAGESIZEFACTOR CLIP REG (BBOX (LISTGET OPTIONS 'BOUNDINGBOX] - (replace (STREAM OUTCHARFN) of FP with '\FILEOUTCHARFN) - (replace (STREAM IMAGEDATA) of FP with IMAGEDATA) - (replace (STREAM IMAGEOPS) of FP with \POSTSCRIPTIMAGEOPS) + (replace (STREAM IMAGEDATA) of STREAM with IMAGEDATA) + (replace (STREAM IMAGEOPS) of STREAM with \POSTSCRIPTIMAGEOPS) + (replace (STREAM OUTCHARFN) OF STREAM WITH (FUNCTION BOUT)) (* ;; "Bounding box is for encapsulated postscript. The bounding box is in Medley's postscript-coordinate system, so we have to scale it back to default postscript since it will be interpreted outside of the operators specified below. CEIL and FLOOR to make sure that we don't leave anything out. We may also want to change the header to have the EPSF qualifier") - (printout FP "%%!PS-Adobe-2.0" T %# (CL:WHEN BBOX - (PRINTOUT FP "%%%%BoundingBox: " (CL:FLOOR - (CAR BBOX) - \PS.SCALE0) - " " - (CL:FLOOR (CADR BBOX) - \PS.SCALE0) - " " - (CL:CEILING (CADDR BBOX) - \PS.SCALE0) - " " - (CL:CEILING (CADDDR BBOX) - \PS.SCALE0) - T)) + (printout STREAM "%%!PS-Adobe-2.0" T %# (CL:WHEN BBOX + (PRINTOUT STREAM "%%%%BoundingBox: " + (CL:FLOOR (CAR BBOX) + \PS.SCALE0) + " " + (CL:FLOOR (CADR BBOX) + \PS.SCALE0) + " " + (CL:CEILING (CADDR BBOX) + \PS.SCALE0) + " " + (CL:CEILING (CADDDR BBOX) + \PS.SCALE0) + T)) "%%%%Title: " (MKSTRING (OR (LISTGET OPTIONS 'DOCUMENT.NAME) FILE)) T "%%%%Creator: PostScript Driver Copyright (C) 1988-1992 Venue and others" T "%%%%CreationDate: " (DATE) T %# (COND - ((EQ 'LPT (FILENAMEFIELD FP 'HOST)) + ((EQ 'LPT (FILENAMEFIELD STREAM 'HOST)) (* ;; "Put current user's name on break page only if going to LPT for immediate printing. Presumably the print-spooler itself should know what the user's system login-name is, but that may not be the case for all printers in all environments.") (PRINTOUT NIL "%%%%For: " (MKSTRING USERNAME) T))) "%%%%EndComments" T) - (for X in \POSTSCRIPT.JOB.SETUP do (POSTSCRIPT.OUTSTR FP X) - (\FILEOUTCHARFN FP (CHARCODE EOL))) + (for X in \POSTSCRIPT.JOB.SETUP do (POSTSCRIPT.OUTSTR STREAM X) + (\BOUTEOL STREAM)) (SETQ PAPER (OR (CDR (CL:ASSOC (SETQ PAPER (OR (LISTGET OPTIONS 'PAGETYPE) (LISTGET OPTIONS 'PAPERTYPE) POSTSCRIPT.PAGETYPE)) @@ -1174,9 +1176,9 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (* ;; "Set the paper size:") - (PRINTOUT FP (L-CASE (OR (LISTGET OPTIONS 'PAGETYPE) - (LISTGET OPTIONS 'PAPERTYPE) - POSTSCRIPT.PAGETYPE)) + (PRINTOUT STREAM (L-CASE (OR (LISTGET OPTIONS 'PAGETYPE) + (LISTGET OPTIONS 'PAPERTYPE) + POSTSCRIPT.PAGETYPE)) T) (COND ((NOT (AND [SETQ IMAGESIZEFACTOR (NUMBERP (LISTGET OPTIONS 'IMAGESIZEFACTOR] @@ -1186,10 +1188,9 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu ((AND (NUMBERP POSTSCRIPT.IMAGESIZEFACTOR) (CL:PLUSP POSTSCRIPT.IMAGESIZEFACTOR)) (SETQ IMAGESIZEFACTOR (TIMES IMAGESIZEFACTOR POSTSCRIPT.IMAGESIZEFACTOR] - (printout FP "/imagesizefactor " IMAGESIZEFACTOR " def" T) - (printout FP "%%%%EndSetup" T) + (printout STREAM "/imagesizefactor " IMAGESIZEFACTOR " def" T) + (printout STREAM "%%%%EndSetup" T) (replace (\POSTSCRIPTDATA POSTSCRIPTSCALE) of IMAGEDATA with \PS.SCALE0) - (replace (STREAM OUTCHARFN) of FP with '\POSTSCRIPT.OUTCHARFN) (replace (\POSTSCRIPTDATA POSTSCRIPTPAGEREGION) of IMAGEDATA with (\PS.SCALEREGION (/ (TIMES 72 \PS.SCALE0) IMAGESIZEFACTOR) @@ -1221,10 +1222,10 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu with (PLUS (fetch (REGION LEFT) of REG) (fetch (REGION WIDTH) of REG) -1)) - (\DSPFONT.PSC FP (FONTCREATE (OR [CAR (MKLIST (LISTGET OPTIONS 'FONTS] - DEFAULTFONT) - NIL NIL NIL FP)) - (\SWITCHFONTS.PSC FP IMAGEDATA) + (\DSPFONT.PSC STREAM (FONTCREATE (OR [CAR (MKLIST (LISTGET OPTIONS 'FONTS] + DEFAULTFONT) + NIL NIL NIL STREAM)) + (\SWITCHFONTS.PSC STREAM IMAGEDATA) [COND ((replace (\POSTSCRIPTDATA POSTSCRIPTHEADING) of IMAGEDATA with (LISTGET OPTIONS 'HEADING)) @@ -1232,7 +1233,7 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu with (COND ((LISTGET OPTIONS 'HEADINGFONT) (FONTCREATE (LISTGET OPTIONS 'HEADINGFONT) - NIL NIL NIL FP)) + NIL NIL NIL STREAM)) (T (fetch (\POSTSCRIPTDATA POSTSCRIPTFONT) of IMAGEDATA] (* ;; "Decide if it's landscape: if (LANDSCAPE T) appears in OPTIONS, it is. IF ROTATION isn't DEFAULT, it is.") @@ -1247,9 +1248,16 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (MENU \POSTSCRIPT.ORIENTATION.MENU)) (T POSTSCRIPT.PREFER.LANDSCAPE))) (T (CL:GETF OPTIONS 'ROTATION] - (POSTSCRIPT.SET-FAKE-LANDSCAPE FP 90))) - (POSTSCRIPT.STARTPAGE FP) - FP]) + (POSTSCRIPT.SET-FAKE-LANDSCAPE STREAM 90))) + + (* ;; "Now we are ready for callers to use generic functions--see note above. The special external format ensures that e.g. COPYCHARS won't do COPYBYTES when copying from a text file to a PS stream.") + + (\EXTERNALFORMAT STREAM (CREATE EXTERNALFORMAT + NAME _ 'POSTSCRIPT + OUTCHARFN _ (FUNCTION \POSTSCRIPT.OUTCHARFN) + EOL _ (FETCH (STREAM EOLCONVENTION) OF STREAM))) + (POSTSCRIPT.STARTPAGE STREAM) + STREAM]) (CLOSEPOSTSCRIPTSTREAM [LAMBDA (STREAM) (* ; "Edited 8-Mar-93 10:31 by jds") @@ -1467,7 +1475,7 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (POSTSCRIPT.PUTBITMAPBYTES [LAMBDA (STREAM BITMAP DELIMFLG) (DECLARE (GLOBALVARS PS.BITMAPARRAY) - (LOCALVARS . T)) (* ; "Edited 30-Mar-90 20:15 by Matt Heffron") + (LOCALVARS . T)) (* ; "Edited 12-Jun-2021 15:17 by rmk:") (LET* ((WIDTH (fetch BITMAPWIDTH of BITMAP)) (HEIGHT (fetch BITMAPHEIGHT of BITMAP)) @@ -1478,11 +1486,11 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu 1)) (PS.BITMAPARRAYBASE (fetch (ARRAYP BASE) of PS.BITMAPARRAY))) (COND - [DELIMFLG (LET ((POS 0) + (DELIMFLG (LET ((POS 0) BYTE) - (\FILEOUTCHARFN STREAM (CHARCODE SPACE)) - (\FILEOUTCHARFN STREAM (CHARCODE <)) - (\FILEOUTCHARFN STREAM (CHARCODE EOL)) + (BOUT STREAM (CHARCODE SPACE)) + (BOUT STREAM (CHARCODE <)) + (\BOUTEOL STREAM) (for R from (SUB1 HEIGHT) to 0 by -1 as ROWOFFSET from (ITIMES (SUB1 HEIGHT) BYTEOFFSETPERROW) by (IMINUS BYTEOFFSETPERROW) @@ -1490,7 +1498,7 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu from ROWOFFSET by 1 do (COND ((IGEQ POS 254) - (\FILEOUTCHARFN STREAM (CHARCODE EOL)) + (\BOUTEOL STREAM) (SETQ POS 0))) (SETQ BYTE (\GETBASEBYTE BMBASE BYTEOFFSET)) [BOUT STREAM (\GETBASEBYTE PS.BITMAPARRAYBASE @@ -1498,11 +1506,11 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (BOUT STREAM (\GETBASEBYTE PS.BITMAPARRAYBASE (LOGAND 15 BYTE))) (SETQ POS (IPLUS POS 2))) - (\FILEOUTCHARFN STREAM (CHARCODE EOL)) + (\BOUTEOL STREAM) (SETQ POS 0)) - (\FILEOUTCHARFN STREAM (CHARCODE SPACE)) - (\FILEOUTCHARFN STREAM (CHARCODE >)) - (\FILEOUTCHARFN STREAM (CHARCODE EOL] + (BOUT STREAM (CHARCODE SPACE)) + (BOUT STREAM (CHARCODE >)) + (\BOUTEOL STREAM))) (T (LET* ((PRVBM (BITMAPCREATE WIDTH 1)) @@ -1530,7 +1538,7 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (while (CL:PLUSP (SETQ REPC (IDIFFERENCE REPC 1))) do (COND ((IGEQ POS 251) - (\FILEOUTCHARFN STREAM (CHARCODE EOL)) + (\BOUTEOL STREAM) (SETQ POS 0))) (BOUT STREAM (CHARCODE B)) (BOUT STREAM (CHARCODE 3)) @@ -1558,7 +1566,7 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (while (CL:PLUSP (SETQ REPC (IDIFFERENCE REPC 1))) do (COND ((IGEQ POS 249) - (\FILEOUTCHARFN STREAM (CHARCODE EOL)) + (\BOUTEOL STREAM) (SETQ POS 0))) (BOUT STREAM (CHARCODE B)) (BOUT STREAM (CHARCODE 2)) @@ -1579,12 +1587,12 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (T (SETQ BYTE (\GETBASEBYTE BMBASE BYTEOFFSET)) (COND ((IGEQ POS 251) - (\FILEOUTCHARFN STREAM (CHARCODE EOL)) + (\BOUTEOL STREAM) (SETQ POS 0))) [COND ((FMEMB BYTE '(178 179 180)) - (* ;; "BYTE is B2, B3, or B4; quote it") + (* ;; "BYTE is B2, B3, or B4; quote it") (BOUT STREAM (CHARCODE B)) (BOUT STREAM (CHARCODE 4)) @@ -1597,12 +1605,11 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (SETQ BYTEOFFSET (IPLUS BYTEOFFSET 1)) (SETQ PRVO (IPLUS PRVO 1)) (SETQ POS (IPLUS POS 2] - (\FILEOUTCHARFN STREAM (CHARCODE EOL))) + (\BOUTEOL STREAM)) (\MOVEBYTES BMBASE ROWOFFSET PRVBASE 0 BYTESPERROW]) (POSTSCRIPT.PUTCOMMAND - [LAMBDA S.STRS (* ; - "Edited 20-Nov-92 15:11 by sybalsky:mv:envos") + [LAMBDA S.STRS (* ; "Edited 12-Jun-2021 15:14 by rmk:") (LET* ((STREAM (ARG S.STRS 1)) (IMAGEDATA (fetch (STREAM IMAGEDATA) of STREAM)) S#S) @@ -1616,7 +1623,7 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (for STR# from 2 to S.STRS do (COND ((EQ (SETQ S#S (ARG S.STRS STR#)) :EOL) - (\FILEOUTCHARFN STREAM (CHARCODE EOL))) + (\BOUTEOL STREAM)) (T (POSTSCRIPT.OUTSTR STREAM S#S]) (POSTSCRIPT.SET-FAKE-LANDSCAPE @@ -1700,7 +1707,7 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu OLAND]) (POSTSCRIPT.SHOWACCUM - [LAMBDA (STREAM) (* ; "Edited 23-May-93 11:52 by rmk:") + [LAMBDA (STREAM) (* ; "Edited 12-Jun-2021 15:16 by rmk:") (* ;;  "Send commands to SHOW the accumulated characters. Uses S (= SHOW) for regular characters.") @@ -1735,12 +1742,51 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu " 6 -1 roll awidthshow"))) (T (POSTSCRIPT.OUTSTR STREAM (CONSTANT (CONCAT " 0 " (CHARCODE SPACE) " 4 -1 roll widthshow"] - (\FILEOUTCHARFN STREAM (CHARCODE EOL)) + (\BOUTEOL STREAM) (freplace (\POSTSCRIPTDATA POSTSCRIPTCHARSTOSHOW) of IMAGEDATA with NIL]) (POSTSCRIPT.STARTPAGE -(LAMBDA (STREAM) (* ; "Edited 28-Dec-94 17:41 by jds") (* ;; "Start up a new page in a Postscript document.") (LET ((IMAGEDATA (fetch (STREAM IMAGEDATA) of STREAM)) NEW-PAGE) (replace (\POSTSCRIPTDATA POSTSCRIPTPENDINGXFORM) of IMAGEDATA with NIL) (* ; "shouldnt need this") (SETQ NEW-PAGE (CL:INCF (fetch (\POSTSCRIPTDATA POSTSCRIPTPAGENUM) of IMAGEDATA))) (* ; "Page number goes up by 1") (* ;; "Print the %"Document structuring%" info for the page, then the initial page setup") (POSTSCRIPT.PUTCOMMAND STREAM :EOL "%%%%Page: " NEW-PAGE " " NEW-PAGE :EOL "%%%%BeginPageSetup" :EOL "/savepage save def" :EOL (FQUOTIENT 1 \PS.SCALE0) " imagesizefactor mul dup scale" :EOL "%%%%EndPageSetup" :EOL) (\SETXFORM.PSC STREAM IMAGEDATA T) (* ;; "Lisp depends on the current font being carried over from page to page, but in postscript there is no current font at the beginning of a page, so force a setfont.") (replace (\POSTSCRIPTDATA POSTSCRIPTFONTCHANGEDFLG) of IMAGEDATA with T) (replace (\POSTSCRIPTDATA POSTSCRIPTPAGEBLANK) of IMAGEDATA with T) (* ; "nothing printed yet...") (COND ((fetch (\POSTSCRIPTDATA POSTSCRIPTHEADING) of IMAGEDATA) (* ;; "Here we handle headings.") (LET ((FONT (\DSPFONT.PSC STREAM (fetch (\POSTSCRIPTDATA POSTSCRIPTHEADINGFONT) of IMAGEDATA)))) (\DSPRESET.PSC STREAM) (PRIN3 (fetch (\POSTSCRIPTDATA POSTSCRIPTHEADING) of IMAGEDATA) STREAM) (RELMOVETO (CONSTANT (TIMES 72 \PS.SCALE0)) 0 STREAM) (* ; "Skip an inch before page number") (PRIN3 "Page " STREAM) (PRIN3 NEW-PAGE STREAM) (\TERPRI.PSC STREAM) (* ; "Skip 2 lines") (\TERPRI.PSC STREAM) (\DSPFONT.PSC STREAM FONT))) (T (\DSPRESET.PSC STREAM))))) -) + [LAMBDA (STREAM) (* ; "Edited 12-Jun-2021 14:52 by rmk:") + + (* ;; "Start up a new page in a Postscript document.") + + (LET ((IMAGEDATA (fetch (STREAM IMAGEDATA) of STREAM)) + NEW-PAGE) + (replace (\POSTSCRIPTDATA POSTSCRIPTPENDINGXFORM) of IMAGEDATA with NIL) + (* ; "shouldnt need this") + (SETQ NEW-PAGE (CL:INCF (fetch (\POSTSCRIPTDATA POSTSCRIPTPAGENUM) of IMAGEDATA))) + (* ; "Page number goes up by 1") + + (* ;; "Print the %"Document structuring%" info for the page, then the initial page setup") + + (POSTSCRIPT.PUTCOMMAND STREAM :EOL "%%%%Page: " NEW-PAGE " " NEW-PAGE :EOL + "%%%%BeginPageSetup" :EOL "/savepage save def" :EOL (FQUOTIENT 1 \PS.SCALE0) + " imagesizefactor mul dup scale" :EOL "%%%%EndPageSetup" :EOL) + (\SETXFORM.PSC STREAM IMAGEDATA T) + + (* ;; "Lisp depends on the current font being carried over from page to page, but in postscript there is no current font at the beginning of a page, so force a setfont.") + + (replace (\POSTSCRIPTDATA POSTSCRIPTFONTCHANGEDFLG) of IMAGEDATA with T) + (replace (\POSTSCRIPTDATA POSTSCRIPTPAGEBLANK) of IMAGEDATA with T) + (* ; "nothing printed yet...") + (COND + ((fetch (\POSTSCRIPTDATA POSTSCRIPTHEADING) of IMAGEDATA) + + (* ;; "Here we handle headings.") + + (LET [(FONT (\DSPFONT.PSC STREAM (fetch (\POSTSCRIPTDATA POSTSCRIPTHEADINGFONT) + of IMAGEDATA] + (\DSPRESET.PSC STREAM) + (POSTSCRIPT.OUTSTR STREAM (fetch (\POSTSCRIPTDATA POSTSCRIPTHEADING) + of IMAGEDATA)) + (RELMOVETO (CONSTANT (TIMES 72 \PS.SCALE0)) + 0 STREAM) (* ; "Skip an inch before page number") + (POSTSCRIPT.OUTSTR STREAM "Page ") + (POSTSCRIPT.OUTSTR STREAM NEW-PAGE) + (\TERPRI.PSC STREAM) (* ; "Skip 2 lines") + (\TERPRI.PSC STREAM) + (\DSPFONT.PSC STREAM FONT))) + (T (\DSPRESET.PSC STREAM]) (\POSTSCRIPTTAB [LAMBDA (POSTSCRIPTDATA) (* ; @@ -3489,526 +3535,525 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (RPAQQ *POSTSCRIPT-UNACCENTED-FONTS* (Dancer ZapfDingbats "Dancer" "ZapfDingbats")) -(RPAQQ *POSTSCRIPT-NS-TRANSLATIONS* ( - (* ;; "Mapping of NS characters to Postscript renderings.") - - - - (* ;; "First few are for control-codes in old Press fonts (Timesroman, etc.); not strictly NS, but undefined therein so should be OK.") - - ("^S" NIL "2,320") - (* ; "pressfont em dash") - ("^V" NIL "2,261") - (* ; "pressfont en dash") - ("^G" NIL "0,140") - ("0,244" NIL "2,250") - (* ; "generic currency symbol") - ("0,251" NIL "2,140") - (* ; "left single quote") - ("0,254" SYMBOL "2,254") - (* ; "left arrow") - ("0,255" SYMBOL "2,255") - (* ; "uparrow") - ("0,256" SYMBOL "2,256") - (* ; "right arrow") - ("0,257" SYMBOL "2,257") - (* ; "down arrow") - ("0,260" SYMBOL "2,260") - (* ; "degree") - ("0,261" SYMBOL "2,261") - (* ; "+/-") - ("0,264" SYMBOL "2,264") - (* ; "times") - ("0,267" NIL "2,264") - (* ; "Center-dot") - ("0,270" SYMBOL "2,270") - (* ; "divide") - ("0,271" NIL "2,047") - (* ; "right single quote") - ("0,274" FUNCTION " f14 ") - (* ; "1/4") - ("0,275" FUNCTION " f12 ") - (* ; "1/2") - ("0,276" FUNCTION " f34 ") - (* ; "3/4") - ("0,322" SYMBOL "2,342") - (* ; "registered") - ("0,323" SYMBOL "2,343") - (* ; "copyright") - ("0,324" SYMBOL "2,344") - (* ; "tm") - ("0,334" FUNCTION " f18 ") - (* ; "1/8") - ("0,335" FUNCTION " f38 ") - (* ; "3/8") - ("0,336" FUNCTION " f58 ") - (* ; "5/8") - ("0,337" FUNCTION " f78 ") - (* ; "7/8") - ("0,342" NIL "2,235") - (* ; "Eth (slashed D?)") - ("0,354" NIL "2,237") - (* ; "Thorn") - ("0,363" NIL "2,236") - (* ; "eth") - ("0,374" NIL "2,240") - (* ; "thorn") - ("41,172" DINGBAT "0,110") - (* ; "filled star") - ("42,42" DINGBAT "0,161") - (* ; "ballot-box") - ("42,61" APPLY* "0,161" \PSC.SYMBOLS \PSC.SPACEWID NIL) - (* ; "Checked ballot-box") - ("357,44" NIL "2,261") - (* ; "n dash") - ("357,45" NIL "2,320") - (* ; "m dash") - ("357,55" APPLY* "M" \PSC.SPACEDISP \PSC.SPACEWID NIL) - (* ; "M quad") - ("357,54" APPLY* "N" \PSC.SPACEDISP \PSC.SPACEWID NIL) - (* ; "N quad") - ("357,56" APPLY* "1" \PSC.SPACEDISP \PSC.SPACEWID NIL) - (* ; "FIGURE quad") - ("357,57" APPLY* ("M" 0.2) - \PSC.SPACEDISP \PSC.SPACEWID NIL) - (* ; "This space (1/5M)") - ("357,60" NIL "2,262") - (* ; "dagger") - ("357,61" NIL "2,263") - (* ; "double dagger") - ("357,062" SYMBOL "2,361") - (* ; "angleright") - ("357,063" SYMBOL "2,341") - (* ; "angleleft") - ("357,70" SYMBOL "2,315") - (* ; "perpendicular") - ("357,101" NIL "2,275") - (* ; "per mil o/oo") - ("357,104" ACCENTPAIR "<" NIL "/") - (* ; "not less than") - ("357,105" ACCENTPAIR ">" "/") - (* ; "not greater than") - ("357,110" SYMBOL "2,312") - (* ; "parallel") - ("357,111" SYMBOL "2,315") - (* ; "not parallel") - ("357,112" SYMBOL "2,316") - (* ; "element") - ("357,113" SYMBOL "2,317") - (* ; "notelement") - ("357,114" SYMBOL "2,047") - (* ; "suchthat") - ("357,115" SYMBOL "2,334") - (* ; "implied by, double arrow left") - ("357,116" SYMBOL "2,333") - (* ; "iff, double arrow") - ("357,117" SYMBOL "2,336") - (* ; "implies, double arrow right") - ("357,120" SYMBOL "2,253") - (* ; "double arrow") - ("357,121" SYMBOL "2,333") - (* ; "double arrow") - ("357,122" SYMBOL "2,333") - (* ; "l/r arrow") - ("357,126" SYMBOL "2,307") - (* ; "intersection") - ("357,127" SYMBOL "2,310") - (* ; "union") - ("357,130" SYMBOL "2,312") - (* ; "reflexsuperset") - ("357,131" SYMBOL "2,315") - (* ; "reflexsubset") - ("357,132" SYMBOL "2,311") - (* ; "propersuperset") - ("357,133" SYMBOL "2,314") - (* ; "propersubset") - ("357,137" SYMBOL "2,313") - (* ; "notsubset") - ("357,141" SYMBOL "2,306") - (* ; "emptyset") - ("357,142" SYMBOL "2,305") - (* ; "circleplus") - ("357,144" SYMBOL "2,304") - (* ; "circlemultiply") - ("357,146" NIL "2,267") - (* ; "bullet") - ("357,147" SYMBOL "2,260") - (* ; - "center circle (composition), lowered degree") - ("357,152" SYMBOL "2,330") - (* ; "logicalnot") - ("357,154" SYMBOL "2,320") - (* ; "angle") - ("357,160" SYMBOL "2,136") - (* ; "perpendicular") - ("357,161" SYMBOL "2,265") - (* ; "proportional") - ("357,162" SYMBOL "2,272") - (* ; "equivalence") - ("357,165" SYMBOL "2,362") - (* ; "integral") - ("357,167" SYMBOL "2,273") - (* ; "approxequal") - ("357,170" SYMBOL "2,100") - (* ; "congruent") - ("357,172" SYMBOL "2,345") - (* ; "summation") - ("357,173" SYMBOL "2,325") - (* ; "product") - ("357,174" SYMBOL "2,326") - (* ; "radical") - ("357,242" SYMBOL "2,246") - (* ; "florin") - ("357,260" SYMBOL "2,351") - (* ; "Ceiling, left ") - ("357,261" SYMBOL "2,371") - (* ; "Ceiling, right") - ("357,262" SYMBOL "2,353") - (* ; "Floor, left ") - ("357,263" SYMBOL "2,373") - (* ; "Floor, right") - ("357,264" SYMBOL "2,44") - (* ; "exists") - ("357,265" SYMBOL "2,42") - (* ; "forall") - ("357,266" SYMBOL "2,331") - (* ; "logicaland") - ("357,267" SYMBOL "2,332") - (* ; "logicalor") - ("357,271" SYMBOL "2,321") - (* ; "gradient") - ("357,272" SYMBOL "2,266") - (* ; "partialdiff") - ("357,313" SYMBOL "2,252") - (* ; "spade") - ("357,317" DINGBAT "0,63") - (* ; "check") - ("357,375" FUNCTION " f13 ") - (* ; "1/3") - ("357,376" FUNCTION " f23 ") - (* ; "2/3") - ("361,041" ACCENT "0,4" A) - ("361,042" ACCENT "0,1" A) - ("361,043" ACCENT "0,2" A) - ("361,044" ACCENT "0,6" A) - ("361,045" ACCENTPAIR A "0,305") - (* ; "A-macron") - ("361,046" ACCENTPAIR A "0,306") - (* ; "A-breve") - ("361,047" ACCENT "0,3" A) - ("361,050" ACCENT "0,5" A) - ("361,055" ACCENT "0,7" C) - ("361,060" ACCENT "0,13" E) - ("361,061" ACCENT "0,10" E) - ("361,062" ACCENT "0,11" E) - ("361,063" ACCENTPAIR E "0,305") - (* ; "E-macron") - ("361,065" ACCENT "0,12" E) - ("361,066" ACCENTPAIR E NIL "0,316") - (* ; "E-ogonek") - ("361,076" ACCENT "0,17" I) - ("361,077" ACCENT "0,14" I) - ("361,100" ACCENT "0,15" I) - ("361,102" ACCENTPAIR I "0,305") - (* ; "I-macron") - ("361,104" ACCENT "0,16" I) - ("361,114" ACCENT "0,20" N) - ("361,117" ACCENT "0,24" O) - ("361,120" ACCENT "0,21" O) - ("361,121" ACCENT "0,22" O) - ("361,122" ACCENT "0,25" O) - ("361,123" ACCENTPAIR O "0,305") - (* ; "O-macron") - ("361,124" ACCENT "0,23" O) - ("361,134" ACCENT "0,26" S) - ("361,137" ACCENT "0,32" U) - ("361,140" ACCENT "0,27" U) - ("361,141" ACCENT "0,30" U) - ("361,143" ACCENTPAIR U "0,305") - (* ; "U-macron") - ("361,145" ACCENT "0,31" U) - ("361,155" ACCENT "0,33" Y) - ("361,160" ACCENT "0,34" Z) - ("361,165" ACCENTPAIR Y "0,305") - (* ; "Y-macron") - ("361,166" ACCENTPAIR "0,341" "0,305") - (* ; "AE-macron") - ("361,167" ACCENTPAIR "0,352" "0,305") - (* ; "OE-macron") - ("361,241" ACCENT "0,204" a) - ("361,242" ACCENT "0,201" a) - ("361,243" ACCENT "0,202" a) - ("361,244" ACCENT "0,206" a) - ("361,245" ACCENTPAIR a "0,305") - (* ; "a-macron") - ("361,246" ACCENTPAIR a "0,306") - (* ; "a-breve") - ("361,247" ACCENT "0,203" a) - ("361,250" ACCENT "0,205" a) - ("361,255" ACCENT "0,207" c) - ("361,260" ACCENT "0,213" e) - ("361,261" ACCENT "0,210" e) - ("361,262" ACCENT "0,211" e) - ("361,263" ACCENTPAIR e "0,305") - (* ; "e-macron") - ("361,265" ACCENT "0,212" e) - ("361,266" ACCENTPAIR e NIL "0,316") - (* ; "e-ogonek") - ("361,267" ACCENTPAIR e "0,317") - (* ; "e-caron") - ("361,276" ACCENT "0,217" i) - ("361,277" ACCENT "0,214" i) - ("361,300" ACCENT "0,215" i) - ("361,302" ACCENTPAIR "0,365" "0,305") - (* ; "i-macron") - ("361,304" ACCENT "0,216" i) - ("361,314" ACCENT "0,220" n) - ("361,317" ACCENT "0,224" o) - ("361,320" ACCENT "0,221" o) - ("361,321" ACCENT "0,222" o) - ("361,322" ACCENT "0,225" o) - ("361,323" ACCENTPAIR o "0,305") - (* ; "o-macron") - ("361,324" ACCENT "0,223" o) - ("361,334" ACCENT "0,226" s) - ("361,337" ACCENT "0,232" u) - ("361,340" ACCENT "0,227" u) - ("361,341" ACCENT "0,230" u) - ("361,343" ACCENTPAIR u "0,305") - (* ; "u-macron") - ("361,344" ACCENTPAIR u "0,306") - (* ; "u-breve") - ("361,345" ACCENT "0,231" u) - ("361,355" ACCENT "0,233" y) - ("361,360" ACCENT "0,234" z) - ("361,365" ACCENTPAIR y "0,305") - (* ; "y-macron") - ("361,366" ACCENTPAIR "0,361" "0,305") - (* ; "ae-macron") - ("361,367" ACCENTPAIR "0,372" "0,305") - (* ; "oe-macron") - ("361,371" ACCENTPAIR a "0,317") - (* ; "a-caron") - ("361,375" ACCENTPAIR g "0,317") - (* ; "g-caron") - - (* ;; - "Special code assignments for Dictionary of Old English, UToronto:") - - ("361,370" ACCENTPAIR a ("0,305" "0,306")) - (* ; "a - breve-macron") - ("361,372" ACCENTPAIR e "0,306") - (* ; "e-breve") - ("361,373" ACCENTPAIR e "0,305" "0,56") - (* ; "e macron underdot") - ("361,374" ACCENTPAIR e ("0,305" "0,306")) - (* ; "e - breve-macron") - ("361,376" ACCENTPAIR "0,365" "0,306") - (* ; "i-breve") - ("362,242" ACCENTPAIR "0,365" "0,317") - (* ; "i-caron") - ("362,241" ACCENTPAIR "0,365" ("0,305" "0,306")) - (* ; " i - breve-macron") - ("362,243" ACCENTPAIR n "0,305") - (* ; "n-macron") - ("362,244" ACCENTPAIR m "0,305") - (* ; "m-macron") - ("362,245" ACCENTPAIR o "0,317") - (* ; "o-caron") - ("362,246" ACCENTPAIR o "0,306") - (* ; "o-breve") - ("362,247" ACCENTPAIR o ("0,305" "0,306")) - (* ; "o - breve-macron") - ("362,250" ACCENTPAIR o "0,305" "0,56") - (* ; "o-macron underdot") - ("362,251" ACCENTPAIR o "0,316") - (* ; "o-ogonek") - ("362,252" ACCENTPAIR u "0,317") - (* ; "u-caron") - ("362,253" ACCENTPAIR u ("0,305" "0,306")) - (* ; "u - breve-macron") - ("362,254" ACCENTPAIR y "0,306") - (* ; "y-breve") - ("362,256" ACCENTPAIR y "0,317") - (* ; "y-caron") - ("362,255" ACCENTPAIR y ("0,305" "0,306")) - (* ; "y - breve-macron") - (* ; "235 = Eth") - (* ; "236 = eth") - (* ; "237 = Thorn") - (* ; "240 = thorn") - - (* ;; "NS Greek characters") - - ("46,101" SYMBOL "2,101") - (* ; "Alpha") - ("46,102" SYMBOL "2,102") - (* ; "Beta") - ("46,103" SYMBOL 0) - (* ; "--empty--") - ("46,104" SYMBOL "2,107") - (* ; "Gamma") - ("46,105" SYMBOL "2,104") - (* ; "Delta") - ("46,106" SYMBOL "2,105") - (* ; "Epsilon") - ("46,107" SYMBOL 0) - (* ; "Stigma") - ("46,110" SYMBOL 0) - (* ; "Digamma") - ("46,111" SYMBOL "2,132") - (* ; "Zeta") - ("46,112" SYMBOL "2,110") - (* ; "Eta") - ("46,113" SYMBOL "2,121") - (* ; "Theta") - ("46,114" SYMBOL "2,111") - (* ; "Iota") - ("46,115" SYMBOL "2,113") - (* ; "Kappa") - ("46,116" SYMBOL "2,114") - (* ; "Lambda") - ("46,117" SYMBOL "2,115") - (* ; "Mu") - ("46,120" SYMBOL "2,116") - (* ; "Nu") - ("46,121" SYMBOL "2,130") - (* ; "Xi") - ("46,122" SYMBOL "2,117") - (* ; "Omicron") - ("46,123" SYMBOL "2,120") - (* ; "Pi") - ("46,124" SYMBOL 0) - (* ; "Koppa") - ("46,125" SYMBOL "2,122") - (* ; "Rho") - ("46,126" SYMBOL "2,123") - (* ; "Sigma") - ("46,127" SYMBOL 0) - (* ; "--empty--") - ("46,130" SYMBOL "2,124") - (* ; "Tau") - ("46,131" SYMBOL "2,125") - (* ; "Upsilon") - ("46,132" SYMBOL "2,106") - (* ; "Phi") - ("46,133" SYMBOL "2,103") - (* ; "Chi") - ("46,134" SYMBOL "2,131") - (* ; "Psi") - ("46,135" SYMBOL "2,132") - (* ; "Omega") - ("46,141" SYMBOL "2,141") - (* ; "alpha") - ("46,142" SYMBOL "2,142") - (* ; "beta") - ("46,143" SYMBOL 0) - (* ; "(md beta)") - ("46,144" SYMBOL "2,147") - (* ; "gamma") - ("46,145" SYMBOL "2,144") - (* ; "delta") - ("46,146" SYMBOL "2,145") - (* ; "epsilon") - ("46,147" SYMBOL "2,126") - (* ; "stigma") - ("46,150" SYMBOL 0) - (* ; "digamma") - ("46,151" SYMBOL "2,172") - (* ; "zeta") - ("46,152" SYMBOL "2,150") - (* ; "eta") - ("46,153" SYMBOL "2,161") - (* ; "theta") - ("46,154" SYMBOL "2,151") - (* ; "iota") - ("46,155" SYMBOL "2,153") - (* ; "kappa") - ("46,156" SYMBOL "2,154") - (* ; "lambda") - ("46,157" SYMBOL "2,155") - (* ; "mu") - ("46,160" SYMBOL "2,156") - (* ; "nu") - ("46,161" SYMBOL "2,170") - (* ; "xi") - ("46,162" SYMBOL "2,157") - (* ; "omicron") - ("46,163" SYMBOL "2,160") - (* ; "pi") - ("46,164" SYMBOL 0) - (* ; "(koppa)") - ("46,165" SYMBOL "2,162") - (* ; "rho") - ("46,166" SYMBOL "2,163") - (* ; "sigma") - ("46,167" SYMBOL "2,126") - (* ; "(fl sigma)") - ("46,170" SYMBOL "2,164") - (* ; "tau") - ("46,171" SYMBOL "2.165") - (* ; "upsilon") - ("46,172" SYMBOL "2,146") - (* ; "phi") - ("46,173" SYMBOL "2,143") - (* ; "chi") - ("46,174" SYMBOL "2,171") - (* ; "psi") - ("46,175" SYMBOL "2,167") - (* ; "omega") - - (* ;; "NS Miscellaneous symbols") - - ("041,142" SYMBOL "2,271") - (* ; "notequal") - ("041,145" SYMBOL "2,243") - (* ; "lessequal") - ("041,146" SYMBOL "2,263") - (* ; "greaterequal") - ("041,147" SYMBOL "2,245") - (* ; "infinity") - ("041,150" SYMBOL "2,134") - (* ; "therefore") - ("041,155" SYMBOL "2,262") - (* ; "second") - ("356,055" SYMBOL "2,055") - (* ; "minus") - ("356,106" SYMBOL "2,340") - (* ; "lozenge") - ("356,163" SYMBOL "2,351") - (* ; "topleftbracket") - ("356,164" SYMBOL "2,353") - (* ; "bottomleftbracket") - ("356,165" SYMBOL "2,352") - (* ; "centerbracket") - ("356,166" SYMBOL "2,371") - (* ; "toprightbracket") - ("356,167" SYMBOL "2,373") - (* ; "bottomrightbracket") - ("356,176" SYMBOL "2,176") - (* ; "similar") - ("356,314" SYMBOL "2,251") - (* ; "heart") - ("356,340" SYMBOL "2,374") - (* ; "toprightbracce") - ("356,341" SYMBOL "2,357") - (* ; "braceextend") - ("356,342" SYMBOL "2,375") - (* ; "centerrightbracce") - ("356,343" SYMBOL "2,376") - (* ; "bottomrightbracce") - ("356,344" SYMBOL "2,354") - (* ; "topleftbracce") - ("356,345" SYMBOL "2,356") - (* ; "bottomleftbracce") - ("356,346" SYMBOL "2,355") - (* ; "centerleftbracce") - ("356,355" SYMBOL "2,363") - (* ; "integraltop") - ("356,356" SYMBOL "2,365") - (* ; "integralbottom") - ("356,357" SYMBOL "2,364") - (* ; "integralcenter"))) +(RPAQQ *POSTSCRIPT-NS-TRANSLATIONS* + ( + (* ;; "Mapping of NS characters to Postscript renderings.") + + + (* ;; "First few are for control-codes in old Press fonts (Timesroman, etc.); not strictly NS, but undefined therein so should be OK.") + + ("^S" NIL "2,320") + (* ; "pressfont em dash") + ("^V" NIL "2,261") + (* ; "pressfont en dash") + ("^G" NIL "0,140") + ("0,244" NIL "2,250") + (* ; "generic currency symbol") + ("0,251" NIL "2,140") + (* ; "left single quote") + ("0,254" SYMBOL "2,254") + (* ; "left arrow") + ("0,255" SYMBOL "2,255") + (* ; "uparrow") + ("0,256" SYMBOL "2,256") + (* ; "right arrow") + ("0,257" SYMBOL "2,257") + (* ; "down arrow") + ("0,260" SYMBOL "2,260") + (* ; "degree") + ("0,261" SYMBOL "2,261") + (* ; "+/-") + ("0,264" SYMBOL "2,264") + (* ; "times") + ("0,267" NIL "2,264") + (* ; "Center-dot") + ("0,270" SYMBOL "2,270") + (* ; "divide") + ("0,271" NIL "2,047") + (* ; "right single quote") + ("0,274" FUNCTION " f14 ") + (* ; "1/4") + ("0,275" FUNCTION " f12 ") + (* ; "1/2") + ("0,276" FUNCTION " f34 ") + (* ; "3/4") + ("0,322" SYMBOL "2,342") + (* ; "registered") + ("0,323" SYMBOL "2,343") + (* ; "copyright") + ("0,324" SYMBOL "2,344") + (* ; "tm") + ("0,334" FUNCTION " f18 ") + (* ; "1/8") + ("0,335" FUNCTION " f38 ") + (* ; "3/8") + ("0,336" FUNCTION " f58 ") + (* ; "5/8") + ("0,337" FUNCTION " f78 ") + (* ; "7/8") + ("0,342" NIL "2,235") + (* ; "Eth (slashed D?)") + ("0,354" NIL "2,237") + (* ; "Thorn") + ("0,363" NIL "2,236") + (* ; "eth") + ("0,374" NIL "2,240") + (* ; "thorn") + ("41,172" DINGBAT "0,110") + (* ; "filled star") + ("42,42" DINGBAT "0,161") + (* ; "ballot-box") + ("42,61" APPLY* "0,161" \PSC.SYMBOLS \PSC.SPACEWID NIL) + (* ; "Checked ballot-box") + ("357,44" NIL "2,261") + (* ; "n dash") + ("357,45" NIL "2,320") + (* ; "m dash") + ("357,55" APPLY* "M" \PSC.SPACEDISP \PSC.SPACEWID NIL) + (* ; "M quad") + ("357,54" APPLY* "N" \PSC.SPACEDISP \PSC.SPACEWID NIL) + (* ; "N quad") + ("357,56" APPLY* "1" \PSC.SPACEDISP \PSC.SPACEWID NIL) + (* ; "FIGURE quad") + ("357,57" APPLY* ("M" 0.2) + \PSC.SPACEDISP \PSC.SPACEWID NIL) + (* ; "This space (1/5M)") + ("357,60" NIL "2,262") + (* ; "dagger") + ("357,61" NIL "2,263") + (* ; "double dagger") + ("357,062" SYMBOL "2,361") + (* ; "angleright") + ("357,063" SYMBOL "2,341") + (* ; "angleleft") + ("357,70" SYMBOL "2,315") + (* ; "perpendicular") + ("357,101" NIL "2,275") + (* ; "per mil o/oo") + ("357,104" ACCENTPAIR "<" NIL "/") + (* ; "not less than") + ("357,105" ACCENTPAIR ">" "/") + (* ; "not greater than") + ("357,110" SYMBOL "2,312") + (* ; "parallel") + ("357,111" SYMBOL "2,315") + (* ; "not parallel") + ("357,112" SYMBOL "2,316") + (* ; "element") + ("357,113" SYMBOL "2,317") + (* ; "notelement") + ("357,114" SYMBOL "2,047") + (* ; "suchthat") + ("357,115" SYMBOL "2,334") + (* ; "implied by, double arrow left") + ("357,116" SYMBOL "2,333") + (* ; "iff, double arrow") + ("357,117" SYMBOL "2,336") + (* ; "implies, double arrow right") + ("357,120" SYMBOL "2,253") + (* ; "double arrow") + ("357,121" SYMBOL "2,333") + (* ; "double arrow") + ("357,122" SYMBOL "2,333") + (* ; "l/r arrow") + ("357,126" SYMBOL "2,307") + (* ; "intersection") + ("357,127" SYMBOL "2,310") + (* ; "union") + ("357,130" SYMBOL "2,312") + (* ; "reflexsuperset") + ("357,131" SYMBOL "2,315") + (* ; "reflexsubset") + ("357,132" SYMBOL "2,311") + (* ; "propersuperset") + ("357,133" SYMBOL "2,314") + (* ; "propersubset") + ("357,137" SYMBOL "2,313") + (* ; "notsubset") + ("357,141" SYMBOL "2,306") + (* ; "emptyset") + ("357,142" SYMBOL "2,305") + (* ; "circleplus") + ("357,144" SYMBOL "2,304") + (* ; "circlemultiply") + ("357,146" NIL "2,267") + (* ; "bullet") + ("357,147" SYMBOL "2,260") + (* ; + "center circle (composition), lowered degree") + ("357,152" SYMBOL "2,330") + (* ; "logicalnot") + ("357,154" SYMBOL "2,320") + (* ; "angle") + ("357,160" SYMBOL "2,136") + (* ; "perpendicular") + ("357,161" SYMBOL "2,265") + (* ; "proportional") + ("357,162" SYMBOL "2,272") + (* ; "equivalence") + ("357,165" SYMBOL "2,362") + (* ; "integral") + ("357,167" SYMBOL "2,273") + (* ; "approxequal") + ("357,170" SYMBOL "2,100") + (* ; "congruent") + ("357,172" SYMBOL "2,345") + (* ; "summation") + ("357,173" SYMBOL "2,325") + (* ; "product") + ("357,174" SYMBOL "2,326") + (* ; "radical") + ("357,242" SYMBOL "2,246") + (* ; "florin") + ("357,260" SYMBOL "2,351") + (* ; "Ceiling, left ") + ("357,261" SYMBOL "2,371") + (* ; "Ceiling, right") + ("357,262" SYMBOL "2,353") + (* ; "Floor, left ") + ("357,263" SYMBOL "2,373") + (* ; "Floor, right") + ("357,264" SYMBOL "2,44") + (* ; "exists") + ("357,265" SYMBOL "2,42") + (* ; "forall") + ("357,266" SYMBOL "2,331") + (* ; "logicaland") + ("357,267" SYMBOL "2,332") + (* ; "logicalor") + ("357,271" SYMBOL "2,321") + (* ; "gradient") + ("357,272" SYMBOL "2,266") + (* ; "partialdiff") + ("357,313" SYMBOL "2,252") + (* ; "spade") + ("357,317" DINGBAT "0,63") + (* ; "check") + ("357,375" FUNCTION " f13 ") + (* ; "1/3") + ("357,376" FUNCTION " f23 ") + (* ; "2/3") + ("361,041" ACCENT "0,4" A) + ("361,042" ACCENT "0,1" A) + ("361,043" ACCENT "0,2" A) + ("361,044" ACCENT "0,6" A) + ("361,045" ACCENTPAIR A "0,305") + (* ; "A-macron") + ("361,046" ACCENTPAIR A "0,306") + (* ; "A-breve") + ("361,047" ACCENT "0,3" A) + ("361,050" ACCENT "0,5" A) + ("361,055" ACCENT "0,7" C) + ("361,060" ACCENT "0,13" E) + ("361,061" ACCENT "0,10" E) + ("361,062" ACCENT "0,11" E) + ("361,063" ACCENTPAIR E "0,305") + (* ; "E-macron") + ("361,065" ACCENT "0,12" E) + ("361,066" ACCENTPAIR E NIL "0,316") + (* ; "E-ogonek") + ("361,076" ACCENT "0,17" I) + ("361,077" ACCENT "0,14" I) + ("361,100" ACCENT "0,15" I) + ("361,102" ACCENTPAIR I "0,305") + (* ; "I-macron") + ("361,104" ACCENT "0,16" I) + ("361,114" ACCENT "0,20" N) + ("361,117" ACCENT "0,24" O) + ("361,120" ACCENT "0,21" O) + ("361,121" ACCENT "0,22" O) + ("361,122" ACCENT "0,25" O) + ("361,123" ACCENTPAIR O "0,305") + (* ; "O-macron") + ("361,124" ACCENT "0,23" O) + ("361,134" ACCENT "0,26" S) + ("361,137" ACCENT "0,32" U) + ("361,140" ACCENT "0,27" U) + ("361,141" ACCENT "0,30" U) + ("361,143" ACCENTPAIR U "0,305") + (* ; "U-macron") + ("361,145" ACCENT "0,31" U) + ("361,155" ACCENT "0,33" Y) + ("361,160" ACCENT "0,34" Z) + ("361,165" ACCENTPAIR Y "0,305") + (* ; "Y-macron") + ("361,166" ACCENTPAIR "0,341" "0,305") + (* ; "AE-macron") + ("361,167" ACCENTPAIR "0,352" "0,305") + (* ; "OE-macron") + ("361,241" ACCENT "0,204" a) + ("361,242" ACCENT "0,201" a) + ("361,243" ACCENT "0,202" a) + ("361,244" ACCENT "0,206" a) + ("361,245" ACCENTPAIR a "0,305") + (* ; "a-macron") + ("361,246" ACCENTPAIR a "0,306") + (* ; "a-breve") + ("361,247" ACCENT "0,203" a) + ("361,250" ACCENT "0,205" a) + ("361,255" ACCENT "0,207" c) + ("361,260" ACCENT "0,213" e) + ("361,261" ACCENT "0,210" e) + ("361,262" ACCENT "0,211" e) + ("361,263" ACCENTPAIR e "0,305") + (* ; "e-macron") + ("361,265" ACCENT "0,212" e) + ("361,266" ACCENTPAIR e NIL "0,316") + (* ; "e-ogonek") + ("361,267" ACCENTPAIR e "0,317") + (* ; "e-caron") + ("361,276" ACCENT "0,217" i) + ("361,277" ACCENT "0,214" i) + ("361,300" ACCENT "0,215" i) + ("361,302" ACCENTPAIR "0,365" "0,305") + (* ; "i-macron") + ("361,304" ACCENT "0,216" i) + ("361,314" ACCENT "0,220" n) + ("361,317" ACCENT "0,224" o) + ("361,320" ACCENT "0,221" o) + ("361,321" ACCENT "0,222" o) + ("361,322" ACCENT "0,225" o) + ("361,323" ACCENTPAIR o "0,305") + (* ; "o-macron") + ("361,324" ACCENT "0,223" o) + ("361,334" ACCENT "0,226" s) + ("361,337" ACCENT "0,232" u) + ("361,340" ACCENT "0,227" u) + ("361,341" ACCENT "0,230" u) + ("361,343" ACCENTPAIR u "0,305") + (* ; "u-macron") + ("361,344" ACCENTPAIR u "0,306") + (* ; "u-breve") + ("361,345" ACCENT "0,231" u) + ("361,355" ACCENT "0,233" y) + ("361,360" ACCENT "0,234" z) + ("361,365" ACCENTPAIR y "0,305") + (* ; "y-macron") + ("361,366" ACCENTPAIR "0,361" "0,305") + (* ; "ae-macron") + ("361,367" ACCENTPAIR "0,372" "0,305") + (* ; "oe-macron") + ("361,371" ACCENTPAIR a "0,317") + (* ; "a-caron") + ("361,375" ACCENTPAIR g "0,317") + (* ; "g-caron") + + (* ;; "Special code assignments for Dictionary of Old English, UToronto:") + + ("361,370" ACCENTPAIR a ("0,305" "0,306")) + (* ; "a - breve-macron") + ("361,372" ACCENTPAIR e "0,306") + (* ; "e-breve") + ("361,373" ACCENTPAIR e "0,305" "0,56") + (* ; "e macron underdot") + ("361,374" ACCENTPAIR e ("0,305" "0,306")) + (* ; "e - breve-macron") + ("361,376" ACCENTPAIR "0,365" "0,306") + (* ; "i-breve") + ("362,242" ACCENTPAIR "0,365" "0,317") + (* ; "i-caron") + ("362,241" ACCENTPAIR "0,365" ("0,305" "0,306")) + (* ; " i - breve-macron") + ("362,243" ACCENTPAIR n "0,305") + (* ; "n-macron") + ("362,244" ACCENTPAIR m "0,305") + (* ; "m-macron") + ("362,245" ACCENTPAIR o "0,317") + (* ; "o-caron") + ("362,246" ACCENTPAIR o "0,306") + (* ; "o-breve") + ("362,247" ACCENTPAIR o ("0,305" "0,306")) + (* ; "o - breve-macron") + ("362,250" ACCENTPAIR o "0,305" "0,56") + (* ; "o-macron underdot") + ("362,251" ACCENTPAIR o "0,316") + (* ; "o-ogonek") + ("362,252" ACCENTPAIR u "0,317") + (* ; "u-caron") + ("362,253" ACCENTPAIR u ("0,305" "0,306")) + (* ; "u - breve-macron") + ("362,254" ACCENTPAIR y "0,306") + (* ; "y-breve") + ("362,256" ACCENTPAIR y "0,317") + (* ; "y-caron") + ("362,255" ACCENTPAIR y ("0,305" "0,306")) + (* ; "y - breve-macron") + (* ; "235 = Eth") + (* ; "236 = eth") + (* ; "237 = Thorn") + (* ; "240 = thorn") + + (* ;; "NS Greek characters") + + ("46,101" SYMBOL "2,101") + (* ; "Alpha") + ("46,102" SYMBOL "2,102") + (* ; "Beta") + ("46,103" SYMBOL 0) + (* ; "--empty--") + ("46,104" SYMBOL "2,107") + (* ; "Gamma") + ("46,105" SYMBOL "2,104") + (* ; "Delta") + ("46,106" SYMBOL "2,105") + (* ; "Epsilon") + ("46,107" SYMBOL 0) + (* ; "Stigma") + ("46,110" SYMBOL 0) + (* ; "Digamma") + ("46,111" SYMBOL "2,132") + (* ; "Zeta") + ("46,112" SYMBOL "2,110") + (* ; "Eta") + ("46,113" SYMBOL "2,121") + (* ; "Theta") + ("46,114" SYMBOL "2,111") + (* ; "Iota") + ("46,115" SYMBOL "2,113") + (* ; "Kappa") + ("46,116" SYMBOL "2,114") + (* ; "Lambda") + ("46,117" SYMBOL "2,115") + (* ; "Mu") + ("46,120" SYMBOL "2,116") + (* ; "Nu") + ("46,121" SYMBOL "2,130") + (* ; "Xi") + ("46,122" SYMBOL "2,117") + (* ; "Omicron") + ("46,123" SYMBOL "2,120") + (* ; "Pi") + ("46,124" SYMBOL 0) + (* ; "Koppa") + ("46,125" SYMBOL "2,122") + (* ; "Rho") + ("46,126" SYMBOL "2,123") + (* ; "Sigma") + ("46,127" SYMBOL 0) + (* ; "--empty--") + ("46,130" SYMBOL "2,124") + (* ; "Tau") + ("46,131" SYMBOL "2,125") + (* ; "Upsilon") + ("46,132" SYMBOL "2,106") + (* ; "Phi") + ("46,133" SYMBOL "2,103") + (* ; "Chi") + ("46,134" SYMBOL "2,131") + (* ; "Psi") + ("46,135" SYMBOL "2,132") + (* ; "Omega") + ("46,141" SYMBOL "2,141") + (* ; "alpha") + ("46,142" SYMBOL "2,142") + (* ; "beta") + ("46,143" SYMBOL 0) + (* ; "(md beta)") + ("46,144" SYMBOL "2,147") + (* ; "gamma") + ("46,145" SYMBOL "2,144") + (* ; "delta") + ("46,146" SYMBOL "2,145") + (* ; "epsilon") + ("46,147" SYMBOL "2,126") + (* ; "stigma") + ("46,150" SYMBOL 0) + (* ; "digamma") + ("46,151" SYMBOL "2,172") + (* ; "zeta") + ("46,152" SYMBOL "2,150") + (* ; "eta") + ("46,153" SYMBOL "2,161") + (* ; "theta") + ("46,154" SYMBOL "2,151") + (* ; "iota") + ("46,155" SYMBOL "2,153") + (* ; "kappa") + ("46,156" SYMBOL "2,154") + (* ; "lambda") + ("46,157" SYMBOL "2,155") + (* ; "mu") + ("46,160" SYMBOL "2,156") + (* ; "nu") + ("46,161" SYMBOL "2,170") + (* ; "xi") + ("46,162" SYMBOL "2,157") + (* ; "omicron") + ("46,163" SYMBOL "2,160") + (* ; "pi") + ("46,164" SYMBOL 0) + (* ; "(koppa)") + ("46,165" SYMBOL "2,162") + (* ; "rho") + ("46,166" SYMBOL "2,163") + (* ; "sigma") + ("46,167" SYMBOL "2,126") + (* ; "(fl sigma)") + ("46,170" SYMBOL "2,164") + (* ; "tau") + ("46,171" SYMBOL "2.165") + (* ; "upsilon") + ("46,172" SYMBOL "2,146") + (* ; "phi") + ("46,173" SYMBOL "2,143") + (* ; "chi") + ("46,174" SYMBOL "2,171") + (* ; "psi") + ("46,175" SYMBOL "2,167") + (* ; "omega") + + (* ;; "NS Miscellaneous symbols") + + ("041,142" SYMBOL "2,271") + (* ; "notequal") + ("041,145" SYMBOL "2,243") + (* ; "lessequal") + ("041,146" SYMBOL "2,263") + (* ; "greaterequal") + ("041,147" SYMBOL "2,245") + (* ; "infinity") + ("041,150" SYMBOL "2,134") + (* ; "therefore") + ("041,155" SYMBOL "2,262") + (* ; "second") + ("356,055" SYMBOL "2,055") + (* ; "minus") + ("356,106" SYMBOL "2,340") + (* ; "lozenge") + ("356,163" SYMBOL "2,351") + (* ; "topleftbracket") + ("356,164" SYMBOL "2,353") + (* ; "bottomleftbracket") + ("356,165" SYMBOL "2,352") + (* ; "centerbracket") + ("356,166" SYMBOL "2,371") + (* ; "toprightbracket") + ("356,167" SYMBOL "2,373") + (* ; "bottomrightbracket") + ("356,176" SYMBOL "2,176") + (* ; "similar") + ("356,314" SYMBOL "2,251") + (* ; "heart") + ("356,340" SYMBOL "2,374") + (* ; "toprightbracce") + ("356,341" SYMBOL "2,357") + (* ; "braceextend") + ("356,342" SYMBOL "2,375") + (* ; "centerrightbracce") + ("356,343" SYMBOL "2,376") + (* ; "bottomrightbracce") + ("356,344" SYMBOL "2,354") + (* ; "topleftbracce") + ("356,345" SYMBOL "2,356") + (* ; "bottomleftbracce") + ("356,346" SYMBOL "2,355") + (* ; "centerleftbracce") + ("356,355" SYMBOL "2,363") + (* ; "integraltop") + ("356,356" SYMBOL "2,365") + (* ; "integralbottom") + ("356,357" SYMBOL "2,364") + (* ; "integralcenter"))) (DECLARE%: DOEVAL@COMPILE DONTCOPY (GLOBALVARS *POSTSCRIPT-NS-HASH*) @@ -4016,46 +4061,48 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (DECLARE%: EVAL@COMPILE DONTCOPY (DECLARE%: EVAL@COMPILE -(PUTPROPS \POSTSCRIPT.FRACTION MACRO ((STREAM STRING) +(PUTPROPS \POSTSCRIPT.FRACTION MACRO ((STREAM STRING) - (* ;; "Handle printing of a fraction, given a string that's the name of the PS function (defined in \POSTSCRIPT.JOB.SETUP) that prints it. You must put spaces around the name.") + (* ;; "Handle printing of a fraction, given a string that's the name of the PS function (defined in \POSTSCRIPT.JOB.SETUP) that prints it. You must put spaces around the name.") - (POSTSCRIPT.SHOWACCUM STREAM) - [COND - ((IGREATERP (SETQ NEWXPOS (IPLUS XPOS CHARWID)) - (ffetch POSTSCRIPTRIGHTMARGIN of IMAGEDATA)) - (\TERPRI.PSC STREAM) - (SETQ NEWXPOS (IPLUS (ffetch POSTSCRIPTX of - IMAGEDATA - ) - CHARWID] - [COND - ((NOT (ffetch POSTSCRIPTCHARSTOSHOW of IMAGEDATA)) - (COND - ((ffetch POSTSCRIPTPENDINGXFORM of IMAGEDATA) - (\SETXFORM.PSC STREAM IMAGEDATA))) - (COND - ((ffetch POSTSCRIPTFONTCHANGEDFLG of IMAGEDATA) - (* ; - "If font was changed then switch before printing") - (\SWITCHFONTS.PSC STREAM IMAGEDATA))) - (COND - ((ffetch POSTSCRIPTMOVEFLG of IMAGEDATA) - (* ; "likewise for position") - (\SETPOS.PSC STREAM IMAGEDATA] - (POSTSCRIPT.OUTSTR STREAM STRING))) + (POSTSCRIPT.SHOWACCUM STREAM) + [COND + ((IGREATERP (SETQ NEWXPOS (IPLUS XPOS CHARWID)) + (ffetch POSTSCRIPTRIGHTMARGIN + of IMAGEDATA)) + (\TERPRI.PSC STREAM) + (SETQ NEWXPOS (IPLUS (ffetch POSTSCRIPTX + of IMAGEDATA) + CHARWID] + [COND + ((NOT (ffetch POSTSCRIPTCHARSTOSHOW of + IMAGEDATA)) + (COND + ((ffetch POSTSCRIPTPENDINGXFORM of + IMAGEDATA) + (\SETXFORM.PSC STREAM IMAGEDATA))) + (COND + ((ffetch POSTSCRIPTFONTCHANGEDFLG + of IMAGEDATA) + (* ; + "If font was changed then switch before printing") + (\SWITCHFONTS.PSC STREAM IMAGEDATA))) + (COND + ((ffetch POSTSCRIPTMOVEFLG of IMAGEDATA) + (* ; "likewise for position") + (\SETPOS.PSC STREAM IMAGEDATA] + (POSTSCRIPT.OUTSTR STREAM STRING))) ) ) -(RPAQ \POSTSCRIPT.ORIENTATION.MENU (create MENU ITEMS _ '(("Landscape" T - "Print this file/document/image in Landscape Orientation" - ) - ("Portrait" 'NIL - "Print this file/document/image in Portrait Orientation" - )) - TITLE _ "Orientation" CENTERFLG _ T MENUOFFSET _ - (create POSITION XCOORD _ -1 YCOORD _ 0) - CHANGEOFFSETFLG _ 'Y)) +(RPAQ \POSTSCRIPT.ORIENTATION.MENU + (create MENU ITEMS _ '(("Landscape" T "Print this file/document/image in Landscape Orientation" + ) + ("Portrait" 'NIL + "Print this file/document/image in Portrait Orientation")) + TITLE _ "Orientation" CENTERFLG _ T MENUOFFSET _ + (create POSITION XCOORD _ -1 YCOORD _ 0) + CHANGEOFFSETFLG _ 'Y)) (RPAQ \POSTSCRIPT.ORIENTATION.OPTIONS.MENU (create MENU ITEMS _ '(("Ask" 'ASK "Always ask whether to print in Landscape or Portrait Orientation" @@ -4072,7 +4119,7 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu 66 67 68 69 70 NIL)))) -(RPAQQ \POSTSCRIPT.JOB.SETUP +(RPAQQ \POSTSCRIPT.JOB.SETUP ("/bdef {bind def} bind def" "/ldef {load def} bdef" "/S /show ldef" "/M /moveto ldef" "/DR {transform round exch round exch itransform} bdef" "/L {gsave newpath setlinewidth 0 setlinecap" @@ -4194,23 +4241,17 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (Medium 'MEDIUM "This is a Medium Weight font") (Light 'LIGHT "This is a Light Weight font"))) -(ADDTOVAR BackgroundMenuCommands ("PS Orientation" '(SETQ POSTSCRIPT.PREFER.LANDSCAPE - (MENU +(ADDTOVAR BackgroundMenuCommands + ("PS Orientation" '(SETQ POSTSCRIPT.PREFER.LANDSCAPE (MENU \POSTSCRIPT.ORIENTATION.OPTIONS.MENU - )) - "Select the default Orientation for PostScript output" - (SUBITEMS ("Ask" '(SETQ POSTSCRIPT.PREFER.LANDSCAPE - 'ASK) - - "Always ask whether to print in Landscape or Portrait Orientation" - ) - ("Landscape" '(SETQ POSTSCRIPT.PREFER.LANDSCAPE T) - "Default printing to Landscape Orientation" - ) - ("Portrait" '(SETQ POSTSCRIPT.PREFER.LANDSCAPE NIL - ) - "Default printing to Portrait Orientation") - ))) + )) + "Select the default Orientation for PostScript output" + (SUBITEMS ("Ask" '(SETQ POSTSCRIPT.PREFER.LANDSCAPE 'ASK) + "Always ask whether to print in Landscape or Portrait Orientation") + ("Landscape" '(SETQ POSTSCRIPT.PREFER.LANDSCAPE T) + "Default printing to Landscape Orientation") + ("Portrait" '(SETQ POSTSCRIPT.PREFER.LANDSCAPE NIL) + "Default printing to Portrait Orientation")))) (RPAQQ BackgroundMenu NIL) (DECLARE%: EVAL@COMPILE @@ -4330,9 +4371,9 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu (POSTSCRIPT.INIT) ) -(PUTPROPS POSTSCRIPTSTREAM FILETYPE :TCOMPL) +(PUTPROPS POSTSCRIPTSTREAM FILETYPE :TCOMPL) -(PUTPROPS POSTSCRIPTSTREAM MAKEFILE-ENVIRONMENT (:PACKAGE "INTERLISP" :READTABLE "INTERLISP")) +(PUTPROPS POSTSCRIPTSTREAM MAKEFILE-ENVIRONMENT (:PACKAGE "INTERLISP" :READTABLE "INTERLISP")) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDTOVAR NLAMA ) @@ -4343,40 +4384,40 @@ Copyright (c) 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1997, 1998, 2018 by Venu ) (PUTPROPS POSTSCRIPTSTREAM COPYRIGHT ( "Venue This program or documentation contains confidential information and trade secrets of Venue. Reverse engineering, reverse compiling and disassembling of object code are prohibited. Use of this program or documentation is governed by written agreement with Venue. Use of copyright notice is precautionary and does not imply publication or disclosure of trade secrets" - 1989 1990 1991 1992 1993 1994 1995 1997 1998 2018)) + 1989 1990 1991 1992 1993 1994 1995 1997 1998 2018 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (22715 29819 (POSTSCRIPT.INIT 22725 . 29817)) (30863 65647 (PSCFONT.READFONT 30873 . -32781) (PSCFONT.SPELLFILE 32783 . 33361) (PSCFONT.COERCEFILE 33363 . 34935) ( -PSCFONTFROMCACHE.SPELLFILE 34937 . 35922) (PSCFONTFROMCACHE.COERCEFILE 35924 . 37576) ( -PSCFONT.WRITEFONT 37578 . 38593) (READ-AFM-FILE 38595 . 44466) (CONVERT-AFM-FILES 44468 . 45680) ( -POSTSCRIPT.GETFONTID 45682 . 47077) (POSTSCRIPT.FONTCREATE 47079 . 59478) ( -\POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS 59480 . 61877) (POSTSCRIPT.FONTSAVAILABLE 61879 . 65645)) (66148 -74313 (OPENPOSTSCRIPTSTREAM 66158 . 73979) (CLOSEPOSTSCRIPTSTREAM 73981 . 74311)) (74358 80179 ( -POSTSCRIPT.HARDCOPYW 74368 . 77717) (POSTSCRIPT.TEDIT 77719 . 78199) (POSTSCRIPT.TEXT 78201 . 78492) ( -POSTSCRIPTFILEP 78494 . 79130) (MAKEEPSFILE 79132 . 80177)) (80180 124442 (POSTSCRIPT.BITMAPSCALE -80190 . 82646) (POSTSCRIPT.CLOSESTRING 82648 . 83182) (POSTSCRIPT.ENDPAGE 83184 . 84055) ( -POSTSCRIPT.OUTSTR 84057 . 85078) (POSTSCRIPT.PUTBITMAPBYTES 85080 . 93756) (POSTSCRIPT.PUTCOMMAND -93758 . 94882) (POSTSCRIPT.SET-FAKE-LANDSCAPE 94884 . 100332) (POSTSCRIPT.SHOWACCUM 100334 . 102592) ( -POSTSCRIPT.STARTPAGE 102594 . 104249) (\POSTSCRIPTTAB 104251 . 105122) (\PS.BOUTFIXP 105124 . 106474) -(\PS.SCALEHACK 106476 . 109305) (\PS.SCALEREGION 109307 . 109867) (\SCALEDBITBLT.PSC 109869 . 114169) -(\SETPOS.PSC 114171 . 114633) (\SETXFORM.PSC 114635 . 116454) (\STRINGWIDTH.PSC 116456 . 116910) ( -\SWITCHFONTS.PSC 116912 . 123069) (\TERPRI.PSC 123071 . 124440)) (124477 180197 (\BITBLT.PSC 124487 . -125040) (\BLTSHADE.PSC 125042 . 129324) (\CHARWIDTH.PSC 129326 . 130093) (\CREATECHARSET.PSC 130095 . -131793) (\DRAWARC.PSC 131795 . 134275) (\DRAWCIRCLE.PSC 134277 . 136686) (\DRAWCURVE.PSC 136688 . -140709) (\DRAWELLIPSE.PSC 140711 . 143188) (\DRAWLINE.PSC 143190 . 145540) (\DRAWPOINT.PSC 145542 . -146130) (\DRAWPOLYGON.PSC 146132 . 149246) (\DSPBOTTOMMARGIN.PSC 149248 . 149813) ( -\DSPCLIPPINGREGION.PSC 149815 . 151258) (\DSPCOLOR.PSC 151260 . 152101) (\DSPFONT.PSC 152103 . 156313) - (\DSPLEFTMARGIN.PSC 156315 . 156884) (\DSPLINEFEED.PSC 156886 . 157462) (\DSPPUSHSTATE.PSC 157464 . -159227) (\DSPPOPSTATE.PSC 159229 . 161738) (\DSPRESET.PSC 161740 . 162386) (\DSPRIGHTMARGIN.PSC 162388 - . 162960) (\DSPROTATE.PSC 162962 . 163985) (\DSPSCALE.PSC 163987 . 164918) (\DSPSCALE2.PSC 164920 . -165739) (\DSPSPACEFACTOR.PSC 165741 . 166713) (\DSPTOPMARGIN.PSC 166715 . 167432) (\DSPTRANSLATE.PSC -167434 . 170008) (\DSPXPOSITION.PSC 170010 . 170609) (\DSPYPOSITION.PSC 170611 . 171183) ( -\FILLCIRCLE.PSC 171185 . 173831) (\FILLPOLYGON.PSC 173833 . 177749) (\FIXLINELENGTH.PSC 177751 . -179245) (\MOVETO.PSC 179247 . 179998) (\NEWPAGE.PSC 180000 . 180195)) (180253 203405 ( -\POSTSCRIPT.CHANGECHARSET 180263 . 181067) (\POSTSCRIPT.OUTCHARFN 181069 . 193926) ( -\POSTSCRIPT.PRINTSLUG 193928 . 195895) (\POSTSCRIPT.SPECIALOUTCHARFN 195897 . 198329) (\UPDATE.PSC -198331 . 199554) (\POSTSCRIPT.ACCENTFN 199556 . 200498) (\POSTSCRIPT.ACCENTPAIR 200500 . 203403)) ( -203503 205148 (\PSC.SPACEDISP 203513 . 203792) (\PSC.SPACEWID 203794 . 204413) (\PSC.SYMBOLS 204415 . -205146)) (205257 208248 (\POSTSCRIPT.NSHASH 205267 . 208246)) (263291 264005 (POSTSCRIPTSEND 263301 . -264003))))) + (FILEMAP (NIL (22629 29733 (POSTSCRIPT.INIT 22639 . 29731)) (30777 65561 (PSCFONT.READFONT 30787 . +32695) (PSCFONT.SPELLFILE 32697 . 33275) (PSCFONT.COERCEFILE 33277 . 34849) ( +PSCFONTFROMCACHE.SPELLFILE 34851 . 35836) (PSCFONTFROMCACHE.COERCEFILE 35838 . 37490) ( +PSCFONT.WRITEFONT 37492 . 38507) (READ-AFM-FILE 38509 . 44380) (CONVERT-AFM-FILES 44382 . 45594) ( +POSTSCRIPT.GETFONTID 45596 . 46991) (POSTSCRIPT.FONTCREATE 46993 . 59392) ( +\POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS 59394 . 61791) (POSTSCRIPT.FONTSAVAILABLE 61793 . 65559)) (66110 +75256 (OPENPOSTSCRIPTSTREAM 66120 . 74922) (CLOSEPOSTSCRIPTSTREAM 74924 . 75254)) (75301 81122 ( +POSTSCRIPT.HARDCOPYW 75311 . 78660) (POSTSCRIPT.TEDIT 78662 . 79142) (POSTSCRIPT.TEXT 79144 . 79435) ( +POSTSCRIPTFILEP 79437 . 80073) (MAKEEPSFILE 80075 . 81120)) (81123 126009 (POSTSCRIPT.BITMAPSCALE +81133 . 83589) (POSTSCRIPT.CLOSESTRING 83591 . 84125) (POSTSCRIPT.ENDPAGE 84127 . 84998) ( +POSTSCRIPT.OUTSTR 85000 . 86021) (POSTSCRIPT.PUTBITMAPBYTES 86023 . 94494) (POSTSCRIPT.PUTCOMMAND +94496 . 95545) (POSTSCRIPT.SET-FAKE-LANDSCAPE 95547 . 100995) (POSTSCRIPT.SHOWACCUM 100997 . 103235) ( +POSTSCRIPT.STARTPAGE 103237 . 105816) (\POSTSCRIPTTAB 105818 . 106689) (\PS.BOUTFIXP 106691 . 108041) +(\PS.SCALEHACK 108043 . 110872) (\PS.SCALEREGION 110874 . 111434) (\SCALEDBITBLT.PSC 111436 . 115736) +(\SETPOS.PSC 115738 . 116200) (\SETXFORM.PSC 116202 . 118021) (\STRINGWIDTH.PSC 118023 . 118477) ( +\SWITCHFONTS.PSC 118479 . 124636) (\TERPRI.PSC 124638 . 126007)) (126044 181764 (\BITBLT.PSC 126054 . +126607) (\BLTSHADE.PSC 126609 . 130891) (\CHARWIDTH.PSC 130893 . 131660) (\CREATECHARSET.PSC 131662 . +133360) (\DRAWARC.PSC 133362 . 135842) (\DRAWCIRCLE.PSC 135844 . 138253) (\DRAWCURVE.PSC 138255 . +142276) (\DRAWELLIPSE.PSC 142278 . 144755) (\DRAWLINE.PSC 144757 . 147107) (\DRAWPOINT.PSC 147109 . +147697) (\DRAWPOLYGON.PSC 147699 . 150813) (\DSPBOTTOMMARGIN.PSC 150815 . 151380) ( +\DSPCLIPPINGREGION.PSC 151382 . 152825) (\DSPCOLOR.PSC 152827 . 153668) (\DSPFONT.PSC 153670 . 157880) + (\DSPLEFTMARGIN.PSC 157882 . 158451) (\DSPLINEFEED.PSC 158453 . 159029) (\DSPPUSHSTATE.PSC 159031 . +160794) (\DSPPOPSTATE.PSC 160796 . 163305) (\DSPRESET.PSC 163307 . 163953) (\DSPRIGHTMARGIN.PSC 163955 + . 164527) (\DSPROTATE.PSC 164529 . 165552) (\DSPSCALE.PSC 165554 . 166485) (\DSPSCALE2.PSC 166487 . +167306) (\DSPSPACEFACTOR.PSC 167308 . 168280) (\DSPTOPMARGIN.PSC 168282 . 168999) (\DSPTRANSLATE.PSC +169001 . 171575) (\DSPXPOSITION.PSC 171577 . 172176) (\DSPYPOSITION.PSC 172178 . 172750) ( +\FILLCIRCLE.PSC 172752 . 175398) (\FILLPOLYGON.PSC 175400 . 179316) (\FIXLINELENGTH.PSC 179318 . +180812) (\MOVETO.PSC 180814 . 181565) (\NEWPAGE.PSC 181567 . 181762)) (181820 204972 ( +\POSTSCRIPT.CHANGECHARSET 181830 . 182634) (\POSTSCRIPT.OUTCHARFN 182636 . 195493) ( +\POSTSCRIPT.PRINTSLUG 195495 . 197462) (\POSTSCRIPT.SPECIALOUTCHARFN 197464 . 199896) (\UPDATE.PSC +199898 . 201121) (\POSTSCRIPT.ACCENTFN 201123 . 202065) (\POSTSCRIPT.ACCENTPAIR 202067 . 204970)) ( +205070 206715 (\PSC.SPACEDISP 205080 . 205359) (\PSC.SPACEWID 205361 . 205980) (\PSC.SYMBOLS 205982 . +206713)) (206824 209815 (\POSTSCRIPT.NSHASH 206834 . 209813)) (254855 255569 (POSTSCRIPTSEND 254865 . +255567))))) STOP diff --git a/library/POSTSCRIPTSTREAM.LCOM b/library/POSTSCRIPTSTREAM.LCOM index 572cfba1b..f41c947a4 100644 Binary files a/library/POSTSCRIPTSTREAM.LCOM and b/library/POSTSCRIPTSTREAM.LCOM differ diff --git a/library/RDSYS b/library/RDSYS index b8ff261c1..79c9f4387 100644 --- a/library/RDSYS +++ b/library/RDSYS @@ -1,14 +1,14 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED " 6-May-2021 15:26:36" {DSK}larry>ilisp>medley>tmp>RDSYS.;1) +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "XCL" BASE 10 FORMAT XCCS) +(FILECREATED "27-Jul-2021 21:13:24" |{DSK}larry>new>medley>tmp>RDSYS.;2|) (PRETTYCOMPRINT RDSYSCOMS) -(RPAQQ RDSYSCOMS ((FNS VREADPAGEMAP VREADPAGEMAPBLOCK VCHECKIFPAGE V\LOCKEDPAGEP V\LOOKUPPAGEMAP VCHECKPAGEMAP VCHECKFPTOVP VCHECKFPTOVP1 V\SHOWPAGETABLE V\PRINTFPTOVP) (FNS VRAIDCOMMAND VRAIDSHOWFRAME VRAIDSTACKCMD VRAIDROOTFRAME VPRINTADDRS VPRINTVA VREADVA VREADOCT VREADATOM VSHOWSTACKBLOCKS VSHOWSTACKBLOCK1 VPRINCOPY VNOSUCHATOM) (FNS V\BACKTRACE V\STKNAME V\PRINTBF V\PRINTFRAME V\SCANFORNTENTRY V\PRINTSTK) (FNS V\CHECKARRAYBLOCK V\PARSEARRAYSPACE V\PARSEARRAYSPACE1) (FNS VPRINTCODE VPRINTCODENT VBROKENDEF) (FNS V\CAR.UFN V\CDR.UFN) (FNS V\COPY V\UNCOPY) (FNS V\GETBASEBYTE V\PUTBASEBYTE) (FNS VNTYPX VTYPENAME V\TYPENAMEFROMNUMBER) (FNS VUNCOPYATOM VMAKE.LOCAL.ATOM VSYMBOL.VALUE VSYMBOL.PNAME VSYMBOL.PACKAGE VOLD.FIND.SYMBOL VLOOKUP-SYMBOL VFIND.PACKAGE VFIND.SYMBOL VPACKAGE.NAME V\MKATOM VGETTOPVAL VGETPROPLIST VSETTOPVAL VGETDEFN V\ATOMCELL) (FNS VLISTP) (VARS (COPYATOMSTR)) (FNS V\GET-COMPILED-CODE-BASE) (* ;; "YOU MUST REMAKE THIS FILE using (DORENAME 'R) (after CONNing to library) whenever the SYSOUT layout changes in LLPARAMS (e.g., if MDSTypeTable moves)") (FILES VMEM) (VARS RDVALS RDPTRS) (DECLARE%: EVAL@COMPILE DONTCOPY (FILES (LOADCOMP) VMEM)))) +(RPAQQ RDSYSCOMS ((FNS VREADPAGEMAP VREADPAGEMAPBLOCK VCHECKIFPAGE V\\LOCKEDPAGEP V\\LOOKUPPAGEMAP VCHECKPAGEMAP VCHECKFPTOVP VCHECKFPTOVP1 V\\SHOWPAGETABLE V\\PRINTFPTOVP) (FNS VRAIDCOMMAND VRAIDSHOWFRAME VRAIDSTACKCMD VRAIDROOTFRAME VPRINTADDRS VPRINTVA VREADVA VREADOCT VREADATOM VSHOWSTACKBLOCKS VSHOWSTACKBLOCK1 VPRINCOPY VNOSUCHATOM) (FNS V\\BACKTRACE V\\STKNAME V\\PRINTBF V\\PRINTFRAME V\\SCANFORNTENTRY V\\PRINTSTK) (FNS V\\CHECKARRAYBLOCK V\\PARSEARRAYSPACE V\\PARSEARRAYSPACE1) (FNS VPRINTCODE VPRINTCODENT VBROKENDEF) (FNS V\\CAR.UFN V\\CDR.UFN) (FNS V\\COPY V\\UNCOPY) (FNS V\\GETBASEBYTE V\\PUTBASEBYTE) (FNS VNTYPX VTYPENAME V\\TYPENAMEFROMNUMBER) (FNS VUNCOPYATOM VMAKE.LOCAL.ATOM VSYMBOL.VALUE VSYMBOL.PNAME VSYMBOL.PACKAGE VOLD.FIND.SYMBOL VLOOKUP-SYMBOL VFIND.PACKAGE VFIND.SYMBOL VPACKAGE.NAME V\\MKATOM VGETTOPVAL VGETPROPLIST VSETTOPVAL VGETDEFN V\\ATOMCELL) (FNS VLISTP) (VARS (COPYATOMSTR)) (FNS V\\GET-COMPILED-CODE-BASE) (* |;;| "YOU MUST REMAKE THIS FILE using (DORENAME 'R) (after CONNing to library) whenever the SYSOUT layout changes in LLPARAMS (e.g., if MDSTypeTable moves)") (FILES VMEM) (VARS RDVALS RDPTRS) (DECLARE\: EVAL@COMPILE DONTCOPY (FILES (LOADCOMP) VMEM)))) (DEFINEQ (VREADPAGEMAP -(LAMBDA NIL (*) (*) (PROG (D) (MAPVMPAGE (IPLUS (LLSH (VHILOC (VVAG2 20 0)) 8) (LRSH (VLOLOC (VVAG2 20 0)) 8)) 1) (*) (*) (MAPVMPAGE (IPLUS (LLSH (VHILOC (VVAG2 5 0)) 8) (LRSH (VLOLOC (VVAG2 5 0)) 8)) (SUB1 (VGETBASE (VVAG2 20 0) 22))) (*) (SETVMPTR (VVAG2 5 0)) (for I from 0 to (SUB1 (LRSH (IPLUS 256 31) 5)) as VP from (IPLUS (LLSH (VHILOC (VVAG2 5 0)) 8) (LRSH (VLOLOC (VVAG2 5 0)) 8)) by 32 do (*) (VREADPAGEMAPBLOCK VP)) (for J from 0 to (SUB1 8) as FP from (SUB1 (VGETBASE (VVAG2 20 0) 23)) do (*) (MAPVMPAGE (IPLUS (IPLUS (LLSH (VHILOC (VVAG2 20 512)) 8) (LRSH (VLOLOC (VVAG2 20 512)) 8)) J) FP)) (for I from 0 to (SUB1 (LLSH 8 8)) do (COND ((IEQ (SETQ D (VGETBASE (VVAG2 20 512) I)) 65535)) (T (SETVMPTR (VADDBASE (VVAG2 5 0) D)) (VREADPAGEMAPBLOCK (LLSH I 5))))))) +(LAMBDA NIL (*) (*) (PROG (D) (MAPVMPAGE (IPLUS (LLSH (VHILOC (VVAG2 20 0)) 8) (LRSH (VLOLOC (VVAG2 20 0)) 8)) 1) (*) (*) (MAPVMPAGE (IPLUS (LLSH (VHILOC (VVAG2 5 0)) 8) (LRSH (VLOLOC (VVAG2 5 0)) 8)) (SUB1 (VGETBASE (VVAG2 20 0) 22))) (*) (SETVMPTR (VVAG2 5 0)) (|for| I |from| 0 |to| (SUB1 (LRSH (IPLUS 256 31) 5)) |as| VP |from| (IPLUS (LLSH (VHILOC (VVAG2 5 0)) 8) (LRSH (VLOLOC (VVAG2 5 0)) 8)) |by| 32 |do| (*) (VREADPAGEMAPBLOCK VP)) (|for| J |from| 0 |to| (SUB1 8) |as| FP |from| (SUB1 (VGETBASE (VVAG2 20 0) 23)) |do| (*) (MAPVMPAGE (IPLUS (IPLUS (LLSH (VHILOC (VVAG2 20 512)) 8) (LRSH (VLOLOC (VVAG2 20 512)) 8)) J) FP)) (|for| I |from| 0 |to| (SUB1 (LLSH 8 8)) |do| (COND ((IEQ (SETQ D (VGETBASE (VVAG2 20 512) I)) 65535)) (T (SETVMPTR (VADDBASE (VVAG2 5 0) D)) (VREADPAGEMAPBLOCK (LLSH I 5))))))) ) (VREADPAGEMAPBLOCK @@ -16,54 +16,54 @@ ) (VCHECKIFPAGE -(LAMBDA NIL (*) (COND ((NOT (EQUAL 5603 (VGETBASE (VVAG2 20 0) 15))) (printout T "Warning: " "Interface page key" "= " (PROGN 5603) ", but \InterfacePage says " (VGETBASE (VVAG2 20 0) 15) T)))) +(LAMBDA NIL (*) (COND ((NOT (EQUAL 5603 (VGETBASE (VVAG2 20 0) 15))) (|printout| T "Warning: " "Interface page key" "= " (PROGN 5603) ", but \\InterfacePage says " (VGETBASE (VVAG2 20 0) 15) T)))) ) -(V\LOCKEDPAGEP +(V\\LOCKEDPAGEP (LAMBDA (VP TEMP) (*) (*) (OR (NEQ 0 (LOGAND (LLSH 1 (IMOD VP 16)) (VGETBASE (VADDBASE (VVAG2 20 28672) (LRSH VP 4)) 0))) NIL)) ) -(V\LOOKUPPAGEMAP +(V\\LOOKUPPAGEMAP (LAMBDA (VP) (*) (*) (LET ((PRIMENTRY (VGETBASE (VVAG2 20 512) (LRSH VP 5)))) (COND ((EQ PRIMENTRY 65535) 0) (T (VGETBASE (VVAG2 5 0) (IPLUS PRIMENTRY (LOGAND VP 31))))))) ) (VCHECKPAGEMAP -(LAMBDA NIL (*) (LET ((*PRINT-BASE* 8) (NUMOCCUPIED 0) (NUMLOCKED 0) (CHAINOCCUPIED 0) (CHAINLOCKED 0) RPTR FPBASE FP VP RP) (VCHECKFPTOVP) (for RPTINDEX from 1 to (SUB1 VRPTSIZE) when (ILESSP (VGETBASE (PROGN (SETQ RPTR (VADDBASE (VADDBASE VREALPAGETABLE (LLSH RPTINDEX 1)) RPTINDEX))) 1) 65534) do (SETQ NUMOCCUPIED (PLUS NUMOCCUPIED 1)) (SETQ VP (VGETBASE RPTR 1)) (SETQ FP (VGETBASE RPTR 2)) (COND ((VCHECKFPTOVP1 FP VP RPTINDEX)) ((NEQ VP (\GETBASEFIXP (SETQ FPBASE (VADDBASE (VVAG2 2 0) FP)) 0)) (printout T "RPT for RP " (RPFROMRPT RPTINDEX) " says VP ") (\PRINTVP VP T) (printout T " lives in FP " FP "; but FP Map says that FP contains ") (\PRINTVP (\GETBASEFIXP FPBASE 0) T) (printout T T)) ((V\LOCKEDPAGEP VP) (SETQ NUMLOCKED (PLUS NUMLOCKED 1)) (COND ((NOT (NEQ 0 (LRSH (VGETBASE RPTR 0) 15))) (printout T "VP " VP ", living in RP " (RPFROMRPT RPTINDEX) " should be locked but isn't." T)) ((IGREATERP FP (DLRPFROMFP (VGETBASE (VVAG2 20 0) 57))) (printout T "VP " VP " is locked, but living in FP " FP ", which is not in the locked page area" T)))))) (PROGN (SETQ RPTR VREALPAGETABLE) (*) (while (NEQ (SETQ RP (LOGAND (VGETBASE RPTR 0) 32767)) 0) when (ILESSP (VGETBASE (PROGN (SETQ RPTR (VADDBASE (VADDBASE VREALPAGETABLE (LLSH RP 1)) RP))) 1) 65534) do (SETQ CHAINOCCUPIED (PLUS CHAINOCCUPIED 1)) (COND ((NEQ 0 (LRSH (VGETBASE RPTR 0) 15)) (SETQ CHAINLOCKED (PLUS CHAINLOCKED 1))))) (COND ((ILESSP CHAINOCCUPIED NUMOCCUPIED) (printout T NUMOCCUPIED " occupied pages, but only " CHAINOCCUPIED " are on page chain. " NUMLOCKED " pages are permanently locked; " CHAINLOCKED " pages on chain are locked somehow." T)))))) +(LAMBDA NIL (*) (LET ((*PRINT-BASE* 8) (NUMOCCUPIED 0) (NUMLOCKED 0) (CHAINOCCUPIED 0) (CHAINLOCKED 0) RPTR FPBASE FP VP RP) (VCHECKFPTOVP) (|for| RPTINDEX |from| 1 |to| (SUB1 VRPTSIZE) |when| (ILESSP (VGETBASE (PROGN (SETQ RPTR (VADDBASE (VADDBASE VREALPAGETABLE (LLSH RPTINDEX 1)) RPTINDEX))) 1) 65534) |do| (SETQ NUMOCCUPIED (PLUS NUMOCCUPIED 1)) (SETQ VP (VGETBASE RPTR 1)) (SETQ FP (VGETBASE RPTR 2)) (COND ((VCHECKFPTOVP1 FP VP RPTINDEX)) ((NEQ VP (\\GETBASEFIXP (SETQ FPBASE (VADDBASE (VVAG2 2 0) FP)) 0)) (|printout| T "RPT for RP " (RPFROMRPT RPTINDEX) " says VP ") (\\PRINTVP VP T) (|printout| T " lives in FP " FP "; but FP Map says that FP contains ") (\\PRINTVP (\\GETBASEFIXP FPBASE 0) T) (|printout| T T)) ((V\\LOCKEDPAGEP VP) (SETQ NUMLOCKED (PLUS NUMLOCKED 1)) (COND ((NOT (NEQ 0 (LRSH (VGETBASE RPTR 0) 15))) (|printout| T "VP " VP ", living in RP " (RPFROMRPT RPTINDEX) " should be locked but isn't." T)) ((IGREATERP FP (DLRPFROMFP (VGETBASE (VVAG2 20 0) 57))) (|printout| T "VP " VP " is locked, but living in FP " FP ", which is not in the locked page area" T)))))) (PROGN (SETQ RPTR VREALPAGETABLE) (*) (|while| (NEQ (SETQ RP (LOGAND (VGETBASE RPTR 0) 32767)) 0) |when| (ILESSP (VGETBASE (PROGN (SETQ RPTR (VADDBASE (VADDBASE VREALPAGETABLE (LLSH RP 1)) RP))) 1) 65534) |do| (SETQ CHAINOCCUPIED (PLUS CHAINOCCUPIED 1)) (COND ((NEQ 0 (LRSH (VGETBASE RPTR 0) 15)) (SETQ CHAINLOCKED (PLUS CHAINLOCKED 1))))) (COND ((ILESSP CHAINOCCUPIED NUMOCCUPIED) (|printout| T NUMOCCUPIED " occupied pages, but only " CHAINOCCUPIED " are on page chain. " NUMLOCKED " pages are permanently locked; " CHAINLOCKED " pages on chain are locked somehow." T)))))) ) (VCHECKFPTOVP -(LAMBDA NIL (*) (for FP from 1 to (\GETBASEFIXP (VVAG2 20 0) 82) as (FPBASE _ (VADDBASE (VVAG2 2 0) 1)) by (VADDBASE FPBASE 1) when (NEQ (VGETBASE FPBASE 0) 65535) do (VCHECKFPTOVP1 FP (\GETBASEFIXP FPBASE 0)))) +(LAMBDA NIL (*) (|for| FP |from| 1 |to| (\\GETBASEFIXP (VVAG2 20 0) 82) |as| (FPBASE _ (VADDBASE (VVAG2 2 0) 1)) |by| (VADDBASE FPBASE 1) |when| (NEQ (VGETBASE FPBASE 0) 65535) |do| (VCHECKFPTOVP1 FP (\\GETBASEFIXP FPBASE 0)))) ) (VCHECKFPTOVP1 -(LAMBDA (FP VP RPTINDEX) (*) (PROG ((FP2 (V\LOOKUPPAGEMAP VP))) (RETURN (COND ((NEQ FP2 FP) (COND (NIL (printout T "RPT for RP " (RPFROMRPT RPTINDEX))) (T (printout T "FP map"))) (printout T " says FP " FP " contains VP ") (\PRINTVP VP T) (printout T "; but PageMap says that page is in FP " FP2 T) T))))) +(LAMBDA (FP VP RPTINDEX) (*) (PROG ((FP2 (V\\LOOKUPPAGEMAP VP))) (RETURN (COND ((NEQ FP2 FP) (COND (NIL (|printout| T "RPT for RP " (RPFROMRPT RPTINDEX))) (T (|printout| T "FP map"))) (|printout| T " says FP " FP " contains VP ") (\\PRINTVP VP T) (|printout| T "; but PageMap says that page is in FP " FP2 T) T))))) ) -(V\SHOWPAGETABLE -(LAMBDA (MODE FILE) (*) (PROG ((*PRINT-BASE* 8) (OUTSTREAM (GETSTREAM FILE (QUOTE OUTPUT))) (RPTR VREALPAGETABLE) (RP 0) FLAGS VP STATE FIRSTONE LASTONE) (printout OUTSTREAM " RP VP FilePage Status" T) (until (SELECTQ MODE (CHAIN (EQ (SETQ RP (LOGAND (VGETBASE RPTR 0) 32767)) 0)) (NIL (SETQ RP (PLUS RP 1)) (IGEQ RP VRPTSIZE)) (\ILLEGAL.ARG MODE)) do (SETQ RPTR (VADDBASE (VADDBASE VREALPAGETABLE (LLSH RP 1)) RP)) (SETQ VP (VGETBASE RPTR 1)) (COND ((AND (NULL MODE) (EQ VP STATE)) (SETQ LASTONE RP)) (T (COND (LASTONE (printout OUTSTREAM "ditto thru " LASTONE T) (SETQ LASTONE NIL))) (SETQ FIRSTONE RP) (SETQ STATE VP) (printout OUTSTREAM .I7.8 (RPFROMRPT RP)) (COND ((EQ (VGETBASE RPTR 1) 65534) (PRIN1 " Empty" OUTSTREAM)) ((NOT (ILESSP (VGETBASE RPTR 1) 65534)) (PRIN1 " Unavailable" OUTSTREAM)) (T (printout OUTSTREAM .I8.8 VP %,) (\PRINTVP VP OUTSTREAM) (printout OUTSTREAM 28 .I6.8 (VGETBASE RPTR 2) %,,) (COND ((NEQ 0 (LRSH (VGETBASE RPTR 0) 15)) (COND ((NOT (V\LOCKEDPAGEP VP)) (*) (PRIN1 "Temp" OUTSTREAM))) (PRIN1 "Locked " OUTSTREAM))) NIL)) (TERPRI OUTSTREAM)))))) +(V\\SHOWPAGETABLE +(LAMBDA (MODE FILE) (*) (PROG ((*PRINT-BASE* 8) (OUTSTREAM (GETSTREAM FILE (QUOTE OUTPUT))) (RPTR VREALPAGETABLE) (RP 0) FLAGS VP STATE FIRSTONE LASTONE) (|printout| OUTSTREAM " RP VP FilePage Status" T) (|until| (SELECTQ MODE (CHAIN (EQ (SETQ RP (LOGAND (VGETBASE RPTR 0) 32767)) 0)) (NIL (SETQ RP (PLUS RP 1)) (IGEQ RP VRPTSIZE)) (\\ILLEGAL.ARG MODE)) |do| (SETQ RPTR (VADDBASE (VADDBASE VREALPAGETABLE (LLSH RP 1)) RP)) (SETQ VP (VGETBASE RPTR 1)) (COND ((AND (NULL MODE) (EQ VP STATE)) (SETQ LASTONE RP)) (T (COND (LASTONE (|printout| OUTSTREAM "ditto thru " LASTONE T) (SETQ LASTONE NIL))) (SETQ FIRSTONE RP) (SETQ STATE VP) (|printout| OUTSTREAM .I7.8 (RPFROMRPT RP)) (COND ((EQ (VGETBASE RPTR 1) 65534) (PRIN1 " Empty" OUTSTREAM)) ((NOT (ILESSP (VGETBASE RPTR 1) 65534)) (PRIN1 " Unavailable" OUTSTREAM)) (T (|printout| OUTSTREAM .I8.8 VP \,) (\\PRINTVP VP OUTSTREAM) (|printout| OUTSTREAM 28 .I6.8 (VGETBASE RPTR 2) |,,|) (COND ((NEQ 0 (LRSH (VGETBASE RPTR 0) 15)) (COND ((NOT (V\\LOCKEDPAGEP VP)) (*) (PRIN1 "Temp" OUTSTREAM))) (PRIN1 "Locked " OUTSTREAM))) NIL)) (TERPRI OUTSTREAM)))))) ) -(V\PRINTFPTOVP -(LAMBDA (FIRSTPAGE NWORDS TYPEFLG STREAM VPRAWFLG) (*) (SETQ STREAM (GETSTREAM STREAM (QUOTE OUTPUT))) (OR FIRSTPAGE (SETQ FIRSTPAGE 1)) (OR NWORDS (SETQ NWORDS (\GETBASEFIXP (VVAG2 20 0) 82))) (LET ((BASE (VADDBASE (VVAG2 2 0) (SUB1 FIRSTPAGE))) (*PRINT-BASE* 8) (LASTVP -2) (NEXTFP (SUB1 FIRSTPAGE)) FIRSTFP FIRSTVP NEXTVP LOCKEDP TYPE NEXTLOCKED NEXTTYPE) (while (IGEQ NWORDS 0) do (SETQ NEXTFP (PLUS NEXTFP 1)) (COND ((EQ NWORDS 0) (SETQ NEXTVP -1)) ((NEQ (SETQ NEXTVP (VGETBASE (SETQ BASE (VADDBASE BASE 1)) 0)) 65535) (SETQ NEXTLOCKED (V\LOCKEDPAGEP NEXTVP)) (if TYPEFLG then (SETQ NEXTTYPE (VTYPENAME ((LAMBDA ($$1) (VVAG2 (LRSH (SETQ $$1 NEXTVP) 8) (LLSH (LOGAND $$1 255) 8))) NIL))) (if (NULL NEXTTYPE) then (SETQ NEXTTYPE (SELECTC (LRSH NEXTVP 8) ((LIST 8 (CL:1+ 8)) "Pnames") ((LIST 10 (CL:1+ 10)) "Definitions") ((LIST 12 (CL:1+ 12)) "Value cells") ((LIST 2 (CL:1+ 2)) "Property lists") ((VHILOC (VVAG2 2 0)) "\FPTOVP") (1 "Stack") ((VHILOC (VVAG2 22 0)) "GC Main table") ((VHILOC (VVAG2 23 0)) "GC Overflow table") NIL)))))) (COND ((COND ((EQ NEXTVP 65535) (NEQ LASTVP 65535)) (T (OR (NEQ NEXTVP (ADD1 LASTVP)) (NEQ NEXTLOCKED LOCKEDP) (NEQ TYPE NEXTTYPE)))) (COND ((IGEQ LASTVP 0) (COND (FIRSTFP (printout STREAM FIRSTFP "-"))) (printout STREAM (SUB1 NEXTFP) 12) (COND ((EQ LASTVP 65535) (printout STREAM "empty")) (T (COND (FIRSTFP (if VPRAWFLG then (PRIN1 FIRSTVP STREAM) else (\PRINTVP FIRSTVP STREAM)) (PRIN1 "-" STREAM))) (if VPRAWFLG then (PRIN1 LASTVP STREAM) else (\PRINTVP LASTVP STREAM)) (COND (LOCKEDP (PRIN1 (QUOTE *) STREAM))) (if TYPE then (printout STREAM 32 TYPE)))))) (SETQ FIRSTFP) (TERPRI STREAM) (SETQ FIRSTVP NEXTVP)) (T (*) (OR FIRSTFP (SETQ FIRSTFP (SUB1 NEXTFP))))) (SETQ LASTVP NEXTVP) (SETQ LOCKEDP NEXTLOCKED) (SETQ TYPE NEXTTYPE) (SETQ NWORDS (PLUS NWORDS -1))))) +(V\\PRINTFPTOVP +(LAMBDA (FIRSTPAGE NWORDS TYPEFLG STREAM VPRAWFLG) (*) (SETQ STREAM (GETSTREAM STREAM (QUOTE OUTPUT))) (OR FIRSTPAGE (SETQ FIRSTPAGE 1)) (OR NWORDS (SETQ NWORDS (\\GETBASEFIXP (VVAG2 20 0) 82))) (LET ((BASE (VADDBASE (VVAG2 2 0) (SUB1 FIRSTPAGE))) (*PRINT-BASE* 8) (LASTVP -2) (NEXTFP (SUB1 FIRSTPAGE)) FIRSTFP FIRSTVP NEXTVP LOCKEDP TYPE NEXTLOCKED NEXTTYPE) (|while| (IGEQ NWORDS 0) |do| (SETQ NEXTFP (PLUS NEXTFP 1)) (COND ((EQ NWORDS 0) (SETQ NEXTVP -1)) ((NEQ (SETQ NEXTVP (VGETBASE (SETQ BASE (VADDBASE BASE 1)) 0)) 65535) (SETQ NEXTLOCKED (V\\LOCKEDPAGEP NEXTVP)) (|if| TYPEFLG |then| (SETQ NEXTTYPE (VTYPENAME ((LAMBDA ($$1) (VVAG2 (LRSH (SETQ $$1 NEXTVP) 8) (LLSH (LOGAND $$1 255) 8))) NIL))) (|if| (NULL NEXTTYPE) |then| (SETQ NEXTTYPE (SELECTC (LRSH NEXTVP 8) ((LIST 8 (CL:1+ 8)) "Pnames") ((LIST 10 (CL:1+ 10)) "Definitions") ((LIST 12 (CL:1+ 12)) "Value cells") ((LIST 2 (CL:1+ 2)) "Property lists") ((VHILOC (VVAG2 2 0)) "\\FPTOVP") (1 "Stack") ((VHILOC (VVAG2 22 0)) "GC Main table") ((VHILOC (VVAG2 23 0)) "GC Overflow table") NIL)))))) (COND ((COND ((EQ NEXTVP 65535) (NEQ LASTVP 65535)) (T (OR (NEQ NEXTVP (ADD1 LASTVP)) (NEQ NEXTLOCKED LOCKEDP) (NEQ TYPE NEXTTYPE)))) (COND ((IGEQ LASTVP 0) (COND (FIRSTFP (|printout| STREAM FIRSTFP "-"))) (|printout| STREAM (SUB1 NEXTFP) 12) (COND ((EQ LASTVP 65535) (|printout| STREAM "empty")) (T (COND (FIRSTFP (|if| VPRAWFLG |then| (PRIN1 FIRSTVP STREAM) |else| (\\PRINTVP FIRSTVP STREAM)) (PRIN1 "-" STREAM))) (|if| VPRAWFLG |then| (PRIN1 LASTVP STREAM) |else| (\\PRINTVP LASTVP STREAM)) (COND (LOCKEDP (PRIN1 (QUOTE *) STREAM))) (|if| TYPE |then| (|printout| STREAM 32 TYPE)))))) (SETQ FIRSTFP) (TERPRI STREAM) (SETQ FIRSTVP NEXTVP)) (T (*) (OR FIRSTFP (SETQ FIRSTFP (SUB1 NEXTFP))))) (SETQ LASTVP NEXTVP) (SETQ LOCKEDP NEXTLOCKED) (SETQ TYPE NEXTTYPE) (SETQ NWORDS (PLUS NWORDS -1))))) ) ) (DEFINEQ (VRAIDCOMMAND -(LAMBDA NIL (*) (DECLARE (USEDFREE ROOTFRAME ALINKS? RAIDIX FRAME# VPRINTLEVEL)) (FRESHLINE T) (PROG (CMD) (SELECTQ (SETQ CMD (ASKUSER NIL NIL "@" (QUOTE ((Q "uit [confirm]" CONFIRMFLG T) (% "^N - remote return [confirm]" NOECHOFLG T CONFIRMFLG T RETURN (QUOTE ^N)) (L "isp stack ") (% "Lisp stack " NOECHOFLG T EXPLAINSTRING "^L -- Lisp stack from arbitrary frame or context" RETURN (QUOTE ^L)) (F "rame ") (% - "Next frame " EXPLAINSTRING "LF - next frame" RETURN (QUOTE LF)) (^ " Previous frame ") (A "tom top-level value of atom: ") (D "efinition for atom: ") (P "roperty list for atom: ") (V " -- show object at Virtual address: ") (B "lock of storage starting at address: ") (S "how raw stack from address: ") (C "ode for function:") (% "Basic frame at: " EXPLAINSTRING "^F - print basic frame at octal address" RETURN (QUOTE ^F)) (% "frame extension at: " EXPLAINSTRING "^X - print frame extension at octal address" RETURN (QUOTE ^X)) (W "alk stack blocks starting at: ") (K "" EXPLAINSTRING "K -- Set linKtype for stack ops") (_ " Set word at address: ") (% " Set value of atom " EXPLAINSTRING "^V -- Set value of atom" RETURN (QUOTE ^V)) (% "atom number for atom: " EXPLAINSTRING "^O - look up atom" RETURN (QUOTE ^O)) (Z "Zap Print level to: ") (I "nspect InterfacePage [confirm]" CONFIRMFLG T) (U " -- Show remote screen [confirm]" CONFIRMFLG T) (" -" "" RETURN NIL) (% " Enter Lisp " EXPLAINSTRING "^Y -- Enter Lisp" RETURN (QUOTE ^Y)))) T)) (^N (RETURN (QUOTE RETURN))) (Q (TERPRI T) (RETURN (QUOTE QUIT))) (NIL) (A (VPRINCOPY (VGETTOPVAL (VREADATOM)))) (P (VPRINCOPY (VGETPROPLIST (VREADATOM)))) (C (VPRINTCODE (VREADATOM) T RAIDIX)) (V (VPRINCOPY (VREADVA))) (B (VPRINTADDRS (VREADVA) (VREADOCT " for (number of words): "))) (S (VPRINTADDRS (VVAG2 1 (VREADOCT)) (VREADOCT " for (number of words): "))) (D (VPRINTADDRS (V\ATOMCELL (PROGN (VREADATOM)) 10) 2)) (^O (PRINTNUM .I2 (VATOMNUMBER (VREADATOM)) T)) (^V (PROG ((ATM (VREADATOM))) (printout T " to be ") (VSETTOPVAL ATM (READ T T)))) ((L ^L) (VRAIDSTACKCMD CMD)) (F (VRAIDSHOWFRAME (SETQ FRAME# (PROG1 (READ T T) (READC T))))) (LF (OR FRAME# (SETQ FRAME# 0)) (printout T "(" .I1 (SETQ FRAME# (PLUS FRAME# 1)) ")" T) (VRAIDSHOWFRAME FRAME#)) (^ (COND ((OR (NULL FRAME#) (ILEQ FRAME# 1)) (printout T "No previous frame" T)) (T (printout T "(" .I1 (SETQ FRAME# (PLUS FRAME# -1)) ")" T) (VRAIDSHOWFRAME FRAME#)))) (^F (V\PRINTBF (VREADOCT) NIL (FUNCTION VPRINCOPY))) (Z (LET ((A (PROG1 (READ T T) (READC T))) (D (PROG1 (READ T T) (READC T)))) (COND ((AND (FIXP A) (FIXP D)) (SETQ VPRINTLEVEL (CONS A D))) (T (PRINTOUT T "Must be two integers, car level then cdr level" T) (ERROR!))))) (W (VSHOWSTACKBLOCKS (COND ((EQ (PEEKC T) (QUOTE % -)) (READC T) (VGETBASE (VVAG2 20 0) 30)) (T (VREADOCT))))) (^X (V\PRINTFRAME (VREADOCT) (QUOTE PRINCOPY))) (^Y (TERPRI T) (USEREXEC (QUOTE :%:))) (K (SETQ ALINKS? (EQ (ASKUSER NIL NIL " Set link type for stack operations to " (QUOTE ((A "links +(LAMBDA NIL (*) (DECLARE (USEDFREE ROOTFRAME ALINKS? RAIDIX FRAME# VPRINTLEVEL)) (FRESHLINE T) (PROG (CMD) (SELECTQ (SETQ CMD (ASKUSER NIL NIL "@" (QUOTE ((Q "uit [confirm]" CONFIRMFLG T) (\ "^N - remote return [confirm]" NOECHOFLG T CONFIRMFLG T RETURN (QUOTE ^N)) (L "isp stack ") (\ "Lisp stack " NOECHOFLG T EXPLAINSTRING "^L -- Lisp stack from arbitrary frame or context" RETURN (QUOTE ^L)) (F "rame ") (\ + "Next frame " EXPLAINSTRING "LF - next frame" RETURN (QUOTE LF)) (^ " Previous frame ") (A "tom top-level value of atom: ") (D "efinition for atom: ") (P "roperty list for atom: ") (V " -- show object at Virtual address: ") (B "lock of storage starting at address: ") (S "how raw stack from address: ") (C "ode for function:") (\ "Basic frame at: " EXPLAINSTRING "^F - print basic frame at octal address" RETURN (QUOTE ^F)) (\ "frame extension at: " EXPLAINSTRING "^X - print frame extension at octal address" RETURN (QUOTE ^X)) (W "alk stack blocks starting at: ") (K "" EXPLAINSTRING "K -- Set linKtype for stack ops") (_ " Set word at address: ") (\ " Set value of atom " EXPLAINSTRING "^V -- Set value of atom" RETURN (QUOTE ^V)) (\ "atom number for atom: " EXPLAINSTRING "^O - look up atom" RETURN (QUOTE ^O)) (Z "Zap Print level to: ") (I "nspect InterfacePage [confirm]" CONFIRMFLG T) (U " -- Show remote screen [confirm]" CONFIRMFLG T) (" +" "" RETURN NIL) (\ " Enter Lisp " EXPLAINSTRING "^Y -- Enter Lisp" RETURN (QUOTE ^Y)))) T)) (^N (RETURN (QUOTE RETURN))) (Q (TERPRI T) (RETURN (QUOTE QUIT))) (NIL) (A (VPRINCOPY (VGETTOPVAL (VREADATOM)))) (P (VPRINCOPY (VGETPROPLIST (VREADATOM)))) (C (VPRINTCODE (VREADATOM) T RAIDIX)) (V (VPRINCOPY (VREADVA))) (B (VPRINTADDRS (VREADVA) (VREADOCT " for (number of words): "))) (S (VPRINTADDRS (VVAG2 1 (VREADOCT)) (VREADOCT " for (number of words): "))) (D (VPRINTADDRS (V\\ATOMCELL (PROGN (VREADATOM)) 10) 2)) (^O (PRINTNUM .I2 (VATOMNUMBER (VREADATOM)) T)) (^V (PROG ((ATM (VREADATOM))) (|printout| T " to be ") (VSETTOPVAL ATM (READ T T)))) ((L ^L) (VRAIDSTACKCMD CMD)) (F (VRAIDSHOWFRAME (SETQ FRAME# (PROG1 (READ T T) (READC T))))) (LF (OR FRAME# (SETQ FRAME# 0)) (|printout| T "(" .I1 (SETQ FRAME# (PLUS FRAME# 1)) ")" T) (VRAIDSHOWFRAME FRAME#)) (^ (COND ((OR (NULL FRAME#) (ILEQ FRAME# 1)) (|printout| T "No previous frame" T)) (T (|printout| T "(" .I1 (SETQ FRAME# (PLUS FRAME# -1)) ")" T) (VRAIDSHOWFRAME FRAME#)))) (^F (V\\PRINTBF (VREADOCT) NIL (FUNCTION VPRINCOPY))) (Z (LET ((A (PROG1 (READ T T) (READC T))) (D (PROG1 (READ T T) (READC T)))) (COND ((AND (FIXP A) (FIXP D)) (SETQ VPRINTLEVEL (CONS A D))) (T (PRINTOUT T "Must be two integers, car level then cdr level" T) (ERROR!))))) (W (VSHOWSTACKBLOCKS (COND ((EQ (PEEKC T) (QUOTE \ +)) (READC T) (VGETBASE (VVAG2 20 0) 30)) (T (VREADOCT))))) (^X (V\\PRINTFRAME (VREADOCT) (QUOTE PRINCOPY))) (^Y (TERPRI T) (USEREXEC (QUOTE :\:))) (K (SETQ ALINKS? (EQ (ASKUSER NIL NIL " Set link type for stack operations to " (QUOTE ((A "links ") (C "links -"))) T) (QUOTE A)))) (_ (PROG ((VA (VREADVA))) (printout T " Currently ") (PRINTNUM .I7 (VGETBASE VA 0) T) (printout T " to be ") (VPUTBASE VA 0 (VREADOCT)))) (I (COND ((NULL (GETD (QUOTE INSPECT)))) ((RECLOOK (QUOTE IFPAGE)) (INSPECT (COND ((LISTP VMEMFILE) (VMAPPAGE (fetch (POINTER PAGE#) of \InterfacePage))) (T (PROG ((PAGE (NCREATE (QUOTE VMEMPAGEP)))) (SETVMPTR (VGETTOPVAL (QUOTE \InterfacePage))) (\BINS (GETSTREAM VMEMFILE) PAGE 0 BYTESPERPAGE) (RETURN PAGE)))) (QUOTE IFPAGE))) (T (PRIN1 " Can't -- no record for IFPAGE"))) (TERPRI T)) (U (SHOWREMOTESCREEN)) (HELP)) (RETURN NIL))) +"))) T) (QUOTE A)))) (_ (PROG ((VA (VREADVA))) (|printout| T " Currently ") (PRINTNUM .I7 (VGETBASE VA 0) T) (|printout| T " to be ") (VPUTBASE VA 0 (VREADOCT)))) (I (COND ((NULL (GETD (QUOTE INSPECT)))) ((RECLOOK (QUOTE IFPAGE)) (INSPECT (COND ((LISTP VMEMFILE) (VMAPPAGE (|fetch| (POINTER PAGE#) |of| |\\InterfacePage|))) (T (PROG ((PAGE (NCREATE (QUOTE VMEMPAGEP)))) (SETVMPTR (VGETTOPVAL (QUOTE |\\InterfacePage|))) (\\BINS (GETSTREAM VMEMFILE) PAGE 0 BYTESPERPAGE) (RETURN PAGE)))) (QUOTE IFPAGE))) (T (PRIN1 " Can't -- no record for IFPAGE"))) (TERPRI T)) (U (SHOWREMOTESCREEN)) (HELP)) (RETURN NIL))) ) (VRAIDSHOWFRAME -(LAMBDA (N) (*) (PROG ((FRAME (OR ROOTFRAME (VRAIDROOTFRAME)))) (FRPTQ (SUB1 N) (COND ((EQ (PROGN (SETQ FRAME (COND (ALINKS? (IDIFFERENCE (LOGAND (VGETBASE (VVAG2 1 FRAME) 1) (CONSTANT (LOGXOR (SUB1 2) -1))) 10)) (T (IDIFFERENCE (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 FRAME) 1) 1))) (VGETBASE (VVAG2 1 FRAME) 1)) (T (VGETBASE (VVAG2 1 FRAME) 9))) 10))))) 0) (RETURN (printout T N " is beyond the bottom of the stack" T))))) (V\BACKTRACE FRAME FRAME T NIL T T NIL (FUNCTION VPRINCOPY) NIL RAIDIX))) +(LAMBDA (N) (*) (PROG ((FRAME (OR ROOTFRAME (VRAIDROOTFRAME)))) (FRPTQ (SUB1 N) (COND ((EQ (PROGN (SETQ FRAME (COND (ALINKS? (IDIFFERENCE (LOGAND (VGETBASE (VVAG2 1 FRAME) 1) (CONSTANT (LOGXOR (SUB1 2) -1))) 10)) (T (IDIFFERENCE (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 FRAME) 1) 1))) (VGETBASE (VVAG2 1 FRAME) 1)) (T (VGETBASE (VVAG2 1 FRAME) 9))) 10))))) 0) (RETURN (|printout| T N " is beyond the bottom of the stack" T))))) (V\\BACKTRACE FRAME FRAME T NIL T T NIL (FUNCTION VPRINCOPY) NIL RAIDIX))) ) (VRAIDSTACKCMD -(LAMBDA (CMD) (*) (DECLARE (USEDFREE FRAME# ROOTFRAME)) (PROG (FRAME) (SETQ FRAME# 0) (COND ((EQ CMD (QUOTE L)) (VRAIDROOTFRAME)) (T (SETQ ROOTFRAME (SELECTQ (SETQ FRAME (ASKUSER NIL NIL "in context (? for help): " (QUOTE ((P "age fault") (G "arbage collection") (K "eyboard handler") (H "ard Return") (S "tack manipulator") (R "eset") (M "iscellaneous") (F "rame at location: "))) T)) (P (VGETBASE (VVAG2 20 0) 6)) (G (VGETBASE (VVAG2 20 0) 5)) (K (VGETBASE (VVAG2 20 0) 3)) (H (VGETBASE (VVAG2 20 0) 4)) (S (VGETBASE (VVAG2 20 0) 2)) (R (VGETBASE (VVAG2 20 0) 1)) (M (VGETBASE (VVAG2 20 0) 14)) (COND ((AND (ILESSP (SETQ FRAME (VREADOCT)) 256) (ILESSP (VGETBASE (VVAG2 20 0) FRAME) (VGETBASE (VVAG2 20 0) 7)) (IEQ (LRSH (VGETBASE (VVAG2 1 (PROGN (PROGN (VGETBASE (VVAG2 20 0) FRAME)))) 0) 13) 6)) (VGETBASE (VVAG2 20 0) FRAME)) ((IEQ (LRSH (VGETBASE (VVAG2 1 FRAME) 0) 13) 6) FRAME) (T (PRINTNUM .I7 FRAME) (printout T " not a valid frame." T) (RETURN))))))) (FRESHLINE T) (V\BACKTRACE ROOTFRAME NIL T NIL NIL NIL ALINKS? (FUNCTION VPRINCOPY) 1 RAIDIX))) +(LAMBDA (CMD) (*) (DECLARE (USEDFREE FRAME# ROOTFRAME)) (PROG (FRAME) (SETQ FRAME# 0) (COND ((EQ CMD (QUOTE L)) (VRAIDROOTFRAME)) (T (SETQ ROOTFRAME (SELECTQ (SETQ FRAME (ASKUSER NIL NIL "in context (? for help): " (QUOTE ((P "age fault") (G "arbage collection") (K "eyboard handler") (H "ard Return") (S "tack manipulator") (R "eset") (M "iscellaneous") (F "rame at location: "))) T)) (P (VGETBASE (VVAG2 20 0) 6)) (G (VGETBASE (VVAG2 20 0) 5)) (K (VGETBASE (VVAG2 20 0) 3)) (H (VGETBASE (VVAG2 20 0) 4)) (S (VGETBASE (VVAG2 20 0) 2)) (R (VGETBASE (VVAG2 20 0) 1)) (M (VGETBASE (VVAG2 20 0) 14)) (COND ((AND (ILESSP (SETQ FRAME (VREADOCT)) 256) (ILESSP (VGETBASE (VVAG2 20 0) FRAME) (VGETBASE (VVAG2 20 0) 7)) (IEQ (LRSH (VGETBASE (VVAG2 1 (PROGN (PROGN (VGETBASE (VVAG2 20 0) FRAME)))) 0) 13) 6)) (VGETBASE (VVAG2 20 0) FRAME)) ((IEQ (LRSH (VGETBASE (VVAG2 1 FRAME) 0) 13) 6) FRAME) (T (PRINTNUM .I7 FRAME) (|printout| T " not a valid frame." T) (RETURN))))))) (FRESHLINE T) (V\\BACKTRACE ROOTFRAME NIL T NIL NIL NIL ALINKS? (FUNCTION VPRINCOPY) 1 RAIDIX))) ) (VRAIDROOTFRAME @@ -71,7 +71,7 @@ ) (VPRINTADDRS -(LAMBDA (BASE CNT) (*) (PRIN1 "words from ") (VPRINTVA BASE) (PRIN1 " to ") (VPRINTVA (VADDBASE BASE (SUB1 CNT))) (TERPRI) (SPACES 7) (for I from 0 to 7 do (PRINTNUM .I7 I)) (PROG ((NB (VVAG2 (VHILOC BASE) (LOGAND (VLOLOC BASE) (CONSTANT (LOGXOR (SUB1 8) -1))))) (LB (VADDBASE BASE CNT))) (do (COND ((EVENP (VLOLOC NB) 8) (TAB 0 0) (PRINTNUM .I5 (VLOLOC NB)) (PRIN1 ": "))) (COND ((IGREATERP BASE NB) (SPACES 7)) (T (PRINTNUM .I7 (VGETBASE NB 0)))) (SETQ NB (VADDBASE NB 1)) repeatwhile (IGREATERP LB NB)) (TAB 0 0))) +(LAMBDA (BASE CNT) (*) (PRIN1 "words from ") (VPRINTVA BASE) (PRIN1 " to ") (VPRINTVA (VADDBASE BASE (SUB1 CNT))) (TERPRI) (SPACES 7) (|for| I |from| 0 |to| 7 |do| (PRINTNUM .I7 I)) (PROG ((NB (VVAG2 (VHILOC BASE) (LOGAND (VLOLOC BASE) (CONSTANT (LOGXOR (SUB1 8) -1))))) (LB (VADDBASE BASE CNT))) (|do| (COND ((EVENP (VLOLOC NB) 8) (TAB 0 0) (PRINTNUM .I5 (VLOLOC NB)) (PRIN1 ": "))) (COND ((IGREATERP BASE NB) (SPACES 7)) (T (PRINTNUM .I7 (VGETBASE NB 0)))) (SETQ NB (VADDBASE NB 1)) |repeatwhile| (IGREATERP LB NB)) (TAB 0 0))) ) (VPRINTVA @@ -82,15 +82,15 @@ (LAMBDA NIL (*) (VVAG2 (VREADOCT) (VREADOCT)))) (VREADOCT -(LAMBDA (PROMPT) (*) (DECLARE (USEDFREE RAIDIX)) (COND ((AND PROMPT (NOT (READP T))) (printout T PROMPT))) (bind STR while (EQUAL (SETQ STR (RSTRING T T)) "") do (READC T) finally (RETURN (PROG1 (OR (FIXP (SELECTQ RAIDIX (8 (MKATOM (CONCAT STR "Q"))) (16 (bind (N _ 0) CHAR while (SETQ CHAR (GNC STR)) do (SETQ N (IPLUS (ITIMES N 16) (COND ((FIXP CHAR) CHAR) ((AND (IGEQ (SETQ CHAR (CHCON1 CHAR)) (CHARCODE A)) (ILEQ CHAR (CHARCODE F))) (IPLUS (IDIFFERENCE CHAR (CHARCODE A)) 10)) (T (ERROR CHAR (QUOTE ?) T))))) finally (RETURN N))) (SHOULDNT))) (PROGN (PRIN1 "?" T) (ERROR!))) (READC T))))) +(LAMBDA (PROMPT) (*) (DECLARE (USEDFREE RAIDIX)) (COND ((AND PROMPT (NOT (READP T))) (|printout| T PROMPT))) (|bind| STR |while| (EQUAL (SETQ STR (RSTRING T T)) "") |do| (READC T) |finally| (RETURN (PROG1 (OR (FIXP (SELECTQ RAIDIX (8 (MKATOM (CONCAT STR "Q"))) (16 (|bind| (N _ 0) CHAR |while| (SETQ CHAR (GNC STR)) |do| (SETQ N (IPLUS (ITIMES N 16) (COND ((FIXP CHAR) CHAR) ((AND (IGEQ (SETQ CHAR (CHCON1 CHAR)) (CHARCODE A)) (ILEQ CHAR (CHARCODE F))) (IPLUS (IDIFFERENCE CHAR (CHARCODE A)) 10)) (T (ERROR CHAR (QUOTE ?) T))))) |finally| (RETURN N))) (SHOULDNT))) (PROGN (PRIN1 "?" T) (ERROR!))) (READC T))))) ) (VREADATOM -(LAMBDA NIL (*) (PROG1 (HANDLER-BIND ((XCL:MISSING-EXTERNAL-SYMBOL (CL:FUNCTION (LAMBDA (CONDITION) (* ;; "MAKE AN INTERNAL SYMBOL INSTEAD") (CL:INTERN (XCL:MISSING-EXTERNAL-SYMBOL-NAME CONDITION) (XCL:MISSING-EXTERNAL-SYMBOL-PACKAGE CONDITION))))) (XCL:MISSING-PACKAGE (CL:FUNCTION (LAMBDA (CONDITION) (* ;; "FAKE A PACKAGE BY THIS NAME AND MAKE THE SYMBOL IN IT") (CL:INTERN (XCL:MISSING-PACKAGE-SYMBOL-NAME CONDITION) (CL:MAKE-PACKAGE (XCL:MISSING-PACKAGE-PACKAGE-NAME CONDITION) :USE NIL)))))) (CL:READ T)) (READC T))) +(LAMBDA NIL (*) (PROG1 (HANDLER-BIND ((XCL:MISSING-EXTERNAL-SYMBOL (CL:FUNCTION (LAMBDA (CONDITION) (* |;;| "MAKE AN INTERNAL SYMBOL INSTEAD") (CL:INTERN (XCL:MISSING-EXTERNAL-SYMBOL-NAME CONDITION) (XCL:MISSING-EXTERNAL-SYMBOL-PACKAGE CONDITION))))) (XCL:MISSING-PACKAGE (CL:FUNCTION (LAMBDA (CONDITION) (* |;;| "FAKE A PACKAGE BY THIS NAME AND MAKE THE SYMBOL IN IT") (CL:INTERN (XCL:MISSING-PACKAGE-SYMBOL-NAME CONDITION) (CL:MAKE-PACKAGE (XCL:MISSING-PACKAGE-PACKAGE-NAME CONDITION) :USE NIL)))))) (CL:READ T)) (READC T))) ) (VSHOWSTACKBLOCKS -(LAMBDA (SCANPTR WAITFLG) (*) (*) (PROG ((EASP (VGETBASE (VVAG2 20 0) 7))) SCAN (SELECTC (LRSH (VGETBASE (VVAG2 1 SCANPTR) 0) 13) (5 (VSHOWSTACKBLOCK1 SCANPTR "free block" (IEQ (VGETBASE (VVAG2 1 SCANPTR) 0) 40960)) (SETQ SCANPTR (PLUS SCANPTR (VGETBASE (VVAG2 1 SCANPTR) 1)))) (7 (VSHOWSTACKBLOCK1 SCANPTR "guard block" T) (SETQ SCANPTR (PLUS SCANPTR (VGETBASE (VVAG2 1 SCANPTR) 1)))) (6 (*) (VSHOWSTACKBLOCK1 SCANPTR "Frame extn = " (AND (IEQ (LRSH (VGETBASE (VVAG2 1 SCANPTR) 0) 13) 6) (OR (IEQ (IDIFFERENCE SCANPTR 2) (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 SCANPTR) 1) 1))) (IDIFFERENCE SCANPTR 2)) (T (VGETBASE (VVAG2 1 SCANPTR) 8)))) (AND (NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 (PROGN (IDIFFERENCE SCANPTR 2))) 0) 9) 1)) (IEQ (VGETBASE (VVAG2 1 (PROGN (IDIFFERENCE SCANPTR 2))) 1) (VGETBASE (VVAG2 1 (PROGN (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 SCANPTR) 1) 1))) (IDIFFERENCE SCANPTR 2)) (T (VGETBASE (VVAG2 1 SCANPTR) 8))))) 1)))))) (PRIN2 (V\UNCOPY (VGETBASEPTR (PROGN (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 SCANPTR) 0) 9) 1)) (VGETBASEPTR (VVAG2 1 SCANPTR) 6)) (T (VGETBASEPTR (VVAG2 1 SCANPTR) 2)))) 4))) (SETQ SCANPTR (VGETBASE (VVAG2 1 SCANPTR) 4))) (PROG ((ORIG SCANPTR) IVAR) (*) (while (EQ (LRSH (VGETBASE (VVAG2 1 SCANPTR) 0) 13) 0) do (SETQ SCANPTR (PLUS SCANPTR 2))) (COND ((NOT (IEQ (LRSH (VGETBASE (VVAG2 1 SCANPTR) 0) 13) 4)) (VSHOWSTACKBLOCK1 ORIG "Garbage" T)) (T (SETQ IVAR (VGETBASE (VVAG2 1 SCANPTR) 1)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 SCANPTR) 0) 9) 1)) (VSHOWSTACKBLOCK1 SCANPTR "Residual BF" (EQ SCANPTR ORIG)) (PRIN1 " with IVar = ") (PRINTNUM .I7 IVAR)) (T (VSHOWSTACKBLOCK1 SCANPTR "Basic frame" (AND (EQ ORIG IVAR) (AND (IEQ (LRSH (VGETBASE (VVAG2 1 SCANPTR) 0) 13) 4) (for I from (VGETBASE (VVAG2 1 SCANPTR) 1) to (IDIFFERENCE SCANPTR 2) by 2 always (IEQ 0 (LRSH (VGETBASE (VVAG2 1 I) 0) 13)))))))) (SETQ SCANPTR (PLUS SCANPTR 2)))))) (TERPRI) (COND ((IGREATERP SCANPTR EASP) (RETURN))) (AND WAITFLG (READC T)) (GO SCAN))) +(LAMBDA (SCANPTR WAITFLG) (*) (*) (PROG ((EASP (VGETBASE (VVAG2 20 0) 7))) SCAN (SELECTC (LRSH (VGETBASE (VVAG2 1 SCANPTR) 0) 13) (5 (VSHOWSTACKBLOCK1 SCANPTR "free block" (IEQ (VGETBASE (VVAG2 1 SCANPTR) 0) 40960)) (SETQ SCANPTR (PLUS SCANPTR (VGETBASE (VVAG2 1 SCANPTR) 1)))) (7 (VSHOWSTACKBLOCK1 SCANPTR "guard block" T) (SETQ SCANPTR (PLUS SCANPTR (VGETBASE (VVAG2 1 SCANPTR) 1)))) (6 (*) (VSHOWSTACKBLOCK1 SCANPTR "Frame extn = " (AND (IEQ (LRSH (VGETBASE (VVAG2 1 SCANPTR) 0) 13) 6) (OR (IEQ (IDIFFERENCE SCANPTR 2) (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 SCANPTR) 1) 1))) (IDIFFERENCE SCANPTR 2)) (T (VGETBASE (VVAG2 1 SCANPTR) 8)))) (AND (NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 (PROGN (IDIFFERENCE SCANPTR 2))) 0) 9) 1)) (IEQ (VGETBASE (VVAG2 1 (PROGN (IDIFFERENCE SCANPTR 2))) 1) (VGETBASE (VVAG2 1 (PROGN (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 SCANPTR) 1) 1))) (IDIFFERENCE SCANPTR 2)) (T (VGETBASE (VVAG2 1 SCANPTR) 8))))) 1)))))) (PRIN2 (V\\UNCOPY (VGETBASEPTR (PROGN (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 SCANPTR) 0) 9) 1)) (VGETBASEPTR (VVAG2 1 SCANPTR) 6)) (T (VGETBASEPTR (VVAG2 1 SCANPTR) 2)))) 4))) (SETQ SCANPTR (VGETBASE (VVAG2 1 SCANPTR) 4))) (PROG ((ORIG SCANPTR) IVAR) (*) (|while| (EQ (LRSH (VGETBASE (VVAG2 1 SCANPTR) 0) 13) 0) |do| (SETQ SCANPTR (PLUS SCANPTR 2))) (COND ((NOT (IEQ (LRSH (VGETBASE (VVAG2 1 SCANPTR) 0) 13) 4)) (VSHOWSTACKBLOCK1 ORIG "Garbage" T)) (T (SETQ IVAR (VGETBASE (VVAG2 1 SCANPTR) 1)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 SCANPTR) 0) 9) 1)) (VSHOWSTACKBLOCK1 SCANPTR "Residual BF" (EQ SCANPTR ORIG)) (PRIN1 " with IVar = ") (PRINTNUM .I7 IVAR)) (T (VSHOWSTACKBLOCK1 SCANPTR "Basic frame" (AND (EQ ORIG IVAR) (AND (IEQ (LRSH (VGETBASE (VVAG2 1 SCANPTR) 0) 13) 4) (|for| I |from| (VGETBASE (VVAG2 1 SCANPTR) 1) |to| (IDIFFERENCE SCANPTR 2) |by| 2 |always| (IEQ 0 (LRSH (VGETBASE (VVAG2 1 I) 0) 13)))))))) (SETQ SCANPTR (PLUS SCANPTR 2)))))) (TERPRI) (COND ((IGREATERP SCANPTR EASP) (RETURN))) (AND WAITFLG (READC T)) (GO SCAN))) ) (VSHOWSTACKBLOCK1 @@ -98,93 +98,93 @@ ) (VPRINCOPY -(LAMBDA (X) (*) (PRINT (V\UNCOPY X (CAR VPRINTLEVEL) (CDR VPRINTLEVEL)) T T))) +(LAMBDA (X) (*) (PRINT (V\\UNCOPY X (CAR VPRINTLEVEL) (CDR VPRINTLEVEL)) T T))) (VNOSUCHATOM -(LAMBDA (ATM) (*) (*) (printout T "No such atom: " ATM T) (ERROR "No such atom: "))) +(LAMBDA (ATM) (*) (*) (|printout| T "No such atom: " ATM T) (ERROR "No such atom: "))) ) (DEFINEQ -(V\BACKTRACE -(LAMBDA (IPOS EPOS NAMES VARS LOCALS JUNK ALINKS PRINTFN CNT RADIX) (*) (OR RADIX (SETQ RADIX 8)) (PROG (NARGS NPVARS NAME ARGNAME BLINK (.I7 (NUMFORMATCODE (LIST (QUOTE FIX) 7 RADIX)))) (DECLARE (SPECVARS .I7)) POSLP (COND (CNT (printout NIL .I3 CNT ": ") (SETQ CNT (PLUS CNT 1)))) (SETQ NAME (V\STKNAME IPOS)) (COND (JUNK (TERPRI) (TERPRI) (PRIN1 "Basic frame at ") (PRINTNUM .I7 (SETQ BLINK (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 IPOS) 1) 1))) (IDIFFERENCE IPOS 2)) (T (VGETBASE (VVAG2 1 IPOS) 8))))) (TERPRI) (V\PRINTBF BLINK (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 IPOS) 0) 9) 1)) (VGETBASEPTR (VVAG2 1 IPOS) 6)) (T (VGETBASEPTR (VVAG2 1 IPOS) 2))) PRINTFN) (PROGN (TERPRI) (PRIN1 "Frame xtn at ") (PRINTNUM .I7 IPOS) (PRIN1 ", frame name= ")) (APPLY* PRINTFN NAME) (V\PRINTFRAME IPOS PRINTFN)) ((OR VARS LOCALS) (V\PRINTBF (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 IPOS) 1) 1))) (IDIFFERENCE IPOS 2)) (T (VGETBASE (VVAG2 1 IPOS) 8))) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 IPOS) 0) 9) 1)) (VGETBASEPTR (VVAG2 1 IPOS) 6)) (T (VGETBASEPTR (VVAG2 1 IPOS) 2))) PRINTFN (COND (LOCALS (QUOTE LOCALS)) (T T))) (COND (NAMES (APPLY* PRINTFN NAME) (TERPRI))) (V\PRINTFRAME IPOS PRINTFN (COND (LOCALS (QUOTE LOCALS)) (T T)))) (NAMES (APPLY* PRINTFN NAME))) (COND ((AND (NEQ EPOS IPOS) (NOT (EQ (PROGN (SETQ IPOS (COND (ALINKS (IDIFFERENCE (LOGAND (VGETBASE (VVAG2 1 IPOS) 1) (CONSTANT (LOGXOR (SUB1 2) -1))) 10)) (T (IDIFFERENCE (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 IPOS) 1) 1))) (VGETBASE (VVAG2 1 IPOS) 1)) (T (VGETBASE (VVAG2 1 IPOS) 9))) 10))))) 0))) (GO POSLP))) (RETURN T))) +(V\\BACKTRACE +(LAMBDA (IPOS EPOS NAMES VARS LOCALS JUNK ALINKS PRINTFN CNT RADIX) (*) (OR RADIX (SETQ RADIX 8)) (PROG (NARGS NPVARS NAME ARGNAME BLINK (.I7 (NUMFORMATCODE (LIST (QUOTE FIX) 7 RADIX)))) (DECLARE (SPECVARS .I7)) POSLP (COND (CNT (|printout| NIL .I3 CNT ": ") (SETQ CNT (PLUS CNT 1)))) (SETQ NAME (V\\STKNAME IPOS)) (COND (JUNK (TERPRI) (TERPRI) (PRIN1 "Basic frame at ") (PRINTNUM .I7 (SETQ BLINK (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 IPOS) 1) 1))) (IDIFFERENCE IPOS 2)) (T (VGETBASE (VVAG2 1 IPOS) 8))))) (TERPRI) (V\\PRINTBF BLINK (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 IPOS) 0) 9) 1)) (VGETBASEPTR (VVAG2 1 IPOS) 6)) (T (VGETBASEPTR (VVAG2 1 IPOS) 2))) PRINTFN) (PROGN (TERPRI) (PRIN1 "Frame xtn at ") (PRINTNUM .I7 IPOS) (PRIN1 ", frame name= ")) (APPLY* PRINTFN NAME) (V\\PRINTFRAME IPOS PRINTFN)) ((OR VARS LOCALS) (V\\PRINTBF (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 IPOS) 1) 1))) (IDIFFERENCE IPOS 2)) (T (VGETBASE (VVAG2 1 IPOS) 8))) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 IPOS) 0) 9) 1)) (VGETBASEPTR (VVAG2 1 IPOS) 6)) (T (VGETBASEPTR (VVAG2 1 IPOS) 2))) PRINTFN (COND (LOCALS (QUOTE LOCALS)) (T T))) (COND (NAMES (APPLY* PRINTFN NAME) (TERPRI))) (V\\PRINTFRAME IPOS PRINTFN (COND (LOCALS (QUOTE LOCALS)) (T T)))) (NAMES (APPLY* PRINTFN NAME))) (COND ((AND (NEQ EPOS IPOS) (NOT (EQ (PROGN (SETQ IPOS (COND (ALINKS (IDIFFERENCE (LOGAND (VGETBASE (VVAG2 1 IPOS) 1) (CONSTANT (LOGXOR (SUB1 2) -1))) 10)) (T (IDIFFERENCE (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 IPOS) 1) 1))) (VGETBASE (VVAG2 1 IPOS) 1)) (T (VGETBASE (VVAG2 1 IPOS) 9))) 10))))) 0))) (GO POSLP))) (RETURN T))) ) -(V\STKNAME -(LAMBDA (POS) (*) (*) (LET ((NAME (VGETBASEPTR (PROGN (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 POS) 0) 9) 1)) (VGETBASEPTR (VVAG2 1 POS) 6)) (T (VGETBASEPTR (VVAG2 1 POS) 2)))) 4))) (if (EQ NAME (QUOTE \INTERPRETER)) then (VGETBASEPTR (VVAG2 1 0) (LET ((BFLINK (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 POS) 1) 1))) (IDIFFERENCE POS 2)) (T (VGETBASE (VVAG2 1 POS) 8))))) (+ (VGETBASE (VVAG2 1 BFLINK) 1) (TIMES (CL:1- (IDIFFERENCE (LRSH (IDIFFERENCE BFLINK (VGETBASE (VVAG2 1 BFLINK) 1)) 1) (LOGAND (LRSH (VGETBASE (VVAG2 1 BFLINK) 0) 8) 1))) 2)))) else NAME))) +(V\\STKNAME +(LAMBDA (POS) (*) (*) (LET ((NAME (VGETBASEPTR (PROGN (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 POS) 0) 9) 1)) (VGETBASEPTR (VVAG2 1 POS) 6)) (T (VGETBASEPTR (VVAG2 1 POS) 2)))) 4))) (|if| (EQ NAME (QUOTE \\INTERPRETER)) |then| (VGETBASEPTR (VVAG2 1 0) (LET ((BFLINK (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 POS) 1) 1))) (IDIFFERENCE POS 2)) (T (VGETBASE (VVAG2 1 POS) 8))))) (+ (VGETBASE (VVAG2 1 BFLINK) 1) (TIMES (CL:1- (IDIFFERENCE (LRSH (IDIFFERENCE BFLINK (VGETBASE (VVAG2 1 BFLINK) 1)) 1) (LOGAND (LRSH (VGETBASE (VVAG2 1 BFLINK) 0) 8) 1))) 2)))) |else| NAME))) ) -(V\PRINTBF -(LAMBDA (BL NMT PRINTFN VARSONLY) (*) (bind NM for I from (VGETBASE (VVAG2 1 BL) 1) by 2 as J from 0 to (SUB1 (IDIFFERENCE (LRSH (IDIFFERENCE BL (VGETBASE (VVAG2 1 BL) 1)) 1) (LOGAND (LRSH (VGETBASE (VVAG2 1 BL) 0) 8) 1))) do (OR VARSONLY (V\PRINTSTK I)) (COND ((OR (SETQ NM (V\SCANFORNTENTRY (OR NMT (RETURN (OR VARSONLY (TERPRI)))) (MAKE-NTENTRY 0 J))) (AND (NEQ VARSONLY T) (SETQ NM (QUOTE *local*)))) (AND VARSONLY (SPACES 3)) (PRIN2 NM) (SPACES 1) (APPLY* PRINTFN (VGETBASEPTR (VVAG2 1 0) I)))) finally (OR VARSONLY (while (ILESSP I BL) do (V\PRINTSTK I) (printout NIL "[padding]" T) (SETQ I (PLUS I 2))))) (COND ((NOT VARSONLY) (V\PRINTSTK BL) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 BL) 0) 9) 1)) (PRIN1 "residual "))) (COND ((NEQ (LOGAND (VGETBASE (VVAG2 1 BL) 0) 255) 0) (printout NIL "usecnt= " (LOGAND (VGETBASE (VVAG2 1 BL) 0) 255) %,))) (TERPRI)))) +(V\\PRINTBF +(LAMBDA (BL NMT PRINTFN VARSONLY) (*) (|bind| NM |for| I |from| (VGETBASE (VVAG2 1 BL) 1) |by| 2 |as| J |from| 0 |to| (SUB1 (IDIFFERENCE (LRSH (IDIFFERENCE BL (VGETBASE (VVAG2 1 BL) 1)) 1) (LOGAND (LRSH (VGETBASE (VVAG2 1 BL) 0) 8) 1))) |do| (OR VARSONLY (V\\PRINTSTK I)) (COND ((OR (SETQ NM (V\\SCANFORNTENTRY (OR NMT (RETURN (OR VARSONLY (TERPRI)))) (MAKE-NTENTRY 0 J))) (AND (NEQ VARSONLY T) (SETQ NM (QUOTE |*local*|)))) (AND VARSONLY (SPACES 3)) (PRIN2 NM) (SPACES 1) (APPLY* PRINTFN (VGETBASEPTR (VVAG2 1 0) I)))) |finally| (OR VARSONLY (|while| (ILESSP I BL) |do| (V\\PRINTSTK I) (|printout| NIL "[padding]" T) (SETQ I (PLUS I 2))))) (COND ((NOT VARSONLY) (V\\PRINTSTK BL) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 BL) 0) 9) 1)) (PRIN1 "residual "))) (COND ((NEQ (LOGAND (VGETBASE (VVAG2 1 BL) 0) 255) 0) (|printout| NIL "usecnt= " (LOGAND (VGETBASE (VVAG2 1 BL) 0) 255) \,))) (TERPRI)))) ) -(V\PRINTFRAME -(LAMBDA (FRAME PRINTFN VARSONLY) (*) (PROG ((NMT (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 FRAME) 0) 9) 1)) (VGETBASEPTR (VVAG2 1 FRAME) 6)) (T (VGETBASEPTR (VVAG2 1 FRAME) 2)))) (I 0) (FT (IPLUS (IPLUS FRAME (PROGN 10)) (LLSH (ADD1 (SIGNED (VGETBASE (PROGN (VGETBASEPTR (VVAG2 1 FRAME) 2)) 2) 16)) 2) (PROGN 4))) TMP NLOCALS) (COND ((NOT VARSONLY) (V\PRINTSTK FRAME) (PRIN1 "[") (PROGN (PROG ((FAST (NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 FRAME) 0) 12) 1)))) (DECLARE (LOCALVARS FAST)) (COND (FAST (PRIN1 (QUOTE "F, ")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "F, ") -1)) (= (printout NIL %, FAST NIL)) NIL) T))) (PROG ((INCALL (NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 FRAME) 0) 10) 1)))) (DECLARE (LOCALVARS INCALL)) (COND (INCALL (PRIN1 (QUOTE "C, ")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "C, ") -1)) (= (printout NIL %, INCALL NIL)) NIL) T))) (PROG ((VALIDNAMETABLE (NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 FRAME) 0) 9) 1)))) (DECLARE (LOCALVARS VALIDNAMETABLE)) (COND (VALIDNAMETABLE (PRIN1 (QUOTE "V, ")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "V, ") -1)) (= (printout NIL %, VALIDNAMETABLE NIL)) NIL) T))) (PROG ((NOPUSH (NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 FRAME) 0) 8) 1)))) (DECLARE (LOCALVARS NOPUSH)) (COND (NOPUSH (PRIN1 (QUOTE "N, ")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "N, ") -1)) (= (printout NIL %, NOPUSH NIL)) NIL) T))) (PROG ((USECNT (LOGAND (VGETBASE (VVAG2 1 FRAME) 0) 255))) (DECLARE (LOCALVARS USECNT)) (COND ((NEQ USECNT 0) (PRIN1 (QUOTE "USE=")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "USE=") -1)) (= (printout NIL %, USECNT ", ")) NIL) T))) (PROG ((SLOWP (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 FRAME) 1) 1)))) (DECLARE (LOCALVARS SLOWP)) (COND (SLOWP (PRIN1 (QUOTE "X, ")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "X, ") -1)) (= (printout NIL %, SLOWP NIL)) NIL) T))) (PROG ((ALINK (IDIFFERENCE (LOGAND (VGETBASE (VVAG2 1 FRAME) 1) (CONSTANT (LOGXOR (SUB1 2) -1))) 10))) (DECLARE (LOCALVARS ALINK)) (COND (T (PRIN1 (QUOTE " alink]")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE " alink]") -1)) (= (printout NIL %, ALINK NIL)) NIL) T)))) (TERPRI) (PROGN (V\PRINTSTK (IPLUS FRAME 2)) (PROGN (PROG ((FNHEADER (VGETBASEPTR (VVAG2 1 FRAME) 2))) (DECLARE (LOCALVARS FNHEADER)) (COND (T (PRIN1 (QUOTE "[fn header]")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "[fn header]") -1)) (= (printout NIL %, FNHEADER NIL)) NIL) T)))) (TERPRI)) (PROGN (V\PRINTSTK (IPLUS FRAME 4)) (PROGN (PROG ((NEXTBLOCK (VGETBASE (VVAG2 1 FRAME) 4))) (DECLARE (LOCALVARS NEXTBLOCK)) (COND (T (PRIN1 (QUOTE "[next, pc]")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "[next, pc]") -1)) (= (printout NIL %, NEXTBLOCK NIL)) NIL) T)))) (TERPRI)) (PROGN (V\PRINTSTK (IPLUS FRAME 6)) (PROGN (PROG ((NAMETABLE (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 FRAME) 0) 9) 1)) (VGETBASEPTR (VVAG2 1 FRAME) 6)) (T (VGETBASEPTR (VVAG2 1 FRAME) 2))))) (DECLARE (LOCALVARS NAMETABLE)) (COND (T (PRIN1 (QUOTE "[nametable]")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "[nametable]") -1)) (= (printout NIL %, NAMETABLE NIL)) NIL) T)))) (TERPRI)) (PROGN (V\PRINTSTK (IPLUS FRAME 8)) (PROGN (PROG ((BLINK (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 FRAME) 1) 1))) (IDIFFERENCE FRAME 2)) (T (VGETBASE (VVAG2 1 FRAME) 8))))) (DECLARE (LOCALVARS BLINK)) (COND (T (PRIN1 (QUOTE "[blink, clink]")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "[blink, clink]") -1)) (= (printout NIL %, BLINK NIL)) NIL) T)))) (TERPRI)))) (SETQ NLOCALS (LRSH (VGETBASE NMT 7) 8)) (for old I from (IPLUS FRAME (PROGN 10)) by 2 while (ILESSP I FT) as J from 0 do (OR VARSONLY (V\PRINTSTK I)) (COND ((ILESSP J NLOCALS) (COND ((OR (SETQ TMP (V\SCANFORNTENTRY NMT (MAKE-NTENTRY 32768 J))) (AND (NEQ VARSONLY T) (SETQ TMP "local"))) (COND ((EQ (LRSH (VGETBASE (PROGN (VVAG2 1 I)) 0) 12) 0) (AND VARSONLY (SPACES 3)) (PRIN2 TMP) (SPACES 1) (APPLY* PRINTFN (VGETBASEPTR (VVAG2 1 I) 0))) ((NOT VARSONLY) (printout NIL TMP " [unbound]" T)))))) ((NOT VARSONLY) (COND ((SETQ TMP (V\SCANFORNTENTRY NMT (MAKE-NTENTRY 49152 J))) (printout NIL "[fvar " .P2 TMP " " (COND ((EVENP (VGETBASE (PROGN (VVAG2 1 I)) 0)) (COND ((EQ (SETQ TMP (VHILOC ((LAMBDA ($$1) (VVAG2 (VGETBASE (PROGN $$1) 1) (VGETBASE $$1 0))) (VVAG2 1 I)))) 1) " on stack]") ((NEQ (LOGAND TMP (CONSTANT (LOGXOR (SUB1 2) -1))) (VHILOC (VVAG2 12 0))) (*) " non-stack binding]") (T " top value]"))) (T " not looked up]")) T)) (T (printout NIL "[padding]" T)))))) (COND ((NOT VARSONLY) (SETQ FT (VGETBASE (VVAG2 1 FRAME) 4)) (for old I by 2 while (ILESSP I FT) do (*) (V\PRINTSTK I) (COND ((EQ (LRSH (VGETBASE (PROGN (VVAG2 1 I)) 0) 12) 0) (APPLY* PRINTFN (VGETBASEPTR (VVAG2 1 I) 0))) (T (TERPRI)))))))) +(V\\PRINTFRAME +(LAMBDA (FRAME PRINTFN VARSONLY) (*) (PROG ((NMT (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 FRAME) 0) 9) 1)) (VGETBASEPTR (VVAG2 1 FRAME) 6)) (T (VGETBASEPTR (VVAG2 1 FRAME) 2)))) (I 0) (FT (IPLUS (IPLUS FRAME (PROGN 10)) (LLSH (ADD1 (SIGNED (VGETBASE (PROGN (VGETBASEPTR (VVAG2 1 FRAME) 2)) 2) 16)) 2) (PROGN 4))) TMP NLOCALS) (COND ((NOT VARSONLY) (V\\PRINTSTK FRAME) (PRIN1 "[") (PROGN (PROG ((FAST (NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 FRAME) 0) 12) 1)))) (DECLARE (LOCALVARS FAST)) (COND (FAST (PRIN1 (QUOTE "F, ")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "F, ") -1)) (= (|printout| NIL \, FAST NIL)) NIL) T))) (PROG ((INCALL (NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 FRAME) 0) 10) 1)))) (DECLARE (LOCALVARS INCALL)) (COND (INCALL (PRIN1 (QUOTE "C, ")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "C, ") -1)) (= (|printout| NIL \, INCALL NIL)) NIL) T))) (PROG ((VALIDNAMETABLE (NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 FRAME) 0) 9) 1)))) (DECLARE (LOCALVARS VALIDNAMETABLE)) (COND (VALIDNAMETABLE (PRIN1 (QUOTE "V, ")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "V, ") -1)) (= (|printout| NIL \, VALIDNAMETABLE NIL)) NIL) T))) (PROG ((NOPUSH (NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 FRAME) 0) 8) 1)))) (DECLARE (LOCALVARS NOPUSH)) (COND (NOPUSH (PRIN1 (QUOTE "N, ")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "N, ") -1)) (= (|printout| NIL \, NOPUSH NIL)) NIL) T))) (PROG ((USECNT (LOGAND (VGETBASE (VVAG2 1 FRAME) 0) 255))) (DECLARE (LOCALVARS USECNT)) (COND ((NEQ USECNT 0) (PRIN1 (QUOTE "USE=")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "USE=") -1)) (= (|printout| NIL \, USECNT ", ")) NIL) T))) (PROG ((SLOWP (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 FRAME) 1) 1)))) (DECLARE (LOCALVARS SLOWP)) (COND (SLOWP (PRIN1 (QUOTE "X, ")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "X, ") -1)) (= (|printout| NIL \, SLOWP NIL)) NIL) T))) (PROG ((ALINK (IDIFFERENCE (LOGAND (VGETBASE (VVAG2 1 FRAME) 1) (CONSTANT (LOGXOR (SUB1 2) -1))) 10))) (DECLARE (LOCALVARS ALINK)) (COND (T (PRIN1 (QUOTE " alink]")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE " alink]") -1)) (= (|printout| NIL \, ALINK NIL)) NIL) T)))) (TERPRI) (PROGN (V\\PRINTSTK (IPLUS FRAME 2)) (PROGN (PROG ((FNHEADER (VGETBASEPTR (VVAG2 1 FRAME) 2))) (DECLARE (LOCALVARS FNHEADER)) (COND (T (PRIN1 (QUOTE "[fn header]")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "[fn header]") -1)) (= (|printout| NIL \, FNHEADER NIL)) NIL) T)))) (TERPRI)) (PROGN (V\\PRINTSTK (IPLUS FRAME 4)) (PROGN (PROG ((NEXTBLOCK (VGETBASE (VVAG2 1 FRAME) 4))) (DECLARE (LOCALVARS NEXTBLOCK)) (COND (T (PRIN1 (QUOTE "[next, pc]")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "[next, pc]") -1)) (= (|printout| NIL \, NEXTBLOCK NIL)) NIL) T)))) (TERPRI)) (PROGN (V\\PRINTSTK (IPLUS FRAME 6)) (PROGN (PROG ((NAMETABLE (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE (VVAG2 1 FRAME) 0) 9) 1)) (VGETBASEPTR (VVAG2 1 FRAME) 6)) (T (VGETBASEPTR (VVAG2 1 FRAME) 2))))) (DECLARE (LOCALVARS NAMETABLE)) (COND (T (PRIN1 (QUOTE "[nametable]")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "[nametable]") -1)) (= (|printout| NIL \, NAMETABLE NIL)) NIL) T)))) (TERPRI)) (PROGN (V\\PRINTSTK (IPLUS FRAME 8)) (PROGN (PROG ((BLINK (COND ((NOT (NEQ 0 (LOGAND (VGETBASE (VVAG2 1 FRAME) 1) 1))) (IDIFFERENCE FRAME 2)) (T (VGETBASE (VVAG2 1 FRAME) 8))))) (DECLARE (LOCALVARS BLINK)) (COND (T (PRIN1 (QUOTE "[blink, clink]")) (SELECTQ (CONSTANT (NTHCHAR (QUOTE "[blink, clink]") -1)) (= (|printout| NIL \, BLINK NIL)) NIL) T)))) (TERPRI)))) (SETQ NLOCALS (LRSH (VGETBASE NMT 7) 8)) (|for| |old| I |from| (IPLUS FRAME (PROGN 10)) |by| 2 |while| (ILESSP I FT) |as| J |from| 0 |do| (OR VARSONLY (V\\PRINTSTK I)) (COND ((ILESSP J NLOCALS) (COND ((OR (SETQ TMP (V\\SCANFORNTENTRY NMT (MAKE-NTENTRY 32768 J))) (AND (NEQ VARSONLY T) (SETQ TMP "local"))) (COND ((EQ (LRSH (VGETBASE (PROGN (VVAG2 1 I)) 0) 12) 0) (AND VARSONLY (SPACES 3)) (PRIN2 TMP) (SPACES 1) (APPLY* PRINTFN (VGETBASEPTR (VVAG2 1 I) 0))) ((NOT VARSONLY) (|printout| NIL TMP " [unbound]" T)))))) ((NOT VARSONLY) (COND ((SETQ TMP (V\\SCANFORNTENTRY NMT (MAKE-NTENTRY 49152 J))) (|printout| NIL "[fvar " .P2 TMP " " (COND ((EVENP (VGETBASE (PROGN (VVAG2 1 I)) 0)) (COND ((EQ (SETQ TMP (VHILOC ((LAMBDA ($$1) (VVAG2 (VGETBASE (PROGN $$1) 1) (VGETBASE $$1 0))) (VVAG2 1 I)))) 1) " on stack]") ((NEQ (LOGAND TMP (CONSTANT (LOGXOR (SUB1 2) -1))) (VHILOC (VVAG2 12 0))) (*) " non-stack binding]") (T " top value]"))) (T " not looked up]")) T)) (T (|printout| NIL "[padding]" T)))))) (COND ((NOT VARSONLY) (SETQ FT (VGETBASE (VVAG2 1 FRAME) 4)) (|for| |old| I |by| 2 |while| (ILESSP I FT) |do| (*) (V\\PRINTSTK I) (COND ((EQ (LRSH (VGETBASE (PROGN (VVAG2 1 I)) 0) 12) 0) (APPLY* PRINTFN (VGETBASEPTR (VVAG2 1 I) 0))) (T (TERPRI)))))))) ) -(V\SCANFORNTENTRY -(LAMBDA (NMT NTENTRY) (*) (*) (bind NM for NT1 from (PROGN 8) by (CONSTANT (PROGN 2)) as NT2 from (IPLUS (PROGN 8) (VGETBASE NMT 6)) by (CONSTANT (WORDSPERNTOFFSETENTRY)) do (COND ((NULL-NTENTRY (SETQ NM (GETSTKNAMEENTRY NMT NT1))) (RETURN))) (COND ((IEQP NTENTRY (GETSTKNTOFFSETENTRY NMT NT2)) (RETURN (VATOM NM)))))) +(V\\SCANFORNTENTRY +(LAMBDA (NMT NTENTRY) (*) (*) (|bind| NM |for| NT1 |from| (PROGN 8) |by| (CONSTANT (PROGN 2)) |as| NT2 |from| (IPLUS (PROGN 8) (VGETBASE NMT 6)) |by| (CONSTANT (WORDSPERNTOFFSETENTRY)) |do| (COND ((NULL-NTENTRY (SETQ NM (GETSTKNAMEENTRY NMT NT1))) (RETURN))) (COND ((IEQP NTENTRY (GETSTKNTOFFSETENTRY NMT NT2)) (RETURN (VATOM NM)))))) ) -(V\PRINTSTK +(V\\PRINTSTK (LAMBDA (I) (*) (PRINTNUM .I7 I) (PRIN1 ": ") (PRINTNUM .I7 (VGETBASE (VVAG2 1 0) I)) (PRINTNUM .I7 (VGETBASE (VVAG2 1 0) (ADD1 I))) (SPACES 1)) ) ) (DEFINEQ -(V\CHECKARRAYBLOCK -(LAMBDA (BASE FREE ONFREELIST) (*) (COND (T (PROG (ERROR TRAILER) (COND ((NEQ (LRSH (VGETBASE BASE 0) 3) 5461) (SETQ ERROR "ARRAYBLOCK Password wrong")) ((NEQ (NEQ 0 (LOGAND (VGETBASE BASE 0) 1)) (NOT FREE)) (SETQ ERROR "ARRAYBLOCK INUSE bit set wrong")) (NIL (SETQ ERROR "Free ARRAYBLOCK with RefCnt not 1")) ((NEQ (LRSH (VGETBASE (SETQ TRAILER ((LAMBDA (BASE N) (DECLARE (LOCALVARS BASE N)) (VADDBASE (VADDBASE BASE N) N)) BASE (IDIFFERENCE (VGETBASE BASE 1) 1))) 0) 3) 5461) (SETQ ERROR "ARRAYBLOCK Trailer password wrong")) ((NEQ (VGETBASE BASE 1) (VGETBASE TRAILER 1)) (SETQ ERROR "ARRAYBLOCK Header and Trailer length don't match")) ((NEQ (NEQ 0 (LOGAND (VGETBASE BASE 0) 1)) (NOT FREE)) (SETQ ERROR "ARRAYBLOCK Trailer INUSE bit set wrong")) ((OR (NOT ONFREELIST) (ILESSP (VGETBASE BASE 1) 4)) (*) (RETURN)) ((OR (NOT (EQUAL (VGETBASEPTR (VGETBASEPTR BASE 4) 2) BASE)) (NOT (EQUAL (VGETBASEPTR (VGETBASEPTR BASE 2) 4) BASE))) (SETQ ERROR "ARRAYBLOCK links fouled")) ((bind (FBL _ ((LAMBDA (BASE N) (DECLARE (LOCALVARS BASE N)) (VADDBASE (VADDBASE BASE N) N)) VFREEBLOCKBUCKETS (IMIN (INTEGERLENGTH (VGETBASE BASE 1)) 30))) ROVER first (OR (SETQ ROVER (VGETBASEPTR FBL 0)) (RETURN (SETQ ERROR "Free block's bucket empty"))) do (AND (EQUAL ROVER BASE) (RETURN)) (V\CHECKARRAYBLOCK ROVER T) repeatuntil (EQ (SETQ ROVER (VGETBASEPTR ROVER 2)) (VGETBASEPTR FBL 0)))) (T (*) (RETURN))) (ERROR BASE ERROR) (RETURN ERROR))))) +(V\\CHECKARRAYBLOCK +(LAMBDA (BASE FREE ONFREELIST) (*) (COND (T (PROG (ERROR TRAILER) (COND ((NEQ (LRSH (VGETBASE BASE 0) 3) 5461) (SETQ ERROR "ARRAYBLOCK Password wrong")) ((NEQ (NEQ 0 (LOGAND (VGETBASE BASE 0) 1)) (NOT FREE)) (SETQ ERROR "ARRAYBLOCK INUSE bit set wrong")) (NIL (SETQ ERROR "Free ARRAYBLOCK with RefCnt not 1")) ((NEQ (LRSH (VGETBASE (SETQ TRAILER ((LAMBDA (BASE N) (DECLARE (LOCALVARS BASE N)) (VADDBASE (VADDBASE BASE N) N)) BASE (IDIFFERENCE (VGETBASE BASE 1) 1))) 0) 3) 5461) (SETQ ERROR "ARRAYBLOCK Trailer password wrong")) ((NEQ (VGETBASE BASE 1) (VGETBASE TRAILER 1)) (SETQ ERROR "ARRAYBLOCK Header and Trailer length don't match")) ((NEQ (NEQ 0 (LOGAND (VGETBASE BASE 0) 1)) (NOT FREE)) (SETQ ERROR "ARRAYBLOCK Trailer INUSE bit set wrong")) ((OR (NOT ONFREELIST) (ILESSP (VGETBASE BASE 1) 4)) (*) (RETURN)) ((OR (NOT (EQUAL (VGETBASEPTR (VGETBASEPTR BASE 4) 2) BASE)) (NOT (EQUAL (VGETBASEPTR (VGETBASEPTR BASE 2) 4) BASE))) (SETQ ERROR "ARRAYBLOCK links fouled")) ((|bind| (FBL _ ((LAMBDA (BASE N) (DECLARE (LOCALVARS BASE N)) (VADDBASE (VADDBASE BASE N) N)) VFREEBLOCKBUCKETS (IMIN (INTEGERLENGTH (VGETBASE BASE 1)) 30))) ROVER |first| (OR (SETQ ROVER (VGETBASEPTR FBL 0)) (RETURN (SETQ ERROR "Free block's bucket empty"))) |do| (AND (EQUAL ROVER BASE) (RETURN)) (V\\CHECKARRAYBLOCK ROVER T) |repeatuntil| (EQ (SETQ ROVER (VGETBASEPTR ROVER 2)) (VGETBASEPTR FBL 0)))) (T (*) (RETURN))) (ERROR BASE ERROR) (RETURN ERROR))))) ) -(V\PARSEARRAYSPACE -(LAMBDA (FN) (*) (COND ((NEQ VArrayFrLst2 (VVAG2 64 0)) (*) (V\PARSEARRAYSPACE1 FN (VVAG2 46 0) VArrayFrLst2) (V\PARSEARRAYSPACE1 FN (VVAG2 64 0) VArrayFrLst)) (T (V\PARSEARRAYSPACE1 FN (VVAG2 46 0) VArrayFrLst)))) +(V\\PARSEARRAYSPACE +(LAMBDA (FN) (*) (COND ((NEQ |VArrayFrLst2| (VVAG2 64 0)) (*) (V\\PARSEARRAYSPACE1 FN (VVAG2 46 0) |VArrayFrLst2|) (V\\PARSEARRAYSPACE1 FN (VVAG2 64 0) |VArrayFrLst|)) (T (V\\PARSEARRAYSPACE1 FN (VVAG2 46 0) |VArrayFrLst|)))) ) -(V\PARSEARRAYSPACE1 -(LAMBDA (FN START END) (*) (for (ROVER _ START) repeatuntil (EQUAL END (SETQ ROVER ((LAMBDA (BASE N) (DECLARE (LOCALVARS BASE N)) (VADDBASE (VADDBASE BASE N) N)) ROVER (VGETBASE ROVER 1)))) do (V\CHECKARRAYBLOCK ROVER (NOT (NEQ 0 (LOGAND (VGETBASE ROVER 0) 1))) (AND (NOT (NEQ 0 (LOGAND (VGETBASE ROVER 0) 1))) (VGETBASEPTR ROVER 2))) (AND FN (APPLY* FN ROVER (VGETBASE ROVER 1) (NEQ 0 (LOGAND (VGETBASE ROVER 0) 1)) (LOGAND (LRSH (VGETBASE ROVER 0) 1) 3))))) +(V\\PARSEARRAYSPACE1 +(LAMBDA (FN START END) (*) (|for| (ROVER _ START) |repeatuntil| (EQUAL END (SETQ ROVER ((LAMBDA (BASE N) (DECLARE (LOCALVARS BASE N)) (VADDBASE (VADDBASE BASE N) N)) ROVER (VGETBASE ROVER 1)))) |do| (V\\CHECKARRAYBLOCK ROVER (NOT (NEQ 0 (LOGAND (VGETBASE ROVER 0) 1))) (AND (NOT (NEQ 0 (LOGAND (VGETBASE ROVER 0) 1))) (VGETBASEPTR ROVER 2))) (AND FN (APPLY* FN ROVER (VGETBASE ROVER 1) (NEQ 0 (LOGAND (VGETBASE ROVER 0) 1)) (LOGAND (LRSH (VGETBASE ROVER 0) 1) 3))))) ) ) (DEFINEQ (VPRINTCODE -(LAMBDA (FN LVFLG RADIX OUTF FIRSTBYTE PC FN.IS.CODEBASE) (*) (*) (*) (*) (*) (*) (DECLARE (SPECVARS OUTF)) (OR RADIX (SETQ RADIX 16)) (LET ((CODEBASE (COND (FN.IS.CODEBASE FN) (T (OR (V\GET-COMPILED-CODE-BASE FN) (AND (LITATOM FN) (V\GET-COMPILED-CODE-BASE (GET FN (QUOTE CODE)))) (ERROR FN "not compiled code"))))) (I4 (NUMFORMATCODE (LIST (QUOTE FIX) (if (IGREATERP RADIX 15) then 3 else 4) RADIX))) (I6 (NUMFORMATCODE (LIST (QUOTE FIX) (if (IGREATERP RADIX 15) then 5 else 6) RADIX))) NTSIZE STARTPC TAG TEMP OP# PVARS FVARS IVARS) (DECLARE (SPECVARS CODEBASE IVARS PVARS FVARS I4 I6)) (*) (LET ((*PRINT-BASE* RADIX)) (for I from 0 by 2 while (ILESSP I (LLSH (PROGN 8) 1)) do (PRINTNUM I4 I OUTF) (PRIN1 ": " OUTF) (PRINTNUM I6 (LOGOR (LLSH (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\GETBASEBYTE CODEBASE (LOGXOR I 3))) (T (V\GETBASEBYTE CODEBASE I))) 8) ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (ADD1 I))) OUTF) (SELECTQ I (0 (PRIN1 " stkmin" OUTF)) (2 (PRIN1 " na" OUTF)) (4 (PRIN1 " pv" OUTF)) (6 (PRIN1 " startpc" OUTF)) (8 (AND (NEQ 0 (LRSH (VGETBASE CODEBASE 4) 15)) (PRIN1 "[CLOSUREP]" OUTF)) (printout OUTF " byteswapped: " (NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1))) (printout OUTF " argtype: " (LOGAND (LRSH (VGETBASE CODEBASE 4) 12) 3))) (10 (printout OUTF " frame name: " .P2 (V\UNCOPY (VGETBASEPTR CODEBASE 4)))) (12 (PRIN1 " ntsize" OUTF)) (14 (printout OUTF " nlocals: " (LRSH (VGETBASE CODEBASE 7) 8)) (printout OUTF " fvaroffset: " (LOGAND (VGETBASE CODEBASE 7) 255))) NIL) (*) (TERPRI OUTF))) (SETQ NTSIZE (VGETBASE CODEBASE 6)) (VPRINTCODENT "name table: " (LLSH (PROGN 8) 1) (LLSH NTSIZE 1)) (SETQ STARTPC (VGETBASE CODEBASE 3)) (COND ((GREATERP (SETQ NTSIZE (IDIFFERENCE (COND ((PROGN NIL) (*) (- STARTPC 4)) (T STARTPC)) (SETQ TEMP (IPLUS (LLSH (PROGN 8) 1) (COND ((EQ NTSIZE 0) (*) 8) (T (LLSH NTSIZE 2))))))) 4) (VPRINTCODENT "Local args: " TEMP (LRSH NTSIZE 1))) ((EQ NTSIZE 4) (*) (printout OUTF T "Info: " .P2 (VGETBASEPTR CODEBASE (LRSH TEMP 1)) T))) (printout OUTF T "----" T) (PROG ((CODELOC STARTPC) (LEVEL (AND LVFLG 0)) B B1 B2 B3 B4 B5 FN LEN LEVADJ STK) (COND (LEVEL (SETUPHASHARRAY (QUOTE \PRINTCODE.LEVEL)) (SETUPHASHARRAY (QUOTE \PRINTCODE.STKSTATE)) (CLRHASH \PRINTCODE.LEVEL) (CLRHASH \PRINTCODE.STKSTATE))) LP (COND ((AND PC (IGEQ CODELOC PC)) (*) (COND ((NOT (IEQP CODELOC PC)) (PRINTOUT OUTF "(PC ") (PRINTNUM I4 PC OUTF) (PRINTOUT OUTF " not found)"))) (printout OUTF "------------------------------" T) (SETQ PC))) (COND ((OR (NULL FIRSTBYTE) (IGEQ CODELOC FIRSTBYTE)) (PRINTNUM I4 CODELOC OUTF) (PRIN1 ": " OUTF) (COND (LVFLG (SETQ TEMP (GETHASH CODELOC \PRINTCODE.LEVEL)) (COND (LEVEL (COND ((AND TEMP (OR (NEQ LEVEL TEMP) (NOT (EQUAL STK (GETHASH CODELOC \PRINTCODE.STKSTATE))))) (PRIN1 "*" OUTF)))) (T (SETQ LEVEL TEMP) (SETQ STK (GETHASH CODELOC \PRINTCODE.STKSTATE)))) (COND (LEVEL (TAB 7 NIL OUTF) (PRINTNUM I4 LEVEL OUTF))))) (TAB 12 NIL OUTF)) (T (*) (SETQ TAG (\FINDOP ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (PROG1 CODELOC (SETQ CODELOC (PLUS CODELOC 1)))))) (SELECTQ (OR (fetch OPPRINT of TAG) (fetch OPCODENAME of TAG)) (-X- (TERPRI OUTF) (RETURN)) (BIND (COND (LEVEL (push STK (SETQ LEVEL (ADD1 (IDIFFERENCE LEVEL (LOGAND (CODEBASELT CODEBASE CODELOC) 15)))))))) (UNBIND (AND LEVEL (SETQ LEVEL (pop STK)))) (DUNBIND (AND LEVEL (SETQ LEVEL (SUB1 (pop STK))))) (RETURN (SETQ LEVEL)) (SUBRCALL (AND LEVEL (SETQ LEVEL (ADD1 (IDIFFERENCE LEVEL ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (ADD1 CODELOC))))))) (MISCN (AND LEVEL (SETQ LEVEL (ADD1 (IDIFFERENCE LEVEL ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (IPLUS 2 CODELOC))))))) NIL) (COND ((AND LEVEL (SETQ LEVADJ (fetch LEVADJ of TAG))) (COND ((LISTP LEVADJ) (SETQ LEVADJ (CAR LEVADJ)))) (SELECTQ LEVADJ (FNX (SETQ LEVEL (PLUS LEVEL (IDIFFERENCE 1 (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\GETBASEBYTE CODEBASE (LOGXOR CODELOC 3))) (T (V\GETBASEBYTE CODEBASE CODELOC))))))) (POP.N (SETQ LEVEL (IDIFFERENCE LEVEL (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\GETBASEBYTE CODEBASE (LOGXOR CODELOC 3))) (T (V\GETBASEBYTE CODEBASE CODELOC)))))) ((JUMP UNWIND) (SETQ LEVEL)) ((CJUMP NCJUMP) (SETQ LEVEL (PLUS LEVEL -1))) (COND ((NUMBERP LEVADJ) (SETQ LEVEL (PLUS LEVEL LEVADJ))))))) (add CODELOC (fetch OPNARGS of TAG)) (GO LP))) (SETQ LEN (fetch OPNARGS of (SETQ TAG (\FINDOP (SETQ B ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (PROG1 CODELOC (SETQ CODELOC (PLUS CODELOC 1))))))))) (PRINTNUM I4 B OUTF) (COND ((IGREATERP LEN 0) (PRINTNUM I4 (SETQ B1 ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (PROG1 CODELOC (SETQ CODELOC (PLUS CODELOC 1))))) OUTF))) (COND ((IGREATERP LEN 1) (PRINTNUM I4 (SETQ B2 ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (PROG1 CODELOC (SETQ CODELOC (PLUS CODELOC 1))))) OUTF))) (COND ((IGREATERP LEN 2) (PRINTNUM I4 (SETQ B3 ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (PROG1 CODELOC (SETQ CODELOC (PLUS CODELOC 1))))) OUTF))) (COND ((IGREATERP LEN 3) (PRINTNUM I4 (SETQ B4 ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (PROG1 CODELOC (SETQ CODELOC (PLUS CODELOC 1))))) OUTF))) (COND ((IGREATERP LEN 4) (PRINTNUM I4 (SETQ B5 ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (PROG1 CODELOC (SETQ CODELOC (PLUS CODELOC 1))))) OUTF))) (PROGN (printout OUTF 30 (fetch OPCODENAME of TAG)) (SETQ OP# (fetch OP# of TAG)) (SETQ LEVADJ (fetch LEVADJ of TAG))) (COND ((LISTP OP#) (SETQ OP# (CAR OP#)))) (SELECTQ (SETQ TAG (OR (fetch OPPRINT of TAG) (fetch OPCODENAME of TAG))) (-X- (TERPRI OUTF) (RETURN)) (IVAR (TAB 40 NIL OUTF) (PROGN (*) (PROG NIL (PRIN2 (CADR (OR (ASSOC (SELECTQ LEN (0 (IDIFFERENCE B OP#)) (LRSH B1 1)) IVARS) (RETURN (printout OUTF "[" (QUOTE ivar) (SELECTQ LEN (0 (IDIFFERENCE B OP#)) (LRSH B1 1)) "]")))) OUTF)))) (PVAR (TAB 40 NIL OUTF) (PROGN (*) (PROG NIL (PRIN2 (CADR (OR (ASSOC (SELECTQ LEN (0 (IDIFFERENCE B OP#)) (LRSH B1 1)) PVARS) (RETURN (printout OUTF "[" (QUOTE pvar) (SELECTQ LEN (0 (IDIFFERENCE B OP#)) (LRSH B1 1)) "]")))) OUTF)))) (FVAR (TAB 40 NIL OUTF) (PROGN (*) (PROG NIL (PRIN2 (CADR (OR (ASSOC (SELECTQ LEN (0 (IDIFFERENCE B OP#)) (LRSH B1 1)) FVARS) (RETURN (printout OUTF "[" (QUOTE fvar) (SELECTQ LEN (0 (IDIFFERENCE B OP#)) (LRSH B1 1)) "]")))) OUTF)))) (JUMP ((LAMBDA (N) (PRIN1 "->" OUTF) (PRINTNUM I4 (SETQ N (IPLUS N (IDIFFERENCE CODELOC (ADD1 LEN)))) OUTF) (COND (LEVEL (PUTHASH N (SELECTQ LEVADJ ((NCJUMP JUMP) LEVEL) (SUB1 LEVEL)) \PRINTCODE.LEVEL) (PUTHASH N STK \PRINTCODE.STKSTATE)))) (IPLUS (IDIFFERENCE B OP#) 2))) (SIC (printout OUTF 40 .P2 B1)) (SNIC (printout OUTF 40 .P2 (IDIFFERENCE B1 256))) (SICX (printout OUTF 40 .P2 (IPLUS (LLSH B1 8) B2))) (JUMPX ((LAMBDA (N) (PRIN1 "->" OUTF) (PRINTNUM I4 (SETQ N (IPLUS N (IDIFFERENCE CODELOC (ADD1 LEN)))) OUTF) (COND (LEVEL (PUTHASH N (SELECTQ LEVADJ ((NCJUMP JUMP) LEVEL) (SUB1 LEVEL)) \PRINTCODE.LEVEL) (PUTHASH N STK \PRINTCODE.STKSTATE)))) (COND ((IGEQ B1 128) (IDIFFERENCE B1 256)) (T B1)))) (FN (*) (NEW-SYMBOL-CODE (SETQ B (IPLUS (LLSH (IPLUS (LLSH (IPLUS (LLSH B1 8) B2) 8) B3) 8) B4)) (SETQ B (IPLUS (LLSH B1 8) B2))) (printout OUTF 40 .P2 (VATOM B))) (BIND (TAB 40 NIL OUTF) (PROG ((NNILS (LRSH B1 4)) (NVALS (LOGAND B1 15))) (for I from (ADD1 (IDIFFERENCE B2 (IPLUS NNILS NVALS))) to (IDIFFERENCE B2 NNILS) do (SPACES 1 OUTF) (PCVAR I PVARS (QUOTE pvar))) (PRIN1 (QUOTE ;) OUTF) (for I from (ADD1 (IDIFFERENCE B2 NNILS)) to B2 do (SPACES 1 OUTF) (PCVAR I PVARS (QUOTE pvar))) (COND (LEVEL (push STK (SETQ LEVEL (ADD1 (IDIFFERENCE LEVEL NVALS)))))))) (JUMPXX ((LAMBDA (N) (PRIN1 "->" OUTF) (PRINTNUM I4 (SETQ N (IPLUS N (IDIFFERENCE CODELOC (ADD1 LEN)))) OUTF) (COND (LEVEL (PUTHASH N (SELECTQ LEVADJ ((NCJUMP JUMP) LEVEL) (SUB1 LEVEL)) \PRINTCODE.LEVEL) (PUTHASH N STK \PRINTCODE.STKSTATE)))) (IPLUS (LLSH B1 8) B2 (COND ((IGREATERP B1 127) -65536) (T 0))))) (ATOM (printout OUTF 40 .P2 (VATOM (NEW-SYMBOL-CODE (IPLUS (LLSH (IPLUS (LLSH (IPLUS (LLSH B1 8) B2) 8) B3) 8) B4) (IPLUS (LLSH B1 8) B2))))) (GCONST (printout OUTF 40 .P2 (V\UNCOPY (VVAG2 (IPLUS (LLSH B1 8) B2) (IPLUS (LLSH B3 8) B4))))) (FNX (printout OUTF "(" B1 ")" 40 .P2 (VATOM (NEW-SYMBOL-CODE (IPLUS (LLSH (IPLUS (LLSH (IPLUS (LLSH B2 8) B3) 8) B4) 8) B5) (IPLUS (LLSH B2 8) B3))))) (TYPEP (printout OUTF "(" .P2 (OR (V\TYPENAMEFROMNUMBER B1) (QUOTE ?)) ")")) (UNBIND (AND LEVEL (SETQ LEVEL (pop STK)))) (DUNBIND (AND LEVEL (SETQ LEVEL (SUB1 (pop STK))))) (RETURN (SETQ LEVEL)) (SUBRCALL (printout OUTF 40 (for X in \INITSUBRS when (EQ B1 (CADR X)) do (RETURN (CAR X)) finally (RETURN "?"))) (AND LEVEL (SETQ LEVEL (ADD1 (IDIFFERENCE LEVEL B2))))) (MISCN (printout OUTF 40 (for X in \USER-SUBR-LIST when (EQ B1 (CADR X)) do (RETURN (CAR X)) finally (RETURN "?"))) (AND LEVEL (SETQ LEVEL (ADD1 (IDIFFERENCE LEVEL B2))))) (COND ((LISTP TAG) (printout OUTF 40 (CAR (NTH TAG (ADD1 B1))))))) (TERPRI OUTF) (COND ((AND LEVEL LEVADJ) (SELECTQ LEVADJ (FNX (SETQ LEVEL (PLUS LEVEL (IDIFFERENCE 1 B1)))) (POP.N (SETQ LEVEL (IDIFFERENCE LEVEL B1))) ((JUMP UNWIND) (SETQ LEVEL)) ((CJUMP NCJUMP) (SETQ LEVEL (PLUS LEVEL -1))) (COND ((NUMBERP LEVADJ) (SETQ LEVEL (PLUS LEVEL LEVADJ))))))) (GO LP)))) +(LAMBDA (FN LVFLG RADIX OUTF FIRSTBYTE PC FN.IS.CODEBASE) (*) (*) (*) (*) (*) (*) (DECLARE (SPECVARS OUTF)) (OR RADIX (SETQ RADIX 16)) (LET ((CODEBASE (COND (FN.IS.CODEBASE FN) (T (OR (V\\GET-COMPILED-CODE-BASE FN) (AND (LITATOM FN) (V\\GET-COMPILED-CODE-BASE (GET FN (QUOTE CODE)))) (ERROR FN "not compiled code"))))) (I4 (NUMFORMATCODE (LIST (QUOTE FIX) (|if| (IGREATERP RADIX 15) |then| 3 |else| 4) RADIX))) (I6 (NUMFORMATCODE (LIST (QUOTE FIX) (|if| (IGREATERP RADIX 15) |then| 5 |else| 6) RADIX))) NTSIZE STARTPC TAG TEMP OP# PVARS FVARS IVARS) (DECLARE (SPECVARS CODEBASE IVARS PVARS FVARS I4 I6)) (*) (LET ((*PRINT-BASE* RADIX)) (|for| I |from| 0 |by| 2 |while| (ILESSP I (LLSH (PROGN 8) 1)) |do| (PRINTNUM I4 I OUTF) (PRIN1 ": " OUTF) (PRINTNUM I6 (LOGOR (LLSH (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\GETBASEBYTE CODEBASE (LOGXOR I 3))) (T (V\\GETBASEBYTE CODEBASE I))) 8) ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (ADD1 I))) OUTF) (SELECTQ I (0 (PRIN1 " stkmin" OUTF)) (2 (PRIN1 " na" OUTF)) (4 (PRIN1 " pv" OUTF)) (6 (PRIN1 " startpc" OUTF)) (8 (AND (NEQ 0 (LRSH (VGETBASE CODEBASE 4) 15)) (PRIN1 "[CLOSUREP]" OUTF)) (|printout| OUTF " byteswapped: " (NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1))) (|printout| OUTF " argtype: " (LOGAND (LRSH (VGETBASE CODEBASE 4) 12) 3))) (10 (|printout| OUTF " frame name: " .P2 (V\\UNCOPY (VGETBASEPTR CODEBASE 4)))) (12 (PRIN1 " ntsize" OUTF)) (14 (|printout| OUTF " nlocals: " (LRSH (VGETBASE CODEBASE 7) 8)) (|printout| OUTF " fvaroffset: " (LOGAND (VGETBASE CODEBASE 7) 255))) NIL) (*) (TERPRI OUTF))) (SETQ NTSIZE (VGETBASE CODEBASE 6)) (VPRINTCODENT "name table: " (LLSH (PROGN 8) 1) (LLSH NTSIZE 1)) (SETQ STARTPC (VGETBASE CODEBASE 3)) (COND ((GREATERP (SETQ NTSIZE (IDIFFERENCE (COND ((PROGN NIL) (*) (- STARTPC 4)) (T STARTPC)) (SETQ TEMP (IPLUS (LLSH (PROGN 8) 1) (COND ((EQ NTSIZE 0) (*) 8) (T (LLSH NTSIZE 2))))))) 4) (VPRINTCODENT "Local args: " TEMP (LRSH NTSIZE 1))) ((EQ NTSIZE 4) (*) (|printout| OUTF T "Info: " .P2 (VGETBASEPTR CODEBASE (LRSH TEMP 1)) T))) (|printout| OUTF T "----" T) (PROG ((CODELOC STARTPC) (LEVEL (AND LVFLG 0)) B B1 B2 B3 B4 B5 FN LEN LEVADJ STK) (COND (LEVEL (SETUPHASHARRAY (QUOTE \\PRINTCODE.LEVEL)) (SETUPHASHARRAY (QUOTE \\PRINTCODE.STKSTATE)) (CLRHASH \\PRINTCODE.LEVEL) (CLRHASH \\PRINTCODE.STKSTATE))) LP (COND ((AND PC (IGEQ CODELOC PC)) (*) (COND ((NOT (IEQP CODELOC PC)) (PRINTOUT OUTF "(PC ") (PRINTNUM I4 PC OUTF) (PRINTOUT OUTF " not found)"))) (|printout| OUTF "------------------------------" T) (SETQ PC))) (COND ((OR (NULL FIRSTBYTE) (IGEQ CODELOC FIRSTBYTE)) (PRINTNUM I4 CODELOC OUTF) (PRIN1 ": " OUTF) (COND (LVFLG (SETQ TEMP (GETHASH CODELOC \\PRINTCODE.LEVEL)) (COND (LEVEL (COND ((AND TEMP (OR (NEQ LEVEL TEMP) (NOT (EQUAL STK (GETHASH CODELOC \\PRINTCODE.STKSTATE))))) (PRIN1 "*" OUTF)))) (T (SETQ LEVEL TEMP) (SETQ STK (GETHASH CODELOC \\PRINTCODE.STKSTATE)))) (COND (LEVEL (TAB 7 NIL OUTF) (PRINTNUM I4 LEVEL OUTF))))) (TAB 12 NIL OUTF)) (T (*) (SETQ TAG (\\FINDOP ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (PROG1 CODELOC (SETQ CODELOC (PLUS CODELOC 1)))))) (SELECTQ (OR (|fetch| OPPRINT |of| TAG) (|fetch| OPCODENAME |of| TAG)) (-X- (TERPRI OUTF) (RETURN)) (BIND (COND (LEVEL (|push| STK (SETQ LEVEL (ADD1 (IDIFFERENCE LEVEL (LOGAND (CODEBASELT CODEBASE CODELOC) 15)))))))) (UNBIND (AND LEVEL (SETQ LEVEL (|pop| STK)))) (DUNBIND (AND LEVEL (SETQ LEVEL (SUB1 (|pop| STK))))) (RETURN (SETQ LEVEL)) (SUBRCALL (AND LEVEL (SETQ LEVEL (ADD1 (IDIFFERENCE LEVEL ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (ADD1 CODELOC))))))) (MISCN (AND LEVEL (SETQ LEVEL (ADD1 (IDIFFERENCE LEVEL ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (IPLUS 2 CODELOC))))))) NIL) (COND ((AND LEVEL (SETQ LEVADJ (|fetch| LEVADJ |of| TAG))) (COND ((LISTP LEVADJ) (SETQ LEVADJ (CAR LEVADJ)))) (SELECTQ LEVADJ (FNX (SETQ LEVEL (PLUS LEVEL (IDIFFERENCE 1 (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\GETBASEBYTE CODEBASE (LOGXOR CODELOC 3))) (T (V\\GETBASEBYTE CODEBASE CODELOC))))))) (POP.N (SETQ LEVEL (IDIFFERENCE LEVEL (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\GETBASEBYTE CODEBASE (LOGXOR CODELOC 3))) (T (V\\GETBASEBYTE CODEBASE CODELOC)))))) ((JUMP UNWIND) (SETQ LEVEL)) ((CJUMP NCJUMP) (SETQ LEVEL (PLUS LEVEL -1))) (COND ((NUMBERP LEVADJ) (SETQ LEVEL (PLUS LEVEL LEVADJ))))))) (|add| CODELOC (|fetch| OPNARGS |of| TAG)) (GO LP))) (SETQ LEN (|fetch| OPNARGS |of| (SETQ TAG (\\FINDOP (SETQ B ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (PROG1 CODELOC (SETQ CODELOC (PLUS CODELOC 1))))))))) (PRINTNUM I4 B OUTF) (COND ((IGREATERP LEN 0) (PRINTNUM I4 (SETQ B1 ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (PROG1 CODELOC (SETQ CODELOC (PLUS CODELOC 1))))) OUTF))) (COND ((IGREATERP LEN 1) (PRINTNUM I4 (SETQ B2 ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (PROG1 CODELOC (SETQ CODELOC (PLUS CODELOC 1))))) OUTF))) (COND ((IGREATERP LEN 2) (PRINTNUM I4 (SETQ B3 ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (PROG1 CODELOC (SETQ CODELOC (PLUS CODELOC 1))))) OUTF))) (COND ((IGREATERP LEN 3) (PRINTNUM I4 (SETQ B4 ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (PROG1 CODELOC (SETQ CODELOC (PLUS CODELOC 1))))) OUTF))) (COND ((IGREATERP LEN 4) (PRINTNUM I4 (SETQ B5 ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (PROG1 CODELOC (SETQ CODELOC (PLUS CODELOC 1))))) OUTF))) (PROGN (|printout| OUTF 30 (|fetch| OPCODENAME |of| TAG)) (SETQ OP# (|fetch| OP# |of| TAG)) (SETQ LEVADJ (|fetch| LEVADJ |of| TAG))) (COND ((LISTP OP#) (SETQ OP# (CAR OP#)))) (SELECTQ (SETQ TAG (OR (|fetch| OPPRINT |of| TAG) (|fetch| OPCODENAME |of| TAG))) (-X- (TERPRI OUTF) (RETURN)) (IVAR (TAB 40 NIL OUTF) (PROGN (*) (PROG NIL (PRIN2 (CADR (OR (ASSOC (SELECTQ LEN (0 (IDIFFERENCE B OP#)) (LRSH B1 1)) IVARS) (RETURN (|printout| OUTF "[" (QUOTE |ivar|) (SELECTQ LEN (0 (IDIFFERENCE B OP#)) (LRSH B1 1)) "]")))) OUTF)))) (PVAR (TAB 40 NIL OUTF) (PROGN (*) (PROG NIL (PRIN2 (CADR (OR (ASSOC (SELECTQ LEN (0 (IDIFFERENCE B OP#)) (LRSH B1 1)) PVARS) (RETURN (|printout| OUTF "[" (QUOTE |pvar|) (SELECTQ LEN (0 (IDIFFERENCE B OP#)) (LRSH B1 1)) "]")))) OUTF)))) (FVAR (TAB 40 NIL OUTF) (PROGN (*) (PROG NIL (PRIN2 (CADR (OR (ASSOC (SELECTQ LEN (0 (IDIFFERENCE B OP#)) (LRSH B1 1)) FVARS) (RETURN (|printout| OUTF "[" (QUOTE |fvar|) (SELECTQ LEN (0 (IDIFFERENCE B OP#)) (LRSH B1 1)) "]")))) OUTF)))) (JUMP ((LAMBDA (N) (PRIN1 "->" OUTF) (PRINTNUM I4 (SETQ N (IPLUS N (IDIFFERENCE CODELOC (ADD1 LEN)))) OUTF) (COND (LEVEL (PUTHASH N (SELECTQ LEVADJ ((NCJUMP JUMP) LEVEL) (SUB1 LEVEL)) \\PRINTCODE.LEVEL) (PUTHASH N STK \\PRINTCODE.STKSTATE)))) (IPLUS (IDIFFERENCE B OP#) 2))) (SIC (|printout| OUTF 40 .P2 B1)) (SNIC (|printout| OUTF 40 .P2 (IDIFFERENCE B1 256))) (SICX (|printout| OUTF 40 .P2 (IPLUS (LLSH B1 8) B2))) (JUMPX ((LAMBDA (N) (PRIN1 "->" OUTF) (PRINTNUM I4 (SETQ N (IPLUS N (IDIFFERENCE CODELOC (ADD1 LEN)))) OUTF) (COND (LEVEL (PUTHASH N (SELECTQ LEVADJ ((NCJUMP JUMP) LEVEL) (SUB1 LEVEL)) \\PRINTCODE.LEVEL) (PUTHASH N STK \\PRINTCODE.STKSTATE)))) (COND ((IGEQ B1 128) (IDIFFERENCE B1 256)) (T B1)))) (FN (*) (NEW-SYMBOL-CODE (SETQ B (IPLUS (LLSH (IPLUS (LLSH (IPLUS (LLSH B1 8) B2) 8) B3) 8) B4)) (SETQ B (IPLUS (LLSH B1 8) B2))) (|printout| OUTF 40 .P2 (VATOM B))) (BIND (TAB 40 NIL OUTF) (PROG ((NNILS (LRSH B1 4)) (NVALS (LOGAND B1 15))) (|for| I |from| (ADD1 (IDIFFERENCE B2 (IPLUS NNILS NVALS))) |to| (IDIFFERENCE B2 NNILS) |do| (SPACES 1 OUTF) (PCVAR I PVARS (QUOTE |pvar|))) (PRIN1 (QUOTE \;) OUTF) (|for| I |from| (ADD1 (IDIFFERENCE B2 NNILS)) |to| B2 |do| (SPACES 1 OUTF) (PCVAR I PVARS (QUOTE |pvar|))) (COND (LEVEL (|push| STK (SETQ LEVEL (ADD1 (IDIFFERENCE LEVEL NVALS)))))))) (JUMPXX ((LAMBDA (N) (PRIN1 "->" OUTF) (PRINTNUM I4 (SETQ N (IPLUS N (IDIFFERENCE CODELOC (ADD1 LEN)))) OUTF) (COND (LEVEL (PUTHASH N (SELECTQ LEVADJ ((NCJUMP JUMP) LEVEL) (SUB1 LEVEL)) \\PRINTCODE.LEVEL) (PUTHASH N STK \\PRINTCODE.STKSTATE)))) (IPLUS (LLSH B1 8) B2 (COND ((IGREATERP B1 127) -65536) (T 0))))) (ATOM (|printout| OUTF 40 .P2 (VATOM (NEW-SYMBOL-CODE (IPLUS (LLSH (IPLUS (LLSH (IPLUS (LLSH B1 8) B2) 8) B3) 8) B4) (IPLUS (LLSH B1 8) B2))))) (GCONST (|printout| OUTF 40 .P2 (V\\UNCOPY (VVAG2 (IPLUS (LLSH B1 8) B2) (IPLUS (LLSH B3 8) B4))))) (FNX (|printout| OUTF "(" B1 ")" 40 .P2 (VATOM (NEW-SYMBOL-CODE (IPLUS (LLSH (IPLUS (LLSH (IPLUS (LLSH B2 8) B3) 8) B4) 8) B5) (IPLUS (LLSH B2 8) B3))))) (TYPEP (|printout| OUTF "(" .P2 (OR (V\\TYPENAMEFROMNUMBER B1) (QUOTE ?)) ")")) (UNBIND (AND LEVEL (SETQ LEVEL (|pop| STK)))) (DUNBIND (AND LEVEL (SETQ LEVEL (SUB1 (|pop| STK))))) (RETURN (SETQ LEVEL)) (SUBRCALL (|printout| OUTF 40 (|for| X |in| \\INITSUBRS |when| (EQ B1 (CADR X)) |do| (RETURN (CAR X)) |finally| (RETURN "?"))) (AND LEVEL (SETQ LEVEL (ADD1 (IDIFFERENCE LEVEL B2))))) (MISCN (|printout| OUTF 40 (|for| X |in| \\USER-SUBR-LIST |when| (EQ B1 (CADR X)) |do| (RETURN (CAR X)) |finally| (RETURN "?"))) (AND LEVEL (SETQ LEVEL (ADD1 (IDIFFERENCE LEVEL B2))))) (COND ((LISTP TAG) (|printout| OUTF 40 (CAR (NTH TAG (ADD1 B1))))))) (TERPRI OUTF) (COND ((AND LEVEL LEVADJ) (SELECTQ LEVADJ (FNX (SETQ LEVEL (PLUS LEVEL (IDIFFERENCE 1 B1)))) (POP.N (SETQ LEVEL (IDIFFERENCE LEVEL B1))) ((JUMP UNWIND) (SETQ LEVEL)) ((CJUMP NCJUMP) (SETQ LEVEL (PLUS LEVEL -1))) (COND ((NUMBERP LEVADJ) (SETQ LEVEL (PLUS LEVEL LEVADJ))))))) (GO LP)))) ) (VPRINTCODENT -(LAMBDA (STR START1 START2) (DECLARE (USEDFREE CODEBASE IVARS PVARS FVARS I4 I6 OUTF)) (*) (*) (LET (NAME TAG) (COND ((ILESSP START1 (SETQ START2 (IPLUS START2 START1))) (printout OUTF STR T) (for NT1 from START1 by (LLSH (CONSTANT (PROGN 2)) 1) while (ILESSP NT1 START2) as NT2 from START2 by (LLSH (PROGN 2) 1) do (PRINTNUM I4 NT1 OUTF) (PRIN1 ": " OUTF) (for I from 0 to (CONSTANT (SUB1 (LLSH (CONSTANT (PROGN 2)) 1))) do (PRINTNUM I4 ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (IPLUS NT1 I)) OUTF)) (SPACES 2 OUTF) (PRINTNUM I4 NT2 OUTF) (PRIN1 ": " OUTF) (COND ((SETQ NAME (VATOM (CODEBASEGETNAME CODEBASE NT1))) (SETQ TAG (GETNTOFFSET CODEBASE NT2)) (printout OUTF .SP 1 (SELECTC (NTSLOT-VARTYPE (GETNTOFFSETENTRY CODEBASE NT2)) (0 (push IVARS (LIST TAG NAME)) (QUOTE IVAR)) (32768 (push PVARS (LIST TAG NAME)) (QUOTE PVAR)) (PROGN (push FVARS (LIST TAG NAME)) (QUOTE FVAR))) " " TAG ": " .P2 NAME))) (TERPRI OUTF)))))) +(LAMBDA (STR START1 START2) (DECLARE (USEDFREE CODEBASE IVARS PVARS FVARS I4 I6 OUTF)) (*) (*) (LET (NAME TAG) (COND ((ILESSP START1 (SETQ START2 (IPLUS START2 START1))) (|printout| OUTF STR T) (|for| NT1 |from| START1 |by| (LLSH (CONSTANT (PROGN 2)) 1) |while| (ILESSP NT1 START2) |as| NT2 |from| START2 |by| (LLSH (PROGN 2) 1) |do| (PRINTNUM I4 NT1 OUTF) (PRIN1 ": " OUTF) (|for| I |from| 0 |to| (CONSTANT (SUB1 (LLSH (CONSTANT (PROGN 2)) 1))) |do| (PRINTNUM I4 ((LAMBDA (CODEBASE OFFSET) (DECLARE (LOCALVARS CODEBASE OFFSET)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\GETBASEBYTE CODEBASE (LOGXOR OFFSET 3))) (T (V\\GETBASEBYTE CODEBASE OFFSET)))) CODEBASE (IPLUS NT1 I)) OUTF)) (SPACES 2 OUTF) (PRINTNUM I4 NT2 OUTF) (PRIN1 ": " OUTF) (COND ((SETQ NAME (VATOM (CODEBASEGETNAME CODEBASE NT1))) (SETQ TAG (GETNTOFFSET CODEBASE NT2)) (|printout| OUTF .SP 1 (SELECTC (NTSLOT-VARTYPE (GETNTOFFSETENTRY CODEBASE NT2)) (0 (|push| IVARS (LIST TAG NAME)) (QUOTE IVAR)) (32768 (|push| PVARS (LIST TAG NAME)) (QUOTE PVAR)) (PROGN (|push| FVARS (LIST TAG NAME)) (QUOTE FVAR))) " " TAG ": " .P2 NAME))) (TERPRI OUTF)))))) ) (VBROKENDEF -(LAMBDA (DEF WHEN) (*) (PROG ((CA (V\GET-COMPILED-CODE-BASE DEF)) BEFORE AFTER SIZE FIRSTBYTE NEWCA) (SETQ FIRSTBYTE (VGETBASE CA 3)) NIL (*) (PROGN (*) (PROGN (*) (SETQ NEWCA CA) (SETQ AFTER T)) (*) (COND (AFTER (*) (bind OP do (SELECTQ (CADR (SETQ OP (\FINDOP (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE NEWCA 4) 14) 1)) (V\GETBASEBYTE NEWCA (LOGXOR FIRSTBYTE 3))) (T (V\GETBASEBYTE NEWCA FIRSTBYTE)))))) (-X- (RETURN)) (GCONST NIL) (RETURN ((LAMBDA (CODEBASE OFFSET NEWVALUE) (DECLARE (LOCALVARS CODEBASE OFFSET NEWVALUE)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\PUTBASEBYTE CODEBASE (LOGXOR OFFSET 3) NEWVALUE)) (T (V\PUTBASEBYTE CODEBASE OFFSET NEWVALUE)))) NEWCA FIRSTBYTE (V\CAR.UFN (\FINDOP (QUOTE \RETURN))))) NIL) (SETQ FIRSTBYTE (PLUS FIRSTBYTE 1 (CADDR OP))))))) (RETURN NEWCA))) +(LAMBDA (DEF WHEN) (*) (PROG ((CA (V\\GET-COMPILED-CODE-BASE DEF)) BEFORE AFTER SIZE FIRSTBYTE NEWCA) (SETQ FIRSTBYTE (VGETBASE CA 3)) NIL (*) (PROGN (*) (PROGN (*) (SETQ NEWCA CA) (SETQ AFTER T)) (*) (COND (AFTER (*) (|bind| OP |do| (SELECTQ (CADR (SETQ OP (\\FINDOP (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE NEWCA 4) 14) 1)) (V\\GETBASEBYTE NEWCA (LOGXOR FIRSTBYTE 3))) (T (V\\GETBASEBYTE NEWCA FIRSTBYTE)))))) (-X- (RETURN)) (GCONST NIL) (RETURN ((LAMBDA (CODEBASE OFFSET NEWVALUE) (DECLARE (LOCALVARS CODEBASE OFFSET NEWVALUE)) (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE CODEBASE 4) 14) 1)) (V\\PUTBASEBYTE CODEBASE (LOGXOR OFFSET 3) NEWVALUE)) (T (V\\PUTBASEBYTE CODEBASE OFFSET NEWVALUE)))) NEWCA FIRSTBYTE (V\\CAR.UFN (\\FINDOP (QUOTE \\RETURN))))) NIL) (SETQ FIRSTBYTE (PLUS FIRSTBYTE 1 (CADDR OP))))))) (RETURN NEWCA))) ) ) (DEFINEQ -(V\CAR.UFN -(LAMBDA (X) (*) (*) (*) (COND ((VLISTP X) (COND ((ZEROP 1) (VGETBASEPTR X 0)) (T (COND ((EQ (LRSH (VGETBASE X 0) 12) 0) (VGETBASEPTR (VGETBASEPTR X 0) 0)) (T (VGETBASEPTR X 0)))))) ((NULL X) NIL) (T (SELECTQ T (T (LISPERROR "ARG NOT LIST" X)) ((NIL V\CDR.UFN) (COND ((EQ X T) T) ((LITATOM X) NIL) (T (QUOTE "{car of non-list}")))) (COND ((EQ X T) T) ((STRINGP X) (LISPERROR "ARG NOT LIST" X)) (T (QUOTE "{car of non-list}"))))))) +(V\\CAR.UFN +(LAMBDA (X) (*) (*) (*) (COND ((VLISTP X) (COND ((ZEROP 1) (VGETBASEPTR X 0)) (T (COND ((EQ (LRSH (VGETBASE X 0) 12) 0) (VGETBASEPTR (VGETBASEPTR X 0) 0)) (T (VGETBASEPTR X 0)))))) ((NULL X) NIL) (T (SELECTQ T (T (LISPERROR "ARG NOT LIST" X)) ((NIL V\\CDR.UFN) (COND ((EQ X T) T) ((LITATOM X) NIL) (T (QUOTE "{car of non-list}")))) (COND ((EQ X T) T) ((STRINGP X) (LISPERROR "ARG NOT LIST" X)) (T (QUOTE "{car of non-list}"))))))) ) -(V\CDR.UFN -(LAMBDA (X) (*) (*) (*) (COND ((VLISTP X) (COND ((ZEROP 1) (VGETBASEPTR X 2)) (T (PROG ((Q (LRSH (VGETBASE X 0) 12))) (RETURN (COND ((EQ Q 8) NIL) ((IGREATERP Q 8) (VADDBASE (VVAG2 (VHILOC X) (LOGAND (VLOLOC X) 65280)) (LLSH (IDIFFERENCE Q 8) 1))) ((EQ Q 0) (V\CDR.UFN (VGETBASEPTR X 0))) (T (VGETBASEPTR (VADDBASE (VVAG2 (VHILOC X) (LOGAND (VLOLOC X) 65280)) (LLSH Q 1)) 0)))))))) ((NULL X) NIL) (T (SELECTQ T ((T V\CDR.UFN) (LISPERROR "ARG NOT LIST" X)) (NIL (COND ((LITATOM X) (VGETPROPLIST X)) (T "{cdr of non-list}"))) (COND ((STRINGP X) (LISPERROR "ARG NOT LIST" X)) (T "{cdr of non-list}")))))) +(V\\CDR.UFN +(LAMBDA (X) (*) (*) (*) (COND ((VLISTP X) (COND ((ZEROP 1) (VGETBASEPTR X 2)) (T (PROG ((Q (LRSH (VGETBASE X 0) 12))) (RETURN (COND ((EQ Q 8) NIL) ((IGREATERP Q 8) (VADDBASE (VVAG2 (VHILOC X) (LOGAND (VLOLOC X) 65280)) (LLSH (IDIFFERENCE Q 8) 1))) ((EQ Q 0) (V\\CDR.UFN (VGETBASEPTR X 0))) (T (VGETBASEPTR (VADDBASE (VVAG2 (VHILOC X) (LOGAND (VLOLOC X) 65280)) (LLSH Q 1)) 0)))))))) ((NULL X) NIL) (T (SELECTQ T ((T V\\CDR.UFN) (LISPERROR "ARG NOT LIST" X)) (NIL (COND ((LITATOM X) (VGETPROPLIST X)) (T "{cdr of non-list}"))) (COND ((STRINGP X) (LISPERROR "ARG NOT LIST" X)) (T "{cdr of non-list}")))))) ) ) (DEFINEQ -(V\COPY -(LAMBDA (X) (*) (*) (SELECTQ (TYPENAME X) ((LITATOM NEW-ATOM) (VATOMNUMBER X T)) (VLISTP (PROG ((R (REVERSE X)) (V (V\COPY (CDR (LAST X))))) LP (COND ((LISTP R) (SETQ V (CONS (V\COPY (CAR R)) V)) (SETQ R (CDR R)) (GO LP))) (RETURN V))) ((FIXP SMALLP) (PROG (V) (COND ((IGREATERP 0 X) (*) (COND ((IGREATERP X -65537) (*) (RETURN (VADDBASE (VVAG2 15 0) (LOGAND X 65535)))))) ((ILESSP X 65536) (*) (RETURN (VADDBASE (VVAG2 14 0) X)))) (*) (SETQ V (CREATECELL 2)) (VPUTBASE V 0 (LOGOR (COND ((IGREATERP 0 X) 32768) (T 0)) (LOGAND (LRSH X 16) 32767))) (VPUTBASE V 1 (LOGAND X 65535)) (RETURN V))) (ONED-ARRAY (%%COPY-ONED-ARRAY X)) (STRINGP (*) (%%COPY-STRING-TO-ARRAY X)) (FLOATP (PROG ((VAL (CREATECELL 3))) (SELECTQ (SYSTEMTYPE) ((ALTO D) (VPUTBASE VAL 0 (\GETBASE X 0)) (VPUTBASE VAL 1 (\GETBASE X 1))) (MKI.IEEE X VAL)) (RETURN VAL))) (CHARACTER (VVAG2 7 (CL:CHAR-CODE X))) (ERROR X "can't be copied to remote file"))) +(V\\COPY +(LAMBDA (X) (*) (*) (SELECTQ (TYPENAME X) ((LITATOM NEW-ATOM) (VATOMNUMBER X T)) (VLISTP (PROG ((R (REVERSE X)) (V (V\\COPY (CDR (LAST X))))) LP (COND ((LISTP R) (SETQ V (CONS (V\\COPY (CAR R)) V)) (SETQ R (CDR R)) (GO LP))) (RETURN V))) ((FIXP SMALLP) (PROG (V) (COND ((IGREATERP 0 X) (*) (COND ((IGREATERP X -65537) (*) (RETURN (VADDBASE (VVAG2 15 0) (LOGAND X 65535)))))) ((ILESSP X 65536) (*) (RETURN (VADDBASE (VVAG2 14 0) X)))) (*) (SETQ V (CREATECELL 2)) (VPUTBASE V 0 (LOGOR (COND ((IGREATERP 0 X) 32768) (T 0)) (LOGAND (LRSH X 16) 32767))) (VPUTBASE V 1 (LOGAND X 65535)) (RETURN V))) (ONED-ARRAY (%COPY-ONED-ARRAY X)) (STRINGP (*) (%COPY-STRING-TO-ARRAY X)) (FLOATP (PROG ((VAL (CREATECELL 3))) (SELECTQ (SYSTEMTYPE) ((ALTO D) (VPUTBASE VAL 0 (\\GETBASE X 0)) (VPUTBASE VAL 1 (\\GETBASE X 1))) (MKI.IEEE X VAL)) (RETURN VAL))) (CHARACTER (VVAG2 7 (CL:CHAR-CODE X))) (ERROR X "can't be copied to remote file"))) ) -(V\UNCOPY -(LAMBDA (X CARLVL CDRLVL) (*) (SELECTC (VNTYPX X) (1 (COND ((EQ (VHILOC X) 14) (*) (VLOLOC X)) (T (IPLUS (VLOLOC X) -65536)))) (2 (*) (create FIXP HINUM _ (VGETBASE X 0) LONUM _ (VGETBASE X 1))) (3 (create FLOATP HIWORD _ (VGETBASE X 0) LOWORD _ (VGETBASE X 1))) (4 (VATOM (VLOLOC X))) (7 (PROG ((PTR (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE X 2) 14) 1)) (%%ARRAY-BASE X)) (T (VGETBASEPTR X 0)))) (OFFST (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE X 2) 14) 1)) (%%ARRAY-OFFSET X)) (T (VGETBASE X 3)))) (LENGTH (\GETBASEFIXP X 4)) (I 1) STR) (*) (SETQ STR (ALLOCSTRING LENGTH)) (FRPTQ LENGTH (RPLSTRING STR I (FCHARACTER (V\GETBASEBYTE PTR OFFST))) (SETQ I (PLUS I 1)) (SETQ OFFST (PLUS OFFST 1))) (RETURN STR))) (9 (\VAG2 7 (VLOLOC X))) (%%ONED-ARRAY (LET ((SIZE (\GETBASEFIXP X 6)) (BASE (VGETBASEPTR X 0)) (OFFSET (VGETBASE X 3)) (TYPENUMBER (LOGAND (VGETBASE X 2) 255)) NCELLS LOCAL-ARRAY LOCAL-BASE) (if (EQ (%%TYPENUMBER-TO-GC-TYPE TYPENUMBER) 1) then (VTYPEDPOINTER (VTYPENAME X) X) else (SETQ NCELLS (LRSH (IPLUS (ITIMES (IPLUS SIZE OFFSET) (%%TYPENUMBER-TO-BITS-PER-ELEMENT TYPENUMBER)) 31) 5)) (SETQ LOCAL-ARRAY (create ONED-ARRAY)) (SETQ LOCAL-BASE (\ALLOCBLOCK NCELLS)) (freplace (ONED-ARRAY BASE) of LOCAL-ARRAY with LOCAL-BASE) (freplace (ONED-ARRAY STRING-P) of LOCAL-ARRAY with (%%CHAR-TYPE-P TYPENUMBER)) (freplace (ONED-ARRAY FILL-POINTER-P) of LOCAL-ARRAY with (NEQ 0 (LOGAND (LRSH (VGETBASE X 2) 9) 1))) (freplace (ONED-ARRAY TYPE-NUMBER) of LOCAL-ARRAY with TYPENUMBER) (freplace (ONED-ARRAY FILL-POINTER) of LOCAL-ARRAY with (\GETBASEFIXP X 4)) (if (NEQ OFFSET 0) then (freplace (ONED-ARRAY OFFSET) of LOCAL-ARRAY with OFFSET) (freplace (ONED-ARRAY DISPLACED-P) of LOCAL-ARRAY with T)) (freplace (ONED-ARRAY TOTAL-SIZE) of LOCAL-ARRAY with SIZE) (for I from 0 to (SUB1 (LLSH NCELLS 1)) do (\PUTBASE LOCAL-BASE I (VGETBASE BASE I))) LOCAL-ARRAY))) (5 (COND ((VLISTP X) (COND ((EQ CDRLVL 0) (*) (QUOTE (--))) (T (CONS (COND ((OR (EQ CARLVL 0) (AND (OR (EQ CARLVL 1) (EQ CDRLVL 1)) (VLISTP (V\CAR.UFN X)))) (QUOTE &)) (T (V\UNCOPY (V\CAR.UFN X) (AND CARLVL (SUB1 CARLVL)) (AND CDRLVL (SUB1 CDRLVL))))) (V\UNCOPY (V\CDR.UFN X) CARLVL (AND CDRLVL (SUB1 CDRLVL))))))) (T (*) (VTYPEDPOINTER (QUOTE LISTP) X)))) (0 (VTYPEDPOINTER NIL X)) (VTYPEDPOINTER (VTYPENAME X) X))) +(V\\UNCOPY +(LAMBDA (X CARLVL CDRLVL) (*) (SELECTC (VNTYPX X) (1 (COND ((EQ (VHILOC X) 14) (*) (VLOLOC X)) (T (IPLUS (VLOLOC X) -65536)))) (2 (*) (|create| FIXP HINUM _ (VGETBASE X 0) LONUM _ (VGETBASE X 1))) (3 (|create| FLOATP HIWORD _ (VGETBASE X 0) LOWORD _ (VGETBASE X 1))) (4 (VATOM (VLOLOC X))) (7 (PROG ((PTR (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE X 2) 14) 1)) (%ARRAY-BASE X)) (T (VGETBASEPTR X 0)))) (OFFST (COND ((NEQ 0 (LOGAND (LRSH (VGETBASE X 2) 14) 1)) (%ARRAY-OFFSET X)) (T (VGETBASE X 3)))) (LENGTH (\\GETBASEFIXP X 4)) (I 1) STR) (*) (SETQ STR (ALLOCSTRING LENGTH)) (FRPTQ LENGTH (RPLSTRING STR I (FCHARACTER (V\\GETBASEBYTE PTR OFFST))) (SETQ I (PLUS I 1)) (SETQ OFFST (PLUS OFFST 1))) (RETURN STR))) (9 (\\VAG2 7 (VLOLOC X))) (%ONED-ARRAY (LET ((SIZE (\\GETBASEFIXP X 6)) (BASE (VGETBASEPTR X 0)) (OFFSET (VGETBASE X 3)) (TYPENUMBER (LOGAND (VGETBASE X 2) 255)) NCELLS LOCAL-ARRAY LOCAL-BASE) (|if| (EQ (%TYPENUMBER-TO-GC-TYPE TYPENUMBER) 1) |then| (VTYPEDPOINTER (VTYPENAME X) X) |else| (SETQ NCELLS (LRSH (IPLUS (ITIMES (IPLUS SIZE OFFSET) (%TYPENUMBER-TO-BITS-PER-ELEMENT TYPENUMBER)) 31) 5)) (SETQ LOCAL-ARRAY (|create| ONED-ARRAY)) (SETQ LOCAL-BASE (\\ALLOCBLOCK NCELLS)) (|freplace| (ONED-ARRAY BASE) |of| LOCAL-ARRAY |with| LOCAL-BASE) (|freplace| (ONED-ARRAY STRING-P) |of| LOCAL-ARRAY |with| (%CHAR-TYPE-P TYPENUMBER)) (|freplace| (ONED-ARRAY FILL-POINTER-P) |of| LOCAL-ARRAY |with| (NEQ 0 (LOGAND (LRSH (VGETBASE X 2) 9) 1))) (|freplace| (ONED-ARRAY TYPE-NUMBER) |of| LOCAL-ARRAY |with| TYPENUMBER) (|freplace| (ONED-ARRAY FILL-POINTER) |of| LOCAL-ARRAY |with| (\\GETBASEFIXP X 4)) (|if| (NEQ OFFSET 0) |then| (|freplace| (ONED-ARRAY OFFSET) |of| LOCAL-ARRAY |with| OFFSET) (|freplace| (ONED-ARRAY DISPLACED-P) |of| LOCAL-ARRAY |with| T)) (|freplace| (ONED-ARRAY TOTAL-SIZE) |of| LOCAL-ARRAY |with| SIZE) (|for| I |from| 0 |to| (SUB1 (LLSH NCELLS 1)) |do| (\\PUTBASE LOCAL-BASE I (VGETBASE BASE I))) LOCAL-ARRAY))) (5 (COND ((VLISTP X) (COND ((EQ CDRLVL 0) (*) (QUOTE (--))) (T (CONS (COND ((OR (EQ CARLVL 0) (AND (OR (EQ CARLVL 1) (EQ CDRLVL 1)) (VLISTP (V\\CAR.UFN X)))) (QUOTE &)) (T (V\\UNCOPY (V\\CAR.UFN X) (AND CARLVL (SUB1 CARLVL)) (AND CDRLVL (SUB1 CDRLVL))))) (V\\UNCOPY (V\\CDR.UFN X) CARLVL (AND CDRLVL (SUB1 CDRLVL))))))) (T (*) (VTYPEDPOINTER (QUOTE LISTP) X)))) (0 (VTYPEDPOINTER NIL X)) (VTYPEDPOINTER (VTYPENAME X) X))) ) ) (DEFINEQ -(V\GETBASEBYTE +(V\\GETBASEBYTE (LAMBDA (PTR N) (*) (*) (COND ((EVENP N) (LRSH (PROGN (VGETBASE PTR (LRSH N 1))) 8)) (T (LOGAND (PROGN (VGETBASE PTR (LRSH N 1))) 255)))) ) -(V\PUTBASEBYTE -(LAMBDA (PTR DISP BYTE) (*) (*) (SETQ BYTE (PROG1 BYTE)) (VPUTBASE PTR (LRSH (SETQ DISP (\DTEST DISP (QUOTE SMALLP))) 1) (COND ((EVENP DISP 2) ((LAMBDA ($$1) (IPLUS (LLSH BYTE 8) (LOGAND $$1 255))) (VGETBASE PTR (LRSH DISP 1)))) (T ((LAMBDA ($$1) (IPLUS (LLSH (LRSH $$1 8) 8) BYTE)) (VGETBASE PTR (LRSH DISP 1)))))) BYTE) +(V\\PUTBASEBYTE +(LAMBDA (PTR DISP BYTE) (*) (*) (SETQ BYTE (PROG1 BYTE)) (VPUTBASE PTR (LRSH (SETQ DISP (\\DTEST DISP (QUOTE SMALLP))) 1) (COND ((EVENP DISP 2) ((LAMBDA ($$1) (IPLUS (LLSH BYTE 8) (LOGAND $$1 255))) (VGETBASE PTR (LRSH DISP 1)))) (T ((LAMBDA ($$1) (IPLUS (LLSH (LRSH $$1 8) 8) BYTE)) (VGETBASE PTR (LRSH DISP 1)))))) BYTE) ) ) (DEFINEQ @@ -194,11 +194,11 @@ ) (VTYPENAME -(LAMBDA (X) (*) (*) (*) (LET ((N (VNTYPX X))) (COND ((EQ N 6) ((LAMBDA (X) (QUOTE ARRAYP)) X)) ((%%STRINGP X) (*) (QUOTE STRINGP)) ((EQ (QUOTE NEW-ATOM) (SETQ N (VATOM (VGETBASEPTR (VADDBASE (VVAG2 20 4096) (ITIMES N 18)) 0)))) (*) (QUOTE LITATOM)) (T N)))) +(LAMBDA (X) (*) (*) (*) (LET ((N (VNTYPX X))) (COND ((EQ N 6) ((LAMBDA (X) (QUOTE ARRAYP)) X)) ((%STRINGP X) (*) (QUOTE STRINGP)) ((EQ (QUOTE NEW-ATOM) (SETQ N (VATOM (VGETBASEPTR (VADDBASE (VVAG2 20 4096) (ITIMES N 18)) 0)))) (*) (QUOTE LITATOM)) (T N)))) ) -(V\TYPENAMEFROMNUMBER -(LAMBDA (N) (*) (COND ((ILESSP N (ADD1 VMaxTypeNumber)) (VATOM (VGETBASEPTR (VADDBASE (VVAG2 20 4096) (ITIMES N 18)) 0))))) +(V\\TYPENAMEFROMNUMBER +(LAMBDA (N) (*) (COND ((ILESSP N (ADD1 |VMaxTypeNumber|)) (VATOM (VGETBASEPTR (VADDBASE (VVAG2 20 4096) (ITIMES N 18)) 0))))) ) ) (DEFINEQ @@ -216,51 +216,51 @@ ) (VSYMBOL.PNAME -(LAMBDA (N BUFFER) (*) (*) (SETQ BUFFER (OR BUFFER (ALLOCSTRING \PNAMELIMIT))) (PROG (ADDR LEN) (*) (COND (NIL (SETQ ADDR (VGETBASEPTR (VADDBASE (VADDBASE (VVAG2 8 0) N) N) 0))) (T (SETQ ADDR (VGETBASEPTR (VADDBASE (VVAG2 44 0) (IPLUS (ITIMES (LOGAND N 65535) 10) 0)) 0)))) (SETQ LEN (V\GETBASEBYTE ADDR 0)) (for I from 1 to LEN do (RPLSTRING BUFFER I (FCHARACTER (V\GETBASEBYTE ADDR I)))) (RETURN (SUBSTRING BUFFER 1 LEN)))) +(LAMBDA (N BUFFER) (*) (*) (SETQ BUFFER (OR BUFFER (ALLOCSTRING \\PNAMELIMIT))) (PROG (ADDR LEN) (*) (COND (NIL (SETQ ADDR (VGETBASEPTR (VADDBASE (VADDBASE (VVAG2 8 0) N) N) 0))) (T (SETQ ADDR (VGETBASEPTR (VADDBASE (VVAG2 44 0) (IPLUS (ITIMES (LOGAND N 65535) 10) 0)) 0)))) (SETQ LEN (V\\GETBASEBYTE ADDR 0)) (|for| I |from| 1 |to| LEN |do| (RPLSTRING BUFFER I (FCHARACTER (V\\GETBASEBYTE ADDR I)))) (RETURN (SUBSTRING BUFFER 1 LEN)))) ) (VSYMBOL.PACKAGE -(LAMBDA (N) (*) (*) (PROG ((INDEX (COND (NIL (*) (LRSH (VGETBASE (VADDBASE (VADDBASE (VVAG2 8 0) N) N) 0) 8)) (NIL (T (LRSH (VGETBASE (VADDBASE (VVAG2 44 0) (IPLUS (ITIMES 10 N) 0 8)) 0) 8))) (T (LRSH (VGETBASE (V\ATOMCELL N 8) 8) 8))))) (RETURN (COND ((EQ INDEX *UNINTERNED-PACKAGE-INDEX*) NIL) (T (VGETBASEPTR (VGETBASEPTR READSYS.PACKAGE.FROM.INDEX 0) (LLSH INDEX 1))))))) +(LAMBDA (N) (*) (*) (PROG ((INDEX (COND (NIL (*) (LRSH (VGETBASE (VADDBASE (VADDBASE (VVAG2 8 0) N) N) 0) 8)) (NIL (T (LRSH (VGETBASE (VADDBASE (VVAG2 44 0) (IPLUS (ITIMES 10 N) 0 8)) 0) 8))) (T (LRSH (VGETBASE (V\\ATOMCELL N 8) 8) 8))))) (RETURN (COND ((EQ INDEX *UNINTERNED-PACKAGE-INDEX*) NIL) (T (VGETBASEPTR (VGETBASEPTR READSYS.PACKAGE.FROM.INDEX 0) (LLSH INDEX 1))))))) ) (VOLD.FIND.SYMBOL -(LAMBDA (BASE OFFST LEN FATP NONNUMERICP) (*) (PROG ((FATCHARSEENP (AND FATP (NOT (NULL (for I from OFFST to (SUB1 (IPLUS OFFST LEN)) suchthat (IGREATERP (VGETBASE BASE I) 255)))))) HASH HASHENT ATM# PNBASE FIRSTCHAR FIRSTBYTE REPROBE) (*) (COND ((EQ LEN 0) (*) (SETQ HASH 0) (SETQ FIRSTBYTE 255) (GO LP))) (SETQ FIRSTCHAR (NTHCHARCODE BASE OFFST)) (*) NIL (*) (SETQ FIRSTBYTE (LOGAND FIRSTCHAR 255)) (*) (PROGN (*) (SETQ HASH (LLSH FIRSTBYTE 8)) (for CHAR# from (ADD1 OFFST) to (SUB1 (IPLUS OFFST LEN)) do (SETQ HASH (IPLUS16 (IPLUS16 (SETQ HASH (IPLUS16 HASH (LLSH (LOGAND HASH 4095) 2))) (LLSH (LOGAND HASH 255) 8)) (NTHCHARCODE BASE CHAR#))))) (*) LP (*) (COND ((NEQ 0 (SETQ HASHENT (VGETBASE (VVAG2 21 0) HASH))) (*) (COND ((STREQUAL (CL:SYMBOL-NAME BASE) (VSYMBOL.PNAME (SETQ ATM# (SUB1 HASHENT)))) (RETURN ATM#)) (T (*) (SETQ HASH (IPLUS16 HASH (OR REPROBE (SETQ REPROBE (LOGAND 63 (LOGOR 1 (LOGXOR FIRSTBYTE HASH))))))) (GO LP))))) (*) (RETURN (PROGN (LET ((NEWATOM (VNOSUCHATOM BASE OFFST LEN FATP FATCHARSEENP))) NIL NEWATOM))))) +(LAMBDA (BASE OFFST LEN FATP NONNUMERICP) (*) (PROG ((FATCHARSEENP (AND FATP (NOT (NULL (|for| I |from| OFFST |to| (SUB1 (IPLUS OFFST LEN)) |suchthat| (IGREATERP (VGETBASE BASE I) 255)))))) HASH HASHENT ATM# PNBASE FIRSTCHAR FIRSTBYTE REPROBE) (*) (COND ((EQ LEN 0) (*) (SETQ HASH 0) (SETQ FIRSTBYTE 255) (GO LP))) (SETQ FIRSTCHAR (NTHCHARCODE BASE OFFST)) (*) NIL (*) (SETQ FIRSTBYTE (LOGAND FIRSTCHAR 255)) (*) (PROGN (*) (SETQ HASH (LLSH FIRSTBYTE 8)) (|for| CHAR# |from| (ADD1 OFFST) |to| (SUB1 (IPLUS OFFST LEN)) |do| (SETQ HASH (IPLUS16 (IPLUS16 (SETQ HASH (IPLUS16 HASH (LLSH (LOGAND HASH 4095) 2))) (LLSH (LOGAND HASH 255) 8)) (NTHCHARCODE BASE CHAR#))))) (*) LP (*) (COND ((NEQ 0 (SETQ HASHENT (VGETBASE (VVAG2 21 0) HASH))) (*) (COND ((STREQUAL (CL:SYMBOL-NAME BASE) (VSYMBOL.PNAME (SETQ ATM# (SUB1 HASHENT)))) (RETURN ATM#)) (T (*) (SETQ HASH (IPLUS16 HASH (OR REPROBE (SETQ REPROBE (LOGAND 63 (LOGOR 1 (LOGXOR FIRSTBYTE HASH))))))) (GO LP))))) (*) (RETURN (PROGN (LET ((NEWATOM (VNOSUCHATOM BASE OFFST LEN FATP FATCHARSEENP))) NIL NEWATOM))))) ) (VLOOKUP-SYMBOL -(LAMBDA (TABLE STRING SXHASH ENTRY-HASH) (*) (*) (LET* ((VEC (VGETBASEPTR TABLE 0)) (*) (HASH (VGETBASEPTR TABLE 2)) (*) (LEN (\GETBASEFIXP VEC 6)) (*) (H2 (ADD1 (IREMAINDER SXHASH (IDIFFERENCE LEN 2)))) (*)) (DECLARE (TYPE (CL:SIMPLE-ARRAY (CL:UNSIGNED-BYTE 8)) HASH) (TYPE (CL:SIMPLE-ARRAY (CL:UNSIGNED-BYTE 16)) VEC)) (PROG ((INDEX-VAR (IREMAINDER SXHASH LEN)) SYMBOL-NUMBER EHASH) (IF NIL THEN (CL:FORMAT T "Probe @ ~s~%%" INDEX-VAR)) LOOP (SETQ EHASH (V\GETBASEBYTE (VGETBASEPTR HASH 0) INDEX-VAR)) (*) (COND ((EQL EHASH ENTRY-HASH) (IF NIL THEN (CL:FORMAT T "Entry hash MATCHES~%%")) (LET ((SYMBOL-NAME (VSYMBOL.PNAME (SETQ SYMBOL-NUMBER (VGETBASE (VGETBASEPTR VEC 0) INDEX-VAR))))) (*) (IF NIL THEN (CL:FORMAT T "Got symbol index~%%")) (*) (COND ((STREQUAL SYMBOL-NAME STRING) (IF NIL THEN (CL:FORMAT T " found~%%")) (GO DOIT)) (T (IF NIL THEN (CL:FORMAT T "Didn't match~%%")))))) ((EQL 0 EHASH) (IF NIL THEN (CL:FORMAT T "Hit deleted entry (no match)~%%")) (SETQ INDEX-VAR NIL) (GO DOIT)) (T (IF NIL THEN (CL:FORMAT T "Entry hash does not match~%%")))) (SETQ INDEX-VAR (IREMAINDER (IPLUS INDEX-VAR H2) LEN)) (*) (IF NIL THEN (CL:FORMAT T "Reprobe @ ~s~%%" INDEX-VAR)) (GO LOOP) DOIT (RETURN SYMBOL-NUMBER)))) +(LAMBDA (TABLE STRING SXHASH ENTRY-HASH) (*) (*) (LET* ((VEC (VGETBASEPTR TABLE 0)) (*) (HASH (VGETBASEPTR TABLE 2)) (*) (LEN (\\GETBASEFIXP VEC 6)) (*) (H2 (ADD1 (IREMAINDER SXHASH (IDIFFERENCE LEN 2)))) (*)) (DECLARE (TYPE (CL:SIMPLE-ARRAY (CL:UNSIGNED-BYTE 8)) HASH) (TYPE (CL:SIMPLE-ARRAY (CL:UNSIGNED-BYTE 16)) VEC)) (PROG ((INDEX-VAR (IREMAINDER SXHASH LEN)) SYMBOL-NUMBER EHASH) (IF NIL THEN (CL:FORMAT T "Probe @ ~s~%" INDEX-VAR)) LOOP (SETQ EHASH (V\\GETBASEBYTE (VGETBASEPTR HASH 0) INDEX-VAR)) (*) (COND ((EQL EHASH ENTRY-HASH) (IF NIL THEN (CL:FORMAT T "Entry hash MATCHES~%")) (LET ((SYMBOL-NAME (VSYMBOL.PNAME (SETQ SYMBOL-NUMBER (VGETBASE (VGETBASEPTR VEC 0) INDEX-VAR))))) (*) (IF NIL THEN (CL:FORMAT T "Got symbol index~%")) (*) (COND ((STREQUAL SYMBOL-NAME STRING) (IF NIL THEN (CL:FORMAT T " found~%")) (GO DOIT)) (T (IF NIL THEN (CL:FORMAT T "Didn't match~%")))))) ((EQL 0 EHASH) (IF NIL THEN (CL:FORMAT T "Hit deleted entry (no match)~%")) (SETQ INDEX-VAR NIL) (GO DOIT)) (T (IF NIL THEN (CL:FORMAT T "Entry hash does not match~%")))) (SETQ INDEX-VAR (IREMAINDER (IPLUS INDEX-VAR H2) LEN)) (*) (IF NIL THEN (CL:FORMAT T "Reprobe @ ~s~%" INDEX-VAR)) (GO LOOP) DOIT (RETURN SYMBOL-NUMBER)))) ) (VFIND.PACKAGE -(LAMBDA (NAME) (*) (*) (PROG ((ITEM (MKSTRING NAME)) (HA READSYS.PACKAGE.FROM.NAME) BITS INDEX SLOT SKEY FIRSTINDEX REPROBE LIMIT ABASE VALUE) (SETQ BITS (STRINGHASHBITS ITEM)) (SETQ INDEX (LOGAND BITS (VGETBASE HA 1))) (*) (SETQ ABASE (VGETBASEPTR HA 2)) (SETQ FIRSTINDEX INDEX) (SETQ REPROBE (LOGOR (LOGAND (LOGXOR BITS (LRSH BITS 8)) (IMIN 63 (VGETBASE HA 1))) 1)) (*) (SETQ LIMIT (VGETBASE HA 1)) LP (SETQ SLOT ((LAMBDA (BASEA0200) (DECLARE (LOCALVARS BASEA0200)) (VADDBASE (VADDBASE BASEA0200 INDEX) INDEX)) (VADDBASE (VADDBASE ABASE INDEX) INDEX))) (*) (COND ((SETQ VALUE (VGETBASEPTR SLOT 2)) (*) (SETQ SKEY (V\UNCOPY (VGETBASEPTR SLOT 0))) (COND ((STREQUAL ITEM SKEY) (*) (GO FOUND)))) ((NULL (VGETBASEPTR SLOT 0)) (*) (RETURN NIL))) (SETQ INDEX (LOGAND (IPLUS16 INDEX REPROBE) LIMIT)) (*) (COND ((EQ INDEX FIRSTINDEX) (*) (SHOULDNT "Hashing in full hash table"))) (GO LP) FOUND (RETURN (AND (NEQ VALUE \HASH.NULL.VALUE) VALUE)))) +(LAMBDA (NAME) (*) (*) (PROG ((ITEM (MKSTRING NAME)) (HA READSYS.PACKAGE.FROM.NAME) BITS INDEX SLOT SKEY FIRSTINDEX REPROBE LIMIT ABASE VALUE) (SETQ BITS (STRINGHASHBITS ITEM)) (SETQ INDEX (LOGAND BITS (VGETBASE HA 1))) (*) (SETQ ABASE (VGETBASEPTR HA 2)) (SETQ FIRSTINDEX INDEX) (SETQ REPROBE (LOGOR (LOGAND (LOGXOR BITS (LRSH BITS 8)) (IMIN 63 (VGETBASE HA 1))) 1)) (*) (SETQ LIMIT (VGETBASE HA 1)) LP (SETQ SLOT ((LAMBDA (BASEA0195) (DECLARE (LOCALVARS BASEA0195)) (VADDBASE (VADDBASE BASEA0195 INDEX) INDEX)) (VADDBASE (VADDBASE ABASE INDEX) INDEX))) (*) (COND ((SETQ VALUE (VGETBASEPTR SLOT 2)) (*) (SETQ SKEY (V\\UNCOPY (VGETBASEPTR SLOT 0))) (COND ((STREQUAL ITEM SKEY) (*) (GO FOUND)))) ((NULL (VGETBASEPTR SLOT 0)) (*) (RETURN NIL))) (SETQ INDEX (LOGAND (IPLUS16 INDEX REPROBE) LIMIT)) (*) (COND ((EQ INDEX FIRSTINDEX) (*) (SHOULDNT "Hashing in full hash table"))) (GO LP) FOUND (RETURN (AND (NEQ VALUE \\HASH.NULL.VALUE) VALUE)))) ) (VFIND.SYMBOL -(LAMBDA (STRING PACKAGE) (*) (*) (LET* ((LENGTH (FFETCH (STRINGP LENGTH) OF STRING)) (HASH (COND ((EQL 0 LENGTH) 0) (T (PROG* ((TERMINUS LENGTH) (HASH (LLSH (NTHCHARCODE STRING 1) 8)) (CHAR# 2)) A0355 (COND ((IGREATERP CHAR# TERMINUS) (RETURN (PROGN HASH)))) (PROGN) (SETQ HASH (IPLUS16 (IPLUS16 (SETQ HASH (IPLUS16 HASH (LLSH (LOGAND HASH 4095) 2))) (LLSH (LOGAND HASH 255) 8)) (NTHCHARCODE STRING CHAR#))) (SETQ CHAR# (ADD1 CHAR#)) (GO A0355))))) (*) (EHASH (IPLUS (IREMAINDER (LOGXOR LENGTH HASH (RSH HASH 8) (RSH HASH 16) (RSH HASH 19)) 254) 2)) (*) (SYM) (WHERE) (DONE)) (COND ((NOT (VGETBASEPTR PACKAGE 14)) (*) (IF NIL THEN (PRINT "Checking INTERNAL symbols")) (LET ((INDEX (VLOOKUP-SYMBOL (VGETBASEPTR PACKAGE 16) STRING HASH EHASH))) (*) (COND (INDEX (SETQ SYM INDEX) (SETQ WHERE :INTERNAL) (SETQ DONE T)))))) (COND ((NOT DONE) (IF NIL THEN (PRINT "Checking EXTERNAL symbols")) (LET ((INDEX (VLOOKUP-SYMBOL (VGETBASEPTR PACKAGE 18) STRING HASH EHASH))) (*) (COND (INDEX (SETQ SYM INDEX) (SETQ WHERE :EXTERNAL) (SETQ DONE T)))))) (COND ((NOT DONE) (IF NIL THEN (CL:FORMAT T "Checking USE'd packages~%%")) (LET ((HEAD (VGETBASEPTR PACKAGE 2)) (*)) (PROG ((PREV HEAD) (TABLE (V\CDR.UFN HEAD))) USED-PACKAGE-LOOP (COND ((OR DONE (NULL TABLE)) (RETURN (PROGN (CL:VALUES NIL NIL))))) (PROGN (LET ((INDEX (VLOOKUP-SYMBOL (V\CAR.UFN TABLE) STRING HASH EHASH))) (*) (COND (INDEX (COND ((NEQ PREV HEAD) (LET* ((A0347 PREV) (A0346 (V\CDR.UFN A0347)) (A0349 TABLE) (A0348 (V\CDR.UFN A0349)) (A0351 HEAD) (A0350 (V\CDR.UFN A0351))) (V\CDR.UFN (RPLACD A0347 A0348)) (V\CDR.UFN (RPLACD A0349 A0350)) (V\CDR.UFN (RPLACD A0351 TABLE)) A0346))) (SETQ SYM INDEX) (SETQ WHERE :INHERITED) (SETQ DONE T)) (T)))) (PROGN (SETQ PREV (PROG1 TABLE (PROGN (SETQ TABLE (V\CDR.UFN TABLE)) NIL))) NIL) (GO USED-PACKAGE-LOOP))))) (CL:VALUES SYM WHERE))) +(LAMBDA (STRING PACKAGE) (*) (*) (LET* ((LENGTH (FFETCH (STRINGP LENGTH) OF STRING)) (HASH (COND ((EQL 0 LENGTH) 0) (T (PROG* ((TERMINUS LENGTH) (HASH (LLSH (NTHCHARCODE STRING 1) 8)) (CHAR# 2)) A0355 (COND ((IGREATERP CHAR# TERMINUS) (RETURN (PROGN HASH)))) (PROGN) (SETQ HASH (IPLUS16 (IPLUS16 (SETQ HASH (IPLUS16 HASH (LLSH (LOGAND HASH 4095) 2))) (LLSH (LOGAND HASH 255) 8)) (NTHCHARCODE STRING CHAR#))) (SETQ CHAR# (ADD1 CHAR#)) (GO A0355))))) (*) (EHASH (IPLUS (IREMAINDER (LOGXOR LENGTH HASH (RSH HASH 8) (RSH HASH 16) (RSH HASH 19)) 254) 2)) (*) (SYM) (WHERE) (DONE)) (COND ((NOT (VGETBASEPTR PACKAGE 14)) (*) (IF NIL THEN (PRINT "Checking INTERNAL symbols")) (LET ((INDEX (VLOOKUP-SYMBOL (VGETBASEPTR PACKAGE 16) STRING HASH EHASH))) (*) (COND (INDEX (SETQ SYM INDEX) (SETQ WHERE :INTERNAL) (SETQ DONE T)))))) (COND ((NOT DONE) (IF NIL THEN (PRINT "Checking EXTERNAL symbols")) (LET ((INDEX (VLOOKUP-SYMBOL (VGETBASEPTR PACKAGE 18) STRING HASH EHASH))) (*) (COND (INDEX (SETQ SYM INDEX) (SETQ WHERE :EXTERNAL) (SETQ DONE T)))))) (COND ((NOT DONE) (IF NIL THEN (CL:FORMAT T "Checking USE'd packages~%")) (LET ((HEAD (VGETBASEPTR PACKAGE 2)) (*)) (PROG ((PREV HEAD) (TABLE (V\\CDR.UFN HEAD))) USED-PACKAGE-LOOP (COND ((OR DONE (NULL TABLE)) (RETURN (PROGN (CL:VALUES NIL NIL))))) (PROGN (LET ((INDEX (VLOOKUP-SYMBOL (V\\CAR.UFN TABLE) STRING HASH EHASH))) (*) (COND (INDEX (COND ((NEQ PREV HEAD) (LET* ((A0347 PREV) (A0346 (V\\CDR.UFN A0347)) (A0349 TABLE) (A0348 (V\\CDR.UFN A0349)) (A0351 HEAD) (A0350 (V\\CDR.UFN A0351))) (V\\CDR.UFN (RPLACD A0347 A0348)) (V\\CDR.UFN (RPLACD A0349 A0350)) (V\\CDR.UFN (RPLACD A0351 TABLE)) A0346))) (SETQ SYM INDEX) (SETQ WHERE :INHERITED) (SETQ DONE T)) (T)))) (PROGN (SETQ PREV (PROG1 TABLE (PROGN (SETQ TABLE (V\\CDR.UFN TABLE)) NIL))) NIL) (GO USED-PACKAGE-LOOP))))) (CL:VALUES SYM WHERE))) ) (VPACKAGE.NAME -(LAMBDA (RMPKG) (*) (AND RMPKG (V\UNCOPY (VGETBASEPTR RMPKG 4))))) +(LAMBDA (RMPKG) (*) (AND RMPKG (V\\UNCOPY (VGETBASEPTR RMPKG 4))))) -(V\MKATOM -(LAMBDA (BASE OFFST LEN FATP NONNUMERICP) (*) (PROG ((FATCHARSEENP (AND FATP (NOT (NULL (for I from OFFST to (SUB1 (IPLUS OFFST LEN)) suchthat (IGREATERP (VGETBASE BASE I) 255)))))) HASH HASHENT ATM# PNBASE FIRSTCHAR FIRSTBYTE REPROBE) (*) (COND ((EQ LEN 0) (*) (SETQ HASH 0) (SETQ FIRSTBYTE 255) (GO LP))) (SETQ FIRSTCHAR (NTHCHARCODE BASE OFFST)) (*) NIL (*) (SETQ FIRSTBYTE (LOGAND FIRSTCHAR 255)) (*) (PROGN (*) (SETQ HASH (LLSH FIRSTBYTE 8)) (for CHAR# from (ADD1 OFFST) to (SUB1 (IPLUS OFFST LEN)) do (SETQ HASH (IPLUS16 (IPLUS16 (SETQ HASH (IPLUS16 HASH (LLSH (LOGAND HASH 4095) 2))) (LLSH (LOGAND HASH 255) 8)) (NTHCHARCODE BASE CHAR#))))) (*) LP (*) (COND ((NEQ 0 (SETQ HASHENT (VGETBASE (VVAG2 21 0) HASH))) (*) (COND ((EQ (VATOM (SETQ ATM# (SUB1 HASHENT))) BASE) (RETURN (VADDBASE (VVAG2 0 0) ATM#))) (T (*) (SETQ HASH (IPLUS16 HASH (OR REPROBE (SETQ REPROBE (LOGAND 63 (LOGOR 1 (LOGXOR FIRSTBYTE HASH))))))) (GO LP))))) (*) (RETURN (PROGN (LET ((NEWATOM (VNOSUCHATOM BASE OFFST LEN FATP FATCHARSEENP))) NIL NEWATOM))))) +(V\\MKATOM +(LAMBDA (BASE OFFST LEN FATP NONNUMERICP) (*) (PROG ((FATCHARSEENP (AND FATP (NOT (NULL (|for| I |from| OFFST |to| (SUB1 (IPLUS OFFST LEN)) |suchthat| (IGREATERP (VGETBASE BASE I) 255)))))) HASH HASHENT ATM# PNBASE FIRSTCHAR FIRSTBYTE REPROBE) (*) (COND ((EQ LEN 0) (*) (SETQ HASH 0) (SETQ FIRSTBYTE 255) (GO LP))) (SETQ FIRSTCHAR (NTHCHARCODE BASE OFFST)) (*) NIL (*) (SETQ FIRSTBYTE (LOGAND FIRSTCHAR 255)) (*) (PROGN (*) (SETQ HASH (LLSH FIRSTBYTE 8)) (|for| CHAR# |from| (ADD1 OFFST) |to| (SUB1 (IPLUS OFFST LEN)) |do| (SETQ HASH (IPLUS16 (IPLUS16 (SETQ HASH (IPLUS16 HASH (LLSH (LOGAND HASH 4095) 2))) (LLSH (LOGAND HASH 255) 8)) (NTHCHARCODE BASE CHAR#))))) (*) LP (*) (COND ((NEQ 0 (SETQ HASHENT (VGETBASE (VVAG2 21 0) HASH))) (*) (COND ((EQ (VATOM (SETQ ATM# (SUB1 HASHENT))) BASE) (RETURN (VADDBASE (VVAG2 0 0) ATM#))) (T (*) (SETQ HASH (IPLUS16 HASH (OR REPROBE (SETQ REPROBE (LOGAND 63 (LOGOR 1 (LOGXOR FIRSTBYTE HASH))))))) (GO LP))))) (*) (RETURN (PROGN (LET ((NEWATOM (VNOSUCHATOM BASE OFFST LEN FATP FATCHARSEENP))) NIL NEWATOM))))) ) (VGETTOPVAL -(LAMBDA (X) (*) (VGETBASEPTR (V\ATOMCELL X 12) 0))) +(LAMBDA (X) (*) (VGETBASEPTR (V\\ATOMCELL X 12) 0))) (VGETPROPLIST -(LAMBDA (ATM) (*) (VGETBASEPTR (V\ATOMCELL ATM (CONSTANT 2)) 0))) +(LAMBDA (ATM) (*) (VGETBASEPTR (V\\ATOMCELL ATM (CONSTANT 2)) 0))) (VSETTOPVAL -(LAMBDA (ATM VAL) (*) (SELECTQ ATM (NIL (AND VAL (LISPERROR "ATTEMPT TO SET NIL OR T" VAL))) (T (OR (EQ VAL T) (LISPERROR "ATTEMPT TO SET NIL OR T" VAL))) (VPUTBASEPTR (V\ATOMCELL ATM 12) 0 (V\COPY VAL)))) +(LAMBDA (ATM VAL) (*) (SELECTQ ATM (NIL (AND VAL (LISPERROR "ATTEMPT TO SET NIL OR T" VAL))) (T (OR (EQ VAL T) (LISPERROR "ATTEMPT TO SET NIL OR T" VAL))) (VPUTBASEPTR (V\\ATOMCELL ATM 12) 0 (V\\COPY VAL)))) ) (VGETDEFN -(LAMBDA (A) (*) (VGETBASEPTR (V\ATOMCELL A 10) 0))) +(LAMBDA (A) (*) (VGETBASEPTR (V\\ATOMCELL A 10) 0))) -(V\ATOMCELL -(LAMBDA (X N) (*) (LET ((ATOMNO (VATOMNUMBER X))) (COND (NIL (*) (EQ (VHILOC ATOMNO) 0) (*) (LET ((LOC (SELECTC N (10 (VATOMNUMBER ATOMNO)) (12 (VATOMNUMBER ATOMNO)) (2 (VATOMNUMBER ATOMNO)) (8 (\ATOMPNAMEINDEX ATOMNO)) (SHOULDNT)))) (VADDBASE (VVAG2 N LOC) LOC))) ((FIXP ATOMNO) (*) (LET ((LOC (SELECTC N (10 4) (12 2) (2 6) (8 0) (SHOULDNT)))) (VADDBASE (VVAG2 44 0) (IPLUS LOC (ITIMES 10 ATOMNO))))) (T (*) (LET ((OFFSET (SELECTC N (10 4) (12 2) (2 6) (8 0) (SHOULDNT)))) (VADDBASE ATOMNO OFFSET)))))) +(V\\ATOMCELL +(LAMBDA (X N) (*) (LET ((ATOMNO (VATOMNUMBER X))) (COND (NIL (*) (EQ (VHILOC ATOMNO) 0) (*) (LET ((LOC (SELECTC N (10 (VATOMNUMBER ATOMNO)) (12 (VATOMNUMBER ATOMNO)) (2 (VATOMNUMBER ATOMNO)) (8 (\\ATOMPNAMEINDEX ATOMNO)) (SHOULDNT)))) (VADDBASE (VVAG2 N LOC) LOC))) ((FIXP ATOMNO) (*) (LET ((LOC (SELECTC N (10 4) (12 2) (2 6) (8 0) (SHOULDNT)))) (VADDBASE (VVAG2 44 0) (IPLUS LOC (ITIMES 10 ATOMNO))))) (T (*) (LET ((OFFSET (SELECTC N (10 4) (12 2) (2 6) (8 0) (SHOULDNT)))) (VADDBASE ATOMNO OFFSET)))))) ) ) (DEFINEQ @@ -273,24 +273,24 @@ (RPAQQ COPYATOMSTR NIL) (DEFINEQ -(V\GET-COMPILED-CODE-BASE -(LAMBDA (X) (*) (*) (PROG NIL (COND ((LITATOM X) (COND ((PROG1 (NEQ 0 (LRSH (VGETBASE (V\ATOMCELL X 10) 0) 15)) (SETQ X (VGETBASEPTR (V\ATOMCELL X 10) 0))) (RETURN X))))) (RETURN (AND (EQ (VNTYPX X) 13) (VGETBASEPTR (\DTEST X (QUOTE COMPILED-CLOSURE)) 0))))) +(V\\GET-COMPILED-CODE-BASE +(LAMBDA (X) (*) (*) (PROG NIL (COND ((LITATOM X) (COND ((PROG1 (NEQ 0 (LRSH (VGETBASE (V\\ATOMCELL X 10) 0) 15)) (SETQ X (VGETBASEPTR (V\\ATOMCELL X 10) 0))) (RETURN X))))) (RETURN (AND (EQ (VNTYPX X) 13) (VGETBASEPTR (\\DTEST X (QUOTE COMPILED-CLOSURE)) 0))))) ) ) -(* ;; +(* |;;| "YOU MUST REMAKE THIS FILE using (DORENAME 'R) (after CONNing to library) whenever the SYSOUT layout changes in LLPARAMS (e.g., if MDSTypeTable moves)" ) (FILESLOAD VMEM) -(RPAQQ RDVALS ((\RPTSIZE) (\MaxTypeNumber) (\AtomFrLst) (\ArrayFrLst) (\ArrayFrLst2))) +(RPAQQ RDVALS ((\\RPTSIZE) (|\\MaxTypeNumber|) (|\\AtomFrLst|) (|\\ArrayFrLst|) (|\\ArrayFrLst2|))) -(RPAQQ RDPTRS ((\REALPAGETABLE) (\FREEBLOCKBUCKETS))) -(DECLARE%: EVAL@COMPILE DONTCOPY +(RPAQQ RDPTRS ((\\REALPAGETABLE) (\\FREEBLOCKBUCKETS))) +(DECLARE\: EVAL@COMPILE DONTCOPY (FILESLOAD (LOADCOMP) VMEM) ) diff --git a/library/RDSYS.LCOM b/library/RDSYS.LCOM index 2e4bd2ae7..dd07242fb 100644 Binary files a/library/RDSYS.LCOM and b/library/RDSYS.LCOM differ diff --git a/library/SEDIT-COMMONLISP.DFASL b/library/SEDIT-COMMONLISP.DFASL index 356f57004..c2f4f12cc 100644 Binary files a/library/SEDIT-COMMONLISP.DFASL and b/library/SEDIT-COMMONLISP.DFASL differ diff --git a/library/TEDITFILE.LCOM b/library/TEDITFILE.LCOM index 5c6e88cef..3d3b21b6f 100644 Binary files a/library/TEDITFILE.LCOM and b/library/TEDITFILE.LCOM differ diff --git a/library/TEDITHCPY b/library/TEDITHCPY index ad78e7505..75206ae5f 100644 --- a/library/TEDITHCPY +++ b/library/TEDITHCPY @@ -1,19 +1,64 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "25-Aug-94 10:54:07" {DSK}export>lispcore>library>TEDITHCPY.;4 104820 +(FILECREATED "28-Jun-2021 12:35:45"  +{DSK}kaplan>Local>medley3.5>git-medley>library>TEDITHCPY.;2 105754 - changes to%: (VARS TEDITHCPYCOMS) (FILES TEDITDCL) + changes to%: (FNS \TEDIT.HARDCOPY.FORMATLINE) - previous date%: "29-Mar-94 17:25:49" {DSK}export>lispcore>library>TEDITHCPY.;3) + previous date%: "25-Aug-94 10:54:07" +{DSK}kaplan>Local>medley3.5>git-medley>library>TEDITHCPY.;1) (* ; " -Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1983-1994, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT TEDITHCPYCOMS) -(RPAQQ TEDITHCPYCOMS ((FILES TEDITDCL) (DECLARE%: EVAL@COMPILE DONTCOPY (CONSTANTS (\SCRATCHLEN 64)) (FILES (LOADCOMP) TEDITDCL)) (COMS (* ;; "Generic interface functions and common code") (FNS TEDIT.HARDCOPY TEDIT.HCPYFILE \TEDIT.HARDCOPY.DISPLAYLINE \TEDIT.HARDCOPY.FORMATLINE \DOFORMATTING.HARDCOPY \TEDIT.HARDCOPY.MODIFYLOOKS \TEDIT.HCPYLOOKS.UPDATE \TEDIT.HCPYFMTSPEC \TEDIT.INTEGER.IMAGEBOX)) (COMS (* ;; "Functions for scaling distances and regions as needed during hardcopy.") (FNS \TEDIT.SCALE \TEDIT.SCALEREGION)) (COMS (* ;; "PRESS-specific code") (VARS (TEDIT.DEFAULTPAGEREGION (CREATEREGION 2794 1905 16256 23495))) (* ; "0.75 inches from bottom, 1 from top")) (COMS (* ;; "Support for the window-menu's HARDCOPY button, LISTFILES, etc.") (FNS TEDIT.HARDCOPYFN \TEDIT.HARDCOPY \TEDIT.PRESS.HARDCOPY) (P (LISTPUT (ASSOC (QUOTE CONVERSION) (ASSOC (QUOTE INTERPRESS) PRINTFILETYPES)) (QUOTE TEDIT) (FUNCTION \TEDIT.HARDCOPY))) (P (LET ((PRESSVALUES (ASSOC (QUOTE CONVERSION) (ASSOC (QUOTE PRESS) PRINTFILETYPES)))) (COND (PRESSVALUES (* ; "Only install PRESS printing if PRESS is loaded.") (LISTPUT PRESSVALUES (QUOTE TEDIT) (FUNCTION \TEDIT.PRESS.HARDCOPY))))))) (COMS (* ;; "vars for Japanese Line Break") (VARS (TEDIT.DONT.BREAK.CHARS (QUOTE (8482 8483 8491 8492 8508 8525 8539 8537 8535 9249 9251 9253 9255 9257 9283 9315 9317 9319 9326 9505 9507 9509 9511 9513 9539 9571 9573 9575 9582))) (TEDIT.DONT.LAST.CHARS (QUOTE (8524 8538 8536 8534)))) (GLOBALVARS TEDIT.DONT.BREAK.CHARS TEDIT.DONT.LAST.CHARS)) (COMS (* ;; "Support for hardcopying several files as one document") (FNS TEDIT-BOOK))) -) +(RPAQQ TEDITHCPYCOMS + ((FILES TEDITDCL) + (DECLARE%: EVAL@COMPILE DONTCOPY (CONSTANTS (\SCRATCHLEN 64)) + (FILES (LOADCOMP) + TEDITDCL)) + (COMS + (* ;; "Generic interface functions and common code") + + (FNS TEDIT.HARDCOPY TEDIT.HCPYFILE \TEDIT.HARDCOPY.DISPLAYLINE + \TEDIT.HARDCOPY.FORMATLINE \DOFORMATTING.HARDCOPY \TEDIT.HARDCOPY.MODIFYLOOKS + \TEDIT.HCPYLOOKS.UPDATE \TEDIT.HCPYFMTSPEC \TEDIT.INTEGER.IMAGEBOX)) + (COMS + (* ;; "Functions for scaling distances and regions as needed during hardcopy.") + + (FNS \TEDIT.SCALE \TEDIT.SCALEREGION)) + (COMS + (* ;; "PRESS-specific code") + + (VARS (TEDIT.DEFAULTPAGEREGION (CREATEREGION 2794 1905 16256 23495))) + (* ; + "0.75 inches from bottom, 1 from top") + ) + [COMS + (* ;; "Support for the window-menu's HARDCOPY button, LISTFILES, etc.") + + (FNS TEDIT.HARDCOPYFN \TEDIT.HARDCOPY \TEDIT.PRESS.HARDCOPY) + (P (LISTPUT (ASSOC 'CONVERSION (ASSOC 'INTERPRESS PRINTFILETYPES)) + 'TEDIT + (FUNCTION \TEDIT.HARDCOPY))) + (P (LET [(PRESSVALUES (ASSOC 'CONVERSION (ASSOC 'PRESS PRINTFILETYPES] + (COND (PRESSVALUES (* ; + "Only install PRESS printing if PRESS is loaded.") + (LISTPUT PRESSVALUES 'TEDIT (FUNCTION \TEDIT.PRESS.HARDCOPY] + (COMS + (* ;; "vars for Japanese Line Break") + + [VARS (TEDIT.DONT.BREAK.CHARS '(8482 8483 8491 8492 8508 8525 8539 8537 8535 9249 9251 + 9253 9255 9257 9283 9315 9317 9319 9326 9505 9507 + 9509 9511 9513 9539 9571 9573 9575 9582)) + (TEDIT.DONT.LAST.CHARS '(8524 8538 8536 8534] + (GLOBALVARS TEDIT.DONT.BREAK.CHARS TEDIT.DONT.LAST.CHARS)) + (COMS + (* ;; "Support for hardcopying several files as one document") + + (FNS TEDIT-BOOK)))) (FILESLOAD TEDITDCL) (DECLARE%: EVAL@COMPILE DONTCOPY @@ -26,7 +71,8 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, ) -(FILESLOAD (LOADCOMP) TEDITDCL) +(FILESLOAD (LOADCOMP) + TEDITDCL) ) @@ -298,10 +344,10 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, PRSTREAM LINE]) (\TEDIT.HARDCOPY.FORMATLINE - [LAMBDA (TEXTOBJ WIDTH CH#1 THISLINE LINE IMAGESTREAM DOINGHEADING? PAGEINFO) - (* ; "Edited 29-Mar-94 17:15 by jds") + [LAMBDA (TEXTOBJ WIDTH CH#1 THISLINE LINE IMAGESTREAM DOINGHEADING? PAGEINFO) + (* ; "Edited 28-Jun-2021 12:34 by rmk:") -(* ;;; "Given a starting place, format the next line of text. Return T if a control-L was seen on the line.") +(* ;;; "Given a starting place, format the next line of text. Return T if a control-L was seen on the line.") (DECLARE (SPECVARS LOOKS ASCENT DESCENT FONTWIDTHS FONT INVISIBLERUNS CHNO TLEN LOOKNO CHLIST WLIST DEVICE NEWASCENT NEWDESCENT IMAGESTREAM)) @@ -322,77 +368,77 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, CHLIST WLIST LOOKS ASCENTB DESCENTB INVISIBLERUNSB TABPENDING BOX PC PCNO CTRL\L\SEEN 1STLN FMTSPEC NEWASCENT NEWDESCENT PREVHYPH PREVDHYPH ORIGCHLIST ORIGWLIST) - (* ;; "Variables:") + (* ;; "Variables:") - (* ;; "(TLEN = Current character count on the line)") + (* ;; "(TLEN = Current character count on the line)") - (* ;; "(CHNO = Current character # in the Text)") + (* ;; "(CHNO = Current character # in the Text)") - (* ;; "(DX = width of current char/object)") + (* ;; "(DX = width of current char/object)") - (* ;; "(TX = current right margin) ") + (* ;; "(TX = current right margin) ") - (* ;; "(TXB1 = right margin of the first space/tab/CR in a row of space/tab/CR) ") + (* ;; "(TXB1 = right margin of the first space/tab/CR in a row of space/tab/CR) ") - (* ;; "(CH#B = The CHNO of most recent space/tab)") + (* ;; "(CH#B = The CHNO of most recent space/tab)") - (* ;; "(TXB = right margin of most recent space/tab)") + (* ;; "(TXB = right margin of most recent space/tab)") - (* ;; "(DXB = width of most recent space/tab)") + (* ;; "(DXB = width of most recent space/tab)") - (* ;; "(PREVSP = location on the line of the previous space/tab to this space/tab + 1)") + (* ;; "(PREVSP = location on the line of the previous space/tab to this space/tab + 1)") - (* ;; "(T1SPACE = a space/CR/TAB has been seen)") + (* ;; "(T1SPACE = a space/CR/TAB has been seen)") - (* ;; "(#BLANKS = # of spaces/tabs seen) ") + (* ;; "(#BLANKS = # of spaces/tabs seen) ") - (* ;; "(LOOKNO = Current index into the LOOKS array. Updated by \TEDIT.LOOKS.UPDATE as characters are read in)") + (* ;; "(LOOKNO = Current index into the LOOKS array. Updated by \TEDIT.LOOKS.UPDATE as characters are read in)") - (* ;; "(LOOK#B = The LOOKNO of the most recent space/tab)") + (* ;; "(LOOK#B = The LOOKNO of the most recent space/tab)") - (* ;; "(ASCENTB = Ascent at most recent potential line break point) (DESCENTB = Descent at most recent potential line break point)") + (* ;; "(ASCENTB = Ascent at most recent potential line break point) (DESCENTB = Descent at most recent potential line break point)") [SETQ ORIGCHLIST (SETQ CHLIST (fetch (ARRAYP BASE) of (fetch CHARS of THISLINE] - (* ; - "Place to put character codes/objects") + (* ; + "Place to put character codes/objects") [SETQ ORIGWLIST (SETQ WLIST (fetch (ARRAYP BASE) of (fetch (THISLINE WIDTHS) of THISLINE] - (* ; "Place to put width of each item") + (* ; "Place to put width of each item") (SETQ LOOKS (fetch LOOKS of THISLINE)) (SETQ TEXTSTREAM (fetch (TEXTOBJ STREAMHINT) of TEXTOBJ)) (SETQ TERMSA (fetch (TEXTOBJ TXTTERMSA) of TEXTOBJ)) (replace LOOKSUPDATEFN of TEXTSTREAM with (FUNCTION \TEDIT.HCPYLOOKS.UPDATE)) - (* ; - "This gets called every time we cross a piece boundary, to check for changes in looks.") + (* ; + "This gets called every time we cross a piece boundary, to check for changes in looks.") (freplace (LINEDESCRIPTOR CHARLIM) of LINE with TEXTLEN) - (* ; - "Force each new line to find its true CHARLIM.") + (* ; + "Force each new line to find its true CHARLIM.") (freplace (LINEDESCRIPTOR CHAR1) of LINE with CH#1) (freplace (LINEDESCRIPTOR CR\END) of LINE with NIL) - (* ; "Assume we won't see a CR.") + (* ; "Assume we won't see a CR.") (replace (LINEDESCRIPTOR LHASTABS) of LINE with NIL) - (* ; "And has no TABs.") + (* ; "And has no TABs.") (replace (LINEDESCRIPTOR LSTLN) of LINE with NIL) - (* ; - "And assume it isn't the last line in a paragraph until we find otherwise.") + (* ; + "And assume it isn't the last line in a paragraph until we find otherwise.") (replace (THISLINE TLFIRSTSPACE) of THISLINE with 0) - (* ; - "Start out assuming that all spaces on the line will be scaled.") + (* ; + "Start out assuming that all spaces on the line will be scaled.") (COND [(COND ((AND (ILEQ CH#1 TEXTLEN) - (NOT (ZEROP TEXTLEN))) (* ; - "Only continue if there's really text we can format.") - (\SETUPGETCH CH#1 TEXTOBJ) (* ; "Starting place") - (* ; "And starting character looks") + (NOT (ZEROP TEXTLEN))) (* ; + "Only continue if there's really text we can format.") + (\SETUPGETCH CH#1 TEXTOBJ) (* ; "Starting place") + (* ; "And starting character looks") (SETQ CLOOKS (fetch (TEXTSTREAM CURRENTLOOKS) of TEXTSTREAM)) [COND ((fetch (CHARLOOKS CLINVISIBLE) of CLOOKS) - (* ; - "We've hit a run of invisible characters. Skip them, and insert a marker in the line cache") - (add LOOKNO 1) (* ; - "Fix the counter of charlooks changes") + (* ; + "We've hit a run of invisible characters. Skip them, and insert a marker in the line cache") + (add LOOKNO 1) (* ; + "Fix the counter of charlooks changes") (SETQ PC (fetch (TEXTSTREAM PIECE) of TEXTSTREAM)) (\EDITSETA LOOKS LOOKNO (SETQ INVISIBLERUNS (fetch (PIECE PLEN) of PC))) @@ -415,15 +461,15 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, PC TEXTOBJ] (add CHNO (\EDITELT LOOKS LOOKNO)) (COND - (PC (* ; - "Move us to the right place in the stream") + (PC (* ; + "Move us to the right place in the stream") (\SETUPGETCH (create EDITMARK PC _ PC PCOFF _ 0 PCNO _ NIL) TEXTOBJ)) - (T (* ; - "We've walked off the end of the document. Just note that we're not at any piece now.") + (T (* ; + "We've walked off the end of the document. Just note that we're not at any piece now.") (replace (TEXTSTREAM PIECE) of TEXTSTREAM with NIL] (ILEQ CHNO TEXTLEN))) (\TEDIT.HCPYLOOKS.UPDATE TEXTSTREAM (fetch (TEXTSTREAM PIECE) of TEXTSTREAM @@ -431,25 +477,25 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, CLOOKS) (SETQ ASCENTB ASCENT) (SETQ DESCENTB DESCENT) - (\EDITSETA LOOKS 0 CLOOKS) (* ; "Save looks in the line cache") + (\EDITSETA LOOKS 0 CLOOKS) (* ; "Save looks in the line cache") (SETQ FONT (fetch (CHARLOOKS CLFONT) of CLOOKS)) [SETQ FONT (COND ((AND (type? FONTCLASS FONT) (FONTCLASSCOMPONENT FONT DEVICE))) - (T (FONTCOPY FONT 'DEVICE DEVICE](* ; - "Keep the font around for char widths.") + (T (FONTCOPY FONT 'DEVICE DEVICE](* ; + "Keep the font around for char widths.") (SETQ FMTSPEC (\TEDIT.HCPYFMTSPEC (\TEDIT.APPLY.PARASTYLES (OR (fetch (TEXTSTREAM CURRENTPARALOOKS) of TEXTSTREAM) (fetch (TEXTOBJ FMTSPEC) of TEXTOBJ) ) PC TEXTOBJ) - IMAGESTREAM)) (* ; "Paragraph formatting info") + IMAGESTREAM)) (* ; "Paragraph formatting info") (COND ((AND (NEQ FMTSPEC *TEDIT-CACHED-FMTSPEC*) (fetch (FMTSPEC FMTCHARSTYLES) of FMTSPEC)) - (* ;; "The cache of character styles for the current paragrpah is invalid; flush it, and note the new paragraph to cache for.") + (* ;; "The cache of character styles for the current paragrpah is invalid; flush it, and note the new paragraph to cache for.") (SETQ *TEDIT-CURRENTPARA-CACHE* NIL) (SETQ *TEDIT-CACHED-FMTSPEC* FMTSPEC))) @@ -466,27 +512,27 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (fetch (STREAM COFFSET) of TEXTSTREAM)) (IEQP (fetch (TEXTSTREAM PCSTARTPG) of TEXTSTREAM) (fetch (STREAM CPAGE) of TEXTSTREAM] - (* ; - "Are we on the first line of a paragraph?") + (* ; + "Are we on the first line of a paragraph?") (replace (LINEDESCRIPTOR 1STLN) of LINE with 1STLN) (COND - ((AND 1STLN (NOT DOINGHEADING?)) (* ; - "This is a new paragraph. Check for special paragraph types, and handle them accordingly.") + ((AND 1STLN (NOT DOINGHEADING?)) (* ; + "This is a new paragraph. Check for special paragraph types, and handle them accordingly.") (SELECTQ (fetch (FMTSPEC FMTPARATYPE) of FMTSPEC) - (PAGEHEADING (* ; "This paragraph is the content for a page heading. Handle it, then don't bother formatting further.") + (PAGEHEADING (* ; "This paragraph is the content for a page heading. Handle it, then don't bother formatting further.") (TEDIT.HARDCOPY.PAGEHEADING TEXTOBJ TEXTSTREAM LINE FMTSPEC CHNO IMAGESTREAM) - (* ;; "This will capture the text, and set LINE:CHARLIM to the LAST char# in the page heading. That lets formatting continue apace.") + (* ;; "This will capture the text, and set LINE:CHARLIM to the LAST char# in the page heading. That lets formatting continue apace.") (RETURN NIL)) - (EVEN (* ; "This paragraph may or may not belong here. If this is an odd page, we don't want to format this paragraph.") + (EVEN (* ; "This paragraph may or may not belong here. If this is an odd page, we don't want to format this paragraph.") (COND ((ODDP (fetch (PAGEFORMATTINGSTATE PAGE#) of FORMATTINGSTATE)) (TEDIT.SKIP.SPECIALCOND TEXTOBJ TEXTSTREAM LINE FMTSPEC CHNO IMAGESTREAM) (RETURN NIL)))) - (ODD (* ; "This paragraph may or may not belong here. If this is an even page, we don't want to format this paragraph.") + (ODD (* ; "This paragraph may or may not belong here. If this is an even page, we don't want to format this paragraph.") (COND ((EVENP (fetch (PAGEFORMATTINGSTATE PAGE#) of FORMATTINGSTATE)) (TEDIT.SKIP.SPECIALCOND TEXTOBJ TEXTSTREAM LINE FMTSPEC CHNO @@ -497,50 +543,50 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, with (COND (1STLN (fetch (FMTSPEC 1STLEFTMAR) of FMTSPEC)) (T (fetch (FMTSPEC LEFTMAR) of FMTSPEC] - (* ; "Set the left margin accordingly") + (* ; "Set the left margin accordingly") [replace (LINEDESCRIPTOR RIGHTMARGIN) of LINE with (SETQ WIDTH (COND ((NOT (ZEROP (fetch (FMTSPEC RIGHTMAR) of FMTSPEC))) (fetch (FMTSPEC RIGHTMAR) of FMTSPEC)) - (T WIDTH] (* ; - "RIGHTMAR = 0 => follow the window's width.") + (T WIDTH] (* ; + "RIGHTMAR = 0 => follow the window's width.") (SETQ TXB1 WIDTH) (for old TLEN from TLEN to 511 as old CHNO from CHNO while (ILEQ CHNO TEXTLEN) when (SETQ CH (\BIN TEXTSTREAM)) - do (* ; "(The WHILE is there because we may reset TEXTLEN within the loop, and TO TEXTLEN only evaluates it once.)") + do (* ; "(The WHILE is there because we may reset TEXTLEN within the loop, and TO TEXTLEN only evaluates it once.)") - (* ;; "The character loop") + (* ;; "The character loop") - (* ;; "Get the next character for the line.") + (* ;; "Get the next character for the line.") [SETQ DX (COND - ((SMALLP CH) (* ; "CH is really a character") + ((SMALLP CH) (* ; "CH is really a character") (\FGETCHARWIDTH FONT CH)) - (T (* ; "CH is an object") + (T (* ; "CH is an object") (SETQ BOX (\TEDIT.INTEGER.IMAGEBOX (APPLY* (IMAGEOBJPROP CH 'IMAGEBOXFN) CH IMAGESTREAM TX WIDTH ))) - (* ; "Get its size") + (* ; "Get its size") [SETQ ASCENT (IMAX ASCENT (IDIFFERENCE (fetch YSIZE of BOX) (fetch YDESC of BOX] (SETQ DESCENT (IMAX DESCENT (fetch YDESC of BOX))) (IMAGEOBJPROP CH 'BOUNDBOX BOX) (fetch XSIZE of BOX] - (AND KERN (SETQ DX (IPLUS DX KERN))) (* ; "Get CH's X width.") + (AND KERN (SETQ DX (IPLUS DX KERN))) (* ; "Get CH's X width.") [SELCHARQ CH - (SPACE (* ; - "CH is a . Remember it, in case we need to break the line.") + (SPACE (* ; + "CH is a . Remember it, in case we need to break the line.") (COND (GATHERBLANK (SETQ TXB1 TX) (SETQ GATHERBLANK NIL))) - (SETQ CH#B CHNO) (* ; - "put the location # of the previous space/tab in the character array instead of the space itself") + (SETQ CH#B CHNO) (* ; + "put the location # of the previous space/tab in the character array instead of the space itself") (COND (NEWASCENT - (* ;; "The ascent/descent changed. Update the real values, now that we have a character to actually take effect on it") + (* ;; "The ascent/descent changed. Update the real values, now that we have a character to actually take effect on it") (SETQ ASCENT (IMAX ASCENT NEWASCENT)) (SETQ DESCENT (IMAX DESCENT NEWDESCENT)) @@ -549,8 +595,8 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (\RPLPTR WLIST 0 DX) (SETQ PREVSP (ADD1 TLEN)) (SETQ PREVHYPH NIL) - (SETQ PREVDHYPH NIL) (* ; - "We're now past needing any hyphens for line breaking, so forget the last hyphen spot.") + (SETQ PREVDHYPH NIL) (* ; + "We're now past needing any hyphens for line breaking, so forget the last hyphen spot.") (SETQ T1SPACE T) (add TX DX) (SETQ TXB TX) @@ -560,33 +606,33 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (SETQ DESCENTB DESCENT) (SETQ INVISIBLERUNSB INVISIBLERUNS) (add %#BLANKS 1)) - (CR (* ; - "Ch is a . Force an end to the line.") - (freplace (LINEDESCRIPTOR CHARLIM) of LINE with CHNO) - (COND - ((AND NEWASCENT (ZEROP ASCENT) - (ZEROP DESCENT)) (* ; - "The ascent has changed; catch it") - (SETQ ASCENT NEWASCENT) - (SETQ DESCENT NEWDESCENT))) - (SETQ FORCEEND T) - (\RPLPTR CHLIST 0 (CHARCODE CR)) - (\RPLPTR WLIST 0 (SETQ DX 0)) - (COND - (GATHERBLANK (SETQ TXB1 TX) - (SETQ GATHERBLANK NIL))) - (SETQ T1SPACE T) - (freplace (LINEDESCRIPTOR CR\END) of LINE with T) - (SETQ TX (IPLUS TX DX)) - (replace (LINEDESCRIPTOR LSTLN) of LINE - with (fetch (PIECE PPARALAST) of (fetch PIECE - of TEXTSTREAM))) - (SETQ PREVDHYPH NIL) - (SETQ PREVHYPH NIL) (* ; - "We're now past needing any hyphens for line breaking, so forget the last hyphen spot.") - (RETURN)) - (^L (* ; - "Ch is a
Force an end to the line. Immediately--just like a CR.") + ((CR LF) (* ; + "Ch is a . Force an end to the line.") + (freplace (LINEDESCRIPTOR CHARLIM) of LINE with CHNO) + (COND + ((AND NEWASCENT (ZEROP ASCENT) + (ZEROP DESCENT)) (* ; + "The ascent has changed; catch it") + (SETQ ASCENT NEWASCENT) + (SETQ DESCENT NEWDESCENT))) + (SETQ FORCEEND T) + (\RPLPTR CHLIST 0 (CHARCODE CR)) + (\RPLPTR WLIST 0 (SETQ DX 0)) + (COND + (GATHERBLANK (SETQ TXB1 TX) + (SETQ GATHERBLANK NIL))) + (SETQ T1SPACE T) + (freplace (LINEDESCRIPTOR CR\END) of LINE with T) + (SETQ TX (IPLUS TX DX)) + (replace (LINEDESCRIPTOR LSTLN) of LINE + with (fetch (PIECE PPARALAST) of (fetch PIECE + of TEXTSTREAM))) + (SETQ PREVDHYPH NIL) + (SETQ PREVHYPH NIL) (* ; + "We're now past needing any hyphens for line breaking, so forget the last hyphen spot.") + (RETURN)) + (^L (* ; + "Ch is a Force an end to the line. Immediately--just like a CR.") (SETQ CTRL\L\SEEN T) (freplace (LINEDESCRIPTOR CHARLIM) of LINE with CHNO) (SETQ FORCEEND T) @@ -600,18 +646,18 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (SETQ TX (IPLUS TX DX)) (replace (LINEDESCRIPTOR LSTLN) of LINE with T) (SETQ PREVDHYPH NIL) - (SETQ PREVHYPH NIL) (* ; - "We're now past needing any hyphens for line breaking, so forget the last hyphen spot.") + (SETQ PREVHYPH NIL) (* ; + "We're now past needing any hyphens for line breaking, so forget the last hyphen spot.") (RETURN)) (TAB - (* ;; "Try to be reasonable with tabs. This will create trouble when doing fast-case insert/delete, but Pah! for now.") + (* ;; "Try to be reasonable with tabs. This will create trouble when doing fast-case insert/delete, but Pah! for now.") - (\RPLPTR CHLIST 0 CH) (* ; "TABs are 0 wide to start with.") + (\RPLPTR CHLIST 0 CH) (* ; "TABs are 0 wide to start with.") (replace (THISLINE TLFIRSTSPACE) of THISLINE with TLEN) (COND (NEWASCENT - (* ;; "The ascent/descent changed. Update the real values, now that we have a character to actually take effect on it") + (* ;; "The ascent/descent changed. Update the real values, now that we have a character to actually take effect on it") (SETQ ASCENT (IMAX ASCENT NEWASCENT)) (SETQ DESCENT (IMAX DESCENT NEWDESCENT)) @@ -623,15 +669,15 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 0 TABPENDING (LRSH (FIXR (DSPSCALE NIL IMAGESTREAM )) 1) - NIL)) (* ; - "Figure out which tab stop to use, and what we need to do to get there.") + NIL)) (* ; + "Figure out which tab stop to use, and what we need to do to get there.") [COND - ((FIXP TABPENDING) (* ; - "If it returns a number, that is the new TX, adjusted for any prior tabs") + ((FIXP TABPENDING) (* ; + "If it returns a number, that is the new TX, adjusted for any prior tabs") (SETQ TX TABPENDING) (SETQ TABPENDING NIL)) - (TABPENDING (* ; - "Otherwise, look in the PENDINGTAB for the new TX") + (TABPENDING (* ; + "Otherwise, look in the PENDINGTAB for the new TX") (SETQ TX (fetch PTNEWTX of TABPENDING] (COND (GATHERBLANK (SETQ TXB1 TX) @@ -639,18 +685,18 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (SETQ CH#B CHNO) (SETQ DX (\GETBASEPTR WLIST 0)) (\TEDIT.PURGE.SPACES (fetch CHARS of THISLINE) - PREVSP) (* ; - "All the spaces before a tab don't take part in justification from here on.") - (SETQ %#BLANKS 0) (* ; - "So we can allocate extra space among the right number of blanks to justify things after the tab.") + PREVSP) (* ; + "All the spaces before a tab don't take part in justification from here on.") + (SETQ %#BLANKS 0) (* ; + "So we can allocate extra space among the right number of blanks to justify things after the tab.") (SETQ PREVSP 0) (SETQ PREVDHYPH NIL) - (SETQ PREVHYPH NIL) (* ; - "We're now past needing any hyphens for line breaking, so forget the last hyphen spot.") + (SETQ PREVHYPH NIL) (* ; + "We're now past needing any hyphens for line breaking, so forget the last hyphen spot.") (SETQ T1SPACE T) (SETQ TX (IPLUS TX DX)) - (SETQ TXB TX) (* ; - "Remember the world in case this is the 'space' before the line breaks") + (SETQ TXB TX) (* ; + "Remember the world in case this is the 'space' before the line breaks") (SETQ DXB DX) (SETQ LOOK#B LOOKNO) (SETQ ASCENTB ASCENT) @@ -660,35 +706,35 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, ((AND (EQ CH (CHARCODE "0,377")) (NOT (ffetch (TEXTOBJ TXTNONSCHARS) of TEXTOBJ))) - (* ;; - "Character-set change character. This suggests undetected NS characters.") + (* ;; + "Character-set change character. This suggests undetected NS characters.") (\TEDIT.NSCHAR.RUN CHNO TEXTOBJ TEXTSTREAM) - (* ; - "Leaves us ready to BIN again at the same place.") + (* ; + "Leaves us ready to BIN again at the same place.") - (* ;; "Back up the cache pointers and counters so that when we go to the top of the loop we're where we are now.") + (* ;; "Back up the cache pointers and counters so that when we go to the top of the loop we're where we are now.") (SETQ CHLIST (\ADDBASE CHLIST -2)) (SETQ WLIST (\ADDBASE WLIST -2)) (add CHNO -1) (add TLEN -1) (SETQ TEXTLEN (fetch (TEXTOBJ TEXTLEN) of TEXTOBJ)) - (* ; - "Because moving to NS characters changes the TEXTLEN for the shorter.") + (* ; + "Because moving to NS characters changes the TEXTLEN for the shorter.") ) (T - (* ;; "This character isn't special. Just space over for it.") + (* ;; "This character isn't special. Just space over for it.") (SETQ GATHERBLANK T) (COND ((IGREATERP (SETQ TX (IPLUS TX DX)) - WIDTH) (* ; - "We're past the right margin; stop formatting at the last blank.") + WIDTH) (* ; + "We're past the right margin; stop formatting at the last blank.") (SETQ FORCEEND T) (COND - (PREVDHYPH (* ; - "There's a hyphen we can break at. Go back there and break the line.") + (PREVDHYPH (* ; + "There's a hyphen we can break at. Go back there and break the line.") (freplace (LINEDESCRIPTOR CHARLIM) of LINE with CH#B) (\RPLPTR ORIGCHLIST (LLSH (SUB1 PREVDHYPH) @@ -703,8 +749,8 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (SETQ DESCENT DESCENTB) (SETQ LOOKNO LOOK#B) (SETQ INVISIBLERUNS INVISIBLERUNSB)) - (PREVHYPH (* ; - "There's a hyphen we can break at. Go back there and break the line.") + (PREVHYPH (* ; + "There's a hyphen we can break at. Go back there and break the line.") (freplace (LINEDESCRIPTOR CHARLIM) of LINE with CH#B) (SETQ TX TXB) @@ -713,8 +759,8 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (SETQ DESCENT DESCENTB) (SETQ LOOKNO LOOK#B) (SETQ INVISIBLERUNS INVISIBLERUNSB)) - (T1SPACE (* ; - "There's a breaking point on this line. Go back there and break the line.") + (T1SPACE (* ; + "There's a breaking point on this line. Go back there and break the line.") (freplace (LINEDESCRIPTOR CHARLIM) of LINE with CH#B) (SETQ TX TXB) @@ -727,24 +773,24 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (freplace (LINEDESCRIPTOR CHARLIM) of LINE with (IMAX CH#1 (SUB1 CHNO))) (SETQ TX (IDIFFERENCE TX DX)) - (* ; - "No spaces on this line; break it before this character.") + (* ; + "No spaces on this line; break it before this character.") - (* ;; "Check line break character.") + (* ;; "Check line break character.") (while (OR (MEMBER (\GETBASEPTR CHLIST -2) TEDIT.DONT.LAST.CHARS) (MEMBER CH TEDIT.DONT.BREAK.CHARS)) do - (* ;; - "This character ch doesn't appear at first of lines. or") + (* ;; + "This character ch doesn't appear at first of lines. or") - (* ;; - "Previous character doesn't appear at the end of lines.") + (* ;; + "Previous character doesn't appear at the end of lines.") - (* ;; - "So,move previous character to next line.") + (* ;; + "So,move previous character to next line.") (SETQ CHLIST (\ADDBASE CHLIST -2)) (SETQ WLIST (\ADDBASE WLIST -2)) @@ -754,24 +800,24 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (freplace (LINEDESCRIPTOR CHARLIM) of LINE with (IMAX (SUB1 CHNO) CH#1))) - (T (* ; - "Can't split BEFORE the first thing on the line!") + (T (* ; + "Can't split BEFORE the first thing on the line!") (freplace (LINEDESCRIPTOR CHARLIM) of LINE with CHNO) (\RPLPTR CHLIST 0 CH) (\RPLPTR WLIST 0 DX))) (RETURN)) - (T (* ; "Not past the rightmargin yet...") + (T (* ; "Not past the rightmargin yet...") (COND ((AND NEWASCENT (SMALLP CH)) - (* ;; "The ascent/descent changed. Update the real values, now that we have a character to actually take effect on it") + (* ;; "The ascent/descent changed. Update the real values, now that we have a character to actually take effect on it") (SETQ ASCENT (IMAX ASCENT NEWASCENT)) (SETQ DESCENT (IMAX DESCENT NEWDESCENT)) (SETQ NEWASCENT NIL))) (\RPLPTR CHLIST 0 CH) - (\RPLPTR WLIST 0 DX)(* ; "Check for decimal tabs") + (\RPLPTR WLIST 0 DX)(* ; "Check for decimal tabs") (SELCHARQ CH (%. (COND ((AND TABPENDING (NOT (FIXP TABPENDING)) @@ -780,8 +826,8 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (add (fetch (PENDINGTAB PTTABX) of TABPENDING) DX) - (* ; - "Adjust the pending tab so that the LEFT side of the decimal point goes at the tab stop.") + (* ; + "Adjust the pending tab so that the LEFT side of the decimal point goes at the tab stop.") (SETQ TABPENDING (\TEDIT.FORMATTABS TEXTOBJ (fetch (FMTSPEC TABSPEC) @@ -794,43 +840,43 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (LRSH (FIXR (DSPSCALE NIL IMAGESTREAM)) 1) T)) - (* ; - "Figure out which tab stop to use, and what we need to do to get there.") + (* ; + "Figure out which tab stop to use, and what we need to do to get there.") [COND ((FIXP TABPENDING) - (* ; - "If it returns a number, that is the new TX, adjusted for any prior tabs") + (* ; + "If it returns a number, that is the new TX, adjusted for any prior tabs") (SETQ TX TABPENDING) (SETQ TABPENDING NIL)) (TABPENDING - (* ; - "Otherwise, look in the PENDINGTAB for the new TX") + (* ; + "Otherwise, look in the PENDINGTAB for the new TX") (SETQ TX (fetch PTNEWTX of TABPENDING] (COND (GATHERBLANK (SETQ TXB1 TX) (SETQ GATHERBLANK NIL))) (SETQ CH#B CHNO) - (* ; "SETQ DX (\GETBASE WLIST 0)") + (* ; "SETQ DX (\GETBASE WLIST 0)") (\TEDIT.PURGE.SPACES (fetch CHARS of THISLINE) PREVSP) - (* ; - "All the spaces before a tab don't take part in justification from here on.") + (* ; + "All the spaces before a tab don't take part in justification from here on.") (SETQ %#BLANKS 0) - (* ; - "So we can allocate extra space among the right number of blanks to justify things after the tab.") + (* ; + "So we can allocate extra space among the right number of blanks to justify things after the tab.") (SETQ PREVSP 0) (SETQ T1SPACE T) (SETQ TXB TX) - (* ; - "Remember the world in case this is the 'space' before the line breaks") + (* ; + "Remember the world in case this is the 'space' before the line breaks") (SETQ DXB DX) (SETQ LOOK#B LOOKNO) (SETQ ASCENTB ASCENT) (SETQ DESCENTB DESCENT) (SETQ INVISIBLERUNSB INVISIBLERUNS)))) - ((- "357,045") (* ; "Hyphen, M-dash") + ((- "357,045") (* ; "Hyphen, M-dash") (SETQ PREVHYPH (ADD1 TLEN)) (SETQ PREVDHYPH NIL) (SETQ TXB1 (SETQ TXB TX)) @@ -840,10 +886,10 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (SETQ ASCENTB ASCENT) (SETQ DESCENTB DESCENT) (SETQ INVISIBLERUNSB INVISIBLERUNS)) - ("357,042" (* ; "non-breaking hyphen") + ("357,042" (* ; "non-breaking hyphen") (\RPLPTR CHLIST 0 (CHARCODE "-"))) - ("357,043" (* ; "Discretionary hyphen") - (* ; "And isn't actually displayed.") + ("357,043" (* ; "Discretionary hyphen") + (* ; "And isn't actually displayed.") (SETQ PREVDHYPH (ADD1 TLEN)) (SETQ PREVHYPH NIL) (SETQ LOOK#B LOOKNO) @@ -851,8 +897,8 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (SETQ ASCENTB ASCENT) (SETQ DESCENTB DESCENT) (\RPLPTR WLIST 0 0) - (* ; - "Unless we use it, the prevhyph is 0 wide.") + (* ; + "Unless we use it, the prevhyph is 0 wide.") (\RPLPTR CHLIST 0 NIL) (SETQ TX (IDIFFERENCE TX DX)) (SETQ DX (\FGETCHARWIDTH FONT (CHARCODE @@ -860,31 +906,31 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (SETQ TXB1 (SETQ TXB (IPLUS TX DX))) (SETQ DXB DX) (SETQ INVISIBLERUNSB INVISIBLERUNS)) - ("357,041" (* ; "non-breaking space.") + ("357,041" (* ; "non-breaking space.") (\RPLPTR CHLIST 0 (CHARCODE SPACE))) (COND ((AND (SMALLP CH) (IGEQ CH 192) (ILEQ CH 207)) - (* ; "This is an NS accent character. Space it 0.0 -- SO back TX down by the width of the accent, so it doesn't add to the line width.") + (* ; "This is an NS accent character. Space it 0.0 -- SO back TX down by the width of the accent, so it doesn't add to the line width.") (SETQ TX (- TX DX] - (SETQ CHLIST (\ADDBASE CHLIST 2)) (* ; - "Move the pointers forward for the next character.") + (SETQ CHLIST (\ADDBASE CHLIST 2)) (* ; + "Move the pointers forward for the next character.") (SETQ WLIST (\ADDBASE WLIST 2))) -(* ;;; "Done processing characters; the line is now filled.") +(* ;;; "Done processing characters; the line is now filled.") (COND ((AND (IEQP TLEN 255) - (ILESSP CHNO TEXTLEN)) (* ; - "This line is too long for us to format??") + (ILESSP CHNO TEXTLEN)) (* ; + "This line is too long for us to format??") (TEDIT.PROMPTPRINT TEXTOBJ "Line too long to format." T))) (COND - (TABPENDING (* ; - "There is a TAB outstanding. Go handle it.") + (TABPENDING (* ; + "There is a TAB outstanding. Go handle it.") (add (fetch (PENDINGTAB PTTABX) of TABPENDING) - DX) (* ; - "Modify the pending tab so that the LEFT side of the CR is at the tab stop.") + DX) (* ; + "Modify the pending tab so that the LEFT side of the CR is at the tab stop.") (SETQ TABPENDING (\TEDIT.FORMATTABS TEXTOBJ (fetch (FMTSPEC TABSPEC) of FMTSPEC) THISLINE CHLIST WLIST TX @@ -897,8 +943,8 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (\TEDIT.PURGE.SPACES (fetch CHARS of THISLINE) PREVSP) (SETQ PREVSP 0] - (T (* ; - "No text to go in this line; set Ascent/Descent to the default font from the window.") + (T (* ; + "No text to go in this line; set Ascent/Descent to the default font from the window.") (SETQ FMTSPEC (\TEDIT.HCPYFMTSPEC (fetch (TEXTOBJ FMTSPEC) of TEXTOBJ))) (\EDITSETA LOOKS 0 CLOOKS) [SETQ 1STLN (AND (fetch (STREAM F5) of TEXTSTREAM) @@ -938,8 +984,8 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, of TEXTOBJ)) ) DEFAULTFONT) - 'HEIGHT] (* ; - "Line's height (or 12 for an empty line)") + 'HEIGHT] (* ; + "Line's height (or 12 for an empty line)") (replace (LINEDESCRIPTOR ASCENT) of LINE with ASCENT) (replace (LINEDESCRIPTOR DESCENT) of LINE with DESCENT) (freplace (LINEDESCRIPTOR CHARTOP) of LINE with CHNO) @@ -947,8 +993,8 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (FORCEEND NIL) (T (SETQ CHNO (SUB1 CHNO)) (SETQ TLEN (SUB1 TLEN)) - (SETQ TXB1 TX))) (* ; - "If we ran off the end of the text, then keep true space left on the line.") + (SETQ TXB1 TX))) (* ; + "If we ran off the end of the text, then keep true space left on the line.") (freplace (LINEDESCRIPTOR LXLIM) of LINE with TX) (freplace DESC of THISLINE with LINE) [freplace (THISLINE LEN) of THISLINE @@ -1516,17 +1562,24 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, PFILE)]) ) -(LISTPUT (ASSOC (QUOTE CONVERSION) (ASSOC (QUOTE INTERPRESS) PRINTFILETYPES)) (QUOTE TEDIT) (FUNCTION \TEDIT.HARDCOPY)) +(LISTPUT (ASSOC 'CONVERSION (ASSOC 'INTERPRESS PRINTFILETYPES)) + 'TEDIT + (FUNCTION \TEDIT.HARDCOPY)) -(LET ((PRESSVALUES (ASSOC (QUOTE CONVERSION) (ASSOC (QUOTE PRESS) PRINTFILETYPES)))) (COND (PRESSVALUES (* ; "Only install PRESS printing if PRESS is loaded.") (LISTPUT PRESSVALUES (QUOTE TEDIT) (FUNCTION \TEDIT.PRESS.HARDCOPY))))) +[LET [(PRESSVALUES (ASSOC 'CONVERSION (ASSOC 'PRESS PRINTFILETYPES] + (COND + (PRESSVALUES (* ; + "Only install PRESS printing if PRESS is loaded.") + (LISTPUT PRESSVALUES 'TEDIT (FUNCTION \TEDIT.PRESS.HARDCOPY] (* ;; "vars for Japanese Line Break") -(RPAQQ TEDIT.DONT.BREAK.CHARS (8482 8483 8491 8492 8508 8525 8539 8537 8535 9249 9251 9253 9255 9257 9283 9315 9317 9319 9326 9505 9507 9509 9511 9513 9539 9571 9573 9575 9582) -) +(RPAQQ TEDIT.DONT.BREAK.CHARS (8482 8483 8491 8492 8508 8525 8539 8537 8535 9249 9251 9253 9255 + 9257 9283 9315 9317 9319 9326 9505 9507 9509 9511 9513 9539 + 9571 9573 9575 9582)) (RPAQQ TEDIT.DONT.LAST.CHARS (8524 8538 8536 8534)) (DECLARE%: DOEVAL@COMPILE DONTCOPY @@ -1557,13 +1610,13 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, (CLOSEF DOC]) ) (PUTPROPS TEDITHCPY COPYRIGHT ("Venue & Xerox Corporation" 1983 1984 1985 1986 1987 1988 1989 1990 -1991 1992 1993 1994)) +1991 1992 1993 1994 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (2353 99050 (TEDIT.HARDCOPY 2363 . 3614) (TEDIT.HCPYFILE 3616 . 5690) ( -\TEDIT.HARDCOPY.DISPLAYLINE 5692 . 19837) (\TEDIT.HARDCOPY.FORMATLINE 19839 . 67140) ( -\DOFORMATTING.HARDCOPY 67142 . 80435) (\TEDIT.HARDCOPY.MODIFYLOOKS 80437 . 82844) ( -\TEDIT.HCPYLOOKS.UPDATE 82846 . 93454) (\TEDIT.HCPYFMTSPEC 93456 . 98476) (\TEDIT.INTEGER.IMAGEBOX -98478 . 99048)) (99139 100223 (\TEDIT.SCALE 99149 . 99443) (\TEDIT.SCALEREGION 99445 . 100221)) ( -100466 102963 (TEDIT.HARDCOPYFN 100476 . 101327) (\TEDIT.HARDCOPY 101329 . 102238) ( -\TEDIT.PRESS.HARDCOPY 102240 . 102961)) (103772 104675 (TEDIT-BOOK 103782 . 104673))))) + (FILEMAP (NIL (3088 99806 (TEDIT.HARDCOPY 3098 . 4349) (TEDIT.HCPYFILE 4351 . 6425) ( +\TEDIT.HARDCOPY.DISPLAYLINE 6427 . 20572) (\TEDIT.HARDCOPY.FORMATLINE 20574 . 67896) ( +\DOFORMATTING.HARDCOPY 67898 . 81191) (\TEDIT.HARDCOPY.MODIFYLOOKS 81193 . 83600) ( +\TEDIT.HCPYLOOKS.UPDATE 83602 . 94210) (\TEDIT.HCPYFMTSPEC 94212 . 99232) (\TEDIT.INTEGER.IMAGEBOX +99234 . 99804)) (99895 100979 (\TEDIT.SCALE 99905 . 100199) (\TEDIT.SCALEREGION 100201 . 100977)) ( +101222 103719 (TEDIT.HARDCOPYFN 101232 . 102083) (\TEDIT.HARDCOPY 102085 . 102994) ( +\TEDIT.PRESS.HARDCOPY 102996 . 103717)) (104701 105604 (TEDIT-BOOK 104711 . 105602))))) STOP diff --git a/library/TEDITHCPY.LCOM b/library/TEDITHCPY.LCOM index c4501f954..e19a42698 100644 Binary files a/library/TEDITHCPY.LCOM and b/library/TEDITHCPY.LCOM differ diff --git a/library/TEXTOFD b/library/TEXTOFD index 4dfde1aab..525f9d076 100644 --- a/library/TEXTOFD +++ b/library/TEXTOFD @@ -1,13 +1,15 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "11-Feb-2001 12:06:42" {DSK}medley3.5>library>TEXTOFD.;8 176221 +(FILECREATED " 6-May-2021 10:18:06"  +{DSK}kaplan>Local>medley3.5>git-medley2>library>TEXTOFD.;4 176139 - changes to%: (FNS \TEXTRIGHTMARGIN) + changes to%: (FNS \TEXTINIT) - previous date%: " 4-Jan-2001 18:14:27" {DSK}medley3.5>library>TEXTOFD.;7) + previous date%: "11-Feb-2001 12:06:42" +{DSK}kaplan>Local>medley3.5>git-medley2>library>TEXTOFD.;2) (* ; " -Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1993, 1994, 1995, 1999, 2000, 2001 by John Sybalsky & Xerox Corporation. All rights reserved. +Copyright (c) 1983-1991, 1993-1995, 1999-2001, 2021 by John Sybalsky & Xerox Corporation. ") (PRETTYCOMPRINT TEXTOFDCOMS) @@ -674,29 +676,29 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1993, 1994, (RETURN PC]) (\TEXTINIT - [LAMBDA NIL (* ; "Edited 31-May-91 14:18 by jds") - (* ; - "Create the FDEV and STREAM prototypes for TEXT streams.") + [LAMBDA NIL (* ; "Edited 6-May-2021 10:17 by rmk:") + (* ; + "Create the FDEV and STREAM prototypes for TEXT streams.") - (* ;; "TEXT streams make use of the following STREAM fields:") + (* ;; "TEXT streams make use of the following STREAM fields:") - (* ;; "(DEVICE (* FDEV of this guy -- The TEXT device)") + (* ;; "(DEVICE (* FDEV of this guy -- The TEXT device)") - (* ;; "F1 (* The STREAM for the PFILE of the current piece (or NIL))") + (* ;; "F1 (* The STREAM for the PFILE of the current piece (or NIL))") - (* ;; "F2 (* # chars left in piece at end of underlying file's page)") + (* ;; "F2 (* # chars left in piece at end of underlying file's page)") - (* ;; "F3 (* The TEXTOBJ for this stream)") + (* ;; "F3 (* The TEXTOBJ for this stream)") - (* ;; "F4") + (* ;; "F4") - (* ;; "F5 (* The PIECE we're currently inside)") + (* ;; "F5 (* The PIECE we're currently inside)") - (* ;; "(FW6 WORD) (* CPAGE for the start of the piece, for BACKFILEPTR)") + (* ;; "(FW6 WORD) (* CPAGE for the start of the piece, for BACKFILEPTR)") - (* ;; "(FW7 WORD) (* COFFSET for the start of the piece, for BACKFILEPTR)") + (* ;; "(FW7 WORD) (* COFFSET for the start of the piece, for BACKFILEPTR)") - (* ;; "(FW8 WORD)") + (* ;; "(FW8 WORD)") (SETQ \TEXTIMAGEOPS (create IMAGEOPS IMAGETYPE _ 'TEXT @@ -742,8 +744,7 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1993, 1994, FDBOUTABLE _ NIL FDEXTENDABLE _ NIL TRUNCATEFILE _ (FUNCTION NILL) - WRITEPAGES _ (FUNCTION NILL) - READCHARCODE _ (FUNCTION BIN))) + WRITEPAGES _ (FUNCTION NILL))) (SETQ \TEXTOFD (create STREAM BINABLE _ T @@ -761,9 +762,9 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1993, 1994, MAXBUFFERS _ 10 IMAGEOPS _ \TEXTIMAGEOPS IMAGEDATA _ (create TEXTIMAGEDATA) - OUTCHARFN _ (FUNCTION \TEDITOUTCHARFN))) (* ; "The prototypical Text stream") + OUTCHARFN _ (FUNCTION \TEDITOUTCHARFN))) (* ; "The prototypical Text stream") - (* ;; "Set up so that FILE NOT OPENs on TEdit streams are caught and fixed.") + (* ;; "Set up so that FILE NOT OPENs on TEdit streams are caught and fixed.") (CL:SETF (CONDITION-HANDLER 'XCL:STREAM-NOT-OPEN) (FUNCTION (LAMBDA (CONDITION) @@ -771,8 +772,8 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1993, 1994, (COND [(AND (BOUNDP 'ERRORPOS) (TEXTSTREAMP STREAM)) - (* ; - "This happened in the error handler, and it happened to a TEdit stream, so try the fix:") + (* ; + "This happened in the error handler, and it happened to a TEdit stream, so try the fix:") (LET ((XCL::RESULT (REOPENTEXTSTREAM STREAM))) (CL:WHEN XCL::RESULT (ENVAPPLY (STKNAME ERRORPOS) @@ -780,8 +781,8 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1993, 1994, (STKNTH -1 ERRORPOS ERRORPOS) ERRORPOS T T))] (*TEDIT-OLD-STREAM-ERROR-HANDLER* - (* ; - "Some other kind of stream, so punt to the old handler (if there is one):") + (* ; + "Some other kind of stream, so punt to the old handler (if there is one):") (APPLY* *TEDIT-OLD-STREAM-ERROR-HANDLER* CONDITION]) (\TEXTMARK @@ -2654,27 +2655,27 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1993, 1994, (ADDTOVAR LAMA TEXTPROP) ) (PUTPROPS TEXTOFD COPYRIGHT ("John Sybalsky & Xerox Corporation" 1983 1984 1985 1986 1987 1988 1989 -1990 1991 1993 1994 1995 1999 2000 2001)) +1990 1991 1993 1994 1995 1999 2000 2001 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (3014 53058 (COPYTEXTSTREAM 3024 . 6146) (OPENTEXTSTREAM 6148 . 21025) (REOPENTEXTSTREAM - 21027 . 21449) (TEDIT.STREAMCHANGEDP 21451 . 21749) (TEXTSTREAMP 21751 . 22065) (TXTFILE 22067 . -22512) (\DELETECH 22514 . 33770) (\SETUPGETCH 33772 . 41051) (\TEDIT.REOPEN.STREAM 41053 . 42903) ( -\TEDIT.COPYTEXTSTREAM.PIECEMAPFN 42905 . 45343) (\TEXTINIT 45345 . 50951) (\TEXTMARK 50953 . 51701) ( -\TEXTTTYBOUT 51703 . 53056)) (53059 78491 (\INSERTCH 53069 . 76795) (\INSERTCR 76797 . 78489)) (78557 -98873 (\CHTOPC 78567 . 79756) (\CHTOPCNO 79758 . 81020) (\CLEARPCTB 81022 . 81818) ( -\CREATEPIECEORSTREAM 81820 . 84794) (\DELETEPIECE 84796 . 85709) (\FINDPIECE 85711 . 86077) ( -\INSERTPIECE 86079 . 89089) (\MAKEPCTB 89091 . 91006) (\SPLITPIECE 91008 . 97967) (\INSERT.FIRST.PIECE - 97969 . 98871)) (98925 123143 (\TEXTCLOSEF 98935 . 100162) (\TEXTCLOSEF-SUBTREE 100164 . 100870) ( -\TEXTDSPFONT 100872 . 101864) (\TEXTEOFP 101866 . 103225) (\TEXTGETEOFPTR 103227 . 103437) ( -\TEXTGETFILEPTR 103439 . 105502) (\TEXTOPENF 105504 . 106334) (\TEXTOPENF-SUBTREE 106336 . 107137) ( -\TEXTOUTCHARFN 107139 . 107487) (\TEXTBACKFILEPTR 107489 . 113390) (\TEXTBOUT 113392 . 116740) ( -\TEDITOUTCHARFN 116742 . 117988) (\TEXTSETEOF 117990 . 118499) (\TEXTSETFILEPTR 118501 . 119726) ( -\TEXTDSPXPOSITION 119728 . 120585) (\TEXTDSPYPOSITION 120587 . 121132) (\TEXTLEFTMARGIN 121134 . -121617) (\TEXTRIGHTMARGIN 121619 . 122555) (\TEXTDSPCHARWIDTH 122557 . 122795) (\TEXTDSPSTRINGWIDTH -122797 . 123037) (\TEXTDSPLINEFEED 123039 . 123141)) (123144 156888 (\TEXTBIN 123154 . 139940) ( -\TEDIT.TEXTBIN.STRINGSETUP 139942 . 145655) (\TEDIT.TEXTBIN.FILESETUP 145657 . 152043) ( -\TEDIT.TEXTBIN.NEW.PAGE 152045 . 156886)) (156889 170297 (\TEXTPEEKBIN 156899 . 166038) ( -\TEDIT.PEEKBIN.NEW.PAGE 166040 . 170295)) (170335 175553 (CGETTEXTPROP 170345 . 170821) (CTEXTPROP -170823 . 173167) (GETTEXTPROP 173169 . 173764) (PUTTEXTPROP 173766 . 175091) (TEXTPROP 175093 . 175551 + (FILEMAP (NIL (2982 52971 (COPYTEXTSTREAM 2992 . 6114) (OPENTEXTSTREAM 6116 . 20993) (REOPENTEXTSTREAM + 20995 . 21417) (TEDIT.STREAMCHANGEDP 21419 . 21717) (TEXTSTREAMP 21719 . 22033) (TXTFILE 22035 . +22480) (\DELETECH 22482 . 33738) (\SETUPGETCH 33740 . 41019) (\TEDIT.REOPEN.STREAM 41021 . 42871) ( +\TEDIT.COPYTEXTSTREAM.PIECEMAPFN 42873 . 45311) (\TEXTINIT 45313 . 50864) (\TEXTMARK 50866 . 51614) ( +\TEXTTTYBOUT 51616 . 52969)) (52972 78404 (\INSERTCH 52982 . 76708) (\INSERTCR 76710 . 78402)) (78470 +98786 (\CHTOPC 78480 . 79669) (\CHTOPCNO 79671 . 80933) (\CLEARPCTB 80935 . 81731) ( +\CREATEPIECEORSTREAM 81733 . 84707) (\DELETEPIECE 84709 . 85622) (\FINDPIECE 85624 . 85990) ( +\INSERTPIECE 85992 . 89002) (\MAKEPCTB 89004 . 90919) (\SPLITPIECE 90921 . 97880) (\INSERT.FIRST.PIECE + 97882 . 98784)) (98838 123056 (\TEXTCLOSEF 98848 . 100075) (\TEXTCLOSEF-SUBTREE 100077 . 100783) ( +\TEXTDSPFONT 100785 . 101777) (\TEXTEOFP 101779 . 103138) (\TEXTGETEOFPTR 103140 . 103350) ( +\TEXTGETFILEPTR 103352 . 105415) (\TEXTOPENF 105417 . 106247) (\TEXTOPENF-SUBTREE 106249 . 107050) ( +\TEXTOUTCHARFN 107052 . 107400) (\TEXTBACKFILEPTR 107402 . 113303) (\TEXTBOUT 113305 . 116653) ( +\TEDITOUTCHARFN 116655 . 117901) (\TEXTSETEOF 117903 . 118412) (\TEXTSETFILEPTR 118414 . 119639) ( +\TEXTDSPXPOSITION 119641 . 120498) (\TEXTDSPYPOSITION 120500 . 121045) (\TEXTLEFTMARGIN 121047 . +121530) (\TEXTRIGHTMARGIN 121532 . 122468) (\TEXTDSPCHARWIDTH 122470 . 122708) (\TEXTDSPSTRINGWIDTH +122710 . 122950) (\TEXTDSPLINEFEED 122952 . 123054)) (123057 156801 (\TEXTBIN 123067 . 139853) ( +\TEDIT.TEXTBIN.STRINGSETUP 139855 . 145568) (\TEDIT.TEXTBIN.FILESETUP 145570 . 151956) ( +\TEDIT.TEXTBIN.NEW.PAGE 151958 . 156799)) (156802 170210 (\TEXTPEEKBIN 156812 . 165951) ( +\TEDIT.PEEKBIN.NEW.PAGE 165953 . 170208)) (170248 175466 (CGETTEXTPROP 170258 . 170734) (CTEXTPROP +170736 . 173080) (GETTEXTPROP 173082 . 173677) (PUTTEXTPROP 173679 . 175004) (TEXTPROP 175006 . 175464 ))))) STOP diff --git a/library/TEXTOFD.LCOM b/library/TEXTOFD.LCOM index 9a502f7c5..a59793f0c 100644 Binary files a/library/TEXTOFD.LCOM and b/library/TEXTOFD.LCOM differ diff --git a/library/TFBRAVO b/library/TFBRAVO index 3996df5bf..4e3abb8f4 100644 --- a/library/TFBRAVO +++ b/library/TFBRAVO @@ -1,14 +1,15 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "19-Apr-2018 12:19:55" {DSK}kaplan>Local>medley3.5>lispcore>library>TFBRAVO.;2 74262 +(FILECREATED "13-Jun-2021 09:46:34"  +{DSK}kaplan>Local>medley3.5>git-medley>library>TFBRAVO.;3 74596 - changes to%: (VARS TFBRAVOCOMS) + changes to%: (FNS \TFBRAVO.WRITE.RUN \TFBRAVO.WRITE.RUNS \TFBRAVO.PARSE.PARA) - previous date%: "31-May-91 15:27:45" -{DSK}kaplan>Local>medley3.5>lispcore>library>TFBRAVO.;1) + previous date%: "19-Apr-2018 12:19:55" +{DSK}kaplan>Local>medley3.5>git-medley>library>TFBRAVO.;2) (* ; " -Copyright (c) 1984, 1985, 1986, 1987, 1990, 1991, 2018 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1984-1987, 1990-1991, 2018, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT TFBRAVOCOMS) @@ -427,24 +428,24 @@ Copyright (c) 1984, 1985, 1986, 1987, 1990, 1991, 2018 by Venue & Xerox Corporat (CADR (FASSOC FONT (FASSOC 'Font USER.CM.ALIST))))) (\TFBRAVO.WRITE.RUN - [LAMBDA (RUN IN PARALOOKS TEXTOBJ) (* ; "Edited 31-May-91 15:25 by jds") - (PROG (START END NAMEDTABNUMBER (LOOKS (fetch RUNLOOKS of RUN))) - (SETQ NAMEDTABNUMBER (fetch (CHARLOOKS CLUSERINFO) of (fetch RUNLOOKS + [LAMBDA (RUN IN PARALOOKS TEXTOBJ) (* ; "Edited 13-Jun-2021 09:44 by rmk:") + (PROG (START END NAMEDTABNUMBER (LOOKS (fetch (RUN RUNLOOKS) of RUN))) + (SETQ NAMEDTABNUMBER (fetch (CHARLOOKS CLUSERINFO) of (fetch (RUN RUNLOOKS) of RUN))) (COND - ((ILEQ (fetch RUNLENGTH of RUN) + ((ILEQ (fetch (RUN RUNLENGTH) of RUN) 0) (RETURN)) ([AND NAMEDTABNUMBER (EQUAL (PEEKC) (CHARACTER (CHARCODE ^I] - (* only treat the run like a tab if it has charcode 9, even if it has a tab - number. Color is overloaded onto tab numbers in BRAVO. - Jerks! Jerks!) + (* only treat the run like a tab if it has charcode 9, even if it has a tab + number. Color is overloaded onto tab numbers in BRAVO. + Jerks! Jerks!) (\TFBRAVO.ADD.NAMEDTAB TEXTOBJ NAMEDTABNUMBER PARALOOKS)) (T (SETQ END (IPLUS (SETQ START (GETFILEPTR IN)) - (fetch RUNLENGTH of RUN))) + (fetch (RUN RUNLENGTH) of RUN))) (TEDIT.RAW.INCLUDE TEXTOBJ IN START END) (TEDIT.LOOKS TEXTOBJ LOOKS]) @@ -792,15 +793,17 @@ Copyright (c) 1984, 1985, 1986, 1987, 1990, 1991, 2018 by Venue & Xerox Corporat LENGTH TEXTOBJ MARGIN.CANDIDATE]) (\TFBRAVO.WRITE.RUNS - (LAMBDA (PARA INFILE TEXTOBJ) (* gbn "18-Sep-84 16:29") + [LAMBDA (PARA INFILE TEXTOBJ) (* ; "Edited 13-Jun-2021 09:45 by rmk:") (DECLARE (USEDFREE UNDERLINE SUPERSCRIPT)) - (PROG ((RUNS (fetch RUNS of PARA)) - (PARALOOKS (fetch PARALOOKS of PARA)) + (PROG ((RUNS (fetch (PARA RUNS) of PARA)) + (PARALOOKS (fetch (PARA PARALOOKS) of PARA)) (LENGTH 0)) - (for RUN in old RUNS do (\TFBRAVO.WRITE.RUN RUN INFILE PARALOOKS TEXTOBJ) - (SETQ LENGTH (IPLUS (fetch RUNLENGTH of RUN) - LENGTH))) - (RETURN LENGTH)))) + (for RUN in old RUNS do (\TFBRAVO.WRITE.RUN RUN INFILE PARALOOKS + TEXTOBJ) + (SETQ LENGTH (IPLUS (fetch (RUN RUNLENGTH) + of RUN) + LENGTH))) + (RETURN LENGTH]) (\TFBRAVO.SPREAD.LOOKS (LAMBDA (RUN LOOKS) (* jds "22-Aug-84 14:53") @@ -841,40 +844,42 @@ Copyright (c) 1984, 1985, 1986, 1987, 1990, 1991, 2018 by Venue & Xerox Corporat LOOKS)) (\TFBRAVO.PARSE.PARA - (LAMBDA (OLDPLOOKS FILE) (* gbn "31-May-85 22:08") - - (* PLOOKS are the paragraph looks, and RUNi are the character runs in the form - returned by READCHARACTERLOOKS, except that the character count for the last - run has been filled in correctly. Leaves the input file pointer at the end of - the trailer, after the EOL.) + [LAMBDA (OLDPLOOKS FILE) (* ; "Edited 13-Jun-2021 09:46 by rmk:") + + (* PLOOKS are the paragraph looks, and RUNi are the character runs in the form + returned by READCHARACTERLOOKS, except that the character count for the last + run has been filled in correctly. Leaves the input file pointer at the end of + the trailer, after the EOL.) (PROG (LEN PLOOKS RUNS ORIGPTR) (SETQ ORIGPTR (GETFILEPTR FILE)) (SETQ LEN (FILEPOS (CHARACTER (CHARCODE ^Z)) FILE)) - (COND + [COND ((NOT LEN) (RETURN (create PARA PARALOOKS _ DefaultParagraphLooks - RUNS _ NIL)))) + RUNS _ NIL] (SETQ LEN (IDIFFERENCE LEN ORIGPTR)) - (BIN FILE) (* BIN past the ^z) + (BIN FILE) (* BIN past the ^z) (SETQ PLOOKS (\TFBRAVO.READ.PARALOOKS OLDPLOOKS FILE)) - (COND - ((NEQ (CAR (PROG1 PLOOKS (SETQ PLOOKS (CDR PLOOKS)))) + [COND + ((NEQ [CAR (PROG1 PLOOKS + (SETQ PLOOKS (CDR PLOOKS)))] '\) (RETURN (create PARA PARALOOKS _ PLOOKS RUNS _ (LIST (create RUN RUNLENGTH _ LEN RUNLOOKS _ (\TFBRAVO.FONT.FROM.CHARLOOKS - USER.CM.CHARLOOKS))))))) - CLP (while (fetch RUNLENGTH of (CAR (push RUNS (\TFBRAVO.READ.CHARLOOKS FILE)))) - do (SETQ LEN (IDIFFERENCE LEN (fetch RUNLENGTH of (CAR RUNS))))) - (replace RUNLENGTH of (CAR RUNS) with LEN) + USER.CM.CHARLOOKS] + CLP [while [fetch (RUN RUNLENGTH) of (CAR (push RUNS (\TFBRAVO.READ.CHARLOOKS + FILE] + do (SETQ LEN (IDIFFERENCE LEN (fetch (RUN RUNLENGTH) of (CAR RUNS] + (replace (RUN RUNLENGTH) of (CAR RUNS) with LEN) (RETURN (create PARA PARALOOKS _ PLOOKS - RUNS _ (DREVERSE RUNS)))))) + RUNS _ (DREVERSE RUNS]) (\TFBRAVO.INIT.PARALOOKS [LAMBDA (USER.CM.LOOKS) (* ; "Edited 31-May-91 15:26 by jds") @@ -1320,21 +1325,21 @@ Copyright (c) 1984, 1985, 1986, 1987, 1990, 1991, 2018 by Venue & Xerox Corporat (\NAMEDTAB.INIT) ) -(PUTPROPS TFBRAVO COPYRIGHT ("Venue & Xerox Corporation" 1984 1985 1986 1987 1990 1991 2018)) +(PUTPROPS TFBRAVO COPYRIGHT ("Venue & Xerox Corporation" 1984 1985 1986 1987 1990 1991 2018 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (4236 34112 (\TFBRAVO.FIND.LAST.TRAILER 4246 . 5739) (\TFBRAVO.HANDLE.HEADING 5741 . -7619) (\TFBRAVO.INIT.CHARLOOKS 7621 . 8437) (\TFBRAVO.INIT.PAGEFORMAT 8439 . 8917) ( -\TFBRAVO.INSTALL.PAGEFORMAT 8919 . 13556) (\TFBRAVO.PARSE.PROFILE.PARA 13558 . 22071) ( -\TFBRAVO.PARSE.PROFILE.VALUE 22073 . 22840) (\TFBRAVO.GET.FONTSIZE 22842 . 23158) ( -\TFBRAVO.GET.FONTSTYLE 23160 . 23488) (\TFBRAVO.WRITE.RUN 23490 . 24597) (\TFBRAVO.ASSERT 24599 . -24911) (\SHIFT.DOCUMENT 24913 . 28789) (\TEDIT.BRAVOFILE? 28791 . 30838) (\TEST.CHARACTER.LOOKS 30840 - . 32480) (\TEST.PARAGRAPH.LOOKS 32482 . 34110)) (34113 37660 (\TFBRAVO.COPY.NAMEDTAB 34123 . 34482) ( -\TFBRAVO.PUT.NAMEDTAB 34484 . 34780) (\TFBRAVO.GET.NAMEDTAB 34782 . 35059) (\TFBRAVO.ADD.NAMEDTAB -35061 . 36038) (\NAMEDTABNYET 36040 . 36205) (\NAMEDTABSIZE 36207 . 37092) (\NAMEDTAB.INIT 37094 . -37658)) (37661 73665 (\TFBRAVO.APPLY.PARALOOKS 37671 . 38702) (TEDITFROMBRAVO 38704 . 41106) ( -\TFBRAVO.WRITE.PARAGRAPH 41108 . 42130) (\TFBRAVO.WRITE.RUNS 42132 . 42713) (\TFBRAVO.SPREAD.LOOKS -42715 . 45687) (\TFBRAVO.PARSE.PARA 45689 . 47594) (\TFBRAVO.INIT.PARALOOKS 47596 . 50920) ( -\TFBRAVO.READ.PARALOOKS 50922 . 58098) (\TFBRAVO.READ.CHARLOOKS 58100 . 66233) (\TFBRAVO.READ.USER.CM -66235 . 69565) (\TFBRAVO.GETPARAMS 69567 . 70396) (\TFBRAVO.PARAMNAMEP 70398 . 70846) (\TFBRAVO.EOLS -70848 . 71261) (\TFBRAVO.LCASER 71263 . 71815) (\TFBRAVO.FONT.FROM.CHARLOOKS 71817 . 73663))))) + (FILEMAP (NIL (4259 34161 (\TFBRAVO.FIND.LAST.TRAILER 4269 . 5762) (\TFBRAVO.HANDLE.HEADING 5764 . +7642) (\TFBRAVO.INIT.CHARLOOKS 7644 . 8460) (\TFBRAVO.INIT.PAGEFORMAT 8462 . 8940) ( +\TFBRAVO.INSTALL.PAGEFORMAT 8942 . 13579) (\TFBRAVO.PARSE.PROFILE.PARA 13581 . 22094) ( +\TFBRAVO.PARSE.PROFILE.VALUE 22096 . 22863) (\TFBRAVO.GET.FONTSIZE 22865 . 23181) ( +\TFBRAVO.GET.FONTSTYLE 23183 . 23511) (\TFBRAVO.WRITE.RUN 23513 . 24646) (\TFBRAVO.ASSERT 24648 . +24960) (\SHIFT.DOCUMENT 24962 . 28838) (\TEDIT.BRAVOFILE? 28840 . 30887) (\TEST.CHARACTER.LOOKS 30889 + . 32529) (\TEST.PARAGRAPH.LOOKS 32531 . 34159)) (34162 37709 (\TFBRAVO.COPY.NAMEDTAB 34172 . 34531) ( +\TFBRAVO.PUT.NAMEDTAB 34533 . 34829) (\TFBRAVO.GET.NAMEDTAB 34831 . 35108) (\TFBRAVO.ADD.NAMEDTAB +35110 . 36087) (\NAMEDTABNYET 36089 . 36254) (\NAMEDTABSIZE 36256 . 37141) (\NAMEDTAB.INIT 37143 . +37707)) (37710 73994 (\TFBRAVO.APPLY.PARALOOKS 37720 . 38751) (TEDITFROMBRAVO 38753 . 41155) ( +\TFBRAVO.WRITE.PARAGRAPH 41157 . 42179) (\TFBRAVO.WRITE.RUNS 42181 . 42950) (\TFBRAVO.SPREAD.LOOKS +42952 . 45924) (\TFBRAVO.PARSE.PARA 45926 . 47923) (\TFBRAVO.INIT.PARALOOKS 47925 . 51249) ( +\TFBRAVO.READ.PARALOOKS 51251 . 58427) (\TFBRAVO.READ.CHARLOOKS 58429 . 66562) (\TFBRAVO.READ.USER.CM +66564 . 69894) (\TFBRAVO.GETPARAMS 69896 . 70725) (\TFBRAVO.PARAMNAMEP 70727 . 71175) (\TFBRAVO.EOLS +71177 . 71590) (\TFBRAVO.LCASER 71592 . 72144) (\TFBRAVO.FONT.FROM.CHARLOOKS 72146 . 73992))))) STOP diff --git a/library/TFBRAVO.LCOM b/library/TFBRAVO.LCOM index 37d1a6efb..1bea3747c 100644 Binary files a/library/TFBRAVO.LCOM and b/library/TFBRAVO.LCOM differ diff --git a/library/UNICODE b/library/UNICODE index 90e288b09..d29c052e2 100644 --- a/library/UNICODE +++ b/library/UNICODE @@ -1,11 +1,11 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED " 1-Feb-2021 18:00:30"  -{DSK}kaplan>Local>medley3.5>git-medley>library>UNICODE.;169 68022 +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS) +(FILECREATED " 3-Jul-2021 13:37:33"  +{DSK}kaplan>Local>medley3.5>git-medley>library>UNICODE.;175 66483 - changes to%: (FNS UTF8.INCCODEFN UTF8.OUTCHARFN) + changes to%: (FNS READ-UNICODE-MAPPING MAKE-UNICODE-FORMATS) - previous date%: "29-Nov-2020 10:50:18" -{DSK}kaplan>Local>medley3.5>git-medley>library>UNICODE.;167) + previous date%: " 3-Jul-2021 11:41:05" +{DSK}kaplan>Local>medley3.5>git-medley>library>UNICODE.;173) (PRETTYCOMPRINT UNICODECOMS) @@ -19,7 +19,7 @@ (INITVARS (EXTERNALEOL 'LF)) (FNS MAKE-UNICODE-FORMATS) (P (MAKE-UNICODE-FORMATS EXTERNALEOL)) - (ADDVARS (*DEFAULT-EXTERNAL-FORMATS* (UNIX :UTF8))) + (ADDVARS (*DEFAULT-EXTERNALFORMATS* (UNIX :UTF8))) (FNS UNICODE.UNMAPPED) (FNS XCCS-UTF8-AFTER-OPEN) (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS UNICODE.TRANSLATE)) @@ -47,7 +47,7 @@ (FNS MAKE-UNICODE-TRANSLATION-TABLES) [INITVARS (DEFAULT-XCCS-CHARSETS '(LATIN SYMBOLS1 SYMBOLS2 EXTENDED-LATIN FORMS - SYMBOLS3 SYMBOLS4 ACCENTED-LATIN] + SYMBOLS3 SYMBOLS4 ACCENTED-LATIN GREEK] [DECLARE%: DONTEVAL@LOAD DOCOPY (P (MAKE-UNICODE-TRANSLATION-TABLES ( READ-UNICODE-MAPPING @@ -58,13 +58,10 @@ (GLOBALVARS *XCCSTOUNICODE* *UNICODETOXCCS*)) (FNS HEXSTRING UTF8HEXSTRING NUTF8CODEBYTES NUTF8STRINGBYTES XTOUSTRING XCCSSTRING) (FNS SHOWCHARS) - (DECLARE%: EVAL@COMPILE DONTCOPY - - (* ;; "This is taken from FILEIO") - - (CONSTANTS (LF.EOLC 1) - (CR.EOLC 0) - (CRLF.EOLC 2)) + (DECLARE%: EVAL@COMPILE DONTCOPY (P (OR (GETP 'EXPORTS.ALL 'FILE) + (PRINT + "NOTE: UNICODE requires EXPORTS.ALL for compilation" + T))) (* ;; "These control the layout of the translation tables. Since many of the upper panels are sparse, doing it per-panel (128) seems more space-efficient, and residual alists can be shorter") @@ -72,9 +69,7 @@ (MAX-ALIST-LENGTH 10) (N-TRANSLATION-SEGMENTS (IQUOTIENT 65536 TRANSLATION-SEGMENT-SIZE)) (TRANSLATION-SHIFT (INTEGERLENGTH (SUB1 TRANSLATION-SEGMENT-SIZE))) - (TRANSLATION-MASK (SUB1 TRANSLATION-SEGMENT-SIZE))) - (P (EVAL (SYSRECLOOK1 'EXTERNALFORMAT)) - (EVAL (SYSRECLOOK1 'STREAM]) + (TRANSLATION-MASK (SUB1 TRANSLATION-SEGMENT-SIZE]) @@ -132,201 +127,11 @@ (LOADBYTE C 0 6))) ELSE (ERROR "CHARCODE too big for UTF8" C]) -(UTF8.INCCODEFN - [LAMBDA (STREAM COUNTP RAW) (* ; "Edited 1-Feb-2021 17:59 by rmk:") - (* ; "Edited 6-Aug-2020 17:13 by rmk:") - - (* ;; "Do not do UNICODE to XCSS translation if RAW.") - - (* ;; "Test for smallp because the stream's End-of-file operation may suppress the error") - - (LET (BYTE1 BYTE2 BYTE3 BYTE4 CODE (COUNT 1)) - (SETQ BYTE1 (\BIN STREAM)) - - (* ;; "Distinguish on header bytes (modulo peculiar EOF behavior--the caller will get whatever ended up in BYTE1") - - (CL:WHEN (SMALLP BYTE1) - [SETQ CODE (IF (ILESSP BYTE1 128) - THEN - - (* ;; - "Test first: Ascii is the common case. EOL requires its own translation") - - (SELCHARQ BYTE1 - (CR (SELECTC (FETCH (STREAM EOLCONVENTION) OF STREAM) - (CR.EOLC (* ; "Also eq BYTE1") - (CHARCODE EOL)) - (CRLF.EOLC (IF (EQ (CHARCODE LF) - (\PEEKBIN STREAM T)) - THEN (\BIN STREAM) - (CL:WHEN COUNTP (SETQ COUNT 2)) - (CHARCODE EOL) - ELSE BYTE1)) - BYTE1)) - (LF (CL:IF (EQ LF.EOLC (FETCH (STREAM EOLCONVENTION) - OF STREAM)) - (CHARCODE EOL) - BYTE1)) - BYTE1) - ELSEIF (IGEQ BYTE1 (LLSH 15 4)) - THEN (* ; "4 bytes") - (SETQ BYTE2 (\BIN STREAM)) - (CL:WHEN (OR (NOT (SMALLP BYTE2)) - (ILESSP BYTE2 128)) - (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) - (SETQ BYTE3 (\BIN STREAM)) - (CL:WHEN (OR (NOT (SMALLP BYTE3)) - (ILESSP BYTE3 128)) - (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3))) - (SETQ BYTE4 (\BIN STREAM)) - (CL:WHEN (OR (NOT (SMALLP BYTE4)) - (ILESSP BYTE4 128)) - (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3 BYTE4))) - (SETQ COUNT 4) - (LOGOR (LLSH (LOADBYTE BYTE1 0 3) - 18) - (LLSH (LOADBYTE BYTE2 0 6) - 12) - (LLSH (LOADBYTE BYTE3 0 6) - 6) - (LOADBYTE BYTE4 0 6)) - ELSEIF (IGEQ BYTE1 (LLSH 7 5)) - THEN (* ; "3 bytes") - (SETQ BYTE2 (\BIN STREAM)) - (CL:WHEN (OR (NOT (SMALLP BYTE2)) - (ILESSP BYTE2 128)) - (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) - (SETQ BYTE3 (\BIN STREAM)) - (CL:WHEN (OR (NOT (SMALLP BYTE3)) - (ILESSP BYTE3 128)) - (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3))) - (SETQ COUNT 3) - (LOGOR (LLSH (LOADBYTE BYTE1 0 4) - 12) - (LLSH (LOADBYTE BYTE2 0 6) - 6) - (LOADBYTE BYTE3 0 6)) - ELSE (* ; "Must be 2 bytes") - (SETQ COUNT 2) - (SETQ BYTE2 (\BIN STREAM)) - (CL:WHEN (OR (NOT (SMALLP BYTE2)) - (ILESSP BYTE2 128)) - (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) - (LOGOR (LLSH (LOADBYTE BYTE1 0 5) - 6) - (LOADBYTE BYTE2 0 6]) - (CL:UNLESS (OR RAW (NOT (SMALLP CODE))) - (SETQ CODE (UNICODE.TRANSLATE CODE *UNICODETOXCCS*))) - (CL:IF COUNTP - (CL:VALUES CODE COUNT) - CODE)]) - -(UTF8.PEEKCCODEFN - [LAMBDA (STREAM NOERROR COUNTP RAW) (* ; "Edited 6-Aug-2020 17:12 by rmk:") - - (* ;; "Modeled this after \EUCPEEK on LLREAD. In the multi-byte (non-ASCII) case, backs the file pointer to the beginning by the proper number of \BACKFILEPTRs, and returns a count of 0. Returns NIL if NOERROR and either invalid UTF8 or end of file.") - - (* ;; "Could be that the caller takes care of backing up the file position if the number of binned-bytes is returned.") - - (* ;; "Do not do UNICODE to XCCS translation if RAW") - - (PROG (BYTE1 BYTE2 BYTE3 BYTE4 CODE) - (SETQ BYTE1 (\PEEKBIN STREAM NOERROR)) - - (* ;; "Distinguish on header bytex") - - (CL:UNLESS BYTE1 - (RETURN (AND COUNTP (CL:VALUES NIL 0)))) - [IF (ILESSP BYTE1 128) - THEN - - (* ;; - "Test first: Ascii is the common case. No need to back up, since we peeked.") - - (SETQ CODE BYTE1) - ELSEIF (IGEQ BYTE1 (LLSH 15 4)) - THEN (* ; "4 bytes") - (\BIN STREAM) - (CL:UNLESS (AND (SETQ BYTE2 (\PEEKBIN STREAM NOERROR)) - (IGEQ BYTE2 128)) - (\BACKFILEPTR STREAM) - (OR NOERROR (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) - (RETURN (IF COUNTP - THEN (CL:VALUES CODE 0) - ELSE CODE))) - (\BIN STREAM) - (CL:UNLESS (AND (SETQ BYTE3 (\PEEKBIN STREAM NOERROR)) - (IGEQ BYTE3 128)) - (\BACKFILEPTR STREAM) - (\BACKFILEPTR STREAM) - (OR NOERROR (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3))) - (RETURN (IF COUNTP - THEN (CL:VALUES CODE 0) - ELSE CODE))) - (\BIN STREAM) - (SETQ BYTE4 (\PEEKBIN STREAM NOERROR)) (* ; - "PEEK the last, no need to back it up") - (\BACKFILEPTR STREAM) - (\BACKFILEPTR STREAM) - (\BACKFILEPTR STREAM) - (IF (AND BYTE4 (IGEQ BYTE4 128)) - THEN (SETQ CODE (LOGOR (LLSH (LOADBYTE BYTE1 0 3) - 18) - (LLSH (LOADBYTE BYTE2 0 6) - 12) - (LLSH (LOADBYTE BYTE3 0 6) - 6) - (LOADBYTE BYTE4 0 6))) - ELSEIF NOERROR - ELSE (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3 BYTE4))) - ELSEIF (IGEQ BYTE1 (LLSH 7 5)) - THEN (* ; "3 bytes") - (\BIN STREAM) - (CL:UNLESS (AND (SETQ BYTE2 (\PEEKBIN STREAM NOERROR)) - (IGEQ BYTE2 128)) - (\BACKFILEPTR STREAM) - (OR NOERROR (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) - (RETURN (IF COUNTP - THEN (CL:VALUES CODE 0) - ELSE CODE))) - (\BIN STREAM) - (SETQ BYTE3 (\PEEKBIN STREAM NOERROR)) - (\BACKFILEPTR STREAM) - (\BACKFILEPTR STREAM) - (IF (AND BYTE3 (IGEQ BYTE3 128)) - THEN (SETQ CODE (LOGOR (LLSH (LOADBYTE BYTE1 0 4) - 12) - (LLSH (LOADBYTE BYTE2 0 6) - 6) - (LOADBYTE BYTE3 0 6))) - ELSEIF NOERROR - ELSE (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3))) - ELSE (* ; "Must be 2 bytes") - (\BIN STREAM) - (SETQ BYTE2 (\PEEKBIN STREAM NOERROR)) - (\BACKFILEPTR STREAM) - (IF (AND BYTE2 (IGEQ BYTE2 128)) - THEN (SETQ CODE (LOGOR (LLSH (LOADBYTE BYTE1 0 5) - 6) - (LOADBYTE BYTE2 0 6))) - ELSEIF NOERROR - ELSE (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2] - (CL:WHEN (AND CODE (NOT RAW)) - (SETQ CODE (UNICODE.TRANSLATE CODE *UNICODETOXCCS*))) - (RETURN (IF COUNTP - THEN (CL:VALUES CODE 0) - ELSE CODE]) - -(\UTF8.BACKCHARFN - [LAMBDA (STREAM COUNTP) (* ; "Edited 26-Jul-2020 10:41 by rmk:") - - (* ;; "\BACKFILEPTR is NIL at beginning of FILE, just return COUNT") - - (BIND (C _ 0) WHILE (CL:WHEN (\BACKFILEPTR STREAM) - (ADD C 1) - (EQ 2 (LRSH (\PEEKBIN STREAM) - 6))) REPEATUNTIL (EQ C 4) - FINALLY (RETURN (AND COUNTP C]) +(UTF8.INCCODEFN [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL RAW) (* ; "Edited 15-Jun-2021 13:35 by rmk:") (* ; "Edited 6-Aug-2020 17:13 by rmk:") (* ;; "Do not do UNICODE to XCSS translation if RAW.") (* ;; "Test for smallp because the stream's End-of-file operation may suppress the error") (LET (BYTE1 BYTE2 BYTE3 BYTE4 CODE (COUNT 1)) (SETQ BYTE1 (\BIN STREAM)) (* ;; "Distinguish on header bytes (modulo peculiar EOF behavior--the caller will get whatever ended up in BYTE1") (CL:WHEN (SMALLP BYTE1) [SETQ CODE (IF (ILESSP BYTE1 128) THEN (* ;;  "Test first: Ascii is the common case. EOL requires its own translation") (SELCHARQ BYTE1 (CR (SELECTC (FETCH (STREAM EOLCONVENTION) OF STREAM) (CR.EOLC (* ; "Also eq BYTE1") (CHARCODE EOL)) (CRLF.EOLC (IF (EQ (CHARCODE LF) (\PEEKBIN STREAM T)) THEN (\BIN STREAM) (CL:WHEN BYTECOUNTVAR (SETQ BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL 2))) (CHARCODE EOL) ELSE BYTE1)) BYTE1)) (LF (CL:IF (EQ LF.EOLC (FETCH (STREAM EOLCONVENTION) OF STREAM)) (CHARCODE EOL) BYTE1)) BYTE1) ELSEIF (IGEQ BYTE1 (LLSH 15 4)) THEN (* ; "4 bytes") (SETQ BYTE2 (\BIN STREAM)) (CL:WHEN (OR (NOT (SMALLP BYTE2)) (ILESSP BYTE2 128)) (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) (SETQ BYTE3 (\BIN STREAM)) (CL:WHEN (OR (NOT (SMALLP BYTE3)) (ILESSP BYTE3 128)) (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3))) (SETQ BYTE4 (\BIN STREAM)) (CL:WHEN (OR (NOT (SMALLP BYTE4)) (ILESSP BYTE4 128)) (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3 BYTE4))) (SETQ COUNT 4) (LOGOR (LLSH (LOADBYTE BYTE1 0 3) 18) (LLSH (LOADBYTE BYTE2 0 6) 12) (LLSH (LOADBYTE BYTE3 0 6) 6) (LOADBYTE BYTE4 0 6)) ELSEIF (IGEQ BYTE1 (LLSH 7 5)) THEN (* ; "3 bytes") (SETQ BYTE2 (\BIN STREAM)) (CL:WHEN (OR (NOT (SMALLP BYTE2)) (ILESSP BYTE2 128)) (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) (SETQ BYTE3 (\BIN STREAM)) (CL:WHEN (OR (NOT (SMALLP BYTE3)) (ILESSP BYTE3 128)) (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3))) (SETQ COUNT 3) (LOGOR (LLSH (LOADBYTE BYTE1 0 4) 12) (LLSH (LOADBYTE BYTE2 0 6) 6) (LOADBYTE BYTE3 0 6)) ELSE (* ; "Must be 2 bytes") (SETQ COUNT 2) (SETQ BYTE2 (\BIN STREAM)) (CL:WHEN (OR (NOT (SMALLP BYTE2)) (ILESSP BYTE2 128)) (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) (LOGOR (LLSH (LOADBYTE BYTE1 0 5) 6) (LOADBYTE BYTE2 0 6]) (CL:UNLESS (OR RAW (NOT (SMALLP CODE))) (SETQ CODE (UNICODE.TRANSLATE CODE *UNICODETOXCCS*))) (CL:WHEN BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL COUNT))) CODE]) + +(UTF8.PEEKCCODEFN [LAMBDA (STREAM NOERROR RAW) (* ; "Edited 14-Jun-2021 22:53 by rmk:") (* ;; "Modeled this after \EUCPEEK on LLREAD. In the multi-byte (non-ASCII) case, backs the file pointer to the beginning by the proper number of \BACKFILEPTRs, and returns a count of 0. Returns NIL if NOERROR and either invalid UTF8 or end of file.") (* ;; "Could be that the caller takes care of backing up the file position if the number of binned-bytes is returned.") (* ;; "Do not do UNICODE to XCCS translation if RAW") (PROG (BYTE1 BYTE2 BYTE3 BYTE4 CODE) (SETQ BYTE1 (\PEEKBIN STREAM NOERROR)) (* ;; "Distinguish on header bytex") (CL:UNLESS BYTE1 (RETURN NIL)) [IF (ILESSP BYTE1 128) THEN (* ;;  "Test first: Ascii is the common case. No need to back up, since we peeked.") (SETQ CODE BYTE1) ELSEIF (IGEQ BYTE1 (LLSH 15 4)) THEN (* ; "4 bytes") (\BIN STREAM) (CL:UNLESS (AND (SETQ BYTE2 (\PEEKBIN STREAM NOERROR)) (IGEQ BYTE2 128)) (\BACKFILEPTR STREAM) (OR NOERROR (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) (RETURN CODE)) (\BIN STREAM) (CL:UNLESS (AND (SETQ BYTE3 (\PEEKBIN STREAM NOERROR)) (IGEQ BYTE3 128)) (\BACKFILEPTR STREAM) (\BACKFILEPTR STREAM) (OR NOERROR (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3))) (RETURN CODE)) (\BIN STREAM) (SETQ BYTE4 (\PEEKBIN STREAM NOERROR)) (* ;  "PEEK the last, no need to back it up") (\BACKFILEPTR STREAM) (\BACKFILEPTR STREAM) (\BACKFILEPTR STREAM) (IF (AND BYTE4 (IGEQ BYTE4 128)) THEN (SETQ CODE (LOGOR (LLSH (LOADBYTE BYTE1 0 3) 18) (LLSH (LOADBYTE BYTE2 0 6) 12) (LLSH (LOADBYTE BYTE3 0 6) 6) (LOADBYTE BYTE4 0 6))) ELSEIF NOERROR ELSE (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3 BYTE4))) ELSEIF (IGEQ BYTE1 (LLSH 7 5)) THEN (* ; "3 bytes") (\BIN STREAM) (CL:UNLESS (AND (SETQ BYTE2 (\PEEKBIN STREAM NOERROR)) (IGEQ BYTE2 128)) (\BACKFILEPTR STREAM) (OR NOERROR (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) (RETURN CODE)) (\BIN STREAM) (SETQ BYTE3 (\PEEKBIN STREAM NOERROR)) (\BACKFILEPTR STREAM) (\BACKFILEPTR STREAM) (IF (AND BYTE3 (IGEQ BYTE3 128)) THEN (SETQ CODE (LOGOR (LLSH (LOADBYTE BYTE1 0 4) 12) (LLSH (LOADBYTE BYTE2 0 6) 6) (LOADBYTE BYTE3 0 6))) ELSEIF NOERROR ELSE (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3))) ELSE (* ; "Must be 2 bytes") (\BIN STREAM) (SETQ BYTE2 (\PEEKBIN STREAM NOERROR)) (\BACKFILEPTR STREAM) (IF (AND BYTE2 (IGEQ BYTE2 128)) THEN (SETQ CODE (LOGOR (LLSH (LOADBYTE BYTE1 0 5) 6) (LOADBYTE BYTE2 0 6))) ELSEIF NOERROR ELSE (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2] (CL:WHEN (AND CODE (NOT RAW)) (SETQ CODE (UNICODE.TRANSLATE CODE *UNICODETOXCCS*))) (RETURN CODE]) + +(\UTF8.BACKCHARFN [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 13:38 by rmk:") (* ;; "\BACKFILEPTR is NIL at beginning of FILE, just return COUNT") (BIND (C _ 0) WHILE (CL:WHEN (\BACKFILEPTR STREAM) (ADD C 1) (EQ 2 (LRSH (\PEEKBIN STREAM) 6))) REPEATUNTIL (EQ C 4) FINALLY (CL:WHEN BYTECOUNTVAR (SET BYTECOUNTVAR (IPLUS BYTECOUNTVAL C)))]) ) (DEFINEQ @@ -346,72 +151,18 @@ DO (\BOUT STREAM (LRSH C 8)) (\BOUT STREAM (LOGAND C 255]) -(UTF16BE.INCCODEFN - [LAMBDA (STREAM COUNTP RAW) (* ; "Edited 6-Aug-2020 17:48 by rmk:") +(UTF16BE.INCCODEFN [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL RAW) (* ; "Edited 15-Jun-2021 13:36 by rmk:") (* ;;  "Do not do UNICODE to XCCS translation if RAW. Test for SMALLPin case of funky EOF behavior") (LET (CODE BYTE1 BYTE2 COUNT) (IF [AND (SMALLP (SETQ BYTE1 (\BIN STREAM))) (SMALLP (SETQ BYTE2 (\BIN STREAM] THEN (SETQ COUNT 2) (SETQ CODE (LOGOR (LLSH (\BIN STREAM) 8) (\BIN STREAM))) (CL:UNLESS RAW (SETQ CODE (UNICODE.TRANSLATE CODE *UNICODETOXCCS*))) (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL COUNT))) CODE ELSE (ERROR "ODD NUMBER OF BYTES IN UTF16 FILE" STREAM]) - (* ;; - "Do not do UNICODE to XCCS translation if RAW. Test for SMALLPin case of funky EOF behavior") - - (LET (CODE BYTE1 BYTE2 COUNT) - (IF [AND (SMALLP (SETQ BYTE1 (\BIN STREAM))) - (SMALLP (SETQ BYTE2 (\BIN STREAM] - THEN (SETQ COUNT 2) - (SETQ CODE (LOGOR (LLSH (\BIN STREAM) - 8) - (\BIN STREAM))) - (CL:UNLESS RAW - (SETQ CODE (UNICODE.TRANSLATE CODE *UNICODETOXCCS*))) - (CL:IF COUNTP - (CL:VALUES CODE COUNT) - CODE) - ELSE (ERROR "ODD NUMBER OF BYTES IN UTF16 FILE" STREAM]) - -(UTF16BE.PEEKCCODEFN - [LAMBDA (STREAM NOERROR COUNTP RAW) (* ; "Edited 30-Jul-2020 14:06 by rmk:") - - (* ;; "Could be that the caller takes care of backing up the file position if the number of binned-bytes is returned.") - - (* ;; "Do not do UNICODE to XCCS translation if RAW") - - (LET (BYTE1 BYTE2 CODE) - (SETQ BYTE1 (\PEEKBIN STREAM NOERROR)) - (IF BYTE1 - THEN (\BIN STREAM) - (SETQ BYTE2 (\PEEKBIN STREAM NOERROR)) - (\BACKFILEPTR STREAM) - (IF BYTE2 - THEN (SETQ CODE (LOGOR (LLSH BYTE1 8) - BYTE2)) - (CL:IF COUNTP - (CL:VALUES (CL:IF RAW - CODE - (UNICODE.TRANSLATE CODE *UNICODETOXCCS*)) - 0)) - ELSEIF NOERROR - ELSE (AND COUNTP (CL:VALUES NIL 0))) - ELSEIF NOERROR - THEN (AND COUNTP (CL:VALUES NIL 0)) - ELSE (ERROR "INVALID UTF16 CHARACTER" (LIST BYTE1 BYTE2]) - -(\UTF16.BACKCHARFN - [LAMBDA (STREAM COUNTP) (* ; "Edited 26-Jul-2020 13:05 by rmk:") - - (* ;; "\BACKFILEPTR is NIL at beginning of FILE, just return COUNT.") - - (* ;; "Common for big-ending and little-ending") - - (IF (NOT (\BACKFILEPTR STREAM)) - THEN (AND COUNTP 0) - ELSEIF (\BACKFILEPTR STREAM) - THEN (AND COUNTP 2) - ELSE (AND COUNTP 1]) +(UTF16BE.PEEKCCODEFN [LAMBDA (STREAM NOERROR RAW) (* ; "Edited 14-Jun-2021 22:58 by rmk:") (* ;; "Could be that the caller takes care of backing up the file position if the number of binned-bytes is returned.") (* ;; "Do not do UNICODE to XCCS translation if RAW") (LET (BYTE1 BYTE2 CODE) (SETQ BYTE1 (\PEEKBIN STREAM NOERROR)) (IF BYTE1 THEN (\BIN STREAM) (SETQ BYTE2 (\PEEKBIN STREAM NOERROR)) (\BACKFILEPTR STREAM) (IF BYTE2 THEN (SETQ CODE (LOGOR (LLSH BYTE1 8) BYTE2)) (CL:IF RAW CODE (UNICODE.TRANSLATE CODE *UNICODETOXCCS*)) ELSEIF NOERROR THEN NIL) ELSEIF NOERROR THEN NIL ELSE (ERROR "INVALID UTF16 CHARACTER" (LIST BYTE1 BYTE2]) + +(\UTF16.BACKCHARFN [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 13:35 by rmk:") (* ;; "\BACKFILEPTR is NIL at beginning of FILE, do nothing.") (* ;; "Common for big-ending and little-ending") (IF (NOT (\BACKFILEPTR STREAM)) ELSEIF (\BACKFILEPTR STREAM) THEN (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IPLUS BYTECOUNTVAL 2))) ELSE (AND BYTECOUNTVAR (SET BYTECOUNTVAR (ADD1 BYTECOUNTVAL]) ) (RPAQ? EXTERNALEOL 'LF) (DEFINEQ (MAKE-UNICODE-FORMATS - [LAMBDA (EXTERNALEOL) (* ; "Edited 9-Aug-2020 08:40 by rmk:") + [LAMBDA (EXTERNALEOL) (* ; "Edited 3-Jul-2021 13:17 by rmk:") (* ;; "RAW formats do not do XCCS/Unicode translation, just deal with the byte encoding.") @@ -422,52 +173,48 @@ (CR CR.EOLC) (CRLF CRLF.EOLC) (SHOULDNT))) - (\INSTALL.EXTERNALFORMAT :UTF16BE (CREATE EXTERNALFORMAT - EOLVALID _ T - EOL _ EXTERNALEOL - INCCODEFN _ (FUNCTION UTF16BE.INCCODEFN) - PEEKCCODEFN _ (FUNCTION UTF16BE.PEEKCCODEFN) - BACKCHARFN _ (FUNCTION \UTF16.BACKCHARFN) - FILEOUTCHARFN _ (FUNCTION UTF16BE.OUTCHARFN))) - [\INSTALL.EXTERNALFORMAT :UTF16BE-RAW (CREATE EXTERNALFORMAT - EOLVALID _ T - EOL _ EXTERNALEOL - INCCODEFN _ [FUNCTION (LAMBDA (STREAM) - (UTF16BE.INCCODEFN - STREAM T] - PEEKCCODEFN _ [FUNCTION (LAMBDA (STREAM NOERROR - COUNTP) - (UTF16BE.PEEKCCODEFN - STREAM NOERROR COUNTP T] - BACKCHARFN _ (FUNCTION \UTF16.BACKCHARFN) - FILEOUTCHARFN _ (FUNCTION (LAMBDA (STREAM CHARCODE) - (UTF16BE.OUTCHARFN - STREAM CHARCODE T] - [\INSTALL.EXTERNALFORMAT :UTF8-RAW (CREATE EXTERNALFORMAT - EOLVALID _ T - EOL _ EXTERNALEOL - INCCODEFN _ [FUNCTION (LAMBDA (STREAM COUNTP) - (UTF8.INCCODEFN STREAM - COUNTP T] - PEEKCCODEFN _ [FUNCTION (LAMBDA (STREAM NOERROR COUNTP) - (UTF8.PEEKCCODEFN STREAM - NOERROR COUNTP T] - BACKCHARFN _ (FUNCTION \UTF8.BACKCHARFN) - FILEOUTCHARFN _ (FUNCTION (LAMBDA (STREAM CHARCODE) - (UTF8.OUTCHARFN STREAM - CHARCODE T] - (\INSTALL.EXTERNALFORMAT :UTF8 (CREATE EXTERNALFORMAT - EOLVALID _ T - EOL _ EXTERNALEOL - INCCODEFN _ (FUNCTION UTF8.INCCODEFN) - PEEKCCODEFN _ (FUNCTION UTF8.PEEKCCODEFN) - BACKCHARFN _ (FUNCTION \UTF8.BACKCHARFN) - FILEOUTCHARFN _ (FUNCTION UTF8.OUTCHARFN]) + (\INSTALL.EXTERNALFORMAT (CREATE EXTERNALFORMAT + NAME _ :UTF16BE + EOL _ EXTERNALEOL + INCCODEFN _ (FUNCTION UTF16BE.INCCODEFN) + PEEKCCODEFN _ (FUNCTION UTF16BE.PEEKCCODEFN) + BACKCCODEFN _ (FUNCTION \UTF16.BACKCHARFN) + OUTCHARFN _ (FUNCTION UTF16BE.OUTCHARFN))) + [\INSTALL.EXTERNALFORMAT (CREATE EXTERNALFORMAT + NAME _ :UTF16BE-RAW + EOL _ EXTERNALEOL + INCCODEFN _ [FUNCTION (LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) + (UTF16BE.INCCODEFN STREAM + BYTECOUNTVAR BYTECOUNTVAL T] + PEEKCCODEFN _ [FUNCTION (LAMBDA (STREAM NOERROR) + (UTF16BE.PEEKCCODEFN STREAM NOERROR + T] + BACKCCODEFN _ (FUNCTION \UTF16.BACKCHARFN) + OUTCHARFN _ (FUNCTION (LAMBDA (STREAM CHARCODE) + (UTF16BE.OUTCHARFN STREAM CHARCODE T] + [\INSTALL.EXTERNALFORMAT (CREATE EXTERNALFORMAT + NAME _ :UTF-8-RAW + EOL _ EXTERNALEOL + INCCODEFN _ [FUNCTION (LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) + (UTF8.INCCODEFN STREAM BYTECOUNTVAR + BYTECOUNTVAL T] + PEEKCCODEFN _ [FUNCTION (LAMBDA (STREAM NOERROR) + (UTF8.PEEKCCODEFN STREAM NOERROR T] + BACKCCODEFN _ (FUNCTION \UTF8.BACKCHARFN) + OUTCHARFN _ (FUNCTION (LAMBDA (STREAM CHARCODE) + (UTF8.OUTCHARFN STREAM CHARCODE T] + (\INSTALL.EXTERNALFORMAT (CREATE EXTERNALFORMAT + NAME _ :UTF-8 + EOL _ EXTERNALEOL + INCCODEFN _ (FUNCTION UTF8.INCCODEFN) + PEEKCCODEFN _ (FUNCTION UTF8.PEEKCCODEFN) + BACKCCODEFN _ (FUNCTION \UTF8.BACKCHARFN) + OUTCHARFN _ (FUNCTION UTF8.OUTCHARFN]) ) (MAKE-UNICODE-FORMATS EXTERNALEOL) -(ADDTOVAR *DEFAULT-EXTERNAL-FORMATS* (UNIX :UTF8)) +(ADDTOVAR *DEFAULT-EXTERNALFORMATS* (UNIX :UTF8)) (DEFINEQ (UNICODE.UNMAPPED @@ -558,7 +305,7 @@ ELSE F]) (READ-UNICODE-MAPPING - [LAMBDA (FILESPEC NOPRINT NOERROR) (* ; "Edited 16-Aug-2020 16:46 by rmk:") + [LAMBDA (FILESPEC NOPRINT NOERROR) (* ; "Edited 3-Jul-2021 13:37 by rmk:") (* ;; "Combines the char-mapping tables from FILES coded in the Uncode-CDROM format. Comments prefixed by # and") @@ -580,7 +327,7 @@ (FOR FILE [SEPBITTABLE _ (MAKEBITTABLE (CHARCODE (TAB SPACE] IN (  READ-UNICODE-MAPPING-FILENAMES FILESPEC) - JOIN (CL:WITH-OPEN-FILE (STREAM FILE :DIRECTION :INPUT :EXTERNAL-FORMAT :UTF8-RAW) + JOIN (CL:WITH-OPEN-FILE (STREAM FILE :DIRECTION :INPUT :EXTERNAL-FORMAT :UTF-8-RAW) (BIND LINE START FIRST (CL:UNLESS (FILEPOS "Name:" STREAM NIL NIL NIL T) (ERROR "NOT A UNICODE MAPPING FILE" @@ -882,7 +629,8 @@ (DEFINEQ (MAKE-UNICODE-TRANSLATION-TABLES - [LAMBDA (MAPPING LTORVAR RTOLVAR) (* ; "Edited 17-Aug-2020 08:46 by rmk:") + [LAMBDA (MAPPING LTORVAR RTOLVAR) (* ; "Edited 17-May-2021 22:24 by rmk:") + (* ; "Edited 17-Aug-2020 08:46 by rmk:") (* ;; "MAPPING is the list of numeric code correspondence pairs constructed by applying READ-UNICODE-MAPPING to a Unicode mapping file.") @@ -1019,11 +767,11 @@ (CL:WHEN LTORVAR (SETATOMVAL LTORVAR LTORARRAY)) (CL:WHEN RTOLVAR (SETATOMVAL RTOLVAR RTOLARRAY)) - (CL:VALUES LTORARRAY RTOLARRAY]) + (LIST LTORARRAY RTOLARRAY]) ) (RPAQ? DEFAULT-XCCS-CHARSETS '(LATIN SYMBOLS1 SYMBOLS2 EXTENDED-LATIN FORMS SYMBOLS3 SYMBOLS4 - ACCENTED-LATIN)) + ACCENTED-LATIN GREEK)) (DECLARE%: DONTEVAL@LOAD DOCOPY (MAKE-UNICODE-TRANSLATION-TABLES (READ-UNICODE-MAPPING DEFAULT-XCCS-CHARSETS T) @@ -1220,19 +968,9 @@ T]) ) (DECLARE%: EVAL@COMPILE DONTCOPY -(DECLARE%: EVAL@COMPILE - -(RPAQQ LF.EOLC 1) -(RPAQQ CR.EOLC 0) - -(RPAQQ CRLF.EOLC 2) - - -(CONSTANTS (LF.EOLC 1) - (CR.EOLC 0) - (CRLF.EOLC 2)) -) +(OR (GETP 'EXPORTS.ALL 'FILE) + (PRINT "NOTE: UNICODE requires EXPORTS.ALL for compilation" T)) (DECLARE%: EVAL@COMPILE @@ -1253,22 +991,17 @@ (TRANSLATION-SHIFT (INTEGERLENGTH (SUB1 TRANSLATION-SEGMENT-SIZE))) (TRANSLATION-MASK (SUB1 TRANSLATION-SEGMENT-SIZE))) ) - - -(EVAL (SYSRECLOOK1 'EXTERNALFORMAT)) - -(EVAL (SYSRECLOOK1 'STREAM)) ) (DECLARE%: DONTCOPY - (FILEMAP (NIL (4104 18559 (UTF8.OUTCHARFN 4114 . 7310) (UTF8.INCCODEFN 7312 . 12770) (UTF8.PEEKCCODEFN - 12772 . 18050) (\UTF8.BACKCHARFN 18052 . 18557)) (18560 21882 (UTF16BE.OUTCHARFN 18570 . 19303) ( -UTF16BE.INCCODEFN 19305 . 20182) (UTF16BE.PEEKCCODEFN 20184 . 21439) (\UTF16.BACKCHARFN 21441 . 21880) -) (21912 26052 (MAKE-UNICODE-FORMATS 21922 . 26050)) (26149 27455 (UNICODE.UNMAPPED 26159 . 27453)) ( -27456 27992 (XCCS-UTF8-AFTER-OPEN 27466 . 27990)) (29062 29411 (XTOUCODE 29072 . 29240) (UTOXCODE -29242 . 29409)) (29451 45633 (READ-UNICODE-MAPPING-FILENAMES 29461 . 30623) (READ-UNICODE-MAPPING -30625 . 33922) (WRITE-UNICODE-MAPPING 33924 . 38141) (WRITE-UNICODE-INCLUDED 38143 . 42865) ( -WRITE-UNICODE-MAPPING-HEADER 42867 . 44099) (WRITE-UNICODE-MAPPING-FILENAME 44101 . 45631)) (48970 -57339 (MAKE-UNICODE-TRANSLATION-TABLES 48980 . 57337)) (57754 65658 (HEXSTRING 57764 . 58925) ( -UTF8HEXSTRING 58927 . 61132) (NUTF8CODEBYTES 61134 . 61797) (NUTF8STRINGBYTES 61799 . 62280) ( -XTOUSTRING 62282 . 65293) (XCCSSTRING 65295 . 65656)) (65659 67128 (SHOWCHARS 65669 . 67126))))) + (FILEMAP (NIL (4126 17801 (UTF8.OUTCHARFN 4136 . 7332) (UTF8.INCCODEFN 7334 . 12450) (UTF8.PEEKCCODEFN + 12452 . 17226) (\UTF8.BACKCHARFN 17228 . 17799)) (17802 20994 (UTF16BE.OUTCHARFN 17812 . 18545) ( +UTF16BE.INCCODEFN 18547 . 19430) (UTF16BE.PEEKCCODEFN 19432 . 20503) (\UTF16.BACKCHARFN 20505 . 20992) +) (21024 24537 (MAKE-UNICODE-FORMATS 21034 . 24535)) (24633 25939 (UNICODE.UNMAPPED 24643 . 25937)) ( +25940 26476 (XCCS-UTF8-AFTER-OPEN 25950 . 26474)) (27546 27895 (XTOUCODE 27556 . 27724) (UTOXCODE +27726 . 27893)) (27935 44118 (READ-UNICODE-MAPPING-FILENAMES 27945 . 29107) (READ-UNICODE-MAPPING +29109 . 32407) (WRITE-UNICODE-MAPPING 32409 . 36626) (WRITE-UNICODE-INCLUDED 36628 . 41350) ( +WRITE-UNICODE-MAPPING-HEADER 41352 . 42584) (WRITE-UNICODE-MAPPING-FILENAME 42586 . 44116)) (47455 +55928 (MAKE-UNICODE-TRANSLATION-TABLES 47465 . 55926)) (56349 64253 (HEXSTRING 56359 . 57520) ( +UTF8HEXSTRING 57522 . 59727) (NUTF8CODEBYTES 59729 . 60392) (NUTF8STRINGBYTES 60394 . 60875) ( +XTOUSTRING 60877 . 63888) (XCCSSTRING 63890 . 64251)) (64254 65723 (SHOWCHARS 64264 . 65721))))) STOP diff --git a/library/UNICODE.LCOM b/library/UNICODE.LCOM index 64517217d..8ea52dc93 100644 Binary files a/library/UNICODE.LCOM and b/library/UNICODE.LCOM differ diff --git a/library/UNICODE.TXT b/library/UNICODE.TXT index 5d0495ea7..666872ad9 100644 --- a/library/UNICODE.TXT +++ b/library/UNICODE.TXT @@ -36,9 +36,9 @@ The function STREAMPROP obtains or changes the external format of an open stream In the latter case, the stream's format is changed to :UTF8 and the previous value is returned, in this example it is Medley's historical default format :XCCS. -Entries can be placed on the variable *DEFAULT-EXTERNAL-FORMATS* to change the external format that is set by default when a file is opened on a particular device. Loading UNICODE executes +Entries can be placed on the variable *DEFAULT-EXTERNALFORMATS* to change the external format that is set by default when a file is opened on a particular device. Loading UNICODE executes - (PUSH *DEFAULT-EXTERNAL-FORMATS* '(UNIX :UTF8)) + (PUSH *DEFAULT-EXTERNALFORMATS* '(UNIX :UTF8)) so that all files opened (by OPENSTREAM, CL:OPEN, etc.) on the UNIX file device will be initialized with :UTF8. Note that the UNIX and DSK file devices reference the same files (although some caution is needed because {UNIX} does not simulate Medley versioning), but the device name in a file name ({UNIX}/Users/... vs. {DSK}/Users/...) selects one or the other. The default setting above applies only to files specified with {UNIX}; a separate default entry for DSK must be established to change its default from :XCCS. @@ -58,7 +58,7 @@ where FILESPEC can be a list of files, charset octal strings ("0" "357"), or XCC When UNICODE is loaded the mappings for the character sets specified in the variable DEFAULT-XCCS-CHARSETS are installed. This is initialized to - (LATIN SYMBOLS1 SYMBOLS2 EXTENDED-LATIN FORMS SYMBOLS3 SYMBOLS4 ACCENTED-LATIN) + (LATIN SYMBOLS1 SYMBOLS2 EXTENDED-LATIN FORMS SYMBOLS3 SYMBOLS4 ACCENTED-LATIN GREEK) but DEFAULT-XCCS-CHARSETS can be set to a different collection before UNICODE is loaded. @@ -66,7 +66,7 @@ The internal translation tables used by the external formats are constructed fro (MAKE-UNICODE-TRANSLATION-TABLES MAPPING [FROM-XCCS-VAR][TO-XCCS-VAR]) -This returns a two-array multiple-value containing the relevant translation information organized for rapid access. If the optional from/to-variables arguments are provide, they are the names of variables whose top-level values will be set to these arrays, for convenience. For the external formats defined above, these variables are *XCCSTOUNICODE* and *UNICODETOXCCS*. +This returns a list of two arrays (XCCS-to-Unicode Unicode-to-XCCS)containing the relevant translation information organized for rapid access. If the optional from/to-variables arguments are provide, they are the names of variables whose top-level values will be set to these arrays, for convenience. For the external formats defined above, these variables are *XCCSTOUNICODE* and *UNICODETOXCCS*. The macro diff --git a/library/XCCS b/library/XCCS deleted file mode 100644 index 2c3e24fcc..000000000 --- a/library/XCCS +++ /dev/null @@ -1,412 +0,0 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED " 4-Aug-2020 22:36:36" {DSK}kaplan>Local>medley3.5>lispcore>library>XCCS.;4 23636 - - changes to%: (VARS XCCSCOMS) - (FNS HEXCODE BINTOUMAPPING HEXSTRING X2U.BIN) - - previous date%: "30-Jul-2020 13:55:47" -{DSK}kaplan>Local>medley3.5>lispcore>library>XCCS.;1) - - -(PRETTYCOMPRINT XCCSCOMS) - -(RPAQQ XCCSCOMS - ((COMS (FNS X2U.WIKI XCCS2UNICODE.PARSECELL)) - (COMS (FNS X2U.BIN XCCORD GETUCODE WIN FINDUCODE)) - (FNS SHOWMAPPINGS SHOWMAPPING) - (FNS COMPAREMAPPINGS COMPARECHARSETS) - (FNS MERGEMAPPINGS PRINTMERGED READMERGED) - (FNS TRANSLATECHARSET) - (FNS CONVERTU2X) - (FNS UTF8TOHEXSTRING HEXSTRING HEXCODE BINTOUMAPPING))) -(DEFINEQ - -(X2U.WIKI - [LAMBDA (WIKIFILE) (* ; "Edited 24-Jul-2020 11:11 by rmk:") - - (* ;; "This scrapes the XCCS to Unicode mappings from the XCCS Wikipedia page.") - - (* ;; "However, that page does not seem to correspond to the version of XCCS that Interlisp has internalized.") - - (CL:WITH-OPEN-FILE (STREAM (OR WIKIFILE - "/Users/kaplan/Desktop/Editing Xerox Character Code Standard - Wikipedia.html" - ) - :DIRECTION :INPUT) - (BIND CSET CSSTRING WHILE (FILEPOS "{{chset-table-header|XCCS (prefixed with " - STREAM NIL NIL NIL T) - COLLECT (CL:UNLESS (AND (EQ 0 (READC STREAM)) - (EQ 'x (READC STREAM))) - (HELP "no 0x")) - [SETQ CSSTRING (OCTALSTRING (HEXCODE (CONCAT (READC STREAM) - (READC STREAM] - (CONS CSSTRING (FOR I UC FROM 0 TO 255 - WHEN (AND (FILEPOS "{{chset-color-" STREAM NIL NIL NIL T) - (SETQ UC (XCCS2UNICODE.PARSECELL STREAM))) - COLLECT (LIST (CONCAT CSSTRING "," (OCTALSTRING I)) - UC]) - -(XCCS2UNICODE.PARSECELL - [LAMBDA (STREAM) (* ; "Edited 21-Jul-2020 14:13 by rmk:") - (CL:UNLESS (STREQUAL "undef" (CONCATLIST (BIND C UNTIL (EQ '} (SETQ C (READC STREAM))) - COLLECT C))) - (FILEPOS "chset-" STREAM NIL NIL NIL T) - (FILEPOS "|" STREAM NIL NIL NIL T) - (CONCATLIST (BIND C UNTIL (EQ '%| (SETQ C (READC STREAM))) COLLECT C)))]) -) -(DEFINEQ - -(X2U.BIN - [LAMBDA (BINFILE) (* ; "Edited 4-Aug-2020 21:13 by rmk:") - (* ; "Edited 21-Jul-2020 13:49 by rmk:") - - (* ;; "This reads the binary file that maps from XCCS character-code ordinal positions to the corresponding Unicode code. Result is a list of (octal-xccs-codes hex-unicodes) pairs.") - - (* ;; "The file is a sequence of 2-byte UC hex codes. Each UC code corresponds to the XC code that you would get if you took out all the undefined code-spaces in all of the preceding character sets. The first 128-code panel of a code chart hasa 33 unused control slots at the beginning (although for charset 0 the last %"unused%" control slot is the ascii space, which is not represented in the file). The last cell of each 128-code panel is also not used.") - - (* ;; "So, the UC code at the first ordinal position in the file corresponds to XC code 33 (octal 41), then we run up to 126, skip 127, then skip another 33 to start the second 128-code panel. And we skip the last cell of that before we move on to the next character set.") - - (* ;; "But also, the next character set after charset 0 is charset 41 octal (33). So we have to skip 256*32 positions.") - - (* ;; "Finally, there are unused cells in the middle of some panels. Those are represented in the file by the sequence %"FFFD%", which maps to the unicode black-box with a ?. There is no need to include those.") - - (CL:WITH-OPEN-FILE - (STREAM (OR BINFILE (PACK* (CAR UNICODEDIRECTORIES) - '/XCCStoUni)) - :DIRECTION :INPUT) - - (* ;; "XC is the XC code corresponding to the current UC hex string. I keeps track of the number of hex strings we have read within this panel, before we have to increment by 34") - - (BIND UC CSSTRING [CHARSETFIX _ '(("57" "341" Hebrew) - ("56" "340" Arabic] - (CHARSET _ 0) - (LASTFP _ 0) UNTIL (EOFP STREAM) - COLLECT (SETQ CSSTRING (OCTALSTRING CHARSET)) - (CL:WHEN (SASSOC CSSTRING CHARSETFIX) - (SETQ CSSTRING (CADR (SASSOC CSSTRING CHARSETFIX)))) - (CONS CSSTRING (PROG1 [NCONC [FOR XC UC FROM 33 TO 126 - UNTIL (EOFP STREAM) - UNLESS (MEMBER (SETQ UC (HEXSTRING (WIN STREAM) - 4)) - '("FFFD" "FFFF")) - COLLECT (PROG1 (LIST (CONCAT CSSTRING "," - (OCTALSTRING XC)) - UC LASTFP) - (SETQ LASTFP (GETFILEPTR STREAM)))] - (FOR XC UC FROM (PLUS 128 33) - TO (PLUS 128 126) UNTIL (EOFP STREAM) - UNLESS (MEMBER (SETQ UC (HEXSTRING (WIN STREAM) - 4)) - '("FFFD" "FFFF")) - COLLECT (PROG1 (LIST (CONCAT CSSTRING "," - (OCTALSTRING XC)) - UC LASTFP) - (SETQ LASTFP (GETFILEPTR STREAM)))] - (ADD CHARSET (CL:IF (EQ CHARSET 0) - 33 - 1)))]) - -(XCCORD - [LAMBDA (XCODE) (* ; "Edited 17-Jul-2020 08:11 by rmk:") - - (* ;; "Returns the ordinal position of XCODE in the Xerox Character Code standard, removing all not-used slots.") - - (* ;; "The first 32 of every 256 block is unused, and 34 are unused int he middle of the block (127 to 160)") - - (* ;; "Also, character sets 1-32 do not exist") - - (CL:UNLESS (AND (SMALLP XCODE) - (ILESSP XCODE (CHARCODE 0)) - (IGREATERP XCODE (CHARCODE 9))) - (SETQ XCODE (CHARCODE.DECODE XCODE))) - (LET ((CHARSET (IQUOTIENT XCODE 256)) - (PERCHARSET (- 256 (+ 32 34))) - (CHARSETORD 0) - (CHARINSET (IREMAINDER XCODE 256))) - (CL:UNLESS (EQ CHARSET 0) (* ; "33 (41Q) -> 1") - (SETQ CHARSETORD (- CHARSET 32))) - (CL:WHEN (ILESSP CHARSETORD 0) - (ERROR "UNUSED CHARACTER SET" CHARSET)) - (CL:WHEN [OR (ILESSP CHARINSET 32) - (AND (IGEQ CHARINSET 127) - (ILEQ CHARINSET (PLUS 128 33] - (ERROR "UNUSED CHARACTER" XCODE)) - (SETQ PRECHARSET (TIMES PERCHARSET CHARSETORD)) - (IPLUS PRECHARSET (- CHARINSET (IF (ILEQ CHARINSET 127) - THEN 32 - ELSE (PLUS 32 34]) - -(GETUCODE - [LAMBDA (XCODE STREAM) (* ; "Edited 22-Jul-2020 12:07 by rmk:") - (* ; "Edited 16-Jul-2020 23:37 by rmk:") - (LET ((XCODE (OR (SMALLP XCODE) - (CHARCODE.DECODE XCODE))) - SKIP UCODE) - [SETQ SKIP (TIMES 33 (ADD1 (IQUOTIENT XCODE 128] - (SETFILEPTR STREAM (TIMES 2 (IDIFFERENCE XCODE SKIP))) - (SETQ UCODE (LOGOR (LLSH (BIN STREAM) - 8) - (BIN STREAM))) - (HEXSTRING UCODE]) - -(WIN - [LAMBDA (STREAM) (* ; "Edited 16-Jul-2020 23:22 by rmk:") - (LOGOR (LLSH (BIN STREAM) - 8) - (BIN STREAM]) - -(FINDUCODE - [LAMBDA (UC BINFILE) (* ; "Edited 22-Jul-2020 17:13 by rmk:") - (CL:WITH-OPEN-FILE (STREAM (OR BINFILE "{DSK}kaplan>Local>dict>unicode>xerox>XCCStoUni") - :DIRECTION :INPUT) - (FILEPOS (CONCAT (CHARACTER (LRSH (HEXCODE UC) - 8)) - (CHARACTER (LOGAND (HEXCODE UC) - 255))) - STREAM]) -) -(DEFINEQ - -(SHOWMAPPINGS - [LAMBDA (MAPPINGS) (* ; "Edited 24-Jul-2020 11:06 by rmk:") - (FOR M IN MAPPINGS DO (SHOWMAPPING MAPPINGS (CAR M)) - (TERPRI T]) - -(SHOWMAPPING - [LAMBDA (MAPPINGS CHARSET) (* ; "Edited 24-Jul-2020 11:08 by rmk:") - (CL:WHEN (STRPOS "," CHARSET) - (SETQ CHARSET (SUBSTRING CHARSET 1 (STRPOS "," CHARSET)))) - (PRINTOUT T "Character set " (CAR M) - T) - (FOR Y IN (CDR (SASSOC CHARSET MAPPINGS)) DO (PRINTOUT T (CAR Y) - 8 - (CHARACTER (CHARCODE.DECODE - (CAR Y))) - " " - (CADR Y)) - (CL:WHEN (CDDR Y) - (PRINTOUT T " " (CADDR Y))) - (TERPRI T]) -) -(DEFINEQ - -(COMPAREMAPPINGS - [LAMBDA (MAP1 MAP2) (* ; "Edited 24-Jul-2020 13:39 by rmk:") - (LET [(CHARSETS1 (FOR M1 IN MAP1 COLLECT (CAR M1))) - (CHARSETS2 (FOR M2 IN MAP2 COLLECT (CAR M2] - (LIST [FOR COMMON IN (INTERSECTION CHARSETS1 CHARSETS2) - COLLECT (CONS COMMON (COMPARECHARSETS (SASSOC COMMON MAP1) - (SASSOC COMMON MAP2] - (LDIFFERENCE CHARSETS1 CHARSETS2) - (LDIFFERENCE CHARSETS2 CHARSETS1]) - -(COMPARECHARSETS - [LAMBDA (CS1 CS2) (* ; "Edited 24-Jul-2020 20:21 by rmk:") - (CL:UNLESS (STREQUAL (CAR CS1) - (CAR CS2)) - (ERROR "CHARSETS DON'T CORRESPONG")) - (FOR XC U1 U2 IN [SORT (UNION (FOR M1 IN (CDR CS1) COLLECT (CAR M1)) - (FOR M2 IN (CDR CS2) COLLECT (CAR M2))) - (FUNCTION (LAMBDA (X1 X2) - (ILEQ (CHARCODE.DECODE X1) - (CHARCODE.DECODE X2] - EACHTIME [SETQ U1 (CADR (SASSOC XC (CDR CS1] - [SETQ U2 (CADR (SASSOC XC (CDR CS2] WHEN (IF (AND U1 U2) - THEN (NOT (IEQP (CHARCODE.DECODE - U1) - (CHARCODE.DECODE - U2))) - ELSE (OR U1 U2)) - COLLECT (LIST XC U1 U2 (CHARACTER (CHARCODE.DECODE XC]) -) -(DEFINEQ - -(MERGEMAPPINGS - [LAMBDA (MAP1 MAP2) (* ; "Edited 25-Jul-2020 15:36 by rmk:") - (FOR CSET CS1 CS2 IN [SORT (UNION (FOR M1 IN MAP1 COLLECT (CAR M1)) - (FOR M2 IN MAP2 COLLECT (CAR M2))) - (FUNCTION (LAMBDA (CS1 CS2) - (ILEQ (CL:PARSE-INTEGER CS1 :RADIX 8) - (CL:PARSE-INTEGER CS2 :RADIX 8] - COLLECT (SETQ CS1 (SASSOC CSET MAP1)) - (SETQ CS2 (SASSOC CSET MAP2)) - (CONS CSET (FOR XC UCODE1 UCODE2 UCHAR1 UCHAR2 - IN [SORT (UNION (FOR M1 IN (CDR CS1) COLLECT (CAR M1)) - (FOR M2 IN (CDR CS2) COLLECT (CAR M2))) - (FUNCTION (LAMBDA (XC1 XC2) - (ILEQ (CHARCODE.DECODE XC1) - (CHARCODE.DECODE XC2] - COLLECT [SETQ UCODE1 (CADR (SASSOC XC (CDR CS1] - [SETQ UCHAR1 (CL:WHEN UCODE1 - (CHARACTER (CHARCODE.DECODE UCODE1)))] - [SETQ UCODE2 (CADR (SASSOC XC (CDR CS2] - [SETQ UCHAR2 (CL:WHEN UCODE2 - (CHARACTER (CHARCODE.DECODE UCODE2)))] - (CONS XC (IF UCHAR1 - THEN (IF (AND UCODE2 (NEQ UCHAR1 UCHAR2)) - THEN (LIST UCHAR1 UCHAR2 UCODE1 UCODE2 - ) - ELSE (LIST UCHAR1 UCODE1)) - ELSEIF UCHAR2 - THEN (LIST UCHAR2 UCODE2) - ELSE (HELP "XC WITHOUT UC'S" XC]) - -(PRINTMERGED - [LAMBDA (MERGED CHARSETS FILE) (* ; "Edited 25-Jul-2020 16:08 by rmk:") - [SELECTQ CHARSETS - (NOJIS (SETQ MERGED (FOR M IN MERGED UNLESS (AND (IGEQ (CL:PARSE-INTEGER - (CAR M) - :RADIX 8) - (CL:PARSE-INTEGER "60" - :RADIX 8)) - (ILESSP (CL:PARSE-INTEGER - (CAR M) - :RADIX 8) - (CL:PARSE-INTEGER "340" - :RADIX 8))) - COLLECT M)) - (CL:UNLESS FILE - (SETQ FILE 'MERGED-NOJIS))) - ((ALL NIL) - (CL:UNLESS FILE - (SETQ FILE 'MERGED-ALL))) - (PROGN (SETQ CHARSETS (MKLIST CHARSETS)) - [SETQ MERGED (FOR CS IN CHARSETS COLLECT (OR (SASSOC CS MERGED) - (ERROR CS "does not exist"] - (CL:UNLESS FILE - (SETQ FILE (PACK* FILE "-" (CAR CHARSETS))))] - (SETQ FILE (PACKFILENAME 'BODY FILE 'EXTENSION 'TXT)) - (CL:WITH-OPEN-FILE (STREAM FILE :DIRECTION :OUTPUT :EXTERNAL-FORMAT :UTF8 :IF-EXISTS :NEW-VERSION - ) - (PRINTOUT STREAM "(") - (FOR CSET IN MERGED DO (PRINTOUT STREAM "(" .P2 (CAR CSET) - T) - (FOR MAP IN (CDR CSET) - DO (PRINTOUT STREAM 3 .P2 MAP T)) - (PRINTOUT STREAM ")" T)) - (PRINTOUT STREAM ")") - (CLOSEF STREAM]) - -(READMERGED - [LAMBDA (FILE) (* ; "Edited 30-Jul-2020 13:40 by rmk:") - - (* ;; "Reads UTF8 without translation to XCCS") - - (CL:WITH-OPEN-FILE (STREAM FILE :DIRECTION :INPUT :EXTERNAL-FORMAT :UTF8-RAW) - (* (READC STREAM) (BIND SET UNTIL - (EOFP STREAM) COLLECT - (SETQ SET (READ STREAM)) - (PRINTOUT T (CAR) " "))) - (READ STREAM]) -) -(DEFINEQ - -(TRANSLATECHARSET - [LAMBDA (MAPPINGS FROMCS TOCS) (* ; "Edited 26-Jul-2020 19:35 by rmk:") - (CL:WHEN (SMALLP FROMCS) - (SETQ FROMCS (CONCAT FROMCS))) - (CL:WHEN (SMALLP TOCS) - (SETQ TOCS (CONCAT TOCS))) - (LET ((CSETMAP (SASSOC FROMCS MAPPINGS)) - (NEWCSETMAP)) - (CL:UNLESS CSETMAP (ERROR "FROM CHARACTER SET NOT FOUND" FROMCS)) - (SETQ NEWCSMAP (CONS TOCS (FOR CM IN (CDR CSETMAP) - COLLECT (CONS [CONCAT TOCS - (OR (SUBSTRING (CAR CM) - (STRPOS "," (CAR CM))) - (HELP "INVALID CHARCODE" - (CAR CM] - (CDR CM]) -) -(DEFINEQ - -(CONVERTU2X - [LAMBDA NIL (* ; "Edited 27-Jul-2020 14:40 by rmk:") - (FOR X IN CBUNICODETOXEROXRENDERING COLLECT (LIST [CHARCODESTRING - (OR (FIXP (CADR X)) - (CHARCODE.DECODE (CADR X] - [CHARACTER - (OR (FIXP (CADR X)) - (CHARCODE.DECODE (CADR X] - (HEXSTRING (CAR X) - 4]) -) -(DEFINEQ - -(UTF8TOHEXSTRING - [LAMBDA (UTF8STRING) (* ; "Edited 28-Jul-2020 17:32 by rmk:") - - (* ;; "Converts from a UTF8 encoding of a number to the hex string that represents that number") - - (LET (BYTE1 BYTE1 BYTE2 BYTE3 BYTE4) - (SETQ BYTE1 (HEXCODE (SUBSTRING UTF8STRING 1 2))) - - (* ;; "Distinguish on header byte, extract number of bytes so we don't read too far") - - (HEXSTRING (IF (ILESSP BYTE1 128) - THEN - - (* ;; "Test first: Ascii is the common case") - - BYTE1 - ELSEIF (IGEQ BYTE1 (LLSH 15 4)) - THEN (* ; "4 bytes") - (SETQ BYTE2 (HEXCODE (SUBSTRING UTF8STRING 3 4))) - (CL:WHEN (ILESSP BYTE2 128) - (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) - (SETQ BYTE3 (HEXCODE (SUBSTRING UTF8STRING 5 6))) - (CL:WHEN (ILESSP BYTE3 128) - (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3))) - (SETQ BYTE4 (HEXCODE (SUBSTRING UTF8STRING 7 8))) - (CL:WHEN (ILESSP BYTE4 128) - (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3 BYTE4))) - (LOGOR (LLSH (LOADBYTE BYTE1 0 3) - 18) - (LLSH (LOADBYTE BYTE2 0 6) - 12) - (LLSH (LOADBYTE BYTE3 0 6) - 6) - (LOADBYTE BYTE4 0 6)) - ELSEIF (IGEQ BYTE1 (LLSH 7 5)) - THEN (* ; "3 bytes") - (SETQ BYTE2 (HEXCODE (SUBSTRING UTF8STRING 3 4))) - (CL:WHEN (ILESSP BYTE2 128) - (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) - (SETQ BYTE3 (HEXCODE (SUBSTRING UTF8STRING 5 6))) - (CL:WHEN (ILESSP BYTE3 128) - (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3))) - (LOGOR (LLSH (LOADBYTE BYTE1 0 4) - 12) - (LLSH (LOADBYTE BYTE2 0 6) - 6) - (LOADBYTE BYTE3 0 6)) - ELSE (* ; "Must be 2 bytes") - (SETQ BYTE2 (HEXCODE (SUBSTRING UTF8STRING 3 4))) - (CL:WHEN (ILESSP BYTE2 128) - (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) - (LOGOR (LLSH (LOADBYTE BYTE1 0 5) - 6) - (LOADBYTE BYTE2 0 6]) - -(HEXSTRING - [LAMBDA (N) (* ; "Edited 4-Aug-2020 21:19 by rmk:") - (CL:FORMAT NIL "~4,'0X" N]) - -(HEXCODE - [LAMBDA (HEXSTRING) (* ; "Edited 4-Aug-2020 21:28 by rmk:") - (CL:PARSE-INTEGER HEXSTRING :RADIX 16]) - -(BINTOUMAPPING - [LAMBDA (BINLIST) (* ; "Edited 4-Aug-2020 21:28 by rmk:") - (FOR CS IN BINLIST JOIN (FOR CM IN (CDR CS) - COLLECT (LIST (CHARCODE.DECODE (CAR CM)) - (HEXCODE (CADR CM]) -) -(DECLARE%: DONTCOPY - (FILEMAP (NIL (801 2795 (X2U.WIKI 811 . 2310) (XCCS2UNICODE.PARSECELL 2312 . 2793)) (2796 9601 ( -X2U.BIN 2806 . 6854) (XCCORD 6856 . 8283) (GETUCODE 8285 . 8894) (WIN 8896 . 9084) (FINDUCODE 9086 . -9599)) (9602 10870 (SHOWMAPPINGS 9612 . 9856) (SHOWMAPPING 9858 . 10868)) (10871 12765 ( -COMPAREMAPPINGS 10881 . 11468) (COMPARECHARSETS 11470 . 12763)) (12766 17927 (MERGEMAPPINGS 12776 . -15003) (PRINTMERGED 15005 . 17277) (READMERGED 17279 . 17925)) (17928 18901 (TRANSLATECHARSET 17938 . -18899)) (18902 19723 (CONVERTU2X 18912 . 19721)) (19724 23613 (UTF8TOHEXSTRING 19734 . 22929) ( -HEXSTRING 22931 . 23082) (HEXCODE 23084 . 23245) (BINTOUMAPPING 23247 . 23611))))) -STOP diff --git a/library/XCCS.LCOM b/library/XCCS.LCOM deleted file mode 100644 index c2e8b8a15..000000000 Binary files a/library/XCCS.LCOM and /dev/null differ diff --git a/library/XCCS.~1~ b/library/XCCS.~1~ deleted file mode 100644 index d50f0a354..000000000 --- a/library/XCCS.~1~ +++ /dev/null @@ -1 +0,0 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") (FILECREATED "30-Jul-2020 13:55:47" {DSK}kaplan>Local>medley3.5>lispcore>library>XCCS.;1 23040 changes to%: (FNS READMERGED UTF8TOHEXSTRING CONVERTU2X X2U.BIN TRANSLATECHARSET PRINTMERGED MERGEMAPPINGS COMPARECHARSETS COMPAREMAPPINGS X2U.WIKI SHOWMAPPINGS SHOWMAPPING) (VARS XCCSCOMS) previous date%: "23-Jul-2020 08:30:22" {DSK}kaplan>lisp>XCCS.;12) (PRETTYCOMPRINT XCCSCOMS) (RPAQQ XCCSCOMS ((COMS (FNS X2U.WIKI XCCS2UNICODE.PARSECELL)) (COMS (FNS X2U.BIN XCCORD GETUCODE WIN FINDUCODE)) (FNS SHOWMAPPINGS SHOWMAPPING) (FNS COMPAREMAPPINGS COMPARECHARSETS) (FNS MERGEMAPPINGS PRINTMERGED READMERGED) (FNS TRANSLATECHARSET) (FNS CONVERTU2X) (FNS UTF8TOHEXSTRING))) (DEFINEQ (X2U.WIKI [LAMBDA (WIKIFILE) (* ; "Edited 24-Jul-2020 11:11 by rmk:") (* ;; "This scrapes the XCCS to Unicode mappings from the XCCS Wikipedia page.") (* ;; "However, that page does not seem to correspond to the version of XCCS that Interlisp has internalized.") (CL:WITH-OPEN-FILE (STREAM (OR WIKIFILE "/Users/kaplan/Desktop/Editing Xerox Character Code Standard - Wikipedia.html" ) :DIRECTION :INPUT) (BIND CSET CSSTRING WHILE (FILEPOS "{{chset-table-header|XCCS (prefixed with " STREAM NIL NIL NIL T) COLLECT (CL:UNLESS (AND (EQ 0 (READC STREAM)) (EQ 'x (READC STREAM))) (HELP "no 0x")) [SETQ CSSTRING (OCTALSTRING (HEXCODE (CONCAT (READC STREAM) (READC STREAM] (CONS CSSTRING (FOR I UC FROM 0 TO 255 WHEN (AND (FILEPOS "{{chset-color-" STREAM NIL NIL NIL T) (SETQ UC (XCCS2UNICODE.PARSECELL STREAM))) COLLECT (LIST (CONCAT CSSTRING "," (OCTALSTRING I)) UC]) (XCCS2UNICODE.PARSECELL [LAMBDA (STREAM) (* ; "Edited 21-Jul-2020 14:13 by rmk:") (CL:UNLESS (STREQUAL "undef" (CONCATLIST (BIND C UNTIL (EQ '} (SETQ C (READC STREAM))) COLLECT C))) (FILEPOS "chset-" STREAM NIL NIL NIL T) (FILEPOS "|" STREAM NIL NIL NIL T) (CONCATLIST (BIND C UNTIL (EQ '%| (SETQ C (READC STREAM))) COLLECT C)))]) ) (DEFINEQ (X2U.BIN [LAMBDA (BINFILE) (* ; "Edited 26-Jul-2020 20:09 by rmk:") (* ; "Edited 21-Jul-2020 13:49 by rmk:") (* ;; "This reads the binary file that maps from XCCS character-code ordinal positions to the corresponding Unicode code. Result is a list of (octal-xccs-codes hex-unicodes) pairs.") (* ;; "The file is a sequence of 2-byte UC hex codes. Each UC code corresponds to the XC code that you would get if you took out all the undefined code-spaces in all of the preceding character sets. The first 128-code panel of a code chart hasa 33 unused control slots at the beginning (although for charset 0 the last %"unused%" control slot is the ascii space, which is not represented in the file). The last cell of each 128-code panel is also not used.") (* ;; "So, the UC code at the first ordinal position in the file corresponds to XC code 33 (octal 41), then we run up to 126, skip 127, then skip another 33 to start the second 128-code panel. And we skip the last cell of that before we move on to the next character set.") (* ;; "But also, the next character set after charset 0 is charset 41 octal (33). So we have to skip 256*32 positions.") (* ;; "Finally, there are unused cells in the middle of some panels. Those are represented in the file by the sequence %"FFFD%", which maps to the unicode black-box with a ?. There is no need to include those.") (CL:WITH-OPEN-FILE (STREAM (OR BINFILE "{DSK}kaplan>Local>dict>unicode>xerox>XCCStoUni") :DIRECTION :INPUT) (* ;; "XC is the XC code corresponding to the current UC hex string. I keeps track of the number of hex strings we have read within this panel, before we have to increment by 34") (BIND UC CSSTRING [CHARSETFIX _ '(("57" "341" Hebrew) ("56" "340" Arabic] (CHARSET _ 0) (LASTFP _ 0) UNTIL (EOFP STREAM) COLLECT (SETQ CSSTRING (OCTALSTRING CHARSET)) (CL:WHEN (SASSOC CSSTRING CHARSETFIX) (SETQ CSSTRING (CADR (SASSOC CSSTRING CHARSETFIX)))) (CONS CSSTRING (PROG1 [NCONC [FOR XC UC FROM 33 TO 126 UNTIL (EOFP STREAM) UNLESS (MEMBER (SETQ UC (HEXSTRING (WIN STREAM) 4)) '("FFFD" "FFFF")) COLLECT (PROG1 (LIST (CONCAT CSSTRING "," (OCTALSTRING XC)) UC LASTFP) (SETQ LASTFP (GETFILEPTR STREAM)))] (FOR XC UC FROM (PLUS 128 33) TO (PLUS 128 126) UNTIL (EOFP STREAM) UNLESS (MEMBER (SETQ UC (HEXSTRING (WIN STREAM) 4)) '("FFFD" "FFFF")) COLLECT (PROG1 (LIST (CONCAT CSSTRING "," (OCTALSTRING XC)) UC LASTFP) (SETQ LASTFP (GETFILEPTR STREAM)))] (ADD CHARSET (CL:IF (EQ CHARSET 0) 33 1)))]) (XCCORD [LAMBDA (XCODE) (* ; "Edited 17-Jul-2020 08:11 by rmk:") (* ;; "Returns the ordinal position of XCODE in the Xerox Character Code standard, removing all not-used slots.") (* ;; "The first 32 of every 256 block is unused, and 34 are unused int he middle of the block (127 to 160)") (* ;; "Also, character sets 1-32 do not exist") (CL:UNLESS (AND (SMALLP XCODE) (ILESSP XCODE (CHARCODE 0)) (IGREATERP XCODE (CHARCODE 9))) (SETQ XCODE (CHARCODE.DECODE XCODE))) (LET ((CHARSET (IQUOTIENT XCODE 256)) (PERCHARSET (- 256 (+ 32 34))) (CHARSETORD 0) (CHARINSET (IREMAINDER XCODE 256))) (CL:UNLESS (EQ CHARSET 0) (* ; "33 (41Q) -> 1") (SETQ CHARSETORD (- CHARSET 32))) (CL:WHEN (ILESSP CHARSETORD 0) (ERROR "UNUSED CHARACTER SET" CHARSET)) (CL:WHEN [OR (ILESSP CHARINSET 32) (AND (IGEQ CHARINSET 127) (ILEQ CHARINSET (PLUS 128 33] (ERROR "UNUSED CHARACTER" XCODE)) (SETQ PRECHARSET (TIMES PERCHARSET CHARSETORD)) (IPLUS PRECHARSET (- CHARINSET (IF (ILEQ CHARINSET 127) THEN 32 ELSE (PLUS 32 34]) (GETUCODE [LAMBDA (XCODE STREAM) (* ; "Edited 22-Jul-2020 12:07 by rmk:") (* ; "Edited 16-Jul-2020 23:37 by rmk:") (LET ((XCODE (OR (SMALLP XCODE) (CHARCODE.DECODE XCODE))) SKIP UCODE) [SETQ SKIP (TIMES 33 (ADD1 (IQUOTIENT XCODE 128] (SETFILEPTR STREAM (TIMES 2 (IDIFFERENCE XCODE SKIP))) (SETQ UCODE (LOGOR (LLSH (BIN STREAM) 8) (BIN STREAM))) (HEXSTRING UCODE]) (WIN [LAMBDA (STREAM) (* ; "Edited 16-Jul-2020 23:22 by rmk:") (LOGOR (LLSH (BIN STREAM) 8) (BIN STREAM]) (FINDUCODE [LAMBDA (UC BINFILE) (* ; "Edited 22-Jul-2020 17:13 by rmk:") (CL:WITH-OPEN-FILE (STREAM (OR BINFILE "{DSK}kaplan>Local>dict>unicode>xerox>XCCStoUni") :DIRECTION :INPUT) (FILEPOS (CONCAT (CHARACTER (LRSH (HEXCODE UC) 8)) (CHARACTER (LOGAND (HEXCODE UC) 255))) STREAM]) ) (DEFINEQ (SHOWMAPPINGS [LAMBDA (MAPPINGS) (* ; "Edited 24-Jul-2020 11:06 by rmk:") (FOR M IN MAPPINGS DO (SHOWMAPPING MAPPINGS (CAR M)) (TERPRI T]) (SHOWMAPPING [LAMBDA (MAPPINGS CHARSET) (* ; "Edited 24-Jul-2020 11:08 by rmk:") (CL:WHEN (STRPOS "," CHARSET) (SETQ CHARSET (SUBSTRING CHARSET 1 (STRPOS "," CHARSET)))) (PRINTOUT T "Character set " (CAR M) T) (FOR Y IN (CDR (SASSOC CHARSET MAPPINGS)) DO (PRINTOUT T (CAR Y) 8 (CHARACTER (CHARCODE.DECODE (CAR Y))) " " (CADR Y)) (CL:WHEN (CDDR Y) (PRINTOUT T " " (CADDR Y))) (TERPRI T]) ) (DEFINEQ (COMPAREMAPPINGS [LAMBDA (MAP1 MAP2) (* ; "Edited 24-Jul-2020 13:39 by rmk:") (LET [(CHARSETS1 (FOR M1 IN MAP1 COLLECT (CAR M1))) (CHARSETS2 (FOR M2 IN MAP2 COLLECT (CAR M2] (LIST [FOR COMMON IN (INTERSECTION CHARSETS1 CHARSETS2) COLLECT (CONS COMMON (COMPARECHARSETS (SASSOC COMMON MAP1) (SASSOC COMMON MAP2] (LDIFFERENCE CHARSETS1 CHARSETS2) (LDIFFERENCE CHARSETS2 CHARSETS1]) (COMPARECHARSETS [LAMBDA (CS1 CS2) (* ; "Edited 24-Jul-2020 20:21 by rmk:") (CL:UNLESS (STREQUAL (CAR CS1) (CAR CS2)) (ERROR "CHARSETS DON'T CORRESPONG")) (FOR XC U1 U2 IN [SORT (UNION (FOR M1 IN (CDR CS1) COLLECT (CAR M1)) (FOR M2 IN (CDR CS2) COLLECT (CAR M2))) (FUNCTION (LAMBDA (X1 X2) (ILEQ (CHARCODE.DECODE X1) (CHARCODE.DECODE X2] EACHTIME [SETQ U1 (CADR (SASSOC XC (CDR CS1] [SETQ U2 (CADR (SASSOC XC (CDR CS2] WHEN (IF (AND U1 U2) THEN (NOT (IEQP (CHARCODE.DECODE U1) (CHARCODE.DECODE U2))) ELSE (OR U1 U2)) COLLECT (LIST XC U1 U2 (CHARACTER (CHARCODE.DECODE XC]) ) (DEFINEQ (MERGEMAPPINGS [LAMBDA (MAP1 MAP2) (* ; "Edited 25-Jul-2020 15:36 by rmk:") (FOR CSET CS1 CS2 IN [SORT (UNION (FOR M1 IN MAP1 COLLECT (CAR M1)) (FOR M2 IN MAP2 COLLECT (CAR M2))) (FUNCTION (LAMBDA (CS1 CS2) (ILEQ (CL:PARSE-INTEGER CS1 :RADIX 8) (CL:PARSE-INTEGER CS2 :RADIX 8] COLLECT (SETQ CS1 (SASSOC CSET MAP1)) (SETQ CS2 (SASSOC CSET MAP2)) (CONS CSET (FOR XC UCODE1 UCODE2 UCHAR1 UCHAR2 IN [SORT (UNION (FOR M1 IN (CDR CS1) COLLECT (CAR M1)) (FOR M2 IN (CDR CS2) COLLECT (CAR M2))) (FUNCTION (LAMBDA (XC1 XC2) (ILEQ (CHARCODE.DECODE XC1) (CHARCODE.DECODE XC2] COLLECT [SETQ UCODE1 (CADR (SASSOC XC (CDR CS1] [SETQ UCHAR1 (CL:WHEN UCODE1 (CHARACTER (CHARCODE.DECODE UCODE1)))] [SETQ UCODE2 (CADR (SASSOC XC (CDR CS2] [SETQ UCHAR2 (CL:WHEN UCODE2 (CHARACTER (CHARCODE.DECODE UCODE2)))] (CONS XC (IF UCHAR1 THEN (IF (AND UCODE2 (NEQ UCHAR1 UCHAR2)) THEN (LIST UCHAR1 UCHAR2 UCODE1 UCODE2 ) ELSE (LIST UCHAR1 UCODE1)) ELSEIF UCHAR2 THEN (LIST UCHAR2 UCODE2) ELSE (HELP "XC WITHOUT UC'S" XC]) (PRINTMERGED [LAMBDA (MERGED CHARSETS FILE) (* ; "Edited 25-Jul-2020 16:08 by rmk:") [SELECTQ CHARSETS (NOJIS (SETQ MERGED (FOR M IN MERGED UNLESS (AND (IGEQ (CL:PARSE-INTEGER (CAR M) :RADIX 8) (CL:PARSE-INTEGER "60" :RADIX 8)) (ILESSP (CL:PARSE-INTEGER (CAR M) :RADIX 8) (CL:PARSE-INTEGER "340" :RADIX 8))) COLLECT M)) (CL:UNLESS FILE (SETQ FILE 'MERGED-NOJIS))) ((ALL NIL) (CL:UNLESS FILE (SETQ FILE 'MERGED-ALL))) (PROGN (SETQ CHARSETS (MKLIST CHARSETS)) [SETQ MERGED (FOR CS IN CHARSETS COLLECT (OR (SASSOC CS MERGED) (ERROR CS "does not exist"] (CL:UNLESS FILE (SETQ FILE (PACK* FILE "-" (CAR CHARSETS))))] (SETQ FILE (PACKFILENAME 'BODY FILE 'EXTENSION 'TXT)) (CL:WITH-OPEN-FILE (STREAM FILE :DIRECTION :OUTPUT :EXTERNAL-FORMAT :UTF8 :IF-EXISTS :NEW-VERSION ) (PRINTOUT STREAM "(") (FOR CSET IN MERGED DO (PRINTOUT STREAM "(" .P2 (CAR CSET) T) (FOR MAP IN (CDR CSET) DO (PRINTOUT STREAM 3 .P2 MAP T)) (PRINTOUT STREAM ")" T)) (PRINTOUT STREAM ")") (CLOSEF STREAM]) (READMERGED [LAMBDA (FILE) (* ; "Edited 30-Jul-2020 13:40 by rmk:") (* ;; "Reads UTF8 without translation to XCCS") (CL:WITH-OPEN-FILE (STREAM FILE :DIRECTION :INPUT :EXTERNAL-FORMAT :UTF8-RAW) (* (READC STREAM) (BIND SET UNTIL  (EOFP STREAM) COLLECT  (SETQ SET (READ STREAM))  (PRINTOUT T (CAR) " "))) (READ STREAM]) ) (DEFINEQ (TRANSLATECHARSET [LAMBDA (MAPPINGS FROMCS TOCS) (* ; "Edited 26-Jul-2020 19:35 by rmk:") (CL:WHEN (SMALLP FROMCS) (SETQ FROMCS (CONCAT FROMCS))) (CL:WHEN (SMALLP TOCS) (SETQ TOCS (CONCAT TOCS))) (LET ((CSETMAP (SASSOC FROMCS MAPPINGS)) (NEWCSETMAP)) (CL:UNLESS CSETMAP (ERROR "FROM CHARACTER SET NOT FOUND" FROMCS)) (SETQ NEWCSMAP (CONS TOCS (FOR CM IN (CDR CSETMAP) COLLECT (CONS [CONCAT TOCS (OR (SUBSTRING (CAR CM) (STRPOS "," (CAR CM))) (HELP "INVALID CHARCODE" (CAR CM] (CDR CM]) ) (DEFINEQ (CONVERTU2X [LAMBDA NIL (* ; "Edited 27-Jul-2020 14:40 by rmk:") (FOR X IN CBUNICODETOXEROXRENDERING COLLECT (LIST [CHARCODESTRING (OR (FIXP (CADR X)) (CHARCODE.DECODE (CADR X] [CHARACTER (OR (FIXP (CADR X)) (CHARCODE.DECODE (CADR X] (HEXSTRING (CAR X) 4]) ) (DEFINEQ (UTF8TOHEXSTRING [LAMBDA (UTF8STRING) (* ; "Edited 28-Jul-2020 17:32 by rmk:") (* ;; "Converts from a UTF8 encoding of a number to the hex string that represents that number") (LET (BYTE1 BYTE1 BYTE2 BYTE3 BYTE4) (SETQ BYTE1 (HEXCODE (SUBSTRING UTF8STRING 1 2))) (* ;; "Distinguish on header byte, extract number of bytes so we don't read too far") (HEXSTRING (IF (ILESSP BYTE1 128) THEN (* ;; "Test first: Ascii is the common case") BYTE1 ELSEIF (IGEQ BYTE1 (LLSH 15 4)) THEN (* ; "4 bytes") (SETQ BYTE2 (HEXCODE (SUBSTRING UTF8STRING 3 4))) (CL:WHEN (ILESSP BYTE2 128) (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) (SETQ BYTE3 (HEXCODE (SUBSTRING UTF8STRING 5 6))) (CL:WHEN (ILESSP BYTE3 128) (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3))) (SETQ BYTE4 (HEXCODE (SUBSTRING UTF8STRING 7 8))) (CL:WHEN (ILESSP BYTE4 128) (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3 BYTE4))) (LOGOR (LLSH (LOADBYTE BYTE1 0 3) 18) (LLSH (LOADBYTE BYTE2 0 6) 12) (LLSH (LOADBYTE BYTE3 0 6) 6) (LOADBYTE BYTE4 0 6)) ELSEIF (IGEQ BYTE1 (LLSH 7 5)) THEN (* ; "3 bytes") (SETQ BYTE2 (HEXCODE (SUBSTRING UTF8STRING 3 4))) (CL:WHEN (ILESSP BYTE2 128) (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) (SETQ BYTE3 (HEXCODE (SUBSTRING UTF8STRING 5 6))) (CL:WHEN (ILESSP BYTE3 128) (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2 BYTE3))) (LOGOR (LLSH (LOADBYTE BYTE1 0 4) 12) (LLSH (LOADBYTE BYTE2 0 6) 6) (LOADBYTE BYTE3 0 6)) ELSE (* ; "Must be 2 bytes") (SETQ BYTE2 (HEXCODE (SUBSTRING UTF8STRING 3 4))) (CL:WHEN (ILESSP BYTE2 128) (ERROR "INVALID UTF8 SEQUENCE" (LIST BYTE1 BYTE2))) (LOGOR (LLSH (LOADBYTE BYTE1 0 5) 6) (LOADBYTE BYTE2 0 6]) ) (DECLARE%: DONTCOPY (FILEMAP (NIL (908 2902 (X2U.WIKI 918 . 2417) (XCCS2UNICODE.PARSECELL 2419 . 2900)) (2903 9687 ( X2U.BIN 2913 . 6940) (XCCORD 6942 . 8369) (GETUCODE 8371 . 8980) (WIN 8982 . 9170) (FINDUCODE 9172 . 9685)) (9688 10956 (SHOWMAPPINGS 9698 . 9942) (SHOWMAPPING 9944 . 10954)) (10957 12851 ( COMPAREMAPPINGS 10967 . 11554) (COMPARECHARSETS 11556 . 12849)) (12852 18013 (MERGEMAPPINGS 12862 . 15089) (PRINTMERGED 15091 . 17363) (READMERGED 17365 . 18011)) (18014 18987 (TRANSLATECHARSET 18024 . 18985)) (18988 19809 (CONVERTU2X 18998 . 19807)) (19810 23017 (UTF8TOHEXSTRING 19820 . 23015))))) STOP \ No newline at end of file diff --git a/library/exports.all b/library/exports.all index 10f913934..414d071ad 100644 --- a/library/exports.all +++ b/library/exports.all @@ -1,5 +1,5 @@ -(DEFINE-FILE-INFO READTABLE "XCL" PACKAGE "INTERLISP") -(LISPXPRIN1 "EXPORTS GATHERED FROM {DSK}larry>ilisp>medley>sources> ON 6-May-2021 15:26:52" T) +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "XCL" BASE 10 FORMAT XCCS) +(LISPXPRIN1 "EXPORTS GATHERED FROM {DSK}larry>new>medley>sources> ON 27-Jul-2021 21:13:38" T) (LISPXTERPRI T) (RPAQQ MODARITHMACROS (CEIL FLOOR FOLDHI FOLDLO MODUP UNFOLD MOD)) (PUTPROPS CEIL MACRO ((X N) (FLOOR (IPLUS X (CONSTANT (SUB1 N))) N))) @@ -52,7 +52,7 @@ MAX.FIXP)))) LOGOR (LSH 1 (SUB1 SMALLP.LENGTH)) (SUB1 (LSH 1 (SUB1 SMALLP.LENGTH))))) (MIN.SMALLP (IDIFFERENCE -1 MAX.SMALLP)) (BITS.PER.FIXP BITSPERCELL) (FIXP.LENGTH (SUB1 BITS.PER.FIXP)) (MAX.FIXP (LOGOR (LSH 1 ( SUB1 FIXP.LENGTH)) (SUB1 (LSH 1 (SUB1 FIXP.LENGTH))))) (MIN.FIXP (IDIFFERENCE -1 MAX.FIXP))) -(PUTPROP (QUOTE MODARITH) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE MODARITH) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (RPAQQ WINDFLG T) (CONSTANTS (WINDFLG T)) @@ -614,7 +614,7 @@ QUOTE \\VAG2) |\\D0BCPLspace| (CAR X)))))) (PUTPROPS EMADDRESSP MACRO (X (LIST (QUOTE EQ) (LIST (QUOTE \\HILOC) (CAR X)) (COND ((EQ |\\D1BCPLspace| |\\D0BCPLspace|) |\\D0BCPLspace|) (T (QUOTE (|fetch| (IFPAGE |EmulatorSpace|) |of| |\\InterfacePage|))))))) -(PUTPROP (QUOTE LLPARAMS) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLPARAMS) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (DATATYPE COMPILED-CLOSURE (FNHEADER ENVIRONMENT)) (RPAQQ \\COMPILED-CLOSURE 13) @@ -734,7 +734,7 @@ CODEARRAY NA) |of| DATUM) 0)) (OVERHEADWORDS (PROGN 8)) (ALIGNED (IPLUS (|fetch| (RPAQQ \\NT.PVARCODE 2) (RPAQQ \\NT.FVARCODE 3) (CONSTANTS \\NT.IVARCODE \\NT.PVARCODE \\NT.FVARCODE) -(PUTPROP (QUOTE LLCODE) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLCODE) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (RPAQQ \\ERRORMESSAGELIST ("SYSTEM ERROR" " " "STACK OVERFLOW" "ILLEGAL RETURN" "ARG NOT LIST" "HARD DISK ERROR" "ATTEMPT TO SET NIL OR T" "ATTEMPT TO RPLAC NIL" "UNDEFINED OR ILLEGAL GO" @@ -751,7 +751,7 @@ CODEARRAY NA) |of| DATUM) 0)) (OVERHEADWORDS (PROGN 8)) (ALIGNED (IPLUS (|fetch| (DEFOPTIMIZER LISPERROR (MESSAGE ARG) (BQUOTE (\\LISPERROR (\\\, ARG) (\\\, (CL:IF (CL:STRINGP MESSAGE ) (FOR X IN \\ERRORMESSAGELIST AS I FROM 0 WHEN (CL:EQUAL X MESSAGE) DO (RETURN I) FINALLY (RETURN ( HELP "Unknown error message" (LIST MESSAGE ARG)))) MESSAGE))))) -(PUTPROP (QUOTE AERROR) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE AERROR) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:28")) (RECORD BASEBYTESTREAM STREAM (SUBRECORD STREAM) (ACCESSFNS ((BIASOFFST (|fetch| (STREAM FW6) |of| DATUM) (|replace| (STREAM FW6) |of| DATUM |with| NEWVALUE)) (BBSNCHARS (|fetch| (STREAM FW7) |of| @@ -761,28 +761,13 @@ DATUM) (|replace| (STREAM FW7) |of| DATUM |with| NEWVALUE)) (WRITEXTENSIONFN (|f (PUTPROPS \\OUTSTREAMARG MACRO ((STRM NOERRORFLG) (\\GETSTREAM STRM (QUOTE OUTPUT) NOERRORFLG))) (PUTPROPS \\STREAMARG MACRO (OPENLAMBDA (STRM NOERRORFLG) (COND (NOERRORFLG (\\GETSTREAM STRM NIL T)) (T (\\DTEST STRM (QUOTE STREAM)))))) -(PUTPROP (QUOTE AOFD) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE AOFD) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:36:17")) (PUTPROPS .SPACECHECK. MACRO ((STRM N) (AND \\THISFILELINELENGTH (IGREATERP (IPLUS N (|fetch| CHARPOSITION |of| STRM)) \\THISFILELINELENGTH) (FRESHLINE STRM)))) (PUTPROPS \\CHECKRADIX MACRO (LAMBDA (R) (COND ((OR (NOT (SMALLP R)) (ILESSP R 1) (IGREATERP R 36)) ( \\INVALID.RADIX R)) (T R)))) -(PUTPROPS \\XCCSFILEOUTCHARFN MACRO ((OUTSTREAM CHARCODE) (* |;;;| -"Encoder for XCCS format. Default decoder.") (COND ((EQ CHARCODE (CHARCODE EOL)) (COND ((NOT ( -\\RUNCODED OUTSTREAM)) (* \; "Charset is a constant 0") (\\BOUT OUTSTREAM (\\CHARSET (CHARCODE EOL)))) - ((EQ (\\CHARSET (CHARCODE EOL)) (|ffetch| (STREAM CHARSET) |of| OUTSTREAM))) (T (\\BOUT OUTSTREAM -NSCHARSETSHIFT) (\\BOUT OUTSTREAM (|freplace| (STREAM CHARSET) |of| OUTSTREAM |with| (\\CHARSET ( -CHARCODE EOL)))))) (\\BOUT OUTSTREAM (SELECTC (|ffetch| EOLCONVENTION |of| OUTSTREAM) (CR.EOLC ( -CHARCODE CR)) (LF.EOLC (CHARCODE LF)) (CRLF.EOLC (\\BOUT OUTSTREAM (CHARCODE CR)) (* |;;| -"Don't put out high-order byte preceding LF. The CRLF is EOL only if the bytes are immediately adjacent in the stream, with no additional encoding bytes" -) (CHARCODE LF)) (SHOULDNT))) (|freplace| CHARPOSITION |of| OUTSTREAM |with| 0)) (T (COND ((NOT ( -\\RUNCODED OUTSTREAM)) (\\BOUT OUTSTREAM (\\CHARSET CHARCODE)) (\\BOUT OUTSTREAM (\\CHAR8CODE CHARCODE -))) ((EQ (\\CHARSET CHARCODE) (|ffetch| (STREAM CHARSET) |of| OUTSTREAM)) (\\BOUT OUTSTREAM ( -\\CHAR8CODE CHARCODE))) (T (\\BOUT OUTSTREAM NSCHARSETSHIFT) (\\BOUT OUTSTREAM (|freplace| (STREAM -CHARSET) |of| OUTSTREAM |with| (\\CHARSET CHARCODE))) (\\BOUT OUTSTREAM (\\CHAR8CODE CHARCODE)))) ( -|freplace| CHARPOSITION |of| OUTSTREAM |with| (PROGN (* \; "Ugh. Don't overflow") (IPLUS16 (|ffetch| -CHARPOSITION |of| OUTSTREAM) 1))))))) -(PUTPROP (QUOTE APRINT) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE APRINT) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:27:52")) (GLOBALVARS \\BCPLDISPLAY) (ACCESSFNS LINEBUFFER ((LPARCOUNT (|fetch| FW6 |of| DATUM) (|replace| FW6 |of| DATUM |with| NEWVALUE)) @@ -802,7 +787,7 @@ PEEKEDECHOFLG FLAG) (INSTRINGP FLAG))))) (PUTPROPS \\INTERMP MACRO ((OFD) (EQ OFD \\LINEBUF.OFD))) (PUTPROPS \\OUTTERMP MACRO ((OFD) (EQ OFD \\TERM.OFD))) (GLOBALVARS \\DEFAULTLINEBUF) -(PUTPROP (QUOTE ATERM) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE ATERM) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:37:14")) (DATATYPE HARRAYP ((NULLSLOTS WORD) (* \; "Number of NIL-NIL slots, which break chains") (LASTINDEX WORD) (* \; @@ -904,7 +889,7 @@ ARRAYBLOCK ARLEN) |of| DATUM) |\\ArrayBlockTrailerCells|))))) (TYPE? (AND (EQ 0 (GLOBALVARS |\\NxtArrayPage| \\FREEBLOCKBUCKETS \\HUNKING?) (PUTPROPS HUNKSIZEFROMNUMBER MACRO ((NTYPX) (FOLDLO (|fetch| DTDSIZE |of| (\\GETDTD NTYPX)) WORDSPERCELL))) -(PUTPROP (QUOTE LLARRAYELT) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLARRAYELT) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (DEFOPTIMIZER PUTBASEPTRX (&REST ARGS) (CONS (QUOTE (OPENLAMBDA (DATUM OFFSET NEWVALUE) ( UNINTERRUPTABLY (\\PUTBASE DATUM OFFSET (LOGOR (LOGAND 61440 (\\GETBASE DATUM OFFSET)) (LOGAND ( @@ -954,7 +939,7 @@ BQUOTE ((OPCODES TYPEMASK.N (\\\, (CAR CE))) (\\\, (CAR X)))) |else| (QUOTE IGNO (CONSTANTS \\GUARDSTORAGEFULL \\GUARD1STORAGEFULL) (GLOBALVARS |\\NxtMDSPage| |\\LeastMDSPage| |\\SecondArrayPage| |\\SecondMDSPage| \\MDSFREELISTPAGE |\\MaxSysTypeNum| |\\MaxTypeNumber| \\STORAGEFULL \\INTERRUPTSTATE \\PENDINGINTERRUPT) -(PUTPROP (QUOTE LLDATATYPE) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLDATATYPE) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (ACCESSFNS POINTER ((PAGE# (IPLUS (LLSH (\\HILOC DATUM) 8) (LRSH (\\LOLOC DATUM) 8))) (WORDINPAGE ( LOGAND (\\LOLOC DATUM) 255)) (CELLINPAGE (LRSH (|fetch| WORDINPAGE |of| DATUM) 1)) (BYTEINPAGE (LLSH ( @@ -991,7 +976,7 @@ FIXP) (* \; "Empty cells, space for another 2 CONS cells if we can figure out ho (CONSTANTS \\CDR.ONPAGE \\CDR.NIL \\CDR.INDIRECT \\CDR.MAXINDIRECT \\CONSPAGE.LAST) (PUTPROPS LOCAL MACRO ((X) X)) (PUTPROPS ALLOCAL MACRO ((X) X)) -(PUTPROP (QUOTE LLNEW) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLNEW) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (PUTPROPS CHECK MACRO (ARGS (COND ((AND (BOUNDP (QUOTE CHECK)) CHECK) (CONS (QUOTE PROGN) (|for| I |in| ARGS |collect| (LIST (QUOTE OR) I (LIST (QUOTE RAID) (KWOTE (LIST (QUOTE |Check-failure:|) I))))) @@ -1101,7 +1086,7 @@ LOGAND X 65535))))) (T (* \; "New symbol") X)))) \\NEWATOM-PLISTOFFSET 6) (\\NEWATOM-TYPE# 21)) (PUTPROPS \\MOVEWORDS MACRO (OPENLAMBDA (SBASE SOFFSET DBASE DOFFSET NWORDS) (\\BLT (\\ADDBASE DBASE DOFFSET) (\\ADDBASE SBASE SOFFSET) NWORDS))) -(PUTPROP (QUOTE LLBASIC) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLBASIC) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (ACCESSFNS STRINGP ((XREADONLY (|fetch| (ARRAY-HEADER READ-ONLY-P) |of| DATUM) (|replace| ( ARRAY-HEADER READ-ONLY-P) |of| DATUM |with| NEWVALUE)) (XBASE ((OPENLAMBDA (STRING) (COND ((|fetch| ( @@ -1227,13 +1212,12 @@ OFFSET CODE)) (T (\\PUTBASETHIN BASE OFFSET CODE))))) (RPAQQ \\MAXTHINCHAR 255) (RPAQQ \\MAXFATCHAR 65535) (RPAQQ \\MAXCHARSET 255) -(RPAQQ NSCHARSETSHIFT 255) (RPAQQ \#STRINGPWORDS 4) (CONSTANTS (\\CHARMASK 255) (\\MAXCHAR 255) (\\MAXTHINCHAR 255) (\\MAXFATCHAR 65535) (\\MAXCHARSET 255 -) (NSCHARSETSHIFT 255) (\#STRINGPWORDS 4)) +) (\#STRINGPWORDS 4)) (PUTPROPS \\NATOMCHARS DMACRO ((AT) (|fetch| (LITATOM PNAMELENGTH) |of| AT))) (PUTPROPS \\NSTRINGCHARS DMACRO ((S) (|fetch| (STRINGP LENGTH) |of| S))) -(PUTPROP (QUOTE LLCHAR) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLCHAR) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:37:02")) (ACCESSFNS BF ((BFBLOCK (ADDSTACKBASE DATUM))) (* \; "basic frame pointer") (BLOCKRECORD BFBLOCK (( FLAGS BITS 3) (NIL BITS 3) (RESIDUAL FLAG) (* \; "true if this is not a full BF") (PADDING BITS 1) ( @@ -1350,7 +1334,7 @@ BINDNEGVALUES |of| DATUM) 65535)))))) (RPAQQ \\NT.PVAR 128) (RPAQQ \\NT.FVAR 192) (CONSTANTS \\NT.IVAR \\NT.PVAR \\NT.FVAR) -(PUTPROP (QUOTE LLSTK) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLSTK) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (PUTPROPS WORDCONTENTS BYTEMACRO ((PTR) (\\GETBASE PTR 0))) (PUTPROPS SETWORDCONTENTS BYTEMACRO ((PTR N) (\\PUTBASE PTR 0 N))) @@ -1359,7 +1343,7 @@ BINDNEGVALUES |of| DATUM) 65535)))))) |fetch| CBUFDIRTY |of| STREAM) (\\SETIODIRTY STREAM (|fetch| CPAGE |of| STREAM)) (|replace| CBUFDIRTY |of| STREAM |with| NIL))) (|replace| CBUFSIZE |of| STREAM |with| 0) (|replace| CBUFPTR |of| STREAM |with| NIL)))) -(PUTPROP (QUOTE PMAP) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE PMAP) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:37:14")) (PUTPROPS ADDREF MACRO (OPENLAMBDA (PTR) (PROG1 PTR (\\ADDREF PTR)))) (PUTPROPS \\ADDREF DMACRO ((X) ((OPCODES GCREF 0) X))) @@ -1389,7 +1373,7 @@ DATUM 0) -2) (\\PUTBASEFIXP DATUM 0 (LOGOR NEWVALUE 1)))))) ) (FREEPTR FIXP) (* \; "The GC table entry") (NEXTFREE FIXP) (* \; "If the entry is in use, points to the next entry in this collision chain. If not, offset (in 1/2-entries) of the next free one on the chain." ))) -(PUTPROP (QUOTE LLGC) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLGC) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (PUTPROPS \\SYNCODE DMACRO (OPENLAMBDA (TABLE CHAR) (CHECK (|type?| CHARTABLE TABLE)) (* \; "0 is either NONE.TC, REAL.CCE, or OTHER.RC") (COND ((IGREATERP CHAR \\MAXTHINCHAR) (OR (AND (|fetch| @@ -1500,7 +1484,7 @@ FLAG) (DISPATCHMACRODEFS POINTER) (* \; "The character code used in this read table for multiple escape") (PACKAGECHAR BYTE) (* \; "The character code used in this read table for package delimiter") (READTBLNAME POINTER) (* \; "The canonical 'name' of this read table")) READSA _ (|create| CHARTABLE)) -(PUTPROP (QUOTE ATBL) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE ATBL) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:38:55")) (DATATYPE STREAM ((* |;;| "First 8 words are fixed for BIN, BOUT opcodes. Used to require length of whole datatype be multiple of 4, but Dolphin dead now." @@ -1543,33 +1527,21 @@ IMAGEOPS POINTER) (* \; "Image operations vector") (IMAGEDATA POINTER) (* \; "Max # of buffers the system will allocate.") (LASTCCODE WORD) (* \; "After READ, RATOM, etc, the charcode that will be returned (as a character) by LASTC. If there is none, this field is 65535." ) (EXTRASTREAMOP POINTER) (* \; "For use of applications programs, not devices") (INCCODEFN POINTER) ( -* \; "Set by \\EXTERNALFORMAT") (PEEKCCODEFN POINTER) (BACKCHARFN POINTER)) (BLOCKRECORD STREAM ((NIL -2 WORD) (UCODEFLAGS1 BITS 1) (* |;;| "respecification of access bits:") (RANDOMWRITEABLE FLAG) (* \; -"File open for output (access = OUTPUT or BOTH)") (APPENDABLE FLAG) (* \; +* \; "Set by \\EXTERNALFORMAT") (PEEKCCODEFN POINTER) (BACKCCODEFN POINTER) (EXTERNALFORMAT POINTER)) +(BLOCKRECORD STREAM ((NIL 2 WORD) (UCODEFLAGS1 BITS 1) (* |;;| "respecification of access bits:") ( +RANDOMWRITEABLE FLAG) (* \; "File open for output (access = OUTPUT or BOTH)") (APPENDABLE FLAG) (* \; "File open for append (OUTPUT or APPEND or BOTH)") (READABLE FLAG) (* \; "File open for read (READ or BOTH)") (NIL POINTER))) (BLOCKRECORD STREAM ((NIL 4 WORD) (NIL BITS 14) ( * |;;| "JIS character encoding format specific, overrides CHARSET field.") (IN.KANJIIN FLAG) (* \; "True if input stream is in Kanji-in mode.") (OUT.KANJIIN FLAG) (* \; "True if output stream is in Kanji-in mode."))) (ACCESSFNS STREAM ((ACCESS \\GETACCESS \\SETACCESS) ( FULLNAME (OR (|fetch| (STREAM FULLFILENAME) |of| DATUM) DATUM)) (NAMEDP (AND (|fetch| (STREAM -FULLFILENAME) |of| DATUM) T)))) (ACCESSFNS STREAM (EXTERNALFORMAT (LISTGET (|ffetch| (STREAM -OTHERPROPS) |of| DATUM) (QUOTE EXTERNALFORMAT)) (LET ((PROPS (|ffetch| (STREAM OTHERPROPS) |of| DATUM) -)) (|freplace| (STREAM NOTXCCS) |of| DATUM |with| T) (COND (PROPS (LISTPUT PROPS (QUOTE EXTERNALFORMAT -) NEWVALUE)) (T (|freplace| (STREAM OTHERPROPS) |of| DATUM |with| (LIST (QUOTE EXTERNALFORMAT) -NEWVALUE)))) (|freplace| (STREAM OUTCHARFN) |of| DATUM |with| (|ffetch| (EXTERNALFORMAT FILEOUTCHARFN) - |of| NEWVALUE)) (AND (|ffetch| (EXTERNALFORMAT EOLVALID) |of| NEWVALUE) (|freplace| (STREAM -EOLCONVENTION) |of| DATUM |with| (|ffetch| (EXTERNALFORMAT EOL) |of| NEWVALUE)))))) (ACCESSFNS STREAM -(EXTERNALFORMAT.NAME (LISTGET (|ffetch| (STREAM OTHERPROPS) |of| DATUM) (QUOTE EXTERNALFORMAT.NAME)) ( -LET ((PROPS (|ffetch| (STREAM OTHERPROPS) |of| DATUM)) (NAME (COND ((LITATOM NEWVALUE) NEWVALUE) (T ( -MKATOM NEWVALUE))))) (|freplace| (STREAM NOTXCCS) |of| DATUM |with| T) (COND (PROPS (LISTPUT PROPS ( -QUOTE EXTERNALFORMAT.NAME) NAME)) (T (|freplace| (STREAM OTHERPROPS) |of| DATUM |with| (LIST (QUOTE -EXTERNALFORMAT.NAME) NAME))))))) (ACCESSFNS STREAM (FILEOUTCHARFN (|ffetch| (STREAM OUTCHARFN) |of| -DATUM))) (SYNONYM CBUFPTR (CPPTR)) USERCLOSEABLE _ T USERVISIBLE _ T ACCESSBITS _ |NoBits| CPAGE _ 0 -EPAGE _ 0 BUFFS _ NIL BYTESIZE _ 8 CBUFPTR _ NIL MAXBUFFERS _ (LET NIL (DECLARE (GLOBALVARS -\\STREAM.DEFAULT.MAXBUFFERS)) \\STREAM.DEFAULT.MAXBUFFERS) CHARPOSITION _ 0 LINELENGTH _ (LET NIL ( -DECLARE (GLOBALVARS FILELINELENGTH)) FILELINELENGTH) OUTCHARFN _ (FUNCTION \\FILEOUTCHARFN) -ENDOFSTREAMOP _ (FUNCTION \\EOSERROR) IMAGEOPS _ \\NOIMAGEOPS EOLCONVENTION _ LF.EOLC STRMBINFN _ ( -FUNCTION \\STREAM.NOT.OPEN) STRMBOUTFN _ (FUNCTION \\STREAM.NOT.OPEN) LASTCCODE _ 65535 NOTXCCS _ NIL) +FULLFILENAME) |of| DATUM) T)))) (SYNONYM CBUFPTR (CPPTR)) USERCLOSEABLE _ T USERVISIBLE _ T ACCESSBITS + _ |NoBits| CPAGE _ 0 EPAGE _ 0 BUFFS _ NIL BYTESIZE _ 8 CBUFPTR _ NIL MAXBUFFERS _ (LET NIL (DECLARE +(GLOBALVARS \\STREAM.DEFAULT.MAXBUFFERS)) \\STREAM.DEFAULT.MAXBUFFERS) CHARPOSITION _ 0 LINELENGTH _ ( +LET NIL (DECLARE (GLOBALVARS FILELINELENGTH)) FILELINELENGTH) ENDOFSTREAMOP _ (FUNCTION \\EOSERROR) +IMAGEOPS _ \\NOIMAGEOPS EOLCONVENTION _ LF.EOLC STRMBINFN _ (FUNCTION \\STREAM.NOT.OPEN) STRMBOUTFN _ +(FUNCTION \\STREAM.NOT.OPEN) LASTCCODE _ 65535 NOTXCCS _ NIL) (PUTPROPS STREAMOP MACRO (ARGS (CONS (QUOTE SPREADAPPLY*) (CONS (COND ((EQ (CAR (LISTP (CAR ARGS))) ( QUOTE QUOTE)) (LIST (QUOTE |fetch|) (CADAR ARGS) (QUOTE |of|) (CADR ARGS))) (T (HELP "STREAMOP - OPNAME not quoted:" ARGS))) (CDDR ARGS))))) @@ -1579,9 +1551,8 @@ QUOTE QUOTE)) (LIST (QUOTE |fetch|) (CADAR ARGS) (QUOTE |of|) (CADR ARGS))) (T ( (RPAQQ |WriteBit| 4) (RPAQ |OutputBits| (LOGOR |AppendBit| |WriteBit|)) (RPAQ |BothBits| (LOGOR |ReadBit| |OutputBits|)) -(RPAQQ \\NORUNCODE 255) (CONSTANTS |AppendBit| |NoBits| |ReadBit| |WriteBit| (|OutputBits| (LOGOR |AppendBit| |WriteBit|)) ( -|BothBits| (LOGOR |ReadBit| |OutputBits|)) \\NORUNCODE) +|BothBits| (LOGOR |ReadBit| |OutputBits|))) (PUTPROPS |TestMasked| MACRO ((BITS MASK) (NEQ (LOGAND BITS MASK) 0))) (PUTPROPS APPENDABLE MACRO ((STREAM) (|TestMasked| (|fetch| ACCESSBITS |of| STREAM) |AppendBit|))) (PUTPROPS APPENDONLY MACRO ((STREAM) (EQ (|fetch| ACCESSBITS |of| STREAM) |AppendBit|))) @@ -1593,15 +1564,12 @@ QUOTE QUOTE)) (LIST (QUOTE |fetch|) (CADAR ARGS) (QUOTE |of|) (CADR ARGS))) (T ( (PUTPROPS READONLY MACRO ((STREAM) (EQ (|fetch| ACCESSBITS |of| STREAM) |ReadBit|))) (PUTPROPS WRITEABLE MACRO ((STREAM) (OR (OVERWRITEABLE STREAM) (AND (APPENDABLE STREAM) (\\EOFP STREAM ))))) -(PUTPROPS \\RUNCODED MACRO (OPENLAMBDA (STREAM) (* |;;| -"returns NIL is the stream is not runcoded, that is, if the stream has 16 bit bytes explicitly represented" -) (* \; "note that neq is ok since charsets are known to be SMALLP's") (NEQ (|fetch| CHARSET |of| -STREAM) \\NORUNCODE))) -(RPAQQ EOLCONVENTIONS ((CR.EOLC 0) (LF.EOLC 1) (CRLF.EOLC 2))) +(RPAQQ EOLCONVENTIONS ((CR.EOLC 0) (LF.EOLC 1) (CRLF.EOLC 2) (ANY.EOLC 3))) (RPAQQ CR.EOLC 0) (RPAQQ LF.EOLC 1) (RPAQQ CRLF.EOLC 2) -(CONSTANTS (CR.EOLC 0) (LF.EOLC 1) (CRLF.EOLC 2)) +(RPAQQ ANY.EOLC 3) +(CONSTANTS (CR.EOLC 0) (LF.EOLC 1) (CRLF.EOLC 2) (ANY.EOLC 3)) (PUTPROPS FDEVOP DMACRO (ARGS (LET ((OPNAME (CAR ARGS)) (METHOD-DEVICE (CADR ARGS)) (TAIL (CDDR ARGS)) ) (COND ((AND (LISTP OPNAME) (EQ (CAR OPNAME) (QUOTE QUOTE))) (BQUOTE (SPREADAPPLY* (|fetch| (FDEV ( \\\, (CADR OPNAME))) |of| (\\\, METHOD-DEVICE)) (\\\,@ TAIL)))) (T (ERROR "OPNAME not quoted: " OPNAME @@ -1648,9 +1616,10 @@ POINTER) (* \; BREAKCONNECTION POINTER) (* \; "(host fastp dev) => closes connections to host") (* |;;| "-----The following are required methods for operating on open streams-----") (BIN POINTER) (* \; "(stream) => next byte of input") (BOUT POINTER) (* \; "(stream byte) output byte to stream") (PEEKBIN - POINTER) (* \; "(stream) => next byte without advancing position in stream") (READCHAR POINTER) (* \; - "(stream) => next input char") (WRITECHAR POINTER) (* \; "(stream char) => writes char to stream") ( -PEEKCHAR POINTER) (UNREADCHAR POINTER) (READP POINTER) (* \; + POINTER) (* \; "(stream) => next byte without advancing position in stream") (NIL POINTER) (* \; +"Was READCHAR, replaced by READCHARCODE") (NIL POINTER) (* \; +"Was WRITECHAR (stream char) => writes char to stream") (NIL POINTER) (* \; "Was PEEKCHAR") (NIL +POINTER) (* \; "Was UNREADCHAR") (READP POINTER) (* \; "(stream flag) => T if there is input available from stream right now") (EOFP POINTER) (* \; "(stream) => T if BIN would signal eof.") (BLOCKIN POINTER) (* \; "(stream buffer byteoffset nbytes)") (BLOCKOUT POINTER) (* \; "(stream buffer byteoffset nbytes)") (FORCEOUTPUT POINTER) (* \; @@ -1679,26 +1648,27 @@ TRUNCATEFILE POINTER) (* \; "(stream page offset) make stream's eof be at page,offset, discarding anything after it") (* |;;| "-----For window system, argh-----") (WINDOWOPS POINTER) (* \; "window system operations") (WINDOWDATA POINTER) (* \; "data for window systems") (* |;;| -"-----For any stream (here to not recompile everything)-----") (READCHARCODE POINTER) (* \; -"Read a character code from the stream (cf BIN for bytes).")) DIRECTORYNAMEP _ (FUNCTION NILL) -HOSTNAMEP _ (FUNCTION NILL) READP _ (FUNCTION \\GENERIC.READP) SETFILEPTR _ (FUNCTION -\\IS.NOT.RANDACCESSP) GETFILEPTR _ (FUNCTION \\ILLEGAL.DEVICEOP) GETEOFPTR _ (FUNCTION +"-----For any stream (here to not recompile everything)-----") (NIL POINTER) (* \; +"Was READCHARCODE. Read a character code from the stream (cf BIN for bytes).")) DIRECTORYNAMEP _ ( +FUNCTION NILL) HOSTNAMEP _ (FUNCTION NILL) READP _ (FUNCTION \\GENERIC.READP) SETFILEPTR _ (FUNCTION +\\IS.NO.RANDACCESSP) GETFILEPTR _ (FUNCTION \\ILLEGAL.DEVICEOP) GETEOFPTR _ (FUNCTION \\IS.NOT.RANDACCESSP) EOFP _ (FUNCTION \\ILLEGAL.DEVICEOP) BLOCKIN _ (FUNCTION \\GENERIC.BINS) BLOCKOUT _ (FUNCTION \\GENERIC.BOUTS) RENAMEFILE _ (FUNCTION \\GENERIC.RENAMEFILE) FORCEOUTPUT _ ( FUNCTION NILL) REGISTERFILE _ (FUNCTION NILL) OPENP _ (FUNCTION NILL) UNREGISTERFILE _ (FUNCTION NILL) - READCHAR _ (FUNCTION \\GENERIC.READCHAR) WRITECHAR _ (FUNCTION \\GENERIC.WRITECHAR) PEEKCHAR _ ( -FUNCTION \\GENERIC.PEEKCHAR) UNREADCHAR _ (FUNCTION \\GENERIC.UNREADCHAR) CHARSETFN _ (FUNCTION -\\GENERIC.CHARSET) BREAKCONNECTION _ (FUNCTION NILL) READCHARCODE _ (FUNCTION \\GENERIC.READCCODE)) + CHARSETFN _ (FUNCTION \\GENERIC.CHARSET) BREAKCONNECTION _ (FUNCTION NILL)) (RECORD FILEGENOBJ (NEXTFILEFN FILEINFOFN . GENFILESTATE)) (DATATYPE EXTERNALFORMAT ((EOLVALID FLAG) (* \; -"If true, the value of EOL field will replace the EOLCONVENTION field of the resulted stream.") (EOL -BITS 2) (NIL BITS 1) (INCCODEFN POINTER) (* \; "Called with two arguments -- STREAM and COUNTP") ( -PEEKCCODEFN POINTER) (* \; "Called with three arguments -- STREAM, NOERROR and COUNTP") (BACKCHARFN -POINTER) (* \; "Called with two arguments -- STREAM and COUNTP") (FILEOUTCHARFN POINTER) (* \; +"If true, the value of EOL field will replace the EOLCONVENTION field of the resulted stream. (Can't test EOL because it is always something)" +) (EOL BITS 2) (NIL BITS 1) (INCCODEFN POINTER) (* \; +"Called with STREAM and 2 optional arguments, BYTECOUNTVAR and BYTECOUNTVAL") (PEEKCCODEFN POINTER) (* + \; "Called with three arguments -- STREAM, NOERROR, and EOL") (BACKCCODEFN POINTER) (* \; +"Called with STREAM and optional BYTECOUNTVAR and BYTECOUNTVAL") (OUTCHARFN POINTER) (* \; "Called with two arguments -- STREAM and CHARCODE") (NAME POINTER) (* \; -"keyword name of this format, provided to \\INSTALL.EXTERNALFORMAT")) EOLVALID _ NIL) -(PUTPROPS \\OUTCHAR DMACRO (OPENLAMBDA (STREAM CHARCODE) (STREAMOP (QUOTE OUTCHARFN) STREAM STREAM -CHARCODE))) +"keyword name of this format, provided to \\INSTALL.EXTERNALFORMAT") (FORMATBYTESTREAMFN POINTER (* \; + +"Function to copy the format state of a given stream to an IO stream that allows formatted byte sequences to be examined" +)))) +(RPAQ? *DEFAULT-EXTERNALFORMAT* :XCCS) (PUTPROPS \\DEVICE-OPEN-STREAMS MACRO (ARGS (LET ((DEVICE (CAR ARGS))) (BQUOTE (FDEVOP (QUOTE OPENP) ( \\\, DEVICE) NIL NIL (\\\, DEVICE)))))) (PUTPROPS \\CONVERT-PATHNAME DMACRO (OPENLAMBDA (PATHNAME?) (* |;;| @@ -1719,6 +1689,9 @@ STREAM)))) DEVICE) |of| STRM) STRM BASE OFF NBYTES))) (PUTPROPS \\BOUTS BYTEMACRO (OPENLAMBDA (STRM BASE OFF NBYTES) (FDEVOP (QUOTE BLOCKOUT) (|fetch| ( STREAM DEVICE) |of| STRM) STRM BASE OFF NBYTES))) +(PUTPROPS \\BOUTEOL MACRO (OPENLAMBDA (STRM) (SELECTC (FETCH (STREAM EOLCONVENTION) OF STRM) (LF.EOLC +(\\BOUT STRM (CHARCODE LF))) (CR.EOLC (\\BOUT STRM (CHARCODE CR))) (CRLF.EOLC (\\BOUT STRM (CHARCODE +CR)) (\\BOUT STRM (CHARCODE LF))) (ANY.EOLC (SHOULDNT)) NIL))) (PUTPROPS \\EOFP BYTEMACRO (OPENLAMBDA (STRM) (FDEVOP (QUOTE EOFP) (|fetch| (STREAM DEVICE) |of| STRM) STRM))) (PUTPROPS SIZE.FROM.LENGTH MACRO (LAMBDA (LEN) (DECLARE (LOCALVARS LEN)) (AND LEN (FOLDHI LEN @@ -1732,7 +1705,7 @@ BYTESPERPAGE)))) (ACCESSFNS BYTEPTR ((PAGE (FOLDLO DATUM BYTESPERPAGE)) (OFFSET (MOD DATUM BYTESPERPAGE))) (TYPE? (AND (FIXP DATUM) (IGEQ DATUM 0) (ILEQ DATUM \\MAXFILEPTR))) (CREATE (IPLUS (UNFOLD PAGE BYTESPERPAGE) OFFSET))) -(PUTPROP (QUOTE FILEIO) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE FILEIO) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:38:55")) (BLOCKRECORD FIXP ((HINUM WORD) (LONUM WORD)) (CREATE (CREATECELL \\FIXP)) (TYPE? (EQ (NTYPX DATUM) \\FIXP))) @@ -1764,7 +1737,7 @@ ADD1 (IDIFFERENCE MAX.SMALL.INTEGER HY)))) (T (IPLUS HX HY)))) (* |Add| |high| | COND ((EQ HX MAX.SMALL.INTEGER) 0) (T (ADD1 HX)))) (IDIFFERENCE LX (ADD1 (IDIFFERENCE MAX.SMALL.INTEGER LY)))) (T (IPLUS LX LY)))) (\\PUTBASE X 0 HX) (RETURN X)))) (PUTPROPS |PutUnboxed| DMACRO (= . \\PUTFIXP)) -(PUTPROP (QUOTE LLARITH) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLARITH) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (PUTPROPS POLYEVAL DMACRO ((X COEFFS DEGREE) (* \; "execute the POLYEVAL opcode on the value X, the array COEFFS with degree DEGREE") (\\FLOATBOX (( @@ -1787,7 +1760,7 @@ FX NEXTBLOCK) |of| AL)) (\\\,@ (|for| X |in| (REVERSE ARGS) |collect| (LET ((FOR SETQ (\\\, (CAR X)) (\\FLOATBOX (\\\, FORMS))))) (T (BQUOTE (SETQ (\\\, X) (\\\, FORMS)))))))) ( \\MAKEFREEBLOCK NEXT (TIMES (\\\, (LENGTH ARGS)) WORDSPERCELL)) (|replace| (FX NEXTBLOCK) |of| AL |with| NEXT) (PROGN (\\\,@ FORMS)))))))) -(PUTPROP (QUOTE LLFLOAT) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLFLOAT) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (DEFOPTIMIZER FONTPROP (&REST ARGS) (SELECTQ (AND (EQ (CAADR ARGS) (QUOTE QUOTE)) (CADADR ARGS)) ( ASCENT (LIST (QUOTE FONTASCENT) (CAR ARGS))) (DESCENT (LIST (QUOTE FONTDESCENT) (CAR ARGS))) (HEIGHT ( @@ -1854,7 +1827,7 @@ WIDTH))) CHAR8CODE)))) (RPAQQ \\MAXNSCHAR 65535) (CONSTANTS (\\MAXNSCHAR 65535)) -(PUTPROP (QUOTE FONT) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE FONT) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:28")) (BLOCKRECORD KEYACTION ((* |;;| "KEYACTION Table: For interpreting keystrokes. Stored as a 8-cell block of untyped pointer hunk storage." @@ -1902,7 +1875,7 @@ YPOS))))) \\EM.KBDAD1 \\EM.KBDAD2 \\EM.KBDAD3 \\EM.KBDAD4 \\EM.KBDAD5 \\EM.DISPINTERRUPT \\EM.DISPLAYHEAD \\EM.CURSORBITMAP \\MACHINETYPE \\DEFAULTKEYACTION \\COMMANDKEYACTION \\CURRENTKEYACTION \\PERIODIC.INTERRUPT \\PERIODIC.INTERRUPT.FREQUENCY) -(PUTPROP (QUOTE LLKEY) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLKEY) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:27:52")) (DATATYPE PILOTBBT ((PBTDESTLO WORD) (PBTDESTHI WORD) (PBTDESTBIT WORD) (PBTDESTBPL SIGNEDWORD) ( PBTSOURCELO WORD) (PBTSOURCEHI WORD) (PBTSOURCEBIT WORD) (PBTSOURCEBPL SIGNEDWORD) (PBTWIDTH WORD) ( @@ -2003,7 +1976,7 @@ IGNOREMACRO)))) (PUTPROPS DISPLAYSTARTEDP MACRO (NIL |\\DisplayStarted|)) (GLOBALVARS |\\DisplayStarted| |\\DisplayStreamsInitialized| |\\DisplayInitialed| WHOLEDISPLAY WHOLESCREEN SCREENWIDTH SCREENHEIGHT) -(PUTPROP (QUOTE LLDISPLAY) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLDISPLAY) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (RECORD REGION (LEFT BOTTOM WIDTH HEIGHT) LEFT _ -16383 BOTTOM _ -16383 WIDTH _ 32767 HEIGHT _ 32767 ( ACCESSFNS ((TOP (IPLUS (|fetch| (REGION BOTTOM) |of| DATUM) (|fetch| (REGION HEIGHT) |of| DATUM) -1)) @@ -2048,7 +2021,7 @@ PRINTCURSOR)))))))) (ADDTOVAR GLOBALVARS GRAYSHADE) (RECORD HLS (HUE LIGHTNESS SATURATION)) (RECORD RGB (RED GREEN BLUE)) -(PUTPROP (QUOTE ADISPLAY) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE ADISPLAY) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:36:17")) (ADDTOVAR SYSSPECVARS \\INTERRUPTABLE) (PUTPROPS UNINTERRUPTABLY INFO EVAL) @@ -2073,7 +2046,7 @@ BITS 8) (* \; "Mask to prevent re-interrupt for an interrupt in progress") (NIL (PUTPROPS \\TAKEINTERRUPT DMACRO ((PREFORM POSTFORM) (DECLARE (GLOBALVARS \\PENDINGINTERRUPT)) (COND ( (AND \\PENDINGINTERRUPT (INTERRUPTABLE~=NILUPTHESTACK)) PREFORM ((LAMBDA (\\INTERRUPTABLE) ( \\CALLINTERRUPTED)) T) POSTFORM)))) -(PUTPROP (QUOTE AINTERRUPT) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE AINTERRUPT) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:28")) (PUTPROPS UNLESSRDSYS MACRO ((NORMAL RDSYS) NORMAL)) (PUTPROPS UNLESSINEW MACRO ((NORMAL I-NEW) NORMAL)) @@ -2094,7 +2067,7 @@ BITS 8) (* \; "Mask to prevent re-interrupt for an interrupt in progress") (NIL (PUTPROPS VAG2 DMACRO (= . \\VAG2)) (PUTPROPS PAGEBASE MACRO ((PTR) (|fetch| (POINTER PAGEBASE) |of| PTR))) (PUTPROPS PAGELOC MACRO (OPENLAMBDA (PTR) (IPLUS (LLSH (\\HILOC PTR) 8) (LRSH (\\LOLOC PTR) 8)))) -(PUTPROP (QUOTE RENAMEMACROS) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE RENAMEMACROS) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (PUTPROPS MOUSESTATE MACRO (ARGS (LIST (QUOTE PROGN) (QUOTE (GETMOUSESTATE)) (MOUSESTATE-EXPR (CAR ARGS) T)))) @@ -2113,7 +2086,7 @@ ARGS))))) (PUTPROPS WITHIN MACRO ((A B C) (AND (IGEQ A B) (ILESSP A (IPLUS B C))))) (ADDTOVAR GLOBALVARS LASTMOUSEX LASTMOUSEY LASTMOUSEBUTTONS) (PUTPROPS IABS MACRO (OPENLAMBDA (A) (COND ((IGEQ A 0) A) (T (IMINUS A))))) -(PUTPROP (QUOTE HLDISPLAY) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE HLDISPLAY) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:28")) (PUTPROPS .COPYKEYDOWNP. MACRO (NIL (OR (KEYDOWNP (QUOTE LSHIFT)) (KEYDOWNP (QUOTE RSHIFT)) (KEYDOWNP (QUOTE COPY))))) @@ -2187,7 +2160,7 @@ SCDESTINATION) |of| DATUM) (|fetch| (BITMAP BITMAPBITSPERPIXEL) |of| (|fetch| (S |of| DATUM))) (T 1))) (SCREGION (|create| REGION LEFT _ 0 BOTTOM _ 0 WIDTH _ (|fetch| (SCREEN SCWIDTH) |of| DATUM) HEIGHT _ (|fetch| (SCREEN SCHEIGHT) |of| DATUM))))) (SYSTEM)) (GLOBALVARS WINDOWUSERFORMS ENDOFWINDOWUSERFORMS PROMPTWINDOW) -(PUTPROP (QUOTE WINDOW) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE WINDOW) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:36:17")) (PUTPROPS NNLITATOM MACRO (OPENLAMBDA (X) (AND X (LITATOM X)))) (PUTPROPS \\NULL.OR.FIXP MACRO (OPENLAMBDA (X) (OR (NULL X) (FIXP X)))) @@ -2202,7 +2175,7 @@ ERROR VAR MSG))))))))) (PUTPROPS \\MACRO.EVAL DMACRO (Z (PROG ((X (EXPANDMACRO (CAR Z) T))) (|if| (EQ X (CAR Z)) |then| ( ERROR "No macro property -- \\MACRO.EVAL" X) |else| (RETURN (EVAL X)))))) (DEFOPTIMIZER \\MACRO.MX (FORM) FORM) -(PUTPROP (QUOTE MACROAUX) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE MACROAUX) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (RPAQQ MASK0WORD1\'S 32767) (RPAQQ MASK1WORD0\'S 32768) @@ -2274,11 +2247,11 @@ IMOD OFFST BITSPERBYTE)) 1)))) (|if| (|if| (EQ 0 (LOGAND |\\BitMask| |\\Byte|)) |then| (NOT (EQ 0 VAL)) |else| (EQ 0 VAL)) |then| ( \\PUTBASEBYTE BASE |\\ByteNo| (LOGXOR |\\BitMask| |\\Byte|))) VAL) (FOLDLO OFFST BITSPERBYTE) ( MASK.1\'S (IDIFFERENCE (CONSTANT (SUB1 BITSPERBYTE)) (IMOD OFFST BITSPERBYTE)) 1)))) -(PUTPROP (QUOTE ADDARITH) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE ADDARITH) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:28")) (RPAQQ \\MAXFILEPAGE 65534) (CONSTANTS \\MAXFILEPAGE) -(PUTPROP (QUOTE LLFAULT) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLFAULT) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (PUTPROPS \\UPDATETIMERS MACRO (NIL (* * |Moves| |excess| |time| |from| |the| |processor| |clock| |to| |our| |software| |clocks.| |Needs| |to| |be| |run| |often,| |uninterruptably,| |preferably| |from| @@ -2307,7 +2280,7 @@ SECONDSCLOCK |of| \\MISCSTATS)) 1) T)))))) 62500)) (PUTPROPS ALTO.TO.LISP.DATE MACRO ((DATE) (LOGXOR DATE -2147483648))) (PUTPROPS LISP.TO.ALTO.DATE MACRO ((DATE) (LOGXOR DATE -2147483648))) -(PUTPROP (QUOTE LLTIMER) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLTIMER) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (RECORD BRUSH (BRUSHSHAPE BRUSHSIZE BRUSHCOLOR) BRUSHSHAPE _ (QUOTE ROUND) BRUSHSIZE _ 1) (PUTPROPS IMAGEOP MACRO (ARGS (CONS (QUOTE SPREADAPPLY*) (CONS (COND ((EQ (CAR (LISTP (CAR ARGS))) ( @@ -2342,7 +2315,7 @@ _ (FUNCTION NILL) IMTRANSLATE _ (FUNCTION NILL) IMPUSHSTATE _ (FUNCTION NILL) IM NILL) IMSCALE2 _ (FUNCTION NILL) IMDEFAULTSTATE _ (FUNCTION NILL) IMBLTCHAR _ (FUNCTION \\MEDW.BLTCHAR ) IMXOFFSET _ (FUNCTION \\MEDW.XOFFSET) IMYOFFSET _ (FUNCTION \\MEDW.YOFFSET)) (GLOBALVARS \\NOIMAGEOPS) -(PUTPROP (QUOTE IMAGEIO) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE IMAGEIO) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:28")) (DATATYPE PROCESS ((PROCFX0 WORD) (* \; "= \\STACKHI to make this look like a STACKP") (PROCFX WORD) ( * \; "Stack pointer to this context when it is asleep") (PROCSTATUS BYTE) (* \; "Running or waiting") @@ -2382,167 +2355,30 @@ _ (CREATECELL \\FIXP) PROCFX0 _ \\STACKHI) (PUTPROPS TTY.PROCESSP MACRO (X (COND ((CAR X) (QUOTE IGNOREMACRO)) (T (QUOTE (OR (NULL (THIS.PROCESS) ) (EQ (THIS.PROCESS) (TTY.PROCESS)))))))) (GLOBALVARS \\RUNNING.PROCESS \\TTY.PROCESS \\PROC.RESTARTME \\PROC.RESETME \\PROC.ABORTME) -(PUTPROP (QUOTE PROC) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE PROC) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) -(PUTPROPS \\BACKCHAR MACRO (OPENLAMBDA (STREAM) (* \; "Backs up over an NS character") (\\BACKNSCHAR -STREAM (UNFOLD (ACCESS-CHARSET STREAM) 256)))) -(PUTPROPS \\BACKNSCHAR MACRO ((ST SHIFTEDCHARSET COUNTERVAR) (COND ((\\XCCSP ST) (\\BACKXCCSCHAR ST -SHIFTEDCHARSET COUNTERVAR)) (T (COND ((QUOTE COUNTERVAR) (SETQ COUNTERVAR (IDIFFERENCE COUNTERVAR ( -CL:FUNCALL (|ffetch| (STREAM BACKCHARFN) |of| ST) ST T)))) (T (CL:FUNCALL (|ffetch| (STREAM BACKCHARFN -) |of| ST) ST NIL))))))) -(PUTPROPS \\CHECKEOLC MACRO (OPENLAMBDA (CH EOLC STREAM PEEKBINFLG COUNTERVAR) (* |;;| -"Subtracts number of bytes read from COUNTERVAR, which may be NIL. In fact, should be NIL if PEEKBINFLG is T." -) (SELCHARQ CH (CR (SELECTC EOLC (CR.EOLC (CHARCODE EOL)) (CRLF.EOLC (COND (PEEKBINFLG (* |;;| -"T from PEEKC, compile-time constant. In this case, must leave the fileptr where it was, except for possibly advancing over character set shifts" -) (COND ((EQ (CHARCODE LF) (UNINTERRUPTABLY (\\NSIN STREAM (UNFOLD (ACCESS-CHARSET STREAM) 256)) (* -|;;| -"Read the NS CR. We know that there aren't any font-shift characters in front of the CR, because they would have already been read by the \\NSPEEK that got the CR character. Since we are going to NS back the CR character, we don't need to update the counter variable" -) (PROG1 (\\PEEKBIN STREAM T) (* |;;| -"LF must be in next BYTE after NS CR, regardless of coding. Character-set shifting bytes can't intervene. Then we back up over the CR that was \\NSINed above." -) (\\BACKNSCHAR STREAM)))) (CHARCODE EOL)) (T (CHARCODE CR)))) ((EQ (CHARCODE LF) (\\PEEKBIN STREAM T) -) (\\BIN STREAM) (AND (QUOTE COUNTERVAR) (SETQ COUNTERVAR (SUB1 COUNTERVAR))) (CHARCODE EOL)) (T ( -CHARCODE CR)))) (CHARCODE CR))) (LF (COND ((EQ EOLC LF.EOLC) (CHARCODE EOL)) (T (CHARCODE LF)))) CH))) -(PUTPROPS \\INCHAR MACRO (OPENLAMBDA (STREAM COUNTERVAR) (* \; "returns a 16 bit character code") ( -\\CHECKEOLC (\\NSIN STREAM (UNFOLD (ACCESS-CHARSET STREAM) 256) NIL COUNTERVAR) (FFETCH EOLCONVENTION -OF STREAM) STREAM NIL COUNTERVAR))) -(PUTPROPS \\INCCODE MACRO (OPENLAMBDA (STREAM COUNTERVAR) (* \; "returns a 16 bit character code") ( -\\CHECKEOLC (\\NSIN STREAM (UNFOLD (ACCESS-CHARSET STREAM) 256) NIL COUNTERVAR) (|ffetch| -EOLCONVENTION |of| STREAM) STREAM NIL COUNTERVAR))) -(PUTPROPS \\PEEKCCODE MACRO (OPENLAMBDA (STREAM NOERROR) (\\CHECKEOLC (\\NSPEEK STREAM (UNFOLD ( -ACCESS-CHARSET STREAM) 256) NIL NOERROR) (|ffetch| EOLCONVENTION |of| STREAM) STREAM T))) -(PUTPROPS \\NSIN MACRO ((ST SHIFTEDCSET SHIFTEDCSETVAR COUNTERVAR) (* |;;;| -"Dispatches to the appropriate character code decoder. If you want to support a new character encoding format, you have to write a decoder and add it here." -) (COND ((\\XCCSP ST) (\\XCCSIN ST SHIFTEDCSET SHIFTEDCSETVAR COUNTERVAR)) (T (COND ((QUOTE COUNTERVAR -) (CL:MULTIPLE-VALUE-BIND (CODE NUM) (CL:FUNCALL (|ffetch| (STREAM INCCODEFN) |of| ST) ST T) (AND NUM -(SETQ COUNTERVAR (IDIFFERENCE COUNTERVAR NUM))) CODE)) (T (CL:FUNCALL (|ffetch| (STREAM INCCODEFN) -|of| ST) ST NIL))))))) -(PUTPROPS \\NSPEEK MACRO ((ST SHIFTEDCSET SHIFTEDCSETVAR NOERROR COUNTERVAR) (* |;;;| -"Dispatches to the appropriate character code decoder. If you want to support a new character encoding format, you have to write a decoder and add it here." -) (COND ((\\XCCSP ST) (\\XCCSPEEK ST (UNFOLD (ACCESS-CHARSET ST) 256) NIL NOERROR)) (T (COND ((QUOTE -COUNTERVAR) (CL:MULTIPLE-VALUE-BIND (CODE NUM) (CL:FUNCALL (|ffetch| (STREAM PEEKCCODEFN) |of| ST) ST -NOERROR T) (AND NUM (SETQ COUNTERVAR (IDIFFERENCE COUNTERVAR NUM))) CODE)) (T (CL:FUNCALL (|ffetch| ( -STREAM PEEKCCODEFN) |of| ST) ST NOERROR NIL))))))) -(PUTPROPS NUMERIC-CHARSET MACRO (= . ACCESS-CHARSET)) -(PUTPROPS \\CONV.JIS.TO.XCCS MACRO (OPENLAMBDA (KU TEN) (* |;;;| -"Some character code is not equivalent between JIS and XCCS. In such case, we have to convert the character to corresponding XCCS." -) (COND ((\\NOT.EQUIVALENT.TO.XCCS KU) (\\DO.CONV.JIS.TO.XCCS KU TEN)) (T (LOGOR (UNFOLD KU 256) TEN)) -))) -(PUTPROPS \\DO.CONV.JIS.TO.XCCS MACRO ((KU TEN) (* |;;;| -" Convert a JIS code divided into KU (high 8 bit) and TEN (low 8 bit) to an corresponding XCCS code.") - (COND ((\\INVALID.TENP TEN) *DEFAULT-NOT-CONVERTED-FAT-CODE*) (T (SELECTQ KU ((33 34 38) (* \; -"1, 2 and 6 KU") (LET* ((CONVTABLE (\\EXTARACT.CONV.TABLE KU)) (SET (\\EXTRACT.SET TEN CONVTABLE)) ( -CODE (\\EXTRACT.CODE TEN CONVTABLE))) (COND ((NEQ SET 255) (LOGOR (UNFOLD SET 256) CODE)) (T (COND (( -EQ CODE 255) (* \; "Not defined in JIS.") *DEFAULT-NOT-CONVERTED-FAT-CODE*) (T (* \; -"Defined in JIS but the displayable font is not assigned in the corresponding code in XCCS.") (COND ( -*REPLACE-NO-FONT-CODE* *DEFAULT-NOT-CONVERTED-FAT-CODE*) (T (\\EXTRACT.NO.FONT.CODE (LOGOR (UNFOLD KU -256) TEN)))))))))) (35 (* \; "3 KU") (* \; -"Alpha numeric codes are all defined as single byte codes in XCCS.") TEN) (40 (* \; "8 KU") (COND ((< -0 TEN 33) (COND (*REPLACE-NO-FONT-CODE* *DEFAULT-NOT-CONVERTED-FAT-CODE*) (T (\\EXTRACT.NO.FONT.CODE ( -LOGOR KU TEN))))) (T *DEFAULT-NOT-CONVERTED-FAT-CODE*))) (116 (* \; "84 KU") (COND ((< 0 TEN 5) (LOGOR - 29952 TEN)) (T *DEFAULT-NOT-CONVERTED-FAT-CODE*))) (117 (* \; "85 KU") (COND ((< 0 TEN 28) (LOGOR -29696 TEN)) (T *DEFAULT-NOT-CONVERTED-FAT-CODE*))) *DEFAULT-NOT-CONVERTED-FAT-CODE*))))) -(PUTPROPS \\CONV.XCCS.TO.JIS MACRO (OPENLAMBDA (OUTSTREAM CC) (* |;;;| -"Returns JIS code corresponding to XCCS charcode. Handle HANKAKU as well as ZENKAKU. If OUTSTREAM wants to convert ZENKAKUKANA to HANKAKUKANA, do so. Never returns two byte charcode for alpha-numeric character, they are all treated as single byte characode." -) (OR (COND ((\\ASCIIP CC) CC) ((\\NOT.EQUIVALENT.TO.JIS CC) (\\DO.CONV.XCCS.TO.JIS CC)) (( -\\CONV.HANKAKU.TO.ZENKAKUP OUTSTREAM) (* \; -"ZENKAKUKANA comes here, because their charcodes are equiavalent to JIS.") (\\CONV.ZENKAKU.KANA CC)) ( -T CC)) CC))) -(PUTPROPS \\DO.CONV.XCCS.TO.JIS MACRO ((CC) (GETHASH CC *XCCS-TO-JIS-CONV-TABLE*))) -(PUTPROPS \\ASCIIP MACRO (OPENLAMBDA (CC) (AND (EQ (FOLDLO CC 256) 0) (< (LOGAND CC 255) 128)))) -(PUTPROPS \\NOT.EQUIVALENT.TO.JIS MACRO (OPENLAMBDA (CC) (OR (EQ (FOLDLO CC 256) 0) (EQ (FOLDLO CC 256 -) 33) (EQ (FOLDLO CC 256) 34) (EQ (FOLDLO CC 256) 38) (EQ (FOLDLO CC 256) 40) (EQ (FOLDLO CC 256) 239) - (EQ (FOLDLO CC 256) 241)))) -(PUTPROPS \\CONV.HANKAKU.TO.ZENKAKUP MACRO ((OUTSTREAM) (STREAMPROP OUTSTREAM :HTOZP))) -(PUTPROPS \\CONV.ZENKAKU.KANA MACRO ((CHAR) (GETHASH CHAR *ZENKAKU-TO-HANKAKU-CONV-TABLE*))) -(PUTPROPS \\XCCSIN MACRO ((STREAM SHIFTEDCSET SHIFTEDCSETVAR COUNTERVAR) (* |;;;| -"returns a 16 bit character code. SHIFTEDCSET is STREAM's char set left shifted 8, SHIFTEDCSETVAR if non-NIL is the variable to set if char set changes. COUNTERVAR if non-NIL is decremented by number of bytes read. Doesn't do EOL conversion -- \\INCHAR and \\INCCODE do that." -) (LET ((CHAR (\\BIN STREAM)) SCSET) (COND ((EQ CHAR NSCHARSETSHIFT) (* \; "Shifting character sets") -(ACCESS-CHARSET STREAM (SETQ SCSET (COND ((NEQ NSCHARSETSHIFT (SETQ CHAR (\\BIN STREAM))) (AND (QUOTE -COUNTERVAR) (SETQ COUNTERVAR (IDIFFERENCE COUNTERVAR 2))) CHAR) ((PROGN (* \; -"2 shift-bytes means not run-encoded") (AND (QUOTE COUNTERVAR) (SETQ COUNTERVAR (IDIFFERENCE -COUNTERVAR 3))) (EQ 0 (\\BIN STREAM))) \\NORUNCODE) (T (\\NSIN.24BITENCODING.ERROR STREAM))))) (SETQ -CHAR (\\BIN STREAM)) (SETQ SCSET (COND ((QUOTE SHIFTEDCSETVAR) (* \; "CHARSETVAR=NIL means don't set") - (SETQ SHIFTEDCSETVAR (UNFOLD SCSET 256))) (T (UNFOLD SCSET 256))))) (T (SETQ SCSET SHIFTEDCSET))) ( -COND ((EQ SCSET (UNFOLD \\NORUNCODE 256)) (* \; -"just read two bytes and combine them to a 16 bit value") (AND (QUOTE COUNTERVAR) (SETQ COUNTERVAR ( -IDIFFERENCE COUNTERVAR 2))) (LOGOR (UNFOLD CHAR 256) (\\BIN STREAM))) (CHAR (AND (QUOTE COUNTERVAR) ( -SETQ COUNTERVAR (IDIFFERENCE COUNTERVAR 1))) (AND CHAR (LOGOR SCSET CHAR))))))) -(PUTPROPS \\XCCSPEEK MACRO ((STREAM SHIFTEDCSET SHIFTEDCSETVAR NOERROR COUNTERVAR) (* |;;| -"Returns a 16 bit character code. Doesn't do EOL conversion--\\INCHAR does that. May actually read the character-set shift, storing the result in the stream. COUNTERVAR, if given, is updated to reflect any such bytes that are actually read" -) (PROG ((CHAR (\\PEEKBIN STREAM NOERROR)) SCSET) (COND ((NULL CHAR) (RETURN NIL)) ((EQ CHAR -NSCHARSETSHIFT) (* \; "CHARSETVAR=NIL means don't set") (\\BIN STREAM) (* \; -"Consume the char shift byte") (ACCESS-CHARSET STREAM (SETQ SCSET (COND ((NEQ NSCHARSETSHIFT (SETQ -CHAR (\\BIN STREAM))) (* \; -"Note: no eof error check on this \\BIN -- an eof in the middle of a charset shift is an error") (AND -(QUOTE COUNTERVAR) (SETQ COUNTERVAR (IDIFFERENCE COUNTERVAR 2))) CHAR) ((PROGN (* \; -"2 shift-bytes means not run-encoded") (AND (QUOTE COUNTERVAR) (SETQ COUNTERVAR (IDIFFERENCE -COUNTERVAR 3))) (EQ 0 (\\BIN STREAM))) \\NORUNCODE) (T (\\NSIN.24BITENCODING.ERROR STREAM))))) (SETQ -SCSET (COND ((QUOTE SHIFTEDCSETVAR) (* \; "CHARSETVAR=NIL means don't set") (SETQ SHIFTEDCSETVAR ( -UNFOLD SCSET 256))) (T (UNFOLD SCSET 256)))) (COND ((NULL (SETQ CHAR (\\PEEKBIN STREAM NOERROR))) ( -RETURN NIL)))) (T (SETQ SCSET SHIFTEDCSET))) (RETURN (COND ((EQ SCSET (UNFOLD \\NORUNCODE 256)) (* -|;;| -"just peek two bytes and combine them to a 16 bit value. Again, is an error if we hit eof in mid-character" -) (\\BIN STREAM) (PROG1 (LOGOR (UNFOLD CHAR 256) (\\PEEKBIN STREAM NOERROR)) (\\BACKFILEPTR STREAM))) -(T (LOGOR SHIFTEDCSET CHAR))))))) -(PUTPROPS \\BACKXCCSCHAR MACRO ((STREAM SHIFTEDCHARSET COUNTERVAR) (AND (\\BACKFILEPTR STREAM) (COND ( -(COND (SHIFTEDCHARSET (EQ SHIFTEDCHARSET (UNFOLD \\NORUNCODE 256))) (T (EQ \\NORUNCODE (ACCESS-CHARSET - STREAM)))) (COND ((\\BACKFILEPTR STREAM) (AND (QUOTE COUNTERVAR) (|add| COUNTERVAR 2)) T) ((QUOTE -COUNTERVAR) (|add| COUNTERVAR 1)))) ((QUOTE COUNTERVAR) (|add| COUNTERVAR 1)))))) -(PUTPROPS \\XCCSP MACRO (OPENLAMBDA (ST) (NOT (|ffetch| (STREAM NOTXCCS) |of| (\\DTEST ST (QUOTE -STREAM)))))) -(PUTPROPS \\EXTRACT.NO.FONT.CODE MACRO ((JISCODE) (CDR (ASSOC JISCODE *JIS-TO-XCCS-CONV-NO-FONT-TABLE* -)))) -(PUTPROPS \\EXTARACT.CONV.TABLE MACRO ((KU) (CDR (ASSOC KU *JIS-TO-XCCS-CONV-TABLE-LIST*)))) -(PUTPROPS \\NOT.EQUIVALENT.TO.XCCS MACRO ((KU) (* |;;;| -" The JIS codes which are not equiavelent to XCCS reside in 1, 2, 3, 6, 8 and 84 KU. Although from 84-5 to 94-94 inclusive are not defined in JIS, that is they are GAIJI, they are also handled here." -) (OR (EQ KU 33) (EQ KU 34) (EQ KU 35) (EQ KU 38) (EQ KU 40) (EQ KU 116) (EQ KU 117)))) -(PUTPROPS \\EXTRACT.SET MACRO ((TEN TABLE) (ELT TABLE (IDIFFERENCE (UNFOLD (IDIFFERENCE TEN 32) 2) 1)) -)) -(PUTPROPS \\EXTRACT.CODE MACRO ((TEN TABLE) (ELT TABLE (UNFOLD (IDIFFERENCE TEN 32) 2)))) -(PUTPROPS \\CHNAGE.KI.MODE MACRO (OPENLAMBDA (ST INPUTFLG ENTERP) (* |;;;| -"INPUTFLG is true if \\CHNAGE.KI.MODE is called in the context in which ST is an input stream.") (COND - (INPUTFLG (COND (ENTERP (|freplace| (STREAM IN.KANJIIN) |of| (\\DTEST ST (QUOTE STREAM)) |with| T)) ( -T (|freplace| (STREAM IN.KANJIIN) |of| (\\DTEST ST (QUOTE STREAM)) |with| NIL)))) (T (COND (ENTERP ( -|freplace| (STREAM OUT.KANJIIN) |of| (\\DTEST ST (QUOTE STREAM)) |with| T)) (T (|freplace| (STREAM -OUT.KANJIIN) |of| (\\DTEST ST (QUOTE STREAM)) |with| NIL))))))) -(PUTPROPS \\KIMODEP MACRO (OPENLAMBDA (ST INPUTFLG) (* |;;;| -"INPUTFLG is true if \\KIMODEP is called in the context in which ST is an input stream.") (COND ( -INPUTFLG (|ffetch| (STREAM IN.KANJIIN) |of| (\\DTEST ST (QUOTE STREAM)))) (T (|ffetch| (STREAM -OUT.KANJIIN) |of| (\\DTEST ST (QUOTE STREAM))))))) -(PUTPROPS \\HANKAKUP MACRO ((CHAR) (< 160 CHAR 224))) -(PUTPROPS \\KANJIP MACRO ((CHAR) (< 12158 CHAR 29733))) -(PUTPROPS \\NOTGAIJIP MACRO ((CHAR) (OR (< 8480 CHAR 10305) (< 12158 CHAR 29733)))) -(PUTPROPS \\INVALID.TENP MACRO (OPENLAMBDA (TEN) (OR (< TEN 33) (< 126 TEN)))) -(PUTPROPS \\CONV.HANKAKU.KANA MACRO ((CHAR) (GETHASH CHAR *HANKAKU-TO-ZENKAKU-CONV-TABLE*))) -(PUTPROPS \\OUTKI MACRO ((STREAM) (\\BOUT OUTSTREAM (CHARCODE ESC)) (\\BOUT OUTSTREAM (CHARCODE $)) ( -\\BOUT OUTSTREAM (CHARCODE B)))) -(PUTPROPS \\OUTKO MACRO ((STREAM) (\\BOUT OUTSTREAM (CHARCODE ESC)) (\\BOUT OUTSTREAM (CHARCODE \()) ( -\\BOUT OUTSTREAM (CHARCODE J)))) -(PUTPROPS \\CONV.SJIS.TO.JIS MACRO (OPENLAMBDA (HI LO) (* |;;;| -"Convert Shift-JIS to JIS. The variable named CH1 and CH2 are set to the converted hight 8 bit and low 8bit of JIS code respectively." -) (SETQ CH1 (IDIFFERENCE HI (COND ((> HI 159) 177) (T 113)))) (SETQ CH1 (IPLUS (UNFOLD CH1 2) 1)) ( -SETQ CH2 (COND ((> LO 158) (PROG1 (IDIFFERENCE LO 126) (SETQ CH1 (IPLUS CH1 1)))) (T (IDIFFERENCE LO ( -COND ((> LO 126) (IPLUS 31 1)) (T 31)))))))) -(PUTPROPS \\CONV.JIS.TO.SJIS MACRO (OPENLAMBDA (HI LO) (* |;;;| -"Convert JIS to Shift-JIS. The variable named CH1 and CH2 are set to the converted hight 8 bit and low 8bit of Shift-JIS code respectively." -) (SETQ CH2 (COND ((ODDP HI) (SETQ CH2 (IPLUS LO 31)) (COND ((>= CH2 127) (IPLUS CH2 1)) (T CH2))) (T -(IPLUS LO 126)))) (SETQ CH1 (IPLUS (FOLDLO (IDIFFERENCE HI 33) 2) 129)) (AND (> CH1 159) (SETQ CH1 ( -IPLUS CH1 64))))) -(PUTPROPS \\SJIS.KANJI.FIRST.BYTEP MACRO (OPENLAMBDA (CHAR) (OR (< 127 CHAR 160) (< 223 CHAR 256)))) -(PUTPROPS \\EUC.KANJI.FIRST.BYTEP MACRO ((CHAR) (< 160 CHAR 255))) -(PUTPROPS \\GAIJIP MACRO ((CHAR) (EQ CHAR 143))) -(PUTPROPS \\EUC.HANKAKUP MACRO ((CHAR) (EQ CHAR 142))) -(PUTPROP (QUOTE LLREAD) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(RPAQQ \\NORUNCODE 255) +(RPAQQ NSCHARSETSHIFT 255) +(CONSTANTS (\\NORUNCODE 255) (NSCHARSETSHIFT 255)) +(PUTPROPS \\RUNCODED MACRO (OPENLAMBDA (STREAM) (* |;;| +"returns NIL is the stream is not runcoded, that is, if the stream has 16 bit bytes explicitly represented" +) (* \; "note that neq is ok since charsets are known to be SMALLP's") (NEQ (|fetch| CHARSET |of| +STREAM) \\NORUNCODE))) +(DEFOPTIMIZER ACCESS-CHARSET (STREAM &OPTIONAL NEWVALUE) (BQUOTE ((OPENLAMBDA (STRM) (FDEVOP (QUOTE +CHARSETFN) (|fetch| (STREAM DEVICE) |of| STRM) STRM (\\\, NEWVALUE))) (\\\, STREAM)))) +(PUTPROP (QUOTE XCCS) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:37:14")) + +(PUTPROP (QUOTE LLREAD) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:37:14")) (PUTPROPS EMPASSWORDLOC DMACRO (LAMBDA NIL (* |lmm| "24-MAR-83 06:46") (|fetch| (IFPAGE |UserPswdAddr| ) |of| |\\InterfacePage|))) (PUTPROPS \\DECRYPT.PWD.CHAR MACRO ((CHAR) (LOGXOR CHAR 73))) -(PUTPROP (QUOTE PASSWORDS) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE PASSWORDS) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) (RPAQQ MICASPERINCH 2540) (RPAQQ MICASPERMILLIMETER 100) (CONSTANTS (MICASPERINCH 2540) (MICASPERMILLIMETER 100)) -(PUTPROP (QUOTE INTERPRESS) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE INTERPRESS) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:37:14")) (RPAQ MICASPERPT (FQUOTIENT 2540 72)) (RPAQQ IHALFMICASPERPT 17) @@ -2550,10 +2386,10 @@ IPLUS CH1 64))))) (CONSTANTS (MICASPERPT (FQUOTIENT 2540 72)) (IHALFMICASPERPT 17) (IMICASPERPT 35)) (DEFMACRO \\MICASTOPTS (MICAS) (COND ((NUMBERP MICAS) (QUOTIENT MICAS MICASPERPT)) (T (BQUOTE ( QUOTIENT (\\\, MICAS) MICASPERPT))))) -(PUTPROP (QUOTE HARDCOPY) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE HARDCOPY) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:17:21")) (FILESLOAD (SYSLOAD FROM VALUEOF DIRECTORIES) CMLARRAY-SUPPORT) -(PUTPROP (QUOTE CMLARRAY) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE CMLARRAY) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:28")) (RPAQQ \\MISCN-TABLE-LIST ((USER-SUBR 0 \\USER-SUBR-UFN T) (CL:VALUES 1 CL::VALUES-UFN NIL) (CL:SXHASH 2 CL::SXHASH-UFN NIL) (CL::EQLHASHBITSFN 3 CL::EQLHASHBITSFN-UFN NIL) (STRINGHASHBITS 4 @@ -2587,7 +2423,7 @@ DLD-GET-SYMBOL 171) (DLD-GET-FUNC 172) (DLD-FUNCTION-EXECUTABLE-P 173) (DLD-LIST ) (C-MALLOC 175) (C-FREE 176) (C-PUTBASEBYTE 177) (C-GETBASEBYTE 178) (CHAR-OPENFILE 200) (CHAR-BIN 201) (CHAR-BOUT 202) (CHAR-IOCTL 203) (CHAR-CLOSEFILE 204) (CHAR-EOFP 205) (CHAR-READP 206) (CHAR-BINS 207) (CHAR-BOUTS 208) (CHAR-FILLBUFFER 209))) -(PUTPROP (QUOTE LLSUBRS) (QUOTE IMPORTDATE) (IDATE " 6-May-2021 15:25:40")) +(PUTPROP (QUOTE LLSUBRS) (QUOTE IMPORTDATE) (IDATE "27-Jul-2021 20:14:29")) STOP diff --git a/library/lafite/LAFITE b/library/lafite/LAFITE index c15ef0f16..5cadf8838 100644 --- a/library/lafite/LAFITE +++ b/library/lafite/LAFITE @@ -1,16 +1,21 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "22-Aug-94 13:00:22" {DSK}export>lispcore>lafite>parc-94>LAFITE.;2 73704 +(FILECREATED "24-Jun-2021 19:17:01"  +{DSK}kaplan>Local>medley3.5>git-medley>library>lafite>LAFITE.;4 71992 - previous date%: " 6-Aug-93 15:49:08" {DSK}export>lispcore>lafite>parc-94>LAFITE.;1) + changes to%: (FNS \LAFITE.EOF) + (FILES LAFITEDECLS) + + previous date%: "22-Aug-94 13:00:22" +{DSK}kaplan>Local>medley3.5>git-medley>library>lafite>LAFITE.;2) (* ; " -Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1993, 1994 by Xerox Corporation and Bolt Beranek and Newman Inc.. All rights reserved. +Copyright (c) 1982-1989, 1993-1994, 2021 by Xerox Corporation and Bolt Beranek and Newman Inc.. ") (PRETTYCOMPRINT LAFITECOMS) -(RPAQQ LAFITECOMS +(RPAQQ LAFITECOMS [(COMS (E (SETQ LAFITESYSTEMDATE (DATE))) (VARS LAFITEVERSION# LAFITESYSTEMDATE)) (COMS (FNS LAFITE LAFITE.ON.FROM.BACKGROUND \LAFITE.OFF \LAFITE.START.PROC @@ -70,19 +75,19 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1993, 1994 by Xero (LAFITE.PERSONAL.VARS LAFITEDEFAULTHOST&DIR LAFITE.SIGNATURE)) (FNS LAFITE.AROUNDEXIT \LAFITE.MARK.FOLDERS.OBSOLETE \LAFITE.CHECK.FOLDERS \LAFITE.ASSURE.FOLDER.READY \LAFITE.AFTERLOGIN)) - (COMS (* ; "misc utilities") + (COMS (* ; "misc utilities") (FNS LA.RESETSHADE LA.MENU.ITEM NTHMESSAGE \LAFITE.MAKE.MSGARRAY \LAFITE.ADDMESSAGES.TO.ARRAY \MAILFOLDER.DEFPRINT \LAFITEMSG.DEFPRINT LA.POSITION.FROM.REGION MAILFOLDERBUSY) (CURSORS LA.CROSSCURSOR) - (* ; "Low level file functions") + (* ; "Low level file functions") (FNS TOCFILENAME DELETEMAILFOLDER \LAFITE.OPEN.FOLDER \LAFITE.REPORT.FILE.WONT.OPEN \LAFITE.FOLDER.CHANGED \LAFITE.REBROWSE.FOLDER \LAFITE.FOLDER.CHANGED.MENU \LAFITE.SET.FOLDER.STREAM \LAFITE.OPENSTREAM \LAFITE.CREATE.MENU \LAFITE.EOF \LAFITE.CLOSE.FOLDER) (FNS \LAFITE.DESCRIBE.FOLDER)) - (COMS (* ; - "Make is easy to load new versions of Lafite") + (COMS (* ; + "Make is easy to load new versions of Lafite") (FNS LOAD-LAFITE) (VARS LAFITEFILES)) [DECLARE%: DOEVAL@COMPILE DONTCOPY (FILES (SOURCE) @@ -97,14 +102,14 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1993, 1994 by Xero (FILES LAFITEBROWSE LAFITECOMMANDS LAFITEFOLDERS LAFITESEND LAFITEMAIL LAFITESORT TEDIT LAFITETEDIT LAFITEFIND ATTACHEDWINDOW MAILSCAVENGE) (P * (PROGN LAFITE.PROCLAMATIONS)) - (* ; - "Proclaim user interface variables. Value is on LAFITEDECLS") + (* ; + "Proclaim user interface variables. Value is on LAFITEDECLS") (P (\LAFITE.GLOBAL.INIT) (COND ((EQ MAKESYSNAME :LYRIC) (FILESLOAD (SYSLOAD) NSCHARPATCH) - (* ; - "Patch to horrid Lyric NS chars bug") + (* ; + "Patch to horrid Lyric NS chars bug") (MOVD? 'PROMPTFORWORD 'TTYINPROMPTFORWORD NIL T] (DECLARE%: DOEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) @@ -112,7 +117,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1993, 1994 by Xero (RPAQQ LAFITEVERSION# 10) -(RPAQQ LAFITESYSTEMDATE "22-Aug-94 13:00:29") +(RPAQQ LAFITESYSTEMDATE "24-Jun-2021 19:17:01") (DEFINEQ (LAFITE @@ -185,7 +190,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1993, 1994 by Xero ) ) -(PUTPROPS LAFITE ARGNAMES (NIL (ON/OFF MAILFILE . OPTIONS) . U)) +(PUTPROPS LAFITE ARGNAMES (NIL (ON/OFF MAILFILE . OPTIONS) . U)) (DEFINEQ (LAFITEMODE @@ -223,7 +228,7 @@ Mode affects SendMail only; mail is still retrieved in all modes.~]" (if \LAFITE ) ) -(PUTPROPS LAFITEMODELST VARTYPE ALIST) +(PUTPROPS LAFITEMODELST VARTYPE ALIST) (ADDTOVAR LAFITEMODELST ) @@ -231,20 +236,17 @@ Mode affects SendMail only; mail is still retrieved in all modes.~]" (if \LAFITE (RPAQ? \LAFITE.AUTHENTICATION.FAILURE ) -(RPAQ? LAFITE.BACKGROUND.ITEM '("Mail" '(\LAFITE.MESSAGEFORM NIL NIL 'LEFT) - - "Send an ordinary message. See subcommands for other operations." - (SUBITEMS ("Turn Lafite on" '(LAFITE.ON.FROM.BACKGROUND) - +(RPAQ? LAFITE.BACKGROUND.ITEM + '("Mail" '(\LAFITE.MESSAGEFORM NIL NIL 'LEFT) + "Send an ordinary message. See subcommands for other operations." + (SUBITEMS ("Turn Lafite on" '(LAFITE.ON.FROM.BACKGROUND) + "Turn on Lafite, bringing up status window and browsing default folder." - ) - ("Send Mail" '(\LAFITE.MESSAGEFORM) - - "Send a message. Prompts for type of message." - ) - ("Set Lafite Mode" '(SET.LAFITE.MODE.INTERACTIVELY) - "Set or change Lafite's mail protocol mode.") - ))) + ) + ("Send Mail" '(\LAFITE.MESSAGEFORM) + "Send a message. Prompts for type of message.") + ("Set Lafite Mode" '(SET.LAFITE.MODE.INTERACTIVELY) + "Set or change Lafite's mail protocol mode.")))) (DEFINEQ (\LAFITE.LOGIN @@ -263,37 +265,38 @@ Mode affects SendMail only; mail is still retrieved in all modes.~]" (if \LAFITE ) ) -(RPAQQ LAFITEPROFILEVARS ((LAFITEDEFAULTHOST&DIR NIL) - (LAFITE.SIGNATURE NIL) - (LAFITEBUFFERSIZE 20) - (LAFITEIFFROMMETHENSEENFLG T) - [LAFITEMENUFONT (FONTCREATE '(HELVETICA 10 BOLD] - [LAFITETITLEFONT (FONTCREATE '(HELVETICA 12 BOLD] - [LAFITEDISPLAYFONT (FONTCREATE '(TIMESROMAN 10] - [LAFITEFIXEDWIDTHFONT (COND ((EQ (CHARWIDTH (CHARCODE "i") - DEFAULTFONT) - (CHARWIDTH (CHARCODE "W") - DEFAULTFONT)) - (* ; - "Yes, user has not changed default to a variable width font") - DEFAULTFONT) - (T (FONTCREATE '(GACHA 10] - (LAFITEHARDCOPYFONT LAFITEDISPLAYFONT) - [LAFITEBROWSERFONT (FONTCREATE '(GACHA 10] - [LAFITEMSGICONFONT (FONTCREATE '(HELVETICA 8] - (LAFITE.FOLDER.MENU.FONT NIL) - (LAFITEINFO.NAME "Lafite.info") - (DEFAULTMAILFOLDERNAME "Active.mail") - (LAFITEMAIL.EXT "mail") - (LAFITESTATUSWINDOWMINWIDTH 200) - (LAFITESTATUSWINDOWPOSITION '(735 . 650)) - (LAFITE.DONT.DISPLAY.HEADERS NIL) - (LAFITE.DONT.FORWARD.HEADERS NIL) - (LAFITE.DONT.HARDCOPY.HEADERS NIL) - (LAFITEDEBUGFLG NIL) - (LAFITEMODEDEFAULT NIL) - (LAFITESHOWMODEFLG T) - (LAFITE.USE.ALL.MODES T))) +(RPAQQ LAFITEPROFILEVARS + ((LAFITEDEFAULTHOST&DIR NIL) + (LAFITE.SIGNATURE NIL) + (LAFITEBUFFERSIZE 20) + (LAFITEIFFROMMETHENSEENFLG T) + [LAFITEMENUFONT (FONTCREATE '(HELVETICA 10 BOLD] + [LAFITETITLEFONT (FONTCREATE '(HELVETICA 12 BOLD] + [LAFITEDISPLAYFONT (FONTCREATE '(TIMESROMAN 10] + [LAFITEFIXEDWIDTHFONT (COND ((EQ (CHARWIDTH (CHARCODE "i") + DEFAULTFONT) + (CHARWIDTH (CHARCODE "W") + DEFAULTFONT)) + (* ; + "Yes, user has not changed default to a variable width font") + DEFAULTFONT) + (T (FONTCREATE '(GACHA 10] + (LAFITEHARDCOPYFONT LAFITEDISPLAYFONT) + [LAFITEBROWSERFONT (FONTCREATE '(GACHA 10] + [LAFITEMSGICONFONT (FONTCREATE '(HELVETICA 8] + (LAFITE.FOLDER.MENU.FONT NIL) + (LAFITEINFO.NAME "Lafite.info") + (DEFAULTMAILFOLDERNAME "Active.mail") + (LAFITEMAIL.EXT "mail") + (LAFITESTATUSWINDOWMINWIDTH 200) + (LAFITESTATUSWINDOWPOSITION '(735 . 650)) + (LAFITE.DONT.DISPLAY.HEADERS NIL) + (LAFITE.DONT.FORWARD.HEADERS NIL) + (LAFITE.DONT.HARDCOPY.HEADERS NIL) + (LAFITEDEBUGFLG NIL) + (LAFITEMODEDEFAULT NIL) + (LAFITESHOWMODEFLG T) + (LAFITE.USE.ALL.MODES T))) (RPAQ? LAFITEDEFAULTHOST&DIR NIL) @@ -309,14 +312,15 @@ Mode affects SendMail only; mail is still retrieved in all modes.~]" (if \LAFITE (RPAQ? LAFITEDISPLAYFONT (FONTCREATE '(TIMESROMAN 10))) -(RPAQ? LAFITEFIXEDWIDTHFONT [COND ((EQ (CHARWIDTH (CHARCODE "i") - DEFAULTFONT) - (CHARWIDTH (CHARCODE "W") - DEFAULTFONT)) - (* ; - "Yes, user has not changed default to a variable width font") - DEFAULTFONT) - (T (FONTCREATE '(GACHA 10]) +(RPAQ? LAFITEFIXEDWIDTHFONT + [COND ((EQ (CHARWIDTH (CHARCODE "i") + DEFAULTFONT) + (CHARWIDTH (CHARCODE "W") + DEFAULTFONT)) + (* ; + "Yes, user has not changed default to a variable width font") + DEFAULTFONT) + (T (FONTCREATE '(GACHA 10]) (RPAQ? LAFITEHARDCOPYFONT LAFITEDISPLAYFONT) @@ -365,14 +369,15 @@ Mode affects SendMail only; mail is still retrieved in all modes.~]" (if \LAFITE (RPAQ? LAFITEEOL " ") -(RPAQQ LAFITEMARKS ((SEENMARK (CHARCODE SP)) - (UNSEENMARK (CHARCODE ?)) - (MOVETOMARK (CHARCODE m)) - (FORWARDMARK (CHARCODE f)) - (ANSWERMARK (CHARCODE a)) - (HARDCOPYBATCHMARK (CHARCODE H)) - (HARDCOPYMARK (CHARCODE h)) - (HEARDMARK (CHARCODE @)))) +(RPAQQ LAFITEMARKS + ((SEENMARK (CHARCODE SP)) + (UNSEENMARK (CHARCODE ?)) + (MOVETOMARK (CHARCODE m)) + (FORWARDMARK (CHARCODE f)) + (ANSWERMARK (CHARCODE a)) + (HARDCOPYBATCHMARK (CHARCODE H)) + (HARDCOPYMARK (CHARCODE h)) + (HEARDMARK (CHARCODE @)))) (RPAQ SEENMARK (CHARCODE SP)) @@ -398,45 +403,37 @@ Mode affects SendMail only; mail is still retrieved in all modes.~]" (if \LAFITE ("Quit" '\LAFITE.QUIT "Update and close all mail files and stop Lafite"))) -(RPAQQ LAFITEUPDATEMENUITEMS (("Do Hardcopy Only" '\LAFITE.HARDCOPYONLY.PROC - "Will print batched hardcopy but not update file") - ("Write out changes only" '\LAFITE.UPDATE.PROC - "Will update physical file to reflect new marks and deletions" - ) - ("Update table of contents only" (FUNCTION \LAFITE.UPDATE.PROC) - - "Write table of contents file to speed next browse of this folder" - ) - ("Expunge deleted messages" '\LAFITE.EXPUNGE.PROC - "Will rewrite mail file, expunging all deleted messages") - ("Write changes in sorted order" '\LAFITE.EXPUNGE.PROC "Will rewrite mail file so that the messages are permanently stored in the order in which they now appear in the browser." - ) - ("Expunge & Write out changes (sorted)" '\LAFITE.EXPUNGE.PROC "Will rewrite mail file, expunging deleted messages and writing writing the rest in the order in which they now appear in the browser." - ) - ("Just close" '\LAFITE.FINISH.UPDATE - "Just close the window - don't touch the mail file.") - ("Just shrink" '\LAFITE.FINISH.UPDATE - "Just shrink the window - don't touch the mail file."))) - -(RPAQQ LAFITESUBQUITMENUITEMS (("Quit" '\LAFITE.QUIT "Turn Lafite off") - ("Restart" '\LAFITE.RESTART "Turn Lafite off then back on") - ("Login" '\LAFITE.LOGIN - "Change the global username/password and restart Lafite with the new user." - (SUBITEMS ("Just re-authenticate" '\LAFITE.REAUTHENTICATE - "Re-authenticate currently logged-in user." - ) - ("Login without restarting" - '\LAFITE.LOGIN.NORESTART +(RPAQQ LAFITEUPDATEMENUITEMS + (("Do Hardcopy Only" '\LAFITE.HARDCOPYONLY.PROC + "Will print batched hardcopy but not update file") + ("Write out changes only" '\LAFITE.UPDATE.PROC + "Will update physical file to reflect new marks and deletions") + ("Update table of contents only" (FUNCTION \LAFITE.UPDATE.PROC) + "Write table of contents file to speed next browse of this folder") + ("Expunge deleted messages" '\LAFITE.EXPUNGE.PROC + "Will rewrite mail file, expunging all deleted messages") + ("Write changes in sorted order" '\LAFITE.EXPUNGE.PROC "Will rewrite mail file so that the messages are permanently stored in the order in which they now appear in the browser." + ) + ("Expunge & Write out changes (sorted)" '\LAFITE.EXPUNGE.PROC "Will rewrite mail file, expunging deleted messages and writing writing the rest in the order in which they now appear in the browser." + ) + ("Just close" '\LAFITE.FINISH.UPDATE "Just close the window - don't touch the mail file.") + ("Just shrink" '\LAFITE.FINISH.UPDATE "Just shrink the window - don't touch the mail file."))) + +(RPAQQ LAFITESUBQUITMENUITEMS + (("Quit" '\LAFITE.QUIT "Turn Lafite off") + ("Restart" '\LAFITE.RESTART "Turn Lafite off then back on") + ("Login" '\LAFITE.LOGIN + "Change the global username/password and restart Lafite with the new user." + (SUBITEMS ("Just re-authenticate" '\LAFITE.REAUTHENTICATE + "Re-authenticate currently logged-in user.") + ("Login without restarting" '\LAFITE.LOGIN.NORESTART "Change the global login but don't restart Lafite (keep the same folders open, etc)" - ) - ("NS Login" '\NSMAIL.LOGIN - "Change the name and/or password for NS operation." - ))) - ("Recache" 'LAFITE.COMPUTE.CACHED.VARS - "Make Lafite recompute cached information based on current variable settings" - ) - ("Server trace" 'LAFITE.TOGGLE.SERVER.TRACE - "Change setting of *NSMAIL-TRACE-SERVERS*"))) + ) + ("NS Login" '\NSMAIL.LOGIN "Change the name and/or password for NS operation.") + )) + ("Recache" 'LAFITE.COMPUTE.CACHED.VARS + "Make Lafite recompute cached information based on current variable settings") + ("Server trace" 'LAFITE.TOGGLE.SERVER.TRACE "Change setting of *NSMAIL-TRACE-SERVERS*"))) (RPAQQ ANOTHERFOLDERMENUITEM ("** Other Folder **" '%##ANOTHERFILE## "You will be asked to specify another mail filename")) @@ -586,8 +583,27 @@ Mode affects SendMail only; mail is still retrieved in all modes.~]" (if \LAFITE ) (\LAFITE.EOF -(LAMBDA (STREAM) (* ; "Edited 15-Sep-87 18:26 by bvm:") (* ;; "End of stream op for Lafite mail folders. Return endless CR's so that parses eventually stop") (if (NEQ (ACCESS-CHARSET STREAM) 0) then (* ;; "We're in another char set, so just returning CR won't do, since it will be interpreted in the wrong char set. Also, can't just smash CHARSET to 0, since some readers cache the charset.") (LET ((STATE (STREAMPROP STREAM (QUOTE EOFDATA)))) (SELECTQ STATE (NIL (STREAMPROP STREAM (QUOTE EOFDATA) 1) (* ; "First return charset shift byte") NSCHARSETSHIFT) (1 (STREAMPROP STREAM (QUOTE EOFDATA) 2) (* ; "Then charset zero.") 0) (PROGN (* ; "Eek, shouldn't happen. Maybe somebody is stupidly reading bytes, so try a cr") (STREAMPROP STREAM (QUOTE EOFDATA) NIL) (CHARCODE CR)))) else (CHARCODE CR))) -) + [LAMBDA (STREAM) (* ; "Edited 24-Jun-2021 19:16 by rmk:") + + (* ;; "End of stream op for Lafite mail folders. Return endless EOLS's so that parses eventually stop. This is now done in a format independent way. We create a byte stream for the current external format of stream, print an EOL on to it, and then keep returning the bytes that ecode the EOL. If there is a need for an XCCS charset shift or any other magic, that will show up in the byte stream") + + (LET (BYTESTREAM) + (IF [NULL (SETQ BYTESTREAM (STREAMPROP STREAM 'BYTESTREAM] + THEN (SETQ BYTESTREAM (\FORMATBYTESTREAM STREAM NIL)) + (* ; "First time, set it up") + (STREAMPROP STREAM 'BYTESTREAM BYTESTREAM) + (TERPRI BYTESTREAM) + (SETFILEPTR BYTESTREAM 0) + (BIN BYTESTREAM) + ELSEIF (BIN BYTESTREAM) + ELSE + + (* ;; "Ran off the end, Reset to make sure it remains consistent with STREAM after it has been reading our bytes") + + (\FORMATBYTESTREAM STREAM BYTESTREAM) + (TERPRI BYTESTREAM) + (SETFILEPTR BYTESTREAM 0) + (BIN BYTESTREAM]) (\LAFITE.CLOSE.FOLDER (LAMBDA (MAILFOLDER REALLYP) (* ; "Edited 14-Oct-87 20:18 by bvm:") (* ;;; "If MAILFOLDER is open for output, make sure it is completely written out. If REALLYP then actually close the file") (LET ((STREAM (fetch (MAILFOLDER FOLDERSTREAM) of MAILFOLDER))) (COND ((AND STREAM (COND ((OPENP STREAM (QUOTE OUTPUT)) (FORCEOUTPUT STREAM T) (* ; "Due to Leaf bug, best to do the FORCEOUTPUT first even if we're really closing it") (replace (MAILFOLDER FOLDERCREATIONDATE) of MAILFOLDER with (GETFILEINFO STREAM (QUOTE ICREATIONDATE))) (* ; "Update creation date in case it's a device where writing to it affects it (always true over savevm for some devices)") REALLYP) (T (AND REALLYP (OPENP STREAM))))) (* ; "Yes, close it for real") (PROG1 (CLOSEF STREAM) (replace (MAILFOLDER FOLDERSTREAM) of MAILFOLDER with NIL)))))) @@ -848,8 +864,8 @@ Mode affects SendMail only; mail is still retrieved in all modes.~]" (if \LAFITE (COND ((EQ MAKESYSNAME :LYRIC) (FILESLOAD (SYSLOAD) - NSCHARPATCH) (* ; - "Patch to horrid Lyric NS chars bug") + NSCHARPATCH) (* ; + "Patch to horrid Lyric NS chars bug") (MOVD? 'PROMPTFORWORD 'TTYINPROMPTFORWORD NIL T))) ) (DECLARE%: DOEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS @@ -861,30 +877,30 @@ Mode affects SendMail only; mail is still retrieved in all modes.~]" (if \LAFITE (ADDTOVAR LAMA LAFITE) ) (PUTPROPS LAFITE COPYRIGHT ("Xerox Corporation and Bolt Beranek and Newman Inc." 1982 1983 1984 1985 -1986 1987 1988 1989 1993 1994)) +1986 1987 1988 1989 1993 1994 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (7072 22118 (LAFITE 7082 . 8393) (LAFITE.ON.FROM.BACKGROUND 8395 . 8766) (\LAFITE.OFF -8768 . 9152) (\LAFITE.START.PROC 9154 . 10930) (LAFITE.COMPUTE.CACHED.VARS 10932 . 13634) ( -\LAFITE.PROCESS 13636 . 14002) (\LAFITE.START.ABORT 14004 . 14196) (\LAFITE.QUIT 14198 . 14440) ( -\LAFITE.RESTART 14442 . 14575) (\LAFITE.SUBQUIT 14577 . 15875) (\LAFITE.QUIT.PROC 15877 . 18613) ( -\LAFITEDEFAULTHOST&DIR 18615 . 19425) (LAFITEDEFAULTHOST&DIR 19427 . 19597) (MAKELAFITECOMMANDWINDOW -19599 . 21238) (EXTRACTMENUCOMMAND 21240 . 21488) (DOMAINLAFITECOMMAND 21490 . 21639) ( -LAFITE.TOGGLE.SERVER.TRACE 21641 . 22116)) (22189 25157 (LAFITEMODE 22199 . 22679) (\LAFITE.INFER.MODE - 22681 . 23034) (\LAFITE.SHOW.MODE 23036 . 23273) (\LAFITE.MODE.TITLE 23275 . 23560) ( -LAFITE.SHOW.MODE.P 23562 . 23803) (LAFITE.ALL.MODES.P 23805 . 24148) (SET.LAFITE.MODE.INTERACTIVELY -24150 . 24732) (\LAFITE.COMPUTE.MODE.COMMANDS 24734 . 25155)) (26410 28166 (\LAFITE.LOGIN 26420 . -26802) (\LAFITE.LOGIN.NORESTART 26804 . 26910) (LAFITE.PROMPT.FOR.LOGIN 26912 . 27931) ( -\LAFITE.REAUTHENTICATE 27933 . 28164)) (37585 41027 (LAFITE.AROUNDEXIT 37595 . 38133) ( -\LAFITE.MARK.FOLDERS.OBSOLETE 38135 . 39051) (\LAFITE.CHECK.FOLDERS 39053 . 39452) ( -\LAFITE.ASSURE.FOLDER.READY 39454 . 39864) (\LAFITE.AFTERLOGIN 39866 . 41025)) (41059 43997 ( -LA.RESETSHADE 41069 . 41447) (LA.MENU.ITEM 41449 . 41867) (NTHMESSAGE 41869 . 41952) ( -\LAFITE.MAKE.MSGARRAY 41954 . 42384) (\LAFITE.ADDMESSAGES.TO.ARRAY 42386 . 42967) ( -\MAILFOLDER.DEFPRINT 42969 . 43216) (\LAFITEMSG.DEFPRINT 43218 . 43380) (LA.POSITION.FROM.REGION 43382 - . 43859) (MAILFOLDERBUSY 43861 . 43995)) (44175 60041 (TOCFILENAME 44185 . 44616) (DELETEMAILFOLDER -44618 . 45138) (\LAFITE.OPEN.FOLDER 45140 . 49755) (\LAFITE.REPORT.FILE.WONT.OPEN 49757 . 50481) ( -\LAFITE.FOLDER.CHANGED 50483 . 52887) (\LAFITE.REBROWSE.FOLDER 52889 . 55854) ( -\LAFITE.FOLDER.CHANGED.MENU 55856 . 56779) (\LAFITE.SET.FOLDER.STREAM 56781 . 57475) ( -\LAFITE.OPENSTREAM 57477 . 58016) (\LAFITE.CREATE.MENU 58018 . 58371) (\LAFITE.EOF 58373 . 59193) ( -\LAFITE.CLOSE.FOLDER 59195 . 60039)) (60042 60626 (\LAFITE.DESCRIBE.FOLDER 60052 . 60624)) (60687 -61793 (LOAD-LAFITE 60697 . 61791)) (69504 70781 (\LAFITE.GLOBAL.INIT 69514 . 70779))))) + (FILEMAP (NIL (7140 22186 (LAFITE 7150 . 8461) (LAFITE.ON.FROM.BACKGROUND 8463 . 8834) (\LAFITE.OFF +8836 . 9220) (\LAFITE.START.PROC 9222 . 10998) (LAFITE.COMPUTE.CACHED.VARS 11000 . 13702) ( +\LAFITE.PROCESS 13704 . 14070) (\LAFITE.START.ABORT 14072 . 14264) (\LAFITE.QUIT 14266 . 14508) ( +\LAFITE.RESTART 14510 . 14643) (\LAFITE.SUBQUIT 14645 . 15943) (\LAFITE.QUIT.PROC 15945 . 18681) ( +\LAFITEDEFAULTHOST&DIR 18683 . 19493) (LAFITEDEFAULTHOST&DIR 19495 . 19665) (MAKELAFITECOMMANDWINDOW +19667 . 21306) (EXTRACTMENUCOMMAND 21308 . 21556) (DOMAINLAFITECOMMAND 21558 . 21707) ( +LAFITE.TOGGLE.SERVER.TRACE 21709 . 22184)) (22261 25229 (LAFITEMODE 22271 . 22751) (\LAFITE.INFER.MODE + 22753 . 23106) (\LAFITE.SHOW.MODE 23108 . 23345) (\LAFITE.MODE.TITLE 23347 . 23632) ( +LAFITE.SHOW.MODE.P 23634 . 23875) (LAFITE.ALL.MODES.P 23877 . 24220) (SET.LAFITE.MODE.INTERACTIVELY +24222 . 24804) (\LAFITE.COMPUTE.MODE.COMMANDS 24806 . 25227)) (26079 27835 (\LAFITE.LOGIN 26089 . +26471) (\LAFITE.LOGIN.NORESTART 26473 . 26579) (LAFITE.PROMPT.FOR.LOGIN 26581 . 27600) ( +\LAFITE.REAUTHENTICATE 27602 . 27833)) (35346 38788 (LAFITE.AROUNDEXIT 35356 . 35894) ( +\LAFITE.MARK.FOLDERS.OBSOLETE 35896 . 36812) (\LAFITE.CHECK.FOLDERS 36814 . 37213) ( +\LAFITE.ASSURE.FOLDER.READY 37215 . 37625) (\LAFITE.AFTERLOGIN 37627 . 38786)) (38820 41758 ( +LA.RESETSHADE 38830 . 39208) (LA.MENU.ITEM 39210 . 39628) (NTHMESSAGE 39630 . 39713) ( +\LAFITE.MAKE.MSGARRAY 39715 . 40145) (\LAFITE.ADDMESSAGES.TO.ARRAY 40147 . 40728) ( +\MAILFOLDER.DEFPRINT 40730 . 40977) (\LAFITEMSG.DEFPRINT 40979 . 41141) (LA.POSITION.FROM.REGION 41143 + . 41620) (MAILFOLDERBUSY 41622 . 41756)) (41936 58324 (TOCFILENAME 41946 . 42377) (DELETEMAILFOLDER +42379 . 42899) (\LAFITE.OPEN.FOLDER 42901 . 47516) (\LAFITE.REPORT.FILE.WONT.OPEN 47518 . 48242) ( +\LAFITE.FOLDER.CHANGED 48244 . 50648) (\LAFITE.REBROWSE.FOLDER 50650 . 53615) ( +\LAFITE.FOLDER.CHANGED.MENU 53617 . 54540) (\LAFITE.SET.FOLDER.STREAM 54542 . 55236) ( +\LAFITE.OPENSTREAM 55238 . 55777) (\LAFITE.CREATE.MENU 55779 . 56132) (\LAFITE.EOF 56134 . 57476) ( +\LAFITE.CLOSE.FOLDER 57478 . 58322)) (58325 58909 (\LAFITE.DESCRIBE.FOLDER 58335 . 58907)) (58970 +60076 (LOAD-LAFITE 58980 . 60074)) (67787 69064 (\LAFITE.GLOBAL.INIT 67797 . 69062))))) STOP diff --git a/library/lafite/LAFITE.LCOM b/library/lafite/LAFITE.LCOM index 98559cfb3..0d5cdb597 100644 Binary files a/library/lafite/LAFITE.LCOM and b/library/lafite/LAFITE.LCOM differ diff --git a/library/lafite/LAFITECOMMANDS.LCOM b/library/lafite/LAFITECOMMANDS.LCOM index 161d2fc58..0da3ceba5 100644 Binary files a/library/lafite/LAFITECOMMANDS.LCOM and b/library/lafite/LAFITECOMMANDS.LCOM differ diff --git a/library/lafite/LAFITEMAIL b/library/lafite/LAFITEMAIL index 0f2b949ff..1cf1dbd06 100644 --- a/library/lafite/LAFITEMAIL +++ b/library/lafite/LAFITEMAIL @@ -1,18 +1,74 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED " 6-Aug-93 18:19:26" {DSK}lafite>sources>lafitemail.;24 68769 +(FILECREATED "22-Jun-2021 10:19:08"  +{DSK}kaplan>Local>medley3.5>git-medley>library>lafite>LAFITEMAIL.;2 70964 - changes to%: (FNS LAFITE.NEW.PARSE.HEADER) (VARS LAFITEMAILCOMS) + changes to%: (FNS LA.SKIP.TO.EOL LAFITE.SKIP.WHITE.SPACE) + (FILES LAFITEDECLS) - previous date%: "26-May-92 12:22:49" {DSK}lafite>sources>lafitemail.;22) + previous date%: " 6-Aug-93 18:19:26" +{DSK}kaplan>Local>medley3.5>git-medley>library>lafite>LAFITEMAIL.;1) (* ; " -Copyright (c) 1984, 1985, 1986, 1987, 1988, 1989, 1991, 1992, 1993 by Xerox Corporation. All rights reserved. +Copyright (c) 1984-1989, 1991-1993, 2021 by Xerox Corporation. ") (PRETTYCOMPRINT LAFITEMAILCOMS) -(RPAQQ LAFITEMAILCOMS ((COMS (* ; "Retrieving mail") (FNS \LAFITE.GETMAIL \LAFITE.GETMAIL.FROM.ICON \LAFITE.GETMAIL.PROC \LAFITE.GETNEWMAIL \LAFITE.GETNEWMAIL1 \LAFITE.GETNEWMAIL# \LAFITE.RETRIEVEMESSAGES)) (COMS (* ; "Mail polling and registration") (FNS \LAFITE.GET.USER.DATA \LAFITE.GUESS.MODE \LAFITE.REGISTER.MODE LAFITECLEARCACHE FULLUSERNAME LAFITE.USER.NAME.FROM.LOGIN LAFITEMAILWATCH \LAFITE.WAKE.WATCHER POLLNEWMAIL \LAFITE.NEW.MAIL.EXISTS PRINTLAFITESTATUS LAFITE.STATUS.WITH.TIME \LAFITE.REINITIALIZING)) (COMS (* ; "Parsing mail files") (FNS \LAFITE.PARSE.FOLDER \LAFITE.PARSE.FOLDER1 \LAFITE.HANDLE.DUPLICATES \LAFITE.CHECK.DUPLICATE \LAFITE.REPORT.DUPLICATES BADMAILFILE BADMAILFILE.CLOSEFN BADMAILFILE.FLAGBYTE VERIFYMAILFOLDER VERIFYFAILED \LAFITE.READ.TOC.FILE BADTOCFILE \LAFITE.TOCEOF LA.READCOUNT LA.READSTAMP LA.PRINTHEADER LA.PRINTCOUNT LA.PRINTSTAMP LA.READSHORTSTRING LA.PRINTSHORTSTRING LA.READSTRING \LAFITE.VERIFYMSG LA.MSGFROMMEP) (FNS LAFITE.PARSE.MSG.FOR.TOC LAFITE-EXTRACT-REAL-NAME LAFITE.FETCH.TO.FIELD LAFITE.PARSE.HEADER LAFITE.GRAB.DATE LAFITE.READ.LINE.FOR.TOC LAFITE.READ.FORMAT LAFITE.READ.NAME.FIELD LAFITE.READ.ONE.LINE.FOR.TOC LAFITE.READ.TO.EOL LA.SKIP.TO.EOL LAFITE.SKIP.WHITE.SPACE) (FNS \LAFITE.PARSE.MESSAGE) (COMS (VARS LA.FULLPARSEFIELDS LA.TOCFIELDS LA.TOFIELDONLY LA.DATEFIELDONLY LA.SUBJECTFIELDONLY) (FNS LAFITE.INIT.PARSETABLES LAFITE.MAKE.PARSE.TABLE LAFITE.MAKE.PARSE.TABLE1)) (COMS (* ; "New header parser") (FNS LAFITE.NEW.PARSE.HEADER LAFITE.HANDLE.ORIGINAL.FIELD) (INITVARS (*LAFITE-MAX-FIELD-WIDTH* 100) (*LAFITE-PARSE-HEADER-STRING-RESOURCE*)))) (COMS (INITVARS (*LAFITE-VERIFY-ACTION* NIL) (MAILWATCHWAITTIME 5) (LAFITEFLUSHMAILFLG T) (LAFITETOC.EXT "-Lafite-toc") (LAFITENEWMAILFN NIL) (LAFITENEWMAILTUNE NIL) (LAFITEGETMAILTUNE NIL) (LAFITE.AFTER.GETMAIL.FN NIL) (LAFITE.SORT.NEW.MAIL NIL)) (INITVARS (\LAFITE.LAST.STATUS)) (ADDVARS (\SYSTEMCACHEVARS \LAFITE.LAST.STATUS))) (DECLARE%: DOEVAL@COMPILE (P (CL:PROCLAIM (QUOTE (CL:SPECIAL *LAFITE-VERIFY-ACTION* DEFAULTREGISTRY LAFITEDEBUGFLG))) (CL:PROCLAIM (QUOTE (GLOBAL LAFITEFLUSHMAILFLG LAFITEGETMAILTUNE LAFITENEWMAILFN LAFITENEWMAILTUNE LAFITEIFFROMMETHENSEENFLG MAILWATCHWAITTIME LAFITETOC.EXT LAFITE.SORT.NEW.MAIL))))) (DECLARE%: EVAL@COMPILE DONTCOPY (GLOBALVARS *LAFITE-MAX-FIELD-WIDTH* *LAFITE-PARSE-HEADER-STRING-RESOURCE* LA.FULLPARSEFIELDS LA.TOCFIELDS LA.TOFIELDONLY LA.DATEFIELDONLY LA.SUBJECTFIELDONLY \LAFITE.AUTHENTICATION.FAILURE \LAPARSE.FULL \LAPARSE.TOCFIELDS \LAPARSE.TOFIELD \LAPARSE.SUBJECTFIELD \LAPARSE.DATEFIELD LAFITE.AFTER.GETMAIL.FN) (FILES (SOURCE) LAFITEDECLS) (LOCALVARS . T)))) +(RPAQQ LAFITEMAILCOMS + ((COMS (* ; "Retrieving mail") + (FNS \LAFITE.GETMAIL \LAFITE.GETMAIL.FROM.ICON \LAFITE.GETMAIL.PROC \LAFITE.GETNEWMAIL + \LAFITE.GETNEWMAIL1 \LAFITE.GETNEWMAIL# \LAFITE.RETRIEVEMESSAGES)) + (COMS (* ; "Mail polling and registration") + (FNS \LAFITE.GET.USER.DATA \LAFITE.GUESS.MODE \LAFITE.REGISTER.MODE LAFITECLEARCACHE + FULLUSERNAME LAFITE.USER.NAME.FROM.LOGIN LAFITEMAILWATCH \LAFITE.WAKE.WATCHER + POLLNEWMAIL \LAFITE.NEW.MAIL.EXISTS PRINTLAFITESTATUS LAFITE.STATUS.WITH.TIME + \LAFITE.REINITIALIZING)) + [COMS (* ; "Parsing mail files") + (FNS \LAFITE.PARSE.FOLDER \LAFITE.PARSE.FOLDER1 \LAFITE.HANDLE.DUPLICATES + \LAFITE.CHECK.DUPLICATE \LAFITE.REPORT.DUPLICATES BADMAILFILE BADMAILFILE.CLOSEFN + BADMAILFILE.FLAGBYTE VERIFYMAILFOLDER VERIFYFAILED \LAFITE.READ.TOC.FILE + BADTOCFILE \LAFITE.TOCEOF LA.READCOUNT LA.READSTAMP LA.PRINTHEADER LA.PRINTCOUNT + LA.PRINTSTAMP LA.READSHORTSTRING LA.PRINTSHORTSTRING LA.READSTRING + \LAFITE.VERIFYMSG LA.MSGFROMMEP) + (FNS LAFITE.PARSE.MSG.FOR.TOC LAFITE-EXTRACT-REAL-NAME LAFITE.FETCH.TO.FIELD + LAFITE.PARSE.HEADER LAFITE.GRAB.DATE LAFITE.READ.LINE.FOR.TOC LAFITE.READ.FORMAT + LAFITE.READ.NAME.FIELD LAFITE.READ.ONE.LINE.FOR.TOC LAFITE.READ.TO.EOL + LA.SKIP.TO.EOL LAFITE.SKIP.WHITE.SPACE) + (FNS \LAFITE.PARSE.MESSAGE) + (COMS (VARS LA.FULLPARSEFIELDS LA.TOCFIELDS LA.TOFIELDONLY LA.DATEFIELDONLY + LA.SUBJECTFIELDONLY) + (FNS LAFITE.INIT.PARSETABLES LAFITE.MAKE.PARSE.TABLE LAFITE.MAKE.PARSE.TABLE1)) + (COMS (* ; "New header parser") + (FNS LAFITE.NEW.PARSE.HEADER LAFITE.HANDLE.ORIGINAL.FIELD) + (INITVARS (*LAFITE-MAX-FIELD-WIDTH* 100) + (*LAFITE-PARSE-HEADER-STRING-RESOURCE*] + (COMS (INITVARS (*LAFITE-VERIFY-ACTION* NIL) + (MAILWATCHWAITTIME 5) + (LAFITEFLUSHMAILFLG T) + (LAFITETOC.EXT "-Lafite-toc") + (LAFITENEWMAILFN NIL) + (LAFITENEWMAILTUNE NIL) + (LAFITEGETMAILTUNE NIL) + (LAFITE.AFTER.GETMAIL.FN NIL) + (LAFITE.SORT.NEW.MAIL NIL)) + (INITVARS (\LAFITE.LAST.STATUS)) + (ADDVARS (\SYSTEMCACHEVARS \LAFITE.LAST.STATUS))) + [DECLARE%: DOEVAL@COMPILE (P (CL:PROCLAIM '(CL:SPECIAL *LAFITE-VERIFY-ACTION* DEFAULTREGISTRY + LAFITEDEBUGFLG)) + (CL:PROCLAIM '(GLOBAL LAFITEFLUSHMAILFLG LAFITEGETMAILTUNE + LAFITENEWMAILFN LAFITENEWMAILTUNE + LAFITEIFFROMMETHENSEENFLG MAILWATCHWAITTIME + LAFITETOC.EXT LAFITE.SORT.NEW.MAIL] + (DECLARE%: EVAL@COMPILE DONTCOPY + (GLOBALVARS *LAFITE-MAX-FIELD-WIDTH* *LAFITE-PARSE-HEADER-STRING-RESOURCE* + LA.FULLPARSEFIELDS LA.TOCFIELDS LA.TOFIELDONLY LA.DATEFIELDONLY + LA.SUBJECTFIELDONLY \LAFITE.AUTHENTICATION.FAILURE \LAPARSE.FULL + \LAPARSE.TOCFIELDS \LAPARSE.TOFIELD \LAPARSE.SUBJECTFIELD \LAPARSE.DATEFIELD + LAFITE.AFTER.GETMAIL.FN) + (FILES (SOURCE) + LAFITEDECLS) + (LOCALVARS . T)))) @@ -249,12 +305,41 @@ Copyright (c) 1984, 1985, 1986, 1987, 1988, 1989, 1991, 1992, 1993 by Xerox Corp ) (LA.SKIP.TO.EOL -(LAMBDA (STREAM LASTCH) (* ; "Edited 28-Jul-88 16:23 by bvm") (* ;;; "Flush to end of this field. LASTCH is the last char read before this") (PROG* ((CSET (LLSH (fetch CHARSET of STREAM) 8)) (EOLC (fetch (STREAM EOLCONVENTION) of STREAM)) (EOLCHAR (SELECTC EOLC (LF.EOLC (CHARCODE LF)) (CHARCODE CR)))) (if (EQ LASTCH (CHARCODE EOL)) then (* ; "We're already there") (GO PEEK)) LP (* ;; "Eat chars til eol. Optimize here with \NSIN because this operation wants to be fast, while READCCODE is slow.") (repeatuntil (EQ (\NSIN STREAM CSET CSET) EOLCHAR)) (if (AND (EQ EOLC CRLF.EOLC) (EQ (\PEEKBIN STREAM T) (CHARCODE LF))) then (* ; "Eat the lf after the cr") (\BIN STREAM)) PEEK (SELCHARQ (\NSPEEK STREAM CSET CSET T) ((SPACE TAB) (* ; "Continuation line, keep eating") (GO LP)) NIL))) -) + [LAMBDA (STREAM LASTCH) (* ; "Edited 22-Jun-2021 10:15 by rmk:") + +(* ;;; "Flush to end of this field. LASTCH is the last char read before this") + + (PROG* [(EOLC (fetch (STREAM EOLCONVENTION) of STREAM)) + (EOLCHAR (SELECTC EOLC + (LF.EOLC (CHARCODE LF)) + (CHARCODE CR] + (if (EQ LASTCH (CHARCODE EOL)) + then (* ; "We're already there") + (GO PEEK)) + LP + + (* ;; "Eat chars til eol. ") + + (repeatuntil (EQ EOLCHAR (\INCCODE STREAM))) + (if (AND (EQ EOLC CRLF.EOLC) + (EQ (\PEEKBIN STREAM T) + (CHARCODE LF))) + then (* ; "Eat the lf after the cr") + (* ; + "\INCHAR would do that internally") + (\BIN STREAM)) + PEEK + (SELCHARQ (\PEEKCCODE STREAM T) + ((SPACE TAB) (* ; "Continuation line, keep eating") + (GO LP)) + NIL]) (LAFITE.SKIP.WHITE.SPACE -(LAMBDA (STREAM) (* ; "Edited 9-Sep-87 19:07 by bvm:") (bind (CSET _ (LLSH (fetch CHARSET of STREAM) 8)) do (SELCHARQ (\NSPEEK STREAM CSET CSET T) ((SPACE TAB) (\NSIN STREAM CSET CSET)) (RETURN)))) -) + [LAMBDA (STREAM) (* ; "Edited 22-Jun-2021 10:18 by rmk:") + (do (SELCHARQ (\PEEKCCODE STREAM T) + ((SPACE TAB) + (\INCCODE STREAM)) + (RETURN]) ) (DEFINEQ @@ -263,15 +348,27 @@ Copyright (c) 1984, 1985, 1986, 1987, 1988, 1989, 1991, 1992, 1993 by Xerox Corp ) ) -(RPAQQ LA.FULLPARSEFIELDS (("DATE:" LAFITE.READ.LINE.FOR.TOC Date) ("SUBJECT:" LAFITE.READ.LINE.FOR.TOC Subject) ("SENDER:" LAFITE.READ.NAME.FIELD Sender) ("FROM:" LAFITE.READ.NAME.FIELD From) ("REPLY-TO:" LAFITE.READ.NAME.FIELD Reply-to) ("IN-REPLY-TO:" LAFITE.READ.LINE.FOR.TOC In-Reply-to) ("TO:" LAFITE.READ.NAME.FIELD To) ("CC:" LAFITE.READ.NAME.FIELD cc) ("FORMAT:" LAFITE.READ.FORMAT))) +(RPAQQ LA.FULLPARSEFIELDS + (("DATE:" LAFITE.READ.LINE.FOR.TOC Date) + ("SUBJECT:" LAFITE.READ.LINE.FOR.TOC Subject) + ("SENDER:" LAFITE.READ.NAME.FIELD Sender) + ("FROM:" LAFITE.READ.NAME.FIELD From) + ("REPLY-TO:" LAFITE.READ.NAME.FIELD Reply-to) + ("IN-REPLY-TO:" LAFITE.READ.LINE.FOR.TOC In-Reply-to) + ("TO:" LAFITE.READ.NAME.FIELD To) + ("CC:" LAFITE.READ.NAME.FIELD cc) + ("FORMAT:" LAFITE.READ.FORMAT))) -(RPAQQ LA.TOCFIELDS (("DATE:" LAFITE.GRAB.DATE) ("FROM:" LAFITE.READ.LINE.FOR.TOC From) ("SUBJECT:" LAFITE.READ.LINE.FOR.TOC Subject) ("ORIGINAL-FROM:" LAFITE.READ.LINE.FOR.TOC Original-From))) +(RPAQQ LA.TOCFIELDS (("DATE:" LAFITE.GRAB.DATE) + ("FROM:" LAFITE.READ.LINE.FOR.TOC From) + ("SUBJECT:" LAFITE.READ.LINE.FOR.TOC Subject) + ("ORIGINAL-FROM:" LAFITE.READ.LINE.FOR.TOC Original-From))) -(RPAQQ LA.TOFIELDONLY (("TO:" LAFITE.READ.ONE.LINE.FOR.TOC))) +(RPAQQ LA.TOFIELDONLY (("TO:" LAFITE.READ.ONE.LINE.FOR.TOC))) -(RPAQQ LA.DATEFIELDONLY (("DATE:" LAFITE.PARSE.DATE.FIELD.ONLY))) +(RPAQQ LA.DATEFIELDONLY (("DATE:" LAFITE.PARSE.DATE.FIELD.ONLY))) -(RPAQQ LA.SUBJECTFIELDONLY (("SUBJECT:" LAFITE.READ.ONE.LINE.FOR.TOC))) +(RPAQQ LA.SUBJECTFIELDONLY (("SUBJECT:" LAFITE.READ.ONE.LINE.FOR.TOC))) (DEFINEQ (LAFITE.INIT.PARSETABLES @@ -303,75 +400,81 @@ Copyright (c) 1984, 1985, 1986, 1987, 1988, 1989, 1991, 1992, 1993 by Xerox Corp ) ) -(RPAQ? *LAFITE-MAX-FIELD-WIDTH* 100) +(RPAQ? *LAFITE-MAX-FIELD-WIDTH* 100) -(RPAQ? *LAFITE-PARSE-HEADER-STRING-RESOURCE*) +(RPAQ? *LAFITE-PARSE-HEADER-STRING-RESOURCE* ) -(RPAQ? *LAFITE-VERIFY-ACTION* NIL) +(RPAQ? *LAFITE-VERIFY-ACTION* NIL) -(RPAQ? MAILWATCHWAITTIME 5) +(RPAQ? MAILWATCHWAITTIME 5) -(RPAQ? LAFITEFLUSHMAILFLG T) +(RPAQ? LAFITEFLUSHMAILFLG T) -(RPAQ? LAFITETOC.EXT "-Lafite-toc") +(RPAQ? LAFITETOC.EXT "-Lafite-toc") -(RPAQ? LAFITENEWMAILFN NIL) +(RPAQ? LAFITENEWMAILFN NIL) -(RPAQ? LAFITENEWMAILTUNE NIL) +(RPAQ? LAFITENEWMAILTUNE NIL) -(RPAQ? LAFITEGETMAILTUNE NIL) +(RPAQ? LAFITEGETMAILTUNE NIL) -(RPAQ? LAFITE.AFTER.GETMAIL.FN NIL) +(RPAQ? LAFITE.AFTER.GETMAIL.FN NIL) -(RPAQ? LAFITE.SORT.NEW.MAIL NIL) +(RPAQ? LAFITE.SORT.NEW.MAIL NIL) -(RPAQ? \LAFITE.LAST.STATUS) +(RPAQ? \LAFITE.LAST.STATUS ) -(ADDTOVAR \SYSTEMCACHEVARS \LAFITE.LAST.STATUS) +(ADDTOVAR \SYSTEMCACHEVARS \LAFITE.LAST.STATUS) (DECLARE%: DOEVAL@COMPILE -(CL:PROCLAIM (QUOTE (CL:SPECIAL *LAFITE-VERIFY-ACTION* DEFAULTREGISTRY LAFITEDEBUGFLG))) +(CL:PROCLAIM '(CL:SPECIAL *LAFITE-VERIFY-ACTION* DEFAULTREGISTRY LAFITEDEBUGFLG)) -(CL:PROCLAIM (QUOTE (GLOBAL LAFITEFLUSHMAILFLG LAFITEGETMAILTUNE LAFITENEWMAILFN LAFITENEWMAILTUNE LAFITEIFFROMMETHENSEENFLG MAILWATCHWAITTIME LAFITETOC.EXT LAFITE.SORT.NEW.MAIL))) +(CL:PROCLAIM '(GLOBAL LAFITEFLUSHMAILFLG LAFITEGETMAILTUNE LAFITENEWMAILFN LAFITENEWMAILTUNE + LAFITEIFFROMMETHENSEENFLG MAILWATCHWAITTIME LAFITETOC.EXT LAFITE.SORT.NEW.MAIL)) ) (DECLARE%: EVAL@COMPILE DONTCOPY (DECLARE%: DOEVAL@COMPILE DONTCOPY -(GLOBALVARS *LAFITE-MAX-FIELD-WIDTH* *LAFITE-PARSE-HEADER-STRING-RESOURCE* LA.FULLPARSEFIELDS LA.TOCFIELDS LA.TOFIELDONLY LA.DATEFIELDONLY LA.SUBJECTFIELDONLY \LAFITE.AUTHENTICATION.FAILURE \LAPARSE.FULL \LAPARSE.TOCFIELDS \LAPARSE.TOFIELD \LAPARSE.SUBJECTFIELD \LAPARSE.DATEFIELD LAFITE.AFTER.GETMAIL.FN) +(GLOBALVARS *LAFITE-MAX-FIELD-WIDTH* *LAFITE-PARSE-HEADER-STRING-RESOURCE* LA.FULLPARSEFIELDS + LA.TOCFIELDS LA.TOFIELDONLY LA.DATEFIELDONLY LA.SUBJECTFIELDONLY + \LAFITE.AUTHENTICATION.FAILURE \LAPARSE.FULL \LAPARSE.TOCFIELDS \LAPARSE.TOFIELD + \LAPARSE.SUBJECTFIELD \LAPARSE.DATEFIELD LAFITE.AFTER.GETMAIL.FN) ) -(FILESLOAD (SOURCE) LAFITEDECLS) +(FILESLOAD (SOURCE) + LAFITEDECLS) (DECLARE%: DOEVAL@COMPILE DONTCOPY (LOCALVARS . T) ) ) -(PUTPROPS LAFITEMAIL COPYRIGHT ("Xerox Corporation" 1984 1985 1986 1987 1988 1989 1991 1992 1993)) +(PUTPROPS LAFITEMAIL COPYRIGHT ("Xerox Corporation" 1984 1985 1986 1987 1988 1989 1991 1992 1993 2021) +) (DECLARE%: DONTCOPY - (FILEMAP (NIL (3143 12346 (\LAFITE.GETMAIL 3153 . 3385) (\LAFITE.GETMAIL.FROM.ICON 3387 . 3644) ( -\LAFITE.GETMAIL.PROC 3646 . 3989) (\LAFITE.GETNEWMAIL 3991 . 6652) (\LAFITE.GETNEWMAIL1 6654 . 8016) ( -\LAFITE.GETNEWMAIL# 8018 . 8206) (\LAFITE.RETRIEVEMESSAGES 8208 . 12344)) (12393 25647 ( -\LAFITE.GET.USER.DATA 12403 . 13791) (\LAFITE.GUESS.MODE 13793 . 14776) (\LAFITE.REGISTER.MODE 14778 - . 15505) (LAFITECLEARCACHE 15507 . 15981) (FULLUSERNAME 15983 . 16752) (LAFITE.USER.NAME.FROM.LOGIN -16754 . 17833) (LAFITEMAILWATCH 17835 . 18279) (\LAFITE.WAKE.WATCHER 18281 . 18663) (POLLNEWMAIL 18665 - . 23646) (\LAFITE.NEW.MAIL.EXISTS 23648 . 23903) (PRINTLAFITESTATUS 23905 . 25199) ( -LAFITE.STATUS.WITH.TIME 25201 . 25389) (\LAFITE.REINITIALIZING 25391 . 25645)) (25683 52890 ( -\LAFITE.PARSE.FOLDER 25693 . 26351) (\LAFITE.PARSE.FOLDER1 26353 . 29949) (\LAFITE.HANDLE.DUPLICATES -29951 . 31288) (\LAFITE.CHECK.DUPLICATE 31290 . 31972) (\LAFITE.REPORT.DUPLICATES 31974 . 32906) ( -BADMAILFILE 32908 . 36841) (BADMAILFILE.CLOSEFN 36843 . 37115) (BADMAILFILE.FLAGBYTE 37117 . 37269) ( -VERIFYMAILFOLDER 37271 . 39802) (VERIFYFAILED 39804 . 39937) (\LAFITE.READ.TOC.FILE 39939 . 45385) ( -BADTOCFILE 45387 . 45736) (\LAFITE.TOCEOF 45738 . 45977) (LA.READCOUNT 45979 . 46639) (LA.READSTAMP -46641 . 46961) (LA.PRINTHEADER 46963 . 49226) (LA.PRINTCOUNT 49228 . 49426) (LA.PRINTSTAMP 49428 . -49719) (LA.READSHORTSTRING 49721 . 50120) (LA.PRINTSHORTSTRING 50122 . 50850) (LA.READSTRING 50852 . -51167) (\LAFITE.VERIFYMSG 51169 . 52180) (LA.MSGFROMMEP 52182 . 52888)) (52891 61736 ( -LAFITE.PARSE.MSG.FOR.TOC 52901 . 54691) (LAFITE-EXTRACT-REAL-NAME 54693 . 56332) ( -LAFITE.FETCH.TO.FIELD 56334 . 56839) (LAFITE.PARSE.HEADER 56841 . 58487) (LAFITE.GRAB.DATE 58489 . -58738) (LAFITE.READ.LINE.FOR.TOC 58740 . 59014) (LAFITE.READ.FORMAT 59016 . 59290) ( -LAFITE.READ.NAME.FIELD 59292 . 59940) (LAFITE.READ.ONE.LINE.FOR.TOC 59942 . 60069) (LAFITE.READ.TO.EOL - 60071 . 60693) (LA.SKIP.TO.EOL 60695 . 61503) (LAFITE.SKIP.WHITE.SPACE 61505 . 61734)) (61737 62267 ( -\LAFITE.PARSE.MESSAGE 61747 . 62265)) (63061 64873 (LAFITE.INIT.PARSETABLES 63071 . 63492) ( -LAFITE.MAKE.PARSE.TABLE 63494 . 63947) (LAFITE.MAKE.PARSE.TABLE1 63949 . 64871)) (64908 67419 ( -LAFITE.NEW.PARSE.HEADER 64918 . 66739) (LAFITE.HANDLE.ORIGINAL.FIELD 66741 . 67417))))) + (FILEMAP (NIL (4499 13702 (\LAFITE.GETMAIL 4509 . 4741) (\LAFITE.GETMAIL.FROM.ICON 4743 . 5000) ( +\LAFITE.GETMAIL.PROC 5002 . 5345) (\LAFITE.GETNEWMAIL 5347 . 8008) (\LAFITE.GETNEWMAIL1 8010 . 9372) ( +\LAFITE.GETNEWMAIL# 9374 . 9562) (\LAFITE.RETRIEVEMESSAGES 9564 . 13700)) (13749 27003 ( +\LAFITE.GET.USER.DATA 13759 . 15147) (\LAFITE.GUESS.MODE 15149 . 16132) (\LAFITE.REGISTER.MODE 16134 + . 16861) (LAFITECLEARCACHE 16863 . 17337) (FULLUSERNAME 17339 . 18108) (LAFITE.USER.NAME.FROM.LOGIN +18110 . 19189) (LAFITEMAILWATCH 19191 . 19635) (\LAFITE.WAKE.WATCHER 19637 . 20019) (POLLNEWMAIL 20021 + . 25002) (\LAFITE.NEW.MAIL.EXISTS 25004 . 25259) (PRINTLAFITESTATUS 25261 . 26555) ( +LAFITE.STATUS.WITH.TIME 26557 . 26745) (\LAFITE.REINITIALIZING 26747 . 27001)) (27039 54246 ( +\LAFITE.PARSE.FOLDER 27049 . 27707) (\LAFITE.PARSE.FOLDER1 27709 . 31305) (\LAFITE.HANDLE.DUPLICATES +31307 . 32644) (\LAFITE.CHECK.DUPLICATE 32646 . 33328) (\LAFITE.REPORT.DUPLICATES 33330 . 34262) ( +BADMAILFILE 34264 . 38197) (BADMAILFILE.CLOSEFN 38199 . 38471) (BADMAILFILE.FLAGBYTE 38473 . 38625) ( +VERIFYMAILFOLDER 38627 . 41158) (VERIFYFAILED 41160 . 41293) (\LAFITE.READ.TOC.FILE 41295 . 46741) ( +BADTOCFILE 46743 . 47092) (\LAFITE.TOCEOF 47094 . 47333) (LA.READCOUNT 47335 . 47995) (LA.READSTAMP +47997 . 48317) (LA.PRINTHEADER 48319 . 50582) (LA.PRINTCOUNT 50584 . 50782) (LA.PRINTSTAMP 50784 . +51075) (LA.READSHORTSTRING 51077 . 51476) (LA.PRINTSHORTSTRING 51478 . 52206) (LA.READSTRING 52208 . +52523) (\LAFITE.VERIFYMSG 52525 . 53536) (LA.MSGFROMMEP 53538 . 54244)) (54247 63666 ( +LAFITE.PARSE.MSG.FOR.TOC 54257 . 56047) (LAFITE-EXTRACT-REAL-NAME 56049 . 57688) ( +LAFITE.FETCH.TO.FIELD 57690 . 58195) (LAFITE.PARSE.HEADER 58197 . 59843) (LAFITE.GRAB.DATE 59845 . +60094) (LAFITE.READ.LINE.FOR.TOC 60096 . 60370) (LAFITE.READ.FORMAT 60372 . 60646) ( +LAFITE.READ.NAME.FIELD 60648 . 61296) (LAFITE.READ.ONE.LINE.FOR.TOC 61298 . 61425) (LAFITE.READ.TO.EOL + 61427 . 62049) (LA.SKIP.TO.EOL 62051 . 63386) (LAFITE.SKIP.WHITE.SPACE 63388 . 63664)) (63667 64197 ( +\LAFITE.PARSE.MESSAGE 63677 . 64195)) (65157 66969 (LAFITE.INIT.PARSETABLES 65167 . 65588) ( +LAFITE.MAKE.PARSE.TABLE 65590 . 66043) (LAFITE.MAKE.PARSE.TABLE1 66045 . 66967)) (67004 69515 ( +LAFITE.NEW.PARSE.HEADER 67014 . 68835) (LAFITE.HANDLE.ORIGINAL.FIELD 68837 . 69513))))) STOP diff --git a/library/lafite/LAFITEMAIL.LCOM b/library/lafite/LAFITEMAIL.LCOM index ea18d4996..7bfdb1aa8 100644 Binary files a/library/lafite/LAFITEMAIL.LCOM and b/library/lafite/LAFITEMAIL.LCOM differ diff --git a/library/lafite/LAFITESEND.LCOM b/library/lafite/LAFITESEND.LCOM index dae40cc7c..9c9d3ee5b 100644 Binary files a/library/lafite/LAFITESEND.LCOM and b/library/lafite/LAFITESEND.LCOM differ diff --git a/lispusers/CHATEMACS.LCOM b/lispusers/CHATEMACS.LCOM index 40818b7c1..74ab48e4a 100644 Binary files a/lispusers/CHATEMACS.LCOM and b/lispusers/CHATEMACS.LCOM differ diff --git a/lispusers/DEFINERPRINT.LCOM b/lispusers/DEFINERPRINT.LCOM index 441041e9c..4a013dbb2 100644 Binary files a/lispusers/DEFINERPRINT.LCOM and b/lispusers/DEFINERPRINT.LCOM differ diff --git a/lispusers/FILEWATCH b/lispusers/FILEWATCH index 4eb5a420b..c372c3414 100644 Binary files a/lispusers/FILEWATCH and b/lispusers/FILEWATCH differ diff --git a/lispusers/FILEWATCH.LCOM b/lispusers/FILEWATCH.LCOM index 8c697521d..7b719978f 100644 Binary files a/lispusers/FILEWATCH.LCOM and b/lispusers/FILEWATCH.LCOM differ diff --git a/lispusers/ISO8859IO b/lispusers/ISO8859IO index a3e0206ab..147a29904 100644 --- a/lispusers/ISO8859IO +++ b/lispusers/ISO8859IO @@ -1,11 +1,11 @@ (DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED "24-Apr-2021 17:06:30"  -{DSK}kaplan>Local>medley3.5>git-medley>lispusers>ISO8859IO.;3 36846 +(FILECREATED "23-Jun-2021 17:00:30"  +{DSK}kaplan>Local>medley3.5>git-medley>lispusers>ISO8859IO.;10 22675 - changes to%: (FNS \8859OUTCHARFN \8859INCCODEFN \8859PEEKCCODEFN MAKEISOFORMAT) + changes to%: (FNS MAKEISOFORMAT MAKEIBMFORMAT MAKEMACFORMAT) - previous date%: "24-Apr-2021 17:06:06" -{DSK}kaplan>Local>medley3.5>git-medley>lispusers>ISO8859IO.;2) + previous date%: "15-Jun-2021 13:53:42" +{DSK}kaplan>Local>medley3.5>git-medley>lispusers>ISO8859IO.;9) (* ; " @@ -15,7 +15,7 @@ Copyright (c) 1995-1997, 1999, 2021 by Xerox Corporation. (PRETTYCOMPRINT ISO8859IOCOMS) (RPAQQ ISO8859IOCOMS - ( + [ (* ;; "This package defines EXTERNALFORMATS for files that are encoded in either ISO8859/1, the standard IBM extended ascii, or the usual MAC encoding.") (COMS (* ; "ISO8859/1") @@ -35,23 +35,10 @@ Copyright (c) 1995-1997, 1999, 2021 by Xerox Corporation. (P (MAKEMACFORMAT))) (COMS (* ; "Independent of char encoding") (FNS \COMMONBACKCHARFN \MAKERECODEMAP \RECODECCODE)) - (DECLARE%: EVAL@COMPILE DONTCOPY [P (EVAL (SYSRECLOOK1 'EXTERNALFORMAT] - - (* ;; "From FILEIO") - - (CONSTANTS (\NORUNCODE 255)) - - (* ;; "From LLCHAR") - - (CONSTANTS (NSCHARSETSHIFT 255)) - - (* ;; "From LLREAD") - - (MACROS \XCCSIN \XCCSPEEK \BACKXCCSCHAR) - - (* ;; "From MODARITH") - - (MACROS UNFOLD)))) + (DECLARE%: EVAL@COMPILE DONTCOPY (P (OR (GETP 'EXPORTS.ALL 'FILE) + (PRINT + "NOTE: ISO8859IO requires EXPORTS.ALL for compilation" + T]) @@ -68,58 +55,36 @@ Copyright (c) 1995-1997, 1999, 2021 by Xerox Corporation. (\8859OUTCHARFN [LAMBDA (STREAM CHARCODE) - (DECLARE (GLOBALVARS *XEROXTOISO8859MAP*)) (* ; "Edited 9-Mar-99 16:59 by rmk:") - (* ; "Edited 7-Dec-95 14:34 by ") + (DECLARE (GLOBALVARS *XEROXTOISO8859MAP*)) (* ; "Edited 5-May-2021 16:31 by rmk:") + (* ; "Edited 7-Dec-95 14:34 by ") (* ; "Edited 7-Dec-95 14:32 by ") - (* ;; "Converts CHARCODE from internal Xerox-rendering to ISO8859 before printing. Unconverted codes are left unchanged (no error). If any remaining codes are out of charset 0, the Xerox run-encoding is used (which means that y-umlaut (code 255 in iso) will confuse any readers).") + (* ;; "Converts CHARCODE from internal encoding to ISO8859 before printing.") - (\FILEOUTCHARFN STREAM (IF (IGREATERP CHARCODE 127) - THEN + (* ;; "Unconverted codes are left unchanged (no error).") - (* ;; "We know that ISO doesn't have floating accents, so only singletons are returned. We also know that it agrees with Xerox on first 128") + (* ;; "If any remaining codes are out of charset 0, the streams external format will be used. ") - (\RECODECCODE CHARCODE *XEROXTOISO8859MAP*) - ELSE CHARCODE]) + (* ;; "Calls \PRINTCCODE instead of \OUTCHAR so that recompiling is not needed if the default external format changes.") -(\8859INCCODEFN - [LAMBDA (STREAM COUNTP) (* ; "Edited 9-Mar-99 16:59 by rmk:") - (* ; "Edited 7-Dec-95 15:24 by ") - (* ; "Edited 7-Dec-95 15:19 by ") - (IF COUNTP - THEN + (\PRINTCCODE (IF (IGREATERP CHARCODE 127) + THEN - (* ;; "This is a little goofy. \NSIN passes the COUNTP flag, not the variable. It then takes the COUNT result and subtracts it out. But \XCCSIN is already subtracting from 0, giving a negative count. So we have to reverse the value here. Sigh ") + (* ;; "We know that ISO doesn't have floating accents, so only singletons are returned. We also know that it agrees with Xerox on first 128") - (LET ((COUNT 0)) - (CL:VALUES (\RECODECCODE (\XCCSIN STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256) - NIL COUNT) - *ISO8859TOXEROXMAP*) - (IMINUS COUNT))) - ELSE (\RECODECCODE (\XCCSIN STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256)) - *ISO8859TOXEROXMAP*]) + (\RECODECCODE CHARCODE *XEROXTOISO8859MAP*) + ELSE CHARCODE) + STREAM]) -(\8859PEEKCCODEFN - [LAMBDA (STREAM NOERROR COUNTP) (* ; "Edited 9-Mar-99 16:59 by rmk:") - (* ; "Edited 3-Jan-96 14:21 by ") - (* ; "Edited 7-Dec-95 15:51 by ") +(\8859INCCODEFN [LAMBDA (STRM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 13:50 by rmk:") (* ; "Edited 7-Dec-95 15:24 by ") (* ; "Edited 7-Dec-95 15:19 by ") (CL:WHEN BYTECOUNTVAR (SET BYTECOUNTVAR (SUB1 BYTECOUNTVAL))) (\RECODECCODE (\BIN STRM) *ISO8859TOXEROXMAP*]) - (* ;; "Uses \XCCSPEEK to handle Xerox run-coding") +(\8859PEEKCCODEFN + [LAMBDA (STRM NOERROR) (* ; "Edited 5-May-2021 17:44 by rmk:") + (* ; "Edited 3-Jan-96 14:21 by ") + (* ; "Edited 7-Dec-95 15:51 by ") (* ; "Edited 7-Dec-95 15:19 by ") - (LET (PCODE (COUNT 0)) - (SETQ PCODE (IF COUNTP - THEN (\XCCSPEEK STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256) - NIL NOERROR COUNT) - ELSE (\XCCSPEEK STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256) - NIL NOERROR))) - (IF COUNTP - THEN (CL:VALUES (AND PCODE (\RECODECCODE PCODE *ISO8859TOXEROXMAP*)) - COUNT) - ELSE (AND PCODE (\RECODECCODE PCODE *ISO8859TOXEROXMAP*]) + (\RECODECCODE (\PEEKCCODE STRM NOERROR) + *ISO8859TOXEROXMAP*]) ) (DECLARE%: DOEVAL@COMPILE DONTCOPY @@ -128,9 +93,9 @@ Copyright (c) 1995-1997, 1999, 2021 by Xerox Corporation. (DEFINEQ (MAKEISOFORMAT - [LAMBDA NIL (* ; "Edited 24-Apr-2021 17:01 by rmk:") - (* ; "Edited 9-Mar-99 17:19 by rmk:") - (* ; "Edited 7-Dec-95 16:24 by ") + [LAMBDA NIL (* ; "Edited 23-Jun-2021 17:00 by rmk:") + (* ; "Edited 9-Mar-99 17:19 by rmk:") + (* ; "Edited 7-Dec-95 16:24 by ") (* ; "Edited 7-Dec-95 16:20 by ") (LET [(XEROXTOISO '((61217 160) (61291 166) @@ -212,11 +177,12 @@ Copyright (c) 1995-1997, 1999, 2021 by Xerox Corporation. (61805 376] (SETQ *XEROXTOISO8859MAP* (\MAKERECODEMAP XEROXTOISO)) (SETQ *ISO8859TOXEROXMAP* (\MAKERECODEMAP XEROXTOISO T))) - (\INSTALL.EXTERNALFORMAT :ISO8859/1 (CREATE EXTERNALFORMAT - INCCODEFN _ (FUNCTION \8859INCCODEFN) - PEEKCCODEFN _ (FUNCTION \8859PEEKCCODEFN) - BACKCHARFN _ (FUNCTION \COMMONBACKCHARFN) - FILEOUTCHARFN _ (FUNCTION \8859OUTCHARFN]) + (\INSTALL.EXTERNALFORMAT (CREATE EXTERNALFORMAT + NAME _ :ISO8859/1 + INCCODEFN _ (FUNCTION \8859INCCODEFN) + PEEKCCODEFN _ (FUNCTION \8859PEEKCCODEFN) + BACKCCODEFN _ (FUNCTION \COMMONBACKCHARFN) + OUTCHARFN _ (FUNCTION \8859OUTCHARFN]) ) (MAKEISOFORMAT) @@ -228,55 +194,26 @@ Copyright (c) 1995-1997, 1999, 2021 by Xerox Corporation. (DEFINEQ (\IBMOUTCHARFN - [LAMBDA (STREAM CHARCODE) (* ; "Edited 9-Mar-99 16:59 by rmk:") - - (* ;; "Converts CHARCODE from internal Xerox-rendering to IBM before printing. Unconverted codes are left unchanged (no error). If any remaining codes are out of charset 0, the Xerox run-encoding is used (which means that y-umlaut (code 255 in iso) will confuse any readers).") + [LAMBDA (STREAM CHARCODE) (* ; "Edited 5-May-2021 16:38 by rmk:") + (\PRINTCCODE (IF (IGREATERP CHARCODE 127) + THEN - (\FILEOUTCHARFN STREAM (IF (IGREATERP CHARCODE 127) - THEN + (* ;; "We know that IBM doesn't have floating accents, so only singletons are returned. We also know that it agrees with Xerox on first 128") - (* ;; "We know that IBM doesn't have floating accents, so only singletons are returned. We also know that it agrees with Xerox on first 128") + (\RECODECCODE CHARCODE *XEROXTOIBMMAP*) + ELSE CHARCODE) + STREAM]) - (\RECODECCODE CHARCODE *XEROXTOIBMMAP*) - ELSE CHARCODE]) - -(\IBMINCCODEFN - [LAMBDA (STREAM COUNTP) (* ; "Edited 9-Mar-99 16:59 by rmk:") - (* ; "Edited 8-Dec-95 13:23 by ") - - (* ;; "Uses \XCCSIN to handle Xerox run-coding") - (* ; "Edited 7-Dec-95 15:19 by ") - (IF COUNTP - THEN (LET ((COUNT 0)) - (CL:VALUES (\RECODECCODE (\XCCSIN STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256) - NIL COUNT) - *IBMTOXEROXMAP*) - (IMINUS COUNT))) - ELSE (\RECODECCODE (\XCCSIN STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256)) - *IBMTOXEROXMAP*]) +(\IBMINCCODEFN [LAMBDA (STRM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 13:50 by rmk:") (* ; "Edited 8-Dec-95 13:23 by ") (* ; "Edited 7-Dec-95 15:19 by ") (CL:WHEN BYTECOUNTVAR (SET BYTECOUNTVAR (SUB1 BYTECOUNTVAL))) (\RECODECCODE (\BIN STRM) *IBMTOXEROXMAP*]) (\IBMPEEKCCODEFN - [LAMBDA (STREAM NOERROR COUNTP) (* ; "Edited 9-Mar-99 16:59 by rmk:") - (* ; "Edited 3-Jan-96 14:23 by ") - (* ; "Edited 8-Dec-95 13:24 by ") - (* ; "Edited 7-Dec-95 15:51 by ") - - (* ;; "Uses \XCCSPEEK to handle Xerox run-coding") + [LAMBDA (STRM NOERROR COUNTP) (* ; "Edited 5-May-2021 17:44 by rmk:") + (* ; "Edited 3-Jan-96 14:23 by ") + (* ; "Edited 8-Dec-95 13:24 by ") + (* ; "Edited 7-Dec-95 15:51 by ") (* ; "Edited 7-Dec-95 15:19 by ") - (LET (PCODE (COUNT 0)) - (SETQ PCODE (IF COUNTP - THEN (\XCCSPEEK STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256) - NIL NOERROR COUNT) - ELSE (\XCCSPEEK STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256) - NIL NOERROR))) - (IF COUNTP - THEN (CL:VALUES (AND PCODE (\RECODECCODE PCODE *IBMTOXEROXMAP*)) - COUNT) - ELSE (AND PCODE (\RECODECCODE PCODE *IBMTOXEROXMAP*]) + (\RECODECCODE (\PEEKCCODE STRM NOERROR) + *IBMTOXEROXMAP*]) ) (DECLARE%: DOEVAL@COMPILE DONTCOPY @@ -285,7 +222,7 @@ Copyright (c) 1995-1997, 1999, 2021 by Xerox Corporation. (DEFINEQ (MAKEIBMFORMAT - [LAMBDA NIL (* ; "Edited 9-Mar-99 17:33 by rmk:") + [LAMBDA NIL (* ; "Edited 23-Jun-2021 17:00 by rmk:") (LET [(XEROXTOIBM '((61217 255) (61291 166) (8994 168) @@ -375,11 +312,12 @@ Copyright (c) 1995-1997, 1999, 2021 by Xerox Corporation. (191 168] (SETQ *XEROXTOIBMMAP* (\MAKERECODEMAP XEROXTOIBM)) (SETQ *IBMTOXEROXMAP* (\MAKERECODEMAP XEROXTOIBM T)) - (\INSTALL.EXTERNALFORMAT :IBM (CREATE EXTERNALFORMAT - INCCODEFN _ (FUNCTION \IBMINCCODEFN) - PEEKCCODEFN _ (FUNCTION \IBMPEEKCCODEFN) - BACKCHARFN _ (FUNCTION \COMMONBACKCHARFN) - FILEOUTCHARFN _ (FUNCTION \IBMOUTCHARFN]) + (\INSTALL.EXTERNALFORMAT (CREATE EXTERNALFORMAT + NAME _ :IBM + INCCODEFN _ (FUNCTION \IBMINCCODEFN) + PEEKCCODEFN _ (FUNCTION \IBMPEEKCCODEFN) + BACKCCODEFN _ (FUNCTION \COMMONBACKCHARFN) + OUTCHARFN _ (FUNCTION \IBMOUTCHARFN]) ) (MAKEIBMFORMAT) @@ -391,54 +329,33 @@ Copyright (c) 1995-1997, 1999, 2021 by Xerox Corporation. (DEFINEQ (\MACOUTCHARFN - [LAMBDA (STREAM CHARCODE) (* ; "Edited 9-Mar-99 16:59 by rmk:") + [LAMBDA (STREAM CHARCODE) (* ; "Edited 5-May-2021 16:28 by rmk:") - (* ;; "Converts CHARCODE from internal Xerox-rendering to MAC before printing. Unconverted codes are left unchanged (no error). If any remaining codes are out of charset 0, the Xerox run-encoding is used (which means that code 255 will confuse any readers).") + (* ;; "Converts CHARCODE from internal encoding to MAC before printing.") - (\FILEOUTCHARFN STREAM (IF (IGREATERP CHARCODE 127) - THEN + (* ;; "Unconverted codes are left unchanged (no error).") - (* ;; "We know that MAC doesn't have floating accents, so only singletons are returned. We also know that it agrees with Xerox on first 128") + (* ;; "If any remaining codes are out of charset 0, the streams external format will be used.") - (\RECODECCODE CHARCODE *XEROXTOMACMAP*) - ELSE CHARCODE]) + (* ;; "Calls \PRINTCCODE instead of \OUTCHAR so that recompiling is not needed if the default external format changes.") -(\MACINCCODEFN - [LAMBDA (STREAM COUNTP) (* ; "Edited 9-Mar-99 16:59 by rmk:") - (* ; "Edited 8-Dec-95 13:29 by ") + (\PRINTCCODE (IF (IGREATERP CHARCODE 127) + THEN + + (* ;; "We know that MAC doesn't have floating accents, so only singletons are returned. We also know that it agrees with Xerox on first 128") - (* ;; "Uses \XCCSIN to handle Xerox run-coding") + (\RECODECCODE CHARCODE *XEROXTOMACMAP*) + ELSE CHARCODE) + STREAM]) - (IF COUNTP - THEN (LET ((COUNT 0)) - (CL:VALUES (\RECODECCODE (\XCCSIN STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256) - NIL COUNT) - *MACTOXEROXMAP*) - (IMINUS COUNT))) - ELSE (\RECODECCODE (\XCCSIN STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256)) - *MACTOXEROXMAP*]) +(\MACINCCODEFN [LAMBDA (STRM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 13:50 by rmk:") (* ; "Edited 8-Dec-95 13:29 by ") (CL:WHEN BYTECOUNTVAR (SET BYTECOUNTVAR (SUB1 BYTECOUNTVAL))) (\RECODECCODE (\BIN STRM) *MACTOXEROXMAP*]) (\MACPEEKCCODEFN - [LAMBDA (STREAM NOERROR COUNTP) (* ; "Edited 9-Mar-99 16:59 by rmk:") - (* ; "Edited 3-Jan-96 14:23 by ") + [LAMBDA (STRM NOERROR COUNTP) (* ; "Edited 5-May-2021 17:44 by rmk:") + (* ; "Edited 3-Jan-96 14:23 by ") (* ; "Edited 8-Dec-95 13:29 by ") - - (* ;; "Uses \XCCSPEEK to handle Xerox run-coding") - - (LET (PCODE (COUNT 0)) - (SETQ PCODE (IF COUNTP - THEN (\XCCSPEEK STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256) - NIL NOERROR COUNT) - ELSE (\XCCSPEEK STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256) - NIL NOERROR))) - (IF COUNTP - THEN (CL:VALUES (AND PCODE (\RECODECCODE PCODE *MACTOXEROXMAP*)) - COUNT) - ELSE (AND PCODE (\RECODECCODE PCODE *MACTOXEROXMAP*]) + (\RECODECCODE (\PEEKCCODE STRM NOERROR) + *MACTOXEROXMAP*]) ) (DECLARE%: DOEVAL@COMPILE DONTCOPY @@ -447,8 +364,8 @@ Copyright (c) 1995-1997, 1999, 2021 by Xerox Corporation. (DEFINEQ (MAKEMACFORMAT - [LAMBDA NIL (* ; "Edited 9-Mar-99 17:32 by rmk:") - (* ; "Edited 7-Dec-95 16:24 by ") + [LAMBDA NIL (* ; "Edited 23-Jun-2021 17:00 by rmk:") + (* ; "Edited 7-Dec-95 16:24 by ") (* ; "Edited 7-Dec-95 16:20 by ") (* ;; "Note: This maps some characters into sequences--only the first in the sequence will appear. Sigh.") @@ -561,11 +478,12 @@ Copyright (c) 1995-1997, 1999, 2021 by Xerox Corporation. (61249 228] (SETQ *XEROXTOMACMAP* (\MAKERECODEMAP XEROXTOMAC)) (SETQ *MACTOXEROXMAP* (\MAKERECODEMAP XEROXTOMAC T)) - (\INSTALL.EXTERNALFORMAT :MACINTOSH (CREATE EXTERNALFORMAT - INCCODEFN _ (FUNCTION \MACINCCODEFN) - PEEKCCODEFN _ (FUNCTION \MACPEEKCCODEFN) - BACKCHARFN _ (FUNCTION \COMMONBACKCHARFN) - FILEOUTCHARFN _ (FUNCTION \MACOUTCHARFN]) + (\INSTALL.EXTERNALFORMAT (CREATE EXTERNALFORMAT + NAME _ :MACINTOSH + INCCODEFN _ (FUNCTION \MACINCCODEFN) + PEEKCCODEFN _ (FUNCTION \MACPEEKCCODEFN) + BACKCCODEFN _ (FUNCTION \COMMONBACKCHARFN) + OUTCHARFN _ (FUNCTION \MACOUTCHARFN]) ) (MAKEMACFORMAT) @@ -576,17 +494,7 @@ Copyright (c) 1995-1997, 1999, 2021 by Xerox Corporation. (DEFINEQ -(\COMMONBACKCHARFN - [LAMBDA (STREAM COUNTP) (* ; "Edited 29-Mar-96 10:55 by rmk") - (* ; "Edited 8-Dec-95 13:26 by ") - - (* ;; "Let \BACKXCCSCHAR handle the run-coding. The charset in the stream is the charset byte, unconverted to ISO. This is independent of the particular character translation.") - - (IF COUNTP - THEN (LET ((COUNT 0)) - (\BACKXCCSCHAR STREAM COUNT) - COUNT) - ELSE (\BACKXCCSCHAR STREAM NIL]) +(\COMMONBACKCHARFN [LAMBDA (STRM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 13:53 by rmk:") (* ; "Edited 8-Dec-95 13:26 by ") (CL:WHEN (\BACKFILEPTR STRM) (AND BYTECOUNTVAR (SET BYTECOUNTVAR (ADD1 BYTECOUNTVAL))) T)]) (\MAKERECODEMAP [LAMBDA (CODEMAP INVERTED) (* ; "Edited 9-Mar-99 17:23 by rmk:") @@ -622,160 +530,15 @@ Copyright (c) 1995-1997, 1999, 2021 by Xerox Corporation. ) (DECLARE%: EVAL@COMPILE DONTCOPY -(EVAL (SYSRECLOOK1 'EXTERNALFORMAT)) - -(DECLARE%: EVAL@COMPILE - -(RPAQQ \NORUNCODE 255) - - -(CONSTANTS (\NORUNCODE 255)) -) - -(DECLARE%: EVAL@COMPILE - -(RPAQQ NSCHARSETSHIFT 255) - - -(CONSTANTS (NSCHARSETSHIFT 255)) -) - -(DECLARE%: EVAL@COMPILE - -(PUTPROPS \XCCSIN MACRO [(STREAM SHIFTEDCSET SHIFTEDCSETVAR COUNTERVAR) - -(* ;;; "returns a 16 bit character code. SHIFTEDCSET is STREAM's char set left shifted 8, SHIFTEDCSETVAR if non-NIL is the variable to set if char set changes. COUNTERVAR if non-NIL is decremented by number of bytes read. Doesn't do EOL conversion -- \INCHAR and \INCCODE do that.") - - (LET ((CHAR (\BIN STREAM)) - SCSET) - (COND - [(EQ CHAR NSCHARSETSHIFT) - (* ; "Shifting character sets") - [ACCESS-CHARSET STREAM - (SETQ SCSET (COND - ((NEQ NSCHARSETSHIFT (SETQ CHAR - (\BIN STREAM))) - (AND 'COUNTERVAR (SETQ COUNTERVAR - (IDIFFERENCE - COUNTERVAR 2))) - CHAR) - ((PROGN - (* ; - "2 shift-bytes means not run-encoded") - (AND 'COUNTERVAR - (SETQ COUNTERVAR - (IDIFFERENCE COUNTERVAR - 3))) - (EQ 0 (\BIN STREAM))) - \NORUNCODE) - (T (\NSIN.24BITENCODING.ERROR STREAM] - (SETQ CHAR (\BIN STREAM)) - (SETQ SCSET (COND - ('SHIFTEDCSETVAR - (* ; "CHARSETVAR=NIL means don't set") - (SETQ SHIFTEDCSETVAR (UNFOLD SCSET - 256))) - (T (UNFOLD SCSET 256] - (T (SETQ SCSET SHIFTEDCSET))) - (COND - ((EQ SCSET (UNFOLD \NORUNCODE 256)) - (* ; - "just read two bytes and combine them to a 16 bit value") - (AND 'COUNTERVAR (SETQ COUNTERVAR (IDIFFERENCE COUNTERVAR 2 - ))) - (LOGOR (UNFOLD CHAR 256) - (\BIN STREAM))) - (CHAR (AND 'COUNTERVAR (SETQ COUNTERVAR (IDIFFERENCE - COUNTERVAR 1) - )) - (AND CHAR (LOGOR SCSET CHAR]) - -(PUTPROPS \XCCSPEEK MACRO [(STREAM SHIFTEDCSET SHIFTEDCSETVAR NOERROR COUNTERVAR) - - (* ;; "Returns a 16 bit character code. Doesn't do EOL conversion--\INCHAR does that. May actually read the character-set shift, storing the result in the stream. COUNTERVAR, if given, is updated to reflect any such bytes that are actually read") - - (PROG ((CHAR (\PEEKBIN STREAM NOERROR)) - SCSET) - (COND - ((NULL CHAR) - (RETURN NIL)) - [(EQ CHAR NSCHARSETSHIFT) - (* ; "CHARSETVAR=NIL means don't set") - (\BIN STREAM) (* ; "Consume the char shift byte") - [ACCESS-CHARSET STREAM - (SETQ SCSET (COND - ((NEQ NSCHARSETSHIFT - (SETQ CHAR (\BIN STREAM))) - (* ; - "Note: no eof error check on this \BIN -- an eof in the middle of a charset shift is an error") - (AND 'COUNTERVAR - (SETQ COUNTERVAR - (IDIFFERENCE COUNTERVAR 2)) - ) - CHAR) - ((PROGN - (* ; - "2 shift-bytes means not run-encoded") - (AND 'COUNTERVAR - (SETQ COUNTERVAR - (IDIFFERENCE - COUNTERVAR 3) - )) - (EQ 0 (\BIN STREAM))) - \NORUNCODE) - (T (\NSIN.24BITENCODING.ERROR - STREAM] - [SETQ SCSET (COND - ('SHIFTEDCSETVAR - (* ; "CHARSETVAR=NIL means don't set") - (SETQ SHIFTEDCSETVAR - (UNFOLD SCSET 256))) - (T (UNFOLD SCSET 256] - (COND - ((NULL (SETQ CHAR (\PEEKBIN STREAM NOERROR))) - (RETURN NIL] - (T (SETQ SCSET SHIFTEDCSET))) - (RETURN (COND - ((EQ SCSET (UNFOLD \NORUNCODE 256)) - - (* ;; "just peek two bytes and combine them to a 16 bit value. Again, is an error if we hit eof in mid-character") - - (\BIN STREAM) - (PROG1 (LOGOR (UNFOLD CHAR 256) - (\PEEKBIN STREAM NOERROR)) - (\BACKFILEPTR STREAM))) - (T (LOGOR SHIFTEDCSET CHAR]) - -(PUTPROPS \BACKXCCSCHAR MACRO [(STREAM SHIFTEDCHARSET COUNTERVAR) - (AND (\BACKFILEPTR STREAM) - (COND - [[COND - (SHIFTEDCHARSET (EQ SHIFTEDCHARSET - (UNFOLD \NORUNCODE 256))) - (T (EQ \NORUNCODE (ACCESS-CHARSET STREAM] - (COND - ((\BACKFILEPTR STREAM) - (AND 'COUNTERVAR (add COUNTERVAR 2)) - T) - ('COUNTERVAR (add COUNTERVAR 1] - ('COUNTERVAR (add COUNTERVAR 1]) -) - -(DECLARE%: EVAL@COMPILE - -(PUTPROPS UNFOLD MACRO [X (PROG [(FORM (CAR X)) - (DIVISOR (CAR (CONSTANTEXPRESSIONP (CADR X] - (OR (AND DIVISOR (POWEROFTWOP DIVISOR)) - (\ILLEGAL.ARG (CADR X))) - (RETURN (LIST 'LLSH FORM (SUB1 (INTEGERLENGTH DIVISOR]) -) +(OR (GETP 'EXPORTS.ALL 'FILE) + (PRINT "NOTE: ISO8859IO requires EXPORTS.ALL for compilation" T)) ) (PUTPROPS ISO8859IO COPYRIGHT ("Xerox Corporation" 1995 1996 1997 1999 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (2391 5846 (\8859OUTCHARFN 2401 . 3463) (\8859INCCODEFN 3465 . 4657) (\8859PEEKCCODEFN -4659 . 5844)) (5938 9711 (MAKEISOFORMAT 5948 . 9709)) (9771 12858 (\IBMOUTCHARFN 9781 . 10606) ( -\IBMINCCODEFN 10608 . 11578) (\IBMPEEKCCODEFN 11580 . 12856)) (12942 16693 (MAKEIBMFORMAT 12952 . -16691)) (16741 19512 (\MACOUTCHARFN 16751 . 17558) (\MACINCCODEFN 17560 . 18431) (\MACPEEKCCODEFN -18433 . 19510)) (19596 24385 (MAKEMACFORMAT 19606 . 24383)) (24452 26736 (\COMMONBACKCHARFN 24462 . -25057) (\MAKERECODEMAP 25059 . 26289) (\RECODECCODE 26291 . 26734))))) + (FILEMAP (NIL (2172 4321 (\8859OUTCHARFN 2182 . 3323) (\8859INCCODEFN 3325 . 3798) (\8859PEEKCCODEFN +3800 . 4319)) (4413 8190 (MAKEISOFORMAT 4423 . 8188)) (8250 9861 (\IBMOUTCHARFN 8260 . 8769) ( +\IBMINCCODEFN 8771 . 9239) (\IBMPEEKCCODEFN 9241 . 9859)) (9945 13722 (MAKEIBMFORMAT 9955 . 13720)) ( +13770 15455 (\MACOUTCHARFN 13780 . 14675) (\MACINCCODEFN 14677 . 15041) (\MACPEEKCCODEFN 15043 . 15453 +)) (15539 20338 (MAKEMACFORMAT 15549 . 20336)) (20405 22437 (\COMMONBACKCHARFN 20415 . 20758) ( +\MAKERECODEMAP 20760 . 21990) (\RECODECCODE 21992 . 22435))))) STOP diff --git a/lispusers/ISO8859IO.LCOM b/lispusers/ISO8859IO.LCOM index c31c5fe17..9d908f91d 100644 Binary files a/lispusers/ISO8859IO.LCOM and b/lispusers/ISO8859IO.LCOM differ diff --git a/lispusers/MACINTERFACE b/lispusers/MACINTERFACE deleted file mode 100644 index e2a65baa0..000000000 --- a/lispusers/MACINTERFACE +++ /dev/null @@ -1,466 +0,0 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED "22-Feb-2021 14:01:07"  -{DSK}kaplan>Local>medley3.5>git-medley>lispusers>MACINTERFACE.;78 20371 - - changes to%: (VARS MACINTERFACECOMS) - - previous date%: "22-Feb-2021 12:56:21" -{DSK}kaplan>Local>medley3.5>git-medley>lispusers>MACINTERFACE.;77) - - -(PRETTYCOMPRINT MACINTERFACECOMS) - -(RPAQQ MACINTERFACECOMS - [ - (* ;; "Externals") - - (COMS (FNS MACWINDOW MACWINDOW.SETUP UNMACWINDOW MACWINDOW.UNSETUP) - (INITVARS (MACWINDOWMARGIN 25))) - - (* ;; "Internals") - - [COMS (FNS MACWINDOW.BUTTONEVENTFN MACWINDOW.BUTTONEVENTFN.ANYWHERE NEARTOP NEARESTCORNER - INCORNER.REGION) - - (* ;; "Behavior for some known window creators") - - (FNS MACINT-ADD-EXEC MACINT-SNAPW) - (FNS TEDIT.MACINTERFACE TEDIT.SELECTALL) - (FNS TOTOPW.MACINTERFACE) - (P (MOVD 'TOTOPW.MACINTERFACE 'TOTOPW.MODERNIZE) - (MOVD 'MACWINDOW 'MODERNWINDOW) - (MOVD 'UNMACWINDOW 'UNMODERNWINDOW)) - (DECLARE%: DONTEVAL@LOAD DOCOPY (P (TEDIT.MACINTERFACE) - - (* ;; "Inspector") - - (MACWINDOW.SETUP '\ITEM.WINDOW.BUTTON.HANDLER) - - - (* ;; "Commonlisp array inspector. If you move the main window, the little attached window doesn't move. But if you move the attached window, it all works. Needs a special definition. Shaping doesn't work either") - - (* (MACWINDOW.SETUP 'ONEDINSPECT.BUTTONEVENTFN)) - (MACWINDOW.SETUP 'ICMLARRAY.TITLECOMMANDFN) - - (* ;; "Freemenu") - - (MACWINDOW.SETUP '\FM.BUTTONEVENTFN) - - (* ;; "SEDIT") - - (MACWINDOW.SETUP 'SEDIT::BUTTONEVENTFN) - - (* ;; "Debugger") - - (MACWINDOW.SETUP 'DBG::DEBUGGER-BUTTON-EVENT) - - (* ;; "Snap") - - (MACWINDOW.SETUP 'SNAPW 'MACINT-SNAPW) - - (* ;; "New execs") - - (MACWINDOW.SETUP 'ADD-EXEC 'MACINT-ADD-EXEC) - - (* ;; "Existing exec of the load") - - (MACWINDOW (PROCESSPROP (TTY.PROCESS) - 'WINDOW)) - - (* ;; "Table browser (for filebrowser)") - - (MACWINDOW.SETUP 'TB.BUTTONEVENTFN) - - (* ;; "Grapher") - - (MACWINDOW.SETUP 'APPLYTOSELECTEDNODE) - - (* ;; "Promptwindow") - - (MACWINDOW PROMPTWINDOW T] - (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) - (NLAML) - (LAMA MACINT-ADD-EXEC]) - - - -(* ;; "Externals") - -(DEFINEQ - -(MACWINDOW - [LAMBDA (WINDOW ANYWHERE) (* ; "Edited 23-Jun-2020 16:01 by rmk:") - - (* ;; "This can be applied to windows that have been created with an unknown or unmodifiable buttoneventfn.") - - (CL:UNLESS (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN) - (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN (WINDOWPROP WINDOW 'BUTTONEVENTFN)) - (WINDOWPROP WINDOW 'BUTTONEVENTFN (IF ANYWHERE - THEN (FUNCTION MACWINDOW.BUTTONEVENTFN.ANYWHERE) - ELSE (FUNCTION MACWINDOW.BUTTONEVENTFN)))) - WINDOW]) - -(MACWINDOW.SETUP - [LAMBDA (ORIGFN MACWINDOWFN ANYWHERE) (* ; "Edited 13-Feb-2021 19:53 by rmk:") - - (* ;; "ORIGFN is either a function that creates windows of a given type (e.g. SNAPW or ADD-EXEC) or the known BUTTONEVENTFN of a class of windows.") - - (* ;; "Moves ORIGNFN to a new name, prefixed with MACORIG-.") - - (* ;; "If MACWINDOWFN is given, then that replaces the original definition of ORIGFN, and presumably knows how to call the renamed ORIGFN under the right circumstances. This is typically the case where ORIGFN is a window creator.") - - (* ;; "Otherwise, ORIGFN is taken to be the BUTTONEVENTFN for a class of windows, and its new definition is defaulted to one that maps left-clicks in appropriate areas into Mac window operations. If not in appropriate areas, then the renamed ORIGNFN is called to give the original button behavior.") - - (* ;; "If ANYWHERE, moving will happen for any click not in one of the shaping corners.") - - (* ;; "The renamed function has arguments in addition to WINDOW: the new name for the original function, if MACWINDOFN is provided, and the value specified here for ANYWHERE.") - - (LET [RENAMEDORIG (PKGNAME (CL:PACKAGE-NAME (CL:SYMBOL-PACKAGE ORIGFN] - - (* ;; "The renamed version of XCL symbols go into Interlisp, so there is less confusion about accessing it") - - (CL:WHEN (STREQUAL PKGNAME "XEROX-COMMON-LISP") - (SETQ PKGNAME "INTERLISP")) - (SETQ RENAMEDORIG (CL:INTERN (CONCAT 'MACORIG- ORIGFN) - PKGNAME)) - (MOVD? ORIGFN RENAMEDORIG) - (IF MACWINDOWFN - THEN (MOVD MACWINDOWFN ORIGFN) - ELSE (PUTD ORIGFN `(LAMBDA (WINDOW) - (MACWINDOW.BUTTONEVENTFN WINDOW (FUNCTION ,RENAMEDORIG) - ,ANYWHERE]) - -(UNMACWINDOW - [LAMBDA (WINDOW) (* ; "Edited 7-Dec-2020 17:57 by rmk:") - - (* ;; "Restores original window behavior") - - (CL:WHEN (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN) - (WINDOWPROP WINDOW 'BUTTONEVENTFN (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN)) - (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN NIL)) - WINDOW]) - -(MACWINDOW.UNSETUP - [LAMBDA (ORIGFN) (* ; "Edited 6-Jul-2020 13:04 by rmk:") - (* ; "Edited 24-Jun-2020 15:09 by rmk:") - - (* ;; "Moves the renamed original function back to its original name") - - (LET [RENAMEDORIG (PKGNAME (CL:PACKAGE-NAME (CL:SYMBOL-PACKAGE ORIGFN] - - (* ;; "The renamed version of XCL symbols go into Interlisp, so there is less confusion about accessing it") - - (CL:WHEN (STREQUAL PKGNAME "XEROX-COMMON-LISP") - (SETQ PKGNAME "INTERLISP")) - (SETQ RENAMEDORIG (CL:INTERN (CONCAT 'MACORIG- ORIGFN) - PKGNAME)) - (CL:WHEN (GETD RENAMEDORIG) - (MOVD RENAMEDORIG ORIGFN]) -) - -(RPAQ? MACWINDOWMARGIN 25) - - - -(* ;; "Internals") - -(DEFINEQ - -(MACWINDOW.BUTTONEVENTFN - [LAMBDA (WINDOW ORIGFUNCTION ANYWHERE) (* ; "Edited 14-Feb-2021 21:51 by rmk:") - (* ; "Edited 24-Jun-2020 20:23 by rmk:") - (* ; "Edited 23-May-2020 08:34 by rmk:") - (* ; "Edited 10-May-2020 03:35 by rmk:") - (* ; "Edited 3-May-2020 21:18 by rmk:") - (IF (AND (MOUSESTATE (ONLY LEFT)) - (EQ LASTKEYBOARD 0)) - THEN (TOTOPW WINDOW) - (LET [CORNER TOPMARGIN (MAINREGION (WINDOWPROP WINDOW 'REGION)) - (ATTACHEDREGION (WINDOWREGION WINDOW 'SHAPEW] - - (* ;; "If the window has a TOPMARGIN property, that tells us that it does not have a canonical title but may still have a title-like attached window just above the main window. The TOPMARGIN should be 0 in that case.") - - (* ;; "This is particularly the case of FILEBROWSER windows, where the the modified ATTACHEDWINDOWTOTOPFN drives the click here. ") - - (SETQ TOPMARGIN (IF (WINDOWPROP WINDOW 'TOPMARGIN) - ELSEIF (WINDOWPROP WINDOW 'TITLE) - THEN (FONTPROP WindowTitleDisplayStream 'HEIGHT) - ELSE MACWINDOWMARGIN)) - (SETQ CORNER (INCORNER.REGION MAINREGION TOPMARGIN)) - (IF CORNER - THEN - - (* ;; - "The upper corners may be in the title bar, near the side, so test corners before titlebar.") - - (* ;; "We are in the corner of the main window, so we are reshaping. But the ghost region should include all of the attached windows, and the starting cursor should be positioned at the corner closest to the selected corner of the main window.") - - (* ;; "WINDOWREGION includes the attached windows") - - (LET ((LEFT (FETCH LEFT OF ATTACHEDREGION)) - (RIGHT (FETCH RIGHT OF ATTACHEDREGION)) - (TOP (FETCH TOP OF ATTACHEDREGION)) - (BOTTOM (FETCH BOTTOM OF ATTACHEDREGION)) - STARTINGREGION) - - (* ;; "\CURSORPOSITION moves the mouse to the tracking corner of the ghost region, in screen coordinates, so that the mouse starts out at the tracking corner of the ghost region, even if there are attached windows (as in the filebrowser) that overhang the corner and the initiating click was at the corner of the mainwindow.") - - (CL:UNLESS (EQ 'DON'T (WINDOWPROP WINDOW 'RESHAPEFN)) - [SETQ STARTINGREGION - (GETREGION NIL NIL NIL NIL NIL - (SELECTQ CORNER - (RIGHTBOTTOM (\CURSORPOSITION RIGHT BOTTOM) - (GETMOUSESTATE) - (LIST LEFT TOP RIGHT BOTTOM)) - (LEFTBOTTOM (\CURSORPOSITION LEFT BOTTOM) - (GETMOUSESTATE) - (LIST RIGHT TOP LEFT BOTTOM)) - (RIGHTTOP (\CURSORPOSITION RIGHT TOP) - (GETMOUSESTATE) - (LIST LEFT BOTTOM RIGHT TOP)) - (LEFTTOP (\CURSORPOSITION LEFT TOP) - (GETMOUSESTATE) - (LIST RIGHT BOTTOM LEFT TOP)) - (SHOULDNT]) - (SHAPEW WINDOW STARTINGREGION)) - T - ELSEIF (OR ANYWHERE (NEARTOP MAINREGION TOPMARGIN)) - THEN (NEARESTCORNER ATTACHEDREGION) - (MOVEW WINDOW) - T - ELSEIF [OR ORIGFUNCTION (SETQ ORIGFUNCTION (WINDOWPROP WINDOW - 'PREMACBUTTONEVENTFN] - THEN (APPLY* ORIGFUNCTION WINDOW))) - ELSEIF [OR ORIGFUNCTION (SETQ ORIGFUNCTION (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN] - THEN (APPLY* ORIGFUNCTION WINDOW]) - -(MACWINDOW.BUTTONEVENTFN.ANYWHERE - [LAMBDA (WINDOW) (* ; "Edited 3-Dec-2020 14:24 by rmk:") - (* ; "Edited 24-Jun-2020 13:24 by rmk:") - - (* ;; "Move if left-click anywhere, not just titlebar") - - (MACWINDOW.BUTTONEVENTFN WINDOW NIL T]) - -(NEARTOP - [LAMBDA (MAINREGION TOPMARGIN) (* ; "Edited 12-Feb-2021 23:19 by rmk:") - - (* ;; "True if the MOUSEY is near the top of MAINREGION. That means in the title bar for titled windows, otherwise a short distance below the top of the window. (Could be in the border?)") - - (IGREATERP LASTMOUSEY (IDIFFERENCE (FETCH TOP OF MAINREGION) - TOPMARGIN]) - -(NEARESTCORNER - [LAMBDA (REGION) (* ; "Edited 14-Feb-2021 21:46 by rmk:") - - (* ;; -"Moves the cursor to the corner of REGION that is closest to the current LASTMOUSEX AND LASTMOUSEY") - - (\CURSORPOSITION (CL:IF (ILESSP (IDIFFERENCE LASTMOUSEX (FETCH LEFT OF REGION)) - (IDIFFERENCE (FETCH RIGHT OF REGION) - LASTMOUSEX)) - (FETCH LEFT OF REGION) - (FETCH RIGHT OF REGION)) - (CL:IF (ILESSP (IDIFFERENCE LASTMOUSEY (FETCH BOTTOM OF REGION)) - (IDIFFERENCE (FETCH TOP OF REGION) - LASTMOUSEY)) - (FETCH BOTTOM OF REGION) - (FETCH TOP OF REGION))]) - -(INCORNER.REGION - [LAMBDA (MAINREGION TOPMARGIN) (* ; "Edited 12-Feb-2021 23:22 by rmk:") - - (* ;; "MAINREGION, LASTMOUSEX, LASTMOUSEY in screen coordinates.") - - (* ;; "TOPMARGIN is the height of the titlebar for titled windows, otherwise the margin at the top of the window's content that we regard as the top. ") - - (IF (ILEQ (IABS (IDIFFERENCE LASTMOUSEX (FETCH LEFT OF MAINREGION))) - MACWINDOWMARGIN) - THEN (IF (NEARTOP MAINREGION TOPMARGIN) - THEN 'LEFTTOP - ELSEIF (ILEQ LASTMOUSEY (IPLUS MACWINDOWMARGIN (FETCH BOTTOM OF - MAINREGION - ))) - THEN 'LEFTBOTTOM) - ELSEIF (ILEQ (IABS (IDIFFERENCE LASTMOUSEX (FETCH RIGHT OF MAINREGION))) - MACWINDOWMARGIN) - THEN (IF (NEARTOP MAINREGION TOPMARGIN) - THEN 'RIGHTTOP - ELSEIF (ILEQ LASTMOUSEY (IPLUS MACWINDOWMARGIN (FETCH BOTTOM OF - MAINREGION - ))) - THEN 'RIGHTBOTTOM]) -) - - - -(* ;; "Behavior for some known window creators") - -(DEFINEQ - -(MACINT-ADD-EXEC - [LAMBDA U (* ; "Edited 24-Jun-2020 14:23 by rmk:") - (LET [(PROC (APPLY (FUNCTION MACORIG-ADD-EXEC) - (FOR N FROM 1 TO U COLLECT (ARG U N] - - (* ;; "For some reason, the window may not be there immediately") - - (DISMISS 100) - (MACWINDOW (PROCESSPROP PROC 'WINDOW)) - PROC]) - -(MACINT-SNAPW - [LAMBDA NIL (* ; "Edited 24-Jun-2020 13:19 by rmk:") - - (* ;; "No point in shaping a snap window, just move it.;;") - - (* ;; -"This changes the creation function (SNAPW), since snap windows otherwise don't have a BUTTONEVENTN") - - (LET ((W (MACORIG-SNAPW))) - [WINDOWPROP W 'BUTTONEVENTFN (FUNCTION (LAMBDA (W) - (TOTOPW W) - (MOVEW W] - W]) -) -(DEFINEQ - -(TEDIT.MACINTERFACE - [LAMBDA NIL (* ; "Edited 22-Feb-2021 12:56 by rmk:") - (CL:WHEN (GETD '\TEDIT.BUTTONEVENTFN) - (MACWINDOW.SETUP '\TEDIT.BUTTONEVENTFN) - - (* ;; "All") - - (TEDIT.SETFUNCTION (CHARCODE "1,a") - (FUNCTION TEDIT.SELECTALL) - TEDIT.READTABLE) - (TEDIT.SETFUNCTION (CHARCODE "1,A") - (FUNCTION TEDIT.SELECTALL) - TEDIT.READTABLE) - - (* ;; "Quit") - - (TEDIT.SETFUNCTION (CHARCODE "1,q") - (FUNCTION TEDIT.QUIT) - TEDIT.READTABLE) - (TEDIT.SETFUNCTION (CHARCODE "1,Q") - (FUNCTION TEDIT.QUIT) - TEDIT.READTABLE))]) - -(TEDIT.SELECTALL - [LAMBDA (STREAM TEXTOBJ SEL) (* ; "Edited 3-May-2020 17:29 by rmk:") - (LET [(TEXTSTREAM (TEXTSTREAM (TTY.PROCESS] - (CL:WHEN TEXTSTREAM - (TEDIT.SETSEL TEXTSTREAM 0 (ADD1 (fetch TEXTLEN of (TEXTOBJ TEXTSTREAM))) - 'LEFT))]) -) -(DEFINEQ - -(TOTOPW.MACINTERFACE - [LAMBDA (WINDOW) (* ; "Edited 13-Feb-2021 23:27 by rmk:") - - (* ;; "This replaces the TOTOPW BUTTONEVENTFN on an attached window where the click is then directed to the MAINWINDOW.") - - (TOTOPW WINDOW) - (LET ((MAIN (MAINWINDOW WINDOW T))) - (CL:WHEN MAIN - (MACWINDOW.BUTTONEVENTFN MAIN (WINDOWPROP MAIN 'BUTTONEVENTFN)))]) -) - -(MOVD 'TOTOPW.MACINTERFACE 'TOTOPW.MODERNIZE) - -(MOVD 'MACWINDOW 'MODERNWINDOW) - -(MOVD 'UNMACWINDOW 'UNMODERNWINDOW) -(DECLARE%: DONTEVAL@LOAD DOCOPY - -(TEDIT.MACINTERFACE) - - -(* ;; "Inspector") - - -(MACWINDOW.SETUP '\ITEM.WINDOW.BUTTON.HANDLER) - - -(* ;; "Commonlisp array inspector. If you move the main window, the little attached window doesn't move. But if you move the attached window, it all works. Needs a special definition. Shaping doesn't work either") - - - (* (MACWINDOW.SETUP - (QUOTE ONEDINSPECT.BUTTONEVENTFN))) - -(MACWINDOW.SETUP 'ICMLARRAY.TITLECOMMANDFN) - - -(* ;; "Freemenu") - - -(MACWINDOW.SETUP '\FM.BUTTONEVENTFN) - - -(* ;; "SEDIT") - - -(MACWINDOW.SETUP 'SEDIT::BUTTONEVENTFN) - - -(* ;; "Debugger") - - -(MACWINDOW.SETUP 'DBG::DEBUGGER-BUTTON-EVENT) - - -(* ;; "Snap") - - -(MACWINDOW.SETUP 'SNAPW 'MACINT-SNAPW) - - -(* ;; "New execs") - - -(MACWINDOW.SETUP 'ADD-EXEC 'MACINT-ADD-EXEC) - - -(* ;; "Existing exec of the load") - - -(MACWINDOW (PROCESSPROP (TTY.PROCESS) - 'WINDOW)) - - -(* ;; "Table browser (for filebrowser)") - - -(MACWINDOW.SETUP 'TB.BUTTONEVENTFN) - - -(* ;; "Grapher") - - -(MACWINDOW.SETUP 'APPLYTOSELECTEDNODE) - - -(* ;; "Promptwindow") - - -(MACWINDOW PROMPTWINDOW T) -) -(DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS - -(ADDTOVAR NLAMA ) - -(ADDTOVAR NLAML ) - -(ADDTOVAR LAMA MACINT-ADD-EXEC) -) -(DECLARE%: DONTCOPY - (FILEMAP (NIL (4238 7997 (MACWINDOW 4248 . 4889) (MACWINDOW.SETUP 4891 . 6807) (UNMACWINDOW 6809 . -7188) (MACWINDOW.UNSETUP 7190 . 7995)) (8057 16239 (MACWINDOW.BUTTONEVENTFN 8067 . 13089) ( -MACWINDOW.BUTTONEVENTFN.ANYWHERE 13091 . 13456) (NEARTOP 13458 . 13894) (NEARESTCORNER 13896 . 14775) -(INCORNER.REGION 14777 . 16237)) (16297 17274 (MACINT-ADD-EXEC 16307 . 16731) (MACINT-SNAPW 16733 . -17272)) (17275 18358 (TEDIT.MACINTERFACE 17285 . 18027) (TEDIT.SELECTALL 18029 . 18356)) (18359 18799 -(TOTOPW.MACINTERFACE 18369 . 18797))))) -STOP - diff --git a/lispusers/MACINTERFACE.LCOM b/lispusers/MACINTERFACE.LCOM deleted file mode 100644 index 71a2a9eee..000000000 Binary files a/lispusers/MACINTERFACE.LCOM and /dev/null differ diff --git a/lispusers/MACINTERFACE.TXT b/lispusers/MACINTERFACE.TXT deleted file mode 100644 index 1875ba474..000000000 --- a/lispusers/MACINTERFACE.TXT +++ /dev/null @@ -1,52 +0,0 @@ -MACINTERFACE documentation - - Ron Kaplan, June 2020 - -MACINTERFACE is a symbol Lispusers package that changes the mouse actions on Medley windows so that moving and shaping can be done in a way that approximates the behavior of windows on the Mac desktop. - -Thus, for a window that has been created or transformed in this way, you can move the window by left-clicking in the title bar and dragging the window. - -The menu behavior for other buttons in the title bar is unchanged. - -Similarly, you can reshape a window by clicking near one of its corners and dragging it out. - -For bottom corners, "near" means inside the window within MACINTERFACECORNERMARGIN (initially 25) pixels above or to the left/right of the corner. - -For top corners, "near" means within the title bar and within the margin from the left/right edges. - -(Windows that don't have a title-bar, like Snap windows, can be set up so that moving can happen by clicking anywhere, and shaping at the top is determined by the margin inside the window region.) - -When the package is loaded, this behavior is installed for the following kinds of windows: - -Tedit -Debugger/break -Sedit -Inspector -Snap -Exec - -The function MACWINDOW.SETUP establishes the new behavior for classes of windows: - -(MACWINDOW.SETUP ORIGFN MACWINDOWFN ANYWHERE) - -ORIGFN is either the name of the BUTTONEVENTFN for a class of windows (e.g. \TEDIT.BUTTONEVENTFN for Tedit windows) or it is a function that creates windows of a particulate kind (e.g. SNAPW or ADD-EXEC). - -MACWINDOW.SETUP moves the definition of ORIGFN to the name (PACK* 'MACORIG- ORIGFN), and then provides a new definition for ORIGFN that does the moving or reshaping for clicks in the triggering locations, and otherwise passes control through to the original definition. - -If ORIGNFN is a button event function, then MACWINDOWFN should not be specified. In that case a new definition for ORIGFN is constructed to provide the desired windowing behavior. - -Otherwise, if ORIGFN is the function that creates windows of a class (e.g. SNAPW), then a MACWINDOWFN should be provided to create such window (by calling (PACK* MACORIG- ORIGFN)). The definition of MACWINDOWFN replaces the original definition of ORIGFN. - -If the flag ANYWHERE is non-NIL, especially for windows without a title bar, then the moving behavior is triggered by a click anywhere in the window (except the corners). - -Because this works by redefining existing functions, it is important that the MACINTERFACE package be loaded AFTER Tedit and Sedit, if those are not already in the sysout. And it should be called to upgrade the proper functions for other window classes that might later be added (e.g. GRAPHER). - -If it is not known or it is inconvenient to systematically upgrade a button function or a window-creation function, the new behavior can be provided after a window has been created, by invoking - -(MACWINDOW WINDOW ANYWHERE) - -This saves the windows existing BUTTONEVENTFN as a window property PREMACBUTTONEVENTFN, and installs a simple stub function in its place. - -Known issue: Clicking at the bottom-right corner of Tedit windows sometimes doesn't catch the new behavior--there seems to be a conflict with Tedit's window-splitting conventions. - -A future extension might be to add an X or some circles on the left of the title bar, to implement a close/shrink behaviors. diff --git a/lispusers/MACINTERFACE.~1~ b/lispusers/MACINTERFACE.~1~ deleted file mode 100644 index 5557e464d..000000000 --- a/lispusers/MACINTERFACE.~1~ +++ /dev/null @@ -1 +0,0 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") (FILECREATED " 3-May-2020 20:42:00"  {DSK}kaplan>Local>medley3.5>lispcore>lispusers>MACINTERFACE.;1 604 changes to%: (FNS INTITLEBAR)) (PRETTYCOMPRINT MACINTERFACECOMS) (RPAQQ MACINTERFACECOMS ((FNS INTITLEBAR))) (DEFINEQ (INTITLEBAR [LAMBDA (WINDOW) (* ; "Edited 3-May-2020 20:38 by rmk:") (IGREATERP (LASTMOUSEY WINDOW) (FETCH TOP OF (DSPCLIPPINGREGION NIL WINDOW]) ) (PUTPROPS MACINTERFACE COPYRIGHT (NONE)) (DECLARE%: DONTCOPY (FILEMAP (NIL (308 540 (INTITLEBAR 318 . 538))))) STOP \ No newline at end of file diff --git a/lispusers/MACINTERFACE.~32~ b/lispusers/MACINTERFACE.~32~ deleted file mode 100644 index f8ded9ea2..000000000 --- a/lispusers/MACINTERFACE.~32~ +++ /dev/null @@ -1 +0,0 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") (FILECREATED " 1-Jun-2020 08:50:49"  {DSK}kaplan>Local>medley3.5>lispcore>lispusers>MACINTERFACE.;32 11911 changes to%: (FNS MACWINDOW.BUTTONEVENTFN MACWINDOW.BUTTONEVENTFN.ANYWHERE MACWINDOW) (VARS MACINTERFACECOMS) previous date%: "28-May-2020 18:02:27" {DSK}kaplan>Local>medley3.5>lispcore>lispusers>MACINTERFACE.;31) (PRETTYCOMPRINT MACINTERFACECOMS) (RPAQQ MACINTERFACECOMS [(FNS INTITLEBAR INCORNER MACWINDOW.BUTTONEVENTFN MACWINDOW.BUTTONEVENTFN.ANYWHERE MACWINDOW) (FNS MACINT\TEDIT.BUTTONEVENTFN MACINT\SEDIT-BUTTONEVENTFN MACINT-ADD-EXEC MACINT-DEBUGGER-BUTTON-EVENT MACINT-\ITEM.WINDOW.BUTTON.HANDLER MACINT-SNAPW) (INITVARS (MACINTERFACECORNERMARGIN 25)) (P (MOVD? '\TEDIT.BUTTONEVENTFN 'MACORIG\TEDIT.BUTTONEVENTFN) (MOVD 'MACINT\TEDIT.BUTTONEVENTFN '\TEDIT.BUTTONEVENTFN)) (P (MOVD? 'SEDIT::BUTTONEVENTFN 'MACORIG\SEDIT-BUTTONEVENTFN) (MOVD 'MACINT\SEDIT-BUTTONEVENTFN 'SEDIT::BUTTONEVENTFN)) (P (MOVD? 'ADD-EXEC 'MACORIG-ADD-EXEC) (MOVD 'MACINT-ADD-EXEC 'ADD-EXEC)) (P (MOVD? 'DBG::DEBUGGER-BUTTON-EVENT 'MACORIG-DEBUGGER-BUTTON-EVENT) (MOVD 'MACINT-DEBUGGER-BUTTON-EVENT 'DBG::DEBUGGER-BUTTON-EVENT)) (P (MOVD? '\ITEM.WINDOW.BUTTON.HANDLER 'MACORIG-\ITEM.WINDOW.BUTTON.HANDLER) (MOVD 'MACINT-\ITEM.WINDOW.BUTTON.HANDLER '\ITEM.WINDOW.BUTTON.HANDLER)) (P (MOVD? 'SNAPW 'MACORIG-SNAPW) (MOVD 'MACINT-SNAPW 'SNAPW)) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) (LAMA MACINT-ADD-EXEC]) (DEFINEQ (INTITLEBAR [LAMBDA (WINDOW) (* ; "Edited 3-May-2020 20:38 by rmk:") (IGREATERP (LASTMOUSEY WINDOW) (FETCH TOP OF (DSPCLIPPINGREGION NIL WINDOW]) (INCORNER [LAMBDA (WINDOW MARGIN) (* ; "Edited 13-May-2020 14:26 by rmk:") (* ; "Edited 10-May-2020 12:41 by rmk:") (* ; "Edited 3-May-2020 20:43 by rmk:") (CL:UNLESS MARGIN (SETQ MARGIN MACINTERFACECORNERMARGIN)) (LET ((CR (DSPCLIPPINGREGION NIL WINDOW)) (X (LASTMOUSEX WINDOW)) (Y (LASTMOUSEY WINDOW))) (IF (ILEQ (IABS (IDIFFERENCE X (FETCH LEFT OF CR))) MARGIN) THEN (* ;; "GREATERP puts it in title bar") (IF (IGREATERP Y (FETCH TOP OF CR)) THEN 'LEFTTOP ELSEIF (ILEQ (IABS (IDIFFERENCE Y (FETCH BOTTOM OF CR))) MARGIN) THEN 'LEFTBOTTOM) ELSEIF (ILEQ (IABS (IDIFFERENCE X (FETCH RIGHT OF CR))) MARGIN) THEN (IF (IGREATERP Y (FETCH TOP OF CR)) THEN 'RIGHTTOP ELSEIF (ILEQ (IABS (IDIFFERENCE Y (FETCH BOTTOM OF CR))) MARGIN) THEN 'RIGHTBOTTOM]) (MACWINDOW.BUTTONEVENTFN [LAMBDA (WINDOW) (* ; "Edited 1-Jun-2020 08:49 by rmk:") (* ; "Edited 23-May-2020 08:34 by rmk:") (* ; "Edited 10-May-2020 03:35 by rmk:") (* ; "Edited 3-May-2020 21:18 by rmk:") (IF (AND (MOUSESTATE (ONLY LEFT)) (EQ LASTKEYBOARD 0)) THEN (TOTOPW WINDOW) (LET (REGION (CORNER (INCORNER WINDOW))) (IF CORNER THEN (* ;;  "The upper corners may be in the title bar, near the side, so test this first") (SETQ REGION (WINDOWPROP WINDOW 'REGION)) [LET ((LEFT (FETCH LEFT OF REGION)) (RIGHT (FETCH RIGHT OF REGION)) (TOP (FETCH TOP OF REGION)) (BOTTOM (FETCH BOTTOM OF REGION))) (SHAPEW WINDOW (GETREGION NIL NIL NIL NIL NIL (SELECTQ CORNER (RIGHTBOTTOM (LIST LEFT TOP RIGHT BOTTOM)) (LEFTBOTTOM (LIST RIGHT TOP LEFT BOTTOM)) (RIGHTTOP (LIST LEFT BOTTOM RIGHT TOP)) (LEFTTOP (LIST RIGHT BOTTOM LEFT TOP)) (SHOULDNT] T ELSEIF (INTITLEBAR WINDOW) THEN (MOVEW WINDOW) T ELSEIF (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN) THEN (APPLY* (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN) WINDOW))) ELSEIF (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN) THEN (APPLY* (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN) WINDOW]) (MACWINDOW.BUTTONEVENTFN.ANYWHERE [LAMBDA (WINDOW) (* ; "Edited 1-Jun-2020 08:49 by rmk:") (* ; "Edited 28-May-2020 18:00 by rmk:") (* ; "Edited 23-May-2020 08:34 by rmk:") (* ; "Edited 10-May-2020 03:35 by rmk:") (* ; "Edited 3-May-2020 21:18 by rmk:") (* ;; "Move if left-click anywhere, not just titlebar") (IF (AND (MOUSESTATE (ONLY LEFT)) (EQ LASTKEYBOARD 0)) THEN (TOTOPW WINDOW) (LET (REGION (CORNER (INCORNER WINDOW))) (IF CORNER THEN (* ;;  "The upper corners may be in the title bar, near the side, so test this first") (SETQ REGION (WINDOWPROP WINDOW 'REGION)) [LET ((LEFT (FETCH LEFT OF REGION)) (RIGHT (FETCH RIGHT OF REGION)) (TOP (FETCH TOP OF REGION)) (BOTTOM (FETCH BOTTOM OF REGION))) (SHAPEW WINDOW (GETREGION NIL NIL NIL NIL NIL (SELECTQ CORNER (RIGHTBOTTOM (LIST LEFT TOP RIGHT BOTTOM)) (LEFTBOTTOM (LIST RIGHT TOP LEFT BOTTOM)) (RIGHTTOP (LIST LEFT BOTTOM RIGHT TOP)) (LEFTTOP (LIST RIGHT BOTTOM LEFT TOP)) (SHOULDNT] T ELSE (MOVEW WINDOW) T)) ELSEIF (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN) THEN (APPLY* (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN) WINDOW]) (MACWINDOW [LAMBDA (WINDOW ANYWHERE) (* ; "Edited 28-May-2020 17:58 by rmk:") (* ; "Edited 18-May-2020 20:11 by rmk:") (* ; "Edited 10-May-2020 14:20 by rmk:") (* ;; "This can be applied to windows that have been created with an unknown or unmodifiable buttoneventfn.")  (* ; "Edited 3-May-2020 21:17 by rmk:") (CL:UNLESS (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN) (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN (WINDOWPROP WINDOW 'BUTTONEVENTFN)) (WINDOWPROP WINDOW 'BUTTONEVENTFN (IF ANYWHERE THEN (FUNCTION MACWINDOW.BUTTONEVENTFN.ANYWHERE) ELSE (FUNCTION MACWINDOW.BUTTONEVENTFN)))) WINDOW]) ) (DEFINEQ (MACINT\TEDIT.BUTTONEVENTFN [LAMBDA (WINDOW) (* ; "Edited 10-May-2020 03:31 by rmk:") (CL:WHEN (LISTP WINDOW) (SETQ WINDOW (CAR WINDOW))) (OR (MACWINDOW.BUTTONEVENTFN WINDOW) (MACORIG\TEDIT.BUTTONEVENTFN WINDOW]) (MACINT\SEDIT-BUTTONEVENTFN [LAMBDA (WINDOW) (* ; "Edited 10-May-2020 03:31 by rmk:") (OR (MACWINDOW.BUTTONEVENTFN WINDOW) (MACORIG\SEDIT-BUTTONEVENTFN WINDOW]) (MACINT-ADD-EXEC [LAMBDA U (* ; "Edited 10-May-2020 03:31 by rmk:") (LET [(PROC (APPLY (FUNCTION MACORIG-ADD-EXEC) (FOR N FROM 1 TO U COLLECT (ARG U N] (* ;; "For some reason, the window may not be there immediately") (DISMISS 100) (MACWINDOW (PROCESSPROP PROC 'WINDOW)) PROC]) (MACINT-DEBUGGER-BUTTON-EVENT [LAMBDA (WINDOW) (* ; "Edited 10-May-2020 03:31 by rmk:") (OR (MACWINDOW.BUTTONEVENTFN WINDOW) (MACORIG-DEBUGGER-BUTTON-EVENT WINDOW]) (MACINT-\ITEM.WINDOW.BUTTON.HANDLER [LAMBDA (WINDOW) (* ; "Edited 16-May-2020 22:35 by rmk:") (* ; "Edited 10-May-2020 03:31 by rmk:") (OR (MACWINDOW.BUTTONEVENTFN WINDOW) (MACORIG-\ITEM.WINDOW.BUTTON.HANDLER WINDOW]) (MACINT-SNAPW [LAMBDA NIL (* ; "Edited 18-May-2020 17:20 by rmk:") (LET ((W (MACORIG-SNAPW))) [WINDOWPROP W 'BUTTONEVENTFN (FUNCTION (LAMBDA (W) (TOTOPW W) (MOVEW W] W]) ) (RPAQ? MACINTERFACECORNERMARGIN 25) (MOVD? '\TEDIT.BUTTONEVENTFN 'MACORIG\TEDIT.BUTTONEVENTFN) (MOVD 'MACINT\TEDIT.BUTTONEVENTFN '\TEDIT.BUTTONEVENTFN) (MOVD? 'SEDIT::BUTTONEVENTFN 'MACORIG\SEDIT-BUTTONEVENTFN) (MOVD 'MACINT\SEDIT-BUTTONEVENTFN 'SEDIT::BUTTONEVENTFN) (MOVD? 'ADD-EXEC 'MACORIG-ADD-EXEC) (MOVD 'MACINT-ADD-EXEC 'ADD-EXEC) (MOVD? 'DBG::DEBUGGER-BUTTON-EVENT 'MACORIG-DEBUGGER-BUTTON-EVENT) (MOVD 'MACINT-DEBUGGER-BUTTON-EVENT 'DBG::DEBUGGER-BUTTON-EVENT) (MOVD? '\ITEM.WINDOW.BUTTON.HANDLER 'MACORIG-\ITEM.WINDOW.BUTTON.HANDLER) (MOVD 'MACINT-\ITEM.WINDOW.BUTTON.HANDLER '\ITEM.WINDOW.BUTTON.HANDLER) (MOVD? 'SNAPW 'MACORIG-SNAPW) (MOVD 'MACINT-SNAPW 'SNAPW) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDTOVAR NLAMA ) (ADDTOVAR NLAML ) (ADDTOVAR LAMA MACINT-ADD-EXEC) ) (DECLARE%: DONTCOPY (FILEMAP (NIL (1881 9154 (INTITLEBAR 1891 . 2111) (INCORNER 2113 . 3528) (MACWINDOW.BUTTONEVENTFN 3530 . 5896) (MACWINDOW.BUTTONEVENTFN.ANYWHERE 5898 . 8187) (MACWINDOW 8189 . 9152)) (9155 11049 ( MACINT\TEDIT.BUTTONEVENTFN 9165 . 9456) (MACINT\SEDIT-BUTTONEVENTFN 9458 . 9685) (MACINT-ADD-EXEC 9687 . 10111) (MACINT-DEBUGGER-BUTTON-EVENT 10113 . 10344) (MACINT-\ITEM.WINDOW.BUTTON.HANDLER 10346 . 10698) (MACINT-SNAPW 10700 . 11047))))) STOP \ No newline at end of file diff --git a/lispusers/MACINTERFACE.~46~ b/lispusers/MACINTERFACE.~46~ deleted file mode 100644 index 79f9b272e..000000000 --- a/lispusers/MACINTERFACE.~46~ +++ /dev/null @@ -1 +0,0 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") (FILECREATED "24-Jun-2020 20:36:10"  {DSK}kaplan>Local>medley3.5>lispcore>lispusers>MACINTERFACE.;46 11442 changes to%: (VARS MACINTERFACECOMS) previous date%: "24-Jun-2020 20:24:02" {DSK}kaplan>Local>medley3.5>lispcore>lispusers>MACINTERFACE.;45) (PRETTYCOMPRINT MACINTERFACECOMS) (RPAQQ MACINTERFACECOMS [ (* ;; "Externals") (COMS (FNS MACWINDOW MACWINDOW.SETUP) (INITVARS (MACINTERFACECORNERMARGIN 25))) (* ;; "Internals") [COMS (FNS INTITLEBAR INCORNER MACWINDOW.BUTTONEVENTFN MACWINDOW.BUTTONEVENTFN.ANYWHERE) (* ;; "Behavior for some known window creators") (FNS MACINT-ADD-EXEC MACINT-SNAPW) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (* ;; "Tedit") (MACWINDOW.SETUP '\TEDIT.BUTTONEVENTFN) (* ;; "Inspector") (MACWINDOW.SETUP '\ITEM.WINDOW.BUTTON.HANDLER) (* ;; "SEDIT") (MACWINDOW.SETUP 'SEDIT::BUTTONEVENTFN) (* ;; "Debugger") (MACWINDOW.SETUP 'DBG::DEBUGGER-BUTTON-EVENT) (* ;; "Snap") (MACWINDOW.SETUP 'SNAPW 'MACINT-SNAPW) (* ;; "New execs") (MACWINDOW.SETUP 'ADD-EXEC 'MACINT-ADD-EXEC) (* ;; "Existing exec of the load") (MACWINDOW (PROCESSPROP (TTY.PROCESS) 'WINDOW] (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) (LAMA MACINT-ADD-EXEC]) (* ;; "Externals") (DEFINEQ (MACWINDOW [LAMBDA (WINDOW ANYWHERE) (* ; "Edited 23-Jun-2020 16:01 by rmk:") (* ;; "This can be applied to windows that have been created with an unknown or unmodifiable buttoneventfn.") (CL:UNLESS (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN) (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN (WINDOWPROP WINDOW 'BUTTONEVENTFN)) (WINDOWPROP WINDOW 'BUTTONEVENTFN (IF ANYWHERE THEN (FUNCTION MACWINDOW.BUTTONEVENTFN.ANYWHERE) ELSE (FUNCTION MACWINDOW.BUTTONEVENTFN)))) WINDOW]) (MACWINDOW.SETUP [LAMBDA (ORIGFN MACWINDOWFN ANYWHERE) (* ; "Edited 24-Jun-2020 15:09 by rmk:") (* ;; "ORIGFN is either a function that creates windows of a given type (e.g. SNAPW or ADD-EXEC) or the known BUTTONEVENTFN of a class of windows.") (* ;; "Moves ORIGNFN to a new name, prefixed with MACORIG-.") (* ;; "If MACWINDOWFN is given, then that replaces the original definition of ORIGFN, and presumably knows how to call the renamed ORIGFN under the write circumstances. This is typically the case where ORIGFN is a window creator.") (* ;; "Otherwise, ORIGFN is taken to be the BUTTONEVENTFN for a class of windows, and its new definition is defaulted to one that maps left-clicks in appropriate areas into Mac window operations. If not in appropriate areas, then the renamed ORIGNFN is called to give the original button behavior.") (* ;; "If ANYWHERE, moving will happen for any click not in one of the shaping corners.") (* ;; "The renamed function has arguments in addition to WINDOW: the new name for the original function, if MACWINDOFN is provided, and the value specified here for ANYWHERE.") (LET [RENAMEDORIG (PKGNAME (CL:PACKAGE-NAME (CL:SYMBOL-PACKAGE ORIGFN] (* ;; "The renamed version of XCL symbols go into Interlisp, so there is less confusion about accessing it") (CL:WHEN (STREQUAL PKGNAME "XEROX-COMMON-LISP") (SETQ PKGNAME "INTERLISP")) (SETQ RENAMEDORIG (CL:INTERN (CONCAT 'MACORIG- ORIGFN) PKGNAME)) (MOVD? ORIGFN RENAMEDORIG) (IF MACWINDOWFN THEN (MOVD MACWINDOWFN ORIGFN) ELSE (PUTD ORIGFN `(LAMBDA (WINDOW) (MACWINDOW.BUTTONEVENTFN WINDOW (FUNCTION ,RENAMEDORIG) ,ANYWHERE]) ) (RPAQ? MACINTERFACECORNERMARGIN 25) (* ;; "Internals") (DEFINEQ (INTITLEBAR [LAMBDA (WINDOW) (* ; "Edited 3-May-2020 20:38 by rmk:") (IGREATERP (LASTMOUSEY WINDOW) (FETCH TOP OF (DSPCLIPPINGREGION NIL WINDOW]) (INCORNER [LAMBDA (WINDOW MARGIN) (* ; "Edited 13-May-2020 14:26 by rmk:") (* ; "Edited 10-May-2020 12:41 by rmk:") (* ; "Edited 3-May-2020 20:43 by rmk:") (CL:UNLESS MARGIN (SETQ MARGIN MACINTERFACECORNERMARGIN)) (LET ((CR (DSPCLIPPINGREGION NIL WINDOW)) (X (LASTMOUSEX WINDOW)) (Y (LASTMOUSEY WINDOW))) (IF (ILEQ (IABS (IDIFFERENCE X (FETCH LEFT OF CR))) MARGIN) THEN (* ;; "GREATERP puts it in title bar") (IF (IGREATERP Y (FETCH TOP OF CR)) THEN 'LEFTTOP ELSEIF (ILEQ (IABS (IDIFFERENCE Y (FETCH BOTTOM OF CR))) MARGIN) THEN 'LEFTBOTTOM) ELSEIF (ILEQ (IABS (IDIFFERENCE X (FETCH RIGHT OF CR))) MARGIN) THEN (IF (IGREATERP Y (FETCH TOP OF CR)) THEN 'RIGHTTOP ELSEIF (ILEQ (IABS (IDIFFERENCE Y (FETCH BOTTOM OF CR))) MARGIN) THEN 'RIGHTBOTTOM]) (MACWINDOW.BUTTONEVENTFN [LAMBDA (WINDOW ORIGFUNCTION ANYWHERE) (* ; "Edited 24-Jun-2020 20:23 by rmk:") (* ; "Edited 23-May-2020 08:34 by rmk:") (* ; "Edited 10-May-2020 03:35 by rmk:") (* ; "Edited 3-May-2020 21:18 by rmk:") (IF (AND (MOUSESTATE (ONLY LEFT)) (EQ LASTKEYBOARD 0)) THEN (TOTOPW WINDOW) (LET (REGION (CORNER (INCORNER WINDOW))) (IF CORNER THEN (* ;;  "The upper corners may be in the title bar, near the side, so test this first") (SETQ REGION (WINDOWPROP WINDOW 'REGION)) [LET ((LEFT (FETCH LEFT OF REGION)) (RIGHT (FETCH RIGHT OF REGION)) (TOP (FETCH TOP OF REGION)) (BOTTOM (FETCH BOTTOM OF REGION))) (SHAPEW WINDOW (GETREGION NIL NIL NIL NIL NIL (SELECTQ CORNER (RIGHTBOTTOM (LIST LEFT TOP RIGHT BOTTOM)) (LEFTBOTTOM (LIST RIGHT TOP LEFT BOTTOM)) (RIGHTTOP (LIST LEFT BOTTOM RIGHT TOP)) (LEFTTOP (LIST RIGHT BOTTOM LEFT TOP)) (SHOULDNT] T ELSEIF (OR ANYWHERE (INTITLEBAR WINDOW)) THEN (MOVEW WINDOW) T ELSEIF [OR ORIGFUNCTION (SETQ ORIGFUNCTION (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN] THEN (APPLY* ORIGFUNCTION WINDOW))) ELSEIF [OR ORIGFUNCTION (SETQ ORIGFUNCTION (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN] THEN (APPLY* ORIGFUNCTION WINDOW]) (MACWINDOW.BUTTONEVENTFN.ANYWHERE [LAMBDA (WINDOW) (* ; "Edited 24-Jun-2020 13:24 by rmk:") (* ;; "Move if left-click anywhere, not just titlebar") (MACWINDOW.BUTTONEVENTFN NIL T]) ) (* ;; "Behavior for some known window creators") (DEFINEQ (MACINT-ADD-EXEC [LAMBDA U (* ; "Edited 24-Jun-2020 14:23 by rmk:") (LET [(PROC (APPLY (FUNCTION MACORIG-ADD-EXEC) (FOR N FROM 1 TO U COLLECT (ARG U N] (* ;; "For some reason, the window may not be there immediately") (DISMISS 100) (MACWINDOW (PROCESSPROP PROC 'WINDOW)) PROC]) (MACINT-SNAPW [LAMBDA NIL (* ; "Edited 24-Jun-2020 13:19 by rmk:") (* ;; "No point in shaping a snap window, just move it.;;") (* ;; "This changes the creation function (SNAPW), since snap windows otherwise don't have a BUTTONEVENTN") (LET ((W (MACORIG-SNAPW))) [WINDOWPROP W 'BUTTONEVENTFN (FUNCTION (LAMBDA (W) (TOTOPW W) (MOVEW W] W]) ) (DECLARE%: DONTEVAL@LOAD DOCOPY (* ;; "Tedit") (MACWINDOW.SETUP '\TEDIT.BUTTONEVENTFN) (* ;; "Inspector") (MACWINDOW.SETUP '\ITEM.WINDOW.BUTTON.HANDLER) (* ;; "SEDIT") (MACWINDOW.SETUP 'SEDIT::BUTTONEVENTFN) (* ;; "Debugger") (MACWINDOW.SETUP 'DBG::DEBUGGER-BUTTON-EVENT) (* ;; "Snap") (MACWINDOW.SETUP 'SNAPW 'MACINT-SNAPW) (* ;; "New execs") (MACWINDOW.SETUP 'ADD-EXEC 'MACINT-ADD-EXEC) (* ;; "Existing exec of the load") (MACWINDOW (PROCESSPROP (TTY.PROCESS) 'WINDOW)) ) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDTOVAR NLAMA ) (ADDTOVAR NLAML ) (ADDTOVAR LAMA MACINT-ADD-EXEC) ) (DECLARE%: DONTCOPY (FILEMAP (NIL (2704 5275 (MACWINDOW 2714 . 3355) (MACWINDOW.SETUP 3357 . 5273)) (5344 9655 (INTITLEBAR 5354 . 5574) (INCORNER 5576 . 6991) (MACWINDOW.BUTTONEVENTFN 6993 . 9402) ( MACWINDOW.BUTTONEVENTFN.ANYWHERE 9404 . 9653)) (9713 10690 (MACINT-ADD-EXEC 9723 . 10147) ( MACINT-SNAPW 10149 . 10688))))) STOP \ No newline at end of file diff --git a/lispusers/MACINTERFACE.~49~ b/lispusers/MACINTERFACE.~49~ deleted file mode 100644 index d699b6478..000000000 --- a/lispusers/MACINTERFACE.~49~ +++ /dev/null @@ -1 +0,0 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") (FILECREATED " 6-Jul-2020 13:11:08"  {DSK}kaplan>Local>medley3.5>lispcore>lispusers>MACINTERFACE.;49 13543 changes to%: (VARS MACINTERFACECOMS) (FNS MACWINDOW.UNSETUP) previous date%: " 6-Jul-2020 12:19:37" {DSK}kaplan>Local>medley3.5>lispcore>lispusers>MACINTERFACE.;48) (PRETTYCOMPRINT MACINTERFACECOMS) (RPAQQ MACINTERFACECOMS [ (* ;; "Externals") (COMS (FNS MACWINDOW MACWINDOW.SETUP MACWINDOW.UNSETUP) (INITVARS (MACINTERFACECORNERMARGIN 25))) (* ;; "Internals") [COMS (FNS INTITLEBAR INCORNER MACWINDOW.BUTTONEVENTFN MACWINDOW.BUTTONEVENTFN.ANYWHERE) (* ;; "Behavior for some known window creators") (FNS MACINT-ADD-EXEC MACINT-SNAPW) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (* ;; "Tedit") (MACWINDOW.SETUP '\TEDIT.BUTTONEVENTFN) (* ;; "Inspector") (MACWINDOW.SETUP '\ITEM.WINDOW.BUTTON.HANDLER) (* ;; "Commonlisp array inspector. If you move the main window, the little attached window doesn't move. But if you move the attached window, it all works. Needs a special definition. Shaping doesn't work either") (* (MACWINDOW.SETUP 'ONEDINSPECT.BUTTONEVENTFN)) (MACWINDOW.SETUP 'ICMLARRAY.TITLECOMMANDFN) (* ;; "Freemenu") (MACWINDOW.SETUP '\FM.BUTTONEVENTFN) (* ;; "SEDIT") (MACWINDOW.SETUP 'SEDIT::BUTTONEVENTFN) (* ;; "Debugger") (MACWINDOW.SETUP 'DBG::DEBUGGER-BUTTON-EVENT) (* ;; "Snap") (MACWINDOW.SETUP 'SNAPW 'MACINT-SNAPW) (* ;; "New execs") (MACWINDOW.SETUP 'ADD-EXEC 'MACINT-ADD-EXEC) (* ;; "Existing exec of the load") (MACWINDOW (PROCESSPROP (TTY.PROCESS) 'WINDOW] (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) (LAMA MACINT-ADD-EXEC]) (* ;; "Externals") (DEFINEQ (MACWINDOW [LAMBDA (WINDOW ANYWHERE) (* ; "Edited 23-Jun-2020 16:01 by rmk:") (* ;; "This can be applied to windows that have been created with an unknown or unmodifiable buttoneventfn.") (CL:UNLESS (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN) (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN (WINDOWPROP WINDOW 'BUTTONEVENTFN)) (WINDOWPROP WINDOW 'BUTTONEVENTFN (IF ANYWHERE THEN (FUNCTION MACWINDOW.BUTTONEVENTFN.ANYWHERE) ELSE (FUNCTION MACWINDOW.BUTTONEVENTFN)))) WINDOW]) (MACWINDOW.SETUP [LAMBDA (ORIGFN MACWINDOWFN ANYWHERE) (* ; "Edited 24-Jun-2020 15:09 by rmk:") (* ;; "ORIGFN is either a function that creates windows of a given type (e.g. SNAPW or ADD-EXEC) or the known BUTTONEVENTFN of a class of windows.") (* ;; "Moves ORIGNFN to a new name, prefixed with MACORIG-.") (* ;; "If MACWINDOWFN is given, then that replaces the original definition of ORIGFN, and presumably knows how to call the renamed ORIGFN under the write circumstances. This is typically the case where ORIGFN is a window creator.") (* ;; "Otherwise, ORIGFN is taken to be the BUTTONEVENTFN for a class of windows, and its new definition is defaulted to one that maps left-clicks in appropriate areas into Mac window operations. If not in appropriate areas, then the renamed ORIGNFN is called to give the original button behavior.") (* ;; "If ANYWHERE, moving will happen for any click not in one of the shaping corners.") (* ;; "The renamed function has arguments in addition to WINDOW: the new name for the original function, if MACWINDOFN is provided, and the value specified here for ANYWHERE.") (LET [RENAMEDORIG (PKGNAME (CL:PACKAGE-NAME (CL:SYMBOL-PACKAGE ORIGFN] (* ;; "The renamed version of XCL symbols go into Interlisp, so there is less confusion about accessing it") (CL:WHEN (STREQUAL PKGNAME "XEROX-COMMON-LISP") (SETQ PKGNAME "INTERLISP")) (SETQ RENAMEDORIG (CL:INTERN (CONCAT 'MACORIG- ORIGFN) PKGNAME)) (MOVD? ORIGFN RENAMEDORIG) (IF MACWINDOWFN THEN (MOVD MACWINDOWFN ORIGFN) ELSE (PUTD ORIGFN `(LAMBDA (WINDOW) (MACWINDOW.BUTTONEVENTFN WINDOW (FUNCTION ,RENAMEDORIG) ,ANYWHERE]) (MACWINDOW.UNSETUP [LAMBDA (ORIGFN) (* ; "Edited 6-Jul-2020 13:04 by rmk:") (* ; "Edited 24-Jun-2020 15:09 by rmk:") (* ;; "Moves the renamed original function back to its original name") (LET [RENAMEDORIG (PKGNAME (CL:PACKAGE-NAME (CL:SYMBOL-PACKAGE ORIGFN] (* ;; "The renamed version of XCL symbols go into Interlisp, so there is less confusion about accessing it") (CL:WHEN (STREQUAL PKGNAME "XEROX-COMMON-LISP") (SETQ PKGNAME "INTERLISP")) (SETQ RENAMEDORIG (CL:INTERN (CONCAT 'MACORIG- ORIGFN) PKGNAME)) (CL:WHEN (GETD RENAMEDORIG) (MOVD RENAMEDORIG ORIGFN]) ) (RPAQ? MACINTERFACECORNERMARGIN 25) (* ;; "Internals") (DEFINEQ (INTITLEBAR [LAMBDA (WINDOW) (* ; "Edited 3-May-2020 20:38 by rmk:") (IGREATERP (LASTMOUSEY WINDOW) (FETCH TOP OF (DSPCLIPPINGREGION NIL WINDOW]) (INCORNER [LAMBDA (WINDOW MARGIN) (* ; "Edited 13-May-2020 14:26 by rmk:") (* ; "Edited 10-May-2020 12:41 by rmk:") (* ; "Edited 3-May-2020 20:43 by rmk:") (CL:UNLESS MARGIN (SETQ MARGIN MACINTERFACECORNERMARGIN)) (LET ((CR (DSPCLIPPINGREGION NIL WINDOW)) (X (LASTMOUSEX WINDOW)) (Y (LASTMOUSEY WINDOW))) (IF (ILEQ (IABS (IDIFFERENCE X (FETCH LEFT OF CR))) MARGIN) THEN (* ;; "GREATERP puts it in title bar") (IF (IGREATERP Y (FETCH TOP OF CR)) THEN 'LEFTTOP ELSEIF (ILEQ (IABS (IDIFFERENCE Y (FETCH BOTTOM OF CR))) MARGIN) THEN 'LEFTBOTTOM) ELSEIF (ILEQ (IABS (IDIFFERENCE X (FETCH RIGHT OF CR))) MARGIN) THEN (IF (IGREATERP Y (FETCH TOP OF CR)) THEN 'RIGHTTOP ELSEIF (ILEQ (IABS (IDIFFERENCE Y (FETCH BOTTOM OF CR))) MARGIN) THEN 'RIGHTBOTTOM]) (MACWINDOW.BUTTONEVENTFN [LAMBDA (WINDOW ORIGFUNCTION ANYWHERE) (* ; "Edited 24-Jun-2020 20:23 by rmk:") (* ; "Edited 23-May-2020 08:34 by rmk:") (* ; "Edited 10-May-2020 03:35 by rmk:") (* ; "Edited 3-May-2020 21:18 by rmk:") (IF (AND (MOUSESTATE (ONLY LEFT)) (EQ LASTKEYBOARD 0)) THEN (TOTOPW WINDOW) (LET (REGION (CORNER (INCORNER WINDOW))) (IF CORNER THEN (* ;;  "The upper corners may be in the title bar, near the side, so test this first") (SETQ REGION (WINDOWPROP WINDOW 'REGION)) [LET ((LEFT (FETCH LEFT OF REGION)) (RIGHT (FETCH RIGHT OF REGION)) (TOP (FETCH TOP OF REGION)) (BOTTOM (FETCH BOTTOM OF REGION))) (SHAPEW WINDOW (GETREGION NIL NIL NIL NIL NIL (SELECTQ CORNER (RIGHTBOTTOM (LIST LEFT TOP RIGHT BOTTOM)) (LEFTBOTTOM (LIST RIGHT TOP LEFT BOTTOM)) (RIGHTTOP (LIST LEFT BOTTOM RIGHT TOP)) (LEFTTOP (LIST RIGHT BOTTOM LEFT TOP)) (SHOULDNT] T ELSEIF (OR ANYWHERE (INTITLEBAR WINDOW)) THEN (MOVEW WINDOW) T ELSEIF [OR ORIGFUNCTION (SETQ ORIGFUNCTION (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN] THEN (APPLY* ORIGFUNCTION WINDOW))) ELSEIF [OR ORIGFUNCTION (SETQ ORIGFUNCTION (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN] THEN (APPLY* ORIGFUNCTION WINDOW]) (MACWINDOW.BUTTONEVENTFN.ANYWHERE [LAMBDA (WINDOW) (* ; "Edited 24-Jun-2020 13:24 by rmk:") (* ;; "Move if left-click anywhere, not just titlebar") (MACWINDOW.BUTTONEVENTFN NIL T]) ) (* ;; "Behavior for some known window creators") (DEFINEQ (MACINT-ADD-EXEC [LAMBDA U (* ; "Edited 24-Jun-2020 14:23 by rmk:") (LET [(PROC (APPLY (FUNCTION MACORIG-ADD-EXEC) (FOR N FROM 1 TO U COLLECT (ARG U N] (* ;; "For some reason, the window may not be there immediately") (DISMISS 100) (MACWINDOW (PROCESSPROP PROC 'WINDOW)) PROC]) (MACINT-SNAPW [LAMBDA NIL (* ; "Edited 24-Jun-2020 13:19 by rmk:") (* ;; "No point in shaping a snap window, just move it.;;") (* ;; "This changes the creation function (SNAPW), since snap windows otherwise don't have a BUTTONEVENTN") (LET ((W (MACORIG-SNAPW))) [WINDOWPROP W 'BUTTONEVENTFN (FUNCTION (LAMBDA (W) (TOTOPW W) (MOVEW W] W]) ) (DECLARE%: DONTEVAL@LOAD DOCOPY (* ;; "Tedit") (MACWINDOW.SETUP '\TEDIT.BUTTONEVENTFN) (* ;; "Inspector") (MACWINDOW.SETUP '\ITEM.WINDOW.BUTTON.HANDLER) (* ;; "Commonlisp array inspector. If you move the main window, the little attached window doesn't move. But if you move the attached window, it all works. Needs a special definition. Shaping doesn't work either") (* (MACWINDOW.SETUP  (QUOTE ONEDINSPECT.BUTTONEVENTFN))) (MACWINDOW.SETUP 'ICMLARRAY.TITLECOMMANDFN) (* ;; "Freemenu") (MACWINDOW.SETUP '\FM.BUTTONEVENTFN) (* ;; "SEDIT") (MACWINDOW.SETUP 'SEDIT::BUTTONEVENTFN) (* ;; "Debugger") (MACWINDOW.SETUP 'DBG::DEBUGGER-BUTTON-EVENT) (* ;; "Snap") (MACWINDOW.SETUP 'SNAPW 'MACINT-SNAPW) (* ;; "New execs") (MACWINDOW.SETUP 'ADD-EXEC 'MACINT-ADD-EXEC) (* ;; "Existing exec of the load") (MACWINDOW (PROCESSPROP (TTY.PROCESS) 'WINDOW)) ) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDTOVAR NLAMA ) (ADDTOVAR NLAML ) (ADDTOVAR LAMA MACINT-ADD-EXEC) ) (DECLARE%: DONTCOPY (FILEMAP (NIL (3472 6850 (MACWINDOW 3482 . 4123) (MACWINDOW.SETUP 4125 . 6041) (MACWINDOW.UNSETUP 6043 . 6848)) (6919 11230 (INTITLEBAR 6929 . 7149) (INCORNER 7151 . 8566) (MACWINDOW.BUTTONEVENTFN 8568 . 10977) (MACWINDOW.BUTTONEVENTFN.ANYWHERE 10979 . 11228)) (11288 12265 (MACINT-ADD-EXEC 11298 . 11722) (MACINT-SNAPW 11724 . 12263))))) STOP \ No newline at end of file diff --git a/lispusers/MACINTERFACE.~6~ b/lispusers/MACINTERFACE.~6~ deleted file mode 100644 index 2121220f6..000000000 --- a/lispusers/MACINTERFACE.~6~ +++ /dev/null @@ -1 +0,0 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") (FILECREATED " 3-May-2020 21:29:10"  {DSK}kaplan>Local>medley3.5>lispcore>lispusers>MACINTERFACE.;6 2544 changes to%: (FNS MACWINDOW INCORNER MACWINDOW.BUTTONEVENTFN INTITLEBAR) (VARS MACINTERFACECOMS) previous date%: " 3-May-2020 20:42:23" {DSK}kaplan>Local>medley3.5>lispcore>lispusers>MACINTERFACE.;2) (PRETTYCOMPRINT MACINTERFACECOMS) (RPAQQ MACINTERFACECOMS ((FNS INTITLEBAR INCORNER MACWINDOW.BUTTONEVENTFN MACWINDOW))) (DEFINEQ (INTITLEBAR [LAMBDA (WINDOW) (* ; "Edited 3-May-2020 20:38 by rmk:") (IGREATERP (LASTMOUSEY WINDOW) (FETCH TOP OF (DSPCLIPPINGREGION NIL WINDOW]) (INCORNER [LAMBDA (WINDOW MARGIN) (* ; "Edited 3-May-2020 20:43 by rmk:") (CL:UNLESS MARGIN (SETQ MARGIN 10)) (LET ((CR (DSPCLIPPINGREGION NIL WINDOW)) (X (LASTMOUSEX WINDOW)) (Y (LASTMOUSEY WINDOW))) (IF (ILEQ (IABS (IDIFFERENCE X (FETCH LEFT OF CR))) MARGIN) THEN (OR (ILEQ (IABS (IDIFFERENCE Y (FETCH TOP OF CR))) MARGIN) (ILEQ (IABS (IDIFFERENCE Y (FETCH BOTTOM OF CR))) MARGIN)) ELSEIF (ILEQ (IABS (IDIFFERENCE X (FETCH RIGHT OF CR))) MARGIN) THEN (OR (ILEQ (IABS (IDIFFERENCE Y (FETCH TOP OF CR))) MARGIN) (ILEQ (IABS (IDIFFERENCE Y (FETCH BOTTOM OF CR))) MARGIN]) (MACWINDOW.BUTTONEVENTFN [LAMBDA (WINDOW) (* ; "Edited 3-May-2020 21:18 by rmk:") (TOTOPW WINDOW) (IF (MOUSESTATE LEFT) THEN (IF (INTITLEBAR WINDOW) THEN (MOVEW WINDOW) ELSEIF (INCORNER WINDOW) THEN (SHAPEW WINDOW)) ELSE (APPLY* (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN) WINDOW]) (MACWINDOW [LAMBDA (WINDOW) (* ; "Edited 3-May-2020 21:17 by rmk:") (WINDOWPROP WINDOW 'PREMACBUTTONEVENTFN (WINDOWPROP WINDOW 'BUTTONEVENTFN)) (WINDOWPROP WINDOW 'BUTTONEVENTFN (FUNCTION MACWINDOW.BUTTONEVENTFN]) ) (DECLARE%: DONTCOPY (FILEMAP (NIL (555 2521 (INTITLEBAR 565 . 785) (INCORNER 787 . 1771) (MACWINDOW.BUTTONEVENTFN 1773 . 2244) (MACWINDOW 2246 . 2519))))) STOP \ No newline at end of file diff --git a/lispusers/MODERNIZE b/lispusers/MODERNIZE index 1acd73ffa..599f838ec 100644 --- a/lispusers/MODERNIZE +++ b/lispusers/MODERNIZE @@ -1,11 +1,11 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED "14-Mar-2021 20:33:34"  -{DSK}kaplan>Local>medley3.5>git-medley>lispusers>MODERNIZE.;14 20950 +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS) +(FILECREATED " 8-Jul-2021 23:33:42"  +{DSK}kaplan>Local>medley3.5>git-medley>lispusers>MODERNIZE.;16 23978 - changes to%: (FNS MODERNWINDOW.SETUP) + changes to%: (FNS MODERNWINDOW) - previous date%: "14-Mar-2021 18:00:34" -{DSK}kaplan>Local>medley3.5>git-medley>lispusers>MODERNIZE.;13) + previous date%: " 3-Jul-2021 10:32:03" +{DSK}kaplan>Local>medley3.5>git-medley>lispusers>MODERNIZE.;15) (PRETTYCOMPRINT MODERNIZECOMS) @@ -19,17 +19,20 @@ (* ;; "Internals") - [COMS (FNS MODERNWINDOW.BUTTONEVENTFN MODERNWINDOW.BUTTONEVENTFN.ANYWHERE NEARTOP - NEARESTCORNER INCORNER.REGION) + [COMS (FNS MODERNWINDOW.BUTTONEVENTFN NEARTOP NEARESTCORNER INCORNER.REGION) (* ;; "Behavior for some known window creators") - (FNS MODERN-ADD-EXEC MODERN-SNAPW TOTOPW.MODERNIZE) + (FNS MODERN-ADD-EXEC MODERN-SNAPW TOTOPW.MODERNIZE MODERN-MENUBUTTONFN) (* ;; "Add some Meta commands") (FNS TEDIT.MODERNIZE TEDIT.SELECTALL) - (DECLARE%: DONTEVAL@LOAD DOCOPY (P (TEDIT.MODERNIZE) + (DECLARE%: DONTEVAL@LOAD DOCOPY (P + (* ;; "Tedit") + + (MODERNWINDOW.SETUP '\TEDIT.BUTTONEVENTFN) + (TEDIT.MODERNIZE) (* ;; "Inspector") @@ -80,7 +83,13 @@ (* ;; "Promptwindow") - (MODERNWINDOW PROMPTWINDOW T] + (MODERNWINDOW PROMPTWINDOW T) + + (* ;; + "Menus: Move only and only with title clicks") + + (MODERNWINDOW.SETUP 'MENUBUTTONFN + 'MODERN-MENUBUTTONFN] (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) (LAMA MODERN-ADD-EXEC]) @@ -92,19 +101,28 @@ (DEFINEQ (MODERNWINDOW - [LAMBDA (WINDOW ANYWHERE) (* ; "Edited 22-Feb-2021 16:44 by rmk:") + [LAMBDA (WINDOW ANYWHERE TITLEPROPORTION) (* ; "Edited 8-Jul-2021 23:33 by rmk:") + (* ; "Edited 3-Jul-2021 10:31 by rmk:") + (* ; "Edited 24-Jun-2021 14:52 by rmk:") - (* ;; "This can be applied to windows that have been created with an unknown or unmodifiable buttoneventfn.") + (* ;; "This can be applied to windows that have been created with an unknown or unmodifiable buttoneventfn. If the window was previously modernized, we restore its original state first, in case it is called here with different parameters") - (CL:UNLESS (WINDOWPROP WINDOW 'PREMODERN-BUTTONEVENTFN) - (WINDOWPROP WINDOW 'PREMODERN-BUTTONEVENTFN (WINDOWPROP WINDOW 'BUTTONEVENTFN)) - (WINDOWPROP WINDOW 'BUTTONEVENTFN (IF ANYWHERE - THEN (FUNCTION MODERNWINDOW.BUTTONEVENTFN.ANYWHERE) - ELSE (FUNCTION MODERNWINDOW.BUTTONEVENTFN)))) + (CL:WHEN (AND TITLEPROPORTION (GREATERP TITLEPROPORTION 0.5)) + (ERROR "TITLEPROPORTION cannot be greater than .5")) + (CL:WHEN (WINDOWPROP WINDOW 'PREMODERN-BUTTONEVENTFN) + (WINDOWPROP WINDOW 'BUTTONEVENTFN (WINDOWPROP WINDOW 'PREMODERN-BUTTONEVENTFN)) + (WINDOWPROP WINDOW 'PREMODERN-BUTTONEVENTFN NIL)) + (WINDOWPROP WINDOW 'PREMODERN-BUTTONEVENTFN (WINDOWPROP WINDOW 'BUTTONEVENTFN)) + (WINDOWPROP WINDOW 'BUTTONEVENTFN (IF (OR ANYWHERE TITLEPROPORTION) + THEN [FUNCTION (LAMBDA (WINDOW) + (MODERNWINDOW.BUTTONEVENTFN + WINDOW NIL T ,TITLEPROPORTION] + ELSE (FUNCTION MODERNWINDOW.BUTTONEVENTFN))) WINDOW]) (MODERNWINDOW.SETUP - [LAMBDA (ORIGFN MODERNWINDOWFN ANYWHERE) (* ; "Edited 14-Mar-2021 20:33 by rmk:") + [LAMBDA (ORIGFN MODERNWINDOWFN ANYWHERE TITLEPROPORTION) + (* ; "Edited 24-Jun-2021 14:53 by rmk:") (* ;; "ORIGFN is either a function that creates windows of a given type (e.g. SNAPW or ADD-EXEC) or the known BUTTONEVENTFN of a class of windows.") @@ -122,6 +140,11 @@ (* ;; "If ORIGFN is defined, then presumably the file containing ORIGFN (e.g. sketch) was loaded before MODERNIZE (if we are being called on our load), and we can rearrange things. But of ORIGFN is not defined, then there is really nothing to do. The package loader itself should call MODERNWINDOW.SETUP if we are defined when it is loaded. ") + (* ;; "") + + (CL:WHEN (AND TITLEPROPORTION (GREATERP TITLEPROPORTION 0.5)) + (ERROR "TITLEPROPORTION cannot be greater than .5")) + (MODERNWINDOW.UNSETUP ORIGFN) [LET [RENAMEDORIG (PKGNAME (CL:PACKAGE-NAME (CL:SYMBOL-PACKAGE ORIGFN] (* ;; "The renamed version of XCL symbols go into Interlisp, so there is less confusion about accessing it") @@ -133,10 +156,14 @@ (MOVD? ORIGFN RENAMEDORIG) (IF MODERNWINDOWFN THEN (MOVD MODERNWINDOWFN ORIGFN) - ELSE (PUTD ORIGFN `(LAMBDA (WINDOW) - (MODERNWINDOW.BUTTONEVENTFN WINDOW (FUNCTION - ,RENAMEDORIG) - ,ANYWHERE])]) + ELSE (PUTD ORIGFN `(LAMBDA ,(ARGLIST ORIGFN) + (MODERNWINDOW.BUTTONEVENTFN + ,(CL:IF (LISTP (ARGLIST ORIGFN)) + (CAR (ARGLIST ORIGFN)) + (ARGLIST ORIGFN)) + (FUNCTION ,RENAMEDORIG) + ,ANYWHERE + ,TITLEPROPORTION])]) (UNMODERNWINDOW [LAMBDA (WINDOW) (* ; "Edited 22-Feb-2021 16:44 by rmk:") @@ -175,7 +202,7 @@ (DEFINEQ (MODERNWINDOW.BUTTONEVENTFN - [LAMBDA (WINDOW ORIGFUNCTION ANYWHERE) (* ; "Edited 27-Feb-2021 17:57 by rmk:") + [LAMBDA (WINDOW ORIGFUNCTION ANYWHERE TITLEPROPORTION)(* ; "Edited 24-Jun-2021 14:49 by rmk:") (IF (AND (MOUSESTATE (ONLY LEFT)) (EQ LASTKEYBOARD 0)) THEN (TOTOPW WINDOW) @@ -231,7 +258,7 @@ WINDOW) STARTINGREGION)) T - ELSEIF (OR ANYWHERE (NEARTOP MAINREGION TOPMARGIN)) + ELSEIF (OR ANYWHERE (NEARTOP MAINREGION TOPMARGIN TITLEPROPORTION)) THEN (NEARESTCORNER ATTACHEDREGION) (MOVEW (CL:IF (MEMB 'MOVEW (WINDOWPROP WINDOW 'PASSTOMAINCOMS)) (WINDOWPROP WINDOW 'MAINWINDOW) @@ -243,21 +270,20 @@ ELSEIF [OR ORIGFUNCTION (SETQ ORIGFUNCTION (WINDOWPROP WINDOW 'PREMODERN-BUTTONEVENTFN] THEN (APPLY* ORIGFUNCTION WINDOW]) -(MODERNWINDOW.BUTTONEVENTFN.ANYWHERE - [LAMBDA (WINDOW) (* ; "Edited 22-Feb-2021 16:31 by rmk:") - (* ; "Edited 24-Jun-2020 13:24 by rmk:") - - (* ;; "Move if left-click anywhere, not just titlebar") - - (MODERNWINDOW.BUTTONEVENTFN WINDOW NIL T]) - (NEARTOP - [LAMBDA (MAINREGION TOPMARGIN) (* ; "Edited 12-Feb-2021 23:19 by rmk:") + [LAMBDA (MAINREGION TOPMARGIN TITLEPROPORTION) (* ; "Edited 24-Jun-2021 14:51 by rmk:") (* ;; "True if the MOUSEY is near the top of MAINREGION. That means in the title bar for titled windows, otherwise a short distance below the top of the window. (Could be in the border?)") - (IGREATERP LASTMOUSEY (IDIFFERENCE (FETCH TOP OF MAINREGION) - TOPMARGIN]) + (* ;; "If TITLEPROPORTION is N, then the click must be within that proportion of the window-width from either edge. ") + + (AND (IGREATERP LASTMOUSEY (IDIFFERENCE (FETCH TOP OF MAINREGION) + TOPMARGIN)) + (OR (NOT TITLEPROPORTION) + (LET ((WIDTH (FETCH WIDTH of MAINREGION)) + (LEFT (FETCH LEFT OF MAINREGION))) + (OR (ILESSP LASTMOUSEX (IPLUS LEFT (TIMES WIDTH TITLEPROPORTION))) + (IGREATERP LASTMOUSEX (IPLUS LEFT (TIMES WIDTH (DIFFERENCE 1 TITLEPROPORTION]) (NEARESTCORNER [LAMBDA (REGION) (* ; "Edited 14-Feb-2021 21:46 by rmk:") @@ -339,6 +365,23 @@ (LET ((MAIN (MAINWINDOW WINDOW T))) (CL:WHEN MAIN (MODERNWINDOW.BUTTONEVENTFN MAIN (WINDOWPROP MAIN 'BUTTONEVENTFN)))]) + +(MODERN-MENUBUTTONFN + [LAMBDA (WINDOW) (* ; "Edited 23-May-2021 20:37 by rmk:") + + (* ;; "Replaces the button fn for a Menu window, allowing title clicks to do the move. Sometimes the title isn't in the window, it's in the menu.") + + (LET (MENU) + (IF [AND (MOUSESTATE (ONLY LEFT)) + (EQ LASTKEYBOARD 0) + (OR (WINDOWPROP WINDOW 'TITLE) + (AND [NULL (CDR (SETQ MENU (MKLIST (WINDOWPROP WINDOW 'MENU] + (TYPE? MENU (SETQ MENU (CAR MENU))) + (FETCH (MENU TITLE) OF MENU))) + (NEARTOP (WINDOWPROP WINDOW 'REGION) + (FONTPROP WindowTitleDisplayStream 'HEIGHT] + THEN (MOVEW WINDOW) + ELSE (MODERN-ORIG-MENUBUTTONFN WINDOW]) ) @@ -348,25 +391,24 @@ (DEFINEQ (TEDIT.MODERNIZE - [LAMBDA NIL (* ; "Edited 22-Feb-2021 16:28 by rmk:") + [LAMBDA NIL (* ; "Edited 24-Jun-2021 20:54 by rmk:") (CL:WHEN (GETD '\TEDIT.BUTTONEVENTFN) - (MODERNWINDOW.SETUP '\TEDIT.BUTTONEVENTFN) (* ;; "All") - (TEDIT.SETFUNCTION (CHARCODE "1,a") + (TEDIT.SETFUNCTION (CHARCODE "Meta,a") (FUNCTION TEDIT.SELECTALL) TEDIT.READTABLE) - (TEDIT.SETFUNCTION (CHARCODE "1,A") + (TEDIT.SETFUNCTION (CHARCODE "Meta,A") (FUNCTION TEDIT.SELECTALL) TEDIT.READTABLE) (* ;; "Quit") - (TEDIT.SETFUNCTION (CHARCODE "1,q") + (TEDIT.SETFUNCTION (CHARCODE "Meta,q") (FUNCTION TEDIT.QUIT) TEDIT.READTABLE) - (TEDIT.SETFUNCTION (CHARCODE "1,Q") + (TEDIT.SETFUNCTION (CHARCODE "Meta,Q") (FUNCTION TEDIT.QUIT) TEDIT.READTABLE))]) @@ -379,6 +421,12 @@ ) (DECLARE%: DONTEVAL@LOAD DOCOPY + +(* ;; "Tedit") + + +(MODERNWINDOW.SETUP '\TEDIT.BUTTONEVENTFN) + (TEDIT.MODERNIZE) @@ -456,6 +504,12 @@ (MODERNWINDOW PROMPTWINDOW T) + + +(* ;; "Menus: Move only and only with title clicks") + + +(MODERNWINDOW.SETUP 'MENUBUTTONFN 'MODERN-MENUBUTTONFN) ) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS @@ -466,10 +520,10 @@ (ADDTOVAR LAMA MODERN-ADD-EXEC) ) (DECLARE%: DONTCOPY - (FILEMAP (NIL (4369 8713 (MODERNWINDOW 4379 . 5037) (MODERNWINDOW.SETUP 5039 . 7501) (UNMODERNWINDOW -7503 . 7897) (MODERNWINDOW.UNSETUP 7899 . 8711)) (8778 16791 (MODERNWINDOW.BUTTONEVENTFN 8788 . 13799) - (MODERNWINDOW.BUTTONEVENTFN.ANYWHERE 13801 . 14172) (NEARTOP 14174 . 14610) (NEARESTCORNER 14612 . -15491) (INCORNER.REGION 15493 . 16789)) (16849 18267 (MODERN-ADD-EXEC 16859 . 17290) (MODERN-SNAPW -17292 . 17835) (TOTOPW.MODERNIZE 17837 . 18265)) (18308 19391 (TEDIT.MODERNIZE 18318 . 19060) ( -TEDIT.SELECTALL 19062 . 19389))))) + (FILEMAP (NIL (4933 10561 (MODERNWINDOW 4943 . 6398) (MODERNWINDOW.SETUP 6400 . 9349) (UNMODERNWINDOW +9351 . 9745) (MODERNWINDOW.UNSETUP 9747 . 10559)) (10626 18766 (MODERNWINDOW.BUTTONEVENTFN 10636 . +15663) (NEARTOP 15665 . 16585) (NEARESTCORNER 16587 . 17466) (INCORNER.REGION 17468 . 18764)) (18824 +21146 (MODERN-ADD-EXEC 18834 . 19265) (MODERN-SNAPW 19267 . 19810) (TOTOPW.MODERNIZE 19812 . 20240) ( +MODERN-MENUBUTTONFN 20242 . 21144)) (21187 22227 (TEDIT.MODERNIZE 21197 . 21896) (TEDIT.SELECTALL +21898 . 22225))))) STOP diff --git a/lispusers/MODERNIZE.LCOM b/lispusers/MODERNIZE.LCOM index ac72faec9..99423f35c 100644 Binary files a/lispusers/MODERNIZE.LCOM and b/lispusers/MODERNIZE.LCOM differ diff --git a/lispusers/PRETTYFILEINDEX b/lispusers/PRETTYFILEINDEX index a0890aaa5..267319937 100644 --- a/lispusers/PRETTYFILEINDEX +++ b/lispusers/PRETTYFILEINDEX @@ -1,13 +1,15 @@ -(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "28-Jun-99 17:13:51" {DSK}medley3.5>lispusers>PRETTYFILEINDEX.;3 91069 +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS) +(FILECREATED " 9-Jul-2021 21:55:15"  +{DSK}kaplan>Local>medley3.5>git-medley>lispusers>PRETTYFILEINDEX.;5 93788 - changes to%: (FNS PRETTYFILEINDEX PFI.PASS.COMMENT) + changes to%: (FNS PRETTYFILEINDEX PFI.PRINT.FILECREATED) - previous date%: "12-Nov-93 09:53:58" {DSK}medley3.5>lispusers>PRETTYFILEINDEX.;2) + previous date%: " 9-Jul-2021 08:04:40" +{DSK}kaplan>Local>medley3.5>git-medley>lispusers>PRETTYFILEINDEX.;4) (* ; " -Copyright (c) 1988, 1992, 1993, 1999 by Xerox Corporation. All rights reserved. +Copyright (c) 1988, 1992-1993, 1999, 2021 by Xerox Corporation. ") (PRETTYCOMPRINT PRETTYFILEINDEXCOMS) @@ -181,7 +183,8 @@ Copyright (c) 1988, 1992, 1993, 1999 by Xerox Corporation. All rights reserved. (DEFINEQ (PRETTYFILEINDEX - [LAMBDA (FILENAME PRINTOPTIONS OUTSTREAM DONTINDEX) (* ; "Edited 11-Apr-95 00:02 by rmk:") + [LAMBDA (FILENAME PRINTOPTIONS OUTSTREAM DONTINDEX) (* ; "Edited 9-Jul-2021 21:35 by rmk:") + (* ; "Edited 11-Apr-95 00:02 by rmk:") (* ; "Edited 11-Jun-92 15:58 by cat") (* ;; "Makes an indexed file (default is the line printer pseudo-file). The index file will have a number of indices, one for each indexable type. Each type index will list all the items of that type in alphabetical order and the page number of where that item's definition is in the file. The indices will be printed last, so that this can be one-pass.") @@ -329,6 +332,9 @@ Copyright (c) 1988, 1992, 1993, 1999 by Xerox Corporation. All rights reserved. (SETQ *PFI-LOCATIONS* :NONE) else (STREAMPROP *STANDARD-OUTPUT* 'AFTERNEWPAGEFN (FUNCTION PFI.AFTER.NEW.PAGE)) (* ; "Enable header printing") + + (* ;; "RMK: NOBIND here seems to be deliberate, it seems somehow to match the NOBIND that appears in PFI.HANDLE.RPAQQ.") + [SETQ *PFI-FILEVARS* `((,(FILECOMS FILENAME) . NOBIND] (* ; "Says to do something with coms") [if (NOT (FIXP *PFI-MAX-WASTED-LINES*)) @@ -453,16 +459,107 @@ Copyright (c) 1988, 1992, 1993, 1999 by Xerox Corporation. All rights reserved. (DEFINEQ (PFI.PRINT.FILECREATED -(LAMBDA (EXPR ENV) (* ; "Edited 13-Apr-88 11:14 by bvm") (* ;; "Display the FILECREATED expression and environment prettily") (* ;; "Form is (FILECREATED date filename filemaploc changes to: changes previous date: date filename)") (pop EXPR) (CHANGEFONT ITALICFONT) (LET* ((STRINGS (QUOTE ("File created:" "changes to:" "previous date:" "Read Table:" "Package:" "Base:"))) (FONT (DSPFONT)) (STRWIDTHS (for STR in STRINGS collect (STRINGWIDTH STR FONT))) (TABSTOP (+ (DSPLEFTMARGIN) (APPLY (FUNCTION MAX) STRWIDTHS)))) (PFI.PRINT.TO.TAB (pop STRINGS) (pop STRWIDTHS) TABSTOP) (* ; "File created:") (PRINTOUT NIL (pop EXPR) " " .FONT LAMBDAFONT (pop EXPR) T T) (* ; "date and file name") (if (OR (NULL (CAR EXPR)) (FIXP (CAR EXPR))) then (* ; "Skip over filemaploc") (pop EXPR)) (if (EQ (CAR EXPR) (QUOTE changes)) then (* ; "handle %"Changes to:%"") (PFI.PRINT.TO.TAB (pop STRINGS) (pop STRWIDTHS) TABSTOP) (SETQ EXPR (CDDR EXPR)) (PRINTDEF (while (LISTP (CAR EXPR)) collect (pop EXPR)) T NIL T) (TERPRI) (TERPRI) else (pop STRINGS) (pop STRWIDTHS)) (if (EQ (CAR EXPR) (QUOTE previous)) then (* ; "Handle %"Previous date:%"") (PFI.PRINT.TO.TAB (pop STRINGS) (pop STRWIDTHS) TABSTOP) (SETQ EXPR (CDDR EXPR)) (PRINTOUT NIL (pop EXPR) " " (pop EXPR) T T) else (pop STRINGS) (pop STRWIDTHS)) (LET ((SPEC (fetch RESPEC of ENV))) (* ; "Show environment") (PFI.PRINT.TO.TAB (pop STRINGS) (pop STRWIDTHS) TABSTOP) (* ; "Read table") (PFI.PRINT.ENVIRONMENT SPEC :READTABLE) (PFI.PRINT.TO.TAB (pop STRINGS) (pop STRWIDTHS) TABSTOP) (* ; "Package") (PFI.PRINT.ENVIRONMENT SPEC :PACKAGE) (if (NEQ *PRINT-BASE* 10) then (PFI.PRINT.TO.TAB (pop STRINGS) (pop STRWIDTHS) TABSTOP) (PFI.PRINT.ENVIRONMENT SPEC :BASE))))) -) + [LAMBDA (EXPR ENV) (* ; "Edited 9-Jul-2021 07:59 by rmk:") + + (* ;; "Display the FILECREATED expression and environment prettily") + + (* ;; + "Form is (FILECREATED date filename filemaploc changes to: changes previous date: date filename)") + + (pop EXPR) + (CHANGEFONT ITALICFONT) + (LET* [(STRINGS '("File created:" "changes to:" "previous date:" "Read Table:" "Package:" "Base:" + "Format:")) + (FONT (DSPFONT)) + (STRWIDTHS (for STR in STRINGS collect (STRINGWIDTH STR FONT))) + (TABSTOP (+ (DSPLEFTMARGIN) + (APPLY (FUNCTION MAX) + STRWIDTHS] + (PFI.PRINT.TO.TAB (pop STRINGS) + (pop STRWIDTHS) + TABSTOP) (* ; "File created:") + (PRINTOUT NIL (pop EXPR) + " " .FONT LAMBDAFONT (pop EXPR) + T T) (* ; "date and file name") + (if (OR (NULL (CAR EXPR)) + (FIXP (CAR EXPR))) + then (* ; "Skip over filemaploc") + (pop EXPR)) + (if (EQ (CAR EXPR) + 'changes) + then (* ; "handle %"Changes to:%"") + (PFI.PRINT.TO.TAB (pop STRINGS) + (pop STRWIDTHS) + TABSTOP) + (SETQ EXPR (CDDR EXPR)) + (PRINTDEF (while (LISTP (CAR EXPR)) collect (pop EXPR)) + T NIL T) + (TERPRI) + (TERPRI) + else (pop STRINGS) + (pop STRWIDTHS)) + (if (EQ (CAR EXPR) + 'previous) + then (* ; "Handle %"Previous date:%"") + (PFI.PRINT.TO.TAB (pop STRINGS) + (pop STRWIDTHS) + TABSTOP) + (SETQ EXPR (CDDR EXPR)) + (PRINTOUT NIL (pop EXPR) + " " + (pop EXPR) + T T) + else (pop STRINGS) + (pop STRWIDTHS)) + + (* ;; "Show environment") + + (PFI.PRINT.TO.TAB (pop STRINGS) + (pop STRWIDTHS) + TABSTOP) (* ; "Read table") + (PFI.PRINT.ENVIRONMENT ENV :READTABLE) + (PFI.PRINT.TO.TAB (pop STRINGS) + (pop STRWIDTHS) + TABSTOP) (* ; "Package") + (PFI.PRINT.ENVIRONMENT ENV :PACKAGE) + (if (NEQ *PRINT-BASE* 10) + then (PFI.PRINT.TO.TAB (pop STRINGS) + (pop STRWIDTHS) + TABSTOP) + (PFI.PRINT.ENVIRONMENT ENV :BASE) + ELSE (pop STRINGS)) + (PFI.PRINT.TO.TAB (pop STRINGS) + (pop STRWIDTHS) + TABSTOP) (* ; "Format") + (PFI.PRINT.ENVIRONMENT ENV :FORMAT]) (PFI.PRINT.TO.TAB (LAMBDA (STR WIDTH TABSTOP) (* ; "Edited 29-Mar-88 12:44 by bvm") (* ;; "Print STR of specified WIDTH right-justified to xpos TABSTOP in italic font, leave a couple of spaces, then switch back to defaultfont.") (CHANGEFONT ITALICFONT) (DSPXPOSITION (- TABSTOP WIDTH)) (PRIN3 STR) (RELMOVETO (TIMES 12 (DSPSCALE)) 0) (CHANGEFONT DEFAULTFONT)) ) (PFI.PRINT.ENVIRONMENT -(LAMBDA (SPEC KEYWORD) (* ; "Edited 29-Mar-88 12:46 by bvm") (* ;; "Display the KEYWORD component of a reader environment spec") (LET ((VALUE (LISTGET SPEC KEYWORD))) (if (LISTP VALUE) then (* ; "An expression to create it--show pretty. Use IL package, since that's what they appear in at beginning of file") (LET ((*PACKAGE* *INTERLISP-PACKAGE*)) (PRINTDEF VALUE T T)) else (* ; "Just show the value, sans quotations, etc. The selectq is just in case this environment has no spec, something that shouldn't happen if it came from a define-file-info") (PRIN3 (OR VALUE (SELECTQ KEYWORD (:READTABLE (READTABLEPROP *READTABLE* (QUOTE NAME))) (:PACKAGE (CL:PACKAGE-NAME *PACKAGE*)) (SHOULDNT))))) (TERPRI) (TERPRI))) -) + [LAMBDA (ENV KEYWORD) (* ; "Edited 9-Jul-2021 08:03 by rmk:") + + (* ;; "Display the KEYWORD component of a reader environment spec") + + (LET [(VALUE (SELECTQ KEYWORD + (:READTABLE (READTABLEPROP (FETCH (READER-ENVIRONMENT REREADTABLE) + OF ENV) + 'NAME)) + (:PACKAGE (CL:PACKAGE-NAME (FETCH (READER-ENVIRONMENT REPACKAGE) + OF ENV))) + (:BASE (FETCH (READER-ENVIRONMENT REBASE) OF ENV)) + (:FORMAT (FETCH (READER-ENVIRONMENT REFORMAT) OF ENV)) + (SHOULDNT] + (if (LISTP VALUE) + then (* ; "An expression to create it--show pretty. Use IL package, since that's what they appear in at beginning of file") + (LET ((*PACKAGE* *INTERLISP-PACKAGE*)) + (PRINTDEF VALUE T T)) + else (* ; + "Just show the value, sans quotations, etc. ") + (PRIN3 VALUE)) + (TERPRI) + (TERPRI]) ) (DEFINEQ @@ -884,30 +981,30 @@ Copyright (c) 1988, 1992, 1993, 1999 by Xerox Corporation. All rights reserved. 'NILL) 'NON.PFI.PRINT.BITMAP NIL T) ) -(PUTPROPS PRETTYFILEINDEX COPYRIGHT ("Xerox Corporation" 1988 1992 1993 1999)) +(PUTPROPS PRETTYFILEINDEX COPYRIGHT ("Xerox Corporation" 1988 1992 1993 1999 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (10096 12331 (PFI.NEW.LISTFILES1 10106 . 10600) (PFI.ENQUEUE 10602 . 11226) ( -\PFI.DO.HARDCOPY 11228 . 11814) (MAYBE.PRETTYFILEINDEX 11816 . 12329)) (12332 34987 (PRETTYFILEINDEX -12342 . 26515) (PFI.MAKE.LPT.STREAM 26517 . 29568) (PFI.SETUP.TRANSLATIONS 29570 . 31084) ( -PFI.OUTCHARFN 31086 . 33060) (PFI.COLLECT.DEFINERS 33062 . 33874) (PFI.AFTER.NEW.PAGE 33876 . 34985)) -(34988 37844 (PFI.PRINT.FILECREATED 34998 . 36730) (PFI.PRINT.TO.TAB 36732 . 37097) ( -PFI.PRINT.ENVIRONMENT 37099 . 37842)) (37845 45029 (PFI.PROCESS.FILE 37855 . 39085) (PFI.PASS.COMMENT -39087 . 40057) (PFI.HANDLE.EXPR 40059 . 40726) (PFI.DEFAULT.HANDLER 40728 . 42781) (PFI.PRETTYPRINT -42783 . 43118) (PFI.LINES.REMAINING 43120 . 43447) (PFI.MAYBE.NEW.PAGE 43449 . 43952) ( -PFI.ESTIMATE.SIZE 43954 . 44485) (PFI.ESTIMATE.SIZE1 44487 . 45027)) (45066 54553 (PFI.HANDLE.RPAQQ -45076 . 46484) (PFI.HANDLE.DECLARE 46486 . 47425) (PFI.HANDLE.EVAL-WHEN 47427 . 47910) ( -PFI.HANDLE.DEFDEFINER 47912 . 49202) (PFI.HANDLE.DEFINEQ 49204 . 49448) (PFI.PRINT.LAMBDA 49450 . -49788) (PFI.PRINT.LAMBDA.BODY 49790 . 50125) (PFI.HANDLE.PUTDEF 50127 . 50624) (PFI.HANDLE.PUTPROPS -50626 . 51241) (PFI.HANDLE./DECLAREDATATYPE 51243 . 51790) (PFI.HANDLE.* 51792 . 53054) ( -PFI.PRINT.COMMENTS 53056 . 53956) (PFI.HANDLE.FILEMAP 53958 . 54246) (PFI.HANDLE.PACKAGE 54248 . 54551 -)) (54581 55573 (PFI.PREVIEW.DECLARE 54591 . 55253) (PFI.PREVIEW.DEFINEQ 55255 . 55571)) (55609 66597 -(PFI.PRINT.INDEX 55619 . 56470) (PFI.CONDENSE.INDEX 56472 . 58279) (PFI.SORT.INDICES 58281 . 59420) ( -PFI.COMPUTE.INDEX.SHAPE 59422 . 60886) (PFI.PRINT.INDICES 60888 . 65430) (PFI.CENTER.PRINT 65432 . -66002) (PFI.INDEX.BREAK 66004 . 66462) (PFI.LOOKUP.NAME 66464 . 66595)) (66598 67829 (PFI.ADD.TO.INDEX - 66608 . 67118) (PFI.VARNAME 67120 . 67530) (PFI.CONSTANTNAMES 67532 . 67827)) (67864 76177 ( -MULTIFILEINDEX 67874 . 68670) (MULTIFILEINDEX1 68672 . 70128) (PFI.PRINT.MULTI.INDEX 70130 . 75233) ( -PFI.CHOOSE.BEST 75235 . 75462) (PFI.MERGE.INDICES 75464 . 76175)) (76234 77852 (PFI.MAYBE.SEE.PRETTY -76244 . 77174) (PFI.MAYBE.PP.DEFINITION 77176 . 77850)) (77922 81757 (PFI.PRINT.BITMAP 77932 . 81755)) - (84602 87716 (PUTPROPS.PRETTYPRINT 84612 . 86023) (RPAQX.PRETTYPRINT 86025 . 86750) ( -COURIERPROGRAM.PRETTYPRINT 86752 . 87452) (MAYBE.PRETTYPRINT.BOLD 87454 . 87714))))) + (FILEMAP (NIL (10148 12383 (PFI.NEW.LISTFILES1 10158 . 10652) (PFI.ENQUEUE 10654 . 11278) ( +\PFI.DO.HARDCOPY 11280 . 11866) (MAYBE.PRETTYFILEINDEX 11868 . 12381)) (12384 35298 (PRETTYFILEINDEX +12394 . 26826) (PFI.MAKE.LPT.STREAM 26828 . 29879) (PFI.SETUP.TRANSLATIONS 29881 . 31395) ( +PFI.OUTCHARFN 31397 . 33371) (PFI.COLLECT.DEFINERS 33373 . 34185) (PFI.AFTER.NEW.PAGE 34187 . 35296)) +(35299 40558 (PFI.PRINT.FILECREATED 35309 . 38825) (PFI.PRINT.TO.TAB 38827 . 39192) ( +PFI.PRINT.ENVIRONMENT 39194 . 40556)) (40559 47743 (PFI.PROCESS.FILE 40569 . 41799) (PFI.PASS.COMMENT +41801 . 42771) (PFI.HANDLE.EXPR 42773 . 43440) (PFI.DEFAULT.HANDLER 43442 . 45495) (PFI.PRETTYPRINT +45497 . 45832) (PFI.LINES.REMAINING 45834 . 46161) (PFI.MAYBE.NEW.PAGE 46163 . 46666) ( +PFI.ESTIMATE.SIZE 46668 . 47199) (PFI.ESTIMATE.SIZE1 47201 . 47741)) (47780 57267 (PFI.HANDLE.RPAQQ +47790 . 49198) (PFI.HANDLE.DECLARE 49200 . 50139) (PFI.HANDLE.EVAL-WHEN 50141 . 50624) ( +PFI.HANDLE.DEFDEFINER 50626 . 51916) (PFI.HANDLE.DEFINEQ 51918 . 52162) (PFI.PRINT.LAMBDA 52164 . +52502) (PFI.PRINT.LAMBDA.BODY 52504 . 52839) (PFI.HANDLE.PUTDEF 52841 . 53338) (PFI.HANDLE.PUTPROPS +53340 . 53955) (PFI.HANDLE./DECLAREDATATYPE 53957 . 54504) (PFI.HANDLE.* 54506 . 55768) ( +PFI.PRINT.COMMENTS 55770 . 56670) (PFI.HANDLE.FILEMAP 56672 . 56960) (PFI.HANDLE.PACKAGE 56962 . 57265 +)) (57295 58287 (PFI.PREVIEW.DECLARE 57305 . 57967) (PFI.PREVIEW.DEFINEQ 57969 . 58285)) (58323 69311 +(PFI.PRINT.INDEX 58333 . 59184) (PFI.CONDENSE.INDEX 59186 . 60993) (PFI.SORT.INDICES 60995 . 62134) ( +PFI.COMPUTE.INDEX.SHAPE 62136 . 63600) (PFI.PRINT.INDICES 63602 . 68144) (PFI.CENTER.PRINT 68146 . +68716) (PFI.INDEX.BREAK 68718 . 69176) (PFI.LOOKUP.NAME 69178 . 69309)) (69312 70543 (PFI.ADD.TO.INDEX + 69322 . 69832) (PFI.VARNAME 69834 . 70244) (PFI.CONSTANTNAMES 70246 . 70541)) (70578 78891 ( +MULTIFILEINDEX 70588 . 71384) (MULTIFILEINDEX1 71386 . 72842) (PFI.PRINT.MULTI.INDEX 72844 . 77947) ( +PFI.CHOOSE.BEST 77949 . 78176) (PFI.MERGE.INDICES 78178 . 78889)) (78948 80566 (PFI.MAYBE.SEE.PRETTY +78958 . 79888) (PFI.MAYBE.PP.DEFINITION 79890 . 80564)) (80636 84471 (PFI.PRINT.BITMAP 80646 . 84469)) + (87316 90430 (PUTPROPS.PRETTYPRINT 87326 . 88737) (RPAQX.PRETTYPRINT 88739 . 89464) ( +COURIERPROGRAM.PRETTYPRINT 89466 . 90166) (MAYBE.PRETTYPRINT.BOLD 90168 . 90428))))) STOP diff --git a/lispusers/PRETTYFILEINDEX.LCOM b/lispusers/PRETTYFILEINDEX.LCOM index 87f561c95..e9d467363 100644 Binary files a/lispusers/PRETTYFILEINDEX.LCOM and b/lispusers/PRETTYFILEINDEX.LCOM differ diff --git a/lispusers/READINTERPRESS b/lispusers/READINTERPRESS index 5121792df..e64e99640 100644 --- a/lispusers/READINTERPRESS +++ b/lispusers/READINTERPRESS @@ -1,19 +1,30 @@ (DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED "25-Mar-88 17:54:27" {ERINYES}MEDLEY>READINTERPRESS.;2 8705 +(FILECREATED "22-Jun-2021 10:52:34"  +{DSK}kaplan>Local>medley3.5>git-medley>lispusers>READINTERPRESS.;4 10412 - changes to%: (FNS READINT.IP) + changes to%: (FNS PRINTSEQUENCE) - previous date%: "15-Jul-86 21:58:05" {PHYLUM}LYRIC>READINTERPRESS.;1) + previous date%: "22-Jun-2021 10:35:30" +{DSK}kaplan>Local>medley3.5>git-medley>lispusers>READINTERPRESS.;3) -(* " -Copyright (c) 1983, 1984, 1985, 1986, 1988 by Xerox Corporation. All rights reserved. +(* ; " +Copyright (c) 1983-1986, 1988, 2021 by Xerox Corporation. ") (PRETTYCOMPRINT READINTERPRESSCOMS) -(RPAQQ READINTERPRESSCOMS ((* "Utilities for reading Interpress files") (FNS PRINTMASTER) (FNS OPCODE TOKEN FINDNONPRIMNAME FINDOPNAME SHORTINT TOKENFORMAT FINDSEQUENCETYPE PRINTTOKEN PRINTSEQUENCE SEARCHIPLIST READINT.IP SHOWFILE SHOWBYTE) (MACROS BIN.RIP) (DECLARE%: EVAL@COMPILE DONTCOPY (FILES (LOADCOMP) INTERPRESS)) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) (LAMA SHORTINT TOKEN)))) -) +(RPAQQ READINTERPRESSCOMS + [(* "Utilities for reading Interpress files") + (FNS PRINTMASTER) + (FNS OPCODE TOKEN FINDNONPRIMNAME FINDOPNAME SHORTINT TOKENFORMAT FINDSEQUENCETYPE PRINTTOKEN + PRINTSEQUENCE SEARCHIPLIST READINT.IP SHOWFILE SHOWBYTE) + (MACROS BIN.RIP) + (DECLARE%: EVAL@COMPILE DONTCOPY (FILES (LOADCOMP) + INTERPRESS)) + (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) + (NLAML) + (LAMA SHORTINT TOKEN]) @@ -59,8 +70,48 @@ Copyright (c) 1983, 1984, 1985, 1986, 1988 by Xerox Corporation. All rights res ) (PRINTSEQUENCE -(LAMBDA (ISTREAM OUTSTREAM TYPE LENGTH) (* hdj "15-Jul-86 21:43") (SELECTQ TYPE (SEQIDENTIFIER (printout OUTSTREAM 20 "ID: ") (CHARSET ISTREAM 0) (bind (CHARSET _ 0) until (EQ LENGTH 0) do (PRINTCCODE (\NSIN ISTREAM CHARSET CHARSET LENGTH) OUTSTREAM))) (SEQINTEGER (printout OUTSTREAM 20) (for I from 1 to LENGTH do (PRINTTOKEN ISTREAM OUTSTREAM))) (SEQRATIONAL (PROG ((NUM (READINT.IP ISTREAM (LRSH LENGTH 1))) (DENOM (READINT.IP ISTREAM (LRSH LENGTH 1)))) (printout OUTSTREAM 20 NUM "/" DENOM " = " (FQUOTIENT NUM DENOM)))) (SEQSTRING (printout OUTSTREAM 20 "STR[" LENGTH "] = %"") (CHARSET ISTREAM 0) (bind (CHARSET _ 0) until (EQ LENGTH 0) do (PRINTCCODE (\NSIN ISTREAM CHARSET CHARSET LENGTH) OUTSTREAM)) (printout OUTSTREAM (QUOTE %"))) (SEQCOMMENT (for I from 1 to LENGTH first (printout OUTSTREAM 20 "Comment vector of " LENGTH " bytes" 22) do (printout OUTSTREAM |.I4| (BIN ISTREAM)))) (SEQPACKEDPIXELVECTOR (bind YBYTES (I _ 5) (XBITS _ (READINT.IP ISTREAM 2)) (YBITS _ (READINT.IP ISTREAM 2)) first (printout OUTSTREAM 20 "Packed pixel" " vector of " LENGTH " bytes [" XBITS "X" YBITS "]") (SETQ YBYTES (UNFOLD (FOLDHI YBITS BITSPERWORD) BYTESPERWORD)) (* "The number of bytes on a line is always even--gets to a word boundary") while (ILEQ I LENGTH) do (printout OUTSTREAM T 10) (for J from 1 to YBYTES do (printout OUTSTREAM |.I8.-2.T| (BIN ISTREAM)) (add I 1)))) (SEQLARGEVECTOR (for I VAL (BYTESPERELT _ (BIN ISTREAM)) from 2 to LENGTH first (printout OUTSTREAM 20 "Large vector of " BYTESPERELT " bytes per element") do (SETQ VAL (READINT.IP ISTREAM BYTESPERELT)) (printout OUTSTREAM 22 |.I5| I ": " VAL))) (SEQCONTINUED (HELP "Can't handle SEQCONTINUED yet")) (SEQINSERTFILE (HELP "Can't handle SEQINSERTFILE yet")) (SEQCOMPRESSPIXELVECTOR (HELP "Can't handle SEQCOMPRESSPIXELVECTOR yet")) (SHOULDNT)) (TERPRI OUTSTREAM)) -) + [LAMBDA (ISTREAM OUTSTREAM TYPE LENGTH) (* ; "Edited 22-Jun-2021 10:52 by rmk:") + (DECLARE (SPECVARS LENGTH)) (* ; "For byte counting") + (SELECTQ TYPE + (SEQIDENTIFIER (printout OUTSTREAM 20 "ID: ") + (until (EQ LENGTH 0) do (PRINTCCODE (\INCCODE ISTREAM 'LENGTH LENGTH) + OUTSTREAM))) + (SEQINTEGER (printout OUTSTREAM 20) + (for I from 1 to LENGTH do (PRINTTOKEN ISTREAM OUTSTREAM))) + (SEQRATIONAL (PROG [(NUM (READINT.IP ISTREAM (LRSH LENGTH 1))) + (DENOM (READINT.IP ISTREAM (LRSH LENGTH 1] + (printout OUTSTREAM 20 NUM "/" DENOM " = " (FQUOTIENT NUM DENOM)))) + (SEQSTRING (printout OUTSTREAM 20 "STR[" LENGTH "] = %"") + (until (EQ LENGTH 0) do (PRINTCCODE (\INCCODE ISTREAM 'LENGTH LENGTH) + OUTSTREAM)) + (printout OUTSTREAM '%")) + (SEQCOMMENT (for I from 1 to LENGTH + first (printout OUTSTREAM 20 "Comment vector of " LENGTH " bytes" 22) + do (printout OUTSTREAM .I4 (BIN ISTREAM)))) + (SEQPACKEDPIXELVECTOR + (bind YBYTES (I _ 5) + (XBITS _ (READINT.IP ISTREAM 2)) + (YBITS _ (READINT.IP ISTREAM 2)) + first (printout OUTSTREAM 20 "Packed pixel" " vector of " LENGTH " bytes [" XBITS + "X" YBITS "]") + (SETQ YBYTES (UNFOLD (FOLDHI YBITS BITSPERWORD) + BYTESPERWORD)) (* + "The number of bytes on a line is always even--gets to a word boundary") + while (ILEQ I LENGTH) do (printout OUTSTREAM T 10) + (for J from 1 to YBYTES + do (printout OUTSTREAM .I8.-2.T (BIN ISTREAM)) + (add I 1)))) + (SEQLARGEVECTOR + (for I VAL (BYTESPERELT _ (BIN ISTREAM)) from 2 to LENGTH + first (printout OUTSTREAM 20 "Large vector of " BYTESPERELT " bytes per element") + do (SETQ VAL (READINT.IP ISTREAM BYTESPERELT)) + (printout OUTSTREAM 22 .I5 I ": " VAL))) + (SEQCONTINUED (HELP "Can't handle SEQCONTINUED yet")) + (SEQINSERTFILE (HELP "Can't handle SEQINSERTFILE yet")) + (SEQCOMPRESSPIXELVECTOR + (HELP "Can't handle SEQCOMPRESSPIXELVECTOR yet")) + (SHOULDNT)) + (TERPRI OUTSTREAM]) (SEARCHIPLIST (LAMBDA (CODE IPLIST) (* rmk%: "15-Mar-84 09:15") (for X in IPLIST when (EQ CODE (CADR X)) do (RETURN (CAR X)))) @@ -79,10 +130,21 @@ Copyright (c) 1983, 1984, 1985, 1986, 1988 by Xerox Corporation. All rights res ) ) (DECLARE%: EVAL@COMPILE -(PUTPROPS BIN.RIP MACRO (ARGS (LET ((ISTREAM (CAR ARGS)) (OSTREAM (CADR ARGS))) (BQUOTE (LET ((C (BIN (\, ISTREAM)))) (COND ((IGREATERP (POSITION (\, OSTREAM)) 15) (printout (\, OSTREAM) 5 "|" 8))) (printout (\, OSTREAM) |.I3| C " ") C))))) + +(PUTPROPS BIN.RIP MACRO [ARGS (LET ((ISTREAM (CAR ARGS)) + (OSTREAM (CADR ARGS))) + `(LET [(C (BIN ,ISTREAM] + (COND + ((IGREATERP (POSITION ,OSTREAM) + 15) + (printout ,OSTREAM 5 "|" 8))) + (printout ,OSTREAM .I3 C " ") + C]) ) (DECLARE%: EVAL@COMPILE DONTCOPY -(FILESLOAD (LOADCOMP) INTERPRESS) + +(FILESLOAD (LOADCOMP) + INTERPRESS) ) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS @@ -92,10 +154,10 @@ Copyright (c) 1983, 1984, 1985, 1986, 1988 by Xerox Corporation. All rights res (ADDTOVAR LAMA SHORTINT TOKEN) ) -(PUTPROPS READINTERPRESS COPYRIGHT ("Xerox Corporation" 1983 1984 1985 1986 1988)) +(PUTPROPS READINTERPRESS COPYRIGHT ("Xerox Corporation" 1983 1984 1985 1986 1988 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (910 1596 (PRINTMASTER 920 . 1594)) (1597 8114 (OPCODE 1607 . 1732) (TOKEN 1734 . 2306) -(FINDNONPRIMNAME 2308 . 2413) (FINDOPNAME 2415 . 2672) (SHORTINT 2674 . 2867) (TOKENFORMAT 2869 . 3111 -) (FINDSEQUENCETYPE 3113 . 3317) (PRINTTOKEN 3319 . 4270) (PRINTSEQUENCE 4272 . 6133) (SEARCHIPLIST -6135 . 6267) (READINT.IP 6269 . 6508) (SHOWFILE 6510 . 7834) (SHOWBYTE 7836 . 8112))))) + (FILEMAP (NIL (1210 1896 (PRINTMASTER 1220 . 1894)) (1897 9430 (OPCODE 1907 . 2032) (TOKEN 2034 . 2606 +) (FINDNONPRIMNAME 2608 . 2713) (FINDOPNAME 2715 . 2972) (SHORTINT 2974 . 3167) (TOKENFORMAT 3169 . +3411) (FINDSEQUENCETYPE 3413 . 3617) (PRINTTOKEN 3619 . 4570) (PRINTSEQUENCE 4572 . 7449) ( +SEARCHIPLIST 7451 . 7583) (READINT.IP 7585 . 7824) (SHOWFILE 7826 . 9150) (SHOWBYTE 9152 . 9428))))) STOP diff --git a/lispusers/READINTERPRESS.LCOM b/lispusers/READINTERPRESS.LCOM new file mode 100644 index 000000000..c9323e9b6 Binary files /dev/null and b/lispusers/READINTERPRESS.LCOM differ diff --git a/lispusers/SEDIT-COMMONLISP b/lispusers/SEDIT-COMMONLISP deleted file mode 100644 index 16a8ef722..000000000 --- a/lispusers/SEDIT-COMMONLISP +++ /dev/null @@ -1,365 +0,0 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE (LET ((*PACKAGE* *PACKAGE*)) (CLIN-PACKAGE -"INTERLISP") (FILESLOAD TEXTMODULES) *PACKAGE*) BASE 10) -(FILECREATED " 2-Oct-87 18:07:39" {DSK}WORK>SEDIT-COMMONLISP.;29 63962 - - changes to%: (FNS \\unread.read.time.conditional? \\subnode.changed.read.time.conditional \\delete.read.time.conditional \\replace.read.time.conditional \\set.point.read.time.conditional \\initialize.commonlisp \\insert.read.time.conditional \\parse..conditional.read \\cfv.read.time.conditional \\linearize.read.time.conditional \\compute.point.position.read.time.conditional \\undo.replace.read.time.conditional \\backspace.read.time.conditional \\stringify.read.time.conditional \\copy.structure.read.time.conditional \\set.selection.read.time.conditional \\stringify.comment SUPERPRINT/COMMENT \\linearize.comment \\cfv.form \\parse..hash.bar.comment) - (VARS SEDIT-COMMONLISPCOMS) (PROPS (SEDIT-COMMONLISP MAKEFILE-ENVIRONMENT)) (PRESENTATIONS TM::HASH-R) - - previous date%: "29-Sep-87 14:05:07" {DSK}WORK>SEDIT-COMMONLISP.;17) - - -(* " -Copyright (c) 1987 by Xerox Corporation. All rights reserved. -") - -(PRETTYCOMPRINT SEDIT-COMMONLISPCOMS) - -(RPAQQ SEDIT-COMMONLISPCOMS ((* ;;; " This file contains patches to the following files: SEDIT-COMMENTS (adds 4 semicolon and balanced comments), SEDIT-LISTS (form CFV and linearize of the new comment types), DSPRINTDEF and NEWPRINTDEF (new comment type printing).") (LOCALVARS . T) (DECLARE%: DONTCOPY DOEVAL@COMPILE (FILES SEDIT-DECLS)) (CONSTANTS (\\level4.comment (QUOTE ;;;;)) (\\level5.comment (QUOTE %|)) (\\level5.comment.close.string (\\create.string.item "|#" (fetch (EditENV CommentFont) of \\lisp.edit.environment))) (\\comment.markers (LIST \\level1.comment \\level2.comment \\level3.comment \\level4.comment \\level5.comment)) (\\comment.level.table (LIST \\level1.comment 1 \\level2.comment 2 \\level3.comment 3 \\level4.comment 4 \\level5.comment 5))) (GLOBALVARS \\type.new.quote \\type.read.time.conditional) (* ;;; "You must also have EXPORTS.ALL loaded to compile this file, but it shouldn't be neccessary to set DFNFLG to PROP.") (MACROS \\select.comment.indent) (FNS PRIN2-LONG-STRING SEMI-COLON-COMMENT-P SUPERPRINT/COMMENT \\backspace.read.time.conditional \\cfv.clisp \\cfv.comment \\cfv.form \\cfv.lambda \\cfv.read.time.conditional \\compute.point.position.read.time.conditional \\copy.structure.new.quote \\copy.structure.read.time.conditional \\create.new.quoted.gap \\degrade.comment \\delete.read.time.conditional \\initialize.commonlisp \\input.bit.vector \\input.conditional.read \\input.new.quote \\insert.new.quoted.gap \\insert.read.time.conditional \\linearize.clisp \\linearize.comment \\linearize.form \\linearize.lambda \\linearize.list \\linearize.read.time.conditional \\parse..bit.vector \\parse..comment \\parse..conditional.read \\parse..new.quote \\replace.new.quote \\replace.read.time.conditional \\set.point.read.time.conditional \\set.selection.read.time.conditional \\split.comment \\stringify.comment \\stringify.new.quote \\stringify.read.time.conditional \\subnode.changed.new.quote \\subnode.changed.read.time.conditional \\undo.replace.read.time.conditional \\unread.read.time.conditional? \\upgrade.comment) (P (\\initialize.commonlisp)) (PROP MAKEFILE-ENVIRONMENT SEDIT-COMMONLISP)) -) - - - -(* ;;; -" This file contains patches to the following files: SEDIT-COMMENTS (adds 4 semicolon and balanced comments), SEDIT-LISTS (form CFV and linearize of the new comment types), DSPRINTDEF and NEWPRINTDEF (new comment type printing)." -) - -(DECLARE%: DOEVAL@COMPILE DONTCOPY - -(LOCALVARS . T) -) -(DECLARE%: DONTCOPY DOEVAL@COMPILE -(FILESLOAD SEDIT-DECLS) -) -(DECLARE%: EVAL@COMPILE - -(RPAQQ \\level4.comment ;;;;) - -(RPAQQ \\level5.comment %|) - -(RPAQ \\level5.comment.close.string (\\create.string.item "|#" (fetch (EditENV CommentFont) of \\lisp.edit.environment)) -) - -(RPAQ \\comment.markers (LIST \\level1.comment \\level2.comment \\level3.comment \\level4.comment \\level5.comment) -) - -(RPAQ \\comment.level.table (LIST \\level1.comment 1 \\level2.comment 2 \\level3.comment 3 \\level4.comment 4 \\level5.comment 5) -) - -(CONSTANTS (\\level4.comment (QUOTE ;;;;)) (\\level5.comment (QUOTE %|)) (\\level5.comment.close.string (\\create.string.item "|#" (fetch (EditENV CommentFont) of \\lisp.edit.environment))) (\\comment.markers (LIST \\level1.comment \\level2.comment \\level3.comment \\level4.comment \\level5.comment)) (\\comment.level.table (LIST \\level1.comment 1 \\level2.comment 2 \\level3.comment 3 \\level4.comment 4 \\level5.comment 5))) -) -(DECLARE%: DOEVAL@COMPILE DONTCOPY - -(GLOBALVARS \\type.new.quote \\type.read.time.conditional) -) - - - -(* ;;; -"You must also have EXPORTS.ALL loaded to compile this file, but it shouldn't be neccessary to set DFNFLG to PROP." -) - -(DECLARE%: EVAL@COMPILE -(PUTPROPS \\select.comment.indent MACRO ((key level1.indent level2.indent level3.indent) (SELECTQ key (1 level1.indent) (2 level2.indent) ((3 4 5) level3.indent) (SHOULDNT "unexpected comment level")))) -) -(DEFINEQ - -(PRIN2-LONG-STRING -(LAMBDA (STRING STREAM P2FLG TAIL LMARG RMARG COMMENTP USE-SEMI-COLONS) (* ; "Edited 20-Sep-87 19:20 by raf") (PROG ((ESC (fetch (READTABLEP ESCAPECHAR) of *READTABLE*)) (SA (fetch (READTABLEP READSA) of *READTABLE*)) (HERE (DSPXPOSITION NIL STREAM)) (FONT (DSPFONT NIL STREAM)) ESCWIDTH SPACEWIDTH CLOSEWIDTH SEMIWIDTH LASTSPACE I C NEXTC POS J MAPX1 MAPY1 SINGLELEFT SEMISTRING) (COND ((NOT (type? FONTDESCRIPTOR FONT)) (* ; "Ugh, happens for files") (SETQ FONT STREAM))) (SETQ ESCWIDTH (CHARWIDTH ESC FONT)) (SETQ SPACEWIDTH (CHARWIDTH (CHARCODE SPACE) FONT)) (SETQ CLOSEWIDTH (COND (P2FLG (STRINGWIDTH "%")" FONT)) (T 0))) (SELECTQ USE-SEMI-COLONS ((1 2 3 4) (* ; "Semicolon comment") (SETQ SEMIWIDTH (+ SPACEWIDTH (TIMES USE-SEMI-COLONS (CHARWIDTH (CHARCODE ";") FONT)))) (SETQ SEMISTRING (CONCAT (ALLOCSTRING USE-SEMI-COLONS (CHARCODE ";")) " "))) (5 (* ; "Balanced (hash bar) comment") (SETQ SEMIWIDTH 0) (SETQ SEMISTRING "")) NIL) (COND ((for C instring STRING as I from 1 bind (POS _ (+ HERE (COND (P2FLG (CHARWIDTH (CHARCODE %") FONT)) ((LEQ USE-SEMI-COLONS 4) SEMIWIDTH) ((EQ USE-SEMI-COLONS 5) (STRINGWIDTH "#||#" FONT)) (T 0)) CLOSEWIDTH)) do (COND ((EQ C (CHARCODE CR)) (* ; "Always want to print these strings specially") (SETQ LASTSPACE I) (RETURN NIL)) ((AND P2FLG (OR (EQ C (CHARCODE %")) (EQ C ESC))) (* ; "Need escape") (add POS ESCWIDTH))) (COND ((GREATERP (add POS (CHARWIDTH C FONT)) RMARG) (RETURN NIL))) (COND ((EQ C (CHARCODE SPACE)) (SETQ LASTSPACE I))) finally (RETURN T)) (* ; "It all fits on this line") (RETURN (COND (P2FLG (PRIN2S STRING TAIL STREAM)) (T (if (LEQ USE-SEMI-COLONS 4) then (PRIN1 SEMISTRING STREAM) elseif (EQ USE-SEMI-COLONS 5) then (PRIN1 "#|" STREAM)) (PRIN1S STRING TAIL STREAM) (if (EQ USE-SEMI-COLONS 5) then (PRIN1 "|#" STREAM))))))) (COND ((OR (NULL LASTSPACE) (AND (NULL COMMENTP) (NEQ HERE LMARG))) (* ;; "Can't print anything on this line before the end. Comments are allowed to have different first and subsequent margin.") (PRINENDLINE LMARG STREAM) (SETQ HERE LMARG) (SETQ LASTSPACE 0))) (COND (MAKEMAP (* ; "Note start") (SETQ MAPX1 HERE) (SETQ MAPY1 (DSPYPOSITION NIL STREAM)) (SETQ SINGLELEFT (EQ HERE LMARG)))) (COND (P2FLG (COND ((NOT (IMAGESTREAMP STREAM)) (* ; "Need to be able to read it back") (LET ((HASH (fetch (READTABLEP HASHMACROCHAR) of *READTABLE*))) (\OUTCHAR STREAM HASH) (add HERE (CHARWIDTH HASH FONT))))) (\OUTCHAR STREAM (CHARCODE %")) (add HERE (CHARWIDTH (CHARCODE %") FONT))) ((LEQ USE-SEMI-COLONS 4) (PRIN1 SEMISTRING STREAM) (add HERE SEMIWIDTH)) ((EQ USE-SEMI-COLONS 5) (PRIN1 "#|" STREAM) (add HERE (STRINGWIDTH "#|" FONT)))) (* ;;; "Now loop, printing as much as we can while there's room") (SETQ I 0) LP (COND ((NULL (SETQ C (NTHCHARCODE STRING (add I 1)))) (* ; "Done") (GO DONE)) ((NOT (LESSP I LASTSPACE)) (* ;; "Must find the next safe place to print up to. LASTSPACE is either a space or CR position, or is 0, which is our state when printing from the left margin until we encounter a space.") (SETQ POS HERE) (SETQ J I) (* ; "Ordinarily, J is pointing at a space or CR except when we have just printed an endline") (SELCHARQ C (SPACE (* ; "Would like all spaces before the eol, where they're invisible, not after") (SELCHARQ (NTHCHARCODE STRING (ADD1 J)) ((SPACE CR NIL) (SETQ LASTSPACE (ADD1 J)) (* ; "Go ahead and print this space, and note that it is now okay to break the line") (COND ((AND (IGEQ (+ HERE SPACEWIDTH) RMARG) (IMAGESTREAMP STREAM)) (* ; "Extra spaces have no effect, so don't print them at all, lest the dsprightmargin bite") (GO LP)) (T (GO PRINTIT)))) NIL) (add POS SPACEWIDTH)) (CR (* ; "If two cr's in a row, print them all; if only one, must escape it") (COND ((EQ (SETQ C (NTHCHARCODE STRING (add I 1))) (CHARCODE CR)) (PRINENDLINE LMARG STREAM) (while (EQ (SETQ C (NTHCHARCODE STRING (add I 1))) (CHARCODE CR)) do (PRINENDLINE LMARG STREAM))) (T (\OUTCHAR STREAM ESC))) (SETQ LASTSPACE 0) (GO ENDLINE)) (PROGN (* ;; "Gets set this way at left edge. Must print something on this line, even if there are no spaces before the right edge") (GO CHECKESCAPE))) (SETQ LASTSPACE 0) (while (LESSP POS RMARG) do (SELCHARQ (SETQ NEXTC (NTHCHARCODE STRING (add J 1))) ((CR SPACE) (* ; "Can safely go this far") (SETQ LASTSPACE J) (RETURN)) (NIL (* ; "End of string -- ok if there is space for closing quote and paren as well") (COND ((LESSP (PLUS POS CLOSEWIDTH) RMARG) (SETQ LASTSPACE J) (RETURN)) (T (GO $$OUT)))) NIL) (COND ((OR (EQ NEXTC (CHARCODE %")) (EQ NEXTC ESC)) (add POS ESCWIDTH))) (add POS (CHARWIDTH NEXTC FONT)) finally (COND ((EQ LASTSPACE 0) (* ; "Need break") (COND ((EQ C (CHARCODE SPACE)) (* ; "Will turn this space into CR") (SETQ C (NTHCHARCODE STRING (add I 1)))) (T (SHOULDNT))) (GO ENDLINE)))))) CHECKESCAPE (COND ((AND P2FLG (OR (EQ C (CHARCODE %")) (EQ C ESC))) (\OUTCHAR STREAM ESC) (add HERE ESCWIDTH))) PRINTIT (\OUTCHAR STREAM C) (add HERE (CHARWIDTH C FONT)) (GO LP) ENDLINE (PRINENDLINE LMARG STREAM) (SETQ HERE LMARG) (COND ((NULL C) (* ; "Done") (GO DONE)) ((AND P2FLG (EQ (\SYNCODE SA C) SEPRCHAR.RC)) (* ; "Have to quote sepr immediately following CR") (\OUTCHAR STREAM ESC) (add HERE ESCWIDTH) (GO PRINTIT)) (T (COND (USE-SEMI-COLONS (PRIN1 SEMISTRING STREAM) (add HERE SEMIWIDTH))) (GO CHECKESCAPE))) DONE (COND (P2FLG (\OUTCHAR STREAM (CHARCODE %")))) (COND (MAKEMAP (LET ((ENTRY (MAKEMAPENTRY TAIL (AND (NEQ MAKEMAP T) MAKEMAP) MAPX1 MAPY1 (DSPXPOSITION NIL STREAM) (DSPYPOSITION NIL STREAM) (\DEDITFONT# STREAM)))) (replace LONGSTRINGP of ENTRY with T) (COND (SINGLELEFT (replace LONGSTRING1MARGINP of ENTRY with T))) (COND ((EQ (- (DSPRIGHTMARGIN NIL STREAM) LMARG) RMARG) (* ;; "Assume that RMARG not equal to stream's right margin only happens for centered comments. In reality, it happens as well inside REPP, where RESETCLIP hides the true right margin.") (replace LONGSTRINGSYMMETRICP of ENTRY with T))))) ((EQ USE-SEMI-COLONS 5) (PRIN1 "|#" STREAM))) (RETURN))) -) - -(SEMI-COLON-COMMENT-P -(LAMBDA (E) (* ; "Edited 20-Sep-87 18:30 by raf") (* ;; "If E is a comment, returns a number giving number of semis (or type).") (SELECTQ (CADR E) (; (* ; "SEdit-style right-margin comment") 1) (;; (* ; "SEdit-style current-indent comment") 2) (;;; (* ; "SEdit-style flush left comment") 3) (;;;; (* ; "Page boundary type comment") 4) (%| (* ; "Balanced (hash vertical bar) comment") 5) NIL)) -) - -(SUPERPRINT/COMMENT -(LAMBDA (L FILE) (* ; "Edited 21-Sep-87 12:35 by raf") (COND ((AND **COMMENT**FLG (NOT FILEFLG) (NOT MAKEMAP)) (* ; "If:") (* ; "There's a shorthand for comments, and") (* ; "We're not printing to a file, and") (* ; "Ww're not making the file map, then") (* ;; "Print out the shorthand version of the comment, watching out for overflowing the current line.") (COND ((> (+ (DSPXPOSITION NIL FILE) (STRINGWIDTH **COMMENT**FLG FILE)) (DSPRIGHTMARGIN NIL FILE)) (PRINENDLINE 0 FILE))) (PRIN1S **COMMENT**FLG NIL FILE)) (T (PROG (COMMENT-LMARGIN COMMENT-RMARGIN RIGHTFLG FLUSH-LEFTP SEMIP BODY) (COND ((SETQ RIGHTFLG (NOT (OR (SUPERPRINTEQ (CADR L) COMMENTFLG) (COND ((SETQ SEMIP (SEMI-COLON-COMMENT-P L)) (* ; "Only 1-semi comments go in right margin") (NEQ SEMIP 1)) (T (* ; "use size heuristic") (> (LENGTH L) 10)))))) (* ; "Print comment in the righthand margin") (SETQ COMMENT-LMARGIN (OR COMMENTCOL (SUPERPRINT/COMMENT1 L RMARGIN FILE))) (SETQ COMMENT-RMARGIN RMARGIN)) ((AND (GEQ SEMIP 3) (NOT MAKEMAP)) (* ; "Comment should be printed flush left. Don't do this with DEdit lest we confuse it") (SETQ COMMENT-LMARGIN 0) (SETQ COMMENT-RMARGIN RMARGIN)) (T (* ; "Print comment centered and wide") (SETQ COMMENT-LMARGIN (FIXR (TIMES 0.1 RMARGIN))) (SETQ COMMENT-RMARGIN (- RMARGIN COMMENT-LMARGIN)) (COND ((EQ COMMENT-LMARGIN (DSPXPOSITION NIL FILE)) (* ;; "HACK: Almost certainly called from REPP, so we must supress the normal leading and trailing blank lines as they have already been done") (SETQ RIGHTFLG T))))) (COND ((< COMMENT-LMARGIN (DSPXPOSITION NIL FILE)) (PRINENDLINE COMMENT-LMARGIN FILE)) (T (DSPXPOSITION COMMENT-LMARGIN FILE))) (SETFONT (PROG1 (SETFONT COMMENTFONT FILE) (COND ((AND SEMIP (NOT MAKEMAP) (STRINGP (SETQ BODY (CAR (LISTP (CDR (LISTP (CDR L))))))) (NULL (CDDDR L)) (OR (IMAGESTREAMP FILE) *PRINT-SEMICOLON-COMMENTS*)) (* ; "do nice semi-colon stuff") (PRIN2-LONG-STRING BODY FILE NIL NIL COMMENT-LMARGIN COMMENT-RMARGIN T SEMIP)) (T (SUPERPRINT/COMMENT2 L COMMENT-LMARGIN (IQUOTIENT (+ COMMENT-LMARGIN COMMENT-RMARGIN) 2) COMMENT-RMARGIN FILE)))) FILE) (COND ((AND SEMIP (NEQ SEMIP 5) (NOT MAKEMAP)) (* ;; "AR 8475 JDS 4/16/87: If there's a semi-colon comment on this line, and we're not making the file map (??), and RIGHTFLG is NIL (whatever that means) then force a new line.") (OR RIGHTFLG (PRINENDLINE 0 FILE)))) (RETURN L))))) -) - -(\\backspace.read.time.conditional -(LAMBDA (node context index) (* ; "Edited 30-Sep-87 14:01 by raf") (if (NULL index) then (* ; "backspace from right boundary puts caret into the read.time.conditional's FORM.") (LET ((point (fetch CaretPoint of context))) (replace PointNode of point with node) (replace PointIndex of point with (CAR (fetch SubNodes of node))) (replace PointType of point with (QUOTE Structure))) (\\set.selection.nowhere (fetch Selection of context)) elseif (ZEROP index) then (* ; "backspace from before first element deletes the read.time.conditional if its empty.") (if (NULL (CDR (fetch SubNodes of node))) then (\\delete (fetch SuperNode of node) context node NIL (fetch CaretPoint of context))) else (* ; "backspacing after an element of the read.time.conditional is handled by that subnode.") (SETQ node (\\subnode index node)) (APPLY* (fetch BackSpace of (fetch NodeType of node)) node context))) -) - -(\\cfv.clisp -(LAMBDA (x environment) (* ; "Edited 21-Sep-87 11:40 by raf") (* compute the width estimates for a clisp expression) (bind (pwidth _ 0) (mwidth _ 0) (iwidth _ 0) (first.subnode _ T) (paren.width _ (fetch Width of (fetch LParenString of environment))) (space.width _ (fetch SpaceWidth of environment)) plll mlll indent pcomment.indent mcomment.indent first (SETQ indent paren.width) (SETQ pcomment.indent paren.width) (SETQ mcomment.indent paren.width) for subnode in (CDR (fetch SubNodes of x)) do (if (EQ (fetch NodeType of subnode) \\type.comment) then (SELECTQ (fetch Unassigned of subnode) (1 (SETQ pwidth (IMAX pwidth (IPLUS pcomment.indent (fetch PreferredWidth of subnode)))) (SETQ mwidth (IMAX mwidth (IPLUS mcomment.indent (fetch MinWidth of subnode))))) ((2 3 4 5) (SETQ pwidth (IMAX pwidth (IPLUS indent (fetch PreferredWidth of subnode)))) (SETQ mwidth (IMAX mwidth (IPLUS indent (fetch MinWidth of subnode))))) (SHOULDNT "unexpected value for comment level")) (SETQ plll (SETQ mlll paren.width)) (SETQ iwidth NIL) else (if iwidth then (if (fetch InlineWidth of subnode) then (SETQ iwidth (IPLUS iwidth (if (ZEROP iwidth) then paren.width else space.width) (fetch InlineWidth of subnode))) else (SETQ iwidth NIL))) (if (AND (NOT first.subnode) (EQ (fetch ParseMode of subnode) (QUOTE KeyWord))) then (* indentable keywords are indented by the minimum indentation, except for the first keyword of the expression. other keywords are only indented by the width of the left parenthesis) (if (AND (MEMB (CDR (GETPROP (fetch Structure of subnode) (QUOTE CLISPWORD))) \\clisp.indent.words) (NOT first.subnode)) then (SETQ indent (fetch MinIndent of environment)) else (SETQ indent paren.width) (SETQ iwidth NIL))) (SETQ plll (IPLUS indent (fetch PreferredLLength of subnode))) (SETQ mlll (IPLUS indent (fetch MinLLength of subnode))) (SETQ pcomment.indent plll) (SETQ mcomment.indent mlll) (SETQ pwidth (IMAX pwidth (IPLUS (fetch PreferredWidth of subnode) indent))) (SETQ mwidth (IMAX mwidth (IPLUS (fetch MinWidth of subnode) indent))) (if (EQ (fetch ParseMode of subnode) (QUOTE KeyWord)) then (* the subnodes following a keyword are indented by the keyword's indentation plus its width plus a blank) (SETQ indent (IPLUS indent (fetch InlineWidth of subnode) space.width))) (SETQ first.subnode NIL)) finally (replace InlineWidth of x with (AND iwidth (ILESSP iwidth (fetch MaxWidth of environment)) (IPLUS iwidth paren.width))) (replace PreferredWidth of x with (IMAX pwidth (replace PreferredLLength of x with (IPLUS plll paren.width)))) (replace MinWidth of x with (IMAX mwidth (replace MinLLength of x with (IPLUS mlll paren.width)))))) -) - -(\\cfv.comment -(LAMBDA (node environment context) (* ; "Edited 18-Sep-87 17:58 by raf") (* ; "compute the width estimates for a comment node") (replace InlineWidth of node with NIL) (* ; "dispatch on the comment level") (LET ((width (fetch CommentWidth of context))) (SELECTQ (fetch Unassigned of node) (1 (* ; "here we know the comment width") (replace PreferredWidth of node with width) (replace MinWidth of node with width) (replace PreferredLLength of node with width) (replace MinLLength of node with width)) (2 (* ; "here just guess twice single semi comment width") (replace PreferredWidth of node with (ITIMES 2 width)) (replace MinWidth of node with width) (replace PreferredLLength of node with (ITIMES 2 width)) (replace MinLLength of node with width)) ((3 4 5) (* ; "since these won't affect supernode's formattng, just guess small") (replace PreferredWidth of node with 30) (replace MinWidth of node with 30) (replace PreferredLLength of node with 30) (replace MinLLength of node with 30)) (SHOULDNT "unexpected value for comment level")))) -) - -(\\cfv.form -(LAMBDA (x environment) (* ; "Edited 20-Sep-87 18:00 by raf") (* compute the width estimates for a lisp function call) (bind (pwidth _ 0) (mwidth _ 0) (iwidth _ 0) (first.subnode _ T) (paren.width _ (fetch Width of (fetch LParenString of environment))) (space.width _ (fetch SpaceWidth of environment)) plll mlll indent pcomment.indent mcomment.indent first (if (NULL (CDR (fetch SubNodes of x))) then (SETQ pwidth (ITIMES paren.width 2)) (replace InlineWidth of x with pwidth) (replace PreferredLLength of x with pwidth) (replace PreferredWidth of x with pwidth) (replace MinLLength of x with pwidth) (replace MinWidth of x with pwidth) (RETURN)) (SETQ indent paren.width) (SETQ pcomment.indent paren.width) (SETQ mcomment.indent paren.width) for subnode in (CDR (fetch SubNodes of x)) do (if (EQ (fetch NodeType of subnode) \\type.comment) then (SELECTQ (fetch Unassigned of subnode) (1 (SETQ pwidth (IMAX pwidth (IPLUS pcomment.indent (fetch PreferredWidth of subnode)))) (SETQ mwidth (IMAX mwidth (IPLUS mcomment.indent (fetch MinWidth of subnode))))) ((2 3 4 5) (SETQ pwidth (IMAX pwidth (IPLUS indent (fetch PreferredWidth of subnode)))) (SETQ mwidth (IMAX mwidth (IPLUS indent (fetch MinWidth of subnode))))) (SHOULDNT "unexpected value for comment level")) (SETQ plll (SETQ mlll paren.width)) (SETQ iwidth NIL) else (if iwidth then (if (fetch InlineWidth of subnode) then (SETQ iwidth (IPLUS iwidth (if (ZEROP iwidth) then paren.width else space.width) (fetch InlineWidth of subnode))) else (SETQ iwidth NIL))) (SETQ plll (IPLUS indent (fetch PreferredLLength of subnode))) (SETQ mlll (IPLUS indent (fetch MinLLength of subnode))) (SETQ pcomment.indent plll) (SETQ mcomment.indent mlll) (SETQ pwidth (IMAX pwidth (IPLUS (fetch PreferredWidth of subnode) indent))) (SETQ mwidth (IMAX mwidth (IPLUS (fetch MinWidth of subnode) indent))) (if first.subnode then (* the remaining subnodes are indented by the width of the CAR, unless it's too wide or won't go inline) (SETQ indent (if (AND iwidth (OR (ATOM (fetch Structure of subnode)) (ILESSP iwidth (fetch DefaultIndent of environment))) (ILESSP iwidth (fetch MaxIndent of environment))) then (IPLUS iwidth space.width) else (fetch DefaultIndent of environment))) (SETQ first.subnode NIL))) finally (replace InlineWidth of x with (AND iwidth (ILESSP iwidth (fetch MaxWidth of environment)) (IPLUS iwidth paren.width))) (replace PreferredWidth of x with (IMAX pwidth (replace PreferredLLength of x with (IPLUS plll paren.width)))) (replace MinWidth of x with (IMAX mwidth (replace MinLLength of x with (IPLUS mlll paren.width)))) (replace Unassigned of x with indent))) -) - -(\\cfv.lambda -(LAMBDA (x environment) (* ; "Edited 21-Sep-87 11:37 by raf") (* ;; "compute the width estimates for a lambda expression or similar structure. PROGs and PROG*s also go through here, but are treated specially (because of the labels)") (bind (pwidth _ 0) (mwidth _ 0) (first.subnode _ T) (prog? _ (MEMB (fetch Structure of (CADR (fetch SubNodes of x))) (QUOTE (PROG PROG* NIL)))) (paren.width _ (fetch Width of (fetch LParenString of environment))) plll mlll indent pcomment.indent mcomment.indent first (SETQ indent paren.width) (SETQ pcomment.indent paren.width) (SETQ mcomment.indent paren.width) for subnode in (CDR (fetch SubNodes of x)) do (if (EQ (fetch NodeType of subnode) \\type.comment) then (SELECTQ (fetch Unassigned of subnode) (1 (SETQ pwidth (IMAX pwidth (IPLUS pcomment.indent (fetch PreferredWidth of subnode)))) (SETQ mwidth (IMAX mwidth (IPLUS mcomment.indent (fetch MinWidth of subnode))))) ((2 3 4 5) (SETQ pwidth (IMAX pwidth (IPLUS indent (fetch PreferredWidth of subnode)))) (SETQ mwidth (IMAX mwidth (IPLUS indent (fetch MinWidth of subnode))))) (SHOULDNT "unexpected value for comment level")) (SETQ plll (SETQ mlll paren.width)) else (if (AND prog? (ATOM (fetch Structure of subnode)) (NULL (fetch ParseMode of subnode))) then (* ; "it's a label -- only indentation is the width of a paren") (SETQ indent paren.width)) (SETQ plll (IPLUS indent (fetch PreferredLLength of subnode))) (SETQ mlll (IPLUS indent (fetch MinLLength of subnode))) (SETQ pcomment.indent plll) (SETQ mcomment.indent mlll) (SETQ pwidth (IMAX pwidth (IPLUS (fetch PreferredWidth of subnode) indent))) (SETQ mwidth (IMAX mwidth (IPLUS (fetch MinWidth of subnode) indent))) (if first.subnode then (* ; "the second (noncomment) subnode (i.e. the arg list) is indented by the width of the keyword") (SETQ indent (IPLUS paren.width (fetch PreferredWidth of subnode) (fetch SpaceWidth of environment))) (SETQ first.subnode NIL) else (SETQ indent (fetch MinIndent of environment)))) finally (* ; "these things deserve a line to themselves") (replace InlineWidth of x with NIL) (replace PreferredWidth of x with (IMAX pwidth (replace PreferredLLength of x with (IPLUS plll paren.width)))) (replace MinWidth of x with (IMAX mwidth (replace MinLLength of x with (IPLUS mlll paren.width)))))) -) - -(\\cfv.read.time.conditional -(LAMBDA (node environment context) (* ; "Edited 30-Sep-87 16:24 by raf") (LET ((hash.width (fetch Width of (LISTGET (fetch QuoteString of environment) :HASH))) (sign (CADR (fetch SubNodes of node))) (feature (CADDR (fetch SubNodes of node))) (form (CADDDR (fetch SubNodes of node)))) (LET ((total.width (IPLUS hash.width (fetch InlineWidth of sign) (fetch InlineWidth of feature) (fetch InlineWidth of form)))) (replace InlineWidth of node with total.width) (replace PreferredWidth of node with total.width) (replace MinWidth of node with total.width) (replace PreferredLLength of node with (fetch MinLLength of sign)) (replace MinLLength of node with (fetch MinLLength of sign))))) -) - -(\\compute.point.position.read.time.conditional -(LAMBDA (point context) (* ; "Edited 30-Sep-87 17:09 by raf") (LET ((node (fetch PointNode of point)) subnode item) (if (ZEROP (fetch PointIndex of point)) then (* ;; "Before the first element -- right after the hash, which we assume is the first item in the linear form.") (replace PointX of point with (IPLUS (fetch StartX of node) (fetch Width of (CAR (fetch LinearForm of node))))) (replace PointLine of point with (fetch FirstLine of node)) else (* ; "Find the subnode the point will follow.") (SETQ subnode (\\subnode (fetch PointIndex of point) node)) (replace PointLine of point with (fetch LastLine of subnode)) (SETQ item (CADR (fetch LinearThread of subnode))) (replace PointX of point with (IPLUS (fetch StartX of subnode) (fetch ActualLLength of subnode) (if (SMALLP item) then (* ; "it's followed by space -- put the caret in the middle") (IMIN (HALF item) 6) else (* ; "it's followed by something else -- presumably the close paren -- so put the caret immediately after it") 0)))))) -) - -(\\copy.structure.new.quote - [LAMBDA (node) (* ; "Edited 27-Jul-87 16:15 by raf") - - (replace Structure of node with (LET [(struc (TM::COPY-PREFIX-QUOTE (fetch Structure of node] - (CL:SETF (TM::PREFIX-QUOTE-CONTENTS struc) - (fetch Structure of (\\subnode 1 node))) - struc]) - -(\\copy.structure.read.time.conditional -(LAMBDA (node) (* ; "Edited 30-Sep-87 13:56 by raf") (replace Structure of node with (CL:FUNCALL (CL:ETYPECASE (fetch Structure of node) (TM::HASH-PLUS (QUOTE TM::COPY-HASH-PLUS)) (TM::HASH-MINUS (QUOTE TM::COPY-HASH-MINUS))) (fetch Structure of node)))) -) - -(\\create.new.quoted.gap - [LAMBDA (gap context quote.type) (* ; "Edited 27-Jul-87 16:15 by raf") - -(* ;;; "Create a new quote structure with a gap in it, and the node to represent it.") - - (LET* [(gap.node (\\create.gap.node gap)) - (quote.node (create EditNode NodeType _ \\type.new.quote Structure _ - (TM::MAKE-PREFIX-QUOTE :TYPE quote.type :PREFIX - (fetch (StringItem String) - of - (LISTGET (fetch QuoteString of (fetch Environment of - context)) - quote.type)) - :CONTENTS gap) - SubNodes _ (LIST 1 gap.node) - Unassigned _ (LISTGET (fetch QuoteString of (fetch Environment of - context)) - quote.type] - (replace SuperNode of gap.node with quote.node) - (replace SubNodeIndex of gap.node with 1) - (replace SelfLink of quote.node with (create WeakLink Destination _ quote.node)) - (replace LinearForm of quote.node with (fetch SelfLink of quote.node)) - (\\note.change quote.node context) - quote.node]) - -(\\degrade.comment -(LAMBDA (context node) (* ; "Edited 18-Sep-87 19:09 by raf") (RPLACA (CDR (fetch Structure of node)) (CAR (NTH \\comment.markers (add (fetch Unassigned of node) -1)))) (\\note.change node context) (if (fetch SuperNode of (fetch SuperNode of node)) then (* ; "this node has a supernode that is not the root") (\\note.change (fetch SuperNode of node) context)) (\\undo.by \\upgrade.comment node)) -) - -(\\delete.read.time.conditional -(LAMBDA (node context start end set.point?) (* ; "Edited 1-Oct-87 16:33 by raf") (* ;; "Replace any deleted subnodes with gaps, since this is a fixed length object.") (if (NOT (SMALLP start)) then (SETQ start (fetch SubNodeIndex of start)) (SETQ end start)) (\\replace.read.time.conditional node context start end (for i from start to end collect (\\create.gap.node \\basic.gap))) (if set.point? then (\\set.selection.me (fetch Selection of context) context (\\subnode end node)) (\\pending.delete set.point? (fetch Selection of context))) T) -) - -(\\initialize.commonlisp -(LAMBDA NIL (* ; "Edited 1-Oct-87 11:04 by raf") "Creates SEdit nodes for Common Lisp presentation types. Fully re-entrant." (* ;; "Hash o, x, b, comma, and dot are handled with a variant of the existing quote node. Hash vertical bar, plus, minus, and star are more or less new types.") (LET ((PLIST (fetch (EditENV ParseInfo) of \\lisp.edit.environment))) (MAPC (QUOTE ((TM::HASH-B . \\parse..new.quote) (TM::HASH-COMMA . \\parse..new.quote) (TM::HASH-DOT . \\parse..new.quote) (TM::HASH-O . \\parse..new.quote) (TM::HASH-X . \\parse..new.quote) (TM::HASH-MINUS . \\parse..conditional.read) (TM::HASH-PLUS . \\parse..conditional.read))) (FUNCTION (LAMBDA (CELL) (LISTPUT PLIST (CAR CELL) (CDR CELL)))))) (LET ((PLIST (fetch (EditENV QuoteString) of \\lisp.edit.environment)) (FONT (fetch (EditENV DefaultFont) of \\lisp.edit.environment))) (MAPC (LIST (CONS :HASH-DOT (\\create.string.item "#." FONT)) (CONS :HASH-COMMA (\\create.string.item "#," FONT)) (CONS :HASH-O (\\create.string.item "#o" FONT)) (CONS :HASH-X (\\create.string.item "#x" FONT)) (CONS :HASH-B (\\create.string.item "#b" FONT)) (CONS :HASH (\\create.string.item "#" FONT))) (FUNCTION (LAMBDA (CELL) (LISTPUT PLIST (CAR CELL) (CDR CELL)))))) (* ;;; "Fix comments to allow 4 semicolon and balanced (hash bar) comments.") (if (NOT (FMEMB (QUOTE %|) (fetch (EditENV CommentString) of \\lisp.edit.environment))) then (LET ((FONT (fetch (EditENV CommentFont) of \\lisp.edit.environment))) (replace (EditENV CommentString) of \\lisp.edit.environment with (LIST 1 (\\create.string.item ";" FONT) 2 (\\create.string.item ";;" FONT) 3 (\\create.string.item ";;;" FONT) 4 (\\create.string.item ";;;;" FONT) 5 (\\create.string.item "#|" FONT))))) (SETQ \\type.new.quote (create EditNodeType using \\type.root Name _ (QUOTE new.quote) ComputeFormatValues _ (QUOTE \\cfv.quote) Linearize _ (QUOTE \\linearize.quote) SubNodeChanged _ (QUOTE \\subnode.changed.new.quote) SetPoint _ (QUOTE \\set.point.quote) SetSelection _ (QUOTE \\set.selection.quote) GrowSelection _ (QUOTE \\grow.selection.default) Insert _ (QUOTE \\replace.new.quote) Delete _ (QUOTE \\delete.quote) CopyStructure _ (QUOTE \\copy.structure.new.quote) CopySelection _ (QUOTE \\copy.selection.default) Stringify _ (QUOTE \\stringify.quote) BackSpace _ (QUOTE \\backspace.quote))) (SETQ \\type.read.time.conditional (create EditNodeType using \\type.root Name _ (QUOTE read.time.conditional) ComputeFormatValues _ (QUOTE \\cfv.read.time.conditional) ReParse _ (QUOTE HELP) Linearize _ (QUOTE \\linearize.read.time.conditional) SubNodeChanged _ (QUOTE \\subnode.changed.read.time.conditional) ComputePointPosition _ (QUOTE \\compute.point.position.read.time.conditional) ComputeSelectionPosition _ (QUOTE \\compute.selection.position.default) SetPoint _ (QUOTE \\set.point.read.time.conditional) SetSelection _ (QUOTE \\set.selection.read.time.conditional) GrowSelection _ (QUOTE \\grow.selection.default) Insert _ (QUOTE \\insert.read.time.conditional) Delete _ (QUOTE \\delete.read.time.conditional) CopyStructure _ (QUOTE \\copy.structure.read.time.conditional) CopySelection _ (QUOTE \\copy.selection.default) Stringify _ (QUOTE \\stringify.read.time.conditional) BackSpace _ (QUOTE \\backspace.read.time.conditional))) (LET ((inserted.nq NIL) (inserted.rtc NIL)) (for typetail on \\types do (if (EQ (fetch Name of \\type.new.quote) (fetch Name of (CAR typetail))) then (SETQ inserted.nq T) (RPLACA typetail \\type.new.quote) elseif (EQ (fetch Name of \\type.read.time.conditional) (fetch Name of (CAR typetail))) then (SETQ inserted.rtc T) (RPLACA typetail \\type.read.time.conditional))) (if (NOT inserted.nq) then (SETQ \\types (LIST* \\type.new.quote \\types))) (if (NOT inserted.rtc) then (SETQ \\types (LIST* \\type.read.time.conditional \\types)))) (* ;; "Commands which enter the hash objects (very hard to do this right).") (LET ((commands (\\create.command.table (APPEND (QUOTE (((\\input.new.quote :HASH-DOT) NIL 3) ((\\input.new.quote :HASH-COMMA) NIL 6) ((\\input.new.quote :HASH-O) NIL 9) ((\\input.new.quote :HASH-X) NIL 10) ((\\input.new.quote :HASH-B) NIL 11) ((\\input.conditional.read :HASH-PLUS) NIL 18) ((\\input.conditional.read :HASH-MINUS) NIL 14) (\\input.bit.vector NIL 17))) \\command.table.spec)))) (replace (EditENV CommandTable) of \\lisp.edit.environment with (CAR commands)) (replace (EditENV HelpMenu) of \\lisp.edit.environment with (CADR commands))) T) -) - -(\\input.bit.vector - [LAMBDA (context charcode type) (* ; "Edited 15-Jul-87 16:32 by raf") - - (HELP "Unimplemented"]) - -(\\input.conditional.read - [LAMBDA (context charcode type) (* ; "Edited 15-Jul-87 16:32 by raf") - - (HELP "Unimplemented"]) - -(\\input.new.quote - [LAMBDA (context charcode quote.type) (* ; "Edited 15-Jul-87 17:53 by raf") - -(* ;;; "Control character command to insert a new quote type with gap.") - - (SELECTQ (\\type.of.input context) - (Structure (* ; "If we're structure pointing (between the hairs of the universe) a new quote object is made and inserted.") - - (\\close.open.node context) - (\\insert.new.quoted.gap context charcode quote.type)) - (Atom (* ; "If we're pointing somewhere random inside of a structure we'll just call the default character handler. Not great, but a fine failsafe.") - - (APPLY* (fetch DefaultCharHandler of (fetch Environment of context)) - context charcode)) - NIL]) - -(\\insert.new.quoted.gap - [LAMBDA (context charcode quote.type) (* ; "Edited 15-Jul-87 18:01 by raf") - (* ; - "implements the ' command: insert a quoted gap") - - (if (EQ (\\type.of.input context) - 'Structure) - then - (LET ((selection (fetch Selection of context)) - (point (fetch CaretPoint of context)) - new.quote gap) - (SETQ new.quote (\\create.new.quoted.gap \\basic.gap context quote.type)) - (SETQ gap (\\subnode 1 new.quote)) (* ; - "we get our hands on the gap node now, to handle the case where the insert reparses the new.quote") - - (\\insert (fetch CaretPoint of context) - context - (LIST new.quote)) - (if (NOT (\\dead.node? new.quote)) - then - (\\set.selection.me selection context gap) - (\\pending.delete point selection))) (* ; - "must return non-NIL if command executed") - - T]) - -(\\insert.read.time.conditional -(LAMBDA (node context where subnodes point) (* ; "Edited 1-Oct-87 11:05 by raf") (LET (start end) (if (type? EditSelection where) then (SETQ start (fetch SelectStart of where)) (SETQ end (OR (fetch SelectEnd of where) start)) elseif (type? EditPoint where) then (SETQ end (fetch PointIndex of where)) (SETQ start (ADD1 end)) else (SETQ start (fetch SubNodeIndex of where)) (SETQ end start)) (\\replace.read.time.conditional node context start end subnodes point))) -) - -(\\linearize.clisp -(LAMBDA (node context index) (* ; "Edited 21-Sep-87 11:45 by raf") (* ;; "the Linearize method for clisp expressions. the variable ok keeps track of our state: (NIL: next item starts a new line) (T: next item stays on this line) (check: next item goes on this line if it fits) (atom: next item goes on this line if it fits and is an atom)") (* ;; "the formatting rules are that (1) keywords not on \\clisp.indent.words always start new lines (2) always start a new line after anything non-atomic (3) non-atomic things can only follow keywords on the same line (4) \\clisp.indent.words can go on the same line as the preceding material if they're the last thing in the expression or followed by another keyword or by something that will fit inline on the same line (5) if \\clisp.indent.words start a new line they are indented by the minimum indentation (6) if anything else starts a new line it is indented by the width of the most recent keyword to start a line, plus one blank") (* ;; "at present, if keywords always start new lines. this could be improved with a little more smarts") (bind indent comment.start.x comment.indent comment? program.word? (keyword? _ T) (second.subnode _ T) (ok _ T) (space.width _ (fetch SpaceWidth of (fetch Environment of context))) (min.indent _ (IPLUS (fetch StartX of node) (fetch MinIndent of (fetch Environment of context)))) (paren.width _ (fetch Width of (fetch LParenString of (fetch Environment of context)))) first (if index then (SETQ index (AND (NEQ index 1) (SUB1 index))) else (* ;; "start with an open paren and the first subnode (which should be a keyword) since system won't recognize clisp if first subnode is comment, don't have to handle that case here. it will be formatted as a form.") (\\output.constant.string context (fetch LParenString of (fetch Environment of context))) (\\linearize (CADR (fetch SubNodes of node)) context)) (* ;; "set indentation to one blank after the end of the keyword") (SETQ indent (IPLUS (fetch StartX of node) paren.width (fetch InlineWidth of (CADR (fetch SubNodes of node))) space.width)) (\\set.comment.positions comment.start.x comment.indent indent paren.width node context) for subnode in (CDDR (fetch SubNodes of node)) do (if index then (* ;; "we don't actually linearize this subnode, but need to update our state as if we had") (SETQ index (AND (NEQ index 1) (SUB1 index))) (if (SETQ comment? (EQ (fetch NodeType of subnode) \\type.comment)) then (* ;; "this is a comment, so the next guy must start a new line. if following the first keyword, change indent to min.indent") (SETQ ok NIL) (if second.subnode then (SETQ indent min.indent)) elseif (SETQ keyword? (EQ (fetch ParseMode of subnode) (QUOTE KeyWord))) then (* ; "this is a keyword. is it the first thing on this line?") (if (EQ subnode (CADR (MEMB (fetch LastLine of subnode) (fetch LinearForm of node)))) then (* test used to be EQ subnode (CADR (fetch LastLineLinear of subnode))) (* ; "yep. set the indentation to be one blank after the end of it") (SETQ indent (IPLUS (fetch StartX of subnode) (fetch InlineWidth of subnode) space.width)) (* ; "and the next thing goes on this line") (SETQ ok T) else (* ; "the next thing goes on this line if it fits") (SETQ ok (QUOTE check))) else (* ; "the next thing can go on this line if i'm atomic, and it's atomic too") (SETQ ok (AND (ATOM (fetch Structure of subnode)) (QUOTE atom)))) else (* ; "we really are linearizing this subnode") (if (SETQ comment? (EQ (fetch NodeType of subnode) \\type.comment)) then (if (OR (NEQ (fetch Unassigned of subnode) 1) (IGREATERP (fetch CurrentX of context) comment.start.x)) then (\\output.cr context (\\select.comment.indent (fetch Unassigned of subnode) comment.indent indent (fetch StartX of (fetch Root of context)))) else (\\output.space context (IDIFFERENCE comment.indent (fetch CurrentX of context)))) (SETQ ok NIL) (if second.subnode then (SETQ indent min.indent)) elseif (SETQ keyword? (EQ (fetch ParseMode of subnode) (QUOTE KeyWord))) then (* ; "we've got a keyword") (SETQ program.word? (FMEMB (CDR (GETPROP (fetch Structure of subnode) (QUOTE CLISPWORD))) \\clisp.program.words)) (if (FMEMB (CDR (GETPROP (fetch Structure of subnode) (QUOTE CLISPWORD))) \\clisp.indent.words) then (* ; "perhaps it can go on this line") (if (AND ok (NEQ (fetch Unassigned of node) (QUOTE IFWORD)) (ILEQ (IPLUS (fetch CurrentX of context) space.width (fetch InlineWidth of subnode) (if (AND (CDR $$LST1) (NEQ (fetch ParseMode of (CADR $$LST1)) (QUOTE KeyWord))) then (IPLUS space.width (OR (fetch InlineWidth of (CADR $$LST1)) (fetch RightMargin of node))) else 0)) (fetch RightMargin of node))) then (* ; "it'll go on this line") (\\output.space context space.width) (SETQ ok (QUOTE check)) else (* ; "new line, indented by minimum indentation") (\\output.cr context min.indent) (SETQ indent (IPLUS min.indent (fetch InlineWidth of subnode) space.width)) (SETQ ok T)) else (* ; "new line, no indentation") (\\output.cr context (IPLUS (fetch StartX of node) paren.width)) (SETQ indent (IPLUS (fetch StartX of node) paren.width (fetch InlineWidth of subnode) space.width)) (SETQ ok T)) else (if (OR (EQ ok T) (AND ok (fetch InlineWidth of subnode) (ILEQ (IPLUS (fetch CurrentX of context) space.width (fetch InlineWidth of subnode)) (fetch RightMargin of node)) (OR (EQ ok (QUOTE check)) (ATOM (fetch Structure of subnode))))) then (\\output.space context space.width) else (\\output.cr context indent)) (SETQ ok (QUOTE atom))) (\\linearize subnode context) (if (AND (EQ ok (QUOTE atom)) (NOT (fetch Inline? of subnode))) then (SETQ ok NIL))) (SETQ second.subnode NIL) finally (if comment? then (\\output.cr context (IPLUS (fetch StartX of node) paren.width)))) (if index then (SHOULDNT "linearize index out of range")) (\\output.constant.string context (fetch RParenString of (fetch Environment of context)))) -) - -(\\linearize.comment -(LAMBDA (node context index) (* ; "Edited 20-Sep-87 18:18 by raf") (LET* ((level (fetch Unassigned of node)) (prefix (LISTGET (fetch CommentString of (fetch Environment of context)) level))) (bind (first _ T) for subnode in (if index then (CDDR (NTH (fetch SubNodes of node) index)) else (* we're at the beginning, so display the prefix) (\\output.constant.string context prefix) (CDR (fetch SubNodes of node))) do (if (OR first (ILEQ (IPLUS (fetch CurrentX of context) (fetch InlineWidth of subnode)) (fetch RightMargin of node))) then (\\linearize subnode context) else (\\output.cr context (fetch StartX of node)) (if (NOT (EQ 5 level)) then (\\output.constant.string context prefix)) (\\linearize subnode context)) (SETQ first NIL)) (if (EQ 5 level) then (\\output.constant.string context \\level5.comment.close.string)))) -) - -(\\linearize.form -(LAMBDA (node context index) (* ; "Edited 20-Sep-87 18:11 by raf") (* ; "the linearize method for forms") (if (NOT index) then (\\output.constant.string context (fetch LParenString of (fetch Environment of context)))) (if (CDR (fetch SubNodes of node)) then (bind (same.line? _ T) (space.width _ (fetch SpaceWidth of (fetch Environment of context))) (paren.width _ (fetch Width of (fetch LParenString of (fetch Environment of context)))) (first.subnode _ T) indent last.comment.level comment.start.x comment.indent line.skip first (SETQ indent (IPLUS (fetch StartX of node) (if (NOT (ATOM (fetch Structure of (CADR (fetch SubNodes of node))))) then (* ;; "this will handle the case of comment first, too, like in COMS. it will be ugly for comment at beginning of function call, but who cares.") paren.width elseif (ILEQ (IPLUS (fetch StartX of node) (fetch PreferredWidth of node)) (fetch RightMargin of node)) then (OR (fetch Unassigned of node) 0) else (fetch MinIndent of (fetch Environment of context))))) (\\set.comment.positions comment.start.x comment.indent (IPLUS paren.width (fetch StartX of node)) paren.width node context) for subnode in (CDR (fetch SubNodes of node)) do (if (EQ (fetch NodeType of subnode) \\type.comment) then (if index then (SETQ index (AND (NEQ index 1) (SUB1 index))) else (if (EQ last.comment.level (fetch Unassigned of subnode)) then (* ;; "we're following a comment of the same level. force a cr and extra line space") (\\output.cr context (\\select.comment.indent (fetch Unassigned of subnode) comment.indent indent (fetch StartX of (fetch Root of context))) 8) elseif (AND first.subnode (NEQ (fetch Unassigned of subnode) 1)) then (* ;; "dont' have to move at all") elseif (OR first.subnode (AND (EQ (fetch Unassigned of subnode) 1) same.line? (ILEQ (fetch CurrentX of context) comment.start.x))) then (* ;; "just space if first subnode or its a single semi comment that will fit") (\\output.space context (IDIFFERENCE comment.indent (fetch CurrentX of context))) else (\\output.cr context (\\select.comment.indent (fetch Unassigned of subnode) comment.indent indent (fetch StartX of (fetch Root of context))))) (\\linearize subnode context)) (SETQ same.line? NIL) (SETQ last.comment.level (fetch Unassigned of subnode)) else (if index then NIL elseif first.subnode then (if (NOT same.line?) then (\\output.cr context (IPLUS paren.width (fetch StartX of node)))) else (if (AND same.line? (NEQ same.line? (QUOTE paren)) (LEQ (IPLUS (fetch CurrentX of context) space.width) indent)) then (* ; "we're to the left of the indentation tab, so just space enough to get there") (\\output.space context (IDIFFERENCE indent (fetch CurrentX of context))) elseif (AND same.line? (NEQ same.line? (QUOTE paren)) (fetch InlineWidth subnode) (LEQ (IPLUS (fetch CurrentX of context) space.width (fetch InlineWidth subnode) (if (AND (CDR $$LST1) (EQ (fetch NodeType of (CADR $$LST1)) \\type.comment) (EQ (fetch Unassigned of (CADR $$LST1)) 1)) then (fetch PreferredWidth of (CADR $$LST1)) else 0)) (fetch RightMargin of node)) (OR (EQ same.line? T) (ILESSP (CAR (fetch SubNodes of subnode)) 2))) then (* ; "it will fit on this line") (\\output.space context space.width) else (\\output.cr context indent))) (SETQ same.line? (OR (AND (if index then (SETQ index (AND (NEQ index 1) (SUB1 index))) (fetch Inline? of subnode) else (\\linearize subnode context)) (OR (ILESSP (CAR (fetch SubNodes of subnode)) 2) (QUOTE no.lists))) (QUOTE paren))) (SETQ last.comment.level NIL)) (SETQ first.subnode NIL) finally (if (NULL same.line?) then (\\output.cr context (IPLUS paren.width (fetch StartX of node)))))) (if index then (SHOULDNT "linearize index out of range")) (\\output.constant.string context (fetch RParenString of (fetch Environment of context)))) -) - -(\\linearize.lambda -(LAMBDA (node context index) (* ; "Edited 21-Sep-87 11:52 by raf") (* ;;; "the Linearize method for lambda expressions. the opening keyword and second subnode (the argument list) go on the same line, and everything else is on a separate line indented by the minimum indentation, except for PROG labels which aren't indented. the variable before keeps track of this: it's NIL for the first subnode, space for the second, and cr for all of the remaining subnodes") (if (NOT index) then (\\output.constant.string context (fetch LParenString of (fetch Environment of context)))) (bind (prog? _ (MEMB (fetch Structure of (CADR (fetch SubNodes of node))) (QUOTE (PROG PROG* NIL)))) (indent _ (IPLUS (fetch StartX of node) (fetch MinIndent of (fetch Environment of context)))) (paren.width _ (fetch Width of (fetch LParenString of (fetch Environment of context)))) comment? comment.start.x comment.indent first (\\set.comment.positions comment.start.x comment.indent indent paren.width node context) for subnode in (CDR (fetch SubNodes of node)) as subnode.count from 1 do (SETQ comment? (EQ (fetch NodeType of subnode) \\type.comment)) (if index then (SETQ index (AND (NEQ index 1) (SUB1 index))) else (if comment? then (if (OR (NEQ (fetch Unassigned of subnode) 1) (IGREATERP (fetch CurrentX of context) comment.start.x)) then (\\output.cr context (\\select.comment.indent (fetch Unassigned of subnode) comment.indent indent (fetch StartX of (fetch Root of context)))) else (\\output.space context (IDIFFERENCE comment.indent (fetch CurrentX of context)))) elseif (IGREATERP subnode.count 2) then (* ; "we're past the special cases of lambda keyword and arglist") (\\output.cr context (if (AND prog? (EQ (fetch NodeType of subnode) \\type.litatom)) then (IPLUS (fetch StartX of node) paren.width) else indent)) elseif (EQ subnode.count 2) then (* ; "at the second subnode which is not a comment, so it is the arglist in the proper position") (\\output.space context (fetch SpaceWidth of (fetch Environment of context)))) (* ; "otherwise, we're at first non comment, which must be the lambda keyword, so just linearize it here") (\\linearize subnode context)) finally (if comment? then (\\output.cr context (IPLUS (fetch StartX of node) paren.width)))) (if index then (SHOULDNT "linearize index out of range")) (\\output.constant.string context (fetch RParenString of (fetch Environment of context)))) -) - -(\\linearize.list -(LAMBDA (node context index) (* ; "Edited 21-Sep-87 11:54 by raf") (* ;; "the Linearize method for vanilla and dotted lists. nothing is indented, non-atomic things go on separate lines, and we put as many atoms on a line as we can fit. the last element of a dotted list is preceded by a dot.") (if (NOT index) then (\\output.constant.string context (fetch LParenString of (fetch Environment of context)))) (if (CDR (fetch SubNodes of node)) then (bind (first.time? _ T) (space.width _ (fetch SpaceWidth of (fetch Environment of context))) (paren.width _ (fetch Width of (fetch LParenString of (fetch Environment of context)))) this.line? needs.dot? comment? comment.start.x comment.indent first (\\set.comment.positions comment.start.x comment.indent paren.width paren.width node context) for subnode in (CDR (fetch SubNodes of node)) do (SETQ comment? (EQ (fetch NodeType of subnode) \\type.comment)) (if index then (SETQ index (AND (NEQ index 1) (SUB1 index))) (if comment? then (\\output.cr context (IPLUS paren.width (fetch StartX of node)))) else (SETQ needs.dot? (AND (EQ (fetch NodeType of node) \\type.dotlist) (NULL (CDR $$LST1)) (IPLUS space.width (fetch Width of (fetch DotString of (fetch Environment of context)))))) (if comment? then (SETQ first.time? NIL) (if (OR (NEQ (fetch Unassigned of subnode) 1) (IGREATERP (fetch CurrentX of context) comment.start.x)) then (\\output.cr context (\\select.comment.indent (fetch Unassigned of subnode) comment.indent (IPLUS paren.width (fetch StartX of node)) (fetch StartX of (fetch Root of context)))) else (\\output.space context (IDIFFERENCE comment.indent (fetch CurrentX of context)))) elseif (AND first.time? (NOT comment?)) then (* ; "first time through, if not a comment, then i'm already in the right place for the first subnode") (SETQ first.time? NIL) elseif (AND this.line? (NULL (CDR (fetch SubNodes of subnode))) (LEQ (IPLUS (fetch CurrentX of context) space.width (fetch InlineWidth subnode) (OR needs.dot? 0)) (fetch RightMargin of node))) then (* ; "the last node said i could go on this line, i'm atomic so i can go on this line, and i will fit") (\\output.space context space.width) else (* ; "somebody forced be to the next line") (\\output.cr context (IPLUS paren.width (fetch StartX of node)))) (if needs.dot? then (\\output.constant.string context (fetch DotString of (fetch Environment of context))) (\\output.space context space.width)) (\\linearize subnode context)) (SETQ this.line? (AND (NOT comment?) (NULL (CDR (fetch SubNodes of subnode))))) finally (if comment? then (\\output.cr context (IPLUS paren.width (fetch StartX of node)))))) (if index then (SHOULDNT "linearize index out of range")) (\\output.constant.string context (fetch RParenString of (fetch Environment of context)))) -) - -(\\linearize.read.time.conditional -(LAMBDA (node context right.margin) (* ; "Edited 30-Sep-87 16:26 by raf") (LET ((hash (LISTGET (fetch QuoteString of (fetch Environment of context)) :HASH)) (sign (CADR (fetch SubNodes of node))) (feature (CADDR (fetch SubNodes of node))) (form (CADDDR (fetch SubNodes of node)))) (\\output.constant.string context hash) (\\linearize sign context right.margin) (\\linearize feature context right.margin) (\\linearize form context right.margin))) -) - -(\\parse..bit.vector - [LAMBDA (structure context mode) (* ; "Edited 15-Jul-87 16:29 by raf") - - (HELP "Unimplemented"]) - -(\\parse..comment -(LAMBDA (structure context) (* ; "Edited 18-Sep-87 18:59 by raf") (* ;; "try to parse this list as a common lisp comment. the second element should be one or more semicolons, and the rest of the list should be a string") (LET (comment.words (level (AND (CDR structure) (LISTGET \\comment.level.table (CADR structure))))) (if (AND level (CDDR structure) (NULL (CDDDR structure)) (STRINGP (CADDR structure)) (OR (NULL (fetch CurrentNode of context)) (FMEMB (fetch Name of (fetch NodeType of (fetch CurrentNode of context))) (QUOTE (form clisp lambda list))))) then (\\build.node structure context \\type.comment NIL T) (if (NOT (fetch \X of context)) then (* ;; "we're here for the first time (not a reparse) so go ahead. otherwize lie and say that everything matched. we do this because comment words are kept in lists in the comment subnodes. parsing conses these lists anew each time, so reparsing a comment that hadn't changed would think that it *had* changed because of the new lists. so hack this to avoid lots of relinearizing comments.") (SETQ comment.words (\\parse.string.into.words (CADDR structure))) (for word in comment.words do (\\parse word context (QUOTE CommentWord))) (for subnode in (CDR (fetch SubNodes of (fetch CurrentNode of context))) as wordptr on comment.words do (replace Structure of subnode with wordptr)) (replace Unassigned of (fetch CurrentNode of context) with level) else (* ;; "flag that everything matched.") (replace \X of context with NIL)) T))) -) - -(\\parse..conditional.read -(LAMBDA (structure context mode) (* ; "Edited 30-Sep-87 16:21 by raf") (if (TM::READ-TIME-CONDITIONAL-P structure) then (\\build.node structure context \\type.read.time.conditional) (replace Unassigned of (fetch CurrentNode of context) with (TM::READ-TIME-CONDITIONAL-UNREAD-P structure)) (\\parse (CL:ETYPECASE structure (TM::HASH-PLUS (QUOTE +)) (TM::HASH-MINUS (QUOTE -))) context NIL) (\\parse (TM::READ-TIME-CONDITIONAL-FEATURE structure) context NIL) (\\parse (TM::READ-TIME-CONDITIONAL-FORM structure) context NIL) T)) -) - -(\\parse..new.quote - [LAMBDA (structure context mode) (* ; "Edited 27-Jul-87 16:19 by raf") - - (if (AND (OR (NULL mode) - (EQ mode 'Data)) - (TM::PREFIX-QUOTE-CONTENTS structure)) - then - (\\build.node structure context \\type.new.quote) - (replace Unassigned of (fetch CurrentNode of context) - with - (LISTGET (fetch QuoteString of (fetch Environment of context)) - (TM::PREFIX-QUOTE-TYPE structure))) - (\\parse (TM::PREFIX-QUOTE-CONTENTS structure) - context NIL) - T]) - -(\\replace.new.quote - [LAMBDA (node context where subnodes point) (* ; "Edited 27-Jul-87 16:20 by raf") - - (LET ((subnode (CAR subnodes))) - (if (NOT (OR (AND (type? EditSelection where) - (EQ (fetch SelectStart of where) - 1) - (EQ (fetch SelectEnd of where) - 1)) - (type? EditNode where))) - then - (SHOULDNT "weird bounds for replace.quote")) - (\\undo.by \\undo.replace.quote node (\\subnode 1 node)) - (\\kill.node (\\subnode 1 node)) - (RPLACA (CDR (fetch SubNodes of node)) - subnode) - (replace SuperNode of subnode with node) - (replace SubNodeIndex of subnode with 1) - (CL:SETF (TM::PREFIX-QUOTE-CONTENTS (fetch Structure of node)) - (fetch Structure of subnode)) - (\\set.depth subnode (ADD1 (fetch Depth of node))) - (\\note.change node context) - (if point then (\\punt.set.point point context node T)) - (CDR subnodes]) - -(\\replace.read.time.conditional -(LAMBDA (node context start end subnodes point) (* ; "Edited 1-Oct-87 17:05 by raf") (\\undo.by \\undo.replace.read.time.conditional node (for i from start to end collect (\\subnode i node))) (for i from start to end as subnode in subnodes as smashnode on (NTH (CDR (fetch SubNodes of node)) start) do (* ;; "Update the EditNode itself.") (\\kill.node (\\subnode i node)) (RPLACA smashnode subnode) (replace SuperNode of subnode with node) (replace SubNodeIndex of subnode with i) (\\set.depth subnode (ADD1 (fetch Depth of node))) (\\subnode.changed subnode context) (* ; "Updates the data underlying this EditNode.")) (\\note.change node context) (if point then (\\punt.set.point point context node T)) NIL) -) - -(\\set.point.read.time.conditional -(LAMBDA (point context node index offset item type compute.location?) (* ; "Edited 1-Oct-87 17:33 by raf") (if (type? StringItem item) then (* ; "pointing to the HASH.") (SETQ offset (ILESSP offset (HALF (fetch Width of item)))) elseif (type? EditNode item) then (SETQ type (QUOTE Structure))) (if (NULL index) then (\\punt.set.point point context node offset compute.location?) else (if (AND (EQ type (QUOTE Atom)) (NEQ index 0) (ILEQ index 3)) then (\\set.point point context (\\subnode index node) NIL offset NIL (QUOTE Atom) compute.location?) elseif (EQ index 3) then (* ; "can't insert structure after the last item") (\\set.point.nowhere point) else (replace PointNode of point with node) (replace PointIndex of point with (if offset then index else (SETQ index (SUB1 index)))) (replace PointType of point with (QUOTE Structure)) (if compute.location? then (\\compute.point.position.read.time.conditional point context))))) -) - -(\\set.selection.read.time.conditional -(LAMBDA (selection context node index offset item type) (* ; "Edited 30-Sep-87 13:37 by raf") (* ;; "Pointing to the hash selects the whole read.time.conditional.") (\\set.selection.me selection context node)) -) - -(\\split.comment -(LAMBDA (node point context start) (* ; "Edited 18-Sep-87 19:10 by raf") (\\close.open.node context) (LET* ((comment (CADDR (fetch Structure of node))) (length (NCHARS comment)) (split.string (SUBSTRING comment (ADD1 start) length))) (\\set.point point context (fetch SuperNode of node) (fetch SubNodeIndex of node) T node (QUOTE Structure)) (if (NEQ start length) then (* ; "split in middle of comment.") (\\delete node context (ADD1 start) length NIL comment) (\\insert point context (\\parse.new (LIST (QUOTE *) (CAR (NTH \\comment.markers (fetch Unassigned of node))) split.string) context)) (\\set.point point context (fetch SuperNode of node) (fetch SubNodeIndex of node) T node (QUOTE Structure))))) -) - -(\\stringify.comment -(LAMBDA (node environment) (* ; "Edited 29-Sep-87 13:48 by raf") (LET ((level (fetch Unassigned of node))) (if (ILESSP level 4) then (CONCAT (CADR (fetch Structure of node)) " " (CADDR (fetch Structure of node))) elseif (EQ level 4) then (CONCAT \\level4.comment " " (CADDR (fetch Structure of node))) else (CONCAT "#|" (CADDR (fetch Structure of node)) "|#")))) -) - -(\\stringify.new.quote - [LAMBDA NIL (* ; "Edited 27-Jul-87 16:20 by raf") - - NIL]) - -(\\stringify.read.time.conditional -(LAMBDA (node environment) (* ; "Edited 30-Sep-87 13:55 by raf") (LET ((structure (fetch Structure of node))) (CONCAT (LET ((*PACKAGE* *KEYWORD-PACKAGE*)) (CL:FORMAT NIL "#~a~s" (CL:ETYPECASE structure (TM::HASH-PLUS "+") (TM::HASH-MINUS "-")) (TM::READ-TIME-CONDITIONAL-FEATURE structure))) (if (TM::READ-TIME-CONDITIONAL-UNREAD-P structure) then (TM::READ-TIME-CONDITIONAL-FORM structure) else (CL:FORMAT NIL "~S" (TM::READ-TIME-CONDITIONAL-FORM structure)))))) -) - -(\\subnode.changed.new.quote - [LAMBDA (node subnode) (* ; "Edited 27-Jul-87 16:20 by raf") - - (CL:SETF (TM::PREFIX-QUOTE-CONTENTS (fetch Structure of node)) - (fetch Structure of subnode]) - -(\\subnode.changed.read.time.conditional -(LAMBDA (node subnode context) (* ; "Edited 2-Oct-87 15:25 by raf") (LET ((subnode.structure (fetch Structure of subnode)) (node.structure (fetch Structure of node))) (SELECTQ (fetch SubNodeIndex of subnode) (1 (if (SELECTQ subnode.structure (+ (TM::HASH-MINUS-P node.structure)) (- (TM::HASH-PLUS-P node.structure)) (HELP "Bad read time conditional polarity")) then (* ; "We've changed the polarity of this conditional read, need to make new structure and copy the old fields into it.") (replace Structure of node with (CL:FUNCALL (SELECTQ subnode.structure (+ (QUOTE TM::MAKE-HASH-PLUS)) (- (QUOTE TM::MAKE-HASH-MINUS)) NIL) :UNREAD-P (TM::READ-TIME-CONDITIONAL-UNREAD-P node.structure) :FEATURE (TM::READ-TIME-CONDITIONAL-FEATURE node.structure) :FORM (TM::READ-TIME-CONDITIONAL-FORM node.structure))) (\\unread.read.time.conditional? node context) (* ; "Check whether the %"read-ness%" of the conditional read has changed (according to the features list and the polarity of the conditional read).") (\\subnode.changed node context))) (2 (CL:SETF (TM::READ-TIME-CONDITIONAL-FEATURE node.structure) subnode.structure) (\\unread.read.time.conditional? node context)) (3 (CL:SETF (TM::READ-TIME-CONDITIONAL-FORM node.structure) subnode.structure)) (SHOULDNT "Bad subnode index")))) -) - -(\\undo.replace.read.time.conditional -(LAMBDA (context node old.subnodes) (* ; "Edited 30-Sep-87 14:44 by raf") (\\replace.read.time.conditional node context (fetch SubNodeIndex of (CAR old.subnodes)) (fetch SubNodeIndex of (CAR (LAST old.subnodes))) old.subnodes NIL)) -) - -(\\unread.read.time.conditional? -(LAMBDA (node context) (* ; "Edited 2-Oct-87 18:07 by raf") (* ;;; "If the conditional.read doesn't match the %"unread-ness%" of the features (as indicated by its UNREAD-P flag), then return the converted form.") (LET* ((conditional.read (fetch Structure of node)) (unread (TM::READ-TIME-CONDITIONAL-UNREAD-P conditional.read)) (read-p (CMLREAD.FEATURE.PARSER (TM::READ-TIME-CONDITIONAL-FEATURE conditional.read)))) (if (TM::HASH-MINUS-P conditional.read) then (SETQ read-p (NOT read-p))) (if (AND unread read-p) then (* ; "Flag says currently UNREAD, features say now READ, try to read string into structure.") (CL:WITH-INPUT-FROM-STRING (s (TM::READ-TIME-CONDITIONAL-FORM conditional.read)) (LET ((form (NLSETQ (CL:READ s)))) (if form then (\\replace.read.time.conditional node context 3 3 (LIST (\\parse.new form context))) (CL:SETF (TM::READ-TIME-CONDITIONAL-UNREAD-P conditional.read) NIL) else (printout (\\get.prompt.window context) T "Error during read. Not unread.")))) elseif (AND (NOT unread) (NOT read-p)) then (* ; "Flag says currently READ, features say now UNREAD, print structure into string.") (\\replace.read.time.conditional node context 3 3 (LIST (\\parse.new (CL:FORMAT NIL "~s" (TM::READ-TIME-CONDITIONAL-FORM conditional.read)) context))) (CL:SETF (TM::READ-TIME-CONDITIONAL-UNREAD-P conditional.read) T)))) -) - -(\\upgrade.comment -(LAMBDA (context node) (* ; "Edited 18-Sep-87 18:48 by raf") (if (ILESSP (fetch Unassigned of node) (LENGTH \\comment.markers)) then (RPLACA (CDR (fetch Structure of node)) (CAR (NTH \\comment.markers (add (fetch Unassigned of node) 1)))) (\\note.change node context) (if (fetch SuperNode of (fetch SuperNode of node)) then (* ; "this node has a supernode that is not the root") (\\note.change (fetch SuperNode of node) context)) (\\undo.by \\degrade.comment node))) -) -) -(\\initialize.commonlisp) - -(PUTPROPS SEDIT-COMMONLISP MAKEFILE-ENVIRONMENT (:READTABLE "INTERLISP" :PACKAGE (LET ((*PACKAGE* *PACKAGE*)) (CL:IN-PACKAGE "INTERLISP") (FILESLOAD TEXTMODULES) *PACKAGE*) :BASE 10) -) -(PUTPROPS SEDIT-COMMONLISP COPYRIGHT ("Xerox Corporation" 1987)) -(DECLARE%: DONTCOPY - (FILEMAP (NIL (5096 63658 (PRIN2-LONG-STRING 5106 . 11058) (SEMI-COLON-COMMENT-P 11060 . 11480) ( -SUPERPRINT/COMMENT 11482 . 13870) (\\backspace.read.time.conditional 13872 . 14801) (\\cfv.clisp 14803 - . 17469) (\\cfv.comment 17471 . 18530) (\\cfv.form 18532 . 21174) (\\cfv.lambda 21176 . 23476) ( -\\cfv.read.time.conditional 23478 . 24195) (\\compute.point.position.read.time.conditional 24197 . -25248) (\\copy.structure.new.quote 25250 . 25709) (\\copy.structure.read.time.conditional 25711 . -26011) (\\create.new.quoted.gap 26013 . 27521) (\\degrade.comment 27523 . 27942) ( -\\delete.read.time.conditional 27944 . 28525) (\\initialize.commonlisp 28527 . 32974) ( -\\input.bit.vector 32976 . 33135) (\\input.conditional.read 33137 . 33302) (\\input.new.quote 33304 . -34203) (\\insert.new.quoted.gap 34205 . 35440) (\\insert.read.time.conditional 35442 . 35945) ( -\\linearize.clisp 35947 . 41825) (\\linearize.comment 41827 . 42680) (\\linearize.form 42682 . 46477) -(\\linearize.lambda 46479 . 48902) (\\linearize.list 48904 . 51699) (\\linearize.read.time.conditional - 51701 . 52187) (\\parse..bit.vector 52189 . 52349) (\\parse..comment 52351 . 53863) ( -\\parse..conditional.read 53865 . 54423) (\\parse..new.quote 54425 . 55055) (\\replace.new.quote 55057 - . 56177) (\\replace.read.time.conditional 56179 . 56928) (\\set.point.read.time.conditional 56930 . -57902) (\\set.selection.read.time.conditional 57904 . 58158) (\\split.comment 58160 . 58889) ( -\\stringify.comment 58891 . 59280) (\\stringify.new.quote 59282 . 59426) ( -\\stringify.read.time.conditional 59428 . 59932) (\\subnode.changed.new.quote 59934 . 60182) ( -\\subnode.changed.read.time.conditional 60184 . 61513) (\\undo.replace.read.time.conditional 61515 . -61790) (\\unread.read.time.conditional? 61792 . 63163) (\\upgrade.comment 63165 . 63656))))) -STOP diff --git a/lispusers/WHEELSCROLL b/lispusers/WHEELSCROLL index f78d127d9..459735b4e 100644 --- a/lispusers/WHEELSCROLL +++ b/lispusers/WHEELSCROLL @@ -1,12 +1,11 @@ (DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED "22-Feb-2021 09:47:46"  -{DSK}kaplan>Local>medley3.5>git-medley>lispusers>WHEELSCROLL.;43 7259 +(FILECREATED "11-Jun-2021 12:50:16"  +{DSK}kaplan>Local>medley3.5>git-medley>lispusers>WHEELSCROLL.;18 10803 - changes to%: (VARS WHEELSCROLLCOMS) - (FNS ENABLEWHEELSCROLL) + changes to%: (FNS ENABLEWHEELSCROLL) - previous date%: "21-Feb-2021 09:39:06" -{DSK}kaplan>Local>medley3.5>git-medley>lispusers>WHEELSCROLL.;42) + previous date%: "11-Jun-2021 11:11:10" +{DSK}kaplan>Local>medley3.5>git-medley>lispusers>WHEELSCROLL.;14) (PRETTYCOMPRINT WHEELSCROLLCOMS) @@ -14,15 +13,21 @@ (RPAQQ WHEELSCROLLCOMS [(FNS ENABLEWHEELSCROLL WHEELSCROLL WHEELSCROLL.DOIT INSTALL-WHEELSCROLL LISPINTERRUPTS.WHEELSCROLL) - [VARS (WHEELSCROLLINTERRUPTS '((520 (WHEELSCROLL 'VERTICAL WHEELSCROLLDELTA) - T) - (521 (WHEELSCROLL 'VERTICAL (IMINUS WHEELSCROLLDELTA)) - T) - (522 (WHEELSCROLL 'HORIZONTAL (IMINUS WHEELSCROLLDELTA) - T)) - (523 (WHEELSCROLL 'HORIZONTAL WHEELSCROLLDELTA T] + + (* ;; "These are the highest meta-ctrl characters, they will be unaffected by teh state of ctrl and meta mode keys") + + (DECLARE%: EVAL@COMPILE DONTCOPY (CONSTANTS (UP 156) + (DOWN 157) + (LEFT 158) + (RIGHT 159))) (GLOBALVARS WHEELSCROLLDELTA WHEELSCROLLSETTLETIME \WHEELSCROLLINPROGRESS) - (INITVARS (WHEELSCROLLDELTA 20) + + (* ;; "To restore the keyactions for PAD..., if the keyaction table has been reinitialized") + + [ADDVARS (AFTERSYSOUTFORMS (AND WHEELSCROLLENABLED (ENABLEWHEELSCROLL T))) + (AFTERMAKESYSFORMS (AND WHEELSCROLLENABLED (ENABLEWHEELSCROLL T] + (INITVARS (WHEELSCROLLENABLED NIL) + (WHEELSCROLLDELTA 20) (WHEELSCROLLSETTLETIME 50) (\WHEELSCROLLINPROGRESS NIL)) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (INSTALL-WHEELSCROLL) @@ -30,19 +35,73 @@ (DEFINEQ (ENABLEWHEELSCROLL - [LAMBDA (ON) (* ; "Edited 22-Feb-2021 09:47 by rmk:") + [LAMBDA (ON EXCLUDEHORIZONTAL) (* ; "Edited 11-Jun-2021 12:50 by rmk:") + (* ; "Edited 28-May-2021 11:46 by rmk:") - (* ;; "So we can toggle this scrolling, for experimentation.") + (* ;; "So we can toggle this scrolling.") (IF ON - THEN [KEYACTION 'PAD1 '((520 520) . IGNORE] - [KEYACTION 'PAD2 '((521 521) . IGNORE] - [KEYACTION 'PAD4 '((522 522) . IGNORE] - [KEYACTION 'PAD5 '((523 523) . IGNORE] - ELSE (KEYACTION 'PAD1 '(IGNORE . IGNORE)) - (KEYACTION 'PAD2 '(IGNORE . IGNORE)) - (KEYACTION 'PAD4 '(IGNORE . IGNORE)) - (KEYACTION 'PAD5 '(IGNORE . IGNORE]) + THEN (CL:UNLESS (EQP (GETD 'LISPINTERRUPTS) + (GETD 'LISPINTERRUPTS.WHEELSCROLL)) + (CL:WHEN (GETD 'LISPINTERRUPTS.WHEELSCROLL) + (* ; "In case of LOADFROM?") + (MOVD? 'LISPINTERRUPTS 'LISPINTERRUPTS.WSORIG) + (MOVD 'LISPINTERRUPTS.WHEELSCROLL 'LISPINTERRUPTS))) + + (* ;; "In some situations these other keyactions seem to be installed, hit them all.") + + [FOR KAT IN (LIST \CURRENTKEYACTION \COMMANDKEYACTION \DEFAULTKEYACTION) + DO ((FOR K IN [IF EXCLUDEHORIZONTAL + THEN `((PAD1 ,UP) + (PAD2 ,DOWN) + (PAD4 IGNORE) + (PAD5 IGNORE)) + ELSE `((PAD1 ,UP) + (PAD2 ,DOWN) + (PAD4 ,LEFT) + (PAD5 ,RIGHT] + DO (KEYACTION (CAR K) + (CONS (CL:IF (EQ (CADR K) + 'IGNORE) + 'IGNORE + `(,(CADR K) + ,(CADR K))) + `IGNORE) + KAT] + (FOR I IN WHEELSCROLLINTERRUPTS + DO (INTERRUPTCHAR (CAR I) + (CADR I) + (CADDR I)) + (CL:WHEN (BOUNDP 'TEDIT.READTABLE) + + (* ;; "These actions are invoked when the caret is in the Tedit window, because TEDIT disables the interrupts") + + (TEDIT.SETFUNCTION (CAR I) + `[LAMBDA NIL + ,(CADR I] + TEDIT.READTABLE))) + (SETQ WHEELSCROLLENABLED T) + ELSE (CL:WHEN (EQP (GETD 'LISPINTERRUPTS.WHEELSCROLL) + (GETD 'LISPINTERRUPTS)) + (MOVD 'LISPINTERRUPTS.WSORIG 'LISPINTERRUPTS)) + (FOR I IN WHEELSCROLLINTERRUPTS DO (INTERRUPTCHAR (CAR I) + NIL) + (CL:WHEN (BOUNDP 'TEDIT.READTABLE) + + (* ;; "These actions are invoked when the caret is in the Tedit window, because TEDIT disables the interrupts") + + (TEDIT.SETFUNCTION (CAR I) + NIL TEDIT.READTABLE))) + (FOR KAT IN (LIST \CURRENTKEYACTION \COMMANDKEYACTION \DEFAULTKEYACTION) + DO (KEYACTION 'PAD1 '(IGNORE . IGNORE) + KAT) + (KEYACTION 'PAD2 '(IGNORE . IGNORE) + KAT) + (KEYACTION 'PAD4 '(IGNORE . IGNORE) + KAT) + (KEYACTION 'PAD5 '(IGNORE . IGNORE) + KAT)) + (SETQ WHEELSCROLLENABLED NIL]) (WHEELSCROLL [LAMBDA (DIRECTION DELTA) (* ; "Edited 21-Feb-2021 09:38 by rmk:") @@ -97,21 +156,18 @@ (RESETVAR \WHEELSCROLLINPROGRESS T (SCROLLW WINDOW DX DY)))]) (INSTALL-WHEELSCROLL - [LAMBDA NIL (* ; "Edited 17-Feb-2021 11:53 by rmk:") - (CL:WHEN (GETD 'LISPINTERRUPTS.WHEELSCROLL) - (MOVD? 'LISPINTERRUPTS 'LISPINTERRUPTS.WSORIG) - (MOVD 'LISPINTERRUPTS.WHEELSCROLL 'LISPINTERRUPTS)) - (FOR I IN WHEELSCROLLINTERRUPTS DO (INTERRUPTCHAR (CAR I) - (CADR I) - (CADDR I)) - (CL:WHEN (BOUNDP 'TEDIT.READTABLE) + [LAMBDA NIL (* ; "Edited 28-May-2021 11:46 by rmk:") + (* ; "Edited 17-Feb-2021 11:53 by rmk:") - (* ;; "These actions are invoked when the caret is in the Tedit window, because TEDIT disables the interrupts") + (* ;; "We want the UP, DOWN...constants to be compiled awsy") - (TEDIT.SETFUNCTION (CAR I) - `[LAMBDA NIL - ,(CADR I] - TEDIT.READTABLE))]) + (SETQ WHEELSCROLLINTERRUPTS `((,UP (WHEELSCROLL 'VERTICAL WHEELSCROLLDELTA) + T) + (,DOWN (WHEELSCROLL 'VERTICAL (IMINUS WHEELSCROLLDELTA)) + T) + (,LEFT (WHEELSCROLL 'HORIZONTAL (IMINUS WHEELSCROLLDELTA) + T)) + (,RIGHT (WHEELSCROLL 'HORIZONTAL WHEELSCROLLDELTA T]) (LISPINTERRUPTS.WHEELSCROLL [LAMBDA NIL (* ; "Edited 17-Feb-2021 11:09 by rmk:") @@ -121,19 +177,46 @@ (APPEND WHEELSCROLLINTERRUPTS (LISPINTERRUPTS.WSORIG]) ) -(RPAQQ WHEELSCROLLINTERRUPTS - ((520 (WHEELSCROLL 'VERTICAL WHEELSCROLLDELTA) - T) - (521 (WHEELSCROLL 'VERTICAL (IMINUS WHEELSCROLLDELTA)) - T) - (522 (WHEELSCROLL 'HORIZONTAL (IMINUS WHEELSCROLLDELTA) - T)) - (523 (WHEELSCROLL 'HORIZONTAL WHEELSCROLLDELTA T)))) + + +(* ;; +"These are the highest meta-ctrl characters, they will be unaffected by teh state of ctrl and meta mode keys" +) + +(DECLARE%: EVAL@COMPILE DONTCOPY +(DECLARE%: EVAL@COMPILE + +(RPAQQ UP 156) + +(RPAQQ DOWN 157) + +(RPAQQ LEFT 158) + +(RPAQQ RIGHT 159) + + +(CONSTANTS (UP 156) + (DOWN 157) + (LEFT 158) + (RIGHT 159)) +) +) (DECLARE%: DOEVAL@COMPILE DONTCOPY (GLOBALVARS WHEELSCROLLDELTA WHEELSCROLLSETTLETIME \WHEELSCROLLINPROGRESS) ) + + +(* ;; "To restore the keyactions for PAD..., if the keyaction table has been reinitialized") + + +(ADDTOVAR AFTERSYSOUTFORMS (AND WHEELSCROLLENABLED (ENABLEWHEELSCROLL T))) + +(ADDTOVAR AFTERMAKESYSFORMS (AND WHEELSCROLLENABLED (ENABLEWHEELSCROLL T))) + +(RPAQ? WHEELSCROLLENABLED NIL) + (RPAQ? WHEELSCROLLDELTA 20) (RPAQ? WHEELSCROLLSETTLETIME 50) @@ -146,7 +229,6 @@ (ENABLEWHEELSCROLL T) ) (DECLARE%: DONTCOPY - (FILEMAP (NIL (1432 6591 (ENABLEWHEELSCROLL 1442 . 2071) (WHEELSCROLL 2073 . 4609) (WHEELSCROLL.DOIT -4611 . 5247) (INSTALL-WHEELSCROLL 5249 . 6312) (LISPINTERRUPTS.WHEELSCROLL 6314 . 6589))))) + (FILEMAP (NIL (1575 9814 (ENABLEWHEELSCROLL 1585 . 5542) (WHEELSCROLL 5544 . 8080) (WHEELSCROLL.DOIT +8082 . 8718) (INSTALL-WHEELSCROLL 8720 . 9535) (LISPINTERRUPTS.WHEELSCROLL 9537 . 9812))))) STOP - diff --git a/lispusers/WHEELSCROLL.LCOM b/lispusers/WHEELSCROLL.LCOM index 97812037d..267c7b43a 100644 Binary files a/lispusers/WHEELSCROLL.LCOM and b/lispusers/WHEELSCROLL.LCOM differ diff --git a/loadups/full.database b/loadups/full.database index 11dbe3591..f3dee6a80 100644 --- a/loadups/full.database +++ b/loadups/full.database @@ -1,30888 +1,28667 @@ -(DEFINE-FILE-INFO READTABLE "XCL" PACKAGE "INTERLISP") -(FILECREATED "30-Apr-2021 11:53:01" |{DSK}larry>ilisp>xmed>loadups>DATABASE.FULL;1| 3018474 -) - +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS) +(FILECREATED " 3-Jul-2021 10:21:36"  +{DSK}kaplan>Local>medley3.5>git-medley>loadups>full.database;15 2806453) -(PRETTYCOMPRINT DATABASECOMS) -(RPAQQ DATABASECOMS ((E (DUMPDATABASE)))) +(PRETTYCOMPRINT ((E (DUMPDATABASE NIL)))) (READATABASE) ( -CALL LISPXSTOREVALUE (LISPXPUT) \\DSPTOPMARGIN.IP (FFETCHFIELD) TB.SHOW.SELECTION (FFETCHFIELD BITBLT -+ SUB1 IQUOTIENT - TB.BOTTOM.OF.ITEM) GN/BOTTOM (IDIFFERENCE HALF LRSH) IOFILE (OPENFILE) -TEDIT.COPY.PARALOOKS (TEXTOBJ FFETCHFIELD) SEDIT::UNDERLINE-SELECTION (SEDIT::DRAW-UNDERLINE -FFETCHFIELD) SEDIT::COMPLETE (FFETCHFIELD SEDIT::CLOSE-NODE THIS.PROCESS) \\FTP.ERRORHANDLER (SELECTQ -STREAMOP SPREADAPPLY* FFETCHFIELD BSPOUTPUTSTREAM ERROR \\FTP.FIX.BROKEN.INPUT STKPOS RETFROM MARK# -BSPFRNADDRESS ETHERHOSTNAME) OUTFILEP (\\GETFILENAME) OPENFILE (OPENSTREAM FFETCHFIELD) -OPENSTRINGSTREAM (STRINGP %ARRAY-TYPE-NUMBER FFETCHFIELD \\MAKEBASEBYTESTREAM %ARRAY-BASE UNFOLD LLSH -%ARRAY-OFFSET SELECTQ \\ILLEGAL.ARG SYSTEMTYPE FUNCTION) OUTFILE (OUTPUT OPENFILE) \\TEDIT.SCALEREGION - (\\TEDIT.SCALE CONS) TWODINSPECT.REPAINTFN (DSPCLIPPINGREGION IPLUS WINDOWPROP XCL::PROFILIZE CL:PROGV - XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES FONTPROP APPLY*) HARDCOPYREGION.TOPRINTER ( -|GetPrinterName| PRINTERTYPE GETREGION PACK*) PRINTPACKETDATA (GETSTREAM PACK* \\GETBASE FOLDLO LRSH -PRIN1 PLUS CEIL LOGAND IPLUS CONSTANT SUB1 LOGXOR IDIFFERENCE \\MAKENUMBER ADD1 \\GETBASEBYTE TERPRI) -\\PS.SCALEREGION (FIXR TIMES CONS) \\MOVEWORDS (\\BLT \\ADDBASE) NS.ECHOUSER (RESETLST SETUPTIMER -COERCE-TO-NSADDRESS \\ILLEGAL.ARG LIST OPENNSOCKET \\FILLINXIP LOCF \\ADDBASE + TIMES TERPRI GETSTREAM - FFETCHFIELD GETXIP \\GETBASE PLUS) CL::%ASIN-FLOAT (CL:ERROR FLOAT CL:* QUOTIENT CL::%POLYEVAL - -UFMINUS) COMPILER::ENV-ANALYZE-MV-PROG1 (MAPC COMPILER::MV-PROG1-STMTS COMPILER::ENV-ANALYZE) -SEDIT::INSPECT-SELECTION (SEDIT::GET-SELECTED-STRUCTURE FFETCHFIELD PRIN1 SEDIT:GET-PROMPT-WINDOW -GETPROMPTWINDOW) \\HCPYMODEBLTCHAR (\\CHAR8CODE LOGAND FFETCHFIELD \\CHARSET LRSH -\\SLOWHCPYMODEBLTCHAR FIXR FQUOTIENT \\DSPGETCHARWIDTH \\GETBASE IPLUS \\FGETWIDTH DSPDESTINATION -\\TOTOPWDS IDIFFERENCE \\DSPGETCHAROFFSET) \\ZEROWORDS (\\HILOC IDIFFERENCE SUB1 \\LOLOC \\VAG2 ADD1 -\\ADDBASE) COMPILER::*LITERALLY-T* (COMPILER::MAKE-LITERAL) \\TELERAIDCOMMAND (LOGAND LRSH LLSH -\\GETBASE SELECTQ \\KEYNAMETONUMBER \\ADDBASE \\TELERAIDBREAK FFETCHFIELD \\TELEKBDWAIT -\\TELEBLTCURSOR) \\FINDOP (ALLOCAL ARRAY PLUS SETA GETPROP ELT ERROR) SEDIT::PRETTY-PRINT (BOUNDP FIXR - TIMES FREPLACEFIELDVAL NCREATE CONS LIST SEDIT::LINEARIZE SEDIT::SUBNODE FFETCHFIELD) DIRCONJ ( -SELECTQ) \\SERIALNUMBER (FFETCHFIELD) SEDIT::SETUP-CONTEXT-WINDOW-DEPENDENCIES (FFETCHFIELD -SEDIT::COMPUTE-COMMENT-COLUMN) SIMPLE.FINDFILE (INFILEP PACKFILENAME.STRING) CLEARHASHFILES (CLOSEF? -ELT SETA) COMP.DECLARE (SELECTQ COMP.DECLARE1 MAPC FRPLACA EVAL CONS COMPERRM COMP.CONST) -RESTART.ETHER (FIND.PROCESS \\ETHEREVENTFN) CLOCKDIFFERENCE (UNINTERRUPTABLY IPLUS \\BOXIDIFFERENCE -\\CLOCK0 LOCF \\ADDBASE) SEDIT::MINIMUM-STRING-WIDTH (CL:APPLY) \\COPYSYS (PACKFILENAME.STRING U-CASE -FILENAMEFIELD \\UFS.RECOGNIZE.FILE \\GETDEVICEFROMNAME \\FLUSHVM RENAMEFILE CONCAT UNIX-GETENV -COPYFILE IMINUS LIST) FB.INSERT.DIRECTORY (TB.INSERT.ITEM FB.MAKE.SUBDIRECTORY.ITEM) -|\\VAMFindFreePages| (UNINTERRUPTABLY FFETCHFIELD SUB1 |\\VAMUpdateVAM| PLUS) SCALEPAGEUNITS (FIXR -FTIMES SELECTQ ASSOC IPLUS) TWODINSPECT.BUTTONEVENTFN (WINDOWPROP XCL::PROFILIZE CL:PROGV -XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES LOGAND TWOD.TRACKCURSOR FONTPROP FUNCTION FFETCHFIELD -CL:FUNCALL) HARDCOPYREGION.TOFILE (|GetImageFile| GETREGION) \\SWITCHFONTS.PSC (FFETCHFIELD LISTGET -MEMB CONCAT TIMES FREPLACEFIELD) FILES? (GETPROP POSITION CL:VALUES) RENAMEFILE (\\CONVERT-PATHNAME -\\RENAMEFILE) SEDIT::SMART-TTYFN (DECLARE CL:FUNCALL EDITL0) \\DSPROTATE.IP (CONCATT.IP) -TB.SELECT.ITEM (\\DTEST FFETCHFIELD TB.SHOW.SELECTION) INSPECT/MAKE/CCODEP (MAKE-COMPILED-CLOSURE) -DISPLAYLINK/TB (APPLY* LISTGET IPLUS ADD1 GN/TOP SUB1 GN/BOTTOM) TEDIT.COPY.LOOKS (TEXTOBJ FFETCHFIELD -) SEDIT::TRACK-SELECT (LOGAND FREPLACEFIELDVAL REPLACEFIELDVAL FETCHFIELD LASTMOUSEX LASTMOUSEY -FFETCHFIELD ZEROP) \\FTP.WHENCLOSED (DREMOVE TERPRI) COMPILER::STOP-UNBINDS-AT-FRAME-BOUNDARY ( -CONDITIONS:FIND-RESTART CONDITIONS:INVOKE-RESTART) \\GC.MODIFY.BIGREFCNT (\\LOLOC \\ADDBASE -FFETCHFIELD ADD1 PLUS SUB1) INFILE (INPUT OPENFILE) SEDIT::SETUP-CONTEXT (FFETCHFIELD -SEDIT::SET-INITIAL-SELECTION) COMPILER::META-SUBST-CATCH (COMPILER::MSUBST COMPILER::META-SUBST -COMPILER::CATCH-TAG REPLACEFIELD) \\GC.ENTER.BIGREFCNT (\\LOLOC \\ADDBASE FFETCHFIELD PLUS) -COURIER.NSNAME.LENGTH (+ COURIER.REP.LENGTH FFETCHFIELD) COMP.COMMENT (CONS COMP.STCONST) -\\NSGATELISTENER (OPENNSOCKET SETUPTIMER THIS.PROCESS FUNCTION FFETCHFIELD GETXIP AWAIT.EVENT -\\FILLINXIP + UNFOLD LLSH LOCF \\ADDBASE SUB1) SEDIT::EQUALIZE-STRING-WIDTHS (SEDIT::MAXIMUM-STRING-WIDTH -) %TYPE-SIZE-TO-TYPENUMBER (CL:ASSOC) \\UFS.RECOGNIZE.FILE (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION |\\UFSGetMonitor| FFETCHFIELD ALLOCSTRING CREATECELL CL:FUNCALL -\\UFS.FILE.RECOGNIZER SELECTQ \\UFS.REMOVE.HOST.FIELD SUBSTRING |\\UFSError|) MAKEPRESS ( -TEXTTOIMAGEFILE) \\SENDLEAF (LISPERROR FFETCHFIELD LOGOR IPLUS LOCF \\ADDBASE) \\LOGOUT0 (\\FLUSHVM) +CALL LOADVARS (LOADFNS) FNTYP (\PSEUDOCODE.REALDEF \CCODEFNTYP \CCODEARGTYPE FFETCHFIELD SELECTQ) +TEDIT.COPY.LOOKS (TEXTOBJ) COMP.APPLY* (ARGTYPE COMP.EXP1 CONS) \UFS.RECOGNIZE.FILE (WITH.MONITOR +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \UFSGetMonitor ALLOCSTRING CREATECELL CL:FUNCALL +\UFS.FILE.RECOGNIZER SELECTQ \UFS.REMOVE.HOST.FIELD SUBSTRING \UFSError) \GETFTPCONNECTION ( +\CANONICAL.HOSTNAME ETHERHOSTNAME \FTP.OPEN.CONNECTION .FTPDEBUGLOG.) \TYPENUMBERFROMNAME (\GETDTD +\ADDBASE ITIMES PLUS) GETNSPRINTER (CH.LIST.OBJECTS PRIN1 ERROR LOOKUP.NS.SERVER PARSE.NSNAME) +\DEVICE.OUTPUT (OPCODES) \TFBRAVO.APPLY.PARALOOKS (ADD1 IDIFFERENCE IMIN) CL::MAYBE-MAKE-BINDING-FORM +(CL::COUNT-OCCURRENCES CL:SUBST) \TEDIT.COMMAND.LOOP (ALLOCSTRING SUBSTRING THIS.PROCESS RESETSAVE +\TEDIT.COMMAND.RESET.SETUP LIST TEXTPROP APPLY* TEDIT.COPY TEDIT.COPY.PARALOOKS TEDIT.COPY.LOOKS +TEDIT.MOVE \GETKEY \SYNCODE GETHASH \GETBASEBYTE) LOADFNS-MAKELIST (LIST ERROR MAPCAR EDITFPAT) +ANALYZE-PARAMETER (CL:CERROR GENSYM RECURSIVELY-ANALYZE) \BITBLTSUB (OPCODES) \DSPSPACEFACTOR.IP (FIXR + TIMES CHARWIDTH) CH.DOMAINS.SERVED (NLSETQ COURIER.CALL CH.GETAUTHENTICATOR) FLIPCURSOR (\PUTBASE +LOGXOR \GETBASE CONSTANT SUB1 EXPT \ADDBASE) \LOGOUT0 (\FLUSHVM) \TEDIT.CONVERT.TO.FORMATTED ( +\TEDIT.BASICFIND MKSTRING CHARACTER \CHTOPC ADD1 -) \GETPILOTBBTSCRATCHBM (BITMAPCREATE) +SEDIT::MENU-PACKAGE-SELECTEDFN (LISTGET FM.ITEMPROP FM.EDITITEM CL:FIND-PACKAGE SEDIT::MENU-SELECTEDFN + LIST PRIN1 GETPROMPTWINDOW MAINWINDOW FM.CHANGELABEL) BITMAPCOPY (\DTEST BITMAPCREATE BITMAPWIDTH) +RECREDECLARE (MAPHASH) SPYOBJ (IMAGEOBJCREATE CL:FORMAT) XCL::CLEAR-IMPLICIT-KEY-HASH (CL:ERROR +XCL::IK-HASH-BASE CL:1+ XCL::IK-HASH-LAST-INDEX \ADDBASE XCL::IK-HASH-NULL-SLOTS XCL::IK-HASH-NUM-SLOTS + XCL::IK-HASH-NUM-KEYS) \DSPRESET.PSC (\MOVETO.PSC DIFFERENCE FONTPROP) WHILEDOUNTIL (LAST LDIFF CONS +WHILEDO1 NCONC WHILEDOUNTIL) OPT.JLENPASS (FRPLACA PLUS IDIFFERENCE OPT.JSIZE IPLUS) +\INSUREBITSPERPIXEL (SELECTQ \ILLEGAL.ARG) CL::SETF-ERROR (CL:ERROR) WHO-LINE-HOST-NAME (ETHERHOSTNAME +) ANALYZE-KEY (GENSYM) XCL::IMPLICIT-KEY-MAP-HASH (CL:ERROR XCL::IK-HASH-BASE CL:1+ +XCL::IK-HASH-LAST-INDEX \ADDBASE XCL::IK-HASH-KEY-ACCESSOR) LASTCHPOS (NTHCHARCODE PLUS) +BRHC/INTERTREE/SPACE (IDIFFERENCE) RECLAIMMIN (IMIN IMAX) TEDIT.DISPLAYTEXT (\TEDIT.APPLY.STYLES IPLUS + RESETSAVE SUB1 ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE IMAX CHARWIDTH SELCHARQ RELMOVETO +BITBLT \DSPPRINTCHAR DSPXPOSITION) COMP.PUSHCALL (COMP.EXP1) \UPF.TEMPFILEP (SELCHARQ NTHCHARCODE +NCHARS) TEDITCHAT.CHARFN (TEXTOBJ SELCHARQ MOVETO BOUT) \FTP.PRINTPLIST (SUB1 IPLUS MKSTRING ADD1 +\GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE \DECRYPT.PWD.CHAR LOGXOR BOUT) +*WHO-LINE-ENTRY-REGISTRY* (LIST) \UPF.NEXTPOS (NTHCHARCODE PLUS) \SPP.CLEANUP (SELECTQ WITH.MONITOR +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION DREMOVE LIST APPLY*) RECORDECL (RECORDECL0 FRPLACA) +GETHOSTINFO (MKATOM U-CASE ASSOC STRPOS \DOMAIN.NAME.QUALIFY.FULLY CONS GETHASH CANONICAL.HOSTNAME +SELECTQ LISTGET) WHILEDO1 (APPEND LIST CONS) GCTRP (FIXP) \CH.UPDATE.CACHE (PRIN1 LIST NCONC1 FRPLACA +CONS SORT.NSADDRESSES.BY.DISTANCE FRPLACD) TEXTPROP (PUTTEXTPROP TEXTOBJ ARG GETTEXTPROP \ILLEGAL.ARG) + DISABLEGC (UNINTERRUPTABLY \DISABLEGC1) SET.TTYINEDIT.WINDOW (CREATEW IREMAINDER WINDOWPROP IMINUS +DSPLINEFEED TTYDISPLAYSTREAM) UNPACKPATHNAME.STRING (DECLARE CL:INTERSECTION MKATOM APPEND +CL:PATHNAME-HOST LIST CL:PATHNAME-DEVICE CL:PATHNAME-DIRECTORY CL:PATHNAME-NAME CL:PATHNAME-TYPE +CL:PATHNAME-VERSION MKSTRING) \FIXILINES (IMAX IPLUS \TEDIT.FIXINSSEL) SEDIT::MENU-INIT-STATE ( +CL:PACKAGE-NAME FM.GETITEM FM.ITEMPROP) \DOGCDISABLEDINTERRUPT (CREATEW CREATEREGION IDIFFERENCE PRIN1 + HELP) TTYINMETA (METASHIFT) BRH/LAYOUT/DAUGHTERS (IPLUS BRH/LAYOUT GETNODEFROMID IDIFFERENCE) +FLASHWINDOW (FIXP GETSTREAM VIDEOCOLOR INVERTW PLUS) HASHFILENAME (HASHFILEPROP) IDLE.SET.OPTION ( +LISTGET SELECTQ MENU RNUMBER MKATOM PROMPTFORWORD UNION LIST PRIN1 GV.READENTRY TERPRI RESETFORM +TTYDISPLAYSTREAM ASKUSER CONS REMOVE IDLE.SHOW.OPTION) \LEAF.SETCREATIONDATE (\LEAF.GETFILEDATES +LISP.TO.ALTO.DATE ALLOCATE.PUP LLSH IDIFFERENCE IPLUS) BITMAPBIT (\FBITMAPBIT SUB1 \ADDBASE ITIMES +\SFInvert IDIFFERENCE MAXIMUMCOLOR SELECTQ FOLDLO LRSH \GETBASE \BITMASK \WORDELT LOGAND LOGXOR LOGOR +LSH \4BITMASK LLSH \GETBASE24 ERROR \GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM \DSPCLIPTRANSFORMX + \DSPCLIPTRANSFORMY DSPDESTINATION \TOTOPWDS BITMAPBIT) \SEARCH.OUTPUTQ (\UNQUEUE) EDITREC (EDITDEF) +SPY.MERGE.CALLEES (FREPLACEFIELD CONS FFETCHFIELD SPY.MERGETREE SELECTQ GETHASH SHOULDNT SUB1 LIST) +XCL::PPRINT-DEFINER (DECLARE DSPXPOSITION DSPLEFTMARGIN + CL:* GET) \FILLPOLYGON.PSC (LAST +BITMAPCREATE MIN POSTSCRIPT.PUTCOMMAND LSH TIMES QUOTIENT DSPSCALE \MOVETO.PSC) SHRKFY (SHRKFY NCONC1 +SHRKFY2 LIST CLISPIFY2A CLISPIFYLOOKUP CLISPIFY2C) ANTILOG (FLOAT FABS FDIFFERENCE FTIMES CONSTANT LOG + FIX FQUOTIENT POLYEVAL \FLOATBOX OPCODES QUOTIENT ELT IPLUS) SEDIT::MENU-FIND-SELECTEDFN (LISTGET +FM.ITEMPROP WINDOWPROP MAINWINDOW FM.EDITITEM LIST TTY.PROCESS) LINE.LESSP (ILEQ) \DSPCLIPTRANSFORMX ( +\DSPTRANSFORMX IPLUS) COMP.EVALFORM (LIST SUB1 COMP.STRETURN) \IGR.MAKEPRETTYCOMSL (EVAL MAPCAR +LISPFORM.SIMPLIFY LIST) CREATEW (GETSCREENREGION COPY \CREATEW1) DWIMIFY2A (CLISPFUNCTION? FUNCTION) +\DSPCLIPTRANSFORMY (\DSPTRANSFORMY IPLUS) IDLE.BOUNCING.BOX (RESETLST WINDOWPROP COPY LIST IDLE.BITMAP + RAND IDIFFERENCE BITMAPWIDTH BITMAPHEIGHT) \NSPRINT.INTERNAL (CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION) \GENERIC.CURSOR (WINDOWOP SPREADAPPLY*) \NAMEDTAB.INIT (IMAGEFNSCREATE) +CL::GET-SHARED-SETF-METHOD (GENSYM CL:MAPCAR CL:FUNCTION CL:MACROEXPAND-1 CL:VALUES CL:NREVERSE LIST) +COERCETEXTOBJ (SELECTQ ALLOCSTRING \GETBASEPTR \FIRSTNODE PLUS ZEROP SUBSTRING \TEDIT.REOPEN.STREAM +BIN IDIFFERENCE OPENP OPENSTREAM OPENFILE TEDIT.PUT.PCTB \GETSTREAM CONS) \BBTCURVEPT (IPLUS IMIN +IDIFFERENCE \ADDBASE ITIMES \SFInvert LLSH SELECTQ \PILOTBITBLT) AIN (IDIFFERENCE SELECTC LIST UNFOLD +LLSH LISPERROR IPLUS \GETOFD \GETSTREAM) \TERMINATESPP (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION LIST \FILLINSPP LOGOR SETUPTIMER) AOUT (IDIFFERENCE SELECTC LIST UNFOLD LLSH + LISPERROR IPLUS \GETOFD \GETSTREAM) CHAT.RECONNECT.OFF (WINDOWPROP FUNCTION) \BLTCHAR (OPCODES) +\DRAWPOLYGON.PSC (LAST TERPRI TIMES SELECTQ POSTSCRIPT.PUTCOMMAND \MOVETO.PSC) SHRKFY2 (LIST) BLTCHAR +(\BLTCHAR IGEQ \ILLEGAL.ARG \GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM) COMP.MLLFN (ARGTYPE NARGS + PRIN2) TTYIN.LASTINPUT (TTYINSTRING) \USEREVENT (MAPC SELECTQ REVERSE APPLY*) TWODINSPECT.SELECTITEM +(WINDOWPROP WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES +STRINGWIDTH APPLY* IDIFFERENCE ADD1 FONTPROP) TEDIT.UPDATE.SCREEN (TEXTOBJ \TEDIT.FIXCHANGEDPART) +SEDIT::MENU-CLOSEFN (CONS WINDOWPROP MAINWINDOW) \PROCESS.BEFORE.LOGOUT (RESETLST LIST CREATEW TERPRI) + \MEDW.CURSOR (IDIFFERENCE SUB1) FEQP (LISPERROR NTYPX ADD1 IDIFFERENCE IGEQ LOLOC \LOLOC FLOAT IPLUS +LLSH LRSH LOGAND PLUS SUB1) \DEVICE.INPUT (OPCODES) \TEXTCLOSEF (TEXTOBJ ZEROP \GETBASEPTR \FIRSTNODE) + \OPENLINEBUF (\CREATELINEBUFFER) \DSPPRINTCR/LF (TTYDISPLAYSTREAM \CARET.DOWN SELECTQ ERROR IPLUS +IMINUS IDIFFERENCE \DSPTRANSFORMX DSPDESTINATION \GETBASE \TOTOPWDS \DSPTRANSFORMY) BMOBJ.COPYFN ( +IMAGEOBJPROP BITMAPTEDITOBJ BITMAPCOPY) \DSPRIGHTMARGIN.IP (MIN) CL:MULTIPLE-VALUE-CALL (CL:APPLY) +FASL::DUMP-BITMAP (BITMAPWIDTH BITMAPHEIGHT BITSPERPIXEL FASL::HANDLE-STREAM) +XCL::MAKE-IMPLICIT-KEY-HASH-TABLE (+ CL:ASH XCL::%%MAKE-IK-HASH-TABLE \ALLOCBLOCK CL:1-) +\BSP.CLOSE.OPEN.SOCKETS (MAPC LIST BLOCK) DWIMIFYFNS (CLOCK MAPCAR STKEVAL EVALV MISSPELLED? +FILEFNSLST DWIMIFY0) BIT (CL:APPLY) \FTP.PACKFILENAME (SELECTQ SELCHARQ CHCON1 NTHCHARCODE SUBSTRING +\FTP.ADD.QUOTES LIST STRPOS CONS NCHARS GETHOSTINFO CONCAT SUB1 CONCATLIST MKATOM U-CASE) \SFFixY ( +\DSPTRANSFORMY IPLUS \ADDBASE ITIMES \SFInvert IDIFFERENCE IMAX IMIN) PRINTWORDS (SUB1 \GETBASE TERPRI + PLUS) \SLOWBLTCHAR (\CHAR8CODE LOGAND IPLUS \DSPGETCHARWIDTH \GETBASE \DSPTRANSFORMX IMAX IMIN +IDIFFERENCE \DSPGETCHAROFFSET LLSH ITIMES DSPDESTINATION \TOTOPWDS \GETCHARSETINFO \GETBASEPTR UNFOLD +\CHARSET LRSH \CREATECHARSET ADD1) MAKELINE (IPLUS IMINUS MAKEXYPT) \GR.MAKEPRETTYCOMSL (EVAL GETDEF +LITATOM LIST) \CARET.FLASH.AGAIN (TTYDISPLAYSTREAM KEYDOWNP) \LEAF.CREATIONDATE (ALTO.TO.LISP.DATE) +SEPRCASE (ARRAYP ASSOC CASEARRAY + - PLUS NCONC MAPCAR CHCON1 GETSEPR GETBRK SETCASEARRAY +READTABLEPROP CONS) ARRAYSIZE (\MACRO.MX ARRAYSIZE) SYNONYM (DECLARERECORD CONS) SAVEVM (\USEREVENT) +\STRINGWIDTH.PSC (\STRINGWIDTH.GENERIC) CLISPIFYLOOKUP (GETPROP CLISPLOOKUP0) ARRAYTYP (SELECTC \DTEST + SHOULDNT) ARRAYORIG (\DTEST) CHARMACRO? (APPEND) BRH/OFFSET (MAPC GETNODEFROMID FRPLACD PLUS +BRH/OFFSET) \CHANGECHARSET.DISPLAY (\GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CREATECHARSET \SFFixY +\ADDBASE ITIMES) COPYARRAY (HASHARRAY HARRAYSIZE REHASH ARRAYORIG ARRAYTYP ARRAYSIZE ARRAY SETA ELT +PLUS SETD ELTD) USERNAME (GetBcplString \ADDBASE EMADDRESS OPCODES U-CASE SUBSTRING) SETD (SELECTC +IDIFFERENCE IPLUS \ADDBASE2 \ADDBASE SETA) FASL::DUMP-STRUCTURE (TYPENAME) \TEXTSTREAMBOUT ( +\TEDIT.APPLY.STYLES PLUS FFETCHFIELD CHARWIDTH IDIFFERENCE SELECTQ DSPCLIPPINGREGION LLSH SHOULDNT +ADDBASE \ADDBASE LRSH IPLUS LOGAND) BSPREADP (SELECTC \QUEUEHEAD FFETCHFIELD LIST) FTPGETMARK ( +FTPPRINTMARK BSPGETMARK MARK# .FTPDEBUGLOG.) ELTD (SELECTC IDIFFERENCE IPLUS \GETBASEPTR \ADDBASE2 +\ADDBASE ELT) SETUSERNAME (\ADDBASE EMADDRESS OPCODES USERNAME CONCAT) SPY.ORIGINAL (MAPCONC SELECTQ +APPEND SHOULDNT LIST) \MEDW.PUTWINDOWPROP (\OUTSTREAMARG \GETSTREAM WFROMDS SELECTQ ERROR REGIONP +WINDOWPROP LISTGET LIST) REHASH (\DTEST \ADDBASE4 \ADDBASE2 \ADDBASE) \INDICATESTRING (RESETLST +RESETSAVE RADIX CONCAT \CHARSET LRSH \CHAR8CODE LOGAND LOGOR CHARACTER) HASHARRAY (FQUOTIENT IMAX IMIN + - FOLDLO LRSH FIXR SUB1 LLSH IQUOTIENT PLUS SQRT IREMAINDER UNFOLD ERROR FTIMES IPLUS \ALLOCBLOCK) +CLOSENSOCKET (\DTEST UNINTERRUPTABLY DREMOVE ERROR) HARRAYSIZE (\DTEST) SEDIT::JOIN ( +SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW SEDIT::CLOSE-NODE PRIN1 SEDIT::SUBNODE NTH CONSTANT +FREPLACEFIELD CONS FFETCHFIELD LIST PLUS NCONC IMAX LAST ADD1 SEDIT::COLLECT-UNDO-BLOCK) FTPPUTCODE ( +BOUT FTPPRINTCODE) INVERT.TEXTURE.BITMAP (BITMAPCREATE \ADDBASE LOGXOR \GETBASE) DO.CHAT.OPTION ( +CHAT.OPTIONMENU PRIN1) \ALLOCMAPBUFFER (NCREATE) LRSH (LLSH IMINUS NTYPX \LOLOC \FIXP.FROM.FLOATP +IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR IDIFFERENCE IPLUS LRSH LOGAND .LRSH1. \MAKENUMBER) + CLISPFORVARS (LIST DWIMIFY2 CONS DREVERSE) \LEAF.SETFILETYPE (ALLOCATE.PUP LLSH IDIFFERENCE FIXP +SELECTQ IPLUS) %. (MASTERSCOPE) \MEDW.GETWINDOWPROP (\OUTSTREAMARG \GETSTREAM WFROMDS SELECTQ +\GETWINDOWHEIGHT \GETWINDOWWIDTH GETWINDOWUSERPROP) READBITMAP (READC RATOM GETSTREAM SELECTQ +SKIPSEPRS FOLDHI LRSH IPLUS ITIMES BITMAPCREATE \BIN FRPTQ \PUTBASEBYTE LOGOR LLSH IDIFFERENCE SUB1 +\ADDBASE) \NAMEDTABSIZE (IMAGEOBJPROP IMAX IDIFFERENCE ITIMES) CL::GET-SIMPLE-SETF-METHOD (GENSYM +CL:MAPCAR CL:FUNCTION CL:MACROEXPAND-1 CL:VALUES CL:NREVERSE LIST) SPY.DELETE (SPY.DELETE LIST) +\NSGATELISTENER (OPENNSOCKET SETUPTIMER THIS.PROCESS FUNCTION GETXIP AWAIT.EVENT \FILLINXIP + UNFOLD +LLSH \ADDBASE SUB1) \DRAWARC.PSC (TERPRI POSTSCRIPT.PUTCOMMAND TIMES + \MOVETO.PSC) CLMAPS2 (LIST CONS + CLISPIFY2A FLAST NCONC LDIFF CLISPIFY1 APPEND) SUBARRAY (IPLUS UNINTERRUPTABLY ARRAYP ADD1 +IDIFFERENCE) WHO-LINE-CHANGE-USER (LOGIN) \SENDSPP (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION ILESSP \LOLOC IDIFFERENCE SEQ.ADD1 \ADDBASE SUB1 LOCF SETA IMOD) +MAXIMUMSHADE (MAXIMUMCOLOR) FASL::DUMP-FLOAT32 (FASL::WRITE-OP \BOUTS FASL::HANDLE-STREAM) TTYINFIX ( +COUNT MEMB NONTTYINLISPXFIX TTYIN) CHECKBUFFERREFVAL (UNINTERRUPTABLY OPCODES) TEXTUREP (FIXP) BSPEOFP + (\DTEST \BSP.PREPARE.INPUT) \FTP.HANDLE.NO (FUNCTION FTPGETCODE .FTPDEBUGLOG. LIST ASSOC +\FTP.DIRECTORYNAMEONLY MKATOM \INTERNAL/GETPASSWORD PRIN1 GETSTREAM SELECTQ FRPLACA LISPERROR +\FTP.PACKFILENAME) HARRAY (HASHARRAY) %%COPY-STRING-TO-ARRAY (LOCAL NCHARS \ALLOCBLOCK FOLDHI LRSH +IPLUS ITIMES SUB1 NTHCHARCODE ADD1 PLUS) \HCPYMODEBLTCHAR (\CHAR8CODE LOGAND \CHARSET LRSH +\SLOWHCPYMODEBLTCHAR FIXR FQUOTIENT \DSPGETCHARWIDTH \GETBASE IPLUS \FGETWIDTH DSPDESTINATION +\TOTOPWDS IDIFFERENCE \DSPGETCHAROFFSET) CLEARMAP (MAPC \CLEARMAP \GETSTREAM) XCL::PROFILE-VALUES ( +MAPCAR XCL::PROFILIZE) \FTP.ERRORHANDLER (SELECTQ STREAMOP SPREADAPPLY* BSPOUTPUTSTREAM ERROR +\FTP.FIX.BROKEN.INPUT STKPOS RETFROM MARK# BSPFRNADDRESS ETHERHOSTNAME) = (ARG) OPPOSITESHADE ( +IDIFFERENCE MAXIMUMSHADE) \PNC (ADD1 SUB1) DWIMIFY2 (DWMFY2) \WRITEOUTBUFFERS (MAPCAR +CHECKBUFFERREFVAL MAPC UNDIRTY) READATOM (ALLOCAL) \CLEARMAP (LOGAND CONSTANT LOGOR SPREADAPPLY*) +INVERT.TEXTURE (LOGXOR LOGAND INVERT.TEXTURE.BITMAP) PRINTPROPS (RESETFORM PRINTLEVEL MAP GETPROPLIST +MISSPELLED? SHOWPRINT CDDR) COMP.MLLVAR (PRIN2 SELECTQ) < (CL::%%COMPARISON-MACRO) +\CH.CHECK.CLEARINGHOUSE (BESTNSADDRESS CH.DOMAINS.SERVED PRIN1 MKSTRING) OVERFLOW (SELECTQ) +\WRITEPAGES (FDEVOP SPREADAPPLY*) \MEDW.BITBLT (IMAGESTREAMP WFROMDS \GETDISPLAYDATA \DTEST +\OUTSTREAMARG \GETSTREAM SPREADAPPLY* \DSPTRANSFORMX IPLUS \DSPTRANSFORMY IMAX DSPDESTINATION +\TOTOPWDS) HASHFILESPLST (GTHASHFILE GENERATOR HASHFILESPLST1) SEDIT::INSERT-SPECIAL-CHARACTER ( +ALLOCSTRING SELECTQ SEDIT::TYPE-OF-INPUT) XCL::PROFILE-VARIABLES (MAPCAR XCL::PROFILIZE) HARRAYPROP ( +ARG IGREATERP \DTEST SELECTQ HARRAYSIZE LISTGET LIST) OPPOSITECOLOR (IDIFFERENCE MAXIMUMCOLOR) +\FTP.WHENCLOSED (DREMOVE TERPRI) FINISH-READING-BITMAP (READ) COMP.MLL (POSITION PRIN1 GETPROP +IDIFFERENCE IPLUS COMP.MLLVAR LIST TERPRI) COMP.MAP (LIST CONS NARGS SELECTQ COMP.BIND.VARS OPT.DREV +APPEND COMP.UNBIND.VARS) \READPAGES (FDEVOP SPREADAPPLY*) > (CL::%%COMPARISON-MACRO) CLRHASH (\DTEST +\HASHSLOT \ADDBASE2 \ADDBASE) CL:READ-CHAR (\GETSTREAM SPREADAPPLY* CL:CODE-CHAR READCCODE) +\BSP.GETFILEPTR (IPLUS) CLOSEBSPSTREAM (\DTEST FIXP CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +LIST SETUPTIMER CLOSERTPSOCKET) %%COPY-ONED-ARRAY (LOCAL FFETCHFIELD FOLDHI LRSH IPLUS ITIMES +\ALLOCBLOCK SUB1 LLSH \GETBASE PLUS) CHAT.TAKE.INPUT1 (GETPROMPTWINDOW PRIN1 FULLNAME PROMPTFORWORD +OPENSTREAM) \SLOWHCPYMODEBLTCHAR (\CHAR8CODE LOGAND IPLUS \DSPGETCHARWIDTH \GETBASE \DSPTRANSFORMX +IMAX IMIN IDIFFERENCE \DSPGETCHAROFFSET LLSH DSPDESTINATION \TOTOPWDS \GETCHARSETINFO \GETBASEPTR +UNFOLD \CHARSET LRSH \CREATECHARSET ADD1) \FTP.OPENFILE (RESETLST \FTP.UNPACKFILENAME FIXP LISPERROR +CONS LIST GDATE \FTP.OPENFILE.FROM.PLIST) \GR.CONTENTS (EVAL MAPCAR) TTADJUSTWIDTH (IMINUS FRPLACA +PLUS) \GENERIC.DSPCREATE (WINDOWOP SPREADAPPLY* FUNCTION MAX) MAPHASH (\DTEST \HASHSLOT \ADDBASE2 +\ADDBASE) \NAMEDTABNYET (PROMPTPRINT) LOG (FLOATP FLOAT FTIMES ADD1 \FLOAT.BOX IDIFFERENCE FDIFFERENCE + POLYEVAL \FLOATBOX OPCODES FPLUS) HASHLINK (DECLARERECORD CONS) FINDPTRSBUFFER (ERROR) \CHARWIDTH.PSC + (\FGETCHARWIDTH \FGETWIDTH \GETBASE \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CHARSET LRSH +\CREATECHARSET \CHAR8CODE LOGAND) SEDIT::INSPECT-SELECTION (SEDIT::GET-SELECTED-STRUCTURE PRIN1 +SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW) \ICONW.FORMAT.TITLE1 (NCHARS FONTPROP CONS NTHCHARCODE PLUS +CHARWIDTH - SUB1 LIST) \GETMAPBUFFER (\ALLOCMAPBUFFER) \BITBLT.MERGE (\BITBLTSUB MOD IMOD +\GETPILOTBBTSCRATCHBM IPLUS) \TEDIT2 (TEXTPROP COERCETEXTOBJ) OPENBSPSTREAM (OPENRTPSOCKET LIST +FUNCTION FIXP CREATE.EVENT CONCAT PROCESS.NAME) SETTEMPLATE (COPY TEMPLATE SELECTQ ERROR CONS LIST) +BITMAPBIT.EXPANDER (LENGTH) TERM.HOME (MOVETO) TEDIT.WORDGET (\SYNCODE GETHASH \GETBASEBYTE SMALLP +CHCON1) \HASHACCESS (\DTEST APPLY* \EQHASHINGBITS LOGXOR \HILOC LLSH LOGAND \LOLOC LRSH \FIRSTINDEX +IREMAINDER ADD1 \HASHSLOT \ADDBASE \ADDBASE2 \REPROBE LOGOR IMIN IPLUS ERROR FREPLACEFIELD PLUS +FFETCHFIELD HASHOVERFLOW) \FIXLINELENGTH.IP (FIXR QUOTIENT DIFFERENCE) SEDIT::INSERT-MULTI-ESCAPE ( +SEDIT::TYPE-OF-INPUT ALLOCSTRING NTHCHARCODE ADD1 PLUS FFETCHFIELD) \MEDW.DSPCREATE (BITMAPP FUNCTION +MAX) INSTALL-WHO-LINE-OPTIONS (CREATEW CREATEREGION CREATE.MONITORLOCK) RESTART.ETHER (FIND.PROCESS +\ETHEREVENTFN) MAPAFTERCLOSE (\GETSTREAM) WHO-LINE-USERNAME (USERNAME) CL::PUTHASH (\HASHACCESS) +\IDLER (RESETSAVE ALTO.TO.LISP.DATE LISTGET LIST FUNCTION FIND.PROCESS GCGAG SETTOPVAL EVAL GETTOPVAL +USERNAME TTY.PROCESS THIS.PROCESS CHANGENAME TIMES CREATEW CURSOR CURSORCREATE BITMAPCREATE +CHANGEBACKGROUNDBORDER SETUPTIMER ADD.PROCESS CONS \IDLE.TIME TERPRI NLSETQ SAVEVM \IDLE.EXIT? CONCAT +DATE PRIN1 MAPC APPLY*) MAPBUFFERCOUNT (ADD1) SPY.DUMP.BUFFER (PLUS SPY.FIND.TREE SPY.BUFFER.ENTRY +SPY.NEXT.TREE FFETCHFIELD ADD1) FASL::DUMP-DCODE (FASL::HANDLE-STREAM) \BSP.SETFILEPTR (IDIFFERENCE +\BSP.GETFILEPTR \BSP.SKIPBYTES \IS.NOT.RANDACCESSP) INSURE.B&W.TEXTURE (SELECTQ TYPENAME +TEXTUREOFCOLOR INSURE.RGB.COLOR LOGAND INSURE.B&W.TEXTURE \ILLEGAL.ARG) TEDIT.UNDO.DELETION (\CHTOPC +\SPLITPIECE - IMAGEOBJPROP \TEDIT.PRIMARYW TEXTSTREAM IPLUS) MAPPAGE (\GETSTREAM SELECTQ \MAPPAGE ADD1 + ERROR) REMHASH (\HASHACCESS) PRINTDEF (GETSTREAM DSPLEFTMARGIN SUB1 DSPRIGHTMARGIN LIST +TTYDISPLAYSTREAM RESETSAVE FUNCTION DSPFONT SETFONT PLUS BLANKS TIMES DSPXPOSITION SUBPRINT SUPERPRINT + MAPRINT PRIN2S) \HASHRECLAIM (\DTEST \HASHSLOT \ADDBASE2 \ADDBASE PLUS IDIFFERENCE) +\STRINGWIDTH.HCPYMODE (IQUOTIENT IPLUS \STRINGWIDTH.GENERIC \FGETWIDTH \GETBASE CONSTANT) \MAPPAGE ( +\GETMAPBUFFER UNINTERRUPTABLY OPCODES LOGAND CONSTANT LOGOR \COLLECTDIRTYBUFS CONS GETBUFFERPTR +FFETCHFIELD ADD1 DOPMAP CHECKBUFFERREFVAL) DO.MOUSE (DO.SHIFTED.SELECTION LOGAND TTRACKMOUSE +\CARET.DOWN BRACKET.CURRENT.WORD SEGMENT.BIT.LENGTH) HASHOVERFLOW (HASHOVERFLOW.ARRAYTEST \DTEST +HARRAYPROP SELECTQ IMAX + IMIN LRSH CL:1+ LIST FIXR FTIMES APPLY* REHASH HASHARRAY \COPYHARRAYP) +RECORDINIT (APPLY /SET) \SETEOF (PLUS UNINTERRUPTABLY) \SPP.SEND.ENDREPLY (\SENDSPP \FILLINSPP LOGOR) +TEDIT.WORDSET (\SETSYNCODE \PUTBASEBYTE \SETFATSYNCODE SMALLP CHCON1 FIXP SELECTQ) CLMAPS1 (CONS ATOM +LIST) MAPWORD (WORDOFFSET MAPPAGE FOLDLO LRSH MOD IMOD) UNDONLSETQ (LISTGET1 LIST RESETVARS .RESETLST. + CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION ERRORSET) TURN.ON.ETHER (ASSURE.ETHER.ON) +\GR.DELDEFFN (LIST ASSOC REMOVE PACK*) DWIMIFY1A (RETDWIM2 LISPXPRIN1 LISPXPRINT CONCAT SUBSTRING) +IDLE (FNTYP LISTGET ADD.PROCESS LIST KWOTE \IDLERKEYACTION) TEDIT.REDO.INSERTION (\CHTOPC \SPLITPIECE +- IMAGEOBJPROP APPLY* COPY WINDOWPROP IPLUS) XCL::SETF-FIND-PROFILE (STRING XCL::PROFILIZE CL:GETHASH +XCL:PROFILE-NAME) SAVESETQ (SAVESET APPLY) \FTPERROR (TERPRI ERROR) \HASHTABLE.DEFPRINT (IPLUS +CONSTANT + NCHARS FRESHLINE) FINDCALLERS (EDITCALLERS NCONC DREVERSE LIST CONS) \BITBLT.BITMAP.SLOW ( +IMAX IMIN IPLUS IDIFFERENCE LOGXOR LOGAND COLORNUMBERP INVERT.TEXTURE.BITMAP BITMAPCREATE \ILLEGAL.ARG + UNFOLD LLSH COLORTEXTUREFROMCOLOR# ITIMES \SFInvert MAXIMUMCOLOR) CLISPFORINITVAR (CONS LIST +GETDUMMYVAR NCONC1) \COLLECTDIRTYBUFS (ADD1 PLUS LIST) \BSPBACKFILEPTR (FREPLACEFIELD PLUS FFETCHFIELD + ERROR) BSPOPENP (\DTEST SELECTC IGREATERP ILESSP) TEXTUREOFCOLOR (INSURE.RGB.COLOR \PRIMARYTEXTURE) +SPY.MAKE.TREE (FONTP FONTCREATE PLUS QUOTIENT TIMES MAPCAR SPY.MAKEGRAPHNODES SPY.TITLE SHOWGRAPH +LAYOUTGRAPH REVERSE FUNCTION) WORDCONTENTS (\GETBASE) XCL::SETF-PROFILE-ENTRY-VALUE-NAME (XCL::PROFILIZE + XCL::PROFILE-ENTRY-VALUE CL:FUNCALL XCL::VARIABLE-DEFINITION-COERCION-FUNCTION +XCL::FIND-VARIABLE-DEFINITION) \MEDW.TOTOPW (\INSUREWINDOW WINDOWPROP) \PUNT.BITBLT.BITMAP (IMAX IMIN +IPLUS IDIFFERENCE LOGXOR LOGAND COLORNUMBERP INVERT.TEXTURE.BITMAP BITMAPCREATE \ILLEGAL.ARG UNFOLD +LLSH COLORTEXTUREFROMCOLOR# ITIMES \SFInvert MAXIMUMCOLOR) WHO-LINE-WHAT-IS-RUNNING (CONSTANT LIST +STKPOS FRPLACA STKNTH STKNAME) \STRINGHASHBITS-UFN (\GETBASEPTR SUB1 IPLUS MKSTRING ADD1 \GETBASEFAT +\GETBASE \GETBASETHIN \GETBASEBYTE IPLUS16 \LOLOC \ADDBASE LLSH LOGAND) /SETWORDCONTENTS (LIST +FUNCTION WORDCONTENTS SETWORDCONTENTS) COURIER.NSNAME.LENGTH (+ COURIER.REP.LENGTH) +\STRING-EQUAL-HASHBITS-UFN (\GETBASEPTR SUB1 IPLUS MKSTRING ADD1 \GETBASEFAT \GETBASE \GETBASETHIN +\GETBASEBYTE IPLUS16 \LOLOC \ADDBASE LOGOR LLSH LOGAND) SETREADFN (/SETATOMVAL) SETWORDCONTENTS ( +FINDPTRSBUFFER \PUTBASE) FILEWATCH (FIND.PROCESS SELECTQ MKATOM U-CASE ADD.PROCESS LIST FUNCTION) +EXPANDBITMAP (ITIMES BITMAPCREATE) SEDIT::INPUT-TOKENDELIM (SEDIT::TYPE-OF-INPUT CHARACTER) +\MAKE.PMAP.DEVICE (FUNCTION) \CODEARRAY (\ALLOCBLOCK FOLDHI LRSH IPLUS) COMPILER::TEST-GENCODE ( +CL:PPRINT COMPILER::TEST-GENCODE1 CL:FRESH-LINE CL:VALUES) RECORDACCESSFORM (L-CASE SELECTQ LIST +COMPILEUSERFN) WORDOFFSET (\ADDBASE) \DRAWPOINT.PSC (BITBLT - IQUOTIENT \DRAWLINE.PSC) +\PUNT.BLTSHADE.BITMAP (IMAX IMIN IPLUS SELECTQ TYPENAME COLORNUMBERP \ILLEGAL.ARG MAXIMUMCOLOR LOGAND +TEXTUREP TEXTUREOFCOLOR ITIMES COLORTEXTUREFROMCOLOR# IDIFFERENCE \SFInvert) TEDIT.SETSYNTAX ( +TEDIT.GETSYNTAX APPLY* \PUTBASEBYTE \SETFATSYNCODE SELECTQ) \PAGED.GETNEXTBUFFER (SELECTQ PLUS +\EOF.ACTION \MAPPAGE) XCL::SETF-PROFILE-NAME (XCL::PROFILE-ENTRY-VALUE STRING) \MEDW.BURYW ( +\INSUREWINDOW ORDERFROMBOTTOMTOTOP OVERLAPPINGWINDOWS REMOVE LDIFFERENCE ALLATTACHEDWINDOWS REVERSE +\CLOSEW1 \OPENW1) \FIXCODENUM (LOGAND SUB1 LOGOR \GETBASEBYTE LRSH) \TFBRAVO.GET.NAMEDTAB ( +IMAGEOBJCREATE RATOM) TURN.OFF.ETHER (\FLUSHNDBS) \PAGED.FORCEOUTPUT (\GETSTREAM LOGAND CONSTANT LOGOR + \RELEASECPAGE SORT LIST ADD1 PLUS) DSPSOURCETYPE (\GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM +FMEMB \SETPBTFUNCTION SELECTQ) \FIXCODEPTR (\LOLOC OPCODES LOGAND SUB1 LRSH IDIFFERENCE LOGOR +\GETBASEBYTE \HILOC \PUTBASEBYTE) \CLIPLINE (FQUOTIENT + - DIFFERENCE \CLIPCODE LOGAND PLUS LIST FIXR +FTIMES) BRH/LAYOUT (IPLUS HALF LRSH BRH/LAYOUT/DAUGHTERS LIST IDIFFERENCE) DSPYOFFSET (IMAGEOP +SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) FASL::DUMP-INTEGER (DECLARE BOUT FASL::HANDLE-STREAM +FASL::WRITE-INTEGER-BYTES CL:1+ CL:INTEGER-LENGTH CL:CEILING) \CLISPKEYWORDPROCESS (FMEMB NCONC LDIFF) + \PAGED.SETEOFPTR (SELECTQ \NEWLENGTHIS LOGAND ADD1 \MAPPAGE - SHOULDNT) ARGINFO-MUNG (MAPCONC LIST) +DSPXOFFSET (IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) TEDIT.UNDO.INSERTION (IPLUS) \UPDATEOF ( +\SETEOF) \IFS.LOOKUPFILE (NTHCHARCODE STRPOS OPENPUPSOCKET CREATE.MONITORLOCK SUBSTRING ADD1 SUB1 +NCHARS IMINUS CONCAT \INTERNAL/GETPASSWORD GETHOSTINFO CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. +FUNCTION ALLOCATE.PUP \LEAF.STRIP.QUOTES EXCHANGEPUPS SELECTQ MKATOM U-CASE GDATE ALTO.TO.LISP.DATE +\ILLEGAL.ARG PLUS FREPLACEFIELD FFETCHFIELD) DSPCREATE (FUNCTION MAX) \FTP.SENDVERSION (MARK# +FTPPUTMARK SELECTC FTPGETMARK BIN \FTP.FLUSH.TO.EOC) \PAGEDREADP (\SYNCODE GETHASH \GETBASEBYTE +\PEEKCCODE ILESSP) \CARET.FLASH (IDIFFERENCE DSPXPOSITION DSPYPOSITION) CLISPIFYMAPS (CLISPIFYLOOKUP +LIST NCONC CLISPIFY2A APPEND CLMAPS2) \CHECKARRAYBLOCK (\REFCNT FREEBLOCKCHAIN.N \ADDBASE BUCKETINDEX +IMIN INTEGERLENGTH \GETBASEPTR \MP.ERROR) TEDIT.GETSYNTAX (SELECTC \SYNCODE GETHASH \GETBASEBYTE +APPLY*) SORT (ERROR FUNCTION LAST SORT1) COURIER.WRITE.NSNAME (\DTEST COURIER.WRITE.STRING) +\GR.PUTDEFFN (LIST ASSOC \GR.METHODEXPANDER CONS) \ALLOCBLOCK.OLD (BUCKETINDEX IMIN INTEGERLENGTH +\GETBASEPTR \ADDBASE2 \ADDBASE \MP.ERROR \PREFIXALIGNMENT? IDIFFERENCE \MAKEFREEARRAYBLOCK IPLUS +\LINKBLOCK PLUS) TTYINREADP (PEEKBINCCODE PEEKCCODE) TWODINSPECT.REDISPLAY (LIST WINDOWPROP MAPCONC +MAPCAR APPLY* XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES STRINGWIDTH FONTPROP +IDIFFERENCE ADD1 INSPECT.INVERTSELECTION RIGHTW.REPAINTFN) WHO-LINE-TTY-STATE (TTY.PROCESS +THIS.PROCESS PROCESS.EVALV STKNTHNAME GETPROP PLUS) \ALLOCBLOCK.NEW (\PREFIXALIGNMENT? \ALLOCBLOCK.NEW + \ADDBASE SUB1 IDIFFERENCE \CHECKFORSTORAGEFULL ADD1 \PUTBASEFIXP IPLUS \MAKEFREEARRAYBLOCK +\PUTBASEPTR LOCF \ATOMCELL) SEDIT::INPUT-STRINGDELIM (SEDIT::TYPE-OF-INPUT ALLOCSTRING +SEDIT::CREATE-SIMPLE-NODE) EP (APPLY NLAMBDA.ARGS) \ALLOCHUNK (SELECTC CONSTANT LIST SHOULDNT +\GETBASEBYTE HUNKSIZEFROMNUMBER LRSH \GETDTD \ADDBASE ITIMES IREMAINDER FOLDLO ADD1 CREATECELL +IDIFFERENCE IQUOTIENT OPCODES CONS PLUS NCONC) DECREASING.FONT.LIST (MAPCAR FONTCREATE) TOPW.REPAINTFN + (DSPCLIPPINGREGION MAINWINDOW WINDOWPROP XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES +XCL::PROFILE-VALUES SUB1 FONTPROP ADD1 DIFFERENCE STRINGWIDTH) \SFFixDestination (UNFOLD LLSH) +FTPPUTMARK (BSPPUTMARK FTPPRINTMARK) \LEAF.READFILEPROP (ALLOCATE.PUP LLSH IDIFFERENCE \SENDLEAF CONS +\ADDBASE FOLDLO LRSH) TTPRINSPACE (+ TTCRLF BLTCHAR TTYDISPLAYSTREAM PLUS TIMES CHARWIDTH) BSPPUTMARK +(WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \DTEST \BSP.PREPARE.OUTPUT +BSP.OUTPUT.ERROR APPLY* PLUS FFETCHFIELD) \MAIKO.ALLOCBLOCK (\ALLOCHUNK IPLUS \ALLOCBLOCK.OLD +\ALLOCBLOCK.NEW RECLAIM \DORECLAIM \ADDBASE OPCODES) SEDIT::OUTPUT-CONSTANT-STRING (FREPLACEFIELD CONS + PLUS FFETCHFIELD IMAX FONTPROP MKSTRING SEDIT::MAP-FONT) \BSP.HANDLE.DATA (IDIFFERENCE IPLUS PLUS +FFETCHFIELD) CHAT.TYPESCRIPT (FUNCTION LIST) \NEWLENGTHIS (IDIFFERENCE) \DSPPOPSTATE.PSC (FFETCHFIELD) + CLISPIFYCROPS (STRPOS GETPROP CLISPIFY2C CLISPIFY2 LIST CLISP3A LISTP CONS NCONC APPEND +CLISPIFYCROPS1 SELECTQ) DSPTEXTURE (DSPBACKCOLOR) \TEDIT.WORDBOUND.READTABLE (HARRAY \PUTBASEBYTE +\SETFATSYNCODE PLUS \SETSYNCODE LIST) COMP.NUMBERTEST (SUBPAIR LIST SELECTQ COMP.EXPR COMP.STTAG) +\IDLERKEYACTION (KEYACTIONTABLE) \SFFixClippingRegion (IMAX IMIN \DSPTRANSFORMX IPLUS \DSPTRANSFORMY) +FASL::DUMP-COMPLEX (DECLARE FASL::WRITE-OP FASL:DUMP-VALUE CL:REALPART CL:IMAGPART) +\TEDIT.INTERRUPT.SETUP (PROCESSPROP TEXTOBJ RESET.INTERRUPTS TEXTPROP) CLISPFORF/L (LIST) +INSURE.RGB.COLOR (\ILLEGAL.ARG \LOOKUPCOLORNAME INSURE.RGB.COLOR ERROR HLSTORGB) \BSP.GETNEXTBUFFER ( +SELECTQ \BSP.PREPARE.INPUT BSP.INPUT.ERROR APPLY* \DTEST \BSP.PREPARE.OUTPUT RETFROM STKPOS ERROR +SHOULDNT) \DISPLAYSTREAMINCRXPOSITION (FREPLACEFIELD PLUS FFETCHFIELD) \MERGEFORWARD (\ADDBASE2 +\ADDBASE) CLISPIFYRPLAC (GETPROP CLISPIFY2C CLISPIFYLOOKUP NTH NARGS PUTPROP LENGTH SMARTARGLIST +CLISPIFY2A CONS LDIFF SUBPAIR CLISPIFYCROPS NCONC CLISPIFY1 CLISP3A LIST) SPY.NEXT.TREE (CONS +FFETCHFIELD) XCL::PROFILE-VALUE-TYPE-CHECK (XCL::VARIABLE-DEFINITION-COERCION-FUNCTION +XCL::VARIABLE-DEFINITION-TYPE) \MEDW.REDISPLAYW (WINDOWPROP FUNCTION DSPCLIPPINGREGION +INTERSECTREGIONS RESETLST RESETSAVE LIST DSPXOFFSET DSPYOFFSET FILLWITHBACKGROUND DOUSERFNS2) +\LINKBLOCK (FREEBLOCKCHAIN.N \ADDBASE BUCKETINDEX IMIN INTEGERLENGTH \GETBASEPTR) TEXTOBJ (WINDOWPROP +PROCESS.WINDOW \ILLEGAL.ARG) PUTHASHTEXT (GTHASHFILE SETFILEPTR GETEOFPTR COPYBYTES PUTHASHFILE) +\MERGEBACKWARD (\ADDBASE IMINUS \LINKBLOCK \ADDBASE2 \ARRAYBLOCKMERGER) \BSPWRITEBLOCK ( +\BUFFERED.BOUTS \DTEST) \CLIPCURVELINE.IP (- \CLIPCODE LOGAND PLUS FTIMES FQUOTIENT) \VANILLADISKINIT +(COPYARRAY SUB1 PLUS ADD1 \DEFINEDEVICE FUNCTION) TTPRIN1COMMENT (DSPFONT) \LEAF.GETFILEINFO.OPEN ( +SELECTQ GDATE \LEAF.GETFILEINFO.OPEN ALTO.TO.LISP.DATE \LEAF.GETFILEDATES \LEAF.READFILEPROP SELECTC +\GETBASE GetBcplString) \DELETEBLOCK? (FREEBLOCKCHAIN.N \ADDBASE BUCKETINDEX IMIN INTEGERLENGTH +\GETBASEPTR) BSPGETMARK (\BSP.PREPARE.INPUT \GETBASEBYTE BSP.INPUT.ERROR APPLY*) \BSP.HANDLE.ACK (LRSH + IPLUS ITIMES IMAX IMIN LLSH CLOCKDIFFERENCE \SEARCH.OUTPUTQ IDIFFERENCE PLUS FFETCHFIELD) +RECREDECLARE2 (SELECTQ GETP FMEMB RECREDECLARE2) PPBUFS (PRIN1) \DSPPUSHSTATE.PSC (FREPLACEFIELD CONS +COPY FFETCHFIELD) CLISPIFYCROPS1 (CONS ADD1 IPLUS PACK MAPCONC LIST APPEND DREVERSE) \PREFIXALIGNMENT? + (\ADDBASE IREMAINDER PLUS IDIFFERENCE FLOOR LOGAND CONSTANT LOGXOR SUB1 IPLUS IMOD) GET.OBJ.FROM.USER + (ERSETQ PROMPTFOREVALED) CHAT.CLEAR.FROM.MENU (TERM.HOME) COURIER.READ.NSNAME (COURIER.READ.STRING) +SPY.MERGETREE (FMEMB PLUS FFETCHFIELD LIST CONS SELECTQ SHOULDNT) INTEGERLENGTH (SELECTC NTYPX +IDIFFERENCE ILESSP CONSTANT LLSH SHOULDNT ADD1 INTEGERLENGTH IPLUS \BIGNUM.INTEGERLENGTH +CL::%%NOT-INTEGER-ERROR) BSPOUTPUTSTREAM (\DTEST) \VANILLAHOSTNAMEP (SELECTQ MACHINETYPE \LFOpenDevice + \GETDEVICEFROMNAME FUNCTION \UFSOpenDevice \DSKOpenDevice \M44HOSTNAMEP) +\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (CL:MAPC CL:FUNCTION) COPYHASHFILE (GTHASHFILE HASHFILEPROP +CREATEHASHFILE CLOSEHASHFILE FUNCTION) SEDIT::INPUT-QUOTE (SELECTQ SEDIT::TYPE-OF-INPUT SEDIT::CLOSE-NODE + CHCON1 NCHARS FREPLACEFIELD CONS FFETCHFIELD SEDIT::COLLECT-UNDO-BLOCK) \DSKOpenDevice (WITH.MONITOR +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \DSKCreateDevice) XCL::SETF-PROFILE-ENTRY-VALUE ( +XCL::PROFILIZE XCL::VARIABLE-DEFINITION-TYPE XCL::FIND-VARIABLE-DEFINITION CL:GETF) \MEDW.SHAPEW ( +\INSUREWINDOW WINDOWPROP MINIMUMWINDOWSIZE CREATEREGION IMAX GETREGION WINDOWREGION APPLY* MOVEW +COPYALL) \NEW2PAGE (\NEWPAGE \ADDBASE) \DSPTRANSLATE.PSC (DIFFERENCE LIST) SPY.SUM (PLUS SPY.SUM) +\SFFIXLINELENGTH (IMIN IMAX IQUOTIENT IDIFFERENCE) \CHECKFORSTORAGEFULL (UNINTERRUPTABLY IPLUS +IDIFFERENCE SELECTC \SET.STORAGE.STATE LIST \ADVANCE.ARRAY.SEGMENTS SHOULDNT) \LFOpenDevice ( +WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SELECTQ MACHINETYPE \PFGetVols +\GETDEVICEFROMNAME \DEFINEDEVICE) SCALE.FONT (TIMES STRINGWIDTH) FASL::DUMP-RATIONAL (DECLARE +FASL::WRITE-OP FASL:DUMP-VALUE CL:NUMERATOR CL:DENOMINATOR) \TEDIT.INSERT.TTY.BUFFER (HELP) +CLISPDSUBST (SELECTQ FRPLACA CLISPDSUBST GETHASH GETP) \UFSOpenDevice (WITH.MONITOR +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \UFSCreateDevice) BSPFORCEOUTPUT (WITH.MONITOR +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \DTEST) EXPRCHECK (EXPRP VIRGINFN MISSPELLED? +FUNCTION CONS) SET-TTY-PROFILE-INTERACTIVELY (PROCESS.EVAL TTY.PROCESS) DWIMARKASCHANGED (LISTGET1 +MARKASCHANGED) \VANILLAEVENTFN (SELECTQ \REMOVEDEVICE.NAMES) XCL::PROFILE-ENTRY-VALUE-NAME (CL:FUNCALL + XCL::VARIABLE-DEFINITION-NAME-FUNCTION XCL::FIND-VARIABLE-DEFINITION CL:GETF XCL::PROFILIZE CL:EVAL) +*RANDOM-STATE* (CL::%%MAKE-RANDOM-STATE) \DISPLAY.PILOTBITBLT (\PILOTBITBLT) \SFFixFont ( +\SFFIXLINELENGTH) CHAT.SWITCH.EMACS (CHAT.SCREENPARAMS) BLOCK (THIS.PROCESS UNINTERRUPTABLY +\RESCHEDULE \MYALINK OPCODES \PROCESS.GO.TO.SLEEP \DTEST IMIN SPREADAPPLY*) \SETBRUSH.IP (SELECTQ) +BKLINBUF (\DTEST NTHCHARCODE \SYNCODE GETHASH \GETBASEBYTE PLUS) \ARRAYBLOCKMERGER (IDIFFERENCE IPLUS +PLUS \MAKEFREEARRAYBLOCK \ADDBASE2 \ADDBASE \LINKBLOCK) SEDIT::OUTPUT-CR (IDIFFERENCE IMAX RPLACD CONS + SEDIT::STEP-LINEAR FREPLACEFIELD FCHARACTER LIST FIXR QUOTIENT) CLISPFOR4 (SELECTQ SOME CLISPFOR4) +\PRIMARYTEXTURE (BITMAPCOPY SELECTQ \ILLEGAL.ARG \LEVELTEXTURE) DWIMUNSAVEDEF (LIST FLAST LISTGET1 +UNSAVEDEF) \CLOSELINE (UNINTERRUPTABLY) COMPILER::GENCODE-VAR-REF (COMPILER::VAR-REF-VARIABLE) +\INCPARENCOUNT (SELECTC PLUS) CLISPIFYCROPS0 (CLISPIFYCROPS) COMP.SPREADFN (CONS LIST COMP.SPREADFN) +\GR.GETDEFFN (ASSOC) \FTP.EOL.FROM.PLIST (SELECTQ) INVERT.SEGMENT (BEFOREBUF BUFTAILP + +SEGMENT.BIT.LENGTH ITIMES -) \RESETLINE (\SETEOFPTR) \CARET.FLASH? (KEYDOWNP TTYDISPLAYSTREAM +WINDOWPROP TEXTOBJ) \COPYARRAYBLOCK (\ADDBASE IMINUS - \ALLOCBLOCK \RPLPTR COPYALL \GETBASEPTR UNFOLD +LLSH) CLEARBUF (SELECTQ \GETSTREAM \SAVELINEBUF \SAVESYSBUF) \LEAF.SETVALIDATION (\MAKENUMBER) +\COPYCODEBLOCK (UNINTERRUPTABLY FUNCTION OPCODES) CHAT.TAKE.INPUT (PROCESS.APPLY WINDOWPROP FUNCTION +LIST) ASSURE.ETHER.ON (THIS.PROCESS \ETHEREVENTFN \NSINIT) COMP.GETBASEBITS (COMP.VAL LIST PLUS +COMP.STFN CONS) \BSPINIT (FUNCTION \DEFINEDEVICE) COPYALL (LIST COPYALL CONS TYPENAME SELECTQ CONCAT +FPLUS IPLUS HASHARRAY HARRAYSIZE HARRAYPROP COPYREADTABLE COPYTERMTABLE ARRAYSIZE ARRAYTYP ARRAYORIG +ARRAY SETA ELT PLUS BITMAPCOPY CURSORCREATE \COPYARRAYBLOCK \COPYDATATYPE) *TRACE-OUTPUT* ( +XCL:CREATE-TRACE-WINDOW) LINBUF (CONCAT) \MEDW.EXPANDW (WINDOWPROP APPLY*) WXOFFSET (DISPLAYSTREAMP +\OUTSTREAMARG \GETSTREAM \ILLEGAL.ARG DSPCLIPPINGREGION IPLUS DSPXOFFSET FRPLACA PLUS IMINUS) +\TFBRAVO.PUT.NAMEDTAB (PRINT IMAGEOBJPROP) \SAVELINEBUF (- \GETEOFPTR \GETFILEPTR SPREADAPPLY* +ALLOCSTRING FOLDHI LRSH IPLUS CHCON1) SET-PROFILE-INTERACTIVELY (MENU SORT XCL:LIST-ALL-PROFILES +XCL:PROFILE-NAME LIST XCL:RESTORE-PROFILE) \ADVANCE.ARRAY.SEGMENTS (\PUTBASEPTR LOCF \ATOMCELL IPLUS +UNFOLD LLSH SUB1 IDIFFERENCE \MAKEFREEARRAYBLOCK SETQ.NOREF \PUTBASEFIXP) TTY.PROCESS (WFROMDS +PROCESS.TTY FIND.PROCESS \CARET.DOWN \GETSYSBUF LIST NCONC PROCESSPROP APPEND NOTIFY.EVENT) +COMPILER::GENCODE-UNWIND-PROTECT (COMPILER::GENCODE COMPILER::UNWIND-PROTECT-CLEANUP COMPILER::COLLECT-CODE + COMPILER::UNWIND-PROTECT-STMT) \BYTELT (\DTEST IGREATERP \GETBASEBYTE IPLUS) COPYHASHITEM ( +GETHASHFILE APPLY* PUTHASHTEXT) SETDISPLAYHEIGHT (EMPOINTER \VAG2 IPLUS \GETBASE ITIMES LOGAND +CONSTANT SUB1 EXPT LOGOR LRSH) \BYTESETA (\DTEST IGREATERP \PUTBASEBYTE IPLUS) \3MBFLUSH (PLUS) +\BSP.HANDLE.INTERRUPT (IDIFFERENCE PLUS FFETCHFIELD RELEASE.PUP APPLY* \FILLBSPPUP SUB1) INVERTW ( +DSPCLIPPINGREGION) CROPMARK.PUTFN (PRINT IMAGEOBJPROP) WYOFFSET (DISPLAYSTREAMP \OUTSTREAMARG +\GETSTREAM \ILLEGAL.ARG DSPCLIPPINGREGION IPLUS DSPYOFFSET FRPLACA PLUS IMINUS) \WORDELT (\DTEST +IGREATERP \GETBASE IPLUS) \TEDIT.PROCEXITFN (PROCESSPROP \TEDIT.INTERRUPT.SETUP) COMP.STFIX ( +COMP.STCONST APPLY* OPT.CALLP COMP.STFN) \LEAF.STRIP.QUOTES (CONCATCODES CHCON LIST) TTNTHLINE (SUB1) +\MEDW.SHRINKW (\INSUREWINDOW DOUSERFNS WINDOWPROP CREATEWFROMIMAGE BITMAPCOPY \DTEST APPLY* POSITIONP +FUNCTION ICONPOSITION.FROM.WINDOW) \ARRAYTYPENAME (SELECTC) SPY.LEGEND (SHOWGRAPH LAYOUTGRAPH MAPCAR +REVERSE) SPY.MAKEGRAPHNODES (ASSOC SHOULDNT CONS SPYOBJ QUOTIENT TIMES SPY.MAX LIST SPY.MAKEGRAPHNODES +) COMPILER::GENCODE-THROW (COMPILER::GENCODE COMPILER::THROW-TAG) CLISPIFYNOT (CLISPIFY2B GETPROP +CLISP3 LIST) CCODEP (TYPEP CL:COMPILED-FUNCTION-P) PAGEFULLFN (READP RESETLST RESETSAVE +SETDISPLAYHEIGHT PROCESSPROP THIS.PROCESS TTY.PROCESS INVERTW LIST FUNCTION BIN NCHARS \OUTCHAR BLOCK) + XCL::RECORD-CONSTRUCTOR-MACRO (DECLARE) FASL::WRITE-INTEGER-BYTES (FASL::HANDLE-STREAM) +SEDIT::MAKE-COMMENT-STRING (CL:MAKE-STRING) COMP.FMEMB (COMP.VALN COMP.SELECTQ LIST COMP.STFN) +\3MBWATCHER (\3MBGETPACKET PLUS) \SETRTPPORTS (\BLT LOCF \ADDBASE ITIMES) \BLOCKDATAP (NTYPX \GETDTD +\ADDBASE ITIMES) CROPMARK.GETFN (READ VRULE.CREATE) SETLINELENGTH (LINELENGTH) +\BSP.HANDLE.INTERRUPTREPLY (\SEARCH.OUTPUTQ PLUS FFETCHFIELD RELEASE.PUP) DISPLAYSTREAMP (FMEMB) +TEDIT.SETFUNCTION (\PUTBASEBYTE \SETFATSYNCODE APPLY* HARRAY PUTHASH LIST) \CARET.SHOW (WINDOWOP +SPREADAPPLY*) \TEDIT.PROCENTRYFN (\TEDIT.INTERRUPT.SETUP) COMP.FIX (COMP.STFIX) TERMCHARWIDTH ( +\STREAMCHARWIDTH LOGAND \OUTSTREAMARG \GETSTREAM GETTERMTABLE) CURRENT-PROFILE (XCL:PROFILE-NAME +PROCESS.EVALV TTY.PROCESS) CLISPFOR3 (MAPCONC DREVERSE LIST) SYSBUF (CONCAT) CROPMARK.IMAGEBOXFN ( +DSPSCALE SELECTQ IMAGESTREAMTYPE) PLAYTUNE (SELECTC LIST CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. +FUNCTION MAPC SETUPTIMER IQUOTIENT ITIMES) \SHOW.ARRAY.FREELISTS (RESETFORM RECLAIMMIN LENGTH FOLDLO +LRSH \#BLOCKDATACELLS \ALLOCBLOCK UNFOLD LLSH IPLUS \GETBASEPTR \ADDBASE2 \ADDBASE PLUS FFETCHFIELD +TIMES TERPRI PRIN1 FOLDHI) TERMINAL-INPUT (GETSTREAM ARG) NSNAME.TO.STRING (\DTEST CONCAT) SHRIEKIFY ( +GETPROP CLISPIFYLOOKUP LIST NCONC1) EDITDATE (LIST CONCAT DATE /RPLACD CONS) CLISPFORVARS1 (TAILP +DWIMIFY2) \STREAMCHARWIDTH (LOGAND SELECTC \SYNCODE GETHASH \GETBASEBYTE TERMTABLEP IPLUS LOADBYTE LSH + IMINUS MASK.1'S SUB1 \FGETWIDTH \GETBASE PLUS CONSTANT LLSH SELCHARQ DSPXPOSITION UNFOLD IDIFFERENCE +IMOD DSPLEFTMARGIN DSPRIGHTMARGIN SHOULDNT) XCL::SHOW-CLOSURE-CACHE (XCL::IMPLICIT-KEY-MAP-HASH +CL:FUNCTION) SEDIT::HELPMENU (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW) TERMINAL-OUTPUT (GETSTREAM ARG) + XCL::PROFILE-ENTRY-VALUE (CL:GETF XCL::PROFILIZE CL:EVAL) \PARSEARRAYSPACE (\PARSEARRAYSPACE1) +\GR.WITHRESOURCEMAC (MKLIST \DECL.COMNT.PROCESS) \BSP.HANDLE.ERROR (LIST PLUS FFETCHFIELD BSP.OTHERFN +RELEASE.PUP APPLY*) \FTP.GETFILEINFO.FROM.PROPS (SELECTQ ASSOC IDATE MKATOM FOLDHI LRSH IPLUS U-CASE) +\TEDIT.GET.TERMSA.WIDTHS (ARRAY \PUTBASE IPLUS TEDIT.CHARWIDTH PLUS) \PARSEARRAYSPACE1 (\ADDBASE2 +\ADDBASE) \TEDIT.COPYINSERTFN (TEXTSTREAM WINDOWPROP TEXTOBJ) COMP.NUMBERCALL (COMP.PROGN FASSOC ADD1 +SUB1 COMP.STFN CONS COMP.FLOATBOX APPLY* COMP.STFIX SELECTQ) \TEDIT.UNPARSE.PARALOOKS.LIST (LIST CONS +ONOFF) EDITDEF.FILES (EDITDEF FILECOMS) SEDIT::VERIFY-COMMENT (CL:THIRD CL:LENGTH) COMP.GETD ( +COMP.STFN SELECTQ) \CHDEL1 (\PEEKCCODE GETFILEPTR) \FILLRTPPUP (ALLOCATE.PUP) POSTINITARRAYS ( +\ALLOCBLOCK ADD1 IDIFFERENCE UNFOLD LLSH IPLUS FOLDLO LRSH TERPRI IMINUS \ALLOCBLOCK.NEW \PUTBASEPTR +LOCF \ATOMCELL PAGELOC \HILOC \LOLOC PLUS) \ECHOCHAR (IDIFFERENCE) \MEDW.RELMOVEW (WINDOWPROP IPLUS) +COURIERPROGRAM.PRETTYPRINT (+ DSPXPOSITION TIMES) \TFBRAVO.COPY.NAMEDTAB (COPY) CROPMARK.COPYFN ( +CROPMARK.CREATE IMAGEOBJPROP) \DECPARENCOUNT (SELECTC PLUS) ICONW.TITLE (WINDOWPROP ERROR) SPY.MERGE ( +HASHARRAY SPY.DELETE SPY.SUM SPY.MERGETREE SPY.MERGE1 NCONC1) DINFO.TITLEMENUFN (WINDOWPROP RESETFORM +TTYDISPLAYSTREAM GETPROMPTWINDOW APPLY* DINFO.DEFAULT.MENU PROMPTPRINT) \INTERPRETER1 (\MYALINK +OPCODES ADDSTACKBASE \VAG2 CEIL LOGAND IPLUS + - UNFOLD LLSH CONSTANT SUB1 LOGXOR \ATOMVALINDEX NTYPX +\LOLOC SHOULDNT FOLDLO LRSH PLUS WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY \EVAL) CARETRATE (CONS FIXP +FIX) FASL::DUMP-ARRAY (CL:ERROR FASL::DUMP-GENERAL-ARRAY FASL::DUMP-BIT-ARRAY FASL::DUMP-SIMPLE-VECTOR +) \BSP.TIMERFN (LIST CLOSERTPSOCKET \RTP.ACTION \SEARCH.OUTPUTQ PLUS FFETCHFIELD \FILLBSPPUP +\SETBSPTIMEOUT) \SMASHLINK (\MYALINK OPCODES UNINTERRUPTABLY) COMP.NUMERIC (COMP.PROGN FASSOC ADD1 +SUB1 COMP.STFN CONS COMP.FLOATBOX IPLUS APPLY* FUNCTION COMP.STPOP COMP.STCONST IMINUS PLUS) \GETCHAR +(BIN \RAISECHAR IDIFFERENCE) \NSNAME.DEFPRINT (LIST NSNAME.TO.STRING) CLISPANGLEBRACKETS (CLISPLOOKUP +SHRIEKER) \STACKARGPTR (LISPERROR \MYALINK OPCODES FIX SUB1 IMINUS \STKNAME) \FILLBUFFER (IABS IMINUS +\RAISECHAR IDIFFERENCE \CHARSET LRSH \BOUT \CHAR8CODE LOGAND \GETCHAR BIN \SYNCODE GETHASH +\GETBASEBYTE \GETFILEPTR SPREADAPPLY* \INCHAR \CHDEL1 LIST \PAGEDEOFP) TWODINSPECT.DOWINDOWCOMFN (MENU + GETREGION FUNCTION CONS MAINWINDOW) \STARTDISPLAY (REVERSE OPENWINDOWS \CLOSEW1 \CreateScreenBitMap +\OPENW1) SEDIT::EDIT-HELP (SEDIT::CLOSE-NODE SEDIT::SELECTED-FN-NAME SEDIT:GET-PROMPT-WINDOW +GETPROMPTWINDOW NLSETQ SMARTARGLIST STRINGWIDTH CONS WINDOWPROP PRIN1) \FILLBUFFER.WORDSEPRP (\SYNCODE + GETHASH \GETBASEBYTE) \MEDW.MOVEW (\INSUREWINDOW OPENWP \ONSCREENCLIPPINGREGION \ILLEGAL.ARG +WINDOWPROP APPLY* GETBOXPOSITION IPLUS IDIFFERENCE DSPDESTINATION \GETBASE \TOTOPWDS ADVISEWDS +CREATEREGION) \INTERPRETER-LAMBDA (ADDSTACKBASE \VAG2 \MYALINK OPCODES) \DSPTRANSFORMREGION ( +\DSPTRANSFORMX IPLUS \DSPTRANSFORMY) \FILLBUFFER.BACKUP (DSPBACKUP CHARWIDTH) COMPILER::GENCODE-TAGBODY-INLINE + (COMPILER::TAGBODY-FRAME COMPILER::TAGBODY-STK-NUM COMPILER::MAKE-LAP-VAR COMPILER::TAGBODY-BLIP-VAR +COMPILER::TAGBODY-SEGMENTS COMPILER::SEGMENT-LOCAL-TAG COMPILER::GENCODE-SEGMENT) TEDIT.GETFUNCTION ( +APPLY* \SYNCODE GETHASH \GETBASEBYTE) CHARWIDTH (\CHARCODEP IGEQ \FGETCHARWIDTH \GETBASE +\GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CHARSET LRSH \CREATECHARSET \CHAR8CODE LOGAND \OUTSTREAMARG +\GETSTREAM IMAGEOP SPREADAPPLY* \FGETWIDTH FONTCREATE) FAULTAPPLY (SPREADAPPLY .SPREAD. +UNINTERRUPTABLY GETD CLOSURE-ENVIRONMENT CLOSURE-FUNCTION FMEMB GETHASH ASSOC CL:FUNCALL APPLY +NEWFAULT1 OLDFAULT1) \TEDIT.READTABLE (HASHARRAY LIST \PUTBASEBYTE \SETFATSYNCODE FUNCTION) +COMP.COMPARENUM (COMP.PROGN CONSTANTEXPRESSIONP COMP.COMPARENUM LIST KWOTE COMP.STFN FRPLACA) +DSPBACKUP (GETSTREAM \GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM IMIN IDIFFERENCE \CARET.DOWN +FONTDESCENT FONTHEIGHT FONTASCENT FREPLACEFIELD PLUS FFETCHFIELD IMINUS FRPTQ BOUT) +TEDIT.GET.PARALOOKS (TEXTOBJ \TEDIT.UNPARSE.PARALOOKS.LIST \CHTOPC) CL:LEAST-POSITIVE-SINGLE-FLOAT ( +CL::%%FLOAT) UPDATESCREENDIMENSIONS (SELECTC LIST \DoveDisplay.ScreenWidth \DoveDisplay.ScreenHeight +SHOULDNT) XCL::RECORD-PREDICATE-MACRO (DECLARE) \CreateScreenBitMap (FOLDHI LRSH IPLUS SUB1 ITIMES +ADD1 \ADDBASE UNFOLD LLSH PLUS) \OFFSETCLIPPINGREGION (\DSPTRANSFORMX IPLUS \DSPTRANSFORMY) VIDEOCOLOR + (LOGOR LOGAND LOGXOR) COMPILER::GENCODE-TAGBODY (COMPILER::GENCODE-TAGBODY-INLINE) +\SETUP-COMPILED-CLOSURE-CALL (IDIFFERENCE FOLDLO LRSH \FREESTACKBLOCK IPLUS UNFOLD LLSH PLUS +ADDSTACKBASE \VAG2 FFETCHFIELD DIFFERENCE \PUTBASEPTR STACKADDBASE LOGOR ADD1) SI::CLEAR-CLOSURE-CACHE + (UNINTERRUPTABLY CL:FUNCTION XCL::CLEAR-IMPLICIT-KEY-HASH) \STOPSCROLL? (ADD1 WFROMDS +TTYDISPLAYSTREAM WINDOWPROP APPLY* PAGEFULLFN) \FILLINSPP (\ALLOCATE.ETHERPACKET LOCF \ADDBASE) +\CoerceToDisplayDevice (\GETDEVICEFROMNAME ERROR) CL:MOST-NEGATIVE-SINGLE-FLOAT (CL::%%FLOAT) +RECREDECLARE1 (/PUTHASH) SPY.MERGEINFO (FASSOC) CL:LEAST-NEGATIVE-SINGLE-FLOAT (CL::%%FLOAT) CLISPAND1 + (SELECTQ CLISPAND1 FLAST EVERY) MAKEKEYLST (NCONC MAPCAR LIST CONCAT U-CASE L-CASE KWOTE LISTGET PLUS +) \3MBSENDPACKET (\DTEST UNFOLD LLSH - RAND \GETPACKETBUFFER ADD1 \BOXIPLUS LOCF \ADDBASE SELECTC) +\PROMPTWINDOW.OPENFN (WINDOWPROP OPENWINDOWS REATTACHPROMPTWINDOW) \PARSE.REMOTE.FILENAME ( +UNPACKFILENAME.STRING STRPOS \LEAF.STRIP.QUOTES \CANONICAL.HOSTNAME ERROR LISPERROR CONS CONCATLIST +NCONC LIST SELECTQ NCHARS) FASL::DUMP-GENERAL-ARRAY (CL:ARRAY-TOTAL-SIZE CL:ARRAY-ELEMENT-TYPE +CL:MAKE-ARRAY) CLISPFOR2 (DREVERSE SELECTQ RPLACA NEGATE) \CURSOR.DEFPRINT (PRIN1) \INITBCPLDISPLAY ( +FUNCTION STREAMP) XCL::MAKE-VARIABLE-DEFINITION (CL:NREVERSE) SPY.MAX (SPY.MAX IMAX) +*WHO-LINE-ACTIVE-TIMER* (SETUPTIMER) \DSCCOUT (SELECTC \SYNCODE GETHASH \GETBASEBYTE PLUS FFETCHFIELD +IPLUS LOGAND LOGOR SELCHARQ \STOPSCROLL? FREPLACEFIELD FRPTQ IDIFFERENCE MOD IMOD DSPBOUT SHOULDNT) +\POSTSCRIPT.NSHASH (CHARCODE.DECODE) ARGLIST (\CCODEARGLIST GETPROP SELECTQ ARGLIST FNCHECK) +FW-UPDATE-OFD-WINDOWS (MAPC SELECTQ FW-UPDATE-OFD-WINDOW SHOULDNT CONS) \PROMPTWINDOW.SET.HEIGHT ( +IDIFFERENCE WINDOWPROP MAINWINDOW CONS) \CREATEDISPLAY (FUNCTION) WFROMDS (TEXTOBJ \GETDISPLAYDATA +\DTEST \OUTSTREAMARG \GETSTREAM TTYDISPLAYSTREAM WFROMDS OPENWINDOWS CREATEW) FASL::DUMP-BIT-ARRAY ( +CL:ARRAY-TOTAL-SIZE) CLISPFOR0A (CONS NCONC COPY EVAL) CL:1- (-) COMP.SHIFT (FIXP LIST COMP.STCONST +APPLY* SELECTQ IMINUS IDIFFERENCE SUB1 COMP.STFN) \FTP.UNPACKFILENAME (UNPACKFILENAME.STRING SELECTQ +CONS LIST \CANONICAL.HOSTNAME NCHARS CONCAT GETHOSTINFO NTHCHARCODE SUBSTRING L-CASE \FTP.ADD.USERINFO +) \FREESTACKBLOCK (IPLUS PLUS \EXTENDSTACK IMOD \SETUPGUARDBLOCK IDIFFERENCE) CL:SINGLE-FLOAT-EPSILON +(CL::%%FLOAT CL:ASH) XCL::IN-PROFILE (XCL::PROFILIZE XCL:RESTORE-PROFILE) \MEDW.CLOSEW (.WHILE.TOP.DS. + DSPDESTINATION \GETBASE \TOTOPWDS) \STKNAME (\GETBASEPTR + TIMES CL:1-) GETWINDOWUSERPROP (LISTGET +\INSUREWINDOW) CL:SINGLE-FLOAT-NEGATIVE-EPSILON (CL::%%FLOAT) \SETUP-ENVIRONMENT-CALL (STACKADDBASE +\VAG2 - UNFOLD LLSH \GETBASEPTR + PLUS \FREESTACKBLOCK LOGOR ADD1 SUB1) \ICONW.FORMAT.TITLE ( +\ICONW.FORMAT.TITLE1 LENGTH PLUS IDIFFERENCE IQUOTIENT) CL:ASH (LSH) XCL::RECORD-ACCESS-MACRO (DECLARE +) DISPLAYSTREAMINIT (DSPCREATE DSPFONT FONTHEIGHT ITIMES IDIFFERENCE IQUOTIENT FONTDESCENT) +CL:MOST-POSITIVE-SINGLE-FLOAT (CL::%%FLOAT) DELETE.LONG.SEGMENT (DELETE.LONG.SEGMENT1) COMPILER::GENCODE-SETQ + (COMPILER::GENCODE COMPILER::SETQ-VALUE) COLLECTKEYS (FUNCTION) SEDIT::GET-MENU (FREEMENU) +\LEAF.READFILENAME (\LEAF.READFILEPROP GetBcplString CL:APPLY MKATOM U-CASE) DINFO.GET.FILENAME ( +PACKFILENAME FILENAMEFIELD) FTPPRINTMARK (FASSOC PRIN1 MARK#) \EVALOTHER (SPREADAPPLY* FASSOC TYPENAME +) CL:PI (CL::%%FLOAT) BSP.PUTINTERRUPT (\DTEST WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. +FUNCTION SETUPTIMER ALLOCATE.PUP IPLUS) CHAT.EMACS.MOVE (CURSORPOSITION IDIFFERENCE IQUOTIENT MKSTRING + IMINUS) DRIBBLE (DRIBBLEFILE OPENSTREAM) FW-PERCENTAGE (IQUOTIENT ITIMES) CLISPCOND1 (CLISPIFY1 FLAST + APPEND) \EVALVAR (\STKSCAN \GETBASEPTR FAULTEVAL) \3MBENCAPSULATE (IPLUS FOLDHI LRSH) +\SETUP.DEFAULT.LINEBUF (\NODIRCOREFDEV FUNCTION \OPENFILE) \MEDW.OPENW (UNINTERRUPTABLY UNFOLD LLSH +.WHILE.TOP.DS. DSPDESTINATION \GETBASE \TOTOPWDS) CHANGEBACKGROUND (OPENWINDOWS \CLOSEW1 DREVERSE +\OPENW1) CL:ATANH (ABS CL:IMAGPART CL:REALPART CL:ERROR CL:* CL:LOG / + - FLOAT FQUOTIENT) +PUTPROPS.PRETTYPRINT (DSPXPOSITION PRINTDEF MEMB) MAYBE.PRETTYPRINT.BOLD (CHANGEFONT PRIN2) +SEDIT::CREATE-COMMENT-WORD-NODES (NCHARS NTHCHARCODE SEDIT::CREATE-COMMENT-WORD-NODE SUBSTRING ADD1 +SUB1 CONS) \3MBGETPACKET (\READRAWPBI \ALLOCATE.ETHERPACKET ADD1 LOCF \ADDBASE) \OPENW1 (WINDOWOP +SPREADAPPLY* \INSUREWINDOW) \ICONW.SHOW.TITLE (BITMAPCOPY WINDOWPROP DSPCREATE) +SI::DISABLE-CLOSURE-CACHE (UNINTERRUPTABLY) \LINEBUF.PEEKBIN (\BUFFERED.PEEKBIN CL:FUNCALL) +COMPILER::TRANSFORM-GET/PUT-BASE (COMPILER::CALL-ARGS CL:FIRST CL:SECOND COMPILER::LITERAL-VALUE +COMPILER::MAKE-CALL COMPILER::MAKE-OPCODES LIST COMPILER::CALL-FN CL:THIRD COMPILER::NODE-META-P) +\PROMPTWINDOW.PAGEFULLFN (WINDOWPROP MAINWINDOW \PROMPTWINDOW.EXPAND ADD1) \MOVE.WINDOWS.ONTO.SCREEN ( +FQUOTIENT MAINWINDOW IMAX IDIFFERENCE FIXR FTIMES) CROPMARK.DISPLAYFN (IMAGEOBJPROP DSPSCALE IMAX FIXR + FTIMES SELECTQ IMAGESTREAMTYPE BITBLT DSPXPOSITION DSPYPOSITION + DRAWLINE) CLISPFOR1 (GETPROP +CLISPFUNCTION? CONS LIST NLEFT APPEND NCONC LISTP /NCONC /ATTACH CLISPFOR1) CL:ATAN (CL::%%ATAN-FLOAT +FLOAT CL::COMPLEX-REALPART CL::COMPLEX-IMAGPART ABS COMPLEX - CL:* CL:LOG / + CL:ERROR) +\FTP.OPENFILE.FROM.PLIST (\GETFTPCONNECTION SELECTQ MARK# FTPPUTMARK FTPGETMARK READPLIST +\FTP.PACKFILENAME ASSOC \FTPERROR LISPERROR \FTP.EOL.FROM.PLIST) FAULTEVAL (GETMACROPROP +MACROEXPANSION LIST \EVAL GET CL:FUNCALL GETD \EVALFORMASLAMBDA NEWFAULT1 OLDFAULT1) FILEARRAYBASE ( +\ADDBASE LOCAL IPLUS UNFOLD LLSH FOLDLO LRSH IDIFFERENCE GETFILEPTR OUTPUT) \ADDLEAFSTRING (CEIL +LOGAND IPLUS CONSTANT SUB1 LOGXOR STRINGP MKSTRING \ADDBASE FOLDLO LRSH \DECRYPT.PWD.CHAR \GETBASEBYTE + PLUS) DINFO.OPENTEXTSTREAM (RESETFORM TTYDISPLAYSTREAM GETPROMPTWINDOW WINDOWPROP LIST DINFOGRAPH +PRIN1 OPENTEXTSTREAM) FTPDEBUG (CREATEW FUNCTION WINDOWPROP FONTCREATE) CL:ASINH (CL:LOG + CL:SQRT CL:* + FLOAT) \FILLBSPPUP (ALLOCATE.PUP) \FTP.ASSURE.CLEANUP (FIND.PROCESS ADD.PROCESS) \LINEBUF.READP ( +READP \PAGEDREADP) COMP.RPLACD (SELECTQ COMP.DELPUSH COMP.STPOP COMP.STFN) CLISPAND (CLISPCOND CONS +LDIFF SOME CLISPAND1 FLAST) XCL::ADD-PROTOTYPE-FN (CL:ASSOC CL:FUNCTION CL:ACONS LIST CONS) CL:BOOLE ( +LOGNOT LOGAND CL:LOGIOR LOGXOR CL:LOGEQV CL:LOGNAND CL:LOGNOR CL:LOGANDC1 CL:LOGANDC2 CL:LOGORC1 +CL:LOGORC2 CL:ERROR) \EVALFORMASLAMBDA (.EVALFORM.) \CLOSEW1 (WINDOWOP SPREADAPPLY* \INSUREWINDOW) +SEDIT::UNDO-COMMENT-CHANGE (FREPLACEFIELD CONS LIST FFETCHFIELD SEDIT::PARSE-STRING-INTO-WORDS +SEDIT::CREATE-SIMPLE-NODE PLUS FLENGTH SEDIT::NOTE-CHANGE) SI::INSTALL-CLOSURE-CACHE (UNINTERRUPTABLY) + \LINEBUF.EOFP (\EOFP FDEVOP SPREADAPPLY*) APPLY (.APPLY. FAULTAPPLY SPREADAPPLY .SPREAD. SPREADAPPLY* +) XCL::MAKE-PROTOTYPE (CL:ASSOC CL:FUNCTION CL:FUNCALL) TTNEXTPOS (TTNEXTCHAR) \CREATELINEBUFFER ( +\OPENFILE FUNCTION NCREATE) INVERT.BITMAP.VERTICALLY (BITMAPCOPY SUB1 IQUOTIENT IDIFFERENCE BITMAPBIT +PLUS) CL:CLEAR-INPUT (CLEARBUF \GETSTREAM) APPLY* (ARG SELECTQ SPREADAPPLY* SPREADAPPLY .SPREAD. LIST +PLUS FAULTAPPLY) /CNDIR (LIST DIRECTORYNAME CNDIR) SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::CLOSE-NODE + SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW PRIN1 CL:THIRD CL:MAPCAR CL:FUNCTION CL:NREVERSE +FREPLACEFIELD CONS FFETCHFIELD LIST COPY SEDIT::COLLECT-UNDO-BLOCK) TRIM.BITMAP (SUB1 PLUS +BITMAPCREATE ADD1 IDIFFERENCE) LINEBUFFER-SKIPSEPRS (\GETSTREAM \GTREADTABLE PEEKCCODE CHARACTER +SKIPSEPRS) DINFO.SHOWSEL (TEDIT.NORMALIZECARET TEDIT.SETSEL TEDIT.FIND NCHARS) TTGIVEHELP1 (INPART +TERPRI) \CKAPPLYARGS (\MYALINK OPCODES STACKGETBASEPTR \GETBASEPTR STACKADDBASE \VAG2 IDIFFERENCE CONS +) XCL::%%MAKE-FUNCTION-PROTOTYPE (LIST) CHAT.MENU (WINDOWPROP LOGAND CHAT.RECONNECT TOTOPW \CARET.DOWN + MENU APPEND MAPCAR STREAMPROP) LINEBUFFER-EOFP (\GETSTREAM \PAGEDEOFP \EOFP SPREADAPPLY*) EQFMTSPEC ( +EQUALALL) CLISP4 (GETPROP STRPOSL NTHCHAR ADD1 DWIMIFY0? STKPOS APPLY STKARGS STKEVAL) DEFEVAL (FASSOC + DREMOVE CONS) RECORDTRAN (GETLOCALDEC RECORDWORD ASSOC CONS SELECTQ ACCESSDEF MAKEACCESS MKPROGN +ALLFIELDS RECORDECL RECLOOK LIST RECORDBINDVAL RECORD.TYPECHECK RECORD.NAME MAKECREATE0 HASHLINKS +FIXFIELDORDER RECORDBIND MAPCAR DREVERSE ACCESSDEF4 RECORDERROR CSUBST RECORD.ALLOCATIONS CHANGETRAN1 +EMBEDPROG) FILES.WHENCHANGED (MARKASCHANGED FILECOMS) \PROMPTWINDOW.EXPAND (HEIGHTIFWINDOW TIMES +FONTPROP WINDOWPROP \PROMPTWINDOW.SET.HEIGHT) CL:CEILING (CL::%%INTEGER-COERCE-MACRO) CLISPIF2 (FLAST +NLEFT) EVALV (\STACKARGPTR \EVALV1) CHAT.HOLD (WINDOWPROP UNTILMOUSESTATE ZEROP LOGAND) CL:CLOSE ( +LOGAND CONSTANT LOGOR DELFILE CL:NAMESTRING ERROR) XCL::*PROFILES* (CL:MAKE-HASH-TABLE) CL:ACOSH (CL:LOG + + CL:* CL:SQRT / - FLOAT) \MEDW.CREATEW (DSPCREATE BITMAPCREATE BITSPERPIXEL UNFOLD LLSH IPLUS +IDIFFERENCE DSPLINEFEED) \STOPDISPLAY (ADD1 PAGEHEIGHT) XCL::PROTOTYPE-DEFINERS-FOR-TYPE (CL:MAPCAR +CL:FUNCTION CL:ASSOC) XCL::PROTOTYPE-DEFN-TYPES (CL:MAPCAN CL:FUNCTION) CL:COMMONP (TYPEP) +\FIXPASSWORD (\INTERNAL/GETPASSWORD SELECTC LIST) \EVALV1 (\GETBASEPTR \STKSCAN) \SPP.SYSPKT ( +\FILLINSPP LOGOR) OPENWINDOWS (MAPCONC OPENWINDOWS \INSURESCREEN CONS DREVERSE) CL:COSH (CL:EXP / + +CL::%%EXP-FLOAT FQUOTIENT) SPY.UPDATE.TITLE (NODELST/AS/MENU WINDOWPROP CONS LASTMOUSEX LASTMOUSEY +DSPCLIPPINGREGION DOWINDOWCOM CONCAT QUOTIENT TIMES UNTILMOUSESTATE ZEROP LOGAND) \WRITE1 (PRINTDEF +POSITION \PRINDATUM \GETSTREAM) \LEAF.DIRECTORYNAMEONLY (FILENAMEFIELD STRPOS SUBATOM SUB1) +FASL::DUMP-SIMPLE-VECTOR (CL:LENGTH) CL:COUNT (CL:LENGTH COMPLEX-COUNT SIMPLE-COUNT) CLISPCOND (CONS +CLISPCOND1 CLISPIFY2 NCONC APPEND) \SETVAR (LISPERROR \STKSCAN \DTEST \HILOC) COMP.LABELS (MAPCAR CONS + COMP.GENFN CL:FLET COMP.TOPLEVEL.COMPILE COMP.EXPR WALK-FORM FUNCTION) \PRINTCCODE (\OUTCHAR +\GETSTREAM IGEQ \ILLEGAL.ARG) CL:CIS (COMPLEX CL::%%SIN-FLOAT CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) +\DEFINEDISPLAYINFO (ASSOC CONS) \GR.METHODEXPANDER (LISTGET GETDEF PACK* SELECTQ ERROR SHOULDNT APPLY +SUBPAIR LIST CONCAT) TTBEFOREPOS (BEFOREBUF BUFTAILP ILESSP) PRINTCCODE (\OUTCHAR \GETSTREAM IGEQ +\ILLEGAL.ARG) \PERIODICALLY-WHO-LINE-SHOW-ACTIVE (SETUPTIMER) TWOD.TRACKCURSOR (LOGAND LASTMOUSEX +LASTMOUSEY STRINGWIDTH CL:FUNCALL ADD1 IDIFFERENCE) \SETFVARSLOT (\MYALINK OPCODES \ADDBASE +GETSTKNAMEENTRY NTSLOT-VARTYPE GETSTKNTOFFSETENTRY ADDSTACKBASE \VAG2 IPLUS UNFOLD LLSH \LOLOC +NTSLOT-OFFSET LOGAND CONSTANT WORDSPERNAMEENTRY) SEDIT::EXPAND (SEDIT:GET-PROMPT-WINDOW +GETPROMPTWINDOW PRIN1) \MOVETO.HCPYMODE (\DSPYPOSITION.HCPYMODE) CL:DECODE-FLOAT (FLOAT CL:VALUES +\MAKEFLOAT CL:1- -) PROG (PLUS .CALLAFTERPUSHINGNILS. IPLUS CEIL LOGAND ADD1 UNFOLD LLSH CONSTANT SUB1 + LOGXOR FOLDHI LRSH \PROG0) CL:COPY-READTABLE (CMLRDTBL \DTEST COPYREADTABLE) CL:DECODE-UNIVERSAL-TIME + (CL:FLOOR - + CL:* \DTSCAN CL:MOD \ISDST? CL:1+ CL:VALUES) SEDIT::CREATE-COMMENT-WORD-NODE ( +SEDIT::CREATE-SIMPLE-NODE) COMPILER::GENCODE-RETURN (COMPILER::RETURN-BLOCK COMPILER::BLOCK-FRAME +COMPILER::RETURN-VALUE COMPILER::BLOCK-CONTEXT COMPILER::BLOCK-BLIP-VAR) \PROG0 (\MYALINK OPCODES +ADDSTACKBASE \VAG2 CEIL LOGAND IPLUS IDIFFERENCE UNFOLD LLSH CONSTANT SUB1 LOGXOR \PUTBASEPTR \EVPROG1 + PLUS FOLDLO LRSH \ATOMVALINDEX NTYPX \LOLOC SHOULDNT WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY) +CL:COUNT-IF (CL:LENGTH COMPLEX-COUNT-IF SIMPLE-COUNT-IF) REATTACHPROMPTWINDOW (WINDOWPROP) +FINDFILE-WITH-EXTENSIONS (UNPACKFILENAME.STRING SELECTQ INFILEP PACKFILENAME.STRING CONS REMOVE) +MAINWINDOW (\INSUREWINDOW WINDOWPROP) CLISPIF3 (CONS APPEND) PRINTLEVEL (CONS) GREETFILENAME (SELECTQ +UNIX-GETENV INFILEP FINDFILE-WITH-EXTENSIONS APPEND PROMPTFORWORD STRPOS U-CASE SUBSTRING ADD1 +MKSTRING SUB1 CONS PACKFILENAME.STRING CONCATLIST SUBPAIR LIST SUBST) \UPDATE-WHO-LINE-ACTIVE-FLAG ( +WINDOWPROP BLTSHADE DIFFERENCE) PRINT-CIRCLE-LABEL-P (DECLARE GETHASH) PFI.MAYBE.PP.DEFINITION ( +GET-ENVIRONMENT-AND-FILEMAP PFCOPYBYTES) \TEST.PARAGRAPH.LOOKS (FCHARACTER BIN CONSTANT CHARACTER) +CL:DELETE-IF (CL:LENGTH COMPLEX-DELETE-IF SIMPLE-DELETE-IF) CL:DELETE-IF-NOT (CL:LENGTH +COMPLEX-DELETE-IF-NOT SIMPLE-DELETE-IF-NOT) \EVPROG1 (\EVAL) INVERT.BITMAP.HORIZONTALLY (BITMAPCOPY +SUB1 IQUOTIENT IDIFFERENCE BITMAPBIT PLUS) CL:ARRAY-RANK (LENGTH CL:ERROR) \SMASHRETURN (\MYALINK +OPCODES SI::UNWIND THIS.PROCESS RELSTK CL:ERROR PROCESSPROP) INITIALIZEDISPLAYSTREAMS (BITMAPCREATE +FONTCREATE FONTCLASS LIST) CLISPIF1 (CONS LDIFF DWIMERRORRETURN LIST) CL:DELETE-FILE (CL:PROBE-FILE +INTERLISP-NAMESTRING) GO (\MYALINK OPCODES FUNCTION FMEMB STACKGETBASEPTR \GETBASEPTR STACKADDBASE +\VAG2 \PUTBASEPTR IPLUS) PRINT-CIRCLE-ENTER (DECLARE) CreateCursorBitMap (BITMAPCREATE LOGAND ELT ADD1 + PLUS) \SPP.SENDPKT (SEQ.GREATERP ILESSP \LOLOC IDIFFERENCE SETUPTIMER UNFOLD LLSH) EVALA (\DTEST PLUS + .CALLAFTERPUSHINGNILS. IPLUS CEIL LOGAND ADD1 UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDHI LRSH \EVALA) +CL:DELETE-DUPLICATES (CL:LENGTH COMPLEX-DELETE-DUPLICATES SIMPLE-DELETE-DUPLICATES) CL:ARRAY-TOTAL-SIZE + (CL:ERROR) CLISP3C (RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +PACK FRPLACD) \EVALA (\MYALINK OPCODES ADDSTACKBASE \VAG2 CEIL LOGAND IPLUS IDIFFERENCE UNFOLD LLSH +CONSTANT SUB1 LOGXOR FOLDLO LRSH \PUTBASEPTR \ATOMVALINDEX NTYPX \LOLOC SHOULDNT PLUS +WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY \EVAL) CL:DEPOSIT-FIELD (BYTE-SIZE CL:BYTE-POSITION +CL::%%MAKE-BYTE-MASK-1 CL:LOGIOR LOGAND LOGNOT) COMPILER::IS-CALL-TO (COMPILER::CALL-FN +COMPILER::VAR-REF-VARIABLE COMPILER::VARIABLE-SCOPE COMPILER::VARIABLE-KIND COMPILER::VARIABLE-NAME) +SET-DOCUMENTATION (GETHASH HASH-TABLE-FOR-DOC-TYPE) CL:COUNT-IF-NOT (CL:LENGTH COMPLEX-COUNT-IF-NOT +SIMPLE-COUNT-IF-NOT) INVERT.LONG.SEGMENT (TTBEFOREPOS) DSPRUBOUTCHAR (\DTEST \OUTSTREAMARG \GETSTREAM +\DSPMOVELR) SEDIT::COPY-HASH-TABLE (CL:MAPHASH CL:FUNCTION) DPB (BYTE-SIZE CL:BYTE-POSITION CL:LOGIOR +CL:ASH LOGAND CL::%%MAKE-BYTE-MASK-1 CL::%%MAKE-BYTE-MASK-0) COMPILER::ENSURE-EFFECT-CONTEXT ( +COMPILER:CONTEXT-VALUES-USED PACK* PLUS) MAKE-CONCATENATED-STRING-INPUT-STREAM ( +CL:MAKE-STRING-INPUT-STREAM CL:FIRST CL:APPLY) FASL::DUMP-SYMBOL (CL:SYMBOL-NAME CL:SYMBOL-PACKAGE +CL:PACKAGE-NAME) PUTTEXTPROP (SELECTQ TEXTOBJ LISTGET LIST) DASSEM.CLEANFNTEST (GETPROP FMEMB SELECTQ) + CL:ENCODE-UNIVERSAL-TIME (+ SELECTQ SUB1 TIMES IDIFFERENCE IQUOTIENT PLUS IREMAINDER) +FTP.BREAKCONNECTION (CONS LIST CLOSEBSPSTREAM) SMASHFILECOMSLST (MAPC GETATOMVAL) CL:DISASSEMBLE ( +PRINTCODE CL:COMPILE CL:SYMBOL-FUNCTION) COMPILER::GENCODE-PROGN (MAP COMPILER::PROGN-STMTS COMPILER::GENCODE +) \TEST.CHARACTER.LOOKS (FCHARACTER BIN IDIFFERENCE GETFILEPTR CONSTANT CHARACTER SELECTQ) +%%MAKE-INITIAL-STRING-STREAM-CONTENTS (CL:MAKE-ARRAY) CL:GETHASH (GETHASH) FW-RECALL-CMD (LIST MENU +MAPCAR KWOTE REMOVE) ERRORSET (CONS CL:CATCH LIST \EVAL) TITLEDICONW (LIST FONTCREATE BITMAPCOPY +STRINGWIDTH \ICONW.FORMAT.TITLE IMAX LRSH WIDTHIFWINDOW HEIGHTIFWINDOW TIMES LENGTH FONTPROP +BITMAPCREATE FOLDHI IPLUS - CREATEREGION LLSH ICONW FUNCTION MKSTRING) XCL::WHERE-IS-GET-WRITE-DATE ( +CL:ASSOC HASH-FILE:GET-HASH-FILE) SI::NLSETQ-PROCEED-CASE (MAKE-PROCEED-CASE) +CL::STRUCTURE-POINTER-SLOTS (CL::PS-POINTER-DESCRIPTORS CL:MAPCAN CL:FUNCTION CL:MAPCAR CL::PS-ALL-SLOTS +) \PRINT-USING-DEFPRINT (TYPENAME FASSOC IDIFFERENCE CL:FUNCALL \PRINT-USING-ADDRESS \PRINDATUM) +SI::NLSETQHANDLER (ABORT) CL:DIRECTORY (RESETLST RESETSAVE \GENERATEFILES DIRECTORY.FILL.PATTERN +CL:NAMESTRING \GENERATENEXTFILE PATHNAME LIST) \PRINSTACKP (IPLUS CONSTANT NCHARS STKNAME \NATOMCHARS +FFETCHFIELD \PNAMECELL \ATOMCELL FRESHLINE \OUTCHAR) MAKE-FILL-POINTER-OUTPUT-STREAM ( +%%MAKE-INITIAL-STRING-STREAM-CONTENTS DECLARE \ILLEGAL.ARG FUNCTION) FILE-STREAM-POSITION (GETFILEPTR) + \PRINSTRING (IPLUS \NSTRINGCHARS FFETCHFIELD SUB1 ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE + FRESHLINE \OUTCHAR \SOUT) SI::ERRORSET-PRINT-FUNCTION (PRIN1) COMP.TAGBODY (COMP.BIND.VARS COMPERROR +CONS COMP.STTAG FASSOC COMP.EFFECT COMP.UNBIND.VARS) \CKPOSBOUT (IPLUS FRESHLINE \OUTCHAR) +COMPILER::GENCODE-OPCODES (DECLARE) LET (PLUS .CALLAFTERPUSHINGNILS. IPLUS CEIL LOGAND ADD1 UNFOLD +LLSH CONSTANT SUB1 LOGXOR FOLDHI LRSH \LET0) LOADUP (MAPC TERPRI FMEMB LIST SMASHFILECOMS) \CKPOSSOUT +(IPLUS \NSTRINGCHARS FFETCHFIELD FRESHLINE SUB1 ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE) +%%BROADCAST-STREAM-DEVICE-BOUT (\BOUT) CLISP3 (GETPROP CLISPIFY2C LIST ARGTYPE GETP CONS CLISPIFY1 +SHOULDNT CLISP3A) \LET0 (\MYALINK OPCODES ADDSTACKBASE \VAG2 CEIL LOGAND IPLUS IDIFFERENCE UNFOLD LLSH + CONSTANT SUB1 LOGXOR \PUTBASEPTR \EVPROG1 PLUS FOLDLO LRSH \ATOMVALINDEX NTYPX \LOLOC SHOULDNT +WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY \EVAL) \SPP.OTHER.BOUT (\BOUT SPPOUTPUTSTREAM \SPP.STREAM.LOST +) CL:FILE-AUTHOR (GETFILEINFO COERCE) XCL::WHERE-IS-SET-WRITE-DATE (XCL::WHERE-IS-NOTICE-INTERNAL +CL:FILE-WRITE-DATE) CL:FCEILING (CL::%%INTEGER-COERCE-MACRO) TTGIVEHELP2 (PRIN1 SPRINTT) \AB.BACK ( +LENGTH \LOLOC \HILOC IGEQ \ADDBASE \VAG2 \GETBASE LOADBYTE LOGAND LSH IMINUS MASK.1'S SUB1 LIST UNFOLD + LLSH) FASL::DUMP-CHARACTER (DECLARE CL:CHAR-CODE FASL::HANDLE-STREAM BOUT BOUT16) CL:DOCUMENTATION ( +GETHASH HASH-TABLE-FOR-DOC-TYPE) CL:FILE-LENGTH (GETEOFPTR) \LITPRIN (ALLOCSTRING FIND-EXTERNAL-SYMBOL + \LITPRIN.INTERNAL PACKAGE-NAME-AS-SYMBOL IPLUS \NATOMCHARS FFETCHFIELD \PNAMECELL \ATOMCELL FRESHLINE + SELECTQ ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE + - <=) \BSPEVENTFN (SELECTQ +\BSP.CLOSE.OPEN.SOCKETS \REMOVEDEVICE.NAMES) \LET* (\MYALINK OPCODES ADDSTACKBASE \VAG2 CEIL LOGAND +IPLUS IDIFFERENCE UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDLO LRSH \ATOMVALINDEX NTYPX \LOLOC SHOULDNT +\PUTBASE PLUS IMINUS WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY \PUTBASEPTR \EVPROG1 \EVAL) +SEDIT::PARSE-INDENT-GROUPS (LIST CL:LENGTH SEDIT::PARSE-INDENT-BODY SEDIT::PARSE-INDENT-NAME) +CL:FILE-WRITE-DATE (CL:PROBE-FILE) %%BROADCAST-STREAM-DEVICE-OUTCHARFN (\OUTCHAR) \SPY.INTERRUPT ( +\MYALINK OPCODES LLSH) COND (LISPERROR \EVAL \EVPROGN) LET* (PLUS .CALLAFTERPUSHINGNILS. IPLUS CEIL +LOGAND ADD1 UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDHI LRSH \LET*) CL:FILL (CL:LENGTH) +\ADJUSTABLE-STRING-STREAM-OUTCHARFN (CL:CHARACTER PLUS FFETCHFIELD) \EVPROGN (\EVAL) COMP.RETURN-FROM +(COMP.RETURN FASSOC CONS) CL:FILE-NAMESTRING (PATHNAME CL:CONCATENATE MKSTRING %%PATHNAME-VERSION) +\DURATIONTRAN (\CLISPKEYWORDPROCESS CONSTANTEXPRESSIONP \CanonicalizeTimerUnits LIST TYPENAMEP EVAL +LISTGET GETDEF CONS SUBPAIR GETPROP) PROG1 (\EVAL) CL:DESCRIBE (CL:VALUES) CL:FFLOOR ( +CL::%%INTEGER-COERCE-MACRO) CL:FILE-POSITION (GETFILEPTR) ENDLOADUP (RECORDPRIORITY COPY OPENP +PRINTOUT CLOSEF TERPRI FILEPKGCHANGES CLRPROMPT) FGETD (GETD) HASHBEFORECLOSE (ASSOC FULLNAME DREMOVE) + SEDIT::DO-MUTATION (NLSETQ CL:FUNCALL) SEDIT::EVAL-SELECTION (SEDIT::GET-SELECTED-STRUCTURE +CL:COPY-TREE SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW PRIN1 RESETFORM TTY.PROCESS PROCESS.EVAL +PROCESS.EVALV) %%NEW-FILE (CLOSEF OPENSTREAM) %%CONCATENATED-STREAM-DEVICE-PEEKBIN (FFETCHFIELD +\PEEKBIN) %%BROADCAST-STREAM-DEVICE-CHARSETFN (ACCESS-CHARSET) CLISPIF (GETVARS DWIMUNDOCATCH LISTGET1 + LIST RESETVARS .RESETLST. CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION CL:CATCH XNLSETQ +CLISPIF0) TTRACKMOUSE (ZEROP LOGAND CURSORPOSITION - IQUOTIENT TTNTHLINE FCHARWIDTH CHARWIDTH LRSH +TTNEXTCHAR FRPLNODE CONS) \TEDIT.PUT.CHARLOOKS (IDIFFERENCE LOGAND LRSH \BOUT LOGOR GETHASH) PUTDQ? ( +PUTD) PREDICT-NAME (CL:PROBE-FILE CL:NAMESTRING) SEDIT::DELETE-WORD (SEDIT::CLOSE-NODE) +*WHO-LINE-OLD-TIME* (DATE) %%CONCATENATED-STREAM-DEVICE-CLOSEFILE (CLOSEF) +%%CONCATENATED-STREAM-DEVICE-BIN (FFETCHFIELD \BIN) FIND-EXTERNAL-SYMBOL (MKSTRING \CREATECELL) +SEDIT::SET-SELECTION-COMMENT-WORD (IPLUS SEDIT::COMMENT-LENGTH SUB1 SEDIT::SIMPLE-STRING-SCAN +SEDIT::COMPUTE-SELECTION-POSITION-COMMENT) %%CONCATENATED-STREAM-DEVICE-EOFP (FFETCHFIELD) +CL:ENOUGH-NAMESTRING (PATHNAME %%PATHNAME-HOST %%PATHNAME-DEVICE %%PATHNAME-DIRECTORY %%PATHNAME-NAME +%%PATHNAME-TYPE %%PATHNAME-VERSION) COMP.RETURN (CONS) PACKAGE-NAME-AS-SYMBOL (CL::%%PACKAGE-NAMESYMBOL +) %%CONCATENATED-STREAM-DEVICE-BACKFILEPTR (\BACKFILEPTR) \LEAF.ERROR (SELECTC LISPERROR ERROR CONCAT +\GETLEAFSTRING LOCF \ADDBASE \IFSERRORSTRING TERPRI) ENVEVAL (\STACKARGPTR \EVAL) FASL::DUMP-VALUE-FETCH + (FASL::WRITE-OP FASL:DUMP-VALUE) CL:FLOAT-DIGITS (CL::%%NOT-FLOAT-ERROR) CL:FIND-IF (CL:LENGTH +COMPLEX-FIND-IF SIMPLE-FIND-IF) \LITPRIN.INTERNAL (\NATOMCHARS FFETCHFIELD \PNAMECELL \ATOMCELL +\SYMBOL.ESCAPE.COUNT IMINUS IPLUS + IABS \NSTRINGCHARS FRESHLINE ADD1 \GETBASEFAT \GETBASE +\GETBASETHIN \GETBASEBYTE \OUTCHAR CHCON1 SELECTQ \SYNCODE GETHASH - <=) \SEND.ANSWERING.RFC ( +ALLOCATE.PUP LOCF IPLUS UNFOLD LLSH \ADDBASE) GETTEXTPROP (SELECTQ LISTGET) BACKSPACEDEL (CHARACTER +ECHOCONTROL) SEDIT::SCALE-INDENT (+ CL:* CL:1- SEDIT::SCALE-INDENT CONS) \DSPXPOSITION.HCPYMODE (FIXR +FQUOTIENT) CL:FLOAT-PRECISION (CL:INTEGER-LENGTH + CL::%%NOT-FLOAT-ERROR) DOFILESLOAD (FULLNAME CONS +PACKFILENAME.STRING NCONC ROOTFILENAME SELECTQ FINDFILE FINDFILE-WITH-EXTENSIONS CL:CERROR LIST LOAD +CL:FUNCALL MKLIST EVAL CHCON1 PACK* EVALV) \SPPWATCHER (LIST FUNCTION THIS.PROCESS SETUPTIMER +WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. NSOCKETEVENT IQUOTIENT TIMES \SPP.HANDLE.INPUT +\SPP.SYSPKT ILESSP \LOLOC IDIFFERENCE IMAX - CLOCKDIFFERENCE) ENVAPPLY (\STACKARGPTR .APPLY. +FAULTAPPLY SPREADAPPLY .SPREAD. SPREADAPPLY*) CL:EVERY (%%EVERY-SINGLE %%EVERY-MULTIPLE CONS) +%%BROADCAST-STREAM-DEVICE-FORCEOUTPUT (MAPC FORCEOUTPUT) ENSURE.RGB (\LOOKUPCOLORNAME ERROR) +\FTP.NEXTFILE (ERROR SPREADAPPLY* FTPGETMARK MARK# \FTPERROR READPLIST ASSOC \FTP.PACKFILENAME HELP) +SEDIT::SIMPLE-STRING-SCAN (NCHARS ADD1 NTHCHARCODE IPLUS CHARWIDTH IDIFFERENCE SUB1) CLISP3B ( +CLSTOPSCAN? ILESSP) %%ECHO-STREAM-DEVICE-BIN (%%TWO-WAY-STREAM-DEVICE-BIN) XCL::WHERE-IS-READ-COMS ( +RESETLST RESETSAVE RESETUNDO) CL:FTRUNCATE (CL::%%INTEGER-COERCE-MACRO) \DSPCOLOR.IP (ENSURE.RGB +SETRGB.IP) RECORDPRIORITY (RECLOOK RECORDECL SELECTQ RECORD.PRIORITY FNTH ASSOC /RPLACA CONS) FUNCTION + (LIST STKNTH ERROR) PERIODICALLYRECLAIM (\DAYTIME0) *PACKAGE-FROM-INDEX* (CL:MAKE-ARRAY) +\FTP.FILEINFOFN (\FTP.GETFILEINFO.FROM.PROPS) %%SYNONYM-STREAM-DEVICE-CLOSEFILE (DREMOVE) +CHAT.DID.RESHAPE (CHAT.SCREENPARAMS TERM.RESET.DISPLAY.PARMS) \FUNCT1 (\MYALINK OPCODES ADDSTACKBASE +\VAG2 CEIL LOGAND IPLUS IDIFFERENCE UNFOLD LLSH CONSTANT SUB1 LOGXOR \EVAL PLUS FOLDLO LRSH +\ATOMVALINDEX NTYPX \LOLOC SHOULDNT WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY \MAKESTACKP) +ROTATE.BITMAP.RIGHT (BITMAPCREATE SUB1 IDIFFERENCE BITMAPBIT PLUS) GETDUMMYVAR (RPLACD LIST GENSYM +CONS) \MAKESTACKP (CREATECELL) CL:FIND-IF-NOT (CL:LENGTH COMPLEX-FIND-IF-NOT SIMPLE-FIND-IF-NOT) CL:GCD + (CL::%%GCD ARG) CL:FROUND (CL::%%INTEGER-COERCE-MACRO) FIX89A (STRPOS CONS CONCAT SUBSTRING SUB1 ADD1 +) TWODINSPECT.MAKEREGIONS (WINDOWPROP STRINGWIDTH DSPLINEFEED WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV + XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES TWODINSPECT.COLUMNWIDTHS LENGTH IPLUS LIST PLUS +CREATEREGION LAST DIFFERENCE) TERM.RESET.DISPLAY.PARMS (\DTEST DEFAULTFONT DSPFONT FONTPROP CHARWIDTH ++ ITIMES IQUOTIENT WINDOWPROP - CL:FUNCALL) %%SYNONYM-STREAM-DEVICE-OUTCHARFN ( +%%SYNONYM-STREAM-DEVICE-GET-STREAM) \SYMBOL.ESCAPE.COUNT (ADD1 \GETBASEFAT \GETBASE \GETBASETHIN +\GETBASEBYTE \SYNCODE GETHASH PLUS - \NATOMCHARS FFETCHFIELD \PNAMECELL \ATOMCELL) COMP.GO (FASSOC +CONS) %%SYNONYM-STREAM-DEVICE-EOFP (\EOFP FDEVOP SPREADAPPLY* %%SYNONYM-STREAM-DEVICE-GET-STREAM) +COMPILER::GENCODE-MV-CALL (COMPILER::MV-CALL-FN COMPILER::MV-CALL-ARG-EXPRS CL:FLET COMPILER::VARIABLE-NAME + COMPILER::VAR-REF-VARIABLE) \MAKEFUNARGFRAME (PLUS .CALLAFTERPUSHINGNILS. IPLUS CEIL LOGAND ADD1 +UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDHI LRSH \FUNCT1) \TEDIT.BRAVOFILE? (GETFILEPTR +\TEST.PARAGRAPH.LOOKS FULLNAME CONS PACKFILENAME MKATOM TEDIT.GETINPUT FINDFILE) +%%SYNONYM-STREAM-DEVICE-BOUT (\BOUT %%SYNONYM-STREAM-DEVICE-GET-STREAM) CL:GET-OUTPUT-STREAM-STRING ( +ERROR %%MAKE-INITIAL-STRING-STREAM-CONTENTS) %%SYNONYM-STREAM-DEVICE-GET-INDIRECT-STREAM ( +CL:SYMBOL-VALUE XCL:SYNONYM-STREAM-SYMBOL) INVERT.BITMAP.DIAGONALLY (BITMAPCREATE SUB1 BITMAPBIT PLUS) + STKEVAL (\STACKARGPTR \EVAL) \STRING-STREAM-OUTCHARFN (FREPLACEFIELD PLUS FFETCHFIELD CL:VECTOR-PUSH +CL:CHARACTER) CL:FLOAT-SIGN (MINUSP - CL::%%NOT-FLOAT-ERROR) XCL::WHERE-IS-NAMESTRING (CL:NAMESTRING +CL:MAKE-PATHNAME CL:PATHNAME-NAME CL:PATHNAME-TYPE) \NUMERIC.PNAMEP (+ - SUB1 IPLUS MKSTRING ADD1 +\GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE SELCHARQ IEQP) STKAPPLY (\STACKARGPTR .APPLY. +FAULTAPPLY SPREADAPPLY .SPREAD. SPREADAPPLY*) FASL::SAVE-VALUE (FASL::HANDLE-HASH) DSPEOLFN ( +\GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM) CROPMARK.CREATE (IMAGEOBJCREATE LIST NUMBERP CONCAT) +CL:GET-INTERNAL-REAL-TIME (CLOCK) \SEND.ENDREPLY (SENDPUP \FILLRTPPUP) SI::UNWIND (MINUSP \MYALINK +OPCODES \GETBASEPTR ADDSTACKBASE \VAG2 \DISCARDFRAME) %%SYNONYM-STREAM-DEVICE-BIN (\BIN +%%SYNONYM-STREAM-DEVICE-GET-STREAM) \AB.NEXT (LENGTH \LOLOC \HILOC IGEQ \VAG2 \GETBASE LOADBYTE LOGAND + LSH IMINUS MASK.1'S SUB1 LIST UNFOLD LLSH IDIFFERENCE \ADDBASE) TEDIT.COPY (TEDIT.PROMPTPRINT +\SHOWSEL TEDIT.SELECTED.PIECES FUNCTION TEDIT.DO.BLUEPENDINGDELETE IMIN ADD1 \TEDIT.INSERT.PIECES +IDIFFERENCE IMAGEOBJPROP IPLUS) BRACKET.CURRENT.WORD (WORDSEPRP \SYNCODE GETHASH \GETBASEBYTE +FIRSTCHAR TTNEXTCHAR BEFOREBUF BUFTAILP CONS) RETEVAL (\STACKARGPTR CL:MULTIPLE-VALUE-PROG1 \EVAL) +CL:HASH-TABLE-COUNT (HARRAYPROP) SEDIT::SET-SELECTION-COMMENT (SEDIT::SET-SELECTION-ME +SEDIT::SET-SELECTION-NOWHERE) %%SYNONYM-STREAM-DEVICE-CHARSETFN (ACCESS-CHARSET +%%SYNONYM-STREAM-DEVICE-GET-STREAM) INTERACT&SHIFT.BITMAP.LEFT (RNUMBER SHIFT.BITMAP.LEFT) RETAPPLY ( +\STACKARGPTR CL:MULTIPLE-VALUE-PROG1 .APPLY. FAULTAPPLY SPREADAPPLY .SPREAD. SPREADAPPLY*) +\DSPSPACEFACTOR.HCPYMODE (FIXR FTIMES CHARWIDTH) CL:GET-SETF-METHOD (CL:VALUES LIST GENSYM +CL::SETF-ERROR LOCAL-MACRO-FUNCTION CL:GET-SETF-METHOD CL:FUNCALL GET CL::GET-SIMPLE-SETF-METHOD +CL::GET-SHARED-SETF-METHOD) TTRUBOUT (BACKWARD.DELETE.TO TTNLEFT BEEP PREVLINE MOVE.TO.WHEREVER) +%%SYNONYM-STREAM-DEVICE-BACKFILEPTR (\BACKFILEPTR %%SYNONYM-STREAM-DEVICE-GET-STREAM) +%%SYNONYM-STREAM-DEVICE-READP (READP %%SYNONYM-STREAM-DEVICE-GET-STREAM) +CL:GET-SETF-METHOD-MULTIPLE-VALUE (CL:VALUES LIST GENSYM CL::SETF-ERROR LOCAL-MACRO-FUNCTION +CL:GET-SETF-METHOD CL:FUNCALL GET CL::GET-SIMPLE-SETF-METHOD CL::GET-SHARED-SETF-METHOD) +%%CONCATENATED-STREAM-DEVICE-CHARSETFN (ACCESS-CHARSET) CLISPIFY2D (NTHCHAR) COPYVM (RESETVARS +.RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \COPYSYS) \LEAF.GETFILEDATES ( +\LEAF.READFILEPROP UNFOLD LLSH) %%TWO-WAY-STREAM-DEVICE-BIN (\BIN) BLIPVAL (\MYALINK OPCODES +\STACKARGPTR \VAROFFSET \GETBASEPTR IDIFFERENCE PLUS UNFOLD LLSH ADD1 SUB1) TEDIT.CHARWIDTH (SELECTC +\SYNCODE GETHASH \GETBASEBYTE IPLUS LOGAND CHARWIDTH LOGOR SELCHARQ IMAX SHOULDNT) FIX89 (LIST) +\TEDIT.GET.PARALOOKS (\SMALLPIN SUB1 LLSH IDIFFERENCE ELT) SEDIT::SIMPLE-STRING-OFFSET (SEDIT::STRINGWIDTH + SUBSTRING) \VAROFFSET (GETSTKNAMEENTRY NTSLOT-VARTYPE GETSTKNTOFFSETENTRY IPLUS UNFOLD LLSH +NTSLOT-OFFSET LOGAND ADDSTACKBASE \VAG2 PLUS CONSTANT WORDSPERNAMEENTRY) *WHO-LINE-TIMER* (SETUPTIMER +DIFFERENCE REMAINDER IDATE) CL:GET-INTERNAL-RUN-TIME (CLOCK) \CHECKFLTFMT (FIXP LISPERROR) SETBLIPVAL +(\MYALINK OPCODES \STACKARGPTR \VAROFFSET \GETBASEPTR IDIFFERENCE PLUS UNFOLD LLSH ADD1 \PUTBASEPTR +SUB1) %%SYNONYM-STREAM-DEVICE-SETFILEINFO (SETFILEINFO %%SYNONYM-STREAM-DEVICE-GET-STREAM) \MAPCHARS ( +\MAPPNAME FUNCTION) BLIPSCAN (\MYALINK OPCODES \STACKARGPTR SELECTQ \VAROFFSET \GETBASEPTR \MAKESTACKP +) SPY.END (BITBLT) \DRAWPOINT.IP (BITMAPWIDTH BITMAPHEIGHT - ITIMES CONSTANT IQUOTIENT) +CL:INTEGER-LENGTH (- CL:MACROLET + CL:INTEGER-LENGTH CL:ASH) \CONVERTTOFRACTION (FIX FTIMES CONSTANT +FLOAT EXPT IDIFFERENCE CREATECELL) %%TWO-WAY-STREAM-DEVICE-READP (READP) FASL::LOOKUP-VALUE ( +FASL::HANDLE-HASH GETHASH) \TEDIT.PEEKBIN.NEW.PAGE (\GETSTREAM OPENFILE SPREADAPPLY* \PEEKBIN LOGOR +UNFOLD LLSH \PAGEDBIN \PAGEDPEEKBIN IMIN IDIFFERENCE) ALISTS.GETDEF (ASSOC GETTOPVAL LIST) GETVARS ( +STKPOS STKNARGS FSTKNTH STKARGNAME VARIABLES STKARG APPEND NCONC MAPCAR GETVARS1) \RTP.ERROR (PRIN1) +\FTP.CLOSEFILE (SPREADAPPLY* SELECTC FTPGETMARK MARK# \FTP.FLUSH.TO.EOC .FTPDEBUGLOG. \GETSTREAM +BSPINPUTSTREAM FTPPUTMARK FTPGETCODE LISPERROR) %%TWO-WAY-STREAM-DEVICE-BACKFILEPTR (\BACKFILEPTR) +%%SYNONYM-STREAM-DEVICE-PEEKBIN (\PEEKBIN %%SYNONYM-STREAM-DEVICE-GET-STREAM) INSPECT (TYPENAME +INSPECT/DATATYPE \APPLYINSPECTMACRO APPLY* SELECTQ INSPECT/ATOM INSPECT/LISTP INSPECT/ARRAY +INSPECT/HARRAYP INSPECT/BITMAP INSPECTCODE INSPECT/TYPELESS \GETDTD \ADDBASE ITIMES NTYPX INSPECT/HUNK + PRIN1) \REALFRAMEP (SELECTQ \STKARG CHCON1 EXPRP FASSOC) SETTIME (DAYTIME) PRINTNUM-TO-STRING ( +GLOBALRESOURCE SELECTQ LISPERROR \CONVERT.FLOATING.NUMBER FLOAT \CHECKFLTFMT \CONVERTNUMBER FIXP FIXR +IABS IMINUS IGREATERP IDIFFERENCE NCHARS CONCAT ALLOCSTRING GETRESOURCE NEWRESOURCE) +%%SYNONYM-STREAM-DEVICE-FORCEOUTPUT (FORCEOUTPUT %%SYNONYM-STREAM-DEVICE-GET-STREAM) +%%TWO-WAY-STREAM-DEVICE-EOFP (\EOFP FDEVOP SPREADAPPLY*) CL:GET-DECODED-TIME (CL:DECODE-UNIVERSAL-TIME + CL:GET-UNIVERSAL-TIME) \IPCURVE2 (ELT FIX FQUOTIENT \WIDTHFROMBRUSH + - \VISIBLE.IP ILEQ FIXR SUB1 +POLYEVAL \FLOATBOX OPCODES ADD1 IPLUS EQP IMINUS FDIFFERENCE FPLUS IDIFFERENCE FTIMES ABS LRSH PLUS +MASKSTROKE.IP LLSH) LISPERROR (PLUS \LISPERROR) WHO-LINE-TIME (IDATE SETUPTIMER DIFFERENCE REMAINDER +CONSTANT GDATE) \SETUP.TYPENUM.TABLE (\ALLOCBLOCK FOLDHI LRSH IPLUS FIXP PACK* LOCAL PLUS \GETDTD +\ADDBASE ITIMES) SEDIT::SET-POINT-COMMENT (NCHARS NTH ADD1 SEDIT::COMMENT-LENGTH SUB1 +SEDIT::SET-POINT-NOWHERE) CL:HASH-TABLE-P (TYPENAMEP) \SystemERROR (SELECTQ GETTOPVAL RAID LISPERROR) +\NET.SETTIME (SELECTQ \PUP.SETTIME \NS.SETTIME) CTEXTPROP (LIST TERPRI CGETTEXTPROP) READIMAGEOBJ ( +ASSOC LISTGET CONCAT LIST IMAGEOBJCREATE ENCAPSULATEDIMAGEFNS FULLNAME GETFILEPTR PLUS APPLY*) CL:ISQRT + (CL:ERROR CL:INTEGER-LENGTH CL:ASH CL:1- +) POSTSCRIPT.INIT (CL:REMOVE-DUPLICATES NCONC MAPCONC +MAPCAR ASSOC EVALV RPLACD FONTUNPARSE FREPLACEFIELD CONS FFETCHFIELD MAPC CL:NTHCDR NCONC1 +FONTSAVAILABLE APPLY CL:MAKE-ARRAY CL:AREF PLUS FUNCTION HARRAY \POSTSCRIPT.NSHASH) \SAVEVMBACKGROUND +(\COUNTREALPAGES RESETLST RESETSAVE CURSOR SAVEVM) \SPP.CREATE.STREAMS (\SPP.CREATE.STREAM FUNCTION +CONS FFETCHFIELD) %%TWO-WAY-STREAM-DEVICE-FORCEOUTPUT (FORCEOUTPUT) \TRANSMIT.STRATEGY (IMIN IQUOTIENT + ILEQ LSH PLUS FFETCHFIELD SELECTC LIST BSPHELP) %%TWO-WAY-STREAM-DEVICE-BOUT (\BOUT) CL:LCM (CL:ERROR + CL::%%LCM ARG) %%TWO-WAY-STREAM-DEVICE-CLOSEFILE (DREMOVE) CLISPIFY2 (STKPOS CLISPIFY2B) SELECTQ ( +APPLY SELECTQ1 EVAL) COMP.PROG (MAPCAR COMPERROR CONS COMP.BIND.VARS COMP.LOOKFORDECLARE APPEND +SELECTQ COMP.STTAG FASSOC COMP.UNBIND.VARS) \EVALFORM (.EVALFORM. SPREADAPPLY .SPREAD. SPREADAPPLY* +GETHASH FAULTEVAL) COMPILER::GENCODE-LET (COMPILER::LAMBDA-REQUIRED COMPILER::LITERAL-VALUE +COMPILER::VARIABLE-SCOPE CL:MAPCAR CL:FUNCTION CL:NREVERSE CL:THIRD COMPILER::VARIABLE-LAP-VAR) +PFI.MERGE.INDICES (NCONC SELECTQ ALPHORDER CONCAT LIST) NOTIMP (HELP) \GC.HANDLEOVERFLOW ( +UNINTERRUPTABLY \ADDBASE \GETDTD ITIMES IDIFFERENCE \DORECLAIM \GETBASE NTYPX \LOLOC \FIXP.FROM.FLOATP + IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR ADD1 IPLUS) CGETTEXTPROP (SELECTQ) VRULE.PUTFN ( +IMAGEOBJPROP PRINT) ROTATE.BITMAP.LEFT (BITMAPCREATE SUB1 IDIFFERENCE BITMAPBIT PLUS) CL:LISTEN (READP + \GETSTREAM) \DRAWLINE.IP (DRAWDASHEDLINE \WIDTHFROMBRUSH - MIN + MAX LIST MASKSTROKE.IP FQUOTIENT +SETXY.IP) \DTEST.UFN (NTYPX \GETDTD \ADDBASE ITIMES SELECTQ \INDEXATOMPNAME \FLOAT \GETSTREAM +STKNTHNAME \DTEST LISPERROR \COERCEFONTDESC \LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR +CL::RATIO-DENOMINATOR SMALLP \MAKENUMBER ERROR \LISPERROR CONCAT) XCL::WHERE-IS-DEFAULT-DEFINE-TYPES ( +CL:MAPCAN CL:FUNCTION) VRULE.COPYFN (VRULE.CREATE IMAGEOBJPROP) +%%FILL-POINTER-STREAM-DEVICE-GETFILEPTR (CL:LENGTH) CL:INTEGER-DECODE-FLOAT (FLOAT CL:VALUES + CL:ASH +-) DUMMYDEF (GETD) CL:LISP-IMPLEMENTATION-VERSION (CL:CONCATENATE CL:STRING-CAPITALIZE MKSTRING) +\SEND.ABORT (ALLOCATE.PUP IPLUS) \FTP.DIRECTORYNAMEP (\FTP.RECOGNIZEFILE) \BACKTRACE (NUMFORMATCODE +LIST PRIN1 PLUS \STKNAME) SETUPSTACK (IQUOTIENT \SETUPSTACK1 IDIFFERENCE \SETUPGUARDBLOCK) \MAKENUMBER + (.COERCE.TO.SMALLPOSP. IGEQ \ILLEGAL.ARG SELECTC \VAG2) XCL::WHERE-IS-FILES (CL:MAPCAN CL:FUNCTION +LIST) TTCRLF.ACCOUNT (ADD1 + SUB1 DSPYPOSITION) \FTP.ADD.QUOTES (STRPOS CONS SUBSTRING ADD1 NCHARS +CONCATLIST DREVERSE) %%INITIALIZE-CLSTREAM-TYPES (FUNCTION) \SETBSPTIMEOUT (SETUPTIMER IMAX) PRINTFN ( +FINDFNDEF TERPRI) LAPRD (PEEKC READ GETP ERROR APPLY*) \STKARG (\INTERPFRAMENT \FRAMESCAN ILEQ IPLUS +UNFOLD LLSH SUB1 FOLDLO LRSH GETSTKNAMEENTRY \ADDBASE SELECTC NTSLOT-VARTYPE GETSTKNTOFFSETENTRY +SHOULDNT NTSLOT-OFFSET LOGAND IDIFFERENCE STACKADDBASE \VAG2 STACKGETBASEPTR \GETBASEPTR) CLISPIFY2C ( +CLISPIFY1 GETPROP CONS) BACKTRACE (RESETFORM OUTPUT \BACKTRACE \STACKARGPTR LOGAND FUNCTION) +%%SYNONYM-STREAM-DEVICE-GETFILEINFO (GETFILEINFO %%SYNONYM-STREAM-DEVICE-GET-STREAM) LDB (BYTE-SIZE +CL:BYTE-POSITION LOGAND CL:ASH - CL::%%MAKE-BYTE-MASK-1) COMP.LAMBDA (CONS KWOTE COMP.EFFECT SELECTQ +COMP.PROGN SUBPAIR COMP.GENFN ARGTYPE MAPCAR COMP.CALL COMP.LAM1 LIST COMP.BIND.VARS +COMP.LOOKFORDECLARE APPEND COMP.UNBIND.VARS) CL:LOGANDC1 (LOGAND LOGNOT) PFI.MAYBE.SEE.PRETTY ( +RESETLST DISPLAYP PFCOPYBYTES COPYALLBYTES STREAMP LIST OPENSTREAM PRETTYFILEINDEX FULLNAME) \HUNKFIT? + (IQUOTIENT FOLDLO LRSH IREMAINDER TERPRI) SCREENBITMAP (\ILLEGAL.ARG) \GCMAPTABLE (UNINTERRUPTABLY +\ADDBASE \GETDTD ITIMES NTYPX \GETBASE \LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR +CL::RATIO-DENOMINATOR IDIFFERENCE ADD1 IPLUS \DORECLAIM PLUS) GETVARS1 (SELECTQ LAST GETVARS1) +DEFAULT.INSPECTW.PROPCOMMANDFN (SELECTQ MENU ERSETQ ITEMOFPROPERTYVALUE GETPROMPTWINDOW RESETSAVE +\ITEMW.FLIPITEM LIST TTYDISPLAYSTREAM TTY.PROCESS THIS.PROCESS CLEARBUF printout PRIN1 CL:FUNCALL +LISPXREAD INSPECTW.REPLACE INSPECT) RADIX (\CHECKRADIX \INVALID.RADIX) WHO-LINE-SHOW-ACTIVE ( +SETUPTIMER) SEDIT::CONVERT-COMMENT-TAIL (LIST NTHCHARCODE) \DSPRIGHTMARGIN.HCPYMODE (FIXR FQUOTIENT) +\INTERPRETER (ARG SUB1 \MISCAPPLY* FUNCTION CLOSURE-ENVIRONMENT CLOSURE-FUNCTION +.CALLAFTERPUSHINGNILS. SELECTQ \INTERPRETER-LAMBDA IPLUS ADD1 IDIFFERENCE LISPERROR CEIL LOGAND UNFOLD + LLSH CONSTANT LOGXOR FOLDHI LRSH \INTERPRETER1 \STACKARGPTR SPREADAPPLY .SPREAD. LIST PLUS FAULTAPPLY +) FILEPATCHBLOCK (BOUT16 BOUTZEROS UNFOLD LLSH IDIFFERENCE) CL:LDB-TEST (LDB) SPY.START (QUOTIENT) +SMALLP (SELECTC NTYPX) SAVEDEF (MAPCAR SAVEDEF GETFILEPKGTYPE GETD GETTOPVAL GETDEF FASSOC CONS LIST) +CL:LOGNOR (LOGNOT CL:LOGIOR) COLLECTDESCENDENTS (RESETLST RESETSAVE RECURSIVE.COLLECTDESCENDENTS) +TWODINSPECT.PRINTELEMENT (ADD1 DIFFERENCE STRINGWIDTH IPLUS PRIN2) SEDIT::CONVERT-COMMENT-STRUCTURE ( +EQMEMB CONS NCHARS LIST CONCATLIST SEDIT::CONVERT-COMMENT-TAIL) \DSPFONT.HCPYMODE (\GETFONTDESC +FONTCOPY IMINUS FIXR FTIMES \FGETCHARWIDTH \FGETWIDTH \GETBASE \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH + \CHARSET LRSH \CREATECHARSET \CHAR8CODE LOGAND) FIXP (\TYPEMASK.UFN LRSH) CL:LOGNAND (LOGNOT LOGAND) +\SPP.DEFAULT.ERRORHANDLER (SELECTQ ERROR GETSPPCON FFETCHFIELD \COURIER.OUTPUT.ABORTED \EOF.ACTION) +DOAROUNDEXITFORMS (MAPC SELECTQ ERSETQ \EVAL) CL::%%ATAN-FLOAT (FLOAT - FQUOTIENT UFMINUS + CL:*) +\BSP.SENDBUFFER (IPLUS PLUS FFETCHFIELD SUB1 IDIFFERENCE IMINUS SENDPUP) CL:LOGCOUNT (LOGNOT +CL::%%LOGCOUNT CL::%%BIGNUM-LOGCOUNT) FLOATP (SELECTC NTYPX) \FTP.FROM.LISP.ATTRIBUTE (SELECTQ) +SEDIT::PARSE-INDENT-NAME (SEDIT::GET-INDENT) \FTP.GENERATEFILES (RESETLST UNPACKFILENAME.STRING +\CANONICAL.HOSTNAME MKATOM NCHARS GETHOSTINFO CHCON1 NTHCHARCODE CONCAT STRPOS SUBSTRING L-CASE MAPCAR + NCONC \FTP.FROM.LISP.ATTRIBUTE LIST CONS \INTERNAL/GETPASSWORD \GETFTPCONNECTION MARK# FTPPUTMARK +FTPGETMARK SETUPTIMER FUNCTION DIRECTORY.MATCH.SETUP) COMP.SETN (CONS COMP.SETQ) LITATOM (OPCODES) +TEDIT.NEW.FONT (\TEDIT.MAKEFILENAME TEDIT.GETINPUT NCONC1 LIST KWOTE U-CASE) \PRINTFRAME (CONSTANT +NTHCHAR PRIN1 IPLUS PSTKFLD TERPRI \SCANFORNTENTRY MAKE-NTENTRY ADDSTACKBASE \VAG2 \GETBASEPTR \HILOC +FLOOR LOGAND LOGXOR SUB1 PLUS) %%SYNONYM-STREAM-DEVICE-GET-STREAM (CL:SYMBOL-VALUE) LISTP (NTYPX) +CGETD (GETD) \SEND.RFC (ALLOCATE.PUP IPLUS UNFOLD LLSH LOCF \ADDBASE TIMES) \FTP.GETFILENAME (SELECTQ +\FTP.RECOGNIZEFILE PACKFILENAME SHOULDNT) \PRINTBF (SUB1 \SCANFORNTENTRY TERPRI MAKE-NTENTRY +GETBASEPTR \GETBASEPTR PLUS SPACES) ARRAYP (SELECTC NTYPX) INSPECTW.CREATE (MAKE-INSPECTOR-PROFILE +WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES DEFAULTFONT +APPLY* \INSPECTW.VALUE.MARGIN MAPCAR IMIN IMAX STRINGWIDTH DECODE.WINDOW.ARG IPLUS ITIMES LENGTH +FONTHEIGHT \INSPECT.COMPUTE.TITLE FUNCTION INSPECTW.REDISPLAY) VIDEORATE (SELECTC SELECTQ \ILLEGAL.ARG +) TTYINBUFFERPEEK (\EOF.ACTION FIRSTCHAR) PFI.CHOOSE.BEST (CL:STABLE-SORT) \TEDIT.COMMAND.RESET.SETUP +(PROCESSPROP THIS.PROCESS TEXTPROP CREATEW TTYDISPLAYSTREAM FUNCTION TXTFILE LIST) CL:LOGANDC2 (LOGAND + LOGNOT) SORT1 (SORT1) CL:LOGIOR (ARG CL::%%LOGIOR) VRULE.IMAGEBOXFN (DSPSCALE) \DRAWARC.IP ( +\DRAWARC.GENERIC) STACKP (SELECTC NTYPX) CL:LOGEQV (ARG) \SCANFORNTENTRY (IPLUS GETSTKNAMEENTRY +GETSTKNTOFFSETENTRY \INDEXATOMVAL \VAG2 LRSH LOGAND PLUS CONSTANT WORDSPERNAMEENTRY +WORDSPERNTOFFSETENTRY) CL::%%INV-2-SQRT3 (CL::%%FLOAT) VARS (CALLS) MAKENEWCOM (GETFILEPKGTYPE COPY +APPLY* SELECTQ CONS LIST MAKENEWCOM DEFAULTMAKENEWCOM) MERGE (LIST CONS FRPLACA FRPLACD SELECTQ +ALPHORDER APPLY*) CL:MACHINE-VERSION (SELECTQ MACHINETYPE CL:FORMAT SUBSTRING GDATE + IDATE CL:* +MICROCODEVERSION REALMEMORYSIZE) CLISPIFY1 (NLEFT LAST NCONC FLAST LIST NTHCHARCODE CLISPIFY2 LDIFF +NCONC1) \PRINTSTK (GETBASE \GETBASE ADD1 SPACES) DECODE/WINDOW/OR/DISPLAYSTREAM (DISPLAYSTREAMP EVALV +SET CREATEW ERROR LIST) PRINTTIMER (IDIFFERENCE CLOCKDIFFERENCE IMINUS TERPRI) COMP.SETQ ( +COMP.LOOKUPVAR ASSOC) CHARACTER (\CHARCODEP IGEQ \ILLEGAL.ARG WITH-RESOURCE \PUTBASECHAR \PUTBASEFAT +\PUTBASE \PUTBASETHIN \PUTBASEBYTE \MKATOM GETRESOURCE NEWRESOURCE ALLOCSTRING \ADDBASE IDIFFERENCE) +SEDIT::PARSE-STRING-INTO-WORDS (NCHARS NTHCHARCODE CONS SUBSTRING ADD1 SUB1) CL:MACHINE-TYPE (SELECTC +UNIX-GETPARM UNIX-GETENV MKSTRING MACHINETYPE) %%TWO-WAY-STREAM-DEVICE-CHARSETFN (ACCESS-CHARSET) +\COMPUTE.HUNK.TYPEDECLS (ALLOCAL LIST PACK* UNFOLD LLSH SUB1 PLUS) SPY.TOGGLE (RESETFORM CURSOR +SPY.TREE SPY.START) FIXCONTINUE1 (GETPROP) TTPRIN1 (+ NTHCHARCODE PLUS CHARWIDTH L-CASECODE - BLTCHAR +TTYDISPLAYSTREAM) \LEAF.RECONNECT (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +\OPENLEAFCONNECTION) PRIN2 (\GETSTREAM \GTREADTABLE \OUTTERMP .FILELINELENGTH. SELECTC) DF ( +NLAMBDA.ARGS ED ERROR) \DSPLEFTMARGIN.HCPYMODE (\DSPRIGHTMARGIN.DISPLAY FIXR FQUOTIENT) +RELEASINGVMEMPAGE (FINDPTRSBUFFER) COMPILER::GENCODE-LABELS (CL:REVAPPEND) LIST* (ARG SUB1 CONS PLUS) +FASSOC (FASSOC) NCONC (ARG SUB1 LAST) CHAT.TYPEOUT.CLOSE (TERPRI WINDOWPROP DEL.PROCESS) +\GETINTEGERPART (LOGAND CONSTANT LLSH IDIFFERENCE ADD1 LRSH EXPT SUB1 IPLUS) VIRGINFN (GETPROP LIST +GETD COPY) \TEDIT.RESTARTFN (OPENTEXTSTREAM TEXTPROP) \DRAWCURVE.IP (LIST LENGTH ERROR +PARAMETRICSPLINE LAST) CL:MAKE-BROADCAST-STREAM (FUNCTION \ILLEGAL.ARG) REQUIREVERSION (CONCAT) +%%INITIALIZE-STANDARD-STREAMS (CL:MAKE-TWO-WAY-STREAM CL:MAKE-SYNONYM-STREAM) CL:COMPILED-FUNCTION-P ( +TYPEP) TTYINBUFFERBIN (\EOF.ACTION FIRSTCHAR) COLLECT.CHILD.NODES (GETNODEFROMID LIST) CLISPATOM ( +CLISPATOM0 DUNPACK LIST PACK FMEMB FLAST LDIFF) CL:MAKE-ECHO-STREAM (FUNCTION CONS) CL:MACHINE-INSTANCE + (SELECTC CL:FORMAT UNIX-GETPARM UNIX-GETENV ETHERHOSTNAME + CL:ASH CL:SECOND CL:THIRD CL:FOURTH) +SEDIT::DEFAULT-EDIT-FN (ED LIST*) WHO-LINE-SYMBOL-SPACE (UNFOLD LLSH CL:1+ FOLDHI LRSH IPLUS CL:THIRD) + INITGC (FOLDHI LRSH IPLUS \ADDBASE SUB1) INVERT.BITMAP.B/W (BITMAPCOPY) CHANGENAME1A (LIST) +CHANGENAME1 (NLSETQ ESUBST GETD CHANGENAME1A CHANGECCODE) COUNT (IPLUS COUNT) CL:MAKE-TWO-WAY-STREAM ( +FUNCTION CONS) CL:LOGTEST (LOGAND) SEDIT::CONVERT-COMMENT (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW +SEDIT::SUBNODE NTH FREPLACEFIELD CONS FFETCHFIELD SEDIT::FIND-COMMENT SEDIT::NEXT-NODE +SEDIT::COLLECT-UNDO-BLOCK PRIN1) INTERACT&SHIFT.BITMAP.DOWN (RNUMBER SHIFT.BITMAP.DOWN) +\CHANGE.ETHER.TRACING (printout PRIN1 LOGAND SELECTQ EVALV) \CLOSEIPSTREAM (ENDMASTER.IP) CL:MAKE-STRING + (MAKE-VECTOR) VRULE.GETFN (VRULE.CREATE READ) CL:MAKE-SYNONYM-STREAM (CL:SYMBOL-VALUE FUNCTION CONS) +INTERACT&SHIFT.BITMAP.UP (RNUMBER SHIFT.BITMAP.UP) XCL::WHERE-IS-NOTICE ( +XCL::WHERE-IS-DEFAULT-DEFINE-TYPES COPYFILE HASH-FILE:MAKE-HASH-FILE HASH-FILE:OPEN-HASH-FILE +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION PATHNAME HASH-FILE::HASH-FILE-STREAM) FIXCONTINUE ( +GETHASH ASKUSER ITIMES LIST RETDWIM2 RETDWIM) MAP (APPLY*) CL:LOGORC1 (CL:LOGIOR LOGNOT) CL:LOGORC2 ( +CL:LOGIOR LOGNOT) APROPOS (DISPLAYSTREAMP GETSTREAM PRINTLEVEL MAPATOMS) WHO-LINE-SET-TIME ( +WHO-LINE-COPY-INSERT SETTIME) HASH-TABLE-FOR-DOC-TYPE (GETHASH GETFILEPKGTYPE CL:MAKE-HASH-TABLE) +LOGNOT (LOGXOR) SEDIT::PARSE-INDENT-BODY (LIST* CL:FIRST CL:SECOND LIST CONS CL:NREVERSE) +WRITEPRINTERPORT (OPCODES) ESUBST (LIST EDIT4F FUNCTION) CL:MAKE-RANDOM-STATE (CL::%%MAKE-RANDOM-STATE + CL::RANDOM-STATE-I CL::RANDOM-STATE-J COPY-ARRAY CL::RANDOM-STATE-ARRAY CL:ERROR) CLDISABLE (L-CASE +GETP SELECTQ GETPROP RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +/SETATOMVAL REMOVE GETATOMVAL MAKEBITTABLE LISTGET1) READPRINTERPORT (OPCODES) \SEND.END (SENDPUP +\FILLRTPPUP) \FTP.GETFILEINFO (\FTP.GETFILEINFO.FROM.PROPS \FTP.RECOGNIZEFILE LIST +\FTP.FROM.LISP.ATTRIBUTE) CL:MAP (%%MAP-FOR-EFFECT-SINGLE %%MAP-FOR-EFFECT-MULTIPLE CONS +%%MAP-FOR-RESULT-SINGLE %%MAP-FOR-RESULT-MULTIPLE) APROPRINT (SPACES RESETSAVE LIST FUNCTION +DSPLEFTMARGIN DSPXPOSITION POSITION PRIN2 FRESHLINE) CL:MAKE-PATHNAME (PATHNAME %%MAKE-PATHNAME COERCE +) SEDIT::PARSE--COMMENT-WORD (SEDIT::BUILD-PRELINEARIZED-NODE) CL:MASK-FIELD (BYTE-SIZE CL:BYTE-POSITION + LOGAND CL::%%MAKE-BYTE-MASK-1) DO.SHIFTED.SELECTION (LOGAND \CARET.DOWN BUFTAILP COPY.SEGMENT +TTRACKMOUSE LOGOR TTNEXTPOS BRACKET.CURRENT.WORD) \GET-NEXT-RUN (+ CL:ASH) SEDIT::PARSE-INDENT ( +SEDIT::PARSE-INDENT-NAME SEDIT::PARSE-INDENT-GROUPS) \DRAWELLIPSE.HCPYMODE (\DRAWELLIPSE.DISPLAY +\BRUSHCONVERT.HCPYMODE \DASHINGCONVERT.HCPYMODE) CL:NSTRING-CAPITALIZE (WITH-ONE-STRING-ONLY) +\FLOATTOBYTE.UFN (SUB1 LRSH LOGOR LLSH FIX FMIN FMAX \GETBASEFLOATP IPLUS PLUS) FASL::ELEMENTS-IDENTICAL-P + (%%FLATTEN-ARRAY CL:AREF CL:EVERY CL:FUNCTION) CL:NSTRING-DOWNCASE (WITH-ONE-STRING-ONLY +%%STRING-DOWNCASE) CL:MERGE-PATHNAMES (PATHNAME %%PATHNAME-HOST %%PATHNAME-NAME %%PATHNAME-DEVICE +%%PATHNAME-DIRECTORY %%MAKE-PATHNAME %%PATHNAME-TYPE %%PATHNAME-VERSION) \FTP.DELETEFILE (RESETLST +\FTP.UNPACKFILENAME FULLNAME \GETDEVICEFROMNAME FDEVOP SPREADAPPLY* GETHOSTINFO CONS LIST +\GETFTPCONNECTION MARK# FTPPUTMARK FTPGETMARK \FTPERROR READPLIST \FTP.PACKFILENAME ASSOC REVERSE) +INITDATATYPENAMES (\ALLOCBLOCK ADD1 LOCAL \GETDTD \ADDBASE ITIMES \ATOMPNAMEINDEX NTYPX \LOLOC +SHOULDNT COPY UNFOLD LLSH PLUS \PUTBASEPTR) RECURSIVE.COLLECTDESCENDENTS (COLLECT.CHILD.NODES NCONC +CONS RECURSIVE.COLLECTDESCENDENTS) CL:MISMATCH (CL:LENGTH - COMPLEX-COMPARE-BACKWARD +COMPLEX-COMPARE-FORWARD SIMPLE-COMPARE) COMPILER::GENCODE-IF (COMPILER::IF-PRED COMPILER::IF-THEN +COMPILER::IF-ELSE) \BLKFABSMAX.UFN (\GETBASEFLOATP SUB1 FABS IPLUS PLUS) \SHIFT.DOCUMENT (\EDITELT +GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE ADD1 IPLUS CONS MAPCAR SELECTQ TYPENAME NILL +\TEDIT.UNIQUIFY.PARALOOKS) CL:NOTANY (%%NOTANY-SINGLE %%NOTANY-MULTIPLE CONS) \LINEBLT (\ADDBASE +ITIMES MOD IMOD ADD1 IDIFFERENCE LLSH) \BLKFABSMIN.UFN (\GETBASEFLOATP SUB1 FABS IPLUS PLUS) +TEXTSTREAM (WINDOWPROP PROCESS.WINDOW) CL:NSUBSTITUTE-IF (CL:LENGTH COMPLEX-NSUBSTITUTE-IF +SIMPLE-NSUBSTITUTE-IF) SEDIT::PARSE-INDENT-GROUP-BODY (LIST* CL:FIRST CL:ERROR) +%%TWO-WAY-STREAM-DEVICE-PEEKBIN (\PEEKBIN) \CCODEARGLIST (- FOLDLO LRSH + UNFOLD LLSH \CCODEIVARSCAN +\GETBASEPTR MKATOM LIST SUB1 ASSOC PACK* PLUS SELECTQ) TWODINSPECT.ADJUSTSELECTION (WINDOWPROP +WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES STRINGWIDTH +APPLY* IDIFFERENCE ADD1) CL:NSUBSTITUTE-IF-NOT (CL:LENGTH COMPLEX-NSUBSTITUTE-IF-NOT +SIMPLE-NSUBSTITUTE-IF-NOT) PATHNAME (CL:VALUES CL:PARSE-NAMESTRING) SEDIT::SET-POINT-COMMENT-WORD ( +IPLUS SEDIT::COMMENT-LENGTH SUB1 SEDIT::SIMPLE-STRING-SCAN) GETPROP (GETPROPLIST) SAVEONSYSRECLST ( +PRIN1 FUNCTION RECLOOK LIST printout TERPRI) CL:NSTRING-UPCASE (WITH-ONE-STRING-ONLY %%STRING-UPCASE) +FNCHECK (GETD NLSETQ MISSPELLED? FUNCTION SYSTEMTYPE WHEREIS GETP FILECOMSLST PACK* ERROR STKPOS) +CL:MERGE (%%MERGE-LISTS %%SIMPLE-MERGE-LISTS MAKE-SEQUENCE-OF-TYPE + CL:LENGTH %%MERGE-VECTORS %%MERGE + %%SIMPLE-MERGE-VECTORS %%SIMPLE-MERGE) \FTP.MAKEPLIST (\INTERNAL/GETPASSWORD CONS LIST) +\BLKSMALLP2FLOAT.UFN (SUB1 LLSH FLOAT \GETBASE PLUS) CL::%%2-SQRT3 (CL::%%FLOAT) SEDIT::PARSE-INDENT-GROUP + (LIST*) INFILECOMS? (GETFILEPKGTYPE EVALV DREVERSE CONS) PACK* (WITH-RESOURCE \MKATOM SUB1 ARG +NAMESTRING-CONVERSION-CLAUSE PLUS NCHARS ADD1 CL:FIRST IDIFFERENCE SUBSTRING IPLUS GETRESOURCE +NEWRESOURCE ALLOCSTRING) BSPPRINTPUP (PRIN2 IDIFFERENCE PRIN1 SELECTC LIST printout GETBASEBYTE +\GETBASEBYTE TERPRI PRINTPUPDATA) COMP.NOT (OPT.NOTJUMP COMP.PROGLST COMP.STFN) CL:PARSE-NAMESTRING ( +DECLARE UNPACKFILENAME.STRING SUBSTRING + CL:VALUES CL:MAKE-PATHNAME LISTGET +%%MAKE-DIRECTORY-COMPONENT MKATOM) \WWCHANGESCREENSIZE (\INSURESCREEN DREVERSE OPENWINDOWS \CLOSEW1 +\UPDATECACHEDFIELDS WINDOWPROP REVERSE OPENW) \CCODEIVARSCAN (UNFOLD LLSH \INDEXATOMVAL \VAG2 LRSH +LOGAND GETNAMEENTRY CONSTANT SUB1 BYTESPERNAMEENTRY WORDSPERNAMEENTRY LOGOR CODEBASELT \GETBASEBYTE +LOGXOR IPLUS PLUS NTSLOT-VARTYPE GETNTOFFSETENTRY BYTESPERNTOFFSETENTRY CONS NTSLOT-OFFSET) +\TFBRAVO.ADD.NAMEDTAB (IMAGEOBJCREATE LISTGET SUB1 ADD1) CL:PATHNAME-NAME (%%PATHNAME-NAME PATHNAME) +\LEAF.GETFILEINFO (\LEAF.GETFILEINFO.OPEN \IFS.LOOKUPFILE \LEAF.GETFILE) *WHO-LINE-SYMBOL-SPACE* (LIST +) \BLKMAG.UFN (SUB1 LLSH \GETBASEFLOATP IPLUS FPLUS FTIMES PLUS) COMPILER::GENCODE-GO (DECLARE +COMPILER::GO-TAGBODY COMPILER::FIND-SEGMENT COMPILER::GO-TAG COMPILER::TAGBODY-FRAME +COMPILER::TAGBODY-BLIP-VAR) \BLKEXPONENT.UFN (SUB1 \GETBASEFLOATP LLSH PLUS) SPY.FIND.TREE (CONS) +ICONW.SHADE (WINDOWPROP BITMAPCREATE) SEDIT::LINEARIZE-COMMENT (LISTGET NTH IPLUS) TIME.SINCE.PACKET ( +\RCLK \CREATECELL LOCF \ADDBASE IQUOTIENT \BOXIDIFFERENCE) \RTP.HANDLE.RFC (LIST \RTP.ACTION IPLUS +SENDPUP) \FTPEVENTFN (\BSPEVENTFN) INTERACT&SHIFT.BITMAP.RIGHT (RNUMBER SHIFT.BITMAP.RIGHT) INITATOMS +(ALLOCSTRING CHARACTER PLUS \ADDBASE FUNCTION \ATOMDEFINDEX NTYPX \LOLOC SHOULDNT HELP) +SEDIT::SETF-OF-GET-FORMAT (CL:GETHASH REMHASH) \DRAWCURVE.HCPYMODE (\DRAWCURVE.DISPLAY MAPCAR CONS +\BRUSHCONVERT.HCPYMODE \DASHINGCONVERT.HCPYMODE) CL:PEEK-CHAR (DECLARE \GETSTREAM SELECTQ \PEEKCCODE +CL:CODE-CHAR SKIPSEPRCODES \EOF.ACTION CL:CHAR-CODE \ILLEGAL.ARG) SCANFORWARD (U-CASECODE FIRSTCHAR +SUB1VAR TTNEXTCHAR) \BLKFDIFF.UFN (LLSH SUB1 FDIFFERENCE \GETBASEFLOATP PLUS) CL::%%SQRT3 (CL::%%FLOAT +) BSPBOUT (\BOUT \DTEST) CL:PHASE (CL:ATAN CL::COMPLEX-IMAGPART CL::COMPLEX-REALPART) CL:NSUBSTITUTE ( +CL:LENGTH COMPLEX-NSUBSTITUTE SIMPLE-NSUBSTITUTE) \TEDIT.MAKEFILENAME (STRPOSL MKATOM SUBSTRING) +CONSTANTS (HASHARRAY PUTHASH LIST) PPSOC.CURRENT (printout IDIFFERENCE TERPRI) COMP.STCROP (COMP.STFN +SELECTQ) CL:PATHNAME-TYPE (%%PATHNAME-TYPE PATHNAME) \BLKFLOATP2COMP.UFN (SUB1 \ADDBASE LLSH +\GETBASEFLOATP PLUS) MENUWMINSIZEFN (WINDOWPROP ITIMES IPLUS MAXMENUITEMWIDTH IMAX STRINGWIDTH +MENUTITLEFONT CONS WIDTHIFWINDOW HEIGHTIFWINDOW MAXMENUITEMHEIGHT FONTPROP) \BLKPERM.UFN (SUB1 +\GETBASE PLUS) \TEDIT.TEXTBIN.NEW.PAGE (\GETSTREAM OPENFILE \BIN IMIN IDIFFERENCE LOGOR UNFOLD LLSH +\PAGEDBIN) \BLKFMIN.UFN (\GETBASEFLOATP SUB1 IPLUS PLUS) FIXATOM (FINDATOM STKNTH BLIPVAL CLISPATOM +CHCON1 UNPACK EVAL FIXSPELL DUNPACK SOME CONS PACK LDIFF FIXATOM1) CL:PATHNAME-VERSION ( +%%PATHNAME-VERSION PATHNAME) \SPP.CREATE.WATCHER (CREATE.EVENT CREATE.MONITORLOCK ADD.PROCESS LIST +FUNCTION KWOTE) \BLKFPLUS.UFN (LLSH SUB1 FPLUS \GETBASEFLOATP PLUS) \BLKFMAX.UFN (\GETBASEFLOATP SUB1 +IPLUS PLUS) CL:POSITION-IF-NOT (CL:LENGTH COMPLEX-POSITION-IF-NOT SIMPLE-POSITION-IF-NOT) SPY.TREE ( +SPY.MERGE) FIXATOM1 (STKNTH BLIPVAL LOGAND ARGTYPE STKEVAL FIXLISPX/ STKNAME SELECTQ SYSTEMTYPE +REALSTKNTH CONS FMEMB STKARG) CL:PPRINT (TERPRI WRITE CL:VALUES) ADDTOCOM1 (SAVESET GETTOPVAL MEMBER +CONS MERGEINSERT) RECORDECLARATIONS (FUNCTION RECLOOK1 LIST LISPXPRINT APPEND PRETTYVAR1 TERPRI) +MOVEDESCENDENTS (COLLECTDESCENDENTS LIST CREATE.NEW.NODEPOSITION CONS WFROMDS NODEREGION) +\BLKFTIMES.UFN (LLSH SUB1 FTIMES \GETBASEFLOATP PLUS) SEDIT::CHANGE-PACKAGE (SEDIT::CLOSE-NODE +SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW CL:FIND-PACKAGE CL:PACKAGE-USE-LIST PRIN1) CL:PLUSP (>) +\BLKSEP.UFN (LLSH SUB1 IDIFFERENCE IPLUS FPLUS \GETBASEFLOATP FDIFFERENCE PLUS) +XCL::WHERE-IS-NOTICE-INTERNAL (HASH-FILE:GET-HASH-FILE CL:ASSOC) GETMACROPROP (GETPROP) CL::%%ASIN-FLOAT + (CL:ERROR FLOAT CL:* QUOTIENT CL::%%POLYEVAL - UFMINUS) MACROEXPANSION (SELECTQ CONS EXPANDOPENLAMBDA + EXPAND-DEFMACRO SUBPAIR APPLY) CHAT.OPTIONMENU (STREAMPROP APPLY*) CL:POSITION-IF (CL:LENGTH +COMPLEX-POSITION-IF SIMPLE-POSITION-IF) \MISC5.UFN (RAID) CL::%%PRINT-TIMING-ITEM (CL::TIME-FORMAT MAX + /) PRINTPUPQUEUE (IDIFFERENCE TAB PRIN1) COMP.CARCDR (COMP.PROGLST MAPC GETPROP COMP.STFN SELECTQ) +CL:RANDOM (CL:ERROR CL::%%RANDOM) SEDIT::CHANGE-QUOTE (SEDIT::QUOTE-WRAPPER LISTGET SEDIT::NOTE-CHANGE +) FASL::FAT-STRING-P (%%FAT-STRING-ARRAY-P) TTYINBUFFERBACKPTR (NLEFT) MERGEINSERT1 (NTHCHARCODE SUB1 +ADD1) \TAN.OLD (FREMAINDER FTIMES FDIFFERENCE FPLUS POLYEVAL \FLOATBOX OPCODES FQUOTIENT) +\FTP.REGISTER (\ADD-OPEN-STREAM \GETDEVICEFROMNAME) \MISC6.UFN (SELECTQ \FBITMAPBIT.UFN RAID) +\TURN.ON.HUNKING (\SETUP.TYPENUM.TABLE) SEDIT::FORMAT-FROM-INDENT (SEDIT::SCALE-INDENT CL:FIRST +CL:SECOND) \DRAWCIRCLE.HCPYMODE (\DRAWCIRCLE.DISPLAY \BRUSHCONVERT.HCPYMODE \DASHINGCONVERT.HCPYMODE) +SYSTEMTYPE (SYSTEMTYPE) PRINTCURSOR (EVALV TERPRI) SCANBACK (U-CASECODE FIRSTCHAR TTNEXTCHAR +SCANFORWARD ADD1 IMAX IDIFFERENCE) \UPDATECACHEDFIELDS (\SFFixDestination) SEDIT::CHANGE-PRINTBASE ( +SEDIT::CLOSE-NODE SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW PRIN1) \CHARWIDTH.IP (\FGETCHARWIDTH +\FGETWIDTH \GETBASE \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CHARSET LRSH \CREATECHARSET \CHAR8CODE +LOGAND) BLOCKRECORD (DECLARERECORD CONS) CL:PROVIDE (DECLARE CL:SYMBOL-NAME CL:PUSHNEW CL:FUNCTION) +VRULE.DISPLAYFN (IMAGEOBJPROP DSPSCALE FIXR FTIMES DSPXPOSITION DSPYPOSITION ODDP FLENGTH IMAX +IMAGESTREAMTYPE IPLUS LRSH IDIFFERENCE IMIN PLUS) \BLTSHADE.IP (INTERSECTREGIONS CREATEREGION +DSPOPERATION INSURE.B&W.TEXTURE) XCL::SAME-WHERE-IS-DATABASE (CL:FLET XCL::COERCE-TO-PATHAME +CL:PATHNAME-HOST CL:PATHNAME-DEVICE CL:PATHNAME-DIRECTORY CL:PATHNAME-NAME CL:EQUALP CL:PATHNAME-TYPE) + DINFO.CREATE.GRAPH.WINDOW (WINDOWPROP DIFFERENCE CREATEW CREATEREGION RAND) \FTP.DIRECTORYNAMEONLY ( +STRPOS SUBSTRING -) IBLT1 (SUB1 \GETBASE \ADDBASE PLUS) COMPILER:OPTIMIZE-AND-MACROEXPAND ( +COMPILER:OPTIMIZE-AND-MACROEXPAND-1 CL:VALUES) ERRORSTRING (NTH ADD1 NUMBERP) CL:READ-BYTE (\GETSTREAM + SPREADAPPLY* \BIN) CL:VALUES (\VALUES \MYALINK OPCODES \GETBASEBYTE LIST \INDEXATOMDEF \VAG2 LRSH +LOGAND ARG PLUS + - SIGNED SUB1 LLSH IDIFFERENCE CONSTANT \FINDOP) CL::TIME-FORMAT (CL:APPLY) IBLT2 ( +SUB1 \GETBASE \ADDBASE PLUS) \SIMULATE.UNBIND (STACKADDBASE \VAG2 - PLUS \MYALINK OPCODES) +SEDIT::PARSE--COMMENT (LISTGET) %%ARRAY-TYPE-TABLE (%%MAKE-ARRAY-TYPE-TABLE) +\TEDIT.UNPARSE.CHARLOOKS.LIST (LIST ONOFF FONTPROP CONS IABS IMINUS) CL:VALUES-LIST (\VALUES \MYALINK +OPCODES \GETBASEBYTE LIST \INDEXATOMDEF \VAG2 LRSH LOGAND PLUS + - SIGNED SUB1 LLSH IDIFFERENCE +CONSTANT \FINDOP) \PUTONSCREENW (MOVEW IDIFFERENCE WINDOWPROP) %%STRING-DOWNCASE (%%ARRAY-BASE +%%ARRAY-OFFSET %%ARRAY-TYPE-NUMBER) SETERRORN (ERRM-TO-CONDITION) CL:PROBE-FILE (PATHNAME INFILEP +\GETFILENAME) \TEDIT.LOOKS (WINDOWPROP CREATEPOSITION MENU NCONC1 COPY LIST FUNCTION SELECTQ CONS +TEDIT.LOOKS TEDIT.PROMPTPRINT) COMPILER::GENCODE-CATCH (COMPILER::CATCH-TAG COMPILER::CATCH-STMT) +XCL::DEL-WHERE-IS-DATABASE (CL:FIND-IF CL:FUNCTION) \ARG.NOT.LITATOM (LISPERROR) +INTERACT&ADD.BORDER.TO.BITMAP (RNUMBER EDITSHADE ADD.BORDER.TO.BITMAP) \SEND.ACK (ALLOCATE.PUP IMAX +IDIFFERENCE IPLUS ITIMES) STRICTLY/BETWEEN (IGREATERP) CL:READ-FROM-STRING (OPENSTRINGSTREAM SUBSTRING + IMIN NCHARS MKSTRING CL:VALUES CL:READ-PRESERVING-WHITESPACE CL:READ \GETFILEPTR SPREADAPPLY*) +\RTP.HANDLE.PUP (CONCAT GETPUPSTRING RELEASE.PUP APPLY*) \FTP.UNREGISTER (\GENERIC-UNREGISTER-STREAM +\DEVICE-OPEN-STREAMS SPREADAPPLY* \GETDEVICEFROMNAME) %%STRING-UPCASE (%%ARRAY-BASE %%ARRAY-OFFSET +%%ARRAY-TYPE-NUMBER) PREINITARRAYS (\PUTBASEPTR LOCF \ATOMCELL \VAG2 SETQ.NOREF PAGELOC IPLUS LLSH +\HILOC LRSH \LOLOC) CL::VALUES-UFN (\VALUES-UFN \MYALINK OPCODES \GETBASEBYTE LIST \INDEXATOMDEF \VAG2 + LRSH LOGAND + LLSH SUB1 \GETBASEPTR PLUS LOLOC \LOLOC - SIGNED IDIFFERENCE CONSTANT \FINDOP) +XCL::SETF-PACKAGE-PREFIX (CL::%%PACKAGE-NAMESYMBOL CL:INTERN CL:ERROR) TTYINBUFFERDEVICE (FUNCTION) +MAKE-CONDITION (CL:APPLY) CL:REMOVE-IF (CL:LENGTH COMPLEX-REMOVE-IF SIMPLE-REMOVE-IF) +CL::VALUES-LIST-UFN (\GETBASEPTR \VALUES-UFN \MYALINK OPCODES \GETBASEBYTE LIST \INDEXATOMDEF \VAG2 +LRSH LOGAND + LOLOC \LOLOC PLUS - SIGNED SUB1 LLSH IDIFFERENCE CONSTANT \FINDOP) COMPILER::GENCODE-BLOCK + (COMPILER::BLOCK-FRAME COMPILER::BLOCK-END-TAG COMPILER::BLOCK-STK-NUM COMPILER::BLOCK-CONTEXT +COMPILER::MAKE-LAP-VAR COMPILER::BLOCK-BLIP-VAR CL:FLET COMPILER::GENCODE-CLOSED-OVER-BLOCK +COMPILER::BLOCK-STMT) \DRAWLINE.HCPYMODE (\DRAWLINE.DISPLAY IMAX) CL:REDUCE (CL:LENGTH REDUCE-FROM-END + REDUCE-FROM-START) MULTIFILEINDEX1 (LISTGET LIST* ADD1 CONS PRETTYFILEINDEX REVERSE PLUS +PFI.MAKE.LPT.STREAM CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION PFI.PRINT.MULTI.INDEX) +CL:REMOVE-DUPLICATES (CL:LENGTH COMPLEX-REMOVE-DUPLICATES SIMPLE-REMOVE-DUPLICATES) \SPPCONNECTION ( +\COERCE.TO.NSADDRESS \ILLEGAL.ARG \SPP.CREATE.CON LOCF \ADDBASE CONCAT SPP.DESTADDRESS) +SEDIT::INSERT-COMMENT-CHARS (NCHARS CHCON1 NTHCHARCODE ADD1 MKSTRING CONCAT SUBSTRING SEDIT::ADJUST-WIDTH + IPLUS SEDIT::STRINGWIDTH NTH SEDIT::CREATE-SIMPLE-NODE IDIFFERENCE CONS SEDIT::CREATE-COMMENT-WORD-NODES +) RECORD.REMOVE.COMMENTS (RECORD.REMOVE.COMMENTS CONS) CL:REM (IREMAINDER FLOAT - CL:* UFIX FQUOTIENT +XCL::STRUNCATE) *WHO-LINE-LAST-VMEM* (LIST) CL::*PARSED-DEFSTRUCTS* (HASHARRAY) ACCESSFNS ( +DECLARERECORD CONS) CL:REQUIRE (DECLARE) MENUWRESHAPEFN (WINDOWPROP ITIMES IDIFFERENCE +DSPCLIPPINGREGION IPLUS FONTPROP MENUTITLEFONT IQUOTIENT) CL::SET-PARSED-STRUCTURE (PUTHASH) FIXAPPLY +(FGETD FIXLAMBDA GETPROP CLISPATOM LIST FMEMB EVAL FIXSPELL FSTKNTH) CL:ROOM (STORAGE.LEFT ROUND CL:* +CL:SECOND CL:FIFTH + - VMEMSIZE CL:ASH) CL:READ-CHAR-NO-HANG (CL:READ-CHAR \EOF.ACTION) CL:REMOVE-IF-NOT + (CL:LENGTH COMPLEX-REMOVE-IF-NOT SIMPLE-REMOVE-IF-NOT) WHO-LINE-SAVE-VMEM (SAVEVM) CL:READ-LINE ( +\GETSTREAM SPREADAPPLY* RSTRING CL:VALUES) \RTP.FILTER (\HINUM \LONUM) CL:RENAME-FILE (PATHNAME +RENAMEFILE CL:VALUES CL:MERGE-PATHNAMES CL:ERROR) PRINTPACKET (FASSOC APPLY* PRIN1 TERPRI) +FW-INIT-PROPS (MEMB LISTGET NCONC DIRECTORY.FILL.PATTERN LIST CONS DIRECTORY.MATCH.SETUP FILENAMEFIELD + TERPRI FONTCREATE FIXP POSITIONP IDIFFERENCE SMALLP) \LEAF.OPENFILE (LISPERROR LIST FIXP \ILLEGAL.ARG + IDATE \LEAF.GETFILE \LEAF.CREATIONDATE \FTP.OPENFILE SELECTQ CONS) \TEXTOUTCHARFN (\INSERTCH) +FIX89TYPEIN (PACK CONS LIST PRINT LDIFF) \RTP.CLEANUP (DREMOVE) \FTPINIT (NCREATE FUNCTION) +WHO-LINE-VMEM (IQUOTIENT IPLUS MAX TIMES VMEMSIZE RSH .VMEM.CONSISTENTP. FRPLACA CONCAT) INITDATATYPES + (ALLOCAL LENGTH \ADDBASE SUB1 FOLDHI LRSH IPLUS ADD1 TIMES LOCAL \GETDTD ITIMES LOGOR FMEMB CONSTANT +PLUS \PUTBASEPTR LOCF \ATOMCELL) CL:SCALE-FLOAT (FLOAT \MAKEFLOAT +) \ONSCREENW (IGREATERP IDIFFERENCE + WINDOWPROP) SI::%%STRUCTURE-DECLARE-DATATYPE (IGEQ CL:ERROR CL:MAPCAN CL:FUNCTION) \RECLAIMCODEBLOCK +(XCL::GET-IMPLICIT-KEY-HASH OPCODES FUNCTION) \TYPEGLOBALVARIABLE (PLUS TYPE-VARIABLE-FROM-TYPE-NAME) +\ICONW.REPAINTFN (WINDOWPROP) XCL::ADD-WHERE-IS-DATABASES (CL:MAPCAR CL:FUNCTION) CL:SLEEP (DISMISS +ROUND CL:*) \ASSIGNDATATYPE1 (\TYPENUMBERFROMNAME ERROR \GETDTD \ADDBASE ITIMES ASKUSER SELECTQ LIST +PLUS IPLUS LOGOR LOGAND LOGNOT FUNCTION OPCODES COPY CL:VALUES) BITBLT.INSERT (+ - BITBLT.ERASE) +EDITMOVESUBTREE (WINDOWPROP PRIN1 NODELST/AS/MENU CURSORPOSITION LOGAND) \COS.OLD (CONSTANT MINUS +FREMAINDER FTIMES FDIFFERENCE FPLUS POLYEVAL \FLOATBOX OPCODES) CL:SEARCH (CL:LENGTH -) PRINT10TO3 ( +SELECTC PRIN1 printout TERPRI) CREATEHASHFILE (FIND1STPRIME FIX FTIMES MAX OPENSTREAM LOGAND RSH BOUT +SELECTQ ADD1 ITIMES PLUS SYSTEMTYPE CLOSEF FULLNAME SETHASHSTATUS) SEDIT::ADD-MENU (SEDIT:GET-PROMPT-WINDOW + GETPROMPTWINDOW PRIN1 SEDIT::GET-MENU) \SFFixY.HCPYMODE (\DSPTRANSFORMY IPLUS LISTGET \ADDBASE ITIMES + \SFInvert IDIFFERENCE IMAX IMIN) \LEAF.WRITEPAGES (IDATE ALLOCATE.PUP LLSH \ADDBASE FOLDLO LRSH +FOLDHI IPLUS PLUS) DINFO.GET.GRAPH.WINDOW (WINDOWP DINFO.CREATE.GRAPH.WINDOW FUNCTION) PROPERTAILP ( +BUFTAILP) PFI.CONSTANTNAMES (CONS MAPCAR) CL::*DEFSTRUCT-INFO-CACHE* (HASHARRAY) \BSP.SKIPBYTES ( +\BSP.PREPARE.INPUT BSP.INPUT.ERROR APPLY* IDIFFERENCE PLUS FFETCHFIELD) ADDTOFILES? (ERSETQ READP +ASKUSER MAPC ADDTOFILE CLBUFS TERPRI CHCON1 DOBE WHATIS ADDTOCOMS FILECOMS APPLY* LIST MERGEINSERT +GETTOPVAL WHEREIS ERROR!) CL::%%SIMPLE-TREE-EQUAL (CL::%%SIMPLE-TREE-EQUAL EQL) PPSOC (\GETSTREAM +PORTSTRING \MAKENUMBER PRIN1 FQUOTIENT + CLOCKDIFFERENCE TERPRI) COMP.DECLARE1 (EVALV APPEND MAPC +COMP.VARTYPE) ORDERFROMBOTTOMTOTOP (CONS) CL::ESTABLISH-SETFS-AND-OPTIMIZERS (CL::PS-INLINE CL:MAPC +CL:FUNCTION CL::PS-ALL-SLOTS) %%CANONICAL-CML-TYPES (%%MAKE-CML-TYPE-TABLE) REMPROP (LIST GETPROPLIST) + CL:SOFTWARE-VERSION (CL:CONCATENATE CL:LISP-IMPLEMENTATION-VERSION) CL::%%COMPLEX-TREE-EQUAL ( +CL::%%COMPLEX-TREE-EQUAL CL:FUNCALL) PUTPROP (LIST GETPROPLIST CONS) COMPILER::STOP-UNBINDS-AT-FRAME-BOUNDARY + (CONDITIONS:FIND-RESTART CONDITIONS:INVOKE-RESTART) \TEXTOPENF-SUBTREE (\TEXTOPENF-SUBTREE) FIXLAMBDA + (FIXSPELL) CL:SOME (%%SOME-SINGLE %%SOME-MULTIPLE CONS) \RTP.INFO.HOOK (PROCESS.WINDOW CREATEW +GETBOXREGION FONTCREATE WINDOWPROP) SETF-MACRO-FUNCTION (GET ARGTYPE) \SETUP.HUNK.TYPENUMBERS (APPEND +\COMPUTE.HUNK.TYPEDECLS) \HANDLE.RAW.10TO3 (+ FOLDHI LRSH IPLUS TERPRI) PRINTPACKETQUEUE (\DTEST) +CL:STREAM-EXTERNAL-FORMAT (\EXTERNALFORMAT) CL:TREE-EQUAL (CL:ERROR CL::%%COMPLEX-TREE-EQUAL +CL::%%SIMPLE-TREE-EQUAL) CL::SET-SHARED-SETF-INVERSE (REMPROP GET) \RECLAIMARRAYBLOCK (\ADDBASE IMINUS + \HILOC \MERGEBACKWARD \MAKEFREEARRAYBLOCK) CL:SINH (CL:EXP / - CL::%%EXP-FLOAT FQUOTIENT) CL:NTH ( +CL:NTHCDR) \TEDIT.ACTIVE.WINDOWP (WINDOWPROP TEXTOBJ PROCESSP) TEDIT.REDO (RESETSAVE CURSOR \SHOWSEL +SELECTQ TEDIT.REDO.INSERTION IMAX \TEDIT.DELETE TEDIT.REDO.REPLACE \TEDIT.LCASE.SEL TEDIT.REDO.LOOKS +TEDIT.REDO.PARALOOKS TEDIT.PROMPTPRINT TEDIT.FIND IPLUS NCHARS TEDIT.REDO.MOVE CONCAT) COMP.DECLARE ( +SELECTQ COMP.DECLARE1 MAPC EVAL CONS COMPERRM COMP.CONST) \UNKNOWN.UFN (\MP.ERROR) CL:ENDP (CL:ERROR) +PACKAGE-HASHTABLE-INSPECT-STOREFN (PROMPTPRINT) SEDIT::SPLIT-COMMENT (SEDIT::CLOSE-NODE NCHARS +SUBSTRING ADD1) \CAR.UFN (SELECTQ LISPERROR) TWODINSPECT.TOTALWIDTH (IPLUS ITIMES LENGTH STRINGWIDTH +PLUS) SEDIT::COMMENT-OUT-SELECTION (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW CL:FORMAT) +\CHARWIDTH.HCPYMODE (\FGETWIDTH \GETBASE) \CDR.UFN (\ADDBASE LLSH IDIFFERENCE \CDR.UFN SELECTQ +LISPERROR GETPROPLIST) \PUTBASEBITS (\PUTBASEBITS \ADDBASE FOLDLO LRSH IMOD DIFFERENCE RSH \PUTBASE +DEPOSITBYTE LOGOR BITCLEAR LOGAND LOGNOT MASK.1'S LSH SUB1 \GETBASE) SEDIT::DEGRADE-COMMENT (NTH +FREPLACEFIELD PLUS FFETCHFIELD SEDIT::UNDO-BY CONS LIST) NTYPX (LOGAND \GETBASE FOLDLO LRSH) +TWODINSPECT.REPAINTFN (DSPCLIPPINGREGION WINDOWPROP XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES +XCL::PROFILE-VALUES FONTPROP APPLY*) CL:STRING-NOT-EQUAL (%%PARSE-STRING-ARGS +WITH-TWO-UNPACKED-STRINGS %%STRING-BASE-COMPARE-EQUAL -) \TEDIT.CREATEW.FROM.REGION (LISTGET +HEIGHTIFWINDOW ITIMES FONTPROP CREATEW \TEDIT.ORIGINAL.WINDOW.TITLE) SEDIT::STRUCTURE-FROM-STRING ( +CL:VALUES) \CHANGECHARSET.HCPYMODE (\GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CREATECHARSET FONTCOPY +LIST IPLUS \SFFixY.HCPYMODE \ADDBASE ITIMES) \TYPEP.UFN (NTYPX) GETBOXPOSITION.FROMINITIALREGION ( +GETBOXPOSITION DIFFERENCE PLUS WINDOWPROP DSPCLIPPINGREGION) L-CASECODE (CL:CHAR-INT CL:CHAR-DOWNCASE +CL:INT-CHAR) PRINTBITMAP (EVALV TERPRI BITMAPWIDTH PRIN2 BITMAPHEIGHT BITSPERPIXEL) CL::%%TAN-FLOAT ( +FLOAT - CL:* UFIX FQUOTIENT UFABS CL::%%POLYEVAL) CL:STRING-LESSP (%%PARSE-STRING-ARGS +WITH-TWO-UNPACKED-STRINGS %%STRING-BASE-COMPARE-EQUAL - %%ARRAY-READ +) \UNWIND.UFN (\MYALINK OPCODES +IPLUS IDIFFERENCE UNFOLD LLSH LRSH LOGAND \GETBASEPTR STACKADDBASE \VAG2 UNINTERRUPTABLY PLUS IMINUS) +\SPP.CREATE.CON (OPENNSOCKET + LOGOR LOGAND DAYTIME NSOCKETNUMBER LOCF \ADDBASE SUB1) +CL::ESTABLISH-PREDICATE (CL::PS-PREDICATE CL::PS-INLINE CL:MACRO-FUNCTION GET LIST) COMPILER::FIND-COPIED-VARIABLE (COMPILER::VARIABLE-SCOPE CL:GETHASH COMPILER::COPY-VARIABLE) -SEDIT::INSERT-SPECIAL-CHARACTER (FFETCHFIELD ALLOCSTRING SELECTQ SEDIT::TYPE-OF-INPUT) -\\SLOWHCPYMODEBLTCHAR (\\CHAR8CODE LOGAND FFETCHFIELD IPLUS \\DSPGETCHARWIDTH \\GETBASE -\\DSPTRANSFORMX IMAX IMIN IDIFFERENCE \\DSPGETCHAROFFSET LLSH DSPDESTINATION \\TOTOPWDS -\\GETCHARSETINFO \\GETBASEPTR UNFOLD \\CHARSET LRSH \\CREATECHARSET ADD1) \\GETPILOTBBTSCRATCHBM ( -FFETCHFIELD BITMAPCREATE) COMPILER::*LITERALLY-NIL* (COMPILER::MAKE-LITERAL) \\TELERAIDGET (SELECTC -FFETCHFIELD LOCF \\ADDBASE \\TELERAIDRELEASE \\BLT) FIND-STACK-FRAME (FIND-DEBUGGER-ENTRY-FRAME STKNTH -) \\PRESSINIT (FUNCTION FREPLACEFIELDVAL NCREATE) BITMAPCOPY (\\DTEST BITMAPCREATE BITMAPWIDTH -FFETCHFIELD) COMPILER::ENV-ANALYZE-MV-CALL (COMPILER::ENV-ANALYZE COMPILER::MV-CALL-FN MAPC -COMPILER::MV-CALL-ARG-EXPRS) COMPILER::COPY-VARIABLE (CL:GETHASH COMPILER::MAKE-VARIABLE -COMPILER::VARIABLE-NAME COMPILER::VARIABLE-SCOPE COMPILER::VARIABLE-KIND) SEDIT::INSERT-MULTI-ESCAPE ( -FFETCHFIELD SEDIT::TYPE-OF-INPUT ALLOCSTRING FREPLACEFIELD NTHCHARCODE ADD1 PLUS) \\GCMAPSCAN ( -\\ADDBASE \\GCSCAN1 LOGAND \\GETBASEFIXP FFETCHFIELD \\VAG2 LLSH LOGOR \\LOLOC FREPLACEFIELD -.FREELINK. \\GCRECLAIMCELL OPCODES) \\GC.LOOKUP.BIGREFCNT (\\LOLOC \\ADDBASE FFETCHFIELD \\MAKENUMBER) - \\ZEROBYTES (\\CLEARBYTES ADD1 IDIFFERENCE) \\INSUREBITSPERPIXEL (SELECTQ \\ILLEGAL.ARG) -COMPILER::META-SUBST-CALL (COMPILER::META-SUBST-ANY-CALL COMPILER::CALL-FN COMPILER::CALL-ARGS) -\\BITBLTSUB (OPCODES) COURIER.WRITE.NSNAME (\\DTEST FFETCHFIELD COURIER.WRITE.STRING) COMP.QUOTE (CONS - COMP.CONST) TURN.OFF.ETHER (\\FLUSHNDBS) MOVE.BACK.TO (IDIFFERENCE SEGMENT.BIT.LENGTH) LASTCHPOS ( -NTHCHARCODE PLUS) \\FILING.ATTRIBUTE.TYPE (FIXP) \\DSPRIGHTMARGIN.IP (FFETCHFIELD MIN) \\FREELISTCELL -(\\VAG2 \\HILOC LOGAND \\LOLOC FFETCHFIELD FREPLACEFIELD PLUS PAGELOC IPLUS LLSH LRSH) -|\\VAMFilePageNumber| (SELECTC SHOULDNT) GN/LEFT (IDIFFERENCE HALF LRSH) \\GCMAPUNSCAN (\\ADDBASE -\\GCSCAN2 LOGAND \\GETBASEFIXP FFETCHFIELD LOGOR \\LOLOC FREPLACEFIELD .FREELINK.) SEDIT::TRACK-EXTEND - (FREPLACEFIELDVAL REPLACEFIELDVAL FETCHFIELD FFETCHFIELD ZEROP LOGAND LASTMOUSEX LASTMOUSEY) ARG ( -GETBASEPTR \\GETBASEPTR \\ARGPTR \\EVAL) OPENBSPSTREAM (OPENRTPSOCKET FFETCHFIELD LIST FREPLACEFIELD -FREPLACEFIELDVAL NCREATE FUNCTION FIXP CREATE.EVENT CONCAT PROCESS.NAME) FB.ADD.FILE (FFETCHFIELD PLUS - TB.INSERT.ITEM) \\DISABLEGC1 (UNFOLD LLSH FREPLACEFIELD \\ADDBASE) GETHOSTINFO (MKATOM U-CASE ASSOC -STRPOS \\DOMAIN.NAME.QUALIFY.FULLY CONS GETHASH FFETCHFIELD CANONICAL.HOSTNAME SELECTQ LISTGET) -ADDTOFILES? (ERSETQ GETTOPVAL SEARCHPRETTYTYPELST READP ASKUSER MAPC ADDTOFILE CLBUFS TERPRI CHCON1 -DOBE WHATIS ADDTOCOMS FILECOMS GETPROP APPLY* LIST MERGEINSERT WHEREIS ERROR!) -TWODINSPECT.COPYBUTTONFN (WITH-INSPECTOR-ENV WINDOWPROP XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES - XCL::PROFILE-VALUES KEYDOWNP FFETCHFIELD CL:FUNCALL TWOD.TRACKCURSOR FUNCTION) HARDCOPYW ( -COPY.WINDOW.TO.BITMAP NUMBERP SCREENBITMAP GETSCREENREGION PRINTERTYPE CONCAT DEFAULTPRINTER -PRINTFILETYPE PRINTER.BITMAPSCALE FFETCHFIELD PRINTER.BITMAPFILE PRINTER.SCRATCH.FILE) -BACKWARD.DELETE.TO (FORWARD.DELETE.TO) POSTSCRIPT.SET-FAKE-LANDSCAPE (FFETCHFIELD CONS FRPLACA - +) -RECORD.REMOVE.COMMENTS (RECORD.REMOVE.COMMENTS CONS) DODIR (DIRCONJ LIST APPEND FMEMB CONS DIRECTORY) -SEDIT::SET-DEPTH (MAPC FFETCHFIELD SEDIT::SET-DEPTH ADD1) COMPILER::META-SUBST-BLOCK (COMPILER::MSUBST - COMPILER::META-SUBST COMPILER::BLOCK-STMT REPLACEFIELD COMPILER::NODE-META-P) HASHFILENAME ( -HASHFILEPROP) COMP.COND (CONS ADD1 SELECTQ CDR COMP.VALN OPT.JUMPCHECK COMP.EXPR) TURN.ON.ETHER ( -ASSURE.ETHER.ON) FIND.MATCHING.QUOTE (\\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE FIRSTCHAR) -COMPILER::META-EVAL-LABELS (COMPILER::MEVAL COMPILER::META-EVALUATE COMPILER::LABELS-BODY REPLACEFIELD - COMPILER::ANALYZE-TREE COMPILER::META-CALL-LABELS) UNPACKPATHNAME.STRING (DECLARE CL:INTERSECTION -MKATOM APPEND CL:PATHNAME-HOST LIST CL:PATHNAME-DEVICE CL:PATHNAME-DIRECTORY CL:PATHNAME-NAME -CL:PATHNAME-TYPE CL:PATHNAME-VERSION MKSTRING) \\DSKDISPLAY.UPDATE (REDISPLAYW) \\LEAF.CLOSEFILE ( -FFETCHFIELD CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION LOGAND CONSTANT LOGOR FREPLACEFIELD -ALLOCATE.PUP LOCF \\ADDBASE LLSH) XCL::PPRINT-DEFINER (DECLARE DSPXPOSITION DSPLEFTMARGIN + CL:* GET) -\\EQREFCNT1 (\\ADDBASE LRSH IPLUS LLSH \\HILOC \\LOLOC UNFOLD \\GETBASEFIXP FFETCHFIELD LOGAND) -COMPILER::COPY-NODE-LIST (MAPCAR COMPILER::COPY-NODES) SEDIT::INPUT-TOKENDELIM (FFETCHFIELD -SEDIT::TYPE-OF-INPUT CHARACTER) \\STRINGWIDTH.HCPYMODE (FFETCHFIELD IQUOTIENT IPLUS -\\STRINGWIDTH.GENERIC \\FGETWIDTH \\GETBASE CONSTANT) \\TYPENUMBERFROMNAME (\\GETDTD \\ADDBASE ITIMES -FFETCHFIELD PLUS) \\BLTSHADE.BITMAP (FFETCHFIELD IMAX IMIN IPLUS SELECTQ TYPENAME COLORNUMBERP -\\ILLEGAL.ARG MAXIMUMCOLOR LOGAND TEXTUREP TEXTUREOFCOLOR ITIMES COLORTEXTUREFROMCOLOR# IDIFFERENCE -|\\SFInvert|) ARGINFO-MUNG (MAPCONC LIST) \\UPF.NEXTPOS (NTHCHARCODE PLUS) RIGHTW.ADJUSTSELECTION ( -WINDOWPROP MAINWINDOW FFETCHFIELD WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES -XCL::PROFILE-VALUES STRINGWIDTH FREPLACEFIELDVAL REPLACEFIELDVAL) BITMAPBIT (FFETCHFIELD \\FBITMAPBIT -SUB1 \\ADDBASE ITIMES |\\SFInvert| IDIFFERENCE MAXIMUMCOLOR SELECTQ FOLDLO LRSH \\GETBASE \\BITMASK -\\WORDELT LOGAND LOGXOR LOGOR LSH \\4BITMASK LLSH \\GETBASE24 ERROR \\GETDISPLAYDATA \\DTEST -\\OUTSTREAMARG \\GETSTREAM \\DSPCLIPTRANSFORMX \\DSPCLIPTRANSFORMY DSPDESTINATION \\TOTOPWDS BITMAPBIT -) \\SET.FINALIZATION.FUNCTION (FIXP \\TYPENUMBERFROMNAME \\ILLEGAL.ARG \\PUTBASEPTR UNFOLD LLSH) -COPIEDFROMSPEC (MKSTRING NOHOST ESPATTERN SUB1 CL:POSITION NCHARS PLUS DIRECTORYNAME CL:SUBSEQ ADD1 -CONCAT NCONC LIST) SEDIT::TTYFN (CREATE.EVENT CL:FUNCTION SEDIT:SEDIT LAST LIST CL:MULTIPLE-VALUE-PROG1 - .UNWIND.PROTECT. FUNCTION FFETCHFIELD AWAIT.EVENT) TWODINSPECT.CLOSEFN (WINDOWPROP) -POSTSCRIPT.STARTPAGE (FFETCHFIELD FQUOTIENT \\DSPFONT.PSC CONSTANT TIMES \\DSPRESET.PSC) -\\TEDIT.INCLUDE (HELP) \\LISP.TO.NSFILING.ATTRIBUTE (IDATE LISPERROR \\FILETYPE.FROM.TYPE UNFOLD LLSH -ASSOC SELECTQ >= SMALLP FIXP PARSE.NSNAME LIST COURIER.CREATE \\ILLEGAL.ARG) \\DSPSPACEFACTOR.IP ( -FFETCHFIELD FIXR TIMES CHARWIDTH) TB.BOTTOM.OF.ITEM (- FFETCHFIELD TIMES FIXP \\DTEST) -\\GC.BIGREFCNT.MISSING (\\MP.ERROR) GN/TOP (IPLUS SUB1 HALF LRSH ADD1) \\REFCNT (\\ADDBASE LRSH IPLUS -LLSH \\HILOC \\LOLOC UNFOLD \\GETBASEFIXP FFETCHFIELD \\GC.LOOKUP.BIGREFCNT LOGAND) \\UPF.TEMPFILEP ( -SELCHARQ NTHCHARCODE NCHARS) \\DSPCLIPTRANSFORMY (\\DSPTRANSFORMY IPLUS FFETCHFIELD) SEDIT::SHRINKFN ( -WINDOWPROP FFETCHFIELD PRIN1 SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW PROCESSPROP THIS.PROCESS -WINDOWREGION) FNTYP (\\DEFCELL \\ATOMCELL \\PSEUDOCODE.REALDEF FFETCHFIELD \\CCODEFNTYP \\CCODEARGTYPE - SELECTQ) BSPOUTPUTSTREAM (\\DTEST FFETCHFIELD) FILEPKGCOMPROPS (MAPC MEMB CONS PUT) TEDIT.GETPOINT ( -TEXTOBJ FFETCHFIELD IMAX SELECTQ SHOULDNT) \\DSPLINEFEED.IP (FFETCHFIELD) \\BLTCHAR (OPCODES) -%DESTRUCTIVE-RESULT-VECTOR (CL:MAKE-ARRAY VECTOR-LENGTH CL:ARRAY-ELEMENT-TYPE COPY-VECTOR) GN/RIGHT ( -IPLUS SUB1 HALF LRSH ADD1) BLTCHAR (\\BLTCHAR IGEQ \\ILLEGAL.ARG \\GETDISPLAYDATA \\DTEST -\\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) FILEPKGTYPE (ARG UNION FILEPKGTYPE NCONC LIST GETTOPVAL ASSOC -GETPROP SELECTQ ERROR ADD1 FMEMB CONS PLUS MARKASCHANGED) RECLAIMMIN (IMIN IMAX) TEDIT (OPENFILE -RESETSAVE WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION TEDIT.CREATEW CONCAT APPEND -COPY WINDOWPROP OPENTEXTSTREAM TEXTOBJ \\TEDIT2 ADD.PROCESS LIST KWOTE) \\DSPCLIPTRANSFORMX ( -\\DSPTRANSFORMX IPLUS FFETCHFIELD) SEDIT::LOCATE-NODE-FROM-EDITCHAIN (SEDIT::LOCATE-NODE-FROM-EDITCHAIN - FFETCHFIELD) BACKSKREAD (\\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE FIRSTCHAR LIST TTSKREAD -FIND.MATCHING.QUOTE) \\PROCESS.BEFORE.LOGOUT (RESETLST FFETCHFIELD LIST CREATEW TERPRI) -FIND-LEXICAL-ENVIRONMENT (DECLARE STKPOS STKARG) NSNETDAYTIME0 (\\GETMISCNSOCKET -CREATE.PACKET.EXCHANGE.XIP LOCF \\ADDBASE FFETCHFIELD PLUS UNFOLD LLSH EXCHANGEXIPS) \\SLOWBLTCHAR ( -\\CHAR8CODE LOGAND FFETCHFIELD IPLUS \\DSPGETCHARWIDTH \\GETBASE \\DSPTRANSFORMX IMAX IMIN IDIFFERENCE - \\DSPGETCHAROFFSET LLSH ITIMES DSPDESTINATION \\TOTOPWDS \\GETCHARSETINFO \\GETBASEPTR UNFOLD -\\CHARSET LRSH \\CREATECHARSET ADD1) \\OPENLINEBUF (\\CREATELINEBUFFER) \\DSPPRINTCR/LF ( -TTYDISPLAYSTREAM \\CARET.DOWN FFETCHFIELD SELECTQ IPLUS ERROR IMINUS IDIFFERENCE \\DSPTRANSFORMX -DSPDESTINATION \\GETBASE \\TOTOPWDS \\DSPTRANSFORMY) TB.NORMALIZE.ITEM (\\DTEST FFETCHFIELD -TB.BOTTOM.OF.ITEM DSPCLIPPINGREGION IPLUS + SCROLLBYREPAINTFN - IQUOTIENT) DISABLEGC (UNINTERRUPTABLY -\\DISABLEGC1) \\CHANGECHARSET.DISPLAY (FFETCHFIELD \\GETCHARSETINFO \\GETBASEPTR UNFOLD LLSH -\\CREATECHARSET |\\SFFixY| \\ADDBASE ITIMES \\HILOC \\LOLOC FREPLACEFIELD) SEDIT::RESHAPEFN ( -WINDOWPROP DSPCLIPPINGREGION IDIFFERENCE WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION FFETCHFIELD) \\FTP.SENDVERSION (MARK# FTPPUTMARK SELECTC FTPGETMARK BIN \\FTP.FLUSH.TO.EOC) -\\USEREVENT (MAPC SELECTQ REVERSE APPLY*) |\\SFFixY| (FFETCHFIELD \\DSPTRANSFORMY IPLUS FREPLACEFIELD -\\ADDBASE ITIMES |\\SFInvert| IDIFFERENCE IMAX IMIN \\HILOC \\LOLOC) COPIEDTOSPEC (CONS ESPATTERN -DIRECTORYNAME ERROR) TWODINSPECT.DEFAULT.VALUECOMMANDFN (CONSTANT \\CREATE.TWODINSPECTOR.SETMENU -\\CREATE.TWODINSPECTOR.INSPECTMENU MENU) FLASHWINDOW (FIXP GETSTREAM VIDEOCOLOR INVERTW PLUS) -FLIPCURSOR (\\PUTBASE LOGXOR \\GETBASE CONSTANT SUB1 EXPT \\ADDBASE) CREATEW (GETSCREENREGION COPY -NUMBERP \\CREATEW1) CL::%TAN-FLOAT (FLOAT - CL:* UFIX FQUOTIENT UFABS CL::%POLYEVAL) -COMPILER::ENV-ANALYZE-LAMBDA (COMPILER::ENV-ANALYZE COMPILER::LAMBDA-BODY MAPC COMPILER::LAMBDA-OPTIONAL - CL:SECOND COMPILER::LAMBDA-KEYWORD CL:THIRD) COMPILER::COPY-NODE-VAR-REF (COMPILER::MAKE-VAR-REF -COMPILER::FIND-COPIED-VARIABLE COMPILER::VAR-REF-VARIABLE) SEDIT::INPUT-STRINGDELIM (SEDIT::TYPE-OF-INPUT - FFETCHFIELD ALLOCSTRING SEDIT::CREATE-SIMPLE-NODE) CREATEREGION (CONS) PRINT-BITMAPS-NICELY ( -BITMAPWIDTH BITMAPHEIGHT BITSPERPIXEL FFETCHFIELD FOLDHI LRSH IPLUS CL:* PRIN2 PRIN1) -SEDIT::SELECT-NEXT-GAP (SEDIT::NEXT-NODE FFETCHFIELD) SAVEVM (\\USEREVENT) GCTRP (FIXP) -COURIER.READ.NSNAME (COURIER.READ.STRING FREPLACEFIELDVAL NCREATE) ADDTOFILE (GETFILEPKGTYPE WHATIS -ADDTOCOMS FILECOMS GETPROP APPLY*) \\DOGCDISABLEDINTERRUPT (CREATEW CREATEREGION IDIFFERENCE PRIN1 -HELP) \. (MASTERSCOPE) RIGHTW.BUTTONEVENTFN (WINDOWPROP MAINWINDOW WITH-INSPECTOR-ENV XCL::PROFILIZE -CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES LOGAND ONED.TRACKCURSOR STRINGWIDTH FONTPROP -FUNCTION CL:FUNCALL FFETCHFIELD) \\FLUSHNDBS (FFETCHFIELD FREPLACEFIELD) -TWODINSPECT.DEFAULT.TITLECOMMANDFN (LOGAND CONSTANT \\CREATE.TWODINSPECTOR.TITLEMENU WINDOWPROP MENU) -AIN (%ARRAY-BASE FFETCHFIELD %ARRAY-OFFSET SELECTC %ARRAY-TYPE-NUMBER SHOULDNT IDIFFERENCE LIST UNFOLD - LLSH LISPERROR IPLUS \\GETOFD \\GETSTREAM) AT.END.OF.SCREEN (AT.END.OF.LINE IGREATERP IPLUS -SEGMENT.LENGTH TTNEXTCHAR) USERNAME (FFETCHFIELD |GetBcplString| \\ADDBASE EMADDRESS OPCODES U-CASE -SUBSTRING) TB.FIND.PREVIOUS.TAIL (FFETCHFIELD ADD1 PLUS) LIST-ALL-BLOCKRECORDS (LIST) SEDIT::REPAINTFN - (WINDOWPROP) \\TELERAIDSERVER (\\TELERAIDENTRY FFETCHFIELD LOCF \\ADDBASE LOGAND LRSH IPLUS LLSH -\\GETBASEPTR \\READFLAGS \\LOOKUPPAGEMAP \\GETBASEBYTE \\GETBASE \\LOLOC ADD1 PLUS SELECTQ -\\KEYNAMETONUMBER \\TELERAIDCOMMAND \\BOXIDIFFERENCE \\RCLK) < (CL::%COMPARISON-MACRO) \\WRITEBITMAP ( -FFETCHFIELD GETSTREAM TERPRI \\BOUT \\ADDBASE IPLUS SUB1 LRSH \\GETBASEBYTE LOGAND) -\\COURIER.WHENCLOSED (|printout| TERPRI) = (ARG) AOUT (%ARRAY-BASE FFETCHFIELD %ARRAY-OFFSET SELECTC -%ARRAY-TYPE-NUMBER SHOULDNT IDIFFERENCE LIST UNFOLD LLSH LISPERROR IPLUS \\GETOFD \\GETSTREAM) -UPDATEFILES (GETTOPVAL SEARCHPRETTYTYPELST FILEPKGCHANGES ASSOC INFILECOMS? NCONC GETPROP INTERSECTION - REMOVE CONS LDIFFERENCE) SEDIT:DEFAULT-COMMANDS (CL:COPY-TREE SEDIT:RESET-COMMANDS) TEDIT.STRINGWIDTH - (SUB1 %ARRAY-OFFSET FFETCHFIELD %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE -\\GETBASETHIN \\GETBASEBYTE PLUS TEDIT.CHARWIDTH SELCHARQ CHARWIDTH) SET/LAYOUT/POSITION (FRPLACA -FRPLACD) \\FIXLINELENGTH.IP (FFETCHFIELD FIXR QUOTIENT DIFFERENCE) FEQP (FFETCHFIELD LISPERROR NTYPX -ADD1 IDIFFERENCE IGEQ LOLOC \\LOLOC FLOAT IPLUS LLSH LRSH LOGAND PLUS SUB1) COMPILER::ENV-ANALYZE-LABELS - (COMPILER::ENV-ANALYZE COMPILER::LABELS-BODY MAPC COMPILER::LABELS-FUNS) COMPILER::COPY-NODE-UNWIND-PROTECT - (COMPILER::MAKE-UNWIND-PROTECT COMPILER::COPY-NODES COMPILER::UNWIND-PROTECT-STMT -COMPILER::UNWIND-PROTECT-CLEANUP) CLISPIFY2B (GETPROP CLISPIFY1 SELECTQ CLISPIFY2C CLISPIFYCROPS0 -CLISPIFYLOOKUP LIST MINUS SUB1 CLISPIFYRPLAC CONS FRPLACA NCONC CLISPCOND CLISPAND SHOULDNT CLISPIFY2A - MAPCAR LAST CLISPIFYNOT CLISPIFY2 CLISPIFYCROPS GETP WHILEDOUNTIL SUBPAIR CLISP3 CLISPIFY2B LSUBST -LISTGET1 SHRIEKIFY APPLY* APPEND CLISPIFYMAPS CLISPIFYUSERFN) TEXTUREP (FIXP FFETCHFIELD) -SET/LABEL/SIZE (FIXP DSPSCALE GRAPHNODE/BORDER/WIDTH FIXR FTIMES BITMAPWIDTH BITMAPHEIGHT APPLY* -IMAGEOBJPROP FONTP FONTCREATE IPLUS STRINGWIDTH FONTPROP FRPLACA) SETUSERNAME (FFETCHFIELD \\ADDBASE -EMADDRESS OPCODES USERNAME CONCAT) \\FILING.ATTRIBUTE.TYPE.SEQUENCE (MAPCAR \\FILING.ATTRIBUTE.TYPE) -\\DSPLEFTMARGIN.IP (FFETCHFIELD) INVERT.TEXTURE.BITMAP (FFETCHFIELD BITMAPCREATE \\ADDBASE LOGXOR -\\GETBASE) DISPLAYLINK/LR (APPLY* LISTGET IPLUS SUB1 GN/LEFT ADD1 GN/RIGHT) COMPILER::COPY-NODE-THROW -(COMPILER::MAKE-THROW COMPILER::COPY-NODES COMPILER::THROW-TAG COMPILER::THROW-VALUE) SEDIT::INPUT-QUOTE - (SELECTQ SEDIT::TYPE-OF-INPUT SEDIT::CLOSE-NODE FFETCHFIELD CHCON1 NCHARS FREPLACEFIELD CONS -SEDIT::COLLECT-UNDO-BLOCK) INVERT.TEXTURE (LOGXOR LOGAND INVERT.TEXTURE.BITMAP) COMPILER::ENV-ANALYZE-IF - (COMPILER::ENV-ANALYZE COMPILER::IF-PRED COMPILER::IF-THEN COMPILER::IF-ELSE) READBITMAP (READC RATOM - GETSTREAM SELECTQ SKIPSEPRS FOLDHI LRSH IPLUS ITIMES BITMAPCREATE FFETCHFIELD \\BIN FRPTQ -\\PUTBASEBYTE LOGOR LLSH IDIFFERENCE SUB1 \\ADDBASE) SEDIT::REVIVE-NODE (IPLUS MAPC FFETCHFIELD -SEDIT::REVIVE-NODE) COURIER.OPEN (RESETLST \\COERCE.TO.NSADDRESS ERROR SPP.OPEN LIST FUNCTION PRIN1 -SPP.DESTADDRESS LRSH \\BOUT LOGAND SUB1 GETWORD IPLUS LLSH \\BIN \\SPP.PREPARE.INPUT) BIT (CL:APPLY) -\\ALLOCMAPBUFFER (NCREATE FREPLACEFIELDVAL) COMP.GENFN (CL:INTERN CL:FORMAT STRING PLUS -CL:SYMBOL-PACKAGE) SEDIT:RESET-COMMANDS (SEDIT::CREATE-COMMAND-TABLE CL:FIRST CL:SECOND FREPLACEFIELD) - TEDIT.\\INSERT (FFETCHFIELD TEDIT.GETPOINT SELECTQ) DBG::COLLECT-ACTIVE-ESCAPES (ENVAPPLY STKNTH -CL:DELETE-DUPLICATES CL:FUNCTION) TB.RENUMBER.TAIL (PLUS FREPLACEFIELD) |\\VFMSaveBuffer| (FFETCHFIELD -) CHECKBUFFERREFVAL (UNINTERRUPTABLY OPCODES FFETCHFIELD) \\PNC (FFETCHFIELD %ARRAY-OFFSET %ARRAY-BASE - ADD1 SUB1 LIST) OPPOSITECOLOR (IDIFFERENCE MAXIMUMCOLOR) SEDIT::PUNT-SET-SELECTION (SEDIT::SET-SELECTION - FFETCHFIELD PLUS) DODIRCOMMANDS (ITIMES IQUOTIENT IPLUS POSITION IDIFFERENCE LINELENGTH PLUS -DIRGETFILEINFO IGEQ TAB DIRFILENAME DREAD NCONC1 INFILEP PACKFILENAME FASSOC LIST) \\TELERAIDINIT ( -\\LOCKFN \\LOCKVAR \\ALLOCATE.ETHERPACKET \\LOCKWORDS FFETCHFIELD) TWODINSPECT.COLUMNWIDTH (IMAX -STRINGWIDTH APPLY*) ARRAYSIZE (\\MACRO.MX ARRAYSIZE) \\INDICATESTRING (RESETLST RESETSAVE RADIX CONCAT - \\CHARSET LRSH \\CHAR8CODE LOGAND LOGOR CHARACTER) \\SETETHERFLAGS (SELECTC LIST - TIMES UNFOLD LLSH -INDEXF FFETCHFIELD SHOULDNT) \\TEDIT.HCPYLOOKS.UPDATE (FFETCHFIELD \\TEDIT.APPLY.PARASTYLES -\\TEDIT.APPLY.STYLES PLUS \\RPLPTR \\ADDBASE2 \\ADDBASE IPLUS \\EDITELT GETBASEPTR \\GETBASEPTR -FONTCLASSCOMPONENT FONTCOPY FIXR FTIMES DSPSCALE IMAX IDIFFERENCE LISTGET IMAGEOBJPROP SUB1) -HARDCOPYIMAGEW.TOPRINTER (|GetPrinterName| PRINTERTYPE HARDCOPY.SOMEHOW CONCAT PRINTERPROP) -ASSURE.ETHER.ON (THIS.PROCESS \\ETHEREVENTFN \\NSINIT) OPENPOSTSCRIPTSTREAM (OPENSTREAM -FREPLACEFIELDVAL NCREATE ARRAY LISTGET LIST OUTPUT CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION -MKSTRING DATE FILENAMEFIELD TERPRI \\FILEOUTCHARFN CL:ASSOC CL:FUNCTION ERROR L-CASE NUMBERP TIMES -\\PS.SCALEREGION / INTERSECTREGIONS CREATEREGION PLUS FONTCREATE MKLIST FFETCHFIELD CL:GETF) -\\WRITEOUTBUFFERS (FFETCHFIELD MAPCAR CHECKBUFFERREFVAL MAPC UNDIRTY FREPLACEFIELD) -CREATETEXTUREFROMBITMAP (BITMAPP FFETCHFIELD BITMAPBIT IREMAINDER LOGOR \\BITMASK \\WORDELT LOGAND -IPLUS ITIMES IDIFFERENCE PLUS BITMAPCREATE IMIN) SEDIT::REPLACE-ROOT (FREPLACEFIELD CONS LIST -SEDIT::SUBNODE FFETCHFIELD SEDIT::CREATE-NULL-LIST SEDIT::CREATE-WEAK-LINK ADD1) HASHFILESPLST ( -GTHASHFILE GENERATOR HASHFILESPLST1) NSNAME.TO.STRING (\\DTEST FFETCHFIELD CONCAT) COMP.FUNCTION ( -COMP.LAM1 COMP.CALL CONS COMP.STCONST) COPYARRAY (HASHARRAY HARRAYSIZE REHASH ARRAYORIG ARRAYTYP -ARRAYSIZE ARRAY SETA ELT PLUS SETD ELTD) SEDIT:REPLACE-SELECTION (FFETCHFIELD CL:MAPCAR CL:FUNCTION -SEDIT::PARSE-NEW CL:COPY-LIST SEDIT::SELECT-PSEUDO-SEGMENT SEDIT::COMPOSE-PSEUDO-SELECTION) > ( -CL::%COMPARISON-MACRO) |\\PFRoomForFile| (LEQ DIFFERENCE FFETCHFIELD |\\PFFreeDiskPages| IDIFFERENCE -IQUOTIENT ITIMES) SETD (SELECTC FFETCHFIELD IDIFFERENCE IPLUS \\ADDBASE2 \\ADDBASE SETA) \\WRITEPAGES -(FDEVOP SPREADAPPLY* FFETCHFIELD) COMPILER::COPY-NODE-TAGBODY (COMPILER::MAKE-TAGBODY CL:GETHASH +TEDIT.NEXT (TEXTOBJ TEDIT.FIND MBUTTON.FIND.NEXT.FIELD ADD1 IDIFFERENCE \TEDIT.GET.INSERT.CHARLOOKS) +COMP.COMMENT (CONS COMP.STCONST) \CHECKAPPLY* (LIST SPREADAPPLY* \CKAPPLYARGS) SEDIT::*FSPEC-TABLE* ( +CL:MAKE-HASH-TABLE CL:FUNCTION) RETDWIM (IPLUS IDIFFERENCE CLOCK LISTGET1 LIST FIXLISPX/ CONS +DWIMIFY1? /RPLNODE APPLY RETDWIM2) CL:STRING-TRIM (WITH-STRING CL:SUBSEQ) CL:STRING-LEFT-TRIM ( +WITH-STRING CL:SUBSEQ) *WHO-LINE-LAST-DIRECTORY* (CL:NAMESTRING CONS PATHNAME MKSTRING) +CREATEMDSTYPETABLE (UNFOLD LLSH \PUTBASE PLUS LIST SUB1 LOGOR FOLDLO LRSH \MAKEMDSENTRY PAGELOC IPLUS +\HILOC \LOLOC) CL:STRING-DOWNCASE (WITH-ONE-STRING %%STRING-DOWNCASE COPY-VECTOR CL:MAKE-STRING) +\RPLPTR.UFN (\ADDBASE UNINTERRUPTABLY OPCODES \HILOC \LOLOC) OVERLAPPINGWINDOWS (CONS +ALLATTACHEDWINDOWS WOVERLAPP REMOVE) DELETE.LONG.SEGMENT1 (IDIFFERENCE ADD1 FRPLACA PLUS +SEGMENT.BIT.LENGTH NTH.COLUMN.OF) \LEAF.READPAGES (PLUS \LEAF.REQUESTPAGE ADD1 LISPERROR - \ADDBASE +FOLDLO LRSH FOLDHI IPLUS LOGAND) \HTFIND (\ADDBASE LRSH NILL \LOLOC .NEWENTRY. \HILOC SELECTC \GCERROR + SUB1 ADD1 LLSH IDIFFERENCE IPLUS .FREELINK.) \SCALEDBITBLT.IP (\DSPXPOSITION.IP \DSPYPOSITION.IP +DSPSCALE INTERSECTREGIONS CREATEREGION TIMES + FIXR QUOTIENT -) CL:STRING< (%%PARSE-STRING-ARGS +WITH-TWO-UNPACKED-STRINGS %%STRING-BASE-COMPARE - %%ARRAY-READ +) MOVE.TO.START.OF.WORD (PREVWORD +TTNEXTCHAR) CL::*TYPEP-HASH-TABLE* (CL:MAKE-HASH-TABLE) CL:STRING-GREATERP (%%PARSE-STRING-ARGS +WITH-TWO-UNPACKED-STRINGS %%STRING-BASE-COMPARE-EQUAL - %%ARRAY-READ +) CHAT.SENDSCREENPARAMS ( +STREAMPROP CL:FUNCALL) CL:STRING<= (%%PARSE-STRING-ARGS WITH-TWO-UNPACKED-STRINGS +%%STRING-BASE-COMPARE - %%ARRAY-READ +) ADDTOFILE (GETFILEPKGTYPE WHATIS ADDTOCOMS FILECOMS APPLY*) +SI::INTERNAL-THROW (ARG CL:VALUES-LIST LIST PLUS CL:ERROR) COMPILER::COPY-VARIABLE (CL:GETHASH +COMPILER::MAKE-VARIABLE COMPILER::VARIABLE-NAME COMPILER::VARIABLE-SCOPE COMPILER::VARIABLE-KIND) +\TEDIT.ABBREV.EXPAND (SELECTQ SUB1 MKSTRING CHARACTER \BIN TEDIT.SEL.AS.STRING \TEDIT.TRY.ABBREV +TEDIT.GET.LOOKS) COMP.QUOTE (CONS COMP.CONST) \RPLACA.UFN (LISPERROR UNINTERRUPTABLY OPCODES) +\BSP.PREPARE.OUTPUT (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SETUPTIMER APPLY* +ALLOCATE.PUP IMIN) CL::%%GET-TIMING-INFO (CL:VALUES-LIST) BITBLT.DELETE (- +) \RPLACD.UFN (LISPERROR +UNINTERRUPTABLY OPCODES \ADDBASE LLSH IDIFFERENCE IPLUS .MAKECONSCELL. PLUS FFETCHFIELD \NEXTCONSPAGE) + TWODINSPECT.BUTTONEVENTFN (WINDOWPROP XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES + LOGAND TWOD.TRACKCURSOR FONTPROP FUNCTION CL:FUNCALL) TEDIT.CREATEW (TERPRI LISTGET HEIGHTIFWINDOW +ITIMES FONTPROP GETREGION IPLUS PLUS FFETCHFIELD IMINUS CREATEW \TEDIT.ORIGINAL.WINDOW.TITLE) +SHOWREGION (MINUS) NOT.TRACKCURSOR (PROMPTPRINT) \CONS.UFN (CREATECELL UNINTERRUPTABLY OPCODES IPLUS16 + \LOLOC \ADDBASE \GETBASE ADD1 IDIFFERENCE \DORECLAIM IGREATERP \NEXTCONSPAGE .MAKECONSCELL. PLUS +FFETCHFIELD NTYPX .FINDCLOSEPRIOR. LOGAND LOGOR LRSH .FINDPAIR. .FINDCDRABLEPAIR.) \LEAF.SETFILEINFO ( +IDATE LISPERROR FIXP \LEAF.GETFILE SELECTQ \LEAF.SETFILETYPE \LEAF.SETCREATIONDATE) CL::TIME-CALL ( +DATATYPES CL::MAKE-STATS-OBJECT CL:FUNCTION CL::STATS-OBJECT-ELAPSED-TIME CL:VALUES-LIST) GROW/REGION +(CREATEREGION IDIFFERENCE IPLUS ITIMES) CL:MAPHASH (MAPHASH CL:FUNCTION) SEDIT::GET-INDENT (CL:ASSOC) +CL::%%SIMPLE-ASSOC (ASSOC) NEWDEFC (CONS LIST FUNCTION KWOTE) CL:STRING/= (%%PARSE-STRING-ARGS +WITH-TWO-UNPACKED-STRINGS %%STRING-BASE-COMPARE -) \NOTE.10TO3 (\DTEST RPLACA LOCF \ADDBASE CONS LIST +CLOCK FFETCHFIELD) CLISPCAR/CDR (LIST MINUS MAKEMATCH CLISPRECORD NLEFT GETPROP IPLUS CLISPCAR/CDR1 +SUB1 ADD1 IMINUS CLISPLOOKUP) CL:STRING> (%%PARSE-STRING-ARGS WITH-TWO-UNPACKED-STRINGS +%%STRING-BASE-COMPARE - %%ARRAY-READ +) CL::GET-PS-FROM-ACCESSOR (CL:CATCH CL:MAPHASH CL:FUNCTION +CL:ERROR) CL:STRING-RIGHT-TRIM (WITH-STRING CL:SUBSEQ) RETDWIM1 (RETDWIM2 APPLY MAPCON LDIFF LIST +NTHCHAR SHOULDNT NLEFT) CL::%%SIMPLE-MEMBER (FMEMB) \LEAF.TRUNCATEFILE (ALLOCATE.PUP LLSH) +TEDIT.SUBSTITUTE (TEXTOBJ TEDIT.GETINPUT TEXTPROP NCHARS PLUS STRPOS CHARACTER MEMBER IPLUS SUB1 +TEDIT.FIND TEDIT.SETSEL IDIFFERENCE IEQP MAPCAR \TEDIT.COPY.PIECEMAPFN FFETCHFIELD \CHTOPC \DELETECH +ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE CONCAT MKSTRING) \FINDKEY.UFN (\MYALINK OPCODES +SUB1 FOLDLO LRSH IDIFFERENCE STACKADDBASE \VAG2 PLUS UNFOLD LLSH \GETBASEPTR ADD1 \ADDBASE TIMES) +MIN.SMALLFIXP (- EXPT) CL::BIGNUMP (TYPENAMEP) CL:STRING-UPCASE (WITH-ONE-STRING %%STRING-UPCASE +COPY-VECTOR CL:MAKE-STRING) SEDIT::INSERT-COMMENT (SUB1 ADD1 SEDIT::SPLIT-COMMENT) \CREATECELL ( +UNLESSINEW CREATECELL) BSPPEEKBIN (\BUFFERED.PEEKBIN) SETINTERRUPT (ASSOC SETINTERRUPT GETINTERRUPT +FASSOC FREPLACEFIELD DREMOVE FFETCHFIELD FRPLACD LIST CONS) \TRANSLATE.10TO3 (\DTEST +\ALLOCATE.ETHERPACKET LOCF \ADDBASE) \TEDIT.GET.CHARLOOKS (\BIN LOGAND ELT \SMALLPIN SUB1 LLSH +IDIFFERENCE FOLDHI LRSH IPLUS PLUS FFETCHFIELD) INTCHAR (GETINTERRUPT NCONC INTCHAR LISPINTERRUPTS +ASSOC ERRORX LIST APPLY* CONS) \BIN (STREAMOP SPREADAPPLY* \DTEST) CL:TANH (/ CL:SINH CL:COSH +CL::%%EXP-FLOAT CL:* FQUOTIENT - +) TEDIT.UNDO (RESETSAVE CURSOR \SHOWSEL SELECTQ TEDIT.UNDO.INSERTION + TEDIT.UNDO.DELETION TEDIT.UNDO.LOOKS TEDIT.UNDO.PARALOOKS TEDIT.UNDO.REPLACE TEDIT.PROMPTPRINT ASSOC +APPLY* CONCAT) CL::ARRAY-TYPE (CL:ARRAY-RANK CL:ARRAY-TOTAL-SIZE LIST CL:ARRAY-ELEMENT-TYPE +CL:ARRAY-DIMENSIONS) CL::GET-PS-FROM-PREDICATE (CL:CATCH CL:MAPHASH CL:FUNCTION CL:ERROR) WTFIX0 ( +WTFIX1) \BOUT (\DTEST STREAMOP SPREADAPPLY*) CL::%%TYPEP-PRED (CL::TYPE-EXPANDER CL::%%TYPEP-PRED +CL:FUNCALL LIST) SEDIT::INSTALL-SPECIAL-FORMATS (SEDIT::SET-LIST-FORMAT) CL:STRING-NOT-LESSP ( +%%PARSE-STRING-ARGS WITH-TWO-UNPACKED-STRINGS %%STRING-BASE-COMPARE-EQUAL - %%ARRAY-READ +) +INTERRUPTCHAR (INTCHAR LIST) %%BIT-TYPE (%%TYPE-SIZE-TO-TYPENUMBER) REHASHFILE (GTHASHFILE +PACKFILENAME HASHFILENAME HASHFILEPROP printout PRIN1 COPYHASHFILE OPENHASHFILE TERPRI) +CL::GET-SLOT-DESCRIPTOR-FROM-PS (CL:ERROR) CL:STRING-NOT-GREATERP (%%PARSE-STRING-ARGS +WITH-TWO-UNPACKED-STRINGS %%STRING-BASE-COMPARE-EQUAL - %%ARRAY-READ +) \RESTLIST.UFN (\MYALINK +OPCODES STACKADDBASE \VAG2 IDIFFERENCE CONS \GETBASEPTR UNFOLD LLSH PLUS) XCL::GET-WHERE-IS-ENTRIES ( +CL:MAPLIST CL:FUNCTION) CL:SUBSTITUTE-IF-NOT (CL:LENGTH COMPLEX-SUBSTITUTE-IF-NOT +SIMPLE-SUBSTITUTE-IF-NOT) CL::CACHE-SETF-INFO (CL:MAPC CL:FUNCTION CL::PS-ALL-SLOTS) CL:SUBSTITUTE-IF +(CL:LENGTH COMPLEX-SUBSTITUTE-IF SIMPLE-SUBSTITUTE-IF) \MISCN.UFN (LRSH LOGAND \MYALINK OPCODES +\GET-MY-BF - LLSH \VAG2 \ADDBASE CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION APPLY* \GETBASEPTR) + SPY.COPYBUTTON (SPY.GRAPH.EDITOR) MAX.SMALLFIXP (CL:1- EXPT) CL:SUBSTITUTE (CL:LENGTH +COMPLEX-SUBSTITUTE SIMPLE-SUBSTITUTE) \RPLCONS (UNINTERRUPTABLY OPCODES .MAKECONSCELL. \ADDBASE PLUS +FFETCHFIELD IPLUS16 \LOLOC \GETBASE ADD1 IDIFFERENCE \DORECLAIM IPLUS CONS) GETINTERRUPT (SELECTQ +ASSOC LIST MAPCAR FASSOC) \BRUSHCONVERT.HCPYMODE (MAPCAR) CL:WRITE-TO-STRING (\PRINDATUM.TO.STRING) +CL:COPY-TREE (CONS CL:COPY-TREE) \EVAL (\EVALFORM \EVALVAR \EVALOTHER) \RTP.SOCKET.PROCESS (LIST +FUNCTION THIS.PROCESS) CL:ZEROP (=) CL::PRINT-STRUCTURE-INSTANCE (CL:FUNCALL CL::PS-PRINT-FUNCTION) +\FTP.FLUSH.TO.MARK (GETSTREAM BIN) \INSUREWINDOW (\OUTSTREAMARG \GETSTREAM WFROMDS \ILLEGAL.ARG) +\ENVCALL.UFN (\MISCAPPLY* FUNCTION) CL:SUBTYPEP (CL:VALUES) CL::SUBTYPEP-TYPE-EXPAND (CL:FUNCTION +CL:VALUES CL::TYPE-EXPAND) CL:TYPE-OF (\INDEXATOMPNAME \GETDTD \ADDBASE ITIMES NTYPX GET CL:FUNCALL) +WHICHW (\INSURESCREEN WHICHW) \TYPECHECK.UFN (NTYPX \GETDTD \ADDBASE ITIMES \LISPERROR CONCAT +\INDEXATOMPNAME) CL::COMPLETE-META-EXPRESSION-DEFAULTS (LIST) CL::EQUAL-DIMENSIONS (CL:LENGTH) +CL:STRING>= (%%PARSE-STRING-ARGS WITH-TWO-UNPACKED-STRINGS %%STRING-BASE-COMPARE - %%ARRAY-READ +) +\STKSCAN (\MYALINK OPCODES \ATOMVALINDEX NTYPX \LOLOC SHOULDNT \ADDBASE GETNAMEENTRY CONSTANT SUB1 +BYTESPERNAMEENTRY LLSH WORDSPERNAMEENTRY LOGOR CODEBASELT \GETBASEBYTE LOGXOR IPLUS PLUS +NTSLOT-VARTYPE GETNTOFFSETENTRY BYTESPERNTOFFSETENTRY STACKADDBASE \VAG2 UNFOLD NTSLOT-OFFSET LOGAND +ADDSTACKBASE) PUTDEFN (FILECODEBLOCK FOLDHI LRSH IPLUS FILEARRAYBASE LOCAL FUNCTION MODUP IDIFFERENCE +SUB1 IMOD) CL:NBUTLAST (CL:ERROR LENGTH - CL:NTHCDR) XCL::HASH-FILE-WHERE-IS (CL:REMOVE-DUPLICATES +CL:MAPCAN CL:FUNCTION XCL::GET-WHERE-IS-ENTRIES) \MAIKO.IO-INTERRUPT (LOGAND) TWODINSPECT.COPYBUTTONFN + (WITH-INSPECTOR-ENV WINDOWPROP XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES +KEYDOWNP CL:FUNCALL TWOD.TRACKCURSOR FUNCTION) \DOINTERRUPTHERE (SELECTQ RESET ERROR! \DOHELPINTERRUPT + \DOHELPINTERRUPT1 CONTROL-T \SETRECLAIMMIN \SETPRINTLEVEL \CLEARSYSBUF RAID SET \EVAL) \INBETWEENP ( +GREATERP) CL:USER-HOMEDIR-PATHNAME (DECLARE STRING UNIX-GETPARM CL:MAKE-PATHNAME UNPACKFILENAME.STRING + UNIX-GETENV PATHNAME) SET-CONNECTED-DIRECTORY-INTERACTIVELY (MENU WHO-LINE-COPY-INSERT CONS +PROMPTFORWORD CL:NAMESTRING PROCESS.EVALV TTY.PROCESS CNDIR) \MISC8.UFN (SELECTQ IBLT1 IBLT2 RAID) +DINFO.UPDATE.FROM.GRAPH (ADD.PROCESS) ICONW.PRINT-JUSTIFIED (DSPCLIPPINGREGION FONTCOPY SELECTQ +FONTPROP \ICONW.FORMAT.TITLE IQUOTIENT ITIMES FLENGTH IPLUS IDIFFERENCE IMIN LRSH NTHCHARCODE PLUS) +CL::RANGE<= (+ - >= >) CL:UNREAD-CHAR (\BACKCCODE \GETSTREAM) BSPINPUTSTREAM (\DTEST) \UNBOXFLOAT3 ( +\CALLER.ARGS \MYALINK OPCODES \.GETBASE32 IDIFFERENCE \FLOATBOX TIMES LLSH \GETBASEFLOATP FPLUS FTIMES + PLUS \FLOATUNBOX SELECTQ \MATMULT333 \MATMULT444 \MATMULT133 \MATMULT331 \MATMULT144 \MATMULT441 HELP +) CL::BASE-SUBTYPEP (CL:VALUES CL:FUNCTION CL:ASSOC CL::COMPLETE-META-EXPRESSION-DEFAULTS) +COMPILER::COPY-NODE-LIST (MAPCAR COMPILER::COPY-NODES) CL:WRITE-LINE (WRITE-STRING*) COMP.COND ( +SELECTQ CDR COMP.VALN OPT.JUMPCHECK COMP.EXPR) \TYPEMASK.UFN (LOGAND LRSH \GETBASE FOLDLO) +CL::DEFAULT-STRUCTURE-PRINTER (\PRINT-USING-ADDRESS TYPENAME) FIND.PROCESS (GETHASH ERROR) +\DOHELPINTERRUPT (\SELECTPROCESS THIS.PROCESS \PROCESS.MAKEFRAME FUNCTION) CL:WRITE-STRING ( +WRITE-STRING*) CL::STEP-SLEEP (CL:FUNCTION) CONTROL-T (GETSTREAM TTYDISPLAYSTREAM WFROMDS +UNINTERRUPTABLY STKNTHNAME PROCESS.NAME THIS.PROCESS PRIN1 PLUS CLOCK IPLUS IMINUS \CLOCK0) +\SELECTPROCESS (TTY.PROCESS THIS.PROCESS CONS LIST CONCAT MENU FIND.PROCESS) RECORDALLOCATIONS ( +MAPCONC APPEND RECORD.ALLOCATIONS RECORDECL RECLOOK1) CL:BUTLAST (CL:ERROR LENGTH) \ELIDE.PRINT.TAIL ( +\SOUT \ELIDE.TAIL.STRING) FASL::+LARGEST-FOUR-BYTE-INTEGER+ (CL:1- CL:EXPT) TTYIN.READ?=ARGS ( +TTSKIPSEPR WITH-RESOURCES TTYIN.READ GETRESOURCE NEWRESOURCE MAKE-TTSCRATCHFILE) \SIN.OLD (CONSTANT +MINUS FREMAINDER FTIMES FPLUS FDIFFERENCE POLYEVAL \FLOATBOX OPCODES) EQL (IEQP CL::RATIO-NUMERATOR +EQL CL::RATIO-DENOMINATOR CL::COMPLEX-REALPART CL::COMPLEX-IMAGPART) \FTP.FLUSH.TO.EOC (GETSTREAM BIN +FTPGETMARK MARK#) \PRINDATUM (SELECTC NTYPX LIST \LITPRIN \PRINDATUM-LISTP WITH-RESOURCES \CKPOSSOUT +\CONVERTNUMBER \CHECKRADIX \INVALID.RADIX GETRESOURCE NEWRESOURCE ALLOCSTRING CONCAT +\CONVERT.FLOATING.NUMBER \PRINSTACKP \PRINSTRING CL::PRINT-STRUCTURE-INSTANCE PRINT-INSTANCE +\PRINT-USING-DEFPRINT) CL:TRUENAME (CL:TRUENAME CL:SYMBOL-VALUE XCL:SYNONYM-STREAM-SYMBOL CL:ERROR +CL:PROBE-FILE) \BITBLT.HCPYMODE (\BITBLT.DISPLAY \DASHINGCONVERT.HCPYMODE) \PROC.FINDREALFRAME ( +STKNTHNAME PLUS) CL:WRITE-BYTE (BOUT) PFI.INDEX.BREAK (DSPYPOSITION + - FONTPROP IQUOTIENT DSPLINEFEED + DSPLEFTMARGIN DSPRIGHTMARGIN DSPSCALE TERPRI) FETCHFIELD (\DTEST SELECTQ \GETBASEPTR MAKEFLOATNUMBER +\GETBASE \ADDBASE \MAKENUMBER ADDBASE LOGAND LRSH BitFieldShift BitFieldMask SUB1 LLSH IDIFFERENCE +BitFieldWidth BitFieldShiftedMask LISPERROR) \PROCESS.MAKEFRAME (UNINTERRUPTABLY CONS \MP.ERROR +\MISCAPPLY* FUNCTION) CHAT.LOGINFO (STREAMPROP CL:FUNCALL) \STORE.N.UFN (\.PUTBASE32 \PUTBASEPTR +IDIFFERENCE \MYALINK OPCODES IPLUS) \DOHELPINTERRUPT1 (FLASHWINDOW TTY.PROCESSP TTY.PROCESS +THIS.PROCESS \PROC.FINDREALFRAME) CL::%%COMPLEX-SUBST (CL::%%SUBST-MACRO CL:FUNCALL CL::%%COMPLEX-SUBST +) COMPILER::COPY-NODE-VAR-REF (COMPILER::MAKE-VAR-REF COMPILER::FIND-COPIED-VARIABLE +COMPILER::VAR-REF-VARIABLE) %%CHAR-TYPE (%%LIT-TYPE-TO-TYPE) \COPY.N.UFN (\.GETBASE32 IDIFFERENCE +\MYALINK OPCODES IPLUS) PACKAGE.NAME (\UNCOPY \GETBASEPTR) CL::%%SIMPLE-SUBST (CL::%%SUBST-MACRO EQL +CL::%%SIMPLE-SUBST) GETDESCRIPTORS (\GETDTD \ADDBASE ITIMES \TYPENUMBERFROMNAME NTYPX) +\MAIKO.CONSOLE-LOG-PRINT (SUBSTRING) CLISPATOMARE2 (LIST APPEND CLISPATOMARE2 CONS) \RETURN (\MYALINK +OPCODES) TWODINSPECT.CLOSEFN (WINDOWPROP) CL::STRUCTURE-SLOT-NAMES (CL::PS-ALL-SLOT-NAMES CL:COPY-LIST +) \TEDIT.PACK.TARGETLIST (CONS CONCAT \TEDIT.PACK.TARGETLIST MKSTRING) \ARG0 (\MYALINK OPCODES +GETBASEPTR \GETBASEPTR IPLUS LLSH SUB1 LISPERROR) FIND.SYMBOL (LOCAL FFETCHFIELD IPLUS IREMAINDER +LOGXOR RSH LOOKUP-SYMBOL \GETBASEPTR CL:VALUES RPLACD) CL::EQUAL-ELEMENT-TYPE (CL:EQUAL +%%GET-CANONICAL-CML-TYPE) CL:SUBST-IF-NOT (CL::%%SUBST-IF-NOT) \MISC7.UFN (SELECTQ \PSEUDOCOLOR.UFN +\FBITMAPBIT.UFN RAID) CLISPATOMIS2 (APPEND) \MYARGCOUNT (\MYALINK OPCODES) +TWODINSPECT.DEFAULT.VALUECOMMANDFN (CONSTANT \CREATE.TWODINSPECTOR.SETMENU +\CREATE.TWODINSPECTOR.INSPECTMENU MENU) \SETRECLAIMMIN (LINBUF SYSBUF \GETCHAR IPLUS ITIMES +IDIFFERENCE) \ELIDE.PRINT.ELEMENT (\OUTCHAR \ELIDE.ELEMENT.CHAR) SEDIT::SUBSTITUTE-OBJ ( +SEDIT::CLOSE-OPEN-NODE SEDIT::CLOSE-NODE SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW +SEDIT::PSEUDO-SELECTION-FROM-SELECTION) AWAIT.EVENT (\DTEST FIX \PROCESS.GO.TO.SLEEP) EDITMOVEREGION ( +ERROR) CL::%%SUBST-IF (CL::%%SUBST-MACRO CL:FUNCALL CL::%%SUBST-IF) PRIN3 (\GETSTREAM \DTEST \OUTTERMP +) CL::%%SIN-FLOAT (FLOAT - + CL:* UFIX FQUOTIENT CL::%%POLYEVAL) ERROR! (\MYALINK OPCODES RETTO) +CHAT.FLUSH&WAIT (STREAMPROP CL:FUNCALL) MONITOR.AWAIT.EVENT (\DTEST FIX \PROCESS.GO.TO.SLEEP) +CL:SUBST-IF (CL::%%SUBST-IF) PRINT-CIRCLE-LOOKUP (GETHASH) COMPILER::COPY-NODE-UNWIND-PROTECT ( +COMPILER::MAKE-UNWIND-PROTECT COMPILER::COPY-NODES COMPILER::UNWIND-PROTECT-STMT +COMPILER::UNWIND-PROTECT-CLEANUP) UPDATEFILES (FILEPKGCHANGES ASSOC INFILECOMS? NCONC INTERSECTION +REMOVE GETTOPVAL CONS LDIFFERENCE) \MOVETO.IP (SETXY.IP) CL:TERPRI (TERPRI) CL:PRIN1 (WRITE) +\LEAF.GENERATEFILES (\FTP.GENERATEFILES \GENERATENOFILES) \PRINT-USING-ADDRESS (TYPENAME IPLUS +FRESHLINE \CKPOSBOUT \PRINTADDR) FASL::+SMALLEST-FOUR-BYTE-INTEGER+ (- CL:EXPT) +SEDIT::COPY-STRUCTURE-COMMENT-WORD (CL:COPY-SEQ RPLACA) \TEDIT.SUBST.FN2 (\TEDIT.SUBST.FN1 ADD1 SUB1 +\TEDIT.SUBST.FN2 TEDIT.FIND) \PROCESS.GO.TO.SLEEP (UNINTERRUPTABLY THIS.PROCESS BLOCK \MP.ERROR +SETUPTIMER \RESCHEDULE \MYALINK OPCODES) \SETPRINTLEVEL (LINBUF SYSBUF \GETCHAR IPLUS ITIMES +IDIFFERENCE) CL::%%NSUBST-IF (CL::%%NSUBST-MACRO CL:FUNCALL CL::%%NSUBST-IF) SEDIT::COPY-STRUCTURE-COMMENT + (LIST SEDIT::MAKE-COMMENT-STRING) INTERRUPT (DEBUGGER MAKE-CONDITION) XCL::%%DEFINE-TYPE-GETDEF ( +CL:GETHASH CL:COPY-TREE) CURRENTINTERRUPTS (APPEND) GETDEF (EQMEMB GETFILEPKGTYPE GETDEFCURRENT CONS +MKLIST GETDEFSAVED GETDEFFROMFILE COPY) DO.INSERT.LINE (- DSPYPOSITION + TTLASTLINE PLUS DSPXPOSITION +DSPCLIPPINGREGION SUB1) CL::%%SIMPLE-NSUBST (CL::%%NSUBST-MACRO EQL CL::%%SIMPLE-NSUBST) CL:NSUBST-IF +(CL::%%NSUBST-IF) \DRAWLINE.UFN (\BITMASK \WORDELT LOGAND SELECTQ LOGXOR LOGOR IPLUS ADD1 IDIFFERENCE +\ADDBASE LRSH PLUS) \LEAF.GETFILENAME (\IFS.LOOKUPFILE \LEAF.GETFILE SELECTQ \GENERIC.OUTFILEP) +WHO-LINE-CURRENT-DIRECTORY (PROCESS.EVALV TTY.PROCESS FRPLACA FRPLACD CONCAT CL:PATHNAME-DIRECTORY +CL:PATHNAME-HOST CL:NAMESTRING CL:FUNCTION SORT) COMPILE-IN-CORE (RESETVARS .RESETLST. LIST CONS +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION OPENFILE RESETLST COMPILE1A BYTECOMPILE2) CL:PRINC ( +WRITE) CL:NSUBST (CL:ERROR CL::%%COMPLEX-NSUBST CL::%%SIMPLE-NSUBST) BRKDWNRESULTS1 (IMINUS BRKDWNELT +ELT PLUS FQUOTIENT LIST) RESET.INTERRUPTS (MAPCAR \ILLEGAL.ARG LIST ASSOC UNINTERRUPTABLY) +DINFO.SHOWGRAPH (GRAPHREGION DINFO.GET.GRAPH.WINDOW WINDOWPROP HEIGHTIFWINDOW WIDTHIFWINDOW IPLUS +IDIFFERENCE SHOWGRAPH FUNCTION) FW-INIT-MENUS (FASSOC SUBST CONS) CREATE.NEW.NODEPOSITION (PLUS) +\FTP.CLEANUP (SETUPTIMER LRSH FUNCTION) SETBSPUSERINFO (\DTEST) DINFO.LAYOUTGRAPH (FONTP MAPCAR FASSOC + LAYOUTGRAPH CONS NCONC LIST) \MISC1.UFN (RAID) PRINT-BITMAPS-NICELY (BITMAPWIDTH BITMAPHEIGHT +BITSPERPIXEL FOLDHI LRSH IPLUS CL:* PRIN2 PRIN1) \READPRINTERPORT.UFN (\DEVICE.INPUT) CL:NSUBST-IF-NOT + (CL::%%NSUBST-IF-NOT) COMPILER::COPY-NODE-THROW (COMPILER::MAKE-THROW COMPILER::COPY-NODES +COMPILER::THROW-TAG COMPILER::THROW-VALUE) COMP.GENFN (CL:INTERN CL:FORMAT STRING PLUS CL:SYMBOL-PACKAGE +) \MISC2.UFN (SELECTQ \GET-NEXT-RUN RAID) FIND.PACKAGE (LOCAL MKSTRING STRINGHASHBITS LOGAND LOGOR +LOGXOR LRSH IMIN \ADDBASE4 \ADDBASE \ADDBASE2 V\UNCOPY IPLUS16 \LOLOC) CL::%%COMPLEX-NSUBST ( +CL::%%NSUBST-MACRO CL:FUNCALL CL::%%COMPLEX-NSUBST) CL::%%NSUBST-IF-NOT (CL::%%NSUBST-MACRO CL:FUNCALL + CL::%%NSUBST-IF-NOT) CREATE-STRUCTURE (CL:APPLY) \GCRECLAIMCELL (NTYPX \DELREF OPCODES \ADDBASE LLSH +IDIFFERENCE \GETBASEPTR UNFOLD \GETDTD ITIMES FOLDLO LRSH) TWODINSPECT.DEFAULT.TITLECOMMANDFN (LOGAND +CONSTANT \CREATE.TWODINSPECTOR.TITLEMENU WINDOWPROP MENU) MAKE-KEYWORD (DECLARE CL:VALUES CL:INTERN +CL:SYMBOL-NAME) SPAWN.MOUSE (UNINTERRUPTABLY FIND.PROCESS CONCAT PLUS LIST) \GCSCAN1 (\ADDBASE SUB1) +\WRITEBITMAP (GETSTREAM TERPRI \BOUT \ADDBASE IPLUS SUB1 LRSH \GETBASEBYTE LOGAND) +CL::%%STATS-OBJECT-DIFFERENCE (CL::STATS-OBJECT-DATA-COUNTERS CL::STATS-OBJECT-TIME-BLOCK +CL::STATS-OBJECT-ELAPSED-TIME) \GETWINDOWHEIGHT (\INSUREWINDOW DIFFERENCE ITIMES DSPLINEFEED) +CL::STRUCTURE-CONSTRUCTOR (GET CL::PS-STANDARD-CONSTRUCTOR CL:ERROR CL::PS-NAME) LISTFILES1 ( +SEND.FILE.TO.PRINTER) \TEXTCLOSEF-SUBTREE (\TEXTCLOSEF-SUBTREE) \GCSCAN2 (LOGAND CONSTANT LOGOR +\GETBASE SUB1) COMPILE.FILE.RESET (REMOVE) CL::%%SUBST-IF-NOT (CL::%%SUBST-MACRO CL:FUNCALL +CL::%%SUBST-IF-NOT) \WRITEPRINTERPORT.UFN (\DEVICE.OUTPUT) CL::%%COMPLEX-ASSOC (ASSOC CL::%%SIMPLE-ASSOC +) CL::%%SIMPLE-SUBLIS (CL::%%SIMPLE-ASSOC CL::%%SIMPLE-SUBLIS CONS) ADD.CHAT.MESSAGE (STREAMPROP +CONCAT) PROCESS.NAME (\COERCE.TO.PROCESS FIND.PROCESS) XCL::%%DEFINE-TYPE-FILE-DEFINITIONS (CL:MAPCAR +CL:FUNCTION) CL:SUBST (CL:ERROR CL::%%COMPLEX-SUBST CL::%%SIMPLE-SUBST) XCL::%%DEFINE-TYPE-DELDEF ( +CL:GETHASH) CL::%%COMPLEX-NSUBLIS (CL::%%COMPLEX-ASSOC CL:FUNCALL) FASL::DUMMY-HANDLE (FASL::MAKE-HANDLE + OPEN) BRKDWNRESULTS2 (APPLY* FQUOTIENT FIX FPLUS FTIMES) \RETCALL (\MISCAPPLY*) +CL::SET-SETF-METHOD-EXPANDER (REMPROP GET) %%AREF1 (CL:ARRAY-RANK CL:ERROR %%ARRAY-READ +) +BRKDWNCOMPILE2 (RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +RESETLST UNION COMPILE1) CHARCODEP (ILEQ) WHO-LINE-COPY-INSERT (WFROMDS PROCESS.TTY TTY.PROCESS +COPYINSERT BKSYSBUF) \MAIKO.ETHER-INTERRUPT (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. +FUNCTION LOCF \ADDBASE \ALLOCATE.ETHERPACKET) CL::%%COMPLEX-SUBLIS (CL::%%COMPLEX-ASSOC CL:FUNCALL +CL::%%COMPLEX-SUBLIS CONS) SEDIT::LIST-FORMATS-TABLE (CL:MAKE-HASH-TABLE) %%ASET1 (CL:ARRAY-RANK +CL:ERROR %%ASET1 %%ARRAY-WRITE +) CREATEBSPSTREAM (OPENBSPSTREAM) CL:NSUBLIS (CL:ERROR +CL::%%COMPLEX-NSUBLIS CL::%%SIMPLE-NSUBLIS) CL:SUBLIS (CL:ERROR CL::%%COMPLEX-SUBLIS CL::%%SIMPLE-SUBLIS +) \DASHINGCONVERT.HCPYMODE (MAPCAR) \POP.N.UFN (\MYALINK OPCODES \GETBASEPTR IDIFFERENCE UNFOLD LLSH +ADD1) DO?CMD.ERRORHANDLER (MKSTRING RETFROM) TTNEXTNODE (FRPLACD CONS) TRANSGRAPH (MAPCAR PLUS) +\ATOMCELL (\ATOMDEFINDEX NTYPX \LOLOC SHOULDNT \HILOC SELECTC \ATOMVALINDEX \ATOMPROPINDEX +\ATOMPNAMEINDEX \ADDBASE \VAG2 IPLUS ITIMES) HASTTYWINDOWP (PROCESS.TTY) SEDIT::COPY-SELECTION-COMMENT + (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW SUB1 NCHARS SUBSTRING SEDIT::STRINGIFY-COMMENT BKSYSBUF +SEDIT::INSERT SEDIT::COPY-NODE OPENSTRINGSTREAM NLSETQ READ SEDIT::PARSE-NEW LIST printout PRIN1) +XCL::%%DEFINE-TYPE-FILEGETDEF (LOADFNS CONS) \GETBASEBYTE (\GETBASE FOLDLO LRSH) \PRINTBINARYBITMAP ( +GETSTREAM BITMAPP \BOUT BITMAPWIDTH BITMAPHEIGHT BITSPERPIXEL ITIMES) CL::%%COMPLEX-MEMBER (FMEMB +CL::%%SIMPLE-MEMBER) \GETWINDOWWIDTH (\INSUREWINDOW DIFFERENCE ITIMES) \LEAF.REOPENFILE (\LEAF.GETFILE + \LEAF.CREATIONDATE) CLISPATOMARE1 (LIST SELECTQ CLISPATOMARE1 NCONC1) \INSTANCEP.UFN (NTYPX) PUTDEF ( +GETFILEPKGTYPE APPLY*) CL::SET-SETF-INVERSE (REMPROP GET) CL::%%SIMPLE-NSUBLIS (CL::%%SIMPLE-ASSOC) +PACKAGE-INSPECT-STOREFN (PROMPTPRINT) \BLT (CONSTANT EXPT \ADDBASE DIFFERENCE \BLT SUB1 \GETBASE PLUS) + XCL::%%DEFINE-TYPE-PUTDEF (XCL::%%DEFINE-TYPE-DELDEF REMOVE-COMMENTS CL:COPY-TREE CL:EVAL +XCL::MAKE-UNDOABLE) COERCETOBITMAP (BITMAPP EVALV BITMAPCREATE BITSPERPIXEL SCREENBITMAP WINDOWPROP +DSPCLIPPINGREGION) WHO-LINE-CONTROL-SELECT (CL:FLET) \MISC10.UFN (SELECTQ \PIXELBLT.UFN HELP) +\CONTROL-T.PRINTRATIO (PRIN1 PRINTNUM IQUOTIENT ITIMES printout) \P-MISC2.UFN (SELECTQ \GET-NEXT-RUN +RAID) CL:CONCATENATE (MAKE-SEQUENCE-OF-TYPE) CLISPCAR/CDR2 (STKEVAL SUB1) \PUTBASEBYTE ( +.COERCE.TO.BYTE. IGEQ CONSTANT LLSH \ILLEGAL.ARG FOLDLO LRSH \DTEST \GETBASE) \LEAF.EVENTFN ( +SPREADAPPLY*) VECTOR-LENGTH (CL:ERROR) \FDIFS/FROM/DERIVS (FQUOTIENT FTIMES LIST FPLUS) +WHO-LINE-TTY-PROCESS (PROCESSPROP TTY.PROCESS) HRULE.COPYFN (HRULE.CREATE IMAGEOBJPROP) OPENRTPSOCKET +(RESETLST ETHERPORT PUPSOCKETNUMBER OPENPUPSOCKET \DTEST RAND FUNCTION \LOCALPUPADDRESS CONS +SETUPTIMER) CGETWINDOWPROP (SUBST LIST SELECTQ CONSTANT RECORDACCESSFORM KWOTE) \PUTBASE.UFN (\PUTBASE + \ADDBASE .COERCE.TO.SMALLPOSP. IGEQ \ILLEGAL.ARG) COMPILE.FILE.APPLY (PRINT CONS APPLY*) +CHANGE-TTY-PROCESS-INTERACTIVELY (MENU SORT MAPCAR LIST PROCESSPROP TTY.PROCESS) \BITBLT.IP ( +\DSPXPOSITION.IP \DSPYPOSITION.IP DSPSCALE TIMES INTERSECTREGIONS CREATEREGION PLUS FIXR QUOTIENT +DIFFERENCE) \PUTBASEPTR.UFN (\HILOC \ADDBASE \LOLOC) LOOKUP-SYMBOL (\GETBASEPTR ADD1 IREMAINDER +IDIFFERENCE \GETBASEBYTE SYMBOL.PNAME \GETBASE STREQUAL IPLUS) XCL::INTERESTING-FRAME-P (STKNAME) +SPYOBJ.COPYIN (HELP) MAKE-SEQUENCE-OF-TYPE (CL:MAKE-LIST MAKE-VECTOR CL::TYPE-EXPANDER +MAKE-SEQUENCE-OF-TYPE CL::TYPE-EXPAND CL:ERROR) TTYIN.PRINTARGS (TTYIN.READ?=ARGS MEMB CONS +CL:SET-DIFFERENCE TTPRIN1COMMENT SELECTQ ARGTYPE CONCAT) BSPBIN (\BUFFERED.BIN) \PUTBITS.UFN ( +.COERCE.TO.SMALLPOSP. IGEQ \ILLEGAL.ARG ADD1 LOGAND LRSH IDIFFERENCE IPLUS SUB1 LLSH \ADDBASE LOGOR +\GETBASE LOGXOR) %%MAXTHINCHAR (CL:1- EXPT) CL:UNION (CL:ERROR) ATAN (FLOATP FLOAT FLESSP FDIFFERENCE +FQUOTIENT FPLUS FTIMES POLYEVAL \FLOATBOX OPCODES) UNMAKEHARDCOPYMODESTREAM (DISPLAYSTREAMP WINDOWPROP + \ILLEGAL.ARG IMAGESTREAMTYPE FUNCTION STREAMPROP DSPCLIPPINGREGION) \ADDBASE (\HILOC \LOLOC NTYPX +\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR IDIFFERENCE PLUS SUB1 \VAG2) +TTSETCURSOR (MOVETO + TIMES -) CL:VECTOR (%%MAKE-ONED-ARRAY) GETBSPUSERINFO (\DTEST) \VAG2 (\VAG2 +BIG-VMEM-CODE .COERCE.TO.SMALLPOSP. IGEQ \ILLEGAL.ARG .COERCE.TO.BYTE. CONSTANT LLSH) FW-RE-INIT ( +STRINGWIDTH IMAX ITIMES IDIFFERENCE FONTHEIGHT ADD1 FONTPROP IPLUS WIDTHIFWINDOW HEIGHTIFWINDOW MAPC +FW-RESIZE-OFD) CL:COPY-SEQ (CL:LENGTH) COMPILER::COPY-NODE-TAGBODY (COMPILER::MAKE-TAGBODY CL:GETHASH COMPILER::TAGBODY-SEGMENTS MAPCAR COMPILER::MAKE-SEGMENT COMPILER::SEGMENT-TAGS COMPILER::COPY-NODE-LIST - COMPILER::SEGMENT-STMTS) ELTD (SELECTC FFETCHFIELD IDIFFERENCE IPLUS \\GETBASEPTR \\ADDBASE2 -\\ADDBASE ELT) \\CLEARMAP (LOGAND FFETCHFIELD CONSTANT LOGOR SPREADAPPLY* FREPLACEFIELD) ARRAYORIG ( -\\DTEST FFETCHFIELD) CLEARMAP (MAPC \\CLEARMAP \\GETSTREAM) REHASH (\\DTEST FFETCHFIELD \\ADDBASE4 -\\ADDBASE2 \\ADDBASE UNFOLD LLSH) TEDIT.HARDCOPY.PAGEHEADING (FFETCHFIELD STREAMPROP PLUS -\\TEDIT.COPYTEXTSTREAM.PIECEMAPFN LIST SUB1 IPLUS) HARDCOPYIMAGEW.TOFILE (|GetImageFile| -HARDCOPY.SOMEHOW) \\COPYHARRAYP (FFETCHFIELD FREPLACEFIELD) MAXIMUMSHADE (MAXIMUMCOLOR) \\READPAGES ( -FDEVOP SPREADAPPLY* FFETCHFIELD) TB.UPDATE.DISPLAY (FFETCHFIELD TB.BOTTOM.OF.ITEM FRPLACA PLUS SELECTQ - - SHOULDNT DSPCLIPPINGREGION IPLUS + IQUOTIENT ADD1) OPPOSITESHADE (IDIFFERENCE MAXIMUMSHADE) -\\MEDW.BITBLT (IMAGESTREAMP WFROMDS \\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD -SPREADAPPLY* \\DSPTRANSFORMX IPLUS \\DSPTRANSFORMY IMAX DSPDESTINATION \\TOTOPWDS) -SEDIT::PLACE-CARET-AND-SELECTION (DSPCLIPPINGREGION FFETCHFIELD SEDIT::FIND-LINE-START SEDIT::FIND-NODE - LAST PLUS IDIFFERENCE SEDIT::SET-SELECTION-NOWHERE) EXCHANGEXIPS (SETUPTIMER GETXIP FFETCHFIELD LOCF -\\ADDBASE) \\SEQUIN.HANDLE.ACK (FFETCHFIELD \\QUEUEHEAD PLUS LOGAND ADD1 LOCF \\ADDBASE APPLY*) -FINDPTRSBUFFER (FFETCHFIELD ERROR) TXTFILE (FFETCHFIELD) TRAPMAKE (HEADPT NEXTPT XYPT.Y LIST LAST CONS - TERPRI MERGE LENGTH) \\GETMAPBUFFER (FFETCHFIELD \\ALLOCMAPBUFFER) SEDIT::VAR-CHANGED (SET) -\\3MB.CREATENDB (\\SERIALNUMBER FUNCTION ADD.PROCESS FREPLACEFIELDVAL NCREATE) CL:READ-CHAR ( -\\GETSTREAM SPREADAPPLY* FFETCHFIELD CL:CODE-CHAR READCCODE) \\3MBFLUSH (PLUS) RESTORE.CURSOR ( -GO.TO.RELATIVE) \\NSFILING.ADDQUOTES (STRINGP MKSTRING SUB1 %ARRAY-OFFSET FFETCHFIELD %ARRAY-BASE -IPLUS %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE CONCATCODES CONS -REVERSE) LRSH (LLSH IMINUS NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR -CL::RATIO-DENOMINATOR IDIFFERENCE IPLUS LRSH LOGAND .LRSH1. \\MAKENUMBER) FINISH-READING-BITMAP (READ) - HARRAY (HASHARRAY) INSURE.B&W.TEXTURE (SELECTQ TYPENAME TEXTUREOFCOLOR INSURE.RGB.COLOR LOGAND -INSURE.B&W.TEXTURE \\ILLEGAL.ARG) ARRAYTYP (SELECTC \\DTEST FFETCHFIELD SHOULDNT) \\SPP.CLOSE.IF.ERROR - (SPP.CLOSE) MAPAFTERCLOSE (\\GETSTREAM) BITMAPBIT.EXPANDER (LENGTH) \\BITBLT.MERGE (\\BITBLTSUB MOD -IMOD \\GETPILOTBBTSCRATCHBM IPLUS) TEDIT.QUIT (FFETCHFIELD \\TEDIT.PRIMARYW PROCESSPROP TTY.PROCESS -WINDOWPROP THIS.PROCESS) MAPBUFFERCOUNT (FFETCHFIELD ADD1) \\CLIPLINE (FQUOTIENT + - IPLUS DIFFERENCE -\\CLIPCODE LOGAND PLUS LIST FIXR FTIMES) TB.PRINT.LINE (+ TB.BOTTOM.OF.ITEM FFETCHFIELD -TB.SHOW.DELETION) DISPLAYNODELINKS (TOLINKS GETNODEFROMID LINKPARAMETERS FROMLINKS) -SEDIT::OUTLINE-SELECTION (FFETCHFIELD IMAX IMIN FUNCTION IDIFFERENCE IPLUS) MAPPAGE (\\GETSTREAM -FFETCHFIELD SELECTQ \\GETACCESS \\MAPPAGE ADD1 ERROR) FB.ANALYZE.PATTERN (FFETCHFIELD NTHCHARCODE PLUS - STRPOS SUBSTRING ADD1 CONCAT SUB1 FB.CANONICALIZE.PATTERN) TEDIT.SKIP.SPECIALCOND (FFETCHFIELD -STREAMPROP PLUS LIST SUB1 IPLUS) TWODINSPECT.ROWPROPWIDTH (STRINGWIDTH) HARDCOPYIMAGEW ( -HARDCOPY.SOMEHOW) XCL::RECORD-CONSTRUCTOR-MACRO (DECLARE) \\MAPPAGE (FFETCHFIELD \\GETMAPBUFFER -UNINTERRUPTABLY OPCODES FREPLACEFIELD LOGAND CONSTANT LOGOR \\COLLECTDIRTYBUFS CONS GETBUFFERPTR ADD1 -DOPMAP CHECKBUFFERREFVAL) DBG::INVOKE-ESCAPE-FROM-MENU (DBG::MENU-FROM-ESCAPE-LIST -DBG::COLLECT-ACTIVE-ESCAPES MENU CL:FORMAT) HASHARRAY (FQUOTIENT IMAX IMIN - FOLDLO LRSH FIXR SUB1 -LLSH IQUOTIENT PLUS SQRT IREMAINDER UNFOLD ERROR FTIMES IPLUS \\ALLOCBLOCK FREPLACEFIELDVAL NCREATE) -|\\VAMRecomputeFreePageCount| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION -FFETCHFIELD ZEROP |\\VAMUpdateVAM| ADD1 PLUS) \\SEQUIN.FLUSH.RETRANSMIT (FFETCHFIELD) CL::%SIN-FLOAT ( -FLOAT - + CL:* UFIX FQUOTIENT CL::%POLYEVAL) COMPILER::ENV-ANALYZE-CATCH (COMPILER::ENV-ANALYZE -COMPILER::CATCH-TAG COMPILER::CATCH-STMT) COMPILER::COPY-NODE-SETQ (COMPILER::MAKE-SETQ -COMPILER::FIND-COPIED-VARIABLE COMPILER::SETQ-VAR COMPILER::COPY-NODES COMPILER::SETQ-VALUE) -SEDIT::INPUT-DOT (FFETCHFIELD) EXPRESSIONS.WHENCHANGED (SELECTQ UNMARKASCHANGED MAPC -EXPRESSIONS.WHENCHANGED) MAPWORD (WORDOFFSET MAPPAGE FOLDLO LRSH MOD IMOD) SEDIT::PROPLST-CHANGED ( -SETPROPLIST) SEDIT::REPLACE-NODE (FFETCHFIELD FREPLACEFIELDVAL REPLACEFIELDVAL FETCHFIELD -FREPLACEFIELD SEDIT::SMASH-USING) SUBARRAY (FFETCHFIELD IPLUS UNINTERRUPTABLY ARRAYP NCREATE ADD1 -IDIFFERENCE FREPLACEFIELDVAL REPLACEFIELDVAL) \\NSNAME.DEFPRINT (LIST NSNAME.TO.STRING) COMP.PUNT ( -CONS) \\3MBSENDPACKET (\\DTEST FFETCHFIELD LOCF \\ADDBASE UNFOLD LLSH - RAND \\GETPACKETBUFFER ADD1 -\\BOXIPLUS SELECTC) SEDIT:GET-SELECTION (FFETCHFIELD CL:VALUES SEDIT::STRUCTURE-FROM-SELECTION -MKSTRING SEDIT::DETRANSLATE-CHARS SUBSTRING) TWODINSPECT.SETELT (GETPROMPTWINDOW APPLY* WINDOWPROP -XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES RESETLST RESETSAVE TTYDISPLAYSTREAM - TTY.PROCESS THIS.PROCESS CLEARBUF |printout| PRIN1 CL:FUNCALL LISPXREAD) FB.CHECK.NAME.LENGTH (+ -STRINGWIDTH SUBSTRING FFETCHFIELD CONS LIST FREPLACEFIELD - FRPLACA PLUS) \\COURIER.EOF (ERROR) -\\TEDIT.INTEGER.IMAGEBOX (FIXR FRPLACA) TWODINSPECT.COLUMNWIDTHS (MAPCAR TWODINSPECT.COLUMNWIDTH) -UNMARKASCHANGED (GETFILEPKGTYPE GETTOPVAL SEARCHPRETTYTYPELST MEMBER ASSOC GETPROP REMOVE /RPLACD) -\\TEDIT.MOVE.PIECEMAPFN (FREPLACEFIELDVAL NCREATE FFETCHFIELD IMAGEOBJPROP SUBSTRING) MAPHASH (\\DTEST - FFETCHFIELD \\HASHSLOT \\ADDBASE2 \\ADDBASE UNFOLD LLSH) \\DSPBOTTOMMARGIN.IP (FFETCHFIELD) -TB.ITEM.UPDATABLE? (FIXP FFETCHFIELD OPENWP) SCALE/GRAPH (DSPSCALE EQMEMB LISTGET MAPCAR FIXR FTIMES -CONS IDIFFERENCE LRSH FONTCREATE SCALE/TONODES SCALE/GRAPHNODE/BORDER FRPLACD PLUS FRPLACA) OVERFLOW ( -SELECTQ) SEDIT::LESS-PROMPT-WINDOW (CREATEREGION IDIFFERENCE HEIGHTIFWINDOW FONTPROP) -SEDIT::ATOM-CHAR-ESCAPED (FFETCHFIELD \\SYNCODE GETHASH \\GETBASEBYTE BITTEST LOGAND LOGOR) -SEDIT::PROP-CHANGED (PUTPROP) WORDCONTENTS (\\GETBASE) TEXTUREOFCOLOR (INSURE.RGB.COLOR -\\PRIMARYTEXTURE) SEDIT::RELINEARIZE-WHERE-NECESSARY (FFETCHFIELD REVERSE DREVERSE RPLACD) \\NSINIT ( -\\FLUSHNSOCQUEUE FUNCTION FIND.PROCESS \\CLEAR.ROUTING.TABLE CONS SETUPTIMER NOTIFY.EVENT) -\\TFBRAVO.INSTALL.PAGEFORMAT (SET TEXTPROP CONS FREPLACEFIELD TEDIT.SINGLE.PAGEFORMAT LIST FRPLACA) -CLRHASH (\\DTEST FFETCHFIELD \\HASHSLOT \\ADDBASE2 \\ADDBASE UNFOLD LLSH FREPLACEFIELD) \\3MBWATCHER ( -\\3MBGETPACKET PLUS) SEDIT:ADD-COMMAND (NCONC LIST) COMPILER::SIDE-EFFECTS (GET) -DBG::ESCAPE-FROM-DEBUGGER (DBG::COLLECT-ACTIVE-ESCAPES DBG::KEYLIST-FROM-ESCAPE-LIST CL:FORMAT) -HARRAYPROP (ARG IGREATERP \\DTEST SELECTQ HARRAYSIZE FFETCHFIELD LISTGET LIST) \\COLLECTDIRTYBUFS ( -ADD1 FFETCHFIELD PLUS LIST) \\SEQUIN.COMPARE (LOGAND IDIFFERENCE) COMPILER::ENV-ANALYZE-CALL ( -COMPILER::ENV-ANALYZE COMPILER::CALL-FN MAPC COMPILER::CALL-ARGS) COMPILER::COPY-NODE-RETURN (CL:GETHASH - COMPILER::RETURN-BLOCK COMPILER::MAKE-RETURN COMPILER::COPY-NODES COMPILER::RETURN-VALUE) SEDIT::HELPMENU - (FFETCHFIELD SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW) FIND.LINE.BREAK (TTNEXTCHAR) -\\FTP.GETFILEINFO.FROM.PROPS (SELECTQ ASSOC IDATE MKATOM FOLDHI LRSH IPLUS U-CASE) \\SETEOF (PLUS -FOLDLO LRSH MOD IMOD UNINTERRUPTABLY FFETCHFIELD FREPLACEFIELD) \\NOTE.3TO10 (ASSOC \\DTEST -FFETCHFIELD CONS LIST CLOCK) DBG::PRINT-BACKTRACE (BAKTRACE LIST CL:FUNCTION +) \\PROMISCUOUS.OFF ( -SELECTQ FFETCHFIELD \\PUTBASE EMADDRESS OPCODES \\10MB.STARTDRIVER) |\\VFMDeletePageGroup| ( -WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION UNINTERRUPTABLY FFETCHFIELD IDIFFERENCE - \\ALLOCBLOCK LRSH ADD1 MESASIZE \\BLT |\\VFMGet| LOCF \\ADDBASE IMAX FREPLACEFIELD IPLUS IMIN SUB1 -\\GETBASE PLUS) \\MAKE.PMAP.DEVICE (FUNCTION FFETCHFIELD) COMPILER::ENV-ANALYZE-BLOCK (COMPILER::ENV-ANALYZE - COMPILER::BLOCK-STMT) COMPILER::COPY-NODE-PROGV (COMPILER::MAKE-PROGV COMPILER::COPY-NODES -COMPILER::PROGV-SYMS-EXPR COMPILER::PROGV-VALS-EXPR COMPILER::PROGV-STMT) \\TEDIT.SEARCH.CODETABLE ( -ARRAY PLUS SETA IPLUS LIST) EXPANDBITMAP (FFETCHFIELD ITIMES BITMAPCREATE) \\PUNT.BITBLT.BITMAP ( -FFETCHFIELD IMAX IMIN IPLUS IDIFFERENCE LOGXOR LOGAND COLORNUMBERP INVERT.TEXTURE.BITMAP BITMAPCREATE -\\ILLEGAL.ARG UNFOLD LLSH COLORTEXTUREFROMCOLOR# ITIMES |\\SFInvert| MAXIMUMCOLOR) -\\PAGED.GETNEXTBUFFER (FFETCHFIELD SELECTQ FREPLACEFIELD PLUS \\EOF.ACTION \\MAPPAGE) SEDIT::EDIT-HELP - (SEDIT::CLOSE-NODE FFETCHFIELD SEDIT::SELECTED-FN-NAME SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW NLSETQ - SMARTARGLIST STRINGWIDTH CONS WINDOWPROP PRIN1) REMHASH (\\HASHACCESS) SEDIT::RECOMPUTE-WIDTH ( -FFETCHFIELD IPLUS IMAX IDIFFERENCE) STOPNS (FUNCTION) COMP.APPLYFNP (SELECTQ COMP.ARGTYPE CONS) -\\3MB.BROADCASTP (FFETCHFIELD LOCF \\ADDBASE) INVERTED/GRAPHNODE/BORDER (IMINUS LIST -INVERTED/SHADE/FOR/GRAPHER) /SETWORDCONTENTS (LIST FUNCTION WORDCONTENTS SETWORDCONTENTS) -TB.SHOW.DELETION (FFETCHFIELD BLTSHADE + SUB1 IQUOTIENT - TB.BOTTOM.OF.ITEM) \\PAGED.SETEOFPTR (FOLDLO - LRSH MOD IMOD SELECTQ \\NEWLENGTHIS LOGAND FFETCHFIELD ADD1 \\MAPPAGE - SHOULDNT) WORDOFFSET ( -\\ADDBASE) \\PUNT.BLTSHADE.BITMAP (FFETCHFIELD IMAX IMIN IPLUS SELECTQ TYPENAME COLORNUMBERP -\\ILLEGAL.ARG MAXIMUMCOLOR LOGAND TEXTUREP TEXTUREOFCOLOR ITIMES COLORTEXTUREFROMCOLOR# IDIFFERENCE -|\\SFInvert|) SEDIT::ICON-COPYFN (LISTGET WINDOWPROP BKSYSBUF) SEDIT::COLLECT-UNDO-BLOCK (FFETCHFIELD -FREPLACEFIELD) \\UPDATEOF (FFETCHFIELD \\SETEOF) COMPILER::NULL-EFFECTS-INTERSECTION-EXCEPT-CONS ( -EQUAL MKLIST) DEFAULT.EDITDEF (GETDEF WHEREIS CL:FORMAT ASKUSER MAKEKEYLST) \\PAGEDREADP (\\SYNCODE -GETHASH FFETCHFIELD \\GETBASEBYTE \\PEEKCCODE SELCHARQ SELECTC UNINTERRUPTABLY \\DTEST \\XCCSIN \\BIN -IDIFFERENCE \\NSIN.24BITENCODING.ERROR UNFOLD LLSH ACCESS-CHARSET LOGOR CL:FUNCALL \\PEEKBIN -\\BACKXCCSCHAR PLUS SUB1 \\NSPEEK \\XCCSPEEK ILESSP IPLUS) \\DOFORMATTING.HARDCOPY (FFETCHFIELD PLUS -IPLUS LRSH ADD1 SUB1 \\EDITELT GETBASEPTR \\GETBASEPTR \\ADDBASE2 \\ADDBASE \\RPLPTR IQUOTIENT FIXR -FTIMES FPLUS FQUOTIENT) GET-TWOD-DISPLAYW (CREATEW CREATEREGION FUNCTION TWODINSPECT.ROWPROPWIDTH -TWODINSPECT.COLUMNWIDTHS) INSERT.TEXT (TYPE.BUFFER SEGMENT.BIT.LENGTH) COMPILER::PASSABLE ( -COMPILER::NODE-EFFECTS COMPILER::NODE-AFFECTED COMPILER::NULL-EFFECTS-INTERSECTION-EXCEPT-CONS) SORT ( -ERROR FUNCTION LAST SORT1) \\PAGEDSETFILEPTR (FOLDLO LRSH MOD IMOD FFETCHFIELD FREPLACEFIELD) -SCANFILE2 (CONS DREMOVE) SEDIT::PROPAGATE-WIDTH-CHANGE (FFETCHFIELD WINDOWPROP FRPLACA IPLUS -IDIFFERENCE SEDIT::PROPAGATE-WIDTH-CHANGE) \\TIME.NOT.SET (|printout| PRIN1) PUTHASHTEXT (GTHASHFILE -SETFILEPTR GETEOFPTR CONS COPYBYTES FRPLACD ELT PUTHASHFILE) \\HASHACCESS (\\DTEST FFETCHFIELD APPLY* -\\EQHASHINGBITS LOGXOR \\HILOC LLSH LOGAND \\LOLOC LRSH \\FIRSTINDEX IREMAINDER ADD1 \\HASHSLOT -\\ADDBASE \\ADDBASE2 \\REPROBE LOGOR IMIN IPLUS ERROR FREPLACEFIELD PLUS HASHOVERFLOW) COMP.BOOL ( -COMP.CONST COMP.EXP1 CONS ADD1 SELECTQ OPT.COMPILERERROR COMP.EXPR) \\3MBENCAPSULATE (LOCF \\ADDBASE -FFETCHFIELD IPLUS FOLDHI LRSH) SPY.LEGEND (SHOWGRAPH LAYOUTGRAPH MAPCAR CONS REVERSE) DBG::EXIT-DEBUGGER - (CL:THROW) \\GETMISCNSOCKET (OPENNSOCKET) COMPILER::COPY-NODE-PROGN (COMPILER::MAKE-PROGN -COMPILER::COPY-NODE-LIST COMPILER::PROGN-STMTS) SEDIT::GET-MENU (FREEMENU) ADDTOCOMS (ADDTOCOMS -GETTOPVAL ADDNEWCOM GETFILEPKGTYPE) DSPCREATE (FUNCTION FREPLACEFIELDVAL NCREATE CONS MAX FFETCHFIELD) - COMPILER::NULL-EFFECTS-INTERSECTION (COMPILER::NULL-INTERSECTION) PRINT3TO10 (FFETCHFIELD LOCF -\\ADDBASE PRIN1 \\LOADNSHOSTNUMBER TERPRI) |\\VAMFreePageGroup| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION UNINTERRUPTABLY |\\VAMAdjustGroup| FFETCHFIELD IDIFFERENCE |\\PFGetPage| -|\\VAMFilePageNumber| GETRESOURCE NEWRESOURCE NCREATE |\\PFCreateFreePage| PLUS IMIN) TTDELSECTION ( -BITBLT.DELETE DSPXPOSITION - DSPYPOSITION) SEDIT::SEDITL (CL:FUNCTION TTY/EDITL LIST) GET-TOPW ( -WINDOWPROP CREATEW CREATEREGION FUNCTION) \\STRINGHASHBITS-UFN (\\GETBASEPTR %ARRAY-BASE FFETCHFIELD -SUB1 %ARRAY-OFFSET IPLUS %ARRAY-TYPE-NUMBER \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT MKSTRING ADD1 -\\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE IPLUS16 \\LOLOC \\ADDBASE LLSH LOGAND) -XCL::RECORD-PREDICATE-MACRO (DECLARE) SETWORDCONTENTS (FINDPTRSBUFFER \\PUTBASE) -INVERTED/SHADE/FOR/GRAPHER (LOGNOT BITMAPCOPY ERROR) COMPILE1A (\\GETSTREAM POSITION GETHASH) -HASHOVERFLOW (HASHOVERFLOW.ARRAYTEST \\DTEST HARRAYPROP SELECTQ IMAX + IMIN LRSH CL:1+ LIST FIXR -FTIMES APPLY* REHASH HASHARRAY \\COPYHARRAYP) TB.FIND.SELECTED.ITEM (FFETCHFIELD TB.NTH.ITEM PLUS) EP -(APPLY NLAMBDA.ARGS) HARRAYSIZE (\\DTEST FFETCHFIELD) PRINTDISPLAYNODE (ZEROP) DSPSOURCETYPE ( -\\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD FMEMB \\SETPBTFUNCTION SELECTQ -FREPLACEFIELD) \\TEDIT.INTERRUPT.SETUP (PROCESSPROP TEXTOBJ RESET.INTERRUPTS TEXTPROP) CLISPIFY2A ( -CLISPIFY2 LIST) SEDIT::HIGHLIGHT-SELECTION (SEDIT::OUTLINE-SELECTION FUNCTION) SEDIT::PUNT-SET-POINT ( -SEDIT::SET-POINT FFETCHFIELD) |\\SFFixFont| (FFETCHFIELD FREPLACEFIELD \\SFFIXLINELENGTH) -*TRACE-OUTPUT* (XCL:CREATE-TRACE-WINDOW) EDITDEF.FNS (GET GETD GETPROP) \\DISPLAYSTREAMINCRXPOSITION ( -FFETCHFIELD FREPLACEFIELD PLUS) XCL::RECORD-ACCESS-MACRO (DECLARE) INTERSECT/REGIONP/LBWH (SELECTQ -IPLUS EQUAL INTERSECTREGIONS LIST) \\NSFILING.REMOVEQUOTES (CONCATCODES NTHCHARCODE PLUS LIST) -\\CLIPCURVELINE.IP (- \\CLIPCODE LOGAND PLUS FTIMES FQUOTIENT) \\SETIODIRTY (FFETCHFIELD) DSPYOFFSET ( -IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) DISPLAYGRAPH (NUMBERP CONSTANT CONS -\\GETSTREAM DSPSCALE SCALE/GRAPH FIXR FTIMES LENGTH HASHARRAY PUTHASH DISPLAYNODELINKS -PRINTDISPLAYNODE) DSPXOFFSET (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) -|\\SFFixClippingRegion| (FFETCHFIELD IMAX IMIN \\DSPTRANSFORMX IPLUS \\DSPTRANSFORMY) -\\PAGED.FORCEOUTPUT (\\GETSTREAM LOGAND FFETCHFIELD CONSTANT LOGOR \\RELEASECPAGE FREPLACEFIELD SORT -LIST ADD1 PLUS) \\CODEARRAY (\\ALLOCBLOCK FOLDHI LRSH IPLUS FREPLACEFIELDVAL NCREATE) *RANDOM-STATE* ( -CL::%MAKE-RANDOM-STATE) \\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (FFETCHFIELD CL:MAPC CL:FUNCTION) -SETTTBLPROP (ECHOCONTROL SETSYNTAX DELETECONTROL CONTROL RAISE ECHOMODE) \\VANILLAHOSTNAMEP (SELECTQ -MACHINETYPE |\\LFOpenDevice| \\GETDEVICEFROMNAME FUNCTION |\\UFSOpenDevice| |\\DSKOpenDevice| -\\M44HOSTNAMEP) RECORDACCESS (RECORDCHAIN RECFIELDLOOK LIST RECORDERROR CHECKDEFS MAPCONC ACCESSDEF4 -RECORDECL FIXSPELL FIELDNAMESIN EVAL EMBEDPROG MAKEACCESS SELECTQ KWOTE ERROR) \\3MBGETPACKET ( -\\READRAWPBI \\ALLOCATE.ETHERPACKET LOCF \\ADDBASE ADD1 FFETCHFIELD) SEDIT::FN-CHANGED (GETD PUTD -GETPROP PUTPROP SHOULDNT) |\\DSKOpenDevice| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION |\\DSKCreateDevice|) DBG::%RELEASE-STACK-DATUM (WINDOWPROP RELSTK CL:MAPC) -|\\SFFixDestination| (FFETCHFIELD UNFOLD LLSH FREPLACEFIELD) \\PROMISCUOUS.ON (SELECTQ FFETCHFIELD -\\PUTBASE EMADDRESS OPCODES \\10MB.STARTDRIVER) \\SEQUIN.CLEANUP (SELECTQ FFETCHFIELD -\\SEQUIN.FLUSH.CONNECTION) \\HASHTABLE.DEFPRINT (IPLUS CONSTANT + NCHARS FFETCHFIELD FRESHLINE) -\\VANILLADISKINIT (COPYARRAY SUB1 PLUS ADD1 \\DEFINEDEVICE FUNCTION FREPLACEFIELDVAL NCREATE) -\\HASHRECLAIM (\\DTEST FFETCHFIELD \\HASHSLOT \\ADDBASE2 \\ADDBASE UNFOLD LLSH PLUS IDIFFERENCE) -\\BITBLT.BITMAP.SLOW (FFETCHFIELD IMAX IMIN IPLUS IDIFFERENCE LOGXOR LOGAND COLORNUMBERP -INVERT.TEXTURE.BITMAP BITMAPCREATE \\ILLEGAL.ARG UNFOLD LLSH COLORTEXTUREFROMCOLOR# ITIMES -|\\SFInvert| MAXIMUMCOLOR) \\CHECKARRAYBLOCK (FFETCHFIELD \\REFCNT \\ADDBASE2 \\ADDBASE IDIFFERENCE -FREEBLOCKCHAIN.N BUCKETINDEX IMIN INTEGERLENGTH \\GETBASEPTR \\MP.ERROR) \\NEWLENGTHIS (IDIFFERENCE -FFETCHFIELD) |\\LFOpenDevice| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SELECTQ -MACHINETYPE |\\PFGetVols| \\GETDEVICEFROMNAME \\DEFINEDEVICE) \\FIXCODENUM (FFETCHFIELD LOGAND SUB1 -LOGOR \\GETBASEBYTE LRSH) TB.REV.FIND.SELECTED.ITEM (FFETCHFIELD TB.NTH.ITEM PLUS) |\\UFSOpenDevice| ( -WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION |\\UFSCreateDevice|) -\\TEDIT.INSERT.TTY.BUFFER (HELP) \\ALLOCBLOCK.OLD (BUCKETINDEX IMIN INTEGERLENGTH \\GETBASEPTR -\\ADDBASE2 \\ADDBASE FFETCHFIELD IDIFFERENCE \\MP.ERROR \\PREFIXALIGNMENT? \\MAKEFREEARRAYBLOCK IPLUS -\\LINKBLOCK PLUS) \\ALLOCBLOCK.NEW (\\PREFIXALIGNMENT? \\ALLOCBLOCK.NEW \\ADDBASE SUB1 IPLUS LLSH -\\HILOC LRSH \\LOLOC IDIFFERENCE \\CHECKFORSTORAGEFULL ADD1 \\VAG2 LOGAND \\PUTBASEFIXP -\\MAKEFREEARRAYBLOCK \\PUTBASEPTR LOCF \\ATOMCELL) SEDIT::SHIFT-STRING (\\ADDBASE %ARRAY-BASE -FFETCHFIELD %ARRAY-OFFSET SUB1 \\GETBASE ADD1 PLUS) \\FTP.ASSURE.CLEANUP (FIND.PROCESS ADD.PROCESS) -\\VANILLAEVENTFN (SELECTQ \\REMOVEDEVICE.NAMES) \\ALLOCHUNK (SELECTC CONSTANT LIST SHOULDNT -\\GETBASEBYTE HUNKSIZEFROMNUMBER LRSH \\GETDTD \\ADDBASE ITIMES FFETCHFIELD IREMAINDER FOLDLO ADD1 -CREATECELL IDIFFERENCE LOGAND \\LOLOC IQUOTIENT OPCODES CONS PLUS NCONC) SEDIT::SEDITE (CREATE.EVENT -SELECTQ APPEND GETPROPLIST CL:FUNCTION LIST FUNCTION TTY/EDITE RPLNODE2 CL:COPY-TREE) GET-CORNERW ( -WINDOWPROP CREATEW CREATEREGION FUNCTION) \\SFFIXLINELENGTH (FFETCHFIELD IMIN IMAX IQUOTIENT -IDIFFERENCE) POSTSCRIPT.FONTSAVAILABLE (\\FONTFILENAME ASSOC MAPCAR CONS MAPCONC DIRECTORY CONCAT -\\FONTINFOFROMFILENAME RPLACA LIST COPY PLUS) INSPECT/AS/BLOCKRECORD (LIST-ALL-BLOCKRECORDS |printout| - PRIN1 MENU FUNCTION FREPLACEFIELDVAL NCREATE CONS INSPECT) BKLINBUF (\\DTEST FFETCHFIELD NTHCHARCODE -\\SYNCODE GETHASH \\GETBASEBYTE PLUS) DSPTEXTURE (DSPBACKCOLOR) \\MAIKO.ALLOCBLOCK (\\ALLOCHUNK IPLUS -\\ALLOCBLOCK.OLD \\ALLOCBLOCK.NEW RECLAIM \\ADDBASE2 \\ADDBASE IDIFFERENCE FFETCHFIELD \\DORECLAIM -OPCODES) CL::%SQRT-COMPLEX (FLOAT CL::COMPLEX-REALPART CL::COMPLEX-IMAGPART CL:SQRT ABS FQUOTIENT -CL:PHASE CL:* CL:COS CL:SIN) COMPILER::COPY-NODE-OPCODES (COMPILER::MAKE-OPCODES CL:COPY-LIST -COMPILER::OPCODES-BYTES) GETSELECTEDITEMS (FFETCHFIELD LIST) \\CLOSELINE (UNINTERRUPTABLY -FREPLACEFIELD) SCANDECLARECOLON (GETFILEPTR RATOM SUB1 READ CONS EVAL) SEDIT::PARSE-NEW (SEDIT::PARSE) - COPYHASHFILE (GTHASHFILE HASHFILEPROP CREATEHASHFILE CLOSEHASHFILE FUNCTION ELT) COMP.EVQ (RESETVARS -.RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION COMP.PROGLST) -\\DISPLAY.PILOTBITBLT (\\PILOTBITBLT) SEDIT::DECOMPOSE-PSEUDO-SELECTION (CL:VALUES CL:FIRST CL:SECOND -CL:THIRD) TWODINSPECT.SELECTCOLUMNPROP (WINDOWPROP WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV -XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES STRINGWIDTH IDIFFERENCE ADD1 FONTPROP FREPLACEFIELDVAL -NCREATE) PPBUFS (FFETCHFIELD PRIN1) \\LINKBLOCK (FFETCHFIELD FREEBLOCKCHAIN.N \\ADDBASE BUCKETINDEX -IMIN INTEGERLENGTH \\GETBASEPTR) \\RESETLINE (\\SETEOFPTR) SEDIT::START-PROCESS (FFETCHFIELD LIST -KWOTE CONCAT AWAIT.EVENT) TWODINSPECT.RESHAPEFN (WINDOWPROP) \\MERGEBACKWARD (\\ADDBASE IMINUS -\\LINKBLOCK \\ADDBASE2 FFETCHFIELD \\ARRAYBLOCKMERGER) IOCBQLENGTH (PLUS EMPOINTER \\VAG2 FFETCHFIELD) - DBG::STACK-FRAME-PROPERTY (CL:SECOND CL:FIRST) TB.FIRST.VISIBLE.ITEM# (IMAX ADD1 IQUOTIENT - \\DTEST -FFETCHFIELD DSPCLIPPINGREGION IPLUS) \\FIXCODEPTR (FFETCHFIELD \\LOLOC OPCODES LOGAND SUB1 LRSH -IDIFFERENCE LOGOR \\GETBASEBYTE \\HILOC \\PUTBASEBYTE) \\STRING-EQUAL-HASHBITS-UFN (\\GETBASEPTR -%ARRAY-BASE FFETCHFIELD SUB1 %ARRAY-OFFSET IPLUS %ARRAY-TYPE-NUMBER \\PNAMECELL \\ATOMCELL \\PROPCELL -CONSTANT MKSTRING ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE IPLUS16 \\LOLOC \\ADDBASE -LOGOR LLSH LOGAND) SETSYNTAXPROP (SETSYNTAX) TEXTSTREAMP (FFETCHFIELD) SEDIT::GRAY (EVENP DSPXOFFSET -DSPYOFFSET) SEDIT::BUILD-PRELINEARIZED-NODE (FFETCHFIELD SEDIT::CREATE-PRELINEARIZED-NODE -FREPLACEFIELD) LINBUF (CONCAT) DEFAULTMAKENEWCOM (FASSOC GETTOPVAL ERROR LIST FILECOMS MERGEINSERT) -\\SEQUIN.RETRANSMITNEXT (FFETCHFIELD LOCF \\ADDBASE FREPLACEFIELD PLUS) SEDIT::PARSE--UNKNOWN ( -SEDIT::BUILD-PRELINEARIZED-NODE FFETCHFIELD) SPP.DSTYPE (GETSPPCON FFETCHFIELD LOCF \\ADDBASE -FREPLACEFIELD LOGAND \\SPP.PREPARE.INPUT SPP.STREAM.ERROR SPREADAPPLY*) COMPILER::EFFECTLESS-EXCEPT-CONS - (CL:EQUAL) COPYHASHITEM (GETHASHFILE APPLY* PUTHASHTEXT ELT) COMP.PICOUNT (ADD1) -SEDIT::COMPOSE-PSEUDO-SELECTION (LIST CL:FIRST FFETCHFIELD + CL:1- CL:LENGTH) TTY.PROCESS (FFETCHFIELD - WFROMDS PROCESS.TTY FIND.PROCESS \\CARET.DOWN \\GETSYSBUF LIST NCONC PROCESSPROP APPEND NOTIFY.EVENT) - TRAPLOOP (PREPLOOP COPYALL NCONC MAPCAR HEADPTY XYPT.Y LAST REVERSE LENGTH SUB1 NTH ADD1 IMAPLIST -MERGLIST COPY YMAPLIST LIST PLUS TRAPMAKE) WYOFFSET (DISPLAYSTREAMP \\OUTSTREAMARG \\GETSTREAM -\\ILLEGAL.ARG DSPCLIPPINGREGION IPLUS DSPYOFFSET FRPLACA PLUS IMINUS) CL::%SQRT-FLOAT (FLOAT -CL::%UMAKE-FLOAT + CL:ASH CONSTANT CL:1+) BUTTONPANEL/SELECTION/FN (RPLACA) CL::PUTHASH (\\HASHACCESS) - LINKPARAMETERS (MEMBTONODES TOLINKS) COMPILER::COPY-NODE-MV-PROG1 (COMPILER::MAKE-MV-PROG1 -COMPILER::COPY-NODE-LIST COMPILER::MV-PROG1-STMTS) SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::CLOSE-NODE - SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW FFETCHFIELD PRIN1 CL:THIRD CL:MAPCAR CL:FUNCTION CL:NREVERSE -FREPLACEFIELD CONS LIST COPY SEDIT::COLLECT-UNDO-BLOCK) \\MERGEFORWARD (\\ADDBASE2 \\ADDBASE -FFETCHFIELD) \\CHECKFORSTORAGEFULL (UNINTERRUPTABLY IPLUS IDIFFERENCE SELECTC \\SET.STORAGE.STATE LIST - \\ADVANCE.ARRAY.SEGMENTS SHOULDNT) SETDISPLAYHEIGHT (EMPOINTER \\VAG2 IPLUS \\GETBASE ITIMES LOGAND -CONSTANT SUB1 EXPT LOGOR LRSH) \\SETBRUSH.IP (SELECTQ) CL::%LOG-FLOAT (FLOAT CL:ERROR - CL::%UMAKE-FLOAT - FQUOTIENT CL:1- CL:1+ CL:* + CL::%POLYEVAL) \\DELETEBLOCK? (FFETCHFIELD FREEBLOCKCHAIN.N \\ADDBASE -BUCKETINDEX IMIN INTEGERLENGTH \\GETBASEPTR) INVERTW (DSPCLIPPINGREGION) COMPILER::COPY-NODE-MV-CALL ( -COMPILER::MAKE-MV-CALL COMPILER::COPY-NODES COMPILER::MV-CALL-FN COMPILER::COPY-NODE-LIST -COMPILER::MV-CALL-ARG-EXPRS) SEDIT::EXPAND (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW FFETCHFIELD PRIN1) - WXOFFSET (DISPLAYSTREAMP \\OUTSTREAMARG \\GETSTREAM \\ILLEGAL.ARG DSPCLIPPINGREGION IPLUS DSPXOFFSET -FRPLACA PLUS IMINUS) \\PREFIXALIGNMENT? (\\ADDBASE LRSH \\LOLOC IREMAINDER PLUS IDIFFERENCE FLOOR -LOGAND CONSTANT LOGXOR SUB1 IPLUS IMOD) CLEARBUF (SELECTQ \\GETSTREAM \\SAVELINEBUF \\SAVESYSBUF) -SCANDEFINEQ (RETRYSCAN LCONC TCONC RATOM GETFILEPTR SUB1 READ LIST CONS NCONC DEFINE DREMOVE ADD1) -\\SAVELINEBUF (FFETCHFIELD - \\GETEOFPTR \\GETFILEPTR SPREADAPPLY* ALLOCSTRING FOLDHI LRSH IPLUS -%ARRAY-BASE CHCON1) SEDIT::PARSE--GAP (FFETCHFIELD SEDIT::LINEAR-ITEM-WIDTH CONS SEDIT::CREATE-WEAK-LINK - FREPLACEFIELD) SPP.OPEN (RESETLST \\SPPCONNECTION FFETCHFIELD LISTGET SETUPTIMER IMAX TIMES -NSNET.DISTANCE \\GETBASEFIXP LOCF \\ADDBASE SELECTQ FREPLACEFIELD \\SPP.CREATE.STREAMS) COMP.CPI1 ( -COMP.CPI1 SUB1 COMP.STPOP) BLOCK (THIS.PROCESS UNINTERRUPTABLY FFETCHFIELD \\RESCHEDULE \\MYALINK -OPCODES \\PROCESS.GO.TO.SLEEP \\DTEST IMIN SPREADAPPLY*) SEDIT::PSEUDO-SELECTION-FROM-SELECTION ( -SEDIT::COMPOSE-PSEUDO-SELECTION FFETCHFIELD) TEDIT.MOVE (TEDIT.PROMPTPRINT FFETCHFIELD \\SHOWSEL -TEDIT.SELECTED.PIECES FUNCTION TEDIT.DO.BLUEPENDINGDELETE IDIFFERENCE CONS -\\TEDIT.ORIGINAL.WINDOW.TITLE IPLUS) CL:LEAST-NEGATIVE-SINGLE-FLOAT (CL::%FLOAT) -DBG::MAKE-FRAME-INSPECT-WINDOW (ATTACHEDWINDOWS WINDOWREGION CREATEW DBG::REGION-NEXT-TO WINDOWPROP -CL:FUNCTION) \\MAKEFREEARRAYBLOCK (\\ADDBASE2 \\ADDBASE IDIFFERENCE FFETCHFIELD) \\PEEKNS ( -COERCE-TO-NSADDRESS \\LOADNSHOSTNUMBER LOCF \\ADDBASE OPENP OPENFILE) TB.LAST.VISIBLE.ITEM# (IMIN -\\DTEST FFETCHFIELD CL:CEILING - DSPCLIPPINGREGION) \\NEW2PAGE (\\NEWPAGE \\ADDBASE) SCANEXP (CONS -APPLY* READ EDIT4E NCONC1) TEDIT.SETFUNCTION (FFETCHFIELD \\PUTBASEBYTE \\SETFATSYNCODE APPLY* HARRAY -PUTHASH LIST CONS) \\MOVETO.HCPYMODE (\\DSPYPOSITION.HCPYMODE) PLAYTUNE (SELECTC LIST -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION MAPC SETUPTIMER IQUOTIENT ITIMES) -SEDIT::GET-DESTINATION-CONTEXT (PROCESSPROP TTY.PROCESS WINDOWPROP) \\INCPARENCOUNT (LOCF \\ADDBASE -SELECTC FFETCHFIELD PLUS FREPLACEFIELD) SETLINELENGTH (LINELENGTH FFETCHFIELD) TB.FIND.ITEM (IMAX IMIN - FFETCHFIELD ADD1 SUB1 FUNCTION TB.NTH.ITEM PLUS) COMPILER::ANALYZE-TREE (COMPILER::ENV-ANALYZE -COMPILER::EFFECTS-ANALYZE) DISPLAYSTREAMP (FFETCHFIELD FMEMB) SEDIT::SET-PROPS (LISTGET CL:FUNCTION -FREPLACEFIELD XCL:SAVE-PROFILE XCL:COPY-PROFILE SEDIT::EVAL-IN-PROCESS PROCESSPROP THIS.PROCESS -TTY.PROCESS FFETCHFIELD XCL::PROFILE-ENTRY-VALUE) TOPW.RESHAPEFN (TOPW.REPAINTFN DSPCLIPPINGREGION) -RECORD.FIELD.VALUE (ASSOC GETFIELDFORCREATE) CL:LEAST-POSITIVE-SINGLE-FLOAT (CL::%FLOAT) CL::%RANDOM ( -CL::RANDOM-STATE-I CL::RANDOM-STATE-J CL::RANDOM-STATE-ARRAY LOGAND - CL:AREF CL:1+) SCANCOMPILEDFN ( -SOME IEQP CONS GETFILEPTR TMPSUBFN DREMOVE) PAGEFULLFN (FFETCHFIELD READP RESETLST RESETSAVE -SETDISPLAYHEIGHT PROCESSPROP THIS.PROCESS TTY.PROCESS INVERTW LIST FUNCTION BIN NCHARS \\OUTCHAR BLOCK -) SEDIT::PARSE (FFETCHFIELD LISTGET TYPENAME FREPLACEFIELD) INTEGERLENGTH (SELECTC NTYPX IDIFFERENCE -ILESSP CONSTANT LLSH SHOULDNT FFETCHFIELD ADD1 INTEGERLENGTH IPLUS \\BIGNUM.INTEGERLENGTH -CL::%NOT-INTEGER-ERROR) COMPILER::SUBSTITUTABLE-P (COMPILER::VAR-REF-P COMPILER::LITERAL-VALUE) -TERMCHARWIDTH (\\STREAMCHARWIDTH LOGAND \\OUTSTREAMARG \\GETSTREAM GETTERMTABLE) COMP.CPI ( -COMP.PICOUNT FASSOC GETHASH) \\COPYARRAYBLOCK (\\ADDBASE IMINUS FFETCHFIELD - \\ALLOCBLOCK \\RPLPTR -COPYALL \\GETBASEPTR UNFOLD LLSH) TERMINAL-INPUT (GETSTREAM ARG) |\\VAMAllocPageGroup| (WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION UNINTERRUPTABLY IDIFFERENCE FFETCHFIELD PLUS IMINUS -IPLUS |\\PFGetFreePage| GETRESOURCE NEWRESOURCE NCREATE |\\PFCreatePage| |\\VAMFilePageNumber|) -\\COPYCODEBLOCK (UNINTERRUPTABLY FUNCTION OPCODES) SYSBUF (CONCAT) \\STREAMCHARWIDTH (LOGAND -FFETCHFIELD SELECTC \\SYNCODE GETHASH \\GETBASEBYTE TERMTABLEP IPLUS LOADBYTE LSH IMINUS MASK.1\'S -SUB1 \\FGETWIDTH \\GETBASE PLUS CONSTANT LLSH SELCHARQ DSPXPOSITION UNFOLD IDIFFERENCE IMOD -DSPLEFTMARGIN DSPRIGHTMARGIN SHOULDNT) COMPILER::COPY-NODE-LITERAL (COMPILER::MAKE-LITERAL -COMPILER::LITERAL-VALUE) SEDIT::EVAL-SELECTION (SEDIT::GET-SELECTED-STRUCTURE CL:COPY-TREE FFETCHFIELD - SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW PRIN1 RESETFORM TTY.PROCESS PROCESS.EVAL PROCESS.EVALV) -COPYALL (LIST COPYALL CONS TYPENAME SELECTQ CONCAT FPLUS IPLUS HASHARRAY HARRAYSIZE HARRAYPROP -COPYREADTABLE COPYTERMTABLE ARRAYSIZE ARRAYTYP ARRAYORIG ARRAY SETA ELT PLUS BITMAPCOPY FFETCHFIELD -CURSORCREATE \\COPYARRAYBLOCK \\COPYDATATYPE) %ARRAY-TYPE-TABLE (%MAKE-ARRAY-TYPE-TABLE) -TERMINAL-OUTPUT (GETSTREAM ARG) \\ARRAYBLOCKMERGER (FFETCHFIELD IDIFFERENCE IPLUS PLUS -\\MAKEFREEARRAYBLOCK \\ADDBASE2 \\ADDBASE \\LINKBLOCK) \\TEDIT.HARDCOPY.FORMATLINE (FFETCHFIELD -FUNCTION PLUS \\RPLPTR \\ADDBASE2 \\ADDBASE \\TEDIT.APPLY.STYLES \\EDITELT GETBASEPTR \\GETBASEPTR -CONS FONTCLASSCOMPONENT FONTCOPY \\TEDIT.HCPYFMTSPEC \\TEDIT.APPLY.PARASTYLES IEQP FREPLACEFIELD \\BIN - \\FGETCHARWIDTH \\GETBASE \\GETCHARSETINFO UNFOLD LLSH \\CHARSET LRSH \\CREATECHARSET \\CHAR8CODE -LOGAND \\TEDIT.INTEGER.IMAGEBOX APPLY* IMAGEOBJPROP IMAX IDIFFERENCE IPLUS ADD1 \\TEDIT.FORMATTABS -FIXR FTIMES DSPSCALE SUB1 \\FGETWIDTH - FONTPROP IMIN) \\ADVANCE.ARRAY.SEGMENTS (\\PUTBASEPTR LOCF -\\ATOMCELL IPLUS UNFOLD LLSH SUB1 IDIFFERENCE \\HILOC LRSH \\LOLOC LOGAND \\MAKEFREEARRAYBLOCK \\VAG2 -SETQ.NOREF \\PUTBASEFIXP) COMP.ARGTYPE (ARGTYPE FASSOC GETP GETPROP) TB.DISPLAY.LINES (IMIN -FFETCHFIELD IMAX TB.NTH.ITEM DSPXPOSITION PLUS FRPLACA WINDOWPROP + TIMES -) \\CHDEL1 (\\DTEST -\\BACKXCCSCHAR LLSH UNFOLD ACCESS-CHARSET PLUS IDIFFERENCE CL:FUNCALL FFETCHFIELD \\NSPEEK \\XCCSPEEK -\\PEEKBIN \\BIN \\NSIN.24BITENCODING.ERROR LOGOR GETFILEPTR) TEDIT.GETFUNCTION (FFETCHFIELD APPLY* -\\SYNCODE GETHASH \\GETBASEBYTE) \\BYTELT (\\DTEST FFETCHFIELD IGREATERP \\GETBASEBYTE IPLUS) -SEDIT::FIND-NODE (FFETCHFIELD SEDIT::NEXT-LINEAR-ITEM IPLUS SEDIT::LINEAR-ITEM-WIDTH) -\\LOADNSHOSTNUMBER (\\GETBASE CONS FRPLACA ERROR) DBG::STACK-FRAME-VALUE-COMMAND (INSPECT/AS/FUNCTION -CL:SECOND DEFAULT.INSPECTW.VALUECOMMANDFN) \\SEQUIN.HANDLE.INPUT (FFETCHFIELD LOCF \\ADDBASE APPLY* -\\SEQUIN.COMPARE \\SEQUIN.OUT.OF.THE.BLUE LIST PLUS NOTIFY.EVENT FREPLACEFIELD IPLUS16 \\LOLOC) -HISTORYFIND1 (LAST NLEFT CHCON1 EDITFPAT PACK DUNPACK LISTGET1) \\BYTESETA (\\DTEST FFETCHFIELD -IGREATERP \\PUTBASEBYTE IPLUS) \\DECPARENCOUNT (LOCF \\ADDBASE FREPLACEFIELD SELECTC FFETCHFIELD PLUS) - GETTTBLPROP (ECHOCONTROL GETSYNTAX DELETECONTROL GETDELETECONTROL GETCONTROL GETRAISE GETECHOMODE) -\\ECHOCHAR (FFETCHFIELD IDIFFERENCE) \\DSPYPOSITION.HCPYMODE (FFETCHFIELD FREPLACEFIELD) \\WORDELT ( -\\DTEST FFETCHFIELD IGREATERP \\GETBASE IPLUS) \\ARRAYTYPENAME (SELECTC FFETCHFIELD) SEDIT::SET-OPTIONS - (LIST FREPLACEFIELD) \\ETHEREVENTFN (SELECTQ \\3MB.CREATENDB \\10MB.CREATENDB \\GETDTD \\ADDBASE -ITIMES NTYPX FFETCHFIELD \\NS.SETTIME \\PUP.SETTIME SELECTC |\\DoveMisc.TODValid| > IDATE CONSTANT -CL:FUNCALL CLRHASH) \\TFBRAVO.INIT.PAGEFORMAT (TEXTPROP) CCODEP (\\DEFCELL \\ATOMCELL TYPEP -FFETCHFIELD CL:COMPILED-FUNCTION-P) CL:MOST-POSITIVE-SINGLE-FLOAT (CL::%FLOAT) GRAPHDELETELINK ( -REMOVETONODES FRPLACA REMOVE) GETSYNTAXPROP (GETSYNTAX) \\BLOCKDATAP (NTYPX IGEQ \\HILOC \\GETDTD -\\ADDBASE ITIMES FFETCHFIELD) \\FILLBUFFER.WORDSEPRP (\\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE -LOGAND) CARETRATE (CONS FIXP FIX) CL:MOST-NEGATIVE-SINGLE-FLOAT (CL::%FLOAT) SPP.DESTADDRESS ( -GETSPPCON FFETCHFIELD NCREATE LOCF \\ADDBASE) \\FILLBUFFER.BACKUP (DSPBACKUP CHARWIDTH) -TEDIT.MAPPIECES (FFETCHFIELD \\GETBASEPTR \\FIRSTNODE ATOM APPLY* LIST PLUS) MIN/LEFT (GN/LEFT) -\\NSFILING.MAYBE.CREATE (ASKUSER CONCAT FFETCHFIELD CONCATLIST MAPCONC LIST \\NSFILING.CONNECT -FILING.CALL SELECTQ LIST* STRING) \\DSPTRANSFORMREGION (\\DSPTRANSFORMX IPLUS FFETCHFIELD -\\DSPTRANSFORMY CONS) CL:SINGLE-FLOAT-EPSILON (CL::%FLOAT CL:ASH) PROMPTINWINDOW (NUMBERP -HEIGHTIFWINDOW ITIMES FONTPROP DEFAULTFONT WIDTHIFWINDOW IMAX STRINGWIDTH CREATEW CREATEREGION -DIFFERENCE CARET FFETCHFIELD ERSETQ PROMPTFORWORD LIST ERROR!) \\TEDIT.READTABLE (HASHARRAY -FREPLACEFIELDVAL NCREATE LIST \\PUTBASEBYTE \\SETFATSYNCODE FFETCHFIELD FUNCTION) CLISPIFYFNS (CLOCK -MAPCONC STKEVAL EVALV MISSPELLED? FILEFNSLST IDIFFERENCE ERSETQ CLISPIFY) \\STARTDISPLAY (REVERSE -OPENWINDOWS \\CLOSEW1 |\\CreateScreenBitMap| FFETCHFIELD CONS \\OPENW1) SEDIT::FIND-LINE-START ( -FFETCHFIELD) CHARWIDTH (\\CHARCODEP IGEQ \\FGETCHARWIDTH \\GETBASE \\GETCHARSETINFO \\GETBASEPTR -FFETCHFIELD UNFOLD LLSH \\CHARSET LRSH \\CREATECHARSET \\CHAR8CODE LOGAND \\OUTSTREAMARG \\GETSTREAM -IMAGEOP SPREADAPPLY* \\FGETWIDTH FONTCREATE) TWODINSPECT.SELECTROWPROP (WINDOWPROP WITH-INSPECTOR-ENV -XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES STRINGWIDTH FONTPROP -FREPLACEFIELDVAL NCREATE) \\OFFSETCLIPPINGREGION (FFETCHFIELD \\DSPTRANSFORMX IPLUS FRPLACA -\\DSPTRANSFORMY CONS) CL:SINGLE-FLOAT-NEGATIVE-EPSILON (CL::%FLOAT) MARGINBAR (DSPOPERATION MSCALE -FONTCREATE MKSTRING ABS IPLUS IDIFFERENCE DSPCLIPPINGREGION STRINGWIDTH CONS MB.MARGINBAR.SHOWTAB) -VIDEOCOLOR (LOGOR FFETCHFIELD LOGAND LOGXOR) \\TEDIT.HARDCOPY.MODIFYLOOKS (DSPSCALE FIXR FTIMES -IDIFFERENCE FFETCHFIELD IPLUS IQUOTIENT FONTPROP MOVETO) \\POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS ( -FFETCHFIELD PSCFONT.SPELLFILE PSCFONTFROMCACHE.SPELLFILE PSCFONT.READFONT) \\SHOW.ARRAY.FREELISTS ( -RESETFORM RECLAIMMIN LENGTH FOLDLO LRSH \\#BLOCKDATACELLS \\ALLOCBLOCK UNFOLD LLSH IPLUS \\GETBASEPTR -\\ADDBASE2 \\ADDBASE PLUS FFETCHFIELD TIMES TERPRI PRIN1 FOLDHI) \\TEDIT.PRIMARYW (TEXTOBJ FFETCHFIELD -) \\10MB.PRINT.ENCAPSULATION (PRIN1 \\LOADNSHOSTNUMBER LOCF \\ADDBASE) DBG::STACK-FRAME-FETCHFN ( -CL:FIRST CL:ASSOC CL:GETF CL:FUNCALL STKARG CL:SECOND) DSPBACKUP (GETSTREAM \\GETDISPLAYDATA \\DTEST -\\OUTSTREAMARG \\GETSTREAM FFETCHFIELD IMIN IDIFFERENCE \\CARET.DOWN FONTDESCENT FONTHEIGHT FONTASCENT - FREPLACEFIELD PLUS IMINUS FRPTQ BOUT) |\\VFMInsertPageGroup| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION UNINTERRUPTABLY FFETCHFIELD \\ALLOCBLOCK LRSH ADD1 MESASIZE \\BLT |\\VFMGet| - SUB1 \\GETBASE LOCF PLUS IDIFFERENCE \\ADDBASE IPLUS) \\SEQUIN.RETRANSMIT (FFETCHFIELD LOGAND ADD1 -LOCF \\ADDBASE FREPLACEFIELD) COPYDEF (GETFILEPKGTYPE GETDEF REMOVE MKLIST STRPOS PACK* SUBATOM COPY -GETTOPVAL FRPLACA) CL:ACOSH (CL:LOG + CL:* CL:SQRT / - FLOAT) COMPILER::COPY-NODE-LAMBDA ( -COMPILER::MAKE-LAMBDA COMPILER::LAMBDA-NAME COMPILER::LAMBDA-ARG-TYPE COMPILER::LAMBDA-NO-SPREAD-NAME -COMPILER::LAMBDA-ALLOW-OTHER-KEYS COMPILER::LAMBDA-REQUIRED MAPCAR COMPILER::COPY-VARIABLE -COMPILER::LAMBDA-OPTIONAL LIST CL:FIRST COMPILER::COPY-NODES CL:SECOND CL:THIRD COMPILER::LAMBDA-REST -COMPILER::LAMBDA-KEYWORD CL:FOURTH COMPILER::LAMBDA-BODY) SPP.CLOSE (GETSPPCON FFETCHFIELD -\\TERMINATESPP) UPDATESCREENDIMENSIONS (SELECTC LIST |\\DoveDisplay.ScreenWidth| -|\\DoveDisplay.ScreenHeight| SHOULDNT) WFROMDS (TEXTOBJ FFETCHFIELD \\GETDISPLAYDATA \\DTEST -\\OUTSTREAMARG \\GETSTREAM TTYDISPLAYSTREAM WFROMDS OPENWINDOWS CREATEW) CL::%PRINT-RANDOM-STATE ( -CL::DEFAULT-STRUCTURE-PRINTER) |\\CreateScreenBitMap| (FOLDHI LRSH IPLUS SUB1 ITIMES ADD1 \\ADDBASE -UNFOLD LLSH PLUS FREPLACEFIELDVAL NCREATE) GETWINDOWUSERPROP (LISTGET \\INSUREWINDOW FFETCHFIELD) -\\TFBRAVO.GET.FONTSTYLE (FASSOC) COMP.NOSIDEEFFECTP (COMP.CLEANEXPP) END.DELETE.MODE (BLTCHAR -TTYDISPLAYSTREAM) MAX.SMALLFIXP (CL:1- EXPT) CL:ASINH (CL:LOG + CL:SQRT CL:* FLOAT) CL:PI (CL::%FLOAT) - TB.REPLACE.ITEMS (\\DTEST PLUS FREPLACEFIELD ADD1 TB.FIND.SELECTED.ITEM TB.REV.FIND.SELECTED.ITEM -DSPCLIPPINGREGION FFETCHFIELD TB.DISPLAY.LINES TB.FIRST.VISIBLE.ITEM# TB.LAST.VISIBLE.ITEM#) \#BITSON -(LOGAND LLSH ADD1) CONTINUEDIT (RESETSAVE LIST OPENSTREAM FULLNAME SETFILEPTR CL:MULTIPLE-VALUE-SETQ -\\PARSE-FILE-HEADER ROOTFILENAME FILECHANGES CONS MEMB) SPP.SENDEOM (GETSPPCON FFETCHFIELD WRITEABLE -OVERWRITEABLE LOGAND \\EOFP SPREADAPPLY* \\SPP.PREPARE.OUTPUT \\SPP.STREAM.LOST LOCF \\ADDBASE) CL:ATAN - (CL::%ATAN-FLOAT FLOAT CL::COMPLEX-REALPART CL::COMPLEX-IMAGPART ABS COMPLEX - CL:* CL:LOG / + CL:ERROR -) SEDIT::AWAKE-ME (STKPOS) |\\CoerceToDisplayDevice| (\\GETDEVICEFROMNAME ERROR) WHITESPACE-CHAR-P ( -CL:MEMBER FUNCTION) \\GETCHAR (BIN FFETCHFIELD \\RAISECHAR IDIFFERENCE) HARDCOPYGRAPH (LISTGET -GETSTREAM OPENIMAGESTREAM APPEND DSPSCALE DSPCLIPPINGREGION WINDOWPROP GRAPHREGION FIXR TIMES - -QUOTIENT CL:CEILING PLUS DIFFERENCE REMAINDER CREATEREGION SCALE/GRAPH FTIMES MINUS SUB1 CONS -DISPLAYNODELINKS PRINTDISPLAYNODE CLOSEF) \\NSFILING.LOOKUP.CACHE (FFETCHFIELD LENGTH CONS DREMOVE) -SEDIT::QUERY-THROW-AWAY-CHANGES (MENU CL:FORMAT FREPLACEFIELDVAL NCREATE CONS ASKUSER) -\\INITBCPLDISPLAY (FUNCTION FREPLACEFIELDVAL NCREATE STREAMP) \\DSCCOUT (SELECTC \\SYNCODE GETHASH -FFETCHFIELD \\GETBASEBYTE LOGAND PLUS IPLUS LOGOR SELCHARQ \\STOPSCROLL? FREPLACEFIELD FRPTQ -IDIFFERENCE MOD IMOD DSPBOUT SHOULDNT) DELETE/AND/DISPLAY/LINK (TOLINKS TERPRI LINKPARAMETERS CONSTANT - CONS) SEDIT::DO-MUTATION (NLSETQ CL:FUNCALL FFETCHFIELD) \\SMASHLINK (\\MYALINK OPCODES -UNINTERRUPTABLY IDIFFERENCE FLOOR LOGAND FFETCHFIELD ADDSTACKBASE \\VAG2 CONSTANT LOGXOR SUB1 IPLUS) -SEDIT::FINALIZE-MOUSE-SELECTION (FFETCHFIELD FREPLACEFIELDVAL REPLACEFIELDVAL FETCHFIELD SEDIT::SHOW-CARET -) \\FTP.NEXTFILE (ERROR SPREADAPPLY* FFETCHFIELD FTPGETMARK MARK# FRPLACA \\FTPERROR READPLIST ASSOC -\\FTP.PACKFILENAME HELP) CL:BOOLE (LOGNOT LOGAND CL:LOGIOR LOGXOR CL:LOGEQV CL:LOGNAND CL:LOGNOR -CL:LOGANDC1 CL:LOGANDC2 CL:LOGORC1 CL:LOGORC2 CL:ERROR) CL::%MAKE-RANDOM-ARRAY (CL:MAKE-ARRAY CLOCK -IDATE CL:MAPCAR CL:FUNCTION) \\STACKARGPTR (FFETCHFIELD IDIFFERENCE ADDSTACKBASE \\VAG2 LISPERROR -\\MYALINK OPCODES FIX FLOOR LOGAND CONSTANT LOGXOR SUB1 IMINUS \\STKNAME) SEDIT::NEXT-NODE (SEDIT::SUBNODE - FFETCHFIELD) \\ETHERINIT (\\DEFINEDEVICE FUNCTION FREPLACEFIELDVAL NCREATE) COLLECTKEYS (FUNCTION) -\\TFBRAVO.GET.FONTSIZE (FASSOC) COMP.ANONP (FMEMB GET) MERGEINSERT (/NCONC1 STRPOS MERGEINSERT1 SOME -/ATTACH) TTMAKECOMPLEXCHAR (PLUS TTBITWIDTH CONS) %CANONICAL-CML-TYPES (%MAKE-CML-TYPE-TABLE) -PRINTNSHOSTNUMBER (|printout| PRINTNUM) DBG::STACK-FRAME-STOREFN (CL:ASSOC CL:FUNCALL STKARG CL:GETF -SETSTKARG CL:SECOND) PRINTERRORXIP (\\DTEST FFETCHFIELD LOCF \\ADDBASE PRIN1 ASSOC CONCAT OCTALSTRING -PRIN2) \\SEQUIN.FLUSH.CONNECTION (FFETCHFIELD APPLY* THIS.PROCESS) CL::%SQRT2 (CL::%FLOAT) -\\INTERPRETER1 (\\MYALINK OPCODES FFETCHFIELD ADDSTACKBASE \\VAG2 CEIL LOGAND IPLUS + - UNFOLD LLSH -CONSTANT SUB1 LOGXOR \\ATOMVALINDEX NTYPX \\LOLOC SHOULDNT FOLDLO LRSH PLUS WORDSPERNAMEENTRY -WORDSPERNTOFFSETENTRY IDIFFERENCE FREPLACEFIELD \\EVAL) COMPILER::COPY-NODE-LABELS (COMPILER::MAKE-LABELS - COMPILER::LABELS-FUNS MAPCAR COMPILER::COPY-VARIABLE CONS COMPILER::COPY-NODE-LAMBDA LIST -COMPILER::LABELS-BODY COMPILER::COPY-NODES) SEDIT::DELETE-WORD (SEDIT::CLOSE-NODE FFETCHFIELD) -\\DSPXPOSITION.HCPYMODE (FFETCHFIELD FIXR FQUOTIENT) \\PARSEARRAYSPACE1 (FFETCHFIELD \\ADDBASE2 -\\ADDBASE) SPY.END (BITBLT) DBG::BACKTRACE-ITEM-SELECTED (DECLARE WINDOWPROP WFROMMENU STKNTH - -FFETCHFIELD) |\\GetRootDirectoryType| (FFETCHFIELD) CL::%LOG2 (CL::%FLOAT) \\PARSEARRAYSPACE ( -\\PARSEARRAYSPACE1) CL:CIS (COMPLEX CL::%SIN-FLOAT CL::%NOT-NONCOMPLEX-NUMBER-ERROR) COMPILER::COPY-NODE-IF - (COMPILER::MAKE-IF COMPILER::COPY-NODES COMPILER::IF-PRED COMPILER::IF-THEN COMPILER::IF-ELSE) -SEDIT::DELETE-SELECTION (FFETCHFIELD) \\DSPRIGHTMARGIN.HCPYMODE (FFETCHFIELD FIXR FQUOTIENT) -MIN.SMALLFIXP (- EXPT) \\SETUP.DEFAULT.LINEBUF (\\NODIRCOREFDEV FUNCTION \\OPENFILE) FAULTAPPLY ( -SPREADAPPLY .SPREAD. UNINTERRUPTABLY GETD CLOSURE-ENVIRONMENT CLOSURE-FUNCTION FMEMB GETHASH ASSOC -CL:FUNCALL APPLY NEWFAULT1 OLDFAULT1) SEDIT::LINEARIZE-ROOT (SHOULDNT SEDIT::LINEARIZE SEDIT::SUBNODE -FFETCHFIELD) TEDIT.INSERT.DISPLAYTEXT (HELP) TEDIT.DELETELINE (FFETCHFIELD) \\FILLBUFFER (FFETCHFIELD -LOCF \\ADDBASE IABS IMINUS \\RAISECHAR IDIFFERENCE \\CHARSET LRSH \\BOUT \\CHAR8CODE LOGAND \\GETCHAR -BIN \\SYNCODE GETHASH \\GETBASEBYTE \\GETFILEPTR SPREADAPPLY* FREPLACEFIELD \\NSIN \\DTEST \\XCCSIN -\\BIN \\NSIN.24BITENCODING.ERROR UNFOLD LLSH LOGOR CL:FUNCALL \\CHDEL1 LIST \\PAGEDEOFP) CHANGESLICE ( -LIST NTH ITIMES ADD1 IQUOTIENT SUB1) MAX/RIGHT (GN/RIGHT) DRIBBLE (DRIBBLEFILE OPENSTREAM FFETCHFIELD) - CL:CEILING (CL::%INTEGER-COERCE-MACRO) XCL::PROTOTYPE-DEFINERS-FOR-TYPE (CL:MAPCAR CL:FUNCTION CL:ASSOC -) COMPILER::TEST-ANALYSIS (COMPILER::TEST-ALPHA-2 CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION -COMPILER::PRINT-TREE COMPILER::ANALYZE-TREE) CL:COMMONP (TYPEP) |\\PFPutRootDirectoryType| (NCREATE) -XCL::MAKE-PROTOTYPE (CL:ASSOC CL:FUNCTION CL:FUNCALL) \\FTP.FILEINFOFN (\\FTP.GETFILEINFO.FROM.PROPS) -CL:CLEAR-INPUT (CLEARBUF \\GETSTREAM) CL:1- (-) TB.SET.FONT (FFETCHFIELD FONTCREATE DSPFONT FONTPROP -TIMES - DSPCLIPPINGREGION IPLUS CONS FREPLACEFIELD WINDOWPROP FRPLACA CL:FUNCALL) -\\SETUP-COMPILED-CLOSURE-CALL (FFETCHFIELD ADDSTACKBASE \\VAG2 IDIFFERENCE FOLDLO LRSH -\\FREESTACKBLOCK IPLUS UNFOLD LLSH PLUS DIFFERENCE \\PUTBASEPTR STACKADDBASE LOGOR ADD1 FREPLACEFIELD) - DISPLAYSTREAMINIT (DSPCREATE DSPFONT FONTHEIGHT ITIMES IDIFFERENCE IQUOTIENT FONTDESCENT CONS) -SPP.CLEAREOM (GETSPPCON FFETCHFIELD SELECTQ \\ILLEGAL.ARG ERROR) \\LINEBUF.READP (FFETCHFIELD READP -\\PAGEDREADP) SEDIT::GET-CONTEXT (FFETCHFIELD SEDIT::SUBNODE CREATE.EVENT CONCAT FREPLACEFIELDVAL -NCREATE CONS) RDTBL\\NONOTHERCODES (FUNCTION \\GTREADTABLE FFETCHFIELD) \\OPENW1 (WINDOWOP -SPREADAPPLY* \\INSUREWINDOW FFETCHFIELD) CHARPOS (FFETCHFIELD) TEDIT.MAPLINES (FFETCHFIELD -DSPCLIPPINGREGION \\TEDIT.PRIMARYW APPLY* IGEQ) CL:COPY-READTABLE (CMLRDTBL \\DTEST COPYREADTABLE) -\\MOVE.WINDOWS.ONTO.SCREEN (FFETCHFIELD IPLUS FQUOTIENT MAINWINDOW IMAX IDIFFERENCE FIXR FTIMES) -CL:CLOSE (LOGAND FFETCHFIELD CONSTANT LOGOR DELFILE CL:NAMESTRING ERROR) SEDIT::KILL-NODE (MAPC -FFETCHFIELD SEDIT::KILL-NODE) COMPILER::META-SUBSTITUTE (COMPILER::META-SUBST) -\\TFBRAVO.INIT.CHARLOOKS (FREPLACEFIELDVAL NCREATE \\TFBRAVO.GET.FONTSIZE \\TFBRAVO.GET.FONTSTYLE) -COMP.CLEANFNOP (APPLY*) \\CLOSEW1 (WINDOWOP SPREADAPPLY* \\INSUREWINDOW FFETCHFIELD) TTINSERTSECTION ( -BITBLT.INSERT DSPXPOSITION - DSPYPOSITION) \\SPY.INTERRUPT (\\MYALINK OPCODES IDIFFERENCE ADDSTACKBASE - \\VAG2 FFETCHFIELD LLSH) DBG::STACK-FRAME-PROPERTIES (STKNARGS STKNAME SMARTARGLIST) -|\\VFMGetPageGroup| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION UNINTERRUPTABLY -FFETCHFIELD \\ALLOCBLOCK LRSH ADD1 MESASIZE \\BLT |\\VFMGet| LOCF \\ADDBASE FREPLACEFIELDVAL NCREATE) -INSERT.NODE (TTNEXTNODE FRPLACD FRPLNODE2 SCRATCHCONS) CL::%EXPT-FLOAT-INTEGER (FQUOTIENT -CL::%EXPT-FLOAT-INTEGER - FLOAT) BUTTONPANEL (MAPCAR LIST FUNCTION FREPLACEFIELDVAL NCREATE CONS) -\\CREATELINEBUFFER (\\OPENFILE FFETCHFIELD FUNCTION NCREATE) TEDIT.CR.UPDATESCREEN (HELP) -SEDIT::DEFAULT-EDIT-FN (ED LIST*) \\DSPSPACEFACTOR.HCPYMODE (FFETCHFIELD FIXR FTIMES CHARWIDTH) -OPENWINDOWS (MAPCONC OPENWINDOWS \\INSURESCREEN FFETCHFIELD CONS DREVERSE) ARGLIST (\\DEFCELL -\\ATOMCELL FFETCHFIELD \\CCODEARGLIST GETPROP SELECTQ ARGLIST FNCHECK) CL:COUNT-IF (CL:LENGTH -COMPLEX-COUNT-IF SIMPLE-COUNT-IF) CL:ASH (LSH) FB.SET.DEFAULT.NAME.WIDTH (FFETCHFIELD IPLUS -DSPLEFTMARGIN CHARWIDTH FREPLACEFIELD) CL::COUNT-OCCURRENCES (+ CL::COUNT-OCCURRENCES) -\\SPP.PREPARE.INPUT (GETSPPCON FFETCHFIELD \\LOLOC \\ADDBASE FREPLACEFIELD PLUS LOCF SELECTQ -\\ILLEGAL.ARG SELECTC \\GETSPP LIST IDIFFERENCE CONSTANT IPLUS) CL:COUNT-IF-NOT (CL:LENGTH -COMPLEX-COUNT-IF-NOT SIMPLE-COUNT-IF-NOT) \\LINEBUF.PEEKBIN (\\BUFFERED.PEEKBIN CL:FUNCALL) \\WRITE1 ( -PRINTDEF POSITION \\PRINDATUM \\GETSTREAM) MIN/BOTTOM (GN/BOTTOM) \\NSFILING.ADD.TO.CACHE (FFETCHFIELD - \\NSFILING.FILLIN.ATTRIBUTES LENGTH DREMOVE CONS) OPT.JSIZE (GETPROP) TB.SCROLLFN (RESETLST -WINDOWPROP FFETCHFIELD SCROLLW TB.BROWSER.BUSY) XCL::PROTOTYPE-DEFN-TYPES (CL:MAPCAN CL:FUNCTION) -MOST/VISIBLE/OPERATION (\#BITSON) CL:COUNT (CL:LENGTH COMPLEX-COUNT SIMPLE-COUNT) SIMPLE-COMPARE (- +) - LISPXSTATE (GETP UNDOLISPX2 CONS) SEDIT::EXPANDREGIONFN (WINDOWPROP SEDIT:GET-WINDOW-REGION -FFETCHFIELD SEDIT::LESS-PROMPT-WINDOW) \\FTP.FROM.LISP.ATTRIBUTE (SELECTQ) CL:DELETE-DUPLICATES ( -CL:LENGTH COMPLEX-DELETE-DUPLICATES SIMPLE-DELETE-DUPLICATES) \\EVALOTHER (SPREADAPPLY* FASSOC -TYPENAME) COMPILEFILES (NLAMBDA.ARGS COMPILEFILES0) XCL::%MAKE-FUNCTION-PROTOTYPE (LIST) CL:DELETE-FILE - (CL:PROBE-FILE INTERLISP-NAMESTRING) COMPLEX-COMPARE-FORWARD (- +) \\EVALVAR (\\STKSCAN \\GETBASEPTR -FAULTEVAL) \\FREESTACKBLOCK (IPLUS FFETCHFIELD ADDSTACKBASE \\VAG2 PLUS \\EXTENDSTACK IMOD -\\SETUPGUARDBLOCK IDIFFERENCE) TEDIT.DEACTIVATE.WINDOW (WINDOWPROP \\TEDIT.QUIT FFETCHFIELD REVERSE -\\TEDIT.UNSPLITW ATTACHEDWINDOWS TEXTOBJ DREMOVE) MAX/TOP (GN/TOP) COMPILER::COPY-NODE-GO (CL:GETHASH -COMPILER::GO-TAGBODY COMPILER::MAKE-GO COMPILER::GO-TAG) LINEBUFFER-EOFP (\\GETSTREAM \\PAGEDEOFP -\\EOFP SPREADAPPLY* FFETCHFIELD) CHANGEBACKGROUND (OPENWINDOWS \\CLOSEW1 FFETCHFIELD DREVERSE \\OPENW1 -) DEFAULT.ADDNODEFN (PROMPTINWINDOW PACK* GENSYM NODECREATE CURSORPOSITION) CL:DEPOSIT-FIELD ( -BYTE-SIZE CL:BYTE-POSITION CL::%MAKE-BYTE-MASK-1 CL:LOGIOR LOGAND LOGNOT) \\STOPSCROLL? (ADD1 WFROMDS -TTYDISPLAYSTREAM WINDOWPROP APPLY* PAGEFULLFN) \\STOPDISPLAY (FFETCHFIELD ADD1 PAGEHEIGHT) CL:COSH ( -CL:EXP / + CL::%EXP-FLOAT FQUOTIENT) \\STKNAME (ADDSTACKBASE \\VAG2 FFETCHFIELD \\GETBASEPTR -IDIFFERENCE + TIMES CL:1- FOLDLO LRSH) CL:DECODE-FLOAT (FLOAT CL:VALUES \\MAKEFLOAT CL:1- -) -\\NSADDRESS.PRINT.DECIMAL (CL:TRUNCATE CONS) \\MAKEFREEBLOCK (ADDSTACKBASE \\VAG2 FREPLACEFIELD) -\\TFBRAVO.PARSE.PARA (GETFILEPTR FILEPOS CHARACTER CONS IDIFFERENCE \\TFBRAVO.READ.PARALOOKS LIST -\\TFBRAVO.FONT.FROM.CHARLOOKS \\TFBRAVO.READ.CHARLOOKS DREVERSE) MAINWINDOW (\\INSUREWINDOW WINDOWPROP -) %BIT-TYPE (%TYPE-SIZE-TO-TYPENUMBER) SPY.START (QUOTIENT) DBG::BACKTRACE-MENU-BUTTONEVENTFN ( -WINDOWPROP) PRINTXIPDATA (PRINTPACKETDATA LOCF \\ADDBASE - FFETCHFIELD) CL:DECODE-UNIVERSAL-TIME ( -CL:FLOOR - + CL:* \\DTSCAN CL:MOD \\ISDST? CL:1+ CL:VALUES) CL:DELETE-IF-NOT (CL:LENGTH -COMPLEX-DELETE-IF-NOT SIMPLE-DELETE-IF-NOT) \\LINEBUF.EOFP (\\EOFP FDEVOP SPREADAPPLY* FFETCHFIELD) -\\DSPLINEFEED.HCPYMODE (FFETCHFIELD) MAKEBRES (NCREATE \\SGN IABS IMINUS IDIFFERENCE IPLUS IMAX ITIMES - FFETCHFIELD) \\SETUP-ENVIRONMENT-CALL (FFETCHFIELD ADDSTACKBASE \\VAG2 IDIFFERENCE STACKADDBASE - -UNFOLD LLSH \\GETBASEPTR + PLUS \\FREESTACKBLOCK LOGOR IPLUS ADD1 SUB1 FREPLACEFIELD) CL:DISASSEMBLE ( -PRINTCODE CL:COMPILE CL:SYMBOL-FUNCTION) TB.REPAINTFN (WINDOWPROP FFETCHFIELD TB.DISPLAY.LINES -TB.FIRST.VISIBLE.ITEM# TB.LAST.VISIBLE.ITEM# TB.BROWSER.BUSY) XCL::ADD-PROTOTYPE-FN (CL:ASSOC -CL:FUNCTION CL:ACONS LIST CONS) CL:DOCUMENTATION (GETHASH HASH-TABLE-FOR-DOC-TYPE) \\DEFINEDISPLAYINFO - (ASSOC CONS) SEDIT::EXPANDFN (WINDOWPROP) SEDIT::ADJUST-WIDTH (FFETCHFIELD) LINEBUFFER-SKIPSEPRS ( -\\GETSTREAM \\GTREADTABLE PEEKCCODE CHARACTER SKIPSEPRS) CL:DIRECTORY (RESETLST RESETSAVE -\\GENERATEFILES DIRECTORY.FILL.PATTERN CL:NAMESTRING \\GENERATENEXTFILE PATHNAME LIST) -TWODINSPECT.SELECTITEM (WINDOWPROP WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES -XCL::PROFILE-VALUES STRINGWIDTH APPLY* IDIFFERENCE ADD1 FONTPROP FREPLACEFIELDVAL NCREATE) -\\EVALFORMASLAMBDA (.EVALFORM.) FB.DATE (DATE CONCAT SUBSTRING CHCON1) CL::MAYBE-MAKE-BINDING-FORM ( -CL::COUNT-OCCURRENCES CL:SUBST) CL:DESCRIBE (CL:VALUES) PRINT-CIRCLE-LABEL-P (DECLARE GETHASH) -INITIALIZEDISPLAYSTREAMS (CONS NCREATE BITMAPCREATE FONTCREATE FONTCLASS LIST) %CHAR-TYPE ( -%LIT-TYPE-TO-TYPE) |\\PFPatchRootDirEntries| (FFETCHFIELD FREPLACEFIELD PLUS) FILE-STREAM-POSITION ( -GETFILEPTR) CL::%EXPT-INTEGER (/ CL::%EXPT-INTEGER - CL:ASH CL:ERROR) CL:DELETE-IF (CL:LENGTH -COMPLEX-DELETE-IF SIMPLE-DELETE-IF) CL:EVERY (%EVERY-SINGLE %EVERY-MULTIPLE CONS) COMPILER::COPY-NODE-CATCH - (COMPILER::MAKE-CATCH COMPILER::COPY-NODES COMPILER::CATCH-TAG COMPILER::CATCH-STMT) -SEDIT::CONVERT-COMMENT-TAIL (LIST NTHCHARCODE) MAKE-CONCATENATED-STRING-INPUT-STREAM ( -CL:MAKE-STRING-INPUT-STREAM CL:FIRST CL:APPLY) DPB (BYTE-SIZE CL:BYTE-POSITION CL:LOGIOR CL:ASH LOGAND - CL::%MAKE-BYTE-MASK-1 CL::%MAKE-BYTE-MASK-0) SEDIT::INSERT-CHANGED (FFETCHFIELD CONS) APPLY* (ARG -\\DEFCELL \\ATOMCELL FFETCHFIELD SELECTQ SPREADAPPLY* SPREADAPPLY .SPREAD. LIST PLUS FAULTAPPLY) -COMPILER::META-CALL-LABELS (COMPILER::NODE-META-P) CL:ATANH (ABS CL:IMAGPART CL:REALPART CL:ERROR CL:* - CL:LOG / + - FLOAT FQUOTIENT) APPLY (.APPLY. \\DEFCELL \\ATOMCELL FFETCHFIELD FAULTAPPLY SPREADAPPLY -.SPREAD. SPREADAPPLY*) COMP.CLEANFNP (APPLY* SELECTQ EVERY COMP.CLEANEXPP) EVALV (\\STACKARGPTR -\\EVALV1) CL:FCEILING (CL::%INTEGER-COERCE-MACRO) FAULTEVAL (GETMACROPROP MACROEXPANSION LIST \\EVAL -GET CL:FUNCALL GETD \\EVALFORMASLAMBDA NEWFAULT1 OLDFAULT1) TB.NUMBER.OF.ITEMS (\\DTEST SELECTQ -FFETCHFIELD TB.NTH.ITEM ADD1 PLUS \\ILLEGAL.ARG) CL::SETF-ERROR (CL:ERROR) CL:ENOUGH-NAMESTRING ( -PATHNAME %PATHNAME-HOST %PATHNAME-DEVICE %PATHNAME-DIRECTORY %PATHNAME-NAME %PATHNAME-TYPE -%PATHNAME-VERSION) \\NSADDRESS.DEFPRINT (+ CL:ASH \\GETBASE IPLUS SELECTQ IQUOTIENT CL:INTEGER-LENGTH -FFETCHFIELD FRESHLINE) \\TEDIT.HARDCOPY.DISPLAYLINE (FFETCHFIELD DSPSCALE \\EDITELT GETBASEPTR -\\GETBASEPTR \\ADDBASE2 \\ADDBASE IPLUS FIXR FTIMES LISTGET PLUS DSPXPOSITION DSPYPOSITION CHARWIDTH -FONTCOPY IDIFFERENCE IREMAINDER + RSH - ADD1 IMAGEOBJPROP IMAGESTREAMTYPE) \\STRING-STREAM-OUTCHARFN ( -FFETCHFIELD FREPLACEFIELD PLUS CL:VECTOR-PUSH CL:CHARACTER) \\CHANGE.ETHER.TRACING (|printout| PRIN1 -LOGAND SELECTQ EVALV) DBG::ATTACH-BACKTRACE-MENU (DECLARE WFROMDS TTYDISPLAYSTREAM STKNTH -GETWINDOWPROP WINDOWPROP STKNAME CL:PRIN1-TO-STRING STKARG CONS LIST PLUS FREPLACEFIELDVAL NCREATE -ATTACHEDWINDOWS FFETCHFIELD CREATEW DBG::REGION-NEXT-TO WIDTHIFWINDOW IMIN BITMAPWIDTH -CHECK/MENU/IMAGE IDIFFERENCE BITMAPHEIGHT) XIPTRACE (MAKE-NETWORK-TRACE-WINDOW) TB.BUTTONEVENTFN ( -MODERNWINDOW.BUTTONEVENTFN FUNCTION) RELSTK (FFETCHFIELD FREPLACEFIELD) CL::STRUCTURE-POINTER-SLOTS ( -CL::PS-POINTER-DESCRIPTORS CL:MAPCAN CL:FUNCTION CL:MAPCAR CL::PS-ALL-SLOTS) PUTTEXTPROP (SELECTQ -FFETCHFIELD TEXTOBJ LISTGET LIST) \\DSPFONT.HCPYMODE (FFETCHFIELD \\GETFONTDESC FONTCOPY IMINUS FIXR -FTIMES \\FGETCHARWIDTH \\FGETWIDTH \\GETBASE \\GETCHARSETINFO \\GETBASEPTR UNFOLD LLSH \\CHARSET LRSH -\\CREATECHARSET \\CHAR8CODE LOGAND) MAKE-FILL-POINTER-OUTPUT-STREAM ( -%MAKE-INITIAL-STRING-STREAM-CONTENTS DECLARE \\ILLEGAL.ARG FREPLACEFIELDVAL NCREATE FUNCTION) -SEDIT::DRAW-UNDERLINE (IDIFFERENCE FFETCHFIELD IPLUS BLTSHADE) SEDIT::CREATE-SIMPLE-NODE ( -SEDIT::STRINGWIDTH LIST FREPLACEFIELDVAL NCREATE CONS SEDIT::CREATE-WEAK-LINK) CL:FILE-NAMESTRING ( -PATHNAME CL:CONCATENATE MKSTRING %PATHNAME-VERSION) \\ADJUSTABLE-STRING-STREAM-OUTCHARFN (FFETCHFIELD -CL:CHARACTER PLUS) \\BBTCURVEPT (IPLUS \\HILOC \\LOLOC IMIN IDIFFERENCE \\ADDBASE ITIMES |\\SFInvert| -FFETCHFIELD LLSH FREPLACEFIELD SELECTQ \\PILOTBITBLT) SEDIT::INITIALIZE (FUNCTION CONS LIST -FREPLACEFIELDVAL NCREATE COPYTERMTABLE MAPC GETSYNTAX SETSYNTAX) TYPEINMENU (FUNCTION FREPLACEFIELDVAL - NCREATE CONS) COMPILER::META-CALL-LAMBDA-SUBSTITUTE (COMPILER::CALL-FN COMPILER::LAMBDA-REQUIRED -COMPILER::CALL-ARGS COMPILER::VARIABLE-SCOPE COMPILER::LAMBDA-BODY COMPILER::META-SUBSTITUTE) -FINDFILE-WITH-EXTENSIONS (UNPACKFILENAME.STRING SELECTQ INFILEP PACKFILENAME.STRING CONS REMOVE) -COMP.CLEANEXPP (EVERY COMP.CLEANEXPP) %BROADCAST-STREAM-DEVICE-BOUT (FFETCHFIELD \\BOUT) \\EVALV1 ( -\\GETBASEPTR \\STKSCAN) LISPXFIND0 (GETPROP LIST HISTORYFIND FMEMB NLEFT LDIFF DREVERSE APPEND CONS -LISTGET1) GRAPHNODE/BORDER/WIDTH (ABS ERROR) \\NSFILING.OPENFILE (\\NSFILING.GETFILE FFETCHFIELD -\\ILLEGAL.ARG SELECTQ \\LISP.TO.NSFILING.ATTRIBUTE ASSOC ERROR CONS) ENSURE.RGB (\\LOOKUPCOLORNAME -ERROR) %NEW-FILE (CLOSEF OPENSTREAM) CL::%EXP-FLOAT (FLOAT CL:* FTIMES CL::%GET-TABLE-ENTRY FQUOTIENT -CL::%POLYEVAL UFMINUS CL:SCALE-FLOAT -) CL:ENCODE-UNIVERSAL-TIME (+ SELECTQ SUB1 TIMES IDIFFERENCE -IQUOTIENT PLUS IREMAINDER) MEASUREGRAPHNODE (SET/LAYOUT/POSITION ERROR) COMPILER::COPY-NODE-CALL ( -COMPILER::MAKE-CALL COMPILER::COPY-NODES COMPILER::CALL-FN COMPILER::COPY-NODE-LIST COMPILER::CALL-ARGS -) SEDIT::CONVERT-COMMENT-STRUCTURE (EQMEMB CONS NCHARS LIST CONCATLIST SEDIT::CONVERT-COMMENT-TAIL) -PREDICT-NAME (CL:PROBE-FILE CL:NAMESTRING) VALUOF-EVENT (LISTGET1 CL:VALUES-LIST LISTGET VALUOF-EVENT -MAPCAR) GRAPHREGION (MEASUREGRAPHNODE CREATEREGION MIN/LEFT MIN/BOTTOM ADD1 IDIFFERENCE MAX/RIGHT -MAX/TOP) \\NSFILING.CONNECT (\\NSFILING.LOOKUP.CACHE CONCATLIST MAPCONC LIST FILING.CALL -\\NSFILING.MAYBE.CREATE \\NSFILING.ADD.TO.CACHE FREPLACEFIELDVAL NCREATE SETUPTIMER) -%BROADCAST-STREAM-DEVICE-FORCEOUTPUT (MAPC FFETCHFIELD FORCEOUTPUT) CL:ARRAY-RANK (LENGTH FFETCHFIELD -CL:ERROR) COMPILER::EFFECTS-ANALYZE-UNWIND-PROTECT (COMPILER::EFFECTS-ANALYZE-LAMBDA -COMPILER::UNWIND-PROTECT-STMT COMPILER::UNWIND-PROTECT-CLEANUP COMPILER::NODE-EFFECTS COMPILER::EFFECTS-UNION + COMPILER::SEGMENT-STMTS) COMP.FUNCTION (COMP.LAM1 COMP.CALL CONS COMP.STCONST) \SLOWPLUS2 (FPLUS +LISPERROR IPLUS) CWINDOWPROP (LIST TERPRI CGETWINDOWPROP CONS) MAKE-VECTOR (CL:ERROR %%MAKE-ONED-ARRAY +) \SLOWDIFFERENCE (FDIFFERENCE LISPERROR IDIFFERENCE) COMPILE-FILE-EX/IMPORT (EVAL) +CL:ARRAY-ELEMENT-TYPE (CL:ERROR) UNION (CONS) CL:SET-DIFFERENCE (CL:ERROR) CREATETEXTUREFROMBITMAP ( +BITMAPP BITMAPBIT IREMAINDER LOGOR \BITMASK \WORDELT LOGAND IPLUS ITIMES IDIFFERENCE PLUS BITMAPCREATE + IMIN) \SLOWTIMES2 (FTIMES LISPERROR ITIMES) SEDIT::COMPUTE-POINT-POSITION-COMMENT (IPLUS +SEDIT::SIMPLE-STRING-OFFSET) HRULE.PUTFN (PRINT IMAGEOBJPROP) CL:NSET-EXCLUSIVE-OR (CL:ERROR) +CL:NSET-DIFFERENCE (CL:ERROR) CLISPATOMIS1 (SELECTQ CONS MAPCAR CLISPATOMIS1 SUBLIS NEGATE) +\SLOWQUOTIENT (FQUOTIENT LISPERROR IQUOTIENT) /DREMOVE (/DREMOVE) CL:ELT (CL:LENGTH CL:ERROR) +\TEDIT.FIND.WC1 (SUB1 TEDIT.FIND \TEDIT.FIND.WC1 IPLUS NCHARS CONCATLIST \TEDIT.PACK.TARGETLIST ADD1) +\SLOWIPLUS2 (NTYPX \LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR +IGREATERP IDIFFERENCE ADD1 IPLUS \MAKENUMBER \BIGNUM.PLUS) SEDIT::CREATE-NEW-COMMENT (LIST +SEDIT::CREATE-WEAK-LINK) SCRATCHCONS (CONS) GETPROMPTWINDOW (WINDOWPROP FONTCREATE DSPFONT FUNCTION +WINDOWREGION STRINGWIDTH IQUOTIENT IPLUS SUB1 FIXP CREATEW HEIGHTIFWINDOW TIMES FONTPROP CONS) +\BSP.PREPARE.INPUT (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SETUPTIMER APPLY* +\DEQUEUE SHOULDNT SELECTC LIST IDIFFERENCE) CHAT.CLOSE.CONNECTION (CLOSEF) \SLOWIDIFFERENCE (NTYPX +\LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR \MAKENUMBER ADD1 +IDIFFERENCE IGREATERP LOGXOR IPLUS \BIGNUM.DIFFERENCE) CL:SUBSETP (CL:ERROR) CL:SET-EXCLUSIVE-OR ( +CL:ERROR) CL::%%PRINT-TIMING-INFO (CL::STATS-OBJECT-TIME-BLOCK CL::STATS-OBJECT-DATA-COUNTERS - +CL::STATS-OBJECT-ELAPSED-TIME CL::TIME-FORMAT) COMP.PUNT (CONS) \SLOWITIMES2 (NTYPX \LOLOC +\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR ADD1 IDIFFERENCE LRSH SUB1 IPLUS + LLSH PLUS LOGAND \MAKENUMBER \BIGNUM.TIMES) OLD.FIND.SYMBOL (SUB1 IPLUS \GETBASEFAT \GETBASE PLUS +UNLESSRDSYS \GETBASETHIN \GETBASEBYTE \ADDBASE IDIFFERENCE \PARSE.NUMBER LOGAND LLSH ADD1 IPLUS16 +\LOLOC ATOM.HASH.REPROBE LOGOR LOGXOR UNINTERRUPTABLY \CREATE.SYMBOL \PUTBASE \ATOMPNAMEINDEX NTYPX +SHOULDNT) ADD1VAR (SET ADD1 EVAL) GETDEF.I.S.OPR (CONS KWOTE GETPROP LIST) CL:MAKE-SEQUENCE ( +CL:MAKE-LIST MAKE-SEQUENCE-OF-TYPE) CL:NUNION (CL:ERROR) \SLOWIQUOTIENT (NTYPX \LOLOC +\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR ADD1 IDIFFERENCE LLSH LRSH SUB1 +PLUS LOGAND .SUBSMALL. IPLUS \MAKENUMBER \BIGNUM.QUOTIENT \BIGNUM.REMAINDER) DINFO.INVERT.NODE ( +WINDOWPROP REDISPLAYW OPENW) ADDTOVAR (GETPROP EVALV LISTGET1 CONS FASSOC LIST /DREMOVE UNION) BRKDWN1 + (LIST GETD PACK CONS LENGTH BRKDWNARRAY ARRAY ADD1 NCREATE PLUS BRKDWNSETUP PUTD APPEND) CL:MAKE-LIST + (CL:ERROR) PUTHASHFILE (CREATEKEY PACK*) SEDIT::GET-USER-STRING (SEDIT:GET-PROMPT-WINDOW +GETPROMPTWINDOW TTYINPROMPTFORWORD) \BLTSHADE.HCPYMODE (\BLTSHADE.DISPLAY \DASHINGCONVERT.HCPYMODE) +IREMAINDER (NTYPX \LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR ADD1 +IDIFFERENCE LLSH LRSH SUB1 PLUS LOGAND .SUBSMALL. IPLUS \MAKENUMBER \BIGNUM.QUOTIENT \BIGNUM.REMAINDER +) SYMBOL.PACKAGE (LRSH \GETBASE \ADDBASE2 \ADDBASE T IPLUS ITIMES \GETBASEPTR LLSH) MARKASCHANGED ( +SELECTQ ERROR GETFILEPKGTYPE APPLY* SETTOPVAL SEARCHPRETTYTYPELST CONS GETTOPVAL LIST) DUMPI.S.OPRS ( +MAPCAR GETDEF.I.S.OPR LIST) SEDIT::CLOSE-NODE-COMMENT (FREPLACEFIELD CONS LIST FFETCHFIELD +SEDIT::MAKE-COMMENT-STRING) EXEC-FORMAT (LISPXPUT LIST CONS CL:APPLY) \FIRSTNODE (\GETBASEPTR +\FIRSTNODE) APPENDTOVAR (GETPROP EVALV LISTGET1 APPEND LIST FASSOC /DREMOVE LDIFFERENCE) +COMPILER::COPY-NODE-SETQ (COMPILER::MAKE-SETQ COMPILER::FIND-COPIED-VARIABLE COMPILER::SETQ-VAR +COMPILER::COPY-NODES COMPILER::SETQ-VALUE) PRINTROUTINGTABLE (NTYPX CL:ERROR \GETSTREAM NCONC APPEND +\GETBASEPTR PLUS \ADDBASE CONSTANT + NCHARS - TERPRI SORT FUNCTION IMAX PRINTNUM printout) \SLOWLLSH1 +(NTYPX \LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR \MAKENUMBER IPLUS +LLSH LOGAND) TWODINSPECT.ROWPROPWIDTH (STRINGWIDTH) \TEDIT.MARK.LINES.DIRTY (IMIN ADD1 WINDOWPROP) +\FTP.ADD.USERINFO (\INTERNAL/GETPASSWORD CONS LIST) CL::%%SQRT-COMPLEX (FLOAT CL::COMPLEX-REALPART +CL::COMPLEX-IMAGPART CL:SQRT ABS FQUOTIENT CL:PHASE CL:* CL:COS CL:SIN) \BSP.CLEANUP.INPUT (\DTEST +IPLUS IDIFFERENCE PLUS SUB1 FFETCHFIELD) SEDIT:GET-FORMAT (CL:GETHASH) \SLOWLLSH8 (NTYPX \LOLOC +\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR \MAKENUMBER IPLUS LLSH LOGAND +LRSH) GETHASHFILE (LOOKUPHASHFILE CREATEKEY PACK*) RESULTS (BRKDWNRESULTS) CL:SUBSEQ (CL:LENGTH) +COMPILER::COPY-NODE-RETURN (CL:GETHASH COMPILER::RETURN-BLOCK COMPILER::MAKE-RETURN COMPILER::COPY-NODES + COMPILER::RETURN-VALUE) CL:INTERSECTION (CL:ERROR) \SLOWLRSH1 (NTYPX \LOLOC \FIXP.FROM.FLOATP +IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR \MAKENUMBER LRSH IPLUS LOGAND) /SET (SAVESET) +MENUWINDOW (ADDMENU CREATEW CREATEREGION WIDTHIFWINDOW HEIGHTIFWINDOW FUNCTION) CL:NTHCDR (CL:ERROR) +CL:NINTERSECTION (CL:ERROR) CLISPATOM2D (GETHASH MINUS CONS) \SLOWLRSH8 (NTYPX \LOLOC +\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR \MAKENUMBER LRSH IPLUS LLSH +LOGAND) SAVESET (GETTOPVAL STKSCAN EVALV GETATOMVAL SOME LISTGET1 EVQ EQUALN LIST) <= ( +CL::%%COMPARISON-MACRO) CL:PAIRLIS (LENGTH CL:ERROR) BRKDWNFORM (CONS ASSOC LIST) \SLOWLOGOR2 (NTYPX +\LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR \MAKENUMBER LOGOR +\BIGNUM.LOGOR) SEDIT::COMPUTE-SELECTION-POSITION-COMMENT (IPLUS SEDIT::SIMPLE-STRING-OFFSET SUB1) +RECORDACCESS (RECORDCHAIN RECFIELDLOOK LIST RECORDERROR CHECKDEFS MAPCONC ACCESSDEF4 RECORDECL +FIXSPELL FIELDNAMESIN EVAL EMBEDPROG MAKEACCESS SELECTQ KWOTE ERROR) WINDOWADDFNPROP (WINDOWPROP LIST +NCONC1 APPEND) \SLOWLOGAND2 (NTYPX \LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR +CL::RATIO-DENOMINATOR \MAKENUMBER LOGAND \BIGNUM.LOGAND) COMPILE-FILE-SETF-SYMBOL-FUNCTION (CL:THIRD +CL:SECOND BYTECOMPILE2 PRINT WALK-FORM FUNCTION) \LEAF.DIRECTORYNAMEP (PACKFILENAME.STRING CONS +FFETCHFIELD) ENDBSPSTREAM (CLOSEBSPSTREAM) %%SETELT (CL:LENGTH CL:ERROR) BMOBJ.DISPLAYFN (IMAGEOBJPROP + DSPSCALE IMAGESTREAMTYPE IMINUS FIXR FTIMES NUMBERP ASSOC SHRINKBITMAP FQUOTIENT EXPANDBITMAP +DSPXPOSITION DSPYPOSITION BITMAPWIDTH BITMAPHEIGHT) UnixPrint (LISTGET PRINTERTYPE CHCON1 +UNPACKFILENAME.STRING NCHARS NLSETQ FILDIR PACKFILENAME UnixTempFile IGREATERP DIFFERENCE IDATE +GETFILEINFO DELFILE) \SLOWLOGXOR2 (NTYPX \LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR +CL::RATIO-DENOMINATOR \MAKENUMBER LOGXOR \BIGNUM.LOGXOR) SETUP-WHOLINE-TIMER (SETUPTIMER WINDOWPROP) +LDIFFERENCE (LIST) \SMASHBSPSTREAM (\DTEST) CL::%%SET-NTH (CL:ERROR) CL::%%SQRT-FLOAT (FLOAT +CL::%%UMAKE-FLOAT + CL:ASH CONSTANT CL:1+) \FM.EDIT-UPDATEAFTERDELETE (IPLUS IDIFFERENCE BITMAPWIDTH +FONTPROP BITBLT) FTPGETCODE (FTPPRINTCODE BIN) LSH (\RSH IMINUS CONSTANT INTEGERLENGTH \BIGNUM.LSH +IPLUS) \LEAF.FORCEOUTPUT (LEAF.ASSURE.FINISHED) CL::TYPE-EXPAND (CL::TYPE-EXPANDER CL:VALUES CL:FUNCALL +) ATTACH (FRPLACA FRPLACD CONS ERRORX LIST) COMPILER::COPY-NODE-PROGV (COMPILER::MAKE-PROGV +COMPILER::COPY-NODES COMPILER::PROGV-SYMS-EXPR COMPILER::PROGV-VALS-EXPR COMPILER::PROGV-STMT) +COMP.APPLYFNP (SELECTQ COMP.ARGTYPE CONS) \SLOWFPLUS2 (\BOXFPLUSDIF) SYMBOL.PNAME (ALLOCSTRING +\GETBASEPTR \ADDBASE2 \ADDBASE \VAG2 IPLUS ITIMES LOGAND \GETBASEBYTE RPLSTRING FCHARACTER PLUS LOCAL +SUBSTRING) DEFINEQ (DEFINE) POSTSCRIPTSEND (SELECTQ MKATOM UNIX-GETPARM DOSPRINT UnixPrint) +CL::TYPE-EXPANDER (GET CL::TYPE-EXPANDER) DWIM-SYMBOL-PACKAGE (DECLARE CL:FIND-ALL-SYMBOLS +CL:SYMBOL-NAME LIST /RPLACA) CL:RASSOC (CL:ERROR CL::%%COMPLEX-RASSOC CL::%%SIMPLE-RASSOC) ADDTOCOMS ( +ADDTOCOMS GETTOPVAL ADDNEWCOM GETFILEPKGTYPE) \SLOWFDIFFERENCE (\BOXFPLUSDIF) DEFINE (MAPCAR +FNS.PUTDEF CONS) \READBINARYBITMAP (GETSTREAM \WIN IPLUS LLSH \BIN BITMAPCREATE ITIMES) DOWINDOWCOM ( +ARG WINDOWPROP APPLY* \CARET.DOWN MENU FUNCTION DOBACKGROUNDCOM) \SLOWFTIMES2 (\BOXFTIMES2) UNTRACE ( +NLAMBDA.ARGS CL:FLET MAPCONC CL:REVERSE CL::UNTRACE-ENTRY XCL:UNBREAK-FUNCTION CL:FIRST CL:THIRD) +REMWINDOWPROP (\OUTSTREAMARG \GETSTREAM WFROMDS) CL:PRIN1-TO-STRING (\PRINDATUM.TO.STRING) BSPHELP ( +HELP) \LEAF.RENAMEFILE (GETHOSTINFO \FTP.RENAMEFILE \GENERIC.RENAMEFILE) \SLOWFQUOTIENT (\BOXFQUOTIENT +) COMPILE.FILE.DEFINEQ (ARGTYPE COMPILE1A) SIGNAL (MAKE-INTO-CONDITION) CL::%%LIST-MAP-OPTIMIZER ( +CL:EVAL) DSUBST (COPY) BRKDWNSETUP (LIST BRKDWNFORM KWOTE GETD) FIND.START.OF.WORD (\SYNCODE GETHASH +\GETBASEBYTE FIRSTCHAR TTNEXTCHAR) \UNBOXFLOAT2 (\CALLER.ARGS \MYALINK OPCODES \FLOATBOX \.GETBASE32 +IDIFFERENCE TIMES SELECTQ \HAND.FLOATUNBOX \VAG2 FLOAT FPLUS FDIFFERENCE FTIMES FQUOTIENT FGREATERP +FMAX FMIN FREMAINDER HELP) TWODINSPECT.COLUMNWIDTHS (MAPCAR TWODINSPECT.COLUMNWIDTH) +CREATEMENUEDWINDOW (LENGTH MENUWINDOW PLUS FONTPROP DEFAULTFONT TIMES GETREGION IMAX \ILLEGAL.ARG +FRPLACA IDIFFERENCE CREATEW) MBUTTON.FIND.NEXT.FIELD (\CHTOPC PLUS IDIFFERENCE IPLUS IMAX) +CLISPCAR/CDR1 (SELECTQ FRPLACA CLISPLOOKUP LIST ADD1 FASSOC SHOULDNT) \UNBOXFLOAT1 (SELECTQ +\CALLER.ARGS \MYALINK OPCODES \.GETBASE32 IDIFFERENCE TIMES NCREATE \HILOC \LOLOC \HAND.FLOATUNBOX +\VAG2 FLOAT \FLOATBOX \FLOATUNBOX ABS FMINUS FIX HELP) \FINDPIECE (FINDPCNODE INDEX) BITMAPTEDITOBJ ( +IMAGEOBJCREATE) FW-RESET (MAPC SELECTQ SHOULDNT CONS) GETLIS (GETPROPLIST) CHAT.DEACTIVATE.WINDOW ( +WINDOWPROP CONCAT SUBSTRING IPLUS STRPOS FUNCTION) SEDIT:RESET-FORMATS (CLRHASH +SEDIT::INSTALL-SPECIAL-FORMATS SEDIT::COPY-HASH-TABLE CL:MAKE-HASH-TABLE) %%ASET2 (CL:ARRAY-RANK + CL:* + %%ASET2 %%ARRAY-WRITE CL:ERROR) SEDIT::COMMENT-LENGTH (PLUS NCHARS) %%AREF2 (CL:ARRAY-RANK + CL:* +%%ARRAY-READ CL:ERROR) SPYOBJ.DISPLAY (SPYOBJ.HEIGHT QUOTIENT DIFFERENCE FONTHEIGHT PRIN3 SPYOBJ.LABEL +) \SLOWIGREATERP (NTYPX \LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR +IGREATERP LOGXOR \BIGNUM.COMPARE) MAKETEDITFORM (MAKEXXXSUPPORTFORM) ARCTAN (FPLUS FQUOTIENT FTIMES +POLYEVAL \FLOATBOX OPCODES FDIFFERENCE) ATTACHMENU (MENUWINDOW FMEMB) DINFO.HISTORIC.UPDATE ( +WINDOWPROP WFROMMENU FASSOC PROMPTPRINT PRINTOUT PRIN1 GETPROMPTWINDOW DINFO.UPDATE) CLISPATOM2C ( +FUNCTION CONS) \SLOWFGREATERP (LOGAND IGREATERP LISPERROR NTYPX ADD1 IDIFFERENCE IGEQ LOLOC \LOLOC +FLOAT IPLUS LLSH LRSH PLUS SUB1) HRULE.IMAGEBOXFN (DSPSCALE IMAGEOBJPROP IMAX IDIFFERENCE PLUS FIXR +FTIMES) \RTP.HANDLE.INPUT (GETPUP BLOCK PUPSOCKETEVENT \RTP.ACTION) GREATERP (IGREATERP FGREATERP) +SPYOBJ.HEIGHT (FONTHEIGHT MAX QUOTIENT TIMES) RECORD.FIELD.VALUE (ASSOC GETFIELDFORCREATE) EQUAL ( +EQUAL SELECTC NTYPX FEQP \LOLOC \BIGNUM.COMPARE STREQUAL \EXTENDED.EQP EQDEFP) CHANGEPROP (GETPROPLIST + ERRORX LIST) INTERSECTION (CONS) HRULE.GETFN (HRULE.CREATE READ) \BOXIPLUS (.BOXIPLUS. \GETBASE NTYPX + \LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR IDIFFERENCE ADD1 IPLUS) +BRKDWNFBOXES (BRKDWNMACRO \BOXIPLUS BRKDWNELT ELT BRKDWNDIFFA IDIFFERENCE \PUTBASEFIXP FBOXCOUNT +BOXCOUNT EVAL) ARCTAN2 (FLOATP FLOAT ARCTAN ABS FQUOTIENT FPLUS FDIFFERENCE FTIMES) SHOWSHADE.IP ( +APPENDOP.IP) SEDIT::CFV-COMMENT (SELECTQ SHOULDNT) \BOXIDIFFERENCE (\GETBASE NTYPX \LOLOC +\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR ADD1 IDIFFERENCE IPLUS) +\TEDIT.REOPEN.STREAM (OPENSTREAM TEXTOBJ \GETBASEPTR \FIRSTNODE) \CURVESLOPE (LENGTH SELECTQ CONS +DIFFERENCE PARAMETRICSPLINE REVERSE NLEFT IMIN LIST ELT MINUS) \HCPYMODEDSPPRINTCHAR (\CARET.DOWN +SELECTC \SYNCODE GETHASH \GETBASEBYTE PLUS FFETCHFIELD IPLUS LOGAND LOGOR SELCHARQ FREPLACEFIELD +SELECTQ MACHINETYPE PLAYTUNE FLASHWINDOW WFROMDS CHARWIDTH UNFOLD LLSH \DISPLAYSTREAMINCRXPOSITION +IDIFFERENCE MOD IMOD IQUOTIENT SHOULDNT) LISTPUT1 (NCONC LIST) TRACE (NLAMBDA.ARGS MAPCONC +XCL:TRACE-FUNCTION CL:FIRST CL:THIRD) \CURVEEND (IDIFFERENCE IABS IMINUS IPLUS ADD1 ITIMES +DSPDESTINATION \GETBASE \TOTOPWDS \FBITMAPBIT \BBTCURVEPT SUB1 PLUS) FW-WIPE (CLOSEW) CL:REPLACE ( +CL:LENGTH - +) \CREATEPIECEORSTREAM (NCHARS OPENSTREAM MKSTRING CHARLOOKS.FROM.FONT) TCONC (CONS ERROR + FRPLACD) IDIFFERENCE (OPCODES) KWOTE (LIST) CURRENT-TTY-READTABLE-NAME (READTABLEPROP PROCESS.EVALV +TTY.PROCESS) \MISC3.UFN (SELECTQ \BLKEXPONENT.UFN \BLKMAG.UFN \BLKSMALLP2FLOAT.UFN \BLKFLOATP2COMP.UFN + \BLKFMAX.UFN \BLKFMIN.UFN \BLKFABSMAX.UFN \BLKFABSMIN.UFN \FLOATTOBYTE.UFN %%SLOW-ARRAY-READ +\LINES-EQUAL-P RAID) PRETTYFILEINDEX (RESETLST LISTGET GETSTREAM LIST FUNCTION OPENSTREAM FULLNAME +\PARSE-FILE-HEADER CONS PFI.MAKE.LPT.STREAM LINELENGTH IQUOTIENT - DSPRIGHTMARGIN DSPLEFTMARGIN +CHARWIDTH FIXR TIMES PFI.LINES.REMAINING APPEND PFI.COLLECT.DEFINERS GETFILEINFO LOGOR CONCAT) +INSURE.WINDOW (\OUTSTREAMARG \GETSTREAM WFROMDS \ILLEGAL.ARG) IGREATERP (OPCODES) +\TFBRAVO.PARSE.PROFILE.VALUE (TIMES FIX) SAMECLOOKS (FONTPROP CONCAT) LSUBST (NCONC COPY LSUBST CONS) +COMPILE.CHECK.ARGTYPE (COMP.ARGTYPE MAPC FMEMB EVALV PRIN1 /SETTOPVAL CONS GETTOPVAL LIST ASSOC TERPRI + REMOVE) CL::STEP-PRINT-VALUES (CL:TERPRI) IQUOTIENT (OPCODES) BMOBJ.IMAGEBOXFN (IMAGEOBJPROP DSPSCALE + IMAGESTREAMTYPE NUMBERP ASSOC FIXR FTIMES TIMES BITMAPWIDTH BITMAPHEIGHT) IDLE.BITMAP (WINDOWPROP +BITMAPWIDTH BITMAPHEIGHT BITMAPCREATE SCREENBITMAP BITMAPP RPLACA IDLE.BITMAP FONTCREATE NCHARS +STRINGWIDTH FONTHEIGHT DSPCREATE DIFFERENCE FONTASCENT) SYMBOL.VALUE (OLD.FIND.SYMBOL LOCAL NCHARS +\GETBASEPTR VADDBASE IPLUS VVAG2 LLSH ITIMES LOGAND) IPLUS (SELECTQ IPLUS ARG ADD1) FW-FORGET-CMD ( +CLOSEW LIST MENU MAPCAR KWOTE REMOVE) CL::%%= (\CALLME) EVERY (APPLY*) \BIGNUM.PLUS (\BN.TO.FIXP +\BN.PLUS2 \BN.FROM.FIXP) LCONC (LAST CONS FRPLACA FRPLACD) TEDIT.SUBLOOKS (\TEDIT.PARSE.CHARLOOKS.LIST + TEXTOBJ \CHTOPC MAPLIST ZEROP \TEDIT.UNIQUIFY.CHARLOOKS + PLUS) MAP2C (APPLY*) +SET-TTY-READTABLE-INTERACTIVELY (PROCESS.EVAL TTY.PROCESS) PLUS (ADD1 ARG IPLUS FPLUS) CL::%%LOG-FLOAT + (FLOAT CL:ERROR - CL::%%UMAKE-FLOAT FQUOTIENT CL:1- CL:1+ CL:* + CL::%%POLYEVAL) \FM.EDIT-STRINSERT ( +CONCAT SUBSTRING SUB1 NCHARS) \FTP.PACK.DIRECTORYNAMEP (ASSOC PACKFILENAME.STRING) +\LEAF.BREAKCONNECTION (FDEVOP SPREADAPPLY* CLOSEF \CLOSELEAFCONNECTION) \BIGNUM.DIFFERENCE ( +\BN.TO.FIXP \BN.DIFFERENCE \BN.FROM.FIXP) COMPILER::COPY-NODE-PROGN (COMPILER::MAKE-PROGN +COMPILER::COPY-NODE-LIST COMPILER::PROGN-STMTS) CL::%%MAPCAR-MULTIPLE (CL:MAKE-LIST LENGTH) COMP.BOOL +(COMP.CONST COMP.EXP1 SELECTQ OPT.COMPILERERROR COMP.EXPR) MAPC (APPLY*) \MISC4.UFN (SELECTQ +\BLKFTIMES.UFN \BLKPERM.UFN \BLKFPLUS.UFN \BLKFDIFF.UFN \BLKSEP.UFN \BITMAPBIT %%SLOW-ARRAY-WRITE RAID +) \10MBSETUPRECEIVER (\QUEUE.INPUT.IOCB) DIFFERENCE (OPCODES) \TFBRAVO.ASSERT (HELP CONCAT) CL:MAPCAR +(CL::%%MAPCAR-SINGLE CL::%%MAPCAR-MULTIPLE CONS) MAP2CAR (CONS APPLY* FRPLACD) ARGTYPE.STATE (MAPC +PRINTOUT EVAL TERPRI) CL::STEP-PRINT (CL:FORMAT MIN) \BIGNUM.COMPARE (\BN.COMPAREN \BN.FROM.FIXP) +DEBUGGER (FIND-LEXICAL-ENVIRONMENT STKNTH DECLARE FIND-DEBUGGER-ENTRY-FRAME RESETSAVE LIST +DBG::REUSE-CURRENT-WINDOW DBG::CREATE-DEBUGGER-WINDOW DBG::SET-UP-DEBUGGER-WINDOW CL:FORMAT +SI::BREAKPOINT-FUNCTION DBG::PRINT-ENTRY-MESSAGE DBG::ATTACH-BACKTRACE-MENU CL:CATCH EXEC CL:FUNCTION) + MAPCON (APPLY*) GET-TWOD-DISPLAYW (CREATEW CREATEREGION FUNCTION TWODINSPECT.ROWPROPWIDTH +TWODINSPECT.COLUMNWIDTHS) TEDIT.OBJECT.CHANGED (TEXTOBJ TEDIT.MAPPIECES FUNCTION) LOGAND (SELECTQ +LOGAND ARG ADD1) \CLEARPCTB (HELP) MAPCAR (CONS APPLY* FRPLACD) \INIT.RTPPROCESS (ADD.PROCESS LIST +FUNCTION KWOTE CREATE.EVENT PROCESS.NAME CREATE.MONITORLOCK) TEDIT.PUT.PCTB (TEXTPROP +TEDIT.FORMATTEDFILEP \GETBASEPTR \FIRSTNODE OPENSTREAM ADD1 GETFILEPTR \TEDIT-OPEN-FONT-FILE PLUS +FLENGTH \TEDIT.PUT.PARALOOKS.LIST \TEDIT.PUT.CHARLOOKS.LIST LOGAND LRSH \BOUT IMAGEOBJPROP APPLY* +IDIFFERENCE GETEOFPTR TEDIT.PUT.OBJECT OPENP \TEDIT.REOPEN.STREAM IPLUS UNFOLD LLSH SUB1 \GETBASEFAT +\GETBASE \GETBASETHIN \GETBASEBYTE CONS EVAL \TEDIT.UNIQUIFY.CHARLOOKS \TEDIT.UNIQUIFY.PARALOOKS) +\BIGNUM.LOGAND (ERROR DIFFERENCE LOGOR LOGNOT \BN.TO.FIXP \BN.LOGANDC2 \BN.FROM.FIXP \BIGNUM.LOGAND +\BN.LOGAND) EXEC-VALUE-OF (CL:VALUES-LIST LISTGET) \HDCPYDISPLAYINIT (FUNCTION) MAPLIST (CONS APPLY* +FRPLACD) CL::%%PRINT-RANDOM-STATE (CL::DEFAULT-STRUCTURE-PRINTER) LOGOR (SELECTQ LOGOR ARG ADD1) +PFI.LOOKUP.NAME (ASSOC) \FM.EDIT-STRDELETE (CONCAT SUBSTRING SUB1 ADD1 NCHARS) *DEFINITION-HASH-TABLE* + (CL:MAKE-HASH-TABLE CL:FUNCTION) MAPCONC (APPLY*) LDIFF (FRPLACD FLAST CONS ERROR) \BIGNUM.LOGOR ( +ERROR \BN.TO.FIXP \BN.LOGOR \BN.FROM.FIXP DIFFERENCE LOGAND) CL::%%MAPLIST-MULTIPLE (CL:MAKE-LIST +LENGTH) \TEDIT.SET.SEL.LOOKS (SELECTQ) CL::%%MAPC-MULTIPLE (CL:MAKE-LIST LENGTH) SEDIT:*INDENT-ALIST* +(LIST LIST*) MAKE.LOCAL.ATOM (ALLOCAL CL:INTERN CL:FIND-PACKAGE CL:MAKE-PACKAGE) LOGXOR (SELECTQ +LOGXOR ARG ADD1) CLISPBROADSCOPE (CONS ADD1 SUB1 LDIFF) PFI.SORT.INDICES (CL:POSITION CONS LIST MAPCAR + SORT CDR CL:SET-DIFFERENCE NCONC) GET-TOPW (WINDOWPROP CREATEW CREATEREGION FUNCTION) \BIGNUM.LOGXOR +(ERROR LOGXOR DIFFERENCE \BIGNUM.DIFFERENCE \BIGNUM.LOGOR \BIGNUM.LOGAND \BIGNUM.LOGXOR \BN.TO.FIXP +\BN.LOGXOR \BN.FROM.FIXP) GTHASHFILE (OPENHASHFILE HELP) \TEDIT.PARSE.SEARCHSTRING (LIST CONS MKATOM +\TEDIT.PARSE.SEARCHSTRING APPEND MKSTRING CONCAT) SET-READTABLE-INTERACTIVELY (MENU SORT) UNCOPYATOM ( +SYMBOL.PNAME PACKAGE.NAME SYMBOL.PACKAGE MAKE.LOCAL.ATOM) ITIMES (SELECTQ ITIMES ARG ADD1) ADD-EXEC ( +XCL::SETUP-EXEC-WINDOW CREATEW ADD.PROCESS LISPINTERRUPTS) CLISPBROADSCOPE1 (DWIMIFY2? LIST FRPLACA +DWIMIFY1?) GET-CORNERW (WINDOWPROP CREATEW CREATEREGION FUNCTION) \BIGNUM.TIMES (\BN.TO.FIXP +\BN.TIMES2 \BN.FROM.FIXP) SEDIT::FIND-SELECTION-BACKWARDS (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW +SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE-BACKWARDS SEDIT::STRUCTURE-FROM-SELECTION LIST CL:1- SEDIT::PREV-NODE + SEDIT::FIND-AND-DISPLAY-STRUCTURE-BACKWARDS CL:FORMAT) ENTER-DEBUGGER-P (IDIFFERENCE CLOCK) UNBREAK ( +NLAMBDA.ARGS CL:FLET MAPCONC CL:REVERSE XCL::UNBREAK-ENTRY XCL:UNBREAK-FUNCTION CL:FIRST CL:THIRD) +CL::%%RANDOM (CL::RANDOM-STATE-I CL::RANDOM-STATE-J CL::RANDOM-STATE-ARRAY LOGAND - CL:AREF CL:1+) +\TEDIT.FLUSH.UNUSED.LOOKS (LIST) TEDIT.NEW.FIND (HELP) TIMES (ADD1 ARG ITIMES FTIMES) +\FM.EDIT-MOVECARET (\FM.EDIT-GETPOINTERINFO \FM.ITEMPROP FFETCHFIELD IPLUS DSPXPOSITION) \TAN-FLOAT (- + CL:REM ABS FTIMES / POLYEVAL \FLOATBOX OPCODES) TEDIT.LOOKS (TEXTOBJ TEDIT.SETSEL \TEDIT.CHANGE.LOOKS +) CL::%%MAPCAN-MULTIPLE (CL:MAKE-LIST LENGTH) COMPILER::COPY-NODE-MV-PROG1 (COMPILER::MAKE-MV-PROG1 +COMPILER::COPY-NODE-LIST COMPILER::MV-PROG1-STMTS) COMP.PICOUNT (ADD1) RATOMS (RATOM TCONC) +\BIGNUM.QUOTIENT (ERROR \BN.TO.FIXP \BN.DIVIDE \BN.FROM.FIXP) CL:MAPC (CL::%%MAPC-SINGLE +CL::%%MAPC-MULTIPLE CONS) CL:MAPLIST (CL::%%MAPLIST-SINGLE CL::%%MAPLIST-MULTIPLE CONS) PUTASSOC ( +ERRORX LIST CONS) \RTP.ACTION (SELECTC LIST LOCF) \SETUPGETCH (IMAX \CHTOPC - IDIFFERENCE IMAGEOBJPROP + ADD1 \TEDIT.APPLY.PARASTYLES \TEDIT.APPLY.STYLES) QUOTIENT (IQUOTIENT FQUOTIENT /) EXEC-EVAL ( +GET-NEXT-HISTORY-EVENT LIST* EXEC-EVENT-VALUE CL:VALUES-LIST) \MAP.ROUTING.TABLE (NTYPX CL:ERROR +APPEND \GETBASEPTR CL:FUNCALL PLUS \ADDBASE) CL:MAPCAN (CL::%%MAPCAN-SINGLE CL::%%MAPCAN-MULTIPLE CONS +) SPYOBJ.GET (IMAGEOBJCREATE READ) COMP.EVQ (RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION COMP.PROGLST) NU\TOTOPWDS (DSPDESTINATION TOTOPW WFROMDS) CL:MAPCON ( +CL::%%MAPCON-SINGLE CL::%%MAPCON-MULTIPLE CONS) TAN (\TAN-FLOAT FTIMES) COMPILE-FILE-WALK-FUNCTION ( +CL:VALUES INTERLISP-NLAMBDA-FUNCTION-P) CL::%%MAPCON-MULTIPLE (CL:MAKE-LIST LENGTH) +DINFO.UPDATE.FROM.MENU (DINFO.UPDATE WINDOWPROP WFROMMENU) SPYOBJ.IMAGEBOX (SPYOBJ.HEIGHT STRINGWIDTH +SPYOBJ.LABEL) \PUTBASEFIXP.UFN (SELECTC NTYPX \LOLOC LISPERROR ADD1) CL::%%SQRT2 (CL::%%FLOAT) +\FM.EDIT-GETPOINTERINFO (IDIFFERENCE NCHARS PLUS CHARWIDTH NTHCHARCODE CONS STRINGWIDTH SUBSTRING SUB1 + ADD1) CHAT.BIN (\GETKEY) RPT (EVAL SUB1) EQDEFP (SUB1 UNFOLD LLSH IMIN \#BLOCKDATACELLS \GETBASE +INDEXF ADD1 PLUS) COMPILER::COPY-NODE-MV-CALL (COMPILER::MAKE-MV-CALL COMPILER::COPY-NODES +COMPILER::MV-CALL-FN COMPILER::COPY-NODE-LIST COMPILER::MV-CALL-ARG-EXPRS) COMP.CPI1 (COMP.CPI1 SUB1 +COMP.STPOP) FRPTQ (EVAL APPLY SUB1) COPYATOM (CL:SYMBOL-PACKAGE CONCAT CL:PACKAGE-NAME HELP LOCAL +NCHARS IPLUS NTHCHARCODE PLUS \ATOMDEFINDEX NTYPX \LOLOC SHOULDNT \MKATOM) \BIGNUM.REMAINDER (ERROR +\BN.TO.FIXP \BN.DIVIDE \BN.FROM.FIXP) COMPILER::COPY-NODE-OPCODES (COMPILER::MAKE-OPCODES CL:COPY-LIST + COMPILER::OPCODES-BYTES) RPTQ (EVAL APPLY SUB1) CL::%%EVERY-MAP-OPTIMIZER (CL:EVAL) \BIGNUM.LSH ( +ERROR \BN.FROM.FIXP IDIFFERENCE CONS \BN.TO.FIXP \BN.TIMES2 EXPT IPLUS \BIGNUM.QUOTIENT IMINUS MINUS +\BIGNUM.LSH SUB1) WHITESPACE-CHAR-P (CL:MEMBER FUNCTION) SEDIT::FIND-SELECTION (SEDIT:GET-PROMPT-WINDOW + GETPROMPTWINDOW SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE SEDIT::STRUCTURE-FROM-SELECTION LIST CL:1+ +SEDIT::NEXT-NODE SEDIT::FIND-AND-DISPLAY-STRUCTURE CL:FORMAT) \BSP.OTHERBOUT (\BOUT \DTEST LISPERROR) +CL::%%MAPL-MULTIPLE (CL:MAKE-LIST LENGTH) TRANSMIT.ETHERPACKET (APPLY* \DTEST) \RSH (LSH IMINUS NTYPX +\LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR IDIFFERENCE IPLUS LRSH +LLSH LOGAND \MAKENUMBER \BIGNUM.LSH) RECURSIVELY-ANALYZE (ANALYZE) SAVEDEF1 (GETD SELECTQ FNTYP) +INTERLISP-NLAMBDA-FUNCTION-P (ARGTYPE) CL:MAPL (CL::%%MAPL-SINGLE CL::%%MAPL-MULTIPLE CONS) RSH (\RSH) + FW-CREATEW (CREATEW) TWODINSPECT.RESHAPEFN (WINDOWPROP) \TELERAIDBREAK (\GETBASEPTR STACKADDBASE +\VAG2 LIST LOGAND LRSH LLSH \GETBASE SELECTQ \KEYNAMETONUMBER IPLUS \MAKEFRAME FUNCTION +\FREESTACKBLOCK UNFOLD) MAKEHARDCOPYMODESTREAM (DISPLAYSTREAMP WINDOWPROP DSPCREATE \ILLEGAL.ARG +PRINTERPROP PRINTERTYPE FUNCTION DSPFONT DSPRIGHTMARGIN FIXR FTIMES DSPCLIPPINGREGION) +CENTERPRINTINREGION (DSPCLIPPINGREGION CENTERPRINTINAREA) MINUSP (<) SEDIT::BACKSPACE-COMMENT ( +SEDIT::CLOSE-NODE NCHARS SEDIT::SET-SELECTION-NOWHERE) CLOSERTPSOCKET (CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION SETUPTIMER \RTP.ACTION) ILESSP (IGREATERP) IMINUS (IDIFFERENCE) +BREAK-FUNCTION (XCL:TRACE-FUNCTION MAPCONC BREAK-FUNCTION GETD CL:ERROR CL:MAKE-SYMBOL CL:FORMAT +CL:COMPILE SI::CREATE-BROKEN-DEFINITION GET CL:DELETE LIST SI::CONSTRUCT-MIDDLE-MAN) SUB1 (IDIFFERENCE +) \CHANGECHARSET.HDCPYDISPLAY (FONTCREATE STREAMPROP FONTPROP \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH +\CREATECHARSET CONSTANT \CREATECSINFOELEMENT \ALLOCBLOCK FOLDHI LRSH IPLUS FQUOTIENT \PUTBASE FIXR +FTIMES \FGETWIDTH \GETBASE PLUS) SELECT1 (EVAL) DO.LF (\DSPPRINTCR/LF) \10MBRAWENCAPSULATE (IPLUS +FOLDHI LRSH \BLTLOCALHOSTNUMBER \BLT LOCF \ADDBASE) ZEROP (\FZEROP) *WHO-LINE-PACKAGE-NAME-CACHE* ( +LIST) SELECT (APPLY SELECT1 EVAL) \TEDIT.CHANGE.LOOKS (TEXTOBJ LISTGET FMEMB CONS NLSETQ \DTEST CONCAT + IMIN ADD1 IPLUS \CHTOPC \SPLITPIECE - SUB1 \TEDIT.UNIQUIFY.CHARLOOKS NCONC1 \TEDIT.FONTCOPY FONTPROP +IMINUS \TEDIT.CARETLOOKS.VERIFY LIST) DINFO (RESETLST WINDOWP CREATEW RESETFORM TTYDISPLAYSTREAM +GETPROMPTWINDOW DINFO.READ.GRAPH CREATE.MONITORLOCK LIST) ADD1 (IPLUS) SELECTC (APPLY EVAL) \CHTOPCNO +(IPLUS IMAX) HRULE.DISPLAYFN (IMAGEOBJPROP REVERSE DSPSCALE DSPXPOSITION DSPYPOSITION ODDP FLENGTH +IMAX FIXR FTIMES IMAGESTREAMTYPE IPLUS LRSH PLUS) CLISPATOM2A (CONS FIXSPELL DWIMIFY1) +PFI.COMPUTE.INDEX.SHAPE (NCHARS LENGTH + RPLACA CONCATLIST MAPCONC LIST MAX MIN IQUOTIENT LINELENGTH +CL:CEILING) GCD (GCD MINUS IREMAINDER) \TEDIT.SUBST.FN1 (\TEDIT.SUBST.FN2) \OPENLEAFCONNECTION ( +GETHOSTINFO BESTPUPADDRESS CONS \INTERNAL/GETPASSWORD WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION NCREATE \CREATECELL CREATE.MONITORLOCK CONCAT PACK* LIST ALLOCATE.PUP + +LOGOR \FIXPASSWORD TIMES IQUOTIENT) SOME (APPLY*) CL::%%MAKE-RANDOM-ARRAY (CL:MAKE-ARRAY CLOCK IDATE +CL:MAPCAR CL:FUNCTION) IEQP (IDIFFERENCE) SETQQ (SET) CL::%%NOT-INTEGER-ERROR (CL:ERROR) +\BITMAPSIZE.IP (SELECTQ TIMES BITMAPWIDTH CONSTANT FQUOTIENT BITMAPHEIGHT CONS \ILLEGAL.ARG) +XCL::ADJUST-IMPLICIT-KEY-HASH (UNINTERRUPTABLY XCL::IK-HASH-BASE XCL::IK-HASH-LAST-INDEX +XCL::IK-HASH-NUM-SLOTS XCL::IK-HASH-NUM-KEYS XCL::IK-HASH-NULL-SLOTS XCL::IK-HASH-KEY-ACCESSOR) +\BIGNUM.INTEGERLENGTH (\BN.INTEGERLENGTH \BN.FROM.FIXP) CLISPATOM1B (CONS LIST GETHASH) STRMEMB ( +SUBSTRING NTHCHARCODE ADD1) \RTP.SHOW.FAILURE (PRIN1 ETHERHOSTNAME) SPYOBJ.SAVE (PRIN2) +SET-PACKAGE-INTERACTIVELY (MENU SORT CL:LIST-ALL-PACKAGES CL:PACKAGE-NAME LIST WHO-LINE-COPY-INSERT +CONCAT CL:IN-PACKAGE) SUBSET (CONS FRPLACD APPLY*) \TFBRAVO.PARSE.PROFILE.PARA (GETFILEPTR U-CASE +RATOMS CHARACTER \TFBRAVO.PARSE.PROFILE.VALUE \TFBRAVO.HANDLE.HEADING IQUOTIENT IDIFFERENCE CONSTANT +TIMES ITIMES TEXTPROP SUB1) ANALYZE-REST (CL:LENGTH CL:FIRST CL:SECOND CL:THIRD GENSYM) SUB1VAR (SET +SUB1 EVAL) CL::STEP-FORM (+ CL:VALUES-LIST) CL::STEP-EVAL (CL:VALUES-LIST) FW-CREATE-OFD-WINDOWS ( +FW-CREATEW WINDOWPROP FUNCTION FW-ADJUST-PLACEMENT) SPY.PRINT (LIST CONCAT) COMPILEMODE (ASSOC ERROR +EVAL SET) CHARLOOKS.FROM.FONT (FONTP FONTPROP) TOPW.RESHAPEFN (TOPW.REPAINTFN DSPCLIPPINGREGION) +SEDIT::FIND-OBJ (SEDIT::CLOSE-OPEN-NODE SEDIT::CLOSE-NODE SEDIT::FIND-SELECTION-BACKWARDS +SEDIT::FIND-SELECTION SEDIT::SEARCH-OBJ-BACKWARDS SEDIT::SEARCH-OBJ) \HDCPYBLTCHAR (\CHAR8CODE LOGAND +\CHARSET LRSH \SLOWHDCPYBLTCHAR IPLUS \FGETWIDTH \GETBASE IMAX ADD1 IQUOTIENT CONSTANT +\DSPGETCHARWIDTH DSPDESTINATION \TOTOPWDS IDIFFERENCE \DSPGETCHAROFFSET) INTERLISP-FORMAT-P (SELCHARQ +PEEKCCODE) TTSKIPSEPR (FMEMB FIRSTCHAR TTNEXTCHAR) \10MBRAWTRANSMIT (IMAX \10MB.GETPACKETSTATUS) FLOAT + (\DTEST) CL::%%LOG2 (CL::%%FLOAT) \FM.EDIT-DELETE (\FM.ITEMPROP FFETCHFIELD LISTGET IPLUS FONTPROP +LASTMOUSEX LASTMOUSEY LOGAND ILESSP \FM.EDIT-GETPOINTERINFO IDIFFERENCE MINUS \FM.EDIT-STRDELETE SUB1 +STRINGWIDTH) CHAT.SCREENPARAMS (IMIN IQUOTIENT WINDOWPROP IABS IMINUS DSPLINEFEED LINELENGTH CONCAT +SUBSTRING SUB1 STRPOS NTHCHAR) MERGEINSERT (/NCONC1 STRPOS MERGEINSERT1 SOME /ATTACH) +COMPILER::COPY-NODE-LITERAL (COMPILER::MAKE-LITERAL COMPILER::LITERAL-VALUE) COMP.CPI (COMP.PICOUNT +FASSOC) \TTW1 (DSPDESTINATION \GETBASE \TOTOPWDS INTERSECTREGIONS TRANSLATEREG OPENW) CL::%%/ (\CALLME + IREMAINDER IQUOTIENT) PUSH-KEYWORD-BINDING (CHECK-PARAMETER-NAME) NLSETQ (ERRORSET CONS) +CL::STEP-COMMAND (CL:EVAL CL:EVALHOOK LIST) REMAINDER (IREMAINDER FREMAINDER) ARCSIN (FLOATP FLOAT +FDIFFERENCE SQRT FTIMES FPLUS) ENCAPSULATE.ETHERPACKET (APPLY* \DTEST) SHOWBITMAP1.IP (ITIMES +BITMAPCREATE CEIL LOGAND IPLUS CONSTANT SUB1 LOGXOR \ADDBASE IDIFFERENCE IMOD EQL - FOLDHI LRSH PLUS) +FREMAINDER (FDIFFERENCE FTIMES FLOAT FIX FQUOTIENT) SET-TTY-PACKAGE-INTERACTIVELY (PROCESS.EVAL +TTY.PROCESS) CLISPATOM2 (GETPROP GETP LIST CLISPATOM2C DWIMIFY2? LDIFF LISTGET1 MAPCONC CONS +CLISPANGLEBRACKETS APPLY* NLEFT CLISPCAR/CDR CLISPATOM2D SELECTQ CLISPRECORD CLISPLOOKUP APPEND +DWIMERRORRETURN PRINT MINUS NEGATE) *WHO-LINE-VALUE-FONT* (FONTCREATE) LESSP (IGREATERP FGREATERP) +\SIN-FLOAT (- + CL:REM FTIMES / POLYEVAL \FLOATBOX OPCODES) \TEDIT.FIND.WC (\TEDIT.FIND.WC1 LIST IMAX +\TEDIT.SUBST.FN1 ADD1 \TEDIT.FIND.WC) WALK-TEMPLATE (DECLARE) COPY.SEGMENT (LIST) +\FTP.FIX.BROKEN.INPUT (GETFILEPTR PRIN1 \FTP.OPENFILE.FROM.PLIST FILENAMEFIELD \FTP.ADD.USERINFO LIST +BSPOUTPUTSTREAM) MINUS (FDIFFERENCE DIFFERENCE) CL::%%EXPT-FLOAT-INTEGER (FQUOTIENT +CL::%%EXPT-FLOAT-INTEGER - FLOAT) ARCCOS (FLOATP FLOAT FDIFFERENCE ARCSIN) CHAT.LOGIN (GETOSTYPE +GETHOSTINFO WINDOWPROP CHAT.LOGINFO \INTERNAL/GETPASSWORD ASSOC PRIN1 SELECTQ FORCEOUTPUT PRIN3 +\DECRYPT.PWD DISMISS) XNLSETQ (ERRORSET) WINDOWADDPROP (WINDOWPROP LIST CONS REMOVE NCONC1 APPEND) +FMINUS (FDIFFERENCE) COMPILER::COPY-NODE-LAMBDA (COMPILER::MAKE-LAMBDA COMPILER::LAMBDA-NAME +COMPILER::LAMBDA-ARG-TYPE COMPILER::LAMBDA-NO-SPREAD-NAME COMPILER::LAMBDA-ALLOW-OTHER-KEYS +COMPILER::LAMBDA-REQUIRED MAPCAR COMPILER::COPY-VARIABLE COMPILER::LAMBDA-OPTIONAL LIST CL:FIRST +COMPILER::COPY-NODES CL:SECOND CL:THIRD COMPILER::LAMBDA-REST COMPILER::LAMBDA-KEYWORD CL:FOURTH +COMPILER::LAMBDA-BODY) ERSETQ (ERRORSET CONS) RESETLST (RESETLST \EVPROGN) \ATMIN (\SMALLPIN SUB1 LLSH + IDIFFERENCE PACK CHARACTER \BIN LIST PLUS) CL:CODE-CHAR (\HILOC) WALK-FORM-INTERNAL ( +CL:MULTIPLE-VALUE-SETQ CL:FUNCALL WALK-FORM-INTERNAL XCL::GET-WALKER-TEMPLATE WALK-TEMPLATE +CL:MACROEXPAND-1 CL:ERROR) FNTH (CONS SUB1) SEDIT::FIND-NODE-SUBSTRUCTURE-BACKWARDS (CL:FIRST) +\SLOWHDCPYBLTCHAR (\CHAR8CODE LOGAND IPLUS \DSPGETCHARWIDTH \GETBASE \DSPTRANSFORMX IMAX IMIN +IDIFFERENCE \DSPGETCHAROFFSET LLSH DSPDESTINATION \TOTOPWDS \GETCHARSETINFO \GETBASEPTR UNFOLD +\CHARSET LRSH \CREATECHARSET ADD1) CL:CHAR-NAME (CL:CHAR-CODE LRSH LOGAND CONCAT CL:CODE-CHAR LOGOR - +OCTALSTRING) IDATE (DAYTIME MKSTRING \IDATESCANTOKEN NTHCHARCODE PLUS \IDATE-PARSE-MONTH SELECTQ +IREMAINDER IQUOTIENT FIXP ADD1 + ILEQ LOGAND - SUBSTRING SUB1 \PACKDATE) RESETSAVE (CONS GETTOPVAL +\EVAL LIST) DASSEM.ASMAJ (GETP OPT.JSIZE SELECTQ COMPILER.ERROR LIST IPLUS CONS PLUS LOGAND RSH LRSH) +SEDIT::FIND-NODE-SUBSTRUCTURE (CL:FIRST) CL:CHAR-CODE (\LOLOC \DTEST) RESETFORM (LIST \EVAL +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \EVPROGN) SEDIT:RESET (ERROR) \TEDIT.FONTCOPY ( +NLSETQ FONTCOPY FONTPROP CONCAT LISTGET) CL::%%EXPT-INTEGER (/ CL::%%EXPT-INTEGER - CL:ASH CL:ERROR) +\FM.EDIT-BACKUP (SUB1 CHARWIDTH NTHCHARCODE \FM.ITEMPROP FFETCHFIELD MINUS DSPXPOSITION +DSPCLIPPINGREGION \FM.EDIT-SCROLLAMOUNT IQUOTIENT WINDOWPROP IDIFFERENCE IPLUS FONTPROP +\FM.EDIT-STRDELETE \FM.EDIT-UPDATEAFTERDELETE) \FTP.RECOGNIZEFILE (RESETLST \FTP.UNPACKFILENAME ASSOC +CONS SELECTQ GETHOSTINFO LIST \GETFTPCONNECTION MARK# FTPPUTMARK FTPGETMARK FTPGETCODE .FTPDEBUGLOG. +\FTP.PACK.DIRECTORYNAMEP READPLIST MKATOM + \FTP.PACKFILENAME) COMPILER::COPY-NODE-LABELS ( +COMPILER::MAKE-LABELS COMPILER::LABELS-FUNS MAPCAR COMPILER::COPY-VARIABLE CONS COMPILER::COPY-NODE-LAMBDA + LIST COMPILER::LABELS-BODY COMPILER::COPY-NODES) TEDIT.COPY.PARALOOKS (TEXTOBJ) COMP.ANONP (FMEMB GET +) RESETVARS (MAPCAR CONS GETTOPVAL CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SETTOPVAL +\EVPROG1 APPLY) RAND (LOGAND IDIFFERENCE IREMAINDER FTIMES FQUOTIENT CONSTANT FLOAT ADD1 IGREATERP +IPLUS IMOD \MAKENUMBER FPLUS FDIFFERENCE) DASSEM.DSTOREFN (CONS ADD1 COMPILER::ENV-TARGET-ARCHITECTURE + AST) \BSP.HANDLE.INPUT (PUPSOCKETEVENT GETPUP LIST) INITUFNTABLE (PLUS IDIFFERENCE IPLUS SELECTQ +SHOULDNT) IMOD (IREMAINDER IPLUS) RANDSET (CLOCK IDATE LENGTH FIXP MAPCAR IPLUS LOGAND LOGXOR ITIMES +LAST CONS FNTH LIST PLUS) COMP.NOSIDEEFFECTP (COMP.CLEANEXPP) \INTERNALTOTOPW (\INSUREWINDOW +\INTERNALTOTOPW) EXPT (FEXPT TIMES RSH FLOAT FQUOTIENT IMINUS LRSH) CHECK-PARAMETER-NAME (CL:CERROR) +\FM.EDIT-WORDDELETE (SUB1 \FM.ITEMPROP FFETCHFIELD NTHCHARCODE IPLUS STRINGWIDTH SUBSTRING MINUS +FONTPROP \FM.EDIT-STRDELETE DSPXPOSITION DSPCLIPPINGREGION \FM.EDIT-SCROLLAMOUNT IQUOTIENT WINDOWPROP +\FM.EDIT-UPDATEAFTERDELETE) CL:CHAR-INT (CL:CHAR-CODE) CURRENT-TTY-PACKAGE (PROCESS.EVALV TTY.PROCESS +ASSOC PUTASSOC CONCAT CL:PACKAGE-NICKNAMES CL:PACKAGE-NAME) CHARACTER.PRINT (CL:CHAR-NAME IPLUS + +CL:LENGTH FRESHLINE CL:CHAR-CODE) \FTP.OPEN.CONNECTION (BESTPUPADDRESS OPENBSPSTREAM CONS FUNCTION +BSPOUTPUTSTREAM \CANONICAL.HOSTNAME ETHERHOSTNAME CLOSEBSPSTREAM) \D0.STARTIO (OPCODES) +\10MBRAWRECEIVE (\10MB.GETPACKETSTATUS \10MB.GETPACKETLENGTH) PutUnboxed (\PUTFIXP) +\HCPYMODEDISPLAYINIT (FUNCTION) RESETVAR (LIST CONS GETTOPVAL CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. + FUNCTION \EVAL) \PUTFIXP (NTYPX \LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR +CL::RATIO-DENOMINATOR) CL:CHAR-BIT (CL:ERROR) \PUTSWAPPEDFIXP (NTYPX \LOLOC \FIXP.FROM.FLOATP +IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR) WORD.MATCHES.BUFFER (\SYNCODE GETHASH +\GETBASEBYTE FIRSTCHAR TTNEXTCHAR NTHCHARCODE PLUS LOGXOR) PRINT-READER-ENVIRONMENT (PRINT CONS) +SEDIT:SEDIT (LISTGET SEDIT::GET-CONTEXT WINDOWPROP SEDIT:SEDIT) \STRINGWIDTH.HCPYDISPLAYAUX (ADD1 +\GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE PLUS \CHARSET LRSH \GETCHARSETINFO \GETBASEPTR UNFOLD +LLSH \CREATECHARSET \FGETIMAGEWIDTH \CHAR8CODE LOGAND \FGETCHARIMAGEWIDTH \FGETWIDTH SUB1 IPLUS +FUNCTION) \BSP.DEFAULT.ERROR.HANDLER (ERROR CONCAT) CL:INT-CHAR (CL:CODE-CHAR) CL:GRAPHIC-CHAR-P ( +CL:CHAR-CODE LRSH LOGAND CONSTANT) CL:MOD (FLOAT - CL:* UFIX FQUOTIENT + CL:REM) POWEROFTWOP ( +SYSTEMTYPE LOGAND CONSTANT SUB1 EXPT POWEROFTWOP RSH .2^NP.) XCL::IMPLICIT-KEY-REHASH (CL:ERROR +XCL::CLEAR-IMPLICIT-KEY-HASH XCL::IK-HASH-NUM-SLOTS XCL::IK-HASH-BASE CL:1+ XCL::IK-HASH-LAST-INDEX +\ADDBASE XCL::IK-HASH-KEY-ACCESSOR) CL:NAME-CHAR (CHARCODE.DECODE STRING CL:CODE-CHAR) +*WHO-LINE-NAME-FONT* (FONTCREATE) CLISPATOM1A (GETPROP GETP ADD1 SUB1 LIST) GETSCREENPOSITION (WFROMDS + WINDOWOP SPREADAPPLY*) CLUNARYMINUS? (FIXSPELL1 CONS NCONC LIST RETDWIM2) CH.RETRIEVE.DOMAIN.ACL ( +CH.GETAUTHENTICATOR COURIER.CALL CH.FINDSERVER PARSE.NSNAME COURIER.FETCH) ERRORX (SETERRORN RESETLST +FIND-DEBUGGER-ENTRY-FRAME LIST) SETY.IP (FIXR DIFFERENCE <=) \INSERT.FIRST.PIECE (\CREATEPIECEORSTREAM + CHARLOOKS.FROM.FONT ALLOCSTRING) TEDIT.MAKESEL (IMAX IPLUS) \GS.INITBUF (IDIFFERENCE IPLUS SUB1 +NCHARS) RPLNODE (LIST RPLACD) CL:SET-CHAR-BIT (CL:ERROR) ODDP (LOGAND CL:MOD) EDITTOGGLELABEL ( +RESETFORM TTYDISPLAYSTREAM CLRPROMPT WINDOWPROP READ/NODE printout TERPRI) PASTEFROMCLIPBOARD ( +GETCLIPBOARD PROCESS.WINDOW TTY.PROCESS COPYINSERT GNCCODE) FMIN (FLOAT ARG NUMBERP LIST) LOAD? ( +FINDFILE LISPERROR ROOTFILENAME GETPROP FILENAMEFIELD FILEDATE LOAD) TEDIT.SELECT ( +TEDIT.SELECT.LINE.SCANNER \TEDIT.LINE.LIST FIXR FQUOTIENT IDIFFERENCE IMAX ADD1 IMIN) +COMPILER::ENV-PROCLAIMED-SPECIAL-P (CL:MEMBER COMPILER::ENV-DECLARED-SPECIALS COMPILER::FIND-TOP-ENVIRONMENT +) SCALE/TONODES (MAPCAR APPEND LISTGET FIX/SCALE) PRINT-LOADED-FILE-INFORMATION (NAMEFIELD GETPROP +TERPRI) LOADCOMP? (FINDFILE GETPROP NAMEFIELD) FILESLOAD (DOFILESLOAD NLAMBDA.ARGS) HVFWDCDREAD (ADD1 +CONS READ) TEDIT.SUBPARALOOKS (\TEDIT.PARSE.PARALOOKS.LIST TEXTOBJ \CHTOPC MAPLIST ZEROP +\TEDIT.UNIQUIFY.PARALOOKS + PLUS) \TEDIT.FINDAGAIN (\TEDIT.FIND) LOADCOMP (RESETLST FINDFILE LIST +FUNCTION NAMEFIELD GETPROP LOADFNS) CLISPRECORD (GETLOCALDEC LIST SHOULDNT RECORDTRAN NCONC FRPLACA +RECLISPLOOKUP CONS CONSFN) \INSPECTW.REDISPLAYPROP (WITH-INSPECTOR-ENV WINDOWPROP XCL::PROFILIZE +CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES ITEMOFPROPERTYVALUE INSPECTW.FETCH DSPTEXTURE +PRINTATBOX) FLESSP (FGREATERP) \COURIER.ATTENTIONFN (GETSPPCON FFETCHFIELD OVERWRITEABLE LOGAND \EOFP +SPREADAPPLY* FUNCTION PRIN1) NLAMBDA.ARGS (LIST CONS NLAMBDA.ARGS) \CIRCSHADE.XSCAN.IP (IDIFFERENCE +ITIMES IPLUS ADD1 SUB1) CL::ASSIGN-STRUCTURE-REPRESENTATION (CL::PS-LOCAL-SLOTS) SPY.OVERFLOW (PLUS) +\3MBRAWTRANSMIT (\DTEST UNINTERRUPTABLY \GETPACKETBUFFER ADD1) GENSYM? (NTHCHARCODE NTHCHAR) +ADD.BORDER.TO.BITMAP (BITMAPCREATE IPLUS ITIMES) COMPILER::COPY-NODE-IF (COMPILER::MAKE-IF +COMPILER::COPY-NODES COMPILER::IF-PRED COMPILER::IF-THEN COMPILER::IF-ELSE) IMAX (ARG) \LFEntryPoint ( +ATOM STRINGP MACHINETYPE \PFGetLVPage \LFNormalizeVolumeName \LFFindDirectoryVol) RPAQQ (SAVESET) +LISPINTERRUPTS.PASTE (APPEND LIST LISPINTERRUPTS.ORIG) CL:ALPHANUMERICP (CL:ALPHA-CHAR-P) TB.MAP.ITEMS + (\DTEST MAPC CL:FUNCALL) SETATOMVAL (SETTOPVAL) COMPILER::ENV-PROCLAIM-SPECIAL ( +COMPILER::ENV-DECLARED-SPECIALS COMPILER::FIND-TOP-ENVIRONMENT) IMIN (ARG) SI::ADVICE-DELDEF (DECLARE +REMHASH) COMPLEX-COMPARE-BACKWARD (-) GETBOXSCREENPOSITION (WINDOWOP SPREADAPPLY*) VALUEOF (VALUOF +EDITFINDP) CL:BOTH-CASE-P (CL:UPPER-CASE-P CL:LOWER-CASE-P) SEDIT::REPLACE-STRING (IDIFFERENCE NCHARS +ADD1 SEDIT::REPLACE-CHARS) CLBINARYMINUS? (CONS NCONC LIST RETDWIM2 /RPLNODE MINUS) ROT (IMOD +IDIFFERENCE DEPOSITBYTE LOGOR BITCLEAR LOGAND LOGNOT MASK.1'S LSH SUB1 LOADBYTE IMINUS) +SI::GET-DESCRIBERS (GET) BRKDWNRESULTS (RPLACA MAPCAR BRKDWNRESULTS1 LIST FLTFMT MAPC FNTH ASSOC +BRKDWNRESULTS2 ADD1VAR) CL:DIGIT-CHAR-P (CL:CHAR-CODE CONSTANT - +) READATABASE (RATOM READ FASSOC +MKLIST) RPAQ? (GETTOPVAL SETTOPVAL EVAL) LOADFROM (LOADFNS LAST) \GETBRUSH (\BRUSHBITMAP) SETYREL.IP ( +FREPLACEFIELD + FFETCHFIELD <=) MAX (ARG NUMBERP LIST) \3MBRAWRECEIVE (\READRAWPBI ADD1) ADJUSTLINE (- + IMIN TIMES IMAX + LRSH OVERFLOWLINE? FIND.LINE.BREAK NTH.RELATIVE.COLUMN.OF NTH.COLUMN.OF SUB1 +SEGMENT.BIT.LENGTH NLEFT INSERT.NODE PLUS TTBITWIDTH SUB1VAR FRPLACA INSERTLINE) RPAQ (SAVESET EVAL) +\UPDATE.PBT.RASTERWIDTHS (\MAPMDS FUNCTION) COMPILER::COPY-NODE-GO (CL:GETHASH COMPILER::GO-TAGBODY +COMPILER::MAKE-GO COMPILER::GO-TAG) MIN (ARG NUMBERP LIST) COMP.CLEANFNOP (APPLY*) \MACOUTCHARFN ( +\PRINTCCODE \RECODECCODE) PRINT-LISP-INFORMATION (PRINTOUT LIST OUTPUT CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION CL:LISP-IMPLEMENTATION-TYPE CL:LISP-IMPLEMENTATION-VERSION CL:MACHINE-TYPE +CL:MACHINE-VERSION CL:MACHINE-INSTANCE CL:SOFTWARE-TYPE CL:SOFTWARE-VERSION +PRINT-LOADED-FILE-INFORMATION) \NSFILING.HANDLE.ERROR (PRIN1 WITHOUT.SESSION.MONITOR CL:ERROR) +FILL/GRAPHNODE/LABEL (WINDOWP DISPLAYSTREAMP IPLUS IDIFFERENCE) \PUTBASEFLOATP (\FLOATBOX \.PUTBASE32 +\PUTBASEPTR \FLOATUNBOX) FB.UNDELETEALLCOMMAND (FUNCTION FB.UPDATE.COUNTERS) OCTALSTRING ( +GLOBALRESOURCE CONCAT \CONVERTNUMBER GETRESOURCE NEWRESOURCE ALLOCSTRING) READ-FILECREATED (GETFILEPTR +) BREAKDOWN (NLAMBDA.ARGS SUBSET GETD ADD1 MAPC BREAK0 PRINT NCONC1 CONS BRKDWNSETUP BRKDWNARRAY ARRAY + NCREATE PLUS BRKDWNCLEAR MAPCAR CAR) FORMAT-EXP-AUX (CL:PRIN1) \GETBASEFLOATP (\FLOATBOX \.GETBASE32) + INSPECTW.REPLACE (WINDOWPROP LIST KWOTE \INSPECTW.REDISPLAYPROP) DMPHASH (MAPC ERSETQ EVALV LIST +HARRAYSIZE KWOTE HARRAYPROP) MAKE-NETWORK-TRACE-WINDOW (EVALV WINDOWPROP WFROMDS CREATEW CONS FUNCTION + FONTCREATE SET) FTIMES (FLOAT ARG ADD1 FTIMES) CL:ALPHA-CHAR-P (CL:CHAR-CODE <= CONSTANT) FEXPT ( +ANTILOG FTIMES FLOATP FLOAT LOG) REPLACESTKARG (REPLACESTKARG NTH STACKP SETSTKARG FRAMESCAN) +CHECKIMPORTS (FINDFILE GETPROP ROOTFILENAME GETFILEINFO LIST ASKUSER MAPCAR CAR MAPC IMPORTFILE) FPLUS + (FLOAT ARG ADD1 FPLUS) \DECODEPRESSFACEBYTE (IDIFFERENCE LIST) MOVD (UNINTERRUPTABLY COPY VIRGINFN +GETD) CL::DUMMY-SLOT (CL::PARSE-SLOT) FQUOTIENT (OPCODES) SEDIT::REPLACE-CHARS (IDIFFERENCE NCHARS +ADD1 IPLUS SEDIT::STRINGWIDTH MKSTRING SUBSTRING SEDIT::CLOSE-NODE SEDIT::DELETE-NODES) +DIRECTORY.MATCH1 (\DTEST NCHARS PLUS NTHCHARCODE \GETBASEBYTE) \CIRCSHADE.DISPLAY (FILL.INITTBLE +IDIFFERENCE ITIMES IPLUS ADD1 SUB1) DINFO.SPECIAL.UPDATE (FASSOC SELECTQ THIS.PROCESS CONCAT +DINFO.UPDATE printout PRIN1 GETPROMPTWINDOW PROMPTPRINT) CL:STRING-CHAR-P (\DTEST) MSTRYSPELL (FASSOC +CONS LIST) COMPILER::COPY-NODE-CATCH (COMPILER::MAKE-CATCH COMPILER::COPY-NODES COMPILER::CATCH-TAG +COMPILER::CATCH-STMT) FDIFFERENCE (OPCODES) COMP.CLEANFNP (APPLY* SELECTQ EVERY COMP.CLEANEXPP) +WRITE-STRING* (CL:LENGTH - \GETSTREAM) MOVD? (COPY VIRGINFN GETD) MSERASE (MAPC MSSTOREDATA) +\TELERAIDEXIT (\KEYBOARDON) FGREATERP (OPCODES) SETXY.IP (<=) TEDIT.INCLUDE (TEXTOBJ +\TEDIT.MAKEFILENAME TEDIT.GETINPUT STREAMP OPENSTREAM GETFILEINFO OPENTEXTSTREAM LIST +\TEDIT.GET.INSERT.CHARLOOKS \CHTOPC \SPLITPIECE \GETBASEPTR \FIRSTNODE IPLUS) CHNGNM (FNCHECK GETD +GETP PACK LIST /DREMOVE CONS RESETVARS .RESETLST. CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +CHANGENAME1 APPEND GENSYM SAVED) CL:CHARACTERP (TYPENAMEP) \PS.SCALEHACK (/ LIST FRPLACA FIXR CL:* +FFETCHFIELD) FABS (\FLOATBOX OPCODES) \DelShade (CONS \DelShade) HPRINTSP (PRIN1) NCONC1 (NCONC +FRPLACD CONS) TEDIT.EXTRACTTOCLIPBOARD (TEXTSTREAM TTY.PROCESS TEDIT.SEL.AS.STRING TEDIT.DELETE +TEDIT.GETSEL) \BOXFPLUSDIF (LISPERROR NTYPX ADD1 IDIFFERENCE IGEQ LOLOC \LOLOC FLOAT IPLUS LLSH LRSH +LOGAND PLUS SUB1 \INFINITY .LRSHSTICKY. LOGOR IMINUS .ADDSMALL2. .ADDSMALL3. .SUBSMALL. \MAKEFLOAT) +DMATCH (SELECTQ DMATCH DIRECTORY.MATCH) \GETSPP (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. + FUNCTION SETUPTIMER \QUEUEHEAD FFETCHFIELD ILESSP \LOLOC IDIFFERENCE FREPLACEFIELD SEQ.ADD1 \ADDBASE +\SPP.SYSPKT) HRULE.CREATE (IMAGEOBJCREATE NUMBERP CONCAT) COMPILER::ENV-INLINE-DISALLOWED ( +COMPILER::ENV-DISALLOWED-INLINES COMPILER::ENV-ALLOWED-INLINES COMPILER::ENV-PARENT +COMPILER::ENV-INLINE-DISALLOWED XCL::GLOBALLY-NOTINLINE-P) \BOXFTIMES2 (LISPERROR NTYPX ADD1 +IDIFFERENCE IGEQ LOLOC \LOLOC FLOAT IPLUS LLSH LRSH LOGAND PLUS SUB1 \INFINITY .ADDSMALL2. .ADDSMALL3. + \MAKEFLOAT LOGXOR) SI::ADVICE-PUTDEF (MAPCAR LIST SI::CANONICALIZE-ADVICE-WHEN-SPEC +SI::CANONICALIZE-ADVICE-WHERE-SPEC CL:COPY-TREE CL:GETHASH CONS SI::MAKE-ADVICE SI::ADVICE-BEFORE +CL:MAPCAR CL:FUNCTION SI::ADVICE-AFTER SI::ADVICE-AROUND XCL:READVISE-FUNCTION CL:FIRST CL:THIRD) +HPERR (PRIN2) DUMPDATABASE1 (PRIN2 SPACES) PROPNAMES (MAPLIST GETPROPLIST CAR CDDR) \CIRCSHADE.IP ( +IDIFFERENCE ITIMES IPLUS ADD1 SUB1) CL::OFFSET-SLOT (CL::PARSE-SLOT) \BOXFQUOTIENT (LISPERROR NTYPX +ADD1 IDIFFERENCE IGEQ LOLOC \LOLOC FLOAT IPLUS LLSH LRSH LOGAND PLUS SUB1 \INFINITY .SUBSMALL. .LLSH1. + LOGOR \MAKEFLOAT LOGXOR ERROR) \TELEBLTCURSOR (\DoveDisplay.SetCursorShape) CL:UPPER-CASE-P (<= +CONSTANT CL:CHAR-CODE) FMAX (FLOAT ARG NUMBERP LIST) SEDIT::COPY-SELECTION (printout PRIN1 +SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW) \TEDIT.FIND (TEXTOBJ MKLIST TEDIT.FIND MKSTRING ADD1 +IDIFFERENCE \TEDIT.GET.INSERT.CHARLOOKS) \LFPurgeDirectory (\PFFindDirectoryID \PFVolumeNumber +\PFFindFileSize) COMPILER::COPY-NODE-CALL (COMPILER::MAKE-CALL COMPILER::COPY-NODES COMPILER::CALL-FN +COMPILER::COPY-NODE-LIST COMPILER::CALL-ARGS) COMP.CLEANEXPP (EVERY COMP.CLEANEXPP) CL:LOWER-CASE-P ( +<= CONSTANT CL:CHAR-CODE) CCCSCAN (UNFOLD LLSH \INDEXATOMVAL \VAG2 LRSH LOGAND CODEBASEGETNAME CONS +PLUS CONSTANT BYTESPERNAMEENTRY WORDSPERNAMEENTRY CODEBASELT \GETBASEBYTE LOGXOR \FINDOP +CODEBASEGETATOM IDIFFERENCE BYTESPERCODEATOM \INDEXATOMDEF \INDEXATOMPNAME CODEBASELT3 BIG-VMEM-CODE +LOGOR ADD1 IPLUS) \CENTICLOCK (LOCF \ADDBASE IQUOTIENT ITIMES) CHANGENAME (GETD) RPTPUT (FRPTQ PRIN1 +HPRINTSP CONSTANT CHARACTER SPACES) SEDIT::PARSE--STRING (SEDIT::BUILD-PRELINEARIZED-NODE) +\LEAF.DEVICEP (NCHARS NTHCHAR PLUS \CANONICAL.HOSTNAME \GETDEVICEFROMNAME \OPENLEAFCONNECTION +\MAKE.PMAP.DEVICE FUNCTION GETHOSTINFO \FTP.OPEN.CONNECTION) ADDPROP (LIST GETPROPLIST CONS NCONC1) +COMPILER::EFFECTS-ANALYZE-VAR-REF (COMPILER::NODE-EFFECTS COMPILER::NODE-AFFECTED +COMPILER::EFFECTS-REPRESENTATION COMPILER::VAR-REF-VARIABLE) \ITEMW.CLEARSELECTION (WINDOWPROP) +\PRESSFAMILYCODELST (\BIN PLUS LLSH IPLUS LOGAND LRSH CONS \WIN PACKC LIST) \FLOAT (FLOATP SELECTC +NTYPX ADD1 IDIFFERENCE \MAKEFLOAT IPLUS \LOLOC \BIGNUM.TO.FLOAT FQUOTIENT CL::RATIO-NUMERATOR +CL::RATIO-DENOMINATOR CL:ERROR) \TEDIT.FIND.PROTECTED.START (\CHTOPC SUB1 IPLUS IDIFFERENCE) +RESET/NODE/LABELSHADE (INVERTED/SHADE/FOR/GRAPHER CONSTANT DSPCLIPPINGREGION) /REMPROP (LIST +GETPROPLIST) \LEAF.DELETEFILE (ALLOCATE.PUP \LEAF.GETFILE LLSH \SENDLEAF) \BIGNUM.TO.FLOAT (\BN.FLOAT +\BN.FROM.FIXP) ONEDINSPECT.VALUEWIDTH (STRINGWIDTH APPLY*) \LEAF.GETFILE (\PARSE.REMOTE.FILENAME +\LEAF.RECONNECT WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SELECTQ +\INTERNAL/GETPASSWORD ALLOCATE.PUP + LISPERROR \SENDLEAF SELECTC \LEAF.READFILENAME \FIXPASSWORD +\LEAF.DIRECTORYNAMEONLY CONS \LEAF.ERROR) TEDIT.EXTEND.SEL (TEDIT.SELECT SELECTQ IABS IMINUS +IDIFFERENCE IMAX IPLUS SHOULDNT COPY \TEDIT.FIND.PROTECTED.START SUB1 IMIN ADD1 +\TEDIT.FIND.PROTECTED.END) COMPILER::ENV-INLINE-ALLOWED (COMPILER::ENV-ALLOWED-INLINES +COMPILER::ENV-DISALLOWED-INLINES COMPILER::ENV-PARENT COMPILER::ENV-INLINE-ALLOWED) \MAKEFLOAT (FLOATP + IDIFFERENCE LOGAND LLSH PLUS SUB1 LISPERROR \MAKEFLOAT IPLUS .LRSHSTICKY. LOGOR LRSH ADD1 \INFINITY) +SI::ADVICE-GETDEF (CL:GETHASH CL:APPEND MAPCAR SI::ADVICE-BEFORE CONS CL:COPY-TREE SI::ADVICE-AFTER +SI::ADVICE-AROUND) CL:FIND-PACKAGE (DECLARE GETHASH MKSTRING) STOPSCAN? (GETP ZEROP) SETXYREL.IP ( +FREPLACEFIELD + FFETCHFIELD <=) \CANONICALIZE.PUP.HOSTNAME (ETHERPORT MKATOM U-CASE ETHERHOSTNAME CONS + FIXSPELL) CIRCSHADE.BLT (\CIRCSHADE.BLT ERROR) %%MAP-FOR-EFFECT (%%MAP-FOR-EFFECT-SINGLE +%%MAP-FOR-EFFECT-MULTIPLE CONS) \ItemNumber (PLUS) SEDIT::SELECT-SEGMENT (CL:FUNCALL) FIXSPELL ( +SETUPTIMER CHCON U-CASE LIST FASSOC LISTGET1 UNPACK RESETVARS .RESETLST. CONS CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION ELT APPLY* GENERATE MKATOM ADD1 CHOOZ FIXSPELL1 CHOOZ1 NCHARS) BLTVLINE ( +BLTSHADE IMIN IABS IMINUS IDIFFERENCE) MSCOMMAND (CONS MSCANT MSEAT GETP MSSEEKPHRASE LIST) +\LOAD-STREAM (FULLNAME FILEPKGCHANGES FMEMB LIST SKIPSEPRCODES GET ROOTFILENAME CONS NCONC1 \CML-LOAD) + \LFDirectoryP (\LFGetDirectory \PFFindDirectoryID \LFOpenOldFile \PFVolumeNumber PACKFILENAME +\LFPutDirectory) %%MAP-SINGLE-FOR-EFFECT (%%MAP-FOR-EFFECT-SINGLE) FILEWATCHPROP (ARG LISTGET ERROR) +BLTHLINE (BLTSHADE IMIN IABS IMINUS IDIFFERENCE) CLISPATOM0 (DWIMUNDOCATCH LISTGET1 LIST RESETVARS +.RESETLST. CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION CL:CATCH XNLSETQ CLISPATOM1 DUNPACK +FIX89 LENGTH CLISPATOM0) %%MAP-FOR-RESULT-MULTIPLE (CL:MAKE-LIST CL:LENGTH MAKE-SEQUENCE-OF-TYPE) +SETX.IP (DIFFERENCE <=) \VFMPutNext (\BLT MESASIZE \ADDBASE IPLUS \VFMGetInterval \VFMMarkBufferDirty) + TEDIT.COPYTOCLIPBOARD (TEXTSTREAM TTY.PROCESS PUTCLIPBOARD TEDIT.SEL.AS.STRING) +%%MAP-FOR-EFFECT-MULTIPLE (CL:MAKE-LIST CL:LENGTH) \CANONICAL.HOSTNAME (MKATOM FASSOC +\CANONICALIZE.PUP.HOSTNAME) %%MAP-FOR-RESULT-SINGLE (CL:LENGTH MAKE-SEQUENCE-OF-TYPE) FW-LOOP ( +FW-OPENP APPEND) UNSET (FMEMB GETPROPLIST MISSPELLED? ERROR) \CIRCSHADE.BLT (DSPOPERATION IDIFFERENCE +ITIMES IPLUS ADD1 SUB1) CL::NAME-SLOT (CL::PARSE-SLOT) %%MAP-TO-LIST (%%MAP-FOR-RESULT-SINGLE +%%MAP-FOR-RESULT-MULTIPLE CONS) \TELERAIDENTRY (SELECTQ FUNCTION) TTNLEFT (TTNEXTCHAR) +FB.UNDELETECOMMAND (FUNCTION FB.UPDATE.COUNTERS) \TEDIT.WORD.BOUND (\SYNCODE GETHASH \GETBASEBYTE) +\INFINITY (FLOATP SUB1) MSTRYPARSE (BLKAPPLY) SETCORNER (CURSOR) \BRUSHBITMAP (FASSOC \ILLEGAL.ARG +BITMAPCREATE ELT FIXP FIXR APPLY* CONS) %%MAP-SINGLE-TO-LIST (%%MAP-FOR-RESULT-SINGLE) DUMPDATABASE ( +RESETLST PRETTYDEF UPDATEFN FUNCTION DUMPDATABASE1 GETTABLE) LOAD (RESETLST FMEMB FIXSPELL ERROR +CL:FIND-PACKAGE \DTEST LIST OPENSTREAM \LOAD-STREAM) %%MAP-SINGLE-TO-SIMPLE (%%MAP-FOR-RESULT-SINGLE) +INSPECTW.PROPERTIES (WINDOWPROP APPLY*) \TEDIT.FORMAT.FOOTNOTE (DSPSCALE FRPLACA PLUS FFETCHFIELD ADD1 + LIST DREMOVE) HASDEF (GETFILEPKGTYPE HASDEF SELECTQ GETDEF CL:FIND-SYMBOL CONCAT GETTOPVAL GETPROP +GETD WHEREIS) %%EVERY-MULTIPLE (CL:MAKE-LIST CL:LENGTH) \TFBRAVO.GETPARAMS (FRPLACA \TFBRAVO.LCASER +\TFBRAVO.PARAMNAMEP CONS FMEMB) FIXEDITDATE (EDITDATE) \POSTSCRIPTTAB (TIMES IDIFFERENCE IREMAINDER) +%%NOTANY-MULTIPLE (CL:MAKE-LIST CL:LENGTH) SEDIT::GROW-SELECTION (CL:FUNCALL) +XCL::UNDOABLY-SETF-SYMBOL-FUNCTION (VIRGINFN /PUTD GETD) MAKEFLOATNUMBER (NCREATE) EDITTOGGLEBORDER ( +RESETFORM TTYDISPLAYSTREAM CLRPROMPT WINDOWPROP READ/NODE printout TERPRI) DELDEF (GETFILEPKGTYPE LIST + KWOTE /SETTOPVAL REMOVE GETTOPVAL FILEPKGCOM FILEPKGTYPE FASSOC /REMPROP) %%SOME-MULTIPLE (CL:MAKE-LIST + CL:LENGTH) COMPILER::ENV-DISALLOW-INLINES (COMPILER::ENV-ALLOWED-INLINES CL:SET-DIFFERENCE +COMPILER::ENV-DISALLOWED-INLINES CL:UNION) %%SOME-SINGLE (CL:LENGTH) SI::MAKE-AROUND-BODY (CL:REDUCE +CL:FUNCTION) IMODLESSP (ILESSP IMODDIFFERENCE IMOD IDIFFERENCE FOLDHI LRSH IPLUS) CCCSUBFN? (CONS +NCONC CCCSCAN) EQUALN (EQP STREQUAL SELECTQ EQUALN SUB1) FB.UNDELETE.FILE (TB.USERDATA PLUS +FFETCHFIELD FREPLACEFIELD IMINUS) \SLOWRETURN (\MYALINK OPCODES) TEDIT.COMPOUND.PAGEFORMAT (LIST) +%%MAP-TO-SIMPLE (%%MAP-FOR-RESULT-SINGLE %%MAP-FOR-RESULT-MULTIPLE CONS) FORMAT-FIXED-AUX (CL:PRINC) +\MATMULT441 (ITIMES FPLUS FTIMES \GETBASEFLOATP PLUS) UNSAFE.TO.MODIFY (PRIN1 ASKUSER READ) +MSSEEKPHRASE (CONS MSNEXTWORD MSSEEKPHRASE LIST MSTRYPARSE MSSEEKTYPE) SEDIT::PARSE--LITATOM ( +SEDIT::BUILD-PRELINEARIZED-NODE) DINFO.UPDATE.FMENU (FASSOC FM.GETITEM FM.CHANGELABEL) \MATMULT144 ( +FPLUS FTIMES \GETBASEFLOATP PLUS) COMPILER::COPY-NODE-BLOCK (COMPILER::MAKE-BLOCK COMPILER::BLOCK-NAME + CL:GETHASH COMPILER::BLOCK-STMT COMPILER::COPY-NODES) \MATMULT331 (ITIMES FPLUS FTIMES \GETBASEFLOATP + PLUS) \LFCreateDevice (\MAKE.PMAP.DEVICE FUNCTION) CL::INSERT-INCLUDED-SLOT (CL:FLET CL:MEMBER +CL:FUNCTION CL::PSLOT-NAME CL::PS-INCLUDE RPLACA) \MATMULT133 (FPLUS FTIMES \GETBASEFLOATP PLUS) +\TELERAIDSEND (FFETCHFIELD LOCF \ADDBASE IPLUS FOLDHI LRSH FLIPCURSOR) GET-ONED-DISPLAYW (CREATEW +CREATEREGION FUNCTION ONEDINSPECT.VALUEWIDTH) FILEMAP (PUTFILEMAP FULLNAME GETSTREAM) +COMPILER::ENV-ALLOW-INLINES (COMPILER::ENV-DISALLOWED-INLINES CL:SET-DIFFERENCE COMPILER::ENV-ALLOWED-INLINES + CL:UNION) \MATMULT444 (IPLUS FPLUS FTIMES \GETBASEFLOATP PLUS) COMPILER::PROCESS-IL-DECLARATIONS ( +DECLARE) PRINTPACKETDATA (GETSTREAM PACK* \GETBASE FOLDLO LRSH PRIN1 PLUS CEIL LOGAND IPLUS CONSTANT +SUB1 LOGXOR IDIFFERENCE \MAKENUMBER ADD1 \GETBASEBYTE TERPRI) TEDIT.HARDCOPY-COLUMN-END (DREMOVE COPY +LIST IMAX ADD1 FLAST REVERSE LDIFF MEMB APPEND CONCAT IDIFFERENCE IPLUS PLUS CL:VALUES CONS) NSLOGIN ( +\INTERNAL/GETPASSWORD) \MATMULT333 (IPLUS FPLUS FTIMES \GETBASEFLOATP PLUS) IMAGEOBJPROP (SELECTQ +\ILLEGAL.ARG ARG \IMAGEUSERPROP) HASH-LEFT-PAD-INITIAL-CONTENTS (- LENGTH APPEND CL:MAKE-LIST LAST +CL:ERROR) SI::A-OR-AN (CL:ELT) CL:SET-SYNTAX-FROM-CHAR (SETSYNTAX CL:CHAR-CODE GETSYNTAX) \AddShade ( +\ItemNumber CONS) CL:GET-DISPATCH-MACRO-CHARACTER (ASSOC) FNTYP1 (GETHASH FNTYP) MSSETREP (MSEAT +MSQUOTED LIST MSCANT EDITFPAT KWOTE MSWORD? MSNEXTWORD CONS) SEDIT::PARSE--BROKEN-ATOM ( +SEDIT::BUILD-PRELINEARIZED-NODE) \TEDIT.NEUTRALIZE.PARALOOKS.MENU (ADD1) FIND-MACRO-FUNCTION ( +CL-UNWRAP-MACRO IL-WRAP-MACRO) LCSKIP (PEEKCCODE READ BINSKIP GETPROP APPLY*) %%NOTEVERY-MULTIPLE ( +CL:MAKE-LIST CL:LENGTH) CL:GET-MACRO-CHARACTER (GETSYNTAX CL:CHAR-CODE CL:VALUES FIND-MACRO-FUNCTION) +COUNTDOWN (COUNTDOWN SUB1) RUNION (CONS) PUTFILEMAP (REMHASH GETHASH ROOTFILENAME +MAKE-READER-ENVIRONMENT PUTHASH) SHRIEKER (SHRIEKER LIST SELECTQ CONS) DO-DISPATCH-MACRO (ASSOC CL:ERROR + ILEQ READCCODE + TIMES - CL:CHAR-UPCASE CL:CODE-CHAR CL:FUNCALL) SETSPACE.IP (APPENDOP.IP) ADDSPELL ( +SELECTQ ADDSPELL1 ERROR) PRINTANDBOX (\OUTSTREAMARG \GETSTREAM DSPRIGHTMARGIN DSPLEFTMARGIN +DSPXPOSITION DSPYPOSITION IDIFFERENCE FONTPROP IPLUS IMAX DSPCLIPPINGREGION) FLOATP.TO.BCPL (FLOATP +FLOAT IPLUS LRSH LOGAND IMINUS) COMPILER::EFFECTS-ANALYZE-UNWIND-PROTECT (COMPILER::EFFECTS-ANALYZE-LAMBDA + COMPILER::UNWIND-PROTECT-STMT COMPILER::UNWIND-PROTECT-CLEANUP COMPILER::NODE-EFFECTS COMPILER::EFFECTS-UNION COMPILER::LAMBDA-APPLIED-EFFECTS COMPILER::NODE-AFFECTED COMPILER::LAMBDA-APPLIED-AFFECTED) -NEXTSIZEFONT (FONTPROP FONTNAMELIST) COMPILER::COPY-NODE-BLOCK (COMPILER::MAKE-BLOCK COMPILER::BLOCK-NAME - CL:GETHASH COMPILER::BLOCK-STMT COMPILER::COPY-NODES) SEDIT::CONVERT-COMMENT (SEDIT:GET-PROMPT-WINDOW - GETPROMPTWINDOW FFETCHFIELD SEDIT::SUBNODE NTH FREPLACEFIELD CONS SEDIT::FIND-COMMENT SEDIT::NEXT-NODE - SEDIT::COLLECT-UNDO-BLOCK PRIN1) \\CREATEDISPLAY (FUNCTION CONS FREPLACEFIELDVAL NCREATE) -%BROADCAST-STREAM-DEVICE-CHARSETFN (FFETCHFIELD ACCESS-CHARSET) %MAKE-INITIAL-STRING-STREAM-CONTENTS ( -CL:MAKE-ARRAY) CL:FIND-IF (CL:LENGTH COMPLEX-FIND-IF SIMPLE-FIND-IF) CL:FILE-WRITE-DATE (CL:PROBE-FILE -) SET (LISPERROR \\STKSCAN \\DTEST \\HILOC) CL:FFLOOR (CL::%INTEGER-COERCE-MACRO) LOADFNS-MAKELIST ( -LIST ERROR MAPCAR EDITFPAT) INSPECTW.GETHASH (GETHASH) SEDIT::HANDLE-COMPLETION (FFETCHFIELD) -CL:FIND-IF-NOT (CL:LENGTH COMPLEX-FIND-IF-NOT SIMPLE-FIND-IF-NOT) COMPILER::CONSTRUCT-LIST (CL:REVERSE - COMPILER::MAKE-CALL LIST) HASHBEFORECLOSE (ASSOC FULLNAME SETA DREMOVE) \\TEDIT.CREATE.LINECACHE ( -BITMAPCREATE FREPLACEFIELDVAL NCREATE LIST PLUS FREPLACEFIELD) \\CKPOSSOUT (IPLUS \\NSTRINGCHARS -FFETCHFIELD FRESHLINE SUB1 %ARRAY-OFFSET %ARRAY-BASE %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE -\\GETBASETHIN \\GETBASEBYTE) \\PROG0 (\\MYALINK OPCODES FFETCHFIELD ADDSTACKBASE \\VAG2 CEIL LOGAND -IPLUS IDIFFERENCE UNFOLD LLSH CONSTANT SUB1 LOGXOR \\PUTBASEPTR \\EVPROG1 PLUS FOLDLO LRSH -\\ATOMVALINDEX NTYPX \\LOLOC SHOULDNT WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY FREPLACEFIELD) -SPY.TOGGLE (RESETFORM CURSOR SPY.TREE SPY.START) DBG::REGION-NEXT-TO (CREATEREGION) -TB.COPYBUTTONEVENTFN (WINDOWPROP FFETCHFIELD TOTOPW DSPCLIPPINGREGION LASTMOUSEX LASTMOUSEY -TB.ITEM.FROM.YCOORD KEYDOWNP ZEROP LOGAND) \\PRINSTACKP (IPLUS CONSTANT NCHARS STKNAME \\NATOMCHARS -FFETCHFIELD \\PNAMECELL \\ATOMCELL FRESHLINE \\OUTCHAR) COMPILER::EFFECTS-ANALYZE-VAR-REF ( -COMPILER::NODE-EFFECTS COMPILER::NODE-AFFECTED COMPILER::EFFECTS-REPRESENTATION COMPILER::VAR-REF-VARIABLE -) |\\PFFindRootDirEntryNum| (SUB1 FFETCHFIELD LOCF \\ADDBASE MESAELT \\BLT \\ALLOCBLOCK LRSH ADD1 -MESASIZE FMESAELT IPLUS ILEQ ITIMES IDIFFERENCE PLUS) GETTEXTPROP (SELECTQ FFETCHFIELD LISTGET) -\\DSPLEFTMARGIN.HCPYMODE (\\DSPRIGHTMARGIN.DISPLAY FIXR FQUOTIENT) %CONCATENATED-STREAM-DEVICE-PEEKBIN - (FFETCHFIELD \\PEEKBIN) SEDIT::DRAW-OUTLINE (IDIFFERENCE IPLUS SUB1 BLTSHADE) -SEDIT::COPY-SELECTION-DEFAULT (FFETCHFIELD NTH PLUS) \\CKAPPLYARGS (\\MYALINK OPCODES IDIFFERENCE -FLOOR LOGAND FFETCHFIELD ADDSTACKBASE \\VAG2 CONSTANT LOGXOR SUB1 STACKGETBASEPTR \\GETBASEPTR -STACKADDBASE CONS) FB.GETALLFILEINFO (\\GENERATEFILEINFO SELECTQ FOLDHI LRSH IPLUS SHOULDNT LIST) -CL::GET-SHARED-SETF-METHOD (GENSYM CL:MAPCAR CL:FUNCTION CL:MACROEXPAND-1 CL:VALUES CL:NREVERSE LIST) -COMPLEX-COMPARE-BACKWARD (-) CL:FLOAT-DIGITS (CL::%NOT-FLOAT-ERROR) \\TFBRAVO.WRITE.PARAGRAPH (SELECTQ - FFETCHFIELD ADD1 \\TFBRAVO.WRITE.RUNS \\TFBRAVO.APPLY.PARALOOKS) -%CONCATENATED-STREAM-DEVICE-CLOSEFILE (FFETCHFIELD CLOSEF) FORMAT-EXP-AUX (CL:PRIN1) \\LITPRIN ( -\\PNAMECELL \\ATOMCELL FFETCHFIELD CL:AREF ALLOCSTRING FIND-EXTERNAL-SYMBOL \\LITPRIN.INTERNAL -PACKAGE-NAME-AS-SYMBOL IPLUS \\NATOMCHARS FRESHLINE SELECTQ \\PROPCELL CONSTANT ADD1 \\GETBASEFAT -\\GETBASE \\GETBASETHIN \\GETBASEBYTE + - <=) %MAXTHINCHAR (CL:1- EXPT) CL:GETHASH (GETHASH) -\\CURSOR.DEFPRINT (FFETCHFIELD PRIN1) SEDIT::GET-SELECTED-STRUCTURE (SEDIT::CLOSE-NODE FFETCHFIELD) -\\SEQUIN.CONTROL (LOCF \\ADDBASE ALLOCATE.PUP \\SEQUIN.PUT) COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS - (COMPILER::CALL-FN COMPILER::CALL-ARGS CL:LABELS COMPILER::LAMBDA-REQUIRED COMPILER::ADD-PARAM -COMPILER::LAMBDA-REST) %ECHO-STREAM-DEVICE-BIN (%TWO-WAY-STREAM-DEVICE-BIN) COMP.STUNBIND (CONS IPLUS -GETHASH) REMEMBER (MARKASCHANGED GETEXPRESSIONFROMEVENTSPEC) FILECOMS (GETPROP PACK* NAMEFIELD) -COMPILER::EFFECTS-ANALYZE-THROW (COMPILER::EFFECTS-ANALYZE COMPILER::THROW-TAG COMPILER::THROW-VALUE -COMPILER::NODE-EFFECTS COMPILER::NODE-AFFECTED COMPILER::EFFECTS-UNION) |\\PFPurgeRootDirectory| ( -UNINTERRUPTABLY |\\PFVolumeNumber| FREPLACEFIELDVAL NCREATE) %CONCATENATED-STREAM-DEVICE-BACKFILEPTR ( -\\BACKFILEPTR FFETCHFIELD) \\PRINT-USING-DEFPRINT (TYPENAME FASSOC IDIFFERENCE CL:FUNCALL -\\PRINT-USING-ADDRESS \\PRINDATUM) CL:FILL (CL:LENGTH) %SYNONYM-STREAM-DEVICE-GET-INDIRECT-STREAM ( -CL:SYMBOL-VALUE XCL:SYNONYM-STREAM-SYMBOL) GREETFILENAME (SELECTQ UNIX-GETENV INFILEP -FINDFILE-WITH-EXTENSIONS APPEND PROMPTFORWORD STRPOS U-CASE SUBSTRING ADD1 MKSTRING SUB1 CONS -PACKFILENAME.STRING CONCATLIST SUBPAIR LIST SUBST) ENDLOADUP (RECORDPRIORITY COPY OPENP PRINTOUT -CLOSEF TERPRI FILEPKGCHANGES CLRPROMPT) SEDIT::CHANGE-QUOTE (FFETCHFIELD SEDIT::QUOTE-WRAPPER LISTGET -SEDIT::NOTE-CHANGE) RECORDPRIORITY (RECLOOK RECORDECL SELECTQ RECORD.PRIORITY FNTH ASSOC /RPLACA CONS) - CL:FILE-AUTHOR (GETFILEINFO COERCE) \\EVALA (\\MYALINK OPCODES FFETCHFIELD ADDSTACKBASE \\VAG2 CEIL -LOGAND IPLUS IDIFFERENCE UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDLO LRSH \\PUTBASEPTR \\ATOMVALINDEX -NTYPX \\LOLOC SHOULDNT PLUS WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY FREPLACEFIELD \\EVAL) -CL:GET-DECODED-TIME (CL:DECODE-UNIVERSAL-TIME CL:GET-UNIVERSAL-TIME) CL:ARRAY-TOTAL-SIZE (FFETCHFIELD -CL:ERROR) FB.ADD.FILEGROUP (STRING-EQUAL FFETCHFIELD MAPC SORT MAPCAR CONS FREPLACEFIELDVAL NCREATE -FB.ADD.FILE) CL:FROUND (CL::%INTEGER-COERCE-MACRO) ROT (IMOD IDIFFERENCE DEPOSITBYTE LOGOR BITCLEAR -LOGAND LOGNOT MASK.1\'S LSH SUB1 LOADBYTE IMINUS) CL:GET-INTERNAL-REAL-TIME (CLOCK) -%CONCATENATED-STREAM-DEVICE-EOFP (FFETCHFIELD) \\GENERIC.CURSOR (WINDOWOP SPREADAPPLY* FFETCHFIELD) -%SYNONYM-STREAM-DEVICE-CLOSEFILE (DREMOVE FFETCHFIELD) POSTSCRIPT.FONTCREATE ( -PSCFONTFROMCACHE.SPELLFILE PSCFONT.SPELLFILE PSCFONT.READFONT PSCFONTFROMCACHE.COERCEFILE -PSCFONT.COERCEFILE FIXR TIMES POSTSCRIPT.GETFONTID FRPLACA FONTCREATE LISTGET FFETCHFIELD LIST IPLUS -FREPLACEFIELDVAL NCREATE \\CREATEFONTCHARSETVECTOR \\ALLOCBLOCK ADD1 \\GETCHARSETINFO \\GETBASEPTR -UNFOLD LLSH \\CREATECHARSET \\PUTBASE ELT PLUS \\CREATECSINFOELEMENT FOLDHI LRSH \\FGETWIDTH \\GETBASE - \\FONTINFOFROMFILENAME COPY \\POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS) CL:FLOAT-PRECISION ( -CL:INTEGER-LENGTH + CL::%NOT-FLOAT-ERROR) CL:FTRUNCATE (CL::%INTEGER-COERCE-MACRO) SMASHFILECOMSLST ( -MAPC GETATOMVAL) %BROADCAST-STREAM-DEVICE-OUTCHARFN (FFETCHFIELD \\OUTCHAR) %SYNONYM-STREAM-DEVICE-BIN - (\\BIN %SYNONYM-STREAM-DEVICE-GET-STREAM) CL:FILE-POSITION (GETFILEPTR) CL:FILE-LENGTH (GETEOFPTR) -ONEDINSPECT.SETELT (GETPROMPTWINDOW WINDOWREGION IPLUS ITIMES STRINGWIDTH APPLY* WINDOWPROP -XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES RESETLST RESETSAVE TTYDISPLAYSTREAM - TTY.PROCESS THIS.PROCESS CLEARBUF PRINTOUT PRIN1 CL:FUNCALL LISPXREAD) CL:GCD (CL::%GCD ARG) -CTEXTPROP (LIST TERPRI CGETTEXTPROP) %SYNONYM-STREAM-DEVICE-BOUT (\\BOUT -%SYNONYM-STREAM-DEVICE-GET-STREAM) SEDIT::DRAW-HIGHLIGHT (ADD1 BLTSHADE IDIFFERENCE IPLUS) CL:FLOAT-SIGN - (MINUSP FFETCHFIELD - CL::%NOT-FLOAT-ERROR) CL:GET-SETF-METHOD (CL:VALUES LIST GENSYM CL::SETF-ERROR -LOCAL-MACRO-FUNCTION CL:GET-SETF-METHOD CL:FUNCALL GET CL::GET-SIMPLE-SETF-METHOD -CL::GET-SHARED-SETF-METHOD) BAKTRACE1 (STKNTH SUB1 STKNAME CL:FUNCTION) DOFILESLOAD (FULLNAME CONS -PACKFILENAME.STRING NCONC ROOTFILENAME SELECTQ FINDFILE FINDFILE-WITH-EXTENSIONS CL:CERROR LIST LOAD -CL:FUNCALL MKLIST EVAL CHCON1 PACK* EVALV) \\NSNET.CLOSERP (\\LOCATE.NSNET FFETCHFIELD ILESSP) -PUTSEQUIN (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FFETCHFIELD LOCF \\ADDBASE -PUTSEQUIN SEQUINOP APPLY*) LOADUP (MAPC TERPRI FMEMB LIST SMASHFILECOMS) UNREADITEM (BKSYSBUF CONCAT -MKSTRING EVAL) CL:GET-SETF-METHOD-MULTIPLE-VALUE (CL:VALUES LIST GENSYM CL::SETF-ERROR -LOCAL-MACRO-FUNCTION CL:GET-SETF-METHOD CL:FUNCALL GET CL::GET-SIMPLE-SETF-METHOD -CL::GET-SHARED-SETF-METHOD) %SYNONYM-STREAM-DEVICE-GETFILEINFO (GETFILEINFO -%SYNONYM-STREAM-DEVICE-GET-STREAM) \\DRAWELLIPSE.HCPYMODE (\\DRAWELLIPSE.DISPLAY -\\BRUSHCONVERT.HCPYMODE \\DASHINGCONVERT.HCPYMODE) %SYNONYM-STREAM-DEVICE-PEEKBIN (\\PEEKBIN -%SYNONYM-STREAM-DEVICE-GET-STREAM) DEFINEDP (\\DEFCELL \\ATOMCELL) VALUOF (HISTORYFIND SUB1 MKLIST -VALUOF-EVENT) CL:GET-INTERNAL-RUN-TIME (CLOCK) %CONCATENATED-STREAM-DEVICE-CHARSETFN (FFETCHFIELD -ACCESS-CHARSET) SET-DOCUMENTATION (GETHASH HASH-TABLE-FOR-DOC-TYPE) %SYNONYM-STREAM-DEVICE-EOFP ( -\\EOFP FDEVOP SPREADAPPLY* FFETCHFIELD %SYNONYM-STREAM-DEVICE-GET-STREAM) *PACKAGE-FROM-INDEX* ( -CL:MAKE-ARRAY) SI::NLSETQHANDLER (ABORT) FGETD (GETD) \\PRINTNSADDRESS (\\GETSTREAM FFETCHFIELD -SELECTC) %CONCATENATED-STREAM-DEVICE-BIN (FFETCHFIELD \\BIN) %SYNONYM-STREAM-DEVICE-FORCEOUTPUT ( -FORCEOUTPUT %SYNONYM-STREAM-DEVICE-GET-STREAM) TTYIN.SCRATCHFILE (OPENSTREAM CONSTANT LIST FUNCTION) -GRAPHERPROP (PUTPROP GETPROPLIST FRPLACD GETPROP) BREAK.NSFILING.CONNECTION (FFETCHFIELD FUNCTION LIST - \\GETDEVICEFROMNAME \\CANONICAL.NSHOSTNAME) \\DSPCOLOR.IP (FFETCHFIELD ENSURE.RGB SETRGB.IP) -%SYNONYM-STREAM-DEVICE-SETFILEINFO (SETFILEINFO %SYNONYM-STREAM-DEVICE-GET-STREAM) INSPECTW.PUTHASH ( -/PUTHASH) PERIODICALLYRECLAIM (\\DAYTIME0) DISPLAYNODE (PRINTDISPLAYNODE DSPCLIPPINGREGION) -%SYNONYM-STREAM-DEVICE-OUTCHARFN (%SYNONYM-STREAM-DEVICE-GET-STREAM FFETCHFIELD FREPLACEFIELD) -%SYNONYM-STREAM-DEVICE-CHARSETFN (ACCESS-CHARSET %SYNONYM-STREAM-DEVICE-GET-STREAM) \\SMASHRETURN ( -\\MYALINK OPCODES IDIFFERENCE ADDSTACKBASE \\VAG2 FFETCHFIELD SI::UNWIND THIS.PROCESS RELSTK CL:ERROR -PROCESSPROP) \\LITPRIN.INTERNAL (\\NATOMCHARS FFETCHFIELD \\PNAMECELL \\ATOMCELL \\SYMBOL.ESCAPE.COUNT - IMINUS IPLUS + IABS \\NSTRINGCHARS FRESHLINE \\PROPCELL CONSTANT ADD1 \\GETBASEFAT \\GETBASE -\\GETBASETHIN \\GETBASEBYTE \\OUTCHAR CHCON1 SELECTQ \\SYNCODE GETHASH LOGAND LOGOR - <=) PRINTCCODE ( -\\OUTCHAR \\GETSTREAM IGEQ \\ILLEGAL.ARG) EVALA (\\DTEST PLUS .CALLAFTERPUSHINGNILS. IPLUS CEIL LOGAND - ADD1 UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDHI LRSH \\EVALA) \\CKPOSBOUT (IPLUS FFETCHFIELD FRESHLINE -\\OUTCHAR) %SYNONYM-STREAM-DEVICE-READP (READP %SYNONYM-STREAM-DEVICE-GET-STREAM) \\SETVAR (LISPERROR -\\STKSCAN \\DTEST \\HILOC) SEDIT::STRING-OFFSET (SEDIT::ESCAPE-CHAR FFETCHFIELD NTHCHARCODE IPLUS -CHARWIDTH PLUS) CL:HASH-TABLE-COUNT (HARRAYPROP) PRINTLEVEL (CONS) %SYNONYM-STREAM-DEVICE-BACKFILEPTR -(\\BACKFILEPTR %SYNONYM-STREAM-DEVICE-GET-STREAM) TEDIT.KILL (FFETCHFIELD WINDOWPROP THIS.PROCESS) -INSPECT (TYPENAME INSPECT/DATATYPE \\APPLYINSPECTMACRO APPLY* SELECTQ INSPECT/ATOM INSPECT/LISTP -INSPECT/ARRAY INSPECT/HARRAYP INSPECT/BITMAP INSPECTCODE INSPECT/TYPELESS \\GETDTD \\ADDBASE ITIMES -NTYPX INSPECT/HUNK FFETCHFIELD PRIN1) \\DRAWLINE.IP (DRAWDASHEDLINE FFETCHFIELD \\WIDTHFROMBRUSH - MIN - + MAX LIST MASKSTROKE.IP FQUOTIENT SETXY.IP) %TWO-WAY-STREAM-DEVICE-BOUT (\\BOUT FFETCHFIELD) -CL:HASH-TABLE-P (TYPENAMEP) CL:INTEGER-DECODE-FLOAT (FLOAT CL:VALUES + CL:ASH -) CGETTEXTPROP (SELECTQ -) %TWO-WAY-STREAM-DEVICE-OUTPUTSTREAM (FFETCHFIELD) SEDIT::SUBNODE-CHANGED (CL:FUNCALL FFETCHFIELD) -\\FTP.FLUSH.TO.MARK (GETSTREAM BIN) \\OUTCHAR (STREAMOP SPREADAPPLY* FFETCHFIELD) BACKSPACEDEL ( -CHARACTER ECHOCONTROL) \\EVPROG1 (\\EVAL) FB.MAYBE.WIDEN.NAMES (FFETCHFIELD IMIN IMAX FIXR FTIMES -IDIFFERENCE) XCL::UNDOABLY-SETQ (XCL::UNDOABLY-SET-SYMBOL \\EVPROG1) CL:GET-OUTPUT-STREAM-STRING ( -ERROR FFETCHFIELD %MAKE-INITIAL-STRING-STREAM-CONTENTS) DEFEVAL (FASSOC DREMOVE CONS) -FIND-EXTERNAL-SYMBOL (MKSTRING %ARRAY-BASE FFETCHFIELD %ARRAY-OFFSET %ARRAY-TYPE-NUMBER \\CREATECELL) -\\MEDW.CURSOR (FFETCHFIELD IDIFFERENCE SUB1) %TWO-WAY-STREAM-DEVICE-INPUTSTREAM (FFETCHFIELD) -\\INSERTCR (FFETCHFIELD) \\EVPROGN (\\EVAL) |\\PFRemoveRootDirEntry| (UNINTERRUPTABLY -|\\PFFindRootDirEntryNum| FFETCHFIELD ADD1 LOCF \\ADDBASE \\BLT FMESAELT IPLUS ILEQ ITIMES IDIFFERENCE - MESAELT \\ALLOCBLOCK LRSH MESASIZE PLUS) %TWO-WAY-STREAM-DEVICE-EOFP (\\EOFP FDEVOP SPREADAPPLY* -FFETCHFIELD) CL::%LOG-BASE2-E (CL::%FLOAT) \\NUMERIC.PNAMEP (+ - %ARRAY-BASE FFETCHFIELD SUB1 -%ARRAY-OFFSET IPLUS %ARRAY-TYPE-NUMBER \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT MKSTRING ADD1 -\\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE SELCHARQ IEQP) %TWO-WAY-STREAM-DEVICE-BIN (\\BIN -FFETCHFIELD) CL:LCM (CL:ERROR CL::%LCM ARG) SEDIT::CHANGE-PRINTBASE (SEDIT::CLOSE-NODE -SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW FFETCHFIELD PRIN1) \\DRAWCURVE.HCPYMODE (\\DRAWCURVE.DISPLAY -MAPCAR CONS \\BRUSHCONVERT.HCPYMODE \\DASHINGCONVERT.HCPYMODE) %TWO-WAY-STREAM-DEVICE-READP (READP -FFETCHFIELD) LET (PLUS .CALLAFTERPUSHINGNILS. IPLUS CEIL LOGAND ADD1 UNFOLD LLSH CONSTANT SUB1 LOGXOR -FOLDHI LRSH \\LET0) CL:INTEGER-LENGTH (- CL:MACROLET + CL:INTEGER-LENGTH CL:ASH) PUTDQ? (PUTD) -PRINT-CIRCLE-ENTER (DECLARE) LOADEFS (LOADFNS) SEDIT::FORMAT-VALUES-CHANGED (FFETCHFIELD) -\\SYMBOL.ESCAPE.COUNT (FFETCHFIELD \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT ADD1 \\GETBASEFAT -\\GETBASE \\GETBASETHIN \\GETBASEBYTE \\SYNCODE GETHASH LOGAND LOGOR PLUS - \\NATOMCHARS) -COMPILER::META-CALL-LAMBDA (COMPILER::CALL-FN COMPILER::CALL-ARGS COMPILER::LAMBDA-REQUIRED -COMPILER::VARIABLE-SCOPE COMPILER::CONSTRUCT-PROG1-TREE LIST COMPILER::PROGN-STMTS COMPILER::LAMBDA-BODY - CL:NREVERSE) COMP.STBIND (GETHASH IDIFFERENCE FRPLACA SELECTQ COMP.CLEANFNOP FRPLACD CONS) -PRINTPACKETQUEUE (FFETCHFIELD \\DTEST) TTYINSTRING (IGREATERP FIRSTCHAR PLUS TTNEXTCHAR ALLOCSTRING) -\\INTERPRETER-LAMBDA (ADDSTACKBASE \\VAG2 \\MYALINK OPCODES IDIFFERENCE FFETCHFIELD) LET* (PLUS -.CALLAFTERPUSHINGNILS. IPLUS CEIL LOGAND ADD1 UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDHI LRSH \\LET*) -\\PRINSTRING (FFETCHFIELD IPLUS \\NSTRINGCHARS SUB1 %ARRAY-OFFSET %ARRAY-BASE %ARRAY-TYPE-NUMBER ADD1 -\\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE FRESHLINE \\OUTCHAR \\SOUT) FB.ADJUST.DATE.WIDTH ( -FFETCHFIELD FUNCTION PLUS) CL::GET-SIMPLE-SETF-METHOD (GENSYM CL:MAPCAR CL:FUNCTION CL:MACROEXPAND-1 -CL:VALUES CL:NREVERSE LIST) IMODLESSP (ILESSP IMODDIFFERENCE IMOD IDIFFERENCE FOLDHI LRSH IPLUS) -CL:LISP-IMPLEMENTATION-VERSION (CL:CONCATENATE CL:STRING-CAPITALIZE MKSTRING) ONEDINSPECT.SELECTPROP ( -WINDOWPROP WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES -STRINGWIDTH FONTPROP FREPLACEFIELDVAL NCREATE) \\MEDW.PUTWINDOWPROP (TYPENAMEP \\OUTSTREAMARG -\\GETSTREAM WFROMDS SELECTQ FFETCHFIELD ERROR REGIONP WINDOWPROP LISTGET LIST) -%TWO-WAY-STREAM-DEVICE-CHARSETFN (ACCESS-CHARSET FFETCHFIELD) FORMAT-FIXED-AUX (CL:PRINC) -\\CHECKFLTFMT (FIXP LISPERROR) TEDIT.CARETLOOKS (TEXTOBJ \\TEDIT.UNIQUIFY.CHARLOOKS -\\TEDIT.CARETLOOKS.VERIFY \\TEDIT.PARSE.CHARLOOKS.LIST FFETCHFIELD) GRAPHER/CENTERPRINTINAREA ( -\\GETSTREAM STRINGWIDTH IPLUS IQUOTIENT ADD1 IDIFFERENCE FONTPROP) \\NSFILING.CLOSE.CONNECTIONS ( -RESETLST OBTAIN.MONITORLOCK FFETCHFIELD TIMES APPEND MAPC FREPLACEFIELD) \\DRAWPOINT.IP (BITMAPWIDTH -BITMAPHEIGHT - ITIMES CONSTANT IQUOTIENT) \\NET.SETTIME (SELECTQ FFETCHFIELD \\PUP.SETTIME -\\NS.SETTIME) \\EVALFORM (\\DEFCELL \\ATOMCELL FFETCHFIELD .EVALFORM. SPREADAPPLY .SPREAD. -SPREADAPPLY* GETHASH FAULTEVAL) %TWO-WAY-STREAM-DEVICE-PEEKBIN (\\PEEKBIN FFETCHFIELD) -\\SAVEVMBACKGROUND (FFETCHFIELD \\COUNTREALPAGES RESETLST RESETSAVE CURSOR SAVEVM) -CHANGE.NODEFONT.SIZE (NEXTSIZEFONT CONSTANT CONS FRPLACA) SI::ERRORSET-PRINT-FUNCTION (PRIN1) \\LET* ( -\\MYALINK OPCODES FFETCHFIELD ADDSTACKBASE \\VAG2 CEIL LOGAND IPLUS IDIFFERENCE UNFOLD LLSH CONSTANT -SUB1 LOGXOR FOLDLO LRSH \\ATOMVALINDEX NTYPX \\LOLOC SHOULDNT \\PUTBASE PLUS IMINUS WORDSPERNAMEENTRY -WORDSPERNTOFFSETENTRY FREPLACEFIELD \\PUTBASEPTR \\EVPROG1 \\EVAL) %TWO-WAY-STREAM-DEVICE-FORCEOUTPUT -(FORCEOUTPUT FFETCHFIELD) SEDIT::CONFLICTING-SELECTION? (FFETCHFIELD) SEDIT::NOTE-CHANGE-IN-SIMPLE ( -FFETCHFIELD SEDIT::STRINGWIDTH SEDIT::NOTE-CHANGE) CL:LOGANDC1 (LOGAND LOGNOT) COPYVM (RESETVARS -.RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FFETCHFIELD \\COPYSYS) PROG ( -PLUS .CALLAFTERPUSHINGNILS. IPLUS CEIL LOGAND ADD1 UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDHI LRSH -\\PROG0) LOADVARS (LOADFNS) CL::%PRINT-TIMING-ITEM (CL::TIME-FORMAT MAX /) SEDIT::DETACH-NODE ( -FREPLACEFIELD) %TWO-WAY-STREAM-DEVICE-OUTCHARFN (FFETCHFIELD FREPLACEFIELD) COMPERROR (RETFROM) -\\TEDIT.LINECACHE (FFETCHFIELD BITMAPCREATE IMAX FREPLACEFIELD) COMP.DELPOP (ADD1) TIME.SINCE.PACKET ( -\\RCLK \\CREATECELL LOCF \\ADDBASE IQUOTIENT \\BOXIDIFFERENCE) SI::NLSETQ-PROCEED-CASE ( -MAKE-PROCEED-CASE) TTGIVEHELP (POSITION) PROG1 (\\EVAL) SPY.TREE (LIST SPY.MERGE) \\ELIDE.ELEMENT.CHAR - (FFETCHFIELD) COND (LISPERROR \\EVAL \\EVPROGN) SORT.NSADDRESSES.BY.DISTANCE (\\LOCATE.NSNET -FFETCHFIELD SORT) \\SEQUIN.PUT (LOCF \\ADDBASE FFETCHFIELD UNINTERRUPTABLY PLUS ADD1) -PACKAGE-NAME-AS-SYMBOL (CL::%PACKAGE-NAMESYMBOL) INFILECOMTAIL (EVALV RESETVARS .RESETLST. LIST CONS -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION EVAL SUBSET) |\\SystemERROR| (SELECTQ GETTOPVAL RAID - LISPERROR) COMPILER::COPY-CODE (CL:MAKE-HASH-TABLE COMPILER::COPY-NODES) SEDIT::CHANGE-PACKAGE ( -SEDIT::CLOSE-NODE SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW FFETCHFIELD CL:FIND-PACKAGE -CL:PACKAGE-USE-LIST PRIN1) \\DRAWCIRCLE.HCPYMODE (\\DRAWCIRCLE.DISPLAY \\BRUSHCONVERT.HCPYMODE -\\DASHINGCONVERT.HCPYMODE) %FILL-POINTER-STREAM-DEVICE-GETFILEPTR (CL:LENGTH FFETCHFIELD) LDB ( -BYTE-SIZE CL:BYTE-POSITION LOGAND CL:ASH - CL::%MAKE-BYTE-MASK-1) \\NOMACHINETYPE (RAID) -NSNET.DISTANCE (FFETCHFIELD \\LOCATE.NSNET PLUS) GETSEQUIN (\\DEQUEUE FFETCHFIELD) \\MAKENUMBER ( -.COERCE.TO.SMALLPOSP. IGEQ \\ILLEGAL.ARG SELECTC \\VAG2 CREATECELL) CL:LOGIOR (ARG CL::%LOGIOR) -COMPILER::RELEASE-VAR-REF (COMPILER::VAR-REF-VARIABLE) SEDIT::BACKSPACE (FFETCHFIELD) -\\CHARWIDTH.HCPYMODE (\\FGETWIDTH \\GETBASE FFETCHFIELD) %INITIALIZE-CLSTREAM-TYPES (FUNCTION -FREPLACEFIELDVAL NCREATE) %TWO-WAY-STREAM-DEVICE-BACKFILEPTR (\\BACKFILEPTR FFETCHFIELD) -|\\PFAddRootDirEntry| (UNINTERRUPTABLY FFETCHFIELD \\BLT FMESAELT \\ADDBASE LOCF IPLUS ILEQ ITIMES -IDIFFERENCE \\ALLOCBLOCK LRSH ADD1 MESASIZE) SMALLP (SELECTC NTYPX) FIXP (\\TYPEMASK.UFN LRSH) -CENTERPRINTINAREA (\\OUTSTREAMARG \\GETSTREAM STRINGWIDTH FUNCTION IPLUS IQUOTIENT ADD1 IDIFFERENCE -FONTPROP DSPRIGHTMARGIN RESETSAVE LIST CL:FUNCALL) COMPILER::EFFECTS-ANALYZE-RETURN (COMPILER::EFFECTS-ANALYZE - COMPILER::RETURN-VALUE COMPILER::NODE-EFFECTS COMPILER::EFFECTS-UNION LIST COMPILER::RETURN-BLOCK -COMPILER::NODE-AFFECTED) \\MAPCHARS (\\MAPPNAME FUNCTION) SI::UNWIND (MINUSP \\MYALINK OPCODES -IDIFFERENCE ADDSTACKBASE \\VAG2 FFETCHFIELD \\GETBASEPTR \\DISCARDFRAME) CL::TIME-FORMAT (CL:APPLY) -SEDIT::DEFAULT-PACKAGE (CL:SYMBOL-PACKAGE) \\STORENSADDRESS (\\BLT \\DTEST) COMPILER::META-EVAL-UNWIND-PROTECT - (COMPILER::MEVAL COMPILER::META-EVALUATE COMPILER::UNWIND-PROTECT-STMT REPLACEFIELD -COMPILER::UNWIND-PROTECT-CLEANUP COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) \\SETFVARSLOT ( -\\MYALINK OPCODES ADDSTACKBASE \\VAG2 FFETCHFIELD \\ADDBASE GETSTKNAMEENTRY NTSLOT-VARTYPE -GETSTKNTOFFSETENTRY IPLUS UNFOLD LLSH \\LOLOC NTSLOT-OFFSET LOGAND \\HILOC CONSTANT WORDSPERNAMEENTRY) - \\TFBRAVO.HANDLE.HEADING (\\TFBRAVO.PARSE.PARA GETFILEPTR LIST GENSYM FFETCHFIELD) COMP.STSETQ ( -IGREATERP COMP.ST CONS) PRINT10TO3 (SELECTC FFETCHFIELD LOCF \\ADDBASE PRIN1 \\LOADNSHOSTNUMBER -|printout| TERPRI) SETLASTC (\\BOUT) LOGNOT (LOGXOR) \\NSFILING.LOGOUT (FILING.CALL) \\DRAWCURVE.IP ( -LIST LENGTH NUMBERP ERROR PARAMETRICSPLINE LAST) CL:LOGEQV (ARG) STKAPPLY (\\STACKARGPTR .APPLY. -\\DEFCELL \\ATOMCELL FFETCHFIELD FAULTAPPLY SPREADAPPLY .SPREAD. SPREADAPPLY*) GO (\\MYALINK OPCODES -ADDSTACKBASE \\VAG2 FFETCHFIELD FUNCTION FMEMB STACKGETBASEPTR \\GETBASEPTR STACKADDBASE IDIFFERENCE -\\PUTBASEPTR IPLUS) COMPILER::EFFECTS-ANALYZE-SETQ (COMPILER::EFFECTS-ANALYZE COMPILER::SETQ-VALUE -COMPILER::NODE-EFFECTS COMPILER::EFFECTS-UNION COMPILER::EFFECTS-REPRESENTATION COMPILER::SETQ-VAR -COMPILER::NODE-AFFECTED) |\\PFCreateRootDirectory| (UNINTERRUPTABLY |\\PFVolumeNumber| -FREPLACEFIELDVAL NCREATE |\\PFNewPages|) CL:LOGCOUNT (LOGNOT CL::%LOGCOUNT CL::%BIGNUM-LOGCOUNT) -\\TEDIT.PEEKBIN.NEW.PAGE (FFETCHFIELD \\GETSTREAM OPENFILE SPREADAPPLY* \\PEEKBIN LOGOR UNFOLD LLSH -\\PAGEDBIN \\PAGEDPEEKBIN IMIN IDIFFERENCE) %INITIALIZE-STANDARD-STREAMS (CL:MAKE-TWO-WAY-STREAM -CL:MAKE-SYNONYM-STREAM) VIDEORATE (SELECTC SELECTQ \\ILLEGAL.ARG) \\TEDIT.BLTCHAR (\\CHAR8CODE LOGAND -FFETCHFIELD \\CHARSET LRSH \\GETBASE IPLUS IMAX IMIN IDIFFERENCE \\PILOTBITBLT) ENVAPPLY ( -\\STACKARGPTR .APPLY. \\DEFCELL \\ATOMCELL FFETCHFIELD FAULTAPPLY SPREADAPPLY .SPREAD. SPREADAPPLY*) -CL:LOGNAND (LOGNOT LOGAND) %SYNONYM-STREAM-DEVICE-GET-STREAM (CL:SYMBOL-VALUE FFETCHFIELD) -TWODINSPECT.REDISPLAY (LIST WINDOWPROP MAPCONC MAPCAR APPLY* XCL::PROFILIZE CL:PROGV -XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES STRINGWIDTH FONTPROP IDIFFERENCE ADD1 -INSPECT.INVERTSELECTION RIGHTW.REPAINTFN) ERRORSET (CONS CL:CATCH LIST \\EVAL) FB.HEADINGW.DISPLAY ( -WINDOWPROP DSPCLIPPINGREGION IPLUS MAINWINDOW + FFETCHFIELD - STRINGWIDTH PLUS) XCL::UNDOABLY-SET-SYMBOL - (\\STKSCAN \\HILOC \\PUTBASEPTR \\GETBASEPTR \\RPLPTR) DUMMYDEF (GETD) \\MAKEFUNARGFRAME (PLUS -.CALLAFTERPUSHINGNILS. IPLUS CEIL LOGAND ADD1 UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDHI LRSH \\FUNCT1 -FFETCHFIELD) CL:LOGNOR (LOGNOT CL:LOGIOR) NOTIMP (HELP) \\MEDW.GETWINDOWPROP (TYPENAMEP \\OUTSTREAMARG - \\GETSTREAM WFROMDS SELECTQ \\GETWINDOWHEIGHT \\GETWINDOWWIDTH FFETCHFIELD GETWINDOWUSERPROP) -USEREXEC (RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION LISPX -LISPXREAD) TEDIT.INSERT.UPDATESCREEN (FFETCHFIELD IPLUS SELECTQ DSPCLIPPINGREGION LLSH SHOULDNT) -\\GC.HANDLEOVERFLOW (UNINTERRUPTABLY FFETCHFIELD \\ADDBASE \\GETDTD ITIMES IDIFFERENCE \\DORECLAIM -\\GETBASE NTYPX \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR ADD1 -IPLUS) \\MAKESTACKP (FFETCHFIELD CREATECELL FREPLACEFIELD) \\DTEST.UFN (NTYPX \\GETDTD \\ADDBASE -ITIMES FFETCHFIELD SELECTQ \\INDEXATOMPNAME \\FLOAT \\GETSTREAM STKNTHNAME \\DTEST LISPERROR -\\COERCEFONTDESC \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR SMALLP - \\MAKENUMBER ERROR \\LISPERROR CONCAT) \\VAROFFSET (ADDSTACKBASE \\VAG2 FFETCHFIELD GETSTKNAMEENTRY -NTSLOT-VARTYPE GETSTKNTOFFSETENTRY IPLUS IDIFFERENCE UNFOLD LLSH NTSLOT-OFFSET LOGAND PLUS CONSTANT -WORDSPERNAMEENTRY) SEDIT::DEFAULT-GETDEF-FN (GETDEF) \\LOADNSADDRESS (NCREATE \\BLT) COMPILER::META-EVAL-THROW - (COMPILER::MEVAL COMPILER::META-EVALUATE COMPILER::THROW-TAG REPLACEFIELD COMPILER::THROW-VALUE -COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) TEDIT.MODIFYLOOKS (DSPXPOSITION DSPYPOSITION FFETCHFIELD - ADD1 IDIFFERENCE IPLUS SUB1 FONTPROP IQUOTIENT) COMP.STVAR (COMP.ST) PRINTPACKET (FFETCHFIELD FASSOC -APPLY* PRIN1 TERPRI) DF (NLAMBDA.ARGS ED ERROR) SEDIT::CLEAR-ALL-LINEAR-FORMS (SEDIT::WALK-UP-TREE -SEDIT::SUBNODE FFETCHFIELD CL:FUNCTION) CL:MACHINE-INSTANCE (SELECTC CL:FORMAT UNIX-GETPARM -UNIX-GETENV ETHERHOSTNAME + CL:ASH CL:SECOND CL:THIRD CL:FOURTH) SPY.FIND.TREE (FFETCHFIELD CONS -FREPLACEFIELDVAL NCREATE) /RPLNODE2 (ERRORX LIST /RPLNODE) SEDIT::CLOSEFN (WINDOWPROP) BESTNSADDRESS ( -LOOKUP.NS.SERVER \\LOCATE.NSNET FFETCHFIELD PLUS PRIN1) CL:LDB-TEST (LDB) TTREADLIST ( -TTYINBUFFERSTREAM READ LIST) \\RECLAIMSTACKP (FFETCHFIELD) CL:LOGTEST (LOGAND) -COMPILER::RELEASE-UNWIND-PROTECT (COMPILER::RELEASE-TREE COMPILER::UNWIND-PROTECT-STMT -COMPILER::UNWIND-PROTECT-CLEANUP) SEDIT::ADD-MENU (FFETCHFIELD SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW - PRIN1 SEDIT::GET-MENU) \\DRAWLINE.HCPYMODE (\\DRAWLINE.DISPLAY IMAX) FLOATP (SELECTC NTYPX) -ALLATTACHEDWINDOWS (ATTACHEDWINDOWS APPEND MAPCONC ALLATTACHEDWINDOWS) CL:LISTEN (READP \\GETSTREAM) -STKEVAL (\\STACKARGPTR \\EVAL) CL:MAKE-BROADCAST-STREAM (FUNCTION FREPLACEFIELDVAL NCREATE -\\ILLEGAL.ARG) TOPW.REPAINTFN (DSPCLIPPINGREGION MAINWINDOW IPLUS WINDOWPROP XCL::PROFILIZE CL:PROGV -XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES SUB1 FONTPROP ADD1 DIFFERENCE STRINGWIDTH) CL:ISQRT (CL:ERROR - CL:INTEGER-LENGTH CL:ASH CL:1- +) TB.REDISPLAY.ITEMS (DSPCLIPPINGREGION \\DTEST FFETCHFIELD IMAX FIXP - TB.FIRST.VISIBLE.ITEM# IMIN TB.LAST.VISIBLE.ITEM# TB.DISPLAY.LINES) XCL::GET-UNDOABLE-SETF-METHOD ( -CL:VALUES LIST CL:GENSYM CL::SETF-ERROR LOCAL-MACRO-FUNCTION XCL::GET-UNDOABLE-SETF-METHOD CL:FUNCALL -GET CL::GET-SIMPLE-SETF-METHOD) \\COURIER.RECORDTRAN (\\GET.COURIER.TYPE LITATOM SELECTQ LIST CONS) -CL:MAKE-ECHO-STREAM (FFETCHFIELD FUNCTION FREPLACEFIELDVAL NCREATE CONS) COMPILER::EFFECTS-ANALYZE-PROGV - (COMPILER::EFFECTS-ANALYZE-LIST LIST COMPILER::PROGV-SYMS-EXPR COMPILER::PROGV-VALS-EXPR COMPILER::PROGV-STMT -) CL:LOGORC1 (CL:LOGIOR LOGNOT) \\GENERIC.DSPCREATE (FFETCHFIELD WINDOWOP SPREADAPPLY* FUNCTION -FREPLACEFIELDVAL NCREATE CONS MAX) \\INTERPRETER (ARG SUB1 FFETCHFIELD \\DEFCELL \\ATOMCELL -\\MISCAPPLY* FUNCTION CLOSURE-ENVIRONMENT CLOSURE-FUNCTION .CALLAFTERPUSHINGNILS. SELECTQ -\\INTERPRETER-LAMBDA IPLUS ADD1 IDIFFERENCE LISPERROR CEIL LOGAND UNFOLD LLSH CONSTANT LOGXOR FOLDHI -LRSH \\INTERPRETER1 \\STACKARGPTR SPREADAPPLY .SPREAD. LIST PLUS FAULTAPPLY) FORMAT-PRINT-RADIX-AUX ( -FORMAT-PRINT-OLD-ROMAN FORMAT-PRINT-ROMAN FORMAT-PRINT-ORDINAL FORMAT-PRINT-CARDINAL FORMAT-ERROR) -|\\PFPutRootDirectory| (|\\PFVolumeNumber| FREPLACEFIELDVAL NCREATE |\\VFMGetPageGroup| FFETCHFIELD) -\\INSERTCH (NCHARS %ARRAY-TYPE-NUMBER FFETCHFIELD SUB1 %ARRAY-OFFSET %ARRAY-BASE IPLUS ADD1 -\\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE IGREATERP FREPLACEFIELD IDIFFERENCE LIST CONS -SUBSTRING ALLOCSTRING FREPLACEFIELDVAL NCREATE \\INSERTPIECE NCONC1 FRPLACA PLUS \\CHTOPC -\\TEDIT.UNIQUIFY.PARALOOKS COPYALL \\SPLITPIECE - IEQP \\TEDIT.ORIGINAL.WINDOW.TITLE) GRAPHEDITEVENTFN - (DSPCLIPPINGREGION LASTMOUSEX LASTMOUSEY DOWINDOWCOM TRACKNODE GRAPHEDITCOMMANDFN CLOSEW) COMPARELST -(COMPAREMAX COMPARE1) LAPRD (PEEKC READ GETP ERROR APPLY*) \\IPCURVE2 (ARRAY ELT FIX FQUOTIENT -\\WIDTHFROMBRUSH FFETCHFIELD + - \\VISIBLE.IP ILEQ FIXR SUB1 POLYEVAL \\FLOATBOX OPCODES ADD1 IPLUS -EQP IMINUS FDIFFERENCE FPLUS IDIFFERENCE FTIMES ABS LRSH PLUS MASKSTROKE.IP LLSH) SETBLIPVAL ( -\\MYALINK OPCODES \\STACKARGPTR \\VAROFFSET \\GETBASEPTR IDIFFERENCE FFETCHFIELD ADDSTACKBASE \\VAG2 -IPLUS UNFOLD LLSH ADD1 PLUS \\PUTBASEPTR SUB1) COMPILER::META-EVAL-VAR-REF (COMPILER::NODE-META-P) -\\GCMAPTABLE (UNINTERRUPTABLY FFETCHFIELD \\ADDBASE \\GETDTD ITIMES NTYPX \\GETBASE \\LOLOC -\\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR IDIFFERENCE ADD1 IPLUS -\\DORECLAIM PLUS) CL:MACHINE-VERSION (SELECTQ MACHINETYPE CL:FORMAT SUBSTRING GDATE + IDATE CL:* -MICROCODEVERSION REALMEMORYSIZE) SAVEDEF (MAPCAR SAVEDEF GETFILEPKGTYPE GETD GETTOPVAL GETDEF FASSOC -CONS LIST) \\STKARG (\\INTERPFRAMENT \\FRAMESCAN ILEQ ADDSTACKBASE \\VAG2 IDIFFERENCE FFETCHFIELD -FOLDLO LRSH IPLUS UNFOLD LLSH SUB1 GETSTKNAMEENTRY \\ADDBASE SELECTC NTSLOT-VARTYPE -GETSTKNTOFFSETENTRY SHOULDNT NTSLOT-OFFSET LOGAND STACKADDBASE STACKGETBASEPTR \\GETBASEPTR) -SEDIT::CHECK-SELECTION-SHIFT (SEDIT::SHIFT-DOWN) SETTIME (DAYTIME) STACKP (SELECTC NTYPX) CL:MAKE-STRING - (MAKE-VECTOR) VIRGINFN (GETPROP LIST GETD COPY) COMPARELISTS (GETSTREAM PRIN1) RETEVAL (\\STACKARGPTR - IDIFFERENCE ADDSTACKBASE \\VAG2 FFETCHFIELD CL:MULTIPLE-VALUE-PROG1 \\EVAL) \\GET.COURIER.DEFINITION -(LITATOM \\GET.COURIER.DEFINITION ASSOC LISTGET \\GET.COURIERPROGRAM GETHASH ERROR CONCAT LIST) CGETD -(GETD) PNAMESTREAMP (FFETCHFIELD) LISTP (NTYPX LOGAND \\LOLOC) %FILL-POINTER-STREAM-DEVICE-CLOSEFILE ( -FREPLACEFIELD) BLIPSCAN (\\MYALINK OPCODES \\STACKARGPTR SELECTQ \\VAROFFSET \\GETBASEPTR \\MAKESTACKP - IDIFFERENCE ADDSTACKBASE \\VAG2 FFETCHFIELD) CL:MAKE-PATHNAME (PATHNAME %MAKE-PATHNAME COERCE) -COMPAREDEFS (GETFILEPKGTYPE WHEREIS FILEPKGCHANGES MEMBER ASSOC GETPROP CONS GETDEF SOME COMPARELST -TERPRI LIST DREVERSE MAP COMPARELISTS) \\NSFILING.AFTER.LOGIN (FFETCHFIELD) \\DRAWARC.IP ( -\\DRAWARC.GENERIC) MICROCODEVERSION (FFETCHFIELD) USERLISPXPRINT (STKNAME HELP MKATOM SUBSTRING LIST -CONS NLIST APPLY* STKNTH) CL:MAKE-RANDOM-STATE (CL::%MAKE-RANDOM-STATE CL::RANDOM-STATE-I -CL::RANDOM-STATE-J COPY-ARRAY CL::RANDOM-STATE-ARRAY CL:ERROR) FUNCTION (LIST STKNTH ERROR) CL:LOGORC2 - (CL:LOGIOR LOGNOT) REALMEMORYSIZE (FFETCHFIELD) DOAROUNDEXITFORMS (MAPC SELECTQ ERSETQ \\EVAL) \\LET0 - (\\MYALINK OPCODES FFETCHFIELD ADDSTACKBASE \\VAG2 CEIL LOGAND IPLUS IDIFFERENCE UNFOLD LLSH CONSTANT - SUB1 LOGXOR \\PUTBASEPTR \\EVPROG1 PLUS FOLDLO LRSH \\ATOMVALINDEX NTYPX \\LOLOC SHOULDNT -WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY FREPLACEFIELD \\EVAL) CL:MAP (%MAP-FOR-EFFECT-SINGLE -%MAP-FOR-EFFECT-MULTIPLE CONS %MAP-FOR-RESULT-SINGLE %MAP-FOR-RESULT-MULTIPLE) ARRAYP (SELECTC NTYPX) -CL:LOGANDC2 (LOGAND LOGNOT) BLIPVAL (\\MYALINK OPCODES \\STACKARGPTR \\VAROFFSET \\GETBASEPTR -IDIFFERENCE FFETCHFIELD ADDSTACKBASE \\VAG2 IPLUS UNFOLD LLSH ADD1 PLUS SUB1) \\SETLOCALNSNUMBERS ( -LOGOR FFETCHFIELD CONS \\SERIALNUMBER FREPLACEFIELDVAL NCREATE) CL:MACHINE-TYPE (SELECTC UNIX-GETPARM -UNIX-GETENV MKSTRING MACHINETYPE) \\TFBRAVO.FIND.LAST.TRAILER (GETSTREAM GETFILEPTR \\BACKBIN -CHARACTER \\PEEKBIN) RETAPPLY (\\STACKARGPTR IDIFFERENCE ADDSTACKBASE \\VAG2 FFETCHFIELD -CL:MULTIPLE-VALUE-PROG1 .APPLY. \\DEFCELL \\ATOMCELL FAULTAPPLY SPREADAPPLY .SPREAD. SPREADAPPLY*) -\\HANDLE.RAW.10TO3 (FFETCHFIELD LOCF \\ADDBASE CONSTANT PLUS INDEXF + FOLDHI LRSH IPLUS TERPRI) -TTADJUSTWORD (FASSOC FIXSPELL) PATHNAME (CL:VALUES CL:PARSE-NAMESTRING) DBG::STKPTR-CCODE ( -MAKE-COMPILED-CLOSURE \\STACKARGPTR FFETCHFIELD ADDSTACKBASE \\VAG2) NCONC (ARG SUB1 LAST) -\\SEQUIN.PROCESS (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FFETCHFIELD LIST -THIS.PROCESS PUPSOCKETEVENT GETPUP LOCF \\ADDBASE APPLY* SEQUINOP \\SEQUIN.FLUSH.CONNECTION -MONITOR.AWAIT.EVENT FREPLACEFIELD IPLUS16 \\LOLOC IMAX LRSH PLUS) \\FUNCT1 (\\MYALINK OPCODES -FFETCHFIELD ADDSTACKBASE \\VAG2 CEIL LOGAND IPLUS IDIFFERENCE UNFOLD LLSH CONSTANT SUB1 LOGXOR \\EVAL -PLUS FOLDLO LRSH \\ATOMVALINDEX NTYPX \\LOLOC SHOULDNT WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY -FREPLACEFIELD \\MAKESTACKP) CL:MAKE-TWO-WAY-STREAM (FFETCHFIELD FUNCTION FREPLACEFIELDVAL NCREATE CONS -) MERGE (LIST CONS FRPLACA FRPLACD SELECTQ ALPHORDER APPLY*) TEXTICON (WINDOWP TITLEDICONW WINDOWPROP -NCHARS CONCAT DATE CONS) CL:MISMATCH (CL:LENGTH - COMPLEX-COMPARE-BACKWARD COMPLEX-COMPARE-FORWARD -SIMPLE-COMPARE) BACKTRACE (RESETFORM OUTPUT \\BACKTRACE \\STACKARGPTR LOGAND FUNCTION) ESUBST (LIST -EDIT4F FUNCTION) CL:NOTANY (%NOTANY-SINGLE %NOTANY-MULTIPLE CONS) REQUIREVERSION (FFETCHFIELD CONCAT) -SEDIT::BUTTONEVENTFN (MODERNWINDOW.BUTTONEVENTFN FUNCTION) SELECTQ (APPLY SELECTQ1 EVAL) CL:MERGE ( -%MERGE-LISTS %SIMPLE-MERGE-LISTS MAKE-SEQUENCE-OF-TYPE + CL:LENGTH %MERGE-VECTORS %MERGE -%SIMPLE-MERGE-VECTORS %SIMPLE-MERGE) PRINTFN (FINDFNDEF TERPRI) CHANGENAME1 (NLSETQ ESUBST GETD -CHANGENAME1A CHANGECCODE) PRINTNUM-TO-STRING (GLOBALRESOURCE SELECTQ LISPERROR -\\CONVERT.FLOATING.NUMBER FLOAT \\CHECKFLTFMT \\CONVERTNUMBER FIXP FIXR IABS IMINUS IGREATERP -IDIFFERENCE NCHARS CONCAT ALLOCSTRING GETRESOURCE NEWRESOURCE) FB.SET.BROWSER.TITLE (WINDOWPROP -FFETCHFIELD CONCAT) COPIEDFILENAME (CONCATLIST NOHOST UNPACK NLEFT FMEMB COPIEDFILEPATTERN CL:APPLY -NTHCHARCODE SUBSTRING) CL:MERGE-PATHNAMES (PATHNAME %PATHNAME-HOST %PATHNAME-NAME %PATHNAME-DEVICE -%PATHNAME-DIRECTORY %MAKE-PATHNAME %PATHNAME-TYPE %PATHNAME-VERSION) \\MEDW.DSPCREATE ( -FREPLACEFIELDVAL NCREATE CONS FUNCTION BITMAPP FFETCHFIELD FREPLACEFIELD MAX) FORMAT-PRINT-RADIX ( -FORMAT-PRINT-NUMBER FORMAT-WRITE-FIELD FORMAT-PRINT-RADIX-AUX) COMPILER::EFFECTS-ANALYZE-PROGN ( -COMPILER::EFFECTS-ANALYZE-LIST COMPILER::PROGN-STMTS) SORT1 (SORT1) %TWO-WAY-STREAM-DEVICE-CLOSEFILE ( -FFETCHFIELD DREMOVE) APROPRINT (SPACES RESETSAVE LIST FUNCTION DSPLEFTMARGIN DSPXPOSITION POSITION -PRIN2 FRESHLINE) CHARACTER (\\CHARCODEP IGEQ \\ILLEGAL.ARG WITH-RESOURCE \\PUTBASECHAR \\PUTBASEFAT -\\PUTBASE \\PUTBASETHIN \\PUTBASEBYTE %ARRAY-BASE FFETCHFIELD \\MKATOM GETRESOURCE NEWRESOURCE -ALLOCSTRING \\ADDBASE IDIFFERENCE) CL:NSUBSTITUTE (CL:LENGTH COMPLEX-NSUBSTITUTE SIMPLE-NSUBSTITUTE) -COMPILER::RELEASE-THROW (COMPILER::RELEASE-TREE COMPILER::THROW-TAG COMPILER::THROW-VALUE) -SEDIT::COMMENT-OUT-SELECTION (FFETCHFIELD SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW CL:FORMAT) -COMPILER::CONSTRUCT-COMPILER-SYMBOL (CL:INTERN CL:APPLY) |\\SFFixY.HCPYMODE| (FFETCHFIELD -\\DSPTRANSFORMY IPLUS LISTGET \\ADDBASE ITIMES |\\SFInvert| IDIFFERENCE IMAX IMIN \\HILOC \\LOLOC -FREPLACEFIELD) CL:NSTRING-CAPITALIZE (WITH-ONE-STRING-ONLY) CENTEREDPRIN1 (IPLUS IQUOTIENT IDIFFERENCE - STRINGWIDTH PRIN3) LIST* (ARG SUB1 CONS PLUS) VARS (CALLS) COMPILER::META-EVAL-TAGBODY (MAPC -COMPILER::TAGBODY-SEGMENTS COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) \\TEDIT.MARK.REVISION ( -DSPSCALE BLTSHADE + FFETCHFIELD FIXR CL:*) COMP.LOOKUPCONST (SOME CONS NCONC1) \\PRINTFRAME ( -ADDSTACKBASE \\VAG2 FFETCHFIELD IPLUS UNFOLD LLSH ADD1 CONSTANT NTHCHAR PRIN1 IDIFFERENCE FLOOR LOGAND - LOGXOR SUB1 PSTKFLD TERPRI \\SCANFORNTENTRY MAKE-NTENTRY \\GETBASEPTR \\HILOC PLUS) SEDIT::CHECK-SELECTION - (FFETCHFIELD) \\REALFRAMEP (FFETCHFIELD ADDSTACKBASE \\VAG2 SELECTQ \\STKARG CHCON1 EXPRP FASSOC) -SHOWCHARS (RESETFORM DSPFONT LOGAND PLUS CONCAT OCTALSTRING LRSH CHARACTER TERPRI) \\SETFVAR.UFN ( -FREPLACEFIELD) FB.DISPLAY.COUNTERS (FFETCHFIELD WINDOWPROP DSPFONT IQUOTIENT IDIFFERENCE ITIMES -CHARWIDTH LIST FB.COUNTER.STRING IMAX IPLUS STRINGWIDTH PLUS RPLACA CONCAT SUBSTRING DSPXPOSITION -FREPLACEFIELD) CL:NSTRING-UPCASE (WITH-ONE-STRING-ONLY %STRING-UPCASE) \\MEDW.TOTOPW (\\INSUREWINDOW -FFETCHFIELD WINDOWPROP) \\TRANSLATE.10TO3 (\\DTEST FFETCHFIELD \\ALLOCATE.ETHERPACKET LOCF \\ADDBASE) -FORMAT-PRINT-HEXADECIMAL (FORMAT-PRINT-NUMBER) RADIX (\\CHECKRADIX \\INVALID.RADIX) CL:NSUBSTITUTE-IF -(CL:LENGTH COMPLEX-NSUBSTITUTE-IF SIMPLE-NSUBSTITUTE-IF) DBG::FIND-NAMED-STACK-POSITION (STKPOS CL:FIRST - ERROR) \\SEQUIN.CLOSE (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FFETCHFIELD) -APROPOS (DISPLAYSTREAMP GETSTREAM PRINTLEVEL MAPATOMS) CL:NSUBSTITUTE-IF-NOT (CL:LENGTH -COMPLEX-NSUBSTITUTE-IF-NOT SIMPLE-NSUBSTITUTE-IF-NOT) COUNT (IPLUS COUNT) TEDIT.SETSEL (TEXTOBJ -FFETCHFIELD IMIN IMAX ADD1 IPLUS IDIFFERENCE \\CHTOPC \\TEDIT.GET.INSERT.CHARLOOKS) READPRINTERPORT ( -OPCODES) SEDIT::DELETE-NODES (CL:FUNCALL FFETCHFIELD) CL:PATHNAME-TYPE (%PATHNAME-TYPE PATHNAME) -CL:MAKE-SYNONYM-STREAM (CL:SYMBOL-VALUE FFETCHFIELD FUNCTION FREPLACEFIELDVAL NCREATE CONS) -CLEARCLISPARRAY (MAPHASH FUNCTION) CL::TIME-CALL (DATATYPES CL::MAKE-STATS-OBJECT CL:FUNCTION -CL::STATS-OBJECT-ELAPSED-TIME CL:VALUES-LIST) SEDIT::CREATE-STRING-ITEM (SEDIT::STRINGWIDTH -FREPLACEFIELDVAL NCREATE) \\GET.COURIER.TYPE (\\GET.COURIER.DEFINITION) COMPILER::META-EVAL-SETQ ( -COMPILER::MEVAL COMPILER::META-EVALUATE COMPILER::SETQ-VALUE REPLACEFIELD COMPILER::ANALYZE-TREE -COMPILER::NODE-META-P) PRINTHISTORY2 (FUNCTION) COMP.VARTYPE (LITATOM) DELFROMCOMS (GETTOPVAL -DELFROMCOMS GETFILEPKGTYPE DELFROMCOM) CHANGENAME1A (LIST) \\CHANGECHARSET.HCPYMODE (FFETCHFIELD -\\GETCHARSETINFO \\GETBASEPTR UNFOLD LLSH \\CREATECHARSET FONTCOPY LIST IPLUS |\\SFFixY.HCPYMODE| -\\ADDBASE ITIMES \\HILOC \\LOLOC FREPLACEFIELD) COMPILER::EFFECTS-ANALYZE-OPCODES (COMPILER::NODE-EFFECTS - COMPILER::NODE-AFFECTED) WRITEPRINTERPORT (OPCODES) \\CHARWIDTH.IP (FFETCHFIELD \\FGETCHARWIDTH -\\FGETWIDTH \\GETBASE \\GETCHARSETINFO \\GETBASEPTR UNFOLD LLSH \\CHARSET LRSH \\CREATECHARSET -\\CHAR8CODE LOGAND) \\FLOATTOBYTE.UFN (SUB1 LRSH LOGOR LLSH FIX FMIN FMAX \\GETBASEFLOATP IPLUS PLUS) -CL:PATHNAME-NAME (%PATHNAME-NAME PATHNAME) COMPILER::RELEASE-TAGBODY (COMPILER::TAGBODY-REFERENCES +/SETTOPVAL (ERRORX LIST GETTOPVAL SETTOPVAL) CLISPRESPELL (MISSPELLED?) CL:SET-MACRO-CHARACTER ( +SETSYNTAX CL:CHAR-CODE) SETXREL.IP (FREPLACEFIELD + FFETCHFIELD <=) \DO-DEFINE-FILE-INFO (SELECTQ EVAL + CL:FIND-PACKAGE ERROR \DTEST FIND-READTABLE \CHECKRADIX \INVALID.RADIX LIST CL:PACKAGE-NAME +READTABLEPROP) DMCHAT.HANDLE.WRAP (DMCHAT.NEWLINE) FORMAT-PRINT-RADIX-AUX (FORMAT-PRINT-OLD-ROMAN +FORMAT-PRINT-ROMAN FORMAT-PRINT-ORDINAL FORMAT-PRINT-CARDINAL FORMAT-ERROR) BCPL.TO.FLOATP (IMINUS +FPLUS IDIFFERENCE LLSH LRSH LOGAND) RPTEND (HPRINTENDSTR PRIN1 CONSTANT CHARACTER) +\TEDITMENU.RECORD.UNFORMATTED (TEXTOBJ) ADDFILE (ROOTFILENAME ADDFILE0 CONS LIST INTERSECTION ASSOC) +FILECOMSLST (INFILECOMS? FILECOMS) STRINGREGION (DSPXPOSITION IDIFFERENCE DSPYPOSITION FONTPROP +STRINGWIDTH) RESET/NODE/BORDER (GRAPHNODE/BORDER/WIDTH CONSTANT WINDOWPROP INVERTED/GRAPHNODE/BORDER +IEQP) \MAXWIDTHOFGROUP (PLUS) SEDIT::OPEN-LITATOM (SEDIT::CLOSE-NODE NCHARS) FB.HARDCOPY.PRINT.TITLE ( ++ IQUOTIENT - STRINGWIDTH printout TERPRI) MSVERBTYPE (MSVERBTYPE GETWORDTYPE FASSOC GETHASH) +UPDATEFILEMAP (CONCAT RATOM READCCODE GETFILEPTR IDIFFERENCE FFILEPOS FIX TIMES NCHARS CLOSEF NLSETQ +OPENSTREAM RESETSAVE LIST SETFILEPTR PRIN3 POSITION CONSTANT PRIN2 PRIN1 TERPRI PRINT PRINTNUM) +HPRINTEND (GETFILEPTR OUTPUT SUB1 ABS CONSTANT CHARACTER DREVERSE HPRINTENDSTR PRIN3 PLUS) +SEDIT::SET-SELECTION (CL:FUNCALL) \TEDIT.LOOKS.UPDATE (\TEDIT.APPLY.PARASTYLES \TEDIT.APPLY.STYLES +PLUS \RPLPTR \ADDBASE2 \ADDBASE IPLUS \EDITELT GETBASEPTR \GETBASEPTR FONTCOPY IMAX FONTPROP +IDIFFERENCE) ALLATTACHEDWINDOWS (ATTACHEDWINDOWS APPEND MAPCONC ALLATTACHEDWINDOWS) +COMPILER::UPDATE-ENVIRONMENT (DECLARE) ROOTFILENAME (U-CASE NAMEFIELD FULLNAME) PUTPUPSTRING (\DTEST +FREPLACEFIELD PLUS FFETCHFIELD \PUTBASESTRING IDIFFERENCE LOCF \ADDBASE) DRAWGRAYBOX ( +.WHILE.CURSOR.DOWN. \GETBASE) COPIEDFROMSPEC (MKSTRING NOHOST ESPATTERN SUB1 CL:POSITION NCHARS PLUS +DIRECTORYNAME CL:SUBSEQ ADD1 CONCAT NCONC LIST) DINFO.UPDATE.MENU.DISPLAY (DREVERSE FASSOC LIST +FLENGTH GREATERP FONTP WINDOWPROP MAPCAR FUNCTION CREATEW HEIGHTIFWINDOW TIMES DIFFERENCE RELMOVEW +IDIFFERENCE) SMASHFILECOMS (FILECOMSLST) CL:SET-DISPATCH-MACRO-CHARACTER (CL:ERROR CL:CHAR-UPCASE +ASSOC LIST CONS FFETCHFIELD FRPLACD) SI::DESCRIBE-USING-RECORD-DECL (CL:MAPC CL:FUNCTION +INSPECTABLEFIELDNAMES) COMP.STBIND (IDIFFERENCE SELECTQ COMP.CLEANFNOP CONS) MENUITEMREGION ( +IDIFFERENCE LENGTH FMEMB IPLUS ITIMES IREMAINDER SUB1 IQUOTIENT) \TEDIT.FIND.PROTECTED.END (IMIN +\CHTOPC SUB1 PLUS) FASL:PROCESS-FILE (CL:FUNCTION FASL:CHECK-VERSION) \FILLPOLYGON.IP (LENGTH +TRAJECTORY.IP APPENDOP.IP) MOVEBOX (.WHILE.CURSOR.DOWN. \GETBASE) GET-TITLEW (WINDOWPROP CREATEW +CREATEREGION FUNCTION CONCAT) BUILDTESTRELQ (CONS MAPCAR MSVBTABLES LIST KWOTE) MAPRINT (RESETVARS +.RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) TTYIN.SCRATCHFILE (OPENSTREAM +CONSTANT LIST FUNCTION) READPLIST (COPYREADTABLE CONS BIN LIST RATOM RSTRING) COMPILER::ENV-DECL-P ( +CL:MEMBER COMPILER::ENV-DECL-SPECIFIERS COMPILER::ENV-PARENT COMPILER::ENV-DECL-P) ENUM-STRING ( +CL:MACROLET CL:LENGTH CL:FILL-POINTER - WITH-RESOURCES \CONVERTNUMBER ABS GETRESOURCE NEWRESOURCE +ALLOCSTRING CONCAT) SI::INSERT-ADVICE-FORM (LIST CL:LABELS CL:DELETE-IF CONS NCONC) RPTPRINT (ADD1) +MB.DEFAULTBUTTON.ACTIONFN (RESETLST RESETSAVE \TEDIT.MARKACTIVE IMAGEOBJPROP SELECTQ +\TEDIT.MAKEFILENAME MBUTTON.NEXT.FIELD.AS.TEXT TEDIT.PUT TEXTPROP TEDIT.GET TEDIT.INCLUDE NCHARS +ERSETQ TEDIT.FIND ADD1 IDIFFERENCE \TEDIT.GET.INSERT.CHARLOOKS \SHOWSEL TEDIT.PROMPTPRINT +\TEDIT.PRIMARYW \TEXTMENU.START COPYTEXTSTREAM HEIGHTIFWINDOW \TEDIT.EXPANDEDPARA.MENU +\TEDIT.EXPANDEDCHARLOOKS.MENU MBUTTON.NEXT.FIELD.AS.NUMBER LIST MBUTTON.FIND.NEXT.BUTTON CONS +TEDIT.HARDCOPY ERROR) PROMPTCHAR (LISPXREADBUF ADD1 IDIFFERENCE ERSETQ EVAL) MSFIXUPTYPES (MAPC +REVERSE SELECTQ MSSETSETTYPE FIXVERBSETTYPE) SEDIT::INSERT-STRING (ADD1) DINFO.UPDATE.TEXT.DISPLAY ( +DINFO.GET.FILENAME APPEND LIST WINDOWPROP MKATOM INFILEP DINFO.OPENTEXTSTREAM CONCAT MKSTRING +CHARACTER) CL:VECTOR-PUSH-EXTEND (CL:VECTOR-PUSH + CL:ARRAY-TOTAL-SIZE CL:ERROR) LISPXPUT (FMEMB NCONC + LIST) \PFDsplyVolumes (\DSKDISPLAY.UPDATE) COMPILER::COPY-CODE (CL:MAKE-HASH-TABLE COMPILER::COPY-NODES +) \CONVERTNUMBER (IMINUS \NSTRINGCHARS FFETCHFIELD SUB1 PLUS IREMAINDER + - IQUOTIENT SUBSTRING) +COMP.DELPOP (ADD1) COMPILER::EFFECTS-ANALYZE-THROW (COMPILER::EFFECTS-ANALYZE COMPILER::THROW-TAG +COMPILER::THROW-VALUE COMPILER::NODE-EFFECTS COMPILER::NODE-AFFECTED COMPILER::EFFECTS-UNION) NLIST ( +CONS ARG SUB1) MKLIST (LIST) FILEPKGCHANGES (FILEPKGCHANGES CONS LIST ARG) SET-FILL-POINTER (CL:ERROR) + CL:MAKE-DISPATCH-MACRO-CHARACTER (SETSYNTAX CL:CHAR-CODE) TB.DELETE.ITEM (\DTEST PLUS FFETCHFIELD +TB.SHOW.DELETION) LISPXPRIN1 (LIST CONS PRIN1) TERM.MOVETO (\DTEST MOVETO IMIN ITIMES - IMAX) +HASH-LEFTPAREN (CL:READ-DELIMITED-LIST LIST LENGTH CL:MAKE-ARRAY LAST CL:AREF CL:ERROR) COERCE ( +CL:CHARACTER CL:FUNCTION FLOAT COMPLEX COERCE CL:REALPART CL:IMAGPART CL:MAP CL:ERROR) TTECHO.TO.FILE +(GETSTREAM PRINTCCODE BOUTCCODE TTNEXTCHAR) LISPXREADBUF (ADD1 SUB1 NCONC COPY LIST CONS LISPXREADBUF) + \CML-LOAD (CL:FIND-PACKAGE FULLNAME CL:READ CL:EVAL GETFILEPTR) HPRINT1 (TYPENAME PRIN2 GETHASH +CONSTANT SUB1 GETFILEPTR OUTPUT FCHARACTER IQUOTIENT CONS LIST FRPLACD IMINUS ADD1 HPRINT1 PRIN1 +FASSOC PROG2 CHARACTER APPLY* SELECTQ ARRAYSIZE ARRAYORIG ARRAYTYP RPTPRINT ELT PLUS ELTD HARRAYSIZE +HARRAYPROP SYSTEMTYPE GCTRP MINFS IMAX RECLAIM FLENGTH GETSYNTAX RPTEND GETRAISE GETDELETECONTROL +ECHOCHAR DELETECONTROL HPRINSP HPRINTENDSTR LOC GETFIELDSPECS GETDESCRIPTORS FETCHFIELD HPERR) HASH-A +(CL:READ CL:MAKE-ARRAY ESTIMATE-DIMENSIONALITY) LISPXTERPRI (LIST CONS TERPRI) FILECREATED (NCONC1 +FILECREATED1 ROOTFILENAME LIST CONS) GREET (ERSETQ USERNAME MKATOM EVAL GREETFILENAME PRINTOUT TERPRI) + FORMAT-PRINT-RADIX (FORMAT-PRINT-NUMBER FORMAT-WRITE-FIELD FORMAT-PRINT-RADIX-AUX) COMPILER::ENV-ADD-DECLS + (COMPILER::ENV-DECL-SPECIFIERS CL:APPEND) FNUM-STRING (CL:MACROLET CL:LENGTH + CL:FILL-POINTER -) +SI::SET-ADVICE-MIDDLE-MAN (CL:GETHASH) COMPILER::EFFECTS-ANALYZE-SETQ (COMPILER::EFFECTS-ANALYZE +COMPILER::SETQ-VALUE COMPILER::NODE-EFFECTS COMPILER::EFFECTS-UNION COMPILER::EFFECTS-REPRESENTATION +COMPILER::SETQ-VAR COMPILER::NODE-AFFECTED) INSIDE? (ILESSP IPLUS WITHIN) CL:VECTOR-PUSH (CL:ERROR) +COPIEDTOSPEC (CONS ESPATTERN DIRECTORYNAME ERROR) DEFINE-FILE-INFO (GETFILEPTR SET-READER-ENVIRONMENT +\DO-DEFINE-FILE-INFO) SI::DESCRIBE-USING-INSPECT-MACRO (CL:THIRD CL:SECOND CL:MAPCAR CL:FUNCTION +CL:FUNCALL) HASH-B (READNUMBERINBASE) RESHADEITEM (RESETLST RESETSAVE LIST DSPFONT DSPOPERATION +MOST/VISIBLE/OPERATION DSPRIGHTMARGIN \SHOWMENULABEL) COMPILER::PROCESS-DECLARATIONS (DECLARE CL:FLET +CL:MACROLET) DINFO.UPDATE.GRAPH.DISPLAY (CONS DINFO.LAYOUTGRAPH WINDOWPROP CONCAT) \IBMPEEKCCODEFN ( +\RECODECCODE \PEEKCCODE) HASH-BACKSLASH (CHARACTER.READ CL:ERROR) FILLTRIANGLE (IMAGESTREAMTYPE +\FILLPOLYGON.IP FILLPOLYGON) CL::RESOLVE-SLOTS (CL:MAPCAR CL:FUNCTION CL::PS-INCLUDED-SLOTS +CL::PS-INCLUDE CL::PS-ALL-SLOTS NCONC CL::MERGE-SLOTS CL::PS-NAME CL::PS-LOCAL-SLOTS CL::PS-CONC-NAME +CL::PS-ALL-SLOT-NAMES) FLTSTR (SUBSTRING GETRESOURCE NEWRESOURCE ALLOCSTRING CONCAT CL:VALUES MIN +LISPERROR NTYPX ADD1 IDIFFERENCE IGEQ LOLOC \LOLOC FLOAT IPLUS LLSH LRSH LOGAND PLUS SUB1 FLTINTLOG - +EXTTOINT CL:1- NCHARS CL:CHAR) \TELERAIDGET (SELECTC \TELERAIDRELEASE \BLT LOCF \ADDBASE) TTGIVEHELP ( +POSITION) EDITBMTEXTURE (BITMAPBIT BITSPERPIXEL) ONEDINSPECT.RESHAPEFN (WINDOWPROP) GLC (GLCCODE +FCHARACTER) ITEM.WINDOW.SET.STACK.ARG (SELECTQ MENU STACKP ERSETQ ITEMOFPROPERTYVALUE FRAMESCAN +RESETSAVE \ITEMW.FLIPITEM LIST TTY.PROCESS THIS.PROCESS CLRPROMPT printout PRIN1 EVAL READ +INSPECTW.REPLACE) \TRACKWITHBOX (CONSTANT LOGOR MOUSESTATE-NAME LOGAND IPLUS ERSETQ CURSOR ZEROP +IQUOTIENT IMINUS) DWMFY2 (FASSOC CONS GETPROP CONCAT SUBSTRING RETDWIM2 MKSTRING) SPY.INIT ( +\ALLOCBLOCK CL:* QUOTIENT) LISPXREADP (LISPXREADBUF PEEKC CONSTANT CHARACTER) TIMESPOW10 (DECLARE + +CL:AREF IABS IMINUS -) \SENDLEAF (LISPERROR LOGOR IPLUS) GETPUPSTREAM (\MAKEBASEBYTESTREAM \DTEST +IDIFFERENCE) COMP.STUNBIND (CONS IPLUS) HASH-COLON (CL:MAKE-SYMBOL READ-EXTENDED-TOKEN) INTTOEXT ( +IPLUS NTYPX \LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR IDIFFERENCE +LOGAND LLSH1 SUB1 LLSH PLUS) FILEDATE (NLSETQ RESETLST OPENP GETFILEPTR LIST OPENSTREAM FASL-FILEDATE) + EXTTOINT (IDIFFERENCE LRSH - LOGAND IPLUS ADD1 \MAKENUMBER) READFILE (DECLARE) GREET0 (DATE NTHCHAR +LRSH STRINGP SASSOC U-CASE SUBSTRING SUBATOM LISPXTERPRI) FLTINTLOG (DECLARE CL:AREF IPLUS PLUS) /PUT +(LIST GETPROPLIST CONS) \LIMITBYMAX (IMIN) RPLCHARCODE (\FATCHARCODEP IGREATERP IPLUS \PUTBASEFAT +\PUTBASE \PUTBASETHIN \PUTBASEBYTE SUB1 RPLCHARCODE MKSTRING) PUTPUPBYTE (\PUTBASEBYTE \DTEST) +SI::INSPECT-MACRO-USABLE-BY-DESCRIBE? (CL:CONSP CL:REST) HASH-DOUBLEQUOTE (RSTRING) SEDIT::SET-POINT ( +CL:FUNCALL) EDITE (EDITMODE INSPECT CL:FUNCALL GET) \MAXHEIGHTOFGROUP (PLUS) NODELST/AS/MENU ( +IDIFFERENCE HALF LRSH IPLUS) HASH-MINUS (CL:READ CL:VALUES) RIGHTW.RESHAPEFN (RIGHTW.REPAINTFN) +PRETTYCOMPRINT (LISPXPRINT) TRACKNODE (TRACKCURSOR NODELST/AS/MENU WINDOWPROP CURSORPOSITION) +FB.NAMES.INCREASING.VERSION (SELECTQ ALPHORDER NULL.VERSIONP ILESSP) HASH-ILLEGAL-HASH-CHAR (CL:ERROR) + HASH-LEFTANGLE (HASH-NO-PARAMETER-ERROR CL:ERROR CL:READ) SI::GET-ADVICE-MIDDLE-MAN (CL:GETHASH) +PUTPROPS (MAP PUTPROP CDDR) READLINE (CHCON1 PEEKC NCONC1 READ APPLY* LASTC EDITE SETN GETFILEPTR +LISPXREADBUF) HASH-PLUS (CL:READ CL:VALUES) BOOTSTRAP-NAMEFIELD (STRPOS ADD1 SUB1 NTHCHARCODE SUBATOM) + \LEAF.CLOSEFILE (CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION LOGAND CONSTANT LOGOR ALLOCATE.PUP + LLSH) COMPILER::ENV-BIND-VARIABLE (CONS COMPILER::ENV-VENV) HASH-COMMA (CL:READ COMPILER::MAKE-EVAL-WHEN-LOAD + CL:EVAL EVAL) DIGITSBDP (LISPERROR NTYPX ADD1 IDIFFERENCE IGEQ LOLOC \LOLOC FLOAT IPLUS LLSH LRSH +LOGAND PLUS SUB1 FLTINTLOG) DECLARE%:1 (EVAL) CONCATT.IP (APPENDOP.IP) %%PRINT-DIRECTORY-COMPONENT ( +DECLARE %%DIRECTORY-COMPONENT-PATH CL:FORMAT) DINFO.UPDATE.HISTORY (LIST CONS PLUS ATTACHMENU FONTP +FUNCTION) HASH-R (READNUMBERINBASE CL:ERROR) TEMPLATE (GETHASH GETRELATION SELECTQ ERROR) TTYINSTRING +(IGREATERP FIRSTCHAR PLUS TTNEXTCHAR ALLOCSTRING) DECLARE%: (DECLARE%:1) %%PRINT-PATHNAME (DECLARE +CL:FORMAT CL:NAMESTRING) COMPILER::RELEASE-VAR-REF (COMPILER::VAR-REF-VARIABLE) COMP.STSETQ (IGREATERP + COMP.ST) RESETBUFS (CLBUFS APPLY) HASH-DOT (CL:EVAL CL:READ EVAL) BUILDGETRELQ (MSVBTABLES LIST KWOTE +) HASH-STAR (DECLARE PEEKC CL:READ CL:ERROR FINISH-READING-BITMAP READ-EXTENDED-TOKEN NCHARS +CL:MAKE-ARRAY SELCHARQ NTHCHARCODE) TITLEW.REPAINTFN (PRINTOUT PRIN1 WINDOWPROP) FILE-NAME (FULLNAME +MKSTRING) COMPILER::PRINT-ENV (DECLARE CL:FORMAT \HILOC \LOLOC) \EXTFTIMES (IPLUS LLSH LRSH LOGAND +LOGOR \EXTNORMALIZE IDIFFERENCE) SI::DELETE-ADVICE (REMHASH) GETBOXREGION (GETBOXSCREENREGION) DWMFY1 +(LIST FASSOC WTFIX0 CONS SELECTQ UNION DWIMIFY2 APPEND GETPROP NCONC MAPCAR FMEMB ARGTYPE NARGS) +\LIMITBYMIN (IMAX) INSIDEP (INSIDEP DSPCLIPPINGREGION INSIDE? \ILLEGAL.ARG) HASH-X (READNUMBERINBASE) +COPYINSERT (\INSUREWINDOW WFROMDS PROCESS.TTY TTY.PROCESS WINDOWPROP IMAGEOBJPROP APPLY* PROCESS.EVAL) + \STRINGIN (\SMALLPIN SUB1 LLSH IDIFFERENCE ALLOCSTRING ZEROP READCCODE PLUS) MSVBTABLES (MKLIST +SELECTQ MSUSERVBTABLES) REMPROPLIST (GETPROPLIST NLEFT) SI::GET-INSPECT-MACRO (DECLARE) +%%INITIALIZE-DEFAULT-PATHNAME (DECLARE CL:PARSE-NAMESTRING FILENAMEFIELD %%PATHNAME-VERSION) HASH-VBAR + (HASH-NO-PARAMETER-ERROR CL:VALUES) FB.HARDCOPY.MAXWIDTH (CHARWIDTH CL:NTH STRINGWIDTH) COMPARENCHARS + (\DTEST FUNCTION) ENDFILE (CLOSEF) SCALE.IP (APPENDOP.IP) CL::ASSIGN-SLOT-OFFSET (CL::PS-NAME +CL::PS-ALL-SLOTS) READHOTSPOT (ZEROP LOGAND CURSOR IPLUS LEFTOFGRIDCOORD IQUOTIENT BOTTOMOFGRIDCOORD +BITMAPCREATE BITSPERPIXEL CURSORCREATE LASTMOUSEX LASTMOUSEY) HASH-NUMBER-SIGN (CL:ASSOC CL:ERROR) +\TELERAIDCOMMAND (LOGAND LRSH LLSH \GETBASE SELECTQ \KEYNAMETONUMBER \TELERAIDBREAK \TELEKBDWAIT +\TELEBLTCURSOR) TTRATOM (TTSKIPSEPR TTYINBUFFERSTREAM RATOM) CLOSE-AND-MAYBE-DELETE (CLOSEF DELFILE) +\ITEMW.DESELECTITEM (WINDOWPROP) FORMAT-PRINT-HEXADECIMAL (FORMAT-PRINT-NUMBER) HASH-S ( +CREATE-STRUCTURE CL:READ) HASH-EQUAL (CL:VALUES CONS CL:READ) COMP.STVAR (COMP.ST) GETPUPSTRING ( +IDIFFERENCE \DTEST \GETBASESTRING ALLOCSTRING) UNSAVED1 (GET CONCAT FNCHECK) MSPATHOPTIONS (CONS +SELECTQ TERPRI MSEAT MSCANT LIST) HASH-STRUCTURE-LOOKUP (MEMQ) TERM.PRINTCHAR (\DTEST \CHARSET LRSH +\DSPGETCHARIMAGEWIDTH \GETBASE \DSPGETCHARWIDTH + - CL:FUNCALL TERM.NEWLINE MOVETO) FB.SORT.VERSIONS ( +SORT LIST LAST) FORMAT-PRINT-OCTAL (FORMAT-PRINT-NUMBER) \SEARCHPRESSFONTS (RESETLST \GETSTREAM LIST +GETFILEPTR OPENSTREAM UNION \GETPRESSFONTNAMES) COMPILER::ALPHA-FORM (COMPILER::ALPHA-ATOM) +%%NUMERIC-STRING-P (SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE) \EXTNORMALIZE ( +IDIFFERENCE LOGAND LLSH PLUS ADD1 SUB1) \LISP.TO.NSFILING.ATTRIBUTE (IDATE LISPERROR +\FILETYPE.FROM.TYPE UNFOLD LLSH ASSOC SELECTQ >= SMALLP FIXP PARSE.NSNAME LIST COURIER.CREATE +\ILLEGAL.ARG) FB.DECREASING.VERSION (NULL.VERSIONP IGREATERP) TERM.ADDLINE (\DTEST - TERM.ERASEBITS) +FORMAT-PRINT-BINARY (FORMAT-PRINT-NUMBER) \EXTFQUOTIENT (CL:VALUES LRSH LOGAND IPLUS LLSH PLUS +IDIFFERENCE .SUBSMALL. ADD1 .LLSH1. LOGOR \EXTNORMALIZE) CLISPEXPANSION (CL:VALUES COPY GETHASH) +MSJOINSET (PRIN1 MSJOINDETS MSJOIN) CL::ENSURE-CONSISTENT-PS (CL::PS-INCLUDE CL::PS-NAME CL::PS-TYPE +CL::PS-VECTOR-TYPE CL:ERROR CL::PS-INLINE CL::PS-CONSTRUCTORS CL::PS-PREDICATE CL::PS-COPIER +CL::PS-PRINT-FUNCTION CL::PS-NAMED CL::DEFAULT-PREDICATE-NAME CL:INTERN CL:CONCATENATE STRING +CL::PS-EXPORT LIST) INIT-CML-READTABLES (CMLRDTBL MAKE-READER-ENVIRONMENT CL:FIND-PACKAGE +COPYREADTABLE PLUS SETBRK) TYPERECORD (DECLARERECORD CONS) SEDIT::HASFAT (SUB1 IPLUS ADD1 \GETBASEFAT +\GETBASE \GETBASETHIN \GETBASEBYTE) GRAYBOXAREA (FIXP IDIFFERENCE IPLUS ITIMES BLTSHADE DSPTEXTURE) +LISPINTERRUPTS.WHEELSCROLL (APPEND LISPINTERRUPTS.WSORIG) HASH-QUOTE (LIST CL:READ) CMLREADSEMI ( +READCCODE CL:VALUES) \CONVERT.FLOATING.NUMBER (DECLARE WITH-RESOURCE CL:MACROLET - SUBSTRING CL:1+ +GETRESOURCE NEWRESOURCE CL:MAKE-ARRAY) COMP.LOOKUPCONST (SOME NCONC1) EDITMOVENODE (WINDOWPROP PRIN1 +NODELST/AS/MENU CURSORPOSITION LOGAND) SETLASTC (\BOUT) COMPILER::EFFECTS-ANALYZE-PROGN ( +COMPILER::EFFECTS-ANALYZE-LIST COMPILER::PROGN-STMTS) WBOX (BLTSHADE DSPTEXTURE IPLUS IDIFFERENCE +ITIMES) CL:TRUNCATE (CL::%%INTEGER-COERCE-MACRO) \TEDIT.SCALE (FIXR FTIMES) \LFMakeVolumeDirectory ( +UNINTERRUPTABLY \LFGenFileID \PFVolumeNumber \PFNewPages PACKFILENAME.STRING \LFDirectoryP) DWIMIFY0? +(DWMFY0) COMPILER::EFFECTS-ANALYZE-RETURN (COMPILER::EFFECTS-ANALYZE COMPILER::RETURN-VALUE +COMPILER::NODE-EFFECTS COMPILER::EFFECTS-UNION LIST COMPILER::RETURN-BLOCK COMPILER::NODE-AFFECTED) +HASH-O (READNUMBERINBASE) \IBMINCCODEFN (\RECODECCODE \BIN) CL:LOG (QUOTIENT CL:LOG) COMPAREPRINTN ( +IPLUS POSITION LINELENGTH SPACES) FASL-FILEDATE (BIN FASL::CONVERT-FASL-DATE FASL:PROCESS-FILE +CL:FUNCTION) CL:MAKE-ARRAY (LIST CL:ERROR LENGTH %%TOTAL-SIZE %%GET-CANONICAL-CML-TYPE +CL:ARRAY-ELEMENT-TYPE + CL:ARRAY-TOTAL-SIZE %%MAKE-DISPLACED-ARRAY %%MAKE-GENERAL-ARRAY +%%MAKE-ONED-ARRAY %%MAKE-TWOD-ARRAY) SEDIT::INSERT-LITATOM (SEDIT::INSERT-STRING SEDIT::TRANSLATE-CHARS +) COMPILER::RELEASE-THROW (COMPILER::RELEASE-TREE COMPILER::THROW-TAG COMPILER::THROW-VALUE) +COMPILER::PRINT-CONTEXT (DECLARE COMPILER:CONTEXT-TOP-LEVEL-P COMPILER:CONTEXT-VALUES-USED +COMPILER:CONTEXT-PREDICATE-P COMPILER::CONTEXT-APPLIED-CONTEXT CL:MACROLET COMPILER::OUTPUT CL:FORMAT) + CL::%%COPY-TIME-STATS (CL::%%MOVE-FIXP-FIELD MISCSTATS) SI::ADD-ADVICE (CL:GETHASH SI::MAKE-ADVICE) +CL:SPECIAL-FORM-P (GET) MSFAIL (STKPOS FUNCTION STKNTH STKARG TERPRI) CL::PS-NUMBER-OF-SLOTS (CL:LENGTH + CL::PS-ALL-SLOTS) MSBLOCK (MSSEEKTYPE) \MAIKO.BITBLTSUB (OPCODES) TTREADLIST (TTYINBUFFERSTREAM READ +LIST) MB.CREATE.NWAYBUTTON (IMAGEOBJCREATE FONTCREATE FONTPROP MAPCAR STRINGWIDTH BITMAPCREATE LIST +DSPCREATE IPLUS SORT COPY SUB1 PLUS ITIMES LENGTH) GLOBAL-MACRO-FUNCTION (GET ARGTYPE GETPROP FUNCTION +) PARSE-NAMESTRING1 (CONS SUB1 LITATOM CL:STRINGP NUMBERP LIST NTHCHARCODE \UPF.NEXTPOS DREVERSE IPLUS + LASTCHPOS PLUS SELCHARQ ADD1 STRPOS NTHCHAR) COMPILER::RELEASE-TAGBODY (COMPILER::TAGBODY-REFERENCES COMPILER::TAGBODY-FRAME MAPC COMPILER::TAGBODY-SEGMENTS COMPILER::SEGMENT-STMTS COMPILER::RELEASE-TREE -) SEDIT::STRUCTURE-FROM-STRING (CL:VALUES) CLISPFORINITVAR (CONS LIST GETDUMMYVAR NCONC1) -COMPILER::NODE-TYPE-NAME (COMPILER::CONSTRUCT-COMPILER-SYMBOL) LITATOM (OPCODES) -COMPILER::EFFECTS-ANALYZE-MV-PROG1 (COMPILER::EFFECTS-ANALYZE-LIST COMPILER::MV-PROG1-STMTS) -\\CLOSEIPSTREAM (FFETCHFIELD ENDMASTER.IP) \\BLKFABSMAX.UFN (\\GETBASEFLOATP SUB1 FABS IPLUS PLUS) -CL::%2/PI (CL::%FLOAT) \\SCANFORNTENTRY (IPLUS FFETCHFIELD GETSTKNAMEENTRY GETSTKNTOFFSETENTRY -\\INDEXATOMVAL \\VAG2 LRSH LOGAND PLUS CONSTANT WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY) -GRAPHBUTTONEVENTFN (GETSTREAM LOGAND NODELST/AS/MENU CURSORPOSITION LOGOR APPLY* SELECTQ SHOULDNT -WINDOWPROP) COMPILER::RELEASE-SETQ (COMPILER::RELEASE-TREE COMPILER::SETQ-VALUE) TEDIT.ADD.STYLESHEET -(APPEND LIST) CL:POSITION-IF (CL:LENGTH COMPLEX-POSITION-IF SIMPLE-POSITION-IF) \\BLKFABSMIN.UFN ( -\\GETBASEFLOATP SUB1 FABS IPLUS PLUS) SEDIT::STRUCTURE-FROM-SELECTION (FFETCHFIELD) -|\\PFFindRootDirEntry| (|\\PFFindRootDirEntryNum| MESAELT \\BLT \\ALLOCBLOCK LRSH ADD1 MESASIZE -FMESAELT \\ADDBASE LOCF IPLUS ILEQ ITIMES IDIFFERENCE FFETCHFIELD) CL:PEEK-CHAR (DECLARE \\GETSTREAM -SELECTQ \\PEEKCCODE \\CHECKEOLC SELCHARQ SELECTC UNINTERRUPTABLY \\DTEST \\XCCSIN \\BIN IDIFFERENCE -\\NSIN.24BITENCODING.ERROR UNFOLD LLSH ACCESS-CHARSET LOGOR CL:FUNCALL FFETCHFIELD \\PEEKBIN -\\BACKXCCSCHAR PLUS SUB1 \\NSPEEK \\XCCSPEEK CL:CODE-CHAR SKIPSEPRCODES \\EOF.ACTION CL:CHAR-CODE -\\ILLEGAL.ARG) \\CLISPKEYWORDPROCESS (FMEMB NCONC LDIFF) CL:PLUSP (>) GETBLOCKDEC (LOADFNS-FINDFILE -FILECOMSLST SUBSET LITATOM LIST) CL::%GET-TIMING-INFO (CL:VALUES-LIST) SEDIT::CREATE-PRETTY-PRINT-ENV -(FONTCREATE CHARWIDTH FIXR TIMES FFETCHFIELD FREPLACEFIELDVAL NCREATE SEDIT::CREATE-CONSTANT-STRINGS) -COMPILER::META-EVAL-RETURN (COMPILER::MEVAL COMPILER::META-EVALUATE COMPILER::RETURN-VALUE -COMPILER::BLOCK-CONTEXT COMPILER::RETURN-BLOCK REPLACEFIELD COMPILER::ANALYZE-TREE COMPILER::NODE-META-P -) ENVEVAL (\\STACKARGPTR \\EVAL) CL:NSTRING-DOWNCASE (WITH-ONE-STRING-ONLY %STRING-DOWNCASE) -COMP.MACRO (SELECTQ COMP.CALL COMP.ARGTYPE COMP.PUNT BLKAPPLY* APPLY CONS COMP.LAMBDA MACROEXPANSION -COMP.EXP1) FINDATS (FMEMB FINDATS) \\PRINTBF (SUB1 IDIFFERENCE FOLDLO LRSH FFETCHFIELD ADDSTACKBASE -\\VAG2 \\SCANFORNTENTRY TERPRI MAKE-NTENTRY GETBASEPTR \\GETBASEPTR PLUS SPACES) CL:PROBE-FILE ( -PATHNAME FFETCHFIELD INFILEP \\GETFILENAME) DBG::FIND-ORIGINAL-NAME-AND-DEFINITION (STKNAME CL:VALUES -DBG::STKPTR-CCODE CL:FIRST MKLIST CL:SECOND GETD GET) \\CANONICALIZE.NSADDRESS (FFETCHFIELD LOCF -\\ADDBASE NCREATE FRPLACD CONS) INITSEQUIN (OPENPUPSOCKET CREATE.MONITORLOCK CREATE.EVENT ADD.PROCESS -LIST FREPLACEFIELD) BCPLVERSION (FFETCHFIELD) MAP (APPLY*) CL:PROVIDE (DECLARE CL:SYMBOL-NAME CL:PUSHNEW - CL:FUNCTION) |UnixPrint| (LISTGET PRINTERTYPE CHCON1 UNPACKFILENAME.STRING NCHARS NLSETQ FILDIR -PACKFILENAME |UnixTempFile| IGREATERP DIFFERENCE IDATE GETFILEINFO DELFILE) EQCLOOKS (FFETCHFIELD) -TEDIT.FIND (TEXTOBJ FFETCHFIELD MKSTRING CONS SELECTQ \\TEDIT.PARSE.SEARCHSTRING MAPCAR CHCON -CHARACTER LIST \\TEDIT.SUBST.FN1 \\TEDIT.FIND.WC TEDIT.FIND SUB1 IPLUS NCHARS \\TEDIT.BASICFIND) -\\BLKFLOATP2COMP.UFN (SUB1 \\ADDBASE LLSH \\GETBASEFLOATP PLUS) |\\PFGetRootDirectory| ( -|\\GetRootDirectoryType| |\\PFVolumeNumber| FREPLACEFIELDVAL NCREATE |\\VFMGetPageGroup| FFETCHFIELD) -CL:COMPILED-FUNCTION-P (TYPEP FFETCHFIELD) CL:POSITION-IF-NOT (CL:LENGTH COMPLEX-POSITION-IF-NOT -SIMPLE-POSITION-IF-NOT) \\BLKFMAX.UFN (\\GETBASEFLOATP SUB1 IPLUS PLUS) \\BLKEXPONENT.UFN (SUB1 -\\GETBASEFLOATP LLSH FFETCHFIELD PLUS) \\GET-NEXT-RUN (+ CL:ASH) CL:PPRINT (TERPRI WRITE CL:VALUES) -ONEDINSPECT.SELECTITEM (WINDOWPROP WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES -XCL::PROFILE-VALUES STRINGWIDTH APPLY* FONTPROP FREPLACEFIELDVAL NCREATE) TEMPLATE (GETHASH -GETRELATION SELECTQ ERROR) \\NOTE.10TO3 (\\DTEST FFETCHFIELD LOGAND RPLACA NCREATE LOCF \\ADDBASE CONS - LIST CLOCK) FORMAT-PRINT-OCTAL (FORMAT-PRINT-NUMBER) LOADFNS-FINDFILE (EDITLOADFNS? NARGS ERROR) -RELEASINGVMEMPAGE (FINDPTRSBUFFER) LOADBLOCK (LOADFNS-FINDFILE SUBSET GETBLOCKDEC LIST VIRGINFN -LOADFNS) CL::%STATS-OBJECT-DIFFERENCE (CL::STATS-OBJECT-DATA-COUNTERS CL::STATS-OBJECT-TIME-BLOCK -CL::STATS-OBJECT-ELAPSED-TIME FFETCHFIELD) SEDIT::CREATE-PRELINEARIZED-NODE (SEDIT::CREATE-SIMPLE-NODE - ADD1 FFETCHFIELD) COMPILER::META-EVAL-PROGV (COMPILER::MEVAL COMPILER::META-EVALUATE -COMPILER::PROGV-SYMS-EXPR REPLACEFIELD COMPILER::PROGV-VALS-EXPR COMPILER::PROGV-STMT COMPILER::ANALYZE-TREE - COMPILER::NODE-META-P) \\TEDIT.APPLY.PAGEFORMATTING (FFETCHFIELD WINDOWPROP ADD1 -MBUTTON.FIND.NEXT.BUTTON IMAGEOBJPROP MBUTTON.NEXT.FIELD.AS.NUMBER SELECTQ U-CASE -MBUTTON.NEXT.FIELD.AS.TEXT MBUTTON.NEXT.FIELD.AS.ATOM CONCAT LIST PLUS \\TEDIT.PARSE.CHARLOOKS.MENU -CONS TEDIT.SINGLE.PAGEFORMAT COPY \\TEDIT.ORIGINAL.WINDOW.TITLE) COMP.PROG1 (COMP.EXP1 COMP.EXPR -COMP.EFFECT) EDITFROMFILE (RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION ROOTFILENAME ASKUSER REMOVE GETPROP FILECOMSLST GETDEF EDITDEF) CL:MASK-FIELD (BYTE-SIZE -CL:BYTE-POSITION LOGAND CL::%MAKE-BYTE-MASK-1) COMPILER::EFFECTS-ANALYZE-MV-CALL ( -COMPILER::EFFECTS-ANALYZE-ANY-CALL COMPILER::MV-CALL-FN COMPILER::MV-CALL-ARG-EXPRS) MAXSTRINGWIDTH ( -IMAX STRINGWIDTH) \\BLKFDIFF.UFN (LLSH SUB1 FDIFFERENCE \\GETBASEFLOATP PLUS) SEDIT::SET-SELECTION-NOWHERE - (FREPLACEFIELD) COMPILER::RELEASE-RETURN (COMPILER::RELEASE-TREE COMPILER::RETURN-VALUE -COMPILER::RETURN-BLOCK) TEDIT.PUSH.STYLESHEET (APPEND) \\BLKFMIN.UFN (\\GETBASEFLOATP SUB1 IPLUS PLUS) - CL:PHASE (CL:ATAN CL::COMPLEX-IMAGPART CL::COMPLEX-REALPART) CL:READ-CHAR-NO-HANG (CL:READ-CHAR -\\EOF.ACTION) CL:PARSE-NAMESTRING (DECLARE UNPACKFILENAME.STRING SUBSTRING + CL:VALUES CL:MAKE-PATHNAME - LISTGET %MAKE-DIRECTORY-COMPONENT MKATOM) \\BLKPERM.UFN (SUB1 \\GETBASE PLUS) EXPRP (\\DEFCELL -\\ATOMCELL FFETCHFIELD) CL:READ-FROM-STRING (OPENSTRINGSTREAM SUBSTRING IMIN NCHARS MKSTRING CL:VALUES - CL:READ-PRESERVING-WHITESPACE CL:READ \\GETFILEPTR SPREADAPPLY* FFETCHFIELD) CL:RANDOM (CL:ERROR -CL::%RANDOM) \\MEDW.REDISPLAYW (FFETCHFIELD WINDOWPROP FUNCTION DSPCLIPPINGREGION INTERSECTREGIONS -RESETLST RESETSAVE LIST DSPXOFFSET DSPYOFFSET FILLWITHBACKGROUND DOUSERFNS2) CL:PATHNAME-VERSION ( -%PATHNAME-VERSION PATHNAME) \\MEDW.BURYW (\\INSUREWINDOW ORDERFROMBOTTOMTOTOP OVERLAPPINGWINDOWS -REMOVE LDIFFERENCE ALLATTACHEDWINDOWS REVERSE \\CLOSEW1 \\OPENW1) FASSOC (FASSOC) \\BLKSEP.UFN (LLSH -SUB1 IDIFFERENCE IPLUS FPLUS \\GETBASEFLOATP FDIFFERENCE PLUS) CL::%PI/6 (CL::%FLOAT) FNCHECK (GETD -NLSETQ MISSPELLED? FUNCTION SYSTEMTYPE WHEREIS GETP FILECOMSLST PACK* ERROR STKPOS) CL:READ-BYTE ( -\\GETSTREAM SPREADAPPLY* FFETCHFIELD \\BIN) POSTSCRIPTSEND (SELECTQ MKATOM UNIX-GETPARM DOSPRINT -|UnixPrint|) \\TEDIT.TEXTBIN.NEW.PAGE (FFETCHFIELD \\GETSTREAM OPENFILE \\BIN IMIN IDIFFERENCE LOGOR -UNFOLD LLSH \\PAGEDBIN) \\BLKFTIMES.UFN (LLSH SUB1 FTIMES \\GETBASEFLOATP PLUS) SEDIT::SET-SELECTION-ME - (FREPLACEFIELD) SPY.COPYBUTTON (SPY.GRAPH.EDITOR) DBG::FIND-DEBUGGER-STACK-FRAME (DECLARE -FIND-DEBUGGER-ENTRY-FRAME) \\HANDLE.NS.ROUTING.INFO (FFETCHFIELD LOCF \\ADDBASE SUB1 FOLDLO LRSH - -\\CANONICALIZE.NSADDRESS \\TRANSLATE.10TO3 \\GETBASEPTR UNFOLD LLSH LOGAND SETUPTIMER CONS FRPLACA -\\RELEASE.ETHERPACKET) CLOSESEQUIN (FFETCHFIELD) CL:REM (IREMAINDER FLOAT - CL:* UFIX FQUOTIENT -XCL::STRUNCATE) LISPXREPRINT (\\GETSTREAM PRIN1 PRIN2 CL:APPLY SELECTQ APPLY* TAB TERPRI APPLY CONS) -SYSTEMTYPE (SYSTEMTYPE) TEDIT.NORMALIZECARET (TEXTOBJ) \\BRUSHCONVERT.HCPYMODE (MAPCAR) COMPILER::GENCODE-CALL - (COMPILER::CALL-FN COMPILER::CALL-ARGS CL:LENGTH COMPILER::VAR-REF-VARIABLE COMPILER::VARIABLE-KIND -COMPILER::VARIABLE-NAME COMPILER::LAMBDA-REQUIRED COMPILER::LAMBDA-OPTIONAL COMPILER::GENCODE CL:REVERSE - COMPILER::LITERAL-VALUE CL:FIRST COMPILER::LAMBDA-NO-SPREAD-NAME CL:SECOND CL:MAPCAR CL:FUNCTION -COMPILER::LAMBDA-CLOSED-OVER-VARS NCONC COMPILER::COLLECT-CODE COMPILER::VARIABLE-SCOPE CL:THIRD) -FORMAT-PRINT-BINARY (FORMAT-PRINT-NUMBER) PACK* (WITH-RESOURCE \\MKATOM %ARRAY-BASE FFETCHFIELD SUB1 -ARG \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT NAMESTRING-CONVERSION-CLAUSE PLUS NCHARS ADD1 CL:FIRST -IDIFFERENCE SUBSTRING IPLUS GETRESOURCE NEWRESOURCE ALLOCSTRING) \\MISC5.UFN (RAID) \\EP.PUT.AUX ( -FFETCHFIELD ASSOC CREATECELL CONS) TYPERECORD (DECLARERECORD CONS) \\MISC6.UFN (SELECTQ -\\FBITMAPBIT.UFN RAID) KILL.LINES (FRPLACA FRPLACD FLAST) CL:REMOVE-IF-NOT (CL:LENGTH -COMPLEX-REMOVE-IF-NOT SIMPLE-REMOVE-IF-NOT) \\BLTSHADE.IP (INTERSECTREGIONS FFETCHFIELD CREATEREGION -DSPOPERATION INSURE.B&W.TEXTURE) CL:REDUCE (CL:LENGTH REDUCE-FROM-END REDUCE-FROM-START) \\BACKTRACE ( -NUMFORMATCODE LIST PRIN1 PLUS \\STKNAME ADDSTACKBASE \\VAG2 IDIFFERENCE FFETCHFIELD FLOOR LOGAND -CONSTANT LOGXOR SUB1) \\BLKMAG.UFN (SUB1 LLSH \\GETBASEFLOATP IPLUS FPLUS FTIMES PLUS) CL:RENAME-FILE -(PATHNAME RENAMEFILE FFETCHFIELD CL:VALUES CL:MERGE-PATHNAMES CL:ERROR) CL:READ-LINE (\\GETSTREAM -SPREADAPPLY* FFETCHFIELD RSTRING CL:VALUES) CLISPDSUBST (SELECTQ FRPLACA CLISPDSUBST GETHASH GETP) -ERRORSTRING (NTH ADD1 NUMBERP) CL:REMOVE-DUPLICATES (CL:LENGTH COMPLEX-REMOVE-DUPLICATES -SIMPLE-REMOVE-DUPLICATES) \\CCODEARGLIST (FFETCHFIELD - FOLDLO LRSH + UNFOLD LLSH \\CCODEIVARSCAN -\\GETBASEPTR MKATOM LIST SUB1 ASSOC PACK* PLUS SELECTQ) CHANGETRAN (RECORDTRAN) \\BLKFPLUS.UFN (LLSH -SUB1 FPLUS \\GETBASEFLOATP PLUS) CL:REMOVE-IF (CL:LENGTH COMPLEX-REMOVE-IF SIMPLE-REMOVE-IF) -%STRING-DOWNCASE (%ARRAY-BASE %ARRAY-OFFSET %ARRAY-TYPE-NUMBER) TOGGLE/DIRECTEDFLG (WINDOWPROP FRPLACA - DSPTEXTURE REDISPLAYGRAPH) \\NSRANDOM.OPENFILE (SHOULDNT FFETCHFIELD \\ILLEGAL.ARG -\\NSFILING.OPENFILE) SCANX (CONS IPLUS IDIFFERENCE \\SGN ITIMES IQUOTIENT) CONSTANTS (HASHARRAY -PUTHASH LIST) GETPROP (GETPROPLIST) \\CCODEIVARSCAN (UNFOLD LLSH \\INDEXATOMVAL \\VAG2 LRSH LOGAND -GETNAMEENTRY CONSTANT SUB1 BYTESPERNAMEENTRY WORDSPERNAMEENTRY LOGOR CODEBASELT \\GETBASEBYTE LOGXOR -IPLUS PLUS NTSLOT-VARTYPE GETNTOFFSETENTRY BYTESPERNTOFFSETENTRY CONS NTSLOT-OFFSET) DISPLAYLINK ( -GN/LEFT GN/RIGHT DISPLAYLINK/RL DISPLAYLINK/LR GN/BOTTOM GN/TOP DISPLAYLINK/BT DISPLAYLINK/TB) -SETERRORN (ERRM-TO-CONDITION) CL:SCALE-FLOAT (FLOAT \\MAKEFLOAT +) CLISPFOR4 (SELECTQ SOME CLISPFOR4) -CL:SEARCH (CL:LENGTH -) BSPINPUTSTREAM (\\DTEST FFETCHFIELD) CL:REQUIRE (DECLARE) LISPERROR (PLUS -\\LISPERROR) TWODINSPECT.DOWINDOWCOMFN (MENU GETREGION FUNCTION CONS MAINWINDOW) \\ARG.NOT.LITATOM ( -LISPERROR) \\DUMP.COURIERPROGRAMS (\\GET.COURIERPROGRAM GETHASH PRIN2 PRINTDEF) CL:ROOM (STORAGE.LEFT -ROUND CL:* CL:SECOND CL:FIFTH + - VMEMSIZE CL:ASH) \\MEDW.SHAPEW (\\INSUREWINDOW WINDOWPROP -FFETCHFIELD MINIMUMWINDOWSIZE CREATEREGION IMAX GETREGION WINDOWREGION APPLY* MOVEW COPYALL) -\\TRANSLATE.3TO10 (ASSOC \\DTEST FFETCHFIELD \\ALLOCATE.ETHERPACKET LOCF \\ADDBASE) BRKDWNRESULTS1 ( -IMINUS BRKDWNELT ELT PLUS FQUOTIENT LIST) COMPILER::EFFECTS-ANALYZE-LITERAL (COMPILER::LITERAL-VALUE -COMPILER::NODE-EFFECTS COMPILER::NODE-AFFECTED) DBG::DEBUGGER-MENU-HELP (PRINTOUT PRIN1 CL:THIRD -CL:DOCUMENTATION CL:FIRST CL:FOURTH GETHASH) |\\VAMInit| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION |\\VAMBufferInit|) MACROEXPANSION (SELECTQ CONS EXPANDOPENLAMBDA -EXPAND-DEFMACRO SUBPAIR APPLY) CL::%-PI/4 (CL::%FLOAT) CL:SINH (CL:EXP / - CL::%EXP-FLOAT FQUOTIENT) -COMPILER::RELEASE-PROGV (COMPILER::RELEASE-TREE COMPILER::PROGV-SYMS-EXPR COMPILER::PROGV-VALS-EXPR -COMPILER::PROGV-STMT) GETMACROPROP (GETPROP) %STRING-UPCASE (%ARRAY-BASE %ARRAY-OFFSET -%ARRAY-TYPE-NUMBER) \\PRINTSTK (GETBASE \\GETBASE ADD1 SPACES) FORMAT-PRINT-DECIMAL ( -FORMAT-PRINT-NUMBER) MAKEINITBFS (\\ALLOCBLOCK EVQ FOLDHI LRSH IPLUS + PLUS UNSIGNED LOGAND SUB1 LLSH) - SEDIT::CREATE-NODE (LIST FREPLACEFIELDVAL NCREATE ADD1 FFETCHFIELD SEDIT::CREATE-WEAK-LINK) -COMPILER::META-EVAL-PROGN (MAP COMPILER::PROGN-STMTS COMPILER::MEVAL COMPILER::META-EVALUATE RPLACA -COMPILER::ANALYZE-TREE COMPILER::REMOVE-NESTED-PROGNS COMPILER::EXPAND-NESTED-PROGNS REPLACEFIELD LIST - COMPILER::NODE-META-P) COMP.VAR (COMP.LOOKUPVAR ASSOC COMP.BOX) MAKE-CONDITION (CL:APPLY) -CL:SOFTWARE-VERSION (CL:CONCATENATE CL:LISP-IMPLEMENTATION-VERSION) XCCSSTRING (CONCAT OCTALSTRING -LRSH LOGAND) \\BLKSMALLP2FLOAT.UFN (SUB1 LLSH FLOAT \\GETBASE PLUS) CL:SOME (%SOME-SINGLE -%SOME-MULTIPLE CONS) ONEDINSPECT.REDISPLAY (LIST WINDOWPROP MAPCAR APPLY* XCL::PROFILIZE CL:PROGV -XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES STRINGWIDTH FONTPROP INSPECT.INVERTSELECTION -RIGHTW.REPAINTFN) \\MEDW.EXPANDW (WINDOWPROP APPLY*) \\BITBLT.HCPYMODE (\\BITBLT.DISPLAY -\\DASHINGCONVERT.HCPYMODE) BRKDWNRESULTS2 (APPLY* FQUOTIENT FIX FPLUS FTIMES) CL:SLEEP (DISMISS ROUND -CL:*) \\RECLAIMCODEBLOCK (XCL::GET-IMPLICIT-KEY-HASH OPCODES FFETCHFIELD FUNCTION) GRAPHADDLINK ( -FRPLACA CONS) \\TEXTSETEOF (FOLDLO LRSH MOD IMOD FREPLACEFIELD) CLISPFORF/L (LIST) CL:VALUES (\\VALUES - \\MYALINK OPCODES FFETCHFIELD ADDSTACKBASE \\VAG2 \\GETBASEBYTE LIST IDIFFERENCE \\INDEXATOMDEF LRSH -LOGAND FREPLACEFIELD ARG PLUS + - SIGNED SUB1 LLSH CONSTANT \\FINDOP) PRIN2 (\\GETSTREAM \\GTREADTABLE - FFETCHFIELD \\OUTTERMP .FILELINELENGTH. SELECTC) SEDIT::CREATE-GAP-NODE (SEDIT::LINEAR-ITEM-WIDTH -FFETCHFIELD LIST FREPLACEFIELDVAL NCREATE CONS SEDIT::CREATE-WEAK-LINK) COMPILER::META-EVAL-OPCODES ( -COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) CREATEHASHFILE (FIND1STPRIME FIX FTIMES MAX OPENSTREAM -LOGAND RSH BOUT SELECTQ ADD1 ITIMES PLUS SYSTEMTYPE CLOSEF FFETCHFIELD ARRAY FULLNAME SETA ELT -SETHASHSTATUS) COMP.CONST (COMP.STCONST) \\SIMULATE.UNBIND (FFETCHFIELD ADDSTACKBASE \\VAG2 -STACKADDBASE IPLUS - LOGXOR PLUS \\MYALINK OPCODES IDIFFERENCE FREPLACEFIELD) SEDIT::TTYEXITFN ( -PROCESSPROP WINDOWPROP PROCESS.EVAL LIST) SPYOBJ.COPYIN (HELP) DBG::DEBUGGER-EVAL (CL:VALUES-LIST) -\\DRAWELLIPSE.PRESS (SIN COS LIST CREATEPOSITION PLUS FTIMES DIFFERENCE) CL:VALUES-LIST (\\VALUES -\\MYALINK OPCODES FFETCHFIELD ADDSTACKBASE \\VAG2 \\GETBASEBYTE LIST IDIFFERENCE \\INDEXATOMDEF LRSH -LOGAND FREPLACEFIELD PLUS + - SIGNED SUB1 LLSH CONSTANT \\FINDOP) CL::%PI/4 (CL::%FLOAT) -COMPILER::RELEASE-PROGN (CL:MAPC CL:FUNCTION COMPILER::PROGN-STMTS) SEDIT::SUBSTITUTE-OBJ ( -SEDIT::CLOSE-OPEN-NODE SEDIT::CLOSE-NODE SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW FFETCHFIELD -SEDIT::PSEUDO-SELECTION-FROM-SELECTION) SPYOBJ.DISPLAY (FFETCHFIELD SPYOBJ.HEIGHT QUOTIENT DIFFERENCE -FONTHEIGHT PRIN3 SPYOBJ.LABEL) DBG::NEAR-BY-REGION (CL:MOD + - CONS) XIPAPPEND.CELL (\\DTEST UNFOLD -LLSH IDIFFERENCE CEIL LOGAND IPLUS FFETCHFIELD LOCF \\ADDBASE CONSTANT SUB1 LOGXOR FOLDLO LRSH \\HINUM - \\LONUM) NESTED.SUBMENU (GETMENUPROP FASSOC CONS FFETCHFIELD IMAX FREPLACEFIELDVAL NCREATE) CL::%PI/3 - (CL::%FLOAT) CL:STRING-LEFT-TRIM (WITH-STRING CL:SUBSEQ) \\BLTSHADE.HCPYMODE (\\BLTSHADE.DISPLAY -\\DASHINGCONVERT.HCPYMODE) \\TEDIT.INSPECTCODE (OPENSTREAM FUNCTION OPENTEXTSTREAM DECODE.WINDOW.ARG -CONCAT FFETCHFIELD TEDIT.FIND IMAX IDIFFERENCE) NTYPX (LOGAND \\GETBASE FOLDLO LRSH IPLUS LLSH \\HILOC - \\LOLOC) CL:STREAM-EXTERNAL-FORMAT (\\EXTERNALFORMAT) \\PUTBASEBITS (\\PUTBASEBITS \\ADDBASE FOLDLO -LRSH IMOD DIFFERENCE RSH \\PUTBASE DEPOSITBYTE LOGOR BITCLEAR LOGAND LOGNOT MASK.1\'S LSH SUB1 -\\GETBASE) SEDIT::CREATE-ENVIRONMENTS (SEDIT::CREATE-COMMAND-TABLE LIST FONTCREATE CHARWIDTH FUNCTION -ITIMES FREPLACEFIELDVAL NCREATE SEDIT::CREATE-CONSTANT-STRINGS) COMPILER::META-EVAL-MV-PROG1 ( -COMPILER::MV-PROG1-STMTS COMPILER::META-EVALUATE CL:FIRST RPLACA COMPILER::EXPAND-NESTED-PROGNS CL:REST - RPLACD) \\TEDITPAGEMENU.CREATE (\\TEXTMENU.DOC.CREATE APPEND LIST FONTCREATE CONS) COMP.USERFN (LIST -ERROR GETHASH MAPCAR APPLY*) PRINTROUTINGTABLE (NTYPX CL:ERROR \\GETSTREAM NCONC APPEND \\GETBASEPTR -PLUS \\ADDBASE CONSTANT + NCHARS - TERPRI SORT FUNCTION IMAX PRINTNUM |printout|) SEDIT::UPDATE-TITLE -(WINDOWPROP FFETCHFIELD) CL:STRING-NOT-GREATERP (%PARSE-STRING-ARGS WITH-TWO-UNPACKED-STRINGS -%STRING-BASE-COMPARE-EQUAL - %ARRAY-READ +) COMPILER::EFFECTS-ANALYZE-LABELS (COMPILER::EFFECTS-ANALYZE - COMPILER::LABELS-BODY COMPILER::NODE-EFFECTS COMPILER::NODE-AFFECTED) \\NSFILING.GETFILEINFO ( -\\NSFILING.GET/SETINFO FUNCTION \\FILING.ATTRIBUTE.TYPE ASSOC CONSTANT GETEOFPTR LOGAND FFETCHFIELD -LOGOR GETFILEPTR SELECTQ FOLDHI LRSH IPLUS LIST \\NSFILING.GETFILE \\NSFILING.FILLIN.ATTRIBUTES -\\NSFILING.GETFILEINFO.FROM.PLIST) INITX (IDIFFERENCE \\SGN IPLUS IQUOTIENT ITIMES) CL::VALUES-LIST-UFN - (\\GETBASEPTR \\VALUES-UFN \\MYALINK OPCODES IDIFFERENCE ADDSTACKBASE \\VAG2 FFETCHFIELD -\\GETBASEBYTE LIST \\INDEXATOMDEF LRSH LOGAND + IPLUS LLSH LOLOC \\LOLOC FREPLACEFIELD PLUS - SIGNED -SUB1 CONSTANT \\FINDOP) CL:STRING-NOT-LESSP (%PARSE-STRING-ARGS WITH-TWO-UNPACKED-STRINGS -%STRING-BASE-COMPARE-EQUAL - %ARRAY-READ +) \\TEXTOUTCHARFN (\\INSERTCH FFETCHFIELD) -COMPILER::EFFECTS-ANALYZE-LAMBDA (COMPILER::LAMBDA-BODY COMPILER::LAMBDA-APPLIED-EFFECTS -COMPILER::EFFECTS-UNION COMPILER::NODE-EFFECTS COMPILER::LAMBDA-APPLIED-AFFECTED COMPILER::NODE-AFFECTED -) XIPAPPEND.IFSSTRING (XIPAPPEND.STRING) ARRAYBLOCK (DECLARERECORD CONS) SEDIT::STRINGWIDTH (MKSTRING -ITIMES CHARWIDTH SEDIT::ESCAPE-CHAR FFETCHFIELD SUB1 %ARRAY-OFFSET %ARRAY-BASE IPLUS -%ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE PLUS STRINGWIDTH) -CL:STRING-LESSP (%PARSE-STRING-ARGS WITH-TWO-UNPACKED-STRINGS %STRING-BASE-COMPARE-EQUAL - %ARRAY-READ - +) COMPILER:OPTIMIZE-AND-MACROEXPAND (COMPILER:OPTIMIZE-AND-MACROEXPAND-1 CL:VALUES) CL::VALUES-UFN ( -\\VALUES-UFN \\MYALINK OPCODES IDIFFERENCE ADDSTACKBASE \\VAG2 FFETCHFIELD \\GETBASEBYTE LIST -\\INDEXATOMDEF LRSH LOGAND + IPLUS LLSH SUB1 \\GETBASEPTR PLUS LOLOC \\LOLOC FREPLACEFIELD - SIGNED -CONSTANT \\FINDOP) MAKEFILES (RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION MKLIST ROOTFILENAME GETPROP MAKEFILE) MAPFILES (MAPC MAPFILES NTHCHARCODE -DIRECTORY.FILL.PATTERN CL:APPLY MAPFILES1 INFILEP) CL:STRING-NOT-EQUAL (%PARSE-STRING-ARGS -WITH-TWO-UNPACKED-STRINGS %STRING-BASE-COMPARE-EQUAL -) \\MEDW.SHRINKW (\\INSUREWINDOW DOUSERFNS -WINDOWPROP CREATEWFROMIMAGE BITMAPCOPY FFETCHFIELD \\DTEST APPLY* POSITIONP FUNCTION -ICONPOSITION.FROM.WINDOW CONS) CL::%COMPLEX-TREE-EQUAL (CL::%COMPLEX-TREE-EQUAL CL:FUNCALL) BRKDWNFORM - (CONS ASSOC LIST) CL:STRING-DOWNCASE (WITH-ONE-STRING %STRING-DOWNCASE COPY-VECTOR CL:MAKE-STRING) -CL:STRING-UPCASE (WITH-ONE-STRING %STRING-UPCASE COPY-VECTOR CL:MAKE-STRING) CL:STRING-GREATERP ( -%PARSE-STRING-ARGS WITH-TWO-UNPACKED-STRINGS %STRING-BASE-COMPARE-EQUAL - %ARRAY-READ +) -CL::%PRINT-TIMING-INFO (CL::STATS-OBJECT-TIME-BLOCK CL::STATS-OBJECT-DATA-COUNTERS FFETCHFIELD - -CL::STATS-OBJECT-ELAPSED-TIME CL::TIME-FORMAT) SEDIT::CREATE-CONSTANT-STRINGS (FFETCHFIELD -SEDIT::CREATE-STRING-ITEM MAPCONC LIST FREPLACEFIELD) COMPILER::META-EVAL-MV-CALL (COMPILER::MEVAL -COMPILER::META-EVALUATE COMPILER::MV-CALL-FN REPLACEFIELD COMPILER::ANALYZE-TREE COMPILER::NODE-META-P -) COMP.TRYUSERFN (COMP.USERFN CONS) SEARCHPRETTYTYPELST (CONS LIST PACK* GETTOPVAL) \\CDR.UFN ( -FFETCHFIELD \\ADDBASE \\VAG2 \\HILOC LOGAND \\LOLOC LLSH IDIFFERENCE \\CDR.UFN SELECTQ LISPERROR -GETPROPLIST) SEDIT::BUILD-WINDOW (FFETCHFIELD CREATEW SEDIT::LESS-PROMPT-WINDOW SEDIT:GET-WINDOW-REGION - CONCAT FUNCTION SUB1 WINDOWPROP DSPCLIPPINGREGION IPLUS IMINUS FONTPROP DSPRIGHTMARGIN) -COMPILER::EFFECTS-ANALYZE-IF (COMPILER::EFFECTS-ANALYZE-LIST LIST COMPILER::IF-PRED COMPILER::IF-THEN -COMPILER::IF-ELSE) DBG::DEBUGGER-BUTTON-EVENT (FREPLACEFIELDVAL NCREATE CONS LOGAND) XIPAPPEND.STRING -(STRINGP LITATOM MKSTRING NCHARS IDIFFERENCE FFETCHFIELD LOCF \\ADDBASE CEIL LOGAND IPLUS CONSTANT -SUB1 LOGXOR FOLDLO LRSH PLUS \\PUTBASESTRING) CL:STRING/= (%PARSE-STRING-ARGS -WITH-TWO-UNPACKED-STRINGS %STRING-BASE-COMPARE -) CL::%-PI/2 (CL::%FLOAT) \\SETGLOBALVAL.UFN ( -FREPLACEFIELD \\ADDBASE2 \\ADDBASE IPLUS ITIMES) CL:STRING-TRIM (WITH-STRING CL:SUBSEQ) -COMPILER::RELEASE-MV-PROG1 (CL:MAPC CL:FUNCTION COMPILER::MV-PROG1-STMTS) TEDIT.STYLESHEET (TEXTOBJ -FREPLACEFIELD LIST) \\DASHINGCONVERT.HCPYMODE (MAPCAR) \\CAR.UFN (FFETCHFIELD SELECTQ LISPERROR) -CL:STRING> (%PARSE-STRING-ARGS WITH-TWO-UNPACKED-STRINGS %STRING-BASE-COMPARE - %ARRAY-READ +) -\\TYPEP.UFN (NTYPX) \\UNWIND.UFN (\\MYALINK OPCODES FFETCHFIELD ADDSTACKBASE \\VAG2 IPLUS IDIFFERENCE -UNFOLD LLSH LRSH LOGAND \\GETBASEPTR STACKADDBASE UNINTERRUPTABLY PLUS IMINUS LOGXOR) |\\VFMInit| ( -WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION UNINTERRUPTABLY |\\VFMClearBuffers|) -CL:STRING>= (%PARSE-STRING-ARGS WITH-TWO-UNPACKED-STRINGS %STRING-BASE-COMPARE - %ARRAY-READ +) -\\ROUTINGTABLE.INFOHOOK (PROCESSPROP GETD FONTCREATE SELECTQ NTYPX CL:ERROR PLUS LENGTH \\GETBASEPTR -\\ADDBASE CREATEW GETBOXREGION WIDTHIFWINDOW TIMES CHARWIDTH HEIGHTIFWINDOW FONTPROP IMIN ADD1 CONCAT -FUNCTION OPENSTREAM WINDOWPROP OPENTEXTSTREAM) CLISPFOR3 (MAPCONC DREVERSE LIST) TOGGLE/SIDESFLG ( -WINDOWPROP FRPLACA DSPTEXTURE REDISPLAYGRAPH) \\NSRANDOM.CLOSEFILE (FFETCHFIELD LOGAND CONSTANT LOGOR) - TERMX (IPLUS IDIFFERENCE \\SGN IQUOTIENT ITIMES) \\COURIER.PUTDEF (GETHASH \\DTEST) \\CHECKAPPLY* ( -\\DEFCELL \\ATOMCELL FFETCHFIELD LIST SPREADAPPLY* \\CKAPPLYARGS) CL:STRING<= (%PARSE-STRING-ARGS -WITH-TWO-UNPACKED-STRINGS %STRING-BASE-COMPARE - %ARRAY-READ +) \\TEXTOPENF-SUBTREE (FFETCHFIELD -\\TEXTOPENF-SUBTREE) CLISPFORVARS1 (TAILP DWIMIFY2) \\ASSIGNDATATYPE1 (\\TYPENUMBERFROMNAME ERROR -\\GETDTD \\ADDBASE ITIMES FFETCHFIELD ASKUSER SELECTQ LIST PLUS IPLUS LOGAND \\LOLOC LOGOR LOGNOT -FUNCTION OPCODES COPY CL:VALUES) \\INSPECT/CODE/REPAINTFN (WITH-INSPECTOR-ENV WINDOWPROP XCL::PROFILIZE - CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES) \\RPLACD.UFN (LISPERROR UNINTERRUPTABLY OPCODES -FFETCHFIELD \\ADDBASE \\VAG2 \\HILOC LOGAND \\LOLOC LLSH IDIFFERENCE IPLUS LRSH .MAKECONSCELL. PLUS -\\NEXTCONSPAGE) CL:SUBSTITUTE-IF-NOT (CL:LENGTH COMPLEX-SUBSTITUTE-IF-NOT SIMPLE-SUBSTITUTE-IF-NOT) -COMPILEFILES0 (SELECTQ MISSPELLED?) IBLT2 (SUB1 \\GETBASE \\ADDBASE PLUS) CL:STRING-RIGHT-TRIM ( -WITH-STRING CL:SUBSEQ) \\COURIER.GETDEF (\\GET.COURIERPROGRAM GETHASH) CL:SUBTYPEP (CL:VALUES) -CL::%SIMPLE-ASSOC (ASSOC) \\MEDW.RELMOVEW (WINDOWPROP IPLUS CONS) BRKDWN1 (LIST GETD PACK CONS LENGTH -BRKDWNARRAY ARRAY ADD1 NCREATE PLUS BRKDWNSETUP PUTD APPEND) \\CREATECELL (UNLESSINEW CREATECELL) -CL:SUBSTITUTE (CL:LENGTH COMPLEX-SUBSTITUTE SIMPLE-SUBSTITUTE) \\NSFILING.SETFILEINFO ( -\\LISP.TO.NSFILING.ATTRIBUTE \\NSRANDOM.SETEOFPTR \\NSFILING.GET/SETINFO FUNCTION FFETCHFIELD PRIN1) -\\SCALEDBITBLT.IP (\\DSPXPOSITION.IP \\DSPYPOSITION.IP DSPSCALE INTERSECTREGIONS CREATEREGION TIMES -FFETCHFIELD + FIXR QUOTIENT -) BRKDWNCOMPILE2 (RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION RESETLST UNION COMPILE1) \\FINDKEY.UFN (\\MYALINK OPCODES ADDSTACKBASE -\\VAG2 IDIFFERENCE FFETCHFIELD SUB1 FOLDLO LRSH STACKADDBASE PLUS UNFOLD LLSH \\GETBASEPTR ADD1 -\\ADDBASE TIMES) \\RECLAIMARRAYBLOCK (\\ADDBASE IMINUS \\HILOC FFETCHFIELD \\ADDBASE2 IDIFFERENCE -\\MERGEBACKWARD \\MAKEFREEARRAYBLOCK) ADD/AND/DISPLAY/LINK (TOLINKS TERPRI CONSTANT CONS) -CL::*DEFSTRUCT-INFO-CACHE* (HASHARRAY) CLISPFOR2 (DREVERSE SELECTQ RPLACA NEGATE) CL::*TYPEP-HASH-TABLE* - (CL:MAKE-HASH-TABLE) \\HTFIND (\\ADDBASE LRSH IPLUS LLSH \\HILOC \\LOLOC NILL \\GETBASEFIXP -.NEWENTRY. SELECTC \\GCERROR FFETCHFIELD SUB1 ADD1 IDIFFERENCE FREPLACEFIELD LOGOR LOGAND .FREELINK.) -CL:TERPRI (TERPRI) CL::%SIMPLE-TREE-EQUAL (CL::%SIMPLE-TREE-EQUAL EQL) REMPROP (LIST GETPROPLIST) -IBLT1 (SUB1 \\GETBASE \\ADDBASE PLUS) \\RPLPTR.UFN (\\ADDBASE UNINTERRUPTABLY OPCODES \\HILOC \\LOLOC) - \\UNQUEUE (UNINTERRUPTABLY FFETCHFIELD ERROR LIST) CL::SET-PARSED-STRUCTURE (PUTHASH) CL:SUBSTITUTE-IF - (CL:LENGTH COMPLEX-SUBSTITUTE-IF SIMPLE-SUBSTITUTE-IF) LINE.LESSP (ILEQ) DBG::RELEASE-DEBUGGER-WINDOW - (WINDOWPROP CLOSEW) CL:TREE-EQUAL (CL:ERROR CL::%COMPLEX-TREE-EQUAL CL::%SIMPLE-TREE-EQUAL) -XIPAPPEND.WORD (\\DTEST UNFOLD LLSH IDIFFERENCE CEIL LOGAND IPLUS FFETCHFIELD LOCF \\ADDBASE CONSTANT -SUB1 LOGXOR FOLDLO LRSH) SETF-MACRO-FUNCTION (GET ARGTYPE) \\CONS.UFN (CREATECELL UNINTERRUPTABLY -OPCODES IPLUS16 \\LOLOC \\ADDBASE \\GETBASE ADD1 IDIFFERENCE \\DORECLAIM FFETCHFIELD \\VAG2 LRSH LLSH -LOGAND IGREATERP \\NEXTCONSPAGE .MAKECONSCELL. PLUS NTYPX \\HILOC .FINDCLOSEPRIOR. LOGOR .FINDPAIR. -.FINDCDRABLEPAIR.) CL:TANH (/ CL:SINH CL:COSH CL::%EXP-FLOAT CL:* FQUOTIENT - +) -SI::%STRUCTURE-DECLARE-DATATYPE (IGEQ CL:ERROR CL:MAPCAN CL:FUNCTION) FORMAT-PRINT-ORDINAL (ABS) -CL::ARRAY-TYPE (CL:ARRAY-RANK CL:ARRAY-TOTAL-SIZE LIST CL:ARRAY-ELEMENT-TYPE CL:ARRAY-DIMENSIONS) -\\BOUT (\\DTEST STREAMOP SPREADAPPLY* FFETCHFIELD) %GET-TYPE-TABLE-ENTRY (CL:ASSOC) CL:WRITE-BYTE ( -BOUT) CL:NTH (CL:NTHCDR) \\BIN (STREAMOP SPREADAPPLY* \\DTEST FFETCHFIELD) CL:WRITE-LINE ( -WRITE-STRING*) CL::ESTABLISH-SETFS-AND-OPTIMIZERS (CL::PS-INLINE CL:MAPC CL:FUNCTION CL::PS-ALL-SLOTS) - CL:TRUENAME (CL:TRUENAME CL:SYMBOL-VALUE XCL:SYNONYM-STREAM-SYMBOL CL:ERROR CL:PROBE-FILE) -SEDIT::UNDO-ATOM-CHANGE (FREPLACEFIELD CONS LIST FFETCHFIELD SEDIT::NOTE-CHANGE-IN-SIMPLE -SEDIT::NOTE-CHANGE) CL:UNREAD-CHAR (\\BACKCHAR \\BACKNSCHAR \\DTEST \\BACKXCCSCHAR LLSH ACCESS-CHARSET - UNFOLD PLUS IDIFFERENCE CL:FUNCALL FFETCHFIELD \\GETSTREAM) \\EVAL (\\EVALFORM \\EVALVAR \\EVALOTHER) - TWOD.TRACKCURSOR (FFETCHFIELD LOGAND LASTMOUSEX LASTMOUSEY STRINGWIDTH CL:FUNCALL ADD1 IDIFFERENCE -NCREATE FREPLACEFIELDVAL REPLACEFIELDVAL) FB.EXPUNGE?.MENU (FREPLACEFIELDVAL NCREATE CONS) -\\RPLACA.UFN (LISPERROR UNINTERRUPTABLY OPCODES FFETCHFIELD) CL:USER-HOMEDIR-PATHNAME (DECLARE STRING -UNIX-GETPARM CL:MAKE-PATHNAME UNPACKFILENAME.STRING UNIX-GETENV PATHNAME) \\MEDW.MOVEW (\\INSUREWINDOW - FFETCHFIELD OPENWP CONS \\ONSCREENCLIPPINGREGION \\ILLEGAL.ARG WINDOWPROP APPLY* GETBOXPOSITION IPLUS - IDIFFERENCE DSPDESTINATION \\GETBASE \\TOTOPWDS ADVISEWDS CREATEREGION) CL::BIGNUMP (TYPENAMEP) -CL::%SIMPLE-MEMBER (FMEMB) COMPILER::EFFECTS-ANALYZE-GO (COMPILER::NODE-EFFECTS LIST COMPILER::GO-TAGBODY - COMPILER::NODE-AFFECTED) \\DRAWCURVE.PRESS.LINE (IQUOTIENT IDIFFERENCE IPLUS IMAX IMIN IGREATERP) -CL::%PI/2 (CL::%FLOAT) CL:STRING< (%PARSE-STRING-ARGS WITH-TWO-UNPACKED-STRINGS %STRING-BASE-COMPARE - - %ARRAY-READ +) GETINTERRUPT (SELECTQ FFETCHFIELD ASSOC LIST MAPCAR FASSOC) COMPILER::RELEASE-MV-CALL -(COMPILER::RELEASE-TREE COMPILER::MV-CALL-FN CL:MAPC CL:FUNCTION COMPILER::MV-CALL-ARG-EXPRS) -SEDIT::GET-USER-STRING (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW FFETCHFIELD TTYINPROMPTFORWORD) -INTCHAR (GETINTERRUPT NCONC INTCHAR LISPINTERRUPTS ASSOC ERRORX LIST APPLY* CONS) -UNMAKEHARDCOPYMODESTREAM (DISPLAYSTREAMP WINDOWPROP \\ILLEGAL.ARG IMAGESTREAMTYPE FUNCTION STREAMPROP -DSPCLIPPINGREGION) \\RESTLIST.UFN (\\MYALINK OPCODES ADDSTACKBASE \\VAG2 IDIFFERENCE FFETCHFIELD -STACKADDBASE CONS \\GETBASEPTR UNFOLD LLSH PLUS) CL:WRITE-TO-STRING (\\PRINDATUM.TO.STRING) -CL::*PARSED-DEFSTRUCTS* (HASHARRAY) \\TYPEGLOBALVARIABLE (PLUS TYPE-VARIABLE-FROM-TYPE-NAME) -CL::%TYPEP-PRED (CL::TYPE-EXPANDER CL::%TYPEP-PRED CL:FUNCALL LIST) CL::ESTABLISH-PREDICATE ( -CL::PS-PREDICATE CL::PS-INLINE CL:MACRO-FUNCTION GET LIST) SEDIT::COPY-NODE (FFETCHFIELD -FREPLACEFIELDVAL NCREATE CONS MAPCAR SEDIT::COPY-NODE SEDIT::CREATE-WEAK-LINK APPEND) -COMPILER::META-EVAL-LITERAL (COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) REHASHFILE (GTHASHFILE -PACKFILENAME HASHFILENAME HASHFILEPROP |printout| PRIN1 COPYHASHFILE ELT OPENHASHFILE TERPRI) PUTPROP -(LIST GETPROPLIST CONS) COMP.PROGLST (COMP.EXPR PLUS COMP.EFFECT) CL::SUBTYPEP-TYPE-EXPAND (CL:FUNCTION - CL:VALUES CL::TYPE-EXPAND) SEDIT::COMPUTE-COMMENT-COLUMN (FFETCHFIELD IQUOTIENT ITIMES WINDOWPROP -FREPLACEFIELD) \\PROCESS.MAKEFRAME (UNINTERRUPTABLY FFETCHFIELD CONS \\MP.ERROR \\MISCAPPLY* FUNCTION) - NUTF8STRINGBYTES (NTHCHARCODE PLUS NUTF8CODEBYTES XTOUCODE) FB.EXPUNGECOMMAND (FFETCHFIELD -TB.COLLECT.ITEMS FB.FETCHFILENAME PLUS BLOCK CONCAT) SETINTERRUPT (ASSOC SETINTERRUPT GETINTERRUPT -FASSOC FFETCHFIELD FREPLACEFIELD DREMOVE FRPLACD LIST CONS) \\QUEUELENGTH (FFETCHFIELD PLUS) -INSPECT.FLIPSELECTION (BLTSHADE) \\MEDW.CLOSEW (FFETCHFIELD .WHILE.TOP.DS. DSPDESTINATION \\GETBASE -\\TOTOPWDS) HASHLINKS (SUBDECLARATIONS RECORD.CREATEINFO RECORDECL RECORD.NAME LIST) -FORMAT-PRINT-CARDINAL (FORMAT-PRINT-CARDINAL-AUX - WRITE-STRING*) %LIT-SIZE-TO-SIZE (CL:ASSOC) -SPYOBJ.LABEL (FFETCHFIELD) DBG::SET-UP-DEBUGGER-WINDOW (WINDOWPROP WINDOWADDPROP THIS.PROCESS -TTYDISPLAYSTREAM) CL::EQUAL-DIMENSIONS (CL:LENGTH) \\TYPEMASK.UFN (LOGAND LRSH \\GETBASE FOLDLO IPLUS -LLSH \\HILOC \\LOLOC) \\UNKNOWN.UFN (\\MP.ERROR) \\INSUREWINDOW (\\OUTSTREAMARG \\GETSTREAM WFROMDS -\\ILLEGAL.ARG) CL::RANGE<= (+ - >= >) SEDIT::NORMALIZE-SELECTION (FFETCHFIELD DSPCLIPPINGREGION) -SEDIT::TRANSLATE-CHARS (SEDIT::ESCAPE-CHAR FFETCHFIELD SUB1 %ARRAY-OFFSET %ARRAY-BASE IPLUS -%ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE CONCAT CHARACTER CONSTANT -IDIFFERENCE) \\DRAWLINE.UFN (\\BITMASK \\WORDELT LOGAND SELECTQ LOGXOR FFETCHFIELD LOGOR IPLUS ADD1 -IDIFFERENCE \\ADDBASE LRSH PLUS) \\ENVCALL.UFN (\\MISCAPPLY* FUNCTION FFETCHFIELD) -CL::COMPLETE-META-EXPRESSION-DEFAULTS (LIST) SEDIT::CONTAINS? (FFETCHFIELD IGEQ) \\COURIER.DELDEF ( -PUTHASH) COMPILER::META-EVAL-LAMBDA (COMPILER::MEVAL COMPILER::META-EVALUATE COMPILER::LAMBDA-BODY -REPLACEFIELD COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) CL::SET-SHARED-SETF-INVERSE (REMPROP GET) -WHICHW (\\INSURESCREEN WHICHW FFETCHFIELD) RESULTS (BRKDWNRESULTS) SEDIT::REDO (FFETCHFIELD -SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW PRIN1) \\FIXDLINES (FFETCHFIELD WINDOWPROP IDIFFERENCE SUB1 -IMAX IMIN) REMOVETONODES (LIST) \\NSRANDOM.WRITEPAGES (PLUS FFETCHFIELD UNFOLD LLSH -\\NSRANDOM.UPDATE.VALIDATION - FOLDLO LRSH IMOD \\NSRANDOM.WRITE.SEGMENT CL:NTHCDR + ASSOC) -\\MOVETO.IP (SETXY.IP) CL::BASE-SUBTYPEP (CL:VALUES CL:FUNCTION CL:ASSOC -CL::COMPLETE-META-EXPRESSION-DEFAULTS) CL::%2PI/3 (CL::%FLOAT) \\STKSCAN (\\MYALINK OPCODES -IDIFFERENCE FLOOR LOGAND FFETCHFIELD ADDSTACKBASE \\VAG2 CONSTANT LOGXOR SUB1 \\ATOMVALINDEX NTYPX -\\LOLOC SHOULDNT \\ADDBASE2 \\ADDBASE IPLUS ITIMES GETNAMEENTRY BYTESPERNAMEENTRY LLSH -WORDSPERNAMEENTRY LOGOR CODEBASELT \\GETBASEBYTE PLUS NTSLOT-VARTYPE GETNTOFFSETENTRY -BYTESPERNTOFFSETENTRY STACKADDBASE UNFOLD NTSLOT-OFFSET) \\TYPECHECK.UFN (NTYPX \\GETDTD \\ADDBASE -ITIMES FFETCHFIELD \\LISPERROR CONCAT \\INDEXATOMPNAME) \\MAIKO.IO-INTERRUPT (LOGAND) CLISPFOR0A (CONS - NCONC COPY EVAL) CL::EQUAL-ELEMENT-TYPE (CL:EQUAL %GET-CANONICAL-CML-TYPE) EQL (FFETCHFIELD IEQP -CL::RATIO-NUMERATOR EQL CL::RATIO-DENOMINATOR CL::COMPLEX-REALPART CL::COMPLEX-IMAGPART) +) \CHECKSUM (LOGAND IPLUS16 \LOLOC \ADDBASE \GETBASE PLUS LOGOR LLSH SUB1) COMP.VARTYPE (LITATOM) +\IBMOUTCHARFN (\PRINTCCODE \RECODECCODE) COMPILER::EFFECTS-ANALYZE-PROGV (COMPILER::EFFECTS-ANALYZE-LIST + LIST COMPILER::PROGV-SYMS-EXPR COMPILER::PROGV-VALS-EXPR COMPILER::PROGV-STMT) EXTENDREGIONTOP (IPLUS + IDIFFERENCE) \MAIKO.PUNTBLTCHAR (\CHAR8CODE LOGAND \CHARSET LRSH \SLOWBLTCHAR IPLUS +\DSPGETCHARIMAGEWIDTH \GETBASE \DSPGETCHARWIDTH DSPDESTINATION \TOTOPWDS OPCODES) +GET-ENVIRONMENT-AND-FILEMAP (FULLNAME GETHASH CL:VALUES OPENP GETFILEPTR) TERM.DOWN (\DTEST + MOVETO +IMAX - ITIMES TERM.DELETELINE) FORMAT-PRINT-DECIMAL (FORMAT-PRINT-NUMBER) \MAIKO.BLTCHAR (OPCODES) +\GETPRESSFONTNAMES (\FACECODE \PRESSFAMILYCODELST IQUOTIENT ITIMES \BIN PLUS LLSH IPLUS LOGAND LRSH +FASSOC ERROR \DECODEPRESSFACEBYTE \WIN CONS LIST FIXR FQUOTIENT) GRAPHEDITCOMMANDFN (SELECTQ MENU +EDITMOVENODE EDITADDNODE EDITDELETENODE EDITADDLINK EDITCHANGEFONT EDITDELETELINK EDITCHANGELABEL +TOGGLE/DIRECTEDFLG TOGGLE/SIDESFLG EDITTOGGLEBORDER EDITTOGGLELABEL) SKOR (GETCASEARRAY FLENGTH IPLUS +SUB1) \SHADEBITS (BITSPERPIXEL OPPOSITECOLOR ZEROP LOGAND IMAX IMIN GRIDXCOORD LASTMOUSEX GRIDYCOORD +LASTMOUSEY WINDOWPROP IPLUS PRIN1 BITBLT) \FLOATINGSCALE (- \MAKEFLOAT) %%DIRECTORY-COMPONENT-EQUAL ( +%%DIRECTORY-COMPONENT-TYPE CL:EQUAL %%DIRECTORY-COMPONENT-PATH) \PFReplaceString (MKSTRING MIN NCHARS +SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE PLUS) GETEXPRESSIONFROMEVENTSPEC ( +LISPXFIND FMEMB LDIFF SELECTQ ARGTYPE CONS ERROR MAPCAR KWOTE LIST MKPROGN) \INIT.POWERS.OF.TEN (ARRAY + CL:MAKE-ARRAY CL:AREF IPLUS FTIMES IDIFFERENCE FQUOTIENT PLUS CL:* + -) SI::*ADVICE-HASH-TABLE* ( +CL:MAKE-HASH-TABLE) COMPILER:ENV-FBOUNDP (CL:LABELS COMPILER::FIND-FN) GET-FILEMAP-FROM-FILECREATED ( +NLSETQ READ GETEOFPTR SKIPSEPRCODES) \SETGROUPMIN (\ATWGROUPSIZE SELECTQ \MAXWIDTHOFGROUP IPLUS IMAX +\MAXHEIGHTOFGROUP SHOULDNT) COMPILER::EFFECTS-ANALYZE-OPCODES (COMPILER::NODE-EFFECTS COMPILER::NODE-AFFECTED +) CL:COMPILE-FILE (COMPILER:MAKE-CONTEXT COMPILER::MAKE-ENV CL:MAKE-HASH-TABLE CL:MULTIPLE-VALUE-PROG1 + .UNWIND.PROTECT. FUNCTION CL:PROBE-FILE CL:MERGE-PATHNAMES OPEN PATHNAME CL:MAKE-PATHNAME STRING +FASL:OPEN-FASL-HANDLE CL:MAKE-BROADCAST-STREAM SKIPSEPRCODES) IMAGEBOX (APPLY* IMAGEOBJPROP) +\TEXTTTYBOUT (\SYNCODE GETHASH \GETBASEBYTE PLUS FFETCHFIELD) SPY.ADD.ENTRY (LLSH PLUS SPY.OVERFLOW +LITATOM \LOLOC) SI::DESCRIBE-USING-DESCRIBERS (CL:MAPC CL:FUNCTION) \BN.COMPAREN (\BN.SIGN IMINUS +IDIFFERENCE SHOULDNT) \FAULTINIT (IDIFFERENCE \MAKEFRAME FUNCTION IPLUS) \BN.FROM.FIXP (\BN.DIFFERENCE + \BN.FROM.FIXP IPLUS \BN.MINUS \BN.IGNN IMINUS) SEDIT::GROW-SELECTION-LITATOM ( +SEDIT::GROW-SELECTION-DEFAULT SEDIT::SET-SELECTION-ME) \MAKEFRAME (\SETUPSTACK1) SPY.END.ENTRY ( +SPY.ADD.ENTRY) \BN.TO.FIXP (\BN.COMPAREN CONSTANT \BN.FROM.FIXP \BIGNUM.TO.INT SHOULDNT) +DMCHAT.ADDRESS (SELCHARQ LOGXOR) CL:MACRO-FUNCTION (LOCAL-MACRO-FUNCTION GLOBAL-MACRO-FUNCTION) +\VFMDelete1 (EQP \BLT MESASIZE \ADDBASE IDIFFERENCE \VFMMarkBufferDirty) \VFMSmartBLT (IGREATERP +\HILOC \LOLOC \ADDBASE SUB1 \GETBASE PLUS \BLT) LOOKUP-ENVIRONMENT-AND-FILEMAP (GETHASH CL:VALUES) +\BN.DIFFERENCE (\BN.PLUS2 \BN.MINUS) GETREGION (GETSCREENREGION) \GETBASEFIXP (\MAKENUMBER \GETBASE +\ADDBASE) \FILING.ATTRIBUTE.TYPE.SEQUENCE (MAPCAR \FILING.ATTRIBUTE.TYPE) \DRAWLINE1 (\DRAWLINE.UFN +\ADDBASE IPLUS ITIMES FOLDLO LRSH LOGAND SELECTQ ADD1) \BN.INTEGERLENGTH (IPLUS CONSTANT INTEGERLENGTH + SUB1 \BN.INTEGERLENGTH SHOULDNT) PUTPUPWORD (\PUTBASE \DTEST) \SETIOPOINTERS (SETTOPVAL LIST +EMADDRESS OPCODES LOCF \ADDBASE UNFOLD LLSH SELECTC \DoveMisc.GetKBDBase \DoveMisc.GetMouseXBase +\DoveMisc.GetMouseYBase \DoveDisplay.GetCursorBitmapBase \DoveDisplay.ScreenWidth) +CL::DEFSTRUCT-PARSE-OPTIONS (LIST CL::MAKE-PS CL:CONCATENATE STRING) \BN.LOGAND (\BN.LOGAND LOGAND +CONS) ARRAYBLOCK (DECLARERECORD CONS) TTADJUSTWORD (FASSOC FIXSPELL) TB.FINISH.CLOSE (WITH.MONITOR +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SELECTQ TB.FLUSH.WINDOW CLOSEW SHRINKW) +\D01.FAULTINIT (FUNCTION SIGNED SUB1 LLSH IDIFFERENCE LOCF \ADDBASE EMADDRESS OPCODES UNFOLD CONSTANT +SMALLP ERROR \PUTBASEPTR \ATOMCELL LOADBYTE LOGAND LSH IMINUS MASK.1'S IPLUS RWMufMan PLUS +\D01.ASSIGNBUFFERS) FW-RESIZE-OFD (IPLUS SELECTQ IDIFFERENCE ERROR) COMPILER::LOCAL-CONSTANT-P ( +CL:GETHASH) \BN.LOGANDC2 (\BN.LOGANDC2 LOGAND DIFFERENCE CONS) CLEARPUP (\DTEST \ADDBASE LOCF +\ZEROBYTES SUB1) \DOVE.FAULTINIT (FUNCTION \PUTBASEPTR LOCF \ATOMCELL \ADDBASE CONSTANT \HINUM \LONUM +\DoveDisplay.TurnOn) \GETREGIONTRACKWITHBOX (IDIFFERENCE SUB1 BITMAPWIDTH BITMAPHEIGHT ERSETQ LOGAND +LOGOR CURSOR ZEROP IQUOTIENT IPLUS IMAX IMIN) %%MAKE-PATHNAME (%%%%MAKE-PATHNAME) \DL.FAULTINIT ( +FUNCTION LOCF \ADDBASE \DL.DISKINIT) SIZE/GRAPH/WINDOW (GRAPHREGION CREATEW GETBOXREGION WIDTHIFWINDOW + IMIN IMAX FIXR HEIGHTIFWINDOW IDIFFERENCE WXOFFSET IPLUS LRSH WINDOWPROP WYOFFSET) \BN.LOGOR (CONS +LOGOR \BN.LOGOR) \MP.ERROR (OPCODES RAID) \BN.LOGXOR (CONS LOGXOR \BN.LOGXOR) \TEXTMARK (CONS +IDIFFERENCE) \MAIKO.FAULTINIT (FUNCTION LOCF \ADDBASE \SETIOPOINTERS) FW-UPDATE-OFD-WINDOW (GETFILEPTR + GETEOFPTR FW-PERCENTAGE PRIN1 PRINTNUM IPLUS DSPXPOSITION ADD1 DSPYPOSITION IQUOTIENT ITIMES) +SI::DESCRIBE-NEW-LINE (CL:FRESH-LINE) \TEDIT.PAPERWIDTH (\TEDIT.PAPERHEIGHT SELECTQ ASSOC \ILLEGAL.ARG +) \BN.PLUS2 (IDIFFERENCE FLENGTH APPEND \BN.NZEROS \BN.SIGN \BN.ISUM0 \BN.ISUM1 ERROR) GETPUPBYTE ( +\GETBASEBYTE \DTEST) CL:MACROEXPAND (CL:MACROEXPAND-1 CL:VALUES) \BN.TIMES2 (\BN.SIGN LIST IPLUS +FLENGTH IDIFFERENCE CONS PLUS \BN.IDIVIDE ITIMES) NODECREATE (FONTNAMELIST) \SPP.CHECK.INPUT.QUEUE ( +ILESSP \LOLOC IDIFFERENCE) SEDIT::INITIALIZE-ATOMIC (LIST*) \DOMISCAPPLY (\DOMISCAPPLY1) \TELERAIDINIT + (\LOCKFN \LOCKVAR \ALLOCATE.ETHERPACKET \LOCKWORDS) \BULK.DATA.CLOSE (GETSPPCON FFETCHFIELD +OVERWRITEABLE LOGAND \EOFP SPREADAPPLY* ERSETQ RESETLST LIST FUNCTION \COURIER.RESULTS) \BN.DIVIDE ( +CONS \BN.QRS \BN.FROM.FIXP FLENGTH IDIFFERENCE \BN.SIGN PLUS IMINUS IQUOTIENT IPLUS ITIMES \BN.TIMES2 +\BN.IDIVIDE) SI::FINISH-UNADVISING (CL:DELETE) COMPILER::ENV-BIND-FUNCTION (LIST COMPILER::ENV-FENV) +\FILEMAP-HASHOVERFLOW (HARRAYPROP MEMB - LENGTH SORT GET PLUS IMAX FIXR FTIMES) \BN.FLOAT (FPLUS +FTIMES \BN.FLOAT ERROR SHOULDNT) SEDIT::LINEARIZE (RPLACD CONS SEDIT::CREATE-WEAK-LINK IMAX IPLUS +SEDIT::OUTPUT-CONSTANT-STRING) WALK-FORM (CL:FUNCTION WALK-FORM-INTERNAL) COMPILER::RELEASE-UNWIND-PROTECT + (COMPILER::RELEASE-TREE COMPILER::UNWIND-PROTECT-STMT COMPILER::UNWIND-PROTECT-CLEANUP) +\DUMMYKEYHANDLER (FUNCTION) DMCHAT.NEWLINE (\DTEST) ENTEREVALQT (MAPC ERSETQ EVAL) +DIRECTORY.FILL.PATTERN (PACKFILENAME.STRING) PARSE-DEFMACRO (DECLARE) \TEDITMENU.CREATE ( +\TEXTMENU.DOC.CREATE) \KEYHANDLER (\KEYHANDLER1) MS-SMASH-PACKAGE (MS-SMASH-PACKAGE CONS +CL:SYMBOL-PACKAGE CL:INTERN CL:STRING-UPCASE CL:SYMBOL-NAME) SEDIT::GET-BUTTON-STRING ( +CL:PRIN1-TO-STRING CL:PRINC-TO-STRING) DINFO.SETUP.WINDOW (CONCAT WINDOWADDPROP) \BIGNUM.TO.INT (IPLUS + ITIMES \BIGNUM.TO.INT) \FILING.ATTRIBUTE.TYPE (FIXP) COMPILER::CRACK-DEFMACRO (CL:SECOND CL:THIRD +CL:GENSYM) COMPILER::RELEASE-SETQ (COMPILER::RELEASE-TREE COMPILER::SETQ-VALUE) \BN.2TH (\BN.QRS CONS) + COMP.MACRO (SELECTQ COMP.CALL COMP.ARGTYPE COMP.PUNT BLKAPPLY* APPLY CONS COMP.LAMBDA MACROEXPANSION +COMP.EXP1) HASHRECORD (DECLARERECORD CONS) \BN.QRS (CONS REVERSE \BN.IDIVIDE IPLUS ITIMES) PPSPPSTREAM + (PRIN1 \SPP.GETFILEPTR TERPRI) EDITSHADE (CREATETEXTUREFROMBITMAP \BITMAPFROMTEXTURE BITMAPCREATE +\ILLEGAL.ARG CREATEREGION CREATEW GETBOXREGION BITMAPWIDTH BITMAPHEIGHT IMIN IQUOTIENT THIS.PROCESS - +ITIMES RESETSAVE LIST LOGAND LOGOR DOWINDOWCOM WHICHW ZEROP LASTMOUSEX LASTMOUSEY GRIDXCOORD +GRIDYCOORD PRIN1 GETPROMPTWINDOW) \ARBIN (\SMALLPIN SUB1 LLSH IDIFFERENCE OPENSTRINGSTREAM \STRINGIN +READ) \BN.ABS (\BN.SIGN \BN.MINUS) SI::FINISH-ADVISING (CL:MEMBER GET CL:MAKE-SYMBOL CL:FORMAT +CL:COMPILE SI::CREATE-ADVISED-DEFINITION CL:DELETE CONS LIST SI::GET-ADVICE-MIDDLE-MAN +SI::CONSTRUCT-MIDDLE-MAN) COMPILER::MAKE-CHILD-ENV (COMPILER::MAKE-ENV) \BN.MINUS (CONS IMINUS +\BN.MINUS SHOULDNT) \TEXTDSPXPOSITION (TEXTOBJ DSPXPOSITION TIMES CHARWIDTH POSITION) LISPSOURCEFILEP +(RESETLST RESETSAVE LIST OPENSTREAM GETFILEPTR) \INSPECTW.COMMAND.HANDLER (WITH-INSPECTOR-ENV +WINDOWPROP XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES DSPCLIPPINGREGION +LASTMOUSEX LASTMOUSEY PROMPTPRINT ERSETQ APPLY* ZEROP LOGAND CLRPROMPT FUNCTION) SI::DESCRIBE-INTERNAL + (CL:TYPE-OF SI::A-OR-AN SI::GET-DESCRIBERS SI::DESCRIBE-USING-DESCRIBERS CL:1+ SI::GET-INSPECT-MACRO +SI::DESCRIBE-USING-INSPECT-MACRO SI::GET-SUPER-DESCRIBERS FINDRECDECL FINDSYSRECDECL +SI::DESCRIBE-USING-RECORD-DECL CL:PRIN1) READVARS-FROM-STREAM (HPINITRDTBL CL:FUNCTION READ) \BN.SIGN +(SHOULDNT \BN.SIGN) EDITSHADEREPAINTFN (WINDOWPROP BITMAPWIDTH BITMAPHEIGHT ITIMES) \D01.ASSIGNBUFFERS + (EMPOINTER \VAG2 UNFOLD LLSH \READRP PLUS IDIFFERENCE CEIL LOGAND IPLUS CONSTANT SUB1 LOGXOR IMOD +TIMES FOLDLO LRSH IGEQ \ADDBASE IMIN IQUOTIENT) MSSETSETTYPE (MS-SMASH-PACKAGE CL:FIND-PACKAGE) +\TEDIT.NSCHAR.RUN (SUB1 GETFILEPTR \CHTOPC - BIN FFILEPOS MKSTRING CHARACTER IPLUS IQUOTIENT +IDIFFERENCE ITIMES PLUS FFETCHFIELD OPENSTREAM \SETUPGETCH) XCL::PPRINT-DEFINER-FITP (COUNT FITP < + +DSPXPOSITION STRINGWIDTH DSPRIGHTMARGIN) ENTRY# (IPLUS IMINUS FLENGTH FMEMB) THREESTATE.INIT ( +IMAGEFNSCREATE FUNCTION) \CHAIN.UP.RPT (\ADDBASE SUB1 \LOCKEDPAGEP PLUS) COURIER.READ.BULKDATA (NCONC +GETWORD IPLUS LLSH \BIN COURIER.READ.SEQUENCE) COMPILER::RELEASE-RETURN (COMPILER::RELEASE-TREE +COMPILER::RETURN-VALUE COMPILER::RETURN-BLOCK) XCL::PPRINT-DEFINER-RECURSE (DECLARE SUPERPRINT) +COMP.PROG1 (COMP.EXP1 COMP.EXPR COMP.EFFECT) \VFMFreeVPage (ADD1 ELT \PFVolumeNumber \VFMKillBuffer) +\TEDIT.HCPYFMTSPEC (DSPSCALE FIXR FTIMES CONS MAPCAR SCALEPAGEUNITS) SETCOLORLV.IP (BITMAPCREATE +BITMAPWIDTH BITMAPHEIGHT IPLUS ITIMES SUB1 BITMAPBIT PLUS NUMBERP SELECTQ) \TEDIT.PAPERHEIGHT ( +\TEDIT.PAPERWIDTH SELECTQ ASSOC) %%PATHNAME-EQUAL (%%PATHNAME-HOST %%PATHNAME-DEVICE +%%PATHNAME-DIRECTORY %%PATHNAME-NAME %%PATHNAME-TYPE CL:EQUAL %%PATHNAME-VERSION) TERM.DELCHAR (\DTEST + - + TERM.ERASEBITS) \NSFILING.ADDQUOTES (STRINGP MKSTRING SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE +\GETBASETHIN \GETBASEBYTE CONCATCODES CONS REVERSE) \VFMDelete2 (\BLT MESASIZE \ADDBASE IPLUS +IDIFFERENCE \VFMMarkBufferDirty) COMPILER::EFFECTS-ANALYZE-MV-PROG1 (COMPILER::EFFECTS-ANALYZE-LIST +COMPILER::MV-PROG1-STMTS) HPRINT0 (HPRINT MAPCAR LITATOM GETATOMVAL) SETCOLOR16.IP (IQUOTIENT ITIMES +BITMAPCREATE IPLUS SELECTQ) CL::SIMPLE-STRING= (%%STRING-LENGTH + %%STRING-BASE-COMPARE) +\SEQUIN.HANDLE.ACK (\QUEUEHEAD FFETCHFIELD PLUS LOGAND ADD1 APPLY*) FORMAT-PRINT-ORDINAL (ABS) +CL:ARRAY-DIMENSIONS (LIST CL:ERROR) MSDOES (MSCANT) SEDIT::DELETE-LITATOM (NCHARS SEDIT::DELETE-NODES +SEDIT::ATOM-POINT-TYPE) FW-INTERACT (SELECTQ MENU FW-FORGET-CMD FW-RECALL-CMD FW-CLOSE-CMD +FW-MOVE-OFD-WINDOWS PROMPTPRINT) COMPILER::EFFECTS-ANALYZE-LITERAL (COMPILER::LITERAL-VALUE +COMPILER::NODE-EFFECTS COMPILER::NODE-AFFECTED) GETPOSITION (GETSCREENPOSITION) +MB.THREESTATE.WHENOPERATEDFN (SELECTQ MB.THREESTATE.SHOWSELFN) %%FLATTEN-ARRAY (CL:ARRAY-RANK +CL:MAKE-ARRAY CL:ARRAY-TOTAL-SIZE CL:ARRAY-ELEMENT-TYPE) \TEDIT.FORMATTABS (IMAX IDIFFERENCE LRSH PLUS + IPLUS ITIMES IQUOTIENT) FB.CLOSE&EXPUNGE (TB.USERDATA ATTACHEDWINDOWS WINDOWPROP ASSOC RESETLST +FB.MAKE.BROWSER.BUSY TB.FINISH.CLOSE) COMPILER::RELEASE-PROGV (COMPILER::RELEASE-TREE +COMPILER::PROGV-SYMS-EXPR COMPILER::PROGV-VALS-EXPR COMPILER::PROGV-STMT) XCL::%%DEFINE-TYPE-SAVE-DEFN + (GETFILEPKGTYPE CL:GETHASH) COMP.VAR (COMP.LOOKUPVAR ASSOC COMP.BOX) \MAKERECODEMAP (CL:MAKE-ARRAY +CL:SVREF LOGAND) REDISPLAYGRAPH (DISPLAYGRAPH WINDOWPROP DSPCLIPPINGREGION) \M44ACTONVMEMFILE (IPLUS +EMPOINTER \VAG2 \GETBASE \WHICHPART IMIN SUB1 ADD1 IDIFFERENCE \LOLOC \LOOKUPFMAP \ADDBASE PLUS LOCF +\ACTONVMEMPAGES \GETBASEPTR LLSH IMINUS RAID) ENABLEWHEELSCROLL (LIST MAPC KEYACTION CONS) +\TEXTDSPYPOSITION (TEXTOBJ DSPYPOSITION DIFFERENCE) FB.DELVERCOMMAND (MENU RNUMBER MKATOM +FB.PROMPTW.FORMAT TB.COLLECT.ITEMS FUNCTION FB.DELVER.FILES SELECTQ FB.SORT.VERSIONS SORT) +SUPERPRINTEQ (FASSOC) \ITEM.WINDOW.SELECTION.HANDLER (WINDOWPROP LOGAND IN/ITEM? CURSORPOSITION LOGOR) + SCALEPAGEXUNITS (FIXR FTIMES \TEDIT.PAPERWIDTH IPLUS) \SEQUIN.COMPARE (LOGAND IDIFFERENCE) +COMPAREPRINT1 (COMPAREMAX COMPARELST NCHARS COMPARENCHARS) EQMEMBHASH (MEMB GETHASH) LVLPRIN (LAST +PRIN1 PRIN2) CL::PARSE-SLOT (LIST CL::MAKE-PARSED-SLOT) \TELERAIDSERVER (\TELERAIDENTRY \GETBASEPTR +LOCF \ADDBASE \READFLAGS \LOOKUPPAGEMAP IPLUS \GETBASEBYTE \GETBASE ADD1 PLUS LOGAND LRSH LLSH SELECTQ + \KEYNAMETONUMBER \TELERAIDCOMMAND \BOXIDIFFERENCE \RCLK) \REMOVE-DECLS (CL:FUNCTION CL:MACROEXPAND-1 +ENVIRONMENT-VARS LIST* CL:VALUES) PTPLUS (PLUS) SI::UNADVISE-FROM-RESTORE-CALLS (CL:FIND-IF CL:FUNCTION + CL:FORMAT) MSREHASH (IPLUS IQUOTIENT ITIMES HARRAYSIZE) MSKNOWN (SELECTQ MSKNOWN) +SEDIT::COPY-STRUCTURE-STRING (CONCAT SEDIT::ADJUST-WIDTH SEDIT::STRINGWIDTH) COMPILER::EFFECTS-ANALYZE-LAMBDA + (COMPILER::LAMBDA-BODY COMPILER::LAMBDA-APPLIED-EFFECTS COMPILER::EFFECTS-UNION COMPILER::NODE-EFFECTS + COMPILER::LAMBDA-APPLIED-AFFECTED COMPILER::NODE-AFFECTED) \LEASTPTAT (ADD1 IQUOTIENT IPLUS +IDIFFERENCE ITIMES HALF LRSH) TERM.LEFT (\DTEST MOVETO IMAX - ITIMES) \INITBFS (\ADDBASE IDIFFERENCE +EMPOINTER \VAG2 LOCF IQUOTIENT IPLUS) EXTENDREGIONRIGHT (IPLUS IDIFFERENCE) COMPILER::RELEASE-PROGN ( +CL:MAPC CL:FUNCTION COMPILER::PROGN-STMTS) COMP.CONST (COMP.STCONST) READVARS (RATOM READ) +TERM.ERASE.TO.EOL (\DTEST TERM.ERASEBITS -) \BN.IDIVIDE (CONS IQUOTIENT IREMAINDER) \EVAL-PROGN ( +\EVAL-PROGN CL:EVAL) FLENGTH (ADD1) LVLPRIN0 (SUB1 IPLUS) PPSPP (\GETSTREAM TERPRI PRIN1 SELECTC +FQUOTIENT CLOCKDIFFERENCE \LOLOC IDIFFERENCE SUB1 IPLUS \QUEUELENGTH LIST OUTPUT CL:MULTIPLE-VALUE-PROG1 + .UNWIND.PROTECT. FUNCTION ILESSP ELT RETRANSMITINDEX IMOD SEQ.ADD1 \ADDBASE) COMMON-LISP (\EVAL-PROGN +) XCL::%%EXPAND-DEFINER (CL:FUNCALL GET) READVISE (NLAMBDA.ARGS CL:FLET MAPCONC REVERSE READVISE-ENTRY + READVISE1) \TRANSLATE-CL%:LAMBDA (CONS PLUS MAKE-KEYWORD LIST PARSE-BODY) \BN.IGNN (LIST IQUOTIENT +IDIFFERENCE ITIMES CONS \BN.FROM.FIXP) \TEXTLEFTMARGIN (TEXTOBJ IPLUS) COMPILER::EFFECTS-ANALYZE-MV-CALL + (COMPILER::EFFECTS-ANALYZE-ANY-CALL COMPILER::MV-CALL-FN COMPILER::MV-CALL-ARG-EXPRS) SCALEPAGEYUNITS + (FIXR FTIMES \TEDIT.PAPERHEIGHT IPLUS) XCL::GET-DEFINER-NAME (CL:VALUES CL:INTERN CL:CONCATENATE +STRING CL:SYMBOL-PACKAGE) EDITGRAPH2 (PRIN1 LOGAND LOGOR ERSETQ GRAPHEDITCOMMANDFN TERPRI CLRPROMPT +WINDOWPROP ZEROP) SUBLIS (CONS SUBLIS FASSOC COPY) MB.THREESTATE.SHOWSELFN (IMAGEOBJPROP IMAGEBOX SUB1 +) PRINTPARA (POSITION IDIFFERENCE IPLUS LINELENGTH PRINTPARA1) \PFFetchString (ALLOCSTRING MIN +\GETBASE NCHARS \GETBASEBYTE SUB1 PLUS) XCL::%%REMOVE-SPECIAL-FORM (/REMPROP) \TEDIT.PURGE.SPACES ( +SUB1 \EDITELT GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE \RPLPTR) DSUBLIS (SUBLIS DSUBLIS) +\ITEMW.FLIPITEM (BLTSHADE) CL::RECORD-DOCUMENTATION (CL::PS-DOCUMENTATION-STRING) XCL::%%DEFINER-NAME +(CL:FUNCALL GET) XCL::%%DELETE-DEFINER (GET) KILL.LINES (FRPLACA FRPLACD FLAST) SPY.BUFFER.ENTRY (LLSH + \GETBASEPTR \VAG2 \GETBASE) \READBMDIMENSIONS (READ BITMAPCREATE BITSPERPIXEL) HISTORYMATCH ( +EDITFINDP) FB.DELETE.FILE (TB.USERDATA PLUS FFETCHFIELD) SPECVARS (APPEND UNION) PTDIFFERENCE ( +DIFFERENCE) \VFMFind (\BLT \VFMGet ADD1 MESASIZE \VFMGetBufferFor MESASETQ IQUOTIENT SUB1 \GETBASE +PLUS \VFMMerge) SEditicide (OPENWINDOWS WINDOWPROP) PRINTPARA1 (PRINTPARA1 ADD1 IPLUS NCHARS) +TEDIT.PARSE.PAGEFRAMES1 (MAPCAR LIST \TEDIT.SCALE CONSTANT FQUOTIENT TEDIT.PARSE.PAGEFRAMES1) +BIGNUM.DEFPRINT (CONS CONCAT CHARACTER \CHECKRADIX \INVALID.RADIX SELECTQ TIMES \BN.TH2D \BN.QRS IPLUS + IMOD IQUOTIENT LENGTH FRESHLINE \OUTCHAR) \MAIKO.NEWFAULTINIT (IDIFFERENCE) \BN.TH2D (LIST IQUOTIENT +IDIFFERENCE ITIMES CONS ABS IPLUS REVERSE) \MAIKO.DO.MOVDS (MAPC UNINTERRUPTABLY) \INVALID.RADIX ( +ERROR) \BITMAPFROMTEXTURE (BITMAPCREATE LOGAND \BITMASK \WORDELT IPLUS ITIMES IDIFFERENCE PLUS) +\ATWGROUPSIZE (WINDOWREGION UNIONREGIONS CONS) PARSE-BODY (CL:VALUES CL:REVERSE) \BN.ISUM1 (IPLUS CONS + \BN.ICANON DREVERSE) ROTATE.IP (APPENDOP.IP) \TEXTRIGHTMARGIN (TEXTOBJ TIMES CHARWIDTH LINELENGTH) +\MAIKO.ASSIGNBUFFERS (\LOLOC \ADDBASE PLUS UNFOLD LLSH) \BN.ISUM0 (\BN.IDIVIDE IPLUS CONS REVERSE) +NESTED.SUBMENU.POS (\GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM IDIFFERENCE LENGTH FMEMB +\DSPTRANSFORMX IPLUS ITIMES IREMAINDER \DSPTRANSFORMY SUB1 IQUOTIENT) TB.MAP.SELECTED.ITEMS (SUB1 +\DTEST PLUS TB.NTH.ITEM CL:FUNCALL) EXTENDREGIONLEFT (IPLUS IDIFFERENCE) \BN.NZEROS (LIST PLUS) +CONSTANTOK (IPLUS NCHARS CONSTANTOK SUB1) PRINTSPP (PRIN1 SELECTC IDIFFERENCE CONSTANT IPLUS TERPRI) +ADDHASH (GETHASH FMEMB LIST) \TEXTSTREAM.FILENAME (TEXTOBJ PACKFILENAME) TEDIT.HARDCOPYFN (TEXTOBJ +TEXTSTREAM RESETSAVE \TEDIT.MARKACTIVE TEDIT.FORMAT.HARDCOPY) COMPILER::META-EVALUATE (COMPILER::NODE-META-P +) \M-VMEMSAVE (LOGNOT16 LOGXOR) PRINENDLINE (MOVETO + DSPYPOSITION DSPLINEFEED IMAGESTREAMTYPE +TTYDISPLAYSTREAM SETFONT QUOTIENT - DSPXPOSITION REMAINDER) PORTSTRING (CONCAT OCTALSTRING LRSH LOGAND +) \DOCOMPRESSVMEM (DLFPFROMRP SUB1 \GETBASE PLUS) FIXLISPX/ (LISPX/) FORMAT-PRINT-CARDINAL ( +FORMAT-PRINT-CARDINAL-AUX - WRITE-STRING*) CHANGEFONT (DSPFONT) ITEMW.REPAINTFN (WINDOWPROP +\ITEMW.FLIPITEM) EDITDELETENODE (RESETFORM TTYDISPLAYSTREAM CLRPROMPT WINDOWPROP READ/NODE printout +TERPRI ASKUSER LIST DISPLAY/NAME CONSTANT APPEND TOLINKS GRAPHDELETELINK GETNODEFROMID FROMLINKS) +POLYSHADE.SCAN.IP (IMLTLIST MAPCAR PREPLOOP APPENDOP.IP) CL::ASSIGN-SLOT-ACCESSOR (CL::PSLOT-ACCESSOR +CL:VALUES CL:INTERN CL:CONCATENATE STRING CL::PSLOT-NAME) \TEDIT.APPLY.PARALOOKS (WINDOWPROP ADD1 +MBUTTON.FIND.NEXT.BUTTON IMAGEOBJPROP CONS U-CASE MKATOM MBUTTON.NEXT.FIELD.AS.TEXT +MBUTTON.NEXT.FIELD.AS.NUMBER FIXR TIMES SORT MAPCAR) COMPILER::EFFECTS-ANALYZE-LABELS ( +COMPILER::EFFECTS-ANALYZE COMPILER::LABELS-BODY COMPILER::NODE-EFFECTS COMPILER::NODE-AFFECTED) +\GREATESTPTAT (IQUOTIENT IPLUS IDIFFERENCE ITIMES ADD1 HALF LRSH) MB.THREESTATEBUTTON.FN (IMAGEOBJPROP + SELECTQ TEXTSTREAM) RESETGRID.NEW (WINDOWPROP IPLUS LEFTOFGRIDCOORD BOTTOMOFGRIDCOORD CL:* + +BITSPERPIXEL - COPYALL GRID) BITMAPOBJ.SNAPW (GETREGION BITMAPCREATE BITSPERPIXEL SCREENBITMAP +BITMAPTEDITOBJ COPY) PRINT3TO10 (PRIN1 TERPRI) COMP.USERFN (LIST ERROR GETHASH MAPCAR APPLY*) +FB.UPDATE.COUNTERS (WINDOWPROP LIST FB.COUNTER.STRING IDIFFERENCE DSPXPOSITION) EDITGRAPH (SHOWGRAPH) +FITP (CHARWIDTH BLANKS TIMES - DSPXPOSITION + DSFIT1 DSFIT2) \TEDIT.BUTTONEVENTFN ( +MODERNWINDOW.BUTTONEVENTFN FUNCTION) SUPERPRINT (\GETSTREAM ASSOC TYPENAME APPLY* PRIN2STRING +IDIFFERENCE WIDTH STRINGWIDTH DSPXPOSITION IMIN PRIN2S SUPERPRINT/COMMENT SUPERPRINT0 GETHASH) +MAKEHASH (HASHARRAY FUNCTION) SUBHASH (GETHASH DREMOVE) SEMI-COLON-COMMENT-P (SELECTQ) +MAKEHVPRETTYCOMS (ERROR) \TEXTDSPFONT (TEXTOBJ \GETFONTDESC DSPFONT) Inspecticide (OPENWINDOWS +WINDOWPROP) SCALE2.IP (APPENDOP.IP) SEDIT::COPY-SELECTION-LITATOM (SEDIT::DETRANSLATE-CHARS SUBSTRING +SEDIT::COPY-SELECTION-DEFAULT) DECODEBUTTONS (SMALLP NCONC LOGAND CONS) FB.DELETECOMMAND (FUNCTION +FB.UPDATE.COUNTERS) \MENU.ITEM.SELECT (GETMENUITEM) EDITGRAPH1 (SIZE/GRAPH/WINDOW FUNCTION) +CL::REMOVE-DOCUMENTATION (CL::PS-DOCUMENTATION-STRING CL:REST) FB.DELVER.FILES (PLUS) \BN.D2TH ( +REVERSE IPLUS ITIMES IMINUS CONS) \SEQUIN.CLEANUP (SELECTQ \SEQUIN.FLUSH.CONNECTION) DMCHAT.CLEAR ( +\DTEST TERM.HOME) COMPILER::RELEASE-MV-PROG1 (CL:MAPC CL:FUNCTION COMPILER::MV-PROG1-STMTS) +GETFILEPKGTYPE (GETFILEPKGTYPE LIST TYPESOF SELECTQ FMEMB - NCHARS FIXSPELL UNION ERROR) +COMP.TRYUSERFN (COMP.USERFN CONS) SETMAINTPANEL (SELECTC OPCODES) SPY.DRAWBOX (DIFFERENCE BITBLT) +\NOTE.3TO10 (ASSOC \DTEST CONS LIST CLOCK FFETCHFIELD) TERM.ADDCHAR (\DTEST - + TERM.ERASEBITS) +\BN.ICANON (IPLUS IDIFFERENCE ITIMES) PRINTATBOX (IDIFFERENCE FONTPROP DSPFONT PRINTANDBOX) +\DOFORMATTING (LLSH PLUS FFETCHFIELD IPLUS LRSH ADD1 SUB1 \EDITELT GETBASEPTR \GETBASEPTR \ADDBASE2 +\ADDBASE \RPLPTR IQUOTIENT LOGAND FQUOTIENT) \TEDIT.PARABOUNDS (CONS \CHTOPC IPLUS PLUS SUB1 IMINUS) +IOCBQLENGTH (PLUS EMPOINTER \VAG2) FIXAPPLY1 (STKNARGS FSTKARG SUB1 BLIPVAL FMEMB) DREVERSE (FRPLACD) +FB.HEADINGW.REDISPLAYFN (FB.HEADINGW.DISPLAY WINDOWPROP) \TEXTMENU.DOC.CREATE (OPENTEXTSTREAM +MBUTTON.CREATE MKATOM PLUS MB.CREATE.THREESTATEBUTTON \TEXTMENU.TOGGLE.CREATE MB.CREATE.NWAYBUTTON +MB.CREATE.FULLMENU MARGINBAR.CREATE LIST NCHARS IPLUS MKSTRING CONS FFETCHFIELD) \DL.NEWFAULTINIT ( +SUB1 \ADDBASE DLFPFROMRP PLUS + LOGAND IMIN ADD1 IMAX UNFOLD LLSH - \DoveDisplay.ScreenWidth CONSTANT +EXPT TIMES3 FOLDLO LRSH FOLDHI IPLUS IMOD RPTFROMRP IDIFFERENCE DLRPFROMFP \READFLAGS \READRP) +POLYSHADE.BLT (PREPLOOP MAPCAR \POLYSHADE.BLT) CL::%%DEFSTRUCT-CONSP-OPTIONS (CL:REMOVE) +XCL::MAKE-UNDOABLE (LIST) COMPILER::EFFECTS-ANALYZE-GO (COMPILER::NODE-EFFECTS LIST COMPILER::GO-TAGBODY + COMPILER::NODE-AFFECTED) UPDATE/BM/DISPLAY/SELECTED/REGION (WINDOWPROP BLTSHADE IDIFFERENCE IPLUS) +SEDIT::CONS-ATOM (NLSETQ READ OPENSTRINGSTREAM CONCAT ALLOCSTRING \SMASHSTRING NCHARS) +COMPILER::RELEASE-MV-CALL (COMPILER::RELEASE-TREE COMPILER::MV-CALL-FN CL:MAPC CL:FUNCTION +COMPILER::MV-CALL-ARG-EXPRS) COMP.PROGLST (COMP.EXPR PLUS COMP.EFFECT) MAPRELATION (NARGS +PARSERELATION MAPTABLE FUNCTION) SHAPEW.POP (SHAPEW WINDOWPROP WINDOWREGION) XCL::UNDOABLY-MAKUNBOUND +(SAVESET /PUTHASH /REMPROP) \TEXTDSPLINEFEED (FONTPROP DSPFONT) \PARSE.PORTCONSTANT (STRINGP MKSTRING +SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE LLSH IDIFFERENCE CONS LOGOR) +\NSFILING.REMOVEQUOTES (CONCATCODES NTHCHARCODE PLUS LIST) \BN.MADD (\BN.IDIVIDE ITIMES IPLUS CONS) +CL:IF (\EVAL) \SEQUIN.RETRANSMITNEXT (PLUS FFETCHFIELD) TEXTMENU.CLOSEFN (WINDOWPROP) POLYSHADE.IP ( +POLYSHADE.SCAN.IP LISTGET) \BN.TH2B (CONS \BN.MADD) HASHLINKS (SUBDECLARATIONS RECORD.CREATEINFO +RECORDECL RECORD.NAME LIST) COMPILER::EFFECTS-ANALYZE-IF (COMPILER::EFFECTS-ANALYZE-LIST LIST +COMPILER::IF-PRED COMPILER::IF-THEN COMPILER::IF-ELSE) DMCHAT.RIGHT (+ \DTEST MOVETO DMCHAT.NEWLINE) +PROMPTFOREVALED (FONTCREATE WINDOWTITLEFONT CREATEW CREATEREGION WIDTHIFWINDOW MAX STRINGWIDTH +HEIGHTIFWINDOW ITIMES FONTPROP DEFAULTFONT CLEARW TTYDISPLAYSTREAM ERSETQ LISPX LISPXREAD) +FB.COUNTER.STRING (CONCAT MKSTRING) COMPILER::ANNOTATE-TREE (COMPILER::FRAME-ANNOTATE +COMPILER::CLOSURE-ANNOTATE) COMPILER::EFFECTS-ANALYZE-CATCH (COMPILER::EFFECTS-ANALYZE-LIST LIST +COMPILER::CATCH-TAG COMPILER::CATCH-STMT) \TEDIT.BASICFIND (ADD1 IDIFFERENCE NCHARS NTHCHARCODE +SELECTQ SUB1 \BIN PLUS) GETCP.IP (APPENDOP.IP) LEVELEDFORM (CONS LEVELEDFORM SUB1) FORMAT-WRITE-FIELD +(CL:LENGTH FORMAT-ROUND-COLUMNS + WRITE-STRING*) \INITBIGNUMS (\TYPENUMBERFROMNAME LOGOR \BN.FROM.FIXP +) FB.HEADINGW.RESHAPEFN (WINDOWPROP FB.HEADINGW.DISPLAY) \EVAL-INVOKE-LAMBDA (ADDSTACKBASE \VAG2 - +\MYALINK OPCODES +) \SETTYPEMASK (\GETDTD \ADDBASE ITIMES LOGOR FFETCHFIELD FUNCTION) COMP.EQ ( +COMP.PROGN COMP.NOT COMP.STCONST APPLY* COMP.STFN) CL:EVAL (CL:FUNCALL) CHOOZ (CHCON FLENGTH ELT ADD1 +LAST APPLY* GENERATE NCHARS IQUOTIENT ITIMES IDIFFERENCE SKOR DCHCON LIST MKATOM CONS PACKC CHOOZ1 +SUB1 DREVERSE) \INTERPRET-ARGUMENTS (CL:MACROLET RECUR WITH-BINDING LIST PLUS EVENP - CL:EVAL) +TESTRELATION (PARSERELATION FMEMB GETTABLE TESTTABLE) LASTC (\GETSTREAM FCHARACTER) MASKSTROKE.IP ( +APPENDOP.IP) \TEXTDSPCHARWIDTH (CHARWIDTH DSPFONT) TERM.DELETELINE (\DTEST + - TERM.ERASEBITS) +POSTSCRIPT.PUTBITMAPBYTES (LRSH IPLUS LSH CL:FUNCALL FUNCTION SUB1 ITIMES \GETBASEBYTE LOGAND PLUS +IMINUS \BOUTEOL BITMAPCREATE ADD1 IDIFFERENCE) COMPAREFAIL (SOME CL:FUNCALL IGREATERP COUNTDOWN SUB1 +NLISTP FASSOC EQUAL NCONC1 CONS) EXTENDREGIONBOTTOM (IPLUS IDIFFERENCE) PEEKC (FUNCTION \GETSTREAM +FCHARACTER PEEKCCODE) TEDIT.MINIMAL.WINDOW.SETUP (FLAST WINDOWPROP LIST FUNCTION FMEMB CONS NCONC1 +\TEDIT.CREATE.LINECACHE DSPCREATE LISTGET DSPCLIPPINGREGION \SHOWTEXT NCONC) PEEKCCODE (FUNCTION +\PEEKCCODE \GETSTREAM) FINDFN (STKNTH STKNAME STKARG STKNTHNAME STKARGS GETD GETPROP REALSTKNTH +SELECTQ STKPOS) \PEEKREFILL (SELECTQ STKNAME IMINUS \CHARSET LRSH \RAISECHAR IDIFFERENCE \CHAR8CODE +LOGAND \ECHOCHAR BIN) CLISP% (BLIPVAL STKNTH EVAL) ISET.IP (APPENDOP.IP) TEXTSTREAM.TITLE (TEXTOBJ) +\LOOKUPPORT (\GETMISCSOCKET ALLOCATE.PUP EXCHANGEPUPS IQUOTIENT FOLDLO LRSH - TERPRI CONS LIST PLUS +\ADDBASE GETPUPSTRING) BRKDWNINIT (BRKDWNARRAY ARRAY ADD1 NCREATE PLUS) \CHECKEOLC.CRLF ( +UNINTERRUPTABLY \PEEKCCODE) /DSUBST (COPY) \POLYSHADE.YSCAN.IP (MAPCAR SORT CONS CRITSECT IPLUS +FILLRECTANGLE.IP IDIFFERENCE MAPC IMIN NORMSECT) PARSERELATION1 (APPLY* SELECTQ FUNCTION ERROR +PARSERELATION1 MSVBTABLES GETWORDTYPE FASSOC GETHASH) DINFO.READ.GRAPH (FILENAMEFIELD PRIN1 INFILEP +READFILE ERROR LISTGET) /NCONC (ARG ADD1 LAST) BMOBJ.GETFN4 (\PEEKBIN FPLUS \WIN IPLUS LLSH \BIN +FQUOTIENT BITMAPTEDITOBJ \READBINARYBITMAP) EDITMODE (TTYDISPLAYSTREAM SELECTQ) COMPILER::PEEPHOLE-OPTIMIZE + (CL:MAKE-HASH-TABLE) RATOM (\GTREADTABLE FUNCTION WITH-RESOURCE \SUBREAD \GETSTREAM GETRESOURCE +NEWRESOURCE ALLOCSTRING) VKBD.FIX.FONT (MAPC EVALV) \DL.ASSIGNBUFFERS (\LOLOC \ADDBASE PLUS \READRP +UNFOLD LLSH) \SUBREAD (SELECTC LIST \SYNCODE GETHASH \GETBASEBYTE \INCCODE \PEEKCCODE \INCHAR +\SUBREADCONCAT \PUTBASECHAR \PUTBASEFAT \PUTBASE \PUTBASETHIN \PUTBASEBYTE PLUS CONS \SMASHSTRING +ALLOCSTRING \EOFP SPREADAPPLY* \PARSE.NUMBER LISPERROR \READ.SYMBOL RPLACD \FIND.PACKAGE.INTERNAL +\GETBASESTRING \SUBREAD CL:CODE-CHAR \RSTRING2 \GETREADMACRODEF RELEASERESOURCE GETRESOURCE +NEWRESOURCE \APPLYREADMACRO LAST) TEDIT.GET (TEXTOBJ TEXTPROP \TEDIT.MAKEFILENAME TEDIT.GETINPUT +\TEXTSTREAM.FILENAME APPLY* FULLNAME RESETSAVE TTYDISPLAYSTREAM CURSOR \SHOWSEL \TEXTCLOSEF OPENP +OPENSTREAM TEDIT.BUILD.PCTB MAPC EVAL \TEDIT.GET.INSERT.CHARLOOKS \FIXSEL TEXTSTREAM.TITLE +\TEDIT.WINDOW.TITLE \TEDIT.ORIGINAL.WINDOW.TITLE TEDITMENU.STREAM PACKFILENAME MBUTTON.SET.FIELD +\TEDIT.SET.WINDOW.EXTENT \TEDIT.PRIMARYW \TEDIT.HISTORYADD) \DL.MARK.PAGES.UNAVAILABLE (RPTFROMRP +IDIFFERENCE PLUS \ADDBASE) \TEXTDSPSTRINGWIDTH (STRINGWIDTH DSPFONT) \CLEARWORDS (SUB1 \ADDBASE +IDIFFERENCE) TREEGRAPHNODE (LIST NODECREATE CONS SUB1 TREEGRAPHNODE APPEND) \PS.BOUTFIXP (IMINUS BOUT +IPLUS SUB1 IREMAINDER IQUOTIENT PLUS \BOUTS IDIFFERENCE MAPC CHCON \CHAR8CODE LOGAND) UPPERCASEARRAY ( +ARRAYP CASEARRAY IDIFFERENCE CONSTANT PLUS) \FDECODE/BUTTON (SELECTQ) COMPAREMAX (IQUOTIENT +IDIFFERENCE IPLUS COUNTDOWN) \DL.UNMAPPAGES (\ADDBASE PLUS) \RATOM/RSTRING-REFILL (STREAMPROP \BIN) +ONEDINSPECT.SCROLLFN (WINDOWPROP FUNCTION) /NCONC1 (/NCONC FRPLACD CONS) /RPLACA (LIST RPLACA ERRORX) +FIND-EDIT-LOCATION-TAIL (FIND-EDIT-LOCATION-TAIL REMOVE-COMMENTS CONS) /SETPROPLIST (LIST GETPROPLIST +SETPROPLIST) /PUTHASH (LIST GETHASH PUTHASH) TERM.UP (\DTEST MOVETO IMIN + ITIMES) \TOP-LEVEL-READ ( +\DTEST FUNCTION CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. CL:FUNCTION .CALL.SUBREAD. \SUBREAD +\GETSTREAM GETRESOURCE NEWRESOURCE ALLOCSTRING) /RPLACD (LIST RPLACD ERRORX) SEDIT::CLOSE-NODE-LITATOM + (FREPLACEFIELD CONS LIST FFETCHFIELD SEDIT::CONS-ATOM CONCAT SEDIT::NOTE-CHANGE) +\TEDITPARAMENU.CREATE (\TEXTMENU.DOC.CREATE) READC (\GETSTREAM \GTREADTABLE FUNCTION \INCHAR) +MB.CREATE.THREESTATEBUTTON (IMAGEOBJCREATE STRINGWIDTH FONTPROP BITMAPCREATE DSPCREATE IMAGEOBJPROP) +\DO.PROGV (PLUS IPLUS CEIL LOGAND ADD1 UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDHI LRSH +\DO.PROGV.SETUP.FRAME.AND.EXECUTE CL:FUNCALL) COMPILER::RELEASE-LAMBDA (COMPILER::LAMBDA-APPLIED-EFFECTS + COMPILER::LAMBDA-APPLIED-AFFECTED MAPC COMPILER::LAMBDA-REQUIRED COMPILER::VARIABLE-BINDER +COMPILER::LAMBDA-OPTIONAL CL:FIRST CL:SECOND COMPILER::LAMBDA-KEYWORD CL:THIRD COMPILER::RELEASE-TREE +COMPILER::LAMBDA-BODY) \READCREFILL (STREAMPROP \BIN) COMP.BIND.VARS (COMP.CHECK.VAR COMP.VARTYPE +FASSOC CONS COMP.EFFECT LENGTH OPT.DREV) \8859PEEKCCODEFN (\RECODECCODE \PEEKCCODE) GRAPHDELETENODE ( +DREMOVE) FILLRECTANGLE.IP (FIXR TIMES IMIN + IMAX - APPENDOP.IP) READCCODE (\GETSTREAM \GTREADTABLE +FUNCTION \INCHAR) CACCESSFNS (DECLARERECORD CONS) GET-RIGHTW (WINDOWPROP CREATEW CREATEREGION FUNCTION +) EDITBMRESHAPEFN (WINDOWPROP IMAX IDIFFERENCE IPLUS IQUOTIENT IMIN ITIMES QUOTIENT TIMES CREATEREGION + MINUS BITMAPWIDTH BITMAPHEIGHT BITMAPCREATE) BMOBJ.GETFN2 (\WIN IPLUS LLSH \BIN BITMAPTEDITOBJ +\READBINARYBITMAP) READP (\GETSTREAM FDEVOP SPREADAPPLY* \GENERIC.READP) SEDIT::EDIT-SELECTION ( +SEDIT::GET-SELECTED-STRUCTURE SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW) /ATTACH (/RPLNODE CONS ERRORX +LIST) LISPXTAB (LIST CONS TAB) \10MB.PRINT.ENCAPSULATION (PRIN1) +SMASH.THE.DAMNED.CONST.IN.ATTACHWINDOW (CREATEW WINDOWPROP APPEND COPY CLOSEW) LAYOUTGRAPH ( +STRINGWIDTH HALF LRSH FONTPROP BROWSE/LAYOUT/LATTICE BROWSE/LAYOUT/HORIZ BROWSE/LAYOUT/HORIZ/COMPACTLY + LIST ERROR EQMEMB) POSTSCRIPT.SHOWACCUM (STREAMPROP CONCAT DIFFERENCE CONSTANT CL:FUNCALL FUNCTION) +SKIPSEPRCODES (\GETSTREAM \GTREADTABLE \SYNCODE GETHASH \GETBASEBYTE \PEEKCCODE) COMPARE1 (EQUAL +COMPAREFAIL) /PUTASSOC (ERRORX LIST CONS) SEDIT::BACKSPACE-UNKNOWN (SHOULDNT SEDIT::SET-SELECTION-NOWHERE +) SKIPSEPRS (SKIPSEPRCODES FCHARACTER) UPDATE/SHADE/DISPLAY (WINDOWPROP IDIFFERENCE) +DIRECTORY.NEXTFILE (\GENERATENEXTFILE CONCATCODES MKSTRING) FIND-EDIT-LOCATION (REVERSE +FIND-EDIT-LOCATION-TAIL) COMPILER::RELEASE-LABELS (MAPC COMPILER::LABELS-FUNS COMPILER::VARIABLE-BINDER + COMPILER::RELEASE-TREE COMPILER::LABELS-BODY) FB.COUNTERW.REDISPLAYFN (WINDOWPROP MAINWINDOW +FB.DISPLAY.COUNTERS) COMP.CHECK.VAR (COMP.USERFN APPEND CONS COMPERROR) MOUSESTATE-NAME (SELECTQ HELP) + \VFMCreateVPage (ELT \PFVolumeNumber \VAMAllocPageGroup) \SIMPLIFY.CL.ARGLIST (LIST) +CLOSE.WINDOWS.IN.REGION (GETREGION MAPC OPENWINDOWS WINDOWPROP CLOSEW) INITIALIZECOLOR.IP ( +GETFRAMEVAR.IP) MBUTTON.SET.FIELD (TEXTOBJ MBUTTON.FIND.BUTTON MBUTTON.FIND.NEXT.FIELD FINDNODE-INDEX +MKSTRING NCHARS) \FAULTHANDLER (\FAULTINIT \VAG2 LOGAND) TERM.MODIFY.ATTRIBUTES (\DTEST) COMPILER::EFFECTS-ANALYZE-CALL (COMPILER::EFFECTS-ANALYZE-ANY-CALL COMPILER::CALL-FN COMPILER::CALL-ARGS -) \\NSRANDOM.READPAGES (\\NSRANDOM.READ.SEGMENT FFETCHFIELD \\NSRANDOM.FETCH.CACHE IMIN - LOGAND -CONSTANT LOGOR FOLDLO LRSH SUB1 + PLUS \\NSRANDOM.PREPARE.CACHE FREPLACEFIELD) \\DSPYPOSITION.IP ( -FFETCHFIELD) CL:BUTLAST (CL:ERROR LENGTH) CL::%PI (CL::%FLOAT) LISPXUSE1 (COPY SASSOC LSUBST -LISPXSUBST NCONC) \\MAIKO.ETHER-INTERRUPT (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION FFETCHFIELD LOCF \\ADDBASE \\ALLOCATE.ETHERPACKET) COMPILER::RELEASE-LAMBDA ( -COMPILER::LAMBDA-APPLIED-EFFECTS COMPILER::LAMBDA-APPLIED-AFFECTED MAPC COMPILER::LAMBDA-REQUIRED -COMPILER::VARIABLE-BINDER COMPILER::LAMBDA-OPTIONAL CL:FIRST CL:SECOND COMPILER::LAMBDA-KEYWORD CL:THIRD - COMPILER::RELEASE-TREE COMPILER::LAMBDA-BODY) CLISPFOR1 (GETPROP CLISPFUNCTION? CONS LIST NLEFT -APPEND NCONC LISTP /NCONC /ATTACH CLISPFOR1) \\PRESSCURVE2 (RESETLST RESETSAVE LIST DSPFONT -FFETCHFIELD IDIFFERENCE GETFILEPTR \\BOUT ARRAY ELT FONTPROP FIXR FTIMES GEQ SUB1 POLYEVAL \\FLOATBOX -OPCODES ADD1 IPLUS EQP IMINUS FQUOTIENT FDIFFERENCE FPLUS ABS LRSH LLSH PLUS) \\INSPECT/CODE/RESHAPEFN - (WINDOWPROP FFETCHFIELD SUB1 IDIFFERENCE FONTPROP CONS IPLUS DSPYPOSITION) \\DOHELPINTERRUPT ( -\\SELECTPROCESS THIS.PROCESS \\PROCESS.MAKEFRAME FUNCTION) \\MYARGCOUNT (\\MYALINK OPCODES -ADDSTACKBASE \\VAG2 IDIFFERENCE FFETCHFIELD FOLDLO LRSH) CLEANUP (NLAMBDA.ARGS APPEND MAKEFILES -INTERSECTION APPLY MEMB) KNOTLOOP (LAST XYPT.X XYPT.Y MAKELINE IDIFFERENCE CONS REVERSE) -SEDIT::COMPUTE-SELECTION-POSITION-DEFAULT (SEDIT::SUBNODE NTH FFETCHFIELD IPLUS FREPLACEFIELD) -COMPILER::META-EVAL-IF (COMPILER::MEVAL COMPILER::META-EVALUATE COMPILER::IF-PRED REPLACEFIELD -COMPILER::IF-THEN COMPILER::IF-ELSE COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) -CL::GET-PS-FROM-ACCESSOR (CL:CATCH CL:MAPHASH CL:FUNCTION CL:ERROR) COMP.BIND.VARS (COMP.CHECK.VAR -COMP.VARTYPE CONS FASSOC FRPLACA COMP.EFFECT LENGTH OPT.DREV) \\AGE.ROUTING.TABLE (NTYPX CL:ERROR -\\GETBASEPTR FRPLACA DREMOVE \\ADDBASE PLUS) BRKDWNSETUP (LIST BRKDWNFORM KWOTE GETD) SEDIT::GETKEY ( -THIS.PROCESS FFETCHFIELD WINDOWPROP) \\DELETECH (FFETCHFIELD IDIFFERENCE FREPLACEFIELD IPLUS FRPLACA -IMINUS \\CHTOPC - ADD1 \\SPLITPIECE \\GETBASEPTR \\FIRSTNODE LIST CONS IMAGEOBJPROP \\DELETETREE FLAST - \\TEDIT.ORIGINAL.WINDOW.TITLE) SPYOBJ.HEIGHT (FFETCHFIELD FONTHEIGHT MAX QUOTIENT TIMES) -DBG::CLOSE-DEBUGGER-WINDOW (WINDOWPROP WFROMDS PROCESS.TTY THIS.PROCESS DBG::EXIT-DEBUGGER BLOCK) -XIPAPPEND.BYTE (\\DTEST IDIFFERENCE FFETCHFIELD LOCF \\ADDBASE PLUS) \\INVERTITEM (SHADEGRIDBOX -FFETCHFIELD) \\MISC8.UFN (SELECTQ IBLT1 IBLT2 RAID) \\READPRINTERPORT.UFN (\\DEVICE.INPUT) -\\MAIKO.CONSOLE-LOG-PRINT (SUBSTRING) \\GETBRUSHFONT.PRESS (SELECTQ FIXR FTIMES) SEDIT::STRINGIFY-ATOM - (MKSTRING FFETCHFIELD) \\WRITEPRINTERPORT.UFN (\\DEVICE.OUTPUT) NUTF8CODEBYTES (SHOULDNT) CL:MAPHASH -(MAPHASH CL:FUNCTION) FB.MAYBE.EXPUNGE (FFETCHFIELD SELECTQ MENU FB.EXPUNGE?.MENU FB.EXPUNGECOMMAND) -FIND.PROCESS (GETHASH ERROR) \\ARG0 (\\MYALINK OPCODES ADDSTACKBASE \\VAG2 IDIFFERENCE FFETCHFIELD -FOLDLO LRSH GETBASEPTR \\GETBASEPTR IPLUS LLSH SUB1 LISPERROR) \\ONQUEUE (FFETCHFIELD) -\\TFBRAVO.LCASER (CHCON FRPLACA IPLUS PACKC) \\MEDW.OPENW (FFETCHFIELD UNINTERRUPTABLY UNFOLD LLSH -.WHILE.TOP.DS. DSPDESTINATION \\GETBASE \\TOTOPWDS) \\MAP.ROUTING.TABLE (NTYPX CL:ERROR APPEND -\\GETBASEPTR CL:FUNCALL PLUS \\ADDBASE) CONTROL-T (GETSTREAM TTYDISPLAYSTREAM WFROMDS UNINTERRUPTABLY -STKNTHNAME PROCESS.NAME THIS.PROCESS PRIN1 PLUS CLOCK FFETCHFIELD IPLUS IMINUS \\CLOCK0) -\\SETPRINTLEVEL (LINBUF SYSBUF \\GETCHAR IPLUS ITIMES IDIFFERENCE) SI::INTERNAL-THROW (ARG -CL:VALUES-LIST LIST PLUS CL:ERROR) RETRYSCAN (RETFROM LOADFNSCAN SCANFILEHELP) -SEDIT::COMPUTE-FORMATS-AND-FORMAT-VALUES (FFETCHFIELD SEDIT::COMPUTE-FORMATS-AND-FORMAT-VALUES -CL:FUNCALL) COMPILER::META-EVAL-GO (COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) CL:NBUTLAST (CL:ERROR - LENGTH - CL:NTHCDR) \\RELEASE.IOCB (\\HILOC ERROR PLUS \\LOLOC) XCL::%DEFINE-TYPE-DELDEF (CL:GETHASH) - XCL::%DEFINE-TYPE-GETDEF (CL:GETHASH CL:COPY-TREE) CL::%SIMPLE-SUBST (CL::%SUBST-MACRO EQL -CL::%SIMPLE-SUBST) COMPILER::EFFECTS-ANALYZE-BLOCK (COMPILER::EFFECTS-ANALYZE COMPILER::BLOCK-STMT -COMPILER::NODE-EFFECTS COMPILER::REMOVE-EFFECT COMPILER::NODE-AFFECTED) CL:ZEROP (=) COMP.CHECK.VAR ( -COMP.USERFN APPEND CONS COMPERROR) XCL::%DEFINE-TYPE-FILE-DEFINITIONS (CL:MAPCAR CL:FUNCTION) -CL::%SUBST-IF-NOT (CL::%SUBST-MACRO CL:FUNCALL CL::%SUBST-IF-NOT) CL::%2PI (CL::%FLOAT) -CL::%COMPLEX-SUBST (CL::%SUBST-MACRO CL:FUNCALL CL::%COMPLEX-SUBST) \\MISC1.UFN (RAID) \\SETRECLAIMMIN - (LINBUF SYSBUF \\GETCHAR IPLUS ITIMES IDIFFERENCE) COMPILER::RELEASE-LABELS (MAPC COMPILER::LABELS-FUNS - COMPILER::VARIABLE-BINDER COMPILER::RELEASE-TREE COMPILER::LABELS-BODY) GETDEF (EQMEMB GETFILEPKGTYPE - GETDEFCURRENT CONS MKLIST GETPROP GETDEFSAVED GETDEFFROMFILE COPY) \\RETURN (\\MYALINK OPCODES -IDIFFERENCE ADDSTACKBASE \\VAG2 FFETCHFIELD) CL::CACHE-SETF-INFO (CL:MAPC CL:FUNCTION CL::PS-ALL-SLOTS -) AWAIT.EVENT (\\DTEST FIX \\PROCESS.GO.TO.SLEEP) SPAWN.MOUSE (UNINTERRUPTABLY FFETCHFIELD -FIND.PROCESS CONCAT PLUS LIST) UTF8HEXSTRING (HEXSTRING LOGOR LLSH LRSH LOADBYTE LOGAND LSH IMINUS -MASK.1\'S SUB1 ERROR) FB.UPDATECOMMAND (FB.UPDATEBROWSERITEMS) |\\PFInitializeVols| (SUB1 FFETCHFIELD -|\\PFGetVol| PLUS) COMPILER::EFFECTS-ANALYZE-CATCH (COMPILER::EFFECTS-ANALYZE-LIST LIST COMPILER::CATCH-TAG - COMPILER::CATCH-STMT) MONITOR.AWAIT.EVENT (\\DTEST FIX \\PROCESS.GO.TO.SLEEP) SEDIT::UNDO-LIST-REPLACE - (FFETCHFIELD LAST FIXP SUB1) CL:COPY-TREE (CONS CL:COPY-TREE) \\MEDW.CREATEW (DSPCREATE FFETCHFIELD -BITMAPCREATE BITSPERPIXEL FREPLACEFIELDVAL NCREATE FUNCTION UNFOLD LLSH IPLUS IDIFFERENCE DSPLINEFEED -CONS) SEDIT::UNDO-REPLACE-QUOTE (SEDIT::SUBNODE FFETCHFIELD LIST) CL::%SUBST-IF (CL::%SUBST-MACRO -CL:FUNCALL CL::%SUBST-IF) \\DOHELPINTERRUPT1 (FLASHWINDOW TTY.PROCESSP TTY.PROCESS THIS.PROCESS -FFETCHFIELD \\PROC.FINDREALFRAME) %LLARRAY-MAKE-ACCESSOR-EXPR (%GET-TYPE-TABLE-ENTRY -ARRAY-TABLE-ENTRY-ACCESSOR ARRAY-TABLE-ENTRY-BITS-PER-ELEMENT ARRAY-TABLE-ENTRY-NEEDS-SHIFT-P) -CL::GET-SLOT-DESCRIPTOR-FROM-PS (CL:ERROR) PUTDEF (GETFILEPKGTYPE GETPROP APPLY*) \\SELECTPROCESS ( -TTY.PROCESS FFETCHFIELD THIS.PROCESS CONS LIST CONCAT MENU FREPLACEFIELDVAL NCREATE FIND.PROCESS) -\\RPLCONS (UNINTERRUPTABLY \\VAG2 \\HILOC LOGAND \\LOLOC FFETCHFIELD OPCODES .MAKECONSCELL. \\ADDBASE -PLUS IPLUS16 \\GETBASE ADD1 IDIFFERENCE \\DORECLAIM IPLUS LRSH CONS) \\PROCESS.GO.TO.SLEEP ( -UNINTERRUPTABLY THIS.PROCESS BLOCK FFETCHFIELD FREPLACEFIELD \\MP.ERROR SETUPTIMER \\RESCHEDULE -\\MYALINK OPCODES) \\TEXTCLOSEF-SUBTREE (FFETCHFIELD \\TEXTCLOSEF-SUBTREE) XCL::%DEFINE-TYPE-PUTDEF ( -XCL::%DEFINE-TYPE-DELDEF REMOVE-COMMENTS CL:COPY-TREE CL:EVAL XCL::MAKE-UNDOABLE) SEDIT::SPLIT-LITATOM - (NCHARS FFETCHFIELD SEDIT::CLOSE-NODE SEDIT::DELETE-NODES) FTPGETCODE (FTPPRINTCODE BIN) %AREF1 ( -CL:ARRAY-RANK CL:ERROR FFETCHFIELD %ARRAY-READ +) DBG::CREATE-DEBUGGER-WINDOW (DECLARE CREATEW -DBG::NEAR-BY-REGION WINDOWPROP WFROMDS STKPOS EVALV REGIONP CREATEREGION) \\GCRECLAIMCELL (NTYPX -FFETCHFIELD \\DELREF OPCODES \\ADDBASE \\VAG2 \\HILOC LOGAND \\LOLOC LLSH IDIFFERENCE \\GETBASEPTR -UNFOLD \\GETDTD ITIMES FOLDLO LRSH) PUTMENUPROP (FFETCHFIELD LIST) %ASET1 (CL:ARRAY-RANK CL:ERROR -FFETCHFIELD %ASET1 %ARRAY-WRITE +) \\MISC2.UFN (SELECTQ \\GET-NEXT-RUN RAID) \\HCPYMODEDSPPRINTCHAR ( -FFETCHFIELD \\CARET.DOWN SELECTC \\SYNCODE GETHASH \\GETBASEBYTE LOGAND PLUS IPLUS LOGOR SELCHARQ -FREPLACEFIELD SELECTQ MACHINETYPE PLAYTUNE FLASHWINDOW WFROMDS CHARWIDTH UNFOLD LLSH -\\DISPLAYSTREAMINCRXPOSITION IDIFFERENCE MOD IMOD IQUOTIENT SHOULDNT) CL::%COMPLEX-NSUBST ( -CL::%NSUBST-MACRO CL:FUNCALL CL::%COMPLEX-NSUBST) XCL::%DEFINE-TYPE-FILEGETDEF (LOADFNS CONS) -RESET.INTERRUPTS (MAPCAR \\ILLEGAL.ARG LIST ASSOC UNINTERRUPTABLY FFETCHFIELD) SELECT.FNS.EDITOR (MENU - APPEND FREPLACEFIELDVAL NCREATE CONS) CL:NSUBST (CL:ERROR CL::%COMPLEX-NSUBST CL::%SIMPLE-NSUBST) -CL::%NSUBST-IF (CL::%NSUBST-MACRO CL:FUNCALL CL::%NSUBST-IF) \\DOINTERRUPTHERE (SELECTQ RESET ERROR! -\\DOHELPINTERRUPT \\DOHELPINTERRUPT1 CONTROL-T \\SETRECLAIMMIN \\SETPRINTLEVEL \\CLEARSYSBUF RAID SET -\\EVAL) \\ATOMCELL (\\ATOMDEFINDEX NTYPX \\LOLOC SHOULDNT \\HILOC SELECTC \\ATOMVALINDEX -\\ATOMPROPINDEX \\ATOMPNAMEINDEX \\ADDBASE \\VAG2 IPLUS ITIMES) CURRENTINTERRUPTS (APPEND FFETCHFIELD) - CL::%NSUBST-IF-NOT (CL::%NSUBST-MACRO CL:FUNCALL CL::%NSUBST-IF-NOT) INTERRUPT (DEBUGGER -MAKE-CONDITION) %LIT-TYPE-TO-TYPE (CL:ASSOC) \\GETBASEBYTE (\\GETBASE FOLDLO LRSH LOGAND) -\\NSRANDOM.TRUNCATEFILE (FFETCHFIELD IPLUS UNFOLD LLSH \\GETEOFPTR \\NSRANDOM.UPDATE.VALIDATION -FILING.CALL ASSOC) CL:WRITE-STRING (WRITE-STRING*) \\PROC.FINDREALFRAME (STKNTHNAME PLUS) ERROR! ( -\\MYALINK OPCODES ADDSTACKBASE \\VAG2 FFETCHFIELD IDIFFERENCE FLOOR LOGAND CONSTANT LOGXOR SUB1 RETTO) - APPLYTOSELECTEDNODE (MODERNWINDOW.BUTTONEVENTFN FUNCTION) CLISPIF3 (CONS APPEND) CL:NSUBST-IF ( -CL::%NSUBST-IF) CL:SUBST-IF-NOT (CL::%SUBST-IF-NOT) CL:TYPE-OF (\\INDEXATOMPNAME \\GETDTD \\ADDBASE -ITIMES NTYPX FFETCHFIELD GET CL:FUNCALL) \\CONTROL-T.PRINTRATIO (PRIN1 PRINTNUM IQUOTIENT ITIMES -|printout|) \\GCSCAN2 (LOGAND CONSTANT LOGOR \\GETBASE SUB1) CL::%SIMPLE-SUBLIS (CL::%SIMPLE-ASSOC -CL::%SIMPLE-SUBLIS CONS) CL:SUBST-IF (CL::%SUBST-IF) \\UNBOXFLOAT3 (\\CALLER.ARGS \\MYALINK OPCODES -FFETCHFIELD ADDSTACKBASE \\VAG2 \\.GETBASE32 IDIFFERENCE \\FLOATBOX TIMES LLSH \\GETBASEFLOATP FPLUS -FTIMES PLUS \\FLOATUNBOX SELECTQ \\MATMULT333 \\MATMULT444 \\MATMULT133 \\MATMULT331 \\MATMULT144 -\\MATMULT441 HELP) \\MISC10.UFN (SELECTQ \\PIXELBLT.UFN HELP) \\STORE.N.UFN (\\.PUTBASE32 \\PUTBASEPTR - IDIFFERENCE \\MYALINK OPCODES FFETCHFIELD ADDSTACKBASE \\VAG2 IPLUS) \\CANONICAL.NSHOSTNAME ( -LOOKUP.NS.SERVER MKATOM NSNAME.TO.STRING) BRKDWNFBOXES (BRKDWNMACRO \\BOXIPLUS BRKDWNELT ELT -BRKDWNDIFFA IDIFFERENCE \\PUTBASEFIXP FBOXCOUNT BOXCOUNT EVAL) CL::DEFAULT-STRUCTURE-PRINTER ( -\\PRINT-USING-ADDRESS TYPENAME) TEDIT.RESET.EXTEND.PENDING.DELETE (FFETCHFIELD FREPLACEFIELD) -\\P-MISC2.UFN (SELECTQ \\GET-NEXT-RUN RAID) KNOTLINE (XYPT.X XYPT.Y MAKELINE DIFFERENCE CONS REVERSE) -CL:PRINC (WRITE) XCL::INTERESTING-FRAME-P (STKNAME) \\PSC.SYMBOLS (FFETCHFIELD \\DSPFONT.PSC LIST) -\\POP.N.UFN (\\MYALINK OPCODES FFETCHFIELD ADDSTACKBASE \\VAG2 \\GETBASEPTR IDIFFERENCE UNFOLD LLSH -ADD1 FREPLACEFIELD) CLISPIF1 (CONS LDIFF DWIMERRORRETURN LIST) CL::%COMPLEX-SUBLIS (CL::%COMPLEX-ASSOC - CL:FUNCALL CL::%COMPLEX-SUBLIS CONS) CL:NSUBST-IF-NOT (CL::%NSUBST-IF-NOT) SEDIT::SET-SELECTION-STRING - (SEDIT::SET-SELECTION-ME SEDIT::GET-BUTTON-STRING SEDIT::SCAN-STRING FFETCHFIELD) \\FTP.FLUSH.TO.EOC -(GETSTREAM BIN FTPGETMARK MARK#) HASTTYWINDOWP (PROCESS.TTY) GETDESCRIPTORS (\\GETDTD \\ADDBASE ITIMES - \\TYPENUMBERFROMNAME NTYPX FFETCHFIELD) TWODINSPECT.MAKEREGIONS (WINDOWPROP STRINGWIDTH DSPLINEFEED -WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES -TWODINSPECT.COLUMNWIDTHS LENGTH IPLUS LIST PLUS CREATEREGION LAST DIFFERENCE) CL::%SIMPLE-NSUBLIS ( -CL::%SIMPLE-ASSOC) XCL::UNDOHOOK (CL:EVAL) CL::%COMPLEX-ASSOC (ASSOC CL::%SIMPLE-ASSOC) INTERRUPTCHAR -(INTCHAR LIST) OPENWP (FFETCHFIELD) SEDIT::SUBNODE-CHANGED-QUOTE (RPLACA FFETCHFIELD) -INSPECT.INVERTREGION (BLTSHADE) CL:PRIN1 (WRITE) CONVERT-AFM-FILES (MAPC READ-AFM-FILE \\FONTFILENAME -LIST) \\MISC7.UFN (SELECTQ \\PSEUDOCOLOR.UFN \\FBITMAPBIT.UFN RAID) CL::PRINT-STRUCTURE-INSTANCE ( -CL:FUNCALL CL::PS-PRINT-FUNCTION) SPYOBJ.GET (IMAGEOBJCREATE READ) \\PUTBASEBYTE (.COERCE.TO.BYTE. -IGEQ CONSTANT LLSH \\ILLEGAL.ARG FOLDLO LRSH \\DTEST \\GETBASE IPLUS LOGAND) \\RETCALL (\\MISCAPPLY* -FFETCHFIELD) \\DRAWARC.PRESS (\\DRAWARC.GENERIC) GETMENUPROP (LISTGET FFETCHFIELD) CL::%E (CL::%FLOAT) - CL::%SIMPLE-NSUBST (CL::%NSUBST-MACRO EQL CL::%SIMPLE-NSUBST) PROCESS.NAME (\\COERCE.TO.PROCESS -FIND.PROCESS FFETCHFIELD) TRACE (NLAMBDA.ARGS MAPCONC XCL:TRACE-FUNCTION CL:FIRST CL:THIRD) -COMPILER::RELEASE-IF (COMPILER::RELEASE-TREE COMPILER::IF-PRED COMPILER::IF-THEN COMPILER::IF-ELSE) -\\HDCPYDISPLAYINIT (FUNCTION FREPLACEFIELDVAL NCREATE) CL::%COMPLEX-NSUBLIS (CL::%COMPLEX-ASSOC -CL:FUNCALL) CL:SUBLIS (CL:ERROR CL::%COMPLEX-SUBLIS CL::%SIMPLE-SUBLIS) FORMAT-WRITE-FIELD (CL:LENGTH -FORMAT-ROUND-COLUMNS + WRITE-STRING*) CL::GET-PS-FROM-PREDICATE (CL:CATCH CL:MAPHASH CL:FUNCTION -CL:ERROR) CL:SUBST (CL:ERROR CL::%COMPLEX-SUBST CL::%SIMPLE-SUBST) CHARCODEP (ILEQ) TMPSUBFN (STRPOS -IREMAINDER IDIFFERENCE ADD1 NCHARS NTHCHARCODE IPLUS PLUS) SEDIT::COMPUTE-ALL-FORMATS (FFETCHFIELD -FREPLACEFIELD) COMPILER::META-EVAL-CATCH (COMPILER::MEVAL COMPILER::META-EVALUATE COMPILER::CATCH-TAG -REPLACEFIELD COMPILER::CATCH-STMT COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) COMP.BINDLIST (MAPCAR -COMP.CHECK.VAR COMP.VARTYPE CONS) \\PRINT-USING-ADDRESS (TYPENAME IPLUS FFETCHFIELD FRESHLINE -\\CKPOSBOUT \\PRINTADDR) \\SLOWPLUS2 (FPLUS LISPERROR IPLUS) TWODINSPECT.ADJUSTSELECTION (WINDOWPROP -FFETCHFIELD WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES -STRINGWIDTH APPLY* IDIFFERENCE ADD1 FREPLACEFIELDVAL NCREATE) FB.COMPILECOMMAND (FB.SELECTEDFILES -ADD.PROCESS LIST FUNCTION KWOTE) CL::STRUCTURE-SLOT-NAMES (CL::PS-ALL-SLOT-NAMES CL:COPY-LIST) -\\SLOWDIFFERENCE (FDIFFERENCE LISPERROR IDIFFERENCE) SEDIT::SUBNODE-CHANGED-LIST (FFETCHFIELD NTH SUB1 - SEDIT::NOTE-CHANGE) CL::%EQCODEP (FFETCHFIELD \\DEFCELL \\ATOMCELL) POSTSCRIPT.GETFONTID (CONS -CONSTANT TAN FRPLACA TIMES QUOTIENT) \\TEDIT.DELETE (TEXTOBJ FFETCHFIELD IDIFFERENCE FRPLACA IMAX -\\TEDIT.CLOSEUPLINES \\TEDIT.SHOWSELS) \\SLOWTIMES2 (FTIMES LISPERROR ITIMES) \\NSRANDOM.SETEOFPTR ( -FOLDLO LRSH MOD IMOD SELECTQ \\NEWLENGTHIS LOGAND FFETCHFIELD ADD1 SHOULDNT) FIND-EDIT-LOCATION-TAIL ( -FIND-EDIT-LOCATION-TAIL REMOVE-COMMENTS CONS) RECORDTRAN (GETLOCALDEC RECORDWORD ASSOC CONS SELECTQ -ACCESSDEF MAKEACCESS MKPROGN ALLFIELDS RECORDECL RECLOOK LIST RECORDBINDVAL RECORD.TYPECHECK -RECORD.NAME MAKECREATE0 HASHLINKS FIXFIELDORDER RECORDBIND MAPCAR DREVERSE ACCESSDEF4 RECORDERROR -CSUBST RECORD.ALLOCATIONS CHANGETRAN1 EMBEDPROG) UNTRACE (NLAMBDA.ARGS CL:FLET MAPCONC CL:REVERSE -CL::UNTRACE-ENTRY XCL:UNBREAK-FUNCTION CL:FIRST CL:THIRD) \\PSC.SPACEWID (FIXR FTIMES CHARWIDTH -CHARCODE.DECODE) CLISPIF2 (FLAST NLEFT) SEDIT::SET-SELECTION-LITATOM (SEDIT::SET-SELECTION-ME -SEDIT::GET-BUTTON-STRING SEDIT::SCAN-STRING FFETCHFIELD) \\FTP.PACK.DIRECTORYNAMEP (ASSOC -PACKFILENAME.STRING) SIGNAL (MAKE-INTO-CONDITION) SEDIT::COMPILE-STRUCTURE (FFETCHFIELD OPENWP -SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW CL:FUNCALL) COMPILER::META-EVAL-CALL (COMPILER::MEVAL -COMPILER::META-EVALUATE COMPILER::CALL-FN REPLACEFIELD COMPILER::ANALYZE-TREE COMPILER::META-CALL-LAMBDA - COMPILER::SIDE-EFFECTS COMPILER::VARIABLE-NAME COMPILER::VAR-REF-VARIABLE COMPILER::MAKE-PROGN -COMPILER::CALL-ARGS COMPILER::LITERAL-VALUE LIST COMPILER::MAKE-LITERAL COMPILER::MAKE-EVAL-WHEN-LOAD -CL:APPLY COMPILER::MAKE-CALL GET CL:FUNCALL COMPILER::NODE-META-P) \\BLT (CONSTANT EXPT \\ADDBASE -DIFFERENCE \\BLT SUB1 \\GETBASE PLUS) COMP.TOPLEVEL.COMPILE (COMPILER::COPY-ENV COMPILER::MAKE-ENV -SELECTQ \\TRANSLATE-CL\:LAMBDA APPLY* LIST CONS COMP.BINDLIST ADD1 OPT.POSTOPT SUBSET MAPCAR GET -CL:FORMAT OUTPUT COMP.MLLIST APPEND) CL::%COMPLEX-MEMBER (FMEMB CL::%SIMPLE-MEMBER) SEDIT::CREATE-NULL-LIST - (ITIMES CHARWIDTH FFETCHFIELD LIST FREPLACEFIELDVAL NCREATE SEDIT::CREATE-WEAK-LINK) SPYOBJ.IMAGEBOX -(FFETCHFIELD SPYOBJ.HEIGHT STRINGWIDTH SPYOBJ.LABEL CONS) DBG::REUSE-CURRENT-WINDOW (PRINTOUT -PROCESSPROP THIS.PROCESS PRIN1) \\PUTBITS.UFN (.COERCE.TO.SMALLPOSP. IGEQ \\ILLEGAL.ARG ADD1 LOGAND -LRSH IDIFFERENCE IPLUS SUB1 LLSH \\ADDBASE LOGOR \\GETBASE LOGXOR) \\DRAWCIRCLE.PRESS (FIXR FTIMES -CONSTANT FQUOTIENT SQRT LIST CREATEPOSITION IPLUS IDIFFERENCE MOVETO) CL::%FLOAT (\\FLOATBOX \\VAG2) -CL:NSUBLIS (CL:ERROR CL::%COMPLEX-NSUBLIS CL::%SIMPLE-NSUBLIS) ADD1VAR (SET ADD1 EVAL) COMPILER::RELEASE-GO - (COMPILER::GO-TAGBODY) \\10MB.GETPACKETSTATUS (SELECTC FFETCHFIELD LOGAND LOGOR -|\\DoveEther.GetPacketStatus| \\NOMACHINETYPE) MAKEHARDCOPYMODESTREAM (DISPLAYSTREAMP WINDOWPROP -DSPCREATE \\ILLEGAL.ARG PRINTERPROP PRINTERTYPE FUNCTION DSPFONT DSPRIGHTMARGIN FIXR FTIMES -DSPCLIPPINGREGION) \\INSTANCEP.UFN (NTYPX) %LLARRAY-MAKE-SETTOR-EXPR (%GET-TYPE-TABLE-ENTRY -ARRAY-TABLE-ENTRY-SETTOR ARRAY-TABLE-ENTRY-BITS-PER-ELEMENT ARRAY-TABLE-ENTRY-NEEDS-SHIFT-P) -SPYOBJ.SAVE (PRIN2 FFETCHFIELD) DBG::*DEBUGGER-TERMINAL-TABLE* (COPYTERMTABLE) \\SLOWQUOTIENT ( -FQUOTIENT LISPERROR IQUOTIENT) PRINTXIPROUTE (PRIN1 FFETCHFIELD LOCF \\ADDBASE \\PRINTNSADDRESS PRIN2 -IQUOTIENT \\CENTICLOCK IREMAINDER) CL:UNION (CL:ERROR) /SET (SAVESET) COMPILER::RELEASE-CATCH ( +) FORMAT-PRINT-NAMED-CHARACTER (CL:CODE-CHAR CL:CHAR-CODE CL:CHAR-NAME WRITE-STRING* +CL:STRING-CAPITALIZE CL:PRINC-TO-STRING CL:WRITE-CHAR +) \SEQUIN.HANDLE.INPUT (APPLY* \SEQUIN.COMPARE +\SEQUIN.OUT.OF.THE.BLUE LIST PLUS FFETCHFIELD NOTIFY.EVENT FREPLACEFIELD IPLUS16 \LOLOC \ADDBASE) +FREEVARS (CALLS) \TEDIT.MENU.WHENHELDFN (PROMPTPRINT SELECTQ DEFAULTMENUHELDFN) SKREAD (\GTREADTABLE +\GETSTREAM CL:MAKE-CONCATENATED-STREAM CL:MAKE-STRING-INPUT-STREAM MKSTRING SKIPSEPRCODES \EOF.ACTION +SELECTC \SYNCODE GETHASH \GETBASEBYTE) \LOADNSHOSTNUMBER (\GETBASE ERROR) TEDITMENU.STREAM ( +\TEDIT.MAINW ATTACHEDWINDOWS WINDOWPROP TEXTSTREAM) NETDATE (GDATE ALTO.TO.LISP.DATE NETDAYTIME0 +\DAYTIME0) DMCHAT.HANDLECHARACTER (BOUT TERM.PRINTCHAR FUNCTION) CL:MAKE-CONCATENATED-STREAM ( +\ILLEGAL.ARG) I.S.OPR (U-CASE L-CASE GETP LIST GETPROP CONS) SEDIT::BACKSPACE-LITATOM ( +SEDIT::SET-SELECTION-NOWHERE NCHARS SEDIT::DELETE-NODES) \SEQUIN.RETRANSMIT (LOGAND ADD1) +CL:MAKE-STRING-INPUT-STREAM (OPENSTRINGSTREAM SUBSTRING CL:1+) \TEDIT.APPLY.SLOPE (SELECTQ +IMAGEOBJPROP CONS) EXTENDREGION (IDIFFERENCE ADD1) CHECK-KEYWORDS (CL:ERROR) COMPILER::REMOVE-EFFECT ( +CL:REMOVE MKLIST) COMPILER::RELEASE-IF (COMPILER::RELEASE-TREE COMPILER::IF-PRED COMPILER::IF-THEN +COMPILER::IF-ELSE) TOTOPW.MODERNIZE (MAINWINDOW) COMP.BINDLIST (MAPCAR COMP.CHECK.VAR COMP.VARTYPE) +EDITDELETELINK (EDITAPPLYTOLINK FUNCTION WINDOWPROP) LISPXREAD (LISPXREADBUF READ APPLY* EDITE) CL:READ + (.CALL.SUBREAD. \SUBREAD \GETSTREAM GETRESOURCE NEWRESOURCE ALLOCSTRING \TOP-LEVEL-READ) +\TEXTBACKFILEPTR (\TEDIT.APPLY.STYLES SUB1 IPLUS) RESETUNDO (LISTGET1 CONS LIST LISTPUT1 FLENGTH +UNDONLSETQ1) \ASSURE.FPTOVP.PAGE (IMOD IDIFFERENCE \ADDBASE CEIL LOGAND IPLUS CONSTANT SUB1 LOGXOR) +\INSPECT.STORE.FATCHAR (LIST \GETBASE \PUTBASE CHARCODE.DECODE) CL:READ-PRESERVING-WHITESPACE ( +.CALL.SUBREAD. \SUBREAD \GETSTREAM GETRESOURCE NEWRESOURCE ALLOCSTRING \TOP-LEVEL-READ) +MAKE-INSPECTOR-PROFILE (XCL:MAKE-PROFILE) SETCOLOR.IP (DSPOPERATION NEGSHADE APPENDOP.IP SETCOLOR16.IP + SETCOLORLV.IP) CL:READ-DELIMITED-LIST (FIXP CL:CHAR-CODE \GETSTREAM .CALL.SUBREAD. \SUBREAD +GETRESOURCE NEWRESOURCE ALLOCSTRING \TOP-LEVEL-READ) TWODINSPECT.SCROLLFN (WINDOWPROP FUNCTION) +\INVALIDADDR (\MP.ERROR) \8859INCCODEFN (\RECODECCODE \BIN) BMOBJ.GETFN3 (\PEEKBIN FPLUS \WIN IPLUS +LLSH \BIN FQUOTIENT BITMAPTEDITOBJ \READBINARYBITMAP) CL:PARSE-INTEGER (ERROR \CHECKRADIX +\INVALID.RADIX + \ILLEGAL.ARG \SYNCODE GETHASH \GETBASEBYTE \GETBASECHAR \GETBASEFAT \GETBASE +\GETBASETHIN CL:1+ CL:VALUES - PLUS \MKINTEGER CL:SUBSEQ) SHAPEW.AND.SAVE (WINDOWREGION SHAPEW) +\LOOKUPPAGEMAP (\GETBASE IPLUS) SEDIT::BACKSPACE-GAP (SHOULDNT SEDIT::PENDING-DELETE) +\TEDIT.APPLY.ULINE (SELECTQ IMAGEOBJPROP CONS) \MKINTEGER (\GETBASECHAR \GETBASEFAT \GETBASE +\GETBASETHIN \GETBASEBYTE IPLUS IDIFFERENCE LOGAND ITIMES SUB1 ADD1 SELECTQ) LISPX/ (ARGTYPE GETPROP +LISPX/1 FASSOC) COMPILER::EFFECTS-ANALYZE-BLOCK (COMPILER::EFFECTS-ANALYZE COMPILER::BLOCK-STMT +COMPILER::NODE-EFFECTS COMPILER::REMOVE-EFFECT COMPILER::NODE-AFFECTED) COMPILER::RELEASE-GO ( +COMPILER::GO-TAGBODY) COMP.TOPLEVEL.COMPILE (COMPILER::COPY-ENV COMPILER::MAKE-ENV SELECTQ +\TRANSLATE-CL%:LAMBDA APPLY* LIST CONS COMP.BINDLIST OPT.POSTOPT SUBSET MAPCAR GET CL:FORMAT OUTPUT +COMP.MLLIST APPEND) GRAPHCHANGELABEL (APPLY* PROMPTINWINDOW) CMLRDTBL (COPYREADTABLE PLUS) +\SETNEWTIME0 (\DAYTIME0 IABS IMINUS IDIFFERENCE DATE PRIN1) EDIT-IN-FUNCTION (FIND-EDIT-LOCATION CONS) + \INVALIDVP (\MP.ERROR) FINDATOM (FMEMB STKNAME SELECTQ SYSTEMTYPE REALSTKNTH BLIPVAL FGETD HELP SOME +STKARG TAILP FSTKNTH) FORMAT-PRIN1 (CL:PRIN1 WRITE-STRING*) EDIT-IN-FNS (FIND-EDIT-LOCATION CONS) +RIGHTW.REPAINTFN (DSPCLIPPINGREGION MAINWINDOW WINDOWPROP STRINGWIDTH XCL::PROFILIZE CL:PROGV +XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES SUB1 FONTPROP - IPLUS INSPECT.INVERTSELECTION) CL:KEYWORDP +(CL:SYMBOL-PACKAGE) COMPILER::EFFECTS-UNION (CL:UNION MKLIST) DECLARED-SPECIAL (DECLARED-SPECIAL) +\AUTHENTICATION.FIND.SERVER (COURIER.EXPEDITED.CALL COURIER.BROADCAST.CALL APPEND) LISPXUNREAD (APPEND + CONS) FILEPKGCOM (ARG FILEPKGCOM NCONC LIST GETTOPVAL ASSOC SELECTQ CONS SUBST ERROR ADD1 FMEMB PLUS +MARKASCHANGED) \INSPECT.STORE.CHAR (LIST \GETBASEBYTE \PUTBASEBYTE CHARCODE.DECODE) CL:APPLY (ERROR +SPREADAPPLY .SPREAD. ARG CL:1- PLUS) RSTRING (\GTREADTABLE WITH-RESOURCE \RSTRING2 \GETSTREAM +GETRESOURCE NEWRESOURCE ALLOCSTRING) NS\FONTFILENAME.OLD (OLD\FONTFILENAME.OLD NSDISPLAYSIZE) +\FLUSHPAGE (\READFLAGS FREPLACEFIELD PLUS FFETCHFIELD IDIFFERENCE .PAGEMAPBASE. \ADDBASE IPLUS +\GETBASE LOGNOT16 LOGXOR RPTFROMRP \READRP) \RSTRING2 (\INCCODE \SYNCODE GETHASH \GETBASEBYTE \PEEKBIN + \CHECKEOLC SELCHARQ SELECTC LIST \CHECKEOLC.CRLF \PUTBASECHAR \PUTBASEFAT \PUTBASE \PUTBASETHIN +\PUTBASEBYTE SUB1 \SMASHSTRING ALLOCSTRING CONS ADD1 SPREADAPPLY* CONCATLIST) +\TEDIT.MENU.WHENSELECTEDFN (CONS DEFAULTWHENSELECTEDFN) \TRANSFERPAGE (LOGAND \READFLAGS LOGNOT16 +LOGXOR RPFROMRPT IPLUS LOCF \ADDBASE) \POLYSHADE.XSCAN.IP (MAPCAR MAKESCAN SORT CONS CRITSECT IPLUS +FILLRECTANGLE.IP IDIFFERENCE MAPC IMIN NORMSECT) SPY.TITLE (CONCAT) PROPRECORD (DECLARERECORD CONS) +LISPX (CLOCK GETTOPVAL PRINT READLINE LIST CHCON1 LASTC LISTGET1 FASSOC HISTORYSAVE UNDOLISPX +LISPXFIND UNDOLISPX2 NCONC IPLUS FLENGTH GETPROP LISPXREAD FIXSPELL CONS SHOWPRINT CL:VALUES-LIST +APPEND LISPXUSEC FMEMB LDIFF RESETVARS .RESETLST. CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +EDITFPAT MAPRINT UNION SELECTQ NLEFT NUMBERP COPY GETSTREAM APPLY* STREAMPROP LISPXFIX LISPXUSE +LISPXGETINPUT LISPXUSE0 EVAL LISPXREADBUF) SI::CREATE-CONDITION-CASE-LITERALS (LIST LIST* CL:FUNCTION) + \PUTBASEFIXP (SELECTC NTYPX \LOLOC LISPERROR ADD1) BMOBJ.GETFN (RESETFORM INPUT READ READBITMAP +BITMAPTEDITOBJ) READ-EXTENDED-TOKEN (\GTREADTABLE WITH-RESOURCE SPREADAPPLY* \INCCODE \SYNCODE GETHASH + \GETBASEBYTE SELECTC \INCHAR \SMASHSTRING ALLOCSTRING CONS \PUTBASECHAR \PUTBASEFAT \PUTBASE +\PUTBASETHIN \PUTBASEBYTE ADD1 CONCATLIST CL:VALUES GETRESOURCE NEWRESOURCE) MOUSESTATE-EXPR (LIST +MOUSESTATE-NAME SELECTQ CONS MAPCAR HELP MOUSESTATE-EXPR) STORETABLE (GETTABLE ADDTABLE SUBTABLE) +\SEQUIN.FLUSH.CONNECTION (APPLY* THIS.PROCESS) \SMASHSTRING (PLUS \ADDBASE SUB1 IPLUS ADD1 +\GETBASETHIN \GETBASEBYTE \PUTBASE \GETBASEFAT \GETBASE \PUTBASEBYTE) PRINTNSHOSTNUMBER (printout +PRINTNUM) \EDITBMHOWMUCH (MENU) CL:COMPILER-LET (CL:PROGV MAPCAR \EVAL \EVPROGN) +\NSFILING.LOOKUP.CACHE (LENGTH CONS DREMOVE) BRKDWNCLEAR (\PUTBASEFIXP BRKDWNELT ELT) CONCATLIST ( +ALLOCSTRING PLUS NCHARS) ADVISEWDS (UNFOLD LLSH IDIFFERENCE DSPCLIPPINGREGION IPLUS DSPLINEFEED +DSPRIGHTMARGIN WINDOWPROP PROCESS.TTY LIST FUNCTION IQUOTIENT IMINUS PROCESSPROP DSPYPOSITION FONTPROP +) BREAK0 (CL:SECOND BREAK-FUNCTION CL:FIRST CL:THIRD MAPCONC BREAK0) ADDCHAR (TTBITWIDTH +AT.END.OF.LINE TTBOUT BLTCHAR TTYDISPLAYSTREAM PLUS IDIFFERENCE FRPLACA) BREAK1 (STKNTH +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION DEBUGGER MAKE-CONDITION CL:EVAL) LOWERCASE (/PUT +CONS APPLY* GETPROP) BOTTOMOFGRIDCOORD (IPLUS ITIMES) MSINIT (CONS HASHARRAY ASSOC SELECTQ MAKETABLE +LIST) AS.DELETE.PASSWORDS (PARSE.NSNAME RESETLST AS.MAKE.CONVERSATION) SI::COMPILED-FUNCTION-ARGLIST ( +SI::COMPILED-FUNCTION-DEBUGGING-INFO MAPCONC LIST MKATOM CL:COPY-TREE \CCODEARGLIST) EDITBMREPAINTFN ( +WINDOWPROP + BITBLT) BITBLT.ERASE (BLTSHADE) COMP.COMPILER-LET (CL:PROGV MAPCAR EVAL COMP.PROGN) +\INSPECT.STORE.32 (LIST \INSPECT.FETCH.32 \PUTBASEFIXP UNFOLD LLSH) BRKDWNBOXES (BRKDWNMACRO \BOXIPLUS + BRKDWNELT ELT BRKDWNDIFFA IDIFFERENCE \PUTBASEFIXP IBOXCOUNT BOXCOUNT EVAL) +SI::COMPILED-FUNCTION-DEBUGGING-INFO (- CL:* + \GETBASEPTR) SUBREGIONP (IGEQ) \CLIPANDDRAWLINE1 (LRSH +IDIFFERENCE DSPDESTINATION \GETBASE \TOTOPWDS SUB1 \SFInvert IMINUS \CLIPCODE LOGAND IPLUS +.WHILE.TOP.DS. IREMAINDER ITIMES \LEASTPTAT \GREATESTPTAT) TWODINSPECT.ARRANGEWINDOWS (WINDOWPROP +HEIGHTIFWINDOW FONTPROP TWODINSPECT.ROWPROPWIDTH WIDTHIFWINDOW IPLUS STRINGWIDTH IMIN ITIMES LENGTH +IDIFFERENCE TWODINSPECT.TOTALWIDTH DSPFONT SUB1 GETBOXREGION DIFFERENCE PLUS ADD1 CONS CREATEREGION) +DO.CRLF (- \DSPPRINTCR/LF) \MOVEREALPAGE (\READFLAGS RPFROMRPT IPLUS) \TEXTSETFILEPTR (ZEROP IMAX ADD1 +) TEDIT.WINDOW.SETUP (FUNCTION LISTGET) RETFROM (\STACKARGPTR) FB.SUBITEMP (MEMBER) READ/NODE ( +DSPCLIPPINGREGION LOGAND LOGOR CURSORPOSITION NODELST/AS/MENU ZEROP) \SPECIALRP (SELECTC FOLDLO LRSH +IPLUS IDIFFERENCE) DISPTREE (TREEGRAPHNODE NUMBERP SHOWGRAPH LAYOUTGRAPH LIST CL:FUNCTION) +SI::CLEAN-UP-CL-ARGLIST (CL:INTERN STRING LIST) \TEDIT.PUT.PARALOOKS (LOGAND LRSH \BOUT GETHASH) +SI::NAMED-FUNCTION-WRAPPER-INFO (SI::GET-STORED-ARGLIST) \SELECTREALPAGE (\READFLAGS FOLDLO LRSH +RPFROMRPT IPLUS IABS IMINUS IDIFFERENCE SUB1 LLSH CONSTANT \HILOC) Filebrowsericide (OPENWINDOWS +WINDOWPROP) FORMAT-PRINC (CL:PRINC WRITE-STRING*) SI::GET-STORED-ARGLIST (GET CL:ERROR) +\ITEM.WINDOW.BUTTON.HANDLER (MODERNWINDOW.BUTTONEVENTFN FUNCTION) ERASE.TO.END.OF.PAGE (- DSPYPOSITION + BITBLT.ERASE) MARGINBAR.INIT (IMAGEFNSCREATE FUNCTION) \UPDATECHAIN (\ADDBASE \READFLAGS CONSTANT +\HILOC RPFROMRPT IPLUS LOGAND LOGNOT16 LOGXOR) FILL.LINE (IDIFFERENCE IPLUS \LINEBLT) +SEDIT::ATOM-POINT-TYPE (SEDIT::ESCAPE-CHAR FFETCHFIELD SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE +\GETBASETHIN \GETBASEBYTE PLUS) \TEDIT.APPLY.STRIKEOUT (SELECTQ IMAGEOBJPROP CONS) +SI::COMPILED-FUNCTION-INTERLISP? (SI::COMPILED-FUNCTION-DEBUGGING-INFO CL:MEMBER ARGTYPE CL:GETF) +ASSOCRECORD (DECLARERECORD CONS) ERASE.TO.END.OF.LINE (DSPXPOSITION BITBLT.ERASE - DSPYPOSITION) +\TEDITMENU.SELSCREENER (WINDOWPROP CONCAT) TILEAREA (BLTPATTERN.REPLACEDISPLAY BITMAPWIDTH +BITMAPHEIGHT) \TEXTPEEKBIN (SPREADAPPLY* \PEEKBIN SUB1 LOGOR UNFOLD LLSH \PAGEDBIN \PAGEDPEEKBIN +\TEDIT.APPLY.STYLES \BIN \TEDIT.TEXTBIN.FILESETUP ERROR APPLY* \TEDIT.PEEKBIN.NEW.PAGE) +SCALED.BITMAP.GETFN (READBITMAP READ BITMAPTEDITOBJ FQUOTIENT) COMPILER::RELEASE-CATCH ( COMPILER::CATCH-REFERENCES COMPILER::RELEASE-TREE COMPILER::CATCH-TAG COMPILER::CATCH-STMT) -\\CREATE.TEDIT.SIZE.MENU (FREPLACEFIELDVAL NCREATE CONS) \\SLOWHDCPYBLTCHAR (\\CHAR8CODE LOGAND -FFETCHFIELD IPLUS \\DSPGETCHARWIDTH \\GETBASE \\DSPTRANSFORMX IMAX IMIN IDIFFERENCE \\DSPGETCHAROFFSET - LLSH DSPDESTINATION \\TOTOPWDS \\GETCHARSETINFO \\GETBASEPTR UNFOLD \\CHARSET LRSH \\CREATECHARSET -ADD1) \\10MB.GETPACKETLENGTH (SELECTC FFETCHFIELD FOLDLO LRSH \\NOMACHINETYPE) PRIN3 (\\GETSTREAM -\\DTEST FFETCHFIELD \\OUTTERMP) /DREMOVE (/DREMOVE) SEDIT::FIND-SELECTION (SEDIT:GET-PROMPT-WINDOW -GETPROMPTWINDOW FFETCHFIELD SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE SEDIT::STRUCTURE-FROM-SELECTION LIST -CL:1+ SEDIT::NEXT-NODE SEDIT::FIND-AND-DISPLAY-STRUCTURE CL:FORMAT) |\\PFInitFileDescriptors| (SUB1 -FFETCHFIELD ELT MESASETQ \\BLT \\ALLOCBLOCK LRSH ADD1 MESASIZE FMESAELT \\ADDBASE LOCF IPLUS ILEQ -ITIMES IDIFFERENCE PLUS) CL:INTERSECTION (CL:ERROR) SEDIT::BUILD-NODE (FFETCHFIELD SEDIT::CREATE-NODE -FREPLACEFIELD) COMPILER::META-EVAL-BLOCK (COMPILER::BLOCK-CONTEXT COMPILER::MEVAL COMPILER::META-EVALUATE - COMPILER::BLOCK-STMT REPLACEFIELD COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) PUTHASHFILE ( -CREATEKEY PACK*) COMPPRINT (PRIN1) CL:NUNION (CL:ERROR) SEDIT::MARKASCHANGEDFN (PROCESSPROP -THIS.PROCESS FFETCHFIELD EDITDEF) \\PRINDATUM (SELECTC NTYPX LIST \\LITPRIN \\PRINDATUM-LISTP -WITH-RESOURCES \\CKPOSSOUT \\CONVERTNUMBER \\CHECKRADIX \\INVALID.RADIX GETRESOURCE NEWRESOURCE -ALLOCSTRING CONCAT \\CONVERT.FLOATING.NUMBER \\PRINSTACKP \\PRINSTRING CL::PRINT-STRUCTURE-INSTANCE -PRINT-INSTANCE \\PRINT-USING-DEFPRINT) FONTNAMELIST (LIST FONTPROP) \\VAG2 (\\VAG2 BIG-VMEM-CODE -.COERCE.TO.SMALLPOSP. IGEQ \\ILLEGAL.ARG .COERCE.TO.BYTE. CONSTANT LLSH) SHOWSHADE.IP (APPENDOP.IP) -CL:SET-DIFFERENCE (CL:ERROR) PRINT-CIRCLE-LOOKUP (GETHASH) SAVESET (GETTOPVAL STKSCAN EVALV GETATOMVAL - SOME LISTGET1 EVQ EQUALN LIST) MARKASCHANGED (SELECTQ ERROR GETFILEPKGTYPE GETPROP APPLY* GETTOPVAL -SEARCHPRETTYTYPELST SETTOPVAL CONS LIST) \\PSC.SPACEDISP (POSTSCRIPT.PUTCOMMAND \\PSC.SPACEWID DSPFONT -) \\MAKEPCTB (NCREATE FFETCHFIELD) FIX89A (STRPOS CONS CONCAT SUBSTRING SUB1 ADD1) CL:NINTERSECTION ( -CL:ERROR) COMPILER::EFFECTS-UNION (CL:UNION MKLIST) SEDIT::SET-POINT-STRING (SEDIT::PUNT-SET-POINT -IGEQ HALF LRSH FFETCHFIELD SEDIT::GET-BUTTON-STRING SEDIT::SCAN-STRING) \\CLEARXIPHEADER (\\CLEARWORDS - \\DTEST LOCF \\ADDBASE FOLDHI LRSH IPLUS) SEDIT::FIND-SELECTION-BACKWARDS (SEDIT:GET-PROMPT-WINDOW -GETPROMPTWINDOW FFETCHFIELD SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE-BACKWARDS SEDIT::STRUCTURE-FROM-SELECTION - LIST CL:1- SEDIT::PREV-NODE SEDIT::FIND-AND-DISPLAY-STRUCTURE-BACKWARDS CL:FORMAT) PROPRECORD ( -DECLARERECORD CONS) MASTERSCOPE (MSINTERPRET MKLIST PRINTOUT TERPRI) XCL::NOHOOK (CL:APPLY) -\\SLOWLOGAND2 (NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR -CL::RATIO-DENOMINATOR \\MAKENUMBER LOGAND \\BIGNUM.LOGAND) SEDIT::STRINGIFY-QUOTE (CONCAT FFETCHFIELD -SEDIT::STRINGIFY SEDIT::SUBNODE) ONED.TRACKCURSOR (FFETCHFIELD LOGAND LASTMOUSEX LASTMOUSEY -STRINGWIDTH CL:FUNCALL IPLUS ADD1 IDIFFERENCE NCREATE FREPLACEFIELDVAL REPLACEFIELDVAL) -CL:NSET-DIFFERENCE (CL:ERROR) FORMAT-PRINT-NAMED-CHARACTER (CL:CODE-CHAR CL:CHAR-CODE CL:CHAR-NAME -WRITE-STRING* CL:STRING-CAPITALIZE CL:PRINC-TO-STRING CL:WRITE-CHAR +) \\TEDIT.COPY.PIECEMAPFN ( -FREPLACEFIELDVAL NCREATE FFETCHFIELD IMAGEOBJPROP APPLY* COPYALL WINDOWPROP \\TEDIT.UNIQUIFY.CHARLOOKS -) FETCHFIELD (\\DTEST SELECTQ \\GETBASEPTR MAKEFLOATNUMBER \\GETBASE \\ADDBASE \\MAKENUMBER ADDBASE -LOGAND LRSH |BitFieldShift| |BitFieldMask| SUB1 LLSH IDIFFERENCE |BitFieldWidth| |BitFieldShiftedMask| - LISPERROR) IREMAINDER (NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR -CL::RATIO-DENOMINATOR ADD1 IDIFFERENCE LLSH LRSH SUB1 PLUS LOGAND .SUBSMALL. IPLUS \\MAKENUMBER -\\BIGNUM.QUOTIENT \\BIGNUM.REMAINDER) UNION (CONS) \\MISCN.UFN (LRSH LOGAND \\MYALINK OPCODES -\\GET-MY-BF FFETCHFIELD ADDSTACKBASE \\VAG2 - LLSH \\ADDBASE CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION APPLY* \\GETBASEPTR) CL:SUBSETP (CL:ERROR) SEDIT::BUILD-LINEAR-FORM (FFETCHFIELD CONS -FREPLACEFIELDVAL NCREATE SEDIT::CREATE-WEAK-LINK SEDIT::SUBNODE IDIFFERENCE WINDOWPROP) -\\ELIDE.PRINT.ELEMENT (\\OUTCHAR \\ELIDE.ELEMENT.CHAR) GETHASHFILE (LOOKUPHASHFILE CREATEKEY PACK*) -\\SLOWLLSH1 (NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR -CL::RATIO-DENOMINATOR \\MAKENUMBER IPLUS LLSH LOGAND) COMP.TRANSFORM (COMPILER:MAKE-CONTEXT SELECTQ -OPT.COMPILERERROR GETMACROPROP COMP.MACRO GET COMP.EXP1 CL:FUNCALL COMP.CALL COMP.ARGTYPE) -TRANSMIT.ETHERPACKET (APPLY* \\DTEST FFETCHFIELD) EXEC-FORMAT (LISPXPUT LIST CONS CL:APPLY) -SEDIT::NEW-FUNCTION-BODY (EDITMODE COPY LIST) COMPILER::ENV-ANALYZE-VAR-REF (CL:PUSHNEW -COMPILER::VARIABLE-READ-REFS COMPILER::VAR-REF-VARIABLE) BREAKREGIONSPEC (CONS) CACCESSFNS ( -DECLARERECORD CONS) \\ROUTE.XIP (FFETCHFIELD LOCF \\ADDBASE \\LOCATE.NSNET LOGAND \\GETBASE -\\TRANSLATE.10TO3) COMPILER::REMOVE-EFFECT (CL:REMOVE MKLIST) CL:NSET-EXCLUSIVE-OR (CL:ERROR) -CL::SET-SETF-INVERSE (REMPROP GET) \\SLOWIDIFFERENCE (NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP -IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR \\MAKENUMBER ADD1 IDIFFERENCE IGREATERP LOGXOR -IPLUS \\BIGNUM.DIFFERENCE) \\SLOWFDIFFERENCE (\\BOXFPLUSDIF) COMPILER::RELEASE-CALL (COMPILER::RELEASE-TREE - COMPILER::CALL-FN CL:MAPC CL:FUNCTION COMPILER::CALL-ARGS) \\CREATE.TEDIT.FACE.MENU (FREPLACEFIELDVAL - NCREATE CONS) \\CHANGECHARSET.HDCPYDISPLAY (FONTCREATE FFETCHFIELD STREAMPROP FONTPROP -\\GETCHARSETINFO \\GETBASEPTR UNFOLD LLSH \\CREATECHARSET CONSTANT \\CREATECSINFOELEMENT \\ALLOCBLOCK -FOLDHI LRSH IPLUS FQUOTIENT \\PUTBASE FIXR FTIMES \\FGETWIDTH \\GETBASE PLUS) LSH (\\RSH IMINUS -CONSTANT INTEGERLENGTH \\BIGNUM.LSH IPLUS) CL::STRUCTURE-CONSTRUCTOR (GET CL::PS-STANDARD-CONSTRUCTOR -CL:ERROR CL::PS-NAME) |\\PFCreateVols| (ARRAYORIG ARRAYSIZE ARRAY HASHARRAY SUB1 NCREATE PLUS) -\\SLOWFTIMES2 (\\BOXFTIMES2) TWODINSPECT.PRINTELEMENT (ADD1 DIFFERENCE STRINGWIDTH IPLUS PRIN2) -EDIT-IN-FUNCTION (FIND-EDIT-LOCATION CONS) XCL::UNDOABLY-FMAKUNBOUND (/PUTD /REMPROP) MAKE-KEYWORD ( -DECLARE CL:VALUES CL:INTERN CL:SYMBOL-NAME) \\SLOWIPLUS2 (NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP - IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR IGREATERP IDIFFERENCE ADD1 IPLUS \\MAKENUMBER -\\BIGNUM.PLUS) LDIFFERENCE (LIST) SEDIT::STRINGIFY-LIST (REVERSE FFETCHFIELD CONS SEDIT::STRINGIFY -CONCATLIST) ADDTOVAR (GETPROP EVALV LISTGET1 CONS FASSOC LIST /DREMOVE UNION) \\SLOWLLSH8 (NTYPX -FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR -\\MAKENUMBER IPLUS LLSH LOGAND LRSH) FB.OPERATE.ON.FILES (MAPCAR CONS CLOSEW TTYDISPLAYSTREAM) -TEDIT.DELETE (TEXTOBJ FFETCHFIELD) \\UNBOXFLOAT2 (\\CALLER.ARGS \\MYALINK OPCODES FFETCHFIELD -ADDSTACKBASE \\VAG2 \\FLOATBOX \\.GETBASE32 IDIFFERENCE TIMES SELECTQ \\HAND.FLOATUNBOX FLOAT FPLUS -FDIFFERENCE FTIMES FQUOTIENT FGREATERP FMAX FMIN FREMAINDER HELP) SEDIT::FIND-OBJ (SEDIT::CLOSE-OPEN-NODE - SEDIT::CLOSE-NODE FFETCHFIELD SEDIT::FIND-SELECTION-BACKWARDS SEDIT::FIND-SELECTION -SEDIT::SEARCH-OBJ-BACKWARDS SEDIT::SEARCH-OBJ) |\\PFCreateFileDescriptors| (ARRAY SUB1 -FREPLACEFIELDVAL NCREATE PLUS) \\BITBLT.IP (\\DSPXPOSITION.IP \\DSPYPOSITION.IP DSPSCALE TIMES -INTERSECTREGIONS CREATEREGION FFETCHFIELD PLUS FIXR QUOTIENT DIFFERENCE) CL:PAIRLIS (LENGTH CL:ERROR) -ATTACH (FRPLACA FRPLACD CONS ERRORX LIST) \\SLOWLRSH1 (NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP -IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR \\MAKENUMBER LRSH IPLUS LOGAND) CLISPIF (GETVARS -DWIMUNDOCATCH LISTGET1 LIST RESETVARS .RESETLST. CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION CL:CATCH XNLSETQ CLISPIF0) MAKE-SEQUENCE-OF-TYPE (CL:MAKE-LIST MAKE-VECTOR CL::TYPE-EXPANDER -MAKE-SEQUENCE-OF-TYPE CL::TYPE-EXPAND CL:ERROR) SEDIT::SET-POINT-LITATOM (SEDIT::PUNT-SET-POINT IGEQ -HALF LRSH FFETCHFIELD SEDIT::GET-BUTTON-STRING NCHARS SEDIT::SCAN-STRING) \\PUTBASE.UFN (\\PUTBASE -\\ADDBASE .COERCE.TO.SMALLPOSP. IGEQ \\ILLEGAL.ARG) %AREF2 (CL:ARRAY-RANK FFETCHFIELD + CL:* -%ARRAY-READ CL:ERROR) OPT.INITHASH (EVALV HARRAYPROP CLRHASH SET HASHARRAY) \\COURIER.CHECK.PROCEDURES - (FIXP NULLORLISTP CONS) %ASET2 (CL:ARRAY-RANK FFETCHFIELD + CL:* %ASET2 %ARRAY-WRITE CL:ERROR) -APPENDTOVAR (GETPROP EVALV LISTGET1 APPEND LIST FASSOC /DREMOVE LDIFFERENCE) CL:VECTOR ( -%MAKE-ONED-ARRAY) \\SLOWLOGXOR2 (NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT -CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR \\MAKENUMBER LOGXOR \\BIGNUM.LOGXOR) CL:CONCATENATE ( -MAKE-SEQUENCE-OF-TYPE) DEFINE (MAPCAR FNS.PUTDEF CONS) CL::SET-SETF-METHOD-EXPANDER (REMPROP GET) -LINEY (IPLUS IQUOTIENT IDIFFERENCE \\IRND ITIMES) CL:COPY-SEQ (CL:LENGTH) \\ELIDE.PRINT.TAIL (\\SOUT -\\ELIDE.TAIL.STRING) \\SLOWLRSH8 (NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT -CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR \\MAKENUMBER LRSH IPLUS LLSH LOGAND) DEFINEQ (DEFINE) -CHANGEPROP (GETPROPLIST ERRORX LIST) FIX89 (LIST) MAKE-VECTOR (CL:ERROR %MAKE-ONED-ARRAY) DSUBST (COPY -) FIND-EDIT-LOCATION (REVERSE FIND-EDIT-LOCATION-TAIL) \\SLOWFPLUS2 (\\BOXFPLUSDIF) EQUAL (EQUAL -SELECTC NTYPX FEQP FFETCHFIELD \\LOLOC \\BIGNUM.COMPARE STREQUAL \\EXTENDED.EQP EQDEFP) \\SLOWLOGOR2 ( -NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR -\\MAKENUMBER LOGOR \\BIGNUM.LOGOR) ATOMRECORD (DECLARERECORD CONS) ENCAPSULATE.ETHERPACKET (APPLY* -\\DTEST FFETCHFIELD) \\SLOWFGREATERP (FFETCHFIELD LOGAND IGREATERP LISPERROR NTYPX ADD1 IDIFFERENCE -IGEQ LOLOC \\LOLOC FLOAT IPLUS LLSH LRSH PLUS SUB1) GO.TO.ADDRESSING (IPLUS) OPT.DREV (FRPLACD) -\\SETXIPCHECKSUM (\\CHECKSUM LOCF \\ADDBASE SUB1 FOLDHI LRSH IPLUS FFETCHFIELD) \\GCSCAN1 (\\ADDBASE -SUB1 \\GETBASEFIXP FFETCHFIELD) VECTOR-LENGTH (FFETCHFIELD CL:ERROR) \\BOXIDIFFERENCE (\\GETBASE NTYPX - FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR ADD1 -IDIFFERENCE IPLUS) \\HDCPYBLTCHAR (\\CHAR8CODE LOGAND FFETCHFIELD \\CHARSET LRSH \\SLOWHDCPYBLTCHAR -IPLUS \\FGETWIDTH \\GETBASE IMAX ADD1 IQUOTIENT CONSTANT \\DSPGETCHARWIDTH DSPDESTINATION \\TOTOPWDS -IDIFFERENCE \\DSPGETCHAROFFSET) %MAKE-ARRAY-TYPE-TABLE (CL:MAPCAN CL:FUNCTION) *DEFINITION-HASH-TABLE* - (CL:MAKE-HASH-TABLE CL:FUNCTION) OPT.RESOLVEJUMPS (FRPLACD GETPROP PLUS IDIFFERENCE FRPLACA -OPT.JLENPASS) CL:PRIN1-TO-STRING (\\PRINDATUM.TO.STRING) \\FINDPIECE (FINDPCNODE INDEX FFETCHFIELD) -CL::%LIST-MAP-OPTIMIZER (CL:EVAL) SEDIT::SELECT-SEGMENT-LITATOM (SEDIT::SCAN-STRING FFETCHFIELD) -CL:MAKE-SEQUENCE (CL:MAKE-LIST MAKE-SEQUENCE-OF-TYPE) \\MISC3.UFN (SELECTQ \\BLKEXPONENT.UFN -\\BLKMAG.UFN \\BLKSMALLP2FLOAT.UFN \\BLKFLOATP2COMP.UFN \\BLKFMAX.UFN \\BLKFMIN.UFN \\BLKFABSMAX.UFN -\\BLKFABSMIN.UFN \\FLOATTOBYTE.UFN %SLOW-ARRAY-READ \\LINES-EQUAL-P RAID) CREATE-STRUCTURE (CL:APPLY) -FB.LOADCOMMAND (FB.SELECTEDFILES ADD.PROCESS LIST FUNCTION KWOTE) \\SLOWFQUOTIENT (\\BOXFQUOTIENT) -\\MISC4.UFN (SELECTQ \\BLKFTIMES.UFN \\BLKPERM.UFN \\BLKFPLUS.UFN \\BLKFDIFF.UFN \\BLKSEP.UFN -\\BITMAPBIT %SLOW-ARRAY-WRITE RAID) SEDIT::SET-SELECTION-QUOTE (SEDIT::SET-SELECTION-ME -SEDIT::SET-SELECTION-NOWHERE) EVERY (APPLY*) \\PUTBASEPTR.UFN (\\HILOC \\ADDBASE \\LOLOC) FORMAT-PRIN1 - (CL:PRIN1 WRITE-STRING*) YSECT (ITIMES IABS IMINUS MSECT LINEY) COMPILER::ENV-ANALYZE-UNWIND-PROTECT -(COMPILER::ENV-ANALYZE COMPILER::UNWIND-PROTECT-STMT COMPILER::UNWIND-PROTECT-CLEANUP) \\ADDBASE ( -\\HILOC \\LOLOC NTYPX FFETCHFIELD \\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR - IDIFFERENCE PLUS SUB1 \\VAG2) \\UNBOXFLOAT1 (SELECTQ \\CALLER.ARGS \\MYALINK OPCODES FFETCHFIELD -ADDSTACKBASE \\VAG2 \\.GETBASE32 IDIFFERENCE TIMES NCREATE \\HILOC \\LOLOC \\HAND.FLOATUNBOX FLOAT -\\FLOATBOX \\FLOATUNBOX ABS FMINUS FIX HELP) \\SLOWITIMES2 (NTYPX FFETCHFIELD \\LOLOC -\\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR ADD1 IDIFFERENCE LRSH SUB1 -IPLUS LLSH PLUS LOGAND \\MAKENUMBER \\BIGNUM.TIMES) \\SLOWIGREATERP (NTYPX FFETCHFIELD \\LOLOC -\\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR IGREATERP LOGXOR -\\BIGNUM.COMPARE) CL::%= (\\CALLME) COMPILER::RELEASE-BLOCK (COMPILER::BLOCK-FRAME COMPILER::BLOCK-REFERENCES - COMPILER::RELEASE-TREE COMPILER::BLOCK-STMT) \\CREATE.TEDIT.DEFAULT.FMTSPEC (CONS FREPLACEFIELDVAL -NCREATE) EDIT-IN-FNS (FIND-EDIT-LOCATION CONS) \\FILLINXIP (\\ALLOCATE.ETHERPACKET \\DTEST LOCF -\\ADDBASE \\LOCALNSADDRESS FFETCHFIELD PARSE-NSADDRESS \\ILLEGAL.ARG) KWOTE (LIST) XYSECT (ITIMES IABS - IMINUS MSECT LINEY CONS) CL:SUBSEQ (CL:LENGTH) SEDIT::BUILD-INTERNAL-STRUCTURE (FFETCHFIELD LIST CONS - FREPLACEFIELDVAL NCREATE ALLOCSTRING SUBSTRING SEDIT::BUILD-LINEAR-FORM) GREATERP (IGREATERP -FGREATERP) COMP.RETFROM.POINT (COMP.TOPLEVEL.COMPILE) CL:NTHCDR (CL:ERROR) SEDIT::SELECT-SEGMENT-DEFAULT - (FFETCHFIELD IMIN IMAX PLUS FREPLACEFIELD) EXEC-EVAL (GET-NEXT-HISTORY-EVENT LIST* EXEC-EVENT-VALUE -CL:VALUES-LIST) \\SLOWIQUOTIENT (NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT -CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR ADD1 IDIFFERENCE LLSH LRSH SUB1 PLUS LOGAND .SUBSMALL. IPLUS - \\MAKENUMBER \\BIGNUM.QUOTIENT \\BIGNUM.REMAINDER) FB.SEEBUTTONFN (WFROMMENU MAINWINDOW SELECTQ -NOTIFY.EVENT WINDOWPROP PROCESS.EVAL DEL.PROCESS SHOULDNT) CL:MAKE-LIST (CL:ERROR) ADD-EXEC ( -XCL::SETUP-EXEC-WINDOW CREATEW ADD.PROCESS LISPINTERRUPTS) SEDIT::SET-SELECTION-LIST ( -SEDIT::SET-SELECTION-ME SEDIT::SET-SELECTION-NOWHERE) GETLIS (GETPROPLIST) ARRAYRECORD (DECLARERECORD -CONS) FORMAT-PRINC (CL:PRINC WRITE-STRING*) MAKE-TTSCRATCHFILE (OPENSTREAM) %MAKE-CML-TYPE-TABLE ( -CL:MAPCAR CL:FUNCTION) LISTPUT1 (NCONC LIST) SEDIT::FIND-NODE-SUBSTRUCTURE-BACKWARDS (FFETCHFIELD -CL:FIRST) OPT.COMPILERERROR (HELP) %SETELT (CL:LENGTH CL:ERROR) LCONC (LAST CONS FRPLACA FRPLACD) -CL:SET-EXCLUSIVE-OR (CL:ERROR) \\POSTSCRIPT.ACCENTFN (FFETCHFIELD SUBSTRING CONCAT OCTALSTRING SUB1 -%ARRAY-OFFSET %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN -\\GETBASEBYTE) <= (CL::%COMPARISON-MACRO) CL::%SET-NTH (CL:ERROR) SEDIT::SCAN-STRING (NCHARS TYPENAMEP - SEDIT::ESCAPE-CHAR FFETCHFIELD ADD1 CHARWIDTH NTHCHARCODE IPLUS IDIFFERENCE SUB1 FREPLACEFIELD) -CL:ARRAY-ELEMENT-TYPE (CL:ERROR) PARSERELATION (CONS MAPCAR PARSERELATION1 FASSOC) -SEDIT::ATOM-CHANGE-RELINEARIZE (SEDIT::CLOSE-NODE FFETCHFIELD CL:FUNCTION SEDIT::RELINEARIZE) -\\COURIER.CHECKDEF (ERROR MAP SELECTQ \\COURIER.CHECK.PROCEDURES \\COURIER.CHECK.ERRORS) -COMPILER::CONSTRUCT-PROG1-TREE (COMPILER::MAKE-VARIABLE COMPILER::MAKE-VAR-REF COMPILER::MAKE-LAMBDA -LIST COMPILER::MAKE-PROGN CL:APPEND COMPILER::VARIABLE-BINDER COMPILER::VARIABLE-READ-REFS COMPILER::MAKE-CALL -) \\DISPLAYLINE (FFETCHFIELD WINDOWPROP IMAX IDIFFERENCE DSPSCALE \\TEDIT.LINECACHE FIXR FQUOTIENT -CONS DSPFONT \\EDITELT GETBASEPTR \\GETBASEPTR \\ADDBASE2 \\ADDBASE FTIMES IPLUS PLUS FONTCOPY -CHARWIDTH IREMAINDER DSPYPOSITION IMAGEOBJPROP) COMP.ATTEMPT.COMPILE (COMP.RETFROM.POINT CONS COMPILE2 - LIST) CL::TYPE-EXPANDER (GET CL::TYPE-EXPANDER) BRKDWNRESULTS (RPLACA MAPCAR BRKDWNRESULTS1 LIST -FLTFMT MAPC FNTH ASSOC BRKDWNRESULTS2 ADD1VAR) |\\PFCreatePhysicalVolume| (FFETCHFIELD NCREATE) -TEDIT.PROMPTPRINT (TEXTOBJ WINDOWPROP \\TEDIT.MAINW FFETCHFIELD NLSETQ SELECTQ GETPROMPTWINDOW PRIN1) -DBG::PRINT-ENTRY-MESSAGE (NLSETQ CL:PRINC CL:TYPE-OF \\HILOC \\LOLOC) INTERSECTION (CONS) CL:MAPCAR ( -CL::%MAPCAR-SINGLE CL::%MAPCAR-MULTIPLE CONS) DEBUGGER (FIND-LEXICAL-ENVIRONMENT STKNTH DECLARE -FIND-DEBUGGER-ENTRY-FRAME RESETSAVE LIST DBG::REUSE-CURRENT-WINDOW DBG::CREATE-DEBUGGER-WINDOW -DBG::SET-UP-DEBUGGER-WINDOW CL:FORMAT SI::BREAKPOINT-FUNCTION DBG::PRINT-ENTRY-MESSAGE -DBG::ATTACH-BACKTRACE-MENU CL:CATCH EXEC CL:FUNCTION) \\COPY.N.UFN (\\.GETBASE32 IDIFFERENCE \\MYALINK - OPCODES FFETCHFIELD ADDSTACKBASE \\VAG2 IPLUS) TEDIT.UNDO.PARALOOKS (FFETCHFIELD NCONC1 FRPLACA IPLUS -) GETVARS (STKPOS STKNARGS FSTKNTH STKARGNAME VARIABLES STKARG APPEND NCONC MAPCAR GETVARS1) -CL::%MAPCAR-MULTIPLE (CL:MAKE-LIST LENGTH) FIX/SCALE (MAPCAR FIX/SCALE FIXR FTIMES) XSECT (ITIMES IABS - IMINUS MSECT LINEY) BREAK-FUNCTION (XCL:TRACE-FUNCTION MAPCONC BREAK-FUNCTION GETD CL:ERROR -CL:MAKE-SYMBOL CL:FORMAT CL:COMPILE SI::CREATE-BROKEN-DEFINITION GET CL:DELETE LIST -SI::CONSTRUCT-MIDDLE-MAN) SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE-BACKWARDS (SEDIT:GET-PROMPT-WINDOW -GETPROMPTWINDOW FFETCHFIELD SEDIT::SUBNODE SEDIT::FIND-SUBSTRUCTURE-BACKWARDS CL:FORMAT -SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE) GETVARS1 (SELECTQ LAST GETVARS1) COMPILER::ENV-ANALYZE-TAGBODY ( -MAPC COMPILER::TAGBODY-SEGMENTS COMPILER::SEGMENT-STMTS COMPILER::ENV-ANALYZE) ENTER-DEBUGGER-P ( -IDIFFERENCE CLOCK) UPDATEFN (LITATOM TESTRELQ TESTTABLE FASSOC MSGETDEF SELECTQ TERPRI LIST) -SEDIT::ASSIGN-FORMAT-NIL (MAPC FFETCHFIELD SEDIT::SET-FORMAT) \\COURIER.CHECK.ERRORS (CONS) MAP2CAR ( -CONS APPLY* FRPLACD) GTHASHFILE (OPENHASHFILE ELT HELP) LDIFF (FRPLACD FLAST CONS ERROR) -BYTEBLOCKCOMPILE2 (RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION -BLOCKCOMPILE2 PACK* MAPCONC COMP.ATTEMPT.COMPILE FASSOC) CL::%MAPLIST-MULTIPLE (CL:MAKE-LIST LENGTH) -SEDIT::SET-POINT-UNKNOWN (SEDIT::PUNT-SET-POINT IGEQ HALF LRSH FFETCHFIELD) CL:ELT (CL:LENGTH CL:ERROR -) MAPCON (APPLY*) DBG::SIMPLE-REPORT-CONDITION (CL:PRINC) DISCARDXIPS (UNINTERRUPTABLY FFETCHFIELD -FREPLACEFIELD) LISPXTYPEAHEAD (SELECTQ LISPXREAD LISPXUNREAD RETFROM EDITE MAPC REVERSE PRINTHISTORY1 -LIST CONS READLINE) MAPCAR (CONS APPLY* FRPLACD) \\POSTSCRIPT.ACCENTPAIR (FFETCHFIELD SUBSTRING CONCAT - OCTALSTRING SUB1 %ARRAY-OFFSET %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE -\\GETBASETHIN \\GETBASEBYTE IEQP / FONTPROP) \\CREATEPIECEORSTREAM (NCHARS %ARRAY-TYPE-NUMBER -FFETCHFIELD FREPLACEFIELDVAL NCREATE OPENSTREAM MKSTRING CHARLOOKS.FROM.FONT) -\\STRINGWIDTH.HCPYDISPLAYAUX (FFETCHFIELD \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT ADD1 \\GETBASEFAT - \\GETBASE \\GETBASETHIN \\GETBASEBYTE PLUS \\CHARSET LRSH \\GETCHARSETINFO \\GETBASEPTR UNFOLD LLSH -\\CREATECHARSET \\FGETIMAGEWIDTH \\CHAR8CODE LOGAND \\FGETCHARIMAGEWIDTH \\FGETWIDTH SUB1 -%ARRAY-OFFSET %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER FUNCTION) UNBREAK (NLAMBDA.ARGS CL:FLET MAPCONC -CL:REVERSE XCL::UNBREAK-ENTRY XCL:UNBREAK-FUNCTION CL:FIRST CL:THIRD) SEDIT::REPLACE-STRING ( -IDIFFERENCE NCHARS ADD1 SEDIT::REPLACE-CHARS FFETCHFIELD) SEDIT::FIND-NODE-SUBSTRUCTURE (FFETCHFIELD -CL:FIRST) COMPILER::FIND-SEGMENT (COMPILER::TAGBODY-SEGMENTS COMPILER::SEGMENT-TAGS) CL:MAPC ( -CL::%MAPC-SINGLE CL::%MAPC-MULTIPLE CONS) LSUBST (NCONC COPY LSUBST CONS) MAPCONC (APPLY*) -SEDIT::SET-POINT-QUOTE (SEDIT::SET-POINT SEDIT::SUBNODE FFETCHFIELD SEDIT::PUNT-SET-POINT -SEDIT::SET-POINT-NOWHERE) ONEDINSPECT.MAKEREGIONS (WINDOWPROP DSPLINEFEED XCL::PROFILIZE CL:PROGV -XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES ONEDINSPECT.VALUEWIDTH LENGTH IPLUS LIST PLUS CREATEREGION -LAST STRINGWIDTH DIFFERENCE) ASSOCRECORD (DECLARERECORD CONS) CL::%MAPC-MULTIPLE (CL:MAKE-LIST LENGTH) - TTPROMPTCHAR (TTPRIN1 PLUS) CL::%ATAN-FLOAT (FLOAT - FQUOTIENT UFMINUS + CL:*) -SEDIT::MAKE-FUNCTION-PROTOTYPE (DECLARE EDITMODE LIST) COMPILER::EXPAND-NESTED-PROGNS (MAPCONC -COMPILER::PROGN-STMTS LIST) CL:MAPLIST (CL::%MAPLIST-SINGLE CL::%MAPLIST-MULTIPLE CONS) MAP2C (APPLY*) - SEDIT::INITIALIZE-LISTS (LIST* FREPLACEFIELDVAL NCREATE SEDIT:RESET-FORMATS) COMPILER::ENV-ANALYZE-SETQ - (CL:PUSHNEW COMPILER::VARIABLE-WRITE-REFS COMPILER::SETQ-VAR COMPILER::ENV-ANALYZE COMPILER::SETQ-VALUE -) CL:MAPL (CL::%MAPL-SINGLE CL::%MAPL-MULTIPLE CONS) TEDIT.UNDO.LOOKS (FFETCHFIELD NCONC1 -\\TEDIT.CARETLOOKS.VERIFY FRPLACA IPLUS) CL:REPLACE (CL:LENGTH - +) CL::TYPE-EXPAND (CL::TYPE-EXPANDER - CL:VALUES CL:FUNCALL) SEDIT::SET-POINT-LIST (FFETCHFIELD ILESSP HALF LRSH SUB1 SEDIT::PUNT-SET-POINT -SMALLP IPLUS SEDIT::SUBNODE NTH) ONEDINSPECT.ADJUSTSELECTION (WINDOWPROP FFETCHFIELD -WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES STRINGWIDTH -APPLY* FREPLACEFIELDVAL NCREATE) IGREATERP (OPCODES) COMPILER::ENV-ANALYZE-THROW (COMPILER::ENV-ANALYZE - COMPILER::THROW-TAG COMPILER::THROW-VALUE) SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE (SEDIT:GET-PROMPT-WINDOW - GETPROMPTWINDOW FFETCHFIELD SEDIT::SUBNODE SEDIT::FIND-SUBSTRUCTURE CL:FORMAT -SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE) RATOMS (RATOM TCONC) CL:MAPCAN (CL::%MAPCAN-SINGLE -CL::%MAPCAN-MULTIPLE CONS) SELECT.ATOM.ASPECT (TYPESOF MENU CONS CONCAT FREPLACEFIELDVAL NCREATE) -PUTASSOC (ERRORX LIST CONS) \\POSTSCRIPT.SPECIALOUTCHARFN (FFETCHFIELD \\DSPFONT.PSC IPLUS LOGAND LRSH -) \\CLEARPCTB (HELP) CL::%MAPCAN-MULTIPLE (CL:MAKE-LIST LENGTH) SEDIT::PRINT-GAP (CL:FORMAT -FFETCHFIELD) SEDIT::REPLACE-CHARS (IDIFFERENCE NCHARS ADD1 IPLUS FFETCHFIELD SEDIT::STRINGWIDTH -MKSTRING SUBSTRING FRPLACA SEDIT::CLOSE-NODE SEDIT::DELETE-NODES LIST) \\FTP.RECOGNIZEFILE (RESETLST -\\FTP.UNPACKFILENAME ASSOC CONS SELECTQ GETHOSTINFO LIST \\GETFTPCONNECTION MARK# FTPPUTMARK -FTPGETMARK FTPGETCODE .FTPDEBUGLOG. \\FTP.PACK.DIRECTORYNAMEP READPLIST MKATOM + \\FTP.PACKFILENAME) -PRINTHISTORY1 (LISTGET1 CONS FMEMB FUNCTION PRINTHISTORY1 ADD1 LDIFF LISPXREPRINT LISTGET SHOWPRINT) -DBG::EMERGENCY-PANIC-LOOP (PRIN1 TERPRI) CL::%MAPL-MULTIPLE (CL:MAKE-LIST LENGTH) MAPC (APPLY*) -\\BIGNUM.PLUS (\\BN.TO.FIXP \\BN.PLUS2 \\BN.FROM.FIXP) COMPILER::TEST-ANNOTATION (COMPILER::TEST-ALPHA-2 - CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION COMPILER::PRINT-TREE COMPILER::ANNOTATE-TREE -COMPILER::META-EVALUATE) PLUS (ADD1 ARG IPLUS FPLUS) CL:MAPCON (CL::%MAPCON-SINGLE CL::%MAPCON-MULTIPLE - CONS) RPT (EVAL SUB1) NUMBERPAD.HELDFN (PROMPTPRINT SELECTQ) \\HANDLE.RAW.OTHER (PRIN1 -\\RELEASE.ETHERPACKET) TTYIN.PPTOFILE (OPENSTREAM \\GTREADTABLE - IQUOTIENT CHARWIDTH NCHARS POSITION -CONS GETFILEPTR) FILL/GRAPHNODE/LABEL (WINDOWP DISPLAYSTREAMP IPLUS IDIFFERENCE) \\BOXIPLUS ( -.BOXIPLUS. \\GETBASE NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR -CL::RATIO-DENOMINATOR IDIFFERENCE ADD1 IPLUS) \\NSFILING.SET.CONTINUANCE (FILING.CALL IMIN IQUOTIENT -ITIMES) CL::%EVERY-MAP-OPTIMIZER (CL:EVAL) RPTQ (EVAL APPLY SUB1) CLISPATOM (CLISPATOM0 DUNPACK LIST -PACK FMEMB FLAST LDIFF) LOGAND (SELECTQ LOGAND ARG ADD1) EXEC-VALUE-OF (CL:VALUES-LIST LISTGET) -MAPLIST (CONS APPLY* FRPLACD) CL::%MAPCON-MULTIPLE (CL:MAKE-LIST LENGTH) EDITCALLERS (EDITFPAT CONS -MKLIST UNION LIST RESETLST FINDFILE LISPXPRINT FUNCTION OPENSTREAM FULLNAME -GET-ENVIRONMENT-AND-FILEMAP \\PARSE-FILE-HEADER FFETCHFIELD SEPRCASE ASSOC MAPCAR CONCAT CHCON1 -SUBSTRING STRPOS SUB1 STRINGP CL:SYMBOL-PACKAGE MKSTRING FFILEPOS GETFILEMAP LOADFILEMAP LISPXPRIN2 -FMEMB DREVERSE) EXEC-PRINT (FRESHLINE WRITE) FIX-SUBR-NAME (CONCATCODES DREMOVE SUBST CHCON) SAVEDEF1 -(GETD SELECTQ FNTYP) IDIFFERENCE (OPCODES) LOGOR (SELECTQ LOGOR ARG ADD1) TEDIT.SELECTED.PIECES ( -FFETCHFIELD TCONC \\GETBASEPTR \\FIRSTNODE IPLUS \\SPLITPIECE - APPLY* PLUS) RESET/NODE/LABELSHADE ( -INVERTED/SHADE/FOR/GRAPHER FRPLACA CONSTANT CONS DSPCLIPPINGREGION) DIFFERENCE (OPCODES) -SHOWBITMAP1.IP (ITIMES BITMAPCREATE CEIL LOGAND IPLUS CONSTANT SUB1 LOGXOR \\ADDBASE FFETCHFIELD -IDIFFERENCE IMOD EQL - FOLDHI LRSH PLUS) \\BIGNUM.LOGOR (ERROR \\BN.TO.FIXP \\BN.LOGOR \\BN.FROM.FIXP -DIFFERENCE LOGAND) \\POSTSCRIPT.PRINTSLUG (FFETCHFIELD \\FGETWIDTH \\GETBASE \\CHAR8CODE LOGAND -\\MOVETO.PSC IPLUS) \\CHTOPCNO (FFETCHFIELD IPLUS IMAX) FIXCONTINUE (GETHASH ASKUSER ITIMES LIST -RETDWIM2 RETDWIM) LOGXOR (SELECTQ LOGXOR ARG ADD1) SEDIT::MAKE-GAP (FREPLACEFIELDVAL NCREATE) -\\GETFTPCONNECTION (\\CANONICAL.HOSTNAME ETHERHOSTNAME FRPLACA \\FTP.OPEN.CONNECTION .FTPDEBUGLOG.) -MAKELINE (IPLUS IMINUS MAKEXYPT) GETRELATION (PARSERELATION UNION GETTABLE) SEDIT::REPLACE-QUOTE ( -FREPLACEFIELD CONS LIST SEDIT::SUBNODE FFETCHFIELD ADD1) TCONC (CONS ERROR FRPLACD) ITIMES (SELECTQ -ITIMES ARG ADD1) \\TEDIT.INSERT.PIECES (FFETCHFIELD \\CHTOPC \\SPLITPIECE - NCREATE OPENSTREAM IPLUS -LLSH \\TEDIT.UNIQUIFY.CHARLOOKS \\TEDIT.UNIQUIFY.PARALOOKS IMAGEOBJPROP PLUS) \\10MB.CREATENDB (CONS -\\10MB.STARTDRIVER FUNCTION FREPLACEFIELDVAL NCREATE) IPLUS (SELECTQ IPLUS ARG ADD1) \\VECFONTINIT ( -ARRAY MAPCAR FREPLACEFIELDVAL NCREATE \\CREATEFONTCHARSETVECTOR \\ALLOCBLOCK ADD1 FFETCHFIELD -\\CREATECSINFOELEMENT FOLDHI LRSH IPLUS LIST) \\BIGNUM.TIMES (\\BN.TO.FIXP \\BN.TIMES2 \\BN.FROM.FIXP) - \\BIGNUM.DIFFERENCE (\\BN.TO.FIXP \\BN.DIFFERENCE \\BN.FROM.FIXP) SELECT (APPLY SELECT1 EVAL) -TEDIT.REDO.PARALOOKS (FFETCHFIELD) \\HDCPYDISPLAY.FIX.YPOS (FFETCHFIELD FIX FTIMES CONSTANT) TIMES ( -ADD1 ARG ITIMES FTIMES) \\BIGNUM.LOGAND (ERROR DIFFERENCE LOGOR LOGNOT \\BN.TO.FIXP \\BN.LOGANDC2 -\\BN.FROM.FIXP \\BIGNUM.LOGAND \\BN.LOGAND) COMPILER::CLOSURE-ANNOTATE-UNWIND-PROTECT (CL:UNION -COMPILER::CLOSURE-ANNOTATE COMPILER::UNWIND-PROTECT-STMT COMPILER::UNWIND-PROTECT-CLEANUP) -CL::%INV-2-SQRT3 (CL::%FLOAT) SCANFILE0 (LIST LCONC LAST SKIPSEPRCODES GETFILEPTR RATOM READ) -TEDIT.UNPARSE.PAGEFORMAT (FFETCHFIELD LISTGET SELECTQ IPLUS NCONC1 LIST PLUS IDIFFERENCE ADD1 CONSTANT - FQUOTIENT FIXR MAPCAR) \\BIGNUM.COMPARE (\\BN.COMPAREN \\BN.FROM.FIXP) \\BIGNUM.QUOTIENT (ERROR -\\BN.TO.FIXP \\BN.DIVIDE \\BN.FROM.FIXP) SEDIT::INITIALIZE-COMMENTS (LIST* FREPLACEFIELDVAL NCREATE) -SOME (APPLY*) QUOTIENT (IQUOTIENT FQUOTIENT /) COURIERPROGRAM (PUTDEF) SETQQ (SET) SEDIT::REPLACE-LIST - (FFETCHFIELD NTH IPLUS IDIFFERENCE LENGTH ADD1 FREPLACEFIELD PLUS CONS LIST NCONC SUB1 IMAX) -\\BIGNUM.LOGXOR (ERROR LOGXOR DIFFERENCE \\BIGNUM.DIFFERENCE \\BIGNUM.LOGOR \\BIGNUM.LOGAND -\\BIGNUM.LOGXOR \\BN.TO.FIXP \\BN.LOGXOR \\BN.FROM.FIXP) FORMAT-PLURAL (WRITE-STRING*) -TEDIT.DO.BLUEPENDINGDELETE (FFETCHFIELD) EDITTOGGLELABEL (RESETFORM TTYDISPLAYSTREAM CLRPROMPT -WINDOWPROP READ/NODE |printout| TERPRI) \\BITMAPSIZE.IP (SELECTQ TIMES BITMAPWIDTH CONSTANT FQUOTIENT -BITMAPHEIGHT CONS \\ILLEGAL.ARG) STRMEMB (SUBSTRING NTHCHARCODE ADD1) FIXCONTINUE1 (GETPROP) -\\PUTBASEFIXP.UFN (SELECTC NTYPX \\LOLOC FFETCHFIELD LISPERROR ADD1) SEDIT::PRINT-BROKEN-ATOM (CL:FORMAT - FFETCHFIELD) SEDIT::PARSE--STRING (SEDIT::BUILD-PRELINEARIZED-NODE FFETCHFIELD) \\FTP.PRINTPLIST ( -%ARRAY-BASE FFETCHFIELD SUB1 %ARRAY-OFFSET IPLUS %ARRAY-TYPE-NUMBER \\PNAMECELL \\ATOMCELL \\PROPCELL -CONSTANT MKSTRING ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE \\DECRYPT.PWD.CHAR LOGXOR -BOUT) COMPILER::CLOSURE-ANNOTATE-VAR-REF (COMPILER::VAR-REF-VARIABLE COMPILER::VARIABLE-SCOPE LIST) -CL::%2-SQRT3 (CL::%FLOAT) EQDEFP (FFETCHFIELD SUB1 UNFOLD LLSH IMIN \\#BLOCKDATACELLS \\GETBASE INDEXF - ADD1 PLUS) IQUOTIENT (OPCODES) SEDIT::SET-INITIAL-SELECTION (FFETCHFIELD) WALK-FORM-INTERNAL ( -CL:MULTIPLE-VALUE-SETQ CL:FUNCALL WALK-FORM-INTERNAL XCL::GET-WALKER-TEMPLATE WALK-TEMPLATE -CL:MACROEXPAND-1 CL:ERROR) NUMBER.READER.HANDLER (NUMBERPAD.READER.HANDLE.CHAR WFROMMENU) -\\FLUSH.NDB.QUEUE (\\DEQUEUE FFETCHFIELD) FRPTQ (EVAL APPLY SUB1) TTLOADBUF (GETSTREAM GETFILEPTR -BINCCODE READCCODE FMEMB NLEFT DCHCON) ENDREAD? (TTSKREAD FIND.NON.SPACE \\SYNCODE GETHASH FFETCHFIELD - \\GETBASEBYTE FIRSTCHAR LIST TTNEXTCHAR) SPYOBJ (IMAGEOBJCREATE CL:FORMAT CONS) \\MAYBEPEEKNS (LOGAND - \\GETBASE LOCF \\ADDBASE \\RELEASE.ETHERPACKET) SEDIT::FIND-AND-DISPLAY-STRUCTURE-BACKWARDS ( -SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW FFETCHFIELD SEDIT::SUBNODE SEDIT::FIND-STRUCTURE-BACKWARDS -CL:FORMAT SEDIT::FIND-AND-DISPLAY-STRUCTURE-BACKWARDS) TEDIT.REDO.LOOKS (FFETCHFIELD) -\\STRINGWIDTH.HDCPYDISPLAY (FONTCREATE FFETCHFIELD STREAMPROP IQUOTIENT IPLUS \\STRINGWIDTH.GENERIC -\\FGETCHARIMAGEWIDTH \\FGETWIDTH \\GETBASE \\GETCHARSETINFO \\GETBASEPTR UNFOLD LLSH \\CHARSET LRSH -\\CREATECHARSET \\CHAR8CODE LOGAND CONSTANT) \\RSH (LSH IMINUS NTYPX FFETCHFIELD \\LOLOC -\\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR IDIFFERENCE IPLUS LRSH LLSH -LOGAND \\MAKENUMBER \\BIGNUM.LSH) PRINTXIP (FFETCHFIELD LOCF \\ADDBASE PRIN1 SELECTQ FASSOC RESETFORM -OUTPUT APPLY* IDIFFERENCE) COMPILER::ENV-ANALYZE-RETURN (COMPILER::ENV-ANALYZE COMPILER::RETURN-VALUE) - COMPILER::ENV-ANALYZE-PROGN (MAPC COMPILER::PROGN-STMTS COMPILER::ENV-ANALYZE) RSH (\\RSH) ERSETQ ( -ERRORSET CONS) SAMEPARALOOKS (FFETCHFIELD CONCAT) MINUSP (<) MSECT (IQUOTIENT IPLUS ITIMES IMINUS -IDIFFERENCE) SEDIT::MAXIMUM-STRING-WIDTH (CL:APPLY) WALK-TEMPLATE (DECLARE) CL::%SQRT3 (CL::%FLOAT) -\\TAN.OLD (FREMAINDER FTIMES FDIFFERENCE FPLUS POLYEVAL \\FLOATBOX OPCODES FQUOTIENT) -SEDIT::THROW-AWAY-CHANGES (FREPLACEFIELD) NLSETQ (ERRORSET CONS) IMINUS (IDIFFERENCE) SUB1 ( -IDIFFERENCE) ZEROP (\\FZEROP) SEDIT::MAKE-BROKEN-ATOM (FREPLACEFIELDVAL NCREATE) SEDIT::PARSE--LITATOM - (SEDIT::BUILD-PRELINEARIZED-NODE FFETCHFIELD) \\FTP.PACKFILENAME (SELECTQ SELCHARQ CHCON1 NTHCHARCODE - SUBSTRING \\FTP.ADD.QUOTES LIST STRPOS CONS NCHARS GETHOSTINFO CONCAT SUB1 CONCATLIST MKATOM U-CASE) -TWODINSPECT.TOTALWIDTH (IPLUS ITIMES LENGTH STRINGWIDTH PLUS) ADD1 (IPLUS) SUB1VAR (SET SUB1 EVAL) -XNLSETQ (ERRORSET) SEDIT::PARSE--LIST-INTERNAL (SEDIT::BUILD-NODE) INSPECT.INVERTSELECTION (WINDOWPROP - FFETCHFIELD FONTPROP) \\WWCHANGESCREENSIZE (\\INSURESCREEN DREVERSE OPENWINDOWS \\CLOSEW1 FFETCHFIELD - \\UPDATECACHEDFIELDS WINDOWPROP REVERSE OPENW) CL:CHAR-NAME (CL:CHAR-CODE LRSH LOGAND CONCAT -CL:CODE-CHAR LOGOR - OCTALSTRING) FORMAT-NEWLINE (FORMAT-EAT-WHITESPACE) SUBSET (CONS FRPLACD APPLY*) -COMPILER::CLOSURE-ANNOTATE-THROW (CL:UNION COMPILER::CLOSURE-ANNOTATE COMPILER::THROW-TAG -COMPILER::THROW-VALUE) CL:CHAR-INT (CL:CHAR-CODE) REGIONONSCREEN (IMAX IPLUS IDIFFERENCE CONS) -CL:CHAR-CODE (\\LOLOC \\DTEST) FIND.MATCHING.WORD (INPART) RESETLST (RESETLST \\EVPROGN) -SPY.MERGE.CALLEES (FFETCHFIELD FREPLACEFIELD CONS SPY.MERGETREE SELECTQ GETHASH SHOULDNT SUB1 LIST -FREPLACEFIELDVAL NCREATE) IEQP (IDIFFERENCE) \\MAKE.ITEMS.VERT.ORDER (CONS LIST PLUS TCONC MAPCONC) -\\BIGNUM.REMAINDER (ERROR \\BN.TO.FIXP \\BN.DIVIDE \\BN.FROM.FIXP) RESETSAVE (CONS GETTOPVAL \\EVAL -LIST) GCD (GCD MINUS IREMAINDER) \\DSPYPOSITION.HDCPYDISPLAY (\\DSPYPOSITION.DISPLAY) LISPXSUBST ( -SUBST ESUBST) RESETFORM (LIST \\EVAL CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \\EVPROGN) -SEDIT::FIND-AND-DISPLAY-STRUCTURE (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW FFETCHFIELD SEDIT::SUBNODE -SEDIT::FIND-STRUCTURE CL:FORMAT SEDIT::FIND-AND-DISPLAY-STRUCTURE) \\PICK.EVALQT (EXEC -XCL::SETUP-EXEC-WINDOW) \\BIGNUM.LSH (ERROR \\BN.FROM.FIXP IDIFFERENCE CONS \\BN.TO.FIXP \\BN.TIMES2 -EXPT IPLUS \\BIGNUM.QUOTIENT FREPLACEFIELDVAL NCREATE IMINUS MINUS \\BIGNUM.LSH SUB1) SELECTC (APPLY -EVAL) COMPILER::ENV-ANALYZE-PROGV (COMPILER::ENV-ANALYZE COMPILER::PROGV-SYMS-EXPR COMPILER::PROGV-VALS-EXPR - COMPILER::PROGV-STMT) \\TEDIT.HISTORYADD (FFETCHFIELD + \\TEDIT.CUMULATE.EVENTS FREPLACEFIELD) -RESETVARS (MAPCAR CONS GETTOPVAL CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SETTOPVAL \\EVPROG1 - APPLY) FILING.CALL (ERROR ARG FFETCHFIELD \\GET.COURIER.DEFINITION LENGTH SELECTQ - + CONS LIST PLUS -WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \\NSFILING.GET.STREAM PRIN1 -COURIER.EXECUTE.CALL \\CREATECELL FREPLACEFIELD) XPROD (IDIFFERENCE ITIMES) FIXATOM1 (STKNTH BLIPVAL -LOGAND ARGTYPE STKEVAL FIXLISPX/ STKNAME SELECTQ SYSTEMTYPE REALSTKNTH CONS FMEMB STKARG) ILESSP ( -IGREATERP) LOAD? (FINDFILE LISPERROR ROOTFILENAME GETPROP FILENAMEFIELD FILEDATE LOAD) -\\MAKE.EXPEDITED.STREAM (NCREATE LOCF \\ADDBASE IPLUS UNFOLD LLSH FFETCHFIELD INDEXF FREPLACEFIELD -FUNCTION) \\BSP.SETFILEPTR (IDIFFERENCE \\BSP.GETFILEPTR \\BSP.SKIPBYTES \\IS.NOT.RANDACCESSP) -PUTPUPSTRING (\\DTEST FFETCHFIELD LOCF \\ADDBASE FREPLACEFIELD PLUS \\PUTBASESTRING IDIFFERENCE) -|\\VFMAtLoad| (\\ALLOCBLOCK LRSH ADD1 MESASIZE CREATE.MONITORLOCK) CL::%NOT-INTEGER-ERROR (CL:ERROR) -TTADDTAB (ADDCHAR TTMAKECOMPLEXCHAR LOGAND IQUOTIENT IDIFFERENCE LIST PLUS) RESET/NODE/BORDER ( -GRAPHNODE/BORDER/WIDTH CONSTANT CONS WINDOWPROP INVERTED/GRAPHNODE/BORDER FRPLACA IEQP) DELFROMFILES ( -GETFILEPKGTYPE FILECOMS TERPRI GETPROP APPLY* LIST) DEFAULT.BACKGROUND.COPYFN (LOGAND MENU CONS -FREPLACEFIELDVAL NCREATE ERSETQ EVAL) TEXTPROP (PUTTEXTPROP TEXTOBJ ARG GETTEXTPROP \\ILLEGAL.ARG) -\\NSRANDOM.WRITE.SEGMENT (FILING.CALL FFETCHFIELD COURIER.CREATE LIST FUNCTION) \\REGIONOVERLAPAREAP ( -IPLUS) WRITE-STRING* (CL:LENGTH - \\GETSTREAM) ACCESSFNS (DECLARERECORD CONS) CHECKIMPORTS (FINDFILE -GETPROP ROOTFILENAME GETFILEINFO LIST ASKUSER MAPCAR CAR MAPC IMPORTFILE) RESETVAR (LIST CONS -GETTOPVAL CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \\EVAL) \\READNUMBER.OUTLINEREGION (FIXP -IDIFFERENCE IPLUS ITIMES DSPTEXTURE) FIXAPPLY (FGETD FIXLAMBDA GETPROP CLISPATOM LIST FMEMB EVAL -FIXSPELL FSTKNTH) CL:CODE-CHAR (\\HILOC) TTADJUSTWIDTH (IMINUS FRPLACA PLUS) CL::%/ (\\CALLME -IREMAINDER IQUOTIENT) \\LEAF.TIMEDOUT.EXCESSIVE (CREATEW MAKEWITHINREGION CONCAT FFETCHFIELD TERPRI -PRIN1 |printout| LOCF \\ADDBASE IPLUS FOLDLO LRSH LLSH SIGNED SUB1 IDIFFERENCE LIST LOGAND CONSTANT -LOGOR RPLACD CONS FUNCTION FREPLACEFIELDVAL NCREATE IQUOTIENT WINDOWPROP STRINGWIDTH) FILESLOAD ( -DOFILESLOAD NLAMBDA.ARGS) INSPECT/DATATYPE (RECLOOK SYSRECLOOK1 FINDRECDECL FINDSYSRECDECL -INSPECTW.CREATE INSPECTABLEFIELDNAMES CL:FORMAT \\HILOC \\LOLOC \\GETDTD \\ADDBASE ITIMES NTYPX -FFETCHFIELD LENGTH LIST PLUS SELECTQ ALISTP PRIN1) LESSP (IGREATERP FGREATERP) \\CREATEPRESSFONT ( -RESETLST \\FACECODE CONSTANT FQUOTIENT FREPLACEFIELDVAL NCREATE \\CREATEFONTCHARSETVECTOR \\ALLOCBLOCK - ADD1 \\GETBASEPTR FFETCHFIELD UNFOLD LLSH \\CREATECHARSET) CHARACTER.PRINT (CL:CHAR-NAME IPLUS + -CL:LENGTH FFETCHFIELD FRESHLINE CL:CHAR-CODE) NLAMBDA.ARGS (LIST CONS NLAMBDA.ARGS) PAINTW.READMODE ( -MENU FREPLACEFIELDVAL NCREATE CONS) CL:INT-CHAR (CL:CODE-CHAR) FILL.TEST (FILL.INITTBLE PLUS) AUTOCR? -(IPLUS) CHARLOOKS.FROM.FONT (FREPLACEFIELDVAL NCREATE FONTP FONTPROP) CL:GRAPHIC-CHAR-P (CL:CHAR-CODE -LRSH LOGAND CONSTANT) FIXATOM (FINDATOM STKNTH BLIPVAL CLISPATOM CHCON1 UNPACK EVAL FIXSPELL DUNPACK -SOME CONS PACK LDIFF FIXATOM1) \\NSRANDOM.UPDATE.VALIDATION (FILING.CALL FFETCHFIELD -\\NSFILING.UPDATE.ATTRIBUTES) \\AREAINREGIONP (IPLUS IGEQ) OCTALSTRING (GLOBALRESOURCE CONCAT -\\CONVERTNUMBER GETRESOURCE NEWRESOURCE ALLOCSTRING) \\BIGNUM.INTEGERLENGTH (\\BN.INTEGERLENGTH -\\BN.FROM.FIXP) LOADCOMP (RESETLST FINDFILE LIST FUNCTION NAMEFIELD GETPROP LOADFNS) -\\COURIER.BROADCAST.ON.NET (LOCF \\ADDBASE PRIN1 NLSETQ \\SEND.EXPEDITED.XIP CL:FUNCALL) -\\BSPBACKFILEPTR (FFETCHFIELD FREPLACEFIELD PLUS ERROR) BRH/OFFSET (MAPC GETNODEFROMID FRPLACD PLUS -BRH/OFFSET) TTYINBUFFERSTREAM (FREPLACEFIELDVAL NCREATE FUNCTION) DOBACKGROUNDCOM (MENU CONS FUNCTION -FREPLACEFIELDVAL NCREATE EVAL) \\GS.INITBUF (IDIFFERENCE IPLUS SUB1 NCHARS) READPLIST (COPYREADTABLE -CONS BIN LIST RATOM RSTRING) ADJUSTLINE (- IMIN TIMES IMAX + LRSH OVERFLOWLINE? FIND.LINE.BREAK -NTH.RELATIVE.COLUMN.OF NTH.COLUMN.OF SUB1 SEGMENT.BIT.LENGTH NLEFT INSERT.NODE FRPLACA PLUS TTBITWIDTH - SUB1VAR INSERTLINE) EDITTOGGLEBORDER (RESETFORM TTYDISPLAYSTREAM CLRPROMPT WINDOWPROP READ/NODE -|printout| TERPRI) CL:NAME-CHAR (CHARCODE.DECODE STRING CL:CODE-CHAR) INSPECT/HUNK (INSPECTCODE -INSPECT/MAKE/CCODEP MENU LIST-ALL-BLOCKRECORDS CONS FREPLACEFIELDVAL NCREATE INSPECT/AS/BLOCKRECORD -IMIN SUB1 IQUOTIENT UNFOLD LLSH LIST PLUS) FNTH (CONS SUB1) READ-FILECREATED (GETFILEPTR) -PAINTW.READBRUSHSHAPE (MENU FREPLACEFIELDVAL NCREATE CONS) CL:SET-CHAR-BIT (CL:ERROR) TTDOTABS ( -IDIFFERENCE ITIMES TTMAKECOMPLEXCHAR IQUOTIENT LIST PLUS) VALUEOF (VALUOF EDITFINDP) -BREAK.MSG.INTO.LINES (SUBSTRING MKSTRING NCHARS SUB1 NCONC1 CHARWIDTH NTHCHARCODE IPLUS ADD1 PLUS) -LOADFROM (LOADFNS LAST) FM.TOPGROUPID (\\FM.DTOPGROUPID WINDOWPROP \\FM.INSUREWINDOW ERROR) -\\LEAF.NOT.RESPONDING (FFETCHFIELD PRIN1 .NAMEORSTREAM. |printout|) FLOAT (\\DTEST) IDATE (DAYTIME -MKSTRING \\IDATESCANTOKEN NTHCHARCODE PLUS \\IDATE-PARSE-MONTH SELECTQ IREMAINDER IQUOTIENT FIXP ADD1 -+ ILEQ LOGAND - SUBSTRING SUB1 \\PACKDATE) IMOD (IREMAINDER IPLUS) RANDSET (CLOCK IDATE LENGTH FIXP -MAPCAR IPLUS LOGAND LOGXOR ITIMES LAST CONS FNTH LIST PLUS) COMPILER::ALPHA-LAMBDA-LIST ( -COMPILER::LAMBDA-REQUIRED CL:NREVERSE COMPILER::LAMBDA-OPTIONAL COMPILER::LAMBDA-KEYWORD) GENSYM? ( -NTHCHARCODE NTHCHAR) FM.WHICHITEM (WHICHW \\FM.CHECKREGION WINDOWPROP \\FM.ITEMPROP FFETCHFIELD -LISTGET IPLUS ILESSP LASTMOUSEY LASTMOUSEX) \\LEAF.RESENDPUPS (LOCF \\ADDBASE) REMAINDER (IREMAINDER -FREMAINDER) RPAQQ (SAVESET) FEXPT (ANTILOG FTIMES FLOATP FLOAT LOG) MINUS (FDIFFERENCE DIFFERENCE) -SELECT1 (EVAL) SETATOMVAL (SETTOPVAL) PAINTW.READBRUSHSIZE (MENU FREPLACEFIELDVAL NCREATE CONS) -UPDATE/MENU/IMAGE (FFETCHFIELD FONTP \\COERCEFONTDESC FONTCREATE MENUTITLEFONT FONTPROP STRINGWIDTH -LENGTH NUMBERP ADD1 IQUOTIENT SUB1 FIXP FREPLACEFIELD IMAX IPLUS MAXMENUITEMWIDTH ITIMES BITMAPWIDTH -FRPLACA MAXMENUITEMHEIGHT IDIFFERENCE \\MAKE.ITEMS.VERT.ORDER BITMAPCREATE DSPCREATE CONS -CREATEWFROMIMAGE) |PutUnboxed| (\\PUTFIXP) FILL.INCY (IPLUS \\HILOC \\LOLOC FREPLACEFIELD FFETCHFIELD) - DO?CMD (BACKSKREAD CHCON) CHANGENAME (GETD) \\PROTECTED.APPLY (ERSETQ APPLY*) \\BSPWRITEBLOCK ( -\\BUFFERED.BOUTS \\DTEST FFETCHFIELD) GETPUPSTRING (IDIFFERENCE \\DTEST FFETCHFIELD LOCF \\ADDBASE -\\GETBASESTRING ALLOCSTRING) CH.ADD.MEMBER (CH.CANONICAL.NAME COURIER.CALL CH.FINDSERVER PARSE.NSNAME -FIXP CH.PROPERTY CH.GETAUTHENTICATOR) SETY.IP (FFETCHFIELD FIXR DIFFERENCE <= FREPLACEFIELD) -NODELST/AS/MENU (IDIFFERENCE HALF LRSH IPLUS) FMINUS (FDIFFERENCE) MAKEIBMFORMAT (\\MAKERECODEMAP -\\INSTALL.EXTERNALFORMAT FUNCTION FREPLACEFIELDVAL NCREATE) DMPHASH (MAPC ERSETQ EVALV LIST HARRAYSIZE - KWOTE HARRAYPROP) \\ATMOUT (LOGAND LRSH \\BOUT NCHARS ZEROP FFETCHFIELD \\PNAMECELL \\ATOMCELL -\\PROPCELL CONSTANT ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE) CL:BOTH-CASE-P ( -CL:UPPER-CASE-P CL:LOWER-CASE-P) FIX89TYPEIN (PACK CONS LIST PRINT LDIFF) \\AREAVISIBLE? (FFETCHFIELD) - \\TEDIT.COMMAND.LOOP (FFETCHFIELD ALLOCSTRING SUBSTRING THIS.PROCESS RESETSAVE -\\TEDIT.COMMAND.RESET.SETUP LIST TEXTPROP APPLY* TEDIT.COPY TEDIT.COPY.PARALOOKS TEDIT.COPY.LOOKS -TEDIT.MOVE FREPLACEFIELD \\GETKEY \\SYNCODE GETHASH \\GETBASEBYTE LOGAND) \\SETCARET ( -DSPCLIPPINGREGION IPLUS) TEDIT.COMPOUND.PAGEFORMAT (LIST FREPLACEFIELDVAL NCREATE) CL:DIGIT-CHAR-P ( -CL:CHAR-CODE CONSTANT - +) CL:MOD (FLOAT - CL:* UFIX FQUOTIENT + CL:REM) \\PRESSFAMILYCODELST (\\BIN -PLUS LLSH IPLUS LOGAND LRSH CONS \\WIN PACKC LIST) EXPT (FEXPT TIMES RSH FLOAT FQUOTIENT IMINUS LRSH) -/REMPROP (LIST GETPROPLIST) FILENAMEFROMID (|\\LFFindDirectory| GETFILEPTR BIN BIN16 CONCAT PACKC LIST - PLUS) CL:CHARACTERP (TYPENAMEP) TTYIN.SHOW.?ALTERNATIVES (CURRENT.WORD NLEFT \\SYNCODE GETHASH -FFETCHFIELD \\GETBASEBYTE LIST ADDCHAR FIND.MATCHING.WORD TTCOMPLETEWORD INPART RESTORE.CURSOR) RPAQ? -(GETTOPVAL SETTOPVAL EVAL) LOADCOMP? (FINDFILE GETPROP NAMEFIELD) \\BULK.DATA.CLOSE (GETSPPCON -FFETCHFIELD OVERWRITEABLE LOGAND \\EOFP SPREADAPPLY* ERSETQ RESETLST LIST FUNCTION \\COURIER.RESULTS) -EQMEMBHASH (MEMB GETHASH) RAND (LOGAND IDIFFERENCE IREMAINDER FTIMES FQUOTIENT CONSTANT FLOAT ADD1 -IGREATERP IPLUS IMOD \\MAKENUMBER FPLUS FDIFFERENCE) CHNGNM (FNCHECK GETD GETP PACK LIST /DREMOVE CONS - RESETVARS .RESETLST. CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION CHANGENAME1 APPEND GENSYM -SAVED) CL:ALPHANUMERICP (CL:ALPHA-CHAR-P) BMOBJ.COPYFN (IMAGEOBJPROP BITMAPTEDITOBJ BITMAPCOPY) ERRORX - (SETERRORN RESETLST FIND-DEBUGGER-ENTRY-FRAME LIST) CL:STRING-CHAR-P (\\DTEST) MOVD (\\DEFCELL -\\ATOMCELL UNINTERRUPTABLY FFETCHFIELD COPY VIRGINFN GETD) TEDIT.GET.OBJECT (FFETCHFIELD DIFFERENCE -GETFILEPTR \\ATMIN READIMAGEOBJ \\TEDIT.UNIQUIFY.CHARLOOKS CHARLOOKS.FROM.FONT) CL:CHAR-BIT (CL:ERROR) - FM.ENDEDIT (ERROR \\FM.ENDEDIT) \\NSRANDOM.WROTE.HANDLE (FILING.CALL FFETCHFIELD CONSTANT -\\FILING.ATTRIBUTE.TYPE.SEQUENCE ASSOC DREMOVE FREPLACEFIELD) FMAX (FLOAT ARG NUMBERP LIST) -CL:ALPHA-CHAR-P (CL:CHAR-CODE <= CONSTANT) TEDIT.ADD.MENUITEM (FFETCHFIELD SASSOC NCONC1 FRPLACA) -CL:UPPER-CASE-P (<= CONSTANT CL:CHAR-CODE) CL:LOWER-CASE-P (<= CONSTANT CL:CHAR-CODE) MOVD? (COPY -VIRGINFN GETD) \\BSP.GETNEXTBUFFER (SELECTQ \\BSP.PREPARE.INPUT BSP.INPUT.ERROR APPLY* FFETCHFIELD -\\DTEST \\BSP.PREPARE.OUTPUT RETFROM STKPOS ERROR SHOULDNT) \\TEDIT.NEUTRALIZE.PARALOOKS.MENU ( -FFETCHFIELD ADD1) GETPUPSTREAM (\\MAKEBASEBYTESTREAM \\DTEST LOCF \\ADDBASE IDIFFERENCE FFETCHFIELD) -|\\VFMBlankInterval| (|\\PFVolumeNumber| ELT SETA ARRAY SUB1 \\ALLOCBLOCK LRSH ADD1 MESASIZE PLUS) -SETYREL.IP (FFETCHFIELD FREPLACEFIELD + <=) \\IBMPEEKCCODEFN (\\XCCSPEEK \\PEEKBIN \\BIN IDIFFERENCE -\\NSIN.24BITENCODING.ERROR UNFOLD LLSH ACCESS-CHARSET LOGOR CL:VALUES \\RECODECCODE) LOADPOLY ( -FQUOTIENT SETA) \\DWOUT (LOGAND LRSH \\BOUT) RETDWIM1 (RETDWIM2 APPLY MAPCON LDIFF LIST NTHCHAR -SHOULDNT NLEFT) FLESSP (FGREATERP) TTRATOM (TTSKIPSEPR TTYINBUFFERSTREAM RATOM FFETCHFIELD) -\\TEXTCLOSEF (TEXTOBJ FFETCHFIELD ZEROP \\GETBASEPTR \\FIRSTNODE) \\EDIT.UPCARET (FFETCHFIELD -FREPLACEFIELD) \\PUTFIXP (NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR -CL::RATIO-DENOMINATOR) PROPNAMES (MAPLIST GETPROPLIST CAR CDDR) NCONC1 (NCONC FRPLACD CONS) U/L-CASE ( -CHECK.MARGIN FIND.NEXT.WORD SEGMENT.BIT.LENGTH U-CASECODE L-CASECODE TTNEXTCHAR TTADJUSTWIDTH -) -PUTPUPBYTE (\\PUTBASEBYTE \\DTEST LOCF \\ADDBASE) |\\VFMCreateIntervals| (ARRAYORIG ARRAYSIZE ARRAY) -ODDP (LOGAND CL:MOD) SETXYREL.IP (FFETCHFIELD FREPLACEFIELD + <=) EDITMOVENODE (WINDOWPROP PRIN1 -NODELST/AS/MENU CURSORPOSITION LOGAND) GETDEFN (FFETCHFIELD \\DEFCELL \\ATOMCELL) FREMAINDER ( -FDIFFERENCE FTIMES FLOAT FIX FQUOTIENT) POWEROFTWOP (SYSTEMTYPE LOGAND CONSTANT SUB1 EXPT POWEROFTWOP -RSH .2^NP.) SHOWREGION (MINUS) \\PUTSWAPPEDFIXP (NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP -IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR) %MAP-FOR-RESULT-MULTIPLE (CL:MAKE-LIST CL:LENGTH -MAKE-SEQUENCE-OF-TYPE) \\BSP.HANDLE.DATA (IDIFFERENCE FFETCHFIELD LOCF \\ADDBASE IPLUS PLUS) -TTUNREADBUF (FIRSTCHAR TTNEXTCHAR DELETE.TO.END) IMAX (ARG) RPAQ (SAVESET EVAL) SPY.INIT (\\ALLOCBLOCK - CL:* QUOTIENT) FASL::+LARGEST-FOUR-BYTE-INTEGER+ (CL:1- CL:EXPT) COMPILER::ALPHA-LABELS ( -COMPILER::MAKE-CHILD-ENV COMPILER::MAKE-LABELS CL:MAPCAR CL:FUNCTION) DO.INSERT.LINE (- DSPYPOSITION + - TTLASTLINE PLUS DSPXPOSITION DSPCLIPPINGREGION IPLUS SUB1) %MAP-FOR-EFFECT-MULTIPLE (CL:MAKE-LIST -CL:LENGTH) XCL::UNDOABLY-SETF-SYMBOL-FUNCTION (VIRGINFN /PUTD GETD) BSPFORCEOUTPUT (WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \\DTEST FFETCHFIELD) %MAP-SINGLE-FOR-EFFECT ( -%MAP-FOR-EFFECT-SINGLE) DELDEF (GETFILEPKGTYPE GETPROP LIST KWOTE /SETTOPVAL REMOVE GETTOPVAL -FILEPKGCOM FILEPKGTYPE SEARCHPRETTYTYPELST FASSOC /REMPROP) %MAP-SINGLE-TO-LIST ( -%MAP-FOR-RESULT-SINGLE) \\BSP.HANDLE.ACK (FFETCHFIELD LOCF \\ADDBASE LRSH IPLUS ITIMES IMAX IMIN LLSH -CLOCKDIFFERENCE \\SEARCH.OUTPUTQ FREPLACEFIELD IDIFFERENCE PLUS FASSOC) FIXSPELL (SETUPTIMER CHCON -U-CASE LIST FASSOC LISTGET1 UNPACK RESETVARS .RESETLST. CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION ELT APPLY* GENERATE MKATOM ADD1 CHOOZ FIXSPELL1 CHOOZ1 NCHARS) CL:FIND-PACKAGE (DECLARE -GETHASH MKSTRING) FIXLAMBDA (FIXSPELL) %MAP-FOR-RESULT-SINGLE (CL:LENGTH MAKE-SEQUENCE-OF-TYPE) -\\LOAD-STREAM (FULLNAME FILEPKGCHANGES FMEMB LIST SKIPSEPRCODES GET ROOTFILENAME CONS NCONC1 -\\CML-LOAD) %MAP-FOR-EFFECT (%MAP-FOR-EFFECT-SINGLE %MAP-FOR-EFFECT-MULTIPLE CONS) FTIMES (FLOAT ARG -ADD1 FTIMES) \\GETBASEFLOATP (\\FLOATBOX \\.GETBASE32) UNSAFE.TO.MODIFY (PRIN1 ASKUSER READ) ADDPROP ( -LIST GETPROPLIST CONS NCONC1) %MAP-TO-SIMPLE (%MAP-FOR-RESULT-SINGLE %MAP-FOR-RESULT-MULTIPLE CONS) -MSREHASH (IPLUS IQUOTIENT ITIMES HARRAYSIZE) FMIN (FLOAT ARG NUMBERP LIST) FM.EDITITEM (ERROR -\\FM.INSUREFM \\FM.COERCEITEMPTR \\FM.ITEMPROP FFETCHFIELD FM.GETITEM ADD.PROCESS) %SOME-MULTIPLE ( -CL:MAKE-LIST CL:LENGTH) MIN (ARG NUMBERP LIST) HASDEF (GETFILEPKGTYPE HASDEF GETPROP SELECTQ GETTOPVAL - SEARCHPRETTYTYPELST GETDEF CL:FIND-SYMBOL CONCAT GETD WHEREIS) %MAP-SINGLE-TO-SIMPLE ( -%MAP-FOR-RESULT-SINGLE) \\DECODEPRESSFACEBYTE (IDIFFERENCE LIST) TB.EXPANDFN (WINDOWPROP WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FFETCHFIELD IMAX TB.FIRST.VISIBLE.ITEM# -DSPCLIPPINGREGION TB.LAST.VISIBLE.ITEM# FREPLACEFIELD) %MAP-TO-LIST (%MAP-FOR-RESULT-SINGLE -%MAP-FOR-RESULT-MULTIPLE CONS) %NOTANY-MULTIPLE (CL:MAKE-LIST CL:LENGTH) -READ-UNICODE-MAPPING-FILENAMES (FINDFILE PACKFILENAME SASSOC CONCAT LIST) LOAD (RESETLST FMEMB -FIXSPELL ERROR CL:FIND-PACKAGE \\DTEST LIST OPENSTREAM \\LOAD-STREAM) TEDIT.STREAMCHANGEDP (TEXTOBJ -FFETCHFIELD \\TEDIT.ORIGINAL.WINDOW.TITLE) \\10MB.TURNONETHER (FFETCHFIELD LOCF \\ADDBASE) COMP.VALN ( -COMP.PROGN) \\BSPINIT (FUNCTION FREPLACEFIELDVAL NCREATE \\DEFINEDEVICE) EQUALN (EQP STREQUAL SELECTQ -EQUALN SUB1) SPY.ADD.ENTRY (LLSH PLUS SPY.OVERFLOW LITATOM \\LOLOC) PSCFONT.READFONT (OPENSTREAM CONS -READ FIND-READTABLE FRPLACA \\WIN IPLUS LLSH \\BIN ARRAY PLUS - L-CASE FILENAMEFIELD) COMPILER::ALPHA-IF - (COMPILER::MAKE-IF COMPILER::ALPHA-FORM) \\SPP.SYSPKT (FFETCHFIELD \\FILLINSPP LOCF \\ADDBASE LOGOR) -\\SEL.LINEDESC (FFETCHFIELD MKLIST) |\\PFReplaceString| (MKSTRING MIN NCHARS SUB1 %ARRAY-OFFSET -FFETCHFIELD %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN -\\GETBASEBYTE PLUS) CH.ADD.GROUP.PROPERTY (MAPCAR CH.CANONICAL.NAME COURIER.CALL CH.FINDSERVER -PARSE.NSNAME FIXP CH.PROPERTY FUNCTION CH.GETAUTHENTICATOR) \\IBMINCCODEFN (CL:VALUES \\RECODECCODE -\\XCCSIN \\BIN IDIFFERENCE \\NSIN.24BITENCODING.ERROR UNFOLD LLSH ACCESS-CHARSET LOGOR IMINUS) -PARAMETRICSPLINE (CONS LAST LENGTH ARRAY NUMBERP PLUS IDIFFERENCE FDIFFERENCE FQUOTIENT ELT SUB1 -FMINUS FTIMES FPLUS ADD1 IPLUS SETA) TEDIT.PUT.OBJECT (FFETCHFIELD GETFILEPTR LOGAND LRSH \\BOUT -IMAGEOBJPROP ADD1 IDIFFERENCE GETEOFPTR) %SOME-SINGLE (CL:LENGTH) FASL::DUMMY-HANDLE (FASL::MAKE-HANDLE - OPEN) WTFIX0 (WTFIX1) PACKAGE.NAME (\\UNCOPY \\GETBASEPTR) TB.SHRINKFN (TB.CLOSE/SHRINK) -\\LFINITCASEARRAY (COPYARRAY FFETCHFIELD PLUS) \\BSP.HANDLE.INTERRUPT (IDIFFERENCE FFETCHFIELD LOCF -\\ADDBASE PLUS RELEASE.PUP APPLY* \\FILLBSPPUP SUB1) FABS (\\FLOATBOX OPCODES) TTRUBOUT ( -BACKWARD.DELETE.TO TTNLEFT BEEP PREVLINE MOVE.TO.WHEREVER) SCALE.FONT (TIMES STRINGWIDTH) MAKEHASH ( -HASHARRAY FUNCTION) %EVERY-MULTIPLE (CL:MAKE-LIST CL:LENGTH) \\BOXFTIMES2 (LISPERROR NTYPX FFETCHFIELD - ADD1 IDIFFERENCE IGEQ LOLOC \\LOLOC FLOAT IPLUS LLSH LRSH LOGAND PLUS SUB1 \\INFINITY .ADDSMALL2. -.ADDSMALL3. \\MAKEFLOAT LOGXOR) SETX.IP (FFETCHFIELD DIFFERENCE <= FREPLACEFIELD) FM.EDITP (WINDOWPROP - \\FM.INSUREWINDOW ERROR) GRAPHEDITCOMMANDFN (SELECTQ MENU FREPLACEFIELDVAL NCREATE CONS EDITMOVENODE -EDITADDNODE EDITDELETENODE EDITADDLINK EDITCHANGEFONT EDITDELETELINK EDITCHANGELABEL -TOGGLE/DIRECTEDFLG TOGGLE/SIDESFLG EDITTOGGLEBORDER EDITTOGGLELABEL) FDIFFERENCE (OPCODES) -\\PUTBASEFLOATP (\\FLOATBOX \\.PUTBASE32 \\PUTBASEPTR \\FLOATUNBOX) TYPE.BUFFER (TTBOUT BLTCHAR -TTYDISPLAYSTREAM TTBITWIDTH PLUS) BRH/LAYOUT (IPLUS FRPLACA HALF LRSH CONS BRH/LAYOUT/DAUGHTERS LIST -IDIFFERENCE FRPLACD) SUBHASH (GETHASH DREMOVE) \\BOXFPLUSDIF (LISPERROR NTYPX FFETCHFIELD ADD1 -IDIFFERENCE IGEQ LOLOC \\LOLOC FLOAT IPLUS LLSH LRSH LOGAND PLUS SUB1 \\INFINITY .LRSHSTICKY. LOGOR -IMINUS .ADDSMALL2. .ADDSMALL3. .SUBSMALL. \\MAKEFLOAT) SETXY.IP (FFETCHFIELD <= FREPLACEFIELD) -FM.SHADE (ERROR \\FM.GROUPPROP LISTGET FASSOC WINDOWPROP \\FM.ITEMPROP FFETCHFIELD \\FM.INSUREFM -\\FM.COERCEITEMPTR FM.GETITEM BLTSHADE TEXTUREP) CL::STEP-SLEEP (CL:FUNCTION) TRACKNODE (TRACKCURSOR -NODELST/AS/MENU WINDOWPROP CURSORPOSITION) FPLUS (FLOAT ARG ADD1 FPLUS) FNTYP1 (GETHASH FNTYP) -FILECOMSLST (INFILECOMS? FILECOMS) CLISPFOR0 (APPEND GETPROP GETP CLISPFOR0A LIST FASSOC -\\DURATIONTRAN SELECTQ SHOULDNT GETDUMMYVAR CONS NCONC1 READLINE CLISPFORVARS CLISPFOR1 MAPCAR -RETDWIM2 CLISPLOOKUP CLISPFORF/L SUBST LISTGET1 EVAL SUBPAIR DWIMIFY1 COPY CLISPFORINITVAR FMEMB -WARNUSER CLISPFOR3 FLAST NCONC CLISPFOR2 MAPCONC DREVERSE LDIFF FRPLACA) RETDWIM (IPLUS IDIFFERENCE -CLOCK LISTGET1 LIST FIXLISPX/ CONS DWIMIFY1? /RPLNODE APPLY RETDWIM2) FGREATERP (OPCODES) -TB.FLUSH.WINDOW (FUNCTION FFETCHFIELD CL:FUNCALL FREPLACEFIELD OPENWP WINDOWPROP) COERCETEXTOBJ ( -FFETCHFIELD TYPENAMEP SELECTQ ALLOCSTRING \\GETBASEPTR \\FIRSTNODE PLUS ZEROP SUBSTRING -\\TEDIT.REOPEN.STREAM BIN IDIFFERENCE OPENP OPENSTREAM OPENFILE TEDIT.PUT.PCTB \\GETSTREAM CONS) -\\EDIT.DOWNCARET (FFETCHFIELD DSPXPOSITION DSPYPOSITION \\CARET.FLASH?) \\SEARCHINTERPRESSFONTS ( -\\SEARCHFONTFILES) TERM.MOVETO (\\DTEST FFETCHFIELD MOVETO IMIN ITIMES - FREPLACEFIELD IMAX) -\\INIT.ETHER.BUFFER.POOL (FFETCHFIELD IDIFFERENCE CEIL LOGAND IPLUS CONSTANT SUB1 ITIMES LOGXOR -EMPOINTER \\VAG2 IMIN IQUOTIENT SELECTC \\LOLOC \\ADDBASE PLUS) COMP.VAL1 (COMP.PROG1) \\SETRTPPORTS ( -\\BLT LOCF \\ADDBASE ITIMES) HASH-LEFT-PAD-INITIAL-CONTENTS (- LENGTH APPEND CL:MAKE-LIST LAST CL:ERROR -) FASL::+SMALLEST-FOUR-BYTE-INTEGER+ (- CL:EXPT) COMPILER::ALPHA-IL-FUNCTION (COMPILER::ALPHA-LITERAL -COMPILER::ALPHA-FUNCTION COMPILER::MAKE-CALL LIST) MAPRINT (RESETVARS .RESETLST. LIST CONS -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) LCSKIP (PEEKCCODE READ BINSKIP GETPROP APPLY*) -TTCOMPLETEWORD (CURRENT.WORD FIND.MATCHING.WORD ADD1 PLUS SELECTC \\SYNCODE GETHASH FFETCHFIELD -\\GETBASEBYTE FIRSTCHAR TTNEXTCHAR NCHARS INPART SUB1 FNTH CHCON NTHCHARCODE LOGXOR CL:SYMBOL-PACKAGE -FIXP TTBITWIDTH - + SEGMENT.BIT.LENGTH TTADJUSTWIDTH) \\BSP.HANDLE.INTERRUPTREPLY (FFETCHFIELD LOCF -\\ADDBASE \\SEARCH.OUTPUTQ PLUS RELEASE.PUP) PUTDEFN (\\DEFCELL \\ATOMCELL FILECODEBLOCK FOLDHI LRSH -IPLUS CODELT2 LOGOR LLSH CODELT \\BYTELT ADD1 FILEARRAYBASE LOGAND \\LOLOC LOCAL FUNCTION MODUP -IDIFFERENCE SUB1 IMOD) FIXEDITDATE (EDITDATE) CL:GET-DISPATCH-MACRO-CHARACTER (ASSOC FFETCHFIELD) -\\BOXFQUOTIENT (LISPERROR NTYPX FFETCHFIELD ADD1 IDIFFERENCE IGEQ LOLOC \\LOLOC FLOAT IPLUS LLSH LRSH -LOGAND PLUS SUB1 \\INFINITY .SUBSMALL. .LLSH1. LOGOR \\MAKEFLOAT LOGXOR ERROR) FILEMAP (PUTFILEMAP -FULLNAME GETSTREAM) PUTPUPWORD (\\PUTBASE \\DTEST LOCF \\ADDBASE) NLIST (CONS ARG SUB1) GETPUPBYTE ( -\\GETBASEBYTE \\DTEST LOCF \\ADDBASE) FIND-MACRO-FUNCTION (CL-UNWRAP-MACRO IL-WRAP-MACRO) ADDSPELL ( -SELECTQ ADDSPELL1 ERROR) |\\LFCreateDirectories| (ARRAYORIG ARRAYSIZE ARRAY) CL:GET-MACRO-CHARACTER ( -GETSYNTAX CL:CHAR-CODE CL:VALUES FIND-MACRO-FUNCTION) /SETTOPVAL (ERRORX LIST GETTOPVAL SETTOPVAL) -MKLIST (LIST) DO-DISPATCH-MACRO (ASSOC FFETCHFIELD CL:ERROR ILEQ READCCODE + TIMES - CL:CHAR-UPCASE -CL:CODE-CHAR CL:FUNCALL) ADDHASH (GETHASH FMEMB LIST) \\BIGNUM.TO.FLOAT (\\BN.FLOAT \\BN.FROM.FIXP) -FM.REDISPLAYMENU (ERROR \\FM.REDISPLAYMENU) \\INFINITY (FLOATP \\FLOATBOX \\VAG2 LOGOR LLSH PLUS SUB1) - CL:MAKE-DISPATCH-MACRO-CHARACTER (SETSYNTAX CL:CHAR-CODE) MAX (ARG NUMBERP LIST) ADDFILE ( -ROOTFILENAME ADDFILE0 CONS LIST GETTOPVAL SEARCHPRETTYTYPELST INTERSECTION ASSOC) %NOTEVERY-MULTIPLE ( -CL:MAKE-LIST CL:LENGTH) CL:SET-MACRO-CHARACTER (SETSYNTAX CL:CHAR-CODE) PUTFILEMAP (REMHASH GETHASH -CONS ROOTFILENAME FRPLACA MAKE-READER-ENVIRONMENT FRPLACD PUTHASH) LISPXREADP (LISPXREADBUF PEEKC -CONSTANT CHARACTER) CL:SET-SYNTAX-FROM-CHAR (SETSYNTAX CL:CHAR-CODE GETSYNTAX) |\\VFMCorrectBufferP| ( -FFETCHFIELD EQL) CL:SET-DISPATCH-MACRO-CHARACTER (CL:ERROR CL:CHAR-UPCASE ASSOC FFETCHFIELD LIST CONS -FRPLACD) \\TEXTBIN (FFETCHFIELD IMAGEOBJPROP PLUS \\BIN LOGOR UNFOLD LLSH \\PAGEDBIN -\\TEDIT.TEXTBIN.NEW.PAGE FREPLACEFIELD APPLY* \\TEDIT.APPLY.PARASTYLES \\TEDIT.APPLY.STYLES ERROR) -\\TEXTBOUT (FFETCHFIELD ADD1 \\TEXTGETFILEPTR ADDBASE \\ADDBASE %ARRAY-BASE LRSH %ARRAY-OFFSET IPLUS -LOGAND FREPLACEFIELD) DINFO.TOGGLE.GRAPH (WINDOWPROP FFETCHFIELD) PROMPTCHAR (LISPXREADBUF ADD1 -IDIFFERENCE ERSETQ EVAL) COMP.FLOATBOX (COMP.DELFN COMP.STFN) \\FILLRTPPUP (ALLOCATE.PUP LOCF -\\ADDBASE FFETCHFIELD) SMASHFILECOMS (FILECOMSLST) \\DO-DEFINE-FILE-INFO (SELECTQ EVAL CL:FIND-PACKAGE - ERROR \\DTEST FIND-READTABLE \\CHECKRADIX \\INVALID.RADIX FREPLACEFIELDVAL NCREATE) \\SLOWRETURN ( -\\MYALINK OPCODES ADDSTACKBASE \\VAG2 IDIFFERENCE FFETCHFIELD FREPLACEFIELD) \\IBMOUTCHARFN ( -\\FILEOUTCHARFN \\RECODECCODE) \\10MB.LOADINPUTQ (FFETCHFIELD LOCF \\ADDBASE PLUS) \\MAKEFLOAT (FLOATP - \\FLOATBOX \\VAG2 LOGOR LLSH PLUS FREPLACEFIELD IDIFFERENCE LOGAND SUB1 LISPERROR \\MAKEFLOAT IPLUS -.LRSHSTICKY. LRSH ADD1 \\INFINITY) SPY.END.ENTRY (SPY.ADD.ENTRY) COMPILER::ALPHA-GO (CL:ASSOC -COMPILER::MAKE-GO) ZEROD.FETCHFN (SLICEREF) \\SEL.LIMIT (FFETCHFIELD SUB1) \\MATMULT144 (FPLUS FTIMES -\\GETBASEFLOATP PLUS) LISPXREADBUF (ADD1 SUB1 NCONC COPY LIST CONS LISPXREADBUF) ZEROD.STOREFN ( -SLICESET) \\MATMULT331 (ITIMES FPLUS FTIMES \\GETBASEFLOATP PLUS) UTOXCODE (UNICODE.TRANSLATE CL:SVREF - LRSH FASSOC LOGAND UNICODE.UNMAPPED) LISPXTERPRI (LIST CONS TERPRI) LISPXPUT (FMEMB NCONC LIST) -\\MATMULT441 (ITIMES FPLUS FTIMES \\GETBASEFLOATP PLUS) MOVE.FORWARD.TO (IPLUS SEGMENT.BIT.LENGTH -CHECK.MARGIN) MOVETO.IP (APPENDOP.IP) FIND.NON.SPACE (FMEMB FIRSTCHAR TTNEXTCHAR) FILEPKGCHANGES ( -FILEPKGCHANGES CONS LIST ARG SEARCHPRETTYTYPELST GETTOPVAL /SETTOPVAL) \\DSKDISPLAY.RESHAPEFN ( -WINDOWPROP CONS) TTNTHLINE (SUB1) \\CML-LOAD (CL:FIND-PACKAGE FULLNAME CL:READ CL:EVAL GETFILEPTR) -DECREASING.FONT.LIST (MAPCAR FONTCREATE) FASL:PROCESS-FILE (CL:FUNCTION FASL:CHECK-VERSION) LISPXPRIN1 - (LIST CONS PRIN1) SETXREL.IP (FFETCHFIELD FREPLACEFIELD + <=) \\STRINGIN (\\SMALLPIN SUB1 LLSH -IDIFFERENCE ALLOCSTRING ZEROP READCCODE PLUS) \\BSP.HANDLE.ERROR (FFETCHFIELD LOCF \\ADDBASE LIST PLUS - BSP.OTHERFN RELEASE.PUP APPLY*) \\MATMULT333 (IPLUS FPLUS FTIMES \\GETBASEFLOATP PLUS) \\FLOAT ( -FLOATP SELECTC NTYPX FFETCHFIELD ADD1 IDIFFERENCE \\MAKEFLOAT IPLUS \\LOLOC \\BIGNUM.TO.FLOAT -FQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR CL:ERROR) \\CURVE2 (ARRAY FFETCHFIELD ELT -\\GETCOLORBRUSH MAXIMUMCOLOR DSPCOLOR OPPOSITECOLOR \\GETBRUSH \\GETBRUSHBBT SUB1 IDIFFERENCE ITIMES -DSPDESTINATION \\TOTOPWDS \\DSPTRANSFORMX IPLUS LRSH \\DSPTRANSFORMY ADD1 FOLDLO IMAX IABS IMINUS -UNFOLD LLSH FQUOTIENT FTIMES FPLUS CONSTANT \\GETBASE POLYEVAL \\FLOATBOX OPCODES PLUS) -COURIER.READ.BULKDATA (NCONC GETWORD IPLUS LLSH \\BIN COURIER.READ.SEQUENCE) CLISPATOMIS2 (APPEND) -ROOTFILENAME (U-CASE NAMEFIELD FULLNAME) FILECREATED (NCONC1 FILECREATED1 ROOTFILENAME LIST CONS) -\\TEDIT2 (FFETCHFIELD TEXTPROP COERCETEXTOBJ) \\MATMULT133 (FPLUS FTIMES \\GETBASEFLOATP PLUS) COERCE -(CL:CHARACTER CL:FUNCTION FLOAT COMPLEX COERCE CL:REALPART CL:IMAGPART CL:MAP CL:ERROR) -DINFO.TOGGLE.MENU (WINDOWPROP DINFO.UPDATE.MENU.DISPLAY FFETCHFIELD CLOSEW) EDITE (EDITMODE INSPECT -CL:FUNCALL GET) \\BITMAPTOSCREEN (FFETCHFIELD) TTNLEFT (TTNEXTCHAR) HASH-A (CL:READ CL:MAKE-ARRAY -ESTIMATE-DIMENSIONALITY) \\CREATEINTERPRESSFONT (\\COERCEASCIITONSFONT EVAL) READLINE (CHCON1 PEEKC -NCONC1 READ APPLY* LASTC EDITE SETN GETFILEPTR LISPXREADBUF) \\ARBIN (\\SMALLPIN SUB1 LLSH IDIFFERENCE - OPENSTRINGSTREAM \\STRINGIN READ) REDISPLAYGRAPH (DISPLAYGRAPH WINDOWPROP DSPCLIPPINGREGION) -CREATEMENUEDWINDOW (FREPLACEFIELDVAL NCREATE CONS TYPENAMEP LENGTH FFETCHFIELD MENUWINDOW BITMAPWIDTH -CHECK/MENU/IMAGE BITMAPHEIGHT PLUS FONTPROP DEFAULTFONT TIMES GETREGION IMAX \\ILLEGAL.ARG FRPLACA -IDIFFERENCE CREATEW) \\BSP.TIMERFN (FFETCHFIELD LIST CLOSERTPSOCKET \\RTP.ACTION \\SEARCH.OUTPUTQ PLUS - \\FILLBSPPUP \\SETBSPTIMEOUT) TEDIT.FIND.OBJECT (TEXTOBJ \\GETBASEPTR \\FIRSTNODE FFETCHFIELD PLUS) -SLICESET (ARG FFETCHFIELD ASET IPLUS PLUS ITIMES) CLISPATOMARE1 (LIST SELECTQ CLISPATOMARE1 NCONC1) -LOOKUP-SYMBOL (\\GETBASEPTR FFETCHFIELD ADD1 IREMAINDER IDIFFERENCE \\GETBASEBYTE SYMBOL.PNAME -\\GETBASE STREQUAL IPLUS) IMIN (ARG) CLEARPUP (\\DTEST FREPLACEFIELD LOCF \\ADDBASE \\ZEROBYTES SUB1) -HASH-B (READNUMBERINBASE) FQUOTIENT (OPCODES) REOPENTEXTSTREAM (FUNCTION) FLOATP.TO.BCPL (FLOATP FLOAT - IPLUS FFETCHFIELD LRSH LOGAND CREATECELL IMINUS) READFILE (DECLARE) BCPL.TO.FLOATP (IMINUS FPLUS -FFETCHFIELD IDIFFERENCE LLSH LRSH LOGAND \\FLOATBOX \\VAG2 LOGOR PLUS) TESTRELATION (PARSERELATION -FMEMB GETTABLE TESTTABLE) SHRINKBITMAP (BITSPERPIXEL BITMAPHEIGHT BITMAPWIDTH BITMAPCREATE IQUOTIENT -SUB1 PLUS) COMPILER::ALPHA-FUNCTION (COMPILER::CONTEXT-APPLIED-CONTEXT) FM.REDISPLAYITEM (ERROR -\\FM.INSUREFM \\FM.COERCEITEMPTR \\FM.ITEMPROP FFETCHFIELD FM.GETITEM \\FM.DISPLAYBITMAP LISTGET -BITBLT) \\TEDIT.STRIKEOUT.CARET.OFF (\\TEDIT.PARSE.CHARLOOKS.LIST FFETCHFIELD) -\\LEAF.REPAIR.BROKEN.PUP (FFETCHFIELD LOCF \\ADDBASE LIST) BKSYSBUF.GENERAL (TYPENAME SELECTQ BKSYSBUF - RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \\HILOC \\LOLOC) -XTOUCODE (UNICODE.TRANSLATE CL:SVREF LRSH FASSOC LOGAND UNICODE.UNMAPPED) TB.CLOSEFN (TB.CLOSE/SHRINK) - HASH-COLON (CL:MAKE-SYMBOL READ-EXTENDED-TOKEN) LINETO.IP (FIXR APPENDOP.IP) TTYIN.BALANCE (TTSKREAD -\\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE FIRSTCHAR AT.END.OF.TEXT) FILEDATE (NLSETQ RESETLST OPENP -GETFILEPTR LIST OPENSTREAM FASL-FILEDATE) TEDIT.FIND.OBJECT.SUBTREE (FFETCHFIELD -TEDIT.FIND.OBJECT.SUBTREE) FILE-NAME (FULLNAME MKSTRING) \\NSRANDOM.HANDLE.ERROR (SELECTQ FFETCHFIELD -\\NSRANDOM.REESTABLISH \\NSRANDOM.PROCEEDABLE.ERROR LIST FULLNAME PRINTOUT PRIN1 COURIER.SIGNAL.ERROR) - REMPROPLIST (GETPROPLIST NLEFT) %NUMERIC-STRING-P (SUB1 %ARRAY-OFFSET FFETCHFIELD %ARRAY-BASE IPLUS -%ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE) DINFO.TOGGLE.TEXT ( -WINDOWPROP FFETCHFIELD PROMPTPRINT RELEASE.MONITORLOCK) \\FAST4BIT (\\ADDBASE IGREATERP ELT -FFETCHFIELD PLUS) \\CREATE.TTY.OUTCHARFN (\\OUTCHAR \\CREATE.TTYDISPLAYSTREAM) TTNTH (TTNEXTCHAR) -ONEDINSPECTW.CREATE (MAKE-INSPECTOR-PROFILE DEFAULTFONT DSPFONT XCL::PROFILIZE CL:PROGV -XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES APPLY* GET-ONED-DISPLAYW GET-RIGHTW GET-TITLEW WINDOWPROP -ONEDINSPECT.ARRANGEWINDOWS FUNCTION) %PRINT-PATHNAME (DECLARE CL:FORMAT CL:NAMESTRING) /PUT (LIST -GETPROPLIST CONS) SETSPACE.IP (APPENDOP.IP) |\\PFFetchString| (ALLOCSTRING MIN \\GETBASE NCHARS -\\GETBASEBYTE SUB1 PLUS) HASH-DOT (CL:EVAL CL:READ EVAL) SIZE/GRAPH/WINDOW (GRAPHREGION CREATEW -GETBOXREGION WIDTHIFWINDOW IMIN IMAX FIXR HEIGHTIFWINDOW IDIFFERENCE WXOFFSET IPLUS LRSH WINDOWPROP -WYOFFSET) \\COMMONBACKCHARFN (UNFOLD LLSH ACCESS-CHARSET PLUS \\BACKXCCSCHAR) UNSAVED1 (GET CONCAT -FNCHECK) \\ITEMW.FLIPCOPY (BLTSHADE) ENUM-STRING (CL:MACROLET CL:LENGTH CL:FILL-POINTER - -WITH-RESOURCES \\CONVERTNUMBER ABS GETRESOURCE NEWRESOURCE ALLOCSTRING CONCAT) -%DIRECTORY-COMPONENT-EQUAL (%DIRECTORY-COMPONENT-TYPE CL:EQUAL %DIRECTORY-COMPONENT-PATH) FIND.SYMBOL -(LOCAL FFETCHFIELD IPLUS IREMAINDER LOGXOR RSH LOOKUP-SYMBOL \\GETBASEPTR CL:VALUES RPLACD) -TB.CLOSE/SHRINK (RESETLST WINDOWPROP FFETCHFIELD CL:FUNCALL PRIN1) MAKEFLOATNUMBER (NCREATE) -DMCHAT.HANDLE.WRAP (FFETCHFIELD DMCHAT.NEWLINE FREPLACEFIELD) BSP.PUTINTERRUPT (\\DTEST FFETCHFIELD -WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SETUPTIMER ALLOCATE.PUP IPLUS LOCF -\\ADDBASE) %INITIALIZE-DEFAULT-PATHNAME (DECLARE CL:PARSE-NAMESTRING FILENAMEFIELD %PATHNAME-VERSION) -APPENDINTEGER.IP (APPENDINT.IPMACRO SUB1 LOADBYTE LOGAND LSH IMINUS UNFOLD LLSH MASK.1\'S PLUS IPLUS -BYTESININT.IP) AT.END.OF.TEXT (FMEMB FIRSTCHAR TTNEXTCHAR) CLISPATOMARE2 (LIST APPEND CLISPATOMARE2 -CONS) \\QUEUE.INPUT.IOCB (FFETCHFIELD SUB1 \\HILOC \\LOLOC EMPOINTER \\VAG2 RAID UNFOLD LLSH -\\D0.CONTROLLERBITS LOGOR) \\FM.EDIT-UPDATEAFTERDELETE (IPLUS IDIFFERENCE BITMAPWIDTH FONTPROP BITBLT) - PARSE-NAMESTRING1 (CONS SUB1 LITATOM CL:STRINGP NUMBERP FFETCHFIELD LIST NTHCHARCODE \\UPF.NEXTPOS -DREVERSE IPLUS LASTCHPOS PLUS SELCHARQ ADD1 STRPOS NTHCHAR) MAPRELATION (NARGS PARSERELATION MAPTABLE -FUNCTION) COMPILER::ALPHA-FUNCTIONAL-FORM (CL:FIRST CL:SECOND COMPILER::ALPHA-FUNCTION COMPILER:MAKE-CONTEXT - COMPILER::ALPHA-FORM) BOOTSTRAP-NAMEFIELD (STRPOS ADD1 SUB1 NTHCHARCODE SUBATOM) \\FILLINSPP ( -\\ALLOCATE.ETHERPACKET LOCF \\ADDBASE) FM.RESETGROUPS (ERROR WINDOWPROP \\FM.REDISPLAYMENU) -\\TEDIT.STRIKEOUT.CARET.ON (\\TEDIT.PARSE.CHARLOOKS.LIST FFETCHFIELD) EXPANDING-PAGEFULLFN ( -WINDOWREGION TIMES WINDOWPROP - DSPLINEFEED + IMAX CONS) DECLARE\:1 (EVAL) \\FM.EDIT-STRINSERT (CONCAT - SUBSTRING SUB1 NCHARS) HASH-PLUS (CL:READ CL:VALUES) PARSERELATION1 (APPLY* SELECTQ FUNCTION ERROR -PARSERELATION1 MSVBTABLES GETWORDTYPE FASSOC GETHASH) COMPILER::ALPHA-EVAL-WHEN (CL:FUNCTION -COMPILER::ALPHA-PROGN) DECLARE\: (DECLARE\:1) %PRINT-DIRECTORY-COMPONENT (DECLARE -%DIRECTORY-COMPONENT-PATH CL:FORMAT) FM.RESETSHAPE (ERROR WINDOWPROP SHAPEW CREATEREGION WIDTHIFWINDOW - HEIGHTIFWINDOW) \\TEDIT.UNDERLINE.CARET.OFF (\\TEDIT.PARSE.CHARLOOKS.LIST FFETCHFIELD) HASH-O ( -READNUMBERINBASE) DEFINE-FILE-INFO (GETFILEPTR SET-READER-ENVIRONMENT \\DO-DEFINE-FILE-INFO) ENDFILE ( -CLOSEF) RESETBUFS (CLBUFS APPLY) UPDATEFILEMAP (CONCAT RATOM READCCODE GETFILEPTR IDIFFERENCE FFILEPOS - FIX TIMES NCHARS CLOSEF NLSETQ OPENSTREAM RESETSAVE LIST SETFILEPTR PRIN3 POSITION CONSTANT PRIN2 -PRIN1 TERPRI PRINT PRINTNUM) CLOSE-AND-MAYBE-DELETE (CLOSEF DELFILE) FIND.PACKAGE (LOCAL MKSTRING -STRINGHASHBITS LOGAND FFETCHFIELD LOGOR LOGXOR LRSH IMIN \\ADDBASE4 \\ADDBASE \\ADDBASE2 V\\UNCOPY -IPLUS16 \\LOLOC) HASH-ILLEGAL-HASH-CHAR (CL:ERROR) HASH-QUOTE (LIST CL:READ) DMCHAT.ADDRESS (SELCHARQ -FFETCHFIELD LOGXOR) BEEP (RESETFORM VIDEOCOLOR DISMISS) DINFO.TOGGLE.HISTORY (WINDOWPROP -DINFO.UPDATE.HISTORY FFETCHFIELD CLOSEW) BLTPATTERN.GENERIC (BITMAPWIDTH BITMAPHEIGHT MIN - +) -\\TTY.CREATING.DISPLAYSTREAM (DSPCREATE BITMAPCREATE FUNCTION) SLICEDIMENSION (FNTH FFETCHFIELD ADD1) -PRETTYCOMPRINT (LISPXPRINT) HASH-STAR (DECLARE PEEKC CL:READ CL:ERROR FINISH-READING-BITMAP -READ-EXTENDED-TOKEN NCHARS CL:MAKE-ARRAY SELCHARQ NTHCHARCODE) CL:VECTOR-PUSH-EXTEND (CL:VECTOR-PUSH + - CL:ARRAY-TOTAL-SIZE CL:ERROR) HASH-COMMA (CL:READ COMPILER::MAKE-EVAL-WHEN-LOAD CL:EVAL EVAL) -|\\LFExtendFile| (|\\PFGetVol| FFETCHFIELD |\\PFNewPages| MAX IPLUS FREPLACEFIELDVAL NCREATE -|\\LFUpdateLeaderPage|) %MAKE-PATHNAME (%%MAKE-PATHNAME) EDITGRAPH1 (CONS SIZE/GRAPH/WINDOW FUNCTION) -ATTACHMENU (MENUWINDOW FMEMB) \\MAKERECODEMAP (CL:MAKE-ARRAY CL:SVREF LOGAND) HASH-R (READNUMBERINBASE - CL:ERROR) TEDIT.EDIT.OBJECT (FFETCHFIELD SHOULDNT TEDIT.FIND.OBJECT ADD1 IMAGEOBJPROP) FNUM-STRING ( -CL:MACROLET CL:LENGTH + CL:FILL-POINTER -) HASH-X (READNUMBERINBASE) CLISPCAR/CDR2 (STKEVAL SUB1) -PUTPROPS (MAP PUTPROP CDDR) SI::CANONICALIZE-ADVICE-WHEN-SPEC (CL:INTERN STRING) \\TEDIT.PAPERWIDTH ( -\\TEDIT.PAPERHEIGHT SELECTQ ASSOC \\ILLEGAL.ARG) HASH-VBAR (HASH-NO-PARAMETER-ERROR CL:VALUES) -HASH-LEFTPAREN (CL:READ-DELIMITED-LIST LIST LENGTH CL:MAKE-ARRAY LAST CL:AREF CL:ERROR) HASH-MINUS ( -CL:READ CL:VALUES) DOWINDOWCOM (ARG WINDOWPROP APPLY* \\CARET.DOWN MENU CONS FUNCTION FREPLACEFIELDVAL - NCREATE DOBACKGROUNDCOM) TB.PROCESS (ADD.PROCESS) CL:VECTOR-PUSH (FFETCHFIELD CL:ERROR) HASH-EQUAL ( -CL:VALUES CONS CL:READ) TERM.PRINTCHAR (\\DTEST FFETCHFIELD \\CHARSET LRSH \\DSPGETCHARIMAGEWIDTH -\\GETBASE \\DSPGETCHARWIDTH + - FREPLACEFIELD CL:FUNCALL TERM.NEWLINE MOVETO) MOVE.TO.WHEREVER ( -MOVE.TO.LINE FIND.LINE) \\10MB.STARTDRIVER (\\INIT.ETHER.BUFFER.POOL NCREATE TIMES FFETCHFIELD -\\ALLOCATE.ETHERPACKET ADD.PROCESS LIST KWOTE) \\FM.EDIT-STRDELETE (CONCAT SUBSTRING SUB1 ADD1 NCHARS) - FASL-FILEDATE (BIN FASL::CONVERT-FASL-DATE FASL:PROCESS-FILE CL:FUNCTION) HASH-STRUCTURE-LOOKUP (MEMQ -) DWIMIFY1 (DWMFY1) COMPILER::ALPHA-FLET (COMPILER::MAKE-CHILD-ENV) FM.RESETMENU (ERROR WINDOWPROP -FM.RESETSTATE \\FM.REDISPLAYMENU) \\TEDIT.UNDERLINE.CARET.ON (\\TEDIT.PARSE.CHARLOOKS.LIST FFETCHFIELD -) \\LEAF.USE.NEW.CONNECTION (FFETCHFIELD LOCF \\ADDBASE LIST CONS LOGAND CONSTANT LOGOR DREMOVE UNION -TERPRI \\PAGED.REVALIDATEFILES KWOTE) DWIMIFY0? (DWMFY0) FLTINTLOG (DECLARE CL:AREF IPLUS PLUS) -GETPROMPTWINDOW (WINDOWPROP FONTCREATE DSPFONT FUNCTION WINDOWREGION STRINGWIDTH IQUOTIENT IPLUS SUB1 -FIXP CREATEW HEIGHTIFWINDOW TIMES FONTPROP CONS) CMLREADSEMI (READCCODE CL:VALUES) CLISPATOMIS1 ( -SELECTQ CONS MAPCAR CLISPATOMIS1 SUBLIS NEGATE) OLD.FIND.SYMBOL (SUB1 IPLUS \\GETBASEFAT \\GETBASE -PLUS UNLESSRDSYS \\GETBASETHIN \\GETBASEBYTE \\ADDBASE IDIFFERENCE \\PARSE.NUMBER LOGAND LLSH ADD1 -IPLUS16 \\LOLOC FFETCHFIELD ITIMES \\PROPCELL \\ATOMCELL CONSTANT ATOM.HASH.REPROBE LOGOR LOGXOR -UNINTERRUPTABLY \\CREATE.SYMBOL \\PUTBASE \\ATOMPNAMEINDEX NTYPX SHOULDNT) CLISPEXPANSION (CL:VALUES -COPY GETHASH) SI::CANONICALIZE-ADVICE-SYMBOL (STRPOS LIST SUBATOM CL:1- +) NODECREATE (FONTNAMELIST -CONS) \\TEDIT.PAPERHEIGHT (\\TEDIT.PAPERWIDTH SELECTQ ASSOC) \\SEARCHPRESSFONTS (RESETLST \\GETSTREAM -LIST GETFILEPTR OPENSTREAM UNION \\GETPRESSFONTNAMES) EXPANDBM (NUMBERP BITMAPWIDTH BITMAPHEIGHT IMIN -CL:* IMAX + IQUOTIENT SUB1 PLUS EQL LSH - ZEROP) TILE (BITMAPWIDTH BITMAPHEIGHT PLUS) +SI::FUNCTION-WRAPPER-INFO (GETD SI::NAMED-FUNCTION-WRAPPER-INFO) COMPPRINT (PRIN1) COMP.PROGN ( +COMP.EXP1 OPT.JUMPCHECK) OVERFLOW? (IPLUS MOVE.TO.NEXT.LINE BREAKLINE) FB.COMMANDSELECTEDFN (RESETLST +WINDOWPROP WFROMMENU CL:FUNCALL FLASHWINDOW) ONEDINSPECT.ARRANGEWINDOWS (WINDOWPROP HEIGHTIFWINDOW +FONTPROP ONEDINSPECT.PROPWIDTH WIDTHIFWINDOW IPLUS STRINGWIDTH IMIN ITIMES LENGTH IDIFFERENCE SUB1 +GETBOXREGION DIFFERENCE PLUS ADD1 CONS CREATEREGION) REALSTKNTH (\STACKARGPTR IMINUS SUB1 \MAKESTACKP) + SI::CHANGE-CALLS-IN-CCODE (MAPC CHANGECCODE CODEBASESETATOM) CLEAR.LINE? (ERASE.TO.END.OF.PAGE +ERASE.TO.END.OF.LINE) LISPXFIND1 (CONS APPEND) GETVERBTABLES (MAPCAR MSVBTABLES SHOULDNT LIST FASSOC) +SI::PARSE-CL-ARGLIST (CL:VALUES CL:REVERSE) INITIALIZEMASTER.IP (NTHCHARCODE PLUS \BOUT) +SI::CHANGE-CALLS (GET GETD) MOVETOUPPERLEFT (FONTPROP DSPFONT IDIFFERENCE DSPLEFTMARGIN +DSPCLIPPINGREGION) \INSPECT.STORE.16 (LIST \GETBASE \PUTBASE) SI::HAS-CALLS (GET CL:CONSP GETD CL:FIND + CALLSCCODE) SHADEGRIDBOX (FIXP IPLUS LEFTOFGRIDCOORD BOTTOMOFGRIDCOORD IDIFFERENCE ITIMES +MAXIMUMCOLOR BITSPERPIXEL DSPDESTINATION) DECLARERECORD (CL:MEMBER RECORD.NAME RECORDECL COPY SOME +LIST CONS RECORD.FIELDNAMES RECORD.ALLOCATIONS EVAL UNION) SEDIT::ASSIGN-FORMAT-LITATOM (\DTEST) +\READREFILL (STREAMPROP CL:FUNCALL STKNAME) ATOMRECORD (DECLARERECORD CONS) DELETETO ( +BACKWARD.DELETE.TO BLTCHAR TTYDISPLAYSTREAM SEGMENT.BIT.LENGTH IDIFFERENCE) LISPXFIND (RESETVARS +.RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SUB1 LISPXFIND NCONC LISPXFIND0 + LDIFF FMEMB LISPXPUT SELECTQ MAPCONC APPEND LISPXGETINPUT LISTGET1 LAST MAPCAR LISPXFIND1) CL:NOTEVERY + (%%NOTEVERY-SINGLE %%NOTEVERY-MULTIPLE CONS) COMPILER::RELEASE-CALL (COMPILER::RELEASE-TREE COMPILER::CALL-FN + CL:MAPC CL:FUNCTION COMPILER::CALL-ARGS) SI::RESTORE-CALLS (MAPC GET) COMP.TRANSFORM (COMPILER:MAKE-CONTEXT + SELECTQ OPT.COMPILERERROR GETMACROPROP COMP.MACRO GET COMP.EXP1 CL:FUNCALL COMP.CALL COMP.ARGTYPE) +EDITCHANGEFONT (WINDOWPROP PRIN1 READ/NODE printout TERPRI) BESTPUPADDRESS (ASSURE.PUP.READY +\FIXLOCALNET CONS \PARSE.PORTCONSTANT \LOCALPUPNETNUMBER LRSH LIST GETHASH PUTHASH \LOOKUPPORT +\LOCATE.PUPNET PLUS PRIN1) CL:EVAL-WHEN (MAPC \EVAL) DMCHAT.STATE (FUNCTION) SI::ADD-CHANGED-CALL ( +CL:FIRST CONS CL:SECOND CL:DELETE LIST) HISTORYSAVE (FMEMB LIST NCONC1 CONS ADD1 IPLUS MINUS +LISPXFIND1 FRPLACD ERSETQ EVAL) \VALIDADDRESSP (\LOOKUPPAGEMAP) \NSFILING.MAYBE.CREATE (ASKUSER CONCAT + CONCATLIST MAPCONC LIST \NSFILING.CONNECT FILING.CALL SELECTQ LIST* STRING) \APPLYREADMACRO (APPLY*) +FILEBLOCKTRAILER (BOUT16) TTCRLF (TTCRLF.ACCOUNT) UNDOLISPX2 (FMEMB FRPLACA UNDOLISPX3 LISPXWATCH +REVERSE UNDOLISPX2) INSPECTW.REPAINTFN (WINDOWPROP XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES +XCL::PROFILE-VALUES DSPCLIPPINGREGION APPLY* ITEMW.REPAINTFN \ITEMW.FLIPITEM) INTERSECTREGIONS (SUB1 +PLUS TIMES ARG IPLUS ADD1 IDIFFERENCE) LLSH (LRSH IMINUS NTYPX \LOLOC \FIXP.FROM.FLOATP IQUOTIENT +CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR IDIFFERENCE IPLUS LLSH LOGAND .LLSH1. PLUS \MAKENUMBER) +\POLYSHADE.DISPLAY (FILL.INITTBLE MAPCAR MAKESCAN SORT CONS CRITSECT ADD1 FILL.LINE MAPC IPLUS IMIN +\NORMSECT) \SUBREADCONCAT (\GETBASESTRING CONCATLIST NCONC1 REVERSE) FILL.INITTBLE (SUB1 BITMAPP +COLORTEXTUREFROMCOLOR# COLORNUMBERP DSPCOLOR BITMAPCREATE \SFReplicate LOGOR LLSH LOGAND LRSH +\ILLEGAL.ARG UNFOLD IMIN SELECTQ \DSPTRANSFORMX IPLUS \DSPTRANSFORMY \SFInvert IDIFFERENCE +DSPDESTINATION \TOTOPWDS) COMPILER::ENV-ANALYZE-VAR-REF (CL:PUSHNEW COMPILER::VARIABLE-READ-REFS +COMPILER::VAR-REF-VARIABLE) EDITBMSCROLLFN (WINDOWPROP IPLUS FIX TIMES IDIFFERENCE IMINUS QUOTIENT +IMIN GRIDXCOORD IMAX IQUOTIENT FDIFFERENCE GRIDYCOORD ITIMES LRSH BITBLT) SHOWWTITLE (DSPFONT SELECTQ +IDIFFERENCE TEXTUREP WINDOWPROP IPLUS BITMAPHEIGHT FONTPROP BITMAPWIDTH IMAX IQUOTIENT +\STRINGWIDTHGUESS PRINTLEVEL DSPXPOSITION ADD1) TTBIN (TTWAITFORINPUT \GETKEY METACHAR LOGOR LRSH +NONMETACHARBITS LOGAND \CARET.DOWN) COMPILER::RELEASE-BLOCK (COMPILER::BLOCK-FRAME COMPILER::BLOCK-REFERENCES + COMPILER::RELEASE-TREE COMPILER::BLOCK-STMT) \INVALID.SYMBOL (DECLARE MAKE-CONDITION CONCAT +CL:PACKAGE-NAME \GETBASESTRING) COMP.RETFROM.POINT (COMP.TOPLEVEL.COMPILE) \LET*-RECURSION (CL:EVAL +GET CL:PROGV LIST \LET*-RECURSION ENVIRONMENT-VARS LIST* \EVAL-PROGN) SI::CONSTRUCT-MIDDLE-MAN ( +CL:INTERN CL:FORMAT CL:PACKAGE-NAME CL:SYMBOL-PACKAGE) TEDIT.REDO.REPLACE (IDIFFERENCE) ETHERPORT ( +\FIXLOCALNET CONS \ILLEGAL.ARG \PARSE.PORTCONSTANT LIST GETHASH PUTHASH \LOOKUPPORT ERROR) +\GETBASESTRING (ALLOCSTRING UNFOLD LLSH) NETDAYTIME0 (\NET.SETTIME) \TEXTGETFILEPTR (IMIN SUB1 IPLUS +\TEDIT.PIECE-CHNO IDIFFERENCE IQUOTIENT IMAX) \EDITBM/PUTUP/DISPLAY (UPDATE/BM/DISPLAY BITBLT +WINDOWPROP) TTYIN (RESETLST TTYDISPLAYSTREAM CONS \DTEST \GTREADTABLE SUBSTRING MKSTRING NCHARS NLSETQ + TTYIN1 FRPLACA PLUS EDITE LIST) \INSPECT.STORE.8 (LIST \GETBASEBYTE \PUTBASEBYTE) FB.OPTIONSCOMMAND ( +FB.PROMPTWPRINT) \FIND.PACKAGE.INTERNAL (CL:FIND-PACKAGE \GETBASESTRING) COMPILER::ENV-ANALYZE-UNWIND-PROTECT + (COMPILER::ENV-ANALYZE COMPILER::UNWIND-PROTECT-STMT COMPILER::UNWIND-PROTECT-CLEANUP) MAKEINITBFS ( +EVQ + PLUS \ALLOCBLOCK UNSIGNED LOGAND SUB1 LLSH) TTBITWIDTH (FCHARWIDTH CHARWIDTH) EDITCHANGELABEL ( +WINDOWPROP GETSTREAM CONSTANT PRIN1 READ/NODE printout TERPRI GRAPHCHANGELABEL) TTSKREAD (\SYNCODE +GETHASH \GETBASEBYTE FIRSTCHAR LIST TTSKREAD ADD1 FIND.MATCHING.QUOTE) \RECODECCODE (CL:SVREF LRSH +LOGAND) COMPILER::FIND-REACHABLE-TAGS (CL:MAKE-HASH-TABLE) \TEDIT.TABTYPE.SET (ADD1 IMAGEOBJPROP +U-CASE MBUTTON.FIND.NEXT.BUTTON PACK* FUNCTION CONS) REMOVE (REMOVE CONS) NS\FONTFILENAME ( +OLD\FONTFILENAME NSDISPLAYSIZE) COMPILER::ENV-ANALYZE-THROW (COMPILER::ENV-ANALYZE COMPILER::THROW-TAG + COMPILER::THROW-VALUE) ARRAYRECORD (DECLARERECORD CONS) EDITBMCLOSEFN (WINDOWPROP) FILDIR (DIRECTORY) + COMP.ATTEMPT.COMPILE (COMP.RETFROM.POINT CONS COMPILE2 LIST) MAKEMACFORMAT (\MAKERECODEMAP +\INSTALL.EXTERNALFORMAT FUNCTION) TEDIT.REMOVE.MENUITEM (REMOVE UPDATE/MENU/IMAGE) \NSFILING.INIT ( +FUNCTION DEFPRINT) \NSFILING.ADD.TO.CACHE (\NSFILING.FILLIN.ATTRIBUTES LENGTH DREMOVE CONS) +RELEASE.PUP (\RELEASE.ETHERPACKET) TTYIN.FINISH (TTNLEFT \SYNCODE GETHASH \GETBASEBYTE FIRSTCHAR +TTYIN.READ TTYIN.SCRATCHFILE TTYINSTRING TTRATOM TTREADLIST APPLY* EVAL TTADJUSTWORD LIST CONS) +GRIDYCOORD (IDIFFERENCE IQUOTIENT SUB1) UNDOLISPX (FMEMB LDIFF LISPXFIND UNDOLISPX1) +\ITEM.WINDOW.COPY.HANDLER (WINDOWPROP IN/ITEM? CURSORPOSITION KEYDOWNP ZEROP LOGAND) \TEDIT.CREATEMENU + (FONTCREATE) DEFAULT.INSPECTW.TITLECOMMANDFN (SELECTQ MENU INSPECTW.REDISPLAY WINDOWPROP PROMPTPRINT) + TTYINREAD (GETSTREAM READ TTYIN NCONC1) HISTORYFIND (NTH IMINUS NLEFT ADD1 IDIFFERENCE IPLUS FIXSPELL + LISPXFIND CONS NCONC1) TERM.TAB (\DTEST ADD1 IQUOTIENT MOVETO ITIMES) TEDIT.FORMATTEDFILEP (TEXTOBJ +TEXTPROP \GETBASEPTR \FIRSTNODE IMAX SELECTQ) SHOWWFRAME (IMAX FOLDHI LRSH IPLUS IDIFFERENCE ITIMES +DSPCLIPPINGREGION) UNBREAK0 (XCL:UNBREAK-FUNCTION) TTYIN.SETUP (WFROMDS WINDOWPROP LIST FUNCTION +DSPDESTINATION CHARWIDTH DSPFONT FONTCOPY SELECTQ FONTPROP MAX FONTHEIGHT DSPTEXTURE PAGEHEIGHT +DSPLEFTMARGIN DSPRIGHTMARGIN DSPXPOSITION) \SEQUIN.CONTROL (LOCF \ADDBASE ALLOCATE.PUP \SEQUIN.PUT) +LEFTOFGRIDCOORD (IPLUS ITIMES) WTFIX1 (CL:CATCH XNLSETQ SETUPTIMER CLOCK STKPOS CONS FINDFN FSTKNTH +GETVARS LISTGET1 DUNPACK FMEMB NTHCHAR PACK LIST LITATOM FREEVARS CLISPDEC0 GETPROP RESETVARS +.RESETLST. CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION CLISPFOR RETDWIM CLISPIF MAKEMATCH APPEND + APPLY* GETD CLISPATOM EVAL FIXSPELL SELECTQ CL:THROW) TTYIN.READ (PRINTCCODE FIRSTCHAR TTNEXTCHAR +\SYNCODE GETHASH \GETBASEBYTE LIST IDIFFERENCE \GETFILEPTR SPREADAPPLY* STREAMBYTESPERCHAR NLSETQ READ +) \ORIG-READ.SYMBOL (CONCAT \GETBASESTRING \PARSE.NUMBER \MKATOM) GETFRAMEVAR.IP (ADD1) TB.REMOVE.ITEM + (\DTEST TB.FIND.PREVIOUS.TAIL SUB1 PLUS FFETCHFIELD TB.FIND.SELECTED.ITEM TB.REV.FIND.SELECTED.ITEM +TB.UPDATE.DISPLAY) \TFBRAVO.FONT.FROM.CHARLOOKS (FONTCREATE LIST) ETHERHOSTNUMBER (\LOCALPUPADDRESS +BESTPUPADDRESS) SETINITIALS (USERNAME STRPOS SUBSTRING ADD1 SUB1 SAVESET) \INSPECT.FETCH.FATCHAR ( +CHARACTER \GETBASE) BRKDWNCONSES (BRKDWNMACRO \BOXIPLUS BRKDWNELT ELT BRKDWNDIFFA IDIFFERENCE +\PUTBASEFIXP CONSCOUNT EVAL) TB.USERDATA (\DTEST) \LETtran (MAPCAR PARSE-BODY SELECTQ LIST LIST* +REVERSE) TTDELETELINE (BEEP PREVLINE BLTCHAR TTYDISPLAYSTREAM DELETE.TO.END RETYPE.BUFFER DELETETO +FORWARD.DELETE.TO) \ORIG-INVALID.SYMBOL (CL:CERROR CONCAT CL:PACKAGE-NAME SELECTQ \SUBREADCONCAT) +\TFBRAVO.READ.PARALOOKS (COPY FCHARACTER BIN IPLUS ITIMES SELECTQ IQUOTIENT CONS NCONC LIST CONSTANT +CHARACTER) \PUPINIT (PACK* GETD INITPUPLEVEL1) CL:PACKAGE-NAME (CL::%%PACKAGE-NAME) \TEDIT.PIECE-CHNO +(PLUS \GETBASEPTR \GETBASEFIXP IPLUS ADD1) FLIPCURSORBAR (LOGXOR \GETBASE SELECTC +\DoveDisplay.SetCursorShape) \ALLOCHEIGHTTOGROUPEDWINDOW (MAPCAR LIST IDIFFERENCE \TOTALFIXEDHEIGHT +PLUS \SETWINFOYSIZE \SHAREOFXTRAY APPLY UPIQUOTIENT LENGTH REMOVE IMAX) TTWAITFORINPUT (SETUPTIMER +DSPCLIPPINGREGION \GETKEY LOGAND LOGOR LASTMOUSEX - LASTMOUSEY + WHICHW WINDOWPROP TIMES ITIMES +TTLASTLINE FUNCTION DSPRIGHTMARGIN) TRAJECTORY.IP (MAPC LINETO.IP) \TEDIT.SET.WINDOW (CONS) +\ALLOCWIDTHTOGROUPEDWINDOW (MAPCAR LIST PLUS \SETWINFOXSIZE \SHAREOFXTRAX APPLY IDIFFERENCE +UPIQUOTIENT LENGTH REMOVE IMAX) GETPUPWORD (\GETBASE \DTEST) GRIDXCOORD (IDIFFERENCE IQUOTIENT SUB1) +\NSFILING.CONNECT (\NSFILING.LOOKUP.CACHE CONCATLIST MAPCONC LIST FILING.CALL \NSFILING.MAYBE.CREATE +\NSFILING.ADD.TO.CACHE) \VFMDelete (FUNCTION ADD1) TEDIT.CURSOROUTFN (WINDOWPROP) COMP.BLOCK ( +COMP.PROG CONS COMP.BIND.VARS SELECTQ LIST COMP.UNBIND.VARS) \LINEWITHBRUSH (\GETCOLORBRUSH +MAXIMUMCOLOR DSPCOLOR OPPOSITECOLOR \GETBRUSH \GETBRUSHBBT SUB1 IDIFFERENCE ITIMES \DSPTRANSFORMX +IPLUS FOLDLO LRSH \DSPTRANSFORMY DSPDESTINATION \TOTOPWDS ADD1 HALF IREMAINDER PLUS \GETBASE +\FBITMAPBIT \BBTCURVEPT) INIT.CURSOR (DSPCLIPPINGREGION - DSPYPOSITION IQUOTIENT + IREMAINDER) +GO.TO.ADDRESSING (IPLUS) TRANSLATEREG (IDIFFERENCE) GRAPHADDNODE (APPLY* DEFAULT.ADDNODEFN NCONC1) +MOVENODE (CONSTANT FLIPNODE) \TEDIT.LCASE.SEL (TEDIT.SEL.AS.STRING L-CASE) INREADMACROP (STKPOS +FUNCTION) TTYIN1 (DRIBBLEFILE FCHARWIDTH CHARWIDTH - STRINGWIDTH ITIMES SUB1 TTLOADBUF LIST +TTYIN.PPTOFILE LAST LDIFF GETRESOURCE NEWRESOURCE MAKE-TTSCRATCHFILE TTBIN FASSOC EVAL LRSH +NONMETACHARBITS LOGAND METACHAR LOGOR DO.EDIT.COMMAND \SYNCODE GETHASH \GETBASEBYTE PREVLINE \SYSBUFP +TTCOMPLETEWORD CURRENT.WORD FIND.MATCHING.WORD TTDOTABS AUTOCR? NLEFT FIRSTCHAR FIND.NEXT.WORD +FIND.NON.SPACE AT.END.OF.TEXT TTYDISPLAYSTREAM BLTCHAR APPEND MACHINETYPE U-CASECODE TTYIN.FINISH) +\TEDIT.SET-TOTLEN (PLUS \GETBASEFIXP) MAPDL (STKPOS STKNTH STKNAME) \TEDITOUTCHARFN (IPLUS16 \LOLOC +\ADDBASE) \TFBRAVO.READ.CHARLOOKS (FCHARACTER BIN IPLUS ITIMES \TFBRAVO.GET.FONTSIZE +\TFBRAVO.GET.FONTSTYLE IDIFFERENCE GETFILEPTR CONSTANT CHARACTER CONS \TFBRAVO.FONT.FROM.CHARLOOKS +SELECTQ) \INSPECT.FETCH.CHAR (CHARACTER \GETBASEBYTE) POSTSCRIPT.BITMAPSCALE (\PS.SCALEREGION / FASSOC + MAX MIN FQUOTIENT TIMES MENU CONS) TB.CLEAR.LINE (BLTSHADE \DTEST TB.BOTTOM.OF.ITEM) \8859OUTCHARFN ( +\PRINTCCODE \RECODECCODE) READQUOTE (LIST CL:READ) \SPP.SKIPBYTES (\SPP.PREPARE.INPUT SPP.STREAM.ERROR + SPREADAPPLY* GETSPPCON FFETCHFIELD IDIFFERENCE PLUS) READVBAR (SELCHARQ PEEKCCODE READBQUOTE HREAD +READHASHMACRO CL:VALUES) AS.CREATE.PASSWORDS (PARSE.NSNAME RESETLST AS.MAKE.CONVERSATION) PRINTHISTORY + (LISPXFIND ENTRY# PRINTHISTORY1 APPLY*) FSET.IP (APPENDOP.IP) READHASHMACRO (FUNCTION ILEQ PEEKCCODE +PLUS TIMES DIFFERENCE READCCODE SELCHARQ APPLY* FILL-VECTOR CL:MAKE-ARRAY LENGTH LIST READ EVAL +CHARACTER.READ IDIFFERENCE CL:MAKE-SYMBOL READ-EXTENDED-TOKEN READNUMBERINBASE ESTIMATE-DIMENSIONALITY + CREATE-STRUCTURE CL:VALUES ERROR CHARCODE.UNDECODE RSTRING GET CHARACTER) FORMAT-PLURAL ( +WRITE-STRING*) HREAD (INPUT READTABLEP READ) TERM.SMOOTHSCROLL (\DTEST PLUS TERM.ERASEBITS) UNADVISE ( +NLAMBDA.ARGS CL:FLET MAPCONC REVERSE UNADVISE-ENTRY) READBQUOTE (LIST CL:READ) CHARCODE.UNDECODE ( +CL:CHAR-NAME CL:CODE-CHAR MKSTRING) BYTEBLOCKCOMPILE2 (RESETVARS .RESETLST. LIST CONS +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION BLOCKCOMPILE2 PACK* MAPCONC COMP.ATTEMPT.COMPILE +FASSOC) MAKEIBMFORMAT (\MAKERECODEMAP \INSTALL.EXTERNALFORMAT FUNCTION) \MAKESPACEFORLOCKEDPAGE ( +SELECTC FOLDLO LRSH IPLUS IDIFFERENCE DLFPFROMRP SUB1 FREPLACEFIELD PLUS FFETCHFIELD \ADDBASE) +SKIP.HASH.COMMENT (READCCODE) MAKE-TTSCRATCHFILE (OPENSTREAM) \SW2BM (IMAX IMINUS IPLUS IMIN +IDIFFERENCE BITBLT) GENERATE (RESUME) CMLREAD.FEATURE.PARSER (SELECTQ EVERY CMLREAD.FEATURE.PARSER +SOME ERROR) CL:RETURN-FROM (STKNTH STKNAME STKARG) ESTIMATE-DIMENSIONALITY (ERROR LENGTH LIST PLUS) +INSPECT/BITMAP (SELECTQ MENU INSPECT/DATATYPE EVAL.AS.PROCESS LIST) \INSPECT.FETCH.32 (\GETBASEFIXP +UNFOLD LLSH) READNUMBERINBASE (READ-EXTENDED-TOKEN NTHCHARCODE DIGITBASEP + TIMES PLUS %%/ - CL:ERROR) + \INSPECT.COMPUTE.TITLE (CONCAT CL:PRINC-TO-STRING APPLY*) NODEREGION (CREATEREGION GN/LEFT GN/BOTTOM) + LISPXUSEC (FMEMB LDIFF LISPXFIND LISPXUSEC CONS PACK LIST COPY ESUBST SUBST) CL:MAKE-SYMBOL (ERROR +MKSTRING UNINTERRUPTABLY \CREATE.SYMBOL) MBUTTON.SET.NEXT.FIELD (ZEROP MKSTRING) COURIER.SIGNAL.ERROR +(ERROR CONCAT) PUTSEQUIN (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION PUTSEQUIN +SEQUINOP APPLY*) FILL-VECTOR (CL:ERROR - %%ARRAY-TYPE-NUMBER) MAKEISOFORMAT (\MAKERECODEMAP +\INSTALL.EXTERNALFORMAT FUNCTION) \NEWEPHEMERALPAGE (\MISCAPPLY* FUNCTION) CLOSEHASHFILE (HASHFILEP +CLOSEF? OPENHASHFILE) \DONEWEPHEMERALPAGE (\GETBASE IPLUS \READFLAGS PLUS \SELECTREALPAGE RPFROMRPT +LOCF \ADDBASE) BREAK.NSFILING.CONNECTION (FUNCTION LIST \GETDEVICEFROMNAME \CANONICAL.NSHOSTNAME) +FORMAT-NEWLINE (FORMAT-EAT-WHITESPACE) CHARACTER.READ (READCCODE PEEKCCODE \SYNCODE GETHASH +\GETBASEBYTE CL:CODE-CHAR CHARCODE.DECODE CONCAT ALLOCSTRING READ-EXTENDED-TOKEN) TERM.SETMARGINS ( +\DTEST - ITIMES SUB1) SEARCHPDL (STKPOS STKNTH STKNAME CONS) GRID (TEXTUREP ITIMES IDIFFERENCE IPLUS +SUB1 PLUS WINDOWPROP BITMAPCREATE MAXIMUMCOLOR BITSPERPIXEL DSPDESTINATION) \VFMClearIntervals (SUB1 +PLUS) TEDIT.REDO.MOVE (IPLUS) FILLTRAJECTORY.IP (APPENDOP.IP) DIRCONJ (SELECTQ) DISCARDPUPS (\DTEST +UNINTERRUPTABLY) \NSFILING.OPENFILE (\NSFILING.GETFILE \ILLEGAL.ARG SELECTQ +\LISP.TO.NSFILING.ATTRIBUTE ASSOC ERROR CONS FFETCHFIELD) FORMAT-EAT-WHITESPACE (CL:POSITION-IF-NOT +FUNCTION CL:1- CL:LENGTH) TERM.SET.TAB (\DTEST LIST SORT CONS) COMPILER::ENV-ANALYZE-TAGBODY (MAPC +COMPILER::TAGBODY-SEGMENTS COMPILER::SEGMENT-STMTS COMPILER::ENV-ANALYZE) UNIONREGIONS (ARG PLUS +DIFFERENCE) COMPILER::ENV-ANALYZE-RETURN (COMPILER::ENV-ANALYZE COMPILER::RETURN-VALUE) RETVALUES ( +\STACKARGPTR CL:VALUES-LIST) COURIER.READ (SELECTQ GETWORD IPLUS LLSH \BIN SIGNED SUB1 IDIFFERENCE +GETLONG \MAKENUMBER \WIN COURIER.READ.STRING ALTO.TO.LISP.DATE GETPROP CL:FUNCALL \GET.COURIER.TYPE +COURIER.READ \COURIER.UNKNOWN.TYPE LIST PLUS COURIER.READ.SEQUENCE MAPCAR CONS) TEDIT.FORMATTEXTBOX ( +MAPCAR FIXR FTIMES DSPSCALE + TEDIT.HARDCOPY-COLUMN-END PLUS APPEND NCONC1 FRPLACA +\TEDIT.HARDCOPY.FORMATLINE ADD1 \TEDIT.FORMAT.FOOTNOTE FLAST COPY IMAX FFETCHFIELD - IPLUS IDIFFERENCE + IMIN LIST DREMOVE) REALFRAMEP (\REALFRAMEP \STACKARGPTR) FLIPNODE (BITBLT IDIFFERENCE GN/LEFT +GN/BOTTOM IPLUS) FB.DEPTHCOMMAND (SELECTQ MENU RNUMBER FB.PROMPTWPRINT) CL:FUNCTION (CL:SYMBOL-FUNCTION +) INSPECT/ATOM (TYPESOF CCODEP MAKE-INSPECTOR-PROFILE CONS EVALV REMOVE PRIN1 INSPECT +SELECT.ATOM.ASPECT SELECTQ MENU EVAL.AS.PROCESS.WITH.PROFILE EVAL.AS.PROCESS LIST INSPECTCODE) +\INSPECT.FETCH.8 (\GETBASEBYTE) MAKEEPSFILE (OPENIMAGESTREAM APPLY* IMAGEOBJPROP LIST CLOSEF) +LISPXSTOREVALUE (LISPXPUT) \INSPECTW.VALUE.MARGIN (IMIN IPLUS IMAX MAXSTRINGWIDTH) \TEMPLOCKPAGES ( +\MISCAPPLY* FUNCTION) TTPROMPTCHAR (TTPRIN1 PLUS) COMPOSEREGS (IPLUS) EXCHANGEPUPS (\DTEST SETUPTIMER +GETPUP) PURGENSFONTS (/SETTOPVAL CONS MKLIST LIST) COMPILER::ENV-ANALYZE-PROGV (COMPILER::ENV-ANALYZE +COMPILER::PROGV-SYMS-EXPR COMPILER::PROGV-VALS-EXPR COMPILER::PROGV-STMT) HELP (CONDITIONS:INVOKE-DEBUGGER + MAKE-CONDITION LIST) DODIR (DIRCONJ LIST APPEND FMEMB CONS DIRECTORY) COMP.MLLIST (RESETLST RESETSAVE + RADIX LINELENGTH PRIN2 MAPRINT FUNCTION SPACES PRINT FASSOC COMP.MLL) COMP.SPREAD (CL:FIRST CL:THIRD +CL:SECOND CONS COMP.STFN PLUS LIST) DIGITBASEP (PLUS DIFFERENCE) FILECODEBLOCK (IPLUS +\PREFIXALIGNMENT? FILEARRAYBASE) COMP.CL-EVAL (COMP.SPREAD) DWIM (GETD /SETATOMVAL ASSOC SET ERROR) +NSDISPLAYSIZE (SELECTQ) TERM.SCROLLDOWN (\DTEST + - TERM.ERASEBITS) COMPILER::ENV-ANALYZE-SETQ ( +CL:PUSHNEW COMPILER::VARIABLE-WRITE-REFS COMPILER::SETQ-VAR COMPILER::ENV-ANALYZE COMPILER::SETQ-VALUE +) \SEQUIN.PUT (UNINTERRUPTABLY PLUS FFETCHFIELD ADD1) MAPHASHFILE (GTHASHFILE IGREATERP NARGS BIN +READPTR IPLUS LLSH READ SPLITKEY APPLY* PLUS) FM.CHANGELABEL (ERROR \FM.INSUREFM \FM.COERCEITEMPTR +\FM.ITEMPROP FFETCHFIELD FM.GETITEM LISTGET WINDOWPROP \FM.WINDOWEXTENT \FM.REDISPLAYMENU +\FM.DISPLAYBITMAP BITBLT) TEDIT.FORMATFOLIO (MAPCAR FIXR FTIMES DSPSCALE LISTGET MKSTRING SELECTQ +ROMANNUMERALS CONCAT TEXTOBJ OPENTEXTSTREAM LIST \TEDIT.HARDCOPY.FORMATLINE PLUS FFETCHFIELD ADD1 +IDIFFERENCE IPLUS) FB.SHAPECOMMAND (WINDOWREGION WINDOWPROP MIN + - MAX SCROLLW) +FB.INFOMENU.WHENSELECTEDFN (WINDOWPROP WFROMMENU REMOVE CONS) \RELEASEWORKINGSET (SUB1 RPFROMRPT IPLUS + PLUS) \MATCHPCS (\GETBASEPTR PLUS) POSTSCRIPTFILEP (CL:MEMBER UNPACKFILENAME.STRING FUNCTION BIN) +OPENHASHFILE (CREATEHASHFILE ASSOC FULLNAME GETFILEINFO OPENSTREAM READPTR IPLUS LLSH BIN SELCHARQ +SELECTQ SYSTEMTYPE SETHASHSTATUS) \FLUSHVM (UNINTERRUPTABLY \MISCAPPLY* FUNCTION SET) +\NSFILING.DESERIALIZE (RESETLST \NSFILING.PARSE.FILENAME CL:ERROR \GETFILINGCONNECTION +\NSFILING.CONNECT \NSFILING.DESERIALIZE1 \NSFILING.FULLNAME \NSFILING.ADD.TO.CACHE +COURIER.SIGNAL.ERROR) INSPECT/LISTP (APPLY* SELECT.LIST.INSPECTOR FUNCTION) LISPXFIX (LAST EDITL LIST) + DECODE.WINDOW.ARG (CREATEW MAKEWITHINREGION CREATEREGION WIDTHIFWINDOW HEIGHTIFWINDOW GETBOXREGION +CONCAT) XCL::SET-CONSTANTP (GETHASH) CHARCODE.DECODE (CONS CHARCODE.DECODE ERROR NCHARS CHCON1 +SELCHARQ SUBSTRING LOGAND LOGNOT IPLUS MKSTRING NUMBERP STRPOSL CL:PARSE-INTEGER ADD1 SUB1 LOGOR LLSH +STRPOS) TTYIN.PPTOFILE (OPENSTREAM \GTREADTABLE - IQUOTIENT CHARWIDTH NCHARS POSITION CONS GETFILEPTR) + DSKDISPLAY (SELECTQ MACHINETYPE CONCAT) CL:APPLYHOOK (DECLARE CL:APPLY) STRPOSL (GLOBALRESOURCE +MAKEBITTABLE STRINGP MKSTRING PLUS ADD1 IPLUS \SYNCODE GETHASH \GETBASEBYTE \GETBASECHAR \GETBASEFAT +\GETBASE \GETBASETHIN IDIFFERENCE GETRESOURCE NEWRESOURCE NCREATE) SET-SYMBOL (ENVIRONMENT-VARS +\STKSCAN \HILOC \PUTBASEPTR \RPLPTR) COMPUTE-MACRO-ARGS (CONS SELECTQ COMPUTE-MACRO-ARGS MAKE-KEYWORD +EVAL) SENDPUP (\DTEST LOCF \ADDBASE ASSURE.PUP.READY TERPRI \ROUTE.PUP) \NSFILING.CLOSE.CONNECTIONS ( +RESETLST OBTAIN.MONITORLOCK TIMES APPEND MAPC) MACROS.GETDEF (MKPROGN GETPROPLIST LIST) +\WRITEDIRTYPAGE1 (\READFLAGS \ASSURE.FPTOVP.PAGE) EXPANDMACRO (GETHASH GETMACROPROP MACROEXPANSION +OUTPUT PRINTDEF TERPRI) \COURIER.HANDLE.ERROR (printout PRIN1) EXPAND-DEFMACRO (CL:PROGV EVAL CONS) +TEDIT.FORMATHEADING (MAPCAR FIXR FTIMES DSPSCALE LISTGET OPENTEXTSTREAM LIST FREPLACEFIELD PLUS +FFETCHFIELD \TEDIT.HARDCOPY.FORMATLINE IDIFFERENCE IPLUS ADD1) NEAREST/PT/ON/GRID (NEAREST/MULTIPLE) +MSUSERVBTABLES (GETHASH) CL:EVALHOOK (CL:EVAL) SWAPPUPPORTS (FFETCHFIELD LOCF \ADDBASE FREPLACEFIELD) +\INSPECT.STORE.PTR (LIST \GETBASEPTR \RPLPTR UNFOLD LLSH) HASHFILEPROP (GTHASHFILE SELECTQ GETFILEINFO +) \AREAINREGIONP (IGEQ) COPIEDFILENAME (CONCATLIST NOHOST UNPACK NLEFT FMEMB COPIEDFILEPATTERN CL:APPLY + NTHCHARCODE SUBSTRING) \PEEKCCODE.NOEOLC (CL:FUNCALL) \SPP.PREPARE.OUTPUT (\FILLINSPP IDIFFERENCE) +NSPRINT (CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION GETNSPRINTER OPENSTREAM LISTGET CONS +FULLNAME GETFILEINFO \NSPRINT.INTERNAL UNPACKFILENAME.STRING) AS.REPLACE.PASSWORDS (PARSE.NSNAME +RESETLST AS.MAKE.CONVERSATION) \INCCODE.EOLC (\CHECKEOLC SELCHARQ SELECTC LIST \CHECKEOLC.CRLF +CL:FUNCALL) \CLIPANDDRAWLINE (COLORNUMBERP DSPCOLOR .WHILE.TOP.DS. DSPDESTINATION \GETBASE \TOTOPWDS +LIST IDIFFERENCE LRSH SUB1 IPLUS IMIN IMAX ADD1 IABS IMINUS PLUS) EXPANDOPENLAMBDA (CONS LIST +CONSTANTEXPRESSIONP KWOTE SUBPAIR MAPCAR PACK* GENSYM SUBLIS MKPROGN NCONC) \ILLEGAL.ARG (LISPERROR) +\FORMATBYTESTREAM (FUNCTION) TERM.RIGHT (\DTEST + MOVETO IMIN ITIMES) COMP.GETBASE (COMP.VAL CONS LIST + COMP.VALN PLUS COMP.EFFECT HELP COMP.STFN) \IRM.WILD.MATCH (\IRM.WILD.MATCH) PRINTCOMSTRAN (APPEND +MAPCAR CAR CHCON1 NTHCHARCODE SUBATOM STRPOS SUB1 CONS LIST APPLY* ASSOC SELECTQ FASSOC) +MBUTTON.NEXT.FIELD.AS.ATOM (TEDIT.SEL.AS.STRING NCHARS MKATOM) \UNCOPY (SELECTC NTYPX \HILOC \LOLOC +IPLUS LOCAL CREATECELL \FLOATBOX \VAG2 LOGOR LLSH PLUS VATOM ALLOCSTRING RPLSTRING FCHARACTER +\GETBASEBYTE VTYPEDPOINTER TYPENAME FOLDHI LRSH ITIMES NCREATE \ALLOCBLOCK FREPLACEFIELD SUB1 \PUTBASE + \GETBASE CONS \UNCOPY ALLOCAL) FB.INFOMENU.SHADEINITIALSELECTIONS (WINDOWPROP MAPC SHADEITEM +FB.INFO.ITEM.NAMED) \LASTNODE (LLSH IDIFFERENCE \GETBASEPTR \LASTNODE PLUS) TRACKCURSOR ( +CURSORPOSITION ZEROP LOGAND MOUSESTATE WFROMDS NODEREGION) ICONW (GETBOXPOSITION CREATEW FUNCTION) +TEDIT.CURSORMOVEDFN (LASTMOUSEX LASTMOUSEY WINDOWPROP \TEDIT.FIND.OVERLAPPING.LINE IDIFFERENCE FIXR +FQUOTIENT IPLUS) COMPILER::PEEPHOLE-OPTIMIZE-CODE (COMPILER::FIND-TAG-DUPLICATION CL:VALUES CL:NREVERSE +) TEDIT.FORMATPAGE (\TEDIT.SCALEREGION DSPSCALE TEXTPROP DSPFONT \TEDIT.APPLY.PARASTYLES \CHTOPC ADD1 +\TEDIT.PARABOUNDS TEDIT.PARSE.PAGEFRAMES LISTGET LIST - GETFILEPTR NCONC1 CONS APPLY* FRPLACA PLUS) +EDITBMBUTTONFN (WINDOWPROP LASTMOUSEX LASTMOUSEY MENU GETBOXPOSITION IPLUS - IMIN IDIFFERENCE IMAX +IMINUS QUOTIENT TIMES LRSH BITBLT LOGAND BITMAPCREATE BITSPERPIXEL CURSOR CURSORCREATE ZEROP APPEND +\EDITBMHOWMUCH GETGRIDBOXREGION + CREATEW NUMBERP IQUOTIENT WIDTHIFWINDOW HEIGHTIFWINDOW COLORMENU) +GETPUP (\DTEST \DEQUEUE FREPLACEFIELD PLUS FFETCHFIELD FIXP SETUPTIMER TERPRI) \INSPECT.FETCH.PTR ( +\GETBASEPTR UNFOLD LLSH) \SPLITTREE (UNINTERRUPTABLY IPLUS PLUS LRSH SUB1 \GETBASEPTR \GETBASEFIXP +ADD1 \INSERTTREE) \FB.HARDCOPY.TOFILE.EXTENSION (PRINTERTYPE) TEDIT.UNPARSE.PAGEFRAMES (LIST MAPCAR +TEDIT.UNPARSE.PAGEFRAMES) LISPXUSE0 (LISPXUSE1 LISPXSUBST MAPCONC) COMPILER::ENV-ANALYZE-MV-PROG1 ( +MAPC COMPILER::MV-PROG1-STMTS COMPILER::ENV-ANALYZE) TTLOADBUF (GETSTREAM GETFILEPTR BINCCODE +READCCODE FMEMB NLEFT DCHCON) MBUTTON.NEXT.FIELD.AS.TEXT (TEDIT.SEL.AS.STRING) UNIXCHAT.OPEN ( +CREATE-SHELL-STREAM LIST) COMPILER::*LITERALLY-T* (COMPILER::MAKE-LITERAL) \XCCSINCCODE ( +ACCESS-CHARSET \BIN IDIFFERENCE) 32MBADDRESSABLE (SELECTC) \TEDIT.APPLY.PAGEFORMATTING (WINDOWPROP +ADD1 MBUTTON.FIND.NEXT.BUTTON IMAGEOBJPROP MBUTTON.NEXT.FIELD.AS.NUMBER SELECTQ U-CASE +MBUTTON.NEXT.FIELD.AS.TEXT MBUTTON.NEXT.FIELD.AS.ATOM CONCAT LIST PLUS \TEDIT.PARSE.CHARLOOKS.MENU +CONS TEDIT.SINGLE.PAGEFORMAT COPY) \NOMACHINETYPE (RAID) CLISPDEC1 (MAPCON LIST CONS CLISPDEC1 DUNPACK + ERROR) \XCCSPEEKCCODE (ACCESS-CHARSET \PEEKBIN) INSPECTW.REDISPLAY (\INSPECTW.REDISPLAYPROP MAPC +WITH-INSPECTOR-ENV WINDOWPROP XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES +INSPECTW.PROPERTIES MAPCAR APPLY* \INSPECTW.VALUE.MARGIN DSPFONT \INSPECT.COMPUTE.TITLE +DSPCLIPPINGREGION NCONC LIST PRINTANDBOX FUNCTION CONS LRSH EXTENDREGION) ADVISE (ARG +SI::CANONICALIZE-ADVICE-WHEN-SPEC SI::CANONICALIZE-ADVICE-WHERE-SPEC XCL:ADVISE-FUNCTION CL:FIRST +CL:THIRD MAPCONC) \XCCSOUTCHAR (\CHARSET LRSH CL:FUNCALL FUNCTION \CHAR8CODE LOGAND IPLUS16 \LOLOC +\ADDBASE) \SET.LASTVMEMFILEPAGE (IDIFFERENCE) \SEQUIN.CLOSE (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION) COMPILER::ENV-ANALYZE-PROGN (MAPC COMPILER::PROGN-STMTS COMPILER::ENV-ANALYZE +) \TEDIT.FILL.IN.CHARLOOKS.MENU (\TEDIT.PARSE.CHARLOOKS.LIST LIST MBUTTON.FIND.NEXT.BUTTON ADD1 +IMAGEOBJPROP CONCAT FONTPROP PACK* U-CASE IABS IMINUS) ENDREAD? (TTSKREAD FIND.NON.SPACE \SYNCODE +GETHASH \GETBASEBYTE FIRSTCHAR LIST TTNEXTCHAR) MBUTTON.NEXT.FIELD.AS.PIECES (TEDIT.SELECTED.PIECES) +CL:CATCH (CL:CATCH \EVAL \EVPROGN) MAKEINITLAST (SYSTEMTYPE MAPHASH IMAX MINFS ITIMES ARRAYSIZE GCGAG +MAPC SETPROPLIST COPY SETTOPVAL FILEARRAYBASE BOUTZEROS IDIFFERENCE TIMES UNFOLD LLSH IMOD \LOLOC +PAGELOC IPLUS \HILOC LRSH ALLOCAL APPEND \ATOMVALINDEX NTYPX SHOULDNT LOCAL EVALV ILEQ \LOCKVAR +printout TERPRI DUMPINITPAGES) FREEMENU (COPY \FM.CREATEW \FM.FORMAT) COMP.LOOKUPVAR (COMP.USERFN +FUNCTION LIST CONS COMP.CHECK.VAR) \TEDIT.FORMAT.FOUNDBOX? (SELECTQ) \GETREGION.CHECKOPPT (IDIFFERENCE + IPLUS APPLY* ERROR) COMPILER::*LITERALLY-NIL* (COMPILER::MAKE-LITERAL) DODIRCOMMANDS (ITIMES +IQUOTIENT IPLUS POSITION IDIFFERENCE LINELENGTH PLUS DIRGETFILEINFO IGEQ TAB DIRFILENAME DREAD NCONC1 +INFILEP PACKFILENAME FASSOC LIST) \CREATE.XCCS.EXTERNALFORMAT (\INSTALL.EXTERNALFORMAT FUNCTION) +FGET.IP (APPENDOP.IP) \TEDIT.CONVERT.FOREIGN.FORMAT (OPENTEXTSTREAM RESETSAVE \TEDIT.SET.WINDOW CONS +TEXTOBJ APPLY*) CL:CERROR (MAKE-INTO-CONDITION) TEDIT.PARSE.PAGEFRAMES (LIST MAPCAR +TEDIT.PARSE.PAGEFRAMES) FB.ALLOW.ABORT (\DTEST THIS.PROCESS REDISPLAYW) CONCAT (ARG MKSTRING IPLUS +NCHARS SUB1 ALLOCSTRING ADD1) \MAKEBRUSH.ROUND (SUB1 HALF LRSH BITMAPCREATE MASK.1'S LSH DSPCREATE) +SPP.CLEARATTENTION (GETSPPCON FFETCHFIELD ERROR) CL:UNWIND-PROTECT (CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION \EVAL) COMPILER::ENV-ANALYZE-MV-CALL (COMPILER::ENV-ANALYZE COMPILER::MV-CALL-FN + MAPC COMPILER::MV-CALL-ARG-EXPRS) MOVE.TO.LINE (SEGMENT.BIT.LENGTH CHECK.MARGIN IPLUS) +MBUTTON.NEXT.FIELD.AS.NUMBER (NUMBERP MKATOM TEDIT.SEL.AS.STRING) CL:TAGBODY (CONS \PROG0) \COPY ( +SELECTQ LOCAL TYPENAME UNLESSRDSYS MKI.ATOM REVERSE \COPY LAST CONS IGREATERP \ADDBASE LOGAND ILESSP +CREATECELL LOGOR LRSH %%COPY-ONED-ARRAY %%COPY-STRING-TO-ARRAY SYSTEMTYPE \GETBASE \VAG2 CL:CHAR-CODE +ERROR) %%SET-ARRAY-OFFSET (-) \SEQUIN.PROCESS (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. +FUNCTION LIST THIS.PROCESS PUPSOCKETEVENT GETPUP APPLY* SEQUINOP \SEQUIN.FLUSH.CONNECTION +MONITOR.AWAIT.EVENT FREPLACEFIELD IPLUS16 \LOLOC \ADDBASE FFETCHFIELD IMAX LRSH PLUS) +\DOVMEMFULLINTERRUPT (RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION + CONCAT) CLISPLOOKUP1 (RECORDFIELDNAMES CLISPLOOKUP1 GETPROP NTH) FB.NEWINFOCOMMAND (MENUWINDOW +FUNCTION WINDOWPROP FB.PROMPTWPRINT) HPRINT (RESETLST RADIX HASHARRAY OUTPUT SETREADTABLE OPENSTREAM +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION COPYBYTES) INITSEQUIN (OPENPUPSOCKET +CREATE.MONITORLOCK CREATE.EVENT ADD.PROCESS LIST) TERM.NEWLINE (\DTEST MOVETO) DIRPRINTNAME (GETSTREAM + NTHCHARCODE GETCASEARRAY PLUS LIST TAB ADD1) \INVALID.DOTTED.SYMBOL (\GETBASESTRING) SPP.FLUSH.TO.EOF + (SELECTC BIN) \MVLIST (LIST) \INVALID.INTEGER (\GETBASESTRING UNFOLD LLSH - \MKINTEGER) +GETGRIDBOXREGION (\DSPTRANSFORMX IPLUS WINDOWPROP \DSPTRANSFORMY GETREGION FUNCTION CREATEREGION +GRIDXCOORD DSPXSCREENTOWINDOW GRIDYCOORD DSPYSCREENTOWINDOW - ADD1) LISPXUSE (NCONC1 APPEND CONS +GENSYM LIST FMEMB LISPXFIND MAPCAR LISPXUSE0) SETUPPUP (\DTEST ADD1 FIXP ETHERPORT OPENPUPSOCKET) +INSPECT/MAKE/CCODEP (MAKE-COMPILED-CLOSURE) BRKDWNTIME (BRKDWNMACRO \BOXIPLUS BRKDWNELT ELT +BRKDWNDIFFA IDIFFERENCE \PUTBASEFIXP CPUTIME CLOCK EVAL) \MAKEBRUSH.SQUARE (BITMAPCREATE) EDITADDNODE +(WINDOWPROP GRAPHADDNODE WFROMDS NODEREGION PRIN1 APPLY* CONSTANT DSPCLIPPINGREGION) CACHEMACRO ( +ENVIRONMENT-FUNCTIONS CL:FUNCALL GETHASH PUTHASH) \PUPERROR (\MAYBEPEEKPUP ASSOC TERPRI FOLDLO LRSH +IPLUS ITIMES \PUTBASESTRING LOCF \ADDBASE SENDPUP \RELEASE.ETHERPACKET) XCL::SET-GLOBALLY-NOTINLINE-P +(GET) FB.NEWPATTERNCOMMAND (FB.GET.NEWPATTERN FB.UPDATEBROWSERITEMS) TEDIT.BUILD.PCTB0 (\MAKEPCTB +IDIFFERENCE GETEOFPTR \DWIN \SMALLPIN SUB1 LLSH PLUS CREATEPCNODE) MSADDTYPE (MKLIST CONS GETHASH LIST + APPEND ASSOC MSADDMODIFIER) POSTSCRIPT.TEXT (TEXTTOIMAGEFILE) DSPXSCREENTOWINDOW (IDIFFERENCE +\GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM) \ACTONVMEMFILE (\DL.ACTONVMEMFILE \DOVE.ACTONVMEMFILE + \M44ACTONVMEMFILE) MAKEINITFIRST (\NEWPAGE) \NSGC.COLLECT.DIRECTORIES (RESETLST \GETFILINGCONNECTION +\NSFILING.CONNECT FILING.CALL CONSTANT \FILING.ATTRIBUTE.TYPE.SEQUENCE LIST FUNCTION +BULKDATA.GENERATOR CONS BULKDATA.GENERATE.NEXT) \PRINDATUM.TO.STRING (SELECTC NTYPX LIST +GLOBALRESOURCE \CONVERT.FLOATING.NUMBER \CONVERTNUMBER RPLSTRING ALLOCSTRING NCHARS GETRESOURCE +NEWRESOURCE CONCAT CL:MAKE-HASH-TABLE FUNCTION CL:FUNCTION) GETSEQUIN (\DEQUEUE) PAINTW (\INSUREWINDOW + PRIN1 RESETLST RESETSAVE LIST CURSOR WINDOWPROP SELECTQ MASK.1'S LSH SUB1 BITMAPP \GETBRUSH HALF LRSH + LOGAND DSPCLIPPINGREGION LASTMOUSEX LASTMOUSEY PAINTW.READCOMMAND PAINTW.READBRUSHTEXTURE +PAINTW.READMODE PAINTW.READBRUSHSHAPE PAINTW.READBRUSHSIZE WHICHW IDIFFERENCE LOGOR COPY) +\TFBRAVO.SPREAD.LOOKS (SELECTQ LISTPUT \TFBRAVO.GET.FONTSIZE \TFBRAVO.GET.FONTSTYLE PLUS IDIFFERENCE) +\INSERTTREE (UNINTERRUPTABLY LLSH SUB1 \GETBASEPTR PLUS IDIFFERENCE IPLUS \GETBASEFIXP \ADDBASE ADD1) +TEDIT.FORMAT.HARDCOPY (RESETLST TEXTOBJ TEXTSTREAM NUMBERP LIST TEDIT.COMPOUND.PAGEFORMAT LISTGET +TEXTPROP APPLY* PRINTER.SCRATCH.FILE RESETSAVE TEDIT.PROMPTPRINT OPENIMAGESTREAM PRINTERPROP +PRINTERTYPE FONTCREATE STREAMPROP DSPRIGHTMARGIN SUB1 CLOSEF SEND.FILE.TO.PRINTER APPEND DELFILE +CONCAT MKSTRING) FB.YES-OR-NO-P (FB.PROMPTFORINPUT SELECTQ) \STREAM.FROM.PACKET (\MAKEBASEBYTESTREAM +IDIFFERENCE CONSTANT IPLUS) XCL::DECL-SPECIFIER-P (GET) XCL::SET-DECL-SPECIFIER-P (GET) +\NSFILING.LOGOUT (FILING.CALL) COMPILE! (RESETLST UNION COMPILE1 VIRGINFN LIST) SHOW.MATCHING.PAREN ( +BACKSKREAD FIND.LINE + SEGMENT.BIT.LENGTH \SYSBUFP TIMES \CARET.DOWN) \TEDITPAGEMENU.CREATE ( +\TEXTMENU.DOC.CREATE APPEND LIST FONTCREATE) FORMAT-ROUND-COLUMNS (+ CL:* CL:CEILING -) TERPRI ( +\GETSTREAM) \TEDIT.APPLY.OLINE (SELECTQ IMAGEOBJPROP CONS) PRIN1 (\GETSTREAM \DTEST \OUTTERMP +.FILELINELENGTH. SELECTC) FB.GET.SORT.MENU (CONS MAPCAR) SPACES (\GETSTREAM .FILELINELENGTH. SELECTC +IPLUS FRESHLINE \OUTCHAR) FIND.MATCHING.WORD (INPART) PRINTNUM (GLOBALRESOURCE SELECTQ LISPERROR +\CONVERT.FLOATING.NUMBER FLOAT \CHECKFLTFMT \CONVERTNUMBER FIXP FIXR IABS IMINUS IGREATERP IDIFFERENCE + NCHARS PRIN1 GETRESOURCE NEWRESOURCE ALLOCSTRING CONCAT) \FATTENSTRING (%%MAKE-STRING-ARRAY-FAT) TAB +(IPLUS POSITION NUMBERP IDIFFERENCE) MAPFILES (MAPC MAPFILES NTHCHARCODE DIRECTORY.FILL.PATTERN CL:APPLY + MAPFILES1 INFILEP) \PRINTVP (printout LRSH LOGAND PRIN1) MAKEWITHINREGION (REGIONP \ILLEGAL.ARG IMAX +IDIFFERENCE SUB1) \TEDIT.UPDATETREE (\GETBASEPTR IPLUS \GETBASEFIXP PLUS FFETCHFIELD) +\DO.PROGV.SETUP.FRAME.AND.EXECUTE (\MYALINK OPCODES ADDSTACKBASE \VAG2 CEIL LOGAND IPLUS IDIFFERENCE +UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDLO LRSH \PUTBASEPTR \ATOMVALINDEX NTYPX \LOLOC SHOULDNT PLUS +WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY) GETSTREAM (\GETSTREAM) POSTSCRIPT.TEDIT (MKATOM +OPENTEXTSTREAM) SPPSTREAMP (GETSPPCON FFETCHFIELD) \MAKEBRUSH.HORIZONTAL (BITMAPCREATE SUB1 FOLDHI +LRSH IPLUS) \TRANSLATE.3TO10 (ASSOC \DTEST \ALLOCATE.ETHERPACKET LOCF \ADDBASE) MBUTTON.INIT ( +IMAGEFNSCREATE FUNCTION) \COURIER.TRACE (SELECTQ PRIN1 printout LVLPRINT SHOULDNT) \MAPPNAME.INTERNAL +(WITH-RESOURCE \PRINDATUM GETRESOURCE NEWRESOURCE FREPLACEFIELDVAL NCREATE FUNCTION) COMP.EXP1 ( +COMP.EXPR) OUTPUT (\GETSTREAM) UPIQUOTIENT (IQUOTIENT IPLUS SUB1) PRINT-CIRCLE-SCAN (DECLARE) SHOW.IP +(\GETFILEPTR SPREADAPPLY* -) TEDIT.BUILD.PCTB2 (CHARLOOKS.FROM.FONT \MAKEPCTB IDIFFERENCE GETEOFPTR +\DWIN \SMALLPIN SUB1 LLSH TEDIT.GET.PAGEFRAMES PLUS IMINUS \TEDIT.GET.CHARLOOKS.LIST2 ARRAY FLENGTH +\TEDIT.GET.PARALOOKS.LIST2 \TEDIT.GET.PARALOOKS FFETCHFIELD \BIN \TEDIT.GET.SINGLE.CHARLOOKS2) FIX ( +IPLUS) VARSBOUNDINFORM (APPEND ARGLIST GETPROP MAPCAR SELECTQ CONS CHECKTRAN VARSBOUNDINFORM GETLIS +MACROEXPANSION) CL:GENSYM (CL:MAKE-SYMBOL CL:CONCATENATE MKSTRING CL:1+) \VAMGetVAMPageFor (IPLUS +\PFGetAllocationMapPage) RPLSTRING (STRINGP MKSTRING + SUB1 \ADDBASE \PUTBASE \GETBASETHIN +\GETBASEBYTE PLUS) ENDPREAMBLE.IP (DREVERSE) XCL::GLOBALLY-NOTINLINE-P (GET) \SPAWN.CHAT (ADD.PROCESS) + MB.MARGINBAR.TABTRACK (DSPCLIPPINGREGION MSCALE LOGAND LOGOR LASTMOUSEX LASTMOUSEY MDESCALE) +EDITAPPLYTOLINK (TERPRI READ/NODE printout ERSETQ APPLY* DISPLAY/NAME) \TEDIT.APPLY.BOLDNESS (SELECTQ +IMAGEOBJPROP CONS) BKSYSCHARCODE (\PUTSYSBUF NCONC \GETREALSYSBUF \GETBASEFAT \GETBASE ADD1 LIST) +MSADDMODIFIER (MKLIST ASSOC GETHASH CONS LIST MAPC ADDTEMPLATEWORD) DSPYSCREENTOWINDOW (IDIFFERENCE +\GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM) BKSYSBUF (ADD1 \GETBASEFAT \GETBASE \GETBASETHIN +\GETBASEBYTE SUB1 IPLUS \GTREADTABLE TTY.PROCESS THIS.PROCESS PROCESS.EVALV FUNCTION) NEGATE (SELECTQ +CONS NEGLST NEGATE NEGC MAPLIST NEGL MKPROGN APPEND LIST) GC-FILING-DIRECTORY (CHCON1 +\ADD.CONNECTED.DIR \GETDEVICEFROMNAME \NSFILING.PARSE.FILENAME FUNCTION \NSGC.COLLECT.DIRECTORIES +TERPRI + NCHARS \NSFILING.GETFILE CONCAT) CL:LOAD (STREAMP CL::\OPENSTREAM-WITH-DEFAULT +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \LOAD-STREAM CL:INTERN STRING CL:FIND-PACKAGE) +\MAPPNAME (\GTREADTABLE \DTEST \MAPPNAME.INTERNAL) \TFBRAVO.EOLS (PLUS TEDIT.SETSEL) CHECKFPTOVP1 ( +\LOOKUPPAGEMAP PRIN1 RPFROMRPT IPLUS TERPRI) FB.SORTCOMMAND (MENU FB.GET.SORT.MENU SELECTQ FUNCTION +TB.COLLECT.ITEMS CL:POSITION HELP CL:NTH IDATE FB.CHECK.NAME.LENGTH SORT) PROCESS.EVALV ( +\COERCE.TO.PROCESS FIND.PROCESS THIS.PROCESS \MYALINK OPCODES \GETBASEPTR \STKSCAN) CHECKFPTOVP ( +\ADDBASE PLUS) \IRM.GET.KEYWORDS (PRIN1 GETPROMPTWINDOW GETHASHFILE \IRM.GET.HASHFILE) +\MAKEBRUSH.VERTICAL (BITMAPCREATE SUB1 FOLDHI LRSH IPLUS) MSADDRELATION (LIST MKLIST) CURRENT.WORD ( +\SYNCODE GETHASH \GETBASEBYTE FIRSTCHAR LIST TTNEXTCHAR) MDESCALE (QUOTIENT IQUOTIENT LLSH IDIFFERENCE + DIFFERENCE) TEDIT.BUILD.PCTB1 (CHARLOOKS.FROM.FONT \MAKEPCTB IDIFFERENCE GETEOFPTR \DWIN \SMALLPIN +SUB1 LLSH TEDIT.GET.PAGEFRAMES1 PLUS IMINUS \TEDIT.GET.PARALOOKS1 \BIN IPLUS CONS CREATEPCNODE) +COMPILER::ENV-ANALYZE-LABELS (COMPILER::ENV-ANALYZE COMPILER::LABELS-BODY MAPC COMPILER::LABELS-FUNS) +\TEDIT.APPLY.CHARLOOKS (WINDOWPROP ADD1 MBUTTON.FIND.NEXT.BUTTON \TEDIT.PARSE.CHARLOOKS.MENU) +COMPILER::ENV-ANALYZE-IF (COMPILER::ENV-ANALYZE COMPILER::IF-PRED COMPILER::IF-THEN COMPILER::IF-ELSE) + \GETREGION.CHECKBASEPT (APPLY*) MB.THREESTATE.DISPLAY (IMAGEOBJPROP DSPXPOSITION DSPYPOSITION +MB.SIZEFN BITMAPCREATE DSPCREATE FONTPROP IDIFFERENCE SUB1 IPLUS) FB.ALPHABETIC.ATTR (SELECTQ +ALPHORDER FB.NAMES.DECREASING.VERSION) GAINSPACE (POSITION ASKUSER LIST EVAL) EDITADDLINK ( +EDITAPPLYTOLINK FUNCTION WINDOWPROP) COROUTINE (SET STACKP EVALV STKNTH RETTO ENVEVAL) WARNUSER ( +RETDWIM2) FB.INSERT.SUBDIRECTORIES (STRING-EQUAL FB.MAKE.SUBDIRECTORY.ITEM) SHOWCHARS (RESETFORM +DSPFONT LOGAND PLUS CONCAT OCTALSTRING LRSH CHARACTER TERPRI) \IRM.WILDCARD (CONS UNPACK DUNPACK LIST) + TERM.IDENTIFY.SELF (PRIN3 FORCEOUTPUT) \TEDIT.PARSE.CHARLOOKS.MENU (MBUTTON.FIND.NEXT.BUTTON +\TEDIT.APPLY.BOLDNESS \TEDIT.APPLY.SLOPE \TEDIT.APPLY.ULINE \TEDIT.APPLY.STRIKEOUT \TEDIT.APPLY.OLINE +ADD1 IMAGEOBJPROP MBUTTON.NEXT.FIELD.AS.ATOM CONS U-CASE EVAL MKATOM SUBSTRING SUB1 STRPOS +MBUTTON.NEXT.FIELD.AS.NUMBER) COMPILER::ENV-ANALYZE-LAMBDA (COMPILER::ENV-ANALYZE COMPILER::LAMBDA-BODY + MAPC COMPILER::LAMBDA-OPTIONAL CL:SECOND COMPILER::LAMBDA-KEYWORD CL:THIRD) SPP.OPENP (GETSPPCON +FFETCHFIELD) \RPLCHARCODE (IGEQ \PUTBASEFAT \PUTBASE \PUTBASETHIN \PUTBASEBYTE IPLUS SUB1) WTFIX ( +WTFIX1) NTHCHAR (NTHCHARCODE FCHARACTER) COMPARE (GETDEF) \TFBRAVO.READ.USER.CM (LIST OPENP OPENSTREAM + CONCAT CONSTANT CHARACTER RATOMS NTHCHAR FASSOC NCONC \TFBRAVO.GETPARAMS) GNC (GNCCODE FCHARACTER) +CL::%%DO-TRANSLATE (CL:MAPCAR CL:FUNCTION CL:MAPCAN CL:GENSYM CONS CL:APPLY) GNCCODE (\GETBASECHAR +\GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE ADD1 SUB1 NTHCHARCODE) GLCCODE (SUB1 \GETBASECHAR +\GETBASEFAT \GETBASE IPLUS \GETBASETHIN \GETBASEBYTE NTHCHARCODE) \PRINTFPTOVP (GETSTREAM \ADDBASE +SUB1 PLUS \GETBASE \LOCKEDPAGEP TYPENAME SELECTC LRSH LIST CL:1+ \HILOC ADD1 PRIN1 TAB) STREQUAL (PLUS + \GETBASEBYTE \GETBASECHAR \GETBASEFAT \GETBASE \GETBASETHIN) TTDOTABS (IDIFFERENCE ITIMES +TTMAKECOMPLEXCHAR IQUOTIENT LIST PLUS) TYPENAME (NTYPX \ARRAYTYPENAME \INDEXATOMPNAME \GETDTD \ADDBASE + ITIMES) FB.PROMPTFORINPUT (\DTEST STRINGWIDTH WINDOWPROP + - NCHARS NTHCHARCODE SUBSTRING CONCAT SUB1 + CONSTANT CHARACTER ADD1 PLUS NLSETQ TTYINPROMPTFORWORD PRIN1) DWIMIFY (DWIMIFY0 OUTPUT RESETVARS +.RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) COMPILE (RESETLST) CLISPIFY ( +EVQ VARSBOUNDINEDITCHAIN LAST EXPRCHECK GETLOCALDEC CLISPIFY2 CLISPIFY1 CONS FMEMB LIST CLISPIFY2A) +L-CASE (WITH-RESOURCE ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE IPLUS IDIFFERENCE +\PUTBASEFAT \PUTBASE \PUTBASETHIN \PUTBASEBYTE PLUS CL:SYMBOL-PACKAGE \MKATOM GETRESOURCE NEWRESOURCE +ALLOCSTRING SUB1 \NSTRINGCHARS FFETCHFIELD CONS L-CASE) \DWIN (IPLUS LLSH \BIN) \LOCKFN (EVQ \LOCKCODE +) U-CASEP (ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE SUB1 IPLUS U-CASEP) \LOCKCODE ( +\LOCKWORDS UNFOLD LLSH \#BLOCKDATACELLS) \MAKEBRUSH.DIAGONAL (BITMAPCREATE SUB1 PLUS) \LOCKCELL ( +\LOCKPAGES PAGEBASE \VAG2 \HILOC LOGAND \LOLOC) SPPOUTPUTSTREAM (GETSPPCON FFETCHFIELD +\SPP.STREAM.LOST) RECORD (STKNTHNAME DECLARERECORD CONS SUB1) CL:1+ (+) TEDIT.UNDO.REPLACE (IPLUS) +%%MAKE-STRING-ARRAY-FAT (+ %%MAKE-ARRAY-STORAGE) CONCAT.IP (APPENDOP.IP) \TEDIT.TEXTBIN.STRINGSETUP ( +ADDBASE \ADDBASE UNFOLD LLSH IPLUS LRSH LOGAND) \TFBRAVO.INIT.PARALOOKS (IDIFFERENCE ASSOC IQUOTIENT +LIST) \LOCKWORDS (\LOCKPAGES PAGEBASE \VAG2 \HILOC LOGAND \LOLOC FOLDHI LRSH IPLUS) +LIST-ALL-BLOCKRECORDS (LIST) FIX-SUBR-NAME (CONCATCODES DREMOVE SUBST CHCON) ZEROD.FETCHFN (SLICEREF) +\ROUTINGTABLE.INFOHOOK (PROCESSPROP GETD FONTCREATE SELECTQ NTYPX CL:ERROR PLUS LENGTH \GETBASEPTR +\ADDBASE CREATEW GETBOXREGION WIDTHIFWINDOW TIMES CHARWIDTH HEIGHTIFWINDOW FONTPROP IMIN ADD1 CONCAT +FUNCTION OPENSTREAM WINDOWPROP OPENTEXTSTREAM) >= (CL::%%COMPARISON-MACRO) TEDIT.GET.OBJECT0 (\ATMIN +GETFILEPTR READIMAGEOBJ \TEDIT.UNIQUIFY.CHARLOOKS CHARLOOKS.FROM.FONT) \#BLOCKDATACELLS (NTYPX +IDIFFERENCE \ADDBASE IMINUS \ILLEGAL.ARG \GETDTD ITIMES HUNKSIZEFROMNUMBER LRSH) \LOCKVAR (\LOCKCELL +EVQ) \NSRANDOM.CLOSEFILE (LOGAND CONSTANT LOGOR) SPELLFILE (UNPACKFILENAME.STRING GETPROP HOSTNAMEP +FIXSPELL INFILEP PACKFILENAME.STRING MKATOM PACKFILENAME FILEDATE SPELLFILE.MATCHINGDIRS FUNCTION +DIRECTORYNAME LISTGET SPELLFILE.SPELL) FONTPROFILE (CONS ASSOC SELECTQ FONTCLASS) FORMAT-DO-ITERATION +(CL:CATCH) \PUTBASESTRING (\PUTBASESTRINGFAT SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE PLUS \PUTBASESTRING +MKSTRING) TERM.GODOWN (\DTEST + MOVETO IMAX - ITIMES) FB.PROMPTW.FORMAT (\DTEST CL:APPLY) \FORWARD.PUP + (\MAYBEPEEKPUP \GATEWAY.FORWARD.PUP \RELEASE.ETHERPACKET) \TEDIT.SHOW.CHARLOOKS (WINDOWPROP ADD1 +MBUTTON.FIND.NEXT.BUTTON \CHTOPC) \PUTBASESTRINGFAT (UNFOLD LLSH SUB1 \PUTBASEBYTE ADD1 \GETBASETHIN +\GETBASEBYTE IPLUS PLUS) AUTOCR? (IPLUS) \TEXTMENU.TOGGLE.DISPLAY (IMAGEOBJPROP DSPXPOSITION +DSPYPOSITION MB.SIZEFN BITMAPCREATE DSPCREATE FONTPROP IDIFFERENCE) GENSYM (STRINGP LITATOM CL:STRINGP + FIXP CHARCODEP ALLOCSTRING NCHARS IDIFFERENCE IPLUS \GS.INITBUF NTHCHARCODE PLUS ADD1 SUBSTRING +MKATOM) LOADFNS (RESETLST FILEPKGCHANGES FIXSPELL ERROR FMEMB LIST LOADFNS-MAKELIST LOADFNS-FINDFILE +OPENSTREAM INPUT FULLNAME ROOTFILENAME GET-ENVIRONMENT-AND-FILEMAP SELECTQ FILECOMS DREVERSE) +SCANFILE2 (CONS DREMOVE) \BrushFromWidth (LIST) ZEROD.STOREFN (SLICESET) COURIER.WRITE (\BOUT UNSIGNED + LOGAND SUB1 LLSH \HINUM \WOUT LISP.TO.ALTO.DATE GETPROP \GET.COURIER.TYPE ASSOC MKSTRING +\COURIER.TYPE.ERROR LENGTH COURIER.WRITE) GetBcplString (\GETBASEBYTE \MKATOM \GETBASESTRING MKATOM) +HOST&DIRECTORYFIELD (PACKFILENAME.STRING U-CASE FILENAMEFIELD) CLEAR-CLISPARRAY (SELECTQ CLRHASH) +DRAWAREABOX (PLUS DIFFERENCE BLTSHADE) AS.CHANGE.OWN.PASSWORDS (RESETLST AS.MAKE.CONVERSATION) +SetBcplString (NCHARS) ENDMASTER.IP (APPENDOP.IP) \TEDIT.TEXTBIN.FILESETUP (UNFOLD LLSH +\TEDIT.REOPEN.STREAM IPLUS GETEOFPTR LOGOR \PAGEDBIN \PAGEDPEEKBIN \BIN \PEEKBIN IMIN IDIFFERENCE) +\TEDIT.GET.CHARLOOKS.LIST (\SMALLPIN SUB1 LLSH IDIFFERENCE \TEDIT.GET.SINGLE.CHARLOOKS LIST PLUS) +LENGTH (ADD1) \NSRANDOM.OPENFILE (SHOULDNT \ILLEGAL.ARG \NSFILING.OPENFILE) POSTSCRIPT.HARDCOPYW ( +OPENPOSTSCRIPTSTREAM LIST COPY + - TIMES PLUS QUOTIENT DIFFERENCE FULLNAME) \SETARG0 (\MYALINK OPCODES + \PUTBASEPTR ADDSTACKBASE \VAG2 IPLUS UNFOLD LLSH SUB1 LISPERROR) BQUOTIFY (SELECTQ LIST MAPCONC +BQUOTIFY APPEND CONS) MSADDANALYZE (LIST GETHASH PUTASSOC PUTHASH CONS ASSOC) MISCN-NUMBER (ASSOC +ERROR) TEDIT.UNDO.MOVE (IPLUS PLUS FFETCHFIELD) \SETPUPCHECKSUM (\CHECKSUM SUB1 FOLDHI LRSH IPLUS) +\TEDIT.NEUTRALIZE.CHARLOOKS (WINDOWPROP ADD1) COMPILER::ENV-ANALYZE-CATCH (COMPILER::ENV-ANALYZE +COMPILER::CATCH-TAG COMPILER::CATCH-STMT) TTADDTAB (ADDCHAR TTMAKECOMPLEXCHAR LOGAND IQUOTIENT +IDIFFERENCE LIST PLUS) MB.MARGINBAR.DISPLAYFN (IMAGEOBJPROP IMAGEBOX DSPCREATE BITMAPCREATE +DSPCLIPPINGREGION IDIFFERENCE DSPXPOSITION DSPYPOSITION) \DOHARDRETURN1 (IPLUS PLUS FFETCHFIELD +ADDSTACKBASE \VAG2 \FREESTACKBLOCK IMOD - IDIFFERENCE) ADDTEMPLATEWORD (CONS MAKETABLE PUTASSOC) +TEDIT.GET.PAGEFRAMES (TEDIT.PARSE.PAGEFRAMES READ) INSPECTW.FETCH (APPLY* WINDOWPROP ERROR) +\GCSCANSTACK (OPCODES ADDSTACKBASE \VAG2 \STKREF \ADDBASE IPLUS UNFOLD LLSH PLUS FFETCHFIELD) +FB.INCREASING.NUMERIC.ATTR (ILESSP FB.NAMES.DECREASING.VERSION) \IRM.WILD.REF (WINDOWPROP PROG2 PRIN1 +GETPROMPTWINDOW \IRM.WILDCARD \IRM.GET.KEYWORDS \IRM.GET.REF MAPCAR LIST KWOTE CONCAT MENU) CL:COMPILE + (COMPILER::MAKE-ENV CL:MAKE-HASH-TABLE LIST COMPILER::RAW-COMPILE CL:SYMBOL-FUNCTION) +FORMAT-CONDITION (FORMAT-BOOLEAN-CONDITION FORMAT-FUNNY-CONDITION FORMAT-UNTAGGED-CONDITION) +TERM.ERASE.IN.DISPLAY (SELECTQ TERM.ERASEBITS - + MOVETO) CL:FUNCALL (CL:APPLY) \DECUSECOUNT (PLUS +FFETCHFIELD ADDSTACKBASE \VAG2 IDIFFERENCE IPLUS) DO?CMD (BACKSKREAD CHCON) MB.NB.DISPLAYFN ( +IMAGEOBJPROP DSPXPOSITION DSPYPOSITION BITMAPCREATE DSPCREATE IDIFFERENCE IPLUS) PTON10GRID ( +NEAREST/PT/ON/GRID) BMOBJ.PUTFN (IMAGEOBJPROP SPACES) \INCUSECOUNT (FREPLACEFIELD PLUS FFETCHFIELD +ADDSTACKBASE \VAG2) SCANEXP (CONS APPLY* READ EDIT4E NCONC1) COMP.STJUMP (SELECTQ SUB1 +OPT.COMPILERERROR IGEQ) XCCSSTRING (CONCAT OCTALSTRING LRSH LOGAND) \DOSTACKOVERFLOW (\SETUPUSERSTACK +\MOVEFRAME) GETSELECTEDITEMS (LIST) COMPILER::ENV-ANALYZE-CALL (COMPILER::ENV-ANALYZE COMPILER::CALL-FN + MAPC COMPILER::CALL-ARGS) \PROMPT.FOR.PUP.NUMBER (RESETLST PROVIDE.PROMPTING.WINDOW RESETBUFS PACK* +PROMPTFORWORD TERPRI TTYDISPLAYSTREAM) INSPECT/AS/BLOCKRECORD (LIST-ALL-BLOCKRECORDS printout PRIN1 +MENU FUNCTION INSPECT) \MOVEFRAME (+ PLUS \FREESTACKBLOCK IMOD - ADDSTACKBASE \VAG2 FFETCHFIELD) +BMOBJ.GETFN5 (BITMAPTEDITOBJ \READBINARYBITMAP READ) CONDITIONS::%%RESTART-DEFAULT-REPORTER (CL:FUNCALL +) \SETUPUSERSTACK (\MAKEFRAME FUNCTION ADDSTACKBASE \VAG2 ADD1 IDIFFERENCE FOLDLO LRSH) SLICESET (ARG +ASET IPLUS PLUS ITIMES) \COURIER.HANDLE.BULKDATA (CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) +TEDIT.GET.CHARLOOKS0 (\SMALLPIN SUB1 LLSH IDIFFERENCE PACK CHARACTER \BIN LIST PLUS ZEROP IMINUS +\STRINGIN NCHARS READ LOGAND FONTCREATE) \GATHER-CLEANUP-FORMS (\GATHER-CLEANUP-FORMS1) CONDITIONS:FIND-RESTART + (CL:FLET) TTYIN.SHOW.?ALTERNATIVES (CURRENT.WORD NLEFT \SYNCODE GETHASH \GETBASEBYTE LIST ADDCHAR +FIND.MATCHING.WORD TTCOMPLETEWORD INPART RESTORE.CURSOR) MBUTTON.FIND.NEXT.BUTTON (\CHTOPC CONS PLUS) +ERROR (ERRM-TO-CONDITION CONS ERROR! ERRORX) BMOBJ.INIT (IMAGEFNSCREATE FUNCTION) CONDITIONS:INVOKE-RESTART + (CONDITIONS:FIND-RESTART CL:ERROR SI::INVOKE-ACTUAL-RESTART) SCANDECLARECOLON (GETFILEPTR RATOM SUB1 +READ CONS EVAL) \AGE.ROUTING.TABLE (NTYPX CL:ERROR \GETBASEPTR DREMOVE \ADDBASE PLUS) \EXTENDSTACK ( +\DONEWPAGE ADDSTACKBASE \VAG2 IPLUS IDIFFERENCE) CL:PRINT (TERPRI CL:PRIN1) CONDITIONS:COMPUTE-RESTARTS + (CL:FUNCTION CL:NREVERSE) CONDITIONS:INVOKE-RESTART-INTERACTIVELY (CONDITIONS:FIND-RESTART CL:ERROR +CONDITIONS::RESTART-INTERACTIVE-FN SI::INVOKE-ACTUAL-RESTART CL:FUNCALL) \NSFILING.SETFILEINFO ( +\LISP.TO.NSFILING.ATTRIBUTE \NSRANDOM.SETEOFPTR \NSFILING.GET/SETINFO FUNCTION PRIN1) \RELEASE.IOCB ( +\HILOC ERROR PLUS \LOLOC) ONEDINSPECTW.CREATE (MAKE-INSPECTOR-PROFILE DEFAULTFONT DSPFONT XCL::PROFILIZE + CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES APPLY* GET-ONED-DISPLAYW GET-RIGHTW GET-TITLEW +WINDOWPROP ONEDINSPECT.ARRANGEWINDOWS FUNCTION) TEDIT.GET.PARALOOKS0 (\SMALLPIN SUB1 LLSH IDIFFERENCE +CONS \BIN SELECTC SHOULDNT SELECTQ LIST PLUS ZEROP) LISPFORM.SIMPLIFY (GETMACROPROP MACROEXPANSION +LISPFORM.SIMPLIFY GETHASH CONSTANTEXPRESSIONP KWOTE) SCANDEFINEQ (RETRYSCAN LCONC TCONC RATOM +GETFILEPTR SUB1 READ LIST CONS NCONC DEFINE DREMOVE ADD1) \VAMCheckEndOfVol (SUB1) NEAREST/MULTIPLE ( +ITIMES IQUOTIENT IPLUS IDIFFERENCE) CLIPRECTANGLE.IP (APPENDOP.IP) COMPILER::ENV-ANALYZE-BLOCK ( +COMPILER::ENV-ANALYZE COMPILER::BLOCK-STMT) TEDITFROMBRAVO (OPENTEXTSTREAM TEXTOBJ +\TFBRAVO.READ.USER.CM \TFBRAVO.INIT.PARALOOKS \TFBRAVO.INIT.CHARLOOKS GETFILEPTR \TFBRAVO.PARSE.PARA +\TFBRAVO.WRITE.PARAGRAPH INPUT) \HANDLE.RAW.PUP (\FORWARD.PUP \PUPSOCKET.FROM# \CHECKSUM SUB1 FOLDHI +LRSH IPLUS \LOCATE.PUPNET \ADD.ROUTING.TABLE.ENTRY PLUS FFETCHFIELD NOTIFY.EVENT) +\NSFILING.GETFILEINFO (\NSFILING.GET/SETINFO FUNCTION \FILING.ATTRIBUTE.TYPE ASSOC CONSTANT GETEOFPTR +LOGAND LOGOR GETFILEPTR SELECTQ FOLDHI LRSH IPLUS LIST \NSFILING.GETFILE \NSFILING.FILLIN.ATTRIBUTES +\NSFILING.GETFILEINFO.FROM.PLIST) CONDITIONS:CONTINUE (CONDITIONS:FIND-RESTART) +FB.DECREASING.NUMERIC.ATTR (IGREATERP FB.NAMES.DECREASING.VERSION) GETNODEFROMID (GETHASH ERROR FASSOC +) CODE.SUBPAIR (SUBPAIR) \COURIER.RESULTS (SELECTC GETWORD IPLUS LLSH \BIN COURIER.READ MAPCAR CONS +\GET.COURIERPROGRAM GETHASH LIST SELECTQ COURIER.SIGNAL.ERROR) TEDIT.GET.PAGEFRAMES1 ( +TEDIT.PARSE.PAGEFRAMES1 READ) CONDITIONS:INVOKE-DEBUGGER (DEBUGGER) NO.SIDEEFFECTS.FNP (LITATOM +GETPROP FMEMB) CONDITIONS:MUFFLE-WARNING (CONDITIONS:FIND-RESTART) \FIND.LOCALPUPHOSTNUMBER ( +\LOOKUPPUPNUMBER TERPRI \PROMPT.FOR.PUP.NUMBER OCTALSTRING) \NSRANDOM.READPAGES ( +\NSRANDOM.READ.SEGMENT \NSRANDOM.FETCH.CACHE IMIN - LOGAND CONSTANT LOGOR FOLDLO LRSH SUB1 + PLUS +\NSRANDOM.PREPARE.CACHE) CODE.SUBST (SUBST) INSTALLBRUSH (FASSOC ARRAY APPLY* PLUS CONS) +MSPRINTHELPFILE (INFILEP TERPRI INPUT INFILE LIST GETEOFPTR) \POLYSHADE.BLT (MAPCAR SORT CONS CRITSECT + IPLUS BLTSHADE IDIFFERENCE MAPC ADD1 IMIN NORMSECT) XCL::ADD-WHERE-IS-DATABASE (PATHNAME) +ARGS.COMMUTABLEP.LIST (EVERY ARGS.COMMUTABLEP) BREAKLINE (INSERTLINE) VAR.NOT.USED (ERRORX \VARNOTUSED +) CL:MAKUNBOUND (CL:PROCLAIM SET) \NSRANDOM.SESSION.WATCHER (THIS.PROCESS LIST FUNCTION LOGAND +CONSTANT LOGOR TIMES IMAX - \DAYTIME0 \CREATECELL) SI::NON-LOCAL-GO (SI::UNWIND-TO-BLIP CL:ERROR) +\GET-MY-BF (- \MYALINK OPCODES) SI::UNWIND-TO-BLIP (\MYALINK OPCODES \GETBASEPTR ADDSTACKBASE \VAG2 + +SI::VARIABLE-NAME-IN-FRAME SMALLP SI::PVAR-VALUE-IN-FRAME) TEDIT.HARDCOPY (PRINTERPROP PRINTERTYPE +TEDIT.FORMAT.HARDCOPY CONCAT TEDIT.PROMPTPRINT TEXTOBJ) \INIT-MISCN-TABLE (ARRAY \ADDBASE2 \ADDBASE) +EVALUABLE.CONSTANTP (CONSTANTEXPRESSIONP LISPFORM.SIMPLIFY LITATOM MEMB FUNCTION LIST EVAL +EVALUABLE.CONSTANTP APPLY CONS APPEND KWOTE CODE.SUBPAIR) BUTTONPANEL/SELECTION/FN (RPLACA) BOUNDP ( +\GETBASEPTR \STKSCAN) SETTTBLPROP (ECHOCONTROL SETSYNTAX DELETECONTROL CONTROL RAISE ECHOMODE) +POSTSCRIPT.PUTCOMMAND (ARG CL:FUNCALL FUNCTION PLUS) EVALUABLE.CONSTANT.FIXP (FIXP EVALUABLE.CONSTANTP +) GETMENUITEM (FNTH IPLUS ITIMES SUB1 IDIFFERENCE) ED (CONS CL:APPEND CL:MEMBER GETFILEPKGTYPE LIST +TYPESOF CL:FUNCTION GETPROPLIST INSTALL-PROTOTYPE-DEFN MENU CL:FORMAT ASKUSER) SI::NON-LOCAL-RETURN ( +ARG CL:VALUES-LIST LIST PLUS CL:ERROR) SLICEDIMENSION (FNTH ADD1) \TEDIT.APPLY.PARASTYLES (ASSOC +SASSOC APPLY* \TEDIT.PARSE.PARALOOKS.LIST APPEND CONS) DRAW/GRAPHNODE/BORDER (DRAWAREABOX ILEQ ERROR) +\VARNOTUSED.LIST (EVERY \VARNOTUSED) CL:SYMBOL-NAME (%%MAKE-ONED-ARRAY CL:ERROR) \UNDEFINED-MISCN-UFN +(TERPRI ERROR CL:FORMAT MISCN-COLLECT) \WALKOVER.SPECIALFORMS (SELECTQ EVERY \WALKOVER.SF.LIST LAST +\WALKOVER.FUNCTION APPLY* SHOULDNT) \VARNOTUSED (\VARNOTUSED.LIST MEMB \VARNOTUSED +\WALKOVER.SPECIALFORMS FUNCTION) MISCN-COLLECT (- \GETBASEPTR LLSH LIST PLUS) +SI::NON-LOCAL-RETURN-VALUES (CL:VALUES-LIST CL:ERROR) MB.MARGINBAR.SELFN (IMAGEOBJPROP IMAGEBOX MAPCAR + MSCALE IDIFFERENCE DSPCLIPPINGREGION ABS LOGAND LOGOR LASTMOUSEX LASTMOUSEY MAX MDESCALE IEQP MINUS +IMIN IABS IMINUS FIXR IPLUS CONS LDIFFERENCE LIST) GET (CL:GETF GETPROPLIST) +\TEDIT.CHARLOOKSMENU.CREATE (\TEXTMENU.DOC.CREATE APPEND LIST) \TEDIT.GET.PARALOOKS.LIST (\SMALLPIN +SUB1 LLSH IDIFFERENCE \TEDIT.GET.SINGLE.PARALOOKS LIST PLUS) %%MAKE-ONED-ARRAY ( +%%CML-TYPE-TO-TYPENUMBER %%MAKE-ARRAY-STORAGE) \DECL.COMNT.PROCESS (CONS) ARGS.COMMUTABLEP (LITATOM +LISPFORM.SIMPLIFY ARGS.COMMUTABLEP.LIST MEMB \WALKOVER.SPECIALFORMS FUNCTION) SPY.BUTTON (CREATEREGION + WIDTHIFWINDOW BITMAPWIDTH HEIGHTIFWINDOW BITMAPHEIGHT GETBOXREGION CREATEW FUNCTION) TWODINSPECTW.CREATE (MAKE-INSPECTOR-PROFILE DEFAULTFONT DSPFONT APPLY* XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES GET-TWOD-DISPLAYW GET-TOPW GET-RIGHTW GET-CORNERW -GET-TITLEW WINDOWPROP TWODINSPECT.ARRANGEWINDOWS FUNCTION) INIT-CML-READTABLES (CMLRDTBL -MAKE-READER-ENVIRONMENT CL:FIND-PACKAGE COPYREADTABLE PLUS SETBRK) GETCLEARINGHOUSE (WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION COURIER.BROADCAST.CALL) \\MATMULT444 (IPLUS FPLUS -FTIMES \\GETBASEFLOATP PLUS) SETFONT.IP (FFETCHFIELD) \\TEDIT.SCALE (FIXR FTIMES) EDITGRAPH2 (PRIN1 -LOGAND LOGOR ERSETQ GRAPHEDITCOMMANDFN TERPRI CLRPROMPT WINDOWPROP ZEROP) MENUWINDOW (FREPLACEFIELDVAL - NCREATE CONS FFETCHFIELD ADDMENU CREATEW CREATEREGION WIDTHIFWINDOW BITMAPWIDTH CHECK/MENU/IMAGE -HEIGHTIFWINDOW BITMAPHEIGHT FUNCTION) GET-ENVIRONMENT-AND-FILEMAP (FULLNAME GETHASH FRPLACA CL:VALUES -OPENP GETFILEPTR) \\DRAWARC.GENERIC (DRAWCURVE \\COMPUTE.ARC.POINTS DRAWCIRCLE) GLC (GLCCODE -FCHARACTER) DIGITSBDP (LISPERROR NTYPX FFETCHFIELD ADD1 IDIFFERENCE IGEQ LOLOC \\LOLOC FLOAT IPLUS -LLSH LRSH LOGAND PLUS SUB1 FLTINTLOG) CLISPCAR/CDR1 (SELECTQ FRPLACA CLISPLOOKUP LIST ADD1 FASSOC -SHOULDNT) SYMBOL.PNAME (ALLOCSTRING \\GETBASEPTR \\ADDBASE2 \\ADDBASE \\VAG2 IPLUS ITIMES LOGAND -\\GETBASEBYTE RPLSTRING FCHARACTER PLUS LOCAL SUBSTRING) \\MAKEFRAME (FFETCHFIELD \\DEFCELL \\ATOMCELL - \\SETUPSTACK1) HASH-LEFTANGLE (HASH-NO-PARAMETER-ERROR CL:ERROR CL:READ) EXTTOINT (IDIFFERENCE LRSH - - LOGAND IPLUS ADD1 \\MAKENUMBER) COMPILER:ENV-FBOUNDP (CL:LABELS COMPILER::FIND-FN) TTECHO.TO.FILE ( -GETSTREAM PRINTCCODE BOUTCCODE TTNEXTCHAR) BLTPATTERN.REPLACEDISPLAY (MIN + -) PORTSTRING (CONCAT -OCTALSTRING LRSH LOGAND) \\SET.VMEM.FULL.STATE (FFETCHFIELD) CL:SPECIAL-FORM-P (GET) TIMESPOW10 ( -DECLARE + CL:AREF IABS IMINUS -) EDITGRAPH (SHOWGRAPH) HASH-NUMBER-SIGN (CL:ASSOC CL:ERROR) -\\GETBASEFIXP (\\MAKENUMBER \\GETBASE \\ADDBASE) \\MAIKO.BITBLTSUB (OPCODES) SYMBOL.PACKAGE (LRSH -\\GETBASE \\ADDBASE2 \\ADDBASE T IPLUS ITIMES FFETCHFIELD \\PNAMECELL \\ATOMCELL \\GETBASEPTR LLSH) -GLOBAL-MACRO-FUNCTION (GET ARGTYPE GETPROP FUNCTION) RPLCHARCODE (FFETCHFIELD \\FATCHARCODEP IGREATERP - IPLUS \\PUTBASEFAT \\PUTBASE \\PUTBASETHIN \\PUTBASEBYTE %ARRAY-TYPE-NUMBER %ARRAY-BASE %ARRAY-OFFSET - SUB1 RPLCHARCODE MKSTRING) \\FILLBSPPUP (ALLOCATE.PUP LOCF \\ADDBASE) HASH-DOUBLEQUOTE (RSTRING) -HASH-S (CREATE-STRUCTURE CL:READ) CL::%COPY-TIME-STATS (CL::%MOVE-FIXP-FIELD MISCSTATS) \\CHECKSUM ( -LOGAND IPLUS16 \\LOLOC \\ADDBASE \\GETBASE PLUS LOGOR LLSH SUB1) FILLCIRCLE.IP (FILLNGON.IP) -\\10MB.INPUT.INTERRUPT (FFETCHFIELD \\10MB.GETPACKETSTATUS \\10MB.GETPACKETLENGTH LOCF \\ADDBASE SUB1 -ITIMES \\ALLOCATE.ETHERPACKET) SPY.BUFFER.ENTRY (LLSH \\GETBASEPTR \\VAG2 \\GETBASE) -COMPILER::ALPHA-COMPILER-LET (CL:EVAL CL:PROGV COMPILER::ALPHA-PROGN) \\DL.FAULTINIT (FUNCTION \\VAG2 -LRSH LLSH LOGAND FFETCHFIELD LOCF \\ADDBASE \\DL.DISKINIT) \\FAULTINIT (FFETCHFIELD IDIFFERENCE -\\MAKEFRAME \\DEFCELL \\ATOMCELL FUNCTION IPLUS) \\TEDIT.SUPERSCRIPT.CARET ( -\\TEDIT.PARSE.CHARLOOKS.LIST FFETCHFIELD) \\MAIKO.BLTCHAR (OPCODES) DINFO.FMENU.HANDLER (WINDOWPROP -MKATOM SUBSTRING FM.ITEMPROP SELECTQ DINFO.SPECIAL.UPDATE DINFO.FIND DINFO.LOOKUP SHOULDNT) -\\CONVERTNUMBER (IMINUS \\NSTRINGCHARS FFETCHFIELD SUB1 PLUS IREMAINDER + - IQUOTIENT SUBSTRING) -SLICEREF (ARG FFETCHFIELD CL:AREF IPLUS PLUS ITIMES) MSDWIMTRAN (GETHASH) GET-FILEMAP-FROM-FILECREATED - (NLSETQ READ GETEOFPTR SKIPSEPRCODES) \\MAIKO.FAULTINIT (FUNCTION \\VAG2 LRSH LLSH LOGAND LOCF -\\ADDBASE \\SETIOPOINTERS) INTTOEXT (IPLUS NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT -CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR IDIFFERENCE LOGAND LLSH1 SUB1 LLSH PLUS) -LOOKUP-ENVIRONMENT-AND-FILEMAP (GETHASH FRPLACA CL:VALUES) \\FILEMAP-HASHOVERFLOW (HARRAYPROP MEMB - -LENGTH SORT GET PLUS FRPLACA IMAX FIXR FTIMES) SI::ADD-OLD-STYLE-ADVICE (MAPC) SCALEPAGEXUNITS (FIXR -FTIMES \\TEDIT.PAPERWIDTH IPLUS) \\EXTNORMALIZE (IDIFFERENCE LOGAND LLSH PLUS ADD1 SUB1) -\\TEDIT.PARSE.CHARLOOKS.LIST (CHARLOOKS.FROM.FONT LISTGET FMEMB CONS NLSETQ \\DTEST \\TEDIT.FONTCOPY -FFETCHFIELD FREPLACEFIELDVAL NCREATE IPLUS FONTPROP IMINUS) \\FM.EDIT-MOVECARET ( -\\FM.EDIT-GETPOINTERINFO \\FM.ITEMPROP FFETCHFIELD IPLUS DSPXPOSITION) \\DOMISCAPPLY (\\DOMISCAPPLY1) -\\EXTFQUOTIENT (CL:VALUES LRSH LOGAND IPLUS LLSH PLUS IDIFFERENCE .SUBSMALL. ADD1 .LLSH1. LOGOR -\\EXTNORMALIZE) \\MP.ERROR (OPCODES RAID) HASH-BACKSLASH (CHARACTER.READ CL:ERROR) SET-FILL-POINTER ( -FFETCHFIELD CL:ERROR) FLTSTR (SUBSTRING GETRESOURCE NEWRESOURCE ALLOCSTRING CONCAT CL:VALUES MIN -LISPERROR NTYPX FFETCHFIELD ADD1 IDIFFERENCE IGEQ LOLOC \\LOLOC FLOAT IPLUS LLSH LRSH LOGAND PLUS SUB1 - FLTINTLOG - EXTTOINT CL:1- NCHARS CL:CHAR) FM.RESETSTATE (ERROR WINDOWPROP \\FM.NWAYPROP LISTGET -ASSOC \\FM.ITEMPROP FFETCHFIELD \\FM.INSUREFM \\FM.COERCEITEMPTR FM.GETITEM FM.CHANGESTATE) -\\KEYHANDLER (\\KEYHANDLER1) \\DOVE.FAULTINIT (FUNCTION \\VAG2 LRSH LLSH LOGAND FFETCHFIELD -\\PUTBASEPTR LOCF \\ATOMCELL \\ADDBASE CONSTANT \\HINUM \\LONUM |\\DoveDisplay.TurnOn|) CL:MACROEXPAND - (CL:MACROEXPAND-1 CL:VALUES) \\CONVERT.FLOATING.NUMBER (DECLARE WITH-RESOURCE CL:MACROLET - SUBSTRING - CL:1+ GETRESOURCE NEWRESOURCE CL:MAKE-ARRAY) TERM.ADDLINE (\\DTEST FFETCHFIELD - TERM.ERASEBITS) -\\MAIKO.PUNTBLTCHAR (\\CHAR8CODE LOGAND FFETCHFIELD \\CHARSET LRSH \\SLOWBLTCHAR IPLUS -\\DSPGETCHARIMAGEWIDTH \\GETBASE \\DSPGETCHARWIDTH DSPDESTINATION \\TOTOPWDS OPCODES) CL:COMPILE-FILE -(COMPILER:MAKE-CONTEXT COMPILER::MAKE-ENV CL:MAKE-HASH-TABLE CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION CL:PROBE-FILE CL:MERGE-PATHNAMES OPEN PATHNAME CL:MAKE-PATHNAME STRING FASL:OPEN-FASL-HANDLE -CL:MAKE-BROADCAST-STREAM SKIPSEPRCODES) \\SETIOPOINTERS (SETTOPVAL FFETCHFIELD LIST EMADDRESS OPCODES -LOCF \\ADDBASE UNFOLD LLSH SELECTC |\\DoveMisc.GetKBDBase| |\\DoveMisc.GetMouseXBase| -|\\DoveMisc.GetMouseYBase| |\\DoveDisplay.GetCursorBitmapBase| |\\DoveDisplay.ScreenWidth|) -LISPSOURCEFILEP (RESETLST RESETSAVE LIST OPENSTREAM GETFILEPTR) READVISE1 (CL:FLET READVISE-ENTRY -SI::CANONICALIZE-ADVICE-SYMBOL GET) SCALEPAGEYUNITS (FIXR FTIMES \\TEDIT.PAPERHEIGHT IPLUS) CL:LOG ( -QUOTIENT CL:LOG) CIRCSHADE.IP (FILLNGON.IP) \\TEDIT.PARSE.PARALOOKS.LIST (LISTGET FMEMB CONCAT CONS -FFETCHFIELD MAPCAR NCREATE) \\HANDLE.RAW.PACKET (RAND FFETCHFIELD \\RELEASE.ETHERPACKET) -ICMLARRAY.VALUECOMMANDFN (CONSTANT \\CREATE.INSPECTABLEMENU \\CREATE.SETABLEMENU ARG SLICERANK MENU -SELECTQ SLICEREF SHOULDNT CONCAT) SPY.DRAWBOX (DIFFERENCE BITBLT) MSPRGDWIM (RESETVARS .RESETLST. LIST - CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) CH.LIST.ORGANIZATIONS (COURIER.CALL -GETCLEARINGHOUSE PARSE.NSNAME CH.GETAUTHENTICATOR) COMPILER::ALPHA-CATCH (COMPILER::MAKE-CATCH -COMPILER::ALPHA-ARGUMENT-FORM COMPILER::ALPHA-PROGN) WALK-FORM (CL:FUNCTION WALK-FORM-INTERNAL) -\\SPPWATCHER (LIST FUNCTION THIS.PROCESS SETUPTIMER WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FFETCHFIELD NSOCKETEVENT IQUOTIENT TIMES \\SPP.HANDLE.INPUT \\SPP.SYSPKT ILESSP -\\LOLOC IDIFFERENCE IMAX - CLOCKDIFFERENCE) GETMENUITEM (FNTH FFETCHFIELD IPLUS ITIMES SUB1 -IDIFFERENCE) \\TEDIT.ITALIC.CARET.ON (\\TEDIT.PARSE.CHARLOOKS.LIST FFETCHFIELD) CL:MAKE-ARRAY (LIST -CL:ERROR LENGTH %TOTAL-SIZE %GET-CANONICAL-CML-TYPE CL:ARRAY-ELEMENT-TYPE + CL:ARRAY-TOTAL-SIZE -%MAKE-DISPLACED-ARRAY %MAKE-GENERAL-ARRAY %MAKE-ONED-ARRAY %MAKE-TWOD-ARRAY) CL::STEP-PRINT-VALUES ( -CL:TERPRI) PARSE-DEFMACRO (DECLARE) \\D01.ASSIGNBUFFERS (FFETCHFIELD EMPOINTER \\VAG2 UNFOLD LLSH -\\READRP PLUS IDIFFERENCE CEIL LOGAND IPLUS CONSTANT SUB1 LOGXOR IMOD TIMES FOLDLO LRSH IGEQ \\ADDBASE - IMIN IQUOTIENT) \\COPYSEL (FFETCHFIELD COPY FREPLACEFIELD) CL:MACRO-FUNCTION (LOCAL-MACRO-FUNCTION -GLOBAL-MACRO-FUNCTION) DIRECTORY.FILL.PATTERN (PACKFILENAME.STRING) \\GETPRESSFONTNAMES (\\FACECODE -\\PRESSFAMILYCODELST IQUOTIENT ITIMES \\BIN PLUS LLSH IPLUS LOGAND LRSH FASSOC ERROR -\\DECODEPRESSFACEBYTE \\WIN CONS LIST FIXR FQUOTIENT) \\NSRANDOM.PREPARE.CACHE (FFETCHFIELD LIST -NCREATE PLUS LAST CONS FRPLACA - CL:NTHCDR +) CHANGETRAN1 (COPY FIXDATUM GETPROP APPLY* SELECTQ LIST -CONS RECLISPLOOKUP REVERSE SUBST RECORDBINDVAL APPEND RECORDERROR EMBEDPROG CSUBST) ADDNAKEDCHAR ( -ADDCHAR SELCHARQ START.NEW.LINE BEEP AUTOCR? TTMAKECOMPLEXCHAR LIST TTADDTAB LOGOR) -|\\LFExtendFileIfNecessary| (LENGTH PLUS SUB1 CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION -FFETCHFIELD |\\LFExtendFile|) TERM.DOWN (\\DTEST FFETCHFIELD + MOVETO IMAX - ITIMES FREPLACEFIELD -TERM.DELETELINE) COMPILER::CRACK-DEFMACRO (CL:SECOND CL:THIRD CL:GENSYM) TTDELETECHAR (BEEP PREVLINE -OVERFLOWLINE? TTNLEFT DELETETO TTRUBOUT) \\PARSE.PORTCONSTANT (STRINGP MKSTRING SUB1 %ARRAY-OFFSET -FFETCHFIELD %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN -\\GETBASEBYTE LLSH IDIFFERENCE CONS LOGOR) STORETABLE (GETTABLE ADDTABLE SUBTABLE) TEDIT.INCLUDE ( -TEXTOBJ FFETCHFIELD \\TEDIT.MAKEFILENAME TEDIT.GETINPUT STREAMP OPENSTREAM GETFILEINFO OPENTEXTSTREAM -LIST \\TEDIT.GET.INSERT.CHARLOOKS \\CHTOPC \\SPLITPIECE \\GETBASEPTR \\FIRSTNODE IPLUS CONS -FREPLACEFIELD \\TEDIT.ORIGINAL.WINDOW.TITLE) CL:TRUNCATE (CL::%INTEGER-COERCE-MACRO) -COMPILER::ENV-BIND-FUNCTION (LIST COMPILER::ENV-FENV) SETRGB.IP (FFETCHFIELD) TEDIT.PARSE.PAGEFRAMES1 -(MAPCAR LIST \\TEDIT.SCALE CONSTANT FQUOTIENT FREPLACEFIELDVAL NCREATE TEDIT.PARSE.PAGEFRAMES1) -GRAPHDELETENODE (DREMOVE FRPLACA) BLTPATTERN (BITMAPWIDTH BITMAPHEIGHT MAX ITIMES IQUOTIENT) -TTDELETEWORD (BEEP PREVWORD PREVLINE MOVE.TO.WHEREVER BACKWARD.DELETE.TO) \\FIXLOCALNET (FFETCHFIELD -IPLUS LLSH) GETVERBTABLES (MAPCAR MSVBTABLES SHOULDNT LIST FASSOC) TEDIT.GET (TEXTOBJ TEXTPROP -FFETCHFIELD \\TEDIT.MAKEFILENAME TEDIT.GETINPUT \\TEXTSTREAM.FILENAME APPLY* FULLNAME RESETSAVE -TTYDISPLAYSTREAM CURSOR \\SHOWSEL \\TEXTCLOSEF OPENP OPENSTREAM TEDIT.BUILD.PCTB FREPLACEFIELD MAPC -EVAL \\TEDIT.ORIGINAL.WINDOW.TITLE \\TEDIT.GET.INSERT.CHARLOOKS \\FIXSEL TEXTSTREAM.TITLE -\\TEDIT.WINDOW.TITLE TEDITMENU.STREAM PACKFILENAME MBUTTON.SET.FIELD \\TEDIT.SET.WINDOW.EXTENT -\\TEDIT.PRIMARYW \\TEDIT.HISTORYADD CONS) COMPILER::MAKE-CHILD-ENV (COMPILER::MAKE-ENV) \\EXTFTIMES ( -IPLUS LLSH LRSH LOGAND LOGOR \\EXTNORMALIZE IDIFFERENCE) FM.HIGHLIGHTITEM (ERROR \\FM.INSUREFM -\\FM.COERCEITEMPTR \\FM.ITEMPROP FFETCHFIELD FM.GETITEM \\FM.HIGHLIGHTITEM) EDITDELETENODE (RESETFORM -TTYDISPLAYSTREAM CLRPROMPT WINDOWPROP READ/NODE |printout| TERPRI ASKUSER LIST DISPLAY/NAME CONSTANT -CONS APPEND TOLINKS GRAPHDELETELINK GETNODEFROMID FROMLINKS) \\COMPUTE.ARC.POINTS (FQUOTIENT IMIN IMAX - ABS FIX QUOTIENT TIMES PLUS FIXR COS SIN CONS LIST FPLUS) SCALEBM (BITMAPWIDTH BITMAPHEIGHT NUMBERP -MIN CL:* IQUOTIENT BITMAPCREATE) \\NSRANDOM.FETCH.CACHE (FFETCHFIELD FRPLACA) |\\VFMSplit1| ( -|\\VFMGetBufferFor| LOCF IQUOTIENT FFETCHFIELD \\ADDBASE IDIFFERENCE FREPLACEFIELD \\BLT MESASIZE) -|\\LFReturnNextFile| (FRPLACA) PRINT-READER-ENVIRONMENT (PRINT CONS FFETCHFIELD) CLISPATOM2D (GETHASH -MINUS CONS) \\BN.COMPAREN (\\BN.SIGN IMINUS IDIFFERENCE SHOULDNT) DMCHAT.NEWLINE (FREPLACEFIELD -FFETCHFIELD \\DTEST) \\DUMMYKEYHANDLER (FUNCTION) SYMBOL.VALUE (OLD.FIND.SYMBOL LOCAL NCHARS -\\GETBASEPTR VADDBASE IPLUS VVAG2 LLSH ITIMES LOGAND) \\10MB.OUTPUT.INTERRUPT (FFETCHFIELD -\\10MB.GETPACKETSTATUS) COMP.NAMEDLET (COMP.LAM1 CONS MAPCAR CAR LIST KWOTE COMP.CALL) FM.GETITEM ( -ERROR \\FM.GROUPPROP LISTGET FASSOC WINDOWPROP \\FM.ITEMPROP FFETCHFIELD) \\TEDIT.APPLY.PARALOOKS ( -FFETCHFIELD WINDOWPROP ADD1 MBUTTON.FIND.NEXT.BUTTON IMAGEOBJPROP CONS U-CASE MKATOM -MBUTTON.NEXT.FIELD.AS.TEXT MBUTTON.NEXT.FIELD.AS.NUMBER FIXR TIMES SORT MAPCAR) -XCL::PPRINT-DEFINER-RECURSE (DECLARE SUPERPRINT) NLAMBDAFNP (GETPROP GETLIS SELECTQ ARGTYPE FMEMB) -\\FLOATINGSCALE (- \\MAKEFLOAT) COMPILER::ALPHA-COMBINATION (DECLARE CL:FIRST COMPILER::ALPHA-FORM -COMPILER::EXPAND-OPENLAMBDA-CALL COMPILER::MAKE-CALL COMPILER::ALPHA-FUNCTION CL:MAPCAR CL:FUNCTION -COMPILER::ENV-INLINE-DISALLOWED ARGTYPE COMPILER::ALPHA-LITERAL) |\\LFRemoveDirEntry| (FFETCHFIELD -\\BOUT \\BIN PLUS SPREADAPPLY* IPLUS FORCEOUTPUT) \\SPP.SENDPKT (FFETCHFIELD LOCF \\ADDBASE -SEQ.GREATERP ILESSP \\LOLOC IDIFFERENCE SETUPTIMER UNFOLD LLSH) \\TEDIT.SUBSCRIPT.CARET ( -\\TEDIT.PARSE.CHARLOOKS.LIST FFETCHFIELD) \\CLOSELEAFCONNECTION (FFETCHFIELD LIST) CL::STEP-PRINT ( -CL:FORMAT MIN) \\FM.EDIT-DELETE (\\FM.ITEMPROP FFETCHFIELD LISTGET IPLUS FONTPROP LASTMOUSEX -LASTMOUSEY LOGAND ILESSP \\FM.EDIT-GETPOINTERINFO IDIFFERENCE MINUS \\FM.EDIT-STRDELETE SUB1 -STRINGWIDTH) \\MEDW.CARET.SHOW (FFETCHFIELD WFROMDS BITSPERPIXEL DSPDESTINATION IDIFFERENCE IPLUS -\\DSPTRANSFORMX \\DSPTRANSFORMY \\AREAVISIBLE? SUB1) \\BN.DIFFERENCE (\\BN.PLUS2 \\BN.MINUS) -SI::ADVICE-ADDTOCOM (ADDTOCOM1) XCL::PPRINT-DEFINER-FITP (COUNT FITP < + DSPXPOSITION STRINGWIDTH -DSPRIGHTMARGIN) FILLNGON.IP (FQUOTIENT IPLUS SUB1 TIMES SIN COS PLUS) CLISPLOOKUP (GETPROP GETLOCALDEC - CLISPLOOKUP0 SELECTQ GETATOMVAL) \\FM.EDIT-GETPOINTERINFO (IDIFFERENCE NCHARS PLUS CHARWIDTH -NTHCHARCODE CONS STRINGWIDTH SUBSTRING SUB1 ADD1) \\BN.LOGAND (\\BN.LOGAND LOGAND CONS) -TB.SHOW.COPY.SELECTION (BLTSHADE FFETCHFIELD TB.BOTTOM.OF.ITEM) CLISPATOM2C (FUNCTION CONS) -\\BN.LOGANDC2 (\\BN.LOGANDC2 LOGAND DIFFERENCE CONS) TERM.DELCHAR (\\DTEST FFETCHFIELD - + -TERM.ERASEBITS) LVLPRIN0 (SUB1 IPLUS) \\FM.EDIT-WORDDELETE (SUB1 \\FM.ITEMPROP FFETCHFIELD NTHCHARCODE - IPLUS STRINGWIDTH SUBSTRING MINUS FONTPROP \\FM.EDIT-STRDELETE DSPXPOSITION DSPCLIPPINGREGION -\\FM.EDIT-SCROLLAMOUNT IQUOTIENT WINDOWPROP \\FM.EDIT-UPDATEAFTERDELETE) XCL::%DEFINE-TYPE-SAVE-DEFN ( -GETFILEPKGTYPE CL:GETHASH) MSINIT (CONS HASHARRAY ASSOC SELECTQ MAKETABLE LIST) \\INIT.POWERS.OF.TEN ( -ARRAY CL:MAKE-ARRAY CL:AREF CONS IPLUS FTIMES IDIFFERENCE FQUOTIENT PLUS CL:* + -) CREATESCREEN ( -DSPCREATE BITMAPWIDTH BITMAPHEIGHT BITSPERPIXEL FUNCTION FREPLACEFIELDVAL NCREATE) FM.GETSTATE (ERROR -LIST WINDOWPROP LCONC LISTGET SELECTQ \\FM.ITEMPROP FFETCHFIELD) \\BN.LOGOR (CONS LOGOR \\BN.LOGOR) -%FLATTEN-ARRAY (CL:ARRAY-RANK CL:MAKE-ARRAY CL:ARRAY-TOTAL-SIZE CL:ARRAY-ELEMENT-TYPE) PRINTPARA ( -POSITION IDIFFERENCE IPLUS LINELENGTH PRINTPARA1) \\CHAIN.UP.RPT (\\ADDBASE SUB1 FFETCHFIELD -\\LOCKEDPAGEP PLUS) \\BN.LOGXOR (CONS LOGXOR \\BN.LOGXOR) LVLPRIN (LAST PRIN1 PRIN2) FIXDATUM (LIST -RECLISPLOOKUP MAKEACCESS ACCESSDEF RECORDERROR SELECTQ MKPROGN APPLY* GETPROP GETP REVERSE SHOULDNT -CONS PACK NCONC1 GETMACROPROP MACROEXPANSION SIMPLEP RECORDBIND APPEND) TEDIT.BUILD.PCTB (FFETCHFIELD -NCREATE CHARLOOKS.FROM.FONT \\CREATEPIECEORSTREAM TEXTPROP OPENSTREAM \\TEDIT.FORMATTEDP1 \\MAKEPCTB -\\TEDIT.UNIQUIFY.CHARLOOKS \\TEDIT.UNIQUIFY.PARALOOKS IDIFFERENCE GETEOFPTR FREPLACEFIELDVAL APPLY* -\\TEDIT.CONVERT.FOREIGN.FORMAT \\GETBASEPTR \\FIRSTNODE TEDIT.BUILD.PCTB0 TEDIT.BUILD.PCTB1 -TEDIT.BUILD.PCTB2 \\DWIN \\SMALLPIN SUB1 LLSH TEDIT.GET.PAGEFRAMES PLUS \\TEDIT.GET.CHARLOOKS.LIST -ARRAY FLENGTH \\TEDIT.GET.PARALOOKS.LIST \\TEDIT.GET.PARALOOKS \\BIN \\TEDIT.GET.SINGLE.CHARLOOKS -IPLUS GETFILEPTR) SUPERPRINTEQ (FASSOC) \\BN.PLUS2 (IDIFFERENCE FLENGTH APPEND \\BN.NZEROS \\BN.SIGN -\\BN.ISUM0 \\BN.ISUM1 ERROR) \\TEDIT.CARETLOOKS.VERIFY (TEXTPROP APPLY* FFETCHFIELD -\\TEDIT.UNIQUIFY.CHARLOOKS) \\REMOVE-DECLS (CL:FUNCTION CL:MACROEXPAND-1 ENVIRONMENT-VARS LIST* -CL:VALUES) COMP.SETARG (COMP.LOOKUPVAR COMP.STFN LIST TIMES SUB1 COMP.CALL CONS KWOTE) -\\SEND.ANSWERING.RFC (ALLOCATE.PUP FFETCHFIELD LOCF \\ADDBASE IPLUS UNFOLD LLSH) \\BN.TIMES2 ( -\\BN.SIGN LIST IPLUS FLENGTH IDIFFERENCE CONS PLUS \\BN.IDIVIDE ITIMES) ADDTO (FASSOC FMEMB LIST) -%PATHNAME-EQUAL (%PATHNAME-HOST %PATHNAME-DEVICE %PATHNAME-DIRECTORY %PATHNAME-NAME %PATHNAME-TYPE -CL:EQUAL %PATHNAME-VERSION) \\BN.DIVIDE (CONS \\BN.QRS \\BN.FROM.FIXP FLENGTH IDIFFERENCE \\BN.SIGN -PLUS IMINUS IQUOTIENT IPLUS ITIMES \\BN.TIMES2 \\BN.IDIVIDE) \\RECODECCODE (CL:SVREF LRSH LOGAND) -CL::SIMPLE-STRING= (%STRING-LENGTH + %STRING-BASE-COMPARE) \\10MBWATCHER (SUBSTRING -\\MAIKO.INPUT.INTERRUPT PLUS) CL:BIT-VECTOR-P (FFETCHFIELD) \\BN.FLOAT (FPLUS FTIMES \\BN.FLOAT ERROR -SHOULDNT) \\BN.FROM.FIXP (FFETCHFIELD \\BN.DIFFERENCE \\BN.FROM.FIXP IPLUS \\BN.MINUS \\BN.IGNN IMINUS -) FM.CHANGESTATE (ERROR WINDOWPROP \\FM.NWAYPROP LISTGET ASSOC \\FM.INSUREFM \\FM.COERCEITEMPTR -\\FM.ITEMPROP FFETCHFIELD FM.GETITEM BITBLT \\FM.DISPLAYBITMAP FM.CHANGELABEL) \\SPP.OTHER.BOUT ( -\\BOUT SPPOUTPUTSTREAM \\SPP.STREAM.LOST) \\M44ACTONVMEMFILE (IPLUS EMPOINTER \\VAG2 \\GETBASE -\\WHICHPART IMIN SUB1 ADD1 IDIFFERENCE \\LOLOC \\LOOKUPFMAP \\ADDBASE PLUS LOCF \\ACTONVMEMPAGES -\\GETBASEPTR LLSH IMINUS FFETCHFIELD RAID) \\TEDIT.SELECT.ALL (TEDIT.SETSEL ADD1 FFETCHFIELD) -\\BN.INTEGERLENGTH (IPLUS CONSTANT INTEGERLENGTH SUB1 \\BN.INTEGERLENGTH SHOULDNT) \\D01.FAULTINIT ( -FUNCTION FFETCHFIELD SIGNED SUB1 LLSH IDIFFERENCE LOCF \\ADDBASE EMADDRESS OPCODES UNFOLD CONSTANT -SMALLP ERROR \\PUTBASEPTR \\ATOMCELL LOADBYTE LOGAND LSH IMINUS MASK.1\'S IPLUS |RWMufMan| PLUS -\\D01.ASSIGNBUFFERS) U-CASECODE (CL:CHAR-INT CL:CHAR-UPCASE CL:INT-CHAR) SPECVARS (APPEND UNION) -CENTERPRINTINREGION (EVERY NUMBERP DSPCLIPPINGREGION CENTERPRINTINAREA) \\BIGNUM.TO.INT (IPLUS ITIMES -\\BIGNUM.TO.INT) WINDOWWORLD (\\INSURESCREEN FFETCHFIELD \\TTY.CREATING.DISPLAYSTREAM CREATEW FUNCTION - CONS MAPC EVAL) ICMLARRAY.TITLECOMMANDFN (MODERNWINDOW.BUTTONEVENTFN FUNCTION) \\BN.2TH (\\BN.QRS -CONS) CIRCSHADE.DISPLAY (\\CIRCSHADE.DISPLAY ERROR) TTYINENTRYFN (LOGAND WINDOWPROP FUNCTION -GIVE.TTY.PROCESS) \\INITBFS (\\ADDBASE IDIFFERENCE EMPOINTER \\VAG2 FFETCHFIELD LOCF FREPLACEFIELD -IQUOTIENT IPLUS) DSUBLIS (SUBLIS DSUBLIS) \\DSKDISPLAY.REPAINTFN (DIRECTORYNAME TERPRI MAPC -|\\PFGetVols| |printout| |\\PFVolumeNumber| |\\PFFetchString| LOCF \\ADDBASE FFETCHFIELD) \\LOOKUPPORT - (\\GETMISCSOCKET ALLOCATE.PUP EXCHANGEPUPS FFETCHFIELD LOCF \\ADDBASE IQUOTIENT FOLDLO LRSH - TERPRI -CONS LIST PLUS GETPUPSTRING) CL:ARRAY-DIMENSIONS (LIST FFETCHFIELD CL:ERROR) SI::ADVISE-CONTENTS ( -CL:LENGTH CL:SECOND CL:INTERSECTION) SETCOLOR16.IP (IQUOTIENT ITIMES BITMAPCREATE FFETCHFIELD IPLUS -SELECTQ) PRINTPARA1 (PRINTPARA1 ADD1 IPLUS NCHARS) XCL::%DEFINER-NAME (CL:FUNCALL GET) -\\MAIKO.NEWFAULTINIT (IDIFFERENCE \\VAG2 LRSH LLSH LOGAND) MAKE.LOCAL.ATOM (ALLOCAL CL:INTERN -CL:FIND-PACKAGE CL:MAKE-PACKAGE) XCL::GET-DEFINER-NAME (CL:VALUES CL:INTERN CL:CONCATENATE STRING -CL:SYMBOL-PACKAGE) CLISPBROADSCOPE1 (DWIMIFY2? LIST FRPLACA DWIMIFY1?) \\NSRANDOM.READ.SEGMENT ( -FFETCHFIELD + UNFOLD LLSH PLUS LOGAND CONSTANT LOGOR - FILING.CALL COURIER.CREATE LIST FUNCTION ASSOC -DREMOVE) SUBLIS (CONS SUBLIS FASSOC COPY) XCL::%DELETE-DEFINER (GET) PARSE-BODY (CL:VALUES CL:REVERSE) - COMP.ARG (COMP.PROGN COMP.LOOKUPVAR COMP.STFN OPCOUNT ADD1 \\FINDOP IDIFFERENCE LIST LLSH SUB1 -COMP.CALL CONS KWOTE) \\SEND.ENDREPLY (SENDPUP FFETCHFIELD \\FILLRTPPUP) \\SETNEWTIME0 (\\DAYTIME0 -CREATECELL IABS IMINUS IDIFFERENCE DATE PRIN1) MSPRGLST (MAPC MSPRGE) CH.LIST.PROPERTIES ( -COURIER.EXPEDITED.CALL CH.FINDSERVER PARSE.NSNAME CH.GETAUTHENTICATOR) \\TRANSLATE-CL\:LAMBDA (CONS -PLUS MAKE-KEYWORD LIST PARSE-BODY) EDITDELETELINK (EDITAPPLYTOLINK FUNCTION WINDOWPROP) UNDOLISPX3 ( -RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION LISTGET1 EDITL FASSOC - FMEMB) CL::STEP-FORM (+ CL:VALUES-LIST) CLISPATOM2A (CONS FIXSPELL DWIMIFY1) FSETVAL (FREPLACEFIELD -\\VALCELL \\ATOMCELL) \\BN.TO.FIXP (\\BN.COMPAREN CONSTANT \\BN.FROM.FIXP FREPLACEFIELDVAL NCREATE -\\BIGNUM.TO.INT SHOULDNT) \\COERCEASCIITONSFONT (\\DTEST FFETCHFIELD \\CREATESTARFONT CONS -\\GETCHARSETINFO \\GETBASEPTR UNFOLD LLSH \\CREATECHARSET \\GETBASE \\CHARSET LRSH PRIN1 PLUS ASSOC -\\PUTBASE \\FGETWIDTH \\CHAR8CODE LOGAND LIST) XCL::%REMOVE-SPECIAL-FORM (/REMPROP) TEDIT.PAGEFORMAT ( -TEXTOBJ FFETCHFIELD LIST \\TEDIT.ORIGINAL.WINDOW.TITLE) \\M-VMEMSAVE (FFETCHFIELD LOGNOT16 LOGXOR) -\\FM.EDIT-BACKUP (SUB1 CHARWIDTH NTHCHARCODE \\FM.ITEMPROP FFETCHFIELD MINUS DSPXPOSITION -DSPCLIPPINGREGION \\FM.EDIT-SCROLLAMOUNT IQUOTIENT WINDOWPROP IDIFFERENCE IPLUS FONTPROP -\\FM.EDIT-STRDELETE \\FM.EDIT-UPDATEAFTERDELETE) CONSTANTOK (IPLUS NCHARS CONSTANTOK SUB1) -COMPILER::ALPHA-ARGUMENT-FORM (COMPILER::ALPHA-FORM) \\DOCOMPRESSVMEM (DLFPFROMRP SUB1 FFETCHFIELD -\\GETBASE PLUS) \\SPP.CREATE.STREAM (FREPLACEFIELDVAL NCREATE FUNCTION) TRIM.BITMAP (FFETCHFIELD SUB1 -PLUS BITMAPCREATE ADD1 IDIFFERENCE) \\TEDIT.STRIKEOUT.SEL.ON (TEDIT.LOOKS) SKIP/ZAP (U-CASECODE -SELECTC IMINUS SHOULDNT SCANBACK TTNLEFT SCANFORWARD TTNEXTCHAR FRPLACA) MAKE-UNICODE-FORMATS (SELECTQ - SHOULDNT FUNCTION FREPLACEFIELDVAL NCREATE \\INSTALL.EXTERNALFORMAT) \\BN.MINUS (CONS IMINUS -\\BN.MINUS SHOULDNT) |\\LFFindNextFile| (|\\LFDirectorySearch| \\GETFILEPTR SPREADAPPLY* FFETCHFIELD -\\BIN \\WIN IPLUS LLSH LIST PLUS |\\LFFileName| CONS CONCAT SUBSTRING) COMPILER::ALPHA-BLOCK ( -COMPILER::MAKE-BLOCK CONS COMPILER::BLOCK-STMT COMPILER::ALPHA-PROGN) UNCOPYATOM (SYMBOL.PNAME -PACKAGE.NAME SYMBOL.PACKAGE MAKE.LOCAL.ATOM) TERM.LEFT (\\DTEST FFETCHFIELD MOVETO IMAX - ITIMES -FREPLACEFIELD) \\MAIKO.ASSIGNBUFFERS (\\LOLOC \\ADDBASE PLUS IPLUS LLSH \\HILOC LRSH UNFOLD) -CLISPBROADSCOPE (CONS ADD1 SUB1 LDIFF) \\NSRANDOM.CHECK.CACHE (LENGTH HELP LAST) SI::ADVICE-NEWCOM ( -DEFAULTMAKENEWCOM) COMMON-LISP (\\EVAL-PROGN) \\TEDIT.GET.INSERT.CHARLOOKS (FFETCHFIELD IMAX IMIN -SELECTQ SUB1 SHOULDNT \\CHTOPC \\TEDIT.UNIQUIFY.CHARLOOKS CHARLOOKS.FROM.FONT FINDNODE-INDEX INDEX -\\LASTNODE FREPLACEFIELDVAL NCREATE \\TEDIT.CARETLOOKS.VERIFY) \\DSKDISPLAY.BUTTONEVENTFN (LOGAND -\\DSKDISPLAY.REPAINTFN DSKDISPLAY MENU FREPLACEFIELDVAL NCREATE CONS) \\RTP.ERROR (FFETCHFIELD PRIN1) -NETDATE (GDATE ALTO.TO.LISP.DATE NETDAYTIME0 \\DAYTIME0 CREATECELL) MSPRGLAMBDA (SELECTQ CONS -MAKE-KEYWORD GETTEMPLATE CL:NREVERSE MSPRGTEMPLATE1 MSPRGTEMPLATE ASSOC CL:FUNCALL INCLISP MSDWIMTRAN) - SETCOLORLV.IP (BITMAPCREATE BITMAPWIDTH BITMAPHEIGHT IPLUS ITIMES SUB1 BITMAPBIT PLUS NUMBERP SELECTQ -) \\TEXTSTREAM.FILENAME (TEXTOBJ FFETCHFIELD PACKFILENAME) /SETTERMTABLE (SETTERMTABLE LIST) -MAKEISOFORMAT (\\MAKERECODEMAP \\INSTALL.EXTERNALFORMAT FUNCTION FREPLACEFIELDVAL NCREATE) -START.NEW.LINE (INSERTLINE) CHANGEFONT (DSPFONT) |\\PFTrimHelper| (FFETCHFIELD FREPLACEFIELDVAL -NCREATE |\\PFDsplyVolumes|) \\TRANSMIT.STRATEGY (IMIN FFETCHFIELD IQUOTIENT ILEQ LSH PLUS SELECTC LOCF - \\ADDBASE LIST BSPHELP FREPLACEFIELD) SEMI-COLON-COMMENT-P (SELECTQ) TERM.ERASE.TO.EOL (\\DTEST -FFETCHFIELD TERM.ERASEBITS -) \\10MB.BROADCASTP (FFETCHFIELD LOCF \\ADDBASE) \\FM.EDIT-FINDFIRST ( -WINDOWPROP \\FM.ITEMPROP FFETCHFIELD) CL::STEP-EVAL (CL:VALUES-LIST) COMPILER::ALPHA-ATOM ( -COMPILER::ALPHA-LITERAL COMPILER::RESOLVE-VARIABLE-REFERENCE) BMOBJ.CREATE.MENU (CONS FREPLACEFIELDVAL - NCREATE) \\TEDIT.STRIKEOUT.SEL.OFF (TEDIT.LOOKS) PRINENDLINE (MOVETO + DSPYPOSITION DSPLINEFEED -IMAGESTREAMTYPE TTYDISPLAYSTREAM SETFONT QUOTIENT - DSPXPOSITION REMAINDER) \\EVAL-PROGN (\\EVAL-PROGN - CL:EVAL) NUMBERPAD.READER.DECODE (NUMBERP SELECTQ TEDIT.GETSYNTAX) SUPERPRINT (\\GETSTREAM ASSOC -TYPENAME APPLY* PRIN2STRING IDIFFERENCE WIDTH STRINGWIDTH DSPXPOSITION IMIN PRIN2S SUPERPRINT/COMMENT -SUPERPRINT0 GETHASH) INVERT.BITMAP.VERTICALLY (FFETCHFIELD BITMAPCOPY SUB1 IQUOTIENT IDIFFERENCE -BITMAPBIT PLUS) \\TEDIT.UNDERLINE.SEL.OFF (TEDIT.LOOKS) \\LEAF.HANDLE.INPUT (LOCF \\ADDBASE \\DEQUEUE -FFETCHFIELD SHOULDNT PLUS RELEASE.PUP LOGAND LIST FUNCTION KWOTE) \\DL.NEWFAULTINIT (FFETCHFIELD -\\VAG2 LRSH LLSH LOGAND SUB1 \\ADDBASE DLFPFROMRP \\GETBASE PLUS + IMIN ADD1 IMAX UNFOLD - -|\\DoveDisplay.ScreenWidth| CONSTANT EXPT TIMES3 FOLDLO FOLDHI IPLUS IMOD RPTFROMRP IDIFFERENCE -DLRPFROMFP \\READFLAGS \\READRP) COPYATOM (CL:SYMBOL-PACKAGE CONCAT CL:PACKAGE-NAME HELP LOCAL NCHARS -%ARRAY-BASE FFETCHFIELD %ARRAY-OFFSET IPLUS NTHCHARCODE PLUS \\ATOMDEFINDEX NTYPX \\LOLOC SHOULDNT -\\MKATOM) \\CIRCSHADE.XSCAN.IP (IDIFFERENCE ITIMES IPLUS ADD1 SUB1) \\BN.IGNN (LIST IQUOTIENT -IDIFFERENCE ITIMES CONS \\BN.FROM.FIXP) DEFAULTWHENSELECTEDFN (STKEVAL STKPOS) \\BN.ABS (\\BN.SIGN -\\BN.MINUS) |\\LFHighestVersions| (LIST) FITP (CHARWIDTH BLANKS TIMES - DSPXPOSITION + DSFIT1 DSFIT2) -DMCHAT.CLEAR (\\DTEST FFETCHFIELD TERM.HOME) \\BN.SIGN (SHOULDNT \\BN.SIGN) \\DSKDISPLAY.CREATE.WINDOW - (CREATEW IPLUS ITIMES FONTPROP LENGTH |\\PFGetVols| CONS FUNCTION WINDOWPROP) \\SEND.ABORT ( -ALLOCATE.PUP IPLUS LOCF \\ADDBASE FFETCHFIELD) \\TEDITPARAMENU.CREATE (\\TEXTMENU.DOC.CREATE) -BESTPUPADDRESS (ASSURE.PUP.READY \\FIXLOCALNET CONS \\PARSE.PORTCONSTANT LRSH \\LOCALPUPNETNUMBER LIST - GETHASH PUTHASH \\LOOKUPPORT \\LOCATE.PUPNET PLUS PRIN1) MSPRGTEMPLATE (GETMACROPROP) FLENGTH (ADD1) -|\\PFSaveBuffers| (|\\VFMSaveBuffer|) FM.ITEMPROP (ERROR LIST ARG \\FM.GETITEMPROP \\FM.PUTITEMPROP) -TEDITMENU.STREAM (\\TEDIT.MAINW ATTACHEDWINDOWS WINDOWPROP TEXTSTREAM) EDITCHANGELABEL (WINDOWPROP -GETSTREAM CONSTANT CONS PRIN1 READ/NODE |printout| TERPRI GRAPHCHANGELABEL FRPLACA) /SETREADTABLE ( -SETREADTABLE LIST) \\8859PEEKCCODEFN (\\XCCSPEEK \\PEEKBIN \\BIN IDIFFERENCE -\\NSIN.24BITENCODING.ERROR UNFOLD LLSH ACCESS-CHARSET LOGOR CL:VALUES \\RECODECCODE) -\\FM.EDIT-SETUPTTBL (COPYTERMTABLE PLUS) TEDIT.INSERT.OBJECT (TEXTOBJ FFETCHFIELD SELECTQ SHOULDNT -IMIN ADD1 \\CHTOPC FREPLACEFIELDVAL NCREATE IMAGEOBJPROP \\SPLITPIECE IDIFFERENCE WINDOWPROP CONS -IPLUS FREPLACEFIELD \\TEDIT.ORIGINAL.WINDOW.TITLE SUB1) \\CIRCSHADE.DISPLAY (FILL.INITTBLE IDIFFERENCE - ITIMES IPLUS ADD1 SUB1) CLISPATOM1B (CONS LIST GETHASH) SETMAINTPANEL (SELECTC FREPLACEFIELD OPCODES) - \\TEDIT.WINDOW.SETUP (WINDOWPROP FUNCTION LISTGET LIST \\TEDIT.ORIGINAL.WINDOW.TITLE FFETCHFIELD -GETPROMPTWINDOW) \\ITEMW.CLEARSELECTION (WINDOWPROP) XCL::UNDOABLY-MAKUNBOUND (SAVESET /PUTHASH -/REMPROP) TB.CONSIDERRANGE (IMIN IMAX TB.NTH.ITEM PLUS) |\\LFFindInfo| (REVERSE FRPLACA -|\\LFOpenOldFile| |\\LFReadFileID| FFETCHFIELD FREPLACEFIELDVAL NCREATE CONS GETFILEINFO) TERM.ADDCHAR - (\\DTEST FFETCHFIELD - + TERM.ERASEBITS) \\BN.IDIVIDE (CONS IQUOTIENT IREMAINDER) ERASEMENUIMAGE ( -BITBLT WINDOWPROP IDIFFERENCE FFETCHFIELD BITMAPWIDTH CHECK/MENU/IMAGE BITMAPHEIGHT) -DISPLAY/NUMBER/READER/TOTAL (WINDOWPROP RADIX CENTERPRINTINREGION MKSTRING NCHARS STRPOS SUB1 -DIFFERENCE SUBSTRING PLUS CONCAT) BIGNUM.DEFPRINT (CONS CONCAT CHARACTER FFETCHFIELD \\CHECKRADIX -\\INVALID.RADIX SELECTQ TIMES \\BN.TH2D \\BN.QRS IPLUS IMOD IQUOTIENT LENGTH FRESHLINE \\OUTCHAR) -GETFILEPKGTYPE (GETFILEPKGTYPE LIST TYPESOF SELECTQ FMEMB - NCHARS FIXSPELL UNION ERROR) |\\VFMMerge1| - (\\BLT MESASIZE |\\VFMGetBufferFor| FFETCHFIELD SUB1 ILESSP IPLUS \\ADDBASE IQUOTIENT IDIFFERENCE -LOCF) \\SPP.CREATE.STREAMS (\\SPP.CREATE.STREAM FUNCTION FFETCHFIELD CONS) INVERT.BITMAP.HORIZONTALLY -(FFETCHFIELD BITMAPCOPY SUB1 IQUOTIENT IDIFFERENCE BITMAPBIT PLUS) \\TEDIT.UNDERLINE.SEL.ON ( -TEDIT.LOOKS) \\LEAF.ACKED (FFETCHFIELD FREPLACEFIELD PLUS) \\FM.EDIT-MESSAGE (SELECTQ) -TB.RECONSIDERRANGE (IMIN IMAX TB.NTH.ITEM PLUS) CIRCSHADE.BLT (\\CIRCSHADE.BLT ERROR) \\INVALID.RADIX -(ERROR) \\NSRANDOM.STREAM.CHANGED (LIST FULLNAME LOGAND FFETCHFIELD CONSTANT LOGOR \\GETACCESS IMAX -ASSOC FOLDLO LRSH IMOD FREPLACEFIELD) ROTATE.IP (APPENDOP.IP) \\SETBSPTIMEOUT (SETUPTIMER FFETCHFIELD -IMAX FREPLACEFIELD) \\BN.TH2D (LIST IQUOTIENT IDIFFERENCE ITIMES CONS ABS IPLUS REVERSE) WINDOWADDPROP - (WINDOWPROP LIST CONS REMOVE NCONC1 APPEND) CL:IF (\\EVAL) COMP.PUSHCALL (CONS ADD1 COMP.EXP1) -\\SEND.RFC (ALLOCATE.PUP IPLUS UNFOLD LLSH LOCF \\ADDBASE FFETCHFIELD TIMES) NETDAYTIME0 ( -\\NET.SETTIME) MSPRGTEMPLATE1 (SELECTQ MSPRGE MSPRGTEMPLATE1 MSBINDVAR MSPRGLAMBDA MSPRGLST MSPRGCALL -MSPRGTEMPLATE ADDTO MAPC IDIFFERENCE LENGTH MSPRGMACRO EVAL CONS GETRELATION MEMQ) SCALE2.IP ( -APPENDOP.IP) TEXTSTREAM.TITLE (TEXTOBJ FFETCHFIELD) GRAPHCHANGELABEL (APPLY* PROMPTINWINDOW) /RAISE ( -RAISE LIST) \\8859INCCODEFN (CL:VALUES \\RECODECCODE \\XCCSIN \\BIN IDIFFERENCE -\\NSIN.24BITENCODING.ERROR UNFOLD LLSH ACCESS-CHARSET LOGOR IMINUS) SEEFILE (OPENP OPENSTREAM SUB1 -GETEOFPTR BIN CONCAT CHARACTER IPLUS TERPRI PLUS) |\\LFWriteLeaderPage| (|\\PFGetVol| FFETCHFIELD -|\\PFFindPageAddr|) CLISPATOM1A (GETPROP GETP ADD1 SUB1 LIST) \\MAIKO.DO.MOVDS (MAPC \\DEFCELL -\\ATOMCELL UNINTERRUPTABLY FFETCHFIELD FREPLACEFIELD) \\CARET.FLASH.AGAIN (TTYDISPLAYSTREAM KEYDOWNP -FRPLACD) \\TEDIT.FIND.FIRST.LINE (WINDOWPROP FFETCHFIELD \\TEDIT.PARABOUNDS SUB1 \\BACKBIN PLUS ADD1 -IMIN \\FORMATLINE) COMP.APPLY* (FRPLACA ARGTYPE COMP.EXP1 CONS) SLICERANK (LENGTH FFETCHFIELD) -SEGMENT.BIT.LENGTH (PLUS FCHARWIDTH CHARWIDTH) COLLECT.CHILD.NODES (GETNODEFROMID LIST) CLISP\ ( -BLIPVAL STKNTH EVAL) ETHERPORT (\\FIXLOCALNET CONS \\ILLEGAL.ARG \\PARSE.PORTCONSTANT LIST GETHASH -PUTHASH \\LOOKUPPORT ERROR) CLISPATOM2 (GETPROP GETP LIST CLISPATOM2C DWIMIFY2? LDIFF LISTGET1 MAPCONC - CONS CLISPANGLEBRACKETS APPLY* NLEFT CLISPCAR/CDR CLISPATOM2D SELECTQ CLISPRECORD CLISPLOOKUP APPEND -DWIMERRORRETURN PRINT MINUS NEGATE) MASKSTROKE.IP (APPENDOP.IP) MBUTTON.SET.FIELD (TEXTOBJ FFETCHFIELD - MBUTTON.FIND.BUTTON MBUTTON.FIND.NEXT.FIELD FINDNODE-INDEX MKSTRING NCHARS) EDITCHANGEFONT ( -WINDOWPROP PRIN1 READ/NODE |printout| TERPRI) COMP.BLOCK (COMP.PROG CONS COMP.BIND.VARS ADD1 SELECTQ -LIST FRPLACD COMP.UNBIND.VARS) \\CIRCSHADE.IP (IDIFFERENCE ITIMES IPLUS ADD1 SUB1) CL:EVAL (CL:FUNCALL -) REPLACESTKARG (REPLACESTKARG NTH STACKP SETSTKARG FRAMESCAN) CL::STEP-COMMAND (CL:EVAL CL:EVALHOOK -LIST) \\BN.ISUM1 (IPLUS CONS \\BN.ICANON DREVERSE) SI::ADVICE-DELDEF (DECLARE REMHASH) -\\BSP.SENDBUFFER (FFETCHFIELD IPLUS LOCF \\ADDBASE PLUS SUB1 IDIFFERENCE IMINUS FREPLACEFIELD SENDPUP) - \\CIRCSHADE.BLT (DSPOPERATION IDIFFERENCE ITIMES IPLUS ADD1 SUB1) \\10MBENCAPSULATE (LOCF \\ADDBASE + - FOLDHI LRSH IPLUS) NUMBERPAD.READER.HANDLE.CHAR (WINDOWPROP SELECTQ FIX SUB1 MKSTRING MKATOM -SUBSTRING PLUS STRPOS IQUOTIENT MINUS FLOAT NCHARS ABS ADD1 FQUOTIENT EXPT DIFFERENCE TIMES) SPY.TITLE - (CONCAT FFETCHFIELD) \\BN.ISUM0 (\\BN.IDIVIDE IPLUS CONS REVERSE) \\EVAL-INVOKE-LAMBDA (ADDSTACKBASE -\\VAG2 - \\MYALINK OPCODES FFETCHFIELD +) \\SPP.DEFAULT.ERRORHANDLER (SELECTQ ERROR FFETCHFIELD -GETSPPCON \\COURIER.OUTPUT.ABORTED \\EOF.ACTION) INVERT.BITMAP.DIAGONALLY (FFETCHFIELD BITMAPCREATE -SUB1 BITMAPBIT PLUS) \\TEDIT.UCASE.SEL (TEDIT.SEL.AS.STRING FFETCHFIELD U-CASE FRPLACA) -\\LEAF.FIX.BROKEN.SEQUIN (FFETCHFIELD \\GETDEVICEFROMNAME FREPLACEFIELD LOCF \\ADDBASE OPENPUPSOCKET -\\SEQUIN.RETRANSMIT LIST PRIN1 FDEVOP SPREADAPPLY* \\LEAF.RECONNECT FUNCTION \\LEAF.REPAIR.BROKEN.PUP -\\LEAF.USE.NEW.CONNECTION TERPRI SETUPTIMER .NAMEORSTREAM.) DINFO.FMW.CLOSEFN (WINDOWPROP DINFOGRAPH -FFETCHFIELD REMOVEPROMPTWINDOW) SHOW.MATCHING.PAREN (BACKSKREAD FIND.LINE + SEGMENT.BIT.LENGTH -\\SYSBUFP TIMES \\CARET.DOWN) COMP.EVALFORM (CONS ADD1 LIST SUB1 COMP.STRETURN) \\SEND.END (SENDPUP -FFETCHFIELD \\FILLRTPPUP) \\TEDIT.APPLY.SLOPE (SELECTQ IMAGEOBJPROP CONS) MSPRGERR (ADDTO) /RPLACA ( -LIST RPLACA ERRORX) \\BN.D2TH (REVERSE IPLUS ITIMES IMINUS CONS) /RADIX (RADIX LIST) \\8859OUTCHARFN ( -\\FILEOUTCHARFN \\RECODECCODE) /DSUBST (COPY) \\INSURESCREEN (\\ILLEGAL.ARG) ONEDINSPECT.REPLACE ( -WINDOWPROP) /NCONC (ARG ADD1 LAST) SI::ADVICE-PUTDEF (MAPCAR LIST SI::CANONICALIZE-ADVICE-WHEN-SPEC -SI::CANONICALIZE-ADVICE-WHERE-SPEC CL:COPY-TREE CL:GETHASH CONS SI::MAKE-ADVICE SI::ADVICE-BEFORE -CL:MAPCAR CL:FUNCTION SI::ADVICE-AFTER SI::ADVICE-AROUND XCL:READVISE-FUNCTION CL:FIRST CL:THIRD) -\\DL.UNMAPPAGES (\\ADDBASE \\GETBASE FFETCHFIELD PLUS) LISPXTAB (LIST CONS TAB) EDITMODE ( -TTYDISPLAYSTREAM SELECTQ) TWODINSPECT.REPLACE (WINDOWPROP) \\NSFILING.INIT (FUNCTION FREPLACEFIELDVAL -NCREATE DEFPRINT) XCL::%EXPAND-DEFINER (CL:FUNCALL GET) /NCONC1 (/NCONC FRPLACD CONS) /RPLACD (LIST -RPLACD ERRORX) DREVERSE (FRPLACD) \\BN.NZEROS (LIST PLUS) TB.CONTIGUOUS.SELP (TB.NTH.ITEM PLUS) -DMCHAT.RIGHT (+ \\DTEST FFETCHFIELD MOVETO FREPLACEFIELD DMCHAT.NEWLINE) ITEM.WINDOW.SET.STACK.ARG ( -SELECTQ MENU FREPLACEFIELDVAL NCREATE CONS STACKP ERSETQ ITEMOFPROPERTYVALUE FRAMESCAN RESETSAVE -\\ITEMW.FLIPITEM LIST TTY.PROCESS THIS.PROCESS CLRPROMPT |printout| PRIN1 EVAL READ INSPECTW.REPLACE) -CLISPRECORD (GETLOCALDEC LIST SHOULDNT RECORDTRAN NCONC FRPLACA RECLISPLOOKUP CONS CONSFN) -\\INTERPRET-ARGUMENTS (CL:MACROLET RECUR WITH-BINDING LIST PLUS EVENP - CL:EVAL) SI::ADVICE-GETDEF ( -CL:GETHASH CL:APPEND MAPCAR SI::ADVICE-BEFORE CONS CL:COPY-TREE SI::ADVICE-AFTER SI::ADVICE-AROUND) -TREEGRAPHNODE (LIST NODECREATE CONS SUB1 FFETCHFIELD TREEGRAPHNODE APPEND) DINFO.CREATE.FMENU ( -FFETCHFIELD FONTP FREEMENU) MENUBUTTONFN (LOGAND LOGOR WINDOWPROP MENU.HANDLER) COMP.PUSHNILS (CONS -ADD1) \\BSP.FLUSH.SOCKET.QUEUES (FFETCHFIELD FREPLACEFIELD) \\TEDIT.APPLY.ULINE (SELECTQ IMAGEOBJPROP -CONS) \\BN.MADD (\\BN.IDIVIDE ITIMES IPLUS CONS) MSPRGRECORD (SELECTQ GETPROP CL:THIRD CL:FIFTH -CL:FOURTH RECORDFIELDNAMES LIST RPLACA MAPC ADDTO) CH.DELETE.MEMBER.FROM.PROPERTY.ACL ( -CH.CANONICAL.NAME PARSE.NSNAME CH.GETAUTHENTICATOR COURIER.CALL CH.FINDSERVER CH.PROPERTY -COURIER.FETCH) /PUTHASH (LIST GETHASH PUTHASH) \\SPP.CREATE.CON (OPENNSOCKET + LOGOR LOGAND DAYTIME -NSOCKETNUMBER FREPLACEFIELDVAL NCREATE FUNCTION CREATE.EVENT SETUPTIMER ARRAY LOCF \\ADDBASE SUB1) -ROTATE.BITMAP.RIGHT (FFETCHFIELD BITMAPCREATE SUB1 IDIFFERENCE BITMAPBIT PLUS) \\TEDIT.SUBSCRIPTSEL ( -TEDIT.LOOKS LIST) INTERLISPMODE (XCL:COPY-PROFILE LIST) /DEFINE (DEFINE) COURIER.READ (SELECTQ GETWORD - IPLUS LLSH \\BIN SIGNED SUB1 IDIFFERENCE GETLONG \\MAKENUMBER \\WIN COURIER.READ.STRING -ALTO.TO.LISP.DATE GETPROP CL:FUNCALL \\GET.COURIER.TYPE COURIER.READ \\COURIER.UNKNOWN.TYPE LIST PLUS -COURIER.READ.SEQUENCE MAPCAR CONS) COMP.GETBASE (COMP.VAL CONS LIST COMP.VALN PLUS COMP.EFFECT HELP -COMP.STFN) CLUNARYMINUS? (FIXSPELL1 CONS NCONC LIST RETDWIM2) FASL::DUMP-BITMAP (BITMAPWIDTH -BITMAPHEIGHT BITSPERPIXEL FFETCHFIELD FASL::HANDLE-STREAM) \\LEAF.TIMEDIN (FFETCHFIELD FREPLACEFIELD) -TB.DECONSIDERRANGE (IMIN IMAX TB.NTH.ITEM PLUS) ICMLARRAY.SETVALUE (MAINWINDOW SLICERANK WINDOWPROP -XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES RESETLST RESETSAVE TTYDISPLAYSTREAM - TTY.PROCESS THIS.PROCESS CLEARBUF PRINTOUT PRIN1 CL:FUNCALL LISPXREAD) \\BN.TH2B (CONS \\BN.MADD) -TERM.DELETELINE (\\DTEST FFETCHFIELD + - TERM.ERASEBITS) \\DO.PROGV (PLUS IPLUS CEIL LOGAND ADD1 -UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDHI LRSH \\DO.PROGV.SETUP.FRAME.AND.EXECUTE CL:FUNCALL) -SCRATCHCONS (FRPLACA CONS) \\DL.MARK.PAGES.UNAVAILABLE (RPTFROMRP IDIFFERENCE \\ADDBASE LLSH PLUS) -RECURSIVE.COLLECTDESCENDENTS (COLLECT.CHILD.NODES NCONC CONS RECURSIVE.COLLECTDESCENDENTS) SCALEREGION - (FIX FTIMES CONS) \\FM.STARTEDIT (RESETLST RESETSAVE LIST WINDOWPROP \\FM.EDIT-ITEM \\FM.ITEMPROP -FFETCHFIELD FUNCTION) \\FAULTHANDLER (\\FAULTINIT \\VAG2 LOGAND FFETCHFIELD) ISET.IP (APPENDOP.IP) -I.S.OPR (U-CASE L-CASE GETP LIST GETPROP CONS) SEGMENT.LENGTH (PLUS) ETHERHOSTNUMBER ( -\\LOCALPUPADDRESS BESTPUPADDRESS) WHILEDO1 (APPEND LIST CONS) \\FM.CREATEW (COPY LISTGET CREATEW -CREATEREGION WIDTHIFWINDOW HEIGHTIFWINDOW) RESETUNDO (LISTGET1 CONS LIST LISTPUT1 FLENGTH UNDONLSETQ1) - GETCP.IP (APPENDOP.IP) \\BN.ICANON (IPLUS IDIFFERENCE ITIMES) READ/NODE (DSPCLIPPINGREGION LOGAND -LOGOR CURSORPOSITION NODELST/AS/MENU ZEROP) \\BN.QRS (CONS REVERSE \\BN.IDIVIDE IPLUS ITIMES) -/PUTASSOC (ERRORX LIST CONS) PRINTLINE (FFETCHFIELD PRIN1 TERPRI IMIN \\GETCH \\BIN CHARACTER PLUS) -\\SIMPLIFY.CL.ARGLIST (LIST) CLBINARYMINUS? (CONS NCONC LIST RETDWIM2 /RPLNODE MINUS) WHILEDOUNTIL ( -LAST LDIFF CONS WHILEDO1 NCONC WHILEDOUNTIL) \\PUPINIT (PACK* GETD INITPUPLEVEL1) |\\LFVersions| (CONS - FIXP GREATERP SORT \\GETFILEPTR SPREADAPPLY* FFETCHFIELD EQL \\BIN \\WIN IPLUS LLSH LIST) LASTC ( -\\GETSTREAM FFETCHFIELD FCHARACTER) TERM.UP (\\DTEST FFETCHFIELD MOVETO IMIN + ITIMES FREPLACEFIELD) -\\RTP.HANDLE.RFC (LOCF \\ADDBASE FFETCHFIELD LIST \\RTP.ACTION IPLUS SENDPUP) \\TEDIT.APPLY.STRIKEOUT -(SELECTQ IMAGEOBJPROP CONS) CL:LOAD (STREAMP CL::\\OPENSTREAM-WITH-DEFAULT CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION \\LOAD-STREAM CL:INTERN STRING CL:FIND-PACKAGE) MSBINDVAR (CONS MSPRGERR) -|\\PFPutPage| (|\\PFTransferFilePage|) FASL::DUMP-STRUCTURE (TYPENAME) LISPX (CLOCK GETTOPVAL PRINT -READLINE LIST CHCON1 LASTC LISTGET1 FASSOC HISTORYSAVE UNDOLISPX LISPXFIND UNDOLISPX2 NCONC IPLUS -FLENGTH GETPROP LISPXREAD FIXSPELL CONS SHOWPRINT CL:VALUES-LIST APPEND LISPXUSEC FMEMB LDIFF -RESETVARS .RESETLST. CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION EDITFPAT MAPRINT UNION SELECTQ -NLEFT NUMBERP COPY GETSTREAM APPLY* STREAMPROP LISPXFIX LISPXUSE LISPXGETINPUT LISPXUSE0 EVAL -LISPXREADBUF) ROTATE.BITMAP.LEFT (FFETCHFIELD BITMAPCREATE SUB1 IDIFFERENCE BITMAPBIT PLUS) -\\TEDIT.SUPERSCRIPTSEL (TEDIT.LOOKS LIST) \\LEAF.TIMEDOUT (FFETCHFIELD \\SEQUIN.FLUSH.CONNECTION -\\LEAF.STREAM.IN.QUEUE PRIN1 +) /DEFINEQ (DEFINE) BSPBOUT (\\BOUT \\DTEST FFETCHFIELD) FREEVARS (CALLS -) \\PEEKREFILL (FFETCHFIELD SELECTQ STKNAME IMINUS \\CHARSET LRSH \\RAISECHAR IDIFFERENCE \\CHAR8CODE -LOGAND \\ECHOCHAR BIN LOCF \\ADDBASE) BREAKDOWN (NLAMBDA.ARGS SUBSET GETD ADD1 MAPC BREAK0 PRINT -NCONC1 CONS BRKDWNSETUP BRKDWNARRAY ARRAY NCREATE PLUS BRKDWNCLEAR MAPCAR CAR) \\INVALIDADDR ( -\\MP.ERROR) SI::MAKE-AROUND-BODY (CL:REDUCE CL:FUNCTION) LAYOUTGRAPH (STRINGWIDTH HALF LRSH FONTPROP -BROWSE/LAYOUT/LATTICE BROWSE/LAYOUT/HORIZ BROWSE/LAYOUT/HORIZ/COMPACTLY LIST FRPLACD NUMBERP ERROR -EQMEMB) COMPILE (RESETLST) \\FILLPOLYGON.IP (LENGTH TRAJECTORY.IP APPENDOP.IP) \\LOOKUPPAGEMAP ( -\\GETBASE LRSH IPLUS LOGAND) XCL::MAKE-UNDOABLE (LIST) RATOM (\\GTREADTABLE FUNCTION WITH-RESOURCE -\\SUBREAD \\GETSTREAM FFETCHFIELD GETRESOURCE NEWRESOURCE ALLOCSTRING) /SETPROPLIST (LIST GETPROPLIST -SETPROPLIST) LISPXUNREAD (APPEND CONS) \\SUBREAD (SELECTC LIST UNFOLD LLSH ACCESS-CHARSET SELECTQ -SYSTEMTYPE %ARRAY-BASE FFETCHFIELD \\SYNCODE GETHASH \\GETBASEBYTE \\NSIN \\DTEST \\XCCSIN \\BIN -IDIFFERENCE \\NSIN.24BITENCODING.ERROR LOGOR CL:FUNCALL \\NSPEEK \\XCCSPEEK \\PEEKBIN LOGAND -\\CHECKEOLC SELCHARQ UNINTERRUPTABLY \\BACKXCCSCHAR PLUS SUB1 \\SUBREADCONCAT \\PUTBASECHAR -\\PUTBASEFAT \\PUTBASE \\PUTBASETHIN \\PUTBASEBYTE CONS \\SMASHSTRING ALLOCSTRING \\EOFP SPREADAPPLY* -\\PARSE.NUMBER %ARRAY-OFFSET LISPERROR \\READ.SYMBOL RPLACD \\FIND.PACKAGE.INTERNAL \\GETBASESTRING -\\SUBREAD CL:CODE-CHAR \\RSTRING2 \\GETREADMACRODEF RELEASERESOURCE GETRESOURCE NEWRESOURCE -\\APPLYREADMACRO LAST) TERM.MODIFY.ATTRIBUTES (\\DTEST FFETCHFIELD) LISPXREAD (LISPXREADBUF READ -APPLY* EDITE) MSUSERVBTABLES (GETHASH) \\FM.SETATTACHPOINT (MAPC \\FM.ITEMPROP LISTGET FFETCHFIELD -\\FM.ATTACHPOINT CONS FIX FPLUS FQUOTIENT ITIMES IDIFFERENCE) CHECK-KEYWORDS (CL:ERROR) \\INVALIDVP ( -\\MP.ERROR) UPPERCASEARRAY (ARRAYP CASEARRAY IDIFFERENCE CONSTANT PLUS) \\SETTYPEMASK (\\GETDTD -\\ADDBASE ITIMES FFETCHFIELD LOGOR FUNCTION) LOWERCASE (/PUT CONS APPLY* GETPROP) \\CLEARWORDS (SUB1 -\\ADDBASE IDIFFERENCE) \\INITBIGNUMS (\\TYPENUMBERFROMNAME LOGOR \\BN.FROM.FIXP FREPLACEFIELDVAL -NCREATE) /ATTACH (/RPLNODE CONS ERRORX LIST) PEEKCCODE (FUNCTION \\GETSTREAM \\PEEKCCODE SELCHARQ -SELECTC UNINTERRUPTABLY \\DTEST \\XCCSIN \\BIN IDIFFERENCE \\NSIN.24BITENCODING.ERROR UNFOLD LLSH -ACCESS-CHARSET LOGOR CL:FUNCALL FFETCHFIELD \\PEEKBIN \\BACKXCCSCHAR PLUS SUB1 \\NSPEEK \\XCCSPEEK) -FILEPKGCOM (ARG FILEPKGCOM NCONC LIST GETTOPVAL ASSOC SELECTQ GETPROP FASSOC CONS SUBST ERROR ADD1 -FMEMB /SETTOPVAL REMOVE PLUS MARKASCHANGED) DISPTREE (TREEGRAPHNODE NUMBERP SHOWGRAPH LAYOUTGRAPH LIST - CL:FUNCTION) DINFO.ICONFN (WINDOWPROP TITLEDICONW) CL:KEYWORDP (CL:SYMBOL-PACKAGE) \\RTP.FILTER ( -FFETCHFIELD LOCF \\ADDBASE \\HINUM \\LONUM) MSPRGCALL (ADDTO SELECTQ) CH.ADD.MEMBER.TO.PROPERTY.ACL ( -CH.CANONICAL.NAME PARSE.NSNAME CH.GETAUTHENTICATOR COURIER.CALL CH.FINDSERVER CH.PROPERTY -COURIER.FETCH) FASL::DUMP-FLOAT32 (FASL::WRITE-OP \\BOUTS FASL::HANDLE-STREAM) LISPX/ (ARGTYPE GETPROP - LISPX/1 FASSOC) \\TOP-LEVEL-READ (\\DTEST FUNCTION FFETCHFIELD CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. CL:FUNCTION .CALL.SUBREAD. \\SUBREAD \\GETSTREAM GETRESOURCE NEWRESOURCE ALLOCSTRING) - \\SEND.ACK (ALLOCATE.PUP IMAX IDIFFERENCE FFETCHFIELD IPLUS LOCF \\ADDBASE ITIMES) -\\ALLOCATE.ETHERPACKET (\\DEQUEUE LOCF \\ADDBASE FOLDHI LRSH IPLUS SUB1 NCREATE) READC (\\GTREADTABLE -FUNCTION FCHARACTER \\INSTREAMARG \\GETSTREAM \\INCCODE \\CHECKEOLC SELCHARQ SELECTC UNINTERRUPTABLY -\\DTEST \\XCCSIN \\BIN IDIFFERENCE \\NSIN.24BITENCODING.ERROR UNFOLD LLSH ACCESS-CHARSET LOGOR -CL:FUNCALL FFETCHFIELD \\PEEKBIN \\BACKXCCSCHAR PLUS SUB1 \\NSIN FREPLACEFIELD) COMPILER::UPDATE-ENVIRONMENT - (DECLARE) ADDCHAR (TTBITWIDTH AT.END.OF.LINE TTBOUT BLTCHAR TTYDISPLAYSTREAM PLUS FRPLACA IDIFFERENCE -) \\SPP.CREATE.WATCHER (CREATE.EVENT CREATE.MONITORLOCK ADD.PROCESS LIST FUNCTION KWOTE FREPLACEFIELD) - INTERACT&SHIFT.BITMAP.LEFT (RNUMBER SHIFT.BITMAP.LEFT) \\TEDIT.SMALLER.CARET ( -\\TEDIT.PARSE.CHARLOOKS.LIST FFETCHFIELD) \\LEAF.WHENCLOSED (FFETCHFIELD \\DEQUEUE \\GETDEVICEFROMNAME -) \\TRANSFERPAGE (LOGAND \\READFLAGS LOGNOT16 LOGXOR \\ADDBASE LLSH \\VAG2 LRSH RPFROMRPT IPLUS LOCF) -\\DL.ASSIGNBUFFERS (\\LOLOC \\ADDBASE PLUS IPLUS LLSH \\HILOC LRSH \\READRP UNFOLD) READP (\\GETSTREAM - FFETCHFIELD FDEVOP SPREADAPPLY* \\GENERIC.READP) MENUREPAINTFN (WINDOWPROP REVERSE BLTMENUIMAGE) -\\PUTBASEFIXP (SELECTC NTYPX \\LOLOC FFETCHFIELD LISPERROR ADD1) FILLTRIANGLE (IMAGESTREAMTYPE -\\FILLPOLYGON.IP FILLPOLYGON) BREAK0 (CL:SECOND BREAK-FUNCTION CL:FIRST CL:THIRD MAPCONC BREAK0) -SCANFORWARD (U-CASECODE FIRSTCHAR SUB1VAR TTNEXTCHAR) COLLECTDESCENDENTS (RESETLST RESETSAVE -RECURSIVE.COLLECTDESCENDENTS) SHRKFY2 (LIST) \\ASSURE.FPTOVP.PAGE (FFETCHFIELD IMOD IDIFFERENCE -\\ADDBASE CEIL LOGAND IPLUS CONSTANT SUB1 LOGXOR) READCCODE (\\GETSTREAM FDEVOP SPREADAPPLY* -FFETCHFIELD) BREAK1 (STKNTH CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION DEBUGGER MAKE-CONDITION -CL:EVAL) GRAPHADDNODE (APPLY* DEFAULT.ADDNODEFN NCONC1 FRPLACA) \\MAXWIDTHOFGROUP (PLUS) ADVISEWDS ( -FFETCHFIELD UNFOLD LLSH IDIFFERENCE DSPCLIPPINGREGION IPLUS DSPLINEFEED CONS DSPRIGHTMARGIN WINDOWPROP - PROCESS.TTY LIST FUNCTION IQUOTIENT IMINUS PROCESSPROP DSPYPOSITION FONTPROP) PLCHAIN (PLCHAIN -FFETCHFIELD) STOPSCAN? (GETP ZEROP) BITBLT.ERASE (BLTSHADE) DWIMIFYFNS (CLOCK MAPCAR STKEVAL EVALV -MISSPELLED? FILEFNSLST DWIMIFY0) DO.CRLF (- \\DSPPRINTCR/LF) \\RTP.HANDLE.PUP (FFETCHFIELD LOCF -\\ADDBASE CONCAT GETPUPSTRING RELEASE.PUP APPLY*) EXCHANGEPUPS (\\DTEST SETUPTIMER FFETCHFIELD GETPUP -LOCF \\ADDBASE) MSPRGMACRO (MACROEXPANSION INCLISP) \\FLUSHPAGE (\\ADDBASE LLSH FFETCHFIELD -\\READFLAGS LOGAND FREPLACEFIELD PLUS IDIFFERENCE .PAGEMAPBASE. IPLUS \\GETBASE LRSH LOGNOT16 LOGXOR -\\HILOC \\LOLOC RPTFROMRP \\READRP) ERASE.TO.END.OF.LINE (DSPXPOSITION BITBLT.ERASE - DSPYPOSITION) -TEDIT.FORMATTEDFILEP (TEXTOBJ FFETCHFIELD TEXTPROP \\GETBASEPTR \\FIRSTNODE IMAX SELECTQ) FLIPNODE ( -BITBLT IDIFFERENCE GN/LEFT GN/BOTTOM IPLUS) \\MAXHEIGHTOFGROUP (PLUS) CLEAR.LINE? ( -ERASE.TO.END.OF.PAGE ERASE.TO.END.OF.LINE) \\CREATE.TEDIT.RESTART.MENU (FREPLACEFIELDVAL NCREATE CONS) - SKREAD (\\GTREADTABLE \\GETSTREAM CL:MAKE-CONCATENATED-STREAM CL:MAKE-STRING-INPUT-STREAM MKSTRING -SKIPSEPRCODES \\EOF.ACTION SELECTC \\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE) CLISPATOM0 ( -DWIMUNDOCATCH LISTGET1 LIST RESETVARS .RESETLST. CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION CL:CATCH XNLSETQ CLISPATOM1 DUNPACK FIX89 LENGTH CLISPATOM0) \\NSFILING.DESERIALIZE1 ( -FILING.CALL FFETCHFIELD CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION CL:FUNCALL \\BULK.DATA.CLOSE -) GETPUPWORD (\\GETBASE \\DTEST LOCF \\ADDBASE) TEXTOBJ (FFETCHFIELD WINDOWPROP PROCESS.WINDOW -\\ILLEGAL.ARG) SI::INSERT-ADVICE-FORM (LIST CL:LABELS CL:DELETE-IF CONS NCONC) -SI::CREATE-CONDITION-CASE-LITERALS (LIST LIST* CL:FUNCTION) \\QUEUE.OUTPUT.IOCB (FFETCHFIELD SUB1 -\\HILOC \\LOLOC EMPOINTER \\VAG2 RAID UNFOLD LLSH \\D0.CONTROLLERBITS LOGOR) -SI::NAMED-FUNCTION-WRAPPER-INFO (SI::GET-STORED-ARGLIST) \\FM.COLLECTNWAYS (LIST WINDOWPROP -\\FM.ITEMPROP FFETCHFIELD LISTGET \\FM.COERCEITEMPTR FM.GETITEM ERROR \\FM.MAKEGROUP CONS -\\FM.TOGGLE-CHANGESTATE) |\\VFMInsert1| (IGREATERP FFETCHFIELD \\ADDBASE IPLUS TIMES MESASIZE -IDIFFERENCE LOCF) INIT.CURSOR (DSPCLIPPINGREGION - DSPYPOSITION IQUOTIENT + IREMAINDER) -INTERACT&SHIFT.BITMAP.DOWN (RNUMBER SHIFT.BITMAP.DOWN) \\TK.DESCRIBEFONT (CONCAT L-CASE FONTPROP) -\\LEAF.IDLE? (FFETCHFIELD) ERASE.TO.END.OF.PAGE (- DSPYPOSITION BITBLT.ERASE) -CL:MAKE-CONCATENATED-STREAM (FREPLACEFIELDVAL NCREATE FUNCTION \\ILLEGAL.ARG) CL:READ (.CALL.SUBREAD. -\\SUBREAD \\GETSTREAM FFETCHFIELD GETRESOURCE NEWRESOURCE ALLOCSTRING \\TOP-LEVEL-READ) -UTF16BE.PEEKCCODEFN (\\PEEKBIN LOGOR LLSH CL:VALUES UNICODE.TRANSLATE CL:SVREF LRSH FASSOC LOGAND -UNICODE.UNMAPPED ERROR LIST) DELETETO (BACKWARD.DELETE.TO BLTCHAR TTYDISPLAYSTREAM SEGMENT.BIT.LENGTH -IDIFFERENCE FRPLACA) CLISPIFYLOOKUP (GETPROP CLISPLOOKUP0) \\LFCASEARRAYFETCH (\\GETBASEBYTE -FFETCHFIELD) COURIER.SIGNAL.ERROR (ERROR CONCAT) CL:READ-PRESERVING-WHITESPACE (.CALL.SUBREAD. -\\SUBREAD \\GETSTREAM FFETCHFIELD GETRESOURCE NEWRESOURCE ALLOCSTRING \\TOP-LEVEL-READ) CONCATT.IP ( -APPENDOP.IP) SAVESETQQ (SAVESET) LISPXFIND1 (CONS APPEND) \\COURIER.HANDLE.ERROR (|printout| PRIN1) -SI::COMPILED-FUNCTION-DEBUGGING-INFO (FFETCHFIELD - CL:* + \\GETBASEPTR) CL:APPLY (ERROR SPREADAPPLY -.SPREAD. ARG CL:1- PLUS) DECLARED-SPECIAL (DECLARED-SPECIAL) COMP.PROGN (COMP.EXP1 OPT.JUMPCHECK) -SI::SET-ADVICE-MIDDLE-MAN (CL:GETHASH) \\TEDIT.PIECE-CHNO (FFETCHFIELD PLUS \\GETBASEPTR \\GETBASEFIXP - IPLUS ADD1) SI::COMPILED-FUNCTION-INTERLISP? (SI::COMPILED-FUNCTION-DEBUGGING-INFO CL:MEMBER ARGTYPE -CL:GETF) DWIMIFY2A (CLISPFUNCTION? FUNCTION) \\NSFILING.DESERIALIZE (RESETLST -\\NSFILING.PARSE.FILENAME CL:ERROR \\GETFILINGCONNECTION \\NSFILING.CONNECT \\NSFILING.DESERIALIZE1 -\\NSFILING.FULLNAME \\NSFILING.ADD.TO.CACHE FREPLACEFIELDVAL NCREATE SETUPTIMER COURIER.SIGNAL.ERROR -FFETCHFIELD) INTERSECTREGIONS (SUB1 PLUS TIMES CONS ARG IPLUS ADD1 IDIFFERENCE) \\RTP.CLEANUP (DREMOVE - FFETCHFIELD FREPLACEFIELD) MOVEDESCENDENTS (COLLECTDESCENDENTS LIST CREATE.NEW.NODEPOSITION CONS -WFROMDS NODEREGION) MSPRGE (SELECTQ ADDTO LTEMPLATE GETHASH MSPRGTEMPLATE GETP GETPROP MSDWIMTRAN -MSPRGRECORD INCLISP MSPRGE MSPRGLST CL:MACRO-FUNCTION CL:MACROEXPAND GETMACROPROP) NSMAP (ARRAY PLUS -SETA FIXP CHARCODE.DECODE LOGOR LLSH) CH.RETRIEVE.PROPERTY.ACL (CH.GETAUTHENTICATOR COURIER.CALL -CH.FINDSERVER PARSE.NSNAME CH.PROPERTY COURIER.FETCH) SHRKFY (SHRKFY NCONC1 SHRKFY2 LIST CLISPIFY2A -CLISPIFYLOOKUP CLISPIFY2C) INITIALIZECOLOR.IP (GETFRAMEVAR.IP FFETCHFIELD FREPLACEFIELD) DISCARDPUPS ( -\\DTEST UNINTERRUPTABLY FFETCHFIELD) SCANBACK (U-CASECODE FIRSTCHAR TTNEXTCHAR SCANFORWARD ADD1 IMAX -IDIFFERENCE) \\MKINTEGER (\\GETBASECHAR \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE IPLUS -IDIFFERENCE LOGAND ITIMES SUB1 ADD1 SELECTQ) \\BSP.SKIPBYTES (\\BSP.PREPARE.INPUT BSP.INPUT.ERROR -APPLY* FFETCHFIELD IDIFFERENCE PLUS) REGIONP (NUMBERP) SKIPSEPRS (\\GETSTREAM \\GTREADTABLE -FFETCHFIELD UNFOLD LLSH ACCESS-CHARSET \\SYNCODE GETHASH \\GETBASEBYTE \\NSPEEK \\DTEST \\XCCSPEEK -\\PEEKBIN \\BIN IDIFFERENCE \\NSIN.24BITENCODING.ERROR LOGOR CL:FUNCALL \\XCCSIN FCHARACTER) PEEKC ( -FUNCTION \\GETSTREAM FCHARACTER PEEKCCODE) SI::GET-STORED-ARGLIST (GET CL:ERROR) FASL::DUMP-DCODE ( -FASL::HANDLE-STREAM) MOVENODE (CONSTANT CONS FLIPNODE) RELEASE.PUP (\\RELEASE.ETHERPACKET) -SI::PARSE-CL-ARGLIST (CL:VALUES CL:REVERSE) SCALE.IP (APPENDOP.IP) COMP.COMPILER-LET (CL:PROGV MAPCAR -EVAL COMP.PROGN) COUNTDOWN (COUNTDOWN SUB1) CREATE.NUMBERPAD.READER (RESETFORM RADIX FONTCREATE CONS -APPEND FONTPROP LIST FUNCTION IPLUS FREPLACEFIELDVAL NCREATE FFETCHFIELD FRPLACA CREATEW -REGIONONSCREEN WIDTHIFWINDOW ITIMES ADD1 CHARWIDTH BITMAPWIDTH CHECK/MENU/IMAGE HEIGHTIFWINDOW LENGTH -BREAK.MSG.INTO.LINES BITMAPHEIGHT TERPRI IQUOTIENT) SI::FUNCTION-WRAPPER-INFO (GETD -SI::NAMED-FUNCTION-WRAPPER-INFO) CLISPFORVARS (LIST DWIMIFY2 CONS DREVERSE) \\FM.MAKELINKS (MAPC -WINDOWPROP \\FM.ITEMPROP FFETCHFIELD \\FM.COERCEITEMPTR FM.GETITEM ERROR) COMPILER::PROCESS-IL-DECLARATIONS - (DECLARE) REALSTKNTH (\\STACKARGPTR IMINUS IDIFFERENCE ADDSTACKBASE \\VAG2 FFETCHFIELD FLOOR LOGAND -CONSTANT LOGXOR SUB1 \\MAKESTACKP) \\SPPCONNECTION (\\COERCE.TO.NSADDRESS \\ILLEGAL.ARG -\\SPP.CREATE.CON LOCF \\ADDBASE CONCAT SPP.DESTADDRESS) INTERACT&SHIFT.BITMAP.RIGHT (RNUMBER -SHIFT.BITMAP.RIGHT) \\TEDIT.SMALLERSEL (\\TEDIT.SMALLER.CARET TEDIT.LOOKS LIST) \\LEAF.IDLE ( -ADD.PROCESS LIST FUNCTION KWOTE \\GETDEVICEFROMNAME FFETCHFIELD \\SEQUIN.CONTROL \\SEQUIN.CLOSE) -SI::COMPILED-FUNCTION-ARGLIST (SI::COMPILED-FUNCTION-DEBUGGING-INFO MAPCONC LIST MKATOM CL:COPY-TREE -\\CCODEARGLIST FFETCHFIELD) \\UPDATECHAIN (FFETCHFIELD \\ADDBASE LLSH \\READFLAGS CONSTANT \\HILOC -LOGAND RPFROMRPT IPLUS LOGNOT16 LOGXOR) SHOWWTITLE (FFETCHFIELD DSPFONT SELECTQ IDIFFERENCE TEXTUREP -WINDOWPROP IPLUS BITMAPHEIGHT FONTPROP BITMAPWIDTH CONS IMAX IQUOTIENT \\STRINGWIDTHGUESS PRINTLEVEL -DSPXPOSITION ADD1) \\MOVEREALPAGE (FFETCHFIELD \\READFLAGS RPFROMRPT IPLUS \\VAG2 LRSH LLSH LOGAND) -CL:PARSE-INTEGER (ERROR FFETCHFIELD %ARRAY-BASE %ARRAY-OFFSET %ARRAY-TYPE-NUMBER \\CHECKRADIX -\\INVALID.RADIX + \\ILLEGAL.ARG \\SYNCODE GETHASH \\GETBASEBYTE \\GETBASECHAR \\GETBASEFAT \\GETBASE -\\GETBASETHIN CL:1+ CL:VALUES - PLUS \\MKINTEGER CL:SUBSEQ) SI::CHANGE-CALLS-IN-CCODE (MAPC -CHANGECCODE CODEBASESETATOM) MSADDTYPE (MKLIST CONS GETHASH LIST APPEND ASSOC MSADDMODIFIER) -\\FM.READUSERDATA (MAP LISTPUT \\FM.ITEMPROP FFETCHFIELD) TTBIN (TTWAITFORINPUT \\GETKEY METACHAR -LOGOR LRSH NONMETACHARBITS LOGAND \\CARET.DOWN) INVERT.BITMAP.B/W (FFETCHFIELD BITMAPCOPY) -\\TEDIT.LARGERSEL (\\TEDIT.LARGER.CARET TEDIT.LOOKS LIST) BLTMENUIMAGE (FFETCHFIELD \\INSUREWINDOW -WINDOWPROP DSPCLIPPINGREGION BITBLT IPLUS IDIFFERENCE IMIN BITMAPWIDTH BITMAPHEIGHT) -DMCHAT.HANDLECHARACTER (BOUT FFETCHFIELD FREPLACEFIELD TERM.PRINTCHAR FUNCTION) MAPHASHFILE ( -GTHASHFILE IGREATERP NARGS BIN READPTR IPLUS LLSH READ SPLITKEY APPLY* PLUS ELT) UTF16BE.OUTCHARFN ( -FFETCHFIELD IPLUS UNICODE.TRANSLATE CL:SVREF LRSH FASSOC LOGAND UNICODE.UNMAPPED) \\GET.IOCB (SELECTQ -\\ILLEGAL.ARG PLUS EMPOINTER \\VAG2 FFETCHFIELD) TB.DO.ITEM.SELECTION (WINDOWPROP FFETCHFIELD -DSPCLIPPINGREGION TB.FIRST.VISIBLE.ITEM# TB.LAST.VISIBLE.ITEM# LASTMOUSEX LASTMOUSEY ZEROP LOGAND -TB.NTH.ITEM PLUS FREPLACEFIELD ADD1 SUB1 TB.ITEM.FROM.YCOORD LOGOR SHIFTDOWNP LRSH +) SEE ( -NLAMBDA.ARGS COPYALLBYTES) SHOWWFRAME (FFETCHFIELD IMAX FOLDHI LRSH IPLUS IDIFFERENCE ITIMES -DSPCLIPPINGREGION) SI::CHANGE-CALLS (GET GETD) |\\PFVolumeNumber| (GETHASH) DINFO.CLOSEFN (WINDOWPROP -FFETCHFIELD) TTDELETELINE (BEEP PREVLINE BLTCHAR TTYDISPLAYSTREAM DELETE.TO.END FRPLACA RETYPE.BUFFER -DELETETO FORWARD.DELETE.TO) |ShowIntervals| (|\\VFMGetInterval| PRIN1 ELT SUB1 \\GETBASE IREMAINDER -ADD1 PLUS TERPRI LOCF MESASIZE FFETCHFIELD \\ADDBASE) \\RTP.INFO.HOOK (PROCESS.WINDOW CREATEW -GETBOXREGION FONTCREATE WINDOWPROP) LISPXFIND (RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION SUB1 LISPXFIND NCONC LISPXFIND0 LDIFF FMEMB LISPXPUT SELECTQ MAPCONC APPEND -LISPXGETINPUT LISTGET1 LAST MAPCAR LISPXFIND1) MSINITFNDATA (MAPC FRPLACD) DMCHAT.CLEARMODES ( -FFETCHFIELD FREPLACEFIELD) \\FM.NUMBER-CHANGESTATE (\\FM.ITEMPROP FFETCHFIELD NUMBERP MKATOM) TTSKREAD - (\\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE FIRSTCHAR LIST TTSKREAD ADD1 FIND.MATCHING.QUOTE) -\\RSTRING2 (FFETCHFIELD SELECTQ SYSTEMTYPE %ARRAY-BASE UNFOLD LLSH ACCESS-CHARSET \\NSIN \\DTEST -\\XCCSIN \\BIN IDIFFERENCE \\NSIN.24BITENCODING.ERROR LOGOR CL:FUNCALL \\SYNCODE GETHASH \\GETBASEBYTE - LOGAND \\BACKXCCSCHAR PLUS \\PEEKBIN \\CHECKEOLC SELCHARQ SELECTC UNINTERRUPTABLY SUB1 \\PUTBASECHAR -\\PUTBASEFAT \\PUTBASE \\PUTBASETHIN \\PUTBASEBYTE \\SMASHSTRING ALLOCSTRING CONS ADD1 SPREADAPPLY* -CONCATLIST) TRACKCURSOR (CONS CURSORPOSITION ZEROP LOGAND MOUSESTATE WFROMDS NODEREGION) \\LIMITBYMAX -(IMIN) SI::HAS-CALLS (GET CL:CONSP GETD CL:FIND CALLSCCODE) TTBITWIDTH (FCHARWIDTH CHARWIDTH) -SHOWSHADEDITEMS (FFETCHFIELD NTH MENUITEMREGION DIFFERENCE BITMAPWIDTH FRPLACA) SI::ADD-CHANGED-CALL ( -CL:FIRST CONS CL:SECOND CL:DELETE LIST) SHRIEKER (SHRIEKER LIST SELECTQ CONS) CL:READ-DELIMITED-LIST ( -FIXP CL:CHAR-CODE \\GETSTREAM .CALL.SUBREAD. \\SUBREAD FFETCHFIELD GETRESOURCE NEWRESOURCE ALLOCSTRING - \\TOP-LEVEL-READ) TTCRLF (TTCRLF.ACCOUNT) SI::GET-ADVICE-MIDDLE-MAN (CL:GETHASH) RSTRING ( -\\GTREADTABLE WITH-RESOURCE \\RSTRING2 \\GETSTREAM FFETCHFIELD GETRESOURCE NEWRESOURCE ALLOCSTRING) -CONCATLIST (ALLOCSTRING PLUS %ARRAY-TYPE-NUMBER FFETCHFIELD \\PROPCELL \\ATOMCELL CONSTANT NCHARS) -CL:MAKE-STRING-INPUT-STREAM (OPENSTRINGSTREAM SUBSTRING CL:1+) OVERFLOW? (IPLUS MOVE.TO.NEXT.LINE -BREAKLINE) REMOVE (REMOVE CONS) \\FM.EDIT-SETUP (FFETCHFIELD \\FM.ITEMPROP LISTGET IDIFFERENCE ITIMES -FUNCTION) CLOSEHASHFILE (HASHFILEP CLOSEF? OPENHASHFILE ELT) UTF16BE.INCCODEFN (\\BIN LOGOR LLSH -CL:VALUES ERROR) LLSH (LRSH IMINUS NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT -CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR IDIFFERENCE IPLUS LLSH LOGAND .LLSH1. PLUS \\MAKENUMBER) -TB.DO.UNLESS.BUSY (RESETLST WINDOWPROP FFETCHFIELD CL:FUNCALL) |\\LFDirectorySearch| (LENGTH -SPREADAPPLY* FFETCHFIELD \\BIN IPLUS \\LFDWIN \\WIN LLSH \\LFCASEARRAYFETCH FRPLACA IDIFFERENCE) -CMLRDTBL (COPYREADTABLE PLUS) \\VALIDADDRESSP (\\LOOKUPPAGEMAP IPLUS LLSH \\HILOC LRSH \\LOLOC) -DMCHAT.STATE (FUNCTION NCREATE) \\10MBSENDPACKET (LOCF \\ADDBASE FFETCHFIELD \\ALLOCATE.ETHERPACKET -ADD1 \\REQUEUE.ETHERPACKET) SI::CLEAN-UP-CL-ARGLIST (CL:INTERN STRING LIST) MSADDRELATION (LIST MKLIST -) TEDIT.REDO.REPLACE (FFETCHFIELD IDIFFERENCE FRPLACA) TTYIN (RESETLST TTYDISPLAYSTREAM FFETCHFIELD -CONS \\DTEST \\GTREADTABLE SUBSTRING MKSTRING NCHARS NLSETQ TTYIN1 FRPLACA PLUS EDITE LIST) -TTYIN.FINISH (TTNLEFT \\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE FIRSTCHAR FRPLACA TTYIN.READ -TTYIN.SCRATCHFILE TTYINSTRING TTRATOM TTREADLIST APPLY* EVAL TTADJUSTWORD LIST CONS) -INTERACT&SHIFT.BITMAP.UP (RNUMBER SHIFT.BITMAP.UP) \\TEDIT.LARGER.CARET (\\TEDIT.PARSE.CHARLOOKS.LIST -FFETCHFIELD) \\LEAF.OPENERRORHANDLER (SELECTC FFETCHFIELD LOCF \\ADDBASE PRIN1) RENUMBER.LINES ( -FRPLACA) \\FM.NUMBER-SETUP (FFETCHFIELD \\FM.ITEMPROP LISTGET IDIFFERENCE ITIMES FUNCTION) \\TEDIT1 ( -OPENTEXTSTREAM FFETCHFIELD TEXTPROP COERCETEXTOBJ) TTWAITFORINPUT (SETUPTIMER DSPCLIPPINGREGION -\\GETKEY LOGAND LOGOR LASTMOUSEX - LASTMOUSEY + WHICHW WINDOWPROP TIMES ITIMES TTLASTLINE FUNCTION -DSPRIGHTMARGIN) MOVETOUPPERLEFT (FONTPROP DSPFONT NUMBERP IDIFFERENCE IPLUS DSPLEFTMARGIN -DSPCLIPPINGREGION) |\\LFFindDirHole| (IPLUS LENGTH FFETCHFIELD SPREADAPPLY* \\BIN PLUS DIFFERENCE -|\\LFMakeDirHole|) \\FM.MAKEBITMAP (LISTGET BITMAPCREATE CREATEREGION IDIFFERENCE ITIMES DSPCREATE -IPLUS FONTPROP) TTYIN1RESTART (FRPLACA FRPLACD) SI::DELETE-ADVICE (REMHASH) \\TEDIT.SET-TOTLEN ( -FFETCHFIELD PLUS \\GETBASEFIXP FREPLACEFIELD) CREATEWFROMIMAGE (CREATEW \\INSURESCREEN BITMAPWIDTH -BITMAPHEIGHT CONS IMIN FFETCHFIELD) DINFO.SHRINKFN (CLOSEW DINFOGRAPH FFETCHFIELD) TTYIN.READ ( -PRINTCCODE FIRSTCHAR TTNEXTCHAR \\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE LIST IDIFFERENCE -\\GETFILEPTR SPREADAPPLY* STREAMBYTESPERCHAR NLSETQ READ) REDISPLAYBITMAP (TYPENAMEP WINDOWPROP -DSPCLIPPINGREGION BITBLT) RESTOREBUF (PROPERTAILP CONS FRPLACA) SENDPUP (\\DTEST LOCF \\ADDBASE -FFETCHFIELD ASSURE.PUP.READY TERPRI \\ROUTE.PUP) ALLCALLS (CONS LIST) CH.PROPERTY (FIXP ERROR) -FASL::DUMP-INTEGER (DECLARE BOUT FASL::HANDLE-STREAM FASL::WRITE-INTEGER-BYTES CL:1+ CL:INTEGER-LENGTH - CL:CEILING) TTYIN.SETUP (WFROMDS WINDOWPROP FRPLACA LIST FUNCTION DSPDESTINATION CHARWIDTH DSPFONT -FONTCOPY SELECTQ FONTPROP MAX FONTHEIGHT DSPTEXTURE PAGEHEIGHT DSPLEFTMARGIN DSPRIGHTMARGIN -DSPXPOSITION) INITIALIZEMASTER.IP (NTHCHARCODE PLUS \\BOUT) \\TEDIT.SET.WINDOW (CONS FFETCHFIELD) -NODEREGION (CREATEREGION GN/LEFT GN/BOTTOM) \\LIMITBYMIN (IMAX) BSPPEEKBIN (\\BUFFERED.PEEKBIN) -DWIMIFY2 (DWMFY2) SEE* (NLAMBDA.ARGS APPLY) DWMFY2 (FASSOC CONS GETPROP CONCAT SUBSTRING RETDWIM2 -MKSTRING) \\RATOM/RSTRING-REFILL (STREAMPROP \\BIN) COMP.EQ (COMP.PROGN COMP.NOT COMP.STCONST APPLY* -COMP.STFN) DWIMIFY1A (RETDWIM2 LISPXPRIN1 LISPXPRINT CONCAT SUBSTRING) \\SMASHSTRING (FFETCHFIELD PLUS - %ARRAY-OFFSET %ARRAY-TYPE-NUMBER \\ADDBASE %ARRAY-BASE SUB1 IPLUS ADD1 \\GETBASETHIN \\GETBASEBYTE -\\PUTBASE \\GETBASEFAT \\GETBASE \\PUTBASEBYTE) TTYINREAD (GETSTREAM READ TTYIN NCONC1) READFROMBUF ( -TTNEXTCHAR) NOT.TRACKCURSOR (PROMPTPRINT) \\CREATECHARSET.IP (RESETLST FIXR FQUOTIENT ITIMES -FREPLACEFIELDVAL NCREATE \\CREATECSINFOELEMENT \\ALLOCBLOCK FOLDHI LRSH IPLUS FFETCHFIELD -\\FINDFONTFILE OPENSTREAM \\POSITIONFONTFILE \\FAMILYCODE \\BIN PLUS LLSH LOGAND \\WIN ABS IDIFFERENCE - \\BUILDSLUGCSINFO FONTPROP ZEROP UNFOLD \\FIXPIN SIGNED SUB1 IMINUS IQUOTIENT \\PUTBASE \\GETOFD -\\GETSTREAM IMIN ADD1 GETFILEINFO GETFILEPTR \\FGETWIDTH \\GETBASE GETEOFPTR FREPLACEFIELD) -SI::CONSTRUCT-MIDDLE-MAN (CL:INTERN CL:FORMAT CL:PACKAGE-NAME CL:SYMBOL-PACKAGE) ULREDISPLAYBITMAP ( -TYPENAMEP WINDOWPROP DSPCLIPPINGREGION BITBLT IDIFFERENCE IPLUS FFETCHFIELD) UNBREAK0 ( -XCL:UNBREAK-FUNCTION) GETFRAMEVAR.IP (FFETCHFIELD ADD1) /TCONC (CONS ERROR /RPLNODE /RPLACD FRPLACD) -\\SETGROUPMIN (\\ATWGROUPSIZE FRPLACA FRPLACD SELECTQ \\MAXWIDTHOFGROUP IPLUS IMAX \\MAXHEIGHTOFGROUP -SHOULDNT) GETPUP (\\DTEST \\DEQUEUE FFETCHFIELD FREPLACEFIELD PLUS FIXP SETUPTIMER TERPRI) -SWAPPUPPORTS (FFETCHFIELD LOCF \\ADDBASE FREPLACEFIELD) EDITBMTEXTURE (BITMAPBIT BITSPERPIXEL) -COMPILER::PROCESS-DECLARATIONS (DECLARE CL:FLET CL:MACROLET) OPENHASHFILE (CREATEHASHFILE ASSOC -FULLNAME GETFILEINFO ELT ARRAY OPENSTREAM READPTR IPLUS LLSH BIN SELCHARQ SELECTQ SYSTEMTYPE -FFETCHFIELD SETA SETHASHSTATUS) COPYALLBYTES (RESETLST LIST OPENSTREAM GETFILEPTR INPUT OUTPUT OPENP) -CL:EVAL-WHEN (MAPC \\EVAL) \\READREFILL (STREAMPROP CL:FUNCALL STKNAME) MENUREGION (BITMAPWIDTH -CHECK/MENU/IMAGE BITMAPHEIGHT IDIFFERENCE FFETCHFIELD CONS) CLMAPS1 (CONS ATOM LIST) FLIPCURSORBAR ( -LOGXOR \\GETBASE SELECTC |\\DoveDisplay.SetCursorShape|) INTERACT&ADD.BORDER.TO.BITMAP (RNUMBER -EDITSHADE ADD.BORDER.TO.BITMAP) \\TEDIT.ITALIC.SEL.ON (TEDIT.LOOKS) DINFO.EXPANDFN (DINFOGRAPH -FFETCHFIELD FM.GETSTATE WINDOWPROP) SCROLLBITMAP (WINDOWPROP DSPCLIPPINGREGION IMAX IMIN IDIFFERENCE -FFETCHFIELD) ICMLARRAY.DOWINDOWCOMFN (WINDOWPROP MENU CENTRALWINDOW GETREGION FUNCTION CONS) -CH.IS.IN.DOMAIN.ACL (CH.GETAUTHENTICATOR COURIER.CALL CH.FINDSERVER PARSE.NSNAME CH.PROPERTY -COURIER.FETCH) FASL::DUMP-COMPLEX (DECLARE FASL::WRITE-OP FASL:DUMP-VALUE CL:REALPART CL:IMAGPART) -ICMLARRAY.DETACHDISPLAY (WINDOWPROP) SKIPSEPRCODES (\\GETSTREAM \\GTREADTABLE FFETCHFIELD UNFOLD LLSH -ACCESS-CHARSET \\SYNCODE GETHASH \\GETBASEBYTE \\NSPEEK \\DTEST \\XCCSPEEK \\PEEKBIN \\BIN IDIFFERENCE - \\NSIN.24BITENCODING.ERROR LOGOR CL:FUNCALL \\XCCSIN) \\CARET.FLASH (FRPLACA IDIFFERENCE DSPXPOSITION - FFETCHFIELD DSPYPOSITION) CLISPIFYMATCHUP (FASSOC NCONC1 CONS CLISPIFYMATCHUP GETPROP) -\\APPLYREADMACRO (APPLY*) \\BSP.PREPARE.OUTPUT (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION FFETCHFIELD SETUPTIMER APPLY* ALLOCATE.PUP LOCF \\ADDBASE IMIN) TTYIN1 (DRIBBLEFILE -FFETCHFIELD LOCF \\ADDBASE FCHARWIDTH CHARWIDTH - STRINGWIDTH FRPLACA ITIMES SUB1 TTLOADBUF LIST -TTYIN.PPTOFILE LAST LDIFF GETRESOURCE NEWRESOURCE MAKE-TTSCRATCHFILE TTBIN FASSOC EVAL LRSH -NONMETACHARBITS LOGAND METACHAR LOGOR DO.EDIT.COMMAND \\SYNCODE GETHASH \\GETBASEBYTE PREVLINE -\\SYSBUFP TTCOMPLETEWORD CURRENT.WORD FIND.MATCHING.WORD TTDOTABS AUTOCR? NLEFT FIRSTCHAR -FIND.NEXT.WORD FIND.NON.SPACE AT.END.OF.TEXT TTYDISPLAYSTREAM BLTCHAR APPEND MACHINETYPE U-CASECODE -TTYIN.FINISH) \\INTERPRESSINIT (FUNCTION FREPLACEFIELDVAL NCREATE NSMAP) |\\LETtran| (MAPCAR -PARSE-BODY SELECTQ LIST LIST* REVERSE) SI::ADD-ADVICE (CL:GETHASH SI::MAKE-ADVICE) -BACKGROUNDWHENSELECTEDFN (EVAL.AS.PROCESS) SI::RESTORE-CALLS (MAPC GET) \\SUBREADCONCAT ( -\\GETBASESTRING CONCATLIST NCONC1 REVERSE) RETFROM (\\STACKARGPTR IDIFFERENCE ADDSTACKBASE \\VAG2 -FFETCHFIELD) CLMAPS2 (LIST CONS CLISPIFY2A FLAST NCONC LDIFF CLISPIFY1 APPEND) CLISPRESPELL ( -MISSPELLED?) \\INVALID.SYMBOL (DECLARE MAKE-CONDITION CONCAT CL:PACKAGE-NAME \\GETBASESTRING) -MSADDMODIFIER (MKLIST ASSOC GETHASH CONS LIST MAPC ADDTEMPLATEWORD) \\TEDIT.LCASE.SEL ( -TEDIT.SEL.AS.STRING FFETCHFIELD L-CASE FRPLACA) \\FM.EDIT-INSERT (CHARACTER CHARWIDTH IPLUS -DSPXPOSITION DSPCLIPPINGREGION WINDOWPROP FRPLACA PLUS MINUS \\FM.EDIT-SCROLLAMOUNT IQUOTIENT -BITMAPWIDTH FFETCHFIELD BITMAPCREATE BITMAPHEIGHT \\FM.ITEMPROP FONTPROP \\FM.EDIT-STRINSERT ADD1 -EXTENDREGION CREATEREGION) UNADVISE (NLAMBDA.ARGS CL:FLET MAPCONC REVERSE UNADVISE-ENTRY) -\\FIND.PACKAGE.INTERNAL (CL:FIND-PACKAGE \\GETBASESTRING) XCL::WALK-UNEXPECTED-DECLARE (DECLARE CL:WARN -) \\LET*-RECURSION (CL:EVAL GET CL:PROGV LIST \\LET*-RECURSION ENVIRONMENT-VARS LIST* \\EVAL-PROGN) -|\\PFNewPages| (FFETCHFIELD NCREATE) READ-EXTENDED-TOKEN (\\GTREADTABLE WITH-RESOURCE FFETCHFIELD -%ARRAY-BASE UNFOLD LLSH ACCESS-CHARSET SPREADAPPLY* \\NSIN \\DTEST \\XCCSIN \\BIN IDIFFERENCE -\\NSIN.24BITENCODING.ERROR LOGOR CL:FUNCALL \\SYNCODE GETHASH \\GETBASEBYTE SELECTC \\CHECKEOLC -SELCHARQ UNINTERRUPTABLY \\PEEKBIN \\BACKXCCSCHAR PLUS SUB1 LOGAND \\SMASHSTRING ALLOCSTRING CONS -\\PUTBASECHAR \\PUTBASEFAT \\PUTBASE \\PUTBASETHIN \\PUTBASEBYTE ADD1 CONCATLIST CL:VALUES GETRESOURCE - NEWRESOURCE) \\ITEM.WINDOW.SELECTION.HANDLER (WINDOWPROP LOGAND IN/ITEM? CURSORPOSITION LOGOR) -|\\VFMSplit| (\\ALLOCBLOCK LRSH ADD1 MESASIZE |\\VFMCreateVPage| FUNCTION) CL:NOTEVERY ( -%NOTEVERY-SINGLE %NOTEVERY-MULTIPLE CONS) SI::*ADVICE-HASH-TABLE* (CL:MAKE-HASH-TABLE) -\\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (FREPLACEFIELDVAL NCREATE FFETCHFIELD IMAGEOBJPROP APPLY* COPYALL) -DINFO.READ.KOTO.GRAPH (FILENAMEFIELD PRIN1 INFILEP READFILE ERROR NCREATE PLUS) \\10MBGETPACKET ( -\\DEQUEUE FFETCHFIELD LOCF \\ADDBASE) COMP.SPREADFN (CONS LIST COMP.SPREADFN) \\RTP.SOCKET.PROCESS ( -FFETCHFIELD LIST FUNCTION THIS.PROCESS) \\TEDIT.NEUTRALIZE.CHARLOOKS.MENU (FFETCHFIELD) -\\MAIKO.10MBTURNONETHER (FFETCHFIELD LOCF \\ADDBASE) FASL::DUMP-RATIONAL (DECLARE FASL::WRITE-OP -FASL:DUMP-VALUE CL:NUMERATOR CL:DENOMINATOR) \\MAKESPACEFORLOCKEDPAGE (SELECTC FOLDLO LRSH IPLUS -IDIFFERENCE DLFPFROMRP SUB1 FFETCHFIELD FREPLACEFIELD PLUS \\ADDBASE \\GETBASE) \\TEDIT.ITALIC.SEL.OFF - (TEDIT.LOOKS) BITMAPSCROLLFN (SCROLLBITMAP WINDOWPROP) BSPBIN (\\BUFFERED.BIN) \\TEDIT.WORDDELETE ( -FFETCHFIELD SELECTQ SUB1 \\BIN \\SYNCODE GETHASH \\GETBASEBYTE \\GETCHB \\BACKBIN PLUS IPLUS ADD1 -IDIFFERENCE \\TEDIT.DELETE) \\SELECTREALPAGE (FFETCHFIELD \\ADDBASE LLSH \\READFLAGS LOGAND FOLDLO -LRSH RPFROMRPT IPLUS IABS IMINUS IDIFFERENCE SUB1 CONSTANT \\HILOC) COMPARENCHARS (\\DTEST FUNCTION) -XCL::WALK-TAGBODY-1 (XCL::RECONS WALK-FORM-INTERNAL XCL::WALK-TAGBODY-1) |\\LFMakeDirHole| ( -FFETCHFIELD TIMES SUB1 IPLUS ADD1 IDIFFERENCE PLUS) |\\LFFileName| (CHCON FIXP LENGTH ALLOCSTRING PLUS - ADD1) GC-FILING-DIRECTORY (CHCON1 \\ADD.CONNECTED.DIR \\GETDEVICEFROMNAME \\NSFILING.PARSE.FILENAME -FFETCHFIELD FUNCTION \\NSGC.COLLECT.DIRECTORIES TERPRI + NCHARS \\NSFILING.GETFILE CONCAT) READHOTSPOT - (ZEROP LOGAND CURSOR IPLUS LEFTOFGRIDCOORD FFETCHFIELD IQUOTIENT BOTTOMOFGRIDCOORD CONS BITMAPCREATE -BITSPERPIXEL CURSORCREATE LASTMOUSEX LASTMOUSEY) \\FM.EDITSTART-SELECTEDFN (LISTGET \\FM.ITEMPROP -FFETCHFIELD FUNCTION \\FM.EDIT-ITEM) \\PUPERROR (\\MAYBEPEEKPUP FFETCHFIELD LOCF \\ADDBASE ASSOC -TERPRI FOLDLO LRSH IPLUS ITIMES \\PUTBASESTRING SENDPUP \\RELEASE.ETHERPACKET) MSADDANALYZE (LIST -GETHASH PUTASSOC PUTHASH CONS ASSOC FRPLACA) TEDIT.REDO.MOVE (FFETCHFIELD IPLUS) \\DONEWEPHEMERALPAGE -(IPLUS LLSH \\HILOC LRSH \\LOLOC \\GETBASE LOGAND \\READFLAGS PLUS \\SELECTREALPAGE \\ADDBASE -RPFROMRPT \\VAG2 LOCF) TRAJECTORY.IP (MAPC LINETO.IP) \\FM.EDIT-PREPARETOEDIT (FFETCHFIELD FUNCTION -\\FM.ITEMPROP LISTGET STRINGWIDTH DSPCREATE IPLUS CONS \\FM.EDIT-GETPOINTERINFO LASTMOUSEX FONTPROP -DSPFONT) TTYINWORDRDTBL (COPYREADTABLE) WBOX (BLTSHADE DSPTEXTURE IPLUS IDIFFERENCE ITIMES) PREVWORD ( -\\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE BITTEST LOGAND FIRSTCHAR TTNEXTCHAR IDIFFERENCE -FIND.START.OF.WORD FIND.NEXT.WORD) EDITMOVESUBTREE (WINDOWPROP PRIN1 NODELST/AS/MENU CURSORPOSITION -LOGAND) ADDTEMPLATEWORD (CONS MAKETABLE PUTASSOC) \\FM.CREATEITEM (PLUS LISTGET APPLY* \\FM.GETREGIONS - \\FM.GETBITMAPS LIST FUNCTION FREPLACEFIELDVAL NCREATE PACK*) FSET.IP (APPENDOP.IP) \\FM.EDIT-ITEM ( -SETUPTIMER RESETLST RESETSAVE SETTERMTABLE TTYDISPLAYSTREAM CURSOR LIST \\FM.EDIT-PREPARETOEDIT -TTY.PROCESS THIS.PROCESS LOGAND APPLY* DECODEBUTTONS LASTMOUSEX LASTMOUSEY \\FM.CHECKREGION WINDOWPROP - \\FM.ITEMPROP FFETCHFIELD LISTGET IPLUS ILESSP \\GETKEY GETSYNTAX) \\ORIG-INVALID.SYMBOL (CL:CERROR -CONCAT CL:PACKAGE-NAME SELECTQ \\SUBREADCONCAT) CL:PACKAGE-NAME (CL::%PACKAGE-NAME) TERM.SMOOTHSCROLL -(\\DTEST FFETCHFIELD PLUS TERM.ERASEBITS) XCL::WALK-TAGBODY (XCL::RECONS XCL::WALK-TAGBODY-1) -\\CARET.FLASH? (KEYDOWNP TTYDISPLAYSTREAM WINDOWPROP TEXTOBJ FFETCHFIELD FRPLACD) SEARCHPDL (STKPOS -STKNTH STKNAME CONS) |\\LFMakeLeaderPage| (FASSOC FIXP IDATE USERNAME NCREATE SELECTQ FFETCHFIELD LOCF - \\ADDBASE |\\PFFindPageAddr|) \\NSGC.COLLECT.DIRECTORIES (RESETLST \\GETFILINGCONNECTION -\\NSFILING.CONNECT FILING.CALL FFETCHFIELD CONSTANT \\FILING.ATTRIBUTE.TYPE.SEQUENCE LIST FUNCTION -BULKDATA.GENERATOR CONS BULKDATA.GENERATE.NEXT) EXTENDEXTENT (WINDOWPROP EXTENDREGION CONS) SETUPPUP ( -\\DTEST LOCF \\ADDBASE ADD1 FIXP ETHERPORT OPENPUPSOCKET) TERM.TAB (\\DTEST FFETCHFIELD ADD1 IQUOTIENT - MOVETO ITIMES FREPLACEFIELD) \\FM.GETREGIONS (\\FM.ITEMWIDTH LISTGET BITMAPWIDTH STRINGWIDTH -\\FM.ITEMHEIGHT BITMAPHEIGHT FONTPROP BITMAPP STRINGP IMAX ITIMES IPLUS LIST CREATEREGION IMIN) -COMPILER::ALPHA-FORM (COMPILER::ALPHA-ATOM) CL:RETURN-FROM (STKNTH STKNAME STKARG) -\\TEDIT.ITALIC.CARET.OFF (\\TEDIT.PARSE.CHARLOOKS.LIST FFETCHFIELD) /SETSEPR (LIST GETSEPR SETSEPR) -ENDBSPSTREAM (CLOSEBSPSTREAM) RETVALUES (\\STACKARGPTR IDIFFERENCE ADDSTACKBASE \\VAG2 FFETCHFIELD -CL:VALUES-LIST) DWMFY1 (LIST FASSOC WTFIX0 CONS SELECTQ UNION DWIMIFY2 APPEND GETPROP NCONC MAPCAR -FMEMB ARGTYPE NARGS) HASHFILEPROP (GTHASHFILE SELECTQ GETFILEINFO ELT) UTF8.PEEKCCODEFN (\\PEEKBIN -LLSH LOGOR LOADBYTE LOGAND LSH IMINUS MASK.1\'S SUB1 LIST CL:VALUES) \\FM.EDITSTART-MESSAGE (SELECTQ) -SI::FINISH-UNADVISING (CL:DELETE) REALFRAMEP (\\REALFRAMEP \\STACKARGPTR) \\NEWEPHEMERALPAGE ( -\\MISCAPPLY* FUNCTION FFETCHFIELD) CLISPIFYMAPS (CLISPIFYLOOKUP LIST NCONC CLISPIFY2A APPEND CLMAPS2) -ICMLARRAY.INDICES (MAINWINDOW WINDOWPROP PRIN1 SPACES) TERM.SETMARGINS (\\DTEST FFETCHFIELD - ITIMES -SUB1 FREPLACEFIELD) XCL::WALK-PROG* (XCL::WALK-LET/LET*) TB.ITEM.FROM.YCOORD (CL:CEILING - FFETCHFIELD - TB.NTH.ITEM IMIN) \\LFDWIN (IPLUS LLSH \\BIN) \\GETBASESTRING (ALLOCSTRING %ARRAY-BASE FFETCHFIELD -%ARRAY-OFFSET UNFOLD LLSH) MAPDL (STKPOS STKNTH STKNAME) |\\LFMakeDirEntry| (LENGTH IPLUS CL:ZEROP -\\BIN IGEQ FFETCHFIELD LRSH \\BOUT LOGAND ADD1) HISTORYSAVE (FMEMB LIST NCONC1 CONS ADD1 IPLUS MINUS -LISPXFIND1 FRPLACD ERSETQ EVAL) \\FM.EDITSTART-SETUP (\\FM.ITEMPROP FFETCHFIELD FUNCTION) -CLISPIFYRPLAC (GETPROP CLISPIFY2C CLISPIFYLOOKUP NTH NARGS PUTPROP LENGTH SMARTARGLIST CLISPIFY2A CONS - LDIFF SUBPAIR CLISPIFYCROPS NCONC CLISPIFY1 CLISP3A LIST) READQUOTE (LIST CL:READ) \\FM.CHECKPROPS ( -LISTGET ERROR CONCAT MAPC) HELP (CONDITIONS:INVOKE-DEBUGGER MAKE-CONDITION LIST) \\FM.EDIT-FINDNEXT ( -FMEMB WINDOWPROP \\FM.ITEMPROP FFETCHFIELD) COMP.GETBASEBITS (COMP.VAL LIST PLUS COMP.STFN CONS) -CL:FUNCTION (CL:SYMBOL-FUNCTION) COMPILER::PRINT-NODE (CL:GETHASH CL:FORMAT CL:TYPE-OF + CL:MACROLET) -\\FM.GETBITMAPS (LISTGET \\FM.MAKEBITMAP BITMAPCOPY IDIFFERENCE ITIMES LIST) READHASHMACRO (FUNCTION -ILEQ PEEKCCODE PLUS TIMES DIFFERENCE READCCODE SELCHARQ APPLY* FILL-VECTOR CL:MAKE-ARRAY LENGTH LIST -READ EVAL CHARACTER.READ IDIFFERENCE CL:MAKE-SYMBOL READ-EXTENDED-TOKEN READNUMBERINBASE -ESTIMATE-DIMENSIONALITY CREATE-STRUCTURE CL:VALUES ERROR CHARCODE.UNDECODE RSTRING GET CHARACTER) -COMPAREPRINTN (IPLUS POSITION LINELENGTH SPACES) READVBAR (SELCHARQ PEEKCCODE READBQUOTE HREAD -READHASHMACRO CL:VALUES) SI::FINISH-ADVISING (CL:MEMBER GET CL:MAKE-SYMBOL CL:FORMAT CL:COMPILE -SI::CREATE-ADVISED-DEFINITION CL:DELETE CONS LIST SI::GET-ADVICE-MIDDLE-MAN SI::CONSTRUCT-MIDDLE-MAN) -DWIM (GETD /SETATOMVAL ASSOC SET ERROR) TEDIT.UNPARSE.PAGEFRAMES (LIST MAPCAR TEDIT.UNPARSE.PAGEFRAMES - FFETCHFIELD) HREAD (INPUT READTABLEP READ) \\DOFLUSHVM (IPLUS LLSH \\HILOC LRSH \\LOLOC FFETCHFIELD) -COMP.FMEMB (COMP.VALN COMP.SELECTQ LIST COMP.STFN) COMPILER::PRINT-TREE (CL:MAKE-HASH-TABLE -COMPILER::PRINT-NODE CL:TERPRI CL:VALUES) CH.DELETE.MEMBER.FROM.DOMAIN.ACL (CH.CANONICAL.NAME -CH.GETAUTHENTICATOR COURIER.EXPEDITED.CALL CH.FINDSERVER PARSE.NSNAME COURIER.FETCH) -FASL::WRITE-INTEGER-BYTES (FASL::HANDLE-STREAM) \\RELEASEWORKINGSET (SUB1 \\ADDBASE LLSH FFETCHFIELD -RPFROMRPT IPLUS PLUS) CHARCODE.UNDECODE (CL:CHAR-NAME CL:CODE-CHAR MKSTRING) /SETD (LIST ELTD SETD) -CREATEBSPSTREAM (OPENBSPSTREAM) \\FLUSHVM (UNINTERRUPTABLY \\MISCAPPLY* FUNCTION FFETCHFIELD SET) -\\READNUMBER.FLASHAREA (BITBLT) SKIP.HASH.COMMENT (READCCODE) CL:COMPILER-LET (CL:PROGV MAPCAR \\EVAL -\\EVPROGN) DSKDISPLAY (SELECTQ MACHINETYPE CONCAT) \\TEDIT.SETDEFAULT.FROM.SEL (TEDIT.GET.LOOKS -\\TEDIT.PARSE.CHARLOOKS.LIST) CMLREAD.FEATURE.PARSER (SELECTQ EVERY CMLREAD.FEATURE.PARSER SOME ERROR) - COMP.CL-EVAL (COMP.SPREAD) \\INSPECTW.COMMAND.HANDLER (WITH-INSPECTOR-ENV WINDOWPROP XCL::PROFILIZE -CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES DSPCLIPPINGREGION LASTMOUSEX LASTMOUSEY -PROMPTPRINT ERSETQ APPLY* ZEROP LOGAND CLRPROMPT FUNCTION) ESTIMATE-DIMENSIONALITY (ERROR LENGTH LIST -PLUS) INREADMACROP (STKPOS FUNCTION) WTODSY (IPLUS DSPCLIPPINGREGION FFETCHFIELD) \\SHADEBITS ( -BITSPERPIXEL OPPOSITECOLOR ZEROP LOGAND IMAX IMIN GRIDXCOORD LASTMOUSEX GRIDYCOORD LASTMOUSEY -WINDOWPROP IPLUS PRIN1 BITBLT) READBQUOTE (LIST CL:READ) GETBOXPOSITION.FROMINITIALREGION ( -GETBOXPOSITION DIFFERENCE PLUS WINDOWPROP DSPCLIPPINGREGION) CLISPIFYCROPS1 (CONS ADD1 IPLUS PACK -MAPCONC LIST APPEND DREVERSE) READNUMBERINBASE (READ-EXTENDED-TOKEN NTHCHARCODE DIGITBASEP + TIMES -PLUS %/ - CL:ERROR) COMP.SPREAD (CL:FIRST CL:THIRD CL:SECOND CONS ADD1 COMP.STFN PLUS LIST) -FILLTRAJECTORY.IP (APPENDOP.IP) \\TEMPLOCKPAGES (\\MISCAPPLY* FUNCTION FFETCHFIELD) EDITADDNODE ( -WINDOWPROP GRAPHADDNODE CONS WFROMDS NODEREGION PRIN1 APPLY* CONSTANT DSPCLIPPINGREGION) -\\WRITEDIRTYPAGE1 (\\READFLAGS FFETCHFIELD LOGAND \\ASSURE.FPTOVP.PAGE) \\COURIER.TRACE (SELECTQ PRIN1 - |printout| LVLPRINT SHOULDNT) \\ORIG-READ.SYMBOL (CONCAT \\GETBASESTRING \\PARSE.NUMBER \\MKATOM) -\\NSFILING.COPYFILE (FFETCHFIELD FUNCTION \\NSFILING.COPY/RENAME \\GENERIC.COPYFILE) CHARACTER.READ ( -READCCODE PEEKCCODE \\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE LOGAND CL:CODE-CHAR CHARCODE.DECODE -CONCAT ALLOCSTRING READ-EXTENDED-TOKEN) EXPRCHECK (EXPRP VIRGINFN MISSPELLED? FUNCTION CONS) -EDITSHADEREPAINTFN (WINDOWPROP BITMAPWIDTH BITMAPHEIGHT CONS ITIMES) COMP.GETD (COMP.STFN SELECTQ) -NTH.COLUMN.OF (NTH.RELATIVE.COLUMN.OF IDIFFERENCE) \\TEDIT.FILL.IN.CHARLOOKS.MENU ( -\\TEDIT.PARSE.CHARLOOKS.LIST FFETCHFIELD LIST MBUTTON.FIND.NEXT.BUTTON ADD1 IMAGEOBJPROP CONCAT -FONTPROP PACK* U-CASE IABS IMINUS) \\DSPOPERATION.IP (FFETCHFIELD) FASL::DUMP-ARRAY (CL:ERROR -FASL::DUMP-GENERAL-ARRAY FASL::DUMP-BIT-ARRAY FASL::DUMP-SIMPLE-VECTOR) CL:EVALHOOK (CL:EVAL) -\\TEDIT.CONVERT.FOREIGN.FORMAT (OPENTEXTSTREAM RESETSAVE \\TEDIT.SET.WINDOW CONS TEXTOBJ APPLY* -FFETCHFIELD) EDITAPPLYTOLINK (TERPRI READ/NODE |printout| ERSETQ APPLY* DISPLAY/NAME) /SETBRK (LIST -GETBRK SETBRK) SETBSPUSERINFO (\\DTEST FFETCHFIELD FREPLACEFIELD) NSPRINT (CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION GETNSPRINTER OPENSTREAM LISTGET CONS FULLNAME GETFILEINFO \\NSPRINT.INTERNAL - UNPACKFILENAME.STRING) COURIER.WRITE (LRSH \\BOUT LOGAND UNSIGNED SUB1 LLSH \\HINUM \\WOUT -LISP.TO.ALTO.DATE GETPROP \\GET.COURIER.TYPE ASSOC MKSTRING \\COURIER.TYPE.ERROR LENGTH COURIER.WRITE) - CL:APPLYHOOK (DECLARE CL:APPLY) SI::UNADVISE-FROM-RESTORE-CALLS (CL:FIND-IF CL:FUNCTION CL:FORMAT) -\\MATCHPCS (FFETCHFIELD \\GETBASEPTR PLUS) TEDIT.PARSE.PAGEFRAMES (LIST FREPLACEFIELDVAL NCREATE -MAPCAR TEDIT.PARSE.PAGEFRAMES) DWIMUNSAVEDEF (LIST FLAST LISTGET1 UNSAVEDEF) COPYTEXTSTREAM (TEXTOBJ -FFETCHFIELD OPENTEXTSTREAM ADD1 TEDIT.SELECTED.PIECES FUNCTION) FILL-VECTOR (CL:ERROR FFETCHFIELD - -%ARRAY-TYPE-NUMBER) |\\VFMGetInterval| (|\\PFVolumeNumber| ELT SETA SUB1 ARRAY FFETCHFIELD -|\\VFMGetBufferFor| LOCF \\ALLOCBLOCK LRSH ADD1 MESASIZE \\ADDBASE PLUS) EXPANDMACRO (GETHASH -GETMACROPROP MACROEXPANSION OUTPUT PRINTDEF TERPRI) MACROS.GETDEF (MKPROGN GETPROPLIST LIST) -MSPRINTHELPFILE (INFILEP TERPRI INPUT INFILE LIST GETEOFPTR) XCL::SET-CONSTANTP (GETHASH) -\\TEDIT.SHOWCARETLOOKS (FFETCHFIELD CONCAT \\TK.DESCRIBEFONT) EDITPROP (EDITDEF LIST APPLY) +GET-TITLEW WINDOWPROP TWODINSPECT.ARRANGEWINDOWS FUNCTION) SETA (\DTEST IDIFFERENCE IPLUS SELECTC LIST + \RPLPTR \ADDBASE2 \ADDBASE \PUTBASEFIXP \PUTBASEBYTE \PUTBASE FOLDLO LRSH LOGAND \GETBASE LOGXOR LLSH + SUB1 IMOD LOGOR \PUTBASEFLOATP UNFOLD FLOAT LISPERROR) \CANONICAL.NSHOSTNAME (LOOKUP.NS.SERVER MKATOM + NSNAME.TO.STRING) CL:THROW (CL:THROW \EVAL) ARRAY (FIX SELECTQ FOLDHI LRSH IPLUS UNFOLD LLSH FLOAT +\ILLEGAL.ARG LISPERROR \ALLOCBLOCK SUB1 \ADDBASE LIST \RPLPTR FEQP) MKCONS (CONS LIST) +AS.MAKE.CONVERSATION (\INTERNAL/GETPASSWORD RAND \AUTHENTICATION.FIND.SERVER COURIER.OPEN LIST +FUNCTION COURIER.CALL PARSE.NSNAME COURIER.FETCH CONS DES.MAKE.KEY) \WALKOVER.FUNCTION (APPLY* LIST) +\10MB.GETPACKETSTATUS (SELECTC LOGAND LOGOR \DoveEther.GetPacketStatus \NOMACHINETYPE) +\SELITEM.FROM.PROPERTY (WINDOWPROP) \DELETETREE (UNINTERRUPTABLY LLSH SUB1 \GETBASEPTR PLUS \ADDBASE +IDIFFERENCE IPLUS \GETBASEFIXP) SI::INTERNAL-THROW-VALUES (CL:VALUES-LIST CL:ERROR) \WALKOVER.SF.LIST +(EVERY APPLY*) ASKUSERCHAR (CHCON1 IDIFFERENCE) \MEDW.GETSCREENREGION (RESETFORM CURSOR FIXP MKLIST +LENGTH IDIFFERENCE SUB1 IMIN IPLUS IMAX LOGAND IQUOTIENT CLOCK ZEROP LOGOR IABS IMINUS) CL:FMAKUNBOUND + (CL:SYMBOL-FUNCTION CL:MACRO-FUNCTION REMPROP) \TEDIT.EXPANDED.MENU (COPYTEXTSTREAM \TEDIT.PRIMARYW +TEXTOBJ HEIGHTIFWINDOW) FB.FETCHFILENAME (\DTEST) \IRM.GET.HASHFILE (ARRAYP OPENHASHFILE PACKFILENAME) + USER-SUBR-NUMBER (ASSOC ERROR) TEDIT.GET.OBJECT1 (\ATMIN GETFILEPTR READIMAGEOBJ +\TEDIT.UNIQUIFY.CHARLOOKS CHARLOOKS.FROM.FONT) MSDESCRIBE (GETRELQ GETTABLE FASSOC SMARTARGLIST +CHANGEFONT TESTRELQ TESTTABLE GETHASH ABS UNION LIST CONS EVAL) SI::PVAR-VALUE-IN-FRAME ( +GETSTKNAMEENTRY NTSLOT-VARTYPE GETSTKNTOFFSETENTRY + ADDSTACKBASE \VAG2 UNFOLD LLSH NTSLOT-OFFSET +LOGAND PLUS WORDSPERNTOFFSETENTRY WORDSPERNAMEENTRY) SETF-SYMBOL-FUNCTION (VIRGINFN PUTD GETD) +\NSRANDOM.TRUNCATEFILE (\GETEOFPTR \NSRANDOM.UPDATE.VALIDATION FILING.CALL ASSOC) +SI::VARIABLE-NAME-IN-FRAME (\ADDBASE + GETSTKNAMEENTRY GETSTKNTOFFSETENTRY \INDEXATOMVAL \VAG2 LRSH +LOGAND CONSTANT WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY) TERM.CLEAR.TAB (\DTEST DREMOVE) +SCANCOMPILEDFN (SOME IEQP CONS GETFILEPTR TMPSUBFN DREMOVE) MSDESCRIBE1 (LINELENGTH POSITION IPLUS +NCHARS) ASSURE.PUP.READY (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FIND.PROCESS +\CLEAR.ROUTING.TABLE \FIND.LOCALPUPHOSTNUMBER SETUPTIMER) CL:FORMAT (CL:MACROLET GETSTREAM SUB-FORMAT +CL:LENGTH) FORMAT-SEMICOLON-ERROR (DECLARE FORMAT-ERROR) ADD-USER-SUBR (DECLARE \INIT-USER-SUBR-TABLE +FASSOC CL:REMOVE ELT CL:FUNCTION LIST) MOVE.FORWARD.TO (IPLUS SEGMENT.BIT.LENGTH CHECK.MARGIN) +CL:SYMBOL-VALUE (\EVAL CL:ERROR) LOOKUPHASHFILE (CREATEKEY PACK* GTHASHFILE ANYEQ GETHASHKEY EQMEMB +IMINUS READ) \DISCARDFRAME (UNINTERRUPTABLY IDIFFERENCE IPLUS PLUS FFETCHFIELD ADDSTACKBASE \VAG2 SUB1 +) MBUTTON.FIND.BUTTON (MKATOM TEXTOBJ \CHTOPC IMAGEOBJPROP PLUS) \INIT-USER-SUBR-TABLE (ARRAY MAPC +SETA) \TEDIT.GET.PARALOOKS1 (\SMALLPIN SUB1 LLSH IDIFFERENCE CONS \BIN SELECTC SHOULDNT LOGAND SELECTQ + LIST PLUS ZEROP \ARBIN \ATMIN) FB.CANONICALIZE.PATTERN (SELCHARQ NTHCHARCODE PLUS DIRECTORYNAME +SUBSTRING CONCAT ADD1) COMPILER::ANALYZE-TREE (COMPILER::ENV-ANALYZE COMPILER::EFFECTS-ANALYZE) +CL:FIND-SYMBOL (DECLARE \SIMPLE-STRINGIFY FIND-SYMBOL*) NUTF8STRINGBYTES (NTHCHARCODE PLUS +NUTF8CODEBYTES XTOUCODE) BUTTONPANEL (MAPCAR LIST FUNCTION) CL:FIND (CL:LENGTH COMPLEX-FIND +SIMPLE-FIND) ITEMOFPROPERTYVALUE (MEMB \SELITEM.FROM.PROPERTY WINDOWPROP) TEDIT-BOOK (OPENTEXTSTREAM +MKATOM TEXTOBJ TEDIT.INCLUDE PACK* CLOSEF) TB.COLLECT.ITEMS (FUNCTION \DTEST LIST) +DEFAULTWHENSELECTEDFN (STKEVAL STKPOS) ASKUSER1 (CONSTANT CHARACTER PACKC NTHCHAR) CL:SYMBOL-FUNCTION +(GETD CL:MACRO-FUNCTION CONS CL:SPECIAL-FORM-P CL:ERROR) \NSRANDOM.WRITEPAGES (PLUS UNFOLD LLSH +\NSRANDOM.UPDATE.VALIDATION - FOLDLO LRSH IMOD \NSRANDOM.WRITE.SEGMENT CL:NTHCDR + ASSOC) SLICEREF ( +ARG CL:AREF IPLUS PLUS ITIMES) ELT (IDIFFERENCE IPLUS SELECTC LIST \GETBASEPTR \ADDBASE2 \ADDBASE +\MAKENUMBER \GETBASE \GETBASEBYTE LOGAND LRSH FOLDLO SUB1 IMOD \GETBASEFLOATP UNFOLD LLSH LISPERROR) +UNDOLISPX3 (RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION LISTGET1 +EDITL FASSOC FMEMB) PROCESSPROP (ARG FIND.PROCESS SELECTQ LISTGET \INSUREWINDOW \ILLEGAL.ARG LIST) +\IRM.CHOOSE.REF (MENU MKSTRING MAPCAR LIST PACK* KWOTE CONCAT) \STARTPUP (\FLUSHPUPSOCQUEUE +ASSURE.PUP.READY) \UNDEFINED-USER-SUBR-UFN (ERROR CL:FORMAT MISCN-COLLECT) CLEARSTK (FUNCTION) +CHAT.CHOOSE.PHONE.NUMBER (MENU CHAT.PROMPT.FOR.INPUT CONS LIST CONCATCODES CHCON) HARDRESET ( +\CONTEXTSWITCH) TERM.ERASEBITS (BITBLT DSPTEXTURE) \MEDW.CARET.SHOW (WFROMDS BITSPERPIXEL +DSPDESTINATION IDIFFERENCE IPLUS \DSPTRANSFORMX \DSPTRANSFORMY \AREAVISIBLE? SUB1) CL:COPY-SYMBOL ( +CL:MAKE-SYMBOL CL:SYMBOL-NAME) ICMLARRAY.VALUECOMMANDFN (CONSTANT \CREATE.INSPECTABLEMENU +\CREATE.SETABLEMENU ARG SLICERANK MENU SELECTQ SLICEREF SHOULDNT CONCAT) /SETTERMTABLE (SETTERMTABLE +LIST) NUTF8CODEBYTES (SHOULDNT) %#BITSON (LOGAND LLSH ADD1) FASL:CLOSE-FASL-HANDLE (BOUT +FASL::HANDLE-STREAM FASL::HANDLE-STATE CL:APPLY) GETTTBLPROP (ECHOCONTROL GETSYNTAX DELETECONTROL +GETDELETECONTROL GETCONTROL GETRAISE GETECHOMODE) \TEDIT.PRESS.HARDCOPY (OPENTEXTSTREAM MKATOM +RESETLST RESETSAVE \TEDIT.MARKACTIVE TEXTOBJ TEDIT.FORMAT.HARDCOPY CLOSEF?) FB.PROMPTWPRINT (ERROR +\DTEST ARG PLUS) ASKUSER$ (CONSTANT CHARACTER PACKC NCHARS NTHCHARCODE PLUS SUB1 ASKUSERLOOKUP +SUBSTRING) \USER-SUBR-UFN (\GETBASE APPLY* ELT - \ADDBASE) DWIMIFYREC (LIST DWIMIFY0? APPEND) +COMP.UNWIND-PROTECT (COMP.CALL COMP.LAM1 LIST) \RANGELIMIT (IMAX IMIN) LIST (CONS ARG SUB1) +\ITEMW.SELECTITEM (WINDOWPROP) \SETUPSTACK1 (IDIFFERENCE IPLUS MIN ADDSTACKBASE \VAG2 UNFOLD LLSH PLUS + TIMES PUTBASEPTR \PUTBASEPTR CONSTANT CL:READ-FROM-STRING ADD1) \TEDIT.EXPANDEDCHARLOOKS.MENU ( +\TEXTMENU.START COPYTEXTSTREAM \TEDIT.PRIMARYW HEIGHTIFWINDOW) TEDIT.HCPYFILE (PRINTERPROP PRINTERTYPE + \TEDIT.MAKEFILENAME TEDIT.GETINPUT TEXTOBJ CONCAT PACKFILENAME SELECTQ TEDIT.FORMAT.HARDCOPY) +\MEDW.GETBOXSCREENPOSITION (RESETFORM CURSOR MOUSESTATE LOGAND LOGOR IPLUS IQUOTIENT IMINUS ZEROP +DSPXSCREENTOWINDOW IMIN DSPYSCREENTOWINDOW) COMP.CATCH (COMP.CALL COMP.LAM1 LIST) ERASE/GRAPHNODE ( +ZEROP BITBLT IPLUS GN/LEFT GN/BOTTOM) CL:REMOVE (CL:LENGTH COMPLEX-REMOVE SIMPLE-REMOVE) CL:SYMBOLP ( +LITATOM) COMP.GLOBALVARP (GETP FMEMB) BEGINMASTER.IP (APPENDOP.IP) SUBRNUMBER (ASSOC CL:ASSOC FUNCTION + CL:WARN ERROR) \NSRANDOM.SETEOFPTR (SELECTQ \NEWLENGTHIS LOGAND ADD1 SHOULDNT) COMPERRM (PRINTLEVEL +LISPXPRINT) TTUNREADBUF (FIRSTCHAR TTNEXTCHAR DELETE.TO.END) \TEDIT.GET.CHARLOOKS1 (\ARBIN \SMALLPIN +SUB1 LLSH IDIFFERENCE ZEROP IMINUS \BIN LOGAND FONTCLASS FONTCREATE) CARET (\CARET.DOWN CARETRATE +SELECTQ ERROR LISPERROR) \BUILDATWSTRUCTURE (MAPCAR CONS LIST MINIMUMMAINWINDOWSIZE +MAXIMUMMAINWINDOWSIZE WINDOWPROP NCONC FASSOC MINIMUMWINDOWSIZE MAXIMUMWINDOWSIZE WINDOWSIZE) +UTF8HEXSTRING (HEXSTRING LOGOR LLSH LRSH LOADBYTE LOGAND LSH IMINUS MASK.1'S SUB1 ERROR) +MOST/VISIBLE/OPERATION (%#BITSON) SETSYNTAXPROP (SETSYNTAX) FB.SELECTEDFILES (TB.COLLECT.ITEMS \DTEST) + ERASEMENUIMAGE (BITBLT WINDOWPROP IDIFFERENCE) CL:WARN (MAKE-INTO-CONDITION) FM.GETITEM (ERROR +\FM.GROUPPROP LISTGET FASSOC WINDOWPROP \FM.ITEMPROP FFETCHFIELD) \UPCASEBASE (IPLUS \PUTBASEFAT +\PUTBASE \PUTBASETHIN \PUTBASEBYTE PLUS) /SETREADTABLE (SETREADTABLE LIST) EVALQT (LISPX LISPXREAD +CLBUFS) \RESETSTACK0 (\GETBASE PLUS \MAKEFRAME FUNCTION IPLUS \SETUPUSERSTACK) STRING.EQUAL (MKSTRING +\DTEST UPPERCASEARRAY \GETBASECHAR \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE PLUS) RECORDBIND ( +CONS LIST RECORDGENSYM) XCL:PACKAGE-PREFIX (CL::%%PACKAGE-NAMESYMBOL) COURIER.CALL (ARG +\GET.COURIERPROGRAM GETHASH ERROR \GET.COURIER.DEFINITION LENGTH SELECTQ - + CONS LIST PLUS +COURIER.EXECUTE.CALL RESETLST COURIER.OPEN \ILLEGAL.ARG) \CONTEXTAPPLY (\MYALINK OPCODES GETBASE +\GETBASE SPREADAPPLY*) CL:ASSOC (CL:ERROR CL::%%COMPLEX-ASSOC CL::%%SIMPLE-ASSOC) INSPECTW.SELECTITEM +(WINDOWPROP ITEMOFPROPERTYVALUE \SELITEM.FROM.PROPERTY) \CAUSEINTERRUPT (\GETBASE \MAKEFRAME FUNCTION +IPLUS) \TEXTMENU.START (WINDOWPROP GETREGION ATTACHEDWINDOWS CREATEW LIST TEXTOBJ) CRITSECT (TERPRI +IMIN IMAX) TTCOMPLETEWORD (CURRENT.WORD FIND.MATCHING.WORD ADD1 PLUS SELECTC \SYNCODE GETHASH +\GETBASEBYTE FIRSTCHAR TTNEXTCHAR NCHARS INPART SUB1 FNTH CHCON NTHCHARCODE LOGXOR CL:SYMBOL-PACKAGE +FIXP TTBITWIDTH - + SEGMENT.BIT.LENGTH TTADJUSTWIDTH) APPENDOP.IP (APPENDBYTE.IP LOGOR FOLDLO LRSH MOD + IMOD) SPP.READP (LOGAND LISPERROR FULLNAME) \INTERRUPTFRAME (\INTERRUPTED INTERRUPTED) \INTERRUPTED ( +INTERRUPTED) ICMLARRAY.TITLECOMMANDFN (MODERNWINDOW.BUTTONEVENTFN FUNCTION) /RAISE (RAISE LIST) +INTERRUPTED (ASSOC THIS.PROCESS PROCESSPROP FIND.PROCESS TTY.PROCESS WHICHW WINDOWPROP FUNCTION LIST) +WINDOWSIZE (WINDOWREGION CONS) AS.NEXT.VERIFIER (DES.BREAKOUT.BLOCKS DES.MAKE.BLOCKS COURIER.WRITE.REP + COURIER.CREATE LIST IDATE RAND LOGXOR MAPCAR DES.ECB.ENCRYPT) \DOMISCAPPLY1 (SPREADAPPLY*) ARCTO.IP ( +FIXR APPENDOP.IP) GETSYNTAXPROP (GETSYNTAX) COMP.CALL (COMP.CLEANFNOP CONS COMP.STFN ADD1) CREATEPAGES + (SUB1 \ADDBASE UNFOLD LLSH PLUS) FASL:OPCODE-SEQUENCE (CL:ASSOC FASL::OPTABLE-OPNAMES LIST +FASL:OPCODE-SEQUENCE FASL::OPTABLE-NEXT CONS) \DISPLAYLINE (WINDOWPROP IMAX IDIFFERENCE DSPSCALE +\TEDIT.LINECACHE FIXR FQUOTIENT DSPFONT \EDITELT GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE FTIMES +IPLUS PLUS FONTCOPY CHARWIDTH IREMAINDER DSPYPOSITION IMAGEOBJPROP) IRM.CREF.BUTTONEVENTFN ( +IMAGEOBJPROP RESETFORM TTYDISPLAYSTREAM GETPROMPTWINDOW BLTSHADE LOGAND LOGOR CURSORPOSITION ADD1 +PRIN1 CONCAT LIST KWOTE WINDOWPROP) \GATHER-CLEANUP-FORMS1 (ADDSTACKBASE \VAG2 +\GATHER-SPECIAL-BINDINGS CONS LIST \GETBASEPTR SI::PVAR-VALUE-IN-FRAME) FB.TABLEBROWSER (\DTEST) +DO.EDIT.COMMAND (IMINUS U-CASECODE TTNEXTLINE TTNTH PREVLINE TTNLEFT PREVWORD FIND.NEXT.WORD SUB1VAR +TTLASTLINE NTH.COLUMN.OF EDITCOLUMN IMIN IPLUS TTBIN TTSKREAD TTNEXTCHAR BACKSKREAD \SYNCODE GETHASH +\GETBASEBYTE FIRSTCHAR FMEMB PLUS SEGMENT.BIT.LENGTH IDIFFERENCE NTH ADD1 TTBITWIDTH CURRENT.WORD +TTRATOM EDITNUMBERP ITIMES) MBUTTON.CREATE (FONTCLASSCOMPONENT IMAGEOBJCREATE STRINGWIDTH FONTPROP) +\MEDW.GETSCREENPOSITION (WFROMDS RESETFORM CURSOR LOGAND ZEROP LASTMOUSEX LASTMOUSEY) UPDATEPCNODES ( +\GETBASEPTR IPLUS \GETBASEFIXP PLUS FFETCHFIELD) XCL:COMPILE-FORM (COMPILER:MAKE-CONTEXT COMPILER::MAKE-ENV + CL:MAKE-HASH-TABLE CL:VALUES-LIST) XCL:COMPILE-DEFINER (COMPILER::MAKE-ENV GETDEF) RECORDERROR ( +SELECTQ APPEND MKLIST LIST RETDWIM2 MEMB TAILP NLEFT) \NSRANDOM.DESTROY.STREAM (\RELEASECPAGE +\GETEOFPTR CLOSEF) \MAKE.PROCESS0 (FUNCTION \GETOFD \GETSTREAM GETTOPVAL LOCF \ADDBASE TERPRI +\HARDRESET-CLEANUP \EVAL PRIN1 TTY.PROCESS) CHECKSAMEDIR (DIRECTORYNAME GET MKATOM U-CASE CONS +HOST&DIRECTORYFIELD MKLIST ASSOC ASKUSER LIST CNDIR READ INFILEP PACKFILENAME.STRING MKSTRING +FILENAMEFIELD) \10MB.GETPACKETLENGTH (SELECTC FOLDLO LRSH \NOMACHINETYPE) CHAT.TYPESCRIPT1 ( +GETPROMPTWINDOW CHAT.PROMPT.FOR.INPUT OPENSTREAM CLOSEF PRIN1 printout FULLNAME) \InitCurveBrushes ( +BITMAPCREATE ARRAY PACK* APPLY* PLUS INSTALLBRUSH) \TEDIT.EXPANDEDPARA.MENU (\TEXTMENU.START +COPYTEXTSTREAM \TEDIT.PRIMARYW TEXTOBJ HEIGHTIFWINDOW) TB.NTH.ITEM (PLUS) GETBOXSCREENREGION ( +GETBOXSCREENPOSITION) TEDIT.UNPARSE.PAGEFORMAT (LISTGET SELECTQ IPLUS NCONC1 LIST PLUS IDIFFERENCE +ADD1 CONSTANT FQUOTIENT FIXR MAPCAR) CL::COUNT-OCCURRENCES (+ CL::COUNT-OCCURRENCES) SI::BQUOTE-EXPANDER + (KWOTE) SPP.BACKFILEPTR (FREPLACEFIELD PLUS FFETCHFIELD) \FORMATLINE (SUB1 IMAX WINDOWPROP FUNCTION +PLUS \RPLPTR \ADDBASE2 \ADDBASE \TEDIT.APPLY.STYLES \EDITELT GETBASEPTR \GETBASEPTR +\TEDIT.APPLY.PARASTYLES OPENIMAGESTREAM DSPSCALE \TEDIT.HCPYFMTSPEC FIXR FTIMES FONTCOPY IPLUS +IDIFFERENCE IEQP \BIN \FGETCHARWIDTH \GETBASE \GETCHARSETINFO UNFOLD LLSH \CHARSET LRSH \CREATECHARSET + \CHAR8CODE LOGAND APPLY* IMAGEOBJPROP ADD1 \TEDIT.FORMATTABS \FGETWIDTH FFETCHFIELD IMINUS \CHTOPC +FONTPROP IMIN) \TEDIT.CUMULATE.EVENTS (+) \HARDRESET-CLEANUP (LIST HASHARRAY TIMES LENGTH CONS MAPC +GETHASH RPLACA RPLACD PUTHASH PLUS .CALLAFTERPUSHINGNILS. + CEIL LOGAND IPLUS ADD1 UNFOLD LLSH +CONSTANT SUB1 LOGXOR FOLDHI LRSH \HARDRESET-CLEANUP1) COMP.LAM1 (COMP.GENFN) MB.PUTFN (IMAGEOBJPROP +FONTPROP LOGAND LRSH \BOUT \ATMOUT) \HARDRESET-CLEANUP1 (\MYALINK OPCODES ADDSTACKBASE \VAG2 CEIL +LOGAND IPLUS IDIFFERENCE UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDLO LRSH GETHASH \ATOMVALINDEX NTYPX +\LOLOC SHOULDNT + PLUS WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY HELP \ADDBASE) COMP.EFFECT (COMP.EXPR +OPT.JUMPCHECK) FILECOMS (PACK* NAMEFIELD) XCL:UNADVISE-FUNCTION (MAPCONC XCL:UNADVISE-FUNCTION GET +GETD CL:DELETE LIST SI::GET-ADVICE-MIDDLE-MAN) RDTBL\NONOTHERCODES (FUNCTION \GTREADTABLE) +XCL:READVISE-FUNCTION (MAPCONC XCL:READVISE-FUNCTION SI::FINISH-ADVISING) ASKUSERSETUP (MEMB +ASKUSERLOOKUP) XCL:REINSTALL-ADVICE (MAPC) SPP.FORCEOUTPUT (GETSPPCON FFETCHFIELD PLUS LOCF \ADDBASE +\LOLOC) /RADIX (RADIX LIST) SPP.EOFP (LOGAND \SPP.PREPARE.INPUT SELECTQ) QUOTE.WRAPPER (GETSYNTAX LAST +) FIND.NON.SPACE (FMEMB FIRSTCHAR TTNEXTCHAR) GETSCREENREGION (WINDOWOP SPREADAPPLY*) \DORETCALL ( +\VAG2 LOGOR LSH \GETBASEBYTE ADD1 DIFFERENCE UNFOLD LLSH \FREESTACKBLOCK \MAKEFRAME PLUS ADDSTACKBASE +RAID) RECORDGENSYM (GENSYM) \GATHER-SPECIAL-BINDINGS (GETSTKNAMEENTRY NTSLOT-VARTYPE +GETSTKNTOFFSETENTRY IPLUS \INDEXATOMVAL \VAG2 LRSH LOGAND CONS LIST \GETBASEPTR UNFOLD LLSH +NTSLOT-OFFSET ADDSTACKBASE PLUS CONSTANT WORDSPERNAMEENTRY) SI::COMMA-ERROR-EXPANDER (CL:ERROR CL:SECOND +) DISKPARTITION (SELECTQ MACHINETYPE \DFSCurrentVolume) \CLEANUP.STACKFULL (HARDRESET) TEDIT.FORMATBOX + (TEDIT.FORMATTEXTBOX TEDIT.FORMATFOLIO TEDIT.FORMATHEADING IPLUS IMAX ADD1 FRPLACA CONS) FASL:BEGIN-TEXT + (FASL::HANDLE-STATE FASL::HANDLE-STREAM) \DFSCurrentVolume (MKATOM U-CASE \PFCurrentVol) +XCL:REBREAK-FUNCTION (MAPCONC XCL:REBREAK-FUNCTION CL:GETHASH CL:APPLY) MACHINETYPE (SELECTC) +\TEDIT.PUT.PARALOOKS.LIST2 (HASHARRAY LOGAND LRSH \BOUT FLENGTH PLUS) XCL:TRACE-FUNCTION (MAPCONC +XCL:TRACE-FUNCTION CL:MAKE-SYMBOL CL:FORMAT GETD CL:COMPILE SI::CREATE-TRACED-DEFINITION GET CL:DELETE + LIST SI::CONSTRUCT-MIDDLE-MAN) FASL:PROCESS-SEGMENT (CL:FUNCALL FASL:READ-TEXT FASL:SKIP-TEXT +FASL:PROCESS-BLOCK) \ALLOCMINIMUMSIZES (IMAX IPLUS CONS \ALLOCMINIMUMSIZES IDIFFERENCE +\TOTALFIXEDWIDTH DIFFERENCE \SHAREOFXTRAX \SETWINFOYSIZE PLUS \TOTALFIXEDHEIGHT \SHAREOFXTRAY) +BQUOTE.WRAPPER (GETSYNTAX SELECTQ) RESET (\MYALINK OPCODES printout PRIN1) APPENDRATIONAL.IP (IMAX +BYTESININT.IP UNFOLD LLSH) CHARCODE (CHARCODE.DECODE) XCL:CREATE-TRACE-WINDOW (CREATEW) +DASSEM.DASMBIND (COMPERROR CONS DASSEM.DASMBIND IDIFFERENCE IPLUS ADD1 LLSH AST SUB1) +COMPILE-FILE-SCAN-FIRST (NCONC1) MSSTOREDATA (PARSERELATION MSCOLLECTDATA TESTRELATION FASSOC) +FB.COUNT.FILE.CHANGE (SELECTQ SHOULDNT FREPLACEFIELD PLUS FFETCHFIELD ITIMES) DBG::REGION-NEXT-TO ( +CREATEREGION) SI::BQUOTE-PROCESS-LIST (KWOTE) CENTRALWINDOW (WINDOWPROP) FASL:MAKE-OPTABLE ( +FASL::NEW-OPTABLE CL:MAKE-ARRAY FASL::OPTABLE-VECTOR CL:SVREF) SI::BQUOTE-NCONC (LIST) \ALLOCPAGEBLOCK + (UNINTERRUPTABLY \ALLOCVIRTUALPAGEBLOCK PLUS \ADDBASE) FASL:*DEFAULT-OPTABLE* (FASL:MAKE-OPTABLE) +SEDIT::SET-POINT-QUOTE (SEDIT::SET-POINT SEDIT::SUBNODE SEDIT::PUNT-SET-POINT SEDIT::SET-POINT-NOWHERE +) ICONTITLE (WINDOWPROP ERROR \ICONW.SHOW.TITLE) \ALLOCVIRTUALPAGEBLOCK (UNINTERRUPTABLY IPLUS +IDIFFERENCE CEIL LOGAND CONSTANT SUB1 LOGXOR \SET.STORAGE.STATE) MSMARKCHANGE1 (UNDOSAVE LIST FUNCTION +) \GETBRUSHBBT (BITMAPBIT UNFOLD LLSH SELECTQ SHOULDNT) \ATMOUT (LOGAND LRSH \BOUT NCHARS ZEROP ADD1 +\GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE) SETUPFONTS.PRESS (FONTCREATE) \SET.STORAGE.STATE (CONS +) CL::STRUCTURES.HASDEF (GETDEF CL::STRUCTURE-FUNCTION-P) SUSPEND-LISP (MACHINETYPE) MODERN-SNAPW ( +MODERN-ORIG-SNAPW FUNCTION) DISCARDXIPS (UNINTERRUPTABLY) \READNUMBER.OUTLINEREGION (FIXP IDIFFERENCE +IPLUS ITIMES DSPTEXTURE) COPYFILES (\ADD.CONNECTED.DIR FUNCTION COPIEDTOSPEC OPENSTREAM COPIEDFROMSPEC + SELECTQ \GETDEVICEFROMNAME TERPRI APPEND LIST CLOSEF) FASL:CHECK-VERSION (BIN16) VRULE.CREATE ( +IMAGEOBJCREATE NUMBERP CONCAT) \FM.EDIT-FINDFIRST (WINDOWPROP \FM.ITEMPROP FFETCHFIELD) +FASL:UNIMPLEMENTED-OPCODE (CL:ERROR) TB.UNSELECT.ALL.ITEMS (\DTEST TB.ITEM.UPDATABLE? TB.NTH.ITEM PLUS + ADD1) MAKEBRES (\SGN IABS IMINUS IDIFFERENCE IPLUS IMAX ITIMES) PFI.PROCESS.FILE (SKIPSEPRCODES CL:READ + ASSOC CONS CL:READ-DELIMITED-LIST) SEDIT::SET-POINT-UNKNOWN (SEDIT::PUNT-SET-POINT IGEQ HALF LRSH) +CL::%%EXP-FLOAT (FLOAT CL:* FTIMES CL::%%GET-TABLE-ENTRY FQUOTIENT CL::%%POLYEVAL UFMINUS CL:SCALE-FLOAT + -) UNIX-USERNAME (WITH-RESOURCE CONCAT SUBSTRING CL:POSITION GETRESOURCE NEWRESOURCE ALLOCSTRING) +\NSRANDOM.REESTABLISH (LIST \NSFILING.GETFILE) \HANDLE.RAW.OTHER (PRIN1 \RELEASE.ETHERPACKET) +\ADVANCE.STORAGE.STATE (DREMOVE) XCL:ADVISE-FUNCTION (MAPCONC XCL:ADVISE-FUNCTION SI::FINISH-ADVISING +CL:MEMBER) SUBSTRING (STRINGP MKSTRING IPLUS LITATOM ADD1 IDIFFERENCE) SEDIT::SET-POINT-LIST (ILESSP +HALF LRSH SUB1 SEDIT::PUNT-SET-POINT SMALLP IPLUS SEDIT::SUBNODE NTH) MAKETITLEBARICON (WINDOWPROP +NCHARS CONCAT DATE ICONPOSITION.FROM.WINDOW IMINUS DSPLINEFEED IMAX IPLUS STRINGWIDTH CREATEW FUNCTION +) CL:PACKAGE-USED-BY-LIST (CL::%%PACKAGE-USED-BY-LIST) COMPILE-FILE-EXPRESSION (SELECTQ +COMPILE-FILE-SCAN-FIRST REMOVE-COMMENTS XCL::%%DEFINER-NAME XCL::%%EXPAND-DEFINER +COMPILE-FILE-EXPRESSION MAPC CL:MAPCAR CL:FUNCTION CL:PROGV CL:MAPC FMEMB EVAL EXPANDMACRO GETPROP +CL:MACROEXPAND-1 COMPILE.FILE.APPLY WALK-FORM FUNCTION) SLICERANK (LENGTH) SI::BQUOTE-APPEND (LIST) +\VECENCODE (IDIFFERENCE IPLUS IMINUS ITIMES IMAX) ALLOCSTRING (FIX \CHARCODEP IGEQ CHCON1 IGREATERP +\ALLOCBLOCK FOLDHI LRSH IPLUS SUB1 \PUTBASE PLUS \PUTBASEBYTE) %%GET-TYPE-TABLE-ENTRY (CL:ASSOC) +MAKEFILESCOMS (LITATOM FMEMB CONS) PRINTPUP (SELECTQ FASSOC RESETFORM OUTPUT APPLY* IDIFFERENCE PRIN1 +TERPRI) FASL:OPEN-FASL-HANDLE (CL:APPLY FASL::MAKE-HANDLE) BREAK.MSG.INTO.LINES (SUBSTRING MKSTRING +NCHARS SUB1 NCONC1 CHARWIDTH NTHCHARCODE IPLUS ADD1 PLUS) MAKE-PACKAGE-HASHTABLE ( +CL::%%MAKE-PACKAGE-HASHTABLE MAKE-PRIME-HASHTABLE-SIZE CL::PACKAGE-HASHTABLE-TABLE LIST CL:MAKE-ARRAY +CL::PACKAGE-HASHTABLE-HASH FIX FTIMES CL::PACKAGE-HASHTABLE-SIZE CL::PACKAGE-HASHTABLE-FREE +CL::PACKAGE-HASHTABLE-DELETED) VRULE.GETFN2 (VRULE.CREATE READ) \FM.EDIT-SETUPTTBL (COPYTERMTABLE PLUS +) CL:PACKAGE-SHADOWING-SYMBOLS (CL::%%PACKAGE-SHADOWING-SYMBOLS) \LEAF.ABORT.FROMMENU (WFROMMENU +WINDOWPROP) \SPP.BOUTS (GETSPPCON FFETCHFIELD \BUFFERED.BOUTS \SPP.STREAM.LOST) UNIX-FULLNAME ( +WITH-RESOURCES CONCAT SUBSTRING CL:POSITION GETRESOURCE NEWRESOURCE ALLOCSTRING) \SPP.GETNEXTBUFFER ( +SELECTQ \SPP.PREPARE.INPUT SPP.STREAM.ERROR SPREADAPPLY* GETSPPCON FFETCHFIELD RETFROM STKPOS +\SPP.STREAM.LOST SHOULDNT) SEDIT::INITIALIZE-LISTS (LIST* SEDIT:RESET-FORMATS) TB.DESELECTRANGE ( +TB.NTH.ITEM PLUS TB.FIND.SELECTED.ITEM ADD1 TB.REV.FIND.SELECTED.ITEM SUB1) \INITMDSPAGE (IREMAINDER +LRSH IQUOTIENT PLUS \ADDBASE) FM.ITEMPROP (ERROR LIST ARG \FM.GETITEMPROP \FM.PUTITEMPROP) +\LFScavFileName (MKSTRING SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE LIST +\LFCASEARRAYFETCH CHCON CONCAT GENSYM) UNIX-GETENV (WITH-RESOURCES CONCAT SUBSTRING NTHCHARCODE SUB1 +PLUS GETRESOURCE NEWRESOURCE ALLOCSTRING) CL:PACKAGE-NICKNAMES (CL::%%PACKAGE-NICKNAMES) +FUNCTION.WRAPPER (\GTREADTABLE) CL::STRUCTURES.EDITDEF (DEFAULT.EDITDEF CL::STRUCTURE-FUNCTION-P) +VARIABLES (STKNARGS CONS STKARGNAME SUB1) NTHCHARCODE (IPLUS \GETBASECHAR \GETBASEFAT \GETBASE SUB1 +\GETBASETHIN \GETBASEBYTE NCHARS FUNCTION) \SETXIPCHECKSUM (\CHECKSUM SUB1 FOLDHI LRSH IPLUS) +FB.MAKE.SUBDIRECTORY.ITEM (SUBSTRING SUB1 NCHARS) \LFScavVersion (SMALLP FILENAMEFIELD RAND) MKSTRING +(ALLOCSTRING CL:CHAR-CODE \CHECKRADIX \INVALID.RADIX \GTREADTABLE \PRINDATUM.TO.STRING) CL:POSITION ( +CL:LENGTH COMPLEX-POSITION SIMPLE-POSITION) SEDIT::PRINT-GAP (CL:FORMAT) CL::STRUCTURE-FUNCTION-P ( +CL:CATCH CL:MAPHASH CL:FUNCTION) CL::PRINT-PACKAGE (PRIN3 CL::%%PACKAGE-NAME) PFI.COLLECT.DEFINERS ( +NCONC GET LIST) TEDIT.\INSERT (TEDIT.GETPOINT SELECTQ) \TEDIT.REPAINTFN (WINDOWPROP DSPCLIPPINGREGION) + SI::BQUOTE-CONS (CONSTANTEXPRESSIONP KWOTE CONS CL:FIRST LIST) MSPARSE (MSEAT DREVERSE LIST SORT +MAPCAR CONS MSMATCHRATING PRIN1 SELECTQ MSJOINSET SHOULDNT MSRESPELL MSSPLST) UNIX-GETPARM ( +WITH-RESOURCE CONCAT SUBSTRING SUB1 STRPOS GETRESOURCE NEWRESOURCE ALLOCSTRING) +COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION (CL:REMOVE COMPILER::COPY-ENV COMPILER::ENV-TARGET-ARCHITECTURE + COMPILER::RAW-COMPILE CL:SYMBOL-FUNCTION) \FM.EDIT-MESSAGE (SELECTQ) MAKE-PRIME-HASHTABLE-SIZE (LOGOR + FIX FQUOTIENT) TB.UNSELECT.ITEM (\DTEST TB.SHOW.SELECTION) HASH.PASSWORD (MKSTRING SUB1 IPLUS ADD1 +\GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE IMOD ITIMES CONSTANT EXPT L-CASECODE \DECRYPT.PWD.CHAR +LOGXOR) \SPP.SETFILEPTR (GETSPPCON FFETCHFIELD IDIFFERENCE \SPP.GETFILEPTR \SPP.SKIPBYTES +\IS.NOT.RANDACCESSP) STRPOS (STRINGP MKSTRING ADD1 IDIFFERENCE PLUS CHCON1 IPLUS \CATRANSLATE +\GETBASEBYTE \GETBASECHAR \GETBASEFAT \GETBASE \GETBASETHIN) PFI.PRINT.FILECREATED (DSPFONT MAPCAR +STRINGWIDTH + DSPLEFTMARGIN APPLY TERPRI LIST PFI.PRINT.ENVIRONMENT) SEDIT::INITIALIZE-COMMENTS (LIST* +) \LFFindDirectory (\LFFindDirectoryVol \LFDirectoryP) COURIER.WRITE.NSADDRESS (\BOUTS \DTEST UNFOLD +LLSH) COMPILER::FUNCTION-P (CL:FIRST CL:CONSP CL:SECOND) TWODINSPECT.REPLACE (WINDOWPROP) BAKTRACE1 ( +STKNTH SUB1 STKNAME CL:FUNCTION) IRM.GET.CREF (READ IMAGEOBJCREATE) \NSFILING.SET.CONTINUANCE ( +FILING.CALL IMIN IQUOTIENT ITIMES) CENTERINWIDTH (PLUS IQUOTIENT DIFFERENCE) ASKUSER (RESETLST +CHARACTER GETTERMTABLE SETTERMTABLE READP CLBUFS LIST ITIMES PEEKC NTHCHAR NCONC1 ASKUSERLOOKUP PRIN1 +CONSTANT ASKUSER$ ADD1 CHCON1 FASSOC CONCAT ASKUSEREXPLAIN SUBSTRING SUB1 PACKC LISTGET1 CONS NLSETQ +READ READLINE EVAL NCHARS LASTC READC ASKUSERPRIN1 FMEMB PACK APPLY NCONC) \COURIER.CHECK.PROCEDURES ( +FIXP NULLORLISTP) \FLUSH.NDB.QUEUE (\DEQUEUE) \TEDIT.INCLUDE (HELP) \DOSTACKFULLINTERRUPT (RESETLST +RESETSAVE LIST FUNCTION STACK.FULL.WARNING) SEDIT::REPLACE-QUOTE (FREPLACEFIELD CONS LIST SEDIT::SUBNODE + FFETCHFIELD ADD1) CLISPDEC (LIST GETPROP NTH /PUT FIXSPELL) DISPLAYLINK/BT (APPLY* LISTGET IPLUS SUB1 + GN/BOTTOM ADD1 GN/TOP) MSEDITE (ARG LIST PLUS CONS) \RESOLVE.TYPENUMBER (\TYPENUMBERFROMNAME +\ASSIGNDATATYPE1 \ILLEGAL.ARG) \SPP.GETFILEPTR (IPLUS) \EXTENDEDVMEMINIT (LOCF \ADDBASE IMAX \GETBASE) + PFI.PRINT.INDEX (LIST CONCAT DATE PFI.LINES.REMAINING PFI.CONDENSE.INDEX APPEND) \MAYBEPEEKPUP ( +\RELEASE.ETHERPACKET) CREATECELL (\CREATECELL) CL::%%LOG-BASE2-E (CL::%%FLOAT) CL:PACKAGE-USE-LIST ( +CL::%%PACKAGE-USE-LIST) \DWOUT (LOGAND LRSH \BOUT) CL::PRINT-PACKAGE-HASHTABLE (PRIN3 +CL::PACKAGE-HASHTABLE-SIZE CL::PACKAGE-HASHTABLE-FREE CL::PACKAGE-HASHTABLE-DELETED) +\MAIKO.SET.STORAGE.STATE (CONS) CLOSEATTACHEDWINDOWS (MAPC ATTACHEDWINDOWS WINDOWPROP) SHOWBITMAP.IP ( +INTERSECTREGIONS CEIL LOGAND IPLUS FOLDHI LRSH CONSTANT SUB1 LOGXOR TIMES FQUOTIENT IQUOTIENT IMIN +IDIFFERENCE) TEDIT.GETPOINT (TEXTOBJ IMAX SELECTQ SHOULDNT) \STARTPAGE.PRESS (IDIFFERENCE FONTPROP +IPLUS FREPLACEFIELD PLUS FFETCHFIELD) FB.UPDATEBROWSERITEMS (RESETLST FB.GET.NEWPATTERN COPY +STRINGWIDTH + TIMES CHARWIDTH LIST CL:POSITION FUNCTION CL:NTH FB.DATE \GENERATENEXTFILE CONCATCODES +FB.CREATE.FILEBUCKET FB.GETALLFILEINFO CONS TB.NUMBER.OF.ITEMS FB.MAYBE.WIDEN.NAMES) +D-ASSEM:ASSEMBLE-FUNCTION (CL:MAKE-HASH-TABLE CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +D-ASSEM::DCODE-FROM-DLAMBDA D-ASSEM::DLAMBDA-FROM-LAMBDA D-ASSEM::COPY-LAP-FN D-ASSEM::DCODE-CLOSURE-P + CL:FUNCTION) TEDIT.DEFAULT.MENUFN (WINDOWPROP CONCAT \TEDIT.CREATEMENU MENU RESETLST RESETSAVE +\TEDIT.MARKACTIVE SELECTQ TEDIT.PUT TEXTPROP TEDIT.GET TEDIT.INCLUDE \TEDIT.QUIT CURSOR +TEDIT.SUBSTITUTE TEDIT.GETINPUT TEDIT.FIND MKSTRING ADD1 IDIFFERENCE \TEDIT.GET.INSERT.CHARLOOKS +\TEDIT.LOOKS TEDIT.HARDCOPY TEDIT.HCPYFILE \TEDIT.EXPANDED.MENU \TEDIT.EXPANDEDCHARLOOKS.MENU +\TEDIT.EXPANDEDPARA.MENU \TEXTMENU.START COPYTEXTSTREAM \TEDIT.PRIMARYW APPLY*) \COURIER.CHECKDEF ( +ERROR MAP SELECTQ \COURIER.CHECK.PROCEDURES \COURIER.CHECK.ERRORS) BitFieldShiftedMask (IDIFFERENCE +LLSH BitFieldFirst IPLUS BitFieldWidth) TEDIT.GET.OBJECT (DIFFERENCE GETFILEPTR \ATMIN READIMAGEOBJ +\TEDIT.UNIQUIFY.CHARLOOKS CHARLOOKS.FROM.FONT) \SPP.RESETCLOSE (SPP.CLOSE) D-ASSEM:INTERN-DCODE ( +CL:ARRAYP D-ASSEM::DCODE-CODE-ARRAY D-ASSEM::DCODE-NAME-TABLE CL:LENGTH CEIL LOGAND IPLUS CL:1+ UNFOLD + LLSH CONSTANT SUB1 LOGXOR CL:* + D-ASSEM::DCODE-NUM-ARGS CL:1- CL:CEILING D-ASSEM::DCODE-NLOCALS +D-ASSEM::DCODE-NFREEVARS D-ASSEM::DCODE-ARG-TYPE D-ASSEM::DCODE-FRAME-NAME OPCODES D-ASSEM::DCODE-CLOSURE-P + D-ASSEM::DCODE-DEBUGGING-INFO D-ASSEM::DCODE-INTERN-RESULT MAKE-COMPILED-CLOSURE) SEDIT::REPLACE-LIST + (NTH IPLUS IDIFFERENCE LENGTH ADD1 FREPLACEFIELD PLUS FFETCHFIELD CONS LIST NCONC SUB1 IMAX) +COLLECT-CASE-SELECTORS (MAPCONC CL:COPY-LIST LIST CHECK-*CASE-SELECTOR) BitFieldMask (SUB1 LLSH +BitFieldWidth) SEDIT::PRINT-BROKEN-ATOM (CL:FORMAT) ONEDINSPECT.REPLACE (WINDOWPROP) BitFieldShift ( +IDIFFERENCE IPLUS BitFieldFirst BitFieldWidth) EDITGETDEF (EDITMODE SEDIT::SUBNODE) IRM.PUT.CREF ( +PRIN2 CONS IMAGEOBJPROP) %%SUFFIX-SYMBOL (CL:INTERN CL:CONCATENATE CL:SYMBOL-NAME) BitFieldWidth (ADD1 + LOGAND) %%LIT-SIZE-TO-SIZE (CL:ASSOC) D-ASSEM:FIXUP-PTR-NO-REF (\LOLOC LOGOR \GETBASEBYTE LRSH \HILOC + + LOGAND \PUTBASEBYTE) \TEDIT.PROMPT.PAGEFULLFN (WFROMDS ADD1 WINDOWPROP REMOVE ATTACHEDWINDOWS CL:1- + REVERSE CREATEPOSITION IDIFFERENCE) COURIERPROGRAM (PUTDEF) \DTEST (\DTEST.UFN) COURIER.EXECUTE.CALL +(\BOUT \HINUM \WOUT LOGAND \BULK.DATA.STREAM \COURIER.HANDLE.BULKDATA \COURIER.RESULTS) D-ASSEM:FIXUP-SYMBOL + (\LOLOC \HILOC LOGOR \GETBASEBYTE LRSH + LOGAND \PUTBASEBYTE CL:1+) DBG::ATTACH-BACKTRACE-MENU ( +DECLARE WFROMDS TTYDISPLAYSTREAM STKNTH GETWINDOWPROP WINDOWPROP STKNAME CL:PRIN1-TO-STRING STKARG +LIST PLUS ATTACHEDWINDOWS CREATEW DBG::REGION-NEXT-TO WIDTHIFWINDOW IMIN IDIFFERENCE) DISPLAYLINK/RL ( +APPLY* LISTGET IPLUS ADD1 GN/RIGHT SUB1 GN/LEFT) SI::SPLIT-PROCEED-CLAUSES (PLUS CL:VALUES CL:FLET +LENGTH SI::MAYBE-QUOTE CL:FIRST KWOTE CL:NREVERSE CL:REVERSE) TB.INSERT.ITEM (\DTEST FIXP ADD1 CONS +FLAST TB.FIND.PREVIOUS.TAIL PLUS FFETCHFIELD TB.UPDATE.DISPLAY) D-ASSEM:ALLOCATE-CODE-BLOCK ( +D-ASSEM::START-PC-FROM-NT-COUNT CEIL LOGAND IPLUS + CONSTANT SUB1 LOGXOR \ALLOC.CODE.BLOCK CL:1+ +CL:CEILING CL:VALUES) STRIP-KEYWORDS (CL:VALUES CL:FIRST LIST CL:SECOND) FB.THINCOMMAND ( +TB.COLLECT.ITEMS FUNCTION SELECTQ FB.SORT.VERSIONS SORT IDATE DATE IDIFFERENCE CL:POSITION HELP CL:NTH + PLUS FB.PROMPTWPRINT) \LFUnpackName (\LFParseFileName \LFFindDirectoryVol SUB1 IPLUS ADD1 \GETBASEFAT + \GETBASE \GETBASETHIN \GETBASEBYTE \LFCASEARRAYFETCH LIST FIXP SELECTQ \PFVolumeNumber) D-ASSEM:FIXUP-PTR + (\LOLOC OPCODES LOGOR \GETBASEBYTE LRSH \HILOC + LOGAND \PUTBASEBYTE) CHECK-*CASE-SELECTOR (CL:ERROR) + SI::EXPAND-CONDITION-CASE (CL:MACROLET GENSYM CL:ASSOC EQL COMPILER:CONTEXT-VALUES-USED CL:FLET) +ENTER-NEW-NICKNAMES (DECLARE) CONDITIONS::CONVERT-RESTART-CASES (CL:VALUES CL:FIRST CONS) \SPP.EVENTFN + (SELECTQ MAPC APPEND SPP.CLOSE) PFI.PRINT.MULTI.INDEX (LISTGET PFI.LINES.REMAINING CONCAT DATE CONS +MAX STRINGWIDTH ASSOC FRPLACD PLUS RPLACA PFI.MERGE.INDICES DSPLEFTMARGIN TIMES DSPSCALE + - +DSPRIGHTMARGIN IQUOTIENT REVERSE LOGOR RPLACD PFI.COMPUTE.INDEX.SHAPE PFI.CHOOSE.BEST EVAL +CL:FIND-PACKAGE CL:ERROR FIND-READTABLE PFI.PRINT.INDICES PFI.SORT.INDICES) \LEAF.STREAM.IN.QUEUE ( +LIST LOGAND CONSTANT LOGOR) CONDITIONS::EXPAND-RESTART-CASE (GENSYM EQL COMPILER:CONTEXT-VALUES-USED) +TEDIT.PUT.OBJECT (GETFILEPTR LOGAND LRSH \BOUT IMAGEOBJPROP ADD1 IDIFFERENCE GETEOFPTR) \TESTPARTITION + (.DISKPARTINSTR. \DTEST) MSEDITF (ARG LIST PLUS CONS GETDEF) REPLACEFIELD (\DTEST SELECTQ \RPLPTR +PUTBASEPTRX \PUTBASEPTR \PUTBASEFLOATP \ADDBASE LOGAND LRSH \PUTBASE LOGOR \GETBASE LOGXOR LLSH +BitFieldMask BitFieldShift SUB1 BitFieldWidth IDIFFERENCE NTYPX \LOLOC \FIXP.FROM.FLOATP IQUOTIENT +CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR ADD1 LISPERROR) *PACKAGE-FROM-NAME* (HASHARRAY) +TB.SELECTRANGE (TB.NTH.ITEM PLUS) \MAYBEPEEKNS (LOGAND \GETBASE LOCF \ADDBASE \RELEASE.ETHERPACKET) +BOXCOUNT (\GETDTD \ADDBASE ITIMES SMALLP \TYPENUMBERFROMNAME) ENCAPSULATEDOBJ.IMAGEBOXFN (FONTCREATE +IMAGEOBJPROP ITIMES FONTPROP IMAX STRINGWIDTH CONCAT IPLUS) \POSTSCRIPT.OUTCHARFN (SELCHARQ \FGETWIDTH + \GETBASE \CHAR8CODE LOGAND IPLUS LRSH GETHASH \POSTSCRIPTTAB \DSPFONT.PSC LIST) ICMLARRAY.SETVALUE ( +MAINWINDOW SLICERANK WINDOWPROP XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES +RESETLST RESETSAVE TTYDISPLAYSTREAM TTY.PROCESS THIS.PROCESS CLEARBUF PRINTOUT PRIN1 CL:FUNCALL +LISPXREAD) CL:MAKE-PACKAGE (DECLARE MKSTRING CL:MAKE-SYMBOL \PKG-FIND-FREE-PACKAGE-INDEX +CL::%%MAKE-PACKAGE MAKE-PACKAGE-HASHTABLE CL:SYMBOL-NAME CONS CL:AREF) CONSCOUNT (BOXCOUNT) +CL:USE-PACKAGE (DECLARE) IRM.CREF.BOX (IMAGESTREAMTYPE SELECTQ IPLUS STRINGWIDTH IMAGEOBJPROP +FONTHEIGHT) SI::EXPAND-PROCEED-CASE (GENSYM EQL COMPILER:CONTEXT-VALUES-USED) \TYPECHECK (\DTEST.UFN) +\PRESSINIT (FUNCTION) D-ASSEM:RELEASE-DCODE (D-ASSEM::DCODE-LOCAL-FN-FIXUPS) D-ASSEM:FIXUP-WORD ( +\PUTBASEBYTE LRSH CL:1+ LOGAND) TEDIT.STRINGWIDTH (SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE \GETBASETHIN +\GETBASEBYTE PLUS TEDIT.CHARWIDTH SELCHARQ CHARWIDTH) SEDIT::PARSE--LIST-INTERNAL (SEDIT::BUILD-NODE) +CONDITIONS::PARSE-RESTART-CASE (CL:FIRST CL:VALUES) \COERCEFONTDESC (IMAGESTREAMTYPE \DEVICESYMBOL +SELECTQ SASSOC \COERCEFONTDESC FONTCOPY DEFAULTFONT ERROR CONCAT FONTCREATE SETFONTCLASSCOMPONENT +DSPFONT) MSFIND (MSFIND) DEFPACKAGE (REMOVE-COMMENTS CL:FIND-PACKAGE ERROR LIST SELECTQ +CL::%%PACKAGE-NAMESYMBOL CL:MAKE-SYMBOL CL:USE-PACKAGE ENTER-NEW-NICKNAMES EXPORT MAPCAR CL:INTERN +IMPORT MAPCONC CL::%%PACKAGE-SHADOWING-SYMBOLS CL:SHADOW CL:SHADOWING-IMPORT APPLY CONS SHOULDNT +CL:PACKAGE-NAME) STKNTHNAME (IMINUS \STACKARGPTR LISPERROR PLUS \MYALINK OPCODES SUB1) EXPANDW ( +WINDOWOP SPREADAPPLY* \INSUREWINDOW) COMPILER:ENV-BOUNDP (CL:ASSOC COMPILER::ENV-VENV COMPILER::VARIABLE-SCOPE + COMPILER::ENV-DECLARED-SPECIALS COMPILER::ENV-DECLARED-GLOBALS COMPILER::ENV-PARENT COMPILER:ENV-BOUNDP +) DISPLAYLINK/TB (APPLY* LISTGET IPLUS ADD1 GN/TOP SUB1 GN/BOTTOM) MODERN-ADD-EXEC (APPLY ARG LIST +PLUS PROCESSPROP) IMPORT (DECLARE CL::%%PACKAGE-EXTERNAL-SYMBOLS CL::%%PACKAGE-INTERNAL-SYMBOLS +CL:SHADOWING-IMPORT) TB.SHOW.SELECTION (BITBLT + SUB1 IQUOTIENT - TB.BOTTOM.OF.ITEM) CL:SHADOWING-IMPORT + (DECLARE CL::%%PACKAGE-EXTERNAL-SYMBOLS CL::%%PACKAGE-INTERNAL-SYMBOLS) MARGINBAR.CREATE ( +IMAGEOBJCREATE BITMAPCREATE DSPCREATE DSPCLIPPINGREGION) ONEDINSPECT.SETELT (GETPROMPTWINDOW +WINDOWREGION IPLUS ITIMES STRINGWIDTH APPLY* WINDOWPROP XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES + XCL::PROFILE-VALUES RESETLST RESETSAVE TTYDISPLAYSTREAM TTY.PROCESS THIS.PROCESS CLEARBUF PRINTOUT +PRIN1 CL:FUNCALL LISPXREAD) CL:SHADOW (DECLARE CL::%%PACKAGE-EXTERNAL-SYMBOLS +CL::%%PACKAGE-INTERNAL-SYMBOLS) COMPILER::RAW-COMPILE (COMPILER::COMPILE-ONE-LAMBDA) DWIMERRORRETURN ( +ERROR!) \INSTANCE-P (\INSTANCEP.UFN \ATOMPNAMEINDEX NTYPX \LOLOC SHOULDNT) ULREDISPLAYBITMAP ( +WINDOWPROP DSPCLIPPINGREGION BITBLT IDIFFERENCE IPLUS) EXPORT (DECLARE CL::%%PACKAGE-USED-BY-LIST +CL::%%PACKAGE-INTERNAL-SYMBOLS CL::%%PACKAGE-EXTERNAL-SYMBOLS) SEDIT::OUTPUT-CR-OR-SPACE (IPLUS +SEDIT::OUTPUT-CR SEDIT::OUTPUT-SPACE IDIFFERENCE) %%LIT-TYPE-TO-TYPE (CL:ASSOC) GETSUPERTYPE ( +\TYPENUMBERFROMNAME \GETDTD \ADDBASE ITIMES \TYPENAMEFROMNUMBER) DASSEM.COUNTVARS (MAPC) +COMPILER:MAKE-EMPTY-ENV (COMPILER::MAKE-ENV) SEDIT::PRETTY-PRINT (BOUNDP FIXR TIMES LIST SEDIT::LINEARIZE + SEDIT::SUBNODE) INFILECOMTAIL (EVALV RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION EVAL SUBSET) \TYPENAMEFROMNUMBER (ADD1 \INDEXATOMPNAME \GETDTD \ADDBASE +ITIMES) CL::STRUCTURE-OBJECT-INSPECT-STOREFN (CL:EVAL REPLACEFIELD CL::PSLOT-FIELD-DESCRIPTOR) +REMOVE-COMMENTS (CL:FUNCTION REMOVE-COMMENTS CONS) %%LLARRAY-MAKE-SETTOR-EXPR (%%GET-TYPE-TABLE-ENTRY +ARRAY-TABLE-ENTRY-SETTOR ARRAY-TABLE-ENTRY-BITS-PER-ELEMENT ARRAY-TABLE-ENTRY-NEEDS-SHIFT-P) +INSPECTW.GETHASH (GETHASH) GETFIELDSPECS (COPY \GETDTD \ADDBASE ITIMES \TYPENUMBERFROMNAME NTYPX) +%%LLARRAY-MAKE-ACCESSOR-EXPR (%%GET-TYPE-TABLE-ENTRY ARRAY-TABLE-ENTRY-ACCESSOR +ARRAY-TABLE-ENTRY-BITS-PER-ELEMENT ARRAY-TABLE-ENTRY-NEEDS-SHIFT-P) COMPAREDEFS (GETFILEPKGTYPE +WHEREIS FILEPKGCHANGES MEMBER ASSOC CONS GETDEF SOME COMPARELST TERPRI LIST DREVERSE MAP COMPARELISTS) + COMPILER:COPY-ENV-WITH-FUNCTION (COMPILER::COPY-ENV COMPILER:MAKE-EMPTY-ENV) TB.SELECT.ITEM (\DTEST +TB.SHOW.SELECTION) SEDIT::UNDERLINE-SELECTION (SEDIT::DRAW-UNDERLINE) FB.INSERT.DIRECTORY ( +TB.INSERT.ITEM FB.MAKE.SUBDIRECTORY.ITEM) \LEAF.TIMEDOUT.EXCESSIVE (CREATEW MAKEWITHINREGION CONCAT +TERPRI PRIN1 printout IPLUS FOLDLO LRSH LLSH SIGNED SUB1 IDIFFERENCE LIST LOGAND CONSTANT LOGOR RPLACD + CONS FUNCTION IQUOTIENT WINDOWPROP STRINGWIDTH) NCREATE (NCREATE2 \TYPENUMBERFROMNAME) MSCALE (IPLUS +FIXR TIMES) COMPILER:ASSEMBLER-ERROR (CL:ERROR) COMPILER::START-COMPILATION (CL:FLET FASL:BEGIN-TEXT +READ-FILECREATED LIST OUTPUT CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION CL:NAMESTRING +COMPILER::DATE-STRING CL:FILE-WRITE-DATE CL:GET-UNIVERSAL-TIME TERPRI) COMPILER:OPTIMIZE-AND-MACROEXPAND-1 + (CL:VALUES CL:MACROEXPAND-1) FB.THINP (U-CASE FILENAMEFIELD ITIMES IQUOTIENT) \ENDVECRUN (FIXR FTIMES + IPLUS IDIFFERENCE ILESSP \VECENCODE IMINUS) FILING.CALL (ERROR ARG \GET.COURIER.DEFINITION LENGTH +SELECTQ - + CONS LIST PLUS WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +\NSFILING.GET.STREAM PRIN1 COURIER.EXECUTE.CALL \CREATECELL) CENTERINHEIGHT (PLUS IQUOTIENT DIFFERENCE +) PUTBASEPTRX (UNINTERRUPTABLY \PUTBASE LOGOR LOGAND GETBASE \GETBASE HILOC \HILOC ADD1 LOLOC \LOLOC) +CLISPFORERR1 (SOME TAILP RETDWIM2) TEDIT.FIND.OBJECT.SUBTREE (TEDIT.FIND.OBJECT.SUBTREE) +COMPILER::FINISH-COMPILATION (COMPILER::WARN-ABOUT-UNKNOWN-FUNCTIONS) RESOLVE-USE-PACKAGE-CONFLICT ( +CL:SORT MAKE-CONDITION CL:FLET) /REPLACEFIELD (LIST FETCHFIELD REPLACEFIELD) CL:IN-PACKAGE (DECLARE +CL:FIND-PACKAGE CL:APPLY) GN/TOP (IPLUS SUB1 HALF LRSH ADD1) UNDOSAVE (EVQ FMEMB LIST ADD1 IMINUS +ASKUSER CONS) \SEARCHINTERPRESSFONTS (\SEARCHFONTFILES) DINFO.TOGGLE.GRAPH (WINDOWPROP) +COMPILER:COPY-ENV-WITH-VARIABLE (COMPILER::COPY-ENV COMPILER:MAKE-EMPTY-ENV) TYPENAMEP (\INSTANCEP.UFN +) SEDIT::TRACK-SELECT (LOGAND FREPLACEFIELDVAL REPLACEFIELDVAL FETCHFIELD LASTMOUSEX LASTMOUSEY ZEROP) + CL:Y-OR-N-P (CL:APPLY CL:FLET) \PEEKPUP (EMADDRESS OPCODES BESTPUPADDRESS \LOCALPUPNETNUMBER LRSH +ERROR LIST OPENP OPENFILE) PUP.ECHOSERVER (RESETLST OPENPUPSOCKET LIST GETPUP) USERDATATYPES ( +DATATYPES) SETY.PRESS (\BOUT) DASSEM.MATCHVARS (DASSEM.MATCHVARS RPLACD) \ACTONDISKPAGES (LOCF +\ADDBASE SUB1 IDIFFERENCE \HILOC IPLUS IMINUS \LOLOC SELECTC LIST IGREATERP PLUS \MISCAPPLY* FUNCTION +ILESSP EMPOINTER \VAG2 \GETBASE \BOXIDIFFERENCE \CLOCK0 SIGNED LLSH) SEDIT::SMART-TTYFN (DECLARE +CL:FUNCALL EDITL0) COURIER.READ.NSADDRESS (UNFOLD LLSH) CONDITION-PARENT (GETSUPERTYPE) DATATYPES ( +ADD1 DATATYPEP LIST PLUS) CL::STRUCTURE-OBJECT-PROPCOMMANDFN (PROMPTPRINT +DEFAULT.INSPECTW.PROPCOMMANDFN) \PS.SCALEREGION (FIXR TIMES) \DISKERROR (M44.SIGNAL.DISK.ERROR) +IRM.DISPLAY.CREF (IMAGESTREAMTYPE IMAGEOBJPROP STRINGREGION ADD1 IPLUS SUB1 DRAWLINE PRIN1) +INSPECTW.PUTHASH (/PUTHASH) PRINTXIP (PRIN1 SELECTQ FASSOC RESETFORM OUTPUT APPLY* IDIFFERENCE) +FILEBROWSER (DSPFONT FONTPROP NUMBERP CL:FIND-SYMBOL STRING FB.INFO.ITEM.NAMED MISSPELLED? +\ILLEGAL.ARG LIST FUNCTION HEIGHTIFWINDOW TIMES CL:FORMAT GETREGION + THIS.PROCESS CREATEW - CHARWIDTH + CREATE.MONITORLOCK FB.MAKEHEADINGWINDOW MENUWINDOW FB.MAKERIGIDWINDOW GETPROMPTWINDOW CONS FONTCOPY +WINDOWPROP UNION TB.MAKE.BROWSER DIRECTORY.FILL.PATTERN FB.STARTUP) \CLEARBYTES (PLUS \ADDBASE FOLDLO +LRSH SUB1 \CLEARWORDS) FB.SEEFULLFN (WFROMDS WINDOWPROP SELECTQ FUNCTION ADDMENU CREATEW CREATEREGION +WIDTHIFWINDOW HEIGHTIFWINDOW CREATE.EVENT) CL:RENAME-PACKAGE (DECLARE \SIMPLE-STRINGIFY CL:MAKE-SYMBOL + CL:FIND-PACKAGE CL::%%PACKAGE-NAME CL::%%PACKAGE-NAMESYMBOL CL::%%PACKAGE-NICKNAMES) DATATYPEP ( +\GETDTD \ADDBASE ITIMES \INDEXATOMPNAME PLUS) CLISPIFYMATCHUP (FASSOC NCONC1 CONS CLISPIFYMATCHUP +GETPROP) \DOACTONDISKPAGES (\GETDISKCB \GETBASE SUB1 LOGAND IMINUS IPLUS \LOLOC ADD1 LOCF \ADDBASE +FFETCHFIELD EMPOINTER \VAG2 PLUS \CLEANUPDISKQUEUE) PUP.ECHOUSER (RESETLST ALLOCATE.PUP BESTPUPADDRESS + OPENPUPSOCKET SETUPTIMER LIST GETSTREAM PLUS FFETCHFIELD LOCF \ADDBASE GETPUP GETPUPWORD) +DEFAULT-PROCEED-REPORTER (CL:FORMAT PROCEED-CASE-NAME) DINFO.TOGGLE.MENU (WINDOWPROP +DINFO.UPDATE.MENU.DISPLAY CLOSEW) \CREATE.SPP.DEVICE (FUNCTION) CL:UNINTERN (DECLARE CL:SYMBOL-NAME +CL::%%PACKAGE-SHADOWING-SYMBOLS) TB.BOTTOM.OF.ITEM (- TIMES FIXP \DTEST) SEDIT::TRACK-EXTEND ( +FREPLACEFIELDVAL REPLACEFIELDVAL FETCHFIELD ZEROP LOGAND LASTMOUSEX LASTMOUSEY) CL:UNUSE-PACKAGE ( +DECLARE) \LEAF.NOT.RESPONDING (PRIN1 .NAMEORSTREAM. printout) SETX.PRESS (\BOUT) \WRITEDISKPAGES (LOCF + \ADDBASE SUB1 IDIFFERENCE \HILOC IPLUS IMINUS \LOLOC SELECTC LIST IGREATERP PLUS UNSIGNED LOGAND LLSH + \MISCAPPLY* FUNCTION \BOXIDIFFERENCE \CLOCK0 SIGNED) TEDIT.QUIT (\TEDIT.PRIMARYW PROCESSPROP +TTY.PROCESS WINDOWPROP THIS.PROCESS) DELETE-PACKAGE (DECLARE REMHASH CL::%%PACKAGE-NAME CL:AREF +CL::%%PACKAGE-INDEX) \TEDIT.MOVE.PIECEMAPFN (IMAGEOBJPROP SUBSTRING) %%PRINT-CONDITION (DECLARE +CL:FORMAT CL:TYPE-OF \HILOC \LOLOC REPORT-CONDITION) CL:MEMBER (CL:ERROR CL::%%COMPLEX-MEMBER +CL::%%SIMPLE-MEMBER) GN/BOTTOM (IDIFFERENCE HALF LRSH) MB.MARGINBAR.SHOWTAB (MSCALE IDIFFERENCE) +CLISPFORERR (SELECTQ DWIMERRORRETURN) SI::CONDITION-CASE-ERROR (CL:ERROR) \DOWRITEDISKPAGES (\GETBASE +ADD1 \DOACTONDISKPAGES SUB1 \ASSIGNDISKPAGE PLUS FUNCTION \GETDISKCB LOCF \ADDBASE FFETCHFIELD +\REALDISKDA \LOLOC EMPOINTER \VAG2 \CLEANUPDISKQUEUE IMINUS) NUKE-SYMBOL (MKSTRING) +SI::INVOKE-ACTUAL-RESTART (CL:THROW CONDITIONS::RESTART-TAG CONS CONDITIONS::RESTART-SELECTOR CL:APPLY + CL:ERROR) SCROLLBITMAP (WINDOWPROP DSPCLIPPINGREGION IMAX IMIN IDIFFERENCE) ADD-SYMBOL ( +CL::PACKAGE-HASHTABLE-TABLE CL::PACKAGE-HASHTABLE-HASH CL:ARRAY-TOTAL-SIZE CL::PACKAGE-HASHTABLE-SIZE +CL::PACKAGE-HASHTABLE-FREE LRSH NCONC1 CL:MAKE-ARRAY FIX FTIMES ADD-SYMBOL ITIMES FLAST) +REDISPLAYBITMAP (WINDOWPROP DSPCLIPPINGREGION BITBLT) POSTSCRIPT.OUTSTR (\PS.BOUTFIXP SUB1 IPLUS ADD1 +\GETBASEFAT \GETBASE \CHAR8CODE LOGAND \BOUTS \GETBASETHIN \GETBASEBYTE BOUT FLOAT MAPC CHCON) +DASSEM.EQCONSTANTP (LITATOM ILEQ) TEST-PROCEED-CASE (CONDITIONS::RESTART-TEST CL:FUNCALL) +CONDITIONS::DEFAULT-RESTART-REPORTER (CL:FORMAT CONDITIONS:RESTART-NAME) SEDIT::LINEARIZE-QUOTE ( +SEDIT::LINEARIZE SHOULDNT) FB.FASTSEE.ONEFILE (FB.BROWSECOMMAND CONCAT) WALK-PROCEED-CASES (CL:FLET) +FB.MENU.WHENSELECTEDFN (ADD.PROCESS PACK*) \TFBRAVO.INSTALL.PAGEFORMAT (SET TEXTPROP +TEDIT.SINGLE.PAGEFORMAT LIST) \COURIER.REP.BIN (ERROR) \LISPERROR (ERRORX LIST ERROR) RAISE-SIGNAL ( +CL:FIRST) SEDIT::LOCATE-NODE-FROM-EDITCHAIN (SEDIT::LOCATE-NODE-FROM-EDITCHAIN) +CL::STRUCTURE-OBJECT-INSPECT-PROPPRINTFN (CL::PSLOT-NAME) \FORWARD.XIP (\GATEWAY.FORWARD.XIP +\MAYBEPEEKNS \RELEASE.ETHERPACKET) FB.ADD.FILE (PLUS FFETCHFIELD TB.INSERT.ITEM) \ACTONVMEMPAGES ( +\ADDBASE IMINUS \DOACTONDISKPAGES) DBG::STKPTR-CCODE (MAKE-COMPILED-CLOSURE \STACKARGPTR) +RESOLVE-EXPORT-CONFLICT (CL:SORT CL:FUNCTION MAKE-CONDITION CL:FLET) \SWITCHFONTS.PSC (LISTGET MEMB +CONCAT TIMES) \INITSPP (\CREATE.SPP.DEVICE FUNCTION \DEFINEDEVICE) \WRITEVMEMPAGES (\ADDBASE IMINUS +LOCF \DOWRITEDISKPAGES) /RPLNODE2 (ERRORX LIST /RPLNODE) CL:UNEXPORT (DECLARE +CL::%%PACKAGE-INTERNAL-SYMBOLS CL::%%PACKAGE-EXTERNAL-SYMBOLS) TEDIT.FIND.OBJECT (TEXTOBJ \GETBASEPTR +\FIRSTNODE PLUS) STORAGE (CREATECELL LIST PLUS TERPRI \TYPENUMBERFROMNAME \GETDTD \ADDBASE ITIMES + +SELECTC - STORAGE.LEFT TIMES FOLDHI LRSH IPLUS UNFOLD LLSH ADD1) SHOWRECTANGLE.PRESS (\BOUT) CL:DELETE + (CL:LENGTH COMPLEX-DELETE SIMPLE-DELETE) RESOLVE-EXPORT-MISSING (CL:SORT CL:FLET) +ATTACHEDWINDOWREGION (WINDOWPROP ATTACHEDWINDOWS UNIONREGIONS WINDOWREGION) \STLINP (printout +IDIFFERENCE TERPRI) CL:LIST-ALL-PACKAGES (DECLARE CL:FUNCTION) CL:STRING= (%%PARSE-STRING-ARGS +WITH-TWO-UNPACKED-STRINGS %%STRING-BASE-COMPARE CL::SIMPLE-STRING=) \COURIER.BROADCAST.ON.NET (PRIN1 +NLSETQ \SEND.EXPEDITED.XIP CL:FUNCALL) STORAGE.LEFT (IPLUS IDIFFERENCE SELECTC \SET.STORAGE.STATE PLUS + SMALLP \GETBASEPTR ITIMES UNFOLD LLSH ADD1 FQUOTIENT LIST) SETUPFONTS.IP (FONTCREATE) \STORAGE.TYPE ( +\GETDTD \ADDBASE ITIMES \INDEXATOMPNAME SELECTQ IQUOTIENT CONSTANT FIX FQUOTIENT FUNCTION TIMES NTH +ADD1 FRPLACA PLUS \DTEST \GETBASEPTR - BOXCOUNT) DASSEM.DPRINTLAP (GETSTREAM TERPRI FUNCTION printout) + COMPARELST (COMPAREMAX COMPARE1) \STORAGE.HUNKTYPE (CONSTANT LIST NTH ADD1 \STMDSTYPE) +\STRINGWIDTH.PRESS (\GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CREATECHARSET ADD1 \GETBASEFAT \GETBASE +\GETBASETHIN \GETBASEBYTE PLUS \PRESS.CONVERT.NSCHARACTER \FGETWIDTH \CHAR8CODE LOGAND SUB1 IPLUS +FUNCTION) DBG::FIND-ORIGINAL-NAME-AND-DEFINITION (STKNAME CL:VALUES DBG::STKPTR-CCODE CL:FIRST MKLIST +CL:SECOND GETD GET) \NSFILING.GDATE (GDATE) REMOVEWINDOW (FREEATTACHEDWINDOW) XCL:LIST-ALL-PROFILES ( +CL:FUNCTION CL:MAPCAR) ONEDINSPECT.SELECTPROP (WINDOWPROP WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV +XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES STRINGWIDTH FONTPROP) \NSFILING.GET/SETINFO (CL:FUNCALL +\NSFILING.GETFILE) XCL:PROFILE-NAME (XCL::PROFILE-ENTRY-VALUE XCL::PROFILIZE) BITMAPSCROLLFN ( +SCROLLBITMAP WINDOWPROP) SEDIT::LINEARIZE-LIST (CL:FUNCALL IPLUS IDIFFERENCE ILEQ SELECTQ SHOULDNT +IMAX SEDIT::NEXT-NODE-TYPE SEDIT::LINEARIZE SEDIT::OUTPUT-CONSTANT-STRING) PUSH-IP-STACK (STREAMPROP +CONS) FAKE-COMPILE-FILE (RESETSAVE LIST RESETUNDO FUNCTION OPENSTREAM \PARSE-FILE-HEADER FULLNAME +PACKFILENAME.STRING ROOTFILENAME CLOSEF REVERSE EVAL) DINFO.UPDATE (FASSOC FMEMB RESETSAVE LIST +PROMPTPRINT DINFO.UPDATE.TEXT.DISPLAY FM.GETSTATE DINFO.UPDATE.HISTORY LISTGET CLEARW GETPROMPTWINDOW) + \FM.NUMBER-CHANGESTATE (\FM.ITEMPROP FFETCHFIELD NUMBERP MKATOM) COURIER.REP.LENGTH (SELECTQ STRINGP +MKSTRING ADD1 FOLDHI LRSH IPLUS NCHARS GETPROP FIXP CL:FUNCALL \GET.COURIER.TYPE COURIER.REP.LENGTH +PLUS ASSOC \COURIER.TYPE.ERROR \COURIER.UNKNOWN.TYPE) \DODISKCOMMAND (\LOLOC LOCF \ADDBASE FFETCHFIELD + EMPOINTER \VAG2 \REALDISKDA IPLUS SELECTC ADD1 LOGAND RAID LLSH EMGETBASE \GETBASE EMADDRESS OPCODES +\PUTBASE) CL:AREF (ARG) SEDIT::TTYFN (CREATE.EVENT CL:FUNCTION SEDIT:SEDIT LAST LIST +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION AWAIT.EVENT) \STMDSTYPE (POSITION - NCHARS PRINTNUM +TAB printout TERPRI) TEDIT.EDIT.OBJECT (SHOULDNT TEDIT.FIND.OBJECT ADD1 IMAGEOBJPROP) +CL::INSPECT-STRUCTURE-OBJECT (INSPECTW.CREATE CL::PS-ALL-SLOTS CL:CONCATENATE CL:PRINC-TO-STRING) +XCL:FIND-PROFILE (CL:GETHASH STRING) \XIPERROR (LOGAND \GETBASE LOCF \ADDBASE IMIN IPLUS UNFOLD LLSH +\RELEASE.ETHERPACKET) NTH (CONS SUB1) COMP.SELECTQ (COMP.PROGN COMP.EXPR APPEND COMP.STJUMP COMP.VALN +SELECTQ) \CLEANUPDISKQUEUE (EMGETBASE \GETBASE EMADDRESS OPCODES RAID LOGAND PLUS FFETCHFIELD +FREPLACEFIELD LRSH \PUTBASE UNSIGNED SUB1 LLSH \GETDISKCB \VIRTUALDISKDA EMPOINTER \VAG2 \ADDBASE) +\SEL.LIMIT (SUB1) RESOLVE-IMPORT-CONFLICT (CL:SORT MAKE-CONDITION CL:FLET) XCL:RESTORE-PROFILE ( +XCL::PROFILIZE CL:MAPC CL:FUNCTION XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES) SEDIT::SHRINKFN ( +WINDOWPROP PRIN1 SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW PROCESSPROP THIS.PROCESS WINDOWREGION) +GN/LEFT (IDIFFERENCE HALF LRSH) \INDEXATOMPNAME (\INDEXATOMPNAME) XCL:COPY-PROFILE (CL:COPY-SEQ +XCL::PROFILIZE) \VFMBlankInterval (\PFVolumeNumber ELT SETA ARRAY SUB1 PLUS) INCORNER.REGION (IABS +IMINUS IDIFFERENCE IPLUS) XCL:SAVE-PROFILE (MAP XCL::PROFILIZE CL:EVAL) \CREATEINTERPRESSFONT ( +\COERCEASCIITONSFONT EVAL) INTERN* (DECLARE) \NSFILING.GET.ATTRIBUTES (FILING.CALL) +\MAKE.EXPEDITED.STREAM (NCREATE IPLUS UNFOLD LLSH INDEXF FUNCTION) FB.NAMES.DECREASING.VERSION ( +SELECTQ ALPHORDER NULL.VERSIONP IGREATERP) TB.EXPANDFN (WINDOWPROP WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 + .UNWIND.PROTECT. FUNCTION IMAX TB.FIRST.VISIBLE.ITEM# DSPCLIPPINGREGION TB.LAST.VISIBLE.ITEM#) +SEDIT::INSERT-LIST (ADD1 SEDIT::REPLACE-LIST) COMPILE-FILE? (GET ROOTFILENAME) DASSEM.DSTOREFNDEF ( +PLUS CEIL LOGAND IPLUS UNFOLD LLSH ADD1 CONSTANT SUB1 LOGXOR FOLDLO LRSH FLENGTH IQUOTIENT \CODEARRAY +FOLDHI \BYTESETA \FINDOP \ATOMDEFINDEX NTYPX \LOLOC SHOULDNT \ATOMPNAMEINDEX EVAL BYTESPERNAMEENTRY +WORDSPERNAMEENTRY SELECTQ \ATOMVALINDEX RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION DEFC) RESOLVE-UNINTERN-CONFLICT (CL:SORT MAKE-CONDITION CL:FLET) +POSTSCRIPT.STARTPAGE (FQUOTIENT \DSPFONT.PSC CONSTANT TIMES \DSPRESET.PSC) ICMLARRAY.INDICES ( +MAINWINDOW WINDOWPROP PRIN1 SPACES) DINFO.TOGGLE.TEXT (WINDOWPROP PROMPTPRINT RELEASE.MONITORLOCK) +\STMDS.APPROX (- NCHARS printout PRINTNUM) \REALDISKDA (IPLUS LLSH IREMAINDER IQUOTIENT) XCL:PROFILE-P + (CL:FIRST CL:LENGTH) REPOSITIONATTACHEDWINDOWS (MAPC ATTACHEDWINDOWS OPENWP \OPENW1) +TB.NORMALIZE.ITEM (\DTEST TB.BOTTOM.OF.ITEM DSPCLIPPINGREGION + SCROLLBYREPAINTFN - IQUOTIENT) +COMP.PREDP (FMEMB) COMPARELISTS (GETSTREAM PRIN1) \SEL.LINEDESC (MKLIST) DINFO.TOGGLE.HISTORY ( +WINDOWPROP DINFO.UPDATE.HISTORY CLOSEW) POSTSCRIPT.SET-FAKE-LANDSCAPE (- +) SEDIT::RESHAPEFN ( +WINDOWPROP DSPCLIPPINGREGION IDIFFERENCE WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. +FUNCTION) DELFROMCOMS (GETTOPVAL DELFROMCOMS GETFILEPKGTYPE DELFROMCOM) TB.FIND.PREVIOUS.TAIL (ADD1 +PLUS) XCL:OPEN-STREAM-P (OPENED) CL::%%2/PI (CL::%%FLOAT) \FM.EDIT-SETUP (\FM.ITEMPROP FFETCHFIELD +LISTGET IDIFFERENCE ITIMES FUNCTION) \COURIER.REP.BOUT (RPLACD CONS LIST) \CHECKFREEPAGE (LOCF +\ADDBASE \VAG2 \GETBASE UNSIGNED LOGAND SUB1 LLSH) \PARTEND.PRESS (\BOUT IDIFFERENCE FOLDHI LRSH IPLUS + GETFILEPTR \PAGEPAD.PRESS) CL::STRUCTURE-OBJECT-INSPECT-FETCHFN (CL:FUNCALL CL::PSLOT-ACCESSOR +FETCHFIELD CL::PSLOT-FIELD-DESCRIPTOR) NS.ECHOUSER (RESETLST SETUPTIMER COERCE-TO-NSADDRESS +\ILLEGAL.ARG LIST OPENNSOCKET \FILLINXIP + TIMES TERPRI GETSTREAM GETXIP \GETBASE PLUS) XCL:MAKE-PROFILE + (CONS) SWAPXIPADDRESSES (\DTEST LOCF \ADDBASE) TB.SHRINKFN (TB.CLOSE/SHRINK) \FM.NUMBER-SETUP ( +\FM.ITEMPROP FFETCHFIELD LISTGET IDIFFERENCE ITIMES FUNCTION) FILENAMEFROMID (\LFFindDirectory +GETFILEPTR BIN BIN16 CONCAT PACKC LIST PLUS) COMPILER::CONSTRUCT-COMPILER-SYMBOL (CL:INTERN CL:APPLY) +NSNETDAYTIME0 (\GETMISCNSOCKET CREATE.PACKET.EXCHANGE.XIP PLUS FFETCHFIELD UNFOLD LLSH LOCF \ADDBASE +EXCHANGEXIPS) MAKE-DO-SYMBOLS-CODE (CL:FIRST CL:SECOND CL:THIRD CL:FOURTH CL:FIFTH CL:SIXTH GENSYM) +NEARESTCORNER (\CURSORPOSITION IDIFFERENCE) \HANDLE.RAW.XIP (RELEASE.XIP LOCF \ADDBASE LOGAND +\FORWARD.XIP \NSOCKET.FROM# \GETBASE \CHECKSUM SUB1 FOLDHI LRSH IPLUS \LOCATE.NSNET +\ADD.ROUTING.TABLE.ENTRY PLUS FFETCHFIELD NOTIFY.EVENT) XCL:ECHO-STREAM-P (STREAMPROP) FIND-SYMBOL* ( +\CREATECELL CL:VALUES) IRM.LOAD-GRAPH (INFILEP PACKFILENAME DINFO.READ.GRAPH) XCL:TWO-WAY-STREAM-P ( +STREAMPROP) SEDIT::REPAINTFN (WINDOWPROP) DISPLAYLINK/LR (APPLY* LISTGET IPLUS SUB1 GN/LEFT ADD1 +GN/RIGHT) FINDATS (FMEMB FINDATS) \VFMAtLoad (CREATE.MONITORLOCK) CL::%%PI/6 (CL::%%FLOAT) +ENCAPSULATEDOBJ.DISPLAYFN (DSPXPOSITION DSPYPOSITION FONTCREATE DSPFONT IMAGEOBJPROP IDIFFERENCE IPLUS + FONTPROP PRIN1 IMINUS) ICMLARRAY.DETACHDISPLAY (WINDOWPROP) CHCON (IPLUS \GETBASECHAR \GETBASEFAT +\GETBASE \GETBASETHIN \GETBASEBYTE LIST PLUS FUNCTION) GN/RIGHT (IPLUS SUB1 HALF LRSH ADD1) +DBG::FIND-DEBUGGER-STACK-FRAME (DECLARE FIND-DEBUGGER-ENTRY-FRAME) XCL:CONCATENATED-STREAM-P ( +STREAMPROP) \VFMCreateIntervals (ARRAYORIG ARRAYSIZE ARRAY) CHANGETRAN (RECORDTRAN) +\NSFILING.GETEOFPTR (LOGAND CONSTANT LOGOR GETFILEPTR \NSFILING.GETFILEINFO) \SETETHERFLAGS (SELECTC +LIST - TIMES UNFOLD LLSH INDEXF SHOULDNT) UNPACK (IPLUS FCHARACTER \GETBASECHAR \GETBASEFAT \GETBASE +\GETBASETHIN \GETBASEBYTE LIST PLUS FUNCTION) WTODSY (IPLUS DSPCLIPPINGREGION) TB.FLUSH.WINDOW ( +FUNCTION CL:FUNCALL OPENWP WINDOWPROP) TEDIT.MOVE (TEDIT.PROMPTPRINT \SHOWSEL TEDIT.SELECTED.PIECES +FUNCTION TEDIT.DO.BLUEPENDINGDELETE IDIFFERENCE IPLUS) CLISPLOOKUP0 (GETPROP CLISPLOOKUP2 CLISPLOOKUP1 + SELECTQ GETATOMVAL) TCOMPL (ERSETQ BCOMPL CONS LIST) COMP.VAL (COMP.EXPR ADD1 OPT.JUMPCHECK) +\TEDIT.STRIKEOUT.CARET.ON (\TEDIT.PARSE.CHARLOOKS.LIST) \TEDIT.STRIKEOUT.CARET.OFF ( +\TEDIT.PARSE.CHARLOOKS.LIST) TB.UPDATE.DISPLAY (TB.BOTTOM.OF.ITEM FRPLACA PLUS SELECTQ - SHOULDNT +DSPCLIPPINGREGION FFETCHFIELD + IQUOTIENT ADD1) SEDIT::PUNT-SET-SELECTION (SEDIT::SET-SELECTION PLUS) +\SPPGETERROR (TERPRI PRIN1) \VIRTUALDISKDA (IPLUS ITIMES) XCL:BROADCAST-STREAM-P (STREAMPROP) +DBG::FIND-NAMED-STACK-POSITION (STKPOS CL:FIRST ERROR) %%MAKE-ARRAY-TYPE-TABLE (CL:MAPCAN CL:FUNCTION) + XCL:FOLLOW-SYNONYM-STREAMS (XCL:FOLLOW-SYNONYM-STREAMS CL:SYMBOL-VALUE XCL:SYNONYM-STREAM-SYMBOL) +CL::%%-PI/4 (CL::%%FLOAT) \FM.EDIT-INSERT (CHARACTER CHARWIDTH IPLUS DSPXPOSITION DSPCLIPPINGREGION +WINDOWPROP FRPLACA PLUS MINUS \FM.EDIT-SCROLLAMOUNT IQUOTIENT BITMAPWIDTH BITMAPCREATE BITMAPHEIGHT +\FM.ITEMPROP FFETCHFIELD FONTPROP \FM.EDIT-STRINSERT ADD1 EXTENDREGION CREATEREGION) \CWSU.DEFAULT ( +COURIER.WRITE COURIER.WRITE.REP) BRIEFLY-DESCRIBE-SYMBOL (CL:FRESH-LINE CL:PRIN1 CL:WRITE-STRING) +COMPILER::NODE-TYPE-NAME (COMPILER::CONSTRUCT-COMPILER-SYMBOL) XCL:SET-DEFAULT-EXEC-TYPE (SETTOPVAL) +CL::STRUCTURE-OBJECT-P (TYPEP) CL:FIND-ALL-SYMBOLS (MKSTRING CL:FUNCTION) NEARTOP (IDIFFERENCE ILESSP +IPLUS TIMES IGREATERP DIFFERENCE) \LOCATE.NSNET (\GETBASEPTR UNFOLD LLSH LOGAND CONS SETUPTIMER) +DCHCON (SCRATCHLIST IPLUS FRPLACA FRPLACD CONS \GETBASECHAR \GETBASEFAT \GETBASE \GETBASETHIN +\GETBASEBYTE PLUS \MAPPNAME FUNCTION FLAST) CLEARCLISPARRAY (MAPHASH FUNCTION) INITPUPLEVEL1 ( +HARDRESET) \NSFILING.GETFILEINFO.FROM.PLIST (SELECTQ \NSFILING.GDATE ASSOC FOLDHI LRSH IPLUS +NSNAME.TO.STRING MAPCAR COURIER.FETCH \TYPE.FROM.FILETYPE) CLISPNOTVARP (STKSCAN) CL:FRESH-LINE ( +FRESHLINE) SEDIT::DELETE-QUOTE (SMALLP SHOULDNT SEDIT::SUBNODE SEDIT::CREATE-GAP-NODE) XCL:SET-EXEC-TYPE + (STKPOS ENVEVAL XCL:RESTORE-PROFILE) ENCAPSULATEDOBJ.PUTFN (IMAGEOBJPROP NUMBERP ERROR) CL:APROPOS-LIST + (COPY-STRING \SIMPLE-STRINGIFY MKSTRING) EDITFROMFILE (RESETVARS .RESETLST. LIST CONS +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION ROOTFILENAME ASKUSER REMOVE FILECOMSLST GETDEF +EDITDEF) ICMLARRAY.DOWINDOWCOMFN (WINDOWPROP MENU CENTRALWINDOW GETREGION FUNCTION CONS) DUNPACK ( +SCRATCHLIST IPLUS FRPLACA FRPLACD CONS FCHARACTER \GETBASECHAR \GETBASEFAT \GETBASE \GETBASETHIN +\GETBASEBYTE PLUS \MAPPNAME FUNCTION FLAST) \TEDIT.SEARCH.CODETABLE (ARRAY PLUS SETA IPLUS LIST) +CL:APROPOS (COPY-STRING \SIMPLE-STRINGIFY CL:VALUES) RECOMPILE (BRECOMPILE) TEXTICON (WINDOWP +TITLEDICONW WINDOWPROP NCHARS CONCAT DATE) %%MAKE-CML-TYPE-TABLE (CL:MAPCAR CL:FUNCTION) UALPHORDER ( +ALPHORDER) TB.RENUMBER.TAIL (PLUS) \FLUSH.PACKET.QUEUE (\DEQUEUE PLUS) DASSEM.DWRITEFN (LENGTH FLENGTH + NCONC1 CONS PLUS DREVERSE GETSTREAM LRSH LOGAND \FINDOP SELECTQ IPLUS PRIN4) DINFO.FMENU.HANDLER ( +WINDOWPROP MKATOM SUBSTRING FM.ITEMPROP SELECTQ DINFO.SPECIAL.UPDATE DINFO.FIND DINFO.LOOKUP SHOULDNT) + ALPHORDER (\DTEST \CATRANSLATE \GETBASEBYTE \GETBASECHAR \GETBASEFAT \GETBASE IPLUS \GETBASETHIN PLUS +) COURIER.OPEN (RESETLST \COERCE.TO.NSADDRESS ERROR SPP.OPEN LIST FUNCTION PRIN1 SPP.DESTADDRESS \BOUT + SUB1 GETWORD IPLUS LLSH \BIN \SPP.PREPARE.INPUT) CASEARRAY (COPYARRAY ARRAY PLUS) +RETURN-FIRST-OF-THREE (DECLARE) DBG::DEBUGGER-EVAL (CL:VALUES-LIST) XCL:SYNONYM-STREAM-P (STREAMPROP) +\NSFILING.RELEASE.BULKSTREAM (DREMOVE) FREEATTACHEDWINDOW (MAINWINDOW COPY ATTACHEDWINDOWS WINDOWPROP +SELECTQ IMINUS) CHECK-SYMBOL-NAMESTRING (NAMESTRING-CONVERSION-CLAUSE CL:FIRST CL:THIRD CL:FOURTH +INTERN* IDIFFERENCE CL:FIND-PACKAGE UNINTERRUPTABLY \CREATE.SYMBOL) \TEDIT.UNDERLINE.CARET.ON ( +\TEDIT.PARSE.CHARLOOKS.LIST) CONCATCODES (ALLOCSTRING LENGTH PLUS) ERROR-MISSING-EXTERNAL-SYMBOL ( +ERROR CONCAT) \ACCHARWIDTHLIST (IMAX FOLDLO LRSH IPLUS LIST) PACKC (WITH-RESOURCE \PUTBASE +\PUTBASEBYTE SUB1 \GETBASETHIN \GETBASEBYTE PLUS \MKATOM GETRESOURCE NEWRESOURCE ALLOCSTRING) +COURIER.WRITE.REP (\MAKE.COURIER.REP.STREAM) \LOOKUPFMAP (\GETBASE IPLUS FLOOR LOGAND FOLDLO LRSH +CONSTANT LOGXOR SUB1 \ADDBASE IDIFFERENCE) \READACFONTBOXES (\WIN IPLUS LLSH \BIN SIGNED SUB1 +IDIFFERENCE LIST PLUS) CL::BUILD-COPIER-TYPE-CHECK (CL::PS-TYPE CL:VALUES) \WHICHPART (\GETBASE RAID) +\GETFBB (IPLUS IDIFFERENCE) \ACCHARIMAGELIST (MAPCAR) DASSEM.DASSEM (CONS SELECTQ FRPLACD IPLUS LRSH +LOGAND APPEND COMPILER::ENV-TARGET-ARCHITECTURE FASSOC ADD1 SORT ADD1VAR IDIFFERENCE CONSTANT COMPERRM + LIST LENGTH OPT.DREV FUNCTION OPCOUNT \FINDOP LLSH AST GETP MAPC APPLY* PLUS GREATERP SUB1) +RESOLVE-MISSING-PACKAGE (MAKE-CONDITION CL:FLET) \NEW.READ.SYMBOL (DECLARE \PARSE.NUMBER +CHECK-SYMBOL-NAMESTRING RESOLVE-MISSING-PACKAGE \GETBASESTRING INTERN*) \COPYSEL (COPY) PACK ( +WITH-RESOURCE \MKATOM SUB1 PLUS NCHARS ADD1 GETRESOURCE NEWRESOURCE ALLOCSTRING) DBG::DEBUGGER-MENU-HELP + (PRINTOUT PRIN1 CL:THIRD CL:DOCUMENTATION CL:FIRST CL:FOURTH GETHASH) TEDIT.FIND (TEXTOBJ MKSTRING +SELECTQ \TEDIT.PARSE.SEARCHSTRING MAPCAR CHCON CHARACTER LIST \TEDIT.SUBST.FN1 \TEDIT.FIND.WC +TEDIT.FIND SUB1 IPLUS NCHARS \TEDIT.BASICFIND) \PACK.ITEM (\MAPPNAME FUNCTION) \NSFILING.GETFILENAME ( +\NSFILING.GETFILE) FIND-DEBUGGER-ENTRY-FRAME (REALSTKNTH STKNTH STKNAME CL:SPECIAL-FORM-P) +\3MB.CREATENDB (\SERIALNUMBER FUNCTION ADD.PROCESS) NAMESTRING-CONVERSION-CLAUSE (DECLARE) +UnixPrintCommand (CONCAT NCHARS UnixShellQuote) WTODSX (IPLUS DSPCLIPPINGREGION) COMPILER::PRINT-NODE +(CL:GETHASH CL:FORMAT CL:TYPE-OF + CL:MACROLET) \ACROTATECHAR (ROTATE-BITMAP-LEFT) +\FM.EDIT-PREPARETOEDIT (FUNCTION \FM.ITEMPROP LISTGET FFETCHFIELD STRINGWIDTH DSPCREATE IPLUS CONS +\FM.EDIT-GETPOINTERINFO LASTMOUSEX FONTPROP DSPFONT) \LFINITCASEARRAY (COPYARRAY PLUS) SEDIT::VAR-CHANGED + (SET) \PAGEPAD.PRESS (GETFILEPTR MODUP IDIFFERENCE SUB1 IMOD IPLUS FOLDLO LRSH) \CREATESTARFONT ( +RESETLST FIXR FQUOTIENT ITIMES \FACECODE CONSTANT \GETBASEPTR UNFOLD LLSH \CREATECHARSET) +\PFTransferFilePage (\BLT MESASIZE IPLUS \PFTransferPage LvBasePageAddr FFETCHFIELD FMESAELT \ADDBASE +ILEQ ITIMES IDIFFERENCE MIN GETRESOURCE NEWRESOURCE \ALLOCBLOCK LRSH ADD1 PLUS) \NEW.MKATOM ( +UNLESSRDSYS \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE \ADDBASE IDIFFERENCE \PARSE.NUMBER CL:VALUES + INTERN*) \READFONTWDFILE (HELP) TB.CLOSEFN (TB.CLOSE/SHRINK) COMP.DELFIX (SELECTQ) CONVERT-LITATOM ( +NAMESTRING-CONVERSION-CLAUSE CL:FIRST CL:THIRD CL:FOURTH CL:FIND-PACKAGE) +RESOLVE-MISSING-EXTERNAL-SYMBOL (MAKE-CONDITION CL:FLET) \FM.EDITSTART-SELECTEDFN (LISTGET +\FM.ITEMPROP FFETCHFIELD FUNCTION \FM.EDIT-ITEM) PRINTBELLS (PRIN3) SEDIT::PLACE-CARET-AND-SELECTION ( +DSPCLIPPINGREGION SEDIT::FIND-LINE-START SEDIT::FIND-NODE LAST PLUS IDIFFERENCE +SEDIT::SET-SELECTION-NOWHERE) FB.ANALYZE.PATTERN (NTHCHARCODE PLUS STRPOS SUBSTRING ADD1 CONCAT SUB1 +FB.CANONICALIZE.PATTERN) \FACECODE (IPLUS SELECTQ SHOULDNT) XCL:PACK (CL:INTERN CONCATLIST) CL::%%PI/4 + (CL::%%FLOAT) ONEDINSPECT.SELECTITEM (WINDOWPROP WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV +XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES STRINGWIDTH APPLY* FONTPROP) \LITATOM.EATCHARS (- CONCAT +\PUTBASEBYTE \GETBASETHIN \GETBASEBYTE PLUS) \TEDIT.SUPERSCRIPT.CARET (\TEDIT.PARSE.CHARLOOKS.LIST) +\NSINIT (\FLUSHNSOCQUEUE FUNCTION FIND.PROCESS \CLEAR.ROUTING.TABLE CONS SETUPTIMER NOTIFY.EVENT) +CL:INTERN (DECLARE MKSTRING ERROR CL:MAKE-SYMBOL INTERN*) INTERPRESSBITMAP (OPENIMAGESTREAM +IDIFFERENCE TIMES STRINGWIDTH IMOD - + CONSTANT FQUOTIENT CLOSEF) CLISPACKUP (CLISP3C GETPROPLIST +GETPROP MINUS) INTERN-LITATOM (ADD-SYMBOL CL::%%PACKAGE-INTERNAL-SYMBOLS CL::%%PACKAGE-EXTERNAL-SYMBOLS + CL:SYMBOL-PACKAGE SET) OPEN (PATHNAME MEMQ INTERLISP-ACCESS) OLDFAULT1 (MAKE-CONDITION CL:APPLY EVAL) + XCL:PACK* (CL:INTERN CONCATLIST) C.FLOATUNBOX (SELECTQ COMP.VALN COMP.VAL1) SEDIT::PROPLST-CHANGED ( +SETPROPLIST) BRECOMPILE (RESETLST INPUT RESETOPENFILES FULLNAME LIST UNPACKFILENAME PACKFILENAME FMEMB + OPENSTREAM CLOSEF GET-ENVIRONMENT-AND-FILEMAP SPELLFILE ROOTFILENAME ASKUSER CONS MAPCAR READ GETPROP + MAPCONC MAPC BCOMPL1A APPEND TERPRI BCOMPL.BODY) MAKEBITTABLE (\SETSYNCODE \PUTBASEBYTE +\SETFATSYNCODE SMALLP CHCON1 LOGXOR \SYNCODE GETHASH \GETBASEBYTE PLUS) CL::DEFINE-COPIERS ( +CL::PS-COPIER CL::PS-NAME) EXCHANGEXIPS (SETUPTIMER GETXIP) DBG::DEBUGGER-BUTTON-EVENT (LOGAND) +\FINDFONT (HELP) TEDIT.SETSEL (TEXTOBJ IMIN IMAX ADD1 IPLUS IDIFFERENCE \CHTOPC +\TEDIT.GET.INSERT.CHARLOOKS) \FAMILYCODE (NCHARS \BIN PLUS LLSH IPLUS LOGAND LRSH \WIN NTHCHARCODE) +COMP.EXPR (SELECTQ COMP.CONST COMP.VAR FASSOC TYPENAME APPLY* COMP.LAMBDA CONS \TRANSLATE-CL%:LAMBDA +COMP.CLEANFNOP COMP.STFN PLUS COMP.TRYUSERFN COMPERROR GETMACROPROP COMPILER:ENV-FBOUNDP +COMP.TRANSFORM COMP.CPI COMP.ARGTYPE COMP.CALL OPT.JUMPCHECK) TRANSFER-SYMBOL (CL:SYMBOL-PLIST +CL:SYMBOL-FUNCTION) \FM.EDITSTART-MESSAGE (SELECTQ) \DSKDISPLAY.RESHAPEFN (WINDOWPROP) +\NSFILING.HOSTNAMEP (LOOKUP.NS.SERVER \GETDEVICEFROMNAME MKATOM U-CASE NSNAME.TO.STRING PACK* FUNCTION + CREATE.MONITORLOCK) SEDIT::OUTLINE-SELECTION (IMAX IMIN FUNCTION IDIFFERENCE) \LEAF.REPAIR.BROKEN.PUP + (LIST) CONCOCT-SYMBOL (DECLARE CL:ERROR CL:INTERN IMPORT EXPORT) TB.ITEM.UPDATABLE? (FIXP OPENWP) +NEWPAGE?.IP (NEWPAGE.IP) \SETFATSYNCODE (\DTEST \PUTBASEBYTE PUTHASH \CREATENSCHARHASH HASHARRAY) +CL::%%PI/3 (CL::%%FLOAT) \FM.EDIT-ITEM (SETUPTIMER RESETLST RESETSAVE SETTERMTABLE TTYDISPLAYSTREAM +CURSOR LIST \FM.EDIT-PREPARETOEDIT TTY.PROCESS THIS.PROCESS LOGAND APPLY* DECODEBUTTONS LASTMOUSEX +LASTMOUSEY \FM.CHECKREGION WINDOWPROP \FM.ITEMPROP FFETCHFIELD LISTGET IPLUS ILESSP \GETKEY GETSYNTAX) + PACKAGE-ENABLE (DECLARE READTABLEPROP FIND-READTABLE CL:PUSHNEW MOVD) \BCPLSOUT.PRESS (IMIN NCHARS +SUB1 NTHCHARCODE PLUS ADD1) SCANX (CONS IPLUS IDIFFERENCE \SGN ITIMES IQUOTIENT) WINDOWWORLDP ( +\INSURESCREEN) PACKAGE-INIT (PACKAGE-CLEAR PACKAGE-MAKE PACKAGE-HIERARCHY-INIT PACKAGE-ENABLE) +\NSFILING.ERRORHANDLER (STKPOS FUNCTION GETFILEPTR SPACES \NSFILING.GETFILE LIST PRIN1 SETFILEPTR PLUS + \SPP.DEFAULT.ERRORHANDLER) DETACHALLWINDOWS (MAPC WINDOWPROP CLOSEW) FILEPOS (CHCON1 CASEARRAY +\GETSTREAM STRINGP MKSTRING \GETFILEPTR SPREADAPPLY* ADD1 IDIFFERENCE \GETEOFPTR IMIN IMINUS IPLUS +\GETBASEBYTE SUB1 PLUS FOLDLO LRSH IMOD \BIN) \ACCHARPOSLIST (IPLUS ITIMES ADD1 IDIFFERENCE \WIN LLSH +\BIN LIST PLUS) \LFCreateDirectories (ARRAYORIG ARRAYSIZE ARRAY) \M44DOEXTENDVMEMFILE (SUB1 \GETBASE +IDIFFERENCE \LOOKUPFMAP IPLUS PLUS \ACTONVMEMPAGES IMINUS ADD1 \LOLOC) \SPP.CLOSE.IF.ERROR (SPP.CLOSE) + PRINTDISPLAYNODE (ZEROP) SHOW.PRESS (\GETFILEPTR SPREADAPPLY* IDIFFERENCE LOGOR IPLUS) UnixShellQuote + (CHCON CONS CONCATCODES) OPENPOSTSCRIPTSTREAM (OPENSTREAM PACKFILENAME LISTGET FUNCTION LIST OUTPUT +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. MKSTRING DATE FILENAMEFIELD TERPRI \BOUTEOL CL:FUNCALL CL:ASSOC + CL:FUNCTION ERROR L-CASE NUMBERP TIMES \PS.SCALEREGION / INTERSECTREGIONS CREATEREGION PLUS +FONTCREATE MKLIST CL:GETF) FB.CHECK.NAME.LENGTH (+ STRINGWIDTH CONS LIST - FRPLACA PLUS) +\PFPutFileMapPage (FIXP \PFVolumeNumber \PFPutPage ELT) \EXTENDISFMAP (\ADDBASE IDIFFERENCE \GETBASE +IPLUS ADD1) RESOLVE-READER-CONFLICT (DECLARE CL:MEMBER) REMOVEPROMPTWINDOW (WINDOWPROP FUNCTION CLOSEW + MAINWINDOW) COMP.STCONST (COMP.ST COMP.LOOKUPCONST) SHOULDNT (HELP) \FM.EDITSTART-SETUP (\FM.ITEMPROP + FFETCHFIELD FUNCTION) FFILEPOS (\GETSTREAM INPUT STRINGP MKSTRING \GETFILEPTR SPREADAPPLY* IPLUS SUB1 + \GETEOFPTR IMIN IDIFFERENCE GLOBALRESOURCE CASEARRAY FOLDLO LRSH MOD IMOD GETBASEBYTE \GETBASEBYTE +PLUS \BIN \INCFILEPTR IMINUS IMAX GETRESOURCE NEWRESOURCE ARRAY ADD1 FILEPOS) SEDIT::LESS-PROMPT-WINDOW + (CREATEREGION IDIFFERENCE HEIGHTIFWINDOW FONTPROP) \COURIER.WHENCLOSED (printout TERPRI) +PACKAGE-CLEAR (DECLARE CLRHASH) SEDIT::LINEAR-ITEM-WIDTH (BITMAPWIDTH SHOULDNT) \SETUP.FFILEPOS (IPLUS + LLSH SUB1 FOLDLO LRSH \PUTBASE PLUS \PUTBASEBYTE GETBASEBYTE \GETBASEBYTE IDIFFERENCE ADD1) CL::%%-PI/2 + (CL::%%FLOAT) C.FLOATBOX (SELECTQ COMP.VALN COMP.FLOATBOX) SEDIT::PROP-CHANGED (PUTPROP) +\FM.EDIT-FINDNEXT (FMEMB WINDOWPROP \FM.ITEMPROP FFETCHFIELD) \MAKE.COURIER.REP.STREAM (NCREATE +FUNCTION) CL::BUILD-COPIER-SLOT-SETFS (CL:MAPCAR CL:FUNCTION) PACKAGE-MAKE (DECLARE CL:MAKE-PACKAGE +MOVD) DBG::NEAR-BY-REGION (CL:MOD + -) UnixTempFile (UNPACKFILENAME.STRING CONCAT IDATE PLUS CL:VALUES + OPENSTREAM) TEDIT.NORMALIZECARET (TEXTOBJ) TEDIT.MAPPIECES (\GETBASEPTR \FIRSTNODE ATOM APPLY* LIST +PLUS) SCALE/GRAPH (DSPSCALE EQMEMB LISTGET MAPCAR FIXR FTIMES IDIFFERENCE LRSH FONTCREATE +SCALE/TONODES SCALE/GRAPHNODE/BORDER FRPLACD PLUS FRPLACA) \INITIALIZESWAPDISK (LOCF \ADDBASE +EMPOINTER \VAG2 \GETBASE FFETCHFIELD LRSH) COMPILER::COMPILE-SCAN-DEFINE-FILE-INFO (CL:EVAL) +TB.PRINT.LINE (+ TB.BOTTOM.OF.ITEM TB.SHOW.DELETION) \NSFILING.CLOSE.BULKSTREAM ( +\NSFILING.RELEASE.BULKSTREAM) EXPANDING-PAGEFULLFN (WINDOWREGION TIMES WINDOWPROP - DSPLINEFEED + IMAX +) INTERPRESS.BITMAPSCALE (MIN FQUOTIENT TIMES) PACKAGE-HIERARCHY-INIT (DECLARE MAPATOMS CL:FUNCTION) +IRM.SMART.LOOKUP (IRM.LOOKUP) SEDIT::COPY-STRUCTURE-LIST (MAPCAR) COMP.STCOPY (IGREATERP COMP.ST) +CL::%%NOT-NUMBER-ERROR (CL:ERROR) \FM.DISPLAY-SETUP (\FM.ITEMPROP FFETCHFIELD) \NSFILING.RENAMEFILE ( +FUNCTION \NSFILING.COPY/RENAME \GENERIC.RENAMEFILE) TB.FIND.SELECTED.ITEM (TB.NTH.ITEM PLUS) +SEDIT::ICON-COPYFN (LISTGET WINDOWPROP BKSYSBUF) TB.SHOW.DELETION (BLTSHADE + SUB1 IQUOTIENT - +TB.BOTTOM.OF.ITEM) CL::%%NOT-RATIONAL-ERROR (CL:ERROR) XTOUSTRING (ALLOCSTRING NUTF8STRINGBYTES +NTHCHARCODE PLUS LOGOR LLSH LRSH LOADBYTE LOGAND LSH IMINUS MASK.1'S SUB1) CL::%%PI/2 (CL::%%FLOAT) +FM.SKIPNEXT (TTY.PROCESS PROCESS.EVAL ERROR \FM.EDIT-FINDFIRST FM.EDITITEM) \ENTITYEND.PRESS ( +IDIFFERENCE \GETFILEPTR SPREADAPPLY* GETFILEPTR UNFOLD LLSH \BOUT ADD1 FOLDLO LRSH) COMPILER::PRINT-TREE + (CL:MAKE-HASH-TABLE COMPILER::PRINT-NODE CL:TERPRI CL:VALUES) SEDIT::COPY-STRUCTURE-QUOTE (LIST +SEDIT::SUBNODE) BCOMPL (RESETLST RESETOPENFILES BCOMPL.BODY) \TFBRAVO.INIT.PAGEFORMAT (TEXTPROP) +PSCFONT.READFONT (OPENSTREAM READ FIND-READTABLE \WIN IPLUS LLSH \BIN ARRAY PLUS - CONS L-CASE +FILENAMEFIELD) TB.PROCESS (ADD.PROCESS) \VFMCorrectBufferP (EQL) \TEDIT.UNDERLINE.CARET.OFF ( +\TEDIT.PARSE.CHARLOOKS.LIST) CL::%%RATIO-PRINT (CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR \PRINDATUM +LIST CL:CONCATENATE STRING CL:CODE-CHAR IPLUS + NCHARS FRESHLINE) \TIME.NOT.SET (printout PRIN1) +FB.HANDLE.ABORT.BUTTON (WINDOWPROP MAINWINDOW WFROMMENU DEL.PROCESS) UPDATE/SCROLL/REG (IMAX +IDIFFERENCE IPLUS DSPLINEFEED) DESCRIBE-VIRTUAL-MEMORY (PRIN1 \LOLOC VMEMSIZE CL:VALUES) +SEDIT::COMPUTE-POINT-POSITION-LIST (IPLUS SEDIT::SUBNODE NTH IMAX IDIFFERENCE IMIN HALF LRSH) +NEWFAULT1 (/DWIMCHECKTRAN GETD CONS WTFIX OLDFAULT1 FUNCTION) DATE (\OUTDATE \UNPACKDATE) CL:ADJOIN ( +CL:ERROR CL:FUNCALL CONS) SEDIT::FN-CHANGED (GETD PUTD GETPROP PUTPROP SHOULDNT) ICMLARRAY.DISPLAYSLICE (CREATEARRAYSLICE SELECTQ SLICERANK ONEDINSPECTW.CREATE FUNCTION SUB1 -SLICEDIMENSION LIST PLUS TWODINSPECTW.CREATE SHOULDNT) TERM.SET.TAB (\\DTEST FFETCHFIELD LIST SORT -CONS FREPLACEFIELD) XCL::WALK-PROG (XCL::WALK-LET/LET*) TB.ITEM.VISIBLE? (DSPCLIPPINGREGION \\DTEST -FFETCHFIELD TB.BOTTOM.OF.ITEM IPLUS < +) COMPUTE-MACRO-ARGS (CONS SELECTQ COMPUTE-MACRO-ARGS -MAKE-KEYWORD EVAL) POLYSHADE.SCAN.IP (IMLTLIST MAPCAR PREPLOOP APPENDOP.IP) CLISPIFYCROPS0 ( -CLISPIFYCROPS) \\DRAWLINE1 (\\DRAWLINE.UFN \\ADDBASE IPLUS ITIMES FOLDLO LRSH LOGAND SELECTQ ADD1) -SPPOUTPUTSTREAM (GETSPPCON FFETCHFIELD \\SPP.STREAM.LOST) \\NSFILING.COPY/RENAME (RESETLST -\\NSFILING.PARSE.FILENAME CL:ERROR \\GETFILINGCONNECTION \\NSFILING.LOOKUP.CACHE -\\NSFILING.OPEN.HANDLE \\NSFILING.COMPOSE.PATHNAME FFETCHFIELD LAST CL:BUTLAST LENGTH - -\\NSFILING.CONNECT \\NSFILING.CHECK.ACCESS \\NSFILING.HANDLE.ERROR FILING.CALL DREMOVE APPEND -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION PLUS \\NSFILING.DESERIALIZE1 \\NSFILING.ADD.TO.CACHE - FREPLACEFIELDVAL NCREATE SETUPTIMER FREPLACEFIELD \\NSFILING.FULLNAME) \\CARET.SHOW (WINDOWOP -SPREADAPPLY* FFETCHFIELD) READVISE (NLAMBDA.ARGS CL:FLET MAPCONC REVERSE READVISE-ENTRY READVISE1) -\\LASTNODE (FFETCHFIELD LLSH IDIFFERENCE \\GETBASEPTR \\LASTNODE PLUS) PRINTCOMSTRAN (APPEND MAPCAR -CAR CHCON1 NTHCHARCODE SUBATOM STRPOS SUB1 CONS LIST APPLY* ASSOC SELECTQ FASSOC) DWIMARKASCHANGED ( -LISTGET1 MARKASCHANGED) GRAYBOXAREA (FIXP IDIFFERENCE IPLUS ITIMES BLTSHADE DSPTEXTURE) -COMP.COMPARENUM (COMP.PROGN CONSTANTEXPRESSIONP COMP.COMPARENUM LIST KWOTE COMP.STFN FRPLACA) -OPENRTPSOCKET (RESETLST ETHERPORT PUPSOCKETNUMBER OPENPUPSOCKET \\DTEST RAND FUNCTION -\\LOCALPUPADDRESS FREPLACEFIELDVAL NCREATE CREATECELL CONS FFETCHFIELD SETUPTIMER) -CREATE.NEW.NODEPOSITION (PLUS CONS) |\\VFMGet1| (ELT |\\VFMGetInterval| LOCF FFETCHFIELD \\ADDBASE) -CH.CANONICAL.NAME (PARSE.NSNAME CH.LOOKUP.OBJECT) FASL::DUMP-GENERAL-ARRAY (CL:ARRAY-TOTAL-SIZE -CL:ARRAY-ELEMENT-TYPE CL:MAKE-ARRAY) NEW/EDITDATE (CL:FUNCALL GET EDITMODE) NTH.RELATIVE.COLUMN.OF ( -TTBITWIDTH IDIFFERENCE) /SETA (LIST ELT SETA) GETBSPUSERINFO (\\DTEST FFETCHFIELD) FREEMENU (COPY -\\FM.CREATEW \\FM.FORMAT) CLISPIFYCROPS (STRPOS GETPROP CLISPIFY2C CLISPIFY2 LIST CLISP3A LISTP CONS -NCONC APPEND CLISPIFYCROPS1 SELECTQ) WTODSX (IPLUS DSPCLIPPINGREGION FFETCHFIELD) -ICMLARRAY.ATTACHDISPLAY (CONS ALLATTACHEDWINDOWS WINDOWPROP FUNCTION) TERM.SCROLLDOWN (\\DTEST -FFETCHFIELD + - TERM.ERASEBITS) \\SPECIALRP (SELECTC FOLDLO LRSH IPLUS IDIFFERENCE) 32MBADDRESSABLE ( -SELECTC FFETCHFIELD) \\NUMBERPAD.READER.CLOSEFN (WINDOWPROP) \\FM.PUSHGROUP (\\FM.DTOPGROUPID -\\FM.DGROUPPROP LISTGET FASSOC SELECTQ \\FM.ITEMPROP FFETCHFIELD FRPLACA PLUS) ICONW (GETBOXPOSITION -FFETCHFIELD CREATEW CONS FUNCTION) \\TEDIT.DEFAULTSSEL (TEDIT.LOOKS NCREATE) SET-SYMBOL ( -ENVIRONMENT-VARS \\STKSCAN \\HILOC \\PUTBASEPTR \\RPLPTR) MENUTITLEFONT (FFETCHFIELD DSPFONT FONTP -\\COERCEFONTDESC) COMPILER::TEST-ALPHA-2 (COMPILER::MAKE-ENV CL:MAKE-HASH-TABLE COMPILER::ALPHA-LAMBDA - GETD COMPILER::PARSE-DEFUN GETDEF) \\FM.NUMBER-MESSAGE (SELECTQ) \\MAIKO.INPUT.INTERRUPT (FFETCHFIELD - LOCF \\ADDBASE \\ALLOCATE.ETHERPACKET) COMPILER::META-EVALUATE (COMPILER::NODE-META-P) -\\SET.LASTVMEMFILEPAGE (FFETCHFIELD IDIFFERENCE) SEDIT::ASSIGN-FORMAT-CLISP (FFETCHFIELD GETPROP MAPC -SEDIT::SET-FORMAT) \\TEDIT.CENTER.SEL.REV (FFETCHFIELD \\PARAS.IN.SEL TEDIT.GET.PARALOOKS LISTGET MEMB - CONSTANT TEDIT.SETSEL CONS DREVERSE) FM.SKIPNEXT (TTY.PROCESS PROCESS.EVAL ERROR \\FM.EDIT-FINDFIRST -FM.EDITITEM) \\ILLEGAL.ARG (LISPERROR) DIGITBASEP (PLUS DIFFERENCE) LEVELEDFORM (CONS LEVELEDFORM SUB1 -) EXPAND-DEFMACRO (CL:PROGV EVAL CONS) \\FM.DISPLAY-SETUP (\\FM.ITEMPROP FFETCHFIELD) TERM.RIGHT ( -\\DTEST FFETCHFIELD + MOVETO IMIN ITIMES FREPLACEFIELD) XCL::WALK-MACROLET (CL:LABELS) TB.RESHAPEFN ( -RESETLST WINDOWPROP DSPCLIPPINGREGION FFETCHFIELD RESHAPEBYREPAINTFN TB.FIRST.VISIBLE.ITEM# TIMES SUB1 - TB.LAST.VISIBLE.ITEM#) TIMEALL (DATATYPES NCONC DATATYPEP CONS TERPRI NUMBERP CL::TIME-CALL GETSTREAM -) EXPANDOPENLAMBDA (CONS LIST CONSTANTEXPRESSIONP KWOTE SUBPAIR MAPCAR PACK* GENSYM SUBLIS MKPROGN -NCONC) \\FM.NUMBER-SELECTEDFN (\\FM.EDIT-ITEM FUNCTION) STRPOSL (GLOBALRESOURCE TYPENAMEP MAKEBITTABLE - FFETCHFIELD \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT STRINGP MKSTRING %ARRAY-BASE %ARRAY-OFFSET -%ARRAY-TYPE-NUMBER PLUS ADD1 IPLUS \\SYNCODE GETHASH \\GETBASEBYTE \\GETBASECHAR \\GETBASEFAT -\\GETBASE \\GETBASETHIN IDIFFERENCE GETRESOURCE NEWRESOURCE NCREATE) POLYSHADE.BLT (PREPLOOP MAPCAR -\\POLYSHADE.BLT) XCL::*BREAK-HASH-TABLE* (CL:MAKE-HASH-TABLE) COMP.SHIFT (FIXP LIST COMP.STCONST -APPLY* SELECTQ IMINUS IDIFFERENCE SUB1 COMP.STFN) MOVE.TO.LINE (SEGMENT.BIT.LENGTH CHECK.MARGIN IPLUS) - \\TEDIT.APPLY.OLINE (SELECTQ IMAGEOBJPROP CONS) TRANSGRAPH (MAPCAR PLUS CONS) CALLS3 (FRPLACA DREMOVE -) FASL::DUMP-BIT-ARRAY (CL:ARRAY-TOTAL-SIZE) HPRINT (RESETLST RADIX HASHARRAY OUTPUT SETREADTABLE -OPENSTREAM CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION COPYBYTES) TEDIT.BUILD.PCTB1 (FFETCHFIELD - NCREATE CHARLOOKS.FROM.FONT \\MAKEPCTB IDIFFERENCE GETEOFPTR \\DWIN \\SMALLPIN SUB1 LLSH -TEDIT.GET.PAGEFRAMES1 PLUS IMINUS \\TEDIT.GET.PARALOOKS1 FREPLACEFIELDVAL \\BIN IPLUS CONS -CREATEPCNODE) \\ATWGROUPSIZE (WINDOWREGION UNIONREGIONS CONS) \\BSP.PREPARE.INPUT (WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FFETCHFIELD SETUPTIMER APPLY* \\DEQUEUE SHOULDNT -SELECTC LOCF \\ADDBASE LIST IDIFFERENCE) ADVISE (ARG SI::CANONICALIZE-ADVICE-WHEN-SPEC -SI::CANONICALIZE-ADVICE-WHERE-SPEC XCL:ADVISE-FUNCTION CL:FIRST CL:THIRD MAPCONC) CHARCODE.DECODE ( -CONS CHARCODE.DECODE ERROR NCHARS CHCON1 SELCHARQ SUBSTRING LOGAND LOGNOT IPLUS MKSTRING NUMBERP -STRPOSL CL:PARSE-INTEGER ADD1 SUB1 LOGOR LLSH STRPOS) \\MAKE.JIS.TO.XCCS.CONV.TABLE (ARRAY HASHARRAY -IDIFFERENCE FOLDLO LRSH SELECTQ UNFOLD LLSH LOGAND PUTHASH APPEND MAPCONC MAPCAR) \\SPLITTREE ( -UNINTERRUPTABLY FFETCHFIELD NCREATE IPLUS PLUS LRSH SUB1 \\GETBASEPTR \\GETBASEFIXP ADD1 \\INSERTTREE -FREPLACEFIELD) CL:ENDP (CL:ERROR) \\TEXTRIGHTMARGIN (TEXTOBJ FFETCHFIELD TIMES CHARWIDTH LINELENGTH) -SI::UNBREAK-FROM-RESTORE-CALLS (CL:FIND-IF CL:FUNCTION CL:FORMAT) |\\LFCheckBang| (BIN -|\\LFDirectoryScrambled|) %SORT-SUBLIST (%MERGE-SUBLISTS %SIMPLE-MERGE-SUBLISTS) |\\LFGenFileID| ( -FFETCHFIELD FREPLACEFIELD PLUS) CL:CATCH (CL:CATCH \\EVAL \\EVPROGN) NUMBERPAD.READ (FUNCTION RESETLST - TTYDISPLAYSTREAM TTY.PROCESS THIS.PROCESS CONTROL RESETSAVE ECHOMODE OPENW LIST -DISPLAY/NUMBER/READER/TOTAL WINDOWPROP NUMBERPAD.READER.DECODE READC FFETCHFIELD ERROR!) MSDESCRIBE1 ( -LINELENGTH POSITION IPLUS NCHARS) CL:MAKE-SYMBOL (ERROR MKSTRING %ARRAY-TYPE-NUMBER FFETCHFIELD -%ARRAY-BASE %ARRAY-OFFSET UNINTERRUPTABLY \\CREATE.SYMBOL) SHRIEKIFY (GETPROP CLISPIFYLOOKUP LIST -NCONC1) \\TEDIT.DEFAULTS.CARET (NCREATE \\TEDIT.SHOWCARETLOOKS) \\FTP.RENAMEFILE (\\GENERIC.RENAMEFILE - RESETLST \\FTP.UNPACKFILENAME FDEVOP SPREADAPPLY* FFETCHFIELD FULLNAME \\GETFTPCONNECTION MARK# -FTPPUTMARK FTPGETMARK FTPGETCODE .FTPDEBUGLOG. LISPERROR) \\FM.JUSTIFYGROUPS (\\FM.DTOPGROUPID -\\FM.DGROUPPROP LISTGET FASSOC - IPLUS MAPC \\FM.JUSTIFYGROUPS) \\DOVMEMFULLINTERRUPT (RESETVARS -.RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION CONCAT FFETCHFIELD) PAINTW ( -\\INSUREWINDOW PRIN1 RESETLST RESETSAVE LIST CURSOR WINDOWPROP FFETCHFIELD SELECTQ MASK.1\'S LSH SUB1 -BITMAPP \\GETBRUSH HALF LRSH FREPLACEFIELDVAL NCREATE LOGAND DSPCLIPPINGREGION LASTMOUSEX LASTMOUSEY -PAINTW.READCOMMAND PAINTW.READBRUSHTEXTURE PAINTW.READMODE PAINTW.READBRUSHSHAPE PAINTW.READBRUSHSIZE -WHICHW IDIFFERENCE LOGOR COPY) POLYSHADE.IP (POLYSHADE.SCAN.IP LISTGET FFETCHFIELD) \\SETPUPCHECKSUM ( -\\CHECKSUM LOCF \\ADDBASE SUB1 FOLDHI LRSH IPLUS FFETCHFIELD FOLDLO) \\FM.NWAY-CHANGESTATE ( -\\FM.NWAYPROP LISTGET ASSOC WINDOWPROP) \\CARET.CREATE (CONS) DINFO.FIND (FFETCHFIELD PROMPTPRINT -RESETFORM TTYDISPLAYSTREAM GETPROMPTWINDOW TERPRI PROMPTFORWORD CONSTANT WINDOWPROP PRIN1 TEDIT.FIND -TEDIT.NORMALIZECARET TEDIT.SHOWSEL TEDIT.SETSEL NCHARS) SI::FINISH-UNBREAKING (CL:DELETE) COMP.RPLACD -(SELECTQ COMP.DELPUSH COMP.STPOP COMP.STFN) \\RTP.HANDLE.INPUT (FFETCHFIELD GETPUP BLOCK -PUPSOCKETEVENT \\RTP.ACTION) \\TEDIT.PARSE.CHARLOOKS.MENU (FFETCHFIELD MBUTTON.FIND.NEXT.BUTTON -\\TEDIT.APPLY.BOLDNESS \\TEDIT.APPLY.SLOPE \\TEDIT.APPLY.ULINE \\TEDIT.APPLY.STRIKEOUT -\\TEDIT.APPLY.OLINE ADD1 IMAGEOBJPROP MBUTTON.NEXT.FIELD.AS.ATOM CONS U-CASE EVAL MKATOM SUBSTRING -SUB1 STRPOS MBUTTON.NEXT.FIELD.AS.NUMBER) EDITMOVEREGION (ERROR) COLLECTFNDATA (FASSOC UNION -COLLECTFNDATA) CH.ADD.MEMBER.TO.DOMAIN.ACL (CH.CANONICAL.NAME CH.GETAUTHENTICATOR -COURIER.EXPEDITED.CALL CH.FINDSERVER PARSE.NSNAME COURIER.FETCH) TEDIT.BUILD.PCTB0 (FFETCHFIELD -NCREATE \\MAKEPCTB IDIFFERENCE GETEOFPTR \\DWIN FREPLACEFIELDVAL \\SMALLPIN SUB1 LLSH PLUS -CREATEPCNODE) EDITADDLINK (EDITAPPLYTOLINK FUNCTION WINDOWPROP) \\FM.JUSTIFYITEMS (LISTGET FASSOC -FETCHFIELD FFETCHFIELD \\FM.DGROUPPROP RPLACA SELECTQ IPLUS IQUOTIENT IDIFFERENCE \\FM.ITEMPROP) -\\BSP.CLEANUP.INPUT (\\DTEST FFETCHFIELD IPLUS IDIFFERENCE LOCF \\ADDBASE PLUS SUB1) CL:TAGBODY (CONS -\\PROG0) \\NSFILING.NEXTFILE (BULKDATA.GENERATE.NEXT ASSOC \\NSFILING.FULLNAME FRPLACA NAMEFIELD) -TEDIT.PROMPTFLASH (TEXTOBJ WINDOWPROP \\TEDIT.MAINW FFETCHFIELD GETPROMPTWINDOW) DC (NLAMBDA.ARGS ED -ERROR) CL:CERROR (MAKE-INTO-CONDITION) \\READBMDIMENSIONS (READ BITMAPCREATE BITSPERPIXEL) KILLSEGMENT - (FRPLACA FRPLNODE) \\FORWARD.PUP (\\MAYBEPEEKPUP \\GATEWAY.FORWARD.PUP \\RELEASE.ETHERPACKET) -CLISPAND1 (SELECTQ CLISPAND1 FLAST EVERY) EDITSHADE (CREATETEXTUREFROMBITMAP \\BITMAPFROMTEXTURE -BITMAPCREATE \\ILLEGAL.ARG CREATEREGION CREATEW GETBOXREGION BITMAPWIDTH BITMAPHEIGHT IMIN IQUOTIENT -THIS.PROCESS - ITIMES RESETSAVE LIST LOGAND LOGOR DOWINDOWCOM WHICHW ZEROP LASTMOUSEX LASTMOUSEY -GRIDXCOORD GRIDYCOORD PRIN1 GETPROMPTWINDOW) CLISPACKUP (CLISP3C GETPROPLIST GETPROP MINUS) -COMPAREPRINT1 (COMPAREMAX COMPARELST NCHARS COMPARENCHARS) TEDIT.BUILD.PCTB2 (FFETCHFIELD NCREATE -CHARLOOKS.FROM.FONT \\MAKEPCTB IDIFFERENCE GETEOFPTR \\DWIN \\SMALLPIN SUB1 LLSH TEDIT.GET.PAGEFRAMES -PLUS IMINUS \\TEDIT.GET.CHARLOOKS.LIST2 ARRAY FLENGTH \\TEDIT.GET.PARALOOKS.LIST2 -\\TEDIT.GET.PARALOOKS FREPLACEFIELDVAL \\BIN \\TEDIT.GET.SINGLE.CHARLOOKS2) SEDIT::SELECT-NODE ( -FFETCHFIELD) EDITFNS (MKLIST MAPC STKEVAL EVALV MISSPELLED? FILEFNSLST ERSETQ APPLY CONS PRIN2) -CLISPIFYNOT (CLISPIFY2B GETPROP CLISP3 LIST) \\STRINGWIDTH.IP (\\STRINGWIDTH.GENERIC FFETCHFIELD) -UNICODE.UNMAPPED (CL:SVREF GETHASH ERROR ADD1 FRPLACA PLUS) \\ACTONVMEMFILE (\\DL.ACTONVMEMFILE -\\DOVE.ACTONVMEMFILE \\M44ACTONVMEMFILE) SETUPPAGEMAP (SUB1 UNFOLD LLSH PLUS LRSH PAGELOC IPLUS -\\HILOC \\LOLOC) \\POLYSHADE.YSCAN.IP (MAPCAR SORT FFETCHFIELD CONS CRITSECT IPLUS FILLRECTANGLE.IP -IDIFFERENCE MAPC IMIN NORMSECT) \\GREATESTPTAT (IQUOTIENT IPLUS IDIFFERENCE ITIMES ADD1 HALF LRSH) -\\COURIER.HANDLE.BULKDATA (CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) \\MAIKO.10MBWATCHER ( -SUBSTRING \\MAIKO.INPUT.INTERRUPT PLUS) COMPILER::ANNOTATE-TREE (COMPILER::FRAME-ANNOTATE -COMPILER::CLOSURE-ANNOTATE) \\READBINARYBITMAP (GETSTREAM \\WIN IPLUS LLSH \\BIN BITMAPCREATE -FFETCHFIELD ITIMES) \\PARAS.IN.SEL (FFETCHFIELD IDIFFERENCE TEDIT.SELECTED.PIECES CONS PLUS DREVERSE) -LEAF.ASSURE.FINISHED (\\DTEST FFETCHFIELD CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) -DINFO.LOOKUP (FFETCHFIELD RESETFORM TTYDISPLAYSTREAM GETPROMPTWINDOW PROMPTFORWORD CONSTANT APPLY* -PRINTOUT PRIN1 PROMPTPRINT) CACHEMACRO (ENVIRONMENT-FUNCTIONS CL:FUNCALL GETHASH PUTHASH) -UPDATE/SCROLL/REG (FFETCHFIELD IMAX IDIFFERENCE IPLUS DSPLINEFEED CONS) ICMLARRAY.MENUW.GETLEVEL ( -FM.ITEMPROP WINDOWPROP CL:ARRAY-DIMENSION CONS SUB1 LIST KWOTE PLUS FREPLACEFIELDVAL NCREATE MENU +SLICEDIMENSION LIST PLUS TWODINSPECTW.CREATE SHOULDNT) ASKUSERLOOKUP (FMEMB) CL::%%BUILD-RATIO ( +IREMAINDER IQUOTIENT CL::%%GCD CL::%%MAKE-RATIO -) DBG::RELEASE-DEBUGGER-WINDOW (WINDOWPROP CLOSEW) +DINFOGRAPH (WINDOWPROP) \UNPACKDATE (DAYTIME IQUOTIENT LRSH LISP.TO.ALTO.DATE IMOD + CONSTANT - +IREMAINDER CL:FLOOR ITIMES ROUND TIMES PLUS \DTSCAN \ISDST? ADD1 LIST) BRECOMPILE3 (VIRGINFN LIST +FASSOC FULLNAME) CL::%%COMPLEX-PRINT (CL::COMPLEX-REALPART CL::COMPLEX-IMAGPART IPLUS + NCHARS +FRESHLINE \SOUT) TB.CLOSE/SHRINK (RESETLST WINDOWPROP CL:FUNCALL PRIN1) DATEFORMAT (CONS) +CL::DEFAULT-CONSTRUCTOR-NAME (CL:VALUES CL:INTERN CL:CONCATENATE STRING) CL::%%NOT-FLOAT-ERROR (CL:ERROR +) CL::%%COMPLEX-+ (COMPLEX +) \TEDIT.PRIMARYW (TEXTOBJ) GDATE (\OUTDATE \UNPACKDATE) +\TEDIT.FORMATTEDP1 (GETEOFPTR IDIFFERENCE \DWIN \SMALLPIN SUB1 LLSH CONS) \PRINTFMAP (EMPOINTER \VAG2 +\GETBASE IQUOTIENT - SUB1 + PLUS) \TEDIT.SUBSCRIPT.CARET (\TEDIT.PARSE.CHARLOOKS.LIST) +DISPLAYNODELINKS (TOLINKS GETNODEFROMID LINKPARAMETERS FROMLINKS) \LEAF.USE.NEW.CONNECTION (LIST CONS +LOGAND CONSTANT LOGOR DREMOVE UNION TERPRI \PAGED.REVALIDATEFILES KWOTE) COMPILER::TEST-ALPHA-2 ( +COMPILER::MAKE-ENV CL:MAKE-HASH-TABLE COMPILER::ALPHA-LAMBDA GETD COMPILER::PARSE-DEFUN GETDEF) +\TFBRAVO.GET.FONTSIZE (FASSOC) TERMX (IPLUS IDIFFERENCE \SGN IQUOTIENT ITIMES) PACKAGE-DISABLE (MOVD +READTABLEPROP FIND-READTABLE) NEW/EDITDATE (CL:FUNCALL GET EDITMODE) \FIXP.FROM.FLOATP (LISPERROR +NTYPX ADD1 IDIFFERENCE IGEQ LOLOC \LOLOC FLOAT IPLUS LLSH LRSH LOGAND PLUS SUB1 LSH MINUS DIFFERENCE +.LRSH1. \MAKENUMBER) COURIER.READ.REP (COURIER.READ \MAKE.COURIER.REP.STREAM) SEARCHPRETTYTYPELST ( +CONS LIST PACK* GETTOPVAL) CL::%%COMPLEX-/ (+ CL:* COMPLEX / -) \GETBASE (\GETBASE \ADDBASE) +\NSFILING.WHENCLOSED (DREMOVE \GETDEVICEFROMHOSTNAME) DOMAINWINDOWCOMFN (APPLY* WINDOWPROP FUNCTION) +\PACKDATE (+ SELECTQ SUB1 TIMES - IQUOTIENT PLUS IREMAINDER ALTO.TO.LISP.DATE LLSH) \PUTBASE (\PUTBASE + \ADDBASE .COERCE.TO.SMALLPOSP. IGEQ \ILLEGAL.ARG) \NSFILING.DIRECTORYNAMEP (\NSFILING.GETFILE) +\IDATESCANTOKEN (NTHCHARCODE PLUS ILEQ - + TIMES LOGAND CONS UCASECODE LIST) CL::%%COMPLEX-ABS (FLOAT +CL::COMPLEX-REALPART CL::COMPLEX-IMAGPART CL:SQRT + CL:*) \DSPFONT.IP (\GETFONTDESC FONTCOPY ASSOC +DEFINEFONT.IP FIXR TIMES \FGETWIDTH \GETBASE IDIFFERENCE CONSTANT IMINUS IQUOTIENT FONTPROP - + <=) +\IDATE-PARSE-MONTH (CL:MACROLET DISCRIMINATE) DP (NLAMBDA.ARGS ED ERROR) CL::DEFECT-FROM-IL-TO-XCL ( +CL::NATURALIZE CL:FIND-PACKAGE) COMPILER::COMPILER-ERROR (CL:ERROR) ICMLARRAY.ATTACHDISPLAY (CONS +ALLATTACHEDWINDOWS WINDOWPROP FUNCTION) \TEDIT.SHRINKFN (WINDOWPROP TTY.PROCESS) FB.EDITLISPFILE ( +GETPROP U-CASE ROOTFILENAME FILECOMS CONCAT TTYDISPLAYSTREAM ED) ASKUSEREXPLAIN (MAPC ASKUSERLOOKUP +APPEND LIST MAPRINT PRIN1 CONSTANT CHARACTER POSITION) CL::%%COMPLEX-- (COMPLEX -) +CONDITIONS::DEFECT-FROM-XCL-TO-CONDITIONS (CL::NATURALIZE CL:FIND-PACKAGE) InstallUnixPrinter (LIST) +\NSFILING.GET.STREAM (\NSFILING.COURIER.OPEN CONS FFETCHFIELD LIST FUNCTION) PROMPTPRINT (ARG PLUS) +EVENP (LOGAND CL:ZEROP CL:MOD) \NSFILING.DELETEFILE (\NSFILING.GETFILE FUNCTION) STOPNS (FUNCTION) +\COURIER.EOF (ERROR) CL::%%NOT-NONCOMPLEX-NUMBER-ERROR (CL:ERROR) \GETBASEPTR (\VAG2 \GETBASE \ADDBASE +) SEDIT::CFV-QUOTE (IPLUS) CHECKTRAN (GETHASH) MAKEALISTCOMS (LIST CONS MAPCONC SASSOC GETTOPVAL) +MAKEFILES (RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION MKLIST +ROOTFILENAME MAKEFILE) RECOMP? (SELECTQ FMEMB MEMB EXPRP GETPROP) \PUTBASEPTR (\HILOC \ADDBASE \LOLOC) + \LFExtendFile (\PFNewPages MAX IPLUS \LFUpdateLeaderPage) \RPLRIGHT (IPLUS IREMAINDER \RPLRIGHT SUB1 +IQUOTIENT) \ENTITYSTART.PRESS (\GETFILEPTR SPREADAPPLY* FDEVOP) CL::BUILD-CONSTRUCTOR-SLOT-SETFS ( +CL::PS-TYPE CL::PS-NAME CL:MAPCAR CL:FUNCTION) CL::CHECK-ALL (CL:FIND-PACKAGE) \HILOC (\HILOC) +TEDIT.INSERT.OBJECT (TEXTOBJ SELECTQ SHOULDNT IMIN ADD1 \CHTOPC IMAGEOBJPROP \SPLITPIECE IDIFFERENCE +WINDOWPROP IPLUS SUB1) TEDIT.MAPLINES (DSPCLIPPINGREGION \TEDIT.PRIMARYW APPLY* IGEQ) \OUTDATE-STRING +(+ NTHCHARCODE PLUS RPLSTRING ADD1) COMP.ST (CONS IPLUS OPT.JUMPCHECK) \LOLOC (\LOLOC) +\TEDIT.SELECT.ALL (TEDIT.SETSEL ADD1) \FM.NUMBER-SELECTEDFN (\FM.EDIT-ITEM FUNCTION) \PFGetFileMapPage + (FIXP \PFVolumeNumber \PFGetPage ELT) SEDIT::HIGHLIGHT-SELECTION (SEDIT::OUTLINE-SELECTION FUNCTION) +CL::%%COMPLEX-* (COMPLEX CL:* - +) PROCESSWORLD (\RELEASE.PROCESS RETTO CREATE.EVENT LIST \RUN.PROCESS + FIND.PROCESS ADD.PROCESS FUNCTION \DTEST CONS \START.PROCESSES) SEDIT::PARSE--LIST (LISTGET) +CL::%%2PI/3 (CL::%%FLOAT) CL::%%RATIO-PLUS (CL::%%GCD CL::%%MAKE-RATIO + CL:* IQUOTIENT) +\COERCEASCIITONSFONT (\DTEST \CREATESTARFONT CONS \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH +\CREATECHARSET \GETBASE \CHARSET LRSH PRIN1 PLUS ASSOC \PUTBASE \FGETWIDTH \CHAR8CODE LOGAND LIST) +ADD.PROCESS (THIS.PROCESS ARG \ILLEGAL.ARG ADD1 \INSUREWINDOW \DTEST CONS PLUS SELECTQ +\GET.PRIORITY.QUEUE \RUN.PROCESS) \GETMISCNSOCKET (OPENNSOCKET) \DSPSPACEFACTOR.PRESS (FIXR TIMES +\FGETWIDTH \GETBASE) COMPILEUSERFN1 (FASSOC UNION) FB.CLOSEFN (RESETLST TB.USERDATA CONCAT L-CASE +TB.NUMBER.OF.ITEMS SELECTQ MENU FB.EXPUNGE?.MENU FUNCTION) \START.PROCESSES (UNINTERRUPTABLY +\RESCHEDULE \MYALINK OPCODES) CL::%%RECIPROCOL (FQUOTIENT /) SEDIT::CFV-LIST (CL:FUNCALL ITIMES IMAX +IPLUS SEDIT::NEXT-NODE-TYPE SELECTQ SHOULDNT IMIN) NEWPAGE.IP (FREPLACEFIELD PLUS FFETCHFIELD +DIFFERENCE FONTPROP IMINUS) DISPLAYGRAPH (CONSTANT \GETSTREAM DSPSCALE SCALE/GRAPH FIXR FTIMES LENGTH +HASHARRAY PUTHASH DISPLAYNODELINKS PRINTDISPLAYNODE) CL::%%< (CL::%%>) SEDIT::SEDITL (CL:FUNCTION +TTY/EDITL LIST) \RPLPTR (UNINTERRUPTABLY OPCODES \HILOC \LOLOC) SEDIT::SEDITE (CREATE.EVENT SELECTQ +APPEND GETPROPLIST CL:FUNCTION LIST FUNCTION TTY/EDITE RPLNODE2 CL:COPY-TREE) ICMLARRAY.MENUW.SHOW ( +WINDOWPROP SUB1 CL:ARRAY-RANK FM.GETITEM PACK* PLUS) CLISPELL (LISTGET1 FMEMB CONS GETPROP) +CL::%%RATIO-TIMES (CL::%%GCD CL:* CL::%%MAKE-RATIO -) CL::%%> (\CALLME) \RELEASE.PROCESS (DREMOVE) +\IRM.SMART.REF (STRPOS ADD1 NTHCHAR SUB1 PACK UNPACK LIST \IRM.WILD.REF RESETFORM TTY.PROCESS +THIS.PROCESS MISSPELLED? \IRM.GET.REF PRIN1) \INSPECT/CODE/REPAINTFN (WITH-INSPECTOR-ENV WINDOWPROP +XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES) UNMAKEMAINWINDOW (FUNCTION +WINDOWPROP) OPT.CALLP (FMEMB) LOC (CONS \HILOC \LOLOC) \TEDIT.ITALIC.CARET.ON ( +\TEDIT.PARSE.CHARLOOKS.LIST) \FM.NUMBER-MESSAGE (SELECTQ) TB.FIRST.VISIBLE.ITEM# (IMAX ADD1 IQUOTIENT +- \DTEST DSPCLIPPINGREGION) DBG::CLOSE-DEBUGGER-WINDOW (WINDOWPROP WFROMDS PROCESS.TTY THIS.PROCESS +DBG::EXIT-DEBUGGER BLOCK) CL::%%* (\CALLME) VAG (\VAG2 FIXP FIX \HINUM \LONUM) SEDIT::INPUT-NORMAL-CHAR + (PRIN1 CHARACTER IDIFFERENCE SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW SEDIT::TYPE-OF-INPUT +SEDIT::SET-SELECTION-NOWHERE) CL::%%PI (CL::%%FLOAT) CL::%%LCM (CL::%%GCD CL:* IQUOTIENT) COMPEM ( +COMPEM ERROR) \LONUM (NTYPX \LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR +) CLISP3A (CLISPACKUP GETPROP) SETXY.PRESS (\BOUT) INITX (IDIFFERENCE \SGN IPLUS IQUOTIENT ITIMES) +BYTE (CL:ERROR + CL:ASH CONS) CL::BOA-CONSTRUCTOR-P (CL:CONSP) PUTWINDOWPROP (\OUTSTREAMARG \GETSTREAM + WFROMDS WINDOWOP SPREADAPPLY*) \HINUM (NTYPX \LOLOC \FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR +CL::RATIO-DENOMINATOR) FB.COPYFN (BKSYSBUF) CLEANUP (NLAMBDA.ARGS APPEND MAKEFILES INTERSECTION APPLY +MEMB) BLOCKCOMPILE1 (LIST SOME APPEND CONS POSITION VIRGINFN NCONC1 SUB1 COMPILE1A MAPCAR +BYTEBLOCKCOMPILE2 BLOCKCOMPILE2) \NEW4PAGE (\NEWPAGE \ADDBASE) EDITPROP (EDITDEF LIST APPLY) +COURIER.ABORT.BULKDATA (CL:THROW CL:VALUES) CL::%%+ (\CALLME) CONS (OPCODES) NSOCKETNUMBER (\DTEST) +PAINTW.SHADE.LABEL (BITMAPCREATE PLUS STRINGWIDTH FONTPROP) KNOTLOOP (LAST XYPT.X XYPT.Y MAKELINE +IDIFFERENCE CONS REVERSE) COMP.DELFN (IPLUS SUB1) \NEXTCONSPAGE (\ALLOCMDSPAGE \INITCONSPAGE \ADDBASE +PAGELOC IPLUS LLSH \HILOC LRSH \LOLOC) FILLWITHBACKGROUND (DSPFILL DSPTEXTURE WINDOWPROP) +\FM.NWAY-CHANGESTATE (\FM.NWAYPROP LISTGET ASSOC WINDOWPROP) \NSFILING.COURIER.OPEN (COURIER.OPEN +FUNCTION CONSTANT LIST) \PFPutAllocationMapPage (FIXP \PFVolumeNumber \PFPutPage ELT) SEDIT::GRAY ( +EVENP DSPXOFFSET DSPYOFFSET) COMPILER::TEST-ALPHA (COMPILER::TEST-ALPHA-2 CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION COMPILER::PRINT-TREE) CL::%%- (\CALLME) TB.FIND.ITEM (IMAX IMIN ADD1 SUB1 +FUNCTION TB.NTH.ITEM PLUS) UPDATECHANGED1 (TESTRELQ TESTTABLE FASSOC MSGETDEF MSUPDATEFN1 TERPRI +MSERASE LIST PUTHASH) SEDIT::CREATE-COMMAND-TABLE (CL:MAKE-HASH-TABLE CL:FIRST LIST* CL:THIRD CL:REST +LIST MAPC CL:GETHASH SEDIT::CHARCODE) CL::%%2PI (CL::%%FLOAT) EDITFNS (MKLIST MAPC STKEVAL EVALV +MISSPELLED? FILEFNSLST ERSETQ APPLY CONS PRIN2) \MOUSE.PROCESS (THIS.PROCESS FIND.PROCESS) +COMPILER::*COMPILE-SCAN-CONTEXT* (COMPILER::MAKE-COMPILER-CONTEXT) ICMLARRAY.MENUW.APPLY (WINDOWPROP +SUB1 CL:ARRAY-RANK FM.ITEMPROP FM.GETITEM PACK* LIST PLUS ADD1 PRINTOUT PRIN1 ICMLARRAY.ATTACHDISPLAY) + BULKDATA.GENERATE.NEXT (SUB1 GETWORD IPLUS LLSH \BIN COURIER.READ) TB.REV.FIND.SELECTED.ITEM ( +TB.NTH.ITEM PLUS) \MAIKO.CONS.UFN (CREATECELL UNINTERRUPTABLY OPCODES IPLUS16 \LOLOC \ADDBASE \GETBASE + ADD1 \DORECLAIM NTYPX .MAKECONSCELL. PLUS FFETCHFIELD IPLUS \NEXTCONSPAGE) \IRM.GET.REF (MKATOM +U-CASE WINDOWPROP PRIN1 GETHASHFILE \IRM.CHOOSE.REF MAPCONC LIST) \TEDIT.INSPECTCODE (OPENSTREAM +FUNCTION OPENTEXTSTREAM DECODE.WINDOW.ARG CONCAT TEDIT.FIND IMAX IDIFFERENCE) ONEDINSPECT.REDISPLAY ( +LIST WINDOWPROP MAPCAR APPLY* XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES +STRINGWIDTH FONTPROP INSPECT.INVERTSELECTION RIGHTW.REPAINTFN) SEDIT::START-PROCESS (LIST KWOTE CONCAT + AWAIT.EVENT) CAR (OPCODES) \TEDIT.SHRINK.ICONCREATE (WINDOWPROP FLENGTH TEXTSTREAM.TITLE TEXTSTREAM +TITLEDICONW) \PROMISCUOUS.ON (SELECTQ \PUTBASE EMADDRESS OPCODES \10MB.STARTDRIVER) COMPILEFILES0 ( +SELECTQ MISSPELLED?) CL::%%GCD (CL:ASH) CL::%%INTEGER-COERCE-OPTIMIZER (COMPILER:CONTEXT-VALUES-USED) +CDR (OPCODES) SEDIT::BACKSPACE-LIST (SEDIT::SET-SELECTION-NOWHERE SEDIT::SUBNODE NTH CL:FUNCALL) +VARSBOUNDINEDITCHAIN (MAPCONC VARSBOUNDINFORM) GRAPHDELETELINK (REMOVETONODES REMOVE) +POSTSCRIPT.FONTSAVAILABLE (\FONTFILENAME ASSOC MAPCAR CONS MAPCONC DIRECTORY CONCAT +\FONTINFOFROMFILENAME RPLACA LIST COPY PLUS) DISPLAY/NUMBER/READER/TOTAL (WINDOWPROP RADIX +CENTERPRINTINREGION MKSTRING NCHARS STRPOS SUB1 DIFFERENCE SUBSTRING PLUS CONCAT) +COMPILER::ESTABLISH-MACRO-IN-COMPILER (COMPILER::ENV-BIND-FUNCTION COMPILER::FIND-TOP-ENVIRONMENT) +\FM.NWAY-SELECTEDFN (LISTGET ASSOC \FM.ITEMPROP WINDOWPROP \FM.NWAY-CHANGESTATE) +NUMBERPAD.READER.DECODE (NUMBERP SELECTQ TEDIT.GETSYNTAX) \ISDST? (PLUS) SEDIT::GET-DESTINATION-CONTEXT + (PROCESSPROP TTY.PROCESS WINDOWPROP) DBG::CREATE-DEBUGGER-WINDOW (DECLARE CREATEW DBG::NEAR-BY-REGION + WINDOWPROP WFROMDS STKPOS EVALV REGIONP CREATEREGION) \BACKGROUND.PROCESS (SPREADAPPLY*) RPLACA ( +OPCODES) PRINTLINE (PRIN1 TERPRI IMIN \GETCH \BIN CHARACTER PLUS) CL:FLOOR (CL::%%INTEGER-COERCE-MACRO +) CL::%%E (CL::%%FLOAT) EXEC (WFROMDS TTYDISPLAYSTREAM LIST PROCESS-EXEC-ID THIS.PROCESS +XCL::GET-PROCESS-PROFILE CL:PROGV MAPCAR CAR EVAL DECODE/WINDOW/OR/DISPLAYSTREAM) BRECOMPILE1 (APPEND +ASSOC LIST CONS PACK* GETFILEPTR READ MAPC SETFILEPTR LCSKIP BRECOMPILE3 NCONC1) RPLACD (OPCODES) +\LFExtendFileIfNecessary (LENGTH PLUS SUB1 CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +\LFExtendFile) INTERPRESSFILEP (GETFILEINFO RESETLST \GETSTREAM RANDACCESSP LIST GETFILEPTR OPENSTREAM + CONSTANT NCHARS NTHCHARCODE BIN PLUS FULLNAME) CL::BUILD-CONSTRUCTOR-ARGLIST (CL:MAPCAN CL:FUNCTION) +XCL::SROUND (FIXR FQUOTIENT /) CL::%%LOGIOR (LOGOR) NSOCKETFROMNUMBER (\NSOCKET.FROM#) +TB.SHOW.COPY.SELECTION (BLTSHADE TB.BOTTOM.OF.ITEM) XCL::SCEILING (XCL::STRUNCATE CL:1+ CL:REM) +DOCOLLECT (FRPLACD LIST CONS) \NSFILING.CHILDLESS-P (ASSOC FILING.CALL CONSTANT +\FILING.ATTRIBUTE.TYPE.SEQUENCE) COMPILEUSERFN (BOUNDP CHECKTRAN CONS GETPROP GETHASH NLSETQ +compilation) FB.AFTERCLOSEFN (WINDOWPROP TB.USERDATA) XCL::SFLOOR (XCL::STRUNCATE CL:1- CL:REM) +CL::%%LLSH1 (LLSH) CL::%%LRSH8 (LRSH) SEDIT::ASSIGN-FORMAT-QUOTE (SEDIT::SET-FORMAT SEDIT::GET-LIST-FORMAT +) PAINTW.CACHE.SHADE (NCONC1 LIST PAINTW.SHADE.LABEL) LINKPARAMETERS (MEMBTONODES TOLINKS) DC ( +NLAMBDA.ARGS ED ERROR) COMPILER::*COMPILE-DEFINER-CONTEXT* (COMPILER::MAKE-COMPILER-CONTEXT) +ICMLARRAY.MENUW.GETLEVEL (FM.ITEMPROP WINDOWPROP CL:ARRAY-DIMENSION CONS SUB1 LIST KWOTE PLUS MENU TERPRI TTY.PROCESS THIS.PROCESS PROMPTFORWORD CONCAT U-CASE READ OPENSTRINGSTREAM PRIN1 FM.CHANGELABEL -) \\TEDIT.APPLY.BOLDNESS (SELECTQ IMAGEOBJPROP CONS) ICMLARRAY.MENUW.APPLY (WINDOWPROP SUB1 CONS IPLUS - CL:ARRAY-RANK FM.ITEMPROP FM.GETITEM PACK* LIST PLUS ADD1 PRINTOUT PRIN1 ICMLARRAY.ATTACHDISPLAY) -\\BITMAPFROMTEXTURE (BITMAPCREATE LOGAND \\BITMASK \\WORDELT IPLUS ITIMES IDIFFERENCE PLUS) -FASL::DUMP-SIMPLE-VECTOR (CL:LENGTH) ICMLARRAY.MENUW.SHOW (WINDOWPROP SUB1 CL:ARRAY-RANK FM.GETITEM -PACK* PLUS) \\MVLIST (LIST) \\LEASTPTAT (ADD1 IQUOTIENT IPLUS IDIFFERENCE ITIMES HALF LRSH) -\\FM.CHECKDESCRIPTION (LISTGET ERROR CONCAT IPLUS SELECTQ) SEDIT::CFV-CLISP (FFETCHFIELD IMAX IPLUS) -CONCAT (ARG %ARRAY-TYPE-NUMBER FFETCHFIELD \\PROPCELL \\ATOMCELL CONSTANT MKSTRING IPLUS NCHARS SUB1 -ALLOCSTRING ADD1) DP (NLAMBDA.ARGS ED ERROR) XCL::SET-DECL-SPECIFIER-P (GET) COMPILER::TEST-ALPHA ( -COMPILER::TEST-ALPHA-2 CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION COMPILER::PRINT-TREE) -\\FM.NWAY-SELECTEDFN (LISTGET ASSOC \\FM.ITEMPROP FFETCHFIELD WINDOWPROP \\FM.NWAY-CHANGESTATE) -\\INVALID.INTEGER (\\GETBASESTRING UNFOLD LLSH - \\MKINTEGER) MSDESCRIBE (GETRELQ GETTABLE FASSOC -SMARTARGLIST CHANGEFONT TESTRELQ TESTTABLE GETHASH ABS UNION LIST CONS EVAL) \\FM.LAYOUTGRID (MAPC -SELECTQ LISTGET APPLY* PLUS \\FM.MAKE-GROUP-ID CONS LIST LISTPUT FLENGTH IPLUS FNTH IDIFFERENCE -FRPLACA CREATEREGION \\FM.FORMAT \\FM.DTOPGROUPID COPY \\FM.DTOPGROUPPROP \\FM.CREATEITEM -\\FM.ITEMPROP FFETCHFIELD ADD1 ITIMES \\FM.MAKEGROUP) XCL::SET-GLOBALLY-NOTINLINE-P (GET) -CLISPANGLEBRACKETS (CLISPLOOKUP SHRIEKER) \\INVALID.DOTTED.SYMBOL (\\GETBASESTRING) /PRINTLEVEL (LIST -FUNCTION PRINTLEVEL) TERPRI (\\GETSTREAM) CL:UNWIND-PROTECT (CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION \\EVAL) SPLITKEY (STRPOSL FRPLNODE SUBATOM SUB1 ADD1) XCL::WALK-LET* (XCL::WALK-LET/LET*) -/MOVD (COPY VIRGINFN GETD) PRIN1 (\\GETSTREAM \\DTEST FFETCHFIELD \\OUTTERMP .FILELINELENGTH. SELECTC) - |\\LFDirectoryScrambled| (PACKFILENAME.STRING U-CASE |\\PFGetVol| FFETCHFIELD |\\PFFetchString| LOCF -\\ADDBASE PRIN1 |DiskError|) |\\PFFindFileSize| (|\\VFMGetPageGroup| |\\PFGetVol| FFETCHFIELD) SPACES -(\\GETSTREAM .FILELINELENGTH. FFETCHFIELD SELECTC IPLUS FRESHLINE \\OUTCHAR) %SET-ARRAY-OFFSET (-) -UTF8.OUTCHARFN (\\BOUT SELECTC FFETCHFIELD SHOULDNT IPLUS UNICODE.TRANSLATE CL:SVREF LRSH FASSOC -LOGAND UNICODE.UNMAPPED LOGOR LLSH LOADBYTE LSH IMINUS MASK.1\'S SUB1) PRINTNUM (GLOBALRESOURCE -SELECTQ LISPERROR \\CONVERT.FLOATING.NUMBER FLOAT \\CHECKFLTFMT \\CONVERTNUMBER FIXP FIXR IABS IMINUS -IGREATERP IDIFFERENCE NCHARS PRIN1 GETRESOURCE NEWRESOURCE ALLOCSTRING CONCAT) \\INSERTTREE ( -UNINTERRUPTABLY FFETCHFIELD LLSH SUB1 \\GETBASEPTR PLUS IDIFFERENCE IPLUS \\GETBASEFIXP \\ADDBASE -FREPLACEFIELD ADD1) READPAGEMAP (MAPVMPAGE IPLUS LLSH \\HILOC LRSH \\LOLOC PAGELOC SUB1 FFETCHFIELD -SETVMPTR FOLDHI PLUS UNFOLD IEQ GETBASE \\GETBASE ADDBASE \\ADDBASE) FILLRECTANGLE.IP (FFETCHFIELD -FIXR TIMES IMIN + IMAX - APPENDOP.IP) DINFO.ADD.FMENU (FFETCHFIELD WINDOWPROP OPENW WINDOWP -DINFO.CREATE.FMENU GETPROMPTWINDOW DINFO.UPDATE.FMENU) TAB (IPLUS POSITION NUMBERP IDIFFERENCE) -FILLWITHBACKGROUND (DSPFILL DSPTEXTURE WINDOWPROP) SHIFT.BITMAP.UP (FFETCHFIELD BITMAPCREATE IPLUS) -\\TEDIT.APPLY.CHARLOOKS (FFETCHFIELD WINDOWPROP ADD1 MBUTTON.FIND.NEXT.BUTTON -\\TEDIT.PARSE.CHARLOOKS.MENU) SI::PRINT-TRACE-EXIT-INFO (DECLARE SPACES CL:* CL:PRINC CL:1+ CHANGEFONT - CL:PRIN1 CL:TERPRI MAPC +) COMPILER::PEEPHOLE-OPTIMIZE (CL:MAKE-HASH-TABLE) \\PRINTVP (|printout| -LRSH LOGAND PRIN1) \\TELERAIDBREAK (FFETCHFIELD \\ADDBASE ADDSTACKBASE \\VAG2 IDIFFERENCE \\GETBASEPTR - STACKADDBASE LIST LOGAND LRSH LLSH \\GETBASE SELECTQ \\KEYNAMETONUMBER IPLUS \\MAKEFRAME FUNCTION -\\FREESTACKBLOCK \\DEFCELL \\ATOMCELL UNFOLD) \\PRINTBINARYBITMAP (GETSTREAM BITMAPP LRSH \\BOUT -LOGAND BITMAPWIDTH BITMAPHEIGHT BITSPERPIXEL FFETCHFIELD ITIMES) \\LEAF.FLUSH.CACHE (WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FFETCHFIELD) GETSTREAM (\\GETSTREAM) OPT.OPTCHECK ( -FMEMB TAILP OPT.COMPILERERROR EVERY CONS LIST FASSOC GETHASH MEMB) SETHASHSTATUS (WHENCLOSE FUNCTION -CONS ELT) TERM.NEWLINE (\\DTEST MOVETO FREPLACEFIELD FFETCHFIELD) XCL::WALK-LET (XCL::WALK-LET/LET*) -/MAPCONC (APPLY*) TB.BROWSER.BUSY (RESETFORM CURSOR BLOCK) \\LFDWOUT (LOGAND LRSH \\BOUT) -|\\PFFindPageAddr| (FFETCHFIELD |\\VFMGetPageGroup| |\\PFGetVol| IPLUS IMINUS) RESETGRID.NEW ( -WINDOWPROP IPLUS LEFTOFGRIDCOORD BOTTOMOFGRIDCOORD CL:* + BITSPERPIXEL - COPYALL FRPLACA GRID) -XCL::DECL-SPECIFIER-P (GET) GO.TO.RELATIVE (+ TIMES SUB1 -) \\DRAWPOLYGON.IP (\\DRAWPOLYGON.GENERIC -FQUOTIENT \\WIDTHFROMBRUSH FFETCHFIELD + - \\VISIBLE.IP ILEQ PLUS MASKSTROKE.IP LIST) -\\FM.LAYOUTCOLUMN (MAPC SELECTQ LISTGET APPLY* PLUS \\FM.MAKE-GROUP-ID CONS LIST LISTPUT IPLUS -CREATEREGION DREVERSE \\FM.FORMAT \\FM.DTOPGROUPID REVERSE \\FM.DTOPGROUPPROP \\FM.CREATEITEM -\\FM.ITEMPROP FFETCHFIELD FRPLACA ITIMES \\FM.MAKEGROUP) FIX (IPLUS) TEDIT.GET.PAGEFRAMES ( -TEDIT.PARSE.PAGEFRAMES READ) DRAW/GRAPHNODE/BORDER (DRAWAREABOX ILEQ ERROR) CLISP3A (CLISPACKUP -GETPROP) FIXLISPX/ (LISPX/) INSERTLINE (ADD1 CONS FRPLACD) \\HANDLE.RAW.PUP (FFETCHFIELD LOCF -\\ADDBASE \\FORWARD.PUP \\PUPSOCKET.FROM# FOLDLO LRSH SUB1 \\CHECKSUM FOLDHI IPLUS LLSH -\\LOCATE.PUPNET \\ADD.ROUTING.TABLE.ENTRY CONS FRPLACA PLUS NOTIFY.EVENT) CLISPAND (CLISPCOND CONS -LDIFF SOME CLISPAND1 FLAST) \\FM.LAYOUTROW (MAPC SELECTQ LISTGET APPLY* PLUS \\FM.MAKE-GROUP-ID CONS -LIST LISTPUT IPLUS CREATEREGION \\FM.FORMAT \\FM.DTOPGROUPID COPY \\FM.DTOPGROUPPROP \\FM.CREATEITEM -\\FM.ITEMPROP FFETCHFIELD FRPLACA ITIMES \\FM.MAKEGROUP) XCL::GLOBALLY-NOTINLINE-P (GET) FGET.IP ( -APPENDOP.IP) \\DWIN (IPLUS LLSH \\BIN) DRAWAREABOX (PLUS DIFFERENCE BLTSHADE) -\\DO.PROGV.SETUP.FRAME.AND.EXECUTE (\\MYALINK OPCODES FFETCHFIELD ADDSTACKBASE \\VAG2 CEIL LOGAND -IPLUS IDIFFERENCE UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDLO LRSH \\PUTBASEPTR \\ATOMVALINDEX NTYPX -\\LOLOC SHOULDNT PLUS WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY FREPLACEFIELD) \\COURIER.RESULTS ( -SELECTC GETWORD IPLUS LLSH \\BIN COURIER.READ MAPCAR CONS LISTGET \\GET.COURIERPROGRAM GETHASH LIST -SELECTQ COURIER.SIGNAL.ERROR) REPLACEHASHKEY (SETFILEPTR PRINTSTBYTE BOUT PRINTPTR LOGAND RSH -GETEOFPTR PRIN2 SPACES PRINT FORCEOUTPUT ELT) \\NSFILING.FILEINFOFN (\\NSFILING.GETFILEINFO.FROM.PLIST -) INSTALL-PROTOTYPE-DEFN (CL:FLET CL:FORMAT MKLIST XCL::PROTOTYPE-DEFN-TYPES INTERSECTION APPEND -MAPCAR LIST FREPLACEFIELDVAL NCREATE CONS MENU XCL::PROTOTYPE-DEFINERS-FOR-TYPE) |\\PFGetPage| ( -|\\PFTransferFilePage|) \\NSRANDOM.SESSION.WATCHER (FFETCHFIELD THIS.PROCESS FRPLACA LIST FUNCTION -LOGAND CONSTANT LOGOR TIMES IMAX - \\DAYTIME0 \\CREATECELL) DINFO.DEFAULT.MENU (FFETCHFIELD -GETPROMPTWINDOW MENU FONTCREATE FREPLACEFIELDVAL NCREATE CONS FREPLACEFIELD THIS.PROCESS CONCAT -SELECTQ DINFO.SPECIAL.UPDATE DINFO.FIND DINFO.LOOKUP DINFO.UPDATE) \\POSITION.MENU.IMAGE (FFETCHFIELD -IDIFFERENCE IMAX IMIN BITMAPWIDTH CHECK/MENU/IMAGE BITMAPHEIGHT) DASSEM.CLEANFNTEST (GETPROP FMEMB -SELECTQ) \\INIT.RTPPROCESS (ADD.PROCESS LIST FUNCTION KWOTE CREATE.EVENT PROCESS.NAME -CREATE.MONITORLOCK) \\TEDIT.SHOW.CHARLOOKS (FFETCHFIELD WINDOWPROP ADD1 MBUTTON.FIND.NEXT.BUTTON -\\CHTOPC) COMPILER::EXPAND-OPENLAMBDA-CALL (CL:FUNCTION CL:FIRST CONS) \\MAIKO.10MBSENDPACKET (LOCF -\\ADDBASE FFETCHFIELD SUB1 INDEXF \\ALLOCATE.ETHERPACKET ADD1 \\REQUEUE.ETHERPACKET) OPT.CCHECK ( -OPT.COMPILERERROR) CHECKFPTOVP1 (\\LOOKUPPAGEMAP PRIN1 RPFROMRPT IPLUS TERPRI) SEDIT::LINEARIZE-CLISP -(FFETCHFIELD IPLUS ILEQ MEMB SUB1 IDIFFERENCE SEDIT::SELECT-COMMENT-INDENT SHOULDNT SELECTQ FMEMB -GETPROP SEDIT::OUTPUT-CONSTANT-STRING) \\FM.NWAY-DOWNFN (ASSOC \\FM.ITEMPROP LISTGET FFETCHFIELD -WINDOWPROP BITBLT \\FM.DISPLAYBITMAP) \\TEDIT.UPDATETREE (FFETCHFIELD \\GETBASEPTR IPLUS \\GETBASEFIXP - PLUS) READPAGEMAPBLOCK (VBIN2 IPLUS LLSH VBIN1 \\BIN LOCAL MAPVMPAGE SUB1 ADD1) SETCOLOR.IP ( -DSPOPERATION NEGSHADE APPENDOP.IP SETCOLOR16.IP SETCOLORLV.IP) GAINSPACE (POSITION ASKUSER LIST EVAL) -MAKEHASHKEY (IPLUS ITIMES DCHCON IMOD) \\FM.NWAY-MOVEDFN (ASSOC \\FM.ITEMPROP LISTGET FFETCHFIELD -WINDOWPROP BITBLT \\FM.DISPLAYBITMAP) TB.WINDOW (\\DTEST FFETCHFIELD) EDITFB (EDITLOADFNS? NARGS LIST -TERPRI) |\\VFMGetBufferFor| (|\\VFMKillBuffer| CONS NCREATE FREPLACEFIELDVAL FFETCHFIELD FNTH) -\\PROMPT.FOR.PUP.NUMBER (RESETLST PROVIDE.PROMPTING.WINDOW RESETBUFS PACK* PROMPTFORWORD TERPRI -TTYDISPLAYSTREAM) \\FM.FORMATEXPLICIT (CREATEREGION LIST LISTGET \\FM.FORMAT \\FM.DTOPGROUPID COPY -\\FM.DTOPGROUPPROP LCONC \\FM.CREATEITEM EXTENDREGION \\FM.ITEMPROP FFETCHFIELD DREVERSE CONS -\\FM.MAKEGROUP) CL:GENSYM (CL:MAKE-SYMBOL CL:CONCATENATE MKSTRING CL:1+) COROUTINE (SET STACKP EVALV -STKNTH RETTO ENVEVAL) COMPARE (GETDEF) \\FM.NWAY-MESSAGE (LISTGET ASSOC \\FM.ITEMPROP FFETCHFIELD -WINDOWPROP SELECTQ) SI::PRINT-TRACED-ARGUMENT (SPACES CL:PRIN1 CL:PRINC CL:TERPRI) \\MAPPNAME.INTERNAL - (WITH-RESOURCE \\PRINDATUM GETRESOURCE NEWRESOURCE FREPLACEFIELDVAL NCREATE FUNCTION) FIXAPPLY1 ( -STKNARGS FSTKARG SUB1 BLIPVAL FMEMB) PRINT-CIRCLE-SCAN (DECLARE) DINFO.SELECT.GRAPH (RESETFORM -TTY.PROCESS THIS.PROCESS PROMPTPRINT EVAL MENU FREPLACEFIELDVAL NCREATE CONS DINFO) OUTPUT ( -\\GETSTREAM) \\RTP.ACTION (FFETCHFIELD SELECTC LIST LOCF \\ADDBASE) \\TEDIT.NEUTRALIZE.CHARLOOKS ( -FFETCHFIELD WINDOWPROP ADD1) COMPILER::COMPLETELY-EXPAND (COMPILER:OPTIMIZE-AND-MACROEXPAND-1) -CH.GETAUTHENTICATOR (\\INTERNAL/GETPASSWORD NS.MAKE.SIMPLE.CREDENTIALS COURIER.CREATE LIST ERROR!) -FASL::DUMP-CHARACTER (DECLARE CL:CHAR-CODE FASL::HANDLE-STREAM BOUT BOUT16) NEGATE (SELECTQ CONS -NEGLST NEGATE NEGC MAPLIST NEGL MKPROGN APPEND LIST) UNIXCHAT.OPEN (CREATE-SHELL-STREAM LIST) /MAPCON -(APPLY*) \\BSP.OTHERBOUT (\\BOUT \\DTEST FFETCHFIELD LISPERROR) CLOSE.PROCESS.MENU (WAKE.PROCESS -WINDOWPROP) |CreateCursorBitMap| (BITMAPCREATE FFETCHFIELD LOGAND ELT ADD1 PLUS) SHIFT.BITMAP.DOWN ( -FFETCHFIELD BITMAPCREATE IPLUS) \\MAIKO.10MBSTARTDRIVER (\\INIT.ETHER.BUFFER.POOL NCREATE TIMES -FFETCHFIELD \\ALLOCATE.ETHERPACKET) CLISPIFY (EVQ VARSBOUNDINEDITCHAIN LAST EXPRCHECK GETLOCALDEC -CLISPIFY2 CLISPIFY1 CONS FMEMB LIST CLISPIFY2A) \\10MBSETUPRECEIVER (\\QUEUE.INPUT.IOCB LOCF \\ADDBASE -) COERCETOBITMAP (BITMAPP EVALV BITMAPCREATE BITSPERPIXEL SCREENBITMAP WINDOWPROP DSPCLIPPINGREGION) -CLEAR.LEAF.CACHE (\\GETDEVICEFROMNAME \\CANONICAL.HOSTNAME FFETCHFIELD \\LEAF.FLUSH.CACHE) -FASL::DUMP-SYMBOL (CL:SYMBOL-NAME CL:SYMBOL-PACKAGE CL:PACKAGE-NAME) \\FATTENSTRING ( -%MAKE-STRING-ARRAY-FAT) \\PRINTFPTOVP (GETSTREAM FFETCHFIELD \\ADDBASE SUB1 PLUS \\GETBASE -\\LOCKEDPAGEP TYPENAME \\VAG2 LRSH LLSH LOGAND SELECTC LIST CL:1+ \\HILOC ADD1 PRIN1 TAB) PRINTDEF ( -GETSTREAM DSPLEFTMARGIN SUB1 DSPRIGHTMARGIN LIST TTYDISPLAYSTREAM RESETSAVE FUNCTION DSPFONT SETFONT -PLUS BLANKS TIMES DSPXPOSITION SUBPRINT SUPERPRINT MAPRINT PRIN2S) BKSYSBUF (FFETCHFIELD \\PNAMECELL -\\ATOMCELL \\PROPCELL CONSTANT ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE SUB1 -%ARRAY-OFFSET %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER \\GTREADTABLE TTY.PROCESS THIS.PROCESS -PROCESS.EVALV FUNCTION) UTF8.INCCODEFN (\\BIN CL:VALUES) WTFIX (WTFIX1) %STABLE-SORT-VECTOR ( -VECTOR-LENGTH %VECTOR-INSERTION-SORT %SIMPLE-VECTOR-INSERTION-SORT) \\MAPPNAME (\\GTREADTABLE \\DTEST -\\MAPPNAME.INTERNAL) \\POLYSHADE.XSCAN.IP (MAPCAR MAKESCAN SORT FFETCHFIELD CONS CRITSECT IPLUS -FILLRECTANGLE.IP IDIFFERENCE MAPC IMIN NORMSECT) INTPOWERS (CL:MAKE-ARRAY) MAPPAGES (PAGELOC IPLUS -LLSH \\HILOC LRSH \\LOLOC MKI.NEXTPAGE ADD1) SEDIT::ASSIGN-FORMAT-DOTLIST (MAPC FFETCHFIELD -SEDIT::SET-FORMAT SEDIT::GET-LIST-FORMAT) GO.TO.FREELINE (TTLASTLINE ERASE.TO.END.OF.PAGE) -\\FIND.LOCALPUPHOSTNUMBER (\\LOOKUPPUPNUMBER LRSH LOGAND TERPRI \\PROMPT.FOR.PUP.NUMBER OCTALSTRING) -|\\VFMReadNext| (ILEQ FFETCHFIELD \\BLT MESASIZE \\ADDBASE LOCF IPLUS FREPLACEFIELD) TYPENAME (NTYPX -\\ARRAYTYPENAME \\INDEXATOMPNAME \\GETDTD \\ADDBASE ITIMES FFETCHFIELD) \\LOCKFN (EVQ \\DEFCELL -\\ATOMCELL \\LOCKCODE FFETCHFIELD) ENDPREAMBLE.IP (FFETCHFIELD DREVERSE) \\TEDIT.GET.CHARLOOKS.LIST ( -\\SMALLPIN SUB1 LLSH IDIFFERENCE \\TEDIT.GET.SINGLE.CHARLOOKS LIST PLUS) BKSYSCHARCODE (\\PUTSYSBUF -NCONC \\GETREALSYSBUF FFETCHFIELD \\GETBASEFAT \\GETBASE ADD1 FREPLACEFIELD LIST) RECORD (STKNTHNAME -DECLARERECORD CONS SUB1) CHECKFPTOVP (FFETCHFIELD \\ADDBASE \\GETBASE PLUS) \\NSFILING.GENERATE.STARS -(STRPOS CONCAT SUBSTRING +) \\LOCKCELL (\\LOCKPAGES PAGEBASE \\VAG2 \\HILOC LOGAND \\LOLOC) DWIMIFY ( -DWIMIFY0 OUTPUT RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) -SI::PRINT-TRACE-ENTRY-INFO (DECLARE SPACES CL:* CL:PRINC CL:1+ CHANGEFONT CL:PRIN1 CL:TERPRI) -RPLSTRING (STRINGP MKSTRING FFETCHFIELD \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT %ARRAY-BASE -%ARRAY-OFFSET %ARRAY-TYPE-NUMBER + SUB1 \\ADDBASE \\PUTBASE \\GETBASETHIN \\GETBASEBYTE PLUS) -UPDATE/SHADE/DISPLAY (WINDOWPROP IDIFFERENCE) CLOSERTPSOCKET (CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. - FUNCTION FFETCHFIELD SETUPTIMER \\RTP.ACTION) \\STARTPUP (\\FLUSHPUPSOCQUEUE ASSURE.PUP.READY) -\\DSPSCALE2.IP (CONCATT.IP) CH.FINDSERVER (TYPENAMEP PARSE.NSNAME FFETCHFIELD \\CH.FIND.ORG.SERVER -ERROR FREPLACEFIELDVAL NCREATE CH.FINDSERVER) FASL::DUMP-VALUE-FETCH (FASL::WRITE-OP FASL:DUMP-VALUE) -SPELLFILE (UNPACKFILENAME.STRING GETPROP HOSTNAMEP FIXSPELL INFILEP PACKFILENAME.STRING MKATOM -PACKFILENAME FILEDATE SPELLFILE.MATCHINGDIRS FUNCTION DIRECTORYNAME LISTGET SPELLFILE.SPELL) -ENDPAGE.IP (FFETCHFIELD FREPLACEFIELD) MISSPELLED? (PRINT FIXSPELL) /LISTPUT1 (/NCONC LIST) COMPAREMAX - (IQUOTIENT IDIFFERENCE IPLUS COUNTDOWN) \\#BLOCKDATACELLS (NTYPX \\HILOC IDIFFERENCE \\ADDBASE IMINUS - FFETCHFIELD \\ILLEGAL.ARG \\GETDTD ITIMES HUNKSIZEFROMNUMBER LRSH) \\SMASHABLESTRING ( -%ARRAY-TYPE-NUMBER FFETCHFIELD) FINDFN (STKNTH STKNAME STKARG STKNTHNAME STKARGS GETD GETPROP -REALSTKNTH SELECTQ STKPOS) CLISPCOND1 (CLISPIFY1 FLAST APPEND) CL::%DO-TRANSLATE (CL:MAPCAR CL:FUNCTION - CL:MAPCAN CL:GENSYM CONS CL:APPLY) LISPXPRIN2 (LIST CONS PRIN2) \\NSRANDOM.DESTROY.STREAM ( -\\RELEASECPAGE FFETCHFIELD FREPLACEFIELD \\GETEOFPTR CLOSEF) \\PRINDATUM.TO.STRING (SELECTC NTYPX LIST - GLOBALRESOURCE \\CONVERT.FLOATING.NUMBER \\CONVERTNUMBER RPLSTRING ALLOCSTRING NCHARS GETRESOURCE -NEWRESOURCE CONCAT CL:MAKE-HASH-TABLE FUNCTION CL:FUNCTION) |\\VFMMerge| (\\ALLOCBLOCK LRSH ADD1 -MESASIZE \\BLT |\\VFMGet| LOCF \\ADDBASE FUNCTION FFETCHFIELD) FIND.NEXT.WORD (\\SYNCODE GETHASH -FFETCHFIELD \\GETBASEBYTE BITTEST LOGAND FIRSTCHAR FIND.START.OF.WORD TTNEXTCHAR SUB1VAR) -SHIFT.BITMAP.LEFT (FFETCHFIELD BITMAPCREATE IPLUS) \\RPLCHARCODE (FFETCHFIELD IGEQ %ARRAY-TYPE-NUMBER -\\PUTBASEFAT \\PUTBASE \\PUTBASETHIN \\PUTBASEBYTE %ARRAY-BASE IPLUS %ARRAY-OFFSET SUB1) SAVEPUT (LIST - GETPROPLIST EQUALN CONS) MSMARKCHANGE1 (UNDOSAVE LIST FUNCTION) TEDIT.UNDO.MOVE (FFETCHFIELD IPLUS -FREPLACEFIELD PLUS FRPLACA) COMPAREFAIL (SOME CL:FUNCALL IGREATERP COUNTDOWN SUB1 NLISTP FASSOC EQUAL -NCONC1 CONS) \\TELERAIDRELEASE (FFETCHFIELD) BITMAPTEDITOBJ (IMAGEOBJCREATE CONS) /ADDPROP (LIST -GETPROPLIST CONS /NCONC1) LOADFNS (RESETLST FILEPKGCHANGES FIXSPELL ERROR FMEMB LIST LOADFNS-MAKELIST -LOADFNS-FINDFILE OPENSTREAM INPUT FULLNAME ROOTFILENAME GET-ENVIRONMENT-AND-FILEMAP SELECTQ FILECOMS -DREVERSE) \\LOCKWORDS (\\LOCKPAGES PAGEBASE \\VAG2 \\HILOC LOGAND \\LOLOC FOLDHI LRSH IPLUS) -INSERTHASHKEY (TIMES REHASHFILE SETFILEPTR ADD1 PRINTPTR LOGAND RSH BOUT REPLACEHASHKEY ELT) GNC ( -GNCCODE FCHARACTER) LISPXSPACES (LIST CONS SPACES) GENSYM (STRINGP LITATOM CL:STRINGP FIXP CHARCODEP -ALLOCSTRING NCHARS IDIFFERENCE IPLUS \\GS.INITBUF NTHCHARCODE PLUS ADD1 SUBSTRING MKATOM) -|\\PFRemoveDirectoryID| (NCREATE FFETCHFIELD) FONTPROFILE (CONS ASSOC SELECTQ FONTCLASS) CLISP3C ( -RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION PACK FRPLACD) GNCCODE - (FFETCHFIELD %ARRAY-OFFSET \\GETBASECHAR %ARRAY-TYPE-NUMBER \\GETBASEFAT \\GETBASE %ARRAY-BASE -\\GETBASETHIN \\GETBASEBYTE ADD1 SUB1 LIST NTHCHARCODE) \\SPAWN.CHAT (ADD.PROCESS) GLCCODE (SUB1 -FFETCHFIELD \\GETBASECHAR %ARRAY-TYPE-NUMBER \\GETBASEFAT \\GETBASE %ARRAY-BASE IPLUS %ARRAY-OFFSET -\\GETBASETHIN \\GETBASEBYTE FREPLACEFIELD NTHCHARCODE) \\CONVERTTOFRACTION (FIX FTIMES CONSTANT FLOAT -EXPT IDIFFERENCE CREATECELL) \\LOCKCODE (\\LOCKWORDS UNFOLD LLSH \\#BLOCKDATACELLS) STREQUAL ( -FFETCHFIELD %ARRAY-BASE %ARRAY-OFFSET %ARRAY-TYPE-NUMBER PLUS \\GETBASEBYTE \\GETBASECHAR \\GETBASEFAT - \\GETBASE \\GETBASETHIN) DINFO.WRITE.GRAPH (WRITEFILE LIST FFETCHFIELD) -UPDATE/BM/DISPLAY/SELECTED/REGION (WINDOWPROP FFETCHFIELD BLTSHADE IDIFFERENCE IPLUS) -\\RTP.SHOW.FAILURE (FFETCHFIELD PRIN1 ETHERHOSTNAME LOCF \\ADDBASE FREPLACEFIELD) ASSURE.PUP.READY ( -WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FIND.PROCESS \\CLEAR.ROUTING.TABLE -FFETCHFIELD \\FIND.LOCALPUPHOSTNUMBER IPLUS LLSH SETUPTIMER) SHORTEN (SUBSTRING IMIN NCHARS) -PROCESS.EVALV (\\COERCE.TO.PROCESS FIND.PROCESS THIS.PROCESS \\MYALINK OPCODES FFETCHFIELD -\\GETBASEPTR \\STKSCAN) FASL::SAVE-VALUE (FASL::HANDLE-HASH) CL:1+ (+) SHOW.IP (FFETCHFIELD -\\GETFILEPTR SPREADAPPLY* -) \\TEDIT.GET.PARALOOKS.LIST (\\SMALLPIN SUB1 LLSH IDIFFERENCE -\\TEDIT.GET.SINGLE.PARALOOKS LIST PLUS) CLISPCOND (CONS CLISPCOND1 CLISPIFY2 NCONC APPEND) -GETNODEFROMID (GETHASH ERROR FASSOC) COMPILER::ALPHA-UNWIND-PROTECT (COMPILER::MAKE-UNWIND-PROTECT -COMPILER::ALPHA-LAMBDA CL:GENSYM) \\BSP.HANDLE.INPUT (FFETCHFIELD PUPSOCKETEVENT GETPUP LOCF \\ADDBASE - LIST) L-CASE (WITH-RESOURCE FFETCHFIELD \\PROPCELL \\ATOMCELL CONSTANT %ARRAY-BASE \\PNAMECELL ADD1 -\\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE IPLUS IDIFFERENCE \\PUTBASEFAT \\PUTBASE -\\PUTBASETHIN \\PUTBASEBYTE PLUS CL:SYMBOL-PACKAGE \\MKATOM GETRESOURCE NEWRESOURCE ALLOCSTRING -%ARRAY-TYPE-NUMBER SUB1 %ARRAY-OFFSET \\NSTRINGCHARS CONS L-CASE) /LISTPUT (ERRORX LIST CONS) -SEDIT::LINEARIZE-DOTLIST (SEDIT::OUTPUT-CONSTANT-STRING FFETCHFIELD) LENGTH (ADD1) HASHFILESPLST1 ( -MAPHASHFILE FUNCTION) COMPARE1 (EQUAL COMPAREFAIL) TERM.IDENTIFY.SELF (PRIN3 FORCEOUTPUT FFETCHFIELD) -XCL::WALK-DO* (XCL::WALK-DO/DO*) |\\PFFindDirectoryID| (NCREATE |\\PFFindRootDirEntry|) %SORT-VECTOR ( -VECTOR-LENGTH) |\\VFMLower| (FFETCHFIELD LESSP GREATERP ILESSP MESAEQUAL SUB1 MESASIZE \\GETBASE PLUS) - \\MAKEWRITABLESTRING (%ARRAY-TYPE-NUMBER FFETCHFIELD) OPT.DS1 (OPT.CODEFRAME GETHASH OPT.DEFREFS -OPT.DS1 CONS SUB1) CL:SYMBOL-PACKAGE (\\PNAMECELL \\ATOMCELL FFETCHFIELD CL:AREF) FORWARD.DELETE.TO ( -FRPLACA SEGMENT.BIT.LENGTH IDIFFERENCE) SHIFT.BITMAP.RIGHT (FFETCHFIELD BITMAPCREATE IPLUS) CARET ( -\\CARET.DOWN CARETRATE SELECTQ CONS ERROR LISPERROR) TEDIT.UNDO.REPLACE (FFETCHFIELD FRPLACA IPLUS) >= - (CL::%COMPARISON-MACRO) \\10MBRAWENCAPSULATE (IPLUS FOLDHI LRSH LOCF \\ADDBASE \\BLTLOCALHOSTNUMBER -\\BLT) SEDIT::CFV-DOTLIST (FFETCHFIELD CHARWIDTH ITIMES FREPLACEFIELD IPLUS SUB1 PLUS IMAX) -%MAKE-STRING-ARRAY-FAT (+ FFETCHFIELD %MAKE-ARRAY-STORAGE FREPLACEFIELD) DUMPINITPAGES (PAGELOC IPLUS -LLSH \\HILOC LRSH \\LOLOC SUB1 PLUS ADD1 FUNCTION \\GETBASE .PAGEMAPBASE. \\ADDBASE LOGAND OUTPUT -OPENFILE CLOSEF DUMPVP) CLISP4 (GETPROP STRPOSL NTHCHAR ADD1 DWIMIFY0? STKPOS APPLY STKARGS STKEVAL) -\\FM.STATE-SELECTEDFN (LIST \\FM.ITEMPROP LISTGET FFETCHFIELD MENU APPLY* \\FM.STATE-CHANGESTATE) -FILL.LINE (IDIFFERENCE IPLUS \\LINEBLT FFETCHFIELD) MSSTOREDATA (PARSERELATION MSCOLLECTDATA -TESTRELATION FASSOC) \\FM.FORMATBYROW (CREATEREGION LIST DREVERSE \\FM.LAYOUTROW \\FM.DTOPGROUPID -REVERSE \\FM.DTOPGROUPPROP LISTGET PLUS CONS \\FM.MAKEGROUP) CL:COMPILE (COMPILER::MAKE-ENV -CL:MAKE-HASH-TABLE LIST COMPILER::RAW-COMPILE CL:SYMBOL-FUNCTION) \\10MBRAWRECEIVE (FFETCHFIELD -\\10MB.GETPACKETSTATUS \\10MB.GETPACKETLENGTH LOCF \\ADDBASE) BMOBJ.DISPLAYFN (IMAGEOBJPROP DSPSCALE -IMAGESTREAMTYPE IMINUS FIXR FTIMES NUMBERP ASSOC SHRINKBITMAP FQUOTIENT EXPANDBITMAP DSPXPOSITION -DSPYPOSITION BITMAPWIDTH BITMAPHEIGHT) \\TEDIT.CENTER.SEL (FFETCHFIELD \\PARAS.IN.SEL -TEDIT.GET.PARALOOKS LISTGET MEMB CONSTANT TEDIT.SETSEL CONS DREVERSE) \\LEAF.REQUESTPAGE ( -\\LEAF.LOOKUPCACHE FREPLACEFIELD IPLUS16 \\LOLOC \\ADDBASE FFETCHFIELD PLUS ALLOCATE.PUP LOCF LLSH -IPLUS UNFOLD) CL:FUNCALL (CL:APPLY) DEFAULT.INSPECTW.TITLECOMMANDFN (SELECTQ MENU FREPLACEFIELDVAL -NCREATE CONS INSPECTW.REDISPLAY WINDOWPROP PROMPTPRINT) GETPROBE (FNTH ADD1 LOGAND NTHCHARCODE LRSH -NCHARS) TERM.GODOWN (\\DTEST FFETCHFIELD + MOVETO IMAX - ITIMES FREPLACEFIELD) XCL::WALK-DO ( -XCL::WALK-DO/DO*) TB.MAP.DELETED.ITEMS (\\DTEST FFETCHFIELD CL:FUNCALL) |\\LFPutDirectory| (SETA FIXP -|\\PFVolumeNumber|) \\LOCKVAR (\\LOCKCELL EVQ \\VALCELL \\ATOMCELL) WINDOWWORLDP (\\INSURESCREEN -FFETCHFIELD) OPT.DEADSETQP (SELECTQ OPT.DS1) ADDPME (\\GETBASE LRSH \\ADDBASE IGREATERP PAGELOC IPLUS -LLSH \\HILOC \\LOLOC LOGAND .LOCKEDVPBASE. FOLDLO LOGOR .LOCKEDVPMASK. IMOD ADD1) \\POLYSHADE.DISPLAY -(FILL.INITTBLE MAPCAR MAKESCAN SORT FFETCHFIELD CONS CRITSECT ADD1 FILL.LINE MAPC IPLUS IMIN -\\NORMSECT FREPLACEFIELD) GET.MENU.LIST (CL:ARRAY-RANK CL:ARRAY-DIMENSIONS) -\\TEDIT.CHARLOOKSMENU.CREATE (\\TEXTMENU.DOC.CREATE APPEND LIST CONS FONTCREATE) COMPILER::ALPHA-THROW - (COMPILER::MAKE-THROW COMPILER::ALPHA-ARGUMENT-FORM COMPILER::ALPHA-FORM) \\DEFAULTSTATE.IP (ISET.IP) - CLOSEMAINWINDOW (WINDOWPROP) FASL::LOOKUP-VALUE (FASL::HANDLE-HASH GETHASH) CLEAR-CLISPARRAY (SELECTQ - CLRHASH) CONCAT.IP (APPENDOP.IP) \\PUTBASESTRINGFAT (UNFOLD LLSH SUB1 \\PUTBASEBYTE ADD1 -\\GETBASETHIN \\GETBASEBYTE IPLUS PLUS) \\BSP.DEFAULT.ERROR.HANDLER (ERROR CONCAT) -\\TEDIT.FOREIGN.COPY? (FFETCHFIELD PROCESSPROP TTY.PROCESS WINDOWPROP WFROMDS PROCESS.TTY -OBJECTOUTOFTEDIT \\BIN CHARACTER PLUS) \\DURATIONTRAN (\\CLISPKEYWORDPROCESS CONSTANTEXPRESSIONP -|\\CanonicalizeTimerUnits| LIST TYPENAMEP EVAL LISTGET GETDEF CONS SUBPAIR GETPROP) GETHASHKEY ( -MAKEHASHKEY BIN READPTR IPLUS LLSH READ GETPROBE REHASHKEY ITIMES IMOD IQUOTIENT IMINUS ELT) -|GetBcplString| (\\GETBASEBYTE \\MKATOM \\GETBASESTRING MKATOM) XCL::WALK-DECLARATIONS (XCL::RECONS -XCL::WALK-DECLARATIONS CL:MACROEXPAND-1 CL:FUNCALL) ERROR (ERRM-TO-CONDITION CONS ERROR! ERRORX) -|\\PFInsertDirectoryID| (NCREATE |\\PFSaveBuffers|) WAKE.MY.PROCESS (WAKE.PROCESS WINDOWPROP) -\\FM.FORMATBYCOLUMN (CREATEREGION LIST \\FM.LAYOUTCOLUMN \\FM.DTOPGROUPID COPY \\FM.DTOPGROUPPROP -LISTGET PLUS \\FM.DGROUPPROP FASSOC \\FM.PUSHGROUP IDIFFERENCE CONS \\FM.MAKEGROUP) |\\LFFileSpec| ( -|\\LFUnpackName| |\\LFFindDirectory| |\\LFVersions| SELECTQ LAST LIST ADD1 ASSOC FIXP FRPLACA CONS) -MAKEROOMFORPME (\\GETBASE LRSH \\ADDBASE IPLUS) NTHCHAR (NTHCHARCODE FCHARACTER) -\\FM.STATE-CHANGESTATE (FFETCHFIELD LISTGET \\FM.ITEMPROP FM.CHANGELABEL) \\FM.STATE-SETUP ( -\\FM.ITEMPROP FFETCHFIELD FUNCTION LISTGET APPLY FREPLACEFIELDVAL NCREATE CONS) FILL.INITTBLE ( -FFETCHFIELD NCREATE SUB1 BITMAPP COLORTEXTUREFROMCOLOR# COLORNUMBERP DSPCOLOR BITMAPCREATE -|\\SFReplicate| LOGOR LLSH LOGAND LRSH \\ILLEGAL.ARG UNFOLD IMIN SELECTQ FREPLACEFIELD \\DSPTRANSFORMX - IPLUS \\DSPTRANSFORMY |\\SFInvert| IDIFFERENCE DSPDESTINATION \\TOTOPWDS) SPY.BUTTON (CREATEREGION -WIDTHIFWINDOW BITMAPWIDTH HEIGHTIFWINDOW BITMAPHEIGHT GETBOXREGION CREATEW FUNCTION) TRACEREGION (CONS -) \\10MBRAWTRANSMIT (LOCF \\ADDBASE IMAX FFETCHFIELD \\10MB.GETPACKETSTATUS) BMOBJ.IMAGEBOXFN ( -IMAGEOBJPROP DSPSCALE IMAGESTREAMTYPE NUMBERP ASSOC FIXR FTIMES TIMES BITMAPWIDTH BITMAPHEIGHT CONS) -\\LEAF.LOOKUPCACHE (FFETCHFIELD PLUS LIST CONS) EDITBMRESHAPEFN (WINDOWPROP FFETCHFIELD IMAX -IDIFFERENCE IPLUS IQUOTIENT IMIN ITIMES CONS QUOTIENT TIMES CREATEREGION MINUS BITMAPWIDTH -BITMAPHEIGHT BITMAPCREATE) \## (EVQ EDITL0) \\FM.NWAY-SETUP (\\FM.ITEMPROP FFETCHFIELD FUNCTION -LISTGET) OPT.DELCOPYFN (GETHASH) DO.EDIT.PP (RETYPE.BUFFER WITH-RESOURCES COPY.SEGMENT BEEP TTSKIPSEPR - TTYIN.READ FRPLACA LIST TTYIN.PPTOFILE GETRESOURCE NEWRESOURCE MAKE-TTSCRATCHFILE) \\DOHARDRETURN ( -FFETCHFIELD) \\DOHARDRETURN1 (FFETCHFIELD ADDSTACKBASE \\VAG2 IDIFFERENCE FLOOR LOGAND CONSTANT LOGXOR - SUB1 IPLUS PLUS \\FREESTACKBLOCK IMOD -) \\SETARG0 (\\MYALINK OPCODES ADDSTACKBASE \\VAG2 IDIFFERENCE - FFETCHFIELD FOLDLO LRSH \\PUTBASEPTR IPLUS UNFOLD LLSH SUB1 LISPERROR) SEDIT::SET-LIST-FORMAT ( -CL:GETHASH REMHASH) TEDIT-BOOK (OPENTEXTSTREAM MKATOM TEXTOBJ FFETCHFIELD TEDIT.INCLUDE PACK* CLOSEF) -\\FM.FORMAT (MAPC SELECTQ LISTGET APPLY* PLUS \\FM.MAKE-GROUP-ID CONS LIST LISTPUT IPLUS -\\FM.FORMATBYROW \\FM.FORMATBYCOLUMN \\FM.FORMATBYGRID \\FM.FORMATEXPLICIT \\FM.DTOPGROUPPROP FRPLACA -ITIMES) |SetBcplString| (NCHARS) TITLEW.BUTTONEVENTFN (MAINWINDOW WINDOWPROP XCL::PROFILIZE CL:PROGV -XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES APPLY*) EDITBMREPAINTFN (WINDOWPROP + BITBLT) -ICONBUTTONEVENTFN (LOGAND CURSOR MOVEW) COMPILER::ALPHA-TAGBODY (COMPILER::MAKE-TAGBODY) DOSLINKER ( -MAPC PRINTOUT L-CASE SHORTEN UNPACKFILENAME.STRING TERPRI) BQUOTIFY (SELECTQ LIST MAPCONC BQUOTIFY -APPEND CONS) ENDMASTER.IP (APPENDOP.IP) SEDIT::CLOSE-NODE (FREPLACEFIELD) ERASE/GRAPHNODE (ZEROP -BITBLT IPLUS GN/LEFT GN/BOTTOM) /LCONC (LAST CONS /RPLNODE /RPLACD) CHECKIFPAGE (CHECKIF FFETCHFIELD -|printout| TERPRI) MAKETEDITFORM (MAKEXXXSUPPORTFORM) \\NSRANDOM.REESTABLISH (FFETCHFIELD LIST -\\NSFILING.GETFILE \\GETACCESS) XCL::ADD-WHERE-IS-DATABASE (PATHNAME) \\DECUSECOUNT (FFETCHFIELD -ADDSTACKBASE \\VAG2 PLUS IDIFFERENCE FLOOR LOGAND CONSTANT LOGXOR SUB1 IPLUS) U-CASEP (FFETCHFIELD -\\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE -SUB1 %ARRAY-OFFSET %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER U-CASEP) \\EDITBMHOWMUCH (MENU FFETCHFIELD -FREPLACEFIELDVAL NCREATE CONS) DO.EDIT.COMMAND (IMINUS U-CASECODE TTNEXTLINE TTNTH PREVLINE TTNLEFT -PREVWORD FIND.NEXT.WORD SUB1VAR TTLASTLINE NTH.COLUMN.OF EDITCOLUMN IMIN IPLUS TTBIN TTSKREAD -TTNEXTCHAR BACKSKREAD \\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE BITTEST LOGAND FIRSTCHAR FMEMB PLUS -SEGMENT.BIT.LENGTH IDIFFERENCE NTH ADD1 TTBITWIDTH CURRENT.WORD TTRATOM EDITNUMBERP ITIMES) UNDONLSETQ - (LISTGET1 LIST RESETVARS .RESETLST. CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION ERRORSET) -POP-IP-STACK (STREAMPROP ERROR) \\PUTBASESTRING (\\PUTBASESTRINGFAT %ARRAY-BASE FFETCHFIELD -%ARRAY-OFFSET %ARRAY-TYPE-NUMBER SUB1 IPLUS ADD1 \\GETBASEFAT \\GETBASE PLUS \\PNAMECELL \\ATOMCELL -\\PROPCELL CONSTANT \\PUTBASESTRING MKSTRING) MISCN-NUMBER (ASSOC ERROR) CLIPRECTANGLE.IP (APPENDOP.IP -) CLISP3 (GETPROP CLISPIFY2C LIST ARGTYPE GETP CONS CLISPIFY1 SHOULDNT CLISP3A) \\DOSTACKOVERFLOW ( -FFETCHFIELD \\SETUPUSERSTACK \\MOVEFRAME) \\GETINTEGERPART (LOGAND FFETCHFIELD CONSTANT LLSH -IDIFFERENCE ADD1 LRSH EXPT SUB1 IPLUS) \\DSPTRANSLATE.IP (CONCATT.IP) LISPFORM.SIMPLIFY (GETMACROPROP -MACROEXPANSION LISPFORM.SIMPLIFY GETHASH CONSTANTEXPRESSIONP KWOTE) \\INCUSECOUNT (FFETCHFIELD -ADDSTACKBASE \\VAG2 FREPLACEFIELD PLUS IDIFFERENCE) CL:PRINT (TERPRI CL:PRIN1) CLISPIFY2D (NTHCHAR) -SAVESETQ (SAVESET APPLY) GET.EDIT.BITMAP.MENU (FREPLACEFIELDVAL NCREATE CONS) \\GATHER-CLEANUP-FORMS ( -FFETCHFIELD \\GATHER-CLEANUP-FORMS1) \\GET-MY-BF (- \\MYALINK OPCODES) \\3MBRAWRECEIVE (\\READRAWPBI -LOCF \\ADDBASE ADD1 FFETCHFIELD) \\TEDIT.BOLD.CARET.ON (\\TEDIT.PARSE.CHARLOOKS.LIST FFETCHFIELD) -\\INIT-MISCN-TABLE (ARRAY FFETCHFIELD \\ADDBASE2 \\ADDBASE FREPLACEFIELD) CREATEARRAYSLICE ( -CL:ARRAY-RANK CL:ARRAY-DIMENSIONS REVERSE CONS ITIMES IPLUS DREVERSE %FLATTEN-ARRAY FREPLACEFIELDVAL -NCREATE) COMPILER::ALPHA-SETQ (MAPLIST COMPILER::MAKE-SETQ COMPILER::RESOLVE-VARIABLE-REFERENCE -COMPILER::ALPHA-ARGUMENT-FORM COMPILER::MAKE-PROGN) CH.RETRIEVE.DOMAIN.ACL (CH.GETAUTHENTICATOR -COURIER.CALL CH.FINDSERVER PARSE.NSNAME COURIER.FETCH) CONDITIONS::%RESTART-DEFAULT-REPORTER (CL:FUNCALL -) BOUNDP (\\GETBASEPTR \\STKSCAN) CLISP3B (CLSTOPSCAN? ILESSP) \\EXTENDSTACK (FFETCHFIELD \\DONEWPAGE -ADDSTACKBASE \\VAG2 IPLUS IDIFFERENCE) \\FM.FORMATBYGRID (CREATEREGION LIST TCONC REVERSE -\\FM.LAYOUTGRID \\FM.DTOPGROUPID \\FM.DTOPGROUPPROP LISTGET PLUS DREVERSE \\FM.DGROUPPROP FASSOC FMEMB - LAST IDIFFERENCE \\FM.ITEMPROP FFETCHFIELD FRPLACA IPLUS CONS \\FM.MAKEGROUP) CODE.SUBST (SUBST) -FINDATOM (FMEMB STKNAME SELECTQ SYSTEMTYPE REALSTKNTH BLIPVAL FGETD HELP SOME STKARG TAILP FSTKNTH) -COMPILER::FIND-REACHABLE-TAGS (CL:MAKE-HASH-TABLE) \\TEDIT.PRESS.HARDCOPY (OPENTEXTSTREAM MKATOM -RESETLST RESETSAVE \\TEDIT.MARKACTIVE TEXTOBJ FREPLACEFIELD TEDIT.FORMAT.HARDCOPY CLOSEF?) -CODE.SUBPAIR (SUBPAIR) NO.SIDEEFFECTS.FNP (LITATOM GETPROP FMEMB) COURIER.CALL (ARG -\\GET.COURIERPROGRAM GETHASH ERROR \\GET.COURIER.DEFINITION LENGTH SELECTQ - + CONS LIST PLUS -COURIER.EXECUTE.CALL RESETLST COURIER.OPEN \\ILLEGAL.ARG) /ECHOMODE (ECHOMODE LIST) -\\FM.3STATE-CHANGESTATE (FFETCHFIELD SELECTQ \\FM.ITEMPROP LISTGET) ED (CONS CL:APPEND CL:MEMBER -GETFILEPKGTYPE LIST TYPESOF CL:FUNCTION GETPROPLIST INSTALL-PROTOTYPE-DEFN MENU CL:FORMAT -FREPLACEFIELDVAL NCREATE ASKUSER) GETDUMMYVAR (RPLACD LIST GENSYM CONS) MISCN-COLLECT (- \\GETBASEPTR -LLSH LIST PLUS) \\VARNOTUSED (\\VARNOTUSED.LIST MEMB \\VARNOTUSED \\WALKOVER.SPECIALFORMS FUNCTION) -\\GCSCANSTACK (FFETCHFIELD ADDSTACKBASE \\VAG2 OPCODES IPLUS \\STKREF \\ADDBASE UNFOLD LLSH ADD1 PLUS) - CL:FORMAT (CL:MACROLET GETSTREAM SUB-FORMAT CL:LENGTH) FIND1STPRIME (LOGOR IREMAINDER ITIMES PLUS) -ARGS.COMMUTABLEP (LITATOM LISPFORM.SIMPLIFY ARGS.COMMUTABLEP.LIST MEMB \\WALKOVER.SPECIALFORMS -FUNCTION) TERM.ERASE.IN.DISPLAY (FFETCHFIELD SELECTQ TERM.ERASEBITS - + MOVETO) TB.ITEM.DELETED? ( -\\DTEST FFETCHFIELD) ARGS.COMMUTABLEP.LIST (EVERY ARGS.COMMUTABLEP) |\\LFFullFileName| (PACKFILENAME -U-CASE |\\PFGetVol| |\\PFFetchString| LOCF \\ADDBASE |\\LFFileName|) CL:SYMBOL-NAME (%MAKE-ONED-ARRAY -FFETCHFIELD \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT CL:ERROR) INSPECT/ATOM (TYPESOF CCODEP -MAKE-INSPECTOR-PROFILE CONS EVALV REMOVE PRIN1 INSPECT SELECT.ATOM.ASPECT SELECTQ MENU -FREPLACEFIELDVAL NCREATE EVAL.AS.PROCESS.WITH.PROFILE EVAL.AS.PROCESS LIST INSPECTCODE) -EVALUABLE.CONSTANT.FIXP (FIXP EVALUABLE.CONSTANTP) UNIX-STREAM-IN (UNIX-PEEKEDCHAR FFETCHFIELD -UNIX-READ) CL:MAKUNBOUND (CL:PROCLAIM SET) \\SETUPUSERSTACK (\\MAKEFRAME FUNCTION FFETCHFIELD -ADDSTACKBASE \\VAG2 ADD1 IDIFFERENCE FOLDLO LRSH) \\MENUSUBITEMS (APPLY* FFETCHFIELD FUNCTION) -EDIT.BITMAP.REAL (BITMAPCOPY GET.EDIT.BITMAP.MENU MENU PRIN1 CONS SELECTQ EDITBM FROM.SCREEN.BITMAP -TRIM.BITMAP INVERT.BITMAP.HORIZONTALLY INVERT.BITMAP.VERTICALLY INVERT.BITMAP.DIAGONALLY -ROTATE.BITMAP.LEFT ROTATE.BITMAP.RIGHT INTERACT&SHIFT.BITMAP.LEFT INTERACT&SHIFT.BITMAP.RIGHT -INTERACT&SHIFT.BITMAP.DOWN INTERACT&SHIFT.BITMAP.UP INVERT.BITMAP.B/W INTERACT&ADD.BORDER.TO.BITMAP -ERROR) COMPILER::ALPHA-RETURN-FROM (CL:ASSOC COMPILER::MAKE-RETURN COMPILER::BLOCK-CONTEXT -COMPILER::ALPHA-FORM) HELPSYS (SELECTQ IRM.LOOKUP GETPROP BEEP) %MAKE-ONED-ARRAY ( -%CML-TYPE-TO-TYPENUMBER %MAKE-ARRAY-STORAGE FREPLACEFIELDVAL NCREATE) \\TELEBLTCURSOR ( -|\\DoveDisplay.SetCursorShape|) SEDIT::STRINGIFY (CL:FUNCALL FFETCHFIELD) \\TEDIT.BOLD.CARET.OFF ( -\\TEDIT.PARSE.CHARLOOKS.LIST FFETCHFIELD) EVALUABLE.CONSTANTP (CONSTANTEXPRESSIONP LISPFORM.SIMPLIFY -LITATOM MEMB FUNCTION LIST EVAL EVALUABLE.CONSTANTP APPLY CONS APPEND KWOTE CODE.SUBPAIR) /DREVERSE ( -/RPLACD) \\D0.STARTIO (OPCODES) \\CREATE.TITLEMENU (FREPLACEFIELDVAL NCREATE CONS) OPT.EQVALUE ( -SELECTQ OPT.SKIPPUSH) \\SPP.RESETCLOSE (SPP.CLOSE) FILEBLOCKTRAILER (BOUT16) DELETEHASHKEY (SETFILEPTR - PRINTPTR LOGAND RSH SUB1 BOUT PRINTSTBYTE FORCEOUTPUT ELT SETA) \\WALKOVER.SF.LIST (EVERY APPLY*) -XCL::WALK-BINDINGS-2 (XCL::RECONS XCL::RELIST* WALK-TEMPLATE XCL::WALK-BINDINGS-2) TB.ITEM.SELECTED? ( -\\DTEST FFETCHFIELD) |\\LFFindDirectory| (|\\LFFindDirectoryVol| |\\LFDirectoryP|) TEDITWINDOWP ( -WINDOWP WFROMDS WINDOWPROP FFETCHFIELD) \\WALKOVER.FUNCTION (APPLY* LIST) |\\LFGetDirectory| (ELT FIXP - |\\PFVolumeNumber|) ARRAY (FIX SELECTQ FOLDHI LRSH IPLUS UNFOLD LLSH FLOAT \\ILLEGAL.ARG LISPERROR -\\ALLOCBLOCK FREPLACEFIELDVAL NCREATE FFETCHFIELD SUB1 \\ADDBASE LIST \\RPLPTR FEQP) TILEAREA ( -BLTPATTERN.REPLACEDISPLAY BITMAPWIDTH BITMAPHEIGHT) DELETE.TO.END (FRPLACD FRPLACA) SCALE/TONODES ( -MAPCAR APPEND LISTGET FIX/SCALE) IP-TOS (STREAMPROP ERROR) SETA (\\DTEST FFETCHFIELD IDIFFERENCE IPLUS - SELECTC LIST \\RPLPTR \\ADDBASE2 \\ADDBASE \\PUTBASEFIXP \\PUTBASEBYTE \\PUTBASE FOLDLO LRSH LOGAND -\\GETBASE LOGXOR LLSH SUB1 IMOD LOGOR \\PUTBASEFLOATP UNFOLD FLOAT LISPERROR) BEGINPREAMBLE.IP ( -FFETCHFIELD FREPLACEFIELD) \\SETUPGUARDBLOCK (ADDSTACKBASE \\VAG2) \\WALKOVER.SPECIALFORMS (SELECTQ -EVERY \\WALKOVER.SF.LIST LAST \\WALKOVER.FUNCTION APPLY* SHOULDNT) \\ALLOCHEIGHTTOGROUPEDWINDOW ( -MAPCAR LIST IDIFFERENCE \\TOTALFIXEDHEIGHT PLUS \\SETWINFOYSIZE \\SHAREOFXTRAY APPLY UPIQUOTIENT -LENGTH REMOVE IMAX FRPLACD) \\EDITBM/PUTUP/DISPLAY (UPDATE/BM/DISPLAY BITBLT WINDOWPROP) DELETETO1 ( -BLTCHAR TTYDISPLAYSTREAM SUB1) CLOSEICONWINDOW (WINDOWPROP) \\POPSTATE.IP (IP-TOS APPENDOP.IP) GET ( -CL:GETF GETPROPLIST) \\VARNOTUSED.LIST (EVERY \\VARNOTUSED) SI::NON-LOCAL-RETURN (ARG CL:VALUES-LIST -LIST PLUS CL:ERROR) \\ALLOCWIDTHTOGROUPEDWINDOW (MAPCAR LIST PLUS \\SETWINFOXSIZE \\SHAREOFXTRAX APPLY - IDIFFERENCE UPIQUOTIENT LENGTH REMOVE IMAX FRPLACA) \\MOVEFRAME (FFETCHFIELD ADDSTACKBASE \\VAG2 + -PLUS \\FREESTACKBLOCK IDIFFERENCE IMOD -) \\CLIPANDDRAWLINE1 (FFETCHFIELD LRSH IDIFFERENCE -DSPDESTINATION \\GETBASE \\TOTOPWDS SUB1 |\\SFInvert| IMINUS \\CLIPCODE LOGAND IPLUS .WHILE.TOP.DS. -IREMAINDER ITIMES \\LEASTPTAT \\GREATESTPTAT) HASHFILEDATA (GTHASHFILE LIST ELT) -\\TEDIT.MARK.LINES.DIRTY (IMIN FFETCHFIELD ADD1 WINDOWPROP) XCL::WALK-BINDINGS-1 (XCL::RECONS -XCL::RELIST* WALK-FORM-INTERNAL XCL::WALK-BINDINGS-1) \\INIT-USER-SUBR-TABLE (ARRAY MAPC SETA) -|\\LFUnpackName| (|\\LFParseFileName| |\\LFFindDirectoryVol| SUB1 %ARRAY-OFFSET FFETCHFIELD -%ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE -\\LFCASEARRAYFETCH LIST FIXP SELECTQ |\\PFVolumeNumber| CONS) \\UNDEFINED-MISCN-UFN (TERPRI ERROR -CL:FORMAT MISCN-COLLECT) |\\LFReadFileID| (BIN \\LFDWIN) OPT.JUMPCOPYTEST (OPT.SKIPPUSH SUB1 -OPT.JUMPCOPYTEST) DOICONWINDOWCOM (MENU CONS FUNCTION FREPLACEFIELDVAL NCREATE) CL:REMOVE (CL:LENGTH -COMPLEX-REMOVE SIMPLE-REMOVE) FROM.SCREEN.BITMAP (PRIN1 GETSCREENREGION BITMAPCREATE BITSPERPIXEL -SCREENBITMAP) COMPILER::ALPHA-PROGV (COMPILER::MAKE-PROGV COMPILER::ALPHA-ARGUMENT-FORM COMPILER::ALPHA-PROGN -) FASL::ELEMENTS-IDENTICAL-P (%FLATTEN-ARRAY CL:AREF CL:EVERY CL:FUNCTION) CL:FIND (CL:LENGTH -COMPLEX-FIND SIMPLE-FIND) \\3MBRAWTRANSMIT (\\DTEST UNINTERRUPTABLY \\GETPACKETBUFFER LOCF \\ADDBASE -ADD1 FFETCHFIELD) SEDIT::COPY-SELECTION (FFETCHFIELD |printout| PRIN1 SEDIT:GET-PROMPT-WINDOW -GETPROMPTWINDOW) \\TEDIT.BOLD.SEL.ON (TEDIT.LOOKS) \\LEAF.ADD.QUOTES (STRPOS CONS SUBSTRING ADD1 SUB1 -NCHARS CONCATLIST DREVERSE) /DELETECONTROL (GETTERMTABLE LIST DELETECONTROL) ADD-USER-SUBR (DECLARE -\\INIT-USER-SUBR-TABLE FASSOC CL:REMOVE ELT CL:FUNCTION LIST) CL:SYMBOL-FUNCTION (GETD CL:MACRO-FUNCTION - CONS CL:SPECIAL-FORM-P CL:ERROR) \\DEVICE.OUTPUT (OPCODES) CLISPIFY2C (CLISPIFY1 GETPROP CONS) -CL:FMAKUNBOUND (CL:SYMBOL-FUNCTION CL:MACRO-FUNCTION REMPROP) \\DELETETREE (UNINTERRUPTABLY -FFETCHFIELD LLSH SUB1 \\GETBASEPTR PLUS \\ADDBASE IDIFFERENCE IPLUS \\GETBASEFIXP FREPLACEFIELD) -\\FM.3STATE-DOWNFN (SELECTQ \\FM.ITEMPROP FFETCHFIELD \\FM.DISPLAYBITMAP LISTGET BITBLT) CL:THROW ( -CL:THROW \\EVAL) TERM.CLEAR.TAB (\\DTEST DREMOVE FFETCHFIELD FREPLACEFIELD) XCL::WALK-ARGLIST (CL:MEMBER - CL:FUNCTION XCL::RECONS XCL::WALK-ARGLIST XCL::RELIST* WALK-FORM-INTERNAL CL:ERROR) CLISPIFY2 (STKPOS - CLISPIFY2B) TB.UNSELECT.ALL.ITEMS (\\DTEST FFETCHFIELD TB.ITEM.UPDATABLE? TB.NTH.ITEM PLUS ADD1 -FREPLACEFIELD) \\DECL.COMNT.PROCESS (CONS) \\FM.3STATE-SELECTEDFN (SELECTQ \\FM.ITEMPROP FFETCHFIELD -\\FM.3STATE-CHANGESTATE) |\\LFOpenOldFile| (NCREATE FREPLACEFIELDVAL FUNCTION |\\PFFindFileSize| -|\\PFFindPageAddr| FFETCHFIELD SUB1) OPT.EQOP (SELECTQ EQUAL OPT.EQOP) \\FM.3STATE-SETUPOFFBITMAP ( -\\FM.ITEMPROP LISTGET FFETCHFIELD COPY \\FM.GETREGIONS \\FM.MAKEBITMAP LIST EXTENDREGION BITMAPCOPY -IDIFFERENCE ITIMES DSPCREATE SUB1) SI::INTERNAL-THROW-VALUES (CL:VALUES-LIST CL:ERROR) -USER-SUBR-NUMBER (ASSOC ERROR) OPT.PRATTACH (GETHASH CONS FRPLACD) \\CREATE.SETABLEMENU ( -FREPLACEFIELDVAL NCREATE CONS) FINDPCNODE (FFETCHFIELD) SI::PVAR-VALUE-IN-FRAME (FFETCHFIELD -ADDSTACKBASE \\VAG2 GETSTKNAMEENTRY NTSLOT-VARTYPE GETSTKNTOFFSETENTRY + IPLUS UNFOLD LLSH -NTSLOT-OFFSET LOGAND PLUS WORDSPERNTOFFSETENTRY WORDSPERNAMEENTRY) ICONPOSITION.FROM.WINDOW (POSITIONP - WINDOWPROP FFETCHFIELD IDIFFERENCE IPLUS IMAX IMIN CONS) \\CREATE.INSPECTABLEMENU (FREPLACEFIELDVAL -NCREATE CONS) COMPILER::ALPHA-PROGN (COMPILER::ALPHA-FORM COMPILER::MAKE-PROGN MAPLIST) -SI::UNWIND-TO-BLIP (\\MYALINK OPCODES IDIFFERENCE ADDSTACKBASE \\VAG2 FFETCHFIELD \\GETBASEPTR + IPLUS - SI::VARIABLE-NAME-IN-FRAME SMALLP SI::PVAR-VALUE-IN-FRAME) \\UNDEFINED-USER-SUBR-UFN (ERROR CL:FORMAT - MISCN-COLLECT) FASL:CLOSE-FASL-HANDLE (BOUT FASL::HANDLE-STREAM FASL::HANDLE-STATE CL:APPLY) /CONTROL - (CONTROL LIST) \\BSP.CLOSE.OPEN.SOCKETS (MAPC FFETCHFIELD LIST BLOCK) MAKE-NETWORK-TRACE-WINDOW ( -EVALV WINDOWPROP WFROMDS CREATEW CONS FUNCTION FONTCREATE SET) SI::NON-LOCAL-GO (SI::UNWIND-TO-BLIP -ADDSTACKBASE \\VAG2 CL:ERROR) ELT (FFETCHFIELD IDIFFERENCE IPLUS SELECTC LIST \\GETBASEPTR \\ADDBASE2 -\\ADDBASE \\MAKENUMBER \\GETBASE \\GETBASEBYTE LOGAND LRSH FOLDLO SUB1 IMOD \\GETBASEFLOATP UNFOLD -LLSH LISPERROR) VAR.NOT.USED (ERRORX \\VARNOTUSED) \\TELERAIDEXIT (FFETCHFIELD \\ADDBASE \\KEYBOARDON) - \\TEDIT.BOLD.SEL.OFF (TEDIT.LOOKS) \\DISCARDFRAME (UNINTERRUPTABLY IDIFFERENCE FLOOR LOGAND -FFETCHFIELD ADDSTACKBASE \\VAG2 CONSTANT LOGXOR SUB1 IPLUS PLUS) SETF-SYMBOL-FUNCTION (VIRGINFN PUTD -GETD) INSPECT/BITMAP (SELECTQ MENU FREPLACEFIELDVAL NCREATE CONS INSPECT/DATATYPE EVAL.AS.PROCESS LIST -) UNIX-STREAM-PEEK (UNIX-PEEKEDCHAR FFETCHFIELD UNIX-READ) DECODE/WINDOW/OR/DISPLAYSTREAM ( -DISPLAYSTREAMP FFETCHFIELD EVALV SET CREATEW ERROR LIST) SI::NON-LOCAL-RETURN-VALUES (CL:VALUES-LIST -CL:ERROR) CL:SYMBOL-VALUE (\\EVAL CL:ERROR) CL:FIND-SYMBOL (DECLARE \\SIMPLE-STRINGIFY FIND-SYMBOL* -%ARRAY-BASE FFETCHFIELD %ARRAY-OFFSET %ARRAY-TYPE-NUMBER) EDITBMCLOSEFN (WINDOWPROP) CURRENT.WORD ( -\\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE FIRSTCHAR LIST LOGAND TTNEXTCHAR) SCALE/GRAPHNODE/BORDER ( -FIXR FTIMES CONS) CLISPIFY1 (NLEFT LAST NCONC FLAST LIST NTHCHARCODE CLISPIFY2 LDIFF NCONC1) -SUBRNUMBER (ASSOC CL:ASSOC FUNCTION CL:WARN ERROR) \\TEDIT.SHOWSELS (MAPC LIST FFETCHFIELD \\SHOWSEL) -PROCESSPROP (ARG FIND.PROCESS SELECTQ FFETCHFIELD LISTGET \\INSUREWINDOW \\ILLEGAL.ARG LIST) WTFIX1 ( -CL:CATCH XNLSETQ SETUPTIMER CLOCK STKPOS CONS FINDFN FSTKNTH GETVARS LISTGET1 DUNPACK FMEMB NTHCHAR -PACK LIST LITATOM FREEVARS CLISPDEC0 GETPROP RESETVARS .RESETLST. CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION CLISPFOR RETDWIM CLISPIF MAKEMATCH APPEND APPLY* GETD CLISPATOM EVAL -FIXSPELL SELECTQ CL:THROW) LIST (CONS ARG SUB1) PRINTCURSOR (EVALV TERPRI FFETCHFIELD) CL:SYMBOLP ( -LITATOM) BREAKLINE (FRPLACA INSERTLINE) COMPILER::ALPHA-MV-PROG1 (COMPILER:CONTEXT-VALUES-USED -COMPILER::ALPHA-FORM CONS COMPILER::MAKE-MV-PROG1 CL:FIRST CL:MAPCAR CL:FUNCTION CL:REST) CLDISABLE ( -L-CASE GETP SELECTQ GETPROP RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION /SETATOMVAL REMOVE GETATOMVAL MAKEBITTABLE LISTGET1) FASL::FAT-STRING-P (SELECTC -%ARRAY-TYPE-NUMBER FFETCHFIELD SHOULDNT %FAT-STRING-ARRAY-P) BEGINMASTER.IP (APPENDOP.IP) SEDIT::INSERT - (FFETCHFIELD) DISPLAYLINK/RL (APPLY* LISTGET IPLUS ADD1 GN/RIGHT SUB1 GN/LEFT) BSPREADP (FFETCHFIELD -SELECTC \\QUEUEHEAD LOCF \\ADDBASE LIST) \\CLIPANDDRAWLINE (FFETCHFIELD COLORNUMBERP DSPCOLOR -.WHILE.TOP.DS. DSPDESTINATION \\GETBASE \\TOTOPWDS LIST IDIFFERENCE LRSH SUB1 IPLUS IMIN IMAX ADD1 -IABS IMINUS PLUS) COMP.CATCH (COMP.CALL COMP.LAM1 LIST) \\DEVICE.INPUT (OPCODES) CL:ASSOC (CL:ERROR -CL::%COMPLEX-ASSOC CL::%SIMPLE-ASSOC) \\TEDIT.RESHAPEFN (WINDOWPROP DSPCLIPPINGREGION FFETCHFIELD -\\TEDIT.FIND.FIRST.LINE IDIFFERENCE IPLUS) COMP.UNWIND-PROTECT (COMP.CALL COMP.LAM1 LIST) CL:COPY-SYMBOL - (CL:MAKE-SYMBOL CL:SYMBOL-NAME) TRANSLATEREG (IDIFFERENCE CONS) STRING.EQUAL (FFETCHFIELD \\PNAMECELL - \\ATOMCELL \\PROPCELL CONSTANT %ARRAY-BASE %ARRAY-OFFSET %ARRAY-TYPE-NUMBER MKSTRING \\DTEST -UPPERCASEARRAY \\GETBASECHAR \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE PLUS) -\\FM.3STATE-SETUP (\\FM.ITEMPROP FFETCHFIELD FUNCTION LISTGET \\FM.3STATE-SETUPOFFBITMAP) COMPERRM ( -PRINTLEVEL LISPXPRINT) RELSTKP (FFETCHFIELD IDIFFERENCE ADDSTACKBASE \\VAG2) \\TEDIT.CUMULATE.EVENTS ( -+ CONS FFETCHFIELD) TEDIT.SCANSEL (FFETCHFIELD) \\TEDIT.FINDAGAIN (\\TEDIT.FIND) -\\LEAF.SETCREATIONDATE (\\LEAF.GETFILEDATES LISP.TO.ALTO.DATE ALLOCATE.PUP LOCF \\ADDBASE LLSH -FFETCHFIELD IDIFFERENCE IPLUS) CL:WARN (MAKE-INTO-CONDITION) CLEARSTK (FUNCTION) GETHASHTEXT ( -GETHASHFILE COPYBYTES ELT) INITIALIZE-SHELL-DEVICE (FREPLACEFIELDVAL NCREATE FUNCTION) -XCL::RELIST*-INTERNAL (XCL::RECONS XCL::RELIST*-INTERNAL) TB.DESELECTRANGE (FFETCHFIELD TB.NTH.ITEM -PLUS TB.FIND.SELECTED.ITEM ADD1 FREPLACEFIELD TB.REV.FIND.SELECTED.ITEM SUB1) FILL.XPER (FILL.INITTBLE - DSPDESTINATION \\GETBASE \\TOTOPWDS PLUS) COMP.GLOBALVARP (GETP FMEMB) |\\LFCreateFile| ( -UNINTERRUPTABLY |\\PFGetVol| |\\LFFullFileName| |\\LFGenFileID| |\\PFVolumeNumber| FREPLACEFIELDVAL -NCREATE FUNCTION |\\LFFindDirHole| |\\LFGetDirectory| FFETCHFIELD |\\LFMakeLeaderPage| |\\LFFileName|) - \\LINEWITHBRUSH (FFETCHFIELD \\GETCOLORBRUSH MAXIMUMCOLOR DSPCOLOR OPPOSITECOLOR \\GETBRUSH -\\GETBRUSHBBT SUB1 IDIFFERENCE ITIMES \\DSPTRANSFORMX IPLUS FOLDLO LRSH \\DSPTRANSFORMY DSPDESTINATION - \\TOTOPWDS ADD1 HALF IREMAINDER PLUS \\GETBASE \\FBITMAPBIT \\BBTCURVEPT) \\TEDIT.CLOSEUPLINES ( -IDIFFERENCE FFETCHFIELD ADD1 IPLUS \\FORMATLINE) \\SETUPSTACK1 (IDIFFERENCE IPLUS FFETCHFIELD MIN -ADDSTACKBASE \\VAG2 UNFOLD LLSH PLUS TIMES PUTBASEPTR \\PUTBASEPTR CONSTANT CL:READ-FROM-STRING ADD1) -TEDIT.OBJECT.CHANGED (TEXTOBJ FFETCHFIELD TEDIT.MAPPIECES FUNCTION \\TEDIT.ORIGINAL.WINDOW.TITLE) -HARDRESET (\\CONTEXTSWITCH) EDITBMSCROLLFN (WINDOWPROP FFETCHFIELD IPLUS FIX TIMES IDIFFERENCE IMINUS -QUOTIENT FRPLACA IMIN GRIDXCOORD IMAX IQUOTIENT FDIFFERENCE GRIDYCOORD ITIMES LRSH BITBLT) -CHECK.MARGIN (TTNLEFT) \\NOTENEWICONPOSITION (WINDOWPROP) |\\VFMPutNext| (\\BLT MESASIZE LOCF -\\ADDBASE IPLUS |\\VFMGetInterval| FFETCHFIELD \\ALLOCBLOCK LRSH ADD1 |\\VFMMarkBufferDirty|) NSLOGIN -(\\INTERNAL/GETPASSWORD) BEGINPAGE.IP (FFETCHFIELD FREPLACEFIELD) SEDIT::SELECT-SEGMENT (CL:FUNCALL -FFETCHFIELD) \\USER-SUBR-UFN (\\GETBASE APPLY* ELT - \\ADDBASE) \\RESETSTACK0 (FFETCHFIELD \\GETBASE -PLUS \\MAKEFRAME FUNCTION IPLUS \\DEFCELL \\ATOMCELL ADDSTACKBASE \\VAG2 \\SETUPUSERSTACK) BSPEOFP ( -\\DTEST FFETCHFIELD \\BSP.PREPARE.INPUT) BIT.IN.ROW (SUB1 FFETCHFIELD BITMAPBIT PLUS) -SI::VARIABLE-NAME-IN-FRAME (ADDSTACKBASE \\VAG2 FFETCHFIELD \\ADDBASE + GETSTKNAMEENTRY -GETSTKNTOFFSETENTRY \\INDEXATOMVAL LRSH LOGAND CONSTANT WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY) -INSPECT/LISTP (APPLY* SELECT.LIST.INSPECTOR FUNCTION) HASHFILEP (FULLNAME ASSOC) UNIX-STREAM-EOFP ( -FFETCHFIELD UNIX-CHANNEL UNIX-PEEKEDCHAR UNIX-LASTCHAR) XCL::RELIST* (XCL::RELIST*-INTERNAL) -TB.UNSELECT.ITEM (\\DTEST FFETCHFIELD TB.SHOW.SELECTION) FILL.CONT (FILL.INITTBLE IDIFFERENCE PLUS) -ICMLARRAY.GETMENUWGROUP (FONTCREATE FONTPROP CL:ARRAY-DIMENSIONS CL:ARRAY-RANK HEIGHTIFWINDOW FREEMENU - GET.MENU.LIST IMAX STRINGWIDTH RESETVAR CONCAT CREATEW CREATEREGION CONS FUNCTION IDIFFERENCE SUB1 -WINDOWPROP GETBOXPOSITION) OPT.SKIPPUSH (SELECTQ OPT.SKIPPUSH SUB1 ADD1 IPLUS) \\UPCASEBASE (IPLUS -\\PUTBASEFAT \\PUTBASE \\PUTBASETHIN \\PUTBASEBYTE PLUS) \\CENTICLOCK (LOCF \\ADDBASE IQUOTIENT ITIMES -) EDIT.BITMAP (EDIT.BITMAP.REAL BITMAPCREATE EVAL EDIT.BITMAP FFETCHFIELD CURSORCREATE ERROR) -PRINTWORDS (SUB1 \\GETBASE TERPRI PLUS) \\TELERAIDENTRY (\\ADDBASE SELECTQ FFETCHFIELD FUNCTION) -COURIER.EXECUTE.CALL (LRSH \\BOUT LOGAND \\HINUM \\WOUT \\BULK.DATA.STREAM \\COURIER.HANDLE.BULKDATA -\\COURIER.RESULTS) OPT.DELCODE (FASSOC GETHASH OPT.PRDEL) \\FM.TOGGLE-SELECTEDFN (FFETCHFIELD -\\FM.TOGGLE-CHANGESTATE) TOPW.BUTTONEVENTFN (WINDOWPROP MAINWINDOW WITH-INSPECTOR-ENV XCL::PROFILIZE -CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES LOGAND ONED.TRACKCURSOR FONTPROP FUNCTION CL:FUNCALL - FFETCHFIELD) FASL:OPCODE-SEQUENCE (CL:ASSOC FASL::OPTABLE-OPNAMES LIST FASL:OPCODE-SEQUENCE -FASL::OPTABLE-NEXT CONS) COMP.CALL (COMP.CLEANFNOP FRPLACA CONS COMP.STFN ADD1) XCL::RECONS (CONS) -TB.SELECTRANGE (FFETCHFIELD TB.NTH.ITEM PLUS) COMP.LAM1 (COMP.GENFN FRPLACA) |\\LFUpdateLeaderPage| ( -UNINTERRUPTABLY FFETCHFIELD DAYTIME) |\\LFGetStreamForFile| (|\\LFFileSpec| |\\LFFullFileName| -MAKE-CONDITION |\\LFOpenOldFile| |\\LFReadFileID| |\\LFGetDirectory| FREPLACEFIELDVAL NCREATE PRIN1 -|\\LFCreateFile|) \\FM.TOGGLE-CHANGESTATE (FFETCHFIELD \\FM.ITEMPROP LISTGET) ICMLARRAY.GETREGIONFN ( -WINDOWREGION ADD1 IPLUS CONS SUB1 FRPLACA FRPLACD) COMPILER::ALPHA-MACROLET (COMPILER::MAKE-CHILD-ENV -COMPILER::ENV-BIND-FUNCTION COMPILER::CRACK-DEFMACRO CONS) DATATYPE (DECLARERECORD CONS) -\\CONTEXTAPPLY (\\MYALINK OPCODES GETBASE \\GETBASE SPREADAPPLY*) SEDIT::GROW-SELECTION (CL:FUNCALL -FFETCHFIELD) FILECODEBLOCK (IPLUS \\PREFIXALIGNMENT? FILEARRAYBASE) \\BSP.GETFILEPTR (IPLUS -\\MAKENUMBER FFETCHFIELD) \\INTERRUPTFRAME (\\INTERRUPTED INTERRUPTED) CLOSENSOCKET (FREPLACEFIELD -\\DTEST UNINTERRUPTABLY DREMOVE ERROR) UPDATEPCNODES (FFETCHFIELD \\GETBASEPTR IPLUS \\GETBASEFIXP -PLUS) \\INTERRUPTED (INTERRUPTED) EVALQT (LISPX LISPXREAD CLBUFS) SI::BQUOTE-EXPANDER (KWOTE) CHARCODE - (CHARCODE.DECODE) TOPW.ADJUSTSELECTION (WINDOWPROP MAINWINDOW FFETCHFIELD WITH-INSPECTOR-ENV -XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES STRINGWIDTH IDIFFERENCE ADD1 -FREPLACEFIELDVAL NCREATE) SI::BQUOTE-PROCESS-LIST (KWOTE) MAXMENUITEMWIDTH (FFETCHFIELD MENU.PRIN2.FLG - LISTGET \\MENUITEMLABEL \\MENUSUBITEMS IMAX IPLUS STRINGWIDTH BITMAPWIDTH) CHAT.CHOOSE.PHONE.NUMBER ( -MENU FREPLACEFIELDVAL NCREATE CONS CHAT.PROMPT.FOR.INPUT LIST CONCATCODES CHCON) MAXMENUITEMHEIGHT ( -FONTPROP FFETCHFIELD \\MENUITEMLABEL IMAX) BIT.IN.COLUMN (SUB1 FFETCHFIELD BITMAPBIT PLUS) -BREAKCONNECTION (FFETCHFIELD LIST \\GETDEVICEFROMNAME CANONICAL.HOSTNAME) TERM.ERASEBITS (FFETCHFIELD -BITBLT DSPTEXTURE) STRICTLY/BETWEEN (IGREATERP) \\TELERAIDSEND (FFETCHFIELD LOCF \\ADDBASE FOLDLO LRSH - SUB1 IPLUS FOLDHI FLIPCURSOR) TEDIT.MAKESEL (FFETCHFIELD IMAX IPLUS) \\TEDIT.FIND (TEXTOBJ MKLIST -FFETCHFIELD TEDIT.FIND MKSTRING ADD1 IDIFFERENCE \\TEDIT.GET.INSERT.CHARLOOKS) \\LEAF.CREATIONDATE ( -ALTO.TO.LISP.DATE FFETCHFIELD) INTERRUPTED (FREPLACEFIELD FFETCHFIELD ASSOC THIS.PROCESS PROCESSPROP -FIND.PROCESS TTY.PROCESS WHICHW WINDOWPROP FUNCTION LIST) |\\DFSCurrentVolume| (MKATOM U-CASE -|\\PFCurrentVol| |\\PFFetchString| LOCF \\ADDBASE) \\GATHER-CLEANUP-FORMS1 (FFETCHFIELD ADDSTACKBASE -\\VAG2 IDIFFERENCE \\GATHER-SPECIAL-BINDINGS CONS LIST \\GETBASEPTR SI::PVAR-VALUE-IN-FRAME) -SI::BQUOTE-NCONC (LIST) \\ATMIN (\\SMALLPIN SUB1 LLSH IDIFFERENCE PACK CHARACTER \\BIN LIST PLUS) -DISKPARTITION (SELECTQ MACHINETYPE |\\DFSCurrentVolume|) MACHINETYPE (SELECTC FFETCHFIELD) -SI::COMMA-ERROR-EXPANDER (CL:ERROR CL:SECOND) COMPOSEREGS (IPLUS CONS) ADJUSTLINE.AND.RESTORE ( -MOVE.TO.WHEREVER RESTORE.CURSOR) SI::BQUOTE-CONS (CONSTANTEXPRESSIONP KWOTE CONS CL:FIRST LIST) -\\PUSHSTATE.IP (GETFRAMEVAR.IP IP-TOS FRPLACA CONS APPENDOP.IP) FASL:BEGIN-TEXT (FASL::HANDLE-STATE -FASL::HANDLE-STREAM) ARCTO.IP (FIXR APPENDOP.IP) DISPLAYLINK/BT (APPLY* LISTGET IPLUS SUB1 GN/BOTTOM -ADD1 GN/TOP) FASL:MAKE-OPTABLE (FASL::NEW-OPTABLE CL:MAKE-ARRAY FASL::OPTABLE-VECTOR CL:SVREF) -BQUOTE.WRAPPER (GETSYNTAX SELECTQ) TEDIT.COPYTOCLIPBOARD (TEXTSTREAM TTY.PROCESS PUTCLIPBOARD -TEDIT.SEL.AS.STRING) FASL:*DEFAULT-OPTABLE* (FASL:MAKE-OPTABLE) SEDIT::PARSE--BROKEN-ATOM ( -SEDIT::BUILD-PRELINEARIZED-NODE FFETCHFIELD) FB.HARDCOPY.PRINT.TITLE (+ IQUOTIENT - STRINGWIDTH -|printout| TERPRI) RCOMP3 (ARGTYPE CONS CL:SYMBOL-VALUE REMOVE) \\HARDRESET-CLEANUP1 (\\MYALINK -OPCODES FFETCHFIELD ADDSTACKBASE \\VAG2 CEIL LOGAND IPLUS IDIFFERENCE UNFOLD LLSH CONSTANT SUB1 LOGXOR - FOLDLO LRSH GETHASH \\ATOMVALINDEX NTYPX \\LOLOC SHOULDNT + PLUS WORDSPERNAMEENTRY -WORDSPERNTOFFSETENTRY FREPLACEFIELD HELP \\ADDBASE ERROR) ONEDINSPECT.PRINTELEMENT (IPLUS PRIN2) -\\COURIER.REP.BOUT (FFETCHFIELD IPLUS LLSH RPLACD CONS LIST FREPLACEFIELD) \\CAUSEINTERRUPT (\\GETBASE - FFETCHFIELD ADDSTACKBASE \\VAG2 \\MAKEFRAME FUNCTION IPLUS) QUOTE.WRAPPER (GETSYNTAX LAST) -\\FM.TOGGLE-DOWNFN (FFETCHFIELD \\FM.DISPLAYBITMAP \\FM.ITEMPROP LISTGET BITBLT) DOERROR (CONS SASSOC -FASSOC FRPLACA MEMBER) \\VECSKIP (IPLUS \\ENDVECRUN) FB.THINCOMMAND (TB.COLLECT.ITEMS FFETCHFIELD -FUNCTION SELECTQ FB.SORT.VERSIONS SORT IDATE DATE IDIFFERENCE CL:POSITION HELP CL:NTH PLUS -FB.PROMPTWPRINT) VARIABLES (STKNARGS CONS STKARGNAME SUB1) FASL:CHECK-VERSION (BIN16) APPENDOP.IP ( -APPENDBYTE.IP LOGOR FOLDLO LRSH MOD IMOD) ADD.BORDER.TO.BITMAP (FFETCHFIELD BITMAPCREATE IPLUS ITIMES) - \\OUTCHARFN.PRESS (SELCHARQ FREPLACEFIELD \\DSPXPOSITION.PRESS DSPXPOSITION NEWPAGE.PRESS FFETCHFIELD - \\PRESS.CONVERT.NSCHARACTER IPLUS \\FGETWIDTH \\GETBASE) \\DSPROTATE.PSC (FFETCHFIELD) -*WHO-LINE-PACKAGE-NAME-CACHE* (LIST) SUSPEND-LISP (MACHINETYPE) FASL:OPEN-FASL-HANDLE (CL:APPLY -FASL::MAKE-HANDLE) OPT.ONLYMEMB (FMEMB) \\TEXTSTREAMBOUT (FFETCHFIELD \\TEDIT.APPLY.STYLES PLUS -CHARWIDTH IDIFFERENCE SELECTQ DSPCLIPPINGREGION LLSH SHOULDNT ADDBASE \\ADDBASE %ARRAY-BASE LRSH -%ARRAY-OFFSET IPLUS LOGAND FREPLACEFIELD) COMPSET (COMPSETREAD COMPSETF COMPSETY OPENFILE OPENP -OPENSTREAM) UNIX-USERNAME (WITH-RESOURCE CONCAT SUBSTRING CL:POSITION GETRESOURCE NEWRESOURCE -ALLOCSTRING) SI::BQUOTE-APPEND (LIST) TEDIT.GETSEL (FFETCHFIELD NCREATE) \\DORETCALL (FFETCHFIELD -IDIFFERENCE ADDSTACKBASE \\VAG2 LOGOR LSH \\GETBASEBYTE ADD1 DIFFERENCE UNFOLD LLSH \\FREESTACKBLOCK -\\MAKEFRAME PLUS RAID FREPLACEFIELD) MB.SHOWSELFN (IMAGEOBJPROP BITBLT) \\TEDIT.REPAINTFN (WINDOWPROP -DSPCLIPPINGREGION FFETCHFIELD IPLUS) \\COURIER.REP.BIN (FFETCHFIELD ERROR LOGAND LRSH) SUBSTRING ( -FFETCHFIELD \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT STRINGP MKSTRING %ARRAY-BASE %ARRAY-TYPE-NUMBER - %ARRAY-OFFSET IPLUS LITATOM ADD1 IDIFFERENCE SELECTC SHOULDNT LIST FREPLACEFIELDVAL NCREATE) -\\TEDIT.ORIGINAL.WINDOW.TITLE (CONCAT NCHARS WINDOWPROP) LAYOUTLATTICE (HALF LRSH FONTPROP STRINGWIDTH - BROWSE/LAYOUT/LATTICE) \\UPDATECACHEDFIELDS (|\\SFFixDestination|) \\MAKE.PROCESS0 (FUNCTION -FFETCHFIELD \\GETOFD \\GETSTREAM GETTOPVAL LOCF \\ADDBASE TERPRI \\HARDRESET-CLEANUP \\EVAL PRIN1 -TTY.PROCESS) \\CLEANUP.STACKFULL (HARDRESET) PASTEFROMCLIPBOARD (GETCLIPBOARD PROCESS.WINDOW -TTY.PROCESS COPYINSERT GNCCODE) \\TEDIT.WINDOW.TITLE (TEXTOBJ \\TEDIT.PRIMARYW WINDOWPROP) -\\GATHER-SPECIAL-BINDINGS (FFETCHFIELD GETSTKNAMEENTRY NTSLOT-VARTYPE GETSTKNTOFFSETENTRY IPLUS -\\INDEXATOMVAL \\VAG2 LRSH LOGAND CONS LIST \\GETBASEPTR UNFOLD LLSH NTSLOT-OFFSET ADDSTACKBASE PLUS -CONSTANT WORDSPERNAMEENTRY) SEDIT::OPEN-LITATOM (FFETCHFIELD SEDIT::CLOSE-NODE NCHARS FRPLACA LIST -FREPLACEFIELD) FB.HARDCOPY.MAXWIDTH (CHARWIDTH CL:NTH FFETCHFIELD STRINGWIDTH) FASL:PROCESS-SEGMENT ( -CL:FUNCALL FASL:READ-TEXT FASL:SKIP-TEXT FASL:PROCESS-BLOCK) \\DRAWARC.PSC (FFETCHFIELD TERPRI -POSTSCRIPT.PUTCOMMAND TIMES + \\MOVETO.PSC) \\INITSPP (\\CREATE.SPP.DEVICE FUNCTION \\DEFINEDEVICE) -\\DOMISCAPPLY1 (SPREADAPPLY* FFETCHFIELD) \\DOSTACKFULLINTERRUPT (RESETLST RESETSAVE LIST FUNCTION -STACK.FULL.WARNING) UNIX-FULLNAME (WITH-RESOURCES CONCAT SUBSTRING CL:POSITION GETRESOURCE NEWRESOURCE - ALLOCSTRING) OPT.DELETEFRAMECHECK (OPT.ONLYMEMB GETHASH) RESET (\\MYALINK OPCODES ADDSTACKBASE \\VAG2 - FFETCHFIELD IDIFFERENCE |printout| PRIN1) \\FM.TOGGLE-SETUP (\\FM.ITEMPROP FFETCHFIELD FUNCTION -LISTGET) SHORTLST (SHORTLST SUB1) \\PUTONSCREENW (MOVEW IDIFFERENCE FFETCHFIELD WINDOWPROP CONS) -APPENDRATIONAL.IP (IMAX BYTESININT.IP UNFOLD LLSH) \\SHOWMENULABEL (\\MENUITEMLABEL IPLUS FONTPROP -FFETCHFIELD CREATEREGION BITMAPWIDTH BITBLT IQUOTIENT IDIFFERENCE CENTERPRINTINREGION MENU.PRIN2.FLG -LISTGET ADD1 FONTDESCENT DSPFONT CL:FUNCALL FUNCTION) PFI.AFTER.NEW.PAGE (PLUS DSPFONT CONCAT PRIN1 - -DSPRIGHTMARGIN STRINGWIDTH) NTHCHARCODE (%ARRAY-BASE FFETCHFIELD %ARRAY-OFFSET %ARRAY-TYPE-NUMBER -\\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT IPLUS \\GETBASECHAR \\GETBASEFAT \\GETBASE SUB1 -\\GETBASETHIN \\GETBASEBYTE NCHARS FUNCTION) \\FM.MOMENTARY-SELECTEDFN (RESETSAVE LIST) SPECVARP ( -GETRELQ GETTABLE FASSOC FMEMB GETP) FB.THINP (U-CASE FILENAMEFIELD ITIMES IQUOTIENT) APPENDNUMBER.IP ( -APPENDINTEGER.IPMACRO APPENDINT.IPMACRO SUB1 LOADBYTE LOGAND LSH IMINUS UNFOLD LLSH MASK.1\'S PLUS -IPLUS BYTESININT.IP TYPEP CL:RATIONAL APPENDRATIONAL.IP CL:NUMERATOR CL:DENOMINATOR) MULTIFILEINDEX ( -NCONC DIRECTORY DIRECTORY.FILL.PATTERN MAPCAR LIST FINDFILE CL:ERROR MULTIFILEINDEX1 FUNCTION) -TTYINPROMPTFORWORD (GETSTREAM NON-TTYIN-PROMPTFORWORD RESETLST RESETSAVE TTY.PROCESS THIS.PROCESS -TTYDISPLAYSTREAM TTYIN NTHCHARCODE CONCAT STRINGP MKSTRING) SETUPFONTS.PRESS (FONTCREATE FFETCHFIELD) -\\ALLOCPAGEBLOCK (UNINTERRUPTABLY \\ALLOCVIRTUALPAGEBLOCK PLUS \\ADDBASE) \\DRAWPOINT.PSC (FFETCHFIELD - BITBLT - IQUOTIENT \\DRAWLINE.PSC) \\SPPGETERROR (TERPRI PRIN1) CL:PACKAGE-USE-LIST ( -CL::%PACKAGE-USE-LIST) SET-PACKAGE-INTERACTIVELY (MENU SORT CL:LIST-ALL-PACKAGES CL:PACKAGE-NAME LIST -FREPLACEFIELDVAL NCREATE CONS WHO-LINE-COPY-INSERT CONCAT CL:IN-PACKAGE) FASL:UNIMPLEMENTED-OPCODE ( -CL:ERROR) \\ALLOCVIRTUALPAGEBLOCK (UNINTERRUPTABLY IPLUS IDIFFERENCE CEIL LOGAND CONSTANT SUB1 LOGXOR -\\SET.STORAGE.STATE \\VAG2 LRSH LLSH) UNIX-GETENV (WITH-RESOURCES CONCAT SUBSTRING NTHCHARCODE SUB1 -PLUS GETRESOURCE NEWRESOURCE ALLOCSTRING) \\ICONW.FORMAT.TITLE1 (NCHARS FONTPROP CONS NTHCHARCODE PLUS - CHARWIDTH - SUB1 LIST) COMPILER::CLOSURE-ANNOTATE-SETQ (CL:ADJOIN COMPILER::SETQ-VAR -COMPILER::CLOSURE-ANNOTATE COMPILER::SETQ-VALUE) TEDIT.SEL.AS.STRING (TEXTSTREAM FFETCHFIELD -ALLOCSTRING \\GETCH \\BIN PLUS) OPT.FRAMEVAR (REVERSE FMEMB SUB1 PLUS OPT.DREV SUBSET FRPLACA) -\\SET.STORAGE.STATE (FFETCHFIELD CONS) \\VECENCODE (IDIFFERENCE IPLUS IMINUS ITIMES IMAX) \\VECPUT ( -FFETCHFIELD IPLUS IDIFFERENCE FIXR FTIMES \\VECENCODE CONS) CL:PACKAGE-NICKNAMES (CL::%PACKAGE-NICKNAMES -) \\INSERT.FIRST.PIECE (\\CREATEPIECEORSTREAM CHARLOOKS.FROM.FONT FFETCHFIELD NCREATE ALLOCSTRING -FREPLACEFIELD) \\IMAGEUSERPROP (FFETCHFIELD LISTGET LIST) CL:PACKAGE-USED-BY-LIST ( -CL::%PACKAGE-USED-BY-LIST) SEDIT::INSERT-STRING (FFETCHFIELD ADD1) COMPILER::CLOSURE-ANNOTATE-PROGV ( -CL:UNION COMPILER::CLOSURE-ANNOTATE COMPILER::PROGV-SYMS-EXPR COMPILER::PROGV-VALS-EXPR COMPILER::PROGV-STMT -) MARGINBAR.CREATE (CONS IMAGEOBJCREATE BITMAPCREATE DSPCREATE DSPCLIPPINGREGION) COMPILE1 (COMPILE1A -BYTECOMPILE2 COMPILE2) MAKE-PRIME-HASHTABLE-SIZE (LOGOR FIX FQUOTIENT) \\TEDIT.FORMAT.FOOTNOTE ( -FFETCHFIELD DSPSCALE FRPLACA FREPLACEFIELDVAL NCREATE ARRAY PLUS ADD1 LIST DREMOVE) MB.WHENOPERATEDFN -(SELECTQ MB.SHOWSELFN MB.SELFN) CL:POSITION (CL:LENGTH COMPLEX-POSITION SIMPLE-POSITION) -\\CWSU.DEFAULT (COURIER.WRITE COURIER.WRITE.REP) MAKE-PACKAGE-HASHTABLE (CL::%MAKE-PACKAGE-HASHTABLE -MAKE-PRIME-HASHTABLE-SIZE CL::PACKAGE-HASHTABLE-TABLE LIST CL:MAKE-ARRAY CL::PACKAGE-HASHTABLE-HASH -FIX FTIMES CL::PACKAGE-HASHTABLE-SIZE CL::PACKAGE-HASHTABLE-FREE CL::PACKAGE-HASHTABLE-DELETED) -|UnixTempFile| (UNPACKFILENAME.STRING CONCAT IDATE PLUS CL:VALUES OPENSTREAM) REFLECT/GRAPH/DIAGONALLY - (FRPLACA FRPLACD) \\DSPTRANSLATE.PSC (FFETCHFIELD DIFFERENCE LIST FREPLACEFIELD) CL::PRINT-PACKAGE ( -PRIN3 CL::%PACKAGE-NAME) SET-TTY-PACKAGE-INTERACTIVELY (PROCESS.EVAL TTY.PROCESS) UNIX-GETPARM ( -WITH-RESOURCE CONCAT SUBSTRING SUB1 STRPOS GETRESOURCE NEWRESOURCE ALLOCSTRING) WORD.MATCHES.BUFFER ( -\\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE FIRSTCHAR TTNEXTCHAR NTHCHARCODE PLUS LOGXOR) -FUNCTION.WRAPPER (\\GTREADTABLE FFETCHFIELD) TEDIT.GET.LOOKS (TEXTOBJ FFETCHFIELD \\CHTOPC IMIN -\\TEDIT.UNPARSE.CHARLOOKS.LIST) OPT.FRAMEDEL (IGREATERP FASSOC GETHASH PLUS MAP OPT.CODEFRAME RPLACA -OPT.CODELEV LENGTH OPT.COMPILERERROR CONS IPLUS FRPLACD OPT.PRATTACH FRPLACA SELECTQ FRPTQ OPT.CCHECK) - \\FM.MOMENTARY-SETUP (\\FM.ITEMPROP FFETCHFIELD FUNCTION) NECCSPEC (CONS DOERROR LIST) \\ONSCREENW ( -IGREATERP IDIFFERENCE FFETCHFIELD WINDOWPROP) CL:PACKAGE-SHADOWING-SYMBOLS ( -CL::%PACKAGE-SHADOWING-SYMBOLS) \\TEDIT.CONVERT.TO.FORMATTED (\\TEDIT.BASICFIND MKSTRING CHARACTER -FFETCHFIELD \\CHTOPC ADD1 -) COMPILER::CLOSURE-ANNOTATE-TAGBODY (COMPILER::TAGBODY-SEGMENTS CL:UNION -COMPILER::SEGMENT-STMTS COMPILER::CLOSURE-ANNOTATE COMPILER::TAGBODY-BLIP-VAR COMPILER::MAKE-VARIABLE -COMPILER::TAGBODY-CLOSED-OVER-VARS CONS) \\STARTPAGE.PRESS (FFETCHFIELD IDIFFERENCE FONTPROP IPLUS -FREPLACEFIELD PLUS) BCOMPL2 (RESETLST EVAL APPEND LIST BRECOMPILE3 CONS FASSOC FMEMB DREMOVE VIRGINFN -NCONC1) CLISPDEC1 (MAPCON LIST CONS CLISPDEC1 DUNPACK ERROR) TEDIT.HARDCOPY-COLUMN-END (DREMOVE COPY -LIST IMAX ADD1 FFETCHFIELD FLAST REVERSE LDIFF MEMB APPEND CONCAT IDIFFERENCE IPLUS PLUS CL:VALUES -CONS) EQUAL.CH.NAMES (FFETCHFIELD STRING-EQUAL) \\INITMDSPAGE (IREMAINDER LRSH IQUOTIENT PLUS -\\ADDBASE) MB.SIZEFN (IMAGEOBJPROP IMAGESTREAMTYPE FONTCOPY STRINGWIDTH FONTPROP CONS) -TEDIT.DEFAULT.MENUFN (WINDOWPROP FFETCHFIELD CONCAT \\TEDIT.CREATEMENU MENU RESETLST RESETSAVE -\\TEDIT.MARKACTIVE FREPLACEFIELD SELECTQ TEDIT.PUT TEXTPROP TEDIT.GET TEDIT.INCLUDE \\TEDIT.QUIT -CURSOR TEDIT.SUBSTITUTE TEDIT.GETINPUT TEDIT.FIND MKSTRING ADD1 IDIFFERENCE -\\TEDIT.GET.INSERT.CHARLOOKS \\TEDIT.LOOKS TEDIT.HARDCOPY TEDIT.HCPYFILE \\TEDIT.EXPANDED.MENU -\\TEDIT.EXPANDEDCHARLOOKS.MENU \\TEDIT.EXPANDEDPARA.MENU \\TEXTMENU.START COPYTEXTSTREAM -\\TEDIT.PRIMARYW APPLY*) COURIER.REP.LENGTH (SELECTQ STRINGP MKSTRING %ARRAY-TYPE-NUMBER FFETCHFIELD -ADD1 FOLDHI LRSH IPLUS NCHARS GETPROP FIXP CL:FUNCALL \\GET.COURIER.TYPE COURIER.REP.LENGTH PLUS ASSOC - \\COURIER.TYPE.ERROR \\COURIER.UNKNOWN.TYPE) \\TFBRAVO.GETPARAMS (FRPLACA \\TFBRAVO.LCASER -\\TFBRAVO.PARAMNAMEP CONS FMEMB) |UnixPrintCommand| (CONCAT NCHARS |UnixShellQuote|) -SWITCH/NODE/HEIGHT/WIDTH (MAPC FRPLACA) IRM.GET.CREF (READ IMAGEOBJCREATE) ORDERFROMBOTTOMTOTOP ( -FFETCHFIELD CONS) \\EXTENDEDVMEMINIT (LOCF \\ADDBASE IMAX \\GETBASE) TEDIT.EXTRACTTOCLIPBOARD ( -TEXTSTREAM TTY.PROCESS TEDIT.SEL.AS.STRING TEDIT.DELETE TEDIT.GETSEL) \\HARDRESET-CLEANUP (FFETCHFIELD - LIST HASHARRAY TIMES LENGTH CONS MAPC GETHASH RPLACA RPLACD PUTHASH PLUS .CALLAFTERPUSHINGNILS. + -CEIL LOGAND IPLUS ADD1 UNFOLD LLSH CONSTANT SUB1 LOGXOR FOLDHI LRSH \\HARDRESET-CLEANUP1) \\FIXILINES -(IMAX FFETCHFIELD IPLUS \\TEDIT.FIXINSSEL) SEDIT::INSERT-LITATOM (SEDIT::INSERT-STRING -SEDIT::TRANSLATE-CHARS FFETCHFIELD) COMPILER::CLOSURE-ANNOTATE-RETURN (COMPILER::CLOSURE-ANNOTATE -COMPILER::RETURN-VALUE) MSCALE (IPLUS FIXR TIMES) D-ASSEM:ALLOCATE-CODE-BLOCK ( -D-ASSEM::START-PC-FROM-NT-COUNT CEIL LOGAND IPLUS + CONSTANT SUB1 LOGXOR \\ALLOC.CODE.BLOCK CL:1+ -CL:CEILING CL:VALUES) CL::PRINT-PACKAGE-HASHTABLE (PRIN3 CL::PACKAGE-HASHTABLE-SIZE -CL::PACKAGE-HASHTABLE-FREE CL::PACKAGE-HASHTABLE-DELETED) \\TEDIT.PROMPT.PAGEFULLFN (WFROMDS ADD1 -WINDOWPROP IPLUS REMOVE ATTACHEDWINDOWS CL:1- REVERSE CREATEPOSITION IDIFFERENCE) D-ASSEM:FIXUP-PTR ( -\\LOLOC OPCODES LOGOR \\GETBASEBYTE LRSH \\HILOC + LOGAND \\PUTBASEBYTE) ALLOCSTRING (FIX \\CHARCODEP -IGEQ CHCON1 IGREATERP \\ALLOCBLOCK FOLDHI LRSH IPLUS SELECTC SHOULDNT LIST FREPLACEFIELDVAL NCREATE -SUB1 \\PUTBASE PLUS \\PUTBASEBYTE) |UnixShellQuote| (CHCON CONS CONCATCODES) -REFLECT/GRAPH/HORIZONTALLY (IPLUS MAX/RIGHT MIN/LEFT IDIFFERENCE FRPLACA) STRPOS (FFETCHFIELD -\\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT STRINGP MKSTRING %ARRAY-BASE %ARRAY-OFFSET -%ARRAY-TYPE-NUMBER ADD1 IDIFFERENCE PLUS CHCON1 IPLUS \\CATRANSLATE \\GETBASEBYTE \\GETBASECHAR -\\GETBASEFAT \\GETBASE \\GETBASETHIN) D-ASSEM:ASSEMBLE-FUNCTION (CL:MAKE-HASH-TABLE -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION D-ASSEM::DCODE-FROM-DLAMBDA D-ASSEM::DLAMBDA-FROM-LAMBDA - D-ASSEM::COPY-LAP-FN D-ASSEM::DCODE-CLOSURE-P CL:FUNCTION) SETF-SYMBOL-PACKAGE (\\PNAMECELL -\\ATOMCELL CL::%PACKAGE-INDEX FREPLACEFIELD) RECORDALLOCATIONS (MAPCONC APPEND RECORD.ALLOCATIONS -RECORDECL RECLOOK1) \\ADVANCE.STORAGE.STATE (DREMOVE) SHOWBITMAP.IP (INTERSECTREGIONS FFETCHFIELD CONS - CEIL LOGAND IPLUS FOLDHI LRSH CONSTANT SUB1 LOGXOR TIMES FQUOTIENT IQUOTIENT IMIN IDIFFERENCE) -COMPILER::CLOSURE-ANNOTATE-PROGN (COMPILER::PROGN-STMTS CL:UNION COMPILER::CLOSURE-ANNOTATE) -\\DSPPUSHSTATE.PSC (FFETCHFIELD FREPLACEFIELD CONS COPY) D-ASSEM:FIXUP-WORD (\\PUTBASEBYTE LRSH CL:1+ -LOGAND) CURRENT-TTY-PACKAGE (PROCESS.EVALV TTY.PROCESS ASSOC PUTASSOC CONCAT CL:PACKAGE-NICKNAMES -CL:PACKAGE-NAME) ASKUSER (RESETLST CHARACTER GETTERMTABLE SETTERMTABLE READP CLBUFS LIST ITIMES PEEKC -NTHCHAR NCONC1 ASKUSERLOOKUP PRIN1 CONSTANT ASKUSER$ ADD1 CHCON1 FASSOC LISTGET CONCAT ASKUSEREXPLAIN -SUBSTRING SUB1 PACKC LISTGET1 CONS NLSETQ READ READLINE EVAL NCHARS LASTC FRPLACD READC ASKUSERPRIN1 -FMEMB PACK APPLY NCONC) D-ASSEM:RELEASE-DCODE (D-ASSEM::DCODE-LOCAL-FN-FIXUPS) %SUFFIX-SYMBOL (CL:INTERN - CL:CONCATENATE CL:SYMBOL-NAME) MKSTRING (FFETCHFIELD \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT -FREPLACEFIELDVAL NCREATE ALLOCSTRING CL:CHAR-CODE \\CHECKRADIX \\INVALID.RADIX \\GTREADTABLE -\\PRINDATUM.TO.STRING) D-ASSEM:FIXUP-PTR-NO-REF (\\LOLOC LOGOR \\GETBASEBYTE LRSH \\HILOC + LOGAND -\\PUTBASEBYTE) CHECK-*CASE-SELECTOR (CL:ERROR) PFI.MAKE.LPT.STREAM (LISTGET MKLIST PRINTERPROP -PRINTERTYPE OPENIMAGESTREAM DSPSCALE - FIXR FTIMES CONS APPEND CONCAT STREAMPROP) TEDIT.UPDATE.SCREEN -(TEXTOBJ FFETCHFIELD \\TEDIT.FIXCHANGEDPART) STANDARDEDITE (RESETFORM EDITMODE EDITE) -COLLECT-CASE-SELECTORS (MAPCONC CL:COPY-LIST LIST CHECK-*CASE-SELECTOR) \\TEDITMENU.RECORD.UNFORMATTED - (TEXTOBJ) \\TESTPARTITION (.DISKPARTINSTR. \\DTEST) SI::SPLIT-PROCEED-CLAUSES (PLUS CL:VALUES CL:FLET - LENGTH SI::MAYBE-QUOTE CL:FIRST KWOTE CL:NREVERSE CL:REVERSE) SEDIT::INITIALIZE-ATOMIC (LIST* -FREPLACEFIELDVAL NCREATE) TB.FINISH.CLOSE (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION FFETCHFIELD SELECTQ TB.FLUSH.WINDOW CLOSEW SHRINKW) MB.MARGINBAR.SHOWTAB (MSCALE IDIFFERENCE) - FB.SEEFULLFN (WFROMDS WINDOWPROP SELECTQ FUNCTION FREPLACEFIELDVAL NCREATE CONS ADDMENU CREATEW -CREATEREGION WIDTHIFWINDOW BITMAPWIDTH CHECK/MENU/IMAGE HEIGHTIFWINDOW BITMAPHEIGHT CREATE.EVENT) -D-ASSEM:FIXUP-SYMBOL (\\LOLOC \\HILOC LOGOR \\GETBASEBYTE LRSH + LOGAND \\PUTBASEBYTE CL:1+) -SI::EXPAND-CONDITION-CASE (CL:MACROLET GENSYM CL:ASSOC EQL COMPILER:CONTEXT-VALUES-USED CL:FLET) -OVERLAPPINGWINDOWS (FFETCHFIELD CONS ALLATTACHEDWINDOWS WOVERLAPP REMOVE) STRIP-KEYWORDS (CL:VALUES -CL:FIRST LIST CL:SECOND) IRM.PUT.CREF (PRIN2 CONS IMAGEOBJPROP) \\FM.CLEARITEM (\\FM.ITEMPROP -FFETCHFIELD LISTGET BLTSHADE) UNECCSPEC (GLOBALVARP FMEMB GETRELQ GETTABLE FASSOC DOERROR) -CONDITIONS::EXPAND-RESTART-CASE (GENSYM EQL COMPILER:CONTEXT-VALUES-USED) |BitFieldMask| (SUB1 LLSH -|BitFieldWidth|) |BitFieldShift| (IDIFFERENCE IPLUS |BitFieldFirst| |BitFieldWidth|) -*PACKAGE-FROM-NAME* (HASHARRAY) CONDITIONS::PARSE-RESTART-CASE (CL:FIRST CL:VALUES) -ENTER-NEW-NICKNAMES (DECLARE) \\RESOLVE.TYPENUMBER (\\TYPENUMBERFROMNAME \\ASSIGNDATATYPE1 -\\ILLEGAL.ARG) OPT.CLEANFRAME (GETHASH) CONDITIONS::CONVERT-RESTART-CASES (CL:VALUES CL:FIRST CONS) -CLISPLOOKUP1 (RECORDFIELDNAMES CLISPLOOKUP1 GETPROP NTH) FB.FASTSEE.ONEFILE (FB.BROWSECOMMAND CONCAT) -GROW/REGION (CREATEREGION IDIFFERENCE IPLUS ITIMES) COMPILER:COPY-ENV-WITH-VARIABLE (COMPILER::COPY-ENV - COMPILER:MAKE-EMPTY-ENV) |BitFieldWidth| (ADD1 LOGAND) IRM.CREF.BOX (IMAGESTREAMTYPE SELECTQ IPLUS -STRINGWIDTH IMAGEOBJPROP FONTHEIGHT CONS) D-ASSEM:INTERN-DCODE (CL:ARRAYP D-ASSEM::DCODE-CODE-ARRAY -D-ASSEM::DCODE-NAME-TABLE CL:LENGTH CEIL LOGAND IPLUS CL:1+ UNFOLD LLSH CONSTANT SUB1 LOGXOR CL:* + -D-ASSEM::DCODE-NUM-ARGS CL:1- CL:CEILING D-ASSEM::DCODE-NLOCALS D-ASSEM::DCODE-NFREEVARS -D-ASSEM::DCODE-ARG-TYPE D-ASSEM::DCODE-FRAME-NAME OPCODES FREPLACEFIELD D-ASSEM::DCODE-CLOSURE-P -\\STKMIN D-ASSEM::DCODE-DEBUGGING-INFO FFETCHFIELD D-ASSEM::DCODE-INTERN-RESULT MAKE-COMPILED-CLOSURE) - MB.DEFAULTBUTTON.ACTIONFN (RESETLST RESETSAVE \\TEDIT.MARKACTIVE IMAGEOBJPROP FREPLACEFIELD SELECTQ -\\TEDIT.MAKEFILENAME MBUTTON.NEXT.FIELD.AS.TEXT FFETCHFIELD TEDIT.PUT TEXTPROP TEDIT.GET TEDIT.INCLUDE - NCHARS ERSETQ TEDIT.FIND ADD1 IDIFFERENCE \\TEDIT.GET.INSERT.CHARLOOKS \\SHOWSEL TEDIT.PROMPTPRINT -\\TEDIT.PRIMARYW \\TEXTMENU.START COPYTEXTSTREAM HEIGHTIFWINDOW \\TEDIT.EXPANDEDPARA.MENU -\\TEDIT.EXPANDEDCHARLOOKS.MENU MBUTTON.NEXT.FIELD.AS.NUMBER LIST MBUTTON.FIND.NEXT.BUTTON CONS -TEDIT.HARDCOPY ERROR) CREATECELL (\\CREATECELL) PFI.LINES.REMAINING (DSPBOTTOMMARGIN ADD1 IQUOTIENT - -DSPYPOSITION DSPLINEFEED) IMAGEOBJCREATE (IMAGEFNSP FREPLACEFIELDVAL NCREATE) COMPILER:ENV-BOUNDP ( -CL:ASSOC COMPILER::ENV-VENV COMPILER::VARIABLE-SCOPE COMPILER::ENV-DECLARED-SPECIALS -COMPILER::ENV-DECLARED-GLOBALS COMPILER::ENV-PARENT COMPILER:ENV-BOUNDP) SEDIT::HASFAT (SUB1 -%ARRAY-OFFSET FFETCHFIELD %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE -\\GETBASETHIN \\GETBASEBYTE) DEDITE (EDITE) COMPILER:ASSEMBLER-ERROR (CL:ERROR) COMPILER:MAKE-EMPTY-ENV - (COMPILER::MAKE-ENV) \\TEDIT.LOOKS.UPDATE (FFETCHFIELD \\TEDIT.APPLY.PARASTYLES \\TEDIT.APPLY.STYLES -PLUS \\RPLPTR \\ADDBASE2 \\ADDBASE IPLUS \\EDITELT GETBASEPTR \\GETBASEPTR FONTCOPY IMAX FONTPROP -IDIFFERENCE) \\MAKE.COURIER.REP.STREAM (NCREATE FUNCTION) SI::EXPAND-PROCEED-CASE (GENSYM EQL -COMPILER:CONTEXT-VALUES-USED) \\SHOWSEL (FFETCHFIELD) REPLACEFIELD (\\DTEST SELECTQ \\RPLPTR -PUTBASEPTRX \\PUTBASEPTR \\PUTBASEFLOATP \\ADDBASE LOGAND LRSH \\PUTBASE LOGOR \\GETBASE LOGXOR LLSH -|BitFieldMask| |BitFieldShift| SUB1 |BitFieldWidth| IDIFFERENCE NTYPX FFETCHFIELD \\LOLOC -\\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR ADD1 LISPERROR) -\\FM.INSUREVISIBLE (DSPCLIPPINGREGION \\FM.ITEMPROP FFETCHFIELD SCROLLW FQUOTIENT WINDOWPROP) -MSCHECKVARS1 (CONS LIST GETRELQ UNION GETTABLE FASSOC SELECTQ GETHASH PUTHASH MSCHECKVARS1 SHOULDNT) -COMPILER:COPY-ENV-WITH-FUNCTION (COMPILER::COPY-ENV COMPILER:MAKE-EMPTY-ENV) CL:MAKE-PACKAGE (DECLARE -MKSTRING CL:MAKE-SYMBOL \\PKG-FIND-FREE-PACKAGE-INDEX CL::%MAKE-PACKAGE MAKE-PACKAGE-HASHTABLE -CL:SYMBOL-NAME CONS CL:AREF) BOXCOUNT (\\GETDTD \\ADDBASE ITIMES SMALLP \\TYPENUMBERFROMNAME IPLUS -FFETCHFIELD FREPLACEFIELD) CLIPBOARD-PASTE-STREAM (UNIX-GETENV CREATE-PROCESS-STREAM CL:FUNCTION) -OPT.FRAMELOCAL (FASSOC FRPLACA) \\DTEST (\\DTEST.UFN) COMPILER::CLOSURE-ANNOTATE-MV-PROG1 ( -COMPILER::MV-PROG1-STMTS CL:UNION COMPILER::CLOSURE-ANNOTATE) \\FM.ENDEDIT (WINDOWPROP TTY.PROCESS -THIS.PROCESS PROCESS.RESULT ERROR) PRINTERROR (IDIFFERENCE LINELENGTH DREVERSE CONS POSITION IPLUS -IQUOTIENT PRIN1) EXPORT (DECLARE CL::%PACKAGE-USED-BY-LIST CL::%PACKAGE-INTERNAL-SYMBOLS -CL::%PACKAGE-EXTERNAL-SYMBOLS) APPENDLARGEVECTOR.IP (ARRAYSIZE ARRAYORIG SUB1 IPLUS BYTESININT.IP ELT -PLUS ADD1 ITIMES) \\TYPECHECK (\\DTEST.UFN) CL:USE-PACKAGE (DECLARE) IMPORT (DECLARE -CL::%PACKAGE-EXTERNAL-SYMBOLS CL::%PACKAGE-INTERNAL-SYMBOLS CL:SHADOWING-IMPORT) INITPUPLEVEL1 ( -HARDRESET) REMOVE-COMMENTS (CL:FUNCTION REMOVE-COMMENTS CONS) COMPILER:OPTIMIZE-AND-MACROEXPAND-1 ( -CL:VALUES CL:MACROEXPAND-1) \\COERCEFONTDESC (IMAGESTREAMTYPE \\DEVICESYMBOL SELECTQ FFETCHFIELD -SASSOC \\COERCEFONTDESC FONTCOPY DEFAULTFONT ERROR CONCAT FONTCREATE SETFONTCLASSCOMPONENT DSPFONT) -CL:SHADOWING-IMPORT (DECLARE CL::%PACKAGE-EXTERNAL-SYMBOLS CL::%PACKAGE-INTERNAL-SYMBOLS) -COURIER.WRITE.REP (\\MAKE.COURIER.REP.STREAM FFETCHFIELD) CL:SHADOW (DECLARE -CL::%PACKAGE-EXTERNAL-SYMBOLS CL::%PACKAGE-INTERNAL-SYMBOLS) \\MAIKO.SET.STORAGE.STATE (FFETCHFIELD -CONS) \\TEDIT.TRY.ABBREV (SASSOC U-CASE CHARCODE.DECODE CHARACTER APPLY* EVAL) |InstallUnixPrinter| ( -LIST) REFLECT/GRAPH/VERTICALLY (IPLUS MAX/TOP MIN/BOTTOM IDIFFERENCE FRPLACD) %PRINT-CONDITION ( -DECLARE CL:FORMAT CL:TYPE-OF \\HILOC \\LOLOC REPORT-CONDITION) WTFIXLOADEF (FINDFILE PACKFILENAME -ASKUSER LIST EVAL) PFI.SETUP.TRANSLATIONS (ASSOC IMAGESTREAMTYPE CONS FFETCHFIELD DSPFONT CHARWIDTH -MAPCAR LIST* LIST CL:APPLY FUNCTION FREPLACEFIELD) \\ACTONDISKPAGES (FFETCHFIELD LOCF \\ADDBASE SUB1 -IDIFFERENCE \\HILOC IPLUS IMINUS \\LOLOC SELECTC LIST IGREATERP PLUS FREPLACEFIELD \\MISCAPPLY* -FUNCTION ILESSP EMPOINTER \\VAG2 \\GETBASE \\BOXIDIFFERENCE \\CLOCK0 SIGNED LLSH) -SEDIT::GROW-SELECTION-LITATOM (SEDIT::GROW-SELECTION-DEFAULT SEDIT::SET-SELECTION-ME) INTERPRESSBITMAP - (OPENIMAGESTREAM FFETCHFIELD IDIFFERENCE TIMES STRINGWIDTH IMOD - + CONSTANT FQUOTIENT CLOSEF) -\\CLEARBYTES (PLUS \\ADDBASE FOLDLO LRSH SUB1 \\CLEARWORDS) FB.MENU.WHENSELECTEDFN (ADD.PROCESS PACK*) - PARSE.NSNAME (SELECTQ FREPLACEFIELDVAL NCREATE FFETCHFIELD LISPERROR MKSTRING STRPOS SUBSTRING SUB1 -ADD1) \\DISKERROR (M44.SIGNAL.DISK.ERROR FFETCHFIELD) MB.SELFN (FREPLACEFIELDVAL NCREATE LIST -IMAGEOBJPROP APPLY* FFETCHFIELD) ONEDINSPECT.PROPWIDTH (STRINGWIDTH IPLUS CHARWIDTH) \\INBETWEENP ( -GREATERP) SI::CONDITION-CASE-ERROR (CL:ERROR) CONSCOUNT (BOXCOUNT) \\INSTANCE-P (\\INSTANCEP.UFN -\\ATOMPNAMEINDEX NTYPX \\LOLOC SHOULDNT) UPDATECHANGED1 (TESTRELQ TESTTABLE FASSOC MSGETDEF -MSUPDATEFN1 TERPRI MSERASE LIST PUTHASH) RAISE-SIGNAL (CL:FIRST) GETSUPERTYPE (\\TYPENUMBERFROMNAME -\\GETDTD \\ADDBASE ITIMES FFETCHFIELD \\TYPENAMEFROMNUMBER) RESOLVE-USE-PACKAGE-CONFLICT (CL:SORT -MAKE-CONDITION CL:FLET) DEFPACKAGE (REMOVE-COMMENTS CL:FIND-PACKAGE ERROR LIST SELECTQ -CL::%PACKAGE-NAMESYMBOL CL:MAKE-SYMBOL CL:USE-PACKAGE ENTER-NEW-NICKNAMES EXPORT MAPCAR CL:INTERN -IMPORT MAPCONC CL::%PACKAGE-SHADOWING-SYMBOLS CL:SHADOW CL:SHADOWING-IMPORT APPLY CONS SHOULDNT -CL:PACKAGE-NAME) OPT.NONILVAR (OPT.NONILVAR) \\TYPENAMEFROMNUMBER (ADD1 \\INDEXATOMPNAME \\GETDTD -\\ADDBASE ITIMES FFETCHFIELD) \\FM.CHANGESTATE (WINDOWPROP \\FM.NWAY-CHANGESTATE SELECTQ \\FM.ITEMPROP - FFETCHFIELD \\FM.TOGGLE-CHANGESTATE \\FM.3STATE-CHANGESTATE \\FM.STATE-CHANGESTATE) GLOBALVARP (FMEMB - GETPROP) \\DSPPOPSTATE.PSC (FFETCHFIELD FREPLACEFIELD) BYTESININT.IP (FOLDHI LRSH IPLUS ADD1 -INTEGERLENGTH) GETFIELDSPECS (COPY \\GETDTD \\ADDBASE ITIMES \\TYPENUMBERFROMNAME NTYPX FFETCHFIELD) -|BitFieldShiftedMask| (IDIFFERENCE LLSH |BitFieldFirst| IPLUS |BitFieldWidth|) SETY.PRESS (FFETCHFIELD - LRSH \\BOUT LOGAND) INTERPRESS.BITMAPSCALE (MIN FQUOTIENT TIMES) VARSBOUNDINFORM (APPEND ARGLIST -GETPROP MAPCAR SELECTQ CONS CHECKTRAN VARSBOUNDINFORM GETLIS MACROEXPANSION) TEST-PROCEED-CASE ( -CONDITIONS::RESTART-TEST CL:FUNCALL) CL:IN-PACKAGE (DECLARE CL:FIND-PACKAGE CL:APPLY) CH.ISMEMBER ( -COURIER.EXPEDITED.CALL CH.FINDSERVER PARSE.NSNAME FIXP CH.PROPERTY CH.GETAUTHENTICATOR) -CL:RENAME-PACKAGE (DECLARE \\SIMPLE-STRINGIFY CL:MAKE-SYMBOL CL:FIND-PACKAGE CL::%PACKAGE-NAME -CL::%PACKAGE-NAMESYMBOL CL::%PACKAGE-NICKNAMES) NCREATE (NCREATE2 \\TYPENUMBERFROMNAME) -\\DOWRITEDISKPAGES (FFETCHFIELD \\GETBASE ADD1 FREPLACEFIELD \\DOACTONDISKPAGES SUB1 \\ASSIGNDISKPAGE -PLUS FUNCTION \\GETDISKCB LOCF \\ADDBASE \\REALDISKDA \\LOLOC EMPOINTER \\VAG2 \\CLEANUPDISKQUEUE -IMINUS) TOPWP (FFETCHFIELD) WALK-PROCEED-CASES (CL:FLET) IRM.DISPLAY.CREF (IMAGESTREAMTYPE -IMAGEOBJPROP STRINGREGION ADD1 IPLUS CONS SUB1 DRAWLINE PRIN1) \\DOACTONDISKPAGES (FFETCHFIELD -FREPLACEFIELD \\GETDISKCB \\GETBASE SUB1 LOGAND IMINUS IPLUS \\LOLOC ADD1 LOCF \\ADDBASE EMPOINTER -\\VAG2 PLUS \\CLEANUPDISKQUEUE) DEFAULT-PROCEED-REPORTER (CL:FORMAT PROCEED-CASE-NAME) PUTBASEPTRX ( -UNINTERRUPTABLY \\PUTBASE LOGOR LOGAND GETBASE \\GETBASE HILOC \\HILOC ADD1 LOLOC \\LOLOC) -CONDITIONS::DEFAULT-RESTART-REPORTER (CL:FORMAT CONDITIONS:RESTART-NAME) SEDIT::GET-BUTTON-STRING ( -FFETCHFIELD CL:PRIN1-TO-STRING CL:PRINC-TO-STRING) /REPLACEFIELD (LIST FETCHFIELD REPLACEFIELD) -CL:UNUSE-PACKAGE (DECLARE) CL:Y-OR-N-P (CL:APPLY CL:FLET) \\EXPECTED.FILE.TYPE (UNPACKFILENAME.STRING) - UNDOSAVE (EVQ FMEMB LIST ADD1 IMINUS ASKUSER CONS) PFI.COLLECT.DEFINERS (NCONC GET CONS LIST) -CL:UNINTERN (DECLARE CL:SYMBOL-NAME CL::%PACKAGE-SHADOWING-SYMBOLS) TYPENAMEP (\\INSTANCEP.UFN) -\\SPP.DUPLICATE.REQUEST (FFETCHFIELD LOCF \\ADDBASE) SI::INVOKE-ACTUAL-RESTART (CL:THROW CONDITIONS::RESTART-TAG - CONS CONDITIONS::RESTART-SELECTOR CL:APPLY CL:ERROR) WHO-LINE-HOST-NAME (ETHERHOSTNAME) -DELETE-PACKAGE (DECLARE REMHASH CL::%PACKAGE-NAME CL:AREF CL::%PACKAGE-INDEX) USERDATATYPES (DATATYPES -) OPT.MERGEFRAMEP (FASSOC) STKNTHNAME (IMINUS \\STACKARGPTR LISPERROR PLUS \\MYALINK OPCODES -ADDSTACKBASE \\VAG2 FFETCHFIELD IDIFFERENCE FLOOR LOGAND CONSTANT LOGXOR SUB1) DATATYPES (ADD1 -DATATYPEP LIST PLUS) ADD-SYMBOL (CL::PACKAGE-HASHTABLE-TABLE CL::PACKAGE-HASHTABLE-HASH -CL:ARRAY-TOTAL-SIZE CL::PACKAGE-HASHTABLE-SIZE FFETCHFIELD \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT -CL::PACKAGE-HASHTABLE-FREE LRSH NCONC1 CL:MAKE-ARRAY FIX FTIMES ADD-SYMBOL ITIMES FLAST) \\LISPERROR ( -ERRORX LIST ERROR) CLIPBOARD-COPY-STREAM (UNIX-GETENV CREATE-PROCESS-STREAM) CL:STRING= ( -%PARSE-STRING-ARGS WITH-TWO-UNPACKED-STRINGS %STRING-BASE-COMPARE CL::SIMPLE-STRING=) -\\FLUSH.PACKET.QUEUE (\\DEQUEUE PLUS) RESOLVE-EXPORT-MISSING (CL:SORT CL:FLET) CONDITION-PARENT ( -GETSUPERTYPE) NUKE-SYMBOL (MKSTRING %ARRAY-BASE FFETCHFIELD %ARRAY-OFFSET %ARRAY-TYPE-NUMBER) -COMPILER::CLOSURE-ANNOTATE-MV-CALL (CL:UNION COMPILER::CLOSURE-ANNOTATE COMPILER::MV-CALL-FN -COMPILER::MV-CALL-ARG-EXPRS) BLOCKCOMPILE (RESETLST LIST BLOCKCOMPILE1) LAYOUTFOREST (LAYOUTGRAPH -APPEND CONS) CL:MEMBER (CL:ERROR CL::%COMPLEX-MEMBER CL::%SIMPLE-MEMBER) DATATYPEP (\\GETDTD \\ADDBASE - ITIMES \\INDEXATOMPNAME FFETCHFIELD PLUS) RESOLVE-EXPORT-CONFLICT (CL:SORT CL:FUNCTION MAKE-CONDITION - CL:FLET) \\DSPCLIPPINGREGION.IP (FFETCHFIELD CONS) FB.CLOSE&EXPUNGE (TB.USERDATA ATTACHEDWINDOWS -WINDOWPROP FFETCHFIELD ASSOC RESETLST FB.MAKE.BROWSER.BUSY TB.FINISH.CLOSE) \\WRITEVMEMPAGES ( -\\ADDBASE IMINUS FFETCHFIELD LOCF \\DOWRITEDISKPAGES) MB.SETIMAGE (IMAGEOBJPROP STRINGWIDTH FONTPROP -CONS BITMAPCREATE DSPCREATE) COURIER.ABORT.BULKDATA (CL:THROW CL:VALUES) CL:UNEXPORT (DECLARE -CL::%PACKAGE-INTERNAL-SYMBOLS CL::%PACKAGE-EXTERNAL-SYMBOLS) RESHAPEALLWINDOWS (ATTACHEDWINDOWS -SHAPEW1 \\RESHAPEATTACHEDWINDOWSAROUNDMAINW \\BREAKAPARTATWSTRUCTURE \\BUILDATWSTRUCTURE WINDOWSIZE -IDIFFERENCE \\TOTALFIXEDWIDTH IMAX DIFFERENCE \\TOTALFIXEDHEIGHT \\SHAREOFXTRAX \\SETWINFOYSIZE -\\SHAREOFXTRAY \\TOTALPROPOSEDSIZE \\SETWINFOXSIZE IPLUS SELECTQ PLUS CREATEREGION) DINFO.UPDATE ( -FFETCHFIELD FASSOC FMEMB RESETSAVE LIST PROMPTPRINT DINFO.UPDATE.TEXT.DISPLAY FM.GETSTATE -DINFO.UPDATE.HISTORY LISTGET CLEARW GETPROMPTWINDOW) \\FM.CHANGELABEL (ATOM STRINGP BITMAPP -\\FM.ITEMPROP FFETCHFIELD APPEND LIST \\FM.GETREGIONS \\FM.GETBITMAPS SELECTQ \\FM.NUMBER-CHANGESTATE -LISTGET \\FM.3STATE-SETUPOFFBITMAP) MSCHECKBOUNDFREE (MAPC SCRATCHASH GETRELQ UNION GETTABLE FASSOC -FMEMB PUTHASH MSCHECKVARS1 GETHASH HASHARRAY FUNCTION) CL:DELETE (CL:LENGTH COMPLEX-DELETE -SIMPLE-DELETE) \\DODISKCOMMAND (FFETCHFIELD \\LOLOC LOCF \\ADDBASE EMPOINTER \\VAG2 \\REALDISKDA IPLUS - SELECTC ADD1 LOGAND RAID LLSH EMGETBASE \\GETBASE EMADDRESS OPCODES \\PUTBASE) \\ENDVECRUN ( -FFETCHFIELD FIXR FTIMES IPLUS IDIFFERENCE ILESSP \\VECENCODE IMINUS) APPENDINT.IP (SUB1 LOADBYTE -LOGAND LSH IMINUS UNFOLD LLSH MASK.1\'S PLUS) PFI.PRINT.INDEX (LIST CONCAT DATE PFI.LINES.REMAINING -PFI.CONDENSE.INDEX APPEND) RESOLVE-IMPORT-CONFLICT (CL:SORT MAKE-CONDITION CL:FLET) SETX.PRESS ( -FFETCHFIELD LRSH \\BOUT LOGAND) \\POSTSCRIPT.NSHASH (CHARCODE.DECODE) MSCOLLECTDATA (SELECTQ -LDIFFERENCE MSCOLLECTDATA UNION SHOULDNT FASSOC) \\CLEANUPDISKQUEUE (FFETCHFIELD EMGETBASE \\GETBASE -EMADDRESS OPCODES RAID LOGAND PLUS FREPLACEFIELD LRSH \\PUTBASE UNSIGNED SUB1 LLSH \\GETDISKCB -\\VIRTUALDISKDA EMPOINTER \\VAG2 \\ADDBASE) \\GETDISKCB (FFETCHFIELD) \\ACTONVMEMPAGES (\\ADDBASE -IMINUS \\DOACTONDISKPAGES) COMPILER::CLOSURE-ANNOTATE-LAMBDA (COMPILER::LAMBDA-NEW-FRAME-P CL:UNION -COMPILER::LAMBDA-OPTIONAL COMPILER::CLOSURE-ANNOTATE CL:SECOND COMPILER::LAMBDA-KEYWORD CL:THIRD -COMPILER::LAMBDA-BODY CL:DELETE-IF CL:APPEND COMPILER::LAMBDA-REQUIRED LIST MAPCONC NCONC CL:FIRST -COMPILER::LAMBDA-REST CL:FOURTH COMPILER::LAMBDA-CLOSED-OVER-VARS) INSPECT/AS/RECORD (MENU SORT LIST -FUNCTION FREPLACEFIELDVAL NCREATE CONS INSPECT) OPT.FRAMEMERGE (FNTH GETHASH NCONC FRPLACA IPLUS CONS -OPT.PRATTACH OPT.NONILVAR SUB1) CROPMARK.PUTFN (PRINT IMAGEOBJPROP) BCOMPL1A (NCONC FILECHANGES NCONC1 - EVAL \\GETSTREAM CONS) MB.DISPLAY (SELECTQ IMAGESTREAMTYPE IMAGEOBJPROP DSPXPOSITION DSPYPOSITION -IDIFFERENCE DSPFONT FONTCOPY) ONEDINSPECT.REPAINTFN (DSPCLIPPINGREGION IPLUS WINDOWPROP XCL::PROFILIZE - CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES SUB1 FONTPROP APPLY*) COURIER.READ.REP ( -COURIER.READ \\MAKE.COURIER.REP.STREAM) CL:LIST-ALL-PACKAGES (DECLARE CL:FUNCTION) \\GETWINDOWWIDTH ( -\\INSUREWINDOW DIFFERENCE FFETCHFIELD ITIMES) SPLIT89 (DUNPACK NLEFT FMEMB LIST CONS PACK LDIFF) -\\WRITEDISKPAGES (FFETCHFIELD LOCF \\ADDBASE SUB1 IDIFFERENCE \\HILOC IPLUS IMINUS \\LOLOC SELECTC -LIST IGREATERP PLUS FREPLACEFIELD UNSIGNED LOGAND LLSH \\MISCAPPLY* FUNCTION \\BOXIDIFFERENCE \\CLOCK0 - SIGNED) \\REALDISKDA (FFETCHFIELD IPLUS LLSH IREMAINDER IQUOTIENT) SEDIT::DELETE-LITATOM (FFETCHFIELD - NCHARS SEDIT::DELETE-NODES SEDIT::ATOM-POINT-TYPE) STORAGE (CREATECELL CONS LIST PLUS TERPRI -\\TYPENUMBERFROMNAME \\GETDTD \\ADDBASE ITIMES + SELECTC - STORAGE.LEFT TIMES FOLDHI LRSH IPLUS UNFOLD - LLSH ADD1) MSNLAMBDACHECK (SUBSET GETRELQ UNION GETTABLE FASSOC MSMARKCHANGE1) -FB.NAMES.DECREASING.VERSION (SELECTQ ALPHORDER FFETCHFIELD NULL.VERSIONP IGREATERP) WARNUSER (RETDWIM2 -) \\STLINP (|printout| IDIFFERENCE TERPRI) SEDIT::LINEAR-ITEM-WIDTH (FFETCHFIELD BITMAPWIDTH SHOULDNT) - OPT.FRAMEOPT (SUBSET) STORAGE.LEFT (IPLUS IDIFFERENCE SELECTC \\SET.STORAGE.STATE PLUS SMALLP -\\GETBASEPTR \\VAG2 LRSH LLSH LOGAND ITIMES UNFOLD ADD1 FQUOTIENT LIST) CROPMARK.COPYFN ( -CROPMARK.CREATE IMAGEOBJPROP) \\FM.HIGHLIGHTITEM (\\FM.DISPLAYBITMAP \\FM.ITEMPROP LISTGET FFETCHFIELD - BITBLT) MSCHECKBLOCKBASIC (LIST APPEND MEMB DOERROR GETRELQ UNION GETTABLE FASSOC NCONC1 MAPCONC) -\\INDEXATOMPNAME (\\INDEXATOMPNAME) \\GETWINDOWHEIGHT (\\INSUREWINDOW DIFFERENCE FFETCHFIELD ITIMES -DSPLINEFEED) APPENDSEQUENCEDESCRIPTOR.IP (CONSTANT SUB1 EXPT LOGOR APPENDBYTE.IP APPENDINT.IP) -\\STORAGE.TYPE (\\GETDTD \\ADDBASE ITIMES \\INDEXATOMPNAME FFETCHFIELD SELECTQ IQUOTIENT CONSTANT FIX -FQUOTIENT FUNCTION TIMES NTH ADD1 FRPLACA PLUS \\DTEST \\VAG2 LRSH LLSH LOGAND \\GETBASEPTR - BOXCOUNT -) PFI.PROCESS.FILE (SKIPSEPRCODES CL:READ ASSOC CONS CL:READ-DELIMITED-LIST) CL:AREF (ARG) -CL::\\OPENSTREAM-WITH-DEFAULT (DECLARE OPENSTREAM CL:MERGE-PATHNAMES PATHNAME) SIMPLETEXTEDIT ( -RESETLST WITH-RESOURCES LIST OPENSTREAM PACKFILENAME.STRING TTYIN GETFILEPTR CLOSEF GETRESOURCE -NEWRESOURCE MAKE-TTSCRATCHFILE) \\STORAGE.HUNKTYPE (CONSTANT LIST NTH ADD1 \\STMDSTYPE) -\\FM.DISPLAYITEM (\\FM.DISPLAYBITMAP \\FM.ITEMPROP LISTGET FFETCHFIELD BITBLT) MSCHECKFNINBLOCK ( -GETPROP UNION GETRELQ GETTABLE FASSOC DOERROR FMEMB) \\CHECKFREEPAGE (LOCF \\ADDBASE \\VAG2 -FFETCHFIELD \\GETBASE UNSIGNED LOGAND SUB1 LLSH) SHOWRECTANGLE.PRESS (FFETCHFIELD LRSH \\BOUT LOGAND) -APPENDIDENTIFIER.IP (NCHARS MKSTRING SUB1 %ARRAY-OFFSET FFETCHFIELD %ARRAY-BASE IPLUS -%ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE) PFI.PRINT.MULTI.INDEX ( -LISTGET PFI.LINES.REMAINING CONCAT DATE CONS MAX STRINGWIDTH ASSOC FFETCHFIELD FRPLACD PLUS RPLACA -PFI.MERGE.INDICES DSPLEFTMARGIN TIMES DSPSCALE + - DSPRIGHTMARGIN IQUOTIENT REVERSE LOGOR RPLACD -PFI.COMPUTE.INDEX.SHAPE PFI.CHOOSE.BEST EVAL CL:FIND-PACKAGE CL:ERROR FIND-READTABLE PFI.PRINT.INDICES - PFI.SORT.INDICES) INSPECT/TYPERECORD (INSPECT) MSUPDATE (SUB1 PRIN2 ALLCALLS APPLY* FMEMB FASSOC) -FIND-SYMBOL* (\\CREATECELL CL:VALUES) WHO-LINE-CHANGE-USER (FREPLACEFIELDVAL NCREATE CONS LOGIN) -TTPRINSPACE (+ TTCRLF BLTCHAR TTYDISPLAYSTREAM PLUS TIMES CHARWIDTH) INTERN* (DECLARE) SETUPFONTS.IP ( -FFETCHFIELD FONTCREATE) OPT.SETDEFREFS (FRPLACD FASSOC CONS) \\STMDSTYPE (POSITION - NCHARS PRINTNUM -TAB |printout| TERPRI) CROPMARK.GETFN (READ VRULE.CREATE) \\TEDITMENU.CREATE (\\TEXTMENU.DOC.CREATE) -FIXATOM2 (ARG) NTH (CONS SUB1) RESOLVE-UNINTERN-CONFLICT (CL:SORT MAKE-CONDITION CL:FLET) -SEDIT::COPY-STRUCTURE-STRING (FFETCHFIELD CONCAT FREPLACEFIELDVAL NCREATE SEDIT::ADJUST-WIDTH -SEDIT::STRINGWIDTH) COMPILER::CLOSURE-ANNOTATE-IF (CL:UNION COMPILER::CLOSURE-ANNOTATE COMPILER::IF-PRED - COMPILER::IF-THEN COMPILER::IF-ELSE) BCOMPL.BODY (PACKFILENAME FMEMB UNPACKFILENAME OPENSTREAM LIST -RESETLST RESETSAVE INPUT APPEND NCONC MAPCAR RCOMP3 FULLNAME) \\CLEARCB (FFETCHFIELD) -\\IDLE.EXIT.ABORT (STKPOS ERROR!) \\HLSVALUEFN (IPLUS FIX FTIMES FPLUS FQUOTIENT FDIFFERENCE) -ICONW.PRINT-JUSTIFIED (DSPCLIPPINGREGION FONTCOPY SELECTQ FONTPROP \\ICONW.FORMAT.TITLE IQUOTIENT -ITIMES FLENGTH IPLUS IDIFFERENCE IMIN LRSH NTHCHARCODE PLUS) COURIER.WRITE.BULKDATA (LENGTH LRSH -\\BOUT LOGAND PLUS IDIFFERENCE) IRM.LOAD-GRAPH (INFILEP PACKFILENAME DINFO.READ.GRAPH) MSUPDATEFN1 ( -GETRELQ UNION GETTABLE FASSOC TESTRELQ TESTTABLE MSGETDEF) MAKE-DO-SYMBOLS-CODE (CL:FIRST CL:SECOND -CL:THIRD CL:FOURTH CL:FIFTH CL:SIXTH GENSYM) \\TEDIT.HCPYFMTSPEC (DSPSCALE FIXR FTIMES FFETCHFIELD -CONS MAPCAR SCALEPAGEUNITS FREPLACEFIELDVAL NCREATE) \\VIRTUALDISKDA (IPLUS ITIMES LOGAND LRSH -FFETCHFIELD) OPT.DEFREFS (FASSOC) \\STMDS.APPROX (- NCHARS |printout| PRINTNUM) CROPMARK.IMAGEBOXFN ( -DSPSCALE SELECTQ IMAGESTREAMTYPE CONS) \\FM.CPUTITEMPROP (SELECTQ ERROR LIST) MSCHECKBLOCK (UNION EVAL - EVALV APPEND SELECTQ DOERROR CONS FMEMB GETRELQ GETTABLE FASSOC GLOBALVARP TESTRELQ TESTTABLE LIST -ZEROP POSITION NCONC DREVERSE PRINTERROR PRIN1) ONEDINSPECT.BUTTONEVENTFN (WINDOWPROP -WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES LOGAND -ONED.TRACKCURSOR FONTPROP FUNCTION FFETCHFIELD CL:FUNCALL) CGETWINDOWPROP (SUBST LIST SELECTQ CONSTANT - RECORDACCESSFORM KWOTE) APPENDBYTE.IP (\\BOUT) PFI.PRINT.FILECREATED (DSPFONT MAPCAR STRINGWIDTH + -DSPLEFTMARGIN APPLY TERPRI LIST FFETCHFIELD PFI.PRINT.ENVIRONMENT) GETDEF.I.S.OPR (CONS KWOTE GETPROP -LIST) \\PARTEND.PRESS (FFETCHFIELD LRSH \\BOUT LOGAND IDIFFERENCE FOLDHI IPLUS GETFILEPTR -FREPLACEFIELD \\PAGEPAD.PRESS) RESETOPENFILES (LIST FUNCTION OPENSTREAM) ICONW.TITLE (WINDOWPROP ERROR -) CWINDOWPROP (LIST TERPRI CGETWINDOWPROP CONS) BRECOMPILE2 (ADD1 NCHARS IPLUS NTHCHARCODE ILEQ PLUS) -SEDIT::PARSE--LIST (LISTGET) SEDIT::COPY-SELECTION-LITATOM (FFETCHFIELD SEDIT::DETRANSLATE-CHARS -SUBSTRING SEDIT::COPY-SELECTION-DEFAULT) PUSH-IP-STACK (STREAMPROP CONS) COMPILER::CLOSURE-ANNOTATE-LABELS - (CL:DELETE-IF CL:UNION COMPILER::CLOSURE-ANNOTATE COMPILER::LABELS-BODY COMPILER::LABELS-FUNS -COMPILER::LABELS-CLOSED-OVER-VARS) \\TEDIT.UPDATE.SHOWSEL (FFETCHFIELD) BULKDATA.GENERATE.NEXT (SUB1 -FRPLACA GETWORD IPLUS LLSH \\BIN FRPLACD COURIER.READ) CL:FIND-ALL-SYMBOLS (MKSTRING CL:FUNCTION) +) MAKEINTERPRESS (TEXTTOIMAGEFILE) \DEQUEUE (\DTEST UNINTERRUPTABLY) \INITCONSPAGE (RAID LOGXOR +\ADDBASE IDIFFERENCE) IRM.DISPLAY.REF (FASSOC DINFO.UPDATE LIST PRINTOUT PRIN1 GETPROMPTWINDOW) +\INSPECT/CODE/RESHAPEFN (WINDOWPROP SUB1 IDIFFERENCE FONTPROP IPLUS DSPYPOSITION) +COMPILER::COMPILE-FILE-PROCESS-FUNCTION (COMPILER::COMPILE-AND-DUMP) \ALLOCMDSPAGE (\GETBASEPTR +\PUTBASEFIXP IDIFFERENCE FOLDLO LRSH \ADDBASE \NEWPAGE) \NSFILING.EVENTFN (SELECTQ +\NSFILING.CLOSE.CONNECTIONS APPEND LOGAND CONSTANT LOGOR TERPRI CLOSEF \REMOVEDEVICE) TTY/EDITL (CLOCK + LAST GETPROP FMEMB CONS EDITL0 LIST IPLUS IDIFFERENCE) \TFBRAVO.INIT.CHARLOOKS (\TFBRAVO.GET.FONTSIZE + \TFBRAVO.GET.FONTSTYLE) \INVALIDATE.PROCESS.WINDOW (WINDOWPROP) \CLOSELEAFCONNECTION (LIST) +DELETE/AND/DISPLAY/LINK (TOLINKS TERPRI LINKPARAMETERS CONSTANT) EDITFB (EDITLOADFNS? NARGS LIST +TERPRI) \SETSPACE.PRESS (\BOUT IPLUS LLSH) LASTN (FNTH CONS NCONC1) COMPILER::*COMPILE-FILE-CONTEXT* ( +COMPILER::MAKE-COMPILER-CONTEXT) DRAWMARGINSCALE (DSPCLIPPINGREGION DSPOPERATION IREMAINDER +IDIFFERENCE LRSH STRINGWIDTH PLUS IPLUS IMINUS) \PFGetAllocationMapPage (\PFGetPage ELT FIXP +\PFVolumeNumber) DBG::SET-UP-DEBUGGER-WINDOW (WINDOWPROP WINDOWADDPROP THIS.PROCESS TTYDISPLAYSTREAM) +\TFBRAVO.WRITE.PARAGRAPH (SELECTQ ADD1 \TFBRAVO.WRITE.RUNS \TFBRAVO.APPLY.PARALOOKS) CL::%%LLSH8 (LLSH +) CL::OPTIMIZE-BYTE (+ CL:ASH) \NSFILING.GET.NEW.SESSION (\GETFILINGCONNECTION +\NSFILING.DISCARD.SESSION) \CHECKDSTCHANGE (IDIFFERENCE IGREATERP) NUMBERPAD.READER.HANDLE.CHAR ( +WINDOWPROP SELECTQ FIX SUB1 MKSTRING MKATOM SUBSTRING PLUS STRPOS IQUOTIENT MINUS FLOAT NCHARS ABS +ADD1 FQUOTIENT EXPT DIFFERENCE TIMES) SEDIT::SET-PROPS (LISTGET CL:FUNCTION XCL:SAVE-PROFILE +XCL:COPY-PROFILE SEDIT::EVAL-IN-PROCESS PROCESSPROP THIS.PROCESS TTY.PROCESS XCL::PROFILE-ENTRY-VALUE) + \TEDIT.UNDERLINE.SEL.ON (TEDIT.LOOKS) \TEXTMENU.SET.TOGGLE (MBUTTON.FIND.BUTTON FINDNODE-INDEX +TEXTOBJ) \SET.PROCESS.NAME (TYPENAME MKSTRING ERROR UNINTERRUPTABLY CONCAT PLUS) TB.DISPLAY.LINES ( +IMIN IMAX TB.NTH.ITEM DSPXPOSITION PLUS WINDOWPROP + TIMES -) CHECKCONSPAGES (NTYPX \MAPMDS FUNCTION) +CLISPFOR (DWIMUNDOCATCH LISTGET1 LIST RESETVARS .RESETLST. CONS CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION CL:CATCH XNLSETQ CLISPFOR0) \PEEKNS (COERCE-TO-NSADDRESS OPENP OPENFILE) +\MAPMDS (FIXP \TYPENUMBERFROMNAME IMIN NTYPX PLUS) COURIER.WRITE.BULKDATA (LENGTH \BOUT PLUS +IDIFFERENCE) \CHECKCONSPAGE (EVENP RAID \ADDBASE PLUS) SEDIT::SET-OPTIONS (LIST) CL::%%LRSH1 (LRSH) +\MAYBEPRINTPACKET (SELECTC SELECTQ APPLY*) CURSOR (IDIFFERENCE SUB1) TEDIT.DEACTIVATE.WINDOW ( +WINDOWPROP \TEDIT.QUIT REVERSE \TEDIT.UNSPLITW ATTACHEDWINDOWS TEXTOBJ DREMOVE) INSPECT.FLIPSELECTION +(BLTSHADE) \PROMISCUOUS.OFF (SELECTQ \PUTBASE EMADDRESS OPCODES \10MB.STARTDRIVER) +%%TYPE-SIZE-TO-TYPENUMBER (CL:ASSOC) \ETHEREVENTFN (SELECTQ \3MB.CREATENDB \10MB.CREATENDB \GETDTD +\ADDBASE ITIMES NTYPX \NS.SETTIME \PUP.SETTIME SELECTC \DoveMisc.TODValid > IDATE CONSTANT CL:FUNCALL +CLRHASH) \TFBRAVO.GET.FONTSTYLE (FASSOC) DBG::REUSE-CURRENT-WINDOW (PRINTOUT PROCESSPROP THIS.PROCESS +PRIN1) \FIXLINELENGTH.PRESS (IQUOTIENT IDIFFERENCE) COMPILER::EXPAND-OPENLAMBDA-CALL (CL:FUNCTION +CL:FIRST CONS) SEDIT::ASSIGN-FORMAT-LIST (CL:FUNCALL) CL::%%CONSTANT-BYTESPEC-P (CL:EVAL) +\TEDIT.STRIKEOUT.SEL.OFF (TEDIT.LOOKS) OPT.OPTCHECK (FMEMB TAILP OPT.COMPILERERROR EVERY CONS LIST +FASSOC MEMB) CL::%%RATIONAL-FLOAT (+ CL:ASH - CL::%%BUILD-RATIO) \LFRemoveDirEntry (\BOUT \BIN PLUS +SPREADAPPLY* IPLUS FORCEOUTPUT) UNDOEDITL (UNDOEDITCOM LIST CONS) SPP.OPEN (RESETLST \SPPCONNECTION +LISTGET SETUPTIMER IMAX TIMES NSNET.DISTANCE SELECTQ \SPP.CREATE.STREAMS) MSUPDATE (SUB1 PRIN2 +ALLCALLS APPLY* FMEMB FASSOC) \PFCreatePage (\PFTransferFilePage) CL::%%RATIONALIZE-FLOAT (+ CL:ASH - +IPLUS LLSH LRSH LOGAND \MAKEFLOAT CL:1- CONSTANT CL:*) \KEYHANDLER1 (LOCF \ADDBASE SUB1 FUNCTION +\GETBASE \BOXIDIFFERENCE \RCLK \DOMOUSECHORDING LOGAND FFETCHFIELD IPLUS) \TEDIT.STRIKEOUT.SEL.ON ( +TEDIT.LOOKS) SEEFILE (OPENP OPENSTREAM SUB1 GETEOFPTR BIN CONCAT CHARACTER IPLUS TERPRI PLUS) +COMP.STFN (COMP.ST CONS FASSOC IDIFFERENCE) \UNWIND.PROCESS (RETTO) DINFO.CREATE.FMENU (FONTP FREEMENU +) \FM.NWAY-MOVEDFN (ASSOC \FM.ITEMPROP LISTGET WINDOWPROP FFETCHFIELD BITBLT \FM.DISPLAYBITMAP) +MODERNWINDOW.UNSETUP (CL:PACKAGE-NAME CL:SYMBOL-PACKAGE CL:INTERN CONCAT) SEDIT::FIND-NODE ( +SEDIT::NEXT-LINEAR-ITEM IPLUS SEDIT::LINEAR-ITEM-WIDTH) SETQ (\SETVAR \EVAL) CL::%%FLOAT (\FLOATBOX +\VAG2) \TEDIT.UCASE.SEL (TEDIT.SEL.AS.STRING U-CASE) MSCOLLECTDATA (SELECTQ LDIFFERENCE MSCOLLECTDATA +UNION SHOULDNT FASSOC) \ETHERINIT (\DEFINEDEVICE FUNCTION) FB.HARDCOPY.DIRECTORY (RESETLST WINDOWPROP +DSPSCALE DSPRIGHTMARGIN DSPLEFTMARGIN DSPFONT CONCAT LIST* STREAMPROP TIMES TB.COLLECT.ITEMS IMAX +STRINGWIDTH + FB.HARDCOPY.MAXWIDTH LIST PLUS - FIXR IQUOTIENT RPLACA DSPXPOSITION) XYSECT (ITIMES IABS + IMINUS MSECT LINEY CONS) AND (\EVAL) /DWIMCHECKTRAN (GETHASH) EDITL0 (POSITION CLBUFS) WRITEIMAGEOBJ +(LIST KWOTE) PROCESSP (ALIVEPROCP FFETCHFIELD) SEDIT::QUERY-THROW-AWAY-CHANGES (MENU CL:FORMAT ASKUSER +) TB.LAST.VISIBLE.ITEM# (IMIN \DTEST CL:CEILING - DSPCLIPPINGREGION) DEL.PROCESS (\COERCE.TO.PROCESS +FIND.PROCESS THIS.PROCESS FUNCTION LIST) CL::BOA-ARG-LIST-WITH-INITIAL-VALUES (CL:COPY-TREE +CL::PS-ALL-SLOTS CL:MEMBER CL:ERROR CL::PSLOT-INITIAL-VALUE CL::FIND-SLOT) MAP.PROCESSES (APPEND +FFETCHFIELD) TEDIT.CARETLOOKS (TEXTOBJ \TEDIT.UNIQUIFY.CHARLOOKS \TEDIT.CARETLOOKS.VERIFY +\TEDIT.PARSE.CHARLOOKS.LIST) COMP.STPOP (RPTQ COMP.ST) STREAMPROP (PUTSTREAMPROP ARG GETSTREAMPROP +\ILLEGAL.ARG) \FM.NWAY-DOWNFN (ASSOC \FM.ITEMPROP LISTGET WINDOWPROP FFETCHFIELD BITBLT +\FM.DISPLAYBITMAP) \DSKDISPLAY.REPAINTFN (DIRECTORYNAME TERPRI MAPC \PFGetVols printout +\PFVolumeNumber) RELPROCESSP (DEADPROCP FFETCHFIELD) SPP.DESTADDRESS (GETSPPCON FFETCHFIELD LOCF +\ADDBASE) GETSTREAMPROP (SELECTQ \EXTERNALFORMAT LISTGET) \NSRANDOM.RELEASE.HANDLE (FREPLACEFIELD PLUS + FFETCHFIELD \NSRANDOM.RELEASE.LOCK) \TEXTMENU.TOGGLE.INIT (IMAGEFNSCREATE FUNCTION) \LFReturnNextFile + (FRPLACA) PUTSTREAMPROP (SELECTQ \EXTERNALFORMAT LISTGET LIST) MAKEFILE (MKLIST ADDFILE GETPROP +SELECTQ SHOULDNT ASKUSER FINDFILE FILEDATE FILEPKG.CHANGEDFNS INFILEP FILEPKG.MERGECHANGES CONS LIST +RESETSAVE MAPC ERSETQ EVAL PRETTYDEF ASSOC MEMB) CHECKFORCHANGED (MSINTERPRETSET UPDATEFN) +PROCESS.RETURN (RETTO) \PFCreateFreePage (\PFCreatePage ELT FIXP \PFVolumeNumber) RESTART.PROCESS ( +\COERCE.TO.PROCESS FIND.PROCESS UNINTERRUPTABLY THIS.PROCESS RETTO FUNCTION LIST) \GETFILINGCONNECTION + (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \VALID.FILING.CONNECTIONP +\NSFILING.DISCARD.SESSION \NSFILING.LOGIN) *ATTACHED-WINDOW-COMMAND-SYNONYMS* (LIST CONS) +TB.RECONSIDERRANGE (IMIN IMAX TB.NTH.ITEM PLUS) INSTALL-PROTOTYPE-DEFN (CL:FLET CL:FORMAT MKLIST +XCL::PROTOTYPE-DEFN-TYPES INTERSECTION APPEND MAPCAR LIST MENU XCL::PROTOTYPE-DEFINERS-FOR-TYPE) +OPT.CCHECK (OPT.COMPILERERROR) TB.REPLACE.ITEMS (\DTEST PLUS ADD1 TB.FIND.SELECTED.ITEM +TB.REV.FIND.SELECTED.ITEM DSPCLIPPINGREGION TB.DISPLAY.LINES TB.FIRST.VISIBLE.ITEM# +TB.LAST.VISIBLE.ITEM#) MSSOLVE (MSLISTSET SELECTQ OUTPUT CL:VALUES LIST PRINT SUBSET MSMEMBSET) +MSUPDATEFN1 (GETRELQ UNION GETTABLE FASSOC TESTRELQ TESTTABLE MSGETDEF) WAKE.PROCESS ( +\COERCE.TO.PROCESS FIND.PROCESS \RUN.PROCESS) \VFMSplit1 (\VFMGetBufferFor IQUOTIENT \ADDBASE +IDIFFERENCE \BLT MESASIZE) EDITL1 (ERSETQ LISPXREAD XNLSETQ EDITCOM CONS LIST CLBUFS) SCALEREGION (FIX + FTIMES) \SUSPEND.PROCESS (UNINTERRUPTABLY) DINFO.ICONFN (WINDOWPROP TITLEDICONW) \FM.NWAY-MESSAGE ( +LISTGET ASSOC \FM.ITEMPROP WINDOWPROP SELECTQ) SEDIT::FINALIZE-MOUSE-SELECTION (FREPLACEFIELDVAL +REPLACEFIELDVAL FETCHFIELD SEDIT::SHOW-CARET) SPP.DSTYPE (GETSPPCON FFETCHFIELD LOGAND +\SPP.PREPARE.INPUT SPP.STREAM.ERROR SPREADAPPLY*) SUSPEND.PROCESS (\COERCE.TO.PROCESS FIND.PROCESS +THIS.PROCESS) PROMPTINWINDOW (NUMBERP HEIGHTIFWINDOW ITIMES FONTPROP DEFAULTFONT WIDTHIFWINDOW IMAX +STRINGWIDTH CREATEW CREATEREGION DIFFERENCE CARET ERSETQ PROMPTFORWORD LIST ERROR!) +\TEXTMENU.TOGGLE.WHENOPERATEDFN (SELECTQ \TEXTMENU.TOGGLE.SHOWSELFN) PLCHAIN (PLCHAIN) PROCESS.RESULT +(\DTEST FFETCHFIELD CREATE.EVENT CONCAT) SEDIT::AWAKE-ME (STKPOS) COMPILER::COMPLETELY-EXPAND ( +COMPILER:OPTIMIZE-AND-MACROEXPAND-1) CL::BOA-SLOT-SETFS (CL::PS-TYPE) DBG::*DEBUGGER-TERMINAL-TABLE* ( +COPYTERMTABLE) SELECT.FNS.EDITOR (MENU APPEND) \POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS (PSCFONT.SPELLFILE + PSCFONTFROMCACHE.SPELLFILE PSCFONT.READFONT) LISTPUT (ERRORX LIST CONS) \TEDIT.UNDERLINE.SEL.OFF ( +TEDIT.LOOKS) FB.ICONFN (TITLEDICONW WINDOWPROP) \CURVE (\DSPTRANSFORMX IPLUS IDIFFERENCE LRSH SUB1 +\DSPTRANSFORMY IABS IMINUS ADD1 ITIMES DSPDESTINATION \GETBASE \TOTOPWDS \FBITMAPBIT \BBTCURVEPT +\CONVERTTOFRACTION FPLUS \GETINTEGERPART IMAX FQUOTIENT PLUS) TEDIT.KILL (WINDOWPROP THIS.PROCESS) +KNOTLINE (XYPT.X XYPT.Y MAKELINE DIFFERENCE CONS REVERSE) PROCESS-STATUS (FIND.PROCESS \STACKARGPTR) +DINFO.FMW.CLOSEFN (WINDOWPROP DINFOGRAPH REMOVEPROMPTWINDOW) \FM.NWAY-SETUP (\FM.ITEMPROP FFETCHFIELD +FUNCTION LISTGET) \KEYBOARDOFF (LOGAND LOGXOR \GETBASE) FB.SET.DEFAULT.NAME.WIDTH (IPLUS DSPLEFTMARGIN + CHARWIDTH) \DOMOUSECHORDING (LOGXOR LOGAND LIST LOGOR \RCLK LOCF \ADDBASE) \TEXTMENU.TOGGLE.SHOWSELFN + (IMAGEOBJPROP IMAGEBOX) \LFFindNextFile (\LFDirectorySearch \GETFILEPTR SPREADAPPLY* \BIN \WIN IPLUS +LLSH LIST PLUS \LFFileName CONCAT SUBSTRING) PROCESS.FINISHEDP (\DTEST FFETCHFIELD) \PFTrimHelper ( +\PFDsplyVolumes) \TRACKCURSOR (\BLT LOCF \ADDBASE IDIFFERENCE IPLUS SUB1 UNSIGNED LOGAND IMINUS LLSH +\PUTBASE) TB.SET.FONT (FONTCREATE DSPFONT FONTPROP TIMES - DSPCLIPPINGREGION WINDOWPROP CL:FUNCALL) +\SPP.STREAM.LOST (SPP.STREAM.ERROR SPREADAPPLY* GETSPPCON FFETCHFIELD) \DEFPRINT.BY.NAME (IPLUS + +NCHARS FRESHLINE MKSTRING) TB.CONSIDERRANGE (IMIN IMAX TB.NTH.ITEM PLUS) INSPECT.INVERTREGION ( +BLTSHADE) NCHARS (IPLUS \GTREADTABLE SUB1 ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE FUNCTION +) FB.GET.NEWPATTERN (FB.PROMPTFORINPUT DIRECTORY.FILL.PATTERN) NOTIFY.EVENT (\DTEST) \OUTCHAR ( +CL:FUNCALL) \DOBUFFEREDTRANSITIONS (\ADDBASE IPLUS \STKSCAN INTERRUPTED) \PRINTADDR (WITH-RESOURCES +SELECTQ SYSTEMTYPE \CONVERTNUMBER \HILOC \CKPOSSOUT \LOLOC LOGAND LOC SYSTEMTYPEPUNT GETRESOURCE +NEWRESOURCE ALLOCSTRING CONCAT) SEDIT::GET-CONTEXT (SEDIT::SUBNODE CREATE.EVENT CONCAT) MSSHOWUSE ( +MSGETDEF EDITLOADFNS? GETPROP LIST FUNCTION TERPRI FRPLNODE CONS APPLY* ASSOC GETRELATION +PARSERELATION) COMPILER::ALPHA-UNWIND-PROTECT (COMPILER::MAKE-UNWIND-PROTECT COMPILER::ALPHA-LAMBDA +CL:GENSYM) CALLS (GETRELATION SUBSET GETPROP CONS LIST GETD GETP FNCHECK CALLSCCODE FRPLACA PACK* +NCONC RESETVARS .RESETLST. CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION APPLY* ALLCALLS UNION +CONSTANT MSVBNOTICED ASSOC COLLECTFNDATA) \SOUT (SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE \GETBASETHIN +\GETBASEBYTE) EDITL2 (LISPXPRIN1) FRESHLINE (OVERWRITEABLE LOGAND \EOFP SPREADAPPLY* GETSTREAM) +MSNLAMBDACHECK (SUBSET GETRELQ UNION GETTABLE FASSOC MSMARKCHANGE1) PROCESS.TTY (\COERCE.TO.PROCESS +FIND.PROCESS THIS.PROCESS PROCESS.EVALV) CL::ARGUMENT-NAMES (CL:MAPCAN CL:FUNCTION) PRINTERRORXIP ( +\DTEST PRIN1 ASSOC CONCAT OCTALSTRING PRIN2) TTY.PROCESSP (THIS.PROCESS TTY.PROCESS) +\TEDIT.SUPERSCRIPTSEL (TEDIT.LOOKS LIST) \LEAF.ACKED (FREPLACEFIELD PLUS FFETCHFIELD) \CARET.DOWN ( +SETUPTIMER) YSECT (ITIMES IABS IMINUS MSECT LINEY) \STREAM.DEFPRINT (SELECTC \DEFPRINT.BY.NAME CONCAT +CL:STRING-CAPITALIZE STRING) CL:STRING-CAPITALIZE (WITH-ONE-STRING CL:MAKE-STRING) MSCHECKEMPTY ( +TERPRI FILEPKGCHANGES APPEND LIST ASKUSER ITIMES CONS) TB.SCROLLFN (RESETLST WINDOWPROP SCROLLW +TB.BROWSER.BUSY) GIVE.TTY.PROCESS (WINDOWP WINDOWPROP FFETCHFIELD LOGAND) \NSFILING.LOGIN (RESETLST +RESETSAVE LIST FUNCTION MKATOM NSNAME.TO.STRING \INTERNAL/GETPASSWORD SELECTQ CONCAT +\NSFILING.COURIER.OPEN NS.MAKE.SIMPLE.CREDENTIALS COURIER.CALL PRIN1 CONS \GET.COURIERPROGRAM GETHASH +CREATE.MONITORLOCK \CREATECELL FRPLACD \MAKE.PMAP.DEVICE) NSMAP (ARRAY PLUS SETA FIXP CHARCODE.DECODE +LOGOR LLSH) MASTERSCOPE (MSINTERPRET MKLIST PRINTOUT TERPRI) \NSFILING.UPDATE.ATTRIBUTES (NCONC LIST) +\DSKDISPLAY.BUTTONEVENTFN (LOGAND \DSKDISPLAY.REPAINTFN DSKDISPLAY MENU) SPP.SENDEOM (GETSPPCON +FFETCHFIELD WRITEABLE OVERWRITEABLE LOGAND \EOFP SPREADAPPLY* \SPP.PREPARE.OUTPUT \SPP.STREAM.LOST) +\FDEV.DEFPRINT (\DEFPRINT.BY.NAME) PAINTW.READ.AND.SAVE.SHADE (EDITSHADE BITMAPCREATE) GETTEMPLATE ( +SETTEMPLATE) MSNOTICEFILE (FASSOC FILECOMS FINDFILE NAMEFIELD GETATOMVAL GETPROP EVALV ASKUSER LIST +RESETVARS .RESETLST. CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION GETP INFILEP) \GETACCESS ( +SELECTC SHOULDNT) CH.CHANGE.ITEM (COURIER.EXPEDITED.CALL CH.FINDSERVER PARSE.NSNAME FIXP CH.PROPERTY +COURIER.WRITE.REP CH.GETAUTHENTICATOR) VERBNOTICELIST (UNION VERBNOTICELIST MSVBTABLES TERPRI ERROR!) +EDITBF (CONS EDITFPAT NCONC MEMB TAILP) \DSPFONT.PRESS (\GETFONTDESC FONTCOPY \GETCHARSETINFO +\GETBASEPTR UNFOLD LLSH \CREATECHARSET \DEFINEFONT.PRESS LOGOR FIXR TIMES \FGETWIDTH \GETBASE +IDIFFERENCE CONSTANT IMINUS FONTPROP) DBG::SIMPLE-REPORT-CONDITION (CL:PRINC) \INTERPRESSINIT ( +FUNCTION NSMAP) APPEND (\APPEND2 ARG PLUS) MENU.HANDLER (RESETLST RESETSAVE LIST LASTMOUSESTATE LOGAND + SETUPTIMER FIXP GRIDYCOORD LASTMOUSEY GRIDXCOORD LASTMOUSEX \MENU.ITEM.SELECT ERSETQ ZEROP WHICHW +PLUS MENU NESTED.SUBMENU.POS GETMENUITEM \FDECODE/BUTTON CONS ERROR!) \PERIODIC.INTERRUPTFRAME ( +SPREADAPPLY*) ALLOW.BUTTON.EVENTS (THIS.PROCESS SPAWN.MOUSE) FAX.PROPERTIES (NSPRINTER.PROPERTIES +\FAX.PARSE.NAME) \SPP.PREPARE.INPUT (GETSPPCON FFETCHFIELD \LOLOC \ADDBASE PLUS \GETSPP LIST +IDIFFERENCE CONSTANT IPLUS) INPUT (\GETSTREAM) EDITQF (MEMB CONS) OPT.DS1 (OPT.CODEFRAME OPT.DEFREFS +OPT.DS1 CONS SUB1) \PFSaveBuffers (\VFMSaveBuffer) CL::DEFINE-CONSTRUCTORS (CL::PS-CONSTRUCTORS +CL::PS-ALL-SLOTS CL::PS-NAME CL:EVERY CL:FUNCTION CL::PS-EXPORT CL:MAPCAR CL::BUILD-CONSTRUCTOR-ARGLIST + CL::BUILD-CONSTRUCTOR-SLOT-SETFS) \SETACCESS (FUNCTION) WINDOW.BITMAP (WINDOWPROP BITMAPCREATE) +TEDIT.INSERT.UPDATESCREEN (IPLUS SELECTQ DSPCLIPPINGREGION LLSH SHOULDNT) \SOFTCURSORPOSITION ( +\GETBASE) MSGETDEF (GETRELATION PARSERELATION APPLY* ASSOC LIST FASSOC EDITGETDEF CL:VALUES) +\STREAM.NOT.OPEN (LISPERROR) NEWLINE.IP (PLUS) \FM.STATE-CHANGESTATE (LISTGET \FM.ITEMPROP FFETCHFIELD + FM.CHANGELABEL) CLOSEMAINWINDOW (WINDOWPROP) \LEAF.FIX.BROKEN.SEQUIN (\GETDEVICEFROMNAME +OPENPUPSOCKET \SEQUIN.RETRANSMIT LIST PRIN1 FDEVOP SPREADAPPLY* \LEAF.RECONNECT FUNCTION +\LEAF.REPAIR.BROKEN.PUP \LEAF.USE.NEW.CONNECTION TERPRI SETUPTIMER .NAMEORSTREAM.) SEDIT::EXPANDREGIONFN + (WINDOWPROP SEDIT:GET-WINDOW-REGION SEDIT::LESS-PROMPT-WINDOW) MODERNWINDOW.BUTTONEVENTFN (LOGAND +WINDOWPROP ATTACHEDWINDOWREGION CENTRALWINDOW FONTPROP INCORNER.REGION APPLY*) XSECT (ITIMES IABS +IMINUS MSECT LINEY) PROCESS.WINDOW (\COERCE.TO.PROCESS FIND.PROCESS \INSUREWINDOW) \PFI.DO.HARDCOPY ( +WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) BPNT0 (LVLPRINT ERROR!) +ONED.TRACKCURSOR (LOGAND LASTMOUSEX LASTMOUSEY STRINGWIDTH CL:FUNCALL IPLUS ADD1 IDIFFERENCE) +\INSTALL.EXTERNALFORMAT (MKATOM CONS ERROR) \NSFILING.CLOSEFILE (LISTGET \BULK.DATA.CLOSE LOGAND +CONSTANT LOGOR CONCAT \NSFILING.ADD.TO.CACHE) \NSADDRESS.PRINT.DECIMAL (CL:TRUNCATE CONS) OPENW ( +\INSUREWINDOW WINDOWPROP) FAX.STATUS (NSPRINTER.STATUS \FAX.PARSE.NAME) SPP.CLOSE (GETSPPCON +FFETCHFIELD \TERMINATESPP) \REMOVE.EXTERNALFORMAT (MKATOM DREMOVE) \TFBRAVO.HANDLE.HEADING ( +\TFBRAVO.PARSE.PARA GETFILEPTR LIST GENSYM) PAINTW.READBRUSHSHADE (MENU APPEND MAPCAR LIST KWOTE +PAINTW.READ.AND.SAVE.SHADE) RECLOOK (RECLOOK1 FIXSPELL NCONC MAPCONC RECORDECL LIST RECORD.NAME MAPCAR + RECLOOK) ENCAPSULATEDIMAGEFNS (ASSOC IMAGEFNSCREATE FUNCTION CONS) MKATOM (\MKATOM LISPERROR PACK*) +GET.MENU.LIST (CL:ARRAY-RANK CL:ARRAY-DIMENSIONS) MSOUTPUT (OUTPUT LIST LINELENGTH) CL:ARRAY-RANK-LIMIT + (EXPT) RECORDFIELD? (STRPOS SUBATOM SUB1 RECORDFIELD? ADD1 RECORD.FIELDNAMES RECORDECL RECORD.NAME) +TB.REPAINTFN (WINDOWPROP TB.DISPLAY.LINES TB.FIRST.VISIBLE.ITEM# TB.LAST.VISIBLE.ITEM# TB.BROWSER.BUSY +) \DEFINEFONT.PRESS (FASSOC FREPLACEFIELD CONS PLUS FFETCHFIELD) DBG::PRINT-ENTRY-MESSAGE (NLSETQ +CL:PRINC CL:TYPE-OF \HILOC \LOLOC) TB.CONTIGUOUS.SELP (TB.NTH.ITEM PLUS) \NSFILING.DISCARD.SESSION ( +DREMOVE FRPLACD) \TEDIT.SMALLER.CARET (\TEDIT.PARSE.CHARLOOKS.LIST) CREATE.NUMBERPAD.READER (RESETFORM + RADIX FONTCREATE CONS APPEND FONTPROP LIST FUNCTION IPLUS CREATEW REGIONONSCREEN WIDTHIFWINDOW ITIMES + ADD1 CHARWIDTH HEIGHTIFWINDOW LENGTH BREAK.MSG.INTO.LINES TERPRI IQUOTIENT) \TEDIT.SUBSCRIPTSEL ( +TEDIT.LOOKS LIST) \FM.STATE-SELECTEDFN (LIST \FM.ITEMPROP LISTGET MENU APPLY* \FM.STATE-CHANGESTATE) +ICONBUTTONEVENTFN (LOGAND CURSOR MOVEW) \LEAF.HANDLE.INPUT (\DEQUEUE SHOULDNT PLUS FFETCHFIELD +RELEASE.PUP LIST FUNCTION KWOTE) DISMISS (SETUPTIMER IMIN GETRESOURCE NEWRESOURCE \DTEST BLOCK) +SEDIT::EXPANDFN (WINDOWPROP) LINEY (IPLUS IQUOTIENT IDIFFERENCE \IRND ITIMES) DREMOVE (DREMOVE) +TB.BUTTONEVENTFN (MODERNWINDOW.BUTTONEVENTFN FUNCTION) DINFO.CLOSEFN (WINDOWPROP) \TEXTMENU.TOGGLEFN ( +IMAGEOBJPROP SELECTQ TEXTSTREAM) OPT.DEADSETQP (SELECTQ OPT.DS1) \GET.EXTERNALFORMAT.FROM.NAME (MKATOM +) FB.DATE (DATE CONCAT SUBSTRING CHCON1) EDIT%: (MAPCAR COPY EDITCOMS CONS LIST) \PROC.RESUME ( +\MYALINK OPCODES \DECUSECOUNT) CL::DEFINE-BOA-CONSTRUCTOR (CL::BOA-ARG-LIST-WITH-INITIAL-VALUES +CL::PS-NAME CL::BOA-SLOT-SETFS CL::ARGUMENT-NAMES) MSSETUP (HASHARRAYP HASHARRAY MSSETWORDTYPE CONS +MAPC SETSYNONYM) WAITFORINPUT (GLOBALRESOURCE \CLOCK0 IDIFFERENCE GETRESOURCE NEWRESOURCE SETUPTIMER +\GETSTREAM) UPDATEFN (LITATOM TESTRELQ TESTTABLE FASSOC MSGETDEF SELECTQ TERPRI LIST) \INSERTCH ( +NCHARS SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE IGREATERP IDIFFERENCE LIST +SUBSTRING ALLOCSTRING \INSERTPIECE NCONC1 FRPLACA PLUS \CHTOPC \TEDIT.UNIQUIFY.PARALOOKS \SPLITPIECE - + IEQP) \TIMER.INTERRUPTFRAME (QUOTIENT TIMES LOCF \ADDBASE) TITLEW.BUTTONEVENTFN (MAINWINDOW +WINDOWPROP XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES APPLY*) \LFFindInfo ( +REVERSE \LFOpenOldFile \LFReadFileID FRPLACA CONS GETFILEINFO) EVAL.IN.TTY.PROCESS (\EVAL PROCESS.EVAL + TTY.PROCESS) TB.NUMBER.OF.ITEMS (\DTEST SELECTQ TB.NTH.ITEM ADD1 PLUS \ILLEGAL.ARG) +\LFWriteLeaderPage (\PFFindPageAddr) \WAITFORSYSBUFP (GLOBALRESOURCE \CLOCK0 GETRESOURCE NEWRESOURCE +SETUPTIMER) CL::%%MAKE-SMALL-FIXP-ACCESSOR (CL:FUNCTION) \PFGetFreePage (\PFGetPage ELT FIXP +\PFVolumeNumber) EVAL.AS.PROCESS (ADD.PROCESS \EVAL) \COERCE.NS.SOCKET (SUB1) \DOTRANSITIONS (LLSH +LOGAND LOGXOR IPLUS LRSH PLUS) NEXTSIZEFONT (FONTPROP FONTNAMELIST) \TK.DESCRIBEFONT (CONCAT L-CASE +FONTPROP) \FM.STATE-SETUP (\FM.ITEMPROP FFETCHFIELD FUNCTION LISTGET APPLY) CLOSEICONWINDOW ( +WINDOWPROP) TB.COPYBUTTONEVENTFN (WINDOWPROP TOTOPW DSPCLIPPINGREGION LASTMOUSEX LASTMOUSEY +TB.ITEM.FROM.YCOORD KEYDOWNP ZEROP LOGAND) SEDIT::DRAW-UNDERLINE (IDIFFERENCE BLTSHADE) \SPP.ESTABLISH + (LOCF \ADDBASE \SPP.CREATE.CON CONCAT PROCESSPROP OCTALSTRING \SPP.CREATE.STREAMS +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \SPP.PROBE LIST SPPOUTPUTSTREAM) +\CREATE.THROUGH.EXTERNALFORMAT (\INSTALL.EXTERNALFORMAT FUNCTION) SEDIT::REPAINT (DSPXPOSITION +IDIFFERENCE BITMAPWIDTH) \LFHighestVersions (LIST) DEFAULT.ADDNODEFN (PROMPTINWINDOW PACK* GENSYM +NODECREATE CURSORPOSITION) \THROUGHOUTCHARFN (\CHARSET LRSH \BOUT \CHAR8CODE LOGAND) COMPILER::ALPHA-TAGBODY + (COMPILER::MAKE-TAGBODY) ONFILE (MAPCAR SELECTQ GETRELATION FMEMB FILECOMS CONS UNION FILECOMSLST +WHEREIS) FB.FASTSEECOMMAND (FB.SELECTEDFILES FB.FETCHFILENAME CREATEW FUNCTION LIST CL:CATCH +FB.FASTSEE.ONEFILE) DBG::EMERGENCY-PANIC-LOOP (PRIN1 TERPRI) TB.DECONSIDERRANGE (IMIN IMAX TB.NTH.ITEM + PLUS) CH.ADD.ITEM.PROPERTY (PARSE.NSNAME COURIER.CALL CH.FINDSERVER FIXP CH.PROPERTY +COURIER.WRITE.REP CH.GETAUTHENTICATOR) \PEEKBIN (FDEVOP SPREADAPPLY*) \TEDIT1 (OPENTEXTSTREAM TEXTPROP + COERCETEXTOBJ) FB.BROWSECOMMAND (FB.SELECTEDFILES FB.FETCHFILENAME UNPACKFILENAME.STRING MEMB NCHARS +MKATOM LDIFF LISTGET CL:APPLY CONCAT GETHOSTINFO DIRECTORYNAMEP) CLISPRPLNODE (LIST FRPLACD ERRORX) +\THROUGHIN (\BIN) \TFBRAVO.FIND.LAST.TRAILER (GETSTREAM GETFILEPTR \BACKBIN CHARACTER \PEEKBIN) +WINDOW.MOUSE.HANDLER (WHICHW DOUSERFNS LOGAND KEYDOWNP OPENWP WINDOWPROP SUB1 APPLY*) +INTERPRESS.OUTCHARFN (IGREATERP \GETBASE \CHARSET LRSH SELCHARQ NEWLINE.IP \DSPXPOSITION.IP DSPNEWPAGE + \FGETWIDTH \CHAR8CODE LOGAND +) \DECODETRANSITION (\BLT LOCF \ADDBASE \TRANSINDEX IPLUS +TRANSITIONFLAGS \GETBASEBYTE TRANSITIONSHIFTCODE \GETBASE TRANSITIONCODE LOGAND LOGOR) PROCESS.READ ( +TTY.PROCESS NLSETQ THIS.PROCESS TTYDISPLAYSTREAM READ) COMPILER::COMPILE-FILE-PROCLAMATION (DECLARE +CL:EVAL CL:SECOND COMPILER::FIND-TOP-ENVIRONMENT CL:CERROR) \FM.3STATE-CHANGESTATE (SELECTQ +\FM.ITEMPROP FFETCHFIELD LISTGET) \NOTENEWICONPOSITION (WINDOWPROP) \LEAF.TIMEDOUT ( +\SEQUIN.FLUSH.CONNECTION \LEAF.STREAM.IN.QUEUE PRIN1 +) SEDIT::DRAW-OUTLINE (IDIFFERENCE IPLUS SUB1 +BLTSHADE) TTYDISPLAYSTREAM (\OUTSTREAMARG \GETSTREAM DISPLAYSTREAMP TEXTSTREAMP \CARET.DOWN WFROMDS +THIS.PROCESS WINDOWPROP \CREATELINEBUFFER IMAGESTREAMTYPE IQUOTIENT IDIFFERENCE IABS IMINUS) +PRINTXIPDATA (PRINTPACKETDATA -) PROCESS.EVAL (\COERCE.TO.PROCESS FIND.PROCESS THIS.PROCESS CL:EVAL +CONS LIST) PP (MAPC NLAMBDA.ARGS TYPESOF SHOWDEF) MB.NWAYBUTTON.ADDITEM (CONS IMAGEOBJPROP FONTPROP +MAPCAR STRINGWIDTH BITMAPCREATE LIST DSPCREATE IPLUS PLUS ITIMES LENGTH) OPT.EQVALUE (SELECTQ +OPT.SKIPPUSH) \PROCESS.EVAL1 (CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \EVAL) +COURIER.SKIP.SEQUENCE (GETWORD IPLUS LLSH \BIN PLUS) SHOWPRESSBITMAPREGION (OPENIMAGESTREAM CLOSEF) +\TEXTMENU.TOGGLE.CREATE (IMAGEOBJCREATE STRINGWIDTH FONTPROP BITMAPCREATE DSPCREATE IMAGEOBJPROP) +CL::%%MAKE-FLOAT-ACCESSOR (CL:FUNCTION) \PFPutMarkerPage (FIXP \PFVolumeNumber \PFPutPage ELT IPLUS +LvBasePageAddr FFETCHFIELD FMESAELT \ADDBASE ILEQ ITIMES IDIFFERENCE MarkerPageAddr) LOOKUP.NS.SERVER +(PARSE.NSNAME CH.RETRIEVE.ITEM CH.PROPERTY CONS LIST) PRESSWINDOW (OPENPRSTREAM LIST WINDOW.BITMAP +WHICHW BITMAPWIDTH BITMAPHEIGHT IPLUS IQUOTIENT IDIFFERENCE ITIMES CLOSEF) COMPILER::ALPHA-SETQ ( +MAPLIST COMPILER::MAKE-SETQ COMPILER::RESOLVE-VARIABLE-REFERENCE COMPILER::ALPHA-ARGUMENT-FORM +COMPILER::MAKE-PROGN) SET (LISPERROR \STKSCAN \DTEST \HILOC) \CREATECHARSET.IP (RESETLST FIXR +FQUOTIENT ITIMES \FINDFONTFILE OPENSTREAM \POSITIONFONTFILE \FAMILYCODE \BIN PLUS LLSH IPLUS LOGAND +LRSH \WIN ABS IDIFFERENCE \BUILDSLUGCSINFO FONTPROP ZEROP UNFOLD \FIXPIN SIGNED SUB1 IMINUS IQUOTIENT +\PUTBASE \GETOFD \GETSTREAM IMIN ADD1 GETFILEINFO GETFILEPTR \FGETWIDTH \GETBASE GETEOFPTR +\CREATECSINFOELEMENT \ALLOCBLOCK FOLDHI) \NSRANDOM.ENSURE.WATCHER (ADD.PROCESS LIST FUNCTION CONCAT) +\NSADDRESS.DEFPRINT (+ CL:ASH \GETBASE IPLUS SELECTQ IQUOTIENT CL:INTEGER-LENGTH FRESHLINE) \UNCOMMA ( +SELECTQ \UNCOMMA CONS LIST) EDITCALLERS (EDITFPAT CONS MKLIST UNION LIST RESETLST FINDFILE LISPXPRINT +FUNCTION OPENSTREAM FULLNAME GET-ENVIRONMENT-AND-FILEMAP \PARSE-FILE-HEADER SEPRCASE ASSOC MAPCAR +CONCAT CHCON1 SUBSTRING STRPOS SUB1 STRINGP CL:SYMBOL-PACKAGE MKSTRING FFILEPOS GETFILEMAP LOADFILEMAP + LISPXPRIN2 FMEMB DREVERSE) CLISPFUNCTION? (GETPROP UNPACK MISSPELLED? CONCAT APPLY* CONS) +\BACKFILEPTR (FDEVOP SPREADAPPLY*) SPP.CLEAREOM (GETSPPCON FFETCHFIELD ERROR) \NSPRINT.MEDIUM.CHECK ( +UPPERCASEARRAY) COMPILER::ALPHA-RETURN-FROM (CL:ASSOC COMPILER::MAKE-RETURN COMPILER::BLOCK-CONTEXT +COMPILER::ALPHA-FORM) %## (EVQ EDITL0) \FAX.PARSE.NAME (STRPOS SUBSTRING SUB1 LIST ADD1 IPLUS +\GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE ILEQ ASSOC MKATOM U-CASE CONCAT CONS) +\TEDIT.NEWREGIONFN (IDIFFERENCE IPLUS IMAX IMIN) \DEFINEDEVICE (U-CASE FASSOC DREMOVE CONS RPLACD +ERROR) CREATEARRAYSLICE (CL:ARRAY-RANK CL:ARRAY-DIMENSIONS REVERSE CONS ITIMES IPLUS DREVERSE +%%FLATTEN-ARRAY) RECORDFIELDNAMES (RECORDECL RECLOOK RECORD.FIELDNAMES RECORD.DECL FNTH RECORD.SUBDECS + CONS RECORDFIELDNAMES RECORD.FIELDINFO RECORD.NAME) \PUTSYSBUF (\PUTBASE ADD1) PARSERELATION (CONS +MAPCAR PARSERELATION1 FASSOC) NEWPAGE.PRESS (\STARTPAGE.PRESS) U-CASE (WITH-RESOURCE ADD1 \GETBASEFAT +\GETBASE \GETBASETHIN \GETBASEBYTE \PUTBASEFAT \PUTBASE \PUTBASETHIN \PUTBASEBYTE IPLUS IDIFFERENCE +PLUS CL:SYMBOL-PACKAGE \MKATOM GETRESOURCE NEWRESOURCE ALLOCSTRING SUB1 \NSTRINGCHARS FFETCHFIELD CONS + U-CASE) \NSPRINT.COURIER.OPEN (COURIER.OPEN PACK*) \VALID.FILING.CONNECTIONP (\INTERNAL/GETPASSWORD) +\VFMMerge1 (\BLT MESASIZE \VFMGetBufferFor SUB1 ILESSP IPLUS \ADDBASE IQUOTIENT IDIFFERENCE) +\GETMISCSOCKET (OPENPUPSOCKET) \DSKDISPLAY.CREATE.WINDOW (CREATEW IPLUS ITIMES FONTPROP LENGTH +\PFGetVols FUNCTION WINDOWPROP) FB.GETALLFILEINFO (\GENERATEFILEINFO SELECTQ FOLDHI LRSH IPLUS +SHOULDNT LIST) CLEARW (\INSUREWINDOW DSPRESET) FB.MAKECOUNTERWINDOW (CREATEW WINDOWPROP FUNCTION) +DINFO.SHRINKFN (CLOSEW DINFOGRAPH) MEASUREGRAPHNODE (SET/LAYOUT/POSITION ERROR) SETSYNONYM (LIST ATOM +GETWORDTYPE FASSOC GETHASH CONS) FILES?PRINTLST (MAPRINT FUNCTION) FB.ADD.FILEGROUP (STRING-EQUAL MAPC + SORT MAPCAR CONS FB.ADD.FILE) \PROCESS.APPLY1 (CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +APPLY) FB.MAKEHEADINGWINDOW (CREATEW FUNCTION) FB.HARDCOPY.TOFILE (FB.PROMPTFORINPUT +PACKFILENAME.STRING \FB.HARDCOPY.TOFILE.EXTENSION FB.FETCHFILENAME UNPACKFILENAME.STRING STRPOS +SUBSTRING SUB1 ADD1 MKATOM U-CASE CONS FILENAMEFIELD ASSOC MENU MakeMenuOfImageTypes PRINTFILEPROP +PRINTFILETYPE LISTGET CONCAT CL:APPLY CL:FUNCALL) \EVENTKEYS (LOGOR) NEWLINE.PRESS (IPLUS) +PROCESS.APPLY (\COERCE.TO.PROCESS FIND.PROCESS THIS.PROCESS APPLY LIST* LIST) \PUT.SESSION.HANDLE ( +\DTEST ERROR) ATTACHEDWINDOWTOTOPFN (MAINWINDOW TOTOPW) PUPSOCKETEVENT (\DTEST) \GETDEVICEFROMNAME ( +FILENAMEFIELD \GETDEVICEFROMHOSTNAME LISPERROR) COMPILER::COMPILE-FILE-DEFINE-FILE-INFO (CL:EVAL) +\LEAF.WHENCLOSED (\DEQUEUE \GETDEVICEFROMNAME) MSECT (IQUOTIENT IPLUS ITIMES IMINUS IDIFFERENCE) +\GETDEVICEFROMHOSTNAME (FASSOC U-CASE FDEVOP SPREADAPPLY*) \SPPSENDERROR (TERPRI) \HARDCURSORUP ( +IDIFFERENCE) MSINTERPRET (RESETLST MSPARSE SELECTQ MSLISTSET TERPRI ERROR! UPDATEFN CL:VALUES MAPC +NLSETQ PRINT APPLY CONS VERBNOTICELIST MSINTERPRETSET MSJOINSET MSSHOWUSE MSSOLVE CHECKPATHS +LINELENGTH MSPATHS MSDESCRIBE KWOTE EVAL MSCHECKBLOCKS SHOULDNT) \TEDIT.WORDDELETE (SELECTQ SUB1 \BIN +\SYNCODE GETHASH \GETBASEBYTE \GETCHB \BACKBIN PLUS IPLUS ADD1 IDIFFERENCE \TEDIT.DELETE) +FILENAMEFIELD (UNPACKFILENAME.STRING SELECTQ) CHANGE.NODEFONT.SIZE (NEXTSIZEFONT CONSTANT) +CL::%%MAKE-FIXP-ACCESSOR (CL:FUNCTION) \TEDIT.LARGER.CARET (\TEDIT.PARSE.CHARLOOKS.LIST) +FIXVERBSETTYPE (MSVERBTYPE) \CURSORBITSPERPIXEL (\CURSORIMAGEPROPNAME \CURSORMASKPROPNAME CURSORPROP +MASK.1'S LSH SUB1 COLORIZEBITMAP) \TEDIT.SMALLERSEL (\TEDIT.SMALLER.CARET TEDIT.LOOKS LIST) +FB.HARDCOPYCOMMAND (FB.SELECTEDFILES GetPrinterName LIST MAPC LISTFILES1 FB.FETCHFILENAME) DISPLAYNODE + (PRINTDISPLAYNODE DSPCLIPPINGREGION) \REMOVEDEVICE (DREMOVE) COMPILER::ALPHA-THROW (COMPILER::MAKE-THROW + COMPILER::ALPHA-ARGUMENT-FORM COMPILER::ALPHA-FORM) SELECT.ATOM.ASPECT (TYPESOF MENU CONS CONCAT) +EDIT4E (EQP EDIT4E1 DUNPACK LIST APPLY* EDIT4E) CLISPERROR (SELECTQ RETDWIM2) FB.MAKERIGIDWINDOW ( +WINDOWPROP CONS) \REMOVEDEVICE.NAMES (DREMOVE) \TFBRAVO.PARSE.PARA (GETFILEPTR FILEPOS CHARACTER +IDIFFERENCE \TFBRAVO.READ.PARALOOKS LIST \TFBRAVO.FONT.FROM.CHARLOOKS CONS \TFBRAVO.READ.CHARLOOKS +DREVERSE) \NSPRINT.UNSUPPORTED (CL:FORMAT) \CURSORDESTINATION (\PUTBASE \PUTBASEPTR LOCF \ATOMCELL +UNFOLD LLSH) OPT.EQOP (SELECTQ EQUAL OPT.EQOP) \PFPutPage (\PFTransferFilePage) MSQUOTED (MKLIST MSEAT +) \CLOSEFILE (SPREADAPPLY* FDEVOP) DINFO.EXPANDFN (DINFOGRAPH FM.GETSTATE WINDOWPROP) \EVENT.DEFPRINT +(\DEFPRINT.BY.NAME) DINFO.READ.KOTO.GRAPH (FILENAMEFIELD PRIN1 INFILEP READFILE ERROR PLUS) +\FM.3STATE-SELECTEDFN (SELECTQ \FM.ITEMPROP FFETCHFIELD \FM.3STATE-CHANGESTATE) DOICONWINDOWCOM (MENU +FUNCTION) EDITFPAT (CONS EDITFPAT CHCON NLEFT LENGTH ADD1 DUNPACK UNPACK) SEDIT::DRAW-HIGHLIGHT (ADD1 +BLTSHADE IDIFFERENCE IPLUS) \DELETEFILE (\ADD.CONNECTED.DIR \CONVERT-PATHNAME \GETDEVICEFROMNAME +FDEVOP SPREADAPPLY*) EDLOCL (NCONC LIST) PRESS.BITMAPSCALE (MIN FQUOTIENT TIMES) +ONEDINSPECT.MAKEREGIONS (WINDOWPROP DSPLINEFEED XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES +XCL::PROFILE-VALUES ONEDINSPECT.VALUEWIDTH LENGTH IPLUS LIST PLUS CREATEREGION LAST STRINGWIDTH +DIFFERENCE) \ADD.CONNECTED.DIR (PACKFILENAME.STRING) \TEDIT.ITALIC.SEL.ON (TEDIT.LOOKS) DWIMLOADFNS? ( +EDITLOADFNS? LOADFNS LISPXPRINT LISTGET1) EDITXTR (LIST APPEND CONS) MODERNWINDOW (WINDOWPROP FUNCTION +) FAX.SEND.FILE (\FAX.PARSE.NAME NSPRINT APPEND LIST) \SPP.HANDLE.DATA (ILESSP \LOLOC IDIFFERENCE +\QUEUEHEAD FFETCHFIELD FUNCTION SEQ.ADD1 \ADDBASE) INTERLISP-NAMESTRING (MKSTRING CL:NAMESTRING) +\TFBRAVO.WRITE.RUNS (IPLUS) COMPILER::ALPHA-PROGV (COMPILER::MAKE-PROGV COMPILER::ALPHA-ARGUMENT-FORM +COMPILER::ALPHA-PROGN) EDITMBD (LIST APPEND LSUBST CONS) HPRINT.IMAGEOBJ (LIST) OBTAIN.MONITORLOCK ( +\DTEST THIS.PROCESS ERROR) POSTSCRIPT.FONTCREATE (PSCFONTFROMCACHE.SPELLFILE PSCFONT.SPELLFILE +PSCFONT.READFONT PSCFONTFROMCACHE.COERCEFILE PSCFONT.COERCEFILE FIXR TIMES POSTSCRIPT.GETFONTID +FONTCREATE LISTGET LIST IPLUS \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CREATECHARSET \PUTBASE ELT PLUS + \CREATECSINFOELEMENT \ALLOCBLOCK FOLDHI LRSH \FGETWIDTH \GETBASE \FONTINFOFROMFILENAME COPY +\POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS) EDITSW (EDITNTH) \HARDCURSORPOSITION (IDIFFERENCE SUB1 UNSIGNED +LOGAND LLSH \PUTBASE) CL::%%MAKE-FLAG-ACCESSOR (CL:FUNCTION) \NSNET.CLOSERP (\LOCATE.NSNET ILESSP) +\DEVICEEVENT (SELECTQ MAPC REVERSE SPREADAPPLY* FDEVOP) PARSE-NSADDRESS (MKSTRING + SUB1 IPLUS ADD1 +\GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE TIMES - CONS SMALLP LOGAND CL:ASH) \HARDCURSORDOWN ( +\CLEARBM CURSORBITMAP) FB.MAYBE.WIDEN.NAMES (IMIN IMAX FIXR FTIMES IDIFFERENCE) REVERSE (CONS) +\FM.3STATE-DOWNFN (SELECTQ \FM.ITEMPROP FFETCHFIELD \FM.DISPLAYBITMAP LISTGET BITBLT) +ICONPOSITION.FROM.WINDOW (POSITIONP WINDOWPROP IDIFFERENCE IMAX IMIN) \CLEARBM (BLTSHADE) +FB.ADJUST.DATE.WIDTH (FUNCTION PLUS) DELFROMFILES (GETFILEPKGTYPE FILECOMS TERPRI APPLY* LIST) +\SOFTCURSORUP (BITMAPCREATE UNFOLD LLSH ITIMES) OPT.JUMPCOPYTEST (OPT.SKIPPUSH SUB1 OPT.JUMPCOPYTEST) +\STORENSADDRESS (\BLT \DTEST) FILES? (POSITION CL:VALUES) \SOFTCURSORUPCURRENT (\GETBASE SIGNED SUB1 +LLSH IDIFFERENCE IMINUS IPLUS \PUTBASEPTR LOCF \ATOMCELL \ADDBASE ADD1 ITIMES) TEDIT.ADD.STYLESHEET ( +APPEND LIST) MSSETPHRASE (MSSETSETTYPE MSSEEKTYPE) RELEASE.MONITORLOCK (\DTEST .RELEASE.LOCK. +THIS.PROCESS \MP.ERROR) BITMAPCREATE (ILEQ \INSUREBITSPERPIXEL FOLDHI LRSH IPLUS ITIMES ERROR +\ALLOCBLOCK) OPT.PRATTACH (CONS) CH.RETRIEVE.ITEM (PARSE.NSNAME CH.FINDSERVER COURIER.EXPEDITED.CALL +CH.PROPERTY CH.GETAUTHENTICATOR COURIER.READ.REP) OPENPRSTREAM (OPENSTREAM LISTGET GETEOFPTR FULLNAME +FUNCTION) \LFVersions (FIXP GREATERP SORT \GETFILEPTR SPREADAPPLY* EQL \BIN \WIN IPLUS LLSH LIST CONS) + \TEDIT.EXPANDFN (TTY.PROCESS WINDOWPROP) \GET.SESSION.HANDLE (CONS COURIER.READ) DOATTACHEDWINDOWCOM +(MENU FUNCTION DOBACKGROUNDCOM) PUPSOCKETFROMNUMBER (\HINUM LOGAND \PUPSOCKET.FROM#) \PRINTNSADDRESS ( +\GETSTREAM SELECTC) COMPILER::ALPHA-PROGN (COMPILER::ALPHA-FORM COMPILER::MAKE-PROGN MAPLIST) +PFI.ENQUEUE (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION NCONC1 ADD.PROCESS LIST) +SI::MONITOR-UNWIND (\DTEST .RELEASE.LOCK. THIS.PROCESS \MP.ERROR) \FM.3STATE-SETUPOFFBITMAP ( +\FM.ITEMPROP LISTGET FFETCHFIELD COPY \FM.GETREGIONS \FM.MAKEBITMAP LIST EXTENDREGION BITMAPCOPY +IDIFFERENCE ITIMES DSPCREATE SUB1) EDITMV (CONS APPEND LIST) FB.HEADINGW.DISPLAY (WINDOWPROP +DSPCLIPPINGREGION MAINWINDOW + - STRINGWIDTH PLUS) SEDIT::RELINEARIZE (DSPCLIPPINGREGION ADD1 +SEDIT::FIRST-LINE-LINEAR ILESSP IDIFFERENCE IPLUS IMAX SEDIT::LAST-LINE-LINEAR WINDOWPROP PLUS +FFETCHFIELD SEDIT::SCAN-FOR-BOUNDS SEDIT::PROPAGATE-WIDTH-CHANGE) \GENERATEFILES (\ADD.CONNECTED.DIR +\GETDEVICEFROMNAME FDEVOP SPREADAPPLY*) TB.MAKE.BROWSER (SELECTQ SET CONS LIST DECODE.WINDOW.ARG +CREATE.MONITORLOCK WINDOWPROP FUNCTION PACK* ATTACH) CL::%%MAKE-WORD-ACCESSOR (CL:FUNCTION) XIPTRACE ( +MAKE-NETWORK-TRACE-WINDOW) IRM.LOOKUP (IRM.GET.DINFOGRAPH MKATOM U-CASE RESETLST RESETSAVE +TTYDISPLAYSTREAM GETPROMPTWINDOW LIST \IRM.SMART.REF \IRM.GET.REF IRM.DISPLAY.REF FLASHWINDOW) +\MONITORLOCK.DEFPRINT (\DEFPRINT.BY.NAME) FULLPRESSBITMAP (OPENPRSTREAM BITMAPWIDTH BITMAPHEIGHT +IQUOTIENT IDIFFERENCE FIX TIMES TERPRI PRESS.BITMAPSCALE IPLUS CLOSEF) ONEDINSPECT.ADJUSTSELECTION ( +WINDOWPROP WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES +STRINGWIDTH APPLY*) HARDCOPYREGION.TOPRINTER (GetPrinterName PRINTERTYPE GETREGION PACK*) +\TEDIT.LARGERSEL (\TEDIT.LARGER.CARET TEDIT.LOOKS LIST) TB.DO.ITEM.SELECTION (WINDOWPROP +DSPCLIPPINGREGION TB.FIRST.VISIBLE.ITEM# TB.LAST.VISIBLE.ITEM# LASTMOUSEX LASTMOUSEY ZEROP LOGAND +TB.NTH.ITEM PLUS ADD1 SUB1 TB.ITEM.FROM.YCOORD LOGOR SHIFTDOWNP LRSH +) EDIT4F (CONS EDITCONT EDITFPAT + EDITFPAT1 NCONC1 UNPACK SUB1 NCONC MEMB) XPROD (IDIFFERENCE ITIMES) \GENERATENEXTFILE (CL:FUNCALL) +\TFBRAVO.WRITE.RUN (PEEKC CHARACTER IPLUS GETFILEPTR) COURIER.SKIP (SELECTQ \BIN RPTQ CEIL LOGAND +IPLUS GETWORD LLSH CONSTANT SUB1 LOGXOR GETPROP CL:FUNCALL \GET.COURIER.TYPE COURIER.SKIP +\COURIER.UNKNOWN.TYPE PLUS COURIER.SKIP.SEQUENCE MAPC) \FM.3STATE-SETUP (\FM.ITEMPROP FFETCHFIELD +FUNCTION LISTGET \FM.3STATE-SETUPOFFBITMAP) SEDIT::CLOSEFN (WINDOWPROP) \GENERATEFILEINFO (CL:FUNCALL) + MSHASHLIST (FUNCTION) COMPILER::ALPHA-MV-PROG1 (COMPILER:CONTEXT-VALUES-USED COMPILER::ALPHA-FORM +CONS COMPILER::MAKE-MV-PROG1 CL:FIRST CL:MAPCAR CL:FUNCTION CL:REST) MAYBE.PRETTYFILEINDEX (REMOVE +ROOTFILENAME) NWAYBUTTON.INIT (IMAGEFNSCREATE FUNCTION) TOPW.ADJUSTSELECTION (WINDOWPROP MAINWINDOW +WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES STRINGWIDTH +IDIFFERENCE ADD1) OPT.DELCODE (FASSOC OPT.PRDEL) \LEAF.IDLE (ADD.PROCESS LIST FUNCTION KWOTE +\GETDEVICEFROMNAME \SEQUIN.CONTROL \SEQUIN.CLOSE) EDITCONT (EDITFPAT EDLOCL) \PFGetMarkerPage (FIXP +\PFVolumeNumber \PFGetPage ELT IPLUS LvBasePageAddr FFETCHFIELD FMESAELT \ADDBASE ILEQ ITIMES +IDIFFERENCE MarkerPageAddr) \GETFILENAME (\ADD.CONNECTED.DIR \CONVERT-PATHNAME \GETDEVICEFROMNAME +FDEVOP SPREADAPPLY*) \SPP.RELEASE.ACKED.PACKETS (ILESSP \LOLOC IDIFFERENCE HELP ELT RETRANSMITINDEX +IMOD SEQ.ADD1 \ADDBASE) HARDCOPYREGION.TOFILE (GetImageFile GETREGION) TB.DO.UNLESS.BUSY (RESETLST +WINDOWPROP CL:FUNCALL) MSHASHLIST1 (CONS) \GENERIC.OUTFILEP (FDEVOP SPREADAPPLY* PACKFILENAME ADD1 +FILENAMEFIELD) \LOADNSADDRESS (\BLT) FB.SETNEWPATTERN (DIRECTORY.MATCH.SETUP STRPOS +UNPACKFILENAME.STRING WINDOWPROP) PACKFILENAME (ARG APPLY PACK PACKFILENAME.ASSEMBLE ADD1 STRINGP ATOM + UNPACKFILENAME.STRING PACKFILENAME.STRING SELECTQ SHOULDNT CDDR SELCHARQ CHCON1 SUBSTRING NTHCHARCODE + ERROR NCONC LIST LASTCHPOS NCHARS CL:FIRST CL:SECOND CL:THIRD) SEDIT::PRINT-STRING (SEDIT::ESCAPE-CHAR + FFETCHFIELD SUB1 IPLUS \GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM ADD1 \GETBASEFAT \GETBASE +\GETBASETHIN \GETBASEBYTE) \MAKE.PROCESS1 (UNINTERRUPTABLY \MYALINK OPCODES \STACKARGPTR) REBREAK ( +NLAMBDA.ARGS CL:FLET MAPCONC REBREAK-FN) FB.STARTUP (RESETLST FB.MAKE.BROWSER.BUSY FASSOC CL:FUNCALL) +\PROCESS.MOVEFRAME (IPLUS \FREESTACKBLOCK PLUS FLOOR LOGAND LRSH IDIFFERENCE CONSTANT LOGXOR SUB1 +ADDSTACKBASE \VAG2 FFETCHFIELD) \SOFTCURSORDOWN (\GETBASE) COURIER.WRITE.FAT.STRING (OPENSTREAM +GETFILEPTR \BOUT ADD1 FOLDHI LRSH IPLUS BOUT) CL::%%MAKE-BIT-ACCESSOR (CL:FUNCTION) +SORT.NSADDRESSES.BY.DISTANCE (\LOCATE.NSNET SORT) \LFCASEARRAYFETCH (\GETBASEBYTE) \TEDIT.MAINW ( +TEXTOBJ WINDOWPROP) \READNUMBER.FLASHAREA (BITBLT) \OPENFILE (\ADD.CONNECTED.DIR \GETDEVICEFROMNAME +FDEVOP SPREADAPPLY* LISPERROR) COMPILER::COMPILE-FILE-DEFINEQ (CL:MAPCAR CL:FUNCTION) +\LEAF.OPENERRORHANDLER (SELECTC PRIN1) \SPP.HANDLE.ATTN (LIST PRIN1) \DO.PARAMS.AT.OPEN (SELECTQ +\ILLEGAL.ARG MAPC APPLY*) \CLEARSYSBUF (MAPC THIS.PROCESS) \IOMODEP (\FILE.NOT.OPEN) CH.DELETE.SELF ( +PARSE.NSNAME COURIER.CALL CH.FINDSERVER FIXP CH.PROPERTY CH.GETAUTHENTICATOR) MSLISTSET ( +MSINTERPRETSET) \GETKEY (THIS.PROCESS FFETCHFIELD \GETSYSBUF GLOBALRESOURCE LOCF \ADDBASE +CLOCKDIFFERENCE GETRESOURCE NEWRESOURCE CREATECELL) TEDIT.PUSH.STYLESHEET (APPEND) \PROCESS.DEFPRINT ( +\DEFPRINT.BY.NAME) CLOSEPUPSOCKET (\DTEST DREMOVE ERROR) \ENQUEUE.TIMER (UNINTERRUPTABLY +\BOXIDIFFERENCE) TB.REDISPLAY.ITEMS (DSPCLIPPINGREGION \DTEST IMAX FIXP TB.FIRST.VISIBLE.ITEM# IMIN +TB.LAST.VISIBLE.ITEM# TB.DISPLAY.LINES) \TTYBACKGROUND (TTY.PROCESSP APPLY* \BACKGROUND) +MAKEMAINWINDOW (FUNCTION WINDOWPROP) PRETTY-TYPE-NAME (SUBSET CL:SUBTYPEP SORT CONCATLIST MAPCONC LIST + PRETTY-TYPE-NAME CL:DOCUMENTATION CONCAT) CHARSET (\GETSTREAM ACCESS-CHARSET SPREADAPPLY*) +\DRAWELLIPSE.PRESS (SIN COS LIST CREATEPOSITION PLUS FTIMES DIFFERENCE) PAINTW.READCOMMAND (MENU) +\GETSYSBUF (\GETREALSYSBUF \GETBASEFAT \GETBASE ADD1) \IMAGEUSERPROP (LISTGET LIST) SETFILEINFO ( +SELECTQ \ILLEGAL.ARG IMAX FIX CHARSET FDEVOP SPREADAPPLY* \SETEOFPTR UNFOLD LLSH \GETDEVICEFROMNAME +\ADD.CONNECTED.DIR \CONVERT-PATHNAME \SETCLOSEDFILELENGTH LISPERROR) GETRELATION (PARSERELATION UNION +GETTABLE) ICMLARRAY.GETMENUWGROUP (FONTCREATE FONTPROP CL:ARRAY-DIMENSIONS CL:ARRAY-RANK +HEIGHTIFWINDOW FREEMENU GET.MENU.LIST IMAX STRINGWIDTH RESETVAR CONCAT CREATEW CREATEREGION CONS +FUNCTION IDIFFERENCE SUB1 WINDOWPROP GETBOXPOSITION) LISTHARD (GETVERBTABLES MSHASHLIST) WAIT.FOR.TTY +(THIS.PROCESS TTY.PROCESSP TTY.PROCESS OPENWP WFROMDS TTYDISPLAYSTREAM SETUPTIMER) \DRAWLINE.PRESS ( +LIST CREATEPOSITION) \MAYBEBLOCK (BLOCK) \TEDIT.ITALIC.CARET.OFF (\TEDIT.PARSE.CHARLOOKS.LIST) +\WRITEPRESSBITMAP (BITMAPCREATE BITBLT \BOUT UNFOLD LLSH FIXR FTIMES TIMES ITIMES IPLUS) +\STRINGWIDTH.IP (\STRINGWIDTH.GENERIC) CHANGECALLERS (GETFILEPKGTYPE LIST TYPESOF TERPRI SUBPAIR +SELECTQ NCONC FILEPKGCHANGES FILEFNSLST UPDATEFN INTERSECTION GETRELATION PARSERELATION EDITCALLERS +REMOVE WHEREIS printout PRIN1) \NSRANDOM.RELEASE.IF.ERROR (\NSRANDOM.RELEASE.LOCK) \NSYSBUFCHARS ( +IPLUS LENGTH IDIFFERENCE) \COURIER.RECORDTRAN (\GET.COURIER.TYPE LITATOM SELECTQ LIST CONS) +COMPILER::ALPHA-MACROLET (COMPILER::MAKE-CHILD-ENV COMPILER::ENV-BIND-FUNCTION COMPILER::CRACK-DEFMACRO + CONS) SEDIT::SCAN-FOR-BOUNDS (IPLUS IMAX FONTPROP IDIFFERENCE BITMAPHEIGHT IMINUS BITMAPWIDTH) CHOOZ1 + (IQUOTIENT ITIMES IDIFFERENCE IPLUS) \SAVESYSBUF (\NSYSBUFCHARS THIS.PROCESS PLUS LENGTH NCHARS +ALLOCSTRING RPLCHARCODE ADD1 \GETSYSBUF SUB1 SUBSTRING) OPT.SKIPPUSH (SELECTQ OPT.SKIPPUSH SUB1 ADD1 +IPLUS) CL::%%MAKE-ARRAY-ACCESSOR (CL:FUNCTION) \PFPutLogicalVolumePage (\PFPutPage ELT FIXP +\PFVolumeNumber) COURIER.WRITE.SEQUENCE.UNSPECIFIED (\BOUT UNSIGNED LOGAND SUB1 LLSH \HINUM \WOUT +STRINGP MKSTRING ADD1 FOLDHI LRSH IPLUS NCHARS LISP.TO.ALTO.DATE GETPROP \GET.COURIER.TYPE +COURIER.REP.LENGTH CL:FUNCALL) HARDCOPYW (COPY.WINDOW.TO.BITMAP SCREENBITMAP GETSCREENREGION +PRINTERTYPE CONCAT DEFAULTPRINTER PRINTFILETYPE PRINTER.BITMAPSCALE PRINTER.BITMAPFILE +PRINTER.SCRATCH.FILE) \SYSBUFP (THIS.PROCESS) BESTNSADDRESS (LOOKUP.NS.SERVER \LOCATE.NSNET PLUS PRIN1 +) \PROC.CODEFORTFRAME (\TURN.ON.PROCESSES) COMPILER::MAYBE-REMOVE-COMMENTS (REMOVE-COMMENTS) +\FM.TOGGLE-CHANGESTATE (\FM.ITEMPROP FFETCHFIELD LISTGET) MSSETWORDTYPE (PUTHASH NCONC1 GETHASH CONS) +\PEEKSYSBUF (\GETBASEFAT \GETBASE THIS.PROCESS SHOULDNT) SEDIT::CHECK-SELECTION-SHIFT (SEDIT::SHIFT-DOWN +) \PROCESS.INIT (FUNCTION GETD HARDRESET) \KEYBOARDINIT (KEYACTIONTABLE \ALLOCLOCKED \ALLOCBLOCK +FOLDHI LRSH IPLUS ADD1 ALLOCSTRING LOCF \ADDBASE PLUS SETUPTIMER \KEYBOARDON) INSPECT.INVERTSELECTION +(WINDOWPROP FONTPROP) \ENQUEUE (\DTEST LIST* LOC LIST PLUS) \ADD.ROUTING.TABLE.ENTRY (NTYPX CL:ERROR +\ADDBASE UNFOLD LLSH LOGAND CONS \GETBASEPTR) %%DESTRUCTIVE-RESULT-VECTOR (CL:MAKE-ARRAY VECTOR-LENGTH + CL:ARRAY-ELEMENT-TYPE COPY-VECTOR) \SETLOCALNSNUMBERS (LOGOR \SERIALNUMBER) MOUSECHORDWAIT (IMIN +ITIMES SMALLP ARG) \RENAMEFILE (\ADD.CONNECTED.DIR \GETDEVICEFROMNAME FDEVOP SPREADAPPLY*) +FB.SET.BROWSER.TITLE (WINDOWPROP CONCAT) \TEDIT.SETDEFAULT.FROM.SEL (TEDIT.GET.LOOKS +\TEDIT.PARSE.CHARLOOKS.LIST) FIXSPELL2 (LIST FUNCTION LISPXTERPRI) \ALLOCLOCKED (\ALLOCBLOCK IMIN +FOLDHI LRSH IPLUS UNFOLD LLSH) \REVALIDATEFILE (FDEVOP SPREADAPPLY*) FILEPKGTYPE (ARG UNION +FILEPKGTYPE NCONC LIST GETTOPVAL ASSOC GETPROP SELECTQ ERROR ADD1 FMEMB CONS PLUS MARKASCHANGED) +PAINTW.READMODE (MENU) MSMEMBSET (MSINTERPRETSET) KEYACTIONTABLE (APPEND COPY +\KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS KEYACTION) \DRAWCURVE.PRESS (FIXP \ILLEGAL.ARG LIST LENGTH +PARAMETRICSPLINE MAPCAR CREATEPOSITION FIXR FTIMES \GETBRUSHFONT.PRESS LAST) \VFMSplit ( +\VFMCreateVPage FUNCTION ADD1) \GET.FILING.ATTRIBUTE (COURIER.READ CONS \WIN IPLUS LLSH \BIN LIST +COURIER.READ.SEQUENCE) MOVEATTACHEDWINDOWTOPLACE (WINDOWPROP MINIMUMWINDOWSIZE SELECTQ ATTACHEDWINDOWS + WINDOWREGION PLUS MAX DIFFERENCE MIN CREATEREGION ADD1 IMAX CENTERINWIDTH CENTERINHEIGHT) +OPENPUPSOCKET (FIXP \PUPSOCKET.FROM# \HINUM \LONUM LOGOR DAYTIME CREATE.EVENT CONS ADD1 LOGAND) +\NUMBERPAD.READER.CLOSEFN (WINDOWPROP) CH.ADD.SELF (PARSE.NSNAME COURIER.CALL CH.FINDSERVER FIXP +CH.PROPERTY CH.GETAUTHENTICATOR) COMPILER::COMPILE-FILE-SETF-SYMBOL-FUNCTION (CL:SECOND CL:THIRD CL:EVAL +) \FM.TOGGLE-SELECTEDFN (FFETCHFIELD \FM.TOGGLE-CHANGESTATE) SEDIT::BUTTONEVENTFN ( +MODERNWINDOW.BUTTONEVENTFN FUNCTION) FB.DISPLAY.COUNTERS (WINDOWPROP DSPFONT IQUOTIENT IDIFFERENCE +ITIMES CHARWIDTH LIST FB.COUNTER.STRING IMAX IPLUS STRINGWIDTH PLUS RPLACA CONCAT SUBSTRING +DSPXPOSITION) \PROCESS.EVENTFN (SELECTQ APPEND FFETCHFIELD THIS.PROCESS) \TEDIT.ITALIC.SEL.OFF ( +TEDIT.LOOKS) PFI.NEW.LISTFILES1 (FINDFILE CL:ERROR MAYBE.PRETTYFILEINDEX LIST FUNCTION) +TOPW.BUTTONEVENTFN (WINDOWPROP MAINWINDOW WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV +XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES LOGAND ONED.TRACKCURSOR FONTPROP FUNCTION CL:FUNCALL) +\PAGED.REVALIDATEFILELST (FDEVOP SPREADAPPLY* \PAGED.REVALIDATEFILE RESTOREMAP FORGETPAGES STREAMPROP +APPLY*) FB.COPY/RENAME.COMMAND (FB.SELECTEDFILES FB.COPY/RENAME.MANY FB.FETCHFILENAME +FB.GET.NEW.FILE.SPEC FB.COPY/RENAME.ONE) PAINTW.READBRUSHTEXTURE (SELECTQ BITSPERPIXEL +PAINTW.READBRUSHSHADE MENU COLORMENU) \PFVolumeNumber (GETHASH) CL::%%MAKE-POINTER-ACCESSOR (CL:FUNCTION +) CHECKSYNONYM (GETWORDTYPE FASSOC GETHASH APPEND SUBST ADD1 MSTRYSPELL) \PRINT-REVALIDATION-RESULT ( +PRIN1 SELECTQ printout TERPRI SHOULDNT) OPT.ONLYMEMB (FMEMB) FORGETPAGES (CPBUFFERP CONS) +\LFFindDirHole (IPLUS LENGTH SPREADAPPLY* \BIN PLUS DIFFERENCE \LFMakeDirHole) \KEYBOARDEVENTFN ( +SELECTQ LOGAND MACHINETYPE EQUAL UNIX-GETPARM \KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS KEYACTION APPEND +MOUSECHORDWAIT) CL::%%MAKE-ACCESSOR-CLOSURE (CL::PSLOT-FIELD-DESCRIPTOR) MSPRED (MSCANT) RESTOREMAP ( +\GETSTREAM CPBUFFERP CONS) CLOSEW (\INSUREWINDOW SPREADAPPLY*) \DELETECH (IDIFFERENCE IPLUS IMINUS +\CHTOPC - ADD1 \SPLITPIECE \GETBASEPTR \FIRSTNODE LIST IMAGEOBJPROP \DELETETREE FLAST) KEYACTION ( +SMALLP \KEYNAMETONUMBER CONS \KEYACTION1 \TRANSINDEX IPLUS) FB.COPYTEXTCOMMAND (FB.COPY/RENAME.COMMAND + CONS FUNCTION) \PAGED.REVALIDATEFILE (FDEVOP SPREADAPPLY*) ICMLARRAY.GETREGIONFN (WINDOWREGION ADD1 +SUB1) \FM.TOGGLE-DOWNFN (FFETCHFIELD \FM.DISPLAYBITMAP \FM.ITEMPROP LISTGET BITBLT) +\KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS (UNIX-GETPARM LOGAND APPEND) PFI.PRINT.BITMAP ( +NON.PFI.PRINT.BITMAP DSPXPOSITION DSPYPOSITION DSPSCALE DSPLINEFEED TIMES BITMAPHEIGHT BITMAPWIDTH +DSPBOTTOMMARGIN MIN FQUOTIENT - DSPRIGHTMARGIN DSPLEFTMARGIN DSPTOPMARGIN FIXR MAX FONTPROP IQUOTIENT ++ PLUS FUNCTION STKPOS STKEVAL CL:CEILING CHARWIDTH) SEDIT::FIND-NTH-STRUCTURE (SEDIT::SUBNODE) +\PAGED.REVALIDATEFILES (COPY \PAGED.REVALIDATEFILE RESTOREMAP FORGETPAGES STREAMPROP APPLY* +SPREADAPPLY* DREMOVE) ICMLARRAY (CL:ARRAY-RANK DEFAULTFONT SUB1 IDIFFERENCE LIST PLUS +CL:ARRAY-DIMENSIONS ICMLARRAY.DISPLAYSLICE ADD1 WINDOWREGION ICMLARRAY.GETMENUWGROUP) MSINTERPA (CONS) + FB.CREATE.FILEBUCKET (STRING NCHARS ILEQ NTHCHARCODE PLUS TIMES - SUB1 ADD1 SUBSTRING CL:NTH SELECTQ +FOLDHI LRSH IPLUS IDATE) TEDIT.STYLESHEET (TEXTOBJ LIST) COPY (LIST COPY CONS) \PROC.AFTER.WINDOWWORLD + (FIND.PROCESS) LOADPOLY (FQUOTIENT) \GETBRUSHFONT.PRESS (SELECTQ FIXR FTIMES) +ONEDINSPECT.PRINTELEMENT (IPLUS PRIN2) \BUFFERED.REVALIDATEFILE (FDEVOP SPREADAPPLY*) +\GET.COURIER.DEFINITION (LITATOM \GET.COURIER.DEFINITION ASSOC LISTGET \GET.COURIERPROGRAM GETHASH +ERROR CONCAT LIST) \BUFFERED.REVALIDATEFILELST (FDEVOP SPREADAPPLY* \BUFFERED.REVALIDATEFILE +STREAMPROP APPLY*) SETSPELLCASE (CASEARRAY IPLUS IDIFFERENCE PLUS MAPC SETCASEARRAY CHCON1) +NUMBERPAD.READ (FUNCTION RESETLST TTYDISPLAYSTREAM TTY.PROCESS THIS.PROCESS CONTROL RESETSAVE ECHOMODE + OPENW LIST DISPLAY/NUMBER/READER/TOTAL WINDOWPROP NUMBERPAD.READER.DECODE READC ERROR!) \TRUNCATEFILE + (FDEVOP SPREADAPPLY*) \TEDIT.DEFAULTSSEL (TEDIT.LOOKS) \FM.TOGGLE-SETUP (\FM.ITEMPROP FFETCHFIELD +FUNCTION LISTGET) \FILE-CONFLICT (FDEVOP SPREADAPPLY*) MENU (\POSITION.MENU.IMAGE WINDOWPROP RESETLST +RESETSAVE OPENW LIST THIS.PROCESS BLOCK MOUSESTATE LOGAND LOGOR MENU.HANDLER DOSELECTEDITEM) +\TEDIT.SHOWCARETLOOKS (CONCAT \TK.DESCRIBEFONT) MB.NWAYMENU.NEWBUTTON (IMAGEOBJPROP ADD1) +OPT.DELETEFRAMECHECK (OPT.ONLYMEMB) \GENERATENOFILES (STRPOS NTHCHARCODE SUB1 ADD1 CONSTANT CHARACTER +FUNCTION PACKFILENAME \NULLFILEGENERATOR) /RPLNODE (CONS FRPLACD ERRORX LIST) \TURN.ON.PROCESSES ( +ASKUSER) COMPSET (COMPSETREAD COMPSETF COMPSETY OPENFILE OPENP OPENSTREAM) CL::%%MAKE-LIST-ACCESSOR ( +CL:FUNCTION) \PFGetLogicalVolumePage (\PFGetPage ELT FIXP \PFVolumeNumber) \NULLFILEGENERATOR ( +FUNCTION) TB.ITEM.FROM.YCOORD (CL:CEILING - TB.NTH.ITEM IMIN) ALISTS.WHENCHANGED (GETPROP +MARKASCHANGED) DEFAULTMENUHELDFN (PROMPTPRINT) ShowIntervals (\VFMGetInterval PRIN1 ELT SUB1 \GETBASE +IREMAINDER ADD1 PLUS TERPRI MESASIZE) FB.COPYBINARYCOMMAND (FB.COPY/RENAME.COMMAND CONS FUNCTION) +CLISPFOR0 (APPEND GETPROP GETP CLISPFOR0A LIST FASSOC \DURATIONTRAN SELECTQ SHOULDNT GETDUMMYVAR CONS +NCONC1 READLINE CLISPFORVARS CLISPFOR1 MAPCAR RETDWIM2 CLISPLOOKUP CLISPFORF/L SUBST LISTGET1 EVAL +SUBPAIR DWIMIFY1 COPY CLISPFORINITVAR FMEMB WARNUSER CLISPFOR3 FLAST NCONC CLISPFOR2 MAPCONC DREVERSE +LDIFF FRPLACA) CLRPROMPT (DSPRESET TERPRI) TEDIT.PARALOOKS (TEXTOBJ TEDIT.SETSEL IMIN IMAX SUB1 +\CHTOPC LISTGET FMEMB CONS MAPCAR \TEDIT.UNIQUIFY.PARALOOKS NCONC1 IPLUS IDIFFERENCE ADD1) ADDSPELL2 ( +FMEMB) \RESETKEYBOARD (\GETBASE XKEYDOWNP LOGAND LRSH LLSH SELECTQ \KEYNAMETONUMBER \KEYBOARDON) +IMAGEOBJCREATE (IMAGEFNSP) \NOFILESINFOFN (GETFILEINFO) FILEPKGCOMPROPS (MAPC MEMB CONS PUT) +PAINTW.READBRUSHSHAPE (MENU) MSGETBLOCKDEC (FILECOMSLST MSMEMBSET CONS UNION EVAL SELECTQ) +FB.INSERT.FILE (TB.FIND.ITEM FUNCTION TB.NTH.ITEM SUB1 STRING-EQUAL FB.COUNT.FILE.CHANGE) +\ENDPAGE.PRESS (\GETFILEPTR SPREADAPPLY* \BOUT) \NOFILESNEXTFILEFN (INFILEP FULLNAME CONS +FILENAMEFIELD ADD1 PACKFILENAME.STRING PLUS) \FILINGHANDLE.DEFPRINT (\DEFPRINT.BY.NAME) +\LOOKUPPUPNUMBER (\GETMISCNSOCKET CREATE.PACKET.EXCHANGE.XIP PLUS FFETCHFIELD UNFOLD LLSH LOCF +\ADDBASE SETUPTIMER GETXIP LOGAND TERPRI \GETBASESTRING IDIFFERENCE IPLUS PORTSTRING) FLUSHRIGHT ( +IDIFFERENCE POSITION LINELENGTH NCHARS QUOTIENT IPLUS PRIN2 PRIN1) BREAK.PROCESS (\COERCE.TO.PROCESS +FIND.PROCESS THIS.PROCESS FUNCTION) DINFO.FIND (PROMPTPRINT RESETFORM TTYDISPLAYSTREAM GETPROMPTWINDOW + TERPRI PROMPTFORWORD CONSTANT WINDOWPROP PRIN1 TEDIT.FIND TEDIT.NORMALIZECARET TEDIT.SHOWSEL +TEDIT.SETSEL NCHARS) PPROC1 (FFETCHFIELD TTY.PROCESS SPACES THIS.PROCESS PRIN1 IDIFFERENCE CLOCK +PRINTNUM) \CHECK.PQUEUE (TERPRI THIS.PROCESS RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION HELP) BCOMPL3 (GETFILEPTR FULLNAME REMOVE ROOTFILENAME POSITION TERPRI) +GRAPHADDLINK (FRPLACA CONS) GETWINDOWPROP (\OUTSTREAMARG \GETSTREAM WFROMDS WINDOWOP SPREADAPPLY*) +CH.DELETE.PROPERTY (COURIER.EXPEDITED.CALL CH.FINDSERVER PARSE.NSNAME FIXP CH.PROPERTY +CH.GETAUTHENTICATOR) BELOWMARKER (FCHARACTER IPLUS PACK* IREMAINDER IQUOTIENT ADD1) +PAINTW.READBRUSHSIZE (MENU) INFILEP (\GETFILENAME) \PRESSCURVE2 (RESETLST RESETSAVE LIST DSPFONT +IDIFFERENCE GETFILEPTR \BOUT ELT FONTPROP FIXR FTIMES GEQ SUB1 POLYEVAL \FLOATBOX OPCODES ADD1 IPLUS +EQP IMINUS FQUOTIENT FDIFFERENCE FPLUS ABS LRSH LLSH PLUS) \KEYACTION1 (SELECTC TRANSITIONFLAGS +\GETBASEBYTE LIST CHECKFORDEADKEY TRANSITIONCODE \GETBASE TRANSITIONSHIFTCODE TRANSITIONALTGRCODE +TRANSITIONDEADLIST \GETBASEPTR LLSH IPLUS SHOULDNT MAPCAR CONS IGEQ CHARCODE.DECODE \GETCHARCODE) +PACKFILENAME.STRING (ARG APPLY CONCATLIST PACKFILENAME.ASSEMBLE ADD1 STRINGP ATOM +UNPACKFILENAME.STRING PACKFILENAME.STRING SELECTQ SHOULDNT CDDR SELCHARQ CHCON1 SUBSTRING NTHCHARCODE +ERROR NCONC LIST LASTCHPOS NCHARS CL:FIRST CL:SECOND CL:THIRD) COMPILER::COMPILE-ONE-LAMBDA ( +COMPILER::ALPHA-LAMBDA CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION COMPILER::PEEPHOLE-OPTIMIZE +COMPILER::GENERATE-CODE COMPILER::ANNOTATE-TREE COMPILER::META-EVALUATE) PPROC (PPROC1 CLOCK TERPRI +CONS) \KEYNAMETONUMBER (PLUS L-CASE \ILLEGAL.ARG) GRAPHBUTTONEVENTFN (GETSTREAM LOGAND NODELST/AS/MENU + CURSORPOSITION LOGOR APPLY* SELECTQ SHOULDNT WINDOWPROP) CLISPIFY2B (GETPROP CLISPIFY1 SELECTQ +CLISPIFY2C CLISPIFYCROPS0 CLISPIFYLOOKUP LIST MINUS SUB1 CLISPIFYRPLAC CONS FRPLACA NCONC CLISPCOND +CLISPAND SHOULDNT CLISPIFY2A MAPCAR LAST CLISPIFYNOT CLISPIFY2 CLISPIFYCROPS GETP WHILEDOUNTIL SUBPAIR + CLISP3 CLISPIFY2B LSUBST LISTGET1 SHRIEKIFY APPLY* APPEND CLISPIFYMAPS CLISPIFYUSERFN) FULLNAME ( +\GETFILENAME) PPROCRESHAPEFN (WINDOWPROP RESHAPEBYREPAINTFN) \TEDIT.DEFAULTS.CARET ( +\TEDIT.SHOWCARETLOOKS) \LFDirectorySearch (LENGTH SPREADAPPLY* \BIN IPLUS \LFDWIN \WIN LLSH +\LFCASEARRAYFETCH IDIFFERENCE) PFI.PASS.COMMENT (READCCODE PEEKCCODE CHANGEFONT) FONTNAME.IP (FONTPROP + CONS PACK* LISTGET PACK LIST) RCOMP3 (ARGTYPE CONS CL:SYMBOL-VALUE REMOVE) SCROLLBYREPAINTFN ( +WINDOWPROP DSPCLIPPINGREGION \DECODE.EXTENT.USE IPLUS FIXR FTIMES IDIFFERENCE WXOFFSET IMINUS +DSPLINEFEED FDIFFERENCE WYOFFSET INTERSECTREGIONS \DSPUNTRANSFORMREGION IMIN SELECTQ IMAX PLUS +CREATEREGION) CL::CACHE-SLOT-INFO (CL::GET-PS-FROM-ACCESSOR CL::PS-FAST-ACCESSORS CL:GETHASH LIST +CL::PS-TYPE CL:COPY-TREE CL::GET-SLOT-DESCRIPTOR-FROM-PS) \VFMInsert1 (IGREATERP \ADDBASE IPLUS TIMES +MESASIZE IDIFFERENCE) \PROCESS.MAKEFRAME0 (IPLUS \MAKEFRAME \FREESTACKBLOCK UNFOLD LLSH \MP.ERROR) +\FIXDLINES (WINDOWPROP IDIFFERENCE SUB1 IMAX IMIN) KEYBOARDTYPE (MACHINETYPE SELECTQ SASSOC L-CASE +UNIX-GETENV MKATOM U-CASE UNIX-GETPARM) NSNET.DISTANCE (\LOCATE.NSNET PLUS) +MAKE-UNICODE-TRANSLATION-TABLES (CL:MAKE-ARRAY IPLUS CONS LOGAND CL:SVREF LRSH SUB1 LENGTH PLUS ASSOC +LIST HASHARRAY CHARCODE.DECODE ADD1) PPROCREPAINTFN (WINDOWPROP LOGAND DSPYPOSITION PPROCEXTENT) +COURIER.WRITE.STRING (STRINGP MKSTRING COURIER.WRITE.FAT.STRING NCHARS \BOUT BOUT) GETFILEINFO (FDEVOP + SPREADAPPLY* SELECTQ SELECTC SHOULDNT CHARSET \GETEOFPTR SIZE.FROM.LENGTH FOLDHI LRSH IPLUS +\EXTERNALFORMAT \GETDEVICEFROMNAME \ADD.CONNECTED.DIR \CONVERT-PATHNAME LISPERROR) PPROCWINDOW ( +CREATEW FUNCTION WINDOWPROP) \COURIER.TYPE.ERROR (ERROR CONCAT) SPLITKEY (STRPOSL FRPLNODE SUBATOM +SUB1 ADD1) \FILE.NOT.OPEN (LISPERROR) MSINTERPRETSET (LIST NCONC GETVERBTABLES MSINTERPRETSET SELECTQ +LISTHARD SHOULDNT APPLY* MAPTABLE FUNCTION MAPC UNION GETTABLE MSHASHLIST SOME TESTRELQ TESTTABLE +FASSOC MAPCONC ONFILE TERPRI FMEMB SUBSET MKLIST CL:EVAL MSGETBLOCKDEC MSLISTSET RECORDFIELDNAMES +CHECKPATHS MSONPATH) WTFIXLOADEF (FINDFILE PACKFILENAME ASKUSER LIST EVAL) FEDITFINDP (FEDITFINDP) +COURIER.WRITE.SEQUENCE (\BOUT LENGTH COURIER.WRITE) \DRAWCURVE.PRESS.LINE (IQUOTIENT IDIFFERENCE IPLUS + IMAX IMIN IGREATERP) \FILE.WONT.OPEN (LISPERROR) SEDIT::MAP-FONT (SHOULDNT) \CANONICALIZE.NSADDRESS ( +LOCF \ADDBASE FRPLACD CONS) OPT.FRAMEVAR (REVERSE FMEMB SUB1 PLUS OPT.DREV SUBSET) \ILLEGAL.DEVICEOP ( +ERROR ARG LIST PLUS) \LFFileName (CHCON FIXP LENGTH ALLOCSTRING PLUS ADD1) DINFO.LOOKUP (RESETFORM +TTYDISPLAYSTREAM GETPROMPTWINDOW PROMPTFORWORD CONSTANT APPLY* PRINTOUT PRIN1 PROMPTPRINT) +\IS.NOT.RANDACCESSP (ARG ERROR) PPROCEXTENT (ITIMES IPLUS LENGTH IMINUS DSPLINEFEED IDIFFERENCE +WINDOWPROP) \LFMakeDirHole (TIMES SUB1 IPLUS ADD1 IDIFFERENCE PLUS) HARDCOPYIMAGEW.TOPRINTER ( +GetPrinterName PRINTERTYPE HARDCOPY.SOMEHOW CONCAT PRINTERPROP) TB.ITEM.VISIBLE? (DSPCLIPPINGREGION +\DTEST TB.BOTTOM.OF.ITEM < +) MSNEXTWORD (GETWORDTYPE FASSOC GETHASH GETFILEPKGTYPE CONS MSFAIL) +DINFO.ADD.FMENU (WINDOWPROP OPENW WINDOWP DINFO.CREATE.FMENU GETPROMPTWINDOW DINFO.UPDATE.FMENU) +DSPFILL (\OUTSTREAMARG \GETSTREAM DSPCLIPPINGREGION BLTSHADE) RESETKEYACTION (LLSH \#BLOCKDATACELLS +COPY) MB.NWAYBUTTON.SELFN (IMAGEOBJPROP) SHIFT.BITMAP.UP (BITMAPCREATE IPLUS) SETHASHSTATUS (WHENCLOSE + FUNCTION CONS) RESHAPEBYREPAINTFN (WINDOWPROP DSPCLIPPINGREGION IDIFFERENCE IMIN IPLUS IMAX +DSPXPOSITION DSPYPOSITION DIFFERENCE FONTPROP DSPSCROLL PLUS) COMPILER::COMPILE-AND-DUMP (CL:GETHASH +COMPILER::COMPILE-AND-DUMP-1) DOTABS (PRIN1) \NSPRINT.FULL.REQUEST.STATUS (GETNSPRINTER NLSETQ +RESETLST \NSPRINT.COURIER.OPEN LIST FUNCTION COURIER.CALL ASSOC SELECTQ) COMPILER::ALPHA-LABELS ( +COMPILER::MAKE-CHILD-ENV COMPILER::MAKE-LABELS CL:MAPCAR CL:FUNCTION) COMPILER::ALPHA-LAMBDA-LIST ( +COMPILER::LAMBDA-REQUIRED CL:NREVERSE COMPILER::LAMBDA-OPTIONAL COMPILER::LAMBDA-KEYWORD) COMPILE1 ( +COMPILE1A BYTECOMPILE2 COMPILE2) \FM.MOMENTARY-SELECTEDFN (RESETSAVE LIST) \EP.PUT.AUX (ASSOC +CREATECELL CONS FFETCHFIELD) FB.INCREASING.VERSION (NULL.VERSIONP ILESSP) CL::ESTABLISH-ACCESSORS ( +CL::PS-TYPE CL:MAPCAN CL:FUNCTION CL::PS-ALL-SLOTS) \HANDLE.NS.ROUTING.INFO (LOCF \ADDBASE SUB1 FOLDLO + LRSH - \CANONICALIZE.NSADDRESS \TRANSLATE.10TO3 \GETBASEPTR UNFOLD LLSH LOGAND SETUPTIMER +\RELEASE.ETHERPACKET) \TEDIT.DELETE (TEXTOBJ IDIFFERENCE IMAX \TEDIT.CLOSEUPLINES \TEDIT.SHOWSELS) +PROCESS.STATUS.WINDOW (MAPCAR FUNCTION FONTCREATE HEIGHTIFWINDOW + WIDTHIFWINDOW MAX WINDOWPROP - +POSITIONP GETBOXPOSITION CREATEW IQUOTIENT CONS) DINFO.DEFAULT.MENU (GETPROMPTWINDOW MENU FONTCREATE +THIS.PROCESS CONCAT SELECTQ DINFO.SPECIAL.UPDATE DINFO.FIND DINFO.LOOKUP DINFO.UPDATE) +\FM.MOMENTARY-SETUP (\FM.ITEMPROP FFETCHFIELD FUNCTION) MSPATHSPRINTFN (ADD1 POSITION) \PARAS.IN.SEL ( +IDIFFERENCE TEDIT.SELECTED.PIECES CONS PLUS DREVERSE) MB.NB.PACKITEMS (IPLUS NCONC1 CONS PLUS) +RIGHTW.ADJUSTSELECTION (WINDOWPROP MAINWINDOW WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV +XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES STRINGWIDTH) OPT.FRAMEDEL (IGREATERP FASSOC PLUS MAP +OPT.CODEFRAME RPLACA OPT.CODELEV LENGTH OPT.COMPILERERROR IPLUS CONS OPT.PRATTACH SELECTQ FRPTQ +OPT.CCHECK) SHADEITEM (MENUITEMREGION WFROMMENU WINDOWPROP DISPLAYSTREAMP GETSTREAM DIFFERENCE +BITMAPWIDTH) \NSFILING.GETFILE (RESETLST \GETFILINGCONNECTION \NSFILING.LOOKUP.CACHE +\NSFILING.PARSE.FILENAME \NSFILING.CONNECT \NSFILING.OPEN.HANDLE SELECTQ \NSFILING.COMPOSE.PATHNAME +ADD1 ASSOC \NSFILING.FILLIN.ATTRIBUTES \NSFILING.FULLNAME \NSRANDOM.CREATE.STREAM FILING.CALL +\NSFILING.CHECK.ACCESS \NSFILING.ADD.TO.CACHE MKATOM U-CASE PLUS FFETCHFIELD CL:FUNCALL SHOULDNT +\NSFILING.HANDLE.ERROR \NSFILING.GET.NEW.SESSION WITHOUT.SESSION.MONITOR LISPERROR) \LFMakeLeaderPage +(FASSOC FIXP IDATE USERNAME \PFFindPageAddr) REPLACEHASHKEY (SETFILEPTR PRINTSTBYTE BOUT PRINTPTR +LOGAND RSH GETEOFPTR PRIN2 SPACES PRINT FORCEOUTPUT) \PFTransferPage (\PUTBASE \GETBASE +\DL.OBTAINNEWDOB FUNCTION \DL.RELEASEDOB) \CURVE2 (ELT \GETCOLORBRUSH MAXIMUMCOLOR DSPCOLOR +OPPOSITECOLOR \GETBRUSH \GETBRUSHBBT SUB1 IDIFFERENCE ITIMES DSPDESTINATION \TOTOPWDS \DSPTRANSFORMX +IPLUS LRSH \DSPTRANSFORMY ADD1 FOLDLO IMAX IABS IMINUS UNFOLD LLSH FQUOTIENT FTIMES FPLUS CONSTANT +\GETBASE POLYEVAL \FLOATBOX OPCODES PLUS) HARDCOPYIMAGEW.TOFILE (GetImageFile HARDCOPY.SOMEHOW) +\GETCHARCODE (IGEQ FIX NCHARS CHCON1) \LFDWIN (IPLUS LLSH \BIN) CHECK/MENU/IMAGE (CREATEWFROMIMAGE) +\LFMakeDirEntry (LENGTH IPLUS CL:ZEROP \BIN IGEQ \BOUT ADD1) EDIT4E1 (CONS DREVERSE) MAKEHASHKEY ( +IPLUS ITIMES DCHCON IMOD) MSCANT (RETFROM) PARAMETRICSPLINE (CONS LAST LENGTH ARRAY PLUS IDIFFERENCE +FDIFFERENCE FQUOTIENT ELT SUB1 FMINUS FTIMES FPLUS ADD1 IPLUS SETA) \FILINGSESSION.DEFPRINT ( +\DEFPRINT.BY.NAME) HARDCOPYIMAGEW (HARDCOPY.SOMEHOW) TB.RESHAPEFN (RESETLST WINDOWPROP +DSPCLIPPINGREGION RESHAPEBYREPAINTFN TB.FIRST.VISIBLE.ITEM# TIMES SUB1 TB.LAST.VISIBLE.ITEM#) +\DRAWPOLYGON.IP (\DRAWPOLYGON.GENERIC FQUOTIENT \WIDTHFROMBRUSH + - \VISIBLE.IP ILEQ PLUS +MASKSTROKE.IP LIST) WIDTHIFWINDOW (IPLUS ITIMES) DINFO.SELECT.GRAPH (RESETFORM TTY.PROCESS +THIS.PROCESS PROMPTPRINT EVAL MENU DINFO) \FM.CLEARITEM (\FM.ITEMPROP FFETCHFIELD LISTGET BLTSHADE) +\GET.COURIER.TYPE (\GET.COURIER.DEFINITION) GETBOXPOSITION (GETBOXSCREENPOSITION) DEFINEFONT.IP ( +FONTNAME.IP PLUS TIMES FONTPROP GETFRAMEVAR.IP FREPLACEFIELD CONS FFETCHFIELD) SKOR0 (NCHARS IQUOTIENT + ITIMES IDIFFERENCE SKOR CHCON ZEROP IGREATERP) \CLOSEF.PRESS (GETFILEPTR \BOUT FONTPROP \FACECODE +PLUS FOLDLO LRSH ADD1 IDIFFERENCE UNSIGNED LOGAND SUB1 LLSH LISP.TO.ALTO.DATE IDATE IPLUS FULLNAME +GETFILEINFO) BCOMPL2 (RESETLST EVAL APPEND LIST BRECOMPILE3 CONS FASSOC FMEMB DREMOVE VIRGINFN NCONC1) + FB.CANONICAL.DIRECTORY (\DTEST TTYDISPLAYSTREAM TTY.PROCESS THIS.PROCESS CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION DIRECTORYNAME FB.YES-OR-NO-P CL:FORMAT) CL::DEFINE-ACCESSORS (CL::PS-NAME +CL::PS-TYPE CL:MAPCAN CL:FUNCTION CL::PS-ALL-SLOTS) DASHES (IDIFFERENCE PRIN1) HEIGHTIFWINDOW ( +\INSURESCREEN IPLUS IMINUS DSPLINEFEED ITIMES) ADDMENU (TYPENAMEP POSITIONP IPLUS WINDOWPROP +CREATEWFROMIMAGE BITMAPCOPY CHECK/MENU/IMAGE FUNCTION DSPCLIPPINGREGION MENUREGION) STANDARDEDITE ( +RESETFORM EDITMODE EDITE) \MAIKO.10MBTURNONETHER (LOCF \ADDBASE) MSJOINDETS (SHOULDNT) +COMPILER::COMPILE-AND-DUMP-1 (COMPILER::COMPILE-ONE-LAMBDA) \CREATECHARSET.PRESS (RESETLST) +FB.EDITCOMMAND (FB.SELECTEDFILES FB.FETCHFILENAME) COMPILER::ALPHA-IL-FUNCTION (COMPILER::ALPHA-LITERAL + COMPILER::ALPHA-FUNCTION COMPILER::MAKE-CALL LIST) MSPATHS4 (GETHASH GETRELQ UNION GETTABLE FASSOC +MSPATHS4) \DRAWARC.PRESS (\DRAWARC.GENERIC) \FM.INSUREVISIBLE (DSPCLIPPINGREGION \FM.ITEMPROP +FFETCHFIELD SCROLLW FQUOTIENT WINDOWPROP) \TEDIT.CENTER.SEL.REV (\PARAS.IN.SEL TEDIT.GET.PARALOOKS +LISTGET MEMB CONSTANT TEDIT.SETSEL CONS DREVERSE) CL::\OPENSTREAM-WITH-DEFAULT (DECLARE OPENSTREAM +CL:MERGE-PATHNAMES PATHNAME) RIGHTW.BUTTONEVENTFN (WINDOWPROP MAINWINDOW WITH-INSPECTOR-ENV +XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES LOGAND ONED.TRACKCURSOR STRINGWIDTH + FONTPROP FUNCTION CL:FUNCALL) OPT.FRAMELOCAL (FASSOC) \PSWOP.SELECTED (PROMPTPRINT \PSW.SELECTED +TTY.PROCESS FIND.PROCESS LIST WFROMMENU SETUPTIMER WINDOWPROP SELECTQ MENU PROCESS.READ THIS.PROCESS) +\NSFILING.CLOSE.HANDLE (FILING.CALL) INSERTHASHKEY (TIMES REHASHFILE SETFILEPTR ADD1 PRINTPTR LOGAND +RSH BOUT REPLACEHASHKEY) \PFGetPhysicalVolumePage (\PFTransferPage) MASTERSCOPEXEC (EVALV ARGTYPE CONS + MSINTERPRET) SPLIT89 (DUNPACK NLEFT FMEMB LIST CONS PACK LDIFF) FB.MAKE.BROWSER.BUSY (LIST FUNCTION +CONS) COMPILER::ALPHA-IF (COMPILER::MAKE-IF COMPILER::ALPHA-FORM) SEDIT::TRY-REUSING-BITS (IPLUS +IDIFFERENCE SEDIT::NEXT-LINEAR-ITEM) TEDIT.INSERT (TEXTSTREAM MKSTRING NCHARS IMAX SELECTQ IMIN ADD1 +SUB1 IPLUS \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE PLUS TEXTOBJ TEDIT.PROMPTPRINT) PRESSBITMAP +(OPENPRSTREAM BITMAPWIDTH BITMAPHEIGHT IQUOTIENT IDIFFERENCE FIX TIMES TERPRI IMAX CREATEREGION MIN +QUOTIENT IPLUS CLOSEF) FB.GREATEST.PREFIX (NTHCHARCODE SUBSTRING PLUS) CL::PROCESS-ACCESSORS ( +CL::PS-INLINE) XIPAPPEND.IFSSTRING (XIPAPPEND.STRING) \FDEVINSTANCE (\INHERITFDEVOP.S FUNCTION +\INHERITFDEVOP.D) MSVERBED (MSCANT MSNEXTWORD) SHIFT.BITMAP.DOWN (BITMAPCREATE IPLUS) NCREATE2 ( +\GETDTD \ADDBASE ITIMES CREATECELL NTYPX MAPC \ADDREF OPCODES) COMPILER::CONSTANT-EXPRESSION-P ( +CL:CONSTANTP GET) \FTP.RENAMEFILE (\GENERIC.RENAMEFILE RESETLST \FTP.UNPACKFILENAME FDEVOP +SPREADAPPLY* FULLNAME \GETFTPCONNECTION MARK# FTPPUTMARK FTPGETMARK FTPGETCODE .FTPDEBUGLOG. LISPERROR +) CH.LIST.ALIASES.OF (COURIER.CALL CH.FINDSERVER PARSE.NSNAME CH.GETAUTHENTICATOR) +\PRESS.CONVERT.NSCHARACTER (SELCHARQ \CHAR8CODE LOGAND) \NSFILING.GENERATEFILES ( +\NSFILING.PARSE.FILENAME \GETFILINGCONNECTION STRPOS \NSFILING.GENERATE.STARS LIST SUBSTRING +NTHCHARCODE CONCAT \NSFILING.CONNECT CL:REMOVE-DUPLICATES APPEND CONSTANT +\FILING.ATTRIBUTE.TYPE.SEQUENCE \FILING.ATTRIBUTE.TYPE ASSOC CONS FILING.CALL DREMOVE FUNCTION +BULKDATA.GENERATOR DIRECTORY.MATCH.SETUP PRIN1 \NULLFILEGENERATOR) \VFMGet1 (ELT \VFMGetInterval) +ESUBST1 (MAPC /RPLNODE ESUBST1 APPLY) \DRAWCIRCLE.PRESS (FIXR FTIMES CONSTANT FQUOTIENT SQRT LIST +CREATEPOSITION IPLUS IDIFFERENCE MOVETO) CNDIR (PATHNAME DIRECTORYNAME \CONVERT-PATHNAME ERROR +COPY-PATHNAME %%PATHNAME-HOST CL:PATHNAME-HOST %%PATHNAME-DEVICE CL:PATHNAME-DEVICE +%%PATHNAME-DIRECTORY CL:PATHNAME-DIRECTORY) EDITFINDP (EDITFPAT EDIT4E EDIT4F1) CL:PATHNAME-DIRECTORY +(%%PATHNAME-DIRECTORY PATHNAME) HEADINGOP.IP (DIFFERENCE FONTPROP GETFRAMEVAR.IP) UNMARKASCHANGED ( +GETFILEPKGTYPE MEMBER ASSOC REMOVE) CL:PATHNAME-DEVICE (%%PATHNAME-DEVICE PATHNAME) CH.LIST.ALIASES ( +COURIER.CALL CH.FINDSERVER PARSE.NSNAME CH.GETAUTHENTICATOR) EDITL (CL:FUNCALL GET EDITMODE) +\BITMAPSIZE.PRESS (SELECTQ UNFOLD LLSH BITMAPWIDTH BITMAPHEIGHT CONS \ILLEGAL.ARG) CL:PATHNAME-HOST ( +%%PATHNAME-HOST PATHNAME) DEDITE (EDITE) \HLSVALUEFN (IPLUS FIX FTIMES FPLUS FQUOTIENT FDIFFERENCE) +ONEDINSPECT.PROPWIDTH (STRINGWIDTH IPLUS CHARWIDTH) \HANDLE.RAW.3TO10 (+ FOLDHI LRSH IPLUS LOCF +\ADDBASE) WFROMMENU (OPENWINDOWS WINDOWPROP) MSONPATH (HASHARRAY MSLISTSET PUTHASH MSPATHS4) FIXATOM2 +(ARG) EDITFA (TERPRI) DWIMIFY1 (DWMFY1) DIRECTORYNAME (CL:NAMESTRING SELECTQ SYSTEMTYPE GETDIRNAME +FILENAMEFIELD NTHCHARCODE SUBSTRING \GETDEVICEFROMHOSTNAME SELCHARQ PACKFILENAME.STRING NCHARS FDEVOP +SPREADAPPLY* MKSTRING MKATOM HELP) SEDIT::SHIFT-BLOCK (ADD1 IDIFFERENCE IPLUS) ADDSPELL1 (LIST CONS) +KEYDOWNP (\NEWKEYDOWNP \GETBASEBIT LOGAND \GETBASEBYTE FOLDLO LRSH MASK.1'S LSH SUB1 IDIFFERENCE +CONSTANT IMOD \KEYNAMETONUMBER) TWODINSPECT.COLUMNWIDTH (IMAX STRINGWIDTH APPLY*) OPT.MERGEFRAMEP ( +FASSOC) PREEDITFN (SELECTQ CONS GETPROPLIST GETHASH PUTHASH RESETSAVE LIST FUNCTION APPEND GETPROP +EVALV MAPCAR) HASHFILESPLST1 (MAPHASHFILE FUNCTION) CL::SETF-NAME (XCL:PACK LIST) XIPAPPEND.STRING ( +STRINGP LITATOM MKSTRING NCHARS IDIFFERENCE CEIL LOGAND IPLUS CONSTANT SUB1 LOGXOR FOLDLO LRSH PLUS +FFETCHFIELD LOCF \ADDBASE \PUTBASESTRING) PROCESS.BACKTRACE (ATTACHEDWINDOWS WINDOWPROP CREATEW +IDIFFERENCE FONTCREATE \MAKESTACKP SELECTQ) CLIPBOARD-COPY-STREAM (UNIX-GETENV CREATE-PROCESS-STREAM) +\TEDIT.COPY.PIECEMAPFN (IMAGEOBJPROP APPLY* COPYALL WINDOWPROP \TEDIT.UNIQUIFY.CHARLOOKS) +TTYINFOSTREAM (PROCESS.TTY \GETSTREAM) SHIFT.BITMAP.LEFT (BITMAPCREATE IPLUS) FB.MERGE.DIRECTORIES ( +CONCAT CL:SECOND) \UPDATE.PROCESS.WINDOW (WINDOWPROP) MSMATCHRATING (IPLUS SELECTQ MSTYPEMATCHRATING +MSSUBJTYPE MSOBJTYPE) \FM.ENDEDIT (WINDOWPROP TTY.PROCESS THIS.PROCESS PROCESS.RESULT ERROR) +LEAF.ASSURE.FINISHED (\DTEST CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) MSPATHS1 (ADD1 +MSPATHSPRINTFN GETHASH BELOWMARKER NCONC1 IDIFFERENCE GETRELQ UNION GETTABLE FASSOC LIST MSMEMBSET +IGREATERP IPLUS NCHARS PUTHASH CONS) FB.EXPUNGECOMMAND (TB.COLLECT.ITEMS FB.FETCHFILENAME PLUS BLOCK +CONCAT) \TEDIT.FOREIGN.COPY? (PROCESSPROP TTY.PROCESS WINDOWPROP WFROMDS PROCESS.TTY OBJECTOUTOFTEDIT +\BIN CHARACTER PLUS) SEDIT::UNDO (SEDIT::CLOSE-NODE SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW PRIN1) +\DSPSCALE2.IP (CONCATT.IP) BAKTRACE (STKNTH CONS STKNAME CL:SOME CL:FUNCTION LOGOR STKARG SUB1) +\UNQUEUE (UNINTERRUPTABLY ERROR LIST) MODIFY.KEYACTIONS (MAPCAR CONS KEYACTION MAPC EVAL) +\DUMP.COURIERPROGRAMS (\GET.COURIERPROGRAM GETHASH PRIN2 PRINTDEF) CL:NAMESTRING (PATHNAME +%%PATHNAME-HOST %%PATHNAME-DEVICE %%PATHNAME-DIRECTORY %%PATHNAME-NAME %%PATHNAME-TYPE +%%PATHNAME-VERSION CONCATLIST NCONC) SEDIT::REUSE-LINEAR-FORM (IPLUS SEDIT::SCAN-FOR-BOUNDS LAST PLUS +FFETCHFIELD IDIFFERENCE SEDIT::LAST-LINE-LINEAR) MASTERSCOPE1 (TERPRI CL:FIND-PACKAGE SELECTQ +LISPXREAD LISPX RETFROM FUNCTION) EDITFERROR (TERPRI ASKUSER CONCAT EDITE COPY RETFROM) MOUSECONFIRM ( +GETPROMPTWINDOW CONCAT PRIN1 RESETFORM CURSOR LOGAND LOGOR LASTMOUSESTATE ZEROP) DIRECTORY (APPEND +LIST FIXP CONS MKSTRING NCHARS FREEVARS IDIFFERENCE IDATE TIMES DEFERREDCONSTANT \ILLEGAL.ARG FASSOC +NCONC MAPCAR CAR DIRECTORY.PARSE RESETSAVE SETTERMTABLE OUTPUT GETSTREAM OPENSTREAM REVERSE PLUS TAB +CL:VALUES) METASHIFT (KEYACTION ARG ASSOC) \CHARWIDTH.PRESS (\PRESS.CONVERT.NSCHARACTER \FGETCHARWIDTH + \FGETWIDTH \GETBASE \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CHARSET LRSH \CREATECHARSET \CHAR8CODE +LOGAND) DSPSCROLL (\GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM) RESHAPEALLWINDOWS (ATTACHEDWINDOWS + SHAPEW1 \RESHAPEATTACHEDWINDOWSAROUNDMAINW \BREAKAPARTATWSTRUCTURE \BUILDATWSTRUCTURE WINDOWSIZE +IDIFFERENCE \TOTALFIXEDWIDTH IMAX DIFFERENCE \TOTALFIXEDHEIGHT \SHAREOFXTRAX \SETWINFOYSIZE +\SHAREOFXTRAY \TOTALPROPOSEDSIZE \SETWINFOXSIZE IPLUS SELECTQ PLUS CREATEREGION) EDITF2 (SELECTQ) +SHIFT.BITMAP.RIGHT (BITMAPCREATE IPLUS) COMPILER::SET-UP-BLOCK-DECLS (CL:MAKE-HASH-TABLE) +\FM.CHANGESTATE (WINDOWPROP \FM.NWAY-CHANGESTATE SELECTQ \FM.ITEMPROP FFETCHFIELD +\FM.TOGGLE-CHANGESTATE \FM.3STATE-CHANGESTATE \FM.STATE-CHANGESTATE) EDITF (NLAMBDA.ARGS EDITDEF PRINT +) DISPLAYLINK (GN/LEFT GN/RIGHT DISPLAYLINK/RL DISPLAYLINK/LR GN/BOTTOM GN/TOP DISPLAYLINK/BT +DISPLAYLINK/TB) CLISPIFY2A (CLISPIFY2 LIST) ATTACHEDWINDOWS (WINDOWPROP ASSOC LIST) SHIFTDOWNP ( +SELECTQ \ILLEGAL.ARG) MB.NB.SIZEFN (IMAGEOBJPROP IDIFFERENCE PLUS LIST MAPCAR ITIMES LENGTH IMINUS +MB.NB.PACKITEMS MAPCONC COPY NCONC) TTY/EDITE (RESETLST SELECTQ SYSTEMTYPE TTYINFOSTREAM CONS LIST +LAST EDITL HELP) GETPROBE (FNTH ADD1 LOGAND NTHCHARCODE LRSH NCHARS) FB.MAYBE.EXPUNGE (SELECTQ MENU +FB.EXPUNGE?.MENU FB.EXPUNGECOMMAND) MSPATHS2 (GETHASH PUTHASH TESTRELQ TESTTABLE FASSOC GETRELQ UNION +GETTABLE) DIRECTORYNAMEP (PACKFILENAME.STRING \GETDEVICEFROMNAME SPREADAPPLY*) TEDIT.DELETE (TEXTOBJ) +EDITDEF (GETFILEPKGTYPE APPLY*) OPT.FRAMEMERGE (FNTH NCONC IPLUS OPT.PRATTACH OPT.NONILVAR SUB1) +HOSTNAMEP (U-CASE MKATOM CHCON1 SUBATOM SUB1 STRPOS SPREADAPPLY*) EDITDEF.FNS (GET GETD GETPROP) +\LFGenFileID (FREPLACEFIELD PLUS FFETCHFIELD) EDITF1 (EDITE) GETHASHKEY (MAKEHASHKEY BIN READPTR IPLUS + LLSH READ GETPROBE REHASHKEY ITIMES IMOD IQUOTIENT IMINUS) CL::CACHE-PREDICATE-INFO ( +CL::GET-PS-FROM-PREDICATE) XIPAPPEND.WORD (\DTEST UNFOLD LLSH IDIFFERENCE CEIL LOGAND IPLUS CONSTANT +SUB1 LOGXOR FOLDLO LRSH) \DSPTRANSLATE.IP (CONCATT.IP) FB.FINISH.COMMAND (WINDOWPROP GETMENUPROP +FB.PROMPTWPRINT) OPT.NONILVAR (OPT.NONILVAR) \CLEAR.ROUTING.TABLE (NTYPX PLUS \ADDBASE \CREATECELL) +ATTACHWINDOW (INSURE.WINDOW ALLATTACHEDWINDOWS CONS FUNCTION) SUBATOM (STRINGP MKSTRING IPLUS \MKATOM +ADD1 IDIFFERENCE LISPERROR) EXPRESSIONS.WHENCHANGED (SELECTQ UNMARKASCHANGED MAPC +EXPRESSIONS.WHENCHANGED) UNSAVEBLOCK? (MAPC FILECOMSLST FASSOC LIST GETPROP NCONC1 ASKUSER LOADDEF) +SEDIT::NORMALIZE-SELECTION (DSPCLIPPINGREGION) COMPILER::ALPHA-FUNCTIONAL-FORM (CL:FIRST CL:SECOND +COMPILER::ALPHA-FUNCTION COMPILER:MAKE-CONTEXT COMPILER::ALPHA-FORM) \SPP.HANDLE.INPUT (GETXIP ILESSP +\LOLOC IDIFFERENCE FUNCTION SEQ.ADD1 \ADDBASE IPLUS SUB1 LRSH ITIMES IMAX IMIN CLOCKDIFFERENCE) DREAD +(READC PLUS NCHARS) LOADDEF (PUTDEF GETDEF) WRITE-UNICODE-INCLUDED (MAPCAR NCONC SASSOC HELP +OCTALSTRING STRPOS CL:PARSE-INTEGER SUBSTRING ADD1 SUB1 LIST PLUS CONS ASSOC LRSH SORT LAST CONCAT +CL:VALUES) UNPACKFILENAME.STRING (NCHARS LITATOM STRINGP NUMBERP UNPACKPATHNAME.STRING LIST +NTHCHARCODE SUB1 \UPF.NEXTPOS CONS SUBATOM SUBSTRING DREVERSE IPLUS GETHOSTINFO LASTCHPOS ADD1 +SELCHARQ CANONICAL.DIRECTORY ALLOCSTRING PLUS \PUTBASEBYTE \PUTBASE MKATOM ILEQ \UPF.TEMPFILEP) +CH.DELETE.ALIAS (COURIER.EXPEDITED.CALL CH.FINDSERVER PARSE.NSNAME CH.GETAUTHENTICATOR) MSNEEDUNSAVE ( +GETP LIST UNSAVEFNS TERPRI /SETATOMVAL NCONC) EDITDEFAULT1 (LISPXWATCH) \BLTSHADE.PRESS (CREATEREGION +INTERSECTREGIONS \BLTSHADE.GENERICPRINTER) \BACKPEEKBIN (UNINTERRUPTABLY \BIN) DECODE-NS-STRING ( +NCHARS + \GETBASEBYTE PLUS ALLOCSTRING \ADDBASE LLSH) \MAIKO.10MBWATCHER (SUBSTRING +\MAIKO.INPUT.INTERRUPT PLUS) EDITH (SELECTQ READLINE ERROR! LISPXFIND FMEMB LDIFF CONS LIST +UNDOEDITCOM RESETSAVE SETREADTABLE GETREADTABLE RESETVARS .RESETLST. CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION LISPX LISPXREADBUF LISPXREAD) DINFO.WRITE.GRAPH (WRITEFILE LIST) +PUPNET.DISTANCE (\LOCATE.PUPNET PLUS) \BACKBIN (\PEEKBIN) \NSFILING.PARSE.FILENAME (NCHARS SELCHARQ +CHCON1 NTHCHARCODE PLUS + ADD1 NCONC1 SUBSTRING SUB1 CL:PARSE-INTEGER -) RETDWIM3 (CONS RETDWIM3 SUB1) + EDIT* (NLEFT MINUS NTH CONS) TB.BROWSER.BUSY (RESETFORM CURSOR BLOCK) PRINTBINDINGS (RESETFORM +PRINTLEVEL TERPRI STKNTH STKSCAN STKARG STKNAME GETTOPVAL) \COURIER.GETDEF (\GET.COURIERPROGRAM +GETHASH) BIN (\BIN) \NSPRINT.WATCH.JOB (LIST FIND.PROCESS ADD.PROCESS FUNCTION) SETUP.OFFICE.KEYBOARD +(SELECTQ MACHINETYPE MODIFY.KEYACTIONS) \DRAWARC.GENERIC (DRAWCURVE \COMPUTE.ARC.POINTS DRAWCIRCLE) +SHRINKW (WINDOWOP SPREADAPPLY* \INSUREWINDOW) \BINS (FDEVOP SPREADAPPLY* \DTEST) \FM.HIGHLIGHTITEM ( +\FM.DISPLAYBITMAP \FM.ITEMPROP LISTGET FFETCHFIELD BITBLT) EDLOC (EDITCOMS) FB.MAYBE.INSERT.FILE ( +NCHARS SUB1 FB.CREATE.FILEBUCKET APPEND MAPCAR GETFILEINFO INFILEP UNPACKFILENAME.STRING CL:POSITION +CL:NTH IDATE PACKFILENAME.STRING) \SPP.INFO.HOOK (INSPECT PROCESSPROP CREATEW GETBOXREGION FONTCREATE) + BOUT (\BOUT) SEDIT::WALK-UP-TREE (CL:FUNCALL) BURYW (WINDOWOP SPREADAPPLY* \INSUREWINDOW) +POP-IP-STACK (STREAMPROP ERROR) MB.NB.WHENOPERATEDFN (SELECTQ IMAGEOBJPROP) TWODINSPECT.SETELT ( +GETPROMPTWINDOW APPLY* WINDOWPROP XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES +RESETLST RESETSAVE TTYDISPLAYSTREAM TTY.PROCESS THIS.PROCESS CLEARBUF printout PRIN1 CL:FUNCALL +LISPXREAD) CHCON1 (\GETBASECHAR \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE NTHCHARCODE) \BOUTS ( +FDEVOP SPREADAPPLY* \DTEST) MSJOIN (UNION MKLIST) \PFFindFileSize (\VFMGetPageGroup \PFGetVol) EDITRAN + (FASSOC SOME FMEMB FIXSPELL BLKAPPLY LDIFF MAPCAR SELECTQ EVAL) FIND1STPRIME (LOGOR IREMAINDER ITIMES + PLUS) \MAIKO.INPUT.INTERRUPT (LOCF \ADDBASE \ALLOCATE.ETHERPACKET) \VFMGet (\BLT ELT \VFMGetInterval +MESASIZE) %%EXTEND-ARRAY (%%TOTAL-SIZE) BCOMPL1A (NCONC FILECHANGES NCONC1 EVAL \GETSTREAM CONS) +EDITTO (IPLUS IMINUS) ONEDINSPECT.REPAINTFN (DSPCLIPPINGREGION WINDOWPROP XCL::PROFILIZE CL:PROGV +XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES SUB1 FONTPROP APPLY*) \DEFAULTSTATE.IP (ISET.IP) +%%ARRAY-CONTENT-INITIALIZE (CL:ARRAY-RANK %%ARRAY-ELEMENT-INITIALIZE CL:ARRAY-DIMENSIONS +%%FILL-ARRAY-FROM-SEQUENCE %%FLATTEN-ARRAY CL:ERROR) EDITDEFAULT (FASSOC EDITRAN EDITQF EDITCOM LIST +EDITH EDITUSERFN U-CASE READLINE CONS NTHCHAR RPLSTRING MKATOM APPEND NTHCHARCODE MKSTRING FIXSPELL +SUB1) \QUEUELENGTH (PLUS) \INIT.KEYBOARD.STREAM (FUNCTION) MOVEW (WINDOWOP SPREADAPPLY*) +\COURIER.PUTDEF (GETHASH \DTEST) COPYBYTES (\GETSTREAM \ILLEGAL.ARG IDIFFERENCE \GETEOFPTR GETFILEINFO + \GETFILEPTR SPREADAPPLY* \BOUT \BIN) SEDIT::PAINT-TO-END-OF-LINE (ADD1 IDIFFERENCE SEDIT::REPAINT) +\PAPERSIZE.IP (SELECTQ CL:ASSOC ERROR LIST TIMES) EDITCOM (LIST EDIT1F) \ADD.PACKET.FILTER (FMEMB +NCONC1) DEFAULT.EDITDEF (GETDEF WHEREIS CL:FORMAT ASKUSER MAKEKEYLST) \GETEOFPTR (FDEVOP SPREADAPPLY*) + SEDIT::UNDO-REPLACE-QUOTE (SEDIT::SUBNODE LIST) UNSAVEFNS (APPEND EXPRP GETP RESETVARS .RESETLST. +LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION WHEREIS TERPRI REMOVE printout) EDRPT ( +RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION ADD1) +\NSPRINT.WATCHDOG (DREMOVE) COMPILER::ALPHA-FLET (COMPILER::MAKE-CHILD-ENV) \SCALEDBITBLT.PRESS ( +\DSPXPOSITION.PRESS \DSPYPOSITION.PRESS INTERSECTREGIONS CREATEREGION) \BUFFERED.COPYBYTES ( +IDIFFERENCE IPLUS SPREADAPPLY*) INSPECT/AS/RECORD (MENU SORT LIST FUNCTION INSPECT) +ADD/AND/DISPLAY/LINK (TOLINKS TERPRI CONSTANT) EDUP (MEMB CONS) COMPILER::ALPHA-FUNCTION ( +COMPILER::CONTEXT-APPLIED-CONTEXT) \DEL.PACKET.FILTER (DREMOVE) \POPSTATE.IP (IP-TOS APPENDOP.IP) +RANDACCESSP (\GETSTREAM) \NSFILING.COMPOSE.PATHNAME (CONCATLIST NCONC MAPCONC LIST \NSFILING.ADDQUOTES +) CURSOR.INIT (UNFOLD LLSH) FB.PRINTFN (TB.USERDATA WINDOWPROP DSPFONT + PLUS - \GETBASEFAT \GETBASE +\GETBASETHIN \GETBASEBYTE DSPXPOSITION IMAX STRINGWIDTH CHCON1 CHARWIDTH) \LFCheckBang (BIN +\LFDirectoryScrambled) CLISPLOOKUP (GETPROP GETLOCALDEC CLISPLOOKUP0 SELECTQ GETATOMVAL) \SETFILEPTR ( +FDEVOP SPREADAPPLY*) \LEAF.FLUSH.CACHE (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +) \CHANGE-VISIBLE-REGION.IP (- ADD1 + <= MIN) SI::CANONICALIZE-ADVICE-WHEN-SPEC (CL:INTERN STRING) +%%ALTER-AS-DISPLACED-TO-BASE-ARRAY (%%TOTAL-SIZE %%CML-TYPE-TO-TYPENUMBER) \GETSTREAM (SELECTQ +\IOMODEP \FILE.NOT.OPEN ERROR) CHANGERECORD (MSNEEDUNSAVE GETRELATION UNION) EDITCOMA (EDITMAC +EDITCOMS SELECTQ CONS LAST LIST RETFROM RETEVAL PUTPROP SHOULDNT NLSETQ EDITL0 STKPOS CL:THROW LISPX +LISPXREAD EDITQF ERROR! BPNT0 TERPRI FLAST EDITH EDIT!UNDO FMEMB EDITSMASH PRIN1 EDITBF EDUP EDIT%: +EDIT* EDITDEFAULT) DPRIN1 (TAB PLUS NCHARS PRIN1) COPYCHARS (\GETSTREAM COPYBYTES \GETEOFPTR FIX +\ILLEGAL.ARG \GETFILEPTR SPREADAPPLY* IMIN IPLUS \INCHAR IGEQ IDIFFERENCE SELCHARQ \BIN \BOUT PLUS) +APPLYTOSELECTEDNODE (MODERNWINDOW.BUTTONEVENTFN FUNCTION) CURSORPROP (PUTCURSORPROP ARG GETCURSORPROP +\ILLEGAL.ARG) CL:ADJUST-ARRAY (CL:ERROR LIST CL:ARRAY-ELEMENT-TYPE %%TOTAL-SIZE LENGTH CL:ARRAY-RANK + + CL:ARRAY-TOTAL-SIZE MIN CL:FILL-POINTER CL:ARRAY-DIMENSIONS CL:MAKE-ARRAY %%FAT-STRING-ARRAY-P +%%FLATTEN-ARRAY) \VFMGetInterval (\PFVolumeNumber ELT SETA SUB1 ARRAY \VFMGetBufferFor PLUS) \INCHAR ( +\CHECKEOLC SELCHARQ SELECTC LIST \CHECKEOLC.CRLF CL:FUNCALL) GETCURSORPROP (LISTGET) +\SPP.RETRANSMIT.NEXT (ELT IMOD SEQ.ADD1 \LOLOC \ADDBASE) WRITE-UNICODE-MAPPING-FILENAME (PACKFILENAME +CONCATLIST CONS NCONC LIST) COMPILER::ALPHA-GO (CL:ASSOC COMPILER::MAKE-GO) PUTCURSORPROP (LISTGET +LIST) EDITSAVE (HISTORYSAVE) FUNCTIONSMSMC (GETDEF) UNDOEDITCOM (FLAST CONS) CL::DEFAULT-PREDICATE-NAME + (CL:VALUES CL:INTERN CL:CONCATENATE STRING) XIPAPPEND.BYTE (\DTEST IDIFFERENCE PLUS FFETCHFIELD LOCF +\ADDBASE) EDITCOM1 (CONS LIST EVAL LISPX/ /RPLNODE APPLY LISTGET1) TEDIT.PROMPTPRINT (TEXTOBJ +WINDOWPROP \TEDIT.MAINW NLSETQ SELECTQ GETPROMPTWINDOW PRIN1) UNDOEDITCOM1 (MAPC UNDOEDITCOM1 EDITCOM1 + LISPXWATCH) \FM.CHANGELABEL (ATOM STRINGP BITMAPP \FM.ITEMPROP FFETCHFIELD APPEND LIST \FM.GETREGIONS + \FM.GETBITMAPS SELECTQ \FM.NUMBER-CHANGESTATE LISTGET \FM.3STATE-SETUPOFFBITMAP) EXTENDABLE-ARRAY-P ( +CL:ERROR) SI::CANONICALIZE-ADVICE-SYMBOL (STRPOS LIST SUBATOM CL:1- +) \COPYOPENFILE (GETFILEINFO CONS + LIST ASSOC \INFER.FILE.TYPE OPENSTREAM CLOSEF) SEDIT::UNDO-LIST-REPLACE (LAST FIXP SUB1) TB.WINDOW ( +\DTEST) \CURSORMASKPROPNAME (SELECTQ SHOULDNT) CLEAR.LEAF.CACHE (\GETDEVICEFROMNAME +\CANONICAL.HOSTNAME \LEAF.FLUSH.CACHE) OPENSTREAM (SELECTQ \ILLEGAL.ARG APPEND \GETSTREAM +\CONVERT-PATHNAME \OPENFILE \SEARCHOPENFILES) OPT.FRAMEOPT (SUBSET) \MAIKO.10MBSENDPACKET ( +\ALLOCATE.ETHERPACKET LOCF \ADDBASE ADD1 \REQUEUE.ETHERPACKET) \CURSORIMAGEPROPNAME (SELECTQ SHOULDNT) + %%COPY-TO-NEW-ARRAY (MIN %%FAST-COPY-BASE %%ARRAY-BASE + %%ARRAY-OFFSET %%ARRAY-TYPE-NUMBER) +CL:ADJUSTABLE-ARRAY-P (CL:ERROR) RETDWIM2 (RETDWIM3) EDITSAVE1 (FMEMB LAST) %%ALTER-AS-DISPLACED-ARRAY + (%%TOTAL-SIZE +) COMPILER::ALPHA-EVAL-WHEN (CL:FUNCTION COMPILER::ALPHA-PROGN) SEDIT::OUTPUT-STRING ( +SEDIT::STRINGWIDTH RPLACD CONS FREPLACEFIELD IMAX FFETCHFIELD FONTPROP SEDIT::ADVANCE PLUS MKSTRING +SEDIT::MAP-FONT) FIXPRINTIN (POSITION) EDITSMASH (CONS MEMB) CL:FILL-POINTER (CL:ERROR) OPT.SETDEFREFS + (FRPLACD FASSOC CONS) CLOSEF (\GETSTREAM STREAMPROP APPLY*) \TEDIT.WINDOW.OPS (DIFFERENCE WINDOWPROP +LOGAND LOGOR LASTMOUSEX LASTMOUSEY) \PFFindPageAddr (\VFMGetPageGroup \PFGetVol IPLUS IMINUS) EDIT2F ( +COPY APPEND NTH SUB1 IMINUS CONS EDITSMASH1 NCONC) DELETEHASHKEY (SETFILEPTR PRINTPTR LOGAND RSH SUB1 +BOUT PRINTSTBYTE FORCEOUTPUT) MSSEEKTYPE (GETWORDTYPE FASSOC GETHASH MSNEXTWORD MSTRYSPELLTYPE) PROGN +(\EVAL) FUNCTIONSMSGETDEF (REMOVE-COMMENTS GETDEF SELECTQ GETTEMPLATE) EDIT4F1 (CONS EDIT4E EDIT4F2 +SUB1) ARRAY-NEEDS-INDIRECTION-P (CL:ERROR) \FM.DISPLAYITEM (\FM.DISPLAYBITMAP \FM.ITEMPROP LISTGET +FFETCHFIELD BITBLT) EDITAPPEND (CONS EDITAPPEND) XIPAPPEND.CELL (\DTEST UNFOLD LLSH IDIFFERENCE CEIL +LOGAND IPLUS CONSTANT SUB1 LOGXOR \ADDBASE FOLDLO LRSH \HINUM \LONUM) DIRFILENAME (MKATOM U-CASE) +\LFDWOUT (LOGAND LRSH \BOUT) BITSPERPIXEL (BITSPERPIXEL SELECTQ ARRAYSIZE LISPERROR) FB.REMOVE.FILE ( +TB.NTH.ITEM SUB1 ADD1 PLUS STRING-EQUAL FB.COUNT.FILE.CHANGE) EDIT1F (ERROR! NTH CONS NLEFT IMINUS) +\TEDIT.BOLD.CARET.ON (\TEDIT.PARSE.CHARLOOKS.LIST) EDITCOML (EDITMAC EDITCOMS SUBPAIR SUBST SELECTQ +EDITCOM1 LIST EDLOC SET EDIT4F CONS MAPCAR LISPX/ EDITNCONC COPY EDITAPPEND BPNT MAPC EDITQF EDITBF +EDITNTH NLSETQ ERROR! EDIT.RI EDIT.RO EDIT.LI EDIT.LO EDIT.BI EDIT.BO EDIT* IMINUS EDOR EDITMBD +EDITXTR EDITTO EDIT%: EDITMV EDRPT EDLOCL EDITFPAT EDITBELOW EDITSW EDITCOM RESETLST APPLY EDITDEFAULT +) EDITFPAT1 (CONS NCHARS NTHCHARCODE SUBSTRING SUB1 STRPOS ADD1 DREVERSE EDITFPAT1) +CL:ARRAY-HAS-FILL-POINTER-P (CL:ERROR) \SPP.PROBE (\SPP.SENDPKT \SPP.SYSPKT) COPYFILE (PACKFILENAME +UNPACKFILENAME RESETLST RESETSAVE OPENSTREAM \COPYOPENFILE) SEDIT::OUTPUT-SPACE (RPLACD CONS +FREPLACEFIELD SEDIT::ADVANCE PLUS FFETCHFIELD IQUOTIENT) SEDIT::VERIFY-STRUCTURE (WITH.MONITOR +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SEDIT::CLOSE-NODE LIST RPLACD) EDITBELOW (EVAL +REVERSE FMEMB DREVERSE SUB1) LISTFILES (NLAMBDA.ARGS APPEND FINDFILE TERPRI REMOVE NAMEFIELD LIST) +SI::ADD-OLD-STYLE-ADVICE (MAPC) UNPACKFILENAME (UNPACKFILENAME.STRING) SEDIT::SUBNODE-CHANGED-QUOTE ( +RPLACA) EDITNCONC (ERROR! LAST EDITSMASH1) EDIT4F2 (EDIT4F3) \MAIKO.10MBSTARTDRIVER ( +\INIT.ETHER.BUFFER.POOL TIMES \ALLOCATE.ETHERPACKET) HISTORYFIND1 (LAST NLEFT CHCON1 EDITFPAT PACK +DUNPACK LISTGET1) %%DO-LOGICAL-OP (%%ARRAY-BASE %%ARRAY-OFFSET CL:ARRAY-TOTAL-SIZE DEFERREDCONSTANT +UNINTERRUPTABLY) CLIPBOARD-PASTE-STREAM (UNIX-GETENV CREATE-PROCESS-STREAM CL:FUNCTION) EDITSMASH1 ( +CONS LIST GETHASH) EDIT4F3 (CONSTANT CHARACTER CONS EDIT4F3 CONCATLIST PACK NCONC LIST LDIFF NCONC1) +CL:ARRAY-DIMENSION (CL:ERROR LENGTH CL:NTH) \FM.CPUTITEMPROP (SELECTQ ERROR LIST) BPNT (EDITNTH ADD1 +SUB1 BPNT0) FB.COMPILECOMMAND (FB.SELECTEDFILES ADD.PROCESS LIST FUNCTION KWOTE) SEDIT::UPDATE ( +SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW SEDIT::SHOW-CARET) TRANS.IP (APPENDOP.IP) CURSORCREATE ( +BITMAPWIDTH BITMAPHEIGHT IMAX IMIN SUB1 FIXP) EDIT.RI (EDITNTH CONS EDITSMASH1 EDITNCONC) COPYDEF ( +GETFILEPKGTYPE GETDEF REMOVE MKLIST STRPOS PACK* SUBATOM COPY GETTOPVAL FRPLACA) OPT.DEFREFS (FASSOC) +\UFStoOtherCopyMess (U-CASE FILENAMEFIELD PROMPTPRINT) DIRGETFILEINFO (\GENERATEFILEINFO) \PFGetPage ( +\PFTransferFilePage) EDITBF1 (TCONC SUB1) \PUPNET.CLOSERP (\LOCATE.PUPNET ILESSP) \BITBLT.PRESS ( +\DSPXPOSITION.PRESS \DSPYPOSITION.PRESS INTERSECTREGIONS CREATEREGION) STKPOS (\MYALINK OPCODES +\STACKARGPTR IDIFFERENCE \STKNAME SUB1 \MAKESTACKP) MAKEFILE1 (ROOTFILENAME COMPILE-FILE? REMOVE +GETPROP SELECTQ FAKE-COMPILE-FILE CL:COMPILE-FILE LIST BRECOMPILE BCOMPL RECOMPILE TCOMPL SHOULDNT) +\VFMReadNext (ILEQ \BLT MESASIZE \ADDBASE IPLUS) \CURSORUP (UNINTERRUPTABLY ADJUSTCURSORPOSITION +IDIFFERENCE SUB1) \COMPUTE.ARC.POINTS (FQUOTIENT IMIN IMAX ABS FIX QUOTIENT TIMES PLUS FIXR COS SIN +LIST FPLUS) OPT.CODEFRAME (SELECTQ OPT.CODEFRAME) \INFER.FILE.TYPE (FUNCTION \BIN) FB.OPERATE.ON.FILES + (MAPCAR CONS CLOSEW TTYDISPLAYSTREAM) CH.CREATE.ALIAS (COURIER.CALL CH.FINDSERVER PARSE.NSNAME +CH.GETAUTHENTICATOR) \LFDirectoryScrambled (PACKFILENAME.STRING U-CASE PRIN1 DiskError) \CURSORDOWN ( +UNINTERRUPTABLY \SOFTCURSORDOWN \HARDCURSORDOWN) FB.COPY/RENAME.MANY (FB.PROMPTFORINPUT CONCAT LENGTH +DIRECTORYNAME UNPACKFILENAME.STRING FB.CANONICAL.DIRECTORY \ADD.CONNECTED.DIR LISTGET STRING-EQUAL +SELECTQ FB.YES-OR-NO-P FB.GREATEST.PREFIX SUBSTRING SUB1 ADD1 NCHARS FB.SORT.VERSIONS FUNCTION +FB.COPY/RENAME.ONE FB.FETCHFILENAME PACKFILENAME.STRING FB.MERGE.DIRECTORIES) TEDIT.UNDO.PARALOOKS ( +NCONC1 IPLUS) PRINTCONSTANT (SUBSTRING ADD1 NCHARS PRIN1) \VFMGetBufferFor (\VFMKillBuffer CONS FNTH) +\CURSOR-VALID-P (BITMAPWIDTH BITMAPHEIGHT <) EDITNTH (MEMB EDITELT LIST TAILP ERROR! NLEFT IMINUS NTH) + BCOMPL.BODY (PACKFILENAME FMEMB UNPACKFILENAME OPENSTREAM LIST RESETLST RESETSAVE INPUT APPEND NCONC +MAPCAR RCOMP3 FULLNAME) IP-TOS (STREAMPROP ERROR) COMPILER::ALPHA-COMPILER-LET (CL:EVAL CL:PROGV +COMPILER::ALPHA-PROGN) EDIT.RO (EDITNTH LAST EDITSMASH1) \COURIER.DELDEF (PUTHASH) DELFILE ( +\DELETEFILE) \NSFILING.CONFLICTP (\NSFILING.FULLNAME SELECTQ DIRTYABLE LOGAND CONSTANT LOGOR +\ILLEGAL.ARG) SEDIT::UNDO-REPLACE-ROOT (SEDIT::REPLACE-ROOT SEDIT::SUBNODE LIST) TRANSLATE.IP ( +APPENDOP.IP) EDIT.LI (EDITNTH CONS EDITSMASH1) \LOCATE.PUPNET (SMALLP \GETBASEPTR UNFOLD LLSH LOGAND +CONS SETUPTIMER) READVISE1 (CL:FLET READVISE-ENTRY SI::CANONICALIZE-ADVICE-SYMBOL GET) SETFILEPTR ( +\GETSTREAM SPREADAPPLY* \GETEOFPTR LISPERROR) SEDIT::SUBNODE-CHANGED-LIST (NTH SUB1 SEDIT::NOTE-CHANGE +) \TEDIT.CARET (\CARET.CREATE) MSSEEK-WORD (CL:MEMBER MSNEXTWORD MAPC MSTRYSPELL) +CL::PS-NAME-SLOT-POSITION (CL::PS-INCLUDE CL::PS-ALL-SLOTS + CL::PS-INITIAL-OFFSET CL:LENGTH) +LISPXFIND0 (GETPROP LIST HISTORYFIND FMEMB NLEFT LDIFF DREVERSE APPEND CONS LISTGET1) CHANGEVAR ( +MSNEEDUNSAVE GETRELATION) ASSOCGET (ASSOC) TEDIT.SELECTED.PIECES (TCONC \GETBASEPTR \FIRSTNODE IPLUS +\SPLITPIECE - APPLY* PLUS) ADJUSTCURSORPOSITION (\CURSORPOSITION IPLUS \XMOUSECOORD SIGNED SUB1 LLSH +IDIFFERENCE \YMOUSECOORD) ONEDINSPECT.CLOSEFN (WINDOWPROP) EOFP (\EOFP FDEVOP SPREADAPPLY* \GETSTREAM) + \TEDIT.CENTER.SEL (\PARAS.IN.SEL TEDIT.GET.PARALOOKS LISTGET MEMB CONSTANT TEDIT.SETSEL CONS DREVERSE +) \CURSORPOSITION (IDIFFERENCE SUB1 UNSIGNED LOGAND LLSH \PUTBASE) NSPRINTREQUEST.STATUS ( +\NSPRINT.ENQUIRE LIST) \SPP.NOT.RESPONDING (ADD1 IMIN TIMES - LRSH printout PROCESSPROP THIS.PROCESS +PRIN1 FREPLACEFIELD PLUS FFETCHFIELD) COMPILER::ALPHA-COMBINATION (DECLARE CL:FIRST COMPILER::ALPHA-FORM + COMPILER::EXPAND-OPENLAMBDA-CALL COMPILER::MAKE-CALL COMPILER::ALPHA-FUNCTION CL:MAPCAR CL:FUNCTION +COMPILER::ENV-INLINE-DISALLOWED ARGTYPE COMPILER::ALPHA-LITERAL) SEDIT::OUTPUT-BITMAP (FREPLACEFIELD +IMAX FFETCHFIELD IDIFFERENCE BITMAPHEIGHT IMINUS SEDIT::ADVANCE PLUS BITMAPWIDTH SHOULDNT) +CONVERT-AFM-FILES (MAPC READ-AFM-FILE \FONTFILENAME LIST) WRITE-UNICODE-MAPPING (WRITE-UNICODE-MAPPING + LIST TERPRI WRITE-UNICODE-INCLUDED PRIN1) RESETOPENFILES (LIST FUNCTION OPENSTREAM) FORCEOUTPUT ( +\GETSTREAM FDEVOP SPREADAPPLY*) \FM.PUTITEMPROP (SELECTQ ERROR LISTGET) ONEDINSPECT.BUTTONEVENTFN ( +WINDOWPROP WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES +LOGAND ONED.TRACKCURSOR FONTPROP FUNCTION CL:FUNCALL) FB.GET.NEW.FILE.SPEC (FB.PROMPTFORINPUT CONCAT +SELECTQ SHOULDNT PACKFILENAME.STRING DIRECTORYNAME LISTGET UNPACKFILENAME.STRING \ADD.CONNECTED.DIR +NCHARS RPLACD FB.CANONICAL.DIRECTORY) \VECFONTINIT (ARRAY MAPCAR LIST) \FLUSH.OPEN.STREAMS ( +\DEVICE-OPEN-STREAMS SPREADAPPLY* LOGAND CONSTANT LOGOR) EQUAL-DIMENSIONS-P (LENGTH EQUAL) ONEDINSPECT.COPYBUTTONFN (WITH-INSPECTOR-ENV WINDOWPROP XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES - XCL::PROFILE-VALUES KEYDOWNP FFETCHFIELD CL:FUNCALL ONED.TRACKCURSOR FUNCTION) TTPRIN1COMMENT ( -DSPFONT) CL:FRESH-LINE (FRESHLINE) WHO-LINE-USERNAME (USERNAME) FIND-DEBUGGER-ENTRY-FRAME (REALSTKNTH -STKNTH STKNAME CL:SPECIAL-FORM-P) UNPACK (FFETCHFIELD \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT -%ARRAY-BASE %ARRAY-OFFSET %ARRAY-TYPE-NUMBER IPLUS FCHARACTER \\GETBASECHAR \\GETBASEFAT \\GETBASE -\\GETBASETHIN \\GETBASEBYTE LIST PLUS FUNCTION) CL:APROPOS (COPY-STRING \\SIMPLE-STRINGIFY %ARRAY-BASE - FFETCHFIELD %ARRAY-OFFSET %ARRAY-TYPE-NUMBER CL:VALUES) BRIEFLY-DESCRIBE-SYMBOL (CL:FRESH-LINE CL:PRIN1 - CL:WRITE-STRING) PRINTERSTATUS (PRINTERPROP PRINTERTYPE APPLY*) \\STRINGWIDTH.PRESS (FFETCHFIELD -\\GETCHARSETINFO \\GETBASEPTR UNFOLD LLSH \\CREATECHARSET \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT -ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE PLUS \\PRESS.CONVERT.NSCHARACTER \\FGETWIDTH -\\CHAR8CODE LOGAND SUB1 %ARRAY-OFFSET %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER FUNCTION) \\WHICHPART ( -\\GETBASE RAID) \\SWAPDISKERROR (FFETCHFIELD) ASSOCGET (ASSOC) PRINTBINDINGS (RESETFORM PRINTLEVEL -TERPRI STKNTH STKSCAN STKARG STKNAME GETTOPVAL) \\LOOKUPFMAP (FFETCHFIELD \\GETBASE IPLUS FLOOR LOGAND - FOLDLO LRSH CONSTANT LOGXOR SUB1 \\ADDBASE IDIFFERENCE) RETDWIM3 (CONS RETDWIM3 SUB1) -\\CREATESTARFONT (RESETLST FIXR FQUOTIENT ITIMES \\FACECODE CONSTANT FREPLACEFIELDVAL NCREATE -\\CREATEFONTCHARSETVECTOR \\ALLOCBLOCK ADD1 \\GETBASEPTR FFETCHFIELD UNFOLD LLSH \\CREATECHARSET) -CL:APROPOS-LIST (COPY-STRING \\SIMPLE-STRINGIFY MKSTRING %ARRAY-BASE FFETCHFIELD %ARRAY-OFFSET -%ARRAY-TYPE-NUMBER) SEDIT::CONS-ATOM (NLSETQ READ OPENSTRINGSTREAM CONCAT FREPLACEFIELDVAL NCREATE -ALLOCSTRING \\SMASHSTRING NCHARS) FB.HEADINGW.REDISPLAYFN (FB.HEADINGW.DISPLAY WINDOWPROP) -\\IDLE.PROMPT.WATCHER (TIMES IMAX - \\DAYTIME0 CREATECELL) DCHCON (SCRATCHLIST FFETCHFIELD \\PNAMECELL - \\ATOMCELL \\PROPCELL CONSTANT %ARRAY-BASE %ARRAY-OFFSET %ARRAY-TYPE-NUMBER IPLUS FRPLACA FRPLACD -CONS \\GETBASECHAR \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE PLUS \\MAPPNAME FUNCTION FLAST) -ONEDINSPECT.CLOSEFN (WINDOWPROP) WINDOWADDFNPROP (WINDOWPROP LIST NCONC1 APPEND) CHCON (FFETCHFIELD -\\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT %ARRAY-BASE %ARRAY-TYPE-NUMBER %ARRAY-OFFSET IPLUS -\\GETBASECHAR \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE LIST PLUS FUNCTION) \\FM.CGETITEMPROP - (SELECTQ) MSCHECKBLOCKS (GETP LIST NCONC FILECOMSLST MAPCONC UPDATEFN APPLY CONS APPEND LDIFF -MSCHECKBLOCK) ERROR-MISSING-EXTERNAL-SYMBOL (ERROR CONCAT) \\GETFBB (IPLUS IDIFFERENCE CONS) -DUMPI.S.OPRS (MAPCAR GETDEF.I.S.OPR LIST) RETURN-FIRST-OF-THREE (DECLARE) \\ACCHARPOSLIST (IPLUS -ITIMES ADD1 IDIFFERENCE \\WIN LLSH \\BIN LIST PLUS) MSSHOWUSE (MSGETDEF EDITLOADFNS? GETPROP LIST -FUNCTION TERPRI FRPLNODE CONS APPLY* ASSOC GETRELATION PARSERELATION) \\ACCHARIMAGELIST (MAPCAR) -\\TEDIT.NSCHAR.RUN (FFETCHFIELD SUB1 GETFILEPTR \\CHTOPC - BIN FFILEPOS MKSTRING CHARACTER IPLUS -IQUOTIENT IDIFFERENCE ITIMES FREPLACEFIELDVAL NCREATE PLUS OPENSTREAM \\SETUPGETCH) -CHECK-SYMBOL-NAMESTRING (NAMESTRING-CONVERSION-CLAUSE CL:FIRST CL:THIRD CL:FOURTH FFETCHFIELD INTERN* -IDIFFERENCE CL:FIND-PACKAGE UNINTERRUPTABLY \\CREATE.SYMBOL) \\READACFONTBOXES (\\WIN IPLUS LLSH \\BIN - SIGNED SUB1 IDIFFERENCE CONS LIST PLUS) OPT.CODEFRAME (SELECTQ GETHASH OPT.CODEFRAME) -\\ACCHARWIDTHLIST (IMAX FOLDLO LRSH IPLUS LIST) \\SPP.STREAM.LOST (SPP.STREAM.ERROR SPREADAPPLY* -GETSPPCON FFETCHFIELD) RESOLVE-MISSING-EXTERNAL-SYMBOL (MAKE-CONDITION CL:FLET) FB.HANDLE.ABORT.BUTTON - (WINDOWPROP MAINWINDOW WFROMMENU FFETCHFIELD DEL.PROCESS) \\IDLE.IS.PREVIOUS (USERNAME EMPASSWORDLOC -FFETCHFIELD |GetBcplString| EMPOINTER \\VAG2 NCHARS MACHINETYPE SUBSTRING STRING-EQUAL) \\FACECODE ( -IPLUS SELECTQ SHOULDNT) MB.BUTTONEVENTINFN (IMAGEOBJPROP) \\ICONW.FORMAT.TITLE (\\ICONW.FORMAT.TITLE1 -LENGTH PLUS IDIFFERENCE IQUOTIENT) REMWINDOWPROP (TYPENAMEP \\OUTSTREAMARG \\GETSTREAM WFROMDS -FFETCHFIELD) \\NEW.READ.SYMBOL (DECLARE \\PARSE.NUMBER CHECK-SYMBOL-NAMESTRING RESOLVE-MISSING-PACKAGE - \\GETBASESTRING INTERN*) UALPHORDER (ALPHORDER) \\FAMILYCODE (NCHARS \\BIN PLUS LLSH IPLUS LOGAND -LRSH \\WIN NTHCHARCODE) RESOLVE-READER-CONFLICT (DECLARE CL:MEMBER) SEDIT::INPUT-NORMAL-CHAR (PRIN1 -CHARACTER IDIFFERENCE SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW FFETCHFIELD SEDIT::TYPE-OF-INPUT -SEDIT::SET-SELECTION-NOWHERE) DUNPACK (SCRATCHLIST FFETCHFIELD \\PNAMECELL \\ATOMCELL \\PROPCELL -CONSTANT %ARRAY-BASE %ARRAY-OFFSET %ARRAY-TYPE-NUMBER IPLUS FRPLACA FRPLACD CONS FCHARACTER -\\GETBASECHAR \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE PLUS \\MAPPNAME FUNCTION FLAST) -\\ACROTATECHAR (ROTATE-BITMAP-LEFT) \\TEXTTTYBOUT (FFETCHFIELD \\SYNCODE GETHASH \\GETBASEBYTE LOGAND -PLUS) RESOLVE-MISSING-PACKAGE (MAKE-CONDITION CL:FLET) ALPHORDER (FFETCHFIELD \\PNAMECELL \\ATOMCELL -\\PROPCELL CONSTANT %ARRAY-BASE %ARRAY-OFFSET %ARRAY-TYPE-NUMBER \\DTEST \\CATRANSLATE \\GETBASEBYTE -\\GETBASECHAR \\GETBASEFAT \\GETBASE IPLUS \\GETBASETHIN PLUS) SEDIT::COMPUTE-SELECTION-POSITION-LITATOM - (FFETCHFIELD FREPLACEFIELD) FB.HEADINGW.RESHAPEFN (WINDOWPROP FB.HEADINGW.DISPLAY) MSNOTICEFILE ( -FASSOC FILECOMS FINDFILE NAMEFIELD GETATOMVAL GETPROP EVALV ASKUSER LIST RESETVARS .RESETLST. CONS -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION GETP INFILEP) \\NEW.MKATOM (UNLESSRDSYS \\GETBASEFAT - \\GETBASE \\GETBASETHIN \\GETBASEBYTE \\ADDBASE IDIFFERENCE \\PARSE.NUMBER CL:VALUES INTERN*) PACKC ( -WITH-RESOURCE %ARRAY-BASE FFETCHFIELD \\PUTBASE \\PUTBASEBYTE SUB1 \\GETBASETHIN \\GETBASEBYTE PLUS -\\MKATOM GETRESOURCE NEWRESOURCE ALLOCSTRING) \\TEDIT.FORMATTABS (FFETCHFIELD IMAX IDIFFERENCE LRSH -PLUS IPLUS ITIMES IQUOTIENT FREPLACEFIELDVAL NCREATE) CASEARRAY (COPYARRAY ARRAY PLUS) OPT.CODELEV ( -IPLUS SELECTQ OPT.CODELEV SUB1 ADD1 IDIFFERENCE OPT.COMPILERERROR) INTERPRET/MARK/FORMAT (FASSOC -LISTGET) \\FM.PUTITEMPROP (SELECTQ ERROR FFETCHFIELD FREPLACEFIELD LISTGET) SEDIT::CREATE-COMMAND-TABLE - (CL:MAKE-HASH-TABLE CL:FIRST LIST* CL:THIRD CL:REST LIST MAPC CL:GETHASH SEDIT::CHARCODE) \\FINDFONT -(HELP) \\DEQUEUE (\\DTEST UNINTERRUPTABLY FFETCHFIELD) \\FM.GETITEMPROP (SELECTQ FFETCHFIELD LISTGET) -INTERN-LITATOM (ADD-SYMBOL CL::%PACKAGE-INTERNAL-SYMBOLS CL::%PACKAGE-EXTERNAL-SYMBOLS CL:SYMBOL-PACKAGE - SET) \\PACK.ITEM (\\MAPPNAME FUNCTION) CONVERT-LITATOM (FFETCHFIELD \\PNAMECELL \\ATOMCELL \\PROPCELL - CONSTANT NAMESTRING-CONVERSION-CLAUSE CL:FIRST CL:THIRD CL:FOURTH CL:FIND-PACKAGE) \\PAGEPAD.PRESS ( -GETFILEPTR MODUP IDIFFERENCE SUB1 IMOD IPLUS FOLDLO LRSH) \\REQUEUE.ETHERPACKET (FFETCHFIELD -FREPLACEFIELD) \\TEDIT.GET.TERMSA.WIDTHS (ARRAY \\PUTBASE FFETCHFIELD IPLUS TEDIT.CHARWIDTH PLUS) -MSGETDEF (GETRELATION PARSERELATION APPLY* ASSOC LIST FASSOC EDITGETDEF CL:VALUES) SHOULDNT (HELP) -\\SHOWSEL.HILIGHT (FFETCHFIELD IDIFFERENCE IMIN FIXR FQUOTIENT) TTYINEDIT (RESETLST -SET.TTYINEDIT.WINDOW RESETSAVE CURSOR WITH-RESOURCES TTYIN LIST GETSTREAM DSPXPOSITION DSPRIGHTMARGIN -TTYIN.PPTOFILE GETRESOURCE NEWRESOURCE MAKE-TTSCRATCHFILE) \\TEDIT.PURGE.SPACES (SUB1 \\EDITELT -GETBASEPTR \\GETBASEPTR \\ADDBASE2 \\ADDBASE FFETCHFIELD \\RPLPTR) BULKDATA.GENERATOR (CONS) -\\LITATOM.EATCHARS (FFETCHFIELD \\PNAMECELL \\ATOMCELL - \\PROPCELL CONSTANT CONCAT \\PUTBASEBYTE -\\GETBASETHIN \\GETBASEBYTE PLUS FREPLACEFIELD) OPT.RETMERGE (OPT.CODEFRAME OPT.CODELEV CONS ADD1 -GETHASH FRPLACD LIST OPT.PRATTACH OPT.NOTJUMP OPT.DEFREFS FRPLACA) ONEDINSPECT.DEFAULT.VALUECOMMANDFN -(CONSTANT \\CREATE.TWODINSPECTOR.SETMENU \\CREATE.TWODINSPECTOR.INSPECTMENU MENU) RETDWIM2 (RETDWIM3) -\\TEXTMARK (FFETCHFIELD CONS IDIFFERENCE IPLUS UNFOLD LLSH) CONCOCT-SYMBOL (DECLARE CL:ERROR CL:INTERN - IMPORT EXPORT) SEDIT::COMPUTE-POINT-POSITION-LITATOM (FFETCHFIELD FREPLACEFIELD) /ASSOCPUT (/PUTASSOC -) FB.EDITLISPFILE (GETPROP U-CASE ROOTFILENAME FILECOMS CONCAT FFETCHFIELD TTYDISPLAYSTREAM ED) -INSTALL-WHO-LINE-OPTIONS (CREATEW CREATEREGION CREATE.MONITORLOCK) COMPILER::CLOSURE-ANNOTATE-CALL ( -CL:UNION COMPILER::CLOSURE-ANNOTATE COMPILER::CALL-FN COMPILER::CALL-ARGS) XCL:PACK (CL:INTERN -CONCATLIST) \\ICONW.SHOW.TITLE (BITMAPCOPY WINDOWPROP DSPCREATE FFETCHFIELD FRPLACA) INSURE.WINDOW ( -\\OUTSTREAMARG \\GETSTREAM WFROMDS \\ILLEGAL.ARG) TRANSFER-SYMBOL (CL:SYMBOL-PLIST CL:SYMBOL-FUNCTION) - CL:INTERN (DECLARE MKSTRING ERROR CL:MAKE-SYMBOL %ARRAY-BASE FFETCHFIELD %ARRAY-OFFSET -%ARRAY-TYPE-NUMBER INTERN*) IRM.RESET (FFETCHFIELD) PACKAGE-HIERARCHY-INIT (DECLARE MAPATOMS CL:FUNCTION -) TEDIT.GET.PARALOOKS (TEXTOBJ FFETCHFIELD \\TEDIT.UNPARSE.PARALOOKS.LIST \\CHTOPC) -\\TEDIT.UNPARSE.PARALOOKS.LIST (LIST FFETCHFIELD CONS ONOFF) XCL:PACK* (CL:INTERN CONCATLIST) -\\DOFORMATTING (FFETCHFIELD LLSH PLUS IPLUS LRSH ADD1 SUB1 \\EDITELT GETBASEPTR \\GETBASEPTR -\\ADDBASE2 \\ADDBASE \\RPLPTR IQUOTIENT LOGAND FQUOTIENT) PACKAGE-INIT (PACKAGE-CLEAR PACKAGE-MAKE -PACKAGE-HIERARCHY-INIT PACKAGE-ENABLE) PACKAGE-ENABLE (DECLARE FREPLACEFIELD READTABLEPROP -FIND-READTABLE CL:PUSHNEW MOVD) \\TEDIT.LINE.LIST (FFETCHFIELD) MSSETUP (HASHARRAYP HASHARRAY -MSSETWORDTYPE CONS MAPC SETSYNONYM) MAKEBITTABLE (NCREATE \\SETSYNCODE \\PUTBASEBYTE \\SETFATSYNCODE -SMALLP CHCON1 LOGXOR \\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE PLUS) PACK (WITH-RESOURCE \\MKATOM -%ARRAY-BASE FFETCHFIELD SUB1 PLUS NCHARS ADD1 GETRESOURCE NEWRESOURCE ALLOCSTRING) -\\M44DOEXTENDVMEMFILE (SUB1 \\GETBASE FFETCHFIELD IDIFFERENCE \\LOOKUPFMAP IPLUS PLUS \\ACTONVMEMPAGES - IMINUS ADD1 \\LOLOC) PACKAGE-CLEAR (DECLARE CLRHASH) \\READFONTWDFILE (HELP) \\IDLE.ISMEMBER ( -USERNAME PARSE.NSNAME CONCAT PRIN1 GV.ISMEMBERCLOSURE \\CHECKNAME CH.ISMEMBER CH.LOOKUP.OBJECT) -PACKAGE-MAKE (DECLARE CL:MAKE-PACKAGE MOVD) \\BCPLSOUT.PRESS (IMIN NCHARS SUB1 NTHCHARCODE PLUS ADD1) -\\INITIALIZESWAPDISK (LOCF \\ADDBASE EMPOINTER \\VAG2 \\GETBASE FFETCHFIELD LRSH FREPLACEFIELD) -CL::%NOT-FLOAT-ERROR (CL:ERROR) \\IDLE.AUTHENTICATE (MACHINETYPE PRIN1 NS.AUTHENTICATE -NS.MAKE.SIMPLE.CREDENTIALS CONS \\ENCRYPT.PWD CONCAT GV.AUTHENTICATE SELECTQ TERPRI) \\SETFATSYNCODE ( -\\DTEST \\PUTBASEBYTE PUTHASH FFETCHFIELD \\CREATENSCHARHASH HASHARRAY FREPLACEFIELD) -\\TEDIT.MENU.INIT (LIST CONS FONTCREATE FUNCTION APPEND) ONEDINSPECT.DEFAULT.TITLECOMMANDFN (LOGAND -CONSTANT \\CREATE.TWODINSPECTOR.TITLEMENU WINDOWPROP MENU) DESCRIBE-VIRTUAL-MEMORY (PRIN1 FFETCHFIELD -\\LOLOC VMEMSIZE CL:VALUES) COMPILEMODE (ASSOC ERROR EVAL SET) IRM.SMART.LOOKUP (IRM.LOOKUP) -CL::%NOT-NUMBER-ERROR (CL:ERROR) OPT.RETTEST (GETHASH OPT.CODEFRAME OPT.CODELEV) \\TEXTDSPXPOSITION ( -TEXTOBJ FFETCHFIELD DSPXPOSITION TIMES CHARWIDTH POSITION) CL::%NOT-RATIONAL-ERROR (CL:ERROR) -SEDIT::CLOSE-NODE-LITATOM (FFETCHFIELD FREPLACEFIELD CONS LIST SEDIT::CONS-ATOM CONCAT SEDIT::NOTE-CHANGE -) XTOUSTRING (ALLOCSTRING NUTF8STRINGBYTES NTHCHARCODE PLUS LOGOR LLSH LRSH LOADBYTE LOGAND LSH IMINUS - MASK.1\'S SUB1) CL::%RATIO-PLUS (CL::%GCD CL::%MAKE-RATIO + CL:* IQUOTIENT) SEDIT::COPY-HASH-TABLE ( -CL:MAPHASH CL:FUNCTION) VMEMSIZE (FFETCHFIELD) CL::%RATIO-TIMES (CL::%GCD CL:* CL::%MAKE-RATIO -) -SELECT.LIST.INSPECTOR (MENU APPEND RECLOOK CONS LIST CONCAT FREPLACEFIELDVAL NCREATE) FFILEPOS ( -\\GETSTREAM INPUT FFETCHFIELD \\PNAMECELL \\ATOMCELL STRINGP MKSTRING %ARRAY-BASE %ARRAY-OFFSET -\\GETFILEPTR SPREADAPPLY* IPLUS SUB1 \\GETEOFPTR IMIN IDIFFERENCE GLOBALRESOURCE CASEARRAY FOLDLO LRSH - MOD IMOD GETBASEBYTE \\GETBASEBYTE PLUS \\BIN \\INCFILEPTR IMINUS IMAX GETRESOURCE NEWRESOURCE ARRAY -ADD1 FILEPOS) COMPILER::CLOSURE-ANNOTATE-CATCH (COMPILER::CLOSURE-ANNOTATE COMPILER::CATCH-STMT -COMPILER::VARIABLE-CLOSED-OVER COMPILER::CATCH-CLOSED-OVER-VARS COMPILER::CATCH-TAG CL:UNION) -CL::%RATIO-PRINT (CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR \\PRINDATUM LIST CL:CONCATENATE STRING -CL:CODE-CHAR FFETCHFIELD IPLUS + NCHARS FRESHLINE) FB.PRINTFN (TB.USERDATA FFETCHFIELD WINDOWPROP -DSPFONT %ARRAY-OFFSET %ARRAY-BASE %ARRAY-TYPE-NUMBER + PLUS - \\GETBASEFAT \\GETBASE \\GETBASETHIN -\\GETBASEBYTE DSPXPOSITION IMAX STRINGWIDTH CHCON1 CHARWIDTH) \\SETUP.FFILEPOS (IPLUS LLSH SUB1 FOLDLO - LRSH \\PUTBASE PLUS \\PUTBASEBYTE GETBASEBYTE \\GETBASEBYTE IDIFFERENCE ADD1) \\EXTENDISFMAP ( -FFETCHFIELD \\ADDBASE IDIFFERENCE \\GETBASE IPLUS ADD1) FB.COUNTER.STRING (CONCAT MKSTRING) -CL::%NOT-NONCOMPLEX-NUMBER-ERROR (CL:ERROR) FILEPOS (CHCON1 FFETCHFIELD CASEARRAY \\GETSTREAM -\\PNAMECELL \\ATOMCELL STRINGP MKSTRING %ARRAY-BASE %ARRAY-OFFSET \\GETFILEPTR SPREADAPPLY* ADD1 -IDIFFERENCE \\GETEOFPTR IMIN IMINUS IPLUS \\GETBASEBYTE SUB1 PLUS FOLDLO LRSH IMOD \\BIN) -CROPMARK.DISPLAYFN (IMAGEOBJPROP DSPSCALE IMAX FIXR FTIMES SELECTQ IMAGESTREAMTYPE BITBLT DSPXPOSITION - DSPYPOSITION + DRAWLINE) CL::%COMPLEX-- (COMPLEX -) \\FIXP.FROM.FLOATP (LISPERROR NTYPX FFETCHFIELD -ADD1 IDIFFERENCE IGEQ LOLOC \\LOLOC FLOAT IPLUS LLSH LRSH LOGAND PLUS SUB1 LSH MINUS DIFFERENCE -.LRSH1. \\MAKENUMBER) CL::%COMPLEX-* (COMPLEX CL:* - +) BRKDWNINIT (BRKDWNARRAY ARRAY ADD1 NCREATE -PLUS) OPENIPSTREAM (OPENSTREAM LISTGET NUMBERP IPLUS FREPLACEFIELDVAL NCREATE \\PAPERSIZE.IP -FFETCHFIELD GETEOFPTR FULLNAME FUNCTION FRPLACA COPY CONS FILENAMEFIELD STRPOS SUBSTRING ADD1 SUB1) -\\MAYBEPRINTPACKET (FFETCHFIELD SELECTC SELECTQ APPLY*) CL::%COMPLEX-PRINT (CL::COMPLEX-REALPART -CL::COMPLEX-IMAGPART IPLUS + NCHARS FFETCHFIELD FRESHLINE \\SOUT) \\TEDIT.SHRINKFN (WINDOWPROP -TTY.PROCESS) COMPILER::CLOSURE-ANNOTATE-BLOCK (COMPILER::CLOSURE-ANNOTATE COMPILER::BLOCK-STMT -COMPILER::VARIABLE-CLOSED-OVER COMPILER::BLOCK-BLIP-VAR COMPILER::MAKE-VARIABLE -COMPILER::BLOCK-CLOSED-OVER-VARS CONS CL:UNION) CL::%COMPLEX-+ (COMPLEX +) BYTE (CL:ERROR + CL:ASH -CONS) \\TEXTMENU.DOC.CREATE (OPENTEXTSTREAM MBUTTON.CREATE MKATOM FFETCHFIELD PLUS -MB.CREATE.THREESTATEBUTTON \\TEXTMENU.TOGGLE.CREATE MB.CREATE.NWAYBUTTON MB.CREATE.FULLMENU -MARGINBAR.CREATE LIST NCHARS IPLUS MKSTRING CONS) \\TEXTDSPYPOSITION (TEXTOBJ FFETCHFIELD DSPYPOSITION - DIFFERENCE) \\PUTBASE (\\PUTBASE \\ADDBASE .COERCE.TO.SMALLPOSP. IGEQ \\ILLEGAL.ARG) CL::%> (\\CALLME -) SEDIT::BACKSPACE-UNKNOWN (SHOULDNT FFETCHFIELD SEDIT::SET-SELECTION-NOWHERE) \\DSPFONT.IP ( -FFETCHFIELD \\GETFONTDESC FONTCOPY ASSOC DEFINEFONT.IP FIXR TIMES \\FGETWIDTH \\GETBASE IDIFFERENCE -CONSTANT IMINUS IQUOTIENT FONTPROP - + <=) DRAWMARGINSCALE (DSPCLIPPINGREGION DSPOPERATION CONS -IREMAINDER IDIFFERENCE LRSH STRINGWIDTH PLUS IPLUS IMINUS) DUMPGRAPH (RESETLST RESETSAVE SETREADTABLE -PRIN1 PRIN2 ASSOC CONS PLUS SPACES DREVERSE FONTUNPARSE FONTCLASSUNPARSE POSITION SELECTQ |printout| -TERPRI) \\LOOKUPCOLORNAME (FASSOC) \\GETBASE (\\GETBASE \\ADDBASE) RECURSIVELY-ANALYZE (ANALYZE) -NU\\TOTOPWDS (DSPDESTINATION TOTOPW WFROMDS) PROMPTPRINT (ARG PLUS) SEDIT::EDIT-SELECTION ( -SEDIT::GET-SELECTED-STRUCTURE FFETCHFIELD SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW) DASSEM.ASMAJ (GETP -OPT.JSIZE SELECTQ COMPILER.ERROR LIST IPLUS CONS PLUS LOGAND RSH LRSH) INIT/NODES/FOR/LAYOUT (FRPLACA -IMAGEOBJP LATTICE/BREAK/CYCLES GETNODEFROMID FOREST/BREAK/CYCLES MAPC SET/LABEL/SIZE) DINFOGRAPH ( -WINDOWPROP) \\DSPTOPMARGIN.PRESS (FFETCHFIELD) \\PUTBASEPTR (\\HILOC \\ADDBASE \\LOLOC) -NAMESTRING-CONVERSION-CLAUSE (DECLARE) UPDATEWFROMIMAGE (FFETCHFIELD FRPLACA BITMAPWIDTH BITMAPHEIGHT) - SEDIT::PARSE-INDENT-GROUPS (LIST CL:LENGTH SEDIT::PARSE-INDENT-BODY SEDIT::PARSE-INDENT-NAME) CL:ADJOIN - (CL:ERROR CL:FUNCALL CONS) \\HILOC (\\HILOC) BITMAPOBJ.SNAPW (GETREGION BITMAPCREATE BITSPERPIXEL -SCREENBITMAP BITMAPTEDITOBJ COPY) SHOW.PRESS (FFETCHFIELD \\GETFILEPTR SPREADAPPLY* IDIFFERENCE LOGOR -IPLUS) DATE (\\OUTDATE \\UNPACKDATE) CL::%< (CL::%>) FB.CLOSEFN (RESETLST TB.USERDATA FFETCHFIELD -CONCAT L-CASE TB.NUMBER.OF.ITEMS SELECTQ MENU FB.EXPUNGE?.MENU FUNCTION) SET.TTYINEDIT.WINDOW (CREATEW - IREMAINDER WINDOWPROP IMINUS DSPLINEFEED TTYDISPLAYSTREAM) \\UNPACKDATE (DAYTIME IQUOTIENT LRSH -LISP.TO.ALTO.DATE IMOD + CONSTANT - IREMAINDER CL:FLOOR ITIMES ROUND TIMES PLUS \\DTSCAN \\ISDST? ADD1 - LIST) SETSYNONYM (LIST ATOM GETWORDTYPE FASSOC GETHASH CONS) DATEFORMAT (CONS) FAX.PROPERTIES ( -NSPRINTER.PROPERTIES \\FAX.PARSE.NAME) CL::%+ (\\CALLME) \\TEDIT.FIXSELS (LIST FFETCHFIELD) -CONCATCODES (ALLOCSTRING LENGTH PLUS) GDATE (\\OUTDATE \\UNPACKDATE) TITLEDICONW (LIST FONTCREATE -BITMAPCOPY STRINGWIDTH \\ICONW.FORMAT.TITLE IMAX LRSH WIDTHIFWINDOW HEIGHTIFWINDOW TIMES LENGTH -FONTPROP BITMAPCREATE FOLDHI IPLUS - CREATEREGION LLSH ICONW CONS FUNCTION MKSTRING) CL::%COMPLEX-/ (+ - CL:* COMPLEX / -) CL::%- (\\CALLME) DASSEM.DSTOREFN (CONS ADD1 COMPILER::ENV-TARGET-ARCHITECTURE AST) - LATTICE/BREAK/CYCLES (FRPLACA GETNODEFROMID NEW/INSTANCE/OF/GRAPHNODE CONS) \\RPLPTR (UNINTERRUPTABLY - OPCODES \\HILOC \\LOLOC) TEXTMENU.CLOSEFN (WINDOWPROP) GETLOCALDEC (LAST CLISPDEC0) OPT.RETOPT1 (SOME - OPT.RETTEST) \\TEXTLEFTMARGIN (TEXTOBJ FFETCHFIELD IPLUS) CL::%COMPLEX-ABS (FLOAT CL::COMPLEX-REALPART - CL::COMPLEX-IMAGPART CL:SQRT + CL:*) CL::DEFECT-FROM-IL-TO-XCL (CL::NATURALIZE CL:FIND-PACKAGE) -SEDIT::BACKSPACE-LITATOM (FFETCHFIELD SEDIT::SET-SELECTION-NOWHERE NCHARS SEDIT::DELETE-NODES) -NEWPAGE?.IP (FFETCHFIELD NEWPAGE.IP) FB.COUNTERW.REDISPLAYFN (WINDOWPROP MAINWINDOW -FB.DISPLAY.COUNTERS) \\TEXTMENU.SET.TOGGLE (MBUTTON.FIND.BUTTON FINDNODE-INDEX TEXTOBJ FFETCHFIELD) -\\LOLOC (\\LOLOC) LOC (CONS \\HILOC \\LOLOC) FB.COPYFN (BKSYSBUF FFETCHFIELD) \\PACKDATE (+ SELECTQ -SUB1 TIMES - IQUOTIENT PLUS IREMAINDER ALTO.TO.LISP.DATE LLSH) CONDITIONS::DEFECT-FROM-XCL-TO-CONDITIONS - (CL::NATURALIZE CL:FIND-PACKAGE) CL::%GCD (CL:ASH) FIXVERBSETTYPE (MSVERBTYPE) \\IDATESCANTOKEN ( -NTHCHARCODE PLUS ILEQ - + TIMES LOGAND CONS UCASECODE LIST) \\FM.MENUHANDLER (SETUPTIMER DECODEBUTTONS - \\FM.CHECKREGION WINDOWPROP \\FM.ITEMPROP FFETCHFIELD LASTMOUSEY LASTMOUSEX LISTGET IPLUS ILESSP -PRIN1 APPLY* ZEROP LOGAND) \\DSPSPACEFACTOR.PRESS (FFETCHFIELD FIXR TIMES \\FGETWIDTH \\GETBASE) CL::%* - (\\CALLME) ANALYZE-REST (CL:LENGTH CL:FIRST CL:SECOND CL:THIRD GENSYM) OPT.RETPOP (CONS FRPLACD) -\\PRINTFMAP (EMPOINTER \\VAG2 \\GETBASE IQUOTIENT - FFETCHFIELD SUB1 + PLUS) SEDIT::SCALE-INDENT ( -FFETCHFIELD + CL:* CL:1- SEDIT::SCALE-INDENT CONS) VAG (\\VAG2 FIXP FIX \\HINUM \\LONUM) CL::%RECIPROCOL - (FQUOTIENT /) \\ENTITYEND.PRESS (FFETCHFIELD IDIFFERENCE \\GETFILEPTR SPREADAPPLY* GETFILEPTR UNFOLD -LLSH LRSH \\BOUT LOGAND ADD1 FOLDLO) \\FM.DOSELECTION (RESETLST RESETSAVE LIST WINDOWPROP APPLY* -\\FM.ITEMPROP FFETCHFIELD BLOCK) \\DSPRIGHTMARGIN.PRESS (FFETCHFIELD) \\RUN.PROCESS (FFETCHFIELD -FREPLACEFIELD) PRINTER.BITMAPSCALE (APPLY* PRINTERPROP) SEDIT::PARSE-INDENT-GROUP-BODY (LIST* CL:FIRST - CL:ERROR) PPROMPT2 (PROMPTPRINT) \\START.PROCESSES (UNINTERRUPTABLY \\RESCHEDULE FFETCHFIELD -\\MYALINK OPCODES) CH.CHANGE.ITEM (COURIER.EXPEDITED.CALL CH.FINDSERVER PARSE.NSNAME FIXP CH.PROPERTY -COURIER.WRITE.REP CH.GETAUTHENTICATOR) \\ENTITYSTART.PRESS (FFETCHFIELD \\GETFILEPTR SPREADAPPLY* -FDEVOP) \\TITLEICONMINSIZE (CONS IMINUS DSPLINEFEED FFETCHFIELD) POSTSCRIPT.INIT (CL:REMOVE-DUPLICATES - NCONC MAPCONC MAPCAR ASSOC EVALV FFETCHFIELD RPLACD FONTUNPARSE FREPLACEFIELD CONS MAPC CL:NTHCDR -NCONC1 FONTSAVAILABLE APPLY CL:MAKE-ARRAY CL:AREF PLUS FUNCTION FREPLACEFIELDVAL NCREATE HARRAY -\\POSTSCRIPT.NSHASH) CL::%LCM (CL::%GCD CL:* IQUOTIENT) FB.AFTERCLOSEFN (WINDOWPROP TB.USERDATA) -EQFMTSPEC (FFETCHFIELD EQUALALL) NONSYSPROPNAMES (PROPNAMES LIST) CL::%BUILD-RATIO (IREMAINDER -IQUOTIENT CL::%GCD CL::%MAKE-RATIO -) TTGIVEHELP2 (PRIN1 SPRINTT) CL::CHECK-ALL (CL:FIND-PACKAGE) -ADD.PROCESS (THIS.PROCESS ARG \\ILLEGAL.ARG ADD1 \\INSUREWINDOW \\DTEST CONS PLUS SELECTQ -FREPLACEFIELDVAL NCREATE CREATECELL \\GET.PRIORITY.QUEUE FFETCHFIELD \\RUN.PROCESS FREPLACEFIELD) -\\IDATE-PARSE-MONTH (CL:MACROLET DISCRIMINATE) MSQUOTED (MKLIST MSEAT CONS) \\RPLRIGHT (IPLUS -IREMAINDER \\RPLRIGHT SUB1 IQUOTIENT) PROCESSWORLD (\\RELEASE.PROCESS FFETCHFIELD RETTO -FREPLACEFIELDVAL NCREATE CREATECELL CREATE.EVENT FREPLACEFIELD LIST \\RUN.PROCESS FIND.PROCESS -ADD.PROCESS FUNCTION \\DTEST CONS \\START.PROCESSES) PUTWINDOWPROP (TYPENAMEP \\OUTSTREAMARG -\\GETSTREAM WFROMDS WINDOWOP SPREADAPPLY* FFETCHFIELD) \\OUTDATE-STRING (+ NTHCHARCODE PLUS RPLSTRING -ADD1) \\TEXTDSPFONT (TEXTOBJ FFETCHFIELD \\GETFONTDESC DSPFONT) XCL::SCEILING (XCL::STRUNCATE CL:1+ -CL:REM) XCL::SROUND (FIXR FQUOTIENT /) SEDIT::BACKSPACE-GAP (SHOULDNT FFETCHFIELD SEDIT::PENDING-DELETE -) TOTOPW.MODERNIZE (MAINWINDOW) FAX.STATUS (NSPRINTER.STATUS \\FAX.PARSE.NAME) READGRAPH (SKIPSEPRS -CONS RATOM READ SELECTQ FRPLACA FRPLACD ERROR ARRAY PLUS HREAD FONTCLASS ELT MAPCAR LIST) \\IDLE.OUT ( -LISTGET TIMES IDLE) TTYINMETA (METASHIFT) EVENP (LOGAND CL:ZEROP CL:MOD) \\TEDIT.SHRINK.ICONCREATE ( -WINDOWPROP FLENGTH TEXTSTREAM.TITLE TEXTSTREAM TITLEDICONW) CREATE.EVENT (FREPLACEFIELDVAL NCREATE) -XCL::SFLOOR (XCL::STRUNCATE CL:1- CL:REM) DASSEM.DASMBIND (COMPERROR CONS DASSEM.DASMBIND IDIFFERENCE -IPLUS ADD1 LLSH AST SUB1) \\IRM.SMART.REF (STRPOS ADD1 NTHCHAR SUB1 PACK UNPACK LIST \\IRM.WILD.REF -RESETFORM TTY.PROCESS THIS.PROCESS MISSPELLED? \\IRM.GET.REF PRIN1) TTGIVEHELP1 (INPART TERPRI) -\\RELEASE.PROCESS (FFETCHFIELD DREMOVE FREPLACEFIELD) CL::%LOGIOR (LOGOR) MSSETPHRASE (MSSETSETTYPE -MSSEEKTYPE CONS) CONDITIONS::%RESTART-PRINTER (CL:FUNCALL CONDITIONS::RESTART-REPORT -CONDITIONS::DEFAULT-RESTART-REPORTER CL:PRINC) \\FM.RIGHTBUTTONFN (DSPCLIPPINGREGION LASTMOUSEX -LASTMOUSEY WINDOWPROP \\FM.ITEMPROP FFETCHFIELD LISTGET IPLUS ILESSP \\FM.MENUHANDLER DOWINDOWCOM) -\\DSPLINEFEED.PRESS (FFETCHFIELD) RPLACD (OPCODES) PUSH-KEYWORD-BINDING (CHECK-PARAMETER-NAME) -OPT.RETFIND (FMEMB CONS) \\HINUM (NTYPX FFETCHFIELD \\LOLOC \\FIXP.FROM.FLOATP IQUOTIENT -CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR) EXEC (WFROMDS TTYDISPLAYSTREAM LIST PROCESS-EXEC-ID -THIS.PROCESS XCL::GET-PROCESS-PROFILE CL:PROGV MAPCAR CAR EVAL DECODE/WINDOW/OR/DISPLAYSTREAM) -ETHERHOSTNAME (\\GETMISCSOCKET ALLOCATE.PUP ASSURE.PUP.READY \\LOCALPUPHOSTNUMBER LOGAND FIXP -\\PARSE.PORTCONSTANT LISPERROR LRSH \\LOCALPUPNETNUMBER IPLUS LLSH FFETCHFIELD LOCF \\ADDBASE PLUS -EXCHANGEPUPS GETPUPSTRING SUB1 %ARRAY-OFFSET %ARRAY-BASE %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT -\\GETBASE \\GETBASETHIN \\GETBASEBYTE PORTSTRING TERPRI) PROMPTFOREVALED (FONTCREATE WINDOWTITLEFONT -CREATEW CREATEREGION WIDTHIFWINDOW MAX STRINGWIDTH HEIGHTIFWINDOW ITIMES FONTPROP DEFAULTFONT CLEARW -TTYDISPLAYSTREAM ERSETQ LISPX LISPXREAD) SETXY.PRESS (FFETCHFIELD LRSH \\BOUT LOGAND FREPLACEFIELD) -CAR (OPCODES) GRAPHOBJ.PUTALIGN (PRIN2 CONS PLUS) \\LONUM (NTYPX FFETCHFIELD \\LOLOC -\\FIXP.FROM.FLOATP IQUOTIENT CL::RATIO-NUMERATOR CL::RATIO-DENOMINATOR) HLSTORGB (FTIMES FPLUS -FDIFFERENCE \\HLSVALUEFN IDIFFERENCE CONS) CHECK-PARAMETER-NAME (CL:CERROR) \\TTW1 (FFETCHFIELD -DSPDESTINATION \\GETBASE \\TOTOPWDS INTERSECTREGIONS CONS TRANSLATEREG OPENW) CL::%LLSH8 (LLSH) -MAKETITLEBARICON (FFETCHFIELD WINDOWPROP NCHARS CONCAT DATE ICONPOSITION.FROM.WINDOW IMINUS -DSPLINEFEED IMAX IPLUS STRINGWIDTH CONS FRPLACA CREATEW FUNCTION) FOREST/BREAK/CYCLES (FRPLACA -GETNODEFROMID NEW/INSTANCE/OF/GRAPHNODE) \\IRM.GET.REF (MKATOM U-CASE WINDOWPROP PRIN1 GETHASHFILE -\\IRM.CHOOSE.REF MAPCONC LIST) CL::%BIGNUM-LOGCOUNT (FFETCHFIELD) CLISPDEC0 (CONS CLISPDEC1) -OPT.RETOPT (OPT.RETFIND CONS SUBSET OPT.RETOPT1) \\TIMER.PROCESS (FFETCHFIELD) \\TEXTDSPLINEFEED ( -FONTPROP DSPFONT) RPLACA (OPCODES) BRKDWNCLEAR (\\PUTBASEFIXP BRKDWNELT ELT) SEDIT::ATOM-POINT-TYPE ( -SEDIT::ESCAPE-CHAR FFETCHFIELD SUB1 %ARRAY-OFFSET %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER ADD1 -\\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE PLUS) NEWPAGE.IP (FFETCHFIELD FREPLACEFIELD PLUS -DIFFERENCE FONTPROP IMINUS) DOCOLLECT (FRPLACD LIST CONS) \\TEXTMENU.TOGGLE.INIT (IMAGEFNSCREATE -FUNCTION) \\NEXTCONSPAGE (FFETCHFIELD \\ALLOCMDSPAGE \\INITCONSPAGE \\ADDBASE \\VAG2 LRSH LLSH LOGAND -PAGELOC IPLUS \\HILOC \\LOLOC) GRAPHOBJ.GETALIGN (READ CONS NTH) \\MAIKO.CONS.UFN (CREATECELL -UNINTERRUPTABLY OPCODES IPLUS16 \\LOLOC \\ADDBASE \\GETBASE ADD1 \\DORECLAIM NTYPX \\VAG2 \\HILOC -LOGAND FFETCHFIELD .MAKECONSCELL. PLUS IPLUS LRSH \\NEXTCONSPAGE) COURIER.SKIP.SEQUENCE (GETWORD IPLUS - LLSH \\BIN PLUS) CL::OPTIMIZE-BYTE (+ CL:ASH) CL::%LLSH1 (LLSH) INSPECT/PROPLIST (PROPNAMES -NONSYSPROPNAMES INSPECTW.CREATE FUNCTION) CONS (OPCODES) CL::%INTEGER-COERCE-OPTIMIZER ( -COMPILER:CONTEXT-VALUES-USED) CL::%LRSH8 (LRSH) BRKDWNBOXES (BRKDWNMACRO \\BOXIPLUS BRKDWNELT ELT -BRKDWNDIFFA IDIFFERENCE \\PUTBASEFIXP IBOXCOUNT BOXCOUNT EVAL) MAKEINTERPRESS (TEXTTOIMAGEFILE) -COMPILER::FRAME-ANNOTATE-UNWIND-PROTECT (NCONC COMPILER::FRAME-ANNOTATE COMPILER::UNWIND-PROTECT-STMT -COMPILER::UNWIND-PROTECT-CLEANUP) \\SPP.ESTABLISH (LOCF \\ADDBASE \\SPP.CREATE.CON CONCAT PROCESSPROP -FFETCHFIELD OCTALSTRING \\SPP.CREATE.STREAMS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION -\\SPP.PROBE LIST SPPOUTPUTSTREAM) CL::%CONSTANT-BYTESPEC-P (CL:EVAL) COURIERPROGRAM.PRETTYPRINT (+ -DSPXPOSITION TIMES) PACKAGE-DISABLE (MOVD FREPLACEFIELD READTABLEPROP FIND-READTABLE) CL::%LRSH1 (LRSH -) CROPMARK.CREATE (IMAGEOBJCREATE LIST NUMBERP CONCAT) CHECKCONSPAGES (FFETCHFIELD \\VAG2 LRSH LLSH -LOGAND NTYPX \\MAPMDS FUNCTION) PRINTER.BITMAPFILE (EVAL PRINTERPROP) CDR (OPCODES) -\\BACKGROUND.PROCESS (SPREADAPPLY*) SEDIT::PARSE-INDENT-GROUP (LIST*) \\MAPMDS (FIXP -\\TYPENUMBERFROMNAME IMIN NTYPX \\VAG2 LRSH LLSH LOGAND PLUS) BMOBJ.GETFN4 (\\PEEKBIN FPLUS \\WIN -IPLUS LLSH \\BIN FQUOTIENT BITMAPTEDITOBJ \\READBINARYBITMAP) \\ISDST? (PLUS) -\\INVALIDATE.PROCESS.WINDOW (WINDOWPROP) \\NEW4PAGE (\\NEWPAGE \\ADDBASE) TTY/EDITL (CLOCK LAST -GETPROP FMEMB CONS EDITL0 LIST IPLUS IDIFFERENCE) LASTN (FNTH CONS NCONC1) \\TEXTDSPCHARWIDTH ( -CHARWIDTH DSPFONT) IMAGEFNSCREATE (ASSOC CONS LIST FREPLACEFIELDVAL NCREATE) SEDIT::ASSIGN-FORMAT-LITATOM - (FFETCHFIELD TYPENAMEP \\DTEST) \\TEXTMENU.TOGGLE.WHENOPERATEDFN (SELECTQ \\TEXTMENU.TOGGLE.SHOWSELFN - FREPLACEFIELD) \\FAX.PARSE.NAME (STRPOS SUBSTRING SUB1 LIST ADD1 %ARRAY-OFFSET FFETCHFIELD -%ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE ILEQ ASSOC -MKATOM U-CASE CONCAT CONS) \\GET.PRIORITY.QUEUE (FREPLACEFIELDVAL NCREATE FFETCHFIELD) \\GETBASEPTR ( -\\VAG2 \\GETBASE \\ADDBASE) CHARMACRO? (APPEND) ONEDINSPECT.VALUEWIDTH (STRINGWIDTH APPLY*) -\\INTERNALTOTOPW (\\INSUREWINDOW FFETCHFIELD \\INTERNALTOTOPW) \\SET.PROCESS.NAME (TYPENAME MKSTRING -ERROR UNINTERRUPTABLY CONCAT PLUS FFETCHFIELD) EDITL0 (POSITION CLBUFS) IRM.DISPLAY.REF (FASSOC -FFETCHFIELD DINFO.UPDATE LIST PRINTOUT PRIN1 GETPROMPTWINDOW) \\FM.BUTTONEVENTFN ( -MODERNWINDOW.BUTTONEVENTFN FUNCTION) \\DSPLEFTMARGIN.PRESS (FFETCHFIELD) CL:FLOOR ( -CL::%INTEGER-COERCE-MACRO) CH.ADD.ITEM.PROPERTY (PARSE.NSNAME COURIER.CALL CH.FINDSERVER FIXP -CH.PROPERTY COURIER.WRITE.REP CH.GETAUTHENTICATOR) PRINTTIMER (IDIFFERENCE CLOCKDIFFERENCE IMINUS -TERPRI) \\ALLOCMDSPAGE (\\VAG2 LRSH LLSH LOGAND \\GETBASEPTR \\PUTBASEFIXP IDIFFERENCE FOLDLO -\\ADDBASE \\NEWPAGE) \\MOUSE.PROCESS (THIS.PROCESS FFETCHFIELD FIND.PROCESS) SETQ (\\SETVAR \\EVAL) -\\TEDIT.INSERTLINE (FFETCHFIELD) OPT.FINDEND (GETHASH) \\SPP.RELEASE.ACKED.PACKETS (FFETCHFIELD ILESSP - \\LOLOC IDIFFERENCE HELP ELT RETRANSMITINDEX IMOD SEQ.ADD1 \\ADDBASE FREPLACEFIELD) -MAYBE.PRETTYPRINT.BOLD (CHANGEFONT PRIN2) CL::STRUCTURES.HASDEF (GETDEF CL::STRUCTURE-FUNCTION-P) -\\STRINGWIDTHGUESS (STRINGWIDTH) AND (\\EVAL) \\CHECKCONSPAGE (\\VAG2 LRSH LLSH LOGAND FFETCHFIELD -EVENP RAID \\ADDBASE PLUS) PRINTBELLS (PRIN3) VRULE.COPYFN (VRULE.CREATE IMAGEOBJPROP) -CL::%RATIONAL-FLOAT (+ CL:ASH - CL::%BUILD-RATIO) \\INITCONSPAGE (RAID LOGXOR \\ADDBASE IDIFFERENCE -IPLUS LLSH \\HILOC LRSH \\LOLOC) \\CHECKDSTCHANGE (IDIFFERENCE IGREATERP) ANALYZE-PARAMETER (CL:CERROR - GENSYM RECURSIVELY-ANALYZE) \\TEXTDSPSTRINGWIDTH (STRINGWIDTH DSPFONT) CL::%RATIONALIZE-FLOAT (+ CL:ASH - - IPLUS LLSH LRSH LOGAND \\MAKEFLOAT CL:1- CONSTANT CL:*) BMOBJ.GETFN2 (\\WIN IPLUS LLSH \\BIN -BITMAPTEDITOBJ \\READBINARYBITMAP) SETNTHTOPLEVELELT (/RPLACD LAST NTH ADD1 /RPLACA) -\\TEXTMENU.TOGGLE.SHOWSELFN (IMAGEOBJPROP IMAGEBOX) BSPPRINTPUP (PRIN2 FFETCHFIELD LOCF \\ADDBASE -IDIFFERENCE PRIN1 SELECTC LIST |printout| GETBASEBYTE \\GETBASEBYTE TERPRI PRINTPUPDATA) STREAMPROP ( -PUTSTREAMPROP ARG GETSTREAMPROP \\ILLEGAL.ARG) \\TEDIT.GET.PARALOOKS (\\SMALLPIN SUB1 LLSH IDIFFERENCE - ELT) UNDOEDITL (UNDOEDITCOM LIST CONS) FB.ICONFN (TITLEDICONW WINDOWPROP FFETCHFIELD) GETSTREAMPROP ( -\\EXTERNALFORMAT LISTGET FFETCHFIELD) OPT.DELTAGREF (OPT.DEFREFS RPLACD DREMOVE FASSOC) -\\FM.WINDOWENTRYFN (LOGAND DSPCLIPPINGREGION LASTMOUSEX LASTMOUSEY WINDOWPROP \\FM.ITEMPROP -FFETCHFIELD LISTGET IPLUS ILESSP DOWINDOWCOM TTY.PROCESS) \\SETSPACE.PRESS (FFETCHFIELD LRSH \\BOUT -LOGAND IPLUS LLSH) DEL.PROCESS (\\COERCE.TO.PROCESS FIND.PROCESS THIS.PROCESS FUNCTION LIST) -CL:MULTIPLE-VALUE-CALL (CL:APPLY) SEDIT::REPAINT (FFETCHFIELD DSPXPOSITION IDIFFERENCE BITMAPWIDTH) -EXPANDW (WINDOWOP SPREADAPPLY* \\INSUREWINDOW FFETCHFIELD) PRINT-LOADED-FILE-INFORMATION (NAMEFIELD -GETPROP TERPRI) COMPILER::FRAME-ANNOTATE-TAGBODY (MAPCONC COMPILER::TAGBODY-SEGMENTS COMPILER::SEGMENT-STMTS - COMPILER::FRAME-ANNOTATE CL:DELETE-IF COMPILER::BLIPPER-NEW-FRAME-P MAPC COMPILER::BLIPPER-REFERENCES - COMPILER::CLOSE-OVER CL:COPY-LIST LIST CL:NUNION) \\FIXLINELENGTH.PRESS (FFETCHFIELD IQUOTIENT -IDIFFERENCE) PROCESS.RETURN (RETTO) CURSOR (FFETCHFIELD IDIFFERENCE SUB1) PUTSTREAMPROP ( -\\EXTERNALFORMAT FFETCHFIELD LISTGET LIST) LOOKIN (FINDATS EDITFINDP) BRKDWNCONSES (BRKDWNMACRO -\\BOXIPLUS BRKDWNELT ELT BRKDWNDIFFA IDIFFERENCE \\PUTBASEFIXP CONSCOUNT EVAL) CH.RETRIEVE.ITEM ( -PARSE.NSNAME CH.FINDSERVER COURIER.EXPEDITED.CALL CH.PROPERTY CH.GETAUTHENTICATOR COURIER.READ.REP) -INTERPRESSFILEP (GETFILEINFO RESETLST \\GETSTREAM RANDACCESSP LIST GETFILEPTR OPENSTREAM CONSTANT -NCHARS NTHCHARCODE BIN PLUS FULLNAME) COMPILER::FRAME-ANNOTATE-THROW (NCONC COMPILER::FRAME-ANNOTATE -COMPILER::THROW-TAG COMPILER::THROW-VALUE) \\TEDIT.PUT.CHARLOOKS (FFETCHFIELD IDIFFERENCE LOGAND LRSH -\\BOUT LOGOR GETHASH) MAP.PROCESSES (APPEND FFETCHFIELD) TTYINFIX (COUNT MEMB NONTTYINLISPXFIX TTYIN) -MSSETWORDTYPE (PUTHASH NCONC1 GETHASH CONS) CCCSCAN (FFETCHFIELD UNFOLD LLSH \\INDEXATOMVAL \\VAG2 -LRSH LOGAND CODEBASEGETNAME CONS PLUS CONSTANT BYTESPERNAMEENTRY WORDSPERNAMEENTRY CODEBASELT -\\GETBASEBYTE LOGXOR \\FINDOP CODEBASEGETATOM IDIFFERENCE BYTESPERCODEATOM \\INDEXATOMDEF -\\INDEXATOMPNAME CODEBASELT3 BIG-VMEM-CODE LOGOR ADD1 IPLUS) LISTPUT (ERRORX LIST CONS) MARGINBAR.INIT - (IMAGEFNSCREATE FUNCTION) TTCRLF.ACCOUNT (ADD1 + SUB1 DSPYPOSITION) \\KEYHANDLER1 (LOCF \\ADDBASE -SUB1 FUNCTION \\GETBASE \\BOXIDIFFERENCE \\RCLK \\DOMOUSECHORDING LOGAND FFETCHFIELD IPLUS) -\\TEXTOPENF (FFETCHFIELD) PROCESSP (ALIVEPROCP FFETCHFIELD) BMOBJ.GETFN3 (\\PEEKBIN FPLUS \\WIN IPLUS -LLSH \\BIN FQUOTIENT BITMAPTEDITOBJ \\READBINARYBITMAP) ESPATTERN (UNPACK SELECTQ RPLACD) -FB.OPTIONSCOMMAND (FB.PROMPTWPRINT) FAX.SEND.FILE (\\FAX.PARSE.NAME NSPRINT APPEND LIST) -\\SPPSENDERROR (TERPRI) RESTART.PROCESS (\\COERCE.TO.PROCESS FIND.PROCESS UNINTERRUPTABLY THIS.PROCESS - RETTO FUNCTION LIST) CL::STRUCTURES.EDITDEF (DEFAULT.EDITDEF CL::STRUCTURE-FUNCTION-P) -SEDIT::PARSE-INDENT-BODY (LIST* CL:FIRST CL:SECOND LIST CONS CL:NREVERSE) GET-ONED-DISPLAYW (CREATEW -CREATEREGION FUNCTION ONEDINSPECT.VALUEWIDTH) RELPROCESSP (DEADPROCP FFETCHFIELD) -DASSEM.CANSHAREBINDING (GETHASH) PRINTPUPQUEUE (FFETCHFIELD IDIFFERENCE LOCF \\ADDBASE TAB PRIN1) -WAKE.PROCESS (\\COERCE.TO.PROCESS FIND.PROCESS FFETCHFIELD \\RUN.PROCESS FREPLACEFIELD) NTHTOPLEVELELT - (LAST NTH ADD1) PPSOC.CURRENT (|printout| FFETCHFIELD IDIFFERENCE TERPRI) FB.HARDCOPY.DIRECTORY ( -RESETLST WINDOWPROP DSPSCALE DSPRIGHTMARGIN DSPLEFTMARGIN DSPFONT CONCAT FFETCHFIELD LIST* STREAMPROP -TIMES TB.COLLECT.ITEMS IMAX STRINGWIDTH SUBSTRING + FB.HARDCOPY.MAXWIDTH LIST PLUS - FIXR IQUOTIENT -RPLACA DSPXPOSITION) \\DEFPRINT.BY.NAME (IPLUS + NCHARS FFETCHFIELD FRESHLINE MKSTRING) -\\EXTERNALFORMAT (UNINTERRUPTABLY FFETCHFIELD MKATOM LIST FREPLACEFIELD \\GET.EXTERNALFORMAT.FROM.NAME - ERROR LISTGET) CHECKSYNONYM (GETWORDTYPE FASSOC GETHASH APPEND SUBST ADD1 MSTRYSPELL) EDITL1 (ERSETQ -LISPXREAD XNLSETQ EDITCOM CONS LIST CLBUFS) SUSPEND.PROCESS (\\COERCE.TO.PROCESS FIND.PROCESS -THIS.PROCESS) ANALYZE-KEY (GENSYM) SEDIT::PARSE-INDENT-NAME (SEDIT::GET-INDENT) OPT.COMMONBACK (SUB1 -OPT.LABELNTHPR FRPLACA OPT.DEFREFS) \\PRINTADDR (WITH-RESOURCES SELECTQ SYSTEMTYPE \\CONVERTNUMBER -\\HILOC \\CKPOSSOUT \\LOLOC LOGAND LOC SYSTEMTYPEPUNT GETRESOURCE NEWRESOURCE ALLOCSTRING CONCAT) -FB.BROWSECOMMAND (FB.SELECTEDFILES FFETCHFIELD FB.FETCHFILENAME UNPACKFILENAME.STRING MEMB NCHARS -MKATOM LDIFF LISTGET CL:APPLY CONCAT GETHOSTINFO DIRECTORYNAMEP) \\UNWIND.PROCESS (FFETCHFIELD RETTO) -PRINT-LISP-INFORMATION (PRINTOUT LIST OUTPUT CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION -CL:LISP-IMPLEMENTATION-TYPE CL:LISP-IMPLEMENTATION-VERSION CL:MACHINE-TYPE CL:MACHINE-VERSION -CL:MACHINE-INSTANCE CL:SOFTWARE-TYPE CL:SOFTWARE-VERSION PRINT-LOADED-FILE-INFORMATION) \\SOUT ( -FFETCHFIELD SUB1 %ARRAY-OFFSET %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE -\\GETBASETHIN \\GETBASEBYTE) GET-TITLEW (WINDOWPROP CREATEW CREATEREGION FUNCTION CONCAT) -\\SUSPEND.PROCESS (UNINTERRUPTABLY FFETCHFIELD FREPLACEFIELD) DASSEM.COUNTVARS (MAPC PUTHASH) -CCCSUBFN? (CONS NCONC CCCSCAN) PROCESS-STATUS (FIND.PROCESS \\STACKARGPTR ADDSTACKBASE \\VAG2 -FFETCHFIELD IDIFFERENCE) CLISPDEC (LIST GETPROP NTH /PUT FIXSPELL) FRESHLINE (OVERWRITEABLE LOGAND -FFETCHFIELD \\EOFP SPREADAPPLY* GETSTREAM) \\TEXTBACKFILEPTR (FFETCHFIELD FREPLACEFIELD -\\TEDIT.APPLY.STYLES SUB1 IPLUS) PROCESS.RESULT (\\DTEST FFETCHFIELD CREATE.EVENT CONCAT FREPLACEFIELD -) TB.REMOVE.ITEM (\\DTEST FFETCHFIELD TB.FIND.PREVIOUS.TAIL SUB1 PLUS TB.FIND.SELECTED.ITEM -TB.REV.FIND.SELECTED.ITEM TB.UPDATE.DISPLAY) \\TEXTMENU.TOGGLEFN (FFETCHFIELD IMAGEOBJPROP SELECTQ -TEXTSTREAM) \\STREAM.DEFPRINT (SELECTC FFETCHFIELD \\DEFPRINT.BY.NAME CONCAT CL:STRING-CAPITALIZE -STRING) |\\DelShade| (CONS |\\DelShade|) NCHARS (FFETCHFIELD \\PNAMECELL \\ATOMCELL IPLUS -\\GTREADTABLE SUB1 %ARRAY-OFFSET %ARRAY-BASE %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE -\\GETBASETHIN \\GETBASEBYTE FUNCTION) SEDIT::PARSE-INDENT (SEDIT::PARSE-INDENT-NAME -SEDIT::PARSE-INDENT-GROUPS) CL:STRING-CAPITALIZE (WITH-ONE-STRING CL:MAKE-STRING) BMOBJ.GETFN ( -RESETFORM INPUT READ READBITMAP BITMAPTEDITOBJ) \\SPP.HANDLE.DATA (FFETCHFIELD LOCF \\ADDBASE ILESSP -\\LOLOC IDIFFERENCE \\QUEUEHEAD FUNCTION SEQ.ADD1) MENU.HANDLER (RESETLST RESETSAVE LIST -LASTMOUSESTATE LOGAND FFETCHFIELD SETUPTIMER FIXP GRIDYCOORD LASTMOUSEY GRIDXCOORD LASTMOUSEX -\\MENU.ITEM.SELECT ERSETQ ZEROP WHICHW PLUS MENU NESTED.SUBMENU.POS GETMENUITEM \\FDECODE/BUTTON -FRPLACA FRPLACD CONS ERROR!) PUTPROPS.PRETTYPRINT (DSPXPOSITION PRINTDEF MEMB) VRULE.PUTFN ( -IMAGEOBJPROP PRINT) \\FDEV.DEFPRINT (\\DEFPRINT.BY.NAME FFETCHFIELD) OPT.JUMPREV (GETHASH -OPT.COMMONBACK OPT.FINDEND FRPLACD OPT.DEFREFS OPT.LABELNTHPR FRPLACA OPT.NOTJUMP SELECTQ -OPT.JUMPCOPYTEST) PROCESS.FINISHEDP (\\DTEST FFETCHFIELD) COMPILER::FRAME-ANNOTATE-SETQ ( -COMPILER::FRAME-ANNOTATE COMPILER::SETQ-VALUE) \\CARET.DOWN (FFETCHFIELD FRPLACA SETUPTIMER) -\\GETACCESS (SELECTC FFETCHFIELD SHOULDNT) COURIER.SKIP (SELECTQ \\BIN RPTQ CEIL LOGAND IPLUS GETWORD -LLSH CONSTANT SUB1 LOGXOR GETPROP CL:FUNCALL \\GET.COURIER.TYPE COURIER.SKIP \\COURIER.UNKNOWN.TYPE -PLUS COURIER.SKIP.SEQUENCE MAPC) NOTIFY.EVENT (\\DTEST FFETCHFIELD FREPLACEFIELD) TEDIT.COPY ( -TEDIT.PROMPTPRINT FFETCHFIELD \\SHOWSEL TEDIT.SELECTED.PIECES FUNCTION TEDIT.DO.BLUEPENDINGDELETE IMIN - ADD1 \\TEDIT.INSERT.PIECES IDIFFERENCE IMAGEOBJPROP CONS \\TEDIT.ORIGINAL.WINDOW.TITLE IPLUS) -BRV/OFFSET (GETNODEFROMID IPLUS FRPLACA IDIFFERENCE FRPLACD BRV/OFFSET) \\SCROLL.HANDLER.DOIT (ERSETQ -WINDOWPROP IPLUS IDIFFERENCE SCROLLW SELECTQ IMIN IMAX MIN MAX FQUOTIENT SHOULDNT) INPUT (\\GETSTREAM) - BELOWMARKER (FCHARACTER IPLUS PACK* IREMAINDER IQUOTIENT ADD1) \\DOMOUSECHORDING (LOGXOR LOGAND LIST -LOGOR \\RCLK LOCF \\ADDBASE) \\TEXTSETFILEPTR (FFETCHFIELD ZEROP IMAX ADD1) DWIMDEF (GETPROP DWIMIFY0) - NEWLINE.IP (FFETCHFIELD PLUS) FB.SHAPECOMMAND (FFETCHFIELD WINDOWREGION WINDOWPROP MIN + - FRPLACA -MAX IPLUS SCROLLW) \\TEXTMENU.TOGGLE.CREATE (IMAGEOBJCREATE STRINGWIDTH FONTPROP CONS BITMAPCREATE -DSPCREATE IMAGEOBJPROP) FB.FASTSEECOMMAND (FB.SELECTEDFILES FFETCHFIELD FB.FETCHFILENAME CREATEW -FUNCTION LIST CL:CATCH FB.FASTSEE.ONEFILE) \\IDLE.PROMPTING.WINDOW (INTERRUPTCHAR PROCESSPROP -THIS.PROCESS TTYDISPLAYSTREAM TTY.PROCESS SUSPEND.PROCESS RESETSAVE) EDITL2 (LISPXPRIN1) -ONEDINSPECT.RESHAPEFN (WINDOWPROP) \\STREAM.NOT.OPEN (LISPERROR FFETCHFIELD) TEDIT.CHARWIDTH (SELECTC -\\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE LOGAND IPLUS CHARWIDTH LOGOR SELCHARQ IMAX SHOULDNT) -\\FM.UPDATEWINDOWEXTENT (\\FM.WINDOWEXTENT WINDOWPROP IPLUS IDIFFERENCE) \\DSPCLIPPINGREGION.PRESS ( -FFETCHFIELD EVERY NUMBERP FREPLACEFIELD) GIVE.TTY.PROCESS (WINDOWP WINDOWPROP FFETCHFIELD LOGAND) -\\DOBUFFEREDTRANSITIONS (FFETCHFIELD \\ADDBASE IPLUS FREPLACEFIELD LOGOR \\GETBASEBYTE LOGAND LOGXOR -LLSH \\STKSCAN INTERRUPTED) \\INSTALL.EXTERNALFORMAT (MKATOM UNINTERRUPTABLY FASSOC CONS ERROR) -SEDIT::SETF-OF-GET-FORMAT (CL:GETHASH REMHASH) TTY.PROCESSP (THIS.PROCESS TTY.PROCESS) -SCALED.BITMAP.GETFN (READBITMAP READ BITMAPTEDITOBJ FQUOTIENT) ALLOW.BUTTON.EVENTS (THIS.PROCESS -FFETCHFIELD SPAWN.MOUSE) PFI.PRINT.BITMAP (NON.PFI.PRINT.BITMAP DSPXPOSITION DSPYPOSITION DSPSCALE -DSPLINEFEED TIMES BITMAPHEIGHT BITMAPWIDTH DSPBOTTOMMARGIN MIN FQUOTIENT - DSPRIGHTMARGIN -DSPLEFTMARGIN DSPTOPMARGIN FIXR MAX FONTPROP IQUOTIENT + PLUS FFETCHFIELD FUNCTION STKPOS STKEVAL -CL:CEILING CHARWIDTH) APPEND (\\APPEND2 ARG PLUS) \\GR.MAKEPRETTYCOMSL (EVAL GETDEF LITATOM LIST) -CH.DELETE.SELF (PARSE.NSNAME COURIER.CALL CH.FINDSERVER FIXP CH.PROPERTY CH.GETAUTHENTICATOR) -SEDIT::SET-POINT-NOWHERE (FREPLACEFIELD) FB.GET.NEWPATTERN (FFETCHFIELD FB.PROMPTFORINPUT -DIRECTORY.FILL.PATTERN) VRULE.GETFN (VRULE.CREATE READ) MAKE-UNICODE-TRANSLATION-TABLES (CL:MAKE-ARRAY - IPLUS CONS LOGAND CL:SVREF LRSH SUB1 LENGTH PLUS ASSOC LIST HASHARRAY CHARCODE.DECODE ADD1 CL:VALUES) - CLISPFORERR1 (SOME TAILP RETDWIM2) FB.HARDCOPY.TOFILE (FB.PROMPTFORINPUT PACKFILENAME.STRING -\\FB.HARDCOPY.TOFILE.EXTENSION FB.FETCHFILENAME UNPACKFILENAME.STRING STRPOS SUBSTRING SUB1 ADD1 -MKATOM U-CASE CONS FILENAMEFIELD ASSOC MENU |MakeMenuOfImageTypes| PRINTFILEPROP PRINTFILETYPE LISTGET - CONCAT CL:APPLY CL:FUNCALL) MKATOM (\\MKATOM %ARRAY-BASE FFETCHFIELD %ARRAY-OFFSET LISPERROR -%ARRAY-TYPE-NUMBER PACK*) EDITBF (CONS EDITFPAT NCONC MEMB TAILP) \\SETACCESS (FFETCHFIELD -FREPLACEFIELD FUNCTION) RIGHTW.RESHAPEFN (RIGHTW.REPAINTFN) COURIER.WRITE.FAT.STRING (OPENSTREAM -GETFILEPTR LRSH \\BOUT LOGAND ADD1 FOLDHI IPLUS BOUT) DREMOVE (DREMOVE) \\TFBRAVO.READ.PARALOOKS ( -NCREATE COPY FFETCHFIELD FCHARACTER BIN IPLUS ITIMES SELECTQ IQUOTIENT FREPLACEFIELD CONS NCONC LIST -CONSTANT CHARACTER) DASSEM.EQCONSTANTP (LITATOM ILEQ) BROWSE/LAYOUT/LATTICE (IPLUS BRHL/LAYOUT -GETNODEFROMID CONS) RUNION (CONS) \\UPDATE.EXTENT.IMAGE (WINDOWPROP DSPCLIPPINGREGION GREATERP IMAX -IMIN IQUOTIENT ITIMES IDIFFERENCE IPLUS TEXTUREP) CL:RASSOC (CL:ERROR CL::%COMPLEX-RASSOC -CL::%SIMPLE-RASSOC) \\TEDIT.TABTYPE.SET (FFETCHFIELD ADD1 IMAGEOBJPROP U-CASE MBUTTON.FIND.NEXT.BUTTON - PACK* FUNCTION CONS) MSPATHSPRINTFN (ADD1 POSITION) \\TEXTPEEKBIN (FFETCHFIELD SPREADAPPLY* \\PEEKBIN - SUB1 LOGOR UNFOLD LLSH \\PAGEDBIN \\PAGEDPEEKBIN FREPLACEFIELD \\TEDIT.APPLY.STYLES \\BIN -\\TEDIT.TEXTBIN.FILESETUP ERROR APPLY* \\TEDIT.PEEKBIN.NEW.PAGE) DELFROMLIST (GETTOPVAL /SETTOPVAL -SUBSET) \\DSPXPOSITION.IP (FFETCHFIELD) \\RELEASE.ETHERPACKET (FREPLACEFIELD) MB.NWAYBUTTON.ADDITEM ( -CONS IMAGEOBJPROP FONTPROP MAPCAR STRINGWIDTH BITMAPCREATE LIST DSPCREATE IPLUS PLUS ITIMES LENGTH) -\\TEDIT.MAKEFILENAME (STRPOSL MKATOM SUBSTRING) \\SPP.HANDLE.ATTN (FFETCHFIELD LOCF \\ADDBASE LIST -PRIN1) \\KEYBOARDOFF (LOGAND LOGXOR \\GETBASE) SETREADFN (/SETATOMVAL) CL::STRUCTURE-FUNCTION-P ( -CL:CATCH CL:MAPHASH CL:FUNCTION) \\IGR.MAKEPRETTYCOMSL (EVAL MAPCAR LISPFORM.SIMPLIFY LIST) PPSOC ( -\\GETSTREAM PORTSTRING FFETCHFIELD \\MAKENUMBER PRIN1 FQUOTIENT + CLOCKDIFFERENCE TERPRI) -SEDIT::RELINEARIZE (FFETCHFIELD DSPCLIPPINGREGION IPLUS ADD1 SEDIT::FIRST-LINE-LINEAR ILESSP -IDIFFERENCE IMAX SEDIT::LAST-LINE-LINEAR WINDOWPROP FRPLACA PLUS SEDIT::SCAN-FOR-BOUNDS -SEDIT::PROPAGATE-WIDTH-CHANGE) OPENW (\\INSUREWINDOW WINDOWPROP) MSNEXTWORD (GETWORDTYPE FASSOC -GETHASH GETFILEPKGTYPE CONS MSFAIL FRPLACD) VRULE.IMAGEBOXFN (DSPSCALE CONS) \\FM.WINDOWEXTENT (COPY -\\FM.TOPGROUPPROP LISTGET WINDOWPROP \\FM.INSUREWINDOW ERROR FFETCHFIELD \\FM.ITEMPROP \\FM.ITEMWIDTH -BITMAPWIDTH STRINGWIDTH FRPLACA) \\DSPBOTTOMMARGIN.PRESS (FFETCHFIELD) PROCESS.WINDOW ( -\\COERCE.TO.PROCESS FIND.PROCESS FFETCHFIELD \\INSUREWINDOW) MSPRED (MSCANT CONS) |\\ItemNumber| (PLUS -) TTPRIN1 (+ NTHCHARCODE PLUS CHARWIDTH L-CASECODE - BLTCHAR TTYDISPLAYSTREAM) OPT.LBDEL (OPT.DEFREFS -DREMOVE FASSOC GETHASH) TTYINREADP (PEEKBINCCODE PEEKCCODE) BPNT0 (LVLPRINT ERROR!) -\\FM.UPDATEGROUPEXTENT (LIST \\FM.DTOPGROUPID MAPC ASSOC LISTPUT COPYALL \\FM.ITEMPROP FFETCHFIELD -LISTGET EXTENDREGION IPLUS FRPLACA PLUS MINUS) \\DEFINEFONT.PRESS (FFETCHFIELD FASSOC FREPLACEFIELD -CONS PLUS) PACKAGE-HASHTABLE-INSPECT-STOREFN (PROMPTPRINT) MENUITEMREGION (FFETCHFIELD IDIFFERENCE -LENGTH FMEMB IPLUS ITIMES IREMAINDER SUB1 IQUOTIENT CONS) SEDIT::INSTALL-SPECIAL-FORMATS ( -SEDIT::SET-LIST-FORMAT FREPLACEFIELDVAL NCREATE) COMPILER::FRAME-ANNOTATE-PROGV (NCONC -COMPILER::FRAME-ANNOTATE COMPILER::PROGV-SYMS-EXPR COMPILER::PROGV-VALS-EXPR COMPILER::PROGV-STMT) -\\CREATE.JIS.EXTERNALFORMAT (FUNCTION FREPLACEFIELDVAL NCREATE \\INSTALL.EXTERNALFORMAT) CH.ADD.SELF ( -PARSE.NSNAME COURIER.CALL CH.FINDSERVER FIXP CH.PROPERTY CH.GETAUTHENTICATOR) WINDOW.BITMAP ( -WINDOWPROP BITMAPCREATE) OPT.LABELNTHPR (GETHASH CONS ADD1 OPT.PRATTACH LIST FRPLACD) PRINTPROPS ( -RESETFORM PRINTLEVEL MAP GETPROPLIST MISSPELLED? SHOWPRINT CDDR) TEDIT.NEW.FONT (\\TEDIT.MAKEFILENAME -TEDIT.GETINPUT NCONC1 LIST KWOTE U-CASE) PROCESS.TTY (\\COERCE.TO.PROCESS FIND.PROCESS THIS.PROCESS -PROCESS.EVALV) FB.MAKECOUNTERWINDOW (CREATEW CONS WINDOWPROP FUNCTION) -CL::STRUCTURE-OBJECT-INSPECT-STOREFN (CL:EVAL REPLACEFIELD CL::PSLOT-FIELD-DESCRIPTOR) \\GR.CONTENTS ( -EVAL MAPCAR) SEDIT::FORMAT-FROM-INDENT (SEDIT::SCALE-INDENT CL:FIRST CL:SECOND FREPLACEFIELDVAL -NCREATE) DISMISS (SETUPTIMER IMIN GETRESOURCE NEWRESOURCE \\DTEST BLOCK) \\TEDIT.FIXCHANGEDLINE ( -FFETCHFIELD \\FORMATLINE ADD1 \\TEDIT.NEXT.LINE.BOTTOM IMINUS IPLUS IDIFFERENCE TEXTPROP SUB1 -FREPLACEFIELD) MSNEGATESET (CONS FRPLACD) \\PROC.RESUME (\\MYALINK OPCODES ADDSTACKBASE \\VAG2 -IDIFFERENCE IPLUS SUB1 \\DECUSECOUNT) DASHES (IDIFFERENCE PRIN1) \\SOFTCURSORPOSITION (\\GETBASE) -\\TEXTGETEOFPTR (FFETCHFIELD) IMAGEOBJPROP (SELECTQ \\ILLEGAL.ARG ARG FFETCHFIELD \\IMAGEUSERPROP) -WINDOW.MOUSE.HANDLER (FRPLACA FRPLACD WHICHW FFETCHFIELD DOUSERFNS LOGAND KEYDOWNP OPENWP WINDOWPROP -SUB1 APPLY*) COPIEDFILEMATCH (EQUAL U-CASE) FB.DEPTHCOMMAND (FFETCHFIELD SELECTQ MENU FREPLACEFIELDVAL - NCREATE CONS RNUMBER FB.PROMPTWPRINT FREPLACEFIELD) GETDEFFROMFILE (WHEREIS FINDFILE GETPROP APPLY* -SELECTQ FILEGETDEF.FNS FILEGETDEF.VARS FILEGETDEF.MACROS FILEGETDEF.PROPS FILEGETDEF.RECORDS -FILEGETDEF.ALISTS FILEGETDEF.LISPXMACROS GET LOADFNS CONS RESETLST RESETSAVE RESETUNDO LIST -GETDEFCURRENT MKLIST FMEMB GETDEFERR APPEND) DWIMERRORRETURN (ERROR!) GRAPHOBJ.CHECKALIGN (NUMBERP -LIST) XCL::PROFILE-VALUES (MAPCAR XCL::PROFILIZE) \\ENQUEUE (\\DTEST FFETCHFIELD LIST* LOC LIST PLUS -FREPLACEFIELD) EDIT\: (MAPCAR COPY EDITCOMS CONS LIST) ICONW.SHADE (WINDOWPROP BITMAPCREATE -FFETCHFIELD) COURIER.WRITE.STRING (STRINGP MKSTRING %ARRAY-TYPE-NUMBER FFETCHFIELD -COURIER.WRITE.FAT.STRING NCHARS LRSH \\BOUT LOGAND %ARRAY-BASE %ARRAY-OFFSET BOUT) -\\TFBRAVO.FONT.FROM.CHARLOOKS (FONTCREATE FFETCHFIELD LIST) \\JISPEEK (\\KIMODEP \\DTEST FFETCHFIELD -\\PEEKBIN CL:VALUES FREPLACEFIELD IPLUS \\CONV.JIS.TO.XCCS \\DO.CONV.JIS.TO.XCCS < SELECTQ -\\EXTARACT.CONV.TABLE ASSOC \\EXTRACT.SET ELT IDIFFERENCE UNFOLD LLSH \\EXTRACT.CODE LOGOR -\\EXTRACT.NO.FONT.CODE \\CONV.HANKAKU.KANA GETHASH) DASSEM.DPRINTLAP (GETSTREAM TERPRI FUNCTION -|printout|) EVAL.AS.PROCESS (ADD.PROCESS \\EVAL) PFI.MAYBE.PP.DEFINITION (GET-ENVIRONMENT-AND-FILEMAP -PFCOPYBYTES) CL::STRUCTURE-OBJECT-PROPCOMMANDFN (PROMPTPRINT DEFAULT.INSPECTW.PROPCOMMANDFN) -TITLEW.REPAINTFN (PRINTOUT PRIN1 WINDOWPROP) \\WAITFORSYSBUFP (GLOBALRESOURCE \\CLOCK0 GETRESOURCE -NEWRESOURCE SETUPTIMER) MSJOINDETS (SHOULDNT) DASSEM.MATCHVARS (GETHASH DASSEM.MATCHVARS RPLACD) -COMPILER::FRAME-ANNOTATE-RETURN (CL:PUSHNEW CONS COMPILER::RETURN-BLOCK COMPILER::FRAME-ANNOTATE -COMPILER::RETURN-VALUE) \\DSPFONT.PRESS (FFETCHFIELD \\GETFONTDESC FONTCOPY \\GETCHARSETINFO -\\GETBASEPTR UNFOLD LLSH \\CREATECHARSET \\DEFINEFONT.PRESS LOGOR FIXR TIMES \\FGETWIDTH \\GETBASE -IDIFFERENCE CONSTANT IMINUS FONTPROP) OPT.UBDEL (DREMOVE FASSOC OPT.COMPILERERROR) -XCL::SETF-PACKAGE-PREFIX (CL::%PACKAGE-NAMESYMBOL CL:INTERN CL:ERROR) \\GET.EXTERNALFORMAT.FROM.NAME ( -MKATOM FASSOC) SEND.FILE.TO.PRINTER (RESETLST FULLNAME PRINTFILETYPE U-CASE PRINTERTYPE -CONVERT.FILE.TO.TYPE.FOR.PRINTER LISTGET DEFAULTPRINTER CL:FUNCALL PRINTERPROP ERROR CONCAT APPEND -LIST) |\\AddShade| (|\\ItemNumber| FFETCHFIELD CONS) \\BACKJISCHAR (\\DTEST FFETCHFIELD) -EVAL.IN.TTY.PROCESS (\\EVAL PROCESS.EVAL TTY.PROCESS) \\TRACKCURSOR (\\BLT LOCF \\ADDBASE IDIFFERENCE -IPLUS SUB1 UNSIGNED LOGAND IMINUS LLSH FFETCHFIELD \\PUTBASE) REMOVEDUPS (INTERSECTION) CLISPFORERR ( -SELECTQ DWIMERRORRETURN) \\BACKSHIFTJISCHAR (< \\PEEKBIN) XCL::PROFILE-VARIABLES (MAPCAR XCL::PROFILIZE -) \\TEDIT.NEWREGIONFN (IDIFFERENCE IPLUS IMAX FRPLACA IMIN FRPLACD) COURIER.WRITE.SEQUENCE.UNSPECIFIED - (LRSH \\BOUT LOGAND UNSIGNED SUB1 LLSH \\HINUM \\WOUT STRINGP MKSTRING %ARRAY-TYPE-NUMBER FFETCHFIELD - ADD1 FOLDHI IPLUS NCHARS LISP.TO.ALTO.DATE GETPROP \\GET.COURIER.TYPE COURIER.REP.LENGTH CL:FUNCALL) -\\SHIFTJISPEEK (\\PEEKBIN CL:VALUES < IDIFFERENCE IPLUS UNFOLD LLSH \\CONV.JIS.TO.XCCS -\\DO.CONV.JIS.TO.XCCS SELECTQ \\EXTARACT.CONV.TABLE ASSOC \\EXTRACT.SET ELT \\EXTRACT.CODE LOGOR -\\EXTRACT.NO.FONT.CODE \\CONV.HANKAKU.KANA GETHASH) \\TFBRAVO.READ.CHARLOOKS (NCREATE FCHARACTER BIN -IPLUS ITIMES \\TFBRAVO.GET.FONTSIZE \\TFBRAVO.GET.FONTSTYLE IDIFFERENCE GETFILEPTR CONSTANT CHARACTER -CONS \\TFBRAVO.FONT.FROM.CHARLOOKS SELECTQ) DASSEM.DSTOREFNDEF (PLUS CEIL LOGAND IPLUS UNFOLD LLSH -ADD1 CONSTANT SUB1 LOGXOR FOLDLO LRSH FLENGTH IQUOTIENT \\CODEARRAY FOLDHI \\BYTESETA \\FINDOP -\\ATOMDEFINDEX NTYPX \\LOLOC SHOULDNT \\ATOMPNAMEINDEX EVAL BYTESPERNAMEENTRY WORDSPERNAMEENTRY -SELECTQ \\ATOMVALINDEX CODESETA IMOD UNSIGNED LOGOR CODELT \\BYTELT EVQ \\STKMIN RESETVARS .RESETLST. -LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION DEFC) FB.MAKEHEADINGWINDOW (CREATEW CONS -FUNCTION) OPT.PRDEL (GETHASH FRPLACD) DOTABS (PRIN1) \\TIMER.INTERRUPTFRAME (QUOTIENT TIMES LOCF -\\ADDBASE) \\TEXTGETFILEPTR (FFETCHFIELD IMIN SUB1 IPLUS \\TEDIT.PIECE-CHNO IDIFFERENCE IQUOTIENT IMAX -) GETDEFSAVED (SELECTQ GETPROP GETDEFERR GETPROPLIST SASSOC FASSOC) \\REMOVE.EXTERNALFORMAT (CL:RASSOC - DREMOVE) FB.INFOMENU.WHENSELECTEDFN (WINDOWPROP WFROMMENU FFETCHFIELD REMOVE CONS FREPLACEFIELD) -\\JISFILEOUTCHARFN (\\DTEST FFETCHFIELD \\BOUT FREPLACEFIELD SELECTC SHOULDNT \\CONV.XCCS.TO.JIS -FOLDLO LRSH < LOGAND \\DO.CONV.XCCS.TO.JIS GETHASH STREAMPROP \\CONV.ZENKAKU.KANA \\CHARSET -\\CHAR8CODE IPLUS16 \\LOLOC \\ADDBASE) TTYDISPLAYSTREAM (\\OUTSTREAMARG \\GETSTREAM DISPLAYSTREAMP -TEXTSTREAMP \\CARET.DOWN WFROMDS THIS.PROCESS WINDOWPROP \\CREATELINEBUFFER IMAGESTREAMTYPE -FFETCHFIELD IQUOTIENT IDIFFERENCE IABS IMINUS) FB.HARDCOPYCOMMAND (FB.SELECTEDFILES |GetPrinterName| -LIST MAPC LISTFILES1 FB.FETCHFILENAME) \\DOTRANSITIONS (LLSH LOGAND LOGXOR IPLUS LRSH PLUS) -COURIER.WRITE.SEQUENCE (LRSH \\BOUT LOGAND LENGTH COURIER.WRITE) CLEARW (\\INSUREWINDOW DSPRESET -FFETCHFIELD) \\TEDIT.RESTARTFN (FFETCHFIELD OPENTEXTSTREAM \\TEDIT.ORIGINAL.WINDOW.TITLE TEXTPROP) -BROWSE/LAYOUT/HORIZ/COMPACTLY (GETNODEFROMID PACK CONS IMINUS FASSOC DREMOVE FRPLACA) \\BACKEUCCHAR ( -LOGAND \\PEEKBIN MASK.1\'S LSH SUB1) MSPATHS4 (GETHASH GETRELQ UNION GETTABLE FASSOC MSPATHS4) -\\CREATE.SHIFTJIS.EXTERNALFORMAT (FUNCTION FREPLACEFIELDVAL NCREATE \\INSTALL.EXTERNALFORMAT) -GETDEFERR (GETPROP HASDEF LISTGET1 RETFROM GETDEF CONS MKLIST) COMPILER::FRAME-ANNOTATE-MV-PROG1 ( -MAPCONC COMPILER::MV-PROG1-STMTS COMPILER::FRAME-ANNOTATE) \\CREATE.EUC.EXTERNALFORMAT (FUNCTION -FREPLACEFIELDVAL NCREATE \\INSTALL.EXTERNALFORMAT) \\EUCIN (\\BIN < CL:VALUES \\CONV.JIS.TO.XCCS -\\DO.CONV.JIS.TO.XCCS SELECTQ \\EXTARACT.CONV.TABLE ASSOC \\EXTRACT.SET ELT IDIFFERENCE UNFOLD LLSH -\\EXTRACT.CODE LOGOR \\EXTRACT.NO.FONT.CODE LOGAND \\CONV.HANKAKU.KANA GETHASH) FB.MAKERIGIDWINDOW ( -WINDOWPROP CONS) CL::STRUCTURE-OBJECT-INSPECT-PROPPRINTFN (CL::PSLOT-NAME) \\GR.DELDEFFN (LIST ASSOC -REMOVE PACK*) PROPERTAILP (BUFTAILP) \\PROCESS.EVAL1 (CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION \\EVAL FFETCHFIELD) \\ADD.ROUTING.TABLE.ENTRY (NTYPX CL:ERROR \\ADDBASE UNFOLD LLSH LOGAND -CONS \\GETBASEPTR) \\EUCFILEOUTCHARFN (SELECTC FFETCHFIELD SHOULDNT FREPLACEFIELD \\CONV.XCCS.TO.JIS -FOLDLO LRSH < LOGAND \\DO.CONV.XCCS.TO.JIS GETHASH STREAMPROP \\CONV.ZENKAKU.KANA LOGOR \\CHARSET -\\CHAR8CODE IPLUS16 \\LOLOC \\ADDBASE) XCL::SETF-FIND-PROFILE (STRING XCL::PROFILIZE CL:GETHASH -XCL:PROFILE-NAME) VRULE.DISPLAYFN (IMAGEOBJPROP DSPSCALE FIXR FTIMES DSPXPOSITION DSPYPOSITION ODDP -FLENGTH IMAX IMAGESTREAMTYPE IPLUS LRSH IDIFFERENCE IMIN PLUS) \\CREATE.THROUGH.EXTERNALFORMAT ( -FUNCTION FREPLACEFIELDVAL NCREATE \\INSTALL.EXTERNALFORMAT) PP (MAPC NLAMBDA.ARGS TYPESOF SHOWDEF) -RESHADEITEM (RESETLST RESETSAVE LIST DSPFONT DSPOPERATION MOST/VISIBLE/OPERATION FFETCHFIELD -DSPRIGHTMARGIN \\SHOWMENULABEL) SEDIT::GET-INDENT (CL:ASSOC) WAITFORINPUT (GLOBALRESOURCE \\CLOCK0 -IDIFFERENCE GETRESOURCE NEWRESOURCE SETUPTIMER \\GETSTREAM) \\THROUGHFILEOUTCHARFN (\\CHARSET LRSH -\\BOUT \\CHAR8CODE LOGAND) CONFIRM-SET (MOUSECONFIRM) \\SHIFTJISFILEOUTCHARFN (SELECTC FFETCHFIELD -SHOULDNT FREPLACEFIELD \\CONV.XCCS.TO.JIS FOLDLO LRSH < LOGAND \\DO.CONV.XCCS.TO.JIS GETHASH -STREAMPROP \\CONV.ZENKAKU.KANA IPLUS IDIFFERENCE IPLUS16 \\LOLOC \\ADDBASE) \\FM.TRANSPOSEVERT ( -WINDOWPROP \\FM.ITEMPROP FFETCHFIELD \\FM.TRANSPOSE FIX FPLUS FQUOTIENT FTIMES FRPLACA) -COMPILER::FRAME-ANNOTATE-PROGN (MAPCONC COMPILER::PROGN-STMTS COMPILER::FRAME-ANNOTATE) \\TEXTEOFP ( -FFETCHFIELD) \\THROUGHPEEK (CL:VALUES \\PEEKBIN) PROCESS.READ (TTY.PROCESS NLSETQ THIS.PROCESS -TTYDISPLAYSTREAM READ) FB.INFOMENU.SHADEINITIALSELECTIONS (WINDOWPROP FFETCHFIELD MAPC SHADEITEM -FB.INFO.ITEM.NAMED) \\PERIODIC.INTERRUPTFRAME (SPREADAPPLY*) PROCESS.APPLY (\\COERCE.TO.PROCESS -FIND.PROCESS THIS.PROCESS APPLY LIST* LIST FFETCHFIELD) TEDIT.FORMATTEXTBOX (MAPCAR FFETCHFIELD FIXR -FTIMES DSPSCALE IPLUS + TEDIT.HARDCOPY-COLUMN-END PLUS APPEND NCONC1 FRPLACA FREPLACEFIELDVAL NCREATE -ARRAY \\TEDIT.HARDCOPY.FORMATLINE ADD1 \\TEDIT.FORMAT.FOOTNOTE FLAST COPY IMAX - IDIFFERENCE IMIN LIST - DREMOVE) \\OK.TO.IDLE? (RESETLST OBTAIN.MONITORLOCK) \\DECODETRANSITION (\\BLT LOCF \\ADDBASE -\\TRANSINDEX IPLUS TRANSITIONFLAGS \\GETBASEBYTE FFETCHFIELD TRANSITIONSHIFTCODE \\GETBASE -TRANSITIONCODE LOGAND LOGOR) \\DEFINEDEVICE (U-CASE FASSOC DREMOVE CONS RPLACD ERROR) \\SHIFTJISIN ( -\\BIN < IDIFFERENCE IPLUS UNFOLD LLSH CL:VALUES \\CONV.JIS.TO.XCCS \\DO.CONV.JIS.TO.XCCS SELECTQ -\\EXTARACT.CONV.TABLE ASSOC \\EXTRACT.SET ELT \\EXTRACT.CODE LOGOR \\EXTRACT.NO.FONT.CODE -\\CONV.HANKAKU.KANA GETHASH) \\FM.TRANSPOSEHORZ (WINDOWPROP \\FM.ITEMPROP FFETCHFIELD \\FM.TRANSPOSE -FIX FPLUS FQUOTIENT FTIMES FRPLACA) NEWPAGE.PRESS (\\STARTPAGE.PRESS) U-CASE (WITH-RESOURCE -FFETCHFIELD \\PROPCELL \\ATOMCELL CONSTANT %ARRAY-BASE \\PNAMECELL ADD1 \\GETBASEFAT \\GETBASE -\\GETBASETHIN \\GETBASEBYTE \\PUTBASEFAT \\PUTBASE \\PUTBASETHIN \\PUTBASEBYTE IPLUS IDIFFERENCE PLUS -CL:SYMBOL-PACKAGE \\MKATOM GETRESOURCE NEWRESOURCE ALLOCSTRING %ARRAY-TYPE-NUMBER SUB1 %ARRAY-OFFSET -\\NSTRINGCHARS CONS U-CASE) \\PROCESS.APPLY1 (CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION APPLY -FFETCHFIELD) PRESSWINDOW (OPENPRSTREAM LIST WINDOW.BITMAP WHICHW BITMAPWIDTH BITMAPHEIGHT IPLUS -FFETCHFIELD IQUOTIENT IDIFFERENCE ITIMES CLOSEF) \\PUTSYSBUF (FFETCHFIELD \\PUTBASE ADD1) \\JISIN ( -\\KIMODEP \\DTEST FFETCHFIELD \\BIN FREPLACEFIELD IPLUS CL:VALUES \\CONV.JIS.TO.XCCS -\\DO.CONV.JIS.TO.XCCS < SELECTQ \\EXTARACT.CONV.TABLE ASSOC \\EXTRACT.SET ELT IDIFFERENCE UNFOLD LLSH -\\EXTRACT.CODE LOGOR \\EXTRACT.NO.FONT.CODE \\CONV.HANKAKU.KANA GETHASH) EDITQF (MEMB CONS) MSCANT ( -RETFROM) \\EUCPEEK (\\PEEKBIN CL:VALUES < \\CONV.JIS.TO.XCCS \\DO.CONV.JIS.TO.XCCS SELECTQ -\\EXTARACT.CONV.TABLE ASSOC \\EXTRACT.SET ELT IDIFFERENCE UNFOLD LLSH \\EXTRACT.CODE LOGOR -\\EXTRACT.NO.FONT.CODE LOGAND \\CONV.HANKAKU.KANA GETHASH) FB.STARTUP (RESETLST FB.MAKE.BROWSER.BUSY -FASSOC FFETCHFIELD CL:FUNCALL) \\IDLE.TIME (IDIFFERENCE IDATE CONSTANT GDATE IPLUS CONCAT QUOTIENT) -\\ICONW.REPAINTFN (WINDOWPROP FFETCHFIELD) \\GETDEVICEFROMNAME (FILENAMEFIELD \\GETDEVICEFROMHOSTNAME -LISPERROR) DASSEM.DWRITEFN (LENGTH FLENGTH NCONC1 CONS PLUS DREVERSE GETSTREAM LRSH LOGAND \\FINDOP -SELECTQ IPLUS PRIN4) EDIT4E (EQP EDIT4E1 DUNPACK LIST APPLY* EDIT4E) OPT.LBMERGE (OPT.DEFREFS FRPLACA -FRPLACD GETHASH OPT.LBDEL) \\TEDITOUTCHARFN (FREPLACEFIELD IPLUS16 \\LOLOC \\ADDBASE FFETCHFIELD) -FILENAMEFIELD (UNPACKFILENAME.STRING SELECTQ) \\INSPECT.DATATYPE.RAW.FETCH (FETCHFIELD NTH) -FB.NEWINFOCOMMAND (FFETCHFIELD MENUWINDOW FUNCTION FREPLACEFIELDVAL NCREATE CONS WINDOWPROP -FB.PROMPTWPRINT) NWAYBUTTON.INIT (IMAGEFNSCREATE FUNCTION) \\UNQUEUE.EVENT (FFETCHFIELD) -XCL::SETF-PROFILE-ENTRY-VALUE-NAME (XCL::PROFILIZE XCL::PROFILE-ENTRY-VALUE CL:FUNCALL -XCL::VARIABLE-DEFINITION-COERCION-FUNCTION XCL::FIND-VARIABLE-DEFINITION) \\TEDIT.LOOKS (FFETCHFIELD -WINDOWPROP CONS CREATEPOSITION MENU NCONC1 COPY LIST FUNCTION FREPLACEFIELDVAL NCREATE SELECTQ -TEDIT.LOOKS TEDIT.PROMPTPRINT) \\HARDCURSORUP (FFETCHFIELD IDIFFERENCE) \\TEDIT.EXPANDFN (TTY.PROCESS -WINDOWPROP) SEDIT::FIND-NTH-STRUCTURE (SEDIT::SUBNODE FFETCHFIELD) \\TEDIT.COPY.LINEDESCRIPTOR ( -FFETCHFIELD FREPLACEFIELD) MSVERBED (MSCANT MSNEXTWORD CONS) BROWSE/LAYOUT/HORIZ (IPLUS BRH/LAYOUT -GETNODEFROMID CONS) \\FM.INITCORNERSFN (WINDOWPROP LIST IPLUS WIDTHIFWINDOW HEIGHTIFWINDOW) -CL::INSPECT-STRUCTURE-OBJECT (INSPECTW.CREATE CL::PS-ALL-SLOTS CL:CONCATENATE CL:PRINC-TO-STRING) -OPT.JUMPTHRU (GETHASH OPT.LBDEL SELECTQ FASSOC CONS OPT.LABELNTHPR OPT.JUMPCOPYTEST PLUS OPT.SKIPPUSH -OPT.COMPILERERROR FRPLACA OPT.DEFREFS) MSPATHS2 (GETHASH PUTHASH TESTRELQ TESTTABLE FASSOC GETRELQ -UNION GETTABLE) EDITFPAT (CONS EDITFPAT CHCON NLEFT LENGTH ADD1 DUNPACK UNPACK) GETDEFCOM0 (FASSOC -GETTOPVAL MAPCONC SUBPAIR PRETTYCOM1 GETDEFCOM0 SELECTQ MAPCAR CONS APPEND RETFROM) CH.DELETE.PROPERTY - (COURIER.EXPEDITED.CALL CH.FINDSERVER PARSE.NSNAME FIXP CH.PROPERTY CH.GETAUTHENTICATOR) -SHOWPRESSBITMAPREGION (OPENIMAGESTREAM CLOSEF) \\LOOKUPPUPNUMBER (\\GETMISCNSOCKET -CREATE.PACKET.EXCHANGE.XIP LOCF \\ADDBASE FFETCHFIELD PLUS UNFOLD LLSH SETUPTIMER GETXIP LOGAND TERPRI - \\GETBASESTRING IDIFFERENCE IPLUS PORTSTRING) \\FM.FILLWINDOW (DSPCLIPPINGREGION RESETLST RESETSAVE -LIST CREATEREGION IDIFFERENCE IPLUS DSPFILL) NEWLINE.PRESS (FFETCHFIELD IPLUS) \\REMOVEDEVICE.NAMES ( -DREMOVE) MSONPATH (FASSOC HASHARRAY MSLISTSET PUTHASH MSPATHS4) EDITXTR (LIST APPEND CONS) \\THROUGHIN - (CL:VALUES \\BIN) SEDIT::*FSPEC-TABLE* (CL:MAKE-HASH-TABLE CL:FUNCTION) GETDEFCURRENT (GETPROP APPLY* - SELECTQ VIRGINFN GETTOPVAL RECLOOK MKPROGN FIELDLOOK COPY GETFILEDEF LIST FILECOMS GETTEMPLATE KWOTE -GETPROPLIST NCONC SOME CDDR FILEPKGCOM FILEPKGTYPE CONS MAKENEWCOM GETDEFCOM) BRKDWNTIME (BRKDWNMACRO -\\BOXIPLUS BRKDWNELT ELT BRKDWNDIFFA IDIFFERENCE \\PUTBASEFIXP CPUTIME CLOCK EVAL) -INTERPRESS.OUTCHARFN (FFETCHFIELD IGREATERP \\GETBASE \\CHARSET LRSH SELCHARQ NEWLINE.IP -\\DSPXPOSITION.IP DSPNEWPAGE \\FGETWIDTH \\CHAR8CODE LOGAND +) COMPILER::FRAME-ANNOTATE-MV-CALL (NCONC - COMPILER::FRAME-ANNOTATE COMPILER::MV-CALL-FN MAPCONC COMPILER::MV-CALL-ARG-EXPRS) \\CLOSEFILE ( -FFETCHFIELD SPREADAPPLY* FDEVOP) XCL::SETF-PROFILE-NAME (XCL::PROFILE-ENTRY-VALUE STRING) EDLOCL ( -NCONC LIST) EDITMV (CONS APPEND LIST) \\TEDIT.MAINW (TEXTOBJ FFETCHFIELD WINDOWPROP) TEDIT.FORMATFOLIO - (MAPCAR FFETCHFIELD FIXR FTIMES DSPSCALE LISTGET MKSTRING SELECTQ ROMANNUMERALS CONCAT TEXTOBJ -OPENTEXTSTREAM LIST FREPLACEFIELDVAL NCREATE ARRAY \\TEDIT.HARDCOPY.FORMATLINE PLUS ADD1 IDIFFERENCE -IPLUS) \\EVENTKEYS (LOGOR) MSMATCHRATING (IPLUS SELECTQ MSTYPEMATCHRATING MSSUBJTYPE MSOBJTYPE) -\\DELETEFILE (\\ADD.CONNECTED.DIR \\CONVERT-PATHNAME \\GETDEVICEFROMNAME FDEVOP SPREADAPPLY* -FFETCHFIELD) EMPRESS (SEND.FILE.TO.PRINTER NCONC LIST) \\TEXTINIT (FUNCTION FREPLACEFIELDVAL NCREATE) -COPYINSERT (\\INSUREWINDOW WFROMDS PROCESS.TTY TTY.PROCESS WINDOWPROP IMAGEOBJPROP APPLY* PROCESS.EVAL -) OBTAIN.MONITORLOCK (\\DTEST THIS.PROCESS FFETCHFIELD ERROR) L-CASECODE (CL:CHAR-INT CL:CHAR-DOWNCASE - CL:INT-CHAR) COPIEDFILEPATTERN (U-CASE NCONC LIST ERROR LDIFF COPIEDFILEPATTERN COPIEDFILEMATCH) -\\NSPRINT.FULL.REQUEST.STATUS (GETNSPRINTER NLSETQ RESETLST \\NSPRINT.COURIER.OPEN LIST FUNCTION -COURIER.CALL ASSOC SELECTQ) PRESS.BITMAPSCALE (MIN FQUOTIENT TIMES) PFI.MAYBE.SEE.PRETTY (RESETLST -DISPLAYP PFCOPYBYTES COPYALLBYTES STREAMP LIST OPENSTREAM PRETTYFILEINDEX FULLNAME) -CL::STRUCTURE-OBJECT-INSPECT-FETCHFN (CL:FUNCALL CL::PSLOT-ACCESSOR FETCHFIELD -CL::PSLOT-FIELD-DESCRIPTOR) EDITMBD (LIST APPEND LSUBST CONS) \\GR.PUTDEFFN (LIST ASSOC -\\GR.METHODEXPANDER CONS) MOVE.TO.START.OF.WORD (PREVWORD TTNEXTCHAR) PROCESS.EVAL ( -\\COERCE.TO.PROCESS FIND.PROCESS THIS.PROCESS CL:EVAL CONS LIST FFETCHFIELD) \\ADD.CONNECTED.DIR ( -PACKFILENAME.STRING) DASSEM.DASSEM (CONS FRPLACA SELECTQ FRPLACD IPLUS LRSH LOGAND APPEND -COMPILER::ENV-TARGET-ARCHITECTURE FASSOC ADD1 SORT ADD1VAR IDIFFERENCE CONSTANT COMPERRM LIST LENGTH -OPT.DREV FUNCTION GETHASH OPCOUNT \\FINDOP LLSH AST GETP MAPC APPLY* PLUS GREATERP SUB1) -\\TEDIT.UNPARSE.CHARLOOKS.LIST (LIST FFETCHFIELD ONOFF FONTPROP CONS IABS IMINUS) CREATE.MONITORLOCK ( -FREPLACEFIELDVAL NCREATE) \\ENQUEUE.EVENT/LOCK (FFETCHFIELD) SEDIT::SHOW-CARET (FFETCHFIELD) -\\COURIER.TYPE.ERROR (ERROR CONCAT) EDITSW (EDITNTH) OPT.XVARSCAN1 (OPT.CODEFRAME GETHASH FRPLACD) -TB.MAKE.BROWSER (SELECTQ SET CONS LIST DECODE.WINDOW.ARG CREATE.MONITORLOCK WINDOWPROP -FREPLACEFIELDVAL NCREATE FUNCTION PACK* ATTACH) \\FM.RESETCLIPPINGREGION (DSPCLIPPINGREGION -CREATEREGION IDIFFERENCE IPLUS WINDOWPROP DSPXOFFSET DSPYOFFSET) OPT.JUMPOPT (MAPC) -\\CURSORBITSPERPIXEL (FFETCHFIELD \\CURSORIMAGEPROPNAME \\CURSORMASKPROPNAME CURSORPROP MASK.1\'S LSH -SUB1 COLORIZEBITMAP) \\CURSORDESTINATION (FFETCHFIELD \\PUTBASE \\PUTBASEPTR LOCF \\ATOMCELL UNFOLD -LLSH) \\HARDCURSORDOWN (\\CLEARBM CURSORBITMAP) FULLPRESSBITMAP (OPENPRSTREAM FFETCHFIELD BITMAPWIDTH -BITMAPHEIGHT IQUOTIENT IDIFFERENCE FIX TIMES TERPRI PRESS.BITMAPSCALE IPLUS CLOSEF) \\CLEARBM ( -BLTSHADE) WRITE-UNICODE-INCLUDED (MAPCAR NCONC SASSOC HELP OCTALSTRING STRPOS CL:PARSE-INTEGER -SUBSTRING ADD1 SUB1 LIST PLUS CONS ASSOC LRSH SORT LAST CONCAT CL:VALUES) TEDIT.FORMATPAGE ( -FFETCHFIELD \\TEDIT.SCALEREGION DSPSCALE TEXTPROP DSPFONT \\TEDIT.APPLY.PARASTYLES \\CHTOPC FRPLACA -ADD1 \\TEDIT.PARABOUNDS TEDIT.PARSE.PAGEFRAMES LISTGET LIST - GETFILEPTR FREPLACEFIELDVAL NCREATE -NCONC1 CONS APPLY* PLUS) \\IDLE.EXIT? (RESETLST RESETSAVE TTYDISPLAYSTREAM CLEARBUF LISTGET USERNAME -NCHARS PROMPTFORWORD CONCAT LIST ADD.PROCESS NLSETQ \\LOGIN.READ MKSTRING EQUAL TERPRI) \\SOFTCURSORUP - (FFETCHFIELD BITMAPCREATE UNFOLD LLSH ITIMES \\HILOC \\LOLOC) INTERLISP-NAMESTRING (MKSTRING -CL:NAMESTRING) TEDIT.FORMATHEADING (MAPCAR FFETCHFIELD FIXR FTIMES DSPSCALE LISTGET OPENTEXTSTREAM -LIST FREPLACEFIELD PLUS FREPLACEFIELDVAL NCREATE ARRAY \\TEDIT.HARDCOPY.FORMATLINE IDIFFERENCE IPLUS -ADD1) SI::MONITOR-UNWIND (\\DTEST .RELEASE.LOCK. FFETCHFIELD THIS.PROCESS \\MP.ERROR FREPLACEFIELD) -C.FLOATUNBOX (SELECTQ COMP.VALN COMP.VAL1) \\SOFTCURSORUPCURRENT (\\GETBASE SIGNED SUB1 LLSH -IDIFFERENCE IMINUS IPLUS \\PUTBASEPTR LOCF \\ATOMCELL \\ADDBASE ADD1 FFETCHFIELD ITIMES \\HILOC -\\LOLOC) IRM.LOOKUP (IRM.GET.DINFOGRAPH MKATOM U-CASE FFETCHFIELD RESETLST RESETSAVE TTYDISPLAYSTREAM -GETPROMPTWINDOW LIST \\IRM.SMART.REF \\IRM.GET.REF IRM.DISPLAY.REF FLASHWINDOW) \\EVENT.DEFPRINT ( -\\DEFPRINT.BY.NAME FFETCHFIELD) CLISPLOOKUP0 (GETPROP CLISPLOOKUP2 CLISPLOOKUP1 SELECTQ GETATOMVAL) -EDIT4F (CONS EDITCONT EDITFPAT EDITFPAT1 NCONC1 UNPACK SUB1 NCONC MEMB) \\REMOVEDEVICE (DREMOVE) -\\MONITORLOCK.DEFPRINT (\\DEFPRINT.BY.NAME FFETCHFIELD) FB.NEWPATTERNCOMMAND (FB.GET.NEWPATTERN -FB.UPDATEBROWSERITEMS) RELEASE.MONITORLOCK (\\DTEST .RELEASE.LOCK. FFETCHFIELD THIS.PROCESS \\MP.ERROR - FREPLACEFIELD) SEDIT::LIST-FORMATS-TABLE (CL:MAKE-HASH-TABLE) \\GENERATEFILES (\\ADD.CONNECTED.DIR -\\GETDEVICEFROMNAME FDEVOP SPREADAPPLY* FFETCHFIELD) REVERSE (CONS) FB.SETNEWPATTERN ( -DIRECTORY.MATCH.SETUP STRPOS UNPACKFILENAME.STRING WINDOWPROP FFETCHFIELD) CL::STRUCTURE-OBJECT-P ( -TYPEP) BITMAPCREATE (ILEQ \\INSUREBITSPERPIXEL FOLDHI LRSH IPLUS ITIMES ERROR \\ALLOCBLOCK -FREPLACEFIELDVAL NCREATE) \\GR.GETDEFFN (ASSOC) \\DEVICEEVENT (SELECTQ MAPC REVERSE SPREADAPPLY* -FFETCHFIELD FDEVOP) \\HARDCURSORPOSITION (IDIFFERENCE SUB1 UNSIGNED LOGAND LLSH FFETCHFIELD \\PUTBASE) - \\MAKE.PROCESS1 (UNINTERRUPTABLY \\MYALINK OPCODES \\STACKARGPTR FFETCHFIELD IDIFFERENCE FLOOR LOGAND - ADDSTACKBASE \\VAG2 CONSTANT LOGXOR SUB1 IPLUS) MSPATHS1 (ADD1 MSPATHSPRINTFN GETHASH BELOWMARKER -NCONC1 IDIFFERENCE GETRELQ UNION GETTABLE FASSOC LIST MSMEMBSET IGREATERP IPLUS NCHARS PUTHASH CONS) -\\PROCESS.RELEASE.LOCKS (FFETCHFIELD) \\GENERATENEXTFILE (CL:FUNCALL) COMPILER::FRAME-ANNOTATE-LAMBDA -(COMPILER::LAMBDA-NEW-FRAME-P COMPILER::LAMBDA-KEYWORD COMPILER::LAMBDA-REST COMPILER::LAMBDA-OPTIONAL - COMPILER::LAMBDA-ARG-TYPE NCONC MAPCONC COMPILER::FRAME-ANNOTATE CL:SECOND CL:THIRD COMPILER::LAMBDA-BODY - COMPILER::CLOSE-OVER CL:NUNION) \\PROCESS.MOVEFRAME (FFETCHFIELD IDIFFERENCE IPLUS ADDSTACKBASE -\\VAG2 \\FREESTACKBLOCK PLUS FLOOR LOGAND LRSH CONSTANT LOGXOR SUB1) XCL::SETF-PROFILE-ENTRY-VALUE ( -XCL::PROFILIZE XCL::VARIABLE-DEFINITION-TYPE XCL::FIND-VARIABLE-DEFINITION CL:GETF) -\\TEDIT.SELECT.CHARACTER (FREPLACEFIELD FFETCHFIELD IMAGEOBJPROP IMAGEBOX WINDOWPROP RESETSAVE -DSPXOFFSET IDIFFERENCE IPLUS LIST FUNCTION DSPYOFFSET DSPCLIPPINGREGION IMIN CONS ERSETQ APPLY*) -BRECOMPILE3 (VIRGINFN LIST FASSOC FULLNAME) NEW/INSTANCE/OF/GRAPHNODE (LIST COPY CONS) \\GETFILENAME ( -\\ADD.CONNECTED.DIR \\CONVERT-PATHNAME \\GETDEVICEFROMNAME FDEVOP SPREADAPPLY* FFETCHFIELD) IMAGEBOX ( -APPLY* IMAGEOBJPROP) \\GENERATEFILEINFO (CL:FUNCALL) FB.GET.SORT.MENU (FFETCHFIELD CONS MAPCAR -FREPLACEFIELDVAL NCREATE FREPLACEFIELD) WRITE-UNICODE-MAPPING-FILENAME (PACKFILENAME CONCATLIST CONS -NCONC LIST) FB.CREATE.FILEBUCKET (STRING FFETCHFIELD NCHARS ILEQ NTHCHARCODE PLUS TIMES - SUB1 NCREATE - ADD1 SUBSTRING FREPLACEFIELDVAL CL:NTH SELECTQ FOLDHI LRSH IPLUS IDATE) \\TEDIT.FORMAT.FOUNDBOX? ( -SELECTQ FFETCHFIELD FRPLACA) EDITCONT (EDITFPAT EDLOCL) \\PRIMARYTEXTURE (BITMAPCOPY SELECTQ -\\ILLEGAL.ARG \\LEVELTEXTURE) DECODE-NS-STRING (NCHARS %ARRAY-BASE FFETCHFIELD %ARRAY-OFFSET + -\\GETBASEBYTE PLUS ALLOCSTRING \\ADDBASE LLSH) \\GENERIC.READCCODE (\\GTREADTABLE FUNCTION -\\INSTREAMARG \\GETSTREAM \\INCCODE \\CHECKEOLC SELCHARQ SELECTC UNINTERRUPTABLY \\DTEST \\XCCSIN -\\BIN IDIFFERENCE \\NSIN.24BITENCODING.ERROR UNFOLD LLSH ACCESS-CHARSET LOGOR CL:FUNCALL FFETCHFIELD -\\PEEKBIN \\BACKXCCSCHAR PLUS SUB1 \\NSIN FREPLACEFIELD) FUNCTIONSMSMC (GETDEF) BRHL/LAYOUT/DAUGHTERS -(GETNODEFROMID NEW/INSTANCE/OF/GRAPHNODE IPLUS BRHL/LAYOUT FRPLACA CONS IDIFFERENCE) -\\FM.UNSCROLLWINDOW (IPLUS WINDOWPROP \\FM.RESETCLIPPINGREGION) \\PEEKBIN (FDEVOP SPREADAPPLY* -FFETCHFIELD) PACKAGE-INSPECT-STOREFN (PROMPTPRINT) \\MAYBEBLOCK (BLOCK) CH.LIST.ALIASES.OF ( -COURIER.CALL CH.FINDSERVER PARSE.NSNAME CH.GETAUTHENTICATOR) OPENPRSTREAM (OPENSTREAM LISTGET NUMBERP -FREPLACEFIELDVAL NCREATE DIFFERENCE CONS IPLUS FFETCHFIELD GETEOFPTR FULLNAME FUNCTION) \\GETSTREAM ( -SELECTQ FFETCHFIELD \\IOMODEP \\FILE.NOT.OPEN ERROR) PFI.CHOOSE.BEST (CL:STABLE-SORT) FINDSYSRECDECL ( -TYPENAME SYSRECLOOK1) \\SOFTCURSORDOWN (\\GETBASE) TTNEXTNODE (FRPLACD CONS) \\GETDEVICEFROMHOSTNAME ( -FASSOC U-CASE FDEVOP SPREADAPPLY* FFETCHFIELD) \\PROCESS.DEFPRINT (\\DEFPRINT.BY.NAME FFETCHFIELD) -\\TEDIT.FORMATTEDP1 (GETEOFPTR IDIFFERENCE \\DWIN \\SMALLPIN SUB1 LLSH CONS) -\\TEDIT.CLEAR.SCREEN.BELOW.LINE (BITBLT FFETCHFIELD IDIFFERENCE) MSJOIN (UNION MKLIST) FB.INSERT.FILE -(FFETCHFIELD TB.FIND.ITEM FUNCTION TB.NTH.ITEM SUB1 STRING-EQUAL FB.COUNT.FILE.CHANGE) -XCL::PROFILE-VALUE-TYPE-CHECK (XCL::VARIABLE-DEFINITION-COERCION-FUNCTION XCL::VARIABLE-DEFINITION-TYPE -) INSURE.RGB.COLOR (\\ILLEGAL.ARG \\LOOKUPCOLORNAME INSURE.RGB.COLOR ERROR HLSTORGB) SNAPW ( -GETSCREENREGION CREATEW GROW/REGION CONS FFETCHFIELD) \\ENQUEUE.TIMER (UNINTERRUPTABLY FFETCHFIELD -\\BOXIDIFFERENCE) PRETTY-TYPE-NAME (SUBSET CL:SUBTYPEP SORT CONCATLIST MAPCONC LIST PRETTY-TYPE-NAME -CL:DOCUMENTATION CONCAT) FB.COPY/RENAME.COMMAND (FB.SELECTEDFILES FB.COPY/RENAME.MANY FB.FETCHFILENAME - FB.GET.NEW.FILE.SPEC FB.COPY/RENAME.ONE) VARIABLESMSGETDEF (GETDEF) BRHL/MOVE/RIGHT (IDIFFERENCE HALF - LRSH TOLINKS IPLUS CONS GETNODEFROMID FRPLACA) CL::BUILD-COPIER-TYPE-CHECK (CL::PS-TYPE CL:VALUES) -OPT.XVARSCAN (OASSOC FASSOC FRPLACD OPT.CODELEV) MSPATHS (SCRATCHASH LINELENGTH MSLISTSET TERPRI -PUTHASH RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION GETHASH -HASHARRAY) \\CLEARSYSBUF (MAPC FREPLACEFIELD THIS.PROCESS) COMPILER::FRAME-ANNOTATE-IF (NCONC -COMPILER::FRAME-ANNOTATE COMPILER::IF-PRED COMPILER::IF-THEN COMPILER::IF-ELSE) \\READCREFILL ( -STREAMPROP \\BIN) FB.INSERT.SUBDIRECTORIES (FREPLACEFIELDVAL NCREATE STRING-EQUAL FFETCHFIELD -FB.MAKE.SUBDIRECTORY.ITEM) MB.NWAYMENU.NEWBUTTON (IMAGEOBJPROP ADD1) \\TEDIT.GET.CHARLOOKS (\\BIN -LOGAND ELT \\SMALLPIN SUB1 LLSH IDIFFERENCE FOLDHI LRSH IPLUS FFETCHFIELD PLUS) PFI.MERGE.INDICES ( -NCONC SELECTQ ALPHORDER CONCAT LIST) \\CREATE.TWODINSPECTOR.INSPECTMENU (FREPLACEFIELDVAL NCREATE CONS -) FB.COPYTEXTCOMMAND (FB.COPY/RENAME.COMMAND CONS FUNCTION) MSRESPELL (CHOOZ CONS FRPLACA FLAST -FRPLNODE) \\TTYBACKGROUND (FFETCHFIELD TTY.PROCESSP APPLY* \\BACKGROUND) \\FM.RESHAPEFN (WINDOWPROP -\\FM.WINDOWEXTENT FM.REDISPLAYMENU) \\PROCESS.INIT (FUNCTION FREPLACEFIELDVAL NCREATE GETD HARDRESET) -COMPEM (COMPEM ERROR) PRINTFILEPROP (ASSOC) \\GETSYSBUF (\\GETREALSYSBUF FFETCHFIELD \\GETBASEFAT -\\GETBASE ADD1 FREPLACEFIELD) \\PFI.DO.HARDCOPY (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. - FUNCTION) \\DO.PARAMS.AT.OPEN (SELECTQ \\ILLEGAL.ARG MAPC APPLY*) OPT.SCANOPT (APPLY* CONS FASSOC -OPT.CALLP OPT.PRATTACH CONSTANT ADD1 FRPLACA SUB1 MEMB GETHASH OPT.JUMPCOPYTEST OPT.DELCOPYFN -OPT.SKIPPUSH) \\WRITEPRESSBITMAP (BITMAPCREATE BITBLT FFETCHFIELD LRSH \\BOUT LOGAND UNFOLD LLSH FIXR -FTIMES TIMES ITIMES IPLUS) WAIT.FOR.TTY (THIS.PROCESS FFETCHFIELD TTY.PROCESSP TTY.PROCESS OPENWP -WFROMDS TTYDISPLAYSTREAM SETUPTIMER) MINIMUMWINDOWSIZE (WINDOWPROP CONS HEIGHTIFWINDOW FONTPROP APPLY* - NUMBERP ERROR) \\FM.REDISPLAYMENU (WINDOWPROP LISTGET BLTSHADE IPLUS IDIFFERENCE MAPC -\\FM.DISPLAYBITMAP \\FM.ITEMPROP FFETCHFIELD BITBLT) \\DRAWCURVE.PRESS (FIXP \\ILLEGAL.ARG LIST LENGTH - PARAMETRICSPLINE MAPCAR CREATEPOSITION FIXR FTIMES \\GETBRUSHFONT.PRESS LAST) \\PROCESS.EVENTFN ( -SELECTQ APPEND FFETCHFIELD THIS.PROCESS) \\UNQUEUE.TIMER (FFETCHFIELD) -CONVERT.FILE.TO.TYPE.FOR.PRINTER (CLOSEF OPENFILE PRINTER.SCRATCH.FILE LISTGET PRINTERPROP -PRINTFILEPROP ERROR CONCAT FULLNAME LIST FUNCTION) SEDIT:*INDENT-ALIST* (LIST LIST*) -\\PROC.CODEFORTFRAME (\\TURN.ON.PROCESSES) RECOMP? (SELECTQ FMEMB MEMB EXPRP GETPROP) CH.LIST.ALIASES -(COURIER.CALL CH.FINDSERVER PARSE.NSNAME CH.GETAUTHENTICATOR) INSPECT/ALIST (INSPECTW.CREATE MAPCAR -FUNCTION) \\NSYSBUFCHARS (IPLUS LENGTH FFETCHFIELD IDIFFERENCE) \\SPP.INFO.HOOK (INSPECT PROCESSPROP -CREATEW GETBOXREGION FONTCREATE) CONVHANKAKU (STREAMPROP ARG) FB.COPYBINARYCOMMAND ( -FB.COPY/RENAME.COMMAND CONS FUNCTION) FINDRECDECL (RECLOOK TYPENAME) \\SAVESYSBUF (\\NSYSBUFCHARS -THIS.PROCESS FFETCHFIELD PLUS LENGTH NCHARS ALLOCSTRING RPLCHARCODE ADD1 \\GETSYSBUF SUB1 SUBSTRING) -FIND.START.OF.WORD (\\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE BITTEST LOGAND FIRSTCHAR TTNEXTCHAR) -CHARSET (\\GETSTREAM ACCESS-CHARSET SPREADAPPLY* FFETCHFIELD) TTYIN.LASTINPUT (TTYINSTRING) MSSEEKTYPE - (GETWORDTYPE FASSOC GETHASH MSNEXTWORD MSTRYSPELLTYPE) SETFILEINFO (SELECTQ \\ILLEGAL.ARG -FREPLACEFIELD IMAX FIX CHARSET FDEVOP SPREADAPPLY* FFETCHFIELD \\SETEOFPTR UNFOLD LLSH -\\GETDEVICEFROMNAME \\ADD.CONNECTED.DIR \\CONVERT-PATHNAME \\SETCLOSEDFILELENGTH LISPERROR) \\OPENFILE - (FFETCHFIELD \\ADD.CONNECTED.DIR \\GETDEVICEFROMNAME FDEVOP SPREADAPPLY* LISPERROR) OLDFAULT1 ( -MAKE-CONDITION CL:APPLY EVAL) \\SYSBUFP (FFETCHFIELD THIS.PROCESS) CLOSEW (\\INSUREWINDOW SPREADAPPLY* - FFETCHFIELD) \\IOMODEP (\\GETACCESS \\FILE.NOT.OPEN) PACKFILENAME (ARG APPLY PACK -PACKFILENAME.ASSEMBLE ADD1 STRINGP ATOM UNPACKFILENAME.STRING PACKFILENAME.STRING SELECTQ SHOULDNT -CDDR SELCHARQ CHCON1 SUBSTRING NTHCHARCODE ERROR NCONC LIST LASTCHPOS NCHARS CL:FIRST CL:SECOND CL:THIRD -) FB.SORTCOMMAND (FFETCHFIELD MENU FB.GET.SORT.MENU SELECTQ FUNCTION TB.COLLECT.ITEMS CL:POSITION HELP - CL:NTH IDATE FB.CHECK.NAME.LENGTH SORT) MB.NWAYBUTTON.SELFN (FFETCHFIELD IMAGEOBJPROP CONS) -COMPILER::FRAME-ANNOTATE-CATCH (COMPILER::FRAME-ANNOTATE COMPILER::CATCH-STMT COMPILER::BLIPPER-NEW-FRAME-P - MAPC COMPILER::BLIPPER-REFERENCES COMPILER::CLOSE-OVER CL:COPY-LIST CL:NUNION CONS COMPILER::CATCH-TAG -) \\KEYBOARDINIT (KEYACTIONTABLE \\ALLOCLOCKED \\ALLOCBLOCK FOLDHI LRSH IPLUS ADD1 ALLOCSTRING LOCF -\\ADDBASE PLUS XKEYDOWNP LOGAND LLSH \\GETBASE SELECTQ \\KEYNAMETONUMBER SETUPTIMER \\KEYBOARDON) -\\CREATE.TWODINSPECTOR.SETMENU (FREPLACEFIELDVAL NCREATE CONS) TRACKW (\\INSUREWINDOW RESETFORM CURSOR - TOTOPW LOGAND IDIFFERENCE FFETCHFIELD ZEROP IPLUS CONS) \\TEDIT.ACTIVE.WINDOWP (WINDOWPROP TEXTOBJ -PROCESSP) XCL::PROFILE-ENTRY-VALUE-NAME (CL:FUNCALL XCL::VARIABLE-DEFINITION-NAME-FUNCTION -XCL::FIND-VARIABLE-DEFINITION CL:GETF XCL::PROFILIZE CL:EVAL) C.FLOATBOX (SELECTQ COMP.VALN -COMP.FLOATBOX) CL::BUILD-COPIER-SLOT-SETFS (CL:MAPCAR CL:FUNCTION) \\GR.WITHRESOURCEMAC (MKLIST -\\DECL.COMNT.PROCESS) OPEN (PATHNAME MEMQ INTERLISP-ACCESS) SEDIT::UNDO (SEDIT::CLOSE-NODE FFETCHFIELD - SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW PRIN1) MSSEEK-WORD (CL:MEMBER MSNEXTWORD MAPC MSTRYSPELL) -KEYACTIONTABLE (\\#BLOCKDATACELLS FFETCHFIELD \\BLOCKDATAP COPYALL \\ALLOCBLOCK FOLDHI LRSH IPLUS PLUS - ADD1 APPEND COPY \\KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS KEYACTION) \\FM.OPENFN (ERROR -\\FM.REDISPLAYMENU) \\DRAWLINE.PRESS (LIST CREATEPOSITION) BLOCKCOMPILE1 (LIST SOME APPEND CONS -POSITION VIRGINFN NCONC1 SUB1 COMPILE1A MAPCAR BYTEBLOCKCOMPILE2 BLOCKCOMPILE2) -\\SMASHMENUIMAGEONRESET (FREPLACEFIELD) \\TURN.ON.PROCESSES (FREPLACEFIELD ASKUSER) \\PEEKSYSBUF ( -FFETCHFIELD \\GETBASEFAT \\GETBASE THIS.PROCESS SHOULDNT) TTYINBUFFERDEVICE (FUNCTION FREPLACEFIELDVAL - NCREATE) INSPECTABLEFIELDNAMES (RECORDFIELDNAMES LIST REMOVEDUPS) WRITE-UNICODE-MAPPING ( -WRITE-UNICODE-MAPPING LIST TERPRI WRITE-UNICODE-INCLUDED PRIN1) FB.INCREASING.VERSION (NULL.VERSIONP -FFETCHFIELD ILESSP) XCL::PROFILE-ENTRY-VALUE (CL:GETF XCL::PROFILIZE CL:EVAL) \\GENERIC.OUTFILEP ( -FDEVOP SPREADAPPLY* FFETCHFIELD PACKFILENAME ADD1 FILENAMEFIELD) \\CREATE.TWODINSPECTOR.TITLEMENU ( -FREPLACEFIELDVAL NCREATE CONS) \\RESHOWBORDER1 (FFETCHFIELD IDIFFERENCE IPLUS ITIMES DSPCLIPPINGREGION - DSPLINEFEED BITMAPCREATE DSPDESTINATION \\GETBASE \\TOTOPWDS CONS) BREAK.PROCESS (\\COERCE.TO.PROCESS - FIND.PROCESS THIS.PROCESS FUNCTION) \\TFBRAVO.SPREAD.LOOKS (SELECTQ LISTPUT \\TFBRAVO.GET.FONTSIZE -\\TFBRAVO.GET.FONTSTYLE PLUS IDIFFERENCE) FUNCTIONSMSGETDEF (REMOVE-COMMENTS GETDEF SELECTQ -GETTEMPLATE) BRHL/LAYOUT (IPLUS FRPLACA HALF LRSH CONS IMAX BRHL/LAYOUT/DAUGHTERS LIST FRPLACD) -RELDSPYOFFSET (DSPYOFFSET IPLUS) MENU (\\POSITION.MENU.IMAGE FFETCHFIELD WINDOWPROP RESETLST RESETSAVE - OPENW LIST THIS.PROCESS BLOCK MOUSESTATE LOGAND LOGOR MENU.HANDLER DOSELECTEDITEM) -MB.MARGINBAR.SIZEFN (CONS) BRECOMPILE1 (APPEND ASSOC LIST CONS PACK* GETFILEPTR READ MAPC SETFILEPTR -LCSKIP BRECOMPILE3 NCONC1) \\NSPRINT.WATCHDOG (DREMOVE) \\REVALIDATEFILE (FDEVOP SPREADAPPLY* -FFETCHFIELD \\GETACCESS) MAPFILES1 (RESETLST \\GENERATEFILES MKLIST \\GENERATENEXTFILE NCHARS - -NTHCHARCODE \\GENERATEFILEINFO) FB.ALPHABETIC.ATTR (SELECTQ ALPHORDER FFETCHFIELD -FB.NAMES.DECREASING.VERSION) MB.NB.PACKITEMS (IPLUS NCONC1 CONS PLUS) CLRPROMPT (DSPRESET TERPRI) -XCL::MAKE-VARIABLE-DEFINITION (CL:NREVERSE) TEDIT.SCAN.LINE (FFETCHFIELD FIXR FTIMES IMAX SUB1 -\\EDITELT GETBASEPTR \\GETBASEPTR \\ADDBASE2 \\ADDBASE PLUS IDIFFERENCE ADD1 LRSH IPLUS IMIN) -KEYACTION (SMALLP \\KEYNAMETONUMBER \\#BLOCKDATACELLS FFETCHFIELD \\BLOCKDATAP CONS \\KEYACTION1 -\\TRANSINDEX IPLUS) DEFAULTMENUHELDFN (PROMPTPRINT) OPT.SETUPOPT (FASSOC CONS LIST FRPLACD) -TEDIT.CREATEW (TERPRI LISTGET HEIGHTIFWINDOW ITIMES FONTPROP GETREGION IPLUS FRPLACA PLUS IMINUS -CREATEW \\TEDIT.ORIGINAL.WINDOW.TITLE) BRHC/OFFSET (GETNODEFROMID IPLUS FRPLACA FRPLACD BRHC/OFFSET) -CL::DEFINE-COPIERS (CL::PS-COPIER CL::PS-NAME) \\HANDLE.RAW.3TO10 (FFETCHFIELD LOCF \\ADDBASE + FOLDHI - LRSH IPLUS NCREATE) \\PROC.AFTER.WINDOWWORLD (FIND.PROCESS) PAINTW.SHADE.LABEL (BITMAPCREATE PLUS -STRINGWIDTH FONTPROP) REMOVEITEM (EQUAL SUBSET) OPT.POSTOPT (CONS LIST NCONC1 OPT.OPTCHECK OPT.DREV -ADD1) \\CLEAR.ROUTING.TABLE (NTYPX PLUS \\ADDBASE \\CREATECELL) \\ALLOCLOCKED (\\ALLOCBLOCK IMIN -FOLDHI LRSH IPLUS LOGAND \\LOLOC UNFOLD LLSH) \\SPP.HANDLE.INPUT (GETXIP FFETCHFIELD ILESSP \\LOLOC -IDIFFERENCE LOCF \\ADDBASE FUNCTION SEQ.ADD1 IPLUS SUB1 LRSH ITIMES IMAX IMIN CLOCKDIFFERENCE) -\\PRINT-REVALIDATION-RESULT (PRIN1 FFETCHFIELD SELECTQ |printout| TERPRI SHOULDNT) -CL::DEFAULT-CONSTRUCTOR-NAME (CL:VALUES CL:INTERN CL:CONCATENATE STRING) MOUSECHORDWAIT (IMIN ITIMES -SMALLP ARG) COMPILER::FRAME-ANNOTATE-GO (CL:PUSHNEW CONS COMPILER::GO-TAGBODY) FORGETPAGES ( -FFETCHFIELD CPBUFFERP CONS) TTRACKMOUSE (ZEROP LOGAND CURSORPOSITION - IQUOTIENT TTNTHLINE FCHARWIDTH -CHARWIDTH LRSH TTNEXTCHAR FRPLNODE CONS) DEFAULT.INSPECTW.VALUECOMMANDFN (SELECTQ TYPENAME -INSPECT/ATOM PRIN1 ZEROP LOGAND CLRPROMPT INSPECT/BITMAP INSPECT/LISTP MENU FREPLACEFIELDVAL NCREATE -CONS INSPECT) TTSETCURSOR (MOVETO + TIMES -) COMPILER::FRAME-ANNOTATE-LABELS (NCONC MAPCONC -COMPILER::LABELS-FUNS COMPILER::FRAME-ANNOTATE COMPILER::LABELS-BODY) PAINTW.CACHE.SHADE (NCONC1 LIST -PAINTW.SHADE.LABEL) MAYBE.PRETTYFILEINDEX (REMOVE ROOTFILENAME) \\PAGED.REVALIDATEFILE (FDEVOP -SPREADAPPLY* FFETCHFIELD \\GETACCESS) BITBLT.INSERT (+ - BITBLT.ERASE) \\KEYBOARDEVENTFN (SELECTQ -LOGAND FFETCHFIELD MACHINETYPE EQUAL UNIX-GETPARM \\KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS KEYACTION -APPEND MOUSECHORDWAIT) RELDSPXOFFSET (DSPXOFFSET IPLUS) PPROC1 (FFETCHFIELD TTY.PROCESS SPACES -THIS.PROCESS PRIN1 IDIFFERENCE CLOCK PRINTNUM) MB.MARGINBAR.TABTRACK (DSPCLIPPINGREGION MSCALE LOGAND -LOGOR LASTMOUSEX LASTMOUSEY MDESCALE FRPLACA) NEWFAULT1 (/DWIMCHECKTRAN GETD CONS WTFIX OLDFAULT1 -FUNCTION) PPROC (PPROC1 CLOCK TERPRI FFETCHFIELD CONS) \\PROCESS.MAKEFRAME0 (FFETCHFIELD ADDSTACKBASE -\\VAG2 IPLUS \\MAKEFRAME \\FREESTACKBLOCK \\DEFCELL \\ATOMCELL UNFOLD LLSH \\MP.ERROR) -FB.INCREASING.NUMERIC.ATTR (FFETCHFIELD ILESSP FB.NAMES.DECREASING.VERSION) /RPLNODE (CONS FRPLACD -ERRORX LIST) FB.CANONICAL.DIRECTORY (\\DTEST FFETCHFIELD TTYDISPLAYSTREAM TTY.PROCESS THIS.PROCESS -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION DIRECTORYNAME FB.YES-OR-NO-P CL:FORMAT) -COMPILER::FRAME-ANNOTATE-CALL (NCONC COMPILER::CALL-FN COMPILER::FRAME-ANNOTATE-LAMBDA -COMPILER::FRAME-ANNOTATE MAPCONC COMPILER::CALL-ARGS) \\RENAMEFILE (\\ADD.CONNECTED.DIR -\\GETDEVICEFROMNAME FDEVOP SPREADAPPLY* FFETCHFIELD) RESHOWBORDER (FFETCHFIELD \\RESHOWBORDER1) -FLUSHRIGHT (IDIFFERENCE POSITION LINELENGTH NCHARS QUOTIENT IPLUS PRIN2 PRIN1) \\ENDPAGE.PRESS ( -FFETCHFIELD \\GETFILEPTR SPREADAPPLY* LRSH \\BOUT LOGAND) \\BUFFERED.REVALIDATEFILELST (FDEVOP -SPREADAPPLY* FFETCHFIELD \\BUFFERED.REVALIDATEFILE STREAMPROP APPLY*) \\CHECK.PQUEUE (FFETCHFIELD -TERPRI THIS.PROCESS RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION -HELP) CONDITIONS:INVOKE-DEBUGGER (DEBUGGER) \\GETKEY (THIS.PROCESS FFETCHFIELD \\GETSYSBUF -GLOBALRESOURCE LOCF \\ADDBASE CLOCKDIFFERENCE GETRESOURCE NEWRESOURCE CREATECELL) GETWINDOWPROP ( -TYPENAMEP \\OUTSTREAMARG \\GETSTREAM WFROMDS WINDOWOP SPREADAPPLY* FFETCHFIELD) -\\PAGED.REVALIDATEFILES (COPY \\PAGED.REVALIDATEFILE RESTOREMAP FORGETPAGES STREAMPROP APPLY* -FFETCHFIELD SPREADAPPLY* DREMOVE) CH.DELETE.ALIAS (COURIER.EXPEDITED.CALL CH.FINDSERVER PARSE.NSNAME -CH.GETAUTHENTICATOR) \\TRUNCATEFILE (FDEVOP SPREADAPPLY* FFETCHFIELD) BSPHELP (HELP) \\FILE-CONFLICT ( -FFETCHFIELD FDEVOP SPREADAPPLY* \\GETACCESS) \\RESETKEYBOARD (\\GETBASE XKEYDOWNP LOGAND LRSH LLSH -SELECTQ \\KEYNAMETONUMBER \\KEYBOARDON) CONDITIONS:CONTINUE (CONDITIONS:FIND-RESTART) PPROCRESHAPEFN ( -WINDOWPROP RESHAPEBYREPAINTFN) \\TEDIT.ADJUST.LINES (FFETCHFIELD IPLUS FREPLACEFIELD TEXTPROP PLUS -IDIFFERENCE IMINUS) MSWORD? (GETHASH) CONDITIONS:MUFFLE-WARNING (CONDITIONS:FIND-RESTART) -WRITE-UNICODE-MAPPING-HEADER (TAB SELECTQ PRIN1 SPACES PRINTOUT TERPRI DATE) \\SPP.NOT.RESPONDING ( -ADD1 FFETCHFIELD FREPLACEFIELD IMIN TIMES - LRSH |printout| PROCESSPROP THIS.PROCESS PRIN1 PLUS) -FB.GREATEST.PREFIX (NTHCHARCODE SUBSTRING PLUS) FB.EDITCOMMAND (FB.SELECTEDFILES FB.FETCHFILENAME) -CL::BUILD-CONSTRUCTOR-SLOT-SETFS (CL::PS-TYPE CL::PS-NAME CL:MAPCAR CL:FUNCTION) CONDITIONS:INVOKE-RESTART - (CONDITIONS:FIND-RESTART CL:ERROR SI::INVOKE-ACTUAL-RESTART) ONEDINSPECT.SCROLLFN (WINDOWPROP -FUNCTION) \\SHAPEW2 (\\INSUREWINDOW REGIONP FFETCHFIELD DSPCLIPPINGREGION BITMAPCREATE \\OPENW1 -FUNCTION CREATEREGION) SCROLLBYREPAINTFN (WINDOWPROP DSPCLIPPINGREGION \\DECODE.EXTENT.USE IPLUS FIXR -FTIMES IDIFFERENCE WXOFFSET IMINUS DSPLINEFEED FDIFFERENCE WYOFFSET FFETCHFIELD CONS INTERSECTREGIONS -\\DSPUNTRANSFORMREGION IMIN SELECTQ IMAX PLUS CREATEREGION) \\TFBRAVO.WRITE.RUNS (IPLUS) TTBEFOREPOS ( -BEFOREBUF BUFTAILP ILESSP) CONDITIONS:INVOKE-RESTART-INTERACTIVELY (CONDITIONS:FIND-RESTART CL:ERROR -CONDITIONS::RESTART-INTERACTIVE-FN SI::INVOKE-ACTUAL-RESTART CL:FUNCALL) MDESCALE (QUOTIENT IQUOTIENT -LLSH IDIFFERENCE DIFFERENCE) COMP.UNBOX (GETPROP) |ExtensionForPrintFileType| (ASSOC) -\\MENU.ITEM.SELECT (GETMENUITEM) SEDIT:GET-FORMAT (CL:GETHASH) \\UPDATE.PBT.RASTERWIDTHS (\\MAPMDS -FUNCTION) PPROCREPAINTFN (WINDOWPROP LOGAND DSPYPOSITION PPROCEXTENT) \\GENERATENOFILES (STRPOS -NTHCHARCODE SUB1 ADD1 CONSTANT CHARACTER FUNCTION PACKFILENAME CONS \\NULLFILEGENERATOR) INSPECT/PLIST - (INSPECTW.CREATE MAPCAR FUNCTION) FB.DECREASING.NUMERIC.ATTR (FFETCHFIELD IGREATERP -FB.NAMES.DECREASING.VERSION) COPYGRAPH (CONS LIST) XCL::IN-PROFILE (XCL::PROFILIZE XCL:RESTORE-PROFILE -) PPROCEXTENT (ITIMES IPLUS LENGTH IMINUS DSPLINEFEED IDIFFERENCE WINDOWPROP CONS) MULTIFILEINDEX1 ( -LISTGET LIST* ADD1 CONS PRETTYFILEINDEX REVERSE PLUS PFI.MAKE.LPT.STREAM CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION PFI.PRINT.MULTI.INDEX) COMP.UBFLOAT2 (COMP.PROGN ADD1 SUB1 COMP.STFN LIST) -EXTEND/TRANSITION/CHAIN (FLAST FRPLACD) RESTOREMAP (\\GETSTREAM FFETCHFIELD CPBUFFERP CONS) \\SHOWTEXT - (\\TEDIT.PRIMARYW DSPCLIPPINGREGION RESETLST RESETSAVE CURSOR WINDOWPROP SUB1 FFETCHFIELD -FREPLACEFIELDVAL NCREATE \\FILLWINDOW \\TEDIT.SET.WINDOW.EXTENT) \\NOFILESNEXTFILEFN (FRPLACA INFILEP -FULLNAME CONS FILENAMEFIELD ADD1 PACKFILENAME.STRING PLUS FRPLACD) KEYBOARDTYPE (MACHINETYPE SELECTQ -SASSOC L-CASE UNIX-GETENV MKATOM U-CASE UNIX-GETPARM) DSPFILL (\\OUTSTREAMARG \\GETSTREAM -DSPCLIPPINGREGION BLTSHADE) \\BUFFERED.REVALIDATEFILE (FDEVOP SPREADAPPLY* FFETCHFIELD \\GETACCESS) -\\ADD.PACKET.FILTER (FMEMB NCONC1) INFILEP (\\GETFILENAME) PPROCWINDOW (CREATEW FUNCTION WINDOWPROP) -\\KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS (UNIX-GETPARM LOGAND FFETCHFIELD APPEND) DELFROMCOM1 (GETTOPVAL - REMOVEITEM) DELFROMCOM (GETPROP APPLY* SELECTQ DELFROMCOMS CL:THIRD CL:FOURTH ASSOC GETTOPVAL -REMOVEITEM MAPC INFILECOMTAIL REMOVE DELFROMCOM1 PRETTYCOM1 MKLIST) CH.CREATE.ALIAS (COURIER.CALL -CH.FINDSERVER PARSE.NSNAME CH.GETAUTHENTICATOR) FONTNAME.IP (FONTPROP CONS PACK* LISTGET PACK LIST) -\\DEL.PACKET.FILTER (DREMOVE) ALIGNMENTNODE (SELECTQ GN/TOP GN/BOTTOM GN/RIGHT GN/LEFT GETNODEFROMID) -TEDIT.SELECT.LINE.SCANNER (FFETCHFIELD DSPCLIPPINGREGION TEDIT.SCAN.LINE \\TEDIT.PARABOUNDS -\\TEDIT.FIND.PROTECTED.START \\TEDIT.FIND.PROTECTED.END \\FORMATLINE ADD1 IPLUS IDIFFERENCE -FREPLACEFIELD) SEDIT::WALK-UP-TREE (CL:FUNCALL) RESHAPEBYREPAINTFN (WINDOWPROP DSPCLIPPINGREGION -IDIFFERENCE IPLUS IMIN IMAX DSPXPOSITION DSPYPOSITION DIFFERENCE FONTPROP DSPSCROLL PLUS CONS) MSVERB -(MSSEEKTYPE CONS) RAISE/TRANSITION/CHAIN (FRPLACD PLUS) EXTENDPASTVERTBOUNDARIES (IGREATERP IPLUS) -DWIM-SYMBOL-PACKAGE (DECLARE CL:FIND-ALL-SYMBOLS CL:SYMBOL-NAME LIST /RPLACA) CAN.PRINT.DIRECTLY ( -FMEMB PRINTERPROP) NESTED.SUBMENU.POS (FFETCHFIELD \\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG \\GETSTREAM - IDIFFERENCE LENGTH FMEMB \\DSPTRANSFORMX IPLUS ITIMES IREMAINDER \\DSPTRANSFORMY SUB1 IQUOTIENT CONS) - PFI.ENQUEUE (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION NCONC1 ADD.PROCESS LIST) -SEDIT:RESET-FORMATS (CLRHASH SEDIT::INSTALL-SPECIAL-FORMATS SEDIT::COPY-HASH-TABLE CL:MAKE-HASH-TABLE) - NOSUCHATOM (TERPRI ERROR) PACKFILENAME.STRING (ARG APPLY CONCATLIST PACKFILENAME.ASSEMBLE ADD1 -STRINGP ATOM UNPACKFILENAME.STRING PACKFILENAME.STRING SELECTQ SHOULDNT CDDR SELCHARQ CHCON1 SUBSTRING - NTHCHARCODE ERROR NCONC LIST LASTCHPOS NCHARS CL:FIRST CL:SECOND CL:THIRD) BITBLT.DELETE (- +) -PRETTYFILEINDEX (RESETLST LISTGET GETSTREAM LIST FUNCTION OPENSTREAM FULLNAME \\PARSE-FILE-HEADER CONS - PFI.MAKE.LPT.STREAM LINELENGTH IQUOTIENT - DSPRIGHTMARGIN DSPLEFTMARGIN CHARWIDTH FIXR TIMES -PFI.LINES.REMAINING APPEND PFI.COLLECT.DEFINERS GETFILEINFO LOGOR CONCAT) \\SPP.RETRANSMIT.NEXT ( -FFETCHFIELD ELT IMOD LOCF \\ADDBASE SEQ.ADD1 \\LOLOC) FB.MERGE.DIRECTORIES (CONCAT CL:SECOND) -COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::FRAME-ANNOTATE COMPILER::BLOCK-STMT CL:DELETE-IF -COMPILER::BLIPPER-NEW-FRAME-P MAPC COMPILER::BLIPPER-REFERENCES COMPILER::CLOSE-OVER CL:COPY-LIST LIST - CL:NUNION) IDLE.SHOW.OPTIONS (MAP IDLE.SHOW.OPTION) CL::EQLHASHBITSFN-UFN (\\GETBASEPTR) GET-RIGHTW ( -WINDOWPROP CREATEW CREATEREGION FUNCTION) SHAPEW1 (\\INSUREWINDOW REGIONP FFETCHFIELD -DSPCLIPPINGREGION BITMAPCREATE \\OPENW1 OPENW FUNCTION CONS) PROCESS.STATUS.WINDOW (MAPCAR FFETCHFIELD - FUNCTION FONTCREATE FREPLACEFIELDVAL NCREATE CONS HEIGHTIFWINDOW + BITMAPHEIGHT CHECK/MENU/IMAGE -WIDTHIFWINDOW MAX BITMAPWIDTH WINDOWPROP - POSITIONP GETBOXPOSITION CREATEW IQUOTIENT) \\TFBRAVO.EOLS -(PLUS TEDIT.SETSEL FFETCHFIELD) TTNEXTPOS (CONS TTNEXTCHAR) COPY (LIST COPY CONS) HRULE.COPYFN ( -HRULE.CREATE IMAGEOBJPROP) ADDMENU (TYPENAMEP BITMAPWIDTH CHECK/MENU/IMAGE BITMAPHEIGHT POSITIONP -FFETCHFIELD CONS IPLUS FRPLACA WINDOWPROP CREATEWFROMIMAGE BITMAPCOPY FUNCTION DSPCLIPPINGREGION -MENUREGION) EDIT4E1 (CONS DREVERSE) SEDIT::VERIFY-STRUCTURE (FFETCHFIELD WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SEDIT::CLOSE-NODE LIST RPLACD) SHADEITEM ( -MENUITEMREGION WFROMMENU WINDOWPROP DISPLAYSTREAMP GETSTREAM FFETCHFIELD DIFFERENCE BITMAPWIDTH -FRPLACA) FULLNAME (FFETCHFIELD \\GETFILENAME) \\TEDIT.FIXINSSEL (FFETCHFIELD IPLUS) MSOBJTYPE (MSJOIN -MSOBJTYPE SELECTQ LIST SHOULDNT) \\PAGED.REVALIDATEFILELST (FDEVOP SPREADAPPLY* FFETCHFIELD -\\PAGED.REVALIDATEFILE RESTOREMAP FORGETPAGES STREAMPROP APPLY*) FEDITFINDP (FEDITFINDP) -GETBOXPOSITION (GETBOXSCREENPOSITION) CL::BOA-CONSTRUCTOR-P (CL:CONSP) \\TEDIT.CREATEW.FROM.REGION ( -LISTGET HEIGHTIFWINDOW ITIMES FONTPROP CREATEW \\TEDIT.ORIGINAL.WINDOW.TITLE) CHECK/MENU/IMAGE ( -TYPENAMEP FFETCHFIELD CREATEWFROMIMAGE) \\FILE.NOT.OPEN (LISPERROR FFETCHFIELD) PRESSBITMAP ( -OPENPRSTREAM FFETCHFIELD BITMAPWIDTH BITMAPHEIGHT IQUOTIENT IDIFFERENCE FIX TIMES TERPRI IMAX -CREATEREGION MIN QUOTIENT IPLUS CLOSEF) SKOR0 (NCHARS IQUOTIENT ITIMES IDIFFERENCE SKOR CHCON ZEROP -IGREATERP) NSPRINTREQUEST.STATUS (\\NSPRINT.ENQUIRE LIST) FB.REMOVE.FILE (FFETCHFIELD TB.NTH.ITEM SUB1 - ADD1 PLUS STRING-EQUAL FB.COUNT.FILE.CHANGE) GETFILEINFO (\\GETACCESS FDEVOP SPREADAPPLY* FFETCHFIELD - SELECTQ SELECTC SHOULDNT CHARSET \\GETEOFPTR SIZE.FROM.LENGTH FOLDHI LRSH IPLUS \\EXTERNALFORMAT -\\GETDEVICEFROMNAME \\ADD.CONNECTED.DIR \\CONVERT-PATHNAME LISPERROR) \\NULLFILEGENERATOR (FUNCTION -CONS) COMPILEUSERFN1 (FASSOC UNION) TWODINSPECT.SCROLLFN (WINDOWPROP FUNCTION) RELMOVEW (WINDOWOP -SPREADAPPLY* \\INSUREWINDOW FFETCHFIELD) WIDTHIFWINDOW (IPLUS ITIMES) \\TFBRAVO.READ.USER.CM (LIST -OPENP OPENSTREAM CONCAT CONSTANT CHARACTER RATOMS NTHCHAR FASSOC NCONC \\TFBRAVO.GETPARAMS) -\\NOFILESINFOFN (GETFILEINFO) COMP.DECLARETYPE (SELECTQ) RESETKEYACTION (\\#BLOCKDATACELLS FFETCHFIELD - \\BLOCKDATAP LLSH COPY) HEIGHTIFWINDOW (\\INSURESCREEN IPLUS IMINUS DSPLINEFEED FFETCHFIELD ITIMES) -VARSBOUNDINEDITCHAIN (MAPCONC VARSBOUNDINFORM) \\GETCHARCODE (IGEQ FIX NCHARS CHCON1) PRINCOPY (PRINT -\\UNCOPY LOCAL) CONDITIONS:FIND-RESTART (CL:FLET) MB.NB.SIZEFN (IMAGEOBJPROP IDIFFERENCE PLUS LIST -MAPCAR ITIMES LENGTH IMINUS MB.NB.PACKITEMS MAPCONC COPY NCONC CONS) PFI.NEW.LISTFILES1 (FINDFILE -CL:ERROR MAYBE.PRETTYFILEINDEX LIST FUNCTION) COMP.FLOATUNBOX (COMP.DELFN FLOAT COMP.STFN) -INSPECT/TOP/LEVEL/LIST (INSPECTW.CREATE LIST PLUS FUNCTION PRIN1) EXTENDPASTHORIZBOUNDARIES (IGREATERP - IPLUS) \\SPP.PROBE (\\SPP.SENDPKT \\SPP.SYSPKT) CHECKTRAN (GETHASH) PFI.CONSTANTNAMES (CONS MAPCAR) -CL::BUILD-CONSTRUCTOR-ARGLIST (CL:MAPCAN CL:FUNCTION) DO.LF (\\DSPPRINTCR/LF) BRACKET.CURRENT.WORD ( -WORDSEPRP \\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE BITTEST LOGAND FIRSTCHAR TTNEXTCHAR BEFOREBUF -BUFTAILP CONS) HRULE.PUTFN (PRINT IMAGEOBJPROP) \\FILE.WONT.OPEN (LISPERROR FFETCHFIELD) ADDNEWCOM ( -MAKENEWCOM GETTOPVAL SAVESET LIST) DEFINEFONT.IP (FFETCHFIELD FONTNAME.IP PLUS TIMES FONTPROP -GETFRAMEVAR.IP FREPLACEFIELD CONS) \\UNCOMMA (SELECTQ \\UNCOMMA CONS LIST) GRAPHOBJ.FINDGRAPH ( -GETSTREAM WINDOWPROP LOGAND LOGOR COPYGRAPH) \\PSWOP.SELECTED (PROMPTPRINT \\PSW.SELECTED TTY.PROCESS -FFETCHFIELD FIND.PROCESS LIST WFROMMENU SETUPTIMER WINDOWPROP SELECTQ MENU FREPLACEFIELDVAL NCREATE -CONS PROCESS.READ THIS.PROCESS) \\ILLEGAL.DEVICEOP (ERROR ARG LIST PLUS) IN/SCROLL/BAR? (FFETCHFIELD -WINDOWPROP \\DECODE.EXTENT.USE EXTENDPASTVERTBOUNDARIES DSPCLIPPINGREGION EXTENDPASTHORIZBOUNDARIES) -CL::SXHASH-UFN (CL::%SXHASH \\GETBASEPTR) SHOWSTACKBLOCK1 (PRIN1) WHATIS (ERROR! SELECTQ CONS WHATIS -U-CASE GETTOPVAL FILECOMS FIXSPELL LIST ASKUSER) HEADINGOP.IP (FFETCHFIELD DIFFERENCE FONTPROP -GETFRAMEVAR.IP FREPLACEFIELD) PRINTCONSTANT (SUBSTRING ADD1 NCHARS PRIN1) NSPRINTER.PROPERTIES ( -\\NSPRINT.ENQUIRE) COMPILEUSERFN (BOUNDP CHECKTRAN CONS GETPROP GETHASH NLSETQ |compilation|) -GRAPHOBJ.DISPLAYFN (IMAGEOBJPROP DSPSCALE APPLY* GRAPHREGION SCALE/GRAPH CREATEPOSITION QUOTIENT -DIFFERENCE DSPXPOSITION DSPYPOSITION) \\AB.BACK (LENGTH NTYPX \\HILOC \\LOLOC IGEQ \\ADDBASE \\VAG2 -\\GETBASE LOADBYTE LOGAND LSH IMINUS MASK.1\'S SUB1 LIST UNFOLD LLSH) IDLE.BITMAP (WINDOWPROP -BITMAPWIDTH BITMAPHEIGHT BITMAPCREATE SCREENBITMAP BITMAPP RPLACA IDLE.BITMAP FONTCREATE NCHARS -STRINGWIDTH FONTHEIGHT DSPCREATE DIFFERENCE FONTASCENT) \\ONSCREENCLIPPINGREGION (INTERSECTREGIONS -DSPCLIPPINGREGION \\DSPUNTRANSFORMREGION FFETCHFIELD CONS WINDOWPROP) \\TFBRAVO.INIT.PARALOOKS ( -NCREATE IDIFFERENCE ASSOC IQUOTIENT LIST) PAINTW.READ.AND.SAVE.SHADE (EDITSHADE BITMAPCREATE) -BRHC/LAYOUT/TERMINAL (LIST CONS HALF LRSH) \\CLOSEF.PRESS (FFETCHFIELD GETFILEPTR LRSH \\BOUT LOGAND -FONTPROP \\FACECODE PLUS FOLDLO ADD1 IDIFFERENCE UNSIGNED SUB1 LLSH LISP.TO.ALTO.DATE IDATE IPLUS -FULLNAME GETFILEINFO) PRINTFILETYPE (IMAGESTREAMTYPE FILENAMEFIELD GETFILEINFO -PRINTFILETYPE.FROM.EXTENSION RESETLST MKATOM OPENSTREAM RESETSAVE LIST NLSETQ APPLY* ASSOC) -\\NS.SETTIME (DAYTIME) PFI.PASS.COMMENT (READCCODE PEEKCCODE CHANGEFONT) BMOBJ.GETFN5 (BITMAPTEDITOBJ -\\READBINARYBITMAP READ) \\CREATECHARSET.PRESS (RESETLST) CH.DELETE.OBJECT (PARSE.NSNAME COURIER.CALL -CH.FINDSERVER CH.GETAUTHENTICATOR) TTYIN.READ?=ARGS (TTSKIPSEPR WITH-RESOURCES TTYIN.READ GETRESOURCE -NEWRESOURCE MAKE-TTSCRATCHFILE) \\PUP.SETTIME (DAYTIME) EDITFINDP (EDITFPAT EDIT4E EDIT4F1) ESUBST1 ( -MAPC /RPLNODE ESUBST1 APPLY) SEDIT::UPDATE (FFETCHFIELD SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW -SEDIT::SHOW-CARET) \\TEDIT.FIXDELSEL (FFETCHFIELD IDIFFERENCE FREPLACEFIELD IMAX) MSSUBJTYPE (MSJOIN -MSSUBJTYPE) HRULE.GETFN (HRULE.CREATE READ) \\NSPRINT.ENQUIRE (GETNSPRINTER \\NSPRINT.COURIER.OPEN -RESETLST RESETSAVE LIST FUNCTION APPLY CONS APPEND) GRAPHEROBJ (GRAPHREGION IMAGEOBJCREATE LIST -GRAPHOBJ.CHECKALIGN CREATEPOSITION MINUS) XCL::*PROFILES* (CL:MAKE-HASH-TABLE) EDITL (CL:FUNCALL GET -EDITMODE) \\FDECODE/BUTTON (SELECTQ) TWODINSPECT.ARRANGEWINDOWS (WINDOWPROP HEIGHTIFWINDOW FONTPROP -TWODINSPECT.ROWPROPWIDTH WIDTHIFWINDOW IPLUS STRINGWIDTH IMIN ITIMES LENGTH IDIFFERENCE -TWODINSPECT.TOTALWIDTH DSPFONT SUB1 GETBOXREGION DIFFERENCE PLUS ADD1 CONS CREATEREGION) PPROMPT3 ( -PROMPTPRINT) TTSKIPSEPR (FMEMB FIRSTCHAR TTNEXTCHAR) COMP.LOOKFORDECLARE (CONS COMP.DECLARETYPE) -\\IS.NOT.RANDACCESSP (ARG ERROR FFETCHFIELD) FB.MAKE.BROWSER.BUSY (FFETCHFIELD LIST FUNCTION CONS) -MOUSECONFIRM (GETPROMPTWINDOW CONCAT PRIN1 RESETFORM CURSOR LOGAND LOGOR LASTMOUSESTATE ZEROP) -DETACHWINDOW (WINDOWPROP) SHOWSTACKBLOCKS (FFETCHFIELD ADDSTACKBASE \\VAG2 IEQ PLUS IDIFFERENCE -\\UNCOPY) ADDTOCOM (LIST GETPROP APPLY* SELECTQ ADDTOCOM1 ADDTOCOMS CL:THIRD CL:FOURTH UNION MKLIST -/NCONC1 ASSOC GETTOPVAL) \\KEYNAMETONUMBER (PLUS L-CASE \\ILLEGAL.ARG) INVERT.LONG.SEGMENT ( -TTBEFOREPOS) MB.NB.WHENOPERATEDFN (SELECTQ IMAGEOBJPROP FREPLACEFIELD) DINFO (RESETLST WINDOWP CREATEW - FFETCHFIELD RESETFORM TTYDISPLAYSTREAM GETPROMPTWINDOW DINFO.READ.GRAPH CREATE.MONITORLOCK -FREPLACEFIELD LIST) PROCESS.BACKTRACE (ATTACHEDWINDOWS WINDOWPROP CREATEW IPLUS IDIFFERENCE CONS -FONTCREATE FFETCHFIELD \\MAKESTACKP SELECTQ) FB.FINISH.COMMAND (FFETCHFIELD WINDOWPROP GETMENUPROP -FB.PROMPTWPRINT) \\GR.METHODEXPANDER (LISTGET GETDEF PACK* SELECTQ ERROR SHOULDNT APPLY SUBPAIR LIST -CONCAT) SEDIT::UNDO-REPLACE-ROOT (SEDIT::REPLACE-ROOT SEDIT::SUBNODE FFETCHFIELD LIST) WFROMMENU ( -OPENWINDOWS WINDOWPROP) INVERT.SEGMENT (BEFOREBUF BUFTAILP + SEGMENT.BIT.LENGTH ITIMES -) MSCOMMAND ( -CONS MSCANT MSEAT GETP MSSEEKPHRASE LIST) COMP.BOX (GETPROP) HRULE.IMAGEBOXFN (DSPSCALE IMAGEOBJPROP -IMAX IDIFFERENCE PLUS FIXR FTIMES CONS) READATABASE (RATOM READ FASSOC MKLIST) COPY.SEGMENT (LIST) -TTYINFOSTREAM (PROCESS.TTY \\GETSTREAM) SAMECLOOKS (FONTPROP FFETCHFIELD CONCAT) PREEDITFN (SELECTQ -CONS GETPROPLIST GETHASH PUTHASH RESETSAVE LIST FUNCTION APPEND GETPROP EVALV MAPCAR) /CNDIR (LIST -DIRECTORYNAME CNDIR) DUMPDATABASE1 (PRIN2 SPACES) RIGHTW.REPAINTFN (DSPCLIPPINGREGION MAINWINDOW IPLUS - WINDOWPROP STRINGWIDTH XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES SUB1 -FONTPROP - INSPECT.INVERTSELECTION) CONDITIONS:COMPUTE-RESTARTS (CL:FUNCTION CL:NREVERSE) TTY/EDITE ( -RESETLST SELECTQ SYSTEMTYPE TTYINFOSTREAM CONS LIST LAST EDITL HELP) \\UPDATE.PROCESS.WINDOW ( -WINDOWPROP FFETCHFIELD) BMOBJ.PUTFN (IMAGEOBJPROP SPACES) \\PRESS.CONVERT.NSCHARACTER (SELCHARQ -\\CHAR8CODE LOGAND) FB.MAYBE.INSERT.FILE (FFETCHFIELD NCHARS SUB1 FB.CREATE.FILEBUCKET APPEND MAPCAR -GETFILEINFO INFILEP UNPACKFILENAME.STRING CL:POSITION CL:NTH IDATE PACKFILENAME.STRING -FREPLACEFIELDVAL NCREATE) EDITFA (TERPRI) DSPSCROLL (\\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG -\\GETSTREAM FFETCHFIELD) CL::BOA-ARG-LIST-WITH-INITIAL-VALUES (CL:COPY-TREE CL::PS-ALL-SLOTS CL:MEMBER - CL:ERROR CL::PSLOT-INITIAL-VALUE CL::FIND-SLOT) KEYDOWNP (\\NEWKEYDOWNP \\GETBASEBIT LOGAND -\\GETBASEBYTE FOLDLO LRSH MASK.1\'S LSH SUB1 IDIFFERENCE CONSTANT IMOD \\KEYNAMETONUMBER) SEDIT::UNDO-EVENT + XCL::PROFILE-VALUES KEYDOWNP CL:FUNCALL ONED.TRACKCURSOR FUNCTION) \TEDIT.SHOWSELS (MAPC LIST +\SHOWSEL) EDIT.BI (EDITNTH CONS) OPT.CODELEV (IPLUS SELECTQ OPT.CODELEV SUB1 ADD1 IDIFFERENCE +OPT.COMPILERERROR) MSWORD? (GETHASH) EDIT.LO (EDITNTH MAPC EDITSMASH1) ACCESS-CHARSET (FDEVOP +SPREADAPPLY*) FB.UPDATECOMMAND (FB.UPDATEBROWSERITEMS) CURSORPOSITION (\GETDISPLAYDATA \DTEST +\OUTSTREAMARG \GETSTREAM \DSPUNTRANSFORMX \XMOUSECOORD IPLUS SIGNED SUB1 LLSH IDIFFERENCE +\DSPUNTRANSFORMY \YMOUSECOORD \DSPTRANSFORMX \DSPTRANSFORMY) ONEDINSPECT.DEFAULT.VALUECOMMANDFN ( +CONSTANT \CREATE.TWODINSPECTOR.SETMENU \CREATE.TWODINSPECTOR.INSPECTMENU MENU) +\CREATE.TEDIT.DEFAULT.FMTSPEC (CONS) GETEOFPTR (\GETSTREAM FDEVOP SPREADAPPLY*) GETLOCALDEC (LAST +CLISPDEC0) EDIT.BO (EDITNTH EDITNCONC EDITSMASH1) NUMBERPAD.HELDFN (PROMPTPRINT SELECTQ) +\DSPUNTRANSFORMY (IDIFFERENCE) CL:CHAR (CL:AREF) SI::ADVICE-ADDTOCOM (ADDTOCOM1) SEDIT::STRINGIFY-QUOTE + (CONCAT SEDIT::STRINGIFY SEDIT::SUBNODE) COMPILER::ALPHA-CATCH (COMPILER::MAKE-CATCH +COMPILER::ALPHA-ARGUMENT-FORM COMPILER::ALPHA-PROGN) INSPECT/TYPERECORD (INSPECT) \DSPUNTRANSFORMX ( +IDIFFERENCE) /ASSOCPUT (/PUTASSOC) NSPRINTER.PROPERTIES (\NSPRINT.ENQUIRE) VARIABLESMSGETDEF (GETDEF) +DEFAULTMAKENEWCOM (ERROR LIST FILECOMS MERGEINSERT GETTOPVAL) %%FAST-COPY-BASE (DEFERREDCONSTANT CL:* +\PILOTBITBLT) EDITGETD (EDITGETD-LAMBDA GET COPY CL:FUNCALL CL:MACROEXPAND-1 EXPANDMACRO GETHASH +GETDEF MAPCAR KWOTE CONS) CL::PREDICATE-BODY (CL::PS-PREDICATE CL::PS-TYPE) \FILLINXIP ( +\ALLOCATE.ETHERPACKET \DTEST \LOCALNSADDRESS PARSE-NSADDRESS \ILLEGAL.ARG) COPY-ARRAY (CL:ERROR +CL:MAKE-ARRAY CL:ARRAY-DIMENSIONS CL:ARRAY-ELEMENT-TYPE %%FAT-STRING-ARRAY-P %%MAKE-ARRAY-WRITEABLE +%%ARRAY-TYPE-NUMBER %%ARRAY-BASE %%ARRAY-OFFSET) MSRESPELL (CHOOZ CONS FRPLACA FLAST FRPLNODE) +FROM.SCREEN.BITMAP (PRIN1 GETSCREENREGION BITMAPCREATE BITSPERPIXEL SCREENBITMAP) \TEDIT.CLOSEUPLINES +(IDIFFERENCE ADD1 IPLUS \FORMATLINE) POSTSCRIPT.GETFONTID (CONSTANT TAN TIMES QUOTIENT) SEDIT::UNDO-EVENT (FREPLACEFIELD CONS FFETCHFIELD SEDIT::UNDO-EVENT SEDIT::END-UNDO-BLOCK SEDIT::COLLECT-UNDO-BLOCK -APPLY) BAKTRACE (STKNTH CONS STKNAME CL:SOME CL:FUNCTION LOGOR STKARG SUB1) DELETE.LONG.SEGMENT ( -DELETE.LONG.SEGMENT1) MSTRYPARSE (BLKAPPLY) EDITF2 (SELECTQ) ADJUSTOFFSETS (WINDOWPROP) -ATTACHEDWINDOWS (WINDOWPROP ASSOC LIST) MB.MARGINBAR.SELFN (IMAGEOBJPROP IMAGEBOX MAPCAR MSCALE CONS -IDIFFERENCE DSPCLIPPINGREGION ABS LOGAND LOGOR LASTMOUSEX LASTMOUSEY MAX MDESCALE IEQP MINUS IMIN IABS - IMINUS FIXR FRPLACA IPLUS FRPLACD LDIFFERENCE LIST) /DWIMCHECKTRAN (GETHASH) EDITF (NLAMBDA.ARGS -EDITDEF PRINT) \\TEDIT.TEXTBIN.STRINGSETUP (%ARRAY-TYPE-NUMBER FFETCHFIELD ADDBASE \\ADDBASE -%ARRAY-BASE %ARRAY-OFFSET UNFOLD LLSH IPLUS LRSH LOGAND) READOCT (PRIN1 RSTRING FIXP SELECTQ MKATOM -CONCAT GNC IPLUS ITIMES CHCON1 IDIFFERENCE ERROR SHOULDNT ERROR!) ATTACHWINDOW (INSURE.WINDOW -ALLATTACHEDWINDOWS CONS FUNCTION) CH.CREATE.OBJECT (PARSE.NSNAME COURIER.CALL CH.FINDSERVER -CH.GETAUTHENTICATOR) FB.CANONICALIZE.PATTERN (SELCHARQ NTHCHARCODE PLUS DIRECTORYNAME SUBSTRING CONCAT - ADD1) NSPRINTER.STATUS (\\NSPRINT.ENQUIRE) PRINTERRORPUP (|printout| PORTSTRING FFETCHFIELD LOCF -\\ADDBASE GETPUPSTRING TERPRI) GRAPHOBJ.PUTFN (IMAGEOBJPROP TERPRI) \\HUNKFIT? (IQUOTIENT FOLDLO LRSH -IREMAINDER TERPRI) ROMANNUMERALS (CONS PLUS U-CASE CONCATLIST REVERSE) \\TEDIT.WINDOW.OPS (DIFFERENCE -FFETCHFIELD WINDOWPROP CONS LOGAND LOGOR LASTMOUSEX LASTMOUSEY) COURIER.READ.SEQUENCE (GETWORD IPLUS -LLSH \\BIN COURIER.READ LIST PLUS) MENUDESELECT (FREPLACEFIELD) EDITDEF (GETFILEPKGTYPE APPLY* GETPROP -) INFILEPAIRS (MAPC LIST) CL:PATHNAME-DIRECTORY (%PATHNAME-DIRECTORY PATHNAME) \\KEYACTION1 (SELECTC -TRANSITIONFLAGS \\GETBASEBYTE FFETCHFIELD LIST CHECKFORDEADKEY TRANSITIONCODE \\GETBASE -TRANSITIONSHIFTCODE TRANSITIONALTGRCODE TRANSITIONDEADLIST \\GETBASEPTR LLSH IPLUS SHOULDNT MAPCAR -CONS IGEQ APPLY* \\GETCHARCODE) DIRECTORYNAME (CL:NAMESTRING SELECTQ SYSTEMTYPE GETDIRNAME -FILENAMEFIELD NTHCHARCODE SUBSTRING \\GETDEVICEFROMHOSTNAME SELCHARQ PACKFILENAME.STRING NCHARS FDEVOP - SPREADAPPLY* FFETCHFIELD MKSTRING MKATOM HELP) CL::BOA-SLOT-SETFS (CL::PS-TYPE) EDITF1 (EDITE) -DSPRUBOUTCHAR (\\DTEST \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD \\DSPMOVELR) SEDIT::TYPE-OF-INPUT ( -FFETCHFIELD) CREATESCROLLINGW (WINDOWPROP CREATEW FUNCTION) DELETE.LONG.SEGMENT1 (IDIFFERENCE FRPLACD -ADD1 FRPLACA PLUS SEGMENT.BIT.LENGTH NTH.COLUMN.OF) MSTRYSPELL (FASSOC CONS LIST) \\CREATEW1 (ABS IMIN - UNFOLD LLSH WINDOWOP SPREADAPPLY* FFETCHFIELD) \\FDEVINSTANCE (\\INHERITFDEVOP.S FUNCTION -\\INHERITFDEVOP.D FREPLACEFIELDVAL NCREATE) DUMPDATABASE (UPDATEFN FUNCTION DUMPDATABASE1 GETTABLE) -EDITFERROR (TERPRI ASKUSER CONCAT EDITE COPY RETFROM) UNSAVEBLOCK? (MAPC FILECOMSLST FASSOC LIST -GETPROP NCONC1 ASKUSER LOADDEF) \\CHARWIDTH.PRESS (\\PRESS.CONVERT.NSCHARACTER FFETCHFIELD -\\FGETCHARWIDTH \\FGETWIDTH \\GETBASE \\GETCHARSETINFO \\GETBASEPTR UNFOLD LLSH \\CHARSET LRSH -\\CREATECHARSET \\CHAR8CODE LOGAND) BMOBJ.INIT (IMAGEFNSCREATE FUNCTION) LOADDEF (PUTDEF GETDEF) -HEXSTRING (ALLOCSTRING IMAX LRSH PLUS MAX LOGAND + -) GRAPHOBJ.IMAGEBOXFN (IMAGEOBJPROP DSPSCALE -SCALE/GRAPH GRAPHREGION TIMES ALIGNMENTNODE PLUS GN/BOTTOM IQUOTIENT IPLUS IDIFFERENCE FONTPROP -GN/LEFT CONS) RNUMBER (NUMBERPAD.READ CREATE.NUMBERPAD.READER) DSPEOLFN (\\GETDISPLAYDATA \\DTEST -\\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) COURIER.READ.STRING (GETWORD IPLUS LLSH \\BIN ALLOCSTRING -%ARRAY-BASE FFETCHFIELD %ARRAY-OFFSET + \\GETBASEBYTE PLUS DECODE-NS-STRING) TEDITFROMBRAVO ( -OPENTEXTSTREAM TEXTOBJ \\TFBRAVO.READ.USER.CM \\TFBRAVO.INIT.PARALOOKS \\TFBRAVO.INIT.CHARLOOKS -GETFILEPTR \\TFBRAVO.PARSE.PARA \\TFBRAVO.WRITE.PARAGRAPH INPUT) PAINTW.READBRUSHSHADE (MENU APPEND -MAPCAR LIST KWOTE FREPLACEFIELDVAL NCREATE CONS PAINTW.READ.AND.SAVE.SHADE) BRHC/LAYOUT/DAUGHTERS ( -IPLUS GETNODEFROMID BRHC/LAYOUT BRHC/INTERTREE/SPACE EXTEND/TRANSITION/CHAIN RAISE/TRANSITION/CHAIN -CONS FRPLACA FRPLACD PLUS HALF LRSH) CL:PATHNAME-HOST (%PATHNAME-HOST PATHNAME) FB.COPY/RENAME.MANY ( -FB.PROMPTFORINPUT CONCAT LENGTH FFETCHFIELD DIRECTORYNAME UNPACKFILENAME.STRING FB.CANONICAL.DIRECTORY - \\ADD.CONNECTED.DIR LISTGET STRING-EQUAL SUBSTRING SELECTQ FB.YES-OR-NO-P FB.GREATEST.PREFIX SUB1 -ADD1 NCHARS FB.SORT.VERSIONS FUNCTION FB.COPY/RENAME.ONE FB.FETCHFILENAME PACKFILENAME.STRING -FB.MERGE.DIRECTORIES) MOVEW (WINDOWOP SPREADAPPLY* FFETCHFIELD) CREATEW1 (ABS GETSCREENREGION COPY -NUMBERP IMIN UNFOLD LLSH WINDOWOP SPREADAPPLY* FFETCHFIELD) EDITH (SELECTQ READLINE ERROR! LISPXFIND -FMEMB LDIFF CONS LIST UNDOEDITCOM RESETSAVE SETREADTABLE GETREADTABLE RESETVARS .RESETLST. -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION LISPX LISPXREADBUF LISPXREAD) MENUSELECT ( -FREPLACEFIELD) ONEDINSPECT.ARRANGEWINDOWS (WINDOWPROP HEIGHTIFWINDOW FONTPROP ONEDINSPECT.PROPWIDTH -WIDTHIFWINDOW IPLUS STRINGWIDTH IMIN ITIMES LENGTH IDIFFERENCE SUB1 GETBOXREGION DIFFERENCE PLUS ADD1 -CONS CREATEREGION) \\TEDIT.TEXTBIN.FILESETUP (UNFOLD LLSH FFETCHFIELD \\TEDIT.REOPEN.STREAM FOLDLO -LRSH MOD IMOD IPLUS GETEOFPTR LOGOR \\PAGEDBIN \\PAGEDPEEKBIN \\BIN \\PEEKBIN IMIN IDIFFERENCE) READVA - (VAG2 \\VAG2 READOCT) SHRINKW (WINDOWOP SPREADAPPLY* \\INSUREWINDOW FFETCHFIELD) EDITDEFAULT1 ( -LISPXWATCH) PUPTRACE (MAKE-NETWORK-TRACE-WINDOW) COMP.ASET (FASSOC COMP.LOOKUPVAR LENGTH MKLIST -COMP.EXPR CONS COMP.VAL SELECTQ) BURYW (WINDOWOP SPREADAPPLY* \\INSUREWINDOW FFETCHFIELD) -GRAPHOBJ.GETFN (SKIPSEPRCODES READGRAPH GRAPHEROBJ GRAPHOBJ.GETALIGN HREAD CREATEPOSITION READ) -NCREATE2 (\\GETDTD \\ADDBASE ITIMES CREATECELL NTYPX FFETCHFIELD MAPC \\ADDREF OPCODES) -CL:PATHNAME-DEVICE (%PATHNAME-DEVICE PATHNAME) SCREENBITMAP (FFETCHFIELD \\ILLEGAL.ARG) SHIFTDOWNP ( -SELECTQ FFETCHFIELD \\ILLEGAL.ARG) \\AB.NEXT (LENGTH NTYPX \\HILOC \\LOLOC IGEQ \\VAG2 \\GETBASE -LOADBYTE LOGAND LSH IMINUS MASK.1\'S SUB1 LIST UNFOLD LLSH IDIFFERENCE \\ADDBASE) -\\COURIER.UNKNOWN.TYPE (ERROR CONS) MODIFY.KEYACTIONS (MAPCAR CONS KEYACTION MAPC EVAL) -DO?CMD.ERRORHANDLER (MKSTRING RETFROM) \\BITMAPSIZE.PRESS (SELECTQ UNFOLD LLSH BITMAPWIDTH -BITMAPHEIGHT CONS \\ILLEGAL.ARG) COMP.AREF (FASSOC COMP.LOOKUPVAR LENGTH MKLIST COMP.EXPR CONS -COMP.VAL SELECTQ) INFILECOMSMACRO (PROPNAMES EQMEMB) %EXTEND-ARRAY (FFETCHFIELD %TOTAL-SIZE -FREPLACEFIELD) METASHIFT (KEYACTION ARG ASSOC) EDITRAN (FASSOC SOME FMEMB FIXSPELL BLKAPPLY LDIFF -MAPCAR SELECTQ EVAL) IFCDECLARE (LIST) \\PAPERSIZE.IP (SELECTQ CL:ASSOC ERROR LIST TIMES) PRINTPUPDATA - (PRINTPACKETDATA LOCF \\ADDBASE IDIFFERENCE FFETCHFIELD) MSPARSE (MSEAT DREVERSE LIST SORT MAPCAR -CONS MSMATCHRATING PRIN1 SELECTQ MSJOINSET FRPLACD SHOULDNT MSRESPELL MSSPLST) \\SPP.CLEANUP (SELECTQ -WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FFETCHFIELD DREMOVE LIST APPLY* -FREPLACEFIELD) PFI.INDEX.BREAK (DSPYPOSITION + - FONTPROP IQUOTIENT DSPLINEFEED DSPLEFTMARGIN -DSPRIGHTMARGIN DSPSCALE TERPRI) CL::ARGUMENT-NAMES (CL:MAPCAN CL:FUNCTION) EDITNUMBERP (IDIFFERENCE -CONSTANT CHCON1) %COPY-TO-NEW-ARRAY (MIN %FAST-COPY-BASE %ARRAY-BASE + %ARRAY-OFFSET -%ARRAY-TYPE-NUMBER) DO.SHIFTED.SELECTION (LOGAND \\CARET.DOWN BUFTAILP COPY.SEGMENT TTRACKMOUSE LOGOR -CONS TTNEXTPOS BRACKET.CURRENT.WORD FRPLACD) \\SETUP.TYPENUM.TABLE (\\ALLOCBLOCK FOLDHI LRSH IPLUS -FIXP PACK* LOCAL PLUS \\GETDTD \\ADDBASE ITIMES) EDITCOM (LIST EDIT1F) HRULE.DISPLAYFN (IMAGEOBJPROP -REVERSE DSPSCALE DSPXPOSITION DSPYPOSITION ODDP FLENGTH IMAX FIXR FTIMES IMAGESTREAMTYPE IPLUS LRSH -PLUS) CL:NAMESTRING (PATHNAME %PATHNAME-HOST %PATHNAME-DEVICE %PATHNAME-DIRECTORY %PATHNAME-NAME -%PATHNAME-TYPE %PATHNAME-VERSION CONCATLIST NCONC) EDLOC (EDITCOMS) EDRPT (RESETVARS .RESETLST. LIST -CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION ADD1) EDITCOLUMN (SELCHARQ) SEDIT:RESET (ERROR) - CALLS (GETRELATION SUBSET GETPROP CONS LIST GETD GETP FNCHECK CALLSCCODE FRPLACA PACK* NCONC -RESETVARS .RESETLST. CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION APPLY* ALLCALLS UNION CONSTANT -MSVBNOTICED ASSOC COLLECTFNDATA) TTYIN.PRINTARGS (TTYIN.READ?=ARGS MEMB CONS CL:SET-DIFFERENCE -TTPRIN1COMMENT SELECTQ ARGTYPE CONCAT) EDUP (MEMB CONS) DIRECTORY (APPEND LIST FIXP CONS MKSTRING -NCHARS FREEVARS IDIFFERENCE IDATE TIMES DEFERREDCONSTANT \\ILLEGAL.ARG FASSOC NCONC MAPCAR CAR -DIRECTORY.PARSE RESETSAVE SETTERMTABLE OUTPUT GETSTREAM OPENSTREAM REVERSE PLUS TAB CL:VALUES) -DIRECTORYNAMEP (PACKFILENAME.STRING \\GETDEVICEFROMNAME SPREADAPPLY* FFETCHFIELD) -%ALTER-AS-DISPLACED-ARRAY (FFETCHFIELD %TOTAL-SIZE + FREPLACEFIELD) EDIT* (NLEFT MINUS NTH CONS) -\\TEDIT.APPLY.PARASTYLES (ASSOC FFETCHFIELD SASSOC APPLY* \\TEDIT.PARSE.PARALOOKS.LIST APPEND CONS) -PRINTVA (HILOC \\HILOC LOLOC \\LOLOC PRIN1) EDITDEFAULT (FASSOC EDITRAN EDITQF EDITCOM LIST EDITH -EDITUSERFN U-CASE READLINE CONS NTHCHAR RPLSTRING MKATOM APPEND NTHCHARCODE MKSTRING FIXSPELL SUB1) -HOSTNAMEP (U-CASE MKATOM CHCON1 SUBATOM SUB1 STRPOS SPREADAPPLY* FFETCHFIELD) TB.NTH.ITEM (FFETCHFIELD - PLUS) EDITTO (IPLUS IMINUS) FB.GET.NEW.FILE.SPEC (FB.PROMPTFORINPUT CONCAT SELECTQ SHOULDNT -PACKFILENAME.STRING FFETCHFIELD DIRECTORYNAME LISTGET UNPACKFILENAME.STRING \\ADD.CONNECTED.DIR NCHARS - RPLACD FB.CANONICAL.DIRECTORY) CH.LOOKUP.OBJECT (PARSE.NSNAME CH.FINDSERVER COURIER.EXPEDITED.CALL -CH.GETAUTHENTICATOR) EDITCOMA (EDITMAC EDITCOMS SELECTQ CONS LAST LIST RETFROM RETEVAL PUTPROP -SHOULDNT NLSETQ EDITL0 STKPOS CL:THROW LISPX LISPXREAD EDITQF ERROR! BPNT0 TERPRI FLAST EDITH -EDIT!UNDO FMEMB EDITSMASH PRIN1 EDITBF EDUP EDIT\: EDIT* EDITDEFAULT) \\USERFNISDON\'T (FMEMB) -CL:FILL-POINTER (FFETCHFIELD CL:ERROR) EDITCOML (EDITMAC EDITCOMS SUBPAIR SUBST SELECTQ EDITCOM1 LIST -EDLOC SET EDIT4F CONS MAPCAR LISPX/ EDITNCONC COPY EDITAPPEND BPNT MAPC EDITQF EDITBF EDITNTH NLSETQ -ERROR! EDIT.RI EDIT.RO EDIT.LI EDIT.LO EDIT.BI EDIT.BO EDIT* IMINUS EDOR EDITMBD EDITXTR EDITTO EDIT\: - EDITMV EDRPT EDLOCL EDITFPAT EDITBELOW EDITSW EDITCOM RESETLST APPLY EDITDEFAULT) MSERASE (MAPC -MSSTOREDATA) EDITCOM1 (CONS LIST EVAL LISPX/ /RPLNODE APPLY LISTGET1) %ARRAY-CONTENT-INITIALIZE ( -CL:ARRAY-RANK %ARRAY-ELEMENT-INITIALIZE CL:ARRAY-DIMENSIONS %FILL-ARRAY-FROM-SEQUENCE %FLATTEN-ARRAY -CL:ERROR) CL:ADJUSTABLE-ARRAY-P (FFETCHFIELD CL:ERROR) SETUP.OFFICE.KEYBOARD (SELECTQ MACHINETYPE -MODIFY.KEYACTIONS) \\SCALEDBITBLT.PRESS (\\DSPXPOSITION.PRESS \\DSPYPOSITION.PRESS INTERSECTREGIONS -CREATEREGION) EDITSAVE (HISTORYSAVE) \\BINS (FDEVOP SPREADAPPLY* \\DTEST FFETCHFIELD) TEDIT.SUBLOOKS ( -\\TEDIT.PARSE.CHARLOOKS.LIST TEXTOBJ FFETCHFIELD \\CHTOPC MAPLIST ZEROP \\TEDIT.ORIGINAL.WINDOW.TITLE -\\TEDIT.UNIQUIFY.CHARLOOKS + PLUS) XCL:PACKAGE-PREFIX (CL::%PACKAGE-NAMESYMBOL) SEDIT::SUBNODE-CHANGED-ROOT - (FFETCHFIELD) EXTENDABLE-ARRAY-P (FFETCHFIELD CL:ERROR) \\TEDIT.NEXT.LINE.BOTTOM (FFETCHFIELD -IDIFFERENCE IPLUS) UNDOEDITCOM1 (MAPC UNDOEDITCOM1 EDITCOM1 LISPXWATCH) SUBATOM (FFETCHFIELD -\\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT STRINGP MKSTRING %ARRAY-BASE %ARRAY-TYPE-NUMBER -%ARRAY-OFFSET IPLUS \\MKATOM ADD1 IDIFFERENCE LISPERROR) \\BACKBIN (\\PEEKBIN) \\TERMINATESPP ( -WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FFETCHFIELD LIST \\FILLINSPP LOGOR -SETUPTIMER) CL::DEFINE-CONSTRUCTORS (CL::PS-CONSTRUCTORS CL::PS-ALL-SLOTS CL::PS-NAME CL:EVERY -CL:FUNCTION CL::PS-EXPORT CL:MAPCAR CL::BUILD-CONSTRUCTOR-ARGLIST CL::BUILD-CONSTRUCTOR-SLOT-SETFS) -EDITSMASH1 (CONS LIST GETHASH) DO.DELETE.LINES (+ - DSPYPOSITION TIMES) DOUSERFNS2 (APPLY* MAPC) -ICONTITLE (WINDOWPROP ERROR FRPLACA \\ICONW.SHOW.TITLE) BIN (\\BIN) EDITNCONC (ERROR! LAST EDITSMASH1) - MAKEMACFORMAT (\\MAKERECODEMAP \\INSTALL.EXTERNALFORMAT FUNCTION FREPLACEFIELDVAL NCREATE) -UNDOEDITCOM (FLAST CONS) INSPECT/AS/FUNCTION (SELECT.FNS.EDITOR FFETCHFIELD INSPECTCODE -\\GET-COMPILED-CODE-BASE ADDSTACKBASE \\VAG2 MAKE-COMPILED-CLOSURE WINDOWPROP LIST PROCESS.APPLY -CL:APPLY) %ALTER-AS-DISPLACED-TO-BASE-ARRAY (%TOTAL-SIZE %CML-TYPE-TO-TYPENUMBER FREPLACEFIELD) -PRINTADDRS (|printout| HILOC \\HILOC LOLOC \\LOLOC PRIN1 \\ADDBASE SUB1 PLUS \\VAG2 FLOOR LOGAND -CONSTANT LOGXOR IGREATERP \\GETBASE) CL:ARRAY-DIMENSION (FFETCHFIELD CL:ERROR LENGTH CL:NTH) -\\APPLYINSPECTMACRO (INSPECTW.CREATE EVAL) FB.COUNT.FILE.CHANGE (SELECTQ SHOULDNT FFETCHFIELD -FREPLACEFIELD PLUS ITIMES) \\TEDIT.CHANGE.LOOKS (TEXTOBJ FFETCHFIELD LISTGET FMEMB CONS NLSETQ \\DTEST - CONCAT \\TEDIT.ORIGINAL.WINDOW.TITLE IMIN ADD1 IPLUS \\CHTOPC \\SPLITPIECE - SUB1 -\\TEDIT.UNIQUIFY.CHARLOOKS NCONC1 NCREATE \\TEDIT.FONTCOPY FONTPROP IMINUS \\TEDIT.CARETLOOKS.VERIFY -LIST) GRAPHOBJ.BUTTONEVENTINFN (IMAGEOBJPROP GRAPHBUTTONEVENTFN FREPLACEFIELDVAL NCREATE CONS -SIZE/GRAPH/WINDOW LIST EDITGRAPH1 COPYGRAPH) \\CREATE.TEDIT.MOVESELECTION (FREPLACEFIELDVAL NCREATE -LIST) \\LINEBLT (\\ADDBASE ITIMES \\HILOC \\LOLOC MOD IMOD FREPLACEFIELD ADD1 IDIFFERENCE LLSH) -\\TEDIT.CARET (\\CARET.CREATE) \\BUFFERED.COPYBYTES (FFETCHFIELD IDIFFERENCE IPLUS SPREADAPPLY*) -MSSEEKPHRASE (CONS MSNEXTWORD MSSEEKPHRASE LIST MSTRYPARSE FRPLACA MSSEEKTYPE FRPLACD) EDIT4F1 (CONS -EDIT4E EDIT4F2 SUB1) TTYINBUFFERBACKPTR (NLEFT FFETCHFIELD FREPLACEFIELD) \\TEDIT.REOPEN.STREAM ( -OPENSTREAM TEXTOBJ FFETCHFIELD \\GETBASEPTR \\FIRSTNODE) \\BLTSHADE.PRESS (CREATEREGION -INTERSECTREGIONS \\BLTSHADE.GENERICPRINTER) RANDACCESSP (\\GETSTREAM FFETCHFIELD) EDITAPPEND (CONS -EDITAPPEND) CURSOR.INIT (FFETCHFIELD UNFOLD LLSH FREPLACEFIELDVAL NCREATE) EDIT2F (COPY APPEND NTH -SUB1 IMINUS CONS EDITSMASH1 NCONC) IFCEXPRTYPE (INFILECOMTAIL) ARRAY-NEEDS-INDIRECTION-P (FFETCHFIELD -CL:ERROR) \\CHANGE-VISIBLE-REGION.IP (FFETCHFIELD IPLUS - ADD1 + <= MIN FREPLACEFIELD) PRINTPUP ( -FFETCHFIELD LOCF \\ADDBASE SELECTQ FASSOC RESETFORM OUTPUT APPLY* IDIFFERENCE PRIN1 TERPRI) -CL:ADJUST-ARRAY (CL:ERROR LIST CL:ARRAY-ELEMENT-TYPE %TOTAL-SIZE LENGTH CL:ARRAY-RANK + -CL:ARRAY-TOTAL-SIZE MIN CL:FILL-POINTER CL:ARRAY-DIMENSIONS CL:MAKE-ARRAY %FAT-STRING-ARRAY-P -%FLATTEN-ARRAY) \\DSPXPOSITION.PRESS (FFETCHFIELD) COPYCHARS (\\GETSTREAM FFETCHFIELD LISTGET -COPYBYTES \\GETEOFPTR FIX ILEQ \\ILLEGAL.ARG \\GETFILEPTR SPREADAPPLY* IMIN IPLUS \\INCHAR \\CHECKEOLC - SELCHARQ SELECTC UNINTERRUPTABLY \\DTEST \\XCCSIN \\BIN IDIFFERENCE \\NSIN.24BITENCODING.ERROR UNFOLD - LLSH ACCESS-CHARSET LOGOR CL:FUNCALL \\PEEKBIN \\BACKXCCSCHAR PLUS SUB1 \\NSIN IGEQ \\BOUT) -\\INIT.KEYBOARD.STREAM (FUNCTION FREPLACEFIELDVAL NCREATE) FILEPATCHBLOCK (BOUT16 BOUTZEROS UNFOLD -LLSH IDIFFERENCE) XCL:COMPILE-DEFINER (COMPILER::MAKE-ENV GETDEF) \\BACKPEEKBIN (UNINTERRUPTABLY \\BIN -) \\GETEOFPTR (FDEVOP SPREADAPPLY* FFETCHFIELD) IFCPROPSCAN (GETPROPLIST INFILECOMSPROP LIST) -PRINTPUPROUTE (PRIN1 FFETCHFIELD LOCF \\ADDBASE PORTSTRING PRIN2 LRSH IQUOTIENT \\CENTICLOCK -IREMAINDER) EDITSAVE1 (FMEMB LAST) TEDIT.LOOKS (TEXTOBJ TEDIT.SETSEL FFETCHFIELD \\TEDIT.CHANGE.LOOKS -CONS) GRAPHOBJ.COPYFN (IMAGEOBJPROP GRAPHEROBJ COPYGRAPH CONS) PUTCURSORPROP (FFETCHFIELD LISTGET LIST -) \\CREATE.TEDIT.DELETESELECTION (FREPLACEFIELDVAL NCREATE LIST) EDIT4F2 (EDIT4F3) SEDIT::SHIFT-LINEAR-FORM - (IPLUS FFETCHFIELD) \\BOUTS (FDEVOP SPREADAPPLY* \\DTEST FFETCHFIELD) MSSETREP (MSEAT CONS MSQUOTED -LIST MSCANT EDITFPAT KWOTE MSWORD? MSNEXTWORD) BRHC/LAYOUT (HALF LRSH IPLUS FRPLACA LIST -BRHC/LAYOUT/DAUGHTERS BRHC/LAYOUT/TERMINAL CONS IDIFFERENCE) EDIT1F (ERROR! NTH CONS NLEFT IMINUS) -\\DECODE.EXTENT.USE (SELECTQ) BIT-ARRAY-P (FFETCHFIELD) CNDIR (PATHNAME DIRECTORYNAME -\\CONVERT-PATHNAME ERROR COPY-PATHNAME %PATHNAME-HOST CL:PATHNAME-HOST %PATHNAME-DEVICE -CL:PATHNAME-DEVICE %PATHNAME-DIRECTORY CL:PATHNAME-DIRECTORY) BPNT (EDITNTH ADD1 SUB1 BPNT0) SEDIT:SEDIT - (LISTGET SEDIT::GET-CONTEXT FFETCHFIELD WINDOWPROP SEDIT:SEDIT) RAIDROOTFRAME (FFETCHFIELD) -EQUAL-DIMENSIONS-P (FFETCHFIELD LENGTH EQUAL) BOUT (\\BOUT) EDIT.RI (EDITNTH CONS EDITSMASH1 EDITNCONC -) XCL:COMPILE-FORM (COMPILER:MAKE-CONTEXT COMPILER::MAKE-ENV CL:MAKE-HASH-TABLE CL:VALUES-LIST) -COPYFILES (\\ADD.CONNECTED.DIR FUNCTION COPIEDTOSPEC OPENSTREAM COPIEDFROMSPEC SELECTQ -\\GETDEVICEFROMNAME FFETCHFIELD TERPRI APPEND LIST CLOSEF) \\CURSORMASKPROPNAME (SELECTQ SHOULDNT) -IDLE.SHOW.OPTION (LISTGET PRIN1 SELECTQ L-CASE CONCAT SUBPAIR MKSTRING |printout| TERPRI) EDITBF1 ( -TCONC SUB1) HASH-TABLE-FOR-DOC-TYPE (GETHASH GETFILEPKGTYPE CL:MAKE-HASH-TABLE) DOUSERFNS (APPLY*) -DO.MOUSE (DO.SHIFTED.SELECTION LOGAND TTRACKMOUSE \\CARET.DOWN BRACKET.CURRENT.WORD SEGMENT.BIT.LENGTH -) EDITNTH (MEMB EDITELT LIST TAILP ERROR! NLEFT IMINUS NTH) \\MACPEEKCCODEFN (\\XCCSPEEK \\PEEKBIN -\\BIN IDIFFERENCE \\NSIN.24BITENCODING.ERROR UNFOLD LLSH ACCESS-CHARSET LOGOR CL:VALUES \\RECODECCODE) - EDITSMASH (CONS MEMB) CLOSEF (\\GETSTREAM STREAMPROP APPLY*) OPENSTREAM (SELECTQ \\ILLEGAL.ARG APPEND - \\GETSTREAM \\CONVERT-PATHNAME \\OPENFILE \\SEARCHOPENFILES \\GETACCESS) COPYBYTES (\\GETSTREAM -\\ILLEGAL.ARG IDIFFERENCE \\GETEOFPTR GETFILEINFO FFETCHFIELD \\GETFILEPTR SPREADAPPLY* \\BOUT \\BIN) -EDIT.LO (EDITNTH MAPC EDITSMASH1) \\FORMATLINE (FFETCHFIELD SUB1 FREPLACEFIELDVAL NCREATE IMAX -WINDOWPROP FUNCTION PLUS \\RPLPTR \\ADDBASE2 \\ADDBASE \\TEDIT.APPLY.STYLES \\EDITELT GETBASEPTR -\\GETBASEPTR CONS \\TEDIT.APPLY.PARASTYLES OPENIMAGESTREAM FREPLACEFIELD DSPSCALE \\TEDIT.HCPYFMTSPEC -FIXR FTIMES FONTCOPY IPLUS IDIFFERENCE IEQP \\BIN \\FGETCHARWIDTH \\GETBASE \\GETCHARSETINFO UNFOLD -LLSH \\CHARSET LRSH \\CREATECHARSET \\CHAR8CODE LOGAND APPLY* IMAGEOBJPROP ADD1 \\TEDIT.FORMATTABS -\\FGETWIDTH IMINUS \\CHTOPC FONTPROP IMIN) \\COPYOPENFILE (GETFILEINFO CONS LIST ASSOC -\\INFER.FILE.TYPE OPENSTREAM CLOSEF) PROGN (\\EVAL) MSVERBTYPE (MSVERBTYPE GETWORDTYPE FASSOC GETHASH -FRPLACD) EDIT.BI (EDITNTH CONS) BITSPERPIXEL (FFETCHFIELD BITSPERPIXEL SELECTQ ARRAYSIZE LISPERROR) -\\FIRSTNODE (FFETCHFIELD \\GETBASEPTR \\FIRSTNODE) BUILDTESTRELQ (CONS MAPCAR MSVBTABLES LIST KWOTE) -XCL:UNADVISE-FUNCTION (MAPCONC XCL:UNADVISE-FUNCTION GET GETD CL:DELETE LIST SI::GET-ADVICE-MIDDLE-MAN -) EDITFPAT1 (CONS NCHARS NTHCHARCODE SUBSTRING SUB1 STRPOS ADD1 DREVERSE EDITFPAT1) XCL:READVISE-FUNCTION - (MAPCONC XCL:READVISE-FUNCTION SI::FINISH-ADVISING) FB.RENAMECOMMAND (FB.COPY/RENAME.COMMAND CONS -FUNCTION) \\SETFILEPTR (FDEVOP SPREADAPPLY* FFETCHFIELD) IDLE.SET.OPTION (LISTGET SELECTQ MENU -FREPLACEFIELDVAL NCREATE CONS RNUMBER MKATOM PROMPTFORWORD UNION LIST PRIN1 GV.READENTRY TERPRI -RESETFORM TTYDISPLAYSTREAM ASKUSER REMOVE IDLE.SHOW.OPTION) XCL:REINSTALL-ADVICE (MAPC) -\\INTERACTIVE.CLOSEW (FFETCHFIELD PROMPTPRINT) CL::DEFINE-BOA-CONSTRUCTOR ( -CL::BOA-ARG-LIST-WITH-INITIAL-VALUES CL::PS-NAME CL::BOA-SLOT-SETFS CL::ARGUMENT-NAMES) CHCON1 ( -FFETCHFIELD \\GETBASECHAR %ARRAY-TYPE-NUMBER \\GETBASEFAT \\GETBASE %ARRAY-BASE %ARRAY-OFFSET -\\GETBASETHIN \\GETBASEBYTE \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT NTHCHARCODE) XCL:ADVISE-FUNCTION - (MAPCONC XCL:ADVISE-FUNCTION SI::FINISH-ADVISING CL:MEMBER) SEDIT::SETUP-WINDOW-CONTEXT-DEPENDENCIES -(FFETCHFIELD IDIFFERENCE IPLUS CONS WINDOWPROP LIST) \\DSPUNTRANSFORMREGION (CREATEREGION -\\DSPUNTRANSFORMX \\DSPUNTRANSFORMY) UNPACKFILENAME (UNPACKFILENAME.STRING) UNPACKFILENAME.STRING ( -NCHARS LITATOM STRINGP NUMBERP UNPACKPATHNAME.STRING FFETCHFIELD LIST NTHCHARCODE SUB1 \\UPF.NEXTPOS -CONS SUBATOM SUBSTRING DREVERSE IPLUS GETHOSTINFO LASTCHPOS ADD1 SELCHARQ CANONICAL.DIRECTORY -%ARRAY-TYPE-NUMBER ALLOCSTRING %ARRAY-BASE PLUS \\PUTBASEBYTE \\PUTBASE MKATOM ILEQ \\UPF.TEMPFILEP) -EDIT.BO (EDITNTH EDITNCONC EDITSMASH1) CURSORCREATE (BITMAPWIDTH BITMAPHEIGHT IMAX IMIN SUB1 FIXP -FREPLACEFIELDVAL NCREATE) RAIDSTACKCMD (SELECTQ ASKUSER FFETCHFIELD READOCT \\GETBASE ADDSTACKBASE -\\VAG2 TERPRI FUNCTION) \\CURSORDOWN (UNINTERRUPTABLY \\SOFTCURSORDOWN \\HARDCURSORDOWN) EDIT4F3 ( -CONSTANT CHARACTER CONS EDIT4F3 CONCATLIST PACK NCONC LIST LDIFF NCONC1) CURSORPROP (PUTCURSORPROP ARG - GETCURSORPROP \\ILLEGAL.ARG) CL:BIT-NOT (CL:ERROR CL:MAKE-ARRAY CL:ARRAY-DIMENSIONS %DO-LOGICAL-OP) -COPYFILE (PACKFILENAME UNPACKFILENAME RESETLST RESETSAVE OPENSTREAM \\COPYOPENFILE) \\CURSOR-VALID-P ( -FFETCHFIELD BITMAPWIDTH BITMAPHEIGHT <) \\TEDIT.FLUSH.UNUSED.LOOKS (FFETCHFIELD FREPLACEFIELD LIST) -%DO-LOGICAL-OP (%ARRAY-BASE %ARRAY-OFFSET CL:ARRAY-TOTAL-SIZE DEFERREDCONSTANT FREPLACEFIELDVAL -NCREATE UNINTERRUPTABLY \\HILOC \\LOLOC) INSPECT/ARRAY (NUMBERP ARRAYORIG INSPECTW.CREATE SUB1 IMIN -IPLUS ARRAYSIZE LIST PLUS FUNCTION PRIN1) \\SEARCH.OUTPUTQ (FFETCHFIELD LOCF \\ADDBASE \\UNQUEUE) -EDIT.RO (EDITNTH LAST EDITSMASH1) \\DSPYPOSITION.PRESS (FFETCHFIELD) EDITBELOW (EVAL REVERSE FMEMB -DREVERSE SUB1) CL::%MAKE-FLOAT-ACCESSOR (CL:FUNCTION) XCL:REBREAK-FUNCTION (MAPCONC XCL:REBREAK-FUNCTION - CL:GETHASH CL:APPLY) STKPOS (\\MYALINK OPCODES \\STACKARGPTR IDIFFERENCE \\STKNAME SUB1 \\MAKESTACKP -ADDSTACKBASE \\VAG2 FFETCHFIELD FLOOR LOGAND CONSTANT LOGXOR) TTYINBUFFEREOFP (FFETCHFIELD) -XCL:TRACE-FUNCTION (MAPCONC XCL:TRACE-FUNCTION CL:MAKE-SYMBOL CL:FORMAT GETD CL:COMPILE -SI::CREATE-TRACED-DEFINITION GET CL:DELETE LIST SI::CONSTRUCT-MIDDLE-MAN) GETCURSORPROP (LISTGET -FFETCHFIELD) ADJUSTCURSORPOSITION (\\CURSORPOSITION IPLUS \\XMOUSECOORD SIGNED SUB1 LLSH IDIFFERENCE -\\YMOUSECOORD) \\CURSORUP (UNINTERRUPTABLY FFETCHFIELD ADJUSTCURSORPOSITION IDIFFERENCE SUB1) IFCPROPS - (SELECTQ INFILEPAIRS INFILECOMTAIL MAPC INFILECOMSMACRO) TRANSLATE.IP (APPENDOP.IP) -XCL:CREATE-TRACE-WINDOW (CREATEW) \\CURSORPOSITION (IDIFFERENCE SUB1 UNSIGNED LOGAND LLSH FFETCHFIELD -\\PUTBASE) GRAPHOBJ.COPYBUTTONEVENTFN (IMAGEOBJPROP APPLY* COPYINSERT GRAPHOBJ.COPYFN) -\\CREATE.TEDIT.SHIFTEDSELECTION (FREPLACEFIELDVAL NCREATE LIST) CL:CHAR (CL:AREF) \\INFER.FILE.TYPE ( -FFETCHFIELD FUNCTION \\BIN) \\SETUPGETCH (FFETCHFIELD IMAX \\CHTOPC - IDIFFERENCE IMAGEOBJPROP ADD1 -\\TEDIT.APPLY.PARASTYLES \\TEDIT.APPLY.STYLES) EDIT.LI (EDITNTH CONS EDITSMASH1) COPY-ARRAY (CL:ERROR -CL:MAKE-ARRAY CL:ARRAY-DIMENSIONS CL:ARRAY-ELEMENT-TYPE %FAT-STRING-ARRAY-P %MAKE-ARRAY-WRITEABLE -%ARRAY-TYPE-NUMBER %ARRAY-BASE %ARRAY-OFFSET FFETCHFIELD) \\COMPUTE.HUNK.TYPEDECLS (ALLOCAL LIST PACK* - UNFOLD LLSH SUB1 PLUS) EDITGETD (EDITGETD-LAMBDA GET COPY CL:FUNCALL CL:MACROEXPAND-1 EXPANDMACRO -GETHASH GETDEF MAPCAR KWOTE CONS) \\DELETEPIECE (FFETCHFIELD) RAIDSHOWFRAME (RAIDROOTFRAME SUB1 -IDIFFERENCE FLOOR LOGAND FFETCHFIELD ADDSTACKBASE \\VAG2 CONSTANT LOGXOR |printout| TERPRI FUNCTION) -INFILECOMSVAL (CONS CL:PUSHNEW RETFROM) FB.MAKE.SUBDIRECTORY.ITEM (SUBSTRING FFETCHFIELD SUB1 NCHARS -FREPLACEFIELDVAL NCREATE) CURSORP (TYPENAMEP) READ-UNICODE-MAPPING (READ-UNICODE-MAPPING-FILENAMES -MAKEBITTABLE NCONC) MARK/GRAPH/NODE (FRPLACA) TEDIT.FORMATBOX (FFETCHFIELD TEDIT.FORMATTEXTBOX -TEDIT.FORMATFOLIO TEDIT.FORMATHEADING IPLUS CONS FREPLACEFIELDVAL NCREATE IMAX ADD1 FRPLACA) -CURSORPOSITION (\\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD NUMBERP CONS -\\DSPUNTRANSFORMX \\XMOUSECOORD IPLUS SIGNED SUB1 LLSH IDIFFERENCE FRPLACA \\DSPUNTRANSFORMY -\\YMOUSECOORD FRPLACD \\DSPTRANSFORMX \\DSPTRANSFORMY) NS.MAKE.SIMPLE.CREDENTIALS (CONS COURIER.CREATE - LIST COURIER.WRITE.REP PARSE.NSNAME HASH.PASSWORD) \\OKTOCLOSEW (DOUSERFNS FFETCHFIELD) -%FAST-COPY-BASE (DEFERREDCONSTANT NCREATE \\HILOC \\LOLOC CL:* \\PILOTBITBLT) PAINTW.READCOMMAND (MENU - FREPLACEFIELDVAL NCREATE CONS) CURSORSCREEN (FFETCHFIELD) \\MACINCCODEFN (CL:VALUES \\RECODECCODE -\\XCCSIN \\BIN IDIFFERENCE \\NSIN.24BITENCODING.ERROR UNFOLD LLSH ACCESS-CHARSET LOGOR IMINUS) -BUILDGETRELQ (MSVBTABLES LIST KWOTE) FORCEOUTPUT (\\GETSTREAM FDEVOP SPREADAPPLY* FFETCHFIELD) DELFILE - (\\DELETEFILE) \\DSPUNTRANSFORMY (IDIFFERENCE FFETCHFIELD) \\FLUSH.OPEN.STREAMS ( -\\DEVICE-OPEN-STREAMS SPREADAPPLY* FFETCHFIELD LOGAND CONSTANT LOGOR) \\CH.GUESS.NEW.PROPERTIES ( -PARSE.NSNAME FREPLACEFIELDVAL NCREATE CH.LIST.OBJECTS CONS LIST PLUS) INSPECTCODE (\\TEDIT.INSPECTCODE - DECODE.WINDOW.ARG CONCAT FUNCTION MAKE-INSPECTOR-PROFILE \\INSPECT/CODE/RESHAPEFN) \\DSPUNTRANSFORMX -(IDIFFERENCE FFETCHFIELD) \\MAYBEPEEKPUP (FFETCHFIELD LOCF \\ADDBASE \\RELEASE.ETHERPACKET) -FILEBROWSER (DSPFONT FONTPROP NUMBERP CL:FIND-SYMBOL STRING FB.INFO.ITEM.NAMED MISSPELLED? -\\ILLEGAL.ARG LIST FUNCTION FREPLACEFIELDVAL NCREATE CONS BITMAPWIDTH CHECK/MENU/IMAGE HEIGHTIFWINDOW -TIMES CL:FORMAT GETREGION + THIS.PROCESS CREATEW - CHARWIDTH CREATE.MONITORLOCK FB.MAKEHEADINGWINDOW -MENUWINDOW FB.MAKERIGIDWINDOW GETPROMPTWINDOW FONTCOPY FFETCHFIELD WINDOWPROP UNION TB.MAKE.BROWSER -DIRECTORY.FILL.PATTERN FB.STARTUP) \\SPP.SEND.ENDREPLY (\\SENDSPP \\FILLINSPP LOGOR) ACCESS-CHARSET ( -FDEVOP SPREADAPPLY* FFETCHFIELD) TEDIT.DISPLAYTEXT (\\TEDIT.APPLY.STYLES FFETCHFIELD IPLUS RESETSAVE -FREPLACEFIELD SUB1 %ARRAY-OFFSET %ARRAY-BASE %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE -\\GETBASETHIN \\GETBASEBYTE IMAX CHARWIDTH SELCHARQ RELMOVETO BITBLT \\DSPPRINTCHAR DSPXPOSITION) -CL::%MAKE-FIXP-ACCESSOR (CL:FUNCTION) SETTERMCHARS (INTCHECK /ECHOCONTROL) SEDIT::SETUP-WINDOW-AND-PROCESS - (THIS.PROCESS FFETCHFIELD FUNCTION KEYACTIONTABLE GETPROMPTWINDOW TTYDISPLAYSTREAM) DISPLACED-ARRAY-P - (FFETCHFIELD CL:ERROR) TTYINBUFFERPEEK (FFETCHFIELD \\EOF.ACTION FIRSTCHAR) MSFIXUPTYPES (MAPC -REVERSE SELECTQ MSSETSETTYPE FIXVERBSETTYPE) VRULE.GETFN2 (VRULE.CREATE READ) CLISPERROR (SELECTQ -RETDWIM2) GRAPHERIMAGEFNS (IMAGEFNSCREATE FUNCTION) \\CREATE.TEDIT.SELECTION (FREPLACEFIELDVAL NCREATE - LIST) /ECHOCONTROL (GETTERMTABLE LIST ECHOCONTROL) NS.AUTHENTICATE (NS.MAKE.SIMPLE.CREDENTIALS -\\INTERNAL/GETPASSWORD \\AUTHENTICATION.FIND.SERVER COURIER.CALL) |\\UFStoOtherCopyMess| (FFETCHFIELD -U-CASE FILENAMEFIELD PROMPTPRINT) TEDIT.PUT.PCTB (FFETCHFIELD TEXTPROP TEDIT.FORMATTEDFILEP -\\GETBASEPTR \\FIRSTNODE OPENSTREAM ADD1 GETFILEPTR \\TEDIT-OPEN-FONT-FILE PLUS FLENGTH -\\TEDIT.PUT.PARALOOKS.LIST \\TEDIT.PUT.CHARLOOKS.LIST LOGAND LRSH \\BOUT IMAGEOBJPROP APPLY* -IDIFFERENCE GETEOFPTR TEDIT.PUT.OBJECT OPENP \\TEDIT.REOPEN.STREAM IPLUS UNFOLD LLSH SUB1 -%ARRAY-OFFSET %ARRAY-BASE %ARRAY-TYPE-NUMBER \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE -\\CHARSET \\CHAR8CODE CONS EVAL \\TEDIT.UNIQUIFY.CHARLOOKS \\TEDIT.UNIQUIFY.PARALOOKS) -BRHC/INTERTREE/SPACE (IDIFFERENCE) FM.CHANGELABEL (ERROR \\FM.INSUREFM \\FM.COERCEITEMPTR -\\FM.ITEMPROP FFETCHFIELD FM.GETITEM LISTGET WINDOWPROP \\FM.WINDOWEXTENT \\FM.REDISPLAYMENU -\\FM.DISPLAYBITMAP BITBLT) %MAKE-GENERAL-ARRAY (%CML-TYPE-TO-TYPENUMBER %MAKE-ARRAY-STORAGE LENGTH -FREPLACEFIELDVAL NCREATE) RAIDCOMMAND (ALLOCAL ASKUSER GETTOPVAL READATOM GETPROPLIST READVA READOCT -ADDSTACKBASE \\VAG2 \\DEFCELL \\ATOMCELL \\ATOMVALINDEX NTYPX \\LOLOC SHOULDNT PRIN1 READ PLUS TERPRI -FUNCTION CONS ERROR! PEEKC FFETCHFIELD GETBASE \\GETBASE \\PUTBASE INSPECT VMAPPAGE IPLUS LLSH \\HILOC - LRSH NCREATE VGETTOPVAL GETSTREAM) INFILECOMSPROP (CONS LIST RETFROM) SETFILEPTR (\\GETSTREAM -SPREADAPPLY* FFETCHFIELD \\GETEOFPTR LISPERROR) \\BITBLT.PRESS (\\DSPXPOSITION.PRESS -\\DSPYPOSITION.PRESS INTERSECTREGIONS CREATEREGION) TB.INSERT.ITEM (\\DTEST FFETCHFIELD FIXP ADD1 CONS - FLAST TB.FIND.PREVIOUS.TAIL PLUS TB.UPDATE.DISPLAY) %MAKE-DISPLACED-ARRAY (FFETCHFIELD + LENGTH -%MAKE-GENERAL-ARRAY %MAKE-ONED-ARRAY) CL::%MAKE-SMALL-FIXP-ACCESSOR (CL:FUNCTION) -\\CURSORIMAGEPROPNAME (SELECTQ SHOULDNT) SAVEONSYSRECLST (PRIN1 FUNCTION RECLOOK LIST |printout| -TERPRI) SEDIT::SETUP-PROFILE (SEDIT::DEFAULT-PACKAGE FFETCHFIELD XCL:SAVE-PROFILE) %MAKE-TWOD-ARRAY ( -%CML-TYPE-TO-TYPENUMBER %MAKE-ARRAY-STORAGE FREPLACEFIELDVAL NCREATE) \\BACKFORMAT (FFETCHFIELD -IDIFFERENCE \\GETCHB \\BACKBIN PLUS IMAX ADD1 SUB1 \\FORMATLINE) MSPATHOPTIONS (CONS SELECTQ TERPRI -MSEAT MSCANT LIST) LASTMOUSEY (\\DSPUNTRANSFORMY \\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG \\GETSTREAM -FFETCHFIELD) HRULE.CREATE (IMAGEOBJCREATE NUMBERP CONCAT) MSVBTABLES (MKLIST SELECTQ MSUSERVBTABLES) -TTYINBUFFERREADP (FFETCHFIELD) PRESSFILEP (STREAMP FINDFILE GETFILEINFO RESETSAVE OPENSTREAM -SETFILEPTR IDIFFERENCE IEQP \\WIN IPLUS LLSH \\BIN) LASTMOUSEX (\\DSPUNTRANSFORMX \\GETDISPLAYDATA -\\DTEST \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) GETEOFPTR (\\GETSTREAM FDEVOP SPREADAPPLY* FFETCHFIELD -) INSPECT/HARRAYP (HARRAYKEYS INSPECTW.CREATE FUNCTION) CURSOREXIT (IDIFFERENCE FFETCHFIELD SUB1 -IQUOTIENT ITIMES) READ-ONLY-ARRAY-P (FFETCHFIELD CL:ERROR) \\SETEOFPTR (FDEVOP SPREADAPPLY* -FFETCHFIELD) CL:ARRAY-HAS-FILL-POINTER-P (FFETCHFIELD CL:ERROR) FB.COPYCOMMAND (FB.COPY/RENAME.COMMAND - CONS FUNCTION) FIRSTATOM (FIRSTATOM) \\FILETYPE.FROM.TYPE (ASSOC FIXP) TRANS.IP (APPENDOP.IP) -\\TEDIT.FONTCOPY (NLSETQ FONTCOPY FONTPROP CONCAT LISTGET) GETMOUSESTATE (\\XMOUSECOORD IPLUS SIGNED -SUB1 LLSH IDIFFERENCE \\YMOUSECOORD LOGXOR LOGAND FFETCHFIELD \\EVENTKEYS) \\MAIKO.DISPLAYLINE ( -FFETCHFIELD WINDOWPROP IMAX IDIFFERENCE DSPSCALE \\TEDIT.LINECACHE FIXR FQUOTIENT CONS DSPFONT -\\EDITELT GETBASEPTR \\GETBASEPTR \\ADDBASE2 \\ADDBASE FTIMES IPLUS PLUS FONTCOPY CHARWIDTH IREMAINDER - DSPYPOSITION IMAGEOBJPROP) CL:SBIT (CL:APPLY) MSBLOCK (MSSEEKTYPE CONS) PP* (GETSTREAM PRETTYPRINT -NLAMBDA.ARGS) CH.DELETE.MEMBER (CH.CANONICAL.NAME COURIER.CALL CH.FINDSERVER PARSE.NSNAME FIXP -CH.PROPERTY CH.GETAUTHENTICATOR) CL:SCHAR (CL:AREF) GETFILEPTR (\\GETSTREAM FDEVOP SPREADAPPLY* -FFETCHFIELD) \\GENERIC.BINS (FRPTQ \\PUTBASEBYTE \\BIN PLUS) |PopUpWindowAndGetAtom| (RESETLST -RESETSAVE TTY.PROCESS THIS.PROCESS DEFAULTFONT WIDTHIFWINDOW IPLUS STRINGWIDTH ITIMES CHARWIDTH -CREATEW CREATEREGION IMIN IDIFFERENCE HEIGHTIFWINDOW FONTPROP OPENW LIST FUNCTION PROMPTFORWORD PACK*) - CURSORHOTSPOT (CONS) DWIMLOADFNS? (EDITLOADFNS? LOADFNS LISPXPRINT LISTGET1) TB.MAP.ITEMS (\\DTEST -FFETCHFIELD MAPC CL:FUNCALL) IDLE.BOUNCING.BOX (RESETLST WINDOWPROP COPY LIST IDLE.BITMAP RAND -IDIFFERENCE BITMAPWIDTH BITMAPHEIGHT) BEEPON (FFETCHFIELD IQUOTIENT IMAX) BIN16 (LOGOR LLSH BIN) -\\MACOUTCHARFN (\\FILEOUTCHARFN \\RECODECCODE) \\SENDSPP (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION FFETCHFIELD ILESSP \\LOLOC IDIFFERENCE SEQ.ADD1 \\ADDBASE SUB1 LOCF SETA -IMOD) TEDITCHAT.CHARFN (FFETCHFIELD TEXTOBJ SELCHARQ MOVETO BOUT) CL::%MAKE-WORD-ACCESSOR (CL:FUNCTION -) RECORDECLARATIONS (FUNCTION RECLOOK1 LIST LISPXPRINT APPEND PRETTYVAR1 TERPRI) TB.UNDELETE.ITEM ( -\\DTEST FFETCHFIELD PLUS TB.PRINT.LINE) CL:SIMPLE-VECTOR-P (LOGAND FFETCHFIELD CL:ARRAY-ELEMENT-TYPE) -TTYINBUFFERBIN (FFETCHFIELD \\EOF.ACTION FIRSTCHAR) VRULE.CREATE (IMAGEOBJCREATE NUMBERP CONCAT) -/SETSYNTAX (GETTERMTABLE GETREADTABLE GETSYNTAX LIST SETSYNTAX) WITHOUT-INTERRUPTS (DISPLAYDOWN) -CL:SVREF (CL:AREF) \\SETCLOSEDFILELENGTH (\\OPENFILE) INSPECT/TYPELESS (NTYPX \\HILOC \\ADDBASE IMINUS - FFETCHFIELD \\ADDBASE2 IDIFFERENCE INSPECT/HUNK UNFOLD LLSH INSPECT/AS/BLOCKRECORD) DISPLAYDOWN ( -RESETFORM SETDISPLAYHEIGHT SMALLP EVAL) LAYOUTSEXPR1 (CONS APPEND MAPC LAYOUTSEXPR1) MAKECOM ( -SMARTARGLIST FMEMB FIXSPELL APPEND LIST CONS NCONC1 IPLUS) CL:SIMPLE-BIT-VECTOR-P (LOGAND FFETCHFIELD) - BCOMPL3 (GETFILEPTR FULLNAME REMOVE ROOTFILENAME POSITION TERPRI) BRH/LAYOUT/DAUGHTERS (IPLUS -BRH/LAYOUT GETNODEFROMID IDIFFERENCE) SMARTARGLIST (\\SIMPLIFY.CL.ARGLIST ARGLIST GET SMARTARGLIST -GETLIS GETD GETDEF CL:THIRD REMOVE-COMMENTS ARGTYPE GETMACROPROP SELECTQ LAST APPEND LIST FNCHECK) -PAINTW.READBRUSHTEXTURE (SELECTQ BITSPERPIXEL PAINTW.READBRUSHSHADE MENU COLORMENU) CL:ARRAY-IN-BOUNDS-P - (ARG CL:ARRAY-RANK CL:1- CL:ERROR) MSMSGPRINT (PRIN1 PRIN2) EDITGETD-LAMBDA (MKPROGN EDITGETD-LAMBDA -CONS LIST SELECTQ APPEND) \\GETINTERNALCLOCK (LOCF \\ADDBASE UNFOLD LLSH \\RCLK) CL:ERROR ( -MAKE-INTO-CONDITION RESETLST FIND-DEBUGGER-ENTRY-FRAME LIST DEBUGGER STKNAME) \\PEEKPUP (FFETCHFIELD -EMADDRESS OPCODES BESTPUPADDRESS LRSH \\LOCALPUPNETNUMBER LOGAND ERROR LIST OPENP OPENFILE) MSJOINSET -(PRIN1 MSJOINDETS FRPLACA MSJOIN CONS FRPLACD) TEDIT.SELECT (FFETCHFIELD TEDIT.SELECT.LINE.SCANNER -\\TEDIT.LINE.LIST FIXR FQUOTIENT IDIFFERENCE IMAX ADD1 IMIN) INFILECOMS (MAPC INFILECOM) BOUT16 (LRSH -LOGAND) SEDIT::SETUP-NEW-CONTEXT (CREATE.MONITORLOCK CONCAT FFETCHFIELD WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SEDIT::SETUP-WINDOW-CONTEXT-DEPENDENCIES) COND.TO.IF - (CONS MAPCONC APPEND) SEDIT::SET-SELECTION (CL:FUNCALL FFETCHFIELD) PUP.ECHOSERVER (RESETLST -OPENPUPSOCKET LIST FFETCHFIELD GETPUP LOCF \\ADDBASE) FTPPUTCODE (BOUT FTPPRINTCODE) -\\TEDIT.GET.SINGLE.PARALOOKS2 (FREPLACEFIELDVAL NCREATE CONS \\SMALLPIN SUB1 LLSH IDIFFERENCE \\BIN -SELECTC SHOULDNT LOGAND SELECTQ LIST PLUS ZEROP \\ARBIN \\ATMIN) EDITGETD-LET (MKPROGN SUBPAIR MAPCAR -CAR CADR) \\TEDIT.WORD.BOUND (FFETCHFIELD \\SYNCODE GETHASH \\GETBASEBYTE) COMPILER::*NULL-CONTEXT* ( -COMPILER:MAKE-CONTEXT) XCL:ROW-MAJOR-AREF (FFETCHFIELD CL:ERROR %ARRAY-READ +) SEDIT::OUTPUT-CR-OR-SPACE - (IPLUS FFETCHFIELD SEDIT::OUTPUT-CR SEDIT::OUTPUT-SPACE IDIFFERENCE) SWAPPEDCOND (SELECTQ COND.TO.IF -SWAPPEDCOND GETHASH ERROR! CONS NEGATE LIST SHOULDNT) MAKEFN (DEFINE LIST CONS LITATOM NCONC SOME -GENSYM ESUBST) \\TFBRAVO.APPLY.PARALOOKS (ADD1 IDIFFERENCE FFETCHFIELD IMIN) %ASET0 (CL:ARRAY-RANK -FFETCHFIELD %ASET0 %ARRAY-WRITE + CL:ERROR) FORMAT-EAT-WHITESPACE (CL:POSITION-IF-NOT FUNCTION CL:1- -CL:LENGTH) FB.UNDELETEALLCOMMAND (FFETCHFIELD FUNCTION FB.UPDATE.COUNTERS) |MakeMenuOfImageTypes| ( -LIST L-CASE KWOTE FREPLACEFIELDVAL NCREATE CONS) CH.SERVERS (COURIER.CALL GETCLEARINGHOUSE -FREPLACEFIELDVAL NCREATE CH.PROPERTY CH.GETAUTHENTICATOR) PFI.LOOKUP.NAME (ASSOC) FILL-ARRAY (CL:ERROR - FFETCHFIELD %ARRAY-TYPE-NUMBER) SWAPXIPADDRESSES (\\DTEST FFETCHFIELD LOCF \\ADDBASE) DELETEMENU ( -TYPENAMEP WFROMMENU WINDOWPROP DREMOVE FFETCHFIELD FUNCTION) LISPXFIX (LAST EDITL LIST) -TEDIT.SUBPARALOOKS (\\TEDIT.PARSE.PARALOOKS.LIST TEXTOBJ FFETCHFIELD \\CHTOPC MAPLIST ZEROP -\\TEDIT.ORIGINAL.WINDOW.TITLE \\TEDIT.UNIQUIFY.PARALOOKS + PLUS) SPY.DUMP.BUFFER (PLUS SPY.FIND.TREE -SPY.BUFFER.ENTRY SPY.NEXT.TREE FFETCHFIELD ADD1) \\LEAF.SETFILETYPE (ALLOCATE.PUP LOCF \\ADDBASE LLSH -FFETCHFIELD IDIFFERENCE FIXP SELECTQ IPLUS) \\IDLER (RESETSAVE ALTO.TO.LISP.DATE LISTGET LIST FUNCTION - FIND.PROCESS GCGAG SETTOPVAL EVAL GETTOPVAL USERNAME TTY.PROCESS THIS.PROCESS CHANGENAME TIMES -CREATEW CURSOR CURSORCREATE BITMAPCREATE CHANGEBACKGROUNDBORDER SETUPTIMER ADD.PROCESS CONS -\\IDLE.TIME TERPRI NLSETQ SAVEVM \\IDLE.EXIT? CONCAT DATE PRIN1 MAPC APPLY*) CL::%MAKE-BIT-ACCESSOR ( -CL:FUNCTION) CSUBST (ASSOC SELECTQ LIST RECORDBIND COPY1 MAKECREATE1 SHOULDNT RECORD.FIELD.VALUE0 -MAKEACCESS ACCESSDEF4 GETP RECONS CSUBSTLST CSUBST GETHASH RECLISPLOOKUP SUBPAIR MKPROGN) ASET (ARG) -UNIX-BACKFILEPTR (FFETCHFIELD ERROR UNIX-PEEKEDCHAR UNIX-LASTCHAR) %AREF0 (CL:ARRAY-RANK %ARRAY-READ -FFETCHFIELD + CL:ERROR) CHAT.TYPESCRIPT1 (GETPROMPTWINDOW CHAT.PROMPT.FOR.INPUT OPENSTREAM CLOSEF -PRIN1 |printout| FULLNAME FFETCHFIELD FREPLACEFIELD) XCL::WALK-TEMPLATE-HANDLE-REPEAT-1 (WALK-TEMPLATE - CL:ERROR XCL::WALK-TEMPLATE-HANDLE-REPEAT-1 XCL::RECONS) \\PROCESS.RESET.TIMERS (GETTOPVAL -FFETCHFIELD) \\COS.OLD (CONSTANT MINUS FREMAINDER FTIMES FDIFFERENCE FPLUS POLYEVAL \\FLOATBOX OPCODES -) CHAT.LOGIN (GETOSTYPE GETHOSTINFO WINDOWPROP FFETCHFIELD CHAT.LOGINFO \\INTERNAL/GETPASSWORD ASSOC -PRIN1 SELECTQ FORCEOUTPUT PRIN3 \\DECRYPT.PWD DISMISS) COMPILER::*EFFECT-CONTEXT* (COMPILER:MAKE-CONTEXT -) COPY-VECTOR (VECTOR-LENGTH - %ARRAY-TYPE-NUMBER %ARRAY-BASE + %ARRAY-OFFSET MIN) SEDIT::NEXT-NODE-TYPE - (FFETCHFIELD) \\BACKFILEPTR (FDEVOP SPREADAPPLY* FFETCHFIELD) \\NSFILING.GET.ATTRIBUTES (FILING.CALL -FFETCHFIELD) COURIER.BROADCAST.CALL (RESETLST \\GET.COURIERPROGRAM GETHASH ERROR -\\GET.COURIER.DEFINITION LIST OPENNSOCKET CREATE.PACKET.EXCHANGE.XIP \\BUILD.EXPEDITED.XIP CONS PRIN1 -\\COURIER.BROADCAST.ON.NET FUNCTION FRPLACD) FB.UNDELETE.FILE (TB.USERDATA FFETCHFIELD PLUS -FREPLACEFIELD IMINUS) MSFAIL (STKPOS FUNCTION STKNTH STKARG TERPRI) TEDIT.SET.SEL.LOOKS (FFETCHFIELD) -\\SW2BM (FFETCHFIELD IMAX IMINUS IPLUS IMIN IDIFFERENCE BITBLT) REBREAK (NLAMBDA.ARGS CL:FLET MAPCONC -REBREAK-FN) \\CLOCKGREATERP (UNINTERRUPTABLY IGREATERP \\BOXIDIFFERENCE \\CLOCK0 LOCF \\ADDBASE) -MERGEINSERT1 (NTHCHARCODE SUB1 ADD1) COMPILER::MAYBE-REMOVE-COMMENTS (REMOVE-COMMENTS) PUP.ECHOUSER ( -RESETLST ALLOCATE.PUP BESTPUPADDRESS OPENPUPSOCKET SETUPTIMER LIST GETSTREAM FFETCHFIELD LOCF -\\ADDBASE PLUS GETPUP GETPUPWORD) FTPGETMARK (FTPPRINTMARK BSPGETMARK MARK# .FTPDEBUGLOG.) -\\TEDIT.PUT.CHARLOOKS.LIST2 (HASHARRAY LOGAND LRSH \\BOUT FLENGTH PLUS) RECONS (CONS) -CL::%MAKE-FLAG-ACCESSOR (CL:FUNCTION) PROCESS-EXEC-ID (PROCESSPROP PROCESS.NAME SUBSTRING STRING) -UNIX-READ (UNIX-CHANNEL FFETCHFIELD \\EOF.ACTION UNIX-LASTCHAR) BEEPOFF (FFETCHFIELD) -XCL::WALK-TEMPLATE-HANDLE-REPEAT (WALK-TEMPLATE XCL::WALK-TEMPLATE-HANDLE-REPEAT-1) ICMLARRAY ( -CL:ARRAY-RANK DEFAULTFONT SUB1 IDIFFERENCE LIST PLUS CL:ARRAY-DIMENSIONS ICMLARRAY.DISPLAYSLICE ADD1 -WINDOWREGION IPLUS CONS ICMLARRAY.GETMENUWGROUP) PFI.SORT.INDICES (CL:POSITION CONS LIST MAPCAR SORT -CDR CL:SET-DIFFERENCE NCONC) COMPILER::PEEPHOLE-OPTIMIZE-CODE (COMPILER::FIND-TAG-DUPLICATION CL:VALUES - CL:NREVERSE) \\FORWARD.XIP (\\GATEWAY.FORWARD.XIP \\MAYBEPEEKNS \\RELEASE.ETHERPACKET) \\SETDAYTIME0 -(\\DTEST LOCF \\ADDBASE ITIMES FFETCHFIELD LOGAND IPLUS16 \\LOLOC LRSH UNFOLD LLSH \\GETBASE -\\PROCESS.RESET.TIMERS) INFILECOM (INFILECOMSVAL GETPROP APPLY* LIST LAST CONS INFILECOMTAIL -IFCDECLARE IFCPROPS SELECTQ IFCPROPSCAN INFILECOMSVALS INFILEPAIRS IFCEXPRTYPE MAPC FASSOC GETTOPVAL -SUBPAIR) LISPXUSEC (FMEMB LDIFF LISPXFIND LISPXUSEC CONS PACK LIST COPY ESUBST SUBST) -\\HDCPYDISPLAY.FIX.XPOS (FFETCHFIELD FIX FTIMES CONSTANT) YMAPLIST (HEADPTY XYPT.Y NEXTPTY HEADPT -NEXTPT XYPT.X IDIFFERENCE MIDDX CONS REVERSE) SPY.ORIGINAL (MAPCONC SELECTQ FFETCHFIELD APPEND -SHOULDNT LIST) CL::ROW-MAJOR-ASET (FFETCHFIELD CL:ERROR CL::ROW-MAJOR-ASET %ARRAY-WRITE +) -SEARCH-FOR-EVENT-NUMBER (EXEC-EVENT-ID ENTRY#) \\FTP.OPENFILE (RESETLST \\FTP.UNPACKFILENAME FIXP -LISPERROR CONS LIST GDATE \\FTP.OPENFILE.FROM.PLIST) |GetNewPrinterFromUser| (|PopUpWindowAndGetList|) - CANONICAL.CH.NAME (MKATOM NSNAME.TO.STRING PARSE.NSNAME) \\GENERIC.RENAMEFILE (SPREADAPPLY* -FFETCHFIELD FULLNAME RESETLST RESETSAVE OPENSTREAM \\COPYOPENFILE CLOSEF) LISPXPRINTDEF0 (RESETFORM -OUTPUT PRINTDEF) \\LOCATE.NSNET (\\GETBASEPTR UNFOLD LLSH LOGAND CONS SETUPTIMER) \\GENERIC.OPENP ( -FFETCHFIELD LIST) LISPXUSE0 (LISPXUSE1 LISPXSUBST MAPCONC) \\DSPRIGHTMARGIN.HDCPYDISPLAY ( -\\DSPRIGHTMARGIN.DISPLAY FFETCHFIELD FIX FTIMES CONSTANT) CL:VECTOR-POP (FFETCHFIELD CL:1- CL:AREF -CL:ERROR) \\NSFILING.GDATE (GDATE) SPY.MAKE.TREE (LISTGET FONTP FONTCREATE PLUS FFETCHFIELD QUOTIENT -TIMES MAPCAR SPY.MAKEGRAPHNODES SPY.TITLE SHOWGRAPH LAYOUTGRAPH REVERSE FUNCTION) \\RCLOCK0 (\\RCLK -\\DTEST) \\MAIKO.SETTIME (DAYTIME) |\\LFCloseDirectory| (|\\LFGetDirectory| |\\LFPutDirectory|) -CL::%MAKE-ARRAY-ACCESSOR (CL:FUNCTION) STKARGS (STKNARGS STKARG LIST PLUS) INITUFNTABLE (PLUS -IDIFFERENCE IPLUS SELECTQ SHOULDNT) CHAT.CLOSE (WINDOWPROP OPENWP FFETCHFIELD CLOSEF \\CARET.DOWN -DREMOVE LIST FUNCTION) CLOSEF? (CLOSEF) COMP.LOOKUPVAR (COMP.USERFN FUNCTION LIST CONS COMP.CHECK.VAR) - PRINTBITMAP (TYPENAMEP EVALV TERPRI BITMAPWIDTH PRIN2 BITMAPHEIGHT BITSPERPIXEL) LISP.TO.ALTO.DATE ( -LOGXOR) MS-SMASH-PACKAGE (MS-SMASH-PACKAGE CONS CL:SYMBOL-PACKAGE CL:INTERN CL:STRING-UPCASE -CL:SYMBOL-NAME) \\TEDIT.SEL.CHANGED? (FFETCHFIELD) DINFO.SPECIAL.UPDATE (FFETCHFIELD FASSOC SELECTQ -THIS.PROCESS CONCAT DINFO.UPDATE |printout| PRIN1 GETPROMPTWINDOW PROMPTPRINT) CHOOZ1 (IQUOTIENT -ITIMES IDIFFERENCE IPLUS) COMPILER::COMPILE-ONE-LAMBDA (COMPILER::ALPHA-LAMBDA CL:MULTIPLE-VALUE-PROG1 - .UNWIND.PROTECT. FUNCTION COMPILER::PEEPHOLE-OPTIMIZE COMPILER::GENERATE-CODE COMPILER::ANNOTATE-TREE - COMPILER::META-EVALUATE) NEAREST/PT/ON/GRID (NEAREST/MULTIPLE) \\FTP.HANDLE.NO (FUNCTION FTPGETCODE -.FTPDEBUGLOG. LIST ASSOC \\FTP.DIRECTORYNAMEONLY MKATOM \\INTERNAL/GETPASSWORD PRIN1 GETSTREAM SELECTQ - FRPLACA LISPERROR \\FTP.PACKFILENAME) \\TEDIT.PUT.SINGLE.PARALOOKS2 (LOGAND LRSH \\BOUT FFETCHFIELD -SELECTQ SHOULDNT LENGTH) IDLE (FNTYP LISTGET ADD.PROCESS LIST KWOTE \\IDLERKEYACTION) -COMPILER::*ARGUMENT-CONTEXT* (COMPILER:MAKE-CONTEXT) SEDIT::LINEARIZE-QUOTE (FFETCHFIELD SEDIT::LINEARIZE - SHOULDNT) ALISTS.WHENCHANGED (GETPROP MARKASCHANGED) TEDIT.SELECTALL (TEXTSTREAM TTY.PROCESS) -\\MAP-OPEN-STREAMS (NCONC MAPCAR FDEVOP SPREADAPPLY* FFETCHFIELD APPLY*) CL:ARRAY-ROW-MAJOR-INDEX (ARG - CL:ARRAY-RANK CL:1- CL:ERROR) SEDIT::OUTPUT-CR (FFETCHFIELD IDIFFERENCE IPLUS IMAX RPLACD -FREPLACEFIELD CONS FREPLACEFIELDVAL NCREATE SEDIT::STEP-LINEAR FCHARACTER LIST FIXR QUOTIENT) -FB.UNDELETECOMMAND (FFETCHFIELD FUNCTION FB.UPDATE.COUNTERS) REBINDP (FMEMB REBINDP) -CL::%MAKE-POINTER-ACCESSOR (CL:FUNCTION) \\NCONC2 (LAST) BSPPUTMARK (WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \\DTEST FFETCHFIELD \\BSP.PREPARE.OUTPUT -BSP.OUTPUT.ERROR APPLY* PLUS LOCF \\ADDBASE) \\NAMEDTAB.INIT (IMAGEFNSCREATE) INTCHECK (CHCON1 -IDIFFERENCE FCHARACTER IPLUS FIXP CONS INTCHAR HELP) \\NSFILING.GETFILEINFO.FROM.PLIST (SELECTQ -\\NSFILING.GDATE ASSOC FOLDHI LRSH IPLUS NSNAME.TO.STRING MAPCAR COURIER.FETCH \\TYPE.FROM.FILETYPE) -PRINT-EVENT (EXEC-EVENT-INPUT \\GETSTREAM STRINGWIDTH LISTGET MAX DSPXPOSITION FMEMB LDIFF CL:GETF -LISPXREPRINT EXEC-PRIN1) \\MAKEBRUSH.SQUARE (BITMAPCREATE) \\SIN.OLD (CONSTANT MINUS FREMAINDER FTIMES - FPLUS FDIFFERENCE POLYEVAL \\FLOATBOX OPCODES) CH.NAME.TO.STRING (NSNAME.TO.STRING PARSE.NSNAME) -PFI.COMPUTE.INDEX.SHAPE (NCHARS LENGTH + RPLACA CONCATLIST MAPCONC LIST MAX MIN IQUOTIENT LINELENGTH -CL:CEILING) \\EOSERROR (LISPERROR FFETCHFIELD) \\XIPERROR (LOGAND \\GETBASE LOCF \\ADDBASE FFETCHFIELD - IMIN IPLUS UNFOLD LLSH \\RELEASE.ETHERPACKET) LISPXUSE (NCONC1 APPEND CONS GENSYM LIST FMEMB -LISPXFIND MAPCAR LISPXUSE0) |\\VFMSmartBLT| (IGREATERP \\HILOC \\LOLOC \\ADDBASE SUB1 \\GETBASE PLUS -\\BLT) SPY.DELETE (FFETCHFIELD SPY.DELETE FREPLACEFIELDVAL NCREATE LIST) SUBST (COPY CONS SUBST) -\\TEDIT.FIND.PROTECTED.START (FFETCHFIELD \\CHTOPC SUB1 IPLUS IDIFFERENCE) \\INCFILEPTR (FFETCHFIELD -\\SETFILEPTR IPLUS \\GETFILEPTR SPREADAPPLY* \\PAGED.INCFILEPTR) ALTO.TO.LISP.DATE (LOGXOR) -SEDIT::LINEARIZE-LIST (FFETCHFIELD CL:FUNCALL IPLUS IDIFFERENCE ILEQ SELECTQ SHOULDNT IMAX -SEDIT::NEXT-NODE-TYPE SEDIT::LINEARIZE SEDIT::OUTPUT-CONSTANT-STRING) CHANGECALLERS (GETFILEPKGTYPE -LIST TYPESOF TERPRI SUBPAIR SELECTQ NCONC FILEPKGCHANGES FILEFNSLST UPDATEFN INTERSECTION GETRELATION -PARSERELATION EDITCALLERS REMOVE WHEREIS |printout| PRIN1) CL::SIMPLE-STRING-EQUAL (%STRING-LENGTH + -%STRING-BASE-COMPARE-EQUAL) \\PAGED.INCFILEPTR (UNINTERRUPTABLY + FFETCHFIELD FOLDLO LRSH MOD IMOD - -SUB1 FREPLACEFIELD) TB.DELETE.ITEM (\\DTEST FFETCHFIELD PLUS TB.SHOW.DELETION) MSSETSETTYPE (FRPLACD -MS-SMASH-PACKAGE CL:FIND-PACKAGE) TEDIT.EXTEND.SEL (TEDIT.SELECT SELECTQ FFETCHFIELD IABS IMINUS -IDIFFERENCE IMAX IPLUS SHOULDNT COPY \\TEDIT.FIND.PROTECTED.START SUB1 IMIN ADD1 -\\TEDIT.FIND.PROTECTED.END) CREATEFIELDS (NCONC SUBSET LIST) FIXSPELL2 (LIST FUNCTION LISPXTERPRI) -\\FIXPOUT (LOADBYTE LOGAND LSH IMINUS MASK.1\'S SUB1 \\BOUT) EF (APPLY NLAMBDA.ARGS) SEDIT::SET-POINT -(CL:FUNCALL FFETCHFIELD) SETUPSTACK (IQUOTIENT \\SETUPSTACK1 IDIFFERENCE \\SETUPGUARDBLOCK -FREPLACEFIELD) EDITBMBUTTONFN (WINDOWPROP FFETCHFIELD LASTMOUSEX LASTMOUSEY MENU FREPLACEFIELDVAL -NCREATE CONS GETBOXPOSITION IPLUS - IMIN IDIFFERENCE IMAX IMINUS QUOTIENT TIMES FRPLACA LRSH BITBLT -LOGAND BITMAPCREATE BITSPERPIXEL CURSOR CURSORCREATE ZEROP APPEND \\EDITBMHOWMUCH GETGRIDBOXREGION + -CREATEW NUMBERP IQUOTIENT WIDTHIFWINDOW HEIGHTIFWINDOW COLORMENU) CLOSEBSPSTREAM (\\DTEST FFETCHFIELD -FIXP CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION LIST SETUPTIMER CLOSERTPSOCKET) -\\TEDIT.PUT.SINGLE.CHARLOOKS2 (FFETCHFIELD FONTCLASSUNPARSE FONTPROP LOGAND LRSH \\BOUT LOGOR) -|\\SETUPTIMERmacrofn| (CONSTANTEXPRESSIONP CANONICAL.TIMERUNITS SELECTQ |\\CanonicalizeTimerUnits| -SHOULDNT SUBST) EV (APPLY NLAMBDA.ARGS) \\DSPXPOSITION.HDCPYDISPLAY (\\DSPXPOSITION.DISPLAY) -\\BUFFERED.BIN (\\GETBASEBYTE FFETCHFIELD ADD1 FDEVOP SPREADAPPLY*) FIND-HISTORY-EVENTS ( -HISTORY-EVENTS CL:MEMBER APPEND FIND-HISTORY-EVENTS LDIFF LIST NCONC1) READ (\\GTREADTABLE -\\TOP-LEVEL-READ) SEDIT::OUTPUT-CONSTANT-STRING (FFETCHFIELD FREPLACEFIELD CONS PLUS IMAX FONTPROP -MKSTRING SEDIT::MAP-FONT) \\MAKEBRUSH.ROUND (SUB1 HALF LRSH BITMAPCREATE FFETCHFIELD MASK.1\'S LSH -DSPCREATE) \\MAKEBRUSH.VERTICAL (BITMAPCREATE SUB1 FOLDHI LRSH IPLUS) \\TEDIT.REFRESH.SHOWSEL ( -FFETCHFIELD) \\BUFFERED.PEEKBIN (\\GETBASEBYTE FFETCHFIELD FDEVOP SPREADAPPLY*) PRINT-EVENT-PROMPT ( -\\GETSTREAM EXEC-EVENT-ID CL:FORMAT ENTRY#) |\\CanonicalizeTimerUnits| (SELECTQ U-CASE ERROR) -\\NSFILING.GET/SETINFO (FFETCHFIELD CL:FUNCALL \\NSFILING.GETFILE) COMPILER::COMPILE-AND-DUMP-1 ( -COMPILER::COMPILE-ONE-LAMBDA) GETGRIDBOXREGION (\\DSPTRANSFORMX IPLUS WINDOWPROP FFETCHFIELD -\\DSPTRANSFORMY CONS GETREGION FUNCTION CREATEREGION GRIDXCOORD DSPXSCREENTOWINDOW GRIDYCOORD -DSPYSCREENTOWINDOW - ADD1 FRPLACA) GETHASH (\\DTEST FFETCHFIELD APPLY* \\EQHASHINGBITS LOGXOR \\HILOC -LLSH LOGAND \\LOLOC LRSH \\FIRSTINDEX IREMAINDER ADD1 \\HASHSLOT \\ADDBASE \\ADDBASE2 CL:VALUES -\\REPROBE LOGOR IMIN IPLUS) \\TEDIT.GET.CHARLOOKS.LIST2 (\\SMALLPIN SUB1 LLSH IDIFFERENCE -\\TEDIT.GET.SINGLE.CHARLOOKS2 LIST PLUS) \\GENERIC.READP (UNFOLD LLSH ACCESS-CHARSET SPREADAPPLY* -FFETCHFIELD \\SYNCODE GETHASH \\GETBASEBYTE \\NSPEEK \\DTEST \\XCCSPEEK \\PEEKBIN \\BIN IDIFFERENCE -\\NSIN.24BITENCODING.ERROR LOGOR CL:FUNCALL UNINTERRUPTABLY \\XCCSIN \\BACKXCCSCHAR PLUS) MAKECREATE1 -(SELECTQ SMASHPATTERN MAKECREATELST LIST DREVERSE CREATEFIELDS GETFIELDFORCREATE KWOTE ASSOC COPY -CSUBST EVAL EMBEDPROG CONS MAPCAR MAPCONC SHOULDNT FUNCTION RECORDBIND SUBSET CADR RECORDERROR -RECORDBINDVAL REVERSE MAKEACCESS ACCESSDEF4 FRPLACA MKPROGN MAKEHASHLINKS) CL::%MAKE-LIST-ACCESSOR ( -CL:FUNCTION) WRITE (DECLARE \\GETSTREAM \\WRITE1 CL:MAKE-HASH-TABLE) MAKEWITHINREGION (REGIONP -\\ILLEGAL.ARG FRPLACA IPLUS IMAX IDIFFERENCE SUB1) LOCALVARS (APPEND UNION) ACCEPT-UNIX-SOCKET-STREAM -(UNIX-CHANNEL FFETCHFIELD SELECTQ FREPLACEFIELDVAL NCREATE FUNCTION CONS) MKPROGN1 (MKPROGN1 SELECTQ -APPEND CONS) |FetchDefaultPrinter| (DEFAULTPRINTER) \\GENERIC.CHARSET (\\DTEST FFETCHFIELD) -LISPXPRINTDEF (LIST LISPXPRINTDEF0) \\HANDLE.RAW.XIP (RELEASE.XIP LOCF \\ADDBASE FFETCHFIELD LOGAND -\\FORWARD.XIP \\NSOCKET.FROM# \\GETBASE \\CHECKSUM SUB1 FOLDHI LRSH IPLUS \\LOCATE.NSNET -\\ADD.ROUTING.TABLE.ENTRY CONS FRPLACA PLUS NOTIFY.EVENT) %CHECK-SEQUENCE-DIMENSIONS (CL:LENGTH) NEGL -(LIST NEGATE CONS NEGL) \\SECONDSCLOCKGREATERP (UNINTERRUPTABLY LOCF \\ADDBASE IGREATERP -\\BOXIDIFFERENCE) SPY.SUM (PLUS FFETCHFIELD SPY.SUM FREPLACEFIELD) \\BUFFERED.BINS (FFETCHFIELD -IDIFFERENCE IPLUS PLUS FDEVOP SPREADAPPLY* \\BIN) \\FIXPIN (LOGOR LLSH \\WIN IPLUS \\BIN) -XCL::HASH-FILE-WHERE-IS (CL:REMOVE-DUPLICATES CL:MAPCAN CL:FUNCTION XCL::GET-WHERE-IS-ENTRIES) -\\IFS.LOOKUPFILE (FFETCHFIELD NTHCHARCODE STRPOS OPENPUPSOCKET CREATE.MONITORLOCK SUBSTRING ADD1 SUB1 -NCHARS IMINUS CONCAT \\INTERNAL/GETPASSWORD GETHOSTINFO CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION ALLOCATE.PUP \\LEAF.STRIP.QUOTES EXCHANGEPUPS LOCF \\ADDBASE SELECTQ MKATOM U-CASE GDATE -ALTO.TO.LISP.DATE \\ILLEGAL.ARG PLUS FREPLACEFIELD) MSDOES (MSCANT FRPLACA CONS) \\EOF.ACTION ( -CL:FUNCALL FFETCHFIELD) SETSPELLCASE (CASEARRAY IPLUS IDIFFERENCE PLUS MAPC SETCASEARRAY CHCON1) -%CML-TYPE-TO-TYPENUMBER (%GET-CANONICAL-CML-TYPE) \\GENERIC.BOUTS (FRPTQ \\BOUT \\GETBASEBYTE PLUS) -\\NSFILING.GETEOFPTR (LOGAND FFETCHFIELD CONSTANT LOGOR GETFILEPTR \\NSFILING.GETFILEINFO) -\\BUFFERED.BOUTS (FFETCHFIELD IDIFFERENCE IPLUS PLUS SPREADAPPLY*) \\FTPERROR (TERPRI ERROR) /PUT-1 ( -GETPROPLIST LIST) \\MOVEBYTES (\\ADDBASE FOLDLO LRSH IMOD \\GETBASEBYTE PLUS \\PUTBASEBYTE) NEGC (LIST - NEGATE NEGC CONS NEGL) READ-AFM-FILE (OPENSTREAM CONS ARRAY RSTRING FONTCREATE FREPLACEFIELDVAL -NCREATE |printout| MENU TERPRI LIST POSTSCRIPT.GETFONTID READ IABS IMINUS IPLUS FIXR FTIMES / RATOM -READCCODE LISTGET PLUS FRPLACA) NEGLST (MAPCAR NEGATE) *WHO-LINE-VALUE-FONT* (FONTCREATE) -|\\VFMMarkBufferDirty| (FFETCHFIELD) \\NULLDEVICE (\\DEFINEDEVICE FUNCTION FREPLACEFIELDVAL NCREATE) -SEDIT::DOT-THIS-LIST (FFETCHFIELD SUB1 NTH SEDIT::SET-SELECTION-NOWHERE) |\\LFDeleteFile| ( -WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION |\\LFGetStreamForFile| FFETCHFIELD -SPREADAPPLY* |\\LFGetDirectory| |\\PFGetVol| |\\PFSaveBuffers|) \\BUFFERED.BOUT (FFETCHFIELD ADD1 -SPREADAPPLY*) CREATEPAGES (SUB1 \\ADDBASE UNFOLD LLSH PLUS) BSPGETMARK (\\BSP.PREPARE.INPUT -\\GETBASEBYTE FFETCHFIELD LOCF \\ADDBASE BSP.INPUT.ERROR APPLY*) XCL:FIND-PROFILE (CL:GETHASH STRING) -FIND.CHAT.PROTOCOL (CL:FUNCALL) SEDIT::INSERT-LIST (FFETCHFIELD ADD1 SEDIT::REPLACE-LIST) -XCL:LIST-ALL-PROFILES (CL:FUNCTION CL:MAPCAR) RECORDBINDVAL (RECORDBIND) COMP.EXP1 (COMP.EXPR) -COMPILER::SET-CONSTANT-VALUE (CL:GETHASH LIST) INSPECTW.FETCH (APPLY* WINDOWPROP ERROR) -PSCFONT.WRITEFONT (OPENSTREAM FIND-READTABLE LRSH \\BOUT LOGAND ELT PLUS) XCL:PROFILE-NAME ( -XCL::PROFILE-ENTRY-VALUE XCL::PROFILIZE) \\NAMEDTABSIZE (IMAGEOBJPROP IMAX IDIFFERENCE ITIMES CONS) -PPSPPSTREAM (PRIN1 \\SPP.GETFILEPTR FFETCHFIELD TERPRI) SETUPTIMER (IPLUS TYPENAMEP \\TIMER.MAKETIMER -NCREATE CANONICAL.TIMERUNITS SELECTQ |\\CanonicalizeTimerUnits| ITIMES EXPAND.SETUPTIMER \\BOXIPLUS -\\TIMER.IN.TICKS \\RCLOCK0 IQUOTIENT \\TIMER.IN.MILLISECONDS \\CLOCK0 \\TIMER.IN.SECONDS \\DAYTIME0 -SHOULDNT) *WHO-LINE-NAME-FONT* (FONTCREATE) MSKNOWN (FRPLACA SELECTQ MSKNOWN) DINFO.UPDATE.FMENU ( -FFETCHFIELD FASSOC FM.GETITEM FM.CHANGELABEL) ADDSPELL2 (FMEMB) XCL::VARIABLE-SPECIAL-P ( -XCL::VARIABLE-GLOBALLY-SPECIAL-P) \\CHARWIDTH.HDCPYDISPLAY (IQUOTIENT IPLUS \\FGETCHARIMAGEWIDTH -\\FGETWIDTH \\GETBASE \\GETCHARSETINFO \\GETBASEPTR FFETCHFIELD UNFOLD LLSH \\CHARSET LRSH -\\CREATECHARSET \\CHAR8CODE LOGAND FONTCREATE STREAMPROP CONSTANT) SEDIT::LINEARIZE (FFETCHFIELD -RPLACD FREPLACEFIELD CONS SEDIT::CREATE-WEAK-LINK IMAX IPLUS SEDIT::OUTPUT-CONSTANT-STRING) -SPY.MERGETREE (FMEMB FFETCHFIELD PLUS LIST CONS SELECTQ SHOULDNT) BSPOPENP (\\DTEST FFETCHFIELD -SELECTC IGREATERP ILESSP) NEWDEFC (CONS LIST FUNCTION KWOTE FFETCHFIELD FREPLACEFIELDVAL NCREATE) -\\LEAF.READFILEPROP (FFETCHFIELD ALLOCATE.PUP LOCF \\ADDBASE LLSH IDIFFERENCE \\SENDLEAF CONS FOLDLO -LRSH) |\\LFRenameFile| (\\GENERIC.RENAMEFILE SPREADAPPLY* FFETCHFIELD \\RECOGNIZE-HACK FDEVOP -|\\LFFindDirectory| |\\LFParseFileName| |\\LFFileSpec| CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION |\\LFGetStreamForFile| |\\LFFindDirHole| |\\LFFullFileName| |\\LFFileName| |\\LFUnpackName| -LOCF \\ADDBASE DAYTIME |\\LFWriteLeaderPage|) \\TEDIT.FIND.LAST.LINE (FFETCHFIELD) \\NULL.OPENFILE ( -FREPLACEFIELDVAL NCREATE FUNCTION) HISTORY-NTH (EXEC-EVENT-ID) XCL:RESTORE-PROFILE (XCL::PROFILIZE -CL:MAPC CL:FUNCTION XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES) MODERN-SNAPW (MODERN-ORIG-SNAPW -FUNCTION) CHAT.RECONNECT.OFF (WINDOWPROP FUNCTION) XCL::VARIABLE-LEXICALLY-BOUNDP (CL:VALUES CL:MEMBER - CL:FUNCTION XCL::VARIABLE-SPECIAL-P) EDITP (NLAMBDA.ARGS GETPROPLIST MISSPELLED? FUNCTION) -|\\PFTransferFilePage| (FFETCHFIELD \\BLT MESASIZE IPLUS \\HINUM \\LONUM |\\PFTransferPage| -|LvBasePageAddr| FMESAELT \\ADDBASE LOCF ILEQ ITIMES IDIFFERENCE MIN GETRESOURCE NEWRESOURCE -\\ALLOCBLOCK LRSH ADD1 PLUS) \\NSFILING.CLOSE.BULKSTREAM (\\NSFILING.RELEASE.BULKSTREAM) -CL::CACHE-SLOT-INFO (CL::GET-PS-FROM-ACCESSOR CL::PS-FAST-ACCESSORS CL:GETHASH LIST CL::PS-TYPE -CL:COPY-TREE CL::GET-SLOT-DESCRIPTOR-FROM-PS) EDITV (NLAMBDA.ARGS PRINT STKSCAN EDITE ENVEVAL HASDEF -EDITDEF ERROR) |\\VFMDelete1| (EQP FFETCHFIELD \\BLT LOCF MESASIZE \\ADDBASE IDIFFERENCE FREPLACEFIELD - |\\VFMMarkBufferDirty|) COMPILER::CONSTANT-EXPRESSION-P (CL:CONSTANTP GET) DSPXSCREENTOWINDOW ( -IDIFFERENCE \\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) PRINT-ARGLIST (LIST) -XCL:MAKE-PROFILE (CONS) TEDIT.UNDO.DELETION (FFETCHFIELD \\CHTOPC \\SPLITPIECE - NCREATE FRPLACA -IMAGEOBJPROP \\TEDIT.PRIMARYW TEXTSTREAM IPLUS) OPENATTACHEDWINDOWS (MAPC ATTACHEDWINDOWS OPENW) -ADDFILE0 (FILECOMS GETPROP FMEMB /RPLACD GETTOPVAL CONS /PUTPROP MISSPELLED? LIST) PREPLOOP (LIST -NORMLOOP IRNDLIST SLITLOOP NCONC) \\FILEOUTCHARFN (\\XCCSFILEOUTCHARFN FFETCHFIELD \\CHARSET LRSH -FREPLACEFIELD SELECTC SHOULDNT \\CHAR8CODE LOGAND IPLUS16 \\LOLOC \\ADDBASE) \\ARGPTR (\\MYALINK -OPCODES FFETCHFIELD \\DEFCELL \\ATOMCELL ADDSTACKBASE \\VAG2 \\VAROFFSET + IDIFFERENCE UNFOLD LLSH -SUB1 FOLDLO LRSH LISPERROR FLOOR LOGAND CONSTANT LOGXOR) |\\VFMDelete2| (LOCF FFETCHFIELD \\BLT -MESASIZE \\ADDBASE IPLUS IDIFFERENCE |\\VFMMarkBufferDirty|) \\NSFILING.RENAMEFILE (FFETCHFIELD -FUNCTION \\NSFILING.COPY/RENAME \\GENERIC.RENAMEFILE) \\GETREGION.CHECKOPPT (IDIFFERENCE IPLUS FRPLACA - FRPLACD APPLY* ERROR) UPIQUOTIENT (IQUOTIENT IPLUS SUB1) \\TEDIT.GET.PARALOOKS.LIST2 (\\SMALLPIN SUB1 - LLSH IDIFFERENCE \\TEDIT.GET.SINGLE.PARALOOKS2 LIST PLUS) \\MAKEBRUSH.DIAGONAL (BITMAPCREATE SUB1 -PLUS) SETARG (PUTBASEPTR \\PUTBASEPTR \\ARGPTR \\EVAL) |\\LFTruncateFile| (FIXP FFETCHFIELD -\\GETFILEPTR SPREADAPPLY* PLUS TIMES IQUOTIENT DIFFERENCE ITIMES |\\PFGetVol|) -\\TEDIT.FIND.PROTECTED.END (IMIN FFETCHFIELD \\CHTOPC SUB1 PLUS) TIMEREXPIRED? (TYPENAMEP LISPERROR -TIMER.TIMEREXPIRED? IGEQ \\BOXIDIFFERENCE TIMER.MAKESAFETIMER SELECTQ CANONICAL.TIMERUNITS -|\\CanonicalizeTimerUnits| \\TIMER.IN.TICKS \\RCLOCK0 \\TIMER.IN.MILLISECONDS \\CLOCK0 -\\TIMER.IN.SECONDS \\DAYTIME0) PRINT-HISTORY (FIND-HISTORY-EVENTS HISTORY-EVENTS TERPRI CL:VALUES) -SEDIT::AWAKE-COMMAND-PROCESS (WINDOWPROP FFETCHFIELD) TEDITCHAT.MENUFN (WINDOWPROP LOGAND -CHAT.RECONNECT TOTOPW \\CARET.DOWN MENU FREPLACEFIELDVAL NCREATE CONS) NARGS (\\DEFCELL \\ATOMCELL -FFETCHFIELD \\CCODENARGS SELECTQ PLUS NARGS) DO.CHAT.OPTION (CHAT.OPTIONMENU FFETCHFIELD PRIN1) -XCL::VARIABLE-LEXICAL-P (XCL::VARIABLE-SPECIAL-P CL:MEMBER CL:FUNCTION) \\MAKEBRUSH.HORIZONTAL ( -BITMAPCREATE SUB1 FOLDHI LRSH IPLUS) |NewPrinter| (CL:MEMBER CONS REMOVE LAST) -DINFO.UPDATE.GRAPH.DISPLAY (FFETCHFIELD CONS DINFO.LAYOUTGRAPH WINDOWPROP CONCAT) -XCL:ECHO-STREAM-INPUT-STREAM (FFETCHFIELD) \\DSPFONT.HDCPYDISPLAY (FONTCREATE STREAMPROP -\\DSPFONT.DISPLAY FFETCHFIELD FONTPROP \\GETCHARSETINFO \\GETBASEPTR UNFOLD LLSH \\CREATECHARSET -IMINUS FIXR QUOTIENT CONSTANT \\CREATECSINFOELEMENT \\ALLOCBLOCK FOLDHI LRSH IPLUS FQUOTIENT \\PUTBASE - FTIMES \\FGETWIDTH \\GETBASE PLUS) INITDATATYPENAMES (\\ALLOCBLOCK ADD1 LOCAL \\GETDTD \\ADDBASE -ITIMES \\ATOMPNAMEINDEX NTYPX \\LOLOC SHOULDNT COPY UNFOLD LLSH PLUS \\PUTBASEPTR) SPY.NEXT.TREE ( -FFETCHFIELD CONS FREPLACEFIELDVAL NCREATE) FTPPUTMARK (BSPPUTMARK FTPPRINTMARK) XCL:SAVE-PROFILE (MAP -XCL::PROFILIZE CL:EVAL) \\LEAF.GETFILEINFO.OPEN (SELECTQ FFETCHFIELD IPLUS UNFOLD LLSH GDATE -\\LEAF.GETFILEINFO.OPEN ALTO.TO.LISP.DATE \\LEAF.GETFILEDATES \\LEAF.READFILEPROP SELECTC \\GETBASE -|GetBcplString|) \\IDLERKEYACTION (KEYACTIONTABLE) TOPATTACHEDWINDOWS (MAPC ATTACHEDWINDOWS -TOPATTACHEDWINDOWS) \\NSFILING.RELEASE.BULKSTREAM (FFETCHFIELD DREMOVE) CL::%MAKE-ACCESSOR-CLOSURE ( -CL::PSLOT-FIELD-DESCRIPTOR) MAKECREATE0 (RECORD.FIELDINFO MAKECREATE1 RECORD.CREATEINFO) -COMPILER::CONSTANT-VALUE (CL:GETHASH) PSCFONTFROMCACHE.COERCEFILE (PSCFONTFROMCACHE.SPELLFILE LIST) -XCL:TWO-WAY-STREAM-OUTPUT-STREAM (FFETCHFIELD) CREATE-UNIX-SOCKET-STREAM (FREPLACEFIELDVAL NCREATE -FUNCTION UNIX-CHANNEL FFETCHFIELD CONS) IMAGESTREAMP (SELECTQ ARG TYPENAMEP FFETCHFIELD) -\\NAMEDTABNYET (PROMPTPRINT) TIME.UNTIL (TYPENAMEP LISPERROR SELECTQ CANONICAL.TIMERUNITS -|\\CanonicalizeTimerUnits| \\TIMER.DIFFERENCE IDIFFERENCE \\TIMER.IN.TICKS \\RCLOCK0 -\\TIMER.IN.MILLISECONDS \\CLOCK0 \\TIMER.IN.SECONDS \\DAYTIME0 SHOULDNT) \\SPP.CHECK.INPUT.QUEUE ( -FFETCHFIELD LOCF \\ADDBASE ILESSP \\LOLOC IDIFFERENCE) SEDIT::DELETE-QUOTE (SMALLP FFETCHFIELD -SHOULDNT SEDIT::SUBNODE SEDIT::CREATE-GAP-NODE) FORMAT-ROUND-COLUMNS (+ CL:* CL:CEILING -) -FB.NAMES.INCREASING.VERSION (SELECTQ ALPHORDER FFETCHFIELD NULL.VERSIONP ILESSP) |\\LFGetFileInfo| ( -WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FFETCHFIELD |\\LFGetStreamForFile| -SELECTQ IPLUS ITIMES FOLDHI LRSH GDATE |\\PFFetchString| LOCF \\ADDBASE) UNDOLISPX1 (UNDOLISPX2 FMEMB -UNDOPRINT) SHRINK-VECTOR (FFETCHFIELD CL:ERROR) COMPILER::COMPILE-AND-DUMP (CL:GETHASH -COMPILER::COMPILE-AND-DUMP-1) %MAKE-ARRAY-STORAGE (\\ALLOCBLOCK FOLDHI LRSH IPLUS CL:*) -XCL:TWO-WAY-STREAM-P (STREAMPROP) CHAT.RESHAPEWINDOW (WINDOWPROP FFETCHFIELD PROCESS.APPLY FUNCTION -LIST) CLISPCAR/CDR (LIST MINUS MAKEMATCH CLISPRECORD NLEFT GETPROP IPLUS CLISPCAR/CDR1 SUB1 ADD1 -IMINUS CLISPLOOKUP) \\NSFILING.GETFILENAME (\\NSFILING.GETFILE) RENAME (GETFILEPKGTYPE) XCL:PROFILE-P -(CL:FIRST CL:LENGTH) XCL:OPEN-STREAM-P (OPENED FFETCHFIELD) XCL:TWO-WAY-STREAM-INPUT-STREAM ( -FFETCHFIELD) |\\PFPutFileMapPage| (FIXP |\\PFVolumeNumber| |\\PFPutPage| ELT) TEDIT.REDO.INSERTION ( -FFETCHFIELD FREPLACEFIELDVAL NCREATE FRPLACA \\CHTOPC \\SPLITPIECE - IMAGEOBJPROP APPLY* COPY -WINDOWPROP IPLUS) %TWOD-ARRAY-P (NTYPX) STKNTH (IMINUS \\STACKARGPTR LISPERROR PLUS \\MYALINK OPCODES -\\MAKESTACKP IDIFFERENCE ADDSTACKBASE \\VAG2 FFETCHFIELD FLOOR LOGAND CONSTANT LOGXOR SUB1) -XCL:CONCATENATED-STREAM-P (STREAMPROP) |\\VFMFreeVPage| (ADD1 FREPLACEFIELDVAL NCREATE ELT -|\\PFVolumeNumber| |\\VFMKillBuffer|) SETSTKNAME (\\STACKARGPTR ADDSTACKBASE \\VAG2 FFETCHFIELD -\\HILOC OPCODES FREPLACEFIELD \\COPYFNHEADER) %ONED-ARRAY-P (NTYPX) IMAGESTREAMTYPE (\\STREAMARG -\\GETSTREAM \\DTEST FFETCHFIELD) SEDIT::MAP-COMMENT-INDEX (FFETCHFIELD NCHARS IDIFFERENCE) -XCL:CONCATENATED-STREAM-STREAMS (FFETCHFIELD) COMPILER::CHECK-GLOBAL-CONSTANT (CL:GETHASH CL:VALUES -CL:SYMBOL-VALUE CL:ERROR CL:EVAL COMPILER::VALUE-FOLDABLE-P) \\ARG (GETBASEPTR \\GETBASEPTR \\ARGPTR) -PSCFONTFROMCACHE.SPELLFILE (ASSOC L-CASE FILENAMEFIELD \\FONTFILENAME FASSOC CONS) XCL:BROADCAST-STREAM-P - (STREAMPROP) XCL:COPY-PROFILE (CL:COPY-SEQ XCL::PROFILIZE) XCL:ECHO-STREAM-OUTPUT-STREAM (FFETCHFIELD -) *WHO-LINE-ENTRY-REGISTRY* (LIST) DINFO.UPDATE.MENU.DISPLAY (FFETCHFIELD DREVERSE FASSOC LIST FLENGTH - GREATERP FONTP WINDOWPROP MAPCAR FUNCTION FREPLACEFIELDVAL NCREATE CONS FRPLACA CREATEW -HEIGHTIFWINDOW TIMES BITMAPHEIGHT CHECK/MENU/IMAGE DIFFERENCE RELMOVEW IDIFFERENCE) INITGC (FOLDHI -LRSH IPLUS \\ADDBASE SUB1 FREPLACEFIELD) IMAGESTREAMTYPEP (SELECTQ \\GETSTREAM FFETCHFIELD) -TEDIT.WORDSET (\\SETSYNCODE \\PUTBASEBYTE \\SETFATSYNCODE FFETCHFIELD SMALLP CHCON1 FIXP SELECTQ) -\\SETXFORM.PSC (FFETCHFIELD FREPLACEFIELD) XCL:SYNONYM-STREAM-SYMBOL (FFETCHFIELD) -\\BSP.DECLARE.FILEPTR (LRSH LOGAND FREPLACEFIELD) \\SETARG (PUTBASEPTR \\PUTBASEPTR \\ARGPTR) -PRINTCOPYRIGHT1 (TERPRI ADD1 CONS CONCAT) |MakeMenuOfPrinters| (APPEND LIST CONCAT KWOTE FUNCTION -FREPLACEFIELDVAL NCREATE CONS) RESUME (\\DTEST FFETCHFIELD IDIFFERENCE ADDSTACKBASE \\VAG2 \\MYALINK -OPCODES \\RESUME) PFI.CENTER.PRINT (DSPLEFTMARGIN + IQUOTIENT - DSPRIGHTMARGIN TIMES SUB1 LENGTH -DSPSCALE PLUS STRINGWIDTH RELMOVETO TERPRI) %DEFPRINT-ARRAY (%DEFPRINT-VECTOR %DEFPRINT-GENERIC-ARRAY -CL:CODE-CHAR FFETCHFIELD CL:ARRAY-RANK) %GENERAL-ARRAY-P (NTYPX) XCL:SET-DEFAULT-EXEC-TYPE (SETTOPVAL) - HARDCOPYSTREAMTYPE (\\OUTSTREAMARG \\GETSTREAM STREAMPROP) XCL:ECHO-STREAM-P (STREAMPROP) -FB.DECREASING.VERSION (FFETCHFIELD NULL.VERSIONP IGREATERP) OPENIMAGESTREAM (\\CONVERT-PATHNAME -STREAMP FILENAMEFIELD STRPOS SUBATOM ADD1 SUB1 PRINTFILETYPE.FROM.EXTENSION MKLIST PRINTERPROP -PRINTERTYPE ERROR EQMEMB CONCAT PRINTERNAME PACKFILENAME APPLY* ASSOC) \\LEAF.SETVALIDATION ( -\\MAKENUMBER FFETCHFIELD FREPLACEFIELD) SIMPLEP (IDIFFERENCE LENGTH GETP SIMPLEP SELECTQ GETHASH) -CL::DEFINE-ACCESSORS (CL::PS-NAME CL::PS-TYPE CL:MAPCAN CL:FUNCTION CL::PS-ALL-SLOTS) PRINTERTYPE ( -DEFAULTPRINTER ERROR GETPROP MKATOM CANONICAL.HOSTNAME ASSOC MKLIST) \\SPREADFRAMEP (\\GETBASEPTR -IPLUS ADDSTACKBASE \\VAG2 IDIFFERENCE FFETCHFIELD UNFOLD LLSH SUB1 FOLDLO LRSH) UNIX-STREAM-OUT ( -UNIX-WRITE UNIX-CHANNEL FFETCHFIELD \\DTEST CL:ERROR) XCL:FOLLOW-SYNONYM-STREAMS ( -XCL:FOLLOW-SYNONYM-STREAMS CL:SYMBOL-VALUE XCL:SYNONYM-STREAM-SYMBOL) PRINTFILETYPE.FROM.EXTENSION ( -U-CASE FILENAMEFIELD ASSOC) XCL:SET-EXEC-TYPE (STKPOS ENVEVAL XCL:RESTORE-PROFILE) -\\NSFILING.ERRORHANDLER (FFETCHFIELD STKPOS FUNCTION \\GETACCESS GETFILEPTR SPACES \\NSFILING.GETFILE -LIST PRIN1 SETFILEPTR PLUS FREPLACEFIELD \\SPP.DEFAULT.ERRORHANDLER) CLEARFILEPKG (SUBSET GETPROP) -\\RESUME (\\MYALINK OPCODES ADDSTACKBASE \\VAG2 IDIFFERENCE IPLUS SUB1) SETSTKARG (\\STACKARGPTR -\\INTERPFRAMENT \\FRAMESCAN LISPERROR FOLDLO LRSH FFETCHFIELD GETSTKNAMEENTRY IPLUS UNFOLD LLSH SUB1 -SELECTC NTSLOT-VARTYPE GETSTKNTOFFSETENTRY \\ADDBASE ADDSTACKBASE \\VAG2 IDIFFERENCE SHOULDNT -NTSLOT-OFFSET LOGAND STACKADDBASE STACKPUTBASEPTR \\PUTBASEPTR) \\COPYFNHEADER (UNFOLD LLSH -FFETCHFIELD IPLUS \\ALLOC.CODE.BLOCK \\ADDREF OPCODES) PRINTCOPYRIGHT (GETPROP ASKUSER CONSTANT -CHARACTER CONCAT NCONC MAPCAR LIST CONS ASSOC SUBATOM DATE MEMBER) COMPILER::SET-UP-BLOCK-DECLS ( -CL:MAKE-HASH-TABLE) DSPYSCREENTOWINDOW (IDIFFERENCE \\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG -\\GETSTREAM FFETCHFIELD) \\TEDIT.PUT.SINGLE.PARALOOKS (GETFILEPTR LOGAND LRSH \\BOUT FFETCHFIELD -SELECTQ SHOULDNT LENGTH IDIFFERENCE) STKARGNAME (\\STACKARGPTR \\INTERPFRAMENT \\FRAMESCAN FFETCHFIELD - \\INDEXATOMVAL \\VAG2 LRSH LOGAND GETSTKNAMEENTRY \\ADDBASE UNFOLD LLSH IPLUS LISPERROR ADDSTACKBASE -IDIFFERENCE FOLDLO MAKE-NTENTRY SUB1 STACKADDBASE GETSTKNTOFFSETENTRY PLUS CONSTANT WORDSPERNAMEENTRY -WORDSPERNTOFFSETENTRY) SHRINKATTACHEDWINDOWS (MAPC ATTACHEDWINDOWS DOUSERFNS WINDOWPROP \\CLOSEW1) -%DEFPRINT-BITVECTOR (CL:CODE-CHAR FFETCHFIELD VECTOR-LENGTH CL:1-) CL:WRITE-CHAR (\\OUTCHAR -\\GETSTREAM CL:CHAR-INT) HISTORY-ADD-TO-SPELLING-LISTS (ADDSPELL) SETSTKARGNAME (\\STACKARGPTR -\\INTERPFRAMENT \\FRAMESCAN FOLDLO LRSH FFETCHFIELD \\INDEXATOMVAL \\VAG2 LOGAND GETSTKNAMEENTRY -\\ADDBASE UNFOLD LLSH IPLUS LISPERROR \\COPYFNHEADER ADDSTACKBASE IDIFFERENCE MAKE-NTENTRY SUB1 -GETSTKNTOFFSETENTRY \\ATOMVALINDEX NTYPX \\LOLOC SHOULDNT FREPLACEFIELD PLUS CONSTANT -WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY) RETTO (RESET \\STACKARGPTR) %DEFPRINT-VECTOR ( -%DEFPRINT-STRING %DEFPRINT-GENERIC-ARRAY %DEFPRINT-BITVECTOR CL:CODE-CHAR FFETCHFIELD VECTOR-LENGTH -CL:1-) |\\BrushFromWidth| (LIST) \\NSFILING.COURIER.OPEN (COURIER.OPEN FUNCTION CONSTANT LIST) -DINFO.UPDATE.TEXT.DISPLAY (FFETCHFIELD DINFO.GET.FILENAME APPEND LIST WINDOWPROP MKATOM INFILEP -DINFO.OPENTEXTSTREAM CONCAT MKSTRING CHARACTER) SI::CLEAR-CLOSURE-CACHE (UNINTERRUPTABLY CL:FUNCTION -XCL::CLEAR-IMPLICIT-KEY-HASH) PRINTERPROP (ASSOC) TEDIT.WORDGET (\\SYNCODE GETHASH FFETCHFIELD -\\GETBASEBYTE SMALLP CHCON1) XCL:BROADCAST-STREAM-STREAMS (FFETCHFIELD) STKNARGS (\\STACKARGPTR -ADDSTACKBASE \\VAG2 FFETCHFIELD IDIFFERENCE FOLDLO LRSH SUB1 \\INTERPFRAMENT PLUS GETSTKNAMEENTRY -\\ADDBASE UNFOLD LLSH IPLUS) STKSCAN (\\MYALINK OPCODES \\STACKARGPTR \\MAKESTACKP IDIFFERENCE FLOOR -LOGAND FFETCHFIELD ADDSTACKBASE \\VAG2 CONSTANT LOGXOR SUB1) STKNAME (\\STKNAME \\STACKARGPTR) -XCL::VARIABLE-GLOBALLY-SPECIAL-P (VARIABLE-GLOBALLY-SPECIAL-P GET) \\NSFILING.HOSTNAMEP ( -LOOKUP.NS.SERVER \\GETDEVICEFROMNAME MKATOM U-CASE NSNAME.TO.STRING PACK* FFETCHFIELD FUNCTION -CREATE.MONITORLOCK CONS FREPLACEFIELDVAL NCREATE) COMPILE-IN-CORE (RESETVARS .RESETLST. LIST CONS -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION OPENFILE RESETLST COMPILE1A BYTECOMPILE2) FRAMESCAN -(\\STACKARGPTR \\FRAMESCAN \\INTERPFRAMENT) MAXATTACHEDWINDOWEXTENT (ATTACHEDWINDOWS -MAXIMUMMAINWINDOWSIZE CONS MAXIMUMWINDOWSIZE SELECTQ WINDOWPROP DIFFERENCE PLUS MAX MIN) -COMPILER::VALUE-FOLDABLE-P (TYPEP) PSCFONT.COERCEFILE (PSCFONT.SPELLFILE LIST) VARS.PUTDEF (/SETTOPVAL -) MODERN-ADD-EXEC (APPLY ARG LIST PLUS PROCESSPROP) %ARRAY-READ (%SLOW-ARRAY-READ) -\\COURIER.EXPEDITED.OVERFLOW (PRIN1 RETFROM) SEDIT::MAKE-COMMENT-STRING (FFETCHFIELD CL:MAKE-STRING) -|GetPrinterName| (MENU |MakeMenuOfPrinters|) TEDIT.UNDO.INSERTION (IPLUS FFETCHFIELD FRPLACA) -PFI.PRINT.INDICES (IQUOTIENT LINELENGTH CHARWIDTH - PFI.LINES.REMAINING DREMOVE + LAST) LISPX/1 ( -LISPX/1 FASSOC CONS APPEND NCONC MAPCAR ARGTYPE GETPROP GETHASH) EOFP (\\EOFP FDEVOP SPREADAPPLY* -FFETCHFIELD \\GETSTREAM) EQUALHASH (EQUAL HARRAYPROP) |\\VFMFind| (\\BLT |\\VFMGet| ADD1 MESASIZE -|\\VFMGetBufferFor| FFETCHFIELD LOCF MESASETQ IQUOTIENT SUB1 \\GETBASE \\ADDBASE PLUS |\\VFMMerge|) -SPY.MAX (SPY.MAX FFETCHFIELD IMAX) %PRINT-ARRAY-CONTENTS (CL:1- CONSTANT CL:WRITE-CHAR) -\\LEAF.STRIP.QUOTES (CONCATCODES CHCON LIST) |\\LFGetFileName| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION |\\LFFileSpec| |\\LFFullFileName|) CL::PROCESS-ACCESSORS (CL::PS-INLINE) -GETSETQ (LIST KWOTE FMEMB FIXSPELL APPEND CONS) GATHEREXPORTS (RESETLST RESETSAVE LIST FUNCTION -OPENSTREAM OUTPUT \\DO-DEFINE-FILE-INFO) CL:PRINC-TO-STRING (\\PRINDATUM.TO.STRING) /DECLAREDATATYPE ( -LIST GETFIELDSPECS GETSUPERTYPE) UNIX-STREAM-EOFP-NEW (\\DTEST FFETCHFIELD) \\INTERPFRAMENT ( -ADDSTACKBASE \\VAG2 FFETCHFIELD) SEDIT::COPY-STRUCTURE-QUOTE (LIST FFETCHFIELD SEDIT::SUBNODE -FREPLACEFIELD) CHAT.TAKE.INPUT1 (GETPROMPTWINDOW PRIN1 FULLNAME PROMPTFORWORD OPENSTREAM) INITATOMS ( -ALLOCSTRING CHARACTER PLUS \\ADDBASE FUNCTION \\ATOMDEFINDEX NTYPX \\LOLOC SHOULDNT HELP) LISPXPRINT ( -LIST CONS PRINT) MOVEATTACHEDWINDOWS (PTDIFFERENCE WINDOWPOSITION ATTACHEDWINDOWS PTPLUS TOTOPW) -COMPILER::RESOLVE-VARIABLE-BINDING (DECLARE GET) CHAT.BUTTONFN (LOGAND WINDOWPROP FFETCHFIELD FUNCTION - LIST CHAT.MENU) %DEFPRINT-STRING (FFETCHFIELD VECTOR-LENGTH) SEDIT::COPY-STRUCTURE-LIST (MAPCAR -FFETCHFIELD) DECLAREDATATYPE (GETFIELDSPECS APPEND TRANSLATE.DATATYPE LITATOM LIST) XCL:SYNONYM-STREAM-P - (STREAMPROP) \\TFBRAVO.GET.NAMEDTAB (IMAGEOBJCREATE RATOM) PRINTSPP (LOCF \\ADDBASE FFETCHFIELD PRIN1 - SELECTC IDIFFERENCE CONSTANT IPLUS TERPRI) FB.SORT.VERSIONS (FFETCHFIELD SORT LIST LAST) -SEDIT::VERIFY-COMMENT (CL:THIRD FFETCHFIELD CL:LENGTH) COMP.STTAG (GETHASH FRPLACD PUTHASH) -FB.DELVER.FILES (FFETCHFIELD PLUS) \\FRAMESCAN (ADDSTACKBASE \\VAG2 FFETCHFIELD GETSTKNAMEENTRY ADD1 -FOLDLO LRSH IDIFFERENCE NTSLOT-VARTYPE GETSTKNTOFFSETENTRY IPLUS NTSLOT-OFFSET LOGAND UNFOLD LLSH PLUS - CONSTANT WORDSPERNAMEENTRY) \\NSFILING.WHENCLOSED (FFETCHFIELD DREMOVE \\GETDEVICEFROMHOSTNAME) -DINFO.UPDATE.HISTORY (FFETCHFIELD LIST CONS PLUS ATTACHMENU FONTP FUNCTION FREPLACEFIELDVAL NCREATE -FREPLACEFIELD) XCL::SHOW-CLOSURE-CACHE (XCL::IMPLICIT-KEY-MAP-HASH CL:FUNCTION) TEDIT.SETSYNTAX ( -TEDIT.GETSYNTAX APPLY* \\PUTBASEBYTE \\SETFATSYNCODE FFETCHFIELD SELECTQ) LISTFILES1 ( -SEND.FILE.TO.PRINTER) MB.CREATE.NWAYBUTTON (IMAGEOBJCREATE FONTCREATE FONTPROP MAPCAR STRINGWIDTH -BITMAPCREATE LIST DSPCREATE IPLUS SORT COPY SUB1 PLUS ITIMES LENGTH) \\GETREGION.CHECKBASEPT (APPLY* -FRPLACA FRPLACD) \\NSFILING.DIRECTORYNAMEP (\\NSFILING.GETFILE) COMPILE.FILE.RESET (REMOVE) -TRANSLATE.DATATYPE (MAPCAR PLUS SELECTQ ERROR CONS LOGAND - IPLUS ADD1 IDIFFERENCE |MakeBitField| -FRPLACA SHOULDNT) |\\LFReadPages| (ADD1 FFETCHFIELD PLUS |\\PFFindPageAddr| DIFFERENCE) -CL::ESTABLISH-ACCESSORS (CL::PS-TYPE CL:MAPCAN CL:FUNCTION CL::PS-ALL-SLOTS) CL:CHARACTER (CL:INT-CHAR - CL:LENGTH STRING CL:CHAR CL:ERROR) FTPPRINTMARK (FASSOC PRIN1 MARK#) EDITLOADFNS? (WHEREIS -LDIFFERENCE ASKUSER MAKEKEYLST GETPROP INFILEP FINDFILE FILEDATE STREQUAL LIST) UNIX-STREAM-CLOSE ( -UNIX-KILL UNIX-CHANNEL FFETCHFIELD REMOVE) \\POLYSHADE.BLT (MAPCAR SORT FFETCHFIELD CONS CRITSECT -IPLUS BLTSHADE IDIFFERENCE MAPC ADD1 IMIN NORMSECT) BITMAPWIDTH (FFETCHFIELD WINDOWPROP \\ILLEGAL.ARG) - TERM.HOME (MOVETO FREPLACEFIELD FFETCHFIELD) PRETTYPRINT3 (CLISPIFY) |\\PFGetFileMapPage| (FIXP -|\\PFVolumeNumber| |\\PFGetPage| ELT) PFI.CONDENSE.INDEX (ASSOC CONS LIST RPLACD SORT UNION FRPLACD -PFI.SORT.INDICES PFI.COMPUTE.INDEX.SHAPE) COPY.WINDOW.TO.BITMAP (WINDOWPROP BITMAPCREATE BITSPERPIXEL -DSPDESTINATION \\GETBASE \\TOTOPWDS SCREENBITMAP BITMAPCOPY) BITMAPHEIGHT (FFETCHFIELD WINDOWPROP -\\ILLEGAL.ARG) %ARRAY-WRITE (%SLOW-ARRAY-WRITE) EQUALALL (TYPENAME SELECTQ IEQP EQP EQUALALL STREQUAL -ARRAYORIG ARRAYTYP ARRAYSIZE ELT PLUS CL:ARRAY-DIMENSIONS CL:ARRAY-ELEMENT-TYPE CL:ADJUSTABLE-ARRAY-P -CL:FILL-POINTER SUB1 CL:ARRAY-TOTAL-SIZE XCL:ROW-MAJOR-AREF EQUALHASH GETSYNTAX GETCONTROL GETRAISE -GETECHOMODE GETDELETECONTROL EQUAL ECHOCONTROL EVERY DELETECONTROL GETDESCRIPTORS FETCHFIELD) -UNMAKEHARDCOPYSTREAM (DISPLAYSTREAMP WINDOWPROP \\ILLEGAL.ARG FMEMB IMAGESTREAMTYPE FUNCTION) -FILEPKGCOMS.PUTDEF (ASSOC SELECTQ ERROR LISTGET FILEPKGCOM FMEMB UNION FILEPKGTYPE) SPY.MERGE ( -HASHARRAY SPY.DELETE LISTGET SPY.SUM FFETCHFIELD SPY.MERGETREE SPY.MERGE1 NCONC1) -%DEFPRINT-GENERIC-ARRAY (CL:CODE-CHAR FFETCHFIELD) SEDIT::CHARCODE (SMALLP CL:FUNCALL FUNCTION) -\\REUSETO (IDIFFERENCE CONS LIST PLUS) |\\PFPutAllocationMapPage| (FIXP |\\PFVolumeNumber| -|\\PFPutPage| ELT) PFI.PREVIEW.DEFINEQ (SKIPSEPRCODES READ TERPRI) CHAT.CLOSEFN (CHAT.CLOSE) -NSOCKETFROMNUMBER (\\NSOCKET.FROM# FFETCHFIELD) EXEC-PRIN1 (WRITE) RECEVAL (EVAL APPLY*) HCOPYALL1 ( -TYPENAME GETHASH SELECTQ FRPLNODE PUTHASH CONS HCOPYALL1 CONCAT FPLUS IPLUS ARRAYSIZE ARRAYTYP -ARRAYORIG ARRAY SETA ELT PLUS HASHARRAY HARRAYSIZE HARRAYPROP COPYREADTABLE BITMAPCOPY COPYTERMTABLE -GETDESCRIPTORS NCREATE REPLACEFIELD FETCHFIELD) \\HDCPYDSPPRINTCHAR (FFETCHFIELD \\CARET.DOWN SELECTC -\\SYNCODE GETHASH \\GETBASEBYTE LOGAND PLUS IPLUS LOGOR SELCHARQ FREPLACEFIELD SELECTQ MACHINETYPE -PLAYTUNE FLASHWINDOW WFROMDS CHARWIDTH UNFOLD LLSH \\DISPLAYSTREAMINCRXPOSITION IDIFFERENCE MOD IMOD -IQUOTIENT SHOULDNT) LISPXEVAL (HISTORYSAVE EVAL LISPX/) \\FTP.EOL.FROM.PLIST (SELECTQ) SPY.MERGEINFO ( -LISTGET FASSOC) FILES.PUTDEF (FILECOMS GETPROP FILEPKG.MERGECHANGES /RPLACD /PUTPROP) -SEDIT::BACKSPACE-QUOTE (SEDIT::SUBNODE FFETCHFIELD CL:FUNCALL SEDIT::QUOTE-WRAPPER SEDIT::CHANGE-QUOTE - SEDIT::DELETE-NODES SEDIT::SET-POINT SHOULDNT) \\TURN.ON.HUNKING (\\SETUP.TYPENUM.TABLE) -\\ADDLEAFSTRING (LOCF \\ADDBASE CEIL LOGAND IPLUS FFETCHFIELD CONSTANT SUB1 LOGXOR \\PNAMECELL -\\ATOMCELL STRINGP MKSTRING %ARRAY-BASE %ARRAY-OFFSET FOLDLO LRSH \\DECRYPT.PWD.CHAR \\GETBASEBYTE -PLUS) |\\LFSetFileInfo| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FFETCHFIELD -|\\LFGetStreamForFile| SELECTQ IDATE \\ILLEGAL.ARG) CL::SETF-NAME (XCL:PACK LIST) LINELENGTH ( -\\GETSTREAM FFETCHFIELD FIX) FTPDEBUG (CREATEW FUNCTION WINDOWPROP FONTCREATE) \\DUMPEXPORTS ( -SUBSTRING PRETTYCOM TERPRI) FIXR (FIXP LISPERROR NTYPX FFETCHFIELD ADD1 IDIFFERENCE IGEQ LOLOC \\LOLOC - FLOAT IPLUS LLSH LRSH LOGAND PLUS SUB1 FIX FPLUS SELECTQ .LRSH1. LOGOR .LRSHSTICKY. \\MAKENUMBER) -CHAT.SWITCH.EMACS (CHAT.SCREENPARAMS) COMP.STJUMP (CONS GETHASH SELECTQ SUB1 OPT.COMPILERERROR IGEQ -FRPLACD) ATAN (FLOATP FLOAT FLESSP FDIFFERENCE FQUOTIENT FPLUS FTIMES POLYEVAL \\FLOATBOX OPCODES) -SI::INSTALL-CLOSURE-CACHE (UNINTERRUPTABLY) SLITLOOP (COPY HEADPT NCONC LIST \\SGN IDIFFERENCE XYPT.Y -CONS REVERSE) TEDIT.GETSYNTAX (SELECTC \\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE APPLY*) -SAVECOPYRIGHT (GETPROP LIST) GLOBALVARS (UNION) NEW/FN (CHCON1 PACK DUNPACK PACK* /NCONC1 CONS) PPSPP -(\\GETSTREAM \\FETCH.NSADDRESS NCREATE LOCF \\ADDBASE FFETCHFIELD TERPRI PRIN1 SELECTC FQUOTIENT -CLOCKDIFFERENCE \\LOLOC IDIFFERENCE SUB1 IPLUS \\QUEUELENGTH LIST OUTPUT CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION ILESSP ELT RETRANSMITINDEX IMOD SEQ.ADD1 \\GETACCESS) \\NSFILING.CHILDLESS-P - (ASSOC FILING.CALL FFETCHFIELD CONSTANT \\FILING.ATTRIBUTE.TYPE.SEQUENCE) COMPILE.FILE.APPLY (PRINT -CONS APPLY*) SCANFILEHELP (INPUT HELP) MINATTACHEDWINDOWEXTENT (ATTACHEDWINDOWS MINIMUMMAINWINDOWSIZE -MINIMUMWINDOWSIZE SELECTQ WINDOWPROP DIFFERENCE PLUS MAX MIN CONS) INSURE.DASHING (DASHINGP -\\ILLEGAL.ARG) COMPILER::RESOLVE-VARIABLE-REFERENCE (DECLARE COMPILER::MAKE-VAR-REF) |GetImageFile| ( -|PopUpWindowAndGetAtom| PACKFILENAME WINDOWPROP APPLY* MKLIST ASSOC DEFAULTPRINTER PRINTERTYPE -|MakeMenuOfImageTypes| PRINTFILETYPE.FROM.EXTENSION CONS MENU) CL::SXHASH-PATHNAME (CL::SXHASH-ROT -LOGXOR CL::%SXHASH %PATHNAME-HOST %PATHNAME-DEVICE %PATHNAME-TYPE %PATHNAME-VERSION -%PATHNAME-DIRECTORY %PATHNAME-NAME) SEDIT::COMPUTE-POINT-POSITION-LIST (FFETCHFIELD IPLUS -FREPLACEFIELD SEDIT::SUBNODE NTH IMAX IDIFFERENCE IMIN HALF LRSH) TYPE-VARIABLE-FROM-TYPE-NAME ( -FFETCHFIELD \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT NAMESTRING-CONVERSION-CLAUSE PACK* CL:FIRST -SUBSTRING CL:1+ CL:INTERN CONCAT MKSTRING CL:SYMBOL-PACKAGE) SENDXIP (\\DTEST LOCF \\ADDBASE PRIN1 -\\ROUTE.XIP) SEDIT::UNDO-COMMENT-CHANGE (FREPLACEFIELD CONS LIST FFETCHFIELD SEDIT::PARSE-STRING-INTO-WORDS - SEDIT::CREATE-SIMPLE-NODE PLUS FLENGTH SEDIT::NOTE-CHANGE) FORMAT-DO-ITERATION (CL:CATCH) -INSTALLBRUSH (FASSOC FRPLACA ARRAY APPLY* PLUS CONS) |\\LFWritePages| (ADD1 FFETCHFIELD -|\\PFFindPageAddr| PLUS) CHAT.ICONFN (WINDOWPROP TITLEDICONW CONS FONTCREATE) UNIX-BACKFILEPTR-NEW ( -FFETCHFIELD FREPLACEFIELD PLUS ERROR) OPT.CFRPTQ (CONS ADD1 COMP.EXP1) PREINITARRAYS (\\PUTBASEPTR -LOCF \\ATOMCELL \\VAG2 SETQ.NOREF PAGELOC IPLUS LLSH \\HILOC LRSH \\LOLOC) |\\DSKCreateDevice| ( -\\UFS.CREATE.DEVICE FUNCTION) CHAT.TAKE.INPUT (PROCESS.APPLY WINDOWPROP FUNCTION LIST) ARCTAN2 (FLOATP - FLOAT ARCTAN ABS FQUOTIENT FPLUS FDIFFERENCE FTIMES) ADDSPELL1 (LIST CONS) CL::%SXHASH ( -\\EQHASHINGBITS LOGXOR \\HILOC LLSH LOGAND \\LOLOC LRSH CL::SXHASH-LIST CL::SXHASH-STRING -CL::SXHASH-BIT-VECTOR CL::SXHASH-PATHNAME) MSSOLVE (MSLISTSET SELECTQ OUTPUT CL:VALUES FRPLACD FRPLACA - LIST CONS PRINT SUBSET MSMEMBSET) RECDEC? (RECDEC? FMEMB) HCOPYALL (HASHARRAY HCOPYALL1) -INITDATATYPES (ALLOCAL LENGTH \\ADDBASE SUB1 FOLDHI LRSH IPLUS ADD1 TIMES LOCAL \\GETDTD ITIMES LOGOR -FMEMB CONSTANT PLUS \\PUTBASEPTR LOCF \\ATOMCELL) POSTEDITALISTS (GETTOPVAL LIST GETHASH) -SPY.MAKEGRAPHNODES (FFETCHFIELD ASSOC SHOULDNT CONS SPYOBJ QUOTIENT TIMES SPY.MAX LIST -SPY.MAKEGRAPHNODES) \\PARSE.REMOTE.FILENAME (FFETCHFIELD UNPACKFILENAME.STRING STRPOS -\\LEAF.STRIP.QUOTES \\CANONICAL.HOSTNAME ERROR LISPERROR CONS CONCATLIST NCONC LIST SELECTQ NCHARS) -COMPILER::FIND-TOP-ENVIRONMENT (COMPILER::ENV-PARENT) GET-NEXT-HISTORY-EVENT (HISTORY-EVENTS -MAKE-EXEC-EVENT LIST* HISTORY-INDEX CL:NTHCDR CL:1- HISTORY-SIZE) \\FDIFS/FROM/DERIVS (FQUOTIENT -FTIMES LIST FPLUS) CLISPATOM1 (GETPROP IMINUS LENGTH FLAST FMEMB LDIFF PACK NCONC1 ADD1 SUB1 LIST -LISTGET1 NCONC NTHCHAR UNPACK CONS NLEFT FUNCTION GETP CLISPATOM1A CLISPATOM1B) NSOCKETEVENT (\\DTEST -FFETCHFIELD) FB.DELVERCOMMAND (MENU FREPLACEFIELDVAL NCREATE CONS RNUMBER MKATOM FB.PROMPTW.FORMAT -TB.COLLECT.ITEMS FFETCHFIELD FUNCTION FB.DELVER.FILES SELECTQ FB.SORT.VERSIONS SORT) -\\NSFILING.GET.STREAM (FFETCHFIELD \\NSFILING.COURIER.OPEN CONS LIST FUNCTION) SI::DISABLE-CLOSURE-CACHE - (UNINTERRUPTABLY) \\UFS.CREATE.DEVICE (\\MAKE.PMAP.DEVICE FUNCTION FREPLACEFIELDVAL NCREATE) -\\TEDIT.WORDBOUND.READTABLE (HARRAY FREPLACEFIELDVAL NCREATE \\PUTBASEBYTE \\SETFATSYNCODE FFETCHFIELD - PLUS \\SETSYNCODE LIST) |\\DSKCloseDevice| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION) COMPILEDREPLACEFIELD (LIST FUNCTION KWOTE SELECTQ SUBPAIR) \\GOOD.DASHLST (INSURE.DASHING -IQUOTIENT IPLUS BITMAPHEIGHT BITMAPWIDTH FIXR LENGTH APPEND TIMES ADD1 SUB1 LIST) DISPLAYP ( -\\OUTSTREAMARG \\GETSTREAM DISPLAYSTREAMP IMAGESTREAMTYPEP) THREESTATE.INIT (IMAGEFNSCREATE FUNCTION) -SEDIT::CFV-QUOTE (FFETCHFIELD IPLUS FREPLACEFIELD) \\NSFILING.DELETEFILE (\\NSFILING.GETFILE FUNCTION) - COMPILE-FILE-EX/IMPORT (EVAL) \\APPEND2 (CONS LIST) \\UFS.UNREGISTER.GFS (UNINTERRUPTABLY FFETCHFIELD - PUTHASH) DO-HISTORY-SEARCH (EDITFPAT EXEC-EVENT-INPUT CL:GETF) \\CURVESLOPE (LENGTH SELECTQ CONS -DIFFERENCE PARAMETRICSPLINE REVERSE NLEFT IMIN LIST ELT MINUS) ITEMOFPROPERTYVALUE (MEMB -\\SELITEM.FROM.PROPERTY WINDOWPROP) OPT.COMPINIT (SET CONS LIST) GETXIP (\\DTEST FFETCHFIELD \\DEQUEUE - FREPLACEFIELD PLUS FIXP SETUPTIMER TERPRI) SEDIT::CREATE-COMMENT-WORD-NODES (NCHARS NTHCHARCODE -SEDIT::CREATE-COMMENT-WORD-NODE SUBSTRING ADD1 SUB1 CONS) CLISPTRAN (HASHARRAY /PUTHASH /RPLNODE CONS) - EVENTS-INPUT (CONS MAPCAR EXEC-EVENT-INPUT FMEMB LDIFF) NEAREST/MULTIPLE (ITIMES IQUOTIENT IPLUS -IDIFFERENCE) |\\DSKEventFn| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SELECTQ -MACHINETYPE CLRHASH \\FLUSH.OPEN.STREAMS) DRAWLINE (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM -FFETCHFIELD) \\TEDIT.GET.SINGLE.PARALOOKS (FREPLACEFIELDVAL NCREATE CONS GETFILEPTR \\SMALLPIN SUB1 -LLSH IDIFFERENCE \\BIN SELECTC SHOULDNT LOGAND SELECTQ LIST PLUS ZEROP \\ARBIN \\ATMIN IPLUS) -\\UNVISIBLE.PAGED.REVALIDATEFILELST (FFETCHFIELD \\PAGED.REVALIDATEFILE RESTOREMAP FORGETPAGES -STREAMPROP APPLY* SPREADAPPLY*) \\SELITEM.FROM.PROPERTY (WINDOWPROP) ALLOCHASH (CONS LIST KWOTE) -FILEPKG.CHANGEDFNS (ASSOC) INITIALIZE-NEW-SHELL-DEVICE (FUNCTION FREPLACEFIELDVAL NCREATE) -PROPS.WHENCHANGED (GETPROP MARKASCHANGED) \\UNVISIBLE.FLUSH.OPEN.STREAMS (FFETCHFIELD LOGAND CONSTANT -LOGOR SPREADAPPLY*) PRINTDATE (DATE ROOTFILENAME FILEPKG.MERGECHANGES GETPROP CONS FULLNAME LAST) -PFI.PREVIEW.DECLARE (SKIPSEPRCODES READ) NSOCKETNUMBER (\\DTEST FFETCHFIELD) FILEFNSLST (FILECOMSLST) -MAKEHARDCOPYSTREAM (DISPLAYSTREAMP WINDOWPROP DSPCREATE \\ILLEGAL.ARG PRINTERPROP PRINTERTYPE FUNCTION - DSPFONT DSPRIGHTMARGIN) COMPILEDFETCHFIELD (LIST FUNCTION KWOTE SELECTQ SHOULDNT) SPY.UPDATE.TITLE ( -NODELST/AS/MENU WINDOWPROP CONS LASTMOUSEX LASTMOUSEY DSPCLIPPINGREGION DOWINDOWCOM CONCAT FFETCHFIELD - QUOTIENT TIMES UNTILMOUSESTATE ZEROP LOGAND) PRETTYCOM (LIST FIXSPELL FUNCTION FASSOC GETTOPVAL -SUBPAIR PRETTYCOM1 PRETTYCOM PRETTYVAR CONS MAKEDEFLIST PRINTDEF1 GETPROPLIST NCONC PRIN2 ADD1 -POSITION PRINTDEF PRIN1 PRETTYVAR1 ERRORX EVAL |printout| KWOTE GETDEF TERPRI) \\LEAF.READFILENAME ( -\\LEAF.READFILEPROP |GetBcplString| FFETCHFIELD CL:APPLY MKATOM U-CASE) CREATEMDSTYPETABLE (UNFOLD -LLSH \\PUTBASE PLUS LIST SUB1 LOGOR FOLDLO LRSH \\MAKEMDSENTRY PAGELOC IPLUS \\HILOC \\LOLOC) SQRT ( -FLOAT LOGAND IPLUS LRSH IDIFFERENCE \\HILOC \\FLOATUNBOX MASK.1\'S LSH SUB1 \\FLOATBOX \\VAG2 LOGOR -LLSH PLUS FTIMES FPLUS FQUOTIENT) GET.OBJ.FROM.USER (ERSETQ PROMPTFOREVALED FFETCHFIELD) PRETTYPRINT ( -RESETLST RESETSAVE LIST FUNCTION DSPFONT GETSTREAM CLOCK OUTPUT EVALV CLOCKDIFFERENCE GETFILEPTR -VIRGINFN ARGTYPE CONS EDITLOADFNS? MISSPELLED? NLEFT) FILECHANGES (RESETLST OPENP GETFILEPTR LIST -OPENSTREAM LDIFF MEMB ASSOC SUBSET LITATOM NCONC CONS LISTP) |BitFieldFirst| (LRSH) -MB.THREESTATE.WHENOPERATEDFN (SELECTQ MB.THREESTATE.SHOWSELFN FREPLACEFIELD) |\\UFSCreateDevice| ( -\\UFS.CREATE.DEVICE FUNCTION) PRETTYDEF1 (MEMB SUBPAIR LIST CONS UNION INTERSECTION) DSPBACKCOLOR ( -IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) COMPILE-FILE-SETF-SYMBOL-FUNCTION (CL:THIRD - CL:SECOND BYTECOMPILE2 PRINT WALK-FORM FUNCTION) PRETTYDEF (RESETLST RESETSAVE RESETUNDO LIST -ROOTFILENAME GET \\DO-DEFINE-FILE-INFO COPY LOOKUP-ENVIRONMENT-AND-FILEMAP OPENSTREAM INPUT UNION -FILEPKG.CHANGEDFNS GETPROP GET-ENVIRONMENT-AND-FILEMAP FUNCTION OUTPUT GETFILEPTR FULLNAME) -COMPILEDNCREATE (LIST \\TYPEGLOBALVARIABLE) COMPILER::ENV-DECLARE-A-GLOBAL (COMPILER::ENV-DECLARED-GLOBALS -) DRAWDASHEDLINE (IDIFFERENCE FIX SQRT IPLUS ITIMES TIMES LIST FQUOTIENT PLUS FPLUS FTIMES MOVETO) -SEDIT::CFV-LIST (FFETCHFIELD CL:FUNCALL ITIMES IMAX IPLUS SEDIT::NEXT-NODE-TYPE SELECTQ SHOULDNT IMIN -FREPLACEFIELD) PRETTYDEF0 (DELFILE CLOSEF) PRINTFNS (TCONC GETFILEPTR) \\TFBRAVO.PUT.NAMEDTAB (PRINT -IMAGEOBJPROP) D-ASSEM::FIXUP-NTENTRY (\\LOLOC \\HILOC LOGOR \\GETBASEBYTE LOGAND LRSH + \\PUTBASEBYTE -CL:1+) FORMAT-CONDITION (FORMAT-BOOLEAN-CONDITION FORMAT-FUNNY-CONDITION FORMAT-UNTAGGED-CONDITION) -|\\PFGetAllocationMapPage| (|\\PFGetPage| ELT FIXP |\\PFVolumeNumber|) \\CH.PRINT.BLURB (PRIN1 -|printout|) |\\UFSGenerateFiles| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION -|\\UFSGetMonitor| FFETCHFIELD) CHECKFORCHANGED (MSINTERPRETSET UPDATEFN) \\COPYDATATYPE (NTYPX -\\GETDTD \\ADDBASE ITIMES FFETCHFIELD CREATECELL MAPC \\ADDREF OPCODES \\RPLPTR COPYALL \\GETBASEPTR) -%REDUCE-INTEGER (CL:1+ CL:1- MAX -) D-ASSEM::CREATE-HUNK (D-ASSEM::EMIT-BYTE-LIST) |\\LFOpenFile| ( -WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FASSOC CONS IDATE FIXP \\ILLEGAL.ARG -REMOVE FFETCHFIELD |\\LFGetStreamForFile| FREPLACEFIELD CL:ERROR) |\\UFSWritePages| (IPLUS ITIMES -FFETCHFIELD CREATECELL |\\UFSWritePages-C| |\\UFSError| PLUS) \\SETUP.HUNK.TYPENUMBERS (APPEND -\\COMPUTE.HUNK.TYPEDECLS) PRETTYDEFCOMS (GETTOPVAL PRETTYCOM) CHAT.ENDOFSTREAMOP (STREAMPROP FUNCTION) - |\\UFSOpenFile| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION |\\UFSGetMonitor| -FFETCHFIELD SELECTQ CREATECELL SUBSTRING ADD1 STRPOS \\UFS.RECOGNIZE.FILE \\UFS.OPENP LOGAND CONSTANT -LOGOR \\UFS.FULLNAME \\UFS.ADD.HOST.FIELD |\\UFSOpenFile-C| |\\UFSError| IPLUS FOLDLO LRSH IMOD -|\\UFSeol| FASSOC FREPLACEFIELDVAL NCREATE IDATE) CHAT.TYPESCRIPT (FFETCHFIELD FUNCTION LIST) -LISTRECORDEFS (CONS LISTRECORDEFS PLUS) CL::DEFAULT-PREDICATE-NAME (CL:VALUES CL:INTERN CL:CONCATENATE - STRING) COMPILER::ENV-DECLARE-A-SPECIAL (COMPILER::ENV-DECLARED-SPECIALS) D-ASSEM::COPY-LAP-CODE ( -LIST) |\\UFSDirectoryNameP| (CONCAT UNPACKFILENAME.STRING \\UFS.HANDLE.RELATIVEDIRECTORY -\\UFS.DEFAULT.DIR FFETCHFIELD ALLOCSTRING \\UFS.DIRECTORY.NAME \\UFS.FULLNAME SUBSTRING) -SETUPTIMER.DATE (SETUPTIMER IDIFFERENCE IDATE) SEDIT::BACKSPACE-LIST (FFETCHFIELD -SEDIT::SET-SELECTION-NOWHERE SEDIT::SUBNODE NTH CL:FUNCALL) PRINTDATE1 (FULLNAME CHANGEFONT CONS ADD1 -GETFILEPTR PRINTDEF POSITION PRIN2 PRIN1) MOVETO (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM -FFETCHFIELD) OPT.NOTJUMP (SELECTQ CONS) CRITSECT (TERPRI FFETCHFIELD IMIN IMAX FREPLACEFIELD) -DSPCLIPPINGREGION (NUMBERP IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD \\ILLEGAL.ARG) -FB.DELETE.FILE (TB.USERDATA FFETCHFIELD PLUS) HARDCOPY.SOMEHOW (WINDOWPROP HARDCOPYW) SUBPAIR (CONS -SUBPAIR COPY) PFI.HANDLE.FILEMAP (PFI.PRETTYPRINT LIST) D-ASSEM::TYPE-NAME-FROM-SIZE (PACK*) -\\TEDIT.PROCEXITFN (PROCESSPROP \\TEDIT.INTERRUPT.SETUP) POSTSCRIPT.PUTBITMAPBYTES (FFETCHFIELD LRSH -IPLUS LSH SUB1 ITIMES \\GETBASEBYTE LOGAND PLUS IMINUS \\FILEOUTCHARFN BITMAPCREATE ADD1 IDIFFERENCE) -CL:MACROEXPAND-1 (CL:MACRO-FUNCTION CL:FUNCALL CL:VALUES) UNDOSET (LIST GETTOPVAL FRAMESCAN STKARG) -MB.THREESTATE.SHOWSELFN (IMAGEOBJPROP IMAGEBOX SUB1) D-ASSEM::COPY-LAP-FN (D-ASSEM::COPY-LAP-CODE LIST -) \\FTP.UNPACKFILENAME (UNPACKFILENAME.STRING SELECTQ CONS LIST \\CANONICAL.HOSTNAME NCHARS CONCAT -GETHOSTINFO NTHCHARCODE SUBSTRING L-CASE \\FTP.ADD.USERINFO) COMPILE.FILE.DEFINEQ (ARGTYPE COMPILE1A) -\\FIXPASSWORD (\\INTERNAL/GETPASSWORD FFETCHFIELD SELECTC LIST) |\\LFGenerateFiles| (WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION |\\LFParseFileName| \\NULLFILEGENERATOR -|\\LFFindDirectory| SUB1 %ARRAY-OFFSET FFETCHFIELD %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER ADD1 -\\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE \\LFCASEARRAYFETCH LIST CONS DIRECTORY.MATCH.SETUP -CONDCONCAT CONCATLIST PACKFILENAME.STRING U-CASE |\\PFGetVol| |\\PFFetchString| LOCF \\ADDBASE -|\\LFFindNextFile| NCHARS |\\LFHighestVersions|) |\\UFSRenameFile| (\\GENERIC.RENAMEFILE -\\UFS.RECOGNIZE.FILE CREATECELL \\UFS.REMOVE.HOST.FIELD \\UFS.FULLNAME IPLUS CONCAT) DSPCOLOR (IMAGEOP - SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) INCORNER.REGION (IABS IMINUS IDIFFERENCE IPLUS) -|\\UFSTruncateFile| (FIXP FFETCHFIELD + UNFOLD LLSH CREATECELL \\GETFILEPTR SPREADAPPLY* - PLUS -|\\UFSGetSize-C| |\\UFSError|) CHAT.CLEAR.FROM.MENU (TERM.HOME) SEDIT::STRINGIFY-COMMENT (FFETCHFIELD) - ARCTAN (FPLUS FQUOTIENT FTIMES POLYEVAL \\FLOATBOX OPCODES FDIFFERENCE) |\\PFCreatePage| ( -|\\PFTransferFilePage|) |\\UFSCloseFile| (FFETCHFIELD CREATECELL LOGAND CONSTANT LOGOR SPREADAPPLY* -|\\UFSError|) MSCHECKEMPTY (TERPRI FILEPKGCHANGES APPEND LIST ASKUSER ITIMES CONS) DSPBOTTOMMARGIN ( -IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) HPRINSP (SPACES) DINFO.SETUP.WINDOW ( -CONCAT FFETCHFIELD WINDOWADDPROP) |\\UFSReadPages| (FFETCHFIELD PLUS CREATECELL |\\UFSReadPages-C| -|\\UFSError| -) |\\UFSDeleteFile| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION -|\\UFSGetMonitor| FFETCHFIELD \\UFS.RECOGNIZE.FILE CREATECELL \\UFS.REMOVE.HOST.FIELD \\UFS.FULLNAME -|\\UFSError|) |\\PFCreateFreePage| (|\\PFCreatePage| ELT FIXP |\\PFVolumeNumber|) -\\NSFILING.GET.NEW.SESSION (\\GETFILINGCONNECTION \\NSFILING.DISCARD.SESSION) PTON10GRID ( -NEAREST/PT/ON/GRID) MSOUTPUT (OUTPUT LIST LINELENGTH) OPT.CHECKTAG (FRPLACD) HVREADERR (ERROR) -FILEPKG.MERGECHANGES (APPEND LIST ASSOC NCONC1) D-ASSEM::FETCH-HUNK (CL:REVERSE) \\NSFILING.EVENTFN ( -SELECTQ FFETCHFIELD \\NSFILING.CLOSE.CONNECTIONS APPEND LOGAND CONSTANT LOGOR TERPRI CLOSEF -\\REMOVEDEVICE) PRINTDEF1 (GETFILEPTR LIST CONS TERPRI) |\\LFEventFn| (WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SELECTQ DSKDISPLAY MACHINETYPE -\\PAGED.REVALIDATEFILELST |\\PFGetVols|) D-ASSEM::EMIT-BYTE-LIST (MAPC D-ASSEM::EMIT-BYTE) -DO-APPLY-EVENT (ARGTYPE CL:FUNCALL CL:EVAL CL:APPLY) \\CURVEEND (IDIFFERENCE IABS IMINUS IPLUS ADD1 -ITIMES DSPDESTINATION \\GETBASE \\TOTOPWDS \\FBITMAPBIT \\BBTCURVEPT SUB1 PLUS) D-ASSEM::END-BYTES ( -CL:NREVERSE) RELEASE.XIP (\\RELEASE.ETHERPACKET) SEDIT::CREATE-COMMENT-WORD-NODE (SEDIT::CREATE-SIMPLE-NODE - FFETCHFIELD) \\TAN-FLOAT (- CL:REM ABS FTIMES / POLYEVAL \\FLOATBOX OPCODES) |\\UFSGetFileInfo| ( -WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION |\\UFSGetMonitor| FFETCHFIELD -\\UFS.FULLNAME \\UFS.RECOGNIZE.FILE CREATECELL SELECTQ |\\UFSError| FOLDHI LRSH IPLUS -|\\UFSGetFileType| GDATE ALLOCSTRING |\\UFSGetFileInfo-C| CL:SUBSEQ \\UFS.CREATE.PROPS ASSOC) -PFI.HANDLE.PACKAGE (PFI.PRETTYPRINT) D-ASSEM::MAX-ARG (\\FINDOP - CL:SECOND CL:FIRST) SCROLLW ( -\\CARET.DOWN APPLY* FFETCHFIELD FUNCTION) \\TEDIT.PROCENTRYFN (\\TEDIT.INTERRUPT.SETUP) \\PS.BOUTFIXP -(IMINUS BOUT IPLUS FFETCHFIELD SUB1 IREMAINDER IQUOTIENT PLUS \\BOUTS IDIFFERENCE MAPC CHCON -\\CHAR8CODE LOGAND) PRETTYVAR (GETTOPVAL TERPRI) DSPFONT (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG -\\GETSTREAM FFETCHFIELD) MB.THREESTATEBUTTON.FN (FFETCHFIELD IMAGEOBJPROP SELECTQ TEXTSTREAM) -\\FTP.OPENFILE.FROM.PLIST (\\GETFTPCONNECTION SELECTQ MARK# FTPPUTMARK FTPGETMARK READPLIST -\\FTP.PACKFILENAME ASSOC \\FTPERROR LISPERROR \\FTP.EOL.FROM.PLIST) ASKUSERCHAR (CHCON1 IDIFFERENCE) -COMPILE.CHECK.ARGTYPE (COMP.ARGTYPE MAPC FMEMB EVALV PRIN1 /SETTOPVAL CONS GETTOPVAL LIST ASSOC TERPRI - REMOVE) \\LEAF.DIRECTORYNAMEONLY (FILENAMEFIELD STRPOS SUBATOM SUB1) DECLSUBFIELD (ASSOC -RECORD.FIELDINFO RECORDECL0 RECORD.NAME FRPLACA RECORD.CREATEINFO APPEND RECORD.FIELDNAMES -ADD.RECORD.SUBDECS NCONC1) CL::CACHE-PREDICATE-INFO (CL::GET-PS-FROM-PREDICATE) COMPILER::ENV-DECLARE-GLOBALS - (COMPILER::ENV-DECLARED-GLOBALS CL:APPEND) D-ASSEM::REF-VAR (CL:FIRST CL:ERROR) \\ITEMW.SELECTITEM ( -WINDOWPROP) FIXPRINTIN (POSITION) SEDIT::ASSIGN-FORMAT-QUOTE (SEDIT::SET-FORMAT FFETCHFIELD -SEDIT::GET-LIST-FORMAT) PRETTYVAR1 (LINELENGTH TYPENAME SPACES TERPRI CONS APPEND POSITION FUNCTION) -|\\UFSGetFileName| (\\UFS.FULLNAME \\UFS.RECOGNIZE.FILE) \\TFBRAVO.COPY.NAMEDTAB (COPY) |\\UFSError| ( -IPLUS \\UFS.FULLNAME) WHO-LINE-WHAT-IS-RUNNING (CONSTANT LIST STKPOS FRPLACA STKNTH STKNAME) -|\\LFDirectoryNameP| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION -|\\LFParseFileName| |\\LFFindDirectoryVol| PACKFILENAME.STRING U-CASE |\\PFFetchString| LOCF \\ADDBASE - FIXP LASTCHPOS SUBSTRING) \\UFS.OPENP (FFETCHFIELD FUNCTION) OPT.CHLEV (PLUS IGEQ) \\GTREADTABLE1 ( -GETHASH LISPERROR) DSPRESET (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) -|\\UFSSetFileInfo| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION |\\UFSGetMonitor| -FFETCHFIELD \\UFS.FULLNAME \\UFS.RECOGNIZE.FILE CREATECELL SELECTQ |\\UFSSetFileType| IDATE -|\\UFSSetFileInfo-C| |\\UFSError| ERROR) TB.MAP.SELECTED.ITEMS (SUB1 \\DTEST FFETCHFIELD PLUS -TB.NTH.ITEM CL:FUNCALL) \\UFS.ADD.HOST.FIELD (CONCAT FFETCHFIELD) OPT.JUMPCHECK (SELECTQ) TAN ( -\\TAN-FLOAT FTIMES) \\UFS.FULLNAME (FFETCHFIELD CONCAT MKATOM U-CASE) VERBNOTICELIST (UNION -VERBNOTICELIST MSVBTABLES TERPRI ERROR!) MAKEDEFLIST (SOME GETPROPLIST LIST MEMB) BLOCK\: (NCONC1) -|\\VFMCreateVPage| (FREPLACEFIELDVAL NCREATE ELT |\\PFVolumeNumber| |\\VAMAllocPageGroup| FFETCHFIELD) - DSPRIGHTMARGIN (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) POSTEDITPROPS ( -GETPROPLIST GETHASH LIST) SEDIT::SELECT-NODE-SEGMENT (FFETCHFIELD SEDIT::PENDING-DELETE) -\\READCLASSTOCODE (\\COMPUTED.FORM SELECTQ LOGOR) MKPROGN (CONS) |\\UFSCloseDevice| (WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) COMPILER::ENV-DECLARE-SPECIALS ( -COMPILER::ENV-DECLARED-SPECIALS CL:APPEND) \\UFS.REMOVE.HOST.FIELD (UNPACKFILENAME.STRING MEMB LISTGET - FFETCHFIELD FIXP MKATOM \\UFS.HANDLE.RELATIVEDIRECTORY \\UFS.DEFAULT.DIR PACKFILENAME.STRING -SUBSTRING NTHCHARCODE CONCAT) SEDIT::ASSIGN-FORMAT-LIST (CL:FUNCALL FFETCHFIELD) \\GETREADSYNTAX ( -\\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE \\COMPUTED.FORM SELECTQ \\GETREADMACRODEF LIST* LOGAND -SELECTC CL:APPEND LIST) |\\UFSEventFn| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION - SELECTQ MACHINETYPE CLRHASH \\FLUSH.OPEN.STREAMS) |\\UFSeol| (SELECTQ |\\UFSGetFileType| -\\UFS.PARSE.BODY |\\UFSParseNameString| PRIN1) D-ASSEM::DCODE-FROM-DLAMBDA (D-ASSEM::MAKE-DCODE -D-ASSEM::DLAMBDA-NAME D-ASSEM::START-BYTES D-ASSEM::EASY-ENTRY-P CL:FIND D-ASSEM::DLAMBDA-BODY -D-ASSEM::END-BYTES) PRETTYCOM1 (EVAL GETTOPVAL RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION SUBSET) WHO-LINE-TTY-STATE (TTY.PROCESS THIS.PROCESS PROCESS.EVALV -STKNTHNAME GETPROP PLUS) D-ASSEM::CHOOSE-OP (D-ASSEM::MAX-ARG) \\UPDATE.PSC (\\SETPOS.PSC) -\\TEDIT.COPYINSERTFN (TEXTSTREAM WINDOWPROP TEXTOBJ FFETCHFIELD) POSTSCRIPT.SHOWACCUM (FFETCHFIELD -STREAMPROP CONCAT DIFFERENCE CONSTANT FREPLACEFIELD) UNDOPRINT (PRIN2) DSPLINEFEED (IMAGEOP -SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) HPINITRDTBL (GETATOMVAL COPYREADTABLE CONSTANT -LIST FUNCTION) ASKUSER1 (LISTGET CONSTANT CHARACTER PACKC NTHCHAR) ARGTYPE.STATE (MAPC PRINTOUT EVAL -TERPRI) LISTFILES (NLAMBDA.ARGS APPEND FINDFILE TERPRI REMOVE NAMEFIELD LIST) GETSYNTAX (\\GETCHARCODE - \\GETTERMSYNTAX \\GETREADSYNTAX \\GTREADTABLE \\READCLASSTOCODE FFETCHFIELD FUNCTION -\\TERMCLASSTOCODE \\GTTERMTABLE SELECTQ) PFI.HANDLE.* (SEMI-COLON-COMMENT-P + CL:CEILING STRINGWIDTH -TIMES - DSPRIGHTMARGIN DSPLEFTMARGIN FRPLACA PLUS NCONC1 LIST) \\BLTSHADE.GENERICPRINTER ( -INTERSECTREGIONS CREATEREGION DSPCLIPPINGREGION FIXR FQUOTIENT BITMAPCREATE) FB.UPDATE.COUNTERS ( -FFETCHFIELD WINDOWPROP LIST FB.COUNTER.STRING IDIFFERENCE DSPXPOSITION) DSPXPOSITION (IMAGEOP -SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) \\LEAF.ERROR (LOCF \\ADDBASE SELECTC FFETCHFIELD -LISPERROR ERROR CONCAT \\GETLEAFSTRING \\IFSERRORSTRING TERPRI) CHECKRECORDNAME (RECORDERROR) -CL::PS-NAME-SLOT-POSITION (CL::PS-INCLUDE CL::PS-ALL-SLOTS + CL::PS-INITIAL-OFFSET CL:LENGTH) -INSPECTW.SELECTITEM (WINDOWPROP ITEMOFPROPERTYVALUE \\SELITEM.FROM.PROPERTY) PRINTARRAY-TO-LIST ( -ARRAYSIZE ARRAYTYP ARRAYORIG HELP NUMBERP CONS ELT SUB1 IPLUS ADD1 ELTD REVERSE) DSPSPACEFACTOR ( -GREATERP IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) DSPYPOSITION (IMAGEOP -SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) \\TERMCLASSTOCODE (SELECTQ) READARRAY-FROM-LIST ( -ARRAY SUB1 IPLUS ADD1 SHOULDNT) DREAD (READC PLUS NCHARS) \\GETFILINGCONNECTION (FFETCHFIELD -WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \\VALID.FILING.CONNECTIONP -\\NSFILING.DISCARD.SESSION \\NSFILING.LOGIN) \\RANGELIMIT (IMAX IMIN) NORMLOOP (COPY LAST HEADPTY -NEXTPTY \\SGN IDIFFERENCE) \\GETTERMSYNTAX (\\TERMCODETOCLASS \\SYNCODE GETHASH FFETCHFIELD -\\GETBASEBYTE LOGAND) DSPOPERATION (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) -DSPLEFTMARGIN (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) D-ASSEM::DIGEST-FUNCTION ( +APPLY) \TEDIT.BOLD.SEL.ON (TEDIT.LOOKS) CL:BIT-NOT (CL:ERROR CL:MAKE-ARRAY CL:ARRAY-DIMENSIONS +%%DO-LOGICAL-OP) \LEAF.LOOKUPCACHE (PLUS LIST CONS) CLISPIFYFNS (CLOCK MAPCONC STKEVAL EVALV +MISSPELLED? FILEFNSLST IDIFFERENCE ERSETQ CLISPIFY) COPY-VECTOR (VECTOR-LENGTH - %%ARRAY-TYPE-NUMBER +%%ARRAY-BASE + %%ARRAY-OFFSET MIN) \FILETYPE.FROM.TYPE (ASSOC FIXP) CH.DELETE.OBJECT (PARSE.NSNAME +COURIER.CALL CH.FINDSERVER CH.GETAUTHENTICATOR) CHANGEMACRO (MSNEEDUNSAVE GETRELATION FILEPKGTYPE +GETTEMPLATE) HASHFILEDATA (GTHASHFILE LIST) TEDIT.UNDO.LOOKS (NCONC1 \TEDIT.CARETLOOKS.VERIFY IPLUS) +GETFILEPTR (\GETSTREAM FDEVOP SPREADAPPLY*) EDIT.BITMAP.REAL (BITMAPCOPY GET.EDIT.BITMAP.MENU MENU +PRIN1 CONS SELECTQ EDITBM FROM.SCREEN.BITMAP TRIM.BITMAP INVERT.BITMAP.HORIZONTALLY +INVERT.BITMAP.VERTICALLY INVERT.BITMAP.DIAGONALLY ROTATE.BITMAP.LEFT ROTATE.BITMAP.RIGHT +INTERACT&SHIFT.BITMAP.LEFT INTERACT&SHIFT.BITMAP.RIGHT INTERACT&SHIFT.BITMAP.DOWN +INTERACT&SHIFT.BITMAP.UP INVERT.BITMAP.B/W INTERACT&ADD.BORDER.TO.BITMAP ERROR) \VFMLower (LESSP +GREATERP ILESSP MESAEQUAL SUB1 MESASIZE \GETBASE PLUS) CURSOREXIT (IDIFFERENCE SUB1 IQUOTIENT ITIMES) +DISPLACED-ARRAY-P (CL:ERROR) \LOOKUPCOLORNAME (FASSOC) \ROUTE.PUP (\LOCATE.PUPNET \TRANSLATE.3TO10) +\SETCLOSEDFILELENGTH (\OPENFILE) SORT.PUPHOSTS.BY.DISTANCE (\LOCATE.PUPNET SORT) +\NSRANDOM.CREATE.STREAM (LISPERROR \NSFILING.FULLNAME FILING.CALL LIST FUNCTION SELECTQ +\NSFILING.CHECK.ACCESS \NSFILING.FILLIN.ATTRIBUTES ASSOC FOLDLO LRSH IMOD) LASTMOUSEY ( +\DSPUNTRANSFORMY \GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM) FB.LOADCOMMAND (FB.SELECTEDFILES +ADD.PROCESS LIST FUNCTION KWOTE) \SETEOFPTR (FDEVOP SPREADAPPLY*) LASTMOUSEX (\DSPUNTRANSFORMX +\GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM) WRITE-UNICODE-MAPPING-HEADER (TAB SELECTQ PRIN1 +SPACES PRINTOUT TERPRI DATE) SI::ADVISE-CONTENTS (CL:LENGTH CL:SECOND CL:INTERSECTION) +SEDIT::STRINGIFY-LIST (REVERSE CONS SEDIT::STRINGIFY CONCATLIST) CH.CREATE.OBJECT (PARSE.NSNAME +COURIER.CALL CH.FINDSERVER CH.GETAUTHENTICATOR) \FM.CGETITEMPROP (SELECTQ) /ECHOCONTROL (GETTERMTABLE +LIST ECHOCONTROL) LISPXSTATE (GETP UNDOLISPX2 CONS) BOUT16 (LRSH LOGAND) \MACPEEKCCODEFN (\RECODECCODE + \PEEKCCODE) \VECSKIP (IPLUS \ENDVECRUN) /SETSYNTAX (GETTERMTABLE GETREADTABLE GETSYNTAX LIST +SETSYNTAX) SETTERMCHARS (INTCHECK /ECHOCONTROL) \PUSHSTATE.IP (GETFRAMEVAR.IP IP-TOS APPENDOP.IP) +BIN16 (LOGOR LLSH BIN) \TEDIT.INSERT.PIECES (\CHTOPC \SPLITPIECE - OPENSTREAM IPLUS LLSH +\TEDIT.UNIQUIFY.CHARLOOKS \TEDIT.UNIQUIFY.PARALOOKS IMAGEOBJPROP PLUS) SIMPLE-COMPARE (- +) +\NSPRINT.ENQUIRE (GETNSPRINTER \NSPRINT.COURIER.OPEN RESETLST RESETSAVE LIST FUNCTION APPLY CONS +APPEND) \GENERIC.BINS (FRPTQ \PUTBASEBYTE \BIN PLUS) NUMBER.READER.HANDLER ( +NUMBERPAD.READER.HANDLE.CHAR WFROMMENU) CHANGEI.S. (SELECTQ MSNEEDUNSAVE GETRELATION UNION L-CASE) +GETMOUSESTATE (\XMOUSECOORD IPLUS SIGNED SUB1 LLSH IDIFFERENCE \YMOUSECOORD LOGXOR LOGAND \EVENTKEYS) +CONTINUEDIT (RESETSAVE LIST OPENSTREAM FULLNAME SETFILEPTR CL:MULTIPLE-VALUE-SETQ \PARSE-FILE-HEADER +ROOTFILENAME FILECHANGES MEMB) OPT.RETMERGE (OPT.CODEFRAME OPT.CODELEV LIST OPT.PRATTACH OPT.NOTJUMP +OPT.DEFREFS) \GENERIC.BOUTS (FRPTQ \BOUT \GETBASEBYTE PLUS) HASHFILEP (FULLNAME ASSOC) +CL::ASSIGN-FIELD-DESCRIPTORS (CL::PS-TYPE CL:ERROR) SCAVENGEVOLUME (SCAVENGEDSKDIRECTORY) +%%MAKE-DISPLACED-ARRAY (+ LENGTH %%MAKE-GENERAL-ARRAY %%MAKE-ONED-ARRAY) PUPTRACE ( +MAKE-NETWORK-TRACE-WINDOW) COURIERTRACE (CREATEW FUNCTION FONTCREATE) TB.ITEM.DELETED? (\DTEST) +FILL-ARRAY (CL:ERROR %%ARRAY-TYPE-NUMBER) \PFFindDirectoryID (\PFFindRootDirEntry) +\TEDIT.ORIGINAL.WINDOW.TITLE (CONCAT NCHARS WINDOWPROP) \FM.GETITEMPROP (SELECTQ LISTGET) +TB.MAP.DELETED.ITEMS (\DTEST CL:FUNCALL) MSPATHS (SCRATCHASH LINELENGTH MSLISTSET TERPRI PUTHASH +RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION GETHASH HASHARRAY) +\ROUTE.XIP (\LOCATE.NSNET LOCF \ADDBASE LOGAND \GETBASE \TRANSLATE.10TO3) FB.SEEBUTTONFN (WFROMMENU +MAINWINDOW SELECTQ NOTIFY.EVENT WINDOWPROP PROCESS.EVAL DEL.PROCESS SHOULDNT) BEEPON (IQUOTIENT IMAX) +COURIER.READ.STRING (GETWORD IPLUS LLSH \BIN ALLOCSTRING + \GETBASEBYTE PLUS DECODE-NS-STRING) +ONEDINSPECT.DEFAULT.TITLECOMMANDFN (LOGAND CONSTANT \CREATE.TWODINSPECTOR.TITLEMENU WINDOWPROP MENU) +CL:SBIT (CL:APPLY) \NSFILING.CHECK.ACCESS (FILING.CALL ASSOC) CLISPDEC0 (CONS CLISPDEC1) +NSPRINTER.STATUS (\NSPRINT.ENQUIRE) READ-ONLY-ARRAY-P (CL:ERROR) SEDIT::LINE-FINISHED (IDIFFERENCE) +MSVERB (MSSEEKTYPE CONS) TWODINSPECT.SELECTCOLUMNPROP (WINDOWPROP WITH-INSPECTOR-ENV XCL::PROFILIZE +CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES STRINGWIDTH IDIFFERENCE ADD1 FONTPROP) FIRSTATOM ( +FIRSTATOM) %%MAKE-TWOD-ARRAY (%%CML-TYPE-TO-TYPENUMBER %%MAKE-ARRAY-STORAGE) \PUPGATELISTENER ( +OPENPUPSOCKET SETUPTIMER THIS.PROCESS FUNCTION GETPUP AWAIT.EVENT ALLOCATE.PUP SUB1) +SEDIT::SET-SELECTION-QUOTE (SEDIT::SET-SELECTION-ME SEDIT::SET-SELECTION-NOWHERE) MSMARKCHANGED (ASSOC + LIST SELECTQ CHANGEVAR CHANGEMACRO CHANGEI.S.) FB.COPYCOMMAND (FB.COPY/RENAME.COMMAND CONS FUNCTION) +\OUTCHARFN.PRESS (SELCHARQ \DSPXPOSITION.PRESS DSPXPOSITION NEWPAGE.PRESS \PRESS.CONVERT.NSCHARACTER +IPLUS \FGETWIDTH \GETBASE) FB.RENAMECOMMAND (FB.COPY/RENAME.COMMAND CONS FUNCTION) CHANGESLICE (LIST +NTH ITIMES ADD1 IQUOTIENT SUB1) SELECT.LIST.INSPECTOR (MENU APPEND RECLOOK CONS LIST CONCAT) \VFMMerge + (\BLT \VFMGet ADD1 MESASIZE FUNCTION) WITHOUT-INTERRUPTS (DISPLAYDOWN) EDIT.BITMAP (EDIT.BITMAP.REAL +BITMAPCREATE EVAL EDIT.BITMAP CURSORCREATE ERROR) \TEDIT.BOLD.CARET.OFF (\TEDIT.PARSE.CHARLOOKS.LIST) +DISPLAYDOWN (RESETFORM SETDISPLAYHEIGHT SMALLP EVAL) CONVEXP (LENGTH XYPT.X XYPT.Y IDIFFERENCE IMINUS +XPROD \SGN) CL:SCHAR (CL:AREF) TEDIT.SELECTALL (TEXTSTREAM TTY.PROCESS) \TEDIT.BOLD.SEL.OFF ( +TEDIT.LOOKS) \GETINTERNALCLOCK (LOCF \ADDBASE UNFOLD LLSH \RCLK) ETHERHOSTNAME (\GETMISCSOCKET +ALLOCATE.PUP ASSURE.PUP.READY \LOCALPUPHOSTNUMBER LOGAND FIXP \PARSE.PORTCONSTANT LISPERROR +\LOCALPUPNETNUMBER LRSH PLUS FFETCHFIELD LOCF \ADDBASE EXCHANGEPUPS GETPUPSTRING SUB1 IPLUS ADD1 +\GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE PORTSTRING TERPRI) OPT.RETTEST (OPT.CODEFRAME +OPT.CODELEV) CL:SIMPLE-VECTOR-P (CL:ARRAY-ELEMENT-TYPE) CL:ERROR (MAKE-INTO-CONDITION RESETLST +FIND-DEBUGGER-ENTRY-FRAME LIST DEBUGGER STKNAME) \CREATEPRESSFONT (RESETLST \FACECODE CONSTANT +FQUOTIENT \GETBASEPTR UNFOLD LLSH \CREATECHARSET) CL::PROCESS-TYPE (CL::PS-NAME CL::PS-TYPE +CL::PS-PREDICATE CL::PREDICATE-BODY CL::PS-EXPORT) SCAVENGEDSKDIRECTORY (WITH.MONITOR +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \LFEntryPoint \VFMGenerateFileIDs TERPRI +\GETDEVICEFROMNAME MAPC PACKFILENAME.STRING U-CASE) \NSFILING.OPEN.HANDLE (FILING.CALL +\NSFILING.ADD.TO.CACHE LIST FUNCTION) \TEDIT.HISTORYADD (+ \TEDIT.CUMULATE.EVENTS) TB.ITEM.SELECTED? ( +\DTEST) COMPILEFILES (NLAMBDA.ARGS COMPILEFILES0) OPT.RETOPT1 (SOME OPT.RETTEST) CL:SVREF (CL:AREF) +%%MAKE-GENERAL-ARRAY (%%CML-TYPE-TO-TYPENUMBER %%MAKE-ARRAY-STORAGE LENGTH) \LFFileSpec (\LFUnpackName + \LFFindDirectory \LFVersions SELECTQ LAST LIST ADD1 ASSOC FIXP) MAKEFN (DEFINE LIST CONS LITATOM +NCONC SOME GENSYM ESUBST) CLEARHASHFILES (CLOSEF?) \VFMGenerateFileIDs (WITH.MONITOR +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION UNINTERRUPTABLY \BLT \VFMGet MESASIZE LIST) +PRINTPUPDATA (PRINTPACKETDATA IDIFFERENCE) BIT.IN.ROW (SUB1 BITMAPBIT PLUS) \PROCESS.RESET.TIMERS ( +GETTOPVAL) PP* (GETSTREAM PRETTYPRINT NLAMBDA.ARGS) DATATYPE (DECLARERECORD CONS) \LEAF.REQUESTPAGE ( +\LEAF.LOOKUPCACHE FREPLACEFIELD IPLUS16 \LOLOC \ADDBASE FFETCHFIELD PLUS ALLOCATE.PUP LLSH) +COMPILER::ALPHA-ATOM (COMPILER::ALPHA-LITERAL COMPILER::RESOLVE-VARIABLE-REFERENCE) CL:VECTOR-POP (CL:1- + CL:AREF CL:ERROR) PRINTERRORPUP (printout PORTSTRING GETPUPSTRING TERPRI) IMAGEFNSCREATE (ASSOC CONS +LIST) %%AREF0 (CL:ARRAY-RANK %%ARRAY-READ + CL:ERROR) SEDIT::SET-SELECTION-LIST (SEDIT::SET-SELECTION-ME + SEDIT::SET-SELECTION-NOWHERE) \SECONDSCLOCKGREATERP (UNINTERRUPTABLY LOCF \ADDBASE IGREATERP +\BOXIDIFFERENCE) \CLEARXIPHEADER (\CLEARWORDS \DTEST FOLDHI LRSH IPLUS) REMEMBER (MARKASCHANGED +GETEXPRESSIONFROMEVENTSPEC) \MACINCCODEFN (\RECODECCODE \BIN) NONSYSPROPNAMES (PROPNAMES LIST) +\CLOCKGREATERP (UNINTERRUPTABLY IGREATERP \BOXIDIFFERENCE \CLOCK0 LOCF \ADDBASE) SMARTARGLIST ( +\SIMPLIFY.CL.ARGLIST ARGLIST GET SMARTARGLIST GETLIS GETD GETDEF CL:THIRD REMOVE-COMMENTS ARGTYPE +GETMACROPROP SELECTQ LAST APPEND LIST FNCHECK) SI::ADVICE-NEWCOM (DEFAULTMAKENEWCOM) +CL:ARRAY-ROW-MAJOR-INDEX (ARG CL:ARRAY-RANK CL:1- CL:ERROR) GETHASHTEXT (GETHASHFILE COPYBYTES) +\RCLOCK0 (\RCLK \DTEST) MAKECOM (SMARTARGLIST FMEMB FIXSPELL APPEND LIST CONS NCONC1 IPLUS) +COMPILER::ALPHA-BLOCK (COMPILER::MAKE-BLOCK CONS COMPILER::BLOCK-STMT COMPILER::ALPHA-PROGN) +CL:ARRAY-IN-BOUNDS-P (ARG CL:ARRAY-RANK CL:1- CL:ERROR) REGIONONSCREEN (IMAX IPLUS IDIFFERENCE) +CH.LIST.OBJECTS (COURIER.CALL CH.FINDSERVER PARSE.NSNAME CH.PROPERTY CH.GETAUTHENTICATOR) EDITGETD-LET + (MKPROGN SUBPAIR MAPCAR CAR CADR) HLSTORGB (FTIMES FPLUS FDIFFERENCE \HLSVALUEFN IDIFFERENCE) +TB.UNDELETE.ITEM (\DTEST PLUS FFETCHFIELD TB.PRINT.LINE) CLOSEF? (CLOSEF) \NSFILING.FULLNAME ( +\NSFILING.FILLIN.ATTRIBUTES SELECTQ NCHARS NTHCHARCODE PLUS CONS SUBSTRING - ADD1 SUB1 +\NSFILING.ADDQUOTES MAPCONC LIST CONCATLIST NCONC MKATOM U-CASE) COND.TO.IF (CONS MAPCONC APPEND) +PATH.LESSP (XYPT.Y ILEQ XYPT.X PATH.LESSP IPLUS) ASET (ARG) MODERN-MENUBUTTONFN (LOGAND MKLIST +WINDOWPROP FONTPROP MOVEW MODERN-ORIG-MENUBUTTONFN) BREAKCONNECTION (LIST \GETDEVICEFROMNAME +CANONICAL.HOSTNAME) EDITGETD-LAMBDA (MKPROGN EDITGETD-LAMBDA CONS LIST SELECTQ APPEND) +COURIER.READ.SEQUENCE (GETWORD IPLUS LLSH \BIN COURIER.READ LIST PLUS) CL::ROW-MAJOR-ASET (CL:ERROR +CL::ROW-MAJOR-ASET %%ARRAY-WRITE +) MSOBJTYPE (MSJOIN MSOBJTYPE SELECTQ LIST SHOULDNT) SWAPPEDCOND ( +SELECTQ COND.TO.IF SWAPPEDCOND GETHASH ERROR! CONS NEGATE LIST SHOULDNT) MSSUBJTYPE (MSJOIN MSSUBJTYPE +) \SETDAYTIME0 (\DTEST LOCF \ADDBASE ITIMES LOGAND IPLUS16 \LOLOC LRSH UNFOLD LLSH \GETBASE +\PROCESS.RESET.TIMERS) PRINTXIPROUTE (PRIN1 \PRINTNSADDRESS LOCF \ADDBASE PRIN2 IQUOTIENT \CENTICLOCK +IREMAINDER) XCL:ROW-MAJOR-AREF (CL:ERROR %%ARRAY-READ +) \TEDIT.WINDOW.TITLE (TEXTOBJ \TEDIT.PRIMARYW +WINDOWPROP) TWODINSPECT.SELECTROWPROP (WINDOWPROP WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV +XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES STRINGWIDTH FONTPROP) \PFInsertDirectoryID (\PFSaveBuffers) + \DSPROTATE.IP (CONCATT.IP) \GENERIC.RENAMEFILE (SPREADAPPLY* FULLNAME RESETLST RESETSAVE OPENSTREAM +\COPYOPENFILE CLOSEF) COMPILER::ALPHA-ARGUMENT-FORM (COMPILER::ALPHA-FORM) \GENERIC.OPENP (LIST) +\LFPutDirectory (SETA FIXP \PFVolumeNumber) COMPLEX-COMPARE-FORWARD (- +) \HANDLE.PUP.ROUTING.INFO ( +FOLDLO LRSH IDIFFERENCE \TRANSLATE.3TO10 ADD1 \GETBASEPTR UNFOLD LLSH LOGAND SETUPTIMER - \ADDBASE +\RELEASE.ETHERPACKET) CL::SIMPLE-STRING-EQUAL (%%STRING-LENGTH + %%STRING-BASE-COMPARE-EQUAL) +SAMEPARALOOKS (CONCAT) \NSFILING.FILLIN.ATTRIBUTES (FILING.CALL SELECTQ) PRINTPUPROUTE (PRIN1 +PORTSTRING PRIN2 LRSH IQUOTIENT \CENTICLOCK IREMAINDER) \TITLEICONMINSIZE (CONS IMINUS DSPLINEFEED) +\TOTALFIXEDHEIGHT (PLUS) \VAMUpdateVAM (IQUOTIENT IREMAINDER \VAMGetVAMPageFor \GETBASE MASK.1'S LSH +SUB1 DIFFERENCE LOGAND BITSET LOGOR BITCLEAR LOGNOT) MB.GETFN (IMAGEOBJPROP FONTPROP LOGAND LRSH \BOUT + \ATMOUT) FILEGETDEF.VARS (LOADFNS EVAL) COPY-CIRCLE (CONS FASSOC) \BACKCCODE (CL:FUNCALL \EVALV1) +/DEFINE (DEFINE) SEDIT::STRINGIFY (CL:FUNCALL) CL::%%STRUCTURE-TYPE-TO-FIELDSPEC (CL::COERCE-TYPE) +\STRINGWIDTHGUESS (STRINGWIDTH) \INCCODE (CL:FUNCALL \EVALV1) \MAIKO.SETTIME (DAYTIME) +\LEAF.ADD.QUOTES (STRPOS CONS SUBSTRING ADD1 SUB1 NCHARS CONCATLIST DREVERSE) +\TEDIT.GET.SINGLE.PARALOOKS2 (\SMALLPIN SUB1 LLSH IDIFFERENCE CONS \BIN SELECTC SHOULDNT LOGAND +SELECTQ LIST PLUS ZEROP \ARBIN \ATMIN) GETHASH (\DTEST APPLY* \EQHASHINGBITS LOGXOR \HILOC LLSH LOGAND + \LOLOC LRSH \FIRSTINDEX IREMAINDER ADD1 \HASHSLOT \ADDBASE \ADDBASE2 CL:VALUES \REPROBE LOGOR IMIN +IPLUS) %%ASET0 (CL:ARRAY-RANK %%ASET0 %%ARRAY-WRITE + CL:ERROR) PARSE-FORMAT-OPERATION (FUNCTION +CL:VALUES) ALTO.TO.LISP.DATE (LOGXOR) RECLISPLOOKUP (GETPROP CLISPLOOKUP0 ASSOC) \PEEKCCODE ( +\CHECKEOLC SELCHARQ SELECTC LIST \CHECKEOLC.CRLF CL:FUNCALL) HARDCOPY.SOMEHOW (WINDOWPROP HARDCOPYW) +SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE-BACKWARDS (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW SEDIT::SUBNODE + SEDIT::FIND-SUBSTRUCTURE-BACKWARDS CL:FORMAT SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE) LISP.TO.ALTO.DATE +(LOGXOR) VALUOF-EVENT (LISTGET1 CL:VALUES-LIST LISTGET VALUOF-EVENT MAPCAR) PREVWORD (\SYNCODE GETHASH + \GETBASEBYTE FIRSTCHAR TTNEXTCHAR IDIFFERENCE FIND.START.OF.WORD FIND.NEXT.WORD) \GENERIC.CHARSET ( +\DTEST) CHAT.CLOSE (WINDOWPROP OPENWP CLOSEF \CARET.DOWN DREMOVE LIST FUNCTION) \FM.MENUHANDLER ( +SETUPTIMER DECODEBUTTONS \FM.CHECKREGION WINDOWPROP \FM.ITEMPROP FFETCHFIELD LASTMOUSEY LASTMOUSEX +LISTGET IPLUS ILESSP PRIN1 APPLY* ZEROP LOGAND) \VECPUT (IPLUS IDIFFERENCE FIXR FTIMES \VECENCODE CONS + FFETCHFIELD) IMLTLIST (MAPCAR PLUS TIMES CONS FIX) START.NEW.LINE (INSERTLINE) SHORTEN (SUBSTRING +IMIN NCHARS) SEDIT::SHIFT-LINEAR-FORM (IPLUS) GRAPHERIMAGEFNS (IMAGEFNSCREATE FUNCTION) +SEDIT::ASSIGN-FORMAT-NIL (MAPC SEDIT::SET-FORMAT) \LFFullFileName (PACKFILENAME U-CASE \PFGetVol +\LFFileName) INSPECT/PROPLIST (PROPNAMES NONSYSPROPNAMES INSPECTW.CREATE FUNCTION) \MAP-OPEN-STREAMS ( +NCONC MAPCAR FDEVOP SPREADAPPLY* APPLY*) \TEDIT.PUT.CHARLOOKS.LIST2 (HASHARRAY LOGAND LRSH \BOUT +FLENGTH PLUS) \NCONC2 (LAST) NS.MAKE.SIMPLE.CREDENTIALS (CONS COURIER.CREATE LIST COURIER.WRITE.REP +PARSE.NSNAME HASH.PASSWORD) PFI.CENTER.PRINT (DSPLEFTMARGIN + IQUOTIENT - DSPRIGHTMARGIN TIMES SUB1 +LENGTH DSPSCALE PLUS STRINGWIDTH RELMOVETO TERPRI) PFI.CONDENSE.INDEX (ASSOC CONS LIST RPLACD SORT +UNION FRPLACD PFI.SORT.INDICES PFI.COMPUTE.INDEX.SHAPE) \TOTALFIXEDWIDTH (PLUS) \EOF.ACTION (CL:FUNCALL +) \VAMAdjustGroup (ADD1) MB.COPYFN (COPY) FILEGETDEF.FNS (GET-ENVIRONMENT-AND-FILEMAP ASSOC OPENP LIST + OPENSTREAM FASSOC LOADEFS) TYPEINMENU (FUNCTION) \EOSERROR (LISPERROR) /DEFINEQ (DEFINE) +\SETUPTIMERmacrofn (CONSTANTEXPRESSIONP CANONICAL.TIMERUNITS SELECTQ \CanonicalizeTimerUnits SHOULDNT +SUBST) NORMSECT (\NORMSECT IPLUS) SEDIT::GENERATE-LINEAR-FORM (IPLUS IDIFFERENCE IMAX) STKARGS ( +STKNARGS STKARG LIST PLUS) OPT.RETPOP (CONS) \FM.DOSELECTION (RESETLST RESETSAVE LIST WINDOWPROP +APPLY* \FM.ITEMPROP FFETCHFIELD BLOCK) \PSC.SYMBOLS (\DSPFONT.PSC LIST) SUBST (COPY CONS SUBST) +XYPT.LESSP (XYPT.Y ILEQ XYPT.X) FW-FILTERED-FILE? (FILENAMEFIELD) \INCFILEPTR (\SETFILEPTR IPLUS +\GETFILEPTR SPREADAPPLY* \PAGED.INCFILEPTR) SEDIT::SETUP-WINDOW-CONTEXT-DEPENDENCIES (IDIFFERENCE +WINDOWPROP LIST) \CanonicalizeTimerUnits (SELECTQ U-CASE ERROR) CONSFN (CONS RECLISPLOOKUP) +OPT.RETFIND (FMEMB CONS) \PAGED.INCFILEPTR (UNINTERRUPTABLY + - SUB1) \COURIER.UNKNOWN.TYPE (ERROR +CONS) SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW SEDIT::SUBNODE +SEDIT::FIND-SUBSTRUCTURE CL:FORMAT SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE) COMPILER::META-SUBSTITUTE ( +COMPILER::META-SUBST) GRAPHOBJ.COPYBUTTONEVENTFN (IMAGEOBJPROP APPLY* COPYINSERT GRAPHOBJ.COPYFN) +FIND.NEXT.WORD (\SYNCODE GETHASH \GETBASEBYTE FIRSTCHAR FIND.START.OF.WORD TTNEXTCHAR SUB1VAR) +\FIXPOUT (LOADBYTE LOGAND LSH IMINUS MASK.1'S SUB1 \BOUT) BIT.IN.COLUMN (SUB1 BITMAPBIT PLUS) +FINDFIELDUSAGE (FINDFIELDUSAGE CONS) OPT.JSIZE (GETPROP) \FIXPIN (LOGOR LLSH \WIN IPLUS \BIN) +SEDIT::FIND-AND-DISPLAY-STRUCTURE-BACKWARDS (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW SEDIT::SUBNODE +SEDIT::FIND-STRUCTURE-BACKWARDS CL:FORMAT SEDIT::FIND-AND-DISPLAY-STRUCTURE-BACKWARDS) LOOKIN (FINDATS + EDITFINDP) INTCHECK (CHCON1 IDIFFERENCE FCHARACTER IPLUS FIXP CONS INTCHAR HELP) MENUBUTTONFN (LOGAND + LOGOR WINDOWPROP MENU.HANDLER) \BUFFERED.BIN (\GETBASEBYTE ADD1 FDEVOP SPREADAPPLY*) +\HDCPYDISPLAY.FIX.YPOS (FIX FTIMES CONSTANT) SEDIT::MAKE-FUNCTION-PROTOTYPE (DECLARE EDITMODE LIST) +MAKESCAN (SORT) EDITCOLUMN (SELCHARQ) APPENDNUMBER.IP (APPENDINTEGER.IPMACRO APPENDINT.IPMACRO SUB1 +LOADBYTE LOGAND LSH IMINUS UNFOLD LLSH MASK.1'S PLUS IPLUS BYTESININT.IP TYPEP CL:RATIONAL +APPENDRATIONAL.IP CL:NUMERATOR CL:DENOMINATOR) READ (\GTREADTABLE \TOP-LEVEL-READ) FIND.CHAT.PROTOCOL +(CL:FUNCALL) \FM.RIGHTBUTTONFN (DSPCLIPPINGREGION LASTMOUSEX LASTMOUSEY WINDOWPROP \FM.ITEMPROP +FFETCHFIELD LISTGET IPLUS ILESSP \FM.MENUHANDLER DOWINDOWCOM) \PSC.SPACEWID (FIXR FTIMES CHARWIDTH +CHARCODE.DECODE) \LFReadFileID (BIN \LFDWIN) FW-SORT-FN (SELECTQ APPLY* ERROR) \LFGetDirectory (ELT +FIXP \PFVolumeNumber) \BUFFERED.PEEKBIN (\GETBASEBYTE FDEVOP SPREADAPPLY*) SCALE/GRAPHNODE/BORDER ( +FIXR FTIMES CONS) SEDIT::SETUP-WINDOW-AND-PROCESS (THIS.PROCESS FUNCTION KEYACTIONTABLE +GETPROMPTWINDOW TTYDISPLAYSTREAM) \SHAREOFXTRAY (IMAX IQUOTIENT ITIMES) \BUFFERED.BOUT (ADD1 +SPREADAPPLY*) FILEGETDEF.PROPS (LOADFNS NCONC LIST CONS) UNREADITEM (BKSYSBUF CONCAT MKSTRING EVAL) +WRITE (DECLARE \GETSTREAM \WRITE1 CL:MAKE-HASH-TABLE) MENUREPAINTFN (WINDOWPROP REVERSE BLTMENUIMAGE) +COMPILER::FRAME-ANNOTATE-THROW (NCONC COMPILER::FRAME-ANNOTATE COMPILER::THROW-TAG COMPILER::THROW-VALUE +) OPT.RETOPT (OPT.RETFIND CONS SUBSET OPT.RETOPT1) COMPILER::META-CALL-LABELS (COMPILER::NODE-META-P) +EF (APPLY NLAMBDA.ARGS) \TEDIT.PUT.SINGLE.PARALOOKS2 (LOGAND LRSH \BOUT SELECTQ SHOULDNT LENGTH) +TTYIN.BALANCE (TTSKREAD \SYNCODE GETHASH \GETBASEBYTE FIRSTCHAR AT.END.OF.TEXT) \BUFFERED.BINS ( +IDIFFERENCE IPLUS PLUS FDEVOP SPREADAPPLY* \BIN) LAYOUTSEXPR1 (CONS APPEND MAPC LAYOUTSEXPR1) EV ( +APPLY NLAMBDA.ARGS) SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (WINDOWPROP ADD1 IDIFFERENCE +SEDIT::LAST-LINE-LINEAR IMINUS) \SETCARET (DSPCLIPPINGREGION IPLUS) \MOVEBYTES (\ADDBASE FOLDLO LRSH +IMOD \GETBASEBYTE PLUS \PUTBASEBYTE) \FM.BUTTONEVENTFN (MODERNWINDOW.BUTTONEVENTFN FUNCTION) +DELFROMLIST (GETTOPVAL /SETTOPVAL SUBSET) \LFOpenOldFile (\PFFindFileSize \PFFindPageAddr SUB1) +DOSLINKER (MAPC PRINTOUT L-CASE SHORTEN UNPACKFILENAME.STRING TERPRI) NS.AUTHENTICATE ( +NS.MAKE.SIMPLE.CREDENTIALS \INTERNAL/GETPASSWORD \AUTHENTICATION.FIND.SERVER COURIER.CALL) +SEDIT::SETUP-PROFILE (SEDIT::DEFAULT-PACKAGE XCL:SAVE-PROFILE) LOCALVARS (APPEND UNION) EMBEDPROG ( +MAPCAR DREVERSE CAR CONS NCONC LAST LDIFF SUBPAIR LIST) \BUFFERED.BOUTS (IDIFFERENCE IPLUS PLUS +SPREADAPPLY*) SEDIT::FIND-AND-DISPLAY-STRUCTURE (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW SEDIT::SUBNODE + SEDIT::FIND-STRUCTURE CL:FORMAT SEDIT::FIND-AND-DISPLAY-STRUCTURE) TEDIT.GET.LOOKS (TEXTOBJ \CHTOPC +IMIN \TEDIT.UNPARSE.CHARLOOKS.LIST) VALUOF (HISTORYFIND SUB1 MKLIST VALUOF-EVENT) +\STRINGWIDTH.HDCPYDISPLAY (FONTCREATE STREAMPROP IQUOTIENT IPLUS \STRINGWIDTH.GENERIC +\FGETCHARIMAGEWIDTH \FGETWIDTH \GETBASE \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CHARSET LRSH +\CREATECHARSET \CHAR8CODE LOGAND CONSTANT) PFI.PRINT.INDICES (IQUOTIENT LINELENGTH CHARWIDTH - +PFI.LINES.REMAINING DREMOVE + LAST) NEGC (LIST NEGATE NEGC CONS NEGL) \SCROLL.HANDLER.DOIT (ERSETQ +WINDOWPROP IPLUS IDIFFERENCE SCROLLW SELECTQ IMIN IMAX MIN MAX FQUOTIENT SHOULDNT) +\TEDIT.PUT.SINGLE.CHARLOOKS2 (FONTCLASSUNPARSE FONTPROP LOGAND LRSH \BOUT LOGOR) +%%CHECK-SEQUENCE-DIMENSIONS (CL:LENGTH) MKPROGN1 (MKPROGN1 SELECTQ APPEND CONS) \SHAREOFXTRAX (IMAX +IQUOTIENT ITIMES) TEDIT.STREAMCHANGEDP (TEXTOBJ) \NULLDEVICE (\DEFINEDEVICE FUNCTION) +%%CML-TYPE-TO-TYPENUMBER (%%GET-CANONICAL-CML-TYPE) NEGL (LIST NEGATE CONS NEGL) CLISPIF0 (LIST CONS +SELECTQ SHOULDNT NCONC1 CLISPIF1 LDIFF DREVERSE LISTGET1 APPLY CLISPIF3) HEXSTRING (ALLOCSTRING IMAX +LRSH PLUS MAX LOGAND + -) CIRCLAR-COPYER (CONS CL:VALUES FASSOC) TEDIT.SEL.AS.STRING (TEXTSTREAM +ALLOCSTRING \GETCH \BIN PLUS) SAVESETQQ (SAVESET) \PSC.SPACEDISP (POSTSCRIPT.PUTCOMMAND \PSC.SPACEWID +DSPFONT) FILEGETDEF.MACROS (MKPROGN MAPCONC LOADFNS LIST) NEGLST (MAPCAR NEGATE) USERLISPXPRINT ( +STKNAME HELP MKATOM SUBSTRING LIST CONS NLIST APPLY* STKNTH) TEDIT.ADD.MENUITEM (SASSOC NCONC1) +MB.SHOWSELFN (IMAGEOBJPROP BITBLT) FW-OFD-EXISTS? (CONS) SETUPTIMER (IPLUS TYPENAMEP \TIMER.MAKETIMER +NCREATE CANONICAL.TIMERUNITS SELECTQ \CanonicalizeTimerUnits ITIMES EXPAND.SETUPTIMER \BOXIPLUS +\TIMER.IN.TICKS \RCLOCK0 IQUOTIENT \TIMER.IN.MILLISECONDS \CLOCK0 \TIMER.IN.SECONDS \DAYTIME0 SHOULDNT +) BACKGROUNDWHENSELECTEDFN (EVAL.AS.PROCESS) COMPILER::FRAME-ANNOTATE-UNWIND-PROTECT (NCONC +COMPILER::FRAME-ANNOTATE COMPILER::UNWIND-PROTECT-STMT COMPILER::UNWIND-PROTECT-CLEANUP) +\TOTALPROPOSEDSIZE (SELECTQ \TOTALPROPOSEDSIZE IPLUS IMAX CONS) SEDIT::CREATE-QUOTED-GAP ( +SEDIT::CREATE-GAP-NODE LIST SEDIT::QUOTE-WRAPPER LISTGET SEDIT::CREATE-WEAK-LINK) FW-CREATE-OFD-LIST ( +FULLNAME CONS FW-CREATE-OFD MAPCONC SELECTQ LIST SHOULDNT SORT) SETUPTIMER.DATE (SETUPTIMER +IDIFFERENCE IDATE) DWIMDEF (GETPROP DWIMIFY0) \TEDIT.SCALEREGION (\TEDIT.SCALE) XCL::UNDOABLY-SETQ ( +XCL::UNDOABLY-SET-SYMBOL \EVPROG1) COMPILER::FRAME-ANNOTATE-TAGBODY (MAPCONC COMPILER::TAGBODY-SEGMENTS + COMPILER::SEGMENT-STMTS COMPILER::FRAME-ANNOTATE CL:DELETE-IF COMPILER::BLIPPER-NEW-FRAME-P MAPC +COMPILER::BLIPPER-REFERENCES COMPILER::CLOSE-OVER CL:COPY-LIST LIST CL:NUNION) CRIT.LESSP (ILESSP) +TTNTH (TTNEXTCHAR) MOVE.TO.WHEREVER (MOVE.TO.LINE FIND.LINE) COMPILER::META-CALL-LAMBDA-SUBSTITUTE ( +COMPILER::CALL-FN COMPILER::LAMBDA-REQUIRED COMPILER::CALL-ARGS COMPILER::VARIABLE-SCOPE COMPILER::LAMBDA-BODY + COMPILER::META-SUBSTITUTE) TIMEREXPIRED? (TYPENAMEP LISPERROR TIMER.TIMEREXPIRED? IGEQ +\BOXIDIFFERENCE TIMER.MAKESAFETIMER SELECTQ CANONICAL.TIMERUNITS \CanonicalizeTimerUnits +\TIMER.IN.TICKS \RCLOCK0 \TIMER.IN.MILLISECONDS \CLOCK0 \TIMER.IN.SECONDS \DAYTIME0) FIXFIELDORDER ( +REVERSE ASSOC CONS LIST RECORDBIND FRPLACA) NTHTOPLEVELELT (LAST NTH ADD1) SEDIT::CLEAR-LINEAR-FORM ( +SEDIT::CREATE-WEAK-LINK SEDIT::RELINEARIZE-PRELINEARIZED-NODE) POSSIBILITYFN (LIST CONS STKNTH ADIEU) +LAYOUTLATTICE (HALF LRSH FONTPROP STRINGWIDTH BROWSE/LAYOUT/LATTICE) PRINTER.BITMAPSCALE (APPLY* +PRINTERPROP) NARGS (\CCODENARGS SELECTQ PLUS NARGS) \DSPYPOSITION.HDCPYDISPLAY (\DSPYPOSITION.DISPLAY) + FILEGETDEF.RECORDS (LOADFNS CONS) \TEXTBIN (IMAGEOBJPROP PLUS FFETCHFIELD \BIN LOGOR UNFOLD LLSH +\PAGEDBIN \TEDIT.TEXTBIN.NEW.PAGE APPLY* \TEDIT.APPLY.PARASTYLES \TEDIT.APPLY.STYLES ERROR) +\TEDIT.GET.CHARLOOKS.LIST2 (\SMALLPIN SUB1 LLSH IDIFFERENCE \TEDIT.GET.SINGLE.CHARLOOKS2 LIST PLUS) +USEREXEC (RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION LISPX +LISPXREAD) TIME.UNTIL (TYPENAMEP LISPERROR SELECTQ CANONICAL.TIMERUNITS \CanonicalizeTimerUnits +\TIMER.DIFFERENCE IDIFFERENCE \TIMER.IN.TICKS \RCLOCK0 \TIMER.IN.MILLISECONDS \CLOCK0 +\TIMER.IN.SECONDS \DAYTIME0 SHOULDNT) BLTMENUIMAGE (\INSUREWINDOW WINDOWPROP DSPCLIPPINGREGION BITBLT +IPLUS IMIN BITMAPWIDTH BITMAPHEIGHT) SCALEPAGEUNITS (FIXR FTIMES SELECTQ ASSOC IPLUS) \ARGPTR ( +\MYALINK OPCODES \VAROFFSET + UNFOLD LLSH SUB1 LISPERROR) APPENDLARGEVECTOR.IP (ARRAYSIZE ARRAYORIG +SUB1 IPLUS BYTESININT.IP ELT PLUS ADD1 ITIMES) IMAGESTREAMP (SELECTQ ARG) SETARG (PUTBASEPTR +\PUTBASEPTR \ARGPTR \EVAL) \UPDATE.EXTENT.IMAGE (WINDOWPROP DSPCLIPPINGREGION GREATERP IMAX IMIN +IQUOTIENT ITIMES IDIFFERENCE IPLUS TEXTUREP) IMAGESTREAMTYPE (\STREAMARG \GETSTREAM \DTEST) \ARG ( +GETBASEPTR \GETBASEPTR \ARGPTR) OPT.DELTAGREF (OPT.DEFREFS RPLACD DREMOVE FASSOC) IMAGESTREAMTYPEP ( +SELECTQ \GETSTREAM) AT.END.OF.TEXT (FMEMB FIRSTCHAR TTNEXTCHAR) SEDIT::MAXIMUM-STRING-WIDTH (CL:APPLY) + \SETARG (PUTBASEPTR \PUTBASEPTR \ARGPTR) \CH.GUESS.NEW.PROPERTIES (PARSE.NSNAME CH.LIST.OBJECTS CONS +LIST PLUS) STKNTH (IMINUS \STACKARGPTR LISPERROR PLUS \MYALINK OPCODES \MAKESTACKP SUB1) +%%MAKE-ARRAY-STORAGE (\ALLOCBLOCK FOLDHI LRSH IPLUS CL:*) TEDITCHAT.MENUFN (WINDOWPROP LOGAND +CHAT.RECONNECT TOTOPW \CARET.DOWN MENU) \FM.WINDOWENTRYFN (LOGAND DSPCLIPPINGREGION LASTMOUSEX +LASTMOUSEY WINDOWPROP \FM.ITEMPROP FFETCHFIELD LISTGET IPLUS ILESSP DOWINDOWCOM TTY.PROCESS) +COMPILER::CONSTRUCT-LIST (CL:REVERSE COMPILER::MAKE-CALL LIST) STKNAME (\STKNAME \STACKARGPTR) +\LFCreateFile (UNINTERRUPTABLY \PFGetVol \LFFullFileName \LFGenFileID \PFVolumeNumber \LFFindDirHole +\LFGetDirectory \LFMakeLeaderPage \LFFileName) \FM.STARTEDIT (RESETLST RESETSAVE LIST WINDOWPROP +\FM.EDIT-ITEM \FM.ITEMPROP FFETCHFIELD FUNCTION) SEDIT::SETUP-NEW-CONTEXT (CREATE.MONITORLOCK CONCAT +WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SEDIT::SETUP-WINDOW-CONTEXT-DEPENDENCIES +) PRINT-ARGLIST (LIST) SETSTKNAME (\STACKARGPTR \HILOC \COPYFNHEADER) U/L-CASE (CHECK.MARGIN +FIND.NEXT.WORD SEGMENT.BIT.LENGTH U-CASECODE L-CASECODE TTNEXTCHAR TTADJUSTWIDTH -) EDITV ( +NLAMBDA.ARGS PRINT STKSCAN EDITE ENVEVAL HASDEF EDITDEF ERROR) \COPYFNHEADER (UNFOLD LLSH IPLUS +\ALLOC.CODE.BLOCK \ADDREF OPCODES) LISPXEVAL (HISTORYSAVE EVAL LISPX/) PFI.PREVIEW.DECLARE ( +SKIPSEPRCODES READ) JOINDEF (CONS NCONC APPEND) \TEXTBOUT (ADD1 \TEXTGETFILEPTR ADDBASE \ADDBASE LRSH +IPLUS LOGAND) NOTE (NCONC LIST) MB.SIZEFN (IMAGEOBJPROP IMAGESTREAMTYPE FONTCOPY STRINGWIDTH FONTPROP) + STKSCAN (\MYALINK OPCODES \STACKARGPTR \MAKESTACKP) OPENIMAGESTREAM (\CONVERT-PATHNAME STREAMP +FILENAMEFIELD STRPOS SUBATOM ADD1 SUB1 PRINTFILETYPE.FROM.EXTENSION MKLIST PRINTERPROP PRINTERTYPE +ERROR EQMEMB CONCAT PRINTERNAME PACKFILENAME APPLY* ASSOC) /TCONC (CONS ERROR /RPLNODE /RPLACD FRPLACD +) \FRAMESCAN (GETSTKNAMEENTRY ADD1 FOLDLO LRSH IDIFFERENCE NTSLOT-VARTYPE GETSTKNTOFFSETENTRY IPLUS +NTSLOT-OFFSET LOGAND ADDSTACKBASE \VAG2 UNFOLD LLSH PLUS CONSTANT WORDSPERNAMEENTRY) +COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS (COMPILER::CALL-FN COMPILER::CALL-ARGS CL:LABELS +COMPILER::LAMBDA-REQUIRED COMPILER::ADD-PARAM COMPILER::LAMBDA-REST) CHAT.RESHAPEWINDOW (WINDOWPROP +PROCESS.APPLY FUNCTION LIST) SEDIT::COMPLETE (SEDIT::CLOSE-NODE THIS.PROCESS) RETTO (RESET +\STACKARGPTR) \LFGetStreamForFile (\LFFileSpec \LFFullFileName MAKE-CONDITION \LFOpenOldFile +\LFReadFileID \LFGetDirectory PRIN1 \LFCreateFile) \FM.CREATEW (COPY LISTGET CREATEW CREATEREGION +WIDTHIFWINDOW HEIGHTIFWINDOW) PRINTERPROP (ASSOC) SEDIT::SETUP-CONTEXT-WINDOW-DEPENDENCIES ( +SEDIT::COMPUTE-COMMENT-COLUMN) \SETWINFOXSIZE (\LIMITBYMIN \LIMITBYMAX) OPT.COMMONBACK (SUB1 +OPT.LABELNTHPR OPT.DEFREFS) \10MB.CREATENDB (CONS \10MB.STARTDRIVER FUNCTION) PRINTERTYPE ( +DEFAULTPRINTER ERROR GETPROP MKATOM CANONICAL.HOSTNAME ASSOC MKLIST) \VAMEnoughSpace (EQL ILEQ +IDIFFERENCE IQUOTIENT ITIMES) SEDIT::MINIMUM-STRING-WIDTH (CL:APPLY) APPENDINT.IP (SUB1 LOADBYTE +LOGAND LSH IMINUS UNFOLD LLSH MASK.1'S PLUS) FILEGETDEF.LISPXMACROS (MKPROGN LOADFNS ASSOC LIST) +FW-CREATE-OFD (FW-RESIZE-OFD STRINGWIDTH GETEOFPTR GETFILEINFO) UNIX-STREAM-IN (UNIX-PEEKEDCHAR +FFETCHFIELD UNIX-READ) GETDEFFROMFILE (WHEREIS FINDFILE APPLY* SELECTQ FILEGETDEF.FNS FILEGETDEF.VARS +FILEGETDEF.MACROS FILEGETDEF.PROPS FILEGETDEF.RECORDS FILEGETDEF.ALISTS FILEGETDEF.LISPXMACROS GET +LOADFNS CONS RESETLST RESETSAVE RESETUNDO LIST GETDEFCURRENT MKLIST FMEMB GETDEFERR APPEND) +PFI.PREVIEW.DEFINEQ (SKIPSEPRCODES READ TERPRI) XCL::UNDOABLY-SET-SYMBOL (\STKSCAN \HILOC \PUTBASEPTR +\GETBASEPTR \RPLPTR) RESUME (\DTEST \MYALINK OPCODES \RESUME) \ALLOCSPACETOGROUPEDWINDOWS (SELECTQ +\ALLOCWIDTHTOGROUPEDWINDOW \ALLOCHEIGHTTOGROUPEDWINDOW) %%ONED-ARRAY-P (NTYPX) +SEDIT::EQUALIZE-STRING-WIDTHS (SEDIT::MAXIMUM-STRING-WIDTH) PRINTFILETYPE.FROM.EXTENSION (U-CASE +FILENAMEFIELD ASSOC) \RESUME (\MYALINK OPCODES) CREATEWFROMIMAGE (CREATEW \INSURESCREEN BITMAPWIDTH +BITMAPHEIGHT CONS IMIN) EXEC-READ-LINE (PEEKCCODE LIST EXEC-READ NCONC1 CHCON1 LASTC FIX-FORM) +SHRINK-VECTOR (CL:ERROR) EDITP (NLAMBDA.ARGS GETPROPLIST MISSPELLED? FUNCTION) +XCL::GET-UNDOABLE-SETF-METHOD (CL:VALUES LIST CL:GENSYM CL::SETF-ERROR LOCAL-MACRO-FUNCTION +XCL::GET-UNDOABLE-SETF-METHOD CL:FUNCALL GET CL::GET-SIMPLE-SETF-METHOD) %%GENERAL-ARRAY-P (NTYPX) +CHAT.BUTTONFN (LOGAND WINDOWPROP FUNCTION LIST CHAT.MENU) \POSTSCRIPT.ACCENTFN (SUBSTRING CONCAT +OCTALSTRING SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE) \LFUpdateLeaderPage ( +UNINTERRUPTABLY DAYTIME) \FM.SETATTACHPOINT (MAPC \FM.ITEMPROP LISTGET \FM.ATTACHPOINT FFETCHFIELD +CONS FIX FPLUS FQUOTIENT ITIMES IDIFFERENCE) %%TWOD-ARRAY-P (NTYPX) COMPILER::FRAME-ANNOTATE-RETURN ( +CL:PUSHNEW CONS COMPILER::RETURN-BLOCK COMPILER::FRAME-ANNOTATE COMPILER::RETURN-VALUE) \SPREADFRAMEP +(\GETBASEPTR IPLUS UNFOLD LLSH SUB1) SETNTHTOPLEVELELT (/RPLACD LAST NTH ADD1 /RPLACA) +REOPENTEXTSTREAM (FUNCTION) TRYNEXT1 (NCONC RESUME) SWITCH/NODE/HEIGHT/WIDTH (MAPC FRPLACA) +CENTERPRINTINAREA (\OUTSTREAMARG \GETSTREAM STRINGWIDTH FUNCTION IPLUS IQUOTIENT ADD1 IDIFFERENCE +FONTPROP DSPRIGHTMARGIN RESETSAVE LIST CL:FUNCALL) CH.DELETE.MEMBER (CH.CANONICAL.NAME COURIER.CALL +CH.FINDSERVER PARSE.NSNAME FIXP CH.PROPERTY CH.GETAUTHENTICATOR) SHOWSHADEDITEMS (NTH MENUITEMREGION +DIFFERENCE BITMAPWIDTH) SETSTKARG (\STACKARGPTR \INTERPFRAMENT \FRAMESCAN LISPERROR FOLDLO LRSH +GETSTKNAMEENTRY IPLUS UNFOLD LLSH SUB1 SELECTC NTSLOT-VARTYPE GETSTKNTOFFSETENTRY \ADDBASE SHOULDNT +NTSLOT-OFFSET LOGAND IDIFFERENCE STACKADDBASE \VAG2 STACKPUTBASEPTR \PUTBASEPTR) SKIP/ZAP (U-CASECODE +SELECTC IMINUS SHOULDNT SCANBACK TTNLEFT SCANFORWARD TTNEXTCHAR) BEEP (RESETFORM VIDEOCOLOR DISMISS) +COMPILER::META-CALL-LAMBDA (COMPILER::CALL-FN COMPILER::CALL-ARGS COMPILER::LAMBDA-REQUIRED +COMPILER::VARIABLE-SCOPE COMPILER::CONSTRUCT-PROG1-TREE LIST COMPILER::PROGN-STMTS COMPILER::LAMBDA-BODY + CL:NREVERSE) STKARGNAME (\STACKARGPTR \INTERPFRAMENT \FRAMESCAN \INDEXATOMVAL \VAG2 LRSH LOGAND +GETSTKNAMEENTRY \ADDBASE UNFOLD LLSH IPLUS LISPERROR MAKE-NTENTRY SUB1 IDIFFERENCE STACKADDBASE +GETSTKNTOFFSETENTRY PLUS CONSTANT WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY) UNIX-STREAM-PEEK ( +UNIX-PEEKEDCHAR FFETCHFIELD UNIX-READ) FILEGETDEF.ALISTS (LOADFNS ASSOC LIST CONS) SETSTKARGNAME ( +\STACKARGPTR \INTERPFRAMENT \FRAMESCAN FOLDLO LRSH \INDEXATOMVAL \VAG2 LOGAND GETSTKNAMEENTRY \ADDBASE + UNFOLD LLSH IPLUS LISPERROR \COPYFNHEADER MAKE-NTENTRY SUB1 IDIFFERENCE GETSTKNTOFFSETENTRY +\ATOMVALINDEX NTYPX \LOLOC SHOULDNT PLUS CONSTANT WORDSPERNAMEENTRY WORDSPERNTOFFSETENTRY) +PRINTER.BITMAPFILE (EVAL PRINTERPROP) \TEDIT.TRY.ABBREV (SASSOC U-CASE CHARCODE.DECODE CHARACTER +APPLY* EVAL) %%PRINT-ARRAY-CONTENTS (CL:1- CONSTANT CL:WRITE-CHAR) CHAT.CLOSEFN (CHAT.CLOSE) +\FM.UPDATEWINDOWEXTENT (\FM.WINDOWEXTENT WINDOWPROP IPLUS IDIFFERENCE) GETDEFSAVED (SELECTQ GETPROP +GETDEFERR GETPROPLIST SASSOC FASSOC) %%THIN-CHAR-TYPENUMBER (%%TYPE-SIZE-TO-TYPENUMBER) +\FM.COLLECTNWAYS (LIST WINDOWPROP \FM.ITEMPROP FFETCHFIELD LISTGET \FM.COERCEITEMPTR FM.GETITEM ERROR +\FM.MAKEGROUP CONS \FM.TOGGLE-CHANGESTATE) SEDIT::SETUP-CONTEXT (SEDIT::SET-INITIAL-SELECTION) +%%DEFPRINT-ARRAY (%%DEFPRINT-VECTOR %%DEFPRINT-GENERIC-ARRAY CL:CODE-CHAR CL:ARRAY-RANK) PRETTYDEF ( +RESETLST RESETSAVE RESETUNDO LIST ROOTFILENAME GET \DO-DEFINE-FILE-INFO COPY +LOOKUP-ENVIRONMENT-AND-FILEMAP OPENSTREAM INPUT UNION FILEPKG.CHANGEDFNS GET-ENVIRONMENT-AND-FILEMAP +LISTPUT FUNCTION OUTPUT GETFILEPTR FULLNAME) STKNARGS (\STACKARGPTR SUB1 \INTERPFRAMENT FOLDLO LRSH +PLUS GETSTKNAMEENTRY \ADDBASE UNFOLD LLSH IPLUS) OPT.LABELNTHPR (OPT.PRATTACH LIST) CL:PRINC-TO-STRING + (\PRINDATUM.TO.STRING) FRAMESCAN (\STACKARGPTR \FRAMESCAN \INTERPFRAMENT) CH.SERVERS (COURIER.CALL +GETCLEARINGHOUSE CH.PROPERTY CH.GETAUTHENTICATOR) CL:WRITE-CHAR (\OUTCHAR \GETSTREAM CL:CHAR-INT) +PFI.HANDLE.PACKAGE (PFI.PRETTYPRINT) OPT.JUMPREV (OPT.COMMONBACK OPT.FINDEND OPT.DEFREFS +OPT.LABELNTHPR OPT.NOTJUMP SELECTQ OPT.JUMPCOPYTEST) %%DEFPRINT-VECTOR (%%DEFPRINT-STRING +%%DEFPRINT-GENERIC-ARRAY %%DEFPRINT-BITVECTOR CL:CODE-CHAR VECTOR-LENGTH CL:1-) UNIX-STREAM-EOFP ( +FFETCHFIELD UNIX-CHANNEL UNIX-PEEKEDCHAR UNIX-LASTCHAR) \HDCPYDISPLAY.FIX.XPOS (FIX FTIMES CONSTANT) +%%DEFPRINT-GENERIC-ARRAY (CL:CODE-CHAR) PRINTCOPYRIGHT (GETPROP ASKUSER CONSTANT CHARACTER CONCAT +NCONC MAPCAR LIST CONS ASSOC SUBATOM DATE MEMBER) PFI.HANDLE.FILEMAP (PFI.PRETTYPRINT LIST) +\GOOD.DASHLST (INSURE.DASHING IQUOTIENT IPLUS BITMAPHEIGHT BITMAPWIDTH FIXR LENGTH APPEND TIMES ADD1 +SUB1 LIST) %%DEFPRINT-STRING (VECTOR-LENGTH) CENTEREDPRIN1 (IPLUS IQUOTIENT IDIFFERENCE STRINGWIDTH +PRIN3) \APPEND2 (CONS LIST) PRINTCOPYRIGHT1 (TERPRI ADD1 CONS CONCAT) /DECLAREDATATYPE (LIST +GETFIELDSPECS GETSUPERTYPE) CHECKDEFS (RECORD.PRIORITY FNTH RECORDECL CONS MAPCONC LIST RETDWIM2) FIXR + (FIXP LISPERROR NTYPX ADD1 IDIFFERENCE IGEQ LOLOC \LOLOC FLOAT IPLUS LLSH LRSH LOGAND PLUS SUB1 FIX +FPLUS SELECTQ .LRSH1. LOGOR .LRSHSTICKY. \MAKENUMBER) %%DEFPRINT-BITVECTOR (CL:CODE-CHAR VECTOR-LENGTH + CL:1-) SAVECOPYRIGHT (GETPROP LIST) BITMAPWIDTH (WINDOWPROP \ILLEGAL.ARG) \DSPXPOSITION.HDCPYDISPLAY +(\DSPXPOSITION.DISPLAY) COMPILER::FRAME-ANNOTATE-SETQ (COMPILER::FRAME-ANNOTATE COMPILER::SETQ-VALUE) +COMPERROR (RETFROM) DECLAREDATATYPE (GETFIELDSPECS APPEND TRANSLATE.DATATYPE LITATOM LIST) READFROMBUF + (TTNEXTCHAR) %%ARRAY-WRITE (%%SLOW-ARRAY-WRITE) \TEDIT.GET.PARALOOKS.LIST2 (\SMALLPIN SUB1 LLSH +IDIFFERENCE \TEDIT.GET.SINGLE.PARALOOKS2 LIST PLUS) %%FAT-CHAR-TYPENUMBER (%%TYPE-SIZE-TO-TYPENUMBER) +MB.WHENOPERATEDFN (SELECTQ MB.SHOWSELFN MB.SELFN) INSURE.DASHING (DASHINGP \ILLEGAL.ARG) +\SETWINFOYSIZE (\LIMITBYMIN \LIMITBYMAX) \VAMFindFreePages (UNINTERRUPTABLY SUB1 \VAMUpdateVAM PLUS) +COMPILER::META-EVAL-VAR-REF (COMPILER::NODE-META-P) \EDIT.DOWNCARET (DSPXPOSITION DSPYPOSITION +\CARET.FLASH?) TRANSLATE.DATATYPE (MAPCAR PLUS SELECTQ ERROR LOGAND - IPLUS ADD1 IDIFFERENCE CONS +MakeBitField FRPLACA SHOULDNT) PRINT-DOCUMENTATION (CL:DOCUMENTATION TRUE CL:FORMAT) GETDEFERR (HASDEF + LISTGET1 RETFROM GETDEF CONS MKLIST) COMPILER::FRAME-ANNOTATE-PROGV (NCONC COMPILER::FRAME-ANNOTATE +COMPILER::PROGV-SYMS-EXPR COMPILER::PROGV-VALS-EXPR COMPILER::PROGV-STMT) \POSTSCRIPT.ACCENTPAIR ( +SUBSTRING CONCAT OCTALSTRING SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE IEQP / +FONTPROP) LINELENGTH (\GETSTREAM FIX) %%ARRAY-READ (%%SLOW-ARRAY-READ) \NSRANDOM.UPDATE.VALIDATION ( +FILING.CALL \NSFILING.UPDATE.ATTRIBUTES) CLEANPOSLST (MAPC RELSTK) LISPXPRINT (LIST CONS PRINT) +XCL::WALK-UNEXPECTED-DECLARE (DECLARE CL:WARN) \RESHAPEATTACHEDWINDOWSAROUNDMAINW (WINDOWPROP +WINDOWREGION SELECTQ CREATEREGION ADD1 MAX DIFFERENCE PLUS CENTERINWIDTH SHOULDNT CENTERINHEIGHT MIN) +SEDIT::DOT-THIS-LIST (SUB1 NTH SEDIT::SET-SELECTION-NOWHERE) FW-CLOSEFN (PROCESS.NAME THIS.PROCESS +CONS) APPENDSEQUENCEDESCRIPTOR.IP (CONSTANT SUB1 EXPT LOGOR APPENDBYTE.IP APPENDINT.IP) \REUSETO ( +IDIFFERENCE CONS LIST PLUS) DWIMIFY2? (DWMFY2) READ-UNICODE-MAPPING (READ-UNICODE-MAPPING-FILENAMES +MAKEBITTABLE NCONC) DO-EVENT (FUNCTION COPY-CIRCLE STRING GETHASH CLOCK EXEC-PRINT) %%REDUCE-INTEGER ( +CL:1+ CL:1- MAX -) EXTENDEXTENT (WINDOWPROP EXTENDREGION) MakeBitField (LOGOR LLSH SUB1) MSMSGPRINT ( +PRIN1 PRIN2) BITMAPHEIGHT (WINDOWPROP \ILLEGAL.ARG) \NSRANDOM.WROTE.HANDLE (FILING.CALL CONSTANT +\FILING.ATTRIBUTE.TYPE.SEQUENCE ASSOC DREMOVE) \TEDIT.PUT.SINGLE.PARALOOKS (GETFILEPTR LOGAND LRSH +\BOUT SELECTQ SHOULDNT LENGTH IDIFFERENCE) XCL::WALK-TAGBODY (XCL::RECONS XCL::WALK-TAGBODY-1) +FLONUM-TO-STRING (CL:VALUES MAX MIN + DIGITSBDP CL:1- FLTSTR CL:MACROLET CL:LENGTH CL:CHAR +CL:FILL-POINTER CL:1+ =) PFI.HANDLE.* (SEMI-COLON-COMMENT-P + CL:CEILING STRINGWIDTH TIMES - +DSPRIGHTMARGIN DSPLEFTMARGIN FRPLACA PLUS NCONC1 LIST) TOPPATHS (ALLPATHS RECLOOK1) PRODUCE (RESUME) +REFLECT/GRAPH/VERTICALLY (IPLUS MAX/TOP MIN/BOTTOM IDIFFERENCE) EQUAL.CH.NAMES (STRING-EQUAL) +CL:CHARACTER (CL:INT-CHAR CL:LENGTH STRING CL:CHAR CL:ERROR) SEE* (NLAMBDA.ARGS APPLY) EDITLOADFNS? ( +WHEREIS LDIFFERENCE ASKUSER MAKEKEYLST GETPROP INFILEP FINDFILE FILEDATE STREQUAL LIST) DO.EDIT.PP ( +RETYPE.BUFFER WITH-RESOURCES COPY.SEGMENT BEEP TTSKIPSEPR TTYIN.READ LIST TTYIN.PPTOFILE GETRESOURCE +NEWRESOURCE MAKE-TTSCRATCHFILE) COURIER.BROADCAST.CALL (RESETLST \GET.COURIERPROGRAM GETHASH ERROR +\GET.COURIER.DEFINITION LIST OPENNSOCKET CREATE.PACKET.EXCHANGE.XIP \BUILD.EXPEDITED.XIP CONS PRIN1 +\COURIER.BROADCAST.ON.NET FUNCTION FRPLACD) COMPILER::META-EVAL-UNWIND-PROTECT (COMPILER::MEVAL +COMPILER::META-EVALUATE COMPILER::UNWIND-PROTECT-STMT REPLACEFIELD COMPILER::UNWIND-PROTECT-CLEANUP +COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) CHAT.ICONFN (WINDOWPROP TITLEDICONW FONTCREATE) +\FM.WINDOWEXTENT (COPY \FM.TOPGROUPPROP LISTGET WINDOWPROP \FM.INSUREWINDOW ERROR \FM.ITEMPROP +FFETCHFIELD \FM.ITEMWIDTH BITMAPWIDTH STRINGWIDTH) \POSTSCRIPT.SPECIALOUTCHARFN (\DSPFONT.PSC IPLUS +LOGAND LRSH) MMLTLIST (MAPCAR XYPT.X XYPT.Y PLUS TIMES CONS) \FM.MAKELINKS (MAPC WINDOWPROP +\FM.ITEMPROP FFETCHFIELD \FM.COERCEITEMPTR FM.GETITEM ERROR) COPY.TEXT.TO.IMAGE (GETSTREAM +DSPRIGHTMARGIN FONTMAPARRAY ARRAYSIZE FUNCTION LOGAND \INCCODE DSPXPOSITION CONSTANT APPLY IPLUS +SPREADAPPLY* NTH ERROR TIMES CHARWIDTH FONTCREATE ELT \PEEKBIN DSPLEFTMARGIN - REMAINDER NLSETQ +RELMOVETO +) GETFILEDEF (FILENAMEFIELD) SEDIT::SET-DEPTH (MAPC SEDIT::SET-DEPTH ADD1) +TYPE-VARIABLE-FROM-TYPE-NAME (NAMESTRING-CONVERSION-CLAUSE PACK* CL:FIRST SUBSTRING CL:1+ CL:INTERN +CONCAT MKSTRING CL:SYMBOL-PACKAGE) TTDELETECHAR (BEEP PREVLINE OVERFLOWLINE? TTNLEFT DELETETO TTRUBOUT +) GETDEFCOM0 (MAPCONC SUBPAIR PRETTYCOM1 GETDEFCOM0 SELECTQ MAPCAR CONS APPEND RETFROM) REMOVEDUPS ( +INTERSECTION) DISPLAYP (\OUTSTREAMARG \GETSTREAM DISPLAYSTREAMP IMAGESTREAMTYPEP) +\NSRANDOM.WRITE.SEGMENT (FILING.CALL COURIER.CREATE LIST FUNCTION) SI::PRINT-TRACED-CL-ARGLIST ( +DECLARE +) XCL::WALK-TAGBODY-1 (XCL::RECONS WALK-FORM-INTERNAL XCL::WALK-TAGBODY-1) +PFI.HANDLE./DECLAREDATATYPE (PFI.PRETTYPRINT LIST* LIST) \BREAKAPARTATWSTRUCTURE (MAPCONC APPEND CONS) + \VAMFilePageNumber (SELECTC SHOULDNT) BitFieldFirst (LRSH) OPT.LBDEL (OPT.DEFREFS DREMOVE FASSOC) +GETDEFCURRENT (APPLY* SELECTQ VIRGINFN GETTOPVAL RECLOOK MKPROGN FIELDLOOK COPY GETFILEDEF LIST +FILECOMS GETTEMPLATE KWOTE GETPROPLIST NCONC SOME CDDR FILEPKGCOM FILEPKGTYPE CONS MAKENEWCOM +GETDEFCOM) /SETSEPR (LIST GETSEPR SETSEPR) PRINTHISTORY2 (FUNCTION) \TEDIT.HCPYLOOKS.UPDATE ( +\TEDIT.APPLY.PARASTYLES \TEDIT.APPLY.STYLES PLUS \RPLPTR \ADDBASE2 \ADDBASE IPLUS \EDITELT GETBASEPTR +\GETBASEPTR FONTCLASSCOMPONENT FONTCOPY FIXR FTIMES DSPSCALE IMAX IDIFFERENCE LISTGET IMAGEOBJPROP +SUB1) COMPILER::FRAME-ANNOTATE-PROGN (MAPCONC COMPILER::PROGN-STMTS COMPILER::FRAME-ANNOTATE) +SCAN.LESSP (ILESSP) COMPILER::META-EVAL-THROW (COMPILER::MEVAL COMPILER::META-EVALUATE COMPILER::THROW-TAG + REPLACEFIELD COMPILER::THROW-VALUE COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) +\FM.UPDATEGROUPEXTENT (LIST \FM.DTOPGROUPID MAPC ASSOC LISTPUT COPYALL \FM.ITEMPROP FFETCHFIELD +LISTGET EXTENDREGION IPLUS FRPLACA PLUS MINUS) \POSTSCRIPT.PRINTSLUG (\FGETWIDTH \GETBASE \CHAR8CODE +LOGAND \MOVETO.PSC IPLUS) COMPILEDFETCHFIELD (LIST FUNCTION KWOTE SELECTQ SHOULDNT) \LFCloseDirectory +(\LFGetDirectory \LFPutDirectory) \FM.READUSERDATA (MAP LISTPUT \FM.ITEMPROP FFETCHFIELD) +SEDIT::SELECT-NEXT-GAP (SEDIT::NEXT-NODE) ALLPATHS (RECORD.FIELDNAMES RECORDECL NCONC ACCESSDEF4 +APPEND ALLPATHS RECLOOK1 RECORD.NAME RECORD.SUBDECS RECORD.TYPECHECK CONS MAPCONC RECORD.FIELDINFO +TOPPATHS JOINDEF) DRAWDASHEDLINE (IDIFFERENCE FIX SQRT IPLUS ITIMES TIMES LIST FQUOTIENT PLUS FPLUS +FTIMES MOVETO) \DSKCreateDevice (\UFS.CREATE.DEVICE FUNCTION) OPT.UBDEL (DREMOVE FASSOC +OPT.COMPILERERROR) PRETTYPRINT (RESETLST RESETSAVE LIST FUNCTION DSPFONT GETSTREAM CLOCK OUTPUT EVALV +CLOCKDIFFERENCE GETFILEPTR VIRGINFN ARGTYPE CONS EDITLOADFNS? MISSPELLED? NLEFT) CANONICAL.CH.NAME ( +MKATOM NSNAME.TO.STRING PARSE.NSNAME) DRAWLINE (IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) +PRETTYPRINT3 (CLISPIFY) MAXSTRINGWIDTH (IMAX STRINGWIDTH) COMPILEDREPLACEFIELD (LIST FUNCTION KWOTE +SELECTQ SUBPAIR) RECORDCHAIN (CHECKDEFS TOPPATHS) REFLECT/GRAPH/HORIZONTALLY (IPLUS MAX/RIGHT MIN/LEFT + IDIFFERENCE) GENERATEFN (CONS STKNTH RETTO) MOVETO (IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) +AU-REVOIR (ARG RESUME) SEDIT:DEFAULT-COMMANDS (CL:COPY-TREE SEDIT:RESET-COMMANDS) GLOBALVARS (UNION) +LAYOUTFOREST (LAYOUTGRAPH APPEND CONS) SEND.FILE.TO.PRINTER (RESETLST FULLNAME PRINTFILETYPE U-CASE +PRINTERTYPE CONVERT.FILE.TO.TYPE.FOR.PRINTER LISTGET DEFAULTPRINTER CL:FUNCALL PRINTERPROP ERROR +CONCAT APPEND LIST) CH.NAME.TO.STRING (NSNAME.TO.STRING PARSE.NSNAME) SQRT (FLOAT LOGAND IPLUS LRSH +IDIFFERENCE MASK.1'S LSH SUB1 FTIMES FPLUS FQUOTIENT) COPYALLBYTES (RESETLST LIST OPENSTREAM +GETFILEPTR INPUT OUTPUT OPENP) SET/LABEL/SIZE (FIXP DSPSCALE GRAPHNODE/BORDER/WIDTH FIXR FTIMES +BITMAPWIDTH BITMAPHEIGHT APPLY* IMAGEOBJPROP FONTP FONTCREATE IPLUS STRINGWIDTH FONTPROP) +CL::SXHASH-PATHNAME (CL::SXHASH-ROT LOGXOR CL::%%SXHASH %%PATHNAME-HOST %%PATHNAME-DEVICE +%%PATHNAME-TYPE %%PATHNAME-VERSION %%PATHNAME-DIRECTORY %%PATHNAME-NAME) CHAT.ENDOFSTREAMOP ( +STREAMPROP FUNCTION) \FM.TRANSPOSEVERT (WINDOWPROP \FM.ITEMPROP FFETCHFIELD \FM.TRANSPOSE FIX FPLUS +FQUOTIENT FTIMES) APPENDIDENTIFIER.IP (NCHARS MKSTRING SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE +\GETBASETHIN \GETBASEBYTE) SCANFILEHELP (INPUT HELP) \FM.MAKEBITMAP (LISTGET BITMAPCREATE CREATEREGION + IDIFFERENCE ITIMES DSPCREATE IPLUS FONTPROP) \DSPRIGHTMARGIN.HDCPYDISPLAY (\DSPRIGHTMARGIN.DISPLAY +FIX FTIMES CONSTANT) DSPBACKCOLOR (IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) OPENIPSTREAM ( +OPENSTREAM LISTGET \PAPERSIZE.IP GETEOFPTR FULLNAME FUNCTION FRPLACA COPY FILENAMEFIELD STRPOS +SUBSTRING ADD1 SUB1) FIELDLOOK (RECFIELDLOOK) CL::%%SXHASH (\EQHASHINGBITS LOGXOR \HILOC LLSH LOGAND +\LOLOC LRSH CL::SXHASH-LIST CL::SXHASH-STRING CL::SXHASH-BIT-VECTOR CL::SXHASH-PATHNAME) MB.SELFN ( +IMAGEOBJPROP APPLY*) MB.SETIMAGE (IMAGEOBJPROP STRINGWIDTH FONTPROP BITMAPCREATE DSPCREATE) +XCL::SETF-GET-PROCESS-PROFILE (THIS.PROCESS XCL::PROFILIZE PROCESSPROP) /SETD (LIST ELTD SETD) +TEDIT.HARDCOPY.PAGEHEADING (STREAMPROP PLUS \TEDIT.COPYTEXTSTREAM.PIECEMAPFN LIST SUB1 IPLUS) +COMPILEDNCREATE (LIST \TYPEGLOBALVARIABLE) DSPBOTTOMMARGIN (IMAGEOP SPREADAPPLY* \OUTSTREAMARG +\GETSTREAM) COMPILER::META-EVAL-TAGBODY (MAPC COMPILER::TAGBODY-SEGMENTS COMPILER::ANALYZE-TREE +COMPILER::NODE-META-P) UNIX-READ (UNIX-CHANNEL FFETCHFIELD \EOF.ACTION UNIX-LASTCHAR) READ-AFM-FILE ( +OPENSTREAM ARRAY RSTRING FONTCREATE printout MENU TERPRI LIST POSTSCRIPT.GETFONTID READ IABS IMINUS +IPLUS FIXR FTIMES / RATOM READCCODE LISTGET PLUS) \DSKCloseDevice (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 + .UNWIND.PROTECT. FUNCTION) RESTOREBUF (PROPERTAILP CONS) XCL::WALK-PROG (XCL::WALK-LET/LET*) +*DIGIT-STRING* (CL:MAKE-ARRAY) MSFINDP (MSFINDP) SHEDSCAN (MAKEBRES IPLUS) EDITNUMBERP (IDIFFERENCE +CONSTANT CHCON1) SHORTLST (SHORTLST SUB1) DSPCOLOR (IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) +\DSKEventFn (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SELECTQ MACHINETYPE +CLRHASH \FLUSH.OPEN.STREAMS) \FM.TRANSPOSEHORZ (WINDOWPROP \FM.ITEMPROP FFETCHFIELD \FM.TRANSPOSE FIX +FPLUS FQUOTIENT FTIMES) \TEDIT.PARSE.CHARLOOKS.LIST (CHARLOOKS.FROM.FONT LISTGET FMEMB CONS NLSETQ +\DTEST \TEDIT.FONTCOPY IPLUS FONTPROP IMINUS) MERGLIST (HEADPT XYPT.Y CONS REVERSE) \FM.GETBITMAPS ( +LISTGET \FM.MAKEBITMAP BITMAPCOPY IDIFFERENCE ITIMES LIST) \UFS.UNREGISTER.GFS (UNINTERRUPTABLY +PUTHASH) COMPILER::FRAME-ANNOTATE-MV-CALL (NCONC COMPILER::FRAME-ANNOTATE COMPILER::MV-CALL-FN MAPCONC + COMPILER::MV-CALL-ARG-EXPRS) SEDIT::REVIVE-NODE (IPLUS MAPC SEDIT::REVIVE-NODE) PRETTYCOM (LIST +FIXSPELL FUNCTION SUBPAIR PRETTYCOM1 PRETTYCOM PRETTYVAR CONS MAKEDEFLIST PRINTDEF1 GETPROPLIST NCONC +PRIN2 ADD1 POSITION PRINTDEF PRIN1 PRETTYVAR1 ERRORX EVAL printout KWOTE GETDEF TERPRI) RECLOOK1 ( +SUBSET RECORD.NAME RECORDECL) \UNVISIBLE.FLUSH.OPEN.STREAMS (LOGAND CONSTANT LOGOR SPREADAPPLY*) ADIEU + (ARG RETTO) SEDIT:RESET-COMMANDS (SEDIT::CREATE-COMMAND-TABLE CL:FIRST CL:SECOND) FW-OPENP ( +SCRATCHLIST FRPLACA FRPLACD CONS APPLY* ADDTOSCRATCHLIST \GETSTREAM FLAST) CH.ADD.MEMBER ( +CH.CANONICAL.NAME COURIER.CALL CH.FINDSERVER PARSE.NSNAME FIXP CH.PROPERTY CH.GETAUTHENTICATOR) +DSPCLIPPINGREGION (IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM \ILLEGAL.ARG) SEE (NLAMBDA.ARGS +COPYALLBYTES) MINIMUMWINDOWSIZE (WINDOWPROP CONS HEIGHTIFWINDOW FONTPROP APPLY* NUMBERP ERROR) +EQLENGTH (NTH) DOERROR (CONS SASSOC FASSOC FRPLACA MEMBER) UNIX-BACKFILEPTR (FFETCHFIELD ERROR +UNIX-PEEKEDCHAR UNIX-LASTCHAR) CONFIRM-SET (MOUSECONFIRM) PRINTFNS (TCONC GETFILEPTR) PARSE.NSNAME ( +SELECTQ LISPERROR MKSTRING STRPOS SUBSTRING SUB1 ADD1) \UNVISIBLE.PAGED.REVALIDATEFILELST ( +\PAGED.REVALIDATEFILE RESTOREMAP FORGETPAGES STREAMPROP APPLY* SPREADAPPLY*) XCL::WALK-PROG* ( +XCL::WALK-LET/LET*) SUBPAIR (CONS SUBPAIR COPY) SEDIT::AWAKE-COMMAND-PROCESS (WINDOWPROP) DSPRESET ( +IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) \UFSCreateDevice (\UFS.CREATE.DEVICE FUNCTION) +FW-CLOSE-OLD-OFD-WINDOWS (MAPC SELECTQ CLOSEW SHOULDNT CONS) MB.DISPLAY (SELECTQ IMAGESTREAMTYPE +IMAGEOBJPROP DSPXPOSITION DSPYPOSITION IDIFFERENCE DSPFONT FONTCOPY) PRETTYDEF1 (MEMB SUBPAIR LIST +CONS UNION INTERSECTION) BYTESININT.IP (FOLDHI LRSH IPLUS ADD1 INTEGERLENGTH) +\TEDIT.PARSE.PARALOOKS.LIST (LISTGET FMEMB CONCAT CONS MAPCAR) \DSKDISPLAY.UPDATE (REDISPLAYW) /SETBRK + (LIST GETBRK SETBRK) \UFS.CREATE.DEVICE (\MAKE.PMAP.DEVICE FUNCTION) TEDIT.SKIP.SPECIALCOND ( +STREAMPROP PLUS LIST SUB1 IPLUS) FILEFNSLST (FILECOMSLST) \UFSEventFn (WITH.MONITOR +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SELECTQ MACHINETYPE CLRHASH \FLUSH.OPEN.STREAMS) +LISPXREPRINT (\GETSTREAM PRIN1 PRIN2 CL:APPLY SELECTQ APPLY* TAB TERPRI APPLY CONS) +\TEDIT.GET.SINGLE.PARALOOKS (GETFILEPTR \SMALLPIN SUB1 LLSH IDIFFERENCE CONS \BIN SELECTC SHOULDNT +LOGAND SELECTQ LIST PLUS ZEROP \ARBIN \ATMIN IPLUS) \CHARWIDTH.HDCPYDISPLAY (IQUOTIENT IPLUS +\FGETCHARIMAGEWIDTH \FGETWIDTH \GETBASE \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CHARSET LRSH +\CREATECHARSET \CHAR8CODE LOGAND FONTCREATE STREAMPROP CONSTANT) DSPFONT (IMAGEOP SPREADAPPLY* +\OUTSTREAMARG \GETSTREAM) FILEPKG.CHANGEDFNS (ASSOC) FILECHANGES (RESETLST OPENP GETFILEPTR LIST +OPENSTREAM LDIFF MEMB ASSOC SUBSET LITATOM NCONC CONS LISTP) SEDIT::MAP-COMMENT-INDEX (NCHARS +IDIFFERENCE) \UFSDirectoryNameP (CONCAT UNPACKFILENAME.STRING \UFS.HANDLE.RELATIVEDIRECTORY +\UFS.DEFAULT.DIR ALLOCSTRING \UFS.DIRECTORY.NAME \UFS.FULLNAME SUBSTRING) OPT.LBMERGE (OPT.DEFREFS +OPT.LBDEL) TRANSLATE.LOCF (MKPROGN PLUS CL:MACROEXPAND-1 LIST) COMPILER::FRAME-ANNOTATE-MV-PROG1 ( +MAPCONC COMPILER::MV-PROG1-STMTS COMPILER::FRAME-ANNOTATE) XCL::SAVE-CURRENT-EXEC-PROFILE ( +XCL::GET-PROCESS-PROFILE THIS.PROCESS XCL:SAVE-PROFILE) PSCFONT.WRITEFONT (OPENSTREAM FIND-READTABLE +\BOUT ELT PLUS) CL:MACROEXPAND-1 (CL:MACRO-FUNCTION CL:FUNCALL CL:VALUES) DO.DELETE.LINES (+ - +DSPYPOSITION TIMES) DSPLEFTMARGIN (IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) COMPILER::META-EVAL-SETQ + (COMPILER::MEVAL COMPILER::META-EVALUATE COMPILER::SETQ-VALUE REPLACEFIELD COMPILER::ANALYZE-TREE +COMPILER::NODE-META-P) MKPROGN (CONS) UNIQLIST (HEADPTY CONS HEADPT XYPT.Y REVERSE) +PFI.HANDLE.PUTPROPS (PFI.PRETTYPRINT) \UFSGenerateFiles (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION \UFSGetMonitor) \INIT.ETHER.BUFFER.POOL (IDIFFERENCE CEIL LOGAND IPLUS +CONSTANT SUB1 ITIMES LOGXOR EMPOINTER \VAG2 IMIN IQUOTIENT SELECTC \LOLOC \ADDBASE PLUS) RECFIELDLOOK +(MAPCONC RECFIELDLOOK MAPCAR RECLOOK LIST RECORD.FIELDNAMES RECORDECL RECORD.NAME) APPENDBYTE.IP ( +\BOUT) \UFSSetFileInfo (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \UFSGetMonitor +\UFS.FULLNAME \UFS.RECOGNIZE.FILE CREATECELL SELECTQ \UFSSetFileType IDATE \UFSSetFileInfo-C \UFSError + ERROR) \UFSOpenFile (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \UFSGetMonitor +SELECTQ CREATECELL SUBSTRING ADD1 STRPOS \UFS.RECOGNIZE.FILE \UFS.OPENP LOGAND CONSTANT LOGOR +\UFS.FULLNAME \UFS.ADD.HOST.FIELD \UFSOpenFile-C \UFSError IPLUS FOLDLO LRSH IMOD \UFSeol FASSOC IDATE +) \10MB.TURNONETHER (LOCF \ADDBASE) PRETTYDEFCOMS (GETTOPVAL PRETTYCOM) \DSPFONT.HDCPYDISPLAY ( +FONTCREATE STREAMPROP \DSPFONT.DISPLAY FONTPROP \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CREATECHARSET + IMINUS FIXR QUOTIENT CONSTANT \CREATECSINFOELEMENT \ALLOCBLOCK FOLDHI LRSH IPLUS FQUOTIENT \PUTBASE +FTIMES \FGETWIDTH \GETBASE PLUS) DSPLINEFEED (IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) PRINTDATE + (DATE ROOTFILENAME FILEPKG.MERGECHANGES CONS FULLNAME LAST) \LFDeleteFile (WITH.MONITOR +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \LFGetStreamForFile SPREADAPPLY* \LFGetDirectory +\PFSaveBuffers) TEDIT.BUILD.PCTB (CHARLOOKS.FROM.FONT \CREATEPIECEORSTREAM TEXTPROP OPENSTREAM +\TEDIT.FORMATTEDP1 \MAKEPCTB \TEDIT.UNIQUIFY.CHARLOOKS \TEDIT.UNIQUIFY.PARALOOKS IDIFFERENCE GETEOFPTR + APPLY* \TEDIT.CONVERT.FOREIGN.FORMAT \GETBASEPTR \FIRSTNODE TEDIT.BUILD.PCTB0 TEDIT.BUILD.PCTB1 +TEDIT.BUILD.PCTB2 \DWIN \SMALLPIN SUB1 LLSH TEDIT.GET.PAGEFRAMES PLUS \TEDIT.GET.CHARLOOKS.LIST ARRAY +FLENGTH \TEDIT.GET.PARALOOKS.LIST \TEDIT.GET.PARALOOKS \BIN \TEDIT.GET.SINGLE.CHARLOOKS IPLUS +GETFILEPTR) TRYNEXT (TRYNEXT1 EVAL) \UFSGetFileName (\UFS.FULLNAME \UFS.RECOGNIZE.FILE) \UFSWritePages + (IPLUS ITIMES CREATECELL \UFSWritePages-C \UFSError PLUS) PRINTDATE1 (FULLNAME CHANGEFONT CONS ADD1 +GETFILEPTR PRINTDEF POSITION PRIN2 PRIN1) CH.ADD.GROUP.PROPERTY (MAPCAR CH.CANONICAL.NAME COURIER.CALL + CH.FINDSERVER PARSE.NSNAME FIXP CH.PROPERTY FUNCTION CH.GETAUTHENTICATOR) CH.ISMEMBER ( +COURIER.EXPEDITED.CALL CH.FINDSERVER PARSE.NSNAME FIXP CH.PROPERTY CH.GETAUTHENTICATOR) DSPOPERATION ( +IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) PRETTYDEF0 (DELFILE CLOSEF) \10MB.LOADINPUTQ (PLUS) +\TEDIT.INTEGER.IMAGEBOX (FIXR) FILEPKG.MERGECHANGES (APPEND LIST ASSOC NCONC1) SNAPW (GETSCREENREGION +CREATEW GROW/REGION) \UFSTruncateFile (FIXP + UNFOLD LLSH CREATECELL \GETFILEPTR SPREADAPPLY* - PLUS +\UFSGetSize-C \UFSError) HARDCOPYSTREAMTYPE (\OUTSTREAMARG \GETSTREAM STREAMPROP) DSPRIGHTMARGIN ( +IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) D-ASSEM::FIXUP-NTENTRY (\LOLOC \HILOC LOGOR +\GETBASEBYTE LOGAND LRSH + \PUTBASEBYTE CL:1+) SCALE-EXPONENT (SCALE-EXPT-AUX CONSTANT CL:LOG) +OPT.JUMPTHRU (OPT.LBDEL SELECTQ FASSOC CONS OPT.LABELNTHPR OPT.JUMPCOPYTEST PLUS OPT.SKIPPUSH +OPT.COMPILERERROR OPT.DEFREFS) \UFSDeleteFile (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. +FUNCTION \UFSGetMonitor \UFS.RECOGNIZE.FILE CREATECELL \UFS.REMOVE.HOST.FIELD \UFS.FULLNAME \UFSError) + SEDIT:REPLACE-SELECTION (CL:MAPCAR CL:FUNCTION SEDIT::PARSE-NEW CL:COPY-LIST SEDIT::SELECT-PSEUDO-SEGMENT + SEDIT::COMPOSE-PSEUDO-SELECTION) U-CASECODE (CL:CHAR-INT CL:CHAR-UPCASE CL:INT-CHAR) DSPTOPMARGIN ( +IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) SPECVARP (GETRELQ GETTABLE FASSOC FMEMB GETP) +COMPILER::META-EVAL-RETURN (COMPILER::MEVAL COMPILER::META-EVALUATE COMPILER::RETURN-VALUE +COMPILER::BLOCK-CONTEXT COMPILER::RETURN-BLOCK REPLACEFIELD COMPILER::ANALYZE-TREE COMPILER::NODE-META-P +) D-ASSEM::TYPE-NAME-FROM-SIZE (PACK*) \FM.INITCORNERSFN (WINDOWPROP LIST IPLUS WIDTHIFWINDOW +HEIGHTIFWINDOW) \LFRenameFile (\GENERIC.RENAMEFILE SPREADAPPLY* \RECOGNIZE-HACK FDEVOP +\LFFindDirectory \LFParseFileName \LFFileSpec CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +\LFGetStreamForFile \LFFindDirHole \LFFullFileName \LFFileName \LFUnpackName DAYTIME +\LFWriteLeaderPage) \FM.GETREGIONS (\FM.ITEMWIDTH LISTGET BITMAPWIDTH STRINGWIDTH \FM.ITEMHEIGHT +BITMAPHEIGHT FONTPROP BITMAPP STRINGP IMAX ITIMES IPLUS LIST CREATEREGION IMIN) \UFSCloseFile ( +CREATECELL LOGAND CONSTANT LOGOR SPREADAPPLY* \UFSError) SEDIT::REPLACE-ROOT (FREPLACEFIELD CONS LIST +SEDIT::SUBNODE FFETCHFIELD SEDIT::CREATE-NULL-LIST SEDIT::CREATE-WEAK-LINK ADD1) TRACKW (\INSUREWINDOW + RESETFORM CURSOR TOTOPW LOGAND IDIFFERENCE ZEROP IPLUS) DSPSCALE (IMAGEOP SPREADAPPLY* \OUTSTREAMARG +\GETSTREAM) \UFSGetFileInfo (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +\UFSGetMonitor \UFS.FULLNAME \UFS.RECOGNIZE.FILE CREATECELL SELECTQ \UFSError FOLDHI LRSH IPLUS +\UFSGetFileType GDATE ALLOCSTRING \UFSGetFileInfo-C CL:SUBSEQ \UFS.CREATE.PROPS ASSOC) TTYINENTRYFN ( +LOGAND WINDOWPROP FUNCTION GIVE.TTY.PROCESS) GETSYNTAX (\GETCHARCODE \GETTERMSYNTAX \GETREADSYNTAX +\GTREADTABLE \READCLASSTOCODE FUNCTION \TERMCLASSTOCODE \GTTERMTABLE) PSCFONTFROMCACHE.SPELLFILE ( +ASSOC L-CASE FILENAMEFIELD \FONTFILENAME FASSOC) /SETA (LIST ELT SETA) D-ASSEM::CREATE-HUNK ( +D-ASSEM::EMIT-BYTE-LIST) \GTREADTABLE1 (GETHASH LISPERROR) MAKEACCESS1 (MAKEACCESS1 LIST RECORDBINDVAL + SELECTQ RECORDERROR CONSFN CONS PACK* PACK APPEND MKACCESSFN RECEVAL MKPROGN KWOTE SHOULDNT) +\TEDIT.CARETLOOKS.VERIFY (TEXTPROP APPLY* \TEDIT.UNIQUIFY.CHARLOOKS) \UFSeol (SELECTQ \UFSGetFileType +\UFS.PARSE.BODY \UFSParseNameString PRIN1) \GTTERMTABLE (LISPERROR) EMPRESS (SEND.FILE.TO.PRINTER +NCONC LIST) DSPSPACEFACTOR (GREATERP IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) \UFSRenameFile ( +\GENERIC.RENAMEFILE \UFS.RECOGNIZE.FILE CREATECELL \UFS.REMOVE.HOST.FIELD \UFS.FULLNAME IPLUS CONCAT) +\DOFORMATTING.HARDCOPY (PLUS FFETCHFIELD IPLUS LRSH ADD1 SUB1 \EDITELT GETBASEPTR \GETBASEPTR +\ADDBASE2 \ADDBASE \RPLPTR IQUOTIENT FIXR FTIMES FPLUS FQUOTIENT) \TERMCLASSTOCODE (SELECTQ) +TTDELETEWORD (BEEP PREVWORD PREVLINE MOVE.TO.WHEREVER BACKWARD.DELETE.TO) \UFSError (IPLUS +\UFS.FULLNAME) UNECCSPEC (GLOBALVARP FMEMB GETRELQ GETTABLE FASSOC DOERROR) \FM.FILLWINDOW ( +DSPCLIPPINGREGION RESETLST RESETSAVE LIST CREATEREGION IDIFFERENCE IPLUS DSPFILL) \READCLASSTOCODE ( +\COMPUTED.FORM SELECTQ LOGOR) \LFTruncateFile (FIXP \GETFILEPTR SPREADAPPLY* PLUS TIMES IQUOTIENT +DIFFERENCE ITIMES) \FM.CREATEITEM (PLUS LISTGET APPLY* \FM.GETREGIONS \FM.GETBITMAPS LIST FUNCTION +PACK*) DSPXPOSITION (IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) PSCFONTFROMCACHE.COERCEFILE ( +PSCFONTFROMCACHE.SPELLFILE LIST) \GETREADSYNTAX (\SYNCODE GETHASH \GETBASEBYTE \COMPUTED.FORM SELECTQ +\GETREADMACRODEF LIST* CL:APPEND LIST) OPT.JUMPOPT (MAPC) SEDIT::CHARCODE (SMALLP CL:FUNCALL FUNCTION) + \UFS.ADD.HOST.FIELD (CONCAT) \PFRoomForFile (LEQ DIFFERENCE \PFFreeDiskPages IDIFFERENCE IQUOTIENT +ITIMES) SEDIT:GET-SELECTION (CL:VALUES SEDIT::STRUCTURE-FROM-SELECTION MKSTRING SEDIT::DETRANSLATE-CHARS + SUBSTRING) D-ASSEM::COPY-LAP-FN (D-ASSEM::COPY-LAP-CODE LIST) \GETTERMSYNTAX (\TERMCODETOCLASS +\SYNCODE GETHASH \GETBASEBYTE) PRETTYVAR1 (LINELENGTH TYPENAME SPACES TERPRI CONS APPEND POSITION +FUNCTION) DSPYPOSITION (IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) \UFSReadPages (PLUS CREATECELL +\UFSReadPages-C \UFSError -) MAKEDEFLIST (SOME GETPROPLIST LIST MEMB) OPT.XVARSCAN1 (OPT.CODEFRAME) +\DEVICEFILE.EOSERROR (SELECTQ LISPERROR \GETMAPBUFFER \UFSReadPages-C SHOULDNT) %%SORT-SUBLIST ( +%%MERGE-SUBLISTS %%SIMPLE-MERGE-SUBLISTS) SEDIT::REPLACE-NODE (FREPLACEFIELDVAL REPLACEFIELDVAL +FETCHFIELD SEDIT::SMASH-USING) GETDEFCOM (MAPCONC GETDEFCOM0) DWIMIFY1? (DWMFY1) FIX-FORM ( +TTYDISPLAYSTREAM COUNTDOWN LENGTH EXEC-READ-LINE) PRINTDEF1 (GETFILEPTR LIST CONS TERPRI) \UFS.OPENP ( +FUNCTION) PRETTYVAR (GETTOPVAL TERPRI) COMPILER::FRAME-ANNOTATE-LAMBDA (COMPILER::LAMBDA-NEW-FRAME-P +COMPILER::LAMBDA-KEYWORD COMPILER::LAMBDA-REST COMPILER::LAMBDA-OPTIONAL COMPILER::LAMBDA-ARG-TYPE +NCONC MAPCONC COMPILER::FRAME-ANNOTATE CL:SECOND CL:THIRD COMPILER::LAMBDA-BODY COMPILER::CLOSE-OVER +CL:NUNION) D-ASSEM::EMIT-BYTE-LIST (MAPC D-ASSEM::EMIT-BYTE) DSPROTATE (IMAGEOP SPREADAPPLY* +\OUTSTREAMARG \GETSTREAM) CHAT.SETDISPLAYTYPE (STREAMPROP CL:FUNCALL) \FM.RESETCLIPPINGREGION ( +DSPCLIPPINGREGION CREATEREGION IDIFFERENCE IPLUS WINDOWPROP DSPXOFFSET DSPYOFFSET) BLOCK%: (NCONC1) +\LFGetFileInfo (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \LFGetStreamForFile +SELECTQ IPLUS ITIMES FOLDHI LRSH GDATE) \FM.CHECKPROPS (LISTGET ERROR CONCAT MAPC) D-ASSEM::FETCH-HUNK + (CL:REVERSE) XCL::WALK-MACROLET (CL:LABELS) MKACCESSFN (SELECTQ CONSFN CLISPLOOKUP0 LIST LISTGET CONS + MKACCESSFN COPY CSUBST) D-ASSEM::COPY-LAP-CODE (LIST) DSPPUSHSTATE (IMAGEOP SPREADAPPLY* +\OUTSTREAMARG \GETSTREAM) POSSIBILITIES (LIST CONS STKNTH) \SHOWSEL.HILIGHT (IDIFFERENCE IMIN FIXR +FQUOTIENT) NESTED.SUBMENU (GETMENUPROP FASSOC CONS IMAX) \UFS.FULLNAME (CONCAT MKATOM U-CASE) +\UFS.REMOVE.HOST.FIELD (UNPACKFILENAME.STRING MEMB LISTGET FIXP MKATOM \UFS.HANDLE.RELATIVEDIRECTORY +\UFS.DEFAULT.DIR PACKFILENAME.STRING SUBSTRING NTHCHARCODE CONCAT) /PRINTLEVEL (LIST FUNCTION +PRINTLEVEL) PRETTYCOM1 (EVAL GETTOPVAL RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION SUBSET) \RESHOWBORDER1 (IDIFFERENCE IPLUS ITIMES DSPCLIPPINGREGION +DSPLINEFEED BITMAPCREATE DSPDESTINATION \GETBASE \TOTOPWDS) DSPPOPSTATE (IMAGEOP SPREADAPPLY* +\OUTSTREAMARG \GETSTREAM) WINDOWDELPROP (WINDOWPROP REMOVE) ADDNAKEDCHAR (ADDCHAR SELCHARQ +START.NEW.LINE BEEP AUTOCR? TTMAKECOMPLEXCHAR LIST TTADDTAB LOGOR) ACCEPT-UNIX-SOCKET-STREAM ( +UNIX-CHANNEL FFETCHFIELD SELECTQ CONS) RELDSPYOFFSET (DSPYOFFSET IPLUS) \UFSCloseDevice (WITH.MONITOR +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) D-ASSEM::MAX-ARG (\FINDOP - CL:SECOND CL:FIRST) +\IDLE.EXIT.ABORT (STKPOS ERROR!) FORMAT-ERROR (CL:ERROR LIST CL:1+) DEFAULT.INSPECTW.VALUECOMMANDFN ( +SELECTQ TYPENAME INSPECT/ATOM PRIN1 ZEROP LOGAND CLRPROMPT INSPECT/BITMAP INSPECT/LISTP MENU INSPECT) +COMPILER::FRAME-ANNOTATE-LABELS (NCONC MAPCONC COMPILER::LABELS-FUNS COMPILER::FRAME-ANNOTATE +COMPILER::LABELS-BODY) DSPDEFAULTSTATE (IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) MENUTITLEFONT ( +DSPFONT FONTP \COERCEFONTDESC) SEDIT::RELINEARIZE-WHERE-NECESSARY (REVERSE DREVERSE RPLACD) +D-ASSEM::END-BYTES (CL:NREVERSE) \FM.CHECKDESCRIPTION (LISTGET ERROR CONCAT IPLUS SELECTQ) +TEDIT.PAGEFORMAT (TEXTOBJ LIST) SEDIT::RECOMPUTE-WIDTH (IPLUS IMAX IDIFFERENCE) OPT.XVARSCAN (OASSOC +FASSOC OPT.CODELEV) XYSECTLSEG (IPLUS XYSECT XYPT.Y) PFI.PRINT.LAMBDA (PFI.ESTIMATE.SIZE1 TERPRI) +COMPILER::META-EVAL-PROGV (COMPILER::MEVAL COMPILER::META-EVALUATE COMPILER::PROGV-SYMS-EXPR +REPLACEFIELD COMPILER::PROGV-VALS-EXPR COMPILER::PROGV-STMT COMPILER::ANALYZE-TREE COMPILER::NODE-META-P +) PRINTARRAY-TO-LIST (ARRAYSIZE ARRAYTYP ARRAYORIG HELP NUMBERP CONS ELT SUB1 IPLUS ADD1 ELTD REVERSE) + PSCFONT.COERCEFILE (PSCFONT.SPELLFILE LIST) UNMAKEHARDCOPYSTREAM (DISPLAYSTREAMP WINDOWPROP +\ILLEGAL.ARG FMEMB IMAGESTREAMTYPE FUNCTION) READARRAY-FROM-LIST (ARRAY SUB1 IPLUS ADD1 SHOULDNT) +RESHOWBORDER (\RESHOWBORDER1) D-ASSEM::CHOOSE-OP (D-ASSEM::MAX-ARG) DSPSCALE2 (IMAGEOP SPREADAPPLY* +\OUTSTREAMARG \GETSTREAM) CREATE-UNIX-SOCKET-STREAM (UNIX-CHANNEL FFETCHFIELD CONS) SEDIT:ADD-COMMAND +(NCONC LIST) RELDSPXOFFSET (DSPXOFFSET IPLUS) COMPILER::GENCODE-CALL (COMPILER::CALL-FN COMPILER::CALL-ARGS + CL:LENGTH COMPILER::VAR-REF-VARIABLE COMPILER::VARIABLE-KIND COMPILER::VARIABLE-NAME +COMPILER::LAMBDA-REQUIRED COMPILER::LAMBDA-OPTIONAL COMPILER::GENCODE CL:REVERSE COMPILER::LITERAL-VALUE + CL:FIRST COMPILER::LAMBDA-NO-SPREAD-NAME CL:SECOND CL:MAPCAR CL:FUNCTION COMPILER::LAMBDA-CLOSED-OVER-VARS + NCONC COMPILER::COLLECT-CODE COMPILER::VARIABLE-SCOPE CL:THIRD) SETSYNTAX (FIXP \GETCHARCODE +\GTTERMTABLE \GTREADTABLE GETSYNTAX \GETREADSYNTAX \GETTERMSYNTAX) D-ASSEM::REF-VAR (CL:FIRST CL:ERROR +) \INSPECT.DATATYPE.RAW.FETCH (FETCHFIELD NTH) \FM.UNSCROLLWINDOW (IPLUS WINDOWPROP +\FM.RESETCLIPPINGREGION) \SETTERMSYNTAX (\SETSYNCODE \PUTBASEBYTE \SETFATSYNCODE \SYNCODE GETHASH +\GETBASEBYTE \TERMCLASSTOCODE LISPERROR) SEDIT::ATOM-CHAR-ESCAPED (\SYNCODE GETHASH \GETBASEBYTE) +MB.BUTTONEVENTINFN (IMAGEOBJPROP) \UFS.DIRECTORY.NAME (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION \UFSGetMonitor CL:FUNCALL \UFS.DIRECTORY.RECOGNIZER CREATECELL) +D-ASSEM::DCODE-FROM-DLAMBDA (D-ASSEM::MAKE-DCODE D-ASSEM::DLAMBDA-NAME D-ASSEM::START-BYTES +D-ASSEM::EASY-ENTRY-P CL:FIND D-ASSEM::DLAMBDA-BODY D-ASSEM::END-BYTES) /MOVD (COPY VIRGINFN GETD) +\SETREADSYNTAX (\SYNCODE GETHASH \GETBASEBYTE \READCLASSTOCODE \SETSYNCODE \PUTBASEBYTE \SETFATSYNCODE +) MAKEACCESS (SELECTQ SHOULDNT MAKEACCESS1 MAKEACCESS) DSPTRANSLATE (IMAGEOP SPREADAPPLY* +\OUTSTREAMARG \GETSTREAM) \LFGetFileName (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. +FUNCTION \LFFileSpec \LFFullFileName) SYNTAXP (\SYNCODE GETHASH \GETBASEBYTE \GTREADTABLE +\READCLASSTOCODE \TERMCLASSTOCODE \GTTERMTABLE \ILLEGAL.ARG) COMPILER::META-EVAL-PROGN (MAP +COMPILER::PROGN-STMTS COMPILER::MEVAL COMPILER::META-EVALUATE RPLACA COMPILER::ANALYZE-TREE +COMPILER::REMOVE-NESTED-PROGNS COMPILER::EXPAND-NESTED-PROGNS REPLACEFIELD LIST COMPILER::NODE-META-P) + XCL::*BREAK-HASH-TABLE* (CL:MAKE-HASH-TABLE) \TEDIT.GET.INSERT.CHARLOOKS (IMAX IMIN SELECTQ SUB1 +SHOULDNT \CHTOPC \TEDIT.UNIQUIFY.CHARLOOKS CHARLOOKS.FROM.FONT FINDNODE-INDEX INDEX \LASTNODE +\TEDIT.CARETLOOKS.VERIFY) \UFSDeleteFile-C (SELECTQ) \COPYSYNTAX (ADD1 REHASH \CREATENSCHARHASH +HASHARRAY) CHECK.MARGIN (TTNLEFT) DSPNEWPAGE (\OUTSTREAMARG \GETSTREAM STREAMPROP SPREADAPPLY* APPLY*) + SHOWDEF (RESETLST OUTPUT OPENP LIST FUNCTION MAKENEWCOM) NECCSPEC (CONS DOERROR LIST) BREAK (MAPCONC +NLAMBDA.ARGS BREAK0 APPLY) \MAPCHARTABLE (\GETBASEBYTE PLUS MAPHASH) SEDIT::BACKSPACE-QUOTE (SEDIT::SUBNODE + CL:FUNCALL SEDIT::QUOTE-WRAPPER SEDIT::CHANGE-QUOTE SEDIT::DELETE-NODES SEDIT::SET-POINT SHOULDNT) +D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL (CL:SECOND CL:ASSOC D-ASSEM::DLAMBDA-NON-LOCAL CL:GETHASH +D-ASSEM::MAXF MAX D-ASSEM::DVAR-LEVEL D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL CONS) +\VAMRecomputeFreePageCount (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION ZEROP +\VAMUpdateVAM ADD1 PLUS) PFI.HANDLE.DEFINEQ (PFI.PRINT.LAMBDA TERPRI) DWIMIFY0 (LISTGET1 EVALV +VARSBOUNDINEDITCHAIN LAST DWIMIFY2 FASSOC FMEMB DWIMIFY1 EXPRCHECK) CLISPNOEVAL (FASSOC ARGTYPE EQMEMB + GETPROP) XCL::EXEC-TITLE-FUNCTION (WINDOWPROP CL:FORMAT READTABLEPROP) D-ASSEM::DIGEST-CODE (MAP) +CONTROL (\GTTERMTABLE) COMPILER::META-EVAL-OPCODES (COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) +\UFStoOtherRenameMess (U-CASE FILENAMEFIELD PROMPTPRINT) MSCHECKVARS1 (CONS LIST GETRELQ UNION +GETTABLE FASSOC SELECTQ GETHASH PUTHASH MSCHECKVARS1 SHOULDNT) FINDRECDECL (RECLOOK TYPENAME) +COPYTERMTABLE (\GTTERMTABLE) \NSRANDOM.HANDLE.ERROR (SELECTQ \NSRANDOM.REESTABLISH +\NSRANDOM.PROCEEDABLE.ERROR LIST FULLNAME PRINTOUT PRIN1 COURIER.SIGNAL.ERROR) PPT (GETSTREAM +RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION PRETTYPRINT +NLAMBDA.ARGS) \UFSRenameFile-C (SELECTQ) XCL::WALK-LET* (XCL::WALK-LET/LET*) COMPILER::TEST-META-EVAL +(COMPILER::TEST-ALPHA-2 CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION COMPILER::PRINT-TREE +COMPILER::META-EVALUATE) \TEDIT.WINDOW.SETUP (WINDOWPROP FUNCTION LISTGET LIST +\TEDIT.ORIGINAL.WINDOW.TITLE GETPROMPTWINDOW) DRAWBETWEEN (POSITIONP IMAGEOP SPREADAPPLY* +\OUTSTREAMARG \GETSTREAM) \VFMDeletePageGroup (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. +FUNCTION UNINTERRUPTABLY IDIFFERENCE \BLT \VFMGet MESASIZE IMAX IPLUS IMIN SUB1 \GETBASE PLUS) +\QUEUE.INPUT.IOCB (SUB1 EMPOINTER \VAG2 RAID \LOLOC UNFOLD LLSH \D0.CONTROLLERBITS LOGOR) +DELETECONTROL (\GTTERMTABLE SELECTQ \LITCHECK LISPERROR CONCAT) \INVERTITEM (SHADEGRIDBOX) +READ-UNICODE-MAPPING-FILENAMES (FINDFILE PACKFILENAME SASSOC CONCAT LIST) D-ASSEM::DIGEST-FUNCTION ( D-ASSEM::DLAMBDA-CLOSED-OVER D-ASSEM::DLAMBDA-LOCAL-FUNCTIONS D-ASSEM::INSTALL-VAR LIST D-ASSEM::DLAMBDA-REQUIRED D-ASSEM::DLAMBDA-OPTIONAL CL:FIRST D-ASSEM::INSTALL-LOCAL CL:SECOND CL:THIRD D-ASSEM::DLAMBDA-BODY D-ASSEM::DVAR-LEVEL D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL -D-ASSEM::STORE-DIGEST-INFO) WINDOWSIZE (WINDOWREGION CONS) \\NSRANDOM.RELEASE.HANDLE (FFETCHFIELD -FREPLACEFIELD PLUS \\NSRANDOM.RELEASE.LOCK) EXPANDATTACHEDWINDOWS (REPOSITIONATTACHEDWINDOWS MAPC -ATTACHEDWINDOWS OPENWP WINDOWPROP \\OPENW1) DSPROTATE (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM - FFETCHFIELD) MAKEFILE1 (ROOTFILENAME COMPILE-FILE? REMOVE GETPROP SELECTQ FAKE-COMPILE-FILE -CL:COMPILE-FILE LIST BRECOMPILE BCOMPL RECOMPILE TCOMPL SHOULDNT) \\DEVICEFILE.EOSERROR (SELECTQ -\\GETACCESS LISPERROR FFETCHFIELD \\GETMAPBUFFER |\\UFSReadPages-C| FREPLACEFIELD SHOULDNT) NEARTOP ( -IGREATERP IDIFFERENCE FFETCHFIELD) \\UFS.DIRECTORY.NAME (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION |\\UFSGetMonitor| FFETCHFIELD CL:FUNCALL \\UFS.DIRECTORY.RECOGNIZER -CREATECELL) SEDIT::SIMPLE-STRING-SCAN (FFETCHFIELD NCHARS ADD1 NTHCHARCODE IPLUS CHARWIDTH IDIFFERENCE - SUB1) |\\InitCurveBrushes| (BITMAPCREATE ARRAY PACK* APPLY* PLUS INSTALLBRUSH) TEDIT.HARDCOPYFN ( -TEXTOBJ TEXTSTREAM RESETSAVE \\TEDIT.MARKACTIVE FREPLACEFIELD TEDIT.FORMAT.HARDCOPY) -\\MEDW.GETBOXSCREENPOSITION (RESETFORM CURSOR MOUSESTATE LOGAND LOGOR IPLUS IQUOTIENT IMINUS ZEROP -DSPXSCREENTOWINDOW IMIN DSPYSCREENTOWINDOW CONS) SCROLL.HANDLER (OPENWP FFETCHFIELD CREATEW -FREPLACEFIELD LOC SETUPTIMER RESETFORM CURSOR WINDOWPROP ZEROP LOGAND LOGOR CLOCK \\CLOCK0) -\\AUTHENTICATION.FIND.SERVER (COURIER.EXPEDITED.CALL COURIER.BROADCAST.CALL APPEND) -POSTSCRIPT.CLOSESTRING (FFETCHFIELD) DIRPRINTNAME (GETSTREAM NTHCHARCODE GETCASEARRAY PLUS LIST TAB -ADD1) DSPTOPMARGIN (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) MOVETOFILE ( -GETFILEPKGTYPE GETDEF ADDTOFILE) D-ASSEM::DVAR-FROM-LAP-VAR (CL:GETHASH D-ASSEM::LAP-VAR-ID CL:ERROR) -\\ALLOCMINIMUMSIZES (IMAX IPLUS CONS \\ALLOCMINIMUMSIZES IDIFFERENCE \\TOTALFIXEDWIDTH DIFFERENCE -\\SHAREOFXTRAX \\SETWINFOYSIZE PLUS \\TOTALFIXEDHEIGHT \\SHAREOFXTRAY) \\STRINGOUT (NCHARS LOGAND LRSH - \\BOUT ZEROP SUB1 %ARRAY-OFFSET FFETCHFIELD %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT -\\GETBASE \\GETBASETHIN \\GETBASEBYTE PLUS) COMPILE-FILE-WALK-FUNCTION (CL:VALUES -INTERLISP-NLAMBDA-FUNCTION-P) BREAK (MAPCONC NLAMBDA.ARGS BREAK0 APPLY) IMPORTFILE (RESETLST RESETSAVE - LIST OPENSTREAM INPUT NCONC IMPORTFILESCAN IMPORTEVAL KWOTE ROOTFILENAME GETFILEINFO) -COMPILER::ENV-PROCLAIMED-GLOBAL-P (CL:MEMBER COMPILER::ENV-DECLARED-GLOBALS COMPILER::FIND-TOP-ENVIRONMENT -) D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL (CL:SECOND CL:ASSOC D-ASSEM::DLAMBDA-NON-LOCAL CL:GETHASH -D-ASSEM::MAXF MAX D-ASSEM::DVAR-LEVEL D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL CONS) -*EXEC-COMMAND-TABLE* (HASHARRAY) SHOWDEF (RESETLST OUTPUT OPENP LIST FUNCTION MAKENEWCOM) -|MakeBitField| (LOGOR LLSH SUB1) D-ASSEM::DIGEST-CODE (MAP) OPENNSOCKET (FIXP \\NSOCKET.FROM# -FFETCHFIELD CONS LOGOR LOGXOR RAND LOCF \\ADDBASE FREPLACEFIELDVAL NCREATE CREATE.EVENT ADD1 LOGAND) -SEDIT::SET-SELECTION-COMMENT-WORD (FFETCHFIELD IPLUS SEDIT::COMMENT-LENGTH SUB1 SEDIT::SIMPLE-STRING-SCAN - SEDIT::COMPUTE-SELECTION-POSITION-COMMENT) FORMAT-SEMICOLON-ERROR (DECLARE FORMAT-ERROR) -FB.DELETECOMMAND (FFETCHFIELD FUNCTION FB.UPDATE.COUNTERS) DSPDEFAULTSTATE (IMAGEOP SPREADAPPLY* -\\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) MSINTERPRET (RESETLST MSPARSE SELECTQ MSLISTSET TERPRI ERROR! -UPDATEFN CL:VALUES MAPC NLSETQ PRINT APPLY CONS FRPLACA VERBNOTICELIST MSINTERPRETSET MSJOINSET -MSSHOWUSE MSSOLVE CHECKPATHS FASSOC LINELENGTH MSPATHS MSDESCRIBE KWOTE EVAL MSCHECKBLOCKS SHOULDNT) -HVFWDREAD (ADD1 CONS PEEKC FRPLNODE2 READ CONSTANT CHARACTER HVBAKREAD FRPLACA) RECORDERROR (SELECTQ -APPEND MKLIST LIST RETDWIM2 MEMB TAILP NLEFT) D-ASSEM::INTERN-VAR (CL:FIRST CL:GETHASH CL:THIRD -D-ASSEM::INSTALL-LOCAL CL:ERROR) DSPSCALE (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD -) \\SETTERMSYNTAX (\\SETSYNCODE \\PUTBASEBYTE \\SETFATSYNCODE FFETCHFIELD \\SYNCODE GETHASH -\\GETBASEBYTE \\TERMCLASSTOCODE LISPERROR LOGOR LOGAND) RECORDECLBLOCK (RECORDERROR LIST CONS -IDIFFERENCE LRSH PLUS ASSOC SHOULDNT SUB1 NCONC MAPCAR CAR NCONC1 TRANSLATE.DATATYPE) CL::PREDICATE-BODY - (CL::PS-PREDICATE CL::PS-TYPE) |\\UFSRenameFile-C| (SELECTQ FFETCHFIELD) INSPECTW.REPLACE (WINDOWPROP - LIST KWOTE \\INSPECTW.REDISPLAYPROP) \\FLUSHNSOCQUEUE (FFETCHFIELD) \\NSFILING.DISCARD.SESSION ( -DREMOVE FFETCHFIELD FRPLACD) PPT (GETSTREAM RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION PRETTYPRINT NLAMBDA.ARGS) UNIX.SENDSCREENPARAMS (UNIX-CHANNEL FFETCHFIELD -CONS CL:FORMAT) DINFO.TITLEMENUFN (WINDOWPROP FFETCHFIELD RESETFORM TTYDISPLAYSTREAM GETPROMPTWINDOW -APPLY* DINFO.DEFAULT.MENU PROMPTPRINT) XCL::WHERE-IS-GET-WRITE-DATE (CL:ASSOC HASH-FILE:GET-HASH-FILE) - OPT.JFIXPASS (FRPLACA APPLY* IDIFFERENCE GETHASH) \\SETREADSYNTAX (\\SYNCODE GETHASH FFETCHFIELD -\\GETBASEBYTE LOGAND \\READCLASSTOCODE \\SETSYNCODE \\PUTBASEBYTE \\SETFATSYNCODE) ARCCOS (FLOATP -FLOAT FDIFFERENCE ARCSIN) DOATTACHEDWINDOWCOM2 (DOATTACHEDWINDOWCOM) COMPILER::ENV-PROCLAIM-GLOBAL ( -COMPILER::ENV-DECLARED-GLOBALS COMPILER::FIND-TOP-ENVIRONMENT) D-ASSEM::GENERATE-EASY-ENTRY (CL:APPEND - D-ASSEM::DLAMBDA-REQUIRED CL:MAPCAR CL:FUNCTION D-ASSEM::DLAMBDA-OPTIONAL PLUS D-ASSEM::DLAMBDA-ARG-TYPE - D-ASSEM::DCODE-ARG-TYPE D-ASSEM::DCODE-NUM-ARGS + CL:LENGTH) CHAT.TYPEOUT (FASSOC FFETCHFIELD -WINDOWPROP CL:FUNCALL BIN \\CARET.DOWN GETSTREAMPROP LOGAND MASK.1\'S LSH SUB1 PLUS) -*DEBUGGER-COMMAND-TABLE* (HASHARRAY) MAKEFILE (MKLIST ADDFILE GETPROP SELECTQ SHOULDNT ASKUSER /RPLACD - FINDFILE FILEDATE FILEPKG.CHANGEDFNS INFILEP FILEPKG.MERGECHANGES CONS LIST RESETSAVE MAPC ERSETQ -EVAL PRETTYDEF MEMB) NEARESTCORNER (\\CURSORPOSITION IDIFFERENCE IPLUS FFETCHFIELD) -D-ASSEM::GENERATE-HARD-ENTRY (CL:LENGTH D-ASSEM::DLAMBDA-REQUIRED D-ASSEM::DLAMBDA-OPTIONAL PLUS -D-ASSEM::DCODE-ARG-TYPE D-ASSEM::DCODE-NUM-ARGS) SEDIT::SIMPLE-STRING-OFFSET (SEDIT::STRINGWIDTH -SUBSTRING FFETCHFIELD) SET-TTY-PROFILE-INTERACTIVELY (PROCESS.EVAL TTY.PROCESS) \\TEDIT.BUTTONEVENTFN -(MODERNWINDOW.BUTTONEVENTFN FUNCTION) \\MEDW.GETSCREENREGION (RESETFORM CURSOR CONS FIXP MKLIST LENGTH - IDIFFERENCE SUB1 IMIN IPLUS IMAX LOGAND IQUOTIENT CLOCK ZEROP LOGOR IABS IMINUS FRPLACA FRPLACD) -IRNDLIST (MAPCAR XYPT.X XYPT.Y FIX PLUS CONS) AS.DELETE.PASSWORDS (PARSE.NSNAME RESETLST -AS.MAKE.CONVERSATION) \\MAPCHARTABLE (\\GETBASEBYTE PLUS MAPHASH FFETCHFIELD) D-ASSEM::INSTALL-LOCAL ( -D-ASSEM::INSTALL-VAR) D-ASSEM::EASY-ENTRY-P (D-ASSEM::DLAMBDA-REST D-ASSEM::DLAMBDA-OPTIONAL CL:SECOND -) FTP.BREAKCONNECTION (CONS LIST CLOSEBSPSTREAM) \\NSFILING.UPDATE.ATTRIBUTES (NCONC LIST FFETCHFIELD -FREPLACEFIELD) INTERLISP-NLAMBDA-FUNCTION-P (ARGTYPE) SUPERPRINTGETPROP (GETPROP FASSOC) -|\\LFParseFileName| (UNPACKFILENAME.STRING STRPOS SUBSTRING SUB1 CONDCONCAT CONCATLIST LIST ADD1 -NCHARS MKATOM CONS) D-ASSEM::GENERATE-OPT-AND-REST (D-ASSEM::MAKE-DTAG) CONTROL (\\GTTERMTABLE -FFETCHFIELD) CHAT.SETDISPLAYTYPE (STREAMPROP CL:FUNCALL) DINFO.GET.FILENAME (PACKFILENAME -FILENAMEFIELD FFETCHFIELD) DIRFILENAME (MKATOM U-CASE FRPLACA) OPT.JLENPASS (FRPLACA PLUS IDIFFERENCE -GETHASH OPT.JSIZE IPLUS FRPLACD) ARCSIN (FLOATP FLOAT FDIFFERENCE SQRT FTIMES FPLUS) -CH.RETRIEVE.MEMBERS (PARSE.NSNAME COURIER.CALL CH.FINDSERVER FIXP CH.PROPERTY CH.GETAUTHENTICATOR) -PFI.HANDLE./DECLAREDATATYPE (PFI.PRETTYPRINT LIST* LIST) D-ASSEM::GENERATE-ARG-CHECK (CL:LENGTH -D-ASSEM::DLAMBDA-REQUIRED + D-ASSEM::DLAMBDA-OPTIONAL D-ASSEM::MAKE-DTAG D-ASSEM::EMIT-BYTE-LIST) -ONFILE (MAPCAR SELECTQ GETRELATION FMEMB FILECOMS CONS UNION FILECOMSLST) \\GETBRUSHBBT (FFETCHFIELD -BITMAPBIT UNFOLD LLSH SELECTQ FREPLACEFIELD SHOULDNT) \\NSFILING.LOGIN (RESETLST RESETSAVE LIST -FUNCTION MKATOM NSNAME.TO.STRING \\INTERNAL/GETPASSWORD SELECTQ CONCAT \\NSFILING.COURIER.OPEN -NS.MAKE.SIMPLE.CREDENTIALS COURIER.CALL PRIN1 CONS FFETCHFIELD \\GET.COURIERPROGRAM GETHASH -CREATE.MONITORLOCK \\CREATECELL FREPLACEFIELDVAL NCREATE FRPLACD \\MAKE.PMAP.DEVICE FRPLACA) HVRPTREAD - (SUB1 READ) DWIMIFYREC (LIST DWIMIFY0? APPEND) READARRAY (ARRAY READC SUB1 IPLUS READ ADD1 SHOULDNT) -DPRIN1 (TAB PLUS NCHARS PRIN1) PRINTARRAY (EVALV ARRAYSIZE ARRAYTYP ARRAYORIG HELP NUMBERP ELT SUB1 -IPLUS ADD1 ELTD) \\NSFILING.CLOSEFILE (LISTGET FFETCHFIELD \\BULK.DATA.CLOSE LOGAND CONSTANT LOGOR -CONCAT \\NSFILING.ADD.TO.CACHE FREPLACEFIELDVAL NCREATE SETUPTIMER) TEDIT.SHOWSEL (FFETCHFIELD) -LOOKUP.NS.SERVER (PARSE.NSNAME CH.RETRIEVE.ITEM CH.PROPERTY CONS LIST FREPLACEFIELD) COMP.EFFECT ( -COMP.EXPR OPT.JUMPCHECK) SETSYNTAX (FIXP \\GETCHARCODE TYPENAMEP \\GTTERMTABLE \\GTREADTABLE GETSYNTAX - \\GETREADSYNTAX \\GETTERMSYNTAX) HVREADEND (CHCON1 READC CONSTANT SYNTAXP) RECORDGENSYM (GENSYM) -\\TEDIT.PARABOUNDS (FFETCHFIELD CONS \\CHTOPC IPLUS PLUS SUB1 IMINUS) \\LEAF.GETFILEDATES (FFETCHFIELD - \\ALLOCBLOCK \\LEAF.READFILEPROP UNFOLD LLSH) D-ASSEM::STACK-ANALYZE (LIST CONS D-ASSEM::GATHER-ROOTS - CL:FIRST) SYNTAXP (\\SYNCODE GETHASH FFETCHFIELD \\GETBASEBYTE \\GTREADTABLE BITTEST LOGAND -\\READCLASSTOCODE \\TERMCLASSTOCODE \\GTTERMTABLE SELECTQ \\ILLEGAL.ARG) |\\PFEnsureInitialized| ( -SELECTQ MACHINETYPE) CL::ASSIGN-FIELD-DESCRIPTORS (CL::PS-TYPE CL:ERROR) DELETECONTROL (\\GTTERMTABLE -SELECTQ FFETCHFIELD \\LITCHECK LISPERROR CONCAT) DSPNEWPAGE (\\OUTSTREAMARG \\GETSTREAM STREAMPROP -SPREADAPPLY* FFETCHFIELD APPLY*) \\LEAFINIT (CREATE.MONITORLOCK \\DEFINEDEVICE FUNCTION -FREPLACEFIELDVAL NCREATE) D-ASSEM::GENERATE-KEY (+ MAP D-ASSEM::DLAMBDA-KEY) DINFO.OPENTEXTSTREAM ( -RESETFORM TTYDISPLAYSTREAM GETPROMPTWINDOW WINDOWPROP LIST DINFOGRAPH FFETCHFIELD PRIN1 OPENTEXTSTREAM -) XCL::WHERE-IS-READ-COMS (RESETLST RESETSAVE RESETUNDO) CHAT.EMACS.MOVE (CURSORPOSITION IDIFFERENCE -IQUOTIENT MKSTRING IMINUS FFETCHFIELD) NORMSECT (\\NORMSECT FFETCHFIELD IPLUS FREPLACEFIELD) -\\SIN-FLOAT (- + CL:REM FTIMES / POLYEVAL \\FLOATBOX OPCODES) MAKEPROPSCOMS (MAPCAR CONS LIST) -\\VALID.FILING.CONNECTIONP (\\INTERNAL/GETPASSWORD FFETCHFIELD) DINFO.READ.GRAPH (FILENAMEFIELD PRIN1 -INFILEP READFILE ERROR NCREATE LISTGET) GETBOXSCREENREGION (GETBOXSCREENPOSITION CONS) MAKEXYPT (CONS) - DIRGETFILEINFO (\\GENERATEFILEINFO) D-ASSEM::STORE-DIGEST-INFO (CL:SORT CL:FUNCTION CL:LIST-LENGTH -CL:1- + LIST D-ASSEM::DVAR-NAME D-ASSEM::DCODE-NAME-TABLE D-ASSEM::DVAR-SLOT PLUS CL:NREVERSE -D-ASSEM::DCODE-NLOCALS D-ASSEM::DCODE-NFREEVARS) MB.CREATE.THREESTATEBUTTON (IMAGEOBJCREATE -STRINGWIDTH FONTPROP CONS BITMAPCREATE DSPCREATE IMAGEOBJPROP) \\BSPEVENTFN (SELECTQ -\\BSP.CLOSE.OPEN.SOCKETS \\REMOVEDEVICE.NAMES) \\NSRANDOM.ENSURE.WATCHER (FFETCHFIELD ADD.PROCESS LIST - FUNCTION CONCAT FRPLACA) \\BUILDATWSTRUCTURE (MAPCAR CONS LIST MINIMUMMAINWINDOWSIZE -MAXIMUMMAINWINDOWSIZE WINDOWPROP NCONC FASSOC MINIMUMWINDOWSIZE MAXIMUMWINDOWSIZE WINDOWSIZE) -DELETELINE (BEEP FORWARD.DELETE.TO PREVLINE FRPLACD FRPLACA) CENTRALWINDOW (WINDOWPROP) DSPSCALE2 ( -IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) COMPILER::ENV-PROCLAIMED-SPECIAL-P ( -CL:MEMBER COMPILER::ENV-DECLARED-SPECIALS COMPILER::FIND-TOP-ENVIRONMENT) D-ASSEM::STACK-ANALYZE-CODE -(CL:FLET CL:MACROLET CL:ASSOC) RECORDECLTAIL (APPEND CONS ASSOC NTH FRPLACA RECORD.CREATEINFO -RECORD.TYPECHECK FNTH /RPLACA UNCLISPTRAN LIST RECORD.DEFAULTFIELDS) RECORDECL0 (GETHASH RECORDECL1) -\\GTTERMTABLE (LISPERROR) ASKUSER$ (CONSTANT CHARACTER PACKC NCHARS NTHCHARCODE PLUS SUB1 -ASKUSERLOOKUP SUBSTRING) D-ASSEM::ASSEMBLE (D-ASSEM::ASSEMBLE-CODE) \\BUILD.EXPEDITED.XIP ( -COURIER.VERSION# FREPLACEFIELD LOCF \\ADDBASE \\MAKE.EXPEDITED.STREAM \\COURIER.EXPEDITED.ARGS -FFETCHFIELD IPLUS UNFOLD LLSH INDEXF) SEDIT::SET-POINT-COMMENT-WORD (FFETCHFIELD IPLUS -SEDIT::COMMENT-LENGTH SUB1 SEDIT::SIMPLE-STRING-SCAN) SET-PROFILE-INTERACTIVELY (MENU SORT -XCL:LIST-ALL-PROFILES XCL:PROFILE-NAME LIST FREPLACEFIELDVAL NCREATE CONS XCL:RESTORE-PROFILE) -|\\PFVersionOK| (|\\PFGetVols| FFETCHFIELD) CL::PROCESS-TYPE (CL::PS-NAME CL::PS-TYPE CL::PS-PREDICATE - CL::PREDICATE-BODY CL::PS-EXPORT) \\INSPECTW.REDISPLAYPROP (WITH-INSPECTOR-ENV WINDOWPROP XCL::PROFILIZE - CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES ITEMOFPROPERTYVALUE INSPECTW.FETCH FRPLACA -DSPTEXTURE PRINTATBOX) SHEDSCAN (FFETCHFIELD MAKEBRES IPLUS FREPLACEFIELD) PRINTLEAF (IDIFFERENCE -FFETCHFIELD LOCF \\ADDBASE PRIN1 TERPRI SELECTC PRIN2 LIST SIGNED SUB1 LLSH IPLUS FOLDLO LRSH -\\MAKENUMBER UNSIGNED LOGAND) UNIX.SETDISPLAYTYPE (STREAMPROP SETUPTIMER PROCESSPROP THIS.PROCESS -WINDOWPROP KEYACTION CL:CODE-CHAR LOGOR LISP-TO-UNIX-TERMTYPE) INTERLISP-FORMAT-P (SELCHARQ PEEKCCODE) - DINFO.SHOWSEL (TEDIT.NORMALIZECARET TEDIT.SETSEL TEDIT.FIND NCHARS) XCL::WHERE-IS-SET-WRITE-DATE ( -XCL::WHERE-IS-NOTICE-INTERNAL CL:FILE-WRITE-DATE) CHAT.HOLD (WINDOWPROP UNTILMOUSESTATE ZEROP LOGAND) -|\\UFSGetFileType| (UNPACKFILENAME.STRING MKATOM U-CASE NCHARS CL:ASSOC) |\\PFGetFreePage| ( -|\\PFGetPage| ELT FIXP |\\PFVolumeNumber|) DRAWBETWEEN (POSITIONP IMAGEOP SPREADAPPLY* \\OUTSTREAMARG -\\GETSTREAM FFETCHFIELD) PFI.HANDLE.PUTPROPS (PFI.PRETTYPRINT) DRAWCIRCLE (\\ILLEGAL.ARG IMAGEOP -SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD INSURE.BRUSH INSURE.DASHING) MSHASHLIST1 (CONS) -MAKELISPXMACROSCOMS (CONS NCONC SUBSET FASSOC LIST FMEMB) HVREADCHECKGETFN (CONCAT) |\\VFMDelete| ( -\\ALLOCBLOCK LRSH ADD1 MESASIZE FUNCTION) \\TEDIT.BASICFIND (FFETCHFIELD ADD1 IDIFFERENCE NCHARS -NTHCHARCODE SELECTQ SUB1 \\BIN PLUS) COPYTERMTABLE (\\GTTERMTABLE FFETCHFIELD NCREATE FREPLACEFIELDVAL -) \\TOTALFIXEDHEIGHT (PLUS) |\\UFSDeleteFile-C| (SELECTQ FFETCHFIELD) CLOSEATTACHEDWINDOWS (MAPC -ATTACHEDWINDOWS WINDOWPROP) COMPILER::ENV-PROCLAIM-SPECIAL (COMPILER::ENV-DECLARED-SPECIALS -COMPILER::FIND-TOP-ENVIRONMENT) D-ASSEM::COMPUTE-JUMP-SIZE (CL:ASSOC) \\NSPRINT.COURIER.OPEN ( -COURIER.OPEN PACK* FFETCHFIELD) TRANSLATE.LOCF (MKPROGN PLUS CL:MACROEXPAND-1 LIST) -\\TEST.PARAGRAPH.LOOKS (FCHARACTER BIN CONSTANT CHARACTER) D-ASSEM::PRETTY-JUMPS (MAPCAR CL:REVERSE) -CREATE.PACKET.EXCHANGE.XIP (\\FILLINXIP IPLUS UNFOLD LLSH LOCF \\ADDBASE \\LOLOC) -SEDIT::SET-SELECTION-COMMENT (SEDIT::SET-SELECTION-ME SEDIT::SET-SELECTION-NOWHERE) CURRENT-PROFILE ( -XCL:PROFILE-NAME PROCESS.EVALV TTY.PROCESS) CONVEXP (LENGTH XYPT.X XYPT.Y IDIFFERENCE IMINUS XPROD -\\SGN) \\UFS.HANDLE.RELATIVEDIRECTORY (NTHCHARCODE NTHCHAR CONCAT \\UFS.DEFAULT.DIR FFETCHFIELD) -EQLENGTH (NTH) \\MEDW.GETSCREENPOSITION (WFROMDS RESETFORM CURSOR LOGAND ZEROP FFETCHFIELD CONS -LASTMOUSEX LASTMOUSEY) SI::GET-DESCRIBERS (GET) TYPESOF (FASSOC CONS GETPROP INFILECOMS? FILECOMS -LDIFFERENCE REMOVE XCL::HASH-FILE-TYPES-OF UNION) /PUT+1 (GETPROPLIST LIST) MKCONS (CONS LIST) -IMPORTEVAL (SELECTQ MAPCONC IMPORTEVAL LIST) D-ASSEM::SPLICE-IN-JUMPS (MAPC D-ASSEM::DTAG-PC -D-ASSEM::DTAG-MIN-PC D-ASSEM::DJUMP-PTR D-ASSEM::DJUMP-TAG - D-ASSEM::DJUMP-MIN-PC D-ASSEM::DJUMP-KIND - D-ASSEM::COMPUTE-JUMP-SIZE CL:ASSOC) \\TOTALFIXEDWIDTH (PLUS) ASKUSERSETUP (MEMB ASKUSERLOOKUP) +D-ASSEM::STORE-DIGEST-INFO) D-ASSEM::INSTALL-LOCAL (D-ASSEM::INSTALL-VAR) /MAPCONC (APPLY*) \LITCHECK +(MKSTRING CONCAT \ILLEGAL.ARG) \SHAPEW2 (\INSUREWINDOW REGIONP DSPCLIPPINGREGION BITMAPCREATE \OPENW1 +FUNCTION CREATEREGION) FW-CLOSE-CMD (CONCAT FW-OPENP MENU) D-ASSEM::STORE-DIGEST-INFO (CL:SORT +CL:FUNCTION CL:LIST-LENGTH CL:1- + LIST D-ASSEM::DVAR-NAME D-ASSEM::DCODE-NAME-TABLE D-ASSEM::DVAR-SLOT + PLUS CL:NREVERSE D-ASSEM::DCODE-NLOCALS D-ASSEM::DCODE-NFREEVARS) GLOBALVARP (FMEMB GETPROP) +\STRINGOUT (NCHARS LOGAND LRSH \BOUT ZEROP SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE \GETBASETHIN +\GETBASEBYTE PLUS) D-ASSEM::DVAR-FROM-LAP-VAR (CL:GETHASH D-ASSEM::LAP-VAR-ID CL:ERROR) +SUPERPRINTGETPROP (GETPROP FASSOC) FIELDNAMESIN (MAPCONC APPEND RECORD.FIELDNAMES RECORDECL) +D-ASSEM::INTERN-TAG (CL:GETHASH D-ASSEM::MAKE-DTAG) GETCFILE (OPENSTREAM ASKUSER LIST FULLNAME MAPCAR +READ) COMPILER::FRAME-ANNOTATE-IF (NCONC COMPILER::FRAME-ANNOTATE COMPILER::IF-PRED COMPILER::IF-THEN +COMPILER::IF-ELSE) PRINTFILEPROP (ASSOC) REMOVEITEM (EQUAL SUBSET) D-ASSEM::EASY-ENTRY-P ( +D-ASSEM::DLAMBDA-REST D-ASSEM::DLAMBDA-OPTIONAL CL:SECOND) MAKEHARDCOPYSTREAM (DISPLAYSTREAMP +WINDOWPROP DSPCREATE \ILLEGAL.ARG PRINTERPROP PRINTERTYPE FUNCTION DSPFONT DSPRIGHTMARGIN) DRAWCIRCLE +(\ILLEGAL.ARG IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM INSURE.BRUSH INSURE.DASHING) TYPESOF ( +FASSOC CONS GETPROP INFILECOMS? FILECOMS LDIFFERENCE REMOVE XCL::HASH-FILE-TYPES-OF UNION) +\FM.RESHAPEFN (WINDOWPROP \FM.WINDOWEXTENT FM.REDISPLAYMENU) PRINTARRAY (EVALV ARRAYSIZE ARRAYTYP +ARRAYORIG HELP NUMBERP ELT SUB1 IPLUS ADD1 ELTD) SEDIT::PUNT-SET-POINT (SEDIT::SET-POINT) +\FM.PUSHGROUP (\FM.DTOPGROUPID \FM.DGROUPPROP LISTGET FASSOC SELECTQ \FM.ITEMPROP FFETCHFIELD FRPLACA +PLUS) INSURE.BRUSH (BRUSHP NEWRESOURCE CONS DSPCOLOR DSPSCALE \ILLEGAL.ARG) DELETELINE (BEEP +FORWARD.DELETE.TO PREVLINE) SHAPEW1 (\INSUREWINDOW REGIONP DSPCLIPPINGREGION BITMAPCREATE \OPENW1 +OPENW FUNCTION) COMPILER::META-EVAL-MV-PROG1 (COMPILER::MV-PROG1-STMTS COMPILER::META-EVALUATE CL:FIRST + RPLACA COMPILER::EXPAND-NESTED-PROGNS CL:REST RPLACD) EQP (IEQP FEQP = \EXTENDED.EQP NTYPX SELECTC +EQDEFP) PRINTERROR (IDIFFERENCE LINELENGTH DREVERSE CONS POSITION IPLUS IQUOTIENT PRIN1) +\POSITION.MENU.IMAGE (IDIFFERENCE IMAX IMIN) SEDIT::PROPAGATE-WIDTH-CHANGE (WINDOWPROP IPLUS +IDIFFERENCE SEDIT::PROPAGATE-WIDTH-CHANGE) EXTENDPASTVERTBOUNDARIES (IGREATERP) XCL::EXEC-SHRINKFN ( +WINDOWPROP THIS.PROCESS) D-ASSEM::INTERN-VAR (CL:FIRST CL:GETHASH CL:THIRD D-ASSEM::INSTALL-LOCAL +CL:ERROR) \UFS.HANDLE.RELATIVEDIRECTORY (NTHCHARCODE NTHCHAR CONCAT \UFS.DEFAULT.DIR) XCL::WALK-LET ( +XCL::WALK-LET/LET*) PFI.HANDLE.EVAL-WHEN (+ PFI.ESTIMATE.SIZE TERPRI) \LFReadPages (ADD1 PLUS +\PFFindPageAddr DIFFERENCE) D-ASSEM::GENERATE-EASY-ENTRY (CL:APPEND D-ASSEM::DLAMBDA-REQUIRED CL:MAPCAR + CL:FUNCTION D-ASSEM::DLAMBDA-OPTIONAL PLUS D-ASSEM::DLAMBDA-ARG-TYPE D-ASSEM::DCODE-ARG-TYPE +D-ASSEM::DCODE-NUM-ARGS + CL:LENGTH) \TEDIT.MENU.INIT (LIST FUNCTION FONTCREATE APPEND) UTOXCODE ( +UNICODE.TRANSLATE CL:SVREF LRSH FASSOC LOGAND UNICODE.UNMAPPED) XCL::SETUP-EXEC-WINDOW (WINDOWADDPROP) + D-ASSEM::GENERATE-HARD-ENTRY (CL:LENGTH D-ASSEM::DLAMBDA-REQUIRED D-ASSEM::DLAMBDA-OPTIONAL PLUS +D-ASSEM::DCODE-ARG-TYPE D-ASSEM::DCODE-NUM-ARGS) GETDELETECONTROL (\GTTERMTABLE SELECTQ LISPERROR +CONCAT) DRAWARC (IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM INSURE.BRUSH INSURE.DASHING) +CHAT.SET.EMULATOR (WINDOWPROP CONCAT SUBSTRING STRPOS ADD.PROCESS CHAT.SETDISPLAYTYPE) +\FM.REDISPLAYMENU (WINDOWPROP LISTGET BLTSHADE IPLUS IDIFFERENCE MAPC \FM.DISPLAYBITMAP \FM.ITEMPROP +FFETCHFIELD BITBLT) ECHOCHAR (MAPC ECHOCHAR \GTTERMTABLE SELECTC \SYNCODE GETHASH \GETBASEBYTE +\PUTBASEBYTE \SETFATSYNCODE SELECTQ \ILLEGAL.ARG) \LFSetFileInfo (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 + .UNWIND.PROTECT. FUNCTION \LFGetStreamForFile IDATE \ILLEGAL.ARG) LISPXUSE1 (COPY SASSOC LSUBST +LISPXSUBST NCONC) D-ASSEM::GATHER-ROOTS (D-ASSEM::GATHER-TAGS CL:REMOVE-IF) READARRAY (ARRAY READC +SUB1 IPLUS READ ADD1 SHOULDNT) \IDLE.PROMPT.WATCHER (TIMES IMAX - \DAYTIME0) ACCESSDEF4 (ASSOC +RECORD.FIELDINFO RECORD.TYPECHECK CONS RECORD.NAME LIST JOINDEF RECFIELDLOOK RECORD.SUBDECS ALLPATHS +RECLOOK1 TOPPATHS MAPCONC RECORDECL SHOULDNT) PFI.PRINT.LAMBDA.BODY (PRIN1) D-ASSEM::GENERATE-OPT-AND-REST + (D-ASSEM::MAKE-DTAG) INSPECTABLEFIELDNAMES (RECORDFIELDNAMES LIST REMOVEDUPS) FINDSYSRECDECL ( +TYPENAME SYSRECLOOK1) SEDIT::DECOMPOSE-PSEUDO-SELECTION (CL:VALUES CL:FIRST CL:SECOND CL:THIRD) +\COURIER.EXPEDITED.OVERFLOW (PRIN1 RETFROM) \TEDIT.FIXSELS (LIST) NSOCKETEVENT (\DTEST) +\UFSGetFileType (UNPACKFILENAME.STRING MKATOM U-CASE NCHARS CL:ASSOC) \HDCPYDSPPRINTCHAR (\CARET.DOWN +SELECTC \SYNCODE GETHASH \GETBASEBYTE PLUS FFETCHFIELD IPLUS LOGAND LOGOR SELCHARQ FREPLACEFIELD +SELECTQ MACHINETYPE PLAYTUNE FLASHWINDOW WFROMDS CHARWIDTH UNFOLD LLSH \DISPLAYSTREAMINCRXPOSITION +IDIFFERENCE MOD IMOD IQUOTIENT SHOULDNT) MARGINBAR (DSPOPERATION MSCALE FONTCREATE MKSTRING ABS IPLUS +IDIFFERENCE DSPCLIPPINGREGION STRINGWIDTH MB.MARGINBAR.SHOWTAB) OPT.SETUPOPT (FASSOC CONS LIST) +SUBDECLARATIONS (MAPCAR RECORD.SUBDECS RECLOOK APPEND) D-ASSEM::STACK-ANALYZE-CODE (CL:FLET CL:MACROLET + CL:ASSOC) COMPILE.FILECHECK (OPENFILE) XCL::GET-PROCESS-PROFILE (THIS.PROCESS PROCESSPROP) +\FM.JUSTIFYGROUPS (\FM.DTOPGROUPID \FM.DGROUPPROP LISTGET FASSOC - MAPC \FM.JUSTIFYGROUPS) +SEDIT::SHIFT-STRING (\ADDBASE SUB1 \GETBASE ADD1 PLUS) SI::FINISH-UNBREAKING (CL:DELETE) DELFROMCOM ( +APPLY* SELECTQ DELFROMCOMS CL:THIRD CL:FOURTH ASSOC GETTOPVAL REMOVEITEM MAPC INFILECOMTAIL REMOVE +DELFROMCOM1 PRETTYCOM1 MKLIST GETPROP) D-ASSEM::GENERATE-KEY (+ MAP D-ASSEM::DLAMBDA-KEY) D-ASSEM::ASSEMBLE + (D-ASSEM::ASSEMBLE-CODE) ECHOCONTROL (\GETCHARCODE ILEQ ILESSP IDIFFERENCE ECHOCHAR) MOVE.BACK.TO ( +IDIFFERENCE SEGMENT.BIT.LENGTH) DRAWCURVE (INSURE.BRUSH SPREADAPPLY* \OUTSTREAMARG \GETSTREAM +INSURE.DASHING FREERESOURCE CONS) \FM.OPENFN (ERROR \FM.REDISPLAYMENU) ECHOMODE (\GTTERMTABLE) +\LFWritePages (ADD1 \PFFindPageAddr PLUS) \FM.JUSTIFYITEMS (LISTGET FASSOC FETCHFIELD \FM.DGROUPPROP +RPLACA SELECTQ IPLUS IQUOTIENT IDIFFERENCE \FM.ITEMPROP) D-ASSEM::STACK-ANALYZE (LIST CONS +D-ASSEM::GATHER-ROOTS CL:FIRST) NOSUCHATOM (TERPRI ERROR) SEDIT::PARSE--UNKNOWN ( +SEDIT::BUILD-PRELINEARIZED-NODE) OPT.SCANOPT (APPLY* FASSOC OPT.CALLP OPT.PRATTACH CONSTANT ADD1 SUB1 +MEMB OPT.JUMPCOPYTEST OPT.DELCOPYFN OPT.SKIPPUSH) GETECHOMODE (\GTTERMTABLE) PFI.HANDLE.DEFDEFINER ( +CONS ASSOC CL:INTERN CL:FIND-PACKAGE PFI.PRETTYPRINT) FW-CHANGE-POSITION (FILEWATCHPROP WINDOWREGION +UNIONREGIONS GETBOXPOSITION IPLUS IDIFFERENCE TERPRI PRIN1 GETPOSITION) \UFSSetFileType (MKATOM U-CASE + LISTGET \UFSParseNameString) %%SORT-VECTOR (VECTOR-LENGTH) GETCONTROL (\GTTERMTABLE) PUTMENUPROP ( +LIST) GETCLEARINGHOUSE (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +COURIER.BROADCAST.CALL) ADDTOCOM (LIST APPLY* SELECTQ ADDTOCOM1 ADDTOCOMS CL:THIRD CL:FOURTH UNION +MKLIST /NCONC1 ASSOC GETTOPVAL) /MAPCON (APPLY*) \TEDIT.HARDCOPY.MODIFYLOOKS (DSPSCALE FIXR FTIMES +IDIFFERENCE IPLUS IQUOTIENT FONTPROP MOVETO) GETTERMTABLE (\GTTERMTABLE) RELMOVEW (WINDOWOP +SPREADAPPLY* \INSUREWINDOW) D-ASSEM::GENERATE-ARG-CHECK (CL:LENGTH D-ASSEM::DLAMBDA-REQUIRED + +D-ASSEM::DLAMBDA-OPTIONAL D-ASSEM::MAKE-DTAG D-ASSEM::EMIT-BYTE-LIST) MSCHECKBLOCKBASIC (LIST APPEND +MEMB DOERROR GETRELQ UNION GETTABLE FASSOC NCONC1 MAPCONC) PRETTYPRINT2 (FASSOC READ CONS) +SEDIT::BUILD-PRELINEARIZED-NODE (SEDIT::CREATE-PRELINEARIZED-NODE) RAISE (\GTTERMTABLE) +EXTENDPASTHORIZBOUNDARIES (IGREATERP) DELFROMCOM1 (GETTOPVAL REMOVEITEM) COMPILER::META-EVAL-LITERAL ( +COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) DRAWELLIPSE (IMAGEOP SPREADAPPLY* \OUTSTREAMARG +\GETSTREAM INSURE.BRUSH INSURE.DASHING) UNIX-STREAM-CLOSE (UNIX-KILL UNIX-CHANNEL FFETCHFIELD REMOVE) +GETRAISE (\GTTERMTABLE) COMPILER::FRAME-ANNOTATE-CATCH (COMPILER::FRAME-ANNOTATE COMPILER::CATCH-STMT +COMPILER::BLIPPER-NEW-FRAME-P MAPC COMPILER::BLIPPER-REFERENCES COMPILER::CLOSE-OVER CL:COPY-LIST +CL:NUNION CONS COMPILER::CATCH-TAG) INVERTED/SHADE/FOR/GRAPHER (LOGNOT BITMAPCOPY ERROR) +CLOSE.PROCESS.MENU (WAKE.PROCESS WINDOWPROP) \IDLE.ISMEMBER (USERNAME PARSE.NSNAME CONCAT PRIN1 +GV.ISMEMBERCLOSURE \CHECKNAME CH.ISMEMBER CH.LOOKUP.OBJECT) RESETTERMTABLE (\GTTERMTABLE) \LFOpenFile +(WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FASSOC CONS IDATE FIXP \ILLEGAL.ARG +REMOVE \LFGetStreamForFile CL:ERROR) \FM.LAYOUTGRID (MAPC SELECTQ LISTGET APPLY* PLUS +\FM.MAKE-GROUP-ID CONS LIST LISTPUT FLENGTH IPLUS FNTH IDIFFERENCE FRPLACA CREATEREGION \FM.FORMAT +\FM.DTOPGROUPID COPY \FM.DTOPGROUPPROP \FM.CREATEITEM \FM.ITEMPROP FFETCHFIELD ADD1 ITIMES +\FM.MAKEGROUP) PRETTYDEFMACROS (MAPCAR FILEPKGCOM) \UFS.REGISTER.GFS (UNINTERRUPTABLY PUTHASH) +SEDIT::PARSE--GAP (SEDIT::LINEAR-ITEM-WIDTH CONS SEDIT::CREATE-WEAK-LINK) ACCESSDEF (RECORDWORD +RECFIELDLOOK CHECKDEFS MAPCONC ACCESSDEF4 LIST RECORDECL RECORDCHAIN GETP FMEMB UNPACK PACK CONS LDIFF + NCONC1 SHOULDNT FIXSPELL NCONC FIELDNAMESIN) SEDIT::PARSE-NEW (SEDIT::PARSE) SENDXIP (\DTEST LOCF +\ADDBASE PRIN1 \ROUTE.XIP) COMPILER::META-SUBST-UNWIND-PROTECT (COMPILER::MSUBST COMPILER::META-SUBST +COMPILER::UNWIND-PROTECT-STMT REPLACEFIELD) COMPILER::META-EVAL-MV-CALL (COMPILER::MEVAL +COMPILER::META-EVALUATE COMPILER::MV-CALL-FN REPLACEFIELD COMPILER::ANALYZE-TREE COMPILER::NODE-META-P +) SETTERMTABLE (\GTTERMTABLE) UNIX-STREAM-OUT (UNIX-WRITE UNIX-CHANNEL FFETCHFIELD \DTEST CL:ERROR) +\CH.PRINT.BLURB (PRIN1 printout) DRAWPOLYGON (IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM +INSURE.BRUSH INSURE.DASHING) TIMEALL (DATATYPES NCONC DATATYPEP CONS TERPRI NUMBERP CL::TIME-CALL +GETSTREAM) \TERMCODETOCLASS (SELECTC) \ONSCREENCLIPPINGREGION (INTERSECTREGIONS DSPCLIPPINGREGION +\DSPUNTRANSFORMREGION WINDOWPROP) \UFS.NEXTFILEFN (\UFS.NEXTFILEFN LOCF \ADDBASE CL:MULTIPLE-VALUE-PROG1 + .UNWIND.PROTECT. FUNCTION \UFSNextFile-C \UFS.FULLNAME.M CONCAT MKATOM U-CASE CL:SUBSEQ PLUS +NTHCHARCODE NCHARS ADD1) INTERSECT/REGIONP/LBWH (SELECTQ IPLUS EQUAL INTERSECTREGIONS LIST) +COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::FRAME-ANNOTATE COMPILER::BLOCK-STMT CL:DELETE-IF +COMPILER::BLIPPER-NEW-FRAME-P MAPC COMPILER::BLIPPER-REFERENCES COMPILER::CLOSE-OVER CL:COPY-LIST LIST + CL:NUNION) GETXIP (\DTEST \DEQUEUE FREPLACEFIELD PLUS FFETCHFIELD FIXP SETUPTIMER TERPRI) +\ORIGTERMTABLE (\CREATENSCHARHASH HASHARRAY SELECTQ SYSTEMTYPE SHOULDNT \SETTERMSYNTAX CONSTANT CONS +PLUS) IN/SCROLL/BAR? (WINDOWPROP \DECODE.EXTENT.USE EXTENDPASTVERTBOUNDARIES DSPCLIPPINGREGION +EXTENDPASTHORIZBOUNDARIES) OPT.POSTOPT (CONS LIST NCONC1 OPT.OPTCHECK OPT.DREV ADD1) DRAWPOINT ( +IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM BITMAPP INSURE.BRUSH) COMPILER::META-SUBST-VAR-REF ( +COMPILER::VAR-REF-VARIABLE COMPILER::NODE-META-P COMPILER::COPY-CODE COMPILER::NODE-SUBST-P) +D-ASSEM::COMPUTE-JUMP-SIZE (CL:ASSOC) \VAMFreePageGroup (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION UNINTERRUPTABLY \VAMAdjustGroup IDIFFERENCE \PFGetPage \VAMFilePageNumber +GETRESOURCE NEWRESOURCE NCREATE \PFCreateFreePage PLUS FFETCHFIELD IMIN) %%STABLE-SORT-VECTOR ( +VECTOR-LENGTH %%VECTOR-INSERTION-SORT %%SIMPLE-VECTOR-INSERTION-SORT) +SEDIT::PSEUDO-SELECTION-FROM-SELECTION (SEDIT::COMPOSE-PSEUDO-SELECTION) \NS.SETTIME (DAYTIME) +\IDLE.IS.PREVIOUS (USERNAME EMPASSWORDLOC GetBcplString EMPOINTER \VAG2 NCHARS MACHINETYPE SUBSTRING +STRING-EQUAL) XTOUCODE (UNICODE.TRANSLATE CL:SVREF LRSH FASSOC LOGAND UNICODE.UNMAPPED) +CL::EQLHASHBITSFN-UFN (\GETBASEPTR) D-ASSEM::PRETTY-JUMPS (MAPCAR CL:REVERSE) /LISTPUT1 (/NCONC LIST) +COMPILER::FRAME-ANNOTATE-CALL (NCONC COMPILER::CALL-FN COMPILER::FRAME-ANNOTATE-LAMBDA +COMPILER::FRAME-ANNOTATE MAPCONC COMPILER::CALL-ARGS) D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL (CEIL +LOGAND IPLUS CL:1+ LLSH COMPILER::ENV-TARGET-ARCHITECTURE CONSTANT SUB1 LOGXOR + CL:*) +\10MB.INPUT.INTERRUPT (\10MB.GETPACKETSTATUS \10MB.GETPACKETLENGTH LOCF \ADDBASE SUB1 ITIMES +\ALLOCATE.ETHERPACKET) WAKE.MY.PROCESS (WAKE.PROCESS WINDOWPROP) \IDLE.AUTHENTICATE (MACHINETYPE PRIN1 + NS.AUTHENTICATE NS.MAKE.SIMPLE.CREDENTIALS CONS \ENCRYPT.PWD CONCAT GV.AUTHENTICATE SELECTQ TERPRI) +UNIX-STREAM-EOFP-NEW (\DTEST) XCL::EXEC-CLOSEFN (WINDOWPROP THIS.PROCESS DEL.PROCESS) \UFS.FILEINFOFN +(CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \UFSGetFileType SELECTQ + FOLDHI LRSH IPLUS GDATE +CL:SUBSEQ) FILLPOLYGON (IMAGEOP SPREADAPPLY* \OUTSTREAMARG \GETSTREAM DSPOPERATION) XCL::WALK-DO* ( +XCL::WALK-DO/DO*) COMPILER::META-SUBST-THROW (COMPILER::MSUBST COMPILER::META-SUBST COMPILER::THROW-TAG + REPLACEFIELD) SEDIT::SELECT-NODE-SEGMENT (SEDIT::PENDING-DELETE) D-ASSEM::COMPUTE-DEBUGGING-INFO ( +D-ASSEM::DCODE-DEBUGGING-INFO) \PUP.SETTIME (DAYTIME) SI::UNBREAK-FROM-RESTORE-CALLS (CL:FIND-IF +CL:FUNCTION CL:FORMAT) ACCESSFN (DECLARERECORD CONS) SI::PRINT-TRACED-ARGUMENT (SPACES CL:PRIN1 CL:PRINC + CL:TERPRI) ADDNEWCOM (MAKENEWCOM GETTOPVAL SAVESET LIST) INSPECT/ALIST (INSPECTW.CREATE MAPCAR +FUNCTION) D-ASSEM::START-PC-FROM-NT-COUNT (CEIL LOGAND IPLUS CL:1+ UNFOLD LLSH CONSTANT SUB1 LOGXOR + +CL:*) CL::SXHASH-UFN (CL::%%SXHASH \GETBASEPTR) XCL::UNDOHOOK (CL:EVAL) \TEDIT.APPLY.STYLES (ASSOC +FASSOC SASSOC APPLY* \TEDIT.PARSE.CHARLOOKS.LIST APPEND CONS) FORWARD.DELETE.TO (SEGMENT.BIT.LENGTH +IDIFFERENCE) PFI.HANDLE.RPAQQ (ASSOC CONS APPEND INFILECOMS? FRPLACD PFI.PRETTYPRINT) MSCHECKBOUNDFREE + (MAPC SCRATCHASH GETRELQ UNION GETTABLE FASSOC FMEMB PUTHASH MSCHECKVARS1 GETHASH HASHARRAY FUNCTION) + D-ASSEM::CONVERT-TO-BINARY (CL:LENGTH CL:MAKE-ARRAY + CEIL LOGAND IPLUS D-ASSEM::DCODE-NLOCALS +D-ASSEM::DCODE-NFREEVARS CONSTANT SUB1 LOGXOR CL:AREF PLUS D-ASSEM::DCODE-CODE-ARRAY) DRAWTO (IMAGEOP +SPREADAPPLY* \OUTSTREAMARG \GETSTREAM) PRINCOPY (PRINT \UNCOPY LOCAL) ALLFIELDS (NCONC RECORD.SUBDECS +APPEND ALLFIELDS RECORDECL RECLOOK RECORD.FIELDNAMES) COMPILER::META-EVAL-LAMBDA (COMPILER::MEVAL +COMPILER::META-EVALUATE COMPILER::LAMBDA-BODY REPLACEFIELD COMPILER::ANALYZE-TREE COMPILER::NODE-META-P +) RELEASE.XIP (\RELEASE.ETHERPACKET) COMPILER::FRAME-ANNOTATE-GO (CL:PUSHNEW CONS COMPILER::GO-TAGBODY +) COPYREADTABLE (RESETREADTABLE \GTREADTABLE) CONVERT.FILE.TO.TYPE.FOR.PRINTER (CLOSEF OPENFILE +PRINTER.SCRATCH.FILE LISTGET PRINTERPROP PRINTFILEPROP ERROR CONCAT FULLNAME LIST FUNCTION) +\UFS.VALID.PROPP (LIST FMEMB) TEDIT.INSERT.DISPLAYTEXT (HELP) FILLCIRCLE (IMAGEOP SPREADAPPLY* +\OUTSTREAMARG \GETSTREAM) \BLTSHADE.GENERICPRINTER (INTERSECTREGIONS CREATEREGION DSPCLIPPINGREGION +FIXR FQUOTIENT BITMAPCREATE) LATTICE/BREAK/CYCLES (GETNODEFROMID NEW/INSTANCE/OF/GRAPHNODE CONS) +RESETREADTABLE (\GTREADTABLE COPY HASHARRAY HARRAYSIZE) INTERPRET/MARK/FORMAT (FASSOC LISTGET) +\10MB.STARTDRIVER (\INIT.ETHER.BUFFER.POOL TIMES \ALLOCATE.ETHERPACKET ADD.PROCESS LIST KWOTE) +DIRECTORY.PARSE (CONS \GENERATEFILES DIRECTORY.FILL.PATTERN DIRECTORY.MATCH.SETUP DIRCONJ +DIRECTORY.PARSE ERROR) D-ASSEM::SPLICE-IN-JUMPS (MAPC D-ASSEM::DTAG-PC D-ASSEM::DTAG-MIN-PC +D-ASSEM::DJUMP-PTR D-ASSEM::DJUMP-TAG - D-ASSEM::DJUMP-MIN-PC D-ASSEM::DJUMP-KIND D-ASSEM::COMPUTE-JUMP-SIZE + CL:ASSOC) SI::PRINT-TRACE-EXIT-INFO (DECLARE SPACES CL:* CL:PRINC CL:1+ CHANGEFONT CL:PRIN1 CL:TERPRI + MAPC +) /LISTPUT (ERRORX LIST CONS) FIND-READTABLE (GETHASH) PPROMPT3 (PROMPTPRINT) \10MBWATCHER ( +SUBSTRING \MAIKO.INPUT.INTERRUPT PLUS) \TEDIT.FIND.FIRST.LINE (WINDOWPROP \TEDIT.PARABOUNDS SUB1 +\BACKBIN PLUS ADD1 IMIN \FORMATLINE) CREATESCROLLINGW (WINDOWPROP CREATEW FUNCTION) +FW-CHANGE-JUSTIFICATION (FILEWATCHPROP TERPRI MOUSECONFIRM) IN-READTABLE (\GTREADTABLE) COMP.UBFLOAT2 +(COMP.PROGN ADD1 SUB1 COMP.STFN LIST) HARDCOPYGRAPH (LISTGET GETSTREAM OPENIMAGESTREAM APPEND DSPSCALE + DSPCLIPPINGREGION WINDOWPROP GRAPHREGION FIXR TIMES - QUOTIENT CL:CEILING PLUS DIFFERENCE REMAINDER +CREATEREGION SCALE/GRAPH FTIMES MINUS SUB1 DISPLAYNODELINKS PRINTDISPLAYNODE CLOSEF) COMP.UNBOX ( +GETPROP) ESCAPE (\GTREADTABLE) D-ASSEM::RESOLVE-JUMPS (MAPC D-ASSEM::SPLICE-IN-JUMPS +D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL CL:LENGTH D-ASSEM::DCODE-NAME-TABLE D-ASSEM::DTAG-PC) +MSCHECKFNINBLOCK (GETPROP UNION GETRELQ GETTABLE FASSOC DOERROR FMEMB) GETBRK (GETSYNTAX) +COMPILER::META-EVAL-IF (COMPILER::MEVAL COMPILER::META-EVALUATE COMPILER::IF-PRED REPLACEFIELD +COMPILER::IF-THEN COMPILER::IF-ELSE COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) WHATIS (ERROR! +SELECTQ CONS WHATIS U-CASE GETTOPVAL FILECOMS FIXSPELL LIST ASKUSER) GETREADTABLE (\GTREADTABLE) +\LFGenerateFiles (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \LFParseFileName +\NULLFILEGENERATOR \LFFindDirectory SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE +\LFCASEARRAYFETCH LIST DIRECTORY.MATCH.SETUP CONDCONCAT CONCATLIST PACKFILENAME.STRING U-CASE +\LFFindNextFile CONS NCHARS \LFHighestVersions) \FM.LAYOUTCOLUMN (MAPC SELECTQ LISTGET APPLY* PLUS +\FM.MAKE-GROUP-ID CONS LIST LISTPUT IPLUS CREATEREGION DREVERSE \FM.FORMAT \FM.DTOPGROUPID REVERSE +\FM.DTOPGROUPPROP \FM.CREATEITEM \FM.ITEMPROP FFETCHFIELD FRPLACA ITIMES \FM.MAKEGROUP) +SEDIT::COMPOSE-PSEUDO-SELECTION (LIST CL:FIRST + CL:1- CL:LENGTH) TEDIT.CR.UPDATESCREEN (HELP) SEDIT::PARSE + (LISTGET TYPENAME) GETSEPR (GETSYNTAX) \CREATEW1 (ABS IMIN UNFOLD LLSH WINDOWOP SPREADAPPLY*) +FIND.MATCHING.QUOTE (\SYNCODE GETHASH \GETBASEBYTE FIRSTCHAR) RELDRAWTO (\OUTSTREAMARG \GETSTREAM +IMAGEOP SPREADAPPLY* IPLUS) INVERTED/GRAPHNODE/BORDER (IMINUS LIST INVERTED/SHADE/FOR/GRAPHER) +D-ASSEM::PERFORM-LOCAL-FN-FIXUPS (D-ASSEM::DCODE-LOCAL-FN-FIXUPS) GETMENUPROP (LISTGET) DETACHWINDOW ( +WINDOWPROP) \FZEROP (\DTEST) SHOWSTACKBLOCKS (PLUS \UNCOPY) READMACROS (\GTREADTABLE) SUBFIELDCREATE ( +SUBDECLARATIONS RECORD.NAME RECORDECL0 RECORD.CREATEINFO LIST RECORD.FIELDNAMES ASSOC MAKECREATE0 +MAKEHASHLINKS) \UFS.ABORT.CL-DIRECTORY (\UFS.UNREGISTER.GFS) PURGEHISTORY (RESETVARS .RESETLST. LIST +CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION ASKUSER REMPROP PURGEHISTORY2 GETPROP) +READTABLEPROP (\ILLEGAL.ARG ARG \GTREADTABLE SELECTQ) CAN.PRINT.DIRECTLY (FMEMB PRINTERPROP) +SI::PRINT-TRACE-ENTRY-INFO (DECLARE SPACES CL:* CL:PRINC CL:1+ CHANGEFONT CL:PRIN1 CL:TERPRI) +GENERATOR (EVAL CONS STKNTH RETTO) \GTREADTABLE (SELECTQ \DTEST \GTREADTABLE1) BITMAPIMAGESIZE ( +IMAGEOP SPREADAPPLY*) MSCHECKBLOCKS (GETP LIST NCONC FILECOMSLST MAPCONC UPDATEFN APPLY CONS APPEND +LDIFF MSCHECKBLOCK) \LFEventFn (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SELECTQ + DSKDISPLAY MACHINETYPE \PAGED.REVALIDATEFILELST \PFGetVols) \FM.LAYOUTROW (MAPC SELECTQ LISTGET +APPLY* PLUS \FM.MAKE-GROUP-ID CONS LIST LISTPUT IPLUS CREATEREGION \FM.FORMAT \FM.DTOPGROUPID COPY +\FM.DTOPGROUPPROP \FM.CREATEITEM \FM.ITEMPROP FFETCHFIELD FRPLACA ITIMES \FM.MAKEGROUP) +XCL::WALK-DECLARATIONS (XCL::RECONS XCL::WALK-DECLARATIONS CL:MACROEXPAND-1 CL:FUNCALL) +COMPILER::META-SUBST-SETQ (COMPILER::MSUBST COMPILER::META-SUBST COMPILER::SETQ-VALUE REPLACEFIELD) +COMP.FLOATUNBOX (COMP.DELFN FLOAT COMP.STFN) \VAMAllocPageGroup (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION UNINTERRUPTABLY IDIFFERENCE PLUS FFETCHFIELD IMINUS IPLUS \PFGetFreePage +GETRESOURCE NEWRESOURCE NCREATE \PFCreatePage \VAMFilePageNumber) INSPECT/TOP/LEVEL/LIST ( +INSPECTW.CREATE LIST PLUS FUNCTION PRIN1) \UFS.ABORT.DIRECTORY (\UFS.UNREGISTER.GFS) +\UFSMakeUnixFormatName (MKSTRING NCHARS ALLOCSTRING CL:CHAR SUB1 PLUS SUBSTRING ADD1) XCL::NOHOOK ( +CL:APPLY) COMP.DECLARETYPE (SELECTQ) \10MB.OUTPUT.INTERRUPT (\10MB.GETPACKETSTATUS) ADJUSTOFFSETS ( +WINDOWPROP) INFILEPAIRS (MAPC LIST) \UFSParseNameString (MKSTRING \UFSMakeUnixFormatName +\UFS.ADJUST.HOST UNPACKFILENAME.STRING) COMPILER::META-EVAL-GO (COMPILER::ANALYZE-TREE COMPILER::NODE-META-P +) XCL::UNDOABLY-FMAKUNBOUND (/PUTD /REMPROP) MSDWIMTRAN (GETHASH) \UFSParse-Directory (LISTGET NTHCHAR + CONCAT NCHARS SELECTQ \UFS.DEFAULT.DIR) MSCHECKBLOCK (UNION EVAL EVALV APPEND SELECTQ DOERROR CONS +FMEMB GETRELQ GETTABLE FASSOC GLOBALVARP TESTRELQ TESTTABLE LIST ZEROP POSITION NCONC DREVERSE +PRINTERROR PRIN1) \LFDirectoryNameP (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +\LFParseFileName \LFFindDirectoryVol PACKFILENAME.STRING U-CASE FIXP LASTCHPOS SUBSTRING) +\FM.FORMATEXPLICIT (CREATEREGION LIST LISTGET \FM.FORMAT \FM.DTOPGROUPID COPY \FM.DTOPGROUPPROP LCONC +\FM.CREATEITEM EXTENDREGION \FM.ITEMPROP FFETCHFIELD DREVERSE CONS \FM.MAKEGROUP) XCL::WALK-DO ( +XCL::WALK-DO/DO*) MAKEHASHLINKS (GETFIELDFORCREATE RECORD.CREATEINFO SELECTQ CONS RECORDBINDVAL LIST +EMBEDPROG MKPROGN DREVERSE) UNIX-BACKFILEPTR-NEW (FREPLACEFIELD PLUS FFETCHFIELD ERROR) +CONDITIONS::%%RESTART-PRINTER (CL:FUNCALL CONDITIONS::RESTART-REPORT CONDITIONS::DEFAULT-RESTART-REPORTER + CL:PRINC) MIN/LEFT (GN/LEFT) /LCONC (LAST CONS /RPLNODE /RPLACD) \TEDIT.HARDCOPY.DISPLAYLINE ( +DSPSCALE \EDITELT GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE IPLUS FIXR FTIMES LISTGET PLUS +DSPXPOSITION DSPYPOSITION CHARWIDTH FONTCOPY IDIFFERENCE IREMAINDER + RSH - ADD1 IMAGEOBJPROP +IMAGESTREAMTYPE) CREATEW1 (ABS GETSCREENREGION COPY IMIN UNFOLD LLSH WINDOWOP SPREADAPPLY*) +BACKWARD.DELETE.TO (FORWARD.DELETE.TO) MIN/BOTTOM (GN/BOTTOM) OPENDISPLAYSTREAM (GETSTREAM CREATEW +LISTGET) COMPILER::META-EVAL-CATCH (COMPILER::MEVAL COMPILER::META-EVALUATE COMPILER::CATCH-TAG +REPLACEFIELD COMPILER::CATCH-STMT COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) FOREST/BREAK/CYCLES ( +GETNODEFROMID NEW/INSTANCE/OF/GRAPHNODE) SCALEDBITBLT (IMAGEOP SPREADAPPLY*) SHOWSTACKBLOCK1 (PRIN1) +\IDLE.OUT (LISTGET TIMES IDLE) EXPAND-DESTRUCTURING-BIND (GENSYM) SETBRK (GETSYNTAX SETSYNTAX MAPC +SELECTQ MEMB) MSPRGDWIM (RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. +FUNCTION) INITIALIZE-NEW-SHELL-DEVICE (FUNCTION) \DRAWPOINT.GENERIC (DRAWLINE) \HANDLE.RAW.PACKET ( +RAND \RELEASE.ETHERPACKET) DV (NLAMBDA.ARGS ED ERROR) PRIN2-LONG-STRING (DSPXPOSITION DSPFONT +IMAGESTREAMP CHARWIDTH STRINGWIDTH + TIMES CONCAT ALLOCSTRING SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE +\GETBASETHIN \GETBASEBYTE PLUS PRIN2S PRIN1 DSPYPOSITION NTHCHARCODE \SYNCODE GETHASH MAKEMAPENTRY +\DEDITFONT# - DSPRIGHTMARGIN) \UFS.PARSE.BODY (CONCAT LISTGET NCHARS) \FM.FORMATBYGRID (CREATEREGION +LIST TCONC REVERSE \FM.LAYOUTGRID \FM.DTOPGROUPID \FM.DTOPGROUPPROP LISTGET PLUS DREVERSE +\FM.DGROUPPROP FASSOC FMEMB LAST IDIFFERENCE \FM.ITEMPROP FFETCHFIELD FRPLACA IPLUS CONS \FM.MAKEGROUP +) SEDIT::LINEARIZE-ROOT (SHOULDNT SEDIT::LINEARIZE SEDIT::SUBNODE) INSPECT/PLIST (INSPECTW.CREATE +MAPCAR FUNCTION) SETREADTABLE (\GTREADTABLE) COMP.LOOKFORDECLARE (CONS COMP.DECLARETYPE) +PFI.ESTIMATE.SIZE1 (SOME LISTP PLUS LENGTH PFI.ESTIMATE.SIZE1) DIR (DODIR) DUMPGRAPH (RESETLST +RESETSAVE SETREADTABLE PRIN1 PRIN2 ASSOC CONS PLUS SPACES DREVERSE FONTUNPARSE FONTCLASSUNPARSE +POSITION SELECTQ printout TERPRI) SETSEPR (GETSYNTAX SETSYNTAX MAPC SELECTQ) INIT/NODES/FOR/LAYOUT ( +IMAGEOBJP LATTICE/BREAK/CYCLES GETNODEFROMID FOREST/BREAK/CYCLES MAPC SET/LABEL/SIZE) \USERFNISDON'T ( +FMEMB) \DRAWCIRCLE.GENERIC (FIXR FTIMES CONSTANT FQUOTIENT SQRT LIST CREATEPOSITION IPLUS IDIFFERENCE) + \NSRANDOM.READ.SEGMENT (+ UNFOLD LLSH PLUS LOGAND CONSTANT LOGOR - FILING.CALL COURIER.CREATE LIST +FUNCTION ASSOC DREMOVE) PRINOPEN (MAKEMAPENTRY DSPXPOSITION DSPYPOSITION \DEDITFONT# PRIN3) +PFI.ESTIMATE.SIZE (+ GET PFI.ESTIMATE.SIZE1) SEDIT::NEXT-NODE (SEDIT::SUBNODE) \NSRANDOM.PREPARE.CACHE + (LIST NCREATE PLUS LAST - CL:NTHCDR CONS +) COMPILER::META-EVAL-CALL (COMPILER::MEVAL COMPILER::META-EVALUATE + COMPILER::CALL-FN REPLACEFIELD COMPILER::ANALYZE-TREE COMPILER::META-CALL-LAMBDA COMPILER::SIDE-EFFECTS + COMPILER::VARIABLE-NAME COMPILER::VAR-REF-VARIABLE COMPILER::MAKE-PROGN COMPILER::CALL-ARGS +COMPILER::LITERAL-VALUE LIST COMPILER::MAKE-LITERAL COMPILER::MAKE-EVAL-WHEN-LOAD CL:APPLY COMPILER::MAKE-CALL + GET CL:FUNCALL COMPILER::NODE-META-P) CH.LIST.PROPERTIES (COURIER.EXPEDITED.CALL CH.FINDSERVER +PARSE.NSNAME CH.GETAUTHENTICATOR) CHDIR (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. +FUNCTION \ADD.CONNECTED.DIR U-CASE FILENAMEFIELD DIRECTORYNAME ERROR) /ECHOMODE (ECHOMODE LIST) +GETFIELDFORCREATE (RECORD.DEFAULTFIELDS MAKEACCESS ACCESSDEF4 LIST ASSOC SUBFIELDCREATE SELECTQ) +GRAPHOBJ.PUTALIGN (PRIN2 CONS PLUS) PURGEHISTORY1 (RPLACA MAPC RPLNODE CONSTANT CHARACTER +PURGEHISTORY2) INFILECOMSMACRO (PROPNAMES EQMEMB) ExtensionForPrintFileType (ASSOC) LISPXTYPEAHEAD ( +SELECTQ LISPXREAD LISPXUNREAD RETFROM EDITE MAPC REVERSE PRINTHISTORY1 LIST CONS READLINE) PRINSHUT ( +DSPXPOSITION DSPYPOSITION) \UFSGetFileTypeConfirm (BOUNDP MENU RETTO) IMAPLIST (HEADPT NEXTPT XYPT.Y +XYPT.X IDIFFERENCE XYSECTLSEG CONS REVERSE) \UFSGetPrintFileType (UNPACKFILENAME.STRING MKATOM U-CASE +NCHARS CL:ASSOC \UFSGetFileTypeConfirm) READOCT (PRIN1 RSTRING FIXP SELECTQ MKATOM CONCAT GNC IPLUS +ITIMES CHCON1 IDIFFERENCE ERROR SHOULDNT ERROR!) \SETMACROSYNTAX (GETHASH HASHARRAY \SETSYNCODE +\PUTBASEBYTE \SETFATSYNCODE LOGOR) FW-CHANGE-ANCHOR (FILEWATCHPROP TERPRI PRIN1 MENU) +\VFMInsertPageGroup (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION UNINTERRUPTABLY +\BLT \VFMGet MESASIZE SUB1 \GETBASE PLUS IDIFFERENCE IPLUS) TEDIT.PUT.PIECE.DESCRIPTOR (HELP) +\READTABLEP.DEFPRINT (IPLUS CONSTANT NCHARS FRESHLINE MKSTRING) \UPDATE.PSC (\SETPOS.PSC) IFCDECLARE ( +LIST) SETFONT (DSPFONT CHARWIDTH) \ATBLSET (HARRAYP HASHARRAY FUNCTION \ORIGREADTABLE COPYREADTABLE +PLUS \ORIGTERMTABLE COPYTERMTABLE) PRIN1S (DSPXPOSITION DSPYPOSITION \DEDITFONT# PRIN3) +\NSRANDOM.CHECK.CACHE (LENGTH HELP LAST) DEFPRINT (\TYPENAMEFROMNUMBER FASSOC DREMOVE CONS) \ARBOUT ( +NCHARS LOGAND LRSH \BOUT GETFILEPTR ZEROP) CH.LIST.ORGANIZATIONS (COURIER.CALL GETCLEARINGHOUSE +PARSE.NSNAME CH.GETAUTHENTICATOR) XCL::HASH-FILE-TYPES-OF (XCL::WHERE-IS-DEFAULT-DEFINE-TYPES +XCL::GET-WHERE-IS-ENTRIES CL:REMOVE-DUPLICATES) PRIN2S (DSPXPOSITION DSPYPOSITION \DEDITFONT# PRIN4) +\DRAWELLIPSE.GENERIC (SIN COS CONSTANT FQUOTIENT SQRT FTIMES CL:* - + LIST CREATEPOSITION) /DREVERSE ( +/RPLACD) DOUSERFNS2 (APPLY* MAPC) COMPILER::META-SUBST-RETURN (COMPILER::MSUBST COMPILER::META-SUBST +COMPILER::RETURN-VALUE REPLACEFIELD) COS (\SIN-FLOAT FTIMES) PRINDOTP (- WIDTH STRINGWIDTH +DSPXPOSITION PRIN2S MAKEDOTPTAIL CONS) \NSRANDOM.STREAM.CHANGED (LIST FULLNAME LOGAND CONSTANT LOGOR +IMAX ASSOC FOLDLO LRSH IMOD) SIN (\SIN-FLOAT FTIMES) XCL::WALK-BINDINGS-1 (XCL::RECONS XCL::RELIST* +WALK-FORM-INTERNAL XCL::WALK-BINDINGS-1) \TEDIT.CREATE.LINECACHE (BITMAPCREATE LIST PLUS) +INSPECT/AS/FUNCTION (SELECT.FNS.EDITOR INSPECTCODE \GET-COMPILED-CODE-BASE MAKE-COMPILED-CLOSURE +WINDOWPROP LIST PROCESS.APPLY CL:APPLY) SMASHPAT1 (LIST* SMASHPATTERN LIST) CREATE.PACKET.EXCHANGE.XIP + (\FILLINXIP IPLUS UNFOLD LLSH \LOLOC \ADDBASE) TEDIT.PUT.PAGEFRAMES (LOGAND LRSH \BOUT +TEDIT.UNPARSE.PAGEFRAMES) STRING-EQUAL (%%PARSE-STRING-ARGS WITH-TWO-UNPACKED-STRINGS +%%STRING-BASE-COMPARE-EQUAL CL::SIMPLE-STRING-EQUAL) CH.RETRIEVE.MEMBERS (PARSE.NSNAME COURIER.CALL +CH.FINDSERVER FIXP CH.PROPERTY CH.GETAUTHENTICATOR) \10MBENCAPSULATE (LOCF \ADDBASE + FOLDHI LRSH +IPLUS) SUPERPRINT/WRAPPER (+ DSPXPOSITION WIDTH STRINGWIDTH DSPYPOSITION \DEDITFONT# SUPERPRINT) +NLAMBDAFNP (GETPROP GETLIS SELECTQ ARGTYPE FMEMB) PRINTLEAF (IDIFFERENCE PRIN1 TERPRI SELECTC PRIN2 +LIST SIGNED SUB1 LLSH IPLUS FOLDLO LRSH \MAKENUMBER UNSIGNED LOGAND) POSITION (\GETSTREAM) +\MAIKO.DISPLAYLINE (WINDOWPROP IMAX IDIFFERENCE DSPSCALE \TEDIT.LINECACHE FIXR FQUOTIENT DSPFONT +\EDITELT GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE FTIMES IPLUS PLUS FONTCOPY CHARWIDTH IREMAINDER +DSPYPOSITION IMAGEOBJPROP) READBQUOTECOMMA (LIST SELCHARQ SKIPSEPRCODES CL:READ PEEKCCODE PACK* READ) +COMPILER::META-EVAL-BLOCK (COMPILER::BLOCK-CONTEXT COMPILER::MEVAL COMPILER::META-EVALUATE +COMPILER::BLOCK-STMT REPLACEFIELD COMPILER::ANALYZE-TREE COMPILER::NODE-META-P) \FM.FORMATBYCOLUMN ( +CREATEREGION LIST \FM.LAYOUTCOLUMN \FM.DTOPGROUPID COPY \FM.DTOPGROUPPROP LISTGET PLUS \FM.DGROUPPROP +FASSOC \FM.PUSHGROUP IDIFFERENCE CONS \FM.MAKEGROUP) PRINTVA (HILOC \HILOC LOLOC \LOLOC PRIN1) +SEDIT::KILL-NODE (MAPC SEDIT::KILL-NODE) MAKEDOTPTAIL (PUTHASH RPLNODE GETHASH CONS) DOUSERFNS (APPLY* +) LOGIN (\INTERNAL/GETPASSWORD SELECTQ CANONICAL.HOSTNAME ERROR) MAX/RIGHT (GN/RIGHT) +MAKE-READER-ENVIRONMENT (\DTEST \CHECKRADIX \INVALID.RADIX) IFCEXPRTYPE (INFILECOMTAIL) +\TEDIT.PUT.PARALOOKS.LIST (HASHARRAY LOGAND LRSH \BOUT FLENGTH PLUS) XCL::WALK-BINDINGS-2 (XCL::RECONS + XCL::RELIST* WALK-TEMPLATE XCL::WALK-BINDINGS-2) COMP.BOX (GETPROP) COMPILER::META-SUBST-PROGV ( +COMPILER::MSUBST COMPILER::META-SUBST COMPILER::PROGV-SYMS-EXPR REPLACEFIELD) \UNIMPIMAGEOP (ERROR +CONCAT) \LFParseFileName (UNPACKFILENAME.STRING STRPOS SUBSTRING SUB1 CONDCONCAT CONCATLIST LIST ADD1 +NCHARS MKATOM) UNSAVEDEF (SELECTQ MAPCAR UNSAVED1 GETDEF GETFILEPKGTYPE CONS) OPT.DREV (FRPLACD) +\INTERNAL/GETPASSWORD (MKATOM GETHASH U-CASE ASSOC \INTERNAL/SETPASSWORD) /DELETECONTROL (GETTERMTABLE + LIST DELETECONTROL) PRIN2STRING (PRIN2-LONG-STRING IDIFFERENCE WIDTH STRINGWIDTH DSPXPOSITION IMIN +PRIN2S) ADDTO (FASSOC FMEMB LIST) BACKSKREAD (\SYNCODE GETHASH \GETBASEBYTE FIRSTCHAR LIST TTSKREAD +FIND.MATCHING.QUOTE) READGRAPH (SKIPSEPRS RATOM READ SELECTQ ERROR ARRAY PLUS HREAD FONTCLASS ELT +MAPCAR CONS LIST) CHAT.TTYENTRYFN (PROCESSPROP WINDOWPROP) GRAPHREGION (MEASUREGRAPHNODE CREATEREGION +MIN/LEFT MIN/BOTTOM ADD1 IDIFFERENCE MAX/RIGHT MAX/TOP) MIDDX (IPLUS IQUOTIENT IDIFFERENCE \SGN \IRND +ITIMES) \FM.FORMATBYROW (CREATEREGION LIST DREVERSE \FM.LAYOUTROW \FM.DTOPGROUPID REVERSE +\FM.DTOPGROUPPROP LISTGET PLUS CONS \FM.MAKEGROUP) GRAPHOBJ.GETALIGN (READ CONS NTH) READVA (VAG2 +\VAG2 READOCT) SEDIT::INSERT-CHANGED (CONS) SET-READER-ENVIRONMENT (\DTEST) MAKECREATELST1 ( +GETFIELDFORCREATE MAKECREATELST1 NCONC LIST PLUS) COMPILER::META-SUBST-PROGN (COMPILER::PROGN-STMTS +COMPILER::META-SUBST-STMTS) SETPASSWORD (\INTERNAL/SETPASSWORD CANONICAL.HOSTNAME CONS MKATOM MKSTRING +) PURGEHISTORY2 (LISTGET1 LIST PURGEHISTORY2) COMP.ASET (FASSOC COMP.LOOKUPVAR LENGTH MKLIST COMP.EXPR + CONS COMP.VAL SELECTQ) CANONICAL.HOSTNAME (CL:ASSOC \CANONICAL.NSHOSTNAME IPHOSTNAME MKATOM FASSOC +\CANONICALIZE.IP.HOSTNAME \CANONICALIZE.PUP.HOSTNAME) OPENNSOCKET (FIXP \NSOCKET.FROM# CONS LOGOR +LOGXOR RAND LOCF \ADDBASE CREATE.EVENT ADD1 LOGAND) FONTCREATE (FONTCLASS FONTCREATE DEFAULTFONT +\COERCEFONTDESC DSPFONT FONTPROP LITATOM IGREATERP IGEQ \GETSTREAM MKATOM U-CASE \ILLEGAL.ARG +\FONTFACE \LOOKUPFONT ASSOC \FONTSYMBOL APPLY* FUNCTION \AVGCHARWIDTH SETFONTDESCRIPTOR LIST) +\TEDIT.CHARDELETE (TEXTOBJ SUB1 ADD1 \CHTOPC \TEDIT.APPLY.STYLES PLUS IMINUS) MAKECREATELST ( +MAKECREATELST1) \SEND.EXPEDITED.XIP (SETUPTIMER NSOCKETEVENT GETXIP COURIER.VERSION# LIST LOGAND +\GETBASE LOCF \ADDBASE \COURIER.RESULTS \MAKE.EXPEDITED.STREAM PLUS) OPT.INITHASH (EVALV HARRAYPROP +CLRHASH SET HASHARRAY) \MENUSUBITEMS (APPLY* FUNCTION) IFCPROPSCAN (GETPROPLIST INFILECOMSPROP LIST) +\INTERNAL/SETPASSWORD (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION NLSETQ GETHASH +PUTHASH CONS \LOGIN.READ ASSOC RPLACD \ENCRYPT.PWD CONCAT SYSTEMTYPE GETOSTYPE EMPASSWORDLOC EMPOINTER + \VAG2 \ADJUST.USERNAME USERNAME \DECRYPT.PWD ALPHORDER NCHARS GetBcplString SELECTQ L-CASE U-CASE +\GETBASE APPLY*) MSPRGLST (MAPC MSPRGE) AT.END.OF.SCREEN (AT.END.OF.LINE IGREATERP IPLUS +SEGMENT.LENGTH TTNEXTCHAR) CHAT.CHOOSE.EMULATOR (CL:ASSOC FASSOC) SEDIT::CREATE-SIMPLE-NODE ( +SEDIT::STRINGWIDTH LIST CONS SEDIT::CREATE-WEAK-LINK) \PFVersionOK (\PFGetVols) \FM.FORMAT (MAPC +SELECTQ LISTGET APPLY* PLUS \FM.MAKE-GROUP-ID CONS LIST LISTPUT IPLUS \FM.FORMATBYROW +\FM.FORMATBYCOLUMN \FM.FORMATBYGRID \FM.FORMATEXPLICIT \FM.DTOPGROUPPROP FRPLACA ITIMES) ESPATTERN ( +UNPACK SELECTQ RPLACD) SEDIT::INITIALIZE (FUNCTION CONS LIST COPYTERMTABLE MAPC GETSYNTAX SETSYNTAX) +MINIMUMMAINWINDOWSIZE (WINDOWPROP CONS HEIGHTIFWINDOW FONTPROP APPLY* NUMBERP ERROR) \LEAFINIT ( +CREATE.MONITORLOCK \DEFINEDEVICE FUNCTION) MAX/TOP (GN/TOP) \PFPatchRootDirEntries (FREPLACEFIELD PLUS + FFETCHFIELD) \PFEnsureInitialized (SELECTQ MACHINETYPE) OPT.RESOLVEJUMPS (GETPROP PLUS IDIFFERENCE +OPT.JLENPASS) INFILECOMSPROP (CONS LIST RETFROM) /CONTROL (CONTROL LIST) \TEDIT.HARDCOPY.FORMATLINE ( +FUNCTION PLUS \RPLPTR \ADDBASE2 \ADDBASE \TEDIT.APPLY.STYLES \EDITELT GETBASEPTR \GETBASEPTR +FONTCLASSCOMPONENT FONTCOPY \TEDIT.HCPYFMTSPEC \TEDIT.APPLY.PARASTYLES IEQP \BIN \FGETCHARWIDTH +\GETBASE \GETCHARSETINFO UNFOLD LLSH \CHARSET LRSH \CREATECHARSET \CHAR8CODE LOGAND +\TEDIT.INTEGER.IMAGEBOX APPLY* IMAGEOBJPROP IMAX IDIFFERENCE IPLUS ADD1 \TEDIT.FORMATTABS FIXR FTIMES +DSPSCALE SUB1 \FGETWIDTH FFETCHFIELD - FONTPROP IMIN) \INTERACTIVE.CLOSEW (PROMPTPRINT) \ENCRYPT.PWD ( +LOGXOR NTHCHARCODE PLUS) \DSPUNTRANSFORMREGION (CREATEREGION \DSPUNTRANSFORMX \DSPUNTRANSFORMY) +COMP.AREF (FASSOC COMP.LOOKUPVAR LENGTH MKLIST COMP.EXPR CONS COMP.VAL SELECTQ) +\TEDIT.PUT.CHARLOOKS.LIST (HASHARRAY LOGAND LRSH \BOUT FLENGTH PLUS) XCL::RELIST*-INTERNAL (XCL::RECONS + XCL::RELIST*-INTERNAL) COMPILER::FIND-SEGMENT (COMPILER::TAGBODY-SEGMENTS COMPILER::SEGMENT-TAGS) +MSPRGLAMBDA (SELECTQ CONS MAKE-KEYWORD GETTEMPLATE CL:NREVERSE MSPRGTEMPLATE1 MSPRGTEMPLATE ASSOC +CL:FUNCALL INCLISP MSDWIMTRAN) SEGMENT.LENGTH (PLUS) FW-MOVE-OFD-WINDOWS (FW-CHANGE-JUSTIFICATION) +\LOGIN.READ (CONCAT CONSTANT CHARACTER RESETLST PROVIDE.PROMPTING.WINDOW FRESHLINE RESETBUFS CONS +PROMPTFORWORD MKATOM) GETCHATWINDOW (CONCAT L-CASE WINDOWPROP DECODE.WINDOW.ARG CONS) +SEDIT::COPY-SELECTION-DEFAULT (NTH PLUS) \DECODE.EXTENT.USE (SELECTQ) \LFNormalizeVolumeName ( +\LFParseFileName) \ADJUST.USERNAME (NCHARS PACK* STRPOS SUBSTRING SUB1 L-CASE CONCAT) PRINTADDRS ( +printout HILOC \HILOC LOLOC \LOLOC PRIN1 \ADDBASE SUB1 PLUS \VAG2 FLOOR LOGAND CONSTANT LOGXOR +IGREATERP \GETBASE) SMASHPATTERN (CONS SMASHPAT1 RECORDGENSYM) \DECRYPT.PWD (\ENCRYPT.PWD CONCAT) +\BUILD.EXPEDITED.XIP (COURIER.VERSION# \MAKE.EXPEDITED.STREAM \COURIER.EXPEDITED.ARGS IPLUS UNFOLD +LLSH INDEXF) \TEDIT.PUT.SINGLE.CHARLOOKS (GETFILEPTR LOGAND LRSH \BOUT FONTCLASSUNPARSE FONTPROP LOGOR + IDIFFERENCE) PRINTFILETYPE (IMAGESTREAMTYPE FILENAMEFIELD GETFILEINFO PRINTFILETYPE.FROM.EXTENSION +RESETLST MKATOM OPENSTREAM RESETSAVE LIST NLSETQ APPLY* ASSOC) \TEDIT.FIXCHANGEDLINE (\FORMATLINE ADD1 + \TEDIT.NEXT.LINE.BOTTOM IMINUS IPLUS IDIFFERENCE TEXTPROP SUB1) \IMAGEIOINIT (FUNCTION) DCODERD ( +GETSTREAM READ IPLUS LLSH \BIN PLUS CEIL LOGAND ADD1 UNFOLD CONSTANT SUB1 LOGXOR FOLDLO LRSH FLENGTH +IQUOTIENT \CODEARRAY FOLDHI BYTESPERNAMEENTRY WORDSPERNAMEENTRY SELECTQ SHOULDNT \FIXCODESYM +\FIXCODEPTR EVQ DEFC) \OKTOCLOSEW (DOUSERFNS) \MEDW.BLTCHAR (\CHAR8CODE LOGAND \CHARSET LRSH +\SLOWBLTCHAR IPLUS \DSPGETCHARIMAGEWIDTH \GETBASE \DSPGETCHARWIDTH DSPDESTINATION \TOTOPWDS +IDIFFERENCE \DSPGETCHAROFFSET) UNIX.SENDSCREENPARAMS (UNIX-CHANNEL FFETCHFIELD CONS CL:FORMAT) DEFC ( +CONCAT) \TEDIT-OPEN-FONT-FILE (OPENSTREAM) \MEDW.XOFFSET (\GETDISPLAYDATA \DTEST \OUTSTREAMARG +\GETSTREAM \SFFixClippingRegion \ILLEGAL.ARG) XCL::WALK-ARGLIST (CL:MEMBER CL:FUNCTION XCL::RECONS +XCL::WALK-ARGLIST XCL::RELIST* WALK-FORM-INTERNAL CL:ERROR) WINDOWPOSITION (WINDOWPROP) +\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (IMAGEOBJPROP APPLY* COPYALL) \TEDIT.OBJECT.SHOWSEL (DSPXOFFSET +DSPYOFFSET IMAGEOBJPROP WINDOWPROP CREATEREGION APPLY* - RESETLST RESETSAVE IDIFFERENCE IPLUS LIST +FUNCTION DSPCLIPPINGREGION IMIN ERSETQ) \MEDW.YOFFSET (\GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM + \INVALIDATEDISPLAYCACHE \ILLEGAL.ARG) \VFMGetPageGroup (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION UNINTERRUPTABLY \BLT \VFMGet MESASIZE) DCODESKIP (GETSTREAM GETFILEPTR IPLUS + LLSH \BIN) OPT.COMPILERERROR (HELP) PFI.ADD.TO.INDEX (CONS LIST) \NOIMAGE.DSPFONT (SMALLP CONSTANT +CHCON1) MAXMENUITEMWIDTH (MENU.PRIN2.FLG LISTGET \MENUITEMLABEL \MENUSUBITEMS IMAX IPLUS STRINGWIDTH +BITMAPWIDTH) IFCPROPS (SELECTQ INFILEPAIRS INFILECOMTAIL MAPC INFILECOMSMACRO) PRIN4 (\GETSTREAM +\GTREADTABLE \OUTTERMP) \TEDIT.LINECACHE (BITMAPCREATE IMAX) EXEC-PRINT (FRESHLINE WRITE) +FW-BUTTONEVENTFN (LOGAND) XCL::RELIST* (XCL::RELIST*-INTERNAL) \ALLOC.CODE.BLOCK (\ALLOCBLOCK FOLDHI +LRSH IPLUS) MAXIMUMMAINWINDOWSIZE (WINDOWPROP APPLY* NUMBERP ERROR) FW-AFTERMOVEFN (PROCESS.NAME +THIS.PROCESS FILEWATCHPROP WINDOWREGION IDIFFERENCE IPLUS) \PFFindRootDirEntryNum (SUB1 MESAELT \BLT +FMESAELT \ADDBASE IPLUS ILEQ ITIMES IDIFFERENCE MESASIZE PLUS) \REALNAMEP (NTHCHAR) FONTCLASS (FIXP +FONTCREATE MAPCAR LIST CONS) PRINTHISTORY1 (LISTGET1 CONS FMEMB FUNCTION PRINTHISTORY1 ADD1 LDIFF +LISPXREPRINT LISTGET SHOWPRINT) PROMPTFORWORD (COPYTERMTABLE PLUS RESETLST RESETSAVE SETTERMTABLE +DREVERSE CHCON TTY.PROCESSP TTY.PROCESS THIS.PROCESS CURSOR FIXP SELECTQ TTYDISPLAYSTREAM GETSTREAM +DISPLAYSTREAMP NCHARS NTHCHARCODE LIST MAPCAR CHCON1 \INSTREAMARG \GETSTREAM SETUPTIMER DSPXPOSITION +DSPYPOSITION \PROMPTFORWORDBIN GETSYNTAX SYNTAXP CHARACTER STRINGP APPLY* CONSTANT PRIN3 CONS CONCAT +CONCATCODES) GRAPHERPROP (PUTPROP GETPROPLIST GETPROP) GO.TO.FREELINE (TTLASTLINE ERASE.TO.END.OF.PAGE +) BKBUFS (SYSBUF) RAIDSTACKCMD (SELECTQ ASKUSER READOCT \GETBASE TERPRI FUNCTION) RECORD.FIELD.VALUE0 +(CONS GETFIELDFORCREATE) PROVIDE.PROMPTING.WINDOW (TTY.PROCESS THIS.PROCESS GETSTREAM WFROMDS +TTYDISPLAYSTREAM CREATEW CREATEREGION IPLUS LIST FUNCTION LRSH IDIFFERENCE STRINGWIDTH TERPRI +MACHINETYPE) ERASEPROPS (UNION SELECTQ MAPC ASKUSER LIST MAPCONC APPEND EDITE SORT HELP) +BROWSE/LAYOUT/LATTICE (IPLUS BRHL/LAYOUT GETNODEFROMID) COMPILER::CONSTRUCT-PROG1-TREE ( +COMPILER::MAKE-VARIABLE COMPILER::MAKE-VAR-REF COMPILER::MAKE-LAMBDA LIST COMPILER::MAKE-PROGN CL:APPEND + COMPILER::VARIABLE-BINDER COMPILER::VARIABLE-READ-REFS COMPILER::MAKE-CALL) RESTORE.CURSOR ( +GO.TO.RELATIVE) CLBUFS (LINBUF SYSBUF CONS) TEXTTOIMAGEFILE (RESETLST OPENSTREAM FULLNAME +OPENIMAGESTREAM PACKFILENAME APPEND LIST CONCAT GETFILEINFO CLOSEF) ROUND (CL::%%INTEGER-COERCE-MACRO) + LISPXSUBST (SUBST ESUBST) \POSSIBLECOLOR (SELECTQ TYPENAME MASK.1'S LSH SUB1 RGBP HLSP) GETOSTYPE ( +GETHOSTINFO) COMPILER::META-SUBST-MV-CALL (COMPILER::META-SUBST-ANY-CALL COMPILER::MV-CALL-FN +COMPILER::MV-CALL-ARG-EXPRS) \CCLOSURE.DEFPRINT (IPLUS CONSTANT NCHARS LITATOM FRESHLINE) +CH.DELETE.MEMBER.FROM.PROPERTY.ACL (CH.CANONICAL.NAME PARSE.NSNAME CH.GETAUTHENTICATOR COURIER.CALL +CH.FINDSERVER CH.PROPERTY COURIER.FETCH) \ALLOCATE.ETHERPACKET (\DEQUEUE FOLDHI LRSH IPLUS SUB1) +GRAPHER/CENTERPRINTINAREA (\GETSTREAM STRINGWIDTH IPLUS IQUOTIENT ADD1 IDIFFERENCE FONTPROP) +\GET-COMPILED-DEFINITION (MAKE-COMPILED-CLOSURE) RINGBELLS (FIXP SELECTC LIST PLUS FLASHWINDOW) +UNIX.SETDISPLAYTYPE (STREAMPROP SETUPTIMER PROCESSPROP THIS.PROCESS WINDOWPROP KEYACTION CL:CODE-CHAR +LOGOR LISP-TO-UNIX-TERMTYPE) \IDLE.PROMPTING.WINDOW (INTERRUPTCHAR PROCESSPROP THIS.PROCESS +TTYDISPLAYSTREAM TTY.PROCESS SUSPEND.PROCESS RESETSAVE) PFI.DEFAULT.HANDLER (GET CL:NTH CL:POSITION +NLSETQ CL:FUNCALL LIST MAPC CONS PFI.PRETTYPRINT) INFILECOMSVAL (CONS CL:PUSHNEW RETFROM) STRINGWIDTH +(\STRINGWIDTH.GENERIC \GTREADTABLE \FGETCHARWIDTH \FGETWIDTH \GETBASE \GETCHARSETINFO \GETBASEPTR +UNFOLD LLSH \CHARSET LRSH \CREATECHARSET \CHAR8CODE LOGAND \OUTSTREAMARG \GETSTREAM IMAGEOP +SPREADAPPLY* FONTCREATE) GRAPHNODE/BORDER/WIDTH (ABS ERROR) RELMOVETO (IPLUS DSPXPOSITION +\OUTSTREAMARG \GETSTREAM DSPYPOSITION) MSPRGTEMPLATE (GETMACROPROP) CHAT.INIT (WINDOWPROP +TEDITSTREAM.INIT FUNCTION) SEDIT::STRING-OFFSET (SEDIT::ESCAPE-CHAR FFETCHFIELD NTHCHARCODE IPLUS +CHARWIDTH PLUS) \PFGetLVPage (\PFGetVols) NEGSHADE (-) SEDIT::GET-SELECTED-STRUCTURE (SEDIT::CLOSE-NODE +) WINDOWPROP (PUTWINDOWPROP ARG GETWINDOWPROP \ILLEGAL.ARG) \TEDIT.BLTCHAR (\CHAR8CODE LOGAND \CHARSET + LRSH \GETBASE IPLUS IMAX IMIN IDIFFERENCE \PILOTBITBLT) BRV/OFFSET (GETNODEFROMID IPLUS FRPLACA +IDIFFERENCE BRV/OFFSET) TTYINWORDRDTBL (COPYREADTABLE) SUPERPRINT/COMMENT (+ DSPXPOSITION STRINGWIDTH +DSPRIGHTMARGIN DSPLEFTMARGIN PRIN1S SEMI-COLON-COMMENT-P <= LENGTH SUPERPRINT/COMMENT1 MIN MAX - FIXR +TIMES IQUOTIENT DSPLINEFEED SETFONT) OP# (\FINDOP) YMAPLIST (HEADPTY XYPT.Y NEXTPTY HEADPT NEXTPT +XYPT.X IDIFFERENCE MIDDX CONS REVERSE) \DisplayEventFn (SELECTQ DISPLAYBEFOREEXIT DISPLAYAFTERENTRY) +RAIDCOMMAND (ALLOCAL ASKUSER GETTOPVAL READATOM GETPROPLIST READVA READOCT ADDSTACKBASE \VAG2 +\ATOMVALINDEX NTYPX \LOLOC SHOULDNT PRIN1 READ PLUS TERPRI FUNCTION CONS ERROR! PEEKC GETBASE \GETBASE + \PUTBASE INSPECT VMAPPAGE NCREATE VGETTOPVAL GETSTREAM) SETUPPAGEMAP (SUB1 UNFOLD LLSH PLUS PAGELOC +IPLUS \HILOC LRSH \LOLOC) CHAT (SORT CONS APPEND MENU CHAT.PROMPT.FOR.INPUT GETPROMPTWINDOW +PROMPTFORWORD ADD.PROCESS PROCESS.RESULT FUNCTION) COPY1 (CONS LIST) DISPLAYAFTERENTRY (CARETRATE) +COMPSETREAD (LISPXREADBUF LISPXREAD PEEKC ASKUSER PRINT LIST) \MAKE.ITEMS.VERT.ORDER (CONS LIST PLUS +TCONC MAPCONC) DISPLAYBEFOREEXIT (CONS CURSOR CHANGEBACKGROUNDBORDER SELECTQ SHOWDISPLAY +TTYDISPLAYSTREAM CLRPROMPT SHOULDNT) MAXMENUITEMHEIGHT (FONTPROP \MENUITEMLABEL IMAX) SUPERPRINT/SPACE + (- DSPXPOSITION TIMES PRINENDLINE PRIN3) MSPRGTEMPLATE1 (SELECTQ MSPRGE MSPRGTEMPLATE1 MSBINDVAR +MSPRGLAMBDA MSPRGLST MSPRGCALL MSPRGTEMPLATE ADDTO MAPC IDIFFERENCE LENGTH MSPRGMACRO EVAL CONS +GETRELATION MEMQ) SYSOUT (\COPYSYS) SEDIT::SUBNODE-CHANGED (CL:FUNCALL) \SETUFNENTRY (\ADDBASE +\ATOMDEFINDEX NTYPX \LOLOC SHOULDNT FREPLACEFIELD) XCL::WALK-TEMPLATE-HANDLE-REPEAT-1 (WALK-TEMPLATE +CL:ERROR XCL::WALK-TEMPLATE-HANDLE-REPEAT-1 XCL::RECONS) \GETUFNENTRY (\ADDBASE2 \ADDBASE \FINDOP +\VAG2) HELPSYS (SELECTQ IRM.LOOKUP GETPROP BEEP) \PFPurgeRootDirectory (UNINTERRUPTABLY +\PFVolumeNumber) INSPECT/ARRAY (NUMBERP ARRAYORIG INSPECTW.CREATE SUB1 IMIN IPLUS ARRAYSIZE LIST PLUS +FUNCTION PRIN1) MAKESYS (CONCAT CL:STRING-CAPITALIZE SUBSTRING DATE \COPYSYS RESET) INFILECOM ( +INFILECOMSVAL APPLY* LIST LAST CONS INFILECOMTAIL IFCDECLARE IFCPROPS SELECTQ IFCPROPSCAN +INFILECOMSVALS INFILEPAIRS IFCEXPRTYPE MAPC GETPROP SUBPAIR) MAXIMUMWINDOWSIZE (WINDOWPROP APPLY* +NUMBERP ERROR) TEDIT.MODIFYLOOKS (DSPXPOSITION DSPYPOSITION ADD1 IDIFFERENCE IPLUS SUB1 FONTPROP +IQUOTIENT) SEARCH-FOR-EVENT-NUMBER (EXEC-EVENT-ID ENTRY#) SUBPRINT/WRAPPERTAIL (+ DSPXPOSITION WIDTH +STRINGWIDTH SUPERPRINT) \PICK.EVALQT (EXEC XCL::SETUP-EXEC-WINDOW) MSPRGERR (ADDTO) +SEDIT::NOTE-CHANGE-IN-SIMPLE (SEDIT::STRINGWIDTH SEDIT::NOTE-CHANGE) CALLSCCODE ( +\GET-COMPILED-CODE-BASE \CODEBLOCKP ERROR UNFOLD LLSH IPLUS CONSTANT \INDEXATOMVAL \VAG2 LRSH LOGAND +GETNAMEENTRY SUB1 BYTESPERNAMEENTRY WORDSPERNAMEENTRY LOGOR CODEBASELT \GETBASEBYTE LOGXOR PLUS +SELECTQ NTSLOT-VARTYPE GETNTOFFSET GETNTOFFSETENTRY BYTESPERNTOFFSETENTRY CONS NEXTBYTE \FINDOP +\INDEXATOMDEF BIG-VMEM-HOST \SUBFNDEF CALLSCCODE RUNION REVERSE) COMPILER::EXPAND-NESTED-PROGNS ( +MAPCONC COMPILER::PROGN-STMTS LIST) COPIEDFILEMATCH (EQUAL U-CASE) XCL::RECONS (CONS) CSUBSTLST ( +CSUBST RECONS CSUBSTLST) COMPILER::CLOSURE-ANNOTATE-VAR-REF (COMPILER::VAR-REF-VARIABLE +COMPILER::VARIABLE-SCOPE LIST) COMPSETY (SELECTQ) \SUBFNDEF (NTHCHARCODE PLUS \GET-COMPILED-DEFINITION +) \SHOWMENULABEL (\MENUITEMLABEL IPLUS FONTPROP CREATEREGION BITMAPWIDTH BITBLT IQUOTIENT IDIFFERENCE +CENTERPRINTINREGION MENU.PRIN2.FLG LISTGET ADD1 FONTDESCENT DSPFONT CL:FUNCALL FUNCTION) +CH.ADD.MEMBER.TO.PROPERTY.ACL (CH.CANONICAL.NAME PARSE.NSNAME CH.GETAUTHENTICATOR COURIER.CALL +CH.FINDSERVER CH.PROPERTY COURIER.FETCH) COMPILER::TEST-ANNOTATION (COMPILER::TEST-ALPHA-2 +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION COMPILER::PRINT-TREE COMPILER::ANNOTATE-TREE +COMPILER::META-EVALUATE) \CODEBLOCKP (NTYPX \HILOC \ADDBASE - \GETDTD ITIMES) +DEFAULT.BACKGROUND.COPYFN (LOGAND MENU ERSETQ EVAL) ADJUSTLINE.AND.RESTORE (MOVE.TO.WHEREVER +RESTORE.CURSOR) \APPLYINSPECTMACRO (INSPECTW.CREATE EVAL) \DSPFONT.PSC (\COERCEFONTDESC FONTCOPY +IMINUS FIXR TIMES \FGETWIDTH \GETBASE LISTGET) RAIDSHOWFRAME (RAIDROOTFRAME SUB1 printout TERPRI +FUNCTION) READPAGEMAPBLOCK (VBIN2 IPLUS LLSH VBIN1 \BIN LOCAL MAPVMPAGE SUB1 ADD1) \GET.IOCB (SELECTQ +\ILLEGAL.ARG PLUS EMPOINTER \VAG2) PFI.PRETTYPRINT (TERPRI) MSPRGRECORD (SELECTQ GETPROP CL:THIRD +CL:FIFTH CL:FOURTH RECORDFIELDNAMES LIST RPLACA MAPC ADDTO) \TEDIT.MARK.REVISION (DSPSCALE BLTSHADE + +FIXR CL:*) \QUEUE.OUTPUT.IOCB (SUB1 EMPOINTER \VAG2 RAID \LOLOC UNFOLD LLSH \D0.CONTROLLERBITS LOGOR) +RECORDWORD (GETPROP RECORDWORD) \DFSFreeDiskPages (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 +.UNWIND.PROTECT. FUNCTION \LFEntryPoint \PFFreeDiskPages) SEDIT::DEFAULT-PACKAGE (CL:SYMBOL-PACKAGE) +\PROMPTFORWORDRETYPE (MAPC REVERSE \OUTCHAR) \PROMPTFORWORDERASE (DSPYPOSITION DSPLEFTMARGIN +IDIFFERENCE FONTDESCENT TERPRI) DOBACKGROUNDCOM (MENU FUNCTION EVAL) \DISPLAYINIT (FUNCTION +\DEFINEDEVICE) CREATE-SHELL-STREAM (FORK-SHELL UNIX-CHANNEL FFETCHFIELD CONS FUNCTION) +GRAPHEDITEVENTFN (DSPCLIPPINGREGION LASTMOUSEX LASTMOUSEY DOWINDOWCOM TRACKNODE GRAPHEDITCOMMANDFN +CLOSEW) \DSPMOVELR (\STREAMCHARWIDTH FIXP PLUS IMINUS \CARET.DOWN IDIFFERENCE FONTDESCENT FONTHEIGHT +\GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM) COPYTEXTSTREAM (TEXTOBJ OPENTEXTSTREAM ADD1 +TEDIT.SELECTED.PIECES FUNCTION) READPAGEMAP (MAPVMPAGE PAGELOC IPLUS LLSH \HILOC LRSH \LOLOC SUB1 +SETVMPTR FOLDHI PLUS UNFOLD IEQ GETBASE \GETBASE ADDBASE \ADDBASE) DELETEMENU (TYPENAMEP WFROMMENU +WINDOWPROP DREMOVE FUNCTION) PFI.MAYBE.NEW.PAGE (SUB1 PFI.LINES.REMAINING PFI.ESTIMATE.SIZE TERPRI +DSPNEWPAGE) USEDFREE (APPEND) UPDATE/MENU/IMAGE (FONTP \COERCEFONTDESC FONTCREATE MENUTITLEFONT +FONTPROP STRINGWIDTH LENGTH NUMBERP ADD1 IQUOTIENT SUB1 FIXP IMAX IPLUS MAXMENUITEMWIDTH ITIMES +BITMAPWIDTH MAXMENUITEMHEIGHT IDIFFERENCE \MAKE.ITEMS.VERT.ORDER BITMAPCREATE DSPCREATE +CREATEWFROMIMAGE) \PROMPTFORWORDBIN (SETUPTIMER WAIT.FOR.TTY BIN SPREADAPPLY* MACHINETYPE IMIN LLSH +TIMES) RECONS (CONS) COMPSETF (SELECTQ) \TEDIT.SELECT.CHARACTER (IMAGEOBJPROP IMAGEBOX WINDOWPROP +RESETSAVE DSPXOFFSET IDIFFERENCE IPLUS LIST FUNCTION DSPYOFFSET DSPCLIPPINGREGION IMIN ERSETQ APPLY*) +COMPILER::CLOSURE-ANNOTATE-UNWIND-PROTECT (CL:UNION COMPILER::CLOSURE-ANNOTATE COMPILER::UNWIND-PROTECT-STMT + COMPILER::UNWIND-PROTECT-CLEANUP) FILL.CONT (FILL.INITTBLE IDIFFERENCE PLUS) \PAGEDBACKFILEPTR ( +UNINTERRUPTABLY PLUS FFETCHFIELD SUB1 IMAX) \CREATECHARSET (FONTPROP FUNCTION ASSOC APPLY APPEND LIST +IMAX SIGNED SUB1 LLSH IDIFFERENCE IPLUS \SETCHARSETINFO \RPLPTR UNFOLD) \PFRemoveRootDirEntry ( +UNINTERRUPTABLY \PFFindRootDirEntryNum ADD1 \BLT FMESAELT \ADDBASE IPLUS ILEQ ITIMES IDIFFERENCE +MESAELT MESASIZE PLUS FFETCHFIELD) CHANGECCODE (\GET-COMPILED-CODE-BASE CONS CCCSCAN LITATOM +CODEBASESETATOM MAPC UNINTERRUPTABLY OPCODES \DELREF) INFILECOMS (MAPC INFILECOM) PROCESS-EXEC-ID ( +PROCESSPROP PROCESS.NAME SUBSTRING STRING) DEFAULTFONT (FONTCLASS SETFONTCLASSCOMPONENT +\COERCEFONTDESC \DEVICESYMBOL) INSPECT/HARRAYP (HARRAYKEYS INSPECTW.CREATE FUNCTION) CHARWIDTHY ( +\CHARCODEP IGEQ \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CHARSET LRSH \CREATECHARSET FIXP \FGETWIDTH +\GETBASE \CHAR8CODE LOGAND \OUTSTREAMARG \GETSTREAM IMAGEOP SPREADAPPLY* FONTCREATE) +XCL::WALK-TEMPLATE-HANDLE-REPEAT (WALK-TEMPLATE XCL::WALK-TEMPLATE-HANDLE-REPEAT-1) \DSPPRINTCHAR ( +\CARET.DOWN \SYNCODE GETHASH \GETBASEBYTE CONSTANT IMAX PLUS FFETCHFIELD CHARWIDTH \INDICATESTRING +\STRINGWIDTH.DISPLAY IDIFFERENCE NCHARS NTHCHARCODE LIST WFROMDS UNFOLD LLSH +\DISPLAYSTREAMINCRXPOSITION MOD IMOD IQUOTIENT) COMPILER::META-SUBST-LABELS (COMPILER::MSUBST +COMPILER::META-SUBST COMPILER::LABELS-BODY REPLACEFIELD) SEDIT::PARENTHESIZE-CURRENT-SELECTION ( +FREPLACEFIELD CONS FFETCHFIELD NTH LIST PLUS SEDIT::CREATE-NULL-LIST SEDIT::COLLECT-UNDO-BLOCK +SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW) \DRAWARC.DISPLAY (\DRAWARC.GENERIC) \PFAddRootDirEntry ( +UNINTERRUPTABLY \BLT FMESAELT \ADDBASE IPLUS ILEQ ITIMES IDIFFERENCE MESASIZE ADD1) +SUPERPRINT/COMMENT2 (\GETSTREAM DSPXPOSITION NTHCHARCODE IPLUS WIDTH STRINGWIDTH PRINSHUT) +\DRAWPOINT.DISPLAY (\GETBRUSH BITBLT IDIFFERENCE HALF LRSH SUB1 SELECTQ DSPOPERATION) +\STRINGWIDTH.GENERIC (ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE PLUS \CHARSET LRSH +\GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CREATECHARSET \FGETWIDTH \CHAR8CODE LOGAND \FGETCHARWIDTH +SUB1 IPLUS FUNCTION) PRINT-EVENT (EXEC-EVENT-INPUT \GETSTREAM STRINGWIDTH LISTGET MAX DSPXPOSITION +FMEMB LDIFF CL:GETF LISPXREPRINT EXEC-PRIN1) SUPERPRINT/COMMENT1 (EDITDATE? IDIFFERENCE DSPFONT WIDTH +STRINGWIDTH BLANKS TIMES FIXR FLOATP IMAX IQUOTIENT IMIN) \PROTECTED.APPLY (ERSETQ APPLY*) DSPCLEOL ( +\CARET.DOWN \GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM BITBLT FIXP IDIFFERENCE FONTPROP IMAX +IMINUS) \DSPCLIPPINGREGION.DISPLAY (\GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM +\INVALIDATEDISPLAYCACHE) \CHARWIDTH.DISPLAY (\FGETCHARWIDTH \FGETWIDTH \GETBASE \GETCHARSETINFO +\GETBASEPTR UNFOLD LLSH \CHARSET LRSH \CREATECHARSET \CHAR8CODE LOGAND) MAPPAGES (PAGELOC IPLUS LLSH +\HILOC LRSH \LOLOC MKI.NEXTPAGE ADD1) REBINDP (FMEMB REBINDP) GRAPHOBJ.CHECKALIGN (NUMBERP LIST) +COMPILER::*PREDICATE-CONTEXT* (COMPILER:MAKE-CONTEXT) \STRINGWIDTH.DISPLAY (\STRINGWIDTH.GENERIC) +SEDIT::CLEAR-ALL-LINEAR-FORMS (SEDIT::WALK-UP-TREE SEDIT::SUBNODE CL:FUNCTION) PopUpWindowAndGetAtom ( +RESETLST RESETSAVE TTY.PROCESS THIS.PROCESS DEFAULTFONT WIDTHIFWINDOW IPLUS STRINGWIDTH ITIMES +CHARWIDTH CREATEW CREATEREGION IMIN IDIFFERENCE HEIGHTIFWINDOW FONTPROP OPENW LIST FUNCTION +PROMPTFORWORD PACK*) \CH.FIND.ORG.SERVER (ERROR MAPCAR APPEND SORT.NSADDRESSES.BY.DISTANCE NCONC1 CONS + \CH.FIND.ORG.SERVER GETCLEARINGHOUSE) \DSPOPERATION.DISPLAY (\GETDISPLAYDATA \DTEST \OUTSTREAMARG +\GETSTREAM FMEMB \SETPBTFUNCTION SELECTQ) PRINTERDEVICE (\CREATECOREDEVICE FUNCTION) MSBINDVAR (CONS +MSPRGERR) \10MBSENDPACKET (\ALLOCATE.ETHERPACKET LOCF \ADDBASE ADD1 \REQUEUE.ETHERPACKET) +\DEVICESYMBOL (\GETSTREAM \FONTSYMBOL) \FIXLINELENGTH.PSC (MIN FIX QUOTIENT DIFFERENCE) +\NEWPAGE.DISPLAY (DSPRESET) \BACKCOLOR.DISPLAY (\GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM +BITMAPHEIGHT LOGAND COLORNUMBERP) SEDIT::DEFAULT-GETDEF-FN (GETDEF) COURIER.EXECUTE.EXPEDITED.CALL ( +RESETLST OPENNSOCKET LIST CREATE.PACKET.EXCHANGE.XIP \BUILD.EXPEDITED.XIP \SEND.EXPEDITED.XIP +COURIER.OPEN FUNCTION COURIER.EXECUTE.CALL) \BLTSHADE.DISPLAY (DSPDESTINATION \TOTOPWDS \DSPTRANSFORMX + IPLUS \DSPTRANSFORMY IMAX IMIN SELECTQ TYPENAME COLORNUMBERP \ILLEGAL.ARG LOGAND MAXIMUMSHADE ITIMES +COLORTEXTUREFROMCOLOR# \GETBASE IDIFFERENCE \SFInvert) \OK.TO.IDLE? (RESETLST OBTAIN.MONITORLOCK) +PRINTCODE (\GET-COMPILED-CODE-BASE GET ERROR NUMFORMATCODE LIST UNFOLD LLSH CODEBASELT2 LOGOR +CODEBASELT \GETBASEBYTE LOGXOR ADD1 PRIN1 printout PRIN2 1ST FFETCHFIELD PLUS IDIFFERENCE - IPLUS +FOLDLO LRSH \GETBASEPTR TERPRI CLRHASH GETHASH \FINDOP NEXTBYTE ALLOCAL CONS LOGAND SUB1 LOCAL ASSOC +SELECTQ PUTHASH \INDEXATOMDEF \VAG2 \INDEXATOMPNAME \TYPENAMEFROMNUMBER NTH) \NSFILING.DESERIALIZE1 ( +FILING.CALL CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION CL:FUNCALL \BULK.DATA.CLOSE) +SETFONTCLASSCOMPONENT (FONTCREATE FONTPROP SASSOC FREPLACEFIELD CONS FFETCHFIELD) MAKEROOMFORPME ( +\GETBASE \ADDBASE IPLUS) SETUPHASHARRAY (GETATOMVAL HASHARRAYP HASHARRAY) \TEXTINIT (FUNCTION) +\BITBLT.DISPLAY (IMIN IDIFFERENCE \GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM IMAX \DSPTRANSFORMX +IPLUS \DSPTRANSFORMY .WHILE.TOP.DS. DSPDESTINATION \GETBASE \TOTOPWDS \BITBLT.BITMAP WINDOWPROP +BITMAPCREATE BITBLT COLORIZEBITMAP MAXIMUMCOLOR UNCOLORIZEBITMAP COLORMAP MAXIMUMSHADE +INSURE.B&W.TEXTURE LOGXOR LOGAND INVERT.TEXTURE.BITMAP COLORNUMBERP \ILLEGAL.ARG +COLORTEXTUREFROMCOLOR# ITIMES \SFInvert SPREADAPPLY*) \PFCreateRootDirectory (UNINTERRUPTABLY +\PFVolumeNumber \PFNewPages) INSPECT/TYPELESS (\ADDBASE IMINUS INSPECT/HUNK IDIFFERENCE UNFOLD LLSH +INSPECT/AS/BLOCKRECORD) PRINTCODENT (IPLUS TERPRI CONSTANT SUB1 BYTESPERNAMEENTRY LLSH +WORDSPERNAMEENTRY CODEBASELT \GETBASEBYTE LOGXOR PLUS \INDEXATOMVAL \VAG2 LRSH LOGAND CODEBASEGETNAME +GETNTOFFSET GETNTOFFSETENTRY BYTESPERNTOFFSETENTRY LOGOR SELECTC NTSLOT-VARTYPE CONS LIST PRIN2) +\UTF16.BACKCHARFN (SET IPLUS ADD1) DELETETO1 (BLTCHAR TTYDISPLAYSTREAM SUB1) POLYSHADE.DISPLAY ( +PREPLOOP MAPCAR \POLYSHADE.DISPLAY) LISPXPRINTDEF0 (RESETFORM OUTPUT PRINTDEF) TYPEP (CL:GETHASH +CL:FUNCALL) MSPRGCALL (ADDTO SELECTQ) NTH.COLUMN.OF (NTH.RELATIVE.COLUMN.OF IDIFFERENCE) FONTUNPARSE ( +FONTPROP CONS FONTCLASSUNPARSE PACK LIST* NTHCHAR LIST SHOULDNT) CODEWRAPPER.PRETTYPRINT ( +INDENTATION.FROM.HERE) FONTCLASSUNPARSE (APPEND LIST FONTUNPARSE MAPCAR) \DSPRESET.DISPLAY (\DTEST +\OUTSTREAMARG \GETSTREAM WFROMDS WXOFFSET WYOFFSET FONTASCENT ADD1 IDIFFERENCE IPLUS WINDOWPROP +PROCESS.TTY) SEQUENTIAL.PRETTYPRINT (DSPXPOSITION PRINTDEF GET CL:FUNCALL SUBPRINT/WRAPPERTAIL) CSUBST + (ASSOC SELECTQ LIST RECORDBIND COPY1 MAKECREATE1 SHOULDNT RECORD.FIELD.VALUE0 MAKEACCESS ACCESSDEF4 +GETP RECONS CSUBSTLST CSUBST GETHASH RECLISPLOOKUP SUBPAIR MKPROGN) COMPILER::*NULL-CONTEXT* ( +COMPILER:MAKE-CONTEXT) FONTPROP (\GETFONTDESC SELECTQ COPY LIST FONTPROP \ILLEGAL.ARG) +BROWSE/LAYOUT/HORIZ/COMPACTLY (GETNODEFROMID PACK CONS IMINUS FASSOC DREMOVE) \CH.LOCATE.SERVERS ( +COURIER.OPEN RESETSAVE LIST FUNCTION CH.RETRIEVE.MEMBERS CH.PROPERTY SORT.NSADDRESSES.BY.DISTANCE +COURIER.CALL CH.GETAUTHENTICATOR COURIER.READ.REP CH.DOMAINS.SERVED) FONTCLASSCOMPONENT (FONTCREATE) +\SCALEDBITBLT.DISPLAY (DSPCLIPPINGREGION BITMAPWIDTH BITMAPHEIGHT DSPYPOSITION DSPXPOSITION +BITMAPCREATE BITBLT EXPANDBITMAP TIMES) \FILLCIRCLE.DISPLAY (FIXR \ILLEGAL.ARG GLOBALRESOURCE ITIMES +IDIFFERENCE SUB1 BITMAPP COLORTEXTUREFROMCOLOR# COLORNUMBERP DSPCOLOR INSURE.B&W.TEXTURE BITMAPCREATE +\SFReplicate LOGOR LLSH LOGAND LRSH UNFOLD IMIN SELECTQ \DSPTRANSFORMX IPLUS \DSPTRANSFORMY \SFInvert +DSPDESTINATION \TOTOPWDS \GETBASE ADD1 \LINEBLT GETRESOURCE NEWRESOURCE NCREATE) +COMPILER::CLOSURE-ANNOTATE-THROW (CL:UNION COMPILER::CLOSURE-ANNOTATE COMPILER::THROW-TAG +COMPILER::THROW-VALUE) \TEDIT.CLEAR.SCREEN.BELOW.LINE (BITBLT IDIFFERENCE) MAKECREATE1 (SELECTQ +SMASHPATTERN MAKECREATELST LIST DREVERSE CREATEFIELDS GETFIELDFORCREATE KWOTE ASSOC COPY CSUBST EVAL +EMBEDPROG CONS MAPCAR MAPCONC SHOULDNT FUNCTION RECORDBIND SUBSET CADR RECORDERROR RECORDBINDVAL +REVERSE MAKEACCESS ACCESSDEF4 FRPLACA MKPROGN MAKEHASHLINKS) COMPILER::*EFFECT-CONTEXT* (COMPILER:MAKE-CONTEXT +) PRINT-EVENT-PROMPT (\GETSTREAM EXEC-EVENT-ID CL:FORMAT ENTRY#) EDITDATE? (NCHARS NTHCHARCODE PLUS >= + CL:LENGTH ILESSP) \DRAWLINE.DISPLAY (DSPDESTINATION \TOTOPWDS INSURE.BRUSH \LINEWITHBRUSH +\GOOD.DASHLST GETRESOURCE NEWRESOURCE NCREATE \DSPTRANSFORMX IPLUS FIXP FIXR \DSPTRANSFORMY SUB1 +MOVETO) INSPECTCODE (\TEDIT.INSPECTCODE DECODE.WINDOW.ARG CONCAT FUNCTION MAKE-INSPECTOR-PROFILE +\INSPECT/CODE/RESHAPEFN) CASE.PRETTYPRINT (INDENTATION.FROM.HERE DSPXPOSITION + TIMES CHARWIDTH +STRINGWIDTH - DSPRIGHTMARGIN) FILL.XPER (FILL.INITTBLE DSPDESTINATION \GETBASE \TOTOPWDS PLUS) +\DSPYPOSITION.DISPLAY (\INVALIDATEDISPLAYCACHE) FILL.TEST (FILL.INITTBLE PLUS) \DRAWELLIPSE.DISPLAY ( +FIXR / COS SIN ITIMES \GETCOLORBRUSH MAXIMUMCOLOR DSPCOLOR OPPOSITECOLOR \GETBRUSH \GETBRUSHBBT SUB1 +IDIFFERENCE \DSPTRANSFORMX IPLUS FOLDLO LRSH \DSPTRANSFORMY DSPDESTINATION \TOTOPWDS FPLUS FTIMES LSH +FQUOTIENT SQRT FDIFFERENCE ABS IMINUS RSH \GETBASE \FBITMAPBIT \BBTCURVEPT MINUSP ADD1 GETRESOURCE +NEWRESOURCE NCREATE) MSPRGMACRO (MACROEXPANSION INCLISP) FIND.LINE.BREAK (TTNEXTCHAR) +\DRAWCIRCLE.DISPLAY (FIXR \ILLEGAL.ARG DRAWCURVE \COMPUTE.ARC.POINTS GLOBALRESOURCE ITIMES IDIFFERENCE + \GETCOLORBRUSH MAXIMUMCOLOR DSPCOLOR OPPOSITECOLOR \GETBRUSH \GETBRUSHBBT SUB1 \DSPTRANSFORMX IPLUS +FOLDLO LRSH IQUOTIENT \DSPTRANSFORMY DSPDESTINATION \TOTOPWDS \GETBASE \FBITMAPBIT \BBTCURVEPT ADD1 +UNFOLD LLSH \CURVEPT GETRESOURCE NEWRESOURCE NCREATE) INDENTATION.FROM.HERE (+ DSPXPOSITION TIMES +CHARWIDTH) PREPLOOP (LIST NORMLOOP IRNDLIST SLITLOOP NCONC) COPIEDFILEPATTERN (U-CASE NCONC LIST ERROR + LDIFF COPIEDFILEPATTERN COPIEDFILEMATCH) SEDIT::CREATE-STRING-ITEM (SEDIT::STRINGWIDTH) +PROG1.PRETTYPRINT (INDENTATION.FROM.HERE DSPXPOSITION) COMPILER::CLOSURE-ANNOTATE-TAGBODY ( +COMPILER::TAGBODY-SEGMENTS CL:UNION COMPILER::SEGMENT-STMTS COMPILER::CLOSURE-ANNOTATE +COMPILER::TAGBODY-BLIP-VAR COMPILER::MAKE-VARIABLE COMPILER::TAGBODY-CLOSED-OVER-VARS CONS) +\AVGCHARWIDTH (CHARWIDTH FIXR FTIMES FONTPROP) FIND-STACK-FRAME (FIND-DEBUGGER-ENTRY-FRAME STKNTH) +SETFONTDESCRIPTOR (\DEVICESYMBOL \COERCEFONTDESC \FONTSYMBOL \FONTFACE IGEQ FASSOC CONS LIST FRPLACD +SASSOC) PRINT-HISTORY (FIND-HISTORY-EVENTS HISTORY-EVENTS TERPRI CL:VALUES) SUPERPRINT0 (GET CL:FUNCALL + SUPERPRINT/WRAPPER ASSOC APPLY* SUPERPRINT RPARS IPLUS DSPXPOSITION WIDTH STRINGWIDTH) \LOOKUPFONT ( +FASSOC SASSOC \FONT.SYMBOLASSOC) PROGV.PRETTYPRINT (INDENTATION.FROM.HERE DSPXPOSITION) +COMPILER::META-SUBST-IF (COMPILER::MSUBST COMPILER::META-SUBST COMPILER::IF-PRED REPLACEFIELD) +\DRAWLINE.PSC (FLOATP POSTSCRIPT.PUTCOMMAND TIMES) \FONTSYMBOL (U-CASE MKATOM ERROR) \DSPFONT.DISPLAY +(\COERCEFONTDESC FONTCOPY CONS ERROR IMINUS \FGETCHARWIDTH \FGETWIDTH \GETBASE \GETCHARSETINFO +\GETBASEPTR UNFOLD LLSH \CHARSET LRSH \CREATECHARSET \CHAR8CODE LOGAND \SFFixFont) DUMPINITPAGES ( +PAGELOC IPLUS LLSH \HILOC LRSH \LOLOC SUB1 PLUS ADD1 FUNCTION \GETBASE .PAGEMAPBASE. \ADDBASE OUTPUT +OPENFILE CLOSEF DUMPVP) DO.PRETTYPRINT (DSPXPOSITION + MIN TIMES IQUOTIENT -) MSPRGE (SELECTQ ADDTO +LTEMPLATE GETHASH MSPRGTEMPLATE GETP GETPROP MSDWIMTRAN MSPRGRECORD INCLISP MSPRGE MSPRGLST +CL:MACRO-FUNCTION CL:MACROEXPAND GETMACROPROP) NTH.RELATIVE.COLUMN.OF (TTBITWIDTH IDIFFERENCE) +XCL::VARIABLE-LEXICALLY-BOUNDP (CL:VALUES CL:MEMBER CL:FUNCTION XCL::VARIABLE-SPECIAL-P) PRINTPROG ( +IDIFFERENCE DSPXPOSITION STRINGWIDTH IPLUS) COMPILER::META-SUBST-CALL (COMPILER::META-SUBST-ANY-CALL +COMPILER::CALL-FN COMPILER::CALL-ARGS) \FONTFACE (\FONT.SYMBOLMEMB NCHARS SELCHARQ CHCON1 NTHCHARCODE +SELECTQ \FONTFACE.COLOR CONSTANT) \DSPLEFTMARGIN.DISPLAY (\SFFIXLINELENGTH) INTPOWERS (CL:MAKE-ARRAY) +CREATEFIELDS (NCONC SUBSET LIST) COMPILER::*ARGUMENT-CONTEXT* (COMPILER:MAKE-CONTEXT) +COURIER.EXPEDITED.CALL (ARG \GET.COURIERPROGRAM GETHASH ERROR \GET.COURIER.DEFINITION LENGTH CONS +SELECTQ IDIFFERENCE IPLUS LIST PLUS COURIER.EXECUTE.EXPEDITED.CALL) \DSPRIGHTMARGIN.DISPLAY (EQUAL +\SFFIXLINELENGTH) SUBPRINT (DSPXPOSITION SUPERPRINTGETPROP PRINDOTP DSPYPOSITION GET CL:FUNCALL +SETFONT SUPERPRINT NTHCHAR SELECTQ FASSOC IPLUS WIDTH STRINGWIDTH PRINTPROG PRINTSQ BLANKS TIMES +SUBPRINT1 IMIN SUBPRINT/ENDLINE SUBPRINT GETP NLEFT) FIND-LEXICAL-ENVIRONMENT (DECLARE STKPOS STKARG) +LISPXPRINTDEF (LIST LISPXPRINTDEF0) ADDFILE0 (FILECOMS FMEMB GETTOPVAL MISSPELLED? LIST CONS) +\MAP-CODE-POINTERS (NTYPX \ADDBASE IMINUS \GETDTD ITIMES ERROR \FINDOP CODEBASELT \GETBASEBYTE LOGXOR +PLUS CODEBASELT3 BIG-VMEM-CODE \VAG2 LOGOR LLSH ADD1 IPLUS) CH.PROPERTY (FIXP ERROR) \FONT.SYMBOLASSOC + (NCHARS CHCON1 IDIFFERENCE) LISP-TO-UNIX-TERMTYPE (ASSOC CL:STRING-DOWNCASE) \MAP-CODE-LITERALS ( +NTYPX \ADDBASE IMINUS \GETDTD ITIMES ERROR UNFOLD LLSH \INDEXATOMVAL \VAG2 LRSH LOGAND GETNAMEENTRY +CONSTANT SUB1 BYTESPERNAMEENTRY WORDSPERNAMEENTRY LOGOR CODEBASELT \GETBASEBYTE LOGXOR IPLUS PLUS +\FINDOP \INDEXATOMDEF CODEBASELT3 BIG-VMEM-CODE ADD1 IDIFFERENCE BYTESPERCODEATOM \INDEXATOMPNAME +CODEBASELT2) \DRAWCURVE.PSC (TERPRI TIMES PARAMETRICSPLINE SELECTQ ELT FQUOTIENT FPLUS FDIFFERENCE +PLUS) \FONT.COMPARESYMBOL (CL:AREF \PNAMECELL \ATOMCELL U-CASE NCHARS CHCON1 IDIFFERENCE ADD1 +\GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE IPLUS CONSTANT) CHECKIFPAGE (CHECKIF printout TERPRI) +PFI.HANDLE.EXPR (PRINT PFI.PRETTYPRINT CL:FUNCALL ASSOC FUNCTION) DSFIT1 (IDIFFERENCE IPLUS WIDTH +STRINGWIDTH BLANKS TIMES) \IDLE.TIME (IDIFFERENCE IDATE CONSTANT GDATE IPLUS CONCAT QUOTIENT) +SEDIT::DELETE-NODES (CL:FUNCALL) \PFPutRootDirectory (\PFVolumeNumber \VFMGetPageGroup) +\DRAWCURVE.DISPLAY (GLOBALRESOURCE \GOOD.DASHLST LENGTH PARAMETRICSPLINE GETRESOURCE NEWRESOURCE +NCREATE) INSPECT/DATATYPE (RECLOOK SYSRECLOOK1 FINDRECDECL FINDSYSRECDECL INSPECTW.CREATE +INSPECTABLEFIELDNAMES CL:FORMAT \HILOC \LOLOC \GETDTD \ADDBASE ITIMES NTYPX LENGTH LIST PLUS SELECTQ +ALISTP PRIN1) PRINTSQ (QUOTIENT PLUS DSPXPOSITION IPLUS TIMES DIFFERENCE PRINDOTP) CH.IS.IN.DOMAIN.ACL + (CH.GETAUTHENTICATOR COURIER.CALL CH.FINDSERVER PARSE.NSNAME CH.PROPERTY COURIER.FETCH) INSPECT/HUNK +(INSPECTCODE INSPECT/MAKE/CCODEP MENU LIST-ALL-BLOCKRECORDS CONS INSPECT/AS/BLOCKRECORD IMIN SUB1 +IQUOTIENT UNFOLD LLSH LIST PLUS) COMPILER::CLOSURE-ANNOTATE-SETQ (CL:ADJOIN COMPILER::SETQ-VAR +COMPILER::CLOSURE-ANNOTATE COMPILER::SETQ-VALUE) FIND-HISTORY-EVENTS (HISTORY-EVENTS CL:MEMBER APPEND +FIND-HISTORY-EVENTS LDIFF LIST NCONC1) BACKARROWP (NTHCHARCODE) \PFCurrentVol (\PFGetVols FMESAELT +\ADDBASE IPLUS ILEQ ITIMES IDIFFERENCE) UTF16BE.INCCODEFN (\BIN LOGOR LLSH IDIFFERENCE ERROR) +\4DISPLAYINIT (FUNCTION \DEFINEDEVICE) RPARS (ILEQ SELECTQ RPARS LAST SUB1) CH.RETRIEVE.PROPERTY.ACL ( +CH.GETAUTHENTICATOR COURIER.CALL CH.FINDSERVER PARSE.NSNAME CH.PROPERTY COURIER.FETCH) +DBG::COLLECT-ACTIVE-ESCAPES (ENVAPPLY STKNTH CL:DELETE-DUPLICATES CL:FUNCTION) XCL::VARIABLE-LEXICAL-P + (XCL::VARIABLE-SPECIAL-P CL:MEMBER CL:FUNCTION) COMPILER::META-SUBST-BLOCK (COMPILER::MSUBST +COMPILER::META-SUBST COMPILER::BLOCK-STMT REPLACEFIELD COMPILER::NODE-META-P) /PUT-1 (GETPROPLIST LIST +) FONTHEIGHT (\GETFONTDESC) \PFGetRootDirectory (\GetRootDirectoryType \PFVolumeNumber +\VFMGetPageGroup) DSFIT2 (IDIFFERENCE WIDTH STRINGWIDTH DSFIT1 IPLUS BLANKS TIMES SELECTQ ADD1 +SUPERPRINTGETPROP) COMPILER::META-SUBST-CATCH (COMPILER::MSUBST COMPILER::META-SUBST COMPILER::CATCH-TAG + REPLACEFIELD) FONTDESCENT (\GETFONTDESC) HISTORY-NTH (EXEC-EVENT-ID) XCL::GET-IMPLICIT-KEY-HASH ( +CL:ERROR) SEGMENT.BIT.LENGTH (PLUS FCHARWIDTH CHARWIDTH) \DSPBACKCOLOR.DISPLAY (\GETDISPLAYDATA \DTEST + \OUTSTREAMARG \GETSTREAM COLORNUMBERP CONS MAXIMUMCOLOR) SUBPRINT1 (GETPROP) \DSPCOLOR.DISPLAY ( +\GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM BITSPERPIXEL COLORNUMBERP CONS MAXIMUMCOLOR) +UTF16BE.PEEKCCODEFN (\PEEKBIN LOGOR LLSH UNICODE.TRANSLATE CL:SVREF LRSH FASSOC LOGAND +UNICODE.UNMAPPED ERROR LIST) LLBREAK (\GET-COMPILED-DEFINITION CONS PACK* GENSYM BROKENDEF) +MAKECREATE0 (RECORD.FIELDINFO MAKECREATE1 RECORD.CREATEINFO) BROWSE/LAYOUT/HORIZ (IPLUS BRH/LAYOUT +GETNODEFROMID) XCL::VARIABLE-SPECIAL-P (XCL::VARIABLE-GLOBALLY-SPECIAL-P) TEDIT.SCAN.LINE (FIXR FTIMES + IMAX SUB1 \EDITELT GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE PLUS IDIFFERENCE ADD1 LRSH IPLUS IMIN) +/PUTD (GETD LIST) PopUpWindowAndGetList (RESETLST RESETSAVE TTY.PROCESS THIS.PROCESS DEFAULTFONT +WIDTHIFWINDOW IPLUS STRINGWIDTH ITIMES CHARWIDTH CREATEW CREATEREGION IMIN IDIFFERENCE HEIGHTIFWINDOW +TIMES FONTPROP TTYDISPLAYSTREAM TTYIN) PRINTPROGVARS (SUPERPRINT) COMPILER::CLOSURE-ANNOTATE-PROGV ( +CL:UNION COMPILER::CLOSURE-ANNOTATE COMPILER::PROGV-SYMS-EXPR COMPILER::PROGV-VALS-EXPR COMPILER::PROGV-STMT +) FONTASCENT (\GETFONTDESC) NEW/INSTANCE/OF/GRAPHNODE (LIST COPY CONS) BROKENDEF ( +\GET-COMPILED-CODE-BASE LISPERROR UNFOLD LLSH \#BLOCKDATACELLS \ALLOC.CODE.BLOCK + CEIL LOGAND IPLUS +ADD1 FOLDHI LRSH CONSTANT SUB1 LOGXOR \PUTBASEBYTE \FINDOP - PLUS OPCODES CODEBASELT \GETBASEBYTE) +TEDIT.PROMPTFLASH (TEXTOBJ WINDOWPROP \TEDIT.MAINW GETPROMPTWINDOW) RENAME (GETFILEPKGTYPE) LISPXPRIN2 + (LIST CONS PRIN2) \IDLE.EXIT? (RESETLST RESETSAVE TTYDISPLAYSTREAM CLEARBUF LISTGET USERNAME NCHARS +PROMPTFORWORD CONCAT LIST ADD.PROCESS NLSETQ \LOGIN.READ MKSTRING EQUAL TERPRI) UNDOLISPX1 (UNDOLISPX2 + FMEMB UNDOPRINT) LISPXSPACES (LIST CONS SPACES) MISSPELLED? (PRINT FIXSPELL) /ADDPROP (LIST +GETPROPLIST CONS /NCONC1) \DRAWCIRCLE.PSC (TERPRI POSTSCRIPT.PUTCOMMAND TIMES \MOVETO.PSC) ADDPME ( +\GETBASE \ADDBASE IGREATERP PAGELOC IPLUS LLSH \HILOC LRSH \LOLOC .LOCKEDVPBASE. FOLDLO LOGOR +.LOCKEDVPMASK. IMOD ADD1) BRHL/MOVE/RIGHT (IDIFFERENCE HALF LRSH TOLINKS IPLUS CONS GETNODEFROMID) +PFI.PRINT.TO.TAB (- TIMES DSPSCALE CHANGEFONT) FM.TOPGROUPID (\FM.DTOPGROUPID WINDOWPROP +\FM.INSUREWINDOW ERROR) SAVEPUT (LIST GETPROPLIST EQUALN CONS) MSINITFNDATA (MAPC FRPLACD) +XCL::PUT-IMPLICIT-KEY-HASH (CL:ERROR \EQHASHINGBITS LOGXOR \HILOC LLSH LOGAND \LOLOC LRSH +XCL::IK-HASH-LAST-INDEX XCL::IK-HASH-BASE XCL::IK-HASH-KEY-ACCESSOR XCL::IK-HASH-NUM-KEYS +XCL::IK-HASH-NULL-SLOTS) SEDIT::CREATE-PRETTY-PRINT-ENV (FONTCREATE CHARWIDTH FIXR TIMES +SEDIT::CREATE-CONSTANT-STRINGS) COMPILER::META-EVAL-LABELS (COMPILER::MEVAL COMPILER::META-EVALUATE +COMPILER::LABELS-BODY REPLACEFIELD COMPILER::ANALYZE-TREE COMPILER::META-CALL-LABELS) VOLUMESIZE ( +\LFEntryPoint) FM.WHICHITEM (WHICHW \FM.CHECKREGION WINDOWPROP \FM.ITEMPROP FFETCHFIELD LISTGET IPLUS +ILESSP LASTMOUSEY LASTMOUSEX) UTF16BE.OUTCHARFN (IPLUS FFETCHFIELD UNICODE.TRANSLATE CL:SVREF LRSH +FASSOC LOGAND UNICODE.UNMAPPED) SEDIT::CREATE-PRELINEARIZED-NODE (SEDIT::CREATE-SIMPLE-NODE ADD1) +FONTSET (FASSOC FONTCREATE /SETTOPVAL CONS ASSOC SELECTQ FONTCLASS GETTOPVAL EVAL) +COMPILER::CLOSURE-ANNOTATE-RETURN (COMPILER::CLOSURE-ANNOTATE COMPILER::RETURN-VALUE) GO.TO.RELATIVE ( ++ TIMES SUB1 -) \8DISPLAYINIT (FUNCTION \DEFINEDEVICE) /PUTPROP (LIST GETPROPLIST CONS) +\DRAWELLIPSE.PSC (TERPRI TIMES \MOVETO.PSC) PRINTOPCODES (TERPRI MAPC LIST \FINDOP PRIN1 PRINTNUM) +SIMPLEP (IDIFFERENCE LENGTH GETP SIMPLEP SELECTQ GETHASH) GETCHARBITMAP (CHCON1 CL:CHAR-INT +\GETFONTDESC \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CHARSET LRSH \CREATECHARSET BITMAPCREATE +\FGETIMAGEWIDTH \GETBASE \CHAR8CODE LOGAND \FGETWIDTH FONTPROP \FGETOFFSET) BRHL/LAYOUT (IPLUS HALF +LRSH IMAX BRHL/LAYOUT/DAUGHTERS LIST) MakeMenuOfImageTypes (LIST L-CASE KWOTE) TTYINPROMPTFORWORD ( +GETSTREAM NON-TTYIN-PROMPTFORWORD RESETLST RESETSAVE TTY.PROCESS THIS.PROCESS TTYDISPLAYSTREAM TTYIN +NTHCHARCODE CONCAT STRINGP MKSTRING) TOGGLE/SIDESFLG (WINDOWPROP DSPTEXTURE REDISPLAYGRAPH) ALLCALLS ( +CONS LIST) RPLNODE2 (ERRORX LIST RPLNODE) \PFGetVols (SUB1 \PFGetVol LIST PLUS) FM.ENDEDIT (ERROR +\FM.ENDEDIT) SEDIT::CREATE-NODE (LIST ADD1 SEDIT::CREATE-WEAK-LINK) SI::*CLOSURE-CACHE* ( +XCL::MAKE-IMPLICIT-KEY-HASH-TABLE) \CORE.UPDATEOF (UNINTERRUPTABLY PLUS FFETCHFIELD) +TOPATTACHEDWINDOWS (MAPC ATTACHEDWINDOWS TOPATTACHEDWINDOWS) SEDIT::START-COMMENT (LIST +SEDIT::CREATE-NEW-COMMENT) PUTCHARBITMAP (TYPENAMEP CHARCODEP CHCON1) FILES.PUTDEF (FILECOMS +FILEPKG.MERGECHANGES) /SETATOMVAL (ERRORX LIST GETATOMVAL SETATOMVAL) \DUMPEXPORTS (SUBSTRING +PRETTYCOM TERPRI) \NSFILING.COPYFILE (FUNCTION \NSFILING.COPY/RENAME \GENERIC.COPYFILE) +GET-NEXT-HISTORY-EVENT (HISTORY-EVENTS MAKE-EXEC-EVENT LIST* HISTORY-INDEX CL:NTHCDR CL:1- +HISTORY-SIZE) \TEDIT.ADJUST.LINES (IPLUS TEXTPROP PLUS FFETCHFIELD IDIFFERENCE IMINUS) +COMPILER::SET-CONSTANT-VALUE (CL:GETHASH LIST) \FAST4BIT (\ADDBASE IGREATERP ELT PLUS) SEDIT::TTYEXITFN + (PROCESSPROP WINDOWPROP PROCESS.EVAL LIST) \CORE.DELETEFILE (\CORE.GETINFOBLOCK SPREADAPPLY* RPLACD +LIST) \SHOWTEXT (\TEDIT.PRIMARYW DSPCLIPPINGREGION RESETLST RESETSAVE CURSOR WINDOWPROP SUB1 +\FILLWINDOW \TEDIT.SET.WINDOW.EXTENT) CLEARFILEPKG (SUBSET) HISTORY-ADD-TO-SPELLING-LISTS (ADDSPELL) +\CORE.GETINFOBLOCK (\CORE.NAMESCAN FASSOC \CORE.PACKFILENAME FRPLACD CONS ADD1 FLAST) WINDOWTITLEFONT +(DSPFONT) CHAT.STARTUP (THIS.PROCESS STRPOS CL:ASSOC SUBSTRING ADD1 ASSOC CONCAT SUB1 CL:FUNCALL SORT +CONS CHAT.CHOOSE.EMULATOR GETCHATWINDOW WINDOWPROP KEYACTIONTABLE GETHOSTINFO CURRENTINTERRUPTS LIST +LISTGET MAPC INTCHAR KEYACTION FUNCTION CHAT.TYPEIN PRIN1 GETPROMPTWINDOW) \CORE.DIRECTORYNAMEP ( +UNPACKFILENAME.STRING > NCHARS) VOLUMES (SELECTQ MACHINETYPE MAPCAR \PFGetVols MKATOM U-CASE) +FM.EDITITEM (ERROR \FM.INSUREFM \FM.COERCEITEMPTR \FM.ITEMPROP FFETCHFIELD FM.GETITEM ADD.PROCESS) +MAPFILES1 (RESETLST \GENERATEFILES MKLIST \GENERATENEXTFILE NCHARS - NTHCHARCODE \GENERATEFILEINFO) +XCL::VARIABLE-GLOBALLY-SPECIAL-P (VARIABLE-GLOBALLY-SPECIAL-P GET) XCL:UNBREAK-FUNCTION (MAPCONC +XCL:UNBREAK-FUNCTION GET GETD CL:DELETE LIST CL:FIND-IF CL:FUNCTION CL:THIRD) \CORE.FINDPAGE ( +\ALLOCBLOCK FOLDHI LRSH IPLUS CONS) RECORDBINDVAL (RECORDBIND) \10MBGETPACKET (\DEQUEUE) +MOVECHARBITMAP (\GETFONTDESC GETCHARBITMAP FONTPROP IMAX BITMAPCREATE BITMAPWIDTH IPLUS IDIFFERENCE +IMIN) SPP.SENDATTENTION (GETSPPCON FFETCHFIELD \FILLINSPP LOGOR PLUS LOCF \ADDBASE \SENDSPP) +TEDIT.SELECT.LINE.SCANNER (DSPCLIPPINGREGION TEDIT.SCAN.LINE \TEDIT.PARABOUNDS +\TEDIT.FIND.PROTECTED.START \TEDIT.FIND.PROTECTED.END \FORMATLINE ADD1 IDIFFERENCE IPLUS) +\TEDIT.UNIQUIFY.CHARLOOKS (CONS FFETCHFIELD) \CORE.GENERATEFILES (DIRECTORY.MATCH.SETUP FILENAMEFIELD +MAPCONC NCONC ASSOC LIST CONCAT MAPCAR FUNCTION CONS) COMP.VALN (COMP.PROGN) +CH.DELETE.MEMBER.FROM.DOMAIN.ACL (CH.CANONICAL.NAME CH.GETAUTHENTICATOR COURIER.EXPEDITED.CALL +CH.FINDSERVER PARSE.NSNAME COURIER.FETCH) COMPILER::CLOSURE-ANNOTATE-PROGN (COMPILER::PROGN-STMTS +CL:UNION COMPILER::CLOSURE-ANNOTATE) FILL.INCY (IPLUS) DIRECTORY.MATCH (NTHCHARCODE PLUS +DIRECTORY.MATCH1) TRAPMAKE (HEADPT NEXTPT XYPT.Y LIST LAST CONS TERPRI MERGE LENGTH) TYPE.BUFFER ( +TTBOUT BLTCHAR TTYDISPLAYSTREAM TTBITWIDTH PLUS) FONTCOPY (\GETFONTDESC ARG LISTGET ADD1 PLUS +\FONTFACE SELECTQ \ILLEGAL.ARG FONTCREATE) FORK-SHELL (FORK-UNIX) DIRECTORY.MATCH.SETUP (CHCON +UPPERCASEARRAY SELCHARQ GETCASEARRAY) NETWORKLOGINFO (LIST MKSTRING) \FILLCIRCLE.PSC (BITMAPCREATE MIN + LSH TIMES QUOTIENT DSPSCALE \MOVETO.PSC) \CHTOPC (IPLUS \GETBASEFIXP \GETBASEPTR - PLUS) +TOGGLE/DIRECTEDFLG (WINDOWPROP DSPTEXTURE REDISPLAYGRAPH) \CORE.FILEINFOFN ( +\CORE.GETFILEINFO.FROM.INFOBLOCK) FONTSAVAILABLE (IMAGESTREAMTYPE FONTSAVAILABLE DEFAULTFONT +\COERCEFONTDESC DSPFONT FONTPROP LITATOM IGREATERP \FONTFACE U-CASEP U-CASE IGEQ UNION +\LOOKUPFONTSINCORE MAPCONC APPLY* ASSOC FUNCTION) FONTPROFILE.ADDDEVICE (U-CASE ASSOC FONTSET) +SEDIT::STRINGWIDTH (MKSTRING ITIMES CHARWIDTH SEDIT::ESCAPE-CHAR FFETCHFIELD SUB1 IPLUS ADD1 +\GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE PLUS STRINGWIDTH) \CORE.NEXTFILEFN (FRPLACA NAMEFIELD) +LISPDIRECTORYP (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SELECTQ MACHINETYPE +\LFEntryPoint) FM.EDITP (WINDOWPROP \FM.INSUREWINDOW ERROR) \24DISPLAYINIT (FUNCTION \DEFINEDEVICE) +SEDIT::CREATE-ENVIRONMENTS (SEDIT::CREATE-COMMAND-TABLE LIST FONTCREATE CHARWIDTH FUNCTION ITIMES +SEDIT::CREATE-CONSTANT-STRINGS) NAMEFIELD (UNPACKFILENAME.STRING PACKFILENAME.STRING NCHARS MKATOM) +\TEDIT.PROCIDLEFN (DSPCLIPPINGREGION LASTMOUSEX LASTMOUSEY WINDOWPROP WHICHW \TEDIT.BUTTONEVENTFN) +COMPILER::CONSTANT-VALUE (CL:GETHASH) SEDIT::UPDATE-TITLE (WINDOWPROP) +\CORE.GETFILEINFO.FROM.INFOBLOCK (SELECTQ IPLUS FOLDHI LRSH GDATE SELECTC SHOULDNT) +DBG::ESCAPE-FROM-DEBUGGER (DBG::COLLECT-ACTIVE-ESCAPES DBG::KEYLIST-FROM-ESCAPE-LIST CL:FORMAT) +\LOOKUPFONTSINCORE (NCONC LIST) \CORE.GETFILEHANDLE (\CORE.GETINFOBLOCK SELECTQ LIST) CREATESCREEN ( +DSPCREATE BITMAPWIDTH BITMAPHEIGHT BITSPERPIXEL FUNCTION) BRHL/LAYOUT/DAUGHTERS (GETNODEFROMID +NEW/INSTANCE/OF/GRAPHNODE IPLUS BRHL/LAYOUT FRPLACA CONS IDIFFERENCE) UTF8.PEEKCCODEFN (\PEEKBIN LLSH +LOGOR LOADBYTE LOGAND LSH IMINUS MASK.1'S SUB1 LIST) EQUALHASH (EQUAL HARRAYPROP) \BLTSHADE.PSC ( +CREATEREGION INTERSECTREGIONS CL:1- SELECT BITMAPCREATE MIN QUOTIENT MINUS LSH TIMES DSPSCALE) +FONTFILEFORMAT (OPENP OPENSTREAM SELECTC \WIN IPLUS LLSH \BIN LIST LOGOR LRSH) PFI.PRINT.ENVIRONMENT ( +LISTGET SELECTQ READTABLEPROP CL:PACKAGE-NAME SHOULDNT TERPRI) REDISPLAYW (WINDOWOP SPREADAPPLY*) +\DISPLAYSTREAMTYPEBPP (SELECTQ SHOULDNT) COMP.VAL1 (COMP.PROG1) FONTMAPARRAY (ARRAY SETA ELT PLUS CONS + COPY) CH.LIST.DOMAINS (PARSE.NSNAME COURIER.CALL \CH.FIND.ORG.SERVER CH.GETAUTHENTICATOR) +\CORE.GETFILEINFO (\CORE.GETFILEINFO.FROM.INFOBLOCK \CORE.GETINFOBLOCK) RECEVAL (EVAL APPLY*) +VARS.PUTDEF (/SETTOPVAL) DBG::INVOKE-ESCAPE-FROM-MENU (DBG::MENU-FROM-ESCAPE-LIST +DBG::COLLECT-ACTIVE-ESCAPES MENU CL:FORMAT) NUMBERP (\TYPEMASK.UFN LRSH) \TFBRAVO.LCASER (CHCON +FRPLACA IPLUS PACKC) LISPX/1 (LISPX/1 FASSOC CONS APPEND NCONC MAPCAR ARGTYPE GETPROP GETHASH) SHAPEW +(\INSUREWINDOW WINDOWPROP MINIMUMWINDOWSIZE CREATEREGION IMAX GETREGION WINDOWREGION APPLY* MOVEW +COPYALL) KILLSEGMENT (FRPLNODE) SEDIT::CREATE-GAP-NODE (SEDIT::LINEAR-ITEM-WIDTH LIST CONS +SEDIT::CREATE-WEAK-LINK) OR (\EVAL) SHRINKBITMAP (BITSPERPIXEL BITMAPHEIGHT BITMAPWIDTH BITMAPCREATE +IQUOTIENT SUB1 PLUS) OPENATTACHEDWINDOWS (MAPC ATTACHEDWINDOWS OPENW) CL:BLOCK (\EVPROGN) \VAMInit ( +WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \VAMBufferInit) FILEPKGCOMS.PUTDEF ( +ASSOC SELECTQ ERROR LISTGET FILEPKGCOM FMEMB UNION FILEPKGTYPE) GATHEREXPORTS (RESETLST RESETSAVE LIST + FUNCTION OPENSTREAM OUTPUT \DO-DEFINE-FILE-INFO) EXEC-PRIN1 (WRITE) \UNITWIDTHSVECTOR (\ALLOCBLOCK +UNFOLD LLSH IPLUS PLUS) EQUALALL (TYPENAME SELECTQ IEQP EQP EQUALALL STREQUAL ARRAYORIG ARRAYTYP +ARRAYSIZE ELT PLUS CL:ARRAY-DIMENSIONS CL:ARRAY-ELEMENT-TYPE CL:ADJUSTABLE-ARRAY-P CL:FILL-POINTER +SUB1 CL:ARRAY-TOTAL-SIZE XCL:ROW-MAJOR-AREF EQUALHASH GETSYNTAX GETCONTROL GETRAISE GETECHOMODE +GETDELETECONTROL EQUAL ECHOCONTROL EVERY DELETECONTROL GETDESCRIPTORS FETCHFIELD) +\NSFILING.COPY/RENAME (RESETLST \NSFILING.PARSE.FILENAME CL:ERROR \GETFILINGCONNECTION +\NSFILING.LOOKUP.CACHE \NSFILING.OPEN.HANDLE \NSFILING.COMPOSE.PATHNAME LAST CL:BUTLAST LENGTH - +\NSFILING.CONNECT \NSFILING.CHECK.ACCESS \NSFILING.HANDLE.ERROR FILING.CALL DREMOVE APPEND +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION PLUS FFETCHFIELD \NSFILING.DESERIALIZE1 +\NSFILING.ADD.TO.CACHE \NSFILING.FULLNAME) EDITBM (BITMAPCOPY EVALV \READBMDIMENSIONS BITMAPCREATE +BITSPERPIXEL WINDOWPROP DSPCLIPPINGREGION BITMAPHEIGHT BITMAPWIDTH IQUOTIENT ITIMES IMAX IMIN +IDIFFERENCE ADD1 IPLUS CREATEW GETBOXREGION WIDTHIFWINDOW HEIGHTIFWINDOW FUNCTION MAXIMUMCOLOR LIST +ERROR!) \TEDIT.UNIQUIFY.PARALOOKS (CONS FFETCHFIELD) WINDOWREGION (WINDOWPROP APPLY*) +MOVEATTACHEDWINDOWS (PTDIFFERENCE WINDOWPOSITION ATTACHEDWINDOWS PTPLUS TOTOPW) \PFFindRootDirEntry ( +\PFFindRootDirEntryNum MESAELT \BLT FMESAELT \ADDBASE IPLUS ILEQ ITIMES IDIFFERENCE MESASIZE) EDITCHAR + (\GETFONTDESC PUTCHARBITMAP EDITBM GETCHARBITMAP) SETTOPVAL (SELECTQ LISPERROR UNLESSRDSYS) +POSTEDITALISTS (GETTOPVAL LIST GETHASH) COMP.FLOATBOX (COMP.DELFN COMP.STFN) CH.CANONICAL.NAME ( +PARSE.NSNAME CH.LOOKUP.OBJECT) \CREATEDISPLAYFONT (LIST \GETBASEPTR UNFOLD LLSH \CREATECHARSET) NEW/FN + (CHCON1 PACK DUNPACK PACK* /NCONC1 CONS) TEDIT.PUT (TEXTOBJ \TEDIT.MAKEFILENAME TEDIT.GETINPUT +\TEXTSTREAM.FILENAME TEXTPROP APPLY* FULLNAME RESETSAVE OPENSTREAM U-CASE FILENAMEFIELD +\TEDIT.PUTRESET CONS THIS.PROCESS TEDIT.PROMPTPRINT CONCAT TEDIT.PUT.PCTB2 TEDIT.PUT.PCTB CLOSEF +CLOSEF? REVERSE \GETBASEPTR \FIRSTNODE TEXTSTREAM.TITLE \TEDIT.ORIGINAL.WINDOW.TITLE TEDITMENU.STREAM +PACKFILENAME) \CORE.GETFILENAME (\CORE.NAMESCAN \CORE.NAMESEGMENT SELECTQ ADD1 FLAST SHOULDNT +\CORE.PACKFILENAME) \CREATE.TTY.OUTCHARFN (\OUTCHAR \CREATE.TTYDISPLAYSTREAM) SI::ARGUMENT-ERROR ( +STKNTH STKNAME STKNARGS CL:ERROR) GETPROPLIST (\GETBASEPTR \PROPCELL \ATOMCELL CONSTANT) +\CORE.PACKFILENAME (CONCAT MKATOM U-CASE) TEDIT.PUT.PCTB2 (TEXTPROP TEDIT.FORMATTEDFILEP \EDITELT +GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE ADD1 OPENFILE GETFILEPTR PLUS FLENGTH +\TEDIT.PUT.PARALOOKS.LIST2 \TEDIT.PUT.CHARLOOKS.LIST2 \TEDIT.PUT.CHARLOOKS.LIST TEDIT.PUT.OBJECT OPENP + OPENSTREAM IPLUS UNFOLD LLSH SUB1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE \CHARSET LRSH +\CHAR8CODE LOGAND CONS EVAL GETEOFPTR \BOUT \TEDIT.UNIQUIFY.CHARLOOKS \TEDIT.UNIQUIFY.PARALOOKS) +\BITBLT.PSC (\SCALEDBITBLT.PSC) \CORE.NAMESEGMENT (LIST) ALLOCHASH (CONS LIST KWOTE) FW-ADJUST-REGION +(SELECTQ SHOULDNT CONS FW-RESIZE-OFD IDIFFERENCE IQUOTIENT IMINUS ERROR) COMPILER::CHECK-GLOBAL-CONSTANT + (CL:GETHASH CL:VALUES CL:SYMBOL-VALUE CL:ERROR CL:EVAL COMPILER::VALUE-FOLDABLE-P) +\CREATE-REAL-CHARSET.DISPLAY (\READDISPLAYFONTFILE MEMB \CREATEDISPLAYFONT \GETCHARSETINFO \GETBASEPTR + UNFOLD LLSH \CREATECHARSET \SFROTATECSINFO \SFMAKEBOLD \SFMAKEITALIC \CREATE-REAL-CHARSET.DISPLAY +\BUILDSLUGCSINFO FONTPROP) SEDIT::BUILD-WINDOW (CREATEW SEDIT::LESS-PROMPT-WINDOW SEDIT:GET-WINDOW-REGION + CONCAT FUNCTION SUB1 WINDOWPROP DSPCLIPPINGREGION IMINUS IPLUS FONTPROP DSPRIGHTMARGIN) +\CORE.NAMESCAN (\CORE.NAMESEGMENT CONS) FetchDefaultPrinter (DEFAULTPRINTER) \TEDIT.FIXINSSEL (IPLUS) +CONSTANTEXPRESSIONP (LIST GETHASH CONSTANTEXPRESSIONP SELECTQ NLSETQ EVAL COMPILER:OPTIMIZE-AND-MACROEXPAND + COMPILER:MAKE-CONTEXT APPLY GETMACROPROP MACROEXPANSION) \CORE.UNPACKFILENAME (NTHCHAR STRPOS ADD1 +NCHARS SUBSTRING SUB1 - FIXP SUBATOM CL:ERROR) INSERTLINE (ADD1) \SFMAKEITALIC (IPLUS BITMAPCREATE +\FGETOFFSET \GETBASE ADD1 \FGETWIDTH IDIFFERENCE IQUOTIENT IMIN IMAX ITIMES PLUS) CHAT.RECONNECT ( +WINDOWPROP APPLY* CHAT.RECONNECT.OFF LOGAND FUNCTION TTY.PROCESS ADD.PROCESS LIST KWOTE) SLITLOOP ( +COPY HEADPT NCONC LIST \SGN IDIFFERENCE XYPT.Y CONS REVERSE) FM.SHADE (ERROR \FM.GROUPPROP LISTGET +FASSOC WINDOWPROP \FM.ITEMPROP FFETCHFIELD \FM.INSUREFM \FM.COERCEITEMPTR FM.GETITEM BLTSHADE TEXTUREP +) ALIGNMENTNODE (SELECTQ GN/TOP GN/BOTTOM GN/RIGHT GN/LEFT GETNODEFROMID) SEDIT::CREATE-CONSTANT-STRINGS + (SEDIT::CREATE-STRING-ITEM MAPCONC LIST) SEDIT::CFV-CLISP (IMAX IPLUS) HCOPYALL1 (TYPENAME GETHASH +SELECTQ FRPLNODE PUTHASH CONS HCOPYALL1 CONCAT FPLUS IPLUS ARRAYSIZE ARRAYTYP ARRAYORIG ARRAY SETA ELT + PLUS HASHARRAY HARRAYSIZE HARRAYPROP COPYREADTABLE BITMAPCOPY COPYTERMTABLE GETDESCRIPTORS NCREATE +REPLACEFIELD FETCHFIELD) TILE (BITMAPWIDTH BITMAPHEIGHT PLUS) \CREATECHARSET.DISPLAY ( +\CREATECHARSET.DISPLAY \CREATE-REAL-CHARSET.DISPLAY) \BUILDSLUGCSINFO (\PUTBASE PLUS +\CREATECSINFOELEMENT \ALLOCBLOCK FOLDHI LRSH IPLUS BITMAPCREATE ROUND QUOTIENT SUB1) +BLTPATTERN.GENERIC (BITMAPWIDTH BITMAPHEIGHT MIN - +) \IFSERRORSTRING (NLSETQ OPENSTREAM PACK* +FULLNAME FCHARACTER FFILEPOS CONCAT IDIFFERENCE GETEOFPTR ALLOCSTRING \BIN PLUS) \TEDIT.PUTRESET (CONS + PROCESSPROP) \SCALEDBITBLT.PSC (NUMBERP TIMES INTERSECTREGIONS CREATEREGION BITMAPCREATE) COMPILE1A ( +\GETSTREAM POSITION GETHASH) \CORE.OPENFILE (LIST \CORE.GETFILEHANDLE ASSOC SELECTQ \ILLEGAL.ARG) +SHRINKATTACHEDWINDOWS (MAPC ATTACHEDWINDOWS DOUSERFNS WINDOWPROP \CLOSEW1) \READDISPLAYFONTFILE ( +\FINDFONTFILE LIST OPENSTREAM SELECTQ FONTFILEFORMAT FUNCTION \READSTRIKEFONTFILE \READACFONTFILE +CLOSEF) \VFMInit (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION UNINTERRUPTABLY +\VFMClearBuffers) \CORE.SETACCESSTIME (IDATE) CLISPATOM1 (GETPROP IMINUS LENGTH FLAST FMEMB LDIFF PACK + NCONC1 ADD1 SUB1 LIST LISTGET1 NCONC NTHCHAR UNPACK CONS NLEFT FUNCTION GETP CLISPATOM1A CLISPATOM1B) + \SFROTATECSINFO (\SFROTATEFONTCHARACTERS \SFROTATECSINFOOFFSETS) RAISE/TRANSITION/CHAIN (FRPLACD PLUS +) EVENTS-INPUT (CONS MAPCAR EXEC-EVENT-INPUT FMEMB LDIFF) \COREFILE.SETPARAMETERS (SELECTQ +\ILLEGAL.ARG FIXP IDATE) TTDELSECTION (BITBLT.DELETE DSPXPOSITION - DSPYPOSITION) +CHAT.PROMPT.FOR.INPUT (RESETLST RESETSAVE TTY.PROCESS THIS.PROCESS LIST FUNCTION DEFAULTFONT CREATEW +MAKEWITHINREGION WIDTHIFWINDOW + STRINGWIDTH TIMES CHARWIDTH HEIGHTIFWINDOW FONTPROP +TTYINPROMPTFORWORD) SEDIT::UNDO-ATOM-CHANGE (FREPLACEFIELD CONS LIST FFETCHFIELD +SEDIT::NOTE-CHANGE-IN-SIMPLE SEDIT::NOTE-CHANGE) LAYOUTSEXPR (CONS LAYOUTGRAPH LIST APPEND MKLIST +ERROR) FM.REDISPLAYMENU (ERROR \FM.REDISPLAYMENU) TEDIT (OPENFILE RESETSAVE WITH.MONITOR +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION TEDIT.CREATEW CONCAT APPEND COPY WINDOWPROP +OPENTEXTSTREAM TEXTOBJ \TEDIT2 ADD.PROCESS LIST KWOTE) SEDIT::COPY-NODE (CONS MAPCAR SEDIT::COPY-NODE +SEDIT::CREATE-WEAK-LINK APPEND) HCOPYALL (HASHARRAY HCOPYALL1) GETSETQ (LIST KWOTE FMEMB FIXSPELL +APPEND CONS) COMPILER::VALUE-FOLDABLE-P (TYPEP) \MKATOM (SUB1 IPLUS \GETBASEFAT \GETBASE PLUS +UNLESSRDSYS \GETBASETHIN \GETBASEBYTE \ADDBASE IDIFFERENCE \PARSE.NUMBER LOGAND LLSH ADD1 IPLUS16 +\LOLOC ATOM.HASH.REPROBE LOGOR LOGXOR UNINTERRUPTABLY \CREATE.SYMBOL \PUTBASE \ATOMPNAMEINDEX NTYPX +SHOULDNT) DBG::EXIT-DEBUGGER (CL:THROW) BRHC/OFFSET (GETNODEFROMID IPLUS FRPLACA BRHC/OFFSET) +GetNewPrinterFromUser (PopUpWindowAndGetList) \TEDIT.FIXDELSEL (IDIFFERENCE IMAX) \CREATE.SYMBOL ( +\ALLOCBLOCK FOLDHI LRSH IPLUS ADD1 CREATECELL ITIMES FOLDLO LOGOR \ADDBASE \PUTBASEBYTE \GETBASEFAT +\GETBASE PLUS OPCODES) SEDIT::ASSIGN-FORMAT-CLISP (GETPROP MAPC SEDIT::SET-FORMAT) BKSYSBUF.GENERAL ( +TYPENAME SELECTQ BKSYSBUF RESETVARS .RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. +FUNCTION \HILOC \LOLOC) PROPS.WHENCHANGED (GETPROP MARKASCHANGED) \PARSE.NUMBER (IPLUS IDIFFERENCE +SUB1 SELECTQ \INVALID.INTEGER \MKINTEGER PLUS \FLOATINGSCALE FLOAT SELCHARQ \GETBASECHAR \GETBASEFAT +\GETBASE \GETBASETHIN \GETBASEBYTE ADD1 \INVALID.DOTTED.SYMBOL /) SEDIT::REDO (SEDIT:GET-PROMPT-WINDOW + GETPROMPTWINDOW PRIN1) \CORE.BACKFILEPTR (UNINTERRUPTABLY PLUS FFETCHFIELD SUB1 IMAX) SHOWGRAPH ( +SIZE/GRAPH/WINDOW FUNCTION) COMPILER::CLOSURE-ANNOTATE-MV-CALL (CL:UNION COMPILER::CLOSURE-ANNOTATE +COMPILER::MV-CALL-FN COMPILER::MV-CALL-ARG-EXPRS) BLTSHADE (\BLTSHADE.BITMAP \OUTSTREAMARG \GETSTREAM +IMAGEOP SPREADAPPLY* DSPOPERATION) \EXPECTED.FILE.TYPE (UNPACKFILENAME.STRING) \CORE.SETEOFPTR ( +IDIFFERENCE \GETEOFPTR LOGAND \CORE.FINDPAGE SUB1) SEDIT::COMPUTE-COMMENT-COLUMN (IQUOTIENT ITIMES +WINDOWPROP) \SEARCHFONTFILES (\FONTSYMBOL \FONTFACE \FONTFILENAME.OLD \FONTFILENAME DIRECTORY +PACKFILENAME.STRING \FONTINFOFROMFILENAME CONS) EXPANDBM (NUMBERP BITMAPWIDTH BITMAPHEIGHT IMIN CL:* +IMAX + IQUOTIENT SUB1 PLUS EQL LSH - ZEROP) \CORE.SETFILEINFO (\CORE.GETINFOBLOCK IDATE LISPERROR FIXP + SELECTQ) PURGEDSKDIRECTORY (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +\LFEntryPoint \GETDEVICEFROMHOSTNAME \DEVICE-OPEN-STREAMS SPREADAPPLY* PRIN1 CLOSEF FILDIR +PACKFILENAME printout DELFILE \LFFindDirectoryVol \LFCloseDevice) FM.REDISPLAYITEM (ERROR \FM.INSUREFM + \FM.COERCEITEMPTR \FM.ITEMPROP FFETCHFIELD FM.GETITEM \FM.DISPLAYBITMAP LISTGET BITBLT) +\SEARCHDISPLAYFONTFILES (SELECTQ SYSTEMTYPE \SEARCHFONTFILES SHOULDNT) SEDIT::CONTAINS? (IGEQ) +\COPYDATATYPE (NTYPX \GETDTD \ADDBASE ITIMES CREATECELL MAPC \ADDREF OPCODES \RPLPTR COPYALL +\GETBASEPTR) SEDIT::SKIP-TO-GAP (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW PRIN1) \INITATOMPAGE (UNFOLD +LLSH \ADDBASE2 \ADDBASE ITIMES \PUTBASEPTR EVQ IQUOTIENT PLUS IPLUS) DBG::PRINT-BACKTRACE (BAKTRACE +LIST CL:FUNCTION +) \CORE.GETNEXTBUFFER (SELECTQ PLUS \EOF.ACTION \CORE.FINDPAGE) +CH.ADD.MEMBER.TO.DOMAIN.ACL (CH.CANONICAL.NAME CH.GETAUTHENTICATOR COURIER.EXPEDITED.CALL +CH.FINDSERVER PARSE.NSNAME COURIER.FETCH) SIMPLETEXTEDIT (RESETLST WITH-RESOURCES LIST OPENSTREAM +PACKFILENAME.STRING TTYIN GETFILEPTR CLOSEF GETRESOURCE NEWRESOURCE MAKE-TTSCRATCHFILE) \MAKEMDSENTRY +(\PUTBASE LRSH LOGOR) DO-APPLY-EVENT (ARGTYPE CL:FUNCALL CL:EVAL CL:APPLY) SPELLFILE1 ( +\GENERATENEXTFILE ELT UNPACKFILENAME.STRING SELECTQ MKATOM PACKFILENAME.STRING) WINDOWWORLD ( +\INSURESCREEN \TTY.CREATING.DISPLAYSTREAM CREATEW FUNCTION MAPC EVAL) \ALLOCBLOCK (\ALLOCHUNK IPLUS +\ALLOCBLOCK.OLD \ALLOCBLOCK.NEW RECLAIM IDIFFERENCE \DORECLAIM \ADDBASE \DELREF OPCODES) +\NSFILING.NEXTFILE (BULKDATA.GENERATE.NEXT ASSOC \NSFILING.FULLNAME NAMEFIELD) \NEWPAGE.PSC ( +POSTSCRIPT.STARTPAGE) IDLE.SHOW.OPTIONS (MAP IDLE.SHOW.OPTION) SEDIT::TRANSLATE-CHARS (SEDIT::ESCAPE-CHAR + FFETCHFIELD SUB1 IPLUS ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE CONCAT CHARACTER CONSTANT +IDIFFERENCE) COREDEVICE (\DEFINEDEVICE \CREATECOREDEVICE) INSERT.TEXT (TYPE.BUFFER SEGMENT.BIT.LENGTH) + \FONTINFOFROMFILENAME (UNPACKFILENAME.STRING LISTGET NTHCHAR PLUS MKATOM U-CASE SUBSTRING SUB1 ADD1 +LIST IMAGESTREAMTYPE SELECTQ \FONTSYMBOL) \FONTFILENAME.OLD (\FONTFACE PACKFILENAME.STRING CONCAT +SASSOC \ILLEGAL.ARG SELECTQ CL:FORMAT) COMPILER::NULL-EFFECTS-INTERSECTION-EXCEPT-CONS (EQUAL MKLIST) +\CREATECOREDEVICE (FUNCTION LIST) \PFGetVol (ELT) FM.RESETGROUPS (ERROR WINDOWPROP \FM.REDISPLAYMENU) +\FONTFILENAME (\FONTFACE CONCAT \ILLEGAL.ARG \PRINDATUM.TO.STRING LIST CHCON1 PACKFILENAME.STRING +CONCATCODES) SEDIT::COMPUTE-SELECTION-POSITION-DEFAULT (SEDIT::SUBNODE NTH IPLUS) SPELLFILEDIR ( +INFILEP PACKFILENAME FASSOC) RECDEC? (RECDEC? FMEMB) COMPILER::RESOLVE-VARIABLE-REFERENCE (DECLARE +COMPILER::MAKE-VAR-REF) MAPATOMS (\GETDTD \ADDBASE ITIMES IMIN \INDEXATOMPNAME PLUS LOGAND ADD1 +LISPVERSION IREMAINDER LRSH ILESSP SUB1 MDSTYPE# \GETBASE IPLUS \GETBASEPTR) DBG::%%RELEASE-STACK-DATUM + (WINDOWPROP RELSTK CL:MAPC) EXTEND/TRANSITION/CHAIN (FLAST) NewPrinter (CL:MEMBER CONS REMOVE LAST) +COMPILER::CLOSURE-ANNOTATE-LAMBDA (COMPILER::LAMBDA-NEW-FRAME-P CL:UNION COMPILER::LAMBDA-OPTIONAL +COMPILER::CLOSURE-ANNOTATE CL:SECOND COMPILER::LAMBDA-KEYWORD CL:THIRD COMPILER::LAMBDA-BODY +CL:DELETE-IF CL:APPEND COMPILER::LAMBDA-REQUIRED LIST MAPCONC NCONC CL:FIRST COMPILER::LAMBDA-REST +CL:FOURTH COMPILER::LAMBDA-CLOSED-OVER-VARS) MOVETO.IP (APPENDOP.IP) SPELLFILE.SPELL (RESETLST +SPELLFILE.SPELL1) COMPILER::CLOSURE-ANNOTATE-MV-PROG1 (COMPILER::MV-PROG1-STMTS CL:UNION +COMPILER::CLOSURE-ANNOTATE) FW-MOVEW (MOVEW) ATOMHASH#PROBES (\LOLOC MKSTRING SUB1 IPLUS ADD1 +\GETBASEFAT \GETBASE ILEQ \GETBASECHAR \GETBASETHIN \GETBASEBYTE LOGAND LLSH IPLUS16 \ADDBASE +UNLESSRDSYS PLUS ATOM.HASH.REPROBE LOGOR LOGXOR) BLTPATTERN (BITMAPWIDTH BITMAPHEIGHT MAX ITIMES +IQUOTIENT) GRAPHOBJ.FINDGRAPH (GETSTREAM WINDOWPROP LOGAND LOGOR COPYGRAPH) \DSPSCALE.PSC (QUOTIENT) +%%ARRAY-BASE (CL:ERROR) APPENDINTEGER.IP (APPENDINT.IPMACRO SUB1 LOADBYTE LOGAND LSH IMINUS UNFOLD +LLSH MASK.1'S PLUS IPLUS BYTESININT.IP) COMPILER::PASSABLE (COMPILER::NODE-EFFECTS COMPILER::NODE-AFFECTED + COMPILER::NULL-EFFECTS-INTERSECTION-EXCEPT-CONS) MAXATTACHEDWINDOWEXTENT (ATTACHEDWINDOWS +MAXIMUMMAINWINDOWSIZE CONS MAXIMUMWINDOWSIZE SELECTQ WINDOWPROP DIFFERENCE PLUS MAX MIN) +COMPILER::SIDE-EFFECTS (GET) %%ARRAY-OFFSET (CL:ERROR) CLISPTRAN (HASHARRAY /PUTHASH /RPLNODE CONS) +COMPILER::CLOSURE-ANNOTATE-LABELS (CL:DELETE-IF CL:UNION COMPILER::CLOSURE-ANNOTATE COMPILER::LABELS-BODY + COMPILER::LABELS-FUNS COMPILER::LABELS-CLOSED-OVER-VARS) %%ARRAY-TYPE-NUMBER (CL:ERROR) UNDOSET (LIST + GETTOPVAL FRAMESCAN STKARG) \ITEMW.FLIPCOPY (BLTSHADE) DO-HISTORY-SEARCH (EDITFPAT EXEC-EVENT-INPUT +CL:GETF) \GENERIC-UNREGISTER-STREAM (DREMOVE) COMPILER::RESOLVE-VARIABLE-BINDING (DECLARE GET) +\FONTFACE.COLOR (\DEVICESYMBOL U-CASEP U-CASE STRPOS SUBATOM SUB1 SELECTQ CONSTANT SELCHARQ +NTHCHARCODE ADD1 \DISPLAYSTREAMTYPEBPP COLORNUMBERP COPY MAXIMUMCOLOR) DBG::MAKE-FRAME-INSPECT-WINDOW +(ATTACHEDWINDOWS WINDOWREGION CREATEW DBG::REGION-NEXT-TO WINDOWPROP CL:FUNCTION) \ADD-OPEN-STREAM ( +CONS FFETCHFIELD) \COERCETODS (\ILLEGAL.ARG) \NSFILING.FILEINFOFN (\NSFILING.GETFILEINFO.FROM.PLIST) +SEDIT::UNDO-EXTRACT (PLUS SEDIT::NOTE-CHANGE) \PAGEDEOFP (READONLY IPLUS) MINATTACHEDWINDOWEXTENT ( +ATTACHEDWINDOWS MINIMUMMAINWINDOWSIZE MINIMUMWINDOWSIZE SELECTQ WINDOWPROP DIFFERENCE PLUS MAX MIN +CONS) SEDIT::SELECTED-FN-NAME (SEDIT::CLOSE-NODE SEDIT::GET-SELECTED-STRUCTURE) \PFInitializeVols ( +SUB1 \PFGetVol PLUS) POSTEDITPROPS (GETPROPLIST GETHASH LIST) FINDFILE (INFILEP SPELLFILE) +\SFLHASHLOOKUP (LOGAND LLSH \ADDBASE IPLUS) FIXSPELL1 (CONS POSITION STRINGP FASSOC LIST CLBUFS +ASKUSER ITIMES NCHARS) FW-SHAPEW (SHAPEW) SEDIT::ASSIGN-FORMAT-DOTLIST (MAPC SEDIT::SET-FORMAT +SEDIT::GET-LIST-FORMAT) SEDIT::GETKEY (THIS.PROCESS FFETCHFIELD WINDOWPROP) REMOVETONODES (LIST) +OPT.CFRPTQ (COMP.EXP1 CONS) PUTD (\RENAMEDFN) \NODIRCORE.OPENFILE (\IOMODEP) DECLSUBFIELD (ASSOC +RECORD.FIELDINFO RECORDECL0 RECORD.NAME FRPLACA RECORD.CREATEINFO APPEND RECORD.FIELDNAMES +ADD.RECORD.SUBDECS NCONC1) \FINDFONTFILE (FINDFILE \FONTFILENAME.OLD \FONTFILENAME) \PUTD ( +UNINTERRUPTABLY) FIXDATUM (LIST RECLISPLOOKUP MAKEACCESS ACCESSDEF RECORDERROR SELECTQ MKPROGN APPLY* +GETPROP GETP REVERSE SHOULDNT CONS PACK NCONC1 GETMACROPROP MACROEXPANSION SIMPLEP RECORDBIND APPEND) +HPRINSP (SPACES) SEDIT::STRINGIFY-ATOM (MKSTRING) PRINTERS.WHENSELECTEDFN (GetNewPrinterFromUser) +COPYGRAPH (LIST) \RENAMEDFN (\DTEST UNFOLD LLSH \#BLOCKDATACELLS \ALLOC.CODE.BLOCK CEIL LOGAND IPLUS +ADD1 FOLDHI LRSH CONSTANT SUB1 LOGXOR) LINETO.IP (FIXR APPENDOP.IP) BLOCKCOMPILE (RESETLST LIST +BLOCKCOMPILE1) \NODIRCOREFDEV (\CREATECOREDEVICE) MAXIMUMCOLOR (MASK.1'S LSH SUB1) GETD ( +SI::GET-CACHE-CLOSURE) ROMANNUMERALS (CONS PLUS U-CASE CONCATLIST REVERSE) COMPILER::CLOSURE-ANNOTATE-IF + (CL:UNION COMPILER::CLOSURE-ANNOTATE COMPILER::IF-PRED COMPILER::IF-THEN COMPILER::IF-ELSE) +SI::GET-CACHE-CLOSURE (XCL::GET-IMPLICIT-KEY-HASH) CLOSEALL (ERROR APPEND CLOSEF LIST) SCALEBM ( +BITMAPWIDTH BITMAPHEIGHT NUMBERP MIN CL:* IQUOTIENT BITMAPCREATE) SCROLLW (\CARET.DOWN APPLY* FUNCTION +) GRAPHEROBJ (GRAPHREGION IMAGEOBJCREATE LIST GRAPHOBJ.CHECKALIGN CREATEPOSITION MINUS) PRINT ( +\GETSTREAM) SPELLFILE.SPELL1 (ARRAY \GENERATEFILES PACKFILENAME.STRING FUNCTION FIXSPELL) +COMPILER::FIND-TOP-ENVIRONMENT (COMPILER::ENV-PARENT) EOFCLOSEF (GETSTREAM STREAMPROP) +BLTPATTERN.REPLACEDISPLAY (MIN + -) \STKMIN (ALLOCAL \ALLOCBLOCK FOLDHI LRSH IPLUS - \FINDOP SELECTQ +NUMBERP PLUS ADD1 \GET-COMPILED-CODE-BASE LLSH IMAX UNFOLD \GETBASEBYTE) CALLS3 (FRPLACA DREMOVE) +\FINDOP (ALLOCAL ARRAY PLUS SETA GETPROP ELT ERROR) COMPILER::NULL-EFFECTS-INTERSECTION ( +COMPILER::NULL-INTERSECTION) SEDIT::LINEARIZE-CLISP (IPLUS ILEQ MEMB SUB1 IDIFFERENCE +SEDIT::SELECT-COMMENT-INDENT SHOULDNT SELECTQ FMEMB GETPROP SEDIT::OUTPUT-CONSTANT-STRING) +FM.RESETSHAPE (ERROR WINDOWPROP SHAPEW CREATEREGION WIDTHIFWINDOW HEIGHTIFWINDOW) +\GET-COMPILED-CODE-BASE (NTYPX) SEDIT::COMPUTE-FORMATS-AND-FORMAT-VALUES ( +SEDIT::COMPUTE-FORMATS-AND-FORMAT-VALUES CL:FUNCALL) SEDIT::SPLIT-LITATOM (NCHARS SEDIT::CLOSE-NODE +SEDIT::DELETE-NODES) OPENP (\GETSTREAM \MAP-OPEN-STREAMS FUNCTION) \TTY.CREATING.DISPLAYSTREAM ( +DSPCREATE BITMAPCREATE FUNCTION) SEDIT::LINEARIZE-DOTLIST (SEDIT::OUTPUT-CONSTANT-STRING) HVREADERR ( +ERROR) \LFFindDirectoryVol (\PFGetVol \PFGetLVPage \PFGetVols \PFCurrentVol APPEND) IRNDLIST (MAPCAR +XYPT.X XYPT.Y FIX PLUS CONS) \FONTFILENAME.NEW (\FONTFACE CONCAT \ILLEGAL.ARG PACKFILENAME.STRING +NTHCHAR \PRINDATUM.TO.STRING) GRAPHOBJ.IMAGEBOXFN (IMAGEOBJPROP DSPSCALE SCALE/GRAPH GRAPHREGION TIMES + ALIGNMENTNODE PLUS GN/BOTTOM IQUOTIENT IPLUS IDIFFERENCE FONTPROP GN/LEFT) COMP.ARGTYPE (ARGTYPE +FASSOC GETP GETPROP) WHENCLOSE (GETSTREAM ARG ADD1 SELECTQ ERRORX LIST PLUS) CHECKRECORDNAME ( +RECORDERROR) \GETFONTDESC (\COERCEFONTDESC) CREATE-PROCESS-STREAM (FORK-UNIX UNIX-CHANNEL FFETCHFIELD +CONS) STREAMADDPROP (STREAMPROP CONS) COPY.WINDOW.TO.BITMAP (WINDOWPROP BITMAPCREATE BITSPERPIXEL +DSPDESTINATION \GETBASE \TOTOPWDS SCREENBITMAP BITMAPCOPY) TEDITWINDOWP (WINDOWP WFROMDS WINDOWPROP) +\FONTINFOFROMFILENAME.OLD (UNPACKFILENAME LISTGET NTHCHAR PLUS MKATOM SUBSTRING SUB1 LIST SELECTQ) +UNDOPRINT (PRIN2) DBG::STACK-FRAME-VALUE-COMMAND (INSPECT/AS/FUNCTION CL:SECOND +DEFAULT.INSPECTW.VALUECOMMANDFN) COLLECTFNDATA (FASSOC UNION COLLECTFNDATA) FASL::TABLE-STATS (LIST +CONS CL:LENGTH) SEDIT::SET-SELECTION-STRING (SEDIT::SET-SELECTION-ME SEDIT::GET-BUTTON-STRING +SEDIT::SCAN-STRING) \LFCloseDevice (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +\PFGetVols \LFCloseDirectory) FM.RESETMENU (ERROR WINDOWPROP FM.RESETSTATE \FM.REDISPLAYMENU) +HPINITRDTBL (GETATOMVAL COPYREADTABLE CONSTANT LIST FUNCTION) OPT.COMPINIT (SET LIST) +SEDIT::QUOTE-CURRENT-SELECTION (SEDIT::CLOSE-NODE) COMPILER::ENV-DECLARE-A-GLOBAL ( +COMPILER::ENV-DECLARED-GLOBALS) \READSTRIKEFONTFILE (GETFILEPTR \WIN IPLUS LLSH \BIN SIGNED SUB1 +IDIFFERENCE BITMAPCREATE UNFOLD ITIMES \PUTBASE PLUS) DBG::STACK-FRAME-PROPERTY (CL:SECOND CL:FIRST) MAKEUSERMACROSCOMS (FASSOC LISPXPRINT CONS INTERSECTION MAPCAR LIST NCONC GETTOPVAL SUBSET FMEMB) -D-ASSEM::COMPUTE-DEBUGGING-INFO (D-ASSEM::DCODE-DEBUGGING-INFO) DSPTRANSLATE (IMAGEOP SPREADAPPLY* -\\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) RECORDBIND (CONS LIST RECORDGENSYM) |\\UFStoOtherRenameMess| ( -FFETCHFIELD U-CASE FILENAMEFIELD PROMPTPRINT) \\GETBRUSH (\\BRUSHBITMAP) D-ASSEM::START-PC-FROM-NT-COUNT - (CEIL LOGAND IPLUS CL:1+ UNFOLD LLSH CONSTANT SUB1 LOGXOR + CL:*) \\SEND.EXPEDITED.XIP (SETUPTIMER -NSOCKETEVENT FFETCHFIELD LOCF \\ADDBASE GETXIP COURIER.VERSION# LIST LOGAND \\GETBASE -\\COURIER.RESULTS \\MAKE.EXPEDITED.STREAM PLUS) SEDIT::SET-POINT-COMMENT (NCHARS FFETCHFIELD NTH ADD1 -SEDIT::COMMENT-LENGTH SUB1 SEDIT::SET-POINT-NOWHERE) ECHOMODE (\\GTTERMTABLE FFETCHFIELD) PATH.LESSP ( -XYPT.Y ILEQ XYPT.X PATH.LESSP IPLUS) TEDIT.MINIMAL.WINDOW.SETUP (FFETCHFIELD FLAST WINDOWPROP LIST -FUNCTION FMEMB CONS NCONC1 \\TEDIT.CREATE.LINECACHE DSPCREATE LISTGET IPLUS DSPCLIPPINGREGION -\\SHOWTEXT NCONC) GETSCREENREGION (WINDOWOP SPREADAPPLY* FFETCHFIELD) \\IRND (IMINUS IQUOTIENT -IDIFFERENCE LRSH IPLUS) D-ASSEM::INTERN-TAG (CL:GETHASH D-ASSEM::MAKE-DTAG) GETECHOMODE (\\GTTERMTABLE - FFETCHFIELD) |\\UFSSetFileType| (MKATOM U-CASE LISTGET |\\UFSParseNameString|) D-ASSEM::CONVERT-TO-BINARY - (CL:LENGTH CL:MAKE-ARRAY + CEIL LOGAND IPLUS D-ASSEM::DCODE-NLOCALS D-ASSEM::DCODE-NFREEVARS CONSTANT - SUB1 LOGXOR CL:AREF PLUS D-ASSEM::DCODE-CODE-ARRAY) \\SHAREOFXTRAX (IMAX IQUOTIENT ITIMES) \\ARBOUT ( -NCHARS LOGAND LRSH \\BOUT GETFILEPTR ZEROP) GETCONTROL (\\GTTERMTABLE FFETCHFIELD) RECORDECL ( -RECORDECL0 FRPLACA) CL::%STRUCTURE-TYPE-TO-FIELDSPEC (CL::COERCE-TYPE) \\UFS.FILEINFOFN ( -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION |\\UFSGetFileType| FFETCHFIELD SELECTQ + FOLDHI LRSH - IPLUS GDATE CL:SUBSEQ) DSPPOPSTATE (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) -GETTERMTABLE (\\GTTERMTABLE) D-ASSEM::GATHER-ROOTS (D-ASSEM::GATHER-TAGS CL:REMOVE-IF) RECORDECL1 ( -CONS RECORD.REMOVE.COMMENTS LISTRECORDEFS LIST KWOTE MAPCAR IPLUS ADD1 FRPLNODE GENSYM ALLOCHASH -MAPCONC RECORDECLBLOCK SELECTQ CAR GETPROP RECORDECL1 APPLY* RECORDERROR CREATE.RECORD) -XCL::WHERE-IS-NAMESTRING (CL:NAMESTRING CL:MAKE-PATHNAME CL:PATHNAME-NAME CL:PATHNAME-TYPE) MAKESCAN ( -SORT FREPLACEFIELDVAL NCREATE) RAISE (\\GTTERMTABLE FFETCHFIELD) PFI.PRINT.LAMBDA.BODY (PRIN1) -D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL (CEIL LOGAND IPLUS CL:1+ LLSH COMPILER::ENV-TARGET-ARCHITECTURE -CONSTANT SUB1 LOGXOR + CL:*) \\COERCE.NS.SOCKET (FFETCHFIELD FREPLACEFIELDVAL NCREATE SUB1) ECHOCHAR ( -MAPC ECHOCHAR \\GTTERMTABLE FFETCHFIELD SELECTC \\SYNCODE GETHASH \\GETBASEBYTE LOGAND \\PUTBASEBYTE -\\SETFATSYNCODE SELECTQ \\ILLEGAL.ARG LOGOR) GETRAISE (\\GTTERMTABLE FFETCHFIELD) CONSFN (CONS -RECLISPLOOKUP) INSURE.BRUSH (BRUSHP NEWRESOURCE CONS FRPLACA DSPCOLOR DSPSCALE \\ILLEGAL.ARG) -D-ASSEM::PERFORM-LOCAL-FN-FIXUPS (D-ASSEM::DCODE-LOCAL-FN-FIXUPS) \\FTP.GENERATEFILES (RESETLST -UNPACKFILENAME.STRING \\CANONICAL.HOSTNAME MKATOM NCHARS GETHOSTINFO CHCON1 NTHCHARCODE CONCAT STRPOS -SUBSTRING L-CASE MAPCAR NCONC \\FTP.FROM.LISP.ATTRIBUTE LIST CONS \\INTERNAL/GETPASSWORD -\\GETFTPCONNECTION MARK# FTPPUTMARK FTPGETMARK SETUPTIMER FRPLACA FUNCTION DIRECTORY.MATCH.SETUP) -GETDELETECONTROL (\\GTTERMTABLE SELECTQ FFETCHFIELD LISPERROR CONCAT) DRAWCURVE (INSURE.BRUSH -SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD INSURE.DASHING FREERESOURCE CONS) \\COPYSYNTAX ( -ADD1 REHASH FFETCHFIELD \\CREATENSCHARHASH HASHARRAY FREPLACEFIELD) /LISPXPUT (FMEMB /NCONC LIST) -D-ASSEM::RESOLVE-JUMPS (MAPC D-ASSEM::SPLICE-IN-JUMPS D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL CL:LENGTH -D-ASSEM::DCODE-NAME-TABLE D-ASSEM::DTAG-PC) PRETTYPRINT2 (FASSOC READ CONS) DSPPUSHSTATE (IMAGEOP -SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) SETTERMTABLE (\\GTTERMTABLE FFETCHFIELD) -RESETTERMTABLE (\\GTTERMTABLE FFETCHFIELD) COMPILER::ENV-INLINE-DISALLOWED (COMPILER::ENV-DISALLOWED-INLINES - COMPILER::ENV-ALLOWED-INLINES COMPILER::ENV-PARENT COMPILER::ENV-INLINE-DISALLOWED -XCL::GLOBALLY-NOTINLINE-P) \\LITCHECK (MKSTRING CONCAT \\ILLEGAL.ARG) \\NSPRINT.MEDIUM.CHECK ( -UPPERCASEARRAY) ACCESSFN (DECLARERECORD CONS) \\TEST.CHARACTER.LOOKS (FCHARACTER BIN IDIFFERENCE -GETFILEPTR CONSTANT CHARACTER SELECTQ) DRAWELLIPSE (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM -FFETCHFIELD INSURE.BRUSH INSURE.DASHING) \\UFS.VALID.PROPP (LIST FMEMB) \\ORIGTERMTABLE ( -\\CREATENSCHARHASH HASHARRAY FREPLACEFIELDVAL NCREATE SELECTQ SYSTEMTYPE SHOULDNT \\SETTERMSYNTAX -CONSTANT CONS PLUS) |\\PFPutMarkerPage| (FIXP |\\PFVolumeNumber| |\\PFPutPage| ELT IPLUS -|LvBasePageAddr| FFETCHFIELD FMESAELT \\ADDBASE LOCF ILEQ ITIMES IDIFFERENCE |MarkerPageAddr|) -\\UFS.NEXTFILEFN (FFETCHFIELD \\UFS.NEXTFILEFN LOCF \\ADDBASE CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. - FUNCTION |\\UFSNextFile-C| \\UFS.FULLNAME.M CONCAT MKATOM U-CASE CL:SUBSEQ PLUS NTHCHARCODE NCHARS -ADD1) DIRECTORY.PARSE (CONS \\GENERATEFILES DIRECTORY.FILL.PATTERN DIRECTORY.MATCH.SETUP DIRCONJ -DIRECTORY.PARSE ERROR) MSHASHLIST (FUNCTION) HVBAKREAD (READC SKIPSEPRS APPLY READ HARRAY RATOM +SPELLFILE.MATCHINGDIRS (LISTGET UNPACKFILENAME SELECTQ DIRECTORYNAME LIST FASSOC CONS) +SHOW.CLEARINGHOUSE (CONS MAPCAR CH.LIST.ORGANIZATIONS CH.LIST.DOMAINS CONCAT SHOWGRAPH LAYOUTSEXPR +FUNCTION) \READACFONTFILE (LIST FUNCTION OPENSTREAM CLOSEF? \CREATECSINFOELEMENT \ALLOCBLOCK FOLDHI +LRSH IPLUS BIN \READACFONTBOXES \GETFBB \ACCHARIMAGELIST \ACCHARWIDTHLIST ZEROP EQP PLUS ADD1 \PUTBASE + IMAX IMINUS BITMAPCREATE \FGETWIDTH \GETBASE \ACCHARPOSLIST \WIN LLSH \BIN TIMES FOLDLO IMOD +\ACROTATECHAR DIFFERENCE IDIFFERENCE) *DEBUGGER-COMMAND-TABLE* (HASHARRAY) PFCOPYBYTES (RESETLST +\INSTREAMARG \GETSTREAM \OUTSTREAMARG FONTMAPARRAY ARRAYSIZE LIST FUNCTION DSPFONT ELT IDIFFERENCE +GETEOFPTR GETFILEPTR \INCCODE.EOLC CONSTANT CHARCODE.DECODE \INCCODE) SEDIT::REDISPLAY ( +SEDIT::VERIFY-STRUCTURE) COMPILER::ENV-DECLARE-A-SPECIAL (COMPILER::ENV-DECLARED-SPECIALS) +FASL::ADD-OP-TRANSLATION (CL:ASSOC FASL::OPTABLE-OPNAMES CONS) SEDIT::CREATE-NULL-LIST (ITIMES +CHARWIDTH LIST SEDIT::CREATE-WEAK-LINK) MOVETOFILE (GETFILEPKGTYPE GETDEF ADDTOFILE) +PFI.AFTER.NEW.PAGE (PLUS DSPFONT CONCAT PRIN1 - DSPRIGHTMARGIN STRINGWIDTH) FASL::FASL-END-OF-BLOCK ( +CL:THROW CL:ERROR) \TEDIT.NEXT.LINE.BOTTOM (IDIFFERENCE IPLUS) PF* (RESETVARS .RESETLST. LIST CONS +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) COMPILER::EFFECTLESS-EXCEPT-CONS (CL:EQUAL) RETURN +(\MYALINK OPCODES FUNCTION CL:VALUES-LIST) SEDIT::SET-SELECTION-LITATOM (SEDIT::SET-SELECTION-ME +SEDIT::GET-BUTTON-STRING SEDIT::SCAN-STRING) \NSFILING.GENERATE.STARS (STRPOS CONCAT SUBSTRING +) +FM.RESETSTATE (ERROR WINDOWPROP \FM.NWAYPROP LISTGET ASSOC \FM.ITEMPROP FFETCHFIELD \FM.INSUREFM +\FM.COERCEITEMPTR FM.GETITEM FM.CHANGESTATE) FASL::DEFINE-SINGLE-OPCODE (CL:ELT FASL::OPTABLE-VECTOR +FASL::ADD-OP-TRANSLATION) SEDIT::COMPILE-STRUCTURE (OPENWP SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW +CL:FUNCALL) PF (RESETLST NLAMBDA.ARGS APPEND WHEREIS OUTPUT OPENP WINDOWP OPENFILE FILENAMEFIELD) +LISTRECORDEFS (CONS LISTRECORDEFS PLUS) CHANGETRAN1 (COPY FIXDATUM GETPROP APPLY* SELECTQ LIST CONS +RECLISPLOOKUP REVERSE SUBST RECORDBINDVAL APPEND RECORDERROR EMBEDPROG CSUBST) +COMPILER::CLOSURE-ANNOTATE-CATCH (COMPILER::CLOSURE-ANNOTATE COMPILER::CATCH-STMT +COMPILER::VARIABLE-CLOSED-OVER COMPILER::CATCH-CLOSED-OVER-VARS COMPILER::CATCH-TAG CL:UNION) +BRHC/LAYOUT/TERMINAL (LIST HALF LRSH) PPROMPT2 (PROMPTPRINT) ERRORMESS (ERRM-TO-CONDITION CL:TYPE-OF +CL:PRINC) FINDFNDEF (FINDFILE GETFILEMAP LOADFILEMAP FASSOC LIST) TRAPLOOP (PREPLOOP COPYALL NCONC +MAPCAR HEADPTY XYPT.Y LAST REVERSE LENGTH SUB1 NTH ADD1 IMAPLIST MERGLIST COPY YMAPLIST LIST PLUS +TRAPMAKE) SEDIT::CFV-DOTLIST (CHARWIDTH ITIMES IPLUS SUB1 PLUS IMAX) FASL::SETESCAPE (CL:SVREF +FASL::OPTABLE-VECTOR CL:FUNCTION) \BASEBYTES.BLOCKIO (IDIFFERENCE SUB1 SPREADAPPLY* \GETBASEBYTE PLUS +IPLUS) SCROLL.HANDLER (OPENWP CREATEW LOC SETUPTIMER RESETFORM CURSOR WINDOWPROP ZEROP LOGAND LOGOR +CLOCK \CLOCK0) \TERPRI.PSC (PLUS IPLUS) \SFROTATECSINFOOFFSETS (BITMAPWIDTH \CREATECSINFOELEMENT +\ALLOCBLOCK FOLDHI LRSH IPLUS \PUTBASE IDIFFERENCE \FGETOFFSET \GETBASE \FGETWIDTH PLUS) PRINTFNDEF ( +RESETLST GETSTREAM OPENSTREAM LIST GETFILEPTR FULLNAME COPYBYTES PFCOPYBYTES TERPRI) +\FONTRESETCHARWIDTHS (\FGETOFFSET \GETBASE ADD1 IDIFFERENCE IPLUS \PUTBASE \FGETWIDTH PLUS) +\GETLEAFSTRING (\GETBASE \GETBASESTRING) ROTATE-BITMAP (BITMAPHEIGHT BITMAPCREATE BITMAPWIDTH UNFOLD +LLSH PLUS FFETCHFIELD \ADDBASE) SEDIT::SET-POINT-STRING (SEDIT::PUNT-SET-POINT IGEQ HALF LRSH +SEDIT::GET-BUTTON-STRING SEDIT::SCAN-STRING) NORMLOOP (COPY LAST HEADPTY NEXTPTY \SGN IDIFFERENCE) +\BASEBYTES.IO.INIT (FUNCTION \DEFINEDEVICE) PMORE (PRINTFNDEF) GRAPHOBJ.DISPLAYFN (IMAGEOBJPROP +DSPSCALE APPLY* GRAPHREGION SCALE/GRAPH CREATEPOSITION QUOTIENT DIFFERENCE DSPXPOSITION DSPYPOSITION) +SEDIT::BUILD-NODE (SEDIT::CREATE-NODE) HVRPTREAD (SUB1 READ) DBG::STACK-FRAME-STOREFN (CL:ASSOC +CL:FUNCALL STKARG CL:GETF SETSTKARG CL:SECOND) COMPILER::ENV-DECLARE-GLOBALS (COMPILER::ENV-DECLARED-GLOBALS + CL:APPEND) SEDIT::MARKASCHANGEDFN (PROCESSPROP THIS.PROCESS EDITDEF) MakeMenuOfPrinters (APPEND LIST +CONCAT KWOTE FUNCTION) \BASEBYTES.SETFILEPTR (PLUS) ROTATE-BITMAP-LEFT (BITMAPWIDTH BITMAPCREATE +BITMAPHEIGHT UNFOLD LLSH PLUS FFETCHFIELD \ADDBASE) UTF8.INCCODEFN (\BIN) \BASEBYTES.READP (PLUS +IMINUS IGEQ \GETBASEBYTE) HVFWDREAD (ADD1 CONS PEEKC FRPLNODE2 READ CONSTANT CHARACTER HVBAKREAD +FRPLACA) \RESETSYSTEMSTATE (\RESETTERMINAL) \BASEBYTES.PEEKBIN (SYSTEMTYPE \STRINGPEEKBIN STREAMOP +SPREADAPPLY* \GETBASEBYTE) \RESETTERMINAL (VIDEOCOLOR) FASL::DEFINE-OPCODE-RANGE (CL:SYMBOL-PACKAGE +CL:SYMBOL-NAME) CH.GETAUTHENTICATOR (\INTERNAL/GETPASSWORD NS.MAKE.SIMPLE.CREDENTIALS COURIER.CREATE +LIST ERROR!) \BASEBYTES.BOUT (\PUTBASEBYTE ADD1) \KEYBOARDON (LOGOR \GETBASE) IMPORTFILE (RESETLST +RESETSAVE LIST OPENSTREAM INPUT NCONC IMPORTFILESCAN IMPORTEVAL KWOTE ROOTFILENAME GETFILEINFO) +\BASEBYTES.BIN (\BASEBYTES.PEEKBIN PLUS FFETCHFIELD) UPDATEWFROMIMAGE (BITMAPWIDTH BITMAPHEIGHT) +CH.FINDSERVER (PARSE.NSNAME \CH.FIND.ORG.SERVER ERROR CH.FINDSERVER) INITIALEVALQT (CONS GETTOPVAL) +FW-ADJUST-PLACEMENT (IPLUS CONS) OPT.NOTJUMP (SELECTQ) \BASEBYTES.OPENFN (OPENSTRINGSTREAM +\MAKEBASEBYTESTREAM GETEOFPTR) \SFMAKECOLOR (DSPBACKCOLOR DSPCOLOR IMAGESTREAMTYPE +\DISPLAYSTREAMTYPEBPP COLORNUMBERP COLORIZEBITMAP) LOADFILEMAP (LOADFNS) DBG::STACK-FRAME-FETCHFN ( +CL:FIRST CL:ASSOC CL:GETF CL:FUNCALL STKARG CL:SECOND) INTERPRET.REM.CM (UNIX-GETENV OPENSTREAM +GETFILEINFO SKIPSEPRS NLSETQ READ NCHARS NTHCHARCODE PLUS) BRECOMPILE2 (ADD1 NCHARS IPLUS NTHCHARCODE +ILEQ PLUS) WRITESTRIKEFONTFILE (STRIKECSINFO \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CREATECHARSET +\FGETOFFSET \GETBASE PLUS ADD1 OPENSTREAM \BOUT IMAX \FGETWIDTH IPLUS IDIFFERENCE ITIMES) +COMP.NAMEDLET (COMP.LAM1 CONS MAPCAR CAR LIST KWOTE COMP.CALL) \BASEBYTES.NAME.FROM.STREAM (LIST +GETEOFPTR) GetPrinterName (MENU MakeMenuOfPrinters) FASL::NEW-VALUE-TABLE (CL:MAKE-ARRAY) EVAL (\EVAL) + FILLCIRCLE.IP (FILLNGON.IP) STRIKECSINFO (\FGETOFFSET \GETBASE BITMAPHEIGHT PLUS IMAX \FGETIMAGEWIDTH + \FGETWIDTH \CREATECSINFOELEMENT \ALLOCBLOCK FOLDHI LRSH IPLUS \PUTBASE ADD1 BITMAPCREATE COPYALL) +UTF8.OUTCHARFN (\BOUT SELECTC SHOULDNT IPLUS FFETCHFIELD UNICODE.TRANSLATE CL:SVREF LRSH FASSOC LOGAND + UNICODE.UNMAPPED LOGOR LLSH LOADBYTE LSH IMINUS MASK.1'S SUB1) TTMAKECOMPLEXCHAR (PLUS TTBITWIDTH) +SIMPLEPRINT (NCHARS NTHCHARCODE PLUS SIMPLEPRINT IGEQ SUB1) FASL::STORE-VALUE (CL:VECTOR-PUSH-EXTEND) +FASL::DO-OP (CL:1+ BIN CL:FUNCALL CL:SVREF FASL::OPTABLE-VECTOR) FASL::COLLECT-LIST (CONS FASL::DO-OP +LIST PLUS) UNICODE.UNMAPPED (CL:SVREF GETHASH ERROR ADD1 FRPLACA PLUS) FASL::CLEAR-TABLE ( +CL:FILL-POINTER) PRESSFILEP (STREAMP FINDFILE GETFILEINFO RESETSAVE OPENSTREAM SETFILEPTR IDIFFERENCE +IEQP \WIN IPLUS LLSH \BIN) SEDIT::MUTATE (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW TTYINPROMPTFORWORD +NLSETQ READ OPENSTRINGSTREAM PRIN1) MULTIFILEINDEX (NCONC DIRECTORY DIRECTORY.FILL.PATTERN MAPCAR LIST + FINDFILE CL:ERROR MULTIFILEINDEX1 FUNCTION) \FBITMAPBIT (\FBITMAPBIT.UFN SELECTQ) \PFCreateVols ( +ARRAYORIG ARRAYSIZE ARRAY HASHARRAY SUB1 PLUS) RNUMBER (NUMBERPAD.READ CREATE.NUMBERPAD.READER) +\MAKEBASEBYTESTREAM (SMALLP PLUS FUNCTION SELECTQ) \SETTOTALTIME (\BOXIPLUS LOCF \ADDBASE +CLOCKDIFFERENCE) *EXEC-COMMAND-TABLE* (HASHARRAY) \MBS.OUTCHARFN (\DTEST PLUS) CLOCKDIFFERENCE ( +UNINTERRUPTABLY IPLUS \BOXIDIFFERENCE \CLOCK0 LOCF \ADDBASE) \BASEBYTES.TRUNCATEFN (PLUS ERROR) +\FBITMAPBIT.UFN (\ADDBASE IPLUS ITIMES IDIFFERENCE LRSH \BITMASK \WORDELT LOGAND SELECTQ LOGXOR +\NOTBITMASK LOGOR FFETCHFIELD) OPENSTRINGSTREAM (STRINGP \MAKEBASEBYTESTREAM UNFOLD LLSH SELECTQ +\ILLEGAL.ARG SYSTEMTYPE FUNCTION) FASL::CONVERT-FASL-DATE (STRPOS SUBSTRING + SUB1) SEDIT::MENU-SELECTEDFN + (WINDOWPROP MAINWINDOW SEDIT::AWAKE-COMMAND-PROCESS APPEND SEDIT::LOOKUP-COMMAND CL:GETHASH +FM.ITEMPROP) \PFInitFileDescriptors (SUB1 ELT MESASETQ \BLT FMESAELT \ADDBASE IPLUS ILEQ ITIMES +IDIFFERENCE MESASIZE PLUS) MAKELISPXMACROSCOMS (CONS NCONC SUBSET FASSOC LIST FMEMB) COMP.SETARG ( +COMP.LOOKUPVAR COMP.STFN LIST TIMES SUB1 COMP.CALL CONS KWOTE) TTYINEDIT (RESETLST +SET.TTYINEDIT.WINDOW RESETSAVE CURSOR WITH-RESOURCES TTYIN LIST GETSTREAM DSPXPOSITION DSPRIGHTMARGIN +TTYIN.PPTOFILE GETRESOURCE NEWRESOURCE MAKE-TTSCRATCHFILE) BRHC/LAYOUT/DAUGHTERS (IPLUS GETNODEFROMID +BRHC/LAYOUT BRHC/INTERTREE/SPACE EXTEND/TRANSITION/CHAIN RAISE/TRANSITION/CHAIN CONS FRPLACD PLUS HALF + LRSH) DBG::STACK-FRAME-PROPERTIES (STKNARGS STKNAME SMARTARGLIST) INITBITMASKS (ARRAY CONSTANT EXPT +LOGXOR LRSH PLUS IDIFFERENCE) SCANFILE1 (TMPSUBFN READ CONS INPUT LIST) MAKEPROPSCOMS (MAPCAR CONS +LIST) \CLEARCELLS (FOLDLO LRSH SUB1 \ADDBASE IDIFFERENCE UNFOLD LLSH .CLEARNWORDS.) CH.LOOKUP.OBJECT ( +PARSE.NSNAME CH.FINDSERVER COURIER.EXPEDITED.CALL CH.GETAUTHENTICATOR) PFI.MAKE.LPT.STREAM (LISTGET +MKLIST PRINTERPROP PRINTERTYPE OPENIMAGESTREAM DSPSCALE - FIXR FTIMES APPEND CONCAT STREAMPROP) +RECORDECL1 (CONS RECORD.REMOVE.COMMENTS LISTRECORDEFS LIST KWOTE MAPCAR IPLUS ADD1 FRPLNODE GENSYM +ALLOCHASH MAPCONC RECORDECLBLOCK SELECTQ CAR GETPROP RECORDECL1 APPLY* RECORDERROR CREATE.RECORD) +COMPILER::ENV-DECLARE-SPECIALS (COMPILER::ENV-DECLARED-SPECIALS CL:APPEND) SEDIT::NEW-FUNCTION-BODY ( +EDITMODE COPY LIST) BRHC/LAYOUT (HALF LRSH IPLUS LIST BRHC/LAYOUT/DAUGHTERS BRHC/LAYOUT/TERMINAL CONS +IDIFFERENCE) GetImageFile (PopUpWindowAndGetAtom PACKFILENAME WINDOWPROP APPLY* MKLIST ASSOC +DEFAULTPRINTER PRINTERTYPE MakeMenuOfImageTypes PRINTFILETYPE.FROM.EXTENSION CONS MENU) +\TEDIT.RESHAPEFN (WINDOWPROP DSPCLIPPINGREGION \TEDIT.FIND.FIRST.LINE IDIFFERENCE IPLUS) FIX/SCALE ( +MAPCAR FIX/SCALE FIXR FTIMES) CIRCSHADE.IP (FILLNGON.IP) FASL::FETCH-VALUE (CL:AREF) FM.CHANGESTATE ( +ERROR WINDOWPROP \FM.NWAYPROP LISTGET ASSOC \FM.INSUREFM \FM.COERCEITEMPTR \FM.ITEMPROP FFETCHFIELD +FM.GETITEM BITBLT \FM.DISPLAYBITMAP FM.CHANGELABEL) SEDIT::SET-LIST-FORMAT (CL:GETHASH REMHASH) +TTINSERTSECTION (BITBLT.INSERT DSPXPOSITION - DSPYPOSITION) \MOVEWORDS (\BLT \ADDBASE) +COMPILER::CLOSURE-ANNOTATE-CALL (CL:UNION COMPILER::CLOSURE-ANNOTATE COMPILER::CALL-FN COMPILER::CALL-ARGS +) SCANFILE0 (LIST LCONC LAST SKIPSEPRCODES GETFILEPTR RATOM READ) CREATEDSKDIRECTORY (WITH.MONITOR +CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \LFEntryPoint \GETDEVICEFROMNAME +\LFMakeVolumeDirectory \LFOpenDevice PACKFILENAME.STRING U-CASE) FM.HIGHLIGHTITEM (ERROR \FM.INSUREFM +\FM.COERCEITEMPTR \FM.ITEMPROP FFETCHFIELD FM.GETITEM \FM.HIGHLIGHTITEM) \COURIER.OUTPUT.ABORTED ( +\BULK.DATA.CLOSE LISPERROR ERROR CONCAT LOGAND CONSTANT LOGOR CL:THROW) GRAPHOBJ.COPYFN (IMAGEOBJPROP +GRAPHEROBJ COPYGRAPH) SEDIT::BUILD-LINEAR-FORM (CONS SEDIT::CREATE-WEAK-LINK SEDIT::SUBNODE +IDIFFERENCE WINDOWPROP) RECORDECLTAIL (APPEND CONS ASSOC NTH FRPLACA RECORD.CREATEINFO +RECORD.TYPECHECK FNTH /RPLACA UNCLISPTRAN LIST RECORD.DEFAULTFIELDS) HVREADEND (CHCON1 READC CONSTANT +SYNTAXP) SEDIT::SET-POINT-LITATOM (SEDIT::PUNT-SET-POINT IGEQ HALF LRSH SEDIT::GET-BUTTON-STRING +NCHARS SEDIT::SCAN-STRING) \STRINGSTREAM.INIT (FUNCTION) TEDIT.RAW.INCLUDE (TEXTOBJ OPENSTREAM +SHOULDNT GETEOFPTR IDIFFERENCE TEDIT.GETPOINT \CHTOPC LASTPIECE \SPLITPIECE - PLUS +\TEDIT.UNIQUIFY.CHARLOOKS CHARLOOKS.FROM.FONT IPLUS) \DSPSPACEFACTOR.PSC (FIXR TIMES) \ZEROBYTES ( +\CLEARBYTES ADD1 IDIFFERENCE) \ADDOFD (CONS) EXPANDATTACHEDWINDOWS (REPOSITIONATTACHEDWINDOWS MAPC +ATTACHEDWINDOWS OPENWP WINDOWPROP \OPENW1) SEDIT::MENU-SUBSTITUTE-SELECTEDFN (LISTGET FM.ITEMPROP +WINDOWPROP MAINWINDOW FM.EDITITEM LIST TTY.PROCESS) TOTOPW (WINDOWOP SPREADAPPLY* \INSUREWINDOW) +COMP.ARG (COMP.PROGN COMP.LOOKUPVAR COMP.STFN OPCOUNT ADD1 \FINDOP IDIFFERENCE LIST LLSH SUB1 +COMP.CALL CONS KWOTE) MAKE-UNICODE-FORMATS (SELECTQ SHOULDNT FUNCTION \INSTALL.EXTERNALFORMAT) +\ZEROWORDS (\HILOC IDIFFERENCE SUB1 \LOLOC \VAG2 ADD1 \ADDBASE) /PUT+1 (GETPROPLIST LIST) OPT.CHLEV ( +PLUS IGEQ) DBG::BACKTRACE-ITEM-SELECTED (DECLARE WINDOWPROP WFROMMENU STKNTH -) END.DELETE.MODE ( +BLTCHAR TTYDISPLAYSTREAM) DSPDESTINATION (\GETDISPLAYDATA \DTEST \OUTSTREAMARG \GETSTREAM) +SEDIT::SELECT-SEGMENT-LITATOM (SEDIT::SCAN-STRING) \DELETEOFD (DREMOVE) FM.GETSTATE (ERROR LIST +WINDOWPROP LCONC LISTGET SELECTQ \FM.ITEMPROP FFETCHFIELD) FONTNAMELIST (LIST FONTPROP) \DISABLEGC1 ( +UNFOLD LLSH \ADDBASE) SEDIT::BUILD-INTERNAL-STRUCTURE (LIST CONS ALLOCSTRING SUBSTRING +SEDIT::BUILD-LINEAR-FORM) HVREADCHECKGETFN (CONCAT) RECORDECLBLOCK (RECORDERROR LIST CONS IDIFFERENCE +LRSH PLUS ASSOC SHOULDNT SUB1 NCONC MAPCAR CAR NCONC1 TRANSLATE.DATATYPE) COMPILER::ENV-PROCLAIMED-GLOBAL-P + (CL:MEMBER COMPILER::ENV-DECLARED-GLOBALS COMPILER::FIND-TOP-ENVIRONMENT) \GC.MODIFY.BIGREFCNT ( +\LOLOC \ADDBASE ADD1 PLUS FFETCHFIELD SUB1) SEDIT::SELECT-SEGMENT-DEFAULT (IMIN IMAX PLUS) TMPSUBFN ( +STRPOS IREMAINDER IDIFFERENCE ADD1 NCHARS NTHCHARCODE IPLUS PLUS) WOVERLAPP (REGIONSINTERSECTP) +FILLNGON.IP (FQUOTIENT IPLUS SUB1 TIMES SIN COS PLUS) DOATTACHEDWINDOWCOM2 (DOATTACHEDWINDOWCOM) +RETRYSCAN (RETFROM LOADFNSCAN SCANFILEHELP) BITBLT (\BLTSHADE.BITMAP \OUTSTREAMARG \GETSTREAM IMAGEOP +SPREADAPPLY* IMIN IDIFFERENCE \GETDISPLAYDATA \DTEST IMAX \DSPTRANSFORMX IPLUS \DSPTRANSFORMY +.WHILE.TOP.DS. DSPDESTINATION \GETBASE \TOTOPWDS \BITBLT.BITMAP BITMAPCREATE BITBLT) +COMPILER::ENV-PROCLAIM-GLOBAL (COMPILER::ENV-DECLARED-GLOBALS COMPILER::FIND-TOP-ENVIRONMENT) +\GC.ENTER.BIGREFCNT (\LOLOC \ADDBASE PLUS FFETCHFIELD) PRINTERSTATUS (PRINTERPROP PRINTERTYPE APPLY*) +\BACKFORMAT (IDIFFERENCE \GETCHB \BACKBIN PLUS IMAX ADD1 SUB1 \FORMATLINE) COMPILER::CLOSURE-ANNOTATE-BLOCK + (COMPILER::CLOSURE-ANNOTATE COMPILER::BLOCK-STMT COMPILER::VARIABLE-CLOSED-OVER COMPILER::BLOCK-BLIP-VAR + COMPILER::MAKE-VARIABLE COMPILER::BLOCK-CLOSED-OVER-VARS CONS CL:UNION) \BLTSHADE.BITMAP (IMAX IMIN +IPLUS SELECTQ TYPENAME COLORNUMBERP \ILLEGAL.ARG MAXIMUMCOLOR LOGAND TEXTUREP TEXTUREOFCOLOR ITIMES +COLORTEXTUREFROMCOLOR# IDIFFERENCE \SFInvert) \BITBLT.BITMAP (IMAX IMIN IPLUS IDIFFERENCE LOGXOR +LOGAND COLORNUMBERP INVERT.TEXTURE.BITMAP BITMAPCREATE \ILLEGAL.ARG UNFOLD LLSH COLORTEXTUREFROMCOLOR# + ITIMES \SFInvert MAXIMUMCOLOR) OPT.JUMPCHECK (SELECTQ) \SEARCHOPENFILES (\IOMODEP) +\CREATE.TTYDISPLAYSTREAM (CREATEW CREATEREGION IPLUS CONCAT PROCESSPROP THIS.PROCESS TTYDISPLAYSTREAM) + COMPILER::TEST-ANALYSIS (COMPILER::TEST-ALPHA-2 CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION +COMPILER::PRINT-TREE COMPILER::ANALYZE-TREE) CHAT.TYPEOUT (FASSOC WINDOWPROP CL:FUNCALL BIN +\CARET.DOWN GETSTREAMPROP LOGAND MASK.1'S LSH SUB1 PLUS) SEDIT::SCAN-STRING (NCHARS SEDIT::ESCAPE-CHAR + FFETCHFIELD ADD1 CHARWIDTH NTHCHARCODE IPLUS IDIFFERENCE SUB1) INFILE (INPUT OPENFILE) \LFCloseFile ( +WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION PLUS \LFUpdateLeaderPage) +SEDIT::ATOM-CHANGE-RELINEARIZE (SEDIT::CLOSE-NODE CL:FUNCTION SEDIT::RELINEARIZE) OPENFILE (OPENSTREAM +) \LEAF.MAYBE.FLUSH.CACHE (\LEAF.FLUSH.CACHE) IMPORTEVAL (SELECTQ MAPCONC IMPORTEVAL LIST) GETBLOCKDEC + (LOADFNS-FINDFILE FILECOMSLST SUBSET LITATOM LIST) GRAPHOBJ.GETFN (SKIPSEPRCODES READGRAPH GRAPHEROBJ + GRAPHOBJ.GETALIGN HREAD CREATEPOSITION READ) \GC.BIGREFCNT.MISSING (\MP.ERROR) /LISPXPUT (FMEMB +/NCONC LIST) FW-FORGET-STREAM (GETSTREAM) LOADFNS-FINDFILE (EDITLOADFNS? NARGS ERROR) \INSURESCREEN ( +\ILLEGAL.ARG) COMPILER::SUBSTITUTABLE-P (COMPILER::VAR-REF-P COMPILER::LITERAL-VALUE) +\GC.LOOKUP.BIGREFCNT (\LOLOC \ADDBASE \MAKENUMBER) GRAPHOBJ.PUTFN (IMAGEOBJPROP TERPRI) \GCMAPSCAN ( +\ADDBASE \GCSCAN1 \VAG2 LLSH \LOLOC .FREELINK. \GCRECLAIMCELL OPCODES) IDLE.SHOW.OPTION (LISTGET PRIN1 + SELECTQ L-CASE CONCAT SUBPAIR MKSTRING printout TERPRI) LOADBLOCK (LOADFNS-FINDFILE SUBSET +GETBLOCKDEC LIST VIRGINFN LOADFNS) ARG (GETBASEPTR \GETBASEPTR \ARGPTR \EVAL) INSERT.NODE (TTNEXTNODE +FRPLACD FRPLNODE2 SCRATCHCONS) PFI.LINES.REMAINING (DSPBOTTOMMARGIN ADD1 IQUOTIENT - DSPYPOSITION +DSPLINEFEED) \GCMAPUNSCAN (\ADDBASE \GCSCAN2 \LOLOC .FREELINK.) OUTFILE (OUTPUT OPENFILE) \IRND ( +IMINUS IQUOTIENT IDIFFERENCE LRSH IPLUS) GRAPHOBJ.BUTTONEVENTINFN (IMAGEOBJPROP GRAPHBUTTONEVENTFN +SIZE/GRAPH/WINDOW LIST EDITGRAPH1 COPYGRAPH) OUTFILEP (\GETFILENAME) RECORDECL0 (GETHASH RECORDECL1) +DBG::BACKTRACE-MENU-BUTTONEVENTFN (WINDOWPROP) \FREELISTCELL (FREPLACEFIELD PLUS FFETCHFIELD PAGELOC +IPLUS LLSH \HILOC LRSH \LOLOC) RENAMEFILE (\CONVERT-PATHNAME \RENAMEFILE) IOFILE (OPENFILE) +CIRCSHADE.DISPLAY (\CIRCSHADE.DISPLAY ERROR) HVBAKREAD (READC SKIPSEPRS APPLY READ HARRAY RATOM PUTHASH ARRAY SELECTQ ARRAYSIZE HVRPTREAD PLUS ADD1 GETDESCRIPTORS FASSOC EQUAL GETFIELDSPECS CONS /DECLAREDATATYPE NCREATE REPLACEFIELD VAG AT2VC COPYREADTABLE SETSYNTAX COPYTERMTABLE IPLUS ITIMES -FNTH IDIFFERENCE HVREADERR HVREADCHECKGETFN PEEKC EVAL LIST ZEROP) ECHOCONTROL (\\GETCHARCODE ILEQ -ILESSP IDIFFERENCE ECHOCHAR) |\\LFNormalizeVolumeName| (|\\LFParseFileName|) \\FTP.ADD.QUOTES (STRPOS -CONS SUBSTRING ADD1 NCHARS CONCATLIST DREVERSE) CHAT.SET.EMULATOR (FFETCHFIELD WINDOWPROP CONCAT -SUBSTRING STRPOS ADD.PROCESS CHAT.SETDISPLAYTYPE) CHAT.MENU (WINDOWPROP LOGAND CHAT.RECONNECT TOTOPW -\\CARET.DOWN MENU APPEND MAPCAR STREAMPROP FFETCHFIELD FREPLACEFIELDVAL NCREATE CONS) -CL::ASSIGN-STRUCTURE-REPRESENTATION (CL::PS-LOCAL-SLOTS) COMPILER::ENV-INLINE-ALLOWED ( -COMPILER::ENV-ALLOWED-INLINES COMPILER::ENV-DISALLOWED-INLINES COMPILER::ENV-PARENT -COMPILER::ENV-INLINE-ALLOWED) \\ITEMW.DESELECTITEM (WINDOWPROP) \\NSPRINT.UNSUPPORTED (CL:FORMAT) -\\DSPXPOSITION.PSC (FFETCHFIELD) COMP.MLLFN (ARGTYPE NARGS PRIN2) DRAWPOLYGON (IMAGEOP SPREADAPPLY* -\\OUTSTREAMARG \\GETSTREAM FFETCHFIELD INSURE.BRUSH INSURE.DASHING) XCL::WHERE-IS-FILES (CL:MAPCAN -CL:FUNCTION LIST) *WHO-LINE-ACTIVE-TIMER* (SETUPTIMER) PRINTERS.WHENSELECTEDFN ( -|GetNewPrinterFromUser|) PFI.HANDLE.DEFINEQ (PFI.PRINT.LAMBDA TERPRI) AS.CREATE.PASSWORDS ( -PARSE.NSNAME RESETLST AS.MAKE.CONVERSATION) EMBEDPROG (MAPCAR DREVERSE CAR CONS NCONC LAST LDIFF -SUBPAIR LIST) \\TERMCODETOCLASS (SELECTC) EQP (IEQP FEQP = \\EXTENDED.EQP NTYPX SELECTC FFETCHFIELD -EQDEFP) \\FTP.CLOSEFILE (\\GETACCESS FFETCHFIELD SPREADAPPLY* SELECTC FTPGETMARK MARK# -\\FTP.FLUSH.TO.EOC .FTPDEBUGLOG. \\GETSTREAM BSPINPUTSTREAM FTPPUTMARK FTPGETCODE LISPERROR) -COMPILE-FILE-SCAN-FIRST (NCONC1) |\\PFGetLVPage| (|\\PFGetVols| |\\PFFetchString| LOCF \\ADDBASE) -\\TEDIT.MENU.WHENHELDFN (PROMPTPRINT SELECTQ DEFAULTMENUHELDFN) \\UFS.REGISTER.GFS (UNINTERRUPTABLY -FFETCHFIELD PUTHASH) COPY-CIRCLE (CONS FASSOC) FILLPOLYGON (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG -\\GETSTREAM FFETCHFIELD DSPOPERATION) COMP.MLLVAR (PRIN2 SELECTQ) SEDIT::PARSE-STRING-INTO-WORDS ( -NCHARS NTHCHARCODE CONS SUBSTRING ADD1 SUB1) \\BRUSHBITMAP (FASSOC \\ILLEGAL.ARG BITMAPCREATE ELT FIXP - FIXR APPLY* CONS FRPLACD) IMLTLIST (MAPCAR PLUS TIMES CONS FIX) \\GET.SESSION.HANDLE (CONS -COURIER.READ) GETSCREENPOSITION (WFROMDS WINDOWOP SPREADAPPLY* FFETCHFIELD) MSLISTSET (MSINTERPRETSET) - HVFWDCDREAD (ADD1 CONS READ) FILEGETDEF.VARS (LOADFNS EVAL) RESETREADTABLE (\\GTREADTABLE FFETCHFIELD - COPY HASHARRAY HARRAYSIZE FREPLACEFIELD) \\FLUSHPUPSOCQUEUE (FFETCHFIELD) \\TOTALPROPOSEDSIZE ( -SELECTQ \\TOTALPROPOSEDSIZE IPLUS IMAX CONS) XYPT.LESSP (XYPT.Y ILEQ XYPT.X) \\PUT.SESSION.HANDLE ( -\\DTEST FFETCHFIELD ERROR) GETBOXSCREENPOSITION (WINDOWOP SPREADAPPLY* FFETCHFIELD) MSMEMBSET ( -MSINTERPRETSET) HPERR (PRIN2) FB.SUBITEMP (MEMBER) COMPILER::FUNCTION-P (CL:FIRST CL:CONSP CL:SECOND) -\\GETMISCSOCKET (OPENPUPSOCKET) \\SHAREOFXTRAY (IMAX IQUOTIENT ITIMES) TEDIT.PUT.PIECE.DESCRIPTOR ( -HELP) \\TEDIT.APPLY.STYLES (ASSOC FFETCHFIELD FASSOC SASSOC APPLY* \\TEDIT.PARSE.CHARLOOKS.LIST APPEND - CONS) GENERATOR (EVAL CONS STKNTH RETTO) IN-READTABLE (\\GTREADTABLE) \\UFS.ABORT.DIRECTORY ( -FFETCHFIELD \\UFS.UNREGISTER.GFS) COMP.MLL (POSITION PRIN1 GETPROP IDIFFERENCE IPLUS COMP.MLLVAR LIST -TERPRI) SEDIT::SELECT-SEGMENT-COMMENT (FFETCHFIELD) SI::A-OR-AN (CL:ELT) ANTILOG (FLOAT FABS -FDIFFERENCE FTIMES CONSTANT LOG FIX FQUOTIENT POLYEVAL \\FLOATBOX OPCODES QUOTIENT ELT IPLUS) -|PopUpWindowAndGetList| (RESETLST RESETSAVE TTY.PROCESS THIS.PROCESS DEFAULTFONT WIDTHIFWINDOW IPLUS -STRINGWIDTH ITIMES CHARWIDTH CREATEW CREATEREGION IMIN IDIFFERENCE HEIGHTIFWINDOW TIMES FONTPROP -TTYDISPLAYSTREAM TTYIN) MAKEFILESCOMS (LITATOM FMEMB CONS) PFI.PRINT.LAMBDA (PFI.ESTIMATE.SIZE1 TERPRI -) POSTSCRIPT.BITMAPSCALE (\\PS.SCALEREGION / FASSOC MAX MIN FQUOTIENT TIMES MENU CONS) GETBRK ( -GETSYNTAX) RECLISPLOOKUP (GETPROP CLISPLOOKUP0 ASSOC) \\TEDITMENU.SELSCREENER (WINDOWPROP FFETCHFIELD -CONCAT) \\UFS.ABORT.CL-DIRECTORY (FFETCHFIELD \\UFS.UNREGISTER.GFS) \\FTP.DIRECTORYNAMEP ( -\\FTP.RECOGNIZEFILE) COMPILE-FILE-EXPRESSION (SELECTQ COMPILE-FILE-SCAN-FIRST REMOVE-COMMENTS -XCL::%DEFINER-NAME XCL::%EXPAND-DEFINER COMPILE-FILE-EXPRESSION MAPC CL:MAPCAR CL:FUNCTION CL:PROGV -CL:MAPC FMEMB EVAL EXPANDMACRO GETPROP CL:MACROEXPAND-1 COMPILE.FILE.APPLY WALK-FORM FUNCTION) -\\LEAF.RECONNECT (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FFETCHFIELD -\\OPENLEAFCONNECTION) RECREDECLARE (MAPHASH) COMPILER::ENV-DISALLOW-INLINES (COMPILER::ENV-ALLOWED-INLINES - CL:SET-DIFFERENCE COMPILER::ENV-DISALLOWED-INLINES CL:UNION) |\\UFSMakeUnixFormatName| (MKSTRING -NCHARS ALLOCSTRING CL:CHAR SUB1 PLUS SUBSTRING ADD1) INSPECTW.PROPERTIES (WINDOWPROP APPLY*) -\\DSPYPOSITION.PSC (FFETCHFIELD) CREATE-SHELL-STREAM (FORK-SHELL FREPLACEFIELDVAL NCREATE FUNCTION -UNIX-CHANNEL FFETCHFIELD CONS) GETSEPR (GETSYNTAX) COPYREADTABLE (RESETREADTABLE FREPLACEFIELDVAL -NCREATE \\GTREADTABLE) XCL::WHERE-IS-DEFAULT-DEFINE-TYPES (CL:MAPCAN CL:FUNCTION) \\SPP.SKIPBYTES ( -\\SPP.PREPARE.INPUT SPP.STREAM.ERROR SPREADAPPLY* GETSPPCON FFETCHFIELD IDIFFERENCE PLUS) -COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION (CL:REMOVE COMPILER::COPY-ENV COMPILER::ENV-TARGET-ARCHITECTURE - COMPILER::RAW-COMPILE CL:SYMBOL-FUNCTION) PARSE-FORMAT-OPERATION (FUNCTION CL:VALUES) -|\\UFSParseNameString| (MKSTRING |\\UFSMakeUnixFormatName| \\UFS.ADJUST.HOST UNPACKFILENAME.STRING) -\\FTP.MAKEPLIST (\\INTERNAL/GETPASSWORD CONS LIST) DRAWPOINT (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG -\\GETSTREAM FFETCHFIELD BITMAPP INSURE.BRUSH) CRIT.LESSP (ILESSP FFETCHFIELD) ESCAPE (\\GTREADTABLE -FFETCHFIELD) COMP.MLLIST (RESETLST RESETSAVE RADIX LINELENGTH PRIN2 MAPRINT FUNCTION SPACES PRINT -FASSOC COMP.MLL) DIRECTORY.MATCH1 (\\DTEST FFETCHFIELD NCHARS PLUS NTHCHARCODE \\GETBASEBYTE) LISTHARD - (GETVERBTABLES MSHASHLIST) HPRINTSP (PRIN1) CENTERINWIDTH (PLUS IQUOTIENT DIFFERENCE) GETREADTABLE ( -\\GTREADTABLE) COMPILER::ENV-ALLOW-INLINES (COMPILER::ENV-DISALLOWED-INLINES CL:SET-DIFFERENCE -COMPILER::ENV-ALLOWED-INLINES CL:UNION) RELDRAWTO (\\OUTSTREAMARG \\GETSTREAM IMAGEOP SPREADAPPLY* -FFETCHFIELD IPLUS) RPLNODE (LIST RPLACD) \\MOVETO.PSC (FFETCHFIELD FREPLACEFIELD) FILEGETDEF.FNS ( -GET-ENVIRONMENT-AND-FILEMAP ASSOC OPENP LIST OPENSTREAM FASSOC LOADEFS) \\TEDIT.BRAVOFILE? (GETFILEPTR - \\TEST.PARAGRAPH.LOOKS FULLNAME CONS PACKFILENAME MKATOM TEDIT.GETINPUT FINDFILE) -|\\UFSParse-Directory| (LISTGET NTHCHAR CONCAT NCHARS SELECTQ \\UFS.DEFAULT.DIR FFETCHFIELD) -\\PERIODICALLY-WHO-LINE-SHOW-ACTIVE (SETUPTIMER) \\UFS.PARSE.BODY (CONCAT LISTGET NCHARS) FILLCIRCLE ( -IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) UNSET (FMEMB GETPROPLIST MISSPELLED? -ERROR) \\FTP.GETFILENAME (SELECTQ \\FTP.RECOGNIZEFILE PACKFILENAME SHOULDNT) -SI::DESCRIBE-USING-RECORD-DECL (CL:MAPC CL:FUNCTION INSPECTABLEFIELDNAMES) DRAWARC (IMAGEOP -SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD INSURE.BRUSH INSURE.DASHING) PFI.HANDLE.DEFDEFINER - (CONS ASSOC CL:INTERN CL:FIND-PACKAGE PFI.PRETTYPRINT) BITMAPIMAGESIZE (IMAGEOP SPREADAPPLY* -FFETCHFIELD) PARSE-NSADDRESS (MKSTRING + SUB1 %ARRAY-OFFSET FFETCHFIELD %ARRAY-BASE IPLUS -%ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE TIMES - CONS SMALLP NCREATE - LOGAND CL:ASH) DRAWTO (IMAGEOP SPREADAPPLY* \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) -|\\VFMClearIntervals| (SUB1 PLUS) FB.COMMANDSELECTEDFN (RESETLST WINDOWPROP WFROMMENU FFETCHFIELD -CL:FUNCALL FLASHWINDOW) PRINOPEN (MAKEMAPENTRY DSPXPOSITION DSPYPOSITION \\DEDITFONT# PRIN3) EDITREC ( -EDITDEF) CL::OFFSET-SLOT (CL::PARSE-SLOT) PRINTANDBOX (\\OUTSTREAMARG \\GETSTREAM DSPRIGHTMARGIN -DSPLEFTMARGIN DSPXPOSITION DSPYPOSITION IDIFFERENCE FONTPROP IPLUS IMAX DSPCLIPPINGREGION CONS) -\\GTREADTABLE (SELECTQ \\DTEST \\GTREADTABLE1) FIND-READTABLE (GETHASH) XCL::WHERE-IS-NOTICE-INTERNAL -(HASH-FILE:GET-HASH-FILE CL:ASSOC) SETCORNER (CURSOR) \\FZEROP (\\DTEST FFETCHFIELD) FILEGETDEF.MACROS - (MKPROGN MAPCONC LOADFNS LIST) READMACROS (\\GTREADTABLE FFETCHFIELD) COMPILER::FINISH-COMPILATION ( -COMPILER::WARN-ABOUT-UNKNOWN-FUNCTIONS) PUPSOCKETEVENT (\\DTEST FFETCHFIELD) -\\ALLOCSPACETOGROUPEDWINDOWS (SELECTQ \\ALLOCWIDTHTOGROUPEDWINDOW \\ALLOCHEIGHTTOGROUPEDWINDOW) -TEDIT.PUT.PAGEFRAMES (LOGAND LRSH \\BOUT TEDIT.UNPARSE.PAGEFRAMES) \\TEDIT.MENU.WHENSELECTEDFN (CONS -DEFAULTWHENSELECTEDFN) CHDIR (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION -\\ADD.CONNECTED.DIR U-CASE FILENAMEFIELD DIRECTORYNAME ERROR) CIRCLAR-COPYER (CONS CL:VALUES FASSOC) -SETBRK (GETSYNTAX SETSYNTAX MAPC SELECTQ MEMB) SEPRCASE (ARRAYP ASSOC CASEARRAY + - PLUS NCONC MAPCAR -CHCON1 GETSEPR GETBRK SETCASEARRAY READTABLEPROP CONS) MODERNWINDOW.UNSETUP (CL:PACKAGE-NAME -CL:SYMBOL-PACKAGE CL:INTERN CONCAT) CLISPIF0 (LIST CONS SELECTQ SHOULDNT NCONC1 CLISPIF1 LDIFF -DREVERSE LISTGET1 APPLY CLISPIF3) SEDIT::PARSE--COMMENT-WORD (SEDIT::BUILD-PRELINEARIZED-NODE -FFETCHFIELD) STRINGREGION (DSPXPOSITION IDIFFERENCE DSPYPOSITION FONTPROP STRINGWIDTH CONS) -TEDIT.WINDOW.SETUP (FFETCHFIELD FUNCTION LISTGET) \\FIXLINELENGTH.PSC (MIN FIX QUOTIENT DIFFERENCE -FFETCHFIELD FREPLACEFIELD) BLTHLINE (BLTSHADE IMIN IABS IMINUS IDIFFERENCE) MAKEEPSFILE ( -OPENIMAGESTREAM APPLY* IMAGEOBJPROP LIST CLOSEF) FINDFIELDUSAGE (FINDFIELDUSAGE CONS) DIR (DODIR) -PUPSOCKETNUMBER (FFETCHFIELD) \\FTP.GETFILEINFO (\\FTP.GETFILEINFO.FROM.PROPS FFETCHFIELD -\\FTP.RECOGNIZEFILE LIST \\FTP.FROM.LISP.ATTRIBUTE) \\TEDIT.PUT.SINGLE.CHARLOOKS (GETFILEPTR -FFETCHFIELD LOGAND LRSH \\BOUT FONTCLASSUNPARSE FONTPROP LOGOR IDIFFERENCE) SETSEPR (GETSYNTAX -SETSYNTAX MAPC SELECTQ) ATTACHEDWINDOWREGION (WINDOWPROP ATTACHEDWINDOWS UNIONREGIONS WINDOWREGION) -COMPILER::ENV-DECL-P (CL:MEMBER COMPILER::ENV-DECL-SPECIFIERS COMPILER::ENV-PARENT COMPILER::ENV-DECL-P -) |\\UFSGetPrintFileType| (UNPACKFILENAME.STRING MKATOM U-CASE NCHARS CL:ASSOC -|\\UFSGetFileTypeConfirm|) \\DSPFONT.PSC (FFETCHFIELD \\COERCEFONTDESC FONTCOPY IMINUS FIXR TIMES -\\FGETWIDTH \\GETBASE FREPLACEFIELD LISTGET) PRINSHUT (DSPXPOSITION DSPYPOSITION FFETCHFIELD) -SCALEDBITBLT (IMAGEOP SPREADAPPLY* FFETCHFIELD) SEDIT::LINEARIZE-COMMENT (FFETCHFIELD LISTGET NTH -IPLUS) \\UPDATE-WHO-LINE-ACTIVE-FLAG (WINDOWPROP BLTSHADE DIFFERENCE) |\\PFGetMarkerPage| (FIXP -|\\PFVolumeNumber| |\\PFGetPage| ELT IPLUS |LvBasePageAddr| FFETCHFIELD FMESAELT \\ADDBASE LOCF ILEQ -ITIMES IDIFFERENCE |MarkerPageAddr|) MSGETBLOCKDEC (FILECOMSLST MSMEMBSET CONS UNION EVAL SELECTQ) -RPTPUT (FRPTQ PRIN1 HPRINTSP CONSTANT CHARACTER SPACES) \\TEDIT.PUT.PARALOOKS (FFETCHFIELD LOGAND LRSH - \\BOUT GETHASH) |\\UFSGetFileTypeConfirm| (BOUNDP MENU RETTO) TRYNEXT1 (NCONC RESUME) -\\LEAF.GETFILEINFO (\\LEAF.GETFILEINFO.OPEN FFETCHFIELD \\IFS.LOOKUPFILE \\LEAF.GETFILE) -|\\DFSFreeDiskPages| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION |\\LFEntryPoint| -|\\PFFreeDiskPages|) CL::NAME-SLOT (CL::PARSE-SLOT) CHAT (SORT CONS APPEND FREPLACEFIELDVAL NCREATE -MENU CHAT.PROMPT.FOR.INPUT GETPROMPTWINDOW PROMPTFORWORD ADD.PROCESS PROCESS.RESULT FUNCTION) -LISP-TO-UNIX-TERMTYPE (ASSOC CL:STRING-DOWNCASE) PRETTYDEFMACROS (MAPCAR FILEPKGCOM) SETFONT (DSPFONT -CHARWIDTH) TERM.RESET.DISPLAY.PARMS (\\DTEST FFETCHFIELD DEFAULTFONT DSPFONT FONTPROP CHARWIDTH -FREPLACEFIELD + ITIMES IQUOTIENT WINDOWPROP - CL:FUNCALL) HASHLINK (DECLARERECORD CONS) LOG (FLOATP -FLOAT FFETCHFIELD FTIMES ADD1 \\FLOAT.BOX IDIFFERENCE FDIFFERENCE POLYEVAL \\FLOATBOX OPCODES FPLUS) -CENTERINHEIGHT (PLUS IQUOTIENT DIFFERENCE) TEDIT.REMOVE.MENUITEM (FFETCHFIELD REMOVE UPDATE/MENU/IMAGE -) COMPILER::ENV-ADD-DECLS (COMPILER::ENV-DECL-SPECIFIERS CL:APPEND) \\DRAWCIRCLE.GENERIC (FIXR FTIMES -CONSTANT FQUOTIENT SQRT LIST CREATEPOSITION IPLUS IDIFFERENCE) \\DSPLEFTMARGIN.PSC (FFETCHFIELD) -\\SPP.PREPARE.OUTPUT (\\FILLINSPP LOCF \\ADDBASE IDIFFERENCE) PRIN1S (DSPXPOSITION DSPYPOSITION -\\DEDITFONT# PRIN3) CREATEPOSITION (CONS) COURIER.EXECUTE.EXPEDITED.CALL (RESETLST OPENNSOCKET LIST -CREATE.PACKET.EXCHANGE.XIP \\BUILD.EXPEDITED.XIP \\SEND.EXPEDITED.XIP COURIER.OPEN FUNCTION -COURIER.EXECUTE.CALL) SEDIT::PARSE--COMMENT (LISTGET) SI::INSPECT-MACRO-USABLE-BY-DESCRIBE? (CL:CONSP -CL:REST) WHO-LINE-SHOW-ACTIVE (SETUPTIMER) PRINDOTP (- WIDTH STRINGWIDTH DSPXPOSITION PRIN2S -MAKEDOTPTAIL CONS) BLTVLINE (BLTSHADE IMIN IABS IMINUS IDIFFERENCE) ENCAPSULATEDOBJ.IMAGEBOXFN ( -FONTCREATE IMAGEOBJPROP ITIMES FONTPROP IMAX STRINGWIDTH CONCAT IPLUS CONS) AS.REPLACE.PASSWORDS ( -PARSE.NSNAME RESETLST AS.MAKE.CONVERSATION) POSTSCRIPTFILEP (CL:MEMBER UNPACKFILENAME.STRING FUNCTION -BIN) FILEGETDEF.PROPS (LOADFNS NCONC LIST CONS) PUPSOCKETFROMNUMBER (\\HINUM LOGAND \\PUPSOCKET.FROM# -FFETCHFIELD) \\FTP.DELETEFILE (RESETLST \\FTP.UNPACKFILENAME FULLNAME \\GETDEVICEFROMNAME FDEVOP -SPREADAPPLY* FFETCHFIELD GETHOSTINFO CONS LIST \\GETFTPCONNECTION MARK# FTPPUTMARK FTPGETMARK -\\FTPERROR READPLIST \\FTP.PACKFILENAME ASSOC REVERSE) \\TEDIT.PUT.PARALOOKS.LIST (HASHARRAY LOGAND -LRSH \\BOUT FLENGTH PLUS) \\READTABLEP.DEFPRINT (FFETCHFIELD IPLUS CONSTANT NCHARS FRESHLINE MKSTRING) - |\\PFFreeDiskPages| (FFETCHFIELD) CL::DUMMY-SLOT (CL::PARSE-SLOT) |\\UFSPrintTypeMenu| ( -FREPLACEFIELDVAL NCREATE CONS) PRIN2STRING (PRIN2-LONG-STRING IDIFFERENCE WIDTH STRINGWIDTH -DSPXPOSITION IMIN PRIN2S) FILEGETDEF.RECORDS (LOADFNS CONS) XCL::WHERE-IS-NOTICE ( -XCL::WHERE-IS-DEFAULT-DEFINE-TYPES COPYFILE HASH-FILE:MAKE-HASH-FILE HASH-FILE:OPEN-HASH-FILE -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION PATHNAME HASH-FILE::HASH-FILE-STREAM) -CHAT.DID.RESHAPE (CHAT.SCREENPARAMS TERM.RESET.DISPLAY.PARMS FFETCHFIELD) COMPILER::RAW-COMPILE ( -COMPILER::COMPILE-ONE-LAMBDA) \\GET.FILING.ATTRIBUTE (COURIER.READ CONS \\WIN IPLUS LLSH \\BIN LIST -COURIER.READ.SEQUENCE) |\\PFPutLogicalVolumePage| (|\\PFPutPage| ELT FIXP |\\PFVolumeNumber|) -\\CH.FIND.ORG.SERVER (ERROR MAPCAR APPEND CONS SORT.NSADDRESSES.BY.DISTANCE NCONC1 -\\CH.FIND.ORG.SERVER GETCLEARINGHOUSE FREPLACEFIELDVAL NCREATE) PFI.HANDLE.EVAL-WHEN (+ -PFI.ESTIMATE.SIZE TERPRI) COMP.MAP (LIST CONS NARGS SELECTQ COMP.BIND.VARS OPT.DREV APPEND ADD1 -COMP.UNBIND.VARS) MSINTERPA (CONS) RPTEND (HPRINTENDSTR PRIN1 CONSTANT CHARACTER) FIXFIELDORDER ( -REVERSE ASSOC CONS LIST RECORDBIND FRPLACA) SUPERPRINT/WRAPPER (+ DSPXPOSITION WIDTH STRINGWIDTH -DSPYPOSITION \\DEDITFONT# SUPERPRINT) DEFPRINT (\\TYPENAMEFROMNUMBER FASSOC DREMOVE CONS) -POSSIBILITYFN (LIST CONS STKNTH ADIEU) SI::DESCRIBE-USING-INSPECT-MACRO (CL:THIRD CL:SECOND CL:MAPCAR -CL:FUNCTION CL:FUNCALL) \\CH.LOCATE.SERVERS (COURIER.OPEN RESETSAVE LIST FUNCTION CH.RETRIEVE.MEMBERS -CH.PROPERTY SORT.NSADDRESSES.BY.DISTANCE COURIER.CALL CH.GETAUTHENTICATOR COURIER.READ.REP FFETCHFIELD - CH.DOMAINS.SERVED) \\SETWINFOYSIZE (\\LIMITBYMIN \\LIMITBYMAX FRPLACD) MSINTERPRETSET (LIST NCONC -GETVERBTABLES CONS FRPLACD MSINTERPRETSET SELECTQ LISTHARD SHOULDNT APPLY* MAPTABLE FUNCTION MAPC -UNION GETTABLE MSHASHLIST SOME TESTRELQ TESTTABLE FASSOC FRPLACA MAPCONC ONFILE TERPRI FMEMB SUBSET -MKLIST CL:EVAL MSGETBLOCKDEC MSLISTSET RECORDFIELDNAMES CHECKPATHS MSONPATH) COMPILER::START-COMPILATION - (CL:FLET FASL:BEGIN-TEXT READ-FILECREATED LIST OUTPUT CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. -FUNCTION CL:NAMESTRING COMPILER::DATE-STRING CL:FILE-WRITE-DATE CL:GET-UNIVERSAL-TIME TERPRI) INSIDE? -(ILESSP IPLUS WITHIN) CLEANPOSLST (MAPC RELSTK) SYNONYM (DECLARERECORD CONS) \\LEAF.READPAGES (PLUS -FFETCHFIELD \\LEAF.REQUESTPAGE ADD1 LISPERROR LOCF \\ADDBASE - FOLDLO LRSH FOLDHI IPLUS LOGAND) -RECORDINIT (APPLY /SET) CL::INSERT-INCLUDED-SLOT (CL:FLET CL:MEMBER CL:FUNCTION CL::PSLOT-NAME -CL::PS-INCLUDE RPLACA) \\INTERNAL/GETPASSWORD (MKATOM GETHASH U-CASE ASSOC \\INTERNAL/SETPASSWORD) -\\FTP.DIRECTORYNAMEONLY (STRPOS SUBSTRING -) COMP.SELECTQ (CONS ADD1 COMP.PROGN COMP.EXPR APPEND -COMP.STJUMP COMP.VALN SELECTQ) \\SETMACROSYNTAX (FFETCHFIELD SELECTQ GETHASH HASHARRAY CONS -\\SETSYNCODE \\PUTBASEBYTE \\SETFATSYNCODE LOGOR) PRIN2S (DSPXPOSITION DSPYPOSITION \\DEDITFONT# PRIN4 -) XCL::SAME-WHERE-IS-DATABASE (CL:FLET XCL::COERCE-TO-PATHAME CL:PATHNAME-HOST CL:PATHNAME-DEVICE -CL:PATHNAME-DIRECTORY CL:PATHNAME-NAME CL:EQUALP CL:PATHNAME-TYPE) TEXTSTREAM (FFETCHFIELD WINDOWPROP -PROCESS.WINDOW) PRIN2-LONG-STRING (FFETCHFIELD DSPXPOSITION DSPFONT IMAGESTREAMP CHARWIDTH STRINGWIDTH - + TIMES CONCAT ALLOCSTRING SUB1 %ARRAY-OFFSET %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT -\\GETBASE \\GETBASETHIN \\GETBASEBYTE PLUS PRIN2S PRIN1 DSPYPOSITION NTHCHARCODE \\SYNCODE GETHASH -MAKEMAPENTRY \\DEDITFONT# - DSPRIGHTMARGIN) \\FILINGHANDLE.DEFPRINT (\\DEFPRINT.BY.NAME FFETCHFIELD) -SCAN.LESSP (ILESSP FFETCHFIELD) MOVEBOX (.WHILE.CURSOR.DOWN. \\GETBASE) FILEGETDEF.LISPXMACROS ( -MKPROGN LOADFNS ASSOC LIST) MAKEDOTPTAIL (PUTHASH FFETCHFIELD RPLNODE GETHASH CONS) CANONICAL.HOSTNAME - (CL:ASSOC FFETCHFIELD \\CANONICAL.NSHOSTNAME IPHOSTNAME MKATOM FASSOC \\CANONICALIZE.IP.HOSTNAME -\\CANONICALIZE.PUP.HOSTNAME) \\FTPEVENTFN (\\BSPEVENTFN) \\TEDIT.PUT.CHARLOOKS.LIST (HASHARRAY LOGAND -LRSH \\BOUT FLENGTH PLUS) READBQUOTECOMMA (LIST SELCHARQ SKIPSEPRCODES CL:READ PEEKCCODE PACK* READ) -REMOVEWINDOW (FREEATTACHEDWINDOW) COMPILER::ENV-BIND-VARIABLE (CONS COMPILER::ENV-VENV) COS ( -\\SIN-FLOAT FTIMES) \\DSPRIGHTMARGIN.PSC (FFETCHFIELD) CHECKDEFS (RECORD.PRIORITY FNTH RECORDECL CONS -MAPCONC LIST RETDWIM2) DMATCH (SELECTQ DMATCH DIRECTORY.MATCH) SIN (\\SIN-FLOAT FTIMES) -COURIER.EXPEDITED.CALL (ARG \\GET.COURIERPROGRAM GETHASH ERROR \\GET.COURIER.DEFINITION LENGTH CONS -SELECTQ IDIFFERENCE IPLUS LIST PLUS COURIER.EXECUTE.EXPEDITED.CALL) SEDIT::SPLIT-COMMENT (SEDIT::CLOSE-NODE - FFETCHFIELD NCHARS SUBSTRING ADD1) OPENPUPSOCKET (FIXP \\PUPSOCKET.FROM# FFETCHFIELD \\HINUM \\LONUM -LOGOR DAYTIME FREPLACEFIELDVAL NCREATE CREATE.EVENT CONS ADD1 LOGAND) TB.USERDATA (\\DTEST FFETCHFIELD -) |\\PFCurrentVol| (|\\PFGetVols| FMESAELT \\ADDBASE LOCF IPLUS ILEQ ITIMES IDIFFERENCE FFETCHFIELD) -SPP.CLEARATTENTION (GETSPPCON FFETCHFIELD SELECTQ \\ILLEGAL.ARG FREPLACEFIELD ERROR) READATOM (ALLOCAL -) \\INTERNAL/SETPASSWORD (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION NLSETQ -GETHASH PUTHASH CONS \\LOGIN.READ ASSOC RPLACD \\ENCRYPT.PWD CONCAT SYSTEMTYPE GETOSTYPE EMPASSWORDLOC - FFETCHFIELD EMPOINTER \\VAG2 \\ADJUST.USERNAME USERNAME \\DECRYPT.PWD ALPHORDER NCHARS -|GetBcplString| SELECTQ L-CASE U-CASE \\GETBASE APPLY*) SEDIT::PRINT-STRING (FFETCHFIELD SEDIT::ESCAPE-CHAR - SUB1 %ARRAY-OFFSET %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER \\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG -\\GETSTREAM ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE) RPTPRINT (ADD1) -CHAT.TYPEOUT.CLOSE (TERPRI WINDOWPROP DEL.PROCESS) MAKE-READER-ENVIRONMENT (\\DTEST \\CHECKRADIX -\\INVALID.RADIX FREPLACEFIELDVAL NCREATE) SI::GET-INSPECT-MACRO (DECLARE) \\DRAWELLIPSE.GENERIC (SIN -COS CONSTANT FQUOTIENT SQRT FTIMES CL:* - + LIST CREATEPOSITION) PFI.HANDLE.RPAQQ (ASSOC CONS APPEND -INFILECOMS? FRPLACD PFI.PRETTYPRINT) COMPILER::TEST-GENCODE (CL:PPRINT COMPILER::TEST-GENCODE1 -CL:FRESH-LINE CL:VALUES) MASTERSCOPEXEC (EVALV ARGTYPE CONS MSINTERPRET) -\\RESHAPEATTACHEDWINDOWSAROUNDMAINW (WINDOWPROP IPLUS WINDOWREGION SELECTQ CREATEREGION ADD1 MAX -DIFFERENCE PLUS CENTERINWIDTH SHOULDNT CENTERINHEIGHT MIN) HPRINTEND (GETFILEPTR OUTPUT SUB1 ABS -CONSTANT CHARACTER DREVERSE HPRINTENDSTR PRIN3 PLUS) JOINDEF (CONS NCONC APPEND) NOTE (NCONC LIST) -\\SETWINFOXSIZE (\\LIMITBYMIN \\LIMITBYMAX FRPLACA) \\LEAF.OPENFILE (FFETCHFIELD LISPERROR LIST FIXP -\\ILLEGAL.ARG IDATE \\LEAF.GETFILE \\LEAF.CREATIONDATE \\FTP.OPENFILE SELECTQ CONS) \\TEDIT.CHARDELETE - (TEXTOBJ FFETCHFIELD %ARRAY-OFFSET SUB1 ADD1 LIST \\CHTOPC \\TEDIT.APPLY.STYLES PLUS IMINUS -FREPLACEFIELD) \\TEDIT.CREATEMENU (FONTCREATE FREPLACEFIELDVAL NCREATE CONS) COMPILER::PRINT-ENV ( -DECLARE CL:FORMAT \\HILOC \\LOLOC) READTABLEPROP (\\ILLEGAL.ARG ARG \\GTREADTABLE SELECTQ FFETCHFIELD) - \\DSPLINEFEED.PSC (FFETCHFIELD) SET-READER-ENVIRONMENT (\\DTEST FFETCHFIELD) \\ATBLSET (HARRAYP -HASHARRAY FUNCTION \\ORIGREADTABLE COPYREADTABLE FREPLACEFIELDVAL NCREATE PLUS \\ORIGTERMTABLE -COPYTERMTABLE FFETCHFIELD) SEDIT::INSERT-COMMENT-CHARS (NCHARS FFETCHFIELD CHCON1 NTHCHARCODE ADD1 -MKSTRING CONCAT SUBSTRING SEDIT::ADJUST-WIDTH IPLUS SEDIT::STRINGWIDTH NTH SEDIT::CREATE-SIMPLE-NODE -IDIFFERENCE CONS SEDIT::CREATE-COMMENT-WORD-NODES) *WHO-LINE-OLD-TIME* (DATE) TEDIT.CURSOROUTFN ( -WINDOWPROP) DRAWGRAYBOX (.WHILE.CURSOR.DOWN. \\GETBASE) \\TEDIT.COMMAND.RESET.SETUP (PROCESSPROP -THIS.PROCESS TEXTPROP CREATEW TTYDISPLAYSTREAM FUNCTION TXTFILE LIST) FILEGETDEF.ALISTS (LOADFNS ASSOC - LIST CONS) COMP.PREDP (FMEMB) MBUTTON.SET.NEXT.FIELD (FFETCHFIELD ZEROP MKSTRING) CLOSEPUPSOCKET ( -\\DTEST DREMOVE ERROR) \\FTP.REGISTER (\\ADD-OPEN-STREAM \\GETDEVICEFROMNAME FFETCHFIELD) -\\TEDIT-OPEN-FONT-FILE (OPENSTREAM) SETPASSWORD (\\INTERNAL/SETPASSWORD CANONICAL.HOSTNAME CONS MKATOM - MKSTRING) \\BREAKAPARTATWSTRUCTURE (MAPCONC APPEND CONS) \\NSRANDOM.RELEASE.IF.ERROR ( -\\NSRANDOM.RELEASE.LOCK) \\ADJUST.USERNAME (NCHARS PACK* STRPOS SUBSTRING SUB1 L-CASE CONCAT) LOGIN ( -\\INTERNAL/GETPASSWORD SELECTQ CANONICAL.HOSTNAME ERROR) SEDIT::SCAN-FOR-BOUNDS (FFETCHFIELD IPLUS -IMAX FONTPROP IDIFFERENCE BITMAPHEIGHT IMINUS BITMAPWIDTH) TB.CLEAR.LINE (BLTSHADE \\DTEST FFETCHFIELD - TB.BOTTOM.OF.ITEM) SETTEMPLATE (COPY TEMPLATE SELECTQ ERROR CONS LIST) \\UNIMPIMAGEOP (ERROR CONCAT) -\\DRAWPOINT.GENERIC (DRAWLINE) \\ENCRYPT.PWD (LOGXOR NTHCHARCODE PLUS) SEDIT::INSERT-COMMENT (SUB1 -FFETCHFIELD ADD1 SEDIT::SPLIT-COMMENT) \\TEDIT.FIND.OVERLAPPING.LINE (FFETCHFIELD) -REPOSITIONATTACHEDWINDOWS (MAPC ATTACHEDWINDOWS OPENWP \\OPENW1) GETOSTYPE (GETHOSTINFO) STRING-EQUAL -(%PARSE-STRING-ARGS WITH-TWO-UNPACKED-STRINGS %STRING-BASE-COMPARE-EQUAL CL::SIMPLE-STRING-EQUAL) -FONTCREATE (FONTCLASS FONTCREATE DEFAULTFONT \\COERCEFONTDESC DSPFONT FONTPROP LITATOM IGREATERP IGEQ -\\GETSTREAM FFETCHFIELD MKATOM U-CASE \\ILLEGAL.ARG \\FONTFACE \\LOOKUPFONT ASSOC \\FONTSYMBOL APPLY* -FUNCTION \\AVGCHARWIDTH SETFONTDESCRIPTOR LIST) INSIDEP (INSIDEP DSPCLIPPINGREGION INSIDE? -\\ILLEGAL.ARG) CL::RESOLVE-SLOTS (CL:MAPCAR CL:FUNCTION CL::PS-INCLUDED-SLOTS CL::PS-INCLUDE -CL::PS-ALL-SLOTS NCONC CL::MERGE-SLOTS CL::PS-NAME CL::PS-LOCAL-SLOTS CL::PS-CONC-NAME -CL::PS-ALL-SLOT-NAMES) EXEC-READ-LINE (PEEKCCODE LIST EXEC-READ NCONC1 CHCON1 LASTC FIX-FORM) -FORK-SHELL (FORK-UNIX) POSITION (\\GETSTREAM FFETCHFIELD) XCL::DEL-WHERE-IS-DATABASE (CL:FIND-IF -CL:FUNCTION) SPP.FLUSH.TO.EOF (FFETCHFIELD SELECTC SELECTQ \\ILLEGAL.ARG BIN) SETREADTABLE ( -\\GTREADTABLE) SI::DESCRIBE-USING-DESCRIBERS (CL:MAPC CL:FUNCTION) GREET (ERSETQ USERNAME MKATOM EVAL -GREETFILENAME PRINTOUT TERPRI) GREET0 (DATE NTHCHAR LRSH STRINGP SASSOC U-CASE SUBSTRING SUBATOM -LISPXTERPRI) ALLPATHS (RECORD.FIELDNAMES RECORDECL NCONC ACCESSDEF4 APPEND ALLPATHS RECLOOK1 -RECORD.NAME RECORD.SUBDECS RECORD.TYPECHECK CONS MAPCONC RECORD.FIELDINFO TOPPATHS JOINDEF) GENERATEFN - (CONS STKNTH RETTO) \\TRACKWITHBOX (CONSTANT LOGOR MOUSESTATE-NAME LOGAND IPLUS ERSETQ CURSOR ZEROP -IQUOTIENT IMINUS) \\LEAF.WRITEPAGES (IDATE ALLOCATE.PUP LOCF \\ADDBASE LLSH FFETCHFIELD IPLUS UNFOLD -FOLDLO LRSH FOLDHI PLUS) PRINT-DOCUMENTATION (CL:DOCUMENTATION TRUE CL:FORMAT) \\FTP.UNREGISTER ( -\\GENERIC-UNREGISTER-STREAM \\DEVICE-OPEN-STREAMS SPREADAPPLY* FFETCHFIELD \\GETDEVICEFROMNAME) -\\DECRYPT.PWD (\\ENCRYPT.PWD CONCAT) COMPILER::PRINT-CONTEXT (DECLARE COMPILER:CONTEXT-TOP-LEVEL-P -COMPILER:CONTEXT-VALUES-USED COMPILER:CONTEXT-PREDICATE-P COMPILER::CONTEXT-APPLIED-CONTEXT CL:MACROLET - COMPILER::OUTPUT CL:FORMAT) \\DRAWLINE.PSC (FFETCHFIELD FLOATP POSTSCRIPT.PUTCOMMAND TIMES -FREPLACEFIELD) DCODERD (GETSTREAM READ IPLUS LLSH \\BIN PLUS CEIL LOGAND ADD1 UNFOLD CONSTANT SUB1 -LOGXOR FOLDLO LRSH FLENGTH IQUOTIENT \\CODEARRAY FOLDHI BYTESPERNAMEENTRY WORDSPERNAMEENTRY SELECTQ -SHOULDNT \\BYTESETA CODESETA IMOD UNSIGNED LOGOR CODELT \\BYTELT EVQ \\STKMIN \\FIXCODESYM -\\FIXCODEPTR DEFC) \\SHIFT.DOCUMENT (\\EDITELT GETBASEPTR \\GETBASEPTR \\ADDBASE2 \\ADDBASE -FFETCHFIELD ADD1 IPLUS NCREATE FREPLACEFIELD CONS MAPCAR SELECTQ TYPENAME NILL -\\TEDIT.UNIQUIFY.PARALOOKS) *WHO-LINE-TIMER* (SETUPTIMER DIFFERENCE REMAINDER IDATE) -|\\PFGetLogicalVolumePage| (|\\PFGetPage| ELT FIXP |\\PFVolumeNumber|) \\LOGIN.READ (CONCAT CONSTANT -CHARACTER RESETLST PROVIDE.PROMPTING.WINDOW FRESHLINE RESETBUFS CONS PROMPTFORWORD MKATOM) BKBUFS ( -SYSBUF) MASTERSCOPE1 (TERPRI CL:FIND-PACKAGE SELECTQ LISPXREAD LISPX RETFROM FUNCTION) HPRINT1 ( -TYPENAME PRIN2 GETHASH CONSTANT SUB1 GETFILEPTR OUTPUT FCHARACTER IQUOTIENT CONS LIST FRPLACD IMINUS -ADD1 HPRINT1 PRIN1 FASSOC PROG2 CHARACTER APPLY* SELECTQ ARRAYSIZE ARRAYORIG ARRAYTYP RPTPRINT ELT -PLUS ELTD HARRAYSIZE HARRAYPROP SYSTEMTYPE GCTRP MINFS IMAX RECLAIM FLENGTH GETSYNTAX RPTEND GETRAISE -GETDELETECONTROL ECHOCHAR DELETECONTROL HPRINSP HPRINTENDSTR LOC GETFIELDSPECS GETDESCRIPTORS -FETCHFIELD HPERR) SEDIT::PARENTHESIZE-CURRENT-SELECTION (FFETCHFIELD FREPLACEFIELD CONS NTH LIST PLUS -SEDIT::CREATE-NULL-LIST SEDIT::COLLECT-UNDO-BLOCK SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW) DCODESKIP ( -GETSTREAM GETFILEPTR IPLUS LLSH \\BIN) CLBUFS (LINBUF SYSBUF CONS) PRIN4 (\\GETSTREAM \\GTREADTABLE -FFETCHFIELD \\OUTTERMP) CHAT.TTYENTRYFN (PROCESSPROP WINDOWPROP) PROMPTFORWORD (COPYTERMTABLE PLUS -RESETLST RESETSAVE SETTERMTABLE DREVERSE CHCON TTY.PROCESSP TTY.PROCESS THIS.PROCESS CURSOR FIXP -SELECTQ TTYDISPLAYSTREAM GETSTREAM DISPLAYSTREAMP NCHARS NTHCHARCODE LIST MAPCAR CHCON1 \\INSTREAMARG -\\GETSTREAM SETUPTIMER DSPXPOSITION DSPYPOSITION CONS \\PROMPTFORWORDBIN GETSYNTAX SYNTAXP CHARACTER -STRINGP APPLY* CONSTANT PRIN3 CONCAT CONCATCODES) COMP.NUMBERTEST (SUBPAIR LIST SELECTQ COMP.EXPR CONS - ADD1 COMP.STTAG) RECREDECLARE2 (SELECTQ GETP FMEMB RECREDECLARE2) COMPILER::LOCAL-CONSTANT-P ( -CL:GETHASH) \\IMAGEIOINIT (FUNCTION FREPLACEFIELDVAL NCREATE) \\DRAWCURVE.PSC (FFETCHFIELD TERPRI -TIMES PARAMETRICSPLINE SELECTQ ELT FQUOTIENT FPLUS FDIFFERENCE PLUS) \\ALLOC.CODE.BLOCK (\\ALLOCBLOCK -FOLDHI LRSH IPLUS) \\TFBRAVO.ADD.NAMEDTAB (IMAGEOBJCREATE LISTGET FFETCHFIELD SUB1 ADD1) SPPSTREAMP ( -GETSPPCON FFETCHFIELD TYPENAMEP) WHO-LINE-SET-TIME (WHO-LINE-COPY-INSERT FREPLACEFIELDVAL NCREATE CONS - SETTIME) SI::DESCRIBE-INTERNAL (CL:TYPE-OF SI::A-OR-AN SI::GET-DESCRIBERS SI::DESCRIBE-USING-DESCRIBERS - CL:1+ SI::GET-INSPECT-MACRO SI::DESCRIBE-USING-INSPECT-MACRO SI::GET-SUPER-DESCRIBERS FINDRECDECL -FINDSYSRECDECL SI::DESCRIBE-USING-RECORD-DECL CL:PRIN1) PFI.ESTIMATE.SIZE (+ GET PFI.ESTIMATE.SIZE1) -COMPILER::GENCODE-UNWIND-PROTECT (COMPILER::GENCODE COMPILER::UNWIND-PROTECT-CLEANUP COMPILER::COLLECT-CODE - COMPILER::UNWIND-PROTECT-STMT) POSTSCRIPT.TEXT (TEXTTOIMAGEFILE) RECLOOK1 (SUBSET RECORD.NAME -RECORDECL) \\MEDW.YOFFSET (\\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD -\\INVALIDATEDISPLAYCACHE FREPLACEFIELD \\ILLEGAL.ARG) \\FTPINIT (NCREATE FUNCTION) \\LEAF.TRUNCATEFILE - (ALLOCATE.PUP LOCF \\ADDBASE LLSH FFETCHFIELD IPLUS UNFOLD) VOLUMESIZE (|\\LFEntryPoint| FFETCHFIELD) - RELMOVETO (IPLUS DSPXPOSITION \\OUTSTREAMARG \\GETSTREAM DSPYPOSITION) DO-EVENT (FUNCTION COPY-CIRCLE - STRING GETHASH CLOCK EXEC-PRINT) CHAT.CHOOSE.EMULATOR (CONS CL:ASSOC FASSOC) -MODERNWINDOW.BUTTONEVENTFN.ANYWHERE (MODERNWINDOW.BUTTONEVENTFN) RINGBELLS (FIXP SELECTC LIST PLUS -FLASHWINDOW) SPP.SENDATTENTION (GETSPPCON FFETCHFIELD \\FILLINSPP LOGOR LOCF \\ADDBASE PLUS \\SENDSPP) - SEDIT::DEGRADE-COMMENT (FFETCHFIELD NTH FREPLACEFIELD PLUS SEDIT::UNDO-BY CONS LIST) -FAKE-COMPILE-FILE (RESETSAVE LIST RESETUNDO FUNCTION OPENSTREAM \\PARSE-FILE-HEADER FULLNAME -PACKFILENAME.STRING ROOTFILENAME CLOSEF REVERSE EVAL) MMLTLIST (MAPCAR XYPT.X XYPT.Y PLUS TIMES CONS) -\\FILINGSESSION.DEFPRINT (FFETCHFIELD \\DEFPRINT.BY.NAME) WINDOWPROP (PUTWINDOWPROP ARG GETWINDOWPROP -\\ILLEGAL.ARG) COMP.VAL (COMP.EXPR ADD1 OPT.JUMPCHECK) STRINGWIDTH (\\STRINGWIDTH.GENERIC -\\GTREADTABLE \\FGETCHARWIDTH \\FGETWIDTH \\GETBASE \\GETCHARSETINFO \\GETBASEPTR FFETCHFIELD UNFOLD -LLSH \\CHARSET LRSH \\CREATECHARSET \\CHAR8CODE LOGAND \\OUTSTREAMARG \\GETSTREAM IMAGEOP SPREADAPPLY* - FONTCREATE) \\NSFILING.CLOSE.HANDLE (FILING.CALL FFETCHFIELD) FINDCALLERS (EDITCALLERS NCONC DREVERSE - LIST CONS) RPLNODE2 (ERRORX LIST RPLNODE) |\\PFTransferPage| (\\PUTBASE \\GETBASE \\DL.OBTAINNEWDOB -FUNCTION FFETCHFIELD \\DL.RELEASEDOB) DWIMIFY2? (DWMFY2) EQUAL-READER-ENVIRONMENT (FFETCHFIELD) -GETBOXREGION (GETBOXSCREENREGION) FLONUM-TO-STRING (CL:VALUES MAX MIN + DIGITSBDP CL:1- FLTSTR -CL:MACROLET CL:LENGTH CL:CHAR CL:FILL-POINTER CL:1+ =) GETFILEDEF (FILENAMEFIELD) |\\VAMGetVAMPageFor| - (IPLUS FFETCHFIELD |\\PFGetAllocationMapPage|) \\TEDIT.OBJECT.SHOWSEL (FFETCHFIELD DSPXOFFSET -DSPYOFFSET IMAGEOBJPROP WINDOWPROP CREATEREGION APPLY* - RESETLST RESETSAVE IDIFFERENCE IPLUS LIST -FUNCTION DSPCLIPPINGREGION IMIN CONS ERSETQ) FREEATTACHEDWINDOW (MAINWINDOW COPY ATTACHEDWINDOWS -WINDOWPROP SELECTQ IMINUS CONS) FONTCLASS (FIXP FONTCREATE MAPCAR LIST CONS FREPLACEFIELDVAL NCREATE) -DEFC (CONCAT) MAKE-COMPILED-CLOSURE (FREPLACEFIELDVAL NCREATE) SUPERPRINT/COMMENT (+ DSPXPOSITION -STRINGWIDTH DSPRIGHTMARGIN DSPLEFTMARGIN PRIN1S SEMI-COLON-COMMENT-P <= LENGTH SUPERPRINT/COMMENT1 MIN - MAX - FIXR TIMES IQUOTIENT DSPLINEFEED SETFONT) GETCHATWINDOW (CONCAT L-CASE WINDOWPROP -DECODE.WINDOW.ARG CONS) \\NOIMAGE.DSPFONT (FFETCHFIELD SMALLP CONSTANT CHCON1) COMP.STFIX ( -COMP.STCONST APPLY* OPT.CALLP COMP.STFN) EXTENDREGIONTOP (IPLUS IDIFFERENCE FRPLACA) -SI::DESCRIBE-NEW-LINE (CL:FRESH-LINE) PFI.ESTIMATE.SIZE1 (SOME LISTP PLUS LENGTH PFI.ESTIMATE.SIZE1) -COMPILER::GENCODE-VAR-REF (COMPILER::VAR-REF-VARIABLE) TEDIT.FORMAT.HARDCOPY (RESETLST TEXTOBJ -TEXTSTREAM NUMBERP LIST CONS FFETCHFIELD TEDIT.COMPOUND.PAGEFORMAT FRPLACA LISTGET TEXTPROP APPLY* -PRINTER.SCRATCH.FILE RESETSAVE TEDIT.PROMPTPRINT OPENIMAGESTREAM PRINTERPROP PRINTERTYPE FONTCREATE -STREAMPROP DSPRIGHTMARGIN SUB1 CLOSEF SEND.FILE.TO.PRINTER APPEND DELFILE CONCAT MKSTRING) -SUPERPRINT/SPACE (- DSPXPOSITION TIMES PRINENDLINE PRIN3) TOPPATHS (ALLPATHS RECLOOK1) \\MEDW.XOFFSET -(\\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD |\\SFFixClippingRegion| \\ILLEGAL.ARG -) MBUTTON.NEXT.FIELD.AS.ATOM (TEDIT.SEL.AS.STRING FFETCHFIELD NCHARS MKATOM) ROUND ( -CL::%INTEGER-COERCE-MACRO) PRODUCE (RESUME) \\LEAF.SETFILEINFO (TYPENAMEP IDATE LISPERROR FIXP -\\LEAF.GETFILE SELECTQ \\LEAF.SETFILETYPE \\LEAF.SETCREATIONDATE) RECORDACCESSFORM (L-CASE SELECTQ -LIST COMPILEUSERFN) CL::ASSIGN-SLOT-OFFSET (CL::PS-NAME CL::PS-ALL-SLOTS) TEDIT.PARALOOKS (TEXTOBJ -TEDIT.SETSEL FFETCHFIELD IMIN IMAX SUB1 \\CHTOPC COPYALL LISTGET FMEMB CONS MAPCAR -\\TEDIT.UNIQUIFY.PARALOOKS NCONC1 NCREATE IPLUS IDIFFERENCE ADD1 \\TEDIT.ORIGINAL.WINDOW.TITLE) -|\\PFGetVols| (SUB1 FFETCHFIELD |\\PFGetVol| LIST PLUS) XCL::ADD-WHERE-IS-DATABASES (CL:MAPCAR -CL:FUNCTION) \\STREAM.FROM.PACKET (\\MAKEBASEBYTESTREAM LOCF \\ADDBASE IDIFFERENCE FFETCHFIELD -CONSTANT IPLUS) \\REALNAMEP (NTHCHAR) WHO-LINE-TIME (IDATE SETUPTIMER DIFFERENCE REMAINDER CONSTANT -GDATE) VOLUMES (SELECTQ MACHINETYPE MAPCAR |\\PFGetVols| MKATOM U-CASE |\\PFFetchString| LOCF -\\ADDBASE) \\POSSIBLECOLOR (SELECTQ TYPENAME MASK.1\'S LSH SUB1 RGBP HLSP) \\DEFINEDP (\\DEFCELL -\\ATOMCELL) \\DRAWCIRCLE.PSC (FFETCHFIELD TERPRI POSTSCRIPT.PUTCOMMAND TIMES \\MOVETO.PSC) -COMPILE-FILE? (GET ROOTFILENAME) CHAT.INIT (WINDOWPROP FREPLACEFIELDVAL NCREATE TEDITSTREAM.INIT -FUNCTION FFETCHFIELD FREPLACEFIELD) ADIEU (ARG RETTO) COMP.FIX (COMP.STFIX) SUBPRINT/WRAPPERTAIL (+ -DSPXPOSITION WIDTH STRINGWIDTH SUPERPRINT) COMP.DELFIX (SELECTQ) SI::PRINT-TRACED-CL-ARGLIST (DECLARE -+) \\DRAWELLIPSE.PSC (FFETCHFIELD TERPRI TIMES \\MOVETO.PSC) \\SETUFNENTRY (\\ADDBASE FFETCHFIELD -\\ATOMDEFINDEX NTYPX \\LOLOC SHOULDNT FREPLACEFIELD) \\GET-COMPILED-DEFINITION (\\DEFCELL \\ATOMCELL -FFETCHFIELD MAKE-COMPILED-CLOSURE) *DIGIT-STRING* (CL:MAKE-ARRAY) CL:ARRAY-RANK-LIMIT (EXPT) NEGSHADE -(-) ENCAPSULATEDOBJ.DISPLAYFN (DSPXPOSITION DSPYPOSITION FONTCREATE DSPFONT IMAGEOBJPROP IDIFFERENCE -IPLUS FONTPROP PRIN1 IMINUS) \\CCLOSURE.DEFPRINT (FFETCHFIELD IPLUS CONSTANT NCHARS LITATOM FRESHLINE) - POSTSCRIPT.TEDIT (MKATOM OPENTEXTSTREAM) COMP.EXPR (SELECTQ COMP.CONST COMP.VAR FASSOC TYPENAME -APPLY* COMP.LAMBDA CONS \\TRANSLATE-CL\:LAMBDA COMP.CLEANFNOP FRPLACA COMP.STFN PLUS COMP.TRYUSERFN -COMPERROR GETMACROPROP COMPILER:ENV-FBOUNDP COMP.TRANSFORM COMP.CPI COMP.ARGTYPE COMP.CALL -OPT.JUMPCHECK) MBUTTON.NEXT.FIELD.AS.TEXT (TEDIT.SEL.AS.STRING FFETCHFIELD) GETCFILE (OPENSTREAM -ASKUSER LIST FULLNAME MAPCAR READ) SKOR (GETCASEARRAY FLENGTH IPLUS SUB1) COMPILER::GENCODE-THROW ( -COMPILER::GENCODE COMPILER::THROW-TAG) SEDIT::MAP-FONT (FFETCHFIELD SHOULDNT) OP# (\\FINDOP) -GETEXPRESSIONFROMEVENTSPEC (LISPXFIND FMEMB LDIFF SELECTQ ARGTYPE CONS ERROR MAPCAR KWOTE LIST MKPROGN -) RECORDCHAIN (CHECKDEFS TOPPATHS) DISPLAYAFTERENTRY (CARETRATE) AU-REVOIR (ARG RESUME) -\\LEAF.GETFILENAME (FFETCHFIELD \\IFS.LOOKUPFILE \\LEAF.GETFILE SELECTQ \\GENERIC.OUTFILEP) -CL::PS-NUMBER-OF-SLOTS (CL:LENGTH CL::PS-ALL-SLOTS) DISPLAYBEFOREEXIT (CONS CURSOR -CHANGEBACKGROUNDBORDER SELECTQ SHOWDISPLAY TTYDISPLAYSTREAM CLRPROMPT SHOULDNT) \\MEDW.BLTCHAR ( -\\CHAR8CODE LOGAND FFETCHFIELD \\CHARSET LRSH \\SLOWBLTCHAR IPLUS \\DSPGETCHARIMAGEWIDTH \\GETBASE -\\DSPGETCHARWIDTH DSPDESTINATION \\TOTOPWDS IDIFFERENCE \\DSPGETCHAROFFSET) XCL::GET-WHERE-IS-ENTRIES -(CL:MAPLIST CL:FUNCTION) SPP.OPENP (GETSPPCON FFETCHFIELD) \\GETUFNENTRY (\\ADDBASE2 \\ADDBASE -\\FINDOP \\VAG2 FFETCHFIELD) COMPILER::COMPILE-SCAN-DEFINE-FILE-INFO (CL:EVAL) MERGLIST (HEADPT XYPT.Y - CONS REVERSE) \\GETREGIONTRACKWITHBOX (IDIFFERENCE SUB1 BITMAPWIDTH BITMAPHEIGHT ERSETQ LOGAND LOGOR -CURSOR ZEROP IQUOTIENT IPLUS IMAX IMIN FRPLACA FRPLACD) \\SUBFNDEF (NTHCHARCODE PLUS -\\GET-COMPILED-DEFINITION) \\PROMPTFORWORDRETYPE (MAPC REVERSE \\OUTCHAR) \\NSFILING.GETFILE (RESETLST - \\GETFILINGCONNECTION FFETCHFIELD \\NSFILING.LOOKUP.CACHE \\NSFILING.PARSE.FILENAME -\\NSFILING.CONNECT \\NSFILING.OPEN.HANDLE SELECTQ \\NSFILING.COMPOSE.PATHNAME ADD1 ASSOC -\\NSFILING.FILLIN.ATTRIBUTES \\NSFILING.FULLNAME \\NSRANDOM.CREATE.STREAM FILING.CALL -\\NSFILING.CHECK.ACCESS \\NSFILING.ADD.TO.CACHE FREPLACEFIELDVAL NCREATE SETUPTIMER MKATOM U-CASE PLUS - CL:FUNCALL SHOULDNT \\NSFILING.HANDLE.ERROR \\NSFILING.GET.NEW.SESSION WITHOUT.SESSION.MONITOR -LISPERROR) RECORDWORD (GETPROP RECORDWORD) REMOVEPROMPTWINDOW (WINDOWPROP FUNCTION CLOSEW MAINWINDOW) -MAKESYS (CONCAT CL:STRING-CAPITALIZE SUBSTRING DATE \\COPYSYS RESET) CLISPNOTVARP (STKSCAN) -MODERNWINDOW.BUTTONEVENTFN (LOGAND WINDOWPROP ATTACHEDWINDOWREGION CENTRALWINDOW FONTPROP -INCORNER.REGION IPLUS FFETCHFIELD APPLY*) \\PROMPTFORWORDBIN (FFETCHFIELD SETUPTIMER WAIT.FOR.TTY BIN -SPREADAPPLY* MACHINETYPE IMIN LLSH TIMES) \\ABORT.BULK.DATA (FFETCHFIELD) SEDIT::CREATE-NEW-COMMENT ( -FFETCHFIELD LIST FREPLACEFIELDVAL NCREATE SEDIT::CREATE-WEAK-LINK) \\DSPMOVELR (\\STREAMCHARWIDTH FIXP - FFETCHFIELD PLUS IMINUS \\CARET.DOWN IDIFFERENCE FONTDESCENT FONTHEIGHT \\GETDISPLAYDATA \\DTEST -\\OUTSTREAMARG \\GETSTREAM) RECOMPILE (BRECOMPILE) UNIQLIST (HEADPTY CONS HEADPT XYPT.Y REVERSE) -GETREGION (GETSCREENREGION) \\PROMPTWINDOW.OPENFN (WINDOWPROP OPENWINDOWS REATTACHPROMPTWINDOW) -TEDIT.FLASHCARET (FFETCHFIELD) CALLSCCODE (\\GET-COMPILED-CODE-BASE \\CODEBLOCKP ERROR FFETCHFIELD -UNFOLD LLSH IPLUS CONSTANT \\INDEXATOMVAL \\VAG2 LRSH LOGAND GETNAMEENTRY SUB1 BYTESPERNAMEENTRY -WORDSPERNAMEENTRY LOGOR CODEBASELT \\GETBASEBYTE LOGXOR PLUS SELECTQ NTSLOT-VARTYPE GETNTOFFSET -GETNTOFFSETENTRY BYTESPERNTOFFSETENTRY CONS NEXTBYTE \\FINDOP \\INDEXATOMDEF BIG-VMEM-HOST \\SUBFNDEF -CALLSCCODE RUNION REVERSE) MBUTTON.NEXT.FIELD.AS.PIECES (TEDIT.SELECTED.PIECES FFETCHFIELD) -DOMAINWINDOWCOMFN (APPLY* WINDOWPROP FUNCTION) TEDIT.INSERT (TEXTSTREAM MKSTRING TYPENAMEP FFETCHFIELD - NCHARS IMAX SELECTQ IMIN ADD1 SUB1 %ARRAY-OFFSET %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER \\GETBASEFAT -\\GETBASE \\GETBASETHIN \\GETBASEBYTE PLUS TEXTOBJ TEDIT.PROMPTPRINT) SEDIT::COPY-STRUCTURE-COMMENT ( -LIST FFETCHFIELD SEDIT::MAKE-COMMENT-STRING FREPLACEFIELD) *WHO-LINE-SYMBOL-SPACE* (LIST) -|\\PFGetPhysicalVolumePage| (|\\PFTransferPage| \\ALLOCBLOCK LRSH ADD1 MESASIZE) CH.LIST.DOMAINS ( -PARSE.NSNAME COURIER.CALL \\CH.FIND.ORG.SERVER FFETCHFIELD CH.GETAUTHENTICATOR) COMPILER::GENCODE-TAGBODY - (COMPILER::GENCODE-TAGBODY-INLINE) UNSAVEFNS (APPEND EXPRP GETP RESETVARS .RESETLST. LIST CONS -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION WHEREIS TERPRI REMOVE |printout|) MKACCESSFN ( -SELECTQ CONSFN CLISPLOOKUP0 LIST LISTGET CONS MKACCESSFN COPY CSUBST) \\PROMPTFORWORDERASE ( -DSPYPOSITION DSPLEFTMARGIN IDIFFERENCE FONTDESCENT TERPRI) POSSIBILITIES (LIST CONS STKNTH) -\\LEAF.GENERATEFILES (\\FTP.GENERATEFILES \\GENERATENOFILES) LISPDIRECTORYP (WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SELECTQ MACHINETYPE |\\LFEntryPoint|) -CL::DEFSTRUCT-PARSE-OPTIONS (LIST CL::MAKE-PS CL:CONCATENATE STRING) CHARWIDTHY (\\CHARCODEP IGEQ -\\GETCHARSETINFO \\GETBASEPTR FFETCHFIELD UNFOLD LLSH \\CHARSET LRSH \\CREATECHARSET FIXP \\FGETWIDTH -\\GETBASE \\CHAR8CODE LOGAND \\OUTSTREAMARG \\GETSTREAM IMAGEOP SPREADAPPLY* FONTCREATE) PRINTATBOX ( -IDIFFERENCE IPLUS FONTPROP DSPFONT PRINTANDBOX) NETWORKLOGINFO (LIST MKSTRING) CREATE-PROCESS-STREAM ( -FREPLACEFIELDVAL NCREATE FUNCTION FORK-UNIX UNIX-CHANNEL FFETCHFIELD CONS) |\\DisplayEventFn| (SELECTQ - DISPLAYBEFOREEXIT DISPLAYAFTERENTRY) DINFO.CREATE.GRAPH.WINDOW (FFETCHFIELD WINDOWPROP DIFFERENCE -CREATEW CREATEREGION RAND) \\TFBRAVO.WRITE.RUN (FFETCHFIELD PEEKC CHARACTER IPLUS GETFILEPTR) -CHAT.OPTIONMENU (STREAMPROP APPLY* FFETCHFIELD) \\CREATECHARSET (FONTPROP FUNCTION ASSOC APPLY APPEND -LIST IMAX FFETCHFIELD SIGNED SUB1 LLSH IDIFFERENCE IPLUS \\SETCHARSETINFO \\RPLPTR UNFOLD) -DETACHALLWINDOWS (MAPC WINDOWPROP CLOSEW) COMP.STCONST (COMP.ST COMP.LOOKUPCONST) \\FILLCIRCLE.PSC ( -BITMAPCREATE MIN FFETCHFIELD LSH TIMES QUOTIENT DSPSCALE \\MOVETO.PSC) \\FB.HARDCOPY.TOFILE.EXTENSION -(PRINTERTYPE) \\BLTSHADE.PSC (CREATEREGION FFETCHFIELD INTERSECTREGIONS CL:1- SELECT BITMAPCREATE MIN -QUOTIENT MINUS LSH TIMES DSPSCALE) COMP.NUMBERCALL (COMP.PROGN FASSOC ADD1 SUB1 COMP.STFN CONS -COMP.FLOATBOX APPLY* COMP.STFIX SELECTQ) DEFAULTFONT (TYPENAMEP FONTCLASS SETFONTCLASSCOMPONENT -\\COERCEFONTDESC \\DEVICESYMBOL) SEDIT::COPY-STRUCTURE-COMMENT-WORD (CL:COPY-SEQ FFETCHFIELD RPLACA -FREPLACEFIELDVAL NCREATE) SCALE-EXPONENT (SCALE-EXPT-AUX CONSTANT CL:LOG) WHO-LINE-SYMBOL-SPACE ( -UNFOLD LLSH CL:1+ FOLDHI LRSH IPLUS CL:THIRD) TEDIT.CURSORMOVEDFN (LASTMOUSEX LASTMOUSEY WINDOWPROP -\\TEDIT.FIND.OVERLAPPING.LINE FFETCHFIELD FRPLACA IDIFFERENCE FIXR FQUOTIENT IPLUS) \\IRM.WILD.MATCH ( -\\IRM.WILD.MATCH) \\GETREGION.PACKPTS (FRPLACA FRPLACD) DSPCLEOL (\\CARET.DOWN \\GETDISPLAYDATA -\\DTEST \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD BITBLT FIXP IDIFFERENCE FONTPROP IMAX IMINUS) -COMPILE.FILECHECK (OPENFILE) MBUTTON.NEXT.FIELD.AS.NUMBER (NUMBERP MKATOM TEDIT.SEL.AS.STRING -FFETCHFIELD) USEDFREE (APPEND) ENTEREVALQT (MAPC ERSETQ EVAL) \\CODEBLOCKP (NTYPX \\HILOC \\ADDBASE - -LOGAND \\LOLOC FFETCHFIELD \\ADDBASE2 IDIFFERENCE \\GETDTD ITIMES) \\DISPLAYINIT (CONS FUNCTION -FREPLACEFIELDVAL NCREATE \\DEFINEDEVICE) \\FTP.CLEANUP (SETUPTIMER LRSH FUNCTION) COMPILER::TEST-META-EVAL - (COMPILER::TEST-ALPHA-2 CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION COMPILER::PRINT-TREE -COMPILER::META-EVALUATE) COMP.STCOPY (IGREATERP COMP.ST) BRECOMPILE (RESETLST INPUT RESETOPENFILES -FULLNAME LIST UNPACKFILENAME PACKFILENAME FMEMB OPENSTREAM CLOSEF GET-ENVIRONMENT-AND-FILEMAP -SPELLFILE ROOTFILENAME ASKUSER CONS MAPCAR READ GETPROP MAPCONC MAPC BCOMPL1A APPEND TERPRI -BCOMPL.BODY) DINFO.GET.GRAPH.WINDOW (FFETCHFIELD WINDOWP DINFO.CREATE.GRAPH.WINDOW FUNCTION) -COMP.NUMERIC (COMP.PROGN FASSOC ADD1 SUB1 COMP.STFN CONS COMP.FLOATBOX IPLUS APPLY* FUNCTION -COMP.STPOP COMP.STCONST IMINUS PLUS) SUPERPRINT/COMMENT2 (\\GETSTREAM DSPXPOSITION NTHCHARCODE IPLUS -WIDTH STRINGWIDTH PRINSHUT) XCL::SAVE-CURRENT-EXEC-PROFILE (XCL::GET-PROCESS-PROFILE THIS.PROCESS -XCL:SAVE-PROFILE) LAYOUTSEXPR (CONS LAYOUTGRAPH LIST APPEND MKLIST ERROR) PFI.ADD.TO.INDEX (CONS LIST) - COMPILER::GENCODE-TAGBODY-INLINE (COMPILER::TAGBODY-FRAME COMPILER::TAGBODY-STK-NUM COMPILER::MAKE-LAP-VAR - COMPILER::TAGBODY-BLIP-VAR COMPILER::TAGBODY-SEGMENTS COMPILER::SEGMENT-LOCAL-TAG COMPILER::GENCODE-SEGMENT -) MSNEEDUNSAVE (GETP LIST UNSAVEFNS TERPRI /SETATOMVAL NCONC) READVARS-FROM-STREAM (HPINITRDTBL -CL:FUNCTION READ) RECFIELDLOOK (MAPCONC RECFIELDLOOK MAPCAR RECLOOK LIST RECORD.FIELDNAMES RECORDECL -RECORD.NAME) TRYNEXT (TRYNEXT1 EVAL) SEDIT::START-COMMENT (FFETCHFIELD LIST SEDIT::CREATE-NEW-COMMENT) - \\LEAF.REOPENFILE (\\LEAF.GETFILE FFETCHFIELD \\LEAF.CREATIONDATE) SHOWGRAPH (SIZE/GRAPH/WINDOW CONS -FUNCTION) PFI.DEFAULT.HANDLER (GET CL:NTH CL:POSITION NLSETQ CL:FUNCALL LIST MAPC CONS PFI.PRETTYPRINT -) CHANGERECORD (MSNEEDUNSAVE GETRELATION UNION) MAKEACCESS (SELECTQ SHOULDNT MAKEACCESS1 MAKEACCESS) -SYSOUT (FFETCHFIELD \\COPYSYS) %COPY-ONED-ARRAY (LOCAL FFETCHFIELD FOLDHI LRSH IPLUS ITIMES -\\ALLOCBLOCK FREPLACEFIELDVAL NCREATE SUB1 LLSH \\GETBASE PLUS) \\LEAF.DIRECTORYNAMEP (FFETCHFIELD -PACKFILENAME.STRING CONS) RECREDECLARE1 (/PUTHASH) \\PAGEDBACKFILEPTR (FFETCHFIELD UNINTERRUPTABLY -FREPLACEFIELD PLUS SUB1 IMAX) COMP.ST (CONS IPLUS OPT.JUMPCHECK) \\DSPPRINTCHAR (FFETCHFIELD -\\CARET.DOWN \\SYNCODE GETHASH \\GETBASEBYTE LOGAND CONSTANT IMAX PLUS CHARWIDTH \\INDICATESTRING -\\STRINGWIDTH.DISPLAY IDIFFERENCE NCHARS NTHCHARCODE LIST WFROMDS UNFOLD LLSH -\\DISPLAYSTREAMINCRXPOSITION MOD IMOD IQUOTIENT) CHANGECCODE (\\GET-COMPILED-CODE-BASE CONS CCCSCAN -LITATOM CODEBASESETATOM MAPC UNINTERRUPTABLY OPCODES \\DELREF) \\CREATECHARSET.PSC (FREPLACEFIELDVAL -NCREATE \\CREATECSINFOELEMENT \\ALLOCBLOCK FOLDHI LRSH IPLUS FFETCHFIELD) PTPLUS (PLUS CONS) -\\PROMPTWINDOW.SET.HEIGHT (IDIFFERENCE WINDOWPROP IPLUS MAINWINDOW CONS) TEDIT.REDO (FFETCHFIELD -RESETSAVE CURSOR \\SHOWSEL SELECTQ TEDIT.REDO.INSERTION IMAX \\TEDIT.DELETE TEDIT.REDO.REPLACE -\\TEDIT.LCASE.SEL TEDIT.REDO.LOOKS TEDIT.REDO.PARALOOKS TEDIT.PROMPTPRINT TEDIT.FIND IPLUS NCHARS -TEDIT.REDO.MOVE CONCAT) \\NSFILING.GENERATEFILES (\\NSFILING.PARSE.FILENAME \\GETFILINGCONNECTION -FFETCHFIELD STRPOS \\NSFILING.GENERATE.STARS LIST SUBSTRING NTHCHARCODE CONCAT \\NSFILING.CONNECT -CL:REMOVE-DUPLICATES APPEND CONSTANT \\FILING.ATTRIBUTE.TYPE.SEQUENCE \\FILING.ATTRIBUTE.TYPE ASSOC -CONS FILING.CALL DREMOVE FUNCTION BULKDATA.GENERATOR DIRECTORY.MATCH.SETUP PRIN1 \\NULLFILEGENERATOR) -COMPILER::COMPILER-ERROR (CL:ERROR) \\DRAWPOINT.DISPLAY (\\GETBRUSH BITBLT IDIFFERENCE HALF LRSH SUB1 -FFETCHFIELD SELECTQ DSPOPERATION) CL::ENSURE-CONSISTENT-PS (CL::PS-INCLUDE CL::PS-NAME CL::PS-TYPE -CL::PS-VECTOR-TYPE CL:ERROR CL::PS-INLINE CL::PS-CONSTRUCTORS CL::PS-PREDICATE CL::PS-COPIER -CL::PS-PRINT-FUNCTION CL::PS-NAMED CL::DEFAULT-PREDICATE-NAME CL:INTERN CL:CONCATENATE STRING -CL::PS-EXPORT LIST) TEDIT.UNDO (FFETCHFIELD RESETSAVE CURSOR \\SHOWSEL SELECTQ TEDIT.UNDO.INSERTION -TEDIT.UNDO.DELETION TEDIT.UNDO.LOOKS TEDIT.UNDO.PARALOOKS TEDIT.UNDO.REPLACE TEDIT.PROMPTPRINT ASSOC -APPLY* CONCAT) \\STRINGWIDTH.GENERIC (FFETCHFIELD \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT ADD1 -\\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE PLUS \\CHARSET LRSH \\GETCHARSETINFO \\GETBASEPTR -UNFOLD LLSH \\CREATECHARSET \\FGETWIDTH \\CHAR8CODE LOGAND \\FGETCHARWIDTH SUB1 %ARRAY-OFFSET -%ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER FUNCTION) \\BITBLT.PSC (\\SCALEDBITBLT.PSC) FB.ALLOW.ABORT ( -\\DTEST THIS.PROCESS FFETCHFIELD REDISPLAYW) COMPILER::TRANSFORM-GET/PUT-BASE (COMPILER::CALL-ARGS -CL:FIRST CL:SECOND COMPILER::LITERAL-VALUE COMPILER::MAKE-CALL COMPILER::MAKE-OPCODES LIST COMPILER::CALL-FN - CL:THIRD COMPILER::NODE-META-P) TEDIT.SUBSTITUTE (TEXTOBJ TEDIT.GETINPUT TEXTPROP NCHARS PLUS -FFETCHFIELD STRPOS CHARACTER MEMBER IPLUS SUB1 TEDIT.FIND TEDIT.SETSEL IDIFFERENCE IEQP MAPCAR -\\TEDIT.COPY.PIECEMAPFN \\CHTOPC \\DELETECH ADD1 %ARRAY-OFFSET %ARRAY-BASE %ARRAY-TYPE-NUMBER -\\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE CONCAT MKSTRING) -SEDIT::COMPUTE-SELECTION-POSITION-COMMENT (FFETCHFIELD IPLUS SEDIT::SIMPLE-STRING-OFFSET SUB1 -FREPLACEFIELD) \\DRAWARC.DISPLAY (\\DRAWARC.GENERIC) EXTENDREGIONLEFT (FRPLACA IPLUS IDIFFERENCE) -PURGEDSKDIRECTORY (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION |\\LFEntryPoint| -\\GETDEVICEFROMHOSTNAME \\DEVICE-OPEN-STREAMS SPREADAPPLY* FFETCHFIELD |\\PFGetVol| PRIN1 CLOSEF -FILDIR PACKFILENAME |\\PFFetchString| LOCF \\ADDBASE |printout| DELFILE |\\LFFindDirectoryVol| -|\\LFCloseDevice|) \\ITEMW.FLIPITEM (BLTSHADE) FONTCLASSUNPARSE (APPEND LIST FFETCHFIELD FONTUNPARSE -MAPCAR) SEDIT::TRY-REUSING-BITS (FFETCHFIELD IDIFFERENCE ADD1 IPLUS SEDIT::NEXT-LINEAR-ITEM) -AS.CHANGE.OWN.PASSWORDS (RESETLST AS.MAKE.CONVERSATION) \\DRAWPOLYGON.DISPLAY (CONS) -%THIN-CHAR-TYPENUMBER (%TYPE-SIZE-TO-TYPENUMBER) \\DSPCLIPPINGREGION.DISPLAY (\\GETDISPLAYDATA \\DTEST - \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD EVERY NUMBERP \\INVALIDATEDISPLAYCACHE FREPLACEFIELD) -FONTUNPARSE (FONTPROP CONS FONTCLASSUNPARSE PACK LIST* NTHCHAR LIST SHOULDNT) SETUPHASHARRAY ( -GETATOMVAL HASHARRAYP HASHARRAY) FIX-FORM (TTYDISPLAYSTREAM COUNTDOWN LENGTH EXEC-READ-LINE) -COMPILER::GENCODE-SETQ (COMPILER::GENCODE COMPILER::SETQ-VALUE) CHANGEI.S. (SELECTQ MSNEEDUNSAVE -GETRELATION UNION L-CASE) EDITDEF.FILES (EDITDEF FILECOMS) WINDOWDELPROP (WINDOWPROP REMOVE) HPRINT0 ( -HPRINT MAPCAR LITATOM GETATOMVAL) |\\VAMCheckEndOfVol| (SUB1 FFETCHFIELD) \\STRINGWIDTH.DISPLAY ( -FFETCHFIELD \\STRINGWIDTH.GENERIC) %COPY-STRING-TO-ARRAY (LOCAL NCHARS \\ALLOCBLOCK FOLDHI LRSH IPLUS -ITIMES FREPLACEFIELDVAL NCREATE SUB1 NTHCHARCODE ADD1 PLUS) HASHRECORD (DECLARERECORD CONS) -\\LEAF.EVENTFN (FFETCHFIELD SPREADAPPLY*) UNMAKEMAINWINDOW (FUNCTION WINDOWPROP) EDITDATE? (NCHARS -NTHCHARCODE PLUS >= CL:LENGTH ILESSP) \\DSPOPERATION.DISPLAY (\\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG -\\GETSTREAM FFETCHFIELD FMEMB \\SETPBTFUNCTION SELECTQ FREPLACEFIELD) \\NSPRINT.WATCH.JOB (LIST -FIND.PROCESS ADD.PROCESS FUNCTION) \\SCALEDBITBLT.PSC (NUMBERP FFETCHFIELD TIMES INTERSECTREGIONS -CREATEREGION BITMAPCREATE) PROG1.PRETTYPRINT (INDENTATION.FROM.HERE DSPXPOSITION) \\BACKCOLOR.DISPLAY -(\\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD BITMAPHEIGHT LOGAND COLORNUMBERP) -DWIMIFY1? (DWMFY1) SEDIT::COPY-SELECTION-COMMENT (FFETCHFIELD SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW -SUB1 NCHARS SUBSTRING SEDIT::STRINGIFY-COMMENT BKSYSBUF SEDIT::INSERT SEDIT::COPY-NODE -OPENSTRINGSTREAM NLSETQ READ SEDIT::PARSE-NEW LIST |printout| PRIN1) TCOMPL (ERSETQ BCOMPL CONS LIST) -FB.YES-OR-NO-P (FB.PROMPTFORINPUT SELECTQ) XYSECTLSEG (IPLUS XYSECT XYPT.Y) SUPERPRINT/COMMENT1 ( -EDITDATE? IDIFFERENCE DSPFONT WIDTH STRINGWIDTH BLANKS TIMES FIXR FLOATP IMAX IQUOTIENT IMIN) EDITDATE - (LIST CONCAT DATE /RPLACD CONS) \\PROMPTWINDOW.PAGEFULLFN (WINDOWPROP MAINWINDOW -\\PROMPTWINDOW.EXPAND ADD1) TEDIT.NEXT (TEXTOBJ FFETCHFIELD TEDIT.FIND MBUTTON.FIND.NEXT.FIELD ADD1 -IDIFFERENCE \\TEDIT.GET.INSERT.CHARLOOKS) POSTSCRIPT.HARDCOPYW (OPENPOSTSCRIPTSTREAM LIST FFETCHFIELD -COPY + - FRPLACA CONS TIMES PLUS QUOTIENT DIFFERENCE FULLNAME) GETDEFCOM (MAPCONC GETDEFCOM0) -MBUTTON.INIT (IMAGEFNSCREATE FUNCTION) OPT.CALLP (FMEMB) GETPOSITION (GETSCREENPOSITION) ASKUSERLOOKUP - (FMEMB) \\BLTSHADE.DISPLAY (FFETCHFIELD DSPDESTINATION \\TOTOPWDS \\DSPTRANSFORMX IPLUS -\\DSPTRANSFORMY IMAX IMIN SELECTQ TYPENAME COLORNUMBERP \\ILLEGAL.ARG LOGAND MAXIMUMSHADE ITIMES -COLORTEXTUREFROMCOLOR# \\GETBASE IDIFFERENCE |\\SFInvert|) INDENTATION.FROM.HERE (+ DSPXPOSITION TIMES - CHARWIDTH) ENCAPSULATEDOBJ.PUTFN (IMAGEOBJPROP NUMBERP ERROR) ENTRY# (IPLUS IMINUS FLENGTH FMEMB) -SETFONTDESCRIPTOR (\\DEVICESYMBOL \\COERCEFONTDESC \\FONTSYMBOL \\FONTFACE IGEQ FASSOC CONS LIST -FRPLACD SASSOC) FORMAT-ERROR (CL:ERROR LIST CL:1+) BCOMPL (RESETLST RESETOPENFILES BCOMPL.BODY) -\\NEWPAGE.DISPLAY (DSPRESET) XCL::EXEC-TITLE-FUNCTION (WINDOWPROP CL:FORMAT READTABLEPROP) -DO.PRETTYPRINT (DSPXPOSITION + MIN TIMES IQUOTIENT -) PROVIDE.PROMPTING.WINDOW (TTY.PROCESS -THIS.PROCESS GETSTREAM WFROMDS TTYDISPLAYSTREAM CREATEW CREATEREGION IPLUS LIST FUNCTION LRSH -IDIFFERENCE STRINGWIDTH TERPRI MACHINETYPE) COMPILER::ENSURE-EFFECT-CONTEXT (COMPILER:CONTEXT-VALUES-USED - PACK* PLUS) CLISPNOEVAL (FASSOC ARGTYPE EQMEMB GETPROP) SEDIT::COMPUTE-POINT-POSITION-COMMENT ( -FFETCHFIELD IPLUS FREPLACEFIELD SEDIT::SIMPLE-STRING-OFFSET) \\AVGCHARWIDTH (CHARWIDTH FIXR FTIMES -FONTPROP) SEQUENTIAL.PRETTYPRINT (DSPXPOSITION PRINTDEF GET CL:FUNCALL SUBPRINT/WRAPPERTAIL) -POLYSHADE.DISPLAY (PREPLOOP MAPCAR \\POLYSHADE.DISPLAY) REATTACHPROMPTWINDOW (WINDOWPROP) DWIMIFY0 ( -LISTGET1 EVALV VARSBOUNDINEDITCHAIN LAST DWIMIFY2 FASSOC FMEMB DWIMIFY1 EXPRCHECK) CASE.PRETTYPRINT ( -INDENTATION.FROM.HERE DSPXPOSITION + TIMES CHARWIDTH STRINGWIDTH - DSPRIGHTMARGIN) -COMPILER::*COMPILE-DEFINER-CONTEXT* (COMPILER::MAKE-COMPILER-CONTEXT) \\DRAWCIRCLE.DISPLAY (FIXR -\\ILLEGAL.ARG DRAWCURVE \\COMPUTE.ARC.POINTS GLOBALRESOURCE ITIMES IDIFFERENCE FFETCHFIELD -\\GETCOLORBRUSH MAXIMUMCOLOR DSPCOLOR OPPOSITECOLOR \\GETBRUSH \\GETBRUSHBBT SUB1 \\DSPTRANSFORMX -IPLUS FOLDLO LRSH IQUOTIENT \\DSPTRANSFORMY DSPDESTINATION \\TOTOPWDS \\GETBASE \\FBITMAPBIT -\\BBTCURVEPT ADD1 UNFOLD LLSH \\CURVEPT GETRESOURCE NEWRESOURCE NCREATE) \\NSFILING.PARSE.FILENAME ( -NCHARS SELCHARQ CHCON1 NTHCHARCODE PLUS + ADD1 NCONC1 SUBSTRING SUB1 CL:PARSE-INTEGER - CONS) -MAKEACCESS1 (MAKEACCESS1 LIST RECORDBINDVAL SELECTQ RECORDERROR CONSFN CONS PACK* PACK APPEND -MKACCESSFN RECEVAL MKPROGN KWOTE SHOULDNT) PROGV.PRETTYPRINT (INDENTATION.FROM.HERE DSPXPOSITION) -SEDIT::SHIFT-BLOCK (FFETCHFIELD ADD1 IDIFFERENCE IPLUS FREPLACEFIELD) CL::RECORD-DOCUMENTATION ( -CL::PS-DOCUMENTATION-STRING) \\DRAWELLIPSE.DISPLAY (FIXR / COS SIN ITIMES FFETCHFIELD \\GETCOLORBRUSH -MAXIMUMCOLOR DSPCOLOR OPPOSITECOLOR \\GETBRUSH \\GETBRUSHBBT SUB1 IDIFFERENCE \\DSPTRANSFORMX IPLUS -FOLDLO LRSH \\DSPTRANSFORMY DSPDESTINATION \\TOTOPWDS FPLUS FTIMES LSH FQUOTIENT SQRT FDIFFERENCE ABS -IMINUS RSH \\GETBASE \\FBITMAPBIT \\BBTCURVEPT MINUSP ADD1 GETRESOURCE NEWRESOURCE NCREATE) -\\CHARWIDTH.DISPLAY (\\FGETCHARWIDTH \\FGETWIDTH \\GETBASE \\GETCHARSETINFO \\GETBASEPTR FFETCHFIELD -UNFOLD LLSH \\CHARSET LRSH \\CREATECHARSET \\CHAR8CODE LOGAND) \\IFSERRORSTRING (NLSETQ OPENSTREAM -PACK* FFETCHFIELD FULLNAME FCHARACTER FFILEPOS CONCAT IDIFFERENCE GETEOFPTR ALLOCSTRING \\BIN PLUS) -TYPEP (CL:GETHASH CL:FUNCALL) \\DRAWLINE.DISPLAY (INSURE.BRUSH FRPLACA FFETCHFIELD \\LINEWITHBRUSH -\\GOOD.DASHLST SELECTQ \\ILLEGAL.ARG BITMAPHEIGHT |GetNewFragment| IDIFFERENCE GETRESOURCE NEWRESOURCE - NCREATE DSPDESTINATION \\TOTOPWDS \\DSPTRANSFORMX IPLUS FIXP FIXR \\DSPTRANSFORMY SUB1 MOVETO) -FONTCLASSCOMPONENT (FONTCREATE) COMPILER::ESTABLISH-MACRO-IN-COMPILER (COMPILER::ENV-BIND-FUNCTION -COMPILER::FIND-TOP-ENVIRONMENT) PRINTPROG (IDIFFERENCE DSPXPOSITION STRINGWIDTH IPLUS) PRINTCODENT ( -IPLUS TERPRI CONSTANT SUB1 BYTESPERNAMEENTRY LLSH WORDSPERNAMEENTRY CODEBASELT \\GETBASEBYTE LOGXOR -PLUS \\INDEXATOMVAL \\VAG2 LRSH LOGAND CODEBASEGETNAME GETNTOFFSET GETNTOFFSETENTRY -BYTESPERNTOFFSETENTRY LOGOR SELECTC NTSLOT-VARTYPE CONS LIST PRIN2) PFI.MAYBE.NEW.PAGE (SUB1 -PFI.LINES.REMAINING PFI.ESTIMATE.SIZE TERPRI DSPNEWPAGE) COMPILER::GENCODE-RETURN (COMPILER::RETURN-BLOCK - COMPILER::BLOCK-FRAME COMPILER::RETURN-VALUE COMPILER::BLOCK-CONTEXT COMPILER::BLOCK-BLIP-VAR) -\\DSPRESET.DISPLAY (\\DTEST \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD WFROMDS WXOFFSET WYOFFSET -FONTASCENT ADD1 IDIFFERENCE IPLUS WINDOWPROP PROCESS.TTY) HISTORYMATCH (EDITFINDP) -%FAT-CHAR-TYPENUMBER (%TYPE-SIZE-TO-TYPENUMBER) CODEWRAPPER.PRETTYPRINT (INDENTATION.FROM.HERE) -XCL::SETF-GET-PROCESS-PROFILE (THIS.PROCESS XCL::PROFILIZE PROCESSPROP) \\DRAWCURVE.DISPLAY ( -GLOBALRESOURCE \\GOOD.DASHLST LENGTH NUMBERP PARAMETRICSPLINE GETRESOURCE NEWRESOURCE NCREATE) -\\FILLCIRCLE.DISPLAY (FIXR \\ILLEGAL.ARG GLOBALRESOURCE FFETCHFIELD ITIMES IDIFFERENCE SUB1 BITMAPP -COLORTEXTUREFROMCOLOR# COLORNUMBERP DSPCOLOR INSURE.B&W.TEXTURE BITMAPCREATE |\\SFReplicate| LOGOR -LLSH LOGAND LRSH UNFOLD IMIN SELECTQ FREPLACEFIELD \\DSPTRANSFORMX IPLUS \\DSPTRANSFORMY |\\SFInvert| -DSPDESTINATION \\TOTOPWDS \\GETBASE ADD1 \\LINEBLT GETRESOURCE NEWRESOURCE NCREATE) -XCL::GET-PROCESS-PROFILE (THIS.PROCESS PROCESSPROP) ACCESSDEF4 (ASSOC RECORD.FIELDINFO -RECORD.TYPECHECK CONS RECORD.NAME LIST JOINDEF RECFIELDLOOK RECORD.SUBDECS ALLPATHS RECLOOK1 TOPPATHS -MAPCONC RECORDECL SHOULDNT) \\LEAF.RENAMEFILE (GETHOSTINFO FFETCHFIELD \\FTP.RENAMEFILE -\\GENERIC.RENAMEFILE) SETFONTCLASSCOMPONENT (FONTCREATE FONTPROP SASSOC FFETCHFIELD FREPLACEFIELD CONS -) \\FONT.COMPARESYMBOL (CL:AREF \\PNAMECELL \\ATOMCELL FFETCHFIELD U-CASE NCHARS CHCON1 IDIFFERENCE -\\PROPCELL CONSTANT ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE IPLUS) ITEMW.REPAINTFN ( -WINDOWPROP \\ITEMW.FLIPITEM) \\DSPYPOSITION.DISPLAY (FFETCHFIELD \\INVALIDATEDISPLAYCACHE -FREPLACEFIELD) SUPERPRINT0 (GET CL:FUNCALL SUPERPRINT/WRAPPER ASSOC APPLY* SUPERPRINT RPARS IPLUS -DSPXPOSITION WIDTH STRINGWIDTH) \\TEDIT.ABBREV.EXPAND (FFETCHFIELD SELECTQ SUB1 MKSTRING CHARACTER -\\BIN TEDIT.SEL.AS.STRING \\TEDIT.TRY.ABBREV TEDIT.GET.LOOKS) BACKARROWP (NTHCHARCODE) SUBPRINT ( -DSPXPOSITION SUPERPRINTGETPROP PRINDOTP DSPYPOSITION GET CL:FUNCALL SETFONT SUPERPRINT NTHCHAR SELECTQ - FASSOC IPLUS WIDTH STRINGWIDTH PRINTPROG PRINTSQ BLANKS TIMES SUBPRINT1 IMIN SUBPRINT/ENDLINE -SUBPRINT GETP NLEFT) \\DSPXPOSITION.DISPLAY (FFETCHFIELD) ASKUSEREXPLAIN (MAPC ASKUSERLOOKUP LISTGET -APPEND LIST MAPRINT PRIN1 CONSTANT CHARACTER POSITION) \\FONT.SYMBOLASSOC (NCHARS CHCON1 IDIFFERENCE) -RPARS (ILEQ SELECTQ RPARS LAST SUB1) \\DSPLINEFEED.DISPLAY (FFETCHFIELD) \\NEWPAGE.PSC ( -POSTSCRIPT.STARTPAGE) PRINTPROGVARS (SUPERPRINT) EXTENDREGIONRIGHT (IPLUS IDIFFERENCE FRPLACA) -\\DSPRIGHTMARGIN.DISPLAY (FFETCHFIELD EQUAL \\SFFIXLINELENGTH) \\FONTFACE (\\FONT.SYMBOLMEMB NCHARS -SELCHARQ CHCON1 NTHCHARCODE SELECTQ \\FONTFACE.COLOR CONSTANT CONS) *WHO-LINE-LAST-VMEM* (LIST) -|\\VFMGet| (FFETCHFIELD \\ALLOCBLOCK LRSH ADD1 MESASIZE LOCF \\ADDBASE \\BLT ELT |\\VFMGetInterval|) -SUBPRINT1 (GETPROP) \\DSPLEFTMARGIN.DISPLAY (FFETCHFIELD \\SFFIXLINELENGTH) CHANGEVAR (MSNEEDUNSAVE -GETRELATION) PTDIFFERENCE (DIFFERENCE CONS) READVARS (RATOM READ) \\DSPFONT.DISPLAY (FFETCHFIELD -\\COERCEFONTDESC FONTCOPY CONS ERROR IMINUS \\FGETCHARWIDTH \\FGETWIDTH \\GETBASE \\GETCHARSETINFO -\\GETBASEPTR UNFOLD LLSH \\CHARSET LRSH \\CREATECHARSET \\CHAR8CODE LOGAND |\\SFFixFont|) -\\BITBLT.DISPLAY (IMIN IDIFFERENCE FFETCHFIELD \\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG \\GETSTREAM -IMAX \\DSPTRANSFORMX IPLUS \\DSPTRANSFORMY .WHILE.TOP.DS. DSPDESTINATION \\GETBASE \\TOTOPWDS -\\BITBLT.BITMAP WINDOWPROP BITMAPCREATE BITBLT COLORIZEBITMAP MAXIMUMCOLOR UNCOLORIZEBITMAP COLORMAP -MAXIMUMSHADE INSURE.B&W.TEXTURE LOGXOR LOGAND INVERT.TEXTURE.BITMAP COLORNUMBERP \\ILLEGAL.ARG -COLORTEXTUREFROMCOLOR# ITIMES |\\SFInvert| SPREADAPPLY*) FONTPROP (\\GETFONTDESC SELECTQ FFETCHFIELD -COPY LIST FONTPROP \\ILLEGAL.ARG) |\\PFGetVol| (ELT) CL::PARSE-SLOT (LIST CL::MAKE-PARSED-SLOT) -\\SCALEDBITBLT.DISPLAY (DSPCLIPPINGREGION BITMAPWIDTH BITMAPHEIGHT DSPYPOSITION DSPXPOSITION -BITMAPCREATE BITBLT EXPANDBITMAP TIMES) COMPILER::META-SUBST-VAR-REF (COMPILER::VAR-REF-VARIABLE -COMPILER::NODE-META-P COMPILER::COPY-CODE COMPILER::NODE-SUBST-P) COMP.DELFN (IPLUS SUB1) FONTASCENT ( -\\GETFONTDESC FFETCHFIELD) FIELDLOOK (RECFIELDLOOK) DSFIT2 (IDIFFERENCE WIDTH STRINGWIDTH DSFIT1 IPLUS - BLANKS TIMES SELECTQ ADD1 SUPERPRINTGETPROP) CL::ASSIGN-SLOT-ACCESSOR (CL::PSLOT-ACCESSOR CL:VALUES -CL:INTERN CL:CONCATENATE STRING CL::PSLOT-NAME) SEDIT::REUSE-LINEAR-FORM (FFETCHFIELD IPLUS -SEDIT::SCAN-FOR-BOUNDS LAST PLUS IDIFFERENCE ADD1 SEDIT::LAST-LINE-LINEAR FREPLACEFIELD) -MAKE-INSPECTOR-PROFILE (XCL:MAKE-PROFILE) \\DSPSCALE.PSC (FFETCHFIELD QUOTIENT) \\UNCOPY (SELECTC -NTYPX \\HILOC \\LOLOC IPLUS LOCAL CREATECELL FFETCHFIELD \\FLOATBOX \\VAG2 LOGOR LLSH PLUS VATOM -%ARRAY-BASE %ARRAY-OFFSET ALLOCSTRING RPLSTRING FCHARACTER \\GETBASEBYTE VTYPEDPOINTER TYPENAME FOLDHI - LRSH ITIMES NCREATE \\ALLOCBLOCK FREPLACEFIELD SUB1 \\PUTBASE \\GETBASE CONS \\UNCOPY ALLOCAL) -FONTDESCENT (\\GETFONTDESC FFETCHFIELD) FB.PROMPTFORINPUT (\\DTEST FFETCHFIELD STRINGWIDTH WINDOWPROP -+ - NCHARS NTHCHARCODE SUBSTRING CONCAT SUB1 CONSTANT CHARACTER ADD1 PLUS NLSETQ TTYINPROMPTFORWORD -PRIN1) DSFIT1 (IDIFFERENCE IPLUS WIDTH STRINGWIDTH BLANKS TIMES) COMPILER::GENCODE-PROGN (MAP -COMPILER::PROGN-STMTS COMPILER::GENCODE) FONTHEIGHT (\\GETFONTDESC FFETCHFIELD) POSTSCRIPT.ENDPAGE ( -FFETCHFIELD FREPLACEFIELD) XCL::PUT-IMPLICIT-KEY-HASH (CL:ERROR \\EQHASHINGBITS LOGXOR \\HILOC LLSH -LOGAND \\LOLOC LRSH XCL::IK-HASH-LAST-INDEX XCL::IK-HASH-BASE XCL::IK-HASH-KEY-ACCESSOR -XCL::IK-HASH-NUM-KEYS XCL::IK-HASH-NULL-SLOTS) ACCESSDEF (RECORDWORD RECFIELDLOOK CHECKDEFS MAPCONC -ACCESSDEF4 LIST RECORDECL RECORDCHAIN GETP FMEMB UNPACK PACK CONS LDIFF NCONC1 SHOULDNT FIXSPELL NCONC - FIELDNAMESIN) MB.THREESTATE.DISPLAY (IMAGEOBJPROP DSPXPOSITION DSPYPOSITION MB.SIZEFN BITMAPCREATE -DSPCREATE FONTPROP IDIFFERENCE SUB1 IPLUS) \\FONTSYMBOL (U-CASE MKATOM ERROR) \\LEAF.FORCEOUTPUT ( -LEAF.ASSURE.FINISHED) \\MAP-CODE-LITERALS (NTYPX \\ADDBASE IMINUS FFETCHFIELD \\GETDTD ITIMES ERROR -UNFOLD LLSH \\INDEXATOMVAL \\VAG2 LRSH LOGAND GETNAMEENTRY CONSTANT SUB1 BYTESPERNAMEENTRY -WORDSPERNAMEENTRY LOGOR CODEBASELT \\GETBASEBYTE LOGXOR IPLUS PLUS \\FINDOP \\INDEXATOMDEF CODEBASELT3 - BIG-VMEM-CODE ADD1 IDIFFERENCE BYTESPERCODEATOM \\INDEXATOMPNAME CODEBASELT2) \\FTP.ADD.USERINFO ( -\\INTERNAL/GETPASSWORD CONS LIST) XCL::EXEC-SHRINKFN (WINDOWPROP THIS.PROCESS) -COMPILER::META-SUBST-UNWIND-PROTECT (COMPILER::MSUBST COMPILER::META-SUBST COMPILER::UNWIND-PROTECT-STMT - REPLACEFIELD) CLISPELL (LISTGET1 FMEMB CONS GETPROP) PRINTSQ (QUOTIENT PLUS DSPXPOSITION IPLUS TIMES -DIFFERENCE PRINDOTP) DINFO.UPDATE.FROM.GRAPH (ADD.PROCESS) CHAT.SENDSCREENPARAMS (STREAMPROP CL:FUNCALL -) SEDIT::CLOSE-NODE-COMMENT (FREPLACEFIELD CONS LIST FFETCHFIELD SEDIT::MAKE-COMMENT-STRING) -\\LOOKUPFONT (FASSOC SASSOC \\FONT.SYMBOLASSOC) EXTENDREGIONBOTTOM (FRPLACA IPLUS IDIFFERENCE) -\\TEDIT.SUBST.FN2 (\\TEDIT.SUBST.FN1 ADD1 SUB1 \\TEDIT.SUBST.FN2 TEDIT.FIND) CHANGEMACRO (MSNEEDUNSAVE - GETRELATION FILEPKGTYPE GETTEMPLATE) MAKEHVPRETTYCOMS (ERROR) COMPILER::*COMPILE-FILE-CONTEXT* ( -COMPILER::MAKE-COMPILER-CONTEXT) PUPNET.DISTANCE (\\LOCATE.PUPNET PLUS) \\NSFILING.OPEN.HANDLE ( -FILING.CALL FFETCHFIELD \\NSFILING.ADD.TO.CACHE FREPLACEFIELDVAL NCREATE SETUPTIMER LIST FUNCTION) -BROKENDEF (\\GET-COMPILED-CODE-BASE FFETCHFIELD LISPERROR UNFOLD LLSH \\#BLOCKDATACELLS -\\ALLOC.CODE.BLOCK + CEIL LOGAND IPLUS ADD1 FOLDHI LRSH CONSTANT SUB1 LOGXOR \\PUTBASEBYTE \\FINDOP - -PLUS OPCODES CODEBASELT \\GETBASEBYTE) \\TEDIT.PACK.TARGETLIST (CONS CONCAT \\TEDIT.PACK.TARGETLIST -MKSTRING) COMP.LABELS (MAPCAR CONS COMP.GENFN CL:FLET COMP.TOPLEVEL.COMPILE FRPLACA COMP.EXPR -WALK-FORM FUNCTION) MSMARKCHANGED (ASSOC LIST SELECTQ CHANGEVAR CHANGEMACRO CHANGEI.S.) /PUTPROP (LIST - GETPROPLIST CONS) COMPILER::*COMPILE-SCAN-CONTEXT* (COMPILER::MAKE-COMPILER-CONTEXT) SEDIT::UNDO-EXTRACT - (FFETCHFIELD PLUS SEDIT::NOTE-CHANGE) \\NSFILING.COMPOSE.PATHNAME (CONCATLIST NCONC MAPCONC LIST -\\NSFILING.ADDQUOTES) \\MAP-CODE-POINTERS (NTYPX \\ADDBASE IMINUS FFETCHFIELD \\GETDTD ITIMES ERROR -\\FINDOP CODEBASELT \\GETBASEBYTE LOGXOR PLUS CODEBASELT3 BIG-VMEM-CODE \\VAG2 LOGOR LLSH ADD1 IPLUS) -/SETATOMVAL (ERRORX LIST GETATOMVAL SETATOMVAL) |\\LFCloseDevice| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 - .UNWIND.PROTECT. FUNCTION |\\PFGetVols| |\\LFCloseDirectory|) /PUTD (GETD LIST) \\SMASHBSPSTREAM ( -\\DTEST FFETCHFIELD \\GETACCESS FREPLACEFIELD) |\\LFFindDirectoryVol| (FFETCHFIELD |\\PFGetVol| -|\\PFGetLVPage| |\\PFGetVols| |\\PFCurrentVol| APPEND) COMPILER::META-SUBST-THROW (COMPILER::MSUBST -COMPILER::META-SUBST COMPILER::THROW-TAG REPLACEFIELD) COMP.STFN (COMP.ST CONS FASSOC IDIFFERENCE) -MAKEALISTCOMS (LIST CONS MAPCONC SASSOC GETTOPVAL) DINFO.INVERT.NODE (WINDOWPROP FFETCHFIELD FRPLACA -REDISPLAYW OPENW) COMPILER::IS-CALL-TO (COMPILER::CALL-FN COMPILER::VAR-REF-VARIABLE COMPILER::VARIABLE-SCOPE - COMPILER::VARIABLE-KIND COMPILER::VARIABLE-NAME) ADD.CHAT.MESSAGE (STREAMPROP CONCAT) -SEDIT::COMMENT-LENGTH (FFETCHFIELD PLUS NCHARS) MAKEKEYLST (NCONC MAPCAR LIST CONCAT U-CASE L-CASE -KWOTE LISTGET PLUS) PFI.PRETTYPRINT (TERPRI) AS.MAKE.CONVERSATION (\\INTERNAL/GETPASSWORD RAND -\\AUTHENTICATION.FIND.SERVER COURIER.OPEN LIST FUNCTION COURIER.CALL PARSE.NSNAME COURIER.FETCH CONS -DES.MAKE.KEY) POSTSCRIPT.PUTCOMMAND (ARG FFETCHFIELD PLUS) FIELDNAMESIN (MAPCONC APPEND -RECORD.FIELDNAMES RECORDECL) XCL::GET-IMPLICIT-KEY-HASH (CL:ERROR) \\TEXTMENU.TOGGLE.DISPLAY ( -IMAGEOBJPROP DSPXPOSITION DSPYPOSITION MB.SIZEFN BITMAPCREATE DSPCREATE FONTPROP IDIFFERENCE) -\\DSPCOLOR.DISPLAY (\\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD BITSPERPIXEL -COLORNUMBERP CONS MAXIMUMCOLOR) LLBREAK (\\GET-COMPILED-DEFINITION CONS PACK* GENSYM BROKENDEF -FREPLACEFIELDVAL NCREATE) CL::REMOVE-DOCUMENTATION (CL::PS-DOCUMENTATION-STRING CL:REST) -\\DSPSCALE2.PSC (FFETCHFIELD) PRINTCODE (\\GET-COMPILED-CODE-BASE GET ERROR NUMFORMATCODE LIST UNFOLD -LLSH CODEBASELT2 LOGOR CODEBASELT \\GETBASEBYTE LOGXOR ADD1 PRIN1 FFETCHFIELD |printout| PRIN2 1ST -PLUS IDIFFERENCE - IPLUS FOLDLO LRSH \\GETBASEPTR TERPRI CLRHASH GETHASH \\FINDOP NEXTBYTE ALLOCAL -CONS LOGAND SUB1 LOCAL ASSOC SELECTQ PUTHASH \\INDEXATOMDEF \\VAG2 \\INDEXATOMPNAME -\\TYPENAMEFROMNUMBER NTH) WHO-LINE-SAVE-VMEM (FREPLACEFIELDVAL NCREATE CONS SAVEVM) SHOW.CLEARINGHOUSE - (CONS MAPCAR CH.LIST.ORGANIZATIONS CH.LIST.DOMAINS CONCAT SHOWGRAPH LAYOUTSEXPR FUNCTION) -COMPILER::COMPILE-FILE-PROCESS-FUNCTION (COMPILER::COMPILE-AND-DUMP) WHO-LINE-VMEM (IQUOTIENT IPLUS -MAX TIMES VMEMSIZE RSH .VMEM.CONSISTENTP. FFETCHFIELD FRPLACA CONCAT) SEDIT::RECOMPUTE-FORMAT-VALUES ( -FFETCHFIELD) SEDIT::PAINT-TO-END-OF-LINE (FFETCHFIELD ADD1 IDIFFERENCE IPLUS SEDIT::REPAINT) -SEDIT::SKIP-TO-GAP (FFETCHFIELD SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW PRIN1) WINDOWTITLEFONT ( -DSPFONT) COMP.STPOP (RPTQ COMP.ST) DINFO.LAYOUTGRAPH (FFETCHFIELD FONTP MAPCAR FASSOC CONS LAYOUTGRAPH - NCONC LIST) CHAT.LOGINFO (STREAMPROP CL:FUNCALL) PRINTOPCODES (TERPRI MAPC LIST \\FINDOP PRIN1 -PRINTNUM) \\DEVICESYMBOL (\\GETSTREAM FFETCHFIELD \\FONTSYMBOL) \\DSPBACKCOLOR.DISPLAY ( -\\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD COLORNUMBERP CONS MAXIMUMCOLOR) -SEDIT::SELECTED-FN-NAME (SEDIT::CLOSE-NODE SEDIT::GET-SELECTED-STRUCTURE FFETCHFIELD) -OPENDISPLAYSTREAM (GETSTREAM CREATEW LISTGET) \\DSPCOLOR.PSC (FFETCHFIELD) SHAPEW (\\INSUREWINDOW -WINDOWPROP FFETCHFIELD MINIMUMWINDOWSIZE CREATEREGION IMAX GETREGION WINDOWREGION APPLY* MOVEW COPYALL -) COMP.TAGBODY (COMP.BIND.VARS COMPERROR CONS FRPLACD COMP.STTAG FASSOC COMP.EFFECT COMP.UNBIND.VARS) -SI::*CLOSURE-CACHE* (XCL::MAKE-IMPLICIT-KEY-HASH-TABLE) FB.PROMPTW.FORMAT (\\DTEST FFETCHFIELD CL:APPLY -) XCL::SETUP-EXEC-WINDOW (WINDOWADDPROP) XCL:UNBREAK-FUNCTION (MAPCONC XCL:UNBREAK-FUNCTION GET GETD -CL:DELETE LIST CL:FIND-IF CL:FUNCTION CL:THIRD) \\IRM.GET.KEYWORDS (PRIN1 GETPROMPTWINDOW GETHASHFILE -\\IRM.GET.HASHFILE) MOVECHARBITMAP (\\GETFONTDESC GETCHARBITMAP FONTPROP IMAX BITMAPCREATE BITMAPWIDTH - IPLUS IDIFFERENCE IMIN) DECODEBUTTONS (SMALLP NCONC LOGAND CONS) MB.MARGINBAR.DISPLAYFN (IMAGEOBJPROP - IMAGEBOX DSPCREATE BITMAPCREATE CONS DSPCLIPPINGREGION IDIFFERENCE DSPXPOSITION DSPYPOSITION) -COMP.RETURN-FROM (COMP.RETURN FASSOC GETHASH CONS) REDISPLAYW (WINDOWOP SPREADAPPLY* FFETCHFIELD) -\\INSPECT.STORE.FATCHAR (LIST \\GETBASE \\PUTBASE CHARCODE.DECODE) SEDIT::OUTPUT-STRING (FFETCHFIELD -SEDIT::STRINGWIDTH RPLACD FREPLACEFIELD CONS FREPLACEFIELDVAL NCREATE IMAX FONTPROP SEDIT::ADVANCE -PLUS MKSTRING SEDIT::MAP-FONT) COMPILER::GENCODE-OPCODES (DECLARE) GETCHARBITMAP (CHCON1 CL:CHAR-INT -\\GETFONTDESC \\GETCHARSETINFO \\GETBASEPTR FFETCHFIELD UNFOLD LLSH \\CHARSET LRSH \\CREATECHARSET -BITMAPCREATE \\FGETIMAGEWIDTH \\GETBASE \\CHAR8CODE LOGAND \\FGETWIDTH FONTPROP \\FGETOFFSET) -SUBDECLARATIONS (MAPCAR RECORD.SUBDECS RECLOOK APPEND) \\8DISPLAYINIT (FUNCTION FREPLACEFIELDVAL -NCREATE CONS \\DEFINEDEVICE) \\LEAF.BREAKCONNECTION (FFETCHFIELD FDEVOP SPREADAPPLY* CLOSEF -\\CLOSELEAFCONNECTION) FONTSAVAILABLE (IMAGESTREAMTYPE FONTSAVAILABLE DEFAULTFONT \\COERCEFONTDESC -DSPFONT FONTPROP LITATOM IGREATERP \\FONTFACE U-CASEP U-CASE IGEQ UNION \\LOOKUPFONTSINCORE MAPCONC -APPLY* ASSOC FUNCTION) WINDOWREGION (WINDOWPROP APPLY*) FONTMAPARRAY (FFETCHFIELD ARRAY SETA ELT PLUS -CONS COPY) \\CORE.RELEASEPAGES (FFETCHFIELD FRPLACD) \\TEDIT.PROCIDLEFN (DSPCLIPPINGREGION LASTMOUSEX -LASTMOUSEY WINDOWPROP WHICHW \\TEDIT.BUTTONEVENTFN) SI::ARGUMENT-ERROR (STKNTH STKNAME STKNARGS CL:ERROR -) \\CORE.CLOSEFILE (\\GETACCESS FFETCHFIELD FREPLACEFIELD) \\CORE.GENERATEFILES (DIRECTORY.MATCH.SETUP - FILENAMEFIELD MAPCONC FFETCHFIELD NCONC ASSOC LIST CONCAT MAPCAR FUNCTION CONS) \\CORE.UPDATEOF ( -FFETCHFIELD UNINTERRUPTABLY PLUS FOLDLO LRSH MOD IMOD) \\PUPNET.CLOSERP (\\LOCATE.PUPNET LRSH ILESSP) -TEDIT.PUT (TEXTOBJ \\TEDIT.MAKEFILENAME TEDIT.GETINPUT \\TEXTSTREAM.FILENAME TEXTPROP APPLY* -FFETCHFIELD FULLNAME RESETSAVE OPENSTREAM U-CASE FILENAMEFIELD \\TEDIT.PUTRESET CONS THIS.PROCESS -FREPLACEFIELD TEDIT.PROMPTPRINT CONCAT TEDIT.PUT.PCTB2 TEDIT.PUT.PCTB CLOSEF CLOSEF? -\\TEDIT.ORIGINAL.WINDOW.TITLE REVERSE \\GETBASEPTR \\FIRSTNODE TEXTSTREAM.TITLE TEDITMENU.STREAM -PACKFILENAME) \\4DISPLAYINIT (FUNCTION FREPLACEFIELDVAL NCREATE CONS \\DEFINEDEVICE) DIRECTORY.MATCH ( -NTHCHARCODE PLUS DIRECTORY.MATCH1) \\CHTOPC (FFETCHFIELD IPLUS \\GETBASEFIXP \\GETBASEPTR - PLUS) -XCL::EXEC-CLOSEFN (WINDOWPROP THIS.PROCESS DEL.PROCESS) DIRECTORY.MATCH.SETUP (CHCON UPPERCASEARRAY -SELCHARQ GETCASEARRAY) FONTFILEFORMAT (OPENP OPENSTREAM SELECTC \\WIN IPLUS LLSH \\BIN LIST LOGOR LRSH -) SEDIT::CFV-COMMENT (FFETCHFIELD SELECTQ FREPLACEFIELD SHOULDNT) \\NSFILING.CONFLICTP (FFETCHFIELD -\\NSFILING.FULLNAME SELECTQ DIRTYABLE LOGAND CONSTANT LOGOR \\ILLEGAL.ARG) \\CORE.FILEINFOFN ( -\\CORE.GETFILEINFO.FROM.INFOBLOCK) TEDIT.GET.OBJECT0 (FFETCHFIELD \\ATMIN GETFILEPTR READIMAGEOBJ -\\TEDIT.UNIQUIFY.CHARLOOKS CHARLOOKS.FROM.FONT) \\IRM.WILDCARD (CONS UNPACK DUNPACK LIST) CHOOZ (CHCON - FLENGTH ELT ADD1 LAST APPLY* GENERATE NCHARS IQUOTIENT ITIMES IDIFFERENCE SKOR DCHCON LIST MKATOM -CONS PACKC CHOOZ1 SUB1 DREVERSE) \\CORE.NEXTFILEFN (FRPLACA FFETCHFIELD NAMEFIELD) MB.NB.DISPLAYFN ( -IMAGEOBJPROP DSPXPOSITION DSPYPOSITION BITMAPCREATE DSPCREATE IDIFFERENCE IPLUS) \\LOCATE.PUPNET ( -SMALLP \\GETBASEPTR UNFOLD LLSH LOGAND CONS SETUPTIMER) TEDIT.PUT.PCTB2 (FFETCHFIELD TEXTPROP -TEDIT.FORMATTEDFILEP \\EDITELT GETBASEPTR \\GETBASEPTR \\ADDBASE2 \\ADDBASE ADD1 OPENFILE GETFILEPTR -PLUS FLENGTH \\TEDIT.PUT.PARALOOKS.LIST2 \\TEDIT.PUT.CHARLOOKS.LIST2 \\TEDIT.PUT.CHARLOOKS.LIST -TEDIT.PUT.OBJECT OPENP OPENSTREAM IPLUS UNFOLD LLSH SUB1 %ARRAY-OFFSET %ARRAY-BASE %ARRAY-TYPE-NUMBER -\\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE \\CHARSET LRSH \\CHAR8CODE LOGAND CONS EVAL -GETEOFPTR \\BOUT \\TEDIT.UNIQUIFY.CHARLOOKS \\TEDIT.UNIQUIFY.PARALOOKS) NAMEFIELD ( -UNPACKFILENAME.STRING PACKFILENAME.STRING NCHARS MKATOM) \\TEDIT.UNIQUIFY.PARALOOKS (FFETCHFIELD CONS) - \\TERPRI.PSC (FFETCHFIELD PLUS IPLUS) \\CURVE (\\DSPTRANSFORMX IPLUS IDIFFERENCE LRSH SUB1 -FFETCHFIELD \\DSPTRANSFORMY IABS IMINUS ADD1 ITIMES DSPDESTINATION \\GETBASE \\TOTOPWDS \\FBITMAPBIT -\\BBTCURVEPT \\CONVERTTOFRACTION FPLUS \\GETINTEGERPART IMAX FQUOTIENT PLUS) CLISPFOR (DWIMUNDOCATCH -LISTGET1 LIST RESETVARS .RESETLST. CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION CL:CATCH -XNLSETQ CLISPFOR0) \\LOOKUPFONTSINCORE (NCONC LIST) *WHO-LINE-LAST-DIRECTORY* (CL:NAMESTRING CONS -PATHNAME MKSTRING) \\INSPECT.STORE.32 (LIST \\INSPECT.FETCH.32 \\PUTBASEFIXP UNFOLD LLSH) -\\TEDIT.FIND.WC1 (SUB1 TEDIT.FIND \\TEDIT.FIND.WC1 IPLUS NCHARS CONCATLIST \\TEDIT.PACK.TARGETLIST -ADD1) COMPILER::GENCODE-MV-CALL (COMPILER::MV-CALL-FN COMPILER::MV-CALL-ARG-EXPRS CL:FLET -COMPILER::VARIABLE-NAME COMPILER::VAR-REF-VARIABLE) \\CORE.FINDPAGE (FFETCHFIELD \\ALLOCBLOCK FOLDHI -LRSH IPLUS FRPLACD CONS) MAKEHASHLINKS (GETFIELDFORCREATE RECORD.CREATEINFO SELECTQ CONS RECORDBINDVAL - LIST EMBEDPROG MKPROGN DREVERSE) SEDIT::REDISPLAY (SEDIT::VERIFY-STRUCTURE) EDITCHAR (\\GETFONTDESC -PUTCHARBITMAP EDITBM GETCHARBITMAP) FONTPROFILE.ADDDEVICE (U-CASE ASSOC FONTSET) COMPILER::META-SUBST-SETQ - (COMPILER::MSUBST COMPILER::META-SUBST COMPILER::SETQ-VALUE REPLACEFIELD) DINFO.SHOWGRAPH ( -GRAPHREGION DINFO.GET.GRAPH.WINDOW WINDOWPROP HEIGHTIFWINDOW WIDTHIFWINDOW IPLUS IDIFFERENCE CONS -SHOWGRAPH FUNCTION) FONTSET (FASSOC FONTCREATE /SETTOPVAL CONS ASSOC SELECTQ FONTCLASS GETTOPVAL EVAL) - CHAT.FLUSH&WAIT (STREAMPROP CL:FUNCALL) SPP.READP (LOGAND FFETCHFIELD LISPERROR FULLNAME) COMP.RETURN - (GETHASH CONS) \\COERCETODS (FFETCHFIELD \\ILLEGAL.ARG) \\TEDIT.UNIQUIFY.CHARLOOKS (FFETCHFIELD CONS) - \\SETPOS.PSC (FFETCHFIELD FREPLACEFIELD) \\CORE.GETFILEHANDLE (\\CORE.GETINFOBLOCK SELECTQ -FFETCHFIELD LIST CONS FREPLACEFIELDVAL NCREATE FUNCTION) \\UNITWIDTHSVECTOR (\\ALLOCBLOCK UNFOLD LLSH -IPLUS PLUS) \\DSPTOPMARGIN.PSC (FFETCHFIELD) EDITBM (BITMAPCOPY EVALV \\READBMDIMENSIONS BITMAPCREATE -BITSPERPIXEL WINDOWPROP DSPCLIPPINGREGION BITMAPHEIGHT BITMAPWIDTH FFETCHFIELD IQUOTIENT ITIMES IMAX -IMIN IDIFFERENCE ADD1 IPLUS CREATEW GETBOXREGION WIDTHIFWINDOW HEIGHTIFWINDOW FUNCTION MAXIMUMCOLOR -LIST ERROR!) \\COURIER.OUTPUT.ABORTED (FFETCHFIELD \\BULK.DATA.CLOSE LISPERROR ERROR CONCAT LOGAND -CONSTANT LOGOR CL:THROW) SEDIT::BACKSPACE-COMMENT (FFETCHFIELD SEDIT::CLOSE-NODE NCHARS -SEDIT::SET-SELECTION-NOWHERE) \\IRM.WILD.REF (WINDOWPROP PROG2 PRIN1 GETPROMPTWINDOW \\IRM.WILDCARD -\\IRM.GET.KEYWORDS \\IRM.GET.REF MAPCAR LIST KWOTE CONCAT FREPLACEFIELDVAL NCREATE CONS MENU) -FILES.WHENCHANGED (MARKASCHANGED FILECOMS) \\CORE.DIRECTORYNAMEP (UNPACKFILENAME.STRING > NCHARS) -MBUTTON.FIND.NEXT.BUTTON (FFETCHFIELD \\CHTOPC IMAGEOBJPROP CONS PLUS) SORT.PUPHOSTS.BY.DISTANCE ( -\\LOCATE.PUPNET LRSH SORT) \\TEDIT.PUTRESET (CONS PROCESSPROP) CREATEDSKDIRECTORY (WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION |\\LFEntryPoint| \\GETDEVICEFROMNAME FFETCHFIELD -|\\LFMakeVolumeDirectory| |\\LFOpenDevice| PACKFILENAME.STRING U-CASE) CL::%DEFSTRUCT-CONSP-OPTIONS ( -CL:REMOVE) \\CORE.GETFILEINFO (FFETCHFIELD \\CORE.GETFILEINFO.FROM.INFOBLOCK \\CORE.GETINFOBLOCK) -\\GETLEAFSTRING (\\GETBASE \\GETBASESTRING) CHAT.STARTUP (THIS.PROCESS STRPOS CL:ASSOC SUBSTRING ADD1 -ASSOC CONCAT SUB1 CL:FUNCALL SORT CONS CHAT.CHOOSE.EMULATOR GETCHATWINDOW WINDOWPROP KEYACTIONTABLE -GETHOSTINFO CURRENTINTERRUPTS LIST LISTGET MAPC INTCHAR KEYACTION FUNCTION CHAT.TYPEIN PRIN1 -GETPROMPTWINDOW) SPP.EOFP (LOGAND FFETCHFIELD \\SPP.PREPARE.INPUT SELECTQ) -\\CORE.GETFILEINFO.FROM.INFOBLOCK (SELECTQ FFETCHFIELD IPLUS UNFOLD LLSH FOLDHI LRSH GDATE SELECTC -SHOULDNT) \\NSFILING.CHECK.ACCESS (FFETCHFIELD FILING.CALL ASSOC) SCAVENGEVOLUME (SCAVENGEDSKDIRECTORY -) PFI.HANDLE.EXPR (PRINT PFI.PRETTYPRINT CL:FUNCALL ASSOC FUNCTION) |\\VAMBufferInit| (NCREATE) -MAKEINITFIRST (\\NEWPAGE) \\CREATECHARSET.DISPLAY (\\CREATECHARSET.DISPLAY -\\CREATE-REAL-CHARSET.DISPLAY) SEDIT::QUOTE-CURRENT-SELECTION (SEDIT::CLOSE-NODE FFETCHFIELD) -\\NSRANDOM.CREATE.STREAM (FFETCHFIELD LISPERROR \\NSFILING.FULLNAME FILING.CALL LIST FUNCTION SELECTQ -\\NSFILING.CHECK.ACCESS \\NSFILING.FILLIN.ATTRIBUTES ASSOC FOLDLO LRSH IMOD FREPLACEFIELDVAL NCREATE) -\\PROMPTWINDOW.EXPAND (HEIGHTIFWINDOW TIMES FONTPROP WINDOWPROP CONS \\PROMPTWINDOW.SET.HEIGHT) -SCAVENGEDSKDIRECTORY (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION |\\LFEntryPoint| -|\\VFMGenerateFileIDs| TERPRI \\GETDEVICEFROMNAME FFETCHFIELD MAPC PACKFILENAME.STRING U-CASE -|\\PFFetchString| LOCF \\ADDBASE) SEDIT::OUTPUT-BITMAP (FREPLACEFIELD FFETCHFIELD IMAX IDIFFERENCE -BITMAPHEIGHT IMINUS SEDIT::ADVANCE PLUS BITMAPWIDTH SHOULDNT) PFI.PRINT.TO.TAB (- TIMES DSPSCALE -CHANGEFONT) COMPILER::GENCODE-LET (COMPILER::LAMBDA-REQUIRED COMPILER::LITERAL-VALUE COMPILER::VARIABLE-SCOPE - CL:MAPCAR CL:FUNCTION CL:NREVERSE CL:THIRD COMPILER::VARIABLE-LAP-VAR) EDITGETDEF (EDITMODE -FFETCHFIELD SEDIT::SUBNODE) ALLFIELDS (NCONC RECORD.SUBDECS APPEND ALLFIELDS RECORDECL RECLOOK -RECORD.FIELDNAMES) COPY.TEXT.TO.IMAGE (GETSTREAM DSPRIGHTMARGIN FONTMAPARRAY ARRAYSIZE FUNCTION UNFOLD - LLSH ACCESS-CHARSET LOGAND \\NSIN \\DTEST \\XCCSIN \\BIN IDIFFERENCE \\NSIN.24BITENCODING.ERROR LOGOR - CL:FUNCALL FFETCHFIELD DSPXPOSITION CONSTANT APPLY IPLUS SPREADAPPLY* NTH ERROR TIMES CHARWIDTH -FONTCREATE ELT \\PEEKBIN DSPLEFTMARGIN - REMAINDER NLSETQ RELMOVETO +) \\INSPECT.STORE.CHAR (LIST -\\GETBASEBYTE \\PUTBASEBYTE CHARCODE.DECODE) PURGEHISTORY1 (RPLACA MAPC RPLNODE CONSTANT CHARACTER -PURGEHISTORY2) SEDIT::MUTATE (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW FFETCHFIELD TTYINPROMPTFORWORD -NLSETQ READ OPENSTRINGSTREAM PRIN1) COMP.GO (FASSOC CONS) \\FTP.OPEN.CONNECTION (BESTPUPADDRESS -OPENBSPSTREAM CONS FUNCTION BSPOUTPUTSTREAM \\CANONICAL.HOSTNAME ETHERHOSTNAME CLOSEBSPSTREAM) -\\CREATE-REAL-CHARSET.DISPLAY (\\READDISPLAYFONTFILE MEMB \\CREATEDISPLAYFONT \\GETCHARSETINFO -\\GETBASEPTR FFETCHFIELD UNFOLD LLSH \\CREATECHARSET \\SFROTATECSINFO CONS \\SFMAKEBOLD \\SFMAKEITALIC - \\CREATE-REAL-CHARSET.DISPLAY \\BUILDSLUGCSINFO FONTPROP) \\BUILDSLUGCSINFO (FREPLACEFIELDVAL NCREATE - \\CREATECSINFOELEMENT \\ALLOCBLOCK FOLDHI LRSH IPLUS FFETCHFIELD \\PUTBASE PLUS BITMAPCREATE ROUND -QUOTIENT SUB1) \\ITEM.WINDOW.COPY.HANDLER (WINDOWPROP IN/ITEM? CURSORPOSITION KEYDOWNP ZEROP LOGAND) -READIMAGEOBJ (ASSOC LISTGET CONCAT LIST IMAGEOBJCREATE ENCAPSULATEDIMAGEFNS FULLNAME GETFILEPTR PLUS -APPLY*) \\LEAF.MAYBE.FLUSH.CACHE (FFETCHFIELD \\LEAF.FLUSH.CACHE) DINFO.HISTORIC.UPDATE (WINDOWPROP -WFROMMENU FASSOC FFETCHFIELD PROMPTPRINT PRINTOUT PRIN1 GETPROMPTWINDOW DINFO.UPDATE) SPP.FORCEOUTPUT -(GETSPPCON FFETCHFIELD LOCF \\ADDBASE PLUS \\LOLOC FREPLACEFIELD) COMPILER::META-SUBST-RETURN ( -COMPILER::MSUBST COMPILER::META-SUBST COMPILER::RETURN-VALUE REPLACEFIELD) \\CORE.NAMESCAN ( -\\CORE.NAMESEGMENT CONS) DV (NLAMBDA.ARGS ED ERROR) TEDIT.GET.CHARLOOKS0 (FREPLACEFIELDVAL NCREATE -\\SMALLPIN SUB1 LLSH IDIFFERENCE PACK CHARACTER \\BIN LIST PLUS ZEROP IMINUS \\STRINGIN NCHARS READ -LOGAND FONTCREATE) MOUSESTATE-NAME (SELECTQ HELP) WRITEIMAGEOBJ (FFETCHFIELD LIST KWOTE) -AS.NEXT.VERIFIER (DES.BREAKOUT.BLOCKS DES.MAKE.BLOCKS COURIER.WRITE.REP COURIER.CREATE LIST IDATE RAND - LOGXOR FFETCHFIELD MAPCAR DES.ECB.ENCRYPT) \\CORE.UNPACKFILENAME (NTHCHAR STRPOS ADD1 NCHARS -SUBSTRING SUB1 - FIXP SUBATOM CL:ERROR) \\CREATEDISPLAYFONT (LIST FREPLACEFIELDVAL NCREATE -\\CREATEFONTCHARSETVECTOR \\ALLOCBLOCK ADD1 \\GETBASEPTR FFETCHFIELD UNFOLD LLSH \\CREATECHARSET) -\\HANDLE.PUP.ROUTING.INFO (FFETCHFIELD LOCF \\ADDBASE FOLDLO LRSH IDIFFERENCE \\TRANSLATE.3TO10 ADD1 -\\GETBASEPTR UNFOLD LLSH LOGAND SETUPTIMER CONS FRPLACA - \\RELEASE.ETHERPACKET) -\\NSFILING.FILLIN.ATTRIBUTES (FFETCHFIELD FILING.CALL SELECTQ FREPLACEFIELD) \\COPY (SELECTQ LOCAL -TYPENAME UNLESSRDSYS MKI.ATOM REVERSE \\COPY LAST CONS IGREATERP \\ADDBASE LOGAND ILESSP CREATECELL -LOGOR LRSH %COPY-ONED-ARRAY %COPY-STRING-TO-ARRAY SYSTEMTYPE \\GETBASE \\VAG2 CL:CHAR-CODE ERROR) -\\TEDIT.DIFFUSE.PARALOOKS (FFETCHFIELD) CL:BLOCK (\\EVPROGN) FB.DIRECTORYP (FFETCHFIELD) -\\DSPBOTTOMMARGIN.PSC (FFETCHFIELD) MAKEINITLAST (SYSTEMTYPE MAPHASH IMAX MINFS ITIMES ARRAYSIZE GCGAG - MAPC SETPROPLIST COPY SETTOPVAL FILEARRAYBASE BOUTZEROS IDIFFERENCE TIMES UNFOLD LLSH IMOD \\LOLOC -PAGELOC IPLUS \\HILOC LRSH ALLOCAL APPEND \\ATOMVALINDEX NTYPX SHOULDNT LOCAL EVALV ILEQ \\LOCKVAR -|printout| TERPRI DUMPINITPAGES) COMP.PROG (MAPCAR COMPERROR CONS COMP.BIND.VARS COMP.LOOKFORDECLARE -APPEND ADD1 SELECTQ FRPLACD COMP.STTAG FASSOC COMP.UNBIND.VARS) PUTCHARBITMAP (TYPENAMEP CHARCODEP -CHCON1) SET-CONNECTED-DIRECTORY-INTERACTIVELY (MENU FREPLACEFIELDVAL NCREATE CONS WHO-LINE-COPY-INSERT - PROMPTFORWORD CL:NAMESTRING PROCESS.EVALV TTY.PROCESS CNDIR) |\\LFCloseFile| (WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION \\GETACCESS |\\PFGetVol| FFETCHFIELD PLUS -|\\LFUpdateLeaderPage|) SEDIT::NEXT-LINEAR-ITEM (FFETCHFIELD) SEDIT::OUTPUT-SPACE (FFETCHFIELD RPLACD -FREPLACEFIELD CONS SEDIT::ADVANCE PLUS IQUOTIENT) GETTOPVAL (FFETCHFIELD \\VALCELL \\ATOMCELL) -\\ITEM.WINDOW.BUTTON.HANDLER (MODERNWINDOW.BUTTONEVENTFN FUNCTION) SUBREGIONP (IPLUS IGEQ) -COMPILER::META-SUBST-PROGN (COMPILER::PROGN-STMTS COMPILER::META-SUBST-STMTS) CHAT.RECONNECT ( -WINDOWPROP APPLY* CHAT.RECONNECT.OFF LOGAND FUNCTION FREPLACEFIELDVAL NCREATE CONS TTY.PROCESS -ADD.PROCESS LIST KWOTE) CHAT.CLOSE.CONNECTION (CLOSEF) DIRECTORY.NEXTFILE (\\GENERATENEXTFILE -CONCATCODES FRPLACA MKSTRING FRPLACD) |\\VFMGenerateFileIDs| (WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 -.UNWIND.PROTECT. FUNCTION UNINTERRUPTABLY \\ALLOCBLOCK LRSH ADD1 MESASIZE \\BLT |\\VFMGet| LOCF -\\ADDBASE FFETCHFIELD LIST) MBUTTON.FIND.NEXT.FIELD (FFETCHFIELD \\CHTOPC PLUS IDIFFERENCE IPLUS IMAX) - MSEDITE (ARG LIST PLUS CONS) \\COREFILE.SETPARAMETERS (FFETCHFIELD SELECTQ \\ILLEGAL.ARG -FREPLACEFIELD FIXP IDATE) TEXTTOIMAGEFILE (RESETLST OPENSTREAM FULLNAME OPENIMAGESTREAM PACKFILENAME -APPEND LIST CONCAT GETFILEINFO CLOSEF) \\SFROTATECSINFO (\\SFROTATEFONTCHARACTERS FFETCHFIELD -\\SFROTATECSINFOOFFSETS FREPLACEFIELDVAL NCREATE) BLTSHADE (\\BLTSHADE.BITMAP \\OUTSTREAMARG -\\GETSTREAM IMAGEOP SPREADAPPLY* FFETCHFIELD DSPOPERATION) PURGEHISTORY (RESETVARS .RESETLST. LIST -CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION ASKUSER REMPROP PURGEHISTORY2 GETPROP) -SEDIT::MENU-SUBSTITUTE-SELECTEDFN (LISTGET FM.ITEMPROP WINDOWPROP MAINWINDOW FM.EDITITEM LIST -TTY.PROCESS) \\OPENLEAFCONNECTION (GETHOSTINFO BESTPUPADDRESS CONS \\INTERNAL/GETPASSWORD WITH.MONITOR - CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION NCREATE \\CREATECELL CREATE.MONITORLOCK CONCAT -FREPLACEFIELDVAL PACK* LIST ALLOCATE.PUP LOCF \\ADDBASE + FFETCHFIELD LOGOR \\FIXPASSWORD TIMES -IQUOTIENT) \\READDISPLAYFONTFILE (\\FINDFONTFILE LIST OPENSTREAM SELECTQ FONTFILEFORMAT FUNCTION -\\READSTRIKEFONTFILE \\READACFONTFILE CLOSEF) \\SEARCHFONTFILES (\\FONTSYMBOL \\FONTFACE -\\FONTFILENAME.OLD \\FONTFILENAME DIRECTORY PACKFILENAME.STRING \\FONTINFOFROMFILENAME CONS) -CH.LIST.OBJECTS (COURIER.CALL CH.FINDSERVER PARSE.NSNAME CH.PROPERTY CH.GETAUTHENTICATOR) -\\DSPSPACEFACTOR.PSC (FFETCHFIELD FIXR TIMES) EXTENDREGION (IDIFFERENCE IPLUS FRPLACA ADD1) -WHO-LINE-COPY-INSERT (WFROMDS PROCESS.TTY TTY.PROCESS COPYINSERT BKSYSBUF) COMPILER::META-SUBST-PROGV -(COMPILER::MSUBST COMPILER::META-SUBST COMPILER::PROGV-SYMS-EXPR REPLACEFIELD) -EXPAND-DESTRUCTURING-BIND (GENSYM) WHO-LINE-CURRENT-DIRECTORY (PROCESS.EVALV TTY.PROCESS FRPLACA -FRPLACD CONCAT CL:PATHNAME-DIRECTORY CL:PATHNAME-HOST CL:NAMESTRING CL:FUNCTION SORT) OR (\\EVAL) -TEDIT.GET.PARALOOKS0 (FREPLACEFIELDVAL NCREATE CONS \\SMALLPIN SUB1 LLSH IDIFFERENCE \\BIN SELECTC -SHOULDNT SELECTQ LIST PLUS ZEROP) GETFIELDFORCREATE (RECORD.DEFAULTFIELDS MAKEACCESS ACCESSDEF4 LIST -ASSOC SUBFIELDCREATE SELECTQ) HASH.PASSWORD (MKSTRING SUB1 %ARRAY-OFFSET FFETCHFIELD %ARRAY-BASE IPLUS - %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE IMOD ITIMES CONSTANT EXPT -L-CASECODE \\DECRYPT.PWD.CHAR LOGXOR) *ATTACHED-WINDOW-COMMAND-SYNONYMS* (LIST CONS) COMPSETY (SELECTQ -) \\ROUTE.PUP (FFETCHFIELD LOCF \\ADDBASE \\LOCATE.PUPNET \\TRANSLATE.3TO10) \\NSFILING.FULLNAME ( -FFETCHFIELD \\NSFILING.FILLIN.ATTRIBUTES SELECTQ NCHARS NTHCHARCODE PLUS CONS SUBSTRING - ADD1 SUB1 -\\NSFILING.ADDQUOTES MAPCONC LIST CONCATLIST NCONC MKATOM U-CASE) FONTCOPY (\\GETFONTDESC ARG LISTGET -ADD1 PLUS FFETCHFIELD \\FONTFACE CONS LIST SELECTQ \\ILLEGAL.ARG FONTCREATE) \\CORE.BACKFILEPTR ( -FFETCHFIELD UNINTERRUPTABLY PLUS SUB1 IMAX FREPLACEFIELD) TEDIT.HARDCOPY (PRINTERPROP PRINTERTYPE -TEDIT.FORMAT.HARDCOPY CONCAT TEDIT.PROMPTPRINT TEXTOBJ) \\FONTINFOFROMFILENAME (UNPACKFILENAME.STRING -LISTGET NTHCHAR PLUS MKATOM U-CASE SUBSTRING SUB1 ADD1 LIST IMAGESTREAMTYPE SELECTQ \\FONTSYMBOL) -\\CORE.SETEOFPTR (IDIFFERENCE \\GETEOFPTR LOGAND FFETCHFIELD FOLDLO LRSH MOD IMOD \\CORE.FINDPAGE SUB1 -) CONSTANTEXPRESSIONP (LIST GETHASH CONSTANTEXPRESSIONP SELECTQ NLSETQ EVAL COMPILER:OPTIMIZE-AND-MACROEXPAND - COMPILER:MAKE-CONTEXT APPLY GETMACROPROP MACROEXPANSION) \\CORE.SETFILEPTR (FOLDLO LRSH MOD IMOD -FFETCHFIELD FREPLACEFIELD) GETTEMPLATE (SETTEMPLATE) IMAPLIST (HEADPT NEXTPT XYPT.Y XYPT.X IDIFFERENCE - XYSECTLSEG CONS REVERSE) TEDIT.GET.PAGEFRAMES1 (TEDIT.PARSE.PAGEFRAMES1 READ) -XCL::ADJUST-IMPLICIT-KEY-HASH (UNINTERRUPTABLY XCL::IK-HASH-BASE XCL::IK-HASH-LAST-INDEX -XCL::IK-HASH-NUM-SLOTS XCL::IK-HASH-NUM-KEYS XCL::IK-HASH-NULL-SLOTS XCL::IK-HASH-KEY-ACCESSOR) -\\CORE.NAMESEGMENT (LIST) \\SEARCHDISPLAYFONTFILES (SELECTQ SYSTEMTYPE \\SEARCHFONTFILES SHOULDNT) -\\PUPGATELISTENER (OPENPUPSOCKET SETUPTIMER THIS.PROCESS FUNCTION FFETCHFIELD GETPUP AWAIT.EVENT -ALLOCATE.PUP SUB1) SEDIT::NEW-BLOCK (FFETCHFIELD FREPLACEFIELD) \\NSFILING.HANDLE.ERROR (PRIN1 -WITHOUT.SESSION.MONITOR FFETCHFIELD CL:ERROR) \\24DISPLAYINIT (FUNCTION FREPLACEFIELDVAL NCREATE CONS -\\DEFINEDEVICE) \\CORE.GETNEXTBUFFER (FFETCHFIELD SELECTQ PLUS FREPLACEFIELD \\EOF.ACTION -\\CORE.FINDPAGE) NUMBERP (\\TYPEMASK.UFN LRSH) GETPROPLIST (\\GETBASEPTR \\PROPCELL \\ATOMCELL -CONSTANT) SUBFIELDCREATE (SUBDECLARATIONS RECORD.NAME RECORDECL0 RECORD.CREATEINFO LIST -RECORD.FIELDNAMES ASSOC MAKECREATE0 MAKEHASHLINKS) \\FINDFONTFILE (FINDFILE \\FONTFILENAME.OLD -\\FONTFILENAME) INSPECTW.REPAINTFN (WINDOWPROP XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES -XCL::PROFILE-VALUES DSPCLIPPINGREGION IPLUS APPLY* ITEMW.REPAINTFN \\ITEMW.FLIPITEM) COURIERTRACE ( -CREATEW FUNCTION FONTCREATE) \\CORE.PACKFILENAME (CONCAT FFETCHFIELD MKATOM U-CASE) \\CORE.DELETEFILE -(FFETCHFIELD \\CORE.GETINFOBLOCK SPREADAPPLY* RPLACD LIST CONS) \\INSPECT.STORE.16 (LIST \\GETBASE -\\PUTBASE) \\SPP.BOUTS (GETSPPCON FFETCHFIELD \\BUFFERED.BOUTS \\SPP.STREAM.LOST) SPP.BACKFILEPTR ( -FFETCHFIELD FREPLACEFIELD PLUS) COMPSETREAD (LISPXREADBUF LISPXREAD PEEKC ASKUSER PRINT LIST) -SETTOPVAL (SELECTQ LISPERROR UNLESSRDSYS FREPLACEFIELD \\VALCELL \\ATOMCELL) PFI.PRINT.ENVIRONMENT ( -LISTGET SELECTQ READTABLEPROP CL:PACKAGE-NAME SHOULDNT TERPRI) \\CORE.GETINFOBLOCK (FFETCHFIELD -\\CORE.NAMESCAN FASSOC \\CORE.PACKFILENAME FREPLACEFIELDVAL NCREATE LIST CONS IDATE FRPLACD ADD1 FLAST -) \\CORE.SETACCESSTIME (IDATE FFETCHFIELD) \\INSPECT.STORE.8 (LIST \\GETBASEBYTE \\PUTBASEBYTE) -MAKECREATELST1 (GETFIELDFORCREATE MAKECREATELST1 NCONC LIST PLUS) FINDFILE (INFILEP SPELLFILE) -PURGEHISTORY2 (LISTGET1 LIST PURGEHISTORY2) \\INSPECT.FETCH.FATCHAR (CHARACTER \\GETBASE) -\\RELEASE.FTPCONNECTION (FRPLACA) \\SFMAKEITALIC (FFETCHFIELD IPLUS BITMAPCREATE \\FGETOFFSET -\\GETBASE ADD1 \\FGETWIDTH IDIFFERENCE IQUOTIENT IMIN IMAX ITIMES PLUS FREPLACEFIELDVAL NCREATE) -COMPILER::COMPILE-FILE-PROCLAMATION (DECLARE CL:EVAL CL:SECOND COMPILER::FIND-TOP-ENVIRONMENT CL:CERROR -) MOUSESTATE-EXPR (LIST MOUSESTATE-NAME SELECTQ CONS MAPCAR HELP MOUSESTATE-EXPR) \\MKATOM (SUB1 IPLUS - \\GETBASEFAT \\GETBASE PLUS UNLESSRDSYS \\GETBASETHIN \\GETBASEBYTE \\ADDBASE IDIFFERENCE -\\PARSE.NUMBER LOGAND LLSH ADD1 IPLUS16 \\LOLOC FFETCHFIELD ITIMES \\PROPCELL \\ATOMCELL CONSTANT -ATOM.HASH.REPROBE LOGOR LOGXOR UNINTERRUPTABLY \\CREATE.SYMBOL \\PUTBASE \\ATOMPNAMEINDEX NTYPX -SHOULDNT) \\CREATECOREDEVICE (FUNCTION LIST FREPLACEFIELDVAL NCREATE) SETPROPLIST (FREPLACEFIELD -\\PROPCELL \\ATOMCELL CONSTANT) MBUTTON.FIND.BUTTON (MKATOM TEXTOBJ FFETCHFIELD \\CHTOPC IMAGEOBJPROP -PLUS) \\FONTFACE.COLOR (\\DEVICESYMBOL U-CASEP U-CASE STRPOS SUBATOM SUB1 SELECTQ CONSTANT CONS -SELCHARQ NTHCHARCODE ADD1 \\DISPLAYSTREAMTYPEBPP COLORNUMBERP COPY LIST MAXIMUMCOLOR) SPELLFILE1 ( -\\GENERATENEXTFILE ELT UNPACKFILENAME.STRING SELECTQ MKATOM PACKFILENAME.STRING) -\\GENERIC-UNREGISTER-STREAM (FFETCHFIELD DREMOVE) POSTINITARRAYS (\\ALLOCBLOCK ADD1 IDIFFERENCE UNFOLD - LLSH IPLUS \\HILOC LRSH \\LOLOC FOLDLO TERPRI IMINUS \\ALLOCBLOCK.NEW \\PUTBASEPTR LOCF \\ATOMCELL -PAGELOC PLUS) \\PARSE.NUMBER (IPLUS FFETCHFIELD IDIFFERENCE SUB1 SELECTQ \\INVALID.INTEGER \\MKINTEGER - PLUS \\FLOATINGSCALE FLOAT SELCHARQ \\GETBASECHAR \\GETBASEFAT \\GETBASE \\GETBASETHIN \\GETBASEBYTE -ADD1 \\INVALID.DOTTED.SYMBOL /) GETNSPRINTER (CH.LIST.OBJECTS PRIN1 ERROR LOOKUP.NS.SERVER -PARSE.NSNAME CONS) SEDIT::LINE-FINISHED (FFETCHFIELD IDIFFERENCE IPLUS NCREATE FREPLACEFIELD) -SPELLFILEDIR (INFILEP PACKFILENAME FASSOC) COREDEVICE (\\DEFINEDEVICE \\CREATECOREDEVICE) -WHO-LINE-CONTROL-SELECT (CL:FLET) WINDOWPOSITION (WINDOWPROP CONS) FB.FETCHFILENAME (\\DTEST -FFETCHFIELD) CH.DOMAINS.SERVED (NLSETQ COURIER.CALL CH.GETAUTHENTICATOR) MSEDITF (ARG LIST PLUS CONS -GETDEF) FIXSPELL1 (CONS POSITION STRINGP FASSOC LIST CLBUFS ASKUSER ITIMES NCHARS) |\\VAMAdjustGroup| -(NCREATE FFETCHFIELD ADD1) \\FONTFILENAME (\\FONTFACE CONCAT \\ILLEGAL.ARG \\PRINDATUM.TO.STRING LIST -CHCON1 PACKFILENAME.STRING CONCATCODES) SEDIT::MENU-SELECTEDFN (WINDOWPROP MAINWINDOW -SEDIT::AWAKE-COMMAND-PROCESS APPEND SEDIT::LOOKUP-COMMAND CL:GETHASH FM.ITEMPROP FFETCHFIELD) -SPELLFILE.MATCHINGDIRS (LISTGET UNPACKFILENAME SELECTQ DIRECTORYNAME LIST FASSOC CONS) -|\\LFEntryPoint| (ATOM STRINGP MACHINETYPE |\\PFGetLVPage| |\\LFNormalizeVolumeName| -|\\LFFindDirectoryVol|) ALISTS.GETDEF (ASSOC GETTOPVAL LIST) \\CORE.GETFILENAME (\\CORE.NAMESCAN -FFETCHFIELD \\CORE.NAMESEGMENT SELECTQ ADD1 FLAST SHOULDNT \\CORE.PACKFILENAME) \\FTP.FIX.BROKEN.INPUT - (FFETCHFIELD GETFILEPTR PRIN1 \\FTP.OPENFILE.FROM.PLIST FILENAMEFIELD \\FTP.ADD.USERINFO LIST FRPLACA - BSPOUTPUTSTREAM) SPELLFILE.SPELL (RESETLST SPELLFILE.SPELL1) CHAT.PROMPT.FOR.INPUT (RESETLST -RESETSAVE TTY.PROCESS THIS.PROCESS LIST FUNCTION DEFAULTFONT CREATEW MAKEWITHINREGION WIDTHIFWINDOW + -STRINGWIDTH TIMES CHARWIDTH HEIGHTIFWINDOW FONTPROP CONS TTYINPROMPTFORWORD) \\MAKEMDSENTRY (\\PUTBASE - LRSH LOGOR) CHAT.DEACTIVATE.WINDOW (WINDOWPROP CONCAT SUBSTRING IPLUS STRPOS FUNCTION) COMP.SETN ( -CONS COMP.SETQ) \\NODIRCORE.OPENFILE (\\IOMODEP FFETCHFIELD FREPLACEFIELDVAL REPLACEFIELDVAL FUNCTION -NCREATE LIST CONS IDATE) \\PAGEDGETFILEPTR (FFETCHFIELD IPLUS UNFOLD LLSH) \\ALLOCBLOCK (\\ALLOCHUNK -IPLUS \\ALLOCBLOCK.OLD \\ALLOCBLOCK.NEW RECLAIM \\ADDBASE2 \\ADDBASE IDIFFERENCE FFETCHFIELD -\\DORECLAIM \\DELREF OPCODES) \\INSPECTW.VALUE.MARGIN (IMIN IPLUS IMAX MAXSTRINGWIDTH) -\\DSPCLIPPINGREGION.PSC (FFETCHFIELD) \\LEAF.ABORT.FROMMENU (WFROMMENU WINDOWPROP FFETCHFIELD) -\\TFBRAVO.PARSE.PROFILE.VALUE (TIMES FIX) \\SPP.GETFILEPTR (IPLUS \\MAKENUMBER FFETCHFIELD) -COMPILER::COMPILE-FILE-DEFINE-FILE-INFO (CL:EVAL) CHANGE-TTY-PROCESS-INTERACTIVELY (MENU SORT MAPCAR -LIST PROCESSPROP FREPLACEFIELDVAL NCREATE CONS TTY.PROCESS) COMP.LAMBDA (CONS KWOTE COMP.EFFECT -SELECTQ COMP.PROGN SUBPAIR COMP.GENFN ARGTYPE MAPCAR COMP.CALL COMP.LAM1 LIST COMP.BIND.VARS -COMP.LOOKFORDECLARE APPEND COMP.UNBIND.VARS) \\INITATOMPAGE (UNFOLD LLSH \\ADDBASE2 \\ADDBASE ITIMES -\\PUTBASEPTR EVQ IQUOTIENT PLUS IPLUS) \\PS.SCALEHACK (FFETCHFIELD / LIST FRPLACA FIXR CL:*) -COMPILER::GENCODE-IF (COMPILER::IF-PRED COMPILER::IF-THEN COMPILER::IF-ELSE) INSPECTW.CREATE ( -MAKE-INSPECTOR-PROFILE WITH-INSPECTOR-ENV XCL::PROFILIZE CL:PROGV XCL::PROFILE-VARIABLES -XCL::PROFILE-VALUES DEFAULTFONT APPLY* \\INSPECTW.VALUE.MARGIN MAPCAR IMIN IMAX STRINGWIDTH -DECODE.WINDOW.ARG IPLUS ITIMES LENGTH FONTHEIGHT \\INSPECT.COMPUTE.TITLE FUNCTION INSPECTW.REDISPLAY) -\\POSTSCRIPT.OUTCHARFN (FFETCHFIELD SELCHARQ \\FGETWIDTH \\GETBASE \\CHAR8CODE LOGAND IPLUS LRSH -GETHASH \\POSTSCRIPTTAB \\DSPFONT.PSC LIST) SMASHPATTERN (CONS SMASHPAT1 RECORDGENSYM) FILEARRAYBASE ( -\\ADDBASE LOCAL IPLUS UNFOLD LLSH FOLDLO LRSH IDIFFERENCE GETFILEPTR OUTPUT) \\PAGEDGETEOFPTR ( -FFETCHFIELD IPLUS UNFOLD LLSH) \\LEAF.DEVICEP (NCHARS NTHCHAR PLUS \\CANONICAL.HOSTNAME -\\GETDEVICEFROMNAME \\OPENLEAFCONNECTION \\MAKE.PMAP.DEVICE FUNCTION GETHOSTINFO FREPLACEFIELDVAL -NCREATE \\FTP.OPEN.CONNECTION) |\\PFPilotVolumeP| (FFETCHFIELD) \\TEDIT.EXPANDED.MENU (COPYTEXTSTREAM -\\TEDIT.PRIMARYW TEXTOBJ HEIGHTIFWINDOW) MAPATOMS (\\GETDTD \\ADDBASE ITIMES IMIN \\INDEXATOMPNAME -PLUS FFETCHFIELD LOGAND IPLUS LLSH \\HILOC LRSH \\LOLOC \\VAG2 ADD1 LISPVERSION IREMAINDER ILESSP SUB1 - MDSTYPE# \\GETBASE \\GETBASEPTR) BSPFRNADDRESS (FFETCHFIELD CONS) \\PAGEDEOFP (READONLY FFETCHFIELD -IPLUS) \\CORE.SETFILEINFO (\\CORE.GETINFOBLOCK IDATE LISPERROR FIXP SELECTQ FREPLACEFIELD) -\\ORIGREADTABLE (FREPLACEFIELDVAL NCREATE) LISPVERSION (FFETCHFIELD) COMP.SETQ (COMP.LOOKUPVAR ASSOC) -\\ADD-OPEN-STREAM (FFETCHFIELD CONS) REGIONSINTERSECTP (IPLUS FFETCHFIELD) |\\LFScavFileName| ( -MKSTRING SUB1 %ARRAY-OFFSET FFETCHFIELD %ARRAY-BASE IPLUS %ARRAY-TYPE-NUMBER ADD1 \\GETBASEFAT -\\GETBASE \\GETBASETHIN \\GETBASEBYTE LIST \\LFCASEARRAYFETCH CHCON CONCAT GENSYM) TEDIT.GET.OBJECT1 ( -FFETCHFIELD \\ATMIN GETFILEPTR READIMAGEOBJ \\TEDIT.UNIQUIFY.CHARLOOKS CHARLOOKS.FROM.FONT) -XCL::CLEAR-IMPLICIT-KEY-HASH (CL:ERROR XCL::IK-HASH-BASE CL:1+ XCL::IK-HASH-LAST-INDEX \\ADDBASE -XCL::IK-HASH-NULL-SLOTS XCL::IK-HASH-NUM-SLOTS XCL::IK-HASH-NUM-KEYS) MSFIND (MSFIND) -XCL::HASH-FILE-TYPES-OF (XCL::WHERE-IS-DEFAULT-DEFINE-TYPES XCL::GET-WHERE-IS-ENTRIES -CL:REMOVE-DUPLICATES) |\\VAMUpdateVAM| (IQUOTIENT IREMAINDER |\\VAMGetVAMPageFor| \\GETBASE MASK.1\'S -LSH SUB1 DIFFERENCE LOGAND BITSET LOGOR BITCLEAR LOGNOT) \\CREATE.SYMBOL (\\ALLOCBLOCK FOLDHI LRSH -IPLUS ADD1 CREATECELL \\ADDBASE2 \\ADDBASE ITIMES FOLDLO LOGOR \\PUTBASEBYTE \\GETBASEFAT \\GETBASE -PLUS OPCODES \\PROPCELL \\ATOMCELL CONSTANT) MAXIMUMMAINWINDOWSIZE (WINDOWPROP APPLY* NUMBERP ERROR) -SEDIT::MENU-PRINTBASE-SELECTEDFN (LISTGET FM.ITEMPROP FM.EDITITEM SEDIT::MENU-SELECTEDFN LIST PRIN1 -GETPROMPTWINDOW MAINWINDOW FM.CHANGESTATE) \\DISPLAYSTREAMTYPEBPP (SELECTQ SHOULDNT) -\\INSPECT.FETCH.32 (\\GETBASEFIXP UNFOLD LLSH) TEDIT.NEW.FIND (HELP) \\TEDIT.GET.PARALOOKS1 ( -FREPLACEFIELDVAL NCREATE CONS \\SMALLPIN SUB1 LLSH IDIFFERENCE \\BIN SELECTC SHOULDNT LOGAND SELECTQ -LIST PLUS ZEROP \\ARBIN \\ATMIN) XCL::IMPLICIT-KEY-REHASH (CL:ERROR XCL::CLEAR-IMPLICIT-KEY-HASH -XCL::IK-HASH-NUM-SLOTS XCL::IK-HASH-BASE CL:1+ XCL::IK-HASH-LAST-INDEX \\ADDBASE -XCL::IK-HASH-KEY-ACCESSOR) %ARRAY-BASE (FFETCHFIELD CL:ERROR) UNSAVEDEF (SELECTQ MAPCAR UNSAVED1 -GETDEF GETFILEPKGTYPE CONS) EOFCLOSEF (GETSTREAM STREAMPROP) FASL::DEFINE-OPCODE-RANGE ( -CL:SYMBOL-PACKAGE CL:SYMBOL-NAME) MINIMUMMAINWINDOWSIZE (WINDOWPROP CONS HEIGHTIFWINDOW FONTPROP -APPLY* NUMBERP ERROR) \\NSRANDOM.RELEASE.LOCK (FFETCHFIELD FREPLACEFIELD) \\CH.UPDATE.CACHE ( -FFETCHFIELD PRIN1 LIST NCONC1 CONS FRPLACA SORT.NSADDRESSES.BY.DISTANCE FRPLACD) |\\LFPurgeDirectory| -(|\\PFFindDirectoryID| |\\PFVolumeNumber| FREPLACEFIELDVAL NCREATE |\\PFFindFileSize|) TEDIT.HCPYFILE -(PRINTERPROP PRINTERTYPE \\TEDIT.MAKEFILENAME TEDIT.GETINPUT TEXTOBJ CONCAT FFETCHFIELD PACKFILENAME -SELECTQ TEDIT.FORMAT.HARDCOPY) COMPILER::META-SUBST-MV-CALL (COMPILER::META-SUBST-ANY-CALL -COMPILER::MV-CALL-FN COMPILER::MV-CALL-ARG-EXPRS) SPELLFILE.SPELL1 (ARRAY \\GENERATEFILES -PACKFILENAME.STRING FUNCTION FIXSPELL) DINFO.UPDATE.FROM.MENU (DINFO.UPDATE WINDOWPROP WFROMMENU) -FASL::TABLE-STATS (LIST CONS CL:LENGTH) \\COURIER.ATTENTIONFN (GETSPPCON FFETCHFIELD OVERWRITEABLE -LOGAND \\EOFP SPREADAPPLY* FUNCTION PRIN1) ATTACHEDWINDOWTOTOPFN (MAINWINDOW TOTOPW) RECLOOK (RECLOOK1 - FIXSPELL NCONC MAPCONC RECORDECL LIST RECORD.NAME MAPCAR RECLOOK) COMPSETF (SELECTQ) CLOSEALL (ERROR -APPEND CLOSEF LIST) \\IRM.GET.HASHFILE (ARRAYP OPENHASHFILE PACKFILENAME) COMPILER::GENCODE-LABELS ( -CL:REVAPPEND) ENCAPSULATEDIMAGEFNS (ASSOC IMAGEFNSCREATE FUNCTION CONS) \\TEDIT.SET.SEL.LOOKS (SELECTQ - FREPLACEFIELD) BOTTOMOFGRIDCOORD (IPLUS ITIMES) SMASHPAT1 (LIST* SMASHPATTERN LIST) FASL::SETESCAPE ( -CL:SVREF FASL::OPTABLE-VECTOR CL:FUNCTION) \\CORE.OPENFILE (FFETCHFIELD LIST CONS FREPLACEFIELDVAL -REPLACEFIELDVAL FUNCTION \\CORE.GETFILEHANDLE ASSOC SELECTQ \\ILLEGAL.ARG) \\HCPYMODEDISPLAYINIT ( -FUNCTION FREPLACEFIELDVAL NCREATE) TB.COLLECT.ITEMS (FUNCTION \\DTEST FFETCHFIELD LIST) RECORDFIELD? ( -STRPOS SUBATOM SUB1 RECORDFIELD? ADD1 RECORD.FIELDNAMES RECORDECL RECORD.NAME) ATOMHASH#PROBES ( -FFETCHFIELD \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT \\LOLOC MKSTRING %ARRAY-BASE %ARRAY-OFFSET -%ARRAY-TYPE-NUMBER SUB1 IPLUS ADD1 \\GETBASEFAT \\GETBASE ILEQ \\GETBASECHAR \\GETBASETHIN -\\GETBASEBYTE LOGAND LLSH IPLUS16 \\ADDBASE UNLESSRDSYS PLUS ITIMES ATOM.HASH.REPROBE LOGOR LOGXOR) -\\NSPRINT.INTERNAL (CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) \\DSPRESET.PSC (FFETCHFIELD -\\MOVETO.PSC DIFFERENCE FONTPROP) SEDIT::LAST-LINE-LINEAR (FFETCHFIELD) \\TFBRAVO.ASSERT (HELP CONCAT) - \\SPP.GETNEXTBUFFER (SELECTQ \\SPP.PREPARE.INPUT SPP.STREAM.ERROR SPREADAPPLY* GETSPPCON FFETCHFIELD -RETFROM STKPOS \\SPP.STREAM.LOST SHOULDNT) WHO-LINE-TTY-PROCESS (PROCESSPROP TTY.PROCESS) SPY.PRINT ( -LIST CONCAT FFETCHFIELD) FB.PROMPTWPRINT (ERROR \\DTEST ARG FFETCHFIELD PLUS) ERRORMESS ( -ERRM-TO-CONDITION CL:TYPE-OF CL:PRINC) \\READSTRIKEFONTFILE (GETFILEPTR FREPLACEFIELDVAL NCREATE -\\CREATECSINFOELEMENT \\ALLOCBLOCK FOLDHI LRSH IPLUS \\WIN LLSH \\BIN SIGNED SUB1 IDIFFERENCE -BITMAPCREATE UNFOLD FFETCHFIELD ITIMES \\PUTBASE PLUS) FASL::ADD-OP-TRANSLATION (CL:ASSOC -FASL::OPTABLE-OPNAMES CONS) DECLARERECORD (CL:MEMBER RECORD.NAME RECORDECL COPY SOME LIST CONS -RECORD.FIELDNAMES RECORD.ALLOCATIONS EVAL UNION) SEDIT::GENERATE-LINEAR-FORM (FFETCHFIELD IPLUS -IDIFFERENCE FREPLACEFIELD IMAX) PUTD (FFETCHFIELD \\RENAMEDFN) \\READACFONTFILE (LIST FUNCTION -OPENSTREAM CLOSEF? \\CREATECSINFOELEMENT \\ALLOCBLOCK FOLDHI LRSH IPLUS FREPLACEFIELDVAL NCREATE BIN -\\READACFONTBOXES \\GETFBB \\ACCHARIMAGELIST \\ACCHARWIDTHLIST ZEROP EQP FFETCHFIELD PLUS ADD1 -\\PUTBASE IMAX IMINUS BITMAPCREATE \\FGETWIDTH \\GETBASE \\ACCHARPOSLIST \\WIN LLSH \\BIN TIMES FOLDLO - IMOD \\ACROTATECHAR DIFFERENCE IDIFFERENCE) COMP.STCROP (COMP.STFN SELECTQ) FASL::DEFINE-SINGLE-OPCODE - (CL:ELT FASL::OPTABLE-VECTOR FASL::ADD-OP-TRANSLATION) \\TEDIT.SUBST.FN1 (\\TEDIT.SUBST.FN2) GETD ( -\\DEFCELL \\ATOMCELL FFETCHFIELD SI::GET-CACHE-CLOSURE FREPLACEFIELDVAL NCREATE) -\\FONTINFOFROMFILENAME.OLD (UNPACKFILENAME LISTGET NTHCHAR PLUS MKATOM SUBSTRING SUB1 LIST SELECTQ) PF - (RESETLST NLAMBDA.ARGS APPEND WHEREIS OUTPUT OPENP WINDOWP OPENFILE FILENAMEFIELD) STREAMADDPROP ( -STREAMPROP CONS) SI::GET-CACHE-CLOSURE (XCL::GET-IMPLICIT-KEY-HASH NCREATE) SEDIT::MENU-INIT-STATE ( -CL:PACKAGE-NAME FM.GETITEM FM.ITEMPROP) \\INSPECT.FETCH.CHAR (CHARACTER \\GETBASEBYTE) WHENCLOSE ( -GETSTREAM ARG ADD1 SELECTQ ERRORX LIST PLUS) COMP.NOT (OPT.NOTJUMP COMP.PROGLST COMP.STFN) -\\FONTRESETCHARWIDTHS (FFETCHFIELD \\FGETOFFSET \\GETBASE ADD1 IDIFFERENCE IPLUS \\PUTBASE \\FGETWIDTH - PLUS) \\DRAWPOLYGON.PSC (LAST FFETCHFIELD TERPRI TIMES SELECTQ POSTSCRIPT.PUTCOMMAND \\MOVETO.PSC) -MAXIMUMCOLOR (MASK.1\'S LSH SUB1) SETUP-WHOLINE-TIMER (SETUPTIMER WINDOWPROP) \\FONTFILENAME.OLD ( -\\FONTFACE PACKFILENAME.STRING CONCAT SASSOC \\ILLEGAL.ARG SELECTQ CL:FORMAT) FB.SELECTEDFILES ( -TB.COLLECT.ITEMS \\DTEST FFETCHFIELD) OPENP (\\GETSTREAM \\MAP-OPEN-STREAMS FUNCTION) LOOKUPHASHFILE ( -CREATEKEY PACK* GTHASHFILE ANYEQ GETHASHKEY EQMEMB IMINUS READ ELT) SEDIT::MENU-PACKAGE-SELECTEDFN ( -LISTGET FM.ITEMPROP FM.EDITITEM CL:FIND-PACKAGE SEDIT::MENU-SELECTEDFN LIST PRIN1 GETPROMPTWINDOW -MAINWINDOW FM.CHANGELABEL) \\FONTFILENAME.NEW (\\FONTFACE CONCAT \\ILLEGAL.ARG PACKFILENAME.STRING -NTHCHAR \\PRINDATUM.TO.STRING) DEFAULT.INSPECTW.PROPCOMMANDFN (SELECTQ MENU FREPLACEFIELDVAL NCREATE -CONS ERSETQ ITEMOFPROPERTYVALUE GETPROMPTWINDOW RESETSAVE \\ITEMW.FLIPITEM LIST TTYDISPLAYSTREAM -TTY.PROCESS THIS.PROCESS CLEARBUF |printout| PRIN1 CL:FUNCALL LISPXREAD INSPECTW.REPLACE INSPECT) -MBUTTON.CREATE (FONTCLASSCOMPONENT IMAGEOBJCREATE STRINGWIDTH FONTPROP CONS) \\STKMIN (ALLOCAL -\\ALLOCBLOCK FOLDHI LRSH IPLUS - \\FINDOP SELECTQ NUMBERP PLUS ADD1 \\GET-COMPILED-CODE-BASE -FFETCHFIELD LLSH IMAX UNFOLD \\GETBASEBYTE) SHADEGRIDBOX (FIXP IPLUS LEFTOFGRIDCOORD BOTTOMOFGRIDCOORD - IDIFFERENCE ITIMES MAXIMUMCOLOR BITSPERPIXEL DSPDESTINATION) |\\LFScavVersion| (SMALLP FILENAMEFIELD -RAND) \\TEDIT.PARSE.SEARCHSTRING (LIST CONS MKATOM \\TEDIT.PARSE.SEARCHSTRING APPEND MKSTRING CONCAT) -\\INSPECT.FETCH.8 (\\GETBASEBYTE) COMPILER::GENCODE-GO (DECLARE COMPILER::GO-TAGBODY COMPILER::FIND-SEGMENT - COMPILER::GO-TAG COMPILER::TAGBODY-FRAME COMPILER::TAGBODY-BLIP-VAR) COURIER.WRITE.NSADDRESS (\\BOUTS - \\DTEST UNFOLD LLSH) HISTORYFIND (NTH IMINUS NLEFT ADD1 IDIFFERENCE IPLUS FIXSPELL LISPXFIND CONS -NCONC1) MAKECREATELST (MAKECREATELST1) FASL::FETCH-VALUE (CL:AREF) \\POSTSCRIPTTAB (TIMES FFETCHFIELD -IDIFFERENCE IREMAINDER) FINDFNDEF (FINDFILE GETFILEMAP LOADFILEMAP FASSOC LIST) PF* (RESETVARS -.RESETLST. LIST CONS CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION) ROTATE-BITMAP (BITMAPHEIGHT -BITMAPCREATE BITMAPWIDTH FFETCHFIELD UNFOLD LLSH FREPLACEFIELDVAL NCREATE \\HILOC \\LOLOC PLUS -\\ADDBASE \\VAG2) \\INSPECT.COMPUTE.TITLE (CONCAT CL:PRINC-TO-STRING APPLY*) FASL::DO-OP (CL:1+ BIN -CL:FUNCALL CL:SVREF FASL::OPTABLE-VECTOR) PMORE (PRINTFNDEF) SEDIT::FIRST-LINE-LINEAR (FFETCHFIELD) -FASL::CLEAR-TABLE (CL:FILL-POINTER) \\SPP.SETFILEPTR (GETSPPCON FFETCHFIELD IDIFFERENCE -\\SPP.GETFILEPTR \\SPP.SKIPBYTES \\IS.NOT.RANDACCESSP) PRINTFNDEF (RESETLST GETSTREAM OPENSTREAM LIST -GETFILEPTR FULLNAME COPYBYTES PFCOPYBYTES TERPRI) \\TEDIT.GET.CHARLOOKS1 (FREPLACEFIELDVAL NCREATE -\\ARBIN \\SMALLPIN SUB1 LLSH IDIFFERENCE ZEROP IMINUS \\BIN LOGAND FONTCLASS FONTCREATE) -XCL::IMPLICIT-KEY-MAP-HASH (CL:ERROR XCL::IK-HASH-BASE CL:1+ XCL::IK-HASH-LAST-INDEX \\ADDBASE -XCL::IK-HASH-KEY-ACCESSOR) PFCOPYBYTES (RESETLST \\INSTREAMARG \\GETSTREAM \\OUTSTREAMARG FONTMAPARRAY - ARRAYSIZE LIST FUNCTION DSPFONT ELT IDIFFERENCE GETEOFPTR FFETCHFIELD \\NSIN \\DTEST \\XCCSIN \\BIN -\\NSIN.24BITENCODING.ERROR UNFOLD LLSH ACCESS-CHARSET LOGOR CL:FUNCALL) \\SFLHASHLOOKUP (FFETCHFIELD -LOGAND LLSH \\ADDBASE IPLUS) %ARRAY-TYPE-NUMBER (FFETCHFIELD CL:ERROR) ROTATE-BITMAP-LEFT (BITMAPWIDTH - BITMAPCREATE BITMAPHEIGHT FFETCHFIELD UNFOLD LLSH FREPLACEFIELDVAL NCREATE \\HILOC \\LOLOC PLUS -\\ADDBASE \\VAG2) MAXIMUMWINDOWSIZE (WINDOWPROP APPLY* NUMBERP ERROR) \\BASEBYTES.READP (FFETCHFIELD -PLUS IMINUS IGEQ \\GETBASEBYTE) DOATTACHEDWINDOWCOM (MENU CONS FUNCTION FREPLACEFIELDVAL NCREATE -DOBACKGROUNDCOM) \\TEDIT.EXPANDEDCHARLOOKS.MENU (\\TEXTMENU.START COPYTEXTSTREAM \\TEDIT.PRIMARYW -HEIGHTIFWINDOW) FASL::COLLECT-LIST (CONS FASL::DO-OP LIST PLUS) FASL::FASL-END-OF-BLOCK (CL:THROW -CL:ERROR) \\RENAMEDFN (\\DTEST FFETCHFIELD UNFOLD LLSH \\#BLOCKDATACELLS \\ALLOC.CODE.BLOCK CEIL -LOGAND IPLUS ADD1 FOLDHI LRSH CONSTANT SUB1 LOGXOR FREPLACEFIELDVAL NCREATE) \\BASEBYTES.PEEKBIN ( -FFETCHFIELD SYSTEMTYPE \\STRINGPEEKBIN STREAMOP SPREADAPPLY* \\GETBASEBYTE) CLISPFUNCTION? (GETPROP -UNPACK MISSPELLED? CONCAT APPLY* CONS) %ARRAY-OFFSET (FFETCHFIELD CL:ERROR) \\GETSPP (WITH.MONITOR -CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION FFETCHFIELD SETUPTIMER \\QUEUEHEAD ILESSP \\LOLOC -IDIFFERENCE LOCF \\ADDBASE FREPLACEFIELD SEQ.ADD1 \\SPP.SYSPKT) MIDDX (IPLUS IQUOTIENT IDIFFERENCE -\\SGN \\IRND ITIMES) |\\LFDirectoryP| (|\\LFGetDirectory| FFETCHFIELD |\\PFFindDirectoryID| -|\\LFOpenOldFile| |\\PFVolumeNumber| FREPLACEFIELDVAL NCREATE PACKFILENAME |\\LFPutDirectory|) -UNIONREGIONS (ARG IPLUS PLUS DIFFERENCE CONS) LEFTOFGRIDCOORD (IPLUS ITIMES) RECORDFIELDNAMES ( -RECORDECL RECLOOK RECORD.FIELDNAMES RECORD.DECL FNTH RECORD.SUBDECS CONS RECORDFIELDNAMES -RECORD.FIELDINFO RECORD.NAME) \\IRM.CHOOSE.REF (MENU MKSTRING MAPCAR LIST PACK* KWOTE CONCAT -FREPLACEFIELDVAL NCREATE CONS) GRIDXCOORD (IDIFFERENCE IQUOTIENT SUB1) MENUWRESHAPEFN (WINDOWPROP -ITIMES FFETCHFIELD IDIFFERENCE DSPCLIPPINGREGION IPLUS FONTPROP MENUTITLEFONT IQUOTIENT FRPLACA CONS) -\\BASEBYTES.BOUT (FFETCHFIELD \\PUTBASEBYTE ADD1) LOADFILEMAP (LOADFNS) SETINITIALS (USERNAME STRPOS -SUBSTRING ADD1 SUB1 SAVESET) MB.PUTFN (IMAGEOBJPROP FONTPROP LOGAND LRSH \\BOUT \\ATMOUT) -\\CANONICAL.HOSTNAME (MKATOM FASSOC \\CANONICALIZE.PUP.HOSTNAME) \\SFMAKECOLOR (DSPBACKCOLOR DSPCOLOR -IMAGESTREAMTYPE \\DISPLAYSTREAMTYPEBPP COLORNUMBERP COLORIZEBITMAP FFETCHFIELD FREPLACEFIELDVAL -NCREATE) \\BASEBYTES.OPENFN (OPENSTRINGSTREAM \\MAKEBASEBYTESTREAM FFETCHFIELD GETEOFPTR) -MAKEMAINWINDOW (FUNCTION WINDOWPROP) \\TEXTMENU.START (WINDOWPROP GETREGION ATTACHEDWINDOWS CREATEW -IPLUS CONS FFETCHFIELD LIST TEXTOBJ) PRINT (\\GETSTREAM) \\FILLPOLYGON.PSC (LAST BITMAPCREATE MIN -FFETCHFIELD POSTSCRIPT.PUTCOMMAND LSH TIMES QUOTIENT DSPSCALE \\MOVETO.PSC) INFILECOMS? ( -GETFILEPKGTYPE EVALV DREVERSE CONS) \\BASEBYTES.SETFILEPTR (PLUS FFETCHFIELD) FASL::CONVERT-FASL-DATE -(STRPOS SUBSTRING + SUB1) SET-TTY-READTABLE-INTERACTIVELY (PROCESS.EVAL TTY.PROCESS) -\\INSPECT.STORE.PTR (LIST \\GETBASEPTR \\RPLPTR UNFOLD LLSH) \\TEDIT.FIND.WC (\\TEDIT.FIND.WC1 LIST -IMAX \\TEDIT.SUBST.FN1 ADD1 \\TEDIT.FIND.WC) COMPILER::GENCODE-BLOCK (COMPILER::BLOCK-FRAME -COMPILER::BLOCK-END-TAG COMPILER::BLOCK-STK-NUM COMPILER::BLOCK-CONTEXT COMPILER::MAKE-LAP-VAR -COMPILER::BLOCK-BLIP-VAR CL:FLET COMPILER::GENCODE-CLOSED-OVER-BLOCK COMPILER::BLOCK-STMT) -COURIER.READ.NSADDRESS (NCREATE UNFOLD LLSH) CSUBSTLST (CSUBST RECONS CSUBSTLST) \\BASEBYTES.IO.INIT ( -FUNCTION FREPLACEFIELDVAL NCREATE \\DEFINEDEVICE) SEDIT::MENU-FIND-SELECTEDFN (LISTGET FM.ITEMPROP -WINDOWPROP MAINWINDOW FM.EDITITEM LIST TTY.PROCESS) \\GETFONTDESC (\\COERCEFONTDESC) \\LEAF.DELETEFILE - (ALLOCATE.PUP \\LEAF.GETFILE LOCF \\ADDBASE LLSH FFETCHFIELD \\SENDLEAF) |\\LFCreateDevice| ( -FFETCHFIELD FUNCTION \\MAKE.PMAP.DEVICE FREPLACEFIELDVAL NCREATE) \\FBITMAPBIT (\\FBITMAPBIT.UFN -SELECTQ) INSPECTW.REDISPLAY (\\INSPECTW.REDISPLAYPROP MAPC WITH-INSPECTOR-ENV WINDOWPROP XCL::PROFILIZE - CL:PROGV XCL::PROFILE-VARIABLES XCL::PROFILE-VALUES INSPECTW.PROPERTIES MAPCAR APPLY* -\\INSPECTW.VALUE.MARGIN DSPFONT \\INSPECT.COMPUTE.TITLE DSPCLIPPINGREGION NCONC LIST PRINTANDBOX -FUNCTION CONS LRSH EXTENDREGION) \\SFROTATECSINFOOFFSETS (FFETCHFIELD BITMAPWIDTH -\\CREATECSINFOELEMENT \\ALLOCBLOCK FOLDHI LRSH IPLUS \\PUTBASE IDIFFERENCE \\FGETOFFSET \\GETBASE -\\FGETWIDTH PLUS) \\BASEBYTES.BLOCKIO (FFETCHFIELD IDIFFERENCE SUB1 SPREADAPPLY* \\GETBASEBYTE PLUS -IPLUS) \\PUTD (\\DEFCELL \\ATOMCELL UNINTERRUPTABLY FFETCHFIELD) SPY.OVERFLOW (PLUS) COMP.CARCDR ( -COMP.PROGLST MAPC GETPROP COMP.STFN SELECTQ) UNDOLISPX (FMEMB LDIFF LISPXFIND UNDOLISPX1) -COMPILER::COMPILE-FILE-DEFINEQ (CL:MAPCAR CL:FUNCTION) SEDIT::CLEAN-UP-AFTER-RELINEARIZATION ( -FFETCHFIELD WINDOWPROP ADD1 IDIFFERENCE SEDIT::LAST-LINE-LINEAR IPLUS FRPLACA IMINUS) FB.TABLEBROWSER -(\\DTEST FFETCHFIELD) \\TEDIT.EXPANDEDPARA.MENU (\\TEXTMENU.START COPYTEXTSTREAM \\TEDIT.PRIMARYW -TEXTOBJ HEIGHTIFWINDOW) \\MBS.OUTCHARFN (\\DTEST FFETCHFIELD PLUS FREPLACEFIELD) -SEDIT::RELINEARIZE-PRELINEARIZED-NODE (FFETCHFIELD) MAKENEWCOM (GETFILEPKGTYPE COPY GETPROP APPLY* -SELECTQ CONS LIST MAKENEWCOM DEFAULTMAKENEWCOM) CLISPRPLNODE (LIST FRPLACD ERRORX) -\\MAKEBASEBYTESTREAM (SMALLP PLUS FFETCHFIELD FREPLACEFIELDVAL REPLACEFIELDVAL FUNCTION NCREATE -FREPLACEFIELD SELECTQ) \\TFBRAVO.PARSE.PROFILE.PARA (GETFILEPTR U-CASE RATOMS CHARACTER -\\TFBRAVO.PARSE.PROFILE.VALUE \\TFBRAVO.HANDLE.HEADING IQUOTIENT IDIFFERENCE CONSTANT TIMES ITIMES -TEXTPROP SUB1) BLOCKRECORD (DECLARERECORD CONS) SET-READTABLE-INTERACTIVELY (MENU SORT -FREPLACEFIELDVAL NCREATE CONS) XCL::MAKE-IMPLICIT-KEY-HASH-TABLE (+ CL:ASH XCL::%MAKE-IK-HASH-TABLE -\\ALLOCBLOCK CL:1-) COPYIMAGEOBJ (FFETCHFIELD FREPLACEFIELD) MB.GETFN (IMAGEOBJPROP FONTPROP LOGAND -LRSH \\BOUT \\ATMOUT) \\CANONICALIZE.PUP.HOSTNAME (ETHERPORT MKATOM U-CASE ETHERHOSTNAME CONS FIXSPELL -) TEDIT.RAW.INCLUDE (TEXTOBJ FFETCHFIELD OPENSTREAM FREPLACEFIELD SHOULDNT GETEOFPTR IDIFFERENCE -TEDIT.GETPOINT \\CHTOPC LASTPIECE \\SPLITPIECE - PLUS \\TEDIT.UNIQUIFY.CHARLOOKS CHARLOOKS.FROM.FONT -NCREATE FREPLACEFIELDVAL IPLUS \\TEDIT.ORIGINAL.WINDOW.TITLE CONS) |\\LFMakeVolumeDirectory| ( -UNINTERRUPTABLY |\\LFGenFileID| |\\PFVolumeNumber| FREPLACEFIELDVAL NCREATE |\\PFNewPages| -PACKFILENAME.STRING |\\LFDirectoryP|) FILES?PRINTLST (MAPRINT FUNCTION) INITBITMASKS (ARRAY CONSTANT -EXPT LOGXOR LRSH PLUS IDIFFERENCE) DECODE.WINDOW.ARG (CREATEW MAKEWITHINREGION CREATEREGION -WIDTHIFWINDOW HEIGHTIFWINDOW GETBOXREGION CONCAT) \\NODIRCOREFDEV (\\CREATECOREDEVICE) -COMPILER::META-SUBST-LABELS (COMPILER::MSUBST COMPILER::META-SUBST COMPILER::LABELS-BODY REPLACEFIELD) - \\BASEBYTES.NAME.FROM.STREAM (FFETCHFIELD LIST GETEOFPTR) \\GET-COMPILED-CODE-BASE (\\DEFCELL -\\ATOMCELL FFETCHFIELD NTYPX) CHAT.BIN (\\GETKEY) COMPILER::GENCODE-CATCH (COMPILER::CATCH-TAG -COMPILER::CATCH-STMT) WRITESTRIKEFONTFILE (STRIKECSINFO \\GETCHARSETINFO \\GETBASEPTR FFETCHFIELD -UNFOLD LLSH \\CREATECHARSET \\FGETOFFSET \\GETBASE PLUS ADD1 OPENSTREAM LRSH \\BOUT LOGAND IMAX -\\FGETWIDTH IPLUS IDIFFERENCE ITIMES) PRINTERDEVICE (\\CREATECOREDEVICE FUNCTION) \\BASEBYTES.BIN ( -\\BASEBYTES.PEEKBIN FFETCHFIELD PLUS) PRINTHISTORY (LISPXFIND ENTRY# PRINTHISTORY1 APPLY*) -\\RESETTERMINAL (LOCF \\ADDBASE VIDEOCOLOR) ERASEPROPS (UNION SELECTQ MAPC ASKUSER LIST MAPCONC APPEND - EDITE SORT HELP) SEDIT::MENU-CLOSEFN (CONS WINDOWPROP MAINWINDOW) MENUWMINSIZEFN (WINDOWPROP ITIMES -FFETCHFIELD IPLUS MAXMENUITEMWIDTH IMAX STRINGWIDTH MENUTITLEFONT CONS WIDTHIFWINDOW HEIGHTIFWINDOW -MAXMENUITEMHEIGHT FONTPROP) \\LEAF.GETFILE (FFETCHFIELD \\PARSE.REMOTE.FILENAME \\LEAF.RECONNECT -WITH.MONITOR CL:MULTIPLE-VALUE-PROG1 .UNWIND.PROTECT. FUNCTION SELECTQ \\INTERNAL/GETPASSWORD -ALLOCATE.PUP LOCF \\ADDBASE + LISPERROR \\SENDLEAF SELECTC FREPLACEFIELDVAL NCREATE -\\LEAF.READFILENAME FREPLACEFIELD FOLDLO LRSH MOD IMOD \\FIXPASSWORD \\LEAF.DIRECTORYNAMEONLY CONS -\\LEAF.ERROR) \\CH.CHECK.CLEARINGHOUSE (BESTNSADDRESS CH.DOMAINS.SERVED FFETCHFIELD PRIN1 MKSTRING -FREPLACEFIELDVAL NCREATE) \\KEYBOARDON (LOGOR \\GETBASE) RECORD.FIELD.VALUE0 (CONS GETFIELDFORCREATE) -FASL::NEW-VALUE-TABLE (CL:MAKE-ARRAY) |\\VAMEnoughSpace| (EQL FFETCHFIELD ILEQ IDIFFERENCE IQUOTIENT -ITIMES) INITIALEVALQT (CONS GETTOPVAL) SEDIT::JOIN (SEDIT:GET-PROMPT-WINDOW GETPROMPTWINDOW -FFETCHFIELD SEDIT::CLOSE-NODE PRIN1 SEDIT::SUBNODE NTH CONSTANT FREPLACEFIELD CONS LIST PLUS NCONC -IMAX LAST ADD1 SEDIT::COLLECT-UNDO-BLOCK) COMPILER::*PREDICATE-CONTEXT* (COMPILER:MAKE-CONTEXT) -|\\PFDsplyVolumes| (\\DSKDISPLAY.UPDATE) \\SPP.EVENTFN (SELECTQ MAPC APPEND FFETCHFIELD SPP.CLOSE) -INTERPRET.REM.CM (UNIX-GETENV OPENSTREAM GETFILEINFO SKIPSEPRS NLSETQ READ NCHARS NTHCHARCODE PLUS) -COMPILER::META-SUBST-IF (COMPILER::MSUBST COMPILER::META-SUBST COMPILER::IF-PRED REPLACEFIELD) -UNDOLISPX2 (FMEMB FRPLACA UNDOLISPX3 LISPXWATCH REVERSE UNDOLISPX2) |\\CreateCursorBitMap| ( -FREPLACEFIELDVAL NCREATE) CHAT.SCREENPARAMS (IMIN IQUOTIENT WINDOWPROP IABS IMINUS DSPLINEFEED -LINELENGTH CONCAT SUBSTRING SUB1 STRPOS FFETCHFIELD NTHCHAR) FILDIR (DIRECTORY) MSFINDP (MSFINDP) -IRM.CREF.BUTTONEVENTFN (IMAGEOBJPROP CONS RESETFORM TTYDISPLAYSTREAM GETPROMPTWINDOW BLTSHADE LOGAND -LOGOR CURSORPOSITION ADD1 PRIN1 CONCAT LIST KWOTE WINDOWPROP) TOTOPW (WINDOWOP SPREADAPPLY* -\\INSUREWINDOW FFETCHFIELD) HPRINT.IMAGEOBJ (LIST FFETCHFIELD) POSTSCRIPT.OUTSTR (\\PS.BOUTFIXP -%ARRAY-TYPE-NUMBER FFETCHFIELD SUB1 %ARRAY-OFFSET %ARRAY-BASE IPLUS ADD1 \\GETBASEFAT \\GETBASE -\\CHAR8CODE LOGAND \\BOUTS \\PNAMECELL \\ATOMCELL \\PROPCELL CONSTANT \\GETBASETHIN \\GETBASEBYTE BOUT - FLOAT MAPC CHCON) \\RESETSYSTEMSTATE (\\RESETTERMINAL) MB.COPYFN (COPY FFETCHFIELD FREPLACEFIELDVAL -NCREATE) BITBLT (\\BLTSHADE.BITMAP \\OUTSTREAMARG \\GETSTREAM IMAGEOP SPREADAPPLY* FFETCHFIELD IMIN -IDIFFERENCE \\GETDISPLAYDATA \\DTEST IMAX \\DSPTRANSFORMX IPLUS \\DSPTRANSFORMY .WHILE.TOP.DS. -DSPDESTINATION \\GETBASE \\TOTOPWDS \\BITBLT.BITMAP BITMAPCREATE BITBLT) GRIDYCOORD (IDIFFERENCE -IQUOTIENT SUB1) FB.UPDATEBROWSERITEMS (RESETLST FFETCHFIELD FB.GET.NEWPATTERN COPY STRINGWIDTH + TIMES - CHARWIDTH FRPLACA LIST FREPLACEFIELD CL:POSITION FUNCTION CL:NTH FB.DATE \\GENERATENEXTFILE -CONCATCODES FB.CREATE.FILEBUCKET FB.GETALLFILEINFO CONS TB.NUMBER.OF.ITEMS FB.MAYBE.WIDEN.NAMES) -DSPDESTINATION (\\GETDISPLAYDATA \\DTEST \\OUTSTREAMARG \\GETSTREAM FFETCHFIELD) RETURN (\\MYALINK -OPCODES ADDSTACKBASE \\VAG2 FFETCHFIELD FUNCTION IDIFFERENCE CL:VALUES-LIST) \\FBITMAPBIT.UFN ( -\\ADDBASE IPLUS ITIMES IDIFFERENCE LRSH \\BITMASK \\WORDELT LOGAND FFETCHFIELD SELECTQ LOGXOR -\\NOTBITMASK LOGOR) \\CHARWIDTH.PSC (FFETCHFIELD \\FGETCHARWIDTH \\FGETWIDTH \\GETBASE -\\GETCHARSETINFO \\GETBASEPTR UNFOLD LLSH \\CHARSET LRSH \\CREATECHARSET \\CHAR8CODE LOGAND) -FASL::STORE-VALUE (CL:VECTOR-PUSH-EXTEND) \\STRINGWIDTH.PSC (FFETCHFIELD \\STRINGWIDTH.GENERIC) -\\BASEBYTES.TRUNCATEFN (PLUS ERROR FREPLACEFIELD FFETCHFIELD) \\SETTOTALTIME (\\BOXIPLUS LOCF -\\ADDBASE CLOCKDIFFERENCE FFETCHFIELD) CURRENT-TTY-READTABLE-NAME (READTABLEPROP PROCESS.EVALV -TTY.PROCESS) \\CREATE.TTYDISPLAYSTREAM (CREATEW CREATEREGION IPLUS CONCAT PROCESSPROP THIS.PROCESS -TTYDISPLAYSTREAM) \\BITBLT.BITMAP (FFETCHFIELD IMAX IMIN IPLUS IDIFFERENCE LOGXOR LOGAND COLORNUMBERP -INVERT.TEXTURE.BITMAP BITMAPCREATE \\ILLEGAL.ARG UNFOLD LLSH COLORTEXTUREFROMCOLOR# ITIMES -|\\SFInvert| MAXIMUMCOLOR) \\LEAF.STREAM.IN.QUEUE (FFETCHFIELD LOCF \\ADDBASE LIST LOGAND CONSTANT -LOGOR) SEDIT::CLEAR-LINEAR-FORM (FFETCHFIELD SEDIT::CREATE-WEAK-LINK FREPLACEFIELD -SEDIT::RELINEARIZE-PRELINEARIZED-NODE) \\DELETEOFD (DREMOVE) WOVERLAPP (REGIONSINTERSECTP FFETCHFIELD) - \\CREATE.SPP.DEVICE (FUNCTION FREPLACEFIELDVAL NCREATE) PAGEFAULTS (FFETCHFIELD) -COMPILER::COMPILE-FILE-SETF-SYMBOL-FUNCTION (CL:SECOND CL:THIRD CL:EVAL) \\INSPECT.FETCH.PTR ( -\\GETBASEPTR UNFOLD LLSH) COPY1 (CONS LIST) GENERATE (RESUME) SIMPLEPRINT (NCHARS NTHCHARCODE PLUS -SIMPLEPRINT IGEQ SUB1) \\SEARCHOPENFILES (\\IOMODEP) MOVEATTACHEDWINDOWTOPLACE (WINDOWPROP -MINIMUMWINDOWSIZE SELECTQ IPLUS ATTACHEDWINDOWS WINDOWREGION PLUS MAX DIFFERENCE MIN CREATEREGION ADD1 - IMAX CENTERINWIDTH CENTERINHEIGHT) \\ADDOFD (CONS) COMP.DECLARE1 (EVALV APPEND MAPC COMP.VARTYPE -FRPLACA) EVAL (\\EVAL) ADDTOCOM1 (SAVESET GETTOPVAL MEMBER CONS MERGEINSERT) \\STRINGSTREAM.INIT ( -FUNCTION FREPLACEFIELDVAL NCREATE) LISPINTERRUPTS.PASTE (APPEND LIST LISPINTERRUPTS.ORIG) \\CLEARCELLS - (FOLDLO LRSH SUB1 \\ADDBASE IDIFFERENCE UNFOLD LLSH .CLEARNWORDS.) SEDIT::CREATE-QUOTED-GAP ( -SEDIT::CREATE-GAP-NODE LIST SEDIT::QUOTE-WRAPPER LISTGET FFETCHFIELD FREPLACEFIELDVAL NCREATE -SEDIT::CREATE-WEAK-LINK) FILES?1 (GETTOPVAL SEARCHPRETTYTYPELST) \\TEDIT.PUT.PARALOOKS.LIST2 ( -HASHARRAY LOGAND LRSH \\BOUT FLENGTH PLUS) GRID (TEXTUREP ITIMES IDIFFERENCE IPLUS SUB1 PLUS -WINDOWPROP BITMAPCREATE MAXIMUMCOLOR BITSPERPIXEL DSPDESTINATION) STRIKECSINFO (FFETCHFIELD -\\FGETOFFSET \\GETBASE BITMAPHEIGHT PLUS IMAX \\FGETIMAGEWIDTH \\FGETWIDTH \\CREATECSINFOELEMENT -\\ALLOCBLOCK FOLDHI LRSH IPLUS \\PUTBASE ADD1 BITMAPCREATE COPYALL FREPLACEFIELDVAL NCREATE) SCANFILE1 - (TMPSUBFN READ CONS INPUT LIST) NIL -BIND CLOCKDIFFERENCE (\\INTERRUPTABLE) TEDIT.SELECT (L1 LN) ASET (NEWVALUE ARRAY) CL:NUMERATOR ( -CL:RATIONAL) BQUOTE.WRAPPER (FILE) COMPILER::PROCESS-FORMS (COMPILER::*DEFERRED-FORMS* COMPILER::*BLOCKS* - COMPILER::*BLOCK-HASH-TABLE* COMPILER::*PREPROCESSING-PHASE* COMPILER::EOF-VALUE COMPILER::FORM) -SEDIT::PARSE--BROKEN-ATOM (SEDIT::MODE) FLOAT (CL::OTHER) SEDIT::COMPLETE (SEDIT::CHARCODE SEDIT::COMPILE? -) \\SETDAYTIME0 (\\INTERRUPTABLE) TEDIT.COPY.PARALOOKS (SOURCE) FIXAPPLY (TYPE-IN?) RESETVAR ( -SI::*RESETFORMS*) \\TFBRAVO.APPLY.PARALOOKS (TABPHRASE SMALLEST.MARGIN) |ShellCommand| (|Cmd| |Output| -) QUOTE.WRAPPER (E FILE) \\SECONDSCLOCKGREATERP (\\INTERRUPTABLE) \\FM.TOGGLE-DOWNFN (BUTTONS) -\\CHECKBCPLPASSWORD (USER PASSWORD) |\\VAMFindFreePages| (\\INTERRUPTABLE) WRITE-STRING* ( -STRING-LENGTH CHARS-TO-PRINT STRM \\THISFILELINELENGTH) MODERNWINDOW.SETUP (ORIGFN MODERNWINDOWFN -ANYWHERE) LISPXFIX (LISPXHIST) COMPILER::ALPHA-LET* (COMPILER::BINDINGS COMPILER::BODY) -TEDIT.SUBPARALOOKS (NEWLOOKS) \\LEAF.TIMEDOUT.EXCESSIVE (CNT) CL:DENOMINATOR (CL:RATIONAL) -\\DSPROTATE.PSC (LAND C0 P0 C P ML MB MR MT) \\IDLER (IDLING.KEYACTIONS) TWODINSPECT.REPAINTFN ( -*PRINT-LEVEL* *PRINT-LENGTH*) \\HARDRESET-CLEANUP-RUN (CLEANUPFN) CLOCK0 (BOX) CHAT.LOGIN (CHATSTATE) -CLEARHASHFILES (RELEASE) FASL:OPEN-FASL-HANDLE (FASL::NAME FASL::OPEN-OPTIONS) COMP.DECLARE (VTAG) -CHAT.TYPESCRIPT1 (OLDFILE) FUNCTION.WRAPPER (E FILE) SEDIT::MINIMUM-STRING-WIDTH (SEDIT::STRING-LIST -SEDIT::FONT SEDIT::PRIN2?) \\TEXTSTREAMBOUT (PSTR THISLINE EOLFLAG CHORIG CHWIDTH OXLIM OCHLIM -OCR\\END PREVSPACE FIXEDLINE NEXTLINE LINES NEWLINEFLG DX PREVLINE SAVEWIDTH OFLOWFN OLHEIGHT DY -TABSEEN IMAGECACHE) \\COPYSYS (SYSNAME DONTSAVE) COMPSET (OLDO) \\GC.MODIFY.BIGREFCNT (CNT) FIXATOM ( -CLISPERTYPE) MB.SHOWSELFN (SEL) \\TEDIT.REPAINTFN (TEXTSTREAM CH# WWIDTH) TWODINSPECT.BUTTONEVENTFN ( -*PRINT-LEVEL* *PRINT-LENGTH*) COURIER.BROADCAST.CALL (ROUTINGTABLE) \\HARDRESET-CLEANUP1 ( -\\INTERRUPTABLE) FORMAT-TILDE (COLON ATSIGN PARMS) \\MAIKO.DAYTIME (BOX) LOADCOMP (BLOCKS) \\SW2BM ( -\\INTERRUPTABLE) READPLIST (PLIST) \\MAIKO.DAYTIME0 (BOX) \\UFS.RECOGNIZE.FILE (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) SEDIT::COMPUTE-SELECTION-POSITION (SEDIT::SELECTION SEDIT::CONTEXT) -FASL:UNIMPLEMENTED-OPCODE (STREAM) SEDIT::OPEN-LITATOM (CL:LENGTH) IDATE (DLS) FNTH (X0) SIMPLE-REMOVE - (ITEM SEQUENCE START END) \\MAIKO.CLOCK (N BOX) READ-FILECREATED (STARTPOS) COURIER.NSNAME.LENGTH ( -PROGRAM) \\TEDIT.EXPAND.DATE (STREAM CH) CL:SET-CHAR-BIT (CHAR NEWVALUE) SEDIT::EQUALIZE-STRING-WIDTHS - (SEDIT::DESIRED-WIDTH SEDIT::PAD-CHAR) %TYPE-SIZE-TO-TYPENUMBER (TYPE SIZE) ICMLARRAY (ASTYPE) -\\ICONW.FORMAT.TITLE1 (FONTHEIGHT TCH) UNIX-GETENV (NAME) \\GENERIC.RENAMEFILE (NEWDEVICE) SUBSTRING ( -\\INTERRUPTABLE) INFILECOM (ORIGFLG TYPE) PFI.AFTER.NEW.PAGE (*PRINT-BASE*) COMPILER::ENV-ANALYZE-OPCODES - (COMPILER::NODE) COMPILER::PEEPHOLE-OPTIMIZE-CODE (COMPILER::NEW-CODE COMPILER::TAG-DUPLICATED-P) -FASL:DUMP-EVAL (FASL::HANDLE FASL::FORM) STACK.FULL.WARNING (HELPFLAG) LISPXUSEC (LISPXHIST) -\\MAIKO.COPY-TIME-STATS (REFERENCE-BLOCK DESTINIATION-BLOCK) \\FM.MOMENTARY-SELECTEDFN (BUTTONS) -COMPILER::STOP-UNBINDS-AT-FRAME-BOUNDARY (CONDITION) CL:PACKAGE-NICKNAMES (PACKAGE) \\CLOCKGREATERP ( -\\INTERRUPTABLE) FIND-STACK-FRAME (TOKEN) \\MAKE.PROCESS0 (*CURRENT-PROCESS* HELPFLAG -\\CURRENTDISPLAYLINE \\#DISPLAYLINES *READTABLE* \\PRIMTERMTABLE \\PRIMTERMSA \\TTYWINDOW READBUF -RESETSTATE) MULTIFILEINDEX (*UPPER-CASE-FILE-NAMES*) COMPILER::ALPHA-LAMBDA-LIST (COMPILER::ARG-LIST -COMPILER::STATE COMPILER::REQUIRED COMPILER::OPTIONAL CL:KEYWORD) SPY.MAKE.TREE (GRAPH IDS W H -*PACKAGE* *READTABLE* *PRINT-CASE*) \\ALLOCPAGEBLOCK (\\INTERRUPTABLE) \\MAIKO.SETTIME (RETFLG) -TEDIT.COPY.LOOKS (SOURCE) \\SPPGETERROR (CON) \\PARSE-FILE-HEADER (STREAM FILECREATEDFN RETURNFORM -INITIALENV) %ASET-EXPANDER (NEWVALUE ARRAY INDICES) ALLOCSTRING (\\INTERRUPTABLE) -\\CREATECHARSET.HCPYMODE.INTERPRESS (FAMILY SIZE FACE ROTATION DEVICE CHARSET FONTDESC) SEDIT::TRACK-SELECT - (SEDIT::BAR-Y SEDIT::BAR-HEIGHT) \\BITBLTSUB (PILOTBBT |SourceBitMap| SLX STY |DestinationBitMap| DLX - DTY HEIGHT |SourceType| |Operation| |Texture| |WindowXOffset| |WindowYOffset|) COURIER.WRITE.NSNAME ( -PROGRAM) %AREF-EXPANDER (ARRAY INDICES) TEDIT.SEL.AS.STRING (OFFST BASE) CL:CHAR-UPCASE (CHAR) DO?CMD -(\\BUFFER \\?PARAMS \\STARTED START STUFF) COMPILER::ALPHA-LITERAL (COMPILER::VALUE) -\\TEDIT.RECORD.TABLEADERS (BUTTON NEWSTATE TEXTSTREAM SEL) MKSTRING (*PRINT-ESCAPE* *READTABLE* -*PRINT-RADIX* *PRINT-BASE* *PRINT-LENGTH* *PRINT-LEVEL*) SEDIT.COPYTOCLIPBOARD (CONTEXT) -SEDIT::COMPUTE-POINT-POSITION (SEDIT::POINT SEDIT::CONTEXT) COMPILER::COMPILE-ONE-LAMBDA (COMPILER::*CONTEXT* - COMPILER::*AUTOMATIC-SPECIAL-DECLARATIONS*) \\TEDIT.PUT.SINGLE.PARALOOKS2 (OUTPUTFORMAT LEN) -CLSMARTEN (FNLIST NOSPELLFLG) COMPILE1 (FREEVARS) \\TEDIT.FORMAT.FOOTNOTE (PAGEREGION STREAMSCALE YBOT - ORPHAN LASTLINE LHEIGHT SPECIALYPOS NEWPAGETYPE) SEDIT::NEXT-NODE-TYPE (SEDIT::STR TYPE) -CL:PACKAGE-USED-BY-LIST (PACKAGE) PRINT-EVENT (EVENT#) ALISTS.WHENCHANGED (TYPE) XCL::PPRINT-DEFINER ( -XCL::FORM) TEDIT.SELECTALL (STREAM TEXTOBJ SEL TEXTSTREAM) SEDIT::OUTPUT-CR (SEDIT::MATCH-X -SEDIT::MATCH-BASELINE SEDIT::MATCH-ASCENT SEDIT::MATCH-DESCENT SEDIT::LINE) FORMAT-PAGE (COLON ATSIGN -PARMS) RANDSET (\\OVERFLOW) CL::PRINT-PACKAGE (CL::DEPTH) BSPPUTMARK (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) CL:PACKAGE-USE-LIST (PACKAGE) \\DOSTORAGEFULLINTERRUPT (HELPFLAG) -UNPACKPATHNAME.STRING (DIRFLG) CHAT.TTYEXITFN (PROCESS NEWPROCESS) NTHCHARCODE (DUMMY) TEDIT.GET.LOOKS - (FONT) \\ALLOCVIRTUALPAGEBLOCK (\\INTERRUPTABLE) CL::PRINT-PACKAGE-HASHTABLE (CL::DEPTH) -\\LEAF.CLOSEFILE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CL:PACKAGE-SHADOWING-SYMBOLS (PACKAGE) -LISPXUSE (LISPXHIST) COMPILER::ENV-ANALYZE-LITERAL (COMPILER::NODE) CHNGNM (SI::*RESETFORMS*) -SEDIT::SET-FORMAT (SEDIT::NODE SEDIT::CONTEXT CL:FORMAT) SEDIT::INSERT-QUOTED-GAP (SEDIT::CONTEXT -SEDIT::CHARCODE SEDIT::QUOTE-TYPE) BCOMPL2 (GLOBALVARS RETFNS BLKLIBRARY NOLINKFNS LINKFNS SPECVARS -LOCALVARS BLKAPPLYFNS LOCALFREEVARS BNDLEV) TEDIT.GET.OBJECT (NAMELEN) CLISPDEC1 (FAULTFN TEM TYPE-IN? -) CL:CHAR-BIT (CHAR) \\TEDIT.COMMAND.LOOP (TTYWINDOW DIRTY INSCH# TLEN CHNO READSA COMMANDFN -\\INTERRUPTABLE) MB.SIZEFN (CURX RIGHTMARGIN) TEDIT.DEFAULT.MENUFN (OCURSOR LINES) SEDIT::TTYFN ( -SEDIT::EDIT-CHANGES CL:STRUCTURE SEDIT::CHANGED? SEDIT::NODE SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -COMPILER::ALPHA-LET (COMPILER::BINDINGS COMPILER::BODY) \\PAGED.INCFILEPTR (\\INTERRUPTABLE) -\\MAIKO.CLOCK0 (BOX) \\FIXILINES (CH# CHLIM) FORMAT-FRESHLINE (COLON ATSIGN PARMS) \\TEDIT.INCLUDE ( -TEXTOBJ FILE START END) CL:CHAR-DOWNCASE (CHAR) \\TEDIT.NEUTRALIZE.PARALOOKS.MENU (OBJ W CH# FMTSPEC -BUTTON NEXTB ARB BUTTONDATA) TWODINSPECT.COPYBUTTONFN (*PRINT-LEVEL* *PRINT-LENGTH*) -CONDITIONS::EXPAND-WITH-COLLECTION-SITES (CONDITIONS::NEW-SITES CONDITIONS::BODY CONDITIONS::OLD-SITES - CONDITIONS::NEW-SITES-AND-TAILS) EF (*EDITMODE*) UNIX-GETPARM (NAME) CLOSEBSPSTREAM ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\TEDIT.PUT.SINGLE.CHARLOOKS2 (STR LEN) IRM.GET.CREF ( -TEXTSTREAM) EV (*EDITMODE*) RIGHTW.ADJUSTSELECTION (*PRINT-LEVEL* *PRINT-LENGTH*) FIND-HISTORY-EVENTS -(TEM) D-ASSEM:FIXUP-PTR (\\INTERRUPTABLE) READ (*READTABLE* *READ-NEWLINE-SUPPRESS*) GCMESS (NUM STR) -CONDITIONS::NORMALIZE-SLOT-DESCRIPTION (CONDITIONS::SLOT-DESC) D-ASSEM:ASSEMBLE-FUNCTION (D-ASSEM::*DVAR-ENV* - D-ASSEM::*STACK-ENV* D-ASSEM::*LOCAL-FN-FIXUPS* D-ASSEM::ID) \\BLTCHAR (CHARCODE DISPLAYSTREAM -DISPLAYDATA) \\MOREVMEMFILE (FILEPAGE) CLOCK (N BOX) COMPILER::COMPILE-AND-DUMP-1 (COMPILER::KIND -COMPILER::*CURRENT-FUNCTION* COMPILER::LAP-FN COMPILER::DCODE) GETGRIDBOXREGION (MINWIDTH MINHEIGHT -FNARG) SIMPLE.FINDFILE (DUMMY) EDITMOVENODE (REG) \\GENERIC.READP (\\INTERRUPTABLE) MAKECREATE1 ( -BINDINGS VAR1 SUBSTYPE) WRITE (*PRINT-ESCAPE* *PRINT-RADIX* *PRINT-BASE* *PRINT-LEVEL* *PRINT-LENGTH* -*PRINT-CASE* *PRINT-GENSYM* *PRINT-ARRAY* *PRINT-PRETTY* *PRINT-CIRCLE-NUMBER*) %MAP-FOR-EFFECT-SINGLE - (FUNCTION SEQUENCE) ASKUSER (NOCASEFLG READBUF) TEDIT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -FNS.PUTDEF (TYPE) D-ASSEM:RELEASE-DCODE (D-ASSEM::LOCAL-FN-FIXUPS) %FILL-ARRAY-FROM-SEQUENCE (SEQUENCE - FLATTENED-ARRAY OFFSET) %MAP-FOR-RESULT-MULTIPLE (FUNCTION ELT-SLICE RESULT) D-ASSEM:FIXUP-PTR-NO-REF - (\\INTERRUPTABLE) NSNETDAYTIME0 (RESULT) \\HANDLE.RAW.XIP (\\INTERRUPTABLE) PFI.MAKE.LPT.STREAM ( -DEFREGION) COMPILER::ALPHA-LABELS (COMPILER::BODY COMPILER::STRUCTS) D-ASSEM:FIXUP-SYMBOL ( -\\INTERRUPTABLE) \\DSPPRINTCR/LF (FONT) %MAP-FOR-EFFECT-MULTIPLE (FUNCTION MIN-LENGTH ELT-SLICE) -\\IFS.LOOKUPFILE (NAME/PASS INFO SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\PROCESS.AFTER.EXIT (FLG) -\\TEDITMENU.RECORD.UNFORMATTED (BUTTON) DISABLEGC (\\INTERRUPTABLE) SI::SPLIT-PROCEED-CLAUSES (SI::ENV - SI::OPTIMIZE?) \\CHANGECHARSET.DISPLAY (\\INTERRUPTABLE) SEDIT::RESHAPEFN (SEDIT::OLD-SCREEN-REGION -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) TB.FINISH.CLOSE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -\\BSP.HANDLE.ACK (\\INTERRUPTABLE) FIXSPELL (DWIM.GIVE.UP.TIME SI::*RESETFORMS*) MAKE-REPORT-FUNCTION -(DATUM BOUND-VAR TYPE-NAME) D-ASSEM:INTERN-DCODE (D-ASSEM::NTBYTESIZE D-ASSEM::CODE-ARRAY -\\INTERRUPTABLE D-ASSEM::START-PC) BSPFORCEOUTPUT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -SEDIT::PROPS-COMPLETION (SEDIT::CONTEXT CL:STRUCTURE SEDIT::CHANGED? CL:ATOM SEDIT::IFCHANGEDFN -SEDIT::OLDPROPS) TWODINSPECT.DEFAULT.VALUECOMMANDFN (DATUM *) FLASHWINDOW (\\INTERRUPTABLE) -FORMAT-TERPRI (COLON ATSIGN PARMS) %MAP-FOR-RESULT-SINGLE (FUNCTION) \\FILLWINDOW (YBOT CURLINE -TEXTOBJ DONTFILLFLG WINDOW NEXTCARETCH#) \\LOAD-STREAM (*STANDARD-INPUT* *PACKAGE* *READTABLE* PRLST -FILECREATEDENV FILEMAP FNADRLST FILECREATEDLST INTERLISP-P FILECREATEDLOC) CLISPFOR0 (DWIMIFYCHANGE -DUMMYVARS I.S.OPRSLST) EXTERNAL-SYMBOL-COUNT (PACKAGE) %SOME-MULTIPLE (PREDICATE MIN-LENGTH ELT-SLICE) - CONDITIONS::CONVERT-CONDITION-CASE (CONDITIONS::WHOLE) |\\LFDeleteFile| (SI::*LOCKED-MONITOR* -SI::*RESETFORMS* \\INTERRUPTABLE) \\OPENLINEBUF (STREAM) ACCEPT-UNIX-SOCKET-STREAM (CHAN) -PRINT-BITMAPS-NICELY (BASE QUAD-CHARS-PER-ROW CHARS-SO-FAR) FDIFFERENCE (X Y) CONDITIONS::PARSE-RESTART-CASE - (CONDITIONS::NAME CONDITIONS::KEY CONDITIONS::VALUE) TB.EXPANDFN (SI::*LOCKED-MONITOR* SI::*RESETFORMS* - FN) COURIER.READ.NSNAME (PROGRAM) CONDITIONS::EXPAND-RESTART-CASE (CONDITIONS::FORM CONDITIONS::CLAUSES - CONDITIONS::ENV CONDITIONS::VALUE-SLOT CONDITIONS::ONLY-ONE-VALUE?) ADDTOFILE (TEM) FGREATERP (X Y) -CONDITIONS::CONVERT-RESTART-CASES (CONDITIONS::CLAUSES CONDITIONS::ENV CONDITIONS::OPTIMIZE?) -XCL:LIST-ALL-PROFILES (XCL::NAME) COMPILER::MAKE-LAP-VAR (COMPILER::ARG-P) FB.FASTSEE.ONEFILE ( -UNFORMATTED MORE) RIGHTW.BUTTONEVENTFN (*PRINT-LEVEL* *PRINT-LENGTH* W) READ-UNICODE-MAPPING-FILENAMES - (X) PRINT-ARGLIST (TYPE REMARGS) SEDIT::COMPLETION (SEDIT::CONTEXT) \\NAMEDTABSIZE (IMAGESTREAM -RIGHTMARGIN) SI::EXPAND-CONDITION-CASE (SI::ENV SI::VALUE-SLOT SI::ONLY-ONE-VALUE?) -FORMAT-JUSTIFICATION (COLON ATSIGN PARMS) FB.IS.NOT.SUBDIRECTORY.ITEM (BROWSER) \\10MB.TURNONETHER ( -SMASHSTATE NEWSTATE) COMP.VALN (COMPILE.CONTEXT) MB.DEFAULTBUTTON.ACTIONFN (W) -\\SEQUIN.OUT.OF.THE.BLUE (SEQUIN PUP) TWODINSPECT.DEFAULT.TITLECOMMANDFN (*) -CONDITIONS::CONVERT-OLD-DEFINE-CONDITION (CONDITIONS::FORM) COMPILER::ALPHA-IF (COMPILER::*CONTEXT*) -%NOTANY-MULTIPLE (PREDICATE MIN-LENGTH ELT-SLICE) DEDITE (WHERE *EDITMODE*) %SOME-SINGLE (PREDICATE -LENGTH) |\\LFRenameFile| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\TEDIT.FIND.LAST.LINE (CURY) -TEDIT.PUT.OBJECT (TOFILE) \\NULL.OPENFILE (NAME RECOG PARAMETERS) DODIRCOMMANDS (FILE NAMEPRINTED) -CL:USE-PACKAGE (PACKAGES-TO-USE) SEDIT::SEDIT1 (SEDIT::CONTEXT) \\COURIER.WHENCLOSED (STREAM CON) -\\TEDIT.LOOKS.UPDATE (TEMP) WHEREIS (NAME TYPE FILES FN) %EVERY-MULTIPLE (PREDICATE MIN-LENGTH -ELT-SLICE) SI::EXPAND-PROCEED-CASE (SI::FORM SI::CLAUSES SI::ENV SI::VALUE-SLOT SI::ONLY-ONE-VALUE?) -\\SHOWSEL (HOW LL SHOWFN) TTCOMPLETEWORD (*PACKAGE*) FABS (X) ADDMAPBUFFER (TEMP ERRORFLG) -CL:SHADOWING-IMPORT (SYMBOLS HASHTABLE) DBG::KEYLIST-FROM-ESCAPE-LIST (DBG::ESCAPES) -%NOTEVERY-MULTIPLE (PREDICATE MIN-LENGTH ELT-SLICE) BOXCOUNT (\\INTERRUPTABLE) CLIPBOARD-PASTE-STREAM -(\s) SEDIT::INPUT-SQUARE-BRACKET (SEDIT::CONTEXT SEDIT::CHARCODE) CLISPIFY2B (OPR0 CLTYP0) -\\TEDIT.GET.SINGLE.CHARLOOKS2 (FILE) IRM.CREF.BOX (CURRENTX RIGHTMARGIN) XCL:MAKE-PROFILE (XCL::CLAUSES -) SEDIT::INPUT-STRINGDELIM (SEDIT::NODE) \\EDIT.FLIPCARET (CARET FORCE) EXPORT (SYMBOLS SYMS USED-BY -CPACKAGES CSET MISSING IMPORTS INTERNAL EXTERNAL) ADDFILE0 (X TEM) PREPLOOP (LLIST) REDUCE-FROM-END ( -FUNCTION SEQUENCE START END INITIAL-VALUE) %NOTANY-SINGLE (PREDICATE FIRST-SEQUENCE) -COMPILER::COMPILE-AND-DUMP (COMPILER::*CURRENT-BLOCK*) %MAKE-ARRAY-STORAGE (TYPENUMBER) BIT (BIT-ARRAY - INDICES) REDUCE-FROM-START (FUNCTION SEQUENCE START END INITIAL-VALUE) COMPILER::CLOSURE-ANNOTATE-OPCODES - (COMPILER::NODE COMPILER::IN-LOOP-P) |\\LFTruncateFile| (\\INTERRUPTABLE) \\TEDIT.FIND.PROTECTED.END -(PCTB) COMPILER:OPTIMIZE-AND-MACROEXPAND-1 (COMPILER:CONTEXT COMPILER::*NEW-COMPILER-IS-EXPANDING* -OPTIMIZERS) PRINT-HISTORY (HELPCLOCK) COURIER.OPEN (OBSOLETE WHENCLOSEDFN OTHERPROPS) CL:SHADOW ( -SYMBOLS HASHTABLE) REPLACEFIELD (\\INTERRUPTABLE) \\TEDIT.TRY.ABBREV (SEL CH#) \\FIXSEL (SEL TEXTOBJ -THISWINDOW AVOIDINGTHISW) \\BOXFQUOTIENT (BORROW) \\INIT.ETHER.BUFFER.POOL (LASTBUF BUFFER) -DINFO.UPDATE.GRAPH.DISPLAY (DINFOW) ZEROD.FETCHFN (PROP) SEDIT::AWAKE-COMMAND-PROCESS (SEDIT::COMMAND -SEDIT::PROCESS) %PRINT-CONDITION (LEVEL) ENTER-NEW-NICKNAMES (PACKAGE NICKNAMES) FQUOTIENT (X Y) -CHECKBUFFERREFVAL (\\INTERRUPTABLE) MAPRINT (SI::*RESETFORMS*) \\PNC (\\INTERRUPTABLE) -\\FONTCREATE.HCPYMODE.INTERPRESS (FAMILY SIZE FACE ROTATION DEVICE) \\TTYIN.RPEOF (STREAM) -\\ACTONDISKPAGES (EMFID \\INTERRUPTABLE) MAKECREATE0 (HASHLINKS FIELDINFO) CL::%MAKE-ACCESSOR-CLOSURE -(CL::STRUCTURE-TYPE CL::DESCRIPTOR) FB.MENU.WHENSELECTEDFN (MENU KEY) PSCFONT.WRITEFONT (*READTABLE*) -\\DISKERROR (LASTNC) SEDIT::DELETE-QUOTE (SEDIT::SET-POINT?) SETSTKNAME (\\INTERRUPTABLE) -CREATE-UNIX-SOCKET-STREAM (PATHNAME) \\TEDIT.HCPYLOOKS.UPDATE (TEMP) = (CL::I) OPENPOSTSCRIPTSTREAM ( -BBOX SI::*RESETFORMS*) SEDIT::DOT-THIS-LIST (SEDIT::GAP-NODE) \\TEXTBIN (CH FILE STR) -|\\LFGetFileInfo| (|device| SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CL:IN-PACKAGE (KEYS) TIMEREXPIRED? -(\\INTERRUPTABLE) CREATETEXTUREFROMBITMAP (TEXTHEIGHT) SEDIT::REPLACE-ROOT (SEDIT::WHERE) MOVD ( -\\INTERRUPTABLE) CHAT.RESHAPEWINDOW (OLDSCREENREGION) DO.CHAT.OPTION (WINDOW) -RESOLVE-USE-PACKAGE-CONFLICT (XCL::MY-CONDITION) REPORT-CONDITION (CONDITION STREAM) -COMPILE-FILE-DECLARE\: (FORM COMPILED.FILE EVAL@COMPILE DOCOPY DEFER) \\COPYFNHEADER (\\INTERRUPTABLE) - TEDIT.REDO.INSERTION (INSPC#) CL:Y-OR-N-P (ARGUMENTS) \\CLEARMAP (\\INTERRUPTABLE) WTFIX0 (FAULTX -TAIL PARENT SUBPARENT ONLYSPELLFLG FAULTARGS FAULTAPPLYFLG FAULTPOS DWIMIFYFLG) COMP.VAL1 ( -COMPILE.CONTEXT) %NOTEVERY-SINGLE (PREDICATE FIRST-SEQUENCE) COMPILER::ENV-ANALYZE-GO (COMPILER::NODE) - \\DO-DEFINE-FILE-INFO (STREAM) SEDIT::INPUT-ESCAPE (SEDIT::CONTEXT) SI::PROCESS-PROCEED-KEYWORDS ( -SI::NAME SI::ARG PACKAGE SI::FILTER SI::REPORT) CL:MAKE-DISPATCH-MACRO-CHARACTER (NON-TERMINATING) -COMPILER::COLLECT-NONLOCAL-VAR-EFFECTS (COMPILER::NODE) IMPORT (CL::SYMBOLS CL::SYMS CL::HASHTABLE) -VARSBOUNDINFORM (MACRO) CL:RENAME-PACKAGE (FOUND) %THIN-STRING-ARRAY-P (ARRAY) CL:SET-MACRO-CHARACTER -(FUNCTION NON-TERMINATING) PSCFONTFROMCACHE.SPELLFILE (ROTATION DEVICE) \\RELEASEBUFFER (STREAM) -UPDATEFILEMAP (*PRINT-RADIX*) WALK-PROCEED-CASES (PROCEED-CASES PRED) \\TEDIT.SET.WINDOW.EXTENT ( -TEXTOBJ) SEDIT::REPAINTFN (SEDIT::REGION SEDIT::CONTEXT) \\TEXTBOUT (PSTR) ZEROD.STOREFN (PROP) -TB.UPDATE.DISPLAY (LASTITEM# HEIGHT) PUTBASEPTRX (\\INTERRUPTABLE) RESUME (\\INTERRUPTABLE) -SEDIT::GET-BUTTON-STRING (SEDIT::CONTEXT) CL-WRAP-MACRO (FN CHAR) FASL:PROCESS-FILE (FASL::TEXT-FN -FASL::ITEM-FN FILEPKGFLG DFNFLG LISPXHIST ADDSPELLFLG) CL:UNUSE-PACKAGE (PACKAGES-TO-UNUSE) -%DEFPRINT-ARRAY (HASH RANK RANKSTR) \\SEQUIN.HANDLE.ACK (\\INTERRUPTABLE) IL-WRAP-MACRO (FORM) STKARG -(N POS DEFAULT) \\CML-LOAD (*PACKAGE* *READTABLE*) CL:UNINTERN (NAME SHADOWING-SYMBOLS) -\\CREATECHARSET.HCPYMODE.PRESS (FAMILY SIZE FACE ROTATION DEVICE CHARSET FONTDESC) SEDIT::MAP-COMMENT-INDEX - (SEDIT::END) DBG::MENU-FROM-ESCAPE-LIST (DBG::ESCAPES) COMPILER::COLLECT-CODE (COMPILER::*CODE*) -LISPXREADBUF (STRIPSEPRSFLG) CLEARMAP (RELEASE) MAKE-INTO-CONDITION (DATUM DESIRED-TYPE ARGS) -LISPXTERPRI (Y Z) LISPXGETINPUT (EVENT) |InstallUnixPrinter| (PRINTERTYPE) CL:YES-OR-NO-P ( -CL::FORMAT-STRING CL::ARGUMENTS) %PRINT-ARRAY-CONTENTS (FLAT-ARRAY OFFSET *PRINT-LEVEL*) -BITMAPBIT.EXPANDER (BM X Y) CROPMARK.WHENOPERATEDONFN (A B C) \\NSFILING.ERRORHANDLER (\\INTERRUPTABLE -) ADD-SYMBOL (SYMBOL-BASE SYMBOL-LENGTH SYMBOL-FATP CL:SXHASH H2 VEC1 HASH1 THIS-HASH THIS-VEC) -%DEFPRINT-GENERIC-ARRAY (ARRAY STREAM HASH) HASH-LEFTPAREN (CHAR) MAKE-PAD-SEGS (SPACES PADDINGS) -READFILE (FILE RDTBL ENDTOKEN PACKAGE) COMPILER::SET-UP-BLOCK-DECLS (COMPILER::DECLS) CL:PRINC-TO-STRING - (*PRINT-ESCAPE*) \\TEDIT.PUT.SINGLE.PARALOOKS (OUTPUTFORMAT) \\CURVE2 (\\CURX \\CURY \\OLDX \\OLDY -\\OLDERX \\OLDERY LKNOT DASHON DASHTAIL DASHCNT) RESOLVE-EXPORT-MISSING (XCL::MY-CONDITION) -%DEFPRINT-BITVECTOR (STREAM HASH FINAL.INDEX ELIDED SIZESTR) \\WRITEDISKPAGES (LASTNUMCHARSCONS EMFID -\\INTERRUPTABLE) SETSTKARGNAME (\\INTERRUPTABLE) NUKE-SYMBOL (TABLE BASE OFFSET LENGTH FATP HASH EHASH -) %DEFPRINT-VECTOR (HASH FINAL.INDEX ELIDED SIZESTR) SEDIT::PLACE-CARET-AND-SELECTION (SEDIT::CARET) -BLOCKCOMPILE (NLAMA NLAML LAMS LAMA NOFIXFNSLST NOFIXVARSLST EXPRSLST LOCALVARS SPECVARS) LAYOUTFOREST - (FAMILYD) VARS.PUTDEF (TYPE REASON) CONCATFILES (INPUT-FILES OUTPUT-FILE) SI::CLEAR-CLOSURE-CACHE ( -\\INTERRUPTABLE CL:BLOCK XCL::CLOSURE) \\TEDIT.SHOW.PARALOOKS (OBJ SEL W) HASH-A (CHAR) -DBG::COLLECT-ACTIVE-ESCAPES (DBG::CONDITION) RESOLVE-EXPORT-CONFLICT (XCL::MY-CONDITION) -%DEFPRINT-STRING (STREAM ESCAPECHAR CLP SIZE) XCL:PKG-GOTO (XCL::NAME XCL::KEYS) -\\DSPCLIPPINGREGION.IP (\\INTERRUPTABLE) COMPILE-IN-CORE (DONT-TRANSFER-PUTD SI::*RESETFORMS* LCFIL -LAPFLG STRF SVFLG LSTFIL SPECVARS LOCALVARS FREEVARS) %SLOW-ARRAY-READ (BASE TYPENUMBER -ROW-MAJOR-INDEX) HASH-NO-PARAMETER-ERROR (CHAR PARAM) LOOKUP-SYMBOL (*) TEDIT.SKIP.SPECIALCOND ( -TEXTOBJ FORMATTINGSTATE) SUBARRAY (NEWORIG \\INTERRUPTABLE) \\COURIER.EXPEDITED.OVERFLOW (STREAM) -XCL::RECORD-CONSTRUCTOR-MACRO (XCL::FORM XCL::ENV) DINFO.UPDATE (PREVIOUS.NODE) \\MAPPAGE ( -\\INTERRUPTABLE) TEDIT.UNDO.INSERTION (FIRSTPIECE OBJ DELETEFN) FINISH-READING-BITMAP (DIMENSIONS) -|\\VAMRecomputeFreePageCount| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) SEDIT::ALIST-COMPLETION ( -SEDIT::CONTEXT CL:STRUCTURE SEDIT::CHANGED? CL:ATOM SEDIT::IFCHANGEDFN SEDIT::OLD-KEYS) -PFI.PRINT.INDEX (*PFI-ITEM* *PFI-TITLE*) \\SETEOF (\\INTERRUPTABLE) RESOLVE-IMPORT-CONFLICT ( -XCL::MY-CONDITION) INSPECT/AS/RECORD (ITEM) DEFAULT-HANDLE-CONDITION (CONDITION) |\\LFGetFileName| ( -|Dev| SI::*LOCKED-MONITOR* SI::*RESETFORMS*) BKSYSBUF.GENERAL (SI::*RESETFORMS* *PRINT-BASE* -*PRINT-RADIX*) PFI.PRINT.INDICES (LINELEN SPACEWIDTH PREVITEM) LISPX/1 (VARS) /DECLAREDATATYPE ( -FIELDSPECS DLIST LEN SUPERTYPE) TTPRIN2 (EXPR CARLVL CDRLVL) \\NSNAME.DEFPRINT (STREAM) -SEDIT::DETRANSLATE-CHARS (TYPE) \\3MBSENDPACKET (NDB \\INTERRUPTABLE) SPY.MERGE1 (NEWORIGINAL SPYDATA -PARENTS CALLER DEPTH) TTYIN.BALANCE (RPTN) BCOMPL1A (FILEPKGFLG) TWODINSPECT.SETELT (*PRINT-LEVEL* -*PRINT-LENGTH*) DBG::INVOKE-ESCAPE-FROM-MENU (CASE) %SLOW-ARRAY-WRITE (BASE TYPENUMBER ROW-MAJOR-INDEX -) MB.DISPLAY (MODE DS) ONEDINSPECT.REPAINTFN (*PRINT-LEVEL* *PRINT-LENGTH*) \\TFBRAVO.GET.NAMEDTAB ( -TEXTSTREAM) \\POLYSHADE.BLT (|nlist| |ix| |tx| |by|) \\COURIER.EOF (STREAM) SEDIT::VERIFY-COMMENT ( -SEDIT::POINTER SEDIT::STRING-LENGTH) \\TEDIT.MOVE.PIECEMAPFN (TEXTOBJ) SEDIT::GET-LIST-FORMAT (SEDIT::FN -) \\CREATE.TTY.OUTCHARFN (STREAM) ONEDINSPECTW.CREATE (*PRINT-LEVEL* *PRINT-LENGTH*) %PRINT-PATHNAME ( -D) MB.CREATE.NWAYBUTTON (CHANGESTATEFN) ENUM-STRING (INDEX) %PRINT-DIRECTORY-COMPONENT (D PATH) -COMPILER::CLOSURE-ANNOTATE-LITERAL (COMPILER::NODE COMPILER::IN-LOOP-P) BSP.PUTINTERRUPT ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CL::ESTABLISH-ACCESSORS (CL::PS-NAME CL::STRUCTURE-TYPE -CL::ACCESSOR CL::EXPORTNAME) SI::CANONICALIZE-ADVICE-WHERE-SPEC (SI::SPEC) WARNUSER (TEM) -GATHEREXPORTS (FROMFILES FLG) FIND.SYMBOL (*) \\NSINIT (EVENT) CLRHASH (\\INTERRUPTABLE) PPSPP ( -SI::*RESETFORMS*) |\\LFExtendFile| (\\INTERRUPTABLE) CROPMARK.COPYFN (FROMSTREAM) \\FM.HIGHLIGHTITEM ( -BUTTONS) DBG::ESCAPE-FROM-DEBUGGER (DBG::NAME-OR-NUMBER DBG::KEYS) CL:LIST-ALL-PACKAGES (K) -\\PUNT.BLTSHADE.BITMAP (\\INTERRUPTABLE) PARSE-NAMESTRING1 (BEYONDEXT PACKFLG ONEFIELDFLG) MAPRELATION - (DUMMY) COMPILER::ALPHA-FUNCTIONAL-FORM (COMPILER::*CONTEXT*) FILEPKGCOMS.PUTDEF (TYPE REASON) -SEDIT::HELPMENU (SEDIT::MENU SEDIT::PROMPTWINDOW SEDIT::COMMAND) STORAGE.LEFT (ATOMTOTAL ATOMSLEFT) -\\BITBLT.BITMAP.SLOW (\\INTERRUPTABLE) CL::DEFINE-ACCESSORS (CL::NAME CL::STRUCTURE-TYPE CL::ACCESSOR -CL::EXPORTNAME) DBG::PRINT-BACKTRACE (DBG::LINK *PRINT-LEVEL* *PRINT-LENGTH*) |\\VFMDeletePageGroup| ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS* \\INTERRUPTABLE) EXPANDBITMAP (NEWX NEWY) PFI.PRINT.MULTI.INDEX -(*PACKAGE* *READTABLE*) SEDIT::EDIT-HELP (SEDIT::NODE) CHECK-TYPE-FAIL (PROCEEDABLE PLACE VALUE -DESIRED-TYPE MESSAGE) FILES.PUTDEF (TYPE) CL:VECTOR-PUSH (NEW-ELEMENT FILL-POINTER) PRETTYPRINT ( -FNSLST ADR SKIPPEDLST) |\\LFSetFileInfo| (|dev| SI::*LOCKED-MONITOR* SI::*RESETFORMS*) MSUPDATE (VARS) - FIND-SYMBOL* (BASE OFFSET LENGTH FATP PACKAGE HASH EHASH RESULT DONE) CL:AREF (ARRAY) FTPDEBUG (FLG) -HASH-R (CHAR) SEDIT::RECOMPUTE-WIDTH (SEDIT::LAST-LINE) UNIX-GET-NEXT-BUFFER (STREAM WHATFOR -NOERRORFLG) INTERN* (BASE OFFSET LENGTH FATP FATCHARSEENP PACKAGE EXTERNALP) \\PUNT.BITBLT.BITMAP ( -\\INTERRUPTABLE) HASH-ILLEGAL-HASH-CHAR (STREAM PARAM) \\STMDSTYPE (NC) CROPMARK.GETFN (TEXTSTREAM) -\\PAGEDSETFILEPTR (\\INTERRUPTABLE) BLTPATTERN.GENERIC (TW TH) MOBY-UNINTERN (CL:SYMBOL PACKAGE) -SI::INSTALL-CLOSURE-CACHE (\\INTERRUPTABLE) HASH-STAR (CHAR) WRITEFILE (X FILE) -RESOLVE-UNINTERN-CONFLICT (XCL::MY-CONDITION) HASH-BACKSLASH (CHAR) SEDIT::COPY-STRUCTURE-STRING ( -SEDIT::CONTEXT) \\MAKERECODEMAP (INVERTED) BCOMPL.BODY (NOBLOCKSFLG SPECVARS LOCALVARS CHANGES OTHERS -FIRST BLOCKS BLKFNS TEM DESTINATIONENV DFNFLG) TEDIT.EDIT.OBJECT (LL) \\PAGED.FORCEOUTPUT ( -\\INTERRUPTABLE) DEFAULT.EDITDEF (EDITCOMS OPTIONS FILE DEF) \\STORAGE.TYPE (INUSEPAGES) -\\PAGED.GETNEXTBUFFER (\\INTERRUPTABLE) COMPILER::RESOLVE-VARIABLE-REFERENCE (COMPILER::CURRENT-ENV -CL:SYMBOL) ICONW.PRINT-JUSTIFIED (WIDTH) \\DOFORMATTING.HARDCOPY (SPACEOFLOW) DSPSOURCETYPE ( -\\INTERRUPTABLE) SENDXIP (SOCKET) HASH-VBAR (*READ-SUPPRESS*) FORMAT-DO-ITERATION (START END MAX-ITER -COLON AT-LEAST-ONCE-P *FORMAT-ARGUMENTS*) EVAL-INPUT (TODO ENV) CL::ACCESSOR-BODY (CL::SLOT CL::ARGUMENT - CL::STRUCTURE-TYPE CL::NO-TYPE-CHECK) MAKE-DO-SYMBOLS-CODE (VAR CL:HASH-TABLE EXIT-FORM FORMS INDEX -HASH-VECTOR HASH TERMINUS HASH-VECTOR-LIST TABLE-VECTOR-LIST TOP REAL-TOP) WHO-LINE-USER-AFTER-LOGIN ( -HOST USER) HASH-NUMBER-SIGN (STREAM CHAR) XCCS-UTF8-AFTER-OPEN (STREAM ACCESS PARAMETERS) -COMPILER::MAKE-LAP-VAR-REFERENCE (COMPILER::VAR) SEDIT::PARSE--LIST (SEDIT::CONTEXT SEDIT::PARSER) -GET-ENVIRONMENT-AND-FILEMAP (DONTCACHE ENV) FNUM-STRING (INDEX) CHAT.TAKE.INPUT (STATE) HASH-EQUAL ( -CHAR) SEDIT::INPUT-DOT (SEDIT::CHARCODE SEDIT::SELECTION SEDIT::SUPER-NODE) CROPMARK.IMAGEBOXFN (HRULE - CURRENT.X RIGHT.MARGIN SCALE WIDTHS) EP (*EDITMODE*) \\STRINGWIDTH.PRESS (CSET DUMMY) -|\\VAMFreePageGroup| (SI::*LOCKED-MONITOR* SI::*RESETFORMS* \\INTERRUPTABLE) \\10MB.STARTDRIVER ( -RESTARTFLG CSB) DWIMIFY1 (CLISPCONTEXT FORMSFLG) COMPILER::ENV-ANALYZE (COMPILER::TREE) -SEDIT::MAKE-COMMENT-STRING (SEDIT::SUBNODES SEDIT::SUM STRING SEDIT::POINTER) \\HASHRECLAIM ( -\\INTERRUPTABLE) SPY.MAKEGRAPHNODES (HEIGHT WIDTH NODEBITMAP TOOSMALL) STRING-EQUAL-HASHBITS (STRING) -\\PARSE.REMOTE.FILENAME (REMOTENAME) BEEP (DS) DWIMIFY0? (TAIL PARENT SUBPARENT FORMSFLG ONEFLG -FAULTFN CLISPCONTEXT DWIMIFY0CHANGE DWIMIFYING DWIMIFYFLG FAULTPOS EXPR VARS) COMPILER::ALPHA-FLET ( -COMPILER::BINDINGS COMPILER::BODY COMPILER::*ENVIRONMENT*) CMLREADSEMI (RDTBL) PSCFONT.SPELLFILE ( -FAMILY SIZE FACE ROTATION DEVICE) OLD.FIND.SYMBOL (\\INTERRUPTABLE) ONEDINSPECT.COPYBUTTONFN ( -*PRINT-LEVEL* *PRINT-LENGTH*) SEDIT::SEDITL (TTYEDITFN) STRINGHASHBITS (STRING) \\STRINGHASHBITS-UFN ( -INDEX ARGCOUNT) XCL::RECORD-PREDICATE-MACRO (XCL::FORM XCL::ENV) ONEDINSPECT.BUTTONEVENTFN ( -*PRINT-LEVEL* *PRINT-LENGTH*) FB.DELVERCOMMAND (BROWSER) \\SEARCHPRESSFONTS (DEVICE) COMPILE1A ( -NOSPELLFLG FILEPKGFLG) SI::DISABLE-CLOSURE-CACHE (\\INTERRUPTABLE) |\\DSKCloseDevice| ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) SEDIT::SELECTION-FROM-PSEUDO-SELECTION (SEDIT::PSEL SEDIT::SEL) - GETCLEARINGHOUSE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PRINTDISPLAYNODE (TRANS STREAM CLIP/REG) -ATAN (ANS) \\TEDIT.INTERRUPT.SETUP (\\INTERRUPTABLE) SEDIT::CFV-QUOTE (SEDIT::ENVIRONMENT CL:FORMAT) -COMPILEDREPLACEFIELD (RPLVALFLG) CL:UNEXPORT (SYMBOLS SYMS INTERNAL EXTERNAL) CLISPATOM1 (NOSAVEFLG) -MSCHECKBLOCK (ENTRIES BLKAPPLYCALLERS RETFNS NOLINKFNS LINKFNS DONTCOMPILEFNS) DO-HISTORY-SEARCH (TEM -PRED) PRETTYCOM (ORIGFLG RPTN) \\CONVERTNUMBER (IGNORE) FORMAT-ITERATION (COLON ATSIGN PARMS) GETXIP ( -\\INTERRUPTABLE) XCL::RECORD-ACCESS-MACRO (XCL::FORM XCL::ENV) TTPRINSPACE (RPTN) -INTERSECT/REGIONP/LBWH (NODE) COMPILER:ENV-FBOUNDP (COMPILER::NAME COMPILER::LEXICAL-ONLY) -|\\SFFixFont| (PILOTBBT) DRAWDASHEDLINE (NOWOFF) TWODINSPECTW.CREATE (*PRINT-LEVEL* *PRINT-LENGTH*) -|\\DSKEventFn| (SI::*LOCKED-MONITOR* SI::*RESETFORMS* KEY) COMPAREFILES (OLDFILE NEWFILE OSTART OEND) -DECLAREDATATYPE (PTRS) CL:SETQ (CL::TAIL CL::VALUE) COMPILER::CLOSURE-ANNOTATE-GO (COMPILER::NODE -COMPILER::IN-LOOP-P) SEDIT:ADD-COMMAND (SEDIT::KEY-NAME SEDIT::HELP-STRING) CLISPEXPANSION (ENV -NOSPELLFLG LISPXHIST VARS) \\MAIKO.BITBLTSUB (PILOTBBT |SourceBitMap| SLX STY |DestinationBitMap| DLX -DTY HEIGHT |SourceType| |Operation| |Texture| |WindowXOffset| |WindowYOffset|) HCOPYALL1 (NH) -\\HASHACCESS (\\INTERRUPTABLE) PROPS.WHENCHANGED (TYPE) \\TEDIT.UPDATE.SHOWSEL (TSTFLG LL) -\\3MBGETPACKET (\\INTERRUPTABLE) \\PAGEDREADP (\\INTERRUPTABLE) SEDIT::SELECT-PSEUDO-SEGMENT ( -SEDIT::CONTEXT SEDIT::PSEL SEDIT::SET-POINT? SEDIT::WHERE) |\\DSKOpenDevice| (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) LOCAL-MACRO-FUNCTION (X) \\UFS.UNREGISTER.GFS (\\INTERRUPTABLE) EXPANDBM (XSTEPS -YSTEPS) \\FONTCREATE.HCPYMODE.PRESS (FAMILY SIZE FACE ROTATION DEVICE) \\MAIKO.BLTCHAR (CHARCODE -DISPLAYSTREAM DISPLAYDATA) \\LEAF.READFILENAME (OSTYPE) |\\LFOpenDevice| (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) BYTECOMPILE2 (BLKFLG) \\FIXCODENUM (MASK) CL:FIND-ALL-SYMBOLS (STRING K V) -GET.OBJ.FROM.USER (TEXTSTREAM VAL SEL BM) \\CREATESTARFONT (NSMICASIZE) |\\UFSOpenDevice| ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\TEDIT.INSERT.TTY.BUFFER (SCRATCH PASS TEXTOBJ SEL) -SEDIT::GROW-CLICK? (SEDIT::CONTEXT SEDIT::POINT-TYPE SEDIT::WINDOW) PRETTYDEF (PRTTYFNS PRTTYCOMS -NEWFILEMAP \#RPARS *PRINT-ARRAY* XCL:*PRINT-STRUCTURE* *PRINT-LEVEL* *PRINT-LENGTH* FILEFLG FNSLST -PRTTYTEM PRETTYCOMSLST PRTTYSPELLFLG MAPADR NLAMALST NLAMLST LAMALST LAM?LST FILEDATES ORIGFLG) -STORAGE (HUNKSTATS TYPENAME) RECORDACCESS (DATUM DECLST EXPR FAULTFN DWIMIFYFLG VARS RECORDEXPRESSION -BINDINGS) UNPACK (DUMMY) SEDIT::CFV-LIST (SEDIT::SUB-PWIDTH) \\TFBRAVO.PUT.NAMEDTAB (FMTSTREAM) -D-ASSEM::FIXUP-NTENTRY (\\INTERRUPTABLE) PRINTBINDINGS (NAME) POSTSCRIPT.FONTSAVAILABLE (ROTATION) -FORMAT-CONDITION (PARMS) \\FM.CGETITEMPROP (ITEM) MSCHECKBLOCKS (LOCALVARS SPECVARS) -\\STRING-EQUAL-HASHBITS-UFN (INDEX ARGCOUNT) |\\UFSGenerateFiles| (PATTERN DESIREDPROPS OPTIONS -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\INTERLISP-NLAMBDA-MACRO (X ENV) CL::%SQRT-COMPLEX (CL::R CL::I - CL::C CL::D CL::E CL::ANSWER) \\GETFBB (RESULTLIST CHARCOUNT) \\COPYDATATYPE (\\INTERRUPTABLE) -SEDIT::UPGRADE-COMMENT (SEDIT::CONTEXT SEDIT::NODE) SEDIT::FIND-COMMENT (SEDIT::NODE SEDIT::CONTEXT -SEDIT::MIN-DEPTH SEDIT::LAST-SUBNODE) D-ASSEM::CREATE-HUNK (D-ASSEM::HUNK-SIZE D-ASSEM::MY-SLOT -D-ASSEM::PREV-SLOT D-ASSEM::POP-P) SI::ADD-OLD-STYLE-ADVICE (SI::NAME SI::ADVICE) DUNPACK (DUMMY) -|\\LFOpenFile| (FDEV SI::*LOCKED-MONITOR* SI::*RESETFORMS*) MSSHOWUSE (IFCANT) RETURN-FIRST-OF-THREE ( -TWO THREE) SCANDECLARECOLON (ADR) PRETTYDEFCOMS (FNSLST *PRINT-ARRAY* XCL:*PRINT-STRUCTURE* -*PRINT-LEVEL* *PRINT-LENGTH* BUILDMAPFLG PRTTYSPELLFLG ORIGFLG SOURCEFILE) \\TEDIT.NSCHAR.RUN (NEWPC -OLDFILEPTR) \\FIXCODEPTR (MASK \\INTERRUPTABLE) CHECK-SYMBOL-NAMESTRING (\\INTERRUPTABLE) COMP.EVQ ( -SI::*RESETFORMS*) \\CONVERT.FLOATING.NUMBER (MINUSFLAG PADSIZE PADCHAR NUMSTR INTEXP NSWIDTH) -|\\LFExtendFileIfNecessary| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) TWODINSPECT.SELECTCOLUMNPROP ( -*PRINT-LEVEL* *PRINT-LENGTH*) |\\UFSOpenFile| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CL:COMPILE-FILE -(COMPILER::LAP-FILE COMPILER::ERROR-FILE COMPILER::COMPILATION-SUCCEEDED COMPILER::*LOAD-COMPILED-CODE* - COMPILER::*CONTEXT* COMPILER::*ENVIRONMENT* COMPILER::*CONSTANTS-HASH-TABLE* -COMPILER::*OUTSTANDING-LOOSE-FORMS* COMPILER::*PROCESSED-FUNCTIONS* COMPILER::*UNKNOWN-FUNCTIONS* -COMPILER::*INPUT-FILECOMS-VARIABLE* SPECVARS LOCALVARS LOCALFREEVARS GLOBALVARS NLAMA NLAML LAMA -DONTCOMPILEFNS) MB.BUTTONEVENTINFN (STREAM SELWINDOW TEXTSTREAM) ONEDINSPECT.DEFAULT.VALUECOMMANDFN ( -DATUM *) TWODINSPECT.RESHAPEFN (SELECTION) |\\UFSSetFileInfo| (SI::*LOCKED-MONITOR* SI::*RESETFORMS* -BUFFER NAMESIZE PATHNAME) \\MERGEBACKWARD (ARLEN PARLEN SPLIT) LOCAL-SYMBOL-FUNCTION (X) -\\TEDIT.PARSE.PARALOOKS.LIST (D PC PCNO NPC NCHLIM PCTB LASTLOOKS NLOOKSAVE PC1) HARDCOPY.SOMEHOW ( -IMAGETYPE HEADING) PARSE-DEFMACRO (WHOLE-EXPRESSION MACRO-BODY ERROR-LOCATION ENVIRONMENT PATH -%ENV-ARG-NAME %CTX-ARG-NAME ERROR-STRING DOC-STRING-ALLOWED *DEFAULT-DEFAULT* *KEY-FINDER* -REMOVE-COMMENTS) PFI.HANDLE.FILEMAP (EXPR) ICMLARRAY.VALUECOMMANDFN (*) BUTTONPANEL/SELECTION/FN ( -BUTTON) \\TEDIT.PROCEXITFN (NEWP) MSPRGDWIM (SI::*RESETFORMS* LISPXHIST) CHCON (DUMMY) WALK-FORM ( -XCL::*DECLARATIONS* XCL::*LEXICAL-VARIABLES* XCL::*ENVIRONMENT* XCL::Y XCL::*WALK-FUNCTION*) -\\SPPWATCHER (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\ACCHARWIDTHLIST (STARTWORD) -\\FTP.UNPACKFILENAME (INFO) COMPILE.FILE.DEFINEQ (LCFIL) CL::STEP-PRINT-VALUES (CL::VALUE-LIST) -|\\LFGenerateFiles| (FDEV SI::*LOCKED-MONITOR* SI::*RESETFORMS*) MSNOTICEFILE (SI::*RESETFORMS*) -\\RESETLINE (\\INTERRUPTABLE) \\CLOSELINE (\\INTERRUPTABLE) \\NSRANDOM.PREPARE.CACHE (\\INTERRUPTABLE -RPTN) \\TEDIT.FORMATTABS (TEXTOBJ THISLINE) CHANGETRAN1 (NOTRANFLG SPECIALFIELDS FIELDNAMES SUBSTYPE -BINDINGS) \\MAIKO.BITBLT.BITMAP (SOURCEBITMAP SOURCELEFT SOURCEBOTTOM DESTBITMAP DESTINATIONLEFT -DESTINATIONBOTTOM WIDTH HEIGHT SOURCETYPE OPERATION TEXTURE CLIPPINGREGION CLIPPEDSOURCELEFT -CLIPPEDSOURCEBOTTOM) \\M44EXTENDVMEMFILE (LASTPAGE) |\\UFSEventFn| (SI::*LOCKED-MONITOR* -SI::*RESETFORMS* KEY) |\\LFRemoveDirEntry| (\\INTERRUPTABLE) TTY.PROCESS (OLDTTYDS \\INTERRUPTABLE) -SCALEBM (XSTEPS YSTEPS POWER) \\MAIKO.ALLOCBLOCK (\\INTERRUPTABLE) \\MP.ERROR (CODE) CL::%SQRT-FLOAT ( -CL::FX) \\FINDFONT (FD WSTRM PRESSMICASIZE NSMICASIZE DONTCHECK) TEDIT.INCLUDE (NPC PCCOUNT) -COMPILER::ANALYZE-TREE (COMPILER::*REDO-FLAG*) \\FIXCODESYM (CA BN SYM MASK) |\\UFSGetFileInfo| ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) TEDIT.PARSE.PAGEFRAMES1 (PARENT) \\CHECKFORSTORAGEFULL ( -\\INTERRUPTABLE) \\DEQUEUE (\\INTERRUPTABLE) DCHCON (DUMMY) BLTPATTERN (W H RX RW) -\\M44DOEXTENDVMEMFILE (LASTNEEDEDPAGE FIRSTDA LASTPAGEADDR) TEDITSTREAM.INIT (WINDOW MENUFN) -\\PACK.ITEM (DUMMY) TEDIT.GET (OCURSOR USER.CMFILE RESP) SEDIT::EXPAND (SEDIT::CHARCODE SEDIT::POINT -CL:STRUCTURE SEDIT::EXPANSION) D-ASSEM::FETCH-HUNK (D-ASSEM::HUNK-LEVEL D-ASSEM::HUNK-SLOT) -\\REQUEUE.ETHERPACKET (\\INTERRUPTABLE) \\MAIKO.BLTSHADE.BITMAP (TEXTURE DESTINATIONBITMAP -DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT OPERATION CLIPPINGREGION) |\\LFEventFn| ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PRINT-READER-ENVIRONMENT (*PACKAGE* *PRINT-BASE* PKG) -|\\UFSCloseDevice| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) SEDIT::COMPUTE-SELECTION-POSITION-LITATOM ( -SEDIT::CONTEXT) GETFILEMAP (STREAM FL) \\NSRANDOM.FETCH.CACHE (\\INTERRUPTABLE) \\MEDW.CARET.SHOW ( -SCREEN) BLOCK (\\INTERRUPTABLE) TEDIT.MOVE (FROMPCTB INSPC INSPC# PC NPC PCCH NPCCH OPLEN OBJ COPYFN -UNDOCHAIN) CONCOCT-SYMBOL (ILSYM CLSYM) \\PEEKNS (RPTN) \\TEDIT.APPLY.PARALOOKS (OBJ OFILE CH SIZE -SUPER SUB PARATYPE) \\TEDIT.PROCENTRYFN (OLDPROCESS) PRETTYVAR (FLG) |\\UFSDeleteFile| ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) MB.THREESTATEBUTTON.FN (W OFILE CH) SPY.GRAPH.EDITOR (W COPY) -SEDIT::COMPUTE-POINT-POSITION-LITATOM (SEDIT::CONTEXT) COMPILE.CHECK.ARGTYPE (BLKFLG) CL::STEP-PRINT ( -*PRINT-LEVEL* *PRINT-LENGTH*) LVLPRIN2 (FILE PRIN2FLG) |\\UFSOpenFile-C| (FILE REC ACC CDATE LENGTH -ERRNO) \\IDLE.ISMEMBER (PWD) FIXPRINTIN (LISPXHIST) CL::CACHE-PREDICATE-INFO (CL::PS) PRETTYVAR1 ( -*PRINT-ARRAY*) UNIXCOMM-AROUNDEXITFN (EVENT) LVLPRIN1 (FILE PRIN2FLG) \\TFBRAVO.COPY.NAMEDTAB (PIECE -OLDCH NEWCH) D-ASSEM::STORE-VAR (D-ASSEM::VAR-OR-SLOT D-ASSEM::POP-P D-ASSEM::KIND D-ASSEM::SLOT) -TEDIT.BUILD.PCTB (SEL LINES CHLOOKSSEEN NEWPC PARALOOKSSEEN TTEXTOBJ USER.CMFILE TSTREAM -EXISTINGCHARLOOKS EXLOOK EXISTINGFMTSPECS *READTABLE* *PRINT-BASE*) |\\LFDirectoryNameP| ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\EXTFTIMES (SIGNX SIGNY CARRY LOW8BITS FOO FOOHI FOOLO) -TEDIT.GET.PARALOOKS (SEL) \\EXTFQUOTIENT (SIGNX SIGNY BORROW) TTYINEDIT (\\INITPOS \\RMARG) -SEDIT::STRINGIFY-COMMENT (SEDIT::ENVIRONMENT SEDIT::LEVEL) |\\VAMAllocPageGroup| (SI::*LOCKED-MONITOR* - SI::*RESETFORMS* \\INTERRUPTABLE) \\READFONTWDFILE (FILE FD WIDTHS SCALE) XCL::%DEFINE-TYPE-SAVE-DEFN - (XCL::DEFINITION XCL::OLD-DEFINITION) |\\VFMCreateVPage| (\\INTERRUPTABLE) CL:EQUALP (CL::X CL::Y) -SEDIT::EVAL-SELECTION (SEDIT::STRUCTURE-COPY) \\DEVICEFILE.EOSERROR (\\INTERRUPTABLE) -RESOLVE-MISSING-EXTERNAL-SYMBOL (MY-CONDITION) COMPILER::CRACK-DEFMACRO (COMPILER::NAME COMPILER::ARG-LIST - COMPILER::BODY COMPILER::WHOLE COMPILER::ENV-VAR) PRINTPARA (P2FLAG) D-ASSEM::DLAMBDA-FROM-LAMBDA ( -D-ASSEM::LAP-FN) NAMESTRING-CONVERSION-CLAUSE (BASE OFFSET LEN FATP) \\COPYCODEBLOCK (NEWFN -\\INTERRUPTABLE PTR) SEDIT::ASSIGN-FORMAT-LIST (SEDIT::SUBFORMAT-NAME) -ONEDINSPECT.DEFAULT.TITLECOMMANDFN (*) \\TEDIT.HARDCOPY.FORMATLINE (PAGEINFO FONTWIDTHS PCNO) -D-ASSEM::DCODE-FROM-DLAMBDA (D-ASSEM::*HUNK-MAP* D-ASSEM::*HUNK-SIZE* D-ASSEM::*BYTE-COUNT* -D-ASSEM::*JUMP-LIST* D-ASSEM::*PVAR-COUNT* D-ASSEM::*LEVEL* D-ASSEM::FIXUP-DESC) PRETTYCOM1 ( -SI::*RESETFORMS*) FORMAT-UNTAGGED-CONDITION (TEST) \\REMOVE-DECLS (CL:DECLARATION) WINDOWWORLD ( -\\INTERRUPTABLE) |\\DSKGetFileName-C| (PATHNAME RECOG BUF ERRNO) DEFMACRO-ARG-TEST (ARGS) -\\TEXTDSPXPOSITION (XPOSITION) COMPILER::ALPHA-FUNCTION (COMPILER:CONTEXT) \\BN.DIVIDE (F) -HISTORYFIND1 (PRED) \\10MBWATCHER (\\INTERRUPTABLE) CL::%RATIO-PLUS (CL::GCD-TOP) -\\SEQUIN.HANDLE.INPUT (\\INTERRUPTABLE) UNDOPRINT (EVENT) CL::%RATIO-TIMES (CL::GCD-1-2 CL::GCD-2-1) -\\DSPYPOSITION.HCPYMODE (\\INTERRUPTABLE) \\TEDIT.SELECT.ALL (SEL) \\LEAF.ERROR (SENTPUP) -CL::%RATIO-PRINT (\\THISFILELINELENGTH *PRINT-RADIX*) |\\UFSDirectoryNameP-C| (DIRSPEC BUF ERRNO) -SI::EXPANSION-FUNCTION (XCL::NAME XCL::ARG-LIST XCL::BODY) PRINTPARA1 (RPTN) RESOLVE-MISSING-PACKAGE ( -MY-CONDITION) \\ETHEREVENTFN (DEV) |\\UFSGetFileName-C| (PATHNAME RECOG BUF ERRNO) CL::%BUILD-RATIO ( -CL:GCD) READARRAY-FROM-LIST (X) \\GETFILINGCONNECTION (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -IMPORTFILE (FILEPKGFLG DFNFLG) \\LOOKUPPORT (BUF) \\FILLBUFFER (\\INTERRUPTABLE) D-ASSEM::DIGEST-FUNCTION - (D-ASSEM::*FREE-VARS* D-ASSEM::*BOUND-SPECIALS* D-ASSEM::VAR) OPENIPSTREAM (PRINTSERVERNAME) -SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::SET-SELECTION? SEDIT::START STRING CL:STRUCTURE -SEDIT::NEW-STRUCTURES) \\TEDIT.SHRINKFN (ICON ICONW) \\MAIKO.DO.MOVDS (\\INTERRUPTABLE) -\\UFS.DIRECTORY.NAME (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) XCL::%DELETE-DEFINER (TYPE) -TEDIT.MAPPIECES (PCNODE) TEDIT.HARDCOPYFN (TEXTSTREAM) \\TEXTMENU.DOC.CREATE (MENUW) SCROLL.HANDLER ( -TIMEINTIMER) \\TEXTDSPYPOSITION (YPOSITION) \\TRANSLATE-CL\:LAMBDA (KEYWORDS VAR INIT KEY) CL::%> (CL::X - CL::Y) |\\UFSCloseFile-C| (PATHNAME FILEID CDATE ERRNO) \\ALLOCMINIMUMSIZES (EDGE) UNDOLISPX3 ( -SI::*RESETFORMS*) CL::STEP-FORM (CL::FORM CL::ENVIRONMENT CL::*STEP-INDENTATION-LEVEL*) -TWODINSPECT.SELECTROWPROP (*PRINT-LEVEL* *PRINT-LENGTH*) \\STARTDISPLAY (\\INTERRUPTABLE) PARSE-BODY ( -XCL::ENVIRONMENT XCL::DOC-STRING-ALLOWED) SHOWDEF (ORIGFLG FNSLST PRETTYCOMSLST NEWFILEMAP) -RECURSIVELY-ANALYZE (%MIN-ARGS %ARG-COUNT %UNBOUNDED-ARG-COUNT %ENV-ARG-NAME %CTX-ARG-NAME) -\\TEDIT.HARDCOPY.MODIFYLOOKS (ONEPOINT) SI::ADVICE-FILE-DEFINITIONS (SI::NAMES SI::READVISE? -SI::REAL-NAMES) D-ASSEM::DIGEST-CODE (D-ASSEM::INST) CLISPATOM2A (DWIMIFYCHANGE) -SEDIT::SET-SELECTION-COMMENT-WORD (SEDIT::INDEX SEDIT::ITEM TYPE) FORMAT-SEMICOLON-ERROR (COLON ATSIGN - PARAMS) \\TEDIT.PRIMARYW (TEXTOBJ) CL:ACOS (CL::RADIANS) |\\VFMInsertPageGroup| (SI::*LOCKED-MONITOR* - SI::*RESETFORMS* \\INTERRUPTABLE) MSINTERPRET (EDITQUIETFLG) COMPILER::ALPHA-ARGUMENT-FORM ( -COMPILER::*CONTEXT*) |\\DSKDirectoryNameP-C| (DIRSPEC BUF ERRNO) SEDIT::DO-MUTATION (SEDIT::CONTEXT -SEDIT::RESULT) \\TEDIT.STRIKEOUT.SEL.ON (TEXTOBJ) \\OUTDATE (UD FORMAT STRING) -SEDIT::GROW-SELECTION-DEFAULT (SEDIT::SELECTION SEDIT::CONTEXT SEDIT::NODE) RECORDECLBLOCK ( -ORIGINAL-SPEC) CL::%PRINT-RANDOM-STATE (XCL:*PRINT-STRUCTURE* *PRINT-ARRAY*) CL::NATURALIZE (CL::NAME -CL::SOURCE CL::DESTINATION) FB.CLOSEFN (WINDOW) INSPECTW.REPLACE (XCL:*EVAL-FUNCTION*) -COMPLEX-NSUBSTITUTE-IF-NOT (NEWITEM TEST SEQUENCE START END FROM-END KEY COUNT) -\\POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS (WIDTHS NEWWIDTHS SIZE) PPT (*STANDARD-OUTPUT* SI::*RESETFORMS*) - COMPILER::CLOSURE-ANNOTATE (COMPILER::IN-LOOP-P) \\MEDW.GETBOXSCREENPOSITION (SCREEN) -CL::PREDICATE-BODY (CL::ARG CL::PREDICATE TYPE) SETSYNONYM (FLG) |\\PFTrimHelper| (\\INTERRUPTABLE) -\\SETREADSYNTAX (\\INTERRUPTABLE) |\\UFSRenameFile-C| (OLDNAME NEWNAME ERRNO) CL::%+ (CL::X CL::Y) -\\SEQUIN.RETRANSMIT (\\INTERRUPTABLE) SPP.SENDEOM (EPKT) \\DSCCOUT (RPTN) SEDIT::AWAKE-ME (SEDIT::RESULT - SEDIT::STACK-FRAME) SI::ADVICE-NEWCOM (TYPE) |\\UFStoOtherRenameMess| (OLD-DEVICE) FORMAT-ESCAPE ( -COLON ATSIGN PARMS) \\TEDIT.GET.INSERT.CHARLOOKS (PCNO) HARDCOPYGRAPH (PAGENUMBERS-FLAG X-POSITION -Y-POSITION) D-ASSEM::INSTALL-VAR (D-ASSEM::CLOSED-OVER D-ASSEM::KIND D-ASSEM::SLOT) \\RPLPTR (OFFSET -\\INTERRUPTABLE) TEXTMENU.CLOSEFN (MAINW HEIGHT OHEIGHT OBOTTOM WBOTTOM WINDOWS) \\INTERPRETER1 ( -\\INTERRUPTABLE) SEDIT::EDIT-SELECTION (SEDIT::CHARCODE) MSPRGLAMBDA (PARENT PARENTCONTEXT VARS -INCLISP) \\TEXTLEFTMARGIN (XPOSITION) \\RTP.ERROR (FOREIGNPUP) \\MAIKO.NEWPAGE (BASE NOERROR LOCK?) -\\SMASHLINK (\\INTERRUPTABLE) SEDIT::FINALIZE-MOUSE-SELECTION (SEDIT::WINDOW) \\FTP.NEXTFILE (NAMEBODY - EXT N) CL::TYPE-EXPAND-NAMED-STRUCTURE (CL::TYPE-FORM) FB.COPYFN (TBROWSER) CL:/= (CL::I -CL::CURRENT-ARG CL::J) SEDIT::NEXT-NODE (SEDIT::POSTORDER?) CL:BREAK (CL::FORMAT-STRING -CL::FORMAT-ARGUMENTS) SEDIT::PARSE-INDENT-GROUPS (SEDIT::ARG-1) TEDIT.INSERT.DISPLAYTEXT (TEXTOBJ CH -CHWIDTH LINE XPOINT DS SEL) |\\UFSReadPages-C| (FILEID PAGENUM BUFFER ERRNO) NORMSECT (Y) OPENNSOCKET -(\\INTERRUPTABLE) DEFAULTWHENSELECTEDFN (FROMMENU BUTTON) CL::%* (CL::X CL::Y) D-ASSEM::GENERATE-ARG-CHECK - (D-ASSEM::OK-TAG D-ASSEM::BAD-TAG) \\CREATEDISPLAY (ACCESS RECOG OTHERINFO) TYPESOF (SHADOWED) -\\IDATE-PARSE-MONTH (CODEVAR) DWIMIFYREC (EXPR VARS DWIMIFYFLG) CL::%- (CL::X CL::Y) -\\MEDW.GETSCREENREGION (SCREEN NEWREGIONFNARG NEWMOUSEX NEWMOUSEY) RDTBL\\NONOTHERCODES (VAL KEY) -\\TEDIT.STRIKEOUT.SEL.OFF (TEXTOBJ) PRINENDLINE (RPTN) DAYTIME (BOX) COMPILER::EFFECTS-REPRESENTATION -(COMPILER::VAR) DBG::BACKTRACE-ITEM-SELECTED (DBG::BUTTON DBG::OLDITEM DBG::FRAMEWINDOW) \\RUN.PROCESS - (\\INTERRUPTABLE) D-ASSEM::REACH-TAGS (D-ASSEM::CODE) DEFAULTSUBITEMFN (MENU) DRIBBLE ( -\\INTERRUPTABLE) \\TEDIT.PARABOUNDS (PCNO NPC) D-ASSEM::GENERATE-KEY (D-ASSEM::START D-ASSEM::TAIL) -D-ASSEM::STACK-ANALYZE (D-ASSEM::EXPECTED-ENDING-DEPTH D-ASSEM::*LEVEL* D-ASSEM::ROOT-LIST -D-ASSEM::ENDING-DEPTH) \\TEDIT.UNDERLINE.SEL.OFF (TEXTOBJ) |\\UFSGetFileInfo-C| (FILENAME ATTR-CODE -BUFFER ERRNO) D-ASSEM::GENERATE-OPT-AND-REST (D-ASSEM::DLAMBDA D-ASSEM::NUM-REQUIRED D-ASSEM::NUM-OPTIONAL - D-ASSEM::OPT-INIT-VALUES D-ASSEM::AFTER-OPTS-TAG) CL:ASIN (CL:NUMBER) D-ASSEM::GATHER-TAGS (D-ASSEM::CODE -) FAULTAPPLY (\\INTERRUPTABLE) CL::STEP-EVAL (CL::FORM CL::ENVIRONMENT) PRETTYPRINT1 (FN) COMPILER::META-SUBST - (COMPILER::NODE) CL::%COMPARISON-OPTIMIZER (CL::PREDICATE CL::FIRST-NUMBER) ADD.PROCESS ( -\\INTERRUPTABLE) XCL::WHERE-IS-READ-COMS (PATHNAME) \\SETUP-COMPILED-CLOSURE-CALL (RPTN) FITP (ENDTAIL - CAREFUL) \\LINEBUF.PEEKBIN (NOERROR) ANALYZE-REST (WHOLE DOC PARSE-BODY-RESULT) D-ASSEM::ASSEMBLE-CODE - (D-ASSEM::LAP-CODE D-ASSEM::BINDING-DEPTH) \\INTERPRETER-LAMBDA (N DEF FN ARGBLOCK) MSPRGTEMPLATE ( -PARENTCONTEXT VARS) IMPORTFILESCAN (FILE RETURNFLG) CL::TYPE-EXPAND-STRUCTURE (CL::TYPE-FORM) -\\MAIKO.CONS.UFN (\\INTERRUPTABLE) COMPLEX-NSUBSTITUTE (NEWITEM OLDITEM SEQUENCE START END FROM-END -KEY COUNT TEST TEST-NOT-P) XCL::MAKE-UNDOABLE (XCL::ENV) COMPILER::FRAME-ANNOTATE-VAR-REF (COMPILER::SELF -) TEDIT.INSERT.OBJECT (PCNO CHNO) D-ASSEM::STACK-ANALYZE-CODE (D-ASSEM::CODE D-ASSEM::DEPTH -D-ASSEM::BINDING-DEPTH D-ASSEM::LOOKUP) TB.SET.FONT (WIDTH) SEDIT::PARSE-INDENT-GROUP-BODY (SEDIT::INDENTS - CL:BREAK SEDIT::NOBREAK) CL::ASSIGN-FIELD-DESCRIPTORS (CL::FIELD-DESCRIPTORS) SPP.CLEAREOM (CON FLG) -CL:CLEAR-OUTPUT (OUTPUT-STREAM) SEDIT::GET-CONTEXT (SEDIT::WINDOW) SI::ADVICE-HASDEF (TYPE SI::SOURCE) - SEDIT::SET-POINT-COMMENT-WORD (SEDIT::CONTEXT SEDIT::INDEX SEDIT::ITEM TYPE SEDIT::COMPUTE-LOCATION?) - FORMAT-CAPITALIZATION (COLON ATSIGN PARMS) SET-PROFILE-INTERACTIVELY (PROFILE-NAME) RECORDECL1 ( -DECLARATIONCHAIN) CL::PROCESS-TYPE (CL::NAME TYPE CL::PREDICATE-BODY) CL::%LOGICAL-OPTIMIZER ( -CL::BINARY-LOGICAL-FN CL::FORM) \\INSPECTW.REDISPLAYPROP (*PRINT-LEVEL* *PRINT-LENGTH*) -\\TOTALFIXEDHEIGHT (MAXEDW) |\\UFSGetSize-C| (FILEID BUF ERRNO) UNIX.SETDISPLAYTYPE (CODE) XCL::STRUNCATE - (CL:NUMBER) TEDIT.CR.UPDATESCREEN (CH# XPOINT TEXTOBJ SEL LINE BLANKSEEN CRSEEN DS CHWIDTH DONTSCROLL -) D-ASSEM::RESOLVE-JUMPS (D-ASSEM::CUMULATIVE-UNCERTAINTY) CHAT.HOLD (\\INTERRUPTABLE) -|\\LFWriteLeaderPage| (|vol|) TOTOPW.MODERNIZE (MAIN) IRM.GET.DINFOGRAPH (FROM.BACKGROUND?) -DBG::STACK-FRAME-PROPERTIES (DBG::LOTS? DBG::TOTAL-SLOTS DBG::NUM-ARGS DBG::ARGLIST) RPLACD (X Y) -|\\VFMGetPageGroup| (SI::*LOCKED-MONITOR* SI::*RESETFORMS* \\INTERRUPTABLE) COMPILER::META-SUBSTITUTE -(COMPILER::*SUBST-EXPR* COMPILER::*SUBST-VAR*) SEDIT::EXTEND-SELECTION (SEDIT::SELECTION SEDIT::CONTEXT - SEDIT::X SEDIT::Y SEDIT::NODE SEDIT::INDEX SEDIT::OFFSET SEDIT::LINE SEDIT::LINEAR) CL::CHECK-ALL ( -CL::XCLP) CL:CONJUGATE (CL:NUMBER) CDR (X) \\FM.EDIT-MESSAGE (ITEM WINDOW) \\TEDIT.UNDERLINE.SEL.ON ( -TEXTOBJ) ARGLIST (TEMP) D-ASSEM::STORE-DIGEST-INFO (D-ASSEM::BOUND-SPECIAL-COUNT) CL:COUNT-IF ( -FROM-END) \\TIMER.PROCESS (\\INTERRUPTABLE) |\\UFSSetFileInfo-C| (FILENAME ATTR-CODE BUFFER ERRNO) -COMPILER::EFFECTS-ANALYZE-LIST (COMPILER::NODE LIST) CL::%EXPT-FLOAT-INTEGER (CL::FBASE CL::TOTAL) -\\SPP.PREPARE.INPUT (\\INTERRUPTABLE) CL:COUNT-IF-NOT (FROM-END) CL::%BIGNUM-LOGCOUNT (CL::ELEMENTS -CL::CNT) \\TEST.PARAGRAPH.LOOKS (TABS) D-ASSEM::PRETTY-JUMPS (D-ASSEM::JUMP-OR-TAG) \\WRITE1 ( -FONTCHANGEFLG \\THISFILELINELENGTH) SEDIT::SET-SELECTION-COMMENT (SEDIT::INDEX SEDIT::OFFSET TYPE) -SUB-FORMAT (*FORMAT-INDEX* *FORMAT-LENGTH*) CL:COS (CL::RADIANS) PUSH-KEYWORD-BINDING (CL:KEYWORD -DEFAULT SUPPLIED-P-VAR REST-VAR TEMP-VAR) \\MEDW.GETSCREENPOSITION (SCREEN) \\FREESTACKBLOCK (ORIG) -MSPRGTEMPLATE1 (VARS TOPVARS) CAR (X) \\TEXTDSPLINEFEED (VALUE) RPLACA (X Y) D-ASSEM::REDUCE-UNCERTAINTY - (D-ASSEM::INCREASE-IN-MIN-PC D-ASSEM::JUMP-OR-TAG) D-ASSEM::SPLICE-IN-JUMPS (D-ASSEM::PTR D-ASSEM::SIZE - D-ASSEM::CHOICES) \\TOTALFIXEDWIDTH (MAXEDW) \\BSP.SENDBUFFER (\\INTERRUPTABLE) FIND-KEYWORD ( -CL:KEYWORD KEYLIST) SEDIT::NOTE-CHANGE-FORMAT (SEDIT::NODE SEDIT::CONTEXT) D-ASSEM::COMPUTE-DEBUGGING-INFO - (D-ASSEM::DLAMBDA) |\\UFSWritePages-C| (FILEID PAGENUM BUFFER SIZE ERRNO) CLISPATOM1A (NOSAVEFLG) -SEDIT::BACKSPACE-LITATOM (SEDIT::SUPER-TYPE) CL:DELETE-FILE (NS) COMPLEX-COMPARE-FORWARD (SEQUENCE1 -SEQUENCE2 KEY TEST TEST-NOT-P) \\TEDIT.FIND.FIRST.LINE (WWIDTH) SEDIT::SET-POINT-COMMENT (SEDIT::CONTEXT - TYPE SEDIT::COMPUTE-LOCATION?) TEDIT.MINIMAL.WINDOW.SETUP (TEDITPROMPTWINDOW TWIDTH THEIGHT) MAKEFILE - (PRETTYFLG *PRINT-BASE*) COMP.BLOCK (FLG) FORMAT-DOLLARS (COLON ATSIGN PARMS) \\START.PROCESSES ( -\\INTERRUPTABLE) EXEC (XCL::TOP-LEVEL-P XCL::TITLE *THIS-EXEC-COMMANDS* XCL::ENVIRONMENT XCL::PROMPT -XCL::FN XCL::PROFILE *EXEC-ID* XCL::PROFILE-CACHE *CURRENT-EVENT* XCL::OLD-DS) MBUTTON.SET.FIELD (OBJ -SAVED.SEL) \\ARBOUT (END-FPTR) KEYWORD-TEST (KEYS EXTRA-KEY-FOUND ALLOW-OTHER-KEYS-P) \\SPP.ESTABLISH -(SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\STOPDISPLAY (\\INTERRUPTABLE) COMP.IF (A) CL:DESCRIBE ( -*PRINT-LENGTH* *PRINT-LEVEL*) SI::ADVICE-DELDEF (TYPE) COMPILER::COMPILE-DEFINER-OUTSTANDING-LOOSE-FORMS - (COMPILER::COMPILER-CONTEXT) \\10MBENCAPSULATE (NDB) |\\UFSFinishFileInfo-C| (FINFOID) SPY.TITLE ( -SPYDATA) SEDIT::DELETE-WORD (SEDIT::SELECTION SEDIT::NODE SEDIT::END STRING SEDIT::START) -SEDIT::PARSE-INDENT-GROUP (SEDIT::INDENTS SEDIT::GROUP SEDIT::OFFSET CL:BREAK SEDIT::NOBREAK) -\\EVAL-INVOKE-LAMBDA (LAM ENV ARGBLOCK) D-ASSEM::PERFORM-LOCAL-FN-FIXUPS (D-ASSEM::FIXUP-LIST) -AS.DELETE.PASSWORDS (CONVGOOK) \\SETUP-ENVIRONMENT-CALL (RPTN) \\FTP.GENERATEFILES (REMOTENAME) -\\TEDIT.WINDOW.SETUP (EXT STRM) \\EVALFORMASLAMBDA (*ARGVAL* *TAIL* *FN*) COMPILER::CHECK-FOR-UNKNOWN-FUNCTION - (COMPILER::NAME) TTY/EDITL (EDITCHANGES LASTAIL LASTP1 LASTP2 EDITLISPFLG) COMPLEX-NSUBSTITUTE-IF ( -NEWITEM TEST SEQUENCE START END FROM-END KEY COUNT) PRINTER.BITMAPFILE (FILE BITMAP SCALEFACTOR REGION - ROTATION TITLE) IMAGEFNSCREATE (CLASSNAME) \\FTP.REOPENFILE (NAME RECOG OTHERINFO FDEV) SEDIT::EXPANDFN - (SEDIT::CONTEXT) SEDIT::ADJUST-WIDTH (SEDIT::CONTEXT) TWODINSPECT.SELECTITEM (*PRINT-LEVEL* -*PRINT-LENGTH*) APPLY (\\INTERNAL) \\UFS.NEXTFILEFN (NEWWNAME ERRNO DEFAULTEXT DEFAULTVERS -DESIREDPROPS) CL::MAYBE-MAKE-BINDING-FORM (CL::VALS CL::GETTER) \\MOUSE.PROCESS (\\MOUSEBUSY) -CL:DIRECTORY-NAMESTRING (PATHNAME) \\INTERNALTOTOPW (\\INTERRUPTABLE) SI::ADVICE-PUTDEF (TYPE) -FORMAT-GENERAL-AUX (CL:NUMBER W D E K OVF PAD MARKER ATSIGN) EDITL0 (EDITLFLG FINDFLAG LCFLG TOFLG -EDITHIST L0 COM0 COM ORIGFLG LISPXID) CL:ENOUGH-NAMESTRING (*PRINT-BASE* DEFAULT-PATHNAME HOST DEVICE -DIRECTORY NAME TYPE VERSION NEED-NAME) |\\PFPatchRootDirEntries| (|type|) MSHASHLIST (OTHERSET -BADMARKS) EDITMODE (NEWMODE) HVBAKREAD (RPTVAL) |\\VFMInsert| (|insertVolumePage|) \\UFS.REGISTER.GFS -(\\INTERRUPTABLE) CL:ARRAYP (ARRAY) CL:COUNT (FROM-END) D-ASSEM::CONVERT-TO-BINARY (D-ASSEM::UNWIND-OFFSET - D-ASSEM::FIXUP) CL::%LOGCOUNT (CL::POSITIVE-INTEGER CL::CNT) SEDIT::PARSE--QUOTE (CL:STRUCTURE -SEDIT::CONTEXT) READARRAY (X) |\\UFSNextFile-C| (GENFILESTATE) CHAT.MENU (X) -\\SPP.RELEASE.ACKED.PACKETS (\\INTERRUPTABLE) CL::STRUCTURES.HASDEF (TYPE CL::SOURCE CL::SPELLFLG) -CL::SETF-ERROR (CL::FORM) \\INTERPRET-ARGUMENTS (\\SPECIALS \\SVAR \\SP) \\NSADDRESS.DEFPRINT ( -*PRINT-BASE*) \\TEDIT.HARDCOPY.DISPLAYLINE (FONT) SI::ADVICE-GETDEF (TYPE SI::OPTIONS) -\\ADJUSTABLE-STRING-STREAM-OUTCHARFN (STRING CH) FORMAT-GENERAL-FLOAT (COLON ATSIGN PARMS) -COMPILER::COMPILE-DEFINER-NAMED-PROGN (COMPILER::COMPILER-CONTEXT COMPILER::FORM) VRULE.COPYFN ( -FROMSTREAM TOSTREAM) PRINTERS.WHENSELECTEDFN (MENU BUTTON DEFAULTPRINTER) DBG::ATTACH-BACKTRACE-MENU ( -*PRINT-LEVEL* *PRINT-LENGTH* *PRINT-ESCAPE* *PRINT-GENSYM* *PRINT-PRETTY* *PRINT-CIRCLE* *PRINT-RADIX* - *PRINT-ARRAY* *PRINT-STRUCTURE*) ICMLARRAY.SETVALUE (*PRINT-LEVEL* *PRINT-LENGTH*) -AS.CREATE.PASSWORDS (PASSWORD CONVGOOK) MSPRGRECORD (WITH? ONLYRELS EACHTIME) -CL::%INTEGER-COERCE-OPTIMIZER (CL::SINGLE-VALUE-FN CL:NUMBER CL::DIVISOR) FASL::DUMP-BITMAP ( -FASL::REMEMBER FASL::WIDTH FASL::HEIGHT FASL::BITS-PER-PIXEL FASL::BASE STREAM) RELSTK ( -\\INTERRUPTABLE) CL::%RATIONALIZE-FLOAT (CL::OLDNUM CL::OLDDEN CL::NUM CL::DEN) \\DSPFONT.HCPYMODE ( -\\INTERRUPTABLE) \\TEDIT.SUBSCRIPTSEL (TEXTOBJ) SEDIT::CREATE-SIMPLE-NODE (SEDIT::ENVIRONMENT) -DBG::BACKTRACE-MENU-BUTTONEVENTFN (DBG::MENU) CL:FILE-NAMESTRING (*PRINT-BASE* *PRINT-RADIX* VERSION) -\\TEDIT.MENU.WHENHELDFN (MENU BUTTON) SEDIT::ASSIGN-FORMAT-LITATOM (SEDIT::FONT SEDIT::STRING-ITEM -SEDIT::WIDTH) \\TEDIT.GET.PARALOOKS (FILE) DINFO.CREATE.FMENU (ADD.ITEMS FONT) UNDOEDITL (COM -EDITCHANGES) COMPILER::BIND-PARAMETER (COMPILER::VAR COMPILER::BINDER COMPILER:ENV) -COMPILER::META-CALL-LAMBDA-SUBSTITUTE (COMPILER::NON-LOCAL-EFFECTS COMPILER::*SUBST-OCCURRED*) -COMPLEX-COUNT-IF-NOT (TEST SEQUENCE START END KEY) CL::%EXPT-INTEGER (CL::TOTAL) -COMPILER::EFFECTS-ANALYZE-ANY-CALL (COMPILER::NODE COMPILER::FN COMPILER::ARGUMENTS) -FORMAT-FIND-COMMAND (COMMAND-LIST START) \\GET.SESSION.HANDLE (PROGRAM) DEL.PROCESS (INTERNAL) -CL::STRUCTURE-POINTER-SLOTS (CL::STRUCTURE-NAME CL::DESCRIPTOR) WHILEDOUNTIL (UNTIL) FILEGETDEF.VARS ( -TYPE OPTIONS) CL::ASSIGN-STRUCTURE-REPRESENTATION (CL::LOCAL-SLOTS) COMPILER::SCAN-ONE-FORM ( -COMPILER::COMPILER-CONTEXT) |\\UFSDeleteFile-C| (NAME ERRNO) SIMPLE-NSUBSTITUTE-IF (NEWITEM TEST -SEQUENCE START END) CL:EXP (CL:NUMBER) \\PUT.SESSION.HANDLE (PROGRAM) \\NSFILING.CONNECT (REALREQUIRED -) \\PROG0 (*FIRSTTAIL* \\INTERRUPTABLE) COMPILER::BINDING-TO-LAMBDA (COMPILER::BINDING) CL:EVAL ( -*EVALHOOK*) FILEGETDEF.FNS (TYPE) SEDIT::CONVERT-COMMENT (SEDIT::POINT SEDIT::NEW-NODE) -PRINT-LISP-INFORMATION (SI::*RESETFORMS*) SIMPLE-NSUBSTITUTE-IF-NOT (NEWITEM TEST SEQUENCE START END) -TEDIT.PUT.PIECE.DESCRIPTOR (FILE CH1 CHLIM LOOKS) |\\UFSReadDir-C| (FILTER PROPP ID ERRNO) -\\TEDIT.PUT.CHARLOOKS (PREVFATP FONT STR) CONS (X Y) \\SET.PROCESS.NAME (\\INTERRUPTABLE) SEDIT::REPAINT - (SEDIT::CURRENT-FONT) EXEC-READ (BUFFER-STRING) CL:FILE-POSITION (CL:POSITION) I.S.OPR (TRAN) -COMPLEX-COMPARE-BACKWARD (SEQUENCE1 SEQUENCE2 KEY TEST TEST-NOT-P) \\SIMPLIFY.CL.ARGLIST (SECTION) -SEDIT::SELECT-SEGMENT-COMMENT (SEDIT::CONTEXT SEDIT::NODE SEDIT::SUBNODE SEDIT::INDEX SEDIT::SUB-OFFSET - SEDIT::SUB-ITEM SEDIT::START SEDIT::NEW) SI::A-OR-AN (SI::WORD) SI::VOWEL-P (CL:CHAR) -DBG::REGION-NEXT-TO (WHERE TRIED-ONCE? RLEFT RBOTTOM) \\POSTSCRIPT.CHANGECHARSET (PSDATA CHARSET) -COERCE-TO-NSADDRESS (HOST DEFAULTSOCKET) \\KEYHANDLER1 (YHOT) \\EXTERNALFORMAT (\\INTERRUPTABLE) -\\TEXTOPENF (ACCESS ASDF QWER ZXCV PC) LISPX (HELPCLOCK SI::*RESETFORMS*) \\TEDITMENU.SELSCREENER ( -SELECTMODE FINAL?) \\TEDIT.SUPERSCRIPTSEL (TEXTOBJ) PEEKCCODE (|\\RefillBufferFn| \\INTERRUPTABLE) -COMPILE-FILE-EXPRESSION (NAME) \\LEAF.RECONNECT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -COMPILE-FILE-SCAN-FIRST (DEFER DFNFLG FIRST NOTFIRST) \\SPPSENDERROR (CON) RESTART.PROCESS ( -\\INTERRUPTABLE) FB.HARDCOPY.DIRECTORY (PROPS FORMAT) CL:EXPT (CL::BASE-NUMBER CL::POWER-NUMBER) -PRINT-CIRCLE-ENTER (OBJECT) \\TEDIT.APPLY.STYLES (FMTSPEC) SEDIT::HANDLE-COMPLETION (SEDIT::REASON -SEDIT::FN SEDIT::EXTRA-ARGS) ONEDINSPECT.SETELT (*PRINT-LEVEL* *PRINT-LENGTH*) LAYOUTGRAPH ( -BOX.BOTH.FLG BOX.LEAVES.FLG BORDER.FOR.MARKING LABELSHADE.FOR.MARKING) COMPILE (NLAMA NLAML LAMS LAMA -NOFIXFNSLST NOFIXVARSLST SPECVARS LOCALVARS) COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION ( -COMPILER::COMPILER-CONTEXT COMPILER::MESSAGE) VRULE.WHENOPERATEDONFN (A B C) WAKE.PROCESS ( -\\INTERRUPTABLE) \\EVALA (\\INTERRUPTABLE) RATOM (*PACKAGE* |\\RefillBufferFn|) FORMAT-GET-PARAMETER ( -NUMSIGN) COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS (COMPILER::INNERMOST-CALL COMPILER::INNERMOST-LAMBDA - COMPILER::NEW-ARGS COMPILER::NEW-PARAMS COMPILER::KEY-PARAMS COMPILER::REST-VAR) -SEDIT::PARSE-INDENT-GROUP-ONE (SEDIT::INDENTS SEDIT::GROUP SEDIT::OFFSET SEDIT::ARG-1) -CL:MULTIPLE-VALUE-CALL (FORMS) |\\UFSMakeUnixFormatName| (LASTSLASH SLASHCHAR C) OPT.JUMPREV (FRAME) -EDITL1 (USERHANDLE) FIND-EXTERNAL-SYMBOL (PACKAGE BASE OFFSET LENGTH FATP HASH EHASH RESULT SYM) -CHECK-KEYWORDS (KEY-ARGUMENTS ARGBLOCK LENGTH N) |\\PFPurgeRootDirectory| (|rootDir| \\INTERRUPTABLE) -\\UFS.CLEANUP.GFS.TABLE (KEY) CL:FILL (ITEM START) CL:FLOAT-RADIX (FLOAT) OPT.COMMONBACK (TMP) -FB.BROWSECOMMAND (KEY ITEM MENU OPTION DEPTH) \\DO.PROGV (TMP) FASL::DUMP-STRUCTURE (FASL::HANDLE -FASL::REMEMBER TYPE) FIND-EXACT-SYMBOL (CL:SYMBOL PACKAGE) \\TEDIT.BRAVOFILE? (A B C) \\SOUT ( -*DRIBBLE-OUTPUT* \\PRIMTERMSA \\TERM.OFD) POSTSCRIPT.FONTCREATE (SYMWIDTHS DINGWIDTHS MAPPING CODE) -XCL::WHERE-IS-DEFAULT-DEFINE-TYPES (TYPE) DINFO.ICONFN (W) CCCSUBFN? (X) ERRORSET (SI::*NLSETQFLAG* -*CONDITION-HANDLER-BINDINGS*) CLISPDEC (TYPE-IN? FAULTFN) ANALYZE-AUX (ARGLIST ERRLOC) -\\SUSPEND.PROCESS (\\INTERRUPTABLE) FASL::DUMP-FLOAT32 (FASL::REMEMBER) LISPX/ (VARS) CTEXTPROP ( -TEXTOBJ VAL) \\PRINT-USING-DEFPRINT (*PRINT-LEVEL* *PRINT-ESCAPE*) \\TOP-LEVEL-READ (*PACKAGE* -|\\RefillBufferFn|) \\TEXTMENU.TOGGLEFN (W OFILE CH) VALUOF (HISTORYFLG) MENUREPAINTFN (REG) \\SUBREAD - (\\INTERRUPTABLE) PUTSEQUIN (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) READC (*READTABLE* -|\\RefillBufferFn| \\INTERRUPTABLE) UNREADITEM (MENU BUTTON) COMPILER::UPDATE-ENVIRONMENT (COMPILER:ENV -) CL:CONSTANTP (OBJECT ENVIRONMENT) %SYNONYM-STREAM-DEVICE-GETFILEINFO (DEVICE) -INTERACT&SHIFT.BITMAP.LEFT (NEW.BITMAP) RESETTERMCHARS (TERMTABLE SYSTEMTYPE) \\LEAF.WHENCLOSED ( -FINALSTATE) \\CLOCK0 (BOX) RESETINT (FROM TO) MENU.HANDLER (SUBITEMS) SI::ERRORSET-PRINT-FUNCTION ( -DATUM) \\PRINTNSADDRESS (\\THISFILELINELENGTH) TERM.MODIFY.ATTRIBUTES (INVERTFLG DSP PLAINFONT) -CL:FILE-WRITE-DATE (TN) XCL::WHERE-IS-NOTICE-INTERNAL (XCL::FILE-NAME XCL::OLD-FILES) SETREADMACROFLG -(FLG) COMPILER::COMPILE-DEFINER-DEFINER (COMPILER::COMPILER-CONTEXT COMPILER::FORM) BREAK0 (COMS BRKFN -) \\UFSCHDIR-C (DIR) %SYNONYM-STREAM-DEVICE-SETFILEINFO (DEVICE) COLLECTDESCENDENTS (|NodeID|) -FILEGETDEF.MACROS (NAME TYPE OPTIONS) CL:HOST-NAMESTRING (PATHNAME) BREAK1 (BRKCOMS BRKTYPE) -SIMPLE-NSUBSTITUTE (NEWITEM OLDITEM SEQUENCE START END) TEDIT.PUT.PAGEFRAMES (STR) \\CARET.DOWN ( -\\INTERRUPTABLE) FORMAT-EXP-AUX (E K OVF PAD MARKER ATSIGN) \\LET* (\\INTERRUPTABLE) CL:GCD (CL::RESULT - CL::I) CHDIR (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) COURIER.SKIP (RPTN) COMPLEX-COUNT-IF (TEST -SEQUENCE START END KEY) CLISPIF0 (DWIMIFYCHANGE) TEDIT.COPY (INSPC INSPC# NPC PCCH NPCCH OPLEN COPYFN) - DWIMIFYFNS (CLK) \\DRAWELLIPSE.HCPYMODE (CENTERX CENTERY SEMIMINORRADIUS SEMIMAJORRADIUS) -TEDIT.WINDOW.SETUP (SEL TEDITPROMPTWINDOW DS TWIDTH THEIGHT) RETYPE.BUFFER (LINE LASTLINE FROM.HERE) -EXCHANGEPUPS (DUMMY) MSPRGMACRO (INCLISP EXPR) FILEGETDEF.RECORDS (NAME TYPE OPTIONS) FASL::DUMP-STRING - (FASL::HANDLE STRING FASL::REMEMBER) CL::GET-SHARED-SETF-METHOD (CL::SHARED-SETF-INVERSE) DWIMDEF ( -NOSPELLFLG DWIMESSGAG FILEPKGFLG LISPXHIST) COMPLEX-SUBSTITUTE-IF-NOT (NEWITEM TEST SEQUENCE START END - FROM-END KEY COUNT) \\TEDIT.PUT.SINGLE.CHARLOOKS (STR) CL:IMAGPART (CL:NUMBER) FB.FASTSEECOMMAND (KEY - ITEM MENU *UPPER-CASE-FILE-NAMES*) ANALYZE-PARAMETER (PATH) \\IDLE.PROMPTING.WINDOW (TITLE) SKREAD ( -*READ-SUPPRESS*) CLISPATOM0 (SI::*RESETFORMS*) PRINSHUT (TAIL) ONEDINSPECT.RESHAPEFN (SELECTION) -\\MOVEREALPAGE (SOURCEINDEX) \\MEDW.CURSOR (SCREEN) FORMAT-EXPONENTIAL (COLON ATSIGN PARMS) USEREXEC ( -SI::*RESETFORMS*) HISTORYSAVE (EVENT) %TWO-WAY-STREAM-DEVICE-OUTPUTSTREAM (BYTE) -|\\PFRemoveRootDirEntry| (\\INTERRUPTABLE) CGETTEXTPROP (TEXTOBJ) SI::NAMED-FUNCTION-WRAPPER-INFO ( -SI::DEFN SI::FN-TO-CALL SI::STORED-ARGLIST) \\DOBUFFEREDTRANSITIONS (\\INTERRUPTABLE) -\\INSTALL.EXTERNALFORMAT (\\INTERRUPTABLE) \\DSPCLIPPINGREGION.PRESS (\\INTERRUPTABLE) -\\TEDIT.PUT.PARALOOKS (DEFAULTTAB TABSPECS OUTPUTFORMAT) SEDIT::CHANGE-PRINTBASE (SEDIT::CHARCODE) -\\DRAWCURVE.HCPYMODE (KNOT) SCALED.BITMAP.GETFN (TEXTSTREAM) SEDIT::DISPLAY-SELECTION (SEDIT::SELECTION - SEDIT::WINDOW TYPE) |\\DFSFreeDiskPages| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PEEKC (FLG -|\\RefillBufferFn|) SIMPLE-COMPARE (SEQUENCE1 SEQUENCE2) PFI.PRINT.BITMAP (RPTN) NOTIFY.EVENT ( -\\INTERRUPTABLE) UNIX-WRITE (CONN VAL) XCL::ADD-LABELS/FLET-ENVIRONMENT (XCL::LABELS/FLET-FORM XCL::ENV -) \\GET.FILING.ATTRIBUTE (VALUE) ERRORMESS1 (BADGUY MESSAGE) CHAT (LOGOPTION INITSTREAM) -SEDIT::COPY-SELECTION-DEFAULT (SEDIT::CONTEXT SEDIT::POINT SEDIT::DELETE? SEDIT::NODES) COMP.MAP ( -ALLVARS SPECVARS LOCALVARS) VRULE.GETFN (TEXTSTREAM) \\EVALFORM (*ARGVAL* *TAIL* *FN*) -\\REMOVE.EXTERNALFORMAT (\\INTERRUPTABLE) FB.ADJUST.DATE.WIDTH (TBROWSER) CL:READ-DELIMITED-LIST ( -INSTREAM) FIND-EXEC-COMMAND (NAME TABLE) \\SETACCESS (\\INTERRUPTABLE) \\MAPCHARS (DUMMY) -CL::GET-SIMPLE-SETF-METHOD (CL::SETF-INVERSE) ONEDINSPECT.SELECTPROP (*PRINT-LEVEL* *PRINT-LENGTH*) -\\MEDW.PUTWINDOWPROP (SCREEN) COPYVM (SI::*RESETFORMS*) DASSEM.EQCONSTANTP (FLG) -\\NSFILING.DESERIALIZE (VERSION NAME) \\ICONW.COPYBUTTONEVENTFN (WINDOW) \\IRM.AROUND-EXIT (EVENT) -\\TEDIT.TABTYPE.SET (W PCNO) SIMPLE-COUNT-IF-NOT (TEST SEQUENCE START END) DISCARDPUPS ( -\\INTERRUPTABLE) MSPRGE (INCLISP) SHRKFY (FORM) \\TEXTPEEKBIN (CH FILE STR) LISPXFIND (SI::*RESETFORMS* -) COMPILER::START-COMPILATION (SI::*RESETFORMS*) SI::MAKE-AROUND-BODY (SI::CURRENT-BODY -SI::CANONICALIZED-AROUND-FORM) \\FTP.DELETEFILE (REMOTENAME) CL:STRINGP (STRING) -SEDIT::NOTE-CHANGE-IN-SIMPLE (SEDIT::OFFSET SEDIT::WIDTH SEDIT::START SEDIT::END) PPSOC ( -*STANDARD-OUTPUT* *PRINT-BASE*) \\SPP.HANDLE.ATTN (STREAM) COMPILER::TEST-GENCODE1 (COMPILER::FN) -SKIPSEPRS (|\\RefillBufferFn|) COMPLEX-COUNT (ITEM SEQUENCE START END KEY TEST TEST-NOT-P) -\\GC.HANDLEOVERFLOW (\\INTERRUPTABLE) XCL::ADD-MACROLET-ENVIRONMENT (XCL::MACROLET-FORM XCL::ENV) -MAKEEPSFILE (BOUNDINGBOX) SETREADTABLE (FLG) XCL::WHERE-IS-NOTICE (XCL::FILES XCL::DEFINE-TYPES -XCL::QUIET HASH-FILE::*DELETE-OLD-VERSION-ON-REHASH*) \\MAKESTACKP (\\INTERRUPTABLE) -CL::STRUCTURE-FUNCTIONS (CL::STRUCTURE-NAME CL::PS) TTGIVEHELP (*STANDARD-OUTPUT*) VRULE.IMAGEBOXFN ( -HRULE CURRENT.X RIGHT.MARGIN SCALE WIDTHS) \\LET0 (\\INTERRUPTABLE) BACKGROUNDWHENSELECTEDFN (FROMMENU - BUTTON) |\\PFCreateRootDirectory| (\\INTERRUPTABLE) \\SEQUIN.PUT (\\INTERRUPTABLE) TEDIT.GETINPUT ( -STREAM PROMPTSTRING DEFAULTSTRING DELIMITER.LIST) FASL::DUMP-DCODE (FASL::DCODE FASL::REMEMBER STREAM) - INFILECOMTAIL (SI::*RESETFORMS*) FILEGETDEF.PROPS (TYPE OPTIONS) COMPILER::COPY-CODE ( -COMPILER::*COPY-NODE-TABLE*) SEDIT::CHANGE-PACKAGE (SEDIT::CHARCODE SEDIT::WINDOW) HARRAYKEYS ( -HASHEDVALUE) POSSIBILITYFN (POSSLIST##) SUPERPRINT/WRAPPER (LEFT) SKIPSEPRCODES (|\\RefillBufferFn|) -\\INTERPRETER (TYPE \\INTERRUPTABLE) SHOWWTITLE (PLVLFILEFLG) |\\UFSGetFreeBlock-C| (FILE BUF) -|\\PFAddRootDirEntry| (\\INTERRUPTABLE) STKEVAL (INTERNALFLG) CL::NAME-SLOT (CL::PS) -MB.DEFAULTBUTTON.FN (OBJ SEL W) COMPILER::RAW-COMPILE (COMPILER::*CURRENT-FUNCTION* COMPILER::LAP-FN) -SEDIT::INSTALL-SPECIAL-FORMATS (SEDIT::DEFAULT-AND-DATA-TOO?) CL:LOGIOR (CL::RESULT CL::I) SEDIT::BACKSPACE - (SEDIT::SELECTION) SI::CHANGE-CALLS-IN-LAMBDA (SI::FROM SI::TO SI::LAMBDA-FORM) COMPILER::OPTIMIZE-EQL - (COMPILER::FORM) FORMAT-FIXED-AUX (OVF PAD ATSIGN SPACELEFT) RESHOWTITLE (TITLE WINDOW JUSTDISPLAYFLG -) CL:LOGEQV (CL::RESULT CL::I) SEDIT::CONFLICTING-SELECTION? (SEDIT::DESTINATION-CONTEXT SEDIT::SELECTION -) CL::TIME-FORMAT (CL::FORMAT-STRING CL::ARGS) SEDIT::DEFAULT-PACKAGE (TYPE CL:STRUCTURE) CLISPFORVARS - (CLISPCONTEXT) NOTIMP (N) TB.DO.ITEM.SELECTION (ITEM) \\TFBRAVO.HANDLE.HEADING (INPUT) -%SIMPLE-MERGE-VECTORS (RESULT VECTOR1 VECTOR2 PRED) \\TEDIT.FIXCHANGEDLINE (TEXTLEN PREVDESCENT -FORMATDONE LIMITCHANGED WASDIRTY PREVLINE FOUND DY) \\RSTRING2 (\\INTERRUPTABLE) -COMPILER::COMPILE-SCAN-OUTSTANDING-LOOSE-FORMS (COMPILER::COMPILER-CONTEXT) PRIN2-LONG-STRING ( -IMSTREAMP) LITATOM (X) RSTRING (|\\RefillBufferFn| *READ-SUPPRESS*) SEDIT::RELINEARIZE (SEDIT::OLD-BOTTOM-Y -) GETPUP (\\INTERRUPTABLE) CLMAPS2 (OPR0 CLTYP0) FILEGETDEF.LISPXMACROS (TYPE OPTIONS) FASL::DUMP-PACKAGE - (FASL::HANDLE PACKAGE FASL::REMEMBER) WINDOW.MOUSE.HANDLER (\\MOUSEBUSY) OPENPUPSOCKET ( -\\INTERRUPTABLE) COMPLEX-SUBSTITUTE (NEWITEM OLDITEM SEQUENCE START END FROM-END KEY COUNT TEST -TEST-NOT-P) \\TEDIT.BLTCHAR (DISPLAYSTREAM CHAR8CODE \\INTERRUPTABLE) \\ENQUEUE (\\INTERRUPTABLE) -ANALYZE-KEY (ARGLIST RESTVAR ERRLOC CHECK-KEYWORDS KEYWORDS-SEEN) GETDEFFROMFILE (LOAD-VERBOSE-STREAM) - RETEVAL (INTERNALFLG) FB.HARDCOPYCOMMAND (KEY MENU) MBUTTON.SET.NEXT.BUTTON.STATE (TEXTOBJ STARTINGCH - NEWSTATE) COMPILER::FRAME-ANNOTATE-OPCODES (COMPILER::SELF) EDIT\: (TOFLG L UNDOLST1 LCFLG) -\\GCMAPTABLE (\\INTERRUPTABLE) \\DRAWCIRCLE.HCPYMODE (CENTERX CENTERY RADIUS) SI::GET-SUPER-DESCRIBERS - (TYPE) SIMPLE-COUNT (ITEM SEQUENCE START END) \\MEDW.GETWINDOWPROP (SCREEN) BLIPVAL (NXT) -DASSEM.DPRINTLAP (*PRINT-BASE*) AS.REPLACE.PASSWORDS (NEWPASSWORD CONVGOOK ERROR) -TEDIT.INSERT.UPDATESCREEN (CH XPOINT OTEXTLEN BLANKSEEN CRSEEN THISLINE EOLFLAG CHORIG CHWIDTH OXLIM -OCHLIM OCR\\END PREVSPACE FIXEDLINE NEXTLINE LINES NEWLINEFLG DX PREVLINE SAVEWIDTH OFLOWFN OLHEIGHT -DY TABSEEN IMAGECACHE) SI::CHANGE-CALLS (SI::FROM SI::TO SI::FIXER SI::REAL-FN-DEFN) -SPP.CLEARATTENTION (CON FLG \\INTERRUPTABLE) SEDIT::SPLIT-COMMENT (SEDIT::SPLIT-STRING) -SEDIT::PARSE--COMMENT (SEDIT::CONTEXT SEDIT::COMMENT-WORDS SEDIT::LEVEL) DWIMIFY2 (TAIL PARENT -SUBPARENT FORMSFLG ONEFLG ONLYSPELLFLG) CL::%CAPTURE-COUNTERS-AFTER (CL:VECTOR) UTF16BE.INCCODEFN (RAW -) DF (*EDITMODE*) TTYIN.FINISH (*READTABLE* \\BUFFER) SEE* (**COMMENT**FLG) %MERGE-VECTORS (RESULT -VECTOR1 VECTOR2 PRED KEY) SETBLIPVAL (NXT) MSJOINDETS (C) |\\LFFindDirHole| (STREAM \\INTERRUPTABLE) -VIRGINFN (X) \\10MBSENDPACKET (\\INTERRUPTABLE) SEDIT::CLOSEFN (SEDIT::CONTEXT) |\\PFPutRootDirectory| - (\\INTERRUPTABLE) INTERACT&SHIFT.BITMAP.RIGHT (NEW.BITMAP) COMPILER::PROCESS-IL-DECLARATIONS (COMPILER::SPECS -) GREET (FLG) SEDIT::PARSE-FORMAT (SEDIT::FORMAT-SPEC) PACKAGE-HASHTABLE-INSPECT-STOREFN (OBJECT -PROPERTY VALUE) TTYIN (HELP ECHOTOFILE TABS \\INSIDE.TTYIN \\DSP \\INITCRLFS \\ARROW \\BMARG -\\CHARHEIGHT \\CHARWIDTH \\COMMENTFONT \\CURSOR \\CURSORROW \\DELETING \\DESCENT \\FIRSTLINE \\FONT -\\HOMECOL \\HOMEROW \\INITPOS \\LAST.DELETION \\LASTAIL \\LASTAILCOL \\LASTAILROW \\LASTCHAR \\LMARG -\\LOC.ROW.0 \\RMARG \\TEXTURE \\TTPAGELENGTH \\TTYINBUFFERSTREAM) INTERACT&SHIFT.BITMAP.UP (NEW.BITMAP -) MAKE-UNICODE-TRANSLATION-TABLES (LTORVAR RTOLVAR) CL:APPEND (CL::ARGS) COMPILER::OPTIMIZE-EQUALITY ( -COMPILER::FORM) \\TEDIT.CHARDELETE (INSPC#) TTYIN1 (\\INSIDE.TTYIN) COMPILER::PRINT-ENV (COMPILER::DEPTH -) COMPILER::EFFECTS-ANALYZE-TAGBODY (COMPILER::NODE) CL:LCM (CL::RESULT CL::I) COMPILER::PROCESS-DECLARATIONS - (COMPILER::DECLS) EXEC-READ-LINE (*IN-THE-DEBUGGER* *EDIT-INPUT-WITH-TTYIN*) \\TEDIT.NEWREGIONFN ( -WINDOW \#OFMENUITEMS MENUWIDTH) \\CARET.FLASH (\\INTERRUPTABLE) SIMPLE-COUNT-IF (TEST SEQUENCE START -END) \\REALFRAMEP (BFLINK) DASSEM.DSTOREFNDEF (SI::*RESETFORMS*) \\DRAWLINE.HCPYMODE (X1 Y1 X2 Y2 -WIDTH) \\INSERTCH (CHNO \\INFIRSTCH) \\FUNCT1 (\\INTERRUPTABLE) XCL::MAKE-LEXICAL-ENVIRONMENT ( -XCL::MACROLET/FLET/LABELS-FORM XCL::ENVIRONMENT) FORMAT-FIXED (COLON ATSIGN PARMS) \\IPCURVE2 ( -EXTRANEOUS) SEDIT::FORMAT-FROM-INDENT (SEDIT::MISER LAST) COMPILER::META-CALL-LAMBDA (COMPILER:CONTEXT -) ALLCALLS (ONLYRELS FNNAME EACHTIME VARS TOPVARS INCLISP ERRORS PARENT NOSPELLFLG) FILEGETDEF.ALISTS -(TYPE OPTIONS) FASL::DUMP-INTEGER (FASL::REMEMBER) FORK-UNIX (STR) MBUTTON.SET.NEXT.FIELD ( -DONTUPDATESCREEN) \\FTP.REGISTER (DEVICE) SEDIT::CHECK-SELECTION-SHIFT (SEDIT::CONTEXT) -FB.INFOMENU.WHENSELECTEDFN (KEY) TTYDISPLAYSTREAM (\\INTERRUPTABLE) WAITFORINPUT (ELAPSED) -SEDIT::SCAN-FOR-BOUNDS (SEDIT::END) CL:ISQRT (CL::HIGH) TOPW.REPAINTFN (*PRINT-LEVEL* *PRINT-LENGTH*) -BROWSE/LAYOUT/HORIZ/COMPACTLY (RETURNTTC RETURNBTC) COMPLEX-SUBSTITUTE-IF (NEWITEM TEST SEQUENCE START - END FROM-END KEY COUNT) \\NSFILING.AFTER.LOGIN (USER) READFROMBUF (COPYFLG) NOT.TRACKCURSOR ( -|DisplayStream| |Graph|) \\CREATECHARSET.IP (ROTATION DEVICE) SI::CONSTRUCT-MIDDLE-MAN (*PRINT-CASE*) -SI::CREATE-ADVISED-DEFINITION (SI::ADVISED-FN SI::FN-TO-CALL SI::ADVICE-NAME) SETTIME (RETFLG) -%SIMPLE-MERGE-LISTS (LIST1 LIST2 PRED) \\SETMACROSYNTAX (\\INTERRUPTABLE) SI::RESTORE-CALLS (SI::ENTRY -) CL::RESOLVE-SLOTS (CL::CONC-NAME) HASH-STRUCTURE-SMASH (THING) SEDIT::NOTE-CHANGE (SEDIT::NODE -SEDIT::CONTEXT) CL::STRUCTURE-OBJECT-INSPECT-PROPPRINTFN (CL::DATUM) \\GR.DELDEFFN (TYPE) -\\SETLOCALNSNUMBERS (TYPE) COPYALLBYTES (EXTERNALFORMAT PTR) %MERGE (RESULT SEQUENCE1 SEQUENCE2 PRED -KEY) \\EUCIN (CH2) COMPILER::COMPILE-SCAN-LOOSE-FORM (COMPILER::COMPILER-CONTEXT) -XCL::UNDOABLY-SET-SYMBOL (XCL::ENVIRONMENT XCL::OLDVAL XCL::TEM) XCL::CLOSE-WHERE-IS-FILES (XCL::EVENT -) PACKAGE-HASHTABLE-INSPECT-FETCHFN (OBJECT PROPERTY) \\SEQUIN.PROCESS (SI::*LOCKED-MONITOR* -SI::*RESETFORMS* RETRANSQ) \\MAIKO.CHECKSUM (BASE NWORDS INITSUM) \\INTERNAL/SETPASSWORD ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\TEDIT.ITALIC.SEL.ON (TEXTOBJ) XCL::DEL-WHERE-IS-DATABASE ( -XCL::FOUND) %FILL-POINTER-STREAM-DEVICE-CLOSEFILE (ABORTFLAG) \\NEWPAGE (BASE NOERROR LOCK?) -FASL::DUMP-COMPLEX (FASL::REMEMBER) ESUBST (L ATM COM UNFIND LASTAIL EDITCHANGES) FORK-SHELL (TERMTYPE -) SI::GET-INSPECT-MACRO (SI::OBJECT) READ-EXTENDED-TOKEN (\\INTERRUPTABLE) \\BSP.PREPARE.OUTPUT ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) SI::CHANGE-CALLS-IN-CCODE (SI::TO) \\DONEWPAGE (BASE NOERROR -LOCK?) COMPILER::PRINT-CONTEXT (COMPILER::DEPTH COMPILER::VALUE) TEDIT.FORMATTEXTBOX (STREAMSCALE -LASTLINE) DCODERD (*READTABLE*) CL:MERGE-PATHNAMES (DIREND DEFAULT-TYPE) \\DEFINEDEVICE ( -\\INTERRUPTABLE) DASSEM.SAVELOCALVARS (FN) %MERGE-LISTS (LIST1 LIST2 PRED KEY) SI::ADD-ADVICE (CL:WHEN - SI::PRIORITY SI::FORM SI::ADVICE) TWODINSPECT.REDISPLAY (SELECTION *PRINT-LEVEL* *PRINT-LENGTH*) -MASTERSCOPE1 (*PACKAGE*) \\INVALID.SYMBOL (XCL::NCOLONS XCL::EXTRASEGMENTS XCL::MY-CONDITION) HPRINT1 -(RPTCNT RPTLAST V) SEDIT::COMMENT-OUT-SELECTION (SEDIT::CHARCODE SEDIT::POINT SEDIT::STR) -CL::MERGE-SLOTS (CL::INCLUDED-SLOTS CL::PS) SEDIT::PARENTHESIZE-CURRENT-SELECTION (SEDIT::CHARCODE) -\\BACKTRACE (NARGS NPVARS ARGNAME) COMPILER::MERGE-FIRST-FORMS (COMPILER::FORMS) -CL::%CAPTURE-COUNTERS-BEFORE (CL:VECTOR) SEDIT::DEFAULT-COMPILE-FN (SEDIT::NAME TYPE SEDIT::BODY) -XCL::WALK-UNEXPECTED-DECLARE (XCL::CONTEXT) COMPILER::META-EVAL-TAGBODY (COMPILER::SEGMENT) CL:GENTEMP - (CL::PREFIX PACKAGE CL::COUNTER CL:NAMESTRING) \\TEDIT.MARK.REVISION (TEXTOBJ FMTSPEC) PROMPTFORWORD -(BELLBEENHEARD? CANDIDATATE.LENGTH) COMP.NUMBERTEST (FLG) SEDIT::CHECK-SELECTION (SEDIT::START SEDIT::END - SEDIT::SUBNODE) CL::PS-TYPE-SPECIFIER (CL::PS) |\\GR.GvarInitLst| (NAME) TEDIT.FORMATFOLIO (TEXTOBJ) -CL::INSPECT-STRUCTURE-OBJECT (CL::OBJECTTYPE XCL:*PRINT-STRUCTURE*) PRIN4 (*READTABLE* *PRINT-ESCAPE* -*PRINT-LEVEL* *PRINT-LENGTH* *PACKAGE* \\THISFILELINELENGTH) SEDIT::SELECTION-DOWN (SEDIT::CONTEXT) -XCL::WHERE-IS-READ-FN (STREAM) APROPOS (DISPLAYSTREAM) COMPILER::COMPILE-SCAN-MACROLET ( -COMPILER::COMPILER-CONTEXT COMPILER::FORM) \\MEDW.TOTOPW (SCREEN) COMPILER::CONSTRUCT-COMPILER-SYMBOL -(COMPILER::PARTS) \\MEDW.XOFFSET (\\INTERRUPTABLE) \\TEDIT.NEUTRALIZE.CHARLOOKS.MENU (CH# SCRATCHSEL -PC OFILE CH NEXTB BUTTON TEXT OFFSET) \\MAIKO.10MBTURNONETHER (SMASHSTATE NEWSTATE) FASL::DUMP-RATIONAL - (FASL::REMEMBER) \\CHANGECHARSET.HCPYMODE (\\INTERRUPTABLE) \\TEDIT.ITALIC.SEL.OFF (CHARCODE) -NWAYBUTTON.INIT (BUTTONS FONT INITSTATE) VOLUMESIZE (|recompute|) CLEARCLISPARRAY (REASON TRAN) -CL::TIME-CALL (CL::TIMED-FUNCTION) DO-EVENT (ENVIRONMENT FUNCTION RETRYFLAG HELPCLOCK) -SEDIT::FIND-NTH-STRUCTURE (SEDIT::CHARCODE CL:STRUCTURE SEDIT::N SEDIT::TOP) |\\LFMakeDirHole| ( -\\INTERRUPTABLE) DWIMIFY2? (TAIL PARENT SUBPARENT FORMSFLG ONEFLG ONLYSPELLFLG CLISPCONTEXT DWIMIFYING - DWIMIFYFLG DWIMIFYCHANGE) OPT.JUMPTHRU (P END FRAME) FAKE-COMPILE-FILE (VALUE NLAML NLAMA LAMS LAMA -DFNFLG *PACKAGE* *READ-BASE* LOCALVARS SPECVARS ROOTNAME) CL:PARSE-NAMESTRING (HOST DEFAULTS -JUNK-ALLOWED) \\SEQUIN.CLOSE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\REMOVEDEVICE (\\INTERRUPTABLE) -COMPARENCHARS (*PRINT-ESCAPE* *READTABLE* S C) EDIT4E (L UNFIND ORIGFLG LASTAIL) CLISPIFYRPLAC (OPR0 -SUBPARENT LST TAIL) HPRINT-TO-STRINGS (VALUE NO-CIRCLE-FLAG) \\DONEWEPHEMERALPAGE (PREVRP) -SIMPLE-SUBSTITUTE-IF (NEWITEM TEST SEQUENCE START END) COMPILER::FRAME-ANNOTATE-LITERAL (COMPILER::SELF -) XCL::SETF-PACKAGE-PREFIX (PACKAGE) |\\PFTransferPage| (\\INTERRUPTABLE) \\FM.EDITSTART-MESSAGE (ITEM - WINDOW) \\BLKFABSMAX.UFN (ZERO) MSONPATH (AVOIDING NOTRACE) EDITXTR (UNFIND) HPRINT-TO-STRING (VALUE -NO-CIRCLE-FLAG) GRAPHBUTTONEVENTFN (REG) SEND.FILE.TO.PRINTER (FILE) GETDEFCURRENT (FILE) -\\FM.EDIT-ITEM (FONT BITMAP LEFT DISPLAYLEFT DISPLAYBOTTOM BOXOFFSET CHARWIDTH MAXWIDTH STRINGPTR -TAILPTR ITEMWIDTH LIMITCHARS SYSLIMITCHARS ECHOCHAR STREAM) SIMPLE-SUBSTITUTE-IF-NOT (NEWITEM TEST -SEQUENCE START END) COMPLEX-POSITION-IF (TEST SEQUENCE START END FROM-END KEY) WRITEPRINTERPORT (DATUM -) CL:PEEK-CHAR (RECURSIVE-P |\\RefillBufferFn| \\INTERRUPTABLE) LOADFNS-FINDFILE (DWIMFLG FILEPKGFLG) -SEDIT::STRUCTURE-FROM-SELECTION (SEDIT::END SEDIT::SUBNODES) \\BLKFMAX.UFN (ZERO) -XCL::UNDOABLY-SETF-MACRO-FUNCTION (XCL::BODY) DWMFY1 (NEXTAIL VARS) SEDIT::SHOW-CARET (SEDIT::COMPUTE-POS? - SEDIT::SCROLL? SEDIT::CARET-POINT) COMPLEX-POSITION-IF-NOT (TEST SEQUENCE START END FROM-END KEY) -COMP.MACRO (*BYTECOMPILER-IS-EXPANDING*) \\TEDIT.HARDCOPY (FILE PFILE) \\BLKFABSMIN.UFN (ZERO) -\\MEDW.YOFFSET (\\INTERRUPTABLE) EDITMOVESUBTREE (REG) \\UTF8.BACKCHARFN (STREAM) DWMFY0 (DWIMIFYING -DWIMIFYFLG) TEDIT.FORMAT.HARDCOPY (FORCENEXTPAGE TEXTLEN LINE LINES NCHNO) \\MAIKO.10MB.RESTART.ETHER -(NDB) \\TEXTINIT (FILE ACCESS RECOG OTHERINFO FDEV XCL::RESULT) |UnixPrint| (FILE COPIES NSIDES TYPE) -OBTAIN.MONITORLOCK (\\INTERRUPTABLE) TEDIT.FIND (TEDIT.WILDCARD.CHARACTERS) COMPLEX (CL:REALPART -CL:IMAGPART) CL:PACKAGE-NAME (PACKAGE) CL::ASSIGN-SLOT-OFFSET (CL::NAME CL::SLOTS) RELEASE.MONITORLOCK - (\\INTERRUPTABLE) PFI.MAYBE.SEE.PRETTY (*UPPER-CASE-FILE-NAMES*) TEDIT.PARALOOKS (PCNO) TOPPATHS ( -AVOID) SI::FINISH-UNADVISING (SI::MIDDLE-MAN) \\MEDW.BURYW (SCREEN) FLONUM-TO-STRING (INDEX) -DASSEM.DASSEM (ORG) COMPILER::COMPILE-SCAN-DEFINER (COMPILER::COMPILER-CONTEXT COMPILER::FORM) -\\TEDIT.UNPARSE.CHARLOOKS.LIST (OFFSET) SEDIT::DELETE-COMMENT (SEDIT::SET-POINT?) \\NEWEPHEMERALPAGE ( -\\INTERRUPTABLE) INREADMACROP (POS) \\BLKFMIN.UFN (ZERO) CHAT.INIT (HOST) \\TEDIT.APPLY.PAGEFORMATTING - (OBJ) CL:RATIONALIZE (CL:NUMBER) EDITFROMFILE (SI::*RESETFORMS*) TEDIT.FORMATHEADING (TEXTOBJ) -CL::%GET-TIMING-INFO (CL::TIMED-FUNCTION CL::REPEAT) CL:RANDOM (CL::RV) CL:RATIONAL (CL:NUMBER) -COMPILER::GENCODE-UNWIND-PROTECT (COMPILER:CONTEXT COMPILER::STMT-CODE) TEDIT.REDO.MOVE (CH# -FIRSTPIECE FROMOBJ SOURCECH# OLDCHLIM) READVARS-FROM-STRING (SYMBOLS HPRINT-STRING) COMPILER::GENCODE-VAR-REF - (COMPILER:CONTEXT COMPILER::VAR) SEDIT::SUBSTITUTE-SUBSTRUCTURE (SEDIT::CONTEXT SEDIT::OLD SEDIT::NEW - SEDIT::SCOPE SEDIT::REMOVE?) \\GET-NEXT-RUN (START) %SIMPLE-MERGE (RESULT SEQUENCE1 SEQUENCE2 PRED) -CL::%STATS-OBJECT-DIFFERENCE (CL::BEFORE-DATA-COUNTERS CL::AFTER-DATA-COUNTERS) WRITE-UNICODE-INCLUDED - (CHARSETS) COMPILER::PRINT-NODE (COMPILER::NESTED-INDENT) TEDIT.FORMATPAGE (FORCENEXTPAGE LINES NCHNO -) ARGTYPE (DEF) |\\LFMakeDirEntry| (\\INTERRUPTABLE) \\LINES-EQUAL-P (LAST-LINE CURRENT-LINE -WORDS-PER-RASTER) SEDIT::SELECTION-UP (SEDIT::CONTEXT) |\\VAMGetVAMPageFor| (\\INTERRUPTABLE) -\\MEDW.REDISPLAYW (SCREEN) ONEDINSPECT.SELECTITEM (HORZMARKS *PRINT-LEVEL* *PRINT-LENGTH*) PRIN2 ( -*READTABLE* *PRINT-ESCAPE* *PRINT-LEVEL* *PRINT-LENGTH* *PACKAGE*) SI::MONITOR-UNWIND (\\INTERRUPTABLE -) \\DOFLUSHVM (MAIKO.SYSOUTFILE IFPVP SCRATCHBUF IFPRPT) ENCAPSULATEDOBJ.DISPLAYFN (TYPE) COMPILER::PRINT-TREE - (COMPILER::*NODE-HASH* COMPILER::*NODE-NUMBER* *PRINT-CASE*) FASL::WRITE-INTEGER-BYTES (FASL::NBYTES -FASL::VALUE STREAM) SEDIT::SET-SELECTION-ME (SEDIT::CONTEXT) SKOR (FROMDWIM TEM) |\\DisplayEventFn| ( -FDEV) SI::DESCRIBE-NEW-LINE (SI::DEPTH) PRINTER.SCRATCH.FILE (FULLFILE) SUBRP (FN) FASL::INTEGER-BYTE-LIST - (FASL::VALUE FASL::NBYTES) DISPLAYAFTERENTRY (ENTRYFN) \\TEDIT.SETDEFAULT.FROM.SEL (TEXTOBJ) -TEDIT.NORMALIZECARET (SEL) COMPILER::GENCODE-CALL (COMPILER::PARAM COMPILER::CLOSED-FN-NAME -COMPILER::OPEN-FN-NAME COMPILER::CODE-FOR-FN) \\MISC5.UFN (ARG1 ARG2 ARG3 ARG4 ARG5) -\\INSPECTW.COMMAND.HANDLER (*PRINT-LEVEL* *PRINT-LENGTH*) DBG::FIND-DEBUGGER-STACK-FRAME (DBG::ENV) -EDITMV (LASTAIL) \\GR.GETDEFFN (TYPE) CL:REALPART (CL:NUMBER) COMP.CL-EVAL (EXP) %MERGE-SUBLISTS ( -START1 START2 END PRED KEY) SI::FINISH-ADVISING (*PRINT-CASE*) COMPILER::COMPILE-SCAN-DEFINE-FILE-INFO - (COMPILER::COMPILER-CONTEXT *STANDARD-INPUT* FILECREATEDLOC) %STRING-BASE-COMPARE-EQUAL (BASE1 -TYPENUMBER1 BASE2 TYPENUMBER2 END1 END2) READBQUOTE (\\INBQUOTE) \\GETREGIONTRACKWITHBOX (POSTEMP) -CL:MAKE-SYMBOL (\\INTERRUPTABLE) %STRING-BASE-COMPARE (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 END1 END2) -SIMPLE-SUBSTITUTE (NEWITEM OLDITEM SEQUENCE START END) EDITADDNODE (NEWPOS NODELABEL) \\FLUSHVM ( -\\INTERRUPTABLE) %STRING-UPCASE (BASE TYPENUMBER) XCL::UNDOABLY-PROCLAIM (XCL::PROCLAMATION) -XCL::ENTER-EXEC-FUNCTION (XCL::EXEC-FUNCTION XCL::PROFILE XCL::ID) \\MAKE.PROCESS1 (\\INTERRUPTABLE) -COMPLEX-POSITION (ITEM SEQUENCE START END FROM-END KEY TEST TEST-NOT-P) \\ABORT.BULK.DATA (EPKT) -XCL::GET-WHERE-IS-ENTRIES (XCL::NAME XCL::DATABASE) MODERNWINDOW.BUTTONEVENTFN (LEFT RIGHT TOP BOTTOM) - SI::PRINT-TRACED-CL-ARGLIST (SI::ARGS SI::REQUIRED SI::OPTIONAL CL:REST SI::KEY SI::KEY-APPEARED? -SI::ALLOW-OTHER-KEYS SI::VERBOSE? SI::INDENT) \\NSFILING.GETFILE (NAME) UTF8.PEEKCCODEFN (RAW) -\\TEDIT.FILL.IN.CHARLOOKS.MENU (PC OFILE CH TEXT) COMPILER::PARSE-DEFUN (COMPILER::FORM) CL:SEARCH ( -TEST TEST-NOT KEY SUBLEN1 SUBLEN2) CL:EVALHOOK (*EVALHOOK* CL::*SKIP-EVALHOOK* *APPLYHOOK* -CL::*SKIP-APPLYHOOK*) \\TEDIT.CONVERT.FOREIGN.FORMAT (DEFAULTLOOKS DEFAULTPARALOOKS TTEXTOBJ SEL) -COMPLEX-DELETE-DUPLICATES (SEQUENCE START END FROM-END KEY TEST TEST-NOT-P) EXPANDMACRO (OPTIONS NCF -PCF VCF EFF) FB.GET.SORT.MENU (ATTR) ECASE-FAIL (PROCEEDABLE PLACE VALUE SELECTORS) -PRINT-ALL-DOCUMENTATION (NAME FOUND) \\CURSORDESTINATION (\\INTERRUPTABLE) \\TEMPLOCKPAGES ( -\\INTERRUPTABLE) TEDIT.INSERT (LINE DS LINES) HREAD (BACKREFS BACKREFCNT DATATYPESEEN) -\\TEDIT.UNSPLITW (WINDOW Y) CL:APPLYHOOK (CL:FUNCTION CL::ARGS CL::ENV *EVALHOOK* CL::*SKIP-EVALHOOK* -*APPLYHOOK* CL::*SKIP-APPLYHOOK*) SIMPLE-POSITION-IF-NOT (TEST SEQUENCE START END) \\MEDW.SHAPEW ( -SCREEN) TEDIT.PARSE.PAGEFRAMES (PARENT) SEDIT::PENDING-DELETE (SEDIT::POINT SEDIT::SELECTION) -BRHL/LAYOUT/DAUGHTERS (DELTA) BRECOMPILE (*PRINT-ARRAY* *PRINT-LENGTH* *PRINT-LEVEL* LAMA -DWIMIFYCOMPFLG EXPRSLST NOFIXVARSLST BUILDMAPFLG SPECVARS LOCALVARS CHANGES OTHERS FIRST BLKFNS BLOCKS - ADRLST LDFLG VARLST DONELST) CL:SIN (CL::RADIANS) DBG::DEBUGGER-MENU-HELP (IGNORE) FILL-VECTOR (VALUE - CNT TYPE-NUMBER) |\\VAMInit| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) UNSAVEFNS (SI::*RESETFORMS*) -MACROS.GETDEF (TYPE OPTIONS) READVAR-FROM-STRING (SYMBOL HPRINT-STRING) MKACCESSFN (DECLST FIELDNAMES -SPECIALFIELDS SUBSTYPE) ERRM-TO-CONDITION (MESSAGE) SEDIT::SUBSTITUTE-STRUCTURE (SEDIT::CONTEXT SEDIT::OLD - SEDIT::NEW SEDIT::SCOPE SEDIT::REMOVE?) BMOBJ.BUTTONEVENTINFN (IMAGEOBJ WINDOW SELECTION X Y -SELWINDOW TEXTSTREAM BUTTON OPERATION) \\TEDIT.SHOWCARETLOOKS (SEL) EXPANDOPENLAMBDA (GENARGS) -LISPDIRECTORYP (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CL::DEFSTRUCT-PARSE-OPTIONS (CL::OPTIONS) -FB.COPY/RENAME.COMMAND (*UPPER-CASE-FILE-NAMES*) CL::BUILD-COPIER-TYPE-CHECK (CL::FROM-ARG) -PACKAGE-INSPECT-STOREFN (OBJECT PROPERTY VALUE) CHAT.TYPEIN (HOST WINDOW LOGOPTION INITSTREAM) -COMPILER::GENCODE-THROW (COMPILER:CONTEXT) MODERNWINDOW (ANYWHERE) COMPILER::GENCODE-TAGBODY ( -COMPILER::NEW-LAMBDA COMPILER::*CODE* COMPILER::CODE) MSJOIN (C) MAKE-CONDITION (TYPE -XCL::SLOT-INITIALIZATIONS) SCALE-EXPT-AUX (X ZERO ONE TEN ONE-TENTH LOG10-OF-2) -\\FB.HARDCOPY.TOFILE.EXTENSION (TYPE) CSELECT (COND-FORM) \\BLTSHADE.PSC (OPERATION) \\TEDIT.SPLITW ( -WINDOW Y) ONEDINSPECT.REDISPLAY (SELECTION *PRINT-LEVEL* *PRINT-LENGTH*) \\MEDW.EXPANDW (SCREEN) -OPENTEXTSTREAM (TEXT WINDOW START END PROPS) VARIABLESMSGETDEF (TYPE SPECVARP) WHO-LINE-SYMBOL-SPACE ( -TOTAL-SYMBOL-SPACE SYMBOL-SPACE-IN-USE) TEDIT.CURSORMOVEDFN (RIGHT) MACROEXPANSION (EXP EFF VCF NCF -PCF PREDF) FORMAT-PRINT-ROMAN (N) MSPATHS (TO AVOIDING SEPARATE MARKING TABS LL BELOWCNT LINENUM -SI::*RESETFORMS*) CLISPIFYCROPS (SUBPARENT) FASL::DUMP-GENERAL-ARRAY (FASL::REMEMBER FASL::INDIRECT) -POSSIBILITIES (POSSLIST##) CLISPFORF/L (VAR DECLARELST) READHASHMACRO (READVAL) CL:RETURN-FROM ( -CL::RETFROM-VALUE) MB.NWAYMENU.NEWBUTTON (NEWBUTTON) CL:STABLE-SORT (SEQUENCE PREDICATE KEY) CL:REQUIRE - (CL::MODULE-NAME PATHNAME) \\DISPLAYINIT (ACCESS RECOG OTHERINFO FDEV) COMPILER::TEST-ALPHA-2 ( -COMPILER::*ENVIRONMENT* COMPILER::*CONTEXT* COMPILER::*CONSTANTS-HASH-TABLE* SPECVARS LOCALVARS -GLOBALVARS LOCALFREEVARS COMPILER::*PROCESSED-FUNCTIONS* COMPILER::*UNKNOWN-FUNCTIONS* -COMPILER::*CURRENT-FUNCTION* COMPILER::*AUTOMATIC-SPECIAL-DECLARATIONS*) %STRING-DOWNCASE (BASE -TYPENUMBER) XCL::WALK-MULTIPLE-VALUE-BIND (XCL::FORM XCL::CONTEXT XCL::OLD-DECLARATIONS -XCL::OLD-LEXICAL-VARIABLES) CL:STREAM-ELEMENT-TYPE (STREAM) %SIMPLE-MERGE-SUBLISTS (START1 START2 END -PRED) XCL::PROFILE-VALUE-TYPE-CHECK (XCL::VALUE XCL::COERCION-FUNCTION TYPE) OPT.SCANOPT (Y RPTN) -COMPILER::COMPILE-SCAN-DECLARE\: (COMPILER::COMPILER-CONTEXT COMPILER::FORM COMPILER::DOCOPY COMPILER::DOFIRST - COMPILER::FIRST-FORMS DFNFLG COMPILER::*EVAL-WHEN-COMPILE*) SPYOBJ.COPYIN (A B C) DBG::DEBUGGER-EVAL -(CL:EXP DBG::ENV DBG::ABORT-CONDITION DBG::ABORTED) |\\VFMInit| (SI::*LOCKED-MONITOR* SI::*RESETFORMS* - \\INTERRUPTABLE) CL:VALUES-LIST (\\INTERRUPTABLE) \\PFI.DO.HARDCOPY (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) SEDIT::SUBSTITUTE-OBJ (SEDIT::CHARCODE SEDIT::OLDSTR SEDIT::NEWSTR SEDIT::PROMPTWINDOW - TYPE) \\TEDIT.DEFAULTSSEL (TEXTOBJ) SEDIT::START-COMMENT (SEDIT::CHARCODE) \\LEAF.REOPENFILE ( -OTHERINFO) SPYOBJ.DISPLAY (DATA) TEDIT.SUBSTITUTE (OUTOFRANGEFLG SELCH# SELCHLIM SELPOINT) -\\PROCESS.EVENTFN (DEV) \\FM.NUMBER-MESSAGE (ITEM WINDOW) READVARS-FROM-STREAM (BACKREFS BACKREFCNT -DATATYPESEEN) COMPILER::GENCODE-TAGBODY-INLINE (COMPILER:CONTEXT COMPILER::BLIP-VAR COMPILER::END-TAG) - READVARS-FROM-STRINGS (SYMBOLS STRINGS) CL:STRING-LEFT-TRIM (CHAR-BAG) COMPILER::RELEASE-OPCODES ( -COMPILER::NODE) SEDIT::SEARCH-OBJ-BACKWARDS (SEDIT::CONTEXT SEDIT::SEARCH-STRING SEDIT::WRAP?) -\\FM.RESHAPEFN (B) \\ENQUEUE.TIMER (\\INTERRUPTABLE) SEDIT::CLOSE-LIST (SEDIT::CONTEXT SEDIT::CHARCODE - SEDIT::PNODE) \\BLTSHADE.HCPYMODE (DESTINATIONLEFT DESTINATIONBOTTOM) RECREDECLARE1 (TRAN) -EXPAND-DEFMACRO (*MACRO-FORM* *MACRO-DEFAULT*) CL::DEFINE-COPIERS (CL::RESULT-ARG CL::FROM-ARG) -XCL::SETF-PROFILE-ENTRY-VALUE (TYPE) COMPILER::META-SUBST-STMTS (COMPILER::NODE COMPILER::STMTS-LIST -COMPILER::FINAL-STMT-IMMOVABLE COMPILER::NEW-STMTS-LIST) \\UNWIND.UFN (\\INTERRUPTABLE) TIMEALL ( -INTERPFLG VALUE STRF LCFIL) COMP.USERFN (FN OTHERVARS) %VECTOR-INSERTION-SORT (VECTOR PRED KEY LOWER -UPPER) STRPOSL (CH) SEDIT::UPDATE-TITLE (SEDIT::ALWAYS? SEDIT::TITLE-INFO SEDIT::CHANGED-STRUCTURE -SEDIT::NAME) CHANGECCODE (ALL-CODE-BASES \\INTERRUPTABLE) \\CREATECHARSET.PSC (FAMILY SIZE FACE -ROTATION DEVICE CHARSET FONTDESC NOSLUG?) EDITDEF.FILES (TYPE) XCL::WALK-MACROLET (XCL::FORM XCL::CONTEXT -) AS.CHANGE.OWN.PASSWORDS (NEWPASSWORD CONVGOOK) FASL::DUMP-BIT-ARRAY (FASL::HANDLE FASL::REMEMBER -FASL::NBITS) HPRINT (DATATYPESEEN BACKREFS CELLCOUNT SIZE U *STANDARD-OUTPUT*) TEDIT.BUILD.PCTB1 (SEL -LINES CHLOOKSSEEN NEWPC PARALOOKSSEEN CACHE CACHE? TTEXTOBJ USER.CMFILE TSTREAM USERFILEFORMAT -USERTEMP) \\DRAWCURVE.PRESS (DASHLST) PACKFILENAME (STRUCTURE PROTECTION ACCOUNT PACKLIST) OPEN ( -IF-EXISTS IF-DOES-NOT-EXIST EXTERNAL-FORMAT PATHNAME FOR-INPUT FOR-OUTPUT ACCESS FILE-TYPE) -MB.NWAYBUTTON.SELFN (TEXTOBJ OBJBOX CH) \\RPLPTR.UFN (\\INTERRUPTABLE) \\BULK.DATA.STREAM (STREAM MODE - PROGRAM PROCEDURE PGMDEF PROCDEF NOERRORFLG INTERNALFLG) COMPLEX-REMOVE-DUPLICATES (SEQUENCE START -END FROM-END KEY TEST TEST-NOT-P) MAKEFILES (SI::*RESETFORMS*) \\STRINGWIDTH.GENERIC (DUMMY) FIX-FORM -(\#RPARS FONTCHANGEFLG *PRINT-ESCAPE* *PRINT-RADIX* *PRINT-BASE* *PRINT-LEVEL* *PRINT-LENGTH* -*PRINT-GENSYM* *PRINT-ARRAY* *PRINT-STRUCTURE*) MAPFILES (PAIR) \\PEEKSYSBUF (STREAM) SIMPLE-POSITION -(ITEM SEQUENCE START END) \\SPLITTREE (\\INTERRUPTABLE ITEM#) COMPILER::GENCODE-SEGMENT (COMPILER::SEGMENT - COMPILER::*SUPPRESS-POPS*) BLOCKCOMPILE1 (NEWDEF FREEVARS) FONTCLASSUNPARSE (DEVICE FONT NOERRORFLG) -\\TEXTRIGHTMARGIN (XPOSITION) PURGEDSKDIRECTORY (SI::*LOCKED-MONITOR* SI::*RESETFORMS* |device| -\\INTERRUPTABLE) CL::PARSE-SLOT (CL::GENERATE-ACCESSOR) CL:VALUES (\\INTERRUPTABLE) -COMPILER::TRANSFORM-GET/PUT-BASE (COMPILER::OPCODE COMPILER::BETA-BYTE) CL::BUILD-COPIER-SLOT-SETFS ( -CL::STRUCTURE-TYPE CL::FROM-ARGUMENT CL::TO-ARGUMENT CL::TYPE-CHECK-SLOTS? CL::SLOT) -CL::%PRINT-TIMING-INFO (CL::DATA-TYPES CL::DATA-COUNTER CL::RESULT CL::RESULT-TAIL CL::CNT CL::TYPE-NAME -) \\GR.WITHRESOURCEMAC (NAMES FORMS) XCL::WALK-LET/LET* (XCL::FORM XCL::CONTEXT XCL::SEQUENTIALP -XCL::OLD-DECLARATIONS XCL::OLD-LEXICAL-VARIABLES) CL::VALUES-UFN (CL::INDEX \\INTERRUPTABLE) -\\DSPCLIPPINGREGION.DISPLAY (\\INTERRUPTABLE) XCL::PROFILIZE (XCL::NAME-OR-PROFILE) OPT.POSTOPT (FRAME - CL:LABELS FRAMES DELETEDBINDS) HRULE.WHENOPERATEDONFN (A B C) \\RPLACA.UFN (\\INTERRUPTABLE) -DBG::DEBUGGER-BUTTON-EVENT (DBG::W IGNORE DBG::SELECTION) CL::VALUES-LIST-UFN (CL::INDEX CL::ARGCOUNT -\\INTERRUPTABLE) CHANGEI.S. (TYPE) SYMBOL-INSPECT-STOREFN (OBJECT PROPERTY VALUE) \\FM.REDISPLAYMENU ( -UPDATEREGION) SI::FINISH-UNBREAKING (SI::BROKEN-FN SI::IN-FN SI::MIDDLE-MAN) |\\VAMCheckEndOfVol| ( -\\INTERRUPTABLE) \\DOVMEMFULLINTERRUPT (SI::*RESETFORMS* HELPFLAG) SHRIEKIFY (OPR0 CLTYP0 PARENT -SUBPARENT) \\INSPECT/CODE/REPAINTFN (*PRINT-LEVEL* *PRINT-LENGTH*) ICMLARRAY.MENUW.SHOW (ITEM BUTTONS) - \\FTP.RENAMEFILE (OLDNAME) \\GENERIC.READCCODE (*READTABLE* |\\RefillBufferFn| \\INTERRUPTABLE) -\\NSPRINT.WATCHDOG (ID PRINTER JOBNAME MSG STATUS TAIL) SI::RESETUNWIND (NORMALP) CL:LIST-LENGTH (CL::N - CL::FAST-POINTER CL::SLOW-POINTER) \\DSPOPERATION.DISPLAY (\\INTERRUPTABLE) \\BSP.PREPARE.INPUT ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\PAGEDBACKFILEPTR (\\INTERRUPTABLE) \\SCALEDBITBLT.PSC ( -TEXTURE CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM) CL::ENSURE-CONSISTENT-PS (CL:INLINE CL::POSSIBLE-KEYWORDS -) CL:ROOM (CL::TYPES CL::PAGE-LIMIT CL::IN-USE-LIMIT) SIMPLE-POSITION-IF (TEST SEQUENCE START END) -\\MEDW.RELMOVEW (SCREEN) DWIMIFY1? (CLISPCONTEXT FORMSFLG DWIMIFYING DWIMIFYFLG DWIMIFYCHANGE) -FUNCTIONSMSGETDEF (TYPE) BCOMPL (NLAML NLAMA LAMS LAMA DWIMIFYCOMPFLG EXPRSLST NOFIXVARSLST -NOFIXFNSLST *PRINT-ARRAY* *PRINT-LENGTH* *PRINT-LEVEL*) \\FLUSHVMOK? (TYPE NOERROR) -ICMLARRAY.MENUW.APPLY (ITEM BUTTONS TOPRIGHT) \\TEDIT.PARSE.CHARLOOKS.MENU (CH SUB) -DEFAULT.INSPECTW.VALUECOMMANDFN (PROPERTY DATUM WINDOW) FASL::DUMP-ARRAY-DESCRIPTOR (FASL::HANDLE -CL:ARRAY FASL::REMEMBER FASL::INITIAL-ELEMENT) TEDIT.BUILD.PCTB0 (SEL LINES CHLOOKSSEEN NEWPC -PARALOOKSSEEN CACHE TTEXTOBJ USER.CMFILE TSTREAM USERFILEFORMAT USERTEMP) \\ASSIGNDATATYPE1 ( -\\INTERRUPTABLE) \\DASHINGCONVERT.HCPYMODE (DD) \\KEYBOARDEVENTFN (FDEV EXTRA) ENCAPSULATEDOBJ.PUTFN ( -STREAM FILE BEGOFOBJ INSTREAM) \\TEDIT.QUIT (W NOFORCE) \\SCALEDBITBLT.DISPLAY (CLIPPEDSOURCELEFT -CLIPPEDSOURCEBOTTOM) TEDIT.SCAN.LINE (YBOT YBASE) CL:STRING-RIGHT-TRIM (CHAR-BAG) \\COURIER.GETDEF ( -OPTIONS) STRING (X) TEDIT.PROMPTFLASH (PWINDOW) PACKAGE-INSPECT-FETCHFN (OBJECT PROPERTY) -TEDIT.CREATEW (PWINDOW) CL:CERROR (CL::PROCEED-FORMAT-STRING XCL:*CURRENT-CONDITION*) \\RPLACD.UFN ( -\\INTERRUPTABLE) \\BITBLT.HCPYMODE (DESTINATIONLEFT DESTINATIONBOTTOM) \\SCALEDBITBLT.IP (SOURCELEFT -SOURCEBOTTOM SOURCETYPE OPERATION TEXTURE) BRKDWN1 (X) DWIMIFY0 (DWIMIFYCHANGE CLISPCONTEXT ONEFLG -DWIMIFYING DWIMIFYFLG TYPE-IN? FIXSPELLDEFAULT) COMPAREPRINT1 (L1) TEDIT.BUILD.PCTB2 (SEL LINES -CHLOOKSSEEN NEWPC PARALOOKSSEEN CACHE CACHE? TTEXTOBJ USER.CMFILE TSTREAM USERFILEFORMAT USERTEMP -EXISTINGCHARLOOKS EXLOOK EXISTINGFMTSPECS) DP (*EDITMODE*) \\MEDW.SHRINKW (SCREEN TITLE) SEDIT::SEARCH-OBJ - (SEDIT::CONTEXT SEDIT::SEARCH-STRING SEDIT::WRAP?) PROGV.PRETTYPRINT (LEFT) SEDIT::SHIFT-BLOCK ( -SEDIT::ASCENT SEDIT::OLD-Y SEDIT::DELTA SEDIT::H SEDIT::W) CL:SORT (SEQUENCE PREDICATE KEY) FB ( -PATTERN) \\NSFILING.NEXTFILE (SCRATCHLIST RESETSTATE) COMPILER::GENCODE-SETQ (COMPILER:CONTEXT) -\\UNQUEUE (\\INTERRUPTABLE) CL::SET-PARSED-STRUCTURE (CL::EXTRA) %SIMPLE-VECTOR-INSERTION-SORT (VECTOR - PRED LOWER UPPER) TERMX (D) \\POLYSHADE.YSCAN.IP (|nlist| |by|) PRINTPROG (PROGWORD) CL:TAN ( -CL::RADIANS) \\CHECK.PQUEUE (SI::*RESETFORMS*) COMPILER::GENCODE-RETURN (COMPILER:CONTEXT) -\\COURIER.HANDLE.BULKDATA (BULKDATAFN NOERRORFLG) \\CONS.UFN (\\INTERRUPTABLE) \\MAIKO.10MBWATCHER ( -\\INTERRUPTABLE) ACCESSDEF4 (AVOID) SI::%STRUCTURE-DECLARE-DATATYPE (CL::FIELD-SPECIFICATIONS -CL::SUPERTYPE CL::DESCRIPTOR CL::REFERENCE-COUNTED-POINTERS) BRKDWNCOMPILE2 (SI::*RESETFORMS* LCFIL -LAPFLG STRF SVFLG LSTFIL SPECVARS LOCALVARS) \\BITBLT.DISPLAY (SOURCEIMAGEOPS) LEAF.ASSURE.FINISHED ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) DC (*EDITMODE*) PRINTCODE (*PRINT-BASE*) -\\MAKE.JIS.TO.XCCS.CONV.TABLE (TEN) ICMLARRAY.MENUW.GETLEVEL (BUTTONS) HISTORYMATCH (EVENT) -FASL::DUMP-SIMPLE-VECTOR (FASL::HANDLE FASL::REMEMBER CL:LENGTH) SEDIT::COPY-SELECTION-COMMENT ( -SEDIT::DELETE?) CL::ESTABLISH-SETFS-AND-OPTIMIZERS (CL::PS-NAME CL:INLINE CL::ACCESSOR) -SYMBOL-INSPECT-FETCHFN (OBJECT PROPERTY) ASKUSEREXPLAIN (CONFIRMFLG FILE) CL:UNREAD-CHAR (CHARACTER) -CL:PROCLAIM (CL::PROCLAMATION) SEDIT::INSERT-NULL-LIST (SEDIT::CONTEXT) SIMPLE-REMOVE-DUPLICATES ( -SEQUENCE START END) CL::DEFSTRUCT-SHARED-ACCESSOR-OPTIMIZER (CL::FORM CL::ENVIRONMENT CL::CONTEXT) -XCL::MAKE-VARIABLE-DEFINITION (XCL::CLAUSE) CASE.PRETTYPRINT (FORMFLG) \\MEDW.MOVEW (SCREEN -\\INTERRUPTABLE) SEDIT::CFV-CLISP (SEDIT::SPACE-WIDTH) FORMAT-PRINT-CARDINAL-AUX (N PERIOD ERR) -SEDIT::SELECT-NODE (SEDIT::SET-POINT? SEDIT::WHERE) PRINTSQ (FORMFLG) |\\VFMGet| (\\INTERRUPTABLE) -FORMAT-PRINT-ORDINAL (CL:NUMBER) \\DRAWCURVE.PRESS.LINE (DASHING) CHANGEVAR (TYPE REASON) READVARS ( -BACKREFS BACKREFCNT DATATYPESEEN) CLISPANGLEBRACKETS (WORKFLAG NCONCLKUP NCONC1LKUP) \\DSPFONT.DISPLAY - (\\INTERRUPTABLE) \\INSPECT/CODE/RESHAPEFN (OLDIMAGE OLDREGION) COMPILER::ENSURE-EFFECT-CONTEXT ( -COMPILER::RESULT-ARG-NUMBER COMPILER::RESULT-ARG) \\DAYTIME0 (BOX) SIMPLE-DELETE-DUPLICATES (SEQUENCE -START END) CL:WRITE-TO-STRING (*PRINT-ESCAPE* *PRINT-RADIX* *PRINT-BASE* *PRINT-CIRCLE* *PRINT-PRETTY* - *PRINT-LEVEL* *PRINT-LENGTH* *PRINT-CASE* *PRINT-ARRAY* *PRINT-GENSYM*) CL::ESTABLISH-PREDICATE ( -CL::PS-NAME) CONDITIONS:CONTINUE (CONDITIONS::R) SEDIT::DISINTEGRATE-CONTEXT (SEDIT::CONTEXT) PRIN1 ( -*PRINT-ESCAPE* *PRINT-RADIX* *PRINT-LEVEL* *PRINT-LENGTH* *PRINT-CASE*) |\\LFDirectoryScrambled| ( -\\INTERRUPTABLE) CL::DEFSTRUCT-SHARED-PREDICATE-OPTIMIZER (CL::FORM CL::ENVIRONMENT CL::CONTEXT) -INTCHAR (\\INTERRUPTABLE) \\PROCESS.MAKEFRAME (\\INTERRUPTABLE) MULTIFILEINDEX1 (*PFI-TWO-SIDED*) -FB.EXPUNGECOMMAND (KEY MENU *UPPER-CASE-FILE-NAMES* FILE) \\ENVCALL.UFN (\\INTERRUPTABLE) RAID (MESS1 -MESS2 FLG) \\SHAPEW2 (\\INTERRUPTABLE) SCROLLBYREPAINTFN (WHOLEHEIGHT WHOLEWIDTH) \\INSERTTREE ( -\\INTERRUPTABLE INCHNO AFTERFLG NODE) COMPILER::COMPILE-FILE-LOOSE-FORM (COMPILER::COMPILER-CONTEXT) -SI::CREATE-BROKEN-DEFINITION (SI::WRAPPED-FN-NAME SI::BROKEN-FN-NAME SI::FN-TO-CALL SI::WHEN-EXPR -SI::BREAKPOINT-NAME) COMPILER::GENCODE-PROGN (COMPILER::*SUPPRESS-POPS*) \\TEDIT.APPLY.CHARLOOKS (OBJ -SCRATCHSEL OFILE CH SIZE SUPER SUB NEXTB BUTTON TEXT OFFSET) \\DSPLEFTMARGIN.DISPLAY (\\INTERRUPTABLE) - \\MENU.ITEM.SELECT (DSP ITEM SUBITEMS) XCL::PUT-IMPLICIT-KEY-HASH (XCL::BASE XCL::KEY-ACCESSOR -\\INTERRUPTABLE) COMPILER::PEEPHOLE-OPTIMIZE (COMPILER::*TAG-EQUIV-TABLE* COMPILER::*REACHABLE-TAG-TABLE* - COMPILER::TAGS-USED) FORMAT-PRINT-OLD-ROMAN (N) MB.THREESTATE.DISPLAY (MODE) FASL::DUMP-LIST ( -FASL::HANDLE LIST FASL::REMEMBER) %SIMPLE-VECTOR-QUICK-SORT (VECTOR PRED LOWER UPPER) -\\LEAF.FLUSH.CACHE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CONDITIONS:FIND-RESTART (CONDITIONS::IDENTIFIER -) XCL::GET-IMPLICIT-KEY-HASH (XCL::ITEM) \\SPLITPIECE (PC CH TEXTOBJ PC#) CL::%RANGE-TYPE ( -CL::RANGE-LIST) \\NOFILESNEXTFILEFN (NAMEONLY) SI::PRINT-TRACE-EXIT-INFO (SI::IN-FN) CONDITIONS:MUFFLE-WARNING - (CONDITIONS::R) TB.BROWSER.BUSY (BROWSER) COMPLEX-FIND-IF (TEST SEQUENCE START END FROM-END KEY) -COPYGRAPH (L) \\SHOWTEXT (WREG) \\GENERATENOFILES (FDEV DESIREDPROPS OPTIONS) |\\PFFindPageAddr| ( -\\INTERRUPTABLE) \\FIXDLINES (SEL) RESETGRID.NEW (SHADE) CL::COMPLETE-ARRAY-TYPE-DIMENSIONS ( -CL::DIMENSIONS) SEDIT::NORMALIZE-SELECTION (SEDIT::REGION) \\DSPYPOSITION.DISPLAY (\\INTERRUPTABLE) -\\DRAWPOLYGON.IP (LASTPT) MAKEHVPRETTYCOMS (NO-CIRCLE-FLAG) COMPILER::RELEASE-LITERAL (COMPILER::NODE) - SEDIT::FIND-SUBSTRUCTURE-BACKWARDS (SEDIT::STR SEDIT::SCOPE SEDIT::END) |\\LFFindDirectoryVol| ( -|defaultVol|) COMPLEX-DELETE-IF (TEST SEQUENCE START END FROM-END KEY COUNT) \\DSPRIGHTMARGIN.DISPLAY -(\\INTERRUPTABLE) BROKENDEF (\\INTERRUPTABLE) CL::COMPLETE-META-EXPRESSION-DEFAULTS (CL::LIST-TYPE) -RESETGRID (BM GRIDSPEC WIDTH HEIGHT ORGX ORGY W) \\PRESSCURVE2 (EXTRANEOUS) \\HANDLE.RAW.PUP ( -\\INTERRUPTABLE) FONTSET (CHANGE-WINDOWS? OLDDEFAULT) \\MAIKO.ETHER-INTERRUPT (\\INTERRUPTABLE -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PACKFILENAME.STRING (STRUCTURE PROTECTION ACCOUNT PACKLIST) -EDITFB (TEM) COMPLEX-DELETE-IF-NOT (TEST SEQUENCE START END FROM-END KEY COUNT) SEDIT::FIND-SUBSTRUCTURE - (SEDIT::STR SEDIT::SCOPE SEDIT::START) CL:STRING-TRIM (CHAR-BAG) |\\LFCloseDevice| ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\DO.PROGV.SETUP.FRAME.AND.EXECUTE (\\INTERRUPTABLE) -CL::GET-PS-FROM-ACCESSOR (CL::KEY CL::VALUE) \\SMASHBSPSTREAM (\\INTERRUPTABLE) FB.EDITCOMMAND ( -*UPPER-CASE-FILE-NAMES*) SEDIT::COMPUTE-SELECTION-POSITION-DEFAULT (SEDIT::CONTEXT) XCL::WALK-LAMBDA ( -XCL::FORM XCL::CONTEXT) CONTROL-T (\\INTERRUPTABLE KEYBOARDDELTA) \\TEDIT.SHOW.PAGEFORMATTING (OBJ SEL - W) COMPLEX-FIND-IF-NOT (TEST SEQUENCE START END FROM-END KEY) COMP.BIND.VARS (DECL) COMP.TAGBODY ( -VARS VALS) \\TEDIT.CREATEW.FROM.REGION (PWINDOW) SEDIT::GETKEY (C SEDIT::POINT SEDIT::WINDOW) -\\DELETECH (PCSOUT HI LO NPC) \\WRITEMAP (VP RP FLAGS) SI::SUB-DATATYPE-P (CL::TYPE1 CL::TYPE2) -PFI.PRETTYPRINT (*PFI-ITEM*) COMPILER::GENCODE-PROGV (IGNORE) \\TEDIT.SHOW.CHARLOOKS (OBJ SCRATCHSEL -OFILE CH NEXTB BUTTON TEXT OFFSET) COMPILER::EXPAND-OPENLAMBDA-CALL (COMPILER::FN COMPILER::ARGS) -\\MAIKO.10MBSENDPACKET (\\INTERRUPTABLE) COMPILER::GENERATE-CODE (COMPILER::*VAR-NUMBER* -COMPILER::*TAG-NUMBER* COMPILER::*STACK-NUMBER*) \\TEXTMENU.TOGGLE.DISPLAY (MODE) SEDIT:RESET-FORMATS -(SEDIT::SMASH-USER-REDEFINITIONS?) CL::GET-PS-FROM-PREDICATE (CL::KEY) UNIX.PARAMS.CONFIRM (STREAM -TYPE) SEDIT::STRINGIFY-ATOM (SEDIT::ENVIRONMENT) COMPAREPRINT (*PRINT-LEVEL* *PRINT-LENGTH* -PLVLFILEFLG FIN) PRETTYFILEINDEX (*PRINT-ARRAY* XCL:*PRINT-STRUCTURE* *PRINT-LEVEL* *PRINT-LENGTH* -*UPPER-CASE-FILE-NAMES* PRETTYFLG *PRINT-PRETTY-BITMAPS* *PFI-ITEM* *PFI-FNSLST* *PFI-FUNNY-CHARS* -*PFI-BITMAP-BASELINE* *PFI-PENDING-COMMENTS* MULTIFILEINDEX INDICES LASTPAGE) COMPILEUSERFN1 ( -NOSPELLFLG FILEPKGFLG) ENCAPSULATEDOBJ.BUTTONEVENTINFN (IMAGEOBJ WINDOW) PFI.ENQUEUE ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PRINTDEF (FORMFLG FNSLST MAKEMAP \#RPARS RMARGIN COMMENTCOL -CHANGEFLG FILEFLG) \\DSPSCALE2.PSC (OSCALE NSCALE) COMPILER::META-SUBST-ANY-CALL (COMPILER::FN COMPILER::ARGS -) SHAPEW1 (\\INTERRUPTABLE) \\MEDW.OPENW (\\INTERRUPTABLE) CL::GET-SLOT-DESCRIPTOR-FROM-PS (CL::PS) -COMPILER::CLOSE-OVER (COMPILER::REFERENCE) COMPILER::COMPILE-FILE-PROCESS-FUNCTION (COMPILER::COMPILER-CONTEXT - COMPILER::MESSAGE) HRULE.COPYFN (FROMSTREAM) PUTCHARBITMAP (FONT NEWCHARDESCENT) CL::CACHE-SETF-INFO -(CL::PS-NAME CL::ACCESSOR) CL::SXHASH-UFN (INDEX ARGCOUNT) XCL::WALK-FLET/LABELS (XCL::FORM XCL::CONTEXT -) SEDIT::VERIFY-STRUCTURE (SEDIT::CHARCODE SI::*LOCKED-MONITOR* SI::*RESETFORMS*) DINFO.LAYOUTGRAPH ( -WINDOW) CL:NRECONC (CL::TAIL CL::RESULT CL::NEXT-CELL) XCL::INSTALL-PROFILE (XCL::PROFILE -XCL:PROFILE-NAME XCL::PROFILE-NICKNAMES) \\MISC1.UFN (ARG) XCL::%DEFINE-TYPE-DELDEF (XCL::DEFN) -DINFO.UPDATE.FROM.GRAPH (GRAPH.WINDOW) COMPILER::META-EVAL-IF (COMPILER::PRED) SPAWN.MOUSE ( -\\INTERRUPTABLE) TEDIT.SELECT.LINE.SCANNER (WWIDTH) MSVERB (C) XCL::%DEFINE-TYPE-GETDEF (XCL::OPTIONS) - CL:GENSYM (CL::X) CHECK/MENU/IMAGE (WINDOW) FASL::DUMP-SYMBOL (FASL::HANDLE FASL::REMEMBER FASL::PNAME - FASL::PKG-NAME) GETDEF (TEM) SEDIT::SELECTED-FN-NAME (SEDIT::NODE CL:STRUCTURE) SKOR0 (TAIL ALTFLG) -\\CORE.CLOSEFILE (\\INTERRUPTABLE) ANALYZE (ARGLIST PATH ERRLOC WHOLE) \\MAPPNAME.INTERNAL ( -\\THISFILELINELENGTH) SEDIT::UNDO-LIST-REPLACE (SEDIT::LAST-INSERTED-SUBNODE) \\MEDW.CREATEW (PROPS) -XCL::%DEFINE-TYPE-FILEGETDEF (XCL::NAME TYPE XCL::OPTIONS) FORMAT-PRINT-NUMBER (NUMBER RADIX -PRINT-COMMAS-P PRINT-SIGN-P PARMS) %LLARRAY-MAKE-ACCESSOR-EXPR (BASE OFFSET ACCESSOR BITS-PER-ELEMENT -NEEDS-SHIFT-P) CL::EQLHASHBITSFN-UFN (INDEX ARGCOUNT CL::OBJ) PRINT-COMPILE-HEADER (STREAMS HOW ENV) -\\IRM.GET.KEYWORDS (QUIETFLG) \\TEDIT.NEUTRALIZE.CHARLOOKS (OBJ MAINTEXT PC SCRATCHSEL OFILE CH -NEWLOOKS NEXTB BUTTON TEXT OFFSET) CL:MAKE-HASH-TABLE (CL::SIZE CL::REHASH-SIZE CL::REHASH-THRESHOLD) -\\RPLCONS (\\INTERRUPTABLE) FASL::DUMP-CHARACTER (FASL::REMEMBER) XCL::%DEFINE-TYPE-PUTDEF (XCL::REASON - XCL::DEFN-WITHOUT-COMMENTS) UNIXCHAT.OPEN (HOST) SEDIT::SPLIT-LITATOM (SEDIT::SUFFIX) MB.NB.SIZEFN ( -STREAM LINEHEIGHT X) CL::BUILD-CONSTRUCTOR-SLOT-SETFS (CL::STRUCTURE-TYPE CL::OBJECT-NAME -CL::KEYWORD-VAR-NAME) DWIMIFY (SI::*RESETFORMS*) FB.PROMPTW.FORMAT (FORMAT-STRING ARGS *PRINT-CASE* -*PRINT-BASE* WINDOW) COMPILER::GENCODE-OPCODES (COMPILER::NODE COMPILER:CONTEXT) CL::%NSUBST-IF ( -CL::TREE) \\MENU.ITEM.DESELECT (COLUMN ROW MENU DSP) PFI.NEW.LISTFILES1 (*UPPER-CASE-FILE-NAMES*) -COMPILER::ALPHA-LAMBDA (COMPILER::ORIGINAL-FORM COMPILER::*CONTEXT* COMPILER::NAME) CLISPIFY (OPR0 -CLTYP0 BROADSCOPE SUBPARENT SEG LST CLISPISTATE) \\8DISPLAYINIT (ACCESS RECOG OTHERINFO FDEV) -CL::%COMPLEX-NSUBST (CL::TREE) CONDITIONS:COMPUTE-RESTARTS (CONDITIONS::FOUND CONDITIONS:RESTART) -\\LEAF.BREAKCONNECTION (HOST) RESET.INTERRUPTS (\\INTERRUPTABLE) \\PRINTFPTOVP (*PRINT-BASE*) -CL::BUILD-CONSTRUCTOR-ARGLIST (CL::ARG-NAME CL::KEYWORD-PAIR) \\CORE.UPDATEOF (\\INTERRUPTABLE) -UTF8.INCCODEFN (RAW BYTE2 BYTE3 BYTE4) \\CORE.DIRECTORYNAMEP (DEV) WTFIX (FAULTX FAULTARGS -FAULTAPPLYFLG FAULTPOS FAULTFN EXPR VARS TAIL PARENT SUBPARENT FORMSFLG ONLYSPELLFLG DWIMIFYFLG TEM) -CL::%NSUBST-IF-NOT (CL::TREE) \\MAPPNAME (*PRINT-LEVEL* *PRINT-LENGTH* *PACKAGE* *PRINT-ESCAPE* -*PRINT-BASE* *PRINT-RADIX*) COMPILER::COMPILE-FILE-OUTSTANDING-LOOSE-FORMS (COMPILER::COMPILER-CONTEXT -) SEDIT::FIND-STRUCTURE-BACKWARDS (SEDIT::STR SEDIT::SCOPE SEDIT::END) INSTALL-PROTOTYPE-DEFN ( -DEFINER-HELP-STRING TYPE RESULT) \\POLYSHADE.XSCAN.IP (|nlist| |by|) \\MAIKO.10MBSTARTDRIVER ( -RESTARTFLG CSB) |\\VFMReadNext| (\\INTERRUPTABLE) \\CORE.GENERATEFILES (DESIREDPROPS OPTIONS) -\\INSTANCEP.UFN (TYPEN N) FORMAT-PRINT-SMALL-CARDINAL (N) COMPLEX-DELETE (ITEM SEQUENCE START END -FROM-END KEY COUNT TEST TEST-NOT-P) TEDIT.PUT (TEDIT.PUT.FINISHEDFORMS TEDIT.GET.FINISHEDFORMS -OUTPUT.FILE.WRITTEN OCURSOR PROPS WINDOW \\INTERRUPTABLE) \\4DISPLAYINIT (ACCESS RECOG OTHERINFO FDEV) - BKSYSBUF (DUMMY) \\PRINDATUM.TO.STRING (DUMMY) COMP.STPOP (RPTN) XCL::FIND-VARIABLE-DEFINITION ( -CL:VARIABLE) CL::EQLHASHBITSFN (CL::OBJ) COMPLEX-FIND (ITEM SEQUENCE START END FROM-END KEY TEST -TEST-NOT-P) SEDIT::CFV-COMMENT (SEDIT::ENVIRONMENT CL:FORMAT) CL::DEFAULT-STRUCTURE-PRINTER ( -CL::PRINT-LEVEL TYPE CL::LABEL CL::FIRST-TIME?) %VECTOR-QUICK-SORT (VECTOR PRED KEY LOWER UPPER) -TEDIT.GET.OBJECT0 (NAMELEN) \\CORE.GETINFOBLOCK (NEWSTREAM) CLOSERTPSOCKET (DONTSEND -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) LISPXSPACES (Z) CLISP3C (SI::*RESETFORMS*) \\CORE.NEXTFILEFN ( -SCRATCHLIST) XCL::INTERESTING-FRAME-P (XCL::INTERPFLG) SPELLFILE (DIRHOSTS) MB.NB.DISPLAYFN (MODE) -\\TEDIT.GET.SINGLE.CHARLOOKS (FILE) SIMPLE-DELETE-IF-NOT (TEST SEQUENCE START END) TEDIT.PUT.PCTB2 ( -OCURSOR POBJ OFILELEN OLDPARALOOKS CHARLOOKSLST PARALOOKSLST) SEDIT::SET-SELECTION-STRING (SEDIT::INDEX -) PRINT-CIRCLE-SCAN (OBJECT) CL:EQUAL (CL::X CL::Y) COMPILEUSERFN (X) FB.MAYBE.INSERT.FILE ( -*UPPER-CASE-FILE-NAMES*) CL::STRUCTURE-SLOT-NAMES (CL::STRUCTURE-NAME) XCL::UNDOHOOK (*APPLYHOOK*) -\\CURVE (BRUSHBM) RIGHTW.REPAINTFN (SPACE *PRINT-LEVEL* *PRINT-LENGTH*) CL::%DO-TRANSLATE (CL::END-TEST - CL::BODY CL::ENV CL::VARS-AND-INITIAL-VALUES CL::TAG) SIMPLE-FIND-IF-NOT (TEST SEQUENCE START END) -FORMAT-WRITE-FIELD (PADCHAR WIDTH) COMPILER::CONVERT-TO-CL-LAMBDA (COMPILER::FORM) -\\NSRANDOM.DESTROY.STREAM (\\INTERRUPTABLE) SPYOBJ.GET (TEXTSTREAM) CLISPCOND (OPR0 CLTYP0 PARENT -SUBPARENT) \\PROCESS.GO.TO.SLEEP (\\INTERRUPTABLE TAIL) COMPILER::GENCODE-MV-CALL (COMPILER:CONTEXT -COMPILER::ARGS) PRINTFILETYPE (HOST) CL::%SIMPLE-NSUBST (CL::TREE) TEDIT.UNDO.MOVE (TEXTOBJ FIRSTPIECE - TOSEL) MAKEHASHLINKS (BINDINGS) SEDIT::FIND-STRUCTURE (SEDIT::STR SEDIT::SCOPE SEDIT::START) -SEDIT::LINEARIZE-DOTLIST (SEDIT::NODE SEDIT::INDEX) BMOBJ.GETFN5 (TEXTSTREAM) \\CREATECHARSET.PRESS ( -FAMILY SIZE FACE ROTATION DEVICE FONTDESC NOSLUG?) TTYIN.READ?=ARGS (\\BUFFER \\ENDBUFFER) -TWODINSPECT.MAKEREGIONS (*PRINT-LEVEL* *PRINT-LENGTH*) FB.EDITCOMMAND.ONEFILE (BROWSER FILE OPTION -ITEM MENU) PRINT-CIRCLE-LOOKUP (TABLEENTRY) FONTPROFILE.ADDDEVICE (OLDSPEC) EDITFINDP (N CHANGEFLG -LASTAIL TOPLVL FF) XCL::WALK-DO/DO* (XCL::FORM XCL::CONTEXT XCL::SEQUENTIALP XCL::OLD-DECLARATIONS -XCL::OLD-LEXICAL-VARIABLES) XCL:UNBREAK-FUNCTION (XCL::NO-ERROR) GENSYM (NEW? \\INTERRUPTABLE) -\\PUP.SETTIME (RETFLG) \\PRINT-USING-ADDRESS (CPL) CLISPFOR (CLISPCONTEXT DWIMIFYING VARS -SI::*RESETFORMS*) COMPILER::COMPILE-FILE-DEFINER (COMPILER::COMPILER-CONTEXT COMPILER::FORM) -HRULE.GETFN (TEXTSTREAM) PFI.PRINT.COMMENTS (EXPR) |compilation| (EXP) TWODINSPECT.ADJUSTSELECTION ( -*PRINT-LEVEL* *PRINT-LENGTH*) FB.COMPILECOMMAND (KEY ITEM MENU) GLCCODE (\\INTERRUPTABLE) -CL::%SIMPLE-NSUBLIS (CL::TAIL) \\NS.SETTIME (RETFLG) TWODINSPECT.ARRANGEWINDOWS (COLUMNPROPS) EDITBM ( -BMWINTERIOR) PRIN3 (*PRINT-ESCAPE* *PRINT-RADIX* *PRINT-LEVEL* *PRINT-LENGTH* *PRINT-CASE* -\\THISFILELINELENGTH) SI::PRINT-TRACE-ENTRY-INFO (SI::IN-FN) \\TEDIT.DELETE (SELOFF HEIGHTCHANGED -NLINE1 CRFLAG NEXTLINE NL OLINE DX OCHLIM OXLIM OLHEIGHT OLASCENT OLDESCENT DY PREVLINE OCR\\END -SAVEWIDTH IMAGECACHE) FORMAT-ADD-COMMAS (STRING COMMACHAR COMMA-INTERVAL) FILES.WHENCHANGED (TYPE) -CL:MEMBER-IF (CL::PREDICATE LIST CL::KEY) ASSURE.PUP.READY (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -DETACHWINDOW (ATWINS PWINDOW) RECORDTRAN (PATGENSYMVARS SUBSTYPE SPECIALFIELDS DWIMESSGAG NOSPELLFLG -LISPXHIST) FASL::SAVE-VALUE (FASL::VALUE CL:HASH-TABLE) \\24DISPLAYINIT (ACCESS RECOG OTHERINFO FDEV) -SEDIT::SET-SELECTION-LITATOM (SEDIT::INDEX) MB.NB.WHENOPERATEDFN (FN) CREATEDSKDIRECTORY ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS* |markerPage| \\INTERRUPTABLE) CLISP4 (X DWIMIFYFLG NOSPELLFLG) -PROCESS.BACKTRACE (PLVLFILEFLG) CL::RAW-CONSTRUCTOR (CL::PS) CL::FIND-SLOT (CL::NAME CL::SLOTS -CL::DONT-ERROR) COMPILER::ALPHA-UNWIND-PROTECT (COMPILER::BODY COMPILER::CLEANUPS COMPILER::CLEANUP-VAR -) CHAT.STARTUP (STATE) CL:SXHASH (CL::OBJECT) COMP.TOPLEVEL.COMPILE (CONSTS ALLDECLS LEVEL LOCALVARS -SPECVARS *BC-MACRO-ENVIRONMENT* COMPILER::*ENVIRONMENT* MACEXP AC FRELST COMPILE.DUNBIND.POP.MERGE.FLG - TEMP) COMP.GO (ANYPROG) \\PSW.SELECTED (BUTTON) COMPILER::COMPILE-FILE-NAMED-PROGN ( -COMPILER::COMPILER-CONTEXT COMPILER::FORM) READIMAGEOBJ (UNDERREADIMAGEOBJ) SPYOBJ.IMAGEBOX (DATA) -\\CREATE-REAL-CHARSET.DISPLAY (NEWFONT XLATEDFAM) %EVERY-SINGLE (PREDICATE FIRST-SEQUENCE) \\BOXITEM ( -COLUMN ROW MENU DSP) SI::CONSTRUCT-ENTRY-PRINTING-CODE (SI::TRACED-FN SI::IN-FN SI::LAMBDA-CAR -SI::ARG-LIST) \\10MBRAWENCAPSULATE (NDB) SEDIT::QUOTE-CURRENT-SELECTION (SEDIT::CHARCODE SEDIT::QUOTE-TYPE - SEDIT::POINT SEDIT::NODE SEDIT::QUOTE-NODE) GRAPHERCOPYBUTTONEVENTFN (WINDOW) -%LLARRAY-MAKE-SETTOR-EXPR (BASE OFFSET NEWVALUE SETTOR BITS-PER-ELEMENT NEEDS-SHIFT-P) -SCAVENGEDSKDIRECTORY (SI::*LOCKED-MONITOR* SI::*RESETFORMS* DIRECTORY \\INTERRUPTABLE |fileID|) -COMPILER::GENCODE-MV-PROG1 (COMPILER::NODE COMPILER:CONTEXT) COMPILER::GENCODE-LET (COMPILER:CONTEXT -COMPILER::*SPECIAL-VENV* COMPILER::SPECIAL-LOCALS-HERE COMPILER::STK-NUM) EDITGETDEF (SEDIT::WINDOW) -%MAKE-ARRAY-WRITEABLE (BASE-ARRAY NEW-BASE OFFSET TOTAL-SIZE TYPE-NUMBER \\INTERRUPTABLE) MSSTOREDATA -(FNDATA) CL:COMPILE (COMPILER::*ENVIRONMENT* LOCALFREEVARS COMPILER::*CONSTANTS-HASH-TABLE* -COMPILER::*PROCESSED-FUNCTIONS* COMPILER::*UNKNOWN-FUNCTIONS* COMPILER::*CURRENT-FUNCTION* -COMPILER::*INPUT-STREAM* COMPILER::*LAP-FLG*) LOADFNS (*PACKAGE* PRLST MAPUPDATED) \\RETCALL ( -\\INTERRUPTABLE) SEDIT::MUTATE (SEDIT::POINT SEDIT::RESULT) CL::%COMPLEX-NSUBLIS (CL::TAIL) CL:FUNCALL - (CL::FN CL::ARGS) \\BUILDSLUGCSINFO (DEVICE IMAGEWIDTHS) CL:INTERSECTION (CL::LIST1 CL::LIST2 CL::KEY - CL::RESULT-TAIL CL::LOOP-TEST) SEDIT::BUILD-NODE (SEDIT::TRUST-SUBNODES) DINFO.HISTORIC.UPDATE ( -BUTTONS) \\SFMAKEBOLD (CSINFO) SPP.FORCEOUTPUT (\\INTERRUPTABLE) SI::CREATE-TRACED-DEFINITION ( -SI::TRACED-FN SI::IN-FN SI::FN-TO-CALL) SEDIT::MARKASCHANGEDFN (SEDIT::REASON) CL:UNION (CL::LIST1 -CL::KEY CL::LOOP-TEST) DV (*EDITMODE*) TEDIT.GET.CHARLOOKS0 (FONT STR) ATTACHEDWINDOWS (REALCOM) -MB.MARGINBAR.SELFN (SEL ORIGX ORIGY) OPT.DEADSETQP (TAGS ICNT) COMPILER::ALPHA-THROW (COMPILER::*CONTEXT* -) CLISP3 (CLISPISTATE) \\POLYSHADE.DISPLAY (|nlist|) NCREATE2 (\\INTERRUPTABLE P) CLEAR-CLISPARRAY ( -NAME TYPE) \\MAKEPCTB (MINLEN) SIMPLE-DELETE (ITEM SEQUENCE START END) ADDTOVAR (DFNFLG) -CREATE-STRUCTURE (CL::STRUCTURE-FORM) \\BSP.DEFAULT.ERROR.HANDLER (\#MYHANDLE#) GRAPHOBJ.PUTFN (ALIGN) - COMPILER::EFFECTS-ANALYZE (COMPILER::TREE) XCL::NOHOOK (XCL::FN XCL::ARGS XCL::ENV *EVALHOOK*) -\\CREATEW1 (DSP DISPLAYDATA TITLEHEIGHT) SIMPLE-FIND (ITEM SEQUENCE START END) CL:NSET-DIFFERENCE ( -CL::LIST1 CL::LIST2 CL::TEST CL::TEST-NOT CL::KEY) COMP.PROG (ALLVARS ALLDECLS LOCALVARS SPECVARS -PROGLEVEL) CL:NUNION (CL::LIST1 CL::TEST CL::TEST-NOT CL::KEY) %MAKE-STRING-ARRAY-FAT (\\INTERRUPTABLE -) |\\LFCloseFile| (SI::*LOCKED-MONITOR* SI::*RESETFORMS* \\INTERRUPTABLE) GNCCODE (\\INTERRUPTABLE) -CL::BOA-SLOT-SETFS (CL::RESULT-ARG CL::SLOT-NAMES CL::STRUCTURE-TYPE) TERM.ERASE.IN.LINE (CHAT.STATE -PARAM) CHAT.RECONNECT (FN) \\SPAWN.CHAT (LOGOPTION) COMP.TRANSFORM (CONTEXT -*BYTECOMPILER-IS-EXPANDING*) COMP.LAMBDA (E I ALLVARS ALLDECLS LOCALVARS SPECVARS) -SIMPLE-CONDITION-FORMAT-ARGUMENTS (CONDITION) COMPILER::COMPILE-FILE-MACROLET (COMPILER::COMPILER-CONTEXT - COMPILER::FORM) PUTCLIPBOARD (OBJECT PRINTFN) |\\VFMGenerateFileIDs| (SI::*LOCKED-MONITOR* -SI::*RESETFORMS* \\INTERRUPTABLE) MBUTTON.FIND.NEXT.FIELD (PCNO PCNO1 CH DEPTH) CL:NSET-EXCLUSIVE-OR ( -CL::LIST1 CL::LIST2 CL::KEY CL::LIST1-HANDLE CL::LIST1-PREVIOUS CL::LOOP-TEST) COMPILER::GENCODE-LITERAL - (COMPILER::NODE COMPILER:CONTEXT) SPY.BUTTON (W) CL:SUBSETP (CL::LIST1 CL::LIST2 CL::KEY CL::LOOP-TEST -) COMPILER::META-EVAL-CALL (COMPILER::FN-NAME) SIMPLE-CONDITION-FORMAT-STRING (CONDITION) SEDIT::FIND-OBJ - (SEDIT::CHARCODE) BMOBJ.IMAGEBOXFN (CURRENT.X RIGHT.MARGIN) PURGEHISTORY (SI::*RESETFORMS*) -SEDIT::MENU-SUBSTITUTE-SELECTEDFN (SEDIT::CONTEXT) \## (UNDOLST1 LASTAIL MARKLST UNFIND) -\\OPENLEAFCONNECTION (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\INSERTPIECE (NEW OLD TEXTOBJ -DONTUPDATECH#S PC# NEW-PREVLEN PREV) GRAPHOBJ.IMAGEBOXFN (BMW BMH) \\SEARCHFONTFILES (ROTATION -FILING.ENUEMRATION.DEPTH) COMPILER::COMPILE-FILE-COMPILER-LET (COMPILER::COMPILER-CONTEXT COMPILER::FORM -) SEDIT::NEW-BLOCK (SEDIT::X) TITLEW.BUTTONEVENTFN (*PRINT-LEVEL* *PRINT-LENGTH*) SIMPLE-FIND-IF (TEST - SEQUENCE START END) TEDITFROMBRAVO (TEDITWINDOW NONFEATURES) CL:VECTORP (VECTOR) \\10MB.NOTESTAT ( -STATUS BUF USE) EDITH (SI::*RESETFORMS* EDITHIST) CL:MEMBER-IF-NOT (CL::PREDICATE LIST CL::KEY) -EDITBMREPAINTFN (REGION) CL:NAMESTRING (CL::HOST CL::DEVICE CL:DIRECTORY CL::NAME TYPE CL::VERSION -CL::RESULT) \\BITBLT.IP (SOURCELEFT SOURCEBOTTOM SOURCETYPE OPERATION TEXTURE) CL:LENGTH (SEQUENCE) -COMPILER::ALPHA-TAGBODY (COMPILER::*TAGBODY-STACK* COMPILER::FORM) CLISP3B (OPR) \\CORE.SETFILEPTR ( -\\INTERRUPTABLE) FASL::WRITE-OP (FASL::HANDLE FASL::OPNAME) DIRECTORY (DEFAULTEXT DEFAULTVERS -LASTHOST&DIR) CLISPIF (CLISPCONTEXT DWIMIFYING VARS SI::*RESETFORMS*) SIMPLE-DELETE-IF (TEST SEQUENCE -START END) CREATEW1 (DSP DISPLAYDATA TITLEHEIGHT) EDITDEFAULT (LISPXHIST) \\CORE.BACKFILEPTR ( -\\INTERRUPTABLE) EXPAND-DESTRUCTURING-BIND (PATTERN FORM BODY ENVIRONMENT WHOLE-VAR) -COMPILER::FIND-AND-PERFORM-RPLCONS-TRANSFORM (COMPILER::NODE COMPILER:CONTEXT) EDITF2 (LISPXHIST) -EDLOC (LCFLG FINDFLAG COMS) \\CORE.SETEOFPTR (\\INTERRUPTABLE) BAKTRACE (*PRINT-LEVEL* *PRINT-LENGTH* -X Y Z PLVLFILEFLG) APPENDTOVAR (DFNFLG) CL:ASSOC-IF (CL::PREDICATE CL::A-LIST CL::KEY) \\DECUSECOUNT ( -TEMP) \\BITMAPSIZE.PRESS (STREAM) CL:NINTERSECTION (CL::LIST1 CL::LIST2 CL::TEST CL::TEST-NOT CL::KEY) - EDIT* (COM) %EXTEND-ARRAY (\\INTERRUPTABLE) ALISTS.GETDEF (TYPE OPTIONS) CL:COPY-SEQ (LENGTH) -UNDONLSETQ (SI::*RESETFORMS*) EDITRAN (L) SIMPLE-FORMAT (STREAM ARGS) \\PUPGATELISTENER (BASE) -\\PAPERSIZE.IP (IPSTREAM) EDITTO (COM) FORMAT-PRINT-NAMED-CHARACTER (LONGP) MSPARSE (FLG) -\\SPP.CLEANUP (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) DO.EDIT.COMMAND (\\BUFFER) \\FINDFONTFILE ( -ROTATION DEVICE) INSPECTW.REPAINTFN (*PRINT-LEVEL* *PRINT-LENGTH*) \\MOVEFRAME (AX) FIND-EDIT-LOCATION - (*REMOVE-INTERLISP-COMMENTS*) CL:ASSOC-IF-NOT (CL::PREDICATE CL::A-LIST CL::KEY) DO.SHIFTED.SELECTION - (ENDLINE) COMPILER::COMPILE-FILE-PROCLAMATION (COMPILER::COMPILER-CONTEXT COMPILER::TOP-ENV) -FORMAT-PRINT-CHARACTER (COLON ATSIGN PARMS) CL:CONCATENATE (SEQUENCES CNT RESULT) -PFI.PRINT.ENVIRONMENT (*PACKAGE*) COMPILER::GENCODE-LAMBDA (COMPILER::NODE COMPILER:CONTEXT -COMPILER::NEW-LAMBDA COMPILER::OUR-NON-LOCALS COMPILER::CLOSED-OVER COMPILER::REQUIRED COMPILER::OPTIONAL - CL:REST COMPILER::KEY) CL:RASSOC-IF-NOT (CL::PREDICATE CL::A-LIST CL::KEY) EDRPT (COPYFLG -SI::*RESETFORMS*) CALLS (SI::*RESETFORMS*) TTYIN.PRINTARGS (SPACE REMARGS) %MAKE-ARRAY-TYPE-TABLE ( -TYPES SIZES) %ARRAY-ELEMENT-INITIALIZE (ARRAY INITIAL-ELEMENT) \\INIT-MISCN-TABLE (OP-NUMBER OP-LENGTH -) XCL::ADJUST-IMPLICIT-KEY-HASH (\\INTERRUPTABLE) CREATEARRAYSLICE (RANK) CL:PRIN1-TO-STRING ( -*PRINT-ESCAPE*) \\CREATECOREDEVICE (ACCESS RECOG PARAMETERS FDEV) SPLITFILE (FILE SPLIT-SIZE) -\\GCSCANSTACK (ORIG) FASL::END-TEXT (FASL::HANDLE) MBUTTON.FIND.BUTTON (STARTPCNO) \\CREATE.SYMBOL (PB - CPP) CL::%LIST-MAP-OPTIMIZER (CL::TAIL-P CL::FIRST-LIST-RETURNED-P CL::FIRST-LIST CL::OTHER-LISTS -CL::OTHER-SUBLISTS) CL::%SIMPLE-RASSOC (CL::ITEM CL::A-LIST) SEDIT::SELECT-SEGMENT-LITATOM (SEDIT::CONTEXT - SEDIT::SUBNODE SEDIT::INDEX) %FAT-STRING-ARRAY-P (ARRAY) FB.LOADCOMMAND (KEY ITEM MENU) EDITCOMA ( -COPYFLG UNDOLST1 PRETTYFLG *READTABLE*) EDITBMRESHAPEFN (OLDIMAGE OLDREGION OLDSCREENREGION) -SEDIT::SET-SELECTION-QUOTE (SEDIT::OFFSET) \\BACKPEEKBIN (\\INTERRUPTABLE) FORMAT-PRIN1 (ATSIGN) -EDITCOML (UNFIND \#1 \#2 \#3 ORIGFLG) FB.OPERATE.ON.FILES (FILEENTRY) DO.EDIT.PP (*READTABLE*) -\\SCALEDBITBLT.PRESS (SOURCELEFT SOURCEBOTTOM SOURCETYPE OPERATION TEXTURE) %TOTAL-SIZE (DIMS) -CL:NREVERSE (SEQUENCE) \\CORE.GETNEXTBUFFER (\\INTERRUPTABLE) CL::%= (CL::X CL::Y) \\FONTFILENAME ( -*PRINT-BASE* *PRINT-RADIX*) SEDIT::FIND-NODE-SUBSTRUCTURE-BACKWARDS (SEDIT::STR SEDIT::STRLEN SEDIT::START - SEDIT::CONTINUATION?) CL:REVERSE (SEQUENCE) SEDIT::MENU-SELECTEDFN (SEDIT::BUTTONS) -COMPILER::FIND-REACHABLE-TAGS (COMPILER::*TAG-LOCATION-TABLE*) CL:FORMAT (*FORMAT-ORIGINAL-ARGUMENTS* -*FORMAT-ARGUMENTS* *FORMAT-CONTROL-STRING* *STANDARD-OUTPUT*) \\INITATOMPAGE (ATM) TEDIT.SUBLOOKS ( -NEWLOOKS) UNDOEDITCOM (L) XCL::WALK-COMPILER-LET (XCL::FORM XCL::CONTEXT) SEDIT::SUBNODE-CHANGED-ROOT -(SEDIT::NODE SEDIT::SUBNODE SEDIT::FN SEDIT::EXTRA-ARGS) TB.ITEM.DELETED? (BROWSER) COMP.RETFROM.POINT - (LBCNT) CL:NTHCDR (CL::TAIL) SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::CONTEXT SEDIT::OFFSET SEDIT::ITEM -SEDIT::LAST-SUBNODE-INDEX SEDIT::TAKE-NEXT SEDIT::LINEAR-ITEM-NODE) EXEC-EVAL (FORM ENVIRONMENT -*CURRENT-EXEC-TYPE* LISPXHIST HELPCLOCK) \\TERMINATESPP (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -FB.COPY/RENAME.ONE (FBROWSER ITEM OLDNAME NEWNAME CMD MOVEFN) \\ALLOCBLOCK (\\INTERRUPTABLE) -CL::DEFINE-CONSTRUCTORS (CL::RESULT-ARG CL::SLOT-SETFS) \\D0.STARTIO (BITS) \\LEAF.ABORT.FROMMENU ( -ITEM BUTTON) \\3MBRAWRECEIVE (NDB \\INTERRUPTABLE) SEDIT::SET-SELECTION-LIST (SEDIT::INDEX SEDIT::OFFSET -) COMPILER::FIND-ALL-TAGS (COMPILER::CODE) WHEN-WHO-LINE-SELECTED-FN (WINDOW) FORMAT-PRINC (ATSIGN) -COMPILER::COMPILE-FILE-DEFINE-FILE-INFO (COMPILER::COMPILER-CONTEXT *STANDARD-INPUT* FILECREATEDLOC) -COMPILER::FIND-TAG-DUPLICATION (COMPILER::NEW-CODE) COMPILER::ALPHA-SETQ (COMPILER::KIND) -DBG::PRINT-ENTRY-MESSAGE (*PRINT-BASE*) EDIT.BITMAP.REAL (NAME TEMP X Y) %SETELT (NEWVAL) -COMPILER::ALPHA-RETURN-FROM (COMPILER::*CONTEXT*) \\POSTSCRIPT.OUTCHARFN (FONT) FASL::END-BLOCK ( -FASL::HANDLE) MBUTTON.CHANGENAME (BOX BITMAP DS) DOSELECTEDITEM (MENU ITEM BUTTON) ADD-EXEC (XCL::PROFILE - EXEC XCL::ID XCL::WINDOW) SEDIT::SCAN-STRING (SEDIT::MULTI-ESC-CHAR) GET.MENU.LIST (DISPLAYEDLEVELS -MAXWIDTH FONT BFONT MENU-P) \\TEDIT.CHANGE.LOOKS (DY) CLOSEICONWINDOW (USEREXPANDFN) MAPATOMS (RESULT) - SEDIT::ATOM-CHANGE-RELINEARIZE (SEDIT::BROKEN?) SEDIT::STRINGIFY-GAP (SEDIT::NODE SEDIT::ENVIRONMENT) - TB.ITEM.SELECTED? (BROWSER) \\DISPLAYLINE (STREAM \\PCHARSLEFT \\PSTRING \\PFILE FONT) -COMP.ATTEMPT.COMPILE (SUBFNFREEVARS) CL::TYPE-EXPANDER (DFNFLG FILEPKGFLG) MSSEEKPHRASE (S LASTPARSED) - TEDIT.PROMPTPRINT (PWINDOW) EXEC-VALUE-OF (EVENT-SPEC) TEDIT.GET.OBJECT1 (NAMELEN) -XCL::CLEAR-IMPLICIT-KEY-HASH (XCL::LAST-ADDRESS \\INTERRUPTABLE) CLISPIFY2 (NOVALFLG NEGFLG) -XCL::HASH-FILE-TYPES-OF (XCL::POSSIBLE-TYPES XCL::ENTRIES) |\\VAMUpdateVAM| (|filePtr|) -TEDIT.UNDO.PARALOOKS (LEN FIRSTPIECE PCTB CHLIM) FASL::FASL-EXTENDED (STREAM FASL::OP) -COMPLEX-REMOVE-IF (TEST SEQUENCE START END FROM-END KEY COUNT) %ALTER-AS-DISPLACED-TO-BASE-ARRAY ( -\\INTERRUPTABLE) TEDIT.NEW.FIND (TEXTOBJ TARGETSTRING START# END# WILDCARDS?) \\EDITBM/PUTUP/DISPLAY ( -GRIDINTERIOR) COPYCHARS (\\INTERRUPTABLE) \\FM.3STATE-DOWNFN (BUTTONS) CL::%MAPLIST-SINGLE (CL::FN -LIST) XCL:COMPILE-DEFINER (COMPILER::LAP COMPILER::*ENVIRONMENT* COMPILER::*OUTSTANDING-LOOSE-FORMS* -COMPILER::*EVAL-WHEN-COMPILE*) UNSAVEDEF (DFNFLG) BREAK-FUNCTION (*PRINT-CASE*) \\FONTFILENAME.NEW ( -NAME *PRINT-BASE*) COMPLEX-REMOVE-IF-NOT (TEST SEQUENCE START END FROM-END KEY COUNT) XCL:COMPILE-FORM - (COMPILER::FORM COMPILER::*CONTEXT* COMPILER::*ENVIRONMENT* COMPILER::*CONSTANTS-HASH-TABLE* -COMPILER::*PROCESSED-FUNCTIONS* COMPILER::*UNKNOWN-FUNCTIONS* COMPILER::*LAP-FLG* SPECVARS LOCALVARS -LOCALFREEVARS GLOBALVARS) ASSERT-FAIL (STRING ARGS) \\BLTSHADE.PRESS (DESTREGION) CL:MAKE-LIST ( -CL::INITIAL-ELEMENT CL::RESULT) %DO-LOGICAL-OP (OP \\INTERRUPTABLE) CL::%SET-NTH (LIST CL::NEW-VALUE) -SEDIT::ASSIGN-FORMAT-NIL (CL:FORMAT) XCL::WALK-BINDINGS-1 (XCL::*DECLARATIONS* XCL::*LEXICAL-VARIABLES* -) DINFO.UPDATE.FROM.MENU (BUTTONS) BYTEBLOCKCOMPILE2 (SI::*RESETFORMS* BLKFLG) CL::%MAPLIST-MULTIPLE ( -CL::FN CL::ARG-SLICE) \\FIRSTNODE (COUNT) SEDIT::SET-POINT-UNKNOWN (SEDIT::ITEM TYPE) RECLOOK (FAULTFN -) SPYOBJ.BUTTON (OBJ WINDOWSTREAM SEL RELX RELY WINDOW TEXT BUTTON) DBG::SIMPLE-REPORT-CONDITION ( -CONDITION) XCL:PACKAGE-PREFIX (PACKAGE) DISCARDXIPS (\\INTERRUPTABLE) CL::%MAPC-SINGLE (CL::FN LIST) -DEFAULT.INSPECTW.PROPCOMMANDFN (DATUM) UNPACKFILENAME.STRING (SUBDIREND USEDSEMI) SMASHPAT1 (CARVAL) -CL:GET-PROPERTIES (CL::PLACE CL::INDICATOR-LIST) \\CREATEPIECEORSTREAM (START END) -\\STRINGWIDTH.HCPYDISPLAYAUX (DUMMY) CL:SET-DIFFERENCE (CL::LIST1 CL::LIST2 CL::KEY CL::RESULT-TAIL -CL::LOOP-TEST) COMPILER::GENCODE-IF (COMPILER::ELSE-TAG COMPILER::AFTER-IF-TAG) EDIT.RI (L) DEBUGGER ( -BRKEXP XCL::WAS-IN-THE-DEBUGGER DBG::*IN-THE-DEBUGGER* \\LINEBUF.OFD *STANDARD-INPUT* -*STANDARD-OUTPUT* \\INBQUOTE \\#DISPLAYLINES \\CURRENTDISPLAYLINE \\PRIMTERMTABLE \\PRIMTERMSA -\\INTERRUPTABLE !VALUE BRKVALUES *EVALHOOK* *APPLYHOOK* *READ-SUPPRESS*) COPYFILES ( -*UPPER-CASE-FILE-NAMES* DEST HELPFLAG) CL::%COMPLEX-RASSOC (CL::ITEM CL::A-LIST CL::TEST CL::TEST-NOT-P - CL::KEY) CL::%MAPCAR-SINGLE (CL::FN LIST) CL::DEFINE-BOA-CONSTRUCTOR (CL::CONSTRUCTOR-NAME -CL::SLOT-SETFS) \\NSPRINT.INTERNAL (PRINTER OPTIONS TRANSFERFN) \\DEVICE.OUTPUT (VALUE TASKREG) -\\INIT.KEYBOARD.STREAM (X) ONEDINSPECT.MAKEREGIONS (*PRINT-LEVEL* *PRINT-LENGTH*) UPDATE-WHO-LINE ( -WINDOW WHO-LINE-ENTRIES ALWAYS?) CL::%MAPC-MULTIPLE (CL::FN CL::ARG-SLICE) FORMAT-TAB (COLON ATSIGN -PARMS) COMPILER::COMPILE-FILE-PACKAGE-FORM (COMPILER::COMPILER-CONTEXT COMPILER::FORM) CL:GETF ( -CL::PLACE CL::INDICATOR CL::DEFAULT) SPY.PRINT (FILE RDTBL) FASL:DUMP-FUNCALL (FASL::HANDLE CL:FUNCTION -) CL:BIT-EQV (BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) \\READSTRIKEFONTFILE (FAMILY SIZE FACE) CL::%MAPL-SINGLE - (CL::FN LIST) \\FORMATLINE (FONTWIDTHS PCNO) CL:SET-EXCLUSIVE-OR (CL::LIST1 CL::LIST2 CL::KEY -CL::RESULT-TAIL CL::LOOP-TEST) \\READACFONTFILE (FAMILY SIZE FACE FONTDESC FBBBITMAP) -\\FM.3STATE-SELECTEDFN (WINDOW BUTTONS) ENTER-DEBUGGER-P (N POS) CL:BIT-AND (BIT-ARRAY1 BIT-ARRAY2 -BIT-RESULT) EDITBELOW (LCFLG N) CL:BIT-IOR (BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) INSPECTW.CREATE ( -*PRINT-LEVEL* *PRINT-LENGTH* VALUE PROPMENU VALUEMENU SELITEMS X) TEDIT.UNDO.LOOKS (LEN FIRSTPIECE -PCTB CHLIM) SI::GET-CACHE-CLOSURE (\\INTERRUPTABLE) CL::%MAPL-MULTIPLE (CL::FN CL::ARG-SLICE) -SEDIT::MENU-INIT-STATE (SEDIT::CONTEXT *PRINT-BASE*) \\3MBRAWTRANSMIT (NDB \\INTERRUPTABLE) -\\DELETETREE (\\INTERRUPTABLE INCHNO AFTERFLG) CL::%MAPCAR-MULTIPLE (CL::FN CL::ARG-SLICE) -\\FONTRESETCHARWIDTHS (|charoffset|) CL:BIT-ANDC1 (BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) FASL::TABLE-STATS - (FASL::ITEMS) XCL:REINSTALL-ADVICE (XCL::NAME XCL::ADVICE) FASL:PROCESS-BLOCK (STREAM FASL::ITEM-FN -FASL::OPTABLE) ONEDINSPECT.ADJUSTSELECTION (*PRINT-LEVEL* *PRINT-LENGTH*) FINDPCNODE (PCTB) CL:BIT-ANDC2 - (BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) FORMAT-INDIRECTION (COLON ATSIGN PARMS STRING) XCL:ADVISE-FUNCTION - (XCL::ALREADY-ADVISED?) PF* (SI::*RESETFORMS*) CL:RASSOC-IF (CL::PREDICATE CL::A-LIST CL::KEY) -\\SFMAKEROTATEDFONT (FONTDESC ROTATION) CL:BIT-NAND (BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) COMPILER::ALPHA-PROGN - (COMPILER::*CONTEXT*) \\CURSORUP (\\INTERRUPTABLE) FASL:CLOSE-FASL-HANDLE (FASL::CLOSE-OPTIONS -FASL::ABORT) MBUTTON.CREATE (BOX BITMAP DS) CL::%MAPCAN-MULTIPLE (CL::FN CL::ARG-SLICE) SEDIT::PRINT-GAP - (SEDIT::X) \\CURSORDOWN (\\INTERRUPTABLE) \\FTP.RECOGNIZEFILE (DEV PROP) \\PUTD (\\INTERRUPTABLE) -DBG::EMERGENCY-PANIC-LOOP (*READ-SUPPRESS* DBG::*IN-THE-DEBUGGER*) PFI.OUTCHARFN (STREAM CHAR) -COMPILER::GENCODE-GO (COMPILER:CONTEXT COMPILER::SEGMENT) CL::%MAPCON-SINGLE (CL::FN LIST) -SEDIT:SAVE-WINDOW-REGION (SEDIT::CONTEXT SEDIT::REASON SEDIT::NAME TYPE SEDIT::REGION) -\\TEDIT.BOLD.SEL.OFF (CHARCODE) \\DISCARDFRAME (\\INTERRUPTABLE) CL:BIT-NOR (BIT-ARRAY1 BIT-ARRAY2 -BIT-RESULT) CL:BIT-ORC2 (BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) \\INSPECT.COMPUTE.TITLE (*PRINT-LEVEL* -*PRINT-LENGTH*) FASL::DO-OP (FASL::*BLOCK-LEVEL*) COMPILER::GENCODE-LABELS (COMPILER::NODE COMPILER:CONTEXT -) CL:SUBSEQ (START) SEDIT::FIND-NODE-SUBSTRUCTURE (SEDIT::STR SEDIT::STRLEN SEDIT::CONTINUATION? -SEDIT::LASTINDEX) NUMBERPAD.HELDFN (MENU BUTTON) CL::%ATAN-FLOAT (CL::SQR CL::INT CL::POW CL::OLD) -\\SPP.SETFILEPTR (CON) TTYIN.PPTOFILE (*READTABLE* *PRINT-ARRAY* *PRINT-STRUCTURE* FONTCHANGEFLG) -\\USER-SUBR-UFN (INDEX) \\TEDIT.GET.CHARLOOKS1 (FONT STR NAMELEN STYLESTR USERSTR) CL:BIT-XOR ( -BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) FASL::CONVERT-FASL-DATE (TEMP-DATE DATE-RESULT) -CL::%EVERY-MAP-OPTIMIZER (LIST CL::SOME-P CL::NEGATE-P) CLISPIFY1 (BROADSCOPE PARENT) PFCOPYBYTES (FLG -) FASL::DEFINE-OPCODE-RANGE (FASL::FIRST-OPCODE FASL::RANGE FASL::OFFSET FASL::TABLE PACKAGE FASL::PNAME -) COMPLEX-REMOVE (ITEM SEQUENCE START END FROM-END KEY COUNT TEST TEST-NOT-P) \\CLEARPCTB (PCTB) -\\POSTSCRIPT.SPECIALOUTCHARFN (IMAGEDATA OLDFONT) IGREATERP (X Y) EDITCALLERS (DUMMY *PACKAGE*) WTFIX1 - (DWIM.GIVE.UP.TIME NEWTAIL SI::*RESETFORMS* EXPR) IDIFFERENCE (X Y) \\GETSPP (SI::*LOCKED-MONITOR* -SI::*RESETFORMS* \\INTERRUPTABLE) \\SETUPGETCH (PCNO FPOS OFFST) \\MKATOM (\\INTERRUPTABLE) -\\NSRANDOM.PROCEEDABLE.ERROR (STREAM ERROR ERRORARGS PROCEED-DETAILS) \\SFFIXOFFSETSAFTERROTATION ( -FONTDESC ROTATION) CL::%MAPCON-MULTIPLE (CL::FN CL::ARG-SLICE) SHOWBITMAP1.IP (BMBASE XWORDS) -MENUWRESHAPEFN (OLDIMAGE OLDREGION) COMPILER::ALPHA-MV-PROG1 (COMPILER::*CONTEXT*) CLDISABLE ( -SI::*RESETFORMS*) \\DELETEPIECE (PCTB PC# PCNODE) SEDIT::INSERT (SEDIT::SUBNODES SEDIT::CHARS) -SIMPLE-REMOVE-IF-NOT (TEST SEQUENCE START END) \\CHANGECHARSET.IP (IPDATA CHARSET) +FNTH IDIFFERENCE HVREADERR HVREADCHECKGETFN PEEKC EVAL LIST ZEROP) PFI.SETUP.TRANSLATIONS (ASSOC +IMAGESTREAMTYPE CONS DSPFONT CHARWIDTH MAPCAR LIST* LIST CL:APPLY FUNCTION) SIMPLE.FINDFILE (INFILEP +PACKFILENAME.STRING) \REFCNT (\ADDBASE LRSH UNFOLD LLSH \LOLOC \HILOC \GC.LOOKUP.BIGREFCNT) MAKEPRESS +(TEXTTOIMAGEFILE) SEDIT::MENU-PRINTBASE-SELECTEDFN (LISTGET FM.ITEMPROP FM.EDITITEM SEDIT::MENU-SELECTEDFN + LIST PRIN1 GETPROMPTWINDOW MAINWINDOW FM.CHANGESTATE) \EQREFCNT1 (\ADDBASE LRSH UNFOLD LLSH \LOLOC +\HILOC) \PFCreateFileDescriptors (ARRAY SUB1 PLUS) LOADEFS (LOADFNS) \SET.FINALIZATION.FUNCTION (FIXP +\TYPENUMBERFROMNAME \ILLEGAL.ARG \PUTBASEPTR UNFOLD LLSH) OPT.JFIXPASS (APPLY* IDIFFERENCE) \COPYSYS ( +PACKFILENAME.STRING U-CASE FILENAMEFIELD \UFS.RECOGNIZE.FILE \GETDEVICEFROMNAME \FLUSHVM RENAMEFILE +CONCAT UNIX-GETENV COPYFILE IMINUS LIST) NIL +BIND \TOTALFIXEDHEIGHT (MAXEDW) CLEARHASHFILES (RELEASE) \GENERIC.READP (STRM FLG) \VAMUpdateVAM ( +filePtr) MSSTOREDATA (FNDATA) TEDIT.COPY.LOOKS (SOURCE) \MAIKO.COPY-TIME-STATS (REFERENCE-BLOCK +DESTINIATION-BLOCK) \UFS.RECOGNIZE.FILE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) DBG::REGION-NEXT-TO ( +WHERE TRIED-ONCE? RLEFT RBOTTOM) \BACKCCODE (BYTECOUNTVAL) CL:SET-CHAR-BIT (CHAR NEWVALUE) +COMPILER::FRAME-ANNOTATE-VAR-REF (COMPILER::SELF) \DEVICE.OUTPUT (VALUE TASKREG) SIMPLE-NSUBSTITUTE-IF + (NEWITEM TEST SEQUENCE START END) \TFBRAVO.APPLY.PARALOOKS (TABPHRASE SMALLEST.MARGIN) +\ALLOCPAGEBLOCK (\INTERRUPTABLE) \TEDIT.COMMAND.LOOP (TTYWINDOW DIRTY INSCH# TLEN CHNO READSA +COMMANDFN \INTERRUPTABLE) ANALYZE-PARAMETER (PATH) TEDIT.SELECT (L1 LN) CLOCK (N BOX) +\ALLOCVIRTUALPAGEBLOCK (\INTERRUPTABLE) COMPLEX-COUNT-IF-NOT (TEST SEQUENCE START END KEY) +\CHECKBCPLPASSWORD (USER PASSWORD) HARDCOPY.SOMEHOW (IMAGETYPE HEADING) COMPILE-FILE-SCAN-FIRST (DEFER + DFNFLG FIRST NOTFIRST) TEDIT.SUBPARALOOKS (NEWLOOKS) CL::STRUCTURES.HASDEF (TYPE CL::SOURCE +CL::SPELLFLG) LOADCOMP (BLOCKS) FASL:UNIMPLEMENTED-OPCODE (STREAM) FORMAT-GENERAL-FLOAT (COLON ATSIGN +PARMS) CL::MAYBE-MAKE-BINDING-FORM (CL::VALS CL::GETTER) \INSPECTW.REDISPLAYPROP (*PRINT-LEVEL* +*PRINT-LENGTH*) COPYFILES (*UPPER-CASE-FILE-NAMES* DEST HELPFLAG) CL::ASSIGN-STRUCTURE-REPRESENTATION +(CL::LOCAL-SLOTS) FASL:OPEN-FASL-HANDLE (FASL::NAME FASL::OPEN-OPTIONS) COMPILER::META-SUBST (COMPILER::NODE +) CHAT.TTYEXITFN (PROCESS NEWPROCESS) SPYOBJ (STATUS *PRINT-PRETTY* *PRINT-LEVEL* *PRINT-LENGTH*) +\BITBLTSUB (PILOTBBT SourceBitMap SLX STY DestinationBitMap DLX DTY HEIGHT SourceType Operation +Texture WindowXOffset WindowYOffset) SEDIT::ASSIGN-FORMAT-NIL (CL:FORMAT) WHILEDOUNTIL (UNTIL) GCMESS +(NUM STR) \DSPRATE (AC0 AC1 AC2) FILEGETDEF.VARS (TYPE OPTIONS) \TEDIT.FIXCHANGEDPART (TEXTOBJ +STARTINGLINE WINDOW INCREMENTAL? NEXTCARETCH#) CL:PACKAGE-SHADOWING-SYMBOLS (PACKAGE) %%AREF-EXPANDER +(ARRAY INDICES) SIMPLE-NSUBSTITUTE-IF-NOT (NEWITEM TEST SEQUENCE START END) CL::SETF-ERROR (CL::FORM) +DISCARDXIPS (\INTERRUPTABLE) XCL:ADVISE-FUNCTION (XCL::ALREADY-ADVISED?) SUBSTRING (\INTERRUPTABLE) +SI::ADVICE-HASDEF (TYPE SI::SOURCE) XCL::IMPLICIT-KEY-MAP-HASH (XCL::FN XCL::LAST-ADDRESS +XCL::KEY-ACCESSOR XCL::NULL-SLOT-INDICATOR XCL::VALUE) SEDIT:SAVE-WINDOW-REGION (SEDIT::CONTEXT +SEDIT::REASON SEDIT::NAME TYPE SEDIT::REGION) \DOSTORAGEFULLINTERRUPT (HELPFLAG) +COMPLEX-COMPARE-BACKWARD (SEQUENCE1 SEQUENCE2 KEY TEST TEST-NOT-P) \TOTALFIXEDWIDTH (MAXEDW) +CL:PACKAGE-USED-BY-LIST (PACKAGE) COMPILE-FILE-EXPRESSION (NAME) ANALYZE-KEY (ARGLIST RESTVAR ERRLOC +CHECK-KEYWORDS KEYWORDS-SEEN) XCL::CLEAR-IMPLICIT-KEY-HASH (XCL::LAST-ADDRESS \INTERRUPTABLE) +FILEGETDEF.FNS (TYPE) SEDIT::SET-POINT-UNKNOWN (SEDIT::ITEM TYPE) ALLOCSTRING (\INTERRUPTABLE) +%%ASET-EXPANDER (NEWVALUE ARRAY INDICES) \3MBRAWTRANSMIT (NDB \INTERRUPTABLE) \GATHERSTATS (FID) +NORMSECT (Y) \PARSE-FILE-HEADER (STREAM FILECREATEDFN RETURNFORM INITIALENV) COMPILER::META-SUBSTITUTE + (COMPILER::*SUBST-EXPR* COMPILER::*SUBST-VAR*) COMPILER::EFFECTS-ANALYZE-LIST (COMPILER::NODE LIST) +\LEAF.ABORT.FROMMENU (ITEM BUTTON) \TEDIT.REPAINTFN (TEXTSTREAM CH# WWIDTH) +SEDIT::MENU-SUBSTITUTE-SELECTEDFN (SEDIT::CONTEXT) XCL::PPRINT-DEFINER (XCL::FORM) SI::ADVICE-DELDEF ( +TYPE) VRULE.GETFN2 (TEXTSTREAM) PRINT-LISP-INFORMATION (SI::*RESETFORMS*) TEDIT.GET.OBJECT (NAMELEN) +UNIX-GETENV (NAME) \PAGED.INCFILEPTR (\INTERRUPTABLE) DISABLEGC (\INTERRUPTABLE) CL:PACKAGE-NICKNAMES +(PACKAGE) UNPACKPATHNAME.STRING (DIRFLG) READ-FILECREATED (STARTPOS) NTHCHARCODE (DUMMY) \FIXILINES ( +CH# CHLIM) FORMAT-EXP-AUX (E K OVF PAD MARKER ATSIGN) \TEDIT.INCLUDE (TEXTOBJ FILE START END) +INSPECTW.REPLACE (XCL:*EVAL-FUNCTION*) COMPILER::EFFECTS-REPRESENTATION (COMPILER::VAR) MKSTRING ( +*PRINT-ESCAPE* *READTABLE* *PRINT-RADIX* *PRINT-BASE* *PRINT-LENGTH* *PRINT-LEVEL*) EXEC-READ ( +BUFFER-STRING) SEDIT::PRINT-GAP (SEDIT::X) TEDIT.SEL.AS.STRING (OFFST BASE) CL::PRINT-PACKAGE (CL::DEPTH +) \TEDIT.EXPAND.DATE (STREAM CH) FLASHWINDOW (\INTERRUPTABLE) FORMAT-GET-PARAMETER (NUMSIGN) +SEDIT::MENU-FIND-SELECTEDFN (SEDIT::CONTEXT) \FILLWINDOW (YBOT CURLINE TEXTOBJ DONTFILLFLG WINDOW +NEXTCARETCH#) TEDIT.DISPLAYTEXT (CHWIDTH SEL DY) MOVD (\INTERRUPTABLE) UNIX-GETPARM (NAME) READ ( +*READTABLE* *READ-NEWLINE-SUPPRESS*) \FM.EDIT-MESSAGE (ITEM WINDOW) FQUOTIENT (X Y) SEDIT::RELEASE-OPEN-STRING (SEDIT::OLD-STRING SEDIT::NEW-STRING SEDIT::POINT SEDIT::SELECTION) -XCL:TRACE-FUNCTION (XCL::REBREAK? *PRINT-CASE*) READ-UNICODE-MAPPING (NOPRINT NOERROR SEPBITTABLE) -\\TEXTMENU.START (CH#1) TEDIT.FORMATBOX (SERVERTYPE NCHNO) COMP.CATCH (FORM) \\FILLPOLYGON.PSC ( -OPERATION) INFILECOMS? (NAME ORIGFLG) SEDIT::REPLACE-QUOTE (SEDIT::WHERE SEDIT::POINT) %FAST-COPY-BASE - (\\INTERRUPTABLE) \\TEDIT.RESHAPEFN (BITS TEXTSTREAM CH# WWIDTH) FORMAT-SKIP-ARGUMENTS (COLON ATSIGN -PARMS) CL:COPY-SYMBOL (CL::COPY-PROPS) \\TEDIT.INSERT.PIECES (INSPC# PSTR PCCOUNT) COMP.UNWIND-PROTECT - (FORM) \\BITBLT.PRESS (SOURCELEFT SOURCEBOTTOM SOURCETYPE OPERATION TEXTURE) COMPILER::GENCODE-BLOCK -(COMPILER::NEW-LAMBDA COMPILER::BLIP-VAR COMPILER::REMOTE-RETURN-TAG COMPILER::*CODE* COMPILER::CODE) -COMPERRM (PLVLFILEFLG) \\TEDIT.CUMULATE.EVENTS (PIECES-TO-SAVE?) \\DEVICE.INPUT (TASKREG) -\\BASEBYTES.IO.INIT (FILE ACCESS RECOG OTHERINFO FDEV I) TEDIT.REDO.PARALOOKS (CH#) -TOPW.ADJUSTSELECTION (*PRINT-LEVEL* *PRINT-LENGTH*) DOATTACHEDWINDOWCOM (COM) SEDIT::MENU-FIND-SELECTEDFN - (SEDIT::CONTEXT) FASL::FASL-END-OF-BLOCK (FASL::OP) CL:WARN (XCL:*CURRENT-CONDITION*) -TEDIT.SELECTED.PIECES (CROSSCOPY LEN INSPC INSPC# OPLEN EVENT REPLACING INSERTCH# OBJ COPYFN UNDOCHAIN -) FASL:DUMP-VALUE (FASL::HANDLE FASL::VALUE FASL::REMEMBER FASL::INDEX) TEDIT.DISPLAYTEXT (CHWIDTH SEL - DY) INSPECTW.REDISPLAY (*PRINT-LEVEL* *PRINT-LENGTH* PROPMENU VALUEMENU) SEDIT::PREV-NODE (SEDIT::NODE - SEDIT::INDEX) COMPILER::META-SUBST-LAMBDA (COMPILER::IN-FUNCTIONAL-POSITION) TEDIT.UNPARSE.PAGEFORMAT - (PINFO) \\FONTFILENAME.OLD (*PRINT-BASE*) DIFFERENCE (X Y) MSFIXUPTYPES (FLG) |\\LFCreateFile| ( -\\INTERRUPTABLE) VRULE.GETFN2 (TEXTSTREAM) COMPILER::COMPILE-FILE-DEFINEQ (COMPILER::COMPILER-CONTEXT -COMPILER::REAL-DEFN) XCL:UNADVISE-FUNCTION (XCL::NO-ERROR) FILL-ARRAY (VALUE TOTAL-SIZE TYPE-NUMBER) -CL:BIT-ORC1 (BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) \\SETUPSTACK1 (RPTN) TEDIT.OBJECT.CHANGED (LINES -CHANGED CH# PCNO) \\MAKEBASEBYTESTREAM (\\INTERRUPTABLE) \\TFBRAVO.PARSE.PROFILE.PARA (PARA) -REDISPLAY-WHO-LINE (WINDOW) TEDIT.PUT.PCTB (OCURSOR POBJ OFILELEN OLDPARALOOKS *READTABLE* -*PRINT-BASE* CHARLOOKSLST PARALOOKSLST) FB.UPDATEBROWSERITEMS (WINDOW) COMPILER::RELEASE-TREE (COMPILER::TREE -) SEDIT::REPLACE-CHARS (SEDIT::NEW-END SEDIT::MULTI-ESCAPE SEDIT::ADD-MULTI-ESCAPE? -SEDIT::COMPUTE-NEW-POINT-TYPE? SEDIT::CARET) \\BITMAPSIZE.IP (STREAM) COMPILER::ALPHA-MV-CALL ( -COMPILER::FN-FORM COMPILER::ARG-FORMS COMPILER::VALUES-USED) FORMAT-PLURAL (COLON PARMS) -XCL::IMPLICIT-KEY-MAP-HASH (XCL::FN XCL::LAST-ADDRESS XCL::KEY-ACCESSOR XCL::NULL-SLOT-INDICATOR -XCL::VALUE) CLEARSTK (\\INTERRUPTABLE) TEDIT.RAW.INCLUDE (NPC) |\\LFMakeVolumeDirectory| ( -\\INTERRUPTABLE) %MAKE-DISPLACED-ARRAY (DISPLACED-TO-TYPENUMBER) CL::%MAKE-SMALL-FIXP-ACCESSOR ( -CL::OFFSET) IQUOTIENT (X Y) SEDIT::SET-INITIAL-SELECTION (SEDIT::CANDIDATE) FASL:SKIP-TEXT (STREAM) -SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (SEDIT::Y-1 SEDIT::Y-2 SEDIT::BOTTOM SEDIT::WINDOW-WIDTH SEDIT::RY-1 - SEDIT::RY-2) %ALTER-AS-DISPLACED-ARRAY (\\INTERRUPTABLE) NUMBER.READER.HANDLER (BUTTON) CHAT.BIN ( -STATE) ICMLARRAY.GETMENUWGROUP (RANK) COMPILER::COMPILE-FILE-DEFCONSTANT (COMPILER::COMPILER-CONTEXT -COMPILER::FORM) SHOWDISPLAY (BASE RASTERWIDTH) SEDIT::PRINT-BROKEN-ATOM (SEDIT::X) \\BASEBYTES.OPENFN -(RECOG OTHERINFO FDEV) COMPILER::GENCODE-CATCH (COMPILER::NEW-LAMBDA COMPILER::END-TAG COMPILER::THROW-TAG - COMPILER::STK-NUM) XCL::IMPLICIT-KEY-REHASH (XCL::LAST-ADDRESS XCL::KEY-ACCESSOR -XCL::NULL-SLOT-INDICATOR XCL::VALUE) SETSCREENCOLOR (FLG) SETINITIALS (DFNFLG FILEPKGFLG) SMASHPATTERN - (XV) SEDIT:GET-WINDOW-REGION (SEDIT::CONTEXT SEDIT::REASON SEDIT::NAME TYPE) TEDIT.REDO.LOOKS (CH#) -CL::%MAPCAN-SINGLE (CL::FN LIST) UNDONLSETQ1 (LISPXHIST) \\LEAF.GETFILE (MODE SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) XCL::MAKE-IMPLICIT-KEY-HASH-TABLE (XCL::MIN-KEYS) \\FM.TOGGLE-SELECTEDFN (WINDOW -BUTTONS) SEDIT::LINE-FINISHED (SEDIT::FORCE) FASL:VALUE-DUMPABLE-P (FASL::OBJ) SEDIT::MAXIMUM-STRING-WIDTH - (SEDIT::STRING-LIST SEDIT::FONT SEDIT::PRIN2?) TOPW.BUTTONEVENTFN (*PRINT-LEVEL* *PRINT-LENGTH* W) -\\REPEATEDLYEVALQT (\\INTERRUPTABLE) FASL:READ-TEXT (STREAM) COMPILER::CLOSURE-ANNOTATE-VAR-REF ( -COMPILER::IN-LOOP-P) WALK-TEMPLATE (XCL::FORM XCL::CONTEXT) \\LISPFINISH (DUMMY) SIMPLE-ARRAY-P (ARRAY -) LOADFNSCAN (ADR) PRINTHISTORY (L HELPCLOCK) \\MAIKO.DISPLAYLINE (STREAM \\PCHARSLEFT \\PSTRING -\\PFILE FONT) CL:SBIT (SIMPLE-BIT-ARRAY INDICES) EVAL (\\INTERNAL) \\TEDIT.FIXCHANGEDPART (TEXTOBJ -STARTINGLINE WINDOW INCREMENTAL? NEXTCARETCH#) PP* (**COMMENT**FLG *STANDARD-OUTPUT*) -|\\LFUpdateLeaderPage| (\\INTERRUPTABLE) APROPOS-SEARCH (CL:SYMBOL BASE OFFSET LENGTH FATP) -\\GATHERSTATS (FID) IRM.CREF.BUTTONEVENTFN (SELECTION RELX RELY TEXTSTREAM BUTTON) -ICMLARRAY.GETREGIONFN (FIXEDPOINT) COMPILER::COMPILE-FILE-DECLARE\: (COMPILER::COMPILER-CONTEXT COMPILER::FORM - COMPILER::DOCOPY COMPILER::*EVAL-WHEN-COMPILE*) COMPILER::ALPHA-MACROLET (COMPILER::BODY -COMPILER::*ENVIRONMENT*) FASL::DOTTED-LIST-LENGTH (FASL::X) \\COPYSYS0SUBR (FID) SPYOBJ (STATUS -*PRINT-PRETTY* *PRINT-LEVEL* *PRINT-LENGTH*) DSPDESTINATION (\\INTERRUPTABLE) RETURN (FORM) -CLOSENSOCKET (\\INTERRUPTABLE) \\SFROTATEFONTCHARACTERS (CHARBITMAP ROTATION) -SEDIT::RELINEARIZE-PRELINEARIZED-NODE (SEDIT::LITEM) SEDIT::PARSE--LIST-INTERNAL (CL:FORMAT SEDIT::NODE - SEDIT::LIST-POSITIONS SEDIT::SUB-FORMATS SEDIT::SUB-FORMATS-LENGTH SEDIT::SUBNODE SEDIT::SUBFORMAT) -CL:SIMPLE-STRING-P (STRING) FORMAT-NEWLINE (PARMS) TEDIT.SINGLE.PAGEFORMAT (PAGE#S? PX PY PFONT PQUAD -LEFT RIGHT TOP BOTTOM COLS COLWIDTH INTERCOL HEADINGS UNITS PAGEPROPS PAPERSIZE) \\STRINGSTREAM.INIT ( -FILE ACCESS RECOG OTHERINFO FDEV) \\SENDSPP (SI::*LOCKED-MONITOR* SI::*RESETFORMS* \\INTERRUPTABLE) -STRING-ARRAY-P (ARRAY) \\BITBLT.BITMAP (\\INTERRUPTABLE) SI::BQUOTE-EXPANDER (SI::*BACKQUOTE-LEVEL*) -FASL:DUMP-FUNCTION-DEF (FASL::HANDLE FASL::DCODE FASL::NAME) SI::BQUOTE-PROCESS-LIST (SI::ITEM SI::TAIL -) COMPILER::COMPILE-FILE-SETF-SYMBOL-FUNCTION (COMPILER::COMPILER-CONTEXT COMPILER::NAME COMPILER::DEFINITION -) SEDIT::SETUP-NEW-CONTEXT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) DSPBOUT (CHARCODE) COMPILER::GENCODE - (COMPILER::NODE COMPILER:CONTEXT) \\WRITERAWPBI (PBI) \\BLTSHADE.BITMAP (\\INTERRUPTABLE) -\\TEDIT.FIND (AGAIN) RESETFORM (SI::*RESETFORMS*) ABS (CL:NUMBER) \\TEDIT.SCROLLFN (W DX DY) -SI::COMMA-ERROR-EXPANDER (SI::ENV) RESETVARS (SI::*RESETFORMS*) FASL:BEGIN-BLOCK (FASL::HANDLE) -FILING.CALL (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\PUPLEVEL1STATE (FLG) SIMPLE-REMOVE-IF (TEST -SEQUENCE START END) \\KEYBOARDON (NOCHECK) \\PEEKPUP (RPTN) \\DSPRATE (AC0 AC1 AC2) NIL -NLAMBDA \\SETPRINTLEVEL (CHARCODE) PRETTYDEFCOMS (CHARCODE) |\\UFSOpenFile| (CL:UNWIND-PROTECT) -CL:COMPILE-FILE (CL:UNWIND-PROTECT CHARCODE) SEDIT::VERIFY-STRUCTURE (CL:UNWIND-PROTECT) TTBIN ( -CHARCODE) TTADDTAB (CHARCODE) \\TFBRAVO.EOLS (CHARCODE) FUNCTION.WRAPPER (CHARCODE) ADDNAKEDCHAR ( -CHARCODE) |\\UFSGetFileInfo| (CL:UNWIND-PROTECT) PEEKCCODE (CHARCODE) MAPHASHFILE (CHARCODE) -UTF16BE.OUTCHARFN (CHARCODE) \\SETRECLAIMMIN (CHARCODE) MSPRGDWIM (CL:UNWIND-PROTECT) \\SPPWATCHER ( -CL:UNWIND-PROTECT) \\FTP.UNPACKFILENAME (CHARCODE) PRIN2-LONG-STRING (CHARCODE) |\\LFGenerateFiles| ( -CL:UNWIND-PROTECT) MSNOTICEFILE (CL:UNWIND-PROTECT) CL:CHAR-NAME (CHARCODE) \\RSTRING2 (CHARCODE) -\\TEDIT.FORMATTABS (CHARCODE) TTSKREAD (CHARCODE) CHARACTER.PRINT (CHARCODE) \\TFBRAVO.READ.USER.CM ( -CHARCODE) \\TFBRAVO.HANDLE.HEADING (DECLARE\:) DIRPRINTNAME (CHARCODE) \\IDLER (DATEFORMAT) -INFILECOMTAIL (CL:UNWIND-PROTECT) TRAPLOOP (DV) RESETVAR (CL:UNWIND-PROTECT) \\PARSE.PORTCONSTANT ( -CHARCODE) SEDIT::PRINT-STRING (CHARCODE) SHOW.CLEARINGHOUSE (FILESLOAD) CHAT.LOGIN (CHARCODE) -POSTSCRIPT.PUTBITMAPBYTES (CHARCODE) \\OUTCHARFN.PRESS (CHARCODE) |\\UFSDeleteFile| (CL:UNWIND-PROTECT -) \\JISPEEK (CHARCODE) \\NEW.MKATOM (CHARCODE) \\TEXTSTREAMBOUT (CHARCODE) DWIMIFY (CL:UNWIND-PROTECT) - \\INTERNAL/SETPASSWORD (CL:UNWIND-PROTECT) FIXATOM (CHARCODE) PRETTYCOM1 (CL:UNWIND-PROTECT) -\\ICONW.FORMAT.TITLE1 (CHARCODE) TTYIN.FINISH (CHARCODE) |\\UFSSetFileInfo| (CL:UNWIND-PROTECT) -\\HCPYMODEDSPPRINTCHAR (CHARCODE) \\JISFILEOUTCHARFN (CHARCODE) |\\LFEventFn| (CL:UNWIND-PROTECT) -\\DSPFONT.PRESS (CHARCODE) |\\UFSCloseDevice| (CL:UNWIND-PROTECT) READPLIST (CHARCODE) DO.LF (CHARCODE -) \\SHIFTJISFILEOUTCHARFN (CHARCODE) ADJUSTLINE (CHARCODE) FB.HARDCOPY.MAXWIDTH (CHARCODE) TTYIN1 ( -CHARCODE) READ-EXTENDED-TOKEN (CHARCODE) \\PS.BOUTFIXP (CHARCODE) \\JISIN (CHARCODE) CHARACTER ( -CHARCODE) IDATE (CHARCODE) \\TFBRAVO.READ.CHARLOOKS (CHARCODE) PLAYTUNE (CL:UNWIND-PROTECT) -SEDIT::INSERT-COMMENT-CHARS (CHARCODE) AUTOCR? (CHARCODE) *WHO-LINE-OLD-TIME* (DATEFORMAT) TTYIN.READ -(CHARCODE) DASSEM.DSTOREFNDEF (CL:UNWIND-PROTECT) DIRECTORY.MATCH.SETUP (CHARCODE) TTYIN.SETUP ( -CHARCODE) INITIALIZEMASTER.IP (CHARCODE) \\SLOWHCPYMODEBLTCHAR (CHARCODE) |\\DSKOpenDevice| ( -CL:UNWIND-PROTECT) \\FTP.OPENFILE (DATEFORMAT) |\\LFDirectoryNameP| (CL:UNWIND-PROTECT CHARCODE) -\\HCPYMODEBLTCHAR (CHARCODE) \\SAVELINEBUF (CHARCODE) CLOSERTPSOCKET (CL:UNWIND-PROTECT) CHOOZ ( -CHARCODE) EXEC-READ-LINE (CHARCODE) ASKUSERCHAR (CHARCODE) GENSYM? (CHARCODE) \\UFS.RECOGNIZE.FILE ( -CL:UNWIND-PROTECT) TTYINPROMPTFORWORD (CHARCODE) \\ELIDE.PRINT.TAIL (CHARCODE) PRINTPACKETDATA ( -CHARCODE) \\REALFRAMEP (CHARCODE) |\\VAMAllocPageGroup| (CL:UNWIND-PROTECT) BREAK.MSG.INTO.LINES ( -CHARCODE) CLISPFOR (CL:UNWIND-PROTECT) \\LOGIN.READ (CHARCODE) TEDIT.SEL.AS.STRING (CHARCODE) -READFROMBUF (CHARCODE) LASTCHPOS (CHARCODE) CLISP3C (CL:UNWIND-PROTECT) \\UFS.REMOVE.HOST.FIELD ( -CHARCODE) PFI.PASS.COMMENT (CHARCODE) \\TEDIT.HARDCOPY.FORMATLINE (CHARCODE) -\\TFBRAVO.FIND.LAST.TRAILER (CHARCODE) \\PROCESS.EVAL1 (CL:UNWIND-PROTECT) TTDOTABS (CHARCODE) -\\UPF.NEXTPOS (CHARCODE) \\SEQUIN.PROCESS (CL:UNWIND-PROTECT) \\STREAMCHARWIDTH (CHARCODE) -POSTSCRIPT.SHOWACCUM (CHARCODE) \\ATBLSET (CHARCODE) \\TEXTDSPXPOSITION (CHARCODE) -\\PRINT-USING-ADDRESS (CHARCODE) \\TEDIT.CONVERT.TO.FORMATTED (CHARCODE) HISTORYFIND1 (CHARCODE) -|compilation| (BREAK1) BSPPUTMARK (CL:UNWIND-PROTECT) COMPILER::COMPILE-ONE-LAMBDA (CL:UNWIND-PROTECT) - ASKUSER1 (CHARCODE) WORD.MATCHES.BUFFER (CHARCODE) SEDIT::OUTPUT-CR (CHARCODE) TTSKIPSEPR (CHARCODE) -\\BSP.PREPARE.OUTPUT (CL:UNWIND-PROTECT) \\EUCFILEOUTCHARFN (CHARCODE) FB.PRINTFN (CHARCODE) -\\LEAF.CLOSEFILE (CL:UNWIND-PROTECT) ASSURE.PUP.READY (CL:UNWIND-PROTECT) COPIEDFILENAME (CHARCODE) -CHNGNM (CL:UNWIND-PROTECT) SEDIT::INPUT-TOKENDELIM (CHARCODE) \\STRINGWIDTH.HCPYMODE (CHARCODE) L-CASE - (CHARCODE) GENSYM (CHARCODE) CREATEDSKDIRECTORY (CL:UNWIND-PROTECT) \\GETFILINGCONNECTION ( -CL:UNWIND-PROTECT) BCOMPL2 (SPECVARS LOCALVARS) START.OF.PARAGRAPH? (CHARCODE) U-CASEP (CHARCODE) -TEDIT.DEFAULT.MENUFN (CHARCODE) SEDIT::TTYFN (CL:UNWIND-PROTECT) TMPSUBFN (CHARCODE) -SEDIT::CREATE-NULL-LIST (CHARCODE) \\PROCESS.APPLY1 (CL:UNWIND-PROTECT) \\ECHOCHAR (CHARCODE) -\\DSPSPACEFACTOR.IP (CHARCODE) U-CASE (CHARCODE) SEDIT::CFV-DOTLIST (CHARCODE) CLOSEBSPSTREAM ( -CL:UNWIND-PROTECT) SEDIT::SIMPLE-STRING-SCAN (CHARCODE) PROMPTFORWORD (CHARCODE) SCAVENGEDSKDIRECTORY -(CL:UNWIND-PROTECT) \\CHARWIDTH.PRESS (CHARCODE) \\24DISPLAYINIT (CHARCODE) SKIP/ZAP (CHARCODE) -FB.DISPLAY.COUNTERS (CHARCODE) \\SETNEWTIME0 (DATEFORMAT) PROMPTINWINDOW (CHARCODE) \\SLOWHDCPYBLTCHAR - (CHARCODE) PURGEHISTORY1 (CHARCODE) ASKUSER$ (CHARCODE) UNDOLISPX3 (CL:UNWIND-PROTECT) TTYINWORDRDTBL - (CHARCODE) APROPOS (CHARCODE) D-ASSEM:ASSEMBLE-FUNCTION (CL:UNWIND-PROTECT) U/L-CASE (CHARCODE) -DSPBACKUP (CHARCODE) INSTALL-CLIPBOARD (CHARCODE) \\TEDITOUTCHARFN (CHARCODE) \\TEDIT.READTABLE ( -CHARCODE) |\\VFMInsertPageGroup| (CL:UNWIND-PROTECT) ASKUSER (CHARCODE) \\8DISPLAYINIT (CHARCODE) -TEDIT (CL:UNWIND-PROTECT) READOCT (CHARCODE) |\\LFMakeDirHole| (CHARCODE) RESETVARS (CL:UNWIND-PROTECT -) TTYIN.SHOW.?ALTERNATIVES (CHARCODE) |\\LFFileName| (CHARCODE) GC-FILING-DIRECTORY (CHARCODE) -\\SEQUIN.CLOSE (CL:UNWIND-PROTECT) DASSEM.DWRITEFN (CHARCODE) \\CHARWIDTH.IP (CHARCODE) \\SLOWBLTCHAR -(CHARCODE) \\DSPFONT.IP (CHARCODE) CHAT.TYPEOUT (CHARCODE) |UnixShellQuote| (CHARCODE) \\DSPPRINTCR/LF - (CHARCODE) COPY.TEXT.TO.IMAGE (CHARCODE) SEDIT::MUTATE (CHARCODE) \\IFS.LOOKUPFILE (CHARCODE -CL:UNWIND-PROTECT) |\\LFCloseFile| (CL:UNWIND-PROTECT) \\FILLBUFFER (CHARCODE) BSPFORCEOUTPUT ( -CL:UNWIND-PROTECT) SETSPELLCASE (CHARCODE) PPT (CL:UNWIND-PROTECT) TITLEDICONW (CHARCODE) STRINGWIDTH -(CHARCODE) INTERPRESS.OUTCHARFN (CHARCODE) TB.FINISH.CLOSE (CL:UNWIND-PROTECT) \\GETCHAR (CHARCODE) -|\\VFMGenerateFileIDs| (CL:UNWIND-PROTECT) FIXSPELL (CHARCODE CL:UNWIND-PROTECT) \\UFS.DIRECTORY.NAME -(CL:UNWIND-PROTECT) READ-AFM-FILE (CHARCODE) \\CCLOSURE.DEFPRINT (CHARCODE) \\LOAD-STREAM (CHARCODE) -PURGEHISTORY (CL:UNWIND-PROTECT) \\IDLE.TIME (DATEFORMAT) \\OPENLEAFCONNECTION (CL:UNWIND-PROTECT) -HEXSTRING (CHARCODE) DO.EDIT.PP (CHARCODE) SEDIT::RESHAPEFN (CL:UNWIND-PROTECT) \\TEXTINIT (CHARCODE) -|UnixPrint| (CHARCODE) EDITH (CL:UNWIND-PROTECT) \\DSCCOUT (CHARCODE) |\\LFDeleteFile| ( -CL:UNWIND-PROTECT) \\DSPSPACEFACTOR.PRESS (CHARCODE) SEDIT::CREATE-PRETTY-PRINT-ENV (CHARCODE) -TB.EXPANDFN (CL:UNWIND-PROTECT) CLISPIF (CL:UNWIND-PROTECT) \\NSFILING.FULLNAME (CHARCODE) EDITDEFAULT - (CHARCODE) WHO-LINE-TIME (DATEFORMAT) GRAPHOBJ.GETFN (CHARCODE) \\UFS.HANDLE.RELATIVEDIRECTORY ( -CHARCODE) \\IDATESCANTOKEN (CHARCODE) BACKSKREAD (CHARCODE) TTCOMPLETEWORD (CHARCODE) POSTSCRIPT.INIT -(CHARCODE) EDITFROMFILE (CL:UNWIND-PROTECT) DASSEM.DASSEM (OPT.INITHASH) DO.EDIT.COMMAND (CHARCODE) -UNDONLSETQ (CL:UNWIND-PROTECT) CL:PEEK-CHAR (CHARCODE) FITP (CHARCODE) \\RPLRIGHT (CHARCODE) -|\\LFRenameFile| (CL:UNWIND-PROTECT) \\SPP.CLEANUP (CL:UNWIND-PROTECT) \\WRITEBITMAP (CHARCODE) -COMPILER::TEST-ANALYSIS (CL:UNWIND-PROTECT) \\LFINITCASEARRAY (CHARCODE) HOSTNAMEP (CHARCODE) TRAPMAKE - (DV) \\IMAGEIOINIT (CHARCODE) EDRPT (CL:UNWIND-PROTECT) CALLS (CL:UNWIND-PROTECT) \\HDCPYBLTCHAR ( -CHARCODE) \\FONTFILENAME (CHARCODE) \\MKATOM (CHARCODE) UNIX.SETDISPLAYTYPE (CHARCODE) SEDIT::INPUT-QUOTE - (CHARCODE) \\FILEOUTCHARFN (CHARCODE) |\\VFMGetPageGroup| (CL:UNWIND-PROTECT) READBITMAP (CHARCODE) -BIGNUM.DEFPRINT (CHARCODE) \\MEDW.BLTCHAR (CHARCODE) LCSKIP (CHARCODE) \\DSPSPACEFACTOR.HCPYMODE ( -CHARCODE) READNUMBERINBASE (CHARCODE) READHASHMACRO (CHARCODE) \\DSPMOVELR (CHARCODE) -FB.SET.DEFAULT.NAME.WIDTH (CHARCODE) \\BN.TH2D (CHARCODE) PFI.SETUP.TRANSLATIONS (CHARCODE) MAPRINT ( -CL:UNWIND-PROTECT) \\TEST.PARAGRAPH.LOOKS (CHARCODE) \\TTYIN.RPEOF (CHARCODE) ONEDINSPECT.PROPWIDTH ( -CHARCODE) COMP.RETFROM.POINT (OPT.INITHASH) CHAT.PROMPT.FOR.INPUT (CHARCODE) |\\LFGetFileInfo| ( -CL:UNWIND-PROTECT) \\TERMINATESPP (CL:UNWIND-PROTECT) SEEFILE (CHARCODE) \\SUBFNDEF (CHARCODE) -ECHOCONTROL (CHARCODE) NSPRINT (CL:UNWIND-PROTECT) FB.CREATE.FILEBUCKET (CHARCODE) DO-DISPATCH-MACRO ( -CHARCODE) \\POSTSCRIPT.OUTCHARFN (CHARCODE) UNPACKFILENAME.STRING (CHARCODE) \\POSTSCRIPT.ACCENTFN ( -CHARCODE) \\TFBRAVO.WRITE.RUN (CHARCODE) SEDIT::SCAN-STRING (CHARCODE) \\SPP.ESTABLISH ( -CL:UNWIND-PROTECT) |\\VAMInit| (CL:UNWIND-PROTECT) UNSAVEFNS (CL:UNWIND-PROTECT) -\\TEDIT.FIND.FIRST.LINE (CHARCODE) LISPXREADP (CHARCODE) PRINTCOPYRIGHT (CHARCODE DATEFORMAT) -LISPDIRECTORYP (CL:UNWIND-PROTECT) PACKAGE-ENABLE (CHARCODE RPAQ?) \\UFS.FILEINFOFN (CL:UNWIND-PROTECT -) OPENPOSTSCRIPTSTREAM (CL:UNWIND-PROTECT CHARCODE) \\UFS.NEXTFILEFN (CL:UNWIND-PROTECT CHARCODE) -BMOBJ.GETFN4 (CHARCODE) \\FTP.GENERATEFILES (CHARCODE) COPYCHARS (CHARCODE) \\STRINGWIDTH.GENERIC ( -CHARCODE) EDITFPAT1 (CHARCODE) \\NSFILING.COPY/RENAME (CL:UNWIND-PROTECT) INITATOMS (CHARCODE) -PACKFILENAME (CHARCODE) \\GENERIC.READCCODE (CHARCODE) PRINTCOMSTRAN (CHARCODE) |\\LFScavFileName| ( -CHARCODE) \\DISPLAYLINE (CHARCODE) \\FAX.PARSE.NAME (CHARCODE) \\NSFILING.GENERATEFILES (CHARCODE) -FB.DATE (DATEFORMAT CHARCODE) MSPATHS (CL:UNWIND-PROTECT) \\TFBRAVO.PARSE.PARA (CHARCODE) -ETHERHOSTNAME (CHARCODE) \\TEST.CHARACTER.LOOKS (CHARCODE) BYTEBLOCKCOMPILE2 (CL:UNWIND-PROTECT) -EDIT4F3 (CHARCODE) |\\LFUnpackName| (CHARCODE) \\PARSE.NUMBER (CHARCODE) \\NSFILING.ADDQUOTES ( -CHARCODE) \\DISPLAYINIT (CHARCODE) UPDATEFILEMAP (CHARCODE) COMPILER::TEST-META-EVAL (CL:UNWIND-PROTECT -) CREATEHASHFILE (CHARCODE) \\STRINGWIDTH.HCPYDISPLAYAUX (CHARCODE) FIND.NON.SPACE (CHARCODE) -|\\VFMInit| (CL:UNWIND-PROTECT) CL:VALUES-LIST (OP#) \\NSPRINT.INTERNAL (CL:UNWIND-PROTECT) -\\PFI.DO.HARDCOPY (CL:UNWIND-PROTECT) TEDIT.SUBSTITUTE (CHARCODE) DINFO.UPDATE.TEXT.DISPLAY (CHARCODE) - \\FORMATLINE (CHARCODE) \\TEDIT.HARDCOPY.DISPLAYLINE (CHARCODE) \\STRING-STREAM-OUTCHARFN (CHARCODE) -COMPILE-IN-CORE (CL:UNWIND-PROTECT) \\POSTSCRIPT.ACCENTPAIR (CHARCODE) DIGITBASEP (CHARCODE) CL:VALUES - (OP#) SEDIT::CREATE-ENVIRONMENTS (CHARCODE) \\ADJUSTABLE-STRING-STREAM-OUTCHARFN (CHARCODE) -\\DSPFONT.HCPYMODE (CHARCODE) CL::VALUES-UFN (OP#) \\ORIGREADTABLE (CHARCODE) PFI.PRINT.INDICES ( -CHARCODE) |\\VAMRecomputeFreePageCount| (CL:UNWIND-PROTECT) READLINE (CHARCODE) COMPILER::TEST-ALPHA ( -CL:UNWIND-PROTECT) EDITDATE? (CHARCODE) HPRINT (CL:UNWIND-PROTECT) PRINT (CHARCODE) -SEDIT::PARSE-STRING-INTO-WORDS (CHARCODE) SEDIT::STRINGWIDTH (CHARCODE) \\BSP.PREPARE.INPUT ( -CL:UNWIND-PROTECT) |\\LFGetFileName| (CL:UNWIND-PROTECT) \\ORIGTERMTABLE (CHARCODE) BKSYSBUF.GENERAL ( -CL:UNWIND-PROTECT) MAKEFILES (CL:UNWIND-PROTECT) MAPFILES (CHARCODE) \\POSTSCRIPT.SPECIALOUTCHARFN ( -CHARCODE) \\DSPPRINTCHAR (CHARCODE) FIND.LINE.BREAK (CHARCODE) \\TEXTRIGHTMARGIN (CHARCODE) -PURGEDSKDIRECTORY (CL:UNWIND-PROTECT) \\PRINSTACKP (CHARCODE) |\\LFCheckBang| (CHARCODE) -PRINT-LISP-INFORMATION (CL:UNWIND-PROTECT) \\LEAF.STRIP.QUOTES (CHARCODE) %NUMERIC-STRING-P (CHARCODE) - COMPILER::TEST-ANNOTATION (CL:UNWIND-PROTECT) CL::VALUES-LIST-UFN (OP#) \\DOVMEMFULLINTERRUPT ( -CL:UNWIND-PROTECT) SEDIT::ATOM-CHAR-ESCAPED (CHARCODE) BSP.PUTINTERRUPT (CL:UNWIND-PROTECT) PF* ( -CL:UNWIND-PROTECT) CL:LOAD (CL:UNWIND-PROTECT) CLISPIFY1 (CHARCODE) LISPX (CL:UNWIND-PROTECT) PPSPP ( -CL:UNWIND-PROTECT) BRKDWNCOMPILE2 (CL:UNWIND-PROTECT) \\LEAF.RECONNECT (CL:UNWIND-PROTECT) DINFO.FIND -(CHARCODE) CL:UNWIND-PROTECT (CL:UNWIND-PROTECT) EDITDATE (DATEFORMAT) EDITCALLERS (CHARCODE) -PARSE-NAMESTRING1 (CHARCODE) WTFIX1 (CL:UNWIND-PROTECT) BMOBJ.GETFN3 (CHARCODE) BOOTSTRAP-NAMEFIELD ( -CHARCODE) \\GETSPP (CL:UNWIND-PROTECT) MAPFILES1 (CHARCODE) \\LITPRIN (CHARCODE) INDENTATION.FROM.HERE - (CHARCODE) TTYIN.PPTOFILE (CHARCODE) PFI.PREVIEW.DEFINEQ (CHARCODE) |\\VFMDeletePageGroup| ( -CL:UNWIND-PROTECT) TEDIT.SCAN.LINE (CHARCODE) \\AVGCHARWIDTH (CHARCODE) CLDISABLE (CL:UNWIND-PROTECT) -PFI.PRINT.MULTI.INDEX (DATEFORMAT) \\HDCPYDSPPRINTCHAR (CHARCODE) \\TEDIT.SEARCH.CODETABLE (CHARCODE) -PFI.PROCESS.FILE (CHARCODE) \\SUBREAD (CHARCODE) |PopUpWindowAndGetList| (CHARCODE) DIRECTORY.MATCH1 ( -CHARCODE) READ-UNICODE-MAPPING (CHARCODE) \\BASEBYTES.READP (CHARCODE) NCHARS (CHARCODE) -\\ROUTINGTABLE.INFOHOOK (CHARCODE) TTPRINSPACE (CHARCODE) TTYIN.BALANCE (CHARCODE) \\PRINTADDR ( -CHARCODE) \\CONVERTNUMBER (CHARCODE) \\NSFILING.PARSE.FILENAME (CHARCODE) \\PRINSTRING (CHARCODE) -\\LITPRIN.INTERNAL (CHARCODE) \\IFSERRORSTRING (CHARCODE) NEW/FN (CHARCODE) FRESHLINE (CHARCODE) -AT.END.OF.TEXT (CHARCODE) CASE.PRETTYPRINT (CHARCODE) FIX-SUBR-NAME (CHARCODE) FILEBROWSER (CHARCODE) -\\CHECK.PQUEUE (CL:UNWIND-PROTECT) |\\LFSetFileInfo| (CL:UNWIND-PROTECT) \\COURIER.HANDLE.BULKDATA ( -CL:UNWIND-PROTECT) \\DEFPRINT.BY.NAME (CHARCODE) SEDIT::SETUP-WINDOW-AND-PROCESS (CHARCODE) -\\FONT.COMPARESYMBOL (CHARCODE) \\FONT.SYMBOLASSOC (CHARCODE) LEAF.ASSURE.FINISHED (CL:UNWIND-PROTECT) - SEDIT::STRING-OFFSET (CHARCODE) DINFO.LOOKUP (CHARCODE) PARSE-NSADDRESS (CHARCODE) READC (CHARCODE) -PUTSEQUIN (CL:UNWIND-PROTECT) UPPERCASEARRAY (CHARCODE) \\TFBRAVO.PARSE.PROFILE.PARA (DECLARE\: -CHARCODE) \\HASHTABLE.DEFPRINT (CHARCODE) ASKUSEREXPLAIN (CHARCODE) FB.UPDATEBROWSERITEMS (CHARCODE) -\\STRINGWIDTH.PRESS (CHARCODE) FB.CANONICAL.DIRECTORY (CL:UNWIND-PROTECT) |\\VAMFreePageGroup| ( -CL:UNWIND-PROTECT) \\ELIDE.ELEMENT.CHAR (CHARCODE) \\PEEKREFILL (CHARCODE) \\FTP.PRINTPLIST (CHARCODE) - GET-FILEMAP-FROM-FILECREATED (CHARCODE) SEPRCASE (CHARCODE) CMLREADSEMI (CHARCODE) OLD.FIND.SYMBOL ( -CHARCODE) \\TOP-LEVEL-READ (CL:UNWIND-PROTECT) BREAK1 (CL:UNWIND-PROTECT) SEDIT::GET-USER-STRING ( -CHARCODE) \\DSPFONT.DISPLAY (CHARCODE) \\BACKFORMAT (CHARCODE) BRECOMPILE2 (CHARCODE) TTLOADBUF ( -CHARCODE) TERPRI (CHARCODE) CHDIR (CL:UNWIND-PROTECT) |\\DSKCloseDevice| (CL:UNWIND-PROTECT) -\\TEDIT.WORDBOUND.READTABLE (CHARCODE) GETCLEARINGHOUSE (CL:UNWIND-PROTECT) \\SYMBOL.ESCAPE.COUNT ( -CHARCODE) \\GENERATENOFILES (CHARCODE) \\STRINGWIDTH.HDCPYDISPLAY (CHARCODE) \\LEAF.GETFILE ( -CL:UNWIND-PROTECT) WRITE-UNICODE-MAPPING-HEADER (DATEFORMAT) DO.CRLF (CHARCODE) MULTIFILEINDEX1 ( -CL:UNWIND-PROTECT) BACKARROWP (CHARCODE) UTF8.OUTCHARFN (CHARCODE) \\NUMERIC.PNAMEP (CHARCODE) -ICONW.PRINT-JUSTIFIED (CHARCODE) INITIALEVALQT (CHARCODE) SEDIT::CREATE-COMMENT-WORD-NODES (CHARCODE) -FB.PROMPTFORINPUT (CHARCODE) |PopUpWindowAndGetAtom| (CHARCODE) \\NSFILING.REMOVEQUOTES (CHARCODE) -TTECHO.TO.FILE (CHARCODE) |\\DSKEventFn| (CL:UNWIND-PROTECT) \\DSPFONT.PSC (CHARCODE) -\\NSFILING.DESERIALIZE1 (CL:UNWIND-PROTECT) \\MAIKO.DISPLAYLINE (CHARCODE) CLISPATOM0 (CL:UNWIND-PROTECT -) INIT-CML-READTABLES (CHARCODE) TEDIT.CHARWIDTH (CHARCODE) SEDIT::TRANSLATE-CHARS (CHARCODE) -CHAT.CHOOSE.PHONE.NUMBER (CHARCODE) USEREXEC (CL:UNWIND-PROTECT) \\VANILLADISKINIT (CHARCODE) -\\LEAF.FLUSH.CACHE (CL:UNWIND-PROTECT) POSTSCRIPT.OUTSTR (CHARCODE) FLTSTR (CHARCODE) \\PAGEDREADP ( -CHARCODE) \\FTP.PACKFILENAME (CHARCODE) PFI.PREVIEW.DECLARE (CHARCODE) PFI.PRINT.BITMAP (CHARCODE) -\\MAIKO.PUNTBLTCHAR (CHARCODE) \\CHARWIDTH.PSC (CHARCODE) CHAT (CHARCODE) \\INSERTCR (CHARCODE) -SETFONT (CHARCODE) TERM.RESET.DISPLAY.PARMS (CHARCODE) DMCHAT.HANDLECHARACTER (CHARCODE) -|\\LFOpenDevice| (CL:UNWIND-PROTECT) \\SENDSPP (CL:UNWIND-PROTECT) \\4DISPLAYINIT (CHARCODE) -|\\DFSFreeDiskPages| (CL:UNWIND-PROTECT) \\MAIKO.ETHER-INTERRUPT (CL:UNWIND-PROTECT) -PACKFILENAME.STRING (CHARCODE) \\TFBRAVO.READ.PARALOOKS (CHARCODE) COPYVM (CL:UNWIND-PROTECT) -CL:PARSE-INTEGER (CHARCODE) SEDIT::SETUP-NEW-CONTEXT (CL:UNWIND-PROTECT) |\\LFCloseDevice| ( -CL:UNWIND-PROTECT) SPACES (CHARCODE) |\\UFSOpenDevice| (CL:UNWIND-PROTECT) CLEANUP (LISTFILES) -\\MKINTEGER (CHARCODE) POSTSCRIPTFILEP (CHARCODE) COMPILER::START-COMPILATION (CL:UNWIND-PROTECT) -|\\UFSEventFn| (CL:UNWIND-PROTECT) SIMPLEPRINT (CHARCODE) \\READTABLEP.DEFPRINT (CHARCODE) RESETFORM ( -CL:UNWIND-PROTECT) \\MISCN.UFN (CL:UNWIND-PROTECT) |\\UFSGenerateFiles| (CL:UNWIND-PROTECT) CMLRDTBL ( -CHARCODE) POSTSCRIPT.PUTCOMMAND (CHARCODE) PFI.ENQUEUE (CL:UNWIND-PROTECT) TTPRIN1 (CHARCODE) -LISPINTERRUPTS.PASTE (CHARCODE) XCL::WHERE-IS-NOTICE (CL:UNWIND-PROTECT) INTERPRET.REM.CM (CHARCODE) -MAKECOM (\##) PRETTYFILEINDEX (CHARCODE) FILING.CALL (CL:UNWIND-PROTECT) CREATE.NUMBERPAD.READER ( -CHARCODE) PRINTDEF (CHARCODE) |\\LFOpenFile| (CL:UNWIND-PROTECT) LISPXFIND (CL:UNWIND-PROTECT) -COMP.EVQ (CL:UNWIND-PROTECT) TTYINREADP (CHARCODE) |\\LFExtendFileIfNecessary| (CL:UNWIND-PROTECT) -SET-DEFAULT-HASHMACRO-SETTINGS (CHARCODE) NIL -NOBIND SI::GET-SUPER-DESCRIBERS T COMPILER::*TAIL-RECURSION-POLICY* T CL:NUMERATOR T -MB.DEFAULTBUTTON.FN T SEDIT::SHIFT-DOWN T LAST T SI::CHANGE-CALLS-IN-LAMBDA T COMPILER::OPTIMIZE-EQL T - SIMPLE-REMOVE-IF T COMPILER::*BLIP-VAR* T RESHOWTITLE T *PROCEED-CASES* T %SIMPLE-MERGE-LISTS T -XCL::MAKE-LEXICAL-ENVIRONMENT T %SIMPLE-MERGE-VECTORS T |ShellCommand| T -COMPILER::COMPILE-SCAN-OUTSTANDING-LOOSE-FORMS T *WHO-LINE-BORDER* T FASL:BEGIN-BLOCK T -\\CHECKBCPLPASSWORD T FASL::*TABLE-HITS* T FASL::DUMP-PACKAGE T COMPILER::*OUTSTANDING-LOOSE-FORMS* T -COMPLEX-SUBSTITUTE T COMPILER::FRAME-ANNOTATE-OPCODES T *DEBUGGER-MENU* T \\HARDRESET-CLEANUP-RUN T -CLOCK0 T %ENV-ARG-NAME T SIMPLE-COUNT T FORMAT-FIXED T *WHO-LINE-TIME-ENTRY* T COMPILER::*CODE* T -CL::%CAPTURE-COUNTERS-AFTER T |\\GR.GvarInitLst| T FORK-UNIX T CL:LONG-SITE-NAME T SIMPLE-REMOVE T -%MERGE-VECTORS T \\GCERROR T STACK.FULL.WARNING T *WHO-LINE-TITLE* T FASL:CURRENT-VERSION T -SEDIT::NOTE-CHANGE T \\MAIKO.DAYTIME0 T SEDIT::PARSE-FORMAT T SEDIT::COMPUTE-SELECTION-POSITION T -COMPILER::*NODE-TYPES* T SEDIT:*COMPILE-FN* T \\MAIKO.CLOCK0 T COMPILER::ALPHA-LET* T -*WHO-LINE-PACKAGE-ENTRY* T %MERGE-LISTS T \\MAIKO.CLOCK T %CTX-ARG-USED T SIMPLE-COUNT-IF T -\\TEDIT.EXPAND.DATE T SPY.START.ENTRY T CLSTOPSCAN? T FASL::RESET-DUMPER-STATS T COMPILER::ENV-ANALYZE-OPCODES - T COMPILER::*COMPILING-DEFINER* T COMPLEX-SUBSTITUTE-IF T XCL::CLOSE-WHERE-IS-FILES T -DBG::*IN-THE-DEBUGGER* T CL:CHAR-UPCASE T CL::%ASIN-PPOLY T *WHO-LINE* T -\\CREATECHARSET.HCPYMODE.INTERPRESS T HASH-STRUCTURE-SMASH T \\MAIKO.DAYTIME T COMPILER::TAKE-DOWN-RETURN-TO - T \\PARSE-FILE-HEADER T %ASET-EXPANDER T FASL:DUMP-EVAL T SEDIT::SET-FORMAT T CL:CHAR-DOWNCASE T -COMPILER::*LOAD-COMPILED-CODE* T %AREF-EXPANDER T CHAT.TTYEXITFN T \\MAIKO.COPY-TIME-STATS T -SEDIT::FIRST-ADD-COMMAND-MENU-ENTRY T COMPILER::*AVAILABLE-LEXICAL-NAMES* T COMPILER::ALPHA-LITERAL T -PACKAGE-REHASH-THRESHOLD T \\TEDIT.RECORD.TABLEADERS T SEDIT.COPYTOCLIPBOARD T COMPLEX T -SEDIT::COMPUTE-POINT-POSITION T CL::%ASIN-QPOLY T %MERGE T SEDIT::*IGNORE-CHANGES-ON-COMPLETION* T -\\FILLWINDOW T COMPILER::*POP-SUPPRESSION-POLICY* T FASL::*GATHER-DUMPER-STATS* T \\MAIKO.CHECKSUM T -COMPILER::MERGE-FIRST-FORMS T FORMAT-PAGE T *WHO-LINE-COLOR* T \\NEWPAGE T D-ASSEM:+PVAR-CODE+ T -\\DOSTORAGEFULLINTERRUPT T \\LOCKPAGES T D-ASSEM:+FVAR-CODE+ T COMPILER::OPTIMIZE-EQUALITY T -SEDIT::FIRST-ADD-COMMAND T \\DONEWPAGE T CL::%ASIN-EPSILON T FASL::*TABLE-ATTEMPTS* T -COMPILER::ENV-ANALYZE-LITERAL T D-ASSEM:+IVAR-CODE+ T \\GATHERSTATS T DASSEM.SAVELOCALVARS T CLSMARTEN - T D-ASSEM:+LAMBDA-NO-SPREAD+ T RECLAIM T \\PKG-FIND-FREE-PACKAGE-INDEX T -PACKAGE-HASHTABLE-INSPECT-FETCHFN T D-ASSEM:+NLAMBDA-NO-SPREAD+ T CLOCK T FORMAT-FRESHLINE T -*WHO-LINE-DISPLAY-NAMES?* T CL:MULTIPLE-VALUES-LIMIT T D-ASSEM:+LAMBDA-SPREAD+ T COMPILER::ALPHA-LET T - COMPILER::*CONTEXT* T SEDIT::DEFAULT-COMPILE-FN T SEDIT::SELECTION-DOWN T CL:GENTEMP T -D-ASSEM:+NLAMBDA-SPREAD+ T SEDIT:*CLEAR-LINEAR-ON-COMPLETION* T CL::PS-TYPE-SPECIFIER T -MAKE-REPORT-FUNCTION T %KEYWORD-TESTS T %ENV-ARG-USED T TEDIT.MODERNIZE T XCL::WHERE-IS-READ-FN T -GCMESS T CONDITIONS::EXPAND-WITH-COLLECTION-SITES T COMPILER::COMPILE-SCAN-MACROLET T CONCATFILES T -COMPILER::CONTEXT-TEST-FORM T INSTALL-CLIPBOARD T \\MOVEVMEMFILEPAGE T \\MAIKO.DORECLAIM T NOHOST T -\\PROCESS.AFTER.EXIT T \\WRITERAWPBI T *KEYWORD-PACKAGE* T %MAP-FOR-EFFECT-SINGLE T WORDSPERNAMEENTRY -T COMPLEX-POSITION-IF T \\10MB.TURNOFFETHER T CL::%CAPTURE-COUNTERS-BEFORE T SEDIT::INSERT-QUOTED-GAP -T COMPILER::*INPUT-STREAM* T SIMPLE-SUBSTITUTE-IF T CONDITIONS::NORMALIZE-SLOT-DESCRIPTION T -COMPILER::FRAME-ANNOTATE-LITERAL T COMPILER::SET-UP-RETURN-TO T HPRINT-TO-STRINGS T HPRINT-TO-STRING T - HERALD T \\DOLOCKPAGES T COMPILER::*LAP-STREAM* T SIMPLE-SUBSTITUTE-IF-NOT T COMPILER::*CONSTANTS-HASH-TABLE* - T SUBRP T PRINT-ALL-DOCUMENTATION T SEDIT::PROPS-COMPLETION T COMPLEX-POSITION-IF-NOT T -\\TEDIT.HARDCOPY T FORMAT-TERPRI T XCL:*PROFILE* T |\\VAMBufferSave| T \\MAIKO.DISABLEGC T -\\MAIKO.10MB.RESTART.ETHER T SEDIT::*FSPEC-TABLE-COPY* T EXTERNAL-SYMBOL-COUNT T -CONDITIONS::CONVERT-CONDITION-CASE T CL:ARRAY-TOTAL-SIZE-LIMIT T \\LINES-EQUAL-P T %LET-LIST T -\\DOTEMPLOCKPAGES T ORDINAL-TENS T %SIMPLE-MERGE T SEDIT::DEFAULT-COMMAND-TABLE-SPEC T CL:RATIONAL T -LOGOW T *WHO-LINE-HOST-NAME* T *DIGITS* T SEDIT::GET-LIST-FORMAT T CL:RATIONALIZE T FORMAT-TILDE T -COMPILER::COMPILE-SCAN-DEFINER T MSSIMPLESET T FORMAT-JUSTIFICATION T DEFAULTPRINTER T / T ZERO T -\\SEQUIN.OUT.OF.THE.BLUE T CONDITIONS::CONVERT-OLD-DEFINE-CONDITION T READVARS-FROM-STRING T -|\\VAMMarkBufferDirty| T FASL::INTEGER-BYTE-LIST T \\TEMPUNLOCKPAGES T TRUE T -SI::PROCESS-PROCEED-KEYWORDS T MSCLOSEFILES T DBG::KEYLIST-FROM-ESCAPE-LIST T \\UNLOCKPAGES T SEDIT::SEDIT1 - T ORDINAL-ONES T COMPILER::*SUBST-EXPR* T %UNBOUNDED-ARG-COUNT T %NOTANY-SINGLE T -SEDIT::SUBSTITUTE-SUBSTRUCTURE T *WHO-LINE-SYMBOL-SPACE-ENTRY* T ADDMAPBUFFER T COMPILER::*SUBST-OCCURRED* - T CL::%TAN-QPOLY T XCL:*DEBUGGER-PROMPT* T + T \\TEDIT.GET.SINGLE.CHARLOOKS2 T COMPILER::*HOST-ARCHITECTURE* - T \\EDIT.FLIPCARET T PRINTER.SCRATCH.FILE T XCL:*EVAL-FUNCTION* T CL::%TAN-PPOLY T *LOAD-PRINT-STUFF* - T %ONED-ARRAY T REDUCE-FROM-START T COMPILER::CLOSURE-ANNOTATE-OPCODES T XCL:*EXEC-PROMPT* T -*LAST-CONDITION* T CL:REALPART T COMP.STRETURN T %MERGE-SUBLISTS T \\FIXSEL T \\WRITEDIRTYPAGE T -WHEREIS T COMPILER::*INPUT-FILENAME* T *REPLACE-OLD-EDIT-DATES* T SIMPLE-SUBSTITUTE T -COMPILE-FILE-DECLARE\: T CL::*STEP-PRINT-LENGTH* T COMPILER::MAKE-LAP-VAR-REFERENCE T COMPILER::*SUBST-VAR* - T *WHO-LINE-HOST-NAME-ENTRY* T SEDIT::INPUT-SQUARE-BRACKET T XCL::ENTER-EXEC-FUNCTION T \\TTYIN.RPEOF - T COMPLEX-POSITION T CARDINAL-PERIODS T *WHO-LINE-ANCHOR* T REPORT-CONDITION T REDUCE-FROM-END T -COMPILER::PARSE-DEFUN T *STANDARD-OUTPUT* T COMPILER::*EVAL-WHEN-COMPILE* T SEDIT::SELECTION-UP T -CHAT.AUTOCRLF T ECASE-FAIL T SEDIT::PENDING-DELETE T CL::%TAN-EPSILON T BRKTYPE T %NOTEVERY-SINGLE T -COMPILER::ENV-ANALYZE-GO T SEDIT::INPUT-ESCAPE T SCALE-EXPT-AUX T CL:SIN T \\COUNTREALPAGES T -%THIN-STRING-ARRAY-P T \\MAIKO.ETHERSUSPEND T \\RELEASEBUFFER T TEDIT.POP.STYLESHEET T -SIMPLE-POSITION-IF-NOT T CARDINAL-TEENS T MAKE-PAD-SEGS T CL:SHORT-SITE-NAME T MAINSCREEN T -COMPLEX-DELETE-DUPLICATES T CHAT.TYPEIN T \\TEDIT.MARKINACTIVE T CL-WRAP-MACRO T -COMPILER::*PREPROCESSING-PHASE* T CL::*STEP-MAX-INDENTATION* T \\FONTCREATE.HCPYMODE.INTERPRESS T -PRINTERNAME T READVAR-FROM-STRING T IL-WRAP-MACRO T DBG::MENU-FROM-ESCAPE-LIST T %ARG-COUNT T -SPY.MERGE1 T OPENTEXTSTREAM T IL-MACRO-WRAPPED-P T LASTPOS T XCL::*UNSAFE-TO-DELETE-PACKAGE-NAMES* T -\\CREATECHARSET.HCPYMODE.PRESS T CL:SOFTWARE-TYPE T COMPILER::*FASL-HANDLE* T FORMAT-PRINT-ROMAN T -BMOBJ.BUTTONEVENTINFN T CROPMARK.WHENOPERATEDONFN T CL:STABLE-SORT T \\WAIT.FOR.TTY T -XCL::WALK-MULTIPLE-VALUE-BIND T CHAT.KEYACTIONS T \\TEDIT.SPLITW T SEDIT::SUBSTITUTE-STRUCTURE T -COMPILER::COMPILE-SCAN-DECLARE\: T XCL::UNDOABLY-PROCLAIM T CL:SORT T *FEATURES* T XCL::*UNBROKEN-FNS* - T %MIN-ARGS T SYMBOL-INSPECT-STOREFN T \\TEDIT.SHOW.PARALOOKS T DEFAULT-HANDLE-CONDITION T -READVARS-FROM-STRINGS T COMPILER::RELEASE-OPCODES T \\TEDIT.MARKACTIVE T CL:STREAM-ELEMENT-TYPE T -MAKE-INTO-CONDITION T SEDIT::CLOSE-LIST T SEDIT::SEARCH-OBJ-BACKWARDS T CL::*STEP-STATE* T -%SLOW-ARRAY-READ T - T COMPILER::META-SUBST-STMTS T CHAT.OSTYPES T %VECTOR-INSERTION-SORT T -%SIMPLE-MERGE-SUBLISTS T CARDINAL-TENS T COMPILER::*DEFERRED-FORMS* T *WHO-LINE-ENTRIES* T -HASH-NO-PARAMETER-ERROR T SEDIT::ALIST-COMPLETION T XCL::*DELETED-IMPLICIT-HASH-SLOT* T -COMPLEX-REMOVE-DUPLICATES T COMPILER:PASS T \\TEDIT.UNSPLITW T \\BULK.DATA.STREAM T -*WHO-LINE-CURRENT-USER* T COMPILER::*COMPILER-IS-READING* T TTPRIN2 T SIMPLE-POSITION T -COMPILER::GENCODE-SEGMENT T XCL::*WALK-COPY* T COMPILER::*CURRENT-BLOCK* T XCL:PKG-GOTO T -CHAT.UNDERLINE.DESCENT T XCL::WALK-LET/LET* T CHAT.INTERRUPTS T SI::CANONICALIZE-ADVICE-WHERE-SPEC T -FORMAT-GET-SEGMENTS T XCL::PROFILIZE T CARDINAL-ONES T COMPILER::*MAKING-SECOND-PASS* T -HRULE.WHENOPERATEDONFN T PACKAGE-INSPECT-FETCHFN T \\MAIKO.ETHERRESUME T SEDIT::SEARCH-OBJ T -SI::*UNADVISED-FNS* T COMPAREFILES T COMPILER::CLOSURE-ANNOTATE-LITERAL T CL::*STEP-PRINT-LEVEL* T -SI::RESETUNWIND T *WHO-LINE-USER-ENTRY* T SIMPLE-POSITION-IF T COMP.AC T XCL::*WALK-FUNCTION* T -*WHO-LINE-VMEM-ENTRY* T \\FLUSHVMOK? T COMPILER::*ENVIRONMENT* T FORMAT-PRINT-OLD-ROMAN T -COMPILER::*NODE-NUMBER* T COMPILER::*TARGET-ARCHITECTURE* T FASL::DUMP-ARRAY-DESCRIPTOR T -SIMPLE-DELETE-DUPLICATES T WRITEFILE T \\TEDIT.QUIT T CHECK-TYPE-FAIL T SPY.POINTERS T STRING T -CL::SXHASH-MAX T CL::%SIN-PPOLY T CL::%VALID-TYPE-P T UNIX-GET-NEXT-BUFFER T MOVE.TO.NEXT.LINE T -XCL::*WALK-FORM* T SEDIT::SELECT-PSEUDO-SEGMENT T MOBY-UNINTERN T TTLASTLINE T COMPILER::*BLOCK-HASH-TABLE* - T %SIMPLE-VECTOR-INSERTION-SORT T CL::%SIN-QPOLY T CL::*STEP-INDENTATION-LEVEL* T CL:TAN T -SYMBOL-INSPECT-FETCHFN T FB T CONDITIONS::*FUTURE-CITIZENS-OF-CONDITIONS* T SI::CREATE-BROKEN-DEFINITION - T MAKE-DO-SYMBOLS-VARS T EVAL-INPUT T *FORMAT-ORIGINAL-ARGUMENTS* T CL:YES-OR-NO-P T -*BREAK-ON-WARNINGS* T CL::ACCESSOR-BODY T WHO-LINE-USER-AFTER-LOGIN T CL::%NO-SUPER-TYPE T -COMPILER::*NODE-HASH* T XCCS-UTF8-AFTER-OPEN T *DEBUG-IO* T CL::*COMMON-LISP-BASE-TYPES* T -XCL::*LEXICAL-VARIABLES* T SEDIT::SELECTION-FROM-PSEUDO-SELECTION T CL:** T CL:PROCLAIM T -SEDIT::INSERT-NULL-LIST T SIMPLE-REMOVE-DUPLICATES T CL::DEFSTRUCT-SHARED-ACCESSOR-OPTIMIZER T -CL::%SIN-EPSILON T CL:*** T STRING-EQUAL-HASHBITS T FORMAT-PRINT-CARDINAL-AUX T *MODULES* T -PSCFONT.SPELLFILE T *QUERY-IO* T \\SHOWPAGETABLE T STRINGHASHBITS T SI::SUB-DATATYPE-P T -*FORMAT-LENGTH* T FORMAT-ITERATION T *WHO-LINE-TTY-STATE-ENTRY* T *ERROR-OUTPUT* T TTNEXTLINE T -CL::*BASE-TYPE-LATTICE* T CHAT.HOSTINFO T COMPILER::*BLOCKS* T CL::DEFSTRUCT-SHARED-PREDICATE-OPTIMIZER - T \\DAYTIME0 T CL::*STEP-INDENTATION-INCREMENT* T *TERMINAL-IO* T FORMAT-GET-TRAILING-SEGMENTS T RAID - T COMPILER::*INPUT-FILECOMS-VARIABLE* T SEDIT::UPGRADE-COMMENT T COMPILER::ENV-ANALYZE T -ENCAPSULATEDOBJ.BUTTONEVENTINFN T COMPILER::*INDENT-INCREMENT* T *READ-DEFAULT-FLOAT-FORMAT* T -COMPILER::*CURRENT-FUNCTION* T FASL::DUMP-LIST T CL:SETQ T COMPILER::CLOSURE-ANNOTATE-GO T -COMPILER::*LOCAL-FUNCTIONS* T CL::%FUNCTION-DEFINING-FORM-KEYWORDS T CHAT.PROTOCOL.ABBREVS T -\\INTERLISP-NLAMBDA-MACRO T COMPLEX-FIND-IF T \\FIXCODESYM T %SIMPLE-VECTOR-QUICK-SORT T -%LIT-ARRAY-SIZES T CL:++ T LOCAL-MACRO-FUNCTION T *LOAD-VERBOSE* T GRAPHERCOPYBUTTONEVENTFN T -LISPINTERRUPTS T CL:+++ T COMPILER::RELEASE-LITERAL T SEDIT::FIND-SUBSTRUCTURE-BACKWARDS T -COMP.DELPUSH T COMPLEX-DELETE-IF T COMPILER::CLOSE-OVER T CL:BOOLE-AND T RESETGRID T CL:// T -SEDIT::DISINTEGRATE-CONTEXT T \\MAIKO.BLTSHADE.BITMAP T UNCLISPTRAN T CL:BOOLE-ANDC1 T -CL::COMPLETE-ARRAY-TYPE-DIMENSIONS T SEDIT::FIND-SUBSTRUCTURE T COMPLEX-DELETE-IF-NOT T SEDIT::GROW-CLICK? - T CONDITIONS:*BREAK-ON-SIGNALS* T CL::*STEP-IO* T CL:BOOLE-1 T CL:/// T LOCAL-SYMBOL-FUNCTION T -\\SPLITPIECE T XCL::WALK-LAMBDA T CHAT.TTY.PROCESS T \\TEDIT.SHOW.PAGEFORMATTING T COMPLEX-FIND-IF-NOT - T *FORMAT-INDEX* T FLAST T *WHO-LINE-STATE-UNINTERESTING-FNS* T CL:BOOLE-C2 T CHECKPAGEMAP T -CHAT.FONT T BROKENFNS T CL:BOOLE-CLR T SEDIT::FIND-COMMENT T SAVE.CURSOR T UNIX.PARAMS.CONFIRM T -CL:BOOLE-ANDC2 T *MACROEXPAND-HOOK* T LITATOM-PACKAGE-CONVERSION-ENABLED T CL:BOOLE-2 T PROPLISTP T -CL:BOOLE-C1 T \\M44EXTENDVMEMFILE T %VECTOR-QUICK-SORT T COMPILER::GENCODE-PROGV T XCL::*ENVIRONMENT* -T COMPILER::*TAIL-RECURSION-THRESHOLD* T CL:BOOLE-NAND T XCL::WALK-FLET/LABELS T CHAT.PROTOCOLTYPES T -\\MAIKO.BITBLT.BITMAP T CL::%DEFAULT-PRINT-FUNCTION T *FORMAT-DISPATCH-TABLE* T -FORMAT-BOOLEAN-CONDITION T *WHO-LINE-STATE* T CL:BOOLE-EQV T COMPILER::*REDO-FLAG* T CL:BOOLE-NOR T -CL:BOOLE-IOR T SEDIT::FIND-STRUCTURE-BACKWARDS T CL:SXHASH T CL:BOOLE-SET T D-ASSEM::*BYTE-COUNT* T -ANALYZE T *EDIT-INPUT-WITH-TTYIN* T CL:BOOLE-XOR T *LISP-PACKAGE* T D-ASSEM::START-BYTES T -FORMAT-PRINT-NUMBER T *WHO-LINE-DIRECTORY-ENTRY* T CL:BOOLE-ORC1 T GETFILEMAP T -LITATOM-PACKAGE-CONVERSION-TABLE T D-ASSEM::+CONSTANT-OPCODES+ T FORMAT-PRINT-SMALL-CARDINAL T -CL::*DESCRIBE-PRINT-LENGTH* T \\WRITEMAP T CL:BOOLE-ORC2 T COMPILER::*PROCESSED-FUNCTIONS* T D-ASSEM::*BYTES* - T PFI.PRINT.COMMENTS T XCL:*PRINT-STRUCTURE* T TEDITSTREAM.INIT T XCL::*DECLARATIONS* T -SEDIT:*WRAP-PARENS* T COMPILER::*UNKNOWN-FUNCTIONS* T CL:DOUBLE-FLOAT-EPSILON T -CL::%DEFSTRUCT-EXPORT-OPTIONS T CL::EQLHASHBITSFN T CL:LEAST-NEGATIVE-DOUBLE-FLOAT T CHAT.IN.EMACS? T -COMPILER::ALPHA-LAMBDA T PRIME-HASHTABLE-SIZES T CL::*DESCRIBE-PRINT-LEVEL* T -\\FONTCREATE.HCPYMODE.PRESS T CL:LEAST-POSITIVE-DOUBLE-FLOAT T CMLSYMBOLS.SHARED T XCL::ED-LAST-INFO T - COMPLEX-DELETE T *REMOVE-INTERLISP-COMMENTS* T PRINT-COMPILE-HEADER T COMPILER::*VAR-NUMBER* T -COMPILER::FRAME-ANNOTATE T XCL::FIND-VARIABLE-DEFINITION T COMPILER::EFFECTLESS T -UNIXCOMM-AROUNDEXITFN T CURSORBITMAP T COMPLEX-FIND T D-ASSEM::STORE-VAR T *FORMAT-CONTROL-STRING* T -XCL::INSTALL-PROFILE T %LIT-ARRAY-TABLE T COMPILER::COMPILE-FILE-OUTSTANDING-LOOSE-FORMS T -D-ASSEM::*STACK-ENV* T COMPILER::CONVERT-TO-CL-LAMBDA T HASHTABLE-SIZE-LIMIT T CL:MAKE-HASH-TABLE T -CL:LONG-FLOAT-EPSILON T FORMAT-FUNNY-CONDITION T SPY.GRAPH.EDITOR T D-ASSEM::*HUNK-MAP* T -SIMPLE-DELETE-IF-NOT T |\\UFSOpenFile-C| T CL:LEAST-POSITIVE-LONG-FLOAT T -CL:DOUBLE-FLOAT-NEGATIVE-EPSILON T XCL::*PROFILE-VARIABLES* T CL::%LOG-QPOLY T -CL:LEAST-POSITIVE-SHORT-FLOAT T CL:EQUALP T SIMPLE-FIND-IF-NOT T D-ASSEM::*DVAR-ENV* T -\\MENU.ITEM.DESELECT T CL:MOST-NEGATIVE-FIXNUM T \\TEDIT.GET.SINGLE.CHARLOOKS T D-ASSEM::DLAMBDA-FROM-LAMBDA - T CL:LEAST-NEGATIVE-LONG-FLOAT T SI::CREATE-TRACED-DEFINITION T CL:MOST-NEGATIVE-LONG-FLOAT T -COMPILER::NULL-INTERSECTION T SEDIT::FIND-STRUCTURE T *FORMAT-ARGUMENTS* T FORMAT-UNTAGGED-CONDITION T - CL:LONG-FLOAT-NEGATIVE-EPSILON T CL::%NO-COPIER T ANALYZE-TESTS T D-ASSEM::*DCODE* T CL::FIND-SLOT T -SEDIT::COMMAND-TABLE-SPEC T CHAT.UNDERLINE.METHOD T XCL::WALK-DO/DO* T CHAT.HOST.TO.PROTOCOL T -D-ASSEM::*DTAG-ENV* T D-ASSEM::*LEVEL* T COMPILER::COMPILE-FILE-DEFINER T CL::STOP-STEPPING T -CL::*DESCRIBE-INDENT* T |compilation| T CMLSYMBOLS.FNNAMES T D-ASSEM::*FREE-VARS* T -CL:MOST-POSITIVE-DOUBLE-FLOAT T CL:MOST-POSITIVE-FIXNUM T *SPECIAL-BINDING-MARK* T CL:EQUAL T -*WHO-LINE-UPDATE-TIMER* T COLORDISPLAYP T CL:CHAR-SUPER-BIT T *UNINTERNED-PACKAGE-INDEX* T -%LIT-ARRAY-TYPES T COMPILER::*TAG-NUMBER* T FORMAT-ADD-COMMAS T CMLSYMBOLS.LAMBDA.LIST.KEYWORDS T -D-ASSEM::*HUNK-SIZE* T CL:MEMBER-IF T SI::EXPANSION-FUNCTION T |\\DSKGetFileName-C| T -|\\UFSGetFileName-C| T CMLSYMBOLS.DECLARATORS T XCL::*WHERE-IS-IGNORE-DEFINE-TYPES* T -DEFMACRO-ARG-TEST T COMPILER::*REFERENCES* T *ED-OFFERS-PROPERTY-LIST* T START.OF.PARAGRAPH? T -CL::RAW-CONSTRUCTOR T CL:MOST-NEGATIVE-SHORT-FLOAT T CMLSYMBOLS.MACROS T CMLSYMBOLS.TYPENAMES T -|\\DSKDirectoryNameP-C| T CHAT.WAIT.TIME T COMPILER::COMPILE-FILE-NAMED-PROGN T -CL:MOST-POSITIVE-LONG-FLOAT T *CHECK-ARGUMENT-COUNTS* T *PER-EXEC-VARIABLES* T -D-ASSEM::+MAX-ALLOWABLE-PVAR-COUNT+ T %EVERY-SINGLE T CL:MOST-NEGATIVE-DOUBLE-FLOAT T -*CURRENT-EXEC-TYPE* T SI::CONSTRUCT-ENTRY-PRINTING-CODE T CL:MOST-POSITIVE-SHORT-FLOAT T -CMLSYMBOLS.VARS T D-ASSEM::+SLOW-FVAR-SLOT+ T D-ASSEM::+MAX-ALLOWABLE-SPECIAL-COUNT+ T -COMPILER::EFFECTS-ANALYZE T *WHO-LINE-DIRECTORIES* T IMPORTFILESCAN T CL:CHAR-CONTROL-BIT T -XCL::*TRACED-FNS* T COMPILER::WARN-ABOUT-UNKNOWN-FUNCTIONS T *DEFAULT-PATHNAME-DEFAULTS* T -|\\UFSCloseFile-C| T COMPLEX-NSUBSTITUTE-IF-NOT T ADDTOFILEKEYLST T SEDIT::GROW-SELECTION-DEFAULT T -CL:SHORT-FLOAT-EPSILON T CL::%NO-CONSTRUCTOR T CL:SHORT-FLOAT-NEGATIVE-EPSILON T -CMLSYMBOLS.SPECIALFORMS T SI::ADVICE-FILE-DEFINITIONS T \\SFMAKEBOLD T COMPILER::COMPILE-FILE-COMPILER-LET - T *WHO-LINE-PROFILE-ENTRY* T COMPILER::GENCODE-MV-PROG1 T |\\UFSDirectoryNameP-C| T D-ASSEM::INSTALL-VAR - T CL::%LOG-PPOLY T SIMPLE-DELETE T CL:CHAR-CODE-LIMIT T \\OUTDATE T CL:LEAST-NEGATIVE-SHORT-FLOAT T -COMPILER::*STACK-NUMBER* T CL::NATURALIZE T *TOTAL-PACKAGES-LIMIT* T D-ASSEM::*PVAR-COUNT* T -SIMPLE-FIND T WHO-LINE-REDISPLAY-INTERRUPT T SIMPLE-CONDITION-FORMAT-ARGUMENTS T CL::%NO-PREDICATE T -CL:ACOS T TERM.ERASE.IN.LINE T \\BOXITEM T COMPILER::*REDOING-ANALYSIS* T D-ASSEM::*BOUND-SPECIALS* T -CL:CHAR-BITS-LIMIT T FB.EDITCOMMAND.ONEFILE T PUTCLIPBOARD T \\10MB.NOTESTAT T \\MAIKO.NEWPAGE T -COMPILER::GENCODE-LITERAL T SIMPLE-CONDITION-FORMAT-STRING T CL::%COMPARISON-OPTIMIZER T -COMPILER::*SUPPRESS-POPS* T CL::TYPE-EXPAND-NAMED-STRUCTURE T CL::FUTURE-CITIZENS-OF-XCL T -XCL::*PROFILE-NAME* T COMPILER::CLOSURE-ANNOTATE T CL:BREAK T SEDIT::NOTE-CHANGE-FORMAT T -SIMPLE-FIND-IF T XCL::*WHERE-IS-HASH-FILE-SIZE* T CL:VECTORP T FORMAT-PRINT-CHARACTER T -CL::*DESCRIBE-DEPTH* T |\\UFSGetFileInfo-C| T CL:LENGTH T CL:CHAR-FONT-LIMIT T FASL::WRITE-OP T -IRM.GET.DINFOGRAPH T |\\UFSGetSize-C| T SIMPLE-DELETE-IF T \\DOGC T START.CLEARINGHOUSE T DRIBBLEFILE -T COMPILER::COMPILE-FILE-MACROLET T COMPILER::FIND-AND-PERFORM-RPLCONS-TRANSFORM T D-ASSEM::REACH-TAGS - T CL:ASSOC-IF-NOT T XCL::*IN-DEFINER* T DEFAULTSUBITEMFN T COMPILER::*BLOCK-STACK* T -COMPILER::CHECK-FOR-UNKNOWN-FUNCTION T D-ASSEM::*ENDING-DEPTH* T XCL::*DEFINITION-PROTOTYPES* T -CL:ASSOC-IF T COMPILER::EFFECTS-REPRESENTATION T COMPILER::*SPECIAL-LOCALS-BOUND* T CL::%RANDOM-SIZE T - CL:ASIN T PRETTYPRINT1 T COMPILER::META-SUBST T TB.UNDOSELECTION T \\INSERTPIECE T \\DOGC1 T -CL::%DEFSTRUCT-OPTIONS T %ARRAY-ELEMENT-INITIALIZE T SETTAIL? T CL::%COMPLEX-RASSOC T -|\\UFSWritePages-C| T CL::TYPE-EXPAND-STRUCTURE T D-ASSEM::*JUMP-LIST* T COMPLEX-NSUBSTITUTE T -SEDIT::EXTEND-SELECTION T COMPILER::FRAME-ANNOTATE-VAR-REF T \\10MB.RESTART.ETHER T XCL::STRUNCATE T -COMPILER::GENCODE-LAMBDA T CL:RASSOC-IF-NOT T *NOT-YET-EVALUATED* T SIMPLE-FORMAT T CL:CLEAR-OUTPUT T -XCL::*WHERE-IS-CASH-FILES* T \\UFS.CREATE.PROPS T CL:RASSOC-IF T FORMAT-CAPITALIZATION T -COMPILER::*SPECIAL-VENV* T FIND-KEYWORD T D-ASSEM::+JUMP-SIZES+ T FORMAT-ESCAPE T SPLITFILE T -FASL::END-TEXT T CL::%SIMPLE-RASSOC T DAYTIME T COMPILER::EFFECTS-ANALYZE-LIST T %FAT-STRING-ARRAY-P T - D-ASSEM::+JUMP-CHOICES+ T CL:COS T COMPILER::*TAGBODY-STACK* T \\DORECLAIM T D-ASSEM::+JUMP-RANGE-SIZE-MAP+ - T *WHO-LINE-TTY-PROC-ENTRY* T NILL T %TOTAL-SIZE T |\\UFSSetFileInfo-C| T CL:NREVERSE T -*THIS-EXEC-COMMANDS* T |\\UFSReadPages-C| T *CURRENT-EVENT* T CL:CHAR-META-BIT T CL:REVERSE T -FORMAT-DOLLARS T DOSELECTEDITEM T CL:MEMBER-IF-NOT T CL:CONJUGATE T XCL::WALK-COMPILER-LET T -COMPILER::*MADE-CHANGES* T CL::%LOGCOUNT T COMPLEX-NSUBSTITUTE-IF T MSTYPEMATCHRATING T -COMPILER::*NEED-STORAGE* T CL::%DEFAULT-SLOT-TYPE T FB.COPY/RENAME.ONE T *EXEC-ID* T *APPLYHOOK* T -COMPILER::FIND-ALL-TAGS T WHEN-WHO-LINE-SELECTED-FN T CL::*SKIP-APPLYHOOK* T -\\DSKDISPLAY.DESTROY.WINDOW T D-ASSEM::*LOCAL-FN-FIXUPS* T SEDIT::PARSE-INDENT-GROUP-ONE T ADVISEDFNS -T FASL::END-BLOCK T CL:CHAR-HYPER-BIT T |\\UFSReadDir-C| T COMPILER::*PC-VAR* T FASL::END-MARK T -EDITCOMS T \\CLEAROFD T CHAT.ALLHOSTS T GETCLIPBOARD T FASL::END-OF-DATA-MARK T CHATWINDOW T -CL:ARRAY-DIMENSION-LIMIT T SEDIT::STRINGIFY-GAP T |\\TopLevelTtyWindow| T FASL::CHECK-TABLE-SIZE T CL:* - T XCL:FALSE T CL::*SKIP-EVALHOOK* T COMPILER::BINDING-TO-LAMBDA T ASSERT-FAIL T FASL::FASL-EXTENDED T - COMPLEX-REMOVE-IF T |\\UFSFinishFileInfo-C| T \\MKATOM.FULL T CL:GETF T CL::%MAPLIST-SINGLE T -*EXEC-MAKE-UNDOABLE-P* T COMPILER::COMPILE-DEFINER-OUTSTANDING-LOOSE-FORMS T \\PROC.REPEATEDLYEVALQT T - COMPLEX-REMOVE-IF-NOT T COMPILER::*AUTOMATIC-SPECIAL-DECLARATIONS* T *DEBUGGER-MENU-ITEMS* T -FASL::VERSION-RANGE T CL:LAMBDA-PARAMETERS-LIMIT T *DEBUGGER-ENTRY-POINTS* T CL:BIT-AND T -CLOSECHATWINDOWFLG T *EVALHOOK* T CHAT.EMACSCOMMANDS T *WHO-LINE-SHOW-ACTIVE-ENTRY* T SPYOBJ.BUTTON T -CL::%MAPC-SINGLE T XCL:*SHORT-SITE-NAME* T \\LOCKEDPAGEP T XCL:*LONG-SITE-NAME* T *TRACE-DEPTH* T -CL::%DEFAULT-STRUCTURE-INCLUDE T CL:BIT-ANDC2 T CL:DIRECTORY-NAMESTRING T *PREFERRED-READING-SYMBOLS* -T COMPILER::*TAG-LOCATION-TABLE* T UPDATE-WHO-LINE T FORMAT-TAB T CL:LAMBDA-LIST-KEYWORDS T -COMPILER::COMPILE-FILE-PACKAGE-FORM T COMPILER::*NON-LOCALS* T FASL:DUMP-FUNCALL T CL:BIT-EQV T -FASL::VALUE-TABLE-INCREMENT T \\IDLE.WAIT T COMPILER::EFFECTS-ANALYZE-ANY-CALL T DEFAULTCHATHOST T -FASL::*VALUE-TABLE* T FORMAT-GENERAL-FLOAT T COMPILER::COMPILE-DEFINER-NAMED-PROGN T CL:BIT-ANDC1 T -CL:EXP T CL::*GENSYM-COUNTER* T CL:BIT-IOR T FASL::*CURRENT-OPTABLE* T CL::%MAPCAR-SINGLE T -SEDIT::PARSE--QUOTE T CL::%MAPL-SINGLE T FASL::INITIAL-VALUE-TABLE-SIZE T CL:CALL-ARGUMENTS-LIMIT T -CL:GET-PROPERTIES T CL::*GENTEMP-COUNTER* T |\\UFSNextFile-C| T FASL::DEBUG-STREAM T CL::%MAPCAN-SINGLE - T CL:ARRAYP T *DOCUMENTATION-HASH-TABLE* T FASL:PROCESS-BLOCK T COMPILER::*TAG-EQUIV-TABLE* T -CHAT.WINDOW.REGION T MSEAT T FORMAT-GENERAL-AUX T *WHO-LINE-READTABLE-ENTRY* T FORMAT-FIND-COMMAND T -FASL::*BLOCK-LEVEL* T CL:BIT-NAND T XCL:*TRACE-VERBOSE* T \\ICONW.COPYBUTTONEVENTFN T CL:BIT-NOR T -FASL::DEBUG-READER T SIMPLE-NSUBSTITUTE-IF T \\SFMAKEROTATEDFONT T PFI.OUTCHARFN T -\\SFROTATEFONTCHARACTERS T CL::%MAPCON-SINGLE T CL::%EXP-TABLE T XCL:*TRACE-LEVEL* T -SEDIT:SAVE-WINDOW-REGION T SIMPLE-NSUBSTITUTE-IF-NOT T XCL:*TRACE-LENGTH* T FORMAT-INDIRECTION T -CL::%DEFAULT-DEFSTRUCT-TYPE T CL:BIT-ORC2 T COMPILER::BIND-PARAMETER T EXEC-READ T -COMPLEX-COUNT-IF-NOT T CHAT.DISPLAYTYPES T CL:BIT-ORC1 T CHAT.WINDOW.SIZE T COMPILER::COMPILE-FILE-DECLARE\: - T CL::*GENSYM-PREFIX* T \\CLOCK0 T CL:BIT-XOR T \\SFFIXOFFSETSAFTERROTATION T COERCE-TO-NSADDRESS T -CL:FLOAT-RADIX T COMPLEX-REMOVE T COMPILER::*OTHERS* T \\LOADVMEMPAGE T CL:EXPT T SEDIT::INTERNAL-WRAPPERS - T %BROADCAST-STREAM-DEVICE-CLOSEFILE T ANALYZE-AUX T *PACKAGE* T FORMAT-GET-PARAMETER T -VRULE.WHENOPERATEDONFN T COMPILER::*NEW-COMPILER-IS-EXPANDING* T *WHO-LINE-ACTIVE-PERIOD* T COMP.IF T -SIMPLE-REMOVE-IF-NOT T \\CHANGECHARSET.IP T SEDIT:*WRAP-SEARCH* T SEDIT::RELEASE-OPEN-STRING T -CL::%EXP-POLY T COURIER.VERSION# T |\\VFMClearBuffers| T COMPILER::*COPY-NODE-TABLE* T -COMPILER::*REACHABLE-TAG-TABLE* T PERIODICALLY-UPDATE-WHO-LINE T FORMAT-SKIP-ARGUMENTS T %TWOD-ARRAY T - \\NSRANDOM.PROCEEDABLE.ERROR T BRKCOND T *CONDITION-HANDLER-BINDINGS* T SI::VOWEL-P T -SEDIT::*FORMAT-ALIAS-DEPTH-LIMIT* T \\ELIDE.TAIL.STRING T *KEY-FINDER* T COMPILER::RELEASE-TREE T -SI::CREATE-ADVISED-DEFINITION T *INTERLISP-PACKAGE* T FASL:DUMP-VALUE T \\POSTSCRIPT.CHANGECHARSET T -FASL:VALUE-DUMPABLE-P T \\PUPLEVEL1STATE T UPDATECHANGED T WRITECALLSUBRS T RESETINT T CL:CONSTANTP T -REDISPLAY-WHO-LINE T RESETTERMCHARS T %GENERAL-ARRAY T COMPILER::*FREE-VENV* T SHOWDISPLAY T -CL::STRUCTURE-FUNCTIONS T \\RESETSTACK T FIND-EXACT-SYMBOL T UNIX-WRITE T FASL:SKIP-TEXT T -SETREADMACROFLG T COMPILER::COMPILE-DEFINER-DEFINER T COMPILER::ALPHA-MV-CALL T THIS.PROCESS T -\\UFSCHDIR-C T \\DUMMYTELERAID T SETSCREENCOLOR T CL:HOST-NAMESTRING T APROPOS-SEARCH T -SIMPLE-NSUBSTITUTE T \\DOTELERAID T COMPILER::COMPILE-FILE-DEFCONSTANT T \\TYPE.FROM.FILETYPE T -CL:GET-UNIVERSAL-TIME T BRKPOS T FASL:READ-TEXT T TAILP T COMPLEX-COUNT-IF T \\DIRTYBACKGROUND T -\\CODEFORTFRAME T RETYPE.BUFFER T *READ-SUPPRESS* T \\COPYSYS0SUBR T FASL::DUMP-STRING T FASL:SIGNATURE - T COMPILER::*LOOSE-NAME* T COMPLEX-SUBSTITUTE-IF-NOT T \\REPEATEDLYEVALQT T SEDIT:GET-WINDOW-REGION T - CL:IMAGPART T \\LISPFINISH T SIMPLE-ARRAY-P T CL:APPEND T \\CHARHI T \\GETPACKETBUFFER T -SIMPLE-COUNT-IF-NOT T \\TEDIT.FIXCHANGEDPART T FORMAT-EXPONENTIAL T COMPILER::EFFECTS-ANALYZE-TAGBODY -T *SHORT-BACKTRACE-FILTER* T PFI.HANDLE.DECLARE T SEDIT::DISPLAY-SELECTION T SEDIT::PREV-NODE T -COMPILER::COPY-NODES T *STANDARD-INPUT* T COMPILER::*CURRENT-FRAME* T XCL::ADD-LABELS/FLET-ENVIRONMENT - T COMPILER::TEST-GENCODE1 T XCL:*CURRENT-CONDITION* T *WHO-LINE-UPDATE-INTERVAL* T SEDIT:*EDIT-FN* T -TEDIT.SINGLE.PAGEFORMAT T CL:LISP-IMPLEMENTATION-TYPE T \\DSPRATE T STRING-ARRAY-P T FIND-EXEC-COMMAND - T COMPILER::*LAP-FLG* T XCL::*WHERE-IS-CASH-SIZE* T FASL:DUMP-FUNCTION-DEF T COMPLEX-COUNT T -\\MOREVMEMFILE T CL:SIMPLE-STRING-P T FLTFMT T BRKEXP T \\IRM.AROUND-EXIT T COMPILER::GENCODE T -*DEFAULT-DEFAULT* T MBUTTON.SET.NEXT.BUTTON.STATE T MODERNWINDOW.SETUP T SI::*BACKQUOTE-LEVEL* T -TEDIT.GETINPUT T FASL::DOTTED-LIST-LENGTH T COMPILER::*FRAME-NAME* T *DEFAULT-PUSH-EXTENSION-SIZE* T -ABS T XCL::ADD-MACROLET-ENVIRONMENT T UNIX-KILL T \\TEDIT.SCROLLFN T DSPBOUT T |MaxBkMenuWidth| T -CL:STRINGP T %CTX-ARG-NAME T CL:LISTP T CL:DENOMINATOR T |\\UFSGetFreeBlock-C| T \\READRAWPBI T NIL -RECORD WOVERLAPP (WINDOW) TB.SHOW.SELECTION (TABLEBROWSER) GN/BOTTOM (GRAPHNODE) TEDIT.COPY.PARALOOKS -(PIECE SELECTION) FUNCTION.WRAPPER (READTABLEP) \\HARDRESET-CLEANUP1 (FX FNHEADER PVARSLOT) -\\TEDIT.SCALEREGION (REGION) TWODINSPECT.REPAINTFN (REGION) \\PS.SCALEREGION (REGION) -\\FM.TOGGLE-DOWNFN (FREEMENUITEM REGION) FB.THINCOMMAND (FILEBROWSER FBFILEDATA) |\\VAMFindFreePages| -(|LogicalVolumeDescriptor| |PageGroup|) SEDIT::INSPECT-SELECTION (SEDIT::EDIT-CONTEXT) -\\HCPYMODEBLTCHAR (\\DISPLAYDATA) ADD.BORDER.TO.BITMAP (BITMAP) \\OUTCHARFN.PRESS (STREAM REGION) -\\DSPROTATE.PSC (STREAM \\POSTSCRIPTDATA) CLEARHASHFILES (|HashFileEntry| |HashFile|) \\DISABLEGC1 ( -MDSTYPEWORD) \\HARDRESET-CLEANUP (FNHEADER) \\TEXTSTREAMBOUT (TEXTSTREAM TEXTOBJ REGION PIECE STREAM -STRINGP ARRAY-HEADER) TEDIT.GETSEL (TEXTOBJ TEXTSTREAM) \\DORETCALL (IFPAGE FX FSB) MB.SHOWSELFN ( -IMAGEBOX) \\TEDIT.REPAINTFN (TEXTOBJ REGION LINEDESCRIPTOR) SCALEPAGEUNITS (TEDITPAPERSIZE) -TWODINSPECT.BUTTONEVENTFN (TWOD.SELECTION) \\SWITCHFONTS.PSC (\\POSTSCRIPTDATA PSCFONT FONTDESCRIPTOR -FONTID) \\GC.MODIFY.BIGREFCNT (GC) TB.SELECT.ITEM (TABLEITEM) DISPLAYLINK/TB (GRAPHNODE) -TEDIT.COPY.LOOKS (PIECE SELECTION) SEDIT::OPEN-LITATOM (STRINGP ARRAY-HEADER GENERAL-ARRAY) -FB.HARDCOPY.MAXWIDTH (FBFILEDATA) \\DRAWARC.PSC (STREAM \\POSTSCRIPTDATA) \\INITSPP (FDEV) -\\GC.ENTER.BIGREFCNT (GC) \\NSGATELISTENER (NSROUTINGINFO) RESET (FX FNHEADER) \\FM.TOGGLE-SETUP ( -FREEMENUITEM) \\VECPUT (STREAM) \\PUTONSCREENW (REGION WINDOW SCREEN) \\SENDLEAF (STREAM LEAFSTREAM -LEAFPACKET LEAFDATA SEQUIN LEAFERRORDATA) SUBSTRING (LITATOM STRINGP ARRAY-HEADER GENERAL-ARRAY) -\\SHOWMENULABEL (REGION MENU BITMAP) SEDIT::INSERT-SPECIAL-CHARACTER (SEDIT::EDIT-NODE) -\\SLOWHCPYMODEBLTCHAR (STREAM FONTDESCRIPTOR \\DISPLAYDATA PILOTBBT BITMAP CHARSETINFO) -\\GETPILOTBBTSCRATCHBM (BITMAP) MKSTRING (LITATOM) \\PRESSINIT (IMAGEOPS STREAM) SEDIT::INSERT-MULTI-ESCAPE - (SEDIT::EDIT-NODE) \\GCMAPSCAN (GC HTCOLL) SETUPFONTS.PRESS (STREAM) \\GCMAPUNSCAN (GC HTCOLL) -ALLOCSTRING (ARRAY-HEADER GENERAL-ARRAY STRINGP) \\ALLOCVIRTUALPAGEBLOCK (IFPAGE) STRPOS (LITATOM -STRINGP ARRAY-HEADER ARRAYP) TEDIT.SEL.AS.STRING (TEXTSTREAM TEXTOBJ SELECTION) \\SET.STORAGE.STATE ( -IFPAGE) \\DSPRIGHTMARGIN.IP (STREAM) \\FREELISTCELL (POINTER CONSPAGE) ADJUSTLINE.AND.RESTORE (LINE) -GN/LEFT (GRAPHNODE) \\IMAGEUSERPROP (IMAGEOBJ) SEDIT::INSERT-STRING (SEDIT::EDIT-SELECTION) -MARGINBAR.CREATE (MARGINBAR REGION) NTHCHARCODE (STRINGP ARRAY-HEADER LITATOM) \\INSERT.FIRST.PIECE ( -TEXTOBJ PIECE) \\TEDIT.FORMAT.FOOTNOTE (LINEDESCRIPTOR TEXTOBJ PAGEFORMATTINGSTATE REGION) FB.ADD.FILE - (FBFILEDATA FILEBROWSER) GETHOSTINFO (HOSTS.TXT.ENTRY) \\ONSCREENW (SCREEN WINDOW REGION) -TWODINSPECT.COPYBUTTONFN (TWOD.SELECTION) HARDCOPYW (REGION SCREENREGION BITMAP) \\UFS.RECOGNIZE.FILE -(FDEV) \\TEDIT.CONVERT.TO.FORMATTED (TEXTOBJ PIECE) REFLECT/GRAPH/DIAGONALLY (GRAPH GRAPHNODE) -\\DSPTRANSLATE.PSC (STREAM \\POSTSCRIPTDATA REGION) \\EQREFCNT1 (MDSTYPEWORD POINTER GC) -WORD.MATCHES.BUFFER (CHARTABLE) \\EXTENDEDVMEMINIT (IFPAGE) TEDIT.GET.LOOKS (CHARLOOKS TEXTOBJ PIECE -SELECTION) OPT.FRAMEDEL (FRAME TAG) FIND.MATCHING.QUOTE (CHARTABLE) \\FM.MOMENTARY-SETUP (FREEMENUITEM -) \\LEAF.CLOSEFILE (LEAFSTREAM SEQUIN STREAM LEAFDATA) ADDTOFILES? (FILEPKGTYPE) SEDIT::INPUT-TOKENDELIM - (SEDIT::EDIT-CONTEXT SEDIT::EDIT-SELECTION) \\STRINGWIDTH.HCPYMODE (\\DISPLAYDATA) \\STARTPAGE.PRESS -(STREAM) OPENBSPSTREAM (BSPSOC) RIGHTW.ADJUSTSELECTION (ONED.SELECTION) TEDIT.HARDCOPY-COLUMN-END ( -LINEDESCRIPTOR TEXTOBJ FMTSPEC PAGEFORMATTINGSTATE REGION) EQUAL.CH.NAMES (NSNAME) -TEDIT.DEFAULT.MENUFN (TEXTOBJ SELECTION) COURIER.REP.LENGTH (STRINGP ARRAY-HEADER) \\FIXILINES ( -TEXTOBJ SELECTION LINEDESCRIPTOR) SWITCH/NODE/HEIGHT/WIDTH (GRAPHNODE) ORDERFROMBOTTOMTOTOP (SCREEN -WINDOW) TB.BOTTOM.OF.ITEM (TABLEBROWSER TABLEITEM) GN/TOP (GRAPHNODE) \\REFCNT (MDSTYPEWORD POINTER GC -) POSTSCRIPT.SET-FAKE-LANDSCAPE (STREAM \\POSTSCRIPTDATA REGION) SEDIT::INSERT-LITATOM ( -SEDIT::EDIT-SELECTION) FNTYP (LITATOM DEFINITIONCELL COMPILED-CLOSURE) \\TEDIT.PROMPT.PAGEFULLFN ( -REGION) BITMAPBIT (BITMAP STREAM \\DISPLAYDATA) TEDIT.UPDATE.SCREEN (TEXTOBJ LINEDESCRIPTOR) -REFLECT/GRAPH/HORIZONTALLY (GRAPH GRAPHNODE) TEDIT.GETPOINT (TEXTOBJ SELECTION) SETF-SYMBOL-PACKAGE ( -CL:SYMBOL PNAMECELL) GN/RIGHT (GRAPHNODE) POSTSCRIPT.STARTPAGE (STREAM \\POSTSCRIPTDATA) -\\ADVANCE.STORAGE.STATE (IFPAGE) BLTCHAR (STREAM) \\DSPPUSHSTATE.PSC (STREAM \\POSTSCRIPTDATA) ASKUSER - (OPTIONS ASKUSER) TEDIT (TEXTOBJ) \\DSPCLIPTRANSFORMX (\\DISPLAYDATA) BACKSKREAD (CHARTABLE) -NSNETDAYTIME0 (PACKETEXCHANGEXIP) \\SLOWBLTCHAR (STREAM FONTDESCRIPTOR \\DISPLAYDATA PILOTBBT BITMAP -CHARSETINFO) PFI.MAKE.LPT.STREAM (REGION) \\OPENLINEBUF (STREAM) \\DSPCLIPTRANSFORMY (\\DISPLAYDATA) -\\DSPPRINTCR/LF (STREAM \\DISPLAYDATA FONTDESCRIPTOR REGION) TB.NORMALIZE.ITEM (TABLEBROWSER REGION) -\\CHANGECHARSET.DISPLAY (CHARSETINFO) SEDIT::RESHAPEFN (REGION) TB.FINISH.CLOSE (TABLEBROWSER) -FB.SEEFULLFN (MENU REGION) |\\SFFixY| (\\DISPLAYDATA BITMAP CHARSETINFO) D-ASSEM:INTERN-DCODE ( -FNHEADER) OVERLAPPINGWINDOWS (SCREEN WINDOW) \\FM.CLEARITEM (FREEMENUITEM REGION) CREATEW ( -SCREENREGION REGION SCREEN) SEDIT::INPUT-STRINGDELIM (SEDIT::EDIT-CONTEXT) \\MAIKO.SET.STORAGE.STATE ( -IFPAGE) RIGHTW.BUTTONEVENTFN (ONED.SELECTION) GROW/REGION (REGION) AIN (STRINGP ARRAY-HEADER ARRAYP) -USERNAME (IFPAGE) MB.DEFAULTBUTTON.ACTIONFN (TEXTOBJ SELECTION) TB.FIND.PREVIOUS.TAIL (TABLEBROWSER -TABLEITEM) SEDIT::HASFAT (STRINGP ARRAY-HEADER) \\TELERAIDSERVER (VP VMEMFLAGS POINTER) SETUSERNAME ( -IFPAGE) \\TEDIT.LOOKS.UPDATE (TEXTSTREAM PIECE CHARLOOKS ARRAYP FONTCLASS FMTSPEC LINEDESCRIPTOR) AOUT - (STRINGP ARRAY-HEADER ARRAYP) \\SHOWSEL (SELECTION TEXTOBJ LINEDESCRIPTOR) REPLACEFIELD (FIXP) -TEDIT.STRINGWIDTH (STRINGP ARRAY-HEADER) SET/LAYOUT/POSITION (GRAPHNODE) \\FIXLINELENGTH.IP (STREAM) -FEQP (FIXP FLOATP) OPT.FRAMELOCAL (FRAME) TEXTUREP (BITMAP) SET/LABEL/SIZE (GRAPHNODE IMAGEBOX) -\\FM.INSUREVISIBLE (REGION) INVERT.TEXTURE.BITMAP (BITMAP) DISPLAYLINK/LR (GRAPHNODE) SEDIT::INPUT-QUOTE - (SEDIT::EDIT-NODE) \\COERCEFONTDESC (FONTDESCRIPTOR FONTCLASS WINDOW STREAM IMAGEOPS) -REFLECT/GRAPH/VERTICALLY (GRAPH GRAPHNODE) TEDIT.\\INSERT (STREAM TEXTSTREAM SELECTION TEXTOBJ) -\\ACTONDISKPAGES (STREAM ARRAYP IFPAGE) TB.RENUMBER.TAIL (TABLEBROWSER) |\\VFMSaveBuffer| (\\BTREEBUF) - PFI.SETUP.TRANSLATIONS (STREAM) IMAGEFNSP (IMAGEFNS) \\PNC (STRINGP ARRAY-HEADER GENERAL-ARRAY) -TERMTABLEP (TERMTABLEP) INTERPRESSBITMAP (REGION BITMAP) PARSE.NSNAME (NSNAME) \\DISKERROR (DSKOBJ) -MB.SELFN (SELECTION) \\SETETHERFLAGS (IFPAGE) \\TEDIT.HCPYLOOKS.UPDATE (TEXTSTREAM PIECE CHARLOOKS -ARRAYP FONTCLASS) \\DOACTONDISKPAGES (CB) ARRAYTYP (ARRAYP) OPENPOSTSCRIPTSTREAM (STREAM -\\POSTSCRIPTDATA REGION) \\DSPPOPSTATE.PSC (STREAM \\POSTSCRIPTDATA POSTSCRIPTXFORM) ARRAYORIG (ARRAYP -) \\CLEARMAP (FDEV) \\WRITEDISKPAGES (STREAM ARRAYP IFPAGE) |\\PFRoomForFile| (|PageGroup| -|FileDescriptor|) SETD (ARRAYP) \\WRITEPAGES (FDEV) SEDIT:RESET-COMMANDS (SEDIT::EDIT-ENV) SETY.PRESS -(STREAM) \\DOWRITEDISKPAGES (CB) REHASH (HARRAYP HASHSLOT) TEDIT.HARDCOPY.PAGEHEADING (TEXTSTREAM -PIECE LINEDESCRIPTOR) IRM.DISPLAY.CREF (REGION) \\READPAGES (FDEV) TB.UPDATE.DISPLAY (TABLEBROWSER -REGION) \\TEDIT.MARKINACTIVE (TEXTOBJ) ELTD (ARRAYP) \\MEDW.BITBLT (STREAM SCREEN WINDOW \\DISPLAYDATA -) SEDIT::PLACE-CARET-AND-SELECTION (SEDIT::LINE-START) TOPWP (SCREEN WINDOW) EXCHANGEXIPS (XIP) -\\SEQUIN.HANDLE.ACK (SEQUIN SEQUINPACKET) PFI.COLLECT.DEFINERS (PFITYPE) HARRAYP (HARRAYP) CL:READ-CHAR - (FDEV STREAM) \\SPP.DUPLICATE.REQUEST (FDEV SPPXIP SPPSTREAM SPPCON) TXTFILE (TEXTOBJ) LRSH (FIXP) -STKNTHNAME (FX FNHEADER) \\NSFILING.ADDQUOTES (STRINGP ARRAY-HEADER) ADD-SYMBOL (CL:SYMBOL) -NUKE-SYMBOL (STRINGP ARRAY-HEADER) SUBARRAY (ARRAYP) RESHAPEALLWINDOWS (REGION RESHAPINGWINDOWDATA) -TEDIT.QUIT (STREAM TEXTSTREAM TEXTOBJ) LAYOUT/POSITION (GRAPHNODE) \\CLIPLINE (REGION) TB.PRINT.LINE ( -TABLEBROWSER TABLEITEM) DISPLAYNODELINKS (GRAPH) \\TEDIT.MARKACTIVE (TEXTOBJ) \\DSPCLIPPINGREGION.IP ( -STREAM INTERPRESSDATA) FB.CLOSE&EXPUNGE (MENU FILEBROWSER) FB.ANALYZE.PATTERN (FILEBROWSER) -TEDIT.SKIP.SPECIALCOND (TEXTSTREAM PIECE LINEDESCRIPTOR) DINFO.UPDATE (DINFOGRAPH) \\FM.CHANGELABEL ( -REGION FREEMENUITEM) \\ENDVECRUN (STREAM) \\DODISKCOMMAND (DSKOBJ CB) |\\VAMRecomputeFreePageCount| ( -|LogicalVolumeDescriptor|) \\SEQUIN.FLUSH.RETRANSMIT (SEQUIN) \\SETEOF (BYTEPTR) SEDIT::INPUT-DOT ( -SEDIT::EDIT-SELECTION) SETX.PRESS (STREAM) \\CLEANUPDISKQUEUE (DSKOBJ) CLRHASH (HASHSLOT HARRAYP) -FB.CHECK.NAME.LENGTH (FBFILEDATA FILEBROWSER) ONEDINSPECT.REPAINTFN (REGION) \\GETWINDOWHEIGHT (REGION - WINDOW SCREEN) MAPHASH (HASHSLOT HARRAYP) \\TEDIT.MOVE.PIECEMAPFN (PIECE TEXTOBJ) TB.ITEM.UPDATABLE? -(TABLEBROWSER) SCALE/GRAPH (GRAPH GRAPHNODE) SEDIT::LESS-PROMPT-WINDOW (REGION) SEDIT::ATOM-CHAR-ESCAPED - (READTABLEP READCODE CHARTABLE) FB.NAMES.DECREASING.VERSION (FBFILEDATA) TEXTUREOFCOLOR (RGB) -SEDIT::LINEAR-ITEM-WIDTH (SEDIT::STRING-ITEM) \\TFBRAVO.INSTALL.PAGEFORMAT (TEXTOBJ TFBRAVOPAGEFRAMES) - \\HASHACCESS (HARRAYP HASHSLOT) \\FM.HIGHLIGHTITEM (FREEMENUITEM REGION) SHOWRECTANGLE.PRESS (STREAM) - HARRAYPROP (HARRAYP) \\PUNT.BLTSHADE.BITMAP (BITMAP REGION PILOTBBT) \\STORAGE.TYPE (HUNKSTAT -CONSPAGE) \\BITBLT.BITMAP.SLOW (BITMAP REGION PILOTBBT) \\STORAGE.HUNKTYPE (HUNKSTAT) \\FM.DISPLAYITEM - (FREEMENUITEM REGION) |\\VFMDeletePageGroup| (|FileDescriptor| |PageGroup| |Key| |Interval|) -EXPANDBITMAP (BITMAP) APPENDIDENTIFIER.IP (STRINGP ARRAY-HEADER) \\MAKE.PMAP.DEVICE (FDEV) -\\PUNT.BITBLT.BITMAP (BITMAP REGION PILOTBBT) \\GETWINDOWWIDTH (REGION WINDOW) \\CHECKFREEPAGE (CB -DSKOBJ) DSPSOURCETYPE (STREAM PILOTBBT) \\PAGEDSETFILEPTR (BYTEPTR) TB.SHOW.DELETION (TABLEBROWSER) -\\PAGED.SETEOFPTR (BYTEPTR) SEDIT::COPY-STRUCTURE-STRING (SEDIT::BROKEN-ATOM) ICONW.PRINT-JUSTIFIED ( -REGION) \\DOFORMATTING.HARDCOPY (LINEDESCRIPTOR THISLINE TEXTOBJ ARRAYP) \\HASHRECLAIM (HARRAYP -HASHSLOT) \\TEDIT.HCPYFMTSPEC (FMTSPEC) PUTHASHTEXT (|HashFile| |HashTextPtr|) DSPXOFFSET (IMAGEOPS -STREAM) DSPYOFFSET (IMAGEOPS STREAM) \\STRINGWIDTH.PRESS (STREAM CHARSETINFO LITATOM PNAMEBASE -READTABLEP STRINGP ARRAY-HEADER) |\\VAMFreePageGroup| (|PageGroup| |FileDescriptor| -|LogicalVolumeDescriptor|) \\HASHTABLE.DEFPRINT (READTABLEP) DSPCREATE (BITMAP) \\PARTEND.PRESS ( -STREAM) |\\SFFixDestination| (\\DISPLAYDATA PILOTBBT BITMAP) ONEDINSPECT.COPYBUTTONFN (ONED.SELECTION) - \\STRINGHASHBITS-UFN (STRINGP ARRAY-HEADER LITATOM PNAMEBASE) ONEDINSPECT.BUTTONEVENTFN ( -ONED.SELECTION) \\PAGEDREADP (CHARTABLE STREAM) \\STRING-EQUAL-HASHBITS-UFN (STRINGP ARRAY-HEADER -LITATOM PNAMEBASE) PRINTDISPLAYNODE (GRAPHNODE) \\TEDIT.UPDATE.SHOWSEL (SELECTION TEXTOBJ -LINEDESCRIPTOR) |\\SFFixFont| (\\DISPLAYDATA BITMAP FONTDESCRIPTOR) INTERSECT/REGIONP/LBWH (REGION) -\\FIXCODENUM (ARRAYP) DISPLAYGRAPH (POSITION GRAPH GRAPHNODE) SETUPFONTS.IP (STREAM) -|\\SFFixClippingRegion| (\\DISPLAYDATA REGION BITMAP) CHCON (LITATOM STRINGP ARRAY-HEADER) -\\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (STREAM FDEV) \\VANILLAHOSTNAMEP (FDEV) \\SWAPDISKERROR ( -DSKOBJ) \\SFFIXLINELENGTH (STREAM \\DISPLAYDATA) UNPACK (LITATOM STRINGP ARRAY-HEADER) CL:APROPOS ( -STRINGP ARRAY-HEADER) \\SEQUIN.CLEANUP (SEQUIN) \\CHECKARRAYBLOCK (ARRAYBLOCK) \\ALLOCBLOCK.OLD ( -ARRAYBLOCK) CL:APROPOS-LIST (STRINGP ARRAY-HEADER) \\ALLOCBLOCK.NEW (POINTER) SEDIT::SHIFT-STRING ( -STRINGP ARRAY-HEADER) \\ALLOCHUNK (POINTER) DCHCON (LITATOM STRINGP ARRAY-HEADER) \\FIXCODEPTR (ARRAYP -) BKLINBUF (CHARTABLE) MSCHECKBLOCKS (MSANALYZABLE) \\MAIKO.ALLOCBLOCK (ARRAYBLOCK) \\GETFBB ( -BOUNDINGBOX) DUNPACK (LITATOM STRINGP ARRAY-HEADER) \\CLOSELINE (LINEBUFFER) MSSHOWUSE (MSSETPHRASE) -\\MAKEFREEARRAYBLOCK (ARRAYBLOCK) \\ACCHARIMAGELIST (BOUNDINGBOX) \\TEDIT.NSCHAR.RUN (TEXTOBJ PIECE) -COPYHASHFILE (|HashFile|) CHECK-SYMBOL-NAMESTRING (STRINGP ARRAY-HEADER) \\MERGEFORWARD (ARRAYBLOCK) -OPT.CODEFRAME (TAG) \\ACCHARWIDTHLIST (FONTBOUNDINGBOX) FB.HANDLE.ABORT.BUTTON (FILEBROWSER) -\\IDLE.IS.PREVIOUS (IFPAGE) \\LINKBLOCK (ARRAYBLOCK) \\FACECODE (FONTFACE) MB.BUTTONEVENTINFN ( -SELECTION) \\RESETLINE (LINEBUFFER) SEDIT::START-PROCESS (SEDIT::EDIT-CONTEXT) \\MERGEBACKWARD ( -ARRAYBLOCK) SEDIT::INPUT-NORMAL-CHAR (SEDIT::EDIT-CONTEXT SEDIT::EDIT-NODE) TB.FIRST.VISIBLE.ITEM# ( -TABLEBROWSER REGION) \\TEXTTTYBOUT (TEXTSTREAM TEXTOBJ CHARTABLE STREAM) ALPHORDER (LITATOM STRINGP -ARRAY-HEADER ARRAYP) TEXTSTREAMP (TEXTOBJ TEXTSTREAM) INTEGERLENGTH (FIXP) \\SEQUIN.RETRANSMITNEXT ( -SEQUIN SEQUINPACKET) PACKC (STRINGP ARRAY-HEADER) SPP.DSTYPE (SPPCON SPPXIP) \\SAVELINEBUF (LINEBUFFER - FDEV STREAM STRINGP ARRAY-HEADER) COPYHASHITEM (|HashTextPtr| |HashFile|) OPT.CODELEV (TAG FRAME) -\\FM.PUTITEMPROP (FREEMENUITEM) \\INCPARENCOUNT (LINEBUFFER) WYOFFSET (REGION) \\PREFIXALIGNMENT? ( -POINTER) REMWINDOWPROP (WINDOW) LINKPARAMETERS (GRAPHNODE) PACK (STRINGP ARRAY-HEADER) -\\FM.GETITEMPROP (FREEMENUITEM) \\SETBRUSH.IP (BRUSH) \\PACK.ITEM (STRINGP ARRAY-HEADER) -\\DELETEBLOCK? (ARRAYBLOCK) DISPLAY/NAME (GRAPHNODE) CONVERT-LITATOM (CL:SYMBOL STRINGP ARRAY-HEADER) -WXOFFSET (REGION) \\REQUEUE.ETHERPACKET (SYSQUEUE) \\TEDIT.GET.TERMSA.WIDTHS (ARRAYP) MSGETDEF ( -MSANALYZABLE) \\SHOWSEL.HILIGHT (LINEDESCRIPTOR SELECTION FMTSPEC TEXTOBJ) SPP.OPEN (SPPCON) -\\TEDIT.PURGE.SPACES (ARRAYP) \\LITATOM.EATCHARS (LITATOM PNAMEBASE) BLOCK (PROCESS FX) OPT.RETMERGE ( -TAG JUMP) TEDIT.MOVE (SELECTION TEXTOBJ) PAGEFULLFN (LINEBUFFER) TB.LAST.VISIBLE.ITEM# (TABLEBROWSER -REGION) TTY.PROCESS (PROCESS KEYACTION) \\TEXTMARK (TEXTOBJ TEXTSTREAM STREAM) TEDIT.SETFUNCTION ( -TEXTOBJ STREAM TEXTSTREAM) SETLINELENGTH (STREAM) FB.EDITLISPFILE (FILEBROWSER) TB.FIND.ITEM ( -TABLEBROWSER) DISPLAYSTREAMP (STREAM IMAGEOPS) SEDIT::SET-PROPS (SEDIT::EDIT-CONTEXT) CL:INTERN ( -STRINGP ARRAY-HEADER) IRM.RESET (DINFOGRAPH) TEDIT.GET.PARALOOKS (TEXTOBJ PIECE) -\\TEDIT.UNPARSE.PARALOOKS.LIST (FMTSPEC) \\DOFORMATTING (LINEDESCRIPTOR THISLINE TEXTOBJ ARRAYP) -\\INITIALIZESWAPDISK (ISFMAP) \\TEDIT.LINE.LIST (TEXTOBJ) OPT.RETTEST (TAG JUMP) MAKEBITTABLE ( -CHARTABLE) |\\VAMAllocPageGroup| (|PageGroup| |LogicalVolumeDescriptor| |FileDescriptor|) -\\COPYARRAYBLOCK (ARRAYBLOCK) INSURE.WINDOW (WINDOW) \\STREAMCHARWIDTH (CHARTABLE TERMTABLEP) COPYALL -(CURSOR) \\SETFATSYNCODE (CHARTABLE) \\TEDIT.HARDCOPY.FORMATLINE (TEXTOBJ ARRAYP THISLINE -LINEDESCRIPTOR TEXTSTREAM CHARLOOKS PIECE FONTCLASS FMTSPEC STREAM PAGEFORMATTINGSTATE CHARSETINFO -PENDINGTAB) DESCRIBE-VIRTUAL-MEMORY (IFPAGE) \\ADVANCE.ARRAY.SEGMENTS (POINTER) VMEMSIZE (IFPAGE) -TB.DISPLAY.LINES (TABLEBROWSER REGION) FILEPOS (ARRAYP LITATOM STRINGP ARRAY-HEADER FDEV) \\CHDEL1 ( -STREAM) TEDIT.GETFUNCTION (TEXTOBJ STREAM TEXTSTREAM READTABLEP CHARTABLE) \\BYTELT (ARRAYP) -FB.COUNTER.STRING (FILEBROWSER) \\LOADNSHOSTNUMBER (NSHOSTNUMBER) \\SEQUIN.HANDLE.INPUT (PUP -SEQUINPACKET SEQUIN) \\BYTESETA (ARRAYP) \\ARRAYBLOCKMERGER (ARRAYBLOCK) \\DECPARENCOUNT (LINEBUFFER) -\\DSPYPOSITION.HCPYMODE (\\DISPLAYDATA) \\WORDELT (ARRAYP) FFILEPOS (STREAM LITATOM STRINGP -ARRAY-HEADER FDEV ARRAYP) CL::%RATIO-PRINT (READTABLEP) FB.PRINTFN (FBFILEDATA STRINGP ARRAY-HEADER -FILEBROWSER INFOFIELD) CHANGEBACKGROUNDBORDER (IOPAGE) SEDIT::SET-OPTIONS (SEDIT::EDIT-CONTEXT) CCODEP - (LITATOM) \\GETCHAR (LINEBUFFER) \\FIXP.FROM.FLOATP (FIXP FLOATP) \\ARRAYTYPENAME (ARRAYP) -GRAPHDELETELINK (GRAPH GRAPHNODE) \\BLOCKDATAP (ARRAYBLOCK) OPENIPSTREAM (REGION IPSTREAM STREAM -INTERPRESSDATA) \\FILLBUFFER.WORDSEPRP (CHARTABLE) CL::%COMPLEX-PRINT (READTABLEP) SPP.DESTADDRESS ( -SPPCON) TEDIT.MAPPIECES (TEXTOBJ PIECE) CHARWIDTH (FONTDESCRIPTOR CHARSETINFO IMAGEOPS STREAM) -\\TEXTMENU.DOC.CREATE (MB.BUTTON TEXTSTREAM MB.3STATE MB.TOGGLE MB.NWAY MB.TEXT MB.INSERT TEXTOBJ) -\\DSPTRANSFORMREGION (\\DISPLAYDATA) PROMPTINWINDOW (POSITION CURSOR) \\STARTDISPLAY (BITMAP SCREEN) -\\DSPFONT.IP (FONTDESCRIPTOR) DRAWMARGINSCALE (REGION) DUMPGRAPH (GRAPH GRAPHNODE FONTDESCRIPTOR) -\\OFFSETCLIPPINGREGION (\\DISPLAYDATA) DSPBACKUP (STREAM FONTDESCRIPTOR) MARGINBAR (REGION) -\\TEDIT.HARDCOPY.MODIFYLOOKS (CHARLOOKS LINEDESCRIPTOR) SEDIT::EDIT-SELECTION (SEDIT::EDIT-CONTEXT) -\\POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS (FONTDESCRIPTOR) INIT/NODES/FOR/LAYOUT (GRAPHNODE) DINFOGRAPH ( -DINFOGRAPH) \\DSPTOPMARGIN.PRESS (STREAM) |\\VFMInsertPageGroup| (|FileDescriptor| |PageGroup| -|Interval| |Key|) \\SEQUIN.RETRANSMIT (SEQUIN SEQUINPACKET) UPDATEWFROMIMAGE (WINDOW REGION) -\\SHOW.ARRAY.FREELISTS (ARRAYBLOCK) SPP.CLOSE (SPPCON) BITMAPOBJ.SNAPW (REGION) SHOW.PRESS (STREAM -FDEV FONTDIRENTRY) WFROMDS (TEXTOBJ STREAM \\DISPLAYDATA WINDOW) FB.CLOSEFN (FILEBROWSER) -\\TEXTDSPYPOSITION (TEXTOBJ) GETWINDOWUSERPROP (WINDOW) \\TEDIT.PRIMARYW (TEXTOBJ) \\FILLBUFFER ( -LINEBUFFER CHARTABLE FDEV STREAM) TB.REPLACE.ITEMS (TABLEBROWSER) |\\CoerceToDisplayDevice| (FDEV) -SPP.SENDEOM (FDEV STREAM SPPCON SPPXIP) TITLEDICONW (TITLEDICON) LATTICE/BREAK/CYCLES (GRAPHNODE) -HARDCOPYGRAPH (REGION POSITION GRAPH) \\INTERPRETER1 (FX FNHEADER BF) \\DSCCOUT (CHARTABLE) -\\TITLEICONMINSIZE (SCREEN WINDOW) DELETE/AND/DISPLAY/LINK (GRAPHNODE GRAPH) \\SMASHLINK (FX BF) -NEWPAGE?.IP (STREAM) FB.COUNTERW.REDISPLAYFN (FILEBROWSER) \\TEXTMENU.SET.TOGGLE (PIECE PCTNODE -TEXTOBJ) FB.COPYFN (FBFILEDATA) \\STACKARGPTR (FX FNHEADER) \\TEDIT.FIXSELS (TEXTOBJ SELECTION) -FIXVERBSETTYPE (MSSETPHRASE THAT) \\FM.MENUHANDLER (REGION FREEMENUITEM) \\DSPSPACEFACTOR.PRESS ( -STREAM) PROCESSWORLD (PROCESS PROCESSQUEUE) |\\PFPutRootDirectoryType| (|LogicalVolumeDescriptor| -|LogicalSubVolumeMarker|) \\SEQUIN.FLUSH.CONNECTION (SEQUIN) OPT.RETPOP (TAG) \\FTP.NEXTFILE (FDEV -STREAM) \\DSPXPOSITION.HCPYMODE (\\DISPLAYDATA) \\ENTITYEND.PRESS (STREAM FDEV) \\PARSEARRAYSPACE1 ( -ARRAYBLOCK) DBG::BACKTRACE-ITEM-SELECTED (BKMENUITEM MENU) \\RUN.PROCESS (PROCESS) -|\\GetRootDirectoryType| (|LogicalVolumeDescriptor|) DRIBBLE (STREAM) \\LONUM (FIXP) \\START.PROCESSES - (FX) \\DSPRIGHTMARGIN.HCPYMODE (\\DISPLAYDATA) \\ENTITYSTART.PRESS (STREAM FDEV) POSTSCRIPT.INIT ( -FONTCLASS) FB.AFTERCLOSEFN (FILEBROWSER) EQFMTSPEC (FMTSPEC) \\TEXTLEFTMARGIN (TEXTOBJ FMTSPEC) -\\HINUM (FIXP) TEDIT.DELETELINE (LINEDESCRIPTOR) \\SETUP-COMPILED-CLOSURE-CALL (IFPAGE -COMPILED-CLOSURE FX BF FNHEADER FSB) PUTWINDOWPROP (WINDOW SCREEN) \\SETUP.DEFAULT.LINEBUF (FDEV) -\\DSPRIGHTMARGIN.PRESS (STREAM) \\TEXTDSPFONT (CHARLOOKS TEXTOBJ) \\MAIKO.CONS.UFN (LISTP CONSPAGE -POINTER) READGRAPH (GRAPH) TB.SET.FONT (TABLEBROWSER REGION) SPP.CLEAREOM (SPPSTREAM) \\LINEBUF.READP -(LINEBUFFER) SEDIT::GET-CONTEXT (SEDIT::EDIT-NODE) \\OPENW1 (SCREEN WINDOW) CHARPOS (STREAM) -TEDIT.MAPLINES (LINEDESCRIPTOR TEXTOBJ REGION) \\MOVE.WINDOWS.ONTO.SCREEN (WINDOW REGION) -\\TFBRAVO.INIT.CHARLOOKS (CHARLOOKS) \\CLOSEW1 (SCREEN WINDOW) \\SPY.INTERRUPT (FX FNHEADER) -\\DSPLINEFEED.PRESS (STREAM) |\\VFMGetPageGroup| (|FileDescriptor| |Key| |Interval|) \\MAKEFREEBLOCK ( -FSB) ARGLIST (LITATOM COMPILED-CLOSURE) \\INTERPRETER-LAMBDA (BF FX) \\CREATELINEBUFFER (STREAM -LINEBUFFER FDEV) \\DSPSPACEFACTOR.HCPYMODE (\\DISPLAYDATA) PROMPTFOREVALED (POSITION) SETXY.PRESS ( -STREAM) GRAPHOBJ.PUTALIGN (GRAPH GRAPHNODE) FB.SET.DEFAULT.NAME.WIDTH (FILEBROWSER) CHANGEBACKGROUND ( -SCREEN) HLSTORGB (HLS) \\SPP.PREPARE.INPUT (SPPCON STREAM SPPSTREAM SPPXIP SPPHEAD XIP) -LINEBUFFER-EOFP (FDEV STREAM) CL::%BIGNUM-LOGCOUNT (BIGNUM) \\SETUP-ENVIRONMENT-CALL (IFPAGE FX BF -FNHEADER FSB) MAKETITLEBARICON (WINDOW SCREEN REGION POSITION) FOREST/BREAK/CYCLES (GRAPHNODE) -\\IRM.GET.REF (IRMREFERENCE) TB.SCROLLFN (TABLEBROWSER) OPENWINDOWS (SCREEN WINDOW) \\TTW1 (WINDOW -SCREEN) \\LINEBUF.EOFP (FDEV STREAM LINEBUFFER) SEDIT::ATOM-POINT-TYPE (READTABLEP STRINGP -ARRAY-HEADER) NEWPAGE.IP (STREAM) GRAPHOBJ.GETALIGN (GRAPHNODE GRAPH) \\FM.RIGHTBUTTONFN (REGION -FREEMENUITEM) \\FREESTACKBLOCK (STK FX BF FSB) TEDIT.DEACTIVATE.WINDOW (TEXTOBJ STREAM) MAKEBRES (BRES -) DEFAULT.ADDNODEFN (GRAPH) \\INITCONSPAGE (CONSPAGE LISTP POINTER) ETHERHOSTNAME (PORT STRINGP -ARRAY-HEADER) \\SPP.ESTABLISH (SPPCON SPPXIP) \\STKNAME (FX FNHEADER BF) CHECKCONSPAGES (CONSPAGE) -\\CHECKCONSPAGE (CONSPAGE LISTP) TB.REPAINTFN (TABLEBROWSER) SEDIT::ASSIGN-FORMAT-LITATOM ( -SEDIT::BROKEN-ATOM) \\TEXTMENU.TOGGLE.WHENOPERATEDFN (SELECTION) \\FAX.PARSE.NAME (STRINGP -ARRAY-HEADER) APPLY (LITATOM) \\INTERNALTOTOPW (WINDOW SCREEN) APPLY* (LITATOM) IRM.DISPLAY.REF ( -IRMREFERENCE DINFOGRAPH) CL:ARRAY-TOTAL-SIZE (ARRAY-HEADER) \\DSPLEFTMARGIN.PRESS (STREAM) -|\\PFPatchRootDirEntries| (|RootDirectory|) \\CKAPPLYARGS (FX) CL:ARRAY-RANK (GENERAL-ARRAY) -\\TEDIT.INSERTLINE (LINEDESCRIPTOR) \\SPP.RELEASE.ACKED.PACKETS (SPPCON) FB.ICONFN (FILEBROWSER) -TB.NUMBER.OF.ITEMS (TABLEBROWSER TABLEITEM) \\STRING-STREAM-OUTCHARFN (STREAM) -\\TEDIT.HARDCOPY.DISPLAYLINE (LINEDESCRIPTOR THISLINE TEXTOBJ REGION ARRAYP CHARLOOKS FMTSPEC) -\\ADJUSTABLE-STRING-STREAM-OUTCHARFN (STREAM) DBG::ATTACH-BACKTRACE-MENU (MENU REGION) PUTTEXTPROP ( -TEXTOBJ) \\DSPFONT.HCPYMODE (CHARSETINFO) MAKE-FILL-POINTER-OUTPUT-STREAM (STREAM) -\\TEXTMENU.TOGGLE.SHOWSELFN (SELECTION) \\BBTCURVEPT (BITMAP PILOTBBT) SEDIT::REPAINT (SEDIT::WEAK-LINK - SEDIT::LINE-START SEDIT::STRING-ITEM) GETSTREAMPROP (STREAM) OPT.DELTAGREF (JUMP) \\FM.WINDOWENTRYFN -(REGION FREEMENUITEM) \\SETSPACE.PRESS (STREAM) \\NSFILING.OPENFILE (STREAM FDEV) -|\\PFFindRootDirEntryNum| (|RootDirectory| |RootDirEntry|) \\SETFVARSLOT (FX FNHEADER FVARSLOT) -MEASUREGRAPHNODE (GRAPHNODE) PROG (FNHEADER) GRAPHREGION (GRAPH) \\FIXLINELENGTH.PRESS (STREAM) -\\EXTERNALFORMAT (STREAM EXTERNALFORMAT) EXPANDW (SCREEN WINDOW) \\PROG0 (FX FNHEADER) CURSOR (CURSOR -BITMAP) DEL.PROCESS (PROCESS) \\PRINSTACKP (READTABLEP) %BROADCAST-STREAM-DEVICE-CHARSETFN (STREAM) -\\CKPOSSOUT (STRINGP ARRAY-HEADER) \\TEDIT.PUT.CHARLOOKS (CHARLOOKS PIECE) -%BROADCAST-STREAM-DEVICE-OUTCHARFN (STREAM) HASHBEFORECLOSE (|HashFileEntry| |HashFile|) -OPT.COMMONBACK (JUMP) \\ELIDE.ELEMENT.CHAR (READTABLEP) DBG::REGION-NEXT-TO (REGION) -TB.COPYBUTTONEVENTFN (TABLEBROWSER) \\KEYHANDLER1 (RING IFPAGE KEYBOARDEVENT) \\LITPRIN (CL:SYMBOL -PNAMECELL READTABLEP LITATOM PNAMEBASE) \\TEXTOPENF (TEXTSTREAM TEXTOBJ PCTNODE) PROCESSP (PROCESS) -\\SMASHRETURN (FX) CCCSCAN (FNHEADER) \\ELIDE.TAIL.STRING (READTABLEP) RESTART.PROCESS (PROCESS) -FB.HARDCOPY.DIRECTORY (FILEBROWSER FBFILEDATA INFOFIELD) FB.GETALLFILEINFO (FILEBROWSER) STREAMP ( -STREAM) \\TFBRAVO.WRITE.PARAGRAPH (FMTSPEC) EVALA (FNHEADER) DASSEM.CANSHAREBINDING (FRAME) -WAKE.PROCESS (PROCESS) \\CURSOR.DEFPRINT (CURSOR) \\SEQUIN.CONTROL (SEQUINPACKET) \\EVALA (FX FNHEADER -) COMP.STUNBIND (FRAME) OPT.JUMPREV (TAG JUMP) CL:FLOAT-SIGN (FLOATP) SUSPEND.PROCESS (PROCESS) -DEFINEDP (LITATOM) GETTEXTPROP (TEXTOBJ) %CONCATENATED-STREAM-DEVICE-CHARSETFN (STREAM) \\PRINSTRING ( -READTABLEP STRINGP ARRAY-HEADER) \\LITPRIN.INTERNAL (READTABLEP LITATOM PNAMEBASE ARRAYP READCODE -CHARTABLE) FB.BROWSECOMMAND (FILEBROWSER) FB.ADD.FILEGROUP (FILEBROWSER FBFILEDATA) -%CONCATENATED-STREAM-DEVICE-BIN (STREAM) FRESHLINE (STREAM FDEV) \\GENERIC.CURSOR (SCREEN) -%SYNONYM-STREAM-DEVICE-CLOSEFILE (FDEV) POSTSCRIPT.FONTCREATE (PSCFONT FONTDESCRIPTOR CHARSETINFO) -\\SOUT (IMAGEOPS STREAM STRINGP ARRAY-HEADER) PROCESS-STATUS (FX FNHEADER) RELPROCESSP (PROCESS) -ONEDINSPECT.SETELT (REGION) \\TEXTBACKFILEPTR (STREAM TEXTSTREAM PIECE) TB.REMOVE.ITEM (TABLEBROWSER) -\\TEXTMENU.TOGGLEFN (SELECTION) \\STREAM.DEFPRINT (STREAM FDEV) \\NSNET.CLOSERP (NSADDRESS) PUTSEQUIN -(SEQUIN SEQUINPACKET) READTABLEP (READTABLEP) \\SPP.HANDLE.DATA (SPPCON SPPXIP STREAM) MENU.HANDLER ( -MENU WINDOW POSITION) FB.GET.NEWPATTERN (FILEBROWSER) %SYNONYM-STREAM-DEVICE-EOFP (FDEV STREAM) -FIND-EXTERNAL-SYMBOL (STRINGP ARRAY-HEADER) \\PRINTNSADDRESS (STREAM) GO (FNHEADER FX BF) LET ( -FNHEADER) GRAPHERPROP (GRAPH) BREAK.NSFILING.CONNECTION (FDEV) \\DSPCOLOR.IP (STREAM INTERPRESSDATA) -\\LET0 (FX FNHEADER) \\FDEV.DEFPRINT (FDEV) %SYNONYM-STREAM-DEVICE-OUTCHARFN (STREAM) LET* (FNHEADER) -\\CARET.DOWN (CARET1 WINDOW) \\LET* (FX FNHEADER) CL:GET-OUTPUT-STREAM-STRING (STREAM) -\\SYMBOL.ESCAPE.COUNT (READTABLEP ARRAYP LITATOM PNAMEBASE READCODE CHARTABLE) NCHARS (LITATOM STRINGP - ARRAY-HEADER READTABLEP) TEDIT.COPY (SELECTION TEXTOBJ PIECE) BRV/OFFSET (GRAPHNODE) TEDIT.KILL ( -STREAM TEXTSTREAM TEXTOBJ) \\SCROLL.HANDLER.DOIT (REGION) \\DRAWLINE.IP (IPSTREAM INTERPRESSDATA) -CALL.MOVENODEFN (GRAPH) PROCESS.TTY (PROCESS) NEWLINE.IP (STREAM) FB.SHAPECOMMAND (FILEBROWSER REGION) - \\DEFPRINT.BY.NAME (READTABLEP) FB.FASTSEECOMMAND (FILEBROWSER) FB.MAYBE.WIDEN.NAMES (FILEBROWSER) -\\NUMERIC.PNAMEP (READTABLEP STRINGP ARRAY-HEADER LITATOM PNAMEBASE) \\STREAM.NOT.OPEN (STREAM) -\\MEDW.CURSOR (CURSOR BITMAP) TEDIT.CHARWIDTH (CHARTABLE) \\INSERTCR (TEXTOBJ PIECE) -\\FM.UPDATEWINDOWEXTENT (REGION) \\DSPCLIPPINGREGION.PRESS (STREAM REGION) \\INSTALL.EXTERNALFORMAT ( -EXTERNALFORMAT) |\\PFRemoveRootDirEntry| (|RootDirectory|) %TWO-WAY-STREAM-DEVICE-EOFP (FDEV STREAM) -\\DOBUFFEREDTRANSITIONS (RING KEYBOARDEVENT) MKATOM (STRINGP ARRAY-HEADER) \\SAVEVMBACKGROUND (IFPAGE) - PFI.PRINT.BITMAP (STREAM) %TWO-WAY-STREAM-DEVICE-OUTCHARFN (STREAM) \\TEXTSETFILEPTR (TEXTSTREAM -TEXTOBJ) WINDOWP (WINDOW) COMP.STBIND (FRAME) PRINTPACKETQUEUE (SYSQUEUE) OPT.LABELNTHPR (TAG) -\\EVALFORM (LITATOM) FB.ADJUST.DATE.WIDTH (FILEBROWSER INFOFIELD FBFILEDATA) PNAMESTREAMP (STREAM) -\\GC.HANDLEOVERFLOW (HTOVERFLOW FIXP) \\TFBRAVO.READ.PARALOOKS (FMTSPEC) -%TWO-WAY-STREAM-DEVICE-CHARSETFN (STREAM) TEDIT.CARETLOOKS (TEXTOBJ) \\DTEST.UFN (FIXP) -\\UPDATE.EXTENT.IMAGE (REGION) \\NSFILING.CLOSE.CONNECTIONS (FDEV) \\TEDIT.TABTYPE.SET (SELECTION -PIECE MARGINBAR) \\NET.SETTIME (NDB) COPYVM (IFPAGE) \\TEXTPEEKBIN (TEXTSTREAM STREAM PIECE FDEV) -IMAGEOBJP (IMAGEOBJ) \\DSPXPOSITION.IP (STREAM) \\TRACKCURSOR (IOPAGE) \\SPP.HANDLE.ATTN (SPPCON -SPPXIP) ENVAPPLY (LITATOM) \\FUNCT1 (FX FNHEADER) \\MEDW.PUTWINDOWPROP (WINDOW REGION) -%TWO-WAY-STREAM-DEVICE-BACKFILEPTR (STREAM) SEDIT::RELINEARIZE (REGION) \\MAKESTACKP (STACKP) -MSNEXTWORD (PARSED MSVERB) \\FM.WINDOWEXTENT (FREEMENUITEM REGION) \\DSPBOTTOMMARGIN.PRESS (STREAM) -PROCESS.WINDOW (PROCESS) SORT.NSADDRESSES.BY.DISTANCE (NSADDRESS) \\SEQUIN.PUT (SEQUIN SEQUINPACKET) -CHANGE.NODEFONT.SIZE (GRAPHNODE GRAPH) \\GCMAPTABLE (HTOVERFLOW FIXP) -%FILL-POINTER-STREAM-DEVICE-GETFILEPTR (STREAM) \\FM.UPDATEGROUPEXTENT (REGION) \\DEFINEFONT.PRESS ( -STREAM) NSNET.DISTANCE (NSADDRESS) GETSEQUIN (SEQUIN) MENUITEMREGION (MENU REGION) \\INTERPRETER ( -LITATOM IFPAGE FNHEADER) SEDIT::BACKSPACE (SEDIT::EDIT-NODE) \\CHARWIDTH.HCPYMODE (\\DISPLAYDATA) -STKAPPLY (LITATOM) WINDOW.BITMAP (REGION) |\\PFAddRootDirEntry| (|RootDirectory|) FB.MAKECOUNTERWINDOW - (FILEBROWSER) SI::UNWIND (FX FNHEADER BF) PRINTNUM-TO-STRING (FLOATFMT FIXFMT) -\\TFBRAVO.HANDLE.HEADING (FMTSPEC) \\TEDIT.FIXCHANGEDLINE (LINEDESCRIPTOR THISLINE TEXTOBJ) -MSNEGATESET (MSSETPHRASE) \\PROC.RESUME (FX) \\DRAWCURVE.IP (POSITION) RETAPPLY (FX LITATOM) -\\SETFVAR.UFN (VCELL) \\TEXTGETEOFPTR (TEXTOBJ TEXTSTREAM) IMAGEOBJPROP (IMAGEOBJ IMAGEFNS) -\\TEDIT.PEEKBIN.NEW.PAGE (TEXTSTREAM STREAM FDEV) WINDOW.MOUSE.HANDLER (WINDOW POSITION) -FB.DEPTHCOMMAND (FILEBROWSER) \\JISPEEK (STREAM) %SYNONYM-STREAM-DEVICE-GET-STREAM (STREAM) -GRAPHOBJ.CHECKALIGN (GRAPH) FB.HEADINGW.DISPLAY (REGION FILEBROWSER INFOFIELD) \\MAKEFUNARGFRAME ( -FNHEADER STACKP) ICONW.SHADE (BITMAP) COURIER.WRITE.STRING (STRINGP ARRAY-HEADER) -\\TFBRAVO.FONT.FROM.CHARLOOKS (CHARLOOKS) BLIPVAL (FX FNHEADER) TEDIT.INSERT.UPDATESCREEN (TEXTOBJ -SELECTION LINEDESCRIPTOR REGION) \\VAROFFSET (FNHEADER FX BF PVARSLOT) RETEVAL (FX) \\LOADNSADDRESS ( -NSADDRESS) \\RECLAIMSTACKP (STACKP FX) TEDIT.MODIFYLOOKS (CHARLOOKS LINEDESCRIPTOR) SETBLIPVAL (FX -FNHEADER) \\JISFILEOUTCHARFN (STREAM) \\BACKJISCHAR (STREAM) SPY.FIND.TREE (SPYRECORD) \\DSPFONT.PRESS - (STREAM CHARSETINFO) PROCESS.EVAL (PROCESS) |\\PFPutRootDirectory| (|PageGroup|) BLIPSCAN (FX) -|\\AddShade| (MENU) TOPW.REPAINTFN (REGION) TB.REDISPLAY.ITEMS (TABLEBROWSER) \\TEDIT.NEWREGIONFN ( -POSITION) COURIER.WRITE.SEQUENCE.UNSPECIFIED (STRINGP ARRAY-HEADER) LISTP (POINTER) -\\TFBRAVO.READ.CHARLOOKS (CHARLOOKS) \\REALFRAMEP (FNHEADER FX) DASSEM.DSTOREFNDEF (CODEARRAY) -\\MEDW.GETWINDOWPROP (WINDOW) \\INSERTCH (TEXTOBJ STRINGP ARRAY-HEADER EDITMARK BTREENODE PIECE) -\\IPCURVE2 (SPLINE) EXPRP (LITATOM) \\TEXTGETFILEPTR (TEXTSTREAM STREAM PIECE TEXTOBJ) \\STKARG (BF FX - FNHEADER PVARSLOT) FB.INFOMENU.WHENSELECTEDFN (FILEBROWSER) CHARACTER (STRINGP ARRAY-HEADER) \\JISIN -(STREAM) \\FM.TRANSPOSEVERT (REGION) CLEARW (WINDOW) \\TEDIT.RESTARTFN (TEXTOBJ TEXTSTREAM STREAM) -BROWSE/LAYOUT/HORIZ/COMPACTLY (GRAPHNODE) FB.MAKERIGIDWINDOW (REGION) \\SETLOCALNSNUMBERS (IFPAGE) -CL:MAKE-ECHO-STREAM (STREAM FDEV) TTYDISPLAYSTREAM (STREAM \\DISPLAYDATA) CL:MAKE-SYNONYM-STREAM ( -STREAM FDEV) \\GENERIC.DSPCREATE (SCREEN BITMAP) \\SEQUIN.PROCESS (SEQUIN) RESHADEITEM (MENU) -CL:MAKE-TWO-WAY-STREAM (STREAM FDEV) TEXTICON (REGION) \\TEXTEOFP (TEXTSTREAM STREAM PIECE) -FB.INFOMENU.SHADEINITIALSELECTIONS (MENU) PROCESS.APPLY (PROCESS) TEDIT.FORMATTEXTBOX ( -PAGEFORMATTINGSTATE PAGEREGION REGION LINEDESCRIPTOR TEXTOBJ FMTSPEC) FB.SET.BROWSER.TITLE ( -FILEBROWSER) \\DECODETRANSITION (KEYACTION KEYBOARDEVENT) \\DEFINEDEVICE (FDEV) \\MEDW.DSPCREATE ( -SCREEN STREAM \\DISPLAYDATA BITMAP) \\FM.TRANSPOSEHORZ (REGION) U-CASE (LITATOM STRINGP ARRAY-HEADER -PNAMEBASE) %TWO-WAY-STREAM-DEVICE-CLOSEFILE (FDEV) DBG::STKPTR-CCODE (FX) PRESSWINDOW (STREAM -PRESSDATA) |\\SFFixY.HCPYMODE| (\\DISPLAYDATA BITMAP CHARSETINFO) \\BACKTRACE (FX) \\PUTSYSBUF (RING) -\\TEDIT.MARK.REVISION (LINEDESCRIPTOR) \\PRINTFRAME (FX FNHEADER PVARSLOT FVARSLOT) OPT.LBMERGE (JUMP -TAG) FB.STARTUP (MENU) FB.DISPLAY.COUNTERS (FILEBROWSER) \\ICONW.REPAINTFN (BITMAP) \\MEDW.TOTOPW ( -SCREEN WINDOW) DASSEM.DWRITEFN (READTABLEP) \\PRINTBF (BF) \\GETDEVICEFROMHOSTNAME (FDEV) -\\SEQUIN.CLOSE (SEQUIN) \\TEDITOUTCHARFN (STREAM) TEDIT.SETSEL (TEXTOBJ SELECTION PIECE) -\\SCANFORNTENTRY (FNHEADER) FB.NEWINFOCOMMAND (FILEBROWSER REGION) \\TEDIT.LOOKS (TEXTOBJ SELECTION) -\\HARDCURSORUP (CURSOR BITMAP) \\TEDIT.COPY.LINEDESCRIPTOR (LINEDESCRIPTOR) OPT.JUMPTHRU (TAG JUMP) -TEDIT.FORMATFOLIO (PAGEREGION PAGEFORMATTINGSTATE TEXTOBJ REGION LINEDESCRIPTOR) \\FM.INITCORNERSFN ( -REGION) \\CHARWIDTH.IP (CHARSETINFO) PRIN2 (READTABLEP STREAM) \\CURSORBITSPERPIXEL (CURSOR BITMAP) -TOLINKS (GRAPHNODE) \\LOOKUPPUPNUMBER (XIP) \\FM.FILLWINDOW (REGION) NEWLINE.PRESS (STREAM) -\\CLOSEIPSTREAM (STREAM) MSONPATH (PATHOPTIONS) GRAPHBUTTONEVENTFN (GRAPH) \\EVENT.DEFPRINT (EVENT) -CL:COMPILED-FUNCTION-P (ARRAYP) INTERPRESS.OUTCHARFN (STREAM) |\\PFFindRootDirEntry| (|RootDirEntry| -|RootDirectory|) CL:PEEK-CHAR (STREAM) \\CLOSEFILE (IMAGEOPS STREAM FDEV) \\CHANGECHARSET.HCPYMODE ( -CHARSETINFO) \\CURSORDESTINATION (BITMAP CURSOR IOPAGE PILOTBBT) \\TEDIT.MAINW (TEXTOBJ) MSMATCHRATING - (PARSED MSSETPHRASE) CL:PROBE-FILE (STREAM) \\DELETEFILE (FDEV) INITSEQUIN (SEQUIN) \\TEXTINIT ( -IMAGEOPS STREAM) EQCLOOKS (CHARLOOKS FONTCLASS) TEDIT.FIND (TEXTOBJ SELECTION) |\\PFGetRootDirectory| -(|PageGroup|) PRESS.BITMAPSCALE (REGION) TB.MAKE.BROWSER (TABLEBROWSER) \\BLKEXPONENT.UFN (FLOATP) -DASSEM.DASSEM (COMINFO DASM FRAME TAG) \\TEDIT.UNPARSE.CHARLOOKS.LIST (CHARLOOKS) \\DEVICEEVENT (FDEV -STREAM) CL::%STATS-OBJECT-DIFFERENCE (MISCSTATS) \\TEDIT.APPLY.PAGEFORMATTING (SELECTION TEXTOBJ) -MSSIMPLESET (SENTENCE QUOTE) TEDIT.FORMATHEADING (PAGEREGION PAGEFORMATTINGSTATE TEXTSTREAM PIECE -TEXTOBJ REGION LINEDESCRIPTOR) \\FM.RESETCLIPPINGREGION (REGION) FULLPRESSBITMAP (REGION STREAM) -TEDIT.FORMATPAGE (PAGEFORMATTINGSTATE PAGEREGION TEXTOBJ PIECE FMTSPEC STREAM REGION LINEDESCRIPTOR) -\\SOFTCURSORUP (CURSOR BITMAP PILOTBBT) CL:READ-FROM-STRING (FDEV) \\MEDW.REDISPLAYW (WINDOW) -\\SOFTCURSORUPCURRENT (CURSOR BITMAP PILOTBBT) IRM.LOOKUP (DINFOGRAPH) \\HARDCURSORPOSITION (IOPAGE) -CL:READ-BYTE (FDEV STREAM) \\MONITORLOCK.DEFPRINT (MONITORLOCK) \\CCODEARGLIST (FNHEADER) -\\HANDLE.NS.ROUTING.INFO (NSROUTINGINFO FIXP) CLOSESEQUIN (SEQUIN) \\GENERATEFILES (FDEV) CL:READ-LINE - (FDEV STREAM) FB.SETNEWPATTERN (FILEBROWSER) PACK* (STRINGP ARRAY-HEADER CL:SYMBOL) \\CCODEIVARSCAN ( -FNHEADER) \\MAKE.PROCESS1 (FX) \\BLTSHADE.IP (INTERPRESSDATA IPSTREAM) CL:RENAME-FILE (STREAM) -\\TEDIT.TEXTBIN.NEW.PAGE (TEXTSTREAM STREAM) \\PROCESS.MOVEFRAME (FX BF FSB) \\TEDIT.SELECT.CHARACTER -(SELECTION LINEDESCRIPTOR TEXTOBJ) NEW/INSTANCE/OF/GRAPHNODE (GRAPHNODE) TOGGLE/DIRECTEDFLG (GRAPH) -\\NSRANDOM.OPENFILE (STREAM) DISPLAYLINK (GRAPH) FB.GET.SORT.MENU (FILEBROWSER) FB.CREATE.FILEBUCKET ( -FILEBROWSER FBFILEDATA) \\TEDIT.FORMAT.FOUNDBOX? (PAGEFORMATTINGSTATE PAGEREGION) DECODE-NS-STRING ( -STRINGP ARRAY-HEADER) \\GENERIC.READCCODE (STREAM) \\MEDW.SHAPEW (WINDOW REGION) BRHL/LAYOUT/DAUGHTERS - (GRAPHNODE) \\FM.UNSCROLLWINDOW (REGION) \\PEEKBIN (FDEV) \\RECLAIMCODEBLOCK (FNHEADER) OPENPRSTREAM -(REGION PRESSDATA STREAM) \\GETSTREAM (LINEBUFFER STREAM WINDOW) \\TEDIT.CLEAR.SCREEN.BELOW.LINE ( -TEXTOBJ LINEDESCRIPTOR) FB.INSERT.FILE (FILEBROWSER FBFILEDATA) SNAPW (SCREENREGION SCREEN REGION -WINDOW) BRHL/MOVE/RIGHT (GRAPHNODE) \\GETFILENAME (FDEV) \\CLEARSYSBUF (RING) GRAPHADDLINK (GRAPH -GRAPHNODE) \\TEXTSETEOF (STREAM BYTEPTR) FB.INSERT.SUBDIRECTORIES (FBFILEDATA) \\TEDIT.GET.CHARLOOKS ( -PIECE) CL:VALUES (FX) \\RECLAIMARRAYBLOCK (ARRAYBLOCK) CREATEHASHFILE (STREAM |HashFile|) -\\GENERIC.OUTFILEP (FDEV) \\SIMULATE.UNBIND (FX) \\FM.RESHAPEFN (REGION) \\OPENFILE (STREAM FDEV) -CL:VALUES-LIST (FX) \\GETSYSBUF (RING) \\CAR.UFN (LISTP) \\WRITEPRESSBITMAP (REGION STREAM) -\\FM.REDISPLAYMENU (REGION FREEMENUITEM) DBG::NEAR-BY-REGION (REGION) \\PROCESS.EVENTFN (EVENT) -NESTED.SUBMENU (MENU) NTYPX (POINTER) \\TEDIT.INSPECTCODE (COMPILED-CLOSURE FNHEADER) \\NSYSBUFCHARS ( -RING) \\CDR.UFN (LISTP POINTER) FIND.START.OF.WORD (CHARTABLE) CHARSET (IMAGEOPS STREAM) -TTYIN.LASTINPUT (TTYINBUFFER LINE) OPT.SETUPOPT (JUMP) \\CHECKAPPLY* (LITATOM) SETFILEINFO (STREAM -FDEV BYTEPTR) CL::VALUES-LIST-UFN (FX) \\SYSBUFP (RING) \\TEXTOUTCHARFN (TEXTOBJ TEXTSTREAM) CLOSEW ( -SCREEN WINDOW) FB.SORTCOMMAND (FILEBROWSER FBFILEDATA) MB.NWAYBUTTON.SELFN (SELECTION) \\PEEKSYSBUF ( -RING) \\KEYBOARDINIT (RING) \\HTFIND (MDSTYPEWORD POINTER GC HTCOLL) TRACKW (REGION WINDOW) -\\MEDW.SHRINKW (BITMAP WINDOW REGION) \\TEDIT.ACTIVE.WINDOWP (TEXTOBJ) \\UNWIND.UFN (FX) -CL::%PRINT-TIMING-INFO (MISCSTATS) \\ALLOCLOCKED (POINTER) \\SETGLOBALVAL.UFN (VALINDEX) CL::VALUES-UFN - (FX) \\NSFILING.GETFILEINFO (STREAM) SEDIT::BUILD-WINDOW (REGION) \\RPLACA.UFN (LISTP) SEDIT::STRINGWIDTH - (STRINGP ARRAY-HEADER) \\SMASHMENUIMAGEONRESET (MENU) \\RPLACD.UFN (LISTP POINTER CONSPAGE) -TEDIT.STYLESHEET (TEXTOBJ) \\INSPECT/CODE/REPAINTFN (POSITION) \\CONS.UFN (LISTP CONSPAGE POINTER) -FB.INCREASING.VERSION (FBFILEDATA) \\RESHOWBORDER1 (WINDOW REGION SCREEN BITMAP) BREAK.PROCESS ( -PROCESS) \\MEDW.RELMOVEW (REGION POSITION) BRHL/LAYOUT (GRAPHNODE) TOGGLE/SIDESFLG (GRAPH) -\\NSRANDOM.CLOSEFILE (STREAM) KEYACTIONTABLE (KEYACTION) DEFAULT.INSPECTW.VALUECOMMANDFN (MENU) -\\TEXTOPENF-SUBTREE (PCTNODE PIECE STREAM) FB.ALPHABETIC.ATTR (FBFILEDATA) \\FINDKEY.UFN (FX BF) -CLRPROMPT (WINDOW) TEDIT.SCAN.LINE (THISLINE TEXTOBJ LINEDESCRIPTOR FMTSPEC ARRAYP CHARLOOKS SELECTION -) KEYACTION (KEYACTION) MENU (MENU) BRHC/OFFSET (GRAPHNODE) \\NSFILING.SETFILEINFO (STREAM) -\\SCALEDBITBLT.IP (INTERPRESSDATA IPSTREAM REGION) ADD/AND/DISPLAY/LINK (GRAPHNODE) -\\PAGED.REVALIDATEFILELST (FDEV) \\REVALIDATEFILE (FDEV) \\SPP.HANDLE.INPUT (SPPCON XIP SPPHEAD) -\\PRINT-REVALIDATION-RESULT (STREAM) \\RENAMEFILE (FDEV) CL:TRUENAME (STREAM) TTRACKMOUSE (LINE -COMPLEXCHAR) \\MISCN.UFN (BF MISCN-UFN-ENTRY FX) \\CHECK.PQUEUE (PROCESS) -\\KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS (IFPAGE) \\RPLCONS (POINTER CONSPAGE LISTP) -\\PAGED.REVALIDATEFILE (FDEV) UNMAKEHARDCOPYMODESTREAM (STREAM REGION) \\KEYBOARDEVENTFN (IFPAGE) -PPROC1 (MONITORLOCK) LINE.LESSP (XYPT LINE) \\PAGED.REVALIDATEFILES (STREAM FDEV) \\PROCESS.MAKEFRAME0 - (FX FSB FNHEADER LITATOM) FB.INCREASING.NUMERIC.ATTR (FBFILEDATA) CL:UNREAD-CHAR (STREAM) -FB.CANONICAL.DIRECTORY (FILEBROWSER) RESHOWBORDER (WINDOW) \\BUFFERED.REVALIDATEFILE (FDEV) -\\MEDW.MOVEW (WINDOW SCREEN REGION POSITION) \\STKSCAN (FX VALINDEX FNHEADER BF PVARSLOT FVARSLOT) -\\ENDPAGE.PRESS (STREAM FDEV) \\BUFFERED.REVALIDATEFILELST (FDEV) \\RESETKEYBOARD (KEYBOARDEVENT RING) - GETINTERRUPT (KEYACTION) GETWINDOWPROP (WINDOW SCREEN) TWOD.TRACKCURSOR (TWOD.SELECTION) -\\TRUNCATEFILE (FDEV) \\RESTLIST.UFN (FX BF) \\FILE-CONFLICT (STREAM FDEV) \\UNBOXFLOAT3 (FX) -REHASHFILE (|HashFile|) \\TEDIT.ADJUST.LINES (TEXTOBJ LINEDESCRIPTOR) \\PROCESS.MAKEFRAME (IFPAGE) -\\SPP.NOT.RESPONDING (SPPCON) FB.EXPUNGECOMMAND (FILEBROWSER) SETINTERRUPT (KEYACTION) \\SHAPEW2 ( -WINDOW REGION BITMAP SCREEN) SCROLLBYREPAINTFN (REGION SCREEN WINDOW) \\MEDW.CLOSEW (WINDOW SCREEN) -TTBEFOREPOS (MOUSEPOS LINE) SPYOBJ.LABEL (SPYOBJDATA) \\TYPEMASK.UFN (POINTER) \\INSUREWINDOW (WINDOW) - \\UPDATE.PBT.RASTERWIDTHS (PILOTBBT) FB.DECREASING.NUMERIC.ATTR (FBFILEDATA) \\DRAWLINE.UFN ( -BITMAPWORD) \\ENVCALL.UFN (IFPAGE) COPYGRAPH (GRAPH GRAPHNODE) \\STORE.N.UFN (FX) WHICHW (POSITION -SCREEN WINDOW) \\SHOWTEXT (TEXTOBJ) \\FIXDLINES (TEXTOBJ LINEDESCRIPTOR) \\MAIKO.CONSOLE-LOG-PRINT ( -INTERRUPTSTATE) \\NSRANDOM.WRITEPAGES (STREAM) |\\PFInitializeVols| (|PhysicalVolumeDescriptor|) -\\MAIKO.IO-INTERRUPT (INTERRUPTSTATE) DSPFILL (REGION) \\ARG0 (FX BF) \\NSRANDOM.READPAGES (STREAM) -\\DSPYPOSITION.IP (STREAM) \\MAIKO.ETHER-INTERRUPT (INTERRUPTSTATE) \\MYARGCOUNT (BF FX) \\PRESSCURVE2 - (STREAM SPLINE) ALIGNMENTNODE (GRAPH) \\KEYACTION1 (KEYACTION) TEDIT.SELECT.LINE.SCANNER (TEXTOBJ -LINEDESCRIPTOR SELECTION REGION) RESHAPEBYREPAINTFN (REGION) COMP.BIND.VARS (VAR) SEDIT::TRANSLATE-CHARS - (READTABLEP STRINGP ARRAY-HEADER) \\DELETECH (TEXTOBJ PIECE) SPYOBJ.HEIGHT (SPYOBJDATA) -EXTENDPASTVERTBOUNDARIES (REGION) \\INVERTITEM (MENU) NESTED.SUBMENU.POS (MENU STREAM REGION -\\DISPLAYDATA) \\RETURN (FX) COMP.UNBIND.VARS (FRAME) PRETTYFILEINDEX (STREAM) \\SPP.RETRANSMIT.NEXT ( -SPPCON SPPXIP) GETFILEINFO (STREAM FDEV) FB.MAYBE.EXPUNGE (FILEBROWSER) FIND.PROCESS (PROCESS) -\\ONQUEUE (SYSQUEUE) SHAPEW1 (WINDOW REGION BITMAP SCREEN) \\FILE.NOT.OPEN (STREAM) \\TFBRAVO.EOLS ( -TEXTOBJ) TTNEXTPOS (LINE) ADDMENU (MENU REGION POSITION SCREEN) SHADEITEM (MENU REGION) FULLNAME ( -STREAM) \\TEDIT.FIXINSSEL (SELECTION) MSOBJTYPE (CVERB MSVERB) ERROR! (FX FNHEADER) GETBOXPOSITION ( -SCREENPOSITION) RESETKEYACTION (KEYACTION) \\GCRECLAIMCELL (GCPTR) CHECK/MENU/IMAGE (MENU WINDOW -BITMAP) PRESSBITMAP (REGION STREAM) \\GCSCAN1 (GC) FB.REMOVE.FILE (FBFILEDATA) \\COPY.N.UFN (FX) -RELMOVEW (SCREEN WINDOW) \\MEDW.CREATEW (WINDOW STREAM REGION SCREEN \\DISPLAYDATA) \\MEDW.OPENW ( -WINDOW SCREEN STREAM PILOTBBT \\DISPLAYDATA BITMAP) \\PROCESS.GO.TO.SLEEP (EVENT FX) -\\TEXTCLOSEF-SUBTREE (PCTNODE PIECE) HEIGHTIFWINDOW (SCREEN) PUTMENUPROP (MENU) %ASET1 (ARRAY-HEADER) -\\HCPYMODEDSPPRINTCHAR (CHARTABLE) %AREF1 (ARRAY-HEADER) EXTENDPASTHORIZBOUNDARIES (REGION) -RESET.INTERRUPTS (KEYACTION) \\IS.NOT.RANDACCESSP (STREAM) FB.MAKE.BROWSER.BUSY (FILEBROWSER) -CURRENTINTERRUPTS (KEYACTION) BRACKET.CURRENT.WORD (LINE CHARTABLE) \\FILE.WONT.OPEN (STREAM) -DEFINEFONT.IP (STREAM) \\PRINDATUM (READTABLEP) TEDIT.RESET.EXTEND.PENDING.DELETE (SELECTION TEXTOBJ) -PROCESS.NAME (PROCESS) IN/SCROLL/BAR? (WINDOW REGION) \\PSC.SYMBOLS (STREAM FONTDESCRIPTOR) -\\POP.N.UFN (FX) HEADINGOP.IP (STREAM) GRAPHOBJ.DISPLAYFN (REGION) \\AB.BACK (ARRAYBLOCK) IDLE.BITMAP -(REGION) \\ONSCREENCLIPPINGREGION (SCREEN WINDOW STREAM) \\TFBRAVO.INIT.PARALOOKS (FMTSPEC) -BRHC/LAYOUT/TERMINAL (GRAPHNODE) \\CLOSEF.PRESS (STREAM) \\RETCALL (IFPAGE) |\\PFCreateVols| (ARRAYP -|LogicalVolumeDescriptor|) GETMENUPROP (MENU) PRIN3 (READTABLEP) \\ADDBASE (FIXP) \\GETBASEBYTE (WORD) - \\TEDIT.FIXDELSEL (SELECTION) MSSUBJTYPE (CVERB MSVERB) GRAPHEROBJ (REGION) DSPRUBOUTCHAR (STREAM) -TWODINSPECT.ARRANGEWINDOWS (POSITION REGION) CL::%EQCODEP (COMPILED-CLOSURE CL:SYMBOL) -POSTSCRIPT.GETFONTID (FONTID) \\TEDIT.DELETE (SELECTION TEXTOBJ LINEDESCRIPTOR) FB.MAYBE.INSERT.FILE ( -FILEBROWSER FBFILEDATA) \\NSRANDOM.SETEOFPTR (BYTEPTR) OPENWP (WINDOW) SHOWSTACKBLOCKS (STK FSB FX BF -FNHEADER) INVERT.LONG.SEGMENT (MOUSEPOS LINE) MB.NB.WHENOPERATEDFN (SELECTION) DINFO (DINFOGRAPH) -PROCESS.BACKTRACE (REGION PROCESS) FB.FINISH.COMMAND (FILEBROWSER MENU) \\SLOWIDIFFERENCE (FIXP) -INVERT.SEGMENT (LINE) MSCOMMAND (MSSETPHRASE) TWODINSPECT.ADJUSTSELECTION (TWOD.SELECTION) -\\SLOWITIMES2 (FIXP) \\FDEVINSTANCE (FDEV) \\FILLINXIP (NSOCKET NSADDRESS NSHOSTNUMBER) -\\SLOWIQUOTIENT (FIXP) SAMECLOOKS (CHARLOOKS) MAKEHARDCOPYMODESTREAM (STREAM) \\10MB.GETPACKETLENGTH ( -|Dove.EtherIOIOCB|) \\CHARWIDTH.PRESS (STREAM CHARSETINFO) RIGHTW.REPAINTFN (REGION) -|\\PFInitFileDescriptors| (|PhysicalVolumeDescriptor| |FileDescriptor| |SubVolumeDesc|) -\\SLOWHDCPYBLTCHAR (STREAM FONTDESCRIPTOR \\DISPLAYDATA PILOTBBT BITMAP CHARSETINFO) BMOBJ.PUTFN ( -BITMAPOBJ) IREMAINDER (FIXP) \\SLOWLLSH1 (FIXP) DSPSCROLL (STREAM) \\SLOWLLSH8 (FIXP) -DELETE.LONG.SEGMENT (MOUSEPOS) SEDIT::MARKASCHANGEDFN (SEDIT::EDIT-CONTEXT) \\SLOWLRSH1 (FIXP) -MB.MARGINBAR.SELFN (REGION) MENUDESELECT (MENU) \\TEDIT.TEXTBIN.STRINGSETUP (STRINGP ARRAY-HEADER -STREAM TEXTSTREAM) \\MAKEPCTB (BTREENODE PIECE) \\SLOWLOGOR2 (FIXP) |\\PFCreatePhysicalVolume| ( -|PhysicalVolumeDescriptor| |Page|) \\TEDIT.WINDOW.OPS (TEXTOBJ) \\CREATEW1 (REGION SCREEN) -ONED.TRACKCURSOR (ONED.SELECTION) \\TEDIT.COPY.PIECEMAPFN (PIECE TEXTOBJ) \\SLOWLOGXOR2 (FIXP) -DIRECTORYNAME (FDEV) COMP.TRANSFORM (JUMP) DELETE.LONG.SEGMENT1 (LINE) ONEDINSPECT.ARRANGEWINDOWS ( -POSITION REGION) \\PRINT-USING-ADDRESS (READTABLEP) SHOWSHADE.IP (REGION) \\CHANGECHARSET.HDCPYDISPLAY - (CHARSETINFO) GRAPHOBJ.IMAGEBOXFN (REGION GRAPHNODE) VECTOR-LENGTH (ARRAY-HEADER) DSPEOLFN (STREAM -\\DISPLAYDATA) \\SLOWIPLUS2 (FIXP) COURIER.READ.STRING (STRINGP ARRAY-HEADER) \\AB.NEXT (ARRAYBLOCK) -BRHC/LAYOUT/DAUGHTERS (GRAPHNODE) TEDIT.DELETE (TEXTOBJ) \\UNBOXFLOAT2 (FX FLOATP) FB.COPY/RENAME.MANY - (FILEBROWSER FBFILEDATA) MOVEW (SCREEN WINDOW) \\BITBLT.IP (INTERPRESSDATA IPSTREAM REGION) -MENUSELECT (MENU) \\TEDIT.TEXTBIN.FILESETUP (STREAM TEXTSTREAM BYTEPTR PIECE) SHRINKW (SCREEN WINDOW) -SHIFTDOWNP (KEYBOARDEVENT) CREATEW1 (SCREENREGION REGION SCREEN) %AREF2 (TWOD-ARRAY GENERAL-ARRAY -ARRAY-HEADER) SCREENBITMAP (SCREEN WINDOW) \\COURIER.CHECK.PROCEDURES (COURIERFN) %ASET2 (TWOD-ARRAY -GENERAL-ARRAY ARRAY-HEADER) BURYW (SCREEN WINDOW) \\SLOWIGREATERP (FIXP) %EXTEND-ARRAY (ARRAY-HEADER -TWOD-ARRAY) \\SLOWLRSH8 (FIXP) \\SLOWFGREATERP (FLOATP FIXP) MSPARSE (CONJUNCTION PARSED MSVERB) -\\SPP.CLEANUP (SPPCON FDEV) DIRECTORYNAMEP (FDEV) EQUAL (FIXP STACKP) HOSTNAMEP (FDEV) -DO.SHIFTED.SELECTION (MOUSEPOS LINE) \\UNBOXFLOAT1 (FX FLOATP) \\BOXIPLUS (FIXP) \\BOXIDIFFERENCE ( -FIXP) SUBATOM (LITATOM STRINGP ARRAY-HEADER) \\HDCPYBLTCHAR (\\DISPLAYDATA) %ALTER-AS-DISPLACED-ARRAY -(ARRAY-HEADER GENERAL-ARRAY) \\TEDIT.APPLY.PARASTYLES (TEXTOBJ FMTSPEC) \\FINDPIECE (PCTNODE) -TB.NTH.ITEM (TABLEBROWSER TABLEITEM) \\BACKFILEPTR (FDEV) \\SLOWLOGAND2 (FIXP) SEDIT::SET-SELECTION-QUOTE - (SEDIT::EDIT-NODE) CL:FILL-POINTER (ARRAY-HEADER) CL:ADJUSTABLE-ARRAY-P (ARRAY-HEADER) -%ALTER-AS-DISPLACED-TO-BASE-ARRAY (GENERAL-ARRAY) \\BINS (FDEV) TEDIT.SUBLOOKS (TEXTOBJ PIECE) -EXTENDABLE-ARRAY-P (ARRAY-HEADER) COMP.RETFROM.POINT (COMP) \\TEDIT.NEXT.LINE.BOTTOM (FMTSPEC -LINEDESCRIPTOR) CURSOR.INIT (BITMAP) \\TERMINATESPP (SPPCON) SEDIT::SET-SELECTION-LIST (SEDIT::STRING-ITEM - SEDIT::EDIT-NODE) TTYINBUFFERBACKPTR (TTYINBUFFERSTREAM STREAM) FB.GET.NEW.FILE.SPEC (FILEBROWSER) -INSPECT/AS/FUNCTION (FX STACKP) UNPACKFILENAME.STRING (STRINGP ARRAY-HEADER) \\POSTSCRIPT.ACCENTFN ( -STREAM \\POSTSCRIPTDATA STRINGP ARRAY-HEADER) CL:ARRAY-DIMENSION (ARRAY-HEADER GENERAL-ARRAY) -FB.COUNT.FILE.CHANGE (FBFILEDATA FILEBROWSER) \\TEDIT.CHANGE.LOOKS (TEXTOBJ CHARLOOKS FONTCLASS PIECE) - ARRAY-NEEDS-INDIRECTION-P (ARRAY-HEADER) SEDIT::ATOM-CHANGE-RELINEARIZE (SEDIT::BROKEN-ATOM) -\\COURIER.CHECKDEF (COURIERPGM) \\DISPLAYLINE (THISLINE TEXTOBJ FMTSPEC LINEDESCRIPTOR STREAM ARRAYP) -MSSEEKPHRASE (PARSED CONJUNCTION MSVERB) TEDIT.PROMPTPRINT (TEXTOBJ) \\TEDIT.REOPEN.STREAM (TEXTOBJ -PIECE) SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::EDIT-NODE) \\BUFFERED.COPYBYTES (FDEV) \\LINEBLT ( -PILOTBBT) TEDIT.UNDO.PARALOOKS (TEXTOBJ PIECE) \\GETEOFPTR (FDEV) \\CHANGE-VISIBLE-REGION.IP ( -INTERPRESSDATA REGION FONTDESCRIPTOR) SEDIT::SCAN-STRING (SEDIT::EDIT-POINT READTABLEP) PUTCURSORPROP -(CURSOR) COPYCHARS (STREAM BYTEPTR FDEV) CHCON1 (STRINGP ARRAY-HEADER LITATOM) TEDIT.LOOKS (SELECTION -TEXTOBJ) %DO-LOGICAL-OP (PILOTBBT) \\TEDIT.FLUSH.UNUSED.LOOKS (TEXTOBJ CHARLOOKS FMTSPEC PIECE) -\\COURIER.CHECK.ERRORS (COURIERERR) SEDIT::SHIFT-LINEAR-FORM (SEDIT::WEAK-LINK) GTHASHFILE (|HashFile| -) \\BOUTS (FDEV) MSSETREP (MSSETPHRASE) BRHC/LAYOUT (GRAPHNODE) BIT-ARRAY-P (ARRAY-HEADER) DISCARDXIPS - (NSOCKET) \\SETFILEPTR (FDEV) \\POSTSCRIPT.ACCENTPAIR (STREAM \\POSTSCRIPTDATA STRINGP ARRAY-HEADER) -\\CREATEPIECEORSTREAM (STRINGP ARRAY-HEADER STREAM PIECE) \\STRINGWIDTH.HCPYDISPLAYAUX (LITATOM -PNAMEBASE CHARSETINFO READTABLEP STRINGP ARRAY-HEADER) EQUAL-DIMENSIONS-P (ARRAY-HEADER GENERAL-ARRAY -TWOD-ARRAY) COPYFILES (FDEV) RAIDROOTFRAME (IFPAGE) SEDIT::SET-POINT-QUOTE (SEDIT::STRING-ITEM) -DO.MOUSE (MOUSEPOS) GETCURSORPROP (CURSOR) COPYBYTES (BYTEPTR FDEV STREAM) \\FORMATLINE (TEXTOBJ -ARRAYP THISLINE TEXTSTREAM LINEDESCRIPTOR PIECE FONTCLASS STREAM CHARSETINFO PENDINGTAB) MSVERBTYPE ( -CVERB MSVERB MSSETPHRASE) BITSPERPIXEL (BITMAP SCREEN WINDOW) \\FIRSTNODE (BTREENODE) -\\DSPYPOSITION.PRESS (STREAM) TEDIT.UNDO.LOOKS (TEXTOBJ PIECE) \\DSPXPOSITION.PRESS (STREAM) -CURSORCREATE (POSITION) SEDIT::SET-POINT-LIST (SEDIT::STRING-ITEM SEDIT::EDIT-NODE) -ONEDINSPECT.ADJUSTSELECTION (ONED.SELECTION) \\INTERACTIVE.CLOSEW (WINDOW) \\DSPUNTRANSFORMREGION ( -REGION) \\CURSORUP (BITMAP CURSOR) \\POSTSCRIPT.SPECIALOUTCHARFN (STREAM) SEDIT::REPLACE-CHARS ( -READTABLEP STRINGP ARRAY-HEADER GENERAL-ARRAY) \\CURSOR-VALID-P (CURSOR) CL:ARRAY-HAS-FILL-POINTER-P ( -ARRAY-HEADER) RAIDSTACKCMD (IFPAGE FX) |\\UFStoOtherCopyMess| (FDEV) STKPOS (FX) TTYINBUFFEREOFP ( -TTYINBUFFERSTREAM STREAM) CURSORP (CURSOR) ADJUSTCURSORPOSITION (POSITION) \\CURSORPOSITION (IOPAGE) -EDITCALLERS (READER-ENVIRONMENT) \\SETUPGETCH (TEXTOBJ TEXTSTREAM EDITMARK STREAM PIECE) -TEDIT.SELECTED.PIECES (SELECTION TEXTOBJ PIECE) RESET/NODE/LABELSHADE (GRAPHNODE) SETFILEPTR (FDEV -BYTEPTR STREAM) SHOWBITMAP1.IP (BITMAP) \\DELETEPIECE (PIECE) \\POSTSCRIPT.PRINTSLUG (STREAM -\\POSTSCRIPTDATA FONTDESCRIPTOR) \\CHTOPCNO (PCTNODE) FB.MAKE.SUBDIRECTORY.ITEM (FBFILEDATA -FILEBROWSER) \\GETFTPCONNECTION (FTPCONNECTION) EOFP (FDEV STREAM) TEDIT.FORMATBOX (PAGEREGION -PAGEFORMATTINGSTATE TEXTOBJ REGION TEXTSTREAM LINEDESCRIPTOR) CURSORPOSITION (STREAM POSITION -\\DISPLAYDATA SCREENPOSITION SCREEN) FM.CHANGELABEL (FREEMENUITEM REGION) %FAST-COPY-BASE (PILOTBBT) -PAINTW.READCOMMAND (MENU) CURSORSCREEN (SCREEN) \\TEDIT.INSERT.PIECES (TEXTOBJ PIECE) FORCEOUTPUT ( -FDEV) \\VECFONTINIT (ARRAYP FONTDESCRIPTOR) TEDIT.REDO.PARALOOKS (TEXTOBJ SELECTION) -\\HDCPYDISPLAY.FIX.YPOS (\\DISPLAYDATA) \\FLUSH.OPEN.STREAMS (FDEV STREAM) FILEBROWSER (MENU REGION -FILEBROWSER) ACCESS-CHARSET (FDEV STREAM) TEDIT.DISPLAYTEXT (TEXTOBJ TEXTSTREAM STRINGP ARRAY-HEADER) -TEDIT.UNPARSE.PAGEFORMAT (PAGEREGION REGION) DISPLACED-ARRAY-P (ARRAY-HEADER) TTYINBUFFERPEEK ( -TTYINBUFFERSTREAM STREAM) MSFIXUPTYPES (PARSED SENTENCE MSSETPHRASE THAT NOT) ENDREAD? (CHARTABLE) -TB.UNDELETE.ITEM (TABLEITEM TABLEBROWSER) SEDIT::REPLACE-LIST (SEDIT::EDIT-NODE SEDIT::EDIT-SELECTION) - TEDIT.PUT.PCTB (TEXTOBJ STREAM PIECE STRINGP ARRAY-HEADER) MARK/GRAPH/NODE (GRAPHNODE) -EDITTOGGLELABEL (GRAPH) TEDIT.DO.BLUEPENDINGDELETE (TEXTOBJ SELECTION) RAIDSHOWFRAME (FX) RAIDCOMMAND -(LITATOM IFPAGE POINTER) COPY-ARRAY (ARRAY-HEADER) TB.INSERT.ITEM (TABLEBROWSER) \\FTP.PRINTPLIST ( -STRINGP ARRAY-HEADER LITATOM PNAMEBASE) %MAKE-DISPLACED-ARRAY (ARRAY-HEADER) GETEOFPTR (FDEV) -SEDIT::SET-INITIAL-SELECTION (SEDIT::EDIT-CONTEXT) \\BACKFORMAT (LINEDESCRIPTOR TEXTOBJ) LASTMOUSEY ( -STREAM) TTYINBUFFERREADP (TTYINBUFFERSTREAM STREAM) \\MAYBEPEEKNS (NSHOSTNUMBER) \\BIGNUM.LSH (BIGNUM) - LASTMOUSEX (STREAM) CURSOREXIT (SCREEN) TEDIT.REDO.LOOKS (TEXTOBJ SELECTION) -\\STRINGWIDTH.HDCPYDISPLAY (\\DISPLAYDATA CHARSETINFO) \\RSH (FIXP) READ-ONLY-ARRAY-P (ARRAY-HEADER) -\\OKTOCLOSEW (WINDOW) SAMEPARALOOKS (FMTSPEC) COPY-VECTOR (ARRAY-HEADER) CURSORHOTSPOT (POSITION) -GETFILEPTR (FDEV) \\PUTBASEFIXP.UFN (FIXP) GETMOUSESTATE (KEYBOARDEVENT) \\MAIKO.DISPLAYLINE (THISLINE - TEXTOBJ FMTSPEC LINEDESCRIPTOR STREAM ARRAYP) SEDIT::THROW-AWAY-CHANGES (SEDIT::EDIT-CONTEXT) -TB.MAP.ITEMS (TABLEBROWSER) INSPECT.INVERTSELECTION (INSPECT.SELECTION) \\WWCHANGESCREENSIZE (SCREEN) -\\SENDSPP (SPPCON SPPXIP) TEDITCHAT.CHARFN (CHAT.STATE TEXTOBJ) FILL-ARRAY (ARRAY-HEADER) -CL:SIMPLE-VECTOR-P (ARRAY-HEADER) TTYINBUFFERBIN (TTYINBUFFERSTREAM STREAM) REGIONONSCREEN (POSITION) -SPY.MERGE.CALLEES (SPYRECORD) CL:VECTOR-POP (ARRAY-HEADER) \\SETEOFPTR (FDEV) INSPECT/TYPELESS ( -ARRAYBLOCK) LAYOUTSEXPR1 (GRAPHNODE) EQDEFP (COMPILED-CLOSURE) CL:SIMPLE-BIT-VECTOR-P (ARRAY-HEADER) -\\TEDIT.HISTORYADD (TEXTOBJ TEDITHISTORYEVENT) FILING.CALL (COURIERFN) %AREF0 (ARRAY-HEADER) -\\SETDAYTIME0 (FIXP) MSJOINSET (SENTENCE MSSETPHRASE QUOTE) TEDIT.SELECT (TEXTOBJ SELECTION FMTSPEC -LINEDESCRIPTOR) \\MAKE.EXPEDITED.STREAM (STREAM XIP BASEBYTESTREAM) TTADJUSTWIDTH (LINE) TTADDTAB ( -LINE) RESET/NODE/BORDER (GRAPHNODE) \\TEDIT.WORD.BOUND (TEXTOBJ CHARTABLE) XCL:ROW-MAJOR-AREF ( -ARRAY-HEADER) DEFAULT.BACKGROUND.COPYFN (MENU) \\REGIONOVERLAPAREAP (REGION) \\TFBRAVO.APPLY.PARALOOKS - (TEXTOBJ FMTSPEC) %ASET0 (ARRAY-HEADER) CHARACTER.PRINT (READTABLEP) FB.UNDELETEALLCOMMAND ( -FILEBROWSER) \\READNUMBER.OUTLINEREGION (REGION) DELETEMENU (WINDOW MENU) TEDIT.SUBPARALOOKS (TEXTOBJ -PIECE) SPY.DUMP.BUFFER (SPYRECORD) \\LEAF.TIMEDOUT.EXCESSIVE (SEQUIN STREAM LEAFDATA) -\\LEAF.SETFILETYPE (LEAFDATA LEAFSTREAM) CHAT.LOGIN (CHAT.STATE) PAINTW.READMODE (MENU) -CHAT.TYPESCRIPT1 (CHAT.STATE) CHARLOOKS.FROM.FONT (CHARLOOKS) CL::ROW-MAJOR-ASET (ARRAY-HEADER) -\\AREAINREGIONP (REGION) \\TEDIT.GET.SINGLE.PARALOOKS2 (FMTSPEC) COURIER.BROADCAST.CALL (ROUTING) -FB.UNDELETE.FILE (FILEBROWSER FBFILEDATA) TEDIT.SET.SEL.LOOKS (SELECTION) DOBACKGROUNDCOM (MENU) -TTYINBUFFERSTREAM (TTYINBUFFERSTREAM STREAM) BRH/OFFSET (GRAPHNODE) ADJUSTLINE (LINE) EDITTOGGLEBORDER - (GRAPH) UPDATE/MENU/IMAGE (WINDOW MENU REGION SCREEN BITMAP) PAINTW.READBRUSHSHAPE (MENU) ICMLARRAY ( -REGION) \\GENERIC.RENAMEFILE (FDEV) \\SW2BM (REGION BITMAP) \\HDCPYDISPLAY.FIX.XPOS (\\DISPLAYDATA) -SPY.ORIGINAL (SPYRECORD) \\LEAF.NOT.RESPONDING (SEQUIN STREAM) \\LOCATE.NSNET (ROUTING) -\\GENERIC.OPENP (FDEV STREAM) \\DSPRIGHTMARGIN.HDCPYDISPLAY (\\DISPLAYDATA) SPY.MAKE.TREE (SPYDATA -SPYRECORD) \\GENERIC.READP (FDEV STREAM CHARTABLE) INITUFNTABLE (OPCODE) CHAT.CLOSE (CHAT.STATE) -INFILECOM (FILEPKGCOM) PAINTW.READBRUSHSIZE (MENU) PRINTBITMAP (BITMAP) FILL.INCY (FILL.TBLE PILOTBBT) - \\TEDIT.SEL.CHANGED? (SELECTION) DINFO.SPECIAL.UPDATE (DINFOGRAPH DINFONODE) TTRATOM ( -TTYINBUFFERSTREAM STREAM) \\PUTFIXP (FIXP) FM.WHICHITEM (POSITION REGION FREEMENUITEM) SETY.IP (STREAM -) NEAREST/PT/ON/GRID (POSITION) NODELST/AS/MENU (GRAPHNODE) \\ATMOUT (LITATOM PNAMEBASE) -\\AREAVISIBLE? (SCREEN WINDOW) \\TEDIT.COMMAND.LOOP (STREAM TEXTSTREAM TEXTOBJ SELECTION STRINGP -ARRAY-HEADER GENERAL-ARRAY CHARTABLE) \\SETCARET (REGION TEXTOBJ) SEDIT::OUTPUT-CR (SEDIT::LINE-START) - FB.UNDELETECOMMAND (FILEBROWSER) SETUPSTACK (IFPAGE) GETHASH (HARRAYP HASHSLOT) -\\TEDIT.PUT.SINGLE.PARALOOKS2 (FMTSPEC) \\EOF.ACTION (STREAM) TTYIN.SHOW.?ALTERNATIVES (CHARTABLE) -CH.NAME.TO.STRING (NSNAME) \\EOSERROR (STREAM) \\BULK.DATA.CLOSE (FDEV STREAM) SPY.DELETE (SPYRECORD) -\\MAP-OPEN-STREAMS (FDEV) \\TEDIT.FIND.PROTECTED.START (TEXTOBJ CHARLOOKS PIECE) TEDIT.GET.OBJECT ( -TEXTSTREAM PIECE TEXTOBJ) \\INCFILEPTR (FDEV) BMOBJ.COPYFN (BITMAPOBJ) \\PUTSWAPPEDFIXP (FIXP) -TEDIT.ADD.MENUITEM (REGION MENU) TB.DELETE.ITEM (TABLEITEM TABLEBROWSER) MSSETSETTYPE (MSSETPHRASE -SENTENCE NOT CSET) TEDIT.EXTEND.SEL (SELECTION TEXTOBJ) DO.INSERT.LINE (LINE REGION) -\\TEDIT.NEUTRALIZE.PARALOOKS.MENU (SELECTION TEXTOBJ) SETYREL.IP (STREAM) EDITBMBUTTONFN (REGION -BITMAP MENU POSITION CURSOR) \\GENERIC.CHARSET (STREAM) \\TEDIT.PUT.SINGLE.CHARLOOKS2 (CHARLOOKS -FONTCLASS) LOADPOLY (POLYNOMIAL) \\BUFFERED.BIN (FDEV) \\PAGED.INCFILEPTR (BYTEPTR) GETDEFN (LITATOM) -\\NSFILING.GET/SETINFO (STREAM) \\EDIT.UPCARET (TEDITCARET) \\MAKEBRUSH.ROUND (BITMAP) -\\TEDIT.REFRESH.SHOWSEL (SELECTION TEXTOBJ) MOVD (LITATOM DEFINITIONCELL) U/L-CASE (LINE) -|\\VFMCreateIntervals| (ARRAYP) SETXYREL.IP (STREAM) GETGRIDBOXREGION (REGION \\DISPLAYDATA STREAM -POSITION) EDITMOVENODE (GRAPH) MAKEWITHINREGION (REGION) \\TEXTCLOSEF (TEXTOBJ PIECE) -ACCEPT-UNIX-SOCKET-STREAM (FDEV) \\BUFFERED.BINS (FDEV) \\HANDLE.RAW.XIP (FIXP NSOCKET) -\\BUFFERED.PEEKBIN (FDEV) SPY.SUM (SPYRECORD) \\IFS.LOOKUPFILE (PUPFILESERVER LOOKUPFILEDATA) MSDOES ( -MSVERB) \\BUFFERED.BOUT (FDEV) \\BUFFERED.BOUTS (FDEV) \\FTPERROR (STREAM) READ-AFM-FILE (PSCFONT MENU -) SHOWREGION (REGION) |\\VFMMarkBufferDirty| (\\BTREEBUF) FM.EDITITEM (FREEMENUITEM) |\\LFDeleteFile| -(DLIONSTREAM STREAM |FileDescriptor| FDEV) |\\PFReplaceString| (STRINGP ARRAY-HEADER) TB.EXPANDFN ( -TABLEBROWSER) SEDIT::INSERT-LIST (SEDIT::EDIT-SELECTION SEDIT::EDIT-POINT) PSCFONT.WRITEFONT (PSCFONT) - PPSPPSTREAM (SPPSTREAM) \\BOXFPLUSDIF (FIXP FLOATP) TEDIT.STREAMCHANGEDP (TEXTOBJ) MSKNOWN ( -MSSETPHRASE SENTENCE NOT CSET) DINFO.UPDATE.FMENU (DINFOGRAPH DINFONODE) \\BOXFTIMES2 (FIXP FLOATP) -PSCFONT.READFONT (PSCFONT) \\CHARWIDTH.HDCPYDISPLAY (CHARSETINFO \\DISPLAYDATA) \\SPP.SYSPKT (SPPCON -XIP SPPHEAD) SPY.MERGETREE (SPYRECORD) \\SEL.LINEDESC (SELECTION) \\BOXFQUOTIENT (FIXP FLOATP) NEWDEFC - (ARRAYP) \\LEAF.READFILEPROP (LEAFSTREAM LEAFDATA LEAFPACKET) |\\LFRenameFile| (FDEV STREAM -DLIONSTREAM |DFSFileSpec| |LeaderPage|) \\TEDIT.FIND.LAST.LINE (TEXTOBJ LINEDESCRIPTOR) -TEDIT.PUT.OBJECT (PIECE) \\LFINITCASEARRAY (ARRAYP) TTCOMPLETEWORD (CHARTABLE) |\\PFTransferFilePage| -(|FileDescriptor| |Label| |PhysicalVolumeDescriptor|) TTRUBOUT (LINE) \\FLOAT (FIXP) -|\\VFMCorrectBufferP| (\\BTREEBUF) |\\VFMDelete1| (|Buffer| |Interval| |Index|) SETX.IP (STREAM) -DSPXSCREENTOWINDOW (\\DISPLAYDATA STREAM) GRAPHEDITCOMMANDFN (MENU) TEDIT.UNDO.DELETION (PIECE TEXTOBJ - SELECTION) TYPE.BUFFER (COMPLEXCHAR) BRH/LAYOUT (GRAPHNODE) \\FILEOUTCHARFN (STREAM) \\ARGPTR ( -LITATOM FX BF FNHEADER) |\\VFMDelete2| (|Index| |Buffer|) FM.SHADE (FREEMENUITEM) TRACKNODE (GRAPH) -|\\LFTruncateFile| (DLIONSTREAM FDEV |LeaderPage| |FileDescriptor|) \\TEDIT.FIND.PROTECTED.END ( -TEXTOBJ CHARLOOKS PIECE) PARAMETRICSPLINE (POSITION) PUTDEFN (LITATOM CODEARRAY DEFINITIONCELL POINTER -) TEDITCHAT.MENUFN (CHAT.STATE) TB.FLUSH.WINDOW (TABLEBROWSER) COERCETEXTOBJ (STREAM TEXTSTREAM -TEXTOBJ PIECE) \\EDIT.DOWNCARET (TEDITCARET) DO.CHAT.OPTION (CHAT.STATE) TERM.MOVETO (CHAT.STATE) -\\INIT.ETHER.BUFFER.POOL (IFPAGE) DINFO.UPDATE.GRAPH.DISPLAY (DINFOGRAPH DINFONODE) SETXY.IP (STREAM) -XCL:ECHO-STREAM-INPUT-STREAM (STREAM) \\DSPFONT.HDCPYDISPLAY (STREAM CHARSETINFO) SPY.NEXT.TREE ( -SPYRECORD) \\LEAF.GETFILEINFO.OPEN (STREAM LEAFINFOBLOCK) \\IDLERKEYACTION (KEYACTION) IMAGESTREAMP ( -STREAM IMAGEOPS) CL:GET-DISPATCH-MACRO-CHARACTER (READTABLEP) XCL:TWO-WAY-STREAM-OUTPUT-STREAM (STREAM -) CREATE-UNIX-SOCKET-STREAM (FDEV) IMAGESTREAMTYPE (IMAGEOPS STREAM) \\SPP.CHECK.INPUT.QUEUE (SPPCON -SPPXIP) SETSTKNAME (FX FNHEADER) FB.NAMES.INCREASING.VERSION (FBFILEDATA) |\\LFGetFileInfo| ( -DLIONSTREAM STREAM |FileDescriptor| |LeaderPage|) INITGC (HTCOLL) SHRINK-VECTOR (ARRAY-HEADER) -\\INFINITY (FLOATP) \\GETREGION.CHECKOPPT (POSITION) CHAT.RESHAPEWINDOW (CHAT.STATE) -|\\LFCreateDirectories| (ARRAYP) XCL:ECHO-STREAM-OUTPUT-STREAM (STREAM) XCL:TWO-WAY-STREAM-INPUT-STREAM - (STREAM) TEDIT.REDO.INSERTION (TEXTOBJ PIECE SELECTION) DO-DISPATCH-MACRO (READTABLEP) \\FRAMESCAN ( -FNHEADER FX PVARSLOT BF) |\\VFMFreeVPage| (|LogicalVolumeDescriptor|) \\COPYFNHEADER (FNHEADER) -XCL:CONCATENATED-STREAM-STREAMS (STREAM) STKNTH (FX) CL:SET-DISPATCH-MACRO-CHARACTER (READTABLEP) -\\TEXTBIN (STREAM PIECE TEXTSTREAM) FB.DECREASING.VERSION (FBFILEDATA) DINFO.TOGGLE.GRAPH (DINFOGRAPH) - NARGS (LITATOM FNHEADER COMPILED-CLOSURE) DINFO.UPDATE.MENU.DISPLAY (DINFOGRAPH DINFONODE REGION MENU -) IMAGESTREAMTYPEP (STREAM IMAGEOPS) \\SETXFORM.PSC (\\POSTSCRIPTDATA REGION) XCL:SYNONYM-STREAM-SYMBOL - (STREAM) RESUME (FX) \\SLOWRETURN (FX) \\RESUME (FX) %DEFPRINT-ARRAY (READTABLEP) -XCL:BROADCAST-STREAM-STREAMS (STREAM) \\LEAF.SETVALIDATION (STREAM LEAFINFOBLOCK LEAFSTREAM) -\\SPREADFRAMEP (BF FX) \\INTERPFRAMENT (FX) \\DSKDISPLAY.RESHAPEFN (REGION) TTNTHLINE (LINE) SETSTKARG - (FNHEADER BF FX PVARSLOT) SETXREL.IP (STREAM) \\SEL.LIMIT (SELECTION) \\TEXTBOUT (TEXTSTREAM TEXTOBJ -PIECE STREAM STRINGP ARRAY-HEADER) \\TEDIT.PUT.SINGLE.PARALOOKS (FMTSPEC) STKARGNAME (FNHEADER FX BF -PVARSLOT) \\CURVE2 (SPLINE \\DISPLAYDATA BITMAP) COURIER.READ.BULKDATA (STREAM) %DEFPRINT-BITVECTOR ( -READTABLEP) %DEFPRINT-GENERIC-ARRAY (READTABLEP) SETSTKARGNAME (FNHEADER FX BF) \\TEDIT2 (TEXTSTREAM -STREAM TEXTOBJ) %DEFPRINT-VECTOR (READTABLEP) DINFO.TOGGLE.MENU (DINFOGRAPH) DINFO.UPDATE.TEXT.DISPLAY - (DINFOGRAPH DINFONODE) TTNLEFT (LINE) TEDIT.WORDGET (CHARTABLE) STKNARGS (FX FNHEADER BF) STKSCAN (FX -) %DEFPRINT-STRING (READTABLEP) CREATEMENUEDWINDOW (MENU REGION) TEDIT.FIND.OBJECT (PIECE) -\\BITMAPTOSCREEN (SCREEN) SLICESET (ICML.ARRAYSLICE) LOOKUP-SYMBOL (ONED-ARRAY) DSPYSCREENTOWINDOW ( -\\DISPLAYDATA STREAM) REOPENTEXTSTREAM (STREAM) TEDIT.UNDO.INSERTION (TEXTOBJ SELECTION) |\\VFMFind| ( -|Interval| |Index| |Buffer|) SPY.MAX (SPYRECORD) \\TEDIT.STRIKEOUT.CARET.OFF (TEXTOBJ) -\\LEAF.REPAIR.BROKEN.PUP (STREAM LEAFSTREAM LEAFDATA LEAFPACKET) |\\LFGetFileName| (|DFSFileSpec|) -UNIX-STREAM-EOFP-NEW (STREAM) PRINTSPP (XIP SPPHEAD) DMCHAT.HANDLE.WRAP (CHAT.STATE DM2500.STATE) -TTYIN.BALANCE (CHARTABLE) TEDIT.FIND.OBJECT.SUBTREE (PCTNODE PIECE) CHAT.BUTTONFN (CHAT.STATE) -FIND.PACKAGE (HARRAYP HASHSLOT) \\POLYSHADE.BLT (SCAN) FB.SORT.VERSIONS (FBFILEDATA) %NUMERIC-STRING-P - (STRINGP ARRAY-HEADER) COMP.STTAG (TAG JUMP) FB.DELVER.FILES (FBFILEDATA) DINFO.TOGGLE.TEXT ( -DINFOGRAPH) \\NSFILING.WHENCLOSED (FDEV) DINFO.UPDATE.HISTORY (DINFOGRAPH DINFONODE) TTNTH (LINE) -ONEDINSPECTW.CREATE (REGION POSITION) TEDIT.SETSYNTAX (TEXTOBJ STREAM TEXTSTREAM) \\FAST4BIT (NIBBLE) -\\GETREGION.CHECKBASEPT (POSITION) HASH-DOT (READTABLEP) SIZE/GRAPH/WINDOW (REGION) |\\LFReadPages| ( -DLIONSTREAM) \\ITEMW.FLIPCOPY (SELECTABLEITEM) FIXR (FIXP FLOATP) FM.REDISPLAYITEM (FREEMENUITEM -REGION) \\CONVERTNUMBER (READTABLEP) UNIX-STREAM-CLOSE (FDEV) TB.CLOSE/SHRINK (TABLEBROWSER) -MAKEFLOATNUMBER (FLOATP) BITMAPWIDTH (BITMAP WINDOW) TERM.HOME (CHAT.STATE) SET-FILL-POINTER ( -ARRAY-HEADER) |\\LFExtendFile| (DLIONSTREAM |FileDescriptor|) COPY.WINDOW.TO.BITMAP (REGION) -BITMAPHEIGHT (BITMAP WINDOW) \\GOOD.DASHLST (BRUSH) PARSE-NAMESTRING1 (STREAM) UNMAKEHARDCOPYSTREAM ( -STREAM) \\FILLINSPP (XIP SPPHEAD) SPY.MERGE (SPYDATA SPYRECORD) \\TEDIT.STRIKEOUT.CARET.ON (TEXTOBJ) -EXPANDING-PAGEFULLFN (REGION) COMP.STJUMP (TAG) \\HDCPYDSPPRINTCHAR (CHARTABLE) SPY.MERGEINFO (SPYDATA -) \\TEDIT.UNDERLINE.CARET.OFF (TEXTOBJ) CL:VECTOR-PUSH (ARRAY-HEADER) \\ADDLEAFSTRING (LEAFDATA -LITATOM STRINGP ARRAY-HEADER) |\\LFSetFileInfo| (DLIONSTREAM STREAM |FileDescriptor| |LeaderPage|) -LINELENGTH (STREAM) CHAT.SWITCH.EMACS (CHAT.STATE) DMCHAT.ADDRESS (DM2500.STATE) DINFO.TOGGLE.HISTORY -(DINFOGRAPH) TTLASTLINE (LINE) FM.RESETSHAPE (REGION) TEDIT.GETSYNTAX (CHARTABLE TEXTOBJ STREAM -TEXTSTREAM) PPSPP (SPPCON STREAM) FLTSTR (FIXP FLOATP ARRAY-HEADER) TEDIT.EDIT.OBJECT (TEXTOBJ STREAM -TEXTSTREAM SELECTION LINEDESCRIPTOR) SEDIT::COMPUTE-POINT-POSITION-LIST (SEDIT::LINE-START) -TYPE-VARIABLE-FROM-TYPE-NAME (CL:SYMBOL STRINGP ARRAY-HEADER) \\TEDIT.PAPERWIDTH (TEDITPAPERSIZE) -TIMESPOW10 (EFPN) INSTALLBRUSH (BRUSHITEM) |\\LFWritePages| (STREAM DLIONSTREAM) DOWINDOWCOM (WINDOW -MENU) UNIX-BACKFILEPTR-NEW (STREAM) GETPROMPTWINDOW (REGION) |\\DSKCreateDevice| (FDEV) TERM.PRINTCHAR - (CHAT.STATE STREAM \\DISPLAYDATA) MSSOLVE (SENTENCE INRELATION MSSETPHRASE) FLTINTLOG (EFPN) -SPY.MAKEGRAPHNODES (SPYRECORD SPYDATA) \\TEDIT.UNDERLINE.CARET.ON (TEXTOBJ) \\LEAF.USE.NEW.CONNECTION -(LEAFDATA LEAFPACKET STREAM LEAFSTREAM) \\PARSE.REMOTE.FILENAME (LEAFDEVICE) OLD.FIND.SYMBOL ( -PNAMEBASE PNAMEINDEX LITATOM) HASH-COMMA (READTABLEP) \\TEDIT.PAPERHEIGHT (TEDITPAPERSIZE) -FB.DELVERCOMMAND (FILEBROWSER FBFILEDATA) TTNEXTLINE (LINE) SETFONT.IP (STREAM) RPLCHARCODE (STRINGP -ARRAY-HEADER) EDITGRAPH2 (GRAPH) MENUWINDOW (MENU) SYMBOL.PACKAGE (LITATOM ONED-ARRAY) -\\UFS.UNREGISTER.GFS (UFSGENFILESTATE) SLICEDIMENSION (ICML.ARRAYSLICE) \\CURVESLOPE (POSITION SPLINE) - \\MAKEFRAME (LITATOM FNHEADER) INTTOEXT (FIXP) GETXIP (NSOCKET) \\SET.VMEM.FULL.STATE (IFPAGE) -TTECHO.TO.FILE (LINE COMPLEXCHAR) TWODINSPECTW.CREATE (REGION POSITION) DRAWLINE (IMAGEOPS STREAM) -DIGITSBDP (FIXP FLOATP) \\TEDIT.GET.SINGLE.PARALOOKS (FMTSPEC) \\UNVISIBLE.PAGED.REVALIDATEFILELST ( -FDEV STREAM) \\SELITEM.FROM.PROPERTY (SELECTABLEITEM) \\FAULTINIT (IFPAGE LITATOM) \\D01.FAULTINIT ( -IFPAGE FIXP) \\UNVISIBLE.FLUSH.OPEN.STREAMS (FDEV STREAM) \\DOVE.FAULTINIT (IFPAGE FIXP) NSOCKETNUMBER - (NSOCKET) \\MAIKO.PUNTBLTCHAR (\\DISPLAYDATA PILOTBBT) MAKEHARDCOPYSTREAM (STREAM) \\DL.FAULTINIT ( -IFPAGE) SPY.UPDATE.TITLE (GRAPH SPYRECORD GRAPHNODE) \\TEDIT.SUPERSCRIPT.CARET (TEXTOBJ) -\\LEAF.READFILENAME (PUPFILESERVER) SLICEREF (ICML.ARRAYSLICE) SQRT (FLOATP) GET.OBJ.FROM.USER ( -TEXTOBJ) MB.THREESTATE.WHENOPERATEDFN (SELECTION) |\\UFSCreateDevice| (FDEV) DSPBACKCOLOR (IMAGEOPS -STREAM) DSPBOTTOMMARGIN (IMAGEOPS STREAM) MOVETO (IMAGEOPS STREAM) \\TEDIT.PARSE.CHARLOOKS.LIST ( -CHARLOOKS) |\\UFSGenerateFiles| (FDEV) |\\UFSDirectoryNameP| (FDEV) |\\LFOpenFile| (DLIONSTREAM STREAM - |FileDescriptor| |LeaderPage|) PRETTYCOM (FILEPKGCOM FILEPKGTYPE) |\\UFSWritePages| (STREAM UFSSTREAM -) DSPCOLOR (IMAGEOPS STREAM) CHAT.ENDOFSTREAMOP (STREAM) |\\UFSOpenFile| (FDEV STREAM UFSSTREAM) -CHAT.TYPESCRIPT (CHAT.STATE) TERM.ADDLINE (CHAT.STATE) |\\UFSReadPages| (UFSSTREAM STREAM) -DSPCLIPPINGREGION (REGION IMAGEOPS STREAM) |\\UFSSetFileInfo| (FDEV STREAM UFSSTREAM) CRITSECT (SCAN) -FB.DELETE.FILE (FILEBROWSER FBFILEDATA) GETMENUITEM (MENU) DINFO.SETUP.WINDOW (DINFOGRAPH) -|\\UFSGetFileInfo| (FDEV STREAM UFSSTREAM) POSTSCRIPT.PUTBITMAPBYTES (ARRAYP) MB.THREESTATE.SHOWSELFN -(SELECTION) \\TEDIT.ITALIC.CARET.ON (TEXTOBJ) \\FIXPASSWORD (SEQUIN) |\\LFGenerateFiles| ( -PARSEDFILENAME STRINGP ARRAY-HEADER |LogicalVolumeDescriptor| DLIONSTREAM |FileDescriptor|) -\\D01.ASSIGNBUFFERS (IFPAGE) \\COPYSEL (SELECTION) FM.RESETSTATE (FREEMENUITEM) -\\NSRANDOM.PREPARE.CACHE (NSPAGECACHE) \\SPPWATCHER (SPPCON) INCORNER.REGION (REGION) -|\\LFExtendFileIfNecessary| (|FileDescriptor| DLIONSTREAM) OPT.CHECKTAG (TAG) TERM.DOWN (CHAT.STATE) -TTDELETECHAR (LINE) \\PARSE.PORTCONSTANT (STRINGP ARRAY-HEADER) |\\VFMSplit1| (|Index| |Interval| -|Buffer|) TEDIT.INCLUDE (TEXTOBJ SELECTION BTREENODE) |\\UFSCloseFile| (STREAM UFSSTREAM FDEV) -TEDIT.PARSE.PAGEFRAMES1 (PAGEREGION) GRAPHDELETENODE (GRAPH) TTDELETEWORD (LINE) -\\TEDIT.PARSE.PARALOOKS.LIST (FMTSPEC) TEDIT.GET (TEXTOBJ LINEDESCRIPTOR BTREENODE SELECTION LITATOM) -|\\UFSDeleteFile| (FDEV) FM.HIGHLIGHTITEM (FREEMENUITEM) EDITDELETENODE (GRAPH) |\\LFEventFn| (FDEV) -\\NSRANDOM.FETCH.CACHE (NSPAGECACHE) \\MEDW.CARET.SHOW (CARET1 STREAM CURSOR BITMAP \\DISPLAYDATA -REGION) |\\LFReturnNextFile| (|GenerateFileState| |GeneratedFile|) DSPLINEFEED (IMAGEOPS STREAM) -DMCHAT.NEWLINE (CHAT.STATE DM2500.STATE) DSPRESET (IMAGEOPS STREAM) \\UFS.FULLNAME (FDEV) -\\TEDIT.APPLY.PARALOOKS (SELECTION TEXTOBJ MARGINBAR) \\BN.FROM.FIXP (BIGNUM) \\PS.BOUTFIXP (ARRAYP -\\POSTSCRIPTDATA STREAM) |\\LFRemoveDirEntry| (DLIONSTREAM FDEV STREAM) MB.THREESTATEBUTTON.FN ( -SELECTION) \\TEDIT.SUBSCRIPT.CARET (TEXTOBJ) \\CLOSELEAFCONNECTION (SEQUIN LEAFDEVICE) -\\FM.EDIT-DELETE (FREEMENUITEM REGION) SEDIT::ASSIGN-FORMAT-QUOTE (SEDIT::LIST-FORMAT) DSPLEFTMARGIN ( -IMAGEOPS STREAM) DSPRIGHTMARGIN (IMAGEOPS STREAM) TB.MAP.SELECTED.ITEMS (TABLEBROWSER TABLEITEM) -|\\LFDirectoryNameP| (PARSEDFILENAME |LogicalVolumeDescriptor|) \\UFS.OPENP (FDEV UFSSTREAM) -\\NSFILING.EVENTFN (FDEV STREAM) \\GTREADTABLE1 (READTABLEP) |\\UFSTruncateFile| (STREAM FDEV -UFSSTREAM) TB.SHOW.COPY.SELECTION (TABLEBROWSER) GETSYNTAX (TERMTABLEP CONTEXTS WAKEUPS ESCAPES) -\\UFS.ADD.HOST.FIELD (FDEV) TERM.DELCHAR (CHAT.STATE) \\GTTERMTABLE (TERMTABLEP) \\FM.EDIT-WORDDELETE -(FREEMENUITEM REGION) VERBNOTICELIST (CVERB VPART) |\\VFMCreateVPage| (|LogicalVolumeDescriptor| -|PageGroup|) FM.CHANGESTATE (FREEMENUITEM REGION) \\DEVICEFILE.EOSERROR (STREAM BUFFER UFSSTREAM) -\\UFS.REMOVE.HOST.FIELD (FDEV) DSPFONT (IMAGEOPS STREAM) |\\LFReturnInfo| (|GeneratedFile| -|GenerateFileState|) TEDIT.BUILD.PCTB (TEXTOBJ STREAM PIECE) FB.UPDATE.COUNTERS (FILEBROWSER) -\\INIT.POWERS.OF.TEN (EFPN) \\UPDATE.PSC (\\POSTSCRIPTDATA) \\TEDIT.COPYINSERTFN (TEXTOBJ) -POSTSCRIPT.SHOWACCUM (STREAM \\POSTSCRIPTDATA) \\GETREADSYNTAX (CHARTABLE CONTEXTS WAKEUPS ESCAPES) -DSPSPACEFACTOR (IMAGEOPS STREAM) ASKUSER1 (ASKUSER) CL:BIT-VECTOR-P (ARRAY-HEADER) DSPOPERATION ( -IMAGEOPS STREAM) \\GETTERMSYNTAX (CHARTABLE) DSPXPOSITION (IMAGEOPS STREAM) \\LEAF.ERROR ( -LEAFERRORDATA STREAM) DSPSCALE (IMAGEOPS STREAM) CENTERPRINTINREGION (REGION) WINDOWWORLD (SCREEN) -DSPYPOSITION (IMAGEOPS STREAM) TTYINENTRYFN (TTYINWINDOWSTATE) \\INITBFS (IFPAGE) -\\DSKDISPLAY.REPAINTFN (|LogicalVolumeDescriptor|) START.OF.PARAGRAPH? (LINE COMPLEXCHAR) \\LOOKUPPORT - (PORT) CL:ARRAY-DIMENSIONS (ONED-ARRAY TWOD-ARRAY GENERAL-ARRAY) \\SPP.SENDPKT (SPPCON XIP SPPHEAD) -\\TEDIT.CARETLOOKS.VERIFY (TEXTOBJ) WINDOWSIZE (REGION) DSPROTATE (IMAGEOPS STREAM) -\\NSRANDOM.READ.SEGMENT (STREAM) \\MAIKO.DO.MOVDS (LITATOM DEFINITIONCELL) \\UFS.DIRECTORY.NAME (FDEV) - TEDIT.HARDCOPYFN (TEXTOBJ) SKIP/ZAP (TTYINBUFFER) SCROLL.HANDLER (WINDOW) \\BLTSHADE.GENERICPRINTER ( -REGION) \\COERCEASCIITONSFONT (ARRAYP CHARSETINFO) DSPTOPMARGIN (IMAGEOPS STREAM) \\ALLOCMINIMUMSIZES -(RESHAPINGWINDOWDATA) \\STRINGOUT (STRINGP ARRAY-HEADER) DSPPOPSTATE (IMAGEOPS STREAM) FSETVAL ( -LITATOM) OPENNSOCKET (NSOCKET FIXP) \\CHAIN.UP.RPT (RPT) TEDIT.PAGEFORMAT (PAGEREGION TEXTOBJ) -\\M-VMEMSAVE (IFPAGE) \\FM.EDIT-BACKUP (REGION FREEMENUITEM) MSINTERPRET (SENTENCE MSSETPHRASE -MSANALYZABLE THAT PATHOPTIONS) \\MAIKO.ASSIGNBUFFERS (IFPAGE POINTER) SETSYNTAX (READTABLEP TERMTABLEP -) SETCOLOR16.IP (BITMAP) TRIM.BITMAP (BITMAP) \\SETTERMSYNTAX (CHARTABLE) |\\UFSRenameFile-C| (FDEV) -\\FLUSHNSOCQUEUE (NSOCKET) \\SETREADSYNTAX (CHARTABLE READTABLEP) CHAT.TYPEOUT (CHAT.STATE RING) -POSTSCRIPT.CLOSESTRING (STREAM \\POSTSCRIPTDATA) DINFO.TITLEMENUFN (DINFOGRAPH) OPT.JFIXPASS (TAG) -TERM.LEFT (CHAT.STATE) SYNTAXP (CHARTABLE CONTEXTS WAKEUPS ESCAPES) DSPSCALE2 (IMAGEOPS STREAM) -ASKUSER$ (ASKUSER) \\NSRANDOM.CHECK.CACHE (NSPAGECACHE) NEARESTCORNER (REGION) -|\\UFStoOtherRenameMess| (FDEV) \\TEDIT.GET.INSERT.CHARLOOKS (TEXTOBJ SELECTION PCTNODE CHARLOOKS -PIECE) \\NSFILING.LOGIN (FDEV) START.NEW.LINE (LINE) \\MAPCHARTABLE (CHARTABLE) COPYATOM (STRINGP -ARRAY-HEADER) \\TEXTSTREAM.FILENAME (STREAM TEXTOBJ) \\BUILDATWSTRUCTURE (REGION) DSPTRANSLATE ( -IMAGEOPS STREAM) DSPDEFAULTSTATE (IMAGEOPS STREAM) |\\LFFindNextFile| (FDEV) DINFO.GET.FILENAME ( -DINFONODE DINFOGRAPH) OPT.JLENPASS (TAG) TERM.ERASE.TO.EOL (CHAT.STATE) |\\UFSDeleteFile-C| (FDEV) -DSPNEWPAGE (IMAGEOPS STREAM) ONFILE (MSANALYZABLE) FB.DELETECOMMAND (FILEBROWSER) -\\MEDW.GETSCREENREGION (REGION POSITION) \\LEAF.GETFILEDATES (LEAFSTREAM) TEDIT.SHOWSEL (TEXTSTREAM -SELECTION TEXTOBJ) \\UFS.HANDLE.RELATIVEDIRECTORY (FDEV) NORMSECT (SCAN BRES) \\TEDIT.PARABOUNDS ( -TEXTOBJ PIECE) INVERT.BITMAP.VERTICALLY (BITMAP) \\LEAF.HANDLE.INPUT (SEQUIN LEAFDATA LEAFERRORDATA -LEAFPACKET STREAM LEAFSTREAM) \\DL.NEWFAULTINIT (IFPAGE IOPAGE RPT VMEMFLAGS) |\\PFTrimHelper| ( -|FileDescriptor| |PageGroup|) DINFO.OPENTEXTSTREAM (DINFOGRAPH) CHAT.EMACS.MOVE (CHAT.STATE) -DMCHAT.CLEAR (CHAT.STATE) \\GETBRUSHBBT (BITMAP PILOTBBT \\DISPLAYDATA) DINFO.READ.GRAPH (DINFOGRAPH) -SETTAIL? (LINE) |\\VFMMerge1| (|Interval| |Buffer| |Index|) DSPPUSHSTATE (IMAGEOPS STREAM) -|\\LFHighestVersions| (|GeneratedFile|) FM.ITEMPROP (FREEMENUITEM) \\TOTALFIXEDHEIGHT ( -RESHAPINGWINDOWDATA) EDITCHANGELABEL (GRAPH GRAPHNODE) DELETELINE (LINE) TEDIT.INSERT.OBJECT (TEXTOBJ -SELECTION PIECE TEXTSTREAM THISLINE) GETBOXSCREENREGION (SCREENPOSITION) \\BUILD.EXPEDITED.XIP ( -EXPEDITEDXIP PACKETEXCHANGEXIP COURIERPGM COURIERFN) \\TEDIT.WINDOW.SETUP (TEXTOBJ) |\\PFVersionOK| ( -|LogicalVolumeDescriptor|) \\INSPECTW.REDISPLAYPROP (SELECTABLEITEM) SHEDSCAN (LINE XYPT SCAN) -PRINTLEAF (SEQUINPACKET LEAFDATA) UNIX.SETDISPLAYTYPE (CHAT.STATE) |\\LFFindInfo| (|GeneratedFile| -|FileDescriptor| DLIONSTREAM) CHAT.HOLD (CHAT.STATE) TERM.ADDCHAR (CHAT.STATE) \\STORENSHOSTNUMBER ( -NSHOSTNUMBER) DRAWCIRCLE (IMAGEOPS STREAM) BIGNUM.DEFPRINT (READTABLEP BIGNUM) ERASEMENUIMAGE (REGION -MENU) \\TEDIT.BASICFIND (TEXTOBJ SELECTION) \\SPP.CREATE.STREAMS (SPPCON SPPSTREAM STREAM FDEV) -INVERT.BITMAP.HORIZONTALLY (BITMAP) \\LEAF.ACKED (SEQUIN) ECHOCHAR (CHARTABLE) \\COPYSYNTAX (CHARTABLE -) EQP (STACKP) |\\LFSortFiles| (|GeneratedFile|) |\\LFWriteLeaderPage| (DLIONSTREAM |FileDescriptor|) -CREATE.PACKET.EXCHANGE.XIP (PACKETEXCHANGEXIP XIP) SEDIT::SET-SELECTION-COMMENT (SEDIT::STRING-ITEM) -\\GETBRUSH (BITMAP) SHOW.MATCHING.PAREN (LINE) \\MEDW.GETSCREENPOSITION (WINDOW) TEXTSTREAM.TITLE ( -TEXTOBJ) \\TOTALFIXEDWIDTH (RESHAPINGWINDOWDATA) GRAPHCHANGELABEL (GRAPH) DRAWBETWEEN (IMAGEOPS STREAM -) \\UFS.REGISTER.GFS (UFSGENFILESTATE) ASKUSERSETUP (ASKUSER) \\CARET.FLASH.AGAIN (CARET1) -INSURE.BRUSH (BRUSH) \\TEDIT.FIND.FIRST.LINE (TEXTOBJ LINEDESCRIPTOR) \\SEND.EXPEDITED.XIP (XIP -EXPEDITEDXIP PACKETEXCHANGEXIP) SEDIT::SET-POINT-COMMENT (SEDIT::WEAK-LINK) \\DSKDISPLAY.CREATE.WINDOW - (POSITION REGION) TEDIT.MINIMAL.WINDOW.SETUP (TEXTOBJ TEDITCARET REGION) SEGMENT.BIT.LENGTH ( -COMPLEXCHAR) COLLECT.CHILD.NODES (GRAPHNODE GRAPH) MBUTTON.SET.FIELD (TEXTOBJ PCTNODE SELECTION) -\\SHAREOFXTRAX (RESHAPINGWINDOWDATA) EDITCHANGEFONT (GRAPH) \\UFS.FILEINFOFN (UFSGENFILESTATE) -\\10MBENCAPSULATE (NSHOSTNUMBER) D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL (CODEARRAY) SPY.TITLE ( -SPYRECORD) GETSCREENREGION (SCREEN) \\EVAL-INVOKE-LAMBDA (FX) \\SPP.DEFAULT.ERRORHANDLER (STREAM -SPPCON) INVERT.BITMAP.DIAGONALLY (BITMAP) \\TEDIT.UCASE.SEL (SELECTION TEDITHISTORYEVENT TEXTOBJ) -\\LEAF.FIX.BROKEN.SEQUIN (SEQUIN LEAFDATA FDEV LEAFSTREAM STREAM) DINFO.FMW.CLOSEFN (DINFOGRAPH) -\\DL.MARK.PAGES.UNAVAILABLE (RPT) \\INSURESCREEN (SCREEN) DRAWCURVE (IMAGEOPS STREAM) SLICERANK ( -ICML.ARRAYSLICE) \\UFS.NEXTFILEFN (UFSGENFILESTATE FDEV FILEGENOBJ) DRAWELLIPSE (IMAGEOPS STREAM) -|\\PFPutMarkerPage| (|PhysicalVolumeDescriptor|) \\DL.ASSIGNBUFFERS (IFPAGE POINTER) DRAWARC (IMAGEOPS - STREAM) |\\LFNormalizeVolumeName| (PARSEDFILENAME) CHAT.SET.EMULATOR (CHAT.STATE) DRAWPOLYGON ( -IMAGEOPS STREAM) CHAT.MENU (CHAT.STATE) DMCHAT.RIGHT (CHAT.STATE) ITEM.WINDOW.SET.STACK.ARG (MENU) -D-ASSEM::START-PC-FROM-NT-COUNT (CODEARRAY) \\DSPXPOSITION.PSC (STREAM \\POSTSCRIPTDATA) TREEGRAPHNODE - (PCTNODE) DINFO.CREATE.FMENU (DINFOGRAPH) FASL::DUMP-BITMAP (BITMAP) ROTATE.BITMAP.RIGHT (BITMAP) -\\FTP.CLOSEFILE (FDEV STREAM) \\LEAF.TIMEDIN (SEQUIN) |\\PFGetLVPage| (|LogicalVolumeDescriptor|) -FILLPOLYGON (IMAGEOPS STREAM) COMP.MLLVAR (VAR) TERM.DELETELINE (CHAT.STATE) \\BRUSHBITMAP (BRUSHITEM) - \\DO.PROGV (FNHEADER) GETSCREENPOSITION (SCREEN WINDOW) RECURSIVE.COLLECTDESCENDENTS (GRAPHNODE) -SCALEREGION (REGION) RESETREADTABLE (READTABLEP) \\FAULTHANDLER (IFPAGE) \\FLUSHPUPSOCQUEUE (PUPSOCKET -) \\TOTALPROPOSEDSIZE (RESHAPINGWINDOWDATA) SEGMENT.LENGTH (COMPLEXCHAR) \\FM.CREATEW (REGION) -DRAWPOINT (IMAGEOPS STREAM) DRAWTO (IMAGEOPS STREAM) \\SHAREOFXTRAY (RESHAPINGWINDOWDATA) -\\TEDIT.APPLY.STYLES (CHARLOOKS TEXTOBJ TEXTSTREAM FMTSPEC) PRINTLINE (LINEDESCRIPTOR TEXTOBJ) -SCRATCHCONS (TTYINBUFFER) |\\LFVersions| (|ExpandedName| FDEV DLIONSTREAM) \\UFS.ABORT.DIRECTORY ( -FILEGROUP FILEGENOBJ UFSGENFILESTATE) COMP.MLL (TAG JUMP) LASTC (STREAM) TERM.UP (CHAT.STATE) -\\RTP.HANDLE.RFC (PORT) POSTSCRIPT.BITMAPSCALE (REGION) \\ASSURE.FPTOVP.PAGE (IFPAGE) -\\TEDITMENU.SELSCREENER (TEXTOBJ SELECTION) ROTATE.BITMAP.LEFT (BITMAP) \\LEAF.TIMEDOUT (SEQUIN) -\\LEAF.RECONNECT (PUPFILESERVER SEQUIN) \\PEEKREFILL (LINEBUFFER) \\DSPYPOSITION.PSC (STREAM -\\POSTSCRIPTDATA) CENTERINWIDTH (REGION) CREATE-SHELL-STREAM (FDEV) LAYOUTGRAPH (GRAPH POSITION -GRAPHNODE) \\SPP.SKIPBYTES (STREAM) \\LOOKUPPAGEMAP (VP) RATOM (READTABLEP ARRAYP) CRIT.LESSP (SCAN) -\\UFS.ABORT.CL-DIRECTORY (FILEGENOBJ UFSGENFILESTATE) \\SUBREAD (STRINGP ARRAY-HEADER CHARTABLE STREAM - FDEV) TERM.MODIFY.ATTRIBUTES (CHAT.STATE) DIRECTORY.MATCH1 (ARRAYP) LISTHARD (MSSETPHRASE) -\\FM.SETATTACHPOINT (FREEMENUITEM REGION) RELDRAWTO (IMAGEOPS STREAM) \\MOVETO.PSC (STREAM -\\POSTSCRIPTDATA) PEEKCCODE (STREAM) FILEPKGCOM (FILEPKGCOM) |\\UFSParse-Directory| (FDEV) -GETBOXSCREENPOSITION (SCREEN) FB.COMMANDSELECTEDFN (MENU FILEBROWSER) \\RTP.FILTER (BSPSOC) FILLCIRCLE - (IMAGEOPS STREAM) \\TOP-LEVEL-READ (READTABLEP ARRAYP) PFI.HANDLE.DEFDEFINER (PFITYPE) -BITMAPIMAGESIZE (IMAGEOPS STREAM) PARSE-NSADDRESS (STRINGP ARRAY-HEADER) READC (STREAM) READTABLEPROP -(READTABLEP) ADDCHAR (COMPLEXCHAR LINE) \\SPP.CREATE.WATCHER (SPPCON) \\TEDIT.SMALLER.CARET (TEXTOBJ) -\\LEAF.WHENCLOSED (SEQUIN LEAFPACKET PUPFILESERVER) \\TRANSFERPAGE (RPT) PRINTANDBOX (REGION) READP ( -STREAM FDEV) \\PUTBASEFIXP (FIXP) SCANFORWARD (LINE) SKIPSEPRCODES (READTABLEP CHARTABLE STREAM) -READCCODE (FDEV STREAM) \\ALLOCSPACETOGROUPEDWINDOWS (RESHAPINGWINDOWDATA) GRAPHADDNODE (GRAPH) -\\MAXWIDTHOFGROUP (RESHAPINGWINDOWDATA) ADVISEWDS (WINDOW REGION SCREEN) PLCHAIN (LINEDESCRIPTOR) -TEDIT.WINDOW.SETUP (TEXTOBJ MENU) \\FIXLINELENGTH.PSC (\\POSTSCRIPTDATA STREAM) |\\VFMInsert1| ( -|Buffer| |Index|) \\FLUSHPAGE (RPT VMEMFLAGS VP IFPAGE POINTER) TEDIT.FORMATTEDFILEP (TEXTOBJ PIECE) -\\FTP.GETFILEINFO (STREAM) FLIPNODE (GRAPHNODE) \\MAXHEIGHTOFGROUP (RESHAPINGWINDOWDATA) SKREAD ( -CHARTABLE READTABLEP) \\DSPFONT.PSC (STREAM \\POSTSCRIPTDATA FONTDESCRIPTOR PSCFONT FONTID) TEXTOBJ ( -TEXTOBJ STREAM TEXTSTREAM) SCALEDBITBLT (IMAGEOPS STREAM REGION) \\UPDATE-WHO-LINE-ACTIVE-FLAG ( -WHO-LINE-ENTRY) |\\PFGetMarkerPage| (|PhysicalVolumeDescriptor|) BLTMENUIMAGE (WINDOW MENU REGION) -\\DRAWPOINT.GENERIC (BRUSH) \\FM.COLLECTNWAYS (FREEMENUITEM) DELETETO (LINE) \\TEDIT.PUT.PARALOOKS ( -PIECE) \\LEAF.IDLE? (SEQUIN) \\LEAF.GETFILEINFO (STREAM PUPFILESERVER SEQUIN) \\UPDATECHAIN (RPT -VMEMFLAGS) \\DRAWPOLYGON.GENERIC (BRUSH POSITION) CL:READ (READTABLEP ARRAYP) \\MOVEREALPAGE (RPT) -\\LFCASEARRAYFETCH (ARRAYP) TERM.RESET.DISPLAY.PARMS (CHAT.STATE) CL:READ-PRESERVING-WHITESPACE ( -READTABLEP ARRAYP) DMCHAT.HANDLECHARACTER (CHAT.STATE DM2500.STATE) LOG (FLOATP) CENTERINHEIGHT ( -REGION) SI::COMPILED-FUNCTION-DEBUGGING-INFO (COMPILED-CLOSURE FNHEADER) \\DSPLEFTMARGIN.PSC (STREAM -\\POSTSCRIPTDATA) \\SPP.PREPARE.OUTPUT (SPPCON STREAM SPPXIP) \\TEDIT.PUT.SINGLE.CHARLOOKS (CHARLOOKS -FONTCLASS) MOVETOUPPERLEFT (REGION) \\TEDIT.PIECE-CHNO (PIECE BTREENODE) CL:PARSE-INTEGER (READTABLEP -STRINGP ARRAY-HEADER CHARTABLE) INSIDE? (REGION) INTERSECTREGIONS (REGION) SCANBACK (LINE) -MOVEDESCENDENTS (GRAPHNODE) \\SETMACROSYNTAX (CONTEXTS WAKEUPS ESCAPES) DISCARDPUPS (PUPSOCKET) -INITIALIZECOLOR.IP (STREAM INTERPRESSDATA) \\FTP.DELETEFILE (FDEV) SI::COMPILED-FUNCTION-ARGLIST ( -COMPILED-CLOSURE) \\READTABLEP.DEFPRINT (READTABLEP) |\\PFFreeDiskPages| (|LogicalVolumeDescriptor|) -REGIONP (REGION) SKIPSEPRS (READTABLEP CHARTABLE STREAM) INIT.CURSOR (REGION) CL:READ-DELIMITED-LIST ( -READTABLEP ARRAYP) CHAT.DID.RESHAPE (CHAT.STATE) DMCHAT.CLEARMODES (CHAT.STATE DM2500.STATE) \\ATBLSET - (CHARTABLE) OVERFLOW? (LINE) CREATE.NUMBERPAD.READER (REGION MENU) MSINTERPA (MSSETPHRASE) REALSTKNTH - (FX) \\SPPCONNECTION (SPPCON) \\FM.NUMBER-CHANGESTATE (FREEMENUITEM) \\LEAF.IDLE (SEQUIN FDEV -LEAFSTREAM) SHOWWTITLE (SCREEN WINDOW) \\SETWINFOYSIZE (RESHAPINGWINDOWDATA) MSINTERPRETSET ( -MSSETPHRASE SENTENCE APPLY INRELATION GETHASH CSET IN THAT MSVERB CVERB) SI::CHANGE-CALLS-IN-CCODE ( -REFMAP) SCAN.LESSP (SCAN) INVERT.BITMAP.B/W (BITMAP) \\LEAF.READPAGES (LEAFSTREAM SEQUIN STREAM -LEAFDATA) MAPHASHFILE (|HashFile| |DoubleKey|) UTF16BE.OUTCHARFN (STREAM) TB.DO.ITEM.SELECTION ( -TABLEBROWSER) SHOWWFRAME (WINDOW REGION) TEXTSTREAM (STREAM TEXTSTREAM TEXTOBJ) \\RSTRING2 (STRINGP -ARRAY-HEADER STREAM CHARTABLE FDEV) \\FM.EDIT-SETUP (FREEMENUITEM REGION) PRIN2-LONG-STRING ( -READTABLEP FONTDESCRIPTOR STRINGP ARRAY-HEADER CHARTABLE) DINFO.CLOSEFN (DINFOGRAPH) TTDELETELINE ( -LINE) |ShowIntervals| (|Interval|) LLSH (FIXP) GETPUP (PUPSOCKET) \\SELECTREALPAGE (RPT VMEMFLAGS) -TTSKREAD (CHARTABLE) OPENPUPSOCKET (PUPSOCKET) \\RESHAPEATTACHEDWINDOWSAROUNDMAINW (REGION -RESHAPINGWINDOWDATA) TRACKCURSOR (GRAPHNODE) READBQUOTECOMMA (READTABLEP) \\SETWINFOXSIZE ( -RESHAPINGWINDOWDATA) SHOWSHADEDITEMS (MENU REGION) \\SMASHSTRING (STRINGP ARRAY-HEADER) -\\DSPRIGHTMARGIN.PSC (STREAM \\POSTSCRIPTDATA) COURIER.EXPEDITED.CALL (COURIERFN) CONCATLIST (STRINGP -ARRAY-HEADER LITATOM) TB.USERDATA (TABLEBROWSER) |\\PFCurrentVol| (|DiskFileID| -|PhysicalVolumeDescriptor| |LogicalVolumeDescriptor|) SPP.CLEARATTENTION (SPPSTREAM STREAM) -\\INTERNAL/SETPASSWORD (IFPAGE) CLOSEHASHFILE (|HashFile|) TB.DO.UNLESS.BUSY (TABLEBROWSER) -|\\LFDirectorySearch| (DIRSEARCHSTATE DLIONSTREAM FDEV STREAM) CHAT.TYPEOUT.CLOSE (CHAT.STATE) -DMCHAT.STATE (CHAT.STATE) TTWAITFORINPUT (REGION LINE TTYINBUFFER) SEDIT::PRINT-STRING (WINDOW STRINGP - ARRAY-HEADER STREAM) TEDIT.REDO.REPLACE (SELECTION TEXTOBJ) TTYIN (TTYINBUFFER) TTYIN.CLEANUP ( -TTYINBUFFER) \\FM.NUMBER-SETUP (FREEMENUITEM REGION) \\TEDIT.LARGER.CARET (TEXTOBJ) -\\LEAF.OPENERRORHANDLER (SEQUIN) RENUMBER.LINES (LINE) \\LEAF.OPENFILE (STREAM PUPFILESERVER -LEAFSTREAM SEQUIN) \\TEDIT.CHARDELETE (TEXTOBJ STRINGP ARRAY-HEADER GENERAL-ARRAY SELECTION PIECE) -TTYIN1 (LINEBUFFER LINE CHARTABLE) \\TEDIT1 (TEXTSTREAM TEXTOBJ) CREATEWFROMIMAGE (WINDOW) -|\\LFFindDirHole| (|ExpandedName| DLIONSTREAM FDEV STREAM) \\DSPLINEFEED.PSC (\\POSTSCRIPTDATA STREAM) - TTYIN1RESTART (TTYINBUFFER LINE) \\TEDIT.SET-TOTLEN (BTREENODE) TB.CLEAR.LINE (TABLEBROWSER) -DINFO.SHRINKFN (DINFOGRAPH) TEDIT.CURSOROUTFN (TEXTOBJ) REDISPLAYBITMAP (BITMAP REGION) RESTOREBUF ( -LINE TTYINBUFFER) \\TEDIT.COMMAND.RESET.SETUP (TEXTOBJ) TTYIN.SETUP (TTYINBUFFER) -MBUTTON.SET.NEXT.FIELD (TEXTOBJ SELECTION) \\TEDIT.SET.WINDOW (TEXTOBJ) \\FTP.REGISTER (STREAM) -NODEREGION (GRAPHNODE) \\VALIDADDRESSP (POINTER) \\BREAKAPARTATWSTRUCTURE (RESHAPINGWINDOWDATA) -\\TEDIT-OPEN-FONT-FILE (STREAM) SEDIT::SCAN-FOR-BOUNDS (SEDIT::WEAK-LINK SEDIT::LINE-START -SEDIT::STRING-ITEM) INSIDEP (POSITION) TTYIN.FINISH (LINE CHARTABLE TTYINBUFFER) -\\TEDIT.FIND.OVERLAPPING.LINE (LINEDESCRIPTOR) READFROMBUF (COMPLEXCHAR LINE) \\CREATECHARSET.IP ( -CHARSETINFO FONTDESCRIPTOR) READ-EXTENDED-TOKEN (READTABLEP ARRAYP STRINGP ARRAY-HEADER FDEV STREAM -CHARTABLE) ULREDISPLAYBITMAP (BITMAP REGION) GETFRAMEVAR.IP (STREAM) FONTCREATE (FONTDESCRIPTOR -FONTCLASS WINDOW IMAGEOPS STREAM) \\SETGROUPMIN (RESHAPINGWINDOWDATA) RETFROM (FX) OPENHASHFILE ( -|HashFile| STREAM) SPP.FLUSH.TO.EOF (STREAM SPPSTREAM) MENUREGION (MENU REGION) -EQUAL-READER-ENVIRONMENT (READER-ENVIRONMENT) \\LEAF.WRITEPAGES (STREAM LEAFDATA LEAFSTREAM) -DINFO.EXPANDFN (DINFOGRAPH) SEDIT::INSERT-COMMENT (SEDIT::EDIT-SELECTION) TTYIN.READ (CHARTABLE FDEV -LINEBUFFER) \\CARET.FLASH (CARET1 CURSOR) \\FTP.UNREGISTER (FDEV STREAM) \\DRAWLINE.PSC (STREAM -\\POSTSCRIPTDATA) DCODERD (CODEARRAY) \\SHIFT.DOCUMENT (ARRAYP PIECE FMTSPEC) SCROLLBITMAP (BITMAP -REGION) \\TEDIT.LCASE.SEL (SELECTION TEDITHISTORYEVENT TEXTOBJ) \\FM.EDIT-INSERT (REGION FREEMENUITEM) - \\GETBASESTRING (STRINGP ARRAY-HEADER) PRIN4 (READTABLEP) CHAT.TTYENTRYFN (CHAT.STATE) -COMP.NUMBERTEST (JUMP) |\\PFNewPages| (|FileDescriptor| |PageGroup|) \\ITEM.WINDOW.SELECTION.HANDLER ( -SELECTABLEITEM) \\IMAGEIOINIT (IMAGEOPS STREAM) \\DRAWCURVE.PSC (STREAM \\POSTSCRIPTDATA) -\\TFBRAVO.ADD.NAMEDTAB (FMTSPEC TEXTOBJ) \\MEDW.BLTCHAR (\\DISPLAYDATA PILOTBBT) SPPSTREAMP (SPPCON) -\\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (PIECE TEXTOBJ) DINFO.READ.KOTO.GRAPH (DINFOGRAPH) \\MEDW.XOFFSET ( -STREAM) \\TEDIT.NEUTRALIZE.CHARLOOKS.MENU (TEXTOBJ) \\MEDW.YOFFSET (STREAM \\DISPLAYDATA) \\FTPINIT ( -FDEV) \\LEAF.TRUNCATEFILE (LEAFDATA LEAFSTREAM) VOLUMESIZE (|LogicalVolumeDescriptor|) -\\TEDIT.WORDDELETE (TEXTOBJ SELECTION CHARTABLE PIECE TEXTSTREAM) \\NOIMAGE.DSPFONT (FONTCLASS) -TERM.TAB (CHAT.STATE) |\\LFMakeDirHole| (|FileDescriptor| DLIONSTREAM) SPP.SENDATTENTION (SPPXIP XIP) -|\\LFFileName| (|ExpandedName|) \\FILINGSESSION.DEFPRINT (WINDOW) \\UPDATEXYANDBOX (POSITION) -MSADDANALYZE (MSANALYZABLE) TEDIT.REDO.MOVE (TEXTOBJ SELECTION) FREEATTACHEDWINDOW (REGION) -\\FM.EDIT-PREPARETOEDIT (FREEMENUITEM REGION) STRINGWIDTH (FONTDESCRIPTOR CHARSETINFO IMAGEOPS STREAM) - |\\PFTransferPage| (DLION.DOB IFPAGE) WBOX (REGION) GETBOXREGION (SCREENREGION) EDITMOVESUBTREE ( -GRAPH) |\\VAMGetVAMPageFor| (|LogicalVolumeDescriptor|) \\FM.EDIT-ITEM (REGION FREEMENUITEM) -\\TEDIT.OBJECT.SHOWSEL (SELECTION LINEDESCRIPTOR IMAGEBOX TEXTOBJ) TERM.SMOOTHSCROLL (CHAT.STATE) -\\CCLOSURE.DEFPRINT (COMPILED-CLOSURE FNHEADER READTABLEP) GETCHATWINDOW (CHAT.STATE) \\CARET.FLASH? ( -CARET1 TEXTOBJ) |\\LFMakeLeaderPage| (|LeaderPage| |FileDescriptor|) EXTENDREGIONTOP (REGION) SETUPPUP - (PUP) \\FM.GETBITMAPS (REGION) TEDIT.FORMAT.HARDCOPY (TEXTOBJ STRINGP STREAM PAGEFORMATTINGSTATE) -MBUTTON.NEXT.FIELD.AS.ATOM (TEXTOBJ) \\TEDIT.ITALIC.CARET.OFF (TEXTOBJ) \\LEAF.SETFILEINFO (STREAM) -RETVALUES (FX) IN/ITEM? (SELECTABLEITEM) HASHFILEPROP (|HashFile|) TEDIT.PARALOOKS (SELECTION TEXTOBJ -FMTSPEC PIECE) PREVWORD (LINE CHARTABLE) \\DONEWEPHEMERALPAGE (POINTER VP VMEMFLAGS RPT) -\\STREAM.FROM.PACKET (XIP) VOLUMES (|LogicalVolumeDescriptor|) READHOTSPOT (CURSOR REGION) -\\DRAWCIRCLE.PSC (STREAM \\POSTSCRIPTDATA) TERM.SETMARGINS (CHAT.STATE) CHAT.INIT (CHATDISPLAYTYPE -CHAT.STATE STREAM) TB.ITEM.FROM.YCOORD (TABLEBROWSER) |\\LFMakeDirEntry| (|ExpandedName| -|FileDescriptor| DLIONSTREAM) \\FM.EDITSTART-SETUP (FREEMENUITEM) \\TEMPLOCKPAGES (IFPAGE) -|\\PFGetVols| (|PhysicalVolumeDescriptor|) PROVIDE.PROMPTING.WINDOW (REGION) READHASHMACRO (READTABLEP -) \\DRAWELLIPSE.PSC (STREAM \\POSTSCRIPTDATA) \\SETUFNENTRY (UFNENTRY) \\NEWEPHEMERALPAGE (IFPAGE) -\\GET-COMPILED-DEFINITION (LITATOM COMPILED-CLOSURE) \\GETUFNENTRY (OPCODE UFNENTRY) \\DOFLUSHVM ( -POINTER IFPAGE) WTODSY (REGION) PREVLINE (LINE) \\RELEASEWORKINGSET (RPT) MBUTTON.NEXT.FIELD.AS.TEXT ( -TEXTOBJ) \\DEFINEDP (LITATOM) \\FLUSHVM (IFPAGE) \\LEAF.GETFILENAME (PUPFILESERVER SEQUIN STREAM) -\\INSPECTW.COMMAND.HANDLER (SELECTABLEITEM) CALLSCCODE (FNHEADER COMPILED-CLOSURE) SPP.OPENP (SPPCON) -\\FM.EDITSTART-SELECTEDFN (FREEMENUITEM) OVERFLOWLINE? (LINE) GETBOXPOSITION.FROMINITIALREGION (REGION -) EDITADDNODE (GRAPHNODE) \\CODEBLOCKP (POINTER ARRAYBLOCK) \\WRITEDIRTYPAGE1 (RPT VMEMFLAGS) -MODERNWINDOW.BUTTONEVENTFN (REGION) \\PROMPTFORWORDBIN (LINEBUFFER FDEV STREAM) CHARACTER.READ ( -CHARTABLE) \\GETREGIONTRACKWITHBOX (POSITION) EDITSHADEREPAINTFN (REGION) \\NSFILING.GETFILE (STREAM) -NTH.COLUMN.OF (LINE) \\TEDIT.FILL.IN.CHARLOOKS.MENU (TEXTOBJ CHARLOOKS FONTCLASS SELECTION) -\\DSPOPERATION.IP (INTERPRESSDATA) MBUTTON.NEXT.FIELD.AS.PIECES (TEXTOBJ) -\\TEDIT.CONVERT.FOREIGN.FORMAT (TEXTOBJ) EDITAPPLYTOLINK (GRAPH) TEDIT.INSERT (SELECTION TEXTOBJ -TEXTSTREAM STRINGP ARRAY-HEADER) \\DSPMOVELR (STREAM) \\TFBRAVO.WRITE.RUN (CHARLOOKS) \\MATCHPCS ( -BTREENODE PIECE) TEDIT.PARSE.PAGEFRAMES (PAGEREGION) COPYTEXTSTREAM (TEXTOBJ SELECTION) FILL-VECTOR ( -ARRAY-HEADER) |\\VFMGetInterval| (|LogicalVolumeDescriptor| |Interval| |Index|) UNSAVEFNS ( -MSANALYZABLE) \\TEDIT.SHOWCARETLOOKS (TEXTOBJ CHARLOOKS) CHARWIDTHY (FONTDESCRIPTOR CHARSETINFO STREAM - IMAGEOPS) PRINTATBOX (REGION) TERM.SET.TAB (CHAT.STATE) CREATE-PROCESS-STREAM (FDEV) TB.ITEM.VISIBLE? - (TABLEBROWSER REGION) DINFO.CREATE.GRAPH.WINDOW (DINFOGRAPH REGION) CHAT.OPTIONMENU (MENU) -SPPOUTPUTSTREAM (SPPCON) \\STRINGWIDTH.GENERIC (LITATOM PNAMEBASE CHARSETINFO READTABLEP STRINGP -ARRAY-HEADER) \\BLTSHADE.PSC (STREAM \\POSTSCRIPTDATA REGION) \\CARET.SHOW (CARET1 SCREEN WINDOW -\\DISPLAYDATA STREAM) \\LASTNODE (BTREENODE) FB.ALLOW.ABORT (FILEBROWSER) TEDIT.CURSORMOVEDFN (TEXTOBJ - LINEDESCRIPTOR FMTSPEC) WTODSX (REGION) NTH.RELATIVE.COLUMN.OF (LINE COMPLEXCHAR) -CREATE.NEW.NODEPOSITION (GRAPHNODE POSITION) |\\VFMGet1| (|Interval| |Index|) -MBUTTON.NEXT.FIELD.AS.NUMBER (TEXTOBJ) \\FM.DISPLAY-SETUP (FREEMENUITEM) CL:MAKE-SYMBOL (STRINGP -ARRAY-HEADER) \\DISPLAYINIT (IMAGEOPS STREAM) \\ITEMW.FLIPITEM (SELECTABLEITEM) TERM.SCROLLDOWN ( -CHAT.STATE) CHANGECCODE (REFMAP) DINFO.GET.GRAPH.WINDOW (DINFOGRAPH) DSPCLEOL (STREAM) 32MBADDRESSABLE - (IFPAGE) PFI.ADD.TO.INDEX (PFITYPE) GETREGION (SCREENREGION) \\FM.PUSHGROUP (REGION) ICONW (POSITION -BITMAP) \\GETREGION.PACKPTS (POSITION) \\LEAF.REOPENFILE (LEAFINFOBLOCK LEAFSTREAM STREAM) -TEDIT.SUBSTITUTE (PIECE TEXTOBJ SELECTION STRINGP ARRAY-HEADER) PFI.DEFAULT.HANDLER (PFITYPE) -\\DEVICESYMBOL (IMAGEOPS STREAM) TEDIT.UNDO (TEXTOBJ) \\FM.JUSTIFYGROUPS (REGION) -\\SET.LASTVMEMFILEPAGE (IFPAGE) \\TEDIT.CENTER.SEL.REV (SELECTION) \\LEAF.DIRECTORYNAMEP ( -PUPFILESERVER) \\PAGEDBACKFILEPTR (STREAM) TERM.RIGHT (CHAT.STATE) TB.RESHAPEFN (TABLEBROWSER) -\\DSPPRINTCHAR (STREAM TERMCODE CHARTABLE \\DISPLAYDATA) MENUTITLEFONT (WINDOW MENU SCREEN) STRPOSL ( -CHARTABLE LITATOM STRINGP ARRAY-HEADER) \\CREATECHARSET.PSC (CHARSETINFO) MOVE.TO.LINE (LINE) -\\PROMPTWINDOW.SET.HEIGHT (REGION) TRANSGRAPH (GRAPH GRAPHNODE) TEDIT.BUILD.PCTB1 (TEXTOBJ PIECE) -DEFAULTFONT (FONTCLASS) \\ATWGROUPSIZE (RESHAPINGWINDOWDATA REGION) CONCAT (STRINGP ARRAY-HEADER -LITATOM) \\DRAWPOLYGON.DISPLAY (BRUSH POSITION) EXTENDREGIONRIGHT (REGION) \\SPLITTREE (BTREENODE) -PTPLUS (POSITION) FONTCLASSUNPARSE (FONTCLASS) \\TEXTRIGHTMARGIN (TEXTOBJ FMTSPEC) PURGEDSKDIRECTORY ( -FDEV DLIONSTREAM STREAM |FileDescriptor| |LogicalVolumeDescriptor|) \\DSPRESET.DISPLAY (STREAM -\\DISPLAYDATA FONTDESCRIPTOR REGION) TEDIT.REDO (TEXTOBJ SELECTION) FONTUNPARSE (FONTDESCRIPTOR -FONTCLASS FONTFACE) PRINTCODE (FNHEADER) EXTENDREGIONLEFT (REGION) \\DSPCLIPPINGREGION.DISPLAY (STREAM - REGION \\DISPLAYDATA) \\DRAWPOINT.DISPLAY (BITMAP) |\\LFGenFileID| (|LogicalVolumeDescriptor|) -NUMBERPAD.READ (MENU) \\FM.JUSTIFYITEMS (FREEMENUITEM) |\\VAMCheckEndOfVol| (|LogicalVolumeDescriptor| -) \\DOVMEMFULLINTERRUPT (IFPAGE) \\STRINGWIDTH.DISPLAY (\\DISPLAYDATA) \\FTP.RENAMEFILE (FDEV) -\\LEAF.EVENTFN (PUPFILESERVER FDEV) PAINTW (WINDOW SCREEN BITMAP CURSOR) POLYSHADE.IP (STREAM) -\\SCALEDBITBLT.PSC (STREAM \\POSTSCRIPTDATA) \\BACKCOLOR.DISPLAY (STREAM \\DISPLAYDATA BITMAP) -DINFO.FIND (DINFOGRAPH) MOVE.TO.NEXT.LINE (LINE) \\TEDIT.PARSE.CHARLOOKS.MENU (TEXTOBJ SELECTION) -POSTSCRIPT.HARDCOPYW (STREAM \\POSTSCRIPTDATA REGION) %COPY-ONED-ARRAY (ONED-ARRAY) TEDIT.BUILD.PCTB0 -(TEXTOBJ PIECE) GETPOSITION (SCREENPOSITION) \\BLTSHADE.DISPLAY (STREAM \\DISPLAYDATA REGION BITMAP -PILOTBBT) SETFONTCLASSCOMPONENT (FONTCLASS) TEDIT.NEXT (TEXTOBJ SELECTION) TEDIT.PROMPTFLASH (TEXTOBJ) - KILLSEGMENT (TTYINBUFFER) \\DSPOPERATION.DISPLAY (STREAM PILOTBBT) TEDIT.BUILD.PCTB2 (TEXTOBJ PIECE) -ICMLARRAY.MENUW.APPLY (REGION) \\DRAWELLIPSE.DISPLAY (\\DISPLAYDATA BITMAP) \\CHARWIDTH.DISPLAY ( -CHARSETINFO \\DISPLAYDATA) \\IFSERRORSTRING (SEQUIN) \\DRAWLINE.DISPLAY (BRUSH BIGBM \\DISPLAYDATA) -SETUPPAGEMAP (VP) \\POLYSHADE.YSCAN.IP (SCAN) PRINTCODENT (FNHEADER) \\FILLCIRCLE.DISPLAY (STREAM -\\DISPLAYDATA BITMAP PILOTBBT) \\READBINARYBITMAP (BITMAP) \\PARAS.IN.SEL (SELECTION PIECE) -LEAF.ASSURE.FINISHED (LEAFSTREAM SEQUIN STREAM) \\DRAWCURVE.DISPLAY (POSITION) \\LEAF.RENAMEFILE (FDEV -) DINFO.LOOKUP (DINFOGRAPH) \\FONT.COMPARESYMBOL (PNAMECELL LITATOM PNAMEBASE) ITEMW.REPAINTFN ( -SELECTABLEITEM) \\DSPYPOSITION.DISPLAY (\\DISPLAYDATA) \\TEDIT.ABBREV.EXPAND (TEXTSTREAM TEXTOBJ -SELECTION) \\DSPXPOSITION.DISPLAY (STREAM) %SET-ARRAY-TYPE-NUMBER (ARRAY-HEADER) UPDATE/SCROLL/REG ( -WINDOW REGION SCREEN) \\DRAWCIRCLE.DISPLAY (STREAM \\DISPLAYDATA BITMAP) \\MAP-CODE-POINTERS ( -ARRAYBLOCK FNHEADER) |\\VFMGet| (|LogicalVolumeDescriptor| |Interval|) \\FM.NWAY-SELECTEDFN ( -FREEMENUITEM) %SET-ARRAY-OFFSET (ARRAY-HEADER) PTDIFFERENCE (POSITION) \\FM.LAYOUTGRID (REGION) -\\DSPFONT.DISPLAY (STREAM \\DISPLAYDATA FONTDESCRIPTOR CHARSETINFO) \\BITBLT.DISPLAY (BITMAP STREAM -REGION \\DISPLAYDATA PILOTBBT IMAGEOPS) \\SCALEDBITBLT.DISPLAY (REGION) PRIN1 (READTABLEP STREAM) -|\\LFDirectoryScrambled| (|LogicalVolumeDescriptor| DLIONSTREAM |FileDescriptor|) FONTHEIGHT ( -FONTDESCRIPTOR) |\\PFFindFileSize| (|PageGroup| |FileDescriptor|) SPACES (STREAM) \\MAP-CODE-LITERALS -(ARRAYBLOCK FNHEADER) UTF8.OUTCHARFN (STREAM) \\UNCOPY (FIXP FLOATP STRINGP ARRAY-HEADER ONED-ARRAY) -PRINTNUM (FLOATFMT FIXFMT) \\INSERTTREE (BTREENODE PIECE) READPAGEMAP (POINTER IFPAGE) -FILLRECTANGLE.IP (STREAM INTERPRESSDATA) FB.PROMPTFORINPUT (FILEBROWSER) DINFO.ADD.FMENU (DINFOGRAPH) -SHIFT.BITMAP.UP (BITMAP) \\TEDIT.APPLY.CHARLOOKS (SELECTION TEXTOBJ) POSTSCRIPT.ENDPAGE (STREAM -\\POSTSCRIPTDATA) \\TELERAIDBREAK (IFPAGE FX FNHEADER BF FSB LITATOM) \\PRINTBINARYBITMAP (BITMAP) -\\LEAF.FLUSH.CACHE (SEQUIN LEAFSTREAM) \\FONTFACE (FONTFACE) OPT.OPTCHECK (JUMP TAG) SETHASHSTATUS ( -|HashFile|) TERM.NEWLINE (CHAT.STATE) |\\PFFindPageAddr| (|FileDescriptor| |PageGroup|) -EXTENDREGIONBOTTOM (REGION) RESETGRID.NEW (REGION) GO.TO.RELATIVE (LINE) \\DRAWPOLYGON.IP (POSITION) -\\FM.LAYOUTCOLUMN (REGION) |\\LFFindDirectoryVol| (|LogicalVolumeDescriptor| |Page|) BROKENDEF ( -FNHEADER OPCODE) INSERTLINE (LINE) MSMARKCHANGED (MSANALYZABLE) \\HANDLE.RAW.PUP (PUPSOCKET) -\\FM.LAYOUTROW (REGION) \\DO.PROGV.SETUP.FRAME.AND.EXECUTE (FX FNHEADER) \\COURIER.RESULTS (COURIERFN -COURIERPGM COURIERERR) REPLACEHASHKEY (|HashFile|) DINFO.INVERT.NODE (GRAPH GRAPHNODE DINFOGRAPH) -COMP.TAGBODY (TAG) \\NSRANDOM.SESSION.WATCHER (FDEV STREAM) DINFO.DEFAULT.MENU (DINFOGRAPH) -\\POSITION.MENU.IMAGE (MENU SCREENPOSITION SCREEN POSITION) |\\VFMGetBufferFor| (\\BTREEBUF) -\\TEDIT.SHOW.CHARLOOKS (SELECTION TEXTOBJ PIECE) POSTSCRIPT.PUTCOMMAND (STREAM \\POSTSCRIPTDATA) -\\TEXTMENU.TOGGLE.DISPLAY (BITMAP) SEDIT::LINEARIZE-CLISP (SEDIT::WEAK-LINK) ASKUSEREXPLAIN (OPTIONS) -\\FM.NWAY-DOWNFN (FREEMENUITEM REGION) \\DSPSCALE2.PSC (STREAM \\POSTSCRIPTDATA) \\TEDIT.UPDATETREE ( -BTREENODE) \\DSPBACKCOLOR.DISPLAY (STREAM \\DISPLAYDATA BITMAP) WHO-LINE-VMEM (IFPAGE) \\DSPSCALE.PSC -(STREAM \\POSTSCRIPTDATA) GAINSPACE (GAINSPACE) \\SMASHBSPSTREAM (BSPSTREAM STREAM) \\FM.NWAY-MOVEDFN -(FREEMENUITEM REGION) TB.WINDOW (TABLEBROWSER) DINFO.LAYOUTGRAPH (DINFOGRAPH DINFONODE) -\\DSPCOLOR.DISPLAY (STREAM \\DISPLAYDATA) \\FM.NWAY-MESSAGE (FREEMENUITEM) GETCHARBITMAP (CHARSETINFO -BITMAP) \\DSPCOLOR.PSC (\\POSTSCRIPTDATA STREAM) SHAPEW (WINDOW REGION) FB.PROMPTW.FORMAT (FILEBROWSER -) \\TEDIT.NEUTRALIZE.CHARLOOKS (SELECTION) \\4DISPLAYINIT (IMAGEOPS STREAM) MB.MARGINBAR.DISPLAYFN ( -MARGINBAR REGION) RPLSTRING (STRINGP ARRAY-HEADER LITATOM) REDISPLAYW (SCREEN WINDOW) SEDIT::OUTPUT-STRING - (SEDIT::STRING-ITEM) \\CORE.UPDATEOF (BYTEPTR) SHIFT.BITMAP.DOWN (BITMAP) \\CORE.DELETEFILE (STREAM -FDEV) COERCETOBITMAP (REGION) CLEAR.LEAF.CACHE (PUPFILESERVER SEQUIN) \\LEAF.BREAKCONNECTION ( -PUPFILESERVER FDEV) \\PRINTFPTOVP (IFPAGE) FONTSAVAILABLE (STREAM FONTDESCRIPTOR FONTCLASS WINDOW) -BKSYSBUF (LITATOM PNAMEBASE STRINGP ARRAY-HEADER) FONTMAPARRAY (FONTCLASS) \\MAPPNAME (READTABLEP) -\\POLYSHADE.XSCAN.IP (SCAN) \\TEDIT.PROCIDLEFN (TEXTOBJ) SHOWBUTTON (BUTTON) GO.TO.FREELINE (LINE) -PROCESS.EVALV (PROCESS) |\\VFMReadNext| (|Buffer| |Index|) \\CORE.GENERATEFILES (FDEV COREFILEINFOBLK) - \\LOCKFN (LITATOM DEFINITIONCELL) ENDPREAMBLE.IP (STREAM) \\LOOKUPFONTSINCORE (FONTDESCRIPTOR) -FROMLINKS (GRAPHNODE) BKSYSCHARCODE (RING) \\CHTOPC (BTREENODE) \\PRINDATUM.TO.STRING (STRINGP -ARRAY-HEADER) TEDIT.PUT (TEXTOBJ STREAM PIECE LITATOM) TEDIT.GET.OBJECT0 (TEXTSTREAM PIECE TEXTOBJ) -\\SETPOS.PSC (\\POSTSCRIPTDATA) FIND.NEXT.WORD (LINE CHARTABLE) |\\VFMMerge| (|Interval|) -CH.FINDSERVER (NSNAME) \\LOCKWORDS (POINTER) ENDPAGE.IP (STREAM) TEDIT.PUT.PCTB2 (TEXTOBJ ARRAYP PIECE - STREAM STRINGP ARRAY-HEADER) \\NSFILING.CONFLICTP (FDEV) \\TEDIT.UNIQUIFY.PARALOOKS (TEXTOBJ) -\\#BLOCKDATACELLS (ARRAYBLOCK) \\SMASHABLESTRING (STRINGP ARRAY-HEADER) \\TERPRI.PSC (STREAM -\\POSTSCRIPTDATA FONTDESCRIPTOR) \\CURVE (\\DISPLAYDATA) \\RPLCHARCODE (STRINGP ARRAY-HEADER) -\\LOCKVAR (LITATOM) SHIFT.BITMAP.LEFT (BITMAP) TEDIT.UNDO.MOVE (TEXTOBJ SELECTION) INSERTHASHKEY ( -|HashFile|) \\CORE.GETINFOBLOCK (STREAM) BITMAPP (BITMAP) \\8DISPLAYINIT (IMAGEOPS STREAM) -DINFO.SHOWGRAPH (REGION) SPP.READP (STREAM) GNCCODE (STRINGP ARRAY-HEADER GENERAL-ARRAY) FILL.LINE ( -FILL.TBLE) \\COERCETODS (WINDOW) \\TEDIT.UNIQUIFY.CHARLOOKS (TEXTOBJ) FONTCOPY (FONTCLASS -FONTDESCRIPTOR) \\LOCATE.PUPNET (ROUTING) GLCCODE (ARRAY-HEADER STRINGP) \\DSPTOPMARGIN.PSC ( -\\POSTSCRIPTDATA STREAM) EDITBM (REGION BITMAP) STREQUAL (STRINGP ARRAY-HEADER) FB.DIRECTORYP ( -FBFILEDATA) DINFO.WRITE.GRAPH (DINFOGRAPH) UPDATE/BM/DISPLAY/SELECTED/REGION (BITMAP) -FORWARD.DELETE.TO (LINE) CL:SYMBOL-PACKAGE (CL:SYMBOL PNAMECELL) |\\VFMLower| (|Key|) -\\CORE.GETFILEINFO (STREAM) MBUTTON.FIND.NEXT.BUTTON (TEXTOBJ PIECE MBUTTON MARGINBAR NWAYBUTTON) -\\24DISPLAYINIT (IMAGEOPS STREAM) \\NSRANDOM.CREATE.STREAM (STREAM) L-CASE (LITATOM STRINGP -ARRAY-HEADER PNAMEBASE) CREATEDSKDIRECTORY (LFDEV FDEV) SHOW.IP (STREAM FDEV) \\FM.FORMATBYGRID ( -REGION) U-CASEP (LITATOM PNAMEBASE STRINGP ARRAY-HEADER) TERM.IDENTIFY.SELF (CHAT.STATE) CHAT.STARTUP -(CHATDISPLAYTYPE) |\\PFFindDirectoryID| (|RootDirectory|) SPP.EOFP (STREAM) \\MAKEWRITABLESTRING ( -STRINGP ARRAY-HEADER) OPT.DS1 (FRAME JUMP) SHIFT.BITMAP.RIGHT (BITMAP) CARET (CARET1) -TEDIT.UNDO.REPLACE (TEXTOBJ SELECTION) \\CORE.NEXTFILEFN (COREFILEINFOBLK) SCAVENGEDSKDIRECTORY (LFDEV - FDEV |LogicalVolumeDescriptor|) FONTP (FONTDESCRIPTOR FONTCLASS) \\CREATE-REAL-CHARSET.DISPLAY ( -FONTFACE FONTDESCRIPTOR) \\SFMAKEITALIC (CHARSETINFO) %MAKE-ARRAY-WRITEABLE (ARRAY-HEADER) -\\FM.FORMATBYROW (REGION) |\\PFRemoveDirectoryID| (|RootDirectory|) \\10MBRAWRECEIVE (|Dove.EtherIOCB| -) BMOBJ.DISPLAYFN (BITMAPOBJ) \\TEDIT.CENTER.SEL (SELECTION) \\LEAF.REQUESTPAGE (LEAFSTREAM LEAFDATA) -\\CORE.PACKFILENAME (FDEV) DEFAULT.INSPECTW.TITLECOMMANDFN (MENU SELECTABLEITEM) \\BUILDSLUGCSINFO ( -CHARSETINFO) \\ITEM.WINDOW.COPY.HANDLER (SELECTABLEITEM) TERM.GODOWN (CHAT.STATE) -\\LEAF.MAYBE.FLUSH.CACHE (SEQUIN) TB.MAP.DELETED.ITEMS (TABLEBROWSER) DINFO.HISTORIC.UPDATE ( -DINFOGRAPH) SPP.FORCEOUTPUT (SPPCON XIP STREAM SPPXIP) WINDOWWORLDP (SCREEN) \\POLYSHADE.DISPLAY (SCAN - BRES) ADDPME (VP) DUMPINITPAGES (IFPAGE VP) TEDIT.GET.CHARLOOKS0 (PIECE CHARLOOKS) -\\FM.FORMATBYCOLUMN (REGION) DO.EDIT.PP (LINE) WRITEIMAGEOBJ (IMAGEFNS IMAGEOBJ) AS.NEXT.VERIFIER ( -NSADDRESS) \\HANDLE.PUP.ROUTING.INFO (PUPROUTINGINFO) \\TEDIT.DIFFUSE.PARALOOKS (PIECE) -\\TEDIT.FOREIGN.COPY? (SELECTION TEXTOBJ) EXTENDREGION (REGION) \\DSPBOTTOMMARGIN.PSC ( -\\POSTSCRIPTDATA STREAM) COPY.TEXT.TO.IMAGE (STREAM FDEV) SUBREGIONP (REGION) |\\LFCloseFile| ( -DLIONSTREAM |FileDescriptor|) SEDIT::NEXT-LINEAR-ITEM (SEDIT::WEAK-LINK) \\SFROTATECSINFO (CHARSETINFO -) GETTOPVAL (LITATOM) GETHASHKEY (|HashFile|) \\CORE.OPENFILE (STREAM) |\\PFInsertDirectoryID| ( -|RootDirectory|) SPP.BACKFILEPTR (STREAM) CHECKIFPAGE (IFPAGE) |\\LFFileSpec| (|ExpandedName|) -MAKEROOMFORPME (VP) |\\VFMGenerateFileIDs| (|Key| |Interval|) MBUTTON.FIND.NEXT.FIELD (TEXTOBJ -CHARLOOKS PIECE SELECTION) \\FM.STATE-SETUP (FREEMENUITEM) MSEDITE (MSANALYZABLE) \\SETARG0 (FX BF) -\\FM.FORMAT (REGION) BMOBJ.IMAGEBOXFN (BITMAPOBJ) \\LEAF.LOOKUPCACHE (LEAFSTREAM) COMP.PROG (TAG) -\\OPENLEAFCONNECTION (SEQUIN LEAFDATA LEAFPACKET LEAFERRORDATA LEAFPARAMSDATA) \\DOHARDRETURN (IFPAGE) - COURIER.CALL (COURIERFN STREAM NSADDRESS) \\DOHARDRETURN1 (FX FNHEADER FSB BF) \\DSPSPACEFACTOR.PSC ( -STREAM \\POSTSCRIPTDATA) SETPROPLIST (LITATOM) TEDIT-BOOK (TEXTOBJ) TEDIT.GET.PARALOOKS0 (PIECE -FMTSPEC) FIND.LINE (LINE) HASH.PASSWORD (STRINGP ARRAY-HEADER) \\CORE.SETFILEPTR (BYTEPTR) -ERASE/GRAPHNODE (GRAPHNODE POSITION) \\NSFILING.FULLNAME (FILINGHANDLE) \\CORE.BACKFILEPTR (STREAM) -\\FM.STATE-CHANGESTATE (FREEMENUITEM) %MAKE-STRING-ARRAY-FAT (ARRAY-HEADER) BLTSHADE (BITMAP IMAGEOPS -STREAM) FILL.INITTBLE (BITMAP PILOTBBT \\DISPLAYDATA FILL.TBLE) \\GETINTEGERPART (FIXP) \\DECUSECOUNT -(FX BF) \\EDITBMHOWMUCH (BITMAP) DO.EDIT.COMMAND (LINE TTYINBUFFER CHARTABLE) \\INCUSECOUNT (FX STK BF -) \\PUTBASESTRING (STRINGP ARRAY-HEADER LITATOM PNAMEBASE) EDITBMRESHAPEFN (BITMAP REGION) -WINDOWPOSITION (REGION) \\DOSTACKOVERFLOW (IFPAGE) \\FM.STATE-SELECTEDFN (MENU FREEMENUITEM) -\\FM.NWAY-SETUP (FREEMENUITEM) INSPECTW.REPAINTFN (REGION SELECTABLEITEM) \\MOVEFRAME (FX FSB IFPAGE -BF) \\SPP.BOUTS (SPPCON) \\SETUPUSERSTACK (IFPAGE) SETTOPVAL (LITATOM) \\TEDIT.BOLD.CARET.ON (TEXTOBJ) - \\INIT-MISCN-TABLE (ARRAYP MISCN-UFN-ENTRY MISCN-UFN-SPEC) \\FONTFILENAME (FONTFACE) \\MKATOM ( -PNAMEBASE PNAMEINDEX LITATOM) \\GCSCANSTACK (STK FX FNHEADER PVARSLOT STACKCELL FSB BF) -MBUTTON.FIND.BUTTON (TEXTOBJ PIECE) \\FONTFACE.COLOR (FONTFACE) \\EXTENDSTACK (IFPAGE) -\\GENERIC-UNREGISTER-STREAM (FDEV) \\PARSE.NUMBER (READTABLEP) \\ADD-OPEN-STREAM (FDEV) -\\TEDIT.PRESS.HARDCOPY (TEXTOBJ) FB.FETCHFILENAME (FBFILEDATA) \\FM.3STATE-CHANGESTATE (FREEMENUITEM) -MSEDITF (MSANALYZABLE) \\CORE.GETNEXTBUFFER (STREAM) |\\VAMAdjustGroup| (|PageGroup|) -TERM.ERASE.IN.DISPLAY (CHAT.STATE) \\CORE.SETEOFPTR (BYTEPTR) |\\LFFullFileName| (|ExpandedName| -|LogicalVolumeDescriptor|) \\NODIRCORE.OPENFILE (STREAM) CL:SYMBOL-NAME (LITATOM) \\CREATE.SYMBOL ( -VALINDEX PNAMEINDEX PNAMEBASE LITATOM) \\ALLOCBLOCK (ARRAYBLOCK) \\SETUPGUARDBLOCK (FSB) -\\DSPCLIPPINGREGION.PSC (STREAM \\POSTSCRIPTDATA REGION) \\LEAF.ABORT.FROMMENU (SEQUIN) SETA (ARRAYP) -\\SPP.GETFILEPTR (SPPSTREAM STREAM) TB.COLLECT.ITEMS (TABLEBROWSER) \\MENUSUBITEMS (MENU) -\\PS.SCALEHACK (STREAM \\POSTSCRIPTDATA REGION) \\POSTSCRIPT.OUTCHARFN (STREAM \\POSTSCRIPTDATA -FONTDESCRIPTOR) \\TEDIT.BOLD.CARET.OFF (TEXTOBJ) \\LEAF.DEVICEP (SEQUIN) ARRAY (ARRAYP) MAPATOMS ( -POINTER) DELETEHASHKEY (|HashFile|) TEDITWINDOWP (TEXTOBJ) SI::NON-LOCAL-GO (FX) REGIONSINTERSECTP ( -REGION) |\\LFScavFileName| (STRINGP ARRAY-HEADER) TEDIT.GET.OBJECT1 (TEXTSTREAM PIECE TEXTOBJ) -DELETE.TO.END (LINE) SCALE/TONODES (GRAPHNODE) BEGINPREAMBLE.IP (STREAM) %ARRAY-BASE (ARRAY-HEADER) -INSPECT/ATOM (MENU) \\ALLOCHEIGHTTOGROUPEDWINDOW (RESHAPINGWINDOWDATA) |\\PFPilotVolumeP| ( -|LogicalVolumeDescriptor|) BOTTOMOFGRIDCOORD (REGION) \\TEDIT.GET.PARALOOKS1 (FMTSPEC) DELETETO1 ( -COMPLEXCHAR) \\POPSTATE.IP (IPSTATE) \\FONTFILENAME.NEW (FONTFACE) ATOMHASH#PROBES (LITATOM STRINGP -ARRAY-HEADER PNAMEBASE PNAMEINDEX) \\ALLOCWIDTHTOGROUPEDWINDOW (RESHAPINGWINDOWDATA) OPENP (STREAM) -|\\LFPurgeDirectory| (|FileDescriptor|) TEDIT.HCPYFILE (STREAM TEXTOBJ) HASHFILEDATA (|HashFile|) -\\TEDIT.MARK.LINES.DIRTY (TEXTOBJ LINEDESCRIPTOR) |\\LFUnpackName| (PARSEDFILENAME STRINGP -ARRAY-HEADER) \\COURIER.ATTENTIONFN (FDEV STREAM) DOICONWINDOWCOM (WINDOW) \\FM.3STATE-DOWNFN ( -FREEMENUITEM REGION) FROM.SCREEN.BITMAP (SCREENREGION REGION) \\TEDIT.SET.SEL.LOOKS (SELECTION) -SEDIT::COPY-SELECTION (SEDIT::EDIT-SELECTION) \\CLIPANDDRAWLINE1 (BITMAP) \\DSPRESET.PSC (STREAM -\\POSTSCRIPTDATA) ELT (ARRAYP) \\SPP.GETNEXTBUFFER (SPPCON) FB.PROMPTWPRINT (FILEBROWSER) SPY.PRINT ( -SPYRECORD) \\READSTRIKEFONTFILE (CHARSETINFO) PUTD (COMPILED-CLOSURE FNHEADER) TERM.CLEAR.TAB ( -CHAT.STATE) TB.UNSELECT.ALL.ITEMS (TABLEBROWSER TABLEITEM) \\READACFONTFILE (CHARSETINFO -FONTBOUNDINGBOX) |\\LFOpenOldFile| (|LeaderPage| |FileDescriptor| DLIONSTREAM) -\\FM.3STATE-SETUPOFFBITMAP (FREEMENUITEM REGION) DEFAULT.INSPECTW.PROPCOMMANDFN (MENU) -ICONPOSITION.FROM.WINDOW (WINDOW REGION SCREEN) \\DELETETREE (BTREENODE) \\FONTRESETCHARWIDTHS ( -CHARSETINFO) \\DRAWPOLYGON.PSC (STREAM \\POSTSCRIPTDATA POSITION) FINDPCNODE (PIECE) -SI::PVAR-VALUE-IN-FRAME (FNHEADER FX PVARSLOT) FB.SELECTEDFILES (FILEBROWSER) \\POSTSCRIPTTAB ( -\\POSTSCRIPTDATA) %ARRAY-TYPE-NUMBER (ARRAY-HEADER) SI::UNWIND-TO-BLIP (FX) CL:FIND-SYMBOL (STRINGP -ARRAY-HEADER) \\STKMIN (OPCODE ARRAYP FNHEADER) SHADEGRIDBOX (REGION) \\BSP.CLOSE.OPEN.SOCKETS (BSPSOC -) GETD (LITATOM DEFINITIONCELL) \\SFROTATECSINFOOFFSETS (CHARSETINFO) \\DISCARDFRAME (FX BF) -INSPECT/BITMAP (MENU) ROTATE-BITMAP (BITMAP PILOTBBT) \\BASEBYTES.IO.INIT (STREAM) -DECODE/WINDOW/OR/DISPLAYSTREAM (WINDOW) \\SPP.SETFILEPTR (STREAM) SI::VARIABLE-NAME-IN-FRAME (FX -FNHEADER) \\TEDIT.GET.CHARLOOKS1 (PIECE CHARLOOKS) CURRENT.WORD (LINE CHARTABLE) PFCOPYBYTES (STREAM) -ROTATE-BITMAP-LEFT (BITMAP PILOTBBT) DOATTACHEDWINDOWCOM (MENU) \\TEDIT.SHOWSELS (TEXTOBJ SELECTION) -\\SFMAKECOLOR (CHARSETINFO) PROCESSPROP (PROCESS) PRINTCURSOR (CURSOR) %ARRAY-OFFSET (ARRAY-HEADER) -\\GETSPP (SPPCON SPPXIP) \\PUTD (LITATOM COMPILED-CLOSURE DEFINITIONCELL ARRAYP FNHEADER) -|\\LFDirectoryP| (DLIONSTREAM STREAM |FileDescriptor| |LeaderPage|) UNIONREGIONS (REGION) -\\BASEBYTES.BOUT (BASEBYTESTREAM STREAM) TRANSLATEREG (REGION) \\IRM.CHOOSE.REF (IRMREFERENCE) -BREAKLINE (LINE) MENUWRESHAPEFN (MENU REGION) FASL::FAT-STRING-P (STRINGP ARRAY-HEADER) SEDIT::INSERT -(SEDIT::EDIT-NODE) DISPLAYLINK/RL (GRAPHNODE) \\BASEBYTES.OPENFN (STREAM) \\TEXTMENU.START (REGION -TEXTOBJ TEXTSTREAM) \\FILLPOLYGON.PSC (POSITION) \\BASEBYTES.NAME.FROM.STREAM (STREAM) -\\BASEBYTES.SETFILEPTR (STREAM) \\TEDIT.RESHAPEFN (TEXTOBJ LINEDESCRIPTOR) RELSTKP (FX FNHEADER) -FB.TABLEBROWSER (FILEBROWSER) CLEARSTK (STACKP) STRING.EQUAL (LITATOM STRINGP ARRAY-HEADER ARRAYP) -BIT.IN.ROW (BITMAP) \\TEDIT.CUMULATE.EVENTS (TEDITHISTORYEVENT PIECE) \\RENAMEDFN (COMPILED-CLOSURE -FNHEADER) TEDIT.SCANSEL (TEXTSTREAM TEXTOBJ SELECTION) \\LEAF.SETCREATIONDATE (LEAFDATA LEAFSTREAM -LEAFINFOBLOCK) \\LEAF.DELETEFILE (LEAFDATA LEAFSTREAM STREAM) |\\LFCreateDevice| (LFDEV FDEV) -GETHASHTEXT (|HashTextPtr| |HashFile|) \\GET-COMPILED-CODE-BASE (LITATOM COMPILED-CLOSURE) -\\MAKEBASEBYTESTREAM (STREAM) TB.DESELECTRANGE (TABLEBROWSER) LEFTOFGRIDCOORD (REGION) -|\\LFCreateFile| (|ExpandedName| DLIONSTREAM) \\MBS.OUTCHARFN (STREAM) GRIDXCOORD (REGION) -\\LINEWITHBRUSH (\\DISPLAYDATA BITMAP) \\TEDIT.CLOSEUPLINES (TEXTOBJ LINEDESCRIPTOR) \\SETUPSTACK1 ( -FNHEADER STK BF FX) \\STRINGWIDTH.PSC (STREAM \\POSTSCRIPTDATA) \\BASEBYTES.TRUNCATEFN (STREAM) -INSPECTW.REDISPLAY (SELECTABLEITEM) \\CLIPANDDRAWLINE (BITMAP) FB.UPDATEBROWSERITEMS (FILEBROWSER -INFOFIELD FBFILEDATA) EDITBMSCROLLFN (REGION BITMAP) CHECK.MARGIN (LINE) MENUWMINSIZEFN (MENU) -|\\VFMPutNext| (|Index| |Buffer| |Interval|) BEGINPAGE.IP (STREAM) TEDIT.RAW.INCLUDE (TEXTOBJ -SELECTION PIECE) TEDIT.OBJECT.CHANGED (TEXTOBJ PIECE) \\RESETSTACK0 (IFPAGE LITATOM FSB) HASHFILEP ( -|HashFile|) TERM.ERASEBITS (CHAT.STATE) SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (REGION) -TB.UNSELECT.ITEM (TABLEITEM) \\SPP.EVENTFN (FDEV) ICMLARRAY.GETMENUWGROUP (POSITION REGION) -|\\LFGetStreamForFile| (|DFSFileSpec| |ExpandedName|) MAXMENUITEMWIDTH (MENU BITMAP) EDIT.BITMAP ( -CURSOR) WRITESTRIKEFONTFILE (CHARSETINFO BITMAP FONTDESCRIPTOR) PRINTERDEVICE (FDEV STREAM) RETURN ( -FNHEADER FX) \\RESETTERMINAL (LINEBUFFER) COURIER.EXECUTE.CALL (COURIERPGM COURIERFN) STRIKECSINFO ( -CHARSETINFO) \\LEAF.GETFILE (PUPFILESERVER SEQUIN STREAM LEAFSTREAM LEAFDATA LEAFPACKET BYTEPTR) -OPT.DELCODE (TAG) |\\VAMEnoughSpace| (|FileDescriptor| |LogicalVolumeDescriptor|) TOPW.BUTTONEVENTFN ( -ONED.SELECTION) TOPW.ADJUSTSELECTION (ONED.SELECTION) DECODE.WINDOW.ARG (POSITION) CHAT.SCREENPARAMS ( -CHAT.STATE) \\FM.3STATE-SETUP (FREEMENUITEM) |\\LFUpdateLeaderPage| (DLIONSTREAM |LeaderPage| STREAM -|FileDescriptor|) \\ADDOFD (STREAM) \\FM.TOGGLE-CHANGESTATE (FREEMENUITEM) IRM.CREF.BUTTONEVENTFN ( -IMAGEBOX) ICMLARRAY.GETREGIONFN (REGION POSITION) HPRINT.IMAGEOBJ (IMAGEFNS IMAGEOBJ) \\CAUSEINTERRUPT - (IFPAGE FX FSB) POSTSCRIPT.OUTSTR (STRINGP ARRAY-HEADER LITATOM PNAMEBASE) MB.COPYFN (IMAGEOBJ) -BITBLT (BITMAP IMAGEOPS STREAM REGION \\DISPLAYDATA) GRIDYCOORD (REGION) OPENSTRINGSTREAM (STRINGP -ARRAY-HEADER STREAM) DSPDESTINATION (STREAM \\DISPLAYDATA) \\FBITMAPBIT.UFN (BITMAPWORD) -\\CHARWIDTH.PSC (\\POSTSCRIPTDATA STREAM CHARSETINFO) UPDATEPCNODES (PIECE BTREENODE) -\\CREATE.TTYDISPLAYSTREAM (REGION) TOTOPW (SCREEN WINDOW) \\BITBLT.BITMAP (BITMAP REGION PILOTBBT) -INTERRUPTED (INTERRUPTSTATE KEYACTION) \\LEAF.STREAM.IN.QUEUE (SEQUIN STREAM LEAFDATA) \\SERIALNUMBER -(IFPAGE) \\DOMISCAPPLY1 (IFPAGE) MAXMENUITEMHEIGHT (MENU BITMAP) BIT.IN.COLUMN (BITMAP) COPYIMAGEOBJ ( -IMAGEOBJ) \\BLTSHADE.BITMAP (BITMAP REGION PILOTBBT) \\TEDIT.FIND (TEXTOBJ SELECTION) -\\LEAF.CREATIONDATE (LEAFINFOBLOCK LEAFSTREAM) TEDIT.MAKESEL (TEXTOBJ TEXTSTREAM SELECTION) -|\\DFSCurrentVolume| (|LogicalVolumeDescriptor|) \\GATHER-CLEANUP-FORMS1 (IFPAGE FX BF FNHEADER) -\\GATHER-SPECIAL-BINDINGS (FNHEADER PVARSLOT FX) \\MAKE.PROCESS0 (IFPAGE) OPENFILE (STREAM) -COMPOSEREGS (REGION) GRID (REGION) \\PUSHSTATE.IP (IPSTATE) DISPLAYLINK/BT (GRAPHNODE) -MOVEATTACHEDWINDOWTOPLACE (REGION) NIL -CREATE MSJOINSET (CSET MSSETPHRASE) \\DEFINEFONT.PRESS (FONTDIRENTRY) DEFAULT.BACKGROUND.COPYFN (MENU -POSITION REGION) |\\PFAddRootDirEntry| (|RootDirEntry|) MSINTERPRETSET (INRELATION MSSETPHRASE QUOTE -NOT CSET THAT MSVERB PATHS PATHOPTIONS GETHASH) |\\VFMAtLoad| (|Key| |Interval| |Index|) -SEDIT::INSTALL-SPECIAL-FORMATS (SEDIT::LIST-FORMAT) VRULE.IMAGEBOXFN (IMAGEBOX) -%INITIALIZE-CLSTREAM-TYPES (FDEV) RESET/NODE/BORDER (POSITION) FB.MAKECOUNTERWINDOW (REGION) -COMP.SELECTQ (TAG) \\TEDIT.SCALEREGION (REGION) SHOWWTITLE (REGION) COMP.STSETQ (OP) MSNEGATESET (NOT -MSSETPHRASE) |MakeMenuOfImageTypes| (MENU REGION) CH.SERVERS (NSNAME) \\TFBRAVO.READ.PARALOOKS ( -FMTSPEC) |\\PFCreateRootDirectory| (|FileDescriptor| |PageGroup|) UPDATE/MENU/IMAGE (REGION POSITION) -OPENPUPSOCKET (PUPSOCKET SYSQUEUE) TRACKCURSOR (POSITION) FB.DEPTHCOMMAND (MENU REGION) SEDIT::PRETTY-PRINT - (SEDIT::EDIT-CONTEXT SEDIT::EDIT-NODE) MENUITEMREGION (REGION) \\CREATEPRESSFONT (FONTDESCRIPTOR) -\\PS.SCALEREGION (REGION) MAKE-READER-ENVIRONMENT (READER-ENVIRONMENT) CHARLOOKS.FROM.FONT (CHARLOOKS) - FB.MAKEHEADINGWINDOW (REGION) TEDIT.GETSEL (SELECTION) \\LOADNSADDRESS (NSADDRESS) \\PUTONSCREENW ( -POSITION) \\TEDIT.GET.SINGLE.PARALOOKS2 (FMTSPEC TAB) DMCHAT.STATE (DM2500.STATE) SPY.FIND.TREE ( -SPYRECORD) CREATEWFROMIMAGE (SCREENREGION) \\COURIER.REP.BOUT (WORD) |\\PFPutRootDirectory| ( -|FileDescriptor|) DOBACKGROUNDCOM (MENU POSITION REGION) TTYINBUFFERSTREAM (STREAM) TTYIN (TTYINBUFFER - LINE) ALLOCSTRING (STRINGP ONED-ARRAY) CL:MAKE-BROADCAST-STREAM (STREAM) \\TEDIT.CREATEMENU (MENU -REGION) INSPECT/HUNK (MENU REGION) PAINTW.READMODE (MENU REGION) COMP.LOOKUPVAR (VAR) -PAINTW.READBRUSHSHAPE (MENU REGION) \\TFBRAVO.READ.CHARLOOKS (CHARLOOKS) -\\CREATE.SHIFTJIS.EXTERNALFORMAT (EXTERNALFORMAT) \\INSERTCH (TEDITHISTORYEVENT PIECE FMTSPEC) -ICMLARRAY (POSITION) \\IPCURVE2 (POLYNOMIAL) SUBSTRING (STRINGP ONED-ARRAY) \\INTERPRESSINIT (IMAGEOPS -) \\CREATE.EUC.EXTERNALFORMAT (EXTERNALFORMAT) MKSTRING (STRINGP ONED-ARRAY) \\PRESSINIT (IMAGEOPS) -\\LOCATE.NSNET (ROUTING) CL:MAKE-ECHO-STREAM (STREAM) BROWSE/LAYOUT/HORIZ/COMPACTLY (GRAPHNODE GRAPH) -SET-PACKAGE-INTERACTIVELY (MENU REGION) \\CREATECHARSET.IP (CHARSETINFO) PAINTW.READBRUSHSIZE (MENU -REGION) OPENHASHFILE (|HashFile|) \\LEAF.TIMEDOUT.EXCESSIVE (MENU REGION POSITION) -\\INSERT.FIRST.PIECE (FMTSPEC) \\CREATE.THROUGH.EXTERNALFORMAT (EXTERNALFORMAT) NEAREST/PT/ON/GRID ( -POSITION) MAKEIBMFORMAT (EXTERNALFORMAT) CL:MAKE-SYNONYM-STREAM (STREAM) \\GENERIC.DSPCREATE (STREAM -\\DISPLAYDATA PILOTBBT REGION) \\TEDIT.FORMAT.FOOTNOTE (LINEDESCRIPTOR THISLINE) CL:MAKE-TWO-WAY-STREAM - (STREAM) \\CREATE.JIS.EXTERNALFORMAT (EXTERNALFORMAT) TEXTICON (POSITION) TEDIT.COMPOUND.PAGEFORMAT ( -PAGEREGION) POSTSCRIPT.SET-FAKE-LANDSCAPE (REGION) MARGINBAR.CREATE (IMAGEBOX MARGINBAR REGION) -\\LEAF.WRITEPAGES (BYTEPTR) \\SETLOCALNSNUMBERS (NSHOSTNUMBER NSADDRESS) SEDIT::OUTPUT-CR ( -SEDIT::LINE-START) COMP.COND (TAG JUMP) OPT.FRAMEDEL (OP) TEDIT.FORMATTEXTBOX (LINEDESCRIPTOR THISLINE -) |\\VFMSplit| (|Key|) \\SHIFT.DOCUMENT (FMTSPEC) SPY.DELETE (SPYRECORD) OPENBSPSTREAM (STREAM) -RIGHTW.ADJUSTSELECTION (ONED.SELECTION) MB.SIZEFN (IMAGEBOX) \\MEDW.DSPCREATE (STREAM \\DISPLAYDATA -PILOTBBT REGION) |\\VFMBlankInterval| (|Interval|) COMP.LOOKUPCONST (OP) COMP.NUMBERTEST (JUMP TAG) -|\\PFNewPages| (|PageGroup|) PROMPTFORWORD (POSITION) TEDIT.FORMATFOLIO (THISLINE LINEDESCRIPTOR) -\\ALLOCVIRTUALPAGEBLOCK (POINTER) EDITBMBUTTONFN (MENU REGION) \\TEDIT.COPYTEXTSTREAM.PIECEMAPFN ( -PIECE) DINFO.READ.KOTO.GRAPH (DINFOGRAPH) GETGRIDBOXREGION (REGION) SHOWBITMAP.IP (REGION) -FB.NEWINFOCOMMAND (MENU REGION POSITION) \\LEAF.TRUNCATEFILE (BYTEPTR) \\DSPPUSHSTATE.PSC ( -POSTSCRIPTXFORM) \\TEDIT.LOOKS (POSITION MENU REGION) ASKUSER (ASKUSER) ACCEPT-UNIX-SOCKET-STREAM ( -STREAM) MENUREGION (REGION) MSVERBED (THAT MSSETPHRASE) BROWSE/LAYOUT/HORIZ (GRAPH) READHOTSPOT ( -POSITION) |\\PFGetRootDirectory| (|FileDescriptor|) \\HANDLE.RAW.XIP (ROUTING) MSADDANALYZE ( -MSANALYZABLE) PFI.MAKE.LPT.STREAM (REGION) CHAT.CHOOSE.EMULATOR (CHATDISPLAYTYPE) \\IMAGEIOINIT ( -IMAGEOPS) MSDOES (MSSETPHRASE THAT) |\\PFFindRootDirEntry| (|RootDirEntry|) WHO-LINE-SET-TIME (MENU -REGION) \\FM.CREATEITEM (FREEMENUITEM) SEDIT::INITIALIZE-ATOMIC (SEDIT::EDIT-NODE-TYPE) -\\TEDIT.OBJECT.SHOWSEL (REGION) FB.SEEFULLFN (MENU REGION) FONTCLASS (FONTCLASS) MAKE-COMPILED-CLOSURE - (COMPILED-CLOSURE) READ-AFM-FILE (PSCFONT MENU REGION) \\DONEWEPHEMERALPAGE (POINTER) -|\\LFMakeLeaderPage| (|LeaderPage| |Page|) EXTENDEXTENT (REGION) \\CANONICALIZE.NSADDRESS (NSADDRESS) -TEDIT.FORMAT.HARDCOPY (PAGEFORMATTINGSTATE) \\TEXTINIT (IMAGEOPS FDEV STREAM TEXTIMAGEDATA) TEDIT.FIND - (TEDITHISTORYEVENT) CREATEREGION (REGION) TB.MAKE.BROWSER (TABLEBROWSER) SEDIT::CREATE-PRETTY-PRINT-ENV - (SEDIT::EDIT-ENV) TEDIT.PARALOOKS (FMTSPEC TAB TEDITHISTORYEVENT) COURIER.READ.NSNAME (NSNAME) -\\NOTE.10TO3 (NSADDRESS) DASSEM.DASSEM (OP JD) CREATE.MONITORLOCK (MONITORLOCK) SEDIT::CREATE-STRING-ITEM - (SEDIT::STRING-ITEM) \\NULLDEVICE (FDEV) CHAT.INIT (CHAT.STATE) \\NAMEDTABSIZE (IMAGEBOX) -TEDIT.FORMATHEADING (THISLINE LINEDESCRIPTOR) IRM.CREF.BOX (IMAGEBOX) \\BSPINIT (FDEV) -PSCFONT.READFONT (PSCFONT) IMAGEOBJCREATE (IMAGEOBJ) FREEATTACHEDWINDOW (POSITION) NEWDEFC ( -COMPILED-CLOSURE) \\TELERAIDSERVER (WORD) PARAMETRICSPLINE (SPLINE) TEDIT.FORMATPAGE (LINEDESCRIPTOR) -ONEDINSPECT.SELECTITEM (ONED.SELECTION) BITMAPCREATE (BITMAP) GRAPHEDITCOMMANDFN (MENU REGION) -TEDIT.UNDO.DELETION (PIECE) \\HANDLE.NS.ROUTING.INFO (ROUTING) BRH/LAYOUT (POSITION) \\ALLOCMAPBUFFER -(BUFFER) \\NULL.OPENFILE (STREAM) CALLSCCODE (RESULT) TEDITCHAT.MENUFN (MENU REGION) \\MAKEFLOAT ( -FLOATP) COMP.SPREAD (TAG) SPY.NEXT.TREE (SPYRECORD) \\NSFILING.GETFILE (FILINGHANDLE) -\\LEAF.GETFILEINFO.OPEN (BYTEPTR) PARSE.NSNAME (NSNAME) ADDFILE0 (FILEPROP FILEDATEPAIR) MB.SELFN ( -SELECTION) CREATE-UNIX-SOCKET-STREAM (STREAM) OPENPOSTSCRIPTSTREAM (\\POSTSCRIPTDATA) -NEW/INSTANCE/OF/GRAPHNODE (GRAPHNODE) PUTFILEMAP (FILEMAPHASH) SEDIT::CREATE-NEW-COMMENT (SEDIT::EDIT-NODE -) \\INFINITY (FLOATP) |\\VFMGetInterval| (|Interval|) FB.GET.SORT.MENU (MENU REGION) -\\TEDIT.SELECT.CHARACTER (REGION) FB.CREATE.FILEBUCKET (FBFILEDATA) |\\VFMFreeVPage| (|PageGroup|) -\\DO-DEFINE-FILE-INFO (READER-ENVIRONMENT) TEDIT.PARSE.PAGEFRAMES (PAGEREGION) -|\\PFGetPhysicalVolumePage| (|Label|) EDITADDNODE (POSITION) PSCFONTFROMCACHE.SPELLFILE (PSCFONT) -OPENPRSTREAM (PRESSDATA REGION) IRM.DISPLAY.CREF (REGION) DINFO.UPDATE.MENU.DISPLAY (MENU REGION -POSITION) TEDIT.REDO.INSERTION (PIECE) MAKEINITBFS (DSKOBJ DISKREQUEST CB) SEDIT::CREATE-NODE ( -SEDIT::EDIT-NODE) EDITSHADEREPAINTFN (BUTTON) CREATE-PROCESS-STREAM (STREAM) |MakeMenuOfPrinters| ( -MENU REGION) PFI.COLLECT.DEFINERS (PFITYPE) SNAPW (SCREENREGION) SEDIT::COPY-STRUCTURE-COMMENT-WORD ( -SEDIT::STRING-ITEM) \\NSFILING.GENERATEFILES (FILEGENOBJ \\NSFILING.GENFILESTATE) OPENRTPSOCKET ( -BSPSOC) CREATE.NEW.NODEPOSITION (POSITION) \\3MB.CREATENDB (NDB) SUBARRAY (ARRAYP) -FB.INSERT.SUBDIRECTORIES (FBFILEDATA) \\DSKDISPLAY.RESHAPEFN (POSITION) \\DISPLAYINIT (WSOPS WSDATA -REGION IMAGEOPS FDEV DISPLAYSTATE) \\NSFILING.COPY/RENAME (FILINGHANDLE) SEDIT::CREATE-GAP-NODE ( -SEDIT::EDIT-NODE) CREATEHASHFILE (|HashFile|) \\CREATE.TWODINSPECTOR.INSPECTMENU (MENU REGION) -\\NSFILING.HOSTNAMEP (FDEV NSFILINGDEVICEINFO) \\CURVE2 (POLYNOMIAL) \\PROCESS.INIT (FDEV) OPT.SCANOPT - (OP) ICONW (REGION) \\TEDIT.DEFAULTSSEL (CHARLOOKS) SHOWGRAPH (GRAPH) NESTED.SUBMENU (MENU POSITION -REGION) DBG::NEAR-BY-REGION (REGION) \\DSPCLIPPINGREGION.IP (REGION) CREATEMENUEDWINDOW (MENU REGION) -FLOATP.TO.BCPL (BCPLNUM) SEDIT::CREATE-ENVIRONMENTS (SEDIT::EDIT-ENV) MB.SETIMAGE (IMAGEBOX) -\\TEDITPAGEMENU.CREATE (MB.TEXT) CL::VALUES-UFN (WORD) \\CREATECHARSET.PSC (CHARSETINFO) PTPLUS ( -POSITION) \\PROMPTWINDOW.SET.HEIGHT (POSITION) BCPL.TO.FLOATP (FLOATP) TEDIT.BUILD.PCTB1 (FMTSPEC -PIECE) INSPECT/AS/RECORD (MENU REGION) MB.NWAYBUTTON.SELFN (REGION) \\DRAWPOLYGON.DISPLAY (BRUSH) -\\KEYBOARDINIT (KEYBOARDEVENT SHIFTSTATE) \\CREATE.TWODINSPECTOR.SETMENU (MENU REGION) TRACKW ( -POSITION) \\SPLITTREE (BTREENODE) OPT.FRAMEMERGE (OP) %COPY-ONED-ARRAY (ONED-ARRAY) KEYACTIONTABLE ( -KEYACTION) \\TEDIT.MOVE.PIECEMAPFN (PIECE) DBG::DEBUGGER-BUTTON-EVENT (MENU REGION) -DINFO.UPDATE.HISTORY (MENU REGION) CL::VALUES-LIST-UFN (WORD) SCALE/GRAPH (GRAPH GRAPHNODE POSITION) -HASHARRAY (HARRAYP) \\TEDIT.DEFAULTS.CARET (CHARLOOKS) STORAGE (HUNKSTAT) TRANSLATE.DATATYPE (SPEC -|FldDsc|) \\CONS.UFN (POINTER) PAINTW (CURSOR) TRANSGRAPH (GRAPH GRAPHNODE POSITION) COMP.STJUMP (JUMP -) \\RESHOWBORDER1 (REGION) \\TFBRAVO.INSTALL.PAGEFORMAT (TFBRAVOPAGEFRAMES) -\\CREATE.TWODINSPECTOR.TITLEMENU (MENU REGION) PPSPP (NSADDRESS) BRHL/LAYOUT (POSITION) -MB.MARGINBAR.SIZEFN (IMAGEBOX) POSTSCRIPT.HARDCOPYW (REGION) TEDIT.BUILD.PCTB0 (FMTSPEC PIECE) -EXPANDING-PAGEFULLFN (REGION) \\HANDLE.RAW.3TO10 (NSADDRESS) |\\VFMDeletePageGroup| (|Key| |Interval|) - STORAGE.LEFT (POINTER) \\STORAGE.TYPE (POINTER) \\MEDW.RELMOVEW (POSITION) WHO-LINE-CHANGE-USER (MENU - REGION) ADD/AND/DISPLAY/LINK (POSITION) TEDIT.BUILD.PCTB2 (FMTSPEC PIECE) ICMLARRAY.MENUW.APPLY ( -POSITION) \\NSFILING.PARSE.FILENAME (NSFILINGPARSE) |\\LFExtendFile| (|PageGroup|) -SEDIT::COPY-STRUCTURE-STRING (SEDIT::BROKEN-ATOM SEDIT::STRING-ITEM) EDITGRAPH1 (GRAPH) -DEFAULT.INSPECTW.VALUECOMMANDFN (MENU REGION) INSPECT/AS/BLOCKRECORD (MENU REGION) -\\INSPECT/CODE/RESHAPEFN (POSITION REGION) PTDIFFERENCE (POSITION) INSTALLBRUSH (BRUSHITEM) -UPDATE/SCROLL/REG (REGION) CHAT.ICONFN (TITLEDICON) DOWINDOWCOM (MENU POSITION REGION) -\\TEDIT.HCPYFMTSPEC (FMTSPEC) PUTHASHTEXT (|HashTextPtr|) TTYINBUFFERDEVICE (FDEV) COMP.BOOL (TAG JUMP -) OPT.COMPINIT (OP) CROPMARK.IMAGEBOXFN (IMAGEBOX) SPY.LEGEND (GRAPHNODE) \\10MB.STARTDRIVER (SYSQUEUE -) TWOD.TRACKCURSOR (TWOD.SELECTION) MSSOLVE (MSSETPHRASE QUOTE) SPY.MAKEGRAPHNODES (GRAPHNODE) -ICMLARRAY.MENUW.GETLEVEL (MENU REGION) \\FONTFACE (FONTFACE) |\\VFMGet| (|Interval|) GETPROMPTWINDOW ( -REGION) OPT.CFRPTQ (TAG) NODECREATE (GRAPHNODE) \\MEDW.MOVEW (REGION POSITION) FB.DELVERCOMMAND (MENU -REGION) FB.EXPUNGE?.MENU (MENU REGION) \\UFS.CREATE.DEVICE (FDEV) \\TEDIT.WORDBOUND.READTABLE ( -READTABLEP CHARTABLE) SEDIT::COPY-NODE (SEDIT::EDIT-NODE) %COPY-STRING-TO-ARRAY (ONED-ARRAY) -\\GENERATENOFILES (FILEGENOBJ NOFILEGENSTATE) DSPCREATE (STREAM \\DISPLAYDATA PILOTBBT REGION) -MENUWINDOW (MENU REGION) \\MEDW.SHRINKW (POSITION) \\CARET.CREATE (CARET1) \\CODEARRAY (ARRAYP) -SCROLLBYREPAINTFN (REGION) WHO-LINE-SAVE-VMEM (MENU REGION) \\VANILLADISKINIT (FDEV) DISPLAYGRAPH ( -POSITION) \\UPDATE.PBT.RASTERWIDTHS (POINTER) \\TEDIT.GET.SINGLE.PARALOOKS (FMTSPEC TAB) COPYGRAPH ( -GRAPH GRAPHNODE POSITION) INITIALIZE-NEW-SHELL-DEVICE (FDEV) SQRT (FLOATP) \\SHOWTEXT (LINEDESCRIPTOR) - PRINTDATE (FILEDATEPAIR) \\DOVE.FAULTINIT (POINTER) PPROCEXTENT (REGION) |\\VFMGetBufferFor| ( -\\BTREEBUF |Buffer| |Page|) \\DL.FAULTINIT (POINTER) \\NSFILING.OPEN.HANDLE (FILINGHANDLE) -\\PRESSCURVE2 (POLYNOMIAL) \\PROMPTWINDOW.EXPAND (REGION) \\HANDLE.RAW.PUP (PUPADDRESS ROUTING) -\\CREATESTARFONT (FONTDESCRIPTOR) \\MAIKO.FAULTINIT (POINTER) SEDIT::CONS-ATOM (SEDIT::BROKEN-ATOM) -\\READACFONTBOXES (BOUNDINGBOX) \\IDLE.PROMPT.WATCHER (FIXP) COMP.STFN (OP) LLBREAK (COMPILED-CLOSURE) - RESHAPEBYREPAINTFN (REGION) COMP.BIND.VARS (VAR FRAME) COMP.TAGBODY (TAG) MSVERB (MSVERB) \\DELETECH -(TEDITHISTORYEVENT) \\SELECTPROCESS (MENU REGION) NESTED.SUBMENU.POS (POSITION) \\ALLOCBLOCK.NEW ( -POINTER) \\GETFBB (FONTBOUNDINGBOX) \\TEDIT.PARSE.CHARLOOKS.LIST (CHARLOOKS) INSERTLINE (LINE) -\\TEDIT.NSCHAR.RUN (PIECE) SHAPEW1 (REGION) PROCESS.STATUS.WINDOW (MENU REGION POSITION) -|\\UFSOpenFile| (STREAM) TTNEXTPOS (MOUSEPOS) INSTALL-PROTOTYPE-DEFN (MENU REGION) -TWODINSPECT.SELECTCOLUMNPROP (ONED.SELECTION) DINFO.LAYOUTGRAPH (GRAPHNODE) OPT.NOTJUMP (OP) -\\TEDIT.PARSE.PARALOOKS.LIST (TAB FMTSPEC) DINFO.DEFAULT.MENU (MENU REGION) |\\LFGenerateFiles| ( -DIRSEARCHSTATE FILEGENOBJ |GenerateFileState|) SEDIT::OUTPUT-STRING (SEDIT::STRING-ITEM) -\\NSRANDOM.PREPARE.CACHE (NSPAGECACHE) \\TEDIT.FORMATTABS (PENDINGTAB) \\MEDW.CREATEW (WINDOW REGION) -DINFO.SELECT.GRAPH (MENU REGION) ADDMENU (POSITION) \\4DISPLAYINIT (IMAGEOPS FDEV DISPLAYSTATE) -TEDIT.INCLUDE (TEDITHISTORYEVENT) MB.MARGINBAR.DISPLAYFN (REGION) TEDIT.PARSE.PAGEFRAMES1 (PAGEREGION) - MB.NB.SIZEFN (IMAGEBOX) FONTCOPY (FONTFACE) \\FIXLOCALNET (PUPADDRESS) TEDIT.GET (TEDITHISTORYEVENT) -SELECT.FNS.EDITOR (MENU REGION) EDITDELETENODE (POSITION) \\CORE.GETINFOBLOCK (COREFILEINFOBLK -CORE.PAGEENTRY) \\COMPUTE.ARC.POINTS (POSITION) BULKDATA.GENERATOR (BULKDATAGENERATOR) OPT.RETMERGE ( -TAG) \\PRINTFPTOVP (POINTER) TEDIT.MOVE (TEDITHISTORYEVENT) \\MAIKO.10MBSTARTDRIVER (SYSQUEUE) -\\INIT.POWERS.OF.TEN (EFPN) \\CORE.GENERATEFILES (FILEGENOBJ COREGENFILESTATE) \\TEXTMARK (BYTEPTR) -TEDIT.SETFUNCTION (READMACRODEF) TEDIT.PUT (TEDITHISTORYEVENT) \\PSWOP.SELECTED (MENU REGION) -\\NULLFILEGENERATOR (FILEGENOBJ) TEDIT.BUILD.PCTB (FMTSPEC PIECE) \\CORE.FINDPAGE (CORE.PAGEENTRY) -|\\VFMMerge| (|Interval|) CH.FINDSERVER (NSNAME) \\PUTBASEBYTE (WORD) MAKEBITTABLE (CHARTABLE) -\\NSRANDOM.TRUNCATEFILE (BYTEPTR) FB.MAYBE.INSERT.FILE (TABLEITEM) \\CORE.GETFILEINFO.FROM.INFOBLOCK ( -BYTEPTR) |\\VFMCreateVPage| (|PageGroup|) CREATESCREEN (SCREEN) \\TFBRAVO.INIT.PARALOOKS (FMTSPEC) -BRHC/LAYOUT/TERMINAL (POSITION) \\CORE.GETFILEHANDLE (CORE.PAGEENTRY CORESTREAM) |\\PFCreateVols| ( -|LogicalVolumeDescriptor| |Page|) \\BN.TO.FIXP (BIGNUM) \\TEDIT.MENU.INIT (MB.TEXT MB.BUTTON MB.TOGGLE - MB.INSERT MB.NWAY MB.3STATE MB.MARGINBAR) \\TEDIT.HARDCOPY.FORMATLINE (EDITMARK) BITMAPTEDITOBJ ( -BITMAPOBJ) \\ADVANCE.ARRAY.SEGMENTS (POINTER) WINDOWWORLD (POSITION) \\8DISPLAYINIT (IMAGEOPS FDEV -DISPLAYSTATE) DINFO.SHOWGRAPH (REGION) COMP.BINDLIST (VAR) \\CORE.DELETEFILE (CORE.PAGEENTRY) -\\LOADNSHOSTNUMBER (NSHOSTNUMBER) \\LOCATE.PUPNET (ROUTING) POSTSCRIPT.GETFONTID (FONTID) -\\ONSCREENCLIPPINGREGION (REGION) TWODINSPECT.ADJUSTSELECTION (TWOD.SELECTION) \\IRM.WILD.REF (MENU -REGION) ASSURE.PUP.READY (PUPADDRESS) \\CREATEDISPLAYFONT (FONTDESCRIPTOR) \\NSRANDOM.CREATE.STREAM ( -STREAM) |\\PFRemoveDirectoryID| (|RootDirectory| |Page|) PROCESS.BACKTRACE (REGION) -|\\PFFindDirectoryID| (|RootDirectory| |Page|) COMP.TOPLEVEL.COMPILE (FRAME TAG COMINFO) MSCOMMAND ( -SENTENCE MSSETPHRASE THAT) SEDIT::CREATE-NULL-LIST (SEDIT::EDIT-NODE) HRULE.IMAGEBOXFN (IMAGEBOX) -SPYOBJ.IMAGEBOX (IMAGEBOX) \\MAIKO.NEWFAULTINIT (POINTER) \\FDEVINSTANCE (FDEV) -|\\PFCreatePhysicalVolume| (|PhysicalVolumeDescriptor| |Page|) CARET (CARET1) OPENIPSTREAM ( -INTERPRESSDATA REGION IPSTATE) SPP.DESTADDRESS (NSADDRESS) |\\VAMBufferInit| (|Page|) -\\HDCPYDISPLAYINIT (IMAGEOPS) \\CREATE-REAL-CHARSET.DISPLAY (FONTFACE) |\\PFInitFileDescriptors| ( -|VolumeID|) \\DSPTRANSFORMREGION (REGION) \\SETNEWTIME0 (FIXP) \\CREATE.TEDIT.SIZE.MENU (MENU REGION) -\\STARTDISPLAY (REGION) \\NSFILING.CLOSEFILE (FILINGHANDLE) DRAWMARGINSCALE (REGION) -TWODINSPECT.SELECTROWPROP (ONED.SELECTION) \\BUILDSLUGCSINFO (CHARSETINFO) \\OFFSETCLIPPINGREGION ( -REGION) MARGINBAR (REGION) \\TEDIT.READTABLE (READTABLEP CHARTABLE) OPENNSOCKET (NSOCKET SYSQUEUE) -\\LEAF.REQUESTPAGE (BYTEPTR) SELECT.LIST.INSPECTOR (MENU REGION) TEDIT.GET.CHARLOOKS0 (CHARLOOKS) -MB.MARGINBAR.SELFN (REGION TAB) MSINTERPRET (MSSETPHRASE THAT MSVERB) \\24DISPLAYINIT (IMAGEOPS FDEV -DISPLAYSTATE) \\MAKEPCTB (BTREENODE) \\HANDLE.PUP.ROUTING.INFO (ROUTING) \\SETTERMSYNTAX (TERMCODE) -DEFAULT.INSPECTW.TITLECOMMANDFN (MENU REGION) |\\CreateScreenBitMap| (BITMAP) MAKE-UNICODE-FORMATS ( -EXTERNALFORMAT) \\TEDIT.WINDOW.OPS (REGION) |\\LFFindNextFile| (|ExpandedName| |GeneratedFile|) -COMP.PROG (TAG) |\\PFTrimHelper| (|PageGroup|) SET-CONNECTED-DIRECTORY-INTERACTIVELY (MENU REGION) -\\INITBCPLDISPLAY (STREAM FDEV) \\FTP.OPEN.CONNECTION (FTPCONNECTION) CONTINUEDIT (FILEDATEPAIR) -SEDIT::BUILD-LINEAR-FORM (SEDIT::LINE-START SEDIT::LINE-BLOCK) \\CORE.OPENFILE (CORE.PAGEENTRY -CORESTREAM) CHAT.RECONNECT (MENU REGION) |\\PFInsertDirectoryID| (|RootDirectory| |Page|) -|\\LFFileSpec| (|DFSFileSpec|) \\TEDIT.GET.INSERT.CHARLOOKS (CHARLOOKS) |\\VFMGenerateFileIDs| (|Key|) - \\NSFILING.LOGIN (FILINGSESSION FDEV) \\DSKDISPLAY.BUTTONEVENTFN (MENU REGION) -|\\PFCreateFileDescriptors| (|FileDescriptor|) FILL.INITTBLE (PILOTBBT FILL.TBLE) NETDATE (FIXP) -TRACEREGION (REGION) DELETE/AND/DISPLAY/LINK (POSITION) \\SFROTATECSINFO (CHARSETINFO) -\\CREATE.TEDIT.FACE.MENU (MENU REGION) BMOBJ.IMAGEBOXFN (IMAGEBOX) \\TEDIT.CHARLOOKSMENU.CREATE ( -MB.BUTTON MB.TEXT) EDITBMRESHAPEFN (REGION) MAKEISOFORMAT (EXTERNALFORMAT) |\\LFParseFileName| ( -PARSEDFILENAME) GRAPHOBJ.IMAGEBOXFN (IMAGEBOX) HARDCOPYGRAPH (POSITION) \\ETHERINIT (FDEV) -\\SPP.CREATE.STREAM (STREAM) PAINTW.READBRUSHSHADE (MENU REGION) BRHC/LAYOUT/DAUGHTERS (POSITION) -COPYTERMTABLE (TERMTABLEP CHARTABLE) SEDIT::QUERY-THROW-AWAY-CHANGES (MENU REGION) -TEDIT.GET.PARALOOKS0 (FMTSPEC TAB) \\TEDIT.COPY.PIECEMAPFN (PIECE CHARLOOKS) -|\\PFPutRootDirectoryType| (|SubVolumeMarkerPage| |Page|) BUTTONPANEL (MENU REGION) TITLEDICONW ( -ICONTITLE) \\MEDW.GETSCREENREGION (POSITION SCREENREGION) BMOBJ.CREATE.MENU (MENU POSITION REGION) -\\LEAF.GETFILEDATES (LEAFINFOBLOCK) \\FM.STATE-SETUP (MENU REGION) \\SFMAKEITALIC (CHARSETINFO) -\\OPENLEAFCONNECTION (SEQUIN) \\COURIER.CHECK.PROCEDURES (COURIERFN) PROCESSWORLD (PROCESS) -BREAKREGIONSPEC (REGION) POSTSCRIPT.INIT (IMAGEOPS) \\EDITBMHOWMUCH (MENU REGION) \\NEXTCONSPAGE ( -POINTER) DISPLAYSTREAMINIT (REGION) \\DL.NEWFAULTINIT (POINTER) \\LEAFINIT (FDEV) -|\\VFMInsertPageGroup| (|Key| |Interval|) TTMAKECOMPLEXCHAR (COMPLEXCHAR) ADD.PROCESS (PROCESS) -WINDOWPOSITION (POSITION) MSQUOTED (QUOTE) MSPARSE (CVERB) \\DSKDISPLAY.CREATE.WINDOW (REGION POSITION -) GETBOXSCREENREGION (SCREENREGION) MAKEXYPT (XYPT) \\CREATEDISPLAY (FDEV DISPLAYSTATE) -ONED.TRACKCURSOR (ONED.SELECTION) CREATE.EVENT (EVENT) DO.SHIFTED.SELECTION (MOUSEPOS) EDITCHANGELABEL - (POSITION) READGRAPH (GRAPH GRAPHNODE) GET.EDIT.BITMAP.MENU (MENU REGION) TB.SET.FONT (REGION) -DINFO.READ.GRAPH (DINFOGRAPH) \\NSFILING.INIT (FDEV) \\CREATECOREDEVICE (FDEV) CREATEARRAYSLICE ( -ICML.ARRAYSLICE) MB.CREATE.THREESTATEBUTTON (IMAGEBOX) \\TFBRAVO.INIT.CHARLOOKS (CHARLOOKS) -\\FONTFACE.COLOR (FONTFACE) MSSETPHRASE (MSSETPHRASE) |\\VFMGetPageGroup| (|Key| |Interval| -|PageGroup|) GETNSPRINTER (NSPRINTER) SEDIT::LINE-FINISHED (SEDIT::LINE-BLOCK) |\\VFMDelete| (|Key|) -TEDIT.INSERT.OBJECT (PIECE TEDITHISTORYEVENT) \\INIT.KEYBOARD.STREAM (FDEV STREAM) -\\MEDW.GETBOXSCREENPOSITION (SCREENPOSITION) SET-PROFILE-INTERACTIVELY (MENU REGION) ED (MENU REGION) -HLSTORGB (RGB) \\PAGEDGETEOFPTR (BYTEPTR) |\\VAMAdjustGroup| (|PageGroup|) |\\LFFindInfo| ( -|FileDescriptor|) \\CREATE.TEDIT.DEFAULT.FMTSPEC (FMTSPEC) MAKETITLEBARICON (REGION) \\PAGEDGETFILEPTR - (BYTEPTR) COMP.PUSHCALL (TAG) \\MEDW.GETSCREENPOSITION (SCREENPOSITION) SEDIT::GET-CONTEXT ( -SEDIT::EDIT-CONTEXT) CHAT.PROMPT.FOR.INPUT (REGION) CURSOR.INIT (PILOTBBT) \\NODIRCORE.OPENFILE ( -CORESTREAM COREFILEINFOBLK CORE.PAGEENTRY) \\ALLOCMDSPAGE (POINTER) \\TTW1 (REGION) DIRECTORY ( -FILEGROUP) ECHOCHAR (TERMCODE) CHANGE-TTY-PROCESS-INTERACTIVELY (MENU REGION) -TEDIT.MINIMAL.WINDOW.SETUP (REGION) \\CREATE.TITLEMENU (MENU REGION) COMP.BLOCK (TAG BLOCKSTATUS) -%MAKE-ONED-ARRAY (ONED-ARRAY) ETHERHOSTNAME (PUPADDRESS) \\LEAF.DEVICEP (FDEV PUPFILESERVER) -\\TEDIT.CHANGE.LOOKS (CHARLOOKS) GRAPHOBJ.BUTTONEVENTINFN (MENU REGION) MAPATOMS (POINTER) -\\CREATE.TEDIT.MOVESELECTION (SELECTION) MAKEBRES (BRES) \\ORIGREADTABLE (READTABLEP CHARTABLE) -\\TFBRAVO.PARSE.PARA (PARA RUN) MAKESCAN (SCAN) MSSEEKPHRASE (PARSED CONJUNCTION) ARRAY (ARRAYP WORD) -MAKEMACFORMAT (EXTERNALFORMAT) \\CH.UPDATE.CACHE (ORGCACHE DOMAINCACHE) CHECKCONSPAGES (POINTER) -\\COERCE.NS.SOCKET (NSADDRESS) \\MAPMDS (POINTER) INSPECT/ATOM (MENU REGION) \\FTP.GENERATEFILES ( -FILEGENOBJ FTPFILEGENSTATE) \\TEDIT.GET.PARALOOKS1 (FMTSPEC TAB) COMP.EVALFORM (TAG) IMAGEFNSCREATE ( -IMAGEFNS) \\DISPLAYLINE (REGION) TEDIT.LOOKS (TEDITHISTORYEVENT) GRAPHOBJ.COPYFN (POSITION) -\\CREATE.TEDIT.DELETESELECTION (SELECTION) \\COURIER.CHECK.ERRORS (COURIERERR) |\\LFUnpackName| ( -|ExpandedName|) INITIALIZEDISPLAYSTREAMS (REGION PILOTBBT) MSSETREP (IN APPLY PATHS THAT FIELDS MSVERB - MSSETPHRASE QUOTE NOT) BRHC/LAYOUT (POSITION) DOICONWINDOWCOM (MENU POSITION REGION) -\\CREATE.SETABLEMENU (MENU REGION) DEFAULT.INSPECTW.PROPCOMMANDFN (MENU REGION) TWODINSPECT.SELECTITEM - (TWOD.SELECTION) \\CREATEPIECEORSTREAM (PIECE FMTSPEC) SELECT.ATOM.ASPECT (MENU REGION) -SEDIT::BUILD-INTERNAL-STRUCTURE (SEDIT::EDIT-NODE SEDIT::EDIT-POINT SEDIT::EDIT-SELECTION -SEDIT::OPEN-STRING) \\HCPYMODEDISPLAYINIT (IMAGEOPS) CHAT.MENU (MENU REGION) |\\LFPurgeDirectory| ( -|FileDescriptor|) |\\LFDirectoryP| (|FileDescriptor|) ITEM.WINDOW.SET.STACK.ARG (MENU REGION) -\\READSTRIKEFONTFILE (CHARSETINFO) \\GET.PRIORITY.QUEUE (PROCESSQUEUE) \\FORMATLINE (LINEDESCRIPTOR -EDITMARK) \\READACFONTFILE (CHARSETINFO) \\CHECKCONSPAGE (POINTER) |\\LFOpenOldFile| (|LeaderPage| -|Page| DLIONSTREAM) SEDIT::INITIALIZE-LISTS (SEDIT::EDIT-NODE-TYPE) DBG::ATTACH-BACKTRACE-MENU (MENU -BKMENUITEM REGION POSITION) COMP.PUSHNILS (TAG) GETD (COMPILED-CLOSURE) TYPEINMENU (MENU REGION) -\\SPP.CREATE.CON (SPPCON SYSQUEUE) SI::GET-CACHE-CLOSURE (COMPILED-CLOSURE) -MAKE-FILL-POINTER-OUTPUT-STREAM (STREAM) SEDIT::CREATE-SIMPLE-NODE (SEDIT::EDIT-NODE SEDIT::STRING-ITEM -) ICONPOSITION.FROM.WINDOW (POSITION) IDLE.SET.OPTION (MENU REGION) SEDIT::INITIALIZE ( -SEDIT::EDIT-NODE-TYPE SEDIT::GAP SEDIT::EDIT-SELECTION SEDIT::EDIT-POINT) ONEDINSPECT.ADJUSTSELECTION -(ONED.SELECTION) CURSORCREATE (CURSOR) \\ORIGTERMTABLE (TERMTABLEP CHARTABLE) -|\\PFFindRootDirEntryNum| (|RootDirEntry|) SCALEREGION (REGION) MBUTTON.CREATE (IMAGEBOX) \\RENAMEDFN -(COMPILED-CLOSURE) \\NSFILING.CONNECT (FILINGHANDLE) \\INITBIGNUMS (BIGNUM) COPYREADTABLE (READTABLEP -CHARTABLE) %DO-LOGICAL-OP (PILOTBBT) INSPECT/BITMAP (MENU REGION) ROTATE-BITMAP (PILOTBBT) -SEDIT::SETUP-WINDOW-CONTEXT-DEPENDENCIES (REGION) \\BASEBYTES.IO.INIT (FDEV) \\TEDIT.CREATE.LINECACHE -(LINECACHE) \\CREATE.INSPECTABLEMENU (MENU REGION) \\TEDIT.GET.CHARLOOKS1 (CHARLOOKS) |\\LFVersions| ( -DIRSEARCHSTATE) CCCSCAN (REFMAP) ROTATE-BITMAP-LEFT (PILOTBBT) DOATTACHEDWINDOWCOM (MENU POSITION -REGION) \\SFMAKECOLOR (CHARSETINFO) \\CREATE.TEDIT.SHIFTEDSELECTION (SELECTION) CREATE-SHELL-STREAM ( -STREAM) UNIONREGIONS (REGION) RESET/NODE/LABELSHADE (POSITION) TRANSLATEREG (REGION) \\IRM.CHOOSE.REF -(MENU REGION) MAKELINE (LINE) MENUWRESHAPEFN (POSITION) COMP.STUNBIND (OP) SEDIT::MAKE-GAP (SEDIT::GAP -) FB.MAKE.SUBDIRECTORY.ITEM (TABLEITEM FBFILEDATA) \\TEXTMENU.START (REGION) |\\PFPurgeRootDirectory| -(|FileDescriptor|) CURSORPOSITION (POSITION) %FAST-COPY-BASE (PILOTBBT) PAINTW.READCOMMAND (MENU -REGION) \\TEDIT.INSERT.PIECES (PIECE) \\10MB.CREATENDB (NDB) \\VECFONTINIT (FONTDESCRIPTOR CHARSETINFO -) FB.ADD.FILEGROUP (TABLEITEM) \\TEDIT.CUMULATE.EVENTS (TEDITHISTORYEVENT) TOPW.ADJUSTSELECTION ( -ONED.SELECTION) \\CH.GUESS.NEW.PROPERTIES (NSNAME) POSTSCRIPT.FONTCREATE (FONTDESCRIPTOR) FILEBROWSER -(MENU REGION FILEBROWSER) CLEARSTK (POINTER) INSPECTW.REDISPLAY (SELECTABLEITEM REGION) -INITIALIZE-SHELL-DEVICE (FDEV) \\MAKEBASEBYTESTREAM (BASEBYTESTREAM) |\\LFCreateFile| (DLIONSTREAM -|FileDescriptor| |PageGroup|) |\\LFCreateDevice| (FDEV) STRIKECSINFO (CHARSETINFO) -\\ALLOCATE.ETHERPACKET (ETHERPACKET) PFI.HANDLE.DEFDEFINER (PFITYPE) \\CREATE.TEDIT.SELECTION ( -SELECTION) SET-READTABLE-INTERACTIVELY (MENU REGION) TEDIT.FORMATBOX (REGION PAGEREGION) -\\TRANSFERPAGE (POINTER) %MAKE-GENERAL-ARRAY (GENERAL-ARRAY) ICMLARRAY.GETMENUWGROUP (POSITION) -PRINTANDBOX (REGION) |\\VFMPutNext| (|Interval|) COURIER.READ.NSADDRESS (NSADDRESS) TEDIT.RAW.INCLUDE -(PIECE FMTSPEC EDITMARK) |\\LFMakeVolumeDirectory| (|FileDescriptor| |PageGroup|) %MAKE-TWOD-ARRAY ( -TWOD-ARRAY) |\\LFGetStreamForFile| (|FileDescriptor|) SEDIT::INITIALIZE-COMMENTS (SEDIT::EDIT-NODE-TYPE -) SPYOBJ (SPYOBJDATA) ADVISEWDS (REGION) \\BIGNUM.LSH (BIGNUM) PARSE-NSADDRESS (NSADDRESS) TEDIT.COPY -(TEDITHISTORYEVENT) \\LEAF.GETFILE (STREAM) \\CH.CHECK.CLEARINGHOUSE (NSNAME) STRINGREGION (REGION) -CURSORHOTSPOT (POSITION) \\TEXTMENU.TOGGLE.CREATE (IMAGEBOX) \\CREATE.TEDIT.RESTART.MENU (MENU REGION) - \\STRINGSTREAM.INIT (FDEV) \\MAIKO.DISPLAYLINE (REGION) \\MOVEREALPAGE (POINTER) -|\\CreateCursorBitMap| (BITMAP) MSBLOCK (BLOCKS) CHAT.CHOOSE.PHONE.NUMBER (MENU REGION) -IRM.CREF.BUTTONEVENTFN (REGION) ICMLARRAY.GETREGIONFN (POSITION) CL:MAKE-CONCATENATED-STREAM (STREAM) -MB.COPYFN (IMAGEOBJ) SEDIT::MAKE-BROKEN-ATOM (SEDIT::BROKEN-ATOM) CHAT (MENU REGION) -|\\UFSPrintTypeMenu| (MENU REGION) COMP.STBIND (OP) COMP.MAP (TAG JUMP) OPT.LABELNTHPR (TAG) -|\\PFRemoveRootDirEntry| (|RootDirEntry|) REGIONONSCREEN (REGION) CREATEPOSITION (POSITION) -\\CREATE.SPP.DEVICE (FDEV) BROWSE/LAYOUT/LATTICE (GRAPH) \\NSFILING.DESERIALIZE (FILINGHANDLE) -SPY.MERGE.CALLEES (SPYRECORD) INTERSECTREGIONS (REGION) ENCAPSULATEDOBJ.IMAGEBOXFN (IMAGEBOX) -\\SETMACROSYNTAX (READMACRODEF) MSPRED (MSSETPHRASE NOT THAT) MOVENODE (POSITION) \\MAKENUMBER (FIXP) -LAYOUTSEXPR1 (GRAPHNODE) ONEDINSPECT.SELECTPROP (ONED.SELECTION) SEDIT::CREATE-QUOTED-GAP (SEDIT::EDIT-NODE -) \\ATBLSET (READER-ENVIRONMENT) SPY.TREE (SPYDATA) COMPOSEREGS (REGION) CREATE.NUMBERPAD.READER (MENU - REGION POSITION) \\PUSHSTATE.IP (IPSTATE) CHANGE.NODEFONT.SIZE (POSITION) SEDIT::FORMAT-FROM-INDENT ( -SEDIT::LIST-FORMAT) \\CH.FIND.ORG.SERVER (DOMAINCACHE ORGCACHE NSNAME) NIL -FETCH SEDIT::CREATE-QUOTED-GAP (SEDIT::QUOTE-STRING SEDIT::ENVIRONMENT) \\ADDOFD (NAMEDP FULLFILENAME) - \\DSPTOPMARGIN.IP (IPTOP IMAGEDATA) TB.SHOW.SELECTION (TBBASELINE TBWINDOW TBITEMHEIGHT BITMAPHEIGHT) - GN/BOTTOM (YCOORD NODEPOSITION NODEHEIGHT) TEDIT.COPY.PARALOOKS (PPARALOOKS \\TEXTOBJ) -SEDIT::PARSE--BROKEN-ATOM (SEDIT::ATOM-CHARS SEDIT::BROKEN-ATOM-FONT SEDIT::ENVIRONMENT) -SEDIT::UNDERLINE-SELECTION (SEDIT::SELECT-START-X SEDIT::SELECT-START-LINE SEDIT::SELECT-END-X -SEDIT::SELECT-END-LINE) SEDIT::COMPLETE (SEDIT::EDIT-OPTIONS SEDIT::OPEN-NODE-CHANGED? -SEDIT::DISPLAY-WINDOW) \\FTP.ERRORHANDLER (FTPOPENP F5 ENDOFSTREAMOP FULLFILENAME) OPENFILE (FULLNAME -FULLFILENAME) \\HARDRESET-CLEANUP1 (FNHEADER NEXTBLOCK FIRSTPVAR FXSIZE OVERHEADWORDS) -\\TEDIT.SCALEREGION (LEFT BOTTOM WIDTH HEIGHT) TWODINSPECT.REPAINTFN (TOP BOTTOM HEIGHT LEFT RIGHT -WIDTH) \\PS.SCALEREGION (LEFT BOTTOM WIDTH HEIGHT) \\FM.TOGGLE-DOWNFN (FM.USERDATA LEFT BOTTOM) -FB.THINCOMMAND (TABLEBROWSER SORTBY INFODISPLAYED TIDATA FILEINFO VERSIONLESSNAME) NS.ECHOUSER ( -XIPCONTENTS NSOCEVENT XIPTYPE XIPLENGTH EPTRANSMITTING) SEDIT::INSPECT-SELECTION (SEDIT::SELECTION -SEDIT::CARET-POINT SEDIT::DISPLAY-WINDOW) \\HCPYMODEBLTCHAR (DDCHARSET |DDSlowPrintingCase| -DDXPOSITION DDSPACEWIDTH DDWIDTHSCACHE DDMICARIGHTMARGIN |DDLeftMargin| DDXOFFSET DDCHARIMAGEWIDTHS -|DDClippingRight| |DDClippingLeft| PBTHEIGHT DDPILOTBBT DDOFFSETSCACHE) ADD.BORDER.TO.BITMAP ( -BITMAPWIDTH BITMAPHEIGHT) \\OUTCHARFN.PRESS (IMAGEDATA PRXPOS PRSPACEWIDTH PRWIDTHSCACHE LEFT -|PRClippingRegion| RIGHT WIDTH PRYPOS BOTTOM CHARWASDISPLAYING) \\TELERAIDCOMMAND (TRCONTROLD TRCURSOR - TRCONTROLN NDBPUPHOST# TRRAID TRCONTROLS) \\DSPROTATE.PSC (IMAGEDATA POSTSCRIPTROTATION) -SEDIT::PRETTY-PRINT (SEDIT::SUB-NODES) \\BASEBYTES.OPENFN (FULLFILENAME CBUFPTR BIASOFFST FW6 -WRITEXTENSIONFN F1) SEDIT::SETUP-CONTEXT-WINDOW-DEPENDENCIES (SEDIT::DISPLAY-WINDOW) CLEARHASHFILES ( -|Stream| HASHFILE) COMP.DECLARE (VARS OPNAME OPARG) FUNCTION.WRAPPER (HASHMACROCHAR) \\TEXTSTREAMBOUT -(TEXTOBJ F3 TEXTLEN \\WINDOW SEL L1 CH# THISLINE LN CARETLOOKS \\INSERTPC CHARLIM CHARTOP CLFONT X0 -WRIGHT POINT YBOT BOTTOM Y0 WBOTTOM LHEIGHT PSTR BASE XBASE INDIRECT-P OFFST OFFSET \\INSERTLEN -COFFSET) TEDIT.GETSEL (SEL TEXTOBJ F3) |\\VAMFindFreePages| (|lowerBound| |filePage| |volumeSize| -|nextFilePage|) MB.SHOWSELFN (XSIZE YSIZE YDESC) \\TEDIT.REPAINTFN (SEL PTOP BOTTOM HEIGHT YBOT CHAR1 -NEXTLINE) SCALEPAGEUNITS (TPSWIDTH) TWODINSPECT.BUTTONEVENTFN (ROWPROP COLUMNPROP) FILES? (TOBEDUMPED -FILEPROP) \\COURIER.REP.BOUT (CRNEXTBYTE F2 CRLASTWORD F3) \\GC.MODIFY.BIGREFCNT (OVFLPTR OVFLCNTLO -OVFLCNTHI) TB.SELECT.ITEM (TI#) DISPLAYLINK/TB (XCOORD NODEPOSITION YCOORD) TEDIT.COPY.LOOKS (PLOOKS -\\TEXTOBJ) SEDIT::OPEN-LITATOM (SEDIT::OPEN-NODE SEDIT::OPEN-NODE-CHANGED? SEDIT::OPEN-NODE-INFO -SEDIT::LINEAR-FORM SEDIT::NODE-TYPE SEDIT::SUBSTRING SEDIT::BUFFER-STRING) SEDIT::TRACK-SELECT ( -SEDIT::POINT-TYPE SEDIT::POINT-X SEDIT::POINT-LINE) FB.HARDCOPY.MAXWIDTH (FILEINFO TIDATA) -\\FTP.WHENCLOSED (FTPIN FTPHOST) \\DRAWARC.PSC (IMAGEDATA BRUSHSHAPE BRUSHSIZE BRUSHCOLOR -POSTSCRIPTSCALE) SEDIT::SETUP-CONTEXT (SEDIT::CONTEXT-LOCK SEDIT::PROFILE SEDIT::CHANGED-STRUCTURE?) -\\SWITCHFONTS.PSC (POSTSCRIPTFONT IL-FONTID OTHERDEVICEFONTPROPS FONTIDNAME POSTSCRIPTFONTSUSED -FONTXFACTOR FONTSIZE FONTOBLIQUEFACTOR) \\GC.ENTER.BIGREFCNT (OVFLPTR OVFLCNTHI) COURIER.NSNAME.LENGTH - (NSOBJECT NSDOMAIN NSORGANIZATION) \\NSGATELISTENER (NSOCEVENT XIPCONTENTS) OPT.DELETEFRAMECHECK ( -PREV NXT) RESET (FRAMENAME NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER \#FRAMENAME INVALIDP CLINK -FASTP SLOWP \#ALINK \#CLINK) \\FM.TOGGLE-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN - FM.USERDATA) \\VECPUT (IMAGEDATA VECMOVINGRIGHT VECCURX VECCURY VECWASDISPLAYING VECSEGCHARS) -\\COURIER.REP.BIN (CRNEXTBYTE F2 CRWORDLIST F1 LOBYTE HIBYTE) \\SENDLEAF (LEAFERRORCNT FW7 -FULLFILENAME LEAFLENGTH PUPCONTENTS EPUSERFIELD SEQEVENT LEAFOPCODE LEAFERRORCODE) SUBSTRING ( -PNAMEBASE PNAMELENGTH FATPNAMEP BASE XBASE INDIRECT-P LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER OFFST - OFFSET) \\SHOWMENULABEL (LEFT WIDTH BOTTOM MENUFONT HEIGHT BITMAPHEIGHT MENUUSERDATA) -SEDIT::INSERT-SPECIAL-CHARACTER (SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::SELECT-NODE SEDIT::SELECTION -) \\SLOWHCPYMODEBLTCHAR (IMAGEDATA ROTATION DDFONT DDXPOSITION DDWIDTHSCACHE |DDRightMargin| DDXOFFSET - |DDClippingLeft| |DDClippingRight| DDPILOTBBT PBTHEIGHT DDOFFSETSCACHE BITMAPBITSPERPIXEL -|DDDestination| DDYPOSITION FONTCHARSETVECTOR CHARSETBITMAP CHARSETASCENT CHARSETDESCENT) -\\GETPILOTBBTSCRATCHBM (BITMAPWIDTH BITMAPHEIGHT) \\TELERAIDGET (EPTYPE PUPDESTSOCKETLO PUPDESTHOST -NDBPUPHOST# PUPDESTSOCKETHI NETTYPE TRANSOPERATION TRANSPUPHOST) MKSTRING (PNAMEBASE PNAMELENGTH -FATPNAMEP) \\PRESSINIT (IMXPOSITION IMAGEOPS IMYPOSITION) BITMAPCOPY (BITMAPHEIGHT BITMAPBITSPERPIXEL) - \\GC.LOOKUP.BIGREFCNT (OVFLPTR OVFLCNTHI OVFLCNTLO) SEDIT::INSERT-MULTI-ESCAPE (SEDIT::CARET-POINT -SEDIT::POINT-NODE SEDIT::POINT-STRING SEDIT::POINT-INDEX SEDIT::SELECT-NODE SEDIT::POINT-TYPE -SEDIT::SELECTION) \\GCMAPSCAN (LINKP LINKPTR STKCNT HIBITS NXTPTR FREEPTR CONTENTS EMPTY) -SETUPFONTS.PRESS (IMAGEDATA) \\DRAWPOINT.PSC (BITMAPWIDTH BITMAPHEIGHT) \\DORETCALL (|MiscFXP| CLINK -FASTP SLOWP \#ALINK \#CLINK PC FNHEADER NEXTBLOCK SIZE) ALLOCSTRING (INDIRECT-P) COURIER.WRITE.NSNAME -(NSORGANIZATION NSDOMAIN NSOBJECT) \\PUTONSCREENW (LEFT REG SCWIDTH SCREEN BOTTOM) TEDIT.SEL.AS.STRING - (TEXTOBJ F3 SEL DCH CH# STREAMHINT) OPT.FRAMEVAR (VARS NNILS NVALS OPNAME PREV OPARG) -\\SET.STORAGE.STATE (|DL24BitAddressable|) \\SERIALNUMBER (|SerialNumber|) \\DSPRIGHTMARGIN.IP (IPDATA - IMAGEDATA IPRIGHT IPVISRIGHT) \\FREELISTCELL (PAGEBASE NEXTCELL WORD# WORDINPAGE CNT NEXTPAGE -DTDNEXTPAGE) ADJUSTLINE.AND.RESTORE (LASTCOL) GN/LEFT (XCOORD NODEPOSITION NODEWIDTH) \\IMAGEUSERPROP -(IMAGEOBJPLIST) SEDIT::INSERT-STRING (SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::SELECT-STRING -SEDIT::SELECT-TYPE SEDIT::POINT-INDEX SEDIT::POINT-STRING SEDIT::POINT-TYPE) SEDIT::TRACK-EXTEND ( -SEDIT::SELECT-NODE SEDIT::SELECTION) MARGINBAR.CREATE (XSIZE YSIZE MARL1 MARLN MARR MARTABS MARUNIT -WIDTH) NTHCHARCODE (BASE XBASE INDIRECT-P LENGTH FILL-POINTER OFFST OFFSET FATSTRINGP TYPE-NUMBER -PNAMEBASE PNAMELENGTH FATPNAMEP) \\INSERT.FIRST.PIECE (FMTSPEC) \\TEDIT.FORMAT.FOOTNOTE (CHAR1 TEXTLEN - LSTLN PAGELINECACHE CACHE WIDTH STREAMHINT LFMTSPEC LEFTMARGIN LEFT RIGHTMARGIN CHARLIM) FB.ADD.FILE -(SIZE TIDATA TOTALPAGES TOTALFILES) GETHOSTINFO (HTE.OS.TYPE) SEDIT::LOCATE-NODE-FROM-EDITCHAIN ( -SEDIT::SUB-NODES CL:STRUCTURE) TWODINSPECT.COPYBUTTONFN (ELTLEFT ELTBOTTOM ELTWIDTH ROWPROP COLUMNPROP -) HARDCOPYW (SCREEN REGION WIDTH HEIGHT BITMAPWIDTH BITMAPHEIGHT) \\UFS.RECOGNIZE.FILE (DEVICENAME) -\\TEDIT.CONVERT.TO.FORMATTED (PCTB TEXTLEN) REFLECT/GRAPH/DIAGONALLY (SIDESFLG GRAPHNODES NODEPOSITION - YCOORD XCOORD) \\DSPTRANSLATE.PSC (IMAGEDATA POSTSCRIPTTRANSX POSTSCRIPTTRANSY -POSTSCRIPTCLIPPINGREGION POSTSCRIPTPAGEREGION LEFT BOTTOM POSTSCRIPTX POSTSCRIPTY POSTSCRIPTLEFTMARGIN - POSTSCRIPTRIGHTMARGIN POSTSCRIPTBOTTOMMARGIN POSTSCRIPTTOPMARGIN) \\EQREFCNT1 (NOREFCNT PAGE# LINKP -EMPTY HIBITS LINKPTR NXTPTR) SEDIT::SET-DEPTH (SEDIT::SUB-NODES) WORD.MATCHES.BUFFER (NSCHARHASH -CPXREALCHAR) \\HARDRESET-CLEANUP (PROCHARDRESETINFO OVERHEADWORDS) COMP.COND (OPARG) TEDIT.GET.LOOKS ( -TEXTLEN CARETLOOKS PLOOKS PCTB CH# SEL) OPT.FRAMEDEL (FRAMETYPE VARS LEVEL OPNAME OPARG NOXVAR PARENT -NNILS NVALS PREV FRAME NXT EXTCALL) FIND.MATCHING.QUOTE (NSCHARHASH CPXREALCHAR) \\FM.MOMENTARY-SETUP -(FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN) \\ONSCREENW (SCWIDTH SCREEN LEFT) -\\GCMAPUNSCAN (LINKP LINKPTR STKBIT CNT NXTPTR FREEPTR CONTENTS) \\LEAF.CLOSEFILE (LEAFCONNECTION F1 -LEAFOPENCLOSELOCK SEQSTATE ACCESSBITS LEAFCACHEDFILE FULLFILENAME LEAFREALLYOPEN F5 LEAFHANDLE F2 -PUPCONTENTS) STRPOS (PNAMEBASE PNAMELENGTH FATPNAMEP BASE XBASE INDIRECT-P OFFST OFFSET LENGTH -FILL-POINTER FATSTRINGP TYPE-NUMBER TYP) ADDTOFILES? (CHANGED DESCRIPTION WHENFILED) -SEDIT::INPUT-TOKENDELIM (SEDIT::CARET-POINT SEDIT::SELECTION SEDIT::POINT-NODE SEDIT::NODE-TYPE -SEDIT::SELECT-NODE) \\STRINGWIDTH.HCPYMODE (DDCHARIMAGEWIDTHS IMAGEDATA) \\TYPENUMBERFROMNAME (DTDNAME -) \\STARTPAGE.PRESS (IMAGEDATA PRFONT PRHEADING PRSPACEFACTOR PRHEADINGFONT PRLEFT PRTOP PRXPOS -PRPAGENUM) OPENBSPSTREAM (RTPSTATE CONNID BSPTIMER BSPINACTIVITYTIMEOUT INACTIVITYTIMER RTPPROCESS) -RIGHTW.ADJUSTSELECTION (PROP) TEDIT.HARDCOPY-COLUMN-END (LMARK CHARLIM LSTLN 1STLN CHAR1 TEXTLEN -FMTHEADINGKEEP LFMTSPEC FMTKEEP PAGE# BOTTOM DESCENT LHEIGHT) EQUAL.CH.NAMES (NSOBJECT NSDOMAIN -NSORGANIZATION) TEDIT.DEFAULT.MENUFN (EDITOPACTIVE PCTB STREAMHINT SEL) COURIER.REP.LENGTH (FATSTRINGP - INDIRECT-P TYPE-NUMBER) \\FIXILINES (TXTREADONLY L1 \\WINDOW LINES CHARTOP NEXTLINE CHAR1 PREVLINE -CHARLIM CR\\END MOVESEL SHIFTEDSEL) SWITCH/NODE/HEIGHT/WIDTH (NODEWIDTH) ORDERFROMBOTTOMTOTOP (SCTOPW -SCREEN NEXTW) \\DSPSPACEFACTOR.IP (IMAGEDATA IPSPACEFACTOR IPFONT) TB.BOTTOM.OF.ITEM (TBORIGIN -TBITEMHEIGHT TI#) \\EXTENDEDVMEMINIT (|XVmemFmapBase|) GN/TOP (YCOORD NODEPOSITION NODEHEIGHT) -\\REFCNT (NOREFCNT PAGE# EMPTY LINKP HIBITS CNT LINKPTR NXTPTR) POSTSCRIPT.SET-FAKE-LANDSCAPE ( -IMAGEDATA POSTSCRIPTLANDSCAPE POSTSCRIPTCLIPPINGREGION POSTSCRIPTPAGEREGION HEIGHT WIDTH BOTTOM LEFT -POSTSCRIPTBOTTOMMARGIN POSTSCRIPTRIGHTMARGIN POSTSCRIPTTOPMARGIN POSTSCRIPTLEFTMARGIN) -SEDIT::INSERT-LITATOM (SEDIT::SELECT-TYPE SEDIT::POINT-TYPE) SEDIT::SHRINKFN (SEDIT::CONTEXT-LOCK -SEDIT::EDIT-OPTIONS SEDIT::DISPLAY-WINDOW SEDIT::ICON-TITLE SEDIT::EDIT-TYPE) FNTYP (DEFINITIONCELL -PSEUDOCODEP CCODEP DEFPOINTER FNHEADER) BSPOUTPUTSTREAM (BSPOUTPUTSTREAM F2) \\TEDIT.PROMPT.PAGEFULLFN - (TOP BOTTOM HEIGHT) BITMAPBIT (BITMAPBITSPERPIXEL BITMAPWIDTH BITMAPHEIGHT BITMAPBASE -BITMAPRASTERWIDTH IMAGEDATA |DDDestination|) TEDIT.UPDATE.SCREEN (TXTDON\'TUPDATE \\WINDOW LINES YBOT) - REFLECT/GRAPH/HORIZONTALLY (GRAPHNODES NODEPOSITION XCOORD) TEDIT.GETPOINT (SEL POINT CH# CHLIM) -SEDIT::TTYFN (SEDIT::CONTEXT-LOCK) \\DSPLINEFEED.IP (IMAGEDATA IPLINEFEED) GN/RIGHT (XCOORD -NODEPOSITION NODEWIDTH) POSTSCRIPT.STARTPAGE (IMAGEDATA POSTSCRIPTPAGENUM POSTSCRIPTHEADING -POSTSCRIPTHEADINGFONT) BLTCHAR (IMAGEDATA) SHOWBITMAP.IP (BITMAPWIDTH BITMAPHEIGHT WIDTH HEIGHT LEFT -BOTTOM) FILEPKGTYPE (DESCRIPTION) \\DSPPUSHSTATE.PSC (IMAGEDATA POSTSCRIPTXFORMSTACK -POSTSCRIPTCLIPPINGREGION POSTSCRIPTPAGEREGION POSTSCRIPTLEFTMARGIN POSTSCRIPTRIGHTMARGIN -POSTSCRIPTTOPMARGIN POSTSCRIPTBOTTOMMARGIN POSTSCRIPTTRANSX POSTSCRIPTTRANSY POSTSCRIPTLANDSCAPE -POSTSCRIPTPENDINGXFORM) ASKUSER (EXPLAINSTRING KEYSTRING KEY OPTIONS) \\DSPCLIPTRANSFORMX (DDXOFFSET -|DDClippingLeft| |DDClippingRight|) BACKSKREAD (NSCHARHASH CPXREALCHAR) \\PROCESS.BEFORE.LOGOUT ( -PROCBEFOREEXIT PROCNAME) NSNETDAYTIME0 (PACKETEXCHANGEBODY XIPLENGTH TIMEOP TIMEVALUE) \\SLOWBLTCHAR ( -IMAGEDATA ROTATION DDFONT DDXPOSITION DDWIDTHSCACHE |DDRightMargin| DDXOFFSET |DDClippingLeft| -|DDClippingRight| DDPILOTBBT PBTHEIGHT DDOFFSETSCACHE BITMAPBITSPERPIXEL |DDDestination| DDYPOSITION -FONTCHARSETVECTOR CHARSETBITMAP CHARSETASCENT CHARSETDESCENT) PFI.MAKE.LPT.STREAM (LEFT) -\\DSPCLIPTRANSFORMY (DDYOFFSET |DDClippingBottom| |DDClippingTop|) \\DSPPRINTCR/LF (IMAGEDATA -|DDSlowPrintingCase| ROTATION DDFONT |DDClippingRegion| DDEOLFN BOTTOM TOP HEIGHT DDXPOSITION -DDLINEFEED |DDScroll| DDXOFFSET |DDClippingRight| |\\SFDescent| |DDClippingLeft| |DDDestination| -|DDClippingBottom| |DDClippingTop| |DDTexture| |DDLeftMargin| DDYPOSITION DDYOFFSET) TB.NORMALIZE.ITEM - (TBWINDOW BOTTOM PTOP HEIGHT TBITEMHEIGHT) \\CHANGECHARSET.DISPLAY (DDPILOTBBT FONTCHARSETVECTOR +\SPP.SETFILEPTR (CON) CL::PRINT-PACKAGE-HASHTABLE (CL::DEPTH) SHRKFY (FORM) \TEDIT.SCROLLFN (W DX DY) +FDIFFERENCE (X Y) COMPILER::EFFECTS-ANALYZE-ANY-CALL (COMPILER::NODE COMPILER::FN COMPILER::ARGUMENTS) + FASL:DUMP-EVAL (FASL::HANDLE FASL::FORM) \FIXSEL (SEL TEXTOBJ THISWINDOW AVOIDINGTHISW) EDITGETDEF ( +SEDIT::WINDOW) FGREATERP (X Y) FILEGETDEF.PROPS (TYPE OPTIONS) UNREADITEM (MENU BUTTON) CHNGNM ( +SI::*RESETFORMS*) FIND-EXEC-COMMAND (NAME TABLE) WRITE (*PRINT-ESCAPE* *PRINT-RADIX* *PRINT-BASE* +*PRINT-LEVEL* *PRINT-LENGTH* *PRINT-CASE* *PRINT-GENSYM* *PRINT-ARRAY* *PRINT-PRETTY* +*PRINT-CIRCLE-NUMBER*) MENUREPAINTFN (REG) FABS (X) ASKUSER (NOCASEFLG READBUF) SEDIT::INSERT ( +SEDIT::SUBNODES SEDIT::CHARS) SEDIT::RELINEARIZE-PRELINEARIZED-NODE (SEDIT::LITEM) \DEVICE.INPUT ( +TASKREG) \FILLPOLYGON.PSC (OPERATION) CL::GET-SHARED-SETF-METHOD (CL::SHARED-SETF-INVERSE) EF ( +*EDITMODE*) \NSRANDOM.PROCEEDABLE.ERROR (STREAM ERROR ERRORARGS PROCEED-DETAILS) ANALYZE-AUX (ARGLIST +ERRLOC) SEDIT::REPLACE-QUOTE (SEDIT::WHERE SEDIT::POINT) XCL::MAKE-IMPLICIT-KEY-HASH-TABLE (XCL::MIN-KEYS +) XCL::ADD-LABELS/FLET-ENVIRONMENT (XCL::LABELS/FLET-FORM XCL::ENV) CONDITIONS::EXPAND-WITH-COLLECTION-SITES + (CONDITIONS::NEW-SITES CONDITIONS::BODY CONDITIONS::OLD-SITES CONDITIONS::NEW-SITES-AND-TAILS) +COMPLEX-COUNT (ITEM SEQUENCE START END KEY TEST TEST-NOT-P) SEDIT::CLEAN-UP-AFTER-RELINEARIZATION ( +SEDIT::Y-1 SEDIT::Y-2 SEDIT::BOTTOM SEDIT::WINDOW-WIDTH SEDIT::RY-1 SEDIT::RY-2) +\TEDIT.PUT.SINGLE.PARALOOKS2 (OUTPUTFORMAT LEN) \BLTCHAR (CHARCODE DISPLAYSTREAM DISPLAYDATA) +\BOXFQUOTIENT (BORROW) COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION (COMPILER::COMPILER-CONTEXT +COMPILER::MESSAGE) SEDIT::REPLACE-CHARS (SEDIT::NEW-END SEDIT::MULTI-ESCAPE SEDIT::ADD-MULTI-ESCAPE? +SEDIT::COMPUTE-NEW-POINT-TYPE? SEDIT::CARET) \TEDIT.FIND (AGAIN) PFI.PRINT.INDEX (*PFI-ITEM* +*PFI-TITLE*) \TERMINATESPP (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) MAKE-REPORT-FUNCTION (DATUM +BOUND-VAR TYPE-NAME) %%MERGE-LISTS (LIST1 LIST2 PRED KEY) \PROCESS.AFTER.EXIT (FLG) +COMPILER::BINDING-TO-LAMBDA (COMPILER::BINDING) %%FILL-ARRAY-FROM-SEQUENCE (SEQUENCE FLATTENED-ARRAY +OFFSET) \3MBRAWRECEIVE (NDB \INTERRUPTABLE) SEDIT:GET-WINDOW-REGION (SEDIT::CONTEXT SEDIT::REASON +SEDIT::NAME TYPE) IRM.GET.CREF (TEXTSTREAM) CL::STRUCTURE-FUNCTIONS (CL::STRUCTURE-NAME CL::PS) +TEDIT.GET.LOOKS (FONT) CLISPDEC (TYPE-IN? FAULTFN) VALUOF (HISTORYFLG) FORMAT-EXPONENTIAL (COLON +ATSIGN PARMS) EV (*EDITMODE*) TEDIT.INCLUDE (NPC PCCOUNT) TTYIN.BALANCE (RPTN) D-ASSEM:ASSEMBLE-FUNCTION + (D-ASSEM::*DVAR-ENV* D-ASSEM::*STACK-ENV* D-ASSEM::*LOCAL-FN-FIXUPS* D-ASSEM::ID) \MEDW.CURSOR ( +SCREEN) SIMPLE-NSUBSTITUTE (NEWITEM OLDITEM SEQUENCE START END) %%MAP-FOR-EFFECT-MULTIPLE (FUNCTION +MIN-LENGTH ELT-SLICE) COMPILER::COMPILE-DEFINER-OUTSTANDING-LOOSE-FORMS (COMPILER::COMPILER-CONTEXT) +\OPENLINEBUF (STREAM) \TEDIT.PUT.SINGLE.CHARLOOKS2 (STR LEN) D-ASSEM:INTERN-DCODE (D-ASSEM::NTBYTESIZE + D-ASSEM::CODE-ARRAY \INTERRUPTABLE D-ASSEM::START-PC) \DSPPRINTCR/LF (FONT) %%MAP-FOR-EFFECT-SINGLE ( +FUNCTION SEQUENCE) SI::ADVICE-GETDEF (TYPE SI::OPTIONS) COMPLEX-COUNT-IF (TEST SEQUENCE START END KEY) + CL:MULTIPLE-VALUE-CALL (FORMS) MODERNWINDOW.SETUP (ORIGFN MODERNWINDOWFN ANYWHERE TITLEPROPORTION) +SEDIT::PRINT-BROKEN-ATOM (SEDIT::X) TWODINSPECT.SELECTITEM (*PRINT-LEVEL* *PRINT-LENGTH*) +CONDITIONS::NORMALIZE-SLOT-DESCRIPTION (CONDITIONS::SLOT-DESC) FILEGETDEF.MACROS (NAME TYPE OPTIONS) +CLISPIF0 (DWIMIFYCHANGE) SEDIT::SET-INITIAL-SELECTION (SEDIT::CANDIDATE) DWIMIFYFNS (CLK) BIT ( +BIT-ARRAY INDICES) TEDIT.DEFAULT.MENUFN (OCURSOR LINES) FIXSPELL (DWIM.GIVE.UP.TIME SI::*RESETFORMS*) +D-ASSEM:FIXUP-PTR-NO-REF (\INTERRUPTABLE) COMPLEX-SUBSTITUTE-IF-NOT (NEWITEM TEST SEQUENCE START END +FROM-END KEY COUNT) SI::PROCESS-PROCEED-KEYWORDS (SI::NAME SI::ARG PACKAGE SI::FILTER SI::REPORT) +\LOAD-STREAM (*STANDARD-INPUT* *PACKAGE* *READTABLE* PRLST FILECREATEDENV FILEMAP FNADRLST +FILECREATEDLST INTERLISP-P FILECREATEDLOC) D-ASSEM:FIXUP-SYMBOL (\INTERRUPTABLE) \NULL.OPENFILE (NAME +RECOG PARAMETERS) XCL::ADD-MACROLET-ENVIRONMENT (XCL::MACROLET-FORM XCL::ENV) SI::SPLIT-PROCEED-CLAUSES + (SI::ENV SI::OPTIMIZE?) SIMPLE-COUNT-IF-NOT (TEST SEQUENCE START END) \GETSPP (SI::*LOCKED-MONITOR* +SI::*RESETFORMS* \INTERRUPTABLE) \LEAF.GETFILE (MODE SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +EXTERNAL-SYMBOL-COUNT (PACKAGE) COMPILER::SCAN-ONE-FORM (COMPILER::COMPILER-CONTEXT) +%%MAP-FOR-RESULT-MULTIPLE (FUNCTION ELT-SLICE RESULT) BACKGROUNDWHENSELECTEDFN (FROMMENU BUTTON) +FILEGETDEF.RECORDS (NAME TYPE OPTIONS) CLISPATOM0 (SI::*RESETFORMS*) MB.SHOWSELFN (SEL) D-ASSEM:FIXUP-PTR + (\INTERRUPTABLE) DWIMDEF (NOSPELLFLG DWIMESSGAG FILEPKGFLG LISPXHIST) SI::ADVICE-PUTDEF (TYPE) +%%MAP-FOR-RESULT-SINGLE (FUNCTION) SI::EXPAND-CONDITION-CASE (SI::ENV SI::VALUE-SLOT SI::ONLY-ONE-VALUE? +) ENTER-NEW-NICKNAMES (PACKAGE NICKNAMES) CL::NAME-SLOT (CL::PS) CONDITIONS::CONVERT-RESTART-CASES ( +CONDITIONS::CLAUSES CONDITIONS::ENV CONDITIONS::OPTIMIZE?) MSPARSE (FLG) PFI.PRINT.INDICES (LINELEN +SPACEWIDTH PREVITEM) COMPILER::COMPILE-DEFINER-NAMED-PROGN (COMPILER::COMPILER-CONTEXT COMPILER::FORM) + FASL::DUMP-BITMAP (FASL::REMEMBER FASL::WIDTH FASL::HEIGHT FASL::BITS-PER-PIXEL FASL::BASE STREAM) +PFI.PRINT.MULTI.INDEX (*PACKAGE* *READTABLE*) CONDITIONS::EXPAND-RESTART-CASE (CONDITIONS::FORM +CONDITIONS::CLAUSES CONDITIONS::ENV CONDITIONS::VALUE-SLOT CONDITIONS::ONLY-ONE-VALUE?) TIMEREXPIRED? +(\INTERRUPTABLE) COMPILER::BIND-PARAMETER (COMPILER::VAR COMPILER::BINDER COMPILER:ENV) +TEDIT.PUT.OBJECT (TOFILE) POSSIBILITYFN (POSSLIST##) \SPP.CLEANUP (SI::*LOCKED-MONITOR* SI::*RESETFORMS* +) REPLACEFIELD (\INTERRUPTABLE) XCL:REINSTALL-ADVICE (XCL::NAME XCL::ADVICE) FNS.PUTDEF (TYPE) +D-ASSEM:RELEASE-DCODE (D-ASSEM::LOCAL-FN-FIXUPS) USEREXEC (SI::*RESETFORMS*) CONDITIONS::PARSE-RESTART-CASE + (CONDITIONS::NAME CONDITIONS::KEY CONDITIONS::VALUE) \TEDIT.FORMAT.FOOTNOTE (PAGEREGION STREAMSCALE +YBOT ORPHAN LASTLINE LHEIGHT SPECIALYPOS NEWPAGETYPE) \TEXTBIN (CH FILE STR) \POSTSCRIPT.OUTCHARFN ( +FONT) ICMLARRAY.SETVALUE (*PRINT-LEVEL* *PRINT-LENGTH*) %%EVERY-MULTIPLE (PREDICATE MIN-LENGTH +ELT-SLICE) CL:PACKAGE-USE-LIST (PACKAGE) PRINT-ARGLIST (TYPE REMARGS) CL:USE-PACKAGE (PACKAGES-TO-USE) + SI::VOWEL-P (CL:CHAR) SI::EXPAND-PROCEED-CASE (SI::FORM SI::CLAUSES SI::ENV SI::VALUE-SLOT +SI::ONLY-ONE-VALUE?) SEDIT::PREV-NODE (SEDIT::NODE SEDIT::INDEX) FASL::DUMP-STRUCTURE (FASL::HANDLE +FASL::REMEMBER TYPE) \MEDW.PUTWINDOWPROP (SCREEN) WHO-LINE-USER-AFTER-LOGIN (HOST USER) +%%SOME-MULTIPLE (PREDICATE MIN-LENGTH ELT-SLICE) CONDITIONS::CONVERT-CONDITION-CASE (CONDITIONS::WHOLE +) SEDIT.COPYTOCLIPBOARD (CONTEXT) TEDIT.FORMATBOX (SERVERTYPE NCHNO) SEDIT::PARSE--LIST-INTERNAL ( +CL:FORMAT SEDIT::NODE SEDIT::LIST-POSITIONS SEDIT::SUB-FORMATS SEDIT::SUB-FORMATS-LENGTH SEDIT::SUBNODE + SEDIT::SUBFORMAT) COMPILER::META-CALL-LAMBDA-SUBSTITUTE (COMPILER::NON-LOCAL-EFFECTS +COMPILER::*SUBST-OCCURRED*) %%SOME-SINGLE (PREDICATE LENGTH) CONDITIONS::CONVERT-OLD-DEFINE-CONDITION +(CONDITIONS::FORM) %%SIMPLE-MERGE-LISTS (LIST1 LIST2 PRED) ADDMAPBUFFER (TEMP ERRORFLG) +%%NOTEVERY-SINGLE (PREDICATE FIRST-SEQUENCE) CLOSENSOCKET (\INTERRUPTABLE) %%NOTANY-MULTIPLE ( +PREDICATE MIN-LENGTH ELT-SLICE) FORMAT-FIXED-AUX (OVF PAD ATSIGN SPACELEFT) SI::MAKE-AROUND-BODY ( +SI::CURRENT-BODY SI::CANONICALIZED-AROUND-FORM) IMPORT (CL::SYMBOLS CL::SYMS CL::HASHTABLE) +%%MAKE-ARRAY-STORAGE (TYPENUMBER) \TEDIT.RECORD.TABLEADERS (BUTTON NEWSTATE TEXTSTREAM SEL) +%%NOTANY-SINGLE (PREDICATE FIRST-SEQUENCE) \CHANGECHARSET.DISPLAY (\INTERRUPTABLE) DO.CHAT.OPTION ( +WINDOW) \LFCreateFile (\INTERRUPTABLE) CL:SHADOWING-IMPORT (SYMBOLS HASHTABLE) %%NOTEVERY-MULTIPLE ( +PREDICATE MIN-LENGTH ELT-SLICE) \NSPRINT.INTERNAL (PRINTER OPTIONS TRANSFERFN) SETSTKNAME ( +\INTERRUPTABLE) ONEDINSPECT.SETELT (*PRINT-LEVEL* *PRINT-LENGTH*) DBG::ATTACH-BACKTRACE-MENU ( +*PRINT-LEVEL* *PRINT-LENGTH* *PRINT-ESCAPE* *PRINT-GENSYM* *PRINT-PRETTY* *PRINT-CIRCLE* *PRINT-RADIX* + *PRINT-ARRAY* *PRINT-STRUCTURE*) CL:SHADOW (SYMBOLS HASHTABLE) \MEDW.GETWINDOWPROP (SCREEN) +\NAMEDTABSIZE (IMAGESTREAM RIGHTMARGIN) CL::GET-SIMPLE-SETF-METHOD (CL::SETF-INVERSE) \COPYFNHEADER ( +\INTERRUPTABLE) \SENDSPP (SI::*LOCKED-MONITOR* SI::*RESETFORMS* \INTERRUPTABLE) EXPORT (SYMBOLS SYMS +USED-BY CPACKAGES CSET MISSING IMPORTS INTERNAL EXTERNAL) CLMAPS2 (OPR0 CLTYP0) SUBARRAY (NEWORIG +\INTERRUPTABLE) REDUCE-FROM-END (FUNCTION SEQUENCE START END INITIAL-VALUE) +SI::CREATE-ADVISED-DEFINITION (SI::ADVISED-FN SI::FN-TO-CALL SI::ADVICE-NAME) SEDIT::MAXIMUM-STRING-WIDTH + (SEDIT::STRING-LIST SEDIT::FONT SEDIT::PRIN2?) COMPILER::PROCESS-IL-DECLARATIONS (COMPILER::SPECS) +\TEXTBOUT (PSTR) INFILECOMTAIL (SI::*RESETFORMS*) \PNC (\INTERRUPTABLE) SEDIT::SETUP-NEW-CONTEXT ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CHECKBUFFERREFVAL (\INTERRUPTABLE) SI::A-OR-AN (SI::WORD) +\PEEKPUP (RPTN) \TEDIT.MOVE.PIECEMAPFN (TEXTOBJ) \TEDIT.FIND.LAST.LINE (CURY) CLEARMAP (RELEASE) +IRM.CREF.BOX (CURRENTX RIGHTMARGIN) COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS (COMPILER::INNERMOST-CALL + COMPILER::INNERMOST-LAMBDA COMPILER::NEW-ARGS COMPILER::NEW-PARAMS COMPILER::KEY-PARAMS COMPILER::REST-VAR +) COMPLEX-SUBSTITUTE (NEWITEM OLDITEM SEQUENCE START END FROM-END KEY COUNT TEST TEST-NOT-P) +SEDIT::COMPLETE (SEDIT::CHARCODE SEDIT::COMPILE?) COMPILER::RAW-COMPILE (COMPILER::*CURRENT-FUNCTION* +COMPILER::LAP-FN) = (CL::I) \TEDIT.GET.SINGLE.CHARLOOKS2 (FILE) FASL::DUMP-FLOAT32 (FASL::REMEMBER) +FB.UPDATEBROWSERITEMS (WINDOW) \LEAF.TIMEDOUT.EXCESSIVE (CNT) \LFMakeVolumeDirectory (\INTERRUPTABLE) +DWIMIFY2 (TAIL PARENT SUBPARENT FORMSFLG ONEFLG ONLYSPELLFLG) OPT.COMMONBACK (TMP) +RESOLVE-USE-PACKAGE-CONFLICT (XCL::MY-CONDITION) COMPILER::START-COMPILATION (SI::*RESETFORMS*) +REDUCE-FROM-START (FUNCTION SEQUENCE START END INITIAL-VALUE) FILEGETDEF.LISPXMACROS (TYPE OPTIONS) +\CLEARMAP (\INTERRUPTABLE) WHEREIS (NAME TYPE FILES FN) %%SIMPLE-MERGE-VECTORS (RESULT VECTOR1 VECTOR2 + PRED) GETDEFFROMFILE (LOAD-VERBOSE-STREAM) FORMAT-FIXED (COLON ATSIGN PARMS) MB.SIZEFN (CURX +RIGHTMARGIN) PUTBASEPTRX (\INTERRUPTABLE) RESUME (\INTERRUPTABLE) OPT.JUMPREV (FRAME) XCL:PKG-GOTO ( +XCL::NAME XCL::KEYS) SEDIT::MINIMUM-STRING-WIDTH (SEDIT::STRING-LIST SEDIT::FONT SEDIT::PRIN2?) +%%MERGE-VECTORS (RESULT VECTOR1 VECTOR2 PRED KEY) FILEGETDEF.ALISTS (TYPE OPTIONS) \GR.GvarInitLst ( +NAME) \DO-DEFINE-FILE-INFO (STREAM) CL:IN-PACKAGE (KEYS) %%LLARRAY-MAKE-ACCESSOR-EXPR (BASE OFFSET +ACCESSOR BITS-PER-ELEMENT NEEDS-SHIFT-P) XCL::UNDOABLY-SET-SYMBOL (XCL::ENVIRONMENT XCL::OLDVAL XCL::TEM +) CHAT.RESHAPEWINDOW (OLDSCREENREGION) STKARG (N POS DEFAULT) \TEDITMENU.RECORD.UNFORMATTED (BUTTON) +COMPILER::META-CALL-LAMBDA (COMPILER:CONTEXT) COMPLEX-SUBSTITUTE-IF (NEWITEM TEST SEQUENCE START END +FROM-END KEY COUNT) COMPILER::EFFECTS-ANALYZE-TAGBODY (COMPILER::NODE) SEDIT::OPEN-LITATOM (CL:LENGTH) + SEDIT::TRACK-SELECT (SEDIT::BAR-Y SEDIT::BAR-HEIGHT) \RELEASEBUFFER (STREAM) UPDATEFILEMAP ( +*PRINT-RADIX*) CL:Y-OR-N-P (ARGUMENTS) \EDIT.FLIPCARET (CARET FORCE) FINISH-READING-BITMAP (DIMENSIONS +) XCL::MAKE-LEXICAL-ENVIRONMENT (XCL::MACROLET/FLET/LABELS-FORM XCL::ENVIRONMENT) SIMPLE-COUNT-IF ( +TEST SEQUENCE START END) COMPILER::UPDATE-ENVIRONMENT (COMPILER:ENV) \ACTONDISKPAGES (EMFID +\INTERRUPTABLE) CLRHASH (\INTERRUPTABLE) FASL::DUMP-STRING (FASL::HANDLE STRING FASL::REMEMBER) +PRINTER.BITMAPFILE (FILE BITMAP SCALEFACTOR REGION ROTATION TITLE) CL:RENAME-PACKAGE (FOUND) +CLOSEBSPSTREAM (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \SHOWSEL (HOW LL SHOWFN) +FB.IS.NOT.SUBDIRECTORY.ITEM (BROWSER) SIMPLE-COUNT (ITEM SEQUENCE START END) +SEDIT::COMPUTE-SELECTION-POSITION (SEDIT::SELECTION SEDIT::CONTEXT) FASL:PROCESS-FILE (FASL::TEXT-FN +FASL::ITEM-FN FILEPKGFLG DFNFLG LISPXHIST ADDSPELLFLG) CL:UNINTERN (NAME SHADOWING-SYMBOLS) +COMPILER::COMPILE-DEFINER-DEFINER (COMPILER::COMPILER-CONTEXT COMPILER::FORM) \TEDIT.LOOKS.UPDATE ( +TEMP) \DISKERROR (LASTNC) FILING.CALL (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \IDLER ( +IDLING.KEYACTIONS) SEDIT::MENU-INIT-STATE (SEDIT::CONTEXT *PRINT-BASE*) MAPRINT (SI::*RESETFORMS*) +SEDIT::NEXT-NODE-TYPE (SEDIT::STR TYPE) GREET (FLG) COMP.MAP (ALLVARS SPECVARS LOCALVARS) +SETSTKARGNAME (\INTERRUPTABLE) MB.DEFAULTBUTTON.ACTIONFN (W) LISPXTERPRI (Y Z) CL:YES-OR-NO-P ( +CL::FORMAT-STRING CL::ARGUMENTS) %%PRINT-ARRAY-CONTENTS (FLAT-ARRAY OFFSET *PRINT-LEVEL*) BEEP (DS) +%%PRINT-CONDITION (LEVEL) %%THIN-STRING-ARRAY-P (ARRAY) SEDIT::PARSE--BROKEN-ATOM (SEDIT::MODE) +CL:UNUSE-PACKAGE (PACKAGES-TO-UNUSE) %%DEFPRINT-ARRAY (HASH RANK RANKSTR) COMPILER::COPY-CODE ( +COMPILER::*COPY-NODE-TABLE*) \CONVERTNUMBER (IGNORE) PRETTYDEF (PRTTYFNS PRTTYCOMS NEWFILEMAP %#RPARS +*PRINT-ARRAY* XCL:*PRINT-STRUCTURE* *PRINT-LEVEL* *PRINT-LENGTH* FILEFLG FNSLST PRTTYTEM PRETTYCOMSLST + PRTTYSPELLFLG MAPADR NLAMALST NLAMLST LAMALST LAM?LST FILEDATES ORIGFLG) \IBMPEEKCCODEFN (COUNTP) +%%LLARRAY-MAKE-SETTOR-EXPR (BASE OFFSET NEWVALUE SETTOR BITS-PER-ELEMENT NEEDS-SHIFT-P) +\WRITEDISKPAGES (LASTNUMCHARSCONS EMFID \INTERRUPTABLE) CL:PRINC-TO-STRING (*PRINT-ESCAPE*) READPLIST +(PLIST) REPORT-CONDITION (CONDITION STREAM) CL::MERGE-SLOTS (CL::INCLUDED-SLOTS CL::PS) +CL:MAKE-DISPATCH-MACRO-CHARACTER (NON-TERMINATING) CL:SET-MACRO-CHARACTER (FUNCTION NON-TERMINATING) +DEFAULT-HANDLE-CONDITION (CONDITION) \HASHACCESS (\INTERRUPTABLE) CL-WRAP-MACRO (FN CHAR) +\TEDIT.SET.WINDOW.EXTENT (TEXTOBJ) LISPXREADBUF (STRIPSEPRSFLG) NUKE-SYMBOL (TABLE BASE OFFSET LENGTH +FATP HASH EHASH) %%DEFPRINT-VECTOR (HASH FINAL.INDEX ELIDED SIZESTR) FB.MENU.WHENSELECTEDFN (MENU KEY) + HASH-A (CHAR) ONEDINSPECT.RESHAPEFN (SELECTION) ADD-SYMBOL (SYMBOL-BASE SYMBOL-LENGTH SYMBOL-FATP +CL:SXHASH H2 VEC1 HASH1 THIS-HASH THIS-VEC) %%DEFPRINT-GENERIC-ARRAY (ARRAY STREAM HASH) CLSMARTEN ( +FNLIST NOSPELLFLG) FNUM-STRING (INDEX) \TEDIT.FIND.PROTECTED.END (PCTB) SEDIT::EQUALIZE-STRING-WIDTHS +(SEDIT::DESIRED-WIDTH SEDIT::PAD-CHAR) HPRINT1 (RPTCNT RPTLAST V) RESOLVE-EXPORT-CONFLICT ( +XCL::MY-CONDITION) %%DEFPRINT-STRING (STREAM ESCAPECHAR CLP SIZE) CHECK-TYPE-FAIL (PROCEEDABLE PLACE +VALUE DESIRED-TYPE MESSAGE) CL:VECTOR-PUSH (NEW-ELEMENT FILL-POINTER) COMPILER:OPTIMIZE-AND-MACROEXPAND-1 + (COMPILER:CONTEXT COMPILER::*NEW-COMPILER-IS-EXPANDING* OPTIMIZERS) MAKE-INTO-CONDITION (DATUM +DESIRED-TYPE ARGS) \MAIKO.SETTIME (RETFLG) WALK-PROCEED-CASES (PROCEED-CASES PRED) +%%DEFPRINT-BITVECTOR (STREAM HASH FINAL.INDEX ELIDED SIZESTR) CLISPFORVARS (CLISPCONTEXT) +\ICONW.FORMAT.TITLE1 (FONTHEIGHT TCH) SEDIT::COMPUTE-POINT-POSITION (SEDIT::POINT SEDIT::CONTEXT) +EXEC-READ-LINE (*IN-THE-DEBUGGER* *EDIT-INPUT-WITH-TTYIN*) CL:UNEXPORT (SYMBOLS SYMS INTERNAL EXTERNAL +) \TEDIT.NEUTRALIZE.PARALOOKS.MENU (OBJ W CH# FMTSPEC BUTTON NEXTB ARB BUTTONDATA) COMPILER::TEST-GENCODE1 + (COMPILER::FN) MSFIXUPTYPES (FLG) PRINTDEF (FORMFLG FNSLST MAKEMAP %#RPARS RMARGIN COMMENTCOL +CHANGEFLG FILEFLG) HASH-LEFTPAREN (CHAR) \CML-LOAD (*PACKAGE* *READTABLE*) \HASHRECLAIM ( +\INTERRUPTABLE) HASH-BACKSLASH (CHAR) IL-WRAP-MACRO (FORM) \MAPPAGE (\INTERRUPTABLE) READFROMBUF ( +COPYFLG) RESOLVE-IMPORT-CONFLICT (XCL::MY-CONDITION) CL::RESOLVE-SLOTS (CL::CONC-NAME) \TEXTSTREAMBOUT + (PSTR THISLINE EOLFLAG CHORIG CHWIDTH OXLIM OCHLIM OCR\END PREVSPACE FIXEDLINE NEXTLINE LINES +NEWLINEFLG DX PREVLINE SAVEWIDTH OFLOWFN OLHEIGHT DY TABSEEN IMAGECACHE) CCCSUBFN? (X) TTGIVEHELP ( +*STANDARD-OUTPUT*) \SETEOF (\INTERRUPTABLE) /DECLAREDATATYPE (FIELDSPECS DLIST LEN SUPERTYPE) +\DSPROTATE.PSC (LAND C0 P0 C P ML MB MR MT) %%SLOW-ARRAY-READ (BASE TYPENUMBER ROW-MAJOR-INDEX) +HASH-NO-PARAMETER-ERROR (CHAR PARAM) WHEELSCROLL.DOIT (WINDOW DX DY) FB.FASTSEE.ONEFILE (UNFORMATTED +MORE) UNDONLSETQ (SI::*RESETFORMS*) \VAMFindFreePages (\INTERRUPTABLE) %%MERGE (RESULT SEQUENCE1 +SEQUENCE2 PRED KEY) STORAGE (HUNKSTATS TYPENAME) MSSEEKPHRASE (S LASTPARSED) \GR.DELDEFFN (TYPE) +PFI.HANDLE.FILEMAP (EXPR) DASSEM.EQCONSTANTP (FLG) %%SLOW-ARRAY-WRITE (BASE TYPENUMBER ROW-MAJOR-INDEX +) FASL::DUMP-DCODE (FASL::DCODE FASL::REMEMBER STREAM) DINFO.UPDATE (PREVIOUS.NODE) +TEDIT.REDO.INSERTION (INSPC#) CL:LIST-ALL-PACKAGES (K) CL::STRUCTURE-OBJECT-INSPECT-PROPPRINTFN ( +CL::DATUM) \TEDIT.TRY.ABBREV (SEL CH#) STORAGE.LEFT (ATOMTOTAL ATOMSLEFT) SPLITFILE (FILE SPLIT-SIZE) +DINFO.UPDATE.GRAPH.DISPLAY (DINFOW) READFILE (FILE RDTBL ENDTOKEN PACKAGE) HARRAYKEYS (HASHEDVALUE) +COURIER.BROADCAST.CALL (ROUTINGTABLE) \LFUpdateLeaderPage (\INTERRUPTABLE) XCL::WALK-UNEXPECTED-DECLARE + (XCL::CONTEXT) \STORAGE.TYPE (INUSEPAGES) DASSEM.DPRINTLAP (*PRINT-BASE*) DWMFY0 (DWIMIFYING +DWIMIFYFLG) SEDIT::TTYFN (SEDIT::EDIT-CHANGES CL:STRUCTURE SEDIT::CHANGED? SEDIT::NODE +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) STRINGHASHBITS (STRING) HASH-ILLEGAL-HASH-CHAR (STREAM PARAM) +DWIMIFY2? (TAIL PARENT SUBPARENT FORMSFLG ONEFLG ONLYSPELLFLG CLISPCONTEXT DWIMIFYING DWIMIFYFLG +DWIMIFYCHANGE) \STRINGWIDTH.PRESS (CSET DUMMY) DO-EVENT (ENVIRONMENT FUNCTION RETRYFLAG HELPCLOCK) +\BITBLT.BITMAP.SLOW (\INTERRUPTABLE) STRING-EQUAL-HASHBITS (STRING) XCL:LIST-ALL-PROFILES (XCL::NAME) +SI::PRINT-TRACED-CL-ARGLIST (SI::ARGS SI::REQUIRED SI::OPTIONAL CL:REST SI::KEY SI::KEY-APPEARED? +SI::ALLOW-OTHER-KEYS SI::VERBOSE? SI::INDENT) ONEDINSPECT.SELECTPROP (*PRINT-LEVEL* *PRINT-LENGTH*) +\MEDW.TOTOPW (SCREEN) \PUNT.BITBLT.BITMAP (\INTERRUPTABLE) COMPILER::OPTIMIZE-EQL (COMPILER::FORM) +FASL::DUMP-PACKAGE (FASL::HANDLE PACKAGE FASL::REMEMBER) \STRINGHASHBITS-UFN (INDEX ARGCOUNT) +%%PRINT-PATHNAME (D) FAKE-COMPILE-FILE (VALUE NLAML NLAMA LAMS LAMA DFNFLG *PACKAGE* *READ-BASE* +LOCALVARS SPECVARS ROOTNAME) COMPLEX-POSITION-IF (TEST SEQUENCE START END FROM-END KEY) TOPPATHS ( +AVOID) TEDIT.EDIT.OBJECT (LL) CL:AREF (ARRAY) \STRING-EQUAL-HASHBITS-UFN (INDEX ARGCOUNT) +HPRINT-TO-STRINGS (VALUE NO-CIRCLE-FLAG) \STMDSTYPE (NC) CL::INSPECT-STRUCTURE-OBJECT (CL::OBJECTTYPE +XCL:*PRINT-STRUCTURE*) SPY.MAKE.TREE (GRAPH IDS W H *PACKAGE* *READTABLE* *PRINT-CASE*) +\LEAF.CLOSEFILE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) EXPANDBITMAP (NEWX NEWY) TB.EXPANDFN ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS* FN) \IFS.LOOKUPFILE (NAME/PASS INFO SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) DO.EDIT.PP (*READTABLE*) TTPRIN2 (EXPR CARLVL CDRLVL) CL::PS-TYPE-SPECIFIER (CL::PS) + SEDIT::DOT-THIS-LIST (SEDIT::GAP-NODE) HASH-R (CHAR) \POSTSCRIPT.SPECIALOUTCHARFN (IMAGEDATA OLDFONT) + RESOLVE-EXPORT-MISSING (XCL::MY-CONDITION) \PUNT.BLTSHADE.BITMAP (\INTERRUPTABLE) PARSE-NAMESTRING1 ( +BEYONDEXT PACKFLG ONEFIELDFLG) \PAGED.GETNEXTBUFFER (\INTERRUPTABLE) EDITMOVENODE (REG) INTERN* (BASE +OFFSET LENGTH FATP FATCHARSEENP PACKAGE EXTERNALP) \MEDW.BURYW (SCREEN) \FIXCODENUM (MASK) HASH-STAR ( +CHAR) \TEDIT.PUT.SINGLE.PARALOOKS (OUTPUTFORMAT) COMPILER::OPTIMIZE-EQUALITY (COMPILER::FORM) +\PAGED.FORCEOUTPUT (\INTERRUPTABLE) DECLAREDATATYPE (PTRS) %%PRINT-DIRECTORY-COMPONENT (D PATH) +DSPSOURCETYPE (\INTERRUPTABLE) \FIXCODEPTR (MASK \INTERRUPTABLE) \EXTFTIMES (SIGNX SIGNY CARRY +LOW8BITS FOO FOOHI FOOLO) XCL:MAKE-PROFILE (XCL::CLAUSES) COMPLEX-POSITION-IF-NOT (TEST SEQUENCE START + END FROM-END KEY) \PAGEDSETFILEPTR (\INTERRUPTABLE) DASSEM.DSTOREFNDEF (SI::*RESETFORMS*) DWMFY1 ( +NEXTAIL VARS) SEDIT::PROPS-COMPLETION (SEDIT::CONTEXT CL:STRUCTURE SEDIT::CHANGED? CL:ATOM +SEDIT::IFCHANGEDFN SEDIT::OLDPROPS) %%SIMPLE-MERGE (RESULT SEQUENCE1 SEQUENCE2 PRED) +COMPILER::PROCESS-DECLARATIONS (COMPILER::DECLS) FIND-SYMBOL* (BASE OFFSET LENGTH FATP PACKAGE HASH +EHASH RESULT DONE) GETDEFCURRENT (FILE) \FIXCODESYM (CA BN SYM MASK) HASH-VBAR (*READ-SUPPRESS*) +XCL::UNDOABLY-SETF-MACRO-FUNCTION (XCL::BODY) COMPARENCHARS (*PRINT-ESCAPE* *READTABLE* S C) +\TFBRAVO.GET.NAMEDTAB (TEXTSTREAM) COMPILER::MERGE-FIRST-FORMS (COMPILER::FORMS) SI::GET-INSPECT-MACRO + (SI::OBJECT) HASH-NUMBER-SIGN (STREAM CHAR) COMPILER::COMPILE-SCAN-OUTSTANDING-LOOSE-FORMS ( +COMPILER::COMPILER-CONTEXT) SEDIT::RESHAPEFN (SEDIT::OLD-SCREEN-REGION SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) MOBY-UNINTERN (CL:SYMBOL PACKAGE) SIMPLE-SUBSTITUTE-IF-NOT (NEWITEM TEST SEQUENCE +START END) FASL::DUMP-INTEGER (FASL::REMEMBER) HASH-EQUAL (CHAR) \IBMINCCODEFN (BYTECOUNTVAR +BYTECOUNTVAL) COURIER.WRITE.NSNAME (PROGRAM) DRAWDASHEDLINE (NOWOFF) CLISPIFYRPLAC (OPR0 SUBPARENT LST + TAIL) HPRINT-TO-STRING (VALUE NO-CIRCLE-FLAG) SEDIT::OUTPUT-CR (SEDIT::MATCH-X SEDIT::MATCH-BASELINE +SEDIT::MATCH-ASCENT SEDIT::MATCH-DESCENT SEDIT::LINE) PRETTYPRINT (FNSLST ADR SKIPPEDLST) +FLONUM-TO-STRING (INDEX) \CARET.FLASH (\INTERRUPTABLE) TWODINSPECT.REDISPLAY (SELECTION *PRINT-LEVEL* +*PRINT-LENGTH*) TEDIT.UNDO.INSERTION (FIRSTPIECE OBJ DELETEFN) RETYPE.BUFFER (LINE LASTLINE FROM.HERE) + SEDIT::INPUT-STRINGDELIM (SEDIT::NODE) COMPILEDREPLACEFIELD (RPLVALFLG) EP (*EDITMODE*) ShellCommand +(Cmd Output) SIMPLE-SUBSTITUTE-IF (NEWITEM TEST SEQUENCE START END) PRINT-ALL-DOCUMENTATION (NAME +FOUND) CMLREADSEMI (RDTBL) LAYOUTFOREST (FAMILYD) SEND.FILE.TO.PRINTER (FILE) SEE* (**COMMENT**FLG) +TOPW.REPAINTFN (*PRINT-LEVEL* *PRINT-LENGTH*) \10MB.TURNONETHER (SMASHSTATE NEWSTATE) COPYALLBYTES ( +EXTERNALFORMAT PTR) \EXTFQUOTIENT (SIGNX SIGNY BORROW) SEDIT::INPUT-SQUARE-BRACKET (SEDIT::CONTEXT +SEDIT::CHARCODE) CLISPEXPANSION (ENV NOSPELLFLG LISPXHIST VARS) TTPRINSPACE (RPTN) +CL::ENSURE-CONSISTENT-PS (CL:INLINE CL::POSSIBLE-KEYWORDS) \MAIKO.ALLOCBLOCK (\INTERRUPTABLE) +WRITEFILE (X FILE) SPY.MERGE1 (NEWORIGINAL SPYDATA PARENTS CALLER DEPTH) \DSKEventFn ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS* KEY) READVARS-FROM-STRING (SYMBOLS HPRINT-STRING) SEDIT::SEDIT1 +(SEDIT::CONTEXT) COMP.NUMBERTEST (FLG) OPENIPSTREAM (PRINTSERVERNAME) ENCAPSULATEDOBJ.DISPLAYFN (TYPE) + \TEDIT.SHOW.PARALOOKS (OBJ SEL W) SEDIT::COMPLETION (SEDIT::CONTEXT) COMPILER::CONSTRUCT-COMPILER-SYMBOL + (COMPILER::PARTS) %%SIMPLE-MERGE-SUBLISTS (START1 START2 END PRED) CHCON (DUMMY) CLISPFORF/L (VAR +DECLARELST) DWIMIFY0? (TAIL PARENT SUBPARENT FORMSFLG ONEFLG FAULTFN CLISPCONTEXT DWIMIFY0CHANGE +DWIMIFYING DWIMIFYFLG FAULTPOS EXPR VARS) DBG::FIND-DEBUGGER-STACK-FRAME (DBG::ENV) +SI::GET-SUPER-DESCRIBERS (TYPE) \SFFixFont (PILOTBBT) DASSEM.SAVELOCALVARS (FN) +XCL::PROFILE-VALUE-TYPE-CHECK (XCL::VALUE XCL::COERCION-FUNCTION TYPE) \MEDW.REDISPLAYW (SCREEN) +CLISPIFYCROPS (SUBPARENT) BSPPUTMARK (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) UNPACK (DUMMY) +\TEDIT.HCPYLOOKS.UPDATE (TEMP) SKOR (FROMDWIM TEM) \DSKCloseDevice (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) \MERGEBACKWARD (ARLEN PARLEN SPLIT) SI::ADD-ADVICE (CL:WHEN SI::PRIORITY SI::FORM +SI::ADVICE) COMPILER::COMPILE-SCAN-LOOSE-FORM (COMPILER::COMPILER-CONTEXT) COMPILER::COMPILE-SCAN-DEFINER + (COMPILER::COMPILER-CONTEXT COMPILER::FORM) \MAIKO.BITBLTSUB (PILOTBBT SourceBitMap SLX STY +DestinationBitMap DLX DTY HEIGHT SourceType Operation Texture WindowXOffset WindowYOffset) +COMPILER::FRAME-ANNOTATE-OPCODES (COMPILER::SELF) COURIER.NSNAME.LENGTH (PROGRAM) COMPILER::PRINT-ENV +(COMPILER::DEPTH) \SPPGETERROR (CON) EDITFROMFILE (SI::*RESETFORMS*) \UFS.UNREGISTER.GFS ( +\INTERRUPTABLE) FASL::DUMP-COMPLEX (FASL::REMEMBER) %%MAKE-ARRAY-TYPE-TABLE (TYPES SIZES) +GET.OBJ.FROM.USER (TEXTSTREAM VAL SEL BM) PRETTYCOM (ORIGFLG RPTN) \BSP.HANDLE.ACK (\INTERRUPTABLE) +\INTERLISP-NLAMBDA-MACRO (X ENV) COURIER.READ.NSNAME (PROGRAM) CROPMARK.WHENOPERATEDONFN (A B C) +SEDIT::GET-LIST-FORMAT (SEDIT::FN) READVAR-FROM-STRING (SYMBOL HPRINT-STRING) CHAT.TAKE.INPUT (STATE) +\SEARCHPRESSFONTS (DEVICE) COMPILER:ENV-FBOUNDP (COMPILER::NAME COMPILER::LEXICAL-ONLY) +CL:FIND-ALL-SYMBOLS (K S W) \INIT.ETHER.BUFFER.POOL (LASTBUF BUFFER) MAKE-DO-SYMBOLS-CODE (VAR +CL:HASH-TABLE EXIT-FORM FORMS INDEX HASH-VECTOR HASH TERMINUS HASH-VECTOR-LIST TABLE-VECTOR-LIST TOP +REAL-TOP) \MAIKO.BLTCHAR (CHARCODE DISPLAYSTREAM DISPLAYDATA) DCHCON (DUMMY) +\FONTCREATE.HCPYMODE.INTERPRESS (FAMILY SIZE FACE ROTATION DEVICE) \DSKOpenDevice (SI::*LOCKED-MONITOR* + SI::*RESETFORMS*) XCL::SETF-PROFILE-ENTRY-VALUE (TYPE) CLEARCLISPARRAY (REASON TRAN) \MEDW.SHAPEW ( +SCREEN) SIMPLE-SUBSTITUTE (NEWITEM OLDITEM SEQUENCE START END) \MAIKO.BLTSHADE.BITMAP (TEXTURE +DESTINATIONBITMAP DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT OPERATION CLIPPINGREGION) CONCATFILES + (INPUT-FILES OUTPUT-FILE) \SEQUIN.OUT.OF.THE.BLUE (SEQUIN PUP) COMPILER::PRINT-CONTEXT (COMPILER::DEPTH + COMPILER::VALUE) \CHECKFORSTORAGEFULL (\INTERRUPTABLE) \MAIKO.BITBLT.BITMAP (SOURCEBITMAP SOURCELEFT +SOURCEBOTTOM DESTBITMAP DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT SOURCETYPE OPERATION TEXTURE +CLIPPINGREGION CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM) SCALE-EXPT-AUX (X ZERO ONE TEN ONE-TENTH +LOG10-OF-2) COMPLEX-POSITION (ITEM SEQUENCE START END FROM-END KEY TEST TEST-NOT-P) \LFOpenDevice ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \GETREGIONTRACKWITHBOX (POSTEMP) SEDIT::ALIST-COMPLETION ( +SEDIT::CONTEXT CL:STRUCTURE SEDIT::CHANGED? CL:ATOM SEDIT::IFCHANGEDFN SEDIT::OLD-KEYS) SEDIT::DELETE-QUOTE + (SEDIT::SET-POINT?) %%MERGE-SUBLISTS (START1 START2 END PRED KEY) DUNPACK (DUMMY) +SEDIT::AWAKE-COMMAND-PROCESS (SEDIT::COMMAND SEDIT::PROCESS) \UFSOpenDevice (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) \CREATECHARSET.HCPYMODE.INTERPRESS (FAMILY SIZE FACE ROTATION DEVICE CHARSET +FONTDESC) XCL::ENTER-EXEC-FUNCTION (XCL::EXEC-FUNCTION XCL::PROFILE XCL::ID) MB.DISPLAY (MODE DS) +\TEDIT.PARSE.PARALOOKS.LIST (D PC PCNO NPC NCHLIM PCTB LASTLOOKS NLOOKSAVE PC1) XCL::UNDOABLY-PROCLAIM + (XCL::PROCLAMATION) SEDIT::INSERT-QUOTED-GAP (SEDIT::CONTEXT SEDIT::CHARCODE SEDIT::QUOTE-TYPE) +SEDIT::REPAINTFN (SEDIT::REGION SEDIT::CONTEXT) \UFSEventFn (SI::*LOCKED-MONITOR* SI::*RESETFORMS* KEY +) ENCAPSULATEDOBJ.PUTFN (STREAM FILE BEGOFOBJ INSTREAM) GET-ENVIRONMENT-AND-FILEMAP (DONTCACHE ENV) +\CONVERT.FLOATING.NUMBER (MINUSFLAG PADSIZE PADCHAR NUMSTR INTEXP NSWIDTH) SEDIT::SET-FORMAT (SEDIT::NODE + SEDIT::CONTEXT CL:FORMAT) COURIER.OPEN (OBSOLETE WHENCLOSEDFN OTHERPROPS) NSNETDAYTIME0 (RESULT) +TEDIT.SKIP.SPECIALCOND (TEXTOBJ FORMATTINGSTATE) BLOCK (\INTERRUPTABLE) XCL::WALK-MULTIPLE-VALUE-BIND +(XCL::FORM XCL::CONTEXT XCL::OLD-DECLARATIONS XCL::OLD-LEXICAL-VARIABLES) \CREATESTARFONT (NSMICASIZE) + SIMPLE-POSITION-IF-NOT (TEST SEQUENCE START END) TB.UPDATE.DISPLAY (LASTITEM# HEIGHT) +SEDIT::MAP-COMMENT-INDEX (SEDIT::END) RETURN-FIRST-OF-THREE (TWO THREE) DBG::DEBUGGER-EVAL (CL:EXP +DBG::ENV DBG::ABORT-CONDITION DBG::ABORTED) \TEDIT.INTERRUPT.SETUP (\INTERRUPTABLE) +RESOLVE-UNINTERN-CONFLICT (XCL::MY-CONDITION) COMPILER::META-EVAL-TAGBODY (COMPILER::SEGMENT) +MB.CREATE.NWAYBUTTON (CHANGESTATEFN) \HANDLE.RAW.XIP (\INTERRUPTABLE) CL:COMPILE-FILE (COMPILER::LAP-FILE + COMPILER::ERROR-FILE COMPILER::COMPILATION-SUCCEEDED COMPILER::*LOAD-COMPILED-CODE* COMPILER::*CONTEXT* + COMPILER::*ENVIRONMENT* COMPILER::*CONSTANTS-HASH-TABLE* COMPILER::*OUTSTANDING-LOOSE-FORMS* +COMPILER::*PROCESSED-FUNCTIONS* COMPILER::*UNKNOWN-FUNCTIONS* COMPILER::*INPUT-FILECOMS-VARIABLE* +SPECVARS LOCALVARS LOCALFREEVARS GLOBALVARS NLAMA NLAML LAMA DONTCOMPILEFNS) COMPILER::FRAME-ANNOTATE-LITERAL + (COMPILER::SELF) \CLOSELINE (\INTERRUPTABLE) CHECK-SYMBOL-NAMESTRING (\INTERRUPTABLE) \UFSOpenFile ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) COMPILER::COMPILE-SCAN-MACROLET (COMPILER::COMPILER-CONTEXT +COMPILER::FORM) COMPILER::GENCODE-VAR-REF (COMPILER:CONTEXT COMPILER::VAR) \ACCHARWIDTHLIST (STARTWORD +) CL::ASSIGN-SLOT-OFFSET (CL::NAME CL::SLOTS) TB.FINISH.CLOSE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +\UFSGenerateFiles (PATTERN DESIREDPROPS OPTIONS SI::*LOCKED-MONITOR* SI::*RESETFORMS*) FASL::DUMP-RATIONAL + (FASL::REMEMBER) \GETFBB (RESULTLIST CHARCOUNT) READ-UNICODE-MAPPING (NOPRINT NOERROR SEPBITTABLE) +TEDITSTREAM.INIT (WINDOW MENUFN) \UFSSetFileInfo (SI::*LOCKED-MONITOR* SI::*RESETFORMS* BUFFER +NAMESIZE PATHNAME) PSCFONT.WRITEFONT (*READTABLE*) PRETTYDEFCOMS (FNSLST *PRINT-ARRAY* +XCL:*PRINT-STRUCTURE* *PRINT-LEVEL* *PRINT-LENGTH* BUILDMAPFLG PRTTYSPELLFLG ORIGFLG SOURCEFILE) +\RESETLINE (\INTERRUPTABLE) CROPMARK.COPYFN (FROMSTREAM) BRECOMPILE (*PRINT-ARRAY* *PRINT-LENGTH* +*PRINT-LEVEL* LAMA DWIMIFYCOMPFLG EXPRSLST NOFIXVARSLST BUILDMAPFLG SPECVARS LOCALVARS CHANGES OTHERS +FIRST BLKFNS BLOCKS ADRLST LDFLG VARLST DONELST) \TEDIT.UPDATE.SHOWSEL (TSTFLG LL) \SEQUIN.HANDLE.ACK +(\INTERRUPTABLE) \LFDeleteFile (SI::*LOCKED-MONITOR* SI::*RESETFORMS* \INTERRUPTABLE) +\CREATECHARSET.HCPYMODE.PRESS (FAMILY SIZE FACE ROTATION DEVICE CHARSET FONTDESC) \MP.ERROR (CODE) +RESOLVE-MISSING-PACKAGE (MY-CONDITION) OPENPOSTSCRIPTSTREAM (BBOX SI::*RESETFORMS*) \COPYCODEBLOCK ( +NEWFN \INTERRUPTABLE PTR) FASL::INTEGER-BYTE-LIST (FASL::VALUE FASL::NBYTES) \READFONTWDFILE (FILE FD +WIDTHS SCALE) TEDIT.MOVE (FROMPCTB INSPC INSPC# PC NPC PCCH NPCCH OPLEN OBJ COPYFN UNDOCHAIN) +DBG::DEBUGGER-MENU-HELP (IGNORE) SI::DESCRIBE-NEW-LINE (SI::DEPTH) TEDIT.FIND ( +TEDIT.WILDCARD.CHARACTERS) FB.DELVERCOMMAND (BROWSER) \PACK.ITEM (DUMMY) LOCAL-MACRO-FUNCTION (X) +COMPLEX-DELETE-DUPLICATES (SEQUENCE START END FROM-END KEY TEST TEST-NOT-P) \MEDW.EXPANDW (SCREEN) +CL::DEFSTRUCT-PARSE-OPTIONS (CL::OPTIONS) \TFBRAVO.PUT.NAMEDTAB (FMTSTREAM) OPEN (IF-EXISTS +IF-DOES-NOT-EXIST EXTERNAL-FORMAT PATHNAME FOR-INPUT FOR-OUTPUT ACCESS FILE-TYPE) CL:SETQ (CL::TAIL +CL::VALUE) PARSE-DEFMACRO (WHOLE-EXPRESSION MACRO-BODY ERROR-LOCATION ENVIRONMENT PATH %%ENV-ARG-NAME +%%CTX-ARG-NAME ERROR-STRING DOC-STRING-ALLOWED *DEFAULT-DEFAULT* *KEY-FINDER* REMOVE-COMMENTS) +COMPILER::PRINT-NODE (COMPILER::NESTED-INDENT) \UFSGetFileInfo (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) + CROPMARK.IMAGEBOXFN (HRULE CURRENT.X RIGHT.MARGIN SCALE WIDTHS) \BN.DIVIDE (F) SI::FINISH-UNADVISING +(SI::MIDDLE-MAN) TTY.PROCESS (OLDTTYDS \INTERRUPTABLE) \UFSDeleteFile (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) COMPILER::GENCODE-UNWIND-PROTECT (COMPILER:CONTEXT COMPILER::STMT-CODE) +READVARS-FROM-STREAM (BACKREFS BACKREFCNT DATATYPESEEN) WALK-FORM (XCL::*DECLARATIONS* +XCL::*LEXICAL-VARIABLES* XCL::*ENVIRONMENT* XCL::Y XCL::*WALK-FUNCTION*) SET-PROFILE-INTERACTIVELY ( +PROFILE-NAME) FORMAT-PRINT-ROMAN (N) \GR.GETDEFFN (TYPE) OPT.JUMPTHRU (P END FRAME) TEDIT.BUILD.PCTB ( +SEL LINES CHLOOKSSEEN NEWPC PARALOOKSSEEN TTEXTOBJ USER.CMFILE TSTREAM EXISTINGCHARLOOKS EXLOOK +EXISTINGFMTSPECS *READTABLE* *PRINT-BASE*) LOCAL-SYMBOL-FUNCTION (X) D-ASSEM::FIXUP-NTENTRY ( +\INTERRUPTABLE) SEDIT::PLACE-CARET-AND-SELECTION (SEDIT::CARET) \LFRenameFile (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) COMPILER::CRACK-DEFMACRO (COMPILER::NAME COMPILER::ARG-LIST COMPILER::BODY COMPILER::WHOLE + COMPILER::ENV-VAR) \M44EXTENDVMEMFILE (LASTPAGE) D-ASSEM::CREATE-HUNK (D-ASSEM::HUNK-SIZE D-ASSEM::MY-SLOT + D-ASSEM::PREV-SLOT D-ASSEM::POP-P) SEDIT::REPLACE-ROOT (SEDIT::WHERE) \FINDFONT (FD WSTRM +PRESSMICASIZE NSMICASIZE DONTCHECK) ONEDINSPECT.SELECTITEM (HORZMARKS *PRINT-LEVEL* *PRINT-LENGTH*) +GETFILEMAP (STREAM FL) \MEDW.SHRINKW (SCREEN TITLE) COMP.IF (A) PRETTYCOM1 (SI::*RESETFORMS*) +SPY.MAKEGRAPHNODES (HEIGHT WIDTH NODEBITMAP TOOSMALL) CL::BUILD-COPIER-TYPE-CHECK (CL::FROM-ARG) +COMPILER::PRINT-TREE (COMPILER::*NODE-HASH* COMPILER::*NODE-NUMBER* *PRINT-CASE*) +NAMESTRING-CONVERSION-CLAUSE (BASE OFFSET LEN FATP) CROPMARK.GETFN (TEXTSTREAM) SI::FINISH-ADVISING ( +*PRINT-CASE*) BITMAPBIT.EXPANDER (BM X Y) COMPILER::GENCODE-THROW (COMPILER:CONTEXT) +SEDIT::GET-BUTTON-STRING (SEDIT::CONTEXT) FASL::WRITE-INTEGER-BYTES (FASL::NBYTES FASL::VALUE STREAM) +SEDIT::MAKE-COMMENT-STRING (SEDIT::SUBNODES SEDIT::SUM STRING SEDIT::POINTER) \TEXTDSPXPOSITION ( +XPOSITION) CL::DEFINE-COPIERS (CL::RESULT-ARG CL::FROM-ARG) \INSPECTW.COMMAND.HANDLER (*PRINT-LEVEL* +*PRINT-LENGTH*) \UFSCloseDevice (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +RESOLVE-MISSING-EXTERNAL-SYMBOL (MY-CONDITION) \DOFORMATTING.HARDCOPY (SPACEOFLOW) XCL::PROFILIZE ( +XCL::NAME-OR-PROFILE) SEDIT::DETRANSLATE-CHARS (TYPE) COMPLEX-REMOVE-DUPLICATES (SEQUENCE START END +FROM-END KEY TEST TEST-NOT-P) \FM.EDITSTART-MESSAGE (ITEM WINDOW) XCL::RECORD-CONSTRUCTOR-MACRO ( +XCL::FORM XCL::ENV) PRETTYVAR (FLG) \LFTruncateFile (\INTERRUPTABLE) CONCOCT-SYMBOL (ILSYM CLSYM) +COMP.MACRO (*BYTECOMPILER-IS-EXPANDING*) XCL::WALK-LET/LET* (XCL::FORM XCL::CONTEXT XCL::SEQUENTIALP +XCL::OLD-DECLARATIONS XCL::OLD-LEXICAL-VARIABLES) \TEDIT.PROCENTRYFN (OLDPROCESS) SIMPLE-POSITION ( +ITEM SEQUENCE START END) EDITDEF.FILES (TYPE) %%VECTOR-INSERTION-SORT (VECTOR PRED KEY LOWER UPPER) +PRETTYVAR1 (*PRINT-ARRAY*) PRINTDISPLAYNODE (TRANS STREAM CLIP/REG) FIX-FORM (%#RPARS FONTCHANGEFLG +*PRINT-ESCAPE* *PRINT-RADIX* *PRINT-BASE* *PRINT-LEVEL* *PRINT-LENGTH* *PRINT-GENSYM* *PRINT-ARRAY* +*PRINT-STRUCTURE*) \UFSOpenFile-C (FILE REC ACC CDATE LENGTH ERRNO) FORMAT-PRINT-OLD-ROMAN (N) +SEDIT::INPUT-DOT (SEDIT::CHARCODE SEDIT::SELECTION SEDIT::SUPER-NODE) LVLPRIN1 (FILE PRIN2FLG) +\M44DOEXTENDVMEMFILE (LASTNEEDEDPAGE FIRSTDA LASTPAGEADDR) \DEVICEFILE.EOSERROR (\INTERRUPTABLE) +\FM.EDIT-ITEM (FONT BITMAP LEFT DISPLAYLEFT DISPLAYBOTTOM BOXOFFSET CHARWIDTH MAXWIDTH STRINGPTR +TAILPTR ITEMWIDTH LIMITCHARS SYSLIMITCHARS ECHOCHAR STREAM) ENUM-STRING (INDEX) \NSINIT (EVENT) +\GR.WITHRESOURCEMAC (NAMES FORMS) PSCFONTFROMCACHE.SPELLFILE (ROTATION DEVICE) SHRIEKIFY (OPR0 CLTYP0 +PARENT SUBPARENT) D-ASSEM::STORE-VAR (D-ASSEM::VAR-OR-SLOT D-ASSEM::POP-P D-ASSEM::KIND D-ASSEM::SLOT) + FORMAT-PRINT-ORDINAL (CL:NUMBER) DASSEM.DASSEM (ORG) SEDIT::HELPMENU (SEDIT::MENU SEDIT::PROMPTWINDOW + SEDIT::COMMAND) COMPILER::COMPILE-SCAN-DECLARE%: (COMPILER::COMPILER-CONTEXT COMPILER::FORM COMPILER::DOCOPY + COMPILER::DOFIRST COMPILER::FIRST-FORMS DFNFLG COMPILER::*EVAL-WHEN-COMPILE*) \TEDIT.FORMATTABS ( +TEXTOBJ THISLINE) SIMPLE-DELETE-DUPLICATES (SEQUENCE START END) \NSFILING.ERRORHANDLER (\INTERRUPTABLE +) READVARS-FROM-STRINGS (SYMBOLS STRINGS) \LFGetFileInfo (device SI::*LOCKED-MONITOR* SI::*RESETFORMS* +) LVLPRIN2 (FILE PRIN2FLG) \TEDIT.NSCHAR.RUN (NEWPC OLDFILEPTR) D-ASSEM::FETCH-HUNK (D-ASSEM::HUNK-LEVEL + D-ASSEM::HUNK-SLOT) XCL::%%DEFINE-TYPE-SAVE-DEFN (XCL::DEFINITION XCL::OLD-DEFINITION) BCOMPL (NLAML +NLAMA LAMS LAMA DWIMIFYCOMPFLG EXPRSLST NOFIXVARSLST NOFIXFNSLST *PRINT-ARRAY* *PRINT-LENGTH* +*PRINT-LEVEL*) SIMPLE-POSITION-IF (TEST SEQUENCE START END) MKACCESSFN (DECLST FIELDNAMES +SPECIALFIELDS SUBSTYPE) \UFSGetFileName-C (PATHNAME RECOG BUF ERRNO) POSSIBILITIES (POSSLIST##) +SI::CLEAR-CLOSURE-CACHE (\INTERRUPTABLE CL:BLOCK XCL::CLOSURE) SEDIT::VERIFY-COMMENT (SEDIT::POINTER +SEDIT::STRING-LENGTH) \TEXTDSPYPOSITION (YPOSITION) CL::BUILD-COPIER-SLOT-SETFS (CL::STRUCTURE-TYPE +CL::FROM-ARGUMENT CL::TO-ARGUMENT CL::TYPE-CHECK-SLOTS? CL::SLOT) \COMMONBACKCHARFN (STRM BYTECOUNTVAR + BYTECOUNTVAL) COMPILER::GENCODE-CALL (COMPILER::PARAM COMPILER::CLOSED-FN-NAME COMPILER::OPEN-FN-NAME + COMPILER::CODE-FOR-FN) TEDIT.NORMALIZECARET (SEL) TEDIT.MAPPIECES (PCNODE) COMPAREPRINT1 (L1) +WHEELSCROLL (DIRECTION DELTA) CL::PARSE-SLOT (CL::GENERATE-ACCESSOR) \DSPCLIPPINGREGION.IP ( +\INTERRUPTABLE) SEDIT::INPUT-ESCAPE (SEDIT::CONTEXT) SEDIT:ADD-COMMAND (SEDIT::KEY-NAME SEDIT::HELP-STRING +) ACCEPT-UNIX-SOCKET-STREAM (CHAN) \TEDIT.PROCEXITFN (NEWP) \DSKGetFileName-C (PATHNAME RECOG BUF +ERRNO) DEFAULT.INSPECTW.VALUECOMMANDFN (PROPERTY DATUM WINDOW) \MAKERECODEMAP (INVERTED) +SEDIT::COPY-STRUCTURE-STRING (SEDIT::CONTEXT) \INTERPRETER1 (\INTERRUPTABLE) DWIMIFY1? (CLISPCONTEXT +FORMSFLG DWIMIFYING DWIMIFYFLG DWIMIFYCHANGE) XCL::WALK-MACROLET (XCL::FORM XCL::CONTEXT) +\LFGetFileName (Dev SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PRINTPARA (P2FLAG) +COMPILER::COMPILE-SCAN-DEFINE-FILE-INFO (COMPILER::COMPILER-CONTEXT *STANDARD-INPUT* FILECREATEDLOC) +\SMASHLINK (\INTERRUPTABLE) SEDIT::RECOMPUTE-WIDTH (SEDIT::LAST-LINE) \NSNAME.DEFPRINT (STREAM) +\DSKDirectoryNameP-C (DIRSPEC BUF ERRNO) READVARS (BACKREFS BACKREFCNT DATATYPESEEN) +\COURIER.WHENCLOSED (STREAM CON) BSPFORCEOUTPUT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \FILLBUFFER ( +\INTERRUPTABLE) COMPILER::PARSE-DEFUN (COMPILER::FORM) \UFSDirectoryNameP-C (DIRSPEC BUF ERRNO) +\STARTDISPLAY (\INTERRUPTABLE) SI::EXPANSION-FUNCTION (XCL::NAME XCL::ARG-LIST XCL::BODY) SEDIT::EDIT-HELP + (SEDIT::NODE) READARRAY-FROM-LIST (X) CL::%%RATIO-PRINT (\THISFILELINELENGTH *PRINT-RADIX*) +\UFS.DIRECTORY.NAME (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \INTERPRETER-LAMBDA (N DEF FN ARGBLOCK) +XCL::%%DELETE-DEFINER (TYPE) \TFBRAVO.COPY.NAMEDTAB (PIECE OLDCH NEWCH) PPSPP (SI::*RESETFORMS*) +PRINTPARA1 (RPTN) CLISPANGLEBRACKETS (WORKFLAG NCONCLKUP NCONC1LKUP) FORMAT-PRINT-CARDINAL-AUX (N +PERIOD ERR) \TRANSLATE-CL%:LAMBDA (KEYWORDS VAR INIT KEY) \UFSCloseFile-C (PATHNAME FILEID CDATE ERRNO +) \TEDIT.INSERT.TTY.BUFFER (SCRATCH PASS TEXTOBJ SEL) FAULTAPPLY (\INTERRUPTABLE) +SEDIT::SELECT-PSEUDO-SEGMENT (SEDIT::CONTEXT SEDIT::PSEL SEDIT::SET-POINT? SEDIT::WHERE) +\TEXTLEFTMARGIN (XPOSITION) CL::%%BUILD-RATIO (CL:GCD) D-ASSEM::DLAMBDA-FROM-LAMBDA (D-ASSEM::LAP-FN) +D-ASSEM::DCODE-FROM-DLAMBDA (D-ASSEM::*HUNK-MAP* D-ASSEM::*HUNK-SIZE* D-ASSEM::*BYTE-COUNT* +D-ASSEM::*JUMP-LIST* D-ASSEM::*PVAR-COUNT* D-ASSEM::*LEVEL* D-ASSEM::FIXUP-DESC) MB.BUTTONEVENTINFN ( +STREAM SELWINDOW TEXTSTREAM) \SETREADSYNTAX (\INTERRUPTABLE) \TEDIT.GET.INSERT.CHARLOOKS (PCNO) +XCL::RECORD-PREDICATE-MACRO (XCL::FORM XCL::ENV) COMPAREFILES (OLDFILE NEWFILE OSTART OEND) +SEDIT::UPGRADE-COMMENT (SEDIT::CONTEXT SEDIT::NODE) CREATE-UNIX-SOCKET-STREAM (PATHNAME) +COMPILER::TEST-ALPHA-2 (COMPILER::*ENVIRONMENT* COMPILER::*CONTEXT* COMPILER::*CONSTANTS-HASH-TABLE* +SPECVARS LOCALVARS GLOBALVARS LOCALFREEVARS COMPILER::*PROCESSED-FUNCTIONS* COMPILER::*UNKNOWN-FUNCTIONS* + COMPILER::*CURRENT-FUNCTION* COMPILER::*AUTOMATIC-SPECIAL-DECLARATIONS*) PARSE-BODY (XCL::ENVIRONMENT + XCL::DOC-STRING-ALLOWED) \MEDW.MOVEW (SCREEN \INTERRUPTABLE) \UFSDeleteFile-C (NAME ERRNO) +\SETUP-COMPILED-CLOSURE-CALL (RPTN) \TEDIT.PRIMARYW (TEXTOBJ) \PARSE.REMOTE.FILENAME (REMOTENAME) +CL::%%RATIO-PLUS (CL::GCD-TOP) TEDIT.GET.PARALOOKS (SEL) RECREDECLARE1 (TRAN) TERMX (D) +CL::%%RATIO-TIMES (CL::GCD-1-2 CL::GCD-2-1) \OUTDATE (UD FORMAT STRING) HISTORYMATCH (EVENT) TYPESOF ( +SHADOWED) SI::DISABLE-CLOSURE-CACHE (\INTERRUPTABLE) \MEDW.RELMOVEW (SCREEN) +\VAMRecomputeFreePageCount (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) %%SIMPLE-VECTOR-INSERTION-SORT ( +VECTOR PRED LOWER UPPER) FASL::DUMP-GENERAL-ARRAY (FASL::REMEMBER FASL::INDIRECT) DWIMIFY0 ( +DWIMIFYCHANGE CLISPCONTEXT ONEFLG DWIMIFYING DWIMIFYFLG TYPE-IN? FIXSPELLDEFAULT) CL:EQUALP (CL::X CL::Y +) D-ASSEM::DIGEST-CODE (D-ASSEM::INST) XCL::MAKE-VARIABLE-DEFINITION (XCL::CLAUSE) MAKEFILES ( +SI::*RESETFORMS*) \UFStoOtherRenameMess (OLD-DEVICE) SIMPLE-REMOVE-DUPLICATES (SEQUENCE START END) PPT + (*STANDARD-OUTPUT* SI::*RESETFORMS*) \DSCCOUT (RPTN) \MAIKO.DO.MOVDS (\INTERRUPTABLE) SHOWDEF ( +ORIGFLG FNSLST PRETTYCOMSLST NEWFILEMAP) \UFSRenameFile-C (OLDNAME NEWNAME ERRNO) ARGLIST (TEMP) +\IDATE-PARSE-MONTH (CODEVAR) CL:/= (CL::I CL::CURRENT-ARG CL::J) ENCAPSULATEDOBJ.BUTTONEVENTINFN ( +IMAGEOBJ WINDOW) SEDIT::SEDITL (TTYEDITFN) \CREATEDISPLAY (ACCESS RECOG OTHERINFO) FASL::DUMP-BIT-ARRAY + (FASL::HANDLE FASL::REMEMBER FASL::NBITS) DAYTIME (BOX) READARRAY (X) ASKUSEREXPLAIN (CONFIRMFLG FILE +) READ-UNICODE-MAPPING-FILENAMES (X) D-ASSEM::DIGEST-FUNCTION (D-ASSEM::*FREE-VARS* D-ASSEM::*BOUND-SPECIALS* + D-ASSEM::VAR) \FTP.UNPACKFILENAME (INFO) \FREESTACKBLOCK (ORIG) \SHAPEW2 (\INTERRUPTABLE) +\UFSReadPages-C (FILEID PAGENUM BUFFER ERRNO) COMPLEX-DELETE-IF (TEST SEQUENCE START END FROM-END KEY +COUNT) DBG::DEBUGGER-BUTTON-EVENT (DBG::W IGNORE DBG::SELECTION) COMPILER::TRANSFORM-GET/PUT-BASE ( +COMPILER::OPCODE COMPILER::BETA-BYTE) CL::NATURALIZE (CL::NAME CL::SOURCE CL::DESTINATION) ANALYZE ( +ARGLIST PATH ERRLOC WHOLE) SEDIT::CFV-QUOTE (SEDIT::ENVIRONMENT CL:FORMAT) \SETUP-ENVIRONMENT-CALL ( +RPTN) XCL::WALK-LAMBDA (XCL::FORM XCL::CONTEXT) COMPLEX-FIND-IF (TEST SEQUENCE START END FROM-END KEY) + OPT.SCANOPT (Y RPTN) XCL::RECORD-ACCESS-MACRO (XCL::FORM XCL::ENV) CL::CHECK-ALL (CL::XCLP) +\UFSGetSize-C (FILEID BUF ERRNO) PRINENDLINE (RPTN) \LFExtendFile (\INTERRUPTABLE) \TEDIT.SHRINKFN ( +ICON ICONW) CL::BUILD-CONSTRUCTOR-SLOT-SETFS (CL::STRUCTURE-TYPE CL::OBJECT-NAME CL::KEYWORD-VAR-NAME) + COMPILER::GENCODE-SETQ (COMPILER:CONTEXT) \UFSWritePages-C (FILEID PAGENUM BUFFER SIZE ERRNO) +\TEXTRIGHTMARGIN (XPOSITION) \FONTCREATE.HCPYMODE.PRESS (FAMILY SIZE FACE ROTATION DEVICE) CL:ACOS ( +CL::RADIANS) \START.PROCESSES (\INTERRUPTABLE) \COURIER.EOF (STREAM) \TEDIT.APPLY.PARALOOKS (OBJ OFILE + CH SIZE SUPER SUB PARATYPE) \FM.RESHAPEFN (B) %%SIMPLE-VECTOR-QUICK-SORT (VECTOR PRED LOWER UPPER) +DRIBBLE (\INTERRUPTABLE) RESETGRID.NEW (SHADE) D-ASSEM::STORE-DIGEST-INFO (D-ASSEM::BOUND-SPECIAL-COUNT +) \UFSGetFileInfo-C (FILENAME ATTR-CODE BUFFER ERRNO) COMPILER::RELEASE-OPCODES (COMPILER::NODE) +COMP.USERFN (FN OTHERVARS) COMPILER::GENCODE-TAGBODY (COMPILER::NEW-LAMBDA COMPILER::*CODE* COMPILER::CODE +) SHAPEW1 (\INTERRUPTABLE) XCL::INSTALL-PROFILE (XCL::PROFILE XCL:PROFILE-NAME XCL::PROFILE-NICKNAMES) + ADD.PROCESS (\INTERRUPTABLE) \MEDW.OPENW (\INTERRUPTABLE) COMPLEX-DELETE-IF-NOT (TEST SEQUENCE START +END FROM-END KEY COUNT) FITP (ENDTAIL CAREFUL) FB.CLOSEFN (WINDOW) SEDIT::SELECTION-FROM-PSEUDO-SELECTION + (SEDIT::PSEL SEDIT::SEL) TEDIT.HARDCOPYFN (TEXTSTREAM) SI::FINISH-UNBREAKING (SI::BROKEN-FN SI::IN-FN + SI::MIDDLE-MAN) \RUN.PROCESS (\INTERRUPTABLE) SEDIT::CFV-LIST (SEDIT::SUB-PWIDTH) +TEDIT.PARSE.PAGEFRAMES1 (PARENT) TEDIT.INSERT.OBJECT (PCNO CHNO) COMPLEX-FIND-IF-NOT (TEST SEQUENCE +START END FROM-END KEY) \LINEBUF.PEEKBIN (NOERROR) \MAIKO.NEWPAGE (BASE NOERROR LOCK?) \RPLPTR (OFFSET + \INTERRUPTABLE) ICMLARRAY.MENUW.SHOW (ITEM BUTTONS) %%VECTOR-QUICK-SORT (VECTOR PRED KEY LOWER UPPER) + MAKEHVPRETTYCOMS (NO-CIRCLE-FLAG) PRETTYPRINT1 (FN) COMPILER::GENCODE-SEGMENT (COMPILER::SEGMENT +COMPILER::*SUPPRESS-POPS*) CL::%%> (CL::X CL::Y) CL::%%- (CL::X CL::Y) \INSPECT/CODE/REPAINTFN ( +*PRINT-LEVEL* *PRINT-LENGTH*) D-ASSEM::INSTALL-VAR (D-ASSEM::CLOSED-OVER D-ASSEM::KIND D-ASSEM::SLOT) +\MENU.ITEM.SELECT (DSP ITEM SUBITEMS) \TEDIT.SELECT.ALL (SEL) D-ASSEM::GATHER-TAGS (D-ASSEM::CODE) +\FM.NUMBER-MESSAGE (ITEM WINDOW) \FM.REDISPLAYMENU (UPDATEREGION) FASL::DUMP-ARRAY-DESCRIPTOR ( +FASL::HANDLE CL:ARRAY FASL::REMEMBER FASL::INITIAL-ELEMENT) SEDIT::GROW-CLICK? (SEDIT::CONTEXT +SEDIT::POINT-TYPE SEDIT::WINDOW) \LFSetFileInfo (dev SI::*LOCKED-MONITOR* SI::*RESETFORMS*) RESETGRID +(BM GRIDSPEC WIDTH HEIGHT ORGX ORGY W) \TEDIT.BUTTONEVENTFN (STREAM) \TEDIT.WINDOW.SETUP (EXT STRM) +\3MBGETPACKET (\INTERRUPTABLE) SEDIT::PARSE--LIST (SEDIT::CONTEXT SEDIT::PARSER) DP (*EDITMODE*) +ACCESSDEF4 (AVOID) KEYWORD-TEST (KEYS EXTRA-KEY-FOUND ALLOW-OTHER-KEYS-P) D-ASSEM::GENERATE-OPT-AND-REST + (D-ASSEM::DLAMBDA D-ASSEM::NUM-REQUIRED D-ASSEM::NUM-OPTIONAL D-ASSEM::OPT-INIT-VALUES +D-ASSEM::AFTER-OPTS-TAG) \EVALFORMASLAMBDA (*ARGVAL* *TAIL* *FN*) COMPILER::META-SUBST-ANY-CALL (COMPILER::FN + COMPILER::ARGS) \COURIER.EXPEDITED.OVERFLOW (STREAM) PRINTER.SCRATCH.FILE (FULLFILE) +ONEDINSPECT.REDISPLAY (SELECTION *PRINT-LEVEL* *PRINT-LENGTH*) INTERSECT/REGIONP/LBWH (NODE) +FORMAT-PRINT-SMALL-CARDINAL (N) SEDIT::FIND-COMMENT (SEDIT::NODE SEDIT::CONTEXT SEDIT::MIN-DEPTH +SEDIT::LAST-SUBNODE) COMPILER::GENERATE-CODE (COMPILER::*VAR-NUMBER* COMPILER::*TAG-NUMBER* +COMPILER::*STACK-NUMBER*) BLOCKCOMPILE1 (NEWDEF FREEVARS) EXEC (XCL::TOP-LEVEL-P XCL::TITLE +*THIS-EXEC-COMMANDS* XCL::ENVIRONMENT XCL::PROMPT XCL::FN XCL::PROFILE *EXEC-ID* XCL::PROFILE-CACHE +*CURRENT-EVENT* XCL::OLD-DS) D-ASSEM::STACK-ANALYZE-CODE (D-ASSEM::CODE D-ASSEM::DEPTH D-ASSEM::BINDING-DEPTH + D-ASSEM::LOOKUP) APPLY (\INTERNAL) COMPILER::GENCODE-TAGBODY-INLINE (COMPILER:CONTEXT COMPILER::BLIP-VAR + COMPILER::END-TAG) COMPILEUSERFN1 (NOSPELLFLG FILEPKGFLG) CL:CLEAR-OUTPUT (OUTPUT-STREAM) +FIND-KEYWORD (CL:KEYWORD KEYLIST) CONS (X Y) FORMAT-PRINT-NUMBER (NUMBER RADIX PRINT-COMMAS-P +PRINT-SIGN-P PARMS) SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::SET-SELECTION? SEDIT::START STRING +CL:STRUCTURE SEDIT::NEW-STRUCTURES) SEDIT::STRINGIFY-COMMENT (SEDIT::ENVIRONMENT SEDIT::LEVEL) +\TEXTMENU.DOC.CREATE (MENUW) MB.THREESTATEBUTTON.FN (W OFILE CH) D-ASSEM::REACH-TAGS (D-ASSEM::CODE) +XCL::MAKE-UNDOABLE (XCL::ENV) \VFMDeletePageGroup (SI::*LOCKED-MONITOR* SI::*RESETFORMS* +\INTERRUPTABLE) IRM.GET.DINFOGRAPH (FROM.BACKGROUND?) SEDIT::COMPUTE-SELECTION-POSITION-LITATOM ( +SEDIT::CONTEXT) D-ASSEM::STACK-ANALYZE (D-ASSEM::EXPECTED-ENDING-DEPTH D-ASSEM::*LEVEL* D-ASSEM::ROOT-LIST + D-ASSEM::ENDING-DEPTH) BSP.PUTINTERRUPT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) RECORDTRAN ( +PATGENSYMVARS SUBSTYPE SPECIALFIELDS DWIMESSGAG NOSPELLFLG LISPXHIST) FILES.WHENCHANGED (TYPE) +\MOUSE.PROCESS (\MOUSEBUSY) POSTSCRIPT.FONTSAVAILABLE (ROTATION) ICMLARRAY.MENUW.APPLY (ITEM BUTTONS +TOPRIGHT) FASL::DUMP-SIMPLE-VECTOR (FASL::HANDLE FASL::REMEMBER CL:LENGTH) \TEXTDSPLINEFEED (VALUE) +CL:CONJUGATE (CL:NUMBER) GETCLEARINGHOUSE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \MAIKO.CONS.UFN ( +\INTERRUPTABLE) \UFSSetFileInfo-C (FILENAME ATTR-CODE BUFFER ERRNO) CHAT.HOLD (\INTERRUPTABLE) +\MENU.ITEM.DESELECT (COLUMN ROW MENU DSP) COMPAREPRINT (*PRINT-LEVEL* *PRINT-LENGTH* PLVLFILEFLG FIN) +OPENTEXTSTREAM (TEXT WINDOW START END PROPS) FTPDEBUG (FLG) CAR (X) D-ASSEM::ASSEMBLE-CODE (D-ASSEM::LAP-CODE + D-ASSEM::BINDING-DEPTH) RELSTK (\INTERRUPTABLE) CL::RAW-CONSTRUCTOR (CL::PS) TEDIT.INSERT.DISPLAYTEXT + (TEXTOBJ CH CHWIDTH LINE XPOINT DS SEL) CL::%%* (CL::X CL::Y) \TIMER.PROCESS (\INTERRUPTABLE) CDR (X) + XCL::WALK-DO/DO* (XCL::FORM XCL::CONTEXT XCL::SEQUENTIALP XCL::OLD-DECLARATIONS +XCL::OLD-LEXICAL-VARIABLES) \TEDIT.PARABOUNDS (PCNO NPC) \UFSReadDir-C (FILTER PROPP ID ERRNO) \WRITE1 + (FONTCHANGEFLG \THISFILELINELENGTH) COMPILER::META-SUBST-STMTS (COMPILER::NODE COMPILER::STMTS-LIST +COMPILER::FINAL-STMT-IMMOVABLE COMPILER::NEW-STMTS-LIST) \IDLE.ISMEMBER (PWD) CL::EQLHASHBITSFN-UFN ( +INDEX ARGCOUNT CL::OBJ) CL:COUNT (FROM-END) SI::CREATE-BROKEN-DEFINITION (SI::WRAPPED-FN-NAME +SI::BROKEN-FN-NAME SI::FN-TO-CALL SI::WHEN-EXPR SI::BREAKPOINT-NAME) RPLACA (X Y) \UFS.REGISTER.GFS ( +\INTERRUPTABLE) COMPILER::RELEASE-LITERAL (COMPILER::NODE) SI::INSTALL-CLOSURE-CACHE (\INTERRUPTABLE) +\LEAF.READFILENAME (OSTYPE) CHAT.MENU (X) RPLACD (X Y) SENDXIP (SOCKET) \LFExtendFileIfNecessary ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CL::SXHASH-UFN (INDEX ARGCOUNT) CL::BUILD-CONSTRUCTOR-ARGLIST ( +CL::ARG-NAME CL::KEYWORD-PAIR) CLISP4 (X DWIMIFYFLG NOSPELLFLG) CLISPCOND (OPR0 CLTYP0 PARENT +SUBPARENT) D-ASSEM::RESOLVE-JUMPS (D-ASSEM::CUMULATIVE-UNCERTAINTY) FORMAT-WRITE-FIELD (PADCHAR WIDTH) + SEDIT::EXPAND (SEDIT::CHARCODE SEDIT::POINT CL:STRUCTURE SEDIT::EXPANSION) CL::EQLHASHBITSFN (CL::OBJ +) \DEQUEUE (\INTERRUPTABLE) XCL::FIND-VARIABLE-DEFINITION (CL:VARIABLE) \REQUEUE.ETHERPACKET ( +\INTERRUPTABLE) \UFS.NEXTFILEFN (NEWWNAME ERRNO DEFAULTEXT DEFAULTVERS DESIREDPROPS) COMPLEX-DELETE ( +ITEM SEQUENCE START END FROM-END KEY COUNT TEST TEST-NOT-P) \STOPDISPLAY (\INTERRUPTABLE) +COMPILEUSERFN (X) COMPILER::ENSURE-EFFECT-CONTEXT (COMPILER::RESULT-ARG-NUMBER COMPILER::RESULT-ARG) +CL:EVAL (*EVALHOOK*) \MEDW.CREATEW (PROPS) D-ASSEM::CONVERT-TO-BINARY (D-ASSEM::UNWIND-OFFSET D-ASSEM::FIXUP +) \PROG0 (*FIRSTTAIL* \INTERRUPTABLE) XCL::WALK-FLET/LABELS (XCL::FORM XCL::CONTEXT) CL:SXHASH ( +CL::OBJECT) CL:COUNT-IF (FROM-END) \INTERPRET-ARGUMENTS (\SPECIALS \SVAR \SP) CL::%%BIGNUM-LOGCOUNT ( +CL::ELEMENTS CL::CNT) ICMLARRAY.MENUW.GETLEVEL (BUTTONS) CL:COS (CL::RADIANS) PRINT-COMPILE-HEADER ( +STREAMS HOW ENV) \VAMFreePageGroup (SI::*LOCKED-MONITOR* SI::*RESETFORMS* \INTERRUPTABLE) +CL:COUNT-IF-NOT (FROM-END) CL::%%LOGCOUNT (CL::POSITIVE-INTEGER CL::CNT) \NS.SETTIME (RETFLG) +\UFSFinishFileInfo-C (FINFOID) \INSPECT/CODE/RESHAPEFN (OLDIMAGE OLDREGION) \BOXITEM (COLUMN ROW MENU +DSP) \PUP.SETTIME (RETFLG) COMPILER::COMPILE-FILE-PROCESS-FUNCTION (COMPILER::COMPILER-CONTEXT +COMPILER::MESSAGE) \SET.PROCESS.NAME (\INTERRUPTABLE) SIMPLE-DELETE-IF-NOT (TEST SEQUENCE START END) +PEEKC (FLG \RefillBufferFn) TTY/EDITL (EDITCHANGES LASTAIL LASTP1 LASTP2 EDITLISPFLG) +PSCFONT.SPELLFILE (FAMILY SIZE FACE ROTATION DEVICE) SEDIT::COMPUTE-POINT-POSITION-LITATOM (SEDIT::CONTEXT +) CL:ASIN (CL:NUMBER) D-ASSEM::SPLICE-IN-JUMPS (D-ASSEM::PTR D-ASSEM::SIZE D-ASSEM::CHOICES) +D-ASSEM::PERFORM-LOCAL-FN-FIXUPS (D-ASSEM::FIXUP-LIST) PEEKCCODE (\RefillBufferFn) InstallUnixPrinter +(PRINTERTYPE) SIMPLE-FIND-IF-NOT (TEST SEQUENCE START END) EDITFB (TEM) \TEDIT.STRIKEOUT.SEL.OFF ( +TEXTOBJ) CL::%%INTEGER-COERCE-OPTIMIZER (CL::SINGLE-VALUE-FN CL:NUMBER CL::DIVISOR) TEXTMENU.CLOSEFN ( +MAINW HEIGHT OHEIGHT OBOTTOM WBOTTOM WINDOWS) FB.COPYFN (TBROWSER) \EVAL-INVOKE-LAMBDA (LAM ENV +ARGBLOCK) GETXIP (\INTERRUPTABLE) CL:DELETE-FILE (NS) \LOOKUPPORT (BUF) DC (*EDITMODE*) +\CHECKEOLC.CRLF (NUM \INTERRUPTABLE) EDITL0 (EDITLFLG FINDFLAG LCFLG TOFLG EDITHIST L0 COM0 COM +ORIGFLG LISPXID) COMPILER::CLOSE-OVER (COMPILER::REFERENCE) \LEAF.ERROR (SENTPUP) COMPILER::GENCODE-RETURN + (COMPILER:CONTEXT) \POLYSHADE.YSCAN.IP (nlist by) \UFSNextFile-C (GENFILESTATE) +%%TYPE-SIZE-TO-TYPENUMBER (TYPE SIZE) FASL::DUMP-LIST (FASL::HANDLE LIST FASL::REMEMBER) +\TEST.PARAGRAPH.LOOKS (TABS) CL:DIRECTORY-NAMESTRING (PATHNAME) CL::%%COMPARISON-OPTIMIZER ( +CL::PREDICATE CL::FIRST-NUMBER) COMPLEX-FIND (ITEM SEQUENCE START END FROM-END KEY TEST TEST-NOT-P) +CLISP3C (SI::*RESETFORMS*) \EVALA (\INTERRUPTABLE) EDITMODE (NEWMODE) TIMEALL (INTERPFLG VALUE STRF +LCFIL) CL:BREAK (CL::FORMAT-STRING CL::FORMAT-ARGUMENTS) CL::STRUCTURE-POINTER-SLOTS (CL::STRUCTURE-NAME + CL::DESCRIPTOR) COMPILER::GENCODE-PROGV (IGNORE) COMPILER::COMPILE-FILE-LOOSE-FORM ( +COMPILER::COMPILER-CONTEXT) RATOM (*PACKAGE* \RefillBufferFn) \TEDIT.UNDERLINE.SEL.ON (TEXTOBJ) +CLISPFOR (CLISPCONTEXT DWIMIFYING VARS SI::*RESETFORMS*) \PEEKNS (RPTN) \10MBWATCHER (\INTERRUPTABLE) +\SEQUIN.HANDLE.INPUT (\INTERRUPTABLE) \DSPYPOSITION.HCPYMODE (\INTERRUPTABLE) CL::%%LOGICAL-OPTIMIZER +(CL::BINARY-LOGICAL-FN CL::FORM) \LFOpenFile (FDEV SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +FASL::DUMP-SYMBOL (FASL::HANDLE FASL::REMEMBER FASL::PNAME FASL::PKG-NAME) D-ASSEM::PRETTY-JUMPS ( +D-ASSEM::JUMP-OR-TAG) XCL::UNDOHOOK (*APPLYHOOK*) \NSRANDOM.FETCH.CACHE (\INTERRUPTABLE) +XCCS-UTF8-AFTER-OPEN (STREAM ACCESS PARAMETERS) SI::PRINT-TRACE-EXIT-INFO (SI::IN-FN) +\TEDIT.HARDCOPY.MODIFYLOOKS (ONEPOINT) COMPILER::GENCODE-PROGN (COMPILER::*SUPPRESS-POPS*) OPT.POSTOPT + (FRAME CL:LABELS FRAMES DELETEDBINDS) compilation (EXP) D-ASSEM::GENERATE-ARG-CHECK (D-ASSEM::OK-TAG +D-ASSEM::BAD-TAG) CL::FIND-SLOT (CL::NAME CL::SLOTS CL::DONT-ERROR) COMPILER::EXPAND-OPENLAMBDA-CALL ( +COMPILER::FN COMPILER::ARGS) SEDIT::ASSIGN-FORMAT-LIST (SEDIT::SUBFORMAT-NAME) ERRORSET ( +SI::*NLSETQFLAG* *CONDITION-HANDLER-BINDINGS*) D-ASSEM::COMPUTE-DEBUGGING-INFO (D-ASSEM::DLAMBDA) +DETACHWINDOW (ATWINS PWINDOW) CL:EXP (CL:NUMBER) MSUPDATE (VARS) \3MBSENDPACKET (NDB \INTERRUPTABLE) +\ADJUSTABLE-STRING-STREAM-OUTCHARFN (STRING CH) \LFRemoveDirEntry (\INTERRUPTABLE) UNDOEDITL (COM +EDITCHANGES) \PRINT-USING-DEFPRINT (*PRINT-LEVEL* *PRINT-ESCAPE*) SPY.GRAPH.EDITOR (W COPY) +CL::%%RATIONALIZE-FLOAT (CL::OLDNUM CL::OLDDEN CL::NUM CL::DEN) FORMAT-ADD-COMMAS (STRING COMMACHAR +COMMA-INTERVAL) \TOP-LEVEL-READ (*PACKAGE* \RefillBufferFn) \KEYHANDLER1 (YHOT) +\TEDIT.STRIKEOUT.SEL.ON (TEXTOBJ) CL:ENOUGH-NAMESTRING (*PRINT-BASE* DEFAULT-PATHNAME HOST DEVICE +DIRECTORY NAME TYPE VERSION NEED-NAME) COMPILER::META-EVAL-IF (COMPILER::PRED) READC (*READTABLE* +\RefillBufferFn CODE) CL:DESCRIBE (*PRINT-LENGTH* *PRINT-LEVEL*) \LFGenerateFiles (FDEV +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \DO.PROGV (TMP) DEL.PROCESS (INTERNAL) TEDIT.CR.UPDATESCREEN ( +CH# XPOINT TEXTOBJ SEL LINE BLANKSEEN CRSEEN DS CHWIDTH DONTSCROLL) SI::ERRORSET-PRINT-FUNCTION (DATUM +) COMPILER::PEEPHOLE-OPTIMIZE (COMPILER::*TAG-EQUIV-TABLE* COMPILER::*REACHABLE-TAG-TABLE* COMPILER::TAGS-USED +) COMP.TAGBODY (VARS VALS) \CREATEW1 (DSP DISPLAYDATA TITLEHEIGHT) COMPILER::COMPILE-FILE-NAMED-PROGN +(COMPILER::COMPILER-CONTEXT COMPILER::FORM) \10MB.STARTDRIVER (RESTARTFLG CSB) READCCODE (*READTABLE* +\RefillBufferFn) FB.HARDCOPY.DIRECTORY (PROPS FORMAT) \ARBOUT (END-FPTR) DV (*EDITMODE*) +EDITBMRESHAPEFN (OLDIMAGE OLDREGION OLDSCREENREGION) CLISP3 (CLISPISTATE) \LET0 (\INTERRUPTABLE) +COMPILER::GENCODE-OPCODES (COMPILER::NODE COMPILER:CONTEXT) SEDIT::EDIT-SELECTION (SEDIT::CHARCODE) +PURGEHISTORY (SI::*RESETFORMS*) SETREADMACROFLG (FLG) SEDIT::SET-SELECTION-COMMENT-WORD (SEDIT::INDEX +SEDIT::ITEM TYPE) MAKEFILE (PRETTYFLG *PRINT-BASE*) FIND-EDIT-LOCATION (*REMOVE-INTERLISP-COMMENTS*) +\TEXTOPENF (ACCESS ASDF QWER ZXCV PC) SI::PRINT-TRACE-ENTRY-INFO (SI::IN-FN) LAYOUTGRAPH (BOX.BOTH.FLG + BOX.LEAVES.FLG BORDER.FOR.MARKING LABELSHADE.FOR.MARKING) \LET* (\INTERRUPTABLE) SKIPSEPRCODES ( +\RefillBufferFn) SEDIT::PARSE-INDENT-GROUPS (SEDIT::ARG-1) \TEDIT.MENU.WHENHELDFN (MENU BUTTON) +CL:FILE-WRITE-DATE (TN) COMP.STPOP (RPTN) \TEDIT.FIND.FIRST.LINE (WWIDTH) \UFS.CLEANUP.GFS.TABLE (KEY) + SIMPLE-DELETE (ITEM SEQUENCE START END) SEDIT::GROW-SELECTION-DEFAULT (SEDIT::SELECTION SEDIT::CONTEXT + SEDIT::NODE) TEDIT.GET (OCURSOR USER.CMFILE RESP) COMP.BIND.VARS (DECL) CL:FILL (ITEM START) +READIMAGEOBJ (UNDERREADIMAGEOBJ) SEDIT::NOTE-CHANGE-FORMAT (SEDIT::NODE SEDIT::CONTEXT) SIMPLE-FIND ( +ITEM SEQUENCE START END) CL:FILE-NAMESTRING (*PRINT-BASE* *PRINT-RADIX* VERSION) \VFMCreateVPage ( +\INTERRUPTABLE) \SIMPLIFY.CL.ARGLIST (SECTION) \VAMAllocPageGroup (SI::*LOCKED-MONITOR* SI::*RESETFORMS* + \INTERRUPTABLE) MAPRELATION (DUMMY) CL:ARRAYP (ARRAY) MBUTTON.SET.FIELD (OBJ SAVED.SEL) +CL:FILE-POSITION (CL:POSITION) \DSPCLIPPINGREGION.PRESS (\INTERRUPTABLE) RESTART.PROCESS ( +\INTERRUPTABLE) \UFSMakeUnixFormatName (LASTSLASH SLASHCHAR C) FORMAT-PRINT-NAMED-CHARACTER (LONGP) +HARDCOPYGRAPH (PAGENUMBERS-FLAG X-POSITION Y-POSITION) XCL::NOHOOK (XCL::FN XCL::ARGS XCL::ENV +*EVALHOOK*) INSTALL-PROTOTYPE-DEFN (DEFINER-HELP-STRING TYPE RESULT) MSSHOWUSE (IFCANT) +\EXTERNALFORMAT (NEWFORMAT/NAME) SKREAD (*READ-SUPPRESS*) CL:EXPT (CL::BASE-NUMBER CL::POWER-NUMBER) +CLISPIF (CLISPCONTEXT DWIMIFYING VARS SI::*RESETFORMS*) \SEQUIN.RETRANSMIT (\INTERRUPTABLE) +WAKE.PROCESS (\INTERRUPTABLE) FORMAT-PRINT-CHARACTER (COLON ATSIGN PARMS) EDITL1 (USERHANDLE) +FIND-EXACT-SYMBOL (CL:SYMBOL PACKAGE) I.S.OPR (TRAN) \SUSPEND.PROCESS (\INTERRUPTABLE) +SEDIT::BACKSPACE-LITATOM (SEDIT::SUPER-TYPE) RESETINT (FROM TO) TEDIT.MINIMAL.WINDOW.SETUP ( +TEDITPROMPTWINDOW TWIDTH THEIGHT) SEDIT::DELETE-WORD (SEDIT::SELECTION SEDIT::NODE SEDIT::END STRING +SEDIT::START) FIND-EXTERNAL-SYMBOL (PACKAGE BASE OFFSET LENGTH FATP HASH EHASH RESULT SYM) +\NSRANDOM.PREPARE.CACHE (\INTERRUPTABLE RPTN) TB.SET.FONT (WIDTH) RESETTERMCHARS (TERMTABLE SYSTEMTYPE +) SEDIT::NEXT-NODE (SEDIT::POSTORDER?) SIMPLE-FIND-IF (TEST SEQUENCE START END) MAKEHASHLINKS ( +BINDINGS) \CLOCK0 (BOX) SEDIT::AWAKE-ME (SEDIT::RESULT SEDIT::STACK-FRAME) \TEDIT.PUT.CHARLOOKS ( +PREVFATP FONT STR) \LFEventFn (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) TERM.MODIFY.ATTRIBUTES ( +INVERTFLG DSP PLAINFONT) CL::BOA-SLOT-SETFS (CL::RESULT-ARG CL::SLOT-NAMES CL::STRUCTURE-TYPE) +SEDIT::EVAL-SELECTION (SEDIT::STRUCTURE-COPY) SI::CONSTRUCT-ENTRY-PRINTING-CODE (SI::TRACED-FN SI::IN-FN + SI::LAMBDA-CAR SI::ARG-LIST) TEDIT.COPY (INSPC INSPC# NPC PCCH NPCCH OPLEN COPYFN) +\POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS (WIDTHS NEWWIDTHS SIZE) \ETHEREVENTFN (DEV) CREATEW1 (DSP +DISPLAYDATA TITLEHEIGHT) \8859INCCODEFN (BYTECOUNTVAR BYTECOUNTVAL) \GETFILINGCONNECTION ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) COMPILER::COMPILE-FILE-OUTSTANDING-LOOSE-FORMS ( +COMPILER::COMPILER-CONTEXT) FASL::DUMP-CHARACTER (FASL::REMEMBER) CL:READ-DELIMITED-LIST (INSTREAM) +\CURVE (BRUSHBM) CL:FLOAT-RADIX (FLOAT) EDITBMREPAINTFN (REGION) COMPILER::CONVERT-TO-CL-LAMBDA ( +COMPILER::FORM) CLISP3B (OPR) EXPAND-DESTRUCTURING-BIND (PATTERN FORM BODY ENVIRONMENT WHOLE-VAR) +XCL::WHERE-IS-READ-COMS (PATHNAME) MSPRGDWIM (SI::*RESETFORMS* LISPXHIST) COMPILER::META-EVAL-CALL ( +COMPILER::FN-NAME) D-ASSEM::GENERATE-KEY (D-ASSEM::START D-ASSEM::TAIL) DINFO.CREATE.FMENU (ADD.ITEMS +FONT) PRIN2-LONG-STRING (IMSTREAMP) CL:GCD (CL::RESULT CL::I) LISPX/ (VARS) \FTP.NEXTFILE (NAMEBODY +EXT N) \FUNCT1 (\INTERRUPTABLE) CL:STRINGP (STRING) COMP.TOPLEVEL.COMPILE (CONSTS ALLDECLS LEVEL +LOCALVARS SPECVARS *BC-MACRO-ENVIRONMENT* COMPILER::*ENVIRONMENT* MACEXP AC FRELST +COMPILE.DUNBIND.POP.MERGE.FLG TEMP) SETREADTABLE (FLG) MSNOTICEFILE (SI::*RESETFORMS*) \MAKESTACKP ( +\INTERRUPTABLE) \PFTrimHelper (\INTERRUPTABLE) MSCHECKBLOCKS (LOCALVARS SPECVARS) COMPILER::ALPHA-LAMBDA + (COMPILER::ORIGINAL-FORM COMPILER::*CONTEXT* COMPILER::NAME) COMP.GO (ANYPROG) MENU.HANDLER (SUBITEMS +) FORMAT-PRIN1 (ATSIGN) \TEDIT.UNDERLINE.SEL.OFF (TEXTOBJ) UNIX-GET-NEXT-BUFFER (STREAM WHATFOR +NOERRORFLG) CL:APPEND (CL::ARGS) \TEDIT.HARDCOPY.DISPLAYLINE (FONT) NOTIFY.EVENT (\INTERRUPTABLE) +COMPILER::GENCODE-MV-CALL (COMPILER:CONTEXT COMPILER::ARGS) CHECK-KEYWORDS (KEY-ARGUMENTS ARGBLOCK +LENGTH N) \TEDIT.BRAVOFILE? (A B C) RIGHTW.REPAINTFN (SPACE *PRINT-LEVEL* *PRINT-LENGTH*) LISPX ( +HELPCLOCK SI::*RESETFORMS*) COMPILER::ALPHA-UNWIND-PROTECT (COMPILER::BODY COMPILER::CLEANUPS +COMPILER::CLEANUP-VAR) \UFSCHDIR-C (DIR) STKEVAL (INTERNALFLG) \DOBUFFEREDTRANSITIONS (\INTERRUPTABLE) + DOSELECTEDITEM (MENU ITEM BUTTON) SEDIT::DO-MUTATION (SEDIT::CONTEXT SEDIT::RESULT) +PRINT-CIRCLE-ENTER (OBJECT) SEDIT::GET-CONTEXT (SEDIT::WINDOW) FASL::SAVE-VALUE (FASL::VALUE +CL:HASH-TABLE) \LFDirectoryNameP (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) TWODINSPECT.MAKEREGIONS ( +*PRINT-LEVEL* *PRINT-LENGTH*) UNIXCOMM-AROUNDEXITFN (EVENT) SEDIT::FINALIZE-MOUSE-SELECTION (SEDIT::WINDOW +) \SOUT (*DRIBBLE-OUTPUT* \PRIMTERMSA \TERM.OFD) CHDIR (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +%%SYNONYM-STREAM-DEVICE-GETFILEINFO (DEVICE) MSCHECKBLOCK (ENTRIES BLKAPPLYCALLERS RETFNS NOLINKFNS +LINKFNS DONTCOMPILEFNS) CL:CONSTANTP (OBJECT ENVIRONMENT) TOTOPW.MODERNIZE (MAIN) CL::%%+ (CL::X CL::Y +) RETEVAL (INTERNALFLG) RSTRING (\RefillBufferFn *READ-SUPPRESS*) SEDIT::SET-SELECTION-COMMENT ( +SEDIT::INDEX SEDIT::OFFSET TYPE) SI::CREATE-TRACED-DEFINITION (SI::TRACED-FN SI::IN-FN SI::FN-TO-CALL) + INTERACT&SHIFT.BITMAP.LEFT (NEW.BITMAP) SEDIT::EXTEND-SELECTION (SEDIT::SELECTION SEDIT::CONTEXT SEDIT::X + SEDIT::Y SEDIT::NODE SEDIT::INDEX SEDIT::OFFSET SEDIT::LINE SEDIT::LINEAR) SEDIT::PARSE-INDENT-GROUP-ONE + (SEDIT::INDENTS SEDIT::GROUP SEDIT::OFFSET SEDIT::ARG-1) PRINSHUT (TAIL) \POLYSHADE.XSCAN.IP (nlist +by) COMPILER::COMPILE-FILE-DEFINER (COMPILER::COMPILER-CONTEXT COMPILER::FORM) SPY.TITLE (SPYDATA) +XCL::STRUNCATE (CL:NUMBER) \CARET.DOWN (\INTERRUPTABLE) CALLS (SI::*RESETFORMS*) PFI.MAYBE.SEE.PRETTY +(*UPPER-CASE-FILE-NAMES*) %%SYNONYM-STREAM-DEVICE-SETFILEINFO (DEVICE) COMPILER::GENCODE-MV-PROG1 ( +COMPILER::NODE COMPILER:CONTEXT) \SETMACROSYNTAX (\INTERRUPTABLE) ALISTS.GETDEF (TYPE OPTIONS) BLIPVAL + (NXT) TEDIT.PUT.PIECE.DESCRIPTOR (FILE CH1 CHLIM LOOKS) CGETTEXTPROP (TEXTOBJ) \TEDIT.GET.PARALOOKS ( +FILE) CTEXTPROP (TEXTOBJ VAL) SETTIME (RETFLG) SI::NAMED-FUNCTION-WRAPPER-INFO (SI::DEFN SI::FN-TO-CALL + SI::STORED-ARGLIST) BREAK0 (COMS BRKFN) DINFO.ICONFN (W) SETBLIPVAL (NXT) COPYVM (SI::*RESETFORMS*) +\MAPCHARS (DUMMY) BREAK1 (BRKCOMS BRKTYPE) D-ASSEM::REDUCE-UNCERTAINTY (D-ASSEM::INCREASE-IN-MIN-PC +D-ASSEM::JUMP-OR-TAG) XCL::WALK-COMPILER-LET (XCL::FORM XCL::CONTEXT) VRULE.WHENOPERATEDONFN (A B C) +AS.DELETE.PASSWORDS (CONVGOOK) %%TWO-WAY-STREAM-DEVICE-OUTPUTSTREAM (BYTE) TEDIT.PUT.PAGEFRAMES (STR) +ERRORMESS1 (BADGUY MESSAGE) DBG::SIMPLE-REPORT-CONDITION (CONDITION) \SPPWATCHER (SI::*LOCKED-MONITOR* + SI::*RESETFORMS*) COMPILER::GENCODE-LITERAL (COMPILER::NODE COMPILER:CONTEXT) COMPLEX-REMOVE-IF (TEST + SEQUENCE START END FROM-END KEY COUNT) TWODINSPECT.ARRANGEWINDOWS (COLUMNPROPS) SPP.SENDEOM (EPKT) +\MOVEREALPAGE (SOURCEINDEX) COMPILER::ALPHA-THROW (COMPILER::*CONTEXT*) TEDIT.WINDOW.SETUP (SEL +TEDITPROMPTWINDOW DS TWIDTH THEIGHT) VRULE.COPYFN (FROMSTREAM TOSTREAM) XCL::WALK-BINDINGS-1 ( +XCL::*DECLARATIONS* XCL::*LEXICAL-VARIABLES*) \ICONW.COPYBUTTONEVENTFN (WINDOW) \IPCURVE2 (EXTRANEOUS) + SMASHPAT1 (CARVAL) \RTP.ERROR (FOREIGNPUP) SEDIT::SET-POINT-COMMENT (SEDIT::CONTEXT TYPE +SEDIT::COMPUTE-LOCATION?) \REALFRAMEP (BFLINK) CL::DEFINE-CONSTRUCTORS (CL::RESULT-ARG CL::SLOT-SETFS) + LISPXFIND (SI::*RESETFORMS*) INSPECTW.CREATE (*PRINT-LEVEL* *PRINT-LENGTH* VALUE PROPMENU VALUEMENU +SELITEMS X) \10MBENCAPSULATE (NDB) FORMAT-PRINC (ATSIGN) TEDIT.INSERT.UPDATESCREEN (CH XPOINT OTEXTLEN + BLANKSEEN CRSEEN THISLINE EOLFLAG CHORIG CHWIDTH OXLIM OCHLIM OCR\END PREVSPACE FIXEDLINE NEXTLINE +LINES NEWLINEFLG DX PREVLINE SAVEWIDTH OFLOWFN OLHEIGHT DY TABSEEN IMAGECACHE) SEDIT::PARSE-INDENT-GROUP + (SEDIT::INDENTS SEDIT::GROUP SEDIT::OFFSET CL:BREAK SEDIT::NOBREAK) SUPERPRINT/WRAPPER (LEFT) CL:ISQRT + (CL::HIGH) HISTORYSAVE (EVENT) COMPILER::COMPILE-FILE-COMPILER-LET (COMPILER::COMPILER-CONTEXT COMPILER::FORM +) \IRM.AROUND-EXIT (EVENT) COMPILER::EFFECTS-ANALYZE (COMPILER::TREE) \SETACCESS (\INTERRUPTABLE) CL:LCM + (CL::RESULT CL::I) \TEXTPEEKBIN (CH FILE STR) CLISPIFY2 (NOVALFLG NEGFLG) \TEDIT.SUPERSCRIPTSEL ( +TEXTOBJ) \MAIKO.DISPLAYLINE (STREAM \PCHARSLEFT \PSTRING \PFILE FONT) COMP.PROG (ALLVARS ALLDECLS +LOCALVARS SPECVARS PROGLEVEL) \EVALFORM (*ARGVAL* *TAIL* *FN*) COMPILER::GENCODE-LET (COMPILER:CONTEXT + COMPILER::*SPECIAL-VENV* COMPILER::SPECIAL-LOCALS-HERE COMPILER::STK-NUM) COMPLEX-REMOVE-IF-NOT (TEST + SEQUENCE START END FROM-END KEY COUNT) SI::CHANGE-CALLS (SI::FROM SI::TO SI::FIXER SI::REAL-FN-DEFN) +NOTIMP (N) \UFSGetFreeBlock-C (FILE BUF) COMPILER::ALPHA-TAGBODY (COMPILER::*TAGBODY-STACK* COMPILER::FORM +) SEDIT::PARSE--QUOTE (CL:STRUCTURE SEDIT::CONTEXT) SI::CHANGE-CALLS-IN-CCODE (SI::TO) RECLOOK ( +FAULTFN) XCL::WHERE-IS-DEFAULT-DEFINE-TYPES (TYPE) WINDOW.MOUSE.HANDLER (\MOUSEBUSY) SIMPLE-DELETE-IF +(TEST SEQUENCE START END) GET.MENU.LIST (DISPLAYEDLEVELS MAXWIDTH FONT BFONT MENU-P) FASL::WRITE-OP ( +FASL::HANDLE FASL::OPNAME) \VFMInsertPageGroup (SI::*LOCKED-MONITOR* SI::*RESETFORMS* \INTERRUPTABLE) +TWODINSPECT.ADJUSTSELECTION (*PRINT-LEVEL* *PRINT-LENGTH*) HASH-STRUCTURE-SMASH (THING) +DBG::PRINT-ENTRY-MESSAGE (*PRINT-BASE*) \BACKTRACE (NARGS NPVARS ARGNAME) MODERNWINDOW.BUTTONEVENTFN ( +LEFT RIGHT TOP BOTTOM) RESHOWTITLE (TITLE WINDOW JUSTDISPLAYFLG) COMPILER::COMPILE-FILE-MACROLET ( +COMPILER::COMPILER-CONTEXT COMPILER::FORM) SEDIT::ADJUST-WIDTH (SEDIT::CONTEXT) \GC.HANDLEOVERFLOW ( +\INTERRUPTABLE) COMPILER::FIND-TAG-DUPLICATION (COMPILER::NEW-CODE) SEDIT::EXPANDFN (SEDIT::CONTEXT) +\EDITBM/PUTUP/DISPLAY (GRIDINTERIOR) \TEDIT.SUBSCRIPTSEL (TEXTOBJ) COMP.TRANSFORM (CONTEXT +*BYTECOMPILER-IS-EXPANDING*) COMP.LAMBDA (E I ALLVARS ALLDECLS LOCALVARS SPECVARS) DF (*EDITMODE*) +OPT.DEADSETQP (TAGS ICNT) \FTP.REOPENFILE (NAME RECOG OTHERINFO FDEV) OPENNSOCKET (\INTERRUPTABLE) +SI::CHANGE-CALLS-IN-LAMBDA (SI::FROM SI::TO SI::LAMBDA-FORM) DO.SHIFTED.SELECTION (ENDLINE) +\TEDIT.PUT.SINGLE.CHARLOOKS (STR) CL::DEFINE-BOA-CONSTRUCTOR (CL::CONSTRUCTOR-NAME CL::SLOT-SETFS) +DEFAULT.INSPECTW.PROPCOMMANDFN (DATUM) FORMAT-TAB (COLON ATSIGN PARMS) \INSERTCH (CHNO \INFIRSTCH) +SEDIT::PARSE-INDENT-GROUP-BODY (SEDIT::INDENTS CL:BREAK SEDIT::NOBREAK) \INTERPRETER (TYPE +\INTERRUPTABLE) \TEXTMENU.TOGGLEFN (W OFILE CH) %%FILL-POINTER-STREAM-DEVICE-CLOSEFILE (ABORTFLAG) +COMPILER::FIND-AND-PERFORM-RPLCONS-TRANSFORM (COMPILER::NODE COMPILER:CONTEXT) \LFWriteLeaderPage (vol +) EDIT%: (TOFLG L UNDOLST1 LCFLG) COLLECTDESCENDENTS (NodeID) \TEDIT.PUT.PARALOOKS (DEFAULTTAB +TABSPECS OUTPUTFORMAT) \INTERNAL/SETPASSWORD (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +FORMAT-INDIRECTION (COLON ATSIGN PARMS STRING) INSPECTW.REPAINTFN (*PRINT-LEVEL* *PRINT-LENGTH*) +\DSPFONT.HCPYMODE (\INTERRUPTABLE) CL:LOGEQV (CL::RESULT CL::I) SHOWWTITLE (PLVLFILEFLG) +\POLYSHADE.DISPLAY (nlist) COMPILER::COMPILE-FILE-PACKAGE-FORM (COMPILER::COMPILER-CONTEXT COMPILER::FORM +) SI::CONSTRUCT-MIDDLE-MAN (*PRINT-CASE*) \BSP.SENDBUFFER (\INTERRUPTABLE) WAITFORINPUT (ELAPSED) +CL:LOGIOR (CL::RESULT CL::I) UNSAVEDEF (DFNFLG) \TEDIT.CHARDELETE (INSPC#) SEDIT::REPAINT ( +SEDIT::CURRENT-FONT) \INVALID.SYMBOL (XCL::NCOLONS XCL::EXTRASEGMENTS XCL::MY-CONDITION) +COMP.RETFROM.POINT (LBCNT) LITATOM (X) \VFMInsert (insertVolumePage) CL:IMAGPART (CL:NUMBER) +\PFPatchRootDirEntries (type) FASL::END-TEXT (FASL::HANDLE) FB.FASTSEECOMMAND (KEY ITEM MENU +*UPPER-CASE-FILE-NAMES*) SEDIT::SET-POINT-COMMENT-WORD (SEDIT::CONTEXT SEDIT::INDEX SEDIT::ITEM TYPE +SEDIT::COMPUTE-LOCATION?) SI::RESTORE-CALLS (SI::ENTRY) TITLEW.BUTTONEVENTFN (*PRINT-LEVEL* +*PRINT-LENGTH*) DBG::EMERGENCY-PANIC-LOOP (*READ-SUPPRESS* DBG::*IN-THE-DEBUGGER*) \THROUGHBACKCCODE ( +STREAM BYTECOUNTVAR BYTECOUNTVAL) \TEDIT.HARDCOPY.FORMATLINE (PAGEINFO FONTWIDTHS PCNO) +\PFI.DO.HARDCOPY (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \CREATECHARSET.IP (ROTATION DEVICE) +EDITCALLERS (DUMMY *PACKAGE*) COMPILER::GENCODE-LAMBDA (COMPILER::NODE COMPILER:CONTEXT COMPILER::NEW-LAMBDA + COMPILER::OUR-NON-LOCALS COMPILER::CLOSED-OVER COMPILER::REQUIRED COMPILER::OPTIONAL CL:REST COMPILER::KEY +) CL:HOST-NAMESTRING (PATHNAME) \GCMAPTABLE (\INTERRUPTABLE) FB.BROWSECOMMAND (KEY ITEM MENU OPTION +DEPTH) COMPILER::ALPHA-SETQ (COMPILER::KIND) VRULE.IMAGEBOXFN (HRULE CURRENT.X RIGHT.MARGIN SCALE +WIDTHS) COMPILER::FIND-REACHABLE-TAGS (COMPILER::*TAG-LOCATION-TABLE*) XCL::WHERE-IS-NOTICE-INTERNAL ( +XCL::FILE-NAME XCL::OLD-FILES) \LEAF.RECONNECT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +SEDIT::CREATE-SIMPLE-NODE (SEDIT::ENVIRONMENT) COMPILER::COMPILE-FILE-PROCLAMATION (COMPILER::COMPILER-CONTEXT + COMPILER::TOP-ENV) SEDIT::COPY-SELECTION-DEFAULT (SEDIT::CONTEXT SEDIT::POINT SEDIT::DELETE? SEDIT::NODES +) MBUTTON.SET.NEXT.BUTTON.STATE (TEXTOBJ STARTINGCH NEWSTATE) TTYDISPLAYSTREAM (\INTERRUPTABLE) +CLISPIFY1 (BROADSCOPE PARENT) SEDIT::ASSIGN-FORMAT-LITATOM (SEDIT::FONT SEDIT::STRING-ITEM SEDIT::WIDTH +) COMP.ATTEMPT.COMPILE (SUBFNFREEVARS) CL::%%ATAN-FLOAT (CL::SQR CL::INT CL::POW CL::OLD) SMASHPATTERN + (XV) CLOSEICONWINDOW (USEREXPANDFN) \FTP.GENERATEFILES (REMOTENAME) SEDIT::SELECT-SEGMENT-COMMENT ( +SEDIT::CONTEXT SEDIT::NODE SEDIT::SUBNODE SEDIT::INDEX SEDIT::SUB-OFFSET SEDIT::SUB-ITEM SEDIT::START +SEDIT::NEW) PRINTFILETYPE (HOST) TTYIN.FINISH (*READTABLE* \BUFFER) TTYIN (HELP ECHOTOFILE TABS +\INSIDE.TTYIN \DSP \INITCRLFS \ARROW \BMARG \CHARHEIGHT \CHARWIDTH \COMMENTFONT \CURSOR \CURSORROW +\DELETING \DESCENT \FIRSTLINE \FONT \HOMECOL \HOMEROW \INITPOS \LAST.DELETION \LASTAIL \LASTAILCOL +\LASTAILROW \LASTCHAR \LMARG \LOC.ROW.0 \RMARG \TEXTURE \TTPAGELENGTH \TTYINBUFFERSTREAM) PRIN2 ( +*READTABLE* *PRINT-ESCAPE* *PRINT-LEVEL* *PRINT-LENGTH* *PACKAGE*) SEDIT::CONVERT-COMMENT (SEDIT::POINT + SEDIT::NEW-NODE) DCODERD (*READTABLE*) \THROUGHIN (BYTECOUNTVAR BYTECOUNTVAL) FORMAT-SKIP-ARGUMENTS ( +COLON ATSIGN PARMS) COMP.BLOCK (FLG) COMPILER::GENCODE-LABELS (COMPILER::NODE COMPILER:CONTEXT) +COMPLEX-REMOVE (ITEM SEQUENCE START END FROM-END KEY COUNT TEST TEST-NOT-P) \NSADDRESS.DEFPRINT ( +*PRINT-BASE*) \TEDIT.APPLY.STYLES (FMTSPEC) SPP.CLEAREOM (CON FLG) COMPILER::ALPHA-RETURN-FROM ( +COMPILER::*CONTEXT*) \MEDW.XOFFSET (\INTERRUPTABLE) VRULE.GETFN (TEXTSTREAM) VIRGINFN (X) %## ( +UNDOLST1 LASTAIL MARKLST UNFIND) SCALED.BITMAP.GETFN (TEXTSTREAM) ESUBST (L ATM COM UNFIND LASTAIL +EDITCHANGES) TTYIN1 (\INSIDE.TTYIN) \DEFINEDEVICE (\INTERRUPTABLE) \MEDW.YOFFSET (\INTERRUPTABLE) +CREATEARRAYSLICE (RANK) FASL::END-BLOCK (FASL::HANDLE) \TEDIT.HARDCOPY (FILE PFILE) MSPRGLAMBDA ( +PARENT PARENTCONTEXT VARS INCLISP) SETINITIALS (DFNFLG FILEPKGFLG) \SPP.ESTABLISH (SI::*LOCKED-MONITOR* + SI::*RESETFORMS*) SUBRP (FN) \TEDIT.NEWREGIONFN (WINDOW %#OFMENUITEMS MENUWIDTH) PRIN4 (*READTABLE* +*PRINT-ESCAPE* *PRINT-LEVEL* *PRINT-LENGTH* *PACKAGE* \THISFILELINELENGTH) \VFMGetPageGroup ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS* \INTERRUPTABLE) SEDIT::HANDLE-COMPLETION (SEDIT::REASON SEDIT::FN + SEDIT::EXTRA-ARGS) SIMPLE-REMOVE-IF-NOT (TEST SEQUENCE START END) MB.DEFAULTBUTTON.FN (OBJ SEL W) +INTERACT&SHIFT.BITMAP.RIGHT (NEW.BITMAP) TEDIT.GETINPUT (STREAM PROMPTSTRING DEFAULTSTRING +DELIMITER.LIST) CL:PACKAGE-NAME (PACKAGE) MSINTERPRET (EDITQUIETFLG) INTERACT&SHIFT.BITMAP.UP ( +NEW.BITMAP) \SPP.PREPARE.INPUT (\INTERRUPTABLE) XCL::WHERE-IS-NOTICE (XCL::FILES XCL::DEFINE-TYPES +XCL::QUIET HASH-FILE::*DELETE-OLD-VERSION-ON-REHASH*) \NSFILING.CONNECT (REALREQUIRED) APROPOS ( +DISPLAYSTREAM) WTFIX1 (DWIM.GIVE.UP.TIME NEWTAIL SI::*RESETFORMS* EXPR) CL:GENTEMP (CL::PREFIX PACKAGE + CL::COUNTER CL:NAMESTRING) PROMPTFORWORD (BELLBEENHEARD? CANDIDATATE.LENGTH) WRITEPRINTERPORT (DATUM) + COMPILER::FIND-ALL-TAGS (COMPILER::CODE) \LEAF.WHENCLOSED (FINALSTATE) CL:MERGE-PATHNAMES (DIREND +DEFAULT-TYPE) \SPPSENDERROR (CON) CLDISABLE (SI::*RESETFORMS*) \TFBRAVO.HANDLE.HEADING (INPUT) +XCL::HASH-FILE-TYPES-OF (XCL::POSSIBLE-TYPES XCL::ENTRIES) COMPILER::COMPILE-FILE-DEFINE-FILE-INFO ( +COMPILER::COMPILER-CONTEXT *STANDARD-INPUT* FILECREATEDLOC) WHO-LINE-SYMBOL-SPACE (TOTAL-SYMBOL-SPACE +SYMBOL-SPACE-IN-USE) \GET-NEXT-RUN (START) INREADMACROP (POS) \DRAWELLIPSE.HCPYMODE (CENTERX CENTERY +SEMIMINORRADIUS SEMIMAJORRADIUS) \NEWPAGE (BASE NOERROR LOCK?) AS.CREATE.PASSWORDS (PASSWORD CONVGOOK) + FB.HARDCOPYCOMMAND (KEY MENU) COMPLEX (CL:REALPART CL:IMAGPART) \REMOVEDEVICE (\INTERRUPTABLE) +\FTP.DELETEFILE (REMOTENAME) \LINES-EQUAL-P (LAST-LINE CURRENT-LINE WORDS-PER-RASTER) EDIT4E (L UNFIND + ORIGFLG LASTAIL) SETSYNONYM (FLG) \DONEWPAGE (BASE NOERROR LOCK?) COERCE-TO-NSADDRESS (HOST +DEFAULTSOCKET) COMPILER::GENCODE-IF (COMPILER::ELSE-TAG COMPILER::AFTER-IF-TAG) \BLKFABSMAX.UFN (ZERO) + \PRINTNSADDRESS (\THISFILELINELENGTH) \TEDIT.TABTYPE.SET (W PCNO) ARGTYPE (DEF) \BLKFABSMIN.UFN (ZERO +) \IDLE.PROMPTING.WINDOW (TITLE) \CURSORDESTINATION (\INTERRUPTABLE) PRINTHISTORY (L HELPCLOCK) +\BLKFMAX.UFN (ZERO) READHASHMACRO (READVAL) \BLKFMIN.UFN (ZERO) HREAD (BACKREFS BACKREFCNT +DATATYPESEEN) MSPRGTEMPLATE (PARENTCONTEXT VARS) \FM.3STATE-SELECTEDFN (WINDOW BUTTONS) READBQUOTE ( +\INBQUOTE) INFILECOMS? (NAME ORIGFLG) BYTEBLOCKCOMPILE2 (SI::*RESETFORMS* BLKFLG) CL:PARSE-NAMESTRING +(HOST DEFAULTS JUNK-ALLOWED) CHAT.INIT (HOST) \TEDIT.BLTCHAR (DISPLAYSTREAM CHAR8CODE \INTERRUPTABLE) +COMPILER::COMPILE-FILE-DEFCONSTANT (COMPILER::COMPILER-CONTEXT COMPILER::FORM) EDITXTR (UNFIND) +PUTSEQUIN (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \SW2BM (\INTERRUPTABLE) COMPILER::ALPHA-PROGN ( +COMPILER::*CONTEXT*) \DisplayEventFn (FDEV) COMPILER::GENCODE-GO (COMPILER:CONTEXT COMPILER::SEGMENT) +CHAT (LOGOPTION INITSTREAM) COURIER.SKIP (RPTN) OBTAIN.MONITORLOCK (\INTERRUPTABLE) DISPLAYAFTERENTRY +(ENTRYFN) EDITMV (LASTAIL) CL:RETURN-FROM (CL::RETFROM-VALUE) COMPILER::CLOSURE-ANNOTATE-VAR-REF ( +COMPILER::IN-LOOP-P) LISPXUSEC (LISPXHIST) \INSPECT.COMPUTE.TITLE (*PRINT-LEVEL* *PRINT-LENGTH*) +\TEDIT.FIXCHANGEDLINE (TEXTLEN PREVDESCENT FORMATDONE LIMITCHANGED WASDIRTY PREVLINE FOUND DY) +CL:PEEK-CHAR (RECURSIVE-P \RefillBufferFn) FORMAT-PLURAL (COLON PARMS) SIMPLE-REMOVE (ITEM SEQUENCE +START END) CL:MAKE-SYMBOL (\INTERRUPTABLE) SEDIT::DISPLAY-SELECTION (SEDIT::SELECTION SEDIT::WINDOW +TYPE) MBUTTON.SET.NEXT.FIELD (DONTUPDATESCREEN) ONEDINSPECT.MAKEREGIONS (*PRINT-LEVEL* *PRINT-LENGTH*) + FB.ADJUST.DATE.WIDTH (TBROWSER) XCL::CLOSE-WHERE-IS-FILES (XCL::EVENT) FILL-VECTOR (VALUE CNT +TYPE-NUMBER) \TEDIT.ITALIC.SEL.ON (TEXTOBJ) COMPILER::META-SUBST-LAMBDA (COMPILER::IN-FUNCTIONAL-POSITION +) \TEDITMENU.SELSCREENER (SELECTMODE FINAL?) \NEWEPHEMERALPAGE (\INTERRUPTABLE) \PFPurgeRootDirectory +(rootDir \INTERRUPTABLE) MSHASHLIST (OTHERSET BADMARKS) \DRAWCURVE.HCPYMODE (KNOT) FIXATOM ( +CLISPERTYPE) \DONEWEPHEMERALPAGE (PREVRP) RELEASE.MONITORLOCK (\INTERRUPTABLE) INFILECOM (ORIGFLG TYPE +) FORMAT-NEWLINE (PARMS) \FM.3STATE-DOWNFN (BUTTONS) CHAT.TYPEIN (HOST WINDOW LOGOPTION INITSTREAM) +TEDIT.REDO.MOVE (CH# FIRSTPIECE FROMOBJ SOURCECH# OLDCHLIM) DISCARDPUPS (\INTERRUPTABLE) +MACROEXPANSION (EXP EFF VCF NCF PCF PREDF) DOATTACHEDWINDOWCOM (COM) SEDIT::CHANGE-PACKAGE (SEDIT::CHARCODE + SEDIT::WINDOW) PFI.ENQUEUE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) SI::MONITOR-UNWIND (\INTERRUPTABLE +) SIMPLE-REMOVE-IF (TEST SEQUENCE START END) SEDIT::NOTE-CHANGE-IN-SIMPLE (SEDIT::OFFSET SEDIT::WIDTH +SEDIT::START SEDIT::END) \POSTSCRIPT.CHANGECHARSET (PSDATA CHARSET) SEDIT::CONFLICTING-SELECTION? ( +SEDIT::DESTINATION-CONTEXT SEDIT::SELECTION) EXCHANGEPUPS (DUMMY) \MISC5.UFN (ARG1 ARG2 ARG3 ARG4 ARG5 +) CL:RANDOM (CL::RV) COMPILER::RELEASE-TREE (COMPILER::TREE) SEDIT::PARSE--COMMENT (SEDIT::CONTEXT +SEDIT::COMMENT-WORDS SEDIT::LEVEL) \FTP.REGISTER (DEVICE) MAKEEPSFILE (BOUNDINGBOX) \SEQUIN.PUT ( +\INTERRUPTABLE) SEDIT::FORMAT-FROM-INDENT (SEDIT::MISER LAST) \DRAWCIRCLE.HCPYMODE (CENTERX CENTERY +RADIUS) ONEDINSPECT.ADJUSTSELECTION (*PRINT-LEVEL* *PRINT-LENGTH*) \TEMPLOCKPAGES (\INTERRUPTABLE) +COMPILER::COMPILE-FILE-DECLARE%: (COMPILER::COMPILER-CONTEXT COMPILER::FORM COMPILER::DOCOPY +COMPILER::*EVAL-WHEN-COMPILE*) SEDIT::CHANGE-PRINTBASE (SEDIT::CHARCODE) \SPP.RELEASE.ACKED.PACKETS ( +\INTERRUPTABLE) COMPILER::ALPHA-MV-PROG1 (COMPILER::*CONTEXT*) NSDISPLAYSIZE (FACE) PFI.PRETTYPRINT ( +*PFI-ITEM*) MSPRGRECORD (WITH? ONLYRELS EACHTIME) \TEDIT.MARK.REVISION (TEXTOBJ FMTSPEC) +\TEDIT.NEUTRALIZE.CHARLOOKS.MENU (CH# SCRATCHSEL PC OFILE CH NEXTB BUTTON TEXT OFFSET) SEDIT::NOTE-CHANGE + (SEDIT::NODE SEDIT::CONTEXT) SEDIT::CLOSEFN (SEDIT::CONTEXT) \DFSFreeDiskPages (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) POSTSCRIPT.FONTCREATE (SYMWIDTHS DINGWIDTHS MAPPING CODE) CL:VALUES (\INTERRUPTABLE) + SEDIT::DEFAULT-PACKAGE (TYPE CL:STRUCTURE) NWAYBUTTON.INIT (BUTTONS FONT INITSTATE) +TOPW.ADJUSTSELECTION (*PRINT-LEVEL* *PRINT-LENGTH*) %%STRING-BASE-COMPARE (BASE1 TYPENUMBER1 BASE2 +TYPENUMBER2 END1 END2) CL::TIME-FORMAT (CL::FORMAT-STRING CL::ARGS) \GET.SESSION.HANDLE (PROGRAM) +CL:RATIONALIZE (CL:NUMBER) TEDIT.FORMATTEXTBOX (STREAMSCALE LASTLINE) \TEDIT.UNPARSE.CHARLOOKS.LIST ( +OFFSET) COMP.CL-EVAL (EXP) CL:VALUES-LIST (\INTERRUPTABLE) MSPRGTEMPLATE1 (VARS TOPVARS) SEDIT::BACKSPACE + (SEDIT::SELECTION) ERRM-TO-CONDITION (MESSAGE) FORMAT-TILDE (COLON ATSIGN PARMS) +FB.INFOMENU.WHENSELECTEDFN (KEY) \DISPLAYINIT (ACCESS RECOG OTHERINFO FDEV) %%STRING-DOWNCASE (BASE +TYPENUMBER) \PUT.SESSION.HANDLE (PROGRAM) CL:REALPART (CL:NUMBER) CL:RATIONAL (CL:NUMBER) PACKFILENAME + (STRUCTURE PROTECTION ACCOUNT PACKLIST) \MAKE.PROCESS1 (\INTERRUPTABLE) COMPILER::GENCODE-CATCH ( +COMPILER::NEW-LAMBDA COMPILER::END-TAG COMPILER::THROW-TAG COMPILER::STK-NUM) XCL::DEL-WHERE-IS-DATABASE + (XCL::FOUND) COMPILER::ALPHA-MV-CALL (COMPILER::FN-FORM COMPILER::ARG-FORMS COMPILER::VALUES-USED) +CL:EVALHOOK (*EVALHOOK* CL::*SKIP-EVALHOOK* *APPLYHOOK* CL::*SKIP-APPLYHOOK*) +%%STRING-BASE-COMPARE-EQUAL (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 END1 END2) UNIX.SETDISPLAYTYPE (CODE) + %%STRING-UPCASE (BASE TYPENUMBER) ECASE-FAIL (PROCEEDABLE PLACE VALUE SELECTORS) CL:APPLYHOOK ( +CL:FUNCTION CL::ARGS CL::ENV *EVALHOOK* CL::*SKIP-EVALHOOK* *APPLYHOOK* CL::*SKIP-APPLYHOOK*) +\NSFILING.DESERIALIZE (VERSION NAME) CL::VALUES-UFN (CL::INDEX \INTERRUPTABLE) XCL::SETF-PACKAGE-PREFIX + (PACKAGE) SEDIT::RELINEARIZE (SEDIT::OLD-BOTTOM-Y) MAKE-CONDITION (TYPE XCL::SLOT-INITIALIZATIONS) +\10MBSENDPACKET (\INTERRUPTABLE) CL::VALUES-LIST-UFN (CL::INDEX CL::ARGCOUNT \INTERRUPTABLE) LISPXFIX +(LISPXHIST) COMPILER::GENCODE-BLOCK (COMPILER::NEW-LAMBDA COMPILER::BLIP-VAR COMPILER::REMOTE-RETURN-TAG + COMPILER::*CODE* COMPILER::CODE) \DRAWLINE.HCPYMODE (X1 Y1 X2 Y2 WIDTH) MULTIFILEINDEX1 ( +*PFI-TWO-SIDED*) COMPILER::COMPILE-FILE-DEFINEQ (COMPILER::COMPILER-CONTEXT COMPILER::REAL-DEFN) +SEDIT::PARSE-FORMAT (SEDIT::FORMAT-SPEC) TTYIN.PPTOFILE (*READTABLE* *PRINT-ARRAY* *PRINT-STRUCTURE* +FONTCHANGEFLG) \SPP.HANDLE.ATTN (STREAM) \DOFLUSHVM (MAIKO.SYSOUTFILE IFPVP SCRATCHBUF IFPRPT) +\PAGEDBACKFILEPTR (\INTERRUPTABLE) STRPOSL (CH) CL:REQUIRE (CL::MODULE-NAME PATHNAME) MENUWRESHAPEFN ( +OLDIMAGE OLDREGION) \PFRemoveRootDirEntry (\INTERRUPTABLE) CHANGECCODE (ALL-CODE-BASES \INTERRUPTABLE) + CL:ROOM (CL::TYPES CL::PAGE-LIMIT CL::IN-USE-LIMIT) TB.DO.ITEM.SELECTION (ITEM) MACROS.GETDEF (TYPE +OPTIONS) \ENQUEUE.TIMER (\INTERRUPTABLE) \FLUSHVM (\INTERRUPTABLE) EXPANDMACRO (OPTIONS NCF PCF VCF +EFF) EXPAND-DEFMACRO (*MACRO-FORM* *MACRO-DEFAULT*) FW-INIT-PROPS (W H) TEDIT.FORMATHEADING (TEXTOBJ) +SEDIT::PARENTHESIZE-CURRENT-SELECTION (SEDIT::CHARCODE) TEDIT.FORMATFOLIO (TEXTOBJ) +AS.REPLACE.PASSWORDS (NEWPASSWORD CONVGOOK ERROR) ICMLARRAY.GETMENUWGROUP (RANK) FASL::DOTTED-LIST-LENGTH + (FASL::X) \STRINGWIDTH.GENERIC (DUMMY) CSELECT (COND-FORM) PRINT-EVENT (EVENT#) +CL::SET-PARSED-STRUCTURE (CL::EXTRA) \DSPCLIPPINGREGION.DISPLAY (\INTERRUPTABLE) \TEDIT.UNSPLITW ( +WINDOW Y) EXPANDOPENLAMBDA (GENARGS) FIXAPPLY (TYPE-IN?) CL:SEARCH (TEST TEST-NOT KEY SUBLEN1 SUBLEN2) + COMPILER::ALPHA-MACROLET (COMPILER::BODY COMPILER::*ENVIRONMENT*) SEDIT::SCAN-FOR-BOUNDS (SEDIT::END) + GRAPHBUTTONEVENTFN (REG) PFI.PRINT.COMMENTS (EXPR) \ASSIGNDATATYPE1 (\INTERRUPTABLE) +PACKAGE-HASHTABLE-INSPECT-FETCHFN (OBJECT PROPERTY) BMOBJ.BUTTONEVENTINFN (IMAGEOBJ WINDOW SELECTION X + Y SELWINDOW TEXTSTREAM BUTTON OPERATION) EDITMOVESUBTREE (REG) \DSPOPERATION.DISPLAY (\INTERRUPTABLE) + FORMAT-PAGE (COLON ATSIGN PARMS) \SEQUIN.PROCESS (SI::*LOCKED-MONITOR* SI::*RESETFORMS* RETRANSQ) +CL:SIN (CL::RADIANS) \TEDIT.SETDEFAULT.FROM.SEL (TEXTOBJ) \PEEKSYSBUF (STREAM) SEDIT::CHECK-SELECTION-SHIFT + (SEDIT::CONTEXT) UNIX.PARAMS.CONFIRM (STREAM TYPE) CL::%%CAPTURE-COUNTERS-AFTER (CL:VECTOR) PPSOC ( +*STANDARD-OUTPUT* *PRINT-BASE*) CL:SORT (SEQUENCE PREDICATE KEY) \ENQUEUE (\INTERRUPTABLE) +COMPILER::STOP-UNBINDS-AT-FRAME-BOUNDARY (CONDITION) CL::ESTABLISH-SETFS-AND-OPTIMIZERS (CL::PS-NAME) +COMPILER::GENCODE (COMPILER::NODE COMPILER:CONTEXT) FB.COPY/RENAME.COMMAND (*UPPER-CASE-FILE-NAMES*) +PRINTCODE (*PRINT-BASE*) \PROCESS.EVENTFN (DEV) \SCALEDBITBLT.DISPLAY (CLIPPEDSOURCELEFT +CLIPPEDSOURCEBOTTOM) COMPILER::PEEPHOLE-OPTIMIZE-CODE (COMPILER::NEW-CODE COMPILER::TAG-DUPLICATED-P) +XCL::WHERE-IS-READ-FN (STREAM) TEDIT.FORMATPAGE (FORCENEXTPAGE LINES NCHNO) \TEXTINIT (FILE ACCESS +RECOG OTHERINFO FDEV XCL::RESULT) SI::%%STRUCTURE-DECLARE-DATATYPE (CL::FIELD-SPECIFICATIONS +CL::SUPERTYPE CL::DESCRIPTOR CL::REFERENCE-COUNTED-POINTERS) \BITBLT.DISPLAY (SOURCEIMAGEOPS) +ICMLARRAY.GETREGIONFN (FIXEDPOINT) GETPUP (\INTERRUPTABLE) \SPLITTREE (\INTERRUPTABLE ITEM#) +\GET.FILING.ATTRIBUTE (VALUE) \FB.HARDCOPY.TOFILE.EXTENSION (TYPE) OPENPUPSOCKET (\INTERRUPTABLE) +FIND-STACK-FRAME (TOKEN) COMPILER::COMPILE-FILE-SETF-SYMBOL-FUNCTION (COMPILER::COMPILER-CONTEXT +COMPILER::NAME COMPILER::DEFINITION) \FM.TOGGLE-SELECTEDFN (WINDOW BUTTONS) UNIXCHAT.OPEN (HOST) +FONTCLASSUNPARSE (DEVICE FONT NOERRORFLG) CL:LIST-LENGTH (CL::N CL::FAST-POINTER CL::SLOW-POINTER) +DODIRCOMMANDS (FILE NAMEPRINTED) PFI.NEW.LISTFILES1 (*UPPER-CASE-FILE-NAMES*) COMP.DECLARE (VTAG) +CL:STABLE-SORT (SEQUENCE PREDICATE KEY) SEDIT::SELECTION-DOWN (SEDIT::CONTEXT) \SETLOCALNSNUMBERS ( +TYPE) SEDIT::CHECK-SELECTION (SEDIT::START SEDIT::END SEDIT::SUBNODE) SEDIT::SPLIT-COMMENT ( +SEDIT::SPLIT-STRING) BROWSE/LAYOUT/HORIZ/COMPACTLY (RETURNTTC RETURNBTC) CL:STREAM-ELEMENT-TYPE ( +STREAM) CLISPDEC1 (FAULTFN TEM TYPE-IN?) FORMAT-FRESHLINE (COLON ATSIGN PARMS) LISPXUSE (LISPXHIST) +INSPECTW.REDISPLAY (*PRINT-LEVEL* *PRINT-LENGTH* PROPMENU VALUEMENU) MAKECREATE1 (BINDINGS VAR1 +SUBSTYPE) COMPSET (OLDO) \PFAddRootDirEntry (\INTERRUPTABLE) \PFCreateRootDirectory (\INTERRUPTABLE) +SEDIT::DEFAULT-COMPILE-FN (SEDIT::NAME TYPE SEDIT::BODY) \LFFindDirHole (STREAM \INTERRUPTABLE) +\KEYBOARDEVENTFN (FDEV EXTRA) CASE.PRETTYPRINT (FORMFLG) CL::%%MAKE-ACCESSOR-CLOSURE (CL::STRUCTURE-TYPE + CL::DESCRIPTOR) TWODINSPECT.REPAINTFN (*PRINT-LEVEL* *PRINT-LENGTH*) \DSPYPOSITION.DISPLAY ( +\INTERRUPTABLE) COMPILER::ALPHA-LITERAL (COMPILER::VALUE) \SEQUIN.CLOSE (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) \TEDIT.CREATEW.FROM.REGION (PWINDOW) \CHANGECHARSET.HCPYMODE (\INTERRUPTABLE) +\TEDIT.ITALIC.SEL.OFF (CHARCODE) \TEDIT.SHOWCARETLOOKS (SEL) \FM.TOGGLE-DOWNFN (BUTTONS) +COMPILER::ENV-ANALYZE-OPCODES (COMPILER::NODE) \UNWIND.UFN (\INTERRUPTABLE) +\TEDIT.APPLY.PAGEFORMATTING (OBJ) CL::ESTABLISH-PREDICATE (CL::PS-NAME) CL::TIME-CALL ( +CL::TIMED-FUNCTION) CL:STRING-RIGHT-TRIM (CHAR-BAG) \TEDIT.SPLITW (WINDOW Y) \DSPRIGHTMARGIN.DISPLAY ( +\INTERRUPTABLE) ICMLARRAY (ASTYPE) COMPILE! (LCFIL LAPFLG STRF SVFLG LSTFIL SPECVARS LOCALVARS NLAMA +NLAML LAMS LAMA NOFIXFNSLST NOFIXVARSLST) TOPW.BUTTONEVENTFN (*PRINT-LEVEL* *PRINT-LENGTH* W) +\TEDIT.CONVERT.FOREIGN.FORMAT (DEFAULTLOOKS DEFAULTPARALOOKS TTEXTOBJ SEL) CL:STRING-TRIM (CHAR-BAG) +CL:CERROR (CL::PROCEED-FORMAT-STRING XCL:*CURRENT-CONDITION*) \DSPLEFTMARGIN.DISPLAY (\INTERRUPTABLE) +TEDIT.PARSE.PAGEFRAMES (PARENT) PRINT-HISTORY (HELPCLOCK) \RPLPTR.UFN (\INTERRUPTABLE) +TEDIT.CURSORMOVEDFN (RIGHT) \TEDIT.FILL.IN.CHARLOOKS.MENU (PC OFILE CH TEXT) \DSPFONT.DISPLAY ( +\INTERRUPTABLE) PACKAGE-HASHTABLE-INSPECT-STOREFN (OBJECT PROPERTY VALUE) PROGV.PRETTYPRINT (LEFT) +HPRINT (DATATYPESEEN BACKREFS CELLCOUNT SIZE U *STANDARD-OUTPUT*) FORMAT-TERPRI (COLON ATSIGN PARMS) +PREPLOOP (LLIST) ADDFILE0 (X TEM) CL:STRING-LEFT-TRIM (CHAR-BAG) \DRAWCURVE.PRESS (DASHLST) MSPRGE ( +INCLISP) \XCCSBACKCCODE (STREAM BYTECOUNTVAR BYTECOUNTVAL) COMPILER::PROCESS-FORMS (COMPILER::*DEFERRED-FORMS* + COMPILER::*BLOCKS* COMPILER::*BLOCK-HASH-TABLE* COMPILER::*PREPROCESSING-PHASE* COMPILER::EOF-VALUE +COMPILER::FORM) \BSP.PREPARE.OUTPUT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PRINTPROG (PROGWORD) +ADDTOFILE (TEM) COMPILER::ALPHA-LET* (COMPILER::BINDINGS COMPILER::BODY) SEDIT::SHOW-CARET ( +SEDIT::COMPUTE-POS? SEDIT::SCROLL? SEDIT::CARET-POINT) CL::%%GET-TIMING-INFO (CL::TIMED-FUNCTION +CL::REPEAT) \MAIKO.CHECKSUM (BASE NWORDS INITSUM) MB.NWAYMENU.NEWBUTTON (NEWBUTTON) \RPLACA.UFN ( +\INTERRUPTABLE) \TEDIT.QUIT (W NOFORCE) \GENERATENOFILES (FDEV DESIREDPROPS OPTIONS) +CL::DEFSTRUCT-SHARED-PREDICATE-OPTIMIZER (CL::FORM CL::ENVIRONMENT CL::CONTEXT) SEDIT::DELETE-COMMENT +(SEDIT::SET-POINT?) \RPLACD.UFN (\INTERRUPTABLE) \DOVMEMFULLINTERRUPT (SI::*RESETFORMS* HELPFLAG) +TWODINSPECT.BUTTONEVENTFN (*PRINT-LEVEL* *PRINT-LENGTH*) \DELETECH (PCSOUT HI LO NPC) +FORMAT-JUSTIFICATION (COLON ATSIGN PARMS) SEDIT::STRUCTURE-FROM-SELECTION (SEDIT::END SEDIT::SUBNODES) + \CONS.UFN (\INTERRUPTABLE) SI::RESETUNWIND (NORMALP) ALISTS.WHENCHANGED (TYPE) SPP.CLEARATTENTION ( +CON FLG \INTERRUPTABLE) MSPRGMACRO (INCLISP EXPR) SEDIT::COMMENT-OUT-SELECTION (SEDIT::CHARCODE +SEDIT::POINT SEDIT::STR) CLISPFOR0 (DWIMIFYCHANGE DUMMYVARS I.S.OPRSLST) COMPILER::ALPHA-LET ( +COMPILER::BINDINGS COMPILER::BODY) TEDIT.PARALOOKS (PCNO) TEDIT.CREATEW (PWINDOW) \FLUSHVMOK? (TYPE +NOERROR) \XCCSPEEKCCODE (CSET CHAR) CL::GET-PS-FROM-ACCESSOR (CL::KEY) \DAYTIME0 (BOX) PRINTSQ ( +FORMFLG) UTF16BE.INCCODEFN (RAW) \NOFILESNEXTFILEFN (NAMEONLY) \DRAWCURVE.PRESS.LINE (DASHING) +TEDIT.SUBSTITUTE (OUTOFRANGEFLG SELCH# SELCHLIM SELPOINT) DBG::COLLECT-ACTIVE-ESCAPES (DBG::CONDITION) + CL:TAN (CL::RADIANS) UNIX-WRITE (CONN VAL) \4DISPLAYINIT (ACCESS RECOG OTHERINFO FDEV) EDITADDNODE ( +NEWPOS NODELABEL) INTCHAR (\INTERRUPTABLE) CL::%%CAPTURE-COUNTERS-BEFORE (CL:VECTOR) +SEDIT::FIND-NTH-STRUCTURE (SEDIT::CHARCODE CL:STRUCTURE SEDIT::N SEDIT::TOP) \CHECK.PQUEUE ( +SI::*RESETFORMS*) \NSFILING.AFTER.LOGIN (USER) NOT.TRACKCURSOR (DisplayStream Graph) +\PFPutRootDirectory (\INTERRUPTABLE) CL::GET-PS-FROM-PREDICATE (CL::KEY) \TEDIT.DEFAULTSSEL (TEXTOBJ) +WTFIX0 (FAULTX TAIL PARENT SUBPARENT ONLYSPELLFLG FAULTARGS FAULTAPPLYFLG FAULTPOS DWIMIFYFLG) +CL:PROCLAIM (CL::PROCLAMATION) GETGRIDBOXREGION (MINWIDTH MINHEIGHT FNARG) SEDIT::INSTALL-SPECIAL-FORMATS + (SEDIT::DEFAULT-AND-DATA-TOO?) XCL::GET-IMPLICIT-KEY-HASH (XCL::ITEM) CL:UNREAD-CHAR (CHARACTER) +CL::DEFSTRUCT-SHARED-ACCESSOR-OPTIMIZER (CL::FORM CL::ENVIRONMENT CL::CONTEXT) PACKFILENAME.STRING ( +STRUCTURE PROTECTION ACCOUNT PACKLIST) COMPILER::COMPILE-ONE-LAMBDA (COMPILER::*CONTEXT* +COMPILER::*AUTOMATIC-SPECIAL-DECLARATIONS*) TEDIT.BUILD.PCTB0 (SEL LINES CHLOOKSSEEN NEWPC +PARALOOKSSEEN CACHE TTEXTOBJ USER.CMFILE TSTREAM USERFILEFORMAT USERTEMP) FIND-HISTORY-EVENTS (TEM) +CLISPIFY2B (OPR0 CLTYP0) CL::CACHE-SETF-INFO (CL::PS-NAME) PFI.PRINT.BITMAP (RPTN) STRING (X) +\PROCESS.MAKEFRAME (\INTERRUPTABLE) SCROLLBYREPAINTFN (WHOLEHEIGHT WHOLEWIDTH) CL::%%RANGE-TYPE ( +CL::RANGE-LIST) TEDIT.SCAN.LINE (YBOT YBASE) \RPLCONS (\INTERRUPTABLE) TEDIT.PROMPTFLASH (PWINDOW) +MAKECREATE0 (HASHLINKS FIELDINFO) \PRINDATUM.TO.STRING (DUMMY) BROKENDEF (\INTERRUPTABLE) +CL:WRITE-TO-STRING (*PRINT-ESCAPE* *PRINT-RADIX* *PRINT-BASE* *PRINT-CIRCLE* *PRINT-PRETTY* +*PRINT-LEVEL* *PRINT-LENGTH* *PRINT-CASE* *PRINT-ARRAY* *PRINT-GENSYM*) +CL::COMPLETE-ARRAY-TYPE-DIMENSIONS (CL::DIMENSIONS) \SPLITPIECE (PC CH TEXTOBJ PC#) +\MAIKO.10MB.RESTART.ETHER (NDB) CL::COMPLETE-META-EXPRESSION-DEFAULTS (CL::LIST-TYPE) LISPXSPACES (Z) +\ENVCALL.UFN (\INTERRUPTABLE) CL::GET-SLOT-DESCRIPTOR-FROM-PS (CL::PS) CL:NRECONC (CL::TAIL CL::RESULT + CL::NEXT-CELL) FORK-UNIX (STR) FB (PATTERN) XCL:UNBREAK-FUNCTION (XCL::NO-ERROR) +COMPILE-FILE-DECLARE%: (FORM COMPILED.FILE EVAL@COMPILE DOCOPY DEFER) COMPILER::ALPHA-LAMBDA-LIST ( +COMPILER::ARG-LIST COMPILER::STATE COMPILER::REQUIRED COMPILER::OPTIONAL CL:KEYWORD) \INSERTTREE ( +\INTERRUPTABLE INCHNO AFTERFLG NODE) ICONW.PRINT-JUSTIFIED (WIDTH) \LFMakeDirHole (\INTERRUPTABLE) +TEDIT.FORMAT.HARDCOPY (FORCENEXTPAGE TEXTLEN LINE LINES NCHNO) TWODINSPECT.COPYBUTTONFN (*PRINT-LEVEL* + *PRINT-LENGTH*) \FIXDLINES (SEL) SEDIT::SUBSTITUTE-SUBSTRUCTURE (SEDIT::CONTEXT SEDIT::OLD SEDIT::NEW + SEDIT::SCOPE SEDIT::REMOVE?) XCL::PUT-IMPLICIT-KEY-HASH (XCL::BASE XCL::KEY-ACCESSOR \INTERRUPTABLE) +SI::SUB-DATATYPE-P (CL::TYPE1 CL::TYPE2) \FM.MOMENTARY-SELECTEDFN (BUTTONS) COMPILER::ENV-ANALYZE-LITERAL + (COMPILER::NODE) SPYOBJ.COPYIN (A B C) VOLUMESIZE (recompute) PRIN1 (*PRINT-ESCAPE* *PRINT-RADIX* +*PRINT-LEVEL* *PRINT-LENGTH* *PRINT-CASE*) SEDIT::SELECTION-UP (SEDIT::CONTEXT) +CL::%%STATS-OBJECT-DIFFERENCE (CL::BEFORE-DATA-COUNTERS CL::AFTER-DATA-COUNTERS) FONTSET ( +CHANGE-WINDOWS? OLDDEFAULT) \8DISPLAYINIT (ACCESS RECOG OTHERINFO FDEV) DBG::KEYLIST-FROM-ESCAPE-LIST +(DBG::ESCAPES) CONTROL-T (\INTERRUPTABLE KEYBOARDDELTA) COMPILER::ALPHA-LABELS (COMPILER::BODY +COMPILER::STRUCTS) \PRESSCURVE2 (EXTRANEOUS) RAID (MESS1 MESS2 FLG) PFI.PRINT.ENVIRONMENT (*PACKAGE*) +COMPILE1 (FREEVARS) SEDIT::SET-SELECTION-ME (SEDIT::CONTEXT) \ABORT.BULK.DATA (EPKT) +PACKAGE-INSPECT-STOREFN (OBJECT PROPERTY VALUE) TTYIN.READ?=ARGS (\BUFFER \ENDBUFFER) +CL::ESTABLISH-ACCESSORS (CL::PS-NAME CL::STRUCTURE-TYPE CL::ACCESSOR CL::EXPORTNAME) \UTF8.BACKCHARFN +(STREAM BYTECOUNTVAR BYTECOUNTVAL) COMPILER::CLOSURE-ANNOTATE-OPCODES (COMPILER::NODE COMPILER::IN-LOOP-P +) \TEDIT.DELETE (SELOFF HEIGHTCHANGED NLINE1 CRFLAG NEXTLINE NL OLINE DX OCHLIM OXLIM OLHEIGHT +OLASCENT OLDESCENT DY PREVLINE OCR\END SAVEWIDTH IMAGECACHE) \CORE.CLOSEFILE (\INTERRUPTABLE) ALLCALLS + (ONLYRELS FNNAME EACHTIME VARS TOPVARS INCLISP ERRORS PARENT NOSPELLFLG) HRULE.WHENOPERATEDONFN (A B +C) CL::DEFAULT-STRUCTURE-PRINTER (CL::PRINT-LEVEL TYPE CL::LABEL CL::FIRST-TIME?) MAPFILES (PAIR) +\NSFILING.GETFILE (NAME) COMPILE (NLAMA NLAML LAMS LAMA NOFIXFNSLST NOFIXVARSLST SPECVARS LOCALVARS) +MB.NWAYBUTTON.SELFN (TEXTOBJ OBJBOX CH) \MAIKO.ETHER-INTERRUPT (\INTERRUPTABLE SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) COMPILER::COMPILE-AND-DUMP (COMPILER::*CURRENT-BLOCK*) \MAPPNAME.INTERNAL ( +\THISFILELINELENGTH) \CORE.UPDATEOF (\INTERRUPTABLE) RIGHTW.ADJUSTSELECTION (*PRINT-LEVEL* +*PRINT-LENGTH*) SEDIT::START-COMMENT (SEDIT::CHARCODE) PUTCHARBITMAP (FONT NEWCHARDESCENT) +\BITBLT.HCPYMODE (DESTINATIONLEFT DESTINATIONBOTTOM) MASTERSCOPE1 (*PACKAGE*) FILES.PUTDEF (TYPE) +SPAWN.MOUSE (\INTERRUPTABLE) \PFTransferPage (\INTERRUPTABLE) VARSBOUNDINFORM (MACRO) +CL::STRUCTURE-SLOT-NAMES (CL::STRUCTURE-NAME) CL:MAKE-HASH-TABLE (CL::SIZE CL::REHASH-SIZE +CL::REHASH-THRESHOLD) SEDIT::SUBSTITUTE-STRUCTURE (SEDIT::CONTEXT SEDIT::OLD SEDIT::NEW SEDIT::SCOPE +SEDIT::REMOVE?) FW-INIT-MENUS (C) FIND.SYMBOL (*) CHECK/MENU/IMAGE (WINDOW) GETDEF (TEM) +\LFMakeDirEntry (\INTERRUPTABLE) VARS.PUTDEF (TYPE REASON) \SCALEDBITBLT.IP (SOURCELEFT SOURCEBOTTOM +SOURCETYPE OPERATION TEXTURE) \SHOWTEXT (WREG) TWODINSPECT.DEFAULT.VALUECOMMANDFN (DATUM *) \CURVE2 ( +\CURX \CURY \OLDX \OLDY \OLDERX \OLDERY LKNOT DASHON DASHTAIL DASHCNT) XCL::%%DEFINE-TYPE-GETDEF ( +XCL::OPTIONS) TEDIT.INSERT (LINE DS LINES) SEDIT::SUBSTITUTE-OBJ (SEDIT::CHARCODE SEDIT::OLDSTR +SEDIT::NEWSTR SEDIT::PROMPTWINDOW TYPE) \CORE.GETINFOBLOCK (NEWSTREAM) \DRAWPOLYGON.IP (LASTPT) +CL::%%COMPLEX-NSUBST (CL::TREE) \CORE.DIRECTORYNAMEP (DEV) \VAMGetVAMPageFor (\INTERRUPTABLE) +CL::%%SIMPLE-NSUBST (CL::TREE) BKSYSBUF (DUMMY) SKOR0 (TAIL ALTFLG) MSJOINDETS (C) \WRITEMAP (VP RP +FLAGS) BCOMPL2 (GLOBALVARS RETFNS BLKLIBRARY NOLINKFNS LINKFNS SPECVARS LOCALVARS BLKAPPLYFNS +LOCALFREEVARS BNDLEV) MAKE-PAD-SEGS (SPACES PADDINGS) CL::%%NSUBST-IF-NOT (CL::TREE) \MAPPNAME ( +*PRINT-LEVEL* *PRINT-LENGTH* *PACKAGE* *PRINT-ESCAPE* *PRINT-BASE* *PRINT-RADIX*) \CORE.GENERATEFILES +(DESIREDPROPS OPTIONS) \PROCESS.GO.TO.SLEEP (\INTERRUPTABLE TAIL) DBG::MENU-FROM-ESCAPE-LIST ( +DBG::ESCAPES) CL::DEFINE-ACCESSORS (CL::NAME CL::STRUCTURE-TYPE CL::ACCESSOR CL::EXPORTNAME) +CL::%%NSUBST-IF (CL::TREE) \MAIKO.10MBTURNONETHER (SMASHSTATE NEWSTATE) DBG::ESCAPE-FROM-DEBUGGER ( +DBG::NAME-OR-NUMBER DBG::KEYS) \LEAF.REOPENFILE (OTHERINFO) FB.GET.SORT.MENU (ATTR) PRIN3 ( +*PRINT-ESCAPE* *PRINT-RADIX* *PRINT-LEVEL* *PRINT-LENGTH* *PRINT-CASE* \THISFILELINELENGTH) +XCL::%%DEFINE-TYPE-DELDEF (XCL::DEFN) FORK-SHELL (TERMTYPE) FB.EDITCOMMAND (*UPPER-CASE-FILE-NAMES*) +CL:GENSYM (CL::X) COMPILE-IN-CORE (DONT-TRANSFER-PUTD SI::*RESETFORMS* LCFIL LAPFLG STRF SVFLG LSTFIL +SPECVARS LOCALVARS FREEVARS) COMP.VALN (COMPILE.CONTEXT) UTF8.PEEKCCODEFN (RAW) LISPXGETINPUT (EVENT) +RESET.INTERRUPTS (\INTERRUPTABLE) TEDIT.BUILD.PCTB1 (SEL LINES CHLOOKSSEEN NEWPC PARALOOKSSEEN CACHE +CACHE? TTEXTOBJ USER.CMFILE TSTREAM USERFILEFORMAT USERTEMP) SEDIT::PENDING-DELETE (SEDIT::POINT +SEDIT::SELECTION) CHAT.STARTUP (STATE) FONTPROFILE.ADDDEVICE (OLDSPEC) \CORE.NEXTFILEFN (SCRATCHLIST) +\MISC1.UFN (ARG) PRINT-BITMAPS-NICELY (BASE QUAD-CHARS-PER-ROW CHARS-SO-FAR) \24DISPLAYINIT (ACCESS +RECOG OTHERINFO FDEV) COMPILER::COMPILE-AND-DUMP-1 (COMPILER::KIND COMPILER::*CURRENT-FUNCTION* +COMPILER::LAP-FN COMPILER::DCODE) \SPAWN.CHAT (LOGOPTION) RIGHTW.BUTTONEVENTFN (*PRINT-LEVEL* +*PRINT-LENGTH* W) TEDIT.BUILD.PCTB2 (SEL LINES CHLOOKSSEEN NEWPC PARALOOKSSEEN CACHE CACHE? TTEXTOBJ +USER.CMFILE TSTREAM USERFILEFORMAT USERTEMP EXISTINGCHARLOOKS EXLOOK EXISTINGFMTSPECS) +XCL::%%DEFINE-TYPE-PUTDEF (XCL::REASON XCL::DEFN-WITHOUT-COMMENTS) CREATE-STRUCTURE (CL::STRUCTURE-FORM +) SEDIT::UPDATE-TITLE (SEDIT::ALWAYS? SEDIT::TITLE-INFO SEDIT::CHANGED-STRUCTURE SEDIT::NAME) +MAKE-UNICODE-TRANSLATION-TABLES (LTORVAR RTOLVAR) WARNUSER (TEM) MB.THREESTATE.DISPLAY (MODE) +SEDIT::SEARCH-OBJ-BACKWARDS (SEDIT::CONTEXT SEDIT::SEARCH-STRING SEDIT::WRAP?) \IRM.GET.KEYWORDS ( +QUIETFLG) BRHL/LAYOUT/DAUGHTERS (DELTA) \PSW.SELECTED (BUTTON) COMPILER::MAKE-LAP-VAR (COMPILER::ARG-P +) WTFIX (FAULTX FAULTARGS FAULTAPPLYFLG FAULTPOS FAULTFN EXPR VARS TAIL PARENT SUBPARENT FORMSFLG +ONLYSPELLFLG DWIMIFYFLG TEM) COMPILER::ALPHA-IF (COMPILER::*CONTEXT*) COMPILER::MAKE-LAP-VAR-REFERENCE + (COMPILER::VAR) XCL::%%DEFINE-TYPE-FILEGETDEF (XCL::NAME TYPE XCL::OPTIONS) +TWODINSPECT.DEFAULT.TITLECOMMANDFN (*) XCL::GET-WHERE-IS-ENTRIES (XCL::NAME XCL::DATABASE) +CL::%%COMPLEX-NSUBLIS (CL::TAIL) \TEDIT.APPLY.CHARLOOKS (OBJ SCRATCHSEL OFILE CH SIZE SUPER SUB NEXTB +BUTTON TEXT OFFSET) \RETCALL (\INTERRUPTABLE) \TTYIN.RPEOF (STREAM) CL::%%SIMPLE-NSUBLIS (CL::TAIL) +COMP.VAL1 (COMPILE.CONTEXT) DBG::INVOKE-ESCAPE-FROM-MENU (CASE) BRKDWNCOMPILE2 (SI::*RESETFORMS* LCFIL + LAPFLG STRF SVFLG LSTFIL SPECVARS LOCALVARS) \PRINT-USING-ADDRESS (CPL) GNCCODE (\INTERRUPTABLE) +SEDIT::COPY-SELECTION-COMMENT (SEDIT::DELETE?) MSONPATH (AVOIDING NOTRACE) LISPX/1 (VARS) GLCCODE ( +\INTERRUPTABLE) PACKAGE-INSPECT-FETCHFN (OBJECT PROPERTY) PRINT-CIRCLE-LOOKUP (TABLEENTRY) +SPYOBJ.DISPLAY (DATA) \PRINTFPTOVP (*PRINT-BASE*) NCREATE2 (\INTERRUPTABLE P) \DASHINGCONVERT.HCPYMODE + (DD) \FTP.RENAMEFILE (OLDNAME) \BLTSHADE.PSC (OPERATION) CLISPIFY (OPR0 CLTYP0 BROADSCOPE SUBPARENT +SEG LST CLISPISTATE) DINFO.UPDATE.FROM.GRAPH (GRAPH.WINDOW) DWIMIFY (SI::*RESETFORMS*) TEDIT ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) SEDIT::CLOSE-LIST (SEDIT::CONTEXT SEDIT::CHARCODE SEDIT::PNODE) + \VAMInit (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) FILEPKGCOMS.PUTDEF (TYPE REASON) \INSTANCEP.UFN ( +TYPEN N) GATHEREXPORTS (FROMFILES FLG) XCL::INTERESTING-FRAME-P (XCL::INTERPFLG) HRULE.COPYFN ( +FROMSTREAM) PRINT-CIRCLE-SCAN (OBJECT) LISPDIRECTORYP (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +DINFO.LAYOUTGRAPH (WINDOW) CL:MEMBER-IF-NOT (CL::PREDICATE LIST CL::KEY) EDITFINDP (N CHANGEFLG +LASTAIL TOPLVL FF) TEDIT.PUT (TEDIT.PUT.FINISHEDFORMS TEDIT.GET.FINISHEDFORMS OUTPUT.FILE.WRITTEN +OCURSOR PROPS WINDOW \INTERRUPTABLE) EDITBM (BMWINTERIOR) CL:MEMBER-IF (CL::PREDICATE LIST CL::KEY) +TEDIT.SELECT.LINE.SCANNER (WWIDTH) LOADFNS (*PACKAGE* PRLST MAPUPDATED) CL:CONCATENATE (SEQUENCES CNT +RESULT) %%MAKE-STRING-ARRAY-FAT (\INTERRUPTABLE) \MAKEPCTB (MINLEN) UPDATE-WHO-LINE (WINDOW +WHO-LINE-ENTRIES ALWAYS?) \BITMAPSIZE.PRESS (STREAM) DEDITE (WHERE *EDITMODE*) %%MAKE-ARRAY-WRITEABLE +(BASE-ARRAY NEW-BASE OFFSET TOTAL-SIZE TYPE-NUMBER \INTERRUPTABLE) EVAL-INPUT (TODO ENV) +\CREATE.TTY.OUTCHARFN (STREAM) COMPILER::COLLECT-CODE (COMPILER::*CODE*) CL:VECTORP (VECTOR) +ZEROD.FETCHFN (PROP) ATAN (ANS) SPELLFILE (DIRHOSTS) SEDIT::SHIFT-BLOCK (SEDIT::ASCENT SEDIT::OLD-Y +SEDIT::DELTA SEDIT::H SEDIT::W) %%EVERY-SINGLE (PREDICATE FIRST-SEQUENCE) FB.PROMPTW.FORMAT ( +FORMAT-STRING ARGS *PRINT-CASE* *PRINT-BASE* WINDOW) \BITBLT.IP (SOURCELEFT SOURCEBOTTOM SOURCETYPE +OPERATION TEXTURE) ADDTOVAR (DFNFLG) LOOKUP-SYMBOL (*) TEDIT.GET.OBJECT0 (NAMELEN) +\CREATE-REAL-CHARSET.DISPLAY (NEWFONT XLATEDFAM) CL:NUNION (CL::LIST1 CL::TEST CL::TEST-NOT CL::KEY) +SYMBOL-INSPECT-FETCHFN (OBJECT PROPERTY) TTYIN.PRINTARGS (SPACE REMARGS) \TEDIT.SHOW.PAGEFORMATTING ( +OBJ SEL W) PROCESS.BACKTRACE (PLVLFILEFLG) COMPILER::CLOSURE-ANNOTATE-LITERAL (COMPILER::NODE +COMPILER::IN-LOOP-P) CL:UNION (CL::LIST1 CL::KEY CL::LOOP-TEST) CL:EQUAL (CL::X CL::Y) SEDIT::SEARCH-OBJ + (SEDIT::CONTEXT SEDIT::SEARCH-STRING SEDIT::WRAP?) SEDIT::SELECT-NODE (SEDIT::SET-POINT? SEDIT::WHERE +) SEDIT::CFV-CLISP (SEDIT::SPACE-WIDTH) CL:NINTERSECTION (CL::LIST1 CL::LIST2 CL::TEST CL::TEST-NOT +CL::KEY) COMPILER::ENV-ANALYZE-GO (COMPILER::NODE) LEAF.ASSURE.FINISHED (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) \TEXTMENU.TOGGLE.DISPLAY (MODE) GENSYM (NEW? \INTERRUPTABLE) FB.EXPUNGECOMMAND (KEY +MENU *UPPER-CASE-FILE-NAMES* FILE) BMOBJ.GETFN5 (TEXTSTREAM) CL:INTERSECTION (CL::LIST1 CL::LIST2 +CL::KEY CL::RESULT-TAIL CL::LOOP-TEST) CL::%%PRINT-TIMING-INFO (CL::DATA-TYPES CL::DATA-COUNTER +CL::RESULT CL::RESULT-TAIL CL::CNT CL::TYPE-NAME) TEDIT.PUT.PCTB2 (OCURSOR POBJ OFILELEN OLDPARALOOKS +CHARLOOKSLST PARALOOKSLST) HCOPYALL1 (NH) BLTPATTERN.GENERIC (TW TH) \BUILDSLUGCSINFO (DEVICE +IMAGEWIDTHS) CL:NSET-DIFFERENCE (CL::LIST1 CL::LIST2 CL::TEST CL::TEST-NOT CL::KEY) \UNQUEUE ( +\INTERRUPTABLE) CHAT.RECONNECT (FN) ZEROD.STOREFN (PROP) CL:NAMESTRING (CL::HOST CL::DEVICE CL:DIRECTORY + CL::NAME TYPE CL::VERSION CL::RESULT) \SFMAKEBOLD (CSINFO) CL:SET-DIFFERENCE (CL::LIST1 CL::LIST2 +CL::KEY CL::RESULT-TAIL CL::LOOP-TEST) CREATETEXTUREFROMBITMAP (TEXTHEIGHT) +COMPILER::COLLECT-NONLOCAL-VAR-EFFECTS (COMPILER::NODE) CLEAR-CLISPARRAY (NAME TYPE) DIRECTORY ( +DEFAULTEXT DEFAULTVERS LASTHOST&DIR) AS.CHANGE.OWN.PASSWORDS (NEWPASSWORD CONVGOOK) CL:NSET-EXCLUSIVE-OR + (CL::LIST1 CL::LIST2 CL::KEY CL::LIST1-HANDLE CL::LIST1-PREVIOUS CL::LOOP-TEST) PROPS.WHENCHANGED ( +TYPE) CLISPATOM1 (NOSAVEFLG) CL:SET-EXCLUSIVE-OR (CL::LIST1 CL::LIST2 CL::KEY CL::RESULT-TAIL +CL::LOOP-TEST) FORMAT-DO-ITERATION (START END MAX-ITER COLON AT-LEAST-ONCE-P *FORMAT-ARGUMENTS*) +EDITF2 (LISPXHIST) DBG::PRINT-BACKTRACE (DBG::LINK *PRINT-LEVEL* *PRINT-LENGTH*) CL:LENGTH (SEQUENCE) +DINFO.HISTORIC.UPDATE (BUTTONS) TEDIT.UNDO.MOVE (TEXTOBJ FIRSTPIECE TOSEL) COMPILER::SET-UP-BLOCK-DECLS + (COMPILER::DECLS) \TEDIT.NEUTRALIZE.CHARLOOKS (OBJ MAINTEXT PC SCRATCHSEL OFILE CH NEWLOOKS NEXTB +BUTTON TEXT OFFSET) PFI.OUTCHARFN (STREAM CHAR) \BSP.PREPARE.INPUT (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) ATTACHEDWINDOWS (REALCOM) CL:SUBSETP (CL::LIST1 CL::LIST2 CL::KEY CL::LOOP-TEST) +SCANDECLARECOLON (ADR) SEDIT::DISINTEGRATE-CONTEXT (SEDIT::CONTEXT) EXPANDBM (XSTEPS YSTEPS) +\INSERTPIECE (NEW OLD TEXTOBJ DONTUPDATECH#S PC# NEW-PREVLEN PREV) OLD.FIND.SYMBOL (\INTERRUPTABLE) +MB.NB.SIZEFN (STREAM LINEHEIGHT X) \MKATOM (\INTERRUPTABLE) SYMBOL-INSPECT-STOREFN (OBJECT PROPERTY +VALUE) CL::ACCESSOR-BODY (CL::SLOT CL::ARGUMENT CL::STRUCTURE-TYPE CL::NO-TYPE-CHECK) \CREATE.SYMBOL ( +PB CPP) CL:MAKE-LIST (CL::INITIAL-ELEMENT CL::RESULT) \GCSCANSTACK (ORIG) SEDIT::INSERT-NULL-LIST ( +SEDIT::CONTEXT) \CORE.SETFILEPTR (\INTERRUPTABLE) APPENDTOVAR (DFNFLG) BCOMPL1A (FILEPKGFLG) DWIMIFY1 +(CLISPCONTEXT FORMSFLG) \TEDIT.SHOW.CHARLOOKS (OBJ SCRATCHSEL OFILE CH NEXTB BUTTON TEXT OFFSET) +\CORE.BACKFILEPTR (\INTERRUPTABLE) CL::CACHE-PREDICATE-INFO (CL::PS) CL:COMPILE (COMPILER::*ENVIRONMENT* + LOCALFREEVARS COMPILER::*CONSTANTS-HASH-TABLE* COMPILER::*PROCESSED-FUNCTIONS* COMPILER::*UNKNOWN-FUNCTIONS* + COMPILER::*CURRENT-FUNCTION* COMPILER::*INPUT-STREAM* COMPILER::*LAP-FLG*) \FIRSTNODE (COUNT) +FORMAT-CONDITION (PARMS) CL:NREVERSE (SEQUENCE) SEDIT::FIND-SUBSTRUCTURE-BACKWARDS (SEDIT::STR SEDIT::SCOPE + SEDIT::END) \CORE.SETEOFPTR (\INTERRUPTABLE) CL:FUNCALL (CL::FN CL::ARGS) \SEARCHFONTFILES (ROTATION +FILING.ENUEMRATION.DEPTH) CL:ASSOC-IF (CL::PREDICATE CL::A-LIST CL::KEY) \DECUSECOUNT (TEMP) +\LEAF.FLUSH.CACHE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) RECORDACCESS (DATUM DECLST EXPR FAULTFN +DWIMIFYFLG VARS RECORDEXPRESSION BINDINGS) COMPILER::ALPHA-FUNCTIONAL-FORM (COMPILER::*CONTEXT*) +FB.EDITCOMMAND.ONEFILE (BROWSER FILE OPTION ITEM MENU) FORMAT-ITERATION (COLON ATSIGN PARMS) +\TEDIT.PARSE.CHARLOOKS.MENU (CH SUB) \COPYDATATYPE (\INTERRUPTABLE) BAKTRACE (*PRINT-LEVEL* +*PRINT-LENGTH* X Y Z PLVLFILEFLG) SI::CANONICALIZE-ADVICE-WHERE-SPEC (SI::SPEC) UNPACKFILENAME.STRING +(SUBDIREND USEDSEMI) \INITATOMPAGE (ATM) CL:NTHCDR (CL::TAIL) CONDITIONS:MUFFLE-WARNING (CONDITIONS::R +) \VFMInit (SI::*LOCKED-MONITOR* SI::*RESETFORMS* \INTERRUPTABLE) \CORE.GETNEXTBUFFER (\INTERRUPTABLE) + BRKDWN1 (X) \BLTSHADE.PRESS (DESTREGION) \BACKPEEKBIN (\INTERRUPTABLE) CL:ASSOC-IF-NOT (CL::PREDICATE + CL::A-LIST CL::KEY) \MOVEFRAME (AX) EDITH (SI::*RESETFORMS* EDITHIST) WINDOWWORLD (\INTERRUPTABLE) +PRINTBINDINGS (NAME) \BLTSHADE.HCPYMODE (DESTINATIONLEFT DESTINATIONBOTTOM) \ALLOCBLOCK ( +\INTERRUPTABLE) CL::%%SIMPLE-RASSOC (CL::ITEM CL::A-LIST) EDIT* (COM) TB.BROWSER.BUSY (BROWSER) DO?CMD + (\BUFFER \?PARAMS \STARTED START STUFF) \COURIER.GETDEF (OPTIONS) COMPILER::ALPHA-FUNCTION (COMPILER:CONTEXT +) TEDIT.GET.CHARLOOKS0 (FONT STR) FB.MAYBE.INSERT.FILE (*UPPER-CASE-FILE-NAMES*) CONDITIONS:CONTINUE ( +CONDITIONS::R) EDITDEFAULT (LISPXHIST) UnixPrint (FILE COPIES NSIDES TYPE) MB.NB.DISPLAYFN (MODE) +SIMPLE-FORMAT (STREAM ARGS) BLTPATTERN (W H RX RW) \FONTFILENAME.OLD (*PRINT-BASE*) CL::%%SET-NTH ( +LIST CL::NEW-VALUE) CL::%%SQRT-FLOAT (CL::FX) EDLOC (LCFLG FINDFLAG COMS) \CREATECOREDEVICE (ACCESS +RECOG PARAMETERS FDEV) \NSFILING.NEXTFILE (SCRATCHLIST RESETSTATE) BYTECOMPILE2 (BLKFLG) \FONTFILENAME + (*PRINT-BASE* *PRINT-RADIX*) CL::%%COMPLEX-RASSOC (CL::ITEM CL::A-LIST CL::TEST CL::TEST-NOT-P CL::KEY +) MB.NB.WHENOPERATEDFN (FN) TWODINSPECT.SETELT (*PRINT-LEVEL* *PRINT-LENGTH*) \LFDirectoryScrambled ( +\INTERRUPTABLE) COMPILER::RESOLVE-VARIABLE-REFERENCE (COMPILER::CURRENT-ENV CL:SYMBOL) MAPATOMS ( +RESULT) CL:RASSOC-IF-NOT (CL::PREDICATE CL::A-LIST CL::KEY) SEDIT::GETKEY (C SEDIT::POINT SEDIT::WINDOW +) EDITRAN (L) GRAPHERCOPYBUTTONEVENTFN (WINDOW) \VFMGet (\INTERRUPTABLE) %%EXTEND-ARRAY ( +\INTERRUPTABLE) PUTCLIPBOARD (OBJECT PRINTFN) CL:RASSOC-IF (CL::PREDICATE CL::A-LIST CL::KEY) +CONDITIONS:COMPUTE-RESTARTS (CONDITIONS::FOUND CONDITIONS:RESTART) EDITTO (COM) CL:REVERSE (SEQUENCE) +CL::%%SQRT-COMPLEX (CL::R CL::I CL::C CL::D CL::E CL::ANSWER) \COURIER.HANDLE.BULKDATA (BULKDATAFN +NOERRORFLG) PURGEDSKDIRECTORY (SI::*LOCKED-MONITOR* SI::*RESETFORMS* device \INTERRUPTABLE) +CL::%%DO-TRANSLATE (CL::END-TEST CL::BODY CL::ENV CL::VARS-AND-INITIAL-VALUES CL::TAG) +CL:PRIN1-TO-STRING (*PRINT-ESCAPE*) \INIT.KEYBOARD.STREAM (X) ONEDINSPECTW.CREATE (*PRINT-LEVEL* +*PRINT-LENGTH*) COMPILE.FILE.DEFINEQ (LCFIL) %%ARRAY-ELEMENT-INITIALIZE (ARRAY INITIAL-ELEMENT) +\CREATECHARSET.PSC (FAMILY SIZE FACE ROTATION DEVICE CHARSET FONTDESC NOSLUG?) CL::TYPE-EXPANDER ( +DFNFLG FILEPKGFLG) DEFAULT.EDITDEF (EDITCOMS OPTIONS FILE DEF) \SCALEDBITBLT.PSC (TEXTURE +CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM) \SMASHBSPSTREAM (\INTERRUPTABLE) COMPILER::ALPHA-FLET ( +COMPILER::BINDINGS COMPILER::BODY COMPILER::*ENVIRONMENT*) %%ALTER-AS-DISPLACED-TO-BASE-ARRAY ( +\INTERRUPTABLE) \PAPERSIZE.IP (IPSTREAM) MBUTTON.FIND.NEXT.FIELD (PCNO PCNO1 CH DEPTH) UNSAVEFNS ( +SI::*RESETFORMS*) EDRPT (COPYFLG SI::*RESETFORMS*) \NSPRINT.WATCHDOG (ID PRINTER JOBNAME MSG STATUS +TAIL) TEDITFROMBRAVO (TEDITWINDOW NONFEATURES) \HANDLE.RAW.PUP (\INTERRUPTABLE) BKSYSBUF.GENERAL ( +SI::*RESETFORMS* *PRINT-BASE* *PRINT-RADIX*) WRITE-UNICODE-INCLUDED (CHARSETS) INSPECT/AS/RECORD (ITEM +) DO-HISTORY-SEARCH (TEM PRED) CL:COPY-SEQ (LENGTH) \FINDFONTFILE (ROTATION DEVICE) +SEDIT::FIND-SUBSTRUCTURE (SEDIT::STR SEDIT::SCOPE SEDIT::START) ONEDINSPECT.REPAINTFN (*PRINT-LEVEL* +*PRINT-LENGTH*) %%ALTER-AS-DISPLACED-ARRAY (\INTERRUPTABLE) BMOBJ.IMAGEBOXFN (CURRENT.X RIGHT.MARGIN) +SEDIT::NORMALIZE-SELECTION (SEDIT::REGION) \SCALEDBITBLT.PRESS (SOURCELEFT SOURCEBOTTOM SOURCETYPE +OPERATION TEXTURE) CONDITIONS:FIND-RESTART (CONDITIONS::IDENTIFIER) SEDIT::SELECTED-FN-NAME (SEDIT::NODE + CL:STRUCTURE) CL:SUBSEQ (START) EDITCOMA (COPYFLG UNDOLST1 PRETTYFLG *READTABLE*) SEDIT:RESET-FORMATS + (SEDIT::SMASH-USER-REDEFINITIONS?) COMPILE1A (NOSPELLFLG FILEPKGFLG) \CREATECHARSET.PRESS (FAMILY +SIZE FACE ROTATION DEVICE FONTDESC NOSLUG?) \MAIKO.10MBWATCHER (\INTERRUPTABLE) +\TEDIT.GET.SINGLE.CHARLOOKS (FILE) EDITCOML (UNFIND %#1 %#2 %#3 ORIGFLG) \LEAF.BREAKCONNECTION (HOST) +\VAMCheckEndOfVol (\INTERRUPTABLE) \POLYSHADE.BLT (nlist ix tx by) SIMPLE-CONDITION-FORMAT-ARGUMENTS ( +CONDITION) %%FAT-STRING-ARRAY-P (ARRAY) %%TOTAL-SIZE (DIMS) WHEN-WHO-LINE-SELECTED-FN (WINDOW) +TERM.ERASE.IN.LINE (CHAT.STATE PARAM) HRULE.GETFN (TEXTSTREAM) SCALEBM (XSTEPS YSTEPS POWER) +FUNCTIONSMSGETDEF (TYPE) \PUTD (\INTERRUPTABLE) BLOCKCOMPILE (NLAMA NLAML LAMS LAMA NOFIXFNSLST +NOFIXVARSLST EXPRSLST LOCALVARS SPECVARS) UNDOEDITCOM (L) SEDIT::STRINGIFY-ATOM (SEDIT::ENVIRONMENT) +PRINTERS.WHENSELECTEDFN (MENU BUTTON DEFAULTPRINTER) COPYGRAPH (L) SIMPLE-CONDITION-FORMAT-STRING ( +CONDITION) TEDIT.PROMPTPRINT (PWINDOW) \FM.HIGHLIGHTITEM (BUTTONS) \INIT-MISCN-TABLE (OP-NUMBER +OP-LENGTH) MSJOIN (C) SEDIT::UNDO-LIST-REPLACE (SEDIT::LAST-INSERTED-SUBNODE) BUTTONPANEL/SELECTION/FN + (BUTTON) UTF8.INCCODEFN (BYTECOUNTVAR BYTECOUNTVAL RAW BYTE2 BYTE3 BYTE4 COUNT) SI::GET-CACHE-CLOSURE + (\INTERRUPTABLE) IDIFFERENCE (X Y) CL::%%MAPCAR-SINGLE (CL::FN LIST) %%SETELT (NEWVAL) +ONEDINSPECT.BUTTONEVENTFN (*PRINT-LEVEL* *PRINT-LENGTH*) \CREATEPIECEORSTREAM (START END) IGREATERP (X + Y) \BULK.DATA.STREAM (STREAM MODE PROGRAM PROCEDURE PGMDEF PROCDEF NOERRORFLG INTERNALFLG) +COMPILE.CHECK.ARGTYPE (BLKFLG) CL::STEP-PRINT-VALUES (CL::VALUE-LIST) IQUOTIENT (X Y) FIXPRINTIN ( +LISPXHIST) PFI.AFTER.NEW.PAGE (*PRINT-BASE*) SEDIT::COMPUTE-SELECTION-POSITION-DEFAULT (SEDIT::CONTEXT +) \MAIKO.10MBSENDPACKET (\INTERRUPTABLE) CL::%%MAPLIST-SINGLE (CL::FN LIST) \PFFindPageAddr ( +\INTERRUPTABLE) CL::%%= (CL::X CL::Y) CL::%%MAPCAR-MULTIPLE (CL::FN CL::ARG-SLICE) +SEDIT::FIND-STRUCTURE-BACKWARDS (SEDIT::STR SEDIT::SCOPE SEDIT::END) MB.MARGINBAR.SELFN (SEL ORIGX +ORIGY) CL:FORMAT (*FORMAT-ORIGINAL-ARGUMENTS* *FORMAT-ARGUMENTS* *FORMAT-CONTROL-STRING* +*STANDARD-OUTPUT*) COMPILER::ENV-ANALYZE (COMPILER::TREE) \LFFindDirectoryVol (defaultVol) +FB.COMPILECOMMAND (KEY ITEM MENU) \FONTFILENAME.NEW (NAME *PRINT-BASE*) CL::%%MAPLIST-MULTIPLE (CL::FN + CL::ARG-SLICE) CL::TYPE-EXPAND-STRUCTURE (CL::TYPE-FORM) SEDIT::SPLIT-LITATOM (SEDIT::SUFFIX) +ONEDINSPECT.COPYBUTTONFN (*PRINT-LEVEL* *PRINT-LENGTH*) SEDIT::LINEARIZE-DOTLIST (SEDIT::NODE SEDIT::INDEX +) CL:BIT-AND (BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) FASL::FASL-EXTENDED (STREAM FASL::OP) DIFFERENCE (X Y) + SPY.BUTTON (W) TWODINSPECTW.CREATE (*PRINT-LEVEL* *PRINT-LENGTH*) DEBUGGER (BRKEXP +XCL::WAS-IN-THE-DEBUGGER DBG::*IN-THE-DEBUGGER* \LINEBUF.OFD *STANDARD-INPUT* *STANDARD-OUTPUT* +\INBQUOTE \#DISPLAYLINES \CURRENTDISPLAYLINE \PRIMTERMTABLE \PRIMTERMSA \INTERRUPTABLE !VALUE +BRKVALUES *EVALHOOK* *APPLYHOOK* *READ-SUPPRESS*) CL:GETF (CL::PLACE CL::INDICATOR CL::DEFAULT) +CL::STEP-PRINT (*PRINT-LEVEL* *PRINT-LENGTH*) GRAPHOBJ.IMAGEBOXFN (BMW BMH) SEDIT::VERIFY-STRUCTURE ( +SEDIT::CHARCODE SI::*LOCKED-MONITOR* SI::*RESETFORMS*) EDITBELOW (LCFLG N) CL::%%MAPC-SINGLE (CL::FN +LIST) EXEC-EVAL (FORM ENVIRONMENT *CURRENT-EXEC-TYPE* LISPXHIST HELPCLOCK) CL:GET-PROPERTIES (CL::PLACE + CL::INDICATOR-LIST) TEDIT.OBJECT.CHANGED (LINES CHANGED CH# PCNO) \CLEARPCTB (PCTB) +REDISPLAY-WHO-LINE (WINDOW) ADD-EXEC (XCL::PROFILE EXEC XCL::ID XCL::WINDOW) HISTORYFIND1 (PRED) +%%DO-LOGICAL-OP (OP \INTERRUPTABLE) \DELETETREE (\INTERRUPTABLE INCHNO AFTERFLG) CL::%%MAPC-MULTIPLE ( +CL::FN CL::ARG-SLICE) EXEC-VALUE-OF (EVENT-SPEC) PRETTYFILEINDEX (*PRINT-ARRAY* XCL:*PRINT-STRUCTURE* +*PRINT-LEVEL* *PRINT-LENGTH* *UPPER-CASE-FILE-NAMES* PRETTYFLG *PRINT-PRETTY-BITMAPS* *PFI-ITEM* +*PFI-FNSLST* *PFI-FUNNY-CHARS* *PFI-BITMAP-BASELINE* *PFI-PENDING-COMMENTS* MULTIFILEINDEX INDICES +LASTPAGE) ENTER-DEBUGGER-P (N POS) CL::%%PRINT-RANDOM-STATE (XCL:*PRINT-STRUCTURE* *PRINT-ARRAY*) +CL:BIT-ANDC1 (BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) FASL::TABLE-STATS (FASL::ITEMS) CL::%%MAPL-SINGLE ( +CL::FN LIST) SEDIT::SET-SELECTION-STRING (SEDIT::INDEX) SPYOBJ.IMAGEBOX (DATA) \LFCloseDevice ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) FB.OPERATE.ON.FILES (FILEENTRY) TEDIT.GET.OBJECT1 (NAMELEN) +SEDIT::CFV-COMMENT (SEDIT::ENVIRONMENT CL:FORMAT) MSPATHS (TO AVOIDING SEPARATE MARKING TABS LL +BELOWCNT LINENUM SI::*RESETFORMS*) EDIT.RI (L) COMP.EVQ (SI::*RESETFORMS*) TEDIT.PUT.PCTB (OCURSOR +POBJ OFILELEN OLDPARALOOKS *READTABLE* *PRINT-BASE* CHARLOOKSLST PARALOOKSLST) +SEDIT::QUOTE-CURRENT-SELECTION (SEDIT::CHARCODE SEDIT::QUOTE-TYPE SEDIT::POINT SEDIT::NODE +SEDIT::QUOTE-NODE) CL::%%LIST-MAP-OPTIMIZER (CL::TAIL-P CL::FIRST-LIST-RETURNED-P CL::FIRST-LIST +CL::OTHER-LISTS CL::OTHER-SUBLISTS) \READSTRIKEFONTFILE (FAMILY SIZE FACE) TEDIT.SUBLOOKS (NEWLOOKS) +CHANGEVAR (TYPE REASON) \MEDW.GETSCREENREGION (SCREEN NEWREGIONFNARG NEWMOUSEX NEWMOUSEY) +\BITBLT.PRESS (SOURCELEFT SOURCEBOTTOM SOURCETYPE OPERATION TEXTURE) \TEDIT.CHANGE.LOOKS (DY) +\READACFONTFILE (FAMILY SIZE FACE FONTDESC FBBBITMAP) CL::%%MAPL-MULTIPLE (CL::FN CL::ARG-SLICE) +\VFMReadNext (\INTERRUPTABLE) \CURSORUP (\INTERRUPTABLE) UNDOPRINT (EVENT) PFCOPYBYTES (FLG) +CL::%%MAPCAN-SINGLE (CL::FN LIST) VARIABLESMSGETDEF (TYPE SPECVARP) \CURSORDOWN (\INTERRUPTABLE) +TEDIT.UNDO.PARALOOKS (LEN FIRSTPIECE PCTB CHLIM) ASSURE.PUP.READY (SI::*LOCKED-MONITOR* SI::*RESETFORMS* +) CL:BIT-EQV (BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) FASL::FASL-END-OF-BLOCK (FASL::OP) +FORMAT-SEMICOLON-ERROR (COLON ATSIGN PARAMS) TEDIT.NEW.FIND (TEXTOBJ TARGETSTRING START# END# +WILDCARDS?) PF* (SI::*RESETFORMS*) SI::ADD-OLD-STYLE-ADVICE (SI::NAME SI::ADVICE) CL:BIT-NAND ( +BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) \FONTRESETCHARWIDTHS (charoffset) \FM.CGETITEMPROP (ITEM) +\DISCARDFRAME (\INTERRUPTABLE) BREAK-FUNCTION (*PRINT-CASE*) ASSERT-FAIL (STRING ARGS) +CL::%%MAPCAN-MULTIPLE (CL::FN CL::ARG-SLICE) EDIT.BITMAP.REAL (NAME TEMP X Y) +FORMAT-UNTAGGED-CONDITION (TEST) \MEDW.CARET.SHOW (SCREEN) CL:BIT-NOR (BIT-ARRAY1 BIT-ARRAY2 +BIT-RESULT) \SFMAKEROTATEDFONT (FONTDESC ROTATION) CL::%%MAPCON-SINGLE (CL::FN LIST) +MBUTTON.FIND.BUTTON (STARTPCNO) \DELETEPIECE (PCTB PC# PCNODE) COMPILER::ANALYZE-TREE (COMPILER::*REDO-FLAG* +) TEDIT.SELECTED.PIECES (CROSSCOPY LEN INSPC INSPC# OPLEN EVENT REPLACING INSERTCH# OBJ COPYFN +UNDOCHAIN) DEFAULTWHENSELECTEDFN (FROMMENU BUTTON) SEDIT::FIND-STRUCTURE (SEDIT::STR SEDIT::SCOPE +SEDIT::START) SPYOBJ.GET (TEXTSTREAM) \SFROTATEFONTCHARACTERS (CHARBITMAP ROTATION) DEFMACRO-ARG-TEST +(ARGS) SCROLL.HANDLER (TIMEINTIMER) CL:BIT-ANDC2 (BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) UNDOLISPX3 ( +SI::*RESETFORMS*) CL::%%MAPCON-MULTIPLE (CL::FN CL::ARG-SLICE) CHANGETRAN1 (NOTRANFLG SPECIALFIELDS +FIELDNAMES SUBSTYPE BINDINGS) FASL::DEFINE-OPCODE-RANGE (FASL::FIRST-OPCODE FASL::RANGE FASL::OFFSET +FASL::TABLE PACKAGE FASL::PNAME) FB.COPY/RENAME.ONE (FBROWSER ITEM OLDNAME NEWNAME CMD MOVEFN) +CL:BIT-ORC1 (BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) CL::%%EVERY-MAP-OPTIMIZER (LIST CL::SOME-P CL::NEGATE-P +) CLIPBOARD-PASTE-STREAM (s) CL::TYPE-EXPAND-NAMED-STRUCTURE (CL::TYPE-FORM) \BASEBYTES.IO.INIT (FILE +ACCESS RECOG OTHERINFO FDEV I) MBUTTON.CHANGENAME (BOX BITMAP DS) CL:COPY-SYMBOL (CL::COPY-PROPS) +FB.LOADCOMMAND (KEY ITEM MENU) SEDIT::BUILD-NODE (SEDIT::TRUST-SUBNODES) BCOMPL.BODY (NOBLOCKSFLG +SPECVARS LOCALVARS CHANGES OTHERS FIRST BLOCKS BLKFNS TEM DESTINATIONENV DFNFLG) +TWODINSPECT.SELECTCOLUMNPROP (*PRINT-LEVEL* *PRINT-LENGTH*) FASL:DUMP-FUNCALL (FASL::HANDLE CL:FUNCTION +) \SFFIXOFFSETSAFTERROTATION (FONTDESC ROTATION) CLEARSTK (\INTERRUPTABLE) CHAT.BIN (STATE) +TWODINSPECT.RESHAPEFN (SELECTION) CHANGEI.S. (TYPE) FORMAT-ESCAPE (COLON ATSIGN PARMS) \DSPSCALE2.PSC +(OSCALE NSCALE) ONEDINSPECT.DEFAULT.VALUECOMMANDFN (DATUM *) RECURSIVELY-ANALYZE (%%MIN-ARGS +%%ARG-COUNT %%UNBOUNDED-ARG-COUNT %%ENV-ARG-NAME %%CTX-ARG-NAME) ICMLARRAY.VALUECOMMANDFN (*) +CL::STEP-FORM (CL::FORM CL::ENVIRONMENT CL::*STEP-INDENTATION-LEVEL*) SEDIT::SET-SELECTION-LITATOM ( +SEDIT::INDEX) RETURN (FORM) DINFO.UPDATE.FROM.MENU (BUTTONS) MULTIFILEINDEX (*UPPER-CASE-FILE-NAMES*) +NUMBERPAD.HELDFN (MENU BUTTON) \KEYBOARDON (NOCHECK) CL:BIT-XOR (BIT-ARRAY1 BIT-ARRAY2 BIT-RESULT) +IMPORTFILE (FILEPKGFLG DFNFLG) FASL:CLOSE-FASL-HANDLE (FASL::CLOSE-OPTIONS FASL::ABORT) FASL:PROCESS-BLOCK + (STREAM FASL::ITEM-FN FASL::OPTABLE) CLOSERTPSOCKET (DONTSEND SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +\MAIKO.10MBSTARTDRIVER (RESTARTFLG CSB) \BASEBYTES.OPENFN (RECOG OTHERINFO FDEV) FASL::DO-OP ( +FASL::*BLOCK-LEVEL*) \USER-SUBR-UFN (INDEX) DWIMIFYREC (EXPR VARS DWIMIFYFLG) CL:BIT-IOR (BIT-ARRAY1 +BIT-ARRAY2 BIT-RESULT) COMP.UNWIND-PROTECT (FORM) CL::PREDICATE-BODY (CL::ARG CL::PREDICATE TYPE) +\10MB.NOTESTAT (STATUS BUF USE) EVAL (\INTERNAL) \SETUPSTACK1 (RPTN) CL:BIT-ORC2 (BIT-ARRAY1 +BIT-ARRAY2 BIT-RESULT) \OPENLEAFCONNECTION (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \10MBRAWENCAPSULATE + (NDB) COMPILER::CLOSURE-ANNOTATE-GO (COMPILER::NODE COMPILER::IN-LOOP-P) FINDPCNODE (PCTB) +\MEDW.GETBOXSCREENPOSITION (SCREEN) \SETUPGETCH (PCNO FPOS OFFST) GRAPHOBJ.PUTFN (ALIGN) COMP.CATCH ( +FORM) SEDIT::MUTATE (SEDIT::POINT SEDIT::RESULT) COMPLEX-NSUBSTITUTE-IF-NOT (NEWITEM TEST SEQUENCE +START END FROM-END KEY COUNT) \MAKEBASEBYTESTREAM (\INTERRUPTABLE) TEDIT.UNDO.LOOKS (LEN FIRSTPIECE +PCTB CHLIM) IMPORTFILESCAN (FILE RETURNFLG) COMPERRM (PLVLFILEFLG) %%FAST-COPY-BASE (\INTERRUPTABLE) +\TEDIT.INSERT.PIECES (INSPC# PSTR PCCOUNT) CLOCKDIFFERENCE (\INTERRUPTABLE) \TEDIT.GET.CHARLOOKS1 ( +FONT STR NAMELEN STYLESTR USERSTR) \CHANGECHARSET.IP (IPDATA CHARSET) \BITMAPSIZE.IP (STREAM) +FASL::CONVERT-FASL-DATE (TEMP-DATE DATE-RESULT) FASL:DUMP-VALUE (FASL::HANDLE FASL::VALUE FASL::REMEMBER + FASL::INDEX) COMPLEX-NSUBSTITUTE (NEWITEM OLDITEM SEQUENCE START END FROM-END KEY COUNT TEST +TEST-NOT-P) LOADFNSCAN (ADR) TEDIT.REDO.LOOKS (CH#) FASL:VALUE-DUMPABLE-P (FASL::OBJ) FILL-ARRAY ( +VALUE TOTAL-SIZE TYPE-NUMBER) \MACPEEKCCODEFN (COUNTP) ABS (CL:NUMBER) \PUPGATELISTENER (BASE) +DBG::STACK-FRAME-PROPERTIES (DBG::LOTS? DBG::TOTAL-SLOTS DBG::NUM-ARGS DBG::ARGLIST) CLISPATOM2A ( +DWIMIFYCHANGE) APROPOS-SEARCH (CL:SYMBOL BASE OFFSET LENGTH FATP) SIMPLE-COMPARE (SEQUENCE1 SEQUENCE2) + \REPEATEDLYEVALQT (\INTERRUPTABLE) ANALYZE-REST (WHOLE DOC PARSE-BODY-RESULT) CL::STEP-EVAL (CL::FORM + CL::ENVIRONMENT) SEDIT::NEW-BLOCK (SEDIT::X) XCL:PACKAGE-PREFIX (PACKAGE) XCL::ADJUST-IMPLICIT-KEY-HASH + (\INTERRUPTABLE) SPY.PRINT (FILE RDTBL) RECORDECL1 (DECLARATIONCHAIN) CL:DENOMINATOR (CL:RATIONAL) +UNDONLSETQ1 (LISPXHIST) CL::ASSIGN-FIELD-DESCRIPTORS (CL::FIELD-DESCRIPTORS) FASL:SKIP-TEXT (STREAM) +%%MAKE-DISPLACED-ARRAY (DISPLACED-TO-TYPENUMBER) FORMAT-CAPITALIZATION (COLON ATSIGN PARMS) SEDIT::FIND-OBJ + (SEDIT::CHARCODE) \TEXTMENU.START (CH#1) \TFBRAVO.PARSE.PROFILE.PARA (PARA) TB.ITEM.DELETED? (BROWSER +) COMPILER::CHECK-FOR-UNKNOWN-FUNCTION (COMPILER::NAME) FLOAT (CL::OTHER) TTCOMPLETEWORD (*PACKAGE*) +CREATEDSKDIRECTORY (SI::*LOCKED-MONITOR* SI::*RESETFORMS* markerPage \INTERRUPTABLE) \COPYSYS0SUBR ( +FID) MSVERB (C) TTYINEDIT (\INITPOS \RMARG) ONEDINSPECT.DEFAULT.TITLECOMMANDFN (*) SEDIT::MARKASCHANGEDFN + (SEDIT::REASON) CL:SBIT (SIMPLE-BIT-ARRAY INDICES) TEDIT.SINGLE.PAGEFORMAT (PAGE#S? PX PY PFONT PQUAD + LEFT RIGHT TOP BOTTOM COLS COLWIDTH INTERCOL HEADINGS UNITS PAGEPROPS PAPERSIZE) PUSH-KEYWORD-BINDING + (CL:KEYWORD DEFAULT SUPPLIED-P-VAR REST-VAR TEMP-VAR) \STRINGSTREAM.INIT (FILE ACCESS RECOG OTHERINFO + FDEV) TEDIT.RAW.INCLUDE (NPC) SEDIT::LINE-FINISHED (SEDIT::FORCE) CL:WARN (XCL:*CURRENT-CONDITION*) +SHOWBITMAP1.IP (BMBASE XWORDS) NUMBER.READER.HANDLER (BUTTON) SI::ADVICE-FILE-DEFINITIONS (SI::NAMES +SI::READVISE? SI::REAL-NAMES) SEDIT::SET-SELECTION-QUOTE (SEDIT::OFFSET) COMPLEX-NSUBSTITUTE-IF ( +NEWITEM TEST SEQUENCE START END FROM-END KEY COUNT) \TEDIT.RESHAPEFN (BITS TEXTSTREAM CH# WWIDTH) +DEFAULTSUBITEMFN (MENU) FASL:READ-TEXT (STREAM) SIMPLE-ARRAY-P (ARRAY) PP* (**COMMENT**FLG +*STANDARD-OUTPUT*) DBG::BACKTRACE-ITEM-SELECTED (DBG::BUTTON DBG::OLDITEM DBG::FRAMEWINDOW) +XCL:COMPILE-FORM (COMPILER::FORM COMPILER::*CONTEXT* COMPILER::*ENVIRONMENT* COMPILER::*CONSTANTS-HASH-TABLE* + COMPILER::*PROCESSED-FUNCTIONS* COMPILER::*UNKNOWN-FUNCTIONS* COMPILER::*LAP-FLG* SPECVARS LOCALVARS +LOCALFREEVARS GLOBALVARS) PFI.MAKE.LPT.STREAM (DEFREGION) CL:SIMPLE-STRING-P (STRING) DSPDESTINATION ( +\INTERRUPTABLE) IRM.CREF.BUTTONEVENTFN (SELECTION RELX RELY TEXTSTREAM BUTTON) CL::%%EXPT-FLOAT-INTEGER + (CL::FBASE CL::TOTAL) \BSP.DEFAULT.ERROR.HANDLER (%#MYHANDLE#) DO.EDIT.COMMAND (\BUFFER) +MBUTTON.CREATE (BOX BITMAP DS) \MEDW.GETSCREENPOSITION (SCREEN) TEDIT.SELECTALL (STREAM TEXTOBJ SEL +TEXTSTREAM) SEDIT::SUBNODE-CHANGED-ROOT (SEDIT::NODE SEDIT::SUBNODE SEDIT::FN SEDIT::EXTRA-ARGS) +XCL:COMPILE-DEFINER (COMPILER::LAP COMPILER::*ENVIRONMENT* COMPILER::*OUTSTANDING-LOOSE-FORMS* +COMPILER::*EVAL-WHEN-COMPILE*) SETSCREENCOLOR (FLG) SPYOBJ.BUTTON (OBJ WINDOWSTREAM SEL RELX RELY +WINDOW TEXT BUTTON) RECORDECLBLOCK (ORIGINAL-SPEC) CL:NUMERATOR (CL:RATIONAL) \GC.MODIFY.BIGREFCNT ( +CNT) RANDSET (\OVERFLOW) \MAKE.PROCESS0 (*CURRENT-PROCESS* HELPFLAG \CURRENTDISPLAYLINE \#DISPLAYLINES + *READTABLE* \PRIMTERMTABLE \PRIMTERMSA \TTYWINDOW READBUF RESETSTATE) CHECKSAMEDIR ( +*UPPER-CASE-FILE-NAMES* HOST DIR) CL::PROCESS-TYPE (CL::NAME TYPE CL::PREDICATE-BODY) +SCAVENGEDSKDIRECTORY (SI::*LOCKED-MONITOR* SI::*RESETFORMS* DIRECTORY \INTERRUPTABLE fileID) +CHAT.TYPESCRIPT1 (OLDFILE) FNTH (X0) FORMAT-DOLLARS (COLON ATSIGN PARMS) +SEDIT::FIND-NODE-SUBSTRUCTURE-BACKWARDS (SEDIT::STR SEDIT::STRLEN SEDIT::START SEDIT::CONTINUATION?) +SEDIT::MENU-SELECTEDFN (SEDIT::BUTTONS) TWODINSPECT.SELECTROWPROP (*PRINT-LEVEL* *PRINT-LENGTH*) IDATE + (DLS) \SETDAYTIME0 (\INTERRUPTABLE) \TEDIT.CUMULATE.EVENTS (PIECES-TO-SAVE?) TEDIT.UNPARSE.PAGEFORMAT + (PINFO) \VFMGenerateFileIDs (SI::*LOCKED-MONITOR* SI::*RESETFORMS* \INTERRUPTABLE) +\TEDIT.BOLD.SEL.OFF (CHARCODE) \BLTSHADE.BITMAP (\INTERRUPTABLE) FORMAT-FIND-COMMAND (COMMAND-LIST +START) \BITBLT.BITMAP (\INTERRUPTABLE) SEDIT::FIND-NODE-SUBSTRUCTURE (SEDIT::STR SEDIT::STRLEN +SEDIT::CONTINUATION? SEDIT::LASTINDEX) WALK-TEMPLATE (XCL::FORM XCL::CONTEXT) RESETFORM ( +SI::*RESETFORMS*) \LISPFINISH (DUMMY) FORMAT-GENERAL-AUX (CL:NUMBER W D E K OVF PAD MARKER ATSIGN) +CL::%%EXPT-INTEGER (CL::TOTAL) SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::CONTEXT SEDIT::OFFSET SEDIT::ITEM + SEDIT::LAST-SUBNODE-INDEX SEDIT::TAKE-NEXT SEDIT::LINEAR-ITEM-NODE) \FTP.RECOGNIZEFILE (DEV PROP) +\LFCloseFile (SI::*LOCKED-MONITOR* SI::*RESETFORMS* \INTERRUPTABLE) SEDIT::SELECT-SEGMENT-LITATOM ( +SEDIT::CONTEXT SEDIT::SUBNODE SEDIT::INDEX) SEDIT::STRINGIFY-GAP (SEDIT::NODE SEDIT::ENVIRONMENT) +\HARDRESET-CLEANUP1 (\INTERRUPTABLE) TEDIT.COPY.PARALOOKS (SOURCE) HVBAKREAD (RPTVAL) +SI::BQUOTE-EXPANDER (SI::*BACKQUOTE-LEVEL*) IMAGEFNSCREATE (CLASSNAME) SEDIT::SET-SELECTION-LIST ( +SEDIT::INDEX SEDIT::OFFSET) XCL:UNADVISE-FUNCTION (XCL::NO-ERROR) \SECONDSCLOCKGREATERP ( +\INTERRUPTABLE) RDTBL\NONOTHERCODES (VAL KEY) \FORMATLINE (FONTWIDTHS PCNO) \CLOCKGREATERP ( +\INTERRUPTABLE) DBG::BACKTRACE-MENU-BUTTONEVENTFN (DBG::MENU) SI::ADVICE-NEWCOM (TYPE) +TB.ITEM.SELECTED? (BROWSER) \INTERNALTOTOPW (\INTERRUPTABLE) WRITE-STRING* (STRING-LENGTH +CHARS-TO-PRINT STRM \THISFILELINELENGTH) SI::BQUOTE-PROCESS-LIST (SI::ITEM SI::TAIL) SPP.FORCEOUTPUT ( +\INTERRUPTABLE) CHAT.LOGIN (CHATSTATE) COMPILER::ALPHA-ARGUMENT-FORM (COMPILER::*CONTEXT*) +\HARDRESET-CLEANUP-RUN (CLEANUPFN) CLOCK0 (BOX) \D0.STARTIO (BITS) LOADFNS-FINDFILE (DWIMFLG +FILEPKGFLG) FASL:BEGIN-BLOCK (FASL::HANDLE) SUB-FORMAT (*FORMAT-INDEX* *FORMAT-LENGTH*) \MACINCCODEFN +(BYTECOUNTVAR BYTECOUNTVAL) QUOTE.WRAPPER (E FILE) TEDIT.REDO.PARALOOKS (CH#) RESETVAR (SI::*RESETFORMS* +) SHOWDISPLAY (BASE RASTERWIDTH) ASET (NEWVALUE ARRAY) CL:CHAR-BIT (CHAR) BQUOTE.WRAPPER (FILE) +\MOREVMEMFILE (FILEPAGE) RESETVARS (SI::*RESETFORMS*) DSPBOUT (CHARCODE) STRING-ARRAY-P (ARRAY) +SI::COMMA-ERROR-EXPANDER (SI::ENV) \MAIKO.DAYTIME (BOX) \WRITERAWPBI (PBI) PRINT-READER-ENVIRONMENT ( +*PACKAGE* *PRINT-BASE* PKG) FASL:DUMP-FUNCTION-DEF (FASL::HANDLE FASL::DCODE FASL::NAME) +COMPILER::CLOSURE-ANNOTATE (COMPILER::IN-LOOP-P) CL:CHAR-DOWNCASE (CHAR) \DISPLAYLINE (STREAM +\PCHARSLEFT \PSTRING \PFILE FONT) \MAIKO.DAYTIME0 (BOX) \STRINGWIDTH.HCPYDISPLAYAUX (DUMMY) +STACK.FULL.WARNING (HELPFLAG) \GENERIC.RENAMEFILE (NEWDEVICE) SEDIT::ATOM-CHANGE-RELINEARIZE ( +SEDIT::BROKEN?) COMPLEX-COMPARE-FORWARD (SEQUENCE1 SEQUENCE2 KEY TEST TEST-NOT-P) \MAIKO.CLOCK0 (BOX) +SIMPLE.FINDFILE (DUMMY) SEDIT::SCAN-STRING (SEDIT::MULTI-ESC-CHAR) XCL:TRACE-FUNCTION (XCL::REBREAK? +*PRINT-CASE*) \MAIKO.CLOCK (N BOX) XCL::IMPLICIT-KEY-REHASH (XCL::LAST-ADDRESS XCL::KEY-ACCESSOR +XCL::NULL-SLOT-INDICATOR XCL::VALUE) \ALLOCMINIMUMSIZES (EDGE) FUNCTION.WRAPPER (E FILE) CLISPATOM1A ( +NOSAVEFLG) \NSRANDOM.DESTROY.STREAM (\INTERRUPTABLE) \PUPLEVEL1STATE (FLG) CL:CHAR-UPCASE (CHAR) +\COPYSYS (SYSNAME DONTSAVE) NIL +NLAMBDA \LEAF.STRIP.QUOTES (CHARCODE) SEDIT::STRINGWIDTH (CHARCODE) SEDIT::PARSE-STRING-INTO-WORDS ( +CHARCODE) PRETTYCOM1 (CL:UNWIND-PROTECT) \UFS.RECOGNIZE.FILE (CL:UNWIND-PROTECT) \INTERNAL/SETPASSWORD + (CL:UNWIND-PROTECT) SEDIT::CREATE-ENVIRONMENTS (CHARCODE) \DSPFONT.HCPYMODE (CHARCODE) FB.DATE ( +DATEFORMAT CHARCODE) FB.UPDATEBROWSERITEMS (CHARCODE) \DSPFONT.PRESS (CHARCODE) \TEXTDSPXPOSITION ( +CHARCODE) TTBIN (CHARCODE) \UFSCloseDevice (CL:UNWIND-PROTECT) GC-FILING-DIRECTORY (CHARCODE) +\DSPSPACEFACTOR.IP (CHARCODE) \PEEKCCODE (CHARCODE) READ-UNICODE-MAPPING (CHARCODE) +\TFBRAVO.READ.PARALOOKS (CHARCODE) \TEDIT.CONVERT.TO.FORMATTED (CHARCODE) \BACKFORMAT (CHARCODE) +PACKAGE-ENABLE (CHARCODE RPAQ?) \TFBRAVO.READ.USER.CM (CHARCODE) GENSYM? (CHARCODE) \TTYIN.RPEOF ( +CHARCODE) \NSFILING.ADDQUOTES (CHARCODE) DIRECTORY.MATCH1 (CHARCODE) EDITDATE (DATEFORMAT) TTYIN.READ +(CHARCODE) TTPRIN1 (CHARCODE) \LOGIN.READ (CHARCODE) LISPINTERRUPTS.PASTE (CHARCODE) +\TEDIT.HARDCOPY.FORMATLINE (CHARCODE) UnixShellQuote (CHARCODE) \STREAMCHARWIDTH (CHARCODE) +TTYIN.SETUP (CHARCODE) \SPP.ESTABLISH (CL:UNWIND-PROTECT) CLISPIFY1 (CHARCODE) EDITCALLERS (CHARCODE) +BRKDWNCOMPILE2 (CL:UNWIND-PROTECT) CHARACTER (CHARCODE) DWIMIFY (CL:UNWIND-PROTECT) \PROCESS.EVAL1 ( +CL:UNWIND-PROTECT) \TEDIT.FORMATTABS (CHARCODE) SEDIT::ATOM-CHAR-ESCAPED (CHARCODE) PFI.PROCESS.FILE ( +CHARCODE) TTDOTABS (CHARCODE) \LFGetFileInfo (CL:UNWIND-PROTECT) TTYIN.FINISH (CHARCODE) TTSKREAD ( +CHARCODE) \LEAF.RECONNECT (CL:UNWIND-PROTECT) \ROUTINGTABLE.INFOHOOK (CHARCODE) TEDIT (CL:UNWIND-PROTECT +) \UPF.NEXTPOS (CHARCODE) LASTCHPOS (CHARCODE) BREAK.MSG.INTO.LINES (CHARCODE) \MEDW.BLTCHAR (CHARCODE +) \VAMInit (CL:UNWIND-PROTECT) L-CASE (CHARCODE) ADJUSTLINE (CHARCODE) \FAX.PARSE.NAME (CHARCODE) +\UFS.REMOVE.HOST.FIELD (CHARCODE) \NSFILING.GENERATEFILES (CHARCODE) U-CASEP (CHARCODE) +XCL::WHERE-IS-NOTICE (CL:UNWIND-PROTECT) \ECHOCHAR (CHARCODE) TTYIN1 (CHARCODE) WTFIX1 ( +CL:UNWIND-PROTECT) \VFMGetPageGroup (CL:UNWIND-PROTECT) ADDNAKEDCHAR (CHARCODE) \FTP.PRINTPLIST ( +CHARCODE) \NSFILING.COPY/RENAME (CL:UNWIND-PROTECT) U-CASE (CHARCODE) INTERPRESS.OUTCHARFN (CHARCODE) +\LFScavFileName (CHARCODE) \LFUnpackName (CHARCODE) \SPP.CLEANUP (CL:UNWIND-PROTECT) +\TFBRAVO.FIND.LAST.TRAILER (CHARCODE) \LFGetFileName (CL:UNWIND-PROTECT) TEDIT.SEL.AS.STRING (CHARCODE +) NEW/FN (CHARCODE) \GETCHAR (CHARCODE) FIX-SUBR-NAME (CHARCODE) \PROCESS.APPLY1 (CL:UNWIND-PROTECT) +TTYIN.BALANCE (CHARCODE) \FILLBUFFER (CHARCODE) APROPOS (CHARCODE) SEDIT::SETUP-WINDOW-AND-PROCESS ( +CHARCODE) \UFS.DIRECTORY.NAME (CL:UNWIND-PROTECT) LISPDIRECTORYP (CL:UNWIND-PROTECT) CHNGNM ( +CL:UNWIND-PROTECT) CLDISABLE (CL:UNWIND-PROTECT) ASKUSER (CHARCODE) PRINT-LISP-INFORMATION ( +CL:UNWIND-PROTECT) AUTOCR? (CHARCODE) DSPBACKUP (CHARCODE) GENSYM (CHARCODE) \GETSPP (CL:UNWIND-PROTECT +) PUTSEQUIN (CL:UNWIND-PROTECT) PROMPTFORWORD (CHARCODE) \IFSERRORSTRING (CHARCODE) AT.END.OF.TEXT ( +CHARCODE) \TERMINATESPP (CL:UNWIND-PROTECT) \CCLOSURE.DEFPRINT (CHARCODE) \TFBRAVO.READ.CHARLOOKS ( +CHARCODE) ONEDINSPECT.PROPWIDTH (CHARCODE) PFI.PRINT.INDICES (CHARCODE) LEAF.ASSURE.FINISHED ( +CL:UNWIND-PROTECT) \VFMInit (CL:UNWIND-PROTECT) UNIX.SETDISPLAYTYPE (CHARCODE) \FTP.PACKFILENAME ( +CHARCODE) \CHARWIDTH.PRESS (CHARCODE) PPSPP (CL:UNWIND-PROTECT) \TFBRAVO.PARSE.PARA (CHARCODE) +\STRINGWIDTH.HDCPYDISPLAY (CHARCODE) \LEAF.GETFILE (CL:UNWIND-PROTECT) D-ASSEM:ASSEMBLE-FUNCTION ( +CL:UNWIND-PROTECT) STRINGWIDTH (CHARCODE) \SLOWBLTCHAR (CHARCODE) READHASHMACRO (CHARCODE) +\BSP.PREPARE.INPUT (CL:UNWIND-PROTECT) TTADDTAB (CHARCODE) \DSPSPACEFACTOR.PRESS (CHARCODE) +\DSPPRINTCR/LF (CHARCODE) BIGNUM.DEFPRINT (CHARCODE) TEDIT.DEFAULT.MENUFN (CHARCODE) SEPRCASE ( +CHARCODE) OLD.FIND.SYMBOL (CHARCODE) MAKEFILES (CL:UNWIND-PROTECT) \MKATOM (CHARCODE) \BN.TH2D ( +CHARCODE) \IDATESCANTOKEN (CHARCODE) PPT (CL:UNWIND-PROTECT) \DSCCOUT (CHARCODE) HEXSTRING (CHARCODE) +CHAT.PROMPT.FOR.INPUT (CHARCODE) BYTEBLOCKCOMPILE2 (CL:UNWIND-PROTECT) COMPILER::TEST-META-EVAL ( +CL:UNWIND-PROTECT) BKSYSBUF.GENERAL (CL:UNWIND-PROTECT) FIXSPELL (CHARCODE CL:UNWIND-PROTECT) +HOSTNAMEP (CHARCODE) \PARSE.NUMBER (CHARCODE) \VFMDeletePageGroup (CL:UNWIND-PROTECT) TTYINWORDRDTBL ( +CHARCODE) \VAMRecomputeFreePageCount (CL:UNWIND-PROTECT) \TEXTRIGHTMARGIN (CHARCODE) ASKUSEREXPLAIN ( +CHARCODE) \LOAD-STREAM (CHARCODE) \ORIGREADTABLE (CHARCODE) SEDIT::STRING-OFFSET (CHARCODE) CLEANUP ( +LISTFILES) CLISPATOM0 (CL:UNWIND-PROTECT) \LEAF.FLUSH.CACHE (CL:UNWIND-PROTECT) PURGEDSKDIRECTORY ( +CL:UNWIND-PROTECT) \TEXTSTREAMBOUT (CHARCODE) \FTP.UNPACKFILENAME (CHARCODE) \TEDIT.READTABLE ( +CHARCODE) INITATOMS (CHARCODE) READNUMBERINBASE (CHARCODE) \TEDITOUTCHARFN (CHARCODE) \RPLRIGHT ( +CHARCODE) PFI.PRINT.MULTI.INDEX (DATEFORMAT) EDITH (CL:UNWIND-PROTECT) \DSPFONT.IP (CHARCODE) +UNPACKFILENAME.STRING (CHARCODE) \NSFILING.PARSE.FILENAME (CHARCODE) BSP.PUTINTERRUPT (CL:UNWIND-PROTECT +) FIXATOM (CHARCODE) \COURIER.HANDLE.BULKDATA (CL:UNWIND-PROTECT) USEREXEC (CL:UNWIND-PROTECT) +EDITDEFAULT (CHARCODE) UnixPrint (CHARCODE) \POSTSCRIPT.OUTCHARFN (CHARCODE) FITP (CHARCODE) CHAT ( +CHARCODE) TTYIN.SHOW.?ALTERNATIVES (CHARCODE) SEDIT::CREATE-COMMENT-WORD-NODES (CHARCODE) +\UFS.HANDLE.RELATIVEDIRECTORY (CHARCODE) PFI.ENQUEUE (CL:UNWIND-PROTECT) PARSE-NSADDRESS (CHARCODE) +COMPILER::TEST-ALPHA (CL:UNWIND-PROTECT) \LFCheckBang (CHARCODE) \CHARWIDTH.IP (CHARCODE) +SEDIT::GET-USER-STRING (CHARCODE) FB.PRINTFN (CHARCODE) \SUBFNDEF (CHARCODE) \LFSetFileInfo ( +CL:UNWIND-PROTECT) COMPILER::TEST-ANNOTATION (CL:UNWIND-PROTECT) MAPHASHFILE (CHARCODE) UNSAVEFNS ( +CL:UNWIND-PROTECT) EDRPT (CL:UNWIND-PROTECT) INFILECOMTAIL (CL:UNWIND-PROTECT) \TFBRAVO.WRITE.RUN ( +CHARCODE) \HDCPYDSPPRINTCHAR (CHARCODE) SEDIT::SETUP-NEW-CONTEXT (CL:UNWIND-PROTECT) \NSPRINT.INTERNAL + (CL:UNWIND-PROTECT) \DSPFONT.PSC (CHARCODE) U/L-CASE (CHARCODE) \FONTFILENAME (CHARCODE) \SENDSPP ( +CL:UNWIND-PROTECT) READBITMAP (CHARCODE) \DFSFreeDiskPages (CL:UNWIND-PROTECT) CL:VALUES (OP#) MSPATHS + (CL:UNWIND-PROTECT) ECHOCONTROL (CHARCODE) SEDIT::TRANSLATE-CHARS (CHARCODE) PRINTPACKETDATA ( +CHARCODE) POSTSCRIPT.OUTSTR (CHARCODE) DIGITBASEP (CHARCODE) COPYCHARS (CHARCODE) CL:VALUES-LIST (OP#) + \HCPYMODEBLTCHAR (CHARCODE) \INCHAR (CHARCODE) INSTALL-CLIPBOARD (CHARCODE) LCSKIP (CHARCODE) +PACKFILENAME (CHARCODE) SEDIT::PRINT-STRING (CHARCODE) FB.HARDCOPY.MAXWIDTH (CHARCODE) +COMPILER::START-COMPILATION (CL:UNWIND-PROTECT) DO-DISPATCH-MACRO (CHARCODE) COPIEDFILENAME (CHARCODE) + FILING.CALL (CL:UNWIND-PROTECT) PFI.PREVIEW.DEFINEQ (CHARCODE) \DSPMOVELR (CHARCODE) +\HCPYMODEDSPPRINTCHAR (CHARCODE) CL::VALUES-UFN (OP#) SEDIT::INSERT-COMMENT-CHARS (CHARCODE) +\LFOpenFile (CL:UNWIND-PROTECT) READPLIST (CHARCODE) EXEC-READ-LINE (CHARCODE) CL::VALUES-LIST-UFN ( +OP#) PFI.PREVIEW.DECLARE (CHARCODE) SEEFILE (CHARCODE) \LFExtendFileIfNecessary (CL:UNWIND-PROTECT) +\POSTSCRIPT.ACCENTFN (CHARCODE) TTYIN.PPTOFILE (CHARCODE) UPDATEFILEMAP (CHARCODE) PRINT (CHARCODE) +NSPRINT (CL:UNWIND-PROTECT) \UFS.NEXTFILEFN (CL:UNWIND-PROTECT CHARCODE) \TEST.PARAGRAPH.LOOKS ( +CHARCODE) \PARSE.PORTCONSTANT (CHARCODE) \ORIGTERMTABLE (CHARCODE) FILEBROWSER (CHARCODE) CHOOZ ( +CHARCODE) \UFS.FILEINFOFN (CL:UNWIND-PROTECT) \SLOWHCPYMODEBLTCHAR (CHARCODE) \FTP.OPENFILE ( +DATEFORMAT) SKIP/ZAP (CHARCODE) \VAMFreePageGroup (CL:UNWIND-PROTECT) \IDLER (DATEFORMAT) +PRETTYFILEINDEX (CHARCODE) MAPRINT (CL:UNWIND-PROTECT) \CHARWIDTH.PSC (CHARCODE) SEDIT::VERIFY-STRUCTURE + (CL:UNWIND-PROTECT) \ICONW.FORMAT.TITLE1 (CHARCODE) GETCLEARINGHOUSE (CL:UNWIND-PROTECT) +DINFO.UPDATE.TEXT.DISPLAY (CHARCODE) EDITFPAT1 (CHARCODE) CLISPFOR (CL:UNWIND-PROTECT) +\STRINGWIDTH.GENERIC (CHARCODE) \CONVERTNUMBER (CHARCODE) PRINTCOPYRIGHT (CHARCODE DATEFORMAT) +\PEEKREFILL (CHARCODE) CLOSEBSPSTREAM (CL:UNWIND-PROTECT) HISTORYFIND1 (CHARCODE) \INCCODE.EOLC ( +CHARCODE) EDIT4F3 (CHARCODE) ASKUSERCHAR (CHARCODE) POSTSCRIPT.PUTBITMAPBYTES (CHARCODE) +\CHECKEOLC.CRLF (CHARCODE) \NSFILING.REMOVEQUOTES (CHARCODE) CLISP3C (CL:UNWIND-PROTECT) +\SEQUIN.PROCESS (CL:UNWIND-PROTECT) COMP.EVQ (CL:UNWIND-PROTECT) START.OF.PARAGRAPH? (CHARCODE) +PRINTCOMSTRAN (CHARCODE) SEDIT::SIMPLE-STRING-SCAN (CHARCODE) LISPXREADP (CHARCODE) +PopUpWindowAndGetAtom (CHARCODE) \SUBREAD (CHARCODE) \LFCloseDevice (CL:UNWIND-PROTECT) +SHOW.CLEARINGHOUSE (FILESLOAD) TTECHO.TO.FILE (CHARCODE) PRINTDEF (CHARCODE) ASSURE.PUP.READY ( +CL:UNWIND-PROTECT) \PS.BOUTFIXP (CHARCODE) UPPERCASEARRAY (CHARCODE) PF* (CL:UNWIND-PROTECT) +UNDONLSETQ (CL:UNWIND-PROTECT) READFROMBUF (CHARCODE) CREATEHASHFILE (CHARCODE) FLTSTR (CHARCODE) +\TEDIT.FIND.FIRST.LINE (CHARCODE) MULTIFILEINDEX1 (CL:UNWIND-PROTECT) \STRINGWIDTH.HCPYMODE (CHARCODE) + TITLEDICONW (CHARCODE) EDITDATE? (CHARCODE) \ADJUSTABLE-STRING-STREAM-OUTCHARFN (CHARCODE) TTLOADBUF +(CHARCODE) BMOBJ.GETFN4 (CHARCODE) \DSPPRINTCHAR (CHARCODE) FB.DISPLAY.COUNTERS (CHARCODE) +\LEAF.CLOSEFILE (CL:UNWIND-PROTECT) \TOP-LEVEL-READ (CL:UNWIND-PROTECT) ASKUSER1 (CHARCODE) +\PRINSTACKP (CHARCODE) SEDIT::CFV-DOTLIST (CHARCODE) POSTSCRIPTFILEP (CHARCODE) \PRINSTRING (CHARCODE) + UNDOLISPX3 (CL:UNWIND-PROTECT) \TEST.CHARACTER.LOOKS (CHARCODE) \HASHTABLE.DEFPRINT (CHARCODE) +TRAPLOOP (DV) SEDIT::CREATE-NULL-LIST (CHARCODE) SEDIT::TTYFN (CL:UNWIND-PROTECT) \IDLE.TIME ( +DATEFORMAT) \XCCSOUTCHAR (CHARCODE) CASE.PRETTYPRINT (CHARCODE) compilation (BREAK1) +\STRINGWIDTH.PRESS (CHARCODE) \SEQUIN.CLOSE (CL:UNWIND-PROTECT) FIND.LINE.BREAK (CHARCODE) DINFO.FIND +(CHARCODE) PURGEHISTORY (CL:UNWIND-PROTECT) \LFGenerateFiles (CL:UNWIND-PROTECT) INDENTATION.FROM.HERE + (CHARCODE) \LITPRIN (CHARCODE) READLINE (CHARCODE) CHAT.CHOOSE.PHONE.NUMBER (CHARCODE) +PFI.PRINT.BITMAP (CHARCODE) POSTSCRIPT.SHOWACCUM (CHARCODE) \BASEBYTES.READP (CHARCODE) \AVGCHARWIDTH +(CHARCODE) COPY.TEXT.TO.IMAGE (CHARCODE) \POSTSCRIPT.ACCENTPAIR (CHARCODE) FB.CREATE.FILEBUCKET ( +CHARCODE) \ELIDE.ELEMENT.CHAR (CHARCODE) BOOTSTRAP-NAMEFIELD (CHARCODE) SEDIT::INPUT-TOKENDELIM ( +CHARCODE) \NSFILING.DESERIALIZE1 (CL:UNWIND-PROTECT) \IFS.LOOKUPFILE (CHARCODE CL:UNWIND-PROTECT) +DO.EDIT.PP (CHARCODE) \DSPFONT.DISPLAY (CHARCODE) \VAMAllocPageGroup (CL:UNWIND-PROTECT) +%%NUMERIC-STRING-P (CHARCODE) \POSTSCRIPT.SPECIALOUTCHARFN (CHARCODE) \STRING-STREAM-OUTCHARFN ( +CHARCODE) CL:UNWIND-PROTECT (CL:UNWIND-PROTECT) CLOSERTPSOCKET (CL:UNWIND-PROTECT) INITIALEVALQT ( +CHARCODE) \GETFILINGCONNECTION (CL:UNWIND-PROTECT) PARSE-NAMESTRING1 (CHARCODE) ASKUSER$ (CHARCODE) +UTF8.OUTCHARFN (CHARCODE) INTERPRET.REM.CM (CHARCODE) BRECOMPILE2 (CHARCODE) \BSP.PREPARE.OUTPUT ( +CL:UNWIND-PROTECT) CLISPIF (CL:UNWIND-PROTECT) TB.EXPANDFN (CL:UNWIND-PROTECT) DMCHAT.HANDLECHARACTER +(CHARCODE) DIRPRINTNAME (CHARCODE) \OPENLEAFCONNECTION (CL:UNWIND-PROTECT) DASSEM.DSTOREFNDEF ( +CL:UNWIND-PROTECT) \GENERATENOFILES (CHARCODE) SIMPLEPRINT (CHARCODE) SETSPELLCASE (CHARCODE) +TERM.RESET.DISPLAY.PARMS (CHARCODE) \LFDirectoryNameP (CL:UNWIND-PROTECT CHARCODE) +\DOVMEMFULLINTERRUPT (CL:UNWIND-PROTECT) HPRINT (CL:UNWIND-PROTECT) PROMPTINWINDOW (CHARCODE) SEDIT::MUTATE + (CHARCODE) \FONT.SYMBOLASSOC (CHARCODE) \LFEventFn (CL:UNWIND-PROTECT) SEDIT::RESHAPEFN ( +CL:UNWIND-PROTECT) \LITPRIN.INTERNAL (CHARCODE) \FONT.COMPARESYMBOL (CHARCODE) TB.FINISH.CLOSE ( +CL:UNWIND-PROTECT) *WHO-LINE-OLD-TIME* (DATEFORMAT) \TEDIT.HARDCOPY.DISPLAYLINE (CHARCODE) DO.LF ( +CHARCODE) \SPPWATCHER (CL:UNWIND-PROTECT) TTYINREADP (CHARCODE) LISPX (CL:UNWIND-PROTECT) +\CHECK.PQUEUE (CL:UNWIND-PROTECT) BMOBJ.GETFN3 (CHARCODE) CL:PARSE-INTEGER (CHARCODE) TEDIT.SUBSTITUTE + (CHARCODE) BACKARROWP (CHARCODE) MSPRGDWIM (CL:UNWIND-PROTECT) SEDIT::CREATE-PRETTY-PRINT-ENV ( +CHARCODE) \MKINTEGER (CHARCODE) PRIN2-LONG-STRING (CHARCODE) \OUTCHARFN.PRESS (CHARCODE) +FB.SET.DEFAULT.NAME.WIDTH (CHARCODE) MSNOTICEFILE (CL:UNWIND-PROTECT) TTPRINSPACE (CHARCODE) +BSPPUTMARK (CL:UNWIND-PROTECT) \NSFILING.FULLNAME (CHARCODE) CMLRDTBL (CHARCODE) \SETNEWTIME0 ( +DATEFORMAT) \DEFPRINT.BY.NAME (CHARCODE) \DSKEventFn (CL:UNWIND-PROTECT) INIT-CML-READTABLES (CHARCODE +) \TEDIT.WORDBOUND.READTABLE (CHARCODE) \SYMBOL.ESCAPE.COUNT (CHARCODE) NCHARS (CHARCODE) +COMPILER::COMPILE-ONE-LAMBDA (CL:UNWIND-PROTECT) PACKFILENAME.STRING (CHARCODE) PFI.PASS.COMMENT ( +CHARCODE) \HDCPYBLTCHAR (CHARCODE) \MISCN.UFN (CL:UNWIND-PROTECT) \PRINTADDR (CHARCODE) CMLREADSEMI ( +CHARCODE) TEDIT.SCAN.LINE (CHARCODE) TTCOMPLETEWORD (CHARCODE) PopUpWindowAndGetList (CHARCODE) CALLS +(CL:UNWIND-PROTECT) READ-AFM-FILE (CHARCODE) \DSKCloseDevice (CL:UNWIND-PROTECT) DINFO.LOOKUP ( +CHARCODE) CREATEDSKDIRECTORY (CL:UNWIND-PROTECT) \VANILLADISKINIT (CHARCODE) FRESHLINE (CHARCODE) +PURGEHISTORY1 (CHARCODE) \LFDeleteFile (CL:UNWIND-PROTECT) UTF16BE.OUTCHARFN (CHARCODE) EDITFROMFILE ( +CL:UNWIND-PROTECT) \TFBRAVO.PARSE.PROFILE.PARA (DECLARE%: CHARCODE) \RSTRING2 (CHARCODE) +\DSPSPACEFACTOR.HCPYMODE (CHARCODE) CHDIR (CL:UNWIND-PROTECT) TEDIT.CHARWIDTH (CHARCODE) +POSTSCRIPT.INIT (CHARCODE) \MAIKO.PUNTBLTCHAR (CHARCODE) ICONW.PRINT-JUSTIFIED (CHARCODE) +\DSKOpenDevice (CL:UNWIND-PROTECT) \LFMakeDirHole (CHARCODE) \DISPLAYLINE (CHARCODE) +\VFMInsertPageGroup (CL:UNWIND-PROTECT) \LFFileName (CHARCODE) DO.EDIT.COMMAND (CHARCODE) +GRAPHOBJ.GETFN (CHARCODE) CL:CHAR-NAME (CHARCODE) \LFOpenDevice (CL:UNWIND-PROTECT) ETHERHOSTNAME ( +CHARCODE) CL:COMPILE-FILE (CL:UNWIND-PROTECT CHARCODE) \ATBLSET (CHARCODE) \READTABLEP.DEFPRINT ( +CHARCODE) BREAK1 (CL:UNWIND-PROTECT) BSPFORCEOUTPUT (CL:UNWIND-PROTECT) SEDIT::INPUT-QUOTE (CHARCODE) +\SLOWHDCPYBLTCHAR (CHARCODE) TMPSUBFN (CHARCODE) SPACES (CHARCODE) \UFSEventFn (CL:UNWIND-PROTECT) +IDATE (CHARCODE) READOCT (CHARCODE) SETFONT (CHARCODE) \VFMGenerateFileIDs (CL:UNWIND-PROTECT) +WHO-LINE-TIME (DATEFORMAT) WRITE-UNICODE-MAPPING-HEADER (DATEFORMAT) RESETFORM (CL:UNWIND-PROTECT) +DO.CRLF (CHARCODE) COPYVM (CL:UNWIND-PROTECT) COMPILER::TEST-ANALYSIS (CL:UNWIND-PROTECT) +GET-FILEMAP-FROM-FILECREATED (CHARCODE) SEDIT::OUTPUT-CR (CHARCODE) MAPFILES (CHARCODE) +DASSEM.DWRITEFN (CHARCODE) \LFCloseFile (CL:UNWIND-PROTECT) TTYINPROMPTFORWORD (CHARCODE) TERPRI ( +CHARCODE) \NUMERIC.PNAMEP (CHARCODE) RESETVARS (CL:UNWIND-PROTECT) \UFSOpenFile (CL:UNWIND-PROTECT) +MAKECOM (%##) \REALFRAMEP (CHARCODE) LISPXFIND (CL:UNWIND-PROTECT) \UFSGenerateFiles (CL:UNWIND-PROTECT +) \WRITEBITMAP (CHARCODE) CL:LOAD (CL:UNWIND-PROTECT) \TEDIT.SEARCH.CODETABLE (CHARCODE) +\FTP.GENERATEFILES (CHARCODE) PFI.SETUP.TRANSLATIONS (CHARCODE) \ELIDE.PRINT.TAIL (CHARCODE) +\UFSSetFileInfo (CL:UNWIND-PROTECT) \MAIKO.DISPLAYLINE (CHARCODE) PRETTYDEFCOMS (CHARCODE) +SET-DEFAULT-HASHMACRO-SETTINGS (CHARCODE) CHAT.LOGIN (CHARCODE) \FORMATLINE (CHARCODE) +\PFI.DO.HARDCOPY (CL:UNWIND-PROTECT) CHARACTER.PRINT (CHARCODE) SCAVENGEDSKDIRECTORY (CL:UNWIND-PROTECT +) CHAT.TYPEOUT (CHARCODE) SEDIT::SCAN-STRING (CHARCODE) OPENPOSTSCRIPTSTREAM (CL:UNWIND-PROTECT) +FIND.NON.SPACE (CHARCODE) \SETRECLAIMMIN (CHARCODE) \TFBRAVO.HANDLE.HEADING (DECLARE%:) \INSERTCR ( +CHARCODE) RESETVAR (CL:UNWIND-PROTECT) WORD.MATCHES.BUFFER (CHARCODE) INITIALIZEMASTER.IP (CHARCODE) +\SAVELINEBUF (CHARCODE) \UFSGetFileInfo (CL:UNWIND-PROTECT) MAPFILES1 (CHARCODE) +\MAIKO.ETHER-INTERRUPT (CL:UNWIND-PROTECT) \STRINGWIDTH.HCPYDISPLAYAUX (CHARCODE) +CREATE.NUMBERPAD.READER (CHARCODE) BACKSKREAD (CHARCODE) \UFSDeleteFile (CL:UNWIND-PROTECT) +\PRINT-USING-ADDRESS (CHARCODE) FB.CANONICAL.DIRECTORY (CL:UNWIND-PROTECT) \LFINITCASEARRAY (CHARCODE) + \TFBRAVO.EOLS (CHARCODE) TTSKIPSEPR (CHARCODE) \NEW.MKATOM (CHARCODE) \SETPRINTLEVEL (CHARCODE) +BCOMPL2 (SPECVARS LOCALVARS) FB.PROMPTFORINPUT (CHARCODE) \UFSOpenDevice (CL:UNWIND-PROTECT) TRAPMAKE +(DV) FUNCTION.WRAPPER (CHARCODE) DIRECTORY.MATCH.SETUP (CHARCODE) \LFRenameFile (CL:UNWIND-PROTECT) +COMPILE-IN-CORE (CL:UNWIND-PROTECT) PLAYTUNE (CL:UNWIND-PROTECT) NIL +NOBIND \TEDIT.SCROLLFN T OPT.DELCOPYFN T \HARDRESET-CLEANUP-RUN T TEDIT.GETINPUT T +\MAIKO.COPY-TIME-STATS T FORMAT-INDIRECTION T COMPILER::FRAME-ANNOTATE-VAR-REF T COMPILER::*MADE-CHANGES* + T RECLAIM T \LEAF.TIMEDIN T CL::%%DEFAULT-STRUCTURE-INCLUDE T *WHO-LINE-ANCHOR* T CLOCK T +COMPLEX-COUNT-IF-NOT T COMPILER::*BLOCK-STACK* T FASL:CURRENT-VERSION T MICROCODEVERSION T FASL::END-TEXT + T SEDIT:SAVE-WINDOW-REGION T \CHECKBCPLPASSWORD T *WHO-LINE-HOST-NAME* T \THROUGHBACKCCODE T +COMPILER::*SPECIAL-LOCALS-BOUND* T REALMEMORYSIZE T \FLUSHPUPSOCQUEUE T CL:CHAR-UPCASE T COMPILER::META-SUBST + T COMPILER::EFFECTS-REPRESENTATION T \GENERIC.READP T CHAT.TTYEXITFN T \TEDIT.FIXCHANGEDPART T GCMESS + T RAIDROOTFRAME T %%AREF-EXPANDER T SIMPLE-NSUBSTITUTE-IF-NOT T MBUTTON.SET.NEXT.BUTTON.STATE T +SIMPLE-NSUBSTITUTE-IF T FASL:DUMP-EVAL T \MAIKO.DORECLAIM T *KEYWORD-PACKAGE* T +\DOSTORAGEFULLINTERRUPT T CL:LONG-SITE-NAME T \DSKDISPLAY.DESTROY.WINDOW T MB.DEFAULTBUTTON.FN T +EXEC-READ T %%ASET-EXPANDER T FORMAT-SKIP-ARGUMENTS T CL::%%DEFAULT-DEFSTRUCT-TYPE T COMPILER::*NEED-STORAGE* + T MOVE.TO.NEXT.LINE T COMPLEX-REMOVE T COMPILER::EFFECTS-ANALYZE-LIST T FORMAT-GENERAL-FLOAT T +PACKAGE-REHASH-THRESHOLD T SEDIT::INTERNAL-WRAPPERS T COMPILER::GENCODE-LAMBDA T CL::%%EXP-TABLE T +COMPILER::*TAGBODY-STACK* T BCPLVERSION T FASL::END-BLOCK T \TEDIT.HARDCOPY T TTYIN1RESTART T BRKPOS T + COMPILER::*SPECIAL-VENV* T \MAIKO.DISABLEGC T \TEDIT.EXPAND.DATE T SIMPLE-REMOVE-IF-NOT T +%%LIT-ARRAY-SIZES T COMPILER::COMPILE-FILE-PACKAGE-FORM T COMPILER::*OTHERS* T +*DOCUMENTATION-HASH-TABLE* T \FILLWINDOW T \PARSE-FILE-HEADER T SEDIT::RELEASE-OPEN-STRING T +COMPILER::EFFECTS-ANALYZE-ANY-CALL T \FIXSEL T SPY.START.ENTRY T MODERNWINDOW.SETUP T CL::%%EXP-POLY T + CL:GENTEMP T %%MERGE-LISTS T COMPLEX T INSTALL-WHEELSCROLL T \PKG-FIND-FREE-PACKAGE-INDEX T +*WHO-LINE-ENTRIES* T UPDATECHANGED T SUBRP T *WHO-LINE-USER-ENTRY* T D-ASSEM:+IVAR-CODE+ T +\NSRANDOM.PROCEEDABLE.ERROR T ANALYZE-AUX T COERCE-TO-NSADDRESS T CONDITIONS::EXPAND-WITH-COLLECTION-SITES + T COMPLEX-COUNT T \NEWPAGE T D-ASSEM:+LAMBDA-SPREAD+ T COMPILER::COMPILE-DEFINER-OUTSTANDING-LOOSE-FORMS + T \CREATE.TITLEMENU T FIND-EXEC-COMMAND T \LOCKPAGES T D-ASSEM:+NLAMBDA-SPREAD+ T \LINES-EQUAL-P T +MAKE-REPORT-FUNCTION T \PROCESS.AFTER.EXIT T \DONEWPAGE T D-ASSEM:+PVAR-CODE+ T COMPILER::BINDING-TO-LAMBDA + T MSTYPEMATCHRATING T SEDIT:GET-WINDOW-REGION T MARK/GRAPH/NODE T CL::STRUCTURE-FUNCTIONS T +D-ASSEM:+FVAR-CODE+ T COMPILER::*PC-VAR* T FORMAT-EXPONENTIAL T COMPILER::*TAG-LOCATION-TABLE* T +SEDIT::PREV-NODE T COMPILER::*AUTOMATIC-SPECIAL-DECLARATIONS* T SIMPLE-NSUBSTITUTE T SEDIT:*WRAP-SEARCH* + T \UNQUEUE.EVENT T %%MAP-FOR-EFFECT-SINGLE T COMPLEX-COUNT-IF T XCL::ADD-LABELS/FLET-ENVIRONMENT T +D-ASSEM:+LAMBDA-NO-SPREAD+ T XCL::*WHERE-IS-CASH-SIZE* T HERALD T \ENQUEUE.EVENT/LOCK T ZERO T TRUE T +COMPLEX-SUBSTITUTE-IF-NOT T SI::PROCESS-PROCEED-KEYWORDS T %%ONED-ARRAY T SPLITFILE T +FORMAT-GET-PARAMETER T CONDITIONS::NORMALIZE-SLOT-DESCRIPTION T COMPILER::*TAG-EQUIV-TABLE* T +WORDSPERNAMEENTRY T BRKCOND T EXTERNAL-SYMBOL-COUNT T COMPILER::FIND-ALL-TAGS T \CREATE.SETABLEMENU T +*KEY-FINDER* T XCL::CLOSE-WHERE-IS-FILES T \MOVEVMEMFILEPAGE T BRKEXP T *WHO-LINE-VMEM-ENTRY* T +CL:LAMBDA-PARAMETERS-LIMIT T COMPILER::COMPILE-DEFINER-NAMED-PROGN T SIMPLE-REMOVE T +SEDIT::DISPLAY-SELECTION T SEDIT::SET-POINT-NOWHERE T SIMPLE-COUNT-IF-NOT T D-ASSEM:+NLAMBDA-NO-SPREAD+ + T \VFMClearBuffers T SEDIT:*EDIT-FN* T %%LIT-ARRAY-TABLE T \EDIT.UPCARET T %%SIMPLE-MERGE-LISTS T +COMPILER::*NON-LOCALS* T COMPILER::*HOST-ARCHITECTURE* T SEDIT::*FORMAT-ALIAS-DEPTH-LIMIT* T +SEDIT.COPYTOCLIPBOARD T \DOLOCKPAGES T *SHORT-BACKTRACE-FILTER* T *STANDARD-OUTPUT* T COMPILER::BIND-PARAMETER + T \RELEASE.ETHERPACKET T *WHO-LINE-CURRENT-USER* T TTLASTLINE T \POSTSCRIPT.CHANGECHARSET T +COMPILER::COMPILE-FILE-DEFCONSTANT T *DEFAULT-DEFAULT* T COMPILER::RELEASE-TREE T SEDIT::DETACH-NODE T + CHAT.TYPEIN T ADDMAPBUFFER T \CREATE.INSPECTABLEMENU T %%NOTEVERY-SINGLE T MaxBkMenuWidth T + T +WHO-LINE-USER-AFTER-LOGIN T DBG::*IN-THE-DEBUGGER* T COMPILER::COMPILE-FILE-DECLARE%: T +\TEDIT.RECORD.TABLEADERS T %%NOTANY-SINGLE T - T \DOTEMPLOCKPAGES T SEDIT::THROW-AWAY-CHANGES T +COMPILER::*REACHABLE-TAG-TABLE* T \TEMPUNLOCKPAGES T CHAT.OSTYPES T CL::%%ASIN-QPOLY T +XCL::ADD-MACROLET-ENVIRONMENT T / T %%CTX-ARG-NAME T REDUCE-FROM-END T SI::CREATE-ADVISED-DEFINITION T + CL:RATIONAL T \UNLOCKPAGES T *LAST-CONDITION* T MSEAT T LOGOW T COMPILER::*FRAME-NAME* T FORMAT-TILDE + T CONDITIONS::CONVERT-OLD-DEFINE-CONDITION T PRINTERNAME T COMPLEX-SUBSTITUTE T CL:REALPART T +\TEDIT.GET.SINGLE.CHARLOOKS2 T COMPILER::ALPHA-MV-CALL T COMPILER::*COPY-NODE-TABLE* T CHAT.KEYACTIONS + T SIMPLE-COUNT T \DOFLUSHVM T REDUCE-FROM-START T SI::VOWEL-P T WHEREIS T %%SIMPLE-MERGE-VECTORS T +FORMAT-FIXED T CL:CHAR-SUPER-BIT T XCL:PKG-GOTO T CONDITIONS::CONVERT-CONDITION-CASE T %%MERGE-VECTORS + T CL:CHAR-META-BIT T ECASE-FAIL T TEDIT.MODERNIZE T *DEBUGGER-MENU* T SIMPLE-REMOVE-IF T SEDIT::SHIFT-DOWN + T \GR.GvarInitLst T COMPLEX-SUBSTITUTE-IF T COMPILER::EFFECTS-ANALYZE-TAGBODY T +*WHO-LINE-TTY-STATE-ENTRY* T \RELEASEBUFFER T INSTALL-CLIPBOARD T \UNQUEUE.TIMER T \EDIT.FLIPCARET T +COMPILER::COPY-NODES T XCL::MAKE-LEXICAL-ENVIRONMENT T SIMPLE-COUNT-IF T \WRITEDIRTYPAGE T +XCL::*UNSAFE-TO-DELETE-PACKAGE-NAMES* T SEDIT::PARSE-FORMAT T FASL::DUMP-STRING T \TEDIT.MARKINACTIVE +T %%LIT-ARRAY-TYPES T CL-WRAP-MACRO T COMPILER::*FREE-VENV* T *WHO-LINE-STATE-UNINTERESTING-FNS* T +IL-MACRO-WRAPPED-P T \WAIT.FOR.TTY T SETTAIL? T XCL::*DELETED-IMPLICIT-HASH-SLOT* T +COMPILER::COMPILE-DEFINER-DEFINER T MAKE-INTO-CONDITION T REPORT-CONDITION T CLSTOPSCAN? T +CL:RATIONALIZE T SEDIT::NOTE-CHANGE T CL:SHORT-SITE-NAME T CL:YES-OR-NO-P T FASL::DOTTED-LIST-LENGTH T + %%THIN-STRING-ARRAY-P T COURIER.VERSION# T WHEELSCROLL.DOIT T SEDIT::SET-FORMAT T *FEATURES* T +CHAT.AUTOCRLF T COMPILER::GENCODE T \TEDIT.UNSPLITW T SEDIT::FIRST-ADD-COMMAND-MENU-ENTRY T +DEFAULT-HANDLE-CONDITION T SEDIT:*COMPILE-FN* T \COUNTREALPAGES T COMPILER::TEST-GENCODE1 T +PACKAGE-HASHTABLE-INSPECT-FETCHFN T BMOBJ.BUTTONEVENTINFN T CL:SOFTWARE-TYPE T %%CTX-ARG-USED T +FORMAT-PAGE T SEDIT::COMPUTE-SELECTION-POSITION T CL:SIN T START.OF.PARAGRAPH? T CHAT.INTERRUPTS T +HASH-NO-PARAMETER-ERROR T COMPILER:PASS T UNIX.PARAMS.CONFIRM T SEDIT::*IGNORE-CHANGES-ON-COMPLETION* +T CL::%%CAPTURE-COUNTERS-AFTER T SEDIT::COMPUTE-POINT-POSITION T CL:SORT T \TEDIT.SPLITW T UNIX-WRITE +T REFLECT/GRAPH/DIAGONALLY T COMPILER::ALPHA-LITERAL T COMPILER::*CURRENT-FRAME* T XCL::WHERE-IS-READ-FN + T COMPILER::*LAP-FLG* T COMPILER::*COMPILER-IS-READING* T TEDIT.POP.STYLESHEET T CLSMARTEN T +*WHO-LINE-DIRECTORY-ENTRY* T COMPILER::*LOOSE-NAME* T CHAT.HOSTINFO T %%MERGE T ADDTOFILEKEYLST T +PFI.PRINT.COMMENTS T \TEDIT.MARKACTIVE T SEDIT::SELECTION-DOWN T SEDIT::DEFAULT-COMPILE-FN T +XCL:*PROFILE* T %%ENV-ARG-NAME T CL::%%ASIN-PPOLY T CL:STREAM-ELEMENT-TYPE T *WHO-LINE-STATE* T +FORMAT-FRESHLINE T CHAT.UNDERLINE.DESCENT T COMPILER::*TARGET-ARCHITECTURE* T +COMPILER::*OUTSTANDING-LOOSE-FORMS* T STRINGHASHBITS T FASL::DUMP-PACKAGE T CL:CHAR-CODE-LIMIT T +\MAIKO.CHECKSUM T STRING-EQUAL-HASHBITS T ORDINAL-TENS T COMPILER::FRAME-ANNOTATE-OPCODES T +CL:MULTIPLE-VALUES-LIMIT T \DSPXPOSITION.DISPLAY T SIMPLE-SUBSTITUTE-IF T COMPILER::ENV-ANALYZE-OPCODES + T COMPILER::OPTIMIZE-EQL T %%ENV-ARG-USED T COMPLEX-POSITION-IF T CHECK-TYPE-FAIL T FORMAT-TERPRI T +CL::DEFSTRUCT-SHARED-PREDICATE-OPTIMIZER T HPRINT-TO-STRINGS T \GETDISKCB T CL:STABLE-SORT T +%%SLOW-ARRAY-READ T NOHOST T TTPRIN2 T CL::PS-TYPE-SPECIFIER T SEDIT:*CLEAR-LINEAR-ON-COMPLETION* T +IL-WRAP-MACRO T COMPILER::ALPHA-LET* T CL::%%CAPTURE-COUNTERS-BEFORE T SEDIT::FIRST-ADD-COMMAND T +CL:SETQ T \XCCSBACKCCODE T CL::%%ASIN-EPSILON T SIMPLE-SUBSTITUTE-IF-NOT T CL::%%TAN-QPOLY T +XCL:*DEBUGGER-PROMPT* T COMPILER::OPTIMIZE-EQUALITY T COMPILER::*TAIL-RECURSION-POLICY* T +%%KEYWORD-TESTS T CL::%%VALID-TYPE-P T *DIGITS* T COMPLEX-POSITION-IF-NOT T FASL::RESET-DUMPER-STATS T + COMPILER::*COMPILING-DEFINER* T FASL::*TABLE-HITS* T %%SIMPLE-MERGE T XCL:*EVAL-FUNCTION* T +PRINT-ALL-DOCUMENTATION T CROPMARK.WHENOPERATEDONFN T FORMAT-JUSTIFICATION T COMPILER::*BLIP-VAR* T +XCL:*EXEC-PROMPT* T TTNEXTLINE T UNIX-KILL T COMPILER::MERGE-FIRST-FORMS T MAKE-DO-SYMBOLS-VARS T +RETYPE.BUFFER T COMPILER::COMPILE-SCAN-OUTSTANDING-LOOSE-FORMS T MOBY-UNINTERN T COMPILER::ALPHA-LET T + CONCATFILES T SAVE.CURSOR T CHAT.PROTOCOL.ABBREVS T COMPILER::*NODE-TYPES* T SEDIT::INSERT-QUOTED-GAP + T HPRINT-TO-STRING T \DAYTIME0 T *WHO-LINE-UPDATE-TIMER* T COMPILER::*CODE* T COMPILER::*ENVIRONMENT* + T \CREATECHARSET.HCPYMODE.INTERPRESS T CL:TAN T ShellCommand T SEDIT::DEFAULT-COMMAND-TABLE-SPEC T +SEDIT::PROPS-COMPLETION T READVARS-FROM-STRING T SEDIT::*FSPEC-TABLE-COPY* T STRING T +INITIALIZE-SHELL-DEVICE T ORDINAL-ONES T CL::%%NO-SUPER-TYPE T \SEQUIN.OUT.OF.THE.BLUE T +SEDIT::INPUT-SQUARE-BRACKET T \10MB.TURNOFFETHER T LISPINTERRUPTS T WRITEFILE T COMPILER::COMPILE-SCAN-DEFINER + T \TEDIT.SHOW.PARALOOKS T SPY.MERGE1 T CL:PROCLAIM T \FIXCODESYM T CL::SXHASH-MAX T SI::RESETUNWIND T + SEDIT::SEDIT1 T ADVISEDFNS T CL:** T \GETREGION.PACKPTS T COMPILER::*LAP-STREAM* T +DASSEM.SAVELOCALVARS T %%SIMPLE-MERGE-SUBLISTS T CL:*** T \CLEARCB T SI::GET-SUPER-DESCRIBERS T +*WHO-LINE-PROFILE-ENTRY* T \SPLITPIECE T COMPILER::*POP-SUPPRESSION-POLICY* T +CL::*COMMON-LISP-BASE-TYPES* T \MAIKO.10MB.RESTART.ETHER T %%LET-LIST T SEDIT::GET-LIST-FORMAT T +CL::*BASE-TYPE-LATTICE* T \NSFILING.AFTER.LOGIN T *ERROR-OUTPUT* T CHAT.TTY.PROCESS T +SEDIT::SET-SELECTION-NOWHERE T TEDITSTREAM.INIT T FASL::*GATHER-DUMPER-STATS* T \FLUSHVMOK? T +*LOAD-VERBOSE* T WHO-LINE-REDISPLAY-INTERRUPT T DBG::KEYLIST-FROM-ESCAPE-LIST T *BREAK-ON-WARNINGS* T +\INTERLISP-NLAMBDA-MACRO T \VAMBufferSave T COMPILER::TAKE-DOWN-RETURN-TO T SI::SUB-DATATYPE-P T +READVAR-FROM-STRING T FB T *DEBUG-IO* T COMPILE-FILE-DECLARE%: T COMPILER::*AVAILABLE-LEXICAL-NAMES* T + HRULE.WHENOPERATEDONFN T \FONTCREATE.HCPYMODE.INTERPRESS T COMPILER::*CONTEXT* T SIMPLE-SUBSTITUTE T +\MAIKO.BLTSHADE.BITMAP T FLAST T BROKENFNS T *READ-DEFAULT-FLOAT-FORMAT* T \SHOWPAGETABLE T +%%UNBOUNDED-ARG-COUNT T XCL:*PRINT-STRUCTURE* T \MAIKO.BITBLT.BITMAP T SCALE-EXPT-AUX T +COMPLEX-POSITION T *MODULES* T CL::COMPLETE-ARRAY-TYPE-DIMENSIONS T MSNEGATESET T +CL::%%DEFAULT-PRINT-FUNCTION T CHAT.PROTOCOLTYPES T COMPILER::ENV-ANALYZE-LITERAL T *QUERY-IO* T +LOCAL-MACRO-FUNCTION T XCL::ENTER-EXEC-FUNCTION T %%MERGE-SUBLISTS T XCL::UNDOABLY-PROCLAIM T +*LOAD-PRINT-STUFF* T CL:++ T \TEDIT.QUIT T COMPILER::SET-UP-RETURN-TO T COMPLEX-DELETE-DUPLICATES T +COMPILER::CONTEXT-TEST-FORM T CL:+++ T LOCAL-SYMBOL-FUNCTION T CL::*STEP-PRINT-LENGTH* T RAID T +XCL::WALK-MULTIPLE-VALUE-BIND T SIMPLE-POSITION-IF-NOT T *TERMINAL-IO* T \SET.VMEM.FULL.STATE T +BRKTYPE T COMPILER::*INPUT-STREAM* T \ABORT.BULK.DATA T COMPILER::*LOAD-COMPILED-CODE* T OPT.PRDEL T +LASTPOS T COMPILER::CLOSURE-ANNOTATE-OPCODES T \CORE.CLOSEFILE T CL:BOOLE-1 T *WHO-LINE-DIRECTORIES* T + COMPILER::COMPILE-SCAN-MACROLET T CHAT.HOST.TO.PROTOCOL T CL::%%TAN-EPSILON T SEDIT::ALIST-COMPLETION + T CL:BOOLE-2 T SEDIT::SELECTION-UP T XCL::*WALK-COPY* T COMPILER::*SUBST-EXPR* T CL:// T +FASL::*TABLE-ATTEMPTS* T FORK-UNIX T CL::%%TAN-PPOLY T CL:/// T *MACROEXPAND-HOOK* T +LITATOM-PACKAGE-CONVERSION-ENABLED T COMPILER::*CONSTANTS-HASH-TABLE* T MAKE-PAD-SEGS T CARDINAL-TEENS + T SEDIT::SUBSTITUTE-STRUCTURE T \CREATECHARSET.HCPYMODE.PRESS T CL:BOOLE-ANDC2 T +DBG::MENU-FROM-ESCAPE-LIST T FASL::INTEGER-BYTE-LIST T CL::DEFSTRUCT-SHARED-ACCESSOR-OPTIMIZER T +CL:BOOLE-C1 T FORMAT-GET-SEGMENTS T CARDINAL-TENS T CHAT.UNDERLINE.METHOD T CL:BOOLE-AND T +*LISP-PACKAGE* T CL:BOOLE-ANDC1 T %%MIN-ARGS T \VAMMarkBufferDirty T SEDIT::SUBSTITUTE-SUBSTRUCTURE T +COMP.STRETURN T COMPILER::*SUBST-OCCURRED* T CL:BOOLE-EQV T CHECKPAGEMAP T CARDINAL-PERIODS T +SEDIT::PENDING-DELETE T CL:MAKE-HASH-TABLE T CL:ARRAY-DIMENSION-LIMIT T CL:BOOLE-IOR T +FORMAT-PRINT-ROMAN T TEDIT.RESET.EXTEND.PENDING.DELETE T SEDIT::INPUT-ESCAPE T CL:BOOLE-C2 T +COMPILER::MAKE-LAP-VAR-REFERENCE T CHAT.IN.EMACS? T MAINSCREEN T CL:BOOLE-CLR T +COMPILER::FRAME-ANNOTATE-LITERAL T LITATOM-PACKAGE-CONVERSION-TABLE T CHAT.FONT T CL:BOOLE-ORC1 T +GETFILEMAP T D-ASSEM::+CONSTANT-OPCODES+ T CL::%%SIN-QPOLY T CHAT.WAIT.TIME T CL:BOOLE-ORC2 T +*WHO-LINE* T %%ARG-COUNT T D-ASSEM::*BYTES* T CL:CHAR-BITS-LIMIT T CL:BOOLE-NAND T CMLSYMBOLS.SHARED T + \M44EXTENDVMEMFILE T COMP.IF T %%TWOD-ARRAY T CL:BOOLE-NOR T FORMAT-GET-TRAILING-SEGMENTS T +\SEQUIN.FLUSH.RETRANSMIT T \SMASHMENUIMAGEONRESET T CL:DOUBLE-FLOAT-EPSILON T XCL::PROFILIZE T +COMPLEX-REMOVE-DUPLICATES T SPY.POINTERS T CL:DOUBLE-FLOAT-NEGATIVE-EPSILON T CL::*STEP-STATE* T +CL::*STEP-MAX-INDENTATION* T XCL::WALK-LET/LET* T CARDINAL-ONES T SIMPLE-POSITION T CL:BOOLE-SET T +SEDIT::SEARCH-OBJ-BACKWARDS T D-ASSEM::*BYTE-COUNT* T %%VECTOR-INSERTION-SORT T \WRITEMAP T CL:BOOLE-XOR + T \TTYIN.RPEOF T \UFSOpenFile-C T FORMAT-PRINT-OLD-ROMAN T CL:LEAST-NEGATIVE-LONG-FLOAT T CL:EQUALP T + COMPILER::*INPUT-FILENAME* T CL:CALL-ARGUMENTS-LIMIT T CL:LEAST-NEGATIVE-SHORT-FLOAT T D-ASSEM::START-BYTES + T D-ASSEM::STORE-VAR T WHEELSCROLL T PACKAGE-INSPECT-FETCHFN T COMPILER::COMPILE-SCAN-DECLARE%: T +COLORDISPLAYP T *REMOVE-INTERLISP-COMMENTS* T READVARS-FROM-STRINGS T CL:LEAST-NEGATIVE-DOUBLE-FLOAT T + *REPLACE-OLD-EDIT-DATES* T SIMPLE-POSITION-IF T CL:LEAST-POSITIVE-LONG-FLOAT T COMPILER::*FASL-HANDLE* + T *DEFAULT-PATHNAME-DEFAULTS* T \UFSGetFileName-C T %%GENERAL-ARRAY T CL:LEAST-POSITIVE-SHORT-FLOAT T + XCL::*UNBROKEN-FNS* T D-ASSEM::*DVAR-ENV* T *WHO-LINE-SHOW-ACTIVE-ENTRY* T WHEN-WHO-LINE-SELECTED-FN +T *SPECIAL-BINDING-MARK* T CMLSYMBOLS.VARS T CL:MEMBER-IF-NOT T RENUMBER.LINES T +CL:LEAST-POSITIVE-DOUBLE-FLOAT T D-ASSEM::*DTAG-ENV* T \DSKGetFileName-C T CL:MEMBER-IF T +XCL::*WALK-FUNCTION* T SEDIT::CLOSE-LIST T COMPILER::*SUBST-VAR* T CL:LONG-FLOAT-NEGATIVE-EPSILON T +CMLSYMBOLS.DECLARATORS T D-ASSEM::*DCODE* T SIMPLE-DELETE-DUPLICATES T \MAKEPCTB T +CL:MOST-NEGATIVE-DOUBLE-FLOAT T CMLSYMBOLS.FNNAMES T D-ASSEM::*LEVEL* T COMPAREFILES T FW-INIT T +EVAL-INPUT T CL:EQUAL T MSCLOSEFILES T CMLSYMBOLS.TYPENAMES T \DSKDirectoryNameP-C T CL:VECTORP T +SEDIT::SELECT-PSEUDO-SEGMENT T UPDATE-WHO-LINE T CL:LONG-FLOAT-EPSILON T COMPILER::PARSE-DEFUN T +CMLSYMBOLS.LAMBDA.LIST.KEYWORDS T \UFSDirectoryNameP-C T %%EVERY-SINGLE T XCL::*LEXICAL-VARIABLES* T +PFI.OUTCHARFN T CL:MOST-NEGATIVE-SHORT-FLOAT T CMLSYMBOLS.SPECIALFORMS T D-ASSEM::*HUNK-SIZE* T +FORMAT-PRINT-CARDINAL-AUX T FB.EXPUNGE?.MENU T \MAIKO.ETHERRESUME T CMLSYMBOLS.MACROS T D-ASSEM::*PVAR-COUNT* + T *FORMAT-ORIGINAL-ARGUMENTS* T SEDIT::SEARCH-OBJ T *WHO-LINE-TTY-PROC-ENTRY* T CL:MOST-NEGATIVE-FIXNUM + T CL::*STEP-PRINT-LEVEL* T VMEMSIZE T \UFSCloseFile-C T COMPILER::ENV-ANALYZE-GO T +SEDIT::COLLECT-UNDO-BLOCK T CL:MOST-NEGATIVE-LONG-FLOAT T *CHECK-ARGUMENT-COUNTS* T D-ASSEM::*STACK-ENV* + T CL:LENGTH T CL:MOST-POSITIVE-LONG-FLOAT T SI::EXPANSION-FUNCTION T COMPILER::CLOSURE-ANNOTATE-LITERAL + T D-ASSEM::+MAX-ALLOWABLE-PVAR-COUNT+ T SEDIT::UPGRADE-COMMENT T CL:MOST-POSITIVE-SHORT-FLOAT T +\OUTDATE T CL::*STEP-INDENTATION-LEVEL* T \SFMAKEBOLD T XCL::*WALK-FORM* T SYMBOL-INSPECT-FETCHFN T +D-ASSEM::DLAMBDA-FROM-LAMBDA T CL:MOST-POSITIVE-DOUBLE-FLOAT T SEDIT::INSERT-NULL-LIST T D-ASSEM::*FREE-VARS* + T CL:MOST-POSITIVE-FIXNUM T *PER-EXEC-VARIABLES* T D-ASSEM::*BOUND-SPECIALS* T +*WHO-LINE-READTABLE-ENTRY* T \TEDIT.SHOW.PAGEFORMATTING T CL:SHORT-FLOAT-EPSILON T +COMPILER::*EVAL-WHEN-COMPILE* T \DOHARDRETURN T CL:SHORT-FLOAT-NEGATIVE-EPSILON T +SEDIT::DISINTEGRATE-CONTEXT T CL::%%SIN-PPOLY T \INSERTPIECE T FB.EDITCOMMAND.ONEFILE T +D-ASSEM::+SLOW-FVAR-SLOT+ T SIMPLE-REMOVE-DUPLICATES T \DOGC1 T %%SIMPLE-VECTOR-INSERTION-SORT T +CL::ACCESSOR-BODY T D-ASSEM::*HUNK-MAP* T CL::NATURALIZE T FORMAT-ITERATION T +CONDITIONS::*FUTURE-CITIZENS-OF-CONDITIONS* T TERM.ERASE.IN.LINE T UNCLISPTRAN T +ENCAPSULATEDOBJ.BUTTONEVENTINFN T \DOGC T DAYTIME T DEFAULTPRINTER T D-ASSEM::+MAX-ALLOWABLE-SPECIAL-COUNT+ + T IRM.GET.DINFOGRAPH T OPENTEXTSTREAM T *FORMAT-INDEX* T CL::%%SIN-EPSILON T CL:NREVERSE T +SEDIT::FIND-SUBSTRUCTURE-BACKWARDS T \UFSReadPages-C T CL:ASSOC-IF T *WHO-LINE-ACTIVE-PERIOD* T +\CREATE.TWODINSPECTOR.INSPECTMENU T ANALYZE T \COMMONBACKCHARFN T XCL::WALK-LAMBDA T SI::*UNADVISED-FNS* + T COMPLEX-FIND-IF T SI::CANONICALIZE-ADVICE-WHERE-SPEC T \MAIKO.ETHERSUSPEND T \UFSGetSize-C T +SEDIT::SELECTION-FROM-PSEUDO-SELECTION T \TEDIT.GET.SINGLE.CHARLOOKS T CL:ASIN T +CL::FUTURE-CITIZENS-OF-XCL T \UFSWritePages-C T CL:ASSOC-IF-NOT T \CREATE.TEDIT.FACE.MENU T +*FORMAT-LENGTH* T \FONTCREATE.HCPYMODE.PRESS T DRIBBLEFILE T COMP.AC T COMPILER::*DEFERRED-FORMS* T +CL::%%SIMPLE-RASSOC T %%SIMPLE-VECTOR-QUICK-SORT T SPY.GRAPH.EDITOR T CL::%%COMPARISON-OPTIMIZER T +CL::*STEP-INDENTATION-INCREMENT* T \UFSGetFileInfo-C T COMPILER::RELEASE-OPCODES T XCL::*DECLARATIONS* + T SIMPLE-FORMAT T \MKATOM.FULL T COMPLEX-DELETE-IF-NOT T COMPLEX-DELETE-IF T XCL::INSTALL-PROFILE T +\CREATE.TWODINSPECTOR.SETMENU T D-ASSEM::INSTALL-VAR T COMPILER::GENCODE-SEGMENT T CL::%%COMPLEX-RASSOC + T MSSIMPLESET T CL:LAMBDA-LIST-KEYWORDS T SIMPLE-CONDITION-FORMAT-ARGUMENTS T \MAIKO.NEWPAGE T +COMPILER::*BLOCKS* T CL:RASSOC-IF-NOT T %%VECTOR-QUICK-SORT T PRETTYPRINT1 T +CL::%%FUNCTION-DEFINING-FORM-KEYWORDS T LISPVERSION T CL:RASSOC-IF T FORMAT-BOOLEAN-CONDITION T +SEDIT::FIND-SUBSTRUCTURE T CL:REVERSE T WRITECALLSUBRS T COMPILER::*MAKING-SECOND-PASS* T +XCL::*DEFINITION-PROTOTYPES* T CL:ACOS T FASL::DUMP-ARRAY-DESCRIPTOR T SEDIT::GROW-CLICK? T CHATWINDOW + T RESETGRID T CL::*STEP-IO* T CL:* T *FORMAT-DISPATCH-TABLE* T %%ARRAY-ELEMENT-INITIALIZE T +COMPILER::*CURRENT-BLOCK* T CONDITIONS:*BREAK-ON-SIGNALS* T BMOBJ.CREATE.MENU T +COMPILER::*PREPROCESSING-PHASE* T COMPILER::*NODE-NUMBER* T %%FAT-STRING-ARRAY-P T D-ASSEM::*ENDING-DEPTH* + T FORMAT-PRINT-SMALL-CARDINAL T XCL::*ENVIRONMENT* T GRAPHERCOPYBUTTONEVENTFN T COMPLEX-FIND-IF-NOT T + COMP.STTAG T CL:CLEAR-OUTPUT T FIND-KEYWORD T COMPILER::META-SUBST-STMTS T FORMAT-PRINT-NUMBER T +\CREATE.TEDIT.SIZE.MENU T CHAT.ALLHOSTS T \UFS.CREATE.PROPS T PRINTER.SCRATCH.FILE T D-ASSEM::REACH-TAGS + T PERIODICALLY-UPDATE-WHO-LINE T \DORECLAIM T *EDIT-INPUT-WITH-TTYIN* T SYMBOL-INSPECT-STOREFN T +\BULK.DATA.STREAM T D-ASSEM::+JUMP-CHOICES+ T CL:CONJUGATE T XCL::STRUNCATE T %%TOTAL-SIZE T +\UFSSetFileInfo-C T GET.EDIT.BITMAP.MENU T \MENU.ITEM.DESELECT T *APPLYHOOK* T COMPILER::*BLOCK-HASH-TABLE* + T XCL::*WHERE-IS-CASH-FILES* T CL::RAW-CONSTRUCTOR T \CREATE.TWODINSPECTOR.TITLEMENU T +PRINT-COMPILE-HEADER T COMPILER::*NODE-HASH* T D-ASSEM::*JUMP-LIST* T SIMPLE-CONDITION-FORMAT-STRING T + XCL::WALK-DO/DO* T SEDIT:*WRAP-PARENS* T XCL::*WHERE-IS-IGNORE-DEFINE-TYPES* T CL::*SKIP-EVALHOOK* T +\UFSReadDir-C T CHAT.DISPLAYTYPES T CHAT.WINDOW.REGION T PSCFONT.SPELLFILE T *EVALHOOK* T CL::%%LOGCOUNT + T CL::%%MAPCAR-SINGLE T *WHO-LINE-UPDATE-INTERVAL* T D-ASSEM::+JUMP-SIZES+ T *TOTAL-PACKAGES-LIMIT* T + \CLEAROFD T CL:COS T CL::*SKIP-APPLYHOOK* T CL::%%DEFSTRUCT-EXPORT-OPTIONS T +*UNINTERNED-PACKAGE-INDEX* T CL::EQLHASHBITSFN T NILL T XCL::FIND-VARIABLE-DEFINITION T +REDISPLAY-WHO-LINE T D-ASSEM::*LOCAL-FN-FIXUPS* T CL::%%MAPLIST-SINGLE T HASHTABLE-SIZE-LIMIT T +COMPLEX-DELETE T *EXEC-MAKE-UNDOABLE-P* T D-ASSEM::+JUMP-RANGE-SIZE-MAP+ T COMPILER::*INDENT-INCREMENT* + T PFI.HANDLE.DECLARE T EDITCOMS T *FORMAT-CONTROL-STRING* T SEDIT::FIND-STRUCTURE-BACKWARDS T +COMPLEX-FIND T ASSERT-FAIL T \PROC.REPEATEDLYEVALQT T SEDIT::FIND-COMMENT T FASL::DUMP-LIST T +CLOSECHATWINDOWFLG T *CURRENT-EVENT* T \FIXLOCALNET T \TopLevelTtyWindow T \UFSFinishFileInfo-C T +CL::TYPE-EXPAND-STRUCTURE T \BOXITEM T PUTCLIPBOARD T XCL::*PROFILE-VARIABLES* T CL:BIT-AND T +COMPILER::*UNKNOWN-FUNCTIONS* T CL::%%MAPC-SINGLE T ANALYZE-TESTS T SI::CREATE-BROKEN-DEFINITION T +CL:GETF T CL:SXHASH T FASL::END-MARK T SIMPLE-FIND-IF-NOT T COMPILER::*LOCAL-FUNCTIONS* T +CL:GET-PROPERTIES T \CREATE.TEDIT.MOVESELECTION T COMPILER::RELEASE-LITERAL T +CL::TYPE-EXPAND-NAMED-STRUCTURE T XCL::*WHERE-IS-HASH-FILE-SIZE* T FASL::CHECK-TABLE-SIZE T +*WHO-LINE-PACKAGE-ENTRY* T FORMAT-FUNNY-CONDITION T PRIME-HASHTABLE-SIZES T COMPILER::CLOSE-OVER T +DEFAULTCHATHOST T CL:BIT-ANDC1 T \UFSNextFile-C T CL::%%MAPL-SINGLE T CL::%%LOG-QPOLY T +SIMPLE-DELETE-IF-NOT T CL:DIRECTORY-NAMESTRING T *PACKAGE* T *WHO-LINE-BORDER* T PROPLISTP T +COMPILER::GENCODE-PROGV T FASL::END-OF-DATA-MARK T CL::FIND-SLOT T CL:BIT-ANDC2 T FASL::VERSION-RANGE +T FORMAT-UNTAGGED-CONDITION T *FORMAT-ARGUMENTS* T SEDIT::FIND-STRUCTURE T COMPILER::*INPUT-FILECOMS-VARIABLE* + T *TRACE-DEPTH* T CL::%%MAPCAN-SINGLE T COMPILER::ENV-ANALYZE T *PREFERRED-READING-SYMBOLS* T +XCCS-UTF8-AFTER-OPEN T CL:BIT-EQV T *CONDITION-HANDLER-BINDINGS* T *CURRENT-EXEC-TYPE* T +*DEBUGGER-ENTRY-POINTS* T CL::*GENSYM-PREFIX* T CL:BIT-NAND T SEDIT::COMPUTE-ALL-FORMATS T compilation + T *WHO-LINE-TIME-ENTRY* T CL::%%NO-COPIER T CL::*GENSYM-COUNTER* T CL:BIT-IOR T *INTERLISP-PACKAGE* T + COMPILER::NULL-INTERSECTION T CL:EXP T CL:BIT-NOR T \SFMAKEROTATEDFONT T CL::%%MAPCON-SINGLE T +\CREATE.TEDIT.DELETESELECTION T FB.COPY/RENAME.ONE T CL:EXPT T CL::*GENTEMP-COUNTER* T +XCL::WALK-FLET/LABELS T FASL::VALUE-TABLE-INCREMENT T FORMAT-ADD-COMMAS T *DEBUGGER-MENU-ITEMS* T +CL::%%LOG-PPOLY T COMPILER::*VAR-NUMBER* T DEFMACRO-ARG-TEST T CHAT.WINDOW.SIZE T CL::STOP-STEPPING T +FASL::*CURRENT-OPTABLE* T SEDIT::COMMAND-TABLE-SPEC T FASL::FASL-EXTENDED T \SFROTATEFONTCHARACTERS T +CL:BIT-ORC1 T FASL::DEBUG-READER T UNIX-GET-NEXT-BUFFER T FASL::DEBUG-STREAM T CL:CHAR-HYPER-BIT T +COMPILER::*CURRENT-FUNCTION* T FASL:DUMP-FUNCALL T \SFFIXOFFSETSAFTERROTATION T SETREADMACROFLG T +CL::%%NO-CONSTRUCTOR T BREAKREGIONSPEC T FASL::*BLOCK-LEVEL* T FORMAT-ESCAPE T +FASL::INITIAL-VALUE-TABLE-SIZE T COMP.DELPUSH T COMPILER::*TAIL-RECURSION-THRESHOLD* T SIMPLE-DELETE T + SEDIT::GROW-SELECTION-DEFAULT T CL:CHAR-CONTROL-BIT T \ELIDE.ELEMENT.CHAR T CL:BREAK T +COMPILER::CLOSURE-ANNOTATE-GO T SEDIT::NEXT-LINEAR-ITEM T SEDIT::NOTE-CHANGE-FORMAT T SIMPLE-FIND T +XCL::ED-LAST-INFO T %%BROADCAST-STREAM-DEVICE-CLOSEFILE T *READ-SUPPRESS* T *WHO-LINE-TITLE* T +CL:CHAR-FONT-LIMIT T \ELIDE.TAIL.STRING T \TEDIT.INSERTLINE T CL:BIT-XOR T COMPILER::*REFERENCES* T +FASL::*VALUE-TABLE* T \CREATE.TEDIT.SHIFTEDSELECTION T CHAT.EMACSCOMMANDS T \10MB.NOTESTAT T +GETCLIPBOARD T FORMAT-PRINT-CHARACTER T COMPILER::COMPILE-FILE-NAMED-PROGN T TB.UNDOSELECTION T +COMPILER::FRAME-ANNOTATE T FIND-EXACT-SYMBOL T XCL::*PROFILE-NAME* T \TYPE.FROM.FILETYPE T +COMPILER::*PROCESSED-FUNCTIONS* T RESETINT T COMPILER::*REDO-FLAG* T DELETE.TO.END T RESETTERMCHARS T +\RESETSTACK T SIMPLE-FIND-IF T COMPILER::ALPHA-LAMBDA T \CLOCK0 T PAGEFAULTS T +COMPLEX-NSUBSTITUTE-IF-NOT T \LOCKEDPAGEP T *STANDARD-INPUT* T SI::CONSTRUCT-ENTRY-PRINTING-CODE T +IMPORTFILESCAN T \DUMMYTELERAID T OPT.CHECKTAG T *WHO-LINE-COLOR* T \LOADVMEMPAGE T COMPILER::GENCODE-MV-PROG1 + T \DOTELERAID T CURSORBITMAP T CL:FLOAT-RADIX T COMPILER::*NEW-COMPILER-IS-EXPANDING* T \SERIALNUMBER + T \CHANGECHARSET.IP T COMPILER::EFFECTLESS T FASL:DUMP-VALUE T CL::*DESCRIBE-PRINT-LENGTH* T +\CODEFORTFRAME T SIMPLE-DELETE-IF T COMPILER::COMPILE-FILE-OUTSTANDING-LOOSE-FORMS T FASL:VALUE-DUMPABLE-P + T \DIRTYBACKGROUND T CL:STRINGP T *NOT-YET-EVALUATED* T *WHO-LINE-DISPLAY-NAMES?* T APROPOS-SEARCH T +ABS T COMPILER::*TAG-NUMBER* T \REPEATEDLYEVALQT T COMPILER::CONVERT-TO-CL-LAMBDA T CL::%%NO-PREDICATE + T DMCHAT.CLEARMODES T CL:APPEND T CL::*DESCRIBE-PRINT-LEVEL* T CL:DENOMINATOR T UNIXCOMM-AROUNDEXITFN + T TAILP T FASL:SKIP-TEXT T XCL:*CURRENT-CONDITION* T \UFSCHDIR-C T FORMAT-CAPITALIZATION T +FASL:PROCESS-BLOCK T DOSELECTEDITEM T SEDIT::CLOSE-NODE T COMPILER::CHECK-FOR-UNKNOWN-FUNCTION T +CL:ARRAYP T THIS.PROCESS T \COPYSYS0SUBR T SI::CREATE-TRACED-DEFINITION T LAST T CL:CONSTANTP T +COMPLEX-NSUBSTITUTE T CL::%%RANDOM-SIZE T COMPILER::*SUPPRESS-POPS* T TEDIT.SINGLE.PAGEFORMAT T +CL:GET-UNIVERSAL-TIME T SEDIT::EXTEND-SELECTION T \CreateCursorBitMap T BEEPOFF T CL:NUMERATOR T +SI::ADVICE-FILE-DEFINITIONS T \VAMBufferInit T CL::%%DEFSTRUCT-OPTIONS T CL::*DESCRIBE-INDENT* T +COMPLEX-NSUBSTITUTE-IF T SEDIT::PARSE-INDENT-GROUP-ONE T DEFAULTSUBITEMFN T FASL:READ-TEXT T +SIMPLE-ARRAY-P T XCL:FALSE T *THIS-EXEC-COMMANDS* T *ED-OFFERS-PROPERTY-LIST* T CL:SIMPLE-STRING-P T +COMPILER::WARN-ABOUT-UNKNOWN-FUNCTIONS T SETSCREENCOLOR T \CREATE.TEDIT.RESTART.MENU T \WRITERAWPBI T +\UFSPrintTypeMenu T XCL::*IN-DEFINER* T \RELEASE.FTPCONNECTION T \READRAWPBI T XCL:*LONG-SITE-NAME* T +CL:HOST-NAMESTRING T \GCERROR T FORMAT-DOLLARS T SHOWDISPLAY T \PFCreatePhysicalVolume T FLTFMT T +*PROCEED-CASES* T SI::*BACKQUOTE-LEVEL* T CL:IMAGPART T COMPILER::COMPILE-FILE-DEFINER T +START.CLEARINGHOUSE T TRACEREGION T \CREATE.TEDIT.SELECTION T FORMAT-FIND-COMMAND T FORMAT-GENERAL-AUX + T \LISPFINISH T COMPILER::GENCODE-LITERAL T COMPLEX-REMOVE-IF T \10MB.RESTART.ETHER T \CHARHI T +FASL:SIGNATURE T SEDIT::STRINGIFY-GAP T \ICONW.COPYBUTTONEVENTFN T XCL:*SHORT-SITE-NAME* T +\GATHERSTATS T CL:BIT-ORC2 T CL::*DESCRIBE-DEPTH* T \GETPACKETBUFFER T XCL::WALK-COMPILER-LET T +*DEFAULT-PUSH-EXTENSION-SIZE* T %%FILL-POINTER-STREAM-DEVICE-CLOSEFILE T VRULE.WHENOPERATEDONFN T +SPYOBJ.BUTTON T STRING-ARRAY-P T COMPILER::*STACK-NUMBER* T \IRM.AROUND-EXIT T COMPILER::EFFECTS-ANALYZE + T \UFSGetFreeBlock-C T \PUPLEVEL1STATE T CLOCK0 T FASL:BEGIN-BLOCK T COMPLEX-REMOVE-IF-NOT T +XCL:*TRACE-VERBOSE* T CL:ARRAY-TOTAL-SIZE-LIMIT T CL:LISTP T SEDIT::PARSE--QUOTE T \IDLE.WAIT T +\MOREVMEMFILE T *WHO-LINE-HOST-NAME-ENTRY* T CL:LISP-IMPLEMENTATION-TYPE T DSPBOUT T XCL:*TRACE-LEVEL* + T \MAIKO.DAYTIME T COMPILER::FIND-AND-PERFORM-RPLCONS-TRANSFORM T CL::%%DEFAULT-SLOT-TYPE T +FASL:DUMP-FUNCTION-DEF T XCL::*TRACED-FNS* T COMPILER::CLOSURE-ANNOTATE T +*WHO-LINE-SYMBOL-SPACE-ENTRY* T XCL:*TRACE-LENGTH* T \MAIKO.DAYTIME0 T STACK.FULL.WARNING T +RESHOWTITLE T COMPILER::*REDOING-ANALYSIS* T \MAIKO.CLOCK0 T COMPILER::COMPILE-FILE-MACROLET T +HASH-STRUCTURE-SMASH T \MAIKO.CLOCK T CL:CHAR-DOWNCASE T COMPILER::COMPILE-FILE-COMPILER-LET T +SI::CHANGE-CALLS-IN-LAMBDA T FASL::WRITE-OP T FORMAT-TAB T \FLUSHNSOCQUEUE T *EXEC-ID* T \DSPRATE T +NIL +RECORD \FREELISTCELL (POINTER CONSPAGE) FNTYP (LITATOM DEFINITIONCELL COMPILED-CLOSURE) +TEDIT.COPY.LOOKS (PIECE SELECTION) \UFS.RECOGNIZE.FILE (FDEV) DBG::REGION-NEXT-TO (REGION) +\GETFTPCONNECTION (FTPCONNECTION) \COURIER.CHECK.ERRORS (COURIERERR) \TEDIT.COMMAND.LOOP (STREAM +TEXTSTREAM TEXTOBJ SELECTION STRINGP CHARTABLE) SEDIT::SET-POINT-QUOTE (SEDIT::STRING-ITEM) +TEDIT.DISPLAYTEXT (TEXTOBJ TEXTSTREAM STRINGP) \ALLOCVIRTUALPAGEBLOCK (IFPAGE) FUNCTION.WRAPPER ( +READTABLEP) \ATMOUT (LITATOM PNAMEBASE) SETUPFONTS.PRESS (STREAM) \SET.STORAGE.STATE (IFPAGE) +COPYFILES (FDEV) \TFBRAVO.APPLY.PARALOOKS (TEXTOBJ FMTSPEC) \TEDIT.CONVERT.TO.FORMATTED (TEXTOBJ PIECE +) \GETPILOTBBTSCRATCHBM (BITMAP) DISCARDXIPS (NSOCKET) \READNUMBER.OUTLINEREGION (REGION) +TB.UNSELECT.ALL.ITEMS (TABLEBROWSER TABLEITEM) MAKEBRES (BRES) \DSPRESET.PSC (STREAM \POSTSCRIPTDATA) +OPT.JLENPASS (TAG) \TEDIT.REPAINTFN (TEXTOBJ LINEDESCRIPTOR) \COURIER.CHECK.PROCEDURES (COURIERFN) +\ADVANCE.STORAGE.STATE (IFPAGE) SUBSTRING (LITATOM STRINGP) SEDIT::SET-POINT-LIST (SEDIT::STRING-ITEM +SEDIT::EDIT-NODE) TEDITCHAT.CHARFN (CHAT.STATE TEXTOBJ) MAKETITLEBARICON (WINDOW SCREEN REGION +POSITION) \SPP.GETNEXTBUFFER (SPPCON) SLICERANK (ICML.ARRAYSLICE) DBG::ATTACH-BACKTRACE-MENU (MENU +REGION) \FTP.PRINTPLIST (STRINGP LITATOM PNAMEBASE) \SPP.CLEANUP (SPPCON FDEV) \LEAF.ABORT.FROMMENU ( +SEQUIN) GETHOSTINFO (HOSTS.TXT.ENTRY) \SPP.BOUTS (SPPCON) \DSPCLIPPINGREGION.PSC (STREAM +\POSTSCRIPTDATA REGION) PFI.COLLECT.DEFINERS (PFITYPE) TB.DESELECTRANGE (TABLEBROWSER) FM.ITEMPROP ( +FREEMENUITEM) \LFScavFileName (STRINGP) FB.MAKE.SUBDIRECTORY.ITEM (FBFILEDATA FILEBROWSER) MSPARSE ( +CONJUNCTION PARSED MSVERB) NTHCHARCODE (STRINGP LITATOM) \FIXILINES (TEXTOBJ SELECTION LINEDESCRIPTOR) + MSEDITE (MSANALYZABLE) MKSTRING (LITATOM) \LFUnpackName (PARSEDFILENAME STRINGP) \STARTPAGE.PRESS ( +STREAM) TEDIT.\INSERT (STREAM TEXTSTREAM SELECTION TEXTOBJ) \LEAF.SETCREATIONDATE (LEAFDATA LEAFSTREAM + LEAFINFOBLOCK) TEDIT.GET.OBJECT (TEXTSTREAM PIECE TEXTOBJ) BITMAPBIT (BITMAP STREAM \DISPLAYDATA) +TB.UNSELECT.ITEM (TABLEITEM) SPY.MERGE.CALLEES (SPYRECORD) \SPP.SETFILEPTR (STREAM) STRPOS (LITATOM +STRINGP ARRAYP) SETF-SYMBOL-PACKAGE (CL:SYMBOL) LINE.LESSP (XYPT XXLINE) \DSPCLIPTRANSFORMX ( +\DISPLAYDATA) CREATEW (SCREENREGION REGION) \DSPCLIPTRANSFORMY (\DISPLAYDATA) CENTERINWIDTH (REGION) +ASKUSER (OPTIONS ASKUSER) \GENERIC.CURSOR (SCREEN) \FILLPOLYGON.PSC (POSITION) COERCETEXTOBJ (STREAM +TEXTSTREAM TEXTOBJ PIECE) \BBTCURVEPT (BITMAP PILOTBBT) AIN (STRINGP ARRAYP) DISPLAYLINK/BT (GRAPHNODE +) \TERMINATESPP (SPPCON) AOUT (STRINGP ARRAYP) \SPP.GETFILEPTR (SPPSTREAM STREAM) \EXTENDEDVMEMINIT ( +IFPAGE) BLTCHAR (STREAM) MSEDITF (MSANALYZABLE) \DRAWPOLYGON.PSC (STREAM \POSTSCRIPTDATA POSITION) +\MAIKO.SET.STORAGE.STATE (IFPAGE) TEDIT.UPDATE.SCREEN (TEXTOBJ LINEDESCRIPTOR) TEDIT.GETPOINT (TEXTOBJ + SELECTION) \MEDW.CURSOR (CURSOR BITMAP) FEQP (FIXP FLOATP) \COURIER.CHECKDEF (COURIERPGM) \TEXTCLOSEF + (TEXTOBJ PIECE) \OPENLINEBUF (STREAM) TEDIT.DEFAULT.MENUFN (TEXTOBJ SELECTION) D-ASSEM:INTERN-DCODE ( +FNHEADER) SEDIT::REPLACE-LIST (SEDIT::EDIT-NODE SEDIT::EDIT-SELECTION) \DSPPRINTCR/LF (STREAM +\DISPLAYDATA FONTDESCRIPTOR REGION) TTYIN.LASTINPUT (TTYINBUFFER LINE) DISPLAYLINK/RL (GRAPHNODE) +FASL::DUMP-BITMAP (BITMAP) \BSP.CLOSE.OPEN.SOCKETS (BSPSOC) \CHANGECHARSET.DISPLAY (CHARSETINFO) +\SFFixY (\DISPLAYDATA BITMAP CHARSETINFO) \SLOWBLTCHAR (STREAM FONTDESCRIPTOR \DISPLAYDATA PILOTBBT +BITMAP CHARSETINFO) EXPANDW (SCREEN WINDOW) DISPLAYLINK/TB (GRAPHNODE) TB.INSERT.ITEM (TABLEBROWSER) +FB.THINCOMMAND (FILEBROWSER FBFILEDATA) \CARET.FLASH.AGAIN (CARET1) BMOBJ.COPYFN (BITMAPOBJ) +\LEAF.CREATIONDATE (LEAFINFOBLOCK LEAFSTREAM) TTYINBUFFERSTREAM (TTYINBUFFERSTREAM) +\LEAF.STREAM.IN.QUEUE (SEQUIN STREAM LEAFDATA) SPY.ORIGINAL (SPYRECORD) \SPP.EVENTFN (FDEV) +\STRINGWIDTH.PSC (STREAM \POSTSCRIPTDATA) ARRAYTYP (ARRAYP) TEDIT.PUT.OBJECT (PIECE) +COURIER.EXECUTE.CALL (COURIERPGM COURIERFN) ARRAYORIG (ARRAYP) REPLACEFIELD (FIXP) BRH/OFFSET ( +GRAPHNODE) \SHOWSEL (SELECTION TEXTOBJ LINEDESCRIPTOR) \MAYBEPEEKNS (NSHOSTNUMBER) USERNAME (IFPAGE) +DASSEM.CANSHAREBINDING (FRAME) \POSTSCRIPT.OUTCHARFN (STREAM \POSTSCRIPTDATA FONTDESCRIPTOR) SETD ( +ARRAYP) \TEXTSTREAMBOUT (TEXTSTREAM TEXTOBJ REGION PIECE STREAM STRINGP) ELTD (ARRAYP) +\TEDIT.PROMPT.PAGEFULLFN (REGION) SETUSERNAME (IFPAGE) \MEDW.PUTWINDOWPROP (WINDOW REGION) REHASH ( +HARRAYP HASHSLOT) TEDIT.STRINGWIDTH (STRINGP) \COERCEFONTDESC (FONTDESCRIPTOR FONTCLASS WINDOW STREAM +IMAGEOPS) STKNTHNAME (FX) TEXTUREP (BITMAP) HARRAYP (HARRAYP) TERMTABLEP (TERMTABLEP) DO.CHAT.OPTION ( +CHAT.STATE) LRSH (FIXP) COMP.MLLVAR (VAR) ONEDINSPECT.SETELT (REGION) \LEAF.SETFILETYPE (LEAFDATA +LEAFSTREAM) \MEDW.GETWINDOWPROP (WINDOW) \LEAF.TIMEDOUT.EXCESSIVE (SEQUIN STREAM LEAFDATA) SPY.DELETE +(SPYRECORD) \NSGATELISTENER (NSROUTINGINFO) \DRAWARC.PSC (STREAM \POSTSCRIPTDATA) SUBARRAY (ARRAYP) +TB.SHOW.SELECTION (TABLEBROWSER) \SENDSPP (SPPCON SPPXIP) TEDIT.FIND.OBJECT.SUBTREE (PCTNODE PIECE) +POSTSCRIPT.OUTSTR (STRINGP LITATOM PNAMEBASE) \PNC (STRINGP) TXTFILE (TEXTOBJ) \TEDIT.MOVE.PIECEMAPFN +(PIECE TEXTOBJ) MARGINBAR.CREATE (MARGINBAR REGION) \HCPYMODEBLTCHAR (\DISPLAYDATA) TB.SELECT.ITEM ( +TABLEITEM) INVERT.TEXTURE.BITMAP (BITMAP) GN/TOP (GRAPHNODE) COMP.MLL (TAG JUMP) ULREDISPLAYBITMAP ( +BITMAP REGION) SETY.PRESS (STREAM) \CLEARMAP (FDEV) LOG (FLOATP) FILING.CALL (COURIERFN) +CENTERINHEIGHT (REGION) SEDIT::INSPECT-SELECTION (SEDIT::EDIT-CONTEXT) \MEDW.BITBLT (STREAM SCREEN +WINDOW \DISPLAYDATA) SETX.PRESS (STREAM) \WRITEPAGES (FDEV) SEDIT::INSERT-SPECIAL-CHARACTER ( +SEDIT::EDIT-NODE) \ENDVECRUN (STREAM) DINFO.TOGGLE.GRAPH (DINFOGRAPH) HARRAYPROP (HARRAYP) \TEDIT2 ( +TEXTSTREAM STREAM TEXTOBJ) FB.ADD.FILE (FBFILEDATA FILEBROWSER) GN/BOTTOM (GRAPHNODE) +\FIXLINELENGTH.IP (STREAM) \READPAGES (FDEV) \ACTONDISKPAGES (STREAM ARRAYP M44STREAM DISKREQUEST +IFPAGE) \PS.SCALEREGION (REGION) CLRHASH (HASHSLOT HARRAYP) \TEDIT.MARKINACTIVE (TEXTOBJ) FILEBROWSER +(MENU REGION FILEBROWSER) CL:READ-CHAR (FDEV STREAM) \DISKERROR (DSKOBJ) IRM.DISPLAY.CREF (REGION) +%%COPY-ONED-ARRAY (ONED-ARRAY) \SLOWHCPYMODEBLTCHAR (STREAM FONTDESCRIPTOR \DISPLAYDATA PILOTBBT +BITMAP CHARSETINFO) TTADJUSTWIDTH (LINE) \GENERIC.DSPCREATE (SCREEN BITMAP) MAPHASH (HASHSLOT HARRAYP) + \LEAF.NOT.RESPONDING (SEQUIN STREAM) SPY.DUMP.BUFFER (SPYRECORD) REDISPLAYBITMAP (BITMAP REGION) +\DOACTONDISKPAGES (CB) FB.SEEFULLFN (MENU REGION) TEDIT.UNDO.DELETION (PIECE TEXTOBJ SELECTION) +DINFO.TOGGLE.MENU (DINFOGRAPH) TB.BOTTOM.OF.ITEM (TABLEBROWSER TABLEITEM) OPENBSPSTREAM (BSPSOC) +TERM.HOME (CHAT.STATE) TEDIT.WORDGET (CHARTABLE) \WRITEDISKPAGES (STREAM ARRAYP M44STREAM DISKREQUEST +IFPAGE) TEDIT.QUIT (STREAM TEXTSTREAM TEXTOBJ) \HASHACCESS (HARRAYP HASHSLOT) SEDIT::INSERT-MULTI-ESCAPE + (SEDIT::EDIT-NODE) \DOWRITEDISKPAGES (CB) NUKE-SYMBOL (STRINGP) SCROLLBITMAP (BITMAP REGION) +ADD-SYMBOL (CL:SYMBOL) \TFBRAVO.INSTALL.PAGEFORMAT (TEXTOBJ TFBRAVOPAGEFRAMES) \SWITCHFONTS.PSC ( +\POSTSCRIPTDATA PSCFONT FONTDESCRIPTOR FONTID) \CHARWIDTH.PSC (\POSTSCRIPTDATA STREAM CHARSETINFO) +\TEDIT.MARKACTIVE (TEXTOBJ) DBG::STKPTR-CCODE (FX) DINFO.UPDATE (DINFOGRAPH) TEDIT.FIND.OBJECT (PIECE) + \MEDW.DSPCREATE (SCREEN STREAM \DISPLAYDATA BITMAP) \HASHRECLAIM (HARRAYP HASHSLOT) +\STRINGWIDTH.HCPYMODE (\DISPLAYDATA) DO.MOUSE (MOUSEPOS) \SETEOF (BYTEPTR) \INITSPP (FDEV) +\DSPROTATE.PSC (STREAM \POSTSCRIPTDATA) SHOWRECTANGLE.PRESS (STREAM) TEDIT.REDO.INSERTION (TEXTOBJ +PIECE SELECTION) SPY.MAKE.TREE (SPYDATA SPYRECORD) \FTPERROR (STREAM) \HASHTABLE.DEFPRINT (READTABLEP) + \STORAGE.TYPE (HUNKSTAT CONSPAGE) POSTSCRIPT.SET-FAKE-LANDSCAPE (STREAM \POSTSCRIPTDATA REGION) +\BITBLT.BITMAP.SLOW (BITMAP REGION PILOTBBT) \STORAGE.HUNKTYPE (HUNKSTAT) \STRINGWIDTH.PRESS (STREAM +CHARSETINFO LITATOM PNAMEBASE READTABLEP STRINGP) TEXTUREOFCOLOR (RGB) \MEDW.TOTOPW (SCREEN WINDOW) +\PUNT.BITBLT.BITMAP (BITMAP REGION PILOTBBT) GN/LEFT (GRAPHNODE) \STRINGHASHBITS-UFN (STRINGP LITATOM +PNAMEBASE) DISPLAYLINK/LR (GRAPHNODE) \FM.NUMBER-CHANGESTATE (FREEMENUITEM) COURIER.REP.LENGTH ( +STRINGP) \DODISKCOMMAND (DSKOBJ CB) \STRING-EQUAL-HASHBITS-UFN (STRINGP LITATOM PNAMEBASE) +TEDIT.EDIT.OBJECT (TEXTOBJ STREAM TEXTSTREAM SELECTION LINEDESCRIPTOR) BRH/LAYOUT (GRAPHNODE) +EXPANDBITMAP (BITMAP) SEDIT::INPUT-TOKENDELIM (SEDIT::EDIT-CONTEXT SEDIT::EDIT-SELECTION) +\MAKE.PMAP.DEVICE (FDEV) \CLEANUPDISKQUEUE (DSKOBJ) \SEL.LIMIT (SELECTION) TB.NORMALIZE.ITEM ( +TABLEBROWSER REGION) \IDLERKEYACTION (KEYACTION) SPY.NEXT.TREE (SPYRECORD) \PUNT.BLTSHADE.BITMAP ( +BITMAP REGION PILOTBBT) TEDIT.SETSYNTAX (TEXTOBJ STREAM TEXTSTREAM) \PAGED.GETNEXTBUFFER (STREAM) +\FIXCODENUM (ARRAYP) \MAKE.EXPEDITED.STREAM (STREAM XIP BASEBYTESTREAM) FB.NAMES.DECREASING.VERSION ( +FBFILEDATA) TB.EXPANDFN (TABLEBROWSER) DSPSOURCETYPE (STREAM PILOTBBT) \FIXCODEPTR (ARRAYP) +\DSPCLIPPINGREGION.IP (STREAM INTERPRESSDATA) GN/RIGHT (GRAPHNODE) \CLIPLINE (REGION) \PAGEDSETFILEPTR + (BYTEPTR) DASSEM.DSTOREFNDEF (CODEARRAY) POSTSCRIPT.STARTPAGE (STREAM \POSTSCRIPTDATA) DSPYOFFSET ( +IMAGEOPS STREAM) DINFO.TOGGLE.TEXT (DINFOGRAPH) \PAGED.SETEOFPTR (BYTEPTR) DSPXOFFSET (IMAGEOPS STREAM +) TEDIT.UNDO.INSERTION (TEXTOBJ SELECTION) \IFS.LOOKUPFILE (PUPFILESERVER LOOKUPFILEDATA) DSPCREATE ( +BITMAP) \SEL.LINEDESC (SELECTION) DINFO.TOGGLE.HISTORY (DINFOGRAPH) SEDIT::RESHAPEFN (REGION) +\PAGEDREADP (CHARTABLE) \CARET.FLASH (CARET1 CURSOR) TB.FIND.PREVIOUS.TAIL (TABLEBROWSER TABLEITEM) +\CHECKARRAYBLOCK (ARRAYBLOCK) TEDIT.GETSYNTAX (CHARTABLE TEXTOBJ STREAM TEXTSTREAM) \FM.EDIT-SETUP ( +FREEMENUITEM REGION) \CHECKFREEPAGE (CB DSKOBJ) \ALLOCBLOCK.OLD (ARRAYBLOCK) \PARTEND.PRESS (STREAM) +XCL:ECHO-STREAM-INPUT-STREAM (STREAM) TEXTOBJ (TEXTOBJ STREAM TEXTSTREAM) \ALLOCBLOCK.NEW (POINTER) +XCL:ECHO-STREAM-OUTPUT-STREAM (STREAM) \FM.NUMBER-SETUP (FREEMENUITEM REGION) \NSFILING.GET/SETINFO ( +STREAM) \ALLOCHUNK (POINTER) XCL:TWO-WAY-STREAM-OUTPUT-STREAM (STREAM) TOPW.REPAINTFN (REGION) +\SFFixDestination (\DISPLAYDATA PILOTBBT BITMAP) \HANDLE.RAW.XIP (FIXP NSOCKET) TB.FLUSH.WINDOW ( +TABLEBROWSER) \LEAF.READFILEPROP (LEAFSTREAM LEAFDATA LEAFPACKET) \TEDIT.STRIKEOUT.CARET.OFF (TEXTOBJ) + \MAIKO.ALLOCBLOCK (ARRAYBLOCK) TB.RENUMBER.TAIL (TABLEBROWSER) CHAT.TYPESCRIPT (CHAT.STATE) +\DSPPOPSTATE.PSC (STREAM \POSTSCRIPTDATA POSTSCRIPTXFORM) PUTHASHTEXT (HashFile HashTextPtr) +SEDIT::INSERT-LIST (SEDIT::EDIT-SELECTION SEDIT::EDIT-POINT) XCL:TWO-WAY-STREAM-INPUT-STREAM (STREAM) +COMP.NUMBERTEST (JUMP) CHAT.SWITCH.EMACS (CHAT.STATE) \MAKEFREEARRAYBLOCK (ARRAYBLOCK) CHCON (LITATOM +STRINGP) SEDIT::OUTPUT-CR (SEDIT::LINE-START) \MERGEFORWARD (ARRAYBLOCK) \VFMCreateIntervals (ARRAYP) +XCL:CONCATENATED-STREAM-STREAMS (STREAM) \MEDW.REDISPLAYW (WINDOW) \LINKBLOCK (ARRAYBLOCK) +\SETETHERFLAGS (IFPAGE) UNPACK (LITATOM STRINGP) WTODSY (REGION) SEDIT::INPUT-STRINGDELIM ( +SEDIT::EDIT-CONTEXT) \MERGEBACKWARD (ARRAYBLOCK) XCL:BROADCAST-STREAM-STREAMS (STREAM) +\LEAF.GETFILEINFO.OPEN (STREAM LEAFINFOBLOCK) \TEDIT.STRIKEOUT.CARET.ON (TEXTOBJ) \DELETEBLOCK? ( +ARRAYBLOCK) XCL:SYNONYM-STREAM-SYMBOL (STREAM) SPY.MERGETREE (SPYRECORD) \VIRTUALDISKDA (REALDA DSKOBJ +) \SFFixClippingRegion (\DISPLAYDATA REGION BITMAP) \PREFIXALIGNMENT? (POINTER) GET.OBJ.FROM.USER ( +TEXTOBJ) \FM.EDIT-INSERT (REGION FREEMENUITEM) \DSPPUSHSTATE.PSC (STREAM \POSTSCRIPTDATA) +INTEGERLENGTH (FIXP) \VANILLAHOSTNAMEP (FDEV) \UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (STREAM FDEV) +\LOCATE.NSNET (ROUTING) DCHCON (LITATOM STRINGP) \MEDW.SHAPEW (WINDOW REGION) \DSPTRANSLATE.PSC ( +STREAM \POSTSCRIPTDATA REGION) SPY.SUM (SPYRECORD) TEDIT.MOVE (SELECTION TEXTOBJ) DASSEM.DWRITEFN ( +READTABLEP) CL:APROPOS-LIST (STRINGP) EDITFROMFILE (FILEPKGTYPE) DUNPACK (LITATOM STRINGP) CL:APROPOS +(STRINGP) \CARET.FLASH? (CARET1 TEXTOBJ) TEXTICON (REGION) ALPHORDER (LITATOM STRINGP ARRAYP) +\SFFixFont (\DISPLAYDATA BITMAP FONTDESCRIPTOR) BLOCK (PROCESS FX) SCALE/GRAPH (GRAPH GRAPHNODE) +\SETBRUSH.IP (BRUSH) BKLINBUF (CHARTABLE) \ARRAYBLOCKMERGER (ARRAYBLOCK) SEDIT::INPUT-QUOTE ( +SEDIT::EDIT-NODE) COPYHASHFILE (HashFile) FREEATTACHEDWINDOW (REGION) \CLOSELINE (LINEBUFFER) +CHECK-SYMBOL-NAMESTRING (STRINGP) \TEDIT.UNDERLINE.CARET.ON (TEXTOBJ) TEXTSTREAMP (TEXTOBJ TEXTSTREAM) + \ACCHARWIDTHLIST (FONTBOUNDINGBOX) \INCPARENCOUNT (LINEBUFFER) \SWAPDISKERROR (DSKOBJ) PACKC (STRINGP +) \COPYSEL (SELECTION) TB.UPDATE.DISPLAY (TABLEBROWSER REGION) INVERT.SEGMENT (LINE) \RESETLINE ( +LINEBUFFER) \GETFBB (BOUNDINGBOX) \COPYARRAYBLOCK (ARRAYBLOCK) \ACCHARIMAGELIST (BOUNDINGBOX) +DASSEM.DASSEM (COMINFO DASM FRAME TAG) \LEAF.SETVALIDATION (STREAM LEAFINFOBLOCK LEAFSTREAM) PACK ( +STRINGP) COPYALL (CURSOR) \PACK.ITEM (STRINGP) SPY.MERGE (SPYDATA SPYRECORD) WXOFFSET (REGION) +\SAVELINEBUF (LINEBUFFER FDEV STREAM STRINGP) \SFFIXLINELENGTH (STREAM \DISPLAYDATA) +\ADVANCE.ARRAY.SEGMENTS (POINTER) TTY.PROCESS (PROCESS KEYACTION) \LFINITCASEARRAY (ARRAYP) +\FM.EDIT-PREPARETOEDIT (FREEMENUITEM REGION) OPENPOSTSCRIPTSTREAM (STREAM \POSTSCRIPTDATA REGION) +\PFTransferFilePage (FileDescriptor Label PhysicalVolumeDescriptor) \BYTELT (ARRAYP) COPYHASHITEM ( +HashTextPtr HashFile) CONVERT-LITATOM (CL:SYMBOL STRINGP) \BYTESETA (ARRAYP) TB.PRINT.LINE ( +TABLEBROWSER TABLEITEM) SEDIT::PLACE-CARET-AND-SELECTION (SEDIT::LINE-START) FB.ANALYZE.PATTERN ( +FILEBROWSER) WYOFFSET (REGION) \WORDELT (ARRAYP) \LITATOM.EATCHARS (LITATOM PNAMEBASE) \MEDW.SHRINKW ( +BITMAP WINDOW REGION) \ARRAYTYPENAME (ARRAYP) CL:INTERN (STRINGP) INTERPRESSBITMAP (REGION BITMAP) +TTNTHLINE (LINE) \FM.EDITSTART-SELECTEDFN (FREEMENUITEM) CCODEP (LITATOM) PAGEFULLFN (LINEBUFFER) +WTODSX (REGION) SPY.MAKEGRAPHNODES (SPYRECORD SPYDATA) MAKEBITTABLE (CHARTABLE) IRM.RESET (DINFOGRAPH) + \BLOCKDATAP (ARRAYBLOCK) SETLINELENGTH (STREAM) \DSKDISPLAY.RESHAPEFN (REGION) TB.ITEM.UPDATABLE? ( +TABLEBROWSER) DISPLAYSTREAMP (STREAM IMAGEOPS) \LEAF.REPAIR.BROKEN.PUP (STREAM LEAFSTREAM LEAFDATA +LEAFPACKET) FB.CHECK.NAME.LENGTH (FBFILEDATA FILEBROWSER) \CARET.SHOW (CARET1 SCREEN WINDOW +\DISPLAYDATA STREAM) \SETFATSYNCODE (CHARTABLE) \FM.EDIT-ITEM (REGION FREEMENUITEM) +\SPP.DUPLICATE.REQUEST (FDEV SPPXIP SPPSTREAM SPPCON) WINDOWWORLDP (SCREEN) \SHOW.ARRAY.FREELISTS ( +ARRAYBLOCK) FILEPOS (ARRAYP LITATOM STRINGP FDEV) \LFCreateDirectories (ARRAYP) PRINTDISPLAYNODE ( +GRAPHNODE) SHOW.PRESS (STREAM FDEV FONTDIRENTRY) \STREAMCHARWIDTH (CHARTABLE TERMTABLEP) +\TEDIT.GET.TERMSA.WIDTHS (ARRAYP) \VFMCorrectBufferP (\BTREEBUF) \TEDIT.UNPARSE.PARALOOKS.LIST ( +FMTSPEC) TEDIT.SETFUNCTION (TEXTOBJ STREAM TEXTSTREAM) \TEDIT.SUPERSCRIPT.CARET (TEXTOBJ) +\FM.EDITSTART-SETUP (FREEMENUITEM) \FACECODE (FONTFACE) FFILEPOS (STREAM LITATOM STRINGP FDEV ARRAYP) +SEDIT::LESS-PROMPT-WINDOW (REGION) \PARSEARRAYSPACE1 (ARRAYBLOCK) \TEDIT.COPYINSERTFN (TEXTOBJ) +CHANGEBACKGROUNDBORDER (IOPAGE) TEDIT.GETFUNCTION (TEXTOBJ STREAM TEXTSTREAM READTABLEP CHARTABLE) +PSCFONT.READFONT (PSCFONT) DBG::NEAR-BY-REGION (REGION) TEDIT.MAPPIECES (TEXTOBJ PIECE) +\INITIALIZESWAPDISK (ISFMAP) \TEDIT.UNDERLINE.CARET.OFF (TEXTOBJ) TB.CLOSE/SHRINK (TABLEBROWSER) +EXPANDING-PAGEFULLFN (REGION) \DECPARENCOUNT (LINEBUFFER) SEDIT::INPUT-DOT (SEDIT::EDIT-SELECTION) +DINFO.TITLEMENUFN (DINFOGRAPH) \INTERPRETER1 (FX FNHEADER BF) TEDIT.FIND (TEXTOBJ SELECTION) +TB.SHOW.DELETION (TABLEBROWSER) \SMASHLINK (FX BF) TEDIT.SETSEL (TEXTOBJ SELECTION PIECE) \GETCHAR ( +LINEBUFFER) \STACKARGPTR (FX) SEDIT::LINEAR-ITEM-WIDTH (SEDIT::STRING-ITEM) \FILLBUFFER (LINEBUFFER +CHARTABLE FDEV) DISPLAYNODELINKS (GRAPH) \STARTDISPLAY (BITMAP SCREEN) TEDIT.GET.PARALOOKS (TEXTOBJ +PIECE) \FILLBUFFER.WORDSEPRP (CHARTABLE) CL::%%RATIO-PRINT (READTABLEP) \MEDW.MOVEW (WINDOW SCREEN +REGION POSITION) \INTERPRETER-LAMBDA (BF FX) \DSPTRANSFORMREGION (\DISPLAYDATA) FB.HANDLE.ABORT.BUTTON + (FILEBROWSER) UPDATE/SCROLL/REG (WINDOW REGION SCREEN) DESCRIBE-VIRTUAL-MEMORY (IFPAGE) +SEDIT::COMPUTE-POINT-POSITION-LIST (SEDIT::LINE-START) \DSPTOPMARGIN.PRESS (STREAM) CHARWIDTH ( +FONTDESCRIPTOR CHARSETINFO IMAGEOPS STREAM) VMEMSIZE (IFPAGE) SPY.MAX (SPYRECORD) DSPBACKUP (STREAM +FONTDESCRIPTOR) DINFOGRAPH (DINFOGRAPH) CL::%%COMPLEX-PRINT (READTABLEP) \OFFSETCLIPPINGREGION ( +\DISPLAYDATA) \FM.DISPLAY-SETUP (FREEMENUITEM) \SETUP-COMPILED-CLOSURE-CALL (IFPAGE COMPILED-CLOSURE +FX BF FNHEADER FSB) \TEDIT.PRIMARYW (TEXTOBJ) \PARSE.REMOTE.FILENAME (LEAFDEVICE) \FILLINSPP (XIP +SPPHEAD) \CoerceToDisplayDevice (FDEV) \LEAF.USE.NEW.CONNECTION (LEAFDATA LEAFPACKET STREAM LEAFSTREAM +) SPY.MERGEINFO (SPYDATA) WFROMDS (TEXTOBJ STREAM \DISPLAYDATA WINDOW) \MEDW.RELMOVEW (REGION POSITION +) \FIXP.FROM.FLOATP (FIXP FLOATP) \CURSOR.DEFPRINT (CURSOR) \DSPSPACEFACTOR.PRESS (STREAM) +\NSFILING.WHENCLOSED (FDEV) \ENTITYEND.PRESS (STREAM FDEV) \DSCCOUT (CHARTABLE) ARGLIST (LITATOM +COMPILED-CLOSURE) \DSPFONT.IP (FONTDESCRIPTOR) FW-UPDATE-OFD-WINDOWS (FW-OFD) \PROMPTWINDOW.SET.HEIGHT + (REGION) \MAKEFREEBLOCK (FSB) FB.EDITLISPFILE (FILEBROWSER) ASKUSEREXPLAIN (OPTIONS) +\DSPLINEFEED.PRESS (STREAM) \TEDIT.SUBSCRIPT.CARET (TEXTOBJ) \FREESTACKBLOCK (STK FX BF FSB) +\MEDW.CLOSEW (WINDOW SCREEN) \STKNAME (FX BF) GETWINDOWUSERPROP (WINDOW) FB.COPYFN (FBFILEDATA) +\SPP.SYSPKT (SPPCON XIP SPPHEAD) \SETUP-ENVIRONMENT-CALL (IFPAGE FX BF FNHEADER FSB) DISPLAY/NAME ( +GRAPHNODE) TEDIT.INSERT.OBJECT (TEXTOBJ SELECTION PIECE TEXTSTREAM THISLINE) \LFExtendFile ( +DLIONSTREAM FileDescriptor) DELETE.LONG.SEGMENT (MOUSEPOS) \ENTITYSTART.PRESS (STREAM FDEV) +TEDIT.MAPLINES (LINEDESCRIPTOR TEXTOBJ REGION) \LEAF.READFILENAME (PUPFILESERVER) DINFO.GET.FILENAME ( +DINFONODE DINFOGRAPH) \START.PROCESSES (FX) CHAT.EMACS.MOVE (CHAT.STATE) DRIBBLE (STREAM) PROCESSWORLD + (PROCESS PROCESSQUEUE) \SETUP.DEFAULT.LINEBUF (FDEV) \COERCEASCIITONSFONT (ARRAYP CHARSETINFO) +\MEDW.OPENW (WINDOW SCREEN STREAM PILOTBBT \DISPLAYDATA BITMAP) CHANGEBACKGROUND (SCREEN) FB.CLOSEFN ( +FILEBROWSER) TRIM.BITMAP (BITMAP) \RUN.PROCESS (PROCESS) \TFBRAVO.INIT.CHARLOOKS (CHARLOOKS) \OPENW1 ( +SCREEN WINDOW) DISPLAYGRAPH (POSITION GRAPH GRAPHNODE) \MOVE.WINDOWS.ONTO.SCREEN (WINDOW REGION) +\DSPRIGHTMARGIN.PRESS (STREAM) \CLOSEW1 (SCREEN WINDOW) \ADDLEAFSTRING (LEAFDATA LITATOM STRINGP) +DINFO.OPENTEXTSTREAM (DINFOGRAPH) \TEDIT.ITALIC.CARET.ON (TEXTOBJ) TB.FIRST.VISIBLE.ITEM# ( +TABLEBROWSER REGION) CHAT.HOLD (CHAT.STATE) \LINEBUF.READP (LINEBUFFER) PUTWINDOWPROP (WINDOW SCREEN) +OPENWINDOWS (SCREEN WINDOW) \LONUM (FIXP) SEDIT::INPUT-NORMAL-CHAR (SEDIT::EDIT-CONTEXT SEDIT::EDIT-NODE +) \HINUM (FIXP) \LINEBUF.EOFP (FDEV STREAM LINEBUFFER) PRINTLINE (LINEDESCRIPTOR TEXTOBJ) APPLY ( +LITATOM) TTNEXTPOS (LINE) \CREATELINEBUFFER (STREAM LINEBUFFER FDEV) INVERT.BITMAP.VERTICALLY (BITMAP) + APPLY* (LITATOM) NSOCKETNUMBER (NSOCKET) EQFMTSPEC (FMTSPEC) \FIXPASSWORD (SEQUIN) \CKAPPLYARGS (FX) +\INSPECT/CODE/REPAINTFN (POSITION) TB.LAST.VISIBLE.ITEM# (TABLEBROWSER REGION) CHAT.MENU (CHAT.STATE) +LINEBUFFER-EOFP (FDEV STREAM) TB.FIND.ITEM (TABLEBROWSER) DRAWMARGINSCALE (REGION) FW-RECALL-CMD ( +FW-OFD) SEDIT::START-PROCESS (SEDIT::EDIT-CONTEXT) ICMLARRAY.MENUW.APPLY (REGION) SETXY.PRESS (STREAM) + \SETSPACE.PRESS (STREAM) \MAIKO.CONS.UFN (LISTP CONSPAGE POINTER) \IRM.GET.REF (IRMREFERENCE) +\TEDIT.INSPECTCODE (COMPILED-CLOSURE) \MEDW.CREATEW (WINDOW STREAM REGION SCREEN \DISPLAYDATA) +GRAPHDELETELINK (GRAPH GRAPHNODE) SPY.UPDATE.TITLE (GRAPH SPYRECORD GRAPHNODE) DINFO.FMW.CLOSEFN ( +DINFOGRAPH) \FM.NWAY-SELECTEDFN (FREEMENUITEM) \CLOSELEAFCONNECTION (SEQUIN LEAFDEVICE) +\TEXTMENU.SET.TOGGLE (PIECE PCTNODE TEXTOBJ) \LFExtendFileIfNecessary (FileDescriptor DLIONSTREAM) +TTBEFOREPOS (MOUSEPOS LINE) TWOD.TRACKCURSOR (TWOD.SELECTION) \SETFVARSLOT (FX FNHEADER FVARSLOT) +TEDIT.DEACTIVATE.WINDOW (TEXTOBJ STREAM) TB.SHOW.COPY.SELECTION (TABLEBROWSER) \REQUEUE.ETHERPACKET ( +SYSQUEUE) PROG (FNHEADER) FB.AFTERCLOSEFN (FILEBROWSER) TB.DISPLAY.LINES (TABLEBROWSER REGION) +SEDIT::ASSIGN-FORMAT-QUOTE (SEDIT::LIST-FORMAT) \PROG0 (FX FNHEADER) LINKPARAMETERS (GRAPHNODE) +CL::%%BIGNUM-LOGCOUNT (BIGNUM) SEDIT::SET-PROPS (SEDIT::EDIT-CONTEXT) \DSPLEFTMARGIN.PRESS (STREAM) +\INITCONSPAGE (CONSPAGE LISTP POINTER) IRM.DISPLAY.REF (IRMREFERENCE DINFOGRAPH) +INVERT.BITMAP.HORIZONTALLY (BITMAP) TEDIT.SHOWSEL (TEXTSTREAM SELECTION TEXTOBJ) \NSFILING.EVENTFN ( +FDEV STREAM) \TFBRAVO.WRITE.PARAGRAPH (FMTSPEC) DELETE/AND/DISPLAY/LINK (GRAPHNODE GRAPH) CL:ARRAY-RANK + (GENERAL-ARRAY) \SMASHRETURN (FX) DSPRUBOUTCHAR (STREAM) \FIXLINELENGTH.PRESS (STREAM) GO (FNHEADER +FX BF) \LEAF.ERROR (LEAFERRORDATA STREAM) \SPP.SENDPKT (SPPCON XIP SPPHEAD) EVALA (FNHEADER) +\UPDATE-WHO-LINE-ACTIVE-FLAG (WHO-LINE-ENTRY) CL:ARRAY-TOTAL-SIZE (ARRAY-HEADER) \EVALA (FX FNHEADER) +CHECKCONSPAGES (CONSPAGE) INVERT.LONG.SEGMENT (MOUSEPOS LINE) SPP.OPEN (SPPCON) \DSPYPOSITION.HCPYMODE + (\DISPLAYDATA) \CHECKCONSPAGE (CONSPAGE LISTP) SEDIT::SET-OPTIONS (SEDIT::EDIT-CONTEXT) PUTTEXTPROP ( +TEXTOBJ) CURSOR (CURSOR BITMAP) TITLEDICONW (TITLEDICON) OPT.OPTCHECK (JUMP TAG) +\ADJUSTABLE-STRING-STREAM-OUTCHARFN (STREAM) \LFRemoveDirEntry (DLIONSTREAM FDEV STREAM) +INVERT.BITMAP.DIAGONALLY (BITMAP) \KEYHANDLER1 (RING IFPAGE KEYBOARDEVENT) \PRINSTACKP (READTABLEP) +DINFO.CREATE.FMENU (DINFOGRAPH) MAKE-FILL-POINTER-OUTPUT-STREAM (STREAM) \PRINSTRING (READTABLEP +STRINGP) DEL.PROCESS (PROCESS) \STRING-STREAM-OUTCHARFN (STREAM) COMP.TAGBODY (TAG) \SPY.INTERRUPT (FX +) \TEDIT.UCASE.SEL (SELECTION TEDITHISTORYEVENT TEXTOBJ) LET (FNHEADER) FB.HARDCOPY.DIRECTORY ( +FILEBROWSER FBFILEDATA INFOFIELD) \FM.NWAY-MOVEDFN (FREEMENUITEM REGION) \CKPOSSOUT (STRINGP) \LET0 ( +FX FNHEADER) WRITEIMAGEOBJ (IMAGEFNS IMAGEOBJ) PROCESSP (PROCESS) \AB.BACK (ARRAYBLOCK) TTRACKMOUSE ( +LINE COMPLEXCHAR) %%BROADCAST-STREAM-DEVICE-OUTCHARFN (STREAM) \LITPRIN (CL:SYMBOL READTABLEP LITATOM +PNAMEBASE) \LET* (FX FNHEADER) TEDIT.CARETLOOKS (TEXTOBJ) RELPROCESSP (PROCESS) \FM.NWAY-DOWNFN ( +FREEMENUITEM REGION) \DSKDISPLAY.REPAINTFN (LogicalVolumeDescriptor) LET* (FNHEADER) +\ELIDE.ELEMENT.CHAR (READTABLEP) SPP.DESTADDRESS (SPPCON) GETSTREAMPROP (STREAM) +%%CONCATENATED-STREAM-DEVICE-BIN (STREAM) \DSPCOLOR.IP (INTERPRESSDATA) \LFReturnNextFile ( +GenerateFileState GeneratedFile) PUTSTREAMPROP (STREAM) TB.REPLACE.ITEMS (TABLEBROWSER) +\ELIDE.TAIL.STRING (READTABLEP) \DSPCLIPPINGREGION.PRESS (STREAM REGION) RESTART.PROCESS (PROCESS) +HASHBEFORECLOSE (HashFileEntry HashFile) \LFReturnInfo (GeneratedFile GenerateFileState) +\EXTERNALFORMAT (EXTERNALFORMAT STREAM) MSSOLVE (SENTENCE INRELATION MSSETPHRASE) DEFINEDP (LITATOM) +GETTEXTPROP (TEXTOBJ) WAKE.PROCESS (PROCESS) \VFMSplit1 (Index Interval Buffer) SCALEREGION (REGION) +\FM.NWAY-MESSAGE (FREEMENUITEM) \TEDIT.PUT.CHARLOOKS (CHARLOOKS PIECE) FIND-EXTERNAL-SYMBOL (STRINGP) +SPP.DSTYPE (SPPCON SPPXIP) SUSPEND.PROCESS (PROCESS) PROMPTINWINDOW (POSITION CURSOR) +\TEXTMENU.TOGGLE.WHENOPERATEDFN (SELECTION) CL:FLOAT-SIGN (FLOATP) PLCHAIN (LINEDESCRIPTOR) +\POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS (FONTDESCRIPTOR) ROTATE.BITMAP.LEFT (BITMAP) \LITPRIN.INTERNAL ( +READTABLEP LITATOM PNAMEBASE ARRAYP READCODE CHARTABLE) %%BROADCAST-STREAM-DEVICE-CHARSETFN (STREAM) +ROTATE.BITMAP.RIGHT (BITMAP) TEDIT.KILL (STREAM TEXTSTREAM TEXTOBJ) \DSPXPOSITION.HCPYMODE ( +\DISPLAYDATA) \LEAF.GETFILEDATES (LEAFSTREAM) \SPPWATCHER (SPPCON) ENVAPPLY (LITATOM) FB.ICONFN ( +FILEBROWSER) \CURVE (\DISPLAYDATA) \FTP.NEXTFILE (FDEV STREAM) STREAMP (STREAM) +%%SYNONYM-STREAM-DEVICE-CLOSEFILE (FDEV) TB.SCROLLFN (TABLEBROWSER) CHAT.DID.RESHAPE (CHAT.STATE) +TERM.RESET.DISPLAY.PARMS (CHAT.STATE) \FUNCT1 (FX FNHEADER) \TEXTMENU.TOGGLE.SHOWSELFN (SELECTION) +\LFFindNextFile (FDEV) \MAKESTACKP (STACKP) \PFTrimHelper (FileDescriptor PageGroup) \TRACKCURSOR ( +IOPAGE) %%SYNONYM-STREAM-DEVICE-EOFP (FDEV STREAM) TEDIT.COPY (SELECTION TEXTOBJ PIECE) MENU.HANDLER ( +MENU WINDOW POSITION) %%SYNONYM-STREAM-DEVICE-OUTCHARFN (STREAM) \SYMBOL.ESCAPE.COUNT (READTABLEP +ARRAYP LITATOM PNAMEBASE READCODE CHARTABLE) NCHARS (LITATOM STRINGP READTABLEP) \MAKEFUNARGFRAME ( +FNHEADER STACKP) FB.GET.NEWPATTERN (FILEBROWSER) %%CONCATENATED-STREAM-DEVICE-CHARSETFN (STREAM) +CL:GET-OUTPUT-STREAM-STRING (STREAM) \OUTCHAR (STREAM) \DOBUFFEREDTRANSITIONS (RING KEYBOARDEVENT) +\NUMERIC.PNAMEP (READTABLEP STRINGP LITATOM PNAMEBASE) PROCESS.TTY (PROCESS) SEDIT::GET-CONTEXT ( +SEDIT::EDIT-NODE) STKAPPLY (LITATOM) DSPEOLFN (STREAM \DISPLAYDATA) FB.SET.DEFAULT.NAME.WIDTH ( +FILEBROWSER) \SOUT (IMAGEOPS STREAM STRINGP) SI::UNWIND (FX FNHEADER) FRESHLINE (STREAM FDEV) \AB.NEXT + (ARRAYBLOCK) BRACKET.CURRENT.WORD (LINE CHARTABLE) RETEVAL (FX) SEDIT::SET-SELECTION-COMMENT ( +SEDIT::STRING-ITEM) READTABLEP (READTABLEP) TEDIT.CHARWIDTH (CHARTABLE) RETAPPLY (FX LITATOM) +\INSERTCR (TEXTOBJ PIECE) \DSPSPACEFACTOR.HCPYMODE (\DISPLAYDATA) PNAMESTREAMP (STREAM) PROCESS-STATUS + (FX) TTRUBOUT (LINE) TB.SET.FONT (TABLEBROWSER REGION) \LEAF.ACKED (SEQUIN) \DEFPRINT.BY.NAME ( +READTABLEP) \STREAM.DEFPRINT (STREAM FDEV) COPYVM (IFPAGE) MSSHOWUSE (MSSETPHRASE) WINDOWP (WINDOW) +BLIPVAL (FX) \DSPBOTTOMMARGIN.PRESS (STREAM) \VAROFFSET (FNHEADER FX BF PVARSLOT) \FM.NWAY-SETUP ( +FREEMENUITEM) SETBLIPVAL (FX) \NSFILING.LOGIN (FDEV) SPP.SENDEOM (FDEV STREAM SPPCON SPPXIP) +\FDEV.DEFPRINT (FDEV) BLIPSCAN (FX) VERBNOTICELIST (CVERB VPART) \TEDIT.PEEKBIN.NEW.PAGE (TEXTSTREAM +STREAM FDEV) \NET.SETTIME (NDB) \DSPFONT.PRESS (STREAM CHARSETINFO) \FTP.CLOSEFILE (FDEV STREAM) +%%TWO-WAY-STREAM-DEVICE-BACKFILEPTR (STREAM) \CARET.DOWN (CARET1 WINDOW) \REALFRAMEP (FNHEADER FX) +%%TWO-WAY-STREAM-DEVICE-OUTCHARFN (STREAM) PRINTNUM-TO-STRING (FLOATFMT FIXFMT) \SPP.PREPARE.INPUT ( +SPPCON STREAM SPPSTREAM SPPXIP XIP) INPUT (STREAM) EXPRP (LITATOM) \IPCURVE2 (SPLINE) OPT.DS1 (FRAME +JUMP) \STKARG (BF FX FNHEADER PVARSLOT) WINDOW.BITMAP (REGION) SEDIT::SET-POINT-COMMENT (SEDIT::WEAK-LINK +) %%TWO-WAY-STREAM-DEVICE-CLOSEFILE (FDEV) \LFSortFiles (GeneratedFile) TWODINSPECT.ADJUSTSELECTION ( +TWOD.SELECTION) TEDIT.INSERT.UPDATESCREEN (TEXTOBJ SELECTION LINEDESCRIPTOR REGION) MSGETDEF ( +MSANALYZABLE) POSTSCRIPT.INIT (FONTCLASS) \STREAM.NOT.OPEN (STREAM) \SPP.CREATE.STREAMS (SPPCON +SPPSTREAM STREAM FDEV) \FM.STATE-CHANGESTATE (FREEMENUITEM) \LEAF.FIX.BROKEN.SEQUIN (SEQUIN LEAFDATA +FDEV LEAFSTREAM STREAM) %%TWO-WAY-STREAM-DEVICE-EOFP (FDEV STREAM) PROCESS.WINDOW (PROCESS) COMP.PROG +(TAG) ONED.TRACKCURSOR (ONED.SELECTION) \INSTALL.EXTERNALFORMAT (EXTERNALFORMAT) \EVALFORM (LITATOM) +\GC.HANDLEOVERFLOW (HTOVERFLOW FIXP) SPP.CLOSE (SPPCON) \REMOVE.EXTERNALFORMAT (EXTERNALFORMAT) +\TFBRAVO.HANDLE.HEADING (FMTSPEC) DEFAULT.ADDNODEFN (GRAPH) \DRAWLINE.IP (IPSTREAM INTERPRESSDATA) +\DTEST.UFN (FIXP) WINDOW.MOUSE.HANDLER (WINDOW POSITION) %%FILL-POINTER-STREAM-DEVICE-GETFILEPTR ( +STREAM) FB.BROWSECOMMAND (FILEBROWSER) SCREENBITMAP (SCREEN WINDOW) \DEFINEFONT.PRESS (STREAM) +\BACKTRACE (FX) SETUPSTACK (IFPAGE) CREATE.NUMBERPAD.READER (MENU) DINFO.CLOSEFN (DINFOGRAPH) +\FM.STATE-SELECTEDFN (MENU FREEMENUITEM) \LEAF.HANDLE.INPUT (SEQUIN LEAFDATA LEAFERRORDATA LEAFPACKET +STREAM LEAFSTREAM) CHAT.TYPEOUT.CLOSE (CHAT.STATE) TEXTSTREAM (STREAM TEXTSTREAM TEXTOBJ) TB.REPAINTFN + (TABLEBROWSER) %%TWO-WAY-STREAM-DEVICE-CHARSETFN (STREAM) \SAVEVMBACKGROUND (IFPAGE) +\TEXTMENU.TOGGLEFN (SELECTION) \SETFVAR.UFN (VCELL) \LFHighestVersions (GeneratedFile) +\GET.EXTERNALFORMAT.FROM.NAME (EXTERNALFORMAT) %%SYNONYM-STREAM-DEVICE-GET-STREAM (STREAM) +DO.SHIFTED.SELECTION (MOUSEPOS LINE) \PROC.RESUME (FX) \GCMAPTABLE (HTOVERFLOW FIXP) +DEFAULT.INSPECTW.PROPCOMMANDFN (MENU) \FLUSHNSOCQUEUE (NSOCKET) \DSPRIGHTMARGIN.HCPYMODE (\DISPLAYDATA +) \INTERPRETER (LITATOM IFPAGE FNHEADER) \LFFindInfo (GeneratedFile FileDescriptor DLIONSTREAM) +TB.NUMBER.OF.ITEMS (TABLEBROWSER TABLEITEM) \LFWriteLeaderPage (DLIONSTREAM) TTYINBUFFERPEEK ( +TTYINBUFFERSTREAM) MKATOM (STRINGP) \TEDIT1 (TEXTSTREAM TEXTOBJ) \DSPFONT.HCPYMODE (CHARSETINFO) +\SPP.DEFAULT.ERRORHANDLER (STREAM SPPCON) \FM.STATE-SETUP (FREEMENUITEM) INVERT.BITMAP.B/W (BITMAP) +\LEAF.TIMEDIN (SEQUIN) \INSERTCH (TEXTOBJ STRINGP EDITMARK BTREENODE PIECE) \SPP.ESTABLISH (SPPCON +SPPXIP) PROCESS.EVAL (PROCESS) \TEDIT.SMALLER.CARET (TEXTOBJ) \TEDIT.COMMAND.RESET.SETUP (TEXTOBJ) +\PRINTFRAME (FX FNHEADER PVARSLOT FVARSLOT) ONFILE (MSANALYZABLE) FB.FASTSEECOMMAND (FILEBROWSER) +LISTP (POINTER) \PRINTBF (BF) \FLUSHPUPSOCQUEUE (PUPSOCKET) \CREATECHARSET.IP (CHARSETINFO +FONTDESCRIPTOR) \PEEKBIN (FDEV) COLLECT.CHILD.NODES (GRAPHNODE GRAPH) \DECODETRANSITION (KEYACTION +KEYBOARDEVENT) \LEAF.RECONNECT (PUPFILESERVER SEQUIN) DINFO.EXPANDFN (DINFOGRAPH) \SCANFORNTENTRY ( +FNHEADER) \LEAF.TIMEDOUT (SEQUIN) \RECLAIMSTACKP (STACKP FX) DECODE/WINDOW/OR/DISPLAYSTREAM (WINDOW) +TTYDISPLAYSTREAM (STREAM \DISPLAYDATA) EDITCALLERS (READER-ENVIRONMENT) DINFO.SHRINKFN (DINFOGRAPH) +CHARACTER (STRINGP) SEDIT::REPAINT (SEDIT::WEAK-LINK SEDIT::LINE-START SEDIT::STRING-ITEM) +\SETXFORM.PSC (\POSTSCRIPTDATA REGION) TB.COPYBUTTONEVENTFN (TABLEBROWSER) TTYINBUFFERBIN ( +TTYINBUFFERSTREAM) RECURSIVE.COLLECTDESCENDENTS (GRAPHNODE) \PFPutMarkerPage (PhysicalVolumeDescriptor +) \TEDIT.RESTARTFN (TEXTOBJ TEXTSTREAM STREAM) PRIN2 (READTABLEP STREAM) PRESSWINDOW (STREAM) +\TEDIT.NEWREGIONFN (POSITION) \DSKDISPLAY.CREATE.WINDOW (POSITION REGION) FB.MAKECOUNTERWINDOW ( +FILEBROWSER) CLEARW (WINDOW) SPP.CLEAREOM (SPPSTREAM) \BACKFILEPTR (FDEV) \FAX.PARSE.NAME (STRINGP) +\GETINTEGERPART (FIXP) FB.ADD.FILEGROUP (FILEBROWSER FBFILEDATA) MEASUREGRAPHNODE (GRAPHNODE) +\DRAWCURVE.IP (POSITION) FW-INIT-PROPS (POSITION) \FM.3STATE-CHANGESTATE (FREEMENUITEM) \DEFINEDEVICE +(FDEV) CL:COMPILED-FUNCTION-P (ARRAYP) MSINTERPRET (SENTENCE MSSETPHRASE MSANALYZABLE THAT PATHOPTIONS +) \PUTSYSBUF (RING) CL:MAKE-ECHO-STREAM (STREAM FDEV) U-CASE (LITATOM STRINGP PNAMEBASE) +\FTP.GETFILEINFO (STREAM) INITGC (HTCOLL) CL:MAKE-SYNONYM-STREAM (STREAM FDEV) CL:MAKE-TWO-WAY-STREAM +(STREAM FDEV) FIXVERBSETTYPE (MSSETPHRASE THAT) CHANGE.NODEFONT.SIZE (GRAPHNODE GRAPH) \VFMMerge1 ( +Interval Buffer Index) NEWLINE.PRESS (STREAM) PROCESS.APPLY (PROCESS) SCANFORWARD (LINE) +\TEDIT.LARGER.CARET (TEXTOBJ) \LEAF.WHENCLOSED (SEQUIN LEAFPACKET PUPFILESERVER) \LINEBLT (PILOTBBT) +\GETDEVICEFROMHOSTNAME (FDEV) \HARDCURSORUP (CURSOR BITMAP) \TEDIT.WORDDELETE (TEXTOBJ SELECTION +CHARTABLE PIECE TEXTSTREAM) FB.GETALLFILEINFO (FILEBROWSER) TTYINBUFFERREADP (TTYINBUFFERSTREAM) +MOVEDESCENDENTS (GRAPHNODE) \CURSORBITSPERPIXEL (CURSOR) COPYIMAGEOBJ (IMAGEOBJ) EQCLOOKS (CHARLOOKS +FONTCLASS) \FTP.DELETEFILE (FDEV) \PRINTNSADDRESS (STREAM) FB.MAKERIGIDWINDOW (REGION) +\TFBRAVO.PARSE.PARA (RUN) \CURSORDESTINATION (BITMAP CURSOR IOPAGE PILOTBBT) \CCODEARGLIST (FNHEADER) +PRESS.BITMAPSCALE (REGION) \CLOSEFILE (IMAGEOPS STREAM FDEV) \EVENT.DEFPRINT (EVENT) +DINFO.READ.KOTO.GRAPH (DINFOGRAPH) DOICONWINDOWCOM (WINDOW) \DELETEFILE (FDEV) PACK* (STRINGP CL:SYMBOL +) \LEAF.GETFILEINFO (STREAM PUPFILESERVER SEQUIN) \WWCHANGESCREENSIZE (SCREEN) \CCODEIVARSCAN ( +FNHEADER) \TFBRAVO.ADD.NAMEDTAB (FMTSPEC TEXTOBJ) \LEAF.IDLE? (SEQUIN) SPY.FIND.TREE (SPYRECORD) +\TFBRAVO.WRITE.RUNS (PARA RUN) FB.MAYBE.WIDEN.NAMES (FILEBROWSER) ICONW.SHADE (BITMAP) \SHIFT.DOCUMENT + (ARRAYP PIECE FMTSPEC) \BLKEXPONENT.UFN (FLOATP) POSTSCRIPT.FONTCREATE (PSCFONT FONTDESCRIPTOR +CHARSETINFO) \HARDCURSORPOSITION (IOPAGE) \NSNET.CLOSERP (NSADDRESS) \DEVICEEVENT (FDEV STREAM) +PARSE-NSADDRESS (STRINGP) \FM.3STATE-DOWNFN (FREEMENUITEM REGION) ICONPOSITION.FROM.WINDOW (WINDOW +REGION SCREEN) \SPP.HANDLE.DATA (SPPCON SPPXIP STREAM) FB.ADJUST.DATE.WIDTH (FILEBROWSER INFOFIELD +FBFILEDATA) \SOFTCURSORUP (CURSOR BITMAP PILOTBBT) \SPP.CREATE.WATCHER (SPPCON) \LFVersions ( +ExpandedName FDEV DLIONSTREAM) MENUWMINSIZEFN (MENU) TTYINBUFFEREOFP (TTYINBUFFERSTREAM) +\SOFTCURSORUPCURRENT (CURSOR BITMAP PILOTBBT) \TEDIT.LOOKS (TEXTOBJ SELECTION) \RTP.HANDLE.RFC (PORT) +OPENPRSTREAM (REGION STREAM) HPRINT.IMAGEOBJ (IMAGEFNS IMAGEOBJ) DOATTACHEDWINDOWCOM (MENU) +TB.DO.ITEM.SELECTION (TABLEBROWSER) FULLPRESSBITMAP (REGION STREAM) \FM.3STATE-SETUPOFFBITMAP ( +FREEMENUITEM REGION) \BLTSHADE.IP (INTERPRESSDATA IPSTREAM) CHAT.OPTIONMENU (MENU) FB.HEADINGW.DISPLAY + (REGION FILEBROWSER INFOFIELD) PRINTCURSOR (CURSOR) FILES?1 (FILEPKGTYPE) \CHARWIDTH.IP (CHARSETINFO) + \GENERATEFILES (FDEV) TB.MAKE.BROWSER (TABLEBROWSER) FASL::FAT-STRING-P (STRINGP) TTYINBUFFERBACKPTR +(TTYINBUFFERSTREAM) \RTP.FILTER (BSPSOC) \FTP.REGISTER (STREAM) \MONITORLOCK.DEFPRINT (MONITORLOCK) +IRM.LOOKUP (DINFOGRAPH) CL:PROBE-FILE (STREAM) SCANBACK (LINE) PRINTPACKETQUEUE (SYSQUEUE) \LEAF.IDLE +(SEQUIN FDEV LEAFSTREAM) \SPP.RELEASE.ACKED.PACKETS (SPPCON) \TFBRAVO.WRITE.RUN (RUN CHARLOOKS) +DINFO.CREATE.GRAPH.WINDOW (DINFOGRAPH REGION) \FM.3STATE-SETUP (FREEMENUITEM) CL:READ-BYTE (FDEV +STREAM) ONEDINSPECT.ADJUSTSELECTION (ONED.SELECTION) TB.REDISPLAY.ITEMS (TABLEBROWSER) CL:VALUES (FX) +TOPW.ADJUSTSELECTION (ONED.SELECTION) OPT.DELCODE (TAG) \TEDIT.TEXTBIN.NEW.PAGE (TEXTSTREAM STREAM) +\SIMULATE.UNBIND (FX) FB.STARTUP (MENU) \PFGetMarkerPage (PhysicalVolumeDescriptor) \GETFILENAME (FDEV +) CL:VALUES-LIST (FX) SEDIT::BACKSPACE (SEDIT::EDIT-NODE) CL:READ-LINE (FDEV STREAM) \GENERIC.OUTFILEP + (FDEV) \PUTONSCREENW (REGION WINDOW SCREEN) \LOADNSADDRESS (NSADDRESS) FB.SETNEWPATTERN (FILEBROWSER) + \MAKE.PROCESS1 (FX) SEDIT::PRINT-STRING (WINDOW STRINGP STREAM) \TEDIT.UNPARSE.CHARLOOKS.LIST ( +CHARLOOKS) \TEXTSETEOF (STREAM BYTEPTR) CL:READ-FROM-STRING (FDEV) \PROCESS.MOVEFRAME (FX BF FSB) +\FTP.UNREGISTER (FDEV STREAM) CL::VALUES-UFN (FX) SEDIT::RELINEARIZE (REGION) +SORT.NSADDRESSES.BY.DISTANCE (NSADDRESS) \LFCASEARRAYFETCH (ARRAYP) CL::VALUES-LIST-UFN (FX) +\TEDIT.MAINW (TEXTOBJ) \LEAF.OPENFILE (STREAM PUPFILESERVER LEAFSTREAM SEQUIN) \OPENFILE (STREAM FDEV) + \SPPCONNECTION (SPPCON) TB.DO.UNLESS.BUSY (TABLEBROWSER) \LEAF.OPENERRORHANDLER (SEQUIN) +\SPP.HANDLE.ATTN (SPPCON SPPXIP) \CLEARSYSBUF (RING) MENUWRESHAPEFN (MENU REGION) CL:RENAME-FILE ( +STREAM) CHARSET (IMAGEOPS STREAM) PAINTW.READCOMMAND (MENU) \GETSYSBUF (RING) \IMAGEUSERPROP (IMAGEOBJ +) SETFILEINFO (STREAM FDEV BYTEPTR) CALL.MOVENODEFN (GRAPH) ICMLARRAY.GETMENUWGROUP (POSITION REGION) +LISTHARD (MSSETPHRASE) \TEXTOUTCHARFN (TEXTOBJ TEXTSTREAM) \FTPINIT (FDEV) WHO-LINE-VMEM (IFPAGE) +\TEDIT.ITALIC.CARET.OFF (TEXTOBJ) \WRITEPRESSBITMAP (REGION STREAM) \ONSCREENW (SCREEN WINDOW REGION) +\NSYSBUFCHARS (RING) \RECLAIMCODEBLOCK (FNHEADER) SEDIT::SCAN-FOR-BOUNDS (SEDIT::WEAK-LINK +SEDIT::LINE-START SEDIT::STRING-ITEM) PAINTW.READMODE (MENU) FILEPKGTYPE (FILEPKGTYPE) +COURIER.WRITE.SEQUENCE.UNSPECIFIED (STRINGP) SEDIT::INSERT-COMMENT (SEDIT::EDIT-SELECTION) +EDITMOVESUBTREE (GRAPH) \TEDIT.ACTIVE.WINDOWP (TEXTOBJ) HARDCOPYW (REGION SCREENREGION BITMAP) +\SYSBUFP (RING) \SFFixY.HCPYMODE (\DISPLAYDATA BITMAP CHARSETINFO) \LEAF.WRITEPAGES (STREAM LEAFDATA +LEAFSTREAM) DINFO.GET.GRAPH.WINDOW (DINFOGRAPH) \ICONW.REPAINTFN (BITMAP) \FM.TOGGLE-CHANGESTATE ( +FREEMENUITEM) \PEEKSYSBUF (RING) ADDTOFILES? (FILEPKGTYPE) FB.SET.BROWSER.TITLE (FILEBROWSER) +\KEYBOARDINIT (RING) INSPECT.INVERTSELECTION (INSPECT.SELECTION) \DSPOPERATION.IP (INTERPRESSDATA) +ORDERFROMBOTTOMTOTOP (SCREEN WINDOW) \SETLOCALNSNUMBERS (IFPAGE) \RENAMEFILE (FDEV) \ALLOCLOCKED ( +POINTER) \REVALIDATEFILE (FDEV) GRAPHBUTTONEVENTFN (GRAPH) CREATEHASHFILE (STREAM HashFile) +KEYACTIONTABLE (KEYACTION) MOVEATTACHEDWINDOWTOPLACE (REGION) OPENPUPSOCKET (PUPSOCKET) +\LEAF.READPAGES (LEAFSTREAM SEQUIN STREAM LEAFDATA) DELETE.LONG.SEGMENT1 (LINE) \RECLAIMARRAYBLOCK ( +ARRAYBLOCK) FB.DISPLAY.COUNTERS (FILEBROWSER) \PROCESS.EVENTFN (EVENT) PRINTBITMAP (BITMAP) TEDIT.REDO + (TEXTOBJ SELECTION) TOPW.BUTTONEVENTFN (ONED.SELECTION) \PAGED.REVALIDATEFILELST (FDEV) +\TEXTOPENF-SUBTREE (PCTNODE PIECE STREAM) \CAR.UFN (LISTP) \PRINT-REVALIDATION-RESULT (STREAM) +\CHARWIDTH.HCPYMODE (\DISPLAYDATA) \CDR.UFN (LISTP POINTER) \LFDirectorySearch (DIRSEARCHSTATE +DLIONSTREAM FDEV STREAM) \LFFindDirHole (ExpandedName DLIONSTREAM FDEV STREAM) \KEYBOARDEVENTFN ( +IFPAGE) NTYPX (POINTER) TWODINSPECT.REPAINTFN (REGION) CLOSEW (SCREEN WINDOW) \DELETECH (TEXTOBJ PIECE +) KEYACTION (KEYACTION) \CHANGECHARSET.HCPYMODE (CHARSETINFO) \LEAF.TRUNCATEFILE (LEAFDATA LEAFSTREAM) + GETBOXPOSITION.FROMINITIALREGION (REGION) BREAK.PROCESS (PROCESS) \TEDIT.SHOWCARETLOOKS (TEXTOBJ +CHARLOOKS) \FM.TOGGLE-DOWNFN (FREEMENUITEM REGION) \KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS (IFPAGE) +\UNWIND.UFN (FX) PFI.PRINT.BITMAP (STREAM) TEDIT.NEXT (TEXTOBJ SELECTION) \CHECKAPPLY* (LITATOM) +\PAGED.REVALIDATEFILES (STREAM FDEV) ICMLARRAY (REGION) MSINTERPA (MSSETPHRASE) FB.CREATE.FILEBUCKET ( +FILEBROWSER FBFILEDATA) TEDIT.STYLESHEET (TEXTOBJ) LOADPOLY (POLYNOMIAL) \TEDIT.GET.CHARLOOKS (PIECE) +\BUFFERED.REVALIDATEFILE (FDEV) OVERLAPPINGWINDOWS (SCREEN WINDOW) \HTFIND (MDSTYPEWORD POINTER GC +HTCOLL) \BUFFERED.REVALIDATEFILELST (FDEV) PAINTW.READBRUSHSIZE (MENU) \SCALEDBITBLT.IP ( +INTERPRESSDATA IPSTREAM REGION) \LEAF.SETFILEINFO (STREAM) \TRUNCATEFILE (FDEV) DINFO.LOOKUP ( +DINFOGRAPH) \FM.TOGGLE-SETUP (FREEMENUITEM) \SETGLOBALVAL.UFN (VALINDEX) \FILE-CONFLICT (STREAM FDEV) +\PAGED.REVALIDATEFILE (FDEV) DINFO.FIND (DINFOGRAPH) \TEDIT.ABBREV.EXPAND (TEXTSTREAM TEXTOBJ +SELECTION) \RPLACA.UFN (LISTP) GETDEFN (LITATOM) ICMLARRAY.GETREGIONFN (REGION POSITION) \PFNewPages ( +FileDescriptor PageGroup) \RPLACD.UFN (LISTP POINTER CONSPAGE) NSNET.DISTANCE (NSADDRESS) +\PROCESS.MAKEFRAME0 (FX FSB FNHEADER LITATOM) MENU (MENU) REHASHFILE (HashFile) TB.ITEM.FROM.YCOORD ( +TABLEBROWSER) \CONS.UFN (LISTP CONSPAGE POINTER) GROW/REGION (REGION) ShowIntervals (Interval) NEWDEFC + (ARRAYP) TEDIT.PARALOOKS (SELECTION TEXTOBJ FMTSPEC PIECE) PAINTW.READBRUSHSHAPE (MENU) +\RESETKEYBOARD (KEYBOARDEVENT RING) SHOWREGION (REGION) FB.INSERT.FILE (FILEBROWSER FBFILEDATA) +TOLINKS (GRAPHNODE) \ENDPAGE.PRESS (STREAM FDEV) \CHECK.PQUEUE (PROCESS) TWODINSPECT.BUTTONEVENTFN ( +TWOD.SELECTION) TEDIT.SUBSTITUTE (PIECE TEXTOBJ SELECTION STRINGP) \FINDKEY.UFN (FX BF) \VFMInsert1 ( +Buffer Index) PPROC1 (MONITORLOCK) SETINTERRUPT (KEYACTION) CLRPROMPT (WINDOW) GRAPHADDLINK (GRAPH +GRAPHNODE) GETWINDOWPROP (WINDOW SCREEN) MSINTERPRETSET (MSSETPHRASE SENTENCE APPLY INRELATION GETHASH + QUOTE CSET IN BLOCKS FIELDS THAT MSVERB CVERB PATHS) NUMBERPAD.READ (MENU) GETINTERRUPT (KEYACTION) +\PRESSCURVE2 (STREAM SPLINE) \KEYACTION1 (KEYACTION) \LEAF.GETFILENAME (PUPFILESERVER SEQUIN STREAM) +\RESTLIST.UFN (FX BF) FULLNAME (STREAM) \PROCESS.MAKEFRAME (IFPAGE) SCROLLBYREPAINTFN (REGION SCREEN +WINDOW) \READBINARYBITMAP (BITMAP) \RPLCONS (POINTER CONSPAGE LISTP) \FIXDLINES (TEXTOBJ +LINEDESCRIPTOR) MSNEXTWORD (PARSED MSVERB) WHICHW (POSITION SCREEN WINDOW) IMAGEFNSP (IMAGEFNS) +COURIER.WRITE.STRING (STRINGP) \INSUREWINDOW (WINDOW) GETFILEINFO (STREAM FDEV) \ENVCALL.UFN (IFPAGE) +\FILE.NOT.OPEN (STREAM) \FILE.WONT.OPEN (STREAM) ICONW.PRINT-JUSTIFIED (REGION) \STKSCAN (FX VALINDEX +FNHEADER BF PVARSLOT FVARSLOT) PUTDEFN (LITATOM CODEARRAY DEFINITIONCELL POINTER) DSPFILL (REGION) +\LFFileName (ExpandedName) SETHASHSTATUS (HashFile) \MAIKO.IO-INTERRUPT (INTERRUPTSTATE) MSNEGATESET ( +MSSETPHRASE) \IS.NOT.RANDACCESSP (STREAM) \MISCN.UFN (BF MISCN-UFN-ENTRY FX) \LFMakeDirHole ( +FileDescriptor DLIONSTREAM) TB.ITEM.VISIBLE? (TABLEBROWSER REGION) DINFO.ADD.FMENU (DINFOGRAPH) +\UNBOXFLOAT3 (FX) TEDIT.UNDO (TEXTOBJ) CL::%%STATS-OBJECT-DIFFERENCE (MISCSTATS) RESETKEYACTION ( +KEYACTION) MB.NWAYBUTTON.SELFN (SELECTION) \TYPEMASK.UFN (POINTER) RESHAPEBYREPAINTFN (REGION) TOPWP ( +SCREEN WINDOW) FIND.PROCESS (PROCESS) TWODINSPECT.COPYBUTTONFN (TWOD.SELECTION) \TEXTCLOSEF-SUBTREE ( +PCTNODE PIECE) \HANDLE.NS.ROUTING.INFO (NSROUTINGINFO FIXP) \PRINDATUM (READTABLEP) \TEDIT.DELETE ( +SELECTION TEXTOBJ LINEDESCRIPTOR) CL:TRUENAME (STREAM) \DRAWLINE.UFN (BITMAPWORD) DINFO.INVERT.NODE ( +GRAPH GRAPHNODE DINFOGRAPH) DINFO.DEFAULT.MENU (DINFOGRAPH) \FM.MOMENTARY-SETUP (FREEMENUITEM) +\STORE.N.UFN (FX) \MAIKO.ETHER-INTERRUPT (INTERRUPTSTATE) \PARAS.IN.SEL (SELECTION PIECE) \COPY.N.UFN +(FX) OPT.FRAMEDEL (FRAME TAG) SHADEITEM (MENU REGION) \NSFILING.GETFILE (STREAM) \LFMakeLeaderPage ( +LeaderPage FileDescriptor) \MAIKO.CONSOLE-LOG-PRINT (INTERRUPTSTATE) REPLACEHASHKEY (HashFile) \RETURN + (FX) \PFTransferPage (DLION.DOB IFPAGE) \CURVE2 (SPLINE \DISPLAYDATA BITMAP) ERROR! (FX) +CHECK/MENU/IMAGE (MENU WINDOW BITMAP) \LFMakeDirEntry (ExpandedName FileDescriptor DLIONSTREAM) +\MYARGCOUNT (BF FX) PARAMETRICSPLINE (POSITION) \ARG0 (FX BF) \FILINGSESSION.DEFPRINT (WINDOW) +TEDIT.INSERT (SELECTION TEXTOBJ TEXTSTREAM STRINGP) TB.RESHAPEFN (TABLEBROWSER) \PRINTBINARYBITMAP ( +BITMAP) \DRAWPOLYGON.IP (POSITION) FB.INCREASING.VERSION (FBFILEDATA) PRIN3 (READTABLEP) +SHIFT.BITMAP.UP (BITMAP) GETBOXPOSITION (SCREENPOSITION) DISPLAYLINK (GRAPH) \CLOSEF.PRESS (STREAM) +FW-INIT-MENUS (MENU) \PRINT-USING-ADDRESS (READTABLEP) RIGHTW.ADJUSTSELECTION (ONED.SELECTION) +\PROCESS.GO.TO.SLEEP (EVENT FX) HEIGHTIFWINDOW (SCREEN) ADDMENU (MENU REGION POSITION SCREEN) +DINFO.LAYOUTGRAPH (DINFOGRAPH DINFONODE) TEDIT.RESET.EXTEND.PENDING.DELETE (SELECTION TEXTOBJ) +CURRENTINTERRUPTS (KEYACTION) DO.INSERT.LINE (LINE REGION) \TEDIT.CENTER.SEL.REV (SELECTION) +RESET.INTERRUPTS (KEYACTION) DINFO.SHOWGRAPH (REGION) \FM.INSUREVISIBLE (REGION) +FB.CANONICAL.DIRECTORY (FILEBROWSER) RIGHTW.BUTTONEVENTFN (ONED.SELECTION) FIND.PACKAGE (HARRAYP +HASHSLOT) PRESSBITMAP (REGION STREAM) \FM.CLEARITEM (FREEMENUITEM REGION) INSERTHASHKEY (HashFile) +\GCRECLAIMCELL (GCPTR) \GCSCAN1 (GC) \GETWINDOWHEIGHT (REGION WINDOW SCREEN) FB.MAKE.BROWSER.BUSY ( +FILEBROWSER) \LEAF.REOPENFILE (LEAFINFOBLOCK LEAFSTREAM STREAM) \GETWINDOWWIDTH (REGION WINDOW) +PROCESS.NAME (PROCESS) CREATE.NEW.NODEPOSITION (GRAPHNODE POSITION) \RETCALL (IFPAGE) %%AREF1 ( +ARRAY-HEADER) COERCETOBITMAP (REGION) %%ASET1 (ARRAY-HEADER) MSONPATH (PATHOPTIONS) \FDEVINSTANCE ( +FDEV) OPENWP (WINDOW) OPT.FRAMELOCAL (FRAME) \POP.N.UFN (FX) TRANSGRAPH (GRAPH GRAPHNODE) CL::%%EQCODEP + (COMPILED-CLOSURE CL:SYMBOL) \FTP.RENAMEFILE (FDEV) \GETBASEBYTE (WORD) FW-WIPE (FW-OFD) \VFMGet1 ( +Interval Index) \MAKEPCTB (BTREENODE PIECE) \LEAF.EVENTFN (PUPFILESERVER FDEV) VECTOR-LENGTH ( +ARRAY-HEADER) FW-RE-INIT (FW-OFD) FB.FINISH.COMMAND (FILEBROWSER MENU) DIRECTORYNAME (FDEV) \BITBLT.IP + (INTERPRESSDATA IPSTREAM REGION) \TEDIT.FOREIGN.COPY? (SELECTION TEXTOBJ) MSMATCHRATING (PARSED +MSSETPHRASE) PROCESS.BACKTRACE (REGION PROCESS) \TEDIT.COPY.PIECEMAPFN (PIECE TEXTOBJ) +UNMAKEHARDCOPYMODESTREAM (STREAM REGION) \ADDBASE (FIXP) DINFO.WRITE.GRAPH (DINFOGRAPH) +LEAF.ASSURE.FINISHED (LEAFSTREAM SEQUIN STREAM) FB.EXPUNGECOMMAND (FILEBROWSER) CL::%%PRINT-TIMING-INFO + (MISCSTATS) SHIFT.BITMAP.DOWN (BITMAP) SHIFT.BITMAP.LEFT (BITMAP) LOOKUP-SYMBOL (ONED-ARRAY) FW-RESET + (FW-OFD) FB.REMOVE.FILE (FBFILEDATA) \CHARWIDTH.PRESS (STREAM CHARSETINFO) DSPSCROLL (STREAM) +RESHAPEALLWINDOWS (REGION RESHAPINGWINDOWDATA) \SLOWIPLUS2 (FIXP) DINFO.HISTORIC.UPDATE (DINFOGRAPH) +SCRATCHCONS (TTYINBUFFER) GETPROMPTWINDOW (REGION) \SLOWIDIFFERENCE (FIXP) FB.MAYBE.EXPUNGE ( +FILEBROWSER) SHIFT.BITMAP.RIGHT (BITMAP) SHIFTDOWNP (KEYBOARDEVENT) \SLOWITIMES2 (FIXP) +OLD.FIND.SYMBOL (PNAMEBASE PNAMEINDEX LITATOM) \SLOWIQUOTIENT (FIXP) MSSIMPLESET (SENTENCE QUOTE) +DIRECTORYNAMEP (FDEV) DOWINDOWCOM (WINDOW MENU) TEDIT.DELETE (TEXTOBJ) IREMAINDER (FIXP) +SYMBOL.PACKAGE (LITATOM ONED-ARRAY) HOSTNAMEP (FDEV) \TEDIT.MARK.LINES.DIRTY (TEXTOBJ LINEDESCRIPTOR) +\LFGenFileID (LogicalVolumeDescriptor) BMOBJ.DISPLAYFN (BITMAPOBJ) GETHASHKEY (HashFile) \FIRSTNODE ( +BTREENODE) \LEAF.DIRECTORYNAMEP (PUPFILESERVER) DECODE-NS-STRING (STRINGP) \SLOWLLSH1 (FIXP) SUBATOM ( +LITATOM STRINGP) \FM.CHANGELABEL (REGION FREEMENUITEM) \LEAF.FLUSH.CACHE (SEQUIN LEAFSTREAM) +\SLOWLLSH8 (FIXP) \SPP.HANDLE.INPUT (SPPCON XIP SPPHEAD) CHCON1 (STRINGP LITATOM) \SLOWLRSH1 (FIXP) +UNPACKFILENAME.STRING (STRINGP) MENUWINDOW (MENU) \FINDPIECE (PCTNODE) \SLOWLRSH8 (FIXP) BURYW (SCREEN + WINDOW) MBUTTON.FIND.NEXT.FIELD (TEXTOBJ CHARLOOKS PIECE SELECTION) \SLOWLOGOR2 (FIXP) SHRINKW ( +SCREEN WINDOW) \TEDIT.WINDOW.OPS (TEXTOBJ) \ONQUEUE (SYSQUEUE) ADD/AND/DISPLAY/LINK (GRAPHNODE) +\SLOWLOGAND2 (FIXP) MOVEW (SCREEN WINDOW) FB.MAYBE.INSERT.FILE (FILEBROWSER FBFILEDATA) +\VFMGetInterval (LogicalVolumeDescriptor Interval Index) \SLOWLOGXOR2 (FIXP) \BINS (FDEV) +\SMASHBSPSTREAM (BSPSTREAM STREAM) \FM.HIGHLIGHTITEM (FREEMENUITEM REGION) \CURVESLOPE (POSITION +SPLINE) MB.NB.WHENOPERATEDFN (SELECTION) FIND.START.OF.WORD (CHARTABLE) \BOUTS (FDEV) \PFFindFileSize +(PageGroup FileDescriptor) BMOBJ.IMAGEBOXFN (BITMAPOBJ) \VFMGet (LogicalVolumeDescriptor Interval) +%%EXTEND-ARRAY (ARRAY-HEADER TWOD-ARRAY) TB.WINDOW (TABLEBROWSER) ONEDINSPECT.REPAINTFN (REGION) +REMWINDOWPROP (WINDOW) FB.PRINTFN (FBFILEDATA STRINGP FILEBROWSER INFOFIELD) \LEAF.RENAMEFILE (FDEV) +SAMECLOOKS (CHARLOOKS) COPYBYTES (BYTEPTR FDEV STREAM) SHOWSHADE.IP (REGION) \UNBOXFLOAT2 (FX FLOATP) +\GETEOFPTR (FDEV) CREATEMENUEDWINDOW (MENU REGION) SPYOBJ.LABEL (SPYOBJDATA) UNSAVEFNS (MSANALYZABLE) +\UNBOXFLOAT1 (FX FLOATP) \BUFFERED.COPYBYTES (FDEV) %%AREF2 (TWOD-ARRAY GENERAL-ARRAY ARRAY-HEADER) +\POPSTATE.IP (IPSTATE) RANDACCESSP (FDEV STREAM) CURSOR.INIT (BITMAP) %%ASET2 (TWOD-ARRAY +GENERAL-ARRAY ARRAY-HEADER) \SETFILEPTR (FDEV) \CHANGE-VISIBLE-REGION.IP (INTERPRESSDATA REGION +FONTDESCRIPTOR) \LFDirectoryScrambled (LogicalVolumeDescriptor DLIONSTREAM) \SLOWIGREATERP (FIXP) +%%ALTER-AS-DISPLACED-TO-BASE-ARRAY (GENERAL-ARRAY) \GETSTREAM (LINEBUFFER STREAM WINDOW) +\SLOWFGREATERP (FLOATP FIXP) \DSPXPOSITION.PRESS (STREAM) COPYCHARS (BYTEPTR FDEV STREAM) +\LEAF.BREAKCONNECTION (PUPFILESERVER FDEV) \INCHAR (STREAM) SPYOBJ.HEIGHT (SPYOBJDATA) GETCURSORPROP ( +CURSOR) EQUAL (FIXP STACKP) \SPP.RETRANSMIT.NEXT (SPPCON SPPXIP) PRETTYFILEINDEX (STREAM) +PUTCURSORPROP (CURSOR) \BOXIPLUS (FIXP) %%ALTER-AS-DISPLACED-ARRAY (ARRAY-HEADER GENERAL-ARRAY) +\BOXIDIFFERENCE (FIXP) \TEDIT.REOPEN.STREAM (TEXTOBJ PIECE) CLEAR.LEAF.CACHE (PUPFILESERVER SEQUIN) +TEDIT.PROMPTPRINT (TEXTOBJ) \HCPYMODEDSPPRINTCHAR (CHARTABLE) EXTENDABLE-ARRAY-P (ARRAY-HEADER) +CL:ARRAY-DIMENSION (ARRAY-HEADER GENERAL-ARRAY) \CREATEPIECEORSTREAM (STRINGP STREAM PIECE) OPENSTREAM + (STREAM) ONEDINSPECT.BUTTONEVENTFN (ONED.SELECTION) CL:ADJUSTABLE-ARRAY-P (ARRAY-HEADER) +INSURE.WINDOW (WINDOW) SEDIT::OUTPUT-STRING (SEDIT::STRING-ITEM) IDLE.BITMAP (REGION) CL:FILL-POINTER +(ARRAY-HEADER) CLOSEF (STREAM) \PFFindPageAddr (FileDescriptor PageGroup) BITSPERPIXEL (BITMAP SCREEN +WINDOW) DELETEHASHKEY (HashFile) ARRAY-NEEDS-INDIRECTION-P (ARRAY-HEADER) TEDIT.SUBLOOKS (TEXTOBJ +PIECE) FB.COPY/RENAME.MANY (FILEBROWSER FBFILEDATA) \FM.DISPLAYITEM (FREEMENUITEM REGION) +ONEDINSPECT.COPYBUTTONFN (ONED.SELECTION) \TEDIT.BOLD.CARET.ON (TEXTOBJ) FW-FORGET-CMD (FW-OFD) +CL:ARRAY-HAS-FILL-POINTER-P (ARRAY-HEADER) \TEDIT.CLOSEUPLINES (TEXTOBJ LINEDESCRIPTOR) +EQUAL-DIMENSIONS-P (ARRAY-HEADER GENERAL-ARRAY TWOD-ARRAY) TEDIT.OBJECT.CHANGED (TEXTOBJ PIECE) +FB.GET.NEW.FILE.SPEC (FILEBROWSER) %%DO-LOGICAL-OP (PILOTBBT) TEDIT.PUT.PCTB (TEXTOBJ STREAM PIECE +STRINGP) TEDIT.DO.BLUEPENDINGDELETE (TEXTOBJ SELECTION) \NSFILING.CONFLICTP (FDEV) BIT-ARRAY-P ( +ARRAY-HEADER) CURSORCREATE (POSITION) FW-CREATEW (FW-OFD) \UFStoOtherCopyMess (FDEV) HASHFILEDATA ( +HashFile) STKPOS (FX) \VFMReadNext (Buffer Index) \CURSORUP (BITMAP CURSOR) OPT.CODEFRAME (TAG) +TEDIT.UNDO.PARALOOKS (TEXTOBJ PIECE) \DSPYPOSITION.PRESS (STREAM) TEDIT.LOOKS (SELECTION TEXTOBJ) +\VFMGetBufferFor (\BTREEBUF) \CURSOR-VALID-P (CURSOR) \LOCATE.PUPNET (ROUTING) +\TEDIT.FLUSH.UNUSED.LOOKS (TEXTOBJ CHARLOOKS FMTSPEC PIECE) DEFAULTMAKENEWCOM (FILEPKGCOM FILEPKGTYPE) + \TEDIT.SHOWSELS (TEXTOBJ SELECTION) SETFILEPTR (FDEV BYTEPTR STREAM) \VECFONTINIT (ARRAYP +FONTDESCRIPTOR) CURSORP (CURSOR) \SETUPGETCH (TEXTOBJ TEXTSTREAM EDITMARK STREAM PIECE) +CENTERPRINTINREGION (REGION) TEDIT.SELECTED.PIECES (SELECTION TEXTOBJ PIECE) ADJUSTCURSORPOSITION ( +POSITION) MAKEHARDCOPYMODESTREAM (STREAM) \TEDIT.SET.SEL.LOOKS (SELECTION) EOFP (FDEV STREAM) +\TELERAIDBREAK (IFPAGE FX BF FSB FNHEADER LITATOM) \CURSORPOSITION (IOPAGE) \SPP.NOT.RESPONDING ( +SPPCON) FORCEOUTPUT (FDEV) \FM.PUTITEMPROP (FREEMENUITEM) \FLUSH.OPEN.STREAMS (FDEV STREAM) EQDEFP ( +COMPILED-CLOSURE) \PUTBASEFIXP.UFN (FIXP) \TEDIT.CENTER.SEL (SELECTION) COPYATOM (STRINGP) GETHASHTEXT + (HashTextPtr HashFile) ACCESS-CHARSET (FDEV STREAM) \BIGNUM.LSH (BIGNUM) CURSORPOSITION (STREAM +POSITION \DISPLAYDATA SCREENPOSITION) GETEOFPTR (FDEV) GTHASHFILE (HashFile) \RSH (FIXP) CURSORSCREEN +(SCREEN) SEDIT::NEXT-LINEAR-ITEM (SEDIT::WEAK-LINK) FROM.SCREEN.BITMAP (SCREENREGION REGION) FIND.LINE + (LINE) TB.MAP.DELETED.ITEMS (TABLEBROWSER) POSTSCRIPT.GETFONTID (FONTID) \CHTOPCNO (PCTNODE) +%%FAST-COPY-BASE (PILOTBBT) \FILLINXIP (NSOCKET NSADDRESS NSHOSTNUMBER) COPY-ARRAY (ARRAY-HEADER) +\TEDIT.INSERT.PIECES (TEXTOBJ PIECE) \CHANGECHARSET.HDCPYDISPLAY (CHARSETINFO) OPT.CODELEV (TAG FRAME) + \LEAF.LOOKUPCACHE (LEAFSTREAM) \TEDIT.CHANGE.LOOKS (TEXTOBJ CHARLOOKS FONTCLASS PIECE) COPY-VECTOR ( +ARRAY-HEADER) DISPLACED-ARRAY-P (ARRAY-HEADER) TEDIT.UNDO.LOOKS (TEXTOBJ PIECE) GETFILEPTR (FDEV) +\VFMLower (Key) CURSOREXIT (SCREEN) DINFO (DINFOGRAPH) \NSRANDOM.CREATE.STREAM (STREAM) LASTMOUSEY ( +STREAM) \SETEOFPTR (FDEV) LASTMOUSEX (STREAM) FW-CREATE-OFD-WINDOWS (FW-OFD) TEDIT.REDO.LOOKS (TEXTOBJ + SELECTION) \OUTCHARFN.PRESS (STREAM REGION) FILL-ARRAY (ARRAY-HEADER) \OPENLEAFCONNECTION (SEQUIN +LEAFDATA LEAFPACKET LEAFERRORDATA LEAFPARAMSDATA) \PFRemoveDirectoryID (RootDirectory) \PUSHSTATE.IP ( +IPSTATE) \NSFILING.FULLNAME (FILINGHANDLE) CURSORHOTSPOT (POSITION) GETMOUSESTATE (KEYBOARDEVENT) +SPY.PRINT (SPYRECORD) FSETVAL (LITATOM) CHARLOOKS.FROM.FONT (CHARLOOKS) TEDIT.SCANSEL (TEXTSTREAM +TEXTOBJ SELECTION) HASHFILEP (HashFile) %%MAKE-DISPLACED-ARRAY (ARRAY-HEADER) CHARPOS (STREAM) +\HDCPYBLTCHAR (\DISPLAYDATA) OPT.RETMERGE (TAG JUMP) \FM.GETITEMPROP (FREEMENUITEM) \FM.EDIT-DELETE ( +FREEMENUITEM REGION) CHAT.SCREENPARAMS (CHAT.STATE) COURIER.READ.STRING (STRINGP) \TTW1 (WINDOW SCREEN +) READ-ONLY-ARRAY-P (ARRAY-HEADER) SHOWBITMAP1.IP (BITMAP) SEDIT::SET-SELECTION-QUOTE (SEDIT::EDIT-NODE +) MSMARKCHANGED (MSANALYZABLE) TEDIT.REDO.PARALOOKS (TEXTOBJ SELECTION) \VFMMerge (Interval) HLSTORGB +(HLS) EDIT.BITMAP (CURSOR) \TEDIT.BOLD.CARET.OFF (TEXTOBJ) \FM.EDIT-WORDDELETE (FREEMENUITEM REGION) +CHAT.LOGIN (CHAT.STATE) BIT.IN.ROW (BITMAP) ETHERHOSTNAME (PORT STRINGP) OPT.RETTEST (TAG JUMP) +CL:SIMPLE-VECTOR-P (ARRAY-HEADER) \LEAF.REQUESTPAGE (LEAFSTREAM LEAFDATA) SCAVENGEDSKDIRECTORY (LFDEV +LogicalVolumeDescriptor) CL:SIMPLE-BIT-VECTOR-P (ARRAY-HEADER) \TEDIT.HISTORYADD (TEXTOBJ +TEDITHISTORYEVENT) \SLOWHDCPYBLTCHAR (STREAM FONTDESCRIPTOR \DISPLAYDATA PILOTBBT BITMAP CHARSETINFO) +\LFFileSpec (ExpandedName) \SETDAYTIME0 (FIXP) CLEARHASHFILES (HashFileEntry HashFile) +\VFMGenerateFileIDs (Key Interval) \HANDLE.PUP.ROUTING.INFO (PUPROUTINGINFO) MSOBJTYPE (CVERB MSVERB) +\FM.EDIT-BACKUP (REGION FREEMENUITEM) CL:VECTOR-POP (ARRAY-HEADER) TEDIT.COPY.PARALOOKS (PIECE +SELECTION) %%AREF0 (ARRAY-HEADER) SEDIT::SET-SELECTION-LIST (SEDIT::STRING-ITEM SEDIT::EDIT-NODE) +TB.UNDELETE.ITEM (TABLEITEM TABLEBROWSER) INITUFNTABLE (OPCODE) MSSUBJTYPE (CVERB MSVERB) +\INTERNALTOTOPW (WINDOW SCREEN) REGIONONSCREEN (POSITION) CHARACTER.PRINT (READTABLEP) BIT.IN.COLUMN ( +BITMAP) %%ASET0 (ARRAY-HEADER) \10MBRAWRECEIVE (Dove.EtherIOCB) MODERN-MENUBUTTONFN (MENU) \PUTFIXP ( +FIXP) CL::ROW-MAJOR-ASET (ARRAY-HEADER) \PUTSWAPPEDFIXP (FIXP) WORD.MATCHES.BUFFER (CHARTABLE) +SCALE/TONODES (GRAPHNODE) XCL:ROW-MAJOR-AREF (ARRAY-HEADER) \STRINGWIDTH.HCPYDISPLAYAUX (LITATOM +PNAMEBASE CHARSETINFO READTABLEP STRINGP) \GENERIC.RENAMEFILE (FDEV) \GENERIC.OPENP (FDEV STREAM) +TEDIT.MAKESEL (TEXTOBJ TEXTSTREAM SELECTION) SAMEPARALOOKS (FMTSPEC) \VECPUT (STREAM) +\TOTALFIXEDHEIGHT (RESHAPINGWINDOWDATA) GETSCREENPOSITION (SCREEN WINDOW) \INSERT.FIRST.PIECE (TEXTOBJ + PIECE) \BACKCCODE (STREAM) TB.MAP.ITEMS (TABLEBROWSER) SEDIT::COPY-SELECTION (SEDIT::EDIT-SELECTION) +\TITLEICONMINSIZE (SCREEN WINDOW) EDITTOGGLELABEL (GRAPH) \INCCODE (STREAM) +\TEDIT.GET.SINGLE.PARALOOKS2 (FMTSPEC) \COURIER.ATTENTIONFN (FDEV STREAM) GETHASH (HARRAYP HASHSLOT) +OPT.RETPOP (TAG) \PEEKCCODE (STREAM) TEDIT.SELECT (TEXTOBJ SELECTION FMTSPEC LINEDESCRIPTOR) +TEDIT.SUBPARALOOKS (TEXTOBJ PIECE) \INSPECTW.REDISPLAYPROP (SELECTABLEITEM) \TEDIT.WORD.BOUND (TEXTOBJ + CHARTABLE) PREVWORD (LINE CHARTABLE) MSCOMMAND (MSSETPHRASE) \GENERIC.CHARSET (STREAM) CHAT.CLOSE ( +CHAT.STATE) \FM.MENUHANDLER (REGION FREEMENUITEM) \LFFullFileName (ExpandedName +LogicalVolumeDescriptor) START.NEW.LINE (LINE) ADD.BORDER.TO.BITMAP (BITMAP) DIRECTORY.MATCH1 (ARRAYP) + \GETBRUSH (BITMAP) \MAP-OPEN-STREAMS (FDEV) SEDIT::SHIFT-LINEAR-FORM (SEDIT::WEAK-LINK) +TEDIT.SET.SEL.LOOKS (SELECTION) \UPDATE.PBT.RASTERWIDTHS (PILOTBBT) \TOTALFIXEDWIDTH ( +RESHAPINGWINDOWDATA) GETBOXSCREENPOSITION (SCREEN) \EOF.ACTION (STREAM) \VAMAdjustGroup (PageGroup) +MB.COPYFN (IMAGEOBJ) \EOSERROR (STREAM) FB.UNDELETEALLCOMMAND (FILEBROWSER) NORMSECT (SCAN BRES) +SEDIT::REPLACE-CHARS (READTABLEP STRINGP) DINFO.SPECIAL.UPDATE (DINFOGRAPH DINFONODE) FIND.NEXT.WORD ( +LINE CHARTABLE) \PSC.SYMBOLS (STREAM FONTDESCRIPTOR) ADJUSTLINE (LINE) \INCFILEPTR (FDEV) +\PFPilotVolumeP (LogicalVolumeDescriptor) MOVE.TO.NEXT.LINE (LINE) \PAGED.INCFILEPTR (BYTEPTR) +TEDIT.GETSEL (TEXTOBJ TEXTSTREAM) FW-SORT-FN (FW-OFD) \TEDIT.FIND (TEXTOBJ SELECTION) \LEAF.DEVICEP ( +SEQUIN) LAYOUTSEXPR1 (GRAPHNODE) \SETCARET (TEXTOBJ) \BUFFERED.BIN (FDEV) \HDCPYDISPLAY.FIX.YPOS ( +\DISPLAYDATA) \LEAF.DELETEFILE (LEAFDATA LEAFSTREAM STREAM) MOVD (LITATOM DEFINITIONCELL) +\FM.RIGHTBUTTONFN (REGION FREEMENUITEM) \BUFFERED.PEEKBIN (FDEV) \LFPurgeDirectory (FileDescriptor) +\SHAREOFXTRAY (RESHAPINGWINDOWDATA) \BUFFERED.BOUT (FDEV) TEDIT.INCLUDE (TEXTOBJ SELECTION BTREENODE) +\PS.SCALEHACK (STREAM \POSTSCRIPTDATA REGION) FB.UNDELETE.FILE (FILEBROWSER FBFILEDATA) SEDIT::INSERT +(SEDIT::EDIT-NODE) \BOXFPLUSDIF (FIXP FLOATP) FW-CREATE-OFD-LIST (FW-OFD) \TEDIT.PUT.SINGLE.PARALOOKS2 + (FMTSPEC) TTYIN.BALANCE (CHARTABLE) \BUFFERED.BINS (FDEV) \BOXFTIMES2 (FIXP FLOATP) TTLASTLINE (LINE) + TEDIT.SEL.AS.STRING (TEXTSTREAM TEXTOBJ SELECTION) \BOXFQUOTIENT (FIXP FLOATP) \LFOpenOldFile ( +FileDescriptor LeaderPage DLIONSTREAM) \LFDirectoryP (DLIONSTREAM LeaderPage) CCCSCAN (FNHEADER) +\BUFFERED.BOUTS (FDEV) MARK/GRAPH/NODE (GRAPHNODE) TEDIT.GET.LOOKS (CHARLOOKS TEXTOBJ PIECE SELECTION) + \STRINGWIDTH.HDCPYDISPLAY (\DISPLAYDATA CHARSETINFO) \FLOAT (FIXP) \TEDIT.FIND.PROTECTED.START ( +TEXTOBJ CHARLOOKS PIECE) RESET/NODE/LABELSHADE (GRAPHNODE) \GETSPP (SPPCON SPPXIP) \TEDIT.SEL.CHANGED? + (SELECTION) \SCROLL.HANDLER.DOIT (REGION) \TEDIT.PUT.SINGLE.CHARLOOKS2 (CHARLOOKS FONTCLASS) +\LEAF.GETFILE (PUPFILESERVER SEQUIN STREAM LEAFSTREAM LEAFDATA LEAFPACKET BYTEPTR) TEDIT.EXTEND.SEL ( +SELECTION TEXTOBJ) \SHAREOFXTRAX (RESHAPINGWINDOWDATA) TEDIT.STREAMCHANGEDP (TEXTOBJ) +SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (REGION) FW-OFD-EXISTS? (FW-OFD) MB.SHOWSELFN (IMAGEBOX) +SEDIT::SET-INITIAL-SELECTION (SEDIT::EDIT-CONTEXT) FB.UNDELETECOMMAND (FILEBROWSER) \TEDIT.SCALEREGION + (REGION) \BRUSHBITMAP (BRUSHITEM) \TEDIT.REFRESH.SHOWSEL (SELECTION TEXTOBJ) \TOTALPROPOSEDSIZE ( +RESHAPINGWINDOWDATA) \VFMPutNext (Index Buffer) CRIT.LESSP (SCAN) TTNTH (LINE) EDITTOGGLEBORDER (GRAPH +) TTNLEFT (LINE) \INFINITY (FLOATP) \EDIT.UPCARET (TEDITCARET) NARGS (LITATOM FNHEADER +COMPILED-CLOSURE) \TEDIT.FORMAT.FOOTNOTE (LINEDESCRIPTOR TEXTOBJ PAGEFORMATTINGSTATE REGION) \TEXTBIN +(STREAM PIECE TEXTSTREAM) IMAGEOBJP (IMAGEOBJ) \POSTSCRIPTTAB (\POSTSCRIPTDATA) TB.DELETE.ITEM ( +TABLEITEM TABLEBROWSER) SCALEPAGEUNITS (TEDITPAPERSIZE) \ARGPTR (LITATOM FX BF FNHEADER) IMAGESTREAMP +(STREAM IMAGEOPS) MAKEFLOATNUMBER (FLOATP) \UPDATE.EXTENT.IMAGE (REGION) IMAGESTREAMTYPE (IMAGEOPS +STREAM) OPT.DELTAGREF (JUMP) IMAGESTREAMTYPEP (STREAM IMAGEOPS) \SLOWRETURN (FX) TERM.MOVETO ( +CHAT.STATE) STKNTH (FX) MSSEEKPHRASE (PARSED CONJUNCTION MSVERB) TEDITCHAT.MENUFN (CHAT.STATE) +\FM.WINDOWENTRYFN (REGION FREEMENUITEM) \LFCreateFile (ExpandedName DLIONSTREAM) SEDIT::THROW-AWAY-CHANGES + (SEDIT::EDIT-CONTEXT) \LFCreateDevice (LFDEV) SETSTKNAME (FX FNHEADER) U/L-CASE (LINE) SETTAIL? (LINE +) \COPYFNHEADER (FNHEADER) BLTMENUIMAGE (WINDOW MENU REGION) TEDIT.HARDCOPY-COLUMN-END (LINEDESCRIPTOR + TEXTOBJ FMTSPEC PAGEFORMATTINGSTATE REGION) \TEXTBOUT (TEXTSTREAM TEXTOBJ PIECE STREAM STRINGP) +CL:GET-DISPATCH-MACRO-CHARACTER (READTABLEP) IMAGEOBJPROP (IMAGEOBJ IMAGEFNS) STKSCAN (FX) +DINFO.UPDATE.FMENU (DINFOGRAPH DINFONODE) CREATEWFROMIMAGE (WINDOW) \AddShade (MENU) \FRAMESCAN ( +FNHEADER FX PVARSLOT BF) INSIDE? (REGION) MSSETREP (MSSETPHRASE) CHAT.RESHAPEWINDOW (CHAT.STATE) +\LFGetStreamForFile (DFSFileSpec ExpandedName) \FM.CREATEW (REGION) PRINTANDBOX (REGION) COMP.STUNBIND + (FRAME) \SETWINFOXSIZE (RESHAPINGWINDOWDATA) OPT.COMMONBACK (JUMP) \VAMEnoughSpace (FileDescriptor +LogicalVolumeDescriptor) DO-DISPATCH-MACRO (READTABLEP) \TEDIT.FIND.LAST.LINE (TEXTOBJ LINEDESCRIPTOR) + SWITCH/NODE/HEIGHT/WIDTH (GRAPHNODE) RESUME (FX) \ALLOCSPACETOGROUPEDWINDOWS (RESHAPINGWINDOWDATA) +\MAXWIDTHOFGROUP (RESHAPINGWINDOWDATA) \RESUME (FX) DMCHAT.HANDLE.WRAP (CHAT.STATE DM2500.STATE) +SHRINK-VECTOR (ARRAY-HEADER) CL:SET-DISPATCH-MACRO-CHARACTER (READTABLEP) RESET/NODE/BORDER (GRAPHNODE +) MSVERBTYPE (CVERB MSVERB MSSETPHRASE) SEDIT::OPEN-LITATOM (STRINGP) DINFO.UPDATE.MENU.DISPLAY ( +DINFOGRAPH DINFONODE MENU REGION) \TEDIT.LOOKS.UPDATE (TEXTSTREAM PIECE CHARLOOKS ARRAYP FONTCLASS +FMTSPEC LINEDESCRIPTOR) \LFUpdateLeaderPage (DLIONSTREAM LeaderPage STREAM FileDescriptor) +\FM.SETATTACHPOINT (FREEMENUITEM REGION) COMP.STBIND (FRAME) \SPREADFRAMEP (BF FX) REOPENTEXTSTREAM ( +STREAM) \INTERPFRAMENT (FX) \EDIT.DOWNCARET (TEDITCARET) ITEM.WINDOW.SET.STACK.ARG (MENU) +SHOWSHADEDITEMS (MENU REGION) \SENDLEAF (STREAM LEAFSTREAM LEAFPACKET LEAFDATA SEQUIN LEAFERRORDATA) +MENUITEMREGION (MENU REGION) SETSTKARG (FNHEADER BF FX PVARSLOT) SKIP/ZAP (TTYINBUFFER) STKARGNAME ( +FNHEADER FX BF PVARSLOT) CHAT.BUTTONFN (CHAT.STATE) \POSTSCRIPT.ACCENTFN (STREAM \POSTSCRIPTDATA +STRINGP) SETSTKARGNAME (FNHEADER FX BF) MB.DEFAULTBUTTON.ACTIONFN (TEXTOBJ SELECTION) MSFIXUPTYPES ( +PARSED SENTENCE MSSETPHRASE THAT NOT) SEDIT::INSERT-STRING (SEDIT::EDIT-SELECTION) +DINFO.UPDATE.TEXT.DISPLAY (DINFOGRAPH DINFONODE) \FM.UPDATEWINDOWEXTENT (REGION) +\POSTSCRIPT.ACCENTPAIR (STREAM \POSTSCRIPTDATA STRINGP) \FM.COLLECTNWAYS (FREEMENUITEM) +%%DEFPRINT-ARRAY (READTABLEP) \CONVERTNUMBER (READTABLEP) STKNARGS (FX BF FNHEADER) OPT.LABELNTHPR ( +TAG) SET-FILL-POINTER (ARRAY-HEADER) TTECHO.TO.FILE (LINE COMPLEXCHAR) OPT.JUMPREV (TAG JUMP) +%%DEFPRINT-VECTOR (READTABLEP) \HDCPYDISPLAY.FIX.XPOS (\DISPLAYDATA) FB.HARDCOPY.MAXWIDTH (FBFILEDATA) + %%DEFPRINT-GENERIC-ARRAY (READTABLEP) EQUAL.CH.NAMES (NSNAME) \TEDIT.FIND.PROTECTED.END (TEXTOBJ +CHARLOOKS PIECE) \GOOD.DASHLST (BRUSH) %%DEFPRINT-STRING (READTABLEP) CL:VECTOR-PUSH (ARRAY-HEADER) +%%DEFPRINT-BITVECTOR (READTABLEP) MENUREGION (MENU) FB.NAMES.INCREASING.VERSION (FBFILEDATA) +RESHADEITEM (MENU) FIXR (FIXP FLOATP) COURIER.BROADCAST.CALL (ROUTING) REFLECT/GRAPH/DIAGONALLY (GRAPH + GRAPHNODE) BITMAPWIDTH (BITMAP WINDOW) \LEAF.CLOSEFILE (LEAFSTREAM SEQUIN STREAM LEAFDATA) +READFROMBUF (COMPLEXCHAR LINE) BITMAPHEIGHT (BITMAP WINDOW) FLTSTR (FIXP FLOATP ARRAY-HEADER) +\SETWINFOYSIZE (RESHAPINGWINDOWDATA) \MAXHEIGHTOFGROUP (RESHAPINGWINDOWDATA) \VAMFindFreePages ( +LogicalVolumeDescriptor PageGroup) TIMESPOW10 (EFPN) INTTOEXT (FIXP) LINELENGTH (STREAM) HASH-DOT ( +READTABLEP) \TEDIT.NEUTRALIZE.PARALOOKS.MENU (SELECTION TEXTOBJ) FLTINTLOG (EFPN) +\RESHAPEATTACHEDWINDOWSAROUNDMAINW (REGION RESHAPINGWINDOWDATA) \UPDATEXYANDBOX (POSITION) FW-CLOSEFN +(FW-OFD) \TEDIT.PUT.SINGLE.PARALOOKS (FMTSPEC) RPLCHARCODE (STRINGP) MB.SELFN (SELECTION) +FB.DECREASING.VERSION (FBFILEDATA) TRACKNODE (GRAPH) NODELST/AS/MENU (GRAPHNODE) COPY.TEXT.TO.IMAGE ( +STREAM FDEV) REFLECT/GRAPH/VERTICALLY (GRAPH GRAPHNODE) DMCHAT.ADDRESS (DM2500.STATE) SET/LABEL/SIZE ( +GRAPHNODE IMAGEBOX) HASH-COMMA (READTABLEP) DIGITSBDP (FIXP FLOATP) DO.EDIT.PP (LINE) SEDIT::INSERT-LITATOM + (SEDIT::EDIT-SELECTION) DINFO.UPDATE.HISTORY (DINFOGRAPH DINFONODE) \FM.WINDOWEXTENT (FREEMENUITEM +REGION) \POSTSCRIPT.SPECIALOUTCHARFN (STREAM) READHOTSPOT (CURSOR REGION) TTDELETECHAR (LINE) +PARSE-NAMESTRING1 (STREAM) TYPE-VARIABLE-FROM-TYPE-NAME (CL:SYMBOL STRINGP) INSIDEP (POSITION) +\BREAKAPARTATWSTRUCTURE (RESHAPINGWINDOWDATA) GETBOXREGION (SCREENREGION) EDITMOVENODE (GRAPH) +%%NUMERIC-STRING-P (STRINGP) FB.SORT.VERSIONS (FBFILEDATA) \TEDIT.HCPYLOOKS.UPDATE (TEXTSTREAM PIECE +CHARLOOKS ARRAYP FONTCLASS) SCAN.LESSP (SCAN) TTNEXTLINE (LINE) DINFO.UPDATE.GRAPH.DISPLAY (DINFOGRAPH + DINFONODE) \FM.UPDATEGROUPEXTENT (REGION) \POSTSCRIPT.PRINTSLUG (STREAM \POSTSCRIPTDATA +FONTDESCRIPTOR) TTRATOM (TTYINBUFFERSTREAM) WBOX (REGION) TB.FINISH.CLOSE (TABLEBROWSER) +\DSKCreateDevice (FDEV) REFLECT/GRAPH/HORIZONTALLY (GRAPH GRAPHNODE) TERM.PRINTCHAR (CHAT.STATE STREAM + \DISPLAYDATA) DRAWLINE (IMAGEOPS STREAM) \DSPRIGHTMARGIN.HDCPYDISPLAY (\DISPLAYDATA) MOVETO (IMAGEOPS + STREAM) CH.NAME.TO.STRING (NSNAME) TERM.ADDLINE (CHAT.STATE) SQRT (FLOATP) \CHARWIDTH.HDCPYDISPLAY ( +CHARSETINFO \DISPLAYDATA) MSJOINSET (SENTENCE MSSETPHRASE QUOTE) SEDIT::HASFAT (STRINGP) +CHAT.ENDOFSTREAMOP (STREAM) \FM.TRANSPOSEVERT (REGION) APPENDIDENTIFIER.IP (STRINGP) DSPBACKCOLOR ( +IMAGEOPS STREAM) OPENIPSTREAM (REGION IPSTREAM STREAM INTERPRESSDATA) \GETREGION.PACKPTS (POSITION) +\VFMMarkBufferDirty (\BTREEBUF) FW-UPDATE-OFD-WINDOW (FW-OFD REGION) FB.DELVER.FILES (FBFILEDATA) +TEDIT.HARDCOPY.PAGEHEADING (TEXTSTREAM PIECE LINEDESCRIPTOR) EXTENDREGIONTOP (REGION) DSPBOTTOMMARGIN +(IMAGEOPS STREAM) \TEDIT.PARSE.CHARLOOKS.LIST (CHARLOOKS) READ-AFM-FILE (PSCFONT MENU) RESTOREBUF ( +LINE TTYINBUFFER) PARSE.NSNAME (NSNAME) SHEDSCAN (LINE XYPT XXLINE SCAN) DSPCOLOR (IMAGEOPS STREAM) +\FM.TRANSPOSEHORZ (REGION) \LFDeleteFile (DLIONSTREAM FDEV) \FM.GETBITMAPS (REGION) +\UFS.UNREGISTER.GFS (UFSGENFILESTATE) \PFReplaceString (STRINGP) PRETTYCOM (FILEPKGCOM FILEPKGTYPE) +OPT.LBMERGE (JUMP TAG) \UNVISIBLE.FLUSH.OPEN.STREAMS (FDEV STREAM) \MAIKO.PUNTBLTCHAR (\DISPLAYDATA +PILOTBBT) FW-OPENP (FDEV STREAM) TERM.DOWN (CHAT.STATE) DSPCLIPPINGREGION (REGION IMAGEOPS STREAM) +\DSPFONT.HDCPYDISPLAY (STREAM CHARSETINFO) GRAPHEDITCOMMANDFN (MENU) PSCFONT.WRITEFONT (PSCFONT) +\UNVISIBLE.PAGED.REVALIDATEFILELST (FDEV STREAM) \INIT.POWERS.OF.TEN (EFPN) \GETREGIONTRACKWITHBOX ( +POSITION) \SETGROUPMIN (RESHAPINGWINDOWDATA) DSPRESET (IMAGEOPS STREAM) \UFSCreateDevice (FDEV) +FW-CLOSE-OLD-OFD-WINDOWS (FW-OFD) \TEXTTTYBOUT (TEXTSTREAM TEXTOBJ CHARTABLE STREAM) +\TEDIT.PARSE.PARALOOKS.LIST (FMTSPEC) TTDELETEWORD (LINE) TEDIT.SKIP.SPECIALCOND (TEXTSTREAM PIECE +LINEDESCRIPTOR) \FAULTINIT (IFPAGE LITATOM) \INIT.ETHER.BUFFER.POOL (IFPAGE) \BN.FROM.FIXP (BIGNUM) +\MAKEFRAME (LITATOM FNHEADER) DSPFONT (IMAGEOPS STREAM) \SET.VMEM.FULL.STATE (IFPAGE) \VFMDelete1 ( +Buffer Interval Index) \UFSDirectoryNameP (FDEV) GETREGION (SCREENREGION) FW-RESIZE-OFD (FW-OFD +POSITION) DSPLEFTMARGIN (IMAGEOPS STREAM) SIZE/GRAPH/WINDOW (REGION) \D01.FAULTINIT (IFPAGE FIXP) +\UFSGenerateFiles (FDEV) SET/LAYOUT/POSITION (GRAPHNODE) \DOVE.FAULTINIT (IFPAGE FIXP) \UFSSetFileInfo + (FDEV STREAM UFSSTREAM) \UFSOpenFile (FDEV STREAM UFSSTREAM) \TEDIT.UPDATE.SHOWSEL (SELECTION TEXTOBJ + LINEDESCRIPTOR) \DL.FAULTINIT (IFPAGE) IN/ITEM? (SELECTABLEITEM) DSPLINEFEED (IMAGEOPS STREAM) +\SEQUIN.HANDLE.ACK (SEQUIN SEQUINPACKET) TEDIT.BUILD.PCTB (TEXTOBJ STREAM PIECE) \UFSWritePages ( +STREAM UFSSTREAM) \TEXTMARK (TEXTOBJ TEXTSTREAM STREAM) SEDIT:RESET-COMMANDS (SEDIT::EDIT-ENV) +DSPOPERATION (IMAGEOPS STREAM) \TEDIT.PAPERWIDTH (TEDITPAPERSIZE) FB.DELVERCOMMAND (FILEBROWSER +FBFILEDATA) SNAPW (SCREENREGION SCREEN REGION WINDOW) \UFSTruncateFile (STREAM FDEV UFSSTREAM) +\SPP.CHECK.INPUT.QUEUE (SPPCON SPPXIP) DSPRIGHTMARGIN (IMAGEOPS STREAM) \BULK.DATA.CLOSE (FDEV STREAM) + OPT.JUMPTHRU (TAG JUMP) \VFMSaveBuffer (\BTREEBUF) \UFSDeleteFile (FDEV) EDITSHADEREPAINTFN (REGION) +DMCHAT.NEWLINE (CHAT.STATE DM2500.STATE) DSPTOPMARGIN (IMAGEOPS STREAM) \TEDIT.HCPYFMTSPEC (FMTSPEC) +DINFO.SETUP.WINDOW (DINFOGRAPH) \FM.INITCORNERSFN (REGION) \LFRenameFile (FDEV STREAM DLIONSTREAM +DFSFileSpec LeaderPage) \UFSCloseFile (STREAM UFSSTREAM FDEV) FB.CLOSE&EXPUNGE (MENU FILEBROWSER) +\TEDIT.GET.SINGLE.PARALOOKS (FMTSPEC) TRACKW (REGION WINDOW) DSPSCALE (IMAGEOPS STREAM) +\UFSGetFileInfo (FDEV STREAM UFSSTREAM) TTYINENTRYFN (TTYINWINDOWSTATE) GETSYNTAX (TERMTABLEP CONTEXTS + WAKEUPS ESCAPES) \GTREADTABLE1 (READTABLEP) \TEDIT.CARETLOOKS.VERIFY (TEXTOBJ) \GTTERMTABLE ( +TERMTABLEP) \INSPECTW.COMMAND.HANDLER (SELECTABLEITEM) DSPSPACEFACTOR (IMAGEOPS STREAM) +\TEDIT.PAPERHEIGHT (TEDITPAPERSIZE) \SEQUIN.FLUSH.RETRANSMIT (SEQUIN) \SMASHMENUIMAGEONRESET (MENU) +\D01.ASSIGNBUFFERS (IFPAGE) MSSETSETTYPE (MSSETPHRASE SENTENCE NOT CSET) \TEDIT.NSCHAR.RUN (TEXTOBJ +PIECE) \FM.FILLWINDOW (REGION) \LFTruncateFile (DLIONSTREAM FDEV LeaderPage) \CHAIN.UP.RPT (RPT) +COURIER.READ.BULKDATA (STREAM) DSPXPOSITION (IMAGEOPS STREAM) PPSPPSTREAM (SPPSTREAM) \GETREADSYNTAX ( +CHARTABLE CONTEXTS WAKEUPS ESCAPES) CL:BIT-VECTOR-P (ARRAY-HEADER) \VFMFreeVPage ( +LogicalVolumeDescriptor) \UFS.ADD.HOST.FIELD (FDEV) \PFRoomForFile (PageGroup FileDescriptor) +\GETTERMSYNTAX (CHARTABLE) TERM.DELCHAR (CHAT.STATE) DSPYPOSITION (IMAGEOPS STREAM) \UFSReadPages ( +UFSSTREAM STREAM) GETPOSITION (SCREENPOSITION) \VFMDelete2 (Index Buffer) \DEVICEFILE.EOSERROR (STREAM + BUFFER UFSSTREAM) SETCOLOR16.IP (BITMAP) \DOFORMATTING.HARDCOPY (LINEDESCRIPTOR THISLINE TEXTOBJ +ARRAYP) \UFS.FULLNAME (FDEV) \UFS.OPENP (FDEV UFSSTREAM) CL:ARRAY-DIMENSIONS (ONED-ARRAY TWOD-ARRAY +GENERAL-ARRAY) MSDOES (MSVERB) DSPROTATE (IMAGEOPS STREAM) \FM.RESETCLIPPINGREGION (REGION) PTPLUS ( +POSITION) \LFGetFileInfo (DLIONSTREAM STREAM LeaderPage) TEDIT.PAGEFORMAT (PAGEREGION TEXTOBJ) +DSPPUSHSTATE (IMAGEOPS STREAM) \SHOWSEL.HILIGHT (LINEDESCRIPTOR SELECTION FMTSPEC TEXTOBJ) +\TEXTDSPYPOSITION (TEXTOBJ) NESTED.SUBMENU (MENU) TERM.LEFT (CHAT.STATE) \NSFILING.ADDQUOTES (STRINGP) + \UFS.REMOVE.HOST.FIELD (FDEV) MENUTITLEFONT (WINDOW MENU SCREEN) FB.DELETE.FILE (FILEBROWSER +FBFILEDATA) \RESHOWBORDER1 (WINDOW REGION SCREEN BITMAP) RENUMBER.LINES (LINE) +MB.THREESTATE.WHENOPERATEDFN (SELECTION) DSPPOPSTATE (IMAGEOPS STREAM) ACCEPT-UNIX-SOCKET-STREAM (FDEV +) SEDIT::ATOM-CHAR-ESCAPED (READTABLEP READCODE CHARTABLE) DEFAULT.INSPECTW.VALUECOMMANDFN (MENU) +MSKNOWN (MSSETPHRASE SENTENCE NOT CSET) DSPDEFAULTSTATE (IMAGEOPS STREAM) \FM.UNSCROLLWINDOW (REGION) +\LFGetFileName (DFSFileSpec) \INITBFS (IFPAGE) LAYOUT/POSITION (GRAPHNODE) EXTENDREGIONRIGHT (REGION) +\TELERAIDSERVER (VP VMEMFLAGS POINTER) SEDIT::COPY-STRUCTURE-STRING (SEDIT::BROKEN-ATOM) +UNMAKEHARDCOPYSTREAM (STREAM) RESHOWBORDER (WINDOW) DSPSCALE2 (IMAGEOPS STREAM) +CREATE-UNIX-SOCKET-STREAM (FDEV) PPSPP (SPPCON STREAM) TERM.ERASE.TO.EOL (CHAT.STATE) SETSYNTAX ( +READTABLEP TERMTABLEP) \TEDIT.PURGE.SPACES (ARRAYP) \TEDIT.GET.INSERT.CHARLOOKS (TEXTOBJ SELECTION +PCTNODE CHARLOOKS PIECE) \SETTERMSYNTAX (CHARTABLE) MB.BUTTONEVENTINFN (SELECTION) \UFS.DIRECTORY.NAME + (FDEV) TB.MAP.SELECTED.ITEMS (TABLEBROWSER TABLEITEM) \SETREADSYNTAX (CHARTABLE READTABLEP) +EDITGRAPH2 (GRAPH) MB.THREESTATE.SHOWSELFN (SELECTION) DSPTRANSLATE (IMAGEOPS STREAM) SYNTAXP ( +CHARTABLE CONTEXTS WAKEUPS ESCAPES) \UFSDeleteFile-C (FDEV) \ITEMW.FLIPITEM (SELECTABLEITEM) +\COPYSYNTAX (CHARTABLE) CHECK.MARGIN (LINE) DSPNEWPAGE (IMAGEOPS STREAM) \TEXTLEFTMARGIN (TEXTOBJ +FMTSPEC) \MAPCHARTABLE (CHARTABLE) PTDIFFERENCE (POSITION) \VFMFind (Interval Index Buffer) +FW-CLOSE-CMD (FW-OFD) \VAMRecomputeFreePageCount (LogicalVolumeDescriptor) TEDIT.PARSE.PAGEFRAMES1 ( +PAGEREGION) \ITEM.WINDOW.SELECTION.HANDLER (SELECTABLEITEM) BIGNUM.DEFPRINT (READTABLEP BIGNUM) +\UFStoOtherRenameMess (FDEV) \MAIKO.DO.MOVDS (LITATOM DEFINITIONCELL) \UFSRenameFile-C (FDEV) +\TEDIT.WINDOW.SETUP (TEXTOBJ) \ATWGROUPSIZE (RESHAPINGWINDOWDATA REGION) DRAWBETWEEN (IMAGEOPS STREAM) + \VFMDeletePageGroup (FileDescriptor PageGroup Key Interval) \TEXTRIGHTMARGIN (TEXTOBJ FMTSPEC) +\INVERTITEM (MENU) \MAIKO.ASSIGNBUFFERS (IFPAGE POINTER) \POSITION.MENU.IMAGE (MENU SCREENPOSITION +POSITION SCREEN) FB.UPDATE.COUNTERS (FILEBROWSER) NESTED.SUBMENU.POS (MENU STREAM REGION \DISPLAYDATA) + \SHAPEW2 (WINDOW REGION BITMAP SCREEN) EXTENDREGIONLEFT (REGION) EDITDELETENODE (GRAPH) PRINTSPP (XIP + SPPHEAD) \STRINGOUT (STRINGP) \TEXTSTREAM.FILENAME (STREAM TEXTOBJ) TEDIT.HARDCOPYFN (TEXTOBJ) +PFI.HANDLE.DEFDEFINER (PFITYPE) \M-VMEMSAVE (IFPAGE) \TEDIT.LINE.LIST (TEXTOBJ) DMCHAT.CLEAR ( +CHAT.STATE) MAKEHARDCOPYSTREAM (STREAM) \SEQUIN.CLEANUP (SEQUIN) ITEMW.REPAINTFN (SELECTABLEITEM) +DRAWCIRCLE (IMAGEOPS STREAM) \TEDIT.APPLY.PARALOOKS (SELECTION TEXTOBJ MARGINBAR) \FM.RESHAPEFN ( +REGION) DELETELINE (LINE) \LFReadPages (DLIONSTREAM) RESETGRID.NEW (REGION) INSURE.BRUSH (BRUSH) +SHAPEW1 (WINDOW REGION BITMAP SCREEN) EQP (STACKP) \FM.PUSHGROUP (REGION) EXTENDPASTVERTBOUNDARIES ( +REGION) \UFS.HANDLE.RELATIVEDIRECTORY (FDEV) \IDLE.IS.PREVIOUS (IFPAGE) FW-CHANGE-POSITION (FW-OFD +REGION POSITION) \TEXTDSPFONT (CHARLOOKS TEXTOBJ) FB.DELETECOMMAND (FILEBROWSER) DRAWARC (IMAGEOPS +STREAM) CHAT.SET.EMULATOR (CHAT.STATE) \FM.REDISPLAYMENU (REGION FREEMENUITEM) ECHOCHAR (CHARTABLE) +\LFSetFileInfo (DLIONSTREAM LeaderPage) \FM.JUSTIFYGROUPS (REGION) BITMAPOBJ.SNAPW (REGION) +OPT.SETUPOPT (JUMP) MARGINBAR (REGION) \TEDIT.FIXSELS (TEXTOBJ SELECTION) SEDIT::SHIFT-STRING (STRINGP +) TERM.ADDCHAR (CHAT.STATE) INTERSECT/REGIONP/LBWH (REGION) \HDCPYDSPPRINTCHAR (CHARTABLE) +\TEDIT.APPLY.STYLES (CHARLOOKS TEXTOBJ TEXTSTREAM FMTSPEC) \DOFORMATTING (LINEDESCRIPTOR THISLINE +TEXTOBJ ARRAYP) GETXIP (NSOCKET) \TEDIT.PARABOUNDS (TEXTOBJ PIECE) DMCHAT.RIGHT (CHAT.STATE) +\SEQUIN.RETRANSMITNEXT (SEQUIN SEQUINPACKET) \TEXTMENU.DOC.CREATE (MB.BUTTON TEXTSTREAM MB.3STATE +MB.TOGGLE MB.NWAY MB.TEXT MB.INSERT TEXTOBJ) \DL.NEWFAULTINIT (IFPAGE IOPAGE RPT VMEMFLAGS) +MB.THREESTATEBUTTON.FN (SELECTION) DRAWCURVE (IMAGEOPS STREAM) DINFO.READ.GRAPH (DINFOGRAPH) +\LFWritePages (STREAM DLIONSTREAM) UPDATE/BM/DISPLAY/SELECTED/REGION (BITMAP) TEDIT.GET (TEXTOBJ +LINEDESCRIPTOR BTREENODE SELECTION LITATOM) PUTMENUPROP (MENU) \PARSE.PORTCONSTANT (STRINGP) +\TEDIT.HARDCOPY.MODIFYLOOKS (CHARLOOKS LINEDESCRIPTOR) RELMOVEW (SCREEN WINDOW) UNIX-STREAM-CLOSE ( +FDEV) EXTENDPASTHORIZBOUNDARIES (REGION) DRAWELLIPSE (IMAGEOPS STREAM) POLYSHADE.IP (STREAM) +TEDIT.DELETELINE (LINEDESCRIPTOR) \FM.JUSTIFYITEMS (FREEMENUITEM) \LFOpenFile (DLIONSTREAM LeaderPage) + \FM.LAYOUTGRID (REGION) \UFS.REGISTER.GFS (UFSGENFILESTATE) FB.COUNTER.STRING (FILEBROWSER) +COMP.UNBIND.VARS (FRAME) \TEDIT.BASICFIND (TEXTOBJ SELECTION) TERM.DELETELINE (CHAT.STATE) DRAWPOLYGON + (IMAGEOPS STREAM) \ONSCREENCLIPPINGREGION (SCREEN WINDOW STREAM) \EVAL-INVOKE-LAMBDA (FX) +\UFS.NEXTFILEFN (UFSGENFILESTATE FDEV FILEGENOBJ) UNIX-STREAM-EOFP-NEW (STREAM) SHOWBUTTON (BUTTON) +IN/SCROLL/BAR? (WINDOW REGION) PROMPTFOREVALED (POSITION) DRAWPOINT (IMAGEOPS STREAM) +\VAMFreePageGroup (PageGroup FileDescriptor LogicalVolumeDescriptor) LASTC (STREAM) +POSTSCRIPT.PUTBITMAPBYTES (ARRAYP) EXTENDREGIONBOTTOM (REGION) D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL ( +CODEARRAY) \NSRANDOM.FETCH.CACHE (NSPAGECACHE) \UFS.FILEINFOFN (UFSGENFILESTATE) FILLPOLYGON (IMAGEOPS + STREAM) \PEEKREFILL (LINEBUFFER) GRAPHDELETENODE (GRAPH) TEXTSTREAM.TITLE (TEXTOBJ) \LOOKUPPORT (PORT +) D-ASSEM::START-PC-FROM-NT-COUNT (CODEARRAY) FORWARD.DELETE.TO (LINE) \POLYSHADE.YSCAN.IP (SCAN) +TEDIT.MINIMAL.WINDOW.SETUP (TEXTOBJ TEDITCARET) DRAWTO (IMAGEOPS STREAM) RATOM (READTABLEP ARRAYP) +LATTICE/BREAK/CYCLES (GRAPHNODE) \DL.ASSIGNBUFFERS (IFPAGE POINTER) FILLCIRCLE (IMAGEOPS STREAM) +\BLTSHADE.GENERICPRINTER (REGION) \SUBREAD (STRINGP CHARTABLE STREAM FDEV) RESETREADTABLE (READTABLEP) + \DL.MARK.PAGES.UNAVAILABLE (RPT) VKBD.FIX.FONT (KEYBOARDCONFIGURATION) GETMENUPROP (MENU) +TREEGRAPHNODE (PCTNODE) \PS.BOUTFIXP (ARRAYP \POSTSCRIPTDATA STREAM) HARDCOPYGRAPH (REGION POSITION +GRAPH) \TEDIT.FIND.FIRST.LINE (TEXTOBJ LINEDESCRIPTOR) \SEQUIN.HANDLE.INPUT (PUP SEQUINPACKET SEQUIN) +TERM.UP (CHAT.STATE) \TOP-LEVEL-READ (READTABLEP ARRAYP) \LFGenerateFiles (PARSEDFILENAME STRINGP +LogicalVolumeDescriptor DLIONSTREAM) \FM.LAYOUTCOLUMN (REGION) COMP.BIND.VARS (VAR) \CREATEW1 (REGION +SCREEN) FIND.MATCHING.QUOTE (CHARTABLE) FILLRECTANGLE.IP (STREAM INTERPRESSDATA) RELDRAWTO (IMAGEOPS +STREAM) EDITBMRESHAPEFN (BITMAP REGION) GRAPHOBJ.PUTALIGN (GRAPH GRAPHNODE) SHOWSTACKBLOCKS (STK FSB +FX BF) READP (STREAM FDEV) MENUDESELECT (MENU) \UFS.ABORT.CL-DIRECTORY (FILEGENOBJ UFSGENFILESTATE) +READTABLEPROP (READTABLEP) \TEXTOPENF (TEXTSTREAM TEXTOBJ PCTNODE) LAYOUTGRAPH (GRAPH POSITION +GRAPHNODE) POSTSCRIPT.SHOWACCUM (STREAM \POSTSCRIPTDATA) SKIPSEPRCODES (READTABLEP CHARTABLE STREAM) +EXTENDREGION (REGION) SEDIT::EDIT-SELECTION (SEDIT::EDIT-CONTEXT) BITMAPIMAGESIZE (IMAGEOPS STREAM) +MSCHECKBLOCKS (MSANALYZABLE) \SEQUIN.RETRANSMIT (SEQUIN SEQUINPACKET) \FM.LAYOUTROW (REGION) +FB.COUNTERW.REDISPLAYFN (FILEBROWSER) \VFMCreateVPage (LogicalVolumeDescriptor PageGroup) +\VAMAllocPageGroup (PageGroup LogicalVolumeDescriptor FileDescriptor) INITIALIZECOLOR.IP (STREAM +INTERPRESSDATA) MBUTTON.SET.FIELD (TEXTOBJ PCTNODE SELECTION) FOREST/BREAK/CYCLES (GRAPHNODE) +\FAULTHANDLER (IFPAGE) TERM.MODIFY.ATTRIBUTES (CHAT.STATE) UNIX-BACKFILEPTR-NEW (STREAM) SKREAD ( +CHARTABLE READTABLEP) \LOADNSHOSTNUMBER (NSHOSTNUMBER) \LFEventFn (FDEV) \NSRANDOM.READ.SEGMENT ( +STREAM) DMCHAT.HANDLECHARACTER (CHAT.STATE DM2500.STATE) \UFSParse-Directory (FDEV) \DO.PROGV ( +FNHEADER) GRAPHCHANGELABEL (GRAPH) \NSRANDOM.PREPARE.CACHE (NSPAGECACHE) CL:READ (READTABLEP ARRAYP) +\TEDIT.INSERTLINE (LINEDESCRIPTOR) \TEXTBACKFILEPTR (STREAM TEXTSTREAM PIECE) \ASSURE.FPTOVP.PAGE ( +IFPAGE) POSTSCRIPT.CLOSESTRING (STREAM \POSTSCRIPTDATA) CL:READ-PRESERVING-WHITESPACE (READTABLEP +ARRAYP) \TEDIT.HARDCOPY.DISPLAYLINE (LINEDESCRIPTOR THISLINE TEXTOBJ REGION ARRAYP CHARLOOKS FMTSPEC) +CREATEW1 (SCREENREGION REGION SCREEN) CL:READ-DELIMITED-LIST (READTABLEP ARRAYP) INIT/NODES/FOR/LAYOUT + (GRAPHNODE) SCALEDBITBLT (IMAGEOPS STREAM REGION) CL:PARSE-INTEGER (READTABLEP STRINGP CHARTABLE) +MENUSELECT (MENU) \LOOKUPPAGEMAP (VP) \DRAWPOINT.GENERIC (BRUSH) \UPDATE.PSC (\POSTSCRIPTDATA) +PRIN2-LONG-STRING (READTABLEP FONTDESCRIPTOR STRINGP CHARTABLE) DUMPGRAPH (GRAPH GRAPHNODE +FONTDESCRIPTOR) \FM.FORMATBYGRID (REGION) \DRAWPOLYGON.GENERIC (BRUSH POSITION) DMCHAT.CLEARMODES ( +CHAT.STATE DM2500.STATE) \UFS.ABORT.DIRECTORY (FILEGROUP FILEGENOBJ UFSGENFILESTATE) RIGHTW.REPAINTFN +(REGION) \SEQUIN.FLUSH.CONNECTION (SEQUIN) \LFDirectoryNameP (PARSEDFILENAME LogicalVolumeDescriptor) +\TEXTSETFILEPTR (TEXTSTREAM TEXTOBJ) FILEPKGCOM (FILEPKGCOM) ADVISEWDS (WINDOW REGION SCREEN) +\FLUSHPAGE (RPT VMEMFLAGS VP IFPAGE POINTER) \STORENSHOSTNUMBER (NSHOSTNUMBER) \RSTRING2 (STRINGP +CHARTABLE STREAM FDEV) \TRANSFERPAGE (RPT) \POLYSHADE.XSCAN.IP (SCAN) SPY.TITLE (SPYRECORD) +\PUTBASEFIXP (FIXP) READGRAPH (GRAPH) READ-EXTENDED-TOKEN (READTABLEP ARRAYP STRINGP FDEV STREAM +CHARTABLE) \SETMACROSYNTAX (CONTEXTS WAKEUPS ESCAPES) \VFMInsertPageGroup (FileDescriptor PageGroup +Interval Key) \SMASHSTRING (STRINGP) \READTABLEP.DEFPRINT (READTABLEP) \EDITBMHOWMUCH (BITMAP) +DELETETO (LINE) CONCATLIST (STRINGP LITATOM) EDITCHANGELABEL (GRAPH GRAPHNODE) \ATBLSET (CHARTABLE) +\NSRANDOM.CHECK.CACHE (NSPAGECACHE) BOTTOMOFGRIDCOORD (REGION) FW-REPAINTFN (FW-OFD) +\GetRootDirectoryType (LogicalVolumeDescriptor) SI::COMPILED-FUNCTION-ARGLIST (COMPILED-CLOSURE) +ADDCHAR (COMPLEXCHAR LINE) \TEXTPEEKBIN (TEXTSTREAM STREAM PIECE FDEV) PRINTLEAF (SEQUINPACKET +LEAFDATA) \TEDIT.PIECE-CHNO (PIECE BTREENODE) SI::COMPILED-FUNCTION-DEBUGGING-INFO (COMPILED-CLOSURE +FNHEADER) \CLIPANDDRAWLINE1 (BITMAP) TWODINSPECT.ARRANGEWINDOWS (POSITION REGION) \MOVEREALPAGE (RPT) +TEDIT.WINDOW.SETUP (TEXTOBJ MENU) RETFROM (FX) INSPECT/AS/FUNCTION (FX STACKP) INTERSECTREGIONS ( +REGION) CREATE.PACKET.EXCHANGE.XIP (PACKETEXCHANGEXIP) \TEDIT.PUT.PARALOOKS (PIECE) +FB.COMMANDSELECTEDFN (MENU FILEBROWSER) \SELECTREALPAGE (RPT VMEMFLAGS) \10MBENCAPSULATE (NSHOSTNUMBER +) \UPDATECHAIN (RPT VMEMFLAGS) FILL.LINE (FILL.TBLE) SEDIT::ATOM-POINT-TYPE (READTABLEP STRINGP) +\MAIKO.DISPLAYLINE (THISLINE TEXTOBJ FMTSPEC LINEDESCRIPTOR STREAM ARRAYP) READBQUOTECOMMA (READTABLEP +) \TEDITMENU.SELSCREENER (TEXTOBJ SELECTION) \FM.FORMATBYCOLUMN (REGION) OVERFLOW? (LINE) +ONEDINSPECT.ARRANGEWINDOWS (POSITION REGION) GRAPHREGION (GRAPH) REALSTKNTH (FX) +SI::CHANGE-CALLS-IN-CCODE (REFMAP) PFI.ADD.TO.INDEX (PFITYPE) SHADEGRIDBOX (REGION) +\PFPutRootDirectoryType (LogicalVolumeDescriptor LogicalSubVolumeMarker) \TEXTGETEOFPTR (TEXTOBJ +TEXTSTREAM) EDITCHANGEFONT (GRAPH) MOVETOUPPERLEFT (REGION) \MENUSUBITEMS (MENU) +EQUAL-READER-ENVIRONMENT (READER-ENVIRONMENT) BACKSKREAD (CHARTABLE) FILL.INITTBLE (BITMAP PILOTBBT +\DISPLAYDATA FILL.TBLE) SEDIT::ASSIGN-FORMAT-LITATOM (SEDIT::BROKEN-ATOM) CHAT.TTYENTRYFN (CHAT.STATE) + INIT.CURSOR (REGION) \FM.FORMATBYROW (REGION) GRAPHOBJ.GETALIGN (GRAPHNODE GRAPH) COMP.TRANSFORM ( +JUMP) \TEDIT.CHARDELETE (TEXTOBJ STRINGP SELECTION PIECE) REGIONP (REGION) OPENNSOCKET (NSOCKET FIXP) +\TEDIT.PUT.SINGLE.CHARLOOKS (CHARLOOKS FONTCLASS) DMCHAT.STATE (CHAT.STATE) FONTCREATE (FONTDESCRIPTOR + FONTCLASS WINDOW IMAGEOPS STREAM) \TEDIT.OBJECT.SHOWSEL (SELECTION LINEDESCRIPTOR IMAGEBOX TEXTOBJ) +\VALIDADDRESSP (POINTER) \SEND.EXPEDITED.XIP (EXPEDITEDXIP) BRV/OFFSET (GRAPHNODE) +\INTERNAL/SETPASSWORD (IFPAGE) INSPECTW.REPAINTFN (REGION SELECTABLEITEM) LLSH (FIXP) +\POLYSHADE.DISPLAY (SCAN BRES) \PFVersionOK (LogicalVolumeDescriptor) EDITBMSCROLLFN (REGION BITMAP) +SHOWWTITLE (SCREEN WINDOW) RAIDROOTFRAME (IFPAGE) COMP.RETFROM.POINT (COMP) GRIDYCOORD (REGION) +\ALLOCWIDTHTOGROUPEDWINDOW (RESHAPINGWINDOWDATA) TEDIT.REDO.REPLACE (SELECTION TEXTOBJ) +\PFPatchRootDirEntries (RootDirectory) \GETBASESTRING (STRINGP) \TEXTGETFILEPTR (TEXTSTREAM STREAM +PIECE TEXTOBJ) SHOWWFRAME (WINDOW REGION) TTYIN (TTYINBUFFER) \TEDIT.SET-TOTLEN (BTREENODE) +\TEDIT.HARDCOPY.FORMATLINE (TEXTOBJ ARRAYP THISLINE LINEDESCRIPTOR TEXTSTREAM CHARLOOKS PIECE +FONTCLASS FMTSPEC STREAM PAGEFORMATTINGSTATE CHARSETINFO PENDINGTAB) \INTERACTIVE.CLOSEW (WINDOW) +TTDELETELINE (LINE) \DSPUNTRANSFORMREGION (REGION) TTSKREAD (CHARTABLE) \FM.FORMAT (REGION) +GRAPHERPROP (GRAPH) \TEDIT.TABTYPE.SET (SELECTION PIECE MARGINBAR) SEGMENT.LENGTH (COMPLEXCHAR) +GETCHATWINDOW (CHAT.STATE) \LFNormalizeVolumeName (PARSEDFILENAME) TTYIN.SETUP (TTYINBUFFER) +TB.REMOVE.ITEM (TABLEBROWSER) TTYIN.CLEANUP (TTYINBUFFER) \BUILD.EXPEDITED.XIP (EXPEDITEDXIP +COURIERPGM COURIERFN) TTYIN.FINISH (LINE CHARTABLE TTYINBUFFER) DEFAULT.INSPECTW.TITLECOMMANDFN (MENU +SELECTABLEITEM) \SEQUIN.CONTROL (SEQUINPACKET) \ITEM.WINDOW.COPY.HANDLER (SELECTABLEITEM) DCODERD ( +CODEARRAY) \OKTOCLOSEW (WINDOW) \MEDW.BLTCHAR (\DISPLAYDATA PILOTBBT) TERM.TAB (CHAT.STATE) +TEDIT.FORMATTEDFILEP (TEXTOBJ PIECE) \TEDIT-OPEN-FONT-FILE (STREAM) \DSPXPOSITION.PSC (STREAM +\POSTSCRIPTDATA) \MEDW.XOFFSET (STREAM) WINDOWPOSITION (REGION) \TEDIT.COPYTEXTSTREAM.PIECEMAPFN ( +PIECE TEXTOBJ) \MEDW.YOFFSET (STREAM \DISPLAYDATA) \VFMGetPageGroup (FileDescriptor Key Interval) +\TEXTEOFP (TEXTSTREAM STREAM PIECE) \TFBRAVO.FONT.FROM.CHARLOOKS (CHARLOOKS) TTYIN1RESTART ( +TTYINBUFFER LINE) \TEDIT.FIXCHANGEDLINE (LINEDESCRIPTOR THISLINE TEXTOBJ) \NOIMAGE.DSPFONT (FONTCLASS) + MAXMENUITEMWIDTH (MENU BITMAP) TB.USERDATA (TABLEBROWSER) PRIN4 (READTABLEP) GRAPHADDNODE (GRAPH) +\LINEWITHBRUSH (\DISPLAYDATA BITMAP) \TFBRAVO.READ.PARALOOKS (FMTSPEC) \TEDIT.FIND.OVERLAPPING.LINE ( +LINEDESCRIPTOR) TTYIN.READ (CHARTABLE FDEV LINEBUFFER) GRIDXCOORD (REGION) \ALLOCHEIGHTTOGROUPEDWINDOW + (RESHAPINGWINDOWDATA) TTWAITFORINPUT (REGION LINE TTYINBUFFER) \PFFindRootDirEntryNum (RootDirectory +RootDirEntry) \TEDIT.SET.WINDOW (TEXTOBJ) LEFTOFGRIDCOORD (REGION) TEDIT.CURSOROUTFN (TEXTOBJ) +GO.TO.FREELINE (LINE) \TEDIT.LCASE.SEL (SELECTION TEDITHISTORYEVENT TEXTOBJ) RAIDSTACKCMD (IFPAGE FX) +PROVIDE.PROMPTING.WINDOW (REGION) PUTSEQUIN (SEQUIN SEQUINPACKET) FW-AFTERMOVEFN (FW-OFD REGION +POSITION) TTYIN1 (LINEBUFFER LINE TERMCODE CHARTABLE READCODE) \CCLOSURE.DEFPRINT (COMPILED-CLOSURE +READTABLEP) \TFBRAVO.READ.CHARLOOKS (CHARLOOKS) \DEFINEDP (LITATOM) POSTSCRIPT.BITMAPSCALE (REGION) +TB.CLEAR.LINE (TABLEBROWSER) \GET-COMPILED-DEFINITION (LITATOM COMPILED-CLOSURE) UNIX.SETDISPLAYTYPE ( +CHAT.STATE) \SPP.SKIPBYTES (STREAM) TRANSLATEREG (REGION) PFI.DEFAULT.HANDLER (PFITYPE) STRINGWIDTH ( +FONTDESCRIPTOR CHARSETINFO IMAGEOPS STREAM) READHASHMACRO (READTABLEP) \TEDITOUTCHARFN (STREAM) +TERM.SMOOTHSCROLL (CHAT.STATE) CHAT.INIT (CHATDISPLAYTYPE CHAT.STATE STREAM) \PFGetLVPage ( +LogicalVolumeDescriptor) \DSPYPOSITION.PSC (STREAM \POSTSCRIPTDATA) \SW2BM (REGION BITMAP) \MOVETO.PSC + (STREAM \POSTSCRIPTDATA) RAIDCOMMAND (LITATOM IFPAGE POINTER) SETUPPAGEMAP (VP) INSPECT/BITMAP (MENU) + MAXMENUITEMHEIGHT (MENU BITMAP) CLOSEHASHFILE (HashFile) NODEREGION (GRAPHNODE) FB.SHAPECOMMAND ( +FILEBROWSER REGION) CL:MAKE-SYMBOL (STRINGP) \SETUFNENTRY (UFNENTRY) MBUTTON.SET.NEXT.FIELD (TEXTOBJ +SELECTION) FILL-VECTOR (ARRAY-HEADER) \GETUFNENTRY (OPCODE UFNENTRY) \NEWEPHEMERALPAGE (IFPAGE) +\DONEWEPHEMERALPAGE (POINTER VP VMEMFLAGS RPT) INFILECOM (FILEPKGCOM) CHARACTER.READ (CHARTABLE) +TERM.SETMARGINS (CHAT.STATE) GRID (REGION) TEDIT.MODIFYLOOKS (CHARLOOKS LINEDESCRIPTOR) +TEDIT.REDO.MOVE (TEXTOBJ SELECTION) DISCARDPUPS (PUPSOCKET) \NSFILING.OPENFILE (STREAM FDEV) +TERM.SET.TAB (CHAT.STATE) UNIONREGIONS (REGION) \TEDIT.MARK.REVISION (LINEDESCRIPTOR) CALLSCCODE ( +FNHEADER COMPILED-CLOSURE) RETVALUES (FX) FB.DEPTHCOMMAND (FILEBROWSER) BREAK.NSFILING.CONNECTION ( +FDEV) TEDIT.FORMATTEXTBOX (PAGEFORMATTINGSTATE PAGEREGION REGION LINEDESCRIPTOR TEXTOBJ FMTSPEC) +COPYTEXTSTREAM (TEXTOBJ SELECTION) FLIPNODE (GRAPHNODE) \SHOWMENULABEL (REGION MENU BITMAP) +INSPECT/ATOM (MENU) \SEQUIN.PUT (SEQUIN SEQUINPACKET) MAPHASHFILE (HashFile DoubleKey) \CODEBLOCKP ( +POINTER ARRAYBLOCK) DEFAULT.BACKGROUND.COPYFN (MENU) \TEMPLOCKPAGES (IFPAGE) COMPOSEREGS (REGION) +ADJUSTLINE.AND.RESTORE (LINE) RAIDSHOWFRAME (FX) \DSPFONT.PSC (STREAM \POSTSCRIPTDATA FONTDESCRIPTOR +PSCFONT FONTID) \TEDIT.NEUTRALIZE.CHARLOOKS.MENU (TEXTOBJ) FB.INFOMENU.WHENSELECTEDFN (FILEBROWSER) +COMP.MLLIST (COMINFO) TERM.SCROLLDOWN (CHAT.STATE) DOBACKGROUNDCOM (MENU) \PROMPTFORWORDBIN ( +LINEBUFFER FDEV STREAM) CREATE-SHELL-STREAM (FDEV) FM.CHANGELABEL (FREEMENUITEM REGION) +\DSPLEFTMARGIN.PSC (STREAM \POSTSCRIPTDATA) \DSPMOVELR (STREAM) READPAGEMAP (POINTER IFPAGE) +DELETEMENU (WINDOW MENU) TEDIT.FORMATFOLIO (PAGEREGION PAGEFORMATTINGSTATE TEXTOBJ REGION +LINEDESCRIPTOR) \DOFLUSHVM (POINTER IFPAGE) \RELEASEWORKINGSET (RPT) \MATCHPCS (BTREENODE PIECE) +UPDATE/MENU/IMAGE (WINDOW MENU SCREEN BITMAP REGION) OPENHASHFILE (HashFile STREAM) \FLUSHVM (IFPAGE) +\TEDIT.SELECT.CHARACTER (SELECTION LINEDESCRIPTOR TEXTOBJ) DECODE.WINDOW.ARG (POSITION) OVERFLOWLINE? +(LINE) \PAGEDBACKFILEPTR (STREAM) \TEDIT.COPY.LINEDESCRIPTOR (LINEDESCRIPTOR) STRPOSL (CHARTABLE +LITATOM STRINGP) \DSPPRINTCHAR (STREAM TERMCODE CHARTABLE \DISPLAYDATA) \PFRemoveRootDirEntry ( +RootDirectory) CHANGECCODE (REFMAP) DSPCLEOL (STREAM) \WRITEDIRTYPAGE1 (RPT VMEMFLAGS) DEFAULTFONT ( +FONTCLASS) \CLIPANDDRAWLINE (BITMAP) CHARWIDTHY (FONTDESCRIPTOR CHARSETINFO STREAM IMAGEOPS) +\DRAWPOLYGON.DISPLAY (BRUSH POSITION) TEDIT.FORMATHEADING (PAGEREGION PAGEFORMATTINGSTATE TEXTSTREAM +PIECE TEXTOBJ REGION LINEDESCRIPTOR) NEAREST/PT/ON/GRID (POSITION) \PFAddRootDirEntry (RootDirectory) +\DRAWPOINT.DISPLAY (BITMAP) \STRINGWIDTH.GENERIC (LITATOM PNAMEBASE CHARSETINFO READTABLEP STRINGP) +HASHFILEPROP (HashFile) \DSPCLIPPINGREGION.DISPLAY (STREAM REGION \DISPLAYDATA) \PEEKCCODE.NOEOLC ( +STREAM) \SPP.PREPARE.OUTPUT (SPPCON STREAM SPPXIP) \DSPRIGHTMARGIN.PSC (STREAM \POSTSCRIPTDATA) +\CHARWIDTH.DISPLAY (CHARSETINFO \DISPLAYDATA) \LASTNODE (BTREENODE) \INCCODE.EOLC (STREAM) +\NSFILING.CLOSE.CONNECTIONS (FDEV) INSPECT/TYPELESS (ARRAYBLOCK) GRAPHOBJ.CHECKALIGN (GRAPH) +\STRINGWIDTH.DISPLAY (\DISPLAYDATA) \DSPOPERATION.DISPLAY (STREAM PILOTBBT) PRINTERDEVICE (FDEV STREAM +) \FORMATBYTESTREAM (STREAM) TERM.RIGHT (CHAT.STATE) START.OF.PARAGRAPH? (LINE COMPLEXCHAR) +\DEVICESYMBOL (IMAGEOPS STREAM) \FIXLINELENGTH.PSC (\POSTSCRIPTDATA STREAM) PREVLINE (LINE) +\PFFreeDiskPages (LogicalVolumeDescriptor) \UNCOPY (FIXP FLOATP STRINGP ONED-ARRAY) \BACKCOLOR.DISPLAY + (STREAM \DISPLAYDATA BITMAP) FB.INFOMENU.SHADEINITIALSELECTIONS (MENU) \BLTSHADE.DISPLAY (STREAM +\DISPLAYDATA REGION BITMAP PILOTBBT) PRINTCODE (FNHEADER) ICONW (POSITION BITMAP) \DSPLINEFEED.PSC ( +\POSTSCRIPTDATA STREAM) SETFONTCLASSCOMPONENT (FONTCLASS) MAKEROOMFORPME (VP) TEDIT.FORMATPAGE ( +PAGEFORMATTINGSTATE PAGEREGION TEXTOBJ PIECE FMTSPEC STREAM REGION LINEDESCRIPTOR) EDITBMBUTTONFN ( +REGION BITMAP MENU POSITION CURSOR) \BITBLT.DISPLAY (BITMAP STREAM REGION \DISPLAYDATA PILOTBBT +IMAGEOPS) PRINTCODENT (FNHEADER) GETPUP (PUPSOCKET) DELETETO1 (COMPLEXCHAR) \SPLITTREE (BTREENODE) +TEDIT.CURSORMOVEDFN (TEXTOBJ LINEDESCRIPTOR FMTSPEC) NTH.COLUMN.OF (LINE) FONTUNPARSE (FONTDESCRIPTOR +FONTCLASS FONTFACE) \SEQUIN.PROCESS (SEQUIN) MBUTTON.NEXT.FIELD.AS.TEXT (TEXTOBJ) FONTCLASSUNPARSE ( +FONTCLASS) TRACKCURSOR (GRAPHNODE) \DSPRESET.DISPLAY (STREAM \DISPLAYDATA FONTDESCRIPTOR REGION) +32MBADDRESSABLE (IFPAGE) \DRAWLINE.DISPLAY (BRUSH \DISPLAYDATA) BROWSE/LAYOUT/HORIZ/COMPACTLY ( +GRAPHNODE) \TEDIT.APPLY.PAGEFORMATTING (SELECTION TEXTOBJ) \TEDIT.CLEAR.SCREEN.BELOW.LINE (TEXTOBJ +LINEDESCRIPTOR) \FILLCIRCLE.DISPLAY (STREAM \DISPLAYDATA BITMAP PILOTBBT) \DRAWELLIPSE.DISPLAY ( +\DISPLAYDATA BITMAP) GETSEQUIN (SEQUIN) INSPECTW.REDISPLAY (SELECTABLEITEM) \DRAWCURVE.DISPLAY ( +POSITION) \XCCSOUTCHAR (STREAM) NEW/INSTANCE/OF/GRAPHNODE (GRAPHNODE) \SET.LASTVMEMFILEPAGE (IFPAGE) +\DSPYPOSITION.DISPLAY (\DISPLAYDATA) \SEQUIN.CLOSE (SEQUIN) \DSPXPOSITION.DISPLAY (STREAM) +\TEDIT.FILL.IN.CHARLOOKS.MENU (TEXTOBJ CHARLOOKS FONTCLASS SELECTION) \DRAWCIRCLE.DISPLAY (STREAM +\DISPLAYDATA BITMAP) ENDREAD? (CHARTABLE) MBUTTON.NEXT.FIELD.AS.PIECES (TEXTOBJ) \XCCSFORMATBYTESTREAM + (STREAM) \TEDIT.FORMAT.FOUNDBOX? (PAGEFORMATTINGSTATE PAGEREGION) \GETREGION.CHECKOPPT (POSITION) +FB.NEWINFOCOMMAND (FILEBROWSER REGION) \TEXTINIT (STREAM) TEDIT.PARSE.PAGEFRAMES (PAGEREGION) +\SCALEDBITBLT.DISPLAY (REGION) CONCAT (STRINGP LITATOM) \DSPFONT.DISPLAY (STREAM \DISPLAYDATA +FONTDESCRIPTOR CHARSETINFO) \MAKEBRUSH.ROUND (BITMAP) SPP.CLEARATTENTION (SPPSTREAM STREAM) +\DRAWLINE.PSC (STREAM \POSTSCRIPTDATA) \PFCurrentVol (DiskFileID PhysicalVolumeDescriptor +LogicalVolumeDescriptor) DUMPINITPAGES (IFPAGE VP) NTH.RELATIVE.COLUMN.OF (LINE COMPLEXCHAR) +MBUTTON.NEXT.FIELD.AS.ATOM (TEXTOBJ) MOVE.TO.LINE (LINE) MBUTTON.NEXT.FIELD.AS.NUMBER (TEXTOBJ) +\FONTFACE (FONTFACE) %%SET-ARRAY-OFFSET (ARRAY-HEADER) COURIER.EXPEDITED.CALL (COURIERFN) +%%SET-ARRAY-TYPE-NUMBER (ARRAY-HEADER) \DOVMEMFULLINTERRUPT (IFPAGE) EDITADDNODE (GRAPHNODE) +INITSEQUIN (SEQUIN) TERM.NEWLINE (CHAT.STATE) \MAP-CODE-POINTERS (ARRAYBLOCK FNHEADER) +\REGIONOVERLAPAREAP (REGION) FB.ALLOW.ABORT (FILEBROWSER) \MAP-CODE-LITERALS (ARRAYBLOCK FNHEADER) +\DRAWCURVE.PSC (STREAM \POSTSCRIPTDATA) \FONT.COMPARESYMBOL (PNAMECELL LITATOM PNAMEBASE) CHECKIFPAGE +(IFPAGE) GETGRIDBOXREGION (REGION \DISPLAYDATA STREAM POSITION) \PFPutRootDirectory (PageGroup) +SETUPPUP (PUP) \AREAVISIBLE? (SCREEN WINDOW) DSPXSCREENTOWINDOW (\DISPLAYDATA STREAM) FONTHEIGHT ( +FONTDESCRIPTOR) \PFGetRootDirectory (PageGroup) TEDIT.BUILD.PCTB0 (TEXTOBJ PIECE) PAINTW (WINDOW +SCREEN BITMAP CURSOR) SEGMENT.BIT.LENGTH (COMPLEXCHAR) \DSPBACKCOLOR.DISPLAY (STREAM \DISPLAYDATA +BITMAP) SPP.FLUSH.TO.EOF (STREAM SPPSTREAM) SHOW.MATCHING.PAREN (LINE) \DSPCOLOR.DISPLAY (STREAM +\DISPLAYDATA) TEDIT.SCAN.LINE (THISLINE TEXTOBJ LINEDESCRIPTOR FMTSPEC ARRAYP CHARLOOKS SELECTION) +BRHL/MOVE/RIGHT (GRAPHNODE) TEDIT.PROMPTFLASH (TEXTOBJ) \PRINDATUM.TO.STRING (STRINGP) BROKENDEF ( +FNHEADER OPCODE) UTF16BE.OUTCHARFN (STREAM) \INSERTTREE (BTREENODE PIECE) TEDIT.FORMAT.HARDCOPY ( +TEXTOBJ STRINGP STREAM PAGEFORMATTINGSTATE) \STREAM.FROM.PACKET (XIP) \DRAWCIRCLE.PSC (STREAM +\POSTSCRIPTDATA) ADDPME (VP) \TEDIT.CONVERT.FOREIGN.FORMAT (TEXTOBJ) CLOSESEQUIN (SEQUIN) VOLUMESIZE ( +LogicalVolumeDescriptor) PRIN1 (READTABLEP STREAM) FM.WHICHITEM (POSITION REGION FREEMENUITEM) +FB.GET.SORT.MENU (FILEBROWSER) SPACES (STREAM) SPPSTREAMP (SPPCON) PRINTNUM (FLOATFMT FIXFMT) +\DRAWELLIPSE.PSC (STREAM \POSTSCRIPTDATA) \FAST4BIT (NIBBLE) \TEDIT.UNIQUIFY.CHARLOOKS (TEXTOBJ) +GETCHARBITMAP (CHARSETINFO BITMAP) BRHL/LAYOUT (GRAPHNODE) \DO.PROGV.SETUP.FRAME.AND.EXECUTE (FX +FNHEADER) MAKEWITHINREGION (REGION) \TEDIT.UPDATETREE (BTREENODE) \TEDIT.PARSE.CHARLOOKS.MENU (TEXTOBJ + SELECTION) \PFGetVols (PhysicalVolumeDescriptor) \MAPPNAME.INTERNAL (STREAM) \CORE.UPDATEOF (BYTEPTR) + OUTPUT (STREAM) SHOW.IP (FDEV) TEDIT.BUILD.PCTB2 (TEXTOBJ PIECE) \TEDIT.ADJUST.LINES (TEXTOBJ +LINEDESCRIPTOR) GO.TO.RELATIVE (LINE) DSPYSCREENTOWINDOW (\DISPLAYDATA STREAM) \VAMGetVAMPageFor ( +LogicalVolumeDescriptor) \PFFindRootDirEntry (RootDirEntry RootDirectory) RPLSTRING (STRINGP LITATOM) +\CORE.DELETEFILE (STREAM FDEV) \SHOWTEXT (TEXTOBJ) \CORE.GETINFOBLOCK (STREAM) EDITAPPLYTOLINK (GRAPH) + CHAT.STARTUP (CHATDISPLAYTYPE) BKSYSCHARCODE (RING) REDISPLAYW (SCREEN WINDOW) VOLUMES ( +LogicalVolumeDescriptor) FM.EDITITEM (FREEMENUITEM) \GETREGION.CHECKBASEPT (POSITION) BKSYSBUF ( +LITATOM PNAMEBASE STRINGP) SHAPEW (WINDOW REGION) \CHTOPC (BTREENODE) FB.SORTCOMMAND (FILEBROWSER +FBFILEDATA) \MAPPNAME (READTABLEP) \CORE.GENERATEFILES (FDEV COREFILEINFOBLK) \TFBRAVO.EOLS (TEXTOBJ) +TOGGLE/DIRECTEDFLG (GRAPH) FILL.INCY (FILL.TBLE PILOTBBT) PROCESS.EVALV (PROCESS) \BITMAPTOSCREEN ( +SCREEN) TYPE.BUFFER (COMPLEXCHAR) FONTCOPY (FONTCLASS FONTDESCRIPTOR) CURRENT.WORD (LINE CHARTABLE) +TOGGLE/SIDESFLG (GRAPH) TEDIT.BUILD.PCTB1 (TEXTOBJ PIECE) FONTSAVAILABLE (STREAM FONTDESCRIPTOR +FONTCLASS WINDOW) FONTMAPARRAY (FONTCLASS) SEDIT::STRINGWIDTH (STRINGP) \CORE.NEXTFILEFN ( +COREFILEINFOBLK) FB.ALPHABETIC.ATTR (FBFILEDATA) GAINSPACE (GAINSPACE) \LOOKUPFONTSINCORE ( +FONTDESCRIPTOR) \SMASHABLESTRING (STRINGP) TERM.IDENTIFY.SELF (CHAT.STATE) BRHL/LAYOUT/DAUGHTERS ( +GRAPHNODE) SPP.SENDATTENTION (SPPXIP XIP) TEDIT.SELECT.LINE.SCANNER (TEXTOBJ LINEDESCRIPTOR SELECTION) + SPP.OPENP (SPPCON) \RPLCHARCODE (STRINGP) \BLTSHADE.PSC (STREAM \POSTSCRIPTDATA REGION) +\TEDIT.PROCIDLEFN (TEXTOBJ) FONTP (FONTDESCRIPTOR FONTCLASS) \TEDIT.APPLY.CHARLOOKS (SELECTION TEXTOBJ +) \CORE.GETFILEINFO (STREAM) \TEDIT.UNIQUIFY.PARALOOKS (TEXTOBJ) GNCCODE (STRINGP) GLCCODE ( +ARRAY-HEADER STRINGP) \PRINTFPTOVP (IFPAGE) FB.INSERT.SUBDIRECTORIES (FBFILEDATA) STREQUAL (STRINGP) +FB.PROMPTFORINPUT (FILEBROWSER) CL:SYMBOL-PACKAGE (CL:SYMBOL) TEDIT (TEXTOBJ) MSADDANALYZE ( +MSANALYZABLE) FW-ADJUST-REGION (FW-OFD POSITION) L-CASE (LITATOM STRINGP PNAMEBASE) \LOCKFN (LITATOM +DEFINITIONCELL) U-CASEP (LITATOM PNAMEBASE STRINGP) GETTOPVAL (LITATOM) \MAKEWRITABLESTRING (STRINGP) +TEDIT.PUT (TEXTOBJ STREAM PIECE LITATOM) SPPOUTPUTSTREAM (SPPCON) EDITBM (REGION BITMAP) KILLSEGMENT ( +TTYINBUFFER) SETTOPVAL (LITATOM) %%MAKE-STRING-ARRAY-FAT (ARRAY-HEADER) \TEDIT.TEXTBIN.STRINGSETUP ( +STRINGP STREAM TEXTSTREAM) \TFBRAVO.INIT.PARALOOKS (FMTSPEC) \LOCKWORDS (POINTER) \NSRANDOM.CLOSEFILE +(STREAM) %%MAKE-ARRAY-WRITEABLE (ARRAY-HEADER) \#BLOCKDATACELLS (ARRAYBLOCK) \CORE.PACKFILENAME (FDEV) + TEDIT.PUT.PCTB2 (TEXTOBJ ARRAYP PIECE STREAM STRINGP) SETPROPLIST (LITATOM) FB.PROMPTW.FORMAT ( +FILEBROWSER) \TEDIT.DIFFUSE.PARALOOKS (PIECE) \LOCKVAR (LITATOM) TEDIT.UNDO.REPLACE (TEXTOBJ SELECTION +) \CREATE-REAL-CHARSET.DISPLAY (FONTFACE FONTDESCRIPTOR) SEDIT::BUILD-WINDOW (REGION) +TEDIT.GET.OBJECT0 (TEXTSTREAM PIECE TEXTOBJ) \PUTBASESTRING (STRINGP LITATOM PNAMEBASE) TERM.GODOWN ( +CHAT.STATE) INSERTLINE (LINE) \SFMAKEITALIC (CHARSETINFO) \TEDIT.SHOW.CHARLOOKS (SELECTION TEXTOBJ +PIECE) \TEXTMENU.TOGGLE.DISPLAY (BITMAP) FM.SHADE (FREEMENUITEM) ALIGNMENTNODE (GRAPH) +FB.INCREASING.NUMERIC.ATTR (FBFILEDATA) \TEDIT.FIXINSSEL (SELECTION) \IFSERRORSTRING (SEQUIN) +\BUILDSLUGCSINFO (CHARSETINFO) \SCALEDBITBLT.PSC (STREAM \POSTSCRIPTDATA) \CORE.OPENFILE (STREAM) +TEDIT.UNDO.MOVE (TEXTOBJ SELECTION) \TEDIT.TEXTBIN.FILESETUP (STREAM TEXTSTREAM BYTEPTR PIECE) +\SFROTATECSINFO (CHARSETINFO) POSTSCRIPT.HARDCOPYW (STREAM \POSTSCRIPTDATA REGION) \SETARG0 (FX BF) +\NSRANDOM.OPENFILE (STREAM) \TEDIT.NEUTRALIZE.CHARLOOKS (SELECTION) \DOHARDRETURN (IFPAGE) TTADDTAB ( +LINE) MB.MARGINBAR.DISPLAYFN (MARGINBAR REGION) \DOHARDRETURN1 (FX FNHEADER FSB BF) COMP.STTAG (TAG +JUMP) \MKATOM (PNAMEBASE PNAMEINDEX LITATOM) BRHC/OFFSET (GRAPHNODE) \TEDIT.FIXDELSEL (SELECTION) +\CREATE.SYMBOL (VALINDEX PNAMEINDEX PNAMEBASE LITATOM) \GCSCANSTACK (STK FX FNHEADER PVARSLOT +STACKCELL FSB BF) \CORE.SETFILEPTR (BYTEPTR) \PARSE.NUMBER (READTABLEP) \CORE.BACKFILEPTR (STREAM) +BLTSHADE (BITMAP IMAGEOPS STREAM) TERM.ERASE.IN.DISPLAY (CHAT.STATE) \CORE.SETEOFPTR (BYTEPTR) +\DECUSECOUNT (FX BF) \CREATECHARSET.PSC (CHARSETINFO) BITMAPP (BITMAP) PURGEDSKDIRECTORY (FDEV +DLIONSTREAM LogicalVolumeDescriptor) FM.REDISPLAYITEM (FREEMENUITEM REGION) BMOBJ.PUTFN (BITMAPOBJ) +\INCUSECOUNT (FX STK BF) COMP.STJUMP (TAG) \COERCETODS (WINDOW) FW-MOVEW (FW-OFD) \DOSTACKOVERFLOW ( +IFPAGE) \CORE.GETNEXTBUFFER (STREAM) \NSFILING.SETFILEINFO (STREAM) \MOVEFRAME (FX FSB IFPAGE BF) +WINDOWWORLD (SCREEN) FROMLINKS (GRAPHNODE) \ALLOCBLOCK (ARRAYBLOCK) \SETUPUSERSTACK (IFPAGE) SLICESET +(ICML.ARRAYSLICE) TEDIT.GET.CHARLOOKS0 (PIECE CHARLOOKS) SEDIT::TRANSLATE-CHARS (READTABLEP STRINGP) +SEDIT::LINEARIZE-CLISP (SEDIT::WEAK-LINK) TTYIN.SHOW.?ALTERNATIVES (CHARTABLE) +MBUTTON.FIND.NEXT.BUTTON (TEXTOBJ PIECE MBUTTON MARGINBAR NWAYBUTTON) \FONTFILENAME (FONTFACE) +FB.DECREASING.NUMERIC.ATTR (FBFILEDATA) \ITEMW.FLIPCOPY (SELECTABLEITEM) MAPATOMS (POINTER) +\EXTENDSTACK (IFPAGE) FB.DIRECTORYP (FBFILEDATA) \TEDIT.APPLY.PARASTYLES (TEXTOBJ FMTSPEC) +ATOMHASH#PROBES (LITATOM STRINGP PNAMEBASE PNAMEINDEX) CREATE-PROCESS-STREAM (FDEV) +ONEDINSPECTW.CREATE (REGION POSITION) \DSPSCALE.PSC (STREAM \POSTSCRIPTDATA) %%ARRAY-BASE ( +ARRAY-HEADER) \VAMCheckEndOfVol (LogicalVolumeDescriptor) %%ARRAY-OFFSET (ARRAY-HEADER) +\HANDLE.RAW.PUP (PUPSOCKET) %%ARRAY-TYPE-NUMBER (ARRAY-HEADER) POSTSCRIPT.ENDPAGE (STREAM +\POSTSCRIPTDATA) \GENERIC-UNREGISTER-STREAM (FDEV) \FONTFACE.COLOR (FONTFACE) INSTALLBRUSH (BRUSHITEM) + \ADD-OPEN-STREAM (FDEV) \COURIER.RESULTS (COURIERFN COURIERPGM COURIERERR) \SETUPGUARDBLOCK (FSB) +FW-SHAPEW (FW-OFD) \PFInitializeVols (PhysicalVolumeDescriptor) \NSRANDOM.READPAGES (STREAM) +TEDIT.GET.PARALOOKS0 (PIECE FMTSPEC) BREAKLINE (LINE) PUTD (COMPILED-CLOSURE) \NODIRCORE.OPENFILE ( +STREAM) \PUTD (LITATOM COMPILED-CLOSURE DEFINITIONCELL ARRAYP FNHEADER) SI::NON-LOCAL-GO (FX) +COPYGRAPH (GRAPH GRAPHNODE) \RENAMEDFN (COMPILED-CLOSURE FNHEADER) SI::UNWIND-TO-BLIP (FX) +\INIT-MISCN-TABLE (ARRAYP MISCN-UFN-ENTRY MISCN-UFN-SPEC) GRAPHEROBJ (REGION) GETD (LITATOM +DEFINITIONCELL) CL:SYMBOL-NAME (LITATOM) POSTSCRIPT.PUTCOMMAND (STREAM \POSTSCRIPTDATA) GETMENUITEM ( +MENU) SLICEDIMENSION (ICML.ARRAYSLICE) \DSPSCALE2.PSC (STREAM \POSTSCRIPTDATA) \POLYSHADE.BLT (SCAN) +\NSRANDOM.SESSION.WATCHER (FDEV STREAM) \STKMIN (OPCODE ARRAYP FNHEADER) \NSFILING.GETFILEINFO (STREAM +) \LFFindDirectoryVol (LogicalVolumeDescriptor) FM.RESETSHAPE (REGION) \GET-COMPILED-CODE-BASE ( +LITATOM COMPILED-CLOSURE) OPENP (STREAM) \TTY.CREATING.DISPLAYSTREAM (STREAM) \FONTFILENAME.NEW ( +FONTFACE) TWODINSPECTW.CREATE (REGION POSITION) SETA (ARRAYP) \DSPCOLOR.PSC (\POSTSCRIPTDATA STREAM) +GRAPHOBJ.IMAGEBOXFN (REGION GRAPHNODE) ARRAY (ARRAYP) BRHC/LAYOUT/DAUGHTERS (GRAPHNODE) +COPY.WINDOW.TO.BITMAP (REGION) TEDITWINDOWP (TEXTOBJ) \SELITEM.FROM.PROPERTY (SELECTABLEITEM) +\DELETETREE (BTREENODE) MB.MARGINBAR.SELFN (REGION) \MEDW.GETSCREENREGION (REGION POSITION) +\MEDW.CARET.SHOW (CARET1 STREAM CURSOR BITMAP \DISPLAYDATA REGION) FB.FETCHFILENAME (FBFILEDATA) +TEDIT.GET.OBJECT1 (TEXTSTREAM PIECE TEXTOBJ) \READSTRIKEFONTFILE (CHARSETINFO) SI::PVAR-VALUE-IN-FRAME + (FNHEADER FX PVARSLOT) \TEDIT.NEXT.LINE.BOTTOM (FMTSPEC LINEDESCRIPTOR) \READACFONTFILE (CHARSETINFO +FONTBOUNDINGBOX) SI::VARIABLE-NAME-IN-FRAME (FX FNHEADER) TERM.CLEAR.TAB (CHAT.STATE) +FW-ADJUST-PLACEMENT (FW-OFD) \NSRANDOM.WRITEPAGES (STREAM) RETURN (FNHEADER FX) \DISCARDFRAME (FX BF) +MBUTTON.FIND.BUTTON (TEXTOBJ PIECE) FM.RESETSTATE (FREEMENUITEM) \TEDIT.GET.PARALOOKS1 (FMTSPEC) +ERASE/GRAPHNODE (GRAPHNODE POSITION) CL:FIND-SYMBOL (STRINGP) \DELETEPIECE (PIECE) FINDPCNODE (PIECE) +TEDIT-BOOK (TEXTOBJ) TB.COLLECT.ITEMS (TABLEBROWSER) ASKUSER1 (ASKUSER) SLICEREF (ICML.ARRAYSLICE) +SCROLL.HANDLER (WINDOW) ELT (ARRAYP) \TERPRI.PSC (STREAM \POSTSCRIPTDATA FONTDESCRIPTOR) +\SFROTATECSINFOOFFSETS (CHARSETINFO) PROCESSPROP (PROCESS) \FONTRESETCHARWIDTHS (CHARSETINFO) +ROTATE-BITMAP (BITMAP PILOTBBT) \IRM.CHOOSE.REF (IRMREFERENCE) GRAPHOBJ.DISPLAYFN (REGION) +FM.CHANGESTATE (FREEMENUITEM REGION) OPT.CHECKTAG (TAG) CLEARSTK (STACKP) BRHC/LAYOUT/TERMINAL ( +GRAPHNODE) ROTATE-BITMAP-LEFT (BITMAP PILOTBBT) TERM.ERASEBITS (CHAT.STATE) TEDIT.HCPYFILE (STREAM +TEXTOBJ) \SFMAKECOLOR (CHARSETINFO) RELSTKP (FX) \BASEBYTES.PEEKBIN (STREAM) \DSPTOPMARGIN.PSC ( +\POSTSCRIPTDATA STREAM) \RESETTERMINAL (LINEBUFFER) \BASEBYTES.BOUT (BASEBYTESTREAM) STRIKECSINFO ( +CHARSETINFO) UPDATEWFROMIMAGE (WINDOW REGION) WRITESTRIKEFONTFILE (CHARSETINFO BITMAP FONTDESCRIPTOR) +\TEDIT.PRESS.HARDCOPY (TEXTOBJ) FB.PROMPTWPRINT (FILEBROWSER) ASKUSER$ (ASKUSER) SEDIT::MARKASCHANGEDFN + (SEDIT::EDIT-CONTEXT) CH.FINDSERVER (NSNAME) \SETUPSTACK1 (FNHEADER STK BF FX) UTF8.OUTCHARFN (STREAM +) DELETE.TO.END (LINE) SPP.EOFP (STREAM) \PFCreateVols (ARRAYP) \RESETSTACK0 (IFPAGE LITATOM FSB) +\MAKEBASEBYTESTREAM (STREAM BASEBYTESTREAM) \MBS.OUTCHARFN (STREAM) \SERIALNUMBER (IFPAGE) CARET ( +CARET1) OPENSTRINGSTREAM (STRINGP STREAM) \FBITMAPBIT.UFN (BITMAPWORD) \BUILDATWSTRUCTURE (REGION) +\PFInitFileDescriptors (PhysicalVolumeDescriptor FileDescriptor SubVolumeDesc) FB.SELECTEDFILES ( +FILEBROWSER) ERASEMENUIMAGE (REGION MENU) SPP.READP (STREAM) COURIER.CALL (COURIERFN STREAM NSADDRESS) + PFI.MAKE.LPT.STREAM (REGION) \NSRANDOM.SETEOFPTR (BYTEPTR) STRING.EQUAL (LITATOM STRINGP ARRAYP) +BRHC/LAYOUT (GRAPHNODE) \TEDIT.RESHAPEFN (TEXTOBJ LINEDESCRIPTOR) \CAUSEINTERRUPT (IFPAGE FX FSB) +\TEXTMENU.START (REGION TEXTOBJ TEXTSTREAM) CRITSECT (SCAN) \SETPOS.PSC (\POSTSCRIPTDATA) +TTCOMPLETEWORD (CHARTABLE) CREATEDSKDIRECTORY (LFDEV) FM.HIGHLIGHTITEM (FREEMENUITEM) TB.NTH.ITEM ( +TABLEBROWSER TABLEITEM) \DSPBOTTOMMARGIN.PSC (\POSTSCRIPTDATA STREAM) \TEDIT.GET.CHARLOOKS1 (PIECE +CHARLOOKS) SPP.BACKFILEPTR (STREAM) TEDIT.RAW.INCLUDE (TEXTOBJ SELECTION PIECE) \DSPSPACEFACTOR.PSC ( +STREAM \POSTSCRIPTDATA) INTERRUPTED (INTERRUPTSTATE KEYACTION) PFI.SETUP.TRANSLATIONS (STREAM) +WINDOWSIZE (REGION) FW-FORGET-STREAM (FW-OFD) \PFCreatePhysicalVolume (PhysicalVolumeDescriptor) +\DOMISCAPPLY1 (IFPAGE) BITBLT (BITMAP IMAGEOPS STREAM REGION \DISPLAYDATA) FB.TABLEBROWSER ( +FILEBROWSER) DBG::BACKTRACE-ITEM-SELECTED (BKMENUITEM MENU) UPDATEPCNODES (PIECE BTREENODE) +DSPDESTINATION (STREAM \DISPLAYDATA) IRM.CREF.BUTTONEVENTFN (IMAGEBOX) \GATHER-CLEANUP-FORMS1 (IFPAGE +FX BF FNHEADER) DO.EDIT.COMMAND (LINE TTYINBUFFER CHARTABLE) \MEDW.GETSCREENPOSITION (WINDOW) +\DISABLEGC1 (MDSTYPEWORD) FB.COUNT.FILE.CHANGE (FBFILEDATA FILEBROWSER) \CREATE.TTYDISPLAYSTREAM ( +REGION) \GC.MODIFY.BIGREFCNT (GC) \MAKE.PROCESS0 (IFPAGE) \10MB.GETPACKETLENGTH (Dove.EtherIOIOCB) +AS.NEXT.VERIFIER (NSADDRESS) WOVERLAPP (WINDOW) TOTOPW (SCREEN WINDOW) \GC.ENTER.BIGREFCNT (GC) +GETBOXSCREENREGION (SCREENPOSITION) TEDIT.UNPARSE.PAGEFORMAT (PAGEREGION REGION) \BACKFORMAT ( +LINEDESCRIPTOR TEXTOBJ) \BLTSHADE.BITMAP (BITMAP REGION PILOTBBT) \BITBLT.BITMAP (BITMAP REGION +PILOTBBT) \SEARCHOPENFILES (STREAM) \LEAF.MAYBE.FLUSH.CACHE (SEQUIN) \FORMATLINE (TEXTOBJ ARRAYP +THISLINE TEXTSTREAM LINEDESCRIPTOR PIECE FONTCLASS STREAM CHARSETINFO PENDINGTAB) CHAT.TYPEOUT ( +CHAT.STATE RING) \HARDRESET-CLEANUP (FNHEADER) SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::EDIT-NODE) +\LFCloseFile (DLIONSTREAM) \HARDRESET-CLEANUP1 (FX FNHEADER PVARSLOT) OPENFILE (STREAM) +TEDIT.FORMATBOX (PAGEREGION PAGEFORMATTINGSTATE TEXTOBJ REGION TEXTSTREAM LINEDESCRIPTOR) +\TEDIT.CUMULATE.EVENTS (TEDITHISTORYEVENT PIECE) HASH.PASSWORD (STRINGP) FB.UPDATEBROWSERITEMS ( +FILEBROWSER INFOFIELD FBFILEDATA) ASKUSERSETUP (ASKUSER) \INSURESCREEN (SCREEN) SPP.FORCEOUTPUT ( +SPPCON XIP STREAM SPPXIP) \GCMAPSCAN (GC HTCOLL) OPT.JFIXPASS (TAG) SEDIT::SCAN-STRING (SEDIT::EDIT-POINT + READTABLEP) \GCMAPUNSCAN (GC HTCOLL) CHAT.TYPESCRIPT1 (CHAT.STATE) GETSCREENREGION (SCREEN) +\DORETCALL (IFPAGE FX FSB) \GATHER-SPECIAL-BINDINGS (FNHEADER PVARSLOT FX) \DISPLAYLINE (THISLINE +TEXTOBJ FMTSPEC LINEDESCRIPTOR STREAM ARRAYP) \DFSCurrentVolume (LogicalVolumeDescriptor) +SEDIT::ATOM-CHANGE-RELINEARIZE (SEDIT::BROKEN-ATOM) \GETBRUSHBBT (BITMAP PILOTBBT \DISPLAYDATA) +\REFCNT (MDSTYPEWORD POINTER GC) \ALLOCMINIMUMSIZES (RESHAPINGWINDOWDATA) \EQREFCNT1 (MDSTYPEWORD +POINTER GC) RESET (FX) NIL +CREATE \TEDIT.OBJECT.SHOWSEL (REGION) \LFFindInfo (FileDescriptor) \INSERT.FIRST.PIECE (FMTSPEC) +\COERCE.NS.SOCKET (NSADDRESS) SHOWWTITLE (REGION) GETNSPRINTER (NSPRINTER) \FM.STATE-SETUP (MENU) +SEDIT::CREATE-SIMPLE-NODE (SEDIT::EDIT-NODE SEDIT::STRING-ITEM) \TEDIT.GET.SINGLE.PARALOOKS2 (FMTSPEC +TAB) \CREATE.THROUGH.EXTERNALFORMAT (EXTERNALFORMAT) SEDIT::INITIALIZE (SEDIT::EDIT-NODE-TYPE SEDIT::GAP + SEDIT::EDIT-SELECTION SEDIT::EDIT-POINT) \ALLOCVIRTUALPAGEBLOCK (POINTER) \TEXTMENU.TOGGLE.CREATE ( +IMAGEBOX) COMP.BLOCK (TAG BLOCKSTATUS) \TFBRAVO.READ.PARALOOKS (FMTSPEC) TTYIN (TTYINBUFFER LINE) +\TEDIT.HARDCOPY.FORMATLINE (EDITMARK) MAKEINITBFS (DSKOBJ DISKREQUEST CB) MSCOMMAND (SENTENCE +MSSETPHRASE THAT) FB.MAKEHEADINGWINDOW (REGION) DEFAULT.INSPECTW.PROPCOMMANDFN (MENU) SPYOBJ ( +SPYOBJDATA) MAKEBRES (BRES) VRULE.IMAGEBOXFN (IMAGEBOX) CHAT.CHOOSE.EMULATOR (CHATDISPLAYTYPE) +\COURIER.CHECK.PROCEDURES (COURIERFN) \CREATECHARSET.IP (CHARSETINFO) \UPDATE.PBT.RASTERWIDTHS ( +POINTER) MAKEMACFORMAT (EXTERNALFORMAT) \NSFILING.INIT (FDEV) \VAMAdjustGroup (PageGroup) MB.COPYFN ( +IMAGEOBJ) COMP.PUSHCALL (TAG) TYPEINMENU (MENU) ALLOCSTRING (STRINGP) \IMAGEIOINIT (IMAGEOPS) +DEFAULT.INSPECTW.TITLECOMMANDFN (MENU) \TEDIT.CREATEMENU (MENU) \DSKDISPLAY.CREATE.WINDOW (REGION +POSITION) FB.MAKECOUNTERWINDOW (REGION) IDLE.SET.OPTION (MENU) FB.MAKE.SUBDIRECTORY.ITEM (TABLEITEM +FBFILEDATA) PFI.COLLECT.DEFINERS (PFITYPE) SEDIT::INITIALIZE-LISTS (SEDIT::EDIT-NODE-TYPE) +SEDIT::SETUP-WINDOW-CONTEXT-DEPENDENCIES (REGION) CL:MAKE-BROADCAST-STREAM (STREAM) +\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (PIECE) \VFMDelete (Key) CREATEARRAYSLICE (ICML.ARRAYSLICE) SUBSTRING + (STRINGP) CL:MAKE-ECHO-STREAM (STREAM) WINDOWPOSITION (POSITION) TEDIT.GETSEL (SELECTION) +\LEAF.DEVICEP (FDEV PUPFILESERVER) \COURIER.CHECK.ERRORS (COURIERERR) CL:MAKE-SYNONYM-STREAM (STREAM) +\VFMGetPageGroup (Key Interval PageGroup) MKSTRING (STRINGP) \LFUnpackName (ExpandedName) LAYOUTSEXPR1 + (GRAPHNODE) CL:MAKE-TWO-WAY-STREAM (STREAM) \10MB.CREATENDB (NDB) CHANGE.NODEFONT.SIZE (POSITION) +MAKESCAN (SCAN) MSPARSE (CVERB) MSINTERPRET (MSSETPHRASE THAT MSVERB) FW-AFTERMOVEFN (POSITION) +\PFFindRootDirEntryNum (RootDirEntry) DBG::ATTACH-BACKTRACE-MENU (MENU BKMENUITEM POSITION) +SPY.MERGE.CALLEES (SPYRECORD) \PRESSINIT (IMAGEOPS) FONTCLASS (FONTCLASS) SEDIT::INITIALIZE-COMMENTS ( +SEDIT::EDIT-NODE-TYPE) \LFPurgeDirectory (FileDescriptor) SPY.TREE (SPYDATA) \NSFILING.CONNECT ( +FILINGHANDLE) PROMPTFORWORD (POSITION) \CH.UPDATE.CACHE (ORGCACHE DOMAINCACHE) SEDIT::MAKE-GAP (SEDIT::GAP +) MAKETITLEBARICON (REGION) TRANSLATEREG (REGION) ASKUSER (ASKUSER) FB.ADD.FILEGROUP (TABLEITEM) +BROWSE/LAYOUT/LATTICE (GRAPH) CREATEREGION (REGION) \ALLOCATE.ETHERPACKET (ETHERPACKET) +MAKE-READER-ENVIRONMENT (READER-ENVIRONMENT) SHOWBITMAP.IP (REGION) MAKE-COMPILED-CLOSURE ( +COMPILED-CLOSURE) \CREATE.TITLEMENU (MENU) \LFOpenOldFile (LeaderPage DLIONSTREAM) SELECT.ATOM.ASPECT +(MENU) COMP.EVALFORM (TAG) CCCSCAN (REFMAP) \SHIFT.DOCUMENT (FMTSPEC) \TFBRAVO.READ.CHARLOOKS ( +CHARLOOKS) TWODINSPECT.SELECTITEM (TWOD.SELECTION) \TFBRAVO.PARSE.PARA (PARA RUN) \LEAF.GETFILE ( +STREAM) TEDIT.INCLUDE (TEDITHISTORYEVENT) RESET/NODE/LABELSHADE (POSITION) FW-INIT-PROPS (POSITION) +MOVENODE (POSITION) MSQUOTED (QUOTE) \MAKEFLOAT (FLOATP) \NULLDEVICE (FDEV) CHAT.INIT (CHAT.STATE) +DOICONWINDOWCOM (MENU POSITION) COMP.PUSHNILS (TAG) \TEDIT.SCALEREGION (REGION) MAKEIBMFORMAT ( +EXTERNALFORMAT) SPY.FIND.TREE (SPYRECORD) TB.MAKE.BROWSER (TABLEBROWSER) \NULL.OPENFILE (STREAM) +\LFDirectoryP (FileDescriptor) DINFO.READ.KOTO.GRAPH (DINFOGRAPH) CHAT (MENU) SEDIT::CREATE-QUOTED-GAP + (SEDIT::EDIT-NODE) \VFMPutNext (Interval) MAKELINE (XXLINE) \CREATE.SETABLEMENU (MENU) INSPECT/BITMAP + (MENU) PARSE-NSADDRESS (NSADDRESS) TTYINBUFFERSTREAM (STREAM) ICONPOSITION.FROM.WINDOW (POSITION) +\INFINITY (FLOATP) MAKEISOFORMAT (EXTERNALFORMAT) \LFVersions (DIRSEARCHSTATE) \PFPurgeRootDirectory ( +FileDescriptor) \DONEWEPHEMERALPAGE (POINTER) BITMAPCREATE (BITMAP) \TEDIT.FORMAT.FOOTNOTE ( +LINEDESCRIPTOR THISLINE) ENCAPSULATEDOBJ.IMAGEBOXFN (IMAGEBOX) SEDIT::MAKE-BROKEN-ATOM (SEDIT::BROKEN-ATOM +) OPENPRSTREAM (PRESSDATA) CREATE.MONITORLOCK (MONITORLOCK) IRM.CREF.BOX (IMAGEBOX) +TEDIT.COMPOUND.PAGEFORMAT (PAGEREGION) DOATTACHEDWINDOWCOM (MENU POSITION) POSTSCRIPT.FONTCREATE ( +FONTDESCRIPTOR) UNIONREGIONS (REGION) CALLSCCODE (RESULT) MSSETPHRASE (MSSETPHRASE) FB.DEPTHCOMMAND ( +MENU) TEDIT.FORMATTEXTBOX (LINEDESCRIPTOR THISLINE) HASHARRAY (HARRAYP) \CH.GUESS.NEW.PROPERTIES ( +NSNAME) INSPECT/ATOM (MENU) SEDIT::FORMAT-FROM-INDENT (SEDIT::LIST-FORMAT) DEFAULT.BACKGROUND.COPYFN ( +MENU POSITION) \CREATE.INSPECTABLEMENU (MENU) MSSEEKPHRASE (PARSED CONJUNCTION) \SPP.CREATE.CON ( +SPPCON) TEDITCHAT.MENUFN (MENU) \TEDIT.LOOKS (POSITION MENU) \ALLOCMAPBUFFER (BUFFER) COMPOSEREGS ( +REGION) \LFCreateDevice (FDEV) MARGINBAR.CREATE (IMAGEBOX MARGINBAR REGION) \LFCreateFile (DLIONSTREAM + FileDescriptor PageGroup) WHO-LINE-CHANGE-USER (MENU) \NAMEDTABSIZE (IMAGEBOX) +\LEAF.TIMEDOUT.EXCESSIVE (MENU POSITION) SPY.DELETE (SPYRECORD) ONEDINSPECT.ADJUSTSELECTION ( +ONED.SELECTION) SUBARRAY (ARRAYP) TOPW.ADJUSTSELECTION (ONED.SELECTION) SEDIT::PRETTY-PRINT ( +SEDIT::EDIT-CONTEXT SEDIT::EDIT-NODE) MB.SIZEFN (IMAGEBOX) COMP.SPREAD (TAG) %%COPY-STRING-TO-ARRAY ( +ONED-ARRAY) PRINTANDBOX (REGION) DOBACKGROUNDCOM (MENU POSITION) MSSETREP (IN APPLY PATHS THAT FIELDS +MSVERB MSSETPHRASE QUOTE NOT) \DISPLAYINIT (WSOPS WSDATA REGION IMAGEOPS FDEV DISPLAYSTATE) +\LOADNSADDRESS (NSADDRESS) \LFGetStreamForFile (FileDescriptor) COMP.STUNBIND (OP) TEDIT.FORMATFOLIO ( +THISLINE LINEDESCRIPTOR) PUTFILEMAP (FILEMAPHASH) \CREATE.SPP.DEVICE (FDEV) FW-CREATE-OFD (FW-OFD) +UPDATE/MENU/IMAGE (REGION POSITION) FLOATP.TO.BCPL (BCPLNUM) TEDIT.UNDO.DELETION (PIECE) +\CH.CHECK.CLEARINGHOUSE (NSNAME) \NSFILING.DESERIALIZE (FILINGHANDLE) CL::VALUES-UFN (WORD) +\TEDIT.SELECT.CHARACTER (REGION) TTYINBUFFERDEVICE (FDEV) \DO-DEFINE-FILE-INFO (READER-ENVIRONMENT) +CL::VALUES-LIST-UFN (WORD) BCPL.TO.FLOATP (FLOATP) \PUTONSCREENW (POSITION) STRINGREGION (REGION) +RESET/NODE/BORDER (POSITION) DINFO.UPDATE.MENU.DISPLAY (MENU REGION POSITION) \TEDIT.MOVE.PIECEMAPFN ( +PIECE) COMP.STBIND (OP) COMP.MAP (TAG JUMP) COURIER.READ.NSADDRESS (NSADDRESS) MENUWRESHAPEFN ( +POSITION) \PFRemoveRootDirEntry (RootDirEntry) OPENHASHFILE (HashFile) \PS.SCALEREGION (REGION) +FILEBROWSER (MENU REGION FILEBROWSER) ITEM.WINDOW.SET.STACK.ARG (MENU) IRM.DISPLAY.CREF (REGION) +%%COPY-ONED-ARRAY (ONED-ARRAY) MENUITEMREGION (REGION) TRACKCURSOR (POSITION) \GENERIC.DSPCREATE ( +STREAM \DISPLAYDATA) FB.SEEFULLFN (MENU) CREATEWFROMIMAGE (SCREENREGION) \DRAWPOLYGON.DISPLAY (BRUSH) +CREATE-SHELL-STREAM (STREAM) PAINTW.READCOMMAND (MENU) TEDIT.FORMATHEADING (THISLINE LINEDESCRIPTOR) +NEAREST/PT/ON/GRID (POSITION) ICMLARRAY.GETMENUWGROUP (POSITION) OPENBSPSTREAM (STREAM) \VFMSplit (Key +) OPT.LABELNTHPR (TAG) CH.SERVERS (NSNAME) PAINTW.READMODE (MENU) \MEDW.DSPCREATE (STREAM \DISPLAYDATA +) WHO-LINE-SAVE-VMEM (MENU) \CH.FIND.ORG.SERVER (DOMAINCACHE ORGCACHE NSNAME) +\TFBRAVO.INSTALL.PAGEFORMAT (TFBRAVOPAGEFRAMES) \LFMakeVolumeDirectory (FileDescriptor PageGroup) +CREATEHASHFILE (HashFile) \LEAF.WRITEPAGES (BYTEPTR) \PROCESS.INIT (FDEV) MENUREGION (REGION) +\KEYBOARDINIT (KEYBOARDEVENT SHIFTSTATE) \PFAddRootDirEntry (RootDirEntry) \SETLOCALNSNUMBERS ( +NSHOSTNUMBER NSADDRESS) ICONW (REGION) TEDIT.FORMATPAGE (LINEDESCRIPTOR) EDITBMBUTTONFN (MENU REGION) +ICMLARRAY.GETREGIONFN (POSITION) KEYACTIONTABLE (KEYACTION) \SPLITTREE (BTREENODE) OPENPUPSOCKET ( +PUPSOCKET) STORAGE (HUNKSTAT) TRANSLATE.DATATYPE (SPEC FldDsc) FB.NEWINFOCOMMAND (MENU POSITION) +TEDIT.REDO.INSERTION (PIECE) STORAGE.LEFT (POINTER) BROWSE/LAYOUT/HORIZ/COMPACTLY (GRAPHNODE GRAPH) +\TEXTINIT (IMAGEOPS FDEV STREAM TEXTIMAGEDATA) \STORAGE.TYPE (POINTER) \PFCreateRootDirectory ( +FileDescriptor PageGroup) MB.SELFN (SELECTION) NEW/INSTANCE/OF/GRAPHNODE (GRAPHNODE) MSPRED ( +MSSETPHRASE NOT THAT) EXTENDEXTENT (REGION) \VFMBlankInterval (Interval) ONEDINSPECT.SELECTPROP ( +ONED.SELECTION) INITIALIZE-SHELL-DEVICE (FDEV) SEDIT::CREATE-STRING-ITEM (SEDIT::STRING-ITEM) +COMP.LOOKUPVAR (VAR) INSPECTW.REDISPLAY (SELECTABLEITEM REGION) ICMLARRAY (POSITION) +\CREATE.XCCS.EXTERNALFORMAT (EXTERNALFORMAT) FB.CREATE.FILEBUCKET (FBFILEDATA) BRH/LAYOUT (POSITION) +ADDFILE0 (FILEPROP FILEDATEPAIR) TEDIT.PARSE.PAGEFRAMES (PAGEREGION) COMP.SELECTQ (TAG) +SEDIT::INSTALL-SPECIAL-FORMATS (SEDIT::LIST-FORMAT) \CODEARRAY (ARRAYP) SPY.NEXT.TREE (SPYRECORD) +READHOTSPOT (POSITION) CHAT.ICONFN (TITLEDICON) PAINTW.READBRUSHSIZE (MENU) COMP.STSETQ (OP) +\TEDIT.DEFAULTSSEL (CHARLOOKS) POSTSCRIPT.SET-FAKE-LANDSCAPE (REGION) \LEAF.TRUNCATEFILE (BYTEPTR) +\FONTFACE (FONTFACE) \DSPCLIPPINGREGION.IP (REGION) INSPECT/HUNK (MENU) \GENERATENOFILES (FILEGENOBJ +NOFILEGENSTATE) \PFNewPages (PageGroup) BROWSE/LAYOUT/HORIZ (GRAPH) \NULLFILEGENERATOR (FILEGENOBJ) +\DELETECH (TEDITHISTORYEVENT) EDITADDNODE (POSITION) \VFMAtLoad (Key Interval Index) \CONS.UFN ( +POINTER) MSBLOCK (BLOCKS) SEDIT::INITIALIZE-ATOMIC (SEDIT::EDIT-NODE-TYPE) DSPCREATE (STREAM +\DISPLAYDATA) NEWDEFC (COMPILED-CLOSURE) TEDIT.PARALOOKS (FMTSPEC TAB TEDITHISTORYEVENT) \NOTE.10TO3 ( +NSADDRESS) PAINTW.READBRUSHSHAPE (MENU) GETGRIDBOXREGION (REGION) \PFPutRootDirectory (FileDescriptor) + SEDIT::OUTPUT-CR (SEDIT::LINE-START) \ALLOCBLOCK.NEW (POINTER) DINFO.UPDATE.HISTORY (MENU) +\4DISPLAYINIT (IMAGEOPS FDEV DISPLAYSTATE) SEDIT::CREATE-PRETTY-PRINT-ENV (SEDIT::EDIT-ENV) SQRT ( +FLOATP) IMAGEOBJCREATE (IMAGEOBJ) \HANDLE.RAW.XIP (ROUTING) MSJOINSET (CSET MSSETPHRASE) +\PFGetRootDirectory (FileDescriptor) MSINTERPRETSET (INRELATION MSSETPHRASE QUOTE NOT CSET THAT MSVERB + PATHS PATHOPTIONS GETHASH) \COURIER.REP.BOUT (WORD) PAINTW (CURSOR) \PRESSCURVE2 (POLYNOMIAL) +COMP.LOOKUPCONST (OP) COMP.NUMBERTEST (JUMP TAG) OPENIPSTREAM (INTERPRESSDATA EXTERNALFORMAT REGION +IPSTATE) \TEDIT.PARSE.CHARLOOKS.LIST (CHARLOOKS) \TEDIT.DEFAULTS.CARET (CHARLOOKS) TEDIT.BUILD.PCTB0 ( +FMTSPEC PIECE) MB.SETIMAGE (IMAGEBOX) PUTHASHTEXT (HashTextPtr) LLBREAK (COMPILED-CLOSURE) +SEDIT::CREATE-NEW-COMMENT (SEDIT::EDIT-NODE) CREATE.NEW.NODEPOSITION (POSITION) +\CANONICALIZE.NSADDRESS (NSADDRESS) READ-AFM-FILE (PSCFONT MENU) \TEDIT.WORDBOUND.READTABLE ( +READTABLEP) TEDIT.MOVE (TEDITHISTORYEVENT) PARSE.NSNAME (NSNAME) \VANILLADISKINIT (FDEV) +\LEAF.GETFILEINFO.OPEN (BYTEPTR) \UFS.CREATE.DEVICE (FDEV) \DSPPUSHSTATE.PSC (POSTSCRIPTXFORM) +TEDIT.FORMAT.HARDCOPY (PAGEFORMATTINGSTATE) COURIER.READ.NSNAME (NSNAME) +SET-CONNECTED-DIRECTORY-INTERACTIVELY (MENU) \LOCATE.NSNET (ROUTING) GRAPHEDITCOMMANDFN (MENU) +NODECREATE (GRAPHNODE) \TEDITPAGEMENU.CREATE (MB.TEXT) MSNEGATESET (NOT MSSETPHRASE) PPROCEXTENT ( +REGION) \INIT.POWERS.OF.TEN (EFPN) \TEDIT.PARSE.PARALOOKS.LIST (TAB FMTSPEC) TEXTICON (POSITION) +FB.GET.SORT.MENU (MENU) COMP.COND (TAG JUMP) RESHAPEBYREPAINTFN (REGION) \8DISPLAYINIT (IMAGEOPS FDEV +DISPLAYSTATE) \TEDIT.GET.SINGLE.PARALOOKS (FMTSPEC TAB) \BN.TO.FIXP (BIGNUM) \CREATESTARFONT ( +FONTDESCRIPTOR) \SELECTPROCESS (MENU) MB.NWAYBUTTON.SELFN (REGION) FW-RESIZE-OFD (REGION) BRHL/LAYOUT +(POSITION) MakeMenuOfImageTypes (MENU) \HANDLE.NS.ROUTING.INFO (ROUTING) FREEATTACHEDWINDOW (POSITION) + MB.MARGINBAR.SIZEFN (IMAGEBOX) PROCESS.STATUS.WINDOW (MENU REGION POSITION) \UFSOpenFile (STREAM) +\NSFILING.GETFILE (FILINGHANDLE) EDITSHADEREPAINTFN (BUTTON) DINFO.DEFAULT.MENU (MENU) +FB.INSERT.SUBDIRECTORIES (FBFILEDATA) \GETFBB (FONTBOUNDINGBOX) RIGHTW.ADJUSTSELECTION (ONED.SELECTION +) OPT.FRAMEDEL (OP) \LFMakeLeaderPage (LeaderPage) \READACFONTBOXES (BOUNDINGBOX) TEDIT.BUILD.PCTB2 ( +FMTSPEC PIECE) \DL.FAULTINIT (POINTER) \CURVE2 (POLYNOMIAL) SCALE/GRAPH (GRAPH GRAPHNODE POSITION) +PRINTDATE (FILEDATEPAIR) FW-INIT-MENUS (MENU) TEDIT.BUILD.PCTB (FMTSPEC PIECE) OPENPOSTSCRIPTSTREAM ( +\POSTSCRIPTDATA EXTERNALFORMAT) SEDIT::CREATE-NODE (SEDIT::EDIT-NODE) TEDIT.BUILD.PCTB1 (FMTSPEC PIECE +) \MAIKO.FAULTINIT (POINTER) PARAMETRICSPLINE (SPLINE) TEDIT.FIND (TEDITHISTORYEVENT) FB.DELVERCOMMAND + (MENU) \CORE.GETINFOBLOCK (COREFILEINFOBLK) SNAPW (SCREENREGION) DINFO.LAYOUTGRAPH (GRAPHNODE) +DINFO.SELECT.GRAPH (MENU) \DOVE.FAULTINIT (POINTER) \3MB.CREATENDB (NDB) SET-PROFILE-INTERACTIVELY ( +MENU) CROPMARK.IMAGEBOXFN (IMAGEBOX) SEDIT::CREATE-GAP-NODE (SEDIT::EDIT-NODE) \CORE.FINDPAGE ( +CORE.PAGEENTRY) DASSEM.DASSEM (OP JD) \BSPINIT (FDEV) SEDIT::COPY-STRUCTURE-COMMENT-WORD ( +SEDIT::STRING-ITEM) \CORE.GENERATEFILES (FILEGENOBJ COREGENFILESTATE) ADDMENU (POSITION) \TEXTMARK ( +BYTEPTR) \TEDIT.HCPYFMTSPEC (FMTSPEC) \ADVANCE.ARRAY.SEGMENTS (POINTER) FONTCOPY (FONTFACE) TRACKW ( +POSITION) DINFO.SHOWGRAPH (REGION) \MEDW.SHRINKW (POSITION) \CORE.DELETEFILE (CORE.PAGEENTRY) +SPY.LEGEND (GRAPHNODE) SPY.MAKEGRAPHNODES (GRAPHNODE) PSCFONTFROMCACHE.SPELLFILE (PSCFONT) +\24DISPLAYINIT (IMAGEOPS FDEV DISPLAYSTATE) SEDIT::CREATE-ENVIRONMENTS (SEDIT::EDIT-ENV) +\PSWOP.SELECTED (MENU) MAKEBITTABLE (CHARTABLE) \CORE.GETFILEINFO.FROM.INFOBLOCK (BYTEPTR) +\PFGetPhysicalVolumePage (Label) DBG::DEBUGGER-BUTTON-EVENT (MENU) \CORE.GETFILEHANDLE (CORE.PAGEENTRY + CORESTREAM) CREATESCREEN (SCREEN) \TEDIT.NSCHAR.RUN (PIECE) \NSFILING.HOSTNAMEP (FDEV +NSFILINGDEVICEINFO) ONEDINSPECT.SELECTITEM (ONED.SELECTION) \DSKDISPLAY.RESHAPEFN (POSITION) +\FM.CREATEITEM (FREEMENUITEM) \SHOWTEXT (LINEDESCRIPTOR) PTPLUS (POSITION) \VFMFreeVPage (PageGroup) +TEDIT.SETFUNCTION (READMACRODEF) \PFFindRootDirEntry (RootDirEntry) TRANSGRAPH (GRAPH GRAPHNODE +POSITION) \FDEVINSTANCE (FDEV) MSVERBED (THAT MSSETPHRASE) \PRINTFPTOVP (POINTER) MSDOES (MSSETPHRASE +THAT) \TEDIT.FORMATTABS (PENDINGTAB) FB.EXPUNGE?.MENU (MENU) MSADDANALYZE (MSANALYZABLE) +NESTED.SUBMENU (MENU POSITION) DBG::NEAR-BY-REGION (REGION) \NSFILING.GENERATEFILES (FILEGENOBJ +\NSFILING.GENFILESTATE) CHANGE-TTY-PROCESS-INTERACTIVELY (MENU) \RESHOWBORDER1 (REGION) +\HANDLE.RAW.3TO10 (NSADDRESS) \MEDW.RELMOVEW (POSITION) ACCEPT-UNIX-SOCKET-STREAM (STREAM) +EXPANDING-PAGEFULLFN (REGION) \NSFILING.COPY/RENAME (FILINGHANDLE) TEDIT.PUT (TEDITHISTORYEVENT) +DEFAULT.INSPECTW.VALUECOMMANDFN (MENU) PSCFONT.READFONT (PSCFONT) SEDIT::COPY-STRUCTURE-STRING ( +SEDIT::BROKEN-ATOM SEDIT::STRING-ITEM) \MAKEPCTB (BTREENODE) \PUTBASEBYTE (WORD) OPENRTPSOCKET (BSPSOC +) \CREATEDISPLAYFONT (FONTDESCRIPTOR) \DSPTRANSFORMREGION (REGION) \TELERAIDSERVER (WORD) +\STARTDISPLAY (REGION) \TFBRAVO.INIT.PARALOOKS (FMTSPEC) \CREATE-REAL-CHARSET.DISPLAY (FONTFACE) +\OFFSETCLIPPINGREGION (REGION) CREATE-UNIX-SOCKET-STREAM (STREAM) BITMAPTEDITOBJ (BITMAPOBJ) +UPDATE/SCROLL/REG (REGION) PROCESS.BACKTRACE (REGION) \TEDIT.COPY.PIECEMAPFN (PIECE CHARLOOKS) +INSERTLINE (LINE) \SFMAKEITALIC (CHARSETINFO) CHAT.RECONNECT (MENU) \TEDIT.GET.INSERT.CHARLOOKS ( +CHARLOOKS) \SETTERMSYNTAX (TERMCODE) \BUILDSLUGCSINFO (CHARSETINFO) \CreateScreenBitMap (BITMAP) +\MEDW.MOVEW (POSITION REGION) \10MB.STARTDRIVER (SYSQUEUE) ADD/AND/DISPLAY/LINK (POSITION) +\CORE.OPENFILE (CORE.PAGEENTRY CORESTREAM) DIRECTORY (FILEGROUP) \SFROTATECSINFO (CHARSETINFO) +POSTSCRIPT.HARDCOPYW (REGION) \VFMGetInterval (Interval) PTDIFFERENCE (POSITION) FW-CLOSE-CMD (MENU) +GETPROMPTWINDOW (REGION) TEDIT.PARSE.PAGEFRAMES1 (PAGEREGION) MB.MARGINBAR.DISPLAYFN (REGION) +\TEDIT.READTABLE (READTABLEP) SEDIT::COPY-NODE (SEDIT::EDIT-NODE) MB.NB.SIZEFN (IMAGEBOX) +\INITBCPLDISPLAY (STREAM FDEV) \MAIKO.NEWFAULTINIT (POINTER) COPYTERMTABLE (TERMTABLEP CHARTABLE) +SHOWGRAPH (GRAPH) DOWINDOWCOM (MENU POSITION) CHAT.PROMPT.FOR.INPUT (REGION) OPT.FRAMEMERGE (OP) +\PROMPTWINDOW.SET.HEIGHT (POSITION) \CREATEDISPLAY (FDEV DISPLAYSTATE) \IRM.WILD.REF (MENU) +\ORIGREADTABLE (READTABLEP) NESTED.SUBMENU.POS (POSITION) EDITDELETENODE (POSITION) \CREATECHARSET.PSC + (CHARSETINFO) \CREATE.TWODINSPECTOR.INSPECTMENU (MENU) \IDLE.PROMPT.WATCHER (FIXP) COMP.STJUMP (JUMP) + PFI.HANDLE.DEFDEFINER (PFITYPE) OPT.SCANOPT (OP) TEDIT.INSERT.OBJECT (PIECE TEDITHISTORYEVENT) +MENUWINDOW (MENU) DISPLAYSTREAMINIT (REGION) \LFExtendFile (PageGroup) FB.MAYBE.INSERT.FILE (TABLEITEM +) \CREATE.TEDIT.FACE.MENU (MENU) INSPECT/AS/BLOCKRECORD (MENU) WINDOWWORLD (POSITION) +\NSFILING.PARSE.FILENAME (NSFILINGPARSE) \VFMDeletePageGroup (Key Interval) PROCESSWORLD (PROCESS) +TEDIT.GET.CHARLOOKS0 (CHARLOOKS) HRULE.IMAGEBOXFN (IMAGEBOX) SHAPEW1 (REGION) ADD.PROCESS (PROCESS) +\CREATECOREDEVICE (FDEV) \TFBRAVO.INIT.CHARLOOKS (CHARLOOKS) \CARET.CREATE (CARET1) \TEDIT.WINDOW.OPS +(REGION) DISPLAYGRAPH (POSITION) OPT.CFRPTQ (TAG) CREATE.EVENT (EVENT) MAPATOMS (POINTER) +BMOBJ.IMAGEBOXFN (IMAGEBOX) \VFMGet (Interval) \CREATE.TWODINSPECTOR.SETMENU (MENU) EDITGRAPH1 (GRAPH) + SEDIT::CONS-ATOM (SEDIT::BROKEN-ATOM) DINFO.READ.GRAPH (DINFOGRAPH) CREATE-PROCESS-STREAM (STREAM) +\INIT.KEYBOARD.STREAM (FDEV STREAM) ECHOCHAR (TERMCODE) TEDIT.GET.PARALOOKS0 (FMTSPEC TAB) ED (MENU) +CREATEMENUEDWINDOW (MENU REGION) MARGINBAR (REGION) BMOBJ.CREATE.MENU (MENU POSITION) +\CREATE.TEDIT.SIZE.MENU (MENU) \TEDIT.MENU.INIT (MB.TEXT MB.BUTTON MB.TOGGLE MB.INSERT MB.NWAY +MB.3STATE MB.MARGINBAR) FW-CHANGE-POSITION (POSITION) \FONTFACE.COLOR (FONTFACE) INSPECT/AS/RECORD ( +MENU) COPYGRAPH (GRAPH GRAPHNODE POSITION) INSTALLBRUSH (BRUSHITEM) CURSOR.INIT (PILOTBBT) TTNEXTPOS ( +MOUSEPOS) FW-FORGET-CMD (MENU) \DL.NEWFAULTINIT (POINTER) \NEXTCONSPAGE (POINTER) \PAGEDGETEOFPTR ( +BYTEPTR) \CREATE.TEDIT.DEFAULT.FMTSPEC (FMTSPEC) \COMPUTE.ARC.POINTS (POSITION) \HANDLE.RAW.PUP ( +PUPADDRESS ROUTING) \PAGEDGETFILEPTR (BYTEPTR) GET.EDIT.BITMAP.MENU (MENU) \PROMPTWINDOW.EXPAND ( +REGION) ICMLARRAY.MENUW.APPLY (POSITION) TEDIT.GET (TEDITHISTORYEVENT) CHAT.MENU (MENU) +SET-READTABLE-INTERACTIVELY (MENU) \NODIRCORE.OPENFILE (CORESTREAM COREFILEINFOBLK) \MEDW.CREATEW ( +WINDOW REGION) \CREATE.TWODINSPECTOR.TITLEMENU (MENU) \RENAMEDFN (COMPILED-CLOSURE) FW-SHAPEW (REGION) + %%MAKE-ONED-ARRAY (ONED-ARRAY) GETD (COMPILED-CLOSURE) FW-RECALL-CMD (MENU) \CREATEPIECEORSTREAM ( +PIECE FMTSPEC) SI::GET-CACHE-CLOSURE (COMPILED-CLOSURE) SPYOBJ.IMAGEBOX (IMAGEBOX) TWOD.TRACKCURSOR ( +TWOD.SELECTION) SEDIT::OUTPUT-STRING (SEDIT::STRING-ITEM) \INITBIGNUMS (BIGNUM) \ORIGTERMTABLE ( +TERMTABLEP CHARTABLE) INITIALIZEDISPLAYSTREAMS (REGION PILOTBBT) MB.MARGINBAR.SELFN (REGION TAB) +ICMLARRAY.MENUW.GETLEVEL (MENU) \FIXLOCALNET (PUPADDRESS) \INSPECT/CODE/RESHAPEFN (POSITION REGION) +COMP.BOOL (TAG JUMP) \ALLOCMDSPAGE (POINTER) \MEDW.GETSCREENREGION (POSITION SCREENREGION) +TEDIT.MINIMAL.WINDOW.SETUP (REGION) DELETE/AND/DISPLAY/LINK (POSITION) ARRAY (ARRAYP WORD) +DRAWMARGINSCALE (REGION) BRHC/LAYOUT/DAUGHTERS (POSITION) \MAIKO.10MBSTARTDRIVER (SYSQUEUE) +%%DO-LOGICAL-OP (PILOTBBT) \TEDIT.CHARLOOKSMENU.CREATE (MB.BUTTON MB.TEXT) \HDCPYDISPLAYINIT (IMAGEOPS +) CURSORCREATE (CURSOR) OPT.COMPINIT (OP) BULKDATA.GENERATOR (BULKDATAGENERATOR) CHECKCONSPAGES ( +POINTER) \READSTRIKEFONTFILE (CHARSETINFO) COPYREADTABLE (READTABLEP) \LOADNSHOSTNUMBER (NSHOSTNUMBER) + \MAPMDS (POINTER) \READACFONTFILE (CHARSETINFO) \VECFONTINIT (FONTDESCRIPTOR CHARSETINFO) +\LOCATE.PUPNET (ROUTING) OPT.NOTJUMP (OP) \CHECKCONSPAGE (POINTER) SEDIT::CREATE-NULL-LIST ( +SEDIT::EDIT-NODE) HARDCOPYGRAPH (POSITION) ASSURE.PUP.READY (PUPADDRESS) TEDIT.LOOKS ( +TEDITHISTORYEVENT) \VFMGetBufferFor (\BTREEBUF Buffer) \NSFILING.OPEN.HANDLE (FILINGHANDLE) +\GET.PRIORITY.QUEUE (PROCESSQUEUE) \TEDIT.GET.PARALOOKS1 (FMTSPEC TAB) TITLEDICONW (ICONTITLE) +\NSRANDOM.TRUNCATEFILE (BYTEPTR) \CREATE.TEDIT.DELETESELECTION (SELECTION) BUTTONPANEL (MENU) +BRHC/LAYOUT/TERMINAL (POSITION) MakeMenuOfPrinters (MENU) \CREATE.TEDIT.MOVESELECTION (SELECTION) +\TEDIT.CHANGE.LOOKS (CHARLOOKS) COMP.STFN (OP) MAKE-FILL-POINTER-OUTPUT-STREAM (STREAM) +GRAPHOBJ.IMAGEBOXFN (IMAGEBOX) \LFGenerateFiles (DIRSEARCHSTATE FILEGENOBJ GenerateFileState) +COMP.BIND.VARS (VAR FRAME) COMP.TAGBODY (TAG) ROTATE-BITMAP (PILOTBBT) \IRM.CHOOSE.REF (MENU) +\ETHERINIT (FDEV) \BASEBYTES.IO.INIT (FDEV) EDITBMRESHAPEFN (REGION) TWODINSPECT.SELECTCOLUMNPROP ( +ONED.SELECTION) \PFRemoveDirectoryID (RootDirectory) SEDIT::QUERY-THROW-AWAY-CHANGES (MENU) CLEARSTK ( +POINTER) BREAKREGIONSPEC (REGION) ROTATE-BITMAP-LEFT (PILOTBBT) \BIGNUM.LSH (BIGNUM) CURSORPOSITION ( +POSITION) CHAT.CHOOSE.PHONE.NUMBER (MENU) \SFMAKECOLOR (CHARSETINFO) MB.CREATE.THREESTATEBUTTON ( +IMAGEBOX) SPP.DESTADDRESS (NSADDRESS) FW-CREATEW (REGION) \VFMCreateVPage (PageGroup) STRIKECSINFO ( +CHARSETINFO) CH.FINDSERVER (NSNAME) INSTALL-PROTOTYPE-DEFN (MENU) %%FAST-COPY-BASE (PILOTBBT) +\CREATE.TEDIT.SHIFTEDSELECTION (SELECTION) NETDATE (FIXP) CL:MAKE-CONCATENATED-STREAM (STREAM) +\OPENLEAFCONNECTION (SEQUIN) TTMAKECOMPLEXCHAR (COMPLEXCHAR) \MEDW.GETBOXSCREENPOSITION ( +SCREENPOSITION) TB.SET.FONT (REGION) COMP.BINDLIST (VAR) \PFCreateVols (LogicalVolumeDescriptor) +\MAKEBASEBYTESTREAM (BASEBYTESTREAM) \SETNEWTIME0 (FIXP) TEDIT.COPY (TEDITHISTORYEVENT) +SELECT.FNS.EDITOR (MENU) POSTSCRIPT.GETFONTID (FONTID) \LEAF.GETFILEDATES (LEAFINFOBLOCK) +\NSRANDOM.CREATE.STREAM (STREAM) INITIALIZE-NEW-SHELL-DEVICE (FDEV) \TEDIT.GET.CHARLOOKS1 (CHARLOOKS) +CARET (CARET1) CONTINUEDIT (FILEDATEPAIR) \PFInitFileDescriptors (VolumeID) \TEDIT.CREATE.LINECACHE ( +LINECACHE) \NSRANDOM.PREPARE.CACHE (NSPAGECACHE) MSSOLVE (MSSETPHRASE QUOTE) SET-PACKAGE-INTERACTIVELY + (MENU) COMP.TOPLEVEL.COMPILE (FRAME TAG COMINFO) \LFFindNextFile (ExpandedName GeneratedFile) +%%MAKE-TWOD-ARRAY (TWOD-ARRAY) \TEDIT.INSERT.PIECES (PIECE) \PFTrimHelper (PageGroup) CURSORHOTSPOT ( +POSITION) %%MAKE-GENERAL-ARRAY (GENERAL-ARRAY) PFI.MAKE.LPT.STREAM (REGION) OPT.RETMERGE (TAG) +CHARLOOKS.FROM.FONT (CHARLOOKS) BRHC/LAYOUT (POSITION) MSVERB (MSVERB) CREATEPOSITION (POSITION) +\TEXTMENU.START (REGION) \PFFindDirectoryID (RootDirectory) SEDIT::GET-CONTEXT (SEDIT::EDIT-CONTEXT) +MAKEXYPT (XYPT) GETBOXSCREENREGION (SCREENREGION) GRAPHOBJ.COPYFN (POSITION) WHO-LINE-SET-TIME (MENU) +SEDIT::BUILD-LINEAR-FORM (SEDIT::LINE-START SEDIT::LINE-BLOCK) SCALEREGION (REGION) +\CREATE.TEDIT.RESTART.MENU (MENU) \STRINGSTREAM.INIT (FDEV) TEDIT.RAW.INCLUDE (PIECE FMTSPEC EDITMARK) + SEDIT::LINE-FINISHED (SEDIT::LINE-BLOCK) \PUSHSTATE.IP (IPSTATE) \TRANSFERPAGE (POINTER) +\VAMBufferInit (Page) \TEDIT.CUMULATE.EVENTS (TEDITHISTORYEVENT) \PFCreatePhysicalVolume ( +PhysicalVolumeDescriptor) ADVISEWDS (REGION) \EDITBMHOWMUCH (MENU) POSTSCRIPT.INIT (IMAGEOPS) +READGRAPH (GRAPH GRAPHNODE) SELECT.LIST.INSPECTOR (MENU) \VFMMerge (Interval) \HANDLE.PUP.ROUTING.INFO + (ROUTING) \SETMACROSYNTAX (READMACRODEF) \FTP.OPEN.CONNECTION (FTPCONNECTION) \DISPLAYLINE (REGION) +\VFMInsertPageGroup (Key Interval) \LEAF.REQUESTPAGE (BYTEPTR) MBUTTON.CREATE (IMAGEBOX) +\MEDW.GETSCREENPOSITION (SCREENPOSITION) \UFSPrintTypeMenu (MENU) \NSFILING.LOGIN (FILINGSESSION FDEV) + SEDIT::BUILD-INTERNAL-STRUCTURE (SEDIT::EDIT-NODE SEDIT::EDIT-POINT SEDIT::EDIT-SELECTION +SEDIT::OPEN-STRING) ETHERHOSTNAME (PUPADDRESS) EDITCHANGELABEL (POSITION) \DSKDISPLAY.BUTTONEVENTFN ( +MENU) \ATBLSET (READER-ENVIRONMENT) FW-CHANGE-ANCHOR (MENU) \CreateCursorBitMap (BITMAP) +\PFInsertDirectoryID (RootDirectory) \LFFileSpec (DFSFileSpec) \VFMGenerateFileIDs (Key) TRACEREGION ( +REGION) \CREATE.TEDIT.SELECTION (SELECTION) HLSTORGB (RGB) \CREATEPRESSFONT (FONTDESCRIPTOR) +\INTERPRESSINIT (IMAGEOPS) \FORMATLINE (LINEDESCRIPTOR EDITMARK) \MOVEREALPAGE (POINTER) \IPCURVE2 ( +POLYNOMIAL) TEDIT.FORMATBOX (REGION PAGEREGION) INTERSECTREGIONS (REGION) MAKE-UNICODE-FORMATS ( +EXTERNALFORMAT) TWODINSPECT.ADJUSTSELECTION (TWOD.SELECTION) TWODINSPECT.SELECTROWPROP (ONED.SELECTION +) \FTP.GENERATEFILES (FILEGENOBJ FTPFILEGENSTATE) \MAIKO.DISPLAYLINE (REGION) \LFParseFileName ( +PARSEDFILENAME) REGIONONSCREEN (REGION) IMAGEFNSCREATE (IMAGEFNS) ONED.TRACKCURSOR (ONED.SELECTION) +\NSFILING.CLOSEFILE (FILINGHANDLE) \HCPYMODEDISPLAYINIT (IMAGEOPS) GRAPHOBJ.BUTTONEVENTINFN (MENU) +PAINTW.READBRUSHSHADE (MENU) \PFPutRootDirectoryType (SubVolumeMarkerPage) \DEFINEFONT.PRESS ( +FONTDIRENTRY) IRM.CREF.BUTTONEVENTFN (REGION) \MAKENUMBER (FIXP) FILL.INITTBLE (PILOTBBT FILL.TBLE) +\SPP.CREATE.STREAM (STREAM) %%INITIALIZE-CLSTREAM-TYPES (FDEV) CREATE.NUMBERPAD.READER (MENU POSITION +REGION) \LEAFINIT (FDEV) \PFCreateFileDescriptors (FileDescriptor) DO.SHIFTED.SELECTION (MOUSEPOS) +OPENNSOCKET (NSOCKET) COMP.PROG (TAG) DMCHAT.STATE (DM2500.STATE) \INSERTCH (TEDITHISTORYEVENT PIECE +FMTSPEC) NIL +FETCH FNTYP (DEFINITIONCELL PSEUDOCODEP CCODEP DEFPOINTER FNHEADER) TEDIT.COPY.LOOKS (PLOOKS \TEXTOBJ) + \UFS.RECOGNIZE.FILE (DEVICENAME) DBG::REGION-NEXT-TO (LEFT BOTTOM WIDTH HEIGHT) \GETFTPCONNECTION ( +FTPHOST FTPBUSY FTPIN FTPOUT) \TYPENUMBERFROMNAME (DTDNAME) GETNSPRINTER (NSPRINTERNAME +NSPRINTERADDRESS) FB.UPDATEBROWSERITEMS (BROWSERWINDOW TABLEBROWSER PATTERN INFOMENUCHOICES INFONAME +INFOPROTOTYPE INFOFORMAT COUNTERWINDOW HEADINGWINDOW VERSIONLESSNAME DIRECTORYFILEP FILENAME) +\COURIER.CHECK.ERRORS (ERR# ARGS) \TEDIT.COMMAND.LOOP (TEXTOBJ SEL \WINDOW LINES TXTRTBL READSA +TXTTERMSA READMACRODEFS EDITFINISHEDFLG EDITOPACTIVE CARET TXTNEEDSUPDATE SHIFTEDSEL SELKIND MOVESEL +SET DELETESEL \TEXTOBJ NSCHARHASH MACROFN STREAMHINT TERMCLASS) SEDIT::SET-POINT-QUOTE (SEDIT::SUB-NODES +) TEDIT.DISPLAYTEXT (CARETLOOKS \INSERTPC TXTTERMSA YBASE CLOFFSET STREAMHINT OFFST BASE LENGTH +FATSTRINGP YBOT LHEIGHT) \DSPSPACEFACTOR.IP (IMAGEDATA IPSPACEFACTOR IPFONT) FUNCTION.WRAPPER ( +HASHMACROCHAR) \ATMOUT (PNAMEBASE PNAMELENGTH FATPNAMEP) SETUPFONTS.PRESS (IMAGEDATA) +\SET.STORAGE.STATE (DL24BitAddressable) BRHC/INTERTREE/SPACE (YCOORD XCOORD) \TFBRAVO.APPLY.PARALOOKS +(TEXTLEN RIGHTMAR LEFTMAR 1STLEFTMAR) \TEDIT.CONVERT.TO.FORMATTED (PCTB TEXTLEN) \GETPILOTBBTSCRATCHBM + (BITMAPWIDTH BITMAPHEIGHT) DISCARDXIPS (INQUEUE) \READNUMBER.OUTLINEREGION (LEFT BOTTOM WIDTH HEIGHT) + COPYFILES (GENERATEFILES) BITMAPCOPY (BITMAPHEIGHT BITMAPBITSPERPIXEL) TB.UNSELECT.ALL.ITEMS ( +TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM TISELECTED TB#ITEMS) MAKEBRES (IPX IPY) \DSPRESET.PSC ( +IMAGEDATA POSTSCRIPTLEFTMARGIN POSTSCRIPTTOPMARGIN POSTSCRIPTFONT) SEDIT::SET-POINT-UNKNOWN ( +SEDIT::INLINE-WIDTH) OPT.JLENPASS (JPT JMIN JU JD OPARG JSN JML) \NSRANDOM.REESTABLISH ( +NSFILING.HANDLE DEVICEINFO DEVICE NSHFILEID FULLFILENAME ACCESS) \COURIER.CHECK.PROCEDURES (FN# ARGS +RETURNSNOISE RESULTS REPORTSNOISE ERRORS) SUBSTRING (PNAMEBASE PNAMELENGTH FATPNAMEP BASE LENGTH +FATSTRINGP OFFST) SEDIT::SET-POINT-LIST (SEDIT::NODE-TYPE SEDIT::SUB-NODES SEDIT::WIDTH STRING) +TEDITCHAT.CHARFN (TEXTSTREAM SEL DS X0 Y0 \WINDOW) MAKETITLEBARICON (SCREEN SCTITLEDS XCOORD YCOORD) +\DSPTOPMARGIN.IP (IPTOP IMAGEDATA) \SPP.GETNEXTBUFFER (SPPERRORHANDLER SPPINPUTSTREAM SPPOUTPUTSTREAM) + SEDIT::PRINT-GAP (SEDIT::LINEAR-ITEM) SLICERANK (SELECTEDDIMS) DBG::ATTACH-BACKTRACE-MENU ( +WHENSELECTEDFN IMAGEWIDTH HEIGHT LEFT IMAGEHEIGHT) \FTP.PRINTPLIST (BASE OFFST LENGTH FATSTRINGP +PNAMEBASE PNAMELENGTH FATPNAMEP) PRINTPUP (PUPTYPE PUPDESTHOST PUPLENGTH PUPID PUPCONTENTS) +\SPP.CLEANUP (SPPLOCK SPPINPUTSTREAM SPPINPUTEVENT SPPALLOCATIONEVENT DEVICEINFO SPPWHENCLOSEDFN +SPPMYNSOCKET) \LEAF.ABORT.FROMMENU (SEQEVENT) GETHOSTINFO (HTE.OS.TYPE) \SPP.BOUTS (SPPINPUTSTREAM +SPPOUTPUTSTREAM) \DSPCLIPPINGREGION.PSC (IMAGEDATA POSTSCRIPTCLIPPINGREGION LEFT BOTTOM WIDTH HEIGHT) +PFI.COLLECT.DEFINERS (PATTERNS) FB.COUNT.FILE.CHANGE (SIZE TIDATA TIDELETED TOTALFILES DELETEDFILES +TOTALPAGES DELETEDPAGES) TB.DESELECTRANGE (TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM TB#ITEMS) +\LFScavFileName (OFFST BASE LENGTH FATSTRINGP) \CH.UPDATE.CACHE (NSOBJECT NSORGANIZATION NSDOMAIN +OCORGANIZATION OCDOMAINS DCDOMAIN DCKNOWNSERVERS OCALLSERVERS) \STARTPAGE.PRESS (IMAGEDATA PRFONT +PRHEADING PRSPACEFACTOR PRHEADINGFONT PRLEFT PRTOP PRXPOS PRPAGENUM) MSPARSE (POSSIBLES ENDING START +SOUGHT PARSED C ITEM VPART) NTHCHARCODE (BASE LENGTH OFFST FATSTRINGP PNAMEBASE PNAMELENGTH FATPNAMEP) + \FIXILINES (TXTREADONLY L1 \WINDOW LINES CHARTOP NEXTLINE CHAR1 PREVLINE CHARLIM CR\END MOVESEL +SHIFTEDSEL) \SETXIPCHECKSUM (XIPCHECKSUMBASE XIPLENGTH) FB.MAKE.SUBDIRECTORY.ITEM (SUBDIRECTORY +PATTERN NAMESTART DIRECTORYSTART) MSEDITE (FILEPKGNAME) MKSTRING (PNAMEBASE PNAMELENGTH FATPNAMEP) +\LFUnpackName (VOL NAME OFFST BASE LENGTH FATSTRINGP VERSION) TEDIT.\INSERT (TEXTOBJ SET \WINDOW POINT + X0 XLIM TEXTLEN) \TEDIT.REPAINTFN (SEL PTOP YBOT CHAR1 NEXTLINE) \LEAF.SETCREATIONDATE (PUPCONTENTS +LEAFHANDLE LEAFCONNECTION) TEDIT.GET.OBJECT (TEXTOBJ PREVPIECE PLOOKS DEFAULTCHARLOOKS POBJ) BITMAPBIT + (BITMAPBITSPERPIXEL BITMAPWIDTH BITMAPHEIGHT BITMAPBASE BITMAPRASTERWIDTH IMAGEDATA DDDestination) +\SEARCH.OUTPUTQ (SYSQUEUEHEAD BSPOUTPUTQ PUPTYPE QLINK) SPY.MERGE.CALLEES (CALLEES NAME STATUS +TREEFROM) \SPP.SETFILEPTR (ACCESSBITS) STRPOS (PNAMEBASE PNAMELENGTH FATPNAMEP BASE OFFST LENGTH +FATSTRINGP TYP) PFI.PRINT.FILECREATED (RESPEC) LINE.LESSP (Y ORIG DIFF) \DSPCLIPTRANSFORMX (DDXOFFSET +DDClippingLeft DDClippingRight) CREATEW (SCREEN REGION) \DSPCLIPTRANSFORMY (DDYOFFSET DDClippingBottom + DDClippingTop) CENTERINWIDTH (LEFT WIDTH) ASKUSER (EXPLAINSTRING KEYSTRING KEY OPTIONS) +\GENERIC.CURSOR (SETCURSORFN) \FLUSH.NDB.QUEUE (EPNETWORK) COERCETEXTOBJ (TEXTOBJ TEXTLEN PCTB +CLINVISIBLE PLOOKS PLEN PSTR PFILE PFPOS POBJ NEXTPIECE TXTFILE FULLNAME STREAMHINT) \BBTCURVEPT ( +BITMAPHEIGHT DDSOURCETYPE) SEDIT::REPLACE-QUOTE (SEDIT::SUB-NODES CL:STRUCTURE SEDIT::DEPTH) AIN (BASE + LENGTH OFFST TYP ORIG) SHOWBITMAP.IP (BITMAPWIDTH BITMAPHEIGHT WIDTH HEIGHT LEFT BOTTOM) +DISPLAYLINK/BT (XCOORD NODEPOSITION YCOORD) \DSPLINEFEED.IP (IMAGEDATA IPLINEFEED) \TERMINATESPP ( +SPPLOCK SPPSTATE SPPINPUTEVENT SPPPROCESS) AOUT (BASE LENGTH OFFST TYP ORIG) TB.SELECTRANGE ( +TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM TIUNSELECTABLE TIDELETED) \SPP.GETFILEPTR (SPPFILEPTR COFFSET) +\EXTENDEDVMEMINIT (XVmemFmapBase) BLTCHAR (IMAGEDATA) TB.UNSELECT.ITEM (TISELECTED TI#) COMP.MLLFN ( +OPARG) \FILLPOLYGON.PSC (BITMAPWIDTH BITMAPHEIGHT XCOORD YCOORD BITMAPRASTERWIDTH) MSEDITF ( +FILEPKGNAME) \DRAWPOLYGON.PSC (IMAGEDATA BRUSHSIZE BRUSHSHAPE BRUSHCOLOR POSTSCRIPTSCALE XCOORD YCOORD +) \MAIKO.SET.STORAGE.STATE (DL24BitAddressable) EDITGETDEF (SEDIT::ICON-TITLE SEDIT::EDIT-TYPE +CL:STRUCTURE SEDIT::SUB-NODES SEDIT::ROOT) \MAYBEPEEKPUP (PUPDESTHOST PUPSOURCEHOST) TEDIT.GETPOINT ( +SEL POINT CH# CHLIM) \PROCESS.BEFORE.LOGOUT (PROCBEFOREEXIT PROCNAME) \MEDW.CURSOR (CUHOTSPOTX +BITMAPHEIGHT CUIMAGE CUHOTSPOTY) FEQP (LOWORD HIWORD HIWORDNOSIGNBIT HINUM LONUM SIGNBIT LOFRACTION +HIFRACTION EXPONENT) \COURIER.CHECKDEF (VERSIONPAIR PROGRAM# VERSION# COURIERDEFS) \TEXTCLOSEF (PCTB +TEXTLEN PFILE NEXTPIECE TXTFILE) TEDIT.DEFAULT.MENUFN (EDITOPACTIVE PCTB STREAMHINT SEL) D-ASSEM:INTERN-DCODE + (OVERHEADWORDS STARTPC) SEDIT::REPLACE-LIST (SEDIT::NODE-TYPE SEDIT::SUB-NODES SEDIT::SUB-NODE-INDEX +SEDIT::DEPTH CL:STRUCTURE SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::SELECT-NODE +SEDIT::SELECT-START SEDIT::SELECT-END) \DSPPRINTCR/LF (IMAGEDATA DDSlowPrintingCase ROTATION DDFONT +DDClippingRegion DDEOLFN BOTTOM TOP DDXPOSITION DDLINEFEED DDScroll DDXOFFSET DDClippingRight +\SFDescent DDClippingLeft DDDestination DDClippingBottom DDClippingTop DDTexture DDLeftMargin +DDYPOSITION DDYOFFSET) TTYIN.LASTINPUT (OLDTAIL START FIRSTLINE) DISPLAYLINK/RL (XCOORD YCOORD +NODEPOSITION) \DSPRIGHTMARGIN.IP (IPDATA IPRIGHT IPVISRIGHT) SEDIT::PRINT-BROKEN-ATOM (SEDIT::ATOM-CHARS +) FASL::DUMP-BITMAP (BITMAPBASE) TEDIT.UPDATE.SCREEN (TXTDON'TUPDATE \WINDOW LINES YBOT) +\BSP.CLOSE.OPEN.SOCKETS (RTPSTATE RTPPROCESS) \CHANGECHARSET.DISPLAY (DDPILOTBBT FONTCHARSETVECTOR DDFONT WIDTHS OFFSETS IMAGEWIDTHS CHARSETBITMAP BITMAPRASTERWIDTH DDCHARSETASCENT CHARSETASCENT -DDCHARSETDESCENT CHARSETDESCENT BITMAPBASE DDCHARHEIGHTDELTA) SEDIT::RESHAPEFN (BOTTOM HEIGHT -SEDIT::CONTEXT-LOCK WIDTH LEFT) TB.FINISH.CLOSE (TBLOCK) MB.MARGINBAR.SHOWTAB (TABX TABKIND) -FB.SEEFULLFN (IMAGEWIDTH IMAGEHEIGHT HEIGHT BOTTOM) |\\SFFixY| (DDPILOTBBT DDYPOSITION DDYOFFSET -CHARSETASCENT BITMAPBASE |DDDestination| BITMAPRASTERWIDTH BITMAPHEIGHT |DDClippingTop| CHARSETBITMAP -CHARSETDESCENT |DDClippingBottom|) D-ASSEM:INTERN-DCODE (OVERHEADWORDS STARTPC) OVERLAPPINGWINDOWS ( -SCTOPW SCREEN NEXTW) \\FTP.SENDVERSION (FTPIN FTPOUT) \\FM.CLEARITEM (FM.USERDATA LEFT BOTTOM HEIGHT) -CREATEW (SCREEN REGION) SEDIT::INPUT-STRINGDELIM (SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::ENVIRONMENT - SEDIT::DEFAULT-FONT) PRINT-BITMAPS-NICELY (BITMAPBASE) SEDIT::SELECT-NEXT-GAP (SEDIT::SELECTION) -ADDTOFILE (WHENFILED) OPT.CLEANFRAME (EXTCALL PARENT) RIGHTW.BUTTONEVENTFN (PROP) \\FLUSHNDBS (NDBNEXT - NDBETHERFLUSHER NDBWATCHER NDBTQ NDBIQ) GROW/REGION (LEFT BOTTOM WIDTH HEIGHT) AIN (BASE XBASE -INDIRECT-P LENGTH FILL-POINTER OFFST OFFSET TYP TYPE-NUMBER ORIG) AT.END.OF.SCREEN (END) USERNAME ( -|UserNameAddr|) MB.DEFAULTBUTTON.ACTIONFN (CH# TEXTLEN SCRATCHSEL CHLIM) TB.FIND.PREVIOUS.TAIL ( -TBTAILHINT TI# TBITEMS) SEDIT::HASFAT (OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER -FATSTRINGP TYPE-NUMBER) \\TELERAIDSERVER (PUPTYPE PUPIDLO LOBYTE PUPIDHI HIBYTE INVALID VACANT -PUPCONTENTS WORDINPAGE TRCOMMAND TRCURSOR) SETUSERNAME (|UserNameAddr|) \\WRITEBITMAP (BITMAPBASE -BITMAPRASTERWIDTH BITMAPHEIGHT) \\TEDIT.LOOKS.UPDATE (TEXTOBJ F3 PREVPIECE PPARALOOKS IMAGEDATA -CURRENTPARALOOKS TICURPARALOOKS PLOOKS CLINVISIBLE BASE PLEN NEXTPIECE CURRENTLOOKS F10 CLFONT -CLOFFSET FMTHARDCOPY CLPROTECTED POBJ) AOUT (BASE XBASE INDIRECT-P LENGTH FILL-POINTER OFFST OFFSET -TYP TYPE-NUMBER ORIG) UPDATEFILES (CHANGED DATEFILENAME FILEDATES COMSNAME FILEPROP TOBEDUMPED) -\\SHOWSEL (\\TEXTOBJ HOW HOWHEIGHT SET \\WINDOW TXTDON\'TUPDATE LN L1 LINES CARET SELOBJ ONFLG -HASCARET TXTEDITING POINT YBOT X0 YBASE XLIM TXTREADONLY) REPLACEFIELD (|fdOffset| |fdType| -|fdTypeName| HINUM LONUM) TEDIT.STRINGWIDTH (OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER -FATSTRINGP TYPE-NUMBER) SET/LAYOUT/POSITION (NODEPOSITION XCOORD YCOORD) \\FIXLINELENGTH.IP (IMAGEDATA - IPRIGHT IPLEFT FONTAVGCHARWIDTH IPFONT) FEQP (LOWORD HIWORD HIWORDNOSIGNBIT HINUM LONUM SIGNBIT -LOFRACTION HIFRACTION EXPONENT) BOXCOUNT (DTDCNT DTDOLDCNT DTDCNT0) OPT.FRAMELOCAL (VARS OPNAME OPARG) - TEXTUREP (BITMAPRASTERWIDTH) SET/LABEL/SIZE (NODEHEIGHT NODEWIDTH NODEFONT NODELABEL NODEBORDER YSIZE - XSIZE) \\FM.INSUREVISIBLE (LEFT WIDTH) \\DSPLEFTMARGIN.IP (IPLEFT IMAGEDATA) INVERT.TEXTURE.BITMAP ( -BITMAPRASTERWIDTH BITMAPHEIGHT BITMAPBASE) DISPLAYLINK/LR (XCOORD YCOORD NODEPOSITION) DODIRCOMMANDS ( -LITERALNAME) SEDIT::INPUT-QUOTE (SEDIT::OPEN-NODE-CHANGED? SEDIT::SELECTION SEDIT::SELECT-NODE -SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::SUPER-NODE SEDIT::POINT-INDEX SEDIT::POINT-STRING) -READBITMAP (BITMAPBASE) SEDIT::REVIVE-NODE (SEDIT::SUB-NODES) COURIER.OPEN (HIBYTE LOBYTE) -COURIER.WRITE.REP (CRNEXTBYTE F2 CRWORDLIST F1) \\MAIKO.SET.STORAGE.STATE (|DL24BitAddressable|) -REFLECT/GRAPH/VERTICALLY (GRAPHNODES NODEPOSITION YCOORD) TEDIT.\\INSERT (TEXTOBJ F3 SET \\WINDOW -POINT X0 XLIM TEXTLEN) \\ACTONDISKPAGES (BASE FID FPVERSION MISCSTACKRESULT CURRENTNUMCHARS) -|\\VFMSaveBuffer| (DIRTY VOLUME VOLPAGENUM PAGE) PFI.SETUP.TRANSLATIONS (OUTCHARFN) CHECKBUFFERREFVAL -(NOREFERENCE VMEMPAGE) \\PNC (LENGTH FILL-POINTER OFFST INDIRECT-P OFFSET BASE XBASE) -SEDIT::GROW-SELECTION-LITATOM (SEDIT::SELECT-START) SEDIT::PUNT-SET-SELECTION (SEDIT::SUPER-NODE -SEDIT::LINEAR-FORM SEDIT::LINEAR-THREAD) \\TELERAIDINIT (BITMAPBASE BITMAPHEIGHT) INTERPRESSBITMAP ( -WIDTH BITMAPWIDTH HEIGHT BITMAPHEIGHT) PARSE.NSNAME (NSOBJECT NSORGANIZATION NSDOMAIN) MB.SELFN ( -\\TEXTOBJ) \\SETETHERFLAGS (|BVersion| MAXETHERBYTES) \\TEDIT.HCPYLOOKS.UPDATE (TEXTOBJ F3 PREVPIECE -PPARALOOKS IMAGEDATA CURRENTPARALOOKS TICURPARALOOKS PLOOKS CLINVISIBLE BASE PLEN NEXTPIECE -CURRENTLOOKS F10 CLFONT CLOFFSET |\\SFAscent| |\\SFDescent| CLUSERINFO POBJ) \\DOACTONDISKPAGES ( -DISKCAS DISKDAS DISKFIRSTPAGE DISKLASTPAGE FIXEDDISKBUFFER DISKHINTLASTPAGE RETURNONCHECKERROR CBQUEUE - LASTDISKACTION DISKACTION SAWCHECKERROR CBFREEPTR CBNEXT DISKERRORCNT RETRYCOUNT CURRENTDISKPAGE) -ARRAYTYP (TYP) OPENPOSTSCRIPTSTREAM (LEFT BOTTOM HEIGHT WIDTH POSTSCRIPTFONT) \\WRITEOUTBUFFERS ( -FILEPAGE# CBUFPTR VMEMPAGE) \\DSPPOPSTATE.PSC (IMAGEDATA POSTSCRIPTXFORMSTACK PSXCLIP PSXPAGE -PSXBOTTOM PSXTOP PSXLEFT PSXRIGHT PSXLAND PSXXFORMPEND PSXTRANX PSXTRANY) CREATETEXTUREFROMBITMAP ( -BITMAPHEIGHT BITMAPWIDTH) SEDIT::REPLACE-ROOT (SEDIT::SUB-NODES SEDIT::LINEAR-FORM SEDIT::DEPTH) -\\CLEARMAP (ACCESSBITS FORCEOUTPUT DEVICE BUFFS USERMAPPED FILEPAGE# BUFFERNEXT) NSNAME.TO.STRING ( -NSOBJECT NSDOMAIN NSORGANIZATION) ARRAYORIG (ORIG) OPT.NONILVAR (OPNAME OPARG) SEDIT:REPLACE-SELECTION - (SEDIT::SELECTION SEDIT::CARET-POINT SEDIT::SELECT-NODE SEDIT::SELECT-TYPE) \\WRITEDISKPAGES (BASE -FID FPVERSION MISCSTACKRESULT) |\\PFRoomForFile| (|nextFilePage| |filePage| |type|) SETD (TYP READONLY - BASE ORIG LENGTH OFFST) GETFIELDSPECS (DTDTYPESPECS) \\WRITEPAGES (WRITEPAGES DEVICE) OPT.MERGEFRAMEP - (FRAMETYPE OPARG VARS) ELTD (TYP BASE ORIG LENGTH OFFST) SETY.PRESS (ELSTREAM IMAGEDATA PRYPOS HIBYTE - LOBYTE) \\DISKERROR (FULLFILENAME CURRENTDISKPAGE) \\DOWRITEDISKPAGES (DISKCAS DISKDAS DISKFIRSTPAGE -DISKLASTPAGE FIXEDDISKBUFFER DISKNOALLOC DISKWRITELASTNUMCHARS CURRENTNUMCHARS CBQUEUE DISKERRORCNT -RETRYCOUNT CURRENTDISKPAGE) REHASH (HARRAYPBASE LASTINDEX VALUE KEY NEXTSLOT) -TEDIT.HARDCOPY.PAGEHEADING (PIECE F5 FMTPARASUBTYPE PLEN NEXTPIECE PPARALAST FMTPARATYPE PPARALOOKS -PAGEHEADINGS) GETSUPERTYPE (DTDSUPERTYPE) \\COPYHARRAYP (NULLSLOTS LASTINDEX HARRAYPBASE -OVERFLOWACTION NUMSLOTS NUMKEYS) IRM.DISPLAY.CREF (LEFT BOTTOM HEIGHT WIDTH TOP RIGHT) \\READPAGES ( -READPAGES DEVICE) TB.UPDATE.DISPLAY (TBWINDOW TBEXTENT TB#ITEMS TBITEMHEIGHT HEIGHT PTOP BOTTOM -TBORIGIN) \\TYPENAMEFROMNUMBER (DTDNAME) SEDIT::GET-BUTTON-STRING (SEDIT::LINEAR-FORM SEDIT::NODE-TYPE - SEDIT::PRIN-2? STRING) SEDIT::PLACE-CARET-AND-SELECTION (SEDIT::DISPLAY-WINDOW SEDIT::DESTINATION -SEDIT::LINEAR-FORM SEDIT::\\X) TOPWP (SCTOPW SCREEN) EXCHANGEXIPS (PACKETEXCHANGEID XIPCONTENTS) -\\SEQUIN.HANDLE.ACK (SEQRETRANSMITQ SEQRETRANSMITTING \#UNACKEDSEQS SENDSEQ PUPBASE SEQACKED) -PFI.COLLECT.DEFINERS (PATTERNS) FINDPTRSBUFFER (VMEMPAGE SYSNEXT) TXTFILE (TXTFILE) CL:READ-CHAR (EOFP - DEVICE) \\GETMAPBUFFER (USERMAPPED NOREFERENCE BUFFERNEXT) \\SPP.DUPLICATE.REQUEST (DEVICEINFO -SOURCECONID XIPCONTENTS SPP.CONNECTION F1 SPPDESTID) \\WRITEVMEMPAGES (FPVERSION) LRSH (HINUM LONUM) -STKNTHNAME (INVALIDP FRAMENAME NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER \#FRAMENAME CLINK FASTP -SLOWP \#ALINK \#CLINK ALINK) ADD-SYMBOL (PNAMEBASE PNAMELENGTH FATPNAMEP) DATATYPEP (DTDHUNKP DTDNAME) - NUKE-SYMBOL (BASE XBASE INDIRECT-P OFFST OFFSET LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) -\\COERCEFONTDESC (DISPLAYFD INTERPRESSFD PRESSFD OTHERFDS FONTDEVICE IMFONTCREATE IMAGEOPS) -RESHAPEALLWINDOWS (WIDTH HEIGHT ATNOWX ATNOWY ATTACHEDW ATXSIZE ATYSIZE ATEDGE LEFT BOTTOM) TEDIT.QUIT - (TEXTOBJ F3 \\WINDOW) LAYOUT/POSITION (NODEPOSITION) \\CLIPLINE (LEFT RIGHT WIDTH BOTTOM TOP HEIGHT) -TB.PRINT.LINE (TBBASELINE TISELECTED TIDELETED) MAPBUFFERCOUNT (NOREFERENCE USERMAPPED SYSNEXT) -DISPLAYNODELINKS (GRAPHNODES) \\DSPCLIPPINGREGION.IP (IMAGEDATA |IPClippingRegion|) FB.CLOSE&EXPUNGE ( -MENUCOLUMNS ITEMS BROWSERWINDOW) MAPPAGE (PAGEMAPPED DEVICE ACCESS EPAGE) FB.ANALYZE.PATTERN (PATTERN) - MB.SETIMAGE (XSIZE YSIZE) TEDIT.SKIP.SPECIALCOND (PIECE F5 FMTPARASUBTYPE PLEN NEXTPIECE PPARALAST -FMTPARATYPE PPARALOOKS) SUBARRAY (LENGTH ORIG BASE TYP OFFST) SEDIT::OUTLINE-SELECTION ( -SEDIT::SELECT-START-X SEDIT::SELECT-END-X SEDIT::SELECT-START-LINE SEDIT::SELECT-END-LINE -SEDIT::LINE-LENGTH SEDIT::NEXT-LINE SEDIT::INDENT SEDIT::YCOORD SEDIT::LINE-HEIGHT SEDIT::LINE-SKIP -SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT) DINFO.UPDATE (CURRENTNODE TOPNODEID NODELST WINDOW -FMENU.WINDOW MONITORLOCK) \\FM.CHANGELABEL (LEFT BOTTOM FM.LABEL FM.REGION FM.MAXREGION FM.BITMAP -FM.HIGHLIGHT FM.USERDATA) \\ENDVECRUN (IMAGEDATA VECMOVINGRIGHT VECCURX VECCURY VECSEGCHARS) -\\DODISKCOMMAND (SHORTCB CBLABELADDR DISKFID CBDA DSKPARTITION CBLINK CBDONE CBLASTPTR CBSTATUS) -|\\VAMRecomputeFreePageCount| (|volumeSize| |freePageCount|) \\NSFILING.ADDQUOTES (OFFST INDIRECT-P -OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) \\SETEOF (PAGE OFFSET CBUFPTR CPAGE -CBUFDIRTY) SEDIT::INPUT-DOT (SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::POINT-TYPE SEDIT::POINT-INDEX - SEDIT::SUPER-NODE) SETX.PRESS (ELSTREAM IMAGEDATA PRXPOS HIBYTE LOBYTE) \\CLEANUPDISKQUEUE ( -CBPENDINGPTR CBFREEPTR SHORTCB CBDONE CBQSTATUS CBNEXT CBLASTPTR RESTORE CBDA CBSTATUS TOTALDISKERRORS - DISKERRORCNT RETRYCOUNT CBFINALSTATUS CBPAGENO CURRENTDISKPAGE CBLABELADDR DLNUMCHARS CBCLEANUPFN -CURRENTDAS DLNEXT DLPREVIOUS) \\GETDISKCB (CBFREEPTR CBNEXT CBPENDINGPTR) CLRHASH (HARRAYPBASE -NEXTSLOT LASTINDEX NUMSLOTS) SEDIT::REPLACE-NODE (SEDIT::CARET-POINT SEDIT::SELECTION SEDIT::SELECT-NODE - SEDIT::DEPTH) \\MEDW.BITBLT (IMAGEDATA BBTTOWIN SCREEN DDXOFFSET DDYOFFSET BBTFROMWIN |DDDestination| - |DDClippingLeft| |DDClippingBottom| BBTWINWIN) \\3MBSENDPACKET (3MBLENGTH PBIRAWSTART 3MBBASE EPTYPE) - OPT.FRAMEMERGE (VARS PARENT NVALS PREV NNILS) SEDIT:GET-SELECTION (SEDIT::SELECTION SEDIT::SELECT-NODE - CL:STRUCTURE SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::SELECT-STRING SEDIT::SELECT-TYPE) \\MAPPAGE - (BUFFS FILEPAGE# NOREFERENCE VMEMPAGE USERMAPPED BUFFERNEXT MAXBUFFERS ACCESSBITS IODIRTY CBUFPTR -CBUFDIRTY MULTIBUFFERHINT) FB.CHECK.NAME.LENGTH (PRINTNAME FILENAME STARTOFPNAME BROWSERFONT -NAMEOVERHEAD INFOSTART OVERFLOWWIDTHS OVERFLOWSPACING) MB.DISPLAY (YDESC XSIZE YSIZE) -ONEDINSPECT.REPAINTFN (TOP BOTTOM HEIGHT) \\TEDIT.INTEGER.IMAGEBOX (XKERN YDESC YSIZE XSIZE) -\\SEQUIN.FLUSH.RETRANSMIT (SEQRETRANSMITNEXT SEQRETRANSMITQ EPLINK) \\TEDIT.MOVE.PIECEMAPFN (POBJ -\\WINDOW STREAMHINT PSTR PLEN) UNMARKASCHANGED (CHANGED TOBEDUMPED FILEPROP) \\DSPBOTTOMMARGIN.IP ( -IPBOTTOM IMAGEDATA) TB.ITEM.UPDATABLE? (TI# TBWINDOW TBUPDATEFROMHERE) SCALE/GRAPH (GRAPH.PROPS -GRAPHNODES NODEWIDTH NODEHEIGHT XCOORD NODEPOSITION YCOORD NODEFONT NODEBORDER) MAPHASH (HARRAYPBASE -NEXTSLOT LASTINDEX VALUE KEY) \\REALDISKDA (NSECTORS NHEADS NTRACKS) SEDIT::DELETE-LITATOM ( -SEDIT::NODE-TYPE SEDIT::SUPER-NODE) SEDIT::LESS-PROMPT-WINDOW (LEFT BOTTOM WIDTH HEIGHT) -SEDIT::ATOM-CHAR-ESCAPED (CASEINSENSITIVE INNERESCQUOTE NSCHARHASH READSA) FB.NAMES.DECREASING.VERSION - (VERSIONLESSNAME TIDATA VERSION) TEXTUREOFCOLOR (RED GREEN BLUE) SEDIT::RELINEARIZE-WHERE-NECESSARY ( -SEDIT::CHANGED-NODES SEDIT::DEPTH SEDIT::SUPER-NODE SEDIT::ASSIGN-FORMAT SEDIT::NODE-TYPE CL:FORMAT -SEDIT::CHANGED?) SEDIT::LINEAR-ITEM-WIDTH (SEDIT::WIDTH) \\HASHACCESS (HASHBITSFN LASTINDEX -HARRAYPBASE VALUE KEY EQUIVFN NUMKEYS NULLSLOTS RECLAIMABLE) \\FM.HIGHLIGHTITEM (FM.USERDATA LEFT -BOTTOM) SHOWRECTANGLE.PRESS (ELSTREAM IMAGEDATA HIBYTE LOBYTE) HARRAYPROP (OVERFLOWACTION NUMKEYS -EQUIVFN RECLAIMABLE HASHBITSFN HASHUSERDATA) \\COLLECTDIRTYBUFS (BUFFS FILEPAGE# USERMAPPED IODIRTY -CBUFPTR VMEMPAGE CBUFDIRTY BUFFERNEXT) \\GETWINDOWHEIGHT (HEIGHT REG WBORDER WTITLE SCTITLEDS SCREEN) -\\STORAGE.TYPE (DTDNAME DTDHUNKP DTDSIZE NPAGES DTDGCTYPE DTDNEXTPAGE CNT NEXTPAGE DTDFREE NITEMS -NFREE NINUSE NALLOCATED) HARRAYSIZE (NUMSLOTS) \\BITBLT.BITMAP.SLOW (BITMAPHEIGHT BITMAPBITSPERPIXEL -BITMAPWIDTH LEFT BOTTOM WIDTH HEIGHT) \\STORAGE.HUNKTYPE (NPAGES NINUSE NITEMS NFREE NALLOCATED) -\\NOTE.3TO10 (NDBTRANSLATIONS) \\PROMISCUOUS.OFF (NETTYPE NDBPUPHOST#) |\\VFMDeletePageGroup| ( -|fileID| |nextFilePage| |type| |size| |key| |nextKey| |volumePage| |filePage|) APPENDIDENTIFIER.IP ( -OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) \\MAKE.PMAP.DEVICE ( -FORCEOUTPUT) PFI.PRINT.MULTI.INDEX (REPACKAGE REREADTABLE) SEDIT::EDIT-HELP (SEDIT::OPEN-NODE-CHANGED? - SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::DISPLAY-WINDOW) EXPANDBITMAP (BITMAPHEIGHT BITMAPWIDTH -BITMAPBITSPERPIXEL) \\PUNT.BITBLT.BITMAP (BITMAPHEIGHT BITMAPBITSPERPIXEL BITMAPWIDTH LEFT BOTTOM -WIDTH HEIGHT) \\GETWINDOWWIDTH (WIDTH REG WBORDER) \\PAGED.GETNEXTBUFFER (CPAGE COFFSET ACCESSBITS -FULLNAME CBUFSIZE CBUFPTR CBUFDIRTY EPAGE EOFFSET) \\SETIODIRTY (BUFFS FILEPAGE# BUFFERNEXT) -\\CHECKFREEPAGE (CBLABELADDR DISKDAS CBPAGENO) SEDIT::RECOMPUTE-WIDTH (SEDIT::FIRST-LINE SEDIT::LAST-LINE - SEDIT::START-X SEDIT::ACTUAL-LLENGTH SEDIT::LINE-LENGTH SEDIT::NODE SEDIT::ACTUAL-WIDTH) -\\PAGED.FORCEOUTPUT (ACCESSBITS CBUFDIRTY CPAGE BUFFS USERMAPPED IODIRTY CBUFPTR VMEMPAGE BUFFERNEXT -FILEPAGE#) STORAGE (DTDHUNKP) \\3MB.BROADCASTP (3MBDESTHOST) \\PAGEDSETFILEPTR (PAGE OFFSET CPAGE -EPAGE COFFSET CBUFDIRTY) \\FM.DISPLAYITEM (FM.USERDATA LEFT BOTTOM) TB.SHOW.DELETION (TBLINETHICKNESS -TBBASELINE TBITEMHEIGHT) \\PAGED.SETEOFPTR (PAGE OFFSET ACCESSBITS EPAGE) \\CLEARCB (SHORTCB) -\\PUNT.BLTSHADE.BITMAP (BITMAPHEIGHT BITMAPWIDTH BITMAPBITSPERPIXEL LEFT BOTTOM WIDTH HEIGHT) -SEDIT::COPY-STRUCTURE-STRING (CL:STRUCTURE SEDIT::FONT SEDIT::LINEAR-FORM SEDIT::ATOM-CHARS) -SEDIT::COLLECT-UNDO-BLOCK (SEDIT::UNDO-LIST) \\UPDATEOF (CBUFPTR COFFSET CBUFSIZE CPAGE) SEDIT::HELPMENU - (SEDIT::HELP-MENU SEDIT::ENVIRONMENT SEDIT::DISPLAY-WINDOW) ICONW.PRINT-JUSTIFIED (LEFT HEIGHT WIDTH -BOTTOM TOP) \\DOFORMATTING.HARDCOPY (QUAD SPACELEFT CHARS WIDTHS DESCENT ASCENT LINELEAD LHEIGHT -LEADBEFORE LSTLN LEADAFTER LEFTMARGIN RIGHTMARGIN LEN LXLIM CR\\END CHARLIM TEXTLEN BASE) -DSPSOURCETYPE (IMAGEDATA DDSOURCETYPE DDPILOTBBT DDOPERATION) SEDIT::PROPAGATE-WIDTH-CHANGE ( -SEDIT::ACTUAL-WIDTH SEDIT::SUPER-NODE SEDIT::DISPLAY-WINDOW SEDIT::START-X) \\TEDIT.HCPYFMTSPEC ( -1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD FMTBASETOBASE QUAD TABSPEC FMTSPECIALX -FMTSPECIALY) PUTHASHTEXT (|Stream|) \\VIRTUALDISKDA (DISK NTRACKS TRACK NHEADS HEAD NSECTORS SECTOR) -COMP.BOOL (OPNAME) \\3MBENCAPSULATE (NDBPUPHOST#) PRINT3TO10 (TRANSOPERATION TRANSPUPHOST -TRANSSENDERPUPHOST TRANSSENDERNSHOST TRANSNSHOST) \\STRINGWIDTH.PRESS (PRFONT IMAGEDATA WIDTHS -FONTCHARSETVECTOR PNAMEBASE PNAMELENGTH FATPNAMEP PRSPACEWIDTH ESCAPECHAR OFFST INDIRECT-P OFFSET BASE - XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) |\\VAMFreePageGroup| (|filePage| |nextFilePage| -|type| |volumePage| |freePageCount| |lowerBound|) COURIER.WRITE.BULKDATA (HIBYTE LOBYTE) -PFI.PRINT.FILECREATED (RESPEC) \\HASHRECLAIM (HARRAYPBASE NEXTSLOT LASTINDEX KEY NUMKEYS) DSPYOFFSET ( -IMYOFFSET IMAGEOPS) DSPCREATE (BITMAPWIDTH) \\PARTEND.PRESS (IMAGEDATA PDSTREAM PRPARTSTART HIBYTE -LOBYTE ELSTREAM) |\\SFFixDestination| (DDPILOTBBT |DDDestination| BITMAPRASTERWIDTH) ICONW.TITLE ( -ICTITLE) \\HASHTABLE.DEFPRINT (CHARPOSITION HASHMACROCHAR) \\STRINGHASHBITS-UFN (BASE XBASE INDIRECT-P - OFFST OFFSET LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER PNAMEBASE PNAMELENGTH FATPNAMEP) -ONEDINSPECT.BUTTONEVENTFN (PROP) DSPXOFFSET (IMXOFFSET IMAGEOPS) ONEDINSPECT.COPYBUTTONFN (ELTLEFT -ELTBOTTOM ELTWIDTH PROP) TB.FIND.SELECTED.ITEM (TB#ITEMS TISELECTED) PRINTDISPLAYNODE (NODEHEIGHT) -SEDIT::COPY-SELECTION-LITATOM (SEDIT::SELECT-NODE CL:STRUCTURE SEDIT::SELECT-START SEDIT::SELECT-END -SEDIT::SELECT-STRING SEDIT::SELECT-TYPE SEDIT::POINT-TYPE) SEDIT::PUNT-SET-POINT (SEDIT::SUPER-NODE -SEDIT::SUB-NODE-INDEX) \\TEDIT.UPDATE.SHOWSEL (\\TEXTOBJ HOW HOWHEIGHT HASCARET CARET CH# L1 LINES -\\WINDOW X0 CHLIM LN XLIM POINT YBOT) BULKDATA.GENERATE.NEXT (BGSTREAM BGITEMSLEFT BGLASTSEGMENT? -BGPROGRAM BGTYPE) |\\SFFixFont| (DDPILOTBBT DDFONT BITMAPBITSPERPIXEL |DDDestination| ROTATION) -\\DISPLAYSTREAMINCRXPOSITION (DDXPOSITION) INTERSECT/REGIONP/LBWH (BOTTOM PRIGHT LEFT WIDTH PTOP -HEIGHT) \\NEWLENGTHIS (EPAGE EOFFSET) \\FIXCODENUM (BASE) DISPLAYGRAPH (XCOORD YCOORD GRAPHNODES -NODEID) SETUPFONTS.IP (IPDATA IMAGEDATA) |\\SFFixClippingRegion| (|DDClippingRegion| |DDDestination| -LEFT WIDTH DDXOFFSET BITMAPWIDTH BOTTOM HEIGHT DDYOFFSET BITMAPHEIGHT) CHCON (PNAMEBASE FATPNAMEP -PNAMELENGTH BASE XBASE INDIRECT-P FATSTRINGP TYPE-NUMBER OFFST OFFSET LENGTH FILL-POINTER) -\\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (LINELENGTH F1 F2 OPENFILELST) \\SWAPDISKERROR ( -CURRENTDISKPAGE) \\STRING-EQUAL-HASHBITS-UFN (BASE XBASE INDIRECT-P OFFST OFFSET LENGTH FILL-POINTER -FATSTRINGP TYPE-NUMBER PNAMEBASE PNAMELENGTH FATPNAMEP) \\3MBGETPACKET (3MBBASE PBIRAWSTART PBILENGTH -PBISOCKET 3MBTYPE) \\PAGEDREADP (NSCHARHASH NOTXCCS INCCODEFN BACKCHARFN PEEKCCODEFN EOLCONVENTION -CPAGE EPAGE COFFSET CHARSET CBUFSIZE) CL:APROPOS (BASE XBASE INDIRECT-P OFFST OFFSET LENGTH -FILL-POINTER FATSTRINGP TYPE-NUMBER) \\PROMISCUOUS.ON (NETTYPE) \\SEQUIN.CLEANUP (SEQSTATE) -\\CHECKARRAYBLOCK (PASSWORD INUSE TRAILER ARLEN FWD BKWD) \\LOOKUPFMAP (ISFONEPAGE ISFONEDA ISFLAST) -TB.REV.FIND.SELECTED.ITEM (TB#ITEMS TISELECTED) \\CREATESTARFONT (FONTCHARSETVECTOR) UNPACK (PNAMEBASE - FATPNAMEP PNAMELENGTH BASE XBASE INDIRECT-P OFFST OFFSET FATSTRINGP TYPE-NUMBER LENGTH FILL-POINTER) -CL:APROPOS-LIST (BASE XBASE INDIRECT-P OFFST OFFSET LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) -\\ALLOCBLOCK.OLD (PASSWORD TRAILER ARLEN FWD) \\ALLOCBLOCK.NEW (PAGE#) SEDIT::SHIFT-STRING (BASE XBASE - INDIRECT-P OFFST OFFSET) \\ALLOCHUNK (DTDSIZE CELLINPAGE WORDINPAGE) DCHCON (PNAMEBASE FATPNAMEP -PNAMELENGTH BASE XBASE INDIRECT-P OFFST OFFSET FATSTRINGP TYPE-NUMBER LENGTH FILL-POINTER) -\\FIXCODEPTR (BASE) \\SFFIXLINELENGTH (IMAGEDATA |DDRightMargin| |DDLeftMargin| FONTAVGCHARWIDTH -DDFONT) BKLINBUF (READSA NSCHARHASH) MSCHECKBLOCKS (FILEPKGNAME) \\MAIKO.ALLOCBLOCK (TRAILER ARLEN) -\\GETFBB (BBOX BBOY BBDX BBDY) PPBUFS (FILEPAGE# BUFFERNEXT) GETSELECTEDITEMS (ITEMS) DUNPACK ( -PNAMEBASE FATPNAMEP PNAMELENGTH BASE XBASE INDIRECT-P OFFST OFFSET FATSTRINGP TYPE-NUMBER LENGTH -FILL-POINTER) MSSHOWUSE (KNOWN TYPE) \\MAKEFREEARRAYBLOCK (TRAILER ARLEN) \\ACCHARIMAGELIST ( -RASTERWIDTHX) \\TEDIT.NSCHAR.RUN (PCTB PLEN PFATP PSTR PFILE PFPOS TEXTLEN) COPYHASHFILE (|ValueType| -|ItemLength| |#Entries| |ItemCopyFn|) CHECK-SYMBOL-NAMESTRING (LENGTH FILL-POINTER) \\MERGEFORWARD ( -ARLEN INUSE) OPT.CODEFRAME (OPNAME FRAME PREV OPARG PARENT) \\ACCHARWIDTHLIST (BBOX BBOY BBDX BBDY -FBBBDX) \\SPP.STREAM.LOST (SPPERRORHANDLER) FB.HANDLE.ABORT.BUTTON (UPDATEPROC ABORTING) -\\IDLE.IS.PREVIOUS (|UserPswdAddr|) \\LINKBLOCK (ARLEN BKWD) \\FACECODE (EXPANSION WEIGHT SLOPE) -MB.BUTTONEVENTINFN (XSIZE YSIZE) SEDIT::START-PROCESS (SEDIT::ICON-TITLE SEDIT::COMPLETION-EVENT) -\\MERGEBACKWARD (INUSE ARLEN) IOCBQLENGTH (D0NEXTIOCB) SEDIT::INPUT-NORMAL-CHAR (SEDIT::DISPLAY-WINDOW - SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::UNDO-LIST SEDIT::SELECT-NODE SEDIT::SELECTION) -TB.FIRST.VISIBLE.ITEM# (TBORIGIN PTOP TBWINDOW BOTTOM HEIGHT TBITEMHEIGHT) \\TEXTTTYBOUT (TEXTOBJ F3 -SEL CCECHO NSCHARHASH TXTTERMSA CHARPOSITION) ALPHORDER (PNAMEBASE PNAMELENGTH FATPNAMEP BASE XBASE -INDIRECT-P OFFST OFFSET LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER TYP) TEXTSTREAMP (TEXTOBJ F3) -SEDIT::BUILD-PRELINEARIZED-NODE (SEDIT::\\X SEDIT::CURRENT-NODE SEDIT::ENVIRONMENT) DEFAULTMAKENEWCOM -(MACRO GETDEF DESCRIPTION) \\SEQUIN.RETRANSMITNEXT (SEQRETRANSMITNEXT SEQRETRANSMITQ MYRECEIVESEQ -PUPBASE SEQINALLOC SEQSOCKET EPLINK \#SEQRETRANSMITS) SEDIT::PARSE--UNKNOWN (SEDIT::COMMENT-FONT -SEDIT::ENVIRONMENT) SPP.DSTYPE (SPPOUTPKT XIPCONTENTS ACCESSBITS SPPDSTYPE SPPINPUTDSTYPE DSTYPE -SPPINPKT SPPERRORHANDLER) \\TEDIT.FORMATTABS (PTTYPE PTTABX PTOLDTX PTWBASE TABX TABKIND) COPYHASHITEM - (|Stream| |Start| |End|) COMP.PICOUNT (OPARG) PACKC (XBASE INDIRECT-P BASE) OPT.CODELEV (OPNAME LEVEL - PREV OPARG) SEDIT::COMPOSE-PSEUDO-SELECTION (SEDIT::SUPER-NODE SEDIT::SUB-NODE-INDEX) -\\FM.PUTITEMPROP (FM.LABEL FM.ID FM.GROUPID FM.STATE FM.INITSTATE FM.FONT FM.BITMAP FM.HIGHLIGHT -FM.REGION FM.MAXREGION FM.MESSAGE FM.LINKS FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN FM.DOWNFN -FM.HELDFN FM.MOVEDFN FM.SELECTEDFN FM.USERDATA) \\INCPARENCOUNT (INSTRINGP LBRKCOUNT FW7 LPARCOUNT FW6 -) WYOFFSET (BOTTOM) \\PREFIXALIGNMENT? (CELLINSEGMENT WORDINSEGMENT) REMWINDOWPROP (USERDATA) -LINKPARAMETERS (NODEID) SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::OPEN-NODE-CHANGED? SEDIT::DISPLAY-WINDOW - SEDIT::SELECTION SEDIT::CARET-POINT SEDIT::SELECT-NODE SEDIT::SELECT-TYPE SEDIT::SELECT-START -SEDIT::SELECT-END SEDIT::SUB-NODES SEDIT::NODE-TYPE CL:STRUCTURE) \\DEQUEUE (SYSQUEUEHEAD QLINK) -\\FM.GETITEMPROP (FM.TYPE FM.LABEL FM.ID FM.GROUPID FM.STATE FM.INITSTATE FM.FONT FM.BITMAP -FM.HIGHLIGHT FM.REGION FM.MAXREGION FM.MESSAGE FM.USERDATA FM.LINKS FM.SYSDOWNFN FM.SYSMOVEDFN -FM.SYSSELECTEDFN FM.DOWNFN FM.HELDFN FM.MOVEDFN FM.SELECTEDFN) \\M44DOEXTENDVMEMFILE (ISFLAST -ISFHINTLASTPAGE CURRENTNUMCHARS ISFREWRITE ISFDA0 ISFDA1 ISFDA2) \\SETBRUSH.IP (BRUSHCOLOR) -INTEGERLENGTH (HINUM LONUM) \\PACK.ITEM (BASE XBASE INDIRECT-P) \\DELETEBLOCK? (ARLEN FWD BKWD) -DISPLAY/NAME (NODELABEL) SEDIT::EXPAND (SEDIT::DISPLAY-WINDOW SEDIT::SELECTION SEDIT::CARET-POINT -SEDIT::SELECT-NODE SEDIT::SELECT-TYPE SEDIT::SELECT-START CL:STRUCTURE) WXOFFSET (LEFT) -\\REQUEUE.ETHERPACKET (EPREQUEUE) \\TEDIT.GET.TERMSA.WIDTHS (BASE OFFST) MSGETDEF (GETDEF-FN -FILEPKGNAME) \\SHOWSEL.HILIGHT (YBOT X0 XLIM LHEIGHT FMTHARDCOPY LFMTSPEC LXLIM NEXTLINE WBOTTOM -LEFTMARGIN) SEDIT::COMPUTE-SELECTION-POSITION-LITATOM (SEDIT::SELECT-NODE SEDIT::LINEAR-FORM -SEDIT::SELECT-STRING SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::FONT SEDIT::NODE-TYPE SEDIT::START-X - SEDIT::FIRST-LINE SEDIT::SELECT-START-LINE) SEDIT::PARSE--GAP (SEDIT::CURRENT-NODE SEDIT::LINEAR-ITEM -) SPP.OPEN (SPPLOCK SPPMYNSOCKET SPPESTABLISHEDP SPPINPUTEVENT SPPDESTNSNET SPPPROCESS SPPTERMINATEDP) - \\TEDIT.PURGE.SPACES (BASE) PACK (XBASE INDIRECT-P BASE) \\LITATOM.EATCHARS (PNAMEBASE PNAMELENGTH -FATPNAMEP) COMP.CPI1 (OPARG) BLOCK (PROCQUEUE PQNEXT NEXTPROCHANDLE PROCFX INVALIDP WAKEREASON PQLOWER -) OPT.RETMERGE (PREV OPNAME FRAME TAG LEVEL) SEDIT::PSEUDO-SELECTION-FROM-SELECTION (SEDIT::SELECT-NODE - SEDIT::SELECT-START SEDIT::SELECT-END) TEDIT.MOVE (SET \\TEXTOBJ DCH TXTREADONLY TEXTLEN PCTB -TXTHISTORY CHLIM CH# LINES POINT \\XDIRTY TXTFILE FORMATTEDP SEL) PAGEFULLFN (KEYBOARDSTREAM F2) -\\PEEKNS (NSHOSTNUMBER) TB.LAST.VISIBLE.ITEM# (TB#ITEMS TBORIGIN BOTTOM TBWINDOW TBITEMHEIGHT) +DDCHARSETDESCENT CHARSETDESCENT BITMAPBASE DDCHARHEIGHTDELTA) \SFFixY (DDPILOTBBT DDYPOSITION +DDYOFFSET CHARSETASCENT BITMAPBASE DDDestination BITMAPRASTERWIDTH BITMAPHEIGHT DDClippingTop +CHARSETBITMAP CHARSETDESCENT DDClippingBottom) \SLOWBLTCHAR (IMAGEDATA ROTATION DDFONT DDXPOSITION +DDWIDTHSCACHE DDRightMargin DDXOFFSET DDClippingLeft DDClippingRight DDPILOTBBT PBTHEIGHT +DDOFFSETSCACHE BITMAPBITSPERPIXEL DDDestination DDYPOSITION FONTCHARSETVECTOR CHARSETBITMAP +CHARSETASCENT CHARSETDESCENT) EXPANDW (EXPANDWFN SCREEN) DISPLAYLINK/TB (XCOORD NODEPOSITION YCOORD) +\DSPLEFTMARGIN.IP (IPLEFT IMAGEDATA) TB.INSERT.ITEM (TB#ITEMS TI# TBITEMS TBTAILHINT TIDELETED +TB#DELETED TBFIRSTSELECTEDITEM TISELECTED TBLASTSELECTEDITEM) FB.THINCOMMAND (TABLEBROWSER SORTBY +INFODISPLAYED TIDATA FILEINFO VERSIONLESSNAME) \CARET.FLASH.AGAIN (RATE NEXT) BMOBJ.COPYFN (BITMAP +BMOBJSCALEFACTOR BMOBJROTATION BMOBJDESCENT) \PEEKPUP (NETTYPE NDBPUPHOST# PUPNET# PUPHOST#) +\LEAF.CREATIONDATE (LFCREATIONDATE LEAFINFO) \LEAF.STREAM.IN.QUEUE (SYSQUEUEHEAD SEQDONEQ +SEQRETRANSMITQ EPUSERFIELD FULLFILENAME LEAFOPCODE PUPCONTENTS ACCESSBITS EPLINK) SPY.ORIGINAL (STATUS + TREEFROM) \SPP.EVENTFN (DEVICEINFO) \STRINGWIDTH.PSC (IMAGEDATA POSTSCRIPTFONT POSTSCRIPTSPACEWIDTH) +PFI.PRINT.MULTI.INDEX (REPACKAGE REREADTABLE) ARRAYTYP (TYP) TEDIT.PUT.OBJECT (POBJ) +COURIER.EXECUTE.CALL (HIBYTE LOBYTE PROGRAM# VERSION# FN#) ARRAYORIG (ORIG) REPLACEFIELD (fdOffset +fdType fdTypeName HINUM LONUM) BRH/OFFSET (YCOORD NODEPOSITION TONODES) \SHOWSEL (\TEXTOBJ HOW +HOWHEIGHT SET \WINDOW TXTDON'TUPDATE LN L1 LINES CARET SELOBJ ONFLG HASCARET TXTEDITING POINT YBOT X0 +YBASE XLIM TXTREADONLY) \MAYBEPEEKNS (NSHOST2 NSHOST1 NSHOST0) BOXCOUNT (DTDCNT) USERNAME ( +UserNameAddr) DASSEM.CANSHAREBINDING (VARS VARINDEX PARENT) \POSTSCRIPT.OUTCHARFN (IMAGEDATA +POSTSCRIPTX POSTSCRIPTFONT POSTSCRIPTSPACEWIDTH POSTSCRIPTWIDTHS POSTSCRIPTACCENTED +POSTSCRIPTRIGHTMARGIN POSTSCRIPTY FONTSIZE FONTFACE POSTSCRIPTCHARSTOSHOW) SETD (TYP READONLY BASE +ORIG LENGTH OFFST) \TEXTSTREAMBOUT (TEXTOBJ TEXTLEN \WINDOW SEL L1 CH# THISLINE LN CARETLOOKS +\INSERTPC CHARLIM CHARTOP CLFONT X0 WRIGHT POINT YBOT BOTTOM Y0 WBOTTOM LHEIGHT PSTR BASE OFFST +\INSERTLEN COFFSET) BSPREADP (MARKPENDING BSPCURRENTPUP COFFSET CBUFSIZE %#UNREADPUPS BSPSOC PUPTYPE +BSPINPUTQ) ELTD (TYP BASE ORIG LENGTH OFFST) \TEDIT.PROMPT.PAGEFULLFN (TOP BOTTOM) SETUSERNAME ( +UserNameAddr) \MEDW.PUTWINDOWPROP (RIGHTBUTTONFN BUTTONEVENTFN CLOSEFN MOVEFN CURSORINFN CURSOROUTFN +CURSORMOVEDFN RESHAPEFN REPAINTFN EXTENT SCROLLFN WIDTH HEIGHT LEFT BOTTOM NEWREGIONFN WTITLE WBORDER +PROCESS WINDOWENTRYFN USERDATA) REHASH (HARRAYPBASE LASTINDEX VALUE KEY NEXTSLOT) TEDIT.STRINGWIDTH ( +OFFST BASE LENGTH FATSTRINGP) \COPYHARRAYP (NULLSLOTS LASTINDEX HARRAYPBASE OVERFLOWACTION NUMSLOTS +NUMKEYS) \COERCEFONTDESC (DISPLAYFD INTERPRESSFD PRESSFD OTHERFDS FONTDEVICE IMFONTCREATE IMAGEOPS) +STKNTHNAME (INVALIDP FRAMENAME CLINK ALINK) HARRAYSIZE (NUMSLOTS) SEDIT::JOIN (SEDIT::DISPLAY-WINDOW +SEDIT::SELECTION SEDIT::CARET-POINT SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END +SEDIT::OPEN-NODE-CHANGED? SEDIT::SELECT-TYPE SEDIT::NAME SEDIT::NODE-TYPE SEDIT::SUB-NODES CL:STRUCTURE + SEDIT::UNASSIGNED) INVERT.TEXTURE.BITMAP (BITMAPRASTERWIDTH BITMAPHEIGHT BITMAPBASE) +TB.SHOW.SELECTION (TBBASELINE TBWINDOW TBITEMHEIGHT BITMAPHEIGHT) DO.CHAT.OPTION (INSTREAM) LRSH ( +HINUM LONUM) COMP.MLLVAR (VARNAME OPNAME) ONEDINSPECT.SETELT (WIDTH) \LEAF.SETFILETYPE (PUPCONTENTS +LEAFHANDLE LEAFCONNECTION) \MEDW.GETWINDOWPROP (RIGHTBUTTONFN BUTTONEVENTFN CURSORINFN CURSOROUTFN +CURSORMOVEDFN DSP SCREEN SCROLLFN RESHAPEFN EXTENT REPAINTFN MOVEFN CLOSEFN WINDOWENTRYFN PROCESS REG +NEWREGIONFN WTITLE WBORDER SAVE) READBITMAP (BITMAPBASE) \LEAF.TIMEDOUT.EXCESSIVE (SEQNAME +SYSQUEUEHEAD SEQDONEQ SEQRETRANSMITQ EPUSERFIELD FULLFILENAME LEAFOPCODE PUPCONTENTS LOADDR ACCESSBITS + EPLINK) SPY.DELETE (NAME CALLEES) \NSGATELISTENER (NSOCEVENT XIPCONTENTS) \DRAWARC.PSC (IMAGEDATA +BRUSHSHAPE BRUSHSIZE BRUSHCOLOR POSTSCRIPTSCALE) SEDIT::OUTPUT-CR-OR-SPACE (SEDIT::CURRENT-X) SUBARRAY + (LENGTH ORIG BASE TYP OFFST) GETSUPERTYPE (DTDSUPERTYPE) \SENDSPP (SPPLOCK SPPTERMINATEDP +SPPACKEDSEQNO SPPOUTPUTALLOCNO SPPSEQNO SPPRETRANSMITQ DSTYPE SPPALLOCATIONEVENT) +TEDIT.FIND.OBJECT.SUBTREE (PCE LO HI POBJ CHNUM) SEDIT::PRETTY-PRINT (SEDIT::SUB-NODES) +\TYPENAMEFROMNUMBER (DTDNAME) TXTFILE (TXTFILE) CHECKBUFFERREFVAL (NOREFERENCE VMEMPAGE) TEXTUREP ( +BITMAPRASTERWIDTH) BSPEOFP (BSPOUTPUTSTREAM MARKPENDING BSPCURRENTPUP COFFSET CBUFSIZE) \FTP.HANDLE.NO + (FTPIN FTPHOST) \TEDIT.MOVE.PIECEMAPFN (POBJ \WINDOW STREAMHINT PSTR PLEN) GETFIELDSPECS ( +DTDTYPESPECS) \HCPYMODEBLTCHAR (DDCHARSET DDSlowPrintingCase DDXPOSITION DDSPACEWIDTH DDWIDTHSCACHE +DDMICARIGHTMARGIN DDLeftMargin DDXOFFSET DDCHARIMAGEWIDTHS DDClippingRight DDClippingLeft PBTHEIGHT +DDPILOTBBT DDOFFSETSCACHE) COMPAREDEFS (TOBEDUMPED FILEPROP NULLDEF) TB.SELECT.ITEM (TI#) +SEDIT::UNDERLINE-SELECTION (SEDIT::SELECT-START-X SEDIT::SELECT-START-LINE SEDIT::SELECT-END-X +SEDIT::SELECT-END-LINE) \PNC (LENGTH OFFST BASE) GN/TOP (YCOORD NODEPOSITION NODEHEIGHT) COMP.MLL ( +LBNO OPNAME OPARG TAG NVALS VARS) \WRITEOUTBUFFERS (FILEPAGE# CBUFPTR VMEMPAGE) ULREDISPLAYBITMAP ( +LEFT BOTTOM HEIGHT BITMAPHEIGHT) SETY.PRESS (ELSTREAM IMAGEDATA PRYPOS HIBYTE LOBYTE) \CLEARMAP ( +ACCESSBITS FORCEOUTPUT DEVICE BUFFS USERMAPPED FILEPAGE# BUFFERNEXT) LOG (EXPONENT) FILING.CALL ( +FSPROTOCOLDEF FSPROTOCOLNAME ARGS FSSESSIONLOCK FSSESSIONHANDLE FSNAMESTRING FSREALACTIVITY +FSLASTREALACTIVITYTIMER FSSESSIONTIMER) CENTERINHEIGHT (BOTTOM HEIGHT) PUP.ECHOSERVER (PUPSOCEVENT +PUPTYPE) \CH.CHECK.CLEARINGHOUSE (NSORGANIZATION NSDOMAIN) \MEDW.BITBLT (IMAGEDATA BBTTOWIN SCREEN +DDXOFFSET DDYOFFSET BBTFROMWIN DDDestination DDClippingLeft DDClippingBottom BBTWINWIN) SETX.PRESS ( +ELSTREAM IMAGEDATA PRXPOS HIBYTE LOBYTE) POSTSCRIPT.OUTSTR (FATSTRINGP OFFST BASE LENGTH PNAMEBASE +PNAMELENGTH FATPNAMEP) \WRITEPAGES (WRITEPAGES DEVICE) SEDIT::INSERT-SPECIAL-CHARACTER (SEDIT::CARET-POINT + SEDIT::POINT-NODE SEDIT::SELECT-NODE SEDIT::SELECTION) \ENDVECRUN (IMAGEDATA VECMOVINGRIGHT VECCURX +VECCURY VECSEGCHARS) DINFO.TOGGLE.GRAPH (CURRENTNODE GRAPH.WINDOW) HARRAYPROP (OVERFLOWACTION NUMKEYS +EQUIVFN RECLAIMABLE HASHBITSFN HASHUSERDATA) SEDIT::TRACK-SELECT (SEDIT::POINT-TYPE SEDIT::POINT-X +SEDIT::POINT-LINE) FB.ADD.FILE (SIZE TIDATA TOTALPAGES TOTALFILES) TEDIT.WORDSET (READSA) COMP.MAP ( +VARS) \READPAGES (READPAGES DEVICE) DASSEM.MATCHVARS (VARINDEX) \ACTONDISKPAGES (BASE FID FPVERSION +MISCSTACKRESULT CURRENTNUMCHARS) \PS.SCALEREGION (LEFT BOTTOM WIDTH HEIGHT) CLRHASH (HARRAYPBASE +NEXTSLOT LASTINDEX NUMSLOTS) FB.SEEFULLFN (IMAGEWIDTH IMAGEHEIGHT HEIGHT BOTTOM) FILEBROWSER ( +IMAGEWIDTH WIDTH HEIGHT ABORTWINDOW COUNTERWINDOW PROMPTWINDOW) CL:READ-CHAR (EOFP DEVICE) \DISKERROR +(FULLFILENAME CURRENTDISKPAGE) CLOSEBSPSTREAM (BSPSOC BSPLOCK BSPINPUTSTREAM RTPSTATE BSPOUTPUTSTREAM +%#UNACKEDPUPS INTERRUPTOUT BSPINPUTEVENT) %%COPY-ONED-ARRAY (BASE) \FTP.WHENCLOSED (FTPIN FTPHOST) +\SLOWHCPYMODEBLTCHAR (IMAGEDATA ROTATION DDFONT DDXPOSITION DDWIDTHSCACHE DDRightMargin DDXOFFSET +DDClippingLeft DDClippingRight DDPILOTBBT PBTHEIGHT DDOFFSETSCACHE BITMAPBITSPERPIXEL DDDestination +DDYPOSITION FONTCHARSETVECTOR CHARSETBITMAP CHARSETASCENT CHARSETDESCENT) TTADJUSTWIDTH (END LASTCOL) +\GENERIC.DSPCREATE (SCDESTINATION DSPCREATEFN BITMAPWIDTH) MAPHASH (HARRAYPBASE NEXTSLOT LASTINDEX +VALUE KEY) \FTP.ERRORHANDLER (FTPOPENP ENDOFSTREAMOP FULLFILENAME) DATATYPEP (DTDHUNKP DTDNAME) +FINDPTRSBUFFER (VMEMPAGE SYSNEXT) REDISPLAYBITMAP (LEFT BOTTOM) \DOACTONDISKPAGES (DISKCAS DISKDAS +DISKFIRSTPAGE DISKLASTPAGE FIXEDDISKBUFFER DISKHINTLASTPAGE RETURNONCHECKERROR CBQUEUE LASTDISKACTION +DISKACTION SAWCHECKERROR CBFREEPTR CBNEXT DISKERRORCNT RETRYCOUNT CURRENTDISKPAGE) SEDIT::NEXT-NODE-TYPE + (CL:STRUCTURE SEDIT::NODE-TYPE) SEDIT::INSPECT-SELECTION (SEDIT::SELECTION SEDIT::CARET-POINT +SEDIT::DISPLAY-WINDOW) \FIXLINELENGTH.IP (IMAGEDATA IPRIGHT IPLEFT FONTAVGCHARWIDTH IPFONT) +\GETMAPBUFFER (USERMAPPED NOREFERENCE BUFFERNEXT) IRM.DISPLAY.CREF (LEFT BOTTOM HEIGHT WIDTH TOP RIGHT +) DINFO.TOGGLE.MENU (CURRENTNODE SUBNODE.MENU.WINDOW) \TEDIT2 (TEXTOBJ EDITFINISHEDFLG TXTFILE) +TB.BOTTOM.OF.ITEM (TBORIGIN TBITEMHEIGHT TI#) OPENBSPSTREAM (RTPSTATE CONNID BSPTIMER +BSPINACTIVITYTIMEOUT INACTIVITYTIMER RTPPROCESS) TERM.HOME (HOMEPOS DSP) \LEAF.NOT.RESPONDING (SEQNAME + FULLFILENAME) TEDIT.WORDGET (NSCHARHASH READSA) \WRITEDISKPAGES (BASE FID FPVERSION MISCSTACKRESULT) +PRINTXIP (XIPTYPE XIPLENGTH) \BSP.GETFILEPTR (BSPFILEPTR CPPTR COFFSET) MARGINBAR.CREATE (XSIZE YSIZE +MARL1 MARLN MARR MARTABS MARUNIT WIDTH) \HASHACCESS (HASHBITSFN LASTINDEX HARRAYPBASE VALUE KEY +EQUIVFN NUMKEYS NULLSLOTS RECLAIMABLE) GN/BOTTOM (YCOORD NODEPOSITION NODEHEIGHT) +SEDIT::INSERT-MULTI-ESCAPE (SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::POINT-STRING SEDIT::POINT-INDEX + SEDIT::SELECT-NODE SEDIT::POINT-TYPE SEDIT::SELECTION) TEDIT.QUIT (TEXTOBJ \WINDOW) \DOWRITEDISKPAGES + (DISKCAS DISKDAS DISKFIRSTPAGE DISKLASTPAGE FIXEDDISKBUFFER DISKNOALLOC DISKWRITELASTNUMCHARS +CURRENTNUMCHARS CBQUEUE DISKERRORCNT RETRYCOUNT CURRENTDISKPAGE) NUKE-SYMBOL (BASE OFFST LENGTH +FATSTRINGP) SCROLLBITMAP (BOTTOM HEIGHT BITMAPHEIGHT LEFT WIDTH BITMAPWIDTH) ADD-SYMBOL (PNAMEBASE +PNAMELENGTH FATPNAMEP) SEDIT::LINEARIZE-QUOTE (SEDIT::UNASSIGNED SEDIT::SUB-NODES) SEDIT::TRACK-EXTEND + (SEDIT::SELECT-NODE SEDIT::SELECTION) MAPBUFFERCOUNT (NOREFERENCE USERMAPPED SYSNEXT) SPY.DUMP.BUFFER + (COUNT) SEDIT::LOCATE-NODE-FROM-EDITCHAIN (SEDIT::SUB-NODES CL:STRUCTURE) \CHARWIDTH.PSC ( +POSTSCRIPTSPACEWIDTH IMAGEDATA WIDTHS FONTCHARSETVECTOR POSTSCRIPTFONT) DBG::STKPTR-CCODE (FNHEADER) +\FTPERROR (FTPIN) TEDIT.UNDO.DELETION (NEXTPIECE PCTB SEL TEXTLEN TXTREADONLY POBJ PLEN THPOINT) +MAPPAGE (PAGEMAPPED DEVICE ACCESS EPAGE) \COURIER.REP.BIN (CRNEXTBYTE CRWORDLIST F1 LOBYTE HIBYTE) +\MEDW.DSPCREATE (SCDESTINATION WINFDEV WINIMAGEOPS BITMAPWIDTH) \HASHRECLAIM (HARRAYPBASE NEXTSLOT +LASTINDEX KEY NUMKEYS) \STRINGWIDTH.HCPYMODE (DDCHARIMAGEWIDTHS IMAGEDATA) \MAPPAGE (BUFFS FILEPAGE# +NOREFERENCE VMEMPAGE USERMAPPED BUFFERNEXT MAXBUFFERS ACCESSBITS IODIRTY CBUFPTR CBUFDIRTY +MULTIBUFFERHINT) DO.MOUSE (ROWPOS COLPOS) DINFO.UPDATE (CURRENTNODE TOPNODEID NODELST WINDOW +FMENU.WINDOW MONITORLOCK) \SWITCHFONTS.PSC (POSTSCRIPTFONT IL-FONTID OTHERDEVICEFONTPROPS FONTIDNAME +POSTSCRIPTFONTSUSED FONTXFACTOR FONTSIZE FONTOBLIQUEFACTOR) \SETEOF (PAGE OFFSET CBUFPTR CPAGE +CBUFDIRTY) \WRITEVMEMPAGES (FPVERSION) PUP.ECHOUSER (PUPLENGTH PUPSOCEVENT PUPTYPE PUPIDHI PUPIDLO +EPTRANSMITTING) MB.MARGINBAR.SHOWTAB (TABX TABKIND) TEDIT.FIND.OBJECT (PCTB POBJ PLEN NEXTPIECE) +STORAGE (DTDHUNKP) SHOWRECTANGLE.PRESS (ELSTREAM IMAGEDATA HIBYTE LOBYTE) TEDIT.REDO.INSERTION (SEL +PCTB THLEN THFIRSTPIECE TEXTLEN NEXTPIECE POBJ STREAMHINT \WINDOW PLEN PREVPIECE) \DSPROTATE.PSC ( +IMAGEDATA POSTSCRIPTROTATION) \HASHTABLE.DEFPRINT (CHARPOSITION HASHMACROCHAR) SETUPFONTS.IP (IPDATA) +\STORAGE.TYPE (DTDNAME DTDHUNKP DTDSIZE NPAGES DTDGCTYPE DTDNEXTPAGE CNT NEXTPAGE DTDFREE NITEMS NFREE + NINUSE NALLOCATED) \DSPBOTTOMMARGIN.IP (IPBOTTOM IMAGEDATA) SEDIT::TTYFN (SEDIT::CONTEXT-LOCK) +\BITBLT.BITMAP.SLOW (BITMAPHEIGHT BITMAPBITSPERPIXEL BITMAPWIDTH LEFT BOTTOM WIDTH HEIGHT) +\STORAGE.HUNKTYPE (NPAGES NINUSE NITEMS NFREE NALLOCATED) \COLLECTDIRTYBUFS (BUFFS FILEPAGE# +USERMAPPED IODIRTY CBUFPTR VMEMPAGE CBUFDIRTY BUFFERNEXT) \STRINGWIDTH.PRESS (PRFONT IMAGEDATA WIDTHS +FONTCHARSETVECTOR PNAMEBASE PNAMELENGTH FATPNAMEP PRSPACEWIDTH ESCAPECHAR OFFST BASE LENGTH FATSTRINGP +) \BSPBACKFILEPTR (BSPOUTPUTSTREAM CPPTR COFFSET) BSPOPENP (BSPSOC RTPSTATE %#UNREADPUPS COFFSET +CBUFSIZE) TEXTUREOFCOLOR (RED GREEN BLUE) SPY.MAKE.TREE (PACKAGE READTABLE PRINT-CASE SUM THRESHOLD) +\MEDW.TOTOPW (SCTOPW SCREEN) \PUNT.BITBLT.BITMAP (BITMAPHEIGHT BITMAPBITSPERPIXEL BITMAPWIDTH LEFT +BOTTOM WIDTH HEIGHT) \SETIODIRTY (BUFFS FILEPAGE# BUFFERNEXT) SEDIT::LINEARIZE-LIST (SEDIT::UNASSIGNED + SEDIT::NON-STANDARD? SEDIT::LINEARIZE-LIST SEDIT::ENVIRONMENT SEDIT::LPAREN-STRING SEDIT::WIDTH +SEDIT::SPACE-WIDTH SEDIT::START-X SEDIT::SUB-NODES SEDIT::RIGHT-MARGIN SEDIT::COMMENT-SEPARATION +SEDIT::COMMENT-WIDTH SEDIT::INLINE-WIDTH SEDIT::NODE-TYPE SEDIT::PREFERRED-WIDTH SEDIT::LIST-MFORMAT +SEDIT::LIST-PFORMAT SEDIT::CURRENT-X SEDIT::ROOT SEDIT::INLINE? SEDIT::RPAREN-STRING) +\STRINGHASHBITS-UFN (BASE OFFST LENGTH FATSTRINGP PNAMEBASE PNAMELENGTH FATPNAMEP) DISPLAYLINK/LR ( +XCOORD YCOORD NODEPOSITION) \FM.NUMBER-CHANGESTATE (FM.STATE) COURIER.REP.LENGTH (FATSTRINGP) +\DODISKCOMMAND (SHORTCB CBLABELADDR DISKFID CBDA DSKPARTITION CBLINK CBDONE CBLASTPTR CBSTATUS) +\STRING-EQUAL-HASHBITS-UFN (BASE OFFST LENGTH FATSTRINGP PNAMEBASE PNAMELENGTH FATPNAMEP) +SEDIT::OUTPUT-CONSTANT-STRING (SEDIT::RELINEARIZATION-TIME-STAMP SEDIT::LINEAR-POINTER SEDIT::LINEAR-PREV + SEDIT::WIDTH SEDIT::LINE-ASCENT SEDIT::CURRENT-LINE SEDIT::FONT SEDIT::LINE-DESCENT SEDIT::DISPLAY-WINDOW + SEDIT::PRIN-2? STRING SEDIT::ENVIRONMENT SEDIT::CURRENT-X) TEDIT.EDIT.OBJECT (TEXTOBJ SCRATCHSEL SEL +SELOBJ L1) BRH/LAYOUT (TONODES NODEWIDTH NODEHEIGHT NODEPOSITION) \GETDISKCB (CBFREEPTR CBNEXT +CBPENDINGPTR) INCORNER.REGION (LEFT BOTTOM RIGHT) EXPANDBITMAP (BITMAPHEIGHT BITMAPWIDTH +BITMAPBITSPERPIXEL) \XIPERROR (XIPTYPE XIPBASE XIPLENGTH) SEDIT::INPUT-TOKENDELIM (SEDIT::CARET-POINT +SEDIT::SELECTION SEDIT::POINT-NODE SEDIT::NODE-TYPE SEDIT::SELECT-NODE) \MAKE.PMAP.DEVICE (FORCEOUTPUT +) COMP.SELECTQ (OPNAME OPARG) \CLEANUPDISKQUEUE (CBPENDINGPTR CBFREEPTR SHORTCB CBDONE CBQSTATUS +CBNEXT CBLASTPTR RESTORE CBDA CBSTATUS TOTALDISKERRORS DISKERRORCNT RETRYCOUNT CBFINALSTATUS CBPAGENO +CURRENTDISKPAGE CBLABELADDR DLNUMCHARS CBCLEANUPFN CURRENTDAS DLNEXT DLPREVIOUS) \SEL.LIMIT (POINT CH# + CHLIM) TB.NORMALIZE.ITEM (TBWINDOW BOTTOM PTOP TBITEMHEIGHT HEIGHT) SEDIT::SHRINKFN (SEDIT::CONTEXT-LOCK + SEDIT::EDIT-OPTIONS SEDIT::DISPLAY-WINDOW SEDIT::ICON-TITLE SEDIT::EDIT-TYPE) GN/LEFT (XCOORD +NODEPOSITION NODEWIDTH) \DRAWPOINT.PSC (BITMAPWIDTH BITMAPHEIGHT) \PUNT.BLTSHADE.BITMAP (BITMAPHEIGHT +BITMAPWIDTH BITMAPBITSPERPIXEL LEFT BOTTOM WIDTH HEIGHT) TEDIT.SETSYNTAX (READSA TXTRTBL TEXTOBJ) +\PAGED.GETNEXTBUFFER (CPAGE COFFSET ACCESSBITS FULLNAME CBUFSIZE CBUFPTR CBUFDIRTY EPAGE EOFFSET) +COURIER.NSNAME.LENGTH (NSOBJECT NSDOMAIN NSORGANIZATION) \FIXCODENUM (BASE) \MAKE.EXPEDITED.STREAM ( +XIPBASE XIPLENGTH) FB.NAMES.DECREASING.VERSION (VERSIONLESSNAME TIDATA VERSION) \PAGED.FORCEOUTPUT ( +ACCESSBITS CBUFDIRTY CPAGE BUFFS USERMAPPED IODIRTY CBUFPTR VMEMPAGE BUFFERNEXT FILEPAGE#) +DSPSOURCETYPE (IMAGEDATA DDSOURCETYPE DDPILOTBBT DDOPERATION) \FIXCODEPTR (BASE) \DSPCLIPPINGREGION.IP + (IMAGEDATA IPClippingRegion) GN/RIGHT (XCOORD NODEPOSITION NODEWIDTH) \CLIPLINE (LEFT RIGHT BOTTOM +TOP) \PAGEDSETFILEPTR (PAGE OFFSET CPAGE EPAGE COFFSET CBUFDIRTY) DASSEM.DSTOREFNDEF (OVERHEADWORDS +OP#) POSTSCRIPT.STARTPAGE (IMAGEDATA POSTSCRIPTPAGENUM POSTSCRIPTHEADING POSTSCRIPTHEADINGFONT) +DSPYOFFSET (IMYOFFSET IMAGEOPS) TB.EXPANDFN (TBLOCK TBUPDATEFROMHERE) \PAGED.SETEOFPTR (PAGE OFFSET +ACCESSBITS EPAGE) \REALDISKDA (NSECTORS NHEADS NTRACKS) DSPXOFFSET (IMXOFFSET IMAGEOPS) +TEDIT.UNDO.INSERTION (LINES SEL) \UPDATEOF (CBUFPTR COFFSET CBUFSIZE CPAGE) \IFS.LOOKUPFILE (PFSNAME +PFSOSTYPE PFSLOOKUPFILELOCK PFSLOOKUPFILESOCKET PUPTYPE LOOKUPVERSION LOOKUPCREATIONDATE LOOKUPLENGTH +ERRORPUPCODE PFSLOOKUPFAILCNT) DSPCREATE (BITMAPWIDTH) \BSP.SETFILEPTR (BSPOUTPUTSTREAM) +POSTSCRIPT.SET-FAKE-LANDSCAPE (IMAGEDATA POSTSCRIPTLANDSCAPE POSTSCRIPTCLIPPINGREGION +POSTSCRIPTPAGEREGION HEIGHT WIDTH BOTTOM LEFT POSTSCRIPTBOTTOMMARGIN POSTSCRIPTRIGHTMARGIN +POSTSCRIPTTOPMARGIN POSTSCRIPTLEFTMARGIN) SEDIT::RESHAPEFN (BOTTOM HEIGHT SEDIT::CONTEXT-LOCK WIDTH +LEFT) \PAGEDREADP (NSCHARHASH CPAGE EPAGE) \SEL.LINEDESC (POINT L1 LN) \CARET.FLASH (CURSOR CUHOTSPOTX + CUHOTSPOTY) \NSFILING.GET.ATTRIBUTES (NSHDATUM) \CHECKARRAYBLOCK (PASSWORD INUSE TRAILER ARLEN FWD +BKWD) DINFO.TOGGLE.HISTORY (HISTORY.MENU.WINDOW) XCL:OPEN-STREAM-P (ACCESSBITS) \FM.EDIT-SETUP ( +FM.REGION FM.USERDATA WIDTH FM.MESSAGE FM.INITSTATE FM.SYSSELECTEDFN) \COURIER.REP.BOUT (CRNEXTBYTE +CRLASTWORD) \CHECKFREEPAGE (CBLABELADDR DISKDAS CBPAGENO) \BSPWRITEBLOCK (BSPOUTPUTSTREAM) +\ALLOCBLOCK.OLD (PASSWORD TRAILER ARLEN FWD) \PARTEND.PRESS (IMAGEDATA PDSTREAM PRPARTSTART HIBYTE +LOBYTE ELSTREAM) XCL:ECHO-STREAM-INPUT-STREAM (F1) DINFO.TOGGLE.TEXT (MONITORLOCK CURRENTNODE) +NS.ECHOUSER (XIPCONTENTS NSOCEVENT XIPTYPE XIPLENGTH EPTRANSMITTING) TEXTOBJ (TEXTOBJ) \ALLOCBLOCK.NEW + (PAGE#) SWAPXIPADDRESSES (EPNETWORK XIPDESTSOCKET NDBNSNET#) XCL:ECHO-STREAM-OUTPUT-STREAM (F2) +TB.FIND.PREVIOUS.TAIL (TBTAILHINT TI# TBITEMS) \FM.NUMBER-SETUP (FM.REGION FM.USERDATA WIDTH +FM.MESSAGE FM.INITSTATE FM.SYSSELECTEDFN) \NSFILING.GET/SETINFO (NSFILING.CONNECTION NSFILING.HANDLE +RANDOMACCESSP FULLFILENAME) \ALLOCHUNK (DTDSIZE CELLINPAGE) XCL:TWO-WAY-STREAM-OUTPUT-STREAM (F2) +NSNETDAYTIME0 (XIPLENGTH TIMEOP TIMEVALUE) TOPW.REPAINTFN (LEFT RIGHT) NEARESTCORNER (LEFT RIGHT +BOTTOM TOP) \SFFixDestination (DDPILOTBBT DDDestination BITMAPRASTERWIDTH) \HANDLE.RAW.XIP (NSHNM2 +NSHNM1 NSHNM0 EPNETWORK NDBNSNET# NSNETHI NSNETLO NSNET LONUM HINUM ID# XIPDESTSOCKET XIPTYPE +XIPCONTENTS XIPCHECKSUM XIPCHECKSUMBASE XIPLENGTH INQUEUELENGTH NSOC#ALLOCATION INQUEUE NSOCEVENT) +TB.FLUSH.WINDOW (TBAFTERCLOSEFN) \LEAF.READFILEPROP (LEAFCONNECTION PUPCONTENTS LEAFHANDLE LEAFSTATUS) + BSPPUTMARK (BSPLOCK BSPSOC BSPOUTPUTSTREAM BSPCURRENTPUP BSPERRORHANDLER CPPTR COFFSET) +\MAIKO.ALLOCBLOCK (TRAILER) \BSP.HANDLE.DATA (PUPLENGTH PUPID RCVBYTEID SYSQUEUEHEAD BSPINPUTQ +SYSQUEUETAIL QLINK %#UNREADPUPS BSPINPUTEVENT BSPINACTIVITYTIMEOUT INACTIVITYTIMER) CHAT.TYPESCRIPT ( +TYPEOUTPROC) \NEWLENGTHIS (EPAGE EOFFSET) \DSPPOPSTATE.PSC (IMAGEDATA POSTSCRIPTXFORMSTACK PSXCLIP +PSXPAGE PSXBOTTOM PSXTOP PSXLEFT PSXRIGHT PSXLAND PSXXFORMPEND PSXTRANX PSXTRANY) TEDIT.GETSYNTAX ( +NSCHARHASH READSA TXTRTBL TEXTOBJ) PUTHASHTEXT (Stream) SEDIT::INSERT-LIST (SEDIT::SELECT-START +SEDIT::SELECT-END SEDIT::POINT-INDEX SEDIT::SUB-NODE-INDEX) XCL:TWO-WAY-STREAM-INPUT-STREAM (F1) +COMP.NUMBERTEST (OPNAME OPARG TAG) ENCAPSULATEDOBJ.DISPLAYFN (XSIZE YSIZE YDESC) COURIER.WRITE.NSNAME +(NSORGANIZATION NSDOMAIN NSOBJECT) \MAKEFREEARRAYBLOCK (TRAILER) CHCON (PNAMEBASE FATPNAMEP +PNAMELENGTH BASE FATSTRINGP OFFST LENGTH) \CLEARCB (SHORTCB) \DISPLAYSTREAMINCRXPOSITION (DDXPOSITION) + \MERGEFORWARD (ARLEN INUSE) XCL:CONCATENATED-STREAM-STREAMS (F1) \FTP.SENDVERSION (FTPIN FTPOUT) +\MEDW.REDISPLAYW (DSP) \LINKBLOCK (ARLEN BKWD) \SETETHERFLAGS (BVersion MAXETHERBYTES) UNPACK ( +PNAMEBASE FATPNAMEP PNAMELENGTH BASE OFFST FATSTRINGP LENGTH) WTODSY (BOTTOM DSP) SEDIT::INPUT-STRINGDELIM + (SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::ENVIRONMENT SEDIT::DEFAULT-FONT) \MERGEBACKWARD (INUSE +ARLEN) XCL:BROADCAST-STREAM-STREAMS (F1) \LEAF.GETFILEINFO.OPEN (EPAGE EOFFSET LFCREATIONDATE +LFWRITEDATE LFREADDATE) BSPGETMARK (PUPCONTENTS BSPCURRENTPUP BSPERRORHANDLER BSPSOC) \DELETEBLOCK? ( +ARLEN FWD BKWD) XCL:SYNONYM-STREAM-SYMBOL (F1) SEDIT::PUNT-SET-SELECTION (SEDIT::SUPER-NODE +SEDIT::LINEAR-FORM SEDIT::LINEAR-THREAD) PPBUFS (FILEPAGE# BUFFERNEXT) \VIRTUALDISKDA (DISK NTRACKS +TRACK NHEADS HEAD NSECTORS SECTOR) \SFFixClippingRegion (DDClippingRegion DDDestination LEFT WIDTH +DDXOFFSET BITMAPWIDTH BOTTOM HEIGHT DDYOFFSET BITMAPHEIGHT) \PREFIXALIGNMENT? (CELLINSEGMENT) +GET.OBJ.FROM.USER (SEL) \FM.EDIT-INSERT (LEFT WIDTH FM.BITMAP FM.LABEL) \DSPPUSHSTATE.PSC (IMAGEDATA +POSTSCRIPTXFORMSTACK POSTSCRIPTCLIPPINGREGION POSTSCRIPTPAGEREGION POSTSCRIPTLEFTMARGIN +POSTSCRIPTRIGHTMARGIN POSTSCRIPTTOPMARGIN POSTSCRIPTBOTTOMMARGIN POSTSCRIPTTRANSX POSTSCRIPTTRANSY +POSTSCRIPTLANDSCAPE POSTSCRIPTPENDINGXFORM) INTEGERLENGTH (HINUM LONUM) \BSP.HANDLE.ACK (PUPID +LASTACKID ACKREQUESTED ADATATIMEOUT LASTADATATIME BSPOUTPUTQ INTERRUPTOUT SYSQUEUEHEAD PUPSOC +ADATACOUNT QLINK PUPTYPE PUPLENGTH %#UNACKEDPUPS %#UNACKEDBYTES PUPALLOCCOUNT AUXWORD MAXPUPALLOC +PUPCONTENTS ACKBYTESPERPUP ACKPUPS ACKBYTES BSPINPUTEVENT BSPINACTIVITYTIMEOUT INACTIVITYTIMER) +BSPOUTPUTSTREAM (BSPOUTPUTSTREAM) \TEDIT.WORDBOUND.READTABLE (READSA) +\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (LINELENGTH F1 F2 OPENFILELST) \LOCATE.NSNET (RTNET# +RTHOPCOUNT) DCHCON (PNAMEBASE FATPNAMEP PNAMELENGTH BASE OFFST FATSTRINGP LENGTH) SEDIT::OUTPUT-CR ( +SEDIT::RELINEARIZATION-TIME-STAMP SEDIT::CURRENT-LINE SEDIT::CURRENT-NODE SEDIT::YCOORD SEDIT::LINE-HEIGHT + SEDIT::ACTUAL-WIDTH SEDIT::CURRENT-X SEDIT::LINEAR-POINTER SEDIT::LINEAR-PREV SEDIT::BELOW? +SEDIT::FIRST-BLOCK SEDIT::DISPLAY-WINDOW SEDIT::DEFAULT-LINE-SKIP SEDIT::ENVIRONMENT) +\NSFILING.GETEOFPTR (ACCESSBITS DEVICE) \MEDW.SHAPEW (RESHAPEFN WIDTH HEIGHT LEFT BOTTOM NEWREGIONFN) +\TEDIT.STRIKEOUT.CARET.ON (CARETLOOKS) \FLUSHNDBS (NDBNEXT NDBETHERFLUSHER NDBWATCHER NDBTQ NDBIQ) +SPY.MERGETREE (SUM COUNT STATUS TREEFROM) SEDIT::DELETE-QUOTE (SEDIT::SUB-NODE-INDEX SEDIT::SUB-NODES) + DASSEM.DWRITEFN (OP# COMMONLISP) CL:APROPOS-LIST (BASE OFFST LENGTH FATSTRINGP) EDITFROMFILE (EDITDEF + DESCRIPTION) \TEDIT.STRIKEOUT.CARET.OFF (CARETLOOKS) DUNPACK (PNAMEBASE FATPNAMEP PNAMELENGTH BASE +OFFST FATSTRINGP LENGTH) CL:APROPOS (BASE OFFST LENGTH FATSTRINGP) \CARET.FLASH? (RATE \WINDOW) +TEXTICON (LEFT BOTTOM) ALPHORDER (PNAMEBASE PNAMELENGTH FATPNAMEP BASE OFFST LENGTH FATSTRINGP TYP) +COURIER.OPEN (HIBYTE LOBYTE) \SFFixFont (DDPILOTBBT DDFONT BITMAPBITSPERPIXEL DDDestination ROTATION) +CHAT.SWITCH.EMACS (CHATINEMACS) BLOCK (PROCQUEUE PQNEXT NEXTPROCHANDLE PROCFX INVALIDP WAKEREASON +PQLOWER) \CREATESTARFONT (FONTCHARSETVECTOR) \SETBRUSH.IP (BRUSHCOLOR) BKLINBUF (READSA NSCHARHASH) +\ARRAYBLOCKMERGER (ARLEN) SEDIT::INPUT-QUOTE (SEDIT::OPEN-NODE-CHANGED? SEDIT::SELECTION SEDIT::SELECT-NODE + SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::SUPER-NODE SEDIT::POINT-INDEX SEDIT::POINT-STRING) +TEDIT.MOVE (SET \TEXTOBJ DCH TXTREADONLY TEXTLEN PCTB TXTHISTORY CHLIM CH# LINES POINT FORMATTEDP SEL) + COPYHASHFILE (ValueType ItemLength %#Entries ItemCopyFn) \NSFILING.RELEASE.BULKSTREAM ( +FSCOURIERSTREAMS) FREEATTACHEDWINDOW (BOTTOM HEIGHT) \LEAF.SETVALIDATION (LOCREATE LEAFINFO LOWRITE) +CHECK-SYMBOL-NAMESTRING (LENGTH) \TEDIT.UNDERLINE.CARET.ON (CARETLOOKS) TEXTSTREAMP (TEXTOBJ) +\BSP.GETNEXTBUFFER (BSPERRORHANDLER BSPSOC BSPOUTPUTSTREAM) \ACCHARWIDTHLIST (BBOX BBOY BBDX BBDY +FBBBDX) \INCPARENCOUNT (INSTRINGP LBRKCOUNT LPARCOUNT FW6 FW7) \SWAPDISKERROR (CURRENTDISKPAGE) PACKC +(XBASE) COURIER.WRITE.REP (CRNEXTBYTE CRWORDLIST) \LOOKUPFMAP (ISFONEPAGE ISFONEDA ISFLAST) +BSPFORCEOUTPUT (BSPLOCK BSPSOC BSPOUTPUTSTREAM BSPCURRENTPUP) TB.UPDATE.DISPLAY (TBWINDOW TBEXTENT +TB#ITEMS TBITEMHEIGHT HEIGHT PTOP TBORIGIN BOTTOM) INVERT.SEGMENT (END FIRSTCOL START ROW) +\DSPTRANSLATE.PSC (IMAGEDATA POSTSCRIPTTRANSX POSTSCRIPTTRANSY POSTSCRIPTCLIPPINGREGION +POSTSCRIPTPAGEREGION LEFT BOTTOM POSTSCRIPTX POSTSCRIPTY POSTSCRIPTLEFTMARGIN POSTSCRIPTRIGHTMARGIN +POSTSCRIPTBOTTOMMARGIN POSTSCRIPTTOPMARGIN) \GETFBB (BBOX BBOY BBDX BBDY) \COPYARRAYBLOCK (PASSWORD +INUSE ARLEN GCTYPE) \ACCHARIMAGELIST (RASTERWIDTHX) SPY.SUM (COUNT CALLEES SUM) DASSEM.DASSEM (COMTYPE + ARGS CODE CLEAR TOPFRAME OPARG OPNAME VARS VARINDEX OP# FREEVARINDEX NVALS NNILS) +OPENPOSTSCRIPTSTREAM (LEFT BOTTOM HEIGHT WIDTH POSTSCRIPTFONT EOLCONVENTION) \COPYSEL (Y0 X0 DX CH# +XLIM CHLIM DCH L1 LN YLIM POINT SET \TEXTOBJ SELKIND HOW HOWHEIGHT HASCARET SELOBJ ONFLG) PACK (XBASE) + COMP.GETBASEBITS (OPNAME OPARG) COPYALL (CUIMAGE CUMASK CUHOTSPOTX CUHOTSPOTY CUDATA) NEARTOP (TOP +WIDTH LEFT) \PACK.ITEM (BASE) SPY.MERGE (DELETED NAME DEPTH) WXOFFSET (LEFT) \SAVELINEBUF ( +LINEBUFSTATE GETFILEPTR DEVICE CHARSET BASE) \SFFIXLINELENGTH (IMAGEDATA DDRightMargin DDLeftMargin +FONTAVGCHARWIDTH DDFONT) \ADVANCE.ARRAY.SEGMENTS (PAGE# CELLINPAGE) SPY.NEXT.TREE (CALLEES NAME) TTY.PROCESS (PROCOLDTTYPROC PROCDELETED PROCTYPEAHEAD PROCTTYEXITFN INTERRUPTLIST PROCTTYENTRYFN) -\\TEXTMARK (STREAMHINT PIECE F5 CPAGE COFFSET PCSTARTPG FW6 PCSTARTCH FW7) TEDIT.SETFUNCTION (TXTRTBL -TEXTOBJ F3 READSA READMACRODEFS) SEDIT::COMPUTE-POINT-POSITION-LITATOM (SEDIT::POINT-NODE -SEDIT::POINT-STRING SEDIT::POINT-INDEX SEDIT::FONT SEDIT::LINEAR-FORM SEDIT::NODE-TYPE SEDIT::START-X -SEDIT::FIRST-LINE) SETLINELENGTH (LINELENGTH) FB.EDITLISPFILE (PROMPTWINDOW) TB.FIND.ITEM (TB#ITEMS) -\\ICONW.SHOW.TITLE (ICJUST ICFONT ICREGION ICIMAGE ICOPERATION ICBREAKCHARS BITMAPWIDTH BITMAPHEIGHT) -CONVERT-LITATOM (PNAMEBASE PNAMELENGTH FATPNAMEP LENGTH FILL-POINTER) CL:INTERN (BASE XBASE INDIRECT-P - OFFST OFFSET LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) IRM.RESET (WINDOW) \\SAVELINEBUF ( -LINEBUFSTATE F5 GETFILEPTR DEVICE CHARSET BASE XBASE INDIRECT-P) TEDIT.GET.PARALOOKS (SEL PPARALOOKS -PCTB) \\TEDIT.UNPARSE.PARALOOKS.LIST (QUAD 1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD -FMTBASETOBASE TABSPEC FMTSTYLE FMTCHARSTYLES FMTUSERINFO FMTSPECIALX FMTSPECIALY FMTPARATYPE -FMTPARASUBTYPE FMTNEWPAGEBEFORE FMTNEWPAGEAFTER FMTHEADINGKEEP FMTKEEP FMTHARDCOPY FMTREVISED -FMTCOLUMN) SEDIT::PARSE (SEDIT::CURRENT-NODE SEDIT::ENVIRONMENT SEDIT::\\X SEDIT::PARSE-INFO -SEDIT::PARSE-INFO-UNKNOWN) \\DOFORMATTING (QUAD SPACELEFT CHARS WIDTHS DESCENT ASCENT LINELEAD LHEIGHT - LEADBEFORE LSTLN LEADAFTER LEFTMARGIN RIGHTMARGIN LEN LXLIM CR\\END CHARLIM TEXTLEN BASE) -\\INITIALIZESWAPDISK (ISFDISK DSKDRIVE# ALTODSKOBJ) COMP.CPI (FRAMETYPE VARS CPIOK PARENT) -\\TEDIT.LINE.LIST (\\WINDOW LINES) OPT.RETTEST (PREV FRAME OPNAME TAG NXT OPARG) MAKEBITTABLE ( -NSCHARHASH) |\\VAMAllocPageGroup| (|nextFilePage| |filePage| |freePageCount| |volumePage| |type|) -\\COPYARRAYBLOCK (PASSWORD INUSE ARLEN GCTYPE) \\STREAMCHARWIDTH (IMAGEDATA DDWIDTHSCACHE CCECHO -NSCHARHASH TERMSA) SEDIT::EVAL-SELECTION (SEDIT::EVAL-IN-PROCESS SEDIT::DISPLAY-WINDOW) COPYALL ( -CUIMAGE CUMASK CUHOTSPOTX CUHOTSPOTY CUDATA) \\SETFATSYNCODE (NSCHARHASH) \\EXTENDISFMAP (ISFLAST -ISFEND) \\TEDIT.HARDCOPY.FORMATLINE (TEXTLEN BASE CHARS WIDTHS LOOKS STREAMHINT TXTTERMSA IMAGEDATA -CURRENTLOOKS F10 CLINVISIBLE PIECE F5 PLEN NEXTPIECE PLOOKS CLFONT CURRENTPARALOOKS TICURPARALOOKS -FMTSPEC FMTCHARSTYLES PREVPIECE PPARALAST PCSTARTCH FW7 COFFSET PCSTARTPG FW6 CPAGE FMTPARATYPE PAGE# -1STLEFTMAR LEFTMAR RIGHTMAR FONTCHARSETVECTOR YSIZE YDESC XSIZE TABSPEC PTNEWTX TXTNONSCHARS PTTYPE -PTTABX DEFAULTCHARLOOKS CHARLIM CHAR1) DESCRIBE-VIRTUAL-MEMORY (|XVmemFmapBase|) -\\ADVANCE.ARRAY.SEGMENTS (PAGE# CELLINPAGE WORDINPAGE) VMEMSIZE (|NActivePages|) TB.DISPLAY.LINES ( -TB#ITEMS TBWINDOW TBMAXXPOS TBPRINTFN TBEXTENT TBHEADINGWINDOW) DISPLAYSTREAMP (IMAGETYPE IMAGEOPS) -SEDIT::SET-PROPS (SEDIT::EVAL-IN-PROCESS) \\TEXTDSPXPOSITION (\\WINDOW) TEDIT.GETFUNCTION (TXTRTBL -TEXTOBJ F3 NSCHARHASH READSA READMACRODEFS MACROFN) SEDIT::CLOSE-NODE-LITATOM (SEDIT::ATOM-STARTED -SEDIT::UNDO-LIST SEDIT::ATOM-STARTED-UNDO-POINTER SEDIT::UNDO-UNDO-LIST CL:STRUCTURE SEDIT::LINEAR-FORM - STRING SEDIT::NODE-TYPE SEDIT::CARET-POINT SEDIT::SELECTION) SEDIT::FIND-NODE (SEDIT::INDENT) -FB.COUNTER.STRING (PAGECOUNT?) \\ECHOCHAR (ECHOFLG RAISEFLG) \\SEQUIN.HANDLE.INPUT (PUPTYPE SEQCONTROL - PUPBASE SEQBROKEN SENDSEQ MYRECEIVESEQ SEQIGNOREDUPLICATES ALLOCATE SEQINPUTQLENGTH SEQMAXALLOC -SEQOUTALLOC SEQEVENT RECEIVESEQ LASTACKEDSEQ SEQSTATE SEQINPUT SEQTIMEOUT SEQBASETIMEOUT SEQTIMEDIN) -\\BYTESETA (ORIG TYP LENGTH READONLY BASE OFFST) \\ARRAYBLOCKMERGER (ARLEN) \\DECPARENCOUNT (INSTRINGP - LBRKCOUNT FW7 LPARCOUNT FW6) FILEPOS (BASE TYP PNAMEBASE PNAMELENGTH XBASE INDIRECT-P OFFST OFFSET -LENGTH FILL-POINTER GETFILEPTR DEVICE) \\DSPYPOSITION.HCPYMODE (IMAGEDATA DDYPOSITION) \\WORDELT (ORIG - TYP LENGTH BASE OFFST) FFILEPOS (PAGEMAPPED DEVICE PNAMEBASE PNAMELENGTH BASE XBASE INDIRECT-P OFFST -OFFSET LENGTH FILL-POINTER GETFILEPTR TYP) CL::%RATIO-PRINT (COMMONNUMSYNTAX HASHMACROCHAR -CHARPOSITION) FB.PRINTFN (TIDATA DIRECTORYP FILENAME OFFST INDIRECT-P OFFSET BASE XBASE FATSTRINGP -TYPE-NUMBER LENGTH FILL-POINTER STARTOFPNAME INFOSTART FILEINFO INFODISPLAYED BROWSERFONT INFOFORMAT -INFOWIDTH) \\ARRAYTYPENAME (TYP) \\ETHEREVENTFN (DTDSIZE NDBNEXT DLTODVALID) CCODEP (CCODEP -PSEUDOCODEP DEFPOINTER) \\GETCHAR (KEYBOARDSTREAM F2 RAISEFLG) \\FIXP.FROM.FLOATP (HINUM LONUM SIGNBIT - LOFRACTION HIFRACTION EXPONENT) GRAPHDELETELINK (GRAPH.DELETELINKFN NODEID TONODES FROMNODES) -\\BLOCKDATAP (DTDHUNKP) OPENIPSTREAM (LEFT RIGHT WIDTH TOP BOTTOM HEIGHT IMAGEOPS IPPAGEFRAME) -\\MAYBEPRINTPACKET (EPTYPE NDBBROADCASTP EPNETWORK) \\FILLBUFFER.WORDSEPRP (TERMCLASS NSCHARHASH) -CL::%COMPLEX-PRINT (CHARPOSITION HASHMACROCHAR) \\CHDEL1 (NOTXCCS BACKCHARFN PEEKCCODEFN) -TEDIT.MAPPIECES (PCTB PLEN NEXTPIECE) CHARWIDTH (WIDTHS FONTCHARSETVECTOR IMCHARWIDTH IMAGEOPS) -\\NSFILING.MAYBE.CREATE (FSNAMESTRING NSHDATUM) \\TEXTMENU.DOC.CREATE (MBLABEL MBBUTTONEVENTFN MBFONT -TEXTOBJ F3 MBCHANGESTATEFN MBINITSTATE MBTEXT MBBUTTONS MBMAXITEMSPERLINE MBSTRING MBINITENTRY -EDITPROPS) \\DSPTRANSFORMREGION (LEFT DDXOFFSET BOTTOM DDYOFFSET WIDTH HEIGHT) PROMPTINWINDOW (XCOORD -YCOORD CUHOTSPOTX) \\PRINTFMAP (ISFLAST) \\TEDIT.READTABLE (READSA) SEDIT::BACKSPACE-UNKNOWN ( -SEDIT::CARET-POINT SEDIT::SELECTION) SEDIT::FIND-LINE-START (SEDIT::LINEAR-FORM SEDIT::ROOT -SEDIT::NEXT-LINE SEDIT::YCOORD) DRAWMARGINSCALE (WIDTH HEIGHT) DUMPGRAPH (SIDESFLG DIRECTEDFLG -GRAPH.MOVENODEFN GRAPH.ADDNODEFN GRAPH.DELETENODEFN GRAPH.ADDLINKFN GRAPH.DELETELINKFN -GRAPH.FONTCHANGEFN GRAPH.INVERTBORDERFN GRAPH.INVERTLABELFN GRAPH.CHANGELABELFN GRAPH.PROPS GRAPHNODES - NODEID NODELABELSHADE NODEFONT NODEBORDER NODELABEL NODEPOSITION TONODES FROMNODES) -\\OFFSETCLIPPINGREGION (|DDClippingRegion| LEFT DDXOFFSET BOTTOM DDYOFFSET WIDTH HEIGHT) DSPBACKUP ( -IMAGEDATA DDXPOSITION |DDLeftMargin| DDFONT |DDSlowPrintingCase| ROTATION DDYPOSITION) MARGINBAR ( -WIDTH) VIDEOCOLOR (DLDISPCONTROL) \\TEDIT.HARDCOPY.MODIFYLOOKS (CLULINE YBASE LTRUEDESCENT CLOLINE -LTRUEASCENT CLSTRIKE CLFONT) SEDIT::EDIT-SELECTION (SEDIT::SELECTION SEDIT::CARET-POINT -SEDIT::DISPLAY-WINDOW) \\POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS (FONTSIZE FONTFACE) INIT/NODES/FOR/LAYOUT - (NODEID NODELABEL NODEFONT) \\TEDIT.PRIMARYW (\\WINDOW) \\10MB.PRINT.ENCAPSULATION (10MBSOURCEHOST -10MBDESTHOST) \\DSPTOPMARGIN.PRESS (PRTOP IMAGEDATA) |\\VFMInsertPageGroup| (|fileID| |filePage| -|type| |key| |volumePage| |nextFilePage| |nextKey|) \\SEQUIN.RETRANSMIT (SEQRETRANSMITTING -SEQRETRANSMITQ SYSQUEUEHEAD SENDSEQ SYSQUEUETAIL PUPBASE MYSENDSEQ) UPDATEWFROMIMAGE (REG SAVE) -\\STARTDISPLAY (BITMAPBASE BITMAPRASTERWIDTH) SPP.CLOSE (SPPTERMINATEDP SPPSUBSTREAM ACCESSBITS) -BITMAPOBJ.SNAPW (WIDTH HEIGHT LEFT BOTTOM) SHOW.PRESS (IMAGEDATA GETFILEPTR DEVICE ELSTREAM -STARTCHARBYTE PRFONT DESCR PRCURRFDE FONT#) \\BYTELT (ORIG TYP LENGTH BASE OFFST) WFROMDS (\\WINDOW -IMAGEDATA XWINDOWHINT DSP) FB.CLOSEFN (FBLOCK) \\TEXTDSPYPOSITION (\\WINDOW) \\DSPFONT.IP (IMAGEDATA -IPFONT IPPAGEFONTS IPSPACEFACTOR IPWIDTHSCACHE OTHERDEVICEFONTPROPS IPVISTOP |\\SFAscent| IPVISBOTTOM -|\\SFDescent| IPXPOS IPVISLEFT IPYPOS IPMINVISIBLEBASELINE IPMAXVISIBLEBASELINE) GETWINDOWUSERPROP ( -USERDATA) \\SHOW.ARRAY.FREELISTS (ARLEN SAFITEMS SAFCELLS FWD) \\FILLBUFFER (LBRKCOUNT FW7 INSTRINGP -LPARCOUNT FW6 KEYBOARDSTREAM F2 READSA CONTROLFLG PEEKEDCHAR F3 PEEKEDECHOFLG RAISEFLG TERMCLASS -NSCHARHASH GETFILEPTR DEVICE NOTXCCS INCCODEFN STOPATOM WAKEUP) TB.REPLACE.ITEMS (TIDELETED TBWINDOW) -CONTINUEDIT (FILEPROP) SPP.SENDEOM (ACCESSBITS EOFP DEVICE SPPOUTPUTSTREAM SPPOUTPKT XIPCONTENTS) -TITLEDICONW (ICON TITLEREG MASK) LATTICE/BREAK/CYCLES (TONODES NODEID NODEPOSITION) HARDCOPYGRAPH ( -LEFT BOTTOM WIDTH HEIGHT YCOORD XCOORD GRAPHNODES) \\NSFILING.LOOKUP.CACHE (FSCACHEDHANDLES NSHFILEID -NSHDIRECTORYPATH NSHNAME) \\INTERPRETER1 (FNHEADER NEXTBLOCK OVERHEADWORDS FIRSTPVAR FXSIZE IVAR BLINK - FASTP SLOWP DUMMYBF \#BLINK NLOCALS) \\DSCCOUT (CCECHO NSCHARHASH CHARPOSITION) \\TITLEICONMINSIZE ( -SCTITLEDS SCREEN) DELETE/AND/DISPLAY/LINK (NODEID DIRECTEDFLG) SEDIT::DO-MUTATION (CL:STRUCTURE) -SEDIT::BACKSPACE-LITATOM (SEDIT::CARET-POINT SEDIT::SELECTION SEDIT::SUPER-NODE SEDIT::NODE-TYPE) -NEWPAGE?.IP (IPYPOS IPDATA IMAGEDATA IPBOTTOM) FB.COUNTERW.REDISPLAYFN (FBREADY) \\TEXTMENU.SET.TOGGLE - (POBJ PCE PCTB \\WINDOW) FB.COPYFN (FILENAME TIDATA) \\STACKARGPTR (EDFXP INVALIDP CLINK FASTP SLOWP -\#ALINK \#CLINK FRAMENAME NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER \#FRAMENAME ALINK USECNT) -\\TEDIT.FIXSELS (SEL SHIFTEDSEL MOVESEL DELETESEL SET) SEDIT::NEXT-NODE (SEDIT::SUB-NODES -SEDIT::SUB-NODE-INDEX SEDIT::SUPER-NODE) FIXVERBSETTYPE (TYPE MSVERB REP OTHERSET) PRINTNSHOSTNUMBER ( -NSHOST0 NSHOST1 NSHOST2) \\DSPSPACEFACTOR.PRESS (IMAGEDATA PRSPACEFACTOR PRWIDTHSCACHE) PROCESSWORLD ( -PROCFX PQLOWER PROCNAME PROCNEVERSTARTED RESTARTABLE PROCTTYEXITFN PROCDRIBBLEOUTPUT PROCHARDRESETINFO - PROCRESTARTFORM PROCFORM) PRINTERRORXIP (ERRORXIPCODE XIPCONTENTS ERRORXIPARG) -\\SEQUIN.FLUSH.CONNECTION (SEQPROCESS SEQEVENT SEQSOCKET SEQCLOSED) \\SMASHLINK (ALINK \#ALINK CLINK -FASTP SLOWP \#CLINK DUMMYBF USECNT BLINK \#BLINK IVAR NEXTBLOCK NOPUSH INCALL) -SEDIT::FINALIZE-MOUSE-SELECTION (SEDIT::SELECTION SEDIT::CARET-POINT) SEDIT::SCALE-INDENT ( -SEDIT::INDENT-BASE SEDIT::INDENT-STEP) \\FTP.NEXTFILE (FTPGENCONNECTION FTPNAMEFILTER FTPIN FTPBUSY -EOFP DEVICE FTPHOST FTPDEVICEWANTED) \\DSPXPOSITION.HCPYMODE (DDXPOSITION IMAGEDATA) \\ENTITYEND.PRESS - (IMAGEDATA ELSTREAM GETFILEPTR DEVICE DLSTARTBYTE FONTSET# PRCURRFDE PRPARTSTART HIBYTE LOBYTE PRLEFT - PRBOTTOM PRRIGHT PRTOP ELSTARTBYTE) \\PARSEARRAYSPACE1 (INUSE FWD ARLEN GCTYPE) OPT.RETPOP (OPNAME -PREV OPARG VARS) DBG::BACKTRACE-ITEM-SELECTED (BKMENUINFO MENUUSERDATA) \\RUN.PROCESS (PROCQUEUE -PROCEVENTORLOCK PROCSTATUS PROCDELETED PROCTIMERSET PQLAST PQNEXT NEXTPROCHANDLE) -|\\GetRootDirectoryType| (|volumeRootDirectory|) \\FM.MENUHANDLER (BOTTOM LEFT FM.USERDATA WIDTH -HEIGHT) DRIBBLE (FULLNAME FULLFILENAME) \\LONUM (HINUM LONUM) SEDIT::DELETE-SELECTION (SEDIT::SELECTION - SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::CARET-POINT SEDIT::SELECT-STRING) -\\DSPRIGHTMARGIN.HCPYMODE (DDMICARIGHTMARGIN IMAGEDATA) \\ENTITYSTART.PRESS (IMAGEDATA GETFILEPTR -DEVICE ELSTREAM PRXPOS PRYPOS) POSTSCRIPT.INIT (INTERPRESSFD PRESSFD DISPLAYFD OTHERFDS) -\\RELEASE.PROCESS (PROCEVENTORLOCK PROCFX PROCTIMERSET PROCOLDTTYPROC PROCNAME PROCWINDOW) EQFMTSPEC ( -QUAD FMTNEWPAGEBEFORE FMTNEWPAGEAFTER FMTSTYLE FMTSPECIALX FMTSPECIALY FMTHEADINGKEEP FMTKEEP -FMTPARATYPE FMTPARASUBTYPE FMTHARDCOPY FMTREVISED FMTCOLUMN 1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE -LEADAFTER LINELEAD FMTBASETOBASE FMTUSERINFO FMTCHARSTYLES TABSPEC) \\TEXTLEFTMARGIN (\\WINDOW LEFTMAR - FMTSPEC) SEDIT::LINEARIZE-ROOT (SEDIT::SUB-NODES) \\HINUM (HINUM LONUM) TEDIT.DELETELINE (PREVLINE -NEXTLINE) \\SETUP-COMPILED-CLOSURE-CALL (|MiscFXP| FNHEADER BLINK FASTP SLOWP DUMMYBF \#BLINK IVAR -\#ALINK \#CLINK NEXTBLOCK PADDING NA STKMIN SIZE FLAGS USECNT STARTPC FIRSTPVAR FXSIZE PV ENVIRONMENT) - CL:CLOSE (ACCESSBITS) PUTWINDOWPROP (PUTWINDOWPROPFN SCREEN) \\INTERPRETER-LAMBDA (IVAR BLINK FASTP -SLOWP DUMMYBF \#BLINK) \\DSPRIGHTMARGIN.PRESS (PRRIGHT IMAGEDATA) \\TEXTDSPFONT (CLFONT CARETLOOKS -\\WINDOW) \\MAIKO.CONS.UFN (DTDCNTLOC CNT PAGEBASE NEXTCELL NEXTFREE DBLWORD# CELLINPAGE WORDINPAGE) -SEDIT::BACKSPACE-GAP (SEDIT::SELECTION SEDIT::CARET-POINT) \\FTP.FILEINFOFN (FTPGENPLIST) TB.SET.FONT -(TBWINDOW TBFONT TBHEIGHTEXPLICIT TB#LINESPERITEM TBITEMHEIGHT PTOP BOTTOM HEIGHT TB#ITEMS -TBHEADINGWINDOW TBFONTCHANGEFN) SPP.CLEAREOM (SPPEOFBITS FW8) \\LINEBUF.READP (KEYBOARDSTREAM F2 -PEEKEDCHAR F3) SEDIT::GET-CONTEXT (SEDIT::ICON-TITLE SEDIT::EDIT-TYPE SEDIT::ROOT CL:STRUCTURE -SEDIT::SUB-NODES) RDTBL\\NONOTHERCODES (READSA) \\OPENW1 (OPENWFN SCREEN) CHARPOS (CHARPOSITION) -TEDIT.MAPLINES (NEXTLINE LINES WBOTTOM HEIGHT YBOT) \\MOVE.WINDOWS.ONTO.SCREEN (REG RIGHT LEFT WIDTH -TOP BOTTOM HEIGHT) SEDIT::KILL-NODE (SEDIT::SUB-NODES) \\NEXTCONSPAGE (DTDNEXTPAGE DTDTYPEENTRY) -\\CLOSEW1 (CLOSEWFN SCREEN) \\SETUP.DEFAULT.LINEBUF (ENDOFSTREAMOP) \\SPY.INTERRUPT (CLINK FASTP SLOWP - \#ALINK \#CLINK FRAMENAME NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER \#FRAMENAME INVALIDP) -\\DSPLINEFEED.PRESS (IMAGEDATA PRLINEFEED) |\\VFMGetPageGroup| (|fileID| |type| |key| |filePage| -|volumePage| |nextKey|) ARGLIST (CCODEP DEFPOINTER FNHEADER) \\CREATELINEBUFFER (DEVICE EOFP) -ADD.PROCESS (PROCPRIORITY) \\DSPSPACEFACTOR.HCPYMODE (IMAGEDATA DDMICAXPOS DDFONT) PROMPTFOREVALED ( -XCOORD YCOORD) SETXY.PRESS (IMAGEDATA ELSTREAM HIBYTE LOBYTE) GRAPHOBJ.PUTALIGN (GRAPHNODES NODEID) -FB.SET.DEFAULT.NAME.WIDTH (BROWSERFONT BROWSERWINDOW) CHANGEBACKGROUND (SCDESTINATION) HLSTORGB (HUE -LIGHTNESS SATURATION) \\SPP.PREPARE.INPUT (SPPINPKT COFFSET CBUFSIZE SPPEOFBITS FW8 SPPFILEPTRLO FW7 -SPPFILEPTRHI FW6 EOMP EOMBITS XIPCONTENTS SPPEOFP DSTYPE BULK.DATA.CONTINUATION F2 SPPCONTENTS -ATTENTION XIPLENGTH SPPINPUTDSTYPE SPPDSTYPECHANGEFN) \\START.PROCESSES (PQNEXT PROCFX INVALIDP -WAKEREASON PQLOWER) CL::%BIGNUM-LOGCOUNT (ELEMENTS) \\SETUP-ENVIRONMENT-CALL (|MiscFXP| NEXTBLOCK -BLINK FASTP SLOWP DUMMYBF \#BLINK IVAR CLINK \#ALINK \#CLINK NA STKMIN FLAGS SIZE STARTPC FIRSTPVAR -FXSIZE PV PADDING) MAKETITLEBARICON (SCREEN SCTITLEDS XCOORD YCOORD) FOREST/BREAK/CYCLES (TONODES -NODEPOSITION NODEID) \\IRM.GET.REF (TYPE PRIMARYFLG) \\TIMER.PROCESS (PROCTIMERLINK PROCWAKEUPTIMER) -\\NSFILING.ADD.TO.CACHE (FSCACHEDHANDLES NSHFILEID NSHBUSYCOUNT) OPT.JSIZE (OPNAME) TB.SCROLLFN ( -TBLOCK TBHEADINGWINDOW) OPENWINDOWS (SCTOPW NEXTW) \\TTW1 (NEXTW SCREEN REG SCREGION SCWIDTH SCHEIGHT -SCDESTINATION SAVE SCTOPW DSP) SEDIT::DELETE-WORD (SEDIT::OPEN-NODE-CHANGED? SEDIT::CARET-POINT -SEDIT::SELECTION SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::POINT-STRING) \\MOUSE.PROCESS (PROCNAME) -SEDIT::ATOM-POINT-TYPE (MULTESCAPECHAR OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER -FATSTRINGP TYPE-NUMBER) NEWPAGE.IP (IPDATA IMAGEDATA IPFONT IPPAGESTATE IPPREAMBLEFONTS +\LFINITCASEARRAY (BASE) \FM.EDIT-PREPARETOEDIT (FM.SELECTEDFN FM.USERDATA LEFT BOTTOM) BRECOMPILE ( +COMPFILEMAP COMPFILEXPRS) \PFTransferFilePage (fileID type subVolumes) \BYTELT (ORIG TYP LENGTH BASE +OFFST) COPYHASHITEM (Stream Start End) CONVERT-LITATOM (PNAMEBASE PNAMELENGTH FATPNAMEP LENGTH) +\BYTESETA (ORIG TYP LENGTH READONLY BASE OFFST) \BSP.HANDLE.INTERRUPT (RCVINTERRUPTID PUPID +BSPOTHERPUPFN BSPINPUTSTREAM PUPSOC) SEDIT::PLACE-CARET-AND-SELECTION (SEDIT::DISPLAY-WINDOW +SEDIT::DESTINATION SEDIT::LINEAR-FORM SEDIT::\X) FB.ANALYZE.PATTERN (PATTERN) WYOFFSET (BOTTOM) +\WORDELT (ORIG TYP LENGTH BASE OFFST) COMP.STFIX (OPNAME OPARG) \LITATOM.EATCHARS (PNAMEBASE +PNAMELENGTH FATPNAMEP) \MEDW.SHRINKW (SCREEN LEFT BOTTOM) \ARRAYTYPENAME (TYP) CL:INTERN (BASE OFFST +LENGTH FATSTRINGP) INTERPRESSBITMAP (WIDTH BITMAPWIDTH HEIGHT BITMAPHEIGHT) TTNTHLINE (NEXTLINE) +\FM.EDITSTART-SELECTEDFN (FM.SELECTEDFN) CCODEP (CCODEP PSEUDOCODEP DEFPOINTER) PAGEFULLFN ( +KEYBOARDSTREAM) WTODSX (LEFT DSP) SCALE/GRAPH (GRAPH.PROPS GRAPHNODES NODEWIDTH NODEHEIGHT XCOORD +NODEPOSITION YCOORD NODEFONT NODEBORDER) MAKEBITTABLE (NSCHARHASH) COMP.FMEMB (OPNAME OPARG) +EXCHANGEXIPS (PACKETEXCHANGEID) IRM.RESET (WINDOW) \BLOCKDATAP (DTDHUNKP) SETLINELENGTH (LINELENGTH) +COMP.EXPR (EXTCALL) SPY.MAKEGRAPHNODES (NAME CUMULATIVE SUM COUNT STATUS CALLEES) \NSFILING.HOSTNAMEP +(NSFSPARSEDNAME NSOBJECT) \DSKDISPLAY.RESHAPEFN (LEFT BOTTOM) \BSP.HANDLE.INTERRUPTREPLY (INTERRUPTOUT + PUPID XMITINTERRUPTID BSPINPUTEVENT) SEDIT::OUTLINE-SELECTION (SEDIT::SELECT-START-X SEDIT::SELECT-END-X + SEDIT::SELECT-START-LINE SEDIT::SELECT-END-LINE SEDIT::LINE-LENGTH SEDIT::NEXT-LINE SEDIT::INDENT +SEDIT::YCOORD SEDIT::LINE-HEIGHT) DISPLAYSTREAMP (IMAGETYPE IMAGEOPS) \LEAF.REPAIR.BROKEN.PUP ( +EPUSERFIELD LEAFCONNECTION LEAFOPCODE PUPCONTENTS LEAFHANDLE FULLFILENAME) TEDIT.FIND (TEXTLEN SET SEL + POINT CH# CHLIM) \CARET.SHOW (STREAM SCCARETFLASH SCREEN XWINDOWHINT IMAGEDATA) NEWPAGE?.IP (IPYPOS +IPDATA IPBOTTOM) \SETFATSYNCODE (NSCHARHASH) TB.ITEM.UPDATABLE? (TI# TBWINDOW TBUPDATEFROMHERE) +\FM.EDIT-ITEM (BOTTOM LEFT FM.USERDATA WIDTH HEIGHT) TB.PRINT.LINE (TBBASELINE TISELECTED TIDELETED) +\SPP.DUPLICATE.REQUEST (DEVICEINFO SOURCECONID SPP.CONNECTION SPPDESTID) WINDOWWORLDP (SCONOFF) +SEDIT::COPY-STRUCTURE-QUOTE (CL:STRUCTURE SEDIT::SUB-NODES) \SHOW.ARRAY.FREELISTS (ARLEN SAFITEMS +SAFCELLS FWD) FILEPOS (BASE TYP PNAMEBASE PNAMELENGTH OFFST LENGTH GETFILEPTR DEVICE) +\M44DOEXTENDVMEMFILE (ISFLAST ISFHINTLASTPAGE CURRENTNUMCHARS ISFREWRITE ISFDA0 ISFDA1 ISFDA2) +PRINTDISPLAYNODE (NODEHEIGHT) SHOW.PRESS (IMAGEDATA GETFILEPTR DEVICE ELSTREAM STARTCHARBYTE PRFONT +DESCR PRCURRFDE FONT#) \STREAMCHARWIDTH (IMAGEDATA DDWIDTHSCACHE CCECHO NSCHARHASH TERMSA) +NSNAME.TO.STRING (NSOBJECT NSDOMAIN NSORGANIZATION) \EXTENDISFMAP (ISFLAST ISFEND) \VFMCorrectBufferP +(VOLUME VOLPAGENUM) SEDIT::HELPMENU (SEDIT::HELP-MENU SEDIT::ENVIRONMENT SEDIT::DISPLAY-WINDOW) +SEDIT::MAKE-COMMENT-STRING (SEDIT::SUB-NODES) \TEDIT.SUPERSCRIPT.CARET (CARETLOOKS) +\FM.EDITSTART-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN) \FACECODE (EXPANSION +WEIGHT SLOPE) FFILEPOS (PAGEMAPPED DEVICE PNAMEBASE PNAMELENGTH BASE OFFST LENGTH GETFILEPTR TYP) +SEDIT::LESS-PROMPT-WINDOW (LEFT BOTTOM WIDTH HEIGHT) \PARSEARRAYSPACE1 (INUSE FWD ARLEN GCTYPE) +\TEDIT.COPYINSERTFN (SEL) COMP.NUMBERCALL (OPNAME OPARG PREV) TEDIT.SETFUNCTION (TXTRTBL TEXTOBJ +READSA READMACRODEFS) \TEDIT.UNPARSE.PARALOOKS.LIST (QUAD 1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE +LEADAFTER LINELEAD FMTBASETOBASE TABSPEC FMTSTYLE FMTCHARSTYLES FMTUSERINFO FMTSPECIALX FMTSPECIALY +FMTPARATYPE FMTPARASUBTYPE FMTNEWPAGEBEFORE FMTNEWPAGEAFTER FMTHEADINGKEEP FMTKEEP FMTHARDCOPY +FMTREVISED FMTCOLUMN) SEDIT::VERIFY-COMMENT (CL:STRUCTURE) PSCFONT.READFONT (DESCENT) +\BSP.HANDLE.ERROR (ERRORPUPCODE MAXPUPALLOC BSPOTHERPUPFN BSPINPUTSTREAM) DBG::NEAR-BY-REGION (WIDTH +HEIGHT LEFT BOTTOM) POSTINITARRAYS (SEGMENT# CELLINSEGMENT) \NSFILING.ERRORHANDLER (FULLFILENAME +ACCESS NSFILING.HANDLE DEVICE NSHFILEID SPP.CONNECTION F1 F2 F3 F4 F5 FW6 FW7 CBUFPTR CBUFSIZE COFFSET +) \ECHOCHAR (ECHOFLG RAISEFLG) \INITIALIZESWAPDISK (ISFDISK DSKDRIVE# ALTODSKOBJ) \DSPTOPMARGIN.PRESS +(PRTOP IMAGEDATA) TB.CLOSE/SHRINK (TBLOCK TBCLOSEFN) FB.CHECK.NAME.LENGTH (PRINTNAME BROWSERFONT +NAMEOVERHEAD INFOSTART OVERFLOWWIDTHS OVERFLOWSPACING) EXPANDING-PAGEFULLFN (HEIGHT BOTTOM) +\TEDIT.GET.TERMSA.WIDTHS (BASE OFFST) \DECPARENCOUNT (INSTRINGP LBRKCOUNT LPARCOUNT FW6 FW7) +SEDIT::INPUT-DOT (SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::POINT-TYPE SEDIT::POINT-INDEX +SEDIT::SUPER-NODE) SEDIT::COPY-STRUCTURE-LIST (SEDIT::SUB-NODES CL:STRUCTURE) ICONW.TITLE (ICTITLE) +TEDIT.MAPPIECES (PCTB PLEN NEXTPIECE) DINFO.TITLEMENUFN (MONITORLOCK MENUFN FMENU.WINDOW) +\INTERPRETER1 (FNHEADER NEXTBLOCK OVERHEADWORDS FIRSTPVAR IVAR BLINK NLOCALS) \NSFILING.RENAMEFILE ( +OPENFILE) \BSP.TIMERFN (RTPSTATE INACTIVITYTIMER ACKPENDING INTERRUPTOUT BSPOUTPUTQ PUPSOC +ACKREQUESTED LASTADATATIME ADATACOUNT XMITBYTEID) TEDIT.GETFUNCTION (TXTRTBL TEXTOBJ NSCHARHASH READSA + READMACRODEFS MACROFN) \TEDIT.UNDERLINE.CARET.OFF (CARETLOOKS) \SMASHLINK (ALINK CLINK USECNT BLINK +DUMMYBF IVAR NEXTBLOCK NOPUSH INCALL) TEDIT.SETSEL (SEL TEXTLEN CHLIM CH# POBJ PCTB) COMP.NUMERIC ( +OPARG OPNAME) \GETCHAR (KEYBOARDSTREAM RAISEFLG) \STACKARGPTR (EDFXP INVALIDP CLINK FRAMENAME ALINK +USECNT) SEDIT::LINEAR-ITEM-WIDTH (SEDIT::WIDTH) \FILLBUFFER (LBRKCOUNT INSTRINGP LPARCOUNT +KEYBOARDSTREAM READSA CONTROLFLG PEEKEDCHAR PEEKEDECHOFLG RAISEFLG TERMCLASS NSCHARHASH GETFILEPTR +DEVICE STOPATOM WAKEUP) \FILLRTPPUP (CONNID) \STARTDISPLAY (BITMAPBASE BITMAPRASTERWIDTH) SEDIT::EDIT-HELP + (SEDIT::OPEN-NODE-CHANGED? SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::DISPLAY-WINDOW) +\FILLBUFFER.WORDSEPRP (TERMCLASS NSCHARHASH) CL::%%RATIO-PRINT (COMMONNUMSYNTAX HASHMACROCHAR +CHARPOSITION) \MEDW.MOVEW (REG MOVEFN SCREEN SCREGION LEFT BOTTOM WIDTH HEIGHT XCOORD YCOORD +SCDESTINATION SAVE SCHEIGHT) \INTERPRETER-LAMBDA (IVAR BLINK) \DSPTRANSFORMREGION (LEFT DDXOFFSET +BOTTOM DDYOFFSET WIDTH HEIGHT) FB.HANDLE.ABORT.BUTTON (UPDATEPROC ABORTING) UPDATE/SCROLL/REG ( +SCROLLFN REG VERTSCROLLWINDOW HORIZSCROLLWINDOW LEFT BOTTOM HEIGHT WTITLE SCTITLEDS SCREEN WIDTH) +DESCRIBE-VIRTUAL-MEMORY (XVmemFmapBase) SEDIT::COMPUTE-POINT-POSITION-LIST (SEDIT::POINT-NODE +SEDIT::POINT-INDEX SEDIT::START-X SEDIT::WIDTH SEDIT::LINEAR-FORM SEDIT::FIRST-LINE SEDIT::SUB-NODES +SEDIT::NODE-TYPE SEDIT::NEXT-LINE SEDIT::LAST-LINE SEDIT::INDENT SEDIT::POINT-LINE SEDIT::LINEAR-THREAD + SEDIT::ACTUAL-LLENGTH) CHARWIDTH (WIDTHS FONTCHARSETVECTOR IMCHARWIDTH IMAGEOPS) VMEMSIZE ( +NActivePages) SPY.MAX (CALLEES COUNT SUM) \TEDIT.READTABLE (READSA) COMP.COMPARENUM (OPNAME OPARG) +DSPBACKUP (IMAGEDATA DDXPOSITION DDLeftMargin DDFONT DDSlowPrintingCase ROTATION DDYPOSITION) +TEDIT.GET.PARALOOKS (SEL PPARALOOKS PCTB) TB.SHOW.DELETION (TBLINETHICKNESS TBBASELINE TBITEMHEIGHT) +BRECOMPILE3 (COMPFILESTREAM COMPFILEMAP) CL::%%COMPLEX-PRINT (CHARPOSITION HASHMACROCHAR) +\OFFSETCLIPPINGREGION (DDClippingRegion LEFT DDXOFFSET BOTTOM DDYOFFSET WIDTH HEIGHT) +\FM.DISPLAY-SETUP (FM.MESSAGE) VIDEOCOLOR (DLDISPCONTROL) \3MBENCAPSULATE (NDBPUPHOST#) +\SETUP-COMPILED-CLOSURE-CALL (MiscFXP FNHEADER BLINK IVAR %#ALINK SLOWP %#CLINK NEXTBLOCK PADDING NA +STKMIN SIZE USECNT DUMMYBF STARTPC FIRSTPVAR PV ENVIRONMENT) \TEDIT.PRIMARYW (\WINDOW) +\PARSE.REMOTE.FILENAME (PFSOSTYPE) \PRINTFMAP (ISFLAST) \FILLINSPP (XIPCONTENTS) DISPLAYNODELINKS ( +GRAPHNODES) \LEAF.USE.NEW.CONNECTION (EPLINK LEAFOPCODE PUPCONTENTS EPUSERFIELD ACCESSBITS +FULLFILENAME LEAFHANDLE) SPY.MERGEINFO (MERGEINFO) WFROMDS (\WINDOW IMAGEDATA XWINDOWHINT DSP) +\MEDW.RELMOVEW (LEFT XCOORD BOTTOM YCOORD) \FIXP.FROM.FLOATP (HINUM LONUM SIGNBIT LOFRACTION +HIFRACTION EXPONENT) \CURSOR.DEFPRINT (CUIMAGE CUMASK CUHOTSPOTX CUHOTSPOTY CUDATA) +\DSPSPACEFACTOR.PRESS (IMAGEDATA PRSPACEFACTOR PRWIDTHSCACHE) \NSFILING.WHENCLOSED (FSCOURIERSTREAMS +FSDEVICENAME OPENFILELST) TB.FIND.SELECTED.ITEM (TB#ITEMS TISELECTED) MAKEFILES (TOBEDUMPED FILEPROP) +\ENTITYEND.PRESS (IMAGEDATA ELSTREAM GETFILEPTR DEVICE DLSTARTBYTE FONTSET# PRCURRFDE PRPARTSTART +HIBYTE LOBYTE PRLEFT PRBOTTOM PRRIGHT PRTOP ELSTARTBYTE) \DSCCOUT (CCECHO NSCHARHASH CHARPOSITION) +ARGLIST (CCODEP DEFPOINTER FNHEADER) \DSPFONT.IP (IMAGEDATA IPFONT IPPAGEFONTS IPSPACEFACTOR +IPWIDTHSCACHE OTHERDEVICEFONTPROPS IPVISTOP \SFAscent IPVISBOTTOM \SFDescent IPXPOS IPVISLEFT IPYPOS +IPMINVISIBLEBASELINE IPMAXVISIBLEBASELINE) FW-UPDATE-OFD-WINDOWS (OFDSTATUS) \PROMPTWINDOW.SET.HEIGHT +(TOP) FB.EDITLISPFILE (PROMPTWINDOW) COMP.SHIFT (OPNAME OPARG) ASKUSEREXPLAIN (EXPLAINSTRING) +\DSPLINEFEED.PRESS (IMAGEDATA PRLINEFEED) \TEDIT.SUBSCRIPT.CARET (CARETLOOKS) \FREESTACKBLOCK ( +EndOfStack StackBase FLAGS NEXTBLOCK SIZE) \MEDW.CLOSEW (DSP SCDESTINATION REG SAVE NEXTW) \STKNAME ( +FRAMENAME BLINK IVAR NARGS) GETWINDOWUSERPROP (USERDATA) FB.COPYFN (FILENAME TIDATA) \3MBSENDPACKET ( +3MBLENGTH PBIRAWSTART 3MBBASE EPTYPE) SEDIT::CFV-QUOTE (SEDIT::WIDTH SEDIT::UNASSIGNED SEDIT::SUB-NODES + SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH) \SETUP-ENVIRONMENT-CALL (MiscFXP NEXTBLOCK BLINK IVAR +CLINK NA STKMIN DUMMYBF SIZE STARTPC FIRSTPVAR PV PADDING) DISPLAY/NAME (NODELABEL) +TEDIT.INSERT.OBJECT (SEL POINT CH# CHLIM PCTB TXTREADONLY TEXTLEN TEXTOBJ \WINDOW PREVPIECE PPARALAST +NEXTPIECE PPARALOOKS FMTSPEC CARETLOOKS PLEN THISLINE) \LFExtendFile (VOLUME FILEDESC size) +DELETE.LONG.SEGMENT (ROWPOS COLPOS) \ENTITYSTART.PRESS (IMAGEDATA GETFILEPTR DEVICE ELSTREAM PRXPOS +PRYPOS) \3MB.BROADCASTP (3MBDESTHOST) TEDIT.MAPLINES (NEXTLINE LINES WBOTTOM HEIGHT YBOT) +\LEAF.READFILENAME (PFSOSTYPE) DINFO.GET.FILENAME (FILE DEFAULTHOST DEFAULTDEVICE DEFAULTDIR) +\START.PROCESSES (PQNEXT PROCFX INVALIDP WAKEREASON PQLOWER) \TEDIT.SELECT.ALL (TEXTLEN) +\NSFILING.GET.STREAM (FSCOURIERSTREAMS FSADDRESS FSPROCESSNAME) BSP.PUTINTERRUPT (BSPSOC BSPLOCK +INTERRUPTOUT XMITINTERRUPTID BSPOUTPUTQ PUPCONTENTS PUPSOC BSPINPUTEVENT) CHAT.EMACS.MOVE (EMCOL0 +YCOORD EMARG EMUP EMDOWN XCOORD EMFORWARD WINDOW XPOS FONTWIDTH OUTSTREAM YPOS FONTHEIGHT) DRIBBLE ( +FULLNAME) PROCESSWORLD (PROCFX PQLOWER PROCNAME PROCNEVERSTARTED RESTARTABLE PROCTTYEXITFN +PROCDRIBBLEOUTPUT PROCHARDRESETINFO PROCRESTARTFORM PROCFORM) \SETUP.DEFAULT.LINEBUF (ENDOFSTREAMOP) +\COERCEASCIITONSFONT (BASE FONTCHARSETVECTOR WIDTHS) ADD.PROCESS (PROCPRIORITY) \MEDW.OPENW (NEXTW +SCTOPW DSP IMAGEDATA DDPILOTBBT BITMAPRASTERWIDTH SCDESTINATION DDDestination REG SAVE) +CHANGEBACKGROUND (SCDESTINATION) \NSFILING.DELETEFILE (NSHBUSYCOUNT NSHDIRECTORYP NSHDATUM +FSCACHEDHANDLES) FB.CLOSEFN (FBLOCK) TRIM.BITMAP (BITMAPWIDTH BITMAPHEIGHT) \RUN.PROCESS (PROCQUEUE +PROCEVENTORLOCK PROCSTATUS PROCDELETED PROCTIMERSET PQLAST PQNEXT NEXTPROCHANDLE) SEDIT::CFV-LIST ( +SEDIT::UNASSIGNED SEDIT::NON-STANDARD? SEDIT::CFVLIST SEDIT::SPACE-WIDTH SEDIT::WIDTH SEDIT::LPAREN-STRING + SEDIT::SUB-NODES SEDIT::LIST-PFORMAT SEDIT::NODE-TYPE SEDIT::PREFERRED-WIDTH SEDIT::INLINE-WIDTH +SEDIT::MAX-WIDTH) \OPENW1 (OPENWFN SCREEN) NEWPAGE.IP (IPDATA IPFONT IPPAGESTATE IPPREAMBLEFONTS IPPREAMBLENEXTFRAMEVAR IPROTATION IPXOFFSET IPYOFFSET IPHEADING IPHEADINGFONT IPPAGENUM IPHEADINGOPVAR - IPLEFT IPTOP IPSPACEFACTOR) GRAPHOBJ.GETALIGN (NODEID GRAPHNODES) \\FM.RIGHTBUTTONFN (BOTTOM LEFT -FM.USERDATA WIDTH HEIGHT) \\FREESTACKBLOCK (|EndOfStack| |StackBase| FLAGS NEXTBLOCK SIZE) -TEDIT.DEACTIVATE.WINDOW (EDITOPACTIVE EDITFINISHEDFLG TXTREADONLY PROMPTWINDOW SEL \\WINDOW TXTFILE) -MAKEBRES (IPX IPY) LINEBUFFER-EOFP (EOFP DEVICE) DEFAULT.ADDNODEFN (GRAPHNODES) \\INITCONSPAGE (PAGE#) - ETHERHOSTNAME (PUPNET# PUPLENGTH PUPCONTENTS PUPTYPE OFFST INDIRECT-P OFFSET BASE XBASE LENGTH -FILL-POINTER FATSTRINGP TYPE-NUMBER) \\SPP.ESTABLISH (SPPSERVERFLAG SPPPROCESS SPPSOURCESKT# -SPPATTENTIONFN SPPWHENCLOSEDFN SPPERRORHANDLER SOURCECONID XIPCONTENTS SPPLOCK SPPSERVERFN -SPPINPUTEVENT) \\STOPDISPLAY (BITMAPBASE) \\STKNAME (FRAMENAME NAMETABLE VALIDNAMETABLE NAMETABLE# -FNHEADER \#FRAMENAME BLINK FASTP SLOWP DUMMYBF \#BLINK IVAR NARGS PADDING) \\TFBRAVO.PARSE.PARA ( -RUNLENGTH) CHECKCONSPAGES (DTDNEXTPAGE NEXTPAGE) PRINTXIPDATA (XIPCONTENTS XIPLENGTH) SEDIT::EXPANDREGIONFN - (SEDIT::ICON-TITLE SEDIT::EDIT-TYPE) \\LINEBUF.EOFP (EOFP DEVICE KEYBOARDSTREAM F2) -\\DSPLINEFEED.HCPYMODE (DDLINEFEED IMAGEDATA) \\CHECKCONSPAGE (CNT NEXTCELL CDRCODE) TB.REPAINTFN ( -TB#ITEMS TBLOCK) SEDIT::ASSIGN-FORMAT-LITATOM (CL:STRUCTURE SEDIT::ENVIRONMENT SEDIT::ATOM-CHARS -SEDIT::BROKEN-ATOM-FONT SEDIT::KEYWORD-FONT SEDIT::DEFAULT-FONT SEDIT::LINEAR-FORM) SEDIT::ADJUST-WIDTH - (SEDIT::LINEAR-FORM) \\FAX.PARSE.NAME (OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER -FATSTRINGP TYPE-NUMBER) \\GET.PRIORITY.QUEUE (PQPRIORITY PQLOWER) APPLY (CCODEP DEFPOINTER ARGTYPE) -\\INTERNALTOTOPW (SCREEN SCTOPW) \\SET.PROCESS.NAME (PROCNAME) APPLY* (CCODEP ARGTYPE DEFPOINTER) -IRM.DISPLAY.REF (NODE NODELST ITEM CH#) CL:ARRAY-TOTAL-SIZE (TOTAL-SIZE) \\DSPLEFTMARGIN.PRESS (PRLEFT - IMAGEDATA) |\\PFPatchRootDirEntries| (|countEntries|) \\CKAPPLYARGS (ALINK \#ALINK NEXTBLOCK) -CL:ARRAY-RANK (DIMS) SEDIT::INSERT-CHANGED (SEDIT::DEPTH) \\TEDIT.INSERTLINE (PREVLINE) OPT.FINDEND ( -NXT) \\SPP.RELEASE.ACKED.PACKETS (SPPRETRANSMITQ SPPACKEDSEQNO SPPSEQNO) FB.ICONFN (PATTERN) -TB.NUMBER.OF.ITEMS (TB#ITEMS TB#DELETED TBLASTSELECTEDITEM TBFIRSTSELECTEDITEM TISELECTED) -\\STRING-STREAM-OUTCHARFN (CHARPOSITION LINELENGTH F1) \\NSADDRESS.DEFPRINT (CHARPOSITION) -\\TEDIT.HARDCOPY.DISPLAYLINE (CHARS CACHE WIDTHS LOOKS TEXTLEN LEFTMARGIN LEN CHAR1 DESC WIDTH BASE -TLFIRSTSPACE TLSPACEFACTOR CLOFFSET YBASE CLFONT CLUSERINFO CLLEADER FMTREVISED LFMTSPEC) RELSTK ( -EDFXP) \\ADJUSTABLE-STRING-STREAM-OUTCHARFN (F1 CHARPOSITION LINELENGTH) DBG::ATTACH-BACKTRACE-MENU ( -WHENSELECTEDFN IMAGEWIDTH HEIGHT LEFT IMAGEHEIGHT) PUTTEXTPROP (TXTREADONLY TXTEDITING TXTNONSCHARS -EDITPROPS) \\DSPFONT.HCPYMODE (IMAGEDATA DDFONT IMFONTCREATE IMAGEOPS |\\SFHeight| DDMICAXPOS WIDTHS -FONTCHARSETVECTOR) SEDIT::DRAW-UNDERLINE (SEDIT::NEXT-LINE-Y SEDIT::YCOORD SEDIT::LINE-HEIGHT -SEDIT::LINE-SKIP SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::LINE-LENGTH SEDIT::NEXT-LINE SEDIT::INDENT -) \\TEXTMENU.TOGGLE.SHOWSELFN (XSIZE YSIZE SET) BSPPRINTPUP (PUPID PUPLENGTH PUPTYPE PUPCONTENTS) -\\BBTCURVEPT (BITMAPHEIGHT DDSOURCETYPE) SEDIT::REPAINT (SEDIT::DISPLAY-WINDOW SEDIT::WINDOW-BOTTOM + IPLEFT IPTOP IPSPACEFACTOR) \ICONW.SHOW.TITLE (ICJUST ICFONT ICREGION ICIMAGE ICOPERATION +ICBREAKCHARS BITMAPWIDTH BITMAPHEIGHT) \SPP.SYSPKT (SPPSYSPKT EPTRANSMITTING XIPCONTENTS SPPSEQNO) +\3MBGETPACKET (3MBBASE PBIRAWSTART PBILENGTH PBISOCKET 3MBTYPE) \MOVE.WINDOWS.ONTO.SCREEN (REG RIGHT +TOP WIDTH HEIGHT) COMP.RPLACD (OPARG OPNAME) \DSPRIGHTMARGIN.PRESS (PRRIGHT IMAGEDATA) +\RELEASE.PROCESS (PROCEVENTORLOCK PROCFX PROCTIMERSET PROCOLDTTYPROC PROCNAME PROCWINDOW) +\FTP.OPENFILE.FROM.PLIST (FTPIN FTPOUT) \CLOSEW1 (CLOSEWFN SCREEN) \ADDLEAFSTRING (PUPCONTENTS +LEAFLENGTH PNAMEBASE PNAMELENGTH BASE OFFST LENGTH) OPT.CALLP (OPNAME OPARG) \TEDIT.ITALIC.CARET.ON ( +CARETLOOKS) TB.FIRST.VISIBLE.ITEM# (TBORIGIN PTOP TBWINDOW TBITEMHEIGHT) CHAT.HOLD (HELD) +\LINEBUF.READP (KEYBOARDSTREAM PEEKEDCHAR) PUTWINDOWPROP (PUTWINDOWPROPFN SCREEN) OPENWINDOWS (SCTOPW +NEXTW) TB.REV.FIND.SELECTED.ITEM (TB#ITEMS TISELECTED) \LONUM (HINUM LONUM) SEDIT::INPUT-NORMAL-CHAR ( +SEDIT::DISPLAY-WINDOW SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::UNDO-LIST SEDIT::SELECT-NODE +SEDIT::SELECTION) SEDIT::UNDO-COMMENT-CHANGE (CL:STRUCTURE SEDIT::SUB-NODES SEDIT::ENVIRONMENT +SEDIT::COMMENT-FONT) DISPLAYGRAPH (XCOORD YCOORD GRAPHNODES NODEID) \HINUM (HINUM LONUM) \LINEBUF.EOFP + (EOFP DEVICE KEYBOARDSTREAM) BULKDATA.GENERATE.NEXT (BGSTREAM BGITEMSLEFT BGLASTSEGMENT? BGPROGRAM +BGTYPE) APPLY (CCODEP DEFPOINTER ARGTYPE) TTNEXTPOS (END NEXTLINE START) \CREATELINEBUFFER (DEVICE +EOFP) SEDIT::STRINGIFY-COMMENT (SEDIT::UNASSIGNED) APPLY* (CCODEP ARGTYPE DEFPOINTER) NSOCKETNUMBER ( +ID#) SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::OPEN-NODE-CHANGED? SEDIT::DISPLAY-WINDOW SEDIT::SELECTION + SEDIT::CARET-POINT SEDIT::SELECT-NODE SEDIT::SELECT-TYPE SEDIT::SELECT-START SEDIT::SELECT-END +SEDIT::SUB-NODES SEDIT::NODE-TYPE CL:STRUCTURE) INVERT.BITMAP.VERTICALLY (BITMAPWIDTH BITMAPHEIGHT) +\FIXPASSWORD (SEQNAME) COMP.DELFN (OPARG) \NEXTCONSPAGE (DTDNEXTPAGE DTDTYPEENTRY) \CKAPPLYARGS (ALINK + NEXTBLOCK) \INSPECT/CODE/REPAINTFN (XCOORD YCOORD) TB.LAST.VISIBLE.ITEM# (TB#ITEMS TBORIGIN BOTTOM +TBWINDOW TBITEMHEIGHT) SETXY.PRESS (IMAGEDATA ELSTREAM HIBYTE LOBYTE) LINEBUFFER-EOFP (EOFP DEVICE) +EQFMTSPEC (QUAD FMTNEWPAGEBEFORE FMTNEWPAGEAFTER FMTSTYLE FMTSPECIALX FMTSPECIALY FMTHEADINGKEEP +FMTKEEP FMTPARATYPE FMTPARASUBTYPE FMTHARDCOPY FMTREVISED FMTCOLUMN 1STLEFTMAR LEFTMAR RIGHTMAR +LEADBEFORE LEADAFTER LINELEAD FMTBASETOBASE FMTUSERINFO FMTCHARSTYLES TABSPEC) TB.FIND.ITEM (TB#ITEMS) + DRAWMARGINSCALE (WIDTH HEIGHT) FW-RECALL-CMD (OFDSTATUS FULLNAME) \MOUSE.PROCESS (PROCNAME) +SEDIT::START-PROCESS (SEDIT::ICON-TITLE SEDIT::COMPLETION-EVENT) ICMLARRAY.MENUW.APPLY (LEFT TOP) +PRINTLINE (YBOT YBASE LHEIGHT ASCENT DESCENT CHAR1 CHARLIM CHARTOP DIRTY CR\END DELETED LHASPROT +LHASTABS RIGHTMARGIN LXLIM SPACELEFT PREVLINE NEXTLINE TEXTLEN STREAMHINT) \SETSPACE.PRESS (IMAGEDATA +PRSPACEWIDTH ELSTREAM HIBYTE LOBYTE) \MAIKO.CONS.UFN (DTDCNTLOC CNT PAGEBASE NEXTCELL NEXTFREE +DBLWORD#) DINFO.OPENTEXTSTREAM (LAST.TEXT) \TEDIT.INSPECTCODE (FRAMENAME) CL:CLOSE (ACCESSBITS) +\DEQUEUE (SYSQUEUEHEAD QLINK) \MEDW.CREATEW (DSP IMAGEDATA WIDTH HEIGHT SCDESTINATION REG LEFT BOTTOM +WTITLE SCTITLEDS SCREEN) RELSTK (EDFXP) \PROMISCUOUS.ON (NETTYPE) \TIMER.PROCESS (PROCTIMERLINK +PROCWAKEUPTIMER) \IRM.GET.REF (TYPE PRIMARYFLG) SEDIT::BACKSPACE-LIST (SEDIT::CARET-POINT SEDIT::SUB-NODES + SEDIT::SELECTION SEDIT::BACK-SPACE SEDIT::NODE-TYPE) CHAT.MENU (INSTREAM LOCALECHO) GRAPHDELETELINK ( +GRAPH.DELETELINKFN NODEID TONODES FROMNODES) SPY.UPDATE.TITLE (GRAPHNODES NAME NODEID COUNT SUM) +DINFO.FMW.CLOSEFN (SUBNODE.MENU.WINDOW HISTORY.MENU.WINDOW GRAPH.WINDOW) \FM.NWAY-SELECTEDFN ( +FM.USERDATA) \CLOSELEAFCONNECTION (SEQNAME) COMP.LABELS (OPNAME OPARG) COURIER.WRITE.BULKDATA (HIBYTE +LOBYTE) \LFExtendFileIfNecessary (size FILEDESC FULLFILENAME) TTBEFOREPOS (ROWPOS COLPOS END ROW) +\PROMISCUOUS.OFF (NETTYPE NDBPUPHOST#) TWOD.TRACKCURSOR (ROWPROP COLUMNPROP ELTBOTTOM ELTLEFT ELTWIDTH +) \SETFVARSLOT (NAMETABLE NTSIZE OVERHEADWORDS FIRSTPVAR) NSOCKETFROMNUMBER (ID#) SEDIT::EXPAND ( +SEDIT::DISPLAY-WINDOW SEDIT::SELECTION SEDIT::CARET-POINT SEDIT::SELECT-NODE SEDIT::SELECT-TYPE +SEDIT::SELECT-START CL:STRUCTURE) \REQUEUE.ETHERPACKET (EPREQUEUE) PROG (OVERHEADWORDS) +\NSFILING.CHILDLESS-P (NSHDATUM) SEDIT::CREATE-COMMENT-WORD-NODE (SEDIT::COMMENT-FONT) +SEDIT::ASSIGN-FORMAT-QUOTE (SEDIT::SUB-NODES CL:STRUCTURE) \PROG0 (FNHEADER NEXTBLOCK FIRSTPVAR +OVERHEADWORDS) LINKPARAMETERS (NODEID) CL::%%BIGNUM-LOGCOUNT (ELEMENTS) SEDIT::SET-PROPS ( +SEDIT::EVAL-IN-PROCESS) \DSPLEFTMARGIN.PRESS (PRLEFT IMAGEDATA) \INITCONSPAGE (PAGE#) IRM.DISPLAY.REF +(NODE NODELST ITEM CH#) \INSPECT/CODE/RESHAPEFN (DDFONT IMAGEDATA) TEDIT.SHOWSEL (TEXTOBJ SEL) +\SET.PROCESS.NAME (PROCNAME) \NSFILING.EVENTFN (OPENFILELST DEVICE ACCESSBITS FULLFILENAME +NSRANDOMDEVICE DEVICEINFO) SPP.OPEN (SPPLOCK SPPMYNSOCKET SPPESTABLISHEDP SPPINPUTEVENT SPPDESTNSNET +SPPPROCESS SPPTERMINATEDP) CreateCursorBitMap (BITMAPBASE) DELETE/AND/DISPLAY/LINK (NODEID DIRECTEDFLG +) INVERT.BITMAP.HORIZONTALLY (BITMAPWIDTH BITMAPHEIGHT) CL:ARRAY-RANK (DIMS) \SMASHRETURN (INVALIDP +CLINK FNHEADER) \STOPDISPLAY (BITMAPBASE) DSPRUBOUTCHAR (IMAGEDATA) \FIXLINELENGTH.PRESS (IMAGEDATA +PRRIGHT PRLEFT FONTAVGCHARWIDTH PRFONT) \GET.PRIORITY.QUEUE (PQPRIORITY PQLOWER) GO (FRAMENAME +NAMETABLE IVAR BLINK INVALIDP CLINK) \LEAF.ERROR (PUPCONTENTS LEAFERRORCODE FULLFILENAME PUPLENGTH +LEAFERROROPCODE) \SPP.SENDPKT (SPPACKNO SPPACCEPTNO XIPCONTENTS SENDACK SEQNO SPPACKREQUESTED +SPPACKREQTIME SPPROUNDTRIPTIME SPPACKREQTIMEOUT SPPMYNSOCKET SPPRETRANSMITTING SPPRETRANSMITTIMER) +EVALA (OVERHEADWORDS) \TEXTMENU.SET.TOGGLE (POBJ PCE PCTB \WINDOW) \MAYBEPRINTPACKET (EPTYPE +NDBBROADCASTP EPNETWORK) CL:ARRAY-TOTAL-SIZE (TOTAL-SIZE) \EVALA (FNHEADER NEXTBLOCK FIRSTPVAR +OVERHEADWORDS) TB.DISPLAY.LINES (TB#ITEMS TBWINDOW TBMAXXPOS TBPRINTFN TBEXTENT TBHEADINGWINDOW) +CHECKCONSPAGES (DTDNEXTPAGE NEXTPAGE) INVERT.LONG.SEGMENT (COLPOS ROWPOS START NEXTLINE) \PEEKNS ( +NSHOSTNUMBER) \DSPYPOSITION.HCPYMODE (IMAGEDATA DDYPOSITION) \CHECKCONSPAGE (CNT NEXTCELL CDRCODE) +\TFBRAVO.WRITE.PARAGRAPH (FMTPARATYPE PARALOOKS) PUTTEXTPROP (TXTREADONLY TXTEDITING TXTNONSCHARS +EDITPROPS) FTP.BREAKCONNECTION (FTPHOST FTPBUSY FTPIN) CURSOR (CUHOTSPOTX BITMAPHEIGHT CUIMAGE +CUHOTSPOTY) TEDIT.DEACTIVATE.WINDOW (EDITOPACTIVE EDITFINISHEDFLG TXTREADONLY PROMPTWINDOW SEL \WINDOW + TXTFILE) \UPDATE-WHO-LINE-ACTIVE-FLAG (FORM VALUE-START VALUE-END) TB.SHOW.COPY.SELECTION (TBWINDOW) +\ETHEREVENTFN (DTDSIZE NDBNEXT DLTODVALID) SEDIT::ASSIGN-FORMAT-LIST (SEDIT::NON-STANDARD? +SEDIT::SET-FORMAT-LIST SEDIT::LIST-FORMATS SEDIT::SUB-NODES SEDIT::NODE-TYPE) TITLEDICONW (ICON +TITLEREG MASK) OPT.OPTCHECK (TAG OPARG PARENT OPNAME FRAME PREV NXT) +\ADJUSTABLE-STRING-STREAM-OUTCHARFN (F1 CHARPOSITION LINELENGTH) \LFRemoveDirEntry (DIRINFO EOFP +DEVICE) SEDIT::SIMPLE-STRING-SCAN (STRING SEDIT::FONT) \KEYHANDLER1 (TELERAIDFXP WRITE READ) +\PRINSTACKP (CHARPOSITION HASHMACROCHAR) \UNWIND.PROCESS (PROCFINISHED) DINFO.CREATE.FMENU ( +FREEMENUITEMS MENUFONT) \FM.NWAY-MOVEDFN (FM.USERDATA LEFT BOTTOM) SEDIT::FIND-NODE (SEDIT::INDENT) +\PRINSTRING (ESCAPECHAR OFFST BASE LENGTH FATSTRINGP CHARPOSITION) DEL.PROCESS (PROCDELETED +PROCBEINGDELETED) \STRING-STREAM-OUTCHARFN (CHARPOSITION LINELENGTH F1) \CKPOSBOUT (CHARPOSITION) +\TEDIT.UCASE.SEL (CH# DCH POINT TXTHISTORY) LET (OVERHEADWORDS) FB.HARDCOPY.DIRECTORY (PATTERN +COUNTERWINDOW PAGECOUNT? TOTALFILES TOTALPAGES DIRECTORYP TIDATA PRINTNAME INFODISPLAYED INFOPROTOTYPE + INFOFORMAT INFOLABEL FILEINFO) %%BROADCAST-STREAM-DEVICE-BOUT (F1) \CKPOSSOUT (CHARPOSITION OFFST +BASE LENGTH FATSTRINGP) \LET0 (FNHEADER NEXTBLOCK FIRSTPVAR OVERHEADWORDS) \SPY.INTERRUPT (CLINK +FRAMENAME INVALIDP) WRITEIMAGEOBJ (GETFN IMAGEOBJFNS PUTFN) LET* (OVERHEADWORDS) TTRACKMOUSE (FIRSTCOL + START END CPXWIDTH) %%BROADCAST-STREAM-DEVICE-OUTCHARFN (F1 CHARPOSITION) \LITPRIN (PACKAGE +HASHMACROCHAR PACKAGECHAR CHARPOSITION CASEINSENSITIVE PNAMEBASE PNAMELENGTH FATPNAMEP) MAP.PROCESSES +(PROCNAME PROCFORM) \LET* (FNHEADER NEXTBLOCK FIRSTPVAR OVERHEADWORDS) TEDIT.CARETLOOKS (CARETLOOKS) +DEFINEDP (DEFPOINTER) \DSKDISPLAY.REPAINTFN (LVlabel volumeSize freePageCount) \FM.NWAY-DOWNFN ( +FM.USERDATA LEFT BOTTOM) \ELIDE.ELEMENT.CHAR (COMMONLISP HASHMACROCHAR) SEDIT::FIND-LINE-START ( +SEDIT::LINEAR-FORM SEDIT::ROOT SEDIT::NEXT-LINE SEDIT::YCOORD) GETSTREAMPROP (ENDOFSTREAMOP OTHERPROPS +) %%CONCATENATED-STREAM-DEVICE-BIN (F1) \NSRANDOM.RELEASE.HANDLE (NSFILING.HANDLE NSFILING.CONNECTION +NSHBUSYCOUNT NSHACCESS) COMP.RETURN-FROM (FRAMETYPE PROGLABELS BLOCKTAG PARENT BLOCKCONTEXT BLOCKEND) +\LFReturnNextFile (RESTOFFILES FULLNAME CURRENTFILE) PUTSTREAMPROP (ENDOFSTREAMOP OTHERPROPS) MAKEFILE + (TOBEDUMPED FILEDATES LOADTYPE FILEDATE DATEFILENAME FILECHANGES COMSNAME) CHECKFORCHANGED (KNOWN) +TB.REPLACE.ITEMS (TIDELETED TBWINDOW) \ELIDE.TAIL.STRING (COMMONLISP) \DSPCLIPPINGREGION.PRESS ( +IMAGEDATA PRClippingRegion) RESTART.PROCESS (PROCDELETED) %%BROADCAST-STREAM-DEVICE-FORCEOUTPUT (F1) +HASHBEFORECLOSE (HASHFILE) SEDIT::DO-MUTATION (CL:STRUCTURE) SEDIT::EVAL-SELECTION (SEDIT::EVAL-IN-PROCESS + SEDIT::DISPLAY-WINDOW) \LFReturnInfo (INFO CURRENTFILE ATTRIBUTES) \EXTERNALFORMAT (NAME +EXTERNALFORMAT) \DSPXPOSITION.IP (IPXPOS IPDATA IPYPOS) %%CONCATENATED-STREAM-DEVICE-PEEKBIN (F1) +MSSOLVE (REP ID SET2 SET1 DET OSET INVERTED) %%BROADCAST-STREAM-DEVICE-CHARSETFN (F1) +SEDIT::SET-SELECTION-COMMENT-WORD (SEDIT::SUPER-NODE SEDIT::SUB-NODE-INDEX SEDIT::LINEAR-FORM) +WAKE.PROCESS (PROCDELETED PROCSTATUS) %%CONCATENATED-STREAM-DEVICE-BACKFILEPTR (F1) \VFMSplit1 (key +used data) SEDIT::DELETE-WORD (SEDIT::OPEN-NODE-CHANGED? SEDIT::CARET-POINT SEDIT::SELECTION +SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::POINT-STRING) SCALEREGION (LEFT BOTTOM WIDTH HEIGHT) +\SUSPEND.PROCESS (PROCSTATUS PROCQUEUE PQLAST NEXTPROCHANDLE PROCTIMERSET PROCEVENTORLOCK) +%%CONCATENATED-STREAM-DEVICE-CLOSEFILE (F1) SEDIT::FINALIZE-MOUSE-SELECTION (SEDIT::SELECTION +SEDIT::CARET-POINT) FIND-EXTERNAL-SYMBOL (BASE OFFST LENGTH FATSTRINGP) SPP.DSTYPE (SPPOUTPKT +ACCESSBITS SPPDSTYPE SPPINPUTDSTYPE DSTYPE SPPINPKT SPPERRORHANDLER) SUSPEND.PROCESS (PROCDELETED) +%%CONCATENATED-STREAM-DEVICE-EOFP (F1) PROMPTINWINDOW (XCOORD YCOORD CUHOTSPOTX) COMP.RETURN ( +FRAMETYPE PARENT) CL:FLOAT-SIGN (SIGNBIT) PLCHAIN (NEXTLINE) PROCESS.RESULT (PROCRESULT +PROCFINISHEVENT PROCNAME) \POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS (FONTSIZE FONTFACE) +\TEDIT.PUT.CHARLOOKS (CLFONT PNEW PFATP) SEDIT::SIMPLE-STRING-OFFSET (STRING SEDIT::FONT) +\LITPRIN.INTERNAL (ESCAPECHAR MULTESCAPECHAR CHARPOSITION PNAMEBASE PNAMELENGTH FATPNAMEP +CASEINSENSITIVE BASE READSA ESCQUOTE NSCHARHASH INNERESCQUOTE) \SEND.ANSWERING.RFC (RTPSTATE PUPID +PUPCONTENTS PUPSOC) GETTEXTPROP (TXTREADONLY TXTEDITING TXTNONSCHARS EDITPROPS) TEDIT.KILL (TEXTOBJ +\WINDOW) SEDIT::SCALE-INDENT (SEDIT::INDENT-BASE SEDIT::INDENT-STEP) \DSPXPOSITION.HCPYMODE ( +DDXPOSITION IMAGEDATA) \LEAF.GETFILEDATES (LEAFINFO) \GETFILINGCONNECTION (DEVICEINFO NSFILINGLOCK +NSCONNECTIONS FSSESSIONLOCK) \SPPWATCHER (SPPACTIVITYTIMER SPPLOCK SPPMYNSOCKET SPPTERMINATEDP +SPPESTABLISHEDP SPPDESTINATIONKNOWN SPPRETRANSMITTIMER SPPRETRANSMITTING SPPACKPENDING SPPACKREQTIME +SPPACKREQUESTED SPPACKREQTIMEOUT SPPSEQNO SPPACKEDSEQNO SPPOUTPUTALLOCNO) ENVAPPLY (CCODEP DEFPOINTER +ARGTYPE) FB.ICONFN (PATTERN) DSPEOLFN (IMAGEDATA DDEOLFN) \FTP.NEXTFILE (FTPGENCONNECTION +FTPNAMEFILTER FTPIN FTPBUSY EOFP DEVICE FTPHOST FTPDEVICEWANTED) PROCESS-STATUS (FRAMENAME CLINK) +ROTATE.BITMAP.RIGHT (BITMAPWIDTH BITMAPHEIGHT) \DSPCOLOR.IP (IPDATA IPCOLOR) +%%SYNONYM-STREAM-DEVICE-CLOSEFILE (OPENFILELST) TB.SCROLLFN (TBLOCK TBHEADINGWINDOW) \FTP.FILEINFOFN ( +FTPGENPLIST) CHAT.DID.RESHAPE (INSTREAM DSP) TB.RECONSIDERRANGE (TISELECTED) TERM.RESET.DISPLAY.PARMS +(WINDOW DSP CLEARMODEFN TERM.STATE) \FUNCT1 (FNHEADER NEXTBLOCK FIRSTPVAR OVERHEADWORDS) COMP.GO ( +FRAMETYPE PROGLABELS) \LFFindNextFile (GETFILEPTR DEVICE) PROCESS.FINISHEDP (PROCFINISHED) \MAKESTACKP + (EDFXP) \PFTrimHelper (size filePage) \TRACKCURSOR (NEWMOUSESTATE) %%SYNONYM-STREAM-DEVICE-EOFP (EOFP + DEVICE) \SPP.STREAM.LOST (SPPERRORHANDLER) MENU.HANDLER (MENUGRID WHENHELDFN MENUROWS MENUCOLUMNS REG + WHENUNHELDFN CHANGEOFFSETFLG MENUOFFSET) %%SYNONYM-STREAM-DEVICE-OUTCHARFN (CHARPOSITION) +SEDIT::DELETE-SELECTION (SEDIT::SELECTION SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END +SEDIT::CARET-POINT SEDIT::SELECT-STRING) \SYMBOL.ESCAPE.COUNT (MULTESCAPECHAR ESCAPECHAR +CASEINSENSITIVE BASE READSA PNAMEBASE PNAMELENGTH FATPNAMEP ESCQUOTE NSCHARHASH INNERESCQUOTE +COMMONLISP) NCHARS (PNAMELENGTH LENGTH ESCAPECHAR OFFST BASE FATSTRINGP) \MAKEFUNARGFRAME ( +OVERHEADWORDS EDFXP) FB.GET.NEWPATTERN (PATTERN) NOTIFY.EVENT (EVENTQUEUETAIL PROCEVENTLINK) +CL:GET-OUTPUT-STREAM-STRING (F1) \OUTCHAR (OUTCHARFN) INVERT.BITMAP.DIAGONALLY (BITMAPWIDTH +BITMAPHEIGHT) \DOBUFFEREDTRANSITIONS (READ W0 W1 W2 W3 W4 W5 WU WRITE 1SHIFT 2SHIFT LOCK CTRL META +FONT USERMODE1 USERMODE2 USERMODE3 ALTGRAPH DEADKEYPENDING) \NUMERIC.PNAMEP (COMMONLISP BASE OFFST +LENGTH FATSTRINGP PNAMEBASE PNAMELENGTH FATPNAMEP) PROCESS.TTY (PROCDELETED) SEDIT::GET-CONTEXT ( +SEDIT::ICON-TITLE SEDIT::EDIT-TYPE SEDIT::ROOT CL:STRUCTURE SEDIT::SUB-NODES) STKAPPLY (CCODEP +DEFPOINTER ARGTYPE) MSSHOWUSE (KNOWN TYPE) FB.SET.DEFAULT.NAME.WIDTH (BROWSERFONT BROWSERWINDOW) +\TEXTMENU.TOGGLE.SHOWSELFN (XSIZE YSIZE SET) \SOUT (IMAGETYPE IMAGEOPS OFFST BASE LENGTH FATSTRINGP) +SI::UNWIND (CLINK INVALIDP USECNT FNHEADER FRAMENAME IVAR) FRESHLINE (CHARPOSITION ACCESSBITS EOFP +DEVICE) RETEVAL (INVALIDP CLINK) TEDIT.COPY (SET \TEXTOBJ DCH TXTREADONLY TEXTLEN POINT CH# CHLIM +FORMATTEDP POBJ TXTHISTORY) BRACKET.CURRENT.WORD (END START NSCHARHASH STOPATOM CPXREALCHAR) +PRINTERRORXIP (ERRORXIPCODE ERRORXIPARG) \FM.NWAY-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN +FM.SYSSELECTEDFN FM.USERDATA) TEDIT.CHARWIDTH (CCECHO NSCHARHASH) RETAPPLY (INVALIDP CLINK CCODEP +DEFPOINTER ARGTYPE) \INSERTCR (TXTREADONLY FORMATTEDP \INSERTPC) \DSPSPACEFACTOR.HCPYMODE (IMAGEDATA +DDMICAXPOS DDFONT) PNAMESTREAMP (DEVICE) \CURVE (DDXOFFSET DDYOFFSET) TTRUBOUT (START) TB.SET.FONT ( +TBWINDOW TBFONT TBHEIGHTEXPLICIT TB#LINESPERITEM TBITEMHEIGHT PTOP TB#ITEMS TBHEADINGWINDOW +TBFONTCHANGEFN) \LEAF.ACKED (SEQDONEQ SEQINPUTQLENGTH) \DEFPRINT.BY.NAME (CHARPOSITION HASHMACROCHAR) +\STREAM.DEFPRINT (ACCESSBITS NAMEDP FULLFILENAME DEVICENAME DEVICE) COPYVM (Key) +%%TWO-WAY-STREAM-DEVICE-BIN (F1) BLIPVAL (NEXTBLOCK FIRSTTEMP INVALIDP CLINK) \DSPBOTTOMMARGIN.PRESS ( +PRBOTTOM IMAGEDATA) GIVE.TTY.PROCESS (RIGHTBUTTONFN BUTTONEVENTFN) %%TWO-WAY-STREAM-DEVICE-OUTCHARFN ( +F2 CHARPOSITION) \FM.NWAY-MESSAGE (FM.USERDATA) SETBLIPVAL (NEXTBLOCK FIRSTTEMP INVALIDP CLINK) +\NSFILING.LOGIN (NSFILESERVER NSFILINGNAME NSFSPARSEDNAME NSFSADDRESSES DEVICENAME NSCONNECTIONS +NSRANDOMDEVICE FSNAMESTRING) SPP.SENDEOM (ACCESSBITS EOFP DEVICE SPPOUTPUTSTREAM SPPOUTPKT) +\FDEV.DEFPRINT (DEVICENAME) %%TWO-WAY-STREAM-DEVICE-BOUT (F2) NEWLINE.IP (IPDATA IPYPOS IPLINEFEED +IPBOTTOM IPLEFT) \GETACCESS (ACCESSBITS) %%TWO-WAY-STREAM-DEVICE-READP (F1) VERBNOTICELIST (VB1 VB2 +ROOT MODIFIER) \TEDIT.PEEKBIN.NEW.PAGE (REALFILE ACCESSBITS FULLNAME CBUFSIZE EOFP DEVICE FATSTREAMP +CPPTR COFFSET CPAGE CHARSLEFT) %%TWO-WAY-STREAM-DEVICE-OUTPUTSTREAM (F2) \DSPFONT.PRESS (IMAGEDATA +PRFONT FONTCHARSETVECTOR FONTSET# PRCURRFDE ELSTREAM FONT# WIDTHS PRSPACEFACTOR PRWIDTHSCACHE) +\RTP.ERROR (RTPSTATE) \FTP.CLOSEFILE (ACCESS FTPIN FTPOUT FULLFILENAME EOFP DEVICE FTPHOST) +%%TWO-WAY-STREAM-DEVICE-BACKFILEPTR (F1) %%CONCATENATED-STREAM-DEVICE-CHARSETFN (F1) INSPECT (DTDHUNKP + DTDGCTYPE DTDSIZE) \CARET.DOWN (NEXT STREAM DSP) \REALFRAMEP (FRAMENAME FNHEADER) \VAROFFSET ( +OVERHEADWORDS NAMETABLE NTSIZE IVAR BLINK BOUND FIRSTPVAR) PRINTNUM-TO-STRING (WIDTH RADIX LEFTFLUSH +PAD0) \SPP.PREPARE.INPUT (SPPINPKT COFFSET CBUFSIZE SPPEOFBITS SPPFILEPTRLO SPPFILEPTRHI FW6 EOMP +SPPEOFP DSTYPE BULK.DATA.CONTINUATION SPPCONTENTS ATTENTION XIPLENGTH SPPINPUTDSTYPE SPPDSTYPECHANGEFN +) INPUT (FULLNAME) %%TWO-WAY-STREAM-DEVICE-EOFP (EOFP DEVICE F1) \IPCURVE2 (SPLINEX SPLINEY SPLINEDX +SPLINEDY SPLINEDDX SPLINEDDY SPLINEDDDX SPLINEDDDY %#KNOTS IMAGEDATA IPVISLEFT IPVISRIGHT IPVISBOTTOM +IPVISTOP) OPT.DS1 (OPNAME OPARG VARS PREV FRAMETYPE PARENT TAG NXT) \STKARG (NARGS BLINK IVAR NTSIZE +OVERHEADWORDS FIRSTPVAR FNHEADER NLOCALS BOUND) WINDOW.BITMAP (WIDTH HEIGHT) SEDIT::SET-POINT-COMMENT +(CL:STRUCTURE SEDIT::LINEAR-FORM SEDIT::DESTINATION SEDIT::SUB-NODE-INDEX) +%%TWO-WAY-STREAM-DEVICE-INPUTSTREAM (F1) \LFSortFiles (NAME VERSION) \SETACCESS (DEVICE FDBINABLE BIN +FDBOUTABLE FDEXTENDABLE BOUT) MODERNWINDOW.BUTTONEVENTFN (LEFT RIGHT TOP BOTTOM) ROTATE.BITMAP.LEFT ( +BITMAPWIDTH BITMAPHEIGHT) \NSFILING.UPDATE.ATTRIBUTES (NSHATTRIBUTES) TB.CONTIGUOUS.SELP (TISELECTED +TIDELETED TIUNSELECTABLE) \DSPLINEFEED.HCPYMODE (DDLINEFEED IMAGEDATA) \FTP.GENERATEFILES (FTPIN +FTPOUT GENFILESTATE FTPGENCONNECTION) POSTSCRIPT.INIT (INTERPRESSFD PRESSFD DISPLAYFD OTHERFDS) +\STREAM.NOT.OPEN (FULLNAME) \SPP.CREATE.STREAMS (DEVICEINFO) ALLOW.BUTTON.EVENTS (PROCNAME) +\LEAF.FIX.BROKEN.SEQUIN (SEQSTATE SEQRETRANSMITQ SEQDONEQ SEQNAME SYSQUEUEHEAD SYSQUEUETAIL EPLINK +LEAFOPCODE PUPCONTENTS SEQSOCKET OPENP LEAFCONNECTION LEAFABORTSTATUS SEQTIMER LEAFABORTBUTTONWINDOW +SEQEVENT EPUSERFIELD FULLFILENAME) BLIPSCAN (INVALIDP CLINK) TEDIT.INSERT.UPDATESCREEN (THISLINE +\WINDOW CH# TXTDON'TUPDATE LN L1 SELWINDOW POINT YBOT BOTTOM WBOTTOM Y0 WTOP LHEIGHT) PROCESS.WINDOW ( +PROCDELETED PROCWINDOW) %%TWO-WAY-STREAM-DEVICE-PEEKBIN (F1) MSGETDEF (GETDEF-FN FILEPKGNAME) +COMP.PROG (VARS DECLS) \EVALFORM (CCODEP ARGTYPE DEFPOINTER) \INSTALL.EXTERNALFORMAT (NAME) +\NSFILING.CLOSEFILE (DEVICE NSFILING.CONNECTION NSFILING.HANDLE ACCESSBITS FULLFILENAME +NSFILING.NEW.ATTRIBUTES NSHATTRIBUTES NSHDATUM) %%TWO-WAY-STREAM-DEVICE-CHARSETFN (F1) +\GC.HANDLEOVERFLOW (PTR CASE DTDCNT0 HINUM LONUM DTDCNTLOC) SPP.CLOSE (SPPTERMINATEDP SPPSUBSTREAM +ACCESSBITS) \REMOVE.EXTERNALFORMAT (NAME) \TFBRAVO.HANDLE.HEADING (PARALOOKS FMTSPECIALX FMTSPECIALY) +%%TWO-WAY-STREAM-DEVICE-CLOSEFILE (F1 F2 OPENFILELST) DEFAULT.ADDNODEFN (GRAPHNODES) \DRAWLINE.IP ( +IMAGEDATA IPVISLEFT IPVISBOTTOM IPVISRIGHT IPVISTOP) \DTEST.UFN (DTDNAME DTDSUPERTYPE HINUM LONUM) +WINDOW.MOUSE.HANDLER (XCOORD YCOORD CURSOROUTFN CURSORINFN RIGHTBUTTONFN WINDOWENTRYFN BUTTONEVENTFN +CURSORMOVEDFN) %%FILL-POINTER-STREAM-DEVICE-GETFILEPTR (F1) FB.BROWSECOMMAND (FBDEPTH NSPATTERN?) +TWODINSPECT.ADJUSTSELECTION (ROWPROP COLUMNPROP) SCREENBITMAP (SCDESTINATION SCREEN) SEDIT::EXPANDREGIONFN + (SEDIT::ICON-TITLE SEDIT::EDIT-TYPE) \FM.STATE-CHANGESTATE (FM.STATE) \BACKTRACE (BLINK NAMETABLE +INVALIDP ALINK CLINK) \TEDIT.SMALLER.CARET (CARETLOOKS) CREATE.NUMBERPAD.READER (IMAGEWIDTH +IMAGEHEIGHT) DINFO.CLOSEFN (GRAPH.WINDOW) \FM.STATE-SELECTEDFN (FM.USERDATA) \LEAF.HANDLE.INPUT ( +PUPCONTENTS SEQDONEQ SEQINPUTQLENGTH ANSWERBIT SEQNAME LEAFOPCODE LEAFERROROPCODE LEAFALLOWERRORS +LEAFERRORCODE EPUSERFIELD LEAFERRORCNT FW7 LEAFANSWERWANTED) %%TWO-WAY-STREAM-DEVICE-FORCEOUTPUT (F2) +TEXTSTREAM (TEXTOBJ STREAMHINT) TB.REPAINTFN (TB#ITEMS TBLOCK) TB.NUMBER.OF.ITEMS (TB#ITEMS TB#DELETED + TBLASTSELECTEDITEM TBFIRSTSELECTEDITEM TISELECTED) EXPRP (CCODEP PSEUDOCODEP DEFPOINTER) COMP.LAMBDA +(OPNAME OPARG VARS DECLS) \NET.SETTIME (NETTYPE) OPT.DEADSETQP (OPNAME) \GET.EXTERNALFORMAT.FROM.NAME +(NAME) %%SYNONYM-STREAM-DEVICE-GET-STREAM (F1) DO.SHIFTED.SELECTION (COLPOS ROWPOS END) \SEND.ABORT ( +PUPCONTENTS RTPSTATE PUPSOC) \GCMAPTABLE (PTR CASE DTDCNT0 HINUM LONUM DTDCNTLOC) \FLUSHNSOCQUEUE ( +INQUEUE) \DSPRIGHTMARGIN.HCPYMODE (DDMICARIGHTMARGIN IMAGEDATA) \INTERPRETER (DEFPOINTER +MISCSTACKRESULT OVERHEADWORDS) OPT.DELCOPYFN (NXT OPARG OPNAME PREV) TB.CONSIDERRANGE (TIUNSELECTABLE +TIDELETED) \LFWriteLeaderPage (VOLUME FILEDESC LEADERPAGE) TTYINBUFFERPEEK (TTYINPUT TTYEOF +CPXREALCHAR) MKATOM (BASE OFFST LENGTH FATSTRINGP) \LFHighestVersions (NAME) PRINTXIPDATA (XIPCONTENTS + XIPLENGTH) \TEXTMENU.TOGGLEFN (\TEXTOBJ) \COERCE.NS.SOCKET (NSSOCKET) ONED.TRACKCURSOR (ELTBOTTOM +ELTLEFT ELTWIDTH PROP) \DSPFONT.HCPYMODE (IMAGEDATA DDFONT IMFONTCREATE IMAGEOPS \SFHeight DDMICAXPOS +WIDTHS FONTCHARSETVECTOR) \SPP.DEFAULT.ERRORHANDLER (FULLFILENAME SPPINPUTDSTYPE) \FM.STATE-SETUP ( +FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN FM.USERDATA FM.STATE) INVERT.BITMAP.B/W ( +BITMAPWIDTH BITMAPHEIGHT) \LEAF.TIMEDIN (LEAFABORTBUTTONWINDOW) SEDIT::DRAW-UNDERLINE (SEDIT::NEXT-LINE-Y + SEDIT::LINE-LENGTH SEDIT::NEXT-LINE SEDIT::INDENT) \DEFINEFONT.PRESS (IMAGEDATA PRESSFONTDIR +PRNEXTFONT# PRMAXFONTSET) \SPP.ESTABLISH (SPPSERVERFLAG SPPPROCESS SPPSOURCESKT# SPPATTENTIONFN +SPPWHENCLOSEDFN SPPERRORHANDLER SOURCECONID SPPLOCK SPPSERVERFN SPPINPUTEVENT) PROCESS.EVAL ( +PROCDELETED PROCEVAPPLYRESULT) SEDIT::REPAINT (SEDIT::DISPLAY-WINDOW SEDIT::WINDOW-BOTTOM SEDIT::LINEAR-THREAD SEDIT::DESTINATION SEDIT::LINEAR-FORM SEDIT::INDENT STRING SEDIT::PRIN-2?) -GETSTREAMPROP (OTHERPROPS) %BROADCAST-STREAM-DEVICE-BOUT (F1) OPT.DELTAGREF (TAG) \\FM.WINDOWENTRYFN ( -BOTTOM LEFT FM.USERDATA WIDTH HEIGHT) \\SETSPACE.PRESS (IMAGEDATA PRSPACEWIDTH ELSTREAM HIBYTE LOBYTE) - \\NSFILING.OPENFILE (ACCESSBITS FULLFILENAME OPENFILELST) |\\PFFindRootDirEntryNum| (|countEntries| -|entries| |type|) \\SETFVARSLOT (NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER NTSIZE OVERHEADWORDS -FIRSTPVAR FXSIZE) MEASUREGRAPHNODE (NODEPOSITION) PROG (OVERHEADWORDS) GRAPHREGION (GRAPHNODES) -\\FIXLINELENGTH.PRESS (IMAGEDATA PRRIGHT PRLEFT FONTAVGCHARWIDTH PRFONT) \\NSFILING.CONNECT ( -NSHDIRECTORYP) EXPANDW (EXPANDWFN SCREEN) %BROADCAST-STREAM-DEVICE-FORCEOUTPUT (F1) CURSOR (CUHOTSPOTX - BITMAPHEIGHT CUIMAGE CUHOTSPOTY) DEL.PROCESS (PROCDELETED PROCBEINGDELETED) \\PRINSTACKP ( -CHARPOSITION HASHMACROCHAR) SEDIT::CONVERT-COMMENT (SEDIT::DISPLAY-WINDOW SEDIT::SELECTION -SEDIT::CARET-POINT SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-TYPE SEDIT::SUB-NODES -SEDIT::SELECT-END SEDIT::SUB-NODE-INDEX SEDIT::DEPTH) %BROADCAST-STREAM-DEVICE-CHARSETFN (F1) \\PROG0 -(FNHEADER NEXTBLOCK FIRSTPVAR FXSIZE OVERHEADWORDS) \\CKPOSSOUT (CHARPOSITION OFFST INDIRECT-P OFFSET -BASE XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) \\TEDIT.PUT.CHARLOOKS (CLFONT PNEW PFATP) -MAP.PROCESSES (PROCNAME PROCFORM) %BROADCAST-STREAM-DEVICE-OUTCHARFN (F1 CHARPOSITION) -SEDIT::HANDLE-COMPLETION (SEDIT::COMPLETION-FN) \\CKPOSBOUT (CHARPOSITION) HASHBEFORECLOSE (HASHFILE) -PUTSTREAMPROP (OTHERPROPS) OPT.COMMONBACK (PREV OPNAME TAG OPARG) \\ELIDE.ELEMENT.CHAR (COMMONLISP -HASHMACROCHAR) DBG::REGION-NEXT-TO (LEFT BOTTOM WIDTH HEIGHT) TB.COPYBUTTONEVENTFN (TBCOPYFN TBITEMS -TIUNCOPYSELECTABLE) \\KEYHANDLER1 (TELERAIDFXP WRITE READ) \\LITPRIN (PACKAGE PACKAGEINDEX -HASHMACROCHAR PACKAGECHAR CHARPOSITION CASEINSENSITIVE PNAMEBASE PNAMELENGTH FATPNAMEP) \\TEXTOPENF ( -TEXTOBJ F3 PCTB HI) GETTEXTPROP (TXTREADONLY TXTEDITING TXTNONSCHARS EDITPROPS) -%CONCATENATED-STREAM-DEVICE-PEEKBIN (F1) SEDIT::COPY-SELECTION-DEFAULT (SEDIT::SELECT-NODE -SEDIT::SELECT-START SEDIT::SELECT-END CL:STRUCTURE SEDIT::SUB-NODES) CCCSCAN (STARTPC OVERHEADWORDS -BYTESWAPPED OPNARGS OPPRINT OPCODENAME) \\ELIDE.TAIL.STRING (COMMONLISP) RESTART.PROCESS (PROCDELETED) - FB.HARDCOPY.DIRECTORY (PATTERN COUNTERWINDOW PAGECOUNT? TOTALFILES TOTALPAGES DIRECTORYP TIDATA -PRINTNAME FILENAME STARTOFPNAME INFODISPLAYED INFOPROTOTYPE INFOFORMAT INFOLABEL FILEINFO) -FB.GETALLFILEINFO (NSPATTERN?) \\UNWIND.PROCESS (PROCFINISHED) \\TFBRAVO.WRITE.PARAGRAPH (FMTPARATYPE -PARALOOKS) %CONCATENATED-STREAM-DEVICE-CLOSEFILE (F1) DASSEM.CANSHAREBINDING (VARS VARINDEX PARENT) -PRINTPUPQUEUE (SYSQUEUEHEAD QLINK PUPID PUPLENGTH SYSQUEUETAIL) WAKE.PROCESS (PROCDELETED PROCSTATUS) -\\CURSOR.DEFPRINT (CUIMAGE CUMASK CUHOTSPOTX CUHOTSPOTY CUDATA) SEDIT::GET-SELECTED-STRUCTURE ( -SEDIT::OPEN-NODE-CHANGED? SEDIT::SELECTION SEDIT::SELECT-NODE SEDIT::SELECT-START CL:STRUCTURE) -\\SEQUIN.CONTROL (PUPBASE) \\EVALA (FNHEADER NEXTBLOCK FIRSTPVAR FXSIZE OVERHEADWORDS) COMP.STUNBIND ( -LEVEL PARENT) \\EXTERNALFORMAT (OTHERPROPS FILEOUTCHARFN EOLVALID EOL INCCODEFN PEEKCCODEFN BACKCHARFN - EXTERNALFORMAT.NAME) OPT.JUMPREV (LEVEL FRAME NXT PREV OPNAME OPARG TAG) CL:FLOAT-SIGN (SIGNBIT) -SUSPEND.PROCESS (PROCDELETED) %CONCATENATED-STREAM-DEVICE-BACKFILEPTR (F1) \\SMASHRETURN (INVALIDP -CLINK FASTP SLOWP \#ALINK \#CLINK FNHEADER) SEDIT::CHANGE-QUOTE (CL:STRUCTURE SEDIT::QUOTE-STRING -SEDIT::ENVIRONMENT) %CONCATENATED-STREAM-DEVICE-CHARSETFN (F1) \\PRINSTRING (ESCAPECHAR OFFST -INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER CHARPOSITION) -\\LITPRIN.INTERNAL (ESCAPECHAR MULTESCAPECHAR CHARPOSITION PNAMEBASE PNAMELENGTH FATPNAMEP -CASEINSENSITIVE BASE READSA ESCQUOTE NSCHARHASH INNERESCQUOTE) FB.BROWSECOMMAND (FBDEPTH NSPATTERN?) -FB.ADD.FILEGROUP (NOSUBDIRECTORIES FILENAME SUBDIREND) %CONCATENATED-STREAM-DEVICE-BIN (F1) -\\SUSPEND.PROCESS (PROCSTATUS PROCQUEUE PQLAST NEXTPROCHANDLE PROCTIMERSET PROCEVENTORLOCK) -\\GENERIC.CURSOR (SETCURSORFN) %SYNONYM-STREAM-DEVICE-CLOSEFILE (OPENFILELST) POSTSCRIPT.FONTCREATE ( -ASCENT DESCENT FID OTHERDEVICEFONTPROPS WIDTHS FONTCHARSETVECTOR FONTDEVICESPEC) FILECOMS (COMSNAME -FILEPROP) \\SOUT (IMAGETYPE IMAGEOPS OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP - TYPE-NUMBER) PROCESS-STATUS (FRAMENAME NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER \#FRAMENAME CLINK - FASTP SLOWP \#ALINK \#CLINK) ONEDINSPECT.SETELT (WIDTH) \\TEXTBACKFILEPTR (CPAGE PCSTARTPG FW6 -COFFSET PCSTARTCH FW7 PREVPIECE PIECE F5 PLEN PLOOKS TEXTOBJ F3 PSTR PFILE PFATP POBJ REALFILE F1 -CHARSLEFT F2 CBUFSIZE FATSTREAMP F4 CPPTR) PROCESS.RESULT (PROCRESULT PROCFINISHEVENT PROCNAME) -TB.REMOVE.ITEM (TB#ITEMS TI# TBITEMS TIDELETED TB#DELETED TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM) -\\TEXTMENU.TOGGLEFN (\\TEXTOBJ) \\STREAM.DEFPRINT (ACCESSBITS NAMEDP FULLFILENAME DEVICENAME DEVICE) -\\NSNET.CLOSERP (NSNET RTHOPCOUNT) PUTSEQUIN (SEQLOCK SEQSTATE PUPBASE SEQBROKEN \#UNACKEDSEQS -SEQOUTALLOC SEQINPUTQLENGTH SEQINALLOC SEQRETRANSMITTING SEQEVENT) %SYNONYM-STREAM-DEVICE-OUTCHARFN ( -CHARPOSITION) %CONCATENATED-STREAM-DEVICE-EOFP (F1) \\SPP.HANDLE.DATA (SPPACKNO SPPINPUTQ SEQNO -XIPCONTENTS SYSQUEUETAIL QLINK DSTYPE SPPOUTPUTSTREAM SPPSTATE SPPINPUTEVENT) MENU.HANDLER (MENUGRID -WHENHELDFN MENUROWS MENUCOLUMNS REG WHENUNHELDFN CHANGEOFFSETFLG MENUOFFSET) FB.GET.NEWPATTERN ( -PATTERN) %SYNONYM-STREAM-DEVICE-EOFP (EOFP DEVICE) FIND-EXTERNAL-SYMBOL (BASE XBASE INDIRECT-P OFFST -OFFSET LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) \\PRINTNSADDRESS (LINELENGTH) GO (FRAMENAME -NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER \#FRAMENAME IVAR BLINK FASTP SLOWP DUMMYBF \#BLINK -INVALIDP CLINK \#ALINK \#CLINK) LET (OVERHEADWORDS) FRESHLINE (CHARPOSITION ACCESSBITS EOFP DEVICE) -GRAPHERPROP (GRAPH.PROPS) BREAK.NSFILING.CONNECTION (OPENFILE NSCONNECTIONS DEVICEINFO DEVICENAME) -\\DSPCOLOR.IP (IPDATA IMAGEDATA IPCOLOR) \\LET0 (FNHEADER NEXTBLOCK FIRSTPVAR FXSIZE OVERHEADWORDS) -\\FDEV.DEFPRINT (DEVICENAME) PROCESS.FINISHEDP (PROCFINISHED) LET* (OVERHEADWORDS) \\CARET.DOWN (NEXT -STREAM DSP) DEFINEDP (DEFPOINTER) \\LET* (FNHEADER NEXTBLOCK FIRSTPVAR FXSIZE OVERHEADWORDS) -PPSOC.CURRENT (COFFSET CBUFSIZE) CL:GET-OUTPUT-STREAM-STRING (F1) \\SYMBOL.ESCAPE.COUNT ( -MULTESCAPECHAR ESCAPECHAR CASEINSENSITIVE BASE READSA PNAMEBASE PNAMELENGTH FATPNAMEP ESCQUOTE -NSCHARHASH INNERESCQUOTE COMMONLISP) NOTIFY.EVENT (EVENTQUEUETAIL PROCEVENTLINK) NCHARS (PNAMELENGTH -LENGTH FILL-POINTER ESCAPECHAR OFFST INDIRECT-P OFFSET BASE XBASE FATSTRINGP TYPE-NUMBER) TEDIT.COPY ( -SET \\TEXTOBJ DCH TXTREADONLY TEXTLEN POINT CH# CHLIM FORMATTEDP POBJ TXTHISTORY \\XDIRTY TXTFILE) -BRV/OFFSET (NODEPOSITION XCOORD YCOORD TONODES) TEDIT.KILL (TEXTOBJ F3 \\WINDOW) INSPECT (DTDHUNKP -DTDGCTYPE DTDSIZE) \\SCROLL.HANDLER.DOIT (LEFT TOP BOTTOM HEIGHT WIDTH) INPUT (FULLNAME) \\DRAWLINE.IP - (IMAGEDATA IPVISLEFT IPVISBOTTOM IPVISRIGHT IPVISTOP) %TWO-WAY-STREAM-DEVICE-BOUT (F2) -CALL.MOVENODEFN (GRAPH.MOVENODEFN) PROCESS.TTY (PROCDELETED) %TWO-WAY-STREAM-DEVICE-OUTPUTSTREAM (F2) -FB.SHAPECOMMAND (BROWSERWINDOW WIDTH HEIGHT ABORTWINDOW PROMPTWINDOW PRIGHT LEFT) -\\TEXTMENU.TOGGLE.CREATE (XSIZE YSIZE) \\OUTCHAR (OUTCHARFN) \\DEFPRINT.BY.NAME (CHARPOSITION -HASHMACROCHAR) FB.FASTSEECOMMAND (SEEWINDOW) FB.MAYBE.WIDEN.NAMES (OVERFLOWWIDTHS INFOSTART TOTALFILES -) SEDIT::SUBNODE-CHANGED (SEDIT::SUB-NODE-CHANGED SEDIT::NODE-TYPE SEDIT::SUPER-NODE) -\\STREAM.NOT.OPEN (FULLNAME FULLFILENAME) \\MEDW.CURSOR (CUHOTSPOTX BITMAPHEIGHT CUIMAGE CUHOTSPOTY) -%TWO-WAY-STREAM-DEVICE-INPUTSTREAM (F1) TEDIT.CHARWIDTH (CCECHO NSCHARHASH) \\GETACCESS (ACCESSBITS) -\\INSERTCR (TXTREADONLY FORMATTEDP \\INSERTPC) \\FM.UPDATEWINDOWEXTENT (WIDTH HEIGHT) -\\DSPCLIPPINGREGION.PRESS (IMAGEDATA |PRClippingRegion|) GIVE.TTY.PROCESS (RIGHTBUTTONFN BUTTONEVENTFN -) |\\PFRemoveRootDirEntry| (|countEntries| |entries|) %TWO-WAY-STREAM-DEVICE-EOFP (EOFP DEVICE F1) -\\NUMERIC.PNAMEP (COMMONLISP BASE XBASE INDIRECT-P OFFST OFFSET LENGTH FILL-POINTER FATSTRINGP -TYPE-NUMBER PNAMEBASE PNAMELENGTH FATPNAMEP) %TWO-WAY-STREAM-DEVICE-BIN (F1) \\DOBUFFEREDTRANSITIONS ( -READ W0 W1 W2 W3 W4 W5 WU WRITE 1SHIFT 2SHIFT LOCK CTRL META FONT USERMODE1 USERMODE2 USERMODE3 -ALTGRAPH DEADKEYPENDING) SEDIT::CHANGE-PRINTBASE (SEDIT::OPEN-NODE-CHANGED? SEDIT::DISPLAY-WINDOW -SEDIT::PROFILE) %TWO-WAY-STREAM-DEVICE-READP (F1) EVALA (OVERHEADWORDS) ALLOW.BUTTON.EVENTS (PROCNAME) - PFI.PRINT.BITMAP (OUTCHARFN) %TWO-WAY-STREAM-DEVICE-OUTCHARFN (F2 CHARPOSITION) -SEDIT::FORMAT-VALUES-CHANGED (SEDIT::NODE-TYPE SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH -SEDIT::COMPUTE-FORMAT-VALUES SEDIT::ENVIRONMENT CL:FORMAT) \\TEXTSETFILEPTR (TEXTOBJ F3 TEXTLEN) -NEWLINE.IP (IPDATA IMAGEDATA IPYPOS IPLINEFEED IPBOTTOM IPLEFT) COMP.STBIND (PARENT LEVEL NVALS OPNAME - VARS OPARG) PRINTPACKETQUEUE (SYSQUEUEHEAD EPLINK) OPT.LABELNTHPR (NXT PREV) TTYINSTRING (CPXREALCHAR -) \\EVALFORM (CCODEP ARGTYPE DEFPOINTER) FB.ADJUST.DATE.WIDTH (BROWSERFONT INFOFORMAT TABLEBROWSER -FILEINFO TIDATA) %TWO-WAY-STREAM-DEVICE-PEEKBIN (F1) \\GC.HANDLEOVERFLOW (PTR CASE DTDCNT0 HINUM LONUM - DTDCNTLOC) COURIER.WRITE.FAT.STRING (HIBYTE LOBYTE) \\TFBRAVO.READ.PARALOOKS (TABSPEC FMTUSERINFO -LEFTMAR) %TWO-WAY-STREAM-DEVICE-CHARSETFN (F1) TEDIT.CARETLOOKS (CARETLOOKS) \\DTEST.UFN (DTDNAME -DTDSUPERTYPE HINUM LONUM) \\UPDATE.EXTENT.IMAGE (HEIGHT WIDTH TOP BOTTOM LEFT) -\\NSFILING.CLOSE.CONNECTIONS (NSFILINGLOCK DEVICEINFO NSWATCHERPROC NSCONNECTIONS FSSESSIONTIMER -FSCONTINUANCE FSCOURIERSTREAMS OPENFILELST) \\TEDIT.TABTYPE.SET (\\TEXTOBJ CH# POBJ) \\NET.SETTIME ( -NETTYPE) \\SAVEVMBACKGROUND (|Key|) \\TEXTPEEKBIN (PIECE F5 COFFSET CBUFSIZE POBJ FATSTREAMP F4 EOFP -DEVICE F1 CHARSLEFT F2 NEXTPIECE PLOOKS TEXTOBJ F3 PLEN CURRENTPARALOOKS TICURPARALOOKS IMAGEDATA -CURRENTLOOKS F10 PSTR PFILE PFATP ENDOFSTREAMOP) %TWO-WAY-STREAM-DEVICE-FORCEOUTPUT (F2) -\\DSPXPOSITION.IP (IPXPOS IPDATA IMAGEDATA IPYPOS) \\RELEASE.ETHERPACKET (EPTRANSMITTING) PPSOC ( -LCLPORT LCLSOCKETHI LCLSOCKETLO RTPSTATE FRNPORT FRNSOCKETHI FRNSOCKETLO INACTIVITYTIMER +\TEXTMENU.TOGGLE.CREATE (XSIZE YSIZE) \PRINTFRAME (NAMETABLE FIRSTTEMP FAST INCALL VALIDNAMETABLE +NOPUSH USECNT SLOWP ALINK FNHEADER NEXTBLOCK BLINK NLOCALS FIRSTPVAR BOUND LOOKEDUP BINDINGPTR) ONFILE + (FILEPKGNAME) FB.FASTSEECOMMAND (SEEWINDOW) SEDIT::SET-POINT-COMMENT-WORD (SEDIT::SUPER-NODE +SEDIT::SUB-NODE-INDEX SEDIT::LINEAR-FORM) LISTP (WORDINPAGE) \SEND.RFC (CONNID PUPSOURCE PUPCONTENTS +PUPSOC) \PRINTBF (NARGS IVAR RESIDUAL USECNT) \FLUSHPUPSOCQUEUE (INQUEUE) \CREATECHARSET.IP (WIDTHS +FONTAVGCHARWIDTH CHARSETDESCENT) \PEEKBIN (PEEKBIN DEVICE) \INSERTCH (TXTREADONLY FATSTRINGP OFFST +BASE LENGTH \INSERTNEXTCH \INSERTLEN \INSERTLEFT \INSERTSTRING \INSERTPC \INSERTFIRSTCH PCTB TEXTLEN +PC PCOFF COUNT PLEN \INSERTPCVALID NEXTPIECE PLOOKS PPARALOOKS PSTR TXTHISTORY THLEN CARETLOOKS +FMTSPEC PREVPIECE PPARALAST THACTION THCH# PFATP) \BSP.SENDBUFFER (BSPSOC COFFSET XMITBYTEID +ADATACOUNT BSPFILEPTRLO BSPFILEPTRHI FW6 %#UNACKEDPUPS %#UNACKEDBYTES PUPALLOC BYTEALLOC BSPOUTPUTQ +PUPSOC) \TEDIT1 (TEXTOBJ EDITFINISHEDFLG TXTFILE) COLLECT.CHILD.NODES (TONODES GRAPHNODES) BCPLVERSION + (BVersion) INTERPRESS.OUTCHARFN (IPDATA NSTRANSTABLE NSCHARSET IPSPACEWIDTH IPWIDTHSCACHE IPXPOS +IPCHARVISIBLEP IPMINCHARRIGHT IPSHOWSTREAM IPRIGHT IPCLIPINCLUSIVE IPVISRIGHT) \DECODETRANSITION ( +FLAGS SHIFTORLOCK SHIFT LOCK FONT USERMODE1 USERMODE2 USERMODE3 SHIFTCODES CODES CTRL META +INTERRUPTLIST) \LEAF.RECONNECT (DEVICEINFO PFSLEAFSEQUIN SEQSTATE PFSNAME) DINFO.EXPANDFN ( +FMENU.WINDOW GRAPH.WINDOW) \SCANFORNTENTRY (OVERHEADWORDS NTSIZE) \LEAF.TIMEDOUT (LEAFABORTSTATUS +LEAFTIMEOUTSTATUS SEQSTATE SEQNAME) \RECLAIMSTACKP (EDFXP INVALIDP) MAKENEWCOM (NEWCOM) +DECODE/WINDOW/OR/DISPLAYSTREAM (WTITLE DSP) EDITCALLERS (REREADTABLE) DINFO.SHRINKFN (GRAPH.WINDOW) +CHARACTER (XBASE) REALMEMORYSIZE (NRealPages) \PROCESS.EVAL1 (PROCSTATUS) \SETXFORM.PSC ( +POSTSCRIPTCLIPPINGREGION POSTSCRIPTSCALEHACK POSTSCRIPTLANDSCAPE POSTSCRIPTROTATION POSTSCRIPTTRANSX +POSTSCRIPTTRANSY HEIGHT WIDTH LEFT BOTTOM) TB.COPYBUTTONEVENTFN (TBCOPYFN TBITEMS TIUNCOPYSELECTABLE) +TTYINBUFFERBIN (TTYINPUT TTYEOF CPXREALCHAR) RECURSIVE.COLLECTDESCENDENTS (NODEID) \PFPutMarkerPage ( +subVolumes) \TEDIT.RESTARTFN (TEXTOBJ \DIRTY) PRIN2 (COMMONLISP USESILPACKAGE LINELENGTH) +SEDIT::CONVERT-COMMENT (SEDIT::DISPLAY-WINDOW SEDIT::SELECTION SEDIT::CARET-POINT SEDIT::SELECT-NODE +SEDIT::SELECT-START SEDIT::SELECT-TYPE SEDIT::SUB-NODES SEDIT::SELECT-END SEDIT::SUB-NODE-INDEX +SEDIT::DEPTH) PRESSWINDOW (PRLEFT IMAGEDATA PRWIDTH PRBOTTOM PRHEIGHT) \SAVEVMBACKGROUND (Key) +\NSRANDOM.ENSURE.WATCHER (DEVICEINFO NSWATCHERPROC NSFILINGNAME) \NSADDRESS.DEFPRINT (CHARPOSITION) +\NSPRINT.COURIER.OPEN (NSPRINTERADDRESS NSOBJECT NSPRINTERNAME) CLEARW (DSP) SPP.CLEAREOM (SPPEOFBITS) + \BACKFILEPTR (BACKFILEPTR DEVICE) \FAX.PARSE.NAME (OFFST BASE LENGTH FATSTRINGP) \GETINTEGERPART ( +HINUM) TTYDISPLAYSTREAM (IMAGEDATA DDClippingTop DDClippingBottom DDLINEFEED) MEASUREGRAPHNODE ( +NODEPOSITION) \DRAWCURVE.IP (XCOORD YCOORD) FW-INIT-PROPS (XCOORD YCOORD) REQUIREVERSION (LVersion +RVersion BVersion) \DSKDISPLAY.CREATE.WINDOW (XCOORD YCOORD LEFT BOTTOM) CL:COMPILED-FUNCTION-P (TYP) +SEDIT::SELECT-SEGMENT-COMMENT (SEDIT::SELECT-START) \PUTSYSBUF (READ WRITE) CL:MAKE-ECHO-STREAM ( +LINELENGTH OPENFILELST) U-CASE (FATPNAMEP BASE PNAMEBASE PNAMELENGTH FATSTRINGP OFFST LENGTH XBASE) +\FTP.GETFILEINFO (FTPFILEPROPS) \VALID.FILING.CONNECTIONP (FSLOGINCHANGED FSNAMESTRING FSLOGINNAME +FSCOURIERSTREAMS FSSESSIONTIMER FSCONTINUANCE) \VFMMerge1 (volumePage used key) MICROCODEVERSION ( +RVersion) CL:MAKE-SYNONYM-STREAM (LINELENGTH OPENFILELST) CL:MAKE-TWO-WAY-STREAM (LINELENGTH +OPENFILELST) OPT.EQVALUE (OPNAME OPARG PREV) \SETBSPTIMEOUT (INTERRUPTOUT %#UNACKEDPUPS PUPALLOC +BYTEALLOC BYTESPERPUP RTPPROCESS ACKREQUESTED ADATATIMEOUT BSPTIMER) \NSFILING.DISCARD.SESSION ( +NSCONNECTIONS DEVICEINFO FSCOURIERSTREAMS FSSESSIONLOCK) CHANGE.NODEFONT.SIZE (NODEFONT +GRAPH.FONTCHANGEFN) \CLOSEIPSTREAM (IPPAGESTATE IPDATA) FB.ADD.FILEGROUP (NOSUBDIRECTORIES FILENAME +SUBDIREND) \PROCESS.APPLY1 (PROCSTATUS) \TEDIT.NEWREGIONFN (XCOORD YCOORD) NEWLINE.PRESS (IMAGEDATA +PRYPOS PRLINEFEED PRBOTTOM PRLEFT) PROCESS.APPLY (PROCDELETED PROCEVAPPLYRESULT) \PUT.SESSION.HANDLE ( +FSSESSIONHANDLE) PUPSOCKETEVENT (PUPSOCEVENT) SCANFORWARD (END CPXREALCHAR) \TEDIT.LARGER.CARET ( +CARETLOOKS) \LFFindInfo (INFO volNum FILEDESC) \LEAF.WHENCLOSED (LEAFABORTBUTTONWINDOW SEQDONEQ +SEQRETRANSMITQ SEQNAME PFSLEAFSEQUIN DEVICEINFO) \SEND.ENDREPLY (PUPSOC) \GETDEVICEFROMHOSTNAME ( +HOSTNAMEP) \TRANSMIT.STRATEGY (ACKREQUESTED PUPALLOC BYTEALLOC BYTESPERPUP %#UNACKEDPUPS LASTADATATIME + ADATACOUNT PUPTYPE) \SEND.END (PUPSOC) \HARDCURSORUP (CUIMAGE BITMAPBITSPERPIXEL BITMAPHEIGHT) +MSINTERPRET (ID TYPE DEFAULTTYPE SETNAME OTHERSTUFF SUBJECT MSPRED MSVERB REP OTHERSET TENSE VPART +MSPATHOPTIONS OUTPUT LINELENGTH TO FROM AVOIDING SEPARATE NOTRACE MARKING) \TEDIT.WORDDELETE (SEL +STREAMHINT READSA TXTWTBL POINT CH# CHLIM NSCHARHASH CLPROTECTED PLOOKS PIECE) FB.GETALLFILEINFO ( +NSPATTERN?) TTYINBUFFERREADP (TTYINPUT TTYEOF) MOVEDESCENDENTS (NODEID NODEPOSITION) FIXVERBSETTYPE ( +TYPE MSVERB REP OTHERSET) \CURSORBITSPERPIXEL (CUBITSPERPIXEL CUIMAGE CUMASK) COPYIMAGEOBJ ( +OBJECTDATUM IMAGEOBJPLIST IMAGEOBJFNS) EQCLOOKS (CLFONT FONTCLASSNAME CLPROTECTED CLINVISIBLE +CLSELHERE CLCANCOPY CLULINE CLOLINE CLINVERTED CLSTRIKE CLOFFSET CLSMALLCAP CLSTYLE CLUSERINFO) +\BSP.FLUSH.SOCKET.QUEUES (BSPOUTPUTQ BSPINPUTSTREAM BSPCURRENTPUP BSPOUTPUTSTREAM) \FTP.DELETEFILE ( +OPENP FTPIN FTPOUT) \PRINTNSADDRESS (LINELENGTH) FB.MAKERIGIDWINDOW (HEIGHT) \TFBRAVO.PARSE.PARA ( +RUNLENGTH) \NSPRINT.UNSUPPORTED (NSPRINTERNAME) \CURSORDESTINATION (BITMAPBITSPERPIXEL CUIMAGE +NEWMOUSESTATE BITMAPBASE BITMAPWIDTH BITMAPHEIGHT BITMAPRASTERWIDTH) OPT.EQOP (OPNAME OPARG) +\CCODEARGLIST (NA NTSIZE NATIVE STARTPC OVERHEADWORDS ARGTYPE) PRESS.BITMAPSCALE (HEIGHT WIDTH) +\CLOSEFILE (ACCESSBITS IMCLOSEFN IMAGEOPS DEVICE CLOSEFILE UNREGISTERFILE) \UNQUEUE.EVENT ( +EVLOCKQUEUETAIL PROCEVENTLINK) SEDIT::CHANGE-QUOTE (CL:STRUCTURE SEDIT::QUOTE-STRING SEDIT::ENVIRONMENT +) \EVENT.DEFPRINT (EVENTNAME) SEDIT::PARSE--COMMENT-WORD (SEDIT::COMMENT-FONT SEDIT::ENVIRONMENT) +\FM.3STATE-CHANGESTATE (FM.STATE FM.BITMAP FM.USERDATA FM.REGION) \DELETEFILE (DELETEFILE) PACK* ( +XBASE PNAMEBASE PNAMELENGTH FATPNAMEP LENGTH) BSPPRINTPUP (PUPID PUPLENGTH PUPTYPE PUPCONTENTS) +\LEAF.GETFILEINFO (PFSLEAFSEQUIN DEVICEINFO LEAFCACHEDFILE FULLFILENAME) \WWCHANGESCREENSIZE ( +SCDESTINATION) \CCODEIVARSCAN (BYTESWAPPED) \TFBRAVO.ADD.NAMEDTAB (FMTUSERINFO TEXTLEN) \LEAF.IDLE? ( +SEQINPUTQLENGTH LEAFCACHEDFILE) \SPP.HANDLE.DATA (SPPACKNO SPPINPUTQ SEQNO SYSQUEUETAIL QLINK DSTYPE +SPPOUTPUTSTREAM SPPSTATE SPPINPUTEVENT) \TFBRAVO.WRITE.RUNS (RUNS PARALOOKS RUNLENGTH) +\ENQUEUE.EVENT/LOCK (EVLOCKQUEUETAIL PROCEVENTLINK) ICONW.SHADE (BITMAPWIDTH BITMAPHEIGHT) +\SHIFT.DOCUMENT (BASE PPARALOOKS POBJ OBJECTDATUM 1STLEFTMAR LEFTMAR RIGHTMAR TABSPEC NEXTPIECE) +\BLKEXPONENT.UFN (EXPONENT) OBTAIN.MONITORLOCK (MLOCKOWNER PROCOWNEDLOCKS MLOCKPERPROCESS) +POSTSCRIPT.FONTCREATE (ASCENT DESCENT FID OTHERDEVICEFONTPROPS WIDTHS FONTCHARSETVECTOR FONTDEVICESPEC +) \HARDCURSORPOSITION (NEWMOUSESTATE) \NSNET.CLOSERP (NSNET RTHOPCOUNT) \DEVICEEVENT (EVENTFN OPENP +NONDEFAULTDATEFLG) SPY.FIND.TREE (NAME) PARSE-NSADDRESS (OFFST BASE LENGTH FATSTRINGP) +FB.MAYBE.WIDEN.NAMES (OVERFLOWWIDTHS INFOSTART TOTALFILES) DELFROMFILES (WHENUNFILED) +\FM.3STATE-DOWNFN (FM.USERDATA LEFT BOTTOM) ICONPOSITION.FROM.WINDOW (SCREEN LEFT SCWIDTH PRIGHT WIDTH + BOTTOM SCHEIGHT PTOP HEIGHT) BSPBOUT (BSPOUTPUTSTREAM) FB.ADJUST.DATE.WIDTH (BROWSERFONT INFOFORMAT +TABLEBROWSER FILEINFO TIDATA) \RTP.HANDLE.RFC (PUPCONTENTS NET PUPSOURCENET RTPSTATE PUPDESTHOST +NETHOST FRNPORT SOCKETHI FRNSOCKETHI SOCKETLO FRNSOCKETLO PUPSOC) \SOFTCURSORUP (CUIMAGE CUMASK +BITMAPWIDTH BITMAPHEIGHT BITMAPBITSPERPIXEL BITMAPBASE BITMAPRASTERWIDTH) \BLTSHADE.IP ( +IPVISIBLEREGION IMAGEDATA) OPT.JUMPCOPYTEST (OPNAME OPARG PREV) MENUWMINSIZEFN (MENUBORDERSIZE +MENUOUTLINESIZE MENUCOLUMNS TITLE MENUROWS) FILES? (TOBEDUMPED FILEPROP) \SOFTCURSORUPCURRENT ( +CUBITSPERPIXEL BITMAPRASTERWIDTH BITMAPBASE) RELEASE.MONITORLOCK (MLOCKOWNER PROCOWNEDLOCKS MLOCKLINK +MLOCKQUEUETAIL PROCEVENTLINK) SEDIT::CHANGE-PRINTBASE (SEDIT::OPEN-NODE-CHANGED? SEDIT::DISPLAY-WINDOW + SEDIT::PROFILE) OPT.PRATTACH (NXT) OPENPRSTREAM (IMAGEOPS) HPRINT.IMAGEOBJ (GETFN IMAGEOBJFNS PUTFN) +SEDIT::CHANGE-PACKAGE (SEDIT::OPEN-NODE-CHANGED? SEDIT::DISPLAY-WINDOW SEDIT::PROFILE) +SI::MONITOR-UNWIND (MLOCKOWNER PROCOWNEDLOCKS MLOCKLINK MLOCKQUEUETAIL PROCEVENTLINK) +\FM.3STATE-SETUPOFFBITMAP (FM.USERDATA LEFT BOTTOM WIDTH HEIGHT FM.HIGHLIGHT) PUPSOCKETNUMBER ( +PSOCKET#) \SEND.ACK (%#UNREADPUPS RCVBYTEID PUPCONTENTS PUPSOC) SEDIT::CONFLICTING-SELECTION? ( +SEDIT::SELECTION) FB.HEADINGW.DISPLAY (RIGHT INFOSTART FBDISPLAYEDDEPTH LEFT INFODISPLAYED INFOFORMAT +INFOLABEL INFOWIDTH) PRINTCURSOR (CUIMAGE CUMASK) FILES?1 (DESCRIPTION CHANGED) \CHARWIDTH.IP ( +IPSPACEWIDTH IMAGEDATA WIDTHS FONTCHARSETVECTOR IPFONT) \GENERATEFILES (GENERATEFILES) \LFVersions ( +CHARLIST VERSION GETFILEPTR DEVICE DIRHOLEPTR) FASL::FAT-STRING-P (TYP) TTYINBUFFERBACKPTR ( +TTYORIGINPUT TTYINPUT) \RTP.FILTER (PUPDESTHOST FRNNET PUPDESTNET PUPSOURCE FRNPORT PUPSOURCESOCKETHI +FRNSOCKETHI PUPSOURCESOCKETLO FRNSOCKETLO PUPIDHI CONNID PUPIDLO) \FTP.REGISTER (FULLFILENAME) +\MONITORLOCK.DEFPRINT (MLOCKNAME) IRM.LOOKUP (WINDOW) FULLPRESSBITMAP (HEIGHT WIDTH IMAGEDATA LEFT +BOTTOM) CL:PROBE-FILE (FULLNAME) SCANBACK (START CPXREALCHAR) TTYINBUFFEREOFP (TTYINPUT TTYEOF) +PUPSOCKETFROMNUMBER (PSOCKETLO PSOCKETHI) \LEAF.IDLE (LEAFCACHEDFILE OPENFILELST SEQNAME +LEAFCONNECTION) \SPP.RELEASE.ACKED.PACKETS (SPPRETRANSMITQ SPPACKEDSEQNO SPPSEQNO) \GENERATENEXTFILE ( +NEXTFILEFN GENFILESTATE) \TFBRAVO.WRITE.RUN (RUNLOOKS CLUSERINFO RUNLENGTH) PPSOC.CURRENT (COFFSET +CBUFSIZE) DINFO.CREATE.GRAPH.WINDOW (WINDOW LEFT WIDTH BOTTOM HEIGHT) \FM.3STATE-SETUP (FM.MESSAGE +FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN FM.USERDATA) CL:READ-BYTE (EOFP DEVICE) +ONEDINSPECT.ADJUSTSELECTION (PROP) \GENERATEFILEINFO (FILEINFOFN GENFILESTATE) CL:VALUES (PC FNHEADER +CLINK) \RELEASE.ETHERPACKET (EPTRANSMITTING) TEDIT.FLASHCARET (TCFORCEUP TCCARETDS TCCARET TCCARETX +TCCARETY) TOPW.ADJUSTSELECTION (PROP) OPT.DELCODE (OPNAME OPARG FRAME NXT) \PROCESS.RELEASE.LOCKS ( +PROCOWNEDLOCKS) \SIMULATE.UNBIND (NEXTBLOCK FIRSTPVAR BINDMARKP BINDLASTPVAR BINDNVALUES) +CHAT.OPTIONMENU (ITEMS) \PFGetMarkerPage (subVolumes) \GETFILENAME (GETFILENAME) CL:VALUES-LIST (PC +FNHEADER CLINK) SEDIT::BACKSPACE (SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::BACK-SPACE SEDIT::NODE-TYPE + SEDIT::POINT-INDEX SEDIT::POINT-STRING) CL:READ-LINE (EOFP DEVICE) \GENERIC.OUTFILEP (GETFILENAME) +\PUTONSCREENW (LEFT REG SCWIDTH SCREEN BOTTOM) FB.SETNEWPATTERN (BROWSERWINDOW) \MAKE.PROCESS1 (PROCFX + ALINK) SEDIT::PRINT-STRING (DSP OFFST BASE LENGTH FATSTRINGP IMAGEDATA) \TEDIT.LOOKS (SEL \WINDOW +LEFT TOP CH# TEXTLEN SET HEIGHT) \TEDIT.UNPARSE.CHARLOOKS.LIST (CLSTYLE CLUSERINFO CLINVERTED CLFONT +CLULINE CLSTRIKE CLOLINE CLPROTECTED CLSELHERE CLINVISIBLE CLOFFSET) PRINTPACKETQUEUE (SYSQUEUEHEAD +EPLINK) SEDIT::LINEARIZE-COMMENT (SEDIT::UNASSIGNED SEDIT::ENVIRONMENT SEDIT::COMMENT-STRING +SEDIT::SUB-NODES SEDIT::CURRENT-X SEDIT::INLINE-WIDTH SEDIT::RIGHT-MARGIN SEDIT::START-X) FB.STARTUP ( +ITEMS) \TEXTSETEOF (PAGE OFFSET) CL:READ-FROM-STRING (GETFILEPTR DEVICE) \PROCESS.MOVEFRAME (MiscFXP +DUMMYBF SIZE RESIDUAL USECNT BLINK VALIDNAMETABLE NAMETABHI NAMETABLO) \FTP.UNREGISTER (OPENP FULLNAME +) COURIER.WRITE.FAT.STRING (HIBYTE LOBYTE) TB.DO.ITEM.SELECTION (TB#ITEMS TBLASTSELECTEDITEM +TBFIRSTSELECTEDITEM TI# TIUNSELECTABLE TISELECTED) CL::VALUES-UFN (CLINK PC FNHEADER) +SEDIT::INSERT-COMMENT-CHARS (SEDIT::COMMENT-FONT SEDIT::ENVIRONMENT SEDIT::LINEAR-FORM SEDIT::INLINE-WIDTH + SEDIT::SUB-NODE-INDEX SEDIT::SUB-NODES SEDIT::DEPTH CL:STRUCTURE) SORT.NSADDRESSES.BY.DISTANCE (NSNET +) \LFCASEARRAYFETCH (BASE) CL::VALUES-LIST-UFN (CLINK PC FNHEADER) PRINTPACKET (EPTYPE) +\TEDIT.TEXTBIN.NEW.PAGE (REALFILE ACCESSBITS FULLNAME CBUFSIZE CPPTR COFFSET CPAGE CHARSLEFT +FATSTREAMP) PRINTPUPQUEUE (SYSQUEUEHEAD QLINK PUPID PUPLENGTH SYSQUEUETAIL) \OPENFILE (DEVICE OPENFILE + EPAGE EOFFSET REGISTERFILE) \TEDIT.ITALIC.CARET.OFF (CARETLOOKS) TB.DO.UNLESS.BUSY (TBREADY TBLOCK) +\LEAF.OPENERRORHANDLER (ERRORPUPCODE SEQNAME) \SPP.HANDLE.ATTN (SPPATTENTIONFN FIRSTSPPDATABYTE DSTYPE + SPPINPUTSTREAM) \UNQUEUE.TIMER (PROCTIMERLINK) \IOMODEP (ACCESS) MENUWRESHAPEFN (MENUOUTLINESIZE +WIDTH HEIGHT TITLE MENUCOLUMNS MENUROWS) \GETKEY (PROCTYPEAHEAD) \LEAF.OPENFILE (DEVICEINFO ACCESS +FULLFILENAME PFSOSTYPE EPAGE EOFFSET LEAFCONNECTION LEAFCACHEHITS %#SEQTIMEOUTS) \PROCESS.DEFPRINT ( +PROCNAME) \ENQUEUE.TIMER (PROCTIMERLINK PROCWAKEUPTIMER) TB.REDISPLAY.ITEMS (TBWINDOW TI# TB#ITEMS) +\TTYBACKGROUND (KEYBOARDSTREAM) CL:RENAME-FILE (FULLNAME) CHARSET (IMCHARSET IMAGEOPS) SEDIT::RELINEARIZE + (SEDIT::SUPER-NODE SEDIT::ACTUAL-WIDTH SEDIT::ACTUAL-LLENGTH SEDIT::LAST-LINE SEDIT::DISPLAY-WINDOW +LEFT BOTTOM RIGHT TOP SEDIT::RELINEARIZATION-TIME-STAMP SEDIT::FIRST-LINE SEDIT::YCOORD +SEDIT::WINDOW-BOTTOM SEDIT::START-X SEDIT::FIRST-BLOCK SEDIT::NEXT-LINE-Y SEDIT::WINDOW-TOP SEDIT::INDENT + SEDIT::MATCHING? SEDIT::CURRENT-X SEDIT::BLOCK-X SEDIT::BASE-LINE-Y SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT + SEDIT::LINEAR-THREAD WIDTH HEIGHT SEDIT::RIGHT-MARGIN SEDIT::LINEAR-PREV SEDIT::SUB-NODE-INDEX +SEDIT::CURRENT-LINE SEDIT::NEXT-LINE SEDIT::LINEARIZE SEDIT::NODE-TYPE SEDIT::BELOW? SEDIT::SHIFT-DOWN + SEDIT::LINE-LENGTH) \GETSYSBUF (READ WRITE) \IMAGEUSERPROP (IMAGEOBJPLIST) SETFILEINFO (SETFILEINFO +DEVICE GETFILENAME) CALL.MOVENODEFN (GRAPH.MOVENODEFN) ICMLARRAY.GETMENUWGROUP (XCOORD YCOORD HEIGHT +WIDTH) LISTHARD (TYPE DEFAULTTYPE KNOWN) WAIT.FOR.TTY (PROCNAME) \RTP.CLEANUP (PUPSOC BSPWHENCLOSEDFN +BSPINPUTSTREAM) \TEDIT.MAINW (\WINDOW MENUFLG) WHO-LINE-VMEM (Key) \ADD.ROUTING.TABLE.ENTRY (RTNET#) +\WRITEPRESSBITMAP (WIDTH HEIGHT LEFT BOTTOM IMAGEDATA BITMAPRASTERWIDTH BITMAPHEIGHT ELSTREAM PRXPOS +PRYPOS HIBYTE LOBYTE BITMAPBASE) \STRINGWIDTH.IP (IPFONT IMAGEDATA IPSPACEWIDTH) \ONSCREENW (SCWIDTH +SCREEN LEFT) \NSYSBUFCHARS (READ WRITE) \RECLAIMCODEBLOCK (STARTPC) SEDIT::SCAN-FOR-BOUNDS ( +SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::DESTINATION SEDIT::LINEAR-FORM SEDIT::WIDTH SEDIT::FONT +SEDIT::LINEAR-THREAD) \SAVESYSBUF (PROCTYPEAHEAD) \TEXTOUTCHARFN (TEXTLEN TEXTOBJ) OPT.SKIPPUSH ( +OPNAME PREV OPARG) \ASSIGNDATATYPE1 (DTDPTRS DTDSIZE WORDINPAGE DTDTYPEENTRY) SEDIT::INSERT-COMMENT ( +SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::POINT-INDEX SEDIT::\Y SEDIT::\X) EDITMOVESUBTREE ( +GRAPHNODES) BESTNSADDRESS (NSNET RTHOPCOUNT) \TEDIT.ACTIVE.WINDOWP (EDITFINISHEDFLG) +COURIER.WRITE.SEQUENCE.UNSPECIFIED (HIBYTE LOBYTE FATSTRINGP) HARDCOPYW (SCREEN REGION WIDTH HEIGHT +BITMAPWIDTH BITMAPHEIGHT) \SYSBUFP (READ PROCTYPEAHEAD) \SFFixY.HCPYMODE (DDPILOTBBT DDFONT DDYOFFSET +OTHERDEVICEFONTPROPS BITMAPBASE DDDestination BITMAPRASTERWIDTH BITMAPHEIGHT DDClippingTop +CHARSETBITMAP DDClippingBottom) \LEAF.WRITEPAGES (REVALIDATEFLG PUPCONTENTS LEAFHANDLE EPAGE EOFFSET +LEAFCONNECTION) DINFO.GET.GRAPH.WINDOW (GRAPH.WINDOW) \ICONW.REPAINTFN (BITMAPWIDTH BITMAPHEIGHT) +\FM.TOGGLE-CHANGESTATE (FM.STATE FM.BITMAP FM.USERDATA FM.REGION) \PEEKSYSBUF (READ PROCTYPEAHEAD) +ADDTOFILES? (CHANGED DESCRIPTION WHENFILED) FB.SET.BROWSER.TITLE (FIXEDTITLE COUNTERWINDOW PATTERN) +PPSOC (LCLPORT LCLSOCKETHI LCLSOCKETLO RTPSTATE FRNPORT FRNSOCKETHI FRNSOCKETLO INACTIVITYTIMER BSPINACTIVITYTIMEOUT CONNID RTPTIMER RTPTIMEOUT BSPTIMER BSPTIMEOUT RCVBYTEID RCVINTERRUPTID -BSPINPUTSTREAM BSPFILEPTR BSPFILEPTRHI FW6 BSPFILEPTRLO FW7 BSPCURRENTPUP F3 MARKPENDING F4 BSPINPUTQ -\#UNREADPUPS XMITBYTEID LASTACKID XMITINTERRUPTID \#UNACKEDPUPS \#UNACKEDBYTES BSPOUTPUTSTREAM F2 -BSPOUTPUTQ PUPALLOC BYTEALLOC BYTESPERPUP MAXPUPALLOC PUPALLOCCOUNT LISTENING INTERRUPTOUT INTERRUPTIN - ACKPENDING ACKREQUESTED SENTZEROALLOC ADATATIMEOUT) \\SPP.HANDLE.ATTN (SPPATTENTIONFN -FIRSTSPPDATABYTE XIPCONTENTS DSTYPE SPPINPUTSTREAM) COPYVM (|Key|) \\FUNCT1 (FNHEADER NEXTBLOCK -FIRSTPVAR FXSIZE OVERHEADWORDS) \\MEDW.PUTWINDOWPROP (RIGHTBUTTONFN BUTTONEVENTFN CLOSEFN MOVEFN -CURSORINFN CURSOROUTFN CURSORMOVEDFN RESHAPEFN REPAINTFN EXTENT SCROLLFN WIDTH HEIGHT LEFT BOTTOM -NEWREGIONFN WTITLE WBORDER PROCESS WINDOWENTRYFN USERDATA) %TWO-WAY-STREAM-DEVICE-BACKFILEPTR (F1) -SEDIT::RELINEARIZE (SEDIT::SUPER-NODE SEDIT::ACTUAL-WIDTH SEDIT::ACTUAL-LLENGTH SEDIT::LAST-LINE -SEDIT::DISPLAY-WINDOW LEFT BOTTOM RIGHT WIDTH TOP HEIGHT SEDIT::RELINEARIZATION-TIME-STAMP -SEDIT::FIRST-LINE SEDIT::YCOORD SEDIT::WINDOW-BOTTOM SEDIT::START-X SEDIT::FIRST-BLOCK SEDIT::NEXT-LINE-Y - SEDIT::LINE-HEIGHT SEDIT::LINE-SKIP SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::WINDOW-TOP SEDIT::INDENT - SEDIT::MATCHING? SEDIT::CURRENT-X SEDIT::BLOCK-X SEDIT::BASE-LINE-Y SEDIT::LINEAR-THREAD -SEDIT::RIGHT-MARGIN SEDIT::LINEAR-PREV SEDIT::SUB-NODE-INDEX SEDIT::CURRENT-LINE SEDIT::NEXT-LINE -SEDIT::LINEARIZE SEDIT::NODE-TYPE SEDIT::BELOW? SEDIT::SHIFT-DOWN SEDIT::LINE-LENGTH) -\\TEDIT.LINECACHE (LCBITMAP BITMAPWIDTH BITMAPHEIGHT) MKATOM (BASE XBASE INDIRECT-P OFFST OFFSET -LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) \\MAKESTACKP (EDFXP) MSNEXTWORD (SOUGHT ROOT ITEM MODIFIER -) PNAMESTREAMP (DEVICE) \\FM.WINDOWEXTENT (FM.USERDATA) \\DSPBOTTOMMARGIN.PRESS (PRBOTTOM IMAGEDATA) -PROCESS.WINDOW (PROCDELETED PROCWINDOW) SORT.NSADDRESSES.BY.DISTANCE (NSNET) \\SEQUIN.PUT (SEQFRNPORT -MYSENDSEQ MYRECEIVESEQ PUPBASE \#SEQTURNOVERS SEQRETRANSMITQ \#UNACKEDSEQS SEQINALLOC SEQSOCKET -SEQTIMER SEQPROCESS) CHANGE.NODEFONT.SIZE (NODEFONT GRAPH.FONTCHANGEFN) SEDIT::CONFLICTING-SELECTION? -(SEDIT::SELECTION) SEDIT::CHANGE-PACKAGE (SEDIT::OPEN-NODE-CHANGED? SEDIT::DISPLAY-WINDOW SEDIT::PROFILE -) %FILL-POINTER-STREAM-DEVICE-GETFILEPTR (F1) \\FM.UPDATEGROUPEXTENT (LEFT BOTTOM WIDTH HEIGHT) -\\DEFINEFONT.PRESS (IMAGEDATA PRESSFONTDIR PRNEXTFONT# PRMAXFONTSET) NSNET.DISTANCE (NSNET RTHOPCOUNT) - GETSEQUIN (INPUTQ SEQSTATE) MENUITEMREGION (ITEMS MENUGRID MENUBORDERSIZE LEFT MENUCOLUMNS WIDTH -BOTTOM MENUROWS HEIGHT) \\TRACKCURSOR (NEWMOUSESTATE) SEDIT::BACKSPACE (SEDIT::CARET-POINT -SEDIT::POINT-NODE SEDIT::BACK-SPACE SEDIT::NODE-TYPE SEDIT::POINT-INDEX SEDIT::POINT-STRING) -\\CHARWIDTH.HCPYMODE (DDCHARIMAGEWIDTHS IMAGEDATA) STKAPPLY (CCODEP DEFPOINTER ARGTYPE) WINDOW.BITMAP -(WIDTH HEIGHT) |\\PFAddRootDirEntry| (|countEntries| |entries|) SEDIT::NOTE-CHANGE-IN-SIMPLE ( -SEDIT::LINEAR-FORM CL:STRUCTURE STRING SEDIT::FONT SEDIT::PRIN-2? SEDIT::SUPER-NODE) \\INTERPRETER ( -DEFPOINTER MISCSTACKRESULT OVERHEADWORDS) DASSEM.MATCHVARS (VARINDEX) SI::UNWIND (CLINK FASTP SLOWP -\#ALINK \#CLINK INVALIDP USECNT FNHEADER FRAMENAME \#FRAMENAME IVAR DUMMYBF) PRINTNUM-TO-STRING (WIDTH - RADIX LEFTFLUSH PAD0) OPT.LBDEL (PREV NXT) \\TFBRAVO.HANDLE.HEADING (PARALOOKS FMTSPECIALX -FMTSPECIALY) PRINT10TO3 (TRANSOPERATION TRANSNSHOST TRANSSENDERNSHOST TRANSSENDERPUPHOST TRANSPUPHOST) - MSNEGATESET (REP) \\PROC.RESUME (FASTP SLOWP DUMMYBF) \\DRAWCURVE.IP (XCOORD YCOORD) ENVAPPLY (CCODEP - DEFPOINTER ARGTYPE) \\TEXTGETEOFPTR (TEXTLEN TEXTOBJ F3) IMAGEOBJPROP (IMAGEOBJFNS OBJECTDATUM -DISPLAYFN IMAGEBOXFN PUTFN GETFN COPYFN BUTTONEVENTINFN COPYBUTTONEVENTINFN WHENMOVEDFN WHENINSERTEDFN - WHENDELETEDFN WHENCOPIEDFN WHENOPERATEDONFN PREPRINTFN IMAGECLASSNAME) \\TEDIT.PEEKBIN.NEW.PAGE ( -REALFILE F1 ACCESSBITS FULLNAME FULLFILENAME CBUFSIZE EOFP DEVICE FATSTREAMP F4 CPPTR COFFSET CPAGE -CHARSLEFT F2) WINDOW.MOUSE.HANDLER (XCOORD YCOORD CURSOROUTFN CURSORINFN RIGHTBUTTONFN WINDOWENTRYFN -BUTTONEVENTFN CURSORMOVEDFN) FB.DEPTHCOMMAND (FBDEPTH) GETDEFFROMFILE (FILEGETDEF) -%SYNONYM-STREAM-DEVICE-GET-STREAM (F1) GRAPHOBJ.CHECKALIGN (GRAPHNODES) \\JISPEEK (IN.KANJIIN -OUT.KANJIIN) FB.HEADINGW.DISPLAY (RIGHT LEFT WIDTH INFOSTART FBDISPLAYEDDEPTH INFODISPLAYED INFOFORMAT - INFOLABEL INFOWIDTH) \\ENQUEUE (SYSQUEUEHEAD QLINK SYSQUEUETAIL) \\MAKEFUNARGFRAME (OVERHEADWORDS -EDFXP) ICONW.SHADE (BITMAPWIDTH BITMAPHEIGHT) COURIER.WRITE.STRING (FATSTRINGP INDIRECT-P TYPE-NUMBER -HIBYTE LOBYTE BASE XBASE OFFST OFFSET) \\TFBRAVO.FONT.FROM.CHARLOOKS (CLNAME CLSIZE CLBOLD CLITAL) -BLIPVAL (NEXTBLOCK FIRSTTEMP FIRSTPVAR FXSIZE NPVARWORDS PV PADDING INVALIDP CLINK FASTP SLOWP \#ALINK - \#CLINK) TEDIT.INSERT.UPDATESCREEN (THISLINE \\WINDOW CH# TXTDON\'TUPDATE LN L1 SELWINDOW POINT YBOT -BOTTOM WBOTTOM Y0 WTOP LHEIGHT) \\TEDIT.BLTCHAR (DDCHARSET DDCHARIMAGEWIDTHS DDOFFSETSCACHE) -\\VAROFFSET (OVERHEADWORDS NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER NTSIZE IVAR BLINK FASTP SLOWP -DUMMYBF \#BLINK BOUND FIRSTPVAR FXSIZE PVHI) RETEVAL (INVALIDP CLINK FASTP SLOWP \#ALINK \#CLINK) -\\RECLAIMSTACKP (EDFXP INVALIDP) LISTP (WORDINPAGE) TEDIT.MODIFYLOOKS (CLFONT CLULINE LTRUEDESCENT -CLOLINE CLSTRIKE CLINVERTED) PRINTPACKET (EPTYPE) OPT.PRDEL (PREV NXT) SEDIT::CLEAR-ALL-LINEAR-FORMS ( -SEDIT::SUB-NODES SEDIT::ROOT) SPY.FIND.TREE (NAME) \\TEDIT.FIXCHANGEDLINE (CHAR1 DIRTY CHARLIM LHEIGHT - YBOT PREVLINE WBOTTOM NEXTLINE DESCENT FMTBASETOBASE LFMTSPEC) BESTNSADDRESS (NSNET RTHOPCOUNT) -BLIPSCAN (INVALIDP CLINK FASTP SLOWP \#ALINK \#CLINK) |\\AddShade| (ITEMS SHADEDITEMS) \\BACKJISCHAR ( -IN.KANJIIN OUT.KANJIIN) SEDIT::ADD-MENU (SEDIT::DISPLAY-WINDOW) SETBLIPVAL (NEXTBLOCK FIRSTTEMP -FIRSTPVAR FXSIZE NPVARWORDS PV PADDING INVALIDP CLINK FASTP SLOWP \#ALINK \#CLINK) TOPW.REPAINTFN ( -LEFT RIGHT WIDTH) TB.REDISPLAY.ITEMS (TBWINDOW TI# TB#ITEMS) \\SETACCESS (DEVICE FDBINABLE BIN -FDBOUTABLE FDEXTENDABLE BOUT) \\TEDIT.NEWREGIONFN (XCOORD YCOORD) COURIER.WRITE.SEQUENCE.UNSPECIFIED ( -HIBYTE LOBYTE FATSTRINGP INDIRECT-P TYPE-NUMBER) \\GENERIC.DSPCREATE (SCDESTINATION DSPCREATEFN -BITMAPWIDTH) \\REALFRAMEP (FRAMENAME FNHEADER \#FRAMENAME) DASSEM.DSTOREFNDEF (OVERHEADWORDS OP#) -|\\PFPutRootDirectory| (|volumePage|) \\INSERTCH (TXTREADONLY FATSTRINGP INDIRECT-P TYPE-NUMBER OFFST -OFFSET BASE XBASE LENGTH FILL-POINTER \\INSERTNEXTCH \\INSERTLEN \\INSERTLEFT \\INSERTSTRING -\\INSERTPC \\INSERTFIRSTCH PCTB TEXTLEN PC PCOFF COUNT PLEN \\INSERTPCVALID NEXTPIECE PLOOKS -PPARALOOKS PSTR TXTHISTORY THLEN CARETLOOKS FMTSPEC PREVPIECE PPARALAST THACTION THCH# \\XDIRTY -TXTFILE PFATP) \\IPCURVE2 (SPLINEX SPLINEY SPLINEDX SPLINEDY SPLINEDDX SPLINEDDY SPLINEDDDX SPLINEDDDY - \#KNOTS IMAGEDATA IPVISLEFT IPVISRIGHT IPVISBOTTOM IPVISTOP) EXPRP (CCODEP PSEUDOCODEP DEFPOINTER) -\\GCMAPTABLE (PTR CASE DTDCNT0 HINUM LONUM DTDCNTLOC) \\TEXTGETFILEPTR (PIECE F5 CHARSLEFT F2 COFFSET -CBUFSIZE PLEN FATSTREAMP F4 TEXTLEN TEXTOBJ F3) \\STKARG (NARGS BLINK FASTP SLOWP DUMMYBF \#BLINK IVAR - PADDING NTSIZE OVERHEADWORDS FIRSTPVAR FXSIZE FNHEADER NLOCALS BOUND PVHI) FB.INFOMENU.WHENSELECTEDFN - (INFOMENUCHOICES) \\JISFILEOUTCHARFN (IN.KANJIIN OUT.KANJIIN EOLCONVENTION CHARPOSITION) -TTYDISPLAYSTREAM (IMAGEDATA |DDClippingTop| |DDClippingBottom| DDLINEFEED) \\JISIN (IN.KANJIIN -OUT.KANJIIN) OPT.UBDEL (OPARG) COURIER.WRITE.SEQUENCE (HIBYTE LOBYTE) \\DSPFONT.PRESS (IMAGEDATA -PRFONT FONTCHARSETVECTOR FONTSET# PRCURRFDE ELSTREAM FONT# WIDTHS PRSPACEFACTOR PRWIDTHSCACHE) -\\TEDIT.RESTARTFN (TEXTOBJ F3 \\DIRTY \\XDIRTY TXTFILE) BROWSE/LAYOUT/HORIZ/COMPACTLY (NODEID -FROMNODES) COMPAREDEFS (TOBEDUMPED FILEPROP NULLDEF) \\NSFILING.AFTER.LOGIN (FSNAMESTRING) -MICROCODEVERSION (|RVersion|) \\ADD.ROUTING.TABLE.ENTRY (RTNET#) GETDEFERR (NULLDEF) CHARACTER (XBASE -INDIRECT-P BASE) REALMEMORYSIZE (|NRealPages|) \\MEDW.GETWINDOWPROP (RIGHTBUTTONFN BUTTONEVENTFN -CURSORINFN CURSOROUTFN CURSORMOVEDFN DSP SCREEN SCROLLFN RESHAPEFN EXTENT REPAINTFN MOVEFN CLOSEFN -WINDOWENTRYFN PROCESS REG NEWREGIONFN WTITLE WBORDER SAVE) FB.MAKERIGIDWINDOW (HEIGHT) -\\SETLOCALNSNUMBERS (|NSHost0| |NSHost1| |NSHost2| NSHOST0 NSHOST1 NSHOST2) CL:MAKE-ECHO-STREAM ( -LINELENGTH OPENFILELST) RETAPPLY (INVALIDP CLINK FASTP SLOWP \#ALINK \#CLINK CCODEP DEFPOINTER ARGTYPE -) \\HANDLE.RAW.10TO3 (EPNETWORK TRANSOPERATION NSHNM2 NSHNM1 NSHNM0 TRANSNSADDRESS 3MBLENGTH -TRANSSENDERNSADDRESS TRANSSENDERPUPHOST NDBPUPHOST# TRANSPUPHOST) CLEARW (DSP) CL:MAKE-SYNONYM-STREAM -(LINELENGTH OPENFILELST) DBG::STKPTR-CCODE (FNHEADER) \\PROCESS.EVAL1 (PROCSTATUS) \\SEQUIN.PROCESS ( -SEQLOCK SEQSOCKET SEQRETRANSMITQ SEQCLOSEME PUPTYPE SEQSTATE ERRORPUPCODE PUPCONTENTS SEQBROKEN -SEQOPENERRORHANDLER SEQRETRANSMITTING \#UNACKEDSEQS SEQIDLETIMEOUTCOMPUTER SEQTIMEOUT SEQIDLEFN -SEQTIMER MYRECEIVESEQ SEQLASTRESTART SEQLASTRESTARTTIMER SEQTIMEDOUT) RESHADEITEM (MENUFONT CENTERFLG) - CL:MAKE-TWO-WAY-STREAM (LINELENGTH OPENFILELST) TEXTICON (LEFT BOTTOM) \\SHIFTJISFILEOUTCHARFN ( -EOLCONVENTION CHARPOSITION) \\FM.TRANSPOSEVERT (BOTTOM) \\TEXTEOFP (PIECE F5 COFFSET CBUFSIZE -CHARSLEFT F2 NEXTPIECE PLEN) REQUIREVERSION (|LVersion| |RVersion| |BVersion|) -FB.INFOMENU.SHADEINITIALSELECTIONS (ITEMS) \\EUCFILEOUTCHARFN (EOLCONVENTION CHARPOSITION) BCPLVERSION - (|BVersion|) PROCESS.APPLY (PROCDELETED PROCEVAPPLYRESULT) TEDIT.FORMATTEXTBOX (STATE REGIONSPEC -BOTTOM PAGEFOOTNOTELINES TOP HEIGHT LHEIGHT TEXTLEN PAGELINECACHE CACHE WIDTH STREAMHINT LMARK CHARLIM - FMTUSERINFO LFMTSPEC LEFTMARGIN FMTSPECIALX LEFT RIGHTMARGIN FMTSPECIALY 1STLN DESCENT FMTBASETOBASE -LEADBEFORE LEADAFTER LTRUEASCENT CHAR1 FMTNEWPAGEBEFORE FMTNEWPAGEAFTER YBASE) FB.SET.BROWSER.TITLE ( -FIXEDTITLE COUNTERWINDOW PATTERN) \\DECODETRANSITION (FLAGS SHIFTORLOCK SHIFT 1SHIFT 2SHIFT LOCK FONT -USERMODE1 USERMODE2 USERMODE3 SHIFTCODES CODES CTRL META INTERRUPTLIST) \\MEDW.DSPCREATE ( -SCDESTINATION WINFDEV WINIMAGEOPS IMAGEDATA BITMAPWIDTH) \\FM.TRANSPOSEHORZ (LEFT) U-CASE (FATPNAMEP -BASE XBASE INDIRECT-P PNAMEBASE PNAMELENGTH FATSTRINGP TYPE-NUMBER OFFST OFFSET LENGTH FILL-POINTER) -%TWO-WAY-STREAM-DEVICE-CLOSEFILE (F1 F2 OPENFILELST) SEDIT::COMMENT-OUT-SELECTION (SEDIT::SELECTION -SEDIT::CARET-POINT SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-TYPE SEDIT::DISPLAY-WINDOW -CL:STRUCTURE) PRESSWINDOW (PRLEFT IMAGEDATA PRWIDTH PRRIGHT PRBOTTOM PRHEIGHT PRTOP) -|\\SFFixY.HCPYMODE| (DDPILOTBBT DDFONT DDYOFFSET OTHERDEVICEFONTPROPS BITMAPBASE |DDDestination| -BITMAPRASTERWIDTH BITMAPHEIGHT |DDClippingTop| CHARSETBITMAP |DDClippingBottom|) \\PROCESS.APPLY1 ( -PROCSTATUS) \\BACKTRACE (BLINK FASTP SLOWP DUMMYBF \#BLINK NAMETABLE VALIDNAMETABLE NAMETABLE# -FNHEADER INVALIDP ALINK \#ALINK CLINK \#CLINK) \\PUTSYSBUF (READ WRITE) \\TEDIT.MARK.REVISION ( -RIGHTMARGIN YBOT LHEIGHT) COMP.LOOKUPCONST (OPARG) \\PRINTFRAME (NAMETABLE VALIDNAMETABLE NAMETABLE# -FNHEADER FIRSTTEMP FIRSTPVAR FXSIZE NPVARWORDS PV PADDING FAST INCALL NOPUSH USECNT SLOWP ALINK -\#ALINK NEXTBLOCK BLINK FASTP DUMMYBF \#BLINK NLOCALS BOUND PVHI LOOKEDUP BINDLO BINDINGPTR BINDHI) -OPT.LBMERGE (LEVEL FRAME) SEDIT::CHECK-SELECTION (SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END - SEDIT::POINT-NODE SEDIT::PENDING-DELETE?) FB.STARTUP (ITEMS) FB.DISPLAY.COUNTERS (COUNTERWINDOW -TOTALFILES TOTALPAGES DELETEDFILES DELETEDPAGES SHOWUNDELETED? PAGECOUNT?) \\ICONW.REPAINTFN ( -BITMAPWIDTH BITMAPHEIGHT) \\MEDW.TOTOPW (SCTOPW SCREEN) \\TRANSLATE.10TO3 (NDBTRANSLATIONS NSHNM2 -NSHNM1 NSHNM0 NDBPUPHOST#) DASSEM.DWRITEFN (OP# COMMONLISP) \\PRINTBF (NARGS IVAR PADDING RESIDUAL -USECNT) \\GETDEVICEFROMHOSTNAME (HOSTNAMEP) \\SEQUIN.CLOSE (SEQLOCK SEQSTATE) \\TEDITOUTCHARFN ( -CHARPOSITION) TEDIT.SETSEL (SEL TEXTLEN CHLIM CH# POBJ PCTB) \\SCANFORNTENTRY (OVERHEADWORDS NTSIZE) -FB.NEWINFOCOMMAND (BROWSERWINDOW INFOMENUW BOTTOM LEFT HEIGHT INFOMENUCHOICES) \\UNQUEUE.EVENT ( -EVLOCKQUEUETAIL EVENTQUEUETAIL PROCEVENTLINK) \\TEDIT.LOOKS (SEL \\WINDOW LEFT TOP CH# TEXTLEN SET -HEIGHT) \\HARDCURSORUP (CUIMAGE BITMAPBITSPERPIXEL BITMAPHEIGHT) SEDIT::FIND-NTH-STRUCTURE ( -SEDIT::SUB-NODES SEDIT::ROOT) \\TEDIT.COPY.LINEDESCRIPTOR (LEFTMARGIN RIGHTMARGIN LXLIM SPACELEFT -LHEIGHT CHAR1 CHARLIM CHARTOP CR\\END LDOBJ LHASPROT LFMTSPEC LTRUEDESCENT LTRUEASCENT ASCENT DESCENT -LHASTABS LMARK 1STLN LSTLN) OPT.JUMPTHRU (FRAME LEVEL PREV NXT OPNAME TAG OPARG) TEDIT.FORMATFOLIO ( -REGIONSPEC REGIONLOCALINFO PAGE#TEXT PAGE# FIRSTPAGE TEXTLEN WIDTH LEFTMARGIN LEFT RIGHTMARGIN CHARLIM - LHEIGHT BOTTOM DESCENT) \\FM.INITCORNERSFN (LEFT BOTTOM) \\ENQUEUE.EVENT/LOCK (EVLOCKQUEUETAIL -EVENTQUEUETAIL PROCEVENTLINK) \\CHARWIDTH.IP (IPSPACEWIDTH IMAGEDATA WIDTHS FONTCHARSETVECTOR IPFONT) -PRIN2 (COMMONLISP USESILPACKAGE LINELENGTH) SEDIT::DELETE-NODES (CL:DELETE SEDIT::NODE-TYPE -SEDIT::SUPER-NODE) \\CURSORBITSPERPIXEL (CUBITSPERPIXEL BITMAPBITSPERPIXEL CUIMAGE CUMASK) TOLINKS ( -TONODES) GETDEFCOM0 (MACRO) \\LOOKUPPUPNUMBER (XIPLENGTH PACKETEXCHANGEBODY PACKETEXCHANGEID -XIPCONTENTS PACKETEXCHANGETYPE PACKETEXCHANGEBODY0) \\FM.FILLWINDOW (LEFT BOTTOM WIDTH HEIGHT) -NEWLINE.PRESS (IMAGEDATA PRYPOS PRLINEFEED PRBOTTOM PRLEFT) \\CLOSEIPSTREAM (IPPAGESTATE IPDATA -IMAGEDATA) MSONPATH (FROM MSPATHOPTIONS TO AVOIDING NOTRACE TOPFLG) GRAPHBUTTONEVENTFN (GRAPHNODES) -SEDIT::STRUCTURE-FROM-SELECTION (SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::SUB-NODES - CL:STRUCTURE) CL:COMPILED-FUNCTION-P (TYP) INTERPRESS.OUTCHARFN (IPDATA IMAGEDATA NSTRANSTABLE -NSCHARSET IPSPACEWIDTH IPWIDTHSCACHE IPXPOS IPCHARVISIBLEP IPMINCHARRIGHT IPSHOWSTREAM IPRIGHT -IPCLIPINCLUSIVE IPVISRIGHT) |\\PFFindRootDirEntry| (|file| |entries|) CL:PEEK-CHAR (NOTXCCS INCCODEFN -BACKCHARFN PEEKCCODEFN EOLCONVENTION) \\CLOSEFILE (ACCESSBITS IMCLOSEFN IMAGEOPS DEVICE CLOSEFILE -UNREGISTERFILE) \\CHANGECHARSET.HCPYMODE (DDPILOTBBT FONTCHARSETVECTOR DDFONT WIDTHS OFFSETS -IMAGEWIDTHS CHARSETBITMAP BITMAPRASTERWIDTH CHARSETASCENT CHARSETDESCENT DDCHARSETASCENT -DDCHARSETDESCENT BITMAPBASE DDCHARHEIGHTDELTA) SEDIT::CREATE-PRETTY-PRINT-ENV (SEDIT::INDENT-BASE -SEDIT::INDENT-STEP SEDIT::EM-WIDTH SEDIT::MAX-WIDTH) \\TEDIT.MAINW (\\WINDOW MENUFLG) MSMATCHRATING ( -SOUGHT ITEM TYPE REP) CL:PROBE-FILE (FULLNAME FULLFILENAME) \\DELETEFILE (DELETEFILE) -\\CANONICALIZE.NSADDRESS (NSHNM2 NSHNM1 NSHNM0) \\TEXTINIT (IMXPOSITION IMAGEOPS IMYPOSITION) -OBTAIN.MONITORLOCK (MLOCKOWNER PROCOWNEDLOCKS MLOCKPERPROCESS) TEDIT.FIND (TEXTLEN SET SEL POINT CH# -CHLIM) GETDEFCURRENT (GETDEF NULLDEF TOBEDUMPED FILEPROP FILEDATES) |\\PFGetRootDirectory| ( -|volumePage|) PRESS.BITMAPSCALE (HEIGHT WIDTH) TEDIT.FORMATHEADING (REGIONSPEC REGIONLOCALINFO -PAGEHEADINGS TEXTOBJ PPARALOOKS F3 TEXTLEN PLEN WIDTH LEFTMARGIN LEFT RIGHTMARGIN LHEIGHT BOTTOM -DESCENT CHARLIM) \\BLKEXPONENT.UFN (EXPONENT) MOVE.TO.START.OF.WORD (END) PROCESS.EVAL (PROCDELETED -PROCEVAPPLYRESULT) \\NOTE.10TO3 (NDBTRANSLATIONS PUPHOST# NSHNM2 NSHNM1 NSHNM0) DASSEM.DASSEM (COMTYPE - ARGS CODE CLEAR TOPFRAME OPARG OPNAME VARS VARINDEX OP# FREEVARINDEX NVALS NNILS) -\\TEDIT.UNPARSE.CHARLOOKS.LIST (CLSTYLE CLUSERINFO CLINVERTED CLFONT CLULINE CLSTRIKE CLOLINE -CLPROTECTED CLSELHERE CLINVISIBLE CLOFFSET) \\DEVICEEVENT (EVENTFN OPENP NONDEFAULTDATEFLG) -CL::%STATS-OBJECT-DIFFERENCE (SWAPWAITTIME GCTIME DISKIOTIME PAGEFAULTS SWAPWRITES DISKOPS) -SEDIT::CREATE-PRELINEARIZED-NODE (SEDIT::DEPTH SEDIT::SUB-NODES SEDIT::SUB-NODE-INDEX) -\\TEDIT.APPLY.PAGEFORMATTING (\\TEXTOBJ CH# SCRATCHSEL TXTPAGEFRAMES \\XDIRTY TXTFILE) EDITFROMFILE ( -EDITDEF DESCRIPTION) MSSIMPLESET (ID QUOTED) \\HARDCURSORPOSITION (NEWMOUSESTATE) -\\FM.RESETCLIPPINGREGION (LEFT BOTTOM) \\CURSORDESTINATION (BITMAPBITSPERPIXEL CUIMAGE NEWMOUSESTATE -BITMAPBASE BITMAPWIDTH BITMAPHEIGHT BITMAPRASTERWIDTH) FULLPRESSBITMAP (HEIGHT WIDTH IMAGEDATA LEFT -BOTTOM) TEDIT.FORMATPAGE (STATE PAGE# REGIONLOCALINFO REGIONSPEC TEXTLEN THISLINE FMTPARATYPE -PPARALOOKS PCTB FMTUSERINFO OTHERPROPS HEIGHT WIDTH CHARLIM REGIONSUBBOXES CHNO MINPAGE# MAXPAGE# -PAGE#GENERATOR PAGECOUNT) \\SOFTCURSORUP (CUIMAGE CUMASK BITMAPWIDTH BITMAPHEIGHT BITMAPBITSPERPIXEL -BITMAPBASE BITMAPRASTERWIDTH) CL:READ-FROM-STRING (GETFILEPTR DEVICE) SI::MONITOR-UNWIND (MLOCKOWNER -PROCOWNEDLOCKS MLOCKLINK MLOCKQUEUETAIL PROCEVENTLINK) \\MEDW.REDISPLAYW (DSP) \\SOFTCURSORUPCURRENT ( -CUBITSPERPIXEL BITMAPBITSPERPIXEL CUIMAGE BITMAPRASTERWIDTH BITMAPBASE) IRM.LOOKUP (WINDOW) EQCLOOKS ( -CLFONT FONTCLASSNAME CLPROTECTED CLINVISIBLE CLSELHERE CLCANCOPY CLULINE CLOLINE CLINVERTED CLSTRIKE -CLOFFSET CLSMALLCAP CLSTYLE CLUSERINFO) OPT.XVARSCAN1 (VARS PARENT) \\EVENT.DEFPRINT (EVENTNAME) -CL:READ-BYTE (EOFP DEVICE) \\MONITORLOCK.DEFPRINT (MLOCKNAME) \\CCODEARGLIST (NA NTSIZE NATIVE STARTPC - OVERHEADWORDS ARGTYPE) \\HANDLE.NS.ROUTING.INFO (XIPFIRSTDATAWORD EPNETWORK XIPLENGTH XIPCONTENTS -NETTYPE \#HOPS NET#LO NET#HI RTNET# LONUM HINUM NET# RTHOPCOUNT RTNDB RTGATEWAY# RTRECENT RTTIMER) -CLOSESEQUIN (SEQEVENT SEQSTATE) \\GENERATEFILES (GENERATEFILES) CL:READ-LINE (EOFP DEVICE) -FB.SETNEWPATTERN (BROWSERWINDOW) PACK* (XBASE INDIRECT-P BASE PNAMEBASE PNAMELENGTH FATPNAMEP LENGTH -FILL-POINTER) \\EP.PUT.AUX (EPPLIST) \\CCODEIVARSCAN (BYTESWAPPED) RELEASE.MONITORLOCK (MLOCKOWNER -PROCOWNEDLOCKS MLOCKLINK MLOCKQUEUETAIL PROCEVENTLINK) \\MAKE.PROCESS1 (PROCFX ALINK \#ALINK FASTP -SLOWP DUMMYBF) \\BLTSHADE.IP (IPVISIBLEREGION IMAGEDATA) CL:RENAME-FILE (FULLNAME FULLFILENAME) -\\PROCESS.RELEASE.LOCKS (PROCOWNEDLOCKS) SEDIT::SHOW-CARET (SEDIT::CARET-POINT) -\\TEDIT.TEXTBIN.NEW.PAGE (REALFILE F1 ACCESSBITS FULLNAME FULLFILENAME CBUFSIZE CPPTR COFFSET CPAGE -CHARSLEFT F2 FATSTREAMP F4) \\PROCESS.MOVEFRAME (|MiscFXP| DUMMYBF SIZE NEXTBLOCK RESIDUAL USECNT IVAR - FLAGS BLINK FASTP SLOWP \#BLINK \#ALINK VALIDNAMETABLE NAMETABHI NAMETABLO) \\TEDIT.SELECT.CHARACTER -(YBOT XKERN YBASE YDESC XSIZE WRIGHT YSIZE STREAMHINT SELOBJ) \\GENERATENEXTFILE (NEXTFILEFN -GENFILESTATE) BRECOMPILE3 (COMPFILESTREAM COMPFILEMAP) NEW/INSTANCE/OF/GRAPHNODE (NODEID NODELABEL -NODEFONT NODEWIDTH NODEHEIGHT NODEBORDER NODELABELSHADE TONODES) TOGGLE/DIRECTEDFLG (DIRECTEDFLG) -\\NSRANDOM.OPENFILE (ACCESSBITS FULLFILENAME DEVICEINFO) DISPLAYLINK (SIDESFLG DIRECTEDFLG) -\\GENERATEFILEINFO (FILEINFOFN GENFILESTATE) FB.GET.SORT.MENU (SORTMENU INFODISPLAYED) BSPINPUTSTREAM -(BSPSOC F1 BSPINPUTSTREAM) FB.CREATE.FILEBUCKET (PATTERNPARSED? NAMESTART VERSIONLESSNAME -NOSUBDIRECTORIES PAGECOUNT? SIZEINDEX SORTATTRIBUTE SORTINDEX SORTBYDATE) \\TEDIT.FORMAT.FOUNDBOX? ( -STATE REQUIREDREGIONTYPE REGIONTYPE PAGECOUNT) DECODE-NS-STRING (BASE XBASE INDIRECT-P OFFST OFFSET) -\\GENERIC.READCCODE (NOTXCCS INCCODEFN BACKCHARFN EOLCONVENTION) \\MEDW.SHAPEW (RESHAPEFN WIDTH HEIGHT - LEFT BOTTOM NEWREGIONFN) \\TRANSLATE.3TO10 (NDBTRANSLATIONS NDBPUPHOST#) BRHL/LAYOUT/DAUGHTERS ( -NODEPOSITION YCOORD NODEID FROMNODES) \\FM.UNSCROLLWINDOW (LEFT BOTTOM) \\PEEKBIN (PEEKBIN DEVICE) -OPENPRSTREAM (LEFT BOTTOM WIDTH HEIGHT IMAGEOPS) \\GETSTREAM (KEYBOARDSTREAM F2 DSP) SEDIT::CREATE-NODE - (SEDIT::DEPTH SEDIT::SUB-NODES SEDIT::SUB-NODE-INDEX) \\PROCESS.DEFPRINT (PROCNAME) -\\TEDIT.CLEAR.SCREEN.BELOW.LINE (WBOTTOM WRIGHT YBOT) OPT.XVARSCAN (VARS OPNAME OPARG PREV) -\\RECLAIMCODEBLOCK (STARTPC) FB.INSERT.FILE (TABLEBROWSER SORTBY TIDATA NOSUBDIRECTORIES -TIUNSELECTABLE TI# FILENAME SUBDIREND) SNAPW (SCREEN REGION SCDESTINATION LEFT BOTTOM SAVE WIDTH -HEIGHT) \\ENQUEUE.TIMER (PROCTIMERLINK PROCWAKEUPTIMER) \\UNQUEUE.TIMER (PROCTIMERLINK) -BRHL/MOVE/RIGHT (NODEWIDTH NODEPOSITION NODELABEL XCOORD) \\GETFILENAME (GETFILENAME) GRAPHADDLINK ( -GRAPH.ADDLINKFN FROMNODES NODEID TONODES) \\TEXTSETEOF (PAGE OFFSET) FB.INSERT.SUBDIRECTORIES ( -FILENAME SUBDIREND TIDATA) \\TEDIT.GET.CHARLOOKS (PFATP PLEN PFPOS) CL:VALUES (PC FNHEADER CLINK FASTP - SLOWP \#ALINK \#CLINK) SEDIT::CREATE-GAP-NODE (SEDIT::LINEAR-ITEM) \\RECLAIMARRAYBLOCK (PASSWORD -INUSE GCTYPE TRAILER ARLEN) CREATEHASHFILE (FULLNAME FULLFILENAME |ByteStream|) COMP.CONST (OPNAME -OPARG) \\SIMULATE.UNBIND (NEXTBLOCK FIRSTPVAR FXSIZE BINDMARKP BINDLASTPVAR BINDNVALUES BINDNEGVALUES -FASTP SLOWP DUMMYBF \#ALINK) OPT.SCANOPT (PREV OPNAME OPARG NXT) SEDIT::TTYEXITFN ( -SEDIT::OPEN-NODE-CHANGED?) \\FM.RESHAPEFN (WIDTH HEIGHT) \\OPENFILE (DEVICE OPENFILE EPAGE EOFFSET -REGISTERFILE) \\TTYBACKGROUND (KEYBOARDSTREAM F2) CL:VALUES-LIST (PC FNHEADER CLINK FASTP SLOWP -\#ALINK \#CLINK) \\GETSYSBUF (READ WRITE) \\CAR.UFN (CAR CDRCODE CARFIELD) SEDIT::SUBSTITUTE-OBJ ( -SEDIT::OPEN-NODE-CHANGED? SEDIT::DISPLAY-WINDOW SEDIT::SELECTION) \\WRITEPRESSBITMAP (WIDTH HEIGHT -LEFT BOTTOM IMAGEDATA BITMAPRASTERWIDTH BITMAPHEIGHT ELSTREAM PRXPOS PRYPOS HIBYTE LOBYTE BITMAPBASE) -WAIT.FOR.TTY (PROCNAME) SPYOBJ.DISPLAY (OBJECTDATUM) DBG::NEAR-BY-REGION (WIDTH HEIGHT LEFT BOTTOM) -\\PROCESS.EVENTFN (PROCAFTEREXIT PROCNAME) XIPAPPEND.CELL (XIPLENGTH XIPCONTENTS) NESTED.SUBMENU ( -CENTERFLG MENUFONT MENUBORDERSIZE MENUOUTLINESIZE WHENHELDFN WHENUNHELDFN SUBITEMFN) NTYPX (PAGE#) -\\TEDIT.INSPECTCODE (FRAMENAME \#FRAMENAME) \\NSYSBUFCHARS (READ WRITE) \\GETKEY (PROCTYPEAHEAD) -\\GENERIC.OUTFILEP (GETFILENAME) \\SAVESYSBUF (PROCTYPEAHEAD) FIND.START.OF.WORD (NSCHARHASH STOPATOM -CPXREALCHAR) CHARSET (IMCHARSET IMAGEOPS) COMP.USERFN (OPARG) PRINTROUTINGTABLE (RTHOPCOUNT RTNET# -RTGATEWAY# RTRECENT RTTIMER) OPT.SETUPOPT (OPNAME TAG OPARG) SEDIT::UPDATE-TITLE (SEDIT::CHANGED-STRUCTURE? - SEDIT::ICON-TITLE) \\CHECKAPPLY* (CCODEP DEFPOINTER ARGTYPE) \\CDR.UFN (CDR CDRCODE PAGEBASE CARFIELD -) \\NSFILING.GETFILEINFO (RANDOMACCESSP ACCESSBITS NSFILING.HANDLE F4 NSHATTRIBUTES -NSFILING.CONNECTION F3) CL::VALUES-LIST-UFN (CLINK FASTP SLOWP \#ALINK \#CLINK PC FNHEADER) \\SYSBUFP -(READ PROCTYPEAHEAD) \\TEXTOUTCHARFN (TEXTLEN TEXTOBJ F3) CLOSEW (CLOSEWFN SCREEN) \\DRAWCURVE.PRESS ( -XCOORD YCOORD) FB.SORTCOMMAND (TABLEBROWSER NOSUBDIRECTORIES INFODISPLAYED NAMESTART TIDATA FILEINFO -HASDIRPREFIX STARTOFNAME HEADINGWINDOW) MB.NWAYBUTTON.SELFN (\\TEXTOBJ) \\PEEKSYSBUF (READ -PROCTYPEAHEAD) MAKEFILES (TOBEDUMPED FILEPROP) \\HTFIND (NOREFCNT PAGE# EMPTY LINKP HIBITS CNT STKCNT -FREEPTR NEXTFREE NXTPTR CONTENTS LINKPTR) TRACKW (LEFT REG BOTTOM) \\MEDW.SHRINKW (SCREEN LEFT BOTTOM) - \\TEDIT.ACTIVE.WINDOWP (EDITFINISHEDFLG) \\UNWIND.UFN (NEXTBLOCK FIRSTPVAR FXSIZE BINDMARKP -BINDLASTPVAR BINDNVALUES BINDNEGVALUES) CL::%PRINT-TIMING-INFO (SWAPWAITTIME GCTIME DISKIOTIME -NETIOTIME PAGEFAULTS SWAPWRITES DISKOPS) SEDIT::CREATE-CONSTANT-STRINGS (SEDIT::DEFAULT-FONT -SEDIT::KEYWORD-FONT) SEDIT::UNDO (SEDIT::OPEN-NODE-CHANGED? SEDIT::UNDO-LIST SEDIT::DISPLAY-WINDOW -SEDIT::UNDO-UNDO-LIST SEDIT::SELECTION SEDIT::CARET-POINT) CL::VALUES-UFN (CLINK FASTP SLOWP \#ALINK -\#CLINK PC FNHEADER) OPT.POSTOPT (OPNAME OPARG) SEDIT::BUILD-WINDOW (SEDIT::ENVIRONMENT SEDIT::ICON-TITLE - SEDIT::EDIT-TYPE LEFT BOTTOM RIGHT WIDTH TOP HEIGHT SEDIT::DEFAULT-FONT SEDIT::DEFAULT-LINE-SKIP) -SETFILEINFO (SETFILEINFO DEVICE GETFILENAME) \\RPLACA.UFN (CDRCODE CARFIELD) XIPAPPEND.STRING ( -XIPLENGTH XIPCONTENTS) \\IOMODEP (ACCESS) \\FM.REDISPLAYMENU (LEFT BOTTOM WIDTH HEIGHT FM.USERDATA) -\\RPLACD.UFN (CDRCODE CARFIELD PAGEBASE DBLWORD# CELLINPAGE WORDINPAGE CNT NEXTCELL NEXTFREE) -\\INSPECT/CODE/REPAINTFN (XCOORD YCOORD) FB.INCREASING.VERSION (VERSION TIDATA) \\RESHOWBORDER1 (REG -SAVE WIDTH HEIGHT DSP WTITLE SCTITLEDS SCREEN BITMAPBITSPERPIXEL SCDESTINATION LEFT BOTTOM BITMAPWIDTH -) BREAK.PROCESS (PROCDELETED) \\TFBRAVO.SPREAD.LOOKS (RUNLOOKS) BRHL/LAYOUT (NODEPOSITION TONODES -NODEWIDTH NODEHEIGHT) TOGGLE/SIDESFLG (SIDESFLG) \\NSRANDOM.CLOSEFILE (NSFILING.CONNECTION F3 -FSSESSIONLOCK ACCESS ACCESSBITS DEVICEINFO DEVICE) \\ALLOCLOCKED (WORDINPAGE) SEDIT::STRINGWIDTH ( -OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) \\TEXTOPENF-SUBTREE ( -PCE PFILE ACCESSBITS LO HI) \\ASSIGNDATATYPE1 (DTDPTRS DTDSIZE WORDINPAGE DTDTYPEENTRY) -FB.ALPHABETIC.ATTR (SORTVALUE TIDATA) \\FINDKEY.UFN (BLINK FASTP SLOWP DUMMYBF \#BLINK IVAR) -TEDIT.SCAN.LINE (WIDTHS CHARS LOOKS TEXTLEN DESC CHAR1 FMTHARDCOPY LFMTSPEC LEFTMARGIN BASE LEN -CLSELHERE CLPROTECTED SCRATCHSEL YBOT LN L1 \\WINDOW CHARLIM) KEYACTION (INTERRUPTLIST FLAGS CODES -ARMED) TTYIN.LASTINPUT (OLDTAIL START FIRSTLINE) MENU (IMAGE) \\MEDW.RELMOVEW (LEFT XCOORD BOTTOM -YCOORD) TEDIT.CREATEW (HEIGHT) BRHC/OFFSET (NODEPOSITION YCOORD TONODES) \\BIN (STRMBINFN) -\\NSFILING.SETFILEINFO (RANDOMACCESSP NSFILING.HANDLE F4 NSHDATUM FULLFILENAME) \\SCALEDBITBLT.IP ( -IPVISIBLEREGION IMAGEDATA LEFT BOTTOM WIDTH HEIGHT) ADD/AND/DISPLAY/LINK (NODEID) -\\PAGED.REVALIDATEFILELST (OPENP UNREGISTERFILE) \\REVALIDATEFILE (REOPENFILE DEVICE FULLFILENAME -ACCESS F1 F2 F3 F4 F5 FW6 FW7 VALIDATION EPAGE EOFFSET) \\SPP.HANDLE.INPUT (SPPTERMINATEDP -SPPMYNSOCKET SPPSEQNO SPPACKEDSEQNO SPPRETRANSMITTING XIPTYPE ERRORXIPCODE XIPCONTENTS -SPPOTHERXIPHANDLER SPPESTABLISHEDP SOURCECONID SPPDESTID DESTCONID SPPSOURCEID SEQNO SPPACKNO -SPPACCEPTNO SPPSERVERFLAG ATTENTION SYSTEMPACKET XIPLENGTH ACKNO ALLOCNO SPPOUTPUTALLOCNO -SPPALLOCATIONEVENT SENDACK SPPACKREQUESTED SPPROUNDTRIPTIME SPPACKREQTIME) \\PRINT-REVALIDATION-RESULT - (FULLNAME FULLFILENAME) \\RENAMEFILE (RENAMEFILE) \\UNQUEUE (SYSQUEUEHEAD QLINK) FORGETPAGES (BUFFS -FILEPAGE# NOREFERENCE USERMAPPED CBUFPTR VMEMPAGE BUFFERNEXT) \\BOUT (STRMBOUTFN) TTRACKMOUSE ( -FIRSTCOL START END CPXWIDTH) \\MISCN.UFN (IVAR MISCN-MVS) \\CHECK.PQUEUE (PROCQUEUE PQLAST PQNEXT -NEXTPROCHANDLE) XIPAPPEND.WORD (XIPLENGTH XIPCONTENTS) \\CONS.UFN (DTDCNTLOC DTDNEXTPAGE CNT NEXTCELL -NEXTFREE PAGEBASE NEXTPAGE) \\RPLCONS (PAGEBASE CNT CDRCODE NEXTCELL NEXTFREE DTDCNTLOC DBLWORD# -CELLINPAGE WORDINPAGE) \\PAGED.REVALIDATEFILE (REOPENFILE DEVICE FULLFILENAME ACCESS F1 F2 F3 F4 F5 -FW6 FW7 VALIDATION EPAGE EOFFSET) UNMAKEHARDCOPYMODESTREAM (WIDTH) \\HANDLE.RAW.3TO10 (EPNETWORK -TRANSOPERATION TRANSPUPHOST NDBPUPHOST# 10MBLENGTH TRANSSENDERPUPHOST) PPROC1 (PROCSYSTEMP PROCNAME -PROCPRIORITY PROCSTATUS WAKEREASON PROCTIMERSET PROCWAKEUPTIMER PROCEVENTORLOCK MLOCKNAME EVENTNAME) -MB.MARGINBAR.TABTRACK (MARUNIT TABX) LINE.LESSP (Y ORIG DIFF) PPROC (PQNEXT NEXTPROCHANDLE PQLOWER -PROCTIMERLINK) CL:TRUENAME (NAMEDP FULLFILENAME) FB.INCREASING.NUMERIC.ATTR (SORTVALUE TIDATA) -CL:UNREAD-CHAR (NOTXCCS BACKCHARFN) FB.CANONICAL.DIRECTORY (PROMPTWINDOW) SEDIT::UNDO-ATOM-CHANGE ( -CL:STRUCTURE SEDIT::NODE-TYPE) \\KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS (DEVCONFIG) RESHOWBORDER ( -WBORDER) \\BUFFERED.REVALIDATEFILE (REOPENFILE DEVICE FULLFILENAME ACCESS F1 F2 F3 F4 F5 FW6 FW7 -VALIDATION EPAGE EOFFSET) \\MEDW.MOVEW (REG MOVEFN SCREEN SCREGION SCWIDTH SCHEIGHT LEFT BOTTOM WIDTH -HEIGHT XCOORD YCOORD SCDESTINATION SAVE) \\STKSCAN (ALINK \#ALINK INVALIDP VCELL NAMETABLE -VALIDNAMETABLE NAMETABLE# FNHEADER NTSIZE OVERHEADWORDS BYTESWAPPED IVAR BLINK FASTP SLOWP DUMMYBF -\#BLINK FIRSTPVAR FXSIZE BOUND PVHI LOOKEDUP BINDLO BINDINGPTR BINDHI) \\ENDPAGE.PRESS (ELSTREAM -IMAGEDATA GETFILEPTR DEVICE HIBYTE LOBYTE) KEYACTIONTABLE (INTERRUPTLIST FLAGS CODES ARMED) RESTOREMAP - (BUFFS FILEPAGE# NOREFERENCE USERMAPPED CBUFPTR VMEMPAGE BUFFERNEXT) \\KEYBOARDEVENTFN (DEVCONFIG) -GETINTERRUPT (INTERRUPTLIST) SEDIT::GET-USER-STRING (SEDIT::DISPLAY-WINDOW) TWOD.TRACKCURSOR (ROWPROP -COLUMNPROP ELTBOTTOM ELTLEFT ELTWIDTH) GETWINDOWPROP (GETWINDOWPROPFN SCREEN) \\TRUNCATEFILE ( -TRUNCATEFILE DEVICE) \\RESTLIST.UFN (BLINK FASTP SLOWP DUMMYBF \#BLINK IVAR) \\FILE-CONFLICT ( -FULLFILENAME OPENP ACCESS) \\BUFFERED.REVALIDATEFILELST (OPENP UNREGISTERFILE) SEDIT::COPY-NODE ( -SEDIT::NODE-TYPE CL:STRUCTURE SEDIT::SUB-NODE-INDEX SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH -SEDIT::UNASSIGNED SEDIT::SUB-NODES SEDIT::LINEARIZE SEDIT::LINEAR-FORM SEDIT::ACTUAL-WIDTH -SEDIT::ACTUAL-LLENGTH SEDIT::COPY-STRUCTURE) REHASHFILE (|File| |ItemCopyFn| |ValueType|) -\\TEDIT.ADJUST.LINES (WBOTTOM YBOT WRIGHT LHEIGHT YBASE DESCENT NEXTLINE) SEDIT::COMPUTE-COMMENT-COLUMN - (SEDIT::ENVIRONMENT SEDIT::COMMENT-WIDTH-PERCENT SEDIT::INIT-COMMENT-SEPARATION) \\PROCESS.MAKEFRAME -(PROCFX |StackBase| MISCSTACKRESULT PROCSTATUS) \\SPP.NOT.RESPONDING (SPPINACTIVECOUNT SPPESTABLISHEDP - SPPACTIVITYTIMER SPPROUNDTRIPTIME) FB.EXPUNGECOMMAND (TABLEBROWSER) SETINTERRUPT (INTERRUPTLIST) -\\QUEUELENGTH (SYSQUEUEHEAD QLINK) \\SHAPEW2 (REG DSP WBORDER SCREEN WIDTH HEIGHT BITMAPBITSPERPIXEL -SCDESTINATION SAVE RESHAPEFN) SCROLLBYREPAINTFN (LEFT BOTTOM WIDTH HEIGHT SCREGION SCREEN SCWIDTH -SCHEIGHT IMAGEDATA PRIGHT PTOP) \\TFBRAVO.WRITE.RUNS (RUNS PARALOOKS RUNLENGTH) TTBEFOREPOS (ROWPOS -COLPOS END ROW) \\MEDW.CLOSEW (DSP SCDESTINATION REG SAVE NEXTW) SPYOBJ.LABEL (OBJECTDATUM CACHEDLABEL -) \\TYPECHECK.UFN (DTDNAME DTDSUPERTYPE) \\KEYACTION1 (FLAGS CODES SHIFTCODES ALTGRAPHCODES -DEADKEYLIST) EQL (LOWORD HIWORD) \\UPDATE.PBT.RASTERWIDTHS (PBTDESTHI PBTDESTLO) \\NOFILESINFOFN ( -NOFILENAME) SEDIT::NORMALIZE-SELECTION (SEDIT::SELECTION SEDIT::DISPLAY-WINDOW SEDIT::SELECT-START-LINE -) FB.DECREASING.NUMERIC.ATTR (SORTVALUE TIDATA) \\DRAWLINE.UFN (BITS) \\TYPEMASK.UFN (PAGE#) COPYGRAPH - (GRAPHNODES NODEPOSITION) SEDIT::CONTAINS? (SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END -SEDIT::SUB-NODE-INDEX SEDIT::SUPER-NODE SEDIT::DEPTH) \\STORE.N.UFN (NEXTBLOCK) WHICHW (XCOORD YCOORD -SCTOPW REG NEXTW) \\SHOWTEXT (\\WINDOW WRIGHT) \\PAGED.REVALIDATEFILES (DEVICE UNREGISTERFILE) -EXTEND/TRANSITION/CHAIN (YCOORD XCOORD) \\FIXDLINES (TXTREADONLY \\WINDOW NEXTLINE CHARLIM CHAR1 -CHARTOP CR\\END PREVLINE SEL SHIFTEDSEL MOVESEL DELETESEL) \\COPY.N.UFN (NEXTBLOCK) -\\NSRANDOM.WRITEPAGES (NSFILING.CONNECTION F3 NSFILING.SERVER.LENGTH F2 NSFILING.HANDLE F4 EPAGE -EOFFSET REVALIDATEFLG NSHATTRIBUTES) |\\PFInitializeVols| (|subVolumeCount|) \\NOFILESNEXTFILEFN ( -NOFILETYPE NOFILEPATTERN) \\RETURN (CLINK FASTP SLOWP \#ALINK \#CLINK) \\ENVCALL.UFN (MISCSTACKRESULT) - \\PROCESS.MAKEFRAME0 (NEXTBLOCK SIZE FLAGS STKMIN DEFPOINTER) \\ARG0 (BLINK FASTP SLOWP DUMMYBF -\#BLINK NARGS IVAR PADDING) \\NSRANDOM.READPAGES (NSFILING.CONNECTION F3 EPAGE EOFFSET -NSFILING.PAGE.CACHE F1 NSFILING.LAST.REQUEST FW6 ACCESSBITS NSFILING.SERVER.LENGTH F2) -\\DSPYPOSITION.IP (IPYPOS IPDATA IMAGEDATA) \\MAIKO.ETHER-INTERRUPT (DLFIRSTICB NDBCSB 10MBTYPE) -DSPFILL (LEFT BOTTOM WIDTH HEIGHT) \\PRESSCURVE2 (IMAGEDATA ELSTREAM ELSTARTBYTE SPLINEX SPLINEY -SPLINEDX SPLINEDY SPLINEDDX SPLINEDDY SPLINEDDDX SPLINEDDDY \#KNOTS) \\INSPECT/CODE/RESHAPEFN (DDFONT -IMAGEDATA) \\MYARGCOUNT (NARGS BLINK FASTP SLOWP DUMMYBF \#BLINK IVAR PADDING) ALIGNMENTNODE ( -GRAPHNODES) SEDIT::REDO (SEDIT::UNDO-UNDO-LIST SEDIT::DISPLAY-WINDOW SEDIT::SELECTION SEDIT::CARET-POINT -) TEDIT.SELECT.LINE.SCANNER (WRIGHT THISLINE TEXTLEN NEXTLINE YBOT BOTTOM SCRATCHSEL LN L1 \\WINDOW -LHASPROT FORMATTEDP CHAR1 CHARLIM CR\\END PREVLINE PTOP HEIGHT CH# CHLIM LEFTMARGIN LXLIM XLIM X0) -SEDIT::COMPUTE-SELECTION-POSITION-DEFAULT (SEDIT::SUB-NODES SEDIT::SELECT-NODE SEDIT::SELECT-START -SEDIT::SELECT-END SEDIT::START-X SEDIT::FIRST-LINE SEDIT::ACTUAL-LLENGTH SEDIT::LAST-LINE) -RESHAPEBYREPAINTFN (WIDTH HEIGHT LEFT BOTTOM PRIGHT RIGHT PTOP TOP) \\AGE.ROUTING.TABLE (RTHOPCOUNT -RTTIMER RTRECENT) SEDIT::TRANSLATE-CHARS (MULTESCAPECHAR OFFST INDIRECT-P OFFSET BASE XBASE LENGTH -FILL-POINTER FATSTRINGP TYPE-NUMBER) RAISE/TRANSITION/CHAIN (YCOORD) \\DELETECH (TXTREADONLY -\\INSERTFIRSTCH TEXTLEN PCTB \\INSERTPCVALID \\INSERTNEXTCH \\INSERTPC \\INSERTLEN TXTHISTORY THLEN -PREVPIECE PLEN NEXTPIECE POBJ \\WINDOW PTREENODE \\XDIRTY TXTFILE) SPYOBJ.HEIGHT (OBJECTDATUM PERCENT) - EXTENDPASTVERTBOUNDARIES (BOTTOM TOP HEIGHT) XIPAPPEND.BYTE (XIPLENGTH XIPCONTENTS) \\INVERTITEM ( -MENUGRID MENUBORDERSIZE) NESTED.SUBMENU.POS (ITEMS MENUGRID MENUBORDERSIZE IMAGEDATA LEFT MENUCOLUMNS -WIDTH DDXOFFSET BOTTOM MENUROWS HEIGHT DDYOFFSET) \\DOHELPINTERRUPT1 (PROCNAME) CONTROL-T (DISKIOTIME -NETIOTIME GCTIME SWAPWAITTIME) DELFROMCOM (DELETE) SEDIT::STRINGIFY-ATOM (CL:STRUCTURE) -PRETTYFILEINDEX (DEVICE) \\SPP.RETRANSMIT.NEXT (SPPRETRANSMITTING SPPRETRANSMITQ SPPOUTPUTALLOCNO -XIPCONTENTS SPPSEQNO) GETFILEINFO (ACCESS GETFILEINFO DEVICE ACCESSBITS BYTESIZE EOLCONVENTION -MAXBUFFERS ENDOFSTREAMOP GETFILENAME) SEDIT::GETKEY (PROCTYPEAHEAD SEDIT::CARET-POINT SEDIT::DISPLAY-WINDOW -) FB.MAYBE.EXPUNGE (DELETEDFILES) FIND.PROCESS (PROCDELETED) \\ONQUEUE (SYSQUEUEHEAD QLINK) -SEDIT::UNDO-REPLACE-QUOTE (SEDIT::SUB-NODES) PROCESS.STATUS.WINDOW (PROCNAME IMAGEHEIGHT IMAGEWIDTH -LEFT BOTTOM XCOORD YCOORD) \\TFBRAVO.EOLS (TEXTLEN) TTNEXTPOS (END NEXTLINE START) ADDMENU (IMAGEWIDTH - IMAGEHEIGHT MENUPOSITION MENUGRID XCOORD MENUOUTLINESIZE YCOORD WHENSELECTEDFN) -SEDIT::COMPUTE-FORMATS-AND-FORMAT-VALUES (SEDIT::ASSIGN-FORMAT SEDIT::NODE-TYPE CL:FORMAT SEDIT::SUB-NODES - SEDIT::COMPUTE-FORMAT-VALUES SEDIT::ENVIRONMENT) SEDIT::VERIFY-STRUCTURE (SEDIT::ROOT CL:STRUCTURE -SEDIT::SUB-NODES SEDIT::CONTEXT-LOCK SEDIT::OPEN-NODE-CHANGED? SEDIT::CHANGED? SEDIT::SELECTION -SEDIT::CARET-POINT SEDIT::DISPLAY-WINDOW SEDIT::CHANGED-NODES) SHADEITEM (ITEMS WIDTH) \\SELECTPROCESS - (PROCNAME PROCSYSTEMP) \\TEDIT.FIXINSSEL (SET \\TEXTOBJ CH# CHLIM) MSOBJTYPE (VPART C VB1 VB2 ROOT -MODIFIER) ERROR! (FRAMENAME NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER \#FRAMENAME CLINK FASTP SLOWP - \#ALINK \#CLINK ALINK INVALIDP) \\UNBOXFLOAT3 (NEXTBLOCK) GETBOXPOSITION (POSITION) RESETKEYACTION ( -INTERRUPTLIST FLAGS CODES ARMED SHIFTCODES) COMP.FLOATUNBOX (OPNAME OPARG) SPAWN.MOUSE (PROCNAME) -\\GCRECLAIMCELL (CDRCODE CARFIELD PAGEBASE DTDPTRS DTDFREE LINKFIELD OFFSETCODE) GETDEF (NULLDEF) -PRESSBITMAP (HEIGHT WIDTH IMAGEDATA LEFT BOTTOM) SHAPEW1 (REG DSP WBORDER SCREEN WIDTH HEIGHT -BITMAPBITSPERPIXEL SCDESTINATION SAVE RESHAPEFN) \\GCSCAN1 (EMPTY LINKP STKCNT) FB.REMOVE.FILE (TI# -TIUNSELECTABLE SUBDIREND TIDATA FILENAME) SEDIT::UNDO-LIST-REPLACE (SEDIT::DEPTH SEDIT::CARET-POINT) -\\MEDW.CREATEW (DSP IMAGEDATA WIDTH HEIGHT SCDESTINATION REG LEFT BOTTOM WTITLE SCTITLEDS SCREEN) -\\MEDW.OPENW (NEXTW SCTOPW DSP IMAGEDATA DDPILOTBBT BITMAPRASTERWIDTH SCDESTINATION |DDDestination| -REG SAVE) \\FILE.NOT.OPEN (FULLNAME FULLFILENAME) RELMOVEW (RELMOVEWFN SCREEN) PUTDEF (PUTDEF) -\\PROCESS.GO.TO.SLEEP (EVENTWAKEUPPENDING PROCQUEUE PQLAST PQNEXT NEXTPROCHANDLE PROCTIMERBOX PROCFX -INVALIDP WAKEREASON PQLOWER) \\TEXTCLOSEF-SUBTREE (PCE PFILE LO HI) SEDIT::SPLIT-LITATOM (SEDIT::NODE-TYPE - SEDIT::OPEN-NODE-CHANGED? SEDIT::SUPER-NODE) MB.NB.SIZEFN (XSIZE YSIZE) HEIGHTIFWINDOW (SCTITLEDS) -PUTMENUPROP (MENUUSERDATA) %ASET1 (TOTAL-SIZE TYPE-NUMBER BASE) \\HCPYMODEDSPPRINTCHAR (IMAGEDATA -CCECHO NSCHARHASH CHARPOSITION DDXPOSITION |DDLeftMargin| |DDRightMargin|) %AREF1 (TOTAL-SIZE BASE -TYPE-NUMBER) EXTENDPASTHORIZBOUNDARIES (LEFT RIGHT WIDTH) RESET.INTERRUPTS (INTERRUPTLIST) -CHECK/MENU/IMAGE (IMAGE SCREEN DSP WBORDER SAVE) FB.MAKE.BROWSER.BUSY (FBLOCK) CURRENTINTERRUPTS ( -INTERRUPTLIST) BRACKET.CURRENT.WORD (END START NSCHARHASH STOPATOM CPXREALCHAR) \\FILE.WONT.OPEN ( -FULLNAME FULLFILENAME) \\NSRANDOM.TRUNCATEFILE (NSFILING.SERVER.LENGTH F2 NSFILING.CONNECTION F3 -NSFILING.HANDLE F4 REVALIDATEFLG NSHDATUM NSHATTRIBUTES) \\PSWOP.SELECTED (PROCNAME PROCINFOHOOK -PROCSYSTEMP PROCDELETED) DEFINEFONT.IP (IPDATA IMAGEDATA IPPAGEFONTS) CL:TYPE-OF (DTDNAME) \\PRINDATUM - (COMMONLISP) FETCHFIELD (|fdTypeName| |fdOffset| |fdType|) FULLNAME (FULLNAME FULLFILENAME) -TEDIT.RESET.EXTEND.PENDING.DELETE (\\TEXTOBJ) PROCESS.NAME (PROCDELETED PROCNAME) IN/SCROLL/BAR? ( -SCROLLFN REG VERTSCROLLREG WIDTH HORIZSCROLLREG) \\PSC.SYMBOLS (IMAGEDATA FONTSIZE FONTFACE) -\\POP.N.UFN (NEXTBLOCK) GETDESCRIPTORS (DTDDESCRS) HEADINGOP.IP (IPDATA IMAGEDATA IPLEFT IPTOP -IPHEADINGFONT) SEDIT::SET-SELECTION-STRING (SEDIT::FONT) \\IS.NOT.RANDACCESSP (FULLNAME FULLFILENAME) -GRAPHOBJ.DISPLAYFN (XKERN LEFT YDESC BOTTOM) IDLE.BITMAP (WIDTH HEIGHT LEFT BOTTOM) -SEDIT::SUBNODE-CHANGED-QUOTE (CL:STRUCTURE) BRHC/LAYOUT/TERMINAL (NODEHEIGHT) \\10MB.GETPACKETSTATUS ( -DLIOCBSTATUS DLFOROUTPUTUSE DLIOCBLENGTH DLRETRANSMISSIONMASK D0IOCBSTATUS) \\CLOSEF.PRESS (IMAGEDATA -PDSTREAM PRESSFONTDIR DESCR HIBYTE LOBYTE FONTSET# FONT# ROTATION PRPARTSTART PRDOCNAME) \\RETCALL ( -MISCSTACKRESULT) \\CLEARXIPHEADER (XIPBASE) GETMENUPROP (MENUUSERDATA) PRIN3 (COMMONLISP) \\ADDBASE ( -HINUM LONUM) SEDIT::COMPUTE-ALL-FORMATS (SEDIT::ROOT) SEDIT::UPDATE (SEDIT::DISPLAY-WINDOW SEDIT::SELECTION - SEDIT::ROOT SEDIT::CARET-POINT) \\GETBASEBYTE (HIBYTE LOBYTE) \\TEDIT.FIXDELSEL (SET \\TEXTOBJ CH# -CHLIM) MSSUBJTYPE (VPART C VB1 VB2 ROOT) GRAPHEROBJ (LEFT BOTTOM) DSPRUBOUTCHAR (IMAGEDATA) -TWODINSPECT.ARRANGEWINDOWS (XCOORD YCOORD TOP BOTTOM HEIGHT RIGHT LEFT WIDTH) SEDIT::SUBNODE-CHANGED-LIST - (SEDIT::NODE-TYPE SEDIT::SUB-NODE-INDEX SEDIT::SUB-NODES CL:STRUCTURE) CL::%EQCODEP (FNHEADER -DEFPOINTER) POSTSCRIPT.GETFONTID (FONTXFACTOR) \\ONSCREENCLIPPINGREGION (SCREGION SCREEN SCWIDTH -SCHEIGHT IMAGEDATA) \\TEDIT.DELETE (CH# CHLIM LINES \\WINDOW TEXTLEN DCH TXTREADONLY SET L1 LN -TXTHISTORY POINT DELETED PREVLINE NEXTLINE CHAR1 CHARLIM SEL) FB.MAYBE.INSERT.FILE (PREPAREDPATTERN -DIRECTORYSTART PATTERN FILEINFO TIDATA INFODISPLAYED VERSION TISELECTED) \\NSRANDOM.SETEOFPTR (PAGE -OFFSET ACCESSBITS EPAGE) OPENWP (NEXTW) SHOWSTACKBLOCKS (|EndOfStack| FLAGS CHECKED FLAGWORD SIZE -DUMMYBF BLINK FASTP SLOWP \#BLINK RESIDUAL IVAR FRAMENAME NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER - \#FRAMENAME NEXTBLOCK) ADDTOCOM (ADD) SEDIT::SET-SELECTION-LITATOM (SEDIT::FONT) -\\FTP.PACK.DIRECTORYNAMEP (FTPHOST) DINFO (WINDOW MONITORLOCK) TTSKIPSEPR (CPXREALCHAR) -FB.FINISH.COMMAND (ABORTWINDOW ITEMS) SEDIT::COMPILE-STRUCTURE (SEDIT::ICON-TITLE SEDIT::EDIT-TYPE -CL:STRUCTURE SEDIT::SUB-NODES SEDIT::ROOT SEDIT::DISPLAY-WINDOW) SEDIT::UNDO-REPLACE-ROOT (SEDIT::SUB-NODES -) COMP.TOPLEVEL.COMPILE (OPNAME OPARG) INVERT.SEGMENT (END FIRSTCOL START ROW) MSCOMMAND (TYPE KNOWN) -SEDIT::CREATE-NULL-LIST (SEDIT::DEFAULT-FONT SEDIT::ENVIRONMENT) INVERT.LONG.SEGMENT (COLPOS ROWPOS -START NEXTLINE) SPYOBJ.IMAGEBOX (OBJECTDATUM) PROCESS.BACKTRACE (LEFT BOTTOM TOP HEIGHT WIDTH PROCFX) -\\FDEVINSTANCE (CLOSEFILE DEVICEINFO DEVICE GETFILEINFO OPENFILE READPAGES SETFILEINFO TRUNCATEFILE -WRITEPAGES REOPENFILE BIN BOUT PEEKBIN BACKFILEPTR SETFILEPTR GETFILEPTR GETEOFPTR EOFP BLOCKIN -BLOCKOUT FORCEOUTPUT) \\FILLINXIP (ID# NSNET NSSOCKET) \\SLOWIQUOTIENT (HINUM LONUM) SAMECLOOKS ( -CLFONT CLOFFSET CLINVISIBLE CLSELHERE CLPROTECTED CLOLINE CLSTRIKE CLULINE) MAKEHARDCOPYMODESTREAM ( -WIDTH) TWODINSPECT.ADJUSTSELECTION (ROWPROP COLUMNPROP) SPYOBJ.SAVE (OBJECTDATUM) \\CHARWIDTH.PRESS ( -PRSPACEWIDTH IMAGEDATA WIDTHS FONTCHARSETVECTOR PRFONT) RIGHTW.REPAINTFN (TOP BOTTOM HEIGHT) -PRINTXIPROUTE (XIPTCONTROL) SEDIT::FIND-SELECTION (SEDIT::DISPLAY-WINDOW SEDIT::SELECTION -SEDIT::SELECT-NODE SEDIT::SELECT-START) \\SLOWHDCPYBLTCHAR (IMAGEDATA ROTATION DDFONT DDXPOSITION -DDWIDTHSCACHE |DDRightMargin| DDXOFFSET |DDClippingLeft| |DDClippingRight| DDPILOTBBT PBTHEIGHT -DDOFFSETSCACHE BITMAPBITSPERPIXEL |DDDestination| DDYPOSITION FONTCHARSETVECTOR CHARSETBITMAP -CHARSETASCENT CHARSETDESCENT) BMOBJ.PUTFN (BITMAP BMOBJSCALEFACTOR BMOBJROTATION BMOBJDESCENT) -\\10MB.GETPACKETLENGTH (DLIOCBBYTESUSED |count| D0IOCBBYTESUSED) \\SLOWLLSH1 (HINUM LONUM) NCREATE2 ( -DTDSIZE DTDPTRS) |\\PFInitFileDescriptors| (|subVolumeCount| |lvID| |subVolumes| |subVolumeMarkerID|) -SEDIT::BUILD-NODE (SEDIT::\\X SEDIT::CURRENT-NODE) \\SLOWLLSH8 (HINUM LONUM) IREMAINDER (HINUM LONUM) -DELETE.LONG.SEGMENT (ROWPOS COLPOS) SEDIT::MARKASCHANGEDFN (SEDIT::ICON-TITLE SEDIT::EDIT-TYPE) -\\SLOWLRSH1 (HINUM LONUM) MB.MARGINBAR.SELFN (MARL1 MARLN MARR MARTABS TABX MARUNIT XSIZE YSIZE WIDTH -MARTABTYPE) \\TEDIT.TEXTBIN.STRINGSETUP (FATSTRINGP INDIRECT-P TYPE-NUMBER BASE XBASE OFFST OFFSET -COFFSET) \\MAKEPCTB (PLEN) \\SLOWITIMES2 (HINUM LONUM) PRINTERRORPUP (PUPSOURCE ERRORPUPCODE -PUPCONTENTS) \\SLOWLOGOR2 (HINUM LONUM) SEDIT::FIND-SELECTION-BACKWARDS (SEDIT::DISPLAY-WINDOW -SEDIT::SELECTION SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END) GRAPHOBJ.PUTFN (XCOORD -YCOORD) \\TEDIT.WINDOW.OPS (WRIGHT HEIGHT) SEDIT::STRINGIFY-QUOTE (STRING SEDIT::UNASSIGNED -SEDIT::SUB-NODES) ONED.TRACKCURSOR (ELTBOTTOM ELTLEFT ELTWIDTH PROP) EDITDEF (EDITDEF) -\\TEDIT.COPY.PIECEMAPFN (POBJ STREAMHINT \\WINDOW CLPROTECTED PLOOKS) \\SLOWLOGXOR2 (HINUM LONUM) -DIRECTORYNAME (DIRECTORYNAMEP DEVICENAME) SEDIT::BUILD-LINEAR-FORM (SEDIT::ROOT SEDIT::START-X -SEDIT::LINEAR-FORM SEDIT::FIRST-BLOCK SEDIT::SUB-NODES SEDIT::DISPLAY-WINDOW SEDIT::CURRENT-LINE -SEDIT::CURRENT-X SEDIT::ACTUAL-WIDTH) SEDIT::TYPE-OF-INPUT (SEDIT::POINT-NODE SEDIT::CARET-POINT -SEDIT::POINT-TYPE) COMP.TRANSFORM (OPNAME) TRANSMIT.ETHERPACKET (NDBTRANSMITTER) -ONEDINSPECT.ARRANGEWINDOWS (XCOORD YCOORD TOP BOTTOM HEIGHT RIGHT LEFT WIDTH) \\CREATEW1 (WIDTH HEIGHT - CREATEWFN) \\PRINT-USING-ADDRESS (COMMONLISP CHARPOSITION HASHMACROCHAR) SEDIT::SET-POINT-STRING ( -SEDIT::WIDTH SEDIT::FONT) SHOWSHADE.IP (LEFT BOTTOM WIDTH HEIGHT) \\ROUTE.XIP (XIPDESTNET RTNDB -RTHOPCOUNT RTGATEWAY# NETTYPE XIPLENGTH NDBNSNET#) \\SLOWIDIFFERENCE (HINUM LONUM) -\\UPDATE.PROCESS.WINDOW (PROCNAME) SEDIT::FIND-OBJ (SEDIT::OPEN-NODE-CHANGED? SEDIT::SELECTION -SEDIT::SELECT-NODE SEDIT::SELECT-TYPE) \\CHANGECHARSET.HDCPYDISPLAY (DDFONT FONTCHARSETVECTOR WIDTHS) -GRAPHOBJ.IMAGEBOXFN (WIDTH HEIGHT NODEHEIGHT NODEFONT NODEWIDTH) VECTOR-LENGTH (FILL-POINTER) DSPEOLFN - (IMAGEDATA DDEOLFN) \\SLOWIPLUS2 (HINUM LONUM) COURIER.READ.STRING (BASE XBASE INDIRECT-P OFFST -OFFSET) TEDITFROMBRAVO (RUNS PARALOOKS) DELETE.LONG.SEGMENT1 (ROW NEXTLINE LASTCOL END) -BRHC/LAYOUT/DAUGHTERS (NODEPOSITION YCOORD) TEDIT.DELETE (SEL) \\UNBOXFLOAT2 (NEXTBLOCK HIWORD LOWORD) - FB.COPY/RENAME.MANY (DEFAULTDIR TIDATA FILENAME SUBDIREND SUBDIRECTORY PATTERN NAMESTART SORTBY -STARTOFNAME) MOVEW (MOVEWFN SCREEN) \\BITBLT.IP (IPVISIBLEREGION IMAGEDATA LEFT BOTTOM WIDTH HEIGHT) -\\TEDIT.TEXTBIN.FILESETUP (ACCESSBITS PAGE PFPOS OFFSET CPPTR CPAGE COFFSET CBUFSIZE) SHRINKW ( -SHRINKWFN SCREEN) SHIFTDOWNP (LOCK META 1SHIFT 2SHIFT CTRL FONT USERMODE1 USERMODE2 USERMODE3) -CREATEW1 (SCREEN REGION WIDTH HEIGHT CREATEWFN) SEDIT::SET-POINT-LITATOM (SEDIT::WIDTH SEDIT::FONT) -BURYW (BURYWFN SCREEN) SCREENBITMAP (SCDESTINATION SCREEN) \\COURIER.CHECK.PROCEDURES (FN# ARGS -RETURNSNOISE RESULTS REPORTSNOISE ERRORS) %ASET2 (BOUND0 BOUND1 DIMS OFFSET TYPE-NUMBER BASE) %AREF2 ( -BOUND0 BOUND1 DIMS OFFSET BASE TYPE-NUMBER) SEDIT::STRINGIFY-LIST (SEDIT::SUB-NODES SEDIT::NODE-TYPE) -DSPSCROLL (IMAGEDATA |DDScroll|) %EXTEND-ARRAY (TYPE-NUMBER BASE) MARKASCHANGED (WHENCHANGED CHANGED) -\\SLOWFGREATERP (HIWORD LOWORD HINUM LONUM SIGNBIT LOFRACTION HIFRACTION EXPONENT) PRINTPUPDATA ( -PUPCONTENTS PUPLENGTH) MSPARSE (POSSIBLES ENDING START SOUGHT PARSED C ITEM VPART) \\SPP.CLEANUP ( -SPPLOCK SPPINPUTSTREAM SPPINPUTEVENT SPPALLOCATIONEVENT DEVICEINFO SPPWHENCLOSEDFN SPPMYNSOCKET) -\\SLOWLOGAND2 (HINUM LONUM) EQUAL (LONUM HINUM EDFXP) HOSTNAMEP (HOSTNAMEP) DO.SHIFTED.SELECTION ( -COLPOS ROWPOS END) \\UNBOXFLOAT1 (NEXTBLOCK HIWORD LOWORD) HRULE.DISPLAYFN (XSIZE) -|\\PFCreatePhysicalVolume| (|seal|) DIRECTORYNAMEP (DIRECTORYNAMEP) \\SETXIPCHECKSUM (XIPCHECKSUMBASE -XIPLENGTH) \\BOXIDIFFERENCE (HINUM LONUM) SUBATOM (PNAMEBASE FATPNAMEP PNAMELENGTH BASE XBASE -INDIRECT-P FATSTRINGP TYPE-NUMBER OFFST OFFSET LENGTH FILL-POINTER) \\HDCPYBLTCHAR (DDCHARSET -|DDSlowPrintingCase| DDXPOSITION DDMICAXPOS DDCHARIMAGEWIDTHS DDMICARIGHTMARGIN |DDLeftMargin| -DDXOFFSET DDWIDTHSCACHE |DDClippingRight| |DDClippingLeft| PBTHEIGHT DDPILOTBBT DDOFFSETSCACHE) -\\SLOWLRSH8 (HINUM LONUM) %ALTER-AS-DISPLACED-ARRAY (READ-ONLY-P EXTENDABLE-P ADJUSTABLE-P INDIRECT-P -BASE) OPT.RESOLVEJUMPS (JMIN JPT OPNAME) \\TEDIT.APPLY.PARASTYLES (TXTSTYLESHEET FMTSTYLE) \\FINDPIECE - (CHNUM) ENCAPSULATE.ETHERPACKET (NDBENCAPSULATOR) TB.NTH.ITEM (TBTAILHINT TI# TBITEMS) -SEDIT::SELECT-SEGMENT-LITATOM (SEDIT::SELECT-STRING SEDIT::FONT SEDIT::NODE-TYPE) FB.GET.NEW.FILE.SPEC - (DEFAULTDIR) CL:FILL-POINTER (FILL-POINTER-P FILL-POINTER) \\SLOWIGREATERP (HINUM LONUM) -SEDIT::FIND-NODE-SUBSTRUCTURE-BACKWARDS (SEDIT::SUB-NODES) \\BOXIPLUS (HINUM LONUM) -CL:ADJUSTABLE-ARRAY-P (ADJUSTABLE-P) \\BINS (BLOCKIN DEVICE) TEDIT.SUBLOOKS (SEL PCTB TEXTLEN PLOOKS -\\XDIRTY TXTFILE PLEN NEXTPIECE \\WINDOW) SEDIT::BUILD-INTERNAL-STRUCTURE (SEDIT::ROOT) -SEDIT::SUBNODE-CHANGED-ROOT (SEDIT::ROOT-CHANGED-FN) EXTENDABLE-ARRAY-P (EXTENDABLE-P) -COMP.RETFROM.POINT (CLEAR) \\TEDIT.NEXT.LINE.BOTTOM (FMTBASETOBASE LFMTSPEC DESCENT 1STLN LEADBEFORE -LEADAFTER LHEIGHT) SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::SUB-NODE-INDEX SEDIT::SELECT-START -SEDIT::SELECT-END SEDIT::LINEAR-FORM) \\TERMINATESPP (SPPLOCK SPPSTATE SPPINPUTEVENT SPPPROCESS) -TTYINBUFFERBACKPTR (TTYORIGINPUT F4 TTYINPUT F1) CL:ARRAY-HAS-FILL-POINTER-P (FILL-POINTER-P) -INSPECT/AS/FUNCTION (INVALIDP EDFXP FNHEADER PC) UNPACKFILENAME.STRING (FULLFILENAME FATSTRINGP -INDIRECT-P TYPE-NUMBER BASE XBASE) \\POSTSCRIPT.ACCENTFN (IMAGEDATA POSTSCRIPTCHARSTOSHOW OFFST -INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) CL:ARRAY-DIMENSION ( -TOTAL-SIZE DIMS) FB.COUNT.FILE.CHANGE (SIZE TIDATA TIDELETED TOTALFILES DELETEDFILES TOTALPAGES -DELETEDPAGES) \\TEDIT.CHANGE.LOOKS (PCTB \\INSERTPC TEXTLEN \\XDIRTY TXTFILE PLOOKS CLFONT CLOFFSET -NEXTPIECE \\WINDOW SEL) ARRAY-NEEDS-INDIRECTION-P (INDIRECT-P) CURSOR.INIT (BITMAPBASE BITMAPWIDTH -BITMAPHEIGHT BITMAPRASTERWIDTH) SEDIT::ATOM-CHANGE-RELINEARIZE (SEDIT::OPEN-NODE-CHANGED? -SEDIT::CARET-POINT SEDIT::SELECTION SEDIT::ROOT SEDIT::NODE-TYPE CL:STRUCTURE) \\COURIER.CHECKDEF ( -VERSIONPAIR PROGRAM# VERSION# COURIERDEFS) \\DISPLAYLINE (CHARS THISLINE WIDTHS LOOKS \\WINDOW TEXTLEN - TXTTERMSA STREAMHINT LCBITMAP DISPLAYCACHE DISPLAYCACHEDS DISPLAYHCPYDS FMTHARDCOPY LFMTSPEC PREVLINE - YBOT LHEIGHT RIGHTMARGIN BITMAPWIDTH BITMAPHEIGHT CHAR1 WBOTTOM DESC LEFTMARGIN DESCENT IMAGEDATA -DDPILOTBBT DDXOFFSET |DDClippingLeft| |DDClippingRight| CLFONT BASE DDWIDTHSCACHE DDOFFSETSCACHE -CLOFFSET LEN CLLEADER CLUSERINFO WRIGHT FMTREVISED LMARK YBASE) MSSEEKPHRASE (START) TEDIT.PROMPTPRINT - (MENUFLG PROMPTWINDOW) \\TEDIT.REOPEN.STREAM (PCTB PFILE NEXTPIECE TXTFILE) RANDACCESSP ( -RANDOMACCESSP DEVICE FULLNAME) \\BUFFERED.COPYBYTES (DEVICE CBUFPTR CBUFSIZE COFFSET GETNEXTBUFFER) -PUTCURSORPROP (CUDATA) TEDIT.UNDO.PARALOOKS (SEL PCTB THOLDINFO THFIRSTPIECE PPARALOOKS NEXTPIECE -THCH# THLEN) \\GETEOFPTR (GETEOFPTR DEVICE) \\CHANGE-VISIBLE-REGION.IP (IPFONT LEFT RIGHT WIDTH TOP -BOTTOM HEIGHT IPVISTOP |\\SFAscent| IPCLIPINCLUSIVE IPVISBOTTOM |\\SFDescent| IPXPOS IPVISLEFT IPYPOS -IPMINVISIBLEBASELINE IPMAXVISIBLEBASELINE IPVISRIGHT IPRIGHT) PRINTPUP (PUPTYPE PUPDESTHOST PUPLENGTH -PUPID PUPCONTENTS) SEDIT::SCAN-STRING (MULTESCAPECHAR SEDIT::FIRST-LINE SEDIT::START-X SEDIT::SELECT-START - SEDIT::SELECT-END) \\DSPXPOSITION.PRESS (PRXPOS IMAGEDATA) COPYCHARS (EOLCONVENTION EXTERNALFORMAT -OTHERPROPS RANDOMACCESSP DEVICE FULLFILENAME GETFILEPTR EOFP NOTXCCS INCCODEFN BACKCHARFN) -SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE-BACKWARDS (SEDIT::DISPLAY-WINDOW SEDIT::SUB-NODES SEDIT::ROOT) -PRINTPUPROUTE (PUPTCONTROL PUPSOURCE PUPSOURCESOCKET PUPDEST PUPDESTSOCKET) GETCURSORPROP (CUDATA) -TEDIT.LOOKS (SEL SET CH# DCH) \\TEDIT.FLUSH.UNUSED.LOOKS (TXTCHARLOOKSLIST TXTPARALOOKSLIST PLOOKS -PPARALOOKS NEXTPIECE CLMARK FMTMARK) SEDIT::ASSIGN-FORMAT-NIL (SEDIT::SUB-NODES) -\\COURIER.CHECK.ERRORS (ERR# ARGS) SEDIT::SHIFT-LINEAR-FORM (SEDIT::START-X SEDIT::LINEAR-FORM -SEDIT::DESTINATION) GTHASHFILE (|File|) \\BOUTS (BLOCKOUT DEVICE) MSSETREP (REP) BRHC/LAYOUT (TONODES -NODEWIDTH NODEHEIGHT NODEPOSITION) BIT-ARRAY-P (BIT-P) DISCARDXIPS (INQUEUE) \\SETFILEPTR (SETFILEPTR -DEVICE) SEDIT:SEDIT (SEDIT::DISPLAY-WINDOW) \\POSTSCRIPT.ACCENTPAIR (IMAGEDATA POSTSCRIPTFONT OFFST -INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER |\\SFAscent|) -\\CREATEPIECEORSTREAM (FATSTRINGP INDIRECT-P TYPE-NUMBER ACCESSBITS) \\STRINGWIDTH.HCPYDISPLAYAUX ( -PNAMEBASE PNAMELENGTH FATPNAMEP IMAGEWIDTHS FONTCHARSETVECTOR ESCAPECHAR OFFST INDIRECT-P OFFSET BASE -XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) SEDIT::REPLACE-STRING (SEDIT::LINEAR-FORM) -SEDIT::SET-POINT-UNKNOWN (SEDIT::INLINE-WIDTH) COPYFILES (GENERATEFILES) EQUAL-DIMENSIONS-P ( -TOTAL-SIZE DIMS BOUND0 BOUND1) RAIDROOTFRAME (TELERAIDFXP |CurrentFXP|) SEDIT::SET-POINT-QUOTE ( -SEDIT::SUB-NODES) DO.MOUSE (ROWPOS COLPOS) OPENSTREAM (FULLNAME ACCESS) CLOSEF (USERCLOSEABLE FULLNAME -) COPYBYTES (BUFFERED DEVICE RANDOMACCESSP GETFILEPTR EOFP) \\FORMATLINE (WRIGHT WBOTTOM TEXTLEN -THISLINE \\WINDOW BASE CHARS WIDTHS LOOKS STREAMHINT TXTTERMSA IMAGEDATA CURRENTLOOKS F10 CLINVISIBLE -PIECE F5 PLEN NEXTPIECE PLOOKS CLPROTECTED PPARALOOKS FMTSPEC FMTHARDCOPY DISPLAYHCPYDS DISPLAYCACHEDS - TABSPEC CLFONT |\\SFAscent| CLOFFSET |\\SFDescent| PREVPIECE PPARALAST PCSTARTCH FW7 COFFSET -PCSTARTPG FW6 CPAGE FMTPARATYPE FMTNEWPAGEBEFORE FMTNEWPAGEAFTER FMTSPECIALX FMTSPECIALY WLEFT -1STLEFTMAR LEFTMAR RIGHTMAR FONTCHARSETVECTOR YSIZE YDESC XSIZE PTNEWTX TXTNONSCHARS PTTYPE PTTABX -PCTB CARETLOOKS DEFAULTCHARLOOKS CHARLIM CHAR1) MSVERBTYPE (VPART VB1 VB2 TENSE TYPE DEFAULTTYPE ROOT -MODIFIER) BITSPERPIXEL (BITMAPBITSPERPIXEL SCDEPTH SCBITSPERPIXEL SCDESTINATION SCREEN) \\FIRSTNODE ( -COUNT) \\DSPYPOSITION.PRESS (PRYPOS IMAGEDATA) TEDIT.UNDO.LOOKS (SEL PCTB THOLDINFO \\INSERTPC -THFIRSTPIECE PLOOKS NEXTPIECE THCH# THLEN) SEDIT::FIND-NODE-SUBSTRUCTURE (SEDIT::SUB-NODES) -CURSORCREATE (YCOORD XCOORD) SEDIT::SET-POINT-LIST (SEDIT::NODE-TYPE SEDIT::SUB-NODES SEDIT::WIDTH -STRING) ONEDINSPECT.ADJUSTSELECTION (PROP) CHCON1 (LENGTH FILL-POINTER FATSTRINGP INDIRECT-P -TYPE-NUMBER BASE XBASE OFFST OFFSET PNAMELENGTH FATPNAMEP PNAMEBASE) SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE - (SEDIT::DISPLAY-WINDOW SEDIT::SUB-NODES SEDIT::ROOT) \\INTERACTIVE.CLOSEW (CLOSEFN) -\\DSPUNTRANSFORMREGION (LEFT BOTTOM WIDTH HEIGHT) \\CURSORUP (BITMAPBITSPERPIXEL CUIMAGE CUMASK -BITMAPWIDTH BITMAPHEIGHT CUHOTSPOTX CUHOTSPOTY) \\POSTSCRIPT.SPECIALOUTCHARFN (IMAGEDATA) SEDIT::PRINT-GAP - (SEDIT::LINEAR-ITEM) SEDIT::REPLACE-CHARS (SEDIT::PRIN-2? MULTESCAPECHAR SEDIT::OPEN-NODE-INFO -SEDIT::BUFFER-STRING SEDIT::REAL-LENGTH SEDIT::FONT SEDIT::NODE-TYPE SEDIT::OPEN-NODE-CHANGED? -SEDIT::SUPER-NODE SEDIT::SUBSTRING SEDIT::INLINE-WIDTH SEDIT::CARET-POINT) \\FTP.RECOGNIZEFILE (FTPIN -FTPOUT) \\CURSOR-VALID-P (CUIMAGE CUHOTSPOTX CUHOTSPOTY) \\SEARCH.OUTPUTQ (SYSQUEUEHEAD BSPOUTPUTQ -PUPTYPE QLINK) RAIDSTACKCMD (FAULTFXP GCFXP |KbdFXP| |HardReturnFXP| |SubovFXP| |ResetFXP| |MiscFXP| -|EndOfStack| FLAGS) |\\UFStoOtherCopyMess| (DEVICENAME DEVICE FULLFILENAME) +BSPINPUTSTREAM BSPFILEPTR BSPCURRENTPUP MARKPENDING BSPINPUTQ %#UNREADPUPS XMITBYTEID LASTACKID +XMITINTERRUPTID %#UNACKEDPUPS %#UNACKEDBYTES BSPOUTPUTSTREAM BSPOUTPUTQ PUPALLOC BYTEALLOC BYTESPERPUP + MAXPUPALLOC PUPALLOCCOUNT LISTENING INTERRUPTOUT INTERRUPTIN ACKPENDING ACKREQUESTED SENTZEROALLOC +ADATATIMEOUT) COMP.DECLARE1 (VARS OPARG OPNAME) INSPECT.INVERTSELECTION (ELTLEFT ELTBOTTOM ELTWIDTH) +\DSPOPERATION.IP (IMAGEDATA IPOPERATION) \ENQUEUE (SYSQUEUEHEAD QLINK SYSQUEUETAIL) +ORDERFROMBOTTOMTOTOP (SCTOPW SCREEN NEXTW) \SETLOCALNSNUMBERS (NSHost0 NSHost1 NSHost2 NSHOST0 NSHOST1 + NSHOST2) \RENAMEFILE (RENAMEFILE) \HANDLE.RAW.10TO3 (EPNETWORK TRANSOPERATION NSHNM2 NSHNM1 NSHNM0 +TRANSNSADDRESS 3MBLENGTH TRANSSENDERNSADDRESS TRANSSENDERPUPHOST NDBPUPHOST# TRANSPUPHOST) +\ALLOCLOCKED (WORDINPAGE) \REVALIDATEFILE (REOPENFILE DEVICE FULLFILENAME ACCESS F1 F2 F3 F4 F5 FW6 +FW7 VALIDATION EPAGE EOFFSET) \RTP.HANDLE.PUP (PUPTYPE ERRORPUPCODE BSPOTHERPUPFN BSPINPUTSTREAM) +ICMLARRAY.GETREGIONFN (RIGHT TOP LEFT BOTTOM XCOORD YCOORD) \TEXTOPENF-SUBTREE (PCE PFILE ACCESSBITS +LO HI) \DRAWCURVE.PRESS (XCOORD YCOORD) MOVEATTACHEDWINDOWTOPLACE (TOP RIGHT BOTTOM LEFT HEIGHT WIDTH) + OPENPUPSOCKET (PSOCKETLO PSOCKETHI) \LEAF.READPAGES (EPAGE EOFFSET LEAFCACHECNT EPUSERFIELD SEQEVENT +LEAFCONNECTION FULLFILENAME LEAFOPCODE PUPCONTENTS LEAFLENGTH ACCESSBITS) DELETE.LONG.SEGMENT1 (ROW +NEXTLINE LASTCOL END) \RECLAIMARRAYBLOCK (PASSWORD INUSE GCTYPE TRAILER ARLEN) FB.DISPLAY.COUNTERS ( +COUNTERWINDOW TOTALFILES TOTALPAGES DELETEDFILES DELETEDPAGES SHOWUNDELETED? PAGECOUNT?) +\PROCESS.EVENTFN (PROCAFTEREXIT PROCNAME) TEDIT.REDO (SEL TXTREADONLY TXTHISTORY THACTION POINT CH# +CHLIM THAUXINFO THLEN THFIRSTPIECE) COMP.DECLARE (VARS OPNAME OPARG) TOPW.BUTTONEVENTFN (PROP) +\PAGED.REVALIDATEFILELST (OPENP UNREGISTERFILE) \BSP.SKIPBYTES (BSPERRORHANDLER BSPSOC CBUFSIZE +COFFSET) SEDIT::SPLIT-COMMENT (SEDIT::OPEN-NODE-CHANGED? CL:STRUCTURE SEDIT::SUPER-NODE +SEDIT::SUB-NODE-INDEX) PRINT10TO3 (TRANSOPERATION TRANSNSHOST TRANSSENDERNSHOST TRANSSENDERPUPHOST +TRANSPUPHOST) \CAR.UFN (CAR CDRCODE CARFIELD) \PRINT-REVALIDATION-RESULT (FULLNAME) CREATEHASHFILE ( +FULLNAME ByteStream) SEDIT::COMMENT-OUT-SELECTION (SEDIT::SELECTION SEDIT::CARET-POINT SEDIT::SELECT-NODE + SEDIT::SELECT-START SEDIT::SELECT-TYPE SEDIT::DISPLAY-WINDOW CL:STRUCTURE) \CHARWIDTH.HCPYMODE ( +DDCHARIMAGEWIDTHS IMAGEDATA) \CDR.UFN (CDR CDRCODE PAGEBASE CARFIELD) \LFDirectorySearch (DIRPTR +CHARLIST EOFP DEVICE) FORGETPAGES (BUFFS FILEPAGE# NOREFERENCE USERMAPPED CBUFPTR VMEMPAGE BUFFERNEXT) + \LFFindDirHole (CHARLIST DIRHOLEPTR EOFP DEVICE) \KEYBOARDEVENTFN (DEVCONFIG) NTYPX (PAGE#) +RESTOREMAP (BUFFS FILEPAGE# NOREFERENCE USERMAPPED CBUFPTR VMEMPAGE BUFFERNEXT) TWODINSPECT.REPAINTFN +(TOP BOTTOM LEFT RIGHT) \DELETECH (TXTREADONLY \INSERTFIRSTCH TEXTLEN PCTB \INSERTPCVALID +\INSERTNEXTCH \INSERTPC \INSERTLEN TXTHISTORY THLEN PREVPIECE PLEN NEXTPIECE POBJ \WINDOW PTREENODE) +GETBOXPOSITION.FROMINITIALREGION (WIDTH HEIGHT LEFT BOTTOM) \CHANGECHARSET.HCPYMODE (DDPILOTBBT +FONTCHARSETVECTOR DDFONT WIDTHS OFFSETS IMAGEWIDTHS CHARSETBITMAP BITMAPRASTERWIDTH CHARSETASCENT +CHARSETDESCENT DDCHARSETASCENT DDCHARSETDESCENT BITMAPBASE DDCHARHEIGHTDELTA) \LEAF.TRUNCATEFILE ( +PUPCONTENTS LEAFHANDLE LEAFCONNECTION) \PAGED.REVALIDATEFILE (REOPENFILE DEVICE FULLFILENAME ACCESS F1 + F2 F3 F4 F5 FW6 FW7 VALIDATION EPAGE EOFFSET) SEDIT::DEGRADE-COMMENT (CL:STRUCTURE SEDIT::UNASSIGNED) + \FM.TOGGLE-DOWNFN (FM.USERDATA LEFT BOTTOM) \KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS (DEVCONFIG) +\UNWIND.UFN (NEXTBLOCK FIRSTPVAR BINDMARKP BINDLASTPVAR BINDNVALUES) PFI.PRINT.BITMAP (OUTCHARFN) +SEDIT::FIND-NTH-STRUCTURE (SEDIT::SUB-NODES SEDIT::ROOT) SEDIT::ADD-MENU (SEDIT::DISPLAY-WINDOW) +TEDIT.NEXT (SEL CH# CHLIM DCH) \CHECKAPPLY* (CCODEP DEFPOINTER ARGTYPE) \PAGED.REVALIDATEFILES (DEVICE + UNREGISTERFILE) ICMLARRAY (RIGHT TOP) MSINTERPA (TYPE REP) FB.CREATE.FILEBUCKET (PATTERNPARSED? +NAMESTART VERSIONLESSNAME NOSUBDIRECTORIES PAGECOUNT? SIZEINDEX SORTATTRIBUTE SORTINDEX SORTBYDATE) +TEDIT.UNDO (TXTREADONLY SEL TXTHISTORY THLEN THCH# THFIRSTPIECE THACTION) \TEDIT.GET.CHARLOOKS (PFATP +PLEN PFPOS) COURIER.WRITE.SEQUENCE (HIBYTE LOBYTE) \BUFFERED.REVALIDATEFILE (REOPENFILE DEVICE +FULLFILENAME ACCESS F1 F2 F3 F4 F5 FW6 FW7 VALIDATION EPAGE EOFFSET) OVERLAPPINGWINDOWS (SCTOPW SCREEN + NEXTW) \HTFIND (NOREFCNT PAGE# EMPTY LINKP HIBITS CNT STKCNT FREEPTR NEXTFREE NXTPTR CONTENTS LINKPTR +) \BUFFERED.REVALIDATEFILELST (OPENP UNREGISTERFILE) FILEPKGTYPE (DESCRIPTION) \SCALEDBITBLT.IP ( +IPVISIBLEREGION IMAGEDATA LEFT BOTTOM WIDTH HEIGHT) NUMBERPAD.READ (ITEMS) \TRUNCATEFILE (TRUNCATEFILE + DEVICE) DINFO.LOOKUP (WINDOW MONITORLOCK LOOKUPFN LOOKUP.STRING NAME) CLOSEW (CLOSEWFN SCREEN) +\BSP.PREPARE.OUTPUT (BSPLOCK BSPSOC BSPCURRENTPUP BSPIOTIMEOUT PUPALLOC BYTEALLOC IOTIMEOUTFN +BSPINPUTEVENT PUPCONTENTS BYTESPERPUP COFFSET CBUFMAXSIZE) ADDTOFILE (WHENFILED) \FILE-CONFLICT ( +FULLFILENAME OPENP ACCESS) MENU (IMAGE) SEDIT::SHOW-CARET (SEDIT::CARET-POINT) \TEDIT.ABBREV.EXPAND ( +TEXTOBJ SEL POINT CH# CHLIM DCH) \RPLACA.UFN (CDRCODE CARFIELD) GETDEFN (DEFPOINTER) +MOVE.TO.START.OF.WORD (END) \PFNewPages (size nextFilePage) \RPLACD.UFN (CDRCODE CARFIELD PAGEBASE +DBLWORD# CNT NEXTCELL NEXTFREE) NSNET.DISTANCE (NSNET RTHOPCOUNT) \PROCESS.MAKEFRAME0 (NEXTBLOCK SIZE +STKMIN DEFPOINTER) TEDIT.CREATEW (HEIGHT) SHOWREGION (LEFT BOTTOM WIDTH HEIGHT) REHASHFILE (File +ItemCopyFn ValueType) SEDIT::STRUCTURE-FROM-SELECTION (SEDIT::SELECT-NODE SEDIT::SELECT-START +SEDIT::SELECT-END SEDIT::SUB-NODES CL:STRUCTURE) \CONS.UFN (DTDCNTLOC DTDNEXTPAGE CNT NEXTCELL +NEXTFREE PAGEBASE NEXTPAGE) GROW/REGION (LEFT BOTTOM WIDTH HEIGHT) \LOOKUPPUPNUMBER (XIPLENGTH +PACKETEXCHANGEBODY PACKETEXCHANGEID PACKETEXCHANGETYPE PACKETEXCHANGEBODY0) ShowIntervals (key +volumePage nextKey) NEWDEFC (BASE) TWODINSPECT.BUTTONEVENTFN (ROWPROP COLUMNPROP) \NOTE.10TO3 ( +NDBTRANSLATIONS PUPHOST# NSHNM2 NSHNM1 NSHNM0) TEDIT.PARALOOKS (SEL CH# CHLIM TEXTLEN SET FORMATTEDP +PCTB TABSPEC PPARALOOKS PLEN PPARALAST NEXTPIECE PREVPIECE \WINDOW) TOLINKS (TONODES) \NOFILESINFOFN ( +NOFILENAME) \FM.TOGGLE-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN FM.USERDATA) +FB.INSERT.FILE (TABLEBROWSER SORTBY TIDATA NOSUBDIRECTORIES TIUNSELECTABLE TI# FILENAME SUBDIREND) +\ENDPAGE.PRESS (ELSTREAM IMAGEDATA GETFILEPTR DEVICE HIBYTE LOBYTE) \NOFILESNEXTFILEFN (NOFILETYPE +NOFILEPATTERN) \FILINGHANDLE.DEFPRINT (NSHNAME NSHPATHNAME) TEDIT.SUBSTITUTE (PLEN SEL CH# DCH TEXTLEN + PLOOKS PCTB LINES OFFST BASE LENGTH FATSTRINGP CHLIM) \FINDKEY.UFN (BLINK IVAR) \VFMInsert1 (used +volumePage key) BREAK.PROCESS (PROCDELETED) \TEDIT.SHOWCARETLOOKS (CARETLOOKS CLFONT CLOFFSET CLOLINE +CLULINE) PPROC1 (PROCSYSTEMP PROCNAME PROCPRIORITY PROCSTATUS WAKEREASON PROCTIMERSET PROCWAKEUPTIMER +PROCEVENTORLOCK MLOCKNAME EVENTNAME) SETINTERRUPT (INTERRUPTLIST) OPT.DELETEFRAMECHECK (PREV NXT) +GRAPHADDLINK (GRAPH.ADDLINKFN FROMNODES NODEID TONODES) \DSPYPOSITION.IP (IPYPOS IPDATA) \BIN ( +STRMBINFN) GETWINDOWPROP (GETWINDOWPROPFN SCREEN) TB.ITEM.FROM.YCOORD (TBORIGIN TBITEMHEIGHT TB#ITEMS) + MSINTERPRETSET (REP TYPE ID PRED NEGATED HTABLES INVERTED OSET HTABLE BADMARKS QUOTED DEFAULTTYPE +SET2 SET1 EXPRESSION FNS FILES TYPES RECS MSVERB OTHERSET ROOT C VPART TENSE VB1 VB2 MODIFIER DET +KNOWN MSPATHOPTIONS) \BOUT (STRMBOUTFN) \CHECK.PQUEUE (PROCQUEUE PQLAST PQNEXT NEXTPROCHANDLE) +\PRESSCURVE2 (IMAGEDATA ELSTREAM ELSTARTBYTE SPLINEX SPLINEY SPLINEDX SPLINEDY SPLINEDDX SPLINEDDY +SPLINEDDDX SPLINEDDDY %#KNOTS) \KEYACTION1 (FLAGS CODES SHIFTCODES ALTGRAPHCODES DEADKEYLIST) +\LEAF.GETFILENAME (DEVICEINFO PFSLEAFSEQUIN LEAFCACHEDFILE FULLFILENAME) PPROC (PQNEXT NEXTPROCHANDLE +PQLOWER PROCTIMERLINK) GRAPHBUTTONEVENTFN (GRAPHNODES) \RESTLIST.UFN (BLINK IVAR) FULLNAME (FULLNAME) +GETINTERRUPT (INTERRUPTLIST) \MISCN.UFN (IVAR MISCN-MVS) SCROLLBYREPAINTFN (LEFT BOTTOM WIDTH HEIGHT +SCREGION SCREEN IMAGEDATA PRIGHT PTOP) \TRANSLATE.10TO3 (NDBTRANSLATIONS NSHNM2 NSHNM1 NSHNM0 +NDBPUPHOST#) SEDIT::CREATE-NEW-COMMENT (SEDIT::COMMENT-WIDTH) \RPLCONS (PAGEBASE CNT CDRCODE NEXTCELL +NEXTFREE DTDCNTLOC DBLWORD#) \CANONICALIZE.NSADDRESS (NSHNM2 NSHNM1 NSHNM0) \FIXDLINES (TXTREADONLY +\WINDOW NEXTLINE CHARLIM CHAR1 CHARTOP CR\END PREVLINE SEL SHIFTEDSEL MOVESEL DELETESEL) DINFO.FIND ( +WINDOW MONITORLOCK FIND.STRING) MSNEXTWORD (SOUGHT ROOT ITEM MODIFIER) WHICHW (XCOORD YCOORD SCTOPW +REG NEXTW) COURIER.WRITE.STRING (FATSTRINGP HIBYTE LOBYTE BASE OFFST) GETFILEINFO (ACCESS GETFILEINFO +DEVICE ACCESSBITS BYTESIZE EOLCONVENTION MAXBUFFERS ENDOFSTREAMOP GETFILENAME) \RTP.SOCKET.PROCESS ( +BSPLOCK BSPINPUTHANDLER) \ENVCALL.UFN (MISCSTACKRESULT) \FILE.NOT.OPEN (FULLNAME) CL:TYPE-OF (DTDNAME) + \EP.PUT.AUX (EPPLIST) \TYPECHECK.UFN (DTDNAME DTDSUPERTYPE) \FILE.WONT.OPEN (FULLNAME) SEDIT::MAP-FONT + (SEDIT::DEFAULT-FONT SEDIT::KEYWORD-FONT SEDIT::ITALIC-FONT SEDIT::COMMENT-FONT SEDIT::BROKEN-ATOM-FONT +) ICONW.PRINT-JUSTIFIED (LEFT HEIGHT WIDTH BOTTOM TOP) \STKSCAN (ALINK INVALIDP VCELL NAMETABLE NTSIZE + OVERHEADWORDS BYTESWAPPED IVAR BLINK FIRSTPVAR BOUND LOOKEDUP BINDINGPTR) PUTDEFN (DEFINITIONCELL +ALIGNED ARGTYPE NTSIZE WORDINPAGE STARTPC) DSPFILL (LEFT BOTTOM WIDTH HEIGHT) \LFFileName (CHARLIST +VERSION) SETHASHSTATUS (Stream File) MSNEGATESET (REP) \IS.NOT.RANDACCESSP (FULLNAME) +\PROCESS.MAKEFRAME (PROCFX StackBase MISCSTACKRESULT PROCSTATUS) OPT.FRAMEVAR (VARS NNILS NVALS OPNAME + PREV OPARG) TB.ITEM.VISIBLE? (TBWINDOW PTOP BOTTOM TBITEMHEIGHT) \READBINARYBITMAP (BITMAPBASE +BITMAPRASTERWIDTH) \LFMakeDirHole (size FILEDESC) \UNBOXFLOAT3 (NEXTBLOCK) CL::%%STATS-OBJECT-DIFFERENCE + (SWAPWAITTIME GCTIME DISKIOTIME PAGEFAULTS SWAPWRITES DISKOPS) RESETKEYACTION (FLAGS CODES SHIFTCODES + ARMED INTERRUPTLIST) COMP.COND (OPARG) \TYPEMASK.UFN (PAGE#) RESHAPEBYREPAINTFN (WIDTH HEIGHT LEFT +BOTTOM PRIGHT RIGHT PTOP TOP) TOPWP (SCTOPW SCREEN) FIND.PROCESS (PROCDELETED) CONTROL-T (DISKIOTIME +NETIOTIME GCTIME SWAPWAITTIME) TWODINSPECT.COPYBUTTONFN (ELTLEFT ELTBOTTOM ELTWIDTH ROWPROP COLUMNPROP +) DINFO.ADD.FMENU (WINDOW FMENU.WINDOW) \SELECTPROCESS (PROCNAME PROCSYSTEMP) MB.NWAYBUTTON.SELFN ( +\TEXTOBJ) SEDIT::COPY-STRUCTURE-COMMENT (CL:STRUCTURE) EQL (LOWORD HIWORD) \HANDLE.NS.ROUTING.INFO ( +XIPFIRSTDATAWORD EPNETWORK XIPLENGTH XIPCONTENTS NETTYPE %#HOPS NET#LO NET#HI RTNET# LONUM HINUM NET# +RTHOPCOUNT RTNDB RTGATEWAY# RTRECENT RTTIMER) \PRINDATUM (COMMONLISP) \TEDIT.DELETE (CH# CHLIM LINES +\WINDOW TEXTLEN DCH TXTREADONLY SET L1 LN TXTHISTORY POINT DELETED PREVLINE NEXTLINE CHAR1 CHARLIM SEL +) CL:TRUENAME (NAMEDP) \DRAWLINE.UFN (BITS) DINFO.INVERT.NODE (GRAPHNODES NODEID LAST.INVERTED.NODE) +PROCESS.STATUS.WINDOW (PROCNAME IMAGEHEIGHT IMAGEWIDTH LEFT BOTTOM XCOORD YCOORD) DINFO.DEFAULT.MENU ( +WINDOW DINFO.MENU) FETCHFIELD (fdTypeName fdOffset fdType) \STORE.N.UFN (NEXTBLOCK) \DOHELPINTERRUPT1 +(PROCNAME) \WRITEBITMAP (BITMAPBASE BITMAPRASTERWIDTH BITMAPHEIGHT) \COPY.N.UFN (NEXTBLOCK) +OPT.FRAMEDEL (FRAMETYPE VARS LEVEL OPNAME OPARG NOXVAR PARENT NNILS NVALS PREV FRAME NXT EXTCALL) +SHADEITEM (ITEMS WIDTH) \FM.MOMENTARY-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN) +GETDESCRIPTORS (DTDDESCRS) \LFMakeLeaderPage (fileID size) REPLACEHASHKEY (Stream ByteStream) \RETURN +(CLINK) \PFTransferPage (MISCSTACKRESULT STATUS) \CURVE2 (IMAGEDATA SPLINEX SPLINEY DDClippingBottom +DDClippingTop DDClippingRight DDClippingLeft DDDestination DDOPERATION BITMAPBITSPERPIXEL BITMAPBASE +BITMAPRASTERWIDTH BITMAPHEIGHT BITMAPWIDTH DDXOFFSET DDYOFFSET %#KNOTS SPLINEDX SPLINEDY SPLINEDDX +SPLINEDDY SPLINEDDDX SPLINEDDDY) \ARG0 (BLINK NARGS IVAR) OPT.CLEANFRAME (EXTCALL PARENT) +CHECK/MENU/IMAGE (IMAGE SCREEN DSP WBORDER SAVE) GETDEF (NULLDEF) \LFMakeDirEntry (CHARLIST fileID +FILEDESC HIBYTE LOBYTE VERSION) \MYARGCOUNT (NARGS BLINK) ADDMENU (IMAGEWIDTH IMAGEHEIGHT MENUPOSITION + MENUGRID XCOORD MENUOUTLINESIZE YCOORD WHENSELECTEDFN) ERROR! (FRAMENAME CLINK ALINK INVALIDP) +\FILINGSESSION.DEFPRINT (DSP FSNAMESTRING) TEDIT.INSERT (SEL TEXTOBJ SET TEXTLEN \WINDOW POINT CH# +CHLIM X0 XLIM OFFST BASE LENGTH FATSTRINGP TXTREADONLY) SEDIT::SUBSTITUTE-OBJ (SEDIT::OPEN-NODE-CHANGED? + SEDIT::DISPLAY-WINDOW SEDIT::SELECTION) \TEXTCLOSEF-SUBTREE (PCE PFILE LO HI) \NSFILING.GETFILE ( +NSRANDOMDEVICE DEVICEINFO NSDIRECTORIES NSDIRECTORYP NSVERSION NSROOTNAME NSHDIRECTORYP NSHATTRIBUTES +NSHACCESS NSHDATUM NSHBUSYCOUNT FSSESSIONLOCK) \FTP.CLEANUP (FTPBUSY FTPIN) PRIN3 (COMMONLISP) +\PARAS.IN.SEL (CH# DCH PPARALAST PLEN) SHIFT.BITMAP.UP (BITMAPWIDTH BITMAPHEIGHT) GETBOXPOSITION ( +POSITION) DEFINEFONT.IP (IPDATA IPPAGEFONTS) UPDATEFILES (CHANGED DATEFILENAME FILEDATES COMSNAME +FILEPROP TOBEDUMPED) \CLOSEF.PRESS (IMAGEDATA PDSTREAM PRESSFONTDIR DESCR HIBYTE LOBYTE FONTSET# FONT# + ROTATION PRPARTSTART PRDOCNAME) \PRINT-USING-ADDRESS (COMMONLISP CHARPOSITION HASHMACROCHAR) +RIGHTW.ADJUSTSELECTION (PROP) \PROCESS.GO.TO.SLEEP (EVENTWAKEUPPENDING PROCQUEUE PQLAST PQNEXT +NEXTPROCHANDLE PROCTIMERBOX PROCFX INVALIDP WAKEREASON PQLOWER) HEIGHTIFWINDOW (SCTITLEDS) SPAWN.MOUSE + (PROCNAME) DINFO.LAYOUTGRAPH (WINDOW MENUFONT NODELST CHILDREN LABEL PARENT ID) +TEDIT.RESET.EXTEND.PENDING.DELETE (\TEXTOBJ) \MAIKO.10MBTURNONETHER (NDBCSB) CURRENTINTERRUPTS ( +INTERRUPTLIST) BSPINPUTSTREAM (BSPSOC BSPINPUTSTREAM) DO.INSERT.LINE (ROW TOP) PRINT-BITMAPS-NICELY ( +BITMAPBASE) PUTDEF (PUTDEF) RESET.INTERRUPTS (INTERRUPTLIST) DINFO.SHOWGRAPH (LEFT BOTTOM HEIGHT WIDTH +) \FM.INSUREVISIBLE (LEFT WIDTH) SETBSPUSERINFO (BSPSOC) \PRINTBINARYBITMAP (HIBYTE LOBYTE BITMAPBASE +BITMAPRASTERWIDTH) \DRAWPOLYGON.IP (IMAGEDATA IPVISLEFT IPVISRIGHT IPVISBOTTOM IPVISTOP XCOORD YCOORD) + FB.CANONICAL.DIRECTORY (PROMPTWINDOW) RIGHTW.BUTTONEVENTFN (PROP) FIND.PACKAGE (LASTINDEX HARRAYPBASE + VALUE KEY) \PSWOP.SELECTED (PROCNAME PROCINFOHOOK PROCSYSTEMP PROCDELETED) \FM.CLEARITEM (FM.USERDATA + LEFT BOTTOM HEIGHT) INSERTHASHKEY (%#Entries Size Stream ByteStream) \GCRECLAIMCELL (CDRCODE CARFIELD + PAGEBASE DTDPTRS DTDFREE LINKFIELD OFFSETCODE) \GCSCAN1 (EMPTY LINKP STKCNT) \GETWINDOWHEIGHT (HEIGHT + REG WBORDER WTITLE SCTITLEDS SCREEN) \TEDIT.CENTER.SEL.REV (CH# DCH) FB.MAKE.BROWSER.BUSY (FBLOCK) +SEDIT::TRY-REUSING-BITS (SEDIT::BLOCK-X SEDIT::WINDOW-LEFT SEDIT::BLOCK-START SEDIT::NEXT-BLOCK +SEDIT::BLOCK-ASCENT SEDIT::BLOCK-DESCENT SEDIT::BLOCK-WIDTH SEDIT::BLOCK-NEW-X SEDIT::SHIFT-Y +SEDIT::BLOCK-BASE-LINE SEDIT::BASE-LINE-Y SEDIT::CURRENT-LINE SEDIT::SHIFT-RIGHT SEDIT::REPAINT-X +SEDIT::SHIFT-DOWN) \GETWINDOWWIDTH (WIDTH REG WBORDER) PROCESS.NAME (PROCDELETED PROCNAME) PRESSBITMAP + (HEIGHT WIDTH IMAGEDATA LEFT BOTTOM) CREATE.NEW.NODEPOSITION (NODEPOSITION XCOORD YCOORD) \RETCALL ( +MISCSTACKRESULT) TB.RESHAPEFN (TBLOCK TBREADY TBITEMHEIGHT) %%AREF1 (TOTAL-SIZE BASE TYPE-NUMBER) +\MAIKO.ETHER-INTERRUPT (DLFIRSTICB NDBCSB 10MBTYPE) SEDIT::COPY-SELECTION-COMMENT (SEDIT::SELECT-NODE +CL:STRUCTURE SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::DISPLAY-WINDOW SEDIT::ENVIRONMENT +SEDIT::NODE-TYPE SEDIT::POINT-TYPE) %%ASET1 (TOTAL-SIZE TYPE-NUMBER BASE) MSONPATH (FROM MSPATHOPTIONS + TO AVOIDING NOTRACE TOPFLG) \FDEVINSTANCE (CLOSEFILE DEVICEINFO DEVICE GETFILEINFO OPENFILE READPAGES + SETFILEINFO TRUNCATEFILE WRITEPAGES REOPENFILE BIN BOUT PEEKBIN BACKFILEPTR SETFILEPTR GETFILEPTR +GETEOFPTR EOFP BLOCKIN BLOCKOUT FORCEOUTPUT) OPENWP (NEXTW) OPT.FRAMELOCAL (VARS OPNAME OPARG) +\POP.N.UFN (NEXTBLOCK) COERCETOBITMAP (WIDTH HEIGHT LEFT BOTTOM) NCREATE2 (DTDSIZE DTDPTRS) +CL::%%EQCODEP (FNHEADER DEFPOINTER) \FTP.RENAMEFILE (OPENP FTPIN FTPOUT) TRANSGRAPH (GRAPHNODES XCOORD + NODEPOSITION YCOORD) \GETBASEBYTE (HIBYTE LOBYTE) FW-WIPE (OFDWINDOW) \LEAF.REOPENFILE ( +LFCREATIONDATE LEAFINFO LFWRITEDATE VALIDATION) \NSFILING.GENERATEFILES (FSPROTOCOLNAME NSDIRECTORIES +NSROOTNAME NSVERSION NSHDATUM) \VFMGet1 (key volumePage) \HANDLE.RAW.3TO10 (EPNETWORK TRANSOPERATION +TRANSPUPHOST NDBPUPHOST# 10MBLENGTH TRANSSENDERPUPHOST) HEADINGOP.IP (IPDATA IPLEFT IPTOP +IPHEADINGFONT) UNMARKASCHANGED (CHANGED TOBEDUMPED FILEPROP) \MAKEPCTB (PLEN) \LEAF.EVENTFN ( +DEVICEINFO PFSLEAFSEQUIN OPENP PFSLOOKUPFILESOCKET) VECTOR-LENGTH (FILL-POINTER) SHIFT.BITMAP.DOWN ( +BITMAPWIDTH BITMAPHEIGHT) OPENRTPSOCKET (BSPLOCK RTPSTATE RTPEVENT BSPFAILUREREASON) PRINTROUTINGTABLE + (RTHOPCOUNT RTNET# RTGATEWAY# RTRECENT RTTIMER) FB.FINISH.COMMAND (ABORTWINDOW ITEMS) DIRECTORYNAME ( +DIRECTORYNAMEP DEVICENAME) SEDIT::SHIFT-BLOCK (SEDIT::CURRENT-LINE SEDIT::NEXT-LINE-Y SEDIT::REPAINT-START + SEDIT::REPAINT-LINE SEDIT::DISPLAY-WINDOW SEDIT::WINDOW-LEFT SEDIT::YCOORD SEDIT::WINDOW-RIGHT +SEDIT::LINE-HEIGHT SEDIT::REPAINT-X SEDIT::BASE-LINE-Y) \BITBLT.IP (IPVISIBLEREGION IMAGEDATA LEFT +BOTTOM WIDTH HEIGHT) OPT.MERGEFRAMEP (FRAMETYPE OPARG VARS) SEDIT::COMPUTE-POINT-POSITION-COMMENT ( +SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::\Y SEDIT::START-X SEDIT::WIDTH SEDIT::LINEAR-FORM +SEDIT::FIRST-LINE SEDIT::\X) SPYOBJ.DISPLAY (OBJECTDATUM) XIPAPPEND.STRING (XIPLENGTH XIPCONTENTS) +PROCESS.BACKTRACE (LEFT BOTTOM TOP WIDTH PROCFX) \TEDIT.COPY.PIECEMAPFN (POBJ STREAMHINT \WINDOW +CLPROTECTED PLOOKS) \TEDIT.FOREIGN.COPY? (\TEXTOBJ DCH CH# TEXTLEN EDITOPACTIVE STREAMHINT) +UNMAKEHARDCOPYMODESTREAM (WIDTH) \ADDBASE (HINUM LONUM) \UPDATE.PROCESS.WINDOW (PROCNAME) +MSMATCHRATING (SOUGHT ITEM TYPE REP) LEAF.ASSURE.FINISHED (LEAFCONNECTION SEQLOCK SYSQUEUEHEAD +SEQDONEQ EPUSERFIELD EPLINK SEQRETRANSMITQ SEQEVENT LEAFERRORCNT FULLFILENAME) FB.EXPUNGECOMMAND ( +TABLEBROWSER) SEDIT::UNDO (SEDIT::OPEN-NODE-CHANGED? SEDIT::UNDO-LIST SEDIT::DISPLAY-WINDOW +SEDIT::UNDO-UNDO-LIST SEDIT::SELECTION SEDIT::CARET-POINT) CL::%%PRINT-TIMING-INFO (SWAPWAITTIME +GCTIME DISKIOTIME NETIOTIME PAGEFAULTS SWAPWRITES DISKOPS) \UNQUEUE (SYSQUEUEHEAD QLINK) +SEDIT::COPY-STRUCTURE-COMMENT-WORD (CL:STRUCTURE SEDIT::LINEAR-FORM) SEDIT::REUSE-LINEAR-FORM ( +SEDIT::CURRENT-X SEDIT::CURRENT-LINE SEDIT::START-X SEDIT::LINEARIZE SEDIT::NODE-TYPE SEDIT::INLINE? +SEDIT::LINEAR-FORM SEDIT::NEXT-LINE SEDIT::INDENT SEDIT::FIRST-BLOCK SEDIT::NEXT-LINE-Y SEDIT::YCOORD +SEDIT::BELOW? SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::BASE-LINE-Y SEDIT::LINE-LENGTH +SEDIT::LINEAR-THREAD) CREATETEXTUREFROMBITMAP (BITMAPHEIGHT BITMAPWIDTH) SEDIT::SELECT-NODE ( +SEDIT::SELECTION) LOOKUP-SYMBOL (TOTAL-SIZE BASE) \NSFILING.CLOSE.HANDLE (NSHDATUM) DINFO.WRITE.GRAPH +(TOPNODEID TEXTPROPS LOOKUPFN MENUFN FREEMENUITEMS NODELST USERDATA) FB.REMOVE.FILE (TI# +TIUNSELECTABLE SUBDIREND TIDATA FILENAME) MARKASCHANGED (WHENCHANGED CHANGED) \CHARWIDTH.PRESS ( +PRSPACEWIDTH IMAGEDATA WIDTHS FONTCHARSETVECTOR PRFONT) DSPSCROLL (IMAGEDATA DDScroll) +RESHAPEALLWINDOWS (WIDTH HEIGHT ATNOWX ATNOWY ATTACHEDW ATXSIZE ATYSIZE ATEDGE LEFT BOTTOM) +\SLOWIPLUS2 (HINUM LONUM) DINFO.HISTORIC.UPDATE (NODELST MONITORLOCK) GETPROMPTWINDOW (WIDTH) +\BSP.PREPARE.INPUT (BSPLOCK BSPSOC BSPCURRENTPUP BSPIOTIMEOUT %#UNREADPUPS IOTIMEOUTFN BSPINPUTEVENT +BSPINPUTQ PUPTYPE PUPCONTENTS PUPLENGTH COFFSET CBUFSIZE MARKPENDING) DISPLAYLINK (SIDESFLG +DIRECTEDFLG) \SLOWIDIFFERENCE (HINUM LONUM) SHIFT.BITMAP.LEFT (BITMAPWIDTH BITMAPHEIGHT) +\LEAF.RENAMEFILE (DEVICENAME) SHIFTDOWNP (LOCK META 1SHIFT 2SHIFT CTRL FONT USERMODE1 USERMODE2 +USERMODE3) MB.NB.SIZEFN (XSIZE YSIZE) \SLOWITIMES2 (HINUM LONUM) OLD.FIND.SYMBOL (PNAMELENGTH +PNAMEBASE PNAMEFATPADDINGBYTE FATPNAMEP) SEDIT::COMPUTE-SELECTION-POSITION-COMMENT (SEDIT::SELECT-NODE + SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::\Y SEDIT::\T SEDIT::FIRST-LINE SEDIT::START-X +SEDIT::LINEAR-FORM SEDIT::\X SEDIT::\Z) \SLOWIQUOTIENT (HINUM LONUM) MSSIMPLESET (ID QUOTED) +DIRECTORYNAMEP (DIRECTORYNAMEP) TEDIT.DELETE (SEL) EDITDEF (EDITDEF) FB.MAYBE.EXPUNGE (DELETEDFILES) +IREMAINDER (HINUM LONUM) SYMBOL.PACKAGE (PACKAGEINDEX BASE) HOSTNAMEP (HOSTNAMEP) +\TEDIT.MARK.LINES.DIRTY (TEXTLEN \WINDOW CHAR1 CHARTOP NEXTLINE) FB.INCREASING.VERSION (VERSION TIDATA +) \LFGenFileID (lastIDAllocated) SEDIT::CLOSE-NODE-COMMENT (CL:STRUCTURE) SHIFT.BITMAP.RIGHT ( +BITMAPWIDTH BITMAPHEIGHT) XIPAPPEND.WORD (XIPLENGTH XIPCONTENTS) FW-RESET (OFDSTATUS) \FIRSTNODE ( +COUNT) \LEAF.DIRECTORYNAMEP (PFSKNOWNDIRS DEVICEINFO PFSOSTYPE) OPT.NONILVAR (OPNAME OPARG) \SLOWLLSH1 + (HINUM LONUM) BMOBJ.DISPLAYFN (BMOBJSCALEFACTOR BITMAP BMOBJDESCENT) SUBATOM (PNAMEBASE FATPNAMEP +PNAMELENGTH BASE FATSTRINGP OFFST LENGTH) \FM.CHANGELABEL (LEFT BOTTOM FM.LABEL FM.REGION FM.MAXREGION + FM.BITMAP FM.HIGHLIGHT FM.USERDATA) \LEAF.FLUSH.CACHE (LEAFOPENCLOSELOCK LEAFCACHEDFILE +LEAFREALLYOPEN SEQNAME) SEDIT::NORMALIZE-SELECTION (SEDIT::SELECTION SEDIT::DISPLAY-WINDOW +SEDIT::SELECT-START-LINE) \SLOWLLSH8 (HINUM LONUM) \SPP.HANDLE.INPUT (SPPTERMINATEDP SPPMYNSOCKET +SPPSEQNO SPPACKEDSEQNO SPPRETRANSMITTING XIPTYPE ERRORXIPCODE SPPOTHERXIPHANDLER XIPCONTENTS +SPPESTABLISHEDP SOURCECONID SPPDESTID DESTCONID SPPSOURCEID SEQNO SPPACKNO SPPACCEPTNO SPPSERVERFLAG +ATTENTION SYSTEMPACKET XIPLENGTH ACKNO ALLOCNO SPPOUTPUTALLOCNO SPPALLOCATIONEVENT SENDACK +SPPACKREQUESTED SPPROUNDTRIPTIME SPPACKREQTIME) CHCON1 (LENGTH FATSTRINGP BASE OFFST PNAMELENGTH +FATPNAMEP PNAMEBASE) \SLOWLRSH1 (HINUM LONUM) UNPACKFILENAME.STRING (FULLFILENAME FATSTRINGP BASE) +MENUWINDOW (MENUROWS MENUCOLUMNS MENUOUTLINESIZE IMAGEWIDTH IMAGEHEIGHT) \FINDPIECE (CHNUM) \SLOWLRSH8 + (HINUM LONUM) BURYW (BURYWFN SCREEN) DECODE-NS-STRING (BASE OFFST) GETBSPUSERINFO (BSPUSERSTATE +BSPSOC) OPT.FRAMEMERGE (VARS PARENT NVALS PREV NNILS) \SLOWLOGOR2 (HINUM LONUM) SHRINKW (SHRINKWFN +SCREEN) GETHASHKEY (Size Stream ByteStream) PUPNET.DISTANCE (RTHOPCOUNT) \ONQUEUE (SYSQUEUEHEAD QLINK) + ADD/AND/DISPLAY/LINK (NODEID) \SLOWLOGAND2 (HINUM LONUM) MOVEW (MOVEWFN SCREEN) +SEDIT::RECOMPUTE-FORMAT-VALUES (SEDIT::NODE-TYPE SEDIT::INLINE-WIDTH SEDIT::SUB-NODES +SEDIT::COMPUTE-FORMAT-VALUES SEDIT::ENVIRONMENT) FB.MAYBE.INSERT.FILE (PREPAREDPATTERN DIRECTORYSTART +PATTERN FILEINFO TIDATA INFODISPLAYED VERSION TISELECTED) \VFMGetInterval (vfmStart volumePage key) +\SLOWLOGXOR2 (HINUM LONUM) FW-RE-INIT (OFDSTREAM FULLNAME) \BINS (BLOCKIN DEVICE) \SMASHBSPSTREAM ( +BSPSOC BSPOUTPUTSTREAM BSPCURRENTPUP MARKPENDING CBUFSIZE CPPTR COFFSET ACCESS) \FM.HIGHLIGHTITEM ( +FM.USERDATA LEFT BOTTOM) \BSP.CLEANUP.INPUT (BSPCURRENTPUP BSPSOC BSPFILEPTRLO PUPLENGTH BSPFILEPTRHI +FW6 %#UNREADPUPS SENTZEROALLOC) \CURVESLOPE (XCOORD YCOORD SPLINEDX SPLINEDY) FIND.START.OF.WORD ( +NSCHARHASH STOPATOM CPXREALCHAR) \BOUTS (BLOCKOUT DEVICE) \PFFindFileSize (filePage volNum) +SEDIT::COMMENT-LENGTH (SEDIT::SUB-NODES CL:STRUCTURE) \MAIKO.INPUT.INTERRUPT (DLFIRSTICB NDBCSB +10MBTYPE) \VFMGet (vfmStart key nextKey) %%EXTEND-ARRAY (TYPE-NUMBER BASE) TB.WINDOW (TBWINDOW) +ONEDINSPECT.REPAINTFN (TOP BOTTOM) REMWINDOWPROP (USERDATA) SEDIT::GET-USER-STRING (SEDIT::DISPLAY-WINDOW +) \QUEUELENGTH (SYSQUEUEHEAD QLINK) \TEDIT.WINDOW.OPS (WRIGHT HEIGHT) SPYOBJ.LABEL (OBJECTDATUM +CACHEDLABEL) SAMECLOOKS (CLFONT CLOFFSET CLINVISIBLE CLSELHERE CLPROTECTED CLOLINE CLSTRIKE CLULINE) +COPYBYTES (BUFFERED DEVICE RANDOMACCESSP GETFILEPTR EOFP) SEDIT::PAINT-TO-END-OF-LINE (SEDIT::CURRENT-LINE + SEDIT::REPAINT-LINE SEDIT::REPAINT-X SEDIT::INDENT SEDIT::WINDOW-LEFT SEDIT::DISPLAY-WINDOW +SEDIT::NEXT-LINE-Y SEDIT::WINDOW-RIGHT SEDIT::LINE-HEIGHT SEDIT::BASE-LINE-Y SEDIT::REPAINT-START +SEDIT::YCOORD) SHOWSHADE.IP (LEFT BOTTOM WIDTH HEIGHT) \UNBOXFLOAT2 (NEXTBLOCK HIWORD LOWORD) +BMOBJ.IMAGEBOXFN (BMOBJSCALEFACTOR BITMAP BMOBJDESCENT) \GETEOFPTR (GETEOFPTR DEVICE) +CREATEMENUEDWINDOW (MENUROWS ITEMS IMAGEWIDTH IMAGEHEIGHT WIDTH HEIGHT BOTTOM LEFT) +MBUTTON.FIND.NEXT.FIELD (PCTB SCRATCHSEL TEXTLEN CLSELHERE PLOOKS PLEN NEXTPIECE CLPROTECTED) +UNSAVEFNS (FILEPKGNAME) \UNBOXFLOAT1 (NEXTBLOCK HIWORD LOWORD) \BUFFERED.COPYBYTES (DEVICE CBUFPTR +CBUFSIZE COFFSET GETNEXTBUFFER) FB.PRINTFN (TIDATA DIRECTORYP FILENAME OFFST BASE FATSTRINGP LENGTH +STARTOFPNAME INFOSTART FILEINFO INFODISPLAYED BROWSERFONT INFOFORMAT INFOWIDTH) %%AREF2 (BOUND0 BOUND1 + DIMS OFFSET BASE TYPE-NUMBER) \POPSTATE.IP (XPOS YPOS) RANDACCESSP (RANDOMACCESSP DEVICE FULLNAME) +CURSOR.INIT (BITMAPBASE BITMAPWIDTH BITMAPHEIGHT BITMAPRASTERWIDTH) %%ASET2 (BOUND0 BOUND1 DIMS OFFSET + TYPE-NUMBER BASE) \SETFILEPTR (SETFILEPTR DEVICE) \CHANGE-VISIBLE-REGION.IP (IPFONT LEFT RIGHT TOP +BOTTOM IPVISTOP \SFAscent IPCLIPINCLUSIVE IPVISBOTTOM \SFDescent IPXPOS IPVISLEFT IPYPOS +IPMINVISIBLEBASELINE IPMAXVISIBLEBASELINE IPVISRIGHT IPRIGHT) \LFDirectoryScrambled (LVlabel VOLUME) +\SLOWIGREATERP (HINUM LONUM) \GETSTREAM (KEYBOARDSTREAM DSP) \SLOWFGREATERP (HIWORD LOWORD HINUM LONUM + SIGNBIT LOFRACTION HIFRACTION EXPONENT) \DSPXPOSITION.PRESS (PRXPOS IMAGEDATA) COPYCHARS ( +EOLCONVENTION EXTERNALFORMAT RANDOMACCESSP DEVICE FULLFILENAME GETFILEPTR EOFP) \PUPNET.CLOSERP ( +PUPNET# RTHOPCOUNT) \RTP.HANDLE.INPUT (PUPSOC BSPLOCK RTPTIMEOUT RTPTIMER) \LEAF.BREAKCONNECTION ( +DEVICEINFO PFSLEAFSEQUIN OPENP UNREGISTERFILE) \INCHAR (EOLCONVENTION INCCODEFN) SPYOBJ.HEIGHT ( +OBJECTDATUM PERCENT) GETCURSORPROP (CUDATA) EQUAL (LONUM HINUM EDFXP) \SPP.RETRANSMIT.NEXT ( +SPPRETRANSMITTING SPPRETRANSMITQ SPPOUTPUTALLOCNO SPPSEQNO) PRETTYFILEINDEX (DEVICE) PUTCURSORPROP ( +CUDATA) \BOXIPLUS (HINUM LONUM) %%ALTER-AS-DISPLACED-ARRAY (READ-ONLY-P EXTENDABLE-P ADJUSTABLE-P +INDIRECT-P BASE) SEDIT::CFV-COMMENT (SEDIT::COMMENT-WIDTH SEDIT::UNASSIGNED) \BOXIDIFFERENCE (HINUM +LONUM) XIPAPPEND.BYTE (XIPLENGTH XIPCONTENTS) \TEDIT.REOPEN.STREAM (PCTB PFILE NEXTPIECE TXTFILE) +CLEAR.LEAF.CACHE (DEVICEINFO PFSLEAFSEQUIN LEAFCACHEDFILE) TEDIT.PROMPTPRINT (MENUFLG PROMPTWINDOW) +\HCPYMODEDSPPRINTCHAR (IMAGEDATA CCECHO NSCHARHASH CHARPOSITION DDXPOSITION DDLeftMargin DDRightMargin +) EXTENDABLE-ARRAY-P (EXTENDABLE-P) CL:ARRAY-DIMENSION (TOTAL-SIZE DIMS) SEDIT::UNDO-LIST-REPLACE ( +SEDIT::DEPTH SEDIT::CARET-POINT) \CREATEPIECEORSTREAM (FATSTRINGP ACCESSBITS) OPENSTREAM (FULLNAME +ACCESS) \MAIKO.10MBSENDPACKET (10MBMULTICASTP NSHNM2 NSHNM1 NSHNM0 10MBDESTNSADDRESSBASE 10MBLENGTH +10MBTYPE) ONEDINSPECT.BUTTONEVENTFN (PROP) CL:ADJUSTABLE-ARRAY-P (ADJUSTABLE-P) SEDIT::OUTPUT-STRING ( +SEDIT::RELINEARIZATION-TIME-STAMP SEDIT::LINEAR-POINTER STRING SEDIT::FONT SEDIT::PRIN-2? SEDIT::WIDTH + SEDIT::LINEAR-PREV SEDIT::LINE-ASCENT SEDIT::CURRENT-LINE SEDIT::LINE-DESCENT SEDIT::DISPLAY-WINDOW +SEDIT::DEFAULT-FONT SEDIT::ENVIRONMENT SEDIT::CURRENT-X) IDLE.BITMAP (WIDTH HEIGHT LEFT BOTTOM) +CL:FILL-POINTER (FILL-POINTER-P FILL-POINTER) CLOSEF (USERCLOSEABLE FULLNAME) \PFFindPageAddr ( +PAGEGROUP filePage nextFilePage volNum volumePage) BITSPERPIXEL (BITMAPBITSPERPIXEL SCDEPTH +SCBITSPERPIXEL SCREEN) DELETEHASHKEY (Stream ByteStream %#Entries) ARRAY-NEEDS-INDIRECTION-P ( +INDIRECT-P) TEDIT.SUBLOOKS (SEL PCTB TEXTLEN PLOOKS PLEN NEXTPIECE \WINDOW) SEDIT::UNDO-REPLACE-QUOTE +(SEDIT::SUB-NODES) FB.COPY/RENAME.MANY (DEFAULTDIR TIDATA FILENAME SUBDIREND SUBDIRECTORY PATTERN +NAMESTART SORTBY STARTOFNAME) \FM.DISPLAYITEM (FM.USERDATA LEFT BOTTOM) \FTP.PACK.DIRECTORYNAMEP ( +FTPHOST) XIPAPPEND.CELL (XIPLENGTH XIPCONTENTS) DIRFILENAME (LITERALNAME STRINGNAME) +SEDIT::VERIFY-STRUCTURE (SEDIT::ROOT CL:STRUCTURE SEDIT::SUB-NODES SEDIT::CONTEXT-LOCK +SEDIT::OPEN-NODE-CHANGED? SEDIT::CHANGED? SEDIT::SELECTION SEDIT::CARET-POINT SEDIT::DISPLAY-WINDOW +SEDIT::CHANGED-NODES) COMP.BOOL (OPNAME) ONEDINSPECT.COPYBUTTONFN (ELTLEFT ELTBOTTOM ELTWIDTH PROP) +\10MBSETUPRECEIVER (10MBPACKETBASE) FW-FORGET-CMD (OFDSTATUS FULLNAME OFDWINDOW) +CL:ARRAY-HAS-FILL-POINTER-P (FILL-POINTER-P) SEDIT::OUTPUT-SPACE (SEDIT::RELINEARIZATION-TIME-STAMP +SEDIT::LINEAR-POINTER SEDIT::LINEAR-PREV SEDIT::SPACE-WIDTH SEDIT::ENVIRONMENT SEDIT::DISPLAY-WINDOW +SEDIT::CURRENT-X) \TEDIT.CLOSEUPLINES (WRIGHT WLEFT YBOT WTOP LHEIGHT WBOTTOM DESCENT NEXTLINE CHARLIM + TEXTLEN) EQUAL-DIMENSIONS-P (TOTAL-SIZE DIMS BOUND0 BOUND1) SEDIT::SUBNODE-CHANGED-QUOTE (CL:STRUCTURE +) FB.GET.NEW.FILE.SPEC (DEFAULTDIR) \MAIKO.10MBSTARTDRIVER (NDBCSB) TEDIT.PUT.PCTB (FMTSPEC PCTB +PLOOKS DEFAULTCHARLOOKS EOLCONVENTION TXTPAGEFRAMES TXTPARALOOKSLIST TXTCHARLOOKSLIST PPARALAST PLEN +PPARALOOKS POBJ PFATP PNEW PFILE PFPOS PSTR OFFST BASE LENGTH FATSTRINGP NEXTPIECE CARETLOOKS) +TEDIT.DO.BLUEPENDINGDELETE (BLUEPENDINGDELETE DCH CH# CHLIM LINES) MAKEFILE1 (TOBEDUMPED FILEPROP) +\NSFILING.CONFLICTP (OPENFILELST FULLFILENAME ACCESSBITS) SPYOBJ.IMAGEBOX (OBJECTDATUM) BIT-ARRAY-P ( +BIT-P) SEDIT::UPDATE (SEDIT::DISPLAY-WINDOW SEDIT::SELECTION SEDIT::ROOT SEDIT::CARET-POINT) +CURSORCREATE (YCOORD XCOORD) DIRGETFILEINFO (FILEGENERATORS) \TEDIT.BOLD.CARET.ON (CARETLOOKS) +\UFStoOtherCopyMess (DEVICENAME DEVICE FULLFILENAME) HASHFILEDATA (File ValueType ItemLength %#Entries +) STKPOS (INVALIDP CLINK ALINK) \VFMReadNext (used data) \CURSORUP (BITMAPBITSPERPIXEL CUIMAGE CUMASK +BITMAPWIDTH BITMAPHEIGHT CUHOTSPOTX CUHOTSPOTY) OPT.CODEFRAME (OPNAME FRAME PREV OPARG PARENT) +\INFER.FILE.TYPE (ENDOFSTREAMOP) TEDIT.UNDO.PARALOOKS (SEL PCTB THOLDINFO THFIRSTPIECE PPARALOOKS +NEXTPIECE THCH# THLEN) \DSPYPOSITION.PRESS (PRYPOS IMAGEDATA) TEDIT.LOOKS (SEL SET CH# DCH) +\VFMGetBufferFor (PAGE) \CURSOR-VALID-P (CUIMAGE CUHOTSPOTX CUHOTSPOTY) SEDIT::FIND-SELECTION-BACKWARDS + (SEDIT::DISPLAY-WINDOW SEDIT::SELECTION SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END) +\VECFONTINIT (BASE FONTCHARSETVECTOR) \TEDIT.FLUSH.UNUSED.LOOKS (TXTCHARLOOKSLIST TXTPARALOOKSLIST +PLOOKS PPARALOOKS NEXTPIECE CLMARK FMTMARK) \NSFILING.OPEN.HANDLE (NSHDATUM) \BSP.OTHERBOUT ( +BSPOUTPUTSTREAM) SEDIT::UNDO-REPLACE-ROOT (SEDIT::SUB-NODES) DEFAULTMAKENEWCOM (MACRO GETDEF +DESCRIPTION) COMP.PICOUNT (OPARG) \LOCATE.PUPNET (RTNET# RTHOPCOUNT) \TEDIT.SHOWSELS (SEL SHIFTEDSEL +MOVESEL DELETESEL SET) SETFILEPTR (SETFILEPTR DEVICE) SEDIT::SUBNODE-CHANGED-LIST (SEDIT::NODE-TYPE +SEDIT::SUB-NODE-INDEX SEDIT::SUB-NODES CL:STRUCTURE) SEDIT::BACKSPACE-COMMENT (SEDIT::CARET-POINT +SEDIT::OPEN-NODE-CHANGED? CL:STRUCTURE SEDIT::UNASSIGNED SEDIT::SUB-NODES SEDIT::SUPER-NODE +SEDIT::SELECTION) \RTP.ACTION (RTPSTATE PUPCONTENTS LISTENING BSPINPUTSTREAM BSPCURRENTPUP COFFSET +CBUFSIZE %#UNREADPUPS BSPINITTIMER RTPEVENT BSPINPUTEVENT RTPTIMER) \SETUPGETCH (PCTB STREAMHINT PC +PCOFF TEXTLEN PLEN PSTR PFILE PFATP POBJ TEXTOBJ CURRENTPARALOOKS CURRENTLOOKS PPARALOOKS PLOOKS) +CENTERPRINTINREGION (LEFT BOTTOM WIDTH HEIGHT) TEDIT.SELECTED.PIECES (CH# CHLIM PCTB \INSERTPC TEXTLEN + PLEN NEXTPIECE) ADJUSTCURSORPOSITION (XCOORD YCOORD) MAKEHARDCOPYMODESTREAM (WIDTH) +FROM.SCREEN.BITMAP (SCREEN REGION WIDTH HEIGHT LEFT BOTTOM) EOFP (EOFP DEVICE) \TELERAIDBREAK ( +TELERAIDFXP TRBREAK StackBase FAULTFXP FRAMENAME CLINK IVAR BLINK TRNOBREAK TRCURSOR NEXTBLOCK SIZE +STKMIN DEFPOINTER) \CURSORPOSITION (NEWMOUSESTATE) \SPP.NOT.RESPONDING (SPPINACTIVECOUNT +SPPESTABLISHEDP SPPACTIVITYTIMER SPPROUNDTRIPTIME) SEDIT::OUTPUT-BITMAP (SEDIT::RELINEARIZATION-TIME-STAMP + SEDIT::LINEAR-POINTER SEDIT::LINE-ASCENT SEDIT::CURRENT-LINE SEDIT::LINE-DESCENT) HRULE.DISPLAYFN ( +XSIZE) FORCEOUTPUT (FORCEOUTPUT DEVICE) \PUTBASEFIXP.UFN (HINUM LONUM) TEDIT.OBJECT.CHANGED (LINES +POBJ SEL) \FLUSH.OPEN.STREAMS (OPENP ACCESSBITS FORCEOUTPUT DEVICE) EQDEFP (ENVIRONMENT FNHEADER) +COMP.CPI1 (OPARG) SORT.PUPHOSTS.BY.DISTANCE (PUPNET#) COPYATOM (BASE OFFST) GETHASHTEXT (Stream Start +End) ACCESS-CHARSET (CHARSETFN DEVICE) CURSORPOSITION (IMAGEDATA XCOORD DDXOFFSET YCOORD DDYOFFSET +SCREEN) GETEOFPTR (GETEOFPTR DEVICE) TRANSMIT.ETHERPACKET (NDBTRANSMITTER) \RSH (HINUM LONUM) +CURSORSCREEN (SCDESTINATION) SEDIT::NEXT-LINEAR-ITEM (SEDIT::LINEAR-THREAD SEDIT::DESTINATION +SEDIT::LINEAR-FORM) \TEDIT.CENTER.SEL (CH# DCH) \DSPUNTRANSFORMY (DDYOFFSET) SEDIT::FIND-SELECTION ( +SEDIT::DISPLAY-WINDOW SEDIT::SELECTION SEDIT::SELECT-NODE SEDIT::SELECT-START) TB.MAP.DELETED.ITEMS ( +TB#DELETED TBITEMS TIDELETED) SEDIT::STRINGIFY-QUOTE (STRING SEDIT::UNASSIGNED SEDIT::SUB-NODES) +\DSPUNTRANSFORMX (DDXOFFSET) \CHTOPCNO (HI CHNUM RANK LO) CLOSERTPSOCKET (BSPLOCK RTPSTATE RTPEVENT +RTPPROCESS) \FILLINXIP (ID# NSNET NSSOCKET) COPY-ARRAY (READ-ONLY-P TOTAL-SIZE) \TEDIT.INSERT.PIECES ( +TXTREADONLY TEXTLEN PCTB PREVPIECE PFILE PFPOS PFATP PLEN PLOOKS PPARALOOKS NEXTPIECE POBJ) +\CHANGECHARSET.HDCPYDISPLAY (DDFONT FONTCHARSETVECTOR WIDTHS) OPT.CODELEV (OPNAME LEVEL PREV OPARG) +\10MBRAWENCAPSULATE (10MBDESTHOSTBASE 10MBSOURCEHOSTBASE) \LEAF.LOOKUPCACHE (LEAFPAGECACHE) +\TEDIT.CHANGE.LOOKS (PCTB \INSERTPC TEXTLEN PLOOKS CLFONT CLOFFSET NEXTPIECE \WINDOW SEL) COPY-VECTOR +(READ-ONLY-P) DISPLACED-ARRAY-P (DISPLACED-P) TEDIT.UNDO.LOOKS (SEL PCTB THOLDINFO \INSERTPC +THFIRSTPIECE PLOOKS NEXTPIECE THCH# THLEN) GETFILEPTR (GETFILEPTR DEVICE) FIND.LINE (END NEXTLINE +START) \VFMLower (fileID filePage) CURSOREXIT (SCWIDTH SCHEIGHT) \ROUTE.PUP (PUPDESTNET PUPDESTHOST +RTNDB RTHOPCOUNT RTGATEWAY# NETTYPE PUPLENGTH NDBPUPTYPE NDBPUPNET# PUPSOURCEHOST NDBPUPHOST#) +\NSRANDOM.CREATE.STREAM (NSHACCESS NSHDATUM NSHATTRIBUTES NSFILING.HANDLE NSFILING.SERVER.LENGTH EPAGE + EOFFSET) LASTMOUSEY (IMAGEDATA) \SETEOFPTR (SETEOFPTR DEVICE) LASTMOUSEX (IMAGEDATA) +FW-CREATE-OFD-WINDOWS (OFDWINDOW) SEDIT::STRINGIFY-LIST (SEDIT::SUB-NODES SEDIT::NODE-TYPE) DINFO ( +WINDOW MONITORLOCK) \FM.PUTITEMPROP (FM.LABEL FM.ID FM.GROUPID FM.STATE FM.INITSTATE FM.FONT FM.BITMAP + FM.HIGHLIGHT FM.REGION FM.MAXREGION FM.MESSAGE FM.LINKS FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN +FM.DOWNFN FM.HELDFN FM.MOVEDFN FM.SELECTEDFN FM.USERDATA) TEDIT.REDO.LOOKS (SEL THAUXINFO SET) +\OUTCHARFN.PRESS (IMAGEDATA PRXPOS PRSPACEWIDTH PRWIDTHSCACHE LEFT PRClippingRegion RIGHT PRYPOS +BOTTOM CHARWASDISPLAYING) FILL-ARRAY (TOTAL-SIZE READ-ONLY-P) \OPENLEAFCONNECTION (PUPCONTENTS +LEAFLENGTH SEQSTATE EPUSERFIELD SEQEVENT LEAFOPCODE LEAFERRORCODE) CONTINUEDIT (FILEPROP) PRINTPUPDATA + (PUPCONTENTS PUPLENGTH) \RTP.SHOW.FAILURE (BSPFAILURESTRING PUPSOURCE FRNPORT) CURSORHOTSPOT (YCOORD) + SEDIT::NEW-BLOCK (SEDIT::CURRENT-BLOCK SEDIT::CURRENT-X SEDIT::LINEAR-POINTER) GETMOUSESTATE (WU) +SPY.PRINT (NAME) OPT.RETMERGE (PREV OPNAME FRAME TAG LEVEL) TEDIT.SCANSEL (TEXTOBJ SEL SET CH# DCH) +POSTSCRIPT.GETFONTID (FONTXFACTOR) \ROUTE.XIP (XIPDESTNET RTNDB RTHOPCOUNT RTGATEWAY# NETTYPE +XIPLENGTH NDBNSNET#) %%MAKE-DISPLACED-ARRAY (TYPE-NUMBER READ-ONLY-P EXTENDABLE-P ADJUSTABLE-P +INDIRECT-P BASE) FW-CREATEW (LEFT BOTTOM WIDTH HEIGHT) CHARPOS (CHARPOSITION) SEDIT::FIND-OBJ ( +SEDIT::OPEN-NODE-CHANGED? SEDIT::SELECTION SEDIT::SELECT-NODE SEDIT::SELECT-TYPE) \HDCPYBLTCHAR ( +DDCHARSET DDSlowPrintingCase DDXPOSITION DDMICAXPOS DDCHARIMAGEWIDTHS DDMICARIGHTMARGIN DDLeftMargin +DDXOFFSET DDWIDTHSCACHE DDClippingRight DDClippingLeft PBTHEIGHT DDPILOTBBT DDOFFSETSCACHE) +COURIER.READ.STRING (BASE OFFST) TB.ITEM.DELETED? (TIDELETED) TTSKIPSEPR (CPXREALCHAR) +\10MBRAWTRANSMIT (10MBPACKETBASE 10MBLENGTH) \FM.GETITEMPROP (FM.TYPE FM.LABEL FM.ID FM.GROUPID +FM.STATE FM.INITSTATE FM.FONT FM.BITMAP FM.HIGHLIGHT FM.REGION FM.MAXREGION FM.MESSAGE FM.USERDATA +FM.LINKS FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN FM.DOWNFN FM.HELDFN FM.MOVEDFN FM.SELECTEDFN) +\FM.EDIT-DELETE (FM.USERDATA BOTTOM LEFT WIDTH HEIGHT FM.LABEL) CHAT.SCREENPARAMS (CHATINEMACS) +HASHFILEP (Write? Valid?) SEDIT::TYPE-OF-INPUT (SEDIT::POINT-NODE SEDIT::CARET-POINT SEDIT::POINT-TYPE +) BEEPON (DLBEEPCMD) COMP.CPI (FRAMETYPE VARS CPIOK PARENT) PRINTERRORPUP (PUPSOURCE ERRORPUPCODE) +\TTW1 (NEXTW SCREEN REG SCREGION SCDESTINATION SAVE SCTOPW DSP) \NSFILING.CHECK.ACCESS (FSPROTOCOLNAME + NSHDATUM) READ-ONLY-ARRAY-P (READ-ONLY-P) SEDIT::LINE-FINISHED (SEDIT::CURRENT-LINE SEDIT::NEXT-LINE-Y + SEDIT::WINDOW-TOP SEDIT::CURRENT-BLOCK SEDIT::BLOCK-NEW-X SEDIT::NEXT-BLOCK SEDIT::FIRST-BLOCK +SEDIT::INDENT) SPYOBJ.SAVE (OBJECTDATUM) BEEPOFF (DLBEEPCMD) SHOWBITMAP1.IP (BITMAPBASE +BITMAPRASTERWIDTH) ENCAPSULATE.ETHERPACKET (NDBENCAPSULATOR) MSMARKCHANGED (MARKCHANGED-FN) +TEDIT.REDO.PARALOOKS (SEL THAUXINFO SET) \VFMMerge (nextKey volumePage key) HLSTORGB (HUE LIGHTNESS +SATURATION) \FTP.OPEN.CONNECTION (FTPIN) \TELERAIDRELEASE (NETTYPE) \FM.EDIT-WORDDELETE (FM.LABEL LEFT +) CHAT.LOGIN (INSTREAM OUTSTREAM) SEDIT::SUBNODE-CHANGED-ROOT (SEDIT::ROOT-CHANGED-FN) BIT.IN.ROW ( +BITMAPWIDTH) ETHERHOSTNAME (PUPNET# PUPLENGTH PUPCONTENTS PUPTYPE OFFST BASE LENGTH FATSTRINGP) +\TEDIT.BOLD.CARET.OFF (CARETLOOKS) OPT.RETTEST (PREV FRAME OPNAME TAG NXT OPARG) CL:SIMPLE-VECTOR-P ( +SIMPLE-P) \CREATEPRESSFONT (FONTCHARSETVECTOR) \LEAF.REQUESTPAGE (LEAFCONNECTION LEAFCACHECNT FW6 +PUPCONTENTS LEAFHANDLE) SCAVENGEDSKDIRECTORY (LVlabel) CL:SIMPLE-BIT-VECTOR-P (SIMPLE-P BIT-P) +\TEDIT.HISTORYADD (TXTHISTORY THACTION THCH# THLEN) SEDIT::FIND-NODE-SUBSTRUCTURE-BACKWARDS ( +SEDIT::SUB-NODES) \SLOWHDCPYBLTCHAR (IMAGEDATA ROTATION DDFONT DDXPOSITION DDWIDTHSCACHE DDRightMargin + DDXOFFSET DDClippingLeft DDClippingRight DDPILOTBBT PBTHEIGHT DDOFFSETSCACHE BITMAPBITSPERPIXEL +DDDestination DDYPOSITION FONTCHARSETVECTOR CHARSETBITMAP CHARSETASCENT CHARSETDESCENT) \LFFileSpec ( +VOLNUM VERSION) \SETDAYTIME0 (LONUM HINUM DLPROCESSORCMD DLTODVALID) CLEARHASHFILES (Stream HASHFILE) +\VFMGenerateFileIDs (nextKey fileID type) \NSFILING.FULLNAME (NSHNAME NSHATTRIBUTES NSROOTNAME +NSDIRECTORIES NSDIRECTORYP NSVERSION NSHASPERIOD FSNAMESTRING) \PFRemoveDirectoryID (countEntries) +\PROCESS.RESET.TIMERS (PROCSTATUS PROCTIMERSET PROCEVENTORLOCK) SEDIT::FIND-NODE-SUBSTRUCTURE ( +SEDIT::SUB-NODES) SEDIT::STRINGIFY (SEDIT::STRINGIFY SEDIT::NODE-TYPE) \PUPGATELISTENER (PUPSOCEVENT) +BSPFRNADDRESS (BSPSOC FRNPUPADDRESS) \FM.EDIT-BACKUP (LEFT FM.LABEL) \FTP.RECOGNIZEFILE (FTPIN FTPOUT) + CL:VECTOR-POP (FILL-POINTER-P FILL-POINTER) EDIT.BITMAP (CUIMAGE CUHOTSPOTX CUHOTSPOTY) +TEDIT.COPY.PARALOOKS (PPARALOOKS \TEXTOBJ) TB.ITEM.SELECTED? (TISELECTED) %%AREF0 (BASE TYPE-NUMBER) +TB.UNDELETE.ITEM (TIDELETED TB#DELETED TBWINDOW TBPRINTFN) \CLEARXIPHEADER (XIPBASE) \BSP.HANDLE.INPUT + (PUPSOC BSPLOCK PUPTYPE ACKPENDING RTPTIMEOUT RTPTIMER BSPTIMEOUT BSPTIMER) INITUFNTABLE (UFNFN OP# +LEVADJ OPNARGS) MSSUBJTYPE (VPART C VB1 VB2 ROOT) \INTERNALTOTOPW (SCREEN SCTOPW) SEDIT::LAST-LINE-LINEAR + (SEDIT::LAST-LINE SEDIT::PREV-LINE SEDIT::NEXT-LINE SEDIT::LINEAR-FORM SEDIT::ROOT) CHARACTER.PRINT ( +CHARPOSITION HASHMACROCHAR) \FTP.FIX.BROKEN.INPUT (FULLFILENAME FTPFILEPROPS FTPIN) MSOBJTYPE (VPART C + VB1 VB2 ROOT MODIFIER) \HANDLE.PUP.ROUTING.INFO (PUPTYPE PUPSOURCEHOST EPNETWORK PUPLENGTH +PUPCONTENTS NETTYPE %#HOPS NET# RTNET# RTHOPCOUNT RTNDB RTGATEWAY# RTRECENT RTTIMER) %%ASET0 ( +TYPE-NUMBER BASE) \10MBRAWRECEIVE (IOCBType 10MBTYPE) MODERN-MENUBUTTONFN (TITLE) \PUTFIXP (HINUM +LONUM) BREAKCONNECTION (BREAKCONNECTION DEVICENAME) REGIONONSCREEN (XCOORD YCOORD) CL::ROW-MAJOR-ASET +(TOTAL-SIZE TYPE-NUMBER BASE) \PUTSWAPPEDFIXP (HINUM LONUM) GTHASHFILE (File) WORD.MATCHES.BUFFER ( +NSCHARHASH CPXREALCHAR) PRINT-READER-ENVIRONMENT (RESPEC) PRINTXIPROUTE (XIPTCONTROL) XCL:ROW-MAJOR-AREF + (TOTAL-SIZE BASE TYPE-NUMBER) SEDIT:SEDIT (SEDIT::DISPLAY-WINDOW) \STRINGWIDTH.HCPYDISPLAYAUX ( +PNAMEBASE PNAMELENGTH FATPNAMEP IMAGEWIDTHS FONTCHARSETVECTOR ESCAPECHAR OFFST BASE LENGTH FATSTRINGP) + \GENERIC.RENAMEFILE (OPENP) \NSFILING.FILLIN.ATTRIBUTES (NSHATTRIBUTES NSHDATUM FSPROTOCOLNAME) +\GENERIC.OPENP (OPENFILELST FULLNAME USERVISIBLE) PRINTPUPROUTE (PUPTCONTROL PUPSOURCE PUPSOURCESOCKET + PUPDEST PUPDESTSOCKET) SAMEPARALOOKS (FMTSTYLE LEFTMAR 1STLEFTMAR RIGHTMAR QUAD LEADBEFORE LINELEAD +TABSPEC FMTNEWPAGEBEFORE FMTNEWPAGEAFTER FMTSPECIALX FMTSPECIALY FMTHEADINGKEEP) \VECPUT (IMAGEDATA +VECMOVINGRIGHT VECCURX VECCURY VECWASDISPLAYING VECSEGCHARS) \TOTALFIXEDHEIGHT (ATWHEREONEDGE ATEDGE +ATMINY ATMAXY) GETSCREENPOSITION (SCGETSCREENPOSITION SCREEN) SETY.IP (IPDATA IPYPOS IPXPOS IPVISLEFT +IPMINVISIBLEBASELINE IPMAXVISIBLEBASELINE) \INSERT.FIRST.PIECE (FMTSPEC) TEDIT.MAKESEL (SEL TEXTOBJ +\WINDOW) \BACKCCODE (BACKCCODEFN) TB.MAP.ITEMS (TBITEMS) SEDIT::COPY-SELECTION (SEDIT::POINT-NODE +SEDIT::DISPLAY-WINDOW SEDIT::COPY-SELECTION SEDIT::NODE-TYPE SEDIT::SELECT-NODE) \TITLEICONMINSIZE ( +SCTITLEDS SCREEN) EDITTOGGLELABEL (GRAPHNODES GRAPH.INVERTLABELFN) \INCCODE (INCCODEFN) +\COURIER.ATTENTIONFN (SPPSUBSTREAM ACCESSBITS EOFP DEVICE) GETHASH (HASHBITSFN LASTINDEX HARRAYPBASE +VALUE KEY EQUIVFN) SCALE/TONODES (TONODES) BIT.IN.COLUMN (BITMAPHEIGHT) OPT.RETPOP (OPNAME PREV OPARG +VARS) \PEEKCCODE (EOLCONVENTION PEEKCCODEFN) SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE-BACKWARDS ( +SEDIT::DISPLAY-WINDOW SEDIT::SUB-NODES SEDIT::ROOT) \NSRANDOM.RELEASE.LOCK (NSHDATUM) +TEDIT.SUBPARALOOKS (SEL PCTB TEXTLEN PPARALOOKS PLEN NEXTPIECE \WINDOW) \INSPECTW.REDISPLAYPROP ( +SELECTABLEITEMREGION) \TEDIT.WORD.BOUND (READSA TXTWTBL NSCHARHASH) PREVWORD (START NSCHARHASH +STOPATOM CPXREALCHAR) SEDIT::FIRST-LINE-LINEAR (SEDIT::FIRST-LINE SEDIT::PREV-LINE SEDIT::NEXT-LINE +SEDIT::LINEAR-FORM SEDIT::ROOT) \GENERIC.CHARSET (CHARSET) CHAT.CLOSE (TYPEOUTPROC TYPESCRIPTSTREAM +INSTREAM OUTSTREAM) \FM.MENUHANDLER (BOTTOM LEFT FM.USERDATA WIDTH HEIGHT) \3MBRAWTRANSMIT ( +PBIRAWSTART 3MBBASE 3MBLENGTH) \LFFullFileName (VERSION LVlabel VOLNUM) START.NEW.LINE (START) +ADD.BORDER.TO.BITMAP (BITMAPWIDTH BITMAPHEIGHT) TEDIT.SELECT (TEXTLEN SET L1 FMTHARDCOPY LFMTSPEC X0 +LN XLIM LHASPROT SCRATCHSEL CHARLIM CH#) DIRECTORY.MATCH1 (BASE) SEDIT::ASSIGN-FORMAT-NIL (SEDIT::SUB-NODES +) \MAP-OPEN-STREAMS (OPENP) SEDIT::SHIFT-LINEAR-FORM (SEDIT::START-X SEDIT::LINEAR-FORM SEDIT::DESTINATION +) TEDIT.SET.SEL.LOOKS (ONFLG) \UPDATE.PBT.RASTERWIDTHS (PBTDESTHI PBTDESTLO) \TOTALFIXEDWIDTH ( +ATWHEREONEDGE ATEDGE ATMINX ATMAXX) GETBOXSCREENPOSITION (SCGETBOXSCREENPOSITION) \EOF.ACTION ( +ENDOFSTREAMOP) \VAMAdjustGroup (filePage nextFilePage volumePage) MSCOMMAND (TYPE KNOWN) +SEDIT::REPLACE-STRING (SEDIT::LINEAR-FORM) OPT.JSIZE (OPNAME) \EOSERROR (FULLNAME) SETYREL.IP (IPDATA +IPYPOS IPXPOS IPVISLEFT IPMINVISIBLEBASELINE IPMAXVISIBLEBASELINE) NORMSECT (GEOM P X IX IPX IPY MAJOR +) SEDIT::REPLACE-CHARS (SEDIT::PRIN-2? MULTESCAPECHAR SEDIT::OPEN-NODE-INFO SEDIT::BUFFER-STRING +SEDIT::REAL-LENGTH SEDIT::FONT SEDIT::NODE-TYPE SEDIT::OPEN-NODE-CHANGED? SEDIT::SUPER-NODE +SEDIT::SUBSTRING SEDIT::INLINE-WIDTH SEDIT::CARET-POINT) DINFO.SPECIAL.UPDATE (WINDOW CURRENTNODE +TOPNODEID PARENT NEXTNODE PREVIOUSNODE NODELST MONITORLOCK) FIND.NEXT.WORD (END NSCHARHASH STOPATOM +CPXREALCHAR) \NSFILING.HANDLE.ERROR (FSSESSIONLOCK) ADJUSTLINE (ROW NEXTLINE LASTCOL START FIRSTCOL +END) FB.UNDELETEALLCOMMAND (TABLEBROWSER) \INCFILEPTR (PAGEMAPPED DEVICE GETFILEPTR) SEDIT::SETUP-WINDOW-CONTEXT-DEPENDENCIES (SEDIT::DISPLAY-WINDOW SEDIT::ROOT SEDIT::LINE-HEIGHT -SEDIT::LAST-LINE SEDIT::LINE-SKIP SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::YCOORD SEDIT::ACTUAL-WIDTH - SEDIT::ICON-TITLE) STKPOS (INVALIDP CLINK FASTP SLOWP \#ALINK \#CLINK ALINK) TTYINBUFFEREOFP ( -TTYINPUT F1 TTYEOF F2) \\INFER.FILE.TYPE (ENDOFSTREAMOP) ADJUSTCURSORPOSITION (XCOORD YCOORD) -\\CURSORPOSITION (NEWMOUSESTATE) EDITCALLERS (REREADTABLE) \\SETUPGETCH (PCTB STREAMHINT PC PCOFF -IMAGEDATA TEXTLEN PLEN PSTR PFILE PFATP POBJ TEXTOBJ F3 CURRENTPARALOOKS TICURPARALOOKS CURRENTLOOKS -F10 PPARALOOKS PLOOKS) TEDIT.SELECTED.PIECES (CH# CHLIM PCTB \\INSERTPC TEXTLEN PLEN NEXTPIECE) -RESET/NODE/LABELSHADE (NODELABELSHADE) COPY-ARRAY (READ-ONLY-P TOTAL-SIZE) SHOWBITMAP1.IP (BITMAPBASE -BITMAPRASTERWIDTH) \\DELETEPIECE (NEXTPIECE PREVPIECE PTREENODE) \\POSTSCRIPT.PRINTSLUG (IMAGEDATA -POSTSCRIPTX POSTSCRIPTY POSTSCRIPTWIDTHS |\\SFAscent| POSTSCRIPTFONT) \\CHTOPCNO (HI CHNUM RANK LO) -FB.MAKE.SUBDIRECTORY.ITEM (SUBDIRECTORY FILENAME SUBDIREND PATTERN NAMESTART DIRECTORYSTART) -\\GETFTPCONNECTION (FTPHOST FTPBUSY FTPIN FTPOUT) COPY-VECTOR (READ-ONLY-P) TEDIT.FORMATBOX ( -REGIONSPEC REGIONFILLMETHOD REGIONSUBBOXES CHNO TEXTLEN PAGE# MAXPAGE# STATE LEFT BOTTOM MINPAGE# -TEXTOBJ LTEXTOBJ F3 CACHE CHARLIM PAGELINECACHE) CURSORPOSITION (IMAGEDATA XCOORD DDXOFFSET YCOORD -DDYOFFSET SCREEN) FM.CHANGELABEL (FM.USERDATA LEFT BOTTOM) SEDIT::REPLACE-QUOTE (SEDIT::SUB-NODES -CL:STRUCTURE SEDIT::DEPTH) CURSORSCREEN (SCDESTINATION) \\TEDIT.INSERT.PIECES (TXTREADONLY TEXTLEN -PCTB PREVPIECE PFILE PFPOS PFATP PLEN PLOOKS PPARALOOKS NEXTPIECE POBJ) FORCEOUTPUT (FORCEOUTPUT -DEVICE) PRINTXIP (XIPTYPE XIPLENGTH) \\DSPUNTRANSFORMY (DDYOFFSET) TEDIT.REDO.PARALOOKS (SEL THAUXINFO - SET) \\HDCPYDISPLAY.FIX.YPOS (IMAGEDATA DDYPOSITION) \\DSPUNTRANSFORMX (DDXOFFSET) \\MAYBEPEEKPUP ( -PUPDESTHOST PUPSOURCEHOST) FILEBROWSER (IMAGEWIDTH WIDTH HEIGHT ABORTWINDOW COUNTERWINDOW PROMPTWINDOW -) ACCESS-CHARSET (CHARSETFN DEVICE) TEDIT.DISPLAYTEXT (CARETLOOKS \\INSERTPC TXTTERMSA YBASE CLOFFSET -STREAMHINT OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER YBOT LHEIGHT) - \\FLUSH.OPEN.STREAMS (OPENP ACCESSBITS FORCEOUTPUT DEVICE) SEDIT::SETUP-WINDOW-AND-PROCESS ( -SEDIT::DISPLAY-WINDOW) TEDIT.UNPARSE.PAGEFORMAT (REGIONSPEC WIDTH HEIGHT REGIONSUBBOXES -REGIONFILLMETHOD LEFT BOTTOM REGIONLOCALINFO RIGHT PTOP) DISPLACED-ARRAY-P (DISPLACED-P) -TTYINBUFFERPEEK (TTYINPUT F1 TTYEOF F2 CPXREALCHAR) MSFIXUPTYPES (SOUGHT ID ITEM SUBJECT TYPE MSPRED -DEFAULTTYPE REP NEGATED KNOWN) ENDREAD? (NSCHARHASH CPXREALCHAR) TB.UNDELETE.ITEM (TIDELETED -TB#DELETED TBWINDOW TBPRINTFN) SEDIT::REPLACE-LIST (SEDIT::NODE-TYPE SEDIT::SUB-NODES SEDIT::SUB-NODE-INDEX - SEDIT::DEPTH CL:STRUCTURE SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::SELECT-NODE -SEDIT::SELECT-START SEDIT::SELECT-END) \\BACKFILEPTR (BACKFILEPTR DEVICE) TEDIT.PUT.PCTB (FMTSPEC PCTB - PLOOKS DEFAULTCHARLOOKS EOLCONVENTION TXTPAGEFRAMES TXTPARALOOKSLIST TXTCHARLOOKSLIST PPARALAST PLEN -PPARALOOKS POBJ PFATP PNEW PFILE PFPOS PSTR OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER -FATSTRINGP TYPE-NUMBER NEXTPIECE CARETLOOKS) BRHC/INTERTREE/SPACE (YCOORD XCOORD) -TEDIT.DO.BLUEPENDINGDELETE (BLUEPENDINGDELETE DCH CH# CHLIM LINES) EDITTOGGLELABEL (GRAPHNODES -GRAPH.INVERTLABELFN) RAIDSHOWFRAME (INVALIDP ALINK \#ALINK CLINK FASTP SLOWP \#CLINK) RAIDCOMMAND ( -DEFINITIONCELL |StackBase| PAGE#) \\PUTBASEFIXP.UFN (HINUM LONUM) SEDIT::PRINT-BROKEN-ATOM ( -SEDIT::ATOM-CHARS) TB.INSERT.ITEM (TB#ITEMS TI# TBITEMS TBTAILHINT TIDELETED TB#DELETED -TBFIRSTSELECTEDITEM TISELECTED TBLASTSELECTEDITEM) \\FTP.PRINTPLIST (BASE XBASE INDIRECT-P OFFST -OFFSET LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER PNAMEBASE PNAMELENGTH FATPNAMEP) -%MAKE-DISPLACED-ARRAY (TYPE-NUMBER READ-ONLY-P EXTENDABLE-P ADJUSTABLE-P INDIRECT-P BASE) EQDEFP ( -ENVIRONMENT FNHEADER) SEDIT::SET-INITIAL-SELECTION (SEDIT::FIND-CANDIDATE) SEDIT::SETUP-PROFILE ( -SEDIT::ICON-TITLE SEDIT::EDIT-TYPE SEDIT::ROOT) \\FLUSH.NDB.QUEUE (EPNETWORK) LASTMOUSEY (IMAGEDATA) -\\BACKFORMAT (NEXTLINE CHAR1 TEXTLEN STREAMHINT CHARLIM) TTYINBUFFERREADP (TTYINPUT F1 TTYEOF F2) -\\MAYBEPEEKNS (NSHOST2 NSHOST1 NSHOST0) SEDIT::FIND-AND-DISPLAY-STRUCTURE-BACKWARDS (SEDIT::DISPLAY-WINDOW - SEDIT::SUB-NODES SEDIT::ROOT) LASTMOUSEX (IMAGEDATA) CURSOREXIT (SCWIDTH SCHEIGHT) GETEOFPTR ( -GETEOFPTR DEVICE) TEDIT.REDO.LOOKS (SEL THAUXINFO SET) \\STRINGWIDTH.HDCPYDISPLAY (DDFONT IMAGEDATA -IMAGEWIDTHS FONTCHARSETVECTOR) \\RSH (HINUM LONUM) \\VECFONTINIT (BASE FONTCHARSETVECTOR) -SEDIT::PARSE--STRING (SEDIT::DEFAULT-FONT SEDIT::ENVIRONMENT) READ-ONLY-ARRAY-P (READ-ONLY-P) -\\OKTOCLOSEW (CLOSEFN) SETFILEPTR (SETFILEPTR DEVICE CHARSET) SAMEPARALOOKS (FMTSTYLE LEFTMAR -1STLEFTMAR RIGHTMAR QUAD LEADBEFORE LINELEAD TABSPEC FMTNEWPAGEBEFORE FMTNEWPAGEAFTER FMTSPECIALX -FMTSPECIALY FMTHEADINGKEEP) EOFP (EOFP DEVICE) CURSORHOTSPOT (YCOORD) GETFILEPTR (GETFILEPTR DEVICE) -GETMOUSESTATE (WU) SEDIT::SETUP-NEW-CONTEXT (SEDIT::ICON-TITLE) FILL-ARRAY (TOTAL-SIZE READ-ONLY-P) -SEDIT::PARSE--LITATOM (SEDIT::DEFAULT-FONT SEDIT::ENVIRONMENT) SEDIT::FIND-AND-DISPLAY-STRUCTURE ( -SEDIT::DISPLAY-WINDOW SEDIT::SUB-NODES SEDIT::ROOT) TB.MAP.ITEMS (TBITEMS) BEEPON (DLBEEPCMD) -INSPECT.INVERTSELECTION (ELTLEFT ELTBOTTOM ELTWIDTH) \\WWCHANGESCREENSIZE (SCDESTINATION) \\SENDSPP ( -SPPLOCK SPPTERMINATEDP SPPACKEDSEQNO SPPOUTPUTALLOCNO SPPSEQNO SPPRETRANSMITQ DSTYPE XIPCONTENTS -SPPALLOCATIONEVENT) TEDITCHAT.CHARFN (TEXTSTREAM SEL DS X0 Y0 \\WINDOW) BEEPOFF (DLBEEPCMD) -CL:SIMPLE-VECTOR-P (SIMPLE-P FLAGS) TTYINBUFFERBIN (TTYINPUT F1 TTYEOF F2 CPXREALCHAR) -\\MAIKO.DISPLAYLINE (CHARS THISLINE WIDTHS LOOKS \\WINDOW TEXTLEN TXTTERMSA STREAMHINT LCBITMAP -DISPLAYCACHE DISPLAYCACHEDS DISPLAYHCPYDS FMTHARDCOPY LFMTSPEC PREVLINE YBOT LHEIGHT RIGHTMARGIN -BITMAPWIDTH BITMAPHEIGHT CHAR1 WBOTTOM DESC LEFTMARGIN DESCENT IMAGEDATA DDPILOTBBT DDXOFFSET -|DDClippingLeft| |DDClippingRight| CLFONT BASE DDWIDTHSCACHE DDOFFSETSCACHE CLOFFSET LEN CLLEADER -CLUSERINFO WRIGHT FMTREVISED LMARK YBASE) SPY.MERGE.CALLEES (CALLEES NAME STATUS TREEFROM) CL:VECTOR-POP - (FILL-POINTER-P FILL-POINTER) REGIONONSCREEN (XCOORD YCOORD) INSPECT/TYPELESS (PASSWORD INUSE TRAILER - ARLEN GCTYPE) LAYOUTSEXPR1 (NODEID) DELFROMFILES (WHENUNFILED) CL:SIMPLE-BIT-VECTOR-P (SIMPLE-P FLAGS - BIT-P) \\TEDIT.HISTORYADD (TXTHISTORY THACTION THCH# THLEN) FILING.CALL (FSPROTOCOLDEF FSPROTOCOLNAME - ARGS FSSESSIONLOCK FSSESSIONHANDLE FSNAMESTRING FSREALACTIVITY FSLASTREALACTIVITYTIMER FSSESSIONTIMER -) \\SETEOFPTR (SETEOFPTR DEVICE) %AREF0 (BASE TYPE-NUMBER) \\PEEKPUP (NETTYPE NDBPUPHOST# PUPNET# -PUPHOST#) MSJOINSET (ID REP QUOTED DET TYPE DEFAULTTYPE KNOWN) TEDIT.SELECT (TEXTLEN SET L1 -FMTHARDCOPY LFMTSPEC X0 LN XLIM LHASPROT SCRATCHSEL CHARLIM CH#) \\MAKE.EXPEDITED.STREAM (XIPBASE -XIPLENGTH) \\BSP.SETFILEPTR (BSPOUTPUTSTREAM F2) PUTPUPSTRING (PUPLENGTH PUPCONTENTS) -\\PROCESS.RESET.TIMERS (PROCSTATUS PROCTIMERSET PROCEVENTORLOCK) SEDIT::SET-SELECTION (SEDIT::SET-SELECTION - SEDIT::NODE-TYPE) PUP.ECHOSERVER (PUPSOCEVENT PUPTYPE) RESET/NODE/BORDER (NODEBORDER) \\SETDAYTIME0 ( -LONUM HINUM DLPROCESSORCMD DLTODVALID) \\TEDIT.WORD.BOUND (READSA TXTWTBL NSCHARHASH) XCL:ROW-MAJOR-AREF - (TOTAL-SIZE BASE TYPE-NUMBER) SEDIT::OUTPUT-CR-OR-SPACE (SEDIT::CURRENT-X) \\NSRANDOM.WRITE.SEGMENT ( -NSHDATUM) \\REGIONOVERLAPAREAP (LEFT RIGHT WIDTH BOTTOM TOP HEIGHT) \\TFBRAVO.APPLY.PARALOOKS (TEXTLEN - RIGHTMAR LEFTMAR 1STLEFTMAR) %ASET0 (TYPE-NUMBER BASE) CHARACTER.PRINT (CHARPOSITION HASHMACROCHAR) -FB.UNDELETEALLCOMMAND (TABLEBROWSER) \\READNUMBER.OUTLINEREGION (LEFT BOTTOM WIDTH HEIGHT) -SWAPXIPADDRESSES (EPNETWORK XIPDESTSOCKET NDBNSNET#) TTADDTAB (FIRSTCOL) TEDIT.SUBPARALOOKS (SEL PCTB -TEXTLEN PPARALOOKS \\XDIRTY TXTFILE PLEN NEXTPIECE \\WINDOW) SPY.DUMP.BUFFER (COUNT) -\\LEAF.TIMEDOUT.EXCESSIVE (SEQNAME SYSQUEUEHEAD SEQDONEQ SEQRETRANSMITQ EPUSERFIELD FULLFILENAME -LEAFOPCODE PUPCONTENTS LOADDR ACCESSBITS EPLINK) \\LEAF.SETFILETYPE (PUPCONTENTS LEAFHANDLE F2 -LEAFCONNECTION F1) INSPECT/DATATYPE (DTDDESCRS) \\CREATEPRESSFONT (FONTCHARSETVECTOR) CHAT.LOGIN ( -INSTREAM OUTSTREAM) CHAT.TYPESCRIPT1 (WINDOW TYPESCRIPTSTREAM) DELETEMENU (WHENSELECTEDFN) AUTOCR? ( -END) CL::ROW-MAJOR-ASET (TOTAL-SIZE TYPE-NUMBER BASE) \\NSRANDOM.UPDATE.VALIDATION (NSHDATUM) -\\AREAINREGIONP (LEFT BOTTOM PRIGHT WIDTH PTOP HEIGHT) \\NSFILING.GET.ATTRIBUTES (NSHDATUM) -COURIER.BROADCAST.CALL (RTHOPCOUNT RTNET#) FB.UNDELETE.FILE (TIDELETED DELETEDFILES SIZE TIDATA -DELETEDPAGES) TEDIT.SET.SEL.LOOKS (ONFLG) \\BSPBACKFILEPTR (BSPOUTPUTSTREAM F2 CPPTR COFFSET) -BRH/OFFSET (YCOORD NODEPOSITION TONODES) PUP.ECHOUSER (PUPLENGTH PUPSOCEVENT PUPTYPE PUPIDHI PUPIDLO -EPTRANSMITTING) EDITTOGGLEBORDER (GRAPHNODES GRAPH.INVERTBORDERFN) TTADJUSTWIDTH (END LASTCOL) -ADJUSTLINE (ROW NEXTLINE LASTCOL START FIRSTCOL END) COMP.LOOKUPVAR (VARNAME) ICMLARRAY (RIGHT LEFT -WIDTH TOP BOTTOM HEIGHT) \\GENERIC.RENAMEFILE (OPENP) \\SW2BM (LEFT BOTTOM HEIGHT WIDTH BITMAPWIDTH -BITMAPHEIGHT) \\HDCPYDISPLAY.FIX.XPOS (IMAGEDATA DDXPOSITION) SPY.ORIGINAL (STATUS TREEFROM) -\\LEAF.NOT.RESPONDING (SEQNAME FULLFILENAME) \\LOCATE.NSNET (RTNET# RTHOPCOUNT) \\GENERIC.OPENP ( -OPENFILELST FULLNAME FULLFILENAME USERVISIBLE) \\DSPRIGHTMARGIN.HDCPYDISPLAY (IMAGEDATA) SPY.MAKE.TREE - (PACKAGE READTABLE PRINT-CASE SUM THRESHOLD) \\GENERIC.READP (EOFP DEVICE NSCHARHASH NOTXCCS -PEEKCCODEFN INCCODEFN BACKCHARFN) INITUFNTABLE (UFNFN OP# LEVADJ OPNARGS) CHAT.CLOSE (TYPEOUTPROC -TYPESCRIPTSTREAM INSTREAM OUTSTREAM) INFILECOM (CONTENTS PRETTYTYPE MACRO) UPDATE/MENU/IMAGE (IMAGE -SCREEN ITEMS CENTERFLG MENUFONT TITLE MENUCOLUMNS MENUROWS MENUBORDERSIZE MENUOUTLINESIZE ITEMWIDTH -WIDTH MENUGRID ITEMHEIGHT HEIGHT SCHEIGHT SCDEPTH SCBITSPERPIXEL SCDESTINATION BITMAPBITSPERPIXEL SAVE - BITMAPWIDTH BITMAPHEIGHT BOTTOM LEFT MENUOFFSET CHANGEOFFSETFLG) FILL.INCY (ADDR LLEN FBBT) -\\TEDIT.SEL.CHANGED? (SET CH# CHLIM \\TEXTOBJ DX POINT HOW HOWHEIGHT) DINFO.SPECIAL.UPDATE (WINDOW -CURRENTNODE TOPNODEID PARENT NEXTNODE PREVIOUSNODE NODELST MONITORLOCK) \\BSPWRITEBLOCK ( -BSPOUTPUTSTREAM F2) GETPUPSTRING (PUPLENGTH PUPCONTENTS) FM.WHICHITEM (YCOORD BOTTOM XCOORD LEFT -FM.USERDATA WIDTH HEIGHT) SETY.IP (IPDATA IMAGEDATA IPYPOS IPXPOS IPVISLEFT IPMINVISIBLEBASELINE -IPMAXVISIBLEBASELINE) NEAREST/PT/ON/GRID (XCOORD YCOORD) \\FTP.HANDLE.NO (FTPIN FTPHOST) -NODELST/AS/MENU (XCOORD YCOORD NODEPOSITION NODEHEIGHT NODEWIDTH) \\ATMOUT (PNAMEBASE PNAMELENGTH -FATPNAMEP) SEDIT::NEXT-NODE-TYPE (CL:STRUCTURE SEDIT::NODE-TYPE) SEDIT::LINEARIZE-QUOTE (SEDIT::UNASSIGNED - SEDIT::SUB-NODES) \\AREAVISIBLE? (SCTOPW SCREEN REG NEXTW) \\SETCARET (PTOP BOTTOM HEIGHT TXTREADONLY -) SEDIT::OUTPUT-CR (SEDIT::RELINEARIZATION-TIME-STAMP SEDIT::CURRENT-LINE SEDIT::CURRENT-NODE SEDIT::YCOORD - SEDIT::LINE-HEIGHT SEDIT::LINE-SKIP SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::ACTUAL-WIDTH -SEDIT::CURRENT-X SEDIT::LINEAR-POINTER SEDIT::LINEAR-PREV SEDIT::BELOW? SEDIT::FIRST-BLOCK -SEDIT::DISPLAY-WINDOW SEDIT::DEFAULT-LINE-SKIP SEDIT::ENVIRONMENT) FB.UNDELETECOMMAND (TABLEBROWSER) -BSPPUTMARK (BSPLOCK BSPSOC BSPOUTPUTSTREAM F2 F1 BSPCURRENTPUP F3 BSPERRORHANDLER CPPTR COFFSET) -GETHASH (HASHBITSFN LASTINDEX HARRAYPBASE VALUE KEY EQUIVFN) \\TEDIT.PUT.SINGLE.PARALOOKS2 (1STLEFTMAR - LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD TABX TABKIND FMTSPECIALX FMTSPECIALY -FMTUSERINFO FMTPARATYPE FMTPARASUBTYPE FMTSTYLE FMTCHARSTYLES FMTNEWPAGEBEFORE FMTNEWPAGEAFTER) -\\EOF.ACTION (ENDOFSTREAMOP) TTYIN.SHOW.?ALTERNATIVES (NSCHARHASH) \\MAP-OPEN-STREAMS (OPENP) -\\EOSERROR (FULLNAME FULLFILENAME) \\XIPERROR (XIPTYPE XIPBASE XIPLENGTH XIPCONTENTS) -\\BULK.DATA.CLOSE (BULK.DATA.CONTINUATION F2 SPPSUBSTREAM PROGRAM PROCEDURE ACCESSBITS EOFP DEVICE -SPPINPUTSTREAM PGMDEF PROCDEF NOERRORFLG FULLFILENAME) TTRATOM (TTYINPUT F1) \\PUTFIXP (HINUM LONUM) -SPY.DELETE (NAME CALLEES) \\TEDIT.FIND.PROTECTED.START (PCTB CLPROTECTED PLOOKS PLEN PREVPIECE) -TEDIT.GET.OBJECT (TEXTOBJ F3 PREVPIECE PLOOKS DEFAULTCHARLOOKS POBJ) \\INCFILEPTR (PAGEMAPPED DEVICE -GETFILEPTR) \\TEDIT.COMMAND.LOOP (TEXTOBJ F3 SEL \\WINDOW LINES TXTRTBL READSA TXTTERMSA READMACRODEFS - EDITFINISHEDFLG EDITOPACTIVE CARET TXTNEEDSUPDATE SHIFTEDSEL SELKIND MOVESEL SET DELETESEL \\TEXTOBJ -INDIRECT-P NSCHARHASH MACROFN STREAMHINT TERMCLASS) BMOBJ.COPYFN (BITMAP BMOBJSCALEFACTOR -BMOBJROTATION BMOBJDESCENT) \\NSRANDOM.WROTE.HANDLE (NSHWASWRITTEN NSHDATUM NSHWASMODIFIED -NSHATTRIBUTES) \\PUTSWAPPEDFIXP (HINUM LONUM) TEDIT.ADD.MENUITEM (ITEMS MENUCOLUMNS MENUROWS MENUGRID) - TB.DELETE.ITEM (TIDELETED TB#DELETED TBWINDOW) MSSETSETTYPE (TYPE DEFAULTTYPE ID REP NEGATED SET1 -SET2) TEDIT.EXTEND.SEL (SELKIND TEXTLEN SET CHLIM CH# POINT DCH XLIM YLIM LN X0 Y0 L1 SELOBJ) -\\BSP.GETNEXTBUFFER (BSPERRORHANDLER BSPSOC F1 BSPOUTPUTSTREAM F2) \\TEDIT.NEUTRALIZE.PARALOOKS.MENU ( -\\TEXTOBJ CH# SCRATCHSEL) GETPUPSTREAM (PUPCONTENTS PUPLENGTH) SEDIT::SET-POINT (SEDIT::SET-POINT -SEDIT::NODE-TYPE) SETYREL.IP (IPDATA IMAGEDATA IPYPOS IPXPOS IPVISLEFT IPMINVISIBLEBASELINE -IPMAXVISIBLEBASELINE) EDITBMBUTTONFN (LEFT BOTTOM BITMAPWIDTH BITMAPHEIGHT BITMAPBITSPERPIXEL XCOORD -YCOORD WIDTH HEIGHT CUHOTSPOTX CUHOTSPOTY) CLOSEBSPSTREAM (BSPSOC F1 BSPLOCK BSPINPUTSTREAM RTPSTATE -BSPOUTPUTSTREAM F2 \#UNACKEDPUPS INTERRUPTOUT BSPINPUTEVENT) \\TEDIT.PUT.SINGLE.CHARLOOKS2 (CLFONT -CLOFFSET CLSTYLE CLUSERINFO CLLEADER CLINVERTED CLBOLD CLITAL CLULINE CLOLINE CLSTRIKE CLSMALLCAP -CLPROTECTED CLINVISIBLE CLSELHERE CLCANCOPY) \\BSP.HANDLE.DATA (PUPLENGTH PUPID RCVBYTEID SYSQUEUEHEAD - BSPINPUTQ SYSQUEUETAIL QLINK \#UNREADPUPS BSPINPUTEVENT BSPINACTIVITYTIMEOUT INACTIVITYTIMER) -\\BUFFERED.BIN (CBUFPTR COFFSET CBUFSIZE GETNEXTBUFFER DEVICE) \\PAGED.INCFILEPTR (COFFSET CPAGE PAGE -OFFSET CBUFPTR CBUFSIZE CBUFDIRTY) GETDEFN (DEFPOINTER) \\TEXTCLOSEF (PCTB TEXTLEN PFILE NEXTPIECE -TXTFILE) \\EDIT.UPCARET (TCCARETDS) SEDIT::OUTPUT-CONSTANT-STRING (SEDIT::RELINEARIZATION-TIME-STAMP -SEDIT::LINEAR-POINTER SEDIT::LINEAR-PREV SEDIT::WIDTH SEDIT::LINE-ASCENT SEDIT::CURRENT-LINE SEDIT::FONT - SEDIT::LINE-DESCENT SEDIT::DISPLAY-WINDOW SEDIT::PRIN-2? STRING SEDIT::ENVIRONMENT SEDIT::CURRENT-X) -\\MAKEBRUSH.ROUND (BITMAPBASE) \\TEDIT.REFRESH.SHOWSEL (SEL SHIFTEDSEL MOVESEL DELETESEL SET) MOVD ( -DEFINITIONCELL DEFPOINTER DEFCELLFLAGS AUXDEFCELLFLAGS) U/L-CASE (END START) SEDIT::LINEARIZE-LIST ( -SEDIT::UNASSIGNED SEDIT::NON-STANDARD? SEDIT::LIST-FORMATS SEDIT::LINEARIZE-LIST SEDIT::LIST-MFORMAT -SEDIT::ENVIRONMENT SEDIT::LPAREN-STRING SEDIT::WIDTH SEDIT::SPACE-WIDTH SEDIT::START-X SEDIT::SUB-NODES - SEDIT::RIGHT-MARGIN SEDIT::COMMENT-SEPARATION SEDIT::COMMENT-WIDTH SEDIT::INLINE-WIDTH SEDIT::NODE-TYPE - SEDIT::PREFERRED-WIDTH SEDIT::LIST-PFORMAT SEDIT::CURRENT-X SEDIT::ROOT SEDIT::INLINE? SEDIT::FIRST-LINE - SEDIT::LAST-LINE SEDIT::RPAREN-STRING) PUTPUPBYTE (PUPCONTENTS) DO.INSERT.LINE (ROW TOP BOTTOM HEIGHT -) \\NSFILING.GET/SETINFO (NSFILING.CONNECTION F3 NSFILING.HANDLE F4 RANDOMACCESSP FULLFILENAME) -SETXYREL.IP (IPDATA IMAGEDATA IPXPOS IPYPOS IPVISLEFT IPMINVISIBLEBASELINE IPMAXVISIBLEBASELINE) -GETGRIDBOXREGION (LEFT DDXOFFSET IMAGEDATA BOTTOM DDYOFFSET XCOORD YCOORD RIGHT WIDTH TOP HEIGHT) -EDITMOVENODE (GRAPHNODES) MAKEWITHINREGION (LEFT PRIGHT WIDTH BOTTOM PTOP HEIGHT) SHOWREGION (LEFT -BOTTOM WIDTH HEIGHT) ACCEPT-UNIX-SOCKET-STREAM (OPENFILELST) TTUNREADBUF (CPXREALCHAR) -\\GENERIC.CHARSET (CHARSET) \\BUFFERED.BINS (CBUFPTR COFFSET CBUFSIZE GETNEXTBUFFER DEVICE) -\\HANDLE.RAW.XIP (NSHNM2 NSHNM1 NSHNM0 EPNETWORK NDBNSNET# NSNETHI NSNETLO NSNET LONUM HINUM ID# -XIPDESTSOCKET XIPTYPE XIPCONTENTS XIPCHECKSUM XIPCHECKSUMBASE XIPLENGTH INQUEUELENGTH NSOC#ALLOCATION -INQUEUE NSOCEVENT) \\BUFFERED.PEEKBIN (CBUFPTR COFFSET CBUFSIZE GETNEXTBUFFER DEVICE) SPY.SUM (COUNT -CALLEES SUM) \\IFS.LOOKUPFILE (PFSNAME PFSOSTYPE PFSLOOKUPFILELOCK PFSLOOKUPFILESOCKET PUPTYPE -LOOKUPVERSION PUPCONTENTS LOOKUPCREATIONDATE LOOKUPLENGTH ERRORPUPCODE PFSLOOKUPFAILCNT) -BSPFORCEOUTPUT (BSPLOCK BSPSOC BSPOUTPUTSTREAM F2 F1 BSPCURRENTPUP F3) \\BUFFERED.BOUT (CBUFPTR -COFFSET CBUFMAXSIZE GETNEXTBUFFER DEVICE) DELDEF (DELDEF) \\NSFILING.GETEOFPTR (ACCESSBITS DEVICE) -\\BUFFERED.BOUTS (DEVICE CBUFPTR COFFSET CBUFMAXSIZE GETNEXTBUFFER) \\FTPERROR (FTPIN) -\\BSP.HANDLE.ACK (PUPID LASTACKID ACKREQUESTED ADATATIMEOUT LASTADATATIME BSPOUTPUTQ INTERRUPTOUT -SYSQUEUEHEAD PUPSOC ADATACOUNT QLINK PUPTYPE PUPLENGTH \#UNACKEDPUPS \#UNACKEDBYTES PUPALLOCCOUNT -AUXWORD EPPLIST MAXPUPALLOC PUPCONTENTS ACKBYTESPERPUP ACKPUPS ACKBYTES BSPINPUTEVENT -BSPINACTIVITYTIMEOUT INACTIVITYTIMER) READ-AFM-FILE (FID ASCENT DESCENT) |\\VFMMarkBufferDirty| (PAGE) - SEDIT::DOT-THIS-LIST (SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::SUB-NODES -CL:STRUCTURE SEDIT::SELECTION) |\\LFDeleteFile| (FILEDESC F1 OPENP FULLFILENAME VOLUME |volNum|) -HASDEF (NULLDEF CHANGED HASDEF) BSPGETMARK (PUPCONTENTS BSPCURRENTPUP F3 BSPERRORHANDLER BSPSOC F1) -|\\PFReplaceString| (OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) -TB.EXPANDFN (TBLOCK TBUPDATEFROMHERE) SEDIT::INSERT-LIST (SEDIT::SELECT-START SEDIT::SELECT-END -SEDIT::POINT-INDEX SEDIT::SUB-NODE-INDEX) PSCFONT.WRITEFONT (WIDTHS FID HIBYTE LOBYTE FIRSTCHAR -LASTCHAR ASCENT DESCENT) PPSPPSTREAM (SPPEOFP SPPEOFBITS FW8) \\BOXFPLUSDIF (HINUM LONUM SIGNBIT -LOFRACTION HIFRACTION EXPONENT) FB.IS.NOT.SUBDIRECTORY.ITEM (TIUNSELECTABLE) MSKNOWN (ID REP NEGATED -SET1 SET2) \\10MB.TURNONETHER (NDBCSB) DINFO.UPDATE.FMENU (FMENU.WINDOW NODELST ID CURRENTNODE -TOPNODEID LABEL PARENT NEXTNODE PREVIOUSNODE) \\BOXFTIMES2 (HINUM LONUM SIGNBIT LOFRACTION HIFRACTION -EXPONENT) PSCFONT.READFONT (DESCENT) \\CHARWIDTH.HDCPYDISPLAY (IMAGEWIDTHS FONTCHARSETVECTOR DDFONT -IMAGEDATA) SEDIT::LINEARIZE (SEDIT::RELINEARIZATION-TIME-STAMP SEDIT::CURRENT-NODE SEDIT::LINEAR-THREAD - SEDIT::LINEAR-PREV SEDIT::LINEAR-POINTER SEDIT::RIGHT-MARGIN SEDIT::SUB-NODE-INDEX SEDIT::ACTUAL-WIDTH - SEDIT::START-X SEDIT::INLINE? SEDIT::FIRST-LINE SEDIT::LAST-LINE SEDIT::SUPER-NODE SEDIT::CURRENT-X -SEDIT::LINEARIZE SEDIT::NODE-TYPE SEDIT::LINEAR-FORM) \\SPP.SYSPKT (SPPSYSPKT EPTRANSMITTING -XIPCONTENTS SPPSEQNO) SPY.MERGETREE (SUM COUNT STATUS TREEFROM) \\SEL.LINEDESC (POINT L1 LN) -\\BOXFQUOTIENT (HINUM LONUM SIGNBIT LOFRACTION HIFRACTION EXPONENT) NEWDEFC (BASE) -\\BSP.HANDLE.INTERRUPT (RCVINTERRUPTID PUPID BSPOTHERPUPFN BSPINPUTSTREAM PUPSOC) |\\LFRenameFile| ( -OPENP GETFILENAME DIRINFO F4 EXPANDEDNAME LEADERPAGE F2) \\TEDIT.FIND.LAST.LINE (LINES \\WINDOW YBOT -WBOTTOM NEXTLINE) TEDIT.PUT.OBJECT (POBJ) \\LFINITCASEARRAY (BASE) TEDIT.STREAMCHANGEDP (\\DIRTY -\\XDIRTY TXTFILE) |\\PFTransferFilePage| (|fileID| |type| |subVolumes|) TTRUBOUT (START) PUTPUPWORD ( -PUPCONTENTS) |\\VFMCorrectBufferP| (VOLUME VOLPAGENUM) |\\VFMDelete1| (|used| |volumePage| |key|) -SETX.IP (IPDATA IMAGEDATA IPXPOS IPYPOS IPVISLEFT IPMINVISIBLEBASELINE IPMAXVISIBLEBASELINE) -DSPXSCREENTOWINDOW (DDXOFFSET IMAGEDATA) TEDIT.UNDO.DELETION (NEXTPIECE PCTB SEL TEXTLEN TXTREADONLY -POBJ PLEN THPOINT) TYPE.BUFFER (CPXPRINTCHARS CPXWIDTH) BRH/LAYOUT (TONODES NODEWIDTH NODEHEIGHT -NODEPOSITION) \\FILEOUTCHARFN (CHARSET EOLCONVENTION CHARPOSITION) \\ARGPTR (DEFPOINTER INVALIDP -FNHEADER IVAR BLINK FASTP SLOWP DUMMYBF \#BLINK NARGS PADDING NA ALINK \#ALINK) |\\VFMDelete2| (|key| -|volumePage| |used|) BSPOPENP (BSPSOC F1 RTPSTATE \#UNREADPUPS COFFSET CBUFSIZE) SETXY.IP (IPDATA -IMAGEDATA IPVISLEFT IPMINVISIBLEBASELINE IPMAXVISIBLEBASELINE) \\GETREGION.CHECKOPPT (XCOORD YCOORD) -TRACKNODE (GRAPHNODES) \\LEAF.READFILEPROP (LEAFCONNECTION F1 PUPCONTENTS LEAFHANDLE F2 LEAFSTATUS -EPUSERFIELD) |\\LFTruncateFile| (EPAGE EOFFSET GETFILEPTR DEVICE |AllocatedPages| LEADERPAGE F2 VOLUME - |volNum| FILEDESC F1) \\TEDIT.FIND.PROTECTED.END (TEXTLEN PCTB CLPROTECTED PLOOKS PLEN NEXTPIECE) -\\NSFILING.RENAMEFILE (OPENFILE) TB.FLUSH.WINDOW (TBAFTERCLOSEFN) COERCETEXTOBJ (TEXTOBJ F3 TEXTLEN -PCTB CLINVISIBLE PLOOKS PLEN PSTR PFILE PFPOS POBJ NEXTPIECE TXTFILE FULLNAME FULLFILENAME STREAMHINT) - \\EDIT.DOWNCARET (TCCARETDS TCCARET) DO.CHAT.OPTION (INSTREAM) TERM.MOVETO (FONTWIDTH TTYWIDTH -FONTDESCENT HOMEPOS FONTHEIGHT DSP) XCL:OPEN-STREAM-P (ACCESSBITS) \\INIT.ETHER.BUFFER.POOL ( -|MDSZoneLength| |MDSZone| D0NEXTIOCB) DINFO.UPDATE.GRAPH.DISPLAY (WINDOW PARENT CHILDREN -LAST.GRAPH.LOCATION GRAPH.WINDOW NAME LABEL CURRENTNODE) SEDIT::AWAKE-COMMAND-PROCESS ( -SEDIT::DISPLAY-WINDOW) PUTDEFN (DEFINITIONCELL ALIGNED NTSIZE OVERHEADWORDS ARGTYPE WORDINPAGE STARTPC -) XCL:ECHO-STREAM-INPUT-STREAM (F1) \\DSPFONT.HDCPYDISPLAY (IMAGEDATA FONTCHARSETVECTOR CHARSET -|\\SFHeight| WIDTHS) SPY.NEXT.TREE (CALLEES NAME) TTCOMPLETEWORD (NSCHARHASH CPXREALCHAR) -\\BSP.HANDLE.INTERRUPTREPLY (INTERRUPTOUT PUPID XMITINTERRUPTID BSPINPUTEVENT) -\\NSFILING.RELEASE.BULKSTREAM (FSCOURIERSTREAMS) IMAGESTREAMP (IMAGETYPE IMAGEOPS) -CL:GET-DISPATCH-MACRO-CHARACTER (DISPATCHMACRODEFS) SEDIT::DELETE-QUOTE (SEDIT::SUB-NODE-INDEX -SEDIT::SUB-NODES) XCL:TWO-WAY-STREAM-OUTPUT-STREAM (F2) CREATE-UNIX-SOCKET-STREAM (OPENFILELST) -IMAGESTREAMTYPE (IMAGETYPE IMAGEOPS) \\SPP.CHECK.INPUT.QUEUE (SPPACKNO SPPINPUTQ SYSQUEUEHEAD SEQNO -XIPCONTENTS QLINK) STKNTH (INVALIDP CLINK FASTP SLOWP \#ALINK \#CLINK ALINK) -FB.NAMES.INCREASING.VERSION (VERSIONLESSNAME TIDATA VERSION) |\\LFGetFileInfo| (FILEDESC F1 LEADERPAGE - F2 EPAGE EOFFSET TYPE |typeHolder| |TimeWrite| |TimeRead| |TimeCreate| |author|) SHRINK-VECTOR ( -TOTAL-SIZE) GETPUPBYTE (PUPCONTENTS) SETSTKNAME (VALIDNAMETABLE NAMETABLE# FNHEADER) NARGS (CCODEP -DEFPOINTER NA FNHEADER) CHAT.RESHAPEWINDOW (TYPEOUTPROC) \\LEAF.GETFILEINFO.OPEN (EPAGE EOFFSET -LFCREATIONDATE LFWRITEDATE LFREADDATE) XCL:TWO-WAY-STREAM-INPUT-STREAM (F1) TEDIT.REDO.INSERTION (SEL -PCTB THLEN THFIRSTPIECE TEXTLEN NEXTPIECE POBJ STREAMHINT \\WINDOW PLEN PREVPIECE) DO-DISPATCH-MACRO ( -DISPATCHMACRODEFS) \\FRAMESCAN (OVERHEADWORDS NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER NTSIZE -BOUND FIRSTPVAR FXSIZE PVHI NARGS BLINK FASTP SLOWP DUMMYBF \#BLINK IVAR PADDING) SEDIT::MAP-COMMENT-INDEX - (SEDIT::SUB-NODES SEDIT::OPEN-NODE SEDIT::REAL-LENGTH STRING SEDIT::LINEAR-FORM CL:STRUCTURE) -XCL:CONCATENATED-STREAM-STREAMS (F1) ADDFILE (CHANGED) \\FLOAT (HINUM LONUM) ADDFILE0 (FILEPROP -LOADTYPE) \\COPYFNHEADER (NTSIZE OVERHEADWORDS) XCL:ECHO-STREAM-OUTPUT-STREAM (F2) \\TEXTBIN (COFFSET -CBUFSIZE POBJ PIECE F5 FATSTREAMP F4 CHARSLEFT F2 NEXTPIECE PLEN LOOKSUPDATEFN TILOOKSUPDATEFN -IMAGEDATA TEXTOBJ F3 CURRENTPARALOOKS TICURPARALOOKS CURRENTLOOKS F10 PPARALOOKS PLOOKS PSTR PFILE -PFATP ENDOFSTREAMOP) FB.DECREASING.VERSION (VERSION TIDATA) DINFO.TOGGLE.GRAPH (CURRENTNODE -GRAPH.WINDOW) DINFO.UPDATE.MENU.DISPLAY (WINDOW SUBNODE.MENU.WINDOW CHILDREN NODELST MENUFONT LABEL -MENUGRID ITEMHEIGHT HEIGHT IMAGEHEIGHT BOTTOM) \\FILLRTPPUP (CONNID) IMAGESTREAMTYPEP (IMAGETYPE -IMAGEOPS) TEDIT.WORDSET (READSA) \\SETXFORM.PSC (POSTSCRIPTCLIPPINGREGION POSTSCRIPTSCALEHACK -POSTSCRIPTLANDSCAPE POSTSCRIPTROTATION POSTSCRIPTTRANSX POSTSCRIPTTRANSY HEIGHT WIDTH LEFT BOTTOM) -XCL:SYNONYM-STREAM-SYMBOL (F1) RESUME (EDFXP INVALIDP CLINK FASTP SLOWP \#ALINK \#CLINK) \\SLOWRETURN -(FASTP SLOWP DUMMYBF \#ALINK) \\BSP.HANDLE.ERROR (ERRORPUPCODE PUPCONTENTS MAXPUPALLOC BSPOTHERPUPFN -BSPINPUTSTREAM) \\10MB.LOADINPUTQ (EPNETWORK 10MBPACKETBASE EPLINK) %DEFPRINT-ARRAY (HASHMACROCHAR) -XCL:BROADCAST-STREAM-STREAMS (F1) \\LEAF.SETVALIDATION (LOCREATE LEAFINFO F4 LOWRITE) \\SPREADFRAMEP ( -IVAR BLINK FASTP SLOWP DUMMYBF \#BLINK NARGS PADDING) \\RESUME (FASTP SLOWP DUMMYBF) FIND.NON.SPACE ( -CPXREALCHAR) \\NSFILING.ERRORHANDLER (FULLFILENAME ACCESS NSFILING.HANDLE F4 DEVICE NSHFILEID -SPP.CONNECTION F1 F2 F3 F5 FW6 FW7 CBUFPTR CBUFSIZE COFFSET) \\DSKDISPLAY.RESHAPEFN (LEFT BOTTOM) -TTNTHLINE (NEXTLINE) CLEARPUP (PUPBASE PUPCONTENTS) SETSTKARG (NTSIZE OVERHEADWORDS IVAR BLINK FASTP -SLOWP DUMMYBF \#BLINK FIRSTPVAR FXSIZE NARGS PADDING FNHEADER NLOCALS BOUND PVHI) SETXREL.IP (IPDATA -IMAGEDATA IPXPOS IPVISLEFT IPYPOS IPMINVISIBLEBASELINE IPMAXVISIBLEBASELINE) \\SEL.LIMIT (POINT CH# -CHLIM) \\TEXTBOUT (TEXTOBJ F3 TEXTLEN \\WINDOW TXTREADONLY PSTR \\INSERTPC BASE XBASE INDIRECT-P OFFST - OFFSET \\INSERTLEN COFFSET) \\TEDIT.PUT.SINGLE.PARALOOKS (1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE +SEDIT::LAST-LINE SEDIT::YCOORD SEDIT::ACTUAL-WIDTH SEDIT::ICON-TITLE) \PFPilotVolumeP (type) +MOVE.TO.NEXT.LINE (NEXTLINE START) \PAGED.INCFILEPTR (COFFSET CPAGE PAGE OFFSET CBUFPTR CBUFSIZE +CBUFDIRTY) SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE (SEDIT::DISPLAY-WINDOW SEDIT::SUB-NODES SEDIT::ROOT) +FW-SORT-FN (FULLNAME) \TEDIT.FIND (\WINDOW SEL) TEDIT.GETSEL (SEL TEXTOBJ) \PSC.SYMBOLS (IMAGEDATA +FONTSIZE FONTFACE) SEDIT::GENERATE-LINEAR-FORM (SEDIT::CURRENT-X SEDIT::LINEARIZE SEDIT::NODE-TYPE +SEDIT::ROOT SEDIT::START-X SEDIT::CHANGED? SEDIT::ACTUAL-WIDTH SEDIT::RIGHT-MARGIN SEDIT::INLINE? +SEDIT::CURRENT-LINE SEDIT::SUPER-NODE SEDIT::LINEAR-FORM) SEDIT::FIND-AND-DISPLAY-STRUCTURE-BACKWARDS +(SEDIT::DISPLAY-WINDOW SEDIT::SUB-NODES SEDIT::ROOT) LAYOUTSEXPR1 (NODEID) \SETCARET (PTOP BOTTOM +TXTREADONLY) \BUFFERED.BIN (CBUFPTR COFFSET CBUFSIZE GETNEXTBUFFER DEVICE) \HDCPYDISPLAY.FIX.YPOS ( +IMAGEDATA DDYPOSITION) \LEAF.DELETEFILE (PUPCONTENTS LEAFHANDLE LEAFCONNECTION FULLFILENAME) MOVD ( +DEFINITIONCELL DEFPOINTER DEFCELLFLAGS AUXDEFCELLFLAGS) \FM.RIGHTBUTTONFN (BOTTOM LEFT FM.USERDATA +WIDTH HEIGHT) \TELERAIDEXIT (NETTYPE TROLDCSB TROLDCURSOR) \BUFFERED.PEEKBIN (CBUFPTR COFFSET CBUFSIZE + GETNEXTBUFFER DEVICE) SEDIT::SETUP-WINDOW-AND-PROCESS (SEDIT::DISPLAY-WINDOW) \SHAREOFXTRAY (ATNOWY +ATYSIZE) \BUFFERED.BOUT (CBUFPTR COFFSET CBUFMAXSIZE GETNEXTBUFFER DEVICE) MB.COPYFN (OBJECTDATUM +IMAGEOBJPLIST IMAGEOBJFNS) SETXY.IP (IPDATA IPVISLEFT IPMINVISIBLEBASELINE IPMAXVISIBLEBASELINE) +TEDIT.INCLUDE (SEL TXTREADONLY SET TEXTLEN FMTSPEC FORMATTEDP PCTB POINT CH# CHLIM TOTLEN \WINDOW) +\PS.SCALEHACK (IMAGEDATA POSTSCRIPTSCALEHACK POSTSCRIPTCLIPPINGREGION POSTSCRIPTPAGEREGION LEFT BOTTOM + WIDTH HEIGHT POSTSCRIPTX POSTSCRIPTY POSTSCRIPTLEFTMARGIN POSTSCRIPTRIGHTMARGIN +POSTSCRIPTBOTTOMMARGIN POSTSCRIPTTOPMARGIN POSTSCRIPTTRANSX POSTSCRIPTTRANSY) FB.UNDELETE.FILE ( +TIDELETED DELETEDFILES SIZE TIDATA DELETEDPAGES) SEDIT::INSERT (SEDIT::POINT-NODE SEDIT::SELECTION +SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SUPER-NODE) SEDIT::RELINEARIZE-PRELINEARIZED-NODE ( +SEDIT::LINEAR-FORM) \BOXFPLUSDIF (HINUM LONUM SIGNBIT LOFRACTION HIFRACTION EXPONENT) +FW-CREATE-OFD-LIST (OFDSTATUS OFDWINDOW) \TEDIT.PUT.SINGLE.PARALOOKS2 (1STLEFTMAR LEFTMAR RIGHTMAR +LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD TABX TABKIND FMTSPECIALX FMTSPECIALY FMTUSERINFO +FMTPARATYPE FMTPARASUBTYPE FMTSTYLE FMTCHARSTYLES FMTNEWPAGEBEFORE FMTNEWPAGEAFTER) TTYIN.BALANCE ( +NSCHARHASH CPXREALCHAR) \BUFFERED.BINS (CBUFPTR COFFSET CBUFSIZE GETNEXTBUFFER DEVICE) \BOXFTIMES2 ( +HINUM LONUM SIGNBIT LOFRACTION HIFRACTION EXPONENT) TTLASTLINE (NEXTLINE) TEDIT.SEL.AS.STRING (TEXTOBJ + SEL DCH CH# STREAMHINT) SEDIT::PARSE--STRING (SEDIT::DEFAULT-FONT SEDIT::ENVIRONMENT) \BOXFQUOTIENT ( +HINUM LONUM SIGNBIT LOFRACTION HIFRACTION EXPONENT) \LFOpenOldFile (AllocatedPages EofPage EOffSet) +SEDIT::SETUP-PROFILE (SEDIT::ICON-TITLE SEDIT::EDIT-TYPE SEDIT::ROOT) \LFDirectoryP (version +LEADERPAGE) CCCSCAN (STARTPC OVERHEADWORDS BYTESWAPPED OPNARGS OPPRINT OPCODENAME) \BUFFERED.BOUTS ( +DEVICE CBUFPTR COFFSET CBUFMAXSIZE GETNEXTBUFFER) \3MBRAWRECEIVE (3MBBASE PBIRAWSTART PBILENGTH +3MBTYPE) SEDIT::FIND-AND-DISPLAY-STRUCTURE (SEDIT::DISPLAY-WINDOW SEDIT::SUB-NODES SEDIT::ROOT) +TEDIT.GET.LOOKS (TEXTLEN CARETLOOKS PLOOKS PCTB CH# SEL) \STRINGWIDTH.HDCPYDISPLAY (DDFONT IMAGEDATA +IMAGEWIDTHS FONTCHARSETVECTOR) \FLOAT (HINUM LONUM) \TEDIT.FIND.PROTECTED.START (PCTB CLPROTECTED +PLOOKS PLEN PREVPIECE) RESET/NODE/LABELSHADE (NODELABELSHADE) \GETSPP (SPPLOCK SPPINPUTQ SPPACKNO +SEQNO SPPACCEPTNO SPPINPUTBLOCKED SPPTERMINATEDP SPPINPUTEVENT) \TEDIT.SEL.CHANGED? (SET CH# CHLIM +\TEXTOBJ DX POINT HOW HOWHEIGHT) \SCROLL.HANDLER.DOIT (LEFT TOP WIDTH HEIGHT) +\TEDIT.PUT.SINGLE.CHARLOOKS2 (CLFONT CLOFFSET CLSTYLE CLUSERINFO CLLEADER CLINVERTED CLBOLD CLITAL +CLULINE CLOLINE CLSTRIKE CLSMALLCAP CLPROTECTED CLINVISIBLE CLSELHERE CLCANCOPY) \LEAF.GETFILE ( +DEVICEINFO PFSLEAFSEQUIN LEAFCACHEDFILE LEAFOPENCLOSELOCK FULLFILENAME LEAFREALLYOPEN PUPCONTENTS +LEAFSTATUS FILEADDRESS HANDLE PAGE OFFSET) TEDIT.EXTEND.SEL (SELKIND TEXTLEN SET CHLIM CH# POINT DCH +XLIM YLIM LN X0 Y0 L1 SELOBJ) \SHAREOFXTRAX (ATNOWX ATXSIZE) OPT.FINDEND (NXT) +SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (SEDIT::DISPLAY-WINDOW SEDIT::WINDOW-BOTTOM SEDIT::WINDOW-LEFT +SEDIT::WINDOW-RIGHT SEDIT::NEXT-LINE-Y SEDIT::LAST-LINE SEDIT::YCOORD) TEDIT.STREAMCHANGEDP (\DIRTY) +SETXYREL.IP (IPDATA IPXPOS IPYPOS IPVISLEFT IPMINVISIBLEBASELINE IPMAXVISIBLEBASELINE) FW-OFD-EXISTS? +(FULLNAME FILESTREAM READING? WRITING? OFDSTATUS) AT.END.OF.TEXT (CPXREALCHAR) MB.SHOWSELFN (XSIZE +YSIZE YDESC) \TEDIT.SCALEREGION (LEFT BOTTOM WIDTH HEIGHT) SEDIT::SELECT-SEGMENT (SEDIT::SELECT-SEGMENT + SEDIT::NODE-TYPE) \BRUSHBITMAP (BRUSHARRAY BRUSHCACHE CREATEMETHOD) TEDIT.ADD.MENUITEM (ITEMS +MENUCOLUMNS MENUROWS) \TEDIT.REFRESH.SHOWSEL (SEL SHIFTEDSEL MOVESEL DELETESEL SET) \TOTALPROPOSEDSIZE + (ATMINX ATMINY ATXSIZE ATYSIZE ATEDGE) SEDIT::CREATE-QUOTED-GAP (SEDIT::QUOTE-STRING SEDIT::ENVIRONMENT +) \VFMPutNext (data key volumePage) SETX.IP (IPDATA IPXPOS IPYPOS IPVISLEFT IPMINVISIBLEBASELINE +IPMAXVISIBLEBASELINE) CRIT.LESSP (BY) TTNTH (END) EDITTOGGLEBORDER (GRAPHNODES GRAPH.INVERTBORDERFN) +\TELERAIDENTRY (TROLDCURSOR TRCURSOR NETTYPE TROLDCSB) TTNLEFT (START) FB.UNDELETECOMMAND ( +TABLEBROWSER) SEDIT::SET-INITIAL-SELECTION (SEDIT::FIND-CANDIDATE) SEDIT::CLEAR-LINEAR-FORM ( +SEDIT::LINEARIZE SEDIT::NODE-TYPE) \EDIT.UPCARET (TCCARETDS) NARGS (CCODEP DEFPOINTER NA FNHEADER) +\TEDIT.FORMAT.FOOTNOTE (CHAR1 TEXTLEN LSTLN PAGELINECACHE CACHE WIDTH STREAMHINT LFMTSPEC LEFTMARGIN +LEFT RIGHTMARGIN CHARLIM) HASDEF (NULLDEF CHANGED HASDEF) \POSTSCRIPTTAB (FONTAVGCHARWIDTH +POSTSCRIPTFONT POSTSCRIPTX POSTSCRIPTLEFTMARGIN) TB.DELETE.ITEM (TIDELETED TB#DELETED TBWINDOW) +SCALEPAGEUNITS (TPSWIDTH) \ARGPTR (DEFPOINTER INVALIDP FNHEADER IVAR BLINK NARGS NA ALINK) +IMAGESTREAMP (IMAGETYPE IMAGEOPS) \UPDATE.EXTENT.IMAGE (HEIGHT WIDTH TOP LEFT) DELDEF (DELDEF) +IMAGESTREAMTYPE (IMAGETYPE IMAGEOPS) OPT.DELTAGREF (TAG) IMAGESTREAMTYPEP (IMAGETYPE IMAGEOPS) +TERM.MOVETO (FONTWIDTH TTYWIDTH FONTDESCENT HOMEPOS FONTHEIGHT DSP) SEDIT::GROW-SELECTION ( +SEDIT::GROW-SELECTION SEDIT::NODE-TYPE SEDIT::SELECT-NODE) STKNTH (INVALIDP CLINK ALINK) \TEXTBIN ( +COFFSET CBUFSIZE POBJ PIECE FATSTREAMP CHARSLEFT NEXTPIECE PLEN LOOKSUPDATEFN TEXTOBJ CURRENTPARALOOKS + CURRENTLOOKS PPARALOOKS PLOOKS PSTR PFILE PFATP ENDOFSTREAMOP) SEDIT::PARSE--LITATOM (SEDIT::DEFAULT-FONT + SEDIT::ENVIRONMENT) DINFO.UPDATE.FMENU (FMENU.WINDOW NODELST ID CURRENTNODE TOPNODEID LABEL PARENT +NEXTNODE PREVIOUSNODE) \FM.WINDOWENTRYFN (BOTTOM LEFT FM.USERDATA WIDTH HEIGHT) \LFCreateFile (VOLNUM +FILEDESC) SEDIT::SETUP-NEW-CONTEXT (SEDIT::ICON-TITLE) SETSTKNAME (VALIDNAMETABLE NAMETABLE# FNHEADER) + U/L-CASE (END START) SETTAIL? (ROW) \TELERAIDSEND (PUPDESTHOST PUPDESTNET PUPSOURCESOCKETHI +PUPSOURCESOCKETLO NETTYPE 3MBDESTHOST PUPLENGTH) \COPYFNHEADER (NTSIZE OVERHEADWORDS) BLTMENUIMAGE ( +IMAGE SAVE MENUREGIONLEFT MENUREGIONBOTTOM WIDTH HEIGHT) TEDIT.HARDCOPY-COLUMN-END (LMARK CHARLIM +LSTLN 1STLN CHAR1 TEXTLEN FMTHEADINGKEEP LFMTSPEC FMTKEEP PAGE# BOTTOM DESCENT LHEIGHT) \TEXTBOUT ( +TEXTOBJ TEXTLEN \WINDOW TXTREADONLY PSTR \INSERTPC BASE OFFST \INSERTLEN COFFSET) +CL:GET-DISPATCH-MACRO-CHARACTER (DISPATCHMACRODEFS) IMAGEOBJPROP (IMAGEOBJFNS OBJECTDATUM DISPLAYFN +IMAGEBOXFN PUTFN GETFN COPYFN BUTTONEVENTINFN COPYBUTTONEVENTINFN WHENMOVEDFN WHENINSERTEDFN +WHENDELETEDFN WHENCOPIEDFN WHENOPERATEDONFN PREPRINTFN IMAGECLASSNAME) STKSCAN (INVALIDP ALINK) +CREATEWFROMIMAGE (SAVE) \AddShade (ITEMS SHADEDITEMS) \FRAMESCAN (OVERHEADWORDS NAMETABLE NTSIZE BOUND + FIRSTPVAR NARGS BLINK) INSIDE? (LEFT WIDTH BOTTOM HEIGHT) MSSETREP (REP) SEDIT::PARSE--BROKEN-ATOM ( +SEDIT::ATOM-CHARS SEDIT::BROKEN-ATOM-FONT SEDIT::ENVIRONMENT) CHAT.RESHAPEWINDOW (TYPEOUTPROC) +SEDIT::COMPLETE (SEDIT::EDIT-OPTIONS SEDIT::OPEN-NODE-CHANGED? SEDIT::DISPLAY-WINDOW) +\LFGetStreamForFile (FSDIRPTR EXPANDEDNAME VOLNUM VERSION) \FM.CREATEW (LEFT BOTTOM WIDTH HEIGHT) +PRINTANDBOX (WIDTH) COMP.STUNBIND (LEVEL PARENT) \SETWINFOXSIZE (ATMAXX ATMINX) OPT.COMMONBACK (PREV +OPNAME TAG OPARG) \VAMEnoughSpace (type freePageCount) DO-DISPATCH-MACRO (DISPATCHMACRODEFS) +MSSEEKPHRASE (START) PUTPUPSTRING (PUPLENGTH PUPCONTENTS) GETDEFFROMFILE (FILEGETDEF) FLOATP.TO.BCPL ( +EXPONENT LONGFRACTION SIGNBIT) SWITCH/NODE/HEIGHT/WIDTH (NODEWIDTH) RESUME (EDFXP INVALIDP CLINK) +\ALLOCSPACETOGROUPEDWINDOWS (ATEDGE) \MAXWIDTHOFGROUP (ATWHEREONEDGE ATMINX) SETXREL.IP (IPDATA IPXPOS + IPVISLEFT IPYPOS IPMINVISIBLEBASELINE IPMAXVISIBLEBASELINE) SEDIT::SETUP-CONTEXT-WINDOW-DEPENDENCIES +(SEDIT::DISPLAY-WINDOW) SHRINK-VECTOR (TOTAL-SIZE) SEDIT::SET-SELECTION (SEDIT::SET-SELECTION +SEDIT::NODE-TYPE) BCPL.TO.FLOATP (SIGNIFICANTBIT BCPLEXPONENT RESTOFFRACTION) ADDFILE (CHANGED) +RESET/NODE/BORDER (NODEBORDER) SEDIT::OPEN-LITATOM (SEDIT::OPEN-NODE SEDIT::OPEN-NODE-CHANGED? +SEDIT::OPEN-NODE-INFO SEDIT::LINEAR-FORM SEDIT::NODE-TYPE SEDIT::SUBSTRING SEDIT::BUFFER-STRING) +CHAT.BUTTONFN (CHATINEMACS TYPEOUTPROC) MSVERBTYPE (VPART VB1 VB2 TENSE TYPE DEFAULTTYPE ROOT MODIFIER +) \POSTSCRIPT.ACCENTFN (IMAGEDATA POSTSCRIPTCHARSTOSHOW OFFST BASE LENGTH FATSTRINGP) +\LFUpdateLeaderPage (LEADERPAGE EPAGE EOFFSET size FILEDESC) \FM.SETATTACHPOINT (FM.USERDATA WIDTH +LEFT HEIGHT BOTTOM) \TEDIT.FIND.LAST.LINE (LINES \WINDOW YBOT WBOTTOM NEXTLINE) \TEDIT.LOOKS.UPDATE ( +TEXTOBJ PREVPIECE PPARALOOKS CURRENTPARALOOKS PLOOKS CLINVISIBLE BASE PLEN NEXTPIECE CURRENTLOOKS +CLFONT CLOFFSET FMTHARDCOPY CLPROTECTED POBJ) SEDIT::SETUP-CONTEXT (SEDIT::CONTEXT-LOCK SEDIT::PROFILE + SEDIT::CHANGED-STRUCTURE?) COMP.STBIND (PARENT LEVEL NVALS OPNAME VARS OPARG) \SPREADFRAMEP (IVAR +BLINK NARGS) DINFO.UPDATE.MENU.DISPLAY (WINDOW SUBNODE.MENU.WINDOW CHILDREN NODELST MENUFONT LABEL +ITEMHEIGHT IMAGEHEIGHT BOTTOM) DMCHAT.HANDLE.WRAP (TERM.STATE) \INTERPFRAMENT (VALIDNAMETABLE +NAMETABHI NAMETABLE#) \EDIT.DOWNCARET (TCCARETDS TCCARET) CL:SET-DISPATCH-MACRO-CHARACTER ( +DISPATCHMACRODEFS) SHOWSHADEDITEMS (ITEMS SHADEDITEMS WIDTH) \SENDLEAF (LEAFERRORCNT FULLFILENAME +LEAFLENGTH PUPCONTENTS EPUSERFIELD SEQEVENT LEAFOPCODE LEAFERRORCODE) MENUITEMREGION (ITEMS MENUGRID +MENUBORDERSIZE LEFT MENUCOLUMNS WIDTH BOTTOM MENUROWS HEIGHT) SETSTKARG (NTSIZE OVERHEADWORDS IVAR +BLINK FIRSTPVAR NARGS FNHEADER NLOCALS BOUND) SKIP/ZAP (END) STKARGNAME (NTSIZE OVERHEADWORDS +NAMETABLE NARGS BLINK NLOCALS BOUND FIRSTPVAR) SETSTKARGNAME (NTSIZE OVERHEADWORDS NAMETABLE NARGS +BLINK NLOCALS) MB.DEFAULTBUTTON.ACTIONFN (CH# TEXTLEN SCRATCHSEL CHLIM) MSFIXUPTYPES (SOUGHT ID ITEM +SUBJECT TYPE MSPRED DEFAULTTYPE REP NEGATED KNOWN) SEDIT::INSERT-STRING (SEDIT::SELECT-START +SEDIT::SELECT-END SEDIT::SELECT-STRING SEDIT::SELECT-TYPE SEDIT::POINT-INDEX SEDIT::POINT-STRING +SEDIT::POINT-TYPE) DINFO.UPDATE.TEXT.DISPLAY (WINDOW FROMBYTE TOBYTE TEXTPROPS) \FM.UPDATEWINDOWEXTENT + (WIDTH HEIGHT) \POSTSCRIPT.ACCENTPAIR (IMAGEDATA POSTSCRIPTFONT OFFST BASE LENGTH FATSTRINGP +\SFAscent) \FM.COLLECTNWAYS (FM.USERDATA) %%DEFPRINT-ARRAY (HASHMACROCHAR) \CONVERTNUMBER (COMMONLISP +HASHMACROCHAR) PRETTYDEF (FILECHANGES) STKNARGS (FRAMENAME NARGS BLINK NTSIZE OVERHEADWORDS FNHEADER +NLOCALS) OPT.LABELNTHPR (NXT PREV) FILEPKGCHANGES (CHANGED) SET-FILL-POINTER (FILL-POINTER-P +TOTAL-SIZE) TTECHO.TO.FILE (END START CPXREALCHAR CPXNCHARS NEXTLINE) OPT.JUMPREV (LEVEL FRAME NXT +PREV OPNAME OPARG TAG) %%DEFPRINT-VECTOR (HASHMACROCHAR) \HDCPYDISPLAY.FIX.XPOS (IMAGEDATA DDXPOSITION +) FB.HARDCOPY.MAXWIDTH (FILEINFO TIDATA) FB.IS.NOT.SUBDIRECTORY.ITEM (TIUNSELECTABLE) +%%DEFPRINT-GENERIC-ARRAY (HASHMACROCHAR) EQUAL.CH.NAMES (NSOBJECT NSDOMAIN NSORGANIZATION) +\TEDIT.FIND.PROTECTED.END (TEXTLEN PCTB CLPROTECTED PLOOKS PLEN NEXTPIECE) \GOOD.DASHLST (BRUSHSIZE) +%%DEFPRINT-STRING (ESCAPECHAR COMMONLISP) CL:VECTOR-PUSH (FILL-POINTER-P FILL-POINTER) +%%DEFPRINT-BITVECTOR (HASHMACROCHAR) MENUREGION (IMAGEWIDTH IMAGEHEIGHT MENUREGIONLEFT +MENUREGIONBOTTOM) FB.NAMES.INCREASING.VERSION (VERSIONLESSNAME TIDATA VERSION) RESHADEITEM (MENUFONT +CENTERFLG) FIXR (HINUM LONUM SIGNBIT LOFRACTION HIFRACTION EXPONENT) COURIER.BROADCAST.CALL ( +RTHOPCOUNT RTNET#) REFLECT/GRAPH/DIAGONALLY (SIDESFLG GRAPHNODES NODEPOSITION YCOORD XCOORD) +BITMAPWIDTH (BITMAPWIDTH) \LEAF.CLOSEFILE (LEAFCONNECTION LEAFOPENCLOSELOCK SEQSTATE ACCESSBITS +LEAFCACHEDFILE FULLFILENAME LEAFREALLYOPEN LEAFHANDLE PUPCONTENTS) DECLAREDATATYPE (fdType fdOffset) +READFROMBUF (END CPXREALCHAR NEXTLINE) BITMAPHEIGHT (BITMAPHEIGHT) FLTSTR (HINUM LONUM SIGNBIT +LOFRACTION HIFRACTION EXPONENT) \TELERAIDGET (EPTYPE PUPDESTSOCKETLO PUPDESTHOST NDBPUPHOST# +PUPDESTSOCKETHI NETTYPE TRANSOPERATION TRANSPUPHOST) \SETWINFOYSIZE (ATMAXY ATMINY) \MAXHEIGHTOFGROUP +(ATWHEREONEDGE ATMINY) \VAMFindFreePages (lowerBound filePage volumeSize nextFilePage) TIMESPOW10 (EXP + HI LO) TRANSLATE.DATATYPE (FD fdType LEN) GETPUPSTREAM (PUPCONTENTS PUPLENGTH) GETDEFERR (NULLDEF) +INTTOEXT (HINUM LONUM) LINELENGTH (LINELENGTH) HASH-DOT (COMMONLISP) \TEDIT.NEUTRALIZE.PARALOOKS.MENU +(\TEXTOBJ CH# SCRATCHSEL) FLTINTLOG (EXP HI LO) \RESHAPEATTACHEDWINDOWSAROUNDMAINW (TOP RIGHT BOTTOM +LEFT ATTACHEDW HEIGHT WIDTH ATWHEREONEDGE ATEDGE ATYSIZE ATXSIZE) \UPDATEXYANDBOX (XCOORD YCOORD) +FW-CLOSEFN (OFDWINDOW) \NSRANDOM.UPDATE.VALIDATION (NSHDATUM) RPLCHARCODE (LENGTH FATSTRINGP BASE +OFFST) MB.SELFN (\TEXTOBJ) PUTPUPBYTE (PUPCONTENTS) GETDEFCOM0 (MACRO) FB.DECREASING.VERSION (VERSION +TIDATA) SEDIT::SET-POINT (SEDIT::SET-POINT SEDIT::NODE-TYPE) TRACKNODE (GRAPHNODES) NODELST/AS/MENU ( +XCOORD YCOORD NODEPOSITION NODEHEIGHT NODEWIDTH) \NSRANDOM.WROTE.HANDLE (NSHWASWRITTEN NSHDATUM +NSHWASMODIFIED NSHATTRIBUTES) \TEDIT.PUT.SINGLE.PARALOOKS (1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD TABX TABKIND FMTSPECIALX FMTSPECIALY FMTUSERINFO FMTPARATYPE FMTPARASUBTYPE FMTSTYLE FMTCHARSTYLES FMTNEWPAGEBEFORE FMTNEWPAGEAFTER FMTHEADINGKEEP FMTKEEP -FMTBASETOBASE FMTREVISED FMTCOLUMN) STKARGNAME (NTSIZE OVERHEADWORDS NAMETABLE VALIDNAMETABLE -NAMETABLE# FNHEADER NARGS BLINK FASTP SLOWP DUMMYBF \#BLINK IVAR PADDING NLOCALS BOUND FIRSTPVAR -FXSIZE PVHI) \\CURVE2 (IMAGEDATA SPLINEX SPLINEY |DDClippingBottom| |DDClippingTop| |DDClippingRight| -|DDClippingLeft| |DDDestination| DDOPERATION BITMAPBITSPERPIXEL BITMAPBASE BITMAPRASTERWIDTH -BITMAPHEIGHT BITMAPWIDTH DDXOFFSET DDYOFFSET \#KNOTS SPLINEDX SPLINEDY SPLINEDDX SPLINEDDY SPLINEDDDX -SPLINEDDDY) %DEFPRINT-BITVECTOR (HASHMACROCHAR) CLEARFILEPKG (TOBEDUMPED FILEPROP) SETSTKARGNAME ( -NTSIZE OVERHEADWORDS NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER NARGS BLINK FASTP SLOWP DUMMYBF -\#BLINK IVAR PADDING NLOCALS) \\TEDIT2 (TEXTOBJ F3 EDITFINISHEDFLG TXTFILE) %DEFPRINT-VECTOR ( -HASHMACROCHAR) DINFO.TOGGLE.MENU (CURRENTNODE SUBNODE.MENU.WINDOW) DINFO.UPDATE.TEXT.DISPLAY (WINDOW -FROMBYTE TOBYTE TEXTPROPS) TTNLEFT (START) TEDIT.WORDGET (NSCHARHASH READSA) STKNARGS (FRAMENAME -NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER \#FRAMENAME NARGS BLINK FASTP SLOWP DUMMYBF \#BLINK IVAR -PADDING NTSIZE OVERHEADWORDS NLOCALS) STKSCAN (INVALIDP ALINK \#ALINK) %DEFPRINT-STRING (ESCAPECHAR -COMMONLISP) \\NSFILING.HOSTNAMEP (NSFSPARSEDNAME NSOBJECT) CREATEMENUEDWINDOW (MENUROWS ITEMS -IMAGEWIDTH IMAGEHEIGHT WIDTH HEIGHT BOTTOM LEFT) \\BSP.TIMERFN (RTPSTATE INACTIVITYTIMER ACKPENDING -INTERRUPTOUT BSPOUTPUTQ PUPSOC ACKREQUESTED LASTADATATIME ADATACOUNT XMITBYTEID) TEDIT.FIND.OBJECT ( -PCTB POBJ PLEN NEXTPIECE) \\BITMAPTOSCREEN (SCDESTINATION) SLICESET (LINEARIZEDARRAY OFFSETS -OFFSETCONSTANT) FLOATP.TO.BCPL (EXPONENT LONGFRACTION SIGNBIT) SEDIT::COPY-STRUCTURE-QUOTE (CL:STRUCTURE - SEDIT::SUB-NODES) LOOKUP-SYMBOL (TOTAL-SIZE BASE) SEDIT::MAKE-COMMENT-STRING (SEDIT::SUB-NODES) -FB.SORT.VERSIONS (VERSIONLESSNAME TIDATA) TEDIT.UNDO.INSERTION (LINES SEL) BCPL.TO.FLOATP ( -SIGNIFICANTBIT BCPLEXPONENT RESTOFFRACTION) %DEFPRINT-GENERIC-ARRAY (HASHMACROCHAR) |\\VFMFind| ( -|volumePage| |key| |used| |nextKey|) SPY.MAX (CALLEES COUNT SUM) \\TEDIT.STRIKEOUT.CARET.OFF ( -CARETLOOKS) \\LEAF.REPAIR.BROKEN.PUP (EPUSERFIELD LEAFCONNECTION F1 LEAFOPCODE PUPCONTENTS LEAFHANDLE -F2 FULLFILENAME) |\\LFGetFileName| (EXPANDEDNAME) DSPYSCREENTOWINDOW (DDYOFFSET IMAGEDATA) -UNIX-STREAM-EOFP-NEW (CBUFPTR COFFSET CBUFSIZE) \\INTERPFRAMENT (VALIDNAMETABLE NAMETABHI NAMETABLE#) -PRINTSPP (XIPCONTENTS SOURCECONID DESTCONID CC SYSTEMPACKET SENDACK ATTENTION ENDOFMESSAGE DSTYPE -SEQNO ACKNO ALLOCNO XIPLENGTH SPPCONTENTS) DMCHAT.HANDLE.WRAP (TERM.STATE) TTYIN.BALANCE (NSCHARHASH -CPXREALCHAR) TEDIT.FIND.OBJECT.SUBTREE (PCE LO HI POBJ CHNUM) CHAT.BUTTONFN (CHATINEMACS TYPEOUTPROC) -SEDIT::COPY-STRUCTURE-LIST (SEDIT::SUB-NODES CL:STRUCTURE) \\NSRANDOM.HANDLE.ERROR (DEVICEINFO DEVICE -OPENFILELST NSFILING.CONNECTION F3 FULLFILENAME FSPROTOCOLNAME) \\POLYSHADE.BLT (BY RX LX WC TY) -SEDIT::VERIFY-COMMENT (CL:STRUCTURE) COMP.STTAG (LEVEL FRAME OPNAME TAG) FB.DELVER.FILES ( -VERSIONLESSNAME TIDATA) DINFO.TOGGLE.TEXT (MONITORLOCK CURRENTNODE) \\NSFILING.WHENCLOSED ( -FSCOURIERSTREAMS FSDEVICENAME OPENFILELST) DINFO.UPDATE.HISTORY (WINDOW HISTORY.MENU.WINDOW -HISTORY.ITEMS ID LABEL MENUFONT) TTNTH (END) ONEDINSPECTW.CREATE (LEFT BOTTOM WIDTH HEIGHT XCOORD -YCOORD) TEDIT.SETSYNTAX (READSA TXTRTBL TEXTOBJ F3) \\FAST4BIT (N1 N2 N3 N4) \\GETREGION.CHECKBASEPT ( -XCOORD YCOORD) HASH-DOT (COMMONLISP) SIZE/GRAPH/WINDOW (WIDTH HEIGHT LEFT PTOP BOTTOM) -BSP.PUTINTERRUPT (BSPSOC F1 BSPLOCK INTERRUPTOUT XMITINTERRUPTID BSPOUTPUTQ PUPCONTENTS PUPSOC -BSPINPUTEVENT) |\\LFReadPages| (FILEDESC F1 EPAGE EOFFSET) \\ITEMW.FLIPCOPY (SELECTABLEITEMREGION LEFT - BOTTOM WIDTH) FIXR (HINUM LONUM SIGNBIT LOFRACTION HIFRACTION EXPONENT) FM.REDISPLAYITEM (FM.USERDATA - LEFT BOTTOM) \\CONVERTNUMBER (COMMONLISP HASHMACROCHAR) UNIX-STREAM-CLOSE (OPENFILELST) -TB.CLOSE/SHRINK (TBLOCK TBCLOSEFN) CL:SET-DISPATCH-MACRO-CHARACTER (DISPATCHMACRODEFS) BITMAPWIDTH ( -BITMAPWIDTH) TERM.HOME (HOMEPOS DSP) SET-FILL-POINTER (FILL-POINTER-P TOTAL-SIZE) |\\LFExtendFile| ( -VOLUME |volNum| FILEDESC F1 |size|) AT.END.OF.TEXT (CPXREALCHAR) COPY.WINDOW.TO.BITMAP (LEFT BOTTOM -WIDTH HEIGHT) \\QUEUE.INPUT.IOCB (NDBCSB DLFIRSTICB DLLASTICB DLIOCBSTATUS D0FIRSTICB D0LASTICB -D0IOCBSTATUS NDBTASK#) BITMAPHEIGHT (BITMAPHEIGHT) \\GOOD.DASHLST (BRUSHSIZE) PARSE-NAMESTRING1 ( -FULLFILENAME) \\FILLINSPP (XIPCONTENTS) SPY.MERGE (DELETED NAME DEPTH) \\TEDIT.STRIKEOUT.CARET.ON ( -CARETLOOKS) EXPANDING-PAGEFULLFN (HEIGHT BOTTOM) COMP.STJUMP (OPARG OPNAME FRAME LEVEL) -NSOCKETFROMNUMBER (ID#) FIND.PACKAGE (LASTINDEX HARRAYPBASE VALUE KEY) \\HDCPYDSPPRINTCHAR (IMAGEDATA -CCECHO NSCHARHASH CHARPOSITION DDXPOSITION |DDLeftMargin| |DDRightMargin|) SPY.MERGEINFO (MERGEINFO) -\\TEDIT.UNDERLINE.CARET.OFF (CARETLOOKS) SEDIT::BACKSPACE-QUOTE (SEDIT::SUB-NODES SEDIT::BACK-SPACE -SEDIT::NODE-TYPE CL:STRUCTURE SEDIT::SELECTION SEDIT::CARET-POINT) \\ADDLEAFSTRING (PUPCONTENTS -LEAFLENGTH PNAMEBASE PNAMELENGTH BASE XBASE INDIRECT-P OFFST OFFSET LENGTH FILL-POINTER) -|\\LFSetFileInfo| (FILEDESC F1 LEADERPAGE F2) LINELENGTH (LINELENGTH) CHAT.SWITCH.EMACS (CHATINEMACS) -DMCHAT.ADDRESS (ADDRESSING) DINFO.TOGGLE.HISTORY (HISTORY.MENU.WINDOW) TTLASTLINE (NEXTLINE) -FM.RESETSHAPE (LEFT BOTTOM) TEDIT.GETSYNTAX (NSCHARHASH READSA TXTRTBL TEXTOBJ F3) PPSPP ( +FMTBASETOBASE FMTREVISED FMTCOLUMN) OPT.LBDEL (PREV NXT) COPY.TEXT.TO.IMAGE (EOFP DEVICE) +REFLECT/GRAPH/VERTICALLY (GRAPHNODES NODEPOSITION YCOORD) DMCHAT.ADDRESS (ADDRESSING) SET/LABEL/SIZE ( +NODEHEIGHT NODEWIDTH NODEFONT NODELABEL NODEBORDER YSIZE XSIZE) HASH-COMMA (COMMONLISP) DIGITSBDP ( +HINUM LONUM SIGNBIT LOFRACTION HIFRACTION EXPONENT) SEDIT::INSERT-LITATOM (SEDIT::SELECT-TYPE +SEDIT::POINT-TYPE) SEDIT::DOT-THIS-LIST (SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::POINT-INDEX +SEDIT::SUB-NODES CL:STRUCTURE SEDIT::SELECTION) %%NUMERIC-STRING-P (OFFST BASE LENGTH FATSTRINGP) +\POSTSCRIPT.SPECIALOUTCHARFN (IMAGEDATA) TTYINSTRING (CPXREALCHAR) READHOTSPOT (CUHOTSPOTX WIDTH +CUHOTSPOTY HEIGHT) \FM.WINDOWEXTENT (FM.USERDATA) PARSE-NAMESTRING1 (FULLFILENAME) +TYPE-VARIABLE-FROM-TYPE-NAME (PNAMEBASE PNAMELENGTH FATPNAMEP LENGTH) INSIDEP (XCOORD YCOORD) +TTDELETECHAR (END START) \NSRANDOM.WRITE.SEGMENT (NSHDATUM) SEDIT::SET-DEPTH (SEDIT::SUB-NODES) +\BREAKAPARTATWSTRUCTURE (ATTACHEDW) GETBOXREGION (REGION) EDITMOVENODE (GRAPHNODES) SETFONT.IP (IPDATA + IPPAGEFONTS) GETPUPSTRING (PUPLENGTH PUPCONTENTS) GETDEFCURRENT (GETDEF NULLDEF TOBEDUMPED FILEPROP +FILEDATES) FB.SORT.VERSIONS (VERSIONLESSNAME TIDATA) \TEDIT.HCPYLOOKS.UPDATE (TEXTOBJ PREVPIECE +PPARALOOKS CURRENTPARALOOKS PLOOKS CLINVISIBLE BASE PLEN NEXTPIECE CURRENTLOOKS CLFONT CLOFFSET +\SFAscent \SFDescent CLUSERINFO POBJ) SCAN.LESSP (LX) TTNEXTLINE (NEXTLINE) DINFO.UPDATE.GRAPH.DISPLAY + (WINDOW PARENT CHILDREN LAST.GRAPH.LOCATION GRAPH.WINDOW NAME LABEL CURRENTNODE) +\FM.UPDATEGROUPEXTENT (LEFT BOTTOM WIDTH HEIGHT) \POSTSCRIPT.PRINTSLUG (IMAGEDATA POSTSCRIPTX +POSTSCRIPTY POSTSCRIPTWIDTHS \SFAscent POSTSCRIPTFONT) COMPILEDFETCHFIELD (fdTypeName fdType fdOffset) + WBOX (LEFT BOTTOM WIDTH HEIGHT) TB.FINISH.CLOSE (TBLOCK) SEDIT::SELECT-NEXT-GAP (SEDIT::SELECTION) +OPT.UBDEL (OPARG) APPENDIDENTIFIER.IP (OFFST BASE LENGTH FATSTRINGP) REFLECT/GRAPH/HORIZONTALLY ( +GRAPHNODES NODEPOSITION XCOORD) TERM.PRINTCHAR (DSP IMAGEDATA XPOS DDCHARSET DDCHARIMAGEWIDTHS +DDWIDTHSCACHE YPOS FONTDESCENT FONTHEIGHT UNDERLINEMODE FONTWIDTH TTYWIDTH WRAPMODE) DRAWLINE ( +IMDRAWLINE IMAGEOPS) \DSPRIGHTMARGIN.HDCPYDISPLAY (IMAGEDATA) COMPILEDREPLACEFIELD (fdTypeName fdType +fdOffset) OPT.PRDEL (PREV NXT) DINFO.UPDATE.HISTORY (WINDOW HISTORY.MENU.WINDOW HISTORY.ITEMS ID LABEL + MENUFONT) MOVETO (IMMOVETO IMAGEOPS) TERM.ADDLINE (DSP TTYWIDTH FONTHEIGHT YPOS FONTDESCENT) SQRT ( +EXP HIFRAC) \CHARWIDTH.HDCPYDISPLAY (IMAGEWIDTHS FONTCHARSETVECTOR DDFONT IMAGEDATA) MSJOINSET (ID REP + QUOTED DET TYPE DEFAULTTYPE KNOWN) SEDIT::HASFAT (OFFST BASE LENGTH FATSTRINGP) \FM.TRANSPOSEVERT ( +BOTTOM) DSPBACKCOLOR (IMBACKCOLOR IMAGEOPS) TTRATOM (TTYINPUT) COMP.LOOKUPCONST (OPARG) OPENIPSTREAM ( +LEFT RIGHT TOP BOTTOM IMAGEOPS EOLCONVENTION IPPAGEFRAME) \TEDIT.PARSE.CHARLOOKS.LIST (CLFONT CLOFFSET +) \VFMMarkBufferDirty (PAGE) FW-UPDATE-OFD-WINDOW (OFDSTREAM FILESTREAM CURPOS EOFPOS PCTPOS PCTREGION + WRITING? RANDOM? FULLNAME ACCESSXOFFSET READING? CURPOSXOFFSET EOFPOSXOFFSET PCTPOSXOFFSET LEFT +BOTTOM) MB.SETIMAGE (XSIZE YSIZE) PUTPUPWORD (PUPCONTENTS) FB.DELVER.FILES (VERSIONLESSNAME TIDATA) +TEDIT.HARDCOPY.PAGEHEADING (PIECE FMTPARASUBTYPE PLEN NEXTPIECE PPARALAST FMTPARATYPE PPARALOOKS +PAGEHEADINGS) SEDIT::LINEARIZE (SEDIT::RELINEARIZATION-TIME-STAMP SEDIT::CURRENT-NODE SEDIT::LINEAR-THREAD + SEDIT::LINEAR-PREV SEDIT::LINEAR-POINTER SEDIT::RIGHT-MARGIN SEDIT::SUB-NODE-INDEX SEDIT::ACTUAL-WIDTH + SEDIT::START-X SEDIT::INLINE? SEDIT::SUPER-NODE SEDIT::CURRENT-X SEDIT::LINEARIZE SEDIT::NODE-TYPE +SEDIT::LINEAR-FORM) EXTENDREGIONTOP (TOP HEIGHT) DSPBOTTOMMARGIN (IMBOTTOMMARGIN IMAGEOPS) FW-OPENP ( +OPENP OPENFILELST USERVISIBLE) READ-AFM-FILE (FID ASCENT DESCENT) RESTOREBUF (ROW OLDTAIL) +PARSE.NSNAME (NSOBJECT NSORGANIZATION NSDOMAIN) SHEDSCAN (REST X Y WIND) DSPCOLOR (IMCOLOR IMAGEOPS) +\10MB.TURNONETHER (NDBCSB) \FM.TRANSPOSEHORZ (LEFT) \LFDeleteFile (OPENP FULLFILENAME VOLUME FILEDESC) + \FM.GETBITMAPS (WIDTH HEIGHT) \UFS.UNREGISTER.GFS (FINFOID) SEDIT::REVIVE-NODE (SEDIT::SUB-NODES) +\PFReplaceString (OFFST BASE LENGTH FATSTRINGP) PRETTYCOM (MACRO GETDEF) OPT.LBMERGE (LEVEL FRAME) +\UNVISIBLE.FLUSH.OPEN.STREAMS (OPENFILELST USERVISIBLE ACCESSBITS FORCEOUTPUT) +SEDIT::GROW-SELECTION-LITATOM (SEDIT::SELECT-START) \MAIKO.PUNTBLTCHAR (DDCHARSET DDSlowPrintingCase +DDXPOSITION DDCHARIMAGEWIDTHS DDRightMargin DDLeftMargin DDWIDTHSCACHE DDXOFFSET DDClippingRight +DDClippingLeft PBTHEIGHT DDPILOTBBT) GET-ENVIRONMENT-AND-FILEMAP (FMFILEMAP FMENVIRONMENT FMFROMFILE? +FMFILECREATEDLOC FMFILECREATEDLST) TERM.DOWN (DSP XPOS YPOS FONTHEIGHT BOTTOMMARGIN FONTDESCENT +ROLLMODE HOMEPOS TOPMARGIN) DSPCLIPPINGREGION (IMCLIPPINGREGION IMAGEOPS) \DSPFONT.HDCPYDISPLAY ( +IMAGEDATA FONTCHARSETVECTOR CHARSET \SFHeight WIDTHS) PSCFONT.WRITEFONT (WIDTHS FID HIBYTE LOBYTE +FIRSTCHAR LASTCHAR ASCENT DESCENT) \UNVISIBLE.PAGED.REVALIDATEFILELST (OPENFILELST USERVISIBLE +UNREGISTERFILE) \INIT.POWERS.OF.TEN (EXP HI LO) \GETREGIONTRACKWITHBOX (XCOORD YCOORD) \SETGROUPMIN ( +ATEDGE ATMINY ATMAXX ATWHEREONEDGE ATMINX ATMAXY) DSPRESET (IMRESET IMAGEOPS) SEDIT::AWAKE-COMMAND-PROCESS + (SEDIT::DISPLAY-WINDOW) FW-CLOSE-OLD-OFD-WINDOWS (OFDSTATUS OFDWINDOW) MB.DISPLAY (YDESC XSIZE YSIZE) + \TEXTTTYBOUT (TEXTOBJ SEL CCECHO NSCHARHASH TXTTERMSA CHARPOSITION) GETPUPBYTE (PUPCONTENTS) +\TEDIT.PARSE.PARALOOKS.LIST (TABSPEC) TTDELETEWORD (START) TEDIT.SKIP.SPECIALCOND (PIECE +FMTPARASUBTYPE PLEN NEXTPIECE PPARALAST FMTPARATYPE PPARALOOKS) \FAULTINIT (MachineType FPTOVPStart +FullSpaceUsed DL24BitAddressable NActivePages CCODEP) \INIT.ETHER.BUFFER.POOL (MDSZoneLength MDSZone +D0NEXTIOCB) \BN.FROM.FIXP (ELEMENTS) \MAKEFRAME (DEFPOINTER LSTARP NA STARTPC) DSPFONT (IMFONT +IMAGEOPS) \SET.VMEM.FULL.STATE (NActivePages Key) \VFMDelete1 (used volumePage key) \UFSDirectoryNameP + (DEVICENAME) GETREGION (REGION) FW-RESIZE-OFD (NAMEWIDTH XCOORD WIDTH) SETRGB.IP (IPCOLORMODEL +IMAGEDATA) PRINTDATE (FILECHANGES FILEDATES FILEDATE DATEFILENAME) CLEARPUP (PUPBASE PUPCONTENTS) +\SETIOPOINTERS (MachineType ScreenWidth DLMOUSEXPTR DLMOUSEYPTR DLCURSORXPTR DLCURSORYPTR DLUTILINPTR +DLKBDAD0PTR DLKBDAD1PTR DLKBDAD2PTR DLKBDAD3PTR DLKBDAD4PTR DLKBDAD5PTR DLDISPINTERRUPTPTR +DLCURSORBITMAPPTR) DSPLEFTMARGIN (IMLEFTMARGIN IMAGEOPS) \TELERAIDINIT (BITMAPBASE BITMAPHEIGHT) +LOOKUP-ENVIRONMENT-AND-FILEMAP (FMENVIRONMENT FMFILEMAP FMFILECREATEDLOC FMFILECREATEDLST) +\D01.FAULTINIT (REALPAGETABLEPTR RPTSIZE RVersion) \UFSGenerateFiles (DEVICENAME) SET/LAYOUT/POSITION +(NODEPOSITION XCOORD YCOORD) \DOVE.FAULTINIT (Key NActivePages DLLastVmemPage) \UFSSetFileInfo ( +DEVICENAME UNIXNAME) \UFSOpenFile (DEVICENAME FILEID UNIXNAME ACCESSBITS) \TEDIT.UPDATE.SHOWSEL ( +\TEXTOBJ HOW HOWHEIGHT HASCARET CARET CH# L1 LINES \WINDOW X0 CHLIM LN XLIM POINT YBOT) \DL.FAULTINIT +(Key DLTODVALID DLTODLO DLTODHI DLPROCESSORCMD DLPROCESSOR0 DLPROCESSOR1 DLPROCESSOR2 DLLastVmemPage) +IN/ITEM? (XCOORD YCOORD SELECTABLEITEMREGION) DSPLINEFEED (IMLINEFEED IMAGEOPS) \SEQUIN.HANDLE.ACK ( +SEQRETRANSMITQ SEQRETRANSMITTING %#UNACKEDSEQS SENDSEQ SEQACKED) TEDIT.BUILD.PCTB (STREAMHINT FMTSPEC +EOLCONVENTION PLEN PLOOKS PPARALOOKS NEXTPIECE TXTCHARLOOKSLIST TXTPARALOOKSLIST DEFAULTCHARLOOKS +CARETLOOKS) \UFSWritePages (CPAGE CBUFMAXSIZE COFFSET EPAGE EOFFSET FILEID) \TEXTMARK (STREAMHINT +PIECE CPAGE COFFSET PCSTARTPG PCSTARTCH) DSPOPERATION (IMOPERATION IMAGEOPS) \TEDIT.PAPERWIDTH ( +TPSWIDTH) \10MB.LOADINPUTQ (EPNETWORK 10MBPACKETBASE EPLINK) \TEDIT.INTEGER.IMAGEBOX (XKERN YDESC +YSIZE XSIZE) SNAPW (SCREEN REGION SCDESTINATION LEFT BOTTOM SAVE WIDTH HEIGHT) \UFSTruncateFile (EPAGE + EOFFSET GETFILEPTR DEVICE FILEID UNIXNAME) SEDIT::MAP-COMMENT-INDEX (SEDIT::SUB-NODES SEDIT::OPEN-NODE + SEDIT::REAL-LENGTH STRING SEDIT::LINEAR-FORM CL:STRUCTURE) DSPRIGHTMARGIN (IMRIGHTMARGIN IMAGEOPS) +\SPP.CHECK.INPUT.QUEUE (SPPACKNO SPPINPUTQ SYSQUEUEHEAD SEQNO QLINK) OPT.JUMPTHRU (FRAME LEVEL PREV +NXT OPNAME TAG OPARG) \VFMSaveBuffer (DIRTY VOLUME VOLPAGENUM PAGE) \UFSDeleteFile (DEVICENAME) +\FILEMAP-HASHOVERFLOW (FMROOTNAME FMFILECREATEDLST FMRECENT?) SEDIT:REPLACE-SELECTION (SEDIT::SELECTION + SEDIT::CARET-POINT SEDIT::SELECT-NODE SEDIT::SELECT-TYPE) DMCHAT.NEWLINE (YPOS DSP) DSPTOPMARGIN ( +IMTOPMARGIN IMAGEOPS) FB.DELVERCOMMAND (TABLEBROWSER TIUNSELECTABLE VERSION TIDATA SORTBY) +\TELERAIDCOMMAND (TRCONTROLD TRCURSOR TRCONTROLN NDBPUPHOST# TRRAID TRCONTROLS) SEDIT::GET-BUTTON-STRING + (SEDIT::LINEAR-FORM SEDIT::NODE-TYPE SEDIT::PRIN-2? STRING) DINFO.SETUP.WINDOW (NAME) +\FM.INITCORNERSFN (LEFT BOTTOM) \LFRenameFile (OPENP GETFILENAME DIRINFO EXPANDEDNAME LEADERPAGE) +FLUSHFILEMAPS (FMROOTNAME) \UFSCloseFile (DEVICE UNIXNAME ACCESSBITS TRUNCATEFILE CDATE FILEID +FULLFILENAME) SEDIT::REPLACE-ROOT (SEDIT::SUB-NODES SEDIT::LINEAR-FORM SEDIT::DEPTH) TRACKW (LEFT REG +BOTTOM) DSPSCALE (IMSCALE IMAGEOPS) \UFSGetFileInfo (DEVICENAME UNIXNAME) TTYINENTRYFN (TTOLDRIGHTFN) +SIZE/GRAPH/WINDOW (WIDTH HEIGHT LEFT PTOP BOTTOM) GETSYNTAX (READSA BREAK TERMSA TERMCLASS +READMACRODEFS MACROTYPE VAL MACROCONTEXT WAKEUP ESCAPE) \TEDIT.CARETLOOKS.VERIFY (CARETLOOKS +DEFAULTCHARLOOKS) \TEDIT.HCPYFMTSPEC (1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD +FMTBASETOBASE QUAD TABSPEC FMTSPECIALX FMTSPECIALY) \BULK.DATA.CLOSE (BULK.DATA.CONTINUATION +SPPSUBSTREAM PROGRAM PROCEDURE ACCESSBITS EOFP DEVICE SPPINPUTSTREAM PGMDEF PROCDEF NOERRORFLG +FULLFILENAME) \TEXTDSPXPOSITION (\WINDOW) \INSPECTW.COMMAND.HANDLER (COMMANDFN ITEMINFOTYPE ITEMINFO) +DSPSPACEFACTOR (IMSPACEFACTOR IMAGEOPS) \TEDIT.PAPERHEIGHT (TPSHEIGHT) \SEQUIN.FLUSH.RETRANSMIT ( +SEQRETRANSMITNEXT SEQRETRANSMITQ EPLINK) \DOFORMATTING.HARDCOPY (QUAD SPACELEFT CHARS WIDTHS DESCENT +ASCENT LINELEAD LHEIGHT LEADBEFORE LSTLN LEADAFTER LEFTMARGIN RIGHTMARGIN LEN LXLIM CR\END CHARLIM +TEXTLEN BASE) EDITSHADEREPAINTFN (LEFT BOTTOM WIDTH HEIGHT) \D01.ASSIGNBUFFERS (EMBUFVP EMUBUFFERS +EMUBUFLENGTH) MSSETSETTYPE (TYPE DEFAULTTYPE ID REP NEGATED SET1 SET2) \TEDIT.NSCHAR.RUN (PCTB PLEN +PFATP PSTR PFILE PFPOS TEXTLEN) \FM.FILLWINDOW (LEFT BOTTOM WIDTH HEIGHT) \LFTruncateFile (EPAGE +EOFFSET GETFILEPTR DEVICE AllocatedPages LEADERPAGE VOLUME) \CHAIN.UP.RPT (UNAVAILABLE EMPTY VP NEXTRP +) DSPXPOSITION (IMXPOSITION IMAGEOPS) FB.CLOSE&EXPUNGE (MENUCOLUMNS ITEMS BROWSERWINDOW) +SEDIT::REPLACE-NODE (SEDIT::CARET-POINT SEDIT::SELECTION SEDIT::SELECT-NODE SEDIT::DEPTH) +\GETREADSYNTAX (NSCHARHASH READSA READMACRODEFS MACROTYPE KEY MACROCONTEXT WAKEUP ESCAPE MACROFN) +CL:BIT-VECTOR-P (BIT-P) \UFS.ADD.HOST.FIELD (DEVICENAME) \PFRoomForFile (nextFilePage filePage type) +SEDIT:GET-SELECTION (SEDIT::SELECTION SEDIT::SELECT-NODE CL:STRUCTURE SEDIT::SELECT-START SEDIT::SELECT-END + SEDIT::SELECT-STRING SEDIT::SELECT-TYPE) \GETTERMSYNTAX (TERMCLASS NSCHARHASH TERMSA) TERM.DELCHAR ( +DSP TTYWIDTH XPOS FONTWIDTH FONTHEIGHT YPOS FONTDESCENT) DSPYPOSITION (IMYPOSITION IMAGEOPS) +\UFSReadPages (FILEID EPAGE EOFFSET) OPT.XVARSCAN1 (VARS PARENT) GETPOSITION (POSITION) \VFMDelete2 ( +volumePage used key) \DEVICEFILE.EOSERROR (ACCESS FULLNAME BUFFS VMEMPAGE FILEID) SETCOLOR16.IP ( +BITMAPBASE) \UFS.FULLNAME (DEVICENAME) \UFS.OPENP (OPENFILELST DEVICENAME UNIXNAME) CL:ARRAY-DIMENSIONS + (TOTAL-SIZE BOUND0 BOUND1 DIMS) DSPROTATE (IMROTATE IMAGEOPS) \FM.RESETCLIPPINGREGION (LEFT BOTTOM) +PTPLUS (XCOORD YCOORD) \LFGetFileInfo (LEADERPAGE EPAGE EOFFSET TYPE TimeWrite TimeRead TimeCreate +author) SEDIT::DELETE-LITATOM (SEDIT::NODE-TYPE SEDIT::SUPER-NODE) SEDIT::RELINEARIZE-WHERE-NECESSARY +(SEDIT::CHANGED-NODES SEDIT::DEPTH SEDIT::SUPER-NODE SEDIT::ASSIGN-FORMAT SEDIT::NODE-TYPE CL:FORMAT +SEDIT::CHANGED?) \M44ACTONVMEMFILE (ISFLAST) DSPPUSHSTATE (IMPUSHSTATE IMAGEOPS) \SHOWSEL.HILIGHT ( +YBOT X0 XLIM LHEIGHT FMTHARDCOPY LFMTSPEC LXLIM NEXTLINE WBOTTOM LEFTMARGIN) PPSPPSTREAM (SPPEOFP) +\TEXTDSPYPOSITION (\WINDOW) NESTED.SUBMENU (CENTERFLG MENUFONT MENUBORDERSIZE MENUOUTLINESIZE +WHENHELDFN WHENUNHELDFN SUBITEMFN) TERM.LEFT (XPOS FONTWIDTH YPOS DSP) \ITEM.WINDOW.SELECTION.HANDLER +(ITEMINFOTYPE ITEMINFO) \UFS.REMOVE.HOST.FIELD (DEVICENAME) MENUTITLEFONT (IMAGE SCREEN MENUTITLEFONT +SCTITLEDS MENUFONT) FB.DELETE.FILE (TIDELETED DELETEDFILES SIZE TIDATA DELETEDPAGES) \TEDIT.FORMATTABS + (PTTYPE PTTABX PTOLDTX PTWBASE TABX TABKIND) \RESHOWBORDER1 (REG SAVE WIDTH HEIGHT DSP WTITLE +SCTITLEDS SCREEN BITMAPBITSPERPIXEL SCDESTINATION LEFT BOTTOM BITMAPWIDTH) RENUMBER.LINES (NEXTLINE) +DSPPOPSTATE (IMPOPSTATE IMAGEOPS) ACCEPT-UNIX-SOCKET-STREAM (OPENFILELST) SEDIT::ATOM-CHAR-ESCAPED ( +CASEINSENSITIVE INNERESCQUOTE NSCHARHASH READSA) D-ASSEM::MAX-ARG (OP#) MSKNOWN (ID REP NEGATED SET1 +SET2) DSPDEFAULTSTATE (IMDEFAULTSTATE IMAGEOPS) \FM.UNSCROLLWINDOW (LEFT BOTTOM) \LFGetFileName ( +EXPANDEDNAME) \INITBFS (SYSDISK DDHEADER CBQUEUE CBNEXT DD#DISKS DD#TRACKS DD#HEADS DD#SECTORS ISFMAP +ISFEND ISFCHUNKSIZE FPVERSION) \QUEUE.INPUT.IOCB (NDBCSB DLFIRSTICB DLLASTICB DLIOCBSTATUS D0FIRSTICB +D0LASTICB D0IOCBSTATUS NDBTASK#) EXTENDREGIONRIGHT (RIGHT WIDTH) SEDIT::RECOMPUTE-WIDTH (SEDIT::FIRST-LINE + SEDIT::LAST-LINE SEDIT::START-X SEDIT::ACTUAL-LLENGTH SEDIT::LINE-LENGTH SEDIT::NODE SEDIT::ACTUAL-WIDTH +) COMP.CONST (OPNAME OPARG) OPT.XVARSCAN (VARS OPNAME OPARG PREV) \TELERAIDSERVER (PUPTYPE PUPIDLO +LOBYTE PUPIDHI HIBYTE INVALID VACANT PUPCONTENTS WORDINPAGE TRCOMMAND TRCURSOR) +SEDIT::COPY-STRUCTURE-STRING (CL:STRUCTURE SEDIT::FONT SEDIT::LINEAR-FORM SEDIT::ATOM-CHARS) +RESHOWBORDER (WBORDER) DSPSCALE2 (IMSCALE2 IMAGEOPS) MB.THREESTATE.SHOWSELFN (XSIZE YSIZE SET) PPSPP ( SPPSOURCENSADDRESS SPPSOURCEID SPPDESTNSADDRESS SPPDESTID SPPESTABLISHEDP SPPDSTYPE SPPTERMINATEDP SPPACKREQUESTED SPPACKREQTIME SPPROUNDTRIPTIME SPPACTIVITYTIMER SPPACKNO SPPACCEPTNO SPPINPUTSTREAM SPPINPKT SPPINPUTQ SPPSEQNO SPPACKEDSEQNO SPPOUTPUTALLOCNO SPPOUTPUTSTREAM SPPRETRANSMITQ SPPSUBSTREAM - ACCESS) CL:VECTOR-PUSH (FILL-POINTER-P FILL-POINTER) \\NSFILING.CHILDLESS-P (NSHDATUM) -DECLAREDATATYPE (|fdType| |fdOffset|) TEDIT.EDIT.OBJECT (TEXTOBJ F3 SCRATCHSEL SEL SELOBJ L1) -SEDIT::COMPUTE-POINT-POSITION-LIST (SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::START-X SEDIT::WIDTH -SEDIT::LINEAR-FORM SEDIT::FIRST-LINE SEDIT::SUB-NODES SEDIT::NODE-TYPE SEDIT::NEXT-LINE SEDIT::LAST-LINE - SEDIT::INDENT SEDIT::POINT-LINE SEDIT::LINEAR-THREAD SEDIT::ACTUAL-LLENGTH) -TYPE-VARIABLE-FROM-TYPE-NAME (PNAMEBASE PNAMELENGTH FATPNAMEP LENGTH FILL-POINTER) TRANSLATE.DATATYPE -(FD |fdType| LEN) SENDXIP (EPTRANSMITTING) SEDIT::UNDO-COMMENT-CHANGE (CL:STRUCTURE SEDIT::SUB-NODES -SEDIT::ENVIRONMENT SEDIT::COMMENT-FONT) |\\LFWritePages| (REVALIDATEFLG FILEDESC F1) INTTOEXT (HINUM -LONUM) UNIX-BACKFILEPTR-NEW (CBUFPTR COFFSET) GETPROMPTWINDOW (WIDTH) TERM.PRINTCHAR (DSP IMAGEDATA -XPOS DDCHARSET DDCHARIMAGEWIDTHS DDWIDTHSCACHE YPOS FONTDESCENT FONTHEIGHT UNDERLINEMODE FONTWIDTH -TTYWIDTH WRAPMODE) \\10MB.STARTDRIVER (NDBCSB) MSSOLVE (REP ID SET2 SET1 DET OSET INVERTED) FLTINTLOG -(EXP HI LO) SPY.MAKEGRAPHNODES (NAME CUMULATIVE SUM COUNT STATUS CALLEES) \\TEDIT.UNDERLINE.CARET.ON ( -CARETLOOKS) \\LEAF.USE.NEW.CONNECTION (EPLINK LEAFOPCODE PUPCONTENTS EPUSERFIELD ACCESSBITS -FULLFILENAME LEAFHANDLE F2) \\PARSE.REMOTE.FILENAME (PFSOSTYPE DEVICEINFO) FILEPKGCHANGES (CHANGED) -GET-ENVIRONMENT-AND-FILEMAP (FMFILEMAP FMENVIRONMENT FMFROMFILE? FMFILECREATEDLOC FMFILECREATEDLST) -SEDIT::CFV-QUOTE (SEDIT::WIDTH SEDIT::UNASSIGNED SEDIT::SUB-NODES SEDIT::INLINE-WIDTH -SEDIT::PREFERRED-WIDTH) OLD.FIND.SYMBOL (PNAMELENGTH PNAMEBASE PNAMEFATPADDINGBYTE FATPNAMEP) -%NUMERIC-STRING-P (OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) -\\TEDIT.PAPERWIDTH (TPSWIDTH) \\TEDIT.PAPERHEIGHT (TPSHEIGHT) FB.DELVERCOMMAND (TABLEBROWSER -TIUNSELECTABLE VERSION TIDATA SORTBY) \\NSFILING.GET.STREAM (FSCOURIERSTREAMS FSADDRESS FSPROCESSNAME) - TTNEXTLINE (NEXTLINE) \\TEDIT.WORDBOUND.READTABLE (READSA) COMPILEDREPLACEFIELD (|fdTypeName| -|fdType| |fdOffset|) SETFONT.IP (IPDATA IMAGEDATA IPPAGEFONTS) RPLCHARCODE (LENGTH FILL-POINTER -FATSTRINGP INDIRECT-P TYPE-NUMBER BASE XBASE OFFST OFFSET) EDITGRAPH2 (GRAPHNODES) MENUWINDOW ( -MENUROWS MENUCOLUMNS MENUOUTLINESIZE IMAGEWIDTH IMAGEHEIGHT) SYMBOL.PACKAGE (PACKAGEINDEX BASE) -\\UFS.UNREGISTER.GFS (FINFOID) SLICEDIMENSION (SELECTEDDIMS) FILES.PUTDEF (FILEPROP TOBEDUMPED -FILEDATES) \\CURVESLOPE (XCOORD YCOORD SPLINEDX SPLINEDY) \\MAKEFRAME (DEFPOINTER LSTARP NA STARTPC) -NSOCKETEVENT (NSOCEVENT) \\NSFILING.DELETEFILE (NSHBUSYCOUNT NSHDIRECTORYP NSHDATUM FSCACHEDHANDLES) -\\SET.VMEM.FULL.STATE (|NActivePages| |Key|) TTECHO.TO.FILE (END START CPXREALCHAR CPXNCHARS NEXTLINE) - TWODINSPECTW.CREATE (LEFT BOTTOM WIDTH HEIGHT XCOORD YCOORD) TIMESPOW10 (EXP HI LO) DIGITSBDP (HINUM -LONUM SIGNBIT LOFRACTION HIFRACTION EXPONENT) \\SETIOPOINTERS (|MachineType| |ScreenWidth| DLMOUSEXPTR - DLMOUSEYPTR DLCURSORXPTR DLCURSORYPTR DLUTILINPTR DLKBDAD0PTR DLKBDAD1PTR DLKBDAD2PTR DLKBDAD3PTR -DLKBDAD4PTR DLKBDAD5PTR DLDISPINTERRUPTPTR DLCURSORBITMAPPTR) \\UNVISIBLE.PAGED.REVALIDATEFILELST ( -OPENFILELST USERVISIBLE UNREGISTERFILE) \\SELITEM.FROM.PROPERTY (ITEMINFO ITEMINFOTYPE) HASH-COMMA ( -COMMONLISP) \\FAULTINIT (|MachineType| |FPTOVPStart| |FullSpaceUsed| |DL24BitAddressable| -|NActivePages| CCODEP) \\D01.FAULTINIT (REALPAGETABLEPTR RPTSIZE |RVersion|) -\\UNVISIBLE.FLUSH.OPEN.STREAMS (OPENFILELST USERVISIBLE ACCESSBITS FORCEOUTPUT) PRINTDATE (FILECHANGES - FILEDATES FILEDATE DATEFILENAME) \\10MB.INPUT.INTERRUPT (SYSQUEUEHEAD NDBIQ EPNETWORK 10MBPACKETBASE -EPRECEIVING) NSOCKETNUMBER (ID#) \\MAIKO.PUNTBLTCHAR (DDCHARSET |DDSlowPrintingCase| DDXPOSITION -DDCHARIMAGEWIDTHS |DDRightMargin| |DDLeftMargin| DDWIDTHSCACHE DDXOFFSET |DDClippingRight| -|DDClippingLeft| PBTHEIGHT DDPILOTBBT) COMPILEDFETCHFIELD (|fdTypeName| |fdType| |fdOffset|) -SPY.UPDATE.TITLE (GRAPHNODES NAME NODEID COUNT SUM) \\TEDIT.SUPERSCRIPT.CARET (CARETLOOKS) -\\LEAF.READFILENAME (PFSOSTYPE) SLICEREF (LINEARIZEDARRAY OFFSETS OFFSETCONSTANT) SQRT (EXP HIFRAC) -GET.OBJ.FROM.USER (SEL) GETXIP (INQUEUE INQUEUELENGTH NSOCEVENT EPTYPE) DSPBACKCOLOR (IMBACKCOLOR -IMAGEOPS) PRETTYDEF (FILECHANGES) DSPBOTTOMMARGIN (IMBOTTOMMARGIN IMAGEOPS) -LOOKUP-ENVIRONMENT-AND-FILEMAP (FMENVIRONMENT FMFILEMAP FMFILECREATEDLOC FMFILECREATEDLST) SEDIT::CFV-LIST - (SEDIT::UNASSIGNED SEDIT::NON-STANDARD? SEDIT::LIST-FORMATS SEDIT::CFVLIST SEDIT::LIST-PFORMAT -SEDIT::SPACE-WIDTH SEDIT::WIDTH SEDIT::LPAREN-STRING SEDIT::SUB-NODES SEDIT::NODE-TYPE -SEDIT::PREFERRED-WIDTH SEDIT::INLINE-WIDTH SEDIT::MAX-WIDTH) \\FILEMAP-HASHOVERFLOW (FMROOTNAME -FMFILECREATEDLST FMRECENT?) \\TEDIT.PARSE.CHARLOOKS.LIST (CLFONT CLOFFSET) |\\UFSGenerateFiles| ( -DEVICENAME) CHECKFORCHANGED (KNOWN) \\COPYDATATYPE (DTDPTRS DTDSIZE) FLUSHFILEMAPS (FMROOTNAME) FLTSTR - (HINUM LONUM SIGNBIT LOFRACTION HIFRACTION EXPONENT) |\\UFSDirectoryNameP| (DEVICENAME) DRAWLINE ( -IMDRAWLINE IMAGEOPS) |\\LFOpenFile| (FILEDESC F1 FULLFILENAME |TimeCreate| LEADERPAGE F2) PRETTYCOM ( -MACRO GETDEF) |\\UFSWritePages| (CPAGE CBUFMAXSIZE COFFSET EPAGE EOFFSET FILEID F1) DSPCOLOR (IMCOLOR -IMAGEOPS) \\DOVE.FAULTINIT (|Key| |NActivePages| |DLLastVmemPage|) MOVETO (IMMOVETO IMAGEOPS) -|\\UFSOpenFile| (DEVICENAME FILEID F1 UNIXNAME F5 ACCESSBITS) CHAT.TYPESCRIPT (TYPEOUTPROC) -TERM.ADDLINE (DSP TTYWIDTH FONTHEIGHT YPOS FONTDESCENT) |\\UFSReadPages| (FILEID F1 EPAGE EOFFSET) -DSPCLIPPINGREGION (IMCLIPPINGREGION IMAGEOPS) SEDIT::BACKSPACE-LIST (SEDIT::CARET-POINT SEDIT::SUB-NODES - SEDIT::SELECTION SEDIT::BACK-SPACE SEDIT::NODE-TYPE) OPT.NOTJUMP (OPNAME OPARG) CRITSECT (REST LX RX -TY) FB.DELETE.FILE (TIDELETED DELETEDFILES SIZE TIDATA DELETEDPAGES) \\HANDLE.RAW.PACKET (EPTYPE) -DINFO.SETUP.WINDOW (NAME) |\\UFSGetFileInfo| (DEVICENAME UNIXNAME F5) POSTSCRIPT.PUTBITMAPBYTES ( -BITMAPWIDTH BITMAPHEIGHT BITMAPBASE BITMAPRASTERWIDTH BASE) MB.THREESTATE.SHOWSELFN (XSIZE YSIZE SET) -GETMENUITEM (ITEMS MENUROWS MENUCOLUMNS) \\TEDIT.ITALIC.CARET.ON (CARETLOOKS) \\FIXPASSWORD (SEQNAME) -|\\LFGenerateFiles| (VOL NAME OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP -TYPE-NUMBER VERSION |LVlabel| VOLUME |volNum| FILEDESC F1) \\D01.ASSIGNBUFFERS (EMBUFVP EMUBUFFERS -EMUBUFLENGTH) \\COPYSEL (Y0 X0 DX CH# XLIM CHLIM DCH L1 LN YLIM POINT SET \\TEXTOBJ SELKIND HOW -HOWHEIGHT HASCARET SELOBJ ONFLG) \\NSRANDOM.PREPARE.CACHE (NSFILING.PAGE.CACHE F1 NSPSIZE NSPHEADER -NSPTAIL) \\SPPWATCHER (SPPACTIVITYTIMER SPPLOCK SPPMYNSOCKET SPPTERMINATEDP SPPESTABLISHEDP -SPPDESTINATIONKNOWN SPPRETRANSMITTIMER SPPRETRANSMITTING SPPACKPENDING SPPACKREQTIME SPPACKREQUESTED -SPPACKREQTIMEOUT SPPSEQNO SPPACKEDSEQNO SPPOUTPUTALLOCNO) INCORNER.REGION (LEFT BOTTOM RIGHT WIDTH) -|\\LFExtendFileIfNecessary| (|size| FILEDESC F1 FULLFILENAME) OPT.CHECKTAG (LEVEL) SEDIT::STRINGIFY-COMMENT - (SEDIT::UNASSIGNED) TERM.DOWN (DSP XPOS YPOS FONTHEIGHT BOTTOMMARGIN FONTDESCENT ROLLMODE HOMEPOS -TOPMARGIN) DIRPRINTNAME (STRINGNAME) TTDELETECHAR (END START) \\PARSE.PORTCONSTANT (OFFST INDIRECT-P -OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) |\\VFMSplit1| (|key| |used| |data|) -TEDIT.INCLUDE (SEL TXTREADONLY SET TEXTLEN FMTSPEC FORMATTEDP PCTB POINT CH# CHLIM TOTLEN \\WINDOW -\\XDIRTY TXTFILE) SETRGB.IP (IPCOLORMODEL IMAGEDATA) FM.CHANGESTATE (FM.USERDATA LEFT BOTTOM) -GRAPHDELETENODE (GRAPH.DELETENODEFN GRAPHNODES) |\\UFSCloseFile| (DEVICE UNIXNAME F5 ACCESSBITS -TRUNCATEFILE CDATE F2 FILEID F1 FULLFILENAME) TTDELETEWORD (START) \\TEDIT.PARSE.PARALOOKS.LIST ( -TABSPEC) TEDIT.GET (SEL PCTB \\DIRTY \\XDIRTY PROMPTWINDOW STREAMHINT \\WINDOW DEFAULTCHARLOOKS -FMTSPEC LINES TXTFILE TOTLEN SCRATCHSEL SHIFTEDSEL MOVESEL YBOT) |\\UFSDeleteFile| (DEVICENAME) -EDITDELETENODE (GRAPHNODES) PRINT-READER-ENVIRONMENT (RESPEC) \\FIXLOCALNET (NDBPUPNET#) -\\NSRANDOM.FETCH.CACHE (NSFILING.PAGE.CACHE F1 NSPHEADER NSPTAIL) \\MEDW.CARET.SHOW (STREAM IMAGEDATA -CURSOR CUIMAGE STREAMX STREAMY BITMAPWIDTH BITMAPHEIGHT |DDClippingRegion| LEFT WIDTH BOTTOM HEIGHT -DDXOFFSET DDYOFFSET) |\\LFReturnNextFile| (RESTOFFILES FULLNAME CURRENTFILE) DSPLINEFEED (IMLINEFEED -IMAGEOPS) SEDIT::CREATE-COMMENT-WORD-NODE (SEDIT::COMMENT-FONT) DMCHAT.NEWLINE (YPOS DSP) -\\10MB.OUTPUT.INTERRUPT (SYSQUEUEHEAD NDBTQ EPNETWORK) D-ASSEM::MAX-ARG (OP#) \\TEDIT.APPLY.PARALOOKS -(\\TEXTOBJ CH# SCRATCHSEL MARL1 MARUNIT MARLN MARR MARTABS SEL DCH) \\BN.FROM.FIXP (ELEMENTS) -\\PS.BOUTFIXP (BASE POSTSCRIPTTEMPARRAY IMAGEDATA) |\\LFRemoveDirEntry| (DIRINFO F4 EOFP DEVICE) -MB.THREESTATEBUTTON.FN (\\TEXTOBJ) \\TEDIT.SUBSCRIPT.CARET (CARETLOOKS) \\CLOSELEAFCONNECTION (SEQNAME - DEVICEINFO) \\FM.EDIT-DELETE (FM.USERDATA BOTTOM LEFT WIDTH HEIGHT FM.LABEL) SCROLLW (SCROLLFN) -SEDIT::ASSIGN-FORMAT-QUOTE (SEDIT::SUB-NODES CL:STRUCTURE) \\UFS.FULLNAME (DEVICENAME) DSPRIGHTMARGIN -(IMRIGHTMARGIN IMAGEOPS) TB.MAP.SELECTED.ITEMS (TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM TISELECTED) -|\\LFDirectoryNameP| (VOL |LVlabel| NAME) \\UFS.OPENP (OPENFILELST DEVICENAME UNIXNAME F5) -\\FTP.OPENFILE.FROM.PLIST (FTPIN FTPOUT) \\NSFILING.EVENTFN (OPENFILELST DEVICE ACCESSBITS -FULLFILENAME NSRANDOMDEVICE DEVICEINFO) |\\UFSTruncateFile| (EPAGE EOFFSET GETFILEPTR DEVICE FILEID F1 - UNIXNAME F5) TB.SHOW.COPY.SELECTION (TBWINDOW) |\\LFReturnInfo| (INFO CURRENTFILE ATTRIBUTES) -\\UFS.ADD.HOST.FIELD (DEVICENAME) OPT.JUMPCHECK (OPNAME) TERM.DELCHAR (DSP TTYWIDTH XPOS FONTWIDTH -FONTHEIGHT YPOS FONTDESCENT) \\DL.FAULTINIT (|Key| DLTODVALID DLTODLO DLTODHI DLPROCESSORCMD -DLPROCESSOR0 DLPROCESSOR1 DLPROCESSOR2 |DLLastVmemPage|) \\FM.EDIT-WORDDELETE (FM.LABEL LEFT) -VERBNOTICELIST (VB1 VB2 ROOT MODIFIER) GETSYNTAX (READSA BREAK TERMSA TERMCLASS READMACRODEFS -MACROTYPE VAL MACROCONTEXT WAKEUP ESCAPE) \\M44ACTONVMEMFILE (ISFLAST) |\\VFMCreateVPage| ( -|volumePage|) \\DEVICEFILE.EOSERROR (ACCESS FULLNAME FULLFILENAME BUFFS VMEMPAGE FILEID F1) -SEDIT::SELECT-NODE-SEGMENT (SEDIT::SELECTION SEDIT::CARET-POINT) \\UFS.REMOVE.HOST.FIELD (DEVICENAME) -SEDIT::ASSIGN-FORMAT-LIST (SEDIT::NON-STANDARD? SEDIT::LIST-FORMATS SEDIT::SET-FORMAT-LIST -SEDIT::LIST-INLINE? SEDIT::SUB-NODES SEDIT::NODE-TYPE) \\GETREADSYNTAX (NSCHARHASH READSA -READMACRODEFS MACROTYPE KEY MACROCONTEXT WAKEUP ESCAPE MACROFN) CL:ARRAY-DIMENSIONS (TOTAL-SIZE BOUND0 - BOUND1 DIMS) TEDIT.BUILD.PCTB (STREAMHINT FMTSPEC EOLCONVENTION PLEN PLOOKS PPARALOOKS NEXTPIECE -TXTCHARLOOKSLIST TXTPARALOOKSLIST DEFAULTCHARLOOKS CARETLOOKS) FB.UPDATE.COUNTERS (COUNTERWINDOW -COUNTERPOSITIONS TOTALFILES TOTALPAGES DELETEDFILES DELETEDPAGES COUNTERPAGESTRING SHOWUNDELETED?) -\\INIT.POWERS.OF.TEN (EXP HI LO) \\UPDATE.PSC (POSTSCRIPTPENDINGXFORM POSTSCRIPTFONTCHANGEDFLG -POSTSCRIPTMOVEFLG) \\SEND.ANSWERING.RFC (RTPSTATE PUPID PUPCONTENTS PUPSOC) \\TEDIT.COPYINSERTFN (SEL) - POSTSCRIPT.SHOWACCUM (IMAGEDATA POSTSCRIPTCHARSTOSHOW POSTSCRIPTSPACEFACTOR POSTSCRIPTSPACEWIDTH -POSTSCRIPTNATURALSPACEWIDTH) DSPSCALE (IMSCALE IMAGEOPS) DSPSPACEFACTOR (IMSPACEFACTOR IMAGEOPS) -ASKUSER1 (KEYLST KEY) CL:BIT-VECTOR-P (BIT-P) DSPFONT (IMFONT IMAGEOPS) \\BLTSHADE.GENERICPRINTER ( -WIDTH HEIGHT LEFT BOTTOM) \\GETTERMSYNTAX (TERMCLASS NSCHARHASH TERMSA) DSPXPOSITION (IMXPOSITION -IMAGEOPS) \\TEDIT.SELECT.ALL (TEXTLEN) \\LEAF.ERROR (PUPCONTENTS LEAFERRORCODE FULLFILENAME PUPLENGTH -LEAFERROROPCODE) CENTERPRINTINREGION (LEFT BOTTOM WIDTH HEIGHT) DSPRESET (IMRESET IMAGEOPS) -COMP.SETARG (OPARG OPNAME) DSPYPOSITION (IMYPOSITION IMAGEOPS) TTYINENTRYFN (TTOLDRIGHTFN) \\INITBFS ( -SYSDISK DDHEADER CBQUEUE CBNEXT DD#DISKS DD#TRACKS DD#HEADS DD#SECTORS ISFMAP ISFEND ISFCHUNKSIZE -FPVERSION) \\GETFILINGCONNECTION (DEVICEINFO NSFILINGLOCK NSCONNECTIONS FSSESSIONLOCK) -\\DSKDISPLAY.REPAINTFN (|LVlabel| |volumeSize| |freePageCount|) START.OF.PARAGRAPH? (END START -CPXREALCHAR) \\LOOKUPPORT (PUPTYPE PUPLENGTH PUPCONTENTS NETHOST SOCKET) DSPOPERATION (IMOPERATION -IMAGEOPS) \\SPP.SENDPKT (SPPACKNO SPPACCEPTNO XIPCONTENTS SENDACK SEQNO SPPACKREQUESTED SPPACKREQTIME -SPPROUNDTRIPTIME SPPACKREQTIMEOUT SPPMYNSOCKET SPPRETRANSMITTING SPPRETRANSMITTIMER) -\\TEDIT.CARETLOOKS.VERIFY (CARETLOOKS DEFAULTCHARLOOKS) WINDOWSIZE (WIDTH HEIGHT) -\\NSRANDOM.RELEASE.HANDLE (NSFILING.HANDLE F4 NSFILING.CONNECTION F3 NSHBUSYCOUNT NSHACCESS) DSPROTATE - (IMROTATE IMAGEOPS) \\NSRANDOM.READ.SEGMENT (NSFILING.CONNECTION F3 EPAGE EOFFSET NSFILING.HANDLE F4 -ACCESSBITS NSFILING.SERVER.LENGTH F2 NSHDATUM NSHWASREAD NSHATTRIBUTES) \\MAIKO.DO.MOVDS ( -DEFINITIONCELL DEFPOINTER DEFCELLFLAGS AUXDEFCELLFLAGS) NEARTOP (TOP) \\UFS.DIRECTORY.NAME (DEVICENAME -) SEDIT::SIMPLE-STRING-SCAN (STRING SEDIT::FONT) WINDOWWORLD (SCONOFF SCDESTINATION SCTITLEDS) -\\NSFILING.DISCARD.SESSION (NSCONNECTIONS DEVICEINFO FSCOURIERSTREAMS FSSESSIONLOCK) COMP.ARG (OPNAME -OPARG OP#) MAKEFILE1 (TOBEDUMPED FILEPROP) SCROLL.HANDLER (VERTSCROLLREG VERTSCROLLWINDOW -HORIZSCROLLREG HORIZSCROLLWINDOW) \\COERCEASCIITONSFONT (BASE FONTCHARSETVECTOR WIDTHS) -|\\UFSSetFileInfo| (DEVICENAME UNIXNAME F5) DSPTOPMARGIN (IMTOPMARGIN IMAGEOPS) \\ALLOCMINIMUMSIZES ( -ATEDGE ATMINY ATNOWY ATNOWX ATMINX ATXSIZE ATYSIZE) \\STRINGOUT (OFFST INDIRECT-P OFFSET BASE XBASE -LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) DSPPOPSTATE (IMPOPSTATE IMAGEOPS) \\SEND.ENDREPLY (PUPSOC) - OPENNSOCKET (ID# LONUM) SEDIT::SET-SELECTION-COMMENT-WORD (SEDIT::SUPER-NODE SEDIT::SUB-NODE-INDEX -SEDIT::LINEAR-FORM) FB.DELETECOMMAND (TABLEBROWSER) \\M-VMEMSAVE (|NActivePages| |Key| |MiscFXP|) -\\FM.EDIT-BACKUP (LEFT FM.LABEL) MSINTERPRET (ID TYPE DEFAULTTYPE SETNAME OTHERSTUFF SUBJECT MSPRED -MSVERB REP OTHERSET TENSE VPART MSPATHOPTIONS OUTPUT LINELENGTH TO FROM AVOIDING SEPARATE NOTRACE -MARKING) \\MAIKO.ASSIGNBUFFERS (PAGE#) SETCOLOR16.IP (BITMAPBASE) TEDIT.PAGEFORMAT (REGIONFILLMETHOD -\\XDIRTY TXTFILE) TRIM.BITMAP (BITMAPWIDTH BITMAPHEIGHT) \\SETTERMSYNTAX (TERMSA NSCHARHASH) SKIP/ZAP -(END) |\\UFSRenameFile-C| (DEVICENAME) \\FLUSHNSOCQUEUE (INQUEUE) \\SETREADSYNTAX (NSCHARHASH READSA -BREAK MACROP READMACRODEFS) CHAT.TYPEOUT (INSTREAM TERM.STATE HELD TYPESCRIPTSTREAM READ) -POSTSCRIPT.CLOSESTRING (IMAGEDATA POSTSCRIPTCHARSTOSHOW) DINFO.TITLEMENUFN (MONITORLOCK MENUFN -FMENU.WINDOW) OPT.JFIXPASS (JPT JMIN JD OPARG) TERM.LEFT (XPOS FONTWIDTH YPOS DSP) DIRFILENAME ( -LITERALNAME STRINGNAME) DSPSCALE2 (IMSCALE2 IMAGEOPS) \\NSFILING.CLOSEFILE (DEVICE NSFILING.CONNECTION - F3 NSFILING.HANDLE F4 ACCESSBITS FULLFILENAME NSFILING.NEW.ATTRIBUTES F5 NSHATTRIBUTES NSHDATUM) -\\NSRANDOM.CHECK.CACHE (NSPSIZE NSPBUFFERS NSPTAIL) NEARESTCORNER (LEFT RIGHT WIDTH BOTTOM TOP) -|\\UFStoOtherRenameMess| (DEVICENAME) SEDIT::SIMPLE-STRING-OFFSET (STRING SEDIT::FONT) -\\TEDIT.GET.INSERT.CHARLOOKS (PCTB TEXTLEN POINT CH# CHLIM DEFAULTCHARLOOKS PCE CHNUM CLPROTECTED -PLOOKS) \\NSFILING.LOGIN (NSFILESERVER NSFILINGNAME NSFSPARSEDNAME NSFSADDRESSES DEVICENAME -NSCONNECTIONS NSRANDOMDEVICE FSNAMESTRING) \\RTP.ERROR (RTPSTATE) SYNTAXP (BREAK NSCHARHASH READSA -TERMCLASS TERMSA READMACRODEFS MACROTYPE VAL MACROCONTEXT WAKEUP ESCAPE) DSPLEFTMARGIN (IMLEFTMARGIN -IMAGEOPS) \\MAPCHARTABLE (NSCHARHASH) START.NEW.LINE (START) \\TEXTSTREAM.FILENAME (TXTFILE -FULLFILENAME) FTP.BREAKCONNECTION (FTPHOST FTPBUSY FTPIN) \\NSFILING.UPDATE.ATTRIBUTES (NSHATTRIBUTES) - \\TRANSMIT.STRATEGY (ACKREQUESTED PUPALLOC BYTEALLOC BYTESPERPUP \#UNACKEDPUPS LASTADATATIME -ADATACOUNT PUPTYPE) DSPTRANSLATE (IMTRANSLATE IMAGEOPS) \\DOCOMPRESSVMEM (|NActivePages|) CONTROL ( -CONTROLFLG) DSPDEFAULTSTATE (IMDEFAULTSTATE IMAGEOPS) TB.RECONSIDERRANGE (TISELECTED) -DINFO.GET.FILENAME (FILE DEFAULTHOST DEFAULTDEVICE DEFAULTDIR) OPT.JLENPASS (JPT JMIN JU JD OPARG JSN -JML) COPYATOM (BASE XBASE INDIRECT-P OFFST OFFSET) TERM.ERASE.TO.EOL (XPOS YPOS FONTDESCENT TTYWIDTH -FONTHEIGHT) DIRGETFILEINFO (FILEGENERATORS) \\10MB.BROADCASTP (10MBMULTICASTP) DSPNEWPAGE (IMNEWPAGE -IMAGEOPS) ONFILE (FILEPKGNAME) \\GETBRUSHBBT (BITMAPHEIGHT BITMAPWIDTH BITMAPRASTERWIDTH -|DDDestination| DDSOURCETYPE DDOPERATION) \\MEDW.GETSCREENREGION (LEFT WIDTH BOTTOM HEIGHT XCOORD -YCOORD) \\LEAF.GETFILEDATES (LEAFINFO F4) TEDIT.SHOWSEL (TEXTOBJ F3 SEL) -\\UFS.HANDLE.RELATIVEDIRECTORY (DEVICENAME) \\BUILDATWSTRUCTURE (WIDTH HEIGHT ATWHEREONEDGE) -\\TEDIT.PARABOUNDS (PCTB TEXTLEN PLEN NEXTPIECE PPARALAST PREVPIECE) COPYTERMTABLE (TERMSA) -INVERT.BITMAP.VERTICALLY (BITMAPWIDTH BITMAPHEIGHT) \\LEAF.HANDLE.INPUT (PUPCONTENTS SEQDONEQ -SEQINPUTQLENGTH ANSWERBIT SEQNAME LEAFOPCODE LEAFERROROPCODE LEAFALLOWERRORS EPFLAGS LEAFERRORCODE -EPUSERFIELD LEAFERRORCNT FW7 LEAFANSWERWANTED) \\DL.NEWFAULTINIT (|NRealPages| FPOCCUPIED -FPVIRTUALPAGE RPTRBASE |NActivePages| UNAVAILABLE VP VACANT) |\\PFTrimHelper| (|size| |filePage|) -DELETECONTROL (DELCHARECHO LINEDELETE 1STCHDEL NTHCHDEL POSTCHDEL EMPTYCHDEL) \\CHAIN.UP.RPT ( -UNAVAILABLE VP EMPTY NEXTRP) |\\LFFindNextFile| (GETFILEPTR DEVICE) DINFO.OPENTEXTSTREAM (LAST.TEXT) -CHAT.EMACS.MOVE (EMCOL0 YCOORD EMARG EMUP EMDOWN XCOORD EMFORWARD WINDOW XPOS FONTWIDTH OUTSTREAM YPOS - FONTHEIGHT) DMCHAT.CLEAR (WINDOW) TYPESOF (LOADTYPE) \\VALID.FILING.CONNECTIONP (FSLOGINCHANGED -FSNAMESTRING FSLOGINNAME FSCOURIERSTREAMS FSSESSIONTIMER FSCONTINUANCE) \\DSKDISPLAY.CREATE.WINDOW ( -XCOORD YCOORD LEFT BOTTOM) \\SEND.ABORT (PUPCONTENTS RTPSTATE PUPSOC) BESTPUPADDRESS (PUPNET# -RTHOPCOUNT) |\\VFMMerge1| (|volumePage| |used| |key|) |\\UFSDeleteFile-C| (DEVICENAME) -|\\LFHighestVersions| (NAME) MB.CREATE.THREESTATEBUTTON (XSIZE YSIZE) \\TOTALFIXEDHEIGHT ( -ATWHEREONEDGE ATEDGE ATMINY ATMAXY) EDITCHANGELABEL (GRAPHNODES) DELETELINE (NEXTLINE END ROW START) -TEDIT.INSERT.OBJECT (SEL POINT CH# CHLIM PCTB TXTREADONLY TEXTLEN TEXTOBJ F3 \\WINDOW PREVPIECE -PPARALAST NEXTPIECE PPARALOOKS FMTSPEC CARETLOOKS PLEN \\XDIRTY TXTFILE THISLINE) NORMSECT (GEOM P X -IX IPX IPY MAJOR) ASKUSER$ (KEY) GETBOXSCREENREGION (SCREEN XCOORD YCOORD) \\BUILD.EXPEDITED.XIP ( -PACKETEXCHANGEBODY PROGRAM# VERSION# FN# ARGS COFFSET) SEDIT::SET-POINT-COMMENT-WORD (SEDIT::SUPER-NODE - SEDIT::SUB-NODE-INDEX SEDIT::LINEAR-FORM) \\TEDIT.WINDOW.SETUP (TXTFILE \\DIRTY \\XDIRTY MENUFLG) -|\\PFVersionOK| (|version|) \\INSPECTW.REDISPLAYPROP (SELECTABLEITEMREGION) SHEDSCAN (REST X Y WIND) -\\NSRANDOM.ENSURE.WATCHER (DEVICEINFO NSWATCHERPROC NSFILINGNAME) PRINTLEAF (PUPLENGTH SEQCONTROL -PUPBASE ALLOCATE RECEIVESEQ SENDSEQ PUPCONTENTS LEAFOPCODE ANSWERBIT OPCODE EOFBIT LEAFLENGTH HANDLE -LOADDR DATALENGTH) TB.CONSIDERRANGE (TIUNSELECTABLE TIDELETED) |\\LFFindInfo| (INFO |volNum| FILEDESC -F1) CHAT.HOLD (HELD) TERM.ADDCHAR (DSP XPOS YPOS FONTDESCENT FONTWIDTH FONTHEIGHT TTYWIDTH) -\\STORENSHOSTNUMBER (NSHOST0 NSHOST1 NSHOST2) DRAWCIRCLE (IMDRAWCIRCLE IMAGEOPS) BIGNUM.DEFPRINT ( -HASHMACROCHAR ELEMENTS COMMONLISP CHARPOSITION) ERASEMENUIMAGE (LEFT MENUGRID MENUOUTLINESIZE BOTTOM -IMAGEWIDTH IMAGEHEIGHT) GETDELETECONTROL (DELCHARECHO LINEDELETE 1STCHDEL NTHCHDEL POSTCHDEL -EMPTYCHDEL) \\TEDIT.BASICFIND (SEL TEXTLEN STREAMHINT SET POINT CH# CHLIM) \\SPP.CREATE.STREAMS ( -DEVICEINFO) INVERT.BITMAP.HORIZONTALLY (BITMAPWIDTH BITMAPHEIGHT) \\LEAF.ACKED (SEQDONEQ -SEQINPUTQLENGTH) ECHOCHAR (TERMSA CCECHO NSCHARHASH) MAKEFILE (TOBEDUMPED FILEDATES LOADTYPE FILEDATE -DATEFILENAME FILECHANGES COMSNAME) EQP (EDFXP) \\NSPRINT.COURIER.OPEN (NSPRINTERADDRESS NSOBJECT -NSPRINTERNAME) \\NSRANDOM.STREAM.CHANGED (ACCESSBITS ACCESS NSHATTRIBUTES) |\\LFSortFiles| (NAME -VERSION) |\\LFWriteLeaderPage| (VOLUME |volNum| FILEDESC F1 LEADERPAGE F2) \\SETBSPTIMEOUT ( -INTERRUPTOUT \#UNACKEDPUPS PUPALLOC BYTEALLOC BYTESPERPUP RTPPROCESS ACKREQUESTED ADATATIMEOUT -BSPTIMER) CREATE.PACKET.EXCHANGE.XIP (XIPCONTENTS) \\SEND.RFC (CONNID PUPSOURCE PUPCONTENTS PUPSOC) -\\MEDW.GETSCREENPOSITION (SCREEN) TEXTSTREAM.TITLE (TXTFILE) \\TOTALFIXEDWIDTH (ATWHEREONEDGE ATEDGE -ATMINX ATMAXX) GRAPHCHANGELABEL (GRAPH.CHANGELABELFN) \\BSP.SENDBUFFER (BSPSOC F1 COFFSET XMITBYTEID -ADATACOUNT BSPFILEPTRLO FW7 BSPFILEPTRHI FW6 \#UNACKEDPUPS \#UNACKEDBYTES PUPALLOC BYTEALLOC -BSPOUTPUTQ PUPSOC) \\UFS.REGISTER.GFS (FINFOID) ASKUSERSETUP (KEY PROMPTSTRING OPTIONS) -\\CARET.FLASH.AGAIN (RATE NEXT) \\TEDIT.FIND.FIRST.LINE (LINES WRIGHT STREAMHINT TEXTLEN FORMATTEDP -CHARLIM) \\SEND.EXPEDITED.XIP (PACKETEXCHANGEID XIPCONTENTS XIPTYPE LOWVERSION PACKETEXCHANGEBODY -HIGHVERSION MSGTYPE ERRORXIPCODE) SEDIT::SET-POINT-COMMENT (CL:STRUCTURE SEDIT::LINEAR-FORM -SEDIT::DESTINATION SEDIT::SUB-NODE-INDEX) ECHOMODE (ECHOFLG) TEDIT.MINIMAL.WINDOW.SETUP (SEL CARET -\\WINDOW LCBITMAP DISPLAYCACHE DISPLAYCACHEDS PTOP BOTTOM HEIGHT RIGHT LEFT WIDTH LINES) -SEGMENT.BIT.LENGTH (CPXWIDTH) COLLECT.CHILD.NODES (TONODES GRAPHNODES) DSPPUSHSTATE (IMPUSHSTATE -IMAGEOPS) GETECHOMODE (ECHOFLG) SHOW.MATCHING.PAREN (ROW START FIRSTCOL) MBUTTON.SET.FIELD (PCTB CHNUM - CH# DCH POINT) \\SHAREOFXTRAX (ATNOWX ATXSIZE) EDITCHANGEFONT (GRAPHNODES) GETCONTROL (CONTROLFLG) -\\UFS.FILEINFOFN (PROPP FINFOID THISFILE LENGTH PROTECTION WDATE RDATE AUTHOR AULEN) DRAWBETWEEN ( -IMDRAWLINE IMAGEOPS XCOORD YCOORD) RAISE (RAISEFLG) \\10MBENCAPSULATE (10MBDESTHOSTBASE -10MBSOURCEHOSTBASE) D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL (OVERHEADWORDS) \\COERCE.NS.SOCKET (NSSOCKET -) SPY.TITLE (NAME) GETRAISE (RAISEFLG) GETSCREENREGION (SCGETSCREENREGION) \\EVAL-INVOKE-LAMBDA ( -NEXTBLOCK) \\SPP.DEFAULT.ERRORHANDLER (FULLFILENAME SPPINPUTDSTYPE) INVERT.BITMAP.DIAGONALLY ( -BITMAPWIDTH BITMAPHEIGHT) \\TEDIT.UCASE.SEL (CH# DCH POINT TXTHISTORY) \\LEAF.FIX.BROKEN.SEQUIN ( -SEQSTATE SEQRETRANSMITQ SEQDONEQ SEQNAME SYSQUEUEHEAD SYSQUEUETAIL EPLINK LEAFOPCODE PUPCONTENTS -SEQSOCKET OPENP LEAFCONNECTION F1 LEAFABORTSTATUS SEQTIMER LEAFABORTBUTTONWINDOW SEQEVENT EPUSERFIELD -FULLFILENAME) \\FTP.GENERATEFILES (FTPIN FTPOUT GENFILESTATE FTPGENCONNECTION) DINFO.FMW.CLOSEFN ( -SUBNODE.MENU.WINDOW HISTORY.MENU.WINDOW GRAPH.WINDOW) \\DL.MARK.PAGES.UNAVAILABLE (RPTRBASE) DRAWCURVE - (IMDRAWCURVE IMAGEOPS) \\SEND.END (PUPSOC) \\COPYSYNTAX (NSCHARHASH) SETTAIL? (ROW) SETTERMTABLE ( -TERMSA) RESETTERMTABLE (TERMSA RAISEFLG DELCHARECHO LINEDELETE 1STCHDEL NTHCHDEL POSTCHDEL EMPTYCHDEL -CONTROLFLG ECHOFLG) \\UFS.NEXTFILEFN (SUBGENERATORS FINFOID FILEID PROPP TOTALNUM DEVICENAME DIRECTORY - NAME DEV MAX-DEPTH CURRENT-DEPTH THISFILE GENFILESTATE) \\DL.UNMAPPAGES (FPOCCUPIED FPVIRTUALPAGE) -DRAWELLIPSE (IMDRAWELLIPSE IMAGEOPS) |\\PFPutMarkerPage| (|subVolumes|) \\DL.ASSIGNBUFFERS (PAGE#) -DRAWARC (IMDRAWARC IMAGEOPS) |\\LFNormalizeVolumeName| (VOL) CHAT.SET.EMULATOR (TYPEOUTPROC INSTREAM) -TB.CONTIGUOUS.SELP (TISELECTED TIDELETED TIUNSELECTABLE) DRAWPOLYGON (IMDRAWPOLYGON IMAGEOPS) -CHAT.MENU (INSTREAM LOCALECHO) DMCHAT.RIGHT (XPOS FONTWIDTH TTYWIDTH YPOS DSP) SLICERANK (SELECTEDDIMS -) \\NSPRINT.UNSUPPORTED (NSPRINTERNAME) \\DSPXPOSITION.PSC (IMAGEDATA POSTSCRIPTX POSTSCRIPTY) -COMP.MLLFN (OPARG) TREEGRAPHNODE (NODEID PCE LO HI BF RANK CHNUM) DINFO.CREATE.FMENU (FREEMENUITEMS -MENUFONT) \\BSP.FLUSH.SOCKET.QUEUES (BSPOUTPUTQ BSPINPUTSTREAM BSPCURRENTPUP BSPOUTPUTSTREAM F2 F3) -FASL::DUMP-BITMAP (BITMAPBASE) ROTATE.BITMAP.RIGHT (BITMAPWIDTH BITMAPHEIGHT) \\FTP.CLOSEFILE (ACCESS -FTPIN FTPOUT FULLFILENAME EOFP DEVICE FTPHOST) \\LEAF.TIMEDIN (LEAFABORTBUTTONWINDOW) |\\PFGetLVPage| -(|LVlabel|) COMP.GETBASE (OPNAME OPARG) FILLPOLYGON (IMFILLPOLYGON IMAGEOPS) COMP.MLLVAR (VARNAME -OPNAME) TERM.DELETELINE (DSP TTYWIDTH FONTHEIGHT BOTTOMMARGIN YPOS FONTDESCENT) \\BRUSHBITMAP ( -BRUSHARRAY BRUSHCACHE CREATEMETHOD) \\DO.PROGV (OVERHEADWORDS) GETSCREENPOSITION (SCGETSCREENPOSITION -SCREEN) RECURSIVE.COLLECTDESCENDENTS (NODEID) SCALEREGION (LEFT BOTTOM WIDTH HEIGHT) RESETREADTABLE ( -READMACROFLG ESCAPEFLG COMMONLISP NUMBERBASE CASEINSENSITIVE COMMONNUMSYNTAX USESILPACKAGE -HASHMACROCHAR ESCAPECHAR MULTESCAPECHAR PACKAGECHAR DISPATCHMACRODEFS READMACRODEFS READSA) -\\FAULTHANDLER (FAULTHI FAULTLO) \\FLUSHPUPSOCQUEUE (INQUEUE) \\TOTALPROPOSEDSIZE (ATMINX ATMINY -ATXSIZE ATYSIZE ATEDGE) \\PUT.SESSION.HANDLE (FSSESSIONHANDLE) D-ASSEM::START-PC-FROM-NT-COUNT ( -OVERHEADWORDS) SEGMENT.LENGTH (CPXNCHARS) \\FM.CREATEW (LEFT BOTTOM WIDTH HEIGHT) DRAWPOINT ( -IMDRAWPOINT IMAGEOPS) DRAWTO (IMDRAWLINE IMAGEOPS IMXPOSITION IMYPOSITION) \\SHAREOFXTRAY (ATNOWY -ATYSIZE) \\SETTYPEMASK (DTDTYPEENTRY) \\TEDIT.APPLY.STYLES (CLSTYLE TXTSTYLESHEET CURRENTPARALOOKS -STREAMHINT TICURPARALOOKS IMAGEDATA FMTCHARSTYLES) PRINTLINE (YBOT YBASE LHEIGHT ASCENT DESCENT CHAR1 -CHARLIM CHARTOP DIRTY CR\\END DELETED LHASPROT LHASTABS RIGHTMARGIN LXLIM SPACELEFT PREVLINE NEXTLINE -TEXTLEN STREAMHINT) |\\LFVersions| (CHARLIST VERSION GETFILEPTR DEVICE DIRHOLEPTR F5) -\\UFS.ABORT.DIRECTORY (FILEGENERATORS GENFILESTATE FINFOID) COMP.MLL (LBNO OPNAME OPARG TAG NVALS VARS -) SEDIT::SELECT-SEGMENT-COMMENT (SEDIT::SELECT-START) TERM.UP (YPOS HOMEPOS XPOS FONTHEIGHT DSP) -ESCAPE (ESCAPEFLG) \\RTP.HANDLE.RFC (PUPCONTENTS NET PUPSOURCENET RTPSTATE PUPDESTHOST NETHOST FRNPORT - SOCKETHI FRNSOCKETHI SOCKETLO FRNSOCKETLO PUPSOC) POSTSCRIPT.BITMAPSCALE (WIDTH HEIGHT) LASTC ( -LASTCCODE) \\ASSURE.FPTOVP.PAGE (|NActivePages|) \\TEDITMENU.SELSCREENER (\\WINDOW CH# DCH -EDITOPACTIVE) ROTATE.BITMAP.LEFT (BITMAPWIDTH BITMAPHEIGHT) \\LEAF.TIMEDOUT (LEAFABORTSTATUS -LEAFTIMEOUTSTATUS SEQSTATE SEQNAME) BSPBOUT (BSPOUTPUTSTREAM F2) \\PEEKREFILL (PEEKEDCHAR F3 RAISEFLG -KEYBOARDSTREAM F2) \\DSPYPOSITION.PSC (IMAGEDATA POSTSCRIPTY POSTSCRIPTX) CENTERINWIDTH (LEFT WIDTH) -CREATE-SHELL-STREAM (OPENFILELST) LAYOUTGRAPH (NODEPOSITION NODELABEL) \\SPP.SKIPBYTES ( -SPPERRORHANDLER CBUFSIZE COFFSET) \\LOOKUPPAGEMAP (PRIMARYKEY SECONDARYKEY) RATOM (USESILPACKAGE -READSA CASEINSENSITIVE BASE) CRIT.LESSP (BY) \\LEAF.RECONNECT (DEVICEINFO PFSLEAFSEQUIN SEQSTATE -PFSNAME) COMP.MLLIST (ARGS COMTYPE CODE) \\SUBREAD (XBASE INDIRECT-P BASE NSCHARHASH NOTXCCS INCCODEFN - STOPATOM PEEKCCODEFN MACROCONTEXT READMACROFLG ESCAPEFLG BACKCHARFN EOLCONVENTION EOFP DEVICE OFFST -OFFSET LENGTH FILL-POINTER MACROTYPE READMACRODEFS) TERM.MODIFY.ATTRIBUTES (DSP PLAINFONT) -DIRECTORY.MATCH1 (BASE) LISTHARD (TYPE DEFAULTTYPE KNOWN) \\FM.SETATTACHPOINT (FM.USERDATA WIDTH LEFT -HEIGHT BOTTOM) RELDRAWTO (IMDRAWLINE IMAGEOPS IMXPOSITION IMYPOSITION) \\UFS.ABORT.CL-DIRECTORY ( -GENFILESTATE FINFOID) \\MOVETO.PSC (IMAGEDATA POSTSCRIPTX POSTSCRIPTY) PEEKCCODE (NOTXCCS INCCODEFN -BACKCHARFN PEEKCCODEFN EOLCONVENTION) FILEPKGCOM (ADD DELETE MACRO CONTENTS PRETTYTYPE) DISPTREE ( -NODEID) GETBOXSCREENPOSITION (SCGETBOXSCREENPOSITION) FB.COMMANDSELECTEDFN (ITEMS PROMPTWINDOW) -\\RTP.FILTER (PUPDESTHOST FRNNET PUPDESTNET PUPSOURCE FRNPORT PUPSOURCESOCKETHI FRNSOCKETHI -PUPSOURCESOCKETLO FRNSOCKETLO PUPIDHI CONNID PUPIDLO) FILLCIRCLE (IMFILLCIRCLE IMAGEOPS) READMACROS ( -READMACROFLG) \\TOP-LEVEL-READ (USESILPACKAGE ENDOFSTREAMOP READSA CASEINSENSITIVE BASE) \\SEND.ACK ( -\#UNREADPUPS RCVBYTEID PUPCONTENTS PUPSOC) \\ALLOCATE.ETHERPACKET (XIPBASE) PFI.HANDLE.DEFDEFINER ( -PATTERNS) BITMAPIMAGESIZE (IMBITMAPSIZE IMAGEOPS) PARSE-NSADDRESS (OFFST INDIRECT-P OFFSET BASE XBASE -LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) READC (NOTXCCS INCCODEFN BACKCHARFN EOLCONVENTION) -|\\UFSParse-Directory| (DEVICENAME) ADDCHAR (CPXWIDTH END CPXPRINTCHARS LASTCOL) \\TEDIT.SMALLER.CARET - (CARETLOOKS) \\LEAF.WHENCLOSED (LEAFABORTBUTTONWINDOW SEQDONEQ SEQRETRANSMITQ SEQNAME PFSLEAFSEQUIN -DEVICEINFO) \\TRANSFERPAGE (LOCKED RPTRBASE) PRINTANDBOX (WIDTH) READP (DEVICE READP) \\PUTBASEFIXP ( -HINUM LONUM) SCANFORWARD (END CPXREALCHAR) GETPUPWORD (PUPCONTENTS) READCCODE (READCHARCODE DEVICE) -PUPSOCKETEVENT (PUPSOCEVENT) \\ALLOCSPACETOGROUPEDWINDOWS (ATEDGE) GRAPHADDNODE (GRAPH.ADDNODEFN -GRAPHNODES) \\MAXWIDTHOFGROUP (ATWHEREONEDGE ATMINX) ADVISEWDS (REG DSP WBORDER LEFT BOTTOM WIDTH -HEIGHT WTITLE SCTITLEDS SCREEN) PLCHAIN (NEXTLINE) SEDIT::PARSE--COMMENT-WORD (SEDIT::COMMENT-FONT -SEDIT::ENVIRONMENT) TEDIT.WINDOW.SETUP (SEL) \\FIXLINELENGTH.PSC (POSTSCRIPTRIGHTMARGIN -POSTSCRIPTLEFTMARGIN FONTAVGCHARWIDTH POSTSCRIPTFONT) \\RTP.HANDLE.PUP (PUPTYPE ERRORPUPCODE -PUPCONTENTS BSPOTHERPUPFN BSPINPUTSTREAM) EXCHANGEPUPS (PUPSOCEVENT PUPID) MAKEEPSFILE (XSIZE YSIZE -XKERN YDESC) \\FLUSHPAGE (RPTRBASE OCCUPIED VP DIRTY FILEPAGE LOCKED |NActivePages| PRIMARYKEY -SECONDARYKEY |Key| PAGE#) TEDIT.FORMATTEDFILEP (FMTSPEC PCTB DEFAULTCHARLOOKS POBJ PPARALAST -PPARALOOKS PLOOKS PNEW PFATP NEXTPIECE) \\FTP.GETFILEINFO (FTPFILEPROPS F5) FLIPNODE (NODEWIDTH -NODEHEIGHT) \\MAXHEIGHTOFGROUP (ATWHEREONEDGE ATMINY) SKREAD (NSCHARHASH READSA) \\DSPFONT.PSC ( -IMAGEDATA POSTSCRIPTFONT |\\SFHeight| POSTSCRIPTSPACEFACTOR POSTSCRIPTWIDTHS IL-FONTID -OTHERDEVICEFONTPROPS FONTIDNAME) \\NSFILING.DESERIALIZE1 (NSHDATUM FSSESSIONLOCK) TEXTOBJ (TEXTOBJ F3) - SCALEDBITBLT (IMSCALEDBITBLT IMAGEOPS LEFT BOTTOM) SEDIT::LINEARIZE-COMMENT (SEDIT::UNASSIGNED -SEDIT::ENVIRONMENT SEDIT::COMMENT-STRING SEDIT::SUB-NODES SEDIT::CURRENT-X SEDIT::INLINE-WIDTH -SEDIT::RIGHT-MARGIN SEDIT::START-X) \\UPDATE-WHO-LINE-ACTIVE-FLAG (FORM VALUE-START VALUE-END) -|\\PFGetMarkerPage| (|subVolumes|) \\QUEUE.OUTPUT.IOCB (NDBCSB DLFIRSTOCB DLLASTOCB DLIOCBSTATUS -D0FIRSTOCB D0LASTOCB D0IOCBSTATUS NDBTASK#) \\DRAWPOINT.GENERIC (BRUSHSIZE BRUSHCOLOR) -\\FM.COLLECTNWAYS (FM.USERDATA) |\\VFMInsert1| (|used| |volumePage| |key|) \\TEDIT.PUT.PARALOOKS ( -PPARALOOKS) \\LEAF.IDLE? (SEQINPUTQLENGTH LEAFCACHEDFILE) \\LEAF.GETFILEINFO (PFSLEAFSEQUIN DEVICEINFO - LEAFCACHEDFILE FULLFILENAME) \\UPDATECHAIN (NEXTRP RPTRBASE VP EMPTY LOCKED VPSEG REFERENCED) -\\DRAWPOLYGON.GENERIC (BRUSHCOLOR XCOORD YCOORD) CL:READ (READSA CASEINSENSITIVE BASE) \\MOVEREALPAGE -(OCCUPIED VP FILEPAGE) PRINSHUT (BP) \\LFCASEARRAYFETCH (BASE) TERM.RESET.DISPLAY.PARMS (WINDOW DSP -CLEARMODEFN TERM.STATE) CL:READ-PRESERVING-WHITESPACE (READSA CASEINSENSITIVE BASE) -DMCHAT.HANDLECHARACTER (DSP DINGED WINDOW AUTOLF EATTOCRLF ADDRESSING IDMODE EATLF EATCRLF) LOG ( -EXPONENT) CENTERINHEIGHT (BOTTOM HEIGHT) TEDIT.REMOVE.MENUITEM (ITEMS) -SI::COMPILED-FUNCTION-DEBUGGING-INFO (FNHEADER NATIVE STARTPC NTSIZE OVERHEADWORDS) -\\DSPLEFTMARGIN.PSC (IMAGEDATA POSTSCRIPTLEFTMARGIN) \\SPP.PREPARE.OUTPUT (SPPTERMINATEDP SPPCONTENTS) - \\TEDIT.PUT.SINGLE.CHARLOOKS (CLFONT CLOFFSET CLSTYLE CLUSERINFO CLLEADER CLINVERTED CLBOLD CLITAL -CLULINE CLOLINE CLSTRIKE CLSMALLCAP CLPROTECTED CLINVISIBLE CLSELHERE CLCANCOPY) MOVETOUPPERLEFT (LEFT - PTOP BOTTOM HEIGHT) \\TEDIT.PIECE-CHNO (PTREENODE UPWARD) \\NSFILING.DESERIALIZE (NSDIRECTORIES -FSPROTOCOLNAME) INTERSECTREGIONS (LEFT WIDTH BOTTOM HEIGHT RIGHT TOP) COMP.MAP (VARS) \\RTP.CLEANUP ( -PUPSOC BSPWHENCLOSEDFN BSPINPUTSTREAM) MOVEDESCENDENTS (NODEID NODEPOSITION) \\SETMACROSYNTAX ( -READMACRODEFS VAL READSA) DISCARDPUPS (INQUEUELENGTH INQUEUE) \\FZEROP (LOWORD HIWORDNOSIGNBIT) -INITIALIZECOLOR.IP (IMAGEDATA) PUPSOCKETFROMNUMBER (PSOCKETLO PSOCKETHI) \\FTP.DELETEFILE (OPENP FTPIN - FTPOUT) SCANBACK (START CPXREALCHAR) \\BSP.SKIPBYTES (BSPERRORHANDLER BSPSOC F1 CBUFSIZE COFFSET) -|\\PFFreeDiskPages| (|freePageCount|) SKIPSEPRS (READSA NSCHARHASH NOTXCCS PEEKCCODEFN INCCODEFN) -SI::COMPILED-FUNCTION-ARGLIST (FNHEADER) CL:READ-DELIMITED-LIST (READSA CASEINSENSITIVE BASE) -CHAT.DID.RESHAPE (INSTREAM DSP) DMCHAT.CLEARMODES (PLAINFONT DSP) \\ATBLSET (TERMSA) -\\CH.FIND.ORG.SERVER (OCORGANIZATION OCALLSERVERS) CREATE.NUMBERPAD.READER (MENUGRID IMAGEWIDTH -IMAGEHEIGHT) MSINTERPA (TYPE REP) MAKEDOTPTAIL (TAIL) REALSTKNTH (CLINK FASTP SLOWP \#ALINK \#CLINK -ALINK) \\FM.NUMBER-CHANGESTATE (FM.STATE) \\LEAF.IDLE (LEAFCACHEDFILE OPENFILELST SEQNAME -LEAFCONNECTION F1) SKIPSEPRCODES (READSA NSCHARHASH NOTXCCS PEEKCCODEFN INCCODEFN) \\CH.LOCATE.SERVERS - (NSNET NSDOMAIN NSORGANIZATION) \\SETWINFOYSIZE (ATMAXY ATMINY) CL:PARSE-INTEGER (READSA BASE XBASE -INDIRECT-P LENGTH FILL-POINTER OFFST OFFSET FATSTRINGP TYPE-NUMBER NSCHARHASH) MSINTERPRETSET (REP -TYPE ID PRED NEGATED HTABLES INVERTED OSET HTABLE BADMARKS QUOTED DEFAULTTYPE SET2 SET1 EXPRESSION FNS - FILES TYPES RECS MSVERB OTHERSET ROOT C VPART TENSE VB1 VB2 MODIFIER DET KNOWN MSPATHOPTIONS) -PUPSOCKETNUMBER (PSOCKET#) SCAN.LESSP (LX) INSIDE? (LEFT WIDTH BOTTOM HEIGHT) INVERT.BITMAP.B/W ( -BITMAPWIDTH BITMAPHEIGHT) \\LEAF.READPAGES (EPAGE EOFFSET LEAFCACHECNT FW6 EPUSERFIELD SEQEVENT -LEAFCONNECTION F1 FULLFILENAME LEAFOPCODE PUPCONTENTS LEAFLENGTH ACCESSBITS) MAPHASHFILE (|Key1| -|Key2| |Size| |Stream| |ByteStream|) UTF16BE.OUTCHARFN (CHARPOSITION) COMP.SELECTQ (OPNAME OPARG) -TB.DO.ITEM.SELECTION (TB#ITEMS TBLASTSELECTEDITEM TBFIRSTSELECTEDITEM TI# TIUNSELECTABLE TISELECTED) -SHOWWFRAME (WTITLE WBORDER DSP SAVE HEIGHT REG WIDTH) TEXTSTREAM (TEXTOBJ F3 STREAMHINT) \\RSTRING2 ( -EOLCONVENTION XBASE INDIRECT-P BASE NOTXCCS INCCODEFN STOPATOM NSCHARHASH BACKCHARFN ESCAPEFLG EOFP -DEVICE) \\FM.EDIT-SETUP (FM.REGION FM.USERDATA WIDTH FM.MESSAGE FM.INITSTATE FM.SYSSELECTEDFN) -PRIN2-LONG-STRING (ESCAPECHAR READSA OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP - TYPE-NUMBER HASHMACROCHAR NSCHARHASH) DINFO.CLOSEFN (GRAPH.WINDOW) \\FILINGHANDLE.DEFPRINT (NSHNAME -NSHPATHNAME) |ShowIntervals| (|key| |volumePage| |nextKey|) RENUMBER.LINES (NEXTLINE) GETPUP (INQUEUE -INQUEUELENGTH PUPSOCEVENT EPTYPE) INIT.CURSOR (BOTTOM) TTSKREAD (NSCHARHASH CPXREALCHAR) -CANONICAL.HOSTNAME (DEVICENAME) \\RESHAPEATTACHEDWINDOWSAROUNDMAINW (TOP BOTTOM HEIGHT RIGHT LEFT -WIDTH ATTACHEDW ATWHEREONEDGE ATEDGE ATYSIZE ATXSIZE) TRACKCURSOR (NODEPOSITION) READBQUOTECOMMA ( -COMMONLISP) \\READTABLEP.DEFPRINT (READTBLNAME CHARPOSITION HASHMACROCHAR) \\SETWINFOXSIZE (ATMAXX -ATMINX) SHOWWTITLE (SCTITLEDS SCREEN) \\SMASHSTRING (LENGTH FILL-POINTER OFFST INDIRECT-P OFFSET -FATSTRINGP TYPE-NUMBER BASE XBASE) \\DSPRIGHTMARGIN.PSC (IMAGEDATA POSTSCRIPTRIGHTMARGIN) -COURIER.EXPEDITED.CALL (ARGS) SEDIT::SPLIT-COMMENT (SEDIT::OPEN-NODE-CHANGED? CL:STRUCTURE -SEDIT::SUPER-NODE SEDIT::SUB-NODE-INDEX) OPENPUPSOCKET (PSOCKETLO PSOCKETHI) TB.USERDATA (TBUSERDATA) -|\\PFCurrentVol| (|da| |bootingInfo|) SPP.CLEARATTENTION (SPPEOFBITS FW8) \\INTERNAL/SETPASSWORD ( -|UserPswdAddr|) CLOSEHASHFILE (|Stream| |File|) BLTMENUIMAGE (IMAGE SAVE MENUREGIONLEFT LEFT MENUGRID -MENUOUTLINESIZE MENUREGIONBOTTOM BOTTOM WIDTH HEIGHT) LLSH (HINUM LONUM) TB.DO.UNLESS.BUSY (TBREADY -TBLOCK) |\\LFDirectorySearch| (DIRPTR CHARLIST EOFP DEVICE) SHOWSHADEDITEMS (ITEMS SHADEDITEMS WIDTH) -|\\LFFindDirHole| (CHARLIST DIRHOLEPTR F5 EOFP DEVICE) \\10MBSENDPACKET (10MBMULTICASTP NSHNM2 NSHNM1 -NSHNM0 10MBDESTHOSTBASE 10MBLENGTH 10MBTYPE) POSITION (CHARPOSITION) SEDIT::PRINT-STRING (DSP OFFST -INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER IMAGEDATA) RSTRING (READSA) -TEDIT.REDO.REPLACE (THOLDINFO CH# SEL CHLIM LINES TXTHISTORY) TTYIN (RAISEFLG READSA STORAGECOUNTER) -TTWAITFORINPUT (WIDTH BOTTOM HEIGHT ROW TTOLDRIGHTFN TTOLDBUTTONFN) \\FM.NUMBER-SETUP (FM.REGION -FM.USERDATA WIDTH FM.MESSAGE FM.INITSTATE FM.SYSSELECTEDFN) \\TEDIT.LARGER.CARET (CARETLOOKS) -\\LEAF.OPENERRORHANDLER (ERRORPUPCODE PUPCONTENTS SEQNAME) \\LEAF.OPENFILE (DEVICEINFO ACCESS -FULLFILENAME PFSOSTYPE EPAGE EOFFSET LEAFCONNECTION F1 LEAFCACHEHITS \#SEQTIMEOUTS) \\TEDIT.CHARDELETE - (PCTB OFFST INDIRECT-P OFFSET LENGTH FILL-POINTER POINT CH# CHLIM PLOOKS CLINVISIBLE PREVPIECE PLEN -CLPROTECTED) TTYIN1 (PEEKEDCHAR F3 PEEKEDECHOFLG TERMCLASS NSCHARHASH START END WAKEUP STOPATOM -CPXREALCHAR) \\TEDIT1 (TEXTOBJ F3 EDITFINISHEDFLG TXTFILE) CREATEWFROMIMAGE (SAVE) READTABLEPROP ( -NUMBERBASE READTBLNAME COMMONLISP COMMONNUMSYNTAX USESILPACKAGE CASEINSENSITIVE ESCAPECHAR -MULTESCAPECHAR PACKAGECHAR HASHMACROCHAR) \\DSPLINEFEED.PSC (POSTSCRIPTLINESPACING IMAGEDATA) -SET-READER-ENVIRONMENT (REPACKAGE REREADTABLE REBASE) TTYIN1RESTART (FIRSTLINE START NEXTLINE) -\\TEDIT.SET-TOTLEN (COUNT) SEDIT::INSERT-COMMENT-CHARS (SEDIT::COMMENT-FONT SEDIT::ENVIRONMENT -SEDIT::LINEAR-FORM SEDIT::INLINE-WIDTH SEDIT::SUB-NODE-INDEX SEDIT::SUB-NODES SEDIT::DEPTH CL:STRUCTURE -) TB.CLEAR.LINE (TBWINDOW TBITEMHEIGHT) DINFO.SHRINKFN (GRAPH.WINDOW) TTYIN.READ (CPXREALCHAR -NSCHARHASH GETFILEPTR DEVICE CHARSET) REDISPLAYBITMAP (LEFT BOTTOM) TTYIN.CLEANUP (TTYINWINDOW -TTOLDRIGHTFN TTOLDBUTTONFN TTOLDENTRYFN) SENDPUP (PUPSOURCESOCKETLO PUPSOURCESOCKETHI PSOCKETHI -PSOCKETLO EPTRANSMITTING) SI::CHANGE-CALLS-IN-CCODE (CODEARRAY DEFLOCS) MBUTTON.SET.NEXT.FIELD ( -SCRATCHSEL DCH) \\TEDIT.SET.WINDOW (\\WINDOW) \\FTP.REGISTER (FULLFILENAME) NODEREGION (NODEWIDTH -NODEHEIGHT) \\VALIDADDRESSP (PAGE#) \\BREAKAPARTATWSTRUCTURE (ATTACHEDW) SEDIT::SCAN-FOR-BOUNDS ( -SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::DESTINATION SEDIT::LINEAR-FORM SEDIT::WIDTH SEDIT::FONT -SEDIT::LINEAR-THREAD) INSIDEP (XCOORD YCOORD) CONCATLIST (FATSTRINGP INDIRECT-P TYPE-NUMBER FATPNAMEP) - TTYIN.FINISH (START NSCHARHASH CPXREALCHAR) \\TEDIT.FIND.OVERLAPPING.LINE (YBOT NEXTLINE) READFROMBUF - (END CPXREALCHAR NEXTLINE) \\CREATECHARSET.IP (WIDTHS FONTAVGCHARWIDTH CHARSETDESCENT) -READ-EXTENDED-TOKEN (CASEINSENSITIVE BASE XBASE INDIRECT-P READSA EOFP DEVICE NOTXCCS INCCODEFN -NSCHARHASH BACKCHARFN EOLCONVENTION STOPATOM) ULREDISPLAYBITMAP (LEFT BOTTOM HEIGHT BITMAPHEIGHT) -GETFRAMEVAR.IP (IPNEXTFRAMEVAR IPDATA IMAGEDATA) FONTCREATE (IMFONTCREATE IMAGEOPS) \\SETGROUPMIN ( -ATEDGE ATMINY ATMAXX ATWHEREONEDGE ATMINX ATMAXY) SWAPPUPPORTS (PUPSOURCE PUPSOURCESOCKETHI -PUPSOURCESOCKETLO) OPENHASHFILE (|Stream| FULLNAME FULLFILENAME |ByteStream|) SPP.FLUSH.TO.EOF ( -CBUFSIZE SPPEOFBITS FW8) MENUREGION (IMAGEWIDTH IMAGEHEIGHT MENUREGIONLEFT LEFT MENUGRID -MENUOUTLINESIZE MENUREGIONBOTTOM BOTTOM) \\GET.IOCB (D0NEXTIOCB) EQUAL-READER-ENVIRONMENT (REREADTABLE - REPACKAGE REBASE) COMP.EQ (OPNAME OPARG) TTYIN.SETUP (TTYINWINDOWSTATE) \\LEAF.WRITEPAGES ( -REVALIDATEFLG PUPCONTENTS LEAFHANDLE F2 EPAGE EOFFSET LEAFCONNECTION F1) DINFO.EXPANDFN (FMENU.WINDOW -GRAPH.WINDOW) SEDIT::INSERT-COMMENT (SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::POINT-INDEX SEDIT::\\Y - SEDIT::\\X) RESTOREBUF (ROW OLDTAIL) \\CARET.FLASH (CURSOR CUHOTSPOTX CUHOTSPOTY) \\FTP.UNREGISTER ( -OPENP FULLNAME FULLFILENAME) \\APPLYREADMACRO (MACROFN) \\BSP.PREPARE.OUTPUT (BSPLOCK BSPSOC F1 -BSPCURRENTPUP F3 BSPIOTIMEOUT PUPALLOC BYTEALLOC IOTIMEOUTFN BSPINPUTEVENT PUPCONTENTS BYTESPERPUP -COFFSET CBUFMAXSIZE) \\DRAWLINE.PSC (IMAGEDATA POSTSCRIPTSCALE) DCODERD (OVERHEADWORDS) -\\SHIFT.DOCUMENT (BASE PPARALOOKS POBJ OBJECTDATUM 1STLEFTMAR LEFTMAR RIGHTMAR TABSPEC NEXTPIECE) -OVERFLOW? (END LASTCOL ROW) SCROLLBITMAP (BOTTOM HEIGHT BITMAPHEIGHT LEFT WIDTH BITMAPWIDTH) RETFROM ( -INVALIDP CLINK FASTP SLOWP \#ALINK \#CLINK) \\SELECTREALPAGE (NEXTRP RPTRBASE EMPTY VP OCCUPIED LOCKED - REFERENCED DIRTY FILEPAGE VPSEG) \\TEDIT.LCASE.SEL (CH# DCH POINT TXTHISTORY) \\FM.EDIT-INSERT (LEFT -WIDTH FM.BITMAP FM.LABEL) SEDIT::PARENTHESIZE-CURRENT-SELECTION (SEDIT::SELECTION SEDIT::SELECT-NODE -SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::CARET-POINT SEDIT::SELECT-TYPE SEDIT::SUB-NODES SEDIT::DEPTH - SEDIT::DISPLAY-WINDOW) PRIN4 (COMMONLISP USESILPACKAGE) COMP.NUMBERTEST (OPNAME OPARG TAG) -|\\PFNewPages| (|size| |nextFilePage|) \\MAKESPACEFORLOCKEDPAGE (|LastLockedFilePage| FPOCCUPIED -FPVIRTUALPAGE) \\ITEM.WINDOW.SELECTION.HANDLER (ITEMINFOTYPE ITEMINFO) \\IMAGEIOINIT (IMXPOSITION -IMAGEOPS IMYPOSITION) TTDELETELINE (START END FIRSTCOL) \\DRAWCURVE.PSC (IMAGEDATA BRUSHSIZE -BRUSHSHAPE BRUSHCOLOR POSTSCRIPTSCALE) \\TFBRAVO.ADD.NAMEDTAB (FMTUSERINFO TEXTLEN) \\MEDW.BLTCHAR ( -DDCHARSET |DDSlowPrintingCase| DDXPOSITION DDCHARIMAGEWIDTHS |DDRightMargin| |DDLeftMargin| -DDWIDTHSCACHE DDXOFFSET |DDClippingRight| |DDClippingLeft| PBTHEIGHT DDPILOTBBT DDOFFSETSCACHE) -\\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (POBJ STREAMHINT \\WINDOW) \\10MBGETPACKET (10MBTYPE) -\\RTP.SOCKET.PROCESS (BSPLOCK BSPINPUTHANDLER) \\TEDIT.NEUTRALIZE.CHARLOOKS.MENU (SCRATCHSEL) -\\MAIKO.10MBTURNONETHER (NDBCSB) \\MEDW.YOFFSET (IMAGEDATA DDYOFFSET) \\LEAF.TRUNCATEFILE (PUPCONTENTS - LEAFHANDLE F2 LEAFCONNECTION F1) VOLUMESIZE (|volumeSize|) \\TEDIT.WORDDELETE (SEL STREAMHINT READSA -TXTWTBL POINT CH# CHLIM NSCHARHASH CLPROTECTED PLOOKS PIECE F5) \\NOIMAGE.DSPFONT (IMAGEDATA -PRETTYFONT#) TERM.TAB (XPOS FONTWIDTH TERM.TAB.STOPS YPOS DSP) |\\LFMakeDirHole| (|size| FILEDESC F1) -SPP.SENDATTENTION (XIPCONTENTS XIPLENGTH) SEDIT::DEGRADE-COMMENT (CL:STRUCTURE SEDIT::UNASSIGNED) -|\\LFFileName| (CHARLIST VERSION) GC-FILING-DIRECTORY (OPENFILE NSDIRECTORYP NSDIRECTORIES -FSNAMESTRING NSCONNECTIONS DEVICEINFO NSHBUSYCOUNT NSHDATUM FSCACHEDHANDLES) \\FILINGSESSION.DEFPRINT -(DSP FSNAMESTRING) \\UPDATEXYANDBOX (XCOORD YCOORD) \\PUPERROR (PUPDESTHOST PUPTYPE PUPCONTENTS -PUPBASE) TEDIT.REDO.MOVE (THOLDINFO THCH# SEL MOVESEL) FREEATTACHEDWINDOW (BOTTOM HEIGHT) -TRAJECTORY.IP (XCOORD YCOORD) \\FM.EDIT-PREPARETOEDIT (FM.SELECTEDFN FM.USERDATA LEFT BOTTOM) -\\NSFILING.CLOSE.HANDLE (NSHDATUM) STRINGWIDTH (WIDTHS FONTCHARSETVECTOR IMSTRINGWIDTH IMAGEOPS) -|\\PFTransferPage| (MISCSTACKRESULT STATUS) WBOX (LEFT BOTTOM WIDTH HEIGHT) GETBOXREGION (REGION) -EDITMOVESUBTREE (GRAPHNODES) |\\VAMGetVAMPageFor| (|vamStart|) \\FM.EDIT-ITEM (BOTTOM LEFT FM.USERDATA - WIDTH HEIGHT) \\TEDIT.OBJECT.SHOWSEL (X0 Y0 L1 SELOBJ DX YBASE YDESC XKERN WRIGHT YSIZE STREAMHINT) -TERM.SMOOTHSCROLL (DSP TTYWIDTH TTYHEIGHT FONTHEIGHT) \\CCLOSURE.DEFPRINT (FRAMENAME \#FRAMENAME -ENVIRONMENT CHARPOSITION HASHMACROCHAR) GETCHATWINDOW (RUNNING?) \\CARET.FLASH? (RATE \\WINDOW) -READHOTSPOT (CUHOTSPOTX WIDTH CUHOTSPOTY HEIGHT) COMP.STFIX (OPNAME OPARG) |\\LFMakeLeaderPage| ( -|fileID| |size|) \\NSGC.COLLECT.DIRECTORIES (NSHDATUM FSPROTOCOLNAME NSHFILEID) COMP.GETBASEBITS ( -OPNAME OPARG) \\FM.GETBITMAPS (WIDTH HEIGHT) TEDIT.FORMAT.HARDCOPY (TXTPAGEFRAMES THISLINE TXTFILE -FULLNAME FULLFILENAME CHNO TEXTLEN STATE NEWPAGELAYOUT PAGECOUNT) \\MEDW.XOFFSET (IMAGEDATA DDXOFFSET) - MBUTTON.NEXT.FIELD.AS.ATOM (STREAMHINT SCRATCHSEL) \\TEDIT.ITALIC.CARET.OFF (CARETLOOKS) RETVALUES ( -INVALIDP CLINK FASTP SLOWP \#ALINK \#CLINK) IN/ITEM? (XCOORD YCOORD SELECTABLEITEMREGION) HASHFILEPROP - (|ValueType| |Stream| |File| |ItemCopyFn| |Size| |#Entries| |ItemLength|) TEDIT.PARALOOKS (SEL CH# -CHLIM TEXTLEN SET FORMATTEDP PCTB TABSPEC PPARALOOKS PLEN PPARALAST NEXTPIECE PREVPIECE \\XDIRTY -TXTFILE \\WINDOW) |\\PFGetVols| (|subVolumeCount|) \\DONEWEPHEMERALPAGE (PAGE# INVALID PRIMARYKEY -SECONDARYKEY VACANT RPTRBASE) \\STREAM.FROM.PACKET (PACKETEXCHANGEBODY XIPLENGTH) VOLUMES (|LVlabel|) -\\DEFINEDP (DEFPOINTER) \\DRAWCIRCLE.PSC (IMAGEDATA BRUSHSHAPE BRUSHSIZE BRUSHCOLOR POSTSCRIPTSCALE) -TERM.SETMARGINS (FONTHEIGHT HOMEPOS FONTDESCENT) CHAT.INIT (DPYNAME ENDOFSTREAMOP) TB.ITEM.FROM.YCOORD - (TBORIGIN TBITEMHEIGHT TB#ITEMS) \\GETBASESTRING (BASE XBASE INDIRECT-P OFFST OFFSET) -|\\LFMakeDirEntry| (CHARLIST |fileID| FILEDESC F1 HIBYTE LOBYTE VERSION) \\FM.EDITSTART-SETUP ( -FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN) PREVWORD (START NSCHARHASH STOPATOM -CPXREALCHAR) \\TEMPLOCKPAGES (MISCSTACKRESULT) PROVIDE.PROMPTING.WINDOW (LEFT BOTTOM WIDTH HEIGHT) -READHASHMACRO (COMMONLISP) \\DRAWELLIPSE.PSC (IMAGEDATA BRUSHSHAPE BRUSHSIZE BRUSHCOLOR -POSTSCRIPTSCALE) \\SETUFNENTRY (FNINDEX NEXTRA NARGS) TEDIT.UNPARSE.PAGEFRAMES (REGIONFILLMETHOD -REGIONTYPE REGIONLOCALINFO REGIONSPEC REGIONSUBBOXES) EXTENDREGIONTOP (TOP BOTTOM HEIGHT) -\\GETUFNENTRY (OP# FNINDEX) \\DOFLUSHVM (PAGE# |MiscFXP|) COMP.FMEMB (OPNAME OPARG) PREVLINE (NEXTLINE -) COMP.EXPR (EXTCALL) MBUTTON.NEXT.FIELD.AS.TEXT (STREAMHINT SCRATCHSEL) ENCAPSULATEDOBJ.DISPLAYFN ( -XSIZE YSIZE YDESC) SEDIT::MAP-FONT (SEDIT::DEFAULT-FONT SEDIT::KEYWORD-FONT SEDIT::ITALIC-FONT -SEDIT::COMMENT-FONT SEDIT::BROKEN-ATOM-FONT) \\LEAF.GETFILENAME (DEVICEINFO PFSLEAFSEQUIN -LEAFCACHEDFILE FULLFILENAME) \\INSPECTW.COMMAND.HANDLER (COMMANDFN ITEMINFOTYPE ITEMINFO) -\\PROMPTFORWORDERASE (XCOORD YCOORD) \\GET-COMPILED-DEFINITION (CCODEP DEFPOINTER) \\NEWEPHEMERALPAGE -(MISCSTACKRESULT) CALLSCCODE (NTSIZE OVERHEADWORDS BYTESWAPPED STARTPC OPNARGS OPCODENAME LNCALLED -BOUND USEDFREE GLOBALS CALLED) \\FLUSHVM (MISCSTACKRESULT) SYSOUT (TOTALTIME) SPP.OPENP ( -SPPTERMINATEDP) WTODSY (BOTTOM DSP) \\FM.EDITSTART-SELECTEDFN (FM.SELECTEDFN) OVERFLOWLINE? (END START - NEXTLINE) GETBOXPOSITION.FROMINITIALREGION (WIDTH HEIGHT LEFT BOTTOM) EDITADDNODE (NODEPOSITION -NODELABEL) \\CODEBLOCKP (WORDINPAGE PASSWORD GCTYPE INUSE TRAILER ARLEN DTDHUNKP DTDGCTYPE) -\\WRITEDIRTYPAGE1 (LOCKED DIRTY VP) \\NSFILING.COPYFILE (OPENFILE) MODERNWINDOW.BUTTONEVENTFN (LEFT -RIGHT WIDTH TOP BOTTOM) \\PROMPTFORWORDBIN (KEYBOARDSTREAM F2 EOFP DEVICE) \\ABORT.BULK.DATA (CBUFSIZE - SPPEOFP SPPEOFBITS FW8) SEDIT::CREATE-NEW-COMMENT (SEDIT::COMMENT-WIDTH) \\GETREGIONTRACKWITHBOX ( -XCOORD YCOORD) EDITSHADEREPAINTFN (LEFT BOTTOM WIDTH HEIGHT) \\NSFILING.GETFILE (NSRANDOMDEVICE -DEVICEINFO NSDIRECTORIES NSDIRECTORYP NSVERSION NSROOTNAME NSHDIRECTORYP NSHATTRIBUTES NSHACCESS -NSHDATUM NSHBUSYCOUNT FSSESSIONLOCK) NTH.COLUMN.OF (FIRSTCOL) \\TEDIT.FILL.IN.CHARLOOKS.MENU ( -SCRATCHSEL CLBOLD CLITAL CLULINE CLSTRIKE CLOLINE CLFONT FONTCLASSNAME CH# CLSIZE CLOFFSET) -TEDIT.FLASHCARET (TCFORCEUP TCCARETDS TCCARET TCCARETX TCCARETY) \\DSPOPERATION.IP (IMAGEDATA -IPOPERATION) MBUTTON.NEXT.FIELD.AS.PIECES (SCRATCHSEL) \\TEDIT.CONVERT.FOREIGN.FORMAT (TXTPAGEFRAMES -PCTB) EDITAPPLYTOLINK (GRAPHNODES) SETBSPUSERINFO (BSPSOC F1) COURIER.WRITE (HIBYTE LOBYTE) -TEDIT.INSERT (SEL TEXTOBJ F3 SET TEXTLEN \\WINDOW POINT CH# CHLIM X0 XLIM OFFST INDIRECT-P OFFSET BASE - XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER TXTREADONLY) \\DSPMOVELR (DDXPOSITION DDYPOSITION -|DDRightMargin| |DDLeftMargin| DDFONT IMAGEDATA) \\TFBRAVO.WRITE.RUN (RUNLOOKS CLUSERINFO RUNLENGTH) -\\MATCHPCS (COUNT) \\RELEASEWORKINGSET (OCCUPIED RPTRBASE VP LOCKED) SEDIT::COPY-STRUCTURE-COMMENT ( -CL:STRUCTURE) COPYTEXTSTREAM (PCTB SCRATCHSEL EDITPROPS TEXTLEN MENUFLG) CH.LIST.DOMAINS (OCALLSERVERS - NSORGANIZATION) FILL-VECTOR (TOTAL-SIZE READ-ONLY-P) |\\VFMGetInterval| (|vfmStart| |volumePage| -|key| |nextKey|) UNSAVEFNS (FILEPKGNAME) \\TEDIT.SHOWCARETLOOKS (CARETLOOKS CLFONT CLOFFSET CLOLINE -CLULINE) CHARWIDTHY (YWIDTHS FONTCHARSETVECTOR IMCHARWIDTHY IMAGEOPS) PRINTATBOX (LEFT PTOP BOTTOM -HEIGHT) TERM.SET.TAB (TERM.TAB.STOPS) CREATE-PROCESS-STREAM (OPENFILELST) TB.ITEM.VISIBLE? (TBWINDOW -PTOP BOTTOM HEIGHT TBITEMHEIGHT) DINFO.CREATE.GRAPH.WINDOW (WINDOW LEFT WIDTH BOTTOM HEIGHT) -CHAT.OPTIONMENU (ITEMS) \\CREATECHARSET (|\\SFAscent| |\\SFDescent| FONTCHARSETVECTOR) SPPOUTPUTSTREAM - (SPPOUTPUTSTREAM) \\FILLCIRCLE.PSC (BITMAPWIDTH BITMAPHEIGHT BITMAPRASTERWIDTH) BRECOMPILE ( -COMPFILEMAP COMPFILEXPRS) \\BLTSHADE.PSC (IMAGEDATA POSTSCRIPTCLIPPINGREGION LEFT BOTTOM WIDTH HEIGHT -BITMAPWIDTH BITMAPHEIGHT BITMAPRASTERWIDTH) \\NSFILING.COPY/RENAME (NSDIRECTORIES NSROOTNAME NSVERSION - NSHBUSYCOUNT NSHDIRECTORYP NSHDATUM FSCACHEDHANDLES FSSESSIONLOCK) \\CARET.SHOW (STREAM SCCARETFLASH -SCREEN XWINDOWHINT IMAGEDATA) COMP.NUMBERCALL (OPNAME OPARG PREV) \\LASTNODE (COUNT) -SEDIT::COPY-STRUCTURE-COMMENT-WORD (CL:STRUCTURE SEDIT::LINEAR-FORM) FB.ALLOW.ABORT (ABORTWINDOW) -TEDIT.CURSORMOVEDFN (LINES \\WINDOW YBOT LHEIGHT MOUSEREGION WRIGHT FMTHARDCOPY LFMTSPEC LEFTMARGIN -WLEFT) COMP.COMPARENUM (OPNAME OPARG) OPENRTPSOCKET (BSPLOCK RTPSTATE RTPEVENT BSPFAILUREREASON) -CREATE.NEW.NODEPOSITION (NODEPOSITION XCOORD YCOORD) |\\VFMGet1| (|key| |volumePage| |nextKey|) -MBUTTON.NEXT.FIELD.AS.NUMBER (STREAMHINT SCRATCHSEL) WTODSX (LEFT DSP) NTH.RELATIVE.COLUMN.OF (START -END CPXWIDTH) GETBSPUSERINFO (BSPUSERSTATE BSPSOC F1) \\DISPLAYINIT (IMXPOSITION IMAGEOPS IMYPOSITION) - \\FTP.CLEANUP (FTPBUSY FTPIN) TERM.SCROLLDOWN (DSP TTYWIDTH FONTHEIGHT BOTTOMMARGIN FONTDESCENT) -CHANGECCODE (CODEARRAY NAMELOCS CONSTLOCS DEFLOCS PTRLOCS) DINFO.GET.GRAPH.WINDOW (GRAPH.WINDOW) -COMP.NUMERIC (OPARG OPNAME) DSPCLEOL (IMAGEDATA |DDLeftMargin| DDYPOSITION |DDRightMargin| DDLINEFEED) - 32MBADDRESSABLE (|DL24BitAddressable|) PFI.ADD.TO.INDEX (NAME) GETREGION (REGION) \\FM.PUSHGROUP ( -BOTTOM LEFT) ICONW (BITMAPWIDTH BITMAPHEIGHT XCOORD YCOORD) \\NSFILING.GENERATEFILES (FSPROTOCOLNAME -NSDIRECTORIES NSROOTNAME NSVERSION NSHDATUM) SEDIT::START-COMMENT (SEDIT::CARET-POINT SEDIT::POINT-NODE - SEDIT::POINT-TYPE SEDIT::NODE-TYPE) \\LEAF.REOPENFILE (LFCREATIONDATE LEAFINFO F4 LFWRITEDATE -VALIDATION) TEDIT.SUBSTITUTE (PLEN SEL CH# DCH TEXTLEN PLOOKS PCTB LINES OFFST INDIRECT-P OFFSET BASE -XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER CHLIM) PFI.DEFAULT.HANDLER (PATTERNS TESTFN -AMBIGUOUS?) \\ITEMW.FLIPITEM (SELECTABLEITEMREGION LEFT BOTTOM WIDTH HEIGHT) TEDIT.UNDO (TXTREADONLY -SEL TXTHISTORY THLEN THCH# THFIRSTPIECE THACTION) \\MAIKO.INPUT.INTERRUPT (DLFIRSTICB NDBCSB 10MBTYPE) - \\SET.LASTVMEMFILEPAGE (|NActivePages|) SEDIT::ASSIGN-FORMAT-CLISP (SEDIT::SUB-NODES CL:STRUCTURE) -\\TEDIT.CENTER.SEL.REV (CH# DCH) \\LEAF.DIRECTORYNAMEP (PFSKNOWNDIRS DEVICEINFO PFSOSTYPE) -CHARACTER.READ (STOPATOM NSCHARHASH READSA) \\PAGEDBACKFILEPTR (ACCESSBITS FULLNAME COFFSET CPAGE -CBUFDIRTY CHARPOSITION) \\FM.DISPLAY-SETUP (FM.MESSAGE) TERM.RIGHT (TTYWIDTH XPOS FONTWIDTH YPOS DSP) -TB.RESHAPEFN (TBLOCK TBREADY TBITEMHEIGHT) \\DSPPRINTCHAR (IMAGEDATA CCECHO NSCHARHASH CHARPOSITION -|DDRightMargin| DDXPOSITION |DDLeftMargin|) MENUTITLEFONT (IMAGE SCREEN MENUTITLEFONT SCTITLEDS -MENUFONT) STRPOSL (PNAMEBASE PNAMELENGTH FATPNAMEP BASE XBASE INDIRECT-P LENGTH FILL-POINTER OFFST -OFFSET FATSTRINGP TYPE-NUMBER NSCHARHASH) \\CREATECHARSET.PSC (WIDTHS) MOVE.TO.LINE (START FIRSTCOL -ROW) \\FM.JUSTIFYGROUPS (RIGHT LEFT WIDTH) TRANSGRAPH (GRAPHNODES XCOORD NODEPOSITION YCOORD) -TEDIT.BUILD.PCTB1 (STREAMHINT FMTSPEC PLEN PLOOKS PPARALOOKS) \\ATWGROUPSIZE (ATTACHEDW WIDTH HEIGHT) -\\BSP.PREPARE.INPUT (BSPLOCK BSPSOC F1 BSPCURRENTPUP F3 BSPIOTIMEOUT \#UNREADPUPS IOTIMEOUTFN -BSPINPUTEVENT BSPINPUTQ PUPTYPE PUPCONTENTS PUPLENGTH COFFSET CBUFSIZE MARKPENDING F4) CONCAT ( -FATSTRINGP INDIRECT-P TYPE-NUMBER FATPNAMEP) \\DRAWPOLYGON.DISPLAY (BRUSHSHAPE BRUSHCOLOR XCOORD -YCOORD BRUSHSIZE) \\STRINGWIDTH.GENERIC (PNAMEBASE PNAMELENGTH FATPNAMEP WIDTHS FONTCHARSETVECTOR -ESCAPECHAR OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) -SEDIT::TRY-REUSING-BITS (SEDIT::BLOCK-X SEDIT::WINDOW-LEFT SEDIT::BLOCK-START SEDIT::NEXT-BLOCK -SEDIT::BLOCK-ASCENT SEDIT::BLOCK-DESCENT SEDIT::BLOCK-WIDTH SEDIT::BLOCK-NEW-X SEDIT::SHIFT-Y -SEDIT::BLOCK-BASE-LINE SEDIT::BASE-LINE-Y SEDIT::CURRENT-LINE SEDIT::YCOORD SEDIT::LINE-SKIP -SEDIT::LINE-ASCENT SEDIT::SHIFT-RIGHT SEDIT::REPAINT-X SEDIT::SHIFT-DOWN) EXTENDREGIONRIGHT (RIGHT -LEFT WIDTH) \\SPLITTREE (UPWARD COUNT TOTLEN) PTPLUS (XCOORD YCOORD) FONTCLASSUNPARSE (FONTCLASSNAME -PRETTYFONT# DISPLAYFD PRESSFD INTERPRESSFD OTHERFDS) \\TEXTRIGHTMARGIN (\\WINDOW RIGHTMAR FMTSPEC -WRIGHT) PURGEDSKDIRECTORY (OPENP FILEDESC F1 VOLUME |volNum| |LVlabel|) \\PROMPTWINDOW.SET.HEIGHT (TOP - BOTTOM HEIGHT) TEDIT.REDO (SEL TXTREADONLY TXTHISTORY THACTION POINT CH# CHLIM THAUXINFO THLEN -THFIRSTPIECE) FONTUNPARSE (WEIGHT SLOPE EXPANSION COLOR BACKCOLOR FORECOLOR) PRINTCODE (OVERHEADWORDS -BYTESWAPPED CLOSUREP ARGTYPE NLOCALS FVAROFFSET NTSIZE STARTPC NATIVE OPPRINT OPCODENAME LEVADJ -OPNARGS OP#) OPT.CALLP (OPNAME OPARG) EXTENDREGIONLEFT (LEFT WIDTH) -SEDIT::COMPUTE-SELECTION-POSITION-COMMENT (SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END -SEDIT::\\Y SEDIT::\\T SEDIT::FIRST-LINE SEDIT::START-X SEDIT::LINEAR-FORM SEDIT::\\X SEDIT::\\Z) -\\DRAWPOINT.DISPLAY (BITMAPWIDTH BITMAPHEIGHT) |\\LFGenFileID| (|lastIDAllocated|) NUMBERPAD.READ ( -ITEMS) \\FM.JUSTIFYITEMS (FM.GROUPID FM.REGION FM.MAXREGION FM.USERDATA) |\\VAMCheckEndOfVol| ( -|volumeSize|) CL:MAKE-SYMBOL (FATSTRINGP INDIRECT-P TYPE-NUMBER BASE XBASE LENGTH FILL-POINTER OFFST -OFFSET) COMP.SHIFT (OPNAME OPARG) \\DOVMEMFULLINTERRUPT (|NActivePages|) \\FTP.RENAMEFILE (OPENP FTPIN - FTPOUT) \\LEAF.EVENTFN (DEVICEINFO PFSLEAFSEQUIN OPENP PFSLOOKUPFILESOCKET) PAINTW (DSP SCDEPTH -SCREEN SCBITSPERPIXEL SCDESTINATION BITMAPBITSPERPIXEL BITMAPWIDTH BITMAPHEIGHT CUIMAGE CUMASK) -POLYSHADE.IP (OTHERPROPS) \\SETPUPCHECKSUM (PUPCHECKSUMBASE PUPBASE PUPLENGTH) \\SCALEDBITBLT.PSC ( -IMAGEDATA POSTSCRIPTSCALE BITMAPWIDTH BITMAPHEIGHT POSTSCRIPTX POSTSCRIPTY POSTSCRIPTCLIPPINGREGION) -\\BACKCOLOR.DISPLAY (IMAGEDATA |DDTexture| BITMAPRASTERWIDTH BITMAPBITSPERPIXEL |DDDestination|) -SEDIT::COPY-SELECTION-COMMENT (SEDIT::SELECT-NODE CL:STRUCTURE SEDIT::SELECT-START SEDIT::SELECT-END -SEDIT::DISPLAY-WINDOW SEDIT::ENVIRONMENT SEDIT::NODE-TYPE SEDIT::POINT-TYPE) DINFO.FIND (WINDOW -MONITORLOCK FIND.STRING) COMP.RPLACD (OPARG OPNAME) \\RTP.HANDLE.INPUT (PUPSOC BSPLOCK RTPTIMEOUT -RTPTIMER) \\TEDIT.PARSE.CHARLOOKS.MENU (SCRATCHSEL CH#) \\STRINGWIDTH.IP (IPFONT IMAGEDATA -IPSPACEWIDTH) %COPY-ONED-ARRAY (BASE) TEDIT.BUILD.PCTB0 (STREAMHINT FMTSPEC PPARALOOKS PLEN) -GETPOSITION (POSITION) \\BLTSHADE.DISPLAY (IMAGEDATA DDXOFFSET DDYOFFSET |DDClippingLeft| -|DDClippingBottom| |DDClippingRight| |DDClippingTop| LEFT BOTTOM WIDTH HEIGHT |DDDestination| -BITMAPBITSPERPIXEL |DDTexture| BITMAPHEIGHT DDOPERATION) SETFONTCLASSCOMPONENT (OTHERFDS) -\\BSP.CLEANUP.INPUT (BSPCURRENTPUP F3 BSPSOC F1 BSPFILEPTRLO FW7 PUPLENGTH BSPFILEPTRHI FW6 -\#UNREADPUPS SENTZEROALLOC) POSTSCRIPT.HARDCOPYW (IMAGEDATA POSTSCRIPTCLIPPINGREGION BITMAPWIDTH LEFT -WIDTH BITMAPHEIGHT BOTTOM HEIGHT POSTSCRIPTSCALE) TEDIT.NEXT (SEL CH# CHLIM DCH) \\NSFILING.NEXTFILE ( -NSGENERATOR NSCONNECTION NSFILTER NSIGNOREDIRECTORIES NSBULKSTREAM) TEDIT.PROMPTFLASH (MENUFLG -PROMPTWINDOW) SEDIT::COMPUTE-POINT-POSITION-COMMENT (SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::\\Y -SEDIT::START-X SEDIT::WIDTH SEDIT::LINEAR-FORM SEDIT::FIRST-LINE SEDIT::\\X) PTDIFFERENCE (XCOORD -YCOORD) \\DSPOPERATION.DISPLAY (IMAGEDATA DDOPERATION DDPILOTBBT DDSOURCETYPE) TEDIT.BUILD.PCTB2 ( -STREAMHINT FMTSPEC TXTCHARLOOKSLIST TXTPARALOOKSLIST PFATP PFPOS PLEN PLOOKS) SEDIT::SELECT-NODE ( -SEDIT::SELECTION) \\STRINGWIDTH.DISPLAY (IMAGEDATA DDFONT DDSPACEWIDTH) SEDIT::SHIFT-BLOCK ( -SEDIT::CURRENT-LINE SEDIT::NEXT-LINE-Y SEDIT::YCOORD SEDIT::LINE-HEIGHT SEDIT::LINE-SKIP SEDIT::LINE-ASCENT - SEDIT::LINE-DESCENT SEDIT::REPAINT-START SEDIT::REPAINT-LINE SEDIT::DISPLAY-WINDOW SEDIT::WINDOW-LEFT - SEDIT::WINDOW-RIGHT SEDIT::REPAINT-X SEDIT::BASE-LINE-Y) \\DRAWELLIPSE.DISPLAY (IMAGEDATA -|DDClippingBottom| |DDClippingTop| |DDClippingRight| |DDClippingLeft| |DDDestination| DDOPERATION -BITMAPBITSPERPIXEL BITMAPBASE BITMAPRASTERWIDTH BITMAPHEIGHT BITMAPWIDTH DDXOFFSET DDYOFFSET) -\\CHARWIDTH.DISPLAY (WIDTHS FONTCHARSETVECTOR DDFONT IMAGEDATA) \\IFSERRORSTRING (SEQNAME) -\\DRAWLINE.DISPLAY (|DDDestination| IMAGEDATA DDOPERATION BIGBMLIST |DDClippingTop| |DDClippingBottom| - DDXOFFSET DDYOFFSET |DDClippingLeft| |DDClippingRight|) \\DSPCLIPPINGREGION.DISPLAY (IMAGEDATA -|DDClippingRegion|) \\POLYSHADE.YSCAN.IP (BY LX RX WC TY) PRINTCODENT (BYTESWAPPED) -\\FILLCIRCLE.DISPLAY (IMAGEDATA |DDClippingLeft| |DDClippingBottom| |DDClippingTop| |DDClippingRight| -DDOPERATION |DDDestination| BITMAPBITSPERPIXEL |DDTexture| BITMAPBASE BITMAPRASTERWIDTH BITMAPWIDTH -BITMAPHEIGHT DDXOFFSET DDYOFFSET) \\DSPRESET.DISPLAY (IMAGEDATA |DDClippingRegion| DDFONT ROTATION -|DDLeftMargin| TOP BOTTOM HEIGHT LEFT RIGHT WIDTH |DDTexture|) \\READBINARYBITMAP (BITMAPBASE -BITMAPRASTERWIDTH) \\PARAS.IN.SEL (CH# DCH PPARALAST PLEN) LEAF.ASSURE.FINISHED (LEAFCONNECTION F1 -SEQLOCK SYSQUEUEHEAD SEQDONEQ EPUSERFIELD EPLINK SEQRETRANSMITQ SEQEVENT LEAFERRORCNT FW7 FULLFILENAME -) \\DRAWCURVE.DISPLAY (XCOORD YCOORD) \\LEAF.RENAMEFILE (DEVICENAME) DINFO.LOOKUP (WINDOW MONITORLOCK -LOOKUPFN LOOKUP.STRING NAME) \\FONT.COMPARESYMBOL (PACKAGEINDEX PNAMEBASE PNAMELENGTH FATPNAMEP) -ITEMW.REPAINTFN (SELECTABLEITEMREGION ITEMINFO) \\DSPYPOSITION.DISPLAY (IMAGEDATA DDYPOSITION) -\\TEDIT.ABBREV.EXPAND (TEXTOBJ F3 SEL POINT CH# CHLIM DCH) \\DSPXPOSITION.DISPLAY (IMAGEDATA -DDXPOSITION) \\DSPLINEFEED.DISPLAY (IMAGEDATA DDLINEFEED) SEDIT::REUSE-LINEAR-FORM (SEDIT::CURRENT-X -SEDIT::CURRENT-LINE SEDIT::START-X SEDIT::LINEARIZE SEDIT::NODE-TYPE SEDIT::INLINE? SEDIT::FIRST-LINE -SEDIT::LAST-LINE SEDIT::LINEAR-FORM SEDIT::NEXT-LINE SEDIT::INDENT SEDIT::FIRST-BLOCK SEDIT::NEXT-LINE-Y - SEDIT::YCOORD SEDIT::LINE-HEIGHT SEDIT::LINE-SKIP SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::BELOW? - SEDIT::BASE-LINE-Y SEDIT::LINE-LENGTH SEDIT::LINEAR-THREAD) UPDATE/SCROLL/REG (SCROLLFN REG -VERTSCROLLWINDOW HORIZSCROLLWINDOW LEFT BOTTOM HEIGHT WTITLE SCTITLEDS SCREEN WIDTH) SEDIT::CFV-CLISP -(SEDIT::SUB-NODES SEDIT::WIDTH SEDIT::LPAREN-STRING SEDIT::SPACE-WIDTH SEDIT::PREFERRED-WIDTH -SEDIT::MAX-WIDTH) \\DRAWCIRCLE.DISPLAY (IMAGEDATA |DDClippingBottom| |DDClippingTop| |DDClippingRight| - |DDClippingLeft| |DDDestination| DDOPERATION BITMAPBITSPERPIXEL BITMAPBASE BITMAPRASTERWIDTH -BITMAPHEIGHT BITMAPWIDTH DDXOFFSET DDYOFFSET) \\MAP-CODE-POINTERS (GCTYPE DTDGCTYPE STARTPC -BYTESWAPPED OPCODENAME OPNARGS) |\\VFMGet| (|vfmStart| |key| |nextKey|) \\FM.NWAY-SELECTEDFN ( -FM.USERDATA) \\FM.LAYOUTGRID (LEFT WIDTH HEIGHT) \\DSPFONT.DISPLAY (IMAGEDATA DDFONT |\\SFHeight| -WIDTHS FONTCHARSETVECTOR) \\BITBLT.DISPLAY (BITMAPWIDTH BITMAPHEIGHT IMAGEDATA LEFT |DDClippingRegion| - BOTTOM |DDDestination| DDXOFFSET |DDClippingLeft| DDYOFFSET |DDClippingBottom| |DDClippingRight| -|DDClippingTop| |DDTexture| IMAGEOPS WIDTH HEIGHT BITMAPBITSPERPIXEL DDOPERATION IMBITBLT) -MOVE.TO.NEXT.LINE (NEXTLINE START) \\SCALEDBITBLT.DISPLAY (WIDTH HEIGHT) COMP.DELFN (OPARG) PRIN1 ( -COMMONLISP LINELENGTH) |\\LFDirectoryScrambled| (|LVlabel| VOLUME |volNum| FILEDESC F1) -\\DSPLEFTMARGIN.DISPLAY (IMAGEDATA |DDLeftMargin|) |\\PFFindFileSize| (|filePage| |volNum|) SPACES ( -LINELENGTH CHARPOSITION) ASKUSEREXPLAIN (EXPLAINSTRING) UTF8.OUTCHARFN (EOLCONVENTION CHARPOSITION) -\\UNCOPY (HINUM LONUM HIWORD LOWORD BASE XBASE INDIRECT-P OFFST OFFSET LENGTH FILL-POINTER TOTAL-SIZE -TYPE-NUMBER FILL-POINTER-P) PRINTNUM (WIDTH RADIX LEFTFLUSH PAD0) \\INSERTTREE (TOTLEN COUNT PTREENODE - PLEN) FONTDESCENT (|\\SFDescent|) FILLRECTANGLE.IP (IMAGEDATA IPVISTOP IPVISBOTTOM IPVISLEFT -IPVISRIGHT) FB.PROMPTFORINPUT (PROMPTWINDOW) DINFO.ADD.FMENU (WINDOW FMENU.WINDOW) SHIFT.BITMAP.UP ( -BITMAPWIDTH BITMAPHEIGHT) \\TEDIT.APPLY.CHARLOOKS (\\TEXTOBJ CH# SEL DCH) FONTHEIGHT (|\\SFHeight|) -POSTSCRIPT.ENDPAGE (IMAGEDATA POSTSCRIPTPAGEBLANK) ICMLARRAY.MENUW.APPLY (LEFT TOP BOTTOM HEIGHT) -MB.THREESTATE.DISPLAY (XSIZE YSIZE YDESC) \\PRINTBINARYBITMAP (HIBYTE LOBYTE BITMAPBASE -BITMAPRASTERWIDTH) \\TELERAIDBREAK (TELERAIDFXP TRBREAK |StackBase| FAULTFXP FRAMENAME NAMETABLE -VALIDNAMETABLE NAMETABLE# FNHEADER \#FRAMENAME CLINK FASTP SLOWP \#ALINK \#CLINK IVAR BLINK DUMMYBF -\#BLINK TRNOBREAK TRCURSOR NEXTBLOCK SIZE FLAGS STKMIN DEFPOINTER) \\LEAF.FLUSH.CACHE ( -LEAFOPENCLOSELOCK LEAFCACHEDFILE LEAFREALLYOPEN F5 SEQNAME) \\FONTFACE (WEIGHT SLOPE EXPANSION) -\\MAP-CODE-LITERALS (GCTYPE DTDGCTYPE STARTPC OVERHEADWORDS BYTESWAPPED OPNARGS OPPRINT OPCODENAME) -OPT.OPTCHECK (TAG OPARG PARENT OPNAME FRAME PREV NXT) SETHASHSTATUS (|Stream| |File|) FONTASCENT ( -|\\SFAscent|) TERM.NEWLINE (YPOS DSP) FONTPROP (|\\SFHeight| |\\SFAscent| |\\SFDescent| FONTFAMILY -FONTSIZE FONTFACE WEIGHT SLOPE EXPANSION FORECOLOR BACKCOLOR ROTATION FONTDEVICE FONTDEVICESPEC -FONTSCALE) |CreateCursorBitMap| (BITMAPBASE) COMP.LABELS (OPNAME OPARG) SEDIT::CLOSE-NODE-COMMENT ( -CL:STRUCTURE) |\\PFFindPageAddr| (PAGEGROUP |filePage| |nextFilePage| |volNum| |volumePage|) -EXTENDREGIONBOTTOM (BOTTOM HEIGHT) RESETGRID.NEW (WIDTH HEIGHT) GO.TO.RELATIVE (FIRSTCOL ROW) -\\DRAWPOLYGON.IP (IMAGEDATA IPVISLEFT IPVISRIGHT IPVISBOTTOM IPVISTOP XCOORD YCOORD) \\FM.LAYOUTCOLUMN - (HEIGHT WIDTH) |\\LFFindDirectoryVol| (|seal|) PUPNET.DISTANCE (RTHOPCOUNT) \\NSFILING.OPEN.HANDLE ( -NSHDATUM) \\DSPRIGHTMARGIN.DISPLAY (IMAGEDATA |DDRightMargin|) BROKENDEF (STARTPC BYTESWAPPED -OPCODENAME OPNARGS) SHOW.CLEARINGHOUSE (OCORGANIZATION OCDOMAINS DCDOMAIN) INSERTLINE (END ROW -NEXTLINE) MSMARKCHANGED (MARKCHANGED-FN) \\HANDLE.RAW.PUP (EPNETWORK PUPDESTHOST NDBPUPHOST# -PUPDESTNET NDBPUPNET# PSOCKETLO PSOCKETHI PUPDESTSOCKETHI PUPDESTSOCKETLO PUPTYPE PUPCHECKSUM PUPBASE -PUPLENGTH PUPCHECKSUMBASE INQUEUELENGTH PUPSOC#ALLOCATION INQUEUE PUPSOCEVENT) \\FM.LAYOUTROW (WIDTH -HEIGHT) SEDIT::UNDO-EXTRACT (SEDIT::SUB-NODES SEDIT::DEPTH) SEDIT::SKIP-TO-GAP (SEDIT::SELECTION -SEDIT::CARET-POINT SEDIT::DISPLAY-WINDOW SEDIT::SELECT-NODE SEDIT::POINT-NODE) -\\DO.PROGV.SETUP.FRAME.AND.EXECUTE (FNHEADER NEXTBLOCK FIRSTPVAR FXSIZE OVERHEADWORDS) -\\COURIER.RESULTS (RESULTS ERRORS INHERITS ERR# ARGS) REPLACEHASHKEY (|Stream| |ByteStream|) -\\NSFILING.FILEINFOFN (CURRENTINFO) \\DEVICESYMBOL (IMFONTCREATE IMAGEOPS) DINFO.INVERT.NODE ( -GRAPHNODES NODEID LAST.INVERTED.NODE) \\FM.NWAY-DOWNFN (FM.USERDATA LEFT BOTTOM) SEDIT::COMMENT-LENGTH - (SEDIT::SUB-NODES CL:STRUCTURE) \\NSRANDOM.SESSION.WATCHER (DEVICEINFO NSCONNECTIONS OPENFILELST -DEVICE ACCESSBITS FSSESSIONTIMER FSCONTINUANCE FSLASTREALACTIVITYTIMER FSREALACTIVITY) -DINFO.DEFAULT.MENU (WINDOW DINFO.MENU) \\POSITION.MENU.IMAGE (MENUPOSITION SCREEN XCOORD YCOORD IMAGE -MENUOFFSET SCWIDTH IMAGEWIDTH SCHEIGHT IMAGEHEIGHT) |\\VFMGetBufferFor| (PAGE) \\TEDIT.SHOW.CHARLOOKS -(\\TEXTOBJ CH# SEL SCRATCHSEL TEXTLEN PCTB PLOOKS) POSTSCRIPT.PUTCOMMAND (IMAGEDATA -POSTSCRIPTCHARSTOSHOW POSTSCRIPTPENDINGXFORM) \\MAIKO.10MBSENDPACKET (10MBMULTICASTP NSHNM2 NSHNM1 -NSHNM0 10MBDESTNSADDRESSBASE 10MBLENGTH 10MBTYPE) READPAGEMAP (PAGE# |filePnPMP0| |filePnPMT0|) -\\TEXTMENU.TOGGLE.DISPLAY (XSIZE YSIZE YDESC) SEDIT::LINEARIZE-CLISP (SEDIT::SUB-NODES SEDIT::SPACE-WIDTH - SEDIT::ENVIRONMENT SEDIT::START-X SEDIT::INDENT-BASE SEDIT::WIDTH SEDIT::LPAREN-STRING SEDIT::INLINE-WIDTH - SEDIT::RIGHT-MARGIN CL:STRUCTURE SEDIT::COMMENT-WIDTH SEDIT::COMMENT-SEPARATION SEDIT::NODE-TYPE -CL:FORMAT SEDIT::LAST-LINE SEDIT::LINEAR-FORM SEDIT::DESTINATION SEDIT::UNASSIGNED SEDIT::ROOT -SEDIT::CURRENT-X SEDIT::RPAREN-STRING) CHECKFPTOVP (|NActivePages| FPOCCUPIED FPVIRTUALPAGE) -\\DSPSCALE2.PSC (IMAGEDATA POSTSCRIPTSCALE) \\TEDIT.UPDATETREE (UPWARD COUNT TOTLEN) -\\DSPBACKCOLOR.DISPLAY (IMAGEDATA DDCOLOR |DDDestination| BITMAPBITSPERPIXEL) WHO-LINE-VMEM (|Key|) -\\DSPSCALE.PSC (IMAGEDATA POSTSCRIPTSCALE) GAINSPACE (PRECHECK MESSAGE KEYLST FORM) \\SMASHBSPSTREAM ( -BSPSOC F1 BSPOUTPUTSTREAM F2 BSPCURRENTPUP F3 MARKPENDING F4 CBUFSIZE CPPTR COFFSET ACCESS) -\\FM.NWAY-MOVEDFN (FM.USERDATA LEFT BOTTOM) OUTPUT (FULLNAME) TB.WINDOW (TBWINDOW) DINFO.LAYOUTGRAPH ( -WINDOW MENUFONT NODELST CHILDREN LABEL PARENT ID) COMP.RETURN-FROM (FRAMETYPE PROGLABELS BLOCKTAG -PARENT BLOCKCONTEXT BLOCKEND) \\DSPCOLOR.DISPLAY (IMAGEDATA DDCOLOR |DDDestination|) PRINTOPCODES (OP# - OPCODENAME OPNARGS OPPRINT LEVADJ UFNFN) SEDIT::PAINT-TO-END-OF-LINE (SEDIT::CURRENT-LINE -SEDIT::REPAINT-LINE SEDIT::REPAINT-X SEDIT::INDENT SEDIT::WINDOW-LEFT SEDIT::DISPLAY-WINDOW -SEDIT::NEXT-LINE-Y SEDIT::YCOORD SEDIT::LINE-HEIGHT SEDIT::LINE-SKIP SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT - SEDIT::WINDOW-RIGHT SEDIT::BASE-LINE-Y SEDIT::REPAINT-START) \\FM.NWAY-MESSAGE (FM.USERDATA) -GETCHARBITMAP (FONTCHARSETVECTOR IMAGEWIDTHS WIDTHS BITMAPBITSPERPIXEL CHARSETBITMAP OFFSETS) -SEDIT::SELECTED-FN-NAME (SEDIT::OPEN-NODE-CHANGED? SEDIT::CARET-POINT SEDIT::POINT-NODE) -\\CORE.CLOSEFILE (ACCESS INFOBLK F1 EPAGE EOFFSET) \\DSPCOLOR.PSC (POSTSCRIPTCOLOR IMAGEDATA) SHAPEW ( -RESHAPEFN WIDTH HEIGHT LEFT BOTTOM NEWREGIONFN) FB.PROMPTW.FORMAT (PROMPTWINDOW) \\RTP.ACTION ( -RTPSTATE PUPCONTENTS LISTENING BSPINPUTSTREAM BSPCURRENTPUP F3 COFFSET CBUFSIZE \#UNREADPUPS -BSPINITTIMER RTPEVENT BSPINPUTEVENT RTPTIMER) \\TEDIT.NEUTRALIZE.CHARLOOKS (\\TEXTOBJ CH#) -\\4DISPLAYINIT (IMXPOSITION IMAGEOPS IMYPOSITION) MB.MARGINBAR.DISPLAYFN (XSIZE YSIZE MARL1 MARLN MARR - MARTABS MARUNIT WIDTH YDESC) SEDIT::RECOMPUTE-FORMAT-VALUES (SEDIT::NODE-TYPE SEDIT::INLINE-WIDTH -SEDIT::SUB-NODES SEDIT::COMPUTE-FORMAT-VALUES SEDIT::ENVIRONMENT) REDISPLAYW (REDISPLAYFN SCREEN) -SETUPPAGEMAP (PRIMARYKEY) SEDIT::OUTPUT-STRING (SEDIT::RELINEARIZATION-TIME-STAMP SEDIT::LINEAR-POINTER - STRING SEDIT::FONT SEDIT::PRIN-2? SEDIT::WIDTH SEDIT::LINEAR-PREV SEDIT::LINE-ASCENT SEDIT::CURRENT-LINE - SEDIT::LINE-DESCENT SEDIT::DISPLAY-WINDOW SEDIT::DEFAULT-FONT SEDIT::ENVIRONMENT SEDIT::CURRENT-X) -SHIFT.BITMAP.DOWN (BITMAPWIDTH BITMAPHEIGHT) \\MAIKO.10MBSTARTDRIVER (NDBCSB) \\10MBSETUPRECEIVER ( -10MBPACKETBASE) COERCETOBITMAP (WIDTH HEIGHT LEFT BOTTOM) CLEAR.LEAF.CACHE (DEVICEINFO PFSLEAFSEQUIN -LEAFCACHEDFILE) \\LEAF.BREAKCONNECTION (DEVICEINFO PFSLEAFSEQUIN OPENP UNREGISTERFILE) \\PRINTFPTOVP ( -|NActivePages|) \\CORE.UPDATEOF (CBUFPTR COFFSET CBUFSIZE CPAGE PAGE OFFSET) FONTMAPARRAY (PRETTYFONT# -) TYPENAME (DTDNAME) \\MAPPNAME (USESILPACKAGE) \\POLYSHADE.XSCAN.IP (BY LX RX WC TY) -\\TEDIT.PROCIDLEFN (MENUFLG) SHOWBUTTON (REGION LABEL) SEDIT::ASSIGN-FORMAT-DOTLIST (SEDIT::SUB-NODES) - GO.TO.FREELINE (ROW) \\FIND.LOCALPUPHOSTNUMBER (PUPNET# PUPHOST#) |\\VFMReadNext| (|used| |data| -|key|) \\CORE.GENERATEFILES (DEVICEINFO IOFILEFULLNAME) \\LOCKFN (DEFINITIONCELL CCODEP DEFPOINTER) -ENDPREAMBLE.IP (IPDATA IMAGEDATA IPPAGEFONTS IPNEXTFRAMEVAR) \\PUPNET.CLOSERP (PUPNET# RTHOPCOUNT) -FROMLINKS (FROMNODES) BKSYSCHARCODE (READ WRITE) \\CHTOPC (COUNT) \\PRINDATUM.TO.STRING (LENGTH -FILL-POINTER FATSTRINGP INDIRECT-P TYPE-NUMBER BASE XBASE OFFST OFFSET) \\CORE.RELEASEPAGES (EPAGE -FILEPAGES IOFILEPAGES INFOBLK F1 PAGENUMBER) BKSYSBUF (PNAMEBASE PNAMELENGTH FATPNAMEP OFFST -INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) SEDIT::CFV-COMMENT ( -SEDIT::COMMENT-WIDTH SEDIT::UNASSIGNED) TEDIT.PUT (STREAMHINT THISLINE FULLNAME FULLFILENAME TEXTLEN -TXTFILE \\XDIRTY EOLCONVENTION PCTB POBJ PFILE NEXTPIECE) \\CORE.FILEINFOFN (COREFILELST) -TEDIT.GET.OBJECT0 (TEXTOBJ F3 PREVPIECE PLOOKS DEFAULTCHARLOOKS POBJ) \\SETPOS.PSC (POSTSCRIPTX -POSTSCRIPTY) CLOSERTPSOCKET (BSPLOCK RTPSTATE RTPEVENT RTPPROCESS) \\BSP.OTHERBOUT (BSPOUTPUTSTREAM F2 -) |\\VFMMerge| (|nextKey| |volumePage| |key|) CH.FINDSERVER (NSORGANIZATION NSDOMAIN OCALLSERVERS -OCDOMAINS DCDOMAIN DCKNOWNSERVERS) \\LOCKWORDS (WORDINPAGE) ENDPAGE.IP (IPDATA IMAGEDATA) -TEDIT.PUT.PCTB2 (FMTSPEC BASE PCTB PLOOKS DEFAULTCHARLOOKS EOLCONVENTION TXTPAGEFRAMES -TXTPARALOOKSLIST TXTCHARLOOKSLIST PPARALAST PLEN PPARALOOKS POBJ PFATP PNEW PFILE FULLNAME -FULLFILENAME PFPOS PSTR OFFST INDIRECT-P OFFSET XBASE LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER -NEXTPIECE CARETLOOKS) \\NSFILING.CONFLICTP (OPENFILELST FULLFILENAME ACCESSBITS) -\\TEDIT.UNIQUIFY.PARALOOKS (TXTPARALOOKSLIST) \\#BLOCKDATACELLS (ARLEN DTDHUNKP DTDSIZE) -\\SMASHABLESTRING (READONLY XREADONLY READ-ONLY-P FATSTRINGP INDIRECT-P TYPE-NUMBER) \\TERPRI.PSC ( -IMAGEDATA POSTSCRIPTY POSTSCRIPTLINESPACING POSTSCRIPTBOTTOMMARGIN |\\SFDescent| POSTSCRIPTFONT -POSTSCRIPTLEFTMARGIN) \\CURVE (DDXOFFSET DDYOFFSET) \\RPLCHARCODE (READONLY XREADONLY READ-ONLY-P -LENGTH FILL-POINTER FATSTRINGP INDIRECT-P TYPE-NUMBER BASE XBASE OFFST OFFSET) PROCESS.EVALV ( -PROCDELETED PROCFX) \\NSRANDOM.DESTROY.STREAM (CBUFDIRTY CPAGE) RPLSTRING (LENGTH FILL-POINTER -PNAMEBASE PNAMELENGTH FATPNAMEP BASE XBASE INDIRECT-P OFFST OFFSET FATSTRINGP TYPE-NUMBER) \\LOCKVAR ( -VCELL) FIND.NEXT.WORD (END NSCHARHASH STOPATOM CPXREALCHAR) SHIFT.BITMAP.LEFT (BITMAPWIDTH -BITMAPHEIGHT) \\CORE.FINDPAGE (COREPAGECACHE F10 PAGENUMBER FILEPAGES IOFILEPAGES INFOBLK F1 -PAGEPOINTER) TEDIT.UNDO.MOVE (THAUXINFO THTEXTOBJ THOLDINFO THCH# SEL LINES TEXTLEN THFIRSTPIECE) -\\TELERAIDRELEASE (NETTYPE) SEDIT::LINEARIZE-DOTLIST (SEDIT::RPAREN-STRING SEDIT::ENVIRONMENT) -INSERTHASHKEY (|#Entries| |Size| |Stream| |ByteStream|) \\CORE.GETINFOBLOCK (INFOBLK F1 COREDIRECTORY -DEVICEINFO) \\CORE.GETFILEINFO (ACCESSBITS) \\8DISPLAYINIT (IMXPOSITION IMAGEOPS IMYPOSITION) -DINFO.SHOWGRAPH (LEFT BOTTOM HEIGHT WIDTH) SPP.READP (ACCESSBITS COFFSET CBUFSIZE) COMP.RETURN ( -FRAMETYPE PARENT) \\NSFILING.CHECK.ACCESS (FSPROTOCOLNAME NSHDATUM) \\COERCETODS (DSP) -\\TEDIT.UNIQUIFY.CHARLOOKS (TXTCHARLOOKSLIST) MB.NB.DISPLAYFN (XSIZE YSIZE YDESC) \\LOCATE.PUPNET ( -RTNET# RTHOPCOUNT) GLCCODE (FILL-POINTER FATSTRINGP INDIRECT-P TYPE-NUMBER BASE XBASE OFFST OFFSET) -\\DSPTOPMARGIN.PSC (POSTSCRIPTTOPMARGIN IMAGEDATA) EDITBM (WIDTH HEIGHT LEFT BOTTOM BITMAPBITSPERPIXEL - BITMAPWIDTH BITMAPHEIGHT) \\COURIER.OUTPUT.ABORTED (BULK.DATA.CONTINUATION F2 INTERNALFLG -FULLFILENAME ACCESSBITS) SEDIT::BACKSPACE-COMMENT (SEDIT::CARET-POINT SEDIT::OPEN-NODE-CHANGED? -CL:STRUCTURE SEDIT::UNASSIGNED SEDIT::SUB-NODES SEDIT::SUPER-NODE SEDIT::SELECTION) FB.DIRECTORYP ( -DIRECTORYFILEP) DINFO.WRITE.GRAPH (TOPNODEID TEXTPROPS LOOKUPFN MENUFN FREEMENUITEMS NODELST USERDATA) - UPDATE/BM/DISPLAY/SELECTED/REGION (BITMAPWIDTH BITMAPHEIGHT) \\RTP.SHOW.FAILURE (BSPFAILURESTRING -PUPSOURCE FRNPORT) ASSURE.PUP.READY (NDBPUPHOST# NDBNEXT NDBPUPNET#) |\\VFMLower| (|fileID| |filePage| -) MBUTTON.FIND.NEXT.BUTTON (PCTB POBJ PLEN NEXTPIECE) SORT.PUPHOSTS.BY.DISTANCE (PUPNET#) -\\NSRANDOM.CREATE.STREAM (NSHACCESS NSHDATUM NSHATTRIBUTES NSFILING.HANDLE F4 NSFILING.SERVER.LENGTH -F2 EPAGE EOFFSET) CL:SYMBOL-PACKAGE (PACKAGE PACKAGEINDEX) \\BSP.HANDLE.INPUT (PUPSOC BSPLOCK PUPTYPE -ACKPENDING RTPTIMEOUT RTPTIMER BSPTIMEOUT BSPTIMER) CREATEDSKDIRECTORY (CLOSEFILE HOSTNAMEP) SHOW.IP ( -IPDATA IMAGEDATA IPSHOWSTREAM GETFILEPTR DEVICE IPXPOS IPCORRECTSTARTX NSCHARSET) FORWARD.DELETE.TO ( -END START NEXTLINE LASTCOL) L-CASE (FATPNAMEP XBASE INDIRECT-P BASE PNAMEBASE PNAMELENGTH FATSTRINGP -TYPE-NUMBER OFFST OFFSET LENGTH FILL-POINTER) \\CORE.GETFILEHANDLE (IOFILEFULLNAME IOEOFFSET IOEPAGE -COREEOLC) TERM.IDENTIFY.SELF (TERM.IDENTITY.STRING OUTSTREAM) CHAT.STARTUP (DPYNAME) SPP.EOFP ( -ACCESSBITS COFFSET CBUFSIZE) \\CORE.GETFILEINFO.FROM.INFOBLOCK (IOEPAGE IOEOFFSET |IOFIBCreationTime| -|IOFIBReadTime| |IOFIBWriteTime| |IOFIBType| COREEOLC) OPT.DS1 (OPNAME OPARG VARS PREV FRAMETYPE -PARENT TAG NXT) STREQUAL (LENGTH FILL-POINTER BASE XBASE INDIRECT-P OFFST OFFSET FATSTRINGP -TYPE-NUMBER) SHIFT.BITMAP.RIGHT (BITMAPWIDTH BITMAPHEIGHT) CARET (CURSOR) TEDIT.UNDO.REPLACE ( -THOLDINFO THCH# SEL THLEN THFIRSTPIECE THPOINT) \\CORE.DELETEFILE (ACCESS INFOBLK F1 OPENP -IOFILEFULLNAME COREDIRECTORY DEVICEINFO) \\10MBRAWENCAPSULATE (10MBDESTHOSTBASE 10MBSOURCEHOSTBASE) -SEDIT::CFV-DOTLIST (SEDIT::WIDTH SEDIT::LPAREN-STRING SEDIT::DEFAULT-FONT SEDIT::SUB-NODES SEDIT::NODE-TYPE - SEDIT::DOT-STRING CL:STRUCTURE SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH) SEDIT::QUOTE-CURRENT-SELECTION - (SEDIT::OPEN-NODE-CHANGED? SEDIT::SELECTION SEDIT::CARET-POINT SEDIT::SELECT-NODE) GNCCODE (LENGTH -FILL-POINTER OFFST INDIRECT-P OFFSET FATSTRINGP TYPE-NUMBER BASE XBASE) SCAVENGEDSKDIRECTORY ( -CLOSEFILE HOSTNAMEP |LVlabel|) SEDIT::OUTPUT-BITMAP (SEDIT::RELINEARIZATION-TIME-STAMP -SEDIT::LINEAR-POINTER SEDIT::LINE-ASCENT SEDIT::CURRENT-LINE SEDIT::LINE-DESCENT) \\CREATEDISPLAYFONT -(FONTCHARSETVECTOR) \\FM.STATE-SELECTEDFN (FM.USERDATA) EDITGETDEF (SEDIT::ICON-TITLE SEDIT::EDIT-TYPE - CL:STRUCTURE SEDIT::SUB-NODES SEDIT::ROOT) %MAKE-ARRAY-WRITEABLE (INDIRECT-P) \\FM.FORMATBYROW ( -HEIGHT) |\\PFRemoveDirectoryID| (|countEntries|) \\10MBRAWRECEIVE (|IOCBType| 10MBTYPE) -BMOBJ.DISPLAYFN (BMOBJSCALEFACTOR BITMAP BMOBJDESCENT) \\TEDIT.CENTER.SEL (CH# DCH) \\LEAF.REQUESTPAGE - (LEAFCONNECTION F1 LEAFCACHECNT FW6 PUPCONTENTS LEAFHANDLE F2) COMP.GO (FRAMETYPE PROGLABELS) -\\FTP.OPEN.CONNECTION (FTPIN) \\CREATE-REAL-CHARSET.DISPLAY (FONTCHARSETVECTOR WEIGHT SLOPE -FONTAVGCHARWIDTH) DEFAULT.INSPECTW.TITLECOMMANDFN (ITEMINFO) \\BUILDSLUGCSINFO (WIDTHS) -\\ITEM.WINDOW.COPY.HANDLER (ITEMINFO) TERM.GODOWN (YPOS BOTTOMMARGIN FONTDESCENT XPOS FONTHEIGHT DSP) -\\LEAF.MAYBE.FLUSH.CACHE (LEAFOPENCLOSELOCK) TB.MAP.DELETED.ITEMS (TB#DELETED TBITEMS TIDELETED) -DINFO.HISTORIC.UPDATE (NODELST MONITORLOCK) SPP.FORCEOUTPUT (SPPOUTPKT SPPINPUTSTREAM SPPOUTPUTSTREAM -XIPLENGTH COFFSET SPPFILEPTRLO FW7 SPPFILEPTRHI FW6 SPPEOMONFORCEOUT XIPCONTENTS SPPOUTPUTABORTEDP -SPPOUTPUTABORTEDFN) \\FM.FORMATBYGRID (HEIGHT LEFT WIDTH) WINDOWWORLDP (SCONOFF) ADDPME (PRIMARYKEY -SECONDARYKEY) DUMPINITPAGES (PRIMARYKEY SECONDARYKEY) TEDIT.GET.CHARLOOKS0 (CLBOLD CLITAL) -\\FM.FORMATBYCOLUMN (WIDTH HEIGHT) OPT.DEADSETQP (OPNAME) AS.NEXT.VERIFIER (NSHNM0 NSHNM1 NSHNM2) -\\POLYSHADE.DISPLAY (BY RX LX WC TY GEOM P X IX IPX IPY MAJOR) \\24DISPLAYINIT (IMXPOSITION IMAGEOPS -IMYPOSITION) \\HANDLE.PUP.ROUTING.INFO (PUPTYPE PUPSOURCEHOST EPNETWORK PUPLENGTH PUPCONTENTS NETTYPE -\#HOPS NET# RTNET# RTHOPCOUNT RTNDB RTGATEWAY# RTRECENT RTTIMER) \\NSFILING.FILLIN.ATTRIBUTES ( -NSHATTRIBUTES NSHDATUM FSPROTOCOLNAME) \\TEDIT.DIFFUSE.PARALOOKS (PPARALAST PPARALOOKS NEXTPIECE -PREVPIECE) \\TEDIT.FOREIGN.COPY? (\\TEXTOBJ DCH CH# TEXTLEN EDITOPACTIVE STREAMHINT) EXTENDREGION ( -LEFT PRIGHT WIDTH BOTTOM PTOP HEIGHT RIGHT TOP) \\DSPBOTTOMMARGIN.PSC (POSTSCRIPTBOTTOMMARGIN -IMAGEDATA) \\CORE.NEXTFILEFN (COREFILELST IOFILEFULLNAME) WRITEIMAGEOBJ (GETFN IMAGEOBJFNS PUTFN) -SEDIT::MUTATE (SEDIT::DISPLAY-WINDOW SEDIT::SELECTION SEDIT::CARET-POINT SEDIT::SELECT-NODE -SEDIT::SELECT-TYPE SEDIT::SELECT-START) SUBREGIONP (LEFT BOTTOM PRIGHT WIDTH PTOP HEIGHT) -|\\LFCloseFile| (ACCESS VOLUME |volNum| FILEDESC F1 EPAGE EOFFSET) SEDIT::NEXT-LINEAR-ITEM ( -SEDIT::LINEAR-THREAD SEDIT::DESTINATION SEDIT::LINEAR-FORM) SEDIT::OUTPUT-SPACE ( -SEDIT::RELINEARIZATION-TIME-STAMP SEDIT::LINEAR-POINTER SEDIT::LINEAR-PREV SEDIT::SPACE-WIDTH -SEDIT::ENVIRONMENT SEDIT::DISPLAY-WINDOW SEDIT::CURRENT-X) GETTOPVAL (VALUE) GETHASHKEY (|Size| -|Stream| |ByteStream|) \\CORE.OPENFILE (ACCESS INFOBLK F1 IOFILEFULLNAME IOEOFFSET IOEPAGE COREEOLC) -FILL.LINE (TY TX FBBT ADDR LLEN LFT RGT BOT TOP TXTW TXTH TXTA BITS) SPP.BACKFILEPTR (COFFSET) -CHECKIFPAGE (|Key|) |\\LFFileSpec| (VOLNUM VERSION) DIRECTORY.NEXTFILE (FILEGENERATORS) -|\\VFMGenerateFileIDs| (|nextKey| |fileID| |type|) MBUTTON.FIND.NEXT.FIELD (PCTB SCRATCHSEL TEXTLEN -CLSELHERE PLOOKS PLEN NEXTPIECE CLPROTECTED) \\FM.STATE-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN -FM.SYSSELECTEDFN FM.USERDATA FM.STATE) MSEDITE (FILEPKGNAME) SPY.BUTTON (XCOORD YCOORD) \\FM.FORMAT ( -WIDTH HEIGHT) \\SFROTATECSINFO (CHARSETBITMAP) \\10MBRAWTRANSMIT (10MBPACKETBASE 10MBLENGTH) -BMOBJ.IMAGEBOXFN (BMOBJSCALEFACTOR BITMAP BMOBJDESCENT) \\LEAF.LOOKUPCACHE (LEAFPAGECACHE F3) -COMP.PROG (VARS DECLS) \\OPENLEAFCONNECTION (PUPCONTENTS LEAFLENGTH SEQSTATE EPUSERFIELD SEQEVENT -LEAFOPCODE LEAFERRORCODE) OPT.DELCOPYFN (NXT OPARG OPNAME PREV) COURIER.CALL (ARGS) \\DOHARDRETURN ( -|HardReturnFXP|) \\DOHARDRETURN1 (FNHEADER FRAMENAME \#FRAMENAME CLINK FASTP SLOWP \#ALINK \#CLINK -ALINK DUMMYBF USECNT NEXTBLOCK FLAGS SIZE IVAR BLINK \#BLINK VALIDNAMETABLE NAMETABHI NAMETABLO) -\\DSPSPACEFACTOR.PSC (IMAGEDATA POSTSCRIPTSPACEFACTOR POSTSCRIPTNATURALSPACEWIDTH) \\SETARG0 (BLINK -FASTP SLOWP DUMMYBF \#BLINK NARGS IVAR PADDING) TEDIT-BOOK (TEXTLEN) POSTINITARRAYS (SEGMENT# -CELLINSEGMENT WORDINSEGMENT) COPY.TEXT.TO.IMAGE (NOTXCCS INCCODEFN EOFP DEVICE) FIND.LINE (END -NEXTLINE START) HASH.PASSWORD (OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP -TYPE-NUMBER) \\CORE.SETFILEPTR (PAGE OFFSET CPAGE ACCESSBITS COFFSET) \\ROUTE.PUP (PUPDESTNET -PUPDESTHOST RTNDB RTHOPCOUNT RTGATEWAY# NETTYPE PUPLENGTH NDBPUPTYPE NDBPUPNET# PUPSOURCEHOST -NDBPUPHOST#) ERASE/GRAPHNODE (NODEHEIGHT XCOORD YCOORD NODEWIDTH) \\NSFILING.FULLNAME (NSHNAME -NSHATTRIBUTES NSROOTNAME NSDIRECTORIES NSDIRECTORYP NSVERSION NSHASPERIOD FSNAMESTRING) -\\CORE.BACKFILEPTR (ACCESSBITS FULLNAME FULLFILENAME COFFSET CPAGE CHARPOSITION) -\\FM.STATE-CHANGESTATE (FM.STATE) SEDIT::NEW-BLOCK (SEDIT::CURRENT-BLOCK SEDIT::CURRENT-X -SEDIT::LINEAR-POINTER) BLTSHADE (IMBLTSHADE IMAGEOPS) \\NSRANDOM.REESTABLISH (NSFILING.HANDLE F4 -DEVICEINFO DEVICE NSHFILEID FULLFILENAME ACCESS) \\GETINTEGERPART (HINUM) \\DECUSECOUNT (INVALIDP -USECNT ALINK \#ALINK BLINK FASTP SLOWP DUMMYBF \#BLINK CLINK \#CLINK SIZE NEXTBLOCK RESIDUAL IVAR) -U-CASEP (PNAMEBASE PNAMELENGTH FATPNAMEP OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER -FATSTRINGP TYPE-NUMBER) \\EDITBMHOWMUCH (BITMAPWIDTH BITMAPHEIGHT) DO.EDIT.COMMAND (END START LASTSKIP - LASTSKIPCHAR NSCHARHASH STOPATOM CPXREALCHAR) \\INCUSECOUNT (INVALIDP USECNT NEXTBLOCK FLAGS FASTP -SLOWP DUMMYBF \#ALINK) \\PUTBASESTRING (BASE XBASE INDIRECT-P OFFST OFFSET LENGTH FILL-POINTER -FATSTRINGP TYPE-NUMBER PNAMEBASE PNAMELENGTH FATPNAMEP) \\PUPGATELISTENER (PUPSOCEVENT) WINDOWPOSITION - (LEFT BOTTOM) \\NSFILING.HANDLE.ERROR (FSSESSIONLOCK) \\DOSTACKOVERFLOW (|ResetFXP| |SubovFXP|) -\\FM.NWAY-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN FM.USERDATA) -INSPECTW.REPAINTFN (TOP BOTTOM HEIGHT SELECTABLEITEMREGION PTOP ITEMINFOTYPE ITEMINFO) \\MOVEFRAME ( -NEXTBLOCK FLAGS SIZE |EndOfStack| VALIDNAMETABLE NAMETABHI BLINK FASTP SLOWP DUMMYBF \#BLINK \#ALINK -NAMETABLO RESIDUAL) \\CORE.PACKFILENAME (DEVICENAME) \\SPP.BOUTS (SPPINPUTSTREAM SPPOUTPUTSTREAM) -\\COREFILE.SETPARAMETERS (INFOBLK F1 |IOFIBType|) COMP.LAMBDA (OPNAME OPARG VARS DECLS) -\\MAKEWRITABLESTRING (FATSTRINGP INDIRECT-P TYPE-NUMBER) \\CORE.SETACCESSTIME (INFOBLK F1) -\\CORE.GETFILENAME (COREDIRECTORY DEVICEINFO) \\3MBRAWRECEIVE (3MBBASE PBIRAWSTART PBILENGTH 3MBTYPE) -\\TEDIT.BOLD.CARET.ON (CARETLOOKS) FONTCOPY (FONTFAMILY FONTSIZE FONTFACE ROTATION FONTDEVICE) -\\SFMAKEITALIC (WIDTHS OFFSETS CHARSETASCENT CHARSETDESCENT CHARSETBITMAP BITMAPWIDTH BITMAPHEIGHT) -\\INIT-MISCN-TABLE (BASE INDEX MVS) \\FONTFILENAME (WEIGHT SLOPE EXPANSION) %MAKE-STRING-ARRAY-FAT ( -INDIRECT-P TOTAL-SIZE) \\GCSCANSTACK (|StackBase| |EndOfStack| FLAGS FIRSTPVAR FXSIZE FNHEADER NLOCALS - BOUND PVHI NEXTBLOCK VALIDNAMETABLE NAMETABHI NAMETABLO OVERHEADWORDS NTSIZE FIRSTTEMP NPVARWORDS PV -PADDING VALIDPOINTERP STACKNONPOINTERBITS SIZE) MBUTTON.FIND.BUTTON (PCTB POBJ PLEN NEXTPIECE) -\\FONTFACE.COLOR (COLOR) \\EXTENDSTACK (|EndOfStack|) \\GENERIC-UNREGISTER-STREAM (OPENFILELST) -\\PARSE.NUMBER (COMMONLISP COMMONNUMSYNTAX) GETNSPRINTER (NSPRINTERNAME NSPRINTERADDRESS) -SEDIT::LINE-FINISHED (SEDIT::CURRENT-LINE SEDIT::NEXT-LINE-Y SEDIT::YCOORD SEDIT::LINE-HEIGHT -SEDIT::LINE-SKIP SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::WINDOW-TOP SEDIT::CURRENT-BLOCK -SEDIT::BLOCK-NEW-X SEDIT::NEXT-BLOCK SEDIT::FIRST-BLOCK SEDIT::INDENT) \\ADD-OPEN-STREAM (OPENFILELST) - EDITBMRESHAPEFN (BITMAPWIDTH BITMAPHEIGHT LEFT BOTTOM BITMAPBITSPERPIXEL) \\SETUPUSERSTACK ( -|EndOfStack| |MachineType|) FB.FETCHFILENAME (FILENAME TIDATA) MAKEROOMFORPME (PRIMARYKEY) -\\FM.3STATE-CHANGESTATE (FM.STATE FM.BITMAP FM.USERDATA FM.REGION) MSEDITF (FILEPKGNAME) -\\CORE.GETNEXTBUFFER (CPAGE COFFSET ACCESSBITS FULLNAME FULLFILENAME CBUFSIZE CBUFPTR EPAGE EOFFSET) -\\PAGEDGETEOFPTR (EPAGE EOFFSET) |\\VAMAdjustGroup| (|filePage| |nextFilePage| |volumePage|) -SEDIT::MENU-SELECTEDFN (SEDIT::COMMAND-TABLE SEDIT::ENVIRONMENT) \\PAGEDGETFILEPTR (CPAGE COFFSET) -\\FONTFILENAME.OLD (WEIGHT SLOPE) \\FTP.FIX.BROKEN.INPUT (FULLFILENAME FTPFILEPROPS F5 FTPIN) -TERM.ERASE.IN.DISPLAY (TTYWIDTH XPOS YPOS FONTHEIGHT FONTDESCENT HOMEPOS WINDOW DSP) TB.ITEM.DELETED? -(TIDELETED) \\CORE.SETEOFPTR (ACCESSBITS PAGE OFFSET CPAGE) |\\LFFullFileName| (VERSION |LVlabel| -VOLNUM) \\NODIRCORE.OPENFILE (ACCESS INFOBLK F1 IOFILEFULLNAME IOEOFFSET IOEPAGE COREEOLC) -CL:SYMBOL-NAME (PNAMELENGTH FATPNAMEP PNAMEBASE) \\PAGEDEOFP (ACCESSBITS COFFSET CPAGE CBUFPTR -CBUFSIZE EPAGE EOFFSET) \\ALLOCBLOCK (TRAILER ARLEN) \\DSPCLIPPINGREGION.PSC (IMAGEDATA -POSTSCRIPTCLIPPINGREGION LEFT BOTTOM WIDTH HEIGHT) \\LEAF.ABORT.FROMMENU (SEQEVENT) SETA (READONLY -BASE ORIG LENGTH OFFST TYP) \\SPP.GETFILEPTR (SPPFILEPTR SPPFILEPTRHI FW6 SPPFILEPTRLO FW7 COFFSET) -TB.COLLECT.ITEMS (TBITEMS) \\MENUSUBITEMS (SUBITEMFN) \\PS.SCALEHACK (IMAGEDATA POSTSCRIPTSCALEHACK -POSTSCRIPTCLIPPINGREGION POSTSCRIPTPAGEREGION LEFT BOTTOM WIDTH HEIGHT POSTSCRIPTX POSTSCRIPTY -POSTSCRIPTLEFTMARGIN POSTSCRIPTRIGHTMARGIN POSTSCRIPTBOTTOMMARGIN POSTSCRIPTTOPMARGIN POSTSCRIPTTRANSX - POSTSCRIPTTRANSY) \\POSTSCRIPT.OUTCHARFN (IMAGEDATA POSTSCRIPTX POSTSCRIPTFONT POSTSCRIPTSPACEWIDTH -POSTSCRIPTWIDTHS POSTSCRIPTACCENTED POSTSCRIPTRIGHTMARGIN POSTSCRIPTY FONTSIZE FONTFACE -POSTSCRIPTCHARSTOSHOW) SEDIT::STRINGIFY (SEDIT::STRINGIFY SEDIT::NODE-TYPE) \\TEDIT.BOLD.CARET.OFF ( -CARETLOOKS) CLOSEALL (USERVISIBLE) |\\PFPilotVolumeP| (|type|) OPT.EQVALUE (OPNAME OPARG PREV) -MAPATOMS (DTDSIZE DTDFREE PAGE#) DELETEHASHKEY (|Stream| |ByteStream| |#Entries|) TB.ITEM.SELECTED? ( -TISELECTED) TEDITWINDOWP (\\WINDOW) OPT.EQOP (OPNAME OPARG) REGIONSINTERSECTP (LEFT RIGHT WIDTH BOTTOM - TOP) |\\LFScavFileName| (OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP -TYPE-NUMBER) TEDIT.GET.OBJECT1 (TEXTOBJ F3 PREVPIECE PLOOKS DEFAULTCHARLOOKS POBJ) BOTTOMOFGRIDCOORD ( -BOTTOM HEIGHT) SCALE/TONODES (TONODES) BEGINPREAMBLE.IP (IPDATA IMAGEDATA) %ARRAY-BASE (BASE) -\\ALLOCHEIGHTTOGROUPEDWINDOW (ATTACHEDW ATWHEREONEDGE ATNOWY ATYSIZE ATNOWX ATMAXY) BSPFRNADDRESS ( -BSPSOC F1 FRNPUPADDRESS FRNPORT FRNSOCKET) \\CH.UPDATE.CACHE (NSOBJECT NSORGANIZATION NSDOMAIN -OCORGANIZATION OCDOMAINS DCDOMAIN DCKNOWNSERVERS OCALLSERVERS) \\MKATOM (PNAMELENGTH PNAMEBASE -PNAMEFATPADDINGBYTE FATPNAMEP) DELETETO1 (CPXPRINTCHARS) \\POPSTATE.IP (XPOS YPOS) \\FONTFILENAME.NEW -(WEIGHT SLOPE EXPANSION) \\NSRANDOM.RELEASE.LOCK (NSHDATUM) \\ALLOCWIDTHTOGROUPEDWINDOW (ATTACHEDW -ATWHEREONEDGE ATNOWX ATXSIZE ATNOWY ATMAXX) TEDIT.HCPYFILE (TXTFILE FULLFILENAME) FILL.INITTBLE ( -IMAGEDATA |DDClippingTop| |DDClippingBottom| |DDClippingLeft| |DDClippingRight| DDOPERATION -|DDDestination| BITMAPBITSPERPIXEL |DDTexture| BITMAPBASE BITMAPRASTERWIDTH BITMAPWIDTH BITMAPHEIGHT -DDXOFFSET DDYOFFSET) HASHFILEDATA (|File| |ValueType| |ItemLength| |#Entries|) LISPVERSION (|LVersion| -) \\TEDIT.MARK.LINES.DIRTY (TEXTLEN \\WINDOW CHAR1 CHARTOP NEXTLINE) \\GATHER-CLEANUP-FORMS (PROCFX) -|\\LFUnpackName| (VOL NAME OFFST INDIRECT-P OFFSET BASE XBASE LENGTH FILL-POINTER FATSTRINGP -TYPE-NUMBER VERSION) \\COURIER.ATTENTIONFN (SPPSUBSTREAM ACCESSBITS EOFP DEVICE) OPT.JUMPCOPYTEST ( -OPNAME OPARG PREV) \\CLIPANDDRAWLINE1 (BITMAPRASTERWIDTH BITMAPBITSPERPIXEL BITMAPHEIGHT BITMAPBASE) -FROM.SCREEN.BITMAP (SCREEN REGION WIDTH HEIGHT LEFT BOTTOM) ATOMHASH#PROBES (PNAMEBASE PNAMELENGTH -FATPNAMEP BASE XBASE INDIRECT-P OFFST OFFSET LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) -\\3MBRAWTRANSMIT (PBIRAWSTART 3MBBASE 3MBLENGTH) SEDIT::COPY-SELECTION (SEDIT::POINT-NODE -SEDIT::DISPLAY-WINDOW SEDIT::COPY-SELECTION SEDIT::NODE-TYPE SEDIT::SELECT-NODE) \\DSPRESET.PSC ( -IMAGEDATA POSTSCRIPTLEFTMARGIN POSTSCRIPTTOPMARGIN POSTSCRIPTFONT) SEDIT::LAST-LINE-LINEAR ( -SEDIT::LAST-LINE SEDIT::PREV-LINE SEDIT::NEXT-LINE SEDIT::LINEAR-FORM SEDIT::ROOT) ELT (BASE ORIG -LENGTH OFFST TYP) ARRAY (BASE) \\SPP.GETNEXTBUFFER (SPPERRORHANDLER SPPINPUTSTREAM SPPOUTPUTSTREAM) -\\FM.3STATE-DOWNFN (FM.USERDATA LEFT BOTTOM) FB.PROMPTWPRINT (PROMPTWINDOW) SPY.PRINT (NAME) -\\READSTRIKEFONTFILE (BITMAPBASE OFFSETS WIDTHS) PUTD (FRAMENAME \#FRAMENAME) TERM.CLEAR.TAB ( -TERM.TAB.STOPS) SEDIT::GENERATE-LINEAR-FORM (SEDIT::CURRENT-X SEDIT::LINEARIZE SEDIT::NODE-TYPE SEDIT::ROOT - SEDIT::START-X SEDIT::CHANGED? SEDIT::ACTUAL-WIDTH SEDIT::RIGHT-MARGIN SEDIT::INLINE? SEDIT::FIRST-LINE - SEDIT::LAST-LINE SEDIT::CURRENT-LINE SEDIT::SUPER-NODE SEDIT::LINEAR-FORM) TB.UNSELECT.ALL.ITEMS ( -TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM TISELECTED TB#ITEMS) \\READACFONTFILE (LEFTKERN IMAGEWIDTHS -WIDTHS FBBBOY FBBBDY OFFSETS BBDY BBOX BBDX BITMAPBASE BBOY) DELETE.TO.END (NEXTLINE) -|\\LFOpenOldFile| (|AllocatedPages| |EofPage| |EOffSet|) \\FM.3STATE-SETUPOFFBITMAP (FM.USERDATA LEFT -BOTTOM WIDTH HEIGHT FM.HIGHLIGHT) \\SFLHASHLOOKUP (HASHMASK HASHFIRSTOFFSET HASHPAGE#) OPT.PRATTACH ( -NXT) \\DELETETREE (TOTLEN COUNT UPWARD) \\FONTRESETCHARWIDTHS (OFFSETS WIDTHS) \\DRAWPOLYGON.PSC ( -IMAGEDATA BRUSHSIZE BRUSHSHAPE BRUSHCOLOR POSTSCRIPTSCALE XCOORD YCOORD) FINDPCNODE (PTREENODE) -SI::PVAR-VALUE-IN-FRAME (OVERHEADWORDS FNHEADER NTSIZE BOUND FIRSTPVAR FXSIZE PVHI PVVALUE) -FB.SELECTEDFILES (TABLEBROWSER) ICONPOSITION.FROM.WINDOW (SCREEN LEFT SCWIDTH PRIGHT WIDTH BOTTOM -SCHEIGHT PTOP HEIGHT) LOOKUPHASHFILE (|Stream|) %ARRAY-TYPE-NUMBER (TYPE-NUMBER) SI::UNWIND-TO-BLIP ( -INVALIDP CLINK FASTP SLOWP \#ALINK \#CLINK FIRSTPVAR FXSIZE) CL:FIND-SYMBOL (BASE XBASE INDIRECT-P -OFFST OFFSET LENGTH FILL-POINTER FATSTRINGP TYPE-NUMBER) \\STKMIN (OPCODENAME LEVADJ BASE STARTPC NA -PV) SHADEGRIDBOX (WIDTH HEIGHT) \\POSTSCRIPTTAB (FONTAVGCHARWIDTH POSTSCRIPTFONT POSTSCRIPTX -POSTSCRIPTLEFTMARGIN) \\RENAMEDFN (FNHEADER STARTPC) \\FINDOP (OPCODENAME OP#) \\BASEBYTES.BLOCKIO ( -CBUFPTR COFFSET EOFFSET ENDOFSTREAMOP) \\TELERAIDEXIT (NETTYPE TROLDCSB TROLDCURSOR) -\\SFROTATECSINFOOFFSETS (OFFSETS WIDTHS CHARSETBITMAP) \\DISCARDFRAME (ALINK \#ALINK CLINK FASTP SLOWP - \#CLINK DUMMYBF BLINK \#BLINK SIZE NEXTBLOCK USECNT RESIDUAL IVAR) ROTATE-BITMAP (BITMAPBASE -BITMAPRASTERWIDTH PBTDESTBIT PBTSOURCE PBTSOURCEHI PBTSOURCELO) \\BASEBYTES.IO.INIT (COFFSET BIASOFFST - FW6 EOFFSET) SEDIT::FIRST-LINE-LINEAR (SEDIT::FIRST-LINE SEDIT::PREV-LINE SEDIT::NEXT-LINE -SEDIT::LINEAR-FORM SEDIT::ROOT) \\SPP.SETFILEPTR (ACCESSBITS) DECODE/WINDOW/OR/DISPLAYSTREAM (WTITLE -DSP) \\BSP.CLOSE.OPEN.SOCKETS (RTPSTATE RTPPROCESS) \\TEDIT.GET.CHARLOOKS1 (CLBOLD CLITAL) -CURRENT.WORD (START NSCHARHASH CPXREALCHAR STOPATOM) PFCOPYBYTES (ENDOFSTREAMOP NOTXCCS INCCODEFN) -ROTATE-BITMAP-LEFT (BITMAPBASE BITMAPRASTERWIDTH PBTSOURCEBIT PBTDEST PBTDESTHI PBTDESTLO) GETD ( -DEFINITIONCELL DEFPOINTER CCODEP) \\BASEBYTES.READP (COFFSET EOFFSET CBUFPTR) \\TEDIT.SHOWSELS (SEL -SHIFTEDSEL MOVESEL DELETESEL SET) \\SFMAKECOLOR (CHARSETBITMAP) PROCESSPROP (PROCWINDOW PROCPRIORITY -PROCNAME RESTARTABLE PROCFORM PROCINFOHOOK PROCAFTEREXIT PROCBEFOREEXIT PROCTTYENTRYFN PROCTTYEXITFN -PROCUSERDATA PROCRESTARTFORM) \\BASEBYTES.PEEKBIN (COFFSET FULLNAME EOFFSET ENDOFSTREAMOP CBUFPTR) -PRINTCURSOR (CUIMAGE CUMASK) %ARRAY-OFFSET (OFFSET) \\GETSPP (SPPLOCK SPPINPUTQ SPPACKNO SEQNO -XIPCONTENTS SPPACCEPTNO SPPINPUTBLOCKED SPPTERMINATEDP SPPINPUTEVENT) \\PUTD (DEFINITIONCELL FNHEADER -ENVIRONMENT TYP BASE ARGTYPE NTSIZE) |\\LFDirectoryP| (FILEDESC F1 |version| LEADERPAGE F2) -UNIONREGIONS (LEFT PRIGHT WIDTH BOTTOM PTOP HEIGHT) LEFTOFGRIDCOORD (LEFT WIDTH) TRANSLATEREG (LEFT -BOTTOM WIDTH HEIGHT) \\IRM.CHOOSE.REF (TYPE PRIMARYFLG) BREAKLINE (END START) MENUWRESHAPEFN ( -MENUOUTLINESIZE WIDTH HEIGHT TITLE MENUCOLUMNS MENUGRID MENUROWS) \\BASEBYTES.BOUT (COFFSET EOFFSET -WRITEXTENSIONFN F1 CBUFPTR) \\BASEBYTES.BIN (COFFSET) FASL::FAT-STRING-P (TYP INDIRECT-P TYPE-NUMBER) -SEDIT::INSERT (SEDIT::POINT-NODE SEDIT::SELECTION SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SUPER-NODE -) DISPLAYLINK/RL (XCOORD YCOORD NODEPOSITION) BSPREADP (MARKPENDING F4 BSPCURRENTPUP F3 COFFSET -CBUFSIZE \#UNREADPUPS BSPSOC F1 PUPTYPE BSPINPUTQ) \\TEXTMENU.START (LEFT TOP BOTTOM HEIGHT WIDTH -TEXTOBJ F3 PROMPTWINDOW) \\FILLPOLYGON.PSC (BITMAPWIDTH BITMAPHEIGHT XCOORD YCOORD BITMAPRASTERWIDTH) -\\BASEBYTES.NAME.FROM.STREAM (FULLFILENAME CBUFPTR BIASOFFST FW6) \\BASEBYTES.SETFILEPTR (BIASOFFST -FW6 EOFFSET) \\TEDIT.RESHAPEFN (HEIGHT WIDTH SEL YBOT CHAR1 NEXTLINE LHEIGHT DESCENT) RELSTKP (EDFXP -INVALIDP CLINK FASTP SLOWP \#ALINK \#CLINK FRAMENAME NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER -\#FRAMENAME) FB.TABLEBROWSER (TABLEBROWSER) \\CLIPANDDRAWLINE (BITMAPBITSPERPIXEL) STRING.EQUAL ( -PNAMELENGTH PNAMEBASE FATPNAMEP LENGTH FILL-POINTER BASE XBASE INDIRECT-P OFFST OFFSET FATSTRINGP -TYPE-NUMBER TYP) \\FM.3STATE-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN FM.USERDATA -) \\TEDIT.CUMULATE.EVENTS (THLEN THFIRSTPIECE PLEN NEXTPIECE) TEDIT.SCANSEL (TEXTOBJ F3 SEL SET CH# -DCH) \\LEAF.SETCREATIONDATE (PUPCONTENTS LEAFHANDLE F2 LEAFCONNECTION F1) \\LEAF.DELETEFILE ( -PUPCONTENTS LEAFHANDLE F2 LEAFCONNECTION F1 FULLFILENAME) |\\LFCreateDevice| (CLOSEFILE HOSTNAMEP) -CLEARSTK (STACKP0 EDFXP) GETHASHTEXT (|Stream| |Start| |End|) \\GET-COMPILED-CODE-BASE (CCODEP -DEFPOINTER FNHEADER) SI::VARIABLE-NAME-IN-FRAME (NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER -OVERHEADWORDS NTSIZE) \\MAKEBASEBYTESTREAM (DEVICE) TB.DESELECTRANGE (TBFIRSTSELECTEDITEM -TBLASTSELECTEDITEM TB#ITEMS) |\\LFCreateFile| (VOLNUM FILEDESC F1) INSPECTW.REDISPLAY ( -SELECTABLEITEMREGION) GRIDXCOORD (LEFT WIDTH) \\LINEWITHBRUSH (IMAGEDATA |DDClippingBottom| -|DDClippingTop| |DDClippingRight| |DDClippingLeft| |DDDestination| DDOPERATION BITMAPBITSPERPIXEL -BITMAPBASE BITMAPRASTERWIDTH BITMAPHEIGHT BITMAPWIDTH DDXOFFSET DDYOFFSET) \\TEDIT.CLOSEUPLINES ( -WRIGHT WLEFT YBOT WTOP LHEIGHT WBOTTOM DESCENT NEXTLINE CHARLIM TEXTLEN) \\MBS.OUTCHARFN (BBSNCHARS -FW7) \\SETUPSTACK1 (STKMIN FIRSTPVAR FXSIZE PV PADDING) \\STRINGWIDTH.PSC (IMAGEDATA POSTSCRIPTFONT -POSTSCRIPTSPACEWIDTH) MAKENEWCOM (NEWCOM) FB.UPDATEBROWSERITEMS (BROWSERWINDOW TABLEBROWSER PATTERN -INFOMENUCHOICES INFONAME INFOPROTOTYPE INFOFORMAT COUNTERWINDOW HEADINGWINDOW VERSIONLESSNAME -DIRECTORYFILEP FILENAME) EDITBMSCROLLFN (BITMAPWIDTH BITMAPHEIGHT LEFT BOTTOM HEIGHT WIDTH) -CHECK.MARGIN (END LASTCOL START NEXTLINE) COPYIMAGEOBJ (OBJECTDATUM IMAGEOBJPLIST IMAGEOBJFNS) -|\\VFMPutNext| (|key| |data| |volumePage| |nextKey|) BEGINPAGE.IP (IPDATA IMAGEDATA) SEDIT::SELECT-SEGMENT - (SEDIT::SELECT-SEGMENT SEDIT::NODE-TYPE) TEDIT.RAW.INCLUDE (SEL TXTRAWINCLUDESTREAM SET TXTREADONLY -TEXTLEN PCTB PLEN \\WINDOW \\XDIRTY TXTFILE) TEDIT.OBJECT.CHANGED (LINES POBJ \\XDIRTY TXTFILE SEL) -BIT.IN.ROW (BITMAPWIDTH) BSPEOFP (BSPOUTPUTSTREAM F2 MARKPENDING F4 BSPCURRENTPUP F3 COFFSET CBUFSIZE) - \\RESETSTACK0 (|StackBase| TELERAIDFXP |MiscFXP| CCODEP FLAGS |SubovFXP|) HASHFILEP (|Write?| -|Valid?|) TERM.ERASEBITS (DSP) SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (SEDIT::DISPLAY-WINDOW -SEDIT::WINDOW-BOTTOM SEDIT::WINDOW-LEFT SEDIT::WINDOW-RIGHT SEDIT::NEXT-LINE-Y SEDIT::LAST-LINE -SEDIT::YCOORD SEDIT::LINE-HEIGHT SEDIT::LINE-SKIP SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT) -TB.UNSELECT.ITEM (TISELECTED TI#) \\SPP.EVENTFN (DEVICEINFO) ICMLARRAY.GETMENUWGROUP (XCOORD YCOORD -HEIGHT WIDTH) OPT.SKIPPUSH (OPNAME PREV OPARG) MAXMENUITEMWIDTH (ITEMS MENUFONT MENUUSERDATA -BITMAPWIDTH) EDIT.BITMAP (CUIMAGE CUHOTSPOTX CUHOTSPOTY) WRITESTRIKEFONTFILE (FONTCHARSETVECTOR WIDTHS - OFFSETS IMAGEWIDTHS HIBYTE LOBYTE BITMAPRASTERWIDTH CHARSETBITMAP |\\SFHeight| CHARSETASCENT -CHARSETDESCENT BITMAPBASE) PRINTERDEVICE (DEVICE DEVICENAME FULLNAME FULLFILENAME DELETEFILE) -\\TELERAIDENTRY (TROLDCURSOR TRCURSOR NETTYPE TROLDCSB) COURIER.EXECUTE.CALL (HIBYTE LOBYTE PROGRAM# -VERSION# FN#) STRIKECSINFO (WIDTHS IMAGEWIDTHS OFFSETS CHARSETBITMAP YWIDTHS CHARSETASCENT -CHARSETDESCENT) MENUWMINSIZEFN (MENUBORDERSIZE MENUOUTLINESIZE MENUCOLUMNS TITLE MENUROWS) -\\LEAF.GETFILE (DEVICEINFO PFSLEAFSEQUIN LEAFCACHEDFILE LEAFOPENCLOSELOCK FULLFILENAME LEAFREALLYOPEN -F5 PUPCONTENTS LEAFSTATUS EPUSERFIELD FILEADDRESS HANDLE PAGE OFFSET) \\CH.CHECK.CLEARINGHOUSE ( -NSORGANIZATION NSDOMAIN) |\\VAMEnoughSpace| (|type| |freePageCount|) TOPW.BUTTONEVENTFN (PROP) SEDIT::JOIN - (SEDIT::DISPLAY-WINDOW SEDIT::SELECTION SEDIT::CARET-POINT SEDIT::SELECT-NODE SEDIT::SELECT-START -SEDIT::SELECT-END SEDIT::OPEN-NODE-CHANGED? SEDIT::SELECT-TYPE SEDIT::NAME SEDIT::NODE-TYPE -SEDIT::SUB-NODES CL:STRUCTURE SEDIT::UNASSIGNED) COMP.CALL (EXTCALL) \\STRINGSTREAM.INIT (F1 -FULLFILENAME F2) TB.SELECTRANGE (TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM TIUNSELECTABLE TIDELETED) -DECODE.WINDOW.ARG (XCOORD YCOORD) COMP.DECLARE1 (VARS OPARG OPNAME) COMP.LAM1 (OPNAME OPARG) -|\\LFUpdateLeaderPage| (LEADERPAGE F2 EPAGE EOFFSET |size| FILEDESC F1) |\\LFGetStreamForFile| ( -FSDIRPTR EXPANDEDNAME VOLNUM VERSION) \\FM.TOGGLE-CHANGESTATE (FM.STATE FM.BITMAP FM.USERDATA -FM.REGION) OPT.DELCODE (OPNAME OPARG FRAME NXT) IRM.CREF.BUTTONEVENTFN (XSIZE YSIZE) -ICMLARRAY.GETREGIONFN (RIGHT LEFT WIDTH TOP BOTTOM HEIGHT XCOORD YCOORD) HPRINT.IMAGEOBJ (GETFN -IMAGEOBJFNS PUTFN) \\CAUSEINTERRUPT (|StackBase| NEXTBLOCK SIZE) POSTSCRIPT.OUTSTR (FATSTRINGP -INDIRECT-P TYPE-NUMBER OFFST OFFSET BASE XBASE LENGTH FILL-POINTER PNAMEBASE PNAMELENGTH FATPNAMEP) -MB.COPYFN (OBJECTDATUM IMAGEOBJPLIST IMAGEOBJFNS) SEDIT::GROW-SELECTION (SEDIT::GROW-SELECTION -SEDIT::NODE-TYPE SEDIT::SELECT-NODE) GRIDYCOORD (BOTTOM HEIGHT) \\BSP.GETFILEPTR (BSPFILEPTR -BSPFILEPTRHI FW6 BSPFILEPTRLO FW7 CPPTR COFFSET) OPENSTRINGSTREAM (FATSTRINGP INDIRECT-P TYPE-NUMBER -BASE XBASE OFFST OFFSET LENGTH FILL-POINTER) DSPDESTINATION (IMAGEDATA |DDDestination|) RETURN ( -FRAMENAME NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER \#FRAMENAME CLINK FASTP SLOWP \#ALINK \#CLINK -INVALIDP) \\FBITMAPBIT.UFN (BITS) \\CHARWIDTH.PSC (POSTSCRIPTSPACEWIDTH IMAGEDATA WIDTHS -FONTCHARSETVECTOR POSTSCRIPTFONT) SEDIT::RELINEARIZE-PRELINEARIZED-NODE (SEDIT::LINEAR-FORM) -\\BASEBYTES.TRUNCATEFN (BIASOFFST FW6 EOFFSET) UPDATEPCNODES (PTREENODE COUNT TOTLEN UPWARD) -CHAT.SCREENPARAMS (CHATINEMACS) \\CREATE.TTYDISPLAYSTREAM (LEFT BOTTOM WIDTH HEIGHT) \\BITBLT.BITMAP ( -BITMAPHEIGHT BITMAPBITSPERPIXEL BITMAPWIDTH LEFT BOTTOM WIDTH HEIGHT) INTERRUPTED (ETHERINTERRUPT -LOGMSGSPENDING IOINTERRUPT STORAGEFULL STACKOVERFLOW VMEMFULL GCDISABLED WAITINGINTERRUPT INTCHARCODE -INTERRUPTLIST) \\LEAF.STREAM.IN.QUEUE (SYSQUEUEHEAD SEQDONEQ SEQRETRANSMITQ EPUSERFIELD FULLFILENAME -LEAFOPCODE PUPCONTENTS ACCESSBITS EPLINK) SEDIT::CLEAR-LINEAR-FORM (SEDIT::LINEARIZE SEDIT::NODE-TYPE) - TOPW.ADJUSTSELECTION (PROP) WOVERLAPP (REG) \\DOMISCAPPLY1 (MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) -\\SETTOTALTIME (STARTTIME) MAXMENUITEMHEIGHT (MENUFONT ITEMS BITMAPHEIGHT) BIT.IN.COLUMN (BITMAPHEIGHT -) BREAKCONNECTION (BREAKCONNECTION DEVICENAME) \\TELERAIDSEND (PUPDESTHOST PUPDESTNET -PUPSOURCESOCKETHI PUPSOURCESOCKETLO PUPBASE PUPLENGTH NETTYPE 3MBDESTHOST) \\BLTSHADE.BITMAP ( -BITMAPHEIGHT BITMAPWIDTH BITMAPBITSPERPIXEL LEFT BOTTOM WIDTH HEIGHT) \\TEDIT.FIND (\\WINDOW SEL) -\\LEAF.CREATIONDATE (LFCREATIONDATE LEAFINFO F4) \\SEARCHOPENFILES (FULLNAME) TEDIT.MAKESEL (SEL -TEXTOBJ F3 \\WINDOW) |\\DFSCurrentVolume| (|LVlabel|) \\GATHER-CLEANUP-FORMS1 (|EndOfStack| -|StackBase| INVALIDP FLAGS NAMETABLE VALIDNAMETABLE NAMETABLE# FNHEADER FASTP SLOWP DUMMYBF \#BLINK -IVAR FRAMENAME \#FRAMENAME CLINK \#ALINK \#CLINK) \\GATHER-SPECIAL-BINDINGS (NTSIZE OVERHEADWORDS -BOUND FIRSTPVAR FXSIZE PVHI PVVALUE) PAGEFAULTS (PAGEFAULTS) MACHINETYPE (|MachineType|) BITBLT ( -IMBLTSHADE IMAGEOPS BITMAPWIDTH BITMAPHEIGHT IMAGEDATA LEFT |DDClippingRegion| BOTTOM |DDDestination| -DDXOFFSET |DDClippingLeft| DDYOFFSET |DDClippingBottom| |DDClippingRight| |DDClippingTop| |DDTexture| -IMBITBLT) \\MAKE.PROCESS0 (MISCSTACKRESULT PROCHARDRESETINFO PROCNAME PROCFINISHED PROCRESTARTFORM -RESTARTABLE PROCFINISHEVENT) FILES?1 (DESCRIPTION CHANGED) COMPOSEREGS (LEFT BOTTOM) GRID (LEFT BOTTOM - WIDTH HEIGHT) TOTOPW (TOTOPWFN SCREEN) DISPLAYLINK/BT (XCOORD NODEPOSITION YCOORD) -MOVEATTACHEDWINDOWTOPLACE (TOP BOTTOM HEIGHT RIGHT LEFT WIDTH) NIL -REPLACE MSJOINSET (DET TYPE REP ID SET1 SET2) TEDIT.SELECT (X0 XLIM DX SET \\TEXTOBJ CH# CHLIM DCH -POINT) \\MAKE.EXPEDITED.STREAM (DEVICE ACCESS CBUFPTR COFFSET EOFFSET CBUFSIZE ENDOFSTREAMOP -WRITEXTENSIONFN F1) \\DSPTOPMARGIN.IP (IPTOP) PUTPUPSTRING (PUPLENGTH) |\\VFMAtLoad| (|fileID| -|filePage|) SEDIT::SET-SELECTION (SEDIT::DELETE-OK? SEDIT::PENDING-DELETE?) PUP.ECHOSERVER (TYPEWORD -EPREQUEUE) RESET/NODE/BORDER (XCOORD YCOORD NODEBORDER NODELABELBITMAP) \\HARDRESET-CLEANUP ( -PROCHARDRESETINFO) DEFAULT.BACKGROUND.COPYFN (ITEMS CHANGEOFFSETFLG MENUOFFSET XCOORD YCOORD CENTERFLG - LEFT BOTTOM) TTADJUSTWIDTH (LASTCOL) \\TEDIT.SCALEREGION (LEFT BOTTOM WIDTH HEIGHT) \\PS.SCALEREGION -(LEFT BOTTOM WIDTH HEIGHT) |MakeMenuOfImageTypes| (ITEMS TITLE LEFT BOTTOM) CH.SERVERS (NSOBJECT -NSDOMAIN NSORGANIZATION) NS.ECHOUSER (XIPLENGTH) SWAPXIPADDRESSES (XIPSOURCESOCKET XIPSOURCENET -XIPSOURCEHOST) \\BLTSHADE.BITMAP (PBTWIDTH PBTHEIGHT) DELETEMENU (WHENSELECTEDFN) TEDIT.SUBPARALOOKS ( -\\DIRTY \\XDIRTY PPARALOOKS) SPY.DUMP.BUFFER (STATUS COUNT) \\OUTCHARFN.PRESS (CHARPOSITION -CHARWASDISPLAYING PRXPOS) \\LEAF.SETFILETYPE (OPWORD HANDLE FILEADDRESS SIGNEXTEND DATALENGTH -LEAFFILETYPE LEAFBYTESIZE LEAFLENGTH) \\DSPROTATE.PSC (POSTSCRIPTROTATION POSTSCRIPTPENDINGXFORM) -SEDIT::PRETTY-PRINT (SEDIT::DISPLAY-WINDOW SEDIT::ENVIRONMENT SEDIT::CURRENT-X SEDIT::COMMENT-WIDTH -SEDIT::COMMENT-SEPARATION SEDIT::NODE-TYPE SEDIT::SUB-NODES SEDIT::START-X SEDIT::DEPTH SEDIT::CURRENT-NODE -) \\CREATEPRESSFONT (FONTDEVICE FONTFAMILY FONTSIZE FONTFACE \\SFFACECODE ROTATION FONTSCALE -|\\SFHeight| |\\SFAscent| |\\SFDescent|) CLEARHASHFILES (|Valid?|) COMP.DECLARE (OPNAME) -CHAT.TYPESCRIPT1 (TYPESCRIPTSTREAM) \\TEXTSTREAMBOUT (CH# CHLIM POINT DCH SELKIND CHARLIM CHARTOP -EDITOPACTIVE X0 XLIM PIECE F5 CPPTR CPAGE COFFSET PCSTARTCH FW7 PCSTARTPG FW6 CBUFSIZE EPAGE CHARSLEFT - F2 REALFILE F1) CHARLOOKS.FROM.FONT (CLFONT CLBOLD CLITAL CLSIZE CLOFFSET) \\GC.MODIFY.BIGREFCNT ( -OVFLCNTLO OVFLCNTHI CNT OVFLPTR STKBIT) |\\VAMFindFreePages| (|volumePage| |nextFilePage|) -\\NSRANDOM.UPDATE.VALIDATION (REVALIDATEFLG) \\COURIER.REP.BIN (CRNEXTBYTE F2 CRWORDLIST F1) -\\TEDIT.GET.SINGLE.PARALOOKS2 (1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD + ACCESS) TERM.ERASE.TO.EOL (XPOS YPOS FONTDESCENT TTYWIDTH FONTHEIGHT) \TEDIT.PURGE.SPACES (BASE) +TEDIT.PAGEFORMAT (REGIONFILLMETHOD) SEDIT::COLLECT-UNDO-BLOCK (SEDIT::UNDO-LIST) \SETTERMSYNTAX ( +TERMSA NSCHARHASH) MB.BUTTONEVENTINFN (XSIZE YSIZE) \UFS.DIRECTORY.NAME (DEVICENAME) +\TEDIT.GET.INSERT.CHARLOOKS (PCTB TEXTLEN POINT CH# CHLIM DEFAULTCHARLOOKS PCE CHNUM CLPROTECTED +PLOOKS) TB.MAP.SELECTED.ITEMS (TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM TISELECTED) \SETREADSYNTAX ( +NSCHARHASH READSA BREAK MACROP READMACRODEFS) EDITGRAPH2 (GRAPHNODES) DSPTRANSLATE (IMTRANSLATE +IMAGEOPS) SYNTAXP (BREAK NSCHARHASH READSA TERMCLASS TERMSA READMACRODEFS MACROTYPE VAL MACROCONTEXT +WAKEUP ESCAPE) \NSFILING.ADDQUOTES (OFFST BASE LENGTH FATSTRINGP) PRINT3TO10 (TRANSOPERATION +TRANSPUPHOST TRANSSENDERPUPHOST TRANSSENDERNSHOST TRANSNSHOST) \UFSDeleteFile-C (DEVICENAME) +\ITEMW.FLIPITEM (SELECTABLEITEMREGION LEFT BOTTOM WIDTH HEIGHT) \COPYSYNTAX (NSCHARHASH) CHECK.MARGIN +(END LASTCOL START NEXTLINE) DSPNEWPAGE (IMNEWPAGE IMAGEOPS) CREATE-UNIX-SOCKET-STREAM (OPENFILELST) +\TEXTLEFTMARGIN (\WINDOW LEFTMAR FMTSPEC) \MAPCHARTABLE (NSCHARHASH) PTDIFFERENCE (XCOORD YCOORD) +\VFMFind (volumePage key used nextKey) FW-CLOSE-CMD (OFDWINDOW FILESTREAM) \VAMRecomputeFreePageCount +(volumeSize freePageCount) LAYOUT/POSITION (NODEPOSITION) BIGNUM.DEFPRINT (HASHMACROCHAR ELEMENTS +COMMONLISP CHARPOSITION) CONTROL (CONTROLFLG) \UFStoOtherRenameMess (DEVICENAME) SEDIT::BACKSPACE-QUOTE + (SEDIT::SUB-NODES SEDIT::BACK-SPACE SEDIT::NODE-TYPE CL:STRUCTURE SEDIT::SELECTION SEDIT::CARET-POINT +) COPYTERMTABLE (TERMSA) \MAIKO.DO.MOVDS (DEFINITIONCELL DEFPOINTER DEFCELLFLAGS AUXDEFCELLFLAGS) +\UFSRenameFile-C (DEVICENAME) \TEDIT.WINDOW.SETUP (TXTFILE \DIRTY MENUFLG) \ATWGROUPSIZE (ATTACHEDW +WIDTH HEIGHT) DRAWBETWEEN (IMDRAWLINE IMAGEOPS XCOORD YCOORD) \VFMDeletePageGroup (fileID nextFilePage + type size key nextKey volumePage filePage) \NSRANDOM.HANDLE.ERROR (DEVICEINFO DEVICE OPENFILELST +NSFILING.CONNECTION FULLFILENAME FSPROTOCOLNAME) DELETECONTROL (DELCHARECHO LINEDELETE 1STCHDEL +NTHCHDEL POSTCHDEL EMPTYCHDEL) \INVERTITEM (MENUGRID MENUBORDERSIZE) \MAIKO.ASSIGNBUFFERS (PAGE#) +TYPESOF (LOADTYPE) DELFROMCOM (DELETE) \POSITION.MENU.IMAGE (MENUPOSITION SCREEN XCOORD YCOORD IMAGE +MENUOFFSET SCWIDTH IMAGEWIDTH SCHEIGHT IMAGEHEIGHT) FB.UPDATE.COUNTERS (COUNTERWINDOW COUNTERPOSITIONS + TOTALFILES TOTALPAGES DELETEDFILES DELETEDPAGES COUNTERPAGESTRING SHOWUNDELETED?) NESTED.SUBMENU.POS +(ITEMS MENUGRID MENUBORDERSIZE IMAGEDATA LEFT MENUCOLUMNS WIDTH DDXOFFSET BOTTOM MENUROWS HEIGHT +DDYOFFSET) \SHAPEW2 (REG DSP WBORDER SCREEN WIDTH HEIGHT BITMAPBITSPERPIXEL SCDESTINATION SAVE +RESHAPEFN) EXTENDREGIONLEFT (LEFT WIDTH) EDITDELETENODE (GRAPHNODES) PRINTSPP (XIPCONTENTS SOURCECONID + DESTCONID CC SYSTEMPACKET SENDACK ATTENTION ENDOFMESSAGE DSTYPE SEQNO ACKNO ALLOCNO XIPLENGTH +SPPCONTENTS) \STRINGOUT (OFFST BASE LENGTH FATSTRINGP) \TEXTRIGHTMARGIN (\WINDOW RIGHTMAR FMTSPEC +WRIGHT) PFI.HANDLE.DEFDEFINER (PATTERNS) OPT.SCANOPT (PREV OPNAME OPARG NXT) \M-VMEMSAVE (NActivePages + Key MiscFXP) NSOCKETEVENT (NSOCEVENT) \DOCOMPRESSVMEM (NActivePages) DMCHAT.CLEAR (WINDOW) +\10MB.INPUT.INTERRUPT (SYSQUEUEHEAD NDBIQ EPNETWORK 10MBPACKETBASE EPRECEIVING) \SEQUIN.CLEANUP ( +SEQSTATE) ITEMW.REPAINTFN (SELECTABLEITEMREGION ITEMINFO) DRAWCIRCLE (IMDRAWCIRCLE IMAGEOPS) +\TEDIT.APPLY.PARALOOKS (\TEXTOBJ CH# SCRATCHSEL MARL1 MARUNIT MARLN MARR MARTABS SEL DCH) +\FM.RESHAPEFN (WIDTH HEIGHT) SEDIT::PUNT-SET-POINT (SEDIT::SUPER-NODE SEDIT::SUB-NODE-INDEX) +DELETELINE (NEXTLINE END ROW START) \LFReadPages (FILEDESC EPAGE EOFFSET) RESETGRID.NEW (WIDTH HEIGHT) + BITMAPOBJ.SNAPW (WIDTH HEIGHT LEFT BOTTOM) SEDIT::PROPAGATE-WIDTH-CHANGE (SEDIT::ACTUAL-WIDTH +SEDIT::SUPER-NODE SEDIT::DISPLAY-WINDOW SEDIT::START-X) COMP.USERFN (OPARG) SHAPEW1 (REG DSP WBORDER +SCREEN WIDTH HEIGHT BITMAPBITSPERPIXEL SCDESTINATION SAVE RESHAPEFN) EQP (EDFXP) \FM.PUSHGROUP (BOTTOM + LEFT) EXTENDPASTVERTBOUNDARIES (BOTTOM TOP) \10MB.STARTDRIVER (NDBCSB) \UFS.HANDLE.RELATIVEDIRECTORY +(DEVICENAME) \IDLE.IS.PREVIOUS (UserPswdAddr) \TEXTSTREAM.FILENAME (TXTFILE FULLFILENAME) \TEXTDSPFONT + (CLFONT CARETLOOKS \WINDOW) FB.DELETECOMMAND (TABLEBROWSER) GETDELETECONTROL (DELCHARECHO LINEDELETE +1STCHDEL NTHCHDEL POSTCHDEL EMPTYCHDEL) DRAWARC (IMDRAWARC IMAGEOPS) CHAT.SET.EMULATOR (TYPEOUTPROC +INSTREAM) \FM.REDISPLAYMENU (LEFT BOTTOM WIDTH HEIGHT FM.USERDATA) ECHOCHAR (TERMSA CCECHO NSCHARHASH) + \LFSetFileInfo (LEADERPAGE) \FM.JUSTIFYGROUPS (RIGHT) OPT.SETUPOPT (OPNAME TAG OPARG) MARGINBAR ( +WIDTH) \TEDIT.FIXSELS (SEL SHIFTEDSEL MOVESEL DELETESEL SET) SEDIT::SHIFT-STRING (BASE OFFST) +\NOTE.3TO10 (NDBTRANSLATIONS) TERM.ADDCHAR (DSP XPOS YPOS FONTDESCENT FONTWIDTH FONTHEIGHT TTYWIDTH) +INTERSECT/REGIONP/LBWH (BOTTOM PRIGHT LEFT PTOP) \HDCPYDSPPRINTCHAR (IMAGEDATA CCECHO NSCHARHASH +CHARPOSITION DDXPOSITION DDLeftMargin DDRightMargin) PRINTATBOX (LEFT PTOP) OPT.POSTOPT (OPNAME OPARG) + SEDIT::COPY-SELECTION-LITATOM (SEDIT::SELECT-NODE CL:STRUCTURE SEDIT::SELECT-START SEDIT::SELECT-END +SEDIT::SELECT-STRING SEDIT::SELECT-TYPE SEDIT::POINT-TYPE) GETXIP (INQUEUE INQUEUELENGTH NSOCEVENT +EPTYPE) SEDIT::COMPOSE-PSEUDO-SELECTION (SEDIT::SUPER-NODE SEDIT::SUB-NODE-INDEX) \TEDIT.PARABOUNDS ( +PCTB TEXTLEN PLEN NEXTPIECE PPARALAST PREVPIECE) IOCBQLENGTH (D0NEXTIOCB) \HANDLE.RAW.PACKET (EPTYPE) +\SEQUIN.RETRANSMITNEXT (SEQRETRANSMITNEXT SEQRETRANSMITQ MYRECEIVESEQ SEQINALLOC SEQSOCKET EPLINK +%#SEQRETRANSMITS) \TEXTMENU.DOC.CREATE (MBLABEL MBBUTTONEVENTFN MBFONT TEXTOBJ MBCHANGESTATEFN +MBINITSTATE MBTEXT MBBUTTONS MBMAXITEMSPERLINE MBSTRING MBINITENTRY EDITPROPS) \DL.NEWFAULTINIT ( +NRealPages FPOCCUPIED FPVIRTUALPAGE RPTRBASE NActivePages UNAVAILABLE VACANT) MB.THREESTATEBUTTON.FN ( +\TEXTOBJ) DRAWCURVE (IMDRAWCURVE IMAGEOPS) SEDIT::BUILD-PRELINEARIZED-NODE (SEDIT::\X SEDIT::CURRENT-NODE + SEDIT::ENVIRONMENT) ECHOMODE (ECHOFLG) \LFWritePages (REVALIDATEFLG FILEDESC) +UPDATE/BM/DISPLAY/SELECTED/REGION (BITMAPWIDTH BITMAPHEIGHT) SEDIT::COMPUTE-SELECTION-POSITION-LITATOM + (SEDIT::SELECT-NODE SEDIT::LINEAR-FORM SEDIT::SELECT-STRING SEDIT::SELECT-START SEDIT::SELECT-END +SEDIT::FONT SEDIT::NODE-TYPE SEDIT::START-X SEDIT::FIRST-LINE SEDIT::SELECT-START-LINE) +SEDIT::PARSE--UNKNOWN (SEDIT::COMMENT-FONT SEDIT::ENVIRONMENT) GETECHOMODE (ECHOFLG) +FW-CHANGE-POSITION (OFDSTATUS OFDWINDOW WIDTH HEIGHT LEFT BOTTOM XCOORD YCOORD) GETCONTROL (CONTROLFLG +) PUTMENUPROP (MENUUSERDATA) \PARSE.PORTCONSTANT (OFFST BASE LENGTH FATSTRINGP) ADDTOCOM (ADD) COMP.EQ + (OPNAME OPARG) \TEDIT.HARDCOPY.MODIFYLOOKS (CLULINE YBASE LTRUEDESCENT CLOLINE LTRUEASCENT CLSTRIKE +CLFONT) RELMOVEW (RELMOVEWFN SCREEN) \TEDIT.APPLY.STYLES (CLSTYLE TXTSTYLESHEET CURRENTPARALOOKS +STREAMHINT FMTCHARSTYLES) UNIX-STREAM-CLOSE (OPENFILELST) RAISE (RAISEFLG) EXTENDPASTHORIZBOUNDARIES ( +LEFT RIGHT) \TEDIT.LINE.LIST (\WINDOW LINES) DRAWELLIPSE (IMDRAWELLIPSE IMAGEOPS) GETRAISE (RAISEFLG) +POLYSHADE.IP (OTHERPROPS) SEDIT::COMPUTE-POINT-POSITION-LITATOM (SEDIT::POINT-NODE SEDIT::POINT-STRING + SEDIT::POINT-INDEX SEDIT::FONT SEDIT::LINEAR-FORM SEDIT::NODE-TYPE SEDIT::START-X SEDIT::FIRST-LINE) +TEDIT.DELETELINE (PREVLINE NEXTLINE) \FM.JUSTIFYITEMS (FM.GROUPID FM.REGION FM.MAXREGION FM.USERDATA) +RESETTERMTABLE (TERMSA RAISEFLG DELCHARECHO LINEDELETE 1STCHDEL NTHCHDEL POSTCHDEL EMPTYCHDEL +CONTROLFLG ECHOFLG) \LFOpenFile (FULLFILENAME TimeCreate LEADERPAGE) SHOWBUTTON (REGION LABEL) +\UFS.REGISTER.GFS (FINFOID) SEDIT::PARSE--GAP (SEDIT::CURRENT-NODE SEDIT::LINEAR-ITEM) \DOFORMATTING ( +QUAD SPACELEFT CHARS WIDTHS DESCENT ASCENT LINELEAD LHEIGHT LEADBEFORE LSTLN LEADAFTER LEFTMARGIN +RIGHTMARGIN LEN LXLIM CR\END CHARLIM TEXTLEN BASE) SENDXIP (EPTRANSMITTING) +SEDIT::PSEUDO-SELECTION-FROM-SELECTION (SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END) +SETTERMTABLE (TERMSA) TERM.DELETELINE (DSP TTYWIDTH FONTHEIGHT BOTTOMMARGIN YPOS FONTDESCENT) +DRAWPOLYGON (IMDRAWPOLYGON IMAGEOPS) \TEDIT.BASICFIND (SEL TEXTLEN STREAMHINT SET POINT CH# CHLIM) +\ONSCREENCLIPPINGREGION (SCREGION SCREEN IMAGEDATA) \EVAL-INVOKE-LAMBDA (NEXTBLOCK) \UFS.NEXTFILEFN ( +SUBGENERATORS FINFOID FILEID PROPP TOTALNUM DEVICENAME DIRECTORY NAME DEV MAX-DEPTH CURRENT-DEPTH +THISFILE GENFILESTATE) \SETTYPEMASK (DTDTYPEENTRY) FB.COUNTER.STRING (PAGECOUNT?) DMCHAT.RIGHT (XPOS +FONTWIDTH TTYWIDTH YPOS DSP) IN/SCROLL/BAR? (SCROLLFN REG VERTSCROLLREG WIDTH HORIZSCROLLREG) +PROMPTFOREVALED (XCOORD YCOORD) DRAWPOINT (IMDRAWPOINT IMAGEOPS) \VAMFreePageGroup (filePage +nextFilePage type volumePage freePageCount lowerBound) LASTC (LASTCCODE) UNIX-STREAM-EOFP-NEW (CBUFPTR + COFFSET CBUFSIZE) \FIXLOCALNET (NDBPUPNET#) POSTSCRIPT.PUTBITMAPBYTES (BITMAPWIDTH BITMAPHEIGHT +BITMAPBASE BITMAPRASTERWIDTH BASE) EXTENDREGIONBOTTOM (BOTTOM HEIGHT) D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL + (OVERHEADWORDS) \FM.LAYOUTGRID (LEFT WIDTH HEIGHT) \NSRANDOM.FETCH.CACHE (NSFILING.PAGE.CACHE +NSPHEADER NSPTAIL) \UFS.FILEINFOFN (PROPP FINFOID THISFILE LENGTH PROTECTION WDATE RDATE AUTHOR AULEN) + FILLPOLYGON (IMFILLPOLYGON IMAGEOPS) TEDIT.GET (SEL PCTB \DIRTY PROMPTWINDOW STREAMHINT \WINDOW +DEFAULTCHARLOOKS FMTSPEC LINES TOTLEN SCRATCHSEL SHIFTEDSEL MOVESEL YBOT TXTFILE) +SEDIT::SELECT-NODE-SEGMENT (SEDIT::SELECTION SEDIT::CARET-POINT) \PEEKREFILL (PEEKEDCHAR RAISEFLG +KEYBOARDSTREAM) GRAPHDELETENODE (GRAPH.DELETENODEFN GRAPHNODES) TEXTSTREAM.TITLE (TXTFILE) \LOOKUPPORT + (PUPTYPE PUPLENGTH PUPCONTENTS NETHOST SOCKET) D-ASSEM::START-PC-FROM-NT-COUNT (OVERHEADWORDS) +FORWARD.DELETE.TO (END START NEXTLINE LASTCOL) \POLYSHADE.YSCAN.IP (BY LX RX WC TY) +TEDIT.MINIMAL.WINDOW.SETUP (SEL CARET \WINDOW LCBITMAP DISPLAYCACHE DISPLAYCACHEDS PTOP RIGHT BOTTOM +LEFT HEIGHT WIDTH LINES) DRAWTO (IMDRAWLINE IMAGEOPS IMXPOSITION IMYPOSITION) RATOM (USESILPACKAGE +READSA CASEINSENSITIVE BASE) LATTICE/BREAK/CYCLES (TONODES NODEID NODEPOSITION) \DL.ASSIGNBUFFERS ( +PAGE#) FILLCIRCLE (IMFILLCIRCLE IMAGEOPS) \BLTSHADE.GENERICPRINTER (WIDTH HEIGHT LEFT BOTTOM) \SUBREAD + (XBASE NSCHARHASH STOPATOM MACROCONTEXT READMACROFLG ESCAPEFLG EOFP DEVICE BASE OFFST LENGTH +MACROTYPE READMACRODEFS) RESETREADTABLE (READMACROFLG ESCAPEFLG COMMONLISP NUMBERBASE CASEINSENSITIVE +COMMONNUMSYNTAX USESILPACKAGE HASHMACROCHAR ESCAPECHAR MULTESCAPECHAR PACKAGECHAR DISPATCHMACRODEFS +READMACRODEFS READSA) \DL.MARK.PAGES.UNAVAILABLE (RPTRBASE) GETMENUPROP (MENUUSERDATA) TREEGRAPHNODE ( +NODEID PCE LO HI BF RANK CHNUM) \PS.BOUTFIXP (BASE POSTSCRIPTTEMPARRAY IMAGEDATA) \DL.UNMAPPAGES ( +FPOCCUPIED FPVIRTUALPAGE) HARDCOPYGRAPH (LEFT BOTTOM WIDTH HEIGHT YCOORD XCOORD GRAPHNODES) +\TEDIT.FIND.FIRST.LINE (LINES WRIGHT STREAMHINT TEXTLEN FORMATTEDP CHARLIM) ESCAPE (ESCAPEFLG) +\10MB.OUTPUT.INTERRUPT (SYSQUEUEHEAD NDBTQ EPNETWORK) TERM.UP (YPOS HOMEPOS XPOS FONTHEIGHT DSP) +\TOP-LEVEL-READ (USESILPACKAGE ENDOFSTREAMOP READSA CASEINSENSITIVE BASE) SEDIT::CLOSE-NODE-LITATOM ( +SEDIT::ATOM-STARTED SEDIT::UNDO-LIST SEDIT::ATOM-STARTED-UNDO-POINTER SEDIT::UNDO-UNDO-LIST CL:STRUCTURE + SEDIT::LINEAR-FORM STRING SEDIT::NODE-TYPE SEDIT::CARET-POINT SEDIT::SELECTION) \LFGenerateFiles (VOL + NAME OFFST BASE LENGTH FATSTRINGP VERSION LVlabel VOLUME) \DO.PROGV (OVERHEADWORDS) +DIRECTORY.NEXTFILE (FILEGENERATORS) \CREATEW1 (WIDTH HEIGHT CREATEWFN) FIND.MATCHING.QUOTE (NSCHARHASH + CPXREALCHAR) FILLRECTANGLE.IP (IMAGEDATA IPVISTOP IPVISBOTTOM IPVISLEFT IPVISRIGHT) RELDRAWTO ( +IMDRAWLINE IMAGEOPS IMXPOSITION IMYPOSITION) SEDIT::PARSE (SEDIT::CURRENT-NODE SEDIT::ENVIRONMENT SEDIT::\X + SEDIT::PARSE-INFO SEDIT::PARSE-INFO-UNKNOWN) EDITBMRESHAPEFN (BITMAPWIDTH BITMAPHEIGHT LEFT BOTTOM +BITMAPBITSPERPIXEL) \FZEROP (LOWORD HIWORDNOSIGNBIT) SHOWSTACKBLOCKS (EndOfStack FLAGS CHECKED SIZE +FRAMENAME NEXTBLOCK IVAR RESIDUAL) READP (DEVICE READP) READMACROS (READMACROFLG) +\UFS.ABORT.CL-DIRECTORY (GENFILESTATE FINFOID) READTABLEPROP (NUMBERBASE READTBLNAME COMMONLISP +COMMONNUMSYNTAX USESILPACKAGE CASEINSENSITIVE ESCAPECHAR MULTESCAPECHAR PACKAGECHAR HASHMACROCHAR) +\TEXTOPENF (TEXTOBJ PCTB HI) \10MB.PRINT.ENCAPSULATION (10MBSOURCEHOST 10MBDESTHOST) LAYOUTGRAPH ( +NODEPOSITION NODELABEL) POSTSCRIPT.SHOWACCUM (IMAGEDATA POSTSCRIPTCHARSTOSHOW POSTSCRIPTSPACEFACTOR +POSTSCRIPTSPACEWIDTH POSTSCRIPTNATURALSPACEWIDTH) SKIPSEPRCODES (READSA NSCHARHASH) EXTENDREGION (LEFT + PRIGHT BOTTOM PTOP RIGHT TOP) SEDIT::EDIT-SELECTION (SEDIT::SELECTION SEDIT::CARET-POINT +SEDIT::DISPLAY-WINDOW) BITMAPIMAGESIZE (IMBITMAPSIZE IMAGEOPS) MSCHECKBLOCKS (FILEPKGNAME) +\FM.LAYOUTCOLUMN (HEIGHT WIDTH) MB.CREATE.THREESTATEBUTTON (XSIZE YSIZE) \SEQUIN.RETRANSMIT ( +SEQRETRANSMITTING SEQRETRANSMITQ SYSQUEUEHEAD SENDSEQ SYSQUEUETAIL MYSENDSEQ) \FM.LAYOUTROW (WIDTH +HEIGHT) FB.COUNTERW.REDISPLAYFN (FBREADY) COMP.FLOATUNBOX (OPNAME OPARG) \VFMCreateVPage (volumePage) +\VAMAllocPageGroup (nextFilePage filePage freePageCount volumePage type) INITIALIZECOLOR.IP (IMAGEDATA +) MBUTTON.SET.FIELD (PCTB CHNUM CH# DCH POINT) \UFS.ABORT.DIRECTORY (FILEGENERATORS GENFILESTATE +FINFOID) \FAULTHANDLER (FAULTHI FAULTLO) TERM.MODIFY.ATTRIBUTES (DSP PLAINFONT) \SEQUIN.HANDLE.INPUT ( +PUPTYPE SEQCONTROL SEQBROKEN SENDSEQ MYRECEIVESEQ SEQIGNOREDUPLICATES ALLOCATE SEQINPUTQLENGTH +SEQMAXALLOC SEQOUTALLOC SEQEVENT RECEIVESEQ LASTACKEDSEQ SEQSTATE SEQINPUT SEQTIMEOUT SEQBASETIMEOUT +SEQTIMEDIN) SKREAD (NSCHARHASH READSA) \NSRANDOM.READ.SEGMENT (NSFILING.CONNECTION EPAGE EOFFSET +NSFILING.HANDLE ACCESSBITS NSFILING.SERVER.LENGTH NSHDATUM NSHWASREAD NSHATTRIBUTES) +DMCHAT.HANDLECHARACTER (DSP DINGED WINDOW AUTOLF EATTOCRLF ADDRESSING IDMODE EATLF EATCRLF) +\UFSParse-Directory (DEVICENAME) \TEDIT.INSERTLINE (PREVLINE) SEDIT::BACKSPACE-LITATOM (SEDIT::CARET-POINT + SEDIT::SELECTION SEDIT::SUPER-NODE SEDIT::NODE-TYPE) \NSRANDOM.PREPARE.CACHE (NSFILING.PAGE.CACHE +NSPSIZE NSPHEADER NSPTAIL) SEDIT::NEXT-NODE (SEDIT::SUB-NODES SEDIT::SUB-NODE-INDEX SEDIT::SUPER-NODE) + UNIX-BACKFILEPTR-NEW (CBUFPTR COFFSET) CL:READ (READSA CASEINSENSITIVE BASE) \TEXTBACKFILEPTR (CPAGE +PCSTARTPG COFFSET PCSTARTCH PREVPIECE PIECE PLEN PLOOKS TEXTOBJ PSTR PFILE PFATP POBJ REALFILE +CHARSLEFT CBUFSIZE FATSTREAMP CPPTR) \ASSURE.FPTOVP.PAGE (NActivePages) \10MB.BROADCASTP ( +10MBMULTICASTP) POSTSCRIPT.CLOSESTRING (IMAGEDATA POSTSCRIPTCHARSTOSHOW) CL:READ-PRESERVING-WHITESPACE + (READSA CASEINSENSITIVE BASE) \TEDIT.HARDCOPY.DISPLAYLINE (CHARS CACHE WIDTHS LOOKS TEXTLEN +LEFTMARGIN LEN CHAR1 DESC WIDTH BASE TLFIRSTSPACE TLSPACEFACTOR CLOFFSET YBASE CLFONT CLUSERINFO +CLLEADER FMTREVISED LFMTSPEC) CREATEW1 (SCREEN REGION WIDTH HEIGHT CREATEWFN) CL:READ-DELIMITED-LIST ( +READSA CASEINSENSITIVE BASE) INIT/NODES/FOR/LAYOUT (NODEID NODELABEL NODEFONT) FOREST/BREAK/CYCLES ( +TONODES NODEPOSITION NODEID) SCALEDBITBLT (IMSCALEDBITBLT IMAGEOPS LEFT BOTTOM) CL:PARSE-INTEGER ( +READSA BASE LENGTH OFFST FATSTRINGP NSCHARHASH) \LOOKUPPAGEMAP (PRIMARYKEY SECONDARYKEY) +\DRAWPOINT.GENERIC (BRUSHSIZE BRUSHCOLOR) GRAPHOBJ.PUTALIGN (GRAPHNODES NODEID) \UPDATE.PSC ( +POSTSCRIPTPENDINGXFORM POSTSCRIPTFONTCHANGEDFLG POSTSCRIPTMOVEFLG) PRIN2-LONG-STRING (ESCAPECHAR +READSA OFFST BASE LENGTH FATSTRINGP HASHMACROCHAR NSCHARHASH) DUMPGRAPH (SIDESFLG DIRECTEDFLG +GRAPH.MOVENODEFN GRAPH.ADDNODEFN GRAPH.DELETENODEFN GRAPH.ADDLINKFN GRAPH.DELETELINKFN +GRAPH.FONTCHANGEFN GRAPH.INVERTBORDERFN GRAPH.INVERTLABELFN GRAPH.CHANGELABELFN GRAPH.PROPS GRAPHNODES + NODEID NODELABELSHADE NODEFONT NODEBORDER NODELABEL NODEPOSITION TONODES FROMNODES) \FM.FORMATBYGRID +(HEIGHT LEFT WIDTH) COMP.TOPLEVEL.COMPILE (OPNAME OPARG) GRAPHCHANGELABEL (GRAPH.CHANGELABELFN) +\DRAWPOLYGON.GENERIC (BRUSHCOLOR XCOORD YCOORD) SEDIT::BACKSPACE-GAP (SEDIT::SELECTION SEDIT::CARET-POINT +) DMCHAT.CLEARMODES (PLAINFONT DSP) RIGHTW.REPAINTFN (TOP BOTTOM) \SEQUIN.FLUSH.CONNECTION (SEQPROCESS + SEQEVENT SEQSOCKET SEQCLOSED) \LFDirectoryNameP (VOL LVlabel NAME) \TEXTSETFILEPTR (TEXTOBJ TEXTLEN) +FILEPKGCOM (ADD DELETE MACRO CONTENTS PRETTYTYPE) ADVISEWDS (REG DSP WBORDER LEFT BOTTOM WIDTH HEIGHT +WTITLE SCTITLEDS SCREEN) SEDIT::BACKSPACE-UNKNOWN (SEDIT::CARET-POINT SEDIT::SELECTION) RSTRING ( +READSA) SEDIT::LINEARIZE-ROOT (SEDIT::SUB-NODES) \FLUSHPAGE (RPTRBASE OCCUPIED DIRTY VP FILEPAGE +LOCKED NActivePages PRIMARYKEY SECONDARYKEY Key PAGE#) \STORENSHOSTNUMBER (NSHOST0 NSHOST1 NSHOST2) +\RSTRING2 (EOLCONVENTION XBASE STOPATOM NSCHARHASH ESCAPEFLG EOFP DEVICE) PRINSHUT (BP) \TRANSFERPAGE +(LOCKED RPTRBASE) \POLYSHADE.XSCAN.IP (BY LX RX WC TY) SPY.TITLE (NAME) \PUTBASEFIXP (HINUM LONUM) +READ-EXTENDED-TOKEN (CASEINSENSITIVE BASE XBASE READSA EOFP DEVICE NSCHARHASH STOPATOM) +\SETMACROSYNTAX (READMACRODEFS VAL READSA) \VFMInsertPageGroup (fileID filePage type key volumePage +nextFilePage nextKey) \SMASHSTRING (LENGTH OFFST FATSTRINGP BASE) \READTABLEP.DEFPRINT (READTBLNAME +CHARPOSITION HASHMACROCHAR) \EDITBMHOWMUCH (BITMAPWIDTH BITMAPHEIGHT) \NSFILING.LOOKUP.CACHE ( +FSCACHEDHANDLES NSHFILEID NSHDIRECTORYPATH NSHNAME) CONCATLIST (FATSTRINGP FATPNAMEP) EDITCHANGELABEL +(GRAPHNODES) \ATBLSET (TERMSA) \NSRANDOM.CHECK.CACHE (NSPSIZE NSPBUFFERS NSPTAIL) BOTTOMOFGRIDCOORD ( +BOTTOM HEIGHT) FW-REPAINTFN (OFDWINDOW OFDSTREAM) \GetRootDirectoryType (volumeRootDirectory) +SI::COMPILED-FUNCTION-ARGLIST (FNHEADER) ADDCHAR (CPXWIDTH END CPXPRINTCHARS LASTCOL) \TEXTPEEKBIN ( +PIECE COFFSET CBUFSIZE POBJ FATSTREAMP EOFP DEVICE F1 CHARSLEFT NEXTPIECE PLOOKS TEXTOBJ PLEN +CURRENTPARALOOKS CURRENTLOOKS PSTR PFILE PFATP ENDOFSTREAMOP) PRINTLEAF (PUPLENGTH SEQCONTROL ALLOCATE + RECEIVESEQ SENDSEQ PUPCONTENTS LEAFOPCODE ANSWERBIT OPCODE EOFBIT LEAFLENGTH HANDLE LOADDR DATALENGTH +) \NSFILING.ADD.TO.CACHE (FSCACHEDHANDLES NSHFILEID NSHBUSYCOUNT) SI::COMPILED-FUNCTION-DEBUGGING-INFO + (FNHEADER NATIVE STARTPC NTSIZE OVERHEADWORDS) SUBREGIONP (LEFT BOTTOM PRIGHT PTOP) \CLIPANDDRAWLINE1 + (BITMAPRASTERWIDTH BITMAPBITSPERPIXEL BITMAPHEIGHT BITMAPBASE) TWODINSPECT.ARRANGEWINDOWS (XCOORD +YCOORD TOP RIGHT) \MOVEREALPAGE (OCCUPIED VP FILEPAGE) TEDIT.WINDOW.SETUP (SEL) RETFROM (INVALIDP +CLINK) INSPECT/AS/FUNCTION (INVALIDP EDFXP FNHEADER PC) INTERSECTREGIONS (LEFT WIDTH BOTTOM HEIGHT +RIGHT TOP) DISPTREE (NODEID) PRINTNSHOSTNUMBER (NSHOST0 NSHOST1 NSHOST2) \TEDIT.PUT.PARALOOKS ( +PPARALOOKS) \TEDIT.PIECE-CHNO (PTREENODE UPWARD) \SELECTREALPAGE (NEXTRP RPTRBASE EMPTY OCCUPIED +LOCKED REFERENCED VP DIRTY FILEPAGE VPSEG) \10MBENCAPSULATE (10MBDESTHOSTBASE 10MBSOURCEHOSTBASE) +\UPDATECHAIN (NEXTRP RPTRBASE VP EMPTY LOCKED VPSEG REFERENCED) FILL.LINE (TY TX FBBT ADDR LLEN LFT +RGT BOT TOP TXTW TXTH TXTA BITS) POSITION (CHARPOSITION) \MAIKO.DISPLAYLINE (CHARS THISLINE WIDTHS +LOOKS \WINDOW TEXTLEN TXTTERMSA STREAMHINT LCBITMAP DISPLAYCACHE DISPLAYCACHEDS DISPLAYHCPYDS +FMTHARDCOPY LFMTSPEC PREVLINE YBOT LHEIGHT RIGHTMARGIN BITMAPWIDTH BITMAPHEIGHT CHAR1 WBOTTOM DESC +LEFTMARGIN DESCENT IMAGEDATA DDPILOTBBT DDXOFFSET DDClippingLeft DDClippingRight CLFONT BASE +DDWIDTHSCACHE DDOFFSETSCACHE CLOFFSET LEN CLLEADER CLUSERINFO WRIGHT FMTREVISED LMARK YBASE) +READBQUOTECOMMA (COMMONLISP) \TEDITMENU.SELSCREENER (\WINDOW CH# DCH EDITOPACTIVE) \FM.FORMATBYCOLUMN +(WIDTH HEIGHT) SEDIT::KILL-NODE (SEDIT::SUB-NODES) MAKEDOTPTAIL (TAIL) OVERFLOW? (END LASTCOL ROW) +FB.COMMANDSELECTEDFN (ITEMS PROMPTWINDOW) ONEDINSPECT.ARRANGEWINDOWS (XCOORD YCOORD TOP RIGHT) +\NSRANDOM.STREAM.CHANGED (ACCESSBITS ACCESS NSHATTRIBUTES) REALSTKNTH (CLINK ALINK) +SI::CHANGE-CALLS-IN-CCODE (CODEARRAY DEFLOCS) PFI.ADD.TO.INDEX (NAME) SHADEGRIDBOX (WIDTH HEIGHT) +CANONICAL.HOSTNAME (DEVICENAME) \TEXTGETEOFPTR (TEXTLEN TEXTOBJ) SEDIT::ATOM-POINT-TYPE ( +MULTESCAPECHAR OFFST BASE LENGTH FATSTRINGP) MOVETOUPPERLEFT (LEFT PTOP) \NSFILING.MAYBE.CREATE ( +FSNAMESTRING NSHDATUM) \MENUSUBITEMS (SUBITEMFN) EQUAL-READER-ENVIRONMENT (REREADTABLE REPACKAGE +REBASE REFORMAT) BACKSKREAD (NSCHARHASH CPXREALCHAR) FILL.INITTBLE (IMAGEDATA DDClippingTop +DDClippingBottom DDClippingLeft DDClippingRight DDOPERATION DDDestination BITMAPBITSPERPIXEL DDTexture + BITMAPBASE BITMAPRASTERWIDTH BITMAPWIDTH BITMAPHEIGHT DDXOFFSET DDYOFFSET) SEDIT::ASSIGN-FORMAT-LITATOM + (CL:STRUCTURE SEDIT::ENVIRONMENT SEDIT::ATOM-CHARS SEDIT::BROKEN-ATOM-FONT SEDIT::KEYWORD-FONT +SEDIT::DEFAULT-FONT SEDIT::LINEAR-FORM) SEDIT::ADJUST-WIDTH (SEDIT::LINEAR-FORM) INIT.CURSOR (BOTTOM) +SHOWWFRAME (WTITLE WBORDER DSP SAVE HEIGHT REG WIDTH) GRAPHOBJ.GETALIGN (NODEID GRAPHNODES) +SEDIT::INSERT-CHANGED (SEDIT::DEPTH) COMP.TRANSFORM (OPNAME) SET-READER-ENVIRONMENT (REPACKAGE +REREADTABLE REBASE) \TEDIT.CHARDELETE (PCTB OFFST LENGTH POINT CH# CHLIM PLOOKS CLINVISIBLE PREVPIECE +PLEN CLPROTECTED) OPENNSOCKET (ID# LONUM) BESTPUPADDRESS (PUPNET# RTHOPCOUNT) FONTCREATE (IMFONTCREATE + IMAGEOPS) TEDIT.REMOVE.MENUITEM (ITEMS) \TEDIT.OBJECT.SHOWSEL (X0 Y0 L1 SELOBJ DX YBASE YDESC XKERN +WRIGHT YSIZE STREAMHINT) \VALIDADDRESSP (PAGE#) GRAPHREGION (GRAPHNODES) \SEND.EXPEDITED.XIP ( +PACKETEXCHANGEID XIPTYPE LOWVERSION HIGHVERSION MSGTYPE ERRORXIPCODE) \APPLYREADMACRO (MACROFN) +EDITCHANGEFONT (GRAPHNODES) BRV/OFFSET (NODEPOSITION XCOORD YCOORD TONODES) \FM.FORMATBYROW (HEIGHT) +\INTERNAL/SETPASSWORD (UserPswdAddr) INSPECTW.REPAINTFN (TOP BOTTOM SELECTABLEITEMREGION PTOP +ITEMINFOTYPE ITEMINFO) LLSH (HINUM LONUM) \POLYSHADE.DISPLAY (BY RX LX WC TY GEOM P X IX IPX IPY MAJOR +) \PFVersionOK (version) EDITBMSCROLLFN (BITMAPWIDTH BITMAPHEIGHT LEFT BOTTOM HEIGHT WIDTH) SHOWWTITLE + (SCTITLEDS SCREEN) RAIDROOTFRAME (TELERAIDFXP CurrentFXP) COMP.RETFROM.POINT (CLEAR) GRIDYCOORD ( +BOTTOM HEIGHT) \ALLOCWIDTHTOGROUPEDWINDOW (ATTACHEDW ATWHEREONEDGE ATNOWX ATXSIZE ATNOWY ATMAXX) +TEDIT.REDO.REPLACE (THOLDINFO CH# SEL CHLIM LINES TXTHISTORY) \PFPatchRootDirEntries (countEntries) +\GETBASESTRING (BASE OFFST) \TEDIT.PUT.SINGLE.CHARLOOKS (CLFONT CLOFFSET CLSTYLE CLUSERINFO CLLEADER +CLINVERTED CLBOLD CLITAL CLULINE CLOLINE CLSTRIKE CLSMALLCAP CLPROTECTED CLINVISIBLE CLSELHERE +CLCANCOPY) \TEXTGETFILEPTR (PIECE CHARSLEFT COFFSET CBUFSIZE PLEN FATSTREAMP TEXTLEN TEXTOBJ) +OPT.RESOLVEJUMPS (JMIN JPT OPNAME) TTYIN (RAISEFLG READSA STORAGECOUNTER) \TEDIT.SET-TOTLEN (COUNT) +\TEDIT.HARDCOPY.FORMATLINE (TEXTLEN BASE CHARS WIDTHS LOOKS STREAMHINT TXTTERMSA CURRENTLOOKS +CLINVISIBLE PIECE PLEN NEXTPIECE PLOOKS CLFONT CURRENTPARALOOKS FMTSPEC FMTCHARSTYLES PREVPIECE +PPARALAST PCSTARTCH COFFSET PCSTARTPG CPAGE FMTPARATYPE PAGE# 1STLEFTMAR LEFTMAR RIGHTMAR +FONTCHARSETVECTOR YSIZE YDESC XSIZE TABSPEC PTNEWTX TXTNONSCHARS PTTYPE PTTABX F5 FW6 FW7 +DEFAULTCHARLOOKS CHARLIM CHAR1) \INTERACTIVE.CLOSEW (CLOSEFN) TTDELETELINE (START END FIRSTCOL) +\DSPUNTRANSFORMREGION (LEFT BOTTOM WIDTH HEIGHT) TTSKREAD (NSCHARHASH CPXREALCHAR) \FM.FORMAT (WIDTH +HEIGHT) GRAPHERPROP (GRAPH.PROPS) \TEDIT.TABTYPE.SET (\TEXTOBJ CH# POBJ) SEGMENT.LENGTH (CPXNCHARS) +GETCHATWINDOW (RUNNING?) SEDIT::COPY-SELECTION-DEFAULT (SEDIT::SELECT-NODE SEDIT::SELECT-START +SEDIT::SELECT-END CL:STRUCTURE SEDIT::SUB-NODES) \LFNormalizeVolumeName (VOL) TTYIN.SETUP ( +TTYINWINDOWSTATE) SEDIT::HANDLE-COMPLETION (SEDIT::COMPLETION-FN) TTYIN.CLEANUP (TTYINWINDOW +TTOLDRIGHTFN TTOLDBUTTONFN TTOLDENTRYFN) \BUILD.EXPEDITED.XIP (PROGRAM# VERSION# FN# ARGS COFFSET) +TTYIN.FINISH (START NSCHARHASH CPXREALCHAR) DEFAULT.INSPECTW.TITLECOMMANDFN (ITEMINFO) +\ITEM.WINDOW.COPY.HANDLER (ITEMINFO) DCODERD (OVERHEADWORDS) \OKTOCLOSEW (CLOSEFN) TB.REMOVE.ITEM ( +TB#ITEMS TI# TBITEMS TIDELETED TB#DELETED TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM) \MEDW.BLTCHAR ( +DDCHARSET DDSlowPrintingCase DDXPOSITION DDCHARIMAGEWIDTHS DDRightMargin DDLeftMargin DDWIDTHSCACHE +DDXOFFSET DDClippingRight DDClippingLeft PBTHEIGHT DDPILOTBBT DDOFFSETSCACHE) TERM.TAB (XPOS FONTWIDTH + TERM.TAB.STOPS YPOS DSP) TEDIT.FORMATTEDFILEP (FMTSPEC PCTB DEFAULTCHARLOOKS POBJ PPARALAST +PPARALOOKS PLOOKS PNEW PFATP NEXTPIECE) \DSPXPOSITION.PSC (IMAGEDATA POSTSCRIPTX POSTSCRIPTY) +\MEDW.XOFFSET (IMAGEDATA DDXOFFSET) WINDOWPOSITION (LEFT BOTTOM) \TEDIT.COPYTEXTSTREAM.PIECEMAPFN ( +POBJ STREAMHINT \WINDOW) \MEDW.YOFFSET (IMAGEDATA DDYOFFSET) \VFMGetPageGroup (fileID type key +filePage volumePage nextKey) GETFRAMEVAR.IP (IPNEXTFRAMEVAR IPDATA) \TEXTEOFP (PIECE COFFSET CBUFSIZE +CHARSLEFT NEXTPIECE PLEN) \TFBRAVO.FONT.FROM.CHARLOOKS (CLNAME CLSIZE CLBOLD CLITAL) TTYIN1RESTART ( +FIRSTLINE START NEXTLINE) \TEDIT.FIXCHANGEDLINE (CHAR1 DIRTY CHARLIM LHEIGHT YBOT PREVLINE WBOTTOM +NEXTLINE DESCENT FMTBASETOBASE LFMTSPEC) \NOIMAGE.DSPFONT (IMAGEDATA PRETTYFONT#) MAXMENUITEMWIDTH ( +ITEMS MENUFONT MENUUSERDATA BITMAPWIDTH) TB.USERDATA (TBUSERDATA) PRIN4 (COMMONLISP USESILPACKAGE) +REGIONSINTERSECTP (LEFT RIGHT BOTTOM TOP) \TEDIT.LINECACHE (LCBITMAP BITMAPWIDTH BITMAPHEIGHT) +GRAPHADDNODE (GRAPH.ADDNODEFN GRAPHNODES) \LINEWITHBRUSH (IMAGEDATA DDClippingBottom DDClippingTop +DDClippingRight DDClippingLeft DDDestination DDOPERATION BITMAPBITSPERPIXEL BITMAPBASE +BITMAPRASTERWIDTH BITMAPHEIGHT BITMAPWIDTH DDXOFFSET DDYOFFSET) \TFBRAVO.READ.PARALOOKS (TABSPEC +FMTUSERINFO LEFTMAR) \TEDIT.FIND.OVERLAPPING.LINE (YBOT NEXTLINE) AT.END.OF.SCREEN (END) GRIDXCOORD ( +LEFT WIDTH) \ALLOCHEIGHTTOGROUPEDWINDOW (ATTACHEDW ATWHEREONEDGE ATNOWY ATYSIZE ATNOWX ATMAXY) +TTWAITFORINPUT (WIDTH BOTTOM HEIGHT ROW TTOLDRIGHTFN TTOLDBUTTONFN) \PFFindRootDirEntryNum ( +countEntries entries type) TRAJECTORY.IP (XCOORD YCOORD) \TEDIT.SET.WINDOW (\WINDOW) GETPUPWORD ( +PUPCONTENTS) LEFTOFGRIDCOORD (LEFT WIDTH) \NSFILING.CONNECT (NSHDIRECTORYP) \TEDIT.LCASE.SEL (CH# DCH +POINT TXTHISTORY) GO.TO.FREELINE (ROW) TRANSLATEREG (LEFT BOTTOM WIDTH HEIGHT) RAIDSTACKCMD (FAULTFXP +GCFXP KbdFXP HardReturnFXP SubovFXP ResetFXP MiscFXP EndOfStack) PROVIDE.PROMPTING.WINDOW (LEFT BOTTOM + WIDTH HEIGHT) \ALLOCATE.ETHERPACKET (XIPBASE) PUTSEQUIN (SEQLOCK SEQSTATE SEQBROKEN %#UNACKEDSEQS +SEQOUTALLOC SEQINPUTQLENGTH SEQINALLOC SEQRETRANSMITTING SEQEVENT) TTYIN.READ (CPXREALCHAR NSCHARHASH +GETFILEPTR DEVICE CHARSET) TTYIN1 (PEEKEDCHAR PEEKEDECHOFLG TERMCLASS NSCHARHASH START END WAKEUP +STOPATOM CPXREALCHAR) \CCLOSURE.DEFPRINT (FRAMENAME ENVIRONMENT CHARPOSITION HASHMACROCHAR) \DEFINEDP +(DEFPOINTER) POSTSCRIPT.BITMAPSCALE (WIDTH HEIGHT) TB.CLEAR.LINE (TBWINDOW TBITEMHEIGHT) +\GET-COMPILED-DEFINITION (CCODEP DEFPOINTER) \SPP.SKIPBYTES (SPPERRORHANDLER CBUFSIZE COFFSET) +\DSPYPOSITION.PSC (IMAGEDATA POSTSCRIPTY POSTSCRIPTX) PFI.DEFAULT.HANDLER (PATTERNS TESTFN AMBIGUOUS?) + STRINGWIDTH (WIDTHS FONTCHARSETVECTOR IMSTRINGWIDTH IMAGEOPS) READHASHMACRO (COMMONLISP) +\TEDITOUTCHARFN (CHARPOSITION) FW-AFTERMOVEFN (OFDWINDOW LEFT OFDLEFT XCOORD BOTTOM OFDBOTTOM YCOORD) +TERM.SMOOTHSCROLL (DSP TTYWIDTH TTYHEIGHT FONTHEIGHT) CHAT.INIT (DPYNAME ENDOFSTREAMOP) \TEDIT.BLTCHAR + (DDCHARSET DDCHARIMAGEWIDTHS DDOFFSETSCACHE) \PFGetLVPage (LVlabel) SEDIT::GET-SELECTED-STRUCTURE ( +SEDIT::OPEN-NODE-CHANGED? SEDIT::SELECTION SEDIT::SELECT-NODE SEDIT::SELECT-START CL:STRUCTURE) +\MAKESPACEFORLOCKEDPAGE (LastLockedFilePage FPOCCUPIED FPVIRTUALPAGE) \SW2BM (LEFT BOTTOM HEIGHT WIDTH + BITMAPWIDTH BITMAPHEIGHT) \MOVETO.PSC (IMAGEDATA POSTSCRIPTX POSTSCRIPTY) RAIDCOMMAND (DEFINITIONCELL + StackBase PAGE#) SETUPPAGEMAP (PRIMARYKEY) \QUEUE.OUTPUT.IOCB (NDBCSB DLFIRSTOCB DLLASTOCB +DLIOCBSTATUS D0FIRSTOCB D0LASTOCB D0IOCBSTATUS NDBTASK#) MAXMENUITEMHEIGHT (MENUFONT ITEMS +BITMAPHEIGHT) CLOSEHASHFILE (Stream File) NODEREGION (NODEWIDTH NODEHEIGHT) FB.SHAPECOMMAND ( +BROWSERWINDOW WIDTH HEIGHT ABORTWINDOW PROMPTWINDOW PRIGHT) SYSOUT (TOTALTIME) CL:MAKE-SYMBOL ( +FATSTRINGP BASE LENGTH OFFST) \SETUFNENTRY (FNINDEX NEXTRA NARGS) MBUTTON.SET.NEXT.FIELD (SCRATCHSEL +DCH) FILL-VECTOR (TOTAL-SIZE READ-ONLY-P) \GETUFNENTRY (OP# FNINDEX) \NEWEPHEMERALPAGE ( +MISCSTACKRESULT) \DONEWEPHEMERALPAGE (PAGE# INVALID PRIMARYKEY SECONDARYKEY VACANT RPTRBASE) INFILECOM + (CONTENTS PRETTYTYPE MACRO) CHARACTER.READ (STOPATOM NSCHARHASH READSA) TERM.SETMARGINS (FONTHEIGHT +HOMEPOS FONTDESCENT) GRID (LEFT BOTTOM WIDTH HEIGHT) SEDIT::FORMAT-VALUES-CHANGED (SEDIT::NODE-TYPE +SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH SEDIT::COMPUTE-FORMAT-VALUES SEDIT::ENVIRONMENT CL:FORMAT) +TEDIT.REDO.MOVE (THOLDINFO THCH# SEL MOVESEL) DISCARDPUPS (INQUEUELENGTH INQUEUE) \NSFILING.OPENFILE ( +ACCESSBITS FULLFILENAME OPENFILELST) TERM.SET.TAB (TERM.TAB.STOPS) UNIONREGIONS (LEFT PRIGHT BOTTOM +PTOP) SEDIT::NOTE-CHANGE-IN-SIMPLE (SEDIT::LINEAR-FORM CL:STRUCTURE STRING SEDIT::FONT SEDIT::PRIN-2? +SEDIT::SUPER-NODE) CALLSCCODE (NTSIZE OVERHEADWORDS BYTESWAPPED STARTPC OPNARGS OPCODENAME LNCALLED +BOUND USEDFREE GLOBALS CALLED) RETVALUES (INVALIDP CLINK) FB.DEPTHCOMMAND (FBDEPTH) +BREAK.NSFILING.CONNECTION (OPENFILE NSCONNECTIONS DEVICEINFO DEVICENAME) SEDIT::SUBNODE-CHANGED ( +SEDIT::SUB-NODE-CHANGED SEDIT::NODE-TYPE SEDIT::SUPER-NODE) TEDIT.FORMATTEXTBOX (STATE REGIONSPEC +BOTTOM PAGEFOOTNOTELINES TOP LHEIGHT TEXTLEN PAGELINECACHE CACHE WIDTH STREAMHINT LMARK CHARLIM +FMTUSERINFO LFMTSPEC LEFTMARGIN FMTSPECIALX LEFT RIGHTMARGIN FMTSPECIALY 1STLN DESCENT FMTBASETOBASE +LEADBEFORE LEADAFTER LTRUEASCENT CHAR1 FMTNEWPAGEBEFORE FMTNEWPAGEAFTER YBASE) COPYTEXTSTREAM (PCTB +SCRATCHSEL EDITPROPS TEXTLEN MENUFLG) FLIPNODE (NODEWIDTH NODEHEIGHT) \SHOWMENULABEL (LEFT WIDTH +BOTTOM MENUFONT HEIGHT BITMAPHEIGHT MENUUSERDATA) \GET.IOCB (D0NEXTIOCB) MAKEEPSFILE (XSIZE YSIZE +XKERN YDESC) \SEQUIN.PUT (SEQFRNPORT MYSENDSEQ MYRECEIVESEQ %#SEQTURNOVERS SEQRETRANSMITQ +%#UNACKEDSEQS SEQINALLOC SEQSOCKET SEQTIMER SEQPROCESS) MAPHASHFILE (Key1 Key2 Size Stream ByteStream) + \CODEBLOCKP (WORDINPAGE PASSWORD GCTYPE INUSE TRAILER DTDHUNKP DTDGCTYPE) \TEMPLOCKPAGES ( +MISCSTACKRESULT) COMPOSEREGS (LEFT BOTTOM) \DSPFONT.PSC (IMAGEDATA POSTSCRIPTFONT \SFHeight +POSTSCRIPTSPACEFACTOR POSTSCRIPTWIDTHS IL-FONTID OTHERDEVICEFONTPROPS FONTIDNAME) EXCHANGEPUPS ( +PUPSOCEVENT PUPID) RAIDSHOWFRAME (INVALIDP ALINK CLINK) \TEDIT.MARK.REVISION (RIGHTMARGIN YBOT LHEIGHT +) ADJUSTLINE.AND.RESTORE (LASTCOL) \TEDIT.NEUTRALIZE.CHARLOOKS.MENU (SCRATCHSEL) +FB.INFOMENU.WHENSELECTEDFN (INFOMENUCHOICES) COMP.MLLIST (ARGS COMTYPE CODE) TEDIT.MODIFYLOOKS (CLFONT + CLULINE LTRUEDESCENT CLOLINE CLSTRIKE CLINVERTED) \PROMPTFORWORDERASE (XCOORD YCOORD) TERM.SCROLLDOWN + (DSP TTYWIDTH FONTHEIGHT BOTTOMMARGIN FONTDESCENT) \PROMPTFORWORDBIN (KEYBOARDSTREAM EOFP DEVICE) +CREATE-SHELL-STREAM (OPENFILELST) FM.CHANGELABEL (FM.USERDATA LEFT BOTTOM) \DSPLEFTMARGIN.PSC ( +IMAGEDATA POSTSCRIPTLEFTMARGIN) \DSPMOVELR (DDXPOSITION DDYPOSITION DDRightMargin DDLeftMargin DDFONT +IMAGEDATA) READPAGEMAP (PAGE# filePnPMP0 filePnPMT0) DELETEMENU (WHENSELECTEDFN) TEDIT.FORMATFOLIO ( +REGIONSPEC REGIONLOCALINFO PAGE#TEXT PAGE# FIRSTPAGE TEXTLEN WIDTH LEFTMARGIN LEFT RIGHTMARGIN CHARLIM + LHEIGHT BOTTOM DESCENT) \DOFLUSHVM (PAGE# MiscFXP) \RELEASEWORKINGSET (OCCUPIED RPTRBASE LOCKED VP) +\MATCHPCS (COUNT) UPDATE/MENU/IMAGE (IMAGE SCREEN ITEMS CENTERFLG MENUFONT TITLE MENUCOLUMNS MENUROWS +MENUBORDERSIZE MENUOUTLINESIZE ITEMWIDTH ITEMHEIGHT SCHEIGHT SCDEPTH SCBITSPERPIXEL SAVE BITMAPWIDTH +BITMAPHEIGHT BITMAPBITSPERPIXEL MENUGRID WIDTH BOTTOM LEFT MENUOFFSET CHANGEOFFSETFLG) OPENHASHFILE ( +Stream FULLNAME ByteStream) \FLUSHVM (MISCSTACKRESULT) \NSFILING.DESERIALIZE (NSDIRECTORIES +FSPROTOCOLNAME) \TEDIT.SELECT.CHARACTER (YBOT XKERN YBASE YDESC XSIZE WRIGHT YSIZE STREAMHINT SELOBJ) +\10MBSENDPACKET (10MBMULTICASTP NSHNM2 NSHNM1 NSHNM0 10MBDESTHOSTBASE 10MBLENGTH 10MBTYPE) +DECODE.WINDOW.ARG (XCOORD YCOORD) OVERFLOWLINE? (END START NEXTLINE) \PAGEDBACKFILEPTR (ACCESSBITS +FULLNAME COFFSET CPAGE CBUFDIRTY CHARPOSITION) \TEDIT.COPY.LINEDESCRIPTOR (LEFTMARGIN RIGHTMARGIN +LXLIM SPACELEFT LHEIGHT CHAR1 CHARLIM CHARTOP CR\END LDOBJ LHASPROT LFMTSPEC LTRUEDESCENT LTRUEASCENT +ASCENT DESCENT LHASTABS LMARK 1STLN LSTLN) STRPOSL (PNAMEBASE PNAMELENGTH FATPNAMEP BASE LENGTH OFFST +FATSTRINGP NSCHARHASH) \CREATECHARSET (\SFAscent \SFDescent FONTCHARSETVECTOR) \PFRemoveRootDirEntry ( +countEntries entries) CHANGECCODE (CODEARRAY NAMELOCS CONSTLOCS DEFLOCS PTRLOCS) SENDPUP ( +PUPSOURCESOCKETLO PUPSOURCESOCKETHI PSOCKETHI PSOCKETLO EPTRANSMITTING) DSPCLEOL (IMAGEDATA +DDLeftMargin DDYPOSITION DDRightMargin DDLINEFEED) \WRITEDIRTYPAGE1 (LOCKED DIRTY VP) +\DRAWPOINT.DISPLAY (BITMAPWIDTH BITMAPHEIGHT) \CLIPANDDRAWLINE (BITMAPBITSPERPIXEL) CHARWIDTHY ( +YWIDTHS FONTCHARSETVECTOR IMCHARWIDTHY IMAGEOPS) \DRAWPOLYGON.DISPLAY (BRUSHSHAPE BRUSHCOLOR XCOORD +YCOORD BRUSHSIZE) TEDIT.FORMATHEADING (REGIONSPEC REGIONLOCALINFO PAGEHEADINGS TEXTOBJ PPARALOOKS +TEXTLEN PLEN WIDTH LEFTMARGIN LEFT RIGHTMARGIN LHEIGHT BOTTOM DESCENT CHARLIM) NEAREST/PT/ON/GRID ( +XCOORD YCOORD) \PFAddRootDirEntry (countEntries entries) SWAPPUPPORTS (PUPSOURCE PUPSOURCESOCKETHI +PUPSOURCESOCKETLO) \STRINGWIDTH.GENERIC (PNAMEBASE PNAMELENGTH FATPNAMEP WIDTHS FONTCHARSETVECTOR +ESCAPECHAR OFFST BASE LENGTH FATSTRINGP) HASHFILEPROP (ValueType Stream File ItemCopyFn Size %#Entries + ItemLength) \AREAINREGIONP (LEFT BOTTOM PRIGHT PTOP) \DSPCLIPPINGREGION.DISPLAY (IMAGEDATA +DDClippingRegion) \PEEKCCODE.NOEOLC (PEEKCCODEFN) \SPP.PREPARE.OUTPUT (SPPTERMINATEDP SPPCONTENTS) +\DSPPRINTCHAR (IMAGEDATA CCECHO NSCHARHASH CHARPOSITION DDRightMargin DDXPOSITION DDLeftMargin) +\DSPRIGHTMARGIN.PSC (IMAGEDATA POSTSCRIPTRIGHTMARGIN) \CHARWIDTH.DISPLAY (WIDTHS FONTCHARSETVECTOR +DDFONT IMAGEDATA) \LASTNODE (COUNT) \INCCODE.EOLC (EOLCONVENTION INCCODEFN) +\NSFILING.CLOSE.CONNECTIONS (NSFILINGLOCK DEVICEINFO NSWATCHERPROC NSCONNECTIONS FSSESSIONTIMER +FSCONTINUANCE FSCOURIERSTREAMS OPENFILELST) INSPECT/TYPELESS (PASSWORD INUSE TRAILER GCTYPE ARLEN) +GRAPHOBJ.CHECKALIGN (GRAPHNODES) \STRINGWIDTH.DISPLAY (IMAGEDATA DDFONT DDSPACEWIDTH) COMP.GETBASE ( +OPNAME OPARG) SEDIT::CLEAR-ALL-LINEAR-FORMS (SEDIT::SUB-NODES SEDIT::ROOT) \CH.FIND.ORG.SERVER ( +OCORGANIZATION OCALLSERVERS) \DSPOPERATION.DISPLAY (IMAGEDATA DDOPERATION DDPILOTBBT DDSOURCETYPE) +PRINTERDEVICE (DEVICE DEVICENAME FULLNAME DELETEFILE) \FORMATBYTESTREAM (EXTERNALFORMAT EOLCONVENTION) + TERM.RIGHT (TTYWIDTH XPOS FONTWIDTH YPOS DSP) START.OF.PARAGRAPH? (END START CPXREALCHAR) +\DEVICESYMBOL (IMFONTCREATE IMAGEOPS) \FIXLINELENGTH.PSC (POSTSCRIPTRIGHTMARGIN POSTSCRIPTLEFTMARGIN +FONTAVGCHARWIDTH POSTSCRIPTFONT) PREVLINE (NEXTLINE) \PFFreeDiskPages (freePageCount) \UNCOPY (HINUM +LONUM HIWORD LOWORD BASE OFFST LENGTH TOTAL-SIZE OFFSET TYPE-NUMBER FILL-POINTER-P FILL-POINTER) +\BACKCOLOR.DISPLAY (IMAGEDATA DDTexture BITMAPRASTERWIDTH BITMAPBITSPERPIXEL DDDestination) +FB.INFOMENU.SHADEINITIALSELECTIONS (ITEMS) \BLTSHADE.DISPLAY (IMAGEDATA DDXOFFSET DDYOFFSET +DDClippingLeft DDClippingBottom DDClippingRight DDClippingTop LEFT BOTTOM WIDTH HEIGHT DDDestination +BITMAPBITSPERPIXEL DDTexture BITMAPHEIGHT DDOPERATION) PRINTCODE (OVERHEADWORDS BYTESWAPPED CLOSUREP +ARGTYPE NLOCALS FVAROFFSET NTSIZE STARTPC NATIVE OPPRINT OPCODENAME LEVADJ OPNARGS OP#) ICONW ( +BITMAPWIDTH BITMAPHEIGHT XCOORD YCOORD) \DSPLINEFEED.PSC (POSTSCRIPTLINESPACING IMAGEDATA) +SETFONTCLASSCOMPONENT (OTHERFDS) MAKEROOMFORPME (PRIMARYKEY) TEDIT.FORMATPAGE (STATE PAGE# +REGIONLOCALINFO REGIONSPEC TEXTLEN THISLINE FMTPARATYPE PPARALOOKS PCTB FMTUSERINFO OTHERPROPS HEIGHT +WIDTH CHARLIM REGIONSUBBOXES CHNO MINPAGE# MAXPAGE# PAGE#GENERATOR PAGECOUNT) EDITBMBUTTONFN (LEFT +BOTTOM BITMAPWIDTH BITMAPHEIGHT BITMAPBITSPERPIXEL XCOORD YCOORD WIDTH HEIGHT CUHOTSPOTX CUHOTSPOTY) +\BITBLT.DISPLAY (BITMAPWIDTH BITMAPHEIGHT IMAGEDATA LEFT DDClippingRegion BOTTOM DDDestination +DDXOFFSET DDClippingLeft DDYOFFSET DDClippingBottom DDClippingRight DDClippingTop DDTexture IMAGEOPS +WIDTH HEIGHT BITMAPBITSPERPIXEL DDOPERATION IMBITBLT) PRINTCODENT (BYTESWAPPED) GETPUP (INQUEUE +INQUEUELENGTH PUPSOCEVENT EPTYPE) DELETETO1 (CPXPRINTCHARS) \SPLITTREE (UPWARD COUNT TOTLEN) +TEDIT.CURSORMOVEDFN (LINES \WINDOW YBOT LHEIGHT MOUSEREGION WRIGHT FMTHARDCOPY LFMTSPEC LEFTMARGIN +WLEFT) NTH.COLUMN.OF (FIRSTCOL) FONTUNPARSE (WEIGHT SLOPE EXPANSION COLOR BACKCOLOR FORECOLOR) +\SEQUIN.PROCESS (SEQLOCK SEQSOCKET SEQRETRANSMITQ SEQCLOSEME PUPTYPE SEQSTATE ERRORPUPCODE SEQBROKEN +SEQOPENERRORHANDLER SEQRETRANSMITTING %#UNACKEDSEQS SEQIDLETIMEOUTCOMPUTER SEQTIMEOUT SEQIDLEFN +SEQTIMER MYRECEIVESEQ SEQLASTRESTART SEQLASTRESTARTTIMER SEQTIMEDOUT) MBUTTON.NEXT.FIELD.AS.TEXT ( +STREAMHINT SCRATCHSEL) TEDIT.UNPARSE.PAGEFRAMES (REGIONFILLMETHOD REGIONTYPE REGIONLOCALINFO +REGIONSPEC REGIONSUBBOXES) FONTCLASSUNPARSE (FONTCLASSNAME PRETTYFONT# DISPLAYFD PRESSFD INTERPRESSFD +OTHERFDS) TRACKCURSOR (NODEPOSITION) \DSPRESET.DISPLAY (IMAGEDATA DDClippingRegion DDFONT ROTATION +DDLeftMargin TOP LEFT BOTTOM RIGHT WIDTH HEIGHT DDTexture) 32MBADDRESSABLE (DL24BitAddressable) +FONTPROP (\SFHeight \SFAscent \SFDescent FONTFAMILY FONTSIZE FONTFACE WEIGHT SLOPE EXPANSION FORECOLOR + BACKCOLOR ROTATION FONTDEVICE FONTDEVICESPEC FONTSCALE) SEDIT::CHECK-SELECTION (SEDIT::SELECT-NODE +SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::POINT-NODE SEDIT::PENDING-DELETE?) +SEDIT::PARENTHESIZE-CURRENT-SELECTION (SEDIT::SELECTION SEDIT::SELECT-NODE SEDIT::SELECT-START +SEDIT::SELECT-END SEDIT::CARET-POINT SEDIT::SELECT-TYPE SEDIT::SUB-NODES SEDIT::DEPTH SEDIT::DISPLAY-WINDOW +) \TEDIT.APPLY.PAGEFORMATTING (\TEXTOBJ CH# SCRATCHSEL TXTPAGEFRAMES) \CH.LOCATE.SERVERS (NSNET +NSDOMAIN NSORGANIZATION) \FILLCIRCLE.DISPLAY (IMAGEDATA DDClippingLeft DDClippingBottom DDClippingTop +DDClippingRight DDOPERATION DDDestination BITMAPBITSPERPIXEL DDTexture BITMAPBASE BITMAPRASTERWIDTH +BITMAPWIDTH BITMAPHEIGHT DDXOFFSET DDYOFFSET) \DRAWELLIPSE.DISPLAY (IMAGEDATA DDClippingBottom +DDClippingTop DDClippingRight DDClippingLeft DDDestination DDOPERATION BITMAPBITSPERPIXEL BITMAPBASE +BITMAPRASTERWIDTH BITMAPHEIGHT BITMAPWIDTH DDXOFFSET DDYOFFSET) GETSEQUIN (INPUTQ SEQSTATE) +INSPECTW.REDISPLAY (SELECTABLEITEMREGION) \TEDIT.CLEAR.SCREEN.BELOW.LINE (WBOTTOM WRIGHT YBOT) +INSPECT/DATATYPE (DTDDESCRS) \DRAWCURVE.DISPLAY (XCOORD YCOORD) BROWSE/LAYOUT/HORIZ/COMPACTLY (NODEID +FROMNODES) \XCCSOUTCHAR (CHARSET CHARPOSITION) NEW/INSTANCE/OF/GRAPHNODE (NODEID NODELABEL NODEFONT +NODEWIDTH NODEHEIGHT NODEBORDER NODELABELSHADE TONODES) \SET.LASTVMEMFILEPAGE (NActivePages) +\DSPYPOSITION.DISPLAY (IMAGEDATA DDYPOSITION) \SEQUIN.CLOSE (SEQLOCK SEQSTATE) \DRAWLINE.DISPLAY ( +DDOPERATION IMAGEDATA DDDestination DDXOFFSET DDYOFFSET DDClippingLeft DDClippingRight +DDClippingBottom DDClippingTop) \DSPXPOSITION.DISPLAY (IMAGEDATA DDXPOSITION) +\TEDIT.FILL.IN.CHARLOOKS.MENU (SCRATCHSEL CLBOLD CLITAL CLULINE CLSTRIKE CLOLINE CLFONT FONTCLASSNAME +CH# CLSIZE CLOFFSET) \DRAWCIRCLE.DISPLAY (IMAGEDATA DDClippingBottom DDClippingTop DDClippingRight +DDClippingLeft DDDestination DDOPERATION BITMAPBITSPERPIXEL BITMAPBASE BITMAPRASTERWIDTH BITMAPHEIGHT +BITMAPWIDTH DDXOFFSET DDYOFFSET) ENDREAD? (NSCHARHASH CPXREALCHAR) \PFCurrentVol (da bootingInfo) +\DSPLINEFEED.DISPLAY (IMAGEDATA DDLINEFEED) \XCCSFORMATBYTESTREAM (CHARSET) COMP.LOOKUPVAR (VARNAME) +\TEDIT.FORMAT.FOUNDBOX? (STATE REQUIREDREGIONTYPE REGIONTYPE PAGECOUNT) \GETREGION.CHECKOPPT (XCOORD +YCOORD) \DSPRIGHTMARGIN.DISPLAY (IMAGEDATA DDRightMargin) DODIRCOMMANDS (LITERALNAME) +\TEDIT.CONVERT.FOREIGN.FORMAT (TXTPAGEFRAMES PCTB) \PUPERROR (PUPDESTHOST PUPTYPE PUPCONTENTS PUPBASE) + MBUTTON.NEXT.FIELD.AS.PIECES (SCRATCHSEL) \DSPLEFTMARGIN.DISPLAY (IMAGEDATA DDLeftMargin) +\SCALEDBITBLT.DISPLAY (WIDTH HEIGHT) \NSFILING.DESERIALIZE1 (NSHDATUM FSSESSIONLOCK) CONCAT ( +FATSTRINGP FATPNAMEP) \DSPFONT.DISPLAY (IMAGEDATA DDFONT \SFHeight WIDTHS FONTCHARSETVECTOR) +\MAKEBRUSH.ROUND (BITMAPBASE) SPP.CLEARATTENTION (SPPEOFBITS) \DRAWLINE.PSC (IMAGEDATA POSTSCRIPTSCALE +) ADDFILE0 (FILEPROP LOADTYPE) DUMPINITPAGES (PRIMARYKEY SECONDARYKEY) NTH.RELATIVE.COLUMN.OF (START +END CPXWIDTH) SEDIT::DELETE-NODES (CL:DELETE SEDIT::NODE-TYPE SEDIT::SUPER-NODE) MOVE.TO.LINE (START +FIRSTCOL ROW) MBUTTON.NEXT.FIELD.AS.NUMBER (STREAMHINT SCRATCHSEL) \FONTFACE (WEIGHT SLOPE EXPANSION) +DIRPRINTNAME (STRINGNAME) COURIER.EXPEDITED.CALL (ARGS) \DOVMEMFULLINTERRUPT (NActivePages) +FB.NEWINFOCOMMAND (BROWSERWINDOW INFOMENUW BOTTOM LEFT HEIGHT INFOMENUCHOICES) \NSFILING.AFTER.LOGIN ( +FSNAMESTRING) TERM.NEWLINE (YPOS DSP) \MAP-CODE-POINTERS (GCTYPE DTDGCTYPE STARTPC BYTESWAPPED +OPCODENAME OPNARGS) \REGIONOVERLAPAREAP (LEFT RIGHT BOTTOM TOP) FB.ALLOW.ABORT (ABORTWINDOW) +\MAP-CODE-LITERALS (GCTYPE DTDGCTYPE STARTPC OVERHEADWORDS BYTESWAPPED OPNARGS OPPRINT OPCODENAME) +\DRAWCURVE.PSC (IMAGEDATA BRUSHSIZE BRUSHSHAPE BRUSHCOLOR POSTSCRIPTSCALE) \FONT.COMPARESYMBOL ( +PACKAGEINDEX PNAMEBASE PNAMELENGTH FATPNAMEP) CHECKIFPAGE (Key) GETGRIDBOXREGION (LEFT DDXOFFSET +IMAGEDATA BOTTOM DDYOFFSET XCOORD YCOORD RIGHT TOP) \PFPutRootDirectory (volumePage) \AREAVISIBLE? ( +SCTOPW SCREEN REG NEXTW) FONTASCENT (\SFAscent) SEDIT::CREATE-PRETTY-PRINT-ENV (SEDIT::INDENT-BASE +SEDIT::INDENT-STEP SEDIT::EM-WIDTH SEDIT::MAX-WIDTH) EDITADDNODE (NODEPOSITION NODELABEL) +MBUTTON.NEXT.FIELD.AS.ATOM (STREAMHINT SCRATCHSEL) DSPXSCREENTOWINDOW (DDXOFFSET IMAGEDATA) FONTHEIGHT + (\SFHeight) \PFGetRootDirectory (volumePage) TEDIT.BUILD.PCTB0 (STREAMHINT FMTSPEC PPARALOOKS PLEN) +FONTDESCENT (\SFDescent) PAINTW (DSP SCDEPTH SCREEN SCBITSPERPIXEL BITMAPWIDTH BITMAPHEIGHT CUIMAGE +CUMASK) \10MBGETPACKET (10MBTYPE) SEGMENT.BIT.LENGTH (CPXWIDTH) \DSPBACKCOLOR.DISPLAY (IMAGEDATA +DDCOLOR DDDestination BITMAPBITSPERPIXEL) SPP.FLUSH.TO.EOF (CBUFSIZE SPPEOFBITS) SHOW.MATCHING.PAREN ( +ROW START FIRSTCOL) \DSPCOLOR.DISPLAY (IMAGEDATA DDCOLOR DDDestination) \NSGC.COLLECT.DIRECTORIES ( +NSHDATUM FSPROTOCOLNAME NSHFILEID) TEDIT.SCAN.LINE (WIDTHS CHARS LOOKS TEXTLEN DESC CHAR1 FMTHARDCOPY +LFMTSPEC LEFTMARGIN BASE LEN CLSELHERE CLPROTECTED SCRATCHSEL YBOT LN L1 \WINDOW CHARLIM) +BRHL/MOVE/RIGHT (NODEWIDTH NODEPOSITION NODELABEL XCOORD) TEDIT.PROMPTFLASH (MENUFLG PROMPTWINDOW) +\PRINDATUM.TO.STRING (LENGTH FATSTRINGP BASE OFFST) BROKENDEF (STARTPC BYTESWAPPED OPCODENAME OPNARGS) + \TFBRAVO.SPREAD.LOOKS (RUNLOOKS) UTF16BE.OUTCHARFN (CHARPOSITION) \INSERTTREE (TOTLEN COUNT PTREENODE + PLEN) TEDIT.FORMAT.HARDCOPY (TXTPAGEFRAMES THISLINE TXTFILE FULLNAME CHNO TEXTLEN STATE NEWPAGELAYOUT + PAGECOUNT) \STREAM.FROM.PACKET (PACKETEXCHANGEBODY XIPLENGTH) \DRAWCIRCLE.PSC (IMAGEDATA BRUSHSHAPE +BRUSHSIZE BRUSHCOLOR POSTSCRIPTSCALE) ADDPME (PRIMARYKEY SECONDARYKEY) CLOSESEQUIN (SEQEVENT SEQSTATE) + VOLUMESIZE (volumeSize) PRIN1 (COMMONLISP LINELENGTH) FM.WHICHITEM (YCOORD BOTTOM XCOORD LEFT +FM.USERDATA WIDTH HEIGHT) SEDIT::CREATE-PRELINEARIZED-NODE (SEDIT::DEPTH SEDIT::SUB-NODES +SEDIT::SUB-NODE-INDEX) SPACES (LINELENGTH CHARPOSITION) PRINTNUM (WIDTH RADIX LEFTFLUSH PAD0) +\DRAWELLIPSE.PSC (IMAGEDATA BRUSHSHAPE BRUSHSIZE BRUSHCOLOR POSTSCRIPTSCALE) PRINTOPCODES (OP# +OPCODENAME OPNARGS OPPRINT LEVADJ UFNFN) \TEDIT.UNIQUIFY.CHARLOOKS (TXTCHARLOOKSLIST) \TRANSLATE.3TO10 + (NDBTRANSLATIONS NDBPUPHOST#) GETCHARBITMAP (FONTCHARSETVECTOR IMAGEWIDTHS WIDTHS BITMAPBITSPERPIXEL +CHARSETBITMAP OFFSETS) \ABORT.BULK.DATA (CBUFSIZE SPPEOFP) BRHL/LAYOUT (NODEPOSITION TONODES NODEWIDTH + NODEHEIGHT) \DO.PROGV.SETUP.FRAME.AND.EXECUTE (FNHEADER NEXTBLOCK FIRSTPVAR OVERHEADWORDS) +MAKEWITHINREGION (LEFT PRIGHT WIDTH BOTTOM PTOP HEIGHT) \TEDIT.UPDATETREE (UPWARD COUNT TOTLEN) +\CORE.CLOSEFILE (ACCESS INFOBLK EPAGE EOFFSET) \TEDIT.PARSE.CHARLOOKS.MENU (SCRATCHSEL CH#) +\CORE.RELEASEPAGES (EPAGE FILEPAGES PAGENUMBER) \PFGetVols (subVolumeCount) \NSFILING.COPYFILE ( +OPENFILE) SEDIT::CREATE-NODE (SEDIT::DEPTH SEDIT::SUB-NODES SEDIT::SUB-NODE-INDEX) \CORE.UPDATEOF ( +CBUFPTR COFFSET CBUFSIZE CPAGE PAGE OFFSET) OUTPUT (FULLNAME) SHOW.IP (IPDATA IPSHOWSTREAM GETFILEPTR +DEVICE IPXPOS IPCORRECTSTARTX NSCHARSET) FILES.PUTDEF (FILEPROP TOBEDUMPED FILEDATES) +\TEDIT.ADJUST.LINES (WBOTTOM YBOT WRIGHT LHEIGHT YBASE DESCENT NEXTLINE) GO.TO.RELATIVE (FIRSTCOL ROW) + DSPYSCREENTOWINDOW (DDYOFFSET IMAGEDATA) \VAMGetVAMPageFor (vamStart) \FAST4BIT (N1 N2 N3 N4) +RPLSTRING (LENGTH PNAMEBASE PNAMELENGTH FATPNAMEP BASE OFFST FATSTRINGP) ENDPREAMBLE.IP (IPDATA +IPPAGEFONTS IPNEXTFRAMEVAR) \CORE.DELETEFILE (ACCESS INFOBLK OPENP IOFILEFULLNAME COREDIRECTORY) +\SHOWTEXT (\WINDOW WRIGHT) CLEARFILEPKG (TOBEDUMPED FILEPROP) \CORE.GETINFOBLOCK (INFOBLK +COREDIRECTORY) MB.MARGINBAR.TABTRACK (MARUNIT TABX) EDITAPPLYTOLINK (GRAPHNODES) SEDIT::START-COMMENT +(SEDIT::CARET-POINT SEDIT::POINT-NODE SEDIT::POINT-TYPE SEDIT::NODE-TYPE) CHAT.STARTUP (DPYNAME) +BKSYSCHARCODE (READ WRITE) REDISPLAYW (REDISPLAYFN SCREEN) VOLUMES (LVlabel) \GETREGION.CHECKBASEPT ( +XCOORD YCOORD) BKSYSBUF (PNAMEBASE PNAMELENGTH FATPNAMEP OFFST BASE LENGTH FATSTRINGP) \CORE.FINDPAGE +(COREPAGECACHE PAGENUMBER FILEPAGES PAGEPOINTER) \CHTOPC (COUNT) GC-FILING-DIRECTORY (OPENFILE +NSDIRECTORYP NSDIRECTORIES FSNAMESTRING NSCONNECTIONS DEVICEINFO NSHBUSYCOUNT NSHDATUM FSCACHEDHANDLES +) SPP.SENDATTENTION (XIPLENGTH) \MAPPNAME (USESILPACKAGE) \CORE.GENERATEFILES (DEVICEINFO +IOFILEFULLNAME) \TFBRAVO.EOLS (TEXTLEN) FB.SORTCOMMAND (TABLEBROWSER NOSUBDIRECTORIES INFODISPLAYED +NAMESTART TIDATA FILEINFO HASDIRPREFIX STARTOFNAME HEADINGWINDOW) FILL.INCY (ADDR LLEN FBBT) +PROCESS.EVALV (PROCDELETED PROCFX) \BITMAPTOSCREEN (SCDESTINATION) CHECKFPTOVP (NActivePages +FPOCCUPIED FPVIRTUALPAGE) FB.GET.SORT.MENU (SORTMENU INFODISPLAYED) FONTCOPY (FONTFAMILY FONTSIZE +FONTFACE ROTATION FONTDEVICE) CURRENT.WORD (START NSCHARHASH CPXREALCHAR STOPATOM) \FILLCIRCLE.PSC ( +BITMAPWIDTH BITMAPHEIGHT BITMAPRASTERWIDTH) TYPE.BUFFER (CPXPRINTCHARS CPXWIDTH) TOGGLE/SIDESFLG ( +SIDESFLG) \CORE.FILEINFOFN (COREFILELST) TEDIT.BUILD.PCTB1 (STREAMHINT FMTSPEC PLEN PLOOKS PPARALOOKS) + \PFFindRootDirEntry (file entries) FONTMAPARRAY (PRETTYFONT#) SEDIT::STRINGWIDTH (OFFST BASE LENGTH +FATSTRINGP) \CORE.NEXTFILEFN (COREFILELST IOFILEFULLNAME) MB.THREESTATE.DISPLAY (XSIZE YSIZE YDESC) +FB.ALPHABETIC.ATTR (SORTVALUE TIDATA) GAINSPACE (PRECHECK MESSAGE KEYLST FORM) SEDIT::UPDATE-TITLE ( +SEDIT::CHANGED-STRUCTURE? SEDIT::ICON-TITLE) \CORE.GETFILEINFO.FROM.INFOBLOCK (IOEPAGE IOEOFFSET +IOFIBCreationTime IOFIBReadTime IOFIBWriteTime IOFIBType COREEOLC) CH.LIST.DOMAINS (OCALLSERVERS +NSORGANIZATION) FB.INSERT.SUBDIRECTORIES (FILENAME SUBDIREND TIDATA) \SMASHABLESTRING (READONLY +FATSTRINGP) TERM.IDENTIFY.SELF (TERM.IDENTITY.STRING OUTSTREAM) \CORE.GETFILEHANDLE (IOFILEFULLNAME +IOEOFFSET IOEPAGE COREEOLC) BRHL/LAYOUT/DAUGHTERS (NODEPOSITION YCOORD NODEID FROMNODES) +TEDIT.SELECT.LINE.SCANNER (WRIGHT THISLINE TEXTLEN NEXTLINE YBOT BOTTOM SCRATCHSEL LN L1 \WINDOW +LHASPROT FORMATTEDP CHAR1 CHARLIM CR\END PREVLINE PTOP CH# CHLIM LEFTMARGIN LXLIM XLIM X0) SPP.OPENP ( +SPPTERMINATEDP) \RPLCHARCODE (READONLY LENGTH FATSTRINGP BASE OFFST) SHAPEW (RESHAPEFN WIDTH HEIGHT +LEFT BOTTOM NEWREGIONFN) \BLTSHADE.PSC (IMAGEDATA POSTSCRIPTCLIPPINGREGION LEFT BOTTOM WIDTH HEIGHT +BITMAPWIDTH BITMAPHEIGHT BITMAPRASTERWIDTH) SEDIT::CREATE-GAP-NODE (SEDIT::LINEAR-ITEM) +TOGGLE/DIRECTEDFLG (DIRECTEDFLG) \TEDIT.APPLY.CHARLOOKS (\TEXTOBJ CH# SEL DCH) \TEDIT.PROCIDLEFN ( +MENUFLG) TEDIT.BUILD.PCTB2 (STREAMHINT FMTSPEC TXTCHARLOOKSLIST TXTPARALOOKSLIST PFATP PFPOS PLEN +PLOOKS) \CORE.GETFILEINFO (ACCESSBITS) \TEDIT.UNIQUIFY.PARALOOKS (TXTPARALOOKSLIST) SEDIT::TTYEXITFN ( +SEDIT::OPEN-NODE-CHANGED?) GNCCODE (LENGTH OFFST FATSTRINGP BASE) GLCCODE (FILL-POINTER FATSTRINGP +BASE OFFST) \PRINTFPTOVP (NActivePages) STREQUAL (LENGTH BASE OFFST FATSTRINGP) TYPENAME (DTDNAME) +FB.PROMPTFORINPUT (PROMPTWINDOW) CL:SYMBOL-PACKAGE (PACKAGE) FW-ADJUST-REGION (OFDSTATUS NAMEWIDTH +YCOORD) L-CASE (FATPNAMEP XBASE PNAMEBASE PNAMELENGTH FATSTRINGP OFFST BASE LENGTH) ENDPAGE.IP (IPDATA +) \LOCKFN (DEFINITIONCELL CCODEP DEFPOINTER) U-CASEP (PNAMEBASE PNAMELENGTH FATPNAMEP OFFST BASE +LENGTH FATSTRINGP) GETTOPVAL (VALUE) \MAKEWRITABLESTRING (FATSTRINGP) \NSFILING.COPY/RENAME ( +NSDIRECTORIES NSROOTNAME NSVERSION NSHBUSYCOUNT NSHDIRECTORYP NSHDATUM FSCACHEDHANDLES FSSESSIONLOCK) +SPPOUTPUTSTREAM (SPPOUTPUTSTREAM) EDITBM (WIDTH HEIGHT LEFT BOTTOM BITMAPBITSPERPIXEL BITMAPWIDTH +BITMAPHEIGHT) TEDIT.PUT (STREAMHINT THISLINE FULLNAME TEXTLEN FULLFILENAME TXTFILE EOLCONVENTION PCTB +POBJ PFILE NEXTPIECE) TEDIT.UNDO.REPLACE (THOLDINFO THCH# SEL THLEN THFIRSTPIECE THPOINT) +%%MAKE-STRING-ARRAY-FAT (INDIRECT-P TOTAL-SIZE) \TEDIT.TEXTBIN.STRINGSETUP (FATSTRINGP BASE OFFST +COFFSET) \LOCKWORDS (WORDINPAGE) \CREATEDISPLAYFONT (FONTCHARSETVECTOR) %%MAKE-ARRAY-WRITEABLE ( +INDIRECT-P) \CORE.GETFILENAME (COREDIRECTORY) \#BLOCKDATACELLS (ARLEN DTDHUNKP DTDSIZE) +\CORE.PACKFILENAME (DEVICENAME) TEDIT.PUT.PCTB2 (FMTSPEC BASE PCTB PLOOKS DEFAULTCHARLOOKS +EOLCONVENTION TXTPAGEFRAMES TXTPARALOOKSLIST TXTCHARLOOKSLIST PPARALAST PLEN PPARALOOKS POBJ PFATP +PNEW PFILE FULLNAME PFPOS PSTR OFFST LENGTH FATSTRINGP NEXTPIECE CARETLOOKS) TEDIT.GET.OBJECT0 ( +TEXTOBJ PREVPIECE PLOOKS DEFAULTCHARLOOKS POBJ) FB.PROMPTW.FORMAT (PROMPTWINDOW) +\TEDIT.DIFFUSE.PARALOOKS (PPARALAST PPARALOOKS NEXTPIECE PREVPIECE) \LOCKVAR (VCELL) +\NSRANDOM.CLOSEFILE (NSFILING.CONNECTION FSSESSIONLOCK ACCESS ACCESSBITS DEVICEINFO DEVICE) +\CREATE-REAL-CHARSET.DISPLAY (FONTCHARSETVECTOR WEIGHT SLOPE FONTAVGCHARWIDTH) SEDIT::BUILD-WINDOW ( +SEDIT::ENVIRONMENT SEDIT::ICON-TITLE SEDIT::EDIT-TYPE LEFT BOTTOM RIGHT TOP SEDIT::DEFAULT-FONT +SEDIT::DEFAULT-LINE-SKIP) RAISE/TRANSITION/CHAIN (YCOORD) \TEDIT.FIXINSSEL (SET \TEXTOBJ CH# CHLIM) +\PUTBASESTRING (BASE OFFST LENGTH FATSTRINGP PNAMEBASE PNAMELENGTH FATPNAMEP) TERM.GODOWN (YPOS +BOTTOMMARGIN FONTDESCENT XPOS FONTHEIGHT DSP) INSERTLINE (END ROW NEXTLINE) \SFMAKEITALIC (WIDTHS +OFFSETS CHARSETASCENT CHARSETDESCENT CHARSETBITMAP BITMAPWIDTH BITMAPHEIGHT) \TEDIT.SHOW.CHARLOOKS ( +\TEXTOBJ CH# SEL SCRATCHSEL TEXTLEN PCTB PLOOKS) AUTOCR? (END) \TEXTMENU.TOGGLE.DISPLAY (XSIZE YSIZE +YDESC) ALIGNMENTNODE (GRAPHNODES) SEDIT::CREATE-CONSTANT-STRINGS (SEDIT::DEFAULT-FONT SEDIT::KEYWORD-FONT +) SEDIT::CFV-CLISP (SEDIT::SUB-NODES SEDIT::WIDTH SEDIT::LPAREN-STRING SEDIT::SPACE-WIDTH +SEDIT::PREFERRED-WIDTH SEDIT::MAX-WIDTH) \IFSERRORSTRING (SEQNAME) \BUILDSLUGCSINFO (WIDTHS) +COURIER.WRITE (HIBYTE LOBYTE) \CORE.OPENFILE (ACCESS INFOBLK IOFILEFULLNAME IOEOFFSET IOEPAGE COREEOLC +) TEDIT.UNDO.MOVE (THAUXINFO THTEXTOBJ THOLDINFO THCH# SEL LINES TEXTLEN THFIRSTPIECE) +\TEDIT.TEXTBIN.FILESETUP (ACCESSBITS PAGE PFPOS OFFSET CPPTR CPAGE COFFSET CBUFSIZE) \SETPUPCHECKSUM ( +PUPCHECKSUMBASE PUPLENGTH) \SFROTATECSINFO (CHARSETBITMAP) POSTSCRIPT.HARDCOPYW (IMAGEDATA +POSTSCRIPTCLIPPINGREGION BITMAPWIDTH LEFT WIDTH BITMAPHEIGHT BOTTOM HEIGHT POSTSCRIPTSCALE) \SETARG0 ( +BLINK NARGS IVAR) FB.INCREASING.NUMERIC.ATTR (SORTVALUE TIDATA) \COREFILE.SETPARAMETERS (INFOBLK +IOFIBType) SEDIT::ASSIGN-FORMAT-CLISP (SEDIT::SUB-NODES CL:STRUCTURE) \NSRANDOM.OPENFILE (ACCESSBITS +FULLFILENAME DEVICEINFO) \TEDIT.NEUTRALIZE.CHARLOOKS (\TEXTOBJ CH#) \DOHARDRETURN (HardReturnFXP) +TTADDTAB (FIRSTCOL) MB.MARGINBAR.DISPLAYFN (XSIZE YSIZE MARL1 MARLN MARR MARTABS MARUNIT WIDTH YDESC) +\DOHARDRETURN1 (FNHEADER FRAMENAME CLINK ALINK USECNT NEXTBLOCK SIZE IVAR BLINK VALIDNAMETABLE +NAMETABHI NAMETABLO) COMP.STTAG (LEVEL FRAME OPNAME TAG) \MKATOM (PNAMELENGTH PNAMEBASE +PNAMEFATPADDINGBYTE FATPNAMEP) SEDIT::COMPUTE-COMMENT-COLUMN (SEDIT::ENVIRONMENT +SEDIT::COMMENT-WIDTH-PERCENT SEDIT::INIT-COMMENT-SEPARATION) BRHC/OFFSET (NODEPOSITION YCOORD TONODES) + \TEDIT.FIXDELSEL (SET \TEXTOBJ CH# CHLIM) \GCSCANSTACK (StackBase EndOfStack FLAGS FIRSTPVAR FNHEADER + NLOCALS BOUND NEXTBLOCK VALIDNAMETABLE NAMETABHI NAMETABLO OVERHEADWORDS NTSIZE FIRSTTEMP +VALIDPOINTERP SIZE) SEDIT::UNDO-ATOM-CHANGE (CL:STRUCTURE SEDIT::NODE-TYPE) \CORE.SETFILEPTR (PAGE +OFFSET CPAGE ACCESSBITS COFFSET) \SCALEDBITBLT.PSC (IMAGEDATA POSTSCRIPTSCALE BITMAPWIDTH BITMAPHEIGHT + POSTSCRIPTX POSTSCRIPTY POSTSCRIPTCLIPPINGREGION) \PARSE.NUMBER (COMMONLISP COMMONNUMSYNTAX) SEDIT::REDO + (SEDIT::UNDO-UNDO-LIST SEDIT::DISPLAY-WINDOW SEDIT::SELECTION SEDIT::CARET-POINT) \CORE.BACKFILEPTR ( +ACCESSBITS FULLNAME COFFSET CPAGE CHARPOSITION) BLTSHADE (IMBLTSHADE IMAGEOPS) TERM.ERASE.IN.DISPLAY ( +TTYWIDTH XPOS YPOS FONTHEIGHT FONTDESCENT HOMEPOS WINDOW DSP) \CORE.SETEOFPTR (ACCESSBITS PAGE OFFSET +CPAGE) \DECUSECOUNT (INVALIDP USECNT ALINK BLINK CLINK SIZE RESIDUAL DUMMYBF IVAR) \CREATECHARSET.PSC +(WIDTHS) PURGEDSKDIRECTORY (OPENP VOLUME LVlabel) FM.REDISPLAYITEM (FM.USERDATA LEFT BOTTOM) +BMOBJ.PUTFN (BITMAP BMOBJSCALEFACTOR BMOBJROTATION BMOBJDESCENT) \INCUSECOUNT (INVALIDP USECNT +NEXTBLOCK FLAGS) COMP.STJUMP (OPARG OPNAME FRAME LEVEL) \COPYDATATYPE (DTDPTRS DTDSIZE) SEDIT::COPY-NODE + (SEDIT::NODE-TYPE CL:STRUCTURE SEDIT::SUB-NODE-INDEX SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH +SEDIT::UNASSIGNED SEDIT::SUB-NODES SEDIT::LINEARIZE SEDIT::LINEAR-FORM SEDIT::ACTUAL-WIDTH +SEDIT::ACTUAL-LLENGTH SEDIT::COPY-STRUCTURE) SEDIT::SKIP-TO-GAP (SEDIT::SELECTION SEDIT::CARET-POINT +SEDIT::DISPLAY-WINDOW SEDIT::SELECT-NODE SEDIT::POINT-NODE) MB.NB.DISPLAYFN (XSIZE YSIZE YDESC) +FW-MOVEW (OFDWINDOW LEFT BOTTOM) \DOSTACKOVERFLOW (ResetFXP SubovFXP) GETSELECTEDITEMS (ITEMS) +\CORE.GETNEXTBUFFER (CPAGE COFFSET ACCESSBITS FULLNAME CBUFSIZE CBUFPTR EPAGE EOFFSET) +\NSFILING.SETFILEINFO (RANDOMACCESSP NSFILING.HANDLE NSHDATUM FULLFILENAME) \MOVEFRAME (NEXTBLOCK SIZE + EndOfStack VALIDNAMETABLE NAMETABHI BLINK NAMETABLO RESIDUAL DUMMYBF) WINDOWWORLD (SCONOFF +SCDESTINATION SCTITLEDS) FROMLINKS (FROMNODES) \ALLOCBLOCK (TRAILER) \SETUPUSERSTACK (EndOfStack +MachineType) SLICESET (LINEARIZEDARRAY OFFSETS OFFSETCONSTANT) \NSFILING.NEXTFILE (NSGENERATOR +NSCONNECTION NSFILTER NSIGNOREDIRECTORIES NSBULKSTREAM) TEDIT.GET.CHARLOOKS0 (CLBOLD CLITAL) +\GATHER-CLEANUP-FORMS (PROCFX) SEDIT::TRANSLATE-CHARS (MULTESCAPECHAR OFFST BASE LENGTH FATSTRINGP) +SEDIT::LINEARIZE-CLISP (SEDIT::SUB-NODES SEDIT::SPACE-WIDTH SEDIT::ENVIRONMENT SEDIT::START-X +SEDIT::INDENT-BASE SEDIT::WIDTH SEDIT::LPAREN-STRING SEDIT::INLINE-WIDTH SEDIT::RIGHT-MARGIN +CL:STRUCTURE SEDIT::COMMENT-WIDTH SEDIT::COMMENT-SEPARATION SEDIT::NODE-TYPE CL:FORMAT SEDIT::LAST-LINE + SEDIT::LINEAR-FORM SEDIT::DESTINATION SEDIT::UNASSIGNED SEDIT::ROOT SEDIT::CURRENT-X SEDIT::RPAREN-STRING +) \COERCETODS (DSP) \FONTFILENAME.OLD (WEIGHT SLOPE) SEDIT::STRINGIFY-ATOM (CL:STRUCTURE) +TTYIN.SHOW.?ALTERNATIVES (NSCHARHASH) MBUTTON.FIND.NEXT.BUTTON (PCTB POBJ PLEN NEXTPIECE) +\FONTFILENAME (WEIGHT SLOPE EXPANSION) SEDIT::COMPUTE-SELECTION-POSITION-DEFAULT (SEDIT::SUB-NODES +SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::START-X SEDIT::FIRST-LINE +SEDIT::ACTUAL-LLENGTH SEDIT::LAST-LINE) FB.DECREASING.NUMERIC.ATTR (SORTVALUE TIDATA) \ITEMW.FLIPCOPY +(SELECTABLEITEMREGION LEFT BOTTOM WIDTH) \AGE.ROUTING.TABLE (RTHOPCOUNT RTTIMER RTRECENT) MAPATOMS ( +DTDSIZE DTDFREE PAGE#) \EXTENDSTACK (EndOfStack) EXTEND/TRANSITION/CHAIN (YCOORD XCOORD) LISPVERSION ( +LVersion) FB.DIRECTORYP (DIRECTORYFILEP) SEDIT::CONTAINS? (SEDIT::SELECT-NODE SEDIT::SELECT-START +SEDIT::SELECT-END SEDIT::SUB-NODE-INDEX SEDIT::SUPER-NODE SEDIT::DEPTH) \TEDIT.APPLY.PARASTYLES ( +TXTSTYLESHEET FMTSTYLE) ATOMHASH#PROBES (PNAMEBASE PNAMELENGTH FATPNAMEP BASE OFFST LENGTH FATSTRINGP) + CREATE-PROCESS-STREAM (OPENFILELST) ONEDINSPECTW.CREATE (LEFT BOTTOM WIDTH HEIGHT XCOORD YCOORD) +\DSPSCALE.PSC (IMAGEDATA POSTSCRIPTSCALE) %%ARRAY-BASE (BASE) SEDIT::UNDO-EXTRACT (SEDIT::SUB-NODES +SEDIT::DEPTH) \VAMCheckEndOfVol (volumeSize) %%ARRAY-OFFSET (OFFSET) TEDITFROMBRAVO (RUNS PARALOOKS) +\HANDLE.RAW.PUP (EPNETWORK PUPDESTHOST NDBPUPHOST# PUPDESTNET NDBPUPNET# PSOCKETLO PSOCKETHI +PUPDESTSOCKETHI PUPDESTSOCKETLO PUPTYPE PUPCHECKSUM PUPCHECKSUMBASE PUPLENGTH INQUEUELENGTH +PUPSOC#ALLOCATION INQUEUE PUPSOCEVENT) %%ARRAY-TYPE-NUMBER (TYPE-NUMBER) POSTSCRIPT.ENDPAGE (IMAGEDATA + POSTSCRIPTPAGEBLANK) SEDIT::GETKEY (PROCTYPEAHEAD SEDIT::CARET-POINT SEDIT::DISPLAY-WINDOW) +\GENERIC-UNREGISTER-STREAM (OPENFILELST) \FONTFACE.COLOR (COLOR) \ADD-OPEN-STREAM (OPENFILELST) +\NSFILING.FILEINFOFN (CURRENTINFO) \COURIER.RESULTS (RESULTS ERRORS INHERITS ERR# ARGS) \PAGEDEOFP ( +ACCESSBITS COFFSET CPAGE CBUFPTR CBUFSIZE EPAGE EOFFSET) SEDIT::SELECTED-FN-NAME (SEDIT::OPEN-NODE-CHANGED? + SEDIT::CARET-POINT SEDIT::POINT-NODE) \PFInitializeVols (subVolumeCount) BEGINPREAMBLE.IP (IPDATA) +\PAGEDGETEOFPTR (EPAGE EOFFSET) \FIND.LOCALPUPHOSTNUMBER (PUPNET# PUPHOST#) \SFLHASHLOOKUP (HASHMASK +HASHPAGE#) \PAGEDGETFILEPTR (CPAGE COFFSET) FW-SHAPEW (OFDWINDOW LEFT BOTTOM WIDTH HEIGHT) +SEDIT::ASSIGN-FORMAT-DOTLIST (SEDIT::SUB-NODES) \NSRANDOM.READPAGES (NSFILING.CONNECTION EPAGE EOFFSET + NSFILING.PAGE.CACHE NSFILING.LAST.REQUEST ACCESSBITS NSFILING.SERVER.LENGTH) BREAKLINE (END START) +PUTD (FRAMENAME) \NODIRCORE.OPENFILE (ACCESS INFOBLK IOFILEFULLNAME IOEOFFSET IOEPAGE COREEOLC) \PUTD +(DEFINITIONCELL FNHEADER ENVIRONMENT TYP BASE ARGTYPE NTSIZE) COPYGRAPH (GRAPHNODES NODEPOSITION) +\RENAMEDFN (FNHEADER STARTPC) SI::UNWIND-TO-BLIP (INVALIDP CLINK FIRSTPVAR) \INIT-MISCN-TABLE (BASE +INDEX MVS) GRAPHEROBJ (LEFT BOTTOM) GETD (DEFINITIONCELL DEFPOINTER CCODEP) CL:SYMBOL-NAME ( +PNAMELENGTH FATPNAMEP PNAMEBASE) POSTSCRIPT.PUTCOMMAND (IMAGEDATA POSTSCRIPTCHARSTOSHOW +POSTSCRIPTPENDINGXFORM) GETMENUITEM (ITEMS MENUROWS MENUCOLUMNS) CLOSEALL (USERVISIBLE) SLICEDIMENSION + (SELECTEDDIMS) SCROLLW (SCROLLFN) \DSPSCALE2.PSC (IMAGEDATA POSTSCRIPTSCALE) \POLYSHADE.BLT (BY RX LX + WC TY) \NSRANDOM.SESSION.WATCHER (DEVICEINFO NSCONNECTIONS OPENFILELST DEVICE ACCESSBITS +FSSESSIONTIMER FSCONTINUANCE FSLASTREALACTIVITYTIMER FSREALACTIVITY) \STKMIN (OPCODENAME LEVADJ BASE +STARTPC NA PV) \NSFILING.GETFILEINFO (RANDOMACCESSP ACCESSBITS NSFILING.HANDLE NSHATTRIBUTES +NSFILING.CONNECTION) \FINDOP (OPCODENAME OP#) SEDIT::SPLIT-LITATOM (SEDIT::NODE-TYPE +SEDIT::OPEN-NODE-CHANGED? SEDIT::SUPER-NODE) FM.RESETSHAPE (LEFT BOTTOM) \GET-COMPILED-CODE-BASE ( +CCODEP DEFPOINTER FNHEADER) SEDIT::COMPUTE-FORMATS-AND-FORMAT-VALUES (SEDIT::ASSIGN-FORMAT SEDIT::NODE-TYPE + CL:FORMAT SEDIT::SUB-NODES SEDIT::COMPUTE-FORMAT-VALUES SEDIT::ENVIRONMENT) SEDIT::LINEARIZE-DOTLIST +(SEDIT::RPAREN-STRING SEDIT::ENVIRONMENT) \FONTFILENAME.NEW (WEIGHT SLOPE EXPANSION) SPY.BUTTON ( +XCOORD YCOORD) TWODINSPECTW.CREATE (LEFT BOTTOM WIDTH HEIGHT XCOORD YCOORD) SETA (READONLY BASE ORIG +LENGTH OFFST TYP) \DSPCOLOR.PSC (POSTSCRIPTCOLOR IMAGEDATA) GRAPHOBJ.IMAGEBOXFN (WIDTH HEIGHT +NODEHEIGHT NODEFONT NODEWIDTH) ARRAY (BASE) BRHC/LAYOUT/DAUGHTERS (NODEPOSITION YCOORD) +COPY.WINDOW.TO.BITMAP (LEFT BOTTOM WIDTH HEIGHT) \10MB.GETPACKETSTATUS (DLIOCBSTATUS DLFOROUTPUTUSE +DLIOCBLENGTH DLRETRANSMISSIONMASK D0IOCBSTATUS) \SELITEM.FROM.PROPERTY (ITEMINFO ITEMINFOTYPE) +\DELETETREE (TOTLEN COUNT UPWARD) MB.MARGINBAR.SELFN (MARL1 MARLN MARR MARTABS TABX MARUNIT XSIZE +YSIZE WIDTH MARTABTYPE) \MEDW.GETSCREENREGION (LEFT WIDTH BOTTOM HEIGHT XCOORD YCOORD) +\MEDW.CARET.SHOW (STREAM IMAGEDATA CURSOR CUIMAGE STREAMX STREAMY BITMAPWIDTH BITMAPHEIGHT +DDClippingRegion LEFT WIDTH BOTTOM HEIGHT DDXOFFSET DDYOFFSET) FB.FETCHFILENAME (FILENAME TIDATA) +SEDIT::SET-SELECTION-STRING (SEDIT::FONT) TEDIT.GET.OBJECT1 (TEXTOBJ PREVPIECE PLOOKS DEFAULTCHARLOOKS + POBJ) SEDIT::COMPUTE-ALL-FORMATS (SEDIT::ROOT) SEDIT::QUOTE-CURRENT-SELECTION (SEDIT::OPEN-NODE-CHANGED? + SEDIT::SELECTION SEDIT::CARET-POINT SEDIT::SELECT-NODE) \READSTRIKEFONTFILE (BITMAPBASE OFFSETS +WIDTHS) SI::PVAR-VALUE-IN-FRAME (OVERHEADWORDS FNHEADER NTSIZE BOUND FIRSTPVAR PVVALUE) BEGINPAGE.IP ( +IPDATA) SHOW.CLEARINGHOUSE (OCORGANIZATION OCDOMAINS DCDOMAIN) \READACFONTFILE (LEFTKERN IMAGEWIDTHS +WIDTHS FBBBOY FBBBDY OFFSETS BBDY BBOX BBDX BITMAPBASE BBOY) SI::VARIABLE-NAME-IN-FRAME (NAMETABLE +OVERHEADWORDS NTSIZE) TERM.CLEAR.TAB (TERM.TAB.STOPS) OPT.NOTJUMP (OPNAME OPARG) FW-ADJUST-PLACEMENT ( +OFDSTATUS OFDWIDTH WIDTH OFDHEIGHT HEIGHT LEFT OFDLEFT BOTTOM OFDBOTTOM) SEDIT::CREATE-NULL-LIST ( +SEDIT::DEFAULT-FONT SEDIT::ENVIRONMENT) \TEDIT.NEXT.LINE.BOTTOM (FMTBASETOBASE LFMTSPEC DESCENT 1STLN +LEADBEFORE LEADAFTER LHEIGHT) ASSURE.PUP.READY (NDBPUPHOST# NDBNEXT NDBPUPNET#) \NSRANDOM.WRITEPAGES ( +NSFILING.CONNECTION NSFILING.SERVER.LENGTH NSFILING.HANDLE EPAGE EOFFSET REVALIDATEFLG NSHATTRIBUTES) +RETURN (FRAMENAME NAMETABLE CLINK INVALIDP) LOOKUPHASHFILE (Stream) \DISCARDFRAME (ALINK CLINK BLINK +SIZE USECNT RESIDUAL DUMMYBF IVAR) MBUTTON.FIND.BUTTON (PCTB POBJ PLEN NEXTPIECE) SEDIT::COMPILE-STRUCTURE + (SEDIT::ICON-TITLE SEDIT::EDIT-TYPE CL:STRUCTURE SEDIT::SUB-NODES SEDIT::ROOT SEDIT::DISPLAY-WINDOW) +\NSRANDOM.TRUNCATEFILE (NSFILING.SERVER.LENGTH NSFILING.CONNECTION NSFILING.HANDLE REVALIDATEFLG +NSHDATUM NSHATTRIBUTES) CL:FIND-SYMBOL (BASE OFFST LENGTH FATSTRINGP) \DELETEPIECE (NEXTPIECE +PREVPIECE PTREENODE) FINDPCNODE (PTREENODE) TEDIT-BOOK (TEXTLEN) TB.COLLECT.ITEMS (TBITEMS) ASKUSER1 ( +KEYLST KEY) SEDIT::CFV-DOTLIST (SEDIT::WIDTH SEDIT::LPAREN-STRING SEDIT::DEFAULT-FONT SEDIT::SUB-NODES + SEDIT::NODE-TYPE SEDIT::DOT-STRING CL:STRUCTURE SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH) +\BASEBYTES.BLOCKIO (CBUFPTR COFFSET EOFFSET ENDOFSTREAMOP) SCROLL.HANDLER (VERTSCROLLREG +VERTSCROLLWINDOW HORIZSCROLLREG HORIZSCROLLWINDOW) ELT (BASE ORIG LENGTH OFFST TYP) \TERPRI.PSC ( +IMAGEDATA POSTSCRIPTY POSTSCRIPTLINESPACING POSTSCRIPTBOTTOMMARGIN \SFDescent POSTSCRIPTFONT +POSTSCRIPTLEFTMARGIN) \SFROTATECSINFOOFFSETS (OFFSETS WIDTHS CHARSETBITMAP) PROCESSPROP (PROCWINDOW +PROCPRIORITY PROCNAME RESTARTABLE PROCFORM PROCINFOHOOK PROCAFTEREXIT PROCBEFOREEXIT PROCTTYENTRYFN +PROCTTYEXITFN PROCUSERDATA PROCRESTARTFORM) \FONTRESETCHARWIDTHS (OFFSETS WIDTHS) ROTATE-BITMAP ( +BITMAPBASE BITMAPRASTERWIDTH PBTDESTBIT PBTSOURCE) \IRM.CHOOSE.REF (TYPE PRIMARYFLG) +SEDIT::SET-POINT-STRING (SEDIT::WIDTH SEDIT::FONT) \BASEBYTES.IO.INIT (COFFSET BIASOFFST EOFFSET) +FM.CHANGESTATE (FM.USERDATA LEFT BOTTOM) GRAPHOBJ.DISPLAYFN (XKERN LEFT YDESC BOTTOM) SEDIT::BUILD-NODE + (SEDIT::\X SEDIT::CURRENT-NODE) TEDITWINDOWP (\WINDOW) OPT.CHECKTAG (LEVEL) CLEARSTK (STACKP0 EDFXP) +\BASEBYTES.SETFILEPTR (BIASOFFST EOFFSET) BRHC/LAYOUT/TERMINAL (NODEHEIGHT) ROTATE-BITMAP-LEFT ( +BITMAPBASE BITMAPRASTERWIDTH PBTSOURCEBIT PBTDEST) TERM.ERASEBITS (DSP) \BASEBYTES.READP (COFFSET +EOFFSET CBUFPTR) SLICEREF (LINEARIZEDARRAY OFFSETS OFFSETCONSTANT) \SFMAKECOLOR (CHARSETBITMAP) +RELSTKP (EDFXP INVALIDP CLINK FRAMENAME) SPP.EOFP (ACCESSBITS COFFSET CBUFSIZE) \DSPTOPMARGIN.PSC ( +POSTSCRIPTTOPMARGIN IMAGEDATA) SEDIT::SET-SELECTION-LITATOM (SEDIT::FONT) \BASEBYTES.BOUT (COFFSET +EOFFSET WRITEXTENSIONFN CBUFPTR) STRIKECSINFO (WIDTHS IMAGEWIDTHS OFFSETS CHARSETBITMAP YWIDTHS +CHARSETASCENT CHARSETDESCENT) \BASEBYTES.BIN (COFFSET) UPDATEWFROMIMAGE (REG SAVE) WRITESTRIKEFONTFILE + (FONTCHARSETVECTOR WIDTHS OFFSETS IMAGEWIDTHS HIBYTE LOBYTE BITMAPRASTERWIDTH CHARSETBITMAP \SFHeight + CHARSETASCENT CHARSETDESCENT BITMAPBASE) FB.PROMPTWPRINT (PROMPTWINDOW) \BASEBYTES.OPENFN ( +FULLFILENAME CBUFPTR BIASOFFST WRITEXTENSIONFN) \BASEBYTES.PEEKBIN (COFFSET FULLNAME EOFFSET +ENDOFSTREAMOP CBUFPTR) \COURIER.OUTPUT.ABORTED (BULK.DATA.CONTINUATION INTERNALFLG FULLFILENAME +ACCESSBITS) \BASEBYTES.NAME.FROM.STREAM (FULLFILENAME CBUFPTR BIASOFFST) TTUNREADBUF (CPXREALCHAR) +\SETUPSTACK1 (STKMIN FIRSTPVAR PV PADDING) CH.FINDSERVER (NSORGANIZATION NSDOMAIN OCALLSERVERS +OCDOMAINS DCDOMAIN DCKNOWNSERVERS) TEDIT.HCPYFILE (TXTFILE FULLFILENAME) UTF8.OUTCHARFN (EOLCONVENTION + CHARPOSITION) DELETE.TO.END (NEXTLINE) GRAPHOBJ.PUTFN (XCOORD YCOORD) ERASE/GRAPHNODE (NODEHEIGHT +XCOORD YCOORD NODEWIDTH) ASKUSER$ (KEY) SEDIT::MUTATE (SEDIT::DISPLAY-WINDOW SEDIT::SELECTION +SEDIT::CARET-POINT SEDIT::SELECT-NODE SEDIT::SELECT-TYPE SEDIT::SELECT-START) PAGEFAULTS (PAGEFAULTS) +\RESETSTACK0 (StackBase TELERAIDFXP MiscFXP CCODEP SubovFXP) \MAKEBASEBYTESTREAM (DEVICE) +\SETTOTALTIME (STARTTIME) \MBS.OUTCHARFN (BBSNCHARS FW7) \BASEBYTES.TRUNCATEFN (BIASOFFST EOFFSET) +\SERIALNUMBER (SerialNumber) CARET (CURSOR) OPENSTRINGSTREAM (FATSTRINGP BASE OFFST LENGTH) +\FBITMAPBIT.UFN (BITS) SEDIT::MENU-SELECTEDFN (SEDIT::COMMAND-TABLE SEDIT::ENVIRONMENT) +\BUILDATWSTRUCTURE (WIDTH HEIGHT ATWHEREONEDGE) \PFInitFileDescriptors (subVolumeCount lvID subVolumes + subVolumeMarkerID) COMP.SETARG (OPARG OPNAME) FB.SELECTEDFILES (TABLEBROWSER) ERASEMENUIMAGE (LEFT +MENUGRID MENUOUTLINESIZE BOTTOM IMAGEWIDTH IMAGEHEIGHT) SEDIT::MARKASCHANGEDFN (SEDIT::ICON-TITLE +SEDIT::EDIT-TYPE) SPP.READP (ACCESSBITS COFFSET CBUFSIZE) COURIER.CALL (ARGS) PFI.MAKE.LPT.STREAM ( +LEFT) \NSRANDOM.SETEOFPTR (PAGE OFFSET ACCESSBITS EPAGE) STRING.EQUAL (PNAMELENGTH PNAMEBASE FATPNAMEP + LENGTH BASE OFFST FATSTRINGP TYP) BRHC/LAYOUT (TONODES NODEWIDTH NODEHEIGHT NODEPOSITION) +\TEDIT.RESHAPEFN (HEIGHT WIDTH SEL YBOT CHAR1 NEXTLINE LHEIGHT DESCENT) \CAUSEINTERRUPT (StackBase +NEXTBLOCK SIZE) \TEXTMENU.START (LEFT TOP WIDTH TEXTOBJ PROMPTWINDOW) CRITSECT (REST LX RX TY) +SEDIT::SET-POINT-LITATOM (SEDIT::WIDTH SEDIT::FONT) \SETPOS.PSC (POSTSCRIPTX POSTSCRIPTY) +TTCOMPLETEWORD (NSCHARHASH CPXREALCHAR) GETBOXSCREENREGION (SCREEN XCOORD YCOORD) SEDIT::BUILD-LINEAR-FORM + (SEDIT::ROOT SEDIT::START-X SEDIT::LINEAR-FORM SEDIT::FIRST-BLOCK SEDIT::SUB-NODES SEDIT::DISPLAY-WINDOW + SEDIT::CURRENT-LINE SEDIT::CURRENT-X SEDIT::ACTUAL-WIDTH) \DSPBOTTOMMARGIN.PSC ( +POSTSCRIPTBOTTOMMARGIN IMAGEDATA) COMP.LAM1 (OPNAME OPARG) SPP.BACKFILEPTR (COFFSET) TEDIT.RAW.INCLUDE + (SEL TXTRAWINCLUDESTREAM SET TXTREADONLY TEXTLEN PCTB PLEN \WINDOW) \DSPSPACEFACTOR.PSC (IMAGEDATA +POSTSCRIPTSPACEFACTOR POSTSCRIPTNATURALSPACEWIDTH) INTERRUPTED (ETHERINTERRUPT LOGMSGSPENDING +IOINTERRUPT STORAGEFULL STACKOVERFLOW VMEMFULL GCDISABLED WAITINGINTERRUPT INTCHARCODE INTERRUPTLIST) +\ADDOFD (NAMEDP) WINDOWSIZE (WIDTH HEIGHT) TOTOPW (TOTOPWFN SCREEN) \DOMISCAPPLY1 (MISCSTACKFN +MISCSTACKARG1 MISCSTACKARG2) COMP.ARG (OPNAME OPARG OP#) BITBLT (IMBLTSHADE IMAGEOPS BITMAPWIDTH +BITMAPHEIGHT IMAGEDATA LEFT DDClippingRegion BOTTOM DDDestination DDXOFFSET DDClippingLeft DDYOFFSET +DDClippingBottom DDClippingRight DDClippingTop DDTexture IMBITBLT) COMP.CALL (EXTCALL) +DBG::BACKTRACE-ITEM-SELECTED (BKMENUINFO MENUUSERDATA) AS.NEXT.VERIFIER (NSHNM0 NSHNM1 NSHNM2) +\DISPLAYLINE (CHARS THISLINE WIDTHS LOOKS \WINDOW TEXTLEN TXTTERMSA STREAMHINT LCBITMAP DISPLAYCACHE +DISPLAYCACHEDS DISPLAYHCPYDS FMTHARDCOPY LFMTSPEC PREVLINE YBOT LHEIGHT RIGHTMARGIN BITMAPWIDTH +BITMAPHEIGHT CHAR1 WBOTTOM DESC LEFTMARGIN DESCENT IMAGEDATA DDPILOTBBT DDXOFFSET DDClippingLeft +DDClippingRight CLFONT BASE DDWIDTHSCACHE DDOFFSETSCACHE CLOFFSET LEN CLLEADER CLUSERINFO WRIGHT +FMTREVISED LMARK YBASE) IRM.CREF.BUTTONEVENTFN (XSIZE YSIZE) \GATHER-CLEANUP-FORMS1 (EndOfStack +StackBase INVALIDP NAMETABLE FASTP DUMMYBF %#BLINK IVAR FRAMENAME CLINK) FB.TABLEBROWSER (TABLEBROWSER +) DO.EDIT.COMMAND (END START LASTSKIP LASTSKIPCHAR NSCHARHASH STOPATOM CPXREALCHAR) +\MEDW.GETSCREENPOSITION (SCREEN) UPDATEPCNODES (PTREENODE COUNT TOTLEN UPWARD) +\GATHER-SPECIAL-BINDINGS (NTSIZE OVERHEADWORDS BOUND FIRSTPVAR PVVALUE) \CREATE.TTYDISPLAYSTREAM (LEFT + BOTTOM WIDTH HEIGHT) OPT.JUMPCHECK (OPNAME) \GC.MODIFY.BIGREFCNT (OVFLPTR OVFLCNTLO OVFLCNTHI) +\MAKE.PROCESS0 (MISCSTACKRESULT PROCHARDRESETINFO PROCNAME PROCFINISHED PROCRESTARTFORM RESTARTABLE +PROCFINISHEVENT) \10MB.GETPACKETLENGTH (DLIOCBBYTESUSED count D0IOCBBYTESUSED) CHAT.TYPESCRIPT1 ( +WINDOW TYPESCRIPTSTREAM) WOVERLAPP (REG) \STRINGSTREAM.INIT (F1 FULLFILENAME F2) \GC.ENTER.BIGREFCNT ( +OVFLPTR OVFLCNTHI) \TEDIT.CUMULATE.EVENTS (THLEN THFIRSTPIECE PLEN NEXTPIECE) TEDIT.UNPARSE.PAGEFORMAT + (REGIONSPEC WIDTH HEIGHT REGIONSUBBOXES REGIONFILLMETHOD LEFT BOTTOM REGIONLOCALINFO RIGHT PTOP) +\BACKFORMAT (NEXTLINE CHAR1 TEXTLEN STREAMHINT CHARLIM) \BLTSHADE.BITMAP (BITMAPHEIGHT BITMAPWIDTH +BITMAPBITSPERPIXEL LEFT BOTTOM WIDTH HEIGHT) \BITBLT.BITMAP (BITMAPHEIGHT BITMAPBITSPERPIXEL +BITMAPWIDTH LEFT BOTTOM WIDTH HEIGHT) \SEARCHOPENFILES (FULLNAME) \LEAF.MAYBE.FLUSH.CACHE ( +LEAFOPENCLOSELOCK) SEDIT::BUILD-INTERNAL-STRUCTURE (SEDIT::ROOT) CHAT.TYPEOUT (INSTREAM TERM.STATE +HELD TYPESCRIPTSTREAM READ) \HARDRESET-CLEANUP (PROCHARDRESETINFO OVERHEADWORDS) +SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::SUB-NODE-INDEX SEDIT::SELECT-START SEDIT::SELECT-END +SEDIT::LINEAR-FORM) \LFCloseFile (ACCESS VOLUME FILEDESC EPAGE EOFFSET) SEDIT::SELECT-SEGMENT-LITATOM +(SEDIT::SELECT-STRING SEDIT::FONT SEDIT::NODE-TYPE) DSPDESTINATION (IMAGEDATA DDDestination) OPENFILE +(FULLNAME) \HARDRESET-CLEANUP1 (FNHEADER NEXTBLOCK FIRSTPVAR OVERHEADWORDS) FILECOMS (COMSNAME +FILEPROP) TB.NTH.ITEM (TBTAILHINT TI# TBITEMS) RDTBL\NONOTHERCODES (READSA) \FORMATLINE (WRIGHT +WBOTTOM TEXTLEN THISLINE \WINDOW BASE CHARS WIDTHS LOOKS STREAMHINT TXTTERMSA CURRENTLOOKS CLINVISIBLE + PIECE PLEN NEXTPIECE PLOOKS CLPROTECTED PPARALOOKS FMTSPEC FMTHARDCOPY DISPLAYHCPYDS DISPLAYCACHEDS +TABSPEC CLFONT \SFAscent CLOFFSET \SFDescent PREVPIECE PPARALAST PCSTARTCH COFFSET PCSTARTPG CPAGE +FMTPARATYPE FMTNEWPAGEBEFORE FMTNEWPAGEAFTER FMTSPECIALX FMTSPECIALY WLEFT 1STLEFTMAR LEFTMAR RIGHTMAR + FONTCHARSETVECTOR YSIZE YDESC XSIZE PTNEWTX TXTNONSCHARS PTTYPE PTTABX PCTB CARETLOOKS +DEFAULTCHARLOOKS CHARLIM CHAR1) ASKUSERSETUP (KEY PROMPTSTRING OPTIONS) PFI.SETUP.TRANSLATIONS ( +OUTCHARFN) \GC.LOOKUP.BIGREFCNT (OVFLPTR OVFLCNTHI OVFLCNTLO) \TEDIT.GET.CHARLOOKS1 (CLBOLD CLITAL) +SPP.FORCEOUTPUT (SPPOUTPKT SPPINPUTSTREAM SPPOUTPUTSTREAM XIPLENGTH COFFSET SPPFILEPTRLO SPPFILEPTRHI +FW6 SPPEOMONFORCEOUT SPPOUTPUTABORTEDP SPPOUTPUTABORTEDFN) \GCMAPSCAN (LINKP LINKPTR STKCNT HIBITS +NXTPTR FREEPTR CONTENTS EMPTY) OPT.JFIXPASS (JPT JMIN JD OPARG) SEDIT::SCAN-STRING (MULTESCAPECHAR +SEDIT::FIRST-LINE SEDIT::START-X SEDIT::SELECT-START SEDIT::SELECT-END) \GCMAPUNSCAN (LINKP LINKPTR +STKBIT CNT NXTPTR FREEPTR CONTENTS) FIND.NON.SPACE (CPXREALCHAR) GETSCREENREGION (SCGETSCREENREGION) +\DORETCALL (MiscFXP CLINK PC FNHEADER NEXTBLOCK SIZE) \FREELISTCELL (PAGEBASE NEXTCELL WORD# CNT +NEXTPAGE DTDNEXTPAGE) FW-FORGET-STREAM (FILESTREAM OFDWINDOW) TEDIT.FORMATBOX (REGIONSPEC +REGIONFILLMETHOD REGIONSUBBOXES CHNO TEXTLEN PAGE# MAXPAGE# STATE LEFT BOTTOM MINPAGE# TEXTOBJ +LTEXTOBJ CACHE CHARLIM PAGELINECACHE) HASH.PASSWORD (OFFST BASE LENGTH FATSTRINGP) \DFSCurrentVolume ( +LVlabel) SEDIT::ATOM-CHANGE-RELINEARIZE (SEDIT::OPEN-NODE-CHANGED? SEDIT::CARET-POINT SEDIT::SELECTION + SEDIT::ROOT SEDIT::NODE-TYPE CL:STRUCTURE) \GETBRUSHBBT (BITMAPHEIGHT BITMAPWIDTH BITMAPRASTERWIDTH +DDDestination DDSOURCETYPE DDOPERATION) MACHINETYPE (MachineType) \REFCNT (NOREFCNT PAGE# EMPTY LINKP +HIBITS CNT LINKPTR NXTPTR) \ALLOCMINIMUMSIZES (ATEDGE ATMINY ATNOWY ATNOWX ATMINX ATXSIZE ATYSIZE) +\EQREFCNT1 (NOREFCNT PAGE# LINKP EMPTY HIBITS LINKPTR NXTPTR) RESET (FRAMENAME INVALIDP CLINK) +\NSRANDOM.DESTROY.STREAM (CBUFDIRTY CPAGE) NIL +REPLACE \GCMAPUNSCAN (NXTPTR LINKPTR CONTENTS FREEPTR STKBIT EMPTY) SETY.IP (IPCHARVISIBLEP IPYPOS) +COMP.APPLY* (EXTCALL) \GETFTPCONNECTION (FTPBUSY ACCESS) GETNSPRINTER (NSPRINTERNAME NSPRINTERADDRESS) + \COURIER.CHECK.ERRORS (ERR# ARGS) \TEDIT.COMMAND.LOOP (EDITOPACTIVE SET L1 LN OFFST LENGTH) +\TEDIT.GET.SINGLE.PARALOOKS2 (1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD TABX TABKIND FMTSPECIALX FMTSPECIALY FMTUSERINFO FMTPARATYPE FMTPARASUBTYPE FMTSTYLE FMTCHARSTYLES -FMTNEWPAGEBEFORE FMTNEWPAGEAFTER) \\SWITCHFONTS.PSC (POSTSCRIPTACCENTED POSTSCRIPTFONTCHANGEDFLG) -FB.UNDELETE.FILE (DELETEDFILES DELETEDPAGES) TEDIT.SET.SEL.LOOKS (HOW HOWHEIGHT HASCARET) -\\COURIER.BROADCAST.ON.NET (XIPDESTNET) \\BSPBACKFILEPTR (COFFSET) \\GC.ENTER.BIGREFCNT (OVFLCNTHI -OVFLCNTLO OVFLPTR CNT) BRH/OFFSET (YCOORD) \\HCPYMODEBLTCHAR (DDXPOSITION PBTDESTBIT PBTWIDTH -PBTSOURCEBIT) DOBACKGROUNDCOM (ITEMS CHANGEOFFSETFLG MENUOFFSET XCOORD YCOORD WHENHELDFN WHENUNHELDFN -CENTERFLG LEFT BOTTOM) ALLOCSTRING (LENGTH BASE TYP READ-ONLY-P INDIRECT-P TYPE-NUMBER FILL-POINTER -TOTAL-SIZE DIMS DISPLACED-P OFFSET ADJUSTABLE-P FILL-POINTER-P EXTENDABLE-P XBASE STRING-P) -PUP.ECHOUSER (PUPLENGTH) SEDIT::OPEN-LITATOM (SEDIT::OPEN-NODE SEDIT::PRIN-2? SEDIT::REAL-LENGTH -LENGTH FILL-POINTER TOTAL-SIZE DIMS STRING) TTYINBUFFERSTREAM (DEVICE ACCESS TTYINPUT F1 TTYEOF F2 -TTYEOFACTION F3 TTYORIGINPUT F4) \\INITSPP (EVENTFN) INSPECT/HUNK (ITEMS CENTERFLG LEFT BOTTOM) -PAINTW.READMODE (ITEMS LEFT BOTTOM) ADJUSTLINE (END LASTCOL START) COMP.LOOKUPVAR (COMP.VARTYPE -VARNAME) \\LEAF.TIMEDOUT.EXCESSIVE (LEAFABORTBUTTONWINDOW ITEMS WHENSELECTEDFN LEFT BOTTOM XCOORD -YCOORD) \\NSGATELISTENER (XIPFIRSTDATAWORD NET# \#HOPS) \\DORETCALL (|MiscFXP|) ICMLARRAY (XCOORD -YCOORD) \\VECPUT (VECMOVINGRIGHT VECCURX VECCURY VECWASDISPLAYING VECSEGCHARS) \\PUTONSCREENW (XCOORD -YCOORD) \\SENDLEAF (EPUSERFIELD LEAFFLAGS EPFLAGS PUPLENGTH LEAFSTATUS) SUBSTRING (READONLY BASE TYP -LENGTH OFFST READ-ONLY-P INDIRECT-P TYPE-NUMBER FILL-POINTER TOTAL-SIZE DIMS DISPLACED-P OFFSET -ADJUSTABLE-P FILL-POINTER-P EXTENDABLE-P XREADONLY XBASE STRING-P) \\HDCPYDISPLAY.FIX.XPOS (DDMICAXPOS -) \\DISABLEGC1 (NOREFCNT GCDISABLED) \\SLOWHCPYMODEBLTCHAR (DDXPOSITION PBTDESTBIT PBTWIDTH -PBTSOURCEBIT) \\TELERAIDGET (TRANSOPERATION) \\FM.TOGGLE-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN -FM.SYSSELECTEDFN) \\DOSTACKFULLINTERRUPT (STACKOVERFLOW) \\PRESSINIT (IMAGETYPE IMCLOSEFN IMXPOSITION -IMYPOSITION IMFONT IMLEFTMARGIN IMRIGHTMARGIN IMLINEFEED IMDRAWLINE IMDRAWCURVE IMDRAWCIRCLE -IMDRAWELLIPSE IMFILLCIRCLE IMBLTSHADE IMBITBLT IMSCALE IMTERPRI IMBOTTOMMARGIN IMTOPMARGIN -IMFONTCREATE IMNEWPAGE IMSPACEFACTOR IMSTRINGWIDTH IMCHARWIDTH IMBITMAPSIZE IMCLIPPINGREGION -IMSCALEDBITBLT IMDRAWARC) \\LOCATE.NSNET (RTNET# RTHOPCOUNT RTTIMER) \\MAKE.PROCESS0 (MISCSTACKFN -MISCSTACKARG1 MISCSTACKARG2 PROCRESULT PROCFINISHED) \\DSPRIGHTMARGIN.HDCPYDISPLAY (DDMICARIGHTMARGIN) - SEDIT::INSERT-MULTI-ESCAPE (SEDIT::POINT-INDEX SEDIT::POINT-TYPE) \\COURIER.REP.BOUT (HIBYTE LOBYTE -CRLASTWORD CRWORDLIST F1 F3 CRNEXTBYTE F2) \\GCMAPSCAN (NXTPTR LINKPTR CONTENTS FREEPTR EMPTY) -SETUPFONTS.PRESS (PRHEADINGFONT) SET-PACKAGE-INTERACTIVELY (TITLE ITEMS CENTERFLG LEFT BOTTOM) -\\GCMAPUNSCAN (NXTPTR LINKPTR CONTENTS FREEPTR STKBIT EMPTY) CHAT.CLOSE (RUNNING?) -PAINTW.READBRUSHSIZE (ITEMS LEFT BOTTOM) UPDATE/MENU/IMAGE (MENUFONT MENUBORDERSIZE MENUOUTLINESIZE -ITEMWIDTH WIDTH ITEMHEIGHT HEIGHT ITEMS MENUCOLUMNS MENUROWS LEFT BOTTOM MENUOFFSET XCOORD YCOORD SAVE - IMAGE WBORDER) OPT.FRAMEVAR (VARS NNILS NVALS) FILL.INCY (PBTDEST PBTDESTHI PBTDESTLO ADDR) -\\DSPRIGHTMARGIN.IP (IPRIGHT IPMINCHARRIGHT) PAINTW.READBRUSHSHAPE (ITEMS LEFT BOTTOM) -\\INSERT.FIRST.PIECE (\\INSERTPC PSTR \\INSERTSTRING) \\IMAGEUSERPROP (IMAGEOBJPLIST) SETY.IP ( -IPCHARVISIBLEP IPYPOS) NEAREST/PT/ON/GRID (XCOORD YCOORD) MAKEIBMFORMAT (INCCODEFN PEEKCCODEFN -BACKCHARFN FILEOUTCHARFN) \\BULK.DATA.CLOSE (SPPATTENTIONFN BULK.DATA.CONTINUATION F2 SPPINPKT CBUFPTR - CBUFSIZE ENDOFSTREAMOP SPPSUBSTREAM F10) \\TEDIT.FORMAT.FOOTNOTE (PAGELINECACHE CACHE LTEXTOBJ -LEFTMARGIN RIGHTMARGIN) FB.ADD.FILE (TOTALPAGES TOTALFILES) \\TEDIT.COMMAND.LOOP (EDITOPACTIVE SET L1 -LN OFFST DISPLACED-P OFFSET LENGTH FILL-POINTER TOTAL-SIZE DIMS) \\HARDRESET-CLEANUP1 (\#FRAMENAME -NTSIZE NAMETABLE FAST NAMETABLE# VALIDNAMETABLE PVVALUE BOUND PVHI) TEDIT.COMPOUND.PAGEFORMAT ( -REGIONFILLMETHOD REGIONSUBBOXES REGIONSPEC) \\TEDIT.CONVERT.TO.FORMATTED (PPARALAST FORMATTEDP) -REFLECT/GRAPH/DIAGONALLY (SIDESFLG XCOORD YCOORD) \\DSPTRANSLATE.PSC (POSTSCRIPTTRANSX -POSTSCRIPTTRANSY POSTSCRIPTPENDINGXFORM) SETUPSTACK (|CurrentFXP| |ResetFXP| FAULTFXP |SubovFXP| -|KbdFXP| |StackBase| |EndOfStack|) BSPPUTMARK (COFFSET PUPTYPE) SEDIT::SET-DEPTH (SEDIT::DEPTH) -\\LEAF.RESENDPUPS (PUPSOURCESOCKET) MKSTRING (XBASE LENGTH OFFST XREADONLY TYP BASE READ-ONLY-P -STRING-P DISPLACED-P TYPE-NUMBER OFFSET FILL-POINTER TOTAL-SIZE) \\FREELISTCELL (CDRCODE NEXTCELL CNT -NEXTPAGE DTDNEXTPAGE) SEDIT::OUTPUT-CR (SEDIT::ACTUAL-WIDTH SEDIT::PREV-LINE SEDIT::LINE-SKIP -SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::INDENT SEDIT::YCOORD SEDIT::LINEAR-POINTER SEDIT::LINEAR-FORM - SEDIT::NODE SEDIT::LINE-LENGTH SEDIT::SHIFT-Y SEDIT::CURRENT-BLOCK SEDIT::BLOCK-NEW-X SEDIT::BLOCK-START - SEDIT::CURRENT-LINE SEDIT::NEXT-LINE SEDIT::CURRENT-X SEDIT::LINEAR-PREV) COMP.COND (OPNAME TAG) -MARGINBAR.CREATE (XSIZE YSIZE YDESC XKERN MARL1 MARLN MARR MARTABS MARUNIT MARTABTYPE LEFT BOTTOM -WIDTH HEIGHT) \\FM.MOMENTARY-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN) -\\LEAF.CLOSEFILE (LEAFREALLYOPEN F5 LEAFCACHEDFILE OPWORD HANDLE LEAFLENGTH LEAFPAGECACHE F3 -LEAFCONNECTION F1) \\PUTFIXP (HINUM LONUM) SPY.DELETE (CALLEES) \\STARTPAGE.PRESS (PRSPACEFACTOR -PRPAGENUM) OPENBSPSTREAM (RCVBYTEID RCVINTERRUPTID XMITBYTEID XMITINTERRUPTID LASTACKID ADATATIMEOUT -MAXPUPALLOC BSPINPUTSTREAM DEVICE ACCESS STRMBOUTFN ACCESSBITS BSPOUTPUTSTREAM F2 BSPSOC F1 -\#UNREADPUPS \#UNACKEDPUPS \#UNACKEDBYTES PUPALLOC BYTESPERPUP BYTEALLOC PUPALLOCCOUNT ADATACOUNT -BSPFAILURESTRING BSPTIMEOUT BSPINACTIVITYTIMEOUT BSPINPUTHANDLER BSPOTHERPUPFN BSPERRORHANDLER -BSPIOTIMEOUT IOTIMEOUTFN BSPWHENCLOSEDFN BSPINPUTEVENT) MOVD (DEFPOINTER DEFCELLFLAGS AUXDEFCELLFLAGS) - TEDIT.GET.OBJECT (POBJ PFILE PSTR PLOOKS) TEDIT.HARDCOPY-COLUMN-END (YBOT YBASE) MB.SIZEFN (XSIZE -YSIZE YDESC XKERN) TEDIT.DEFAULT.MENUFN (EDITOPACTIVE CH# CHLIM DCH POINT CARETLOOKS \\INSERTPCVALID) -FILEPKGTYPE (DESCRIPTION) \\PUTSWAPPEDFIXP (LONUM HINUM) TEDIT.ADD.MENUITEM (ITEMS MENUROWS -MENUCOLUMNS ITEMWIDTH WIDTH ITEMHEIGHT HEIGHT IMAGE) \\FIXILINES (CHAR1 DIRTY TXTNEEDSUPDATE CHARLIM -CHARTOP) SWITCH/NODE/HEIGHT/WIDTH (NODEWIDTH) TB.DELETE.ITEM (TIDELETED TB#DELETED) MSSETSETTYPE ( -DEFAULTTYPE) TEDIT.EXTEND.SEL (CHLIM XLIM YLIM LN CH# X0 Y0 L1 DCH POINT DX SELOBJ) -\\DSPSPACEFACTOR.IP (IPSPACEWIDTH IPSPACEFACTOR) \\XIPERROR (ERRORXIPCODE ERRORXIPARG XIPLENGTH -XIPTYPE EPREQUEUE) SETYREL.IP (IPYPOS IPCHARVISIBLEP) EDITBMBUTTONFN (ITEMS CENTERFLG LEFT BOTTOM -MENUROWS WIDTH HEIGHT TITLE) \\ADVANCE.STORAGE.STATE (|FullSpaceUsed|) \\BSP.HANDLE.DATA (SYSQUEUEHEAD - QLINK RCVBYTEID \#UNREADPUPS) LOADPOLY (A B C D) \\BUFFERED.BIN (COFFSET) \\ALLOCVIRTUALPAGEBLOCK ( -|FullSpaceUsed| PAGE#) RIGHTW.ADJUSTSELECTION (ELTBOTTOM ELTWIDTH ELTLEFT PROP) \\PAGED.INCFILEPTR ( -COFFSET CBUFDIRTY CBUFSIZE CBUFPTR CPAGE) \\EDIT.UPCARET (TCFORCEUP) SEDIT::OUTPUT-CONSTANT-STRING ( -SEDIT::LINEAR-PREV SEDIT::LINEAR-FORM SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::CURRENT-X) -REFLECT/GRAPH/HORIZONTALLY (XCOORD) \\TEDIT.REFRESH.SHOWSEL (ONFLG SET) \\DSPLINEFEED.IP (IPLINEFEED) -\\DOSTORAGEFULLINTERRUPT (STORAGEFULL) SETF-SYMBOL-PACKAGE (PACKAGE PACKAGEINDEX) \\GENERIC.CHARSET ( -CHARSET) SETXYREL.IP (IPXPOS IPYPOS IPCHARVISIBLEP IPCORRECTSTARTX) GETGRIDBOXREGION (LEFT BOTTOM -WIDTH HEIGHT) SHOWBITMAP.IP (LEFT BOTTOM WIDTH HEIGHT) \\NSRANDOM.WROTE.HANDLE (NSHWASWRITTEN -NSHATTRIBUTES NSHWASMODIFIED) \\DSPPUSHSTATE.PSC (POSTSCRIPTXFORMSTACK PSXCLIP PSXPAGE PSXLEFT -PSXRIGHT PSXTOP PSXBOTTOM PSXTRANX PSXTRANY PSXLAND PSXXFORMPEND) MAKEWITHINREGION (LEFT BOTTOM) -ASKUSER (KEY OPTIONS) OPT.FRAMEDEL (OPNAME OPARG FRAME LEVEL EXTCALL PARENT) ACCEPT-UNIX-SOCKET-STREAM - (ACCESS DEVICE EOLCONVENTION OPENFILELST) NSNETDAYTIME0 (TIMEOP TIMEVERSION XIPLENGTH) -\\HANDLE.RAW.XIP (EPREQUEUE XIPDESTNET NDBNSNET# NSNET RTNET# RTHOPCOUNT RTGATEWAY# RTNDB RTRECENT -INQUEUELENGTH) \\BUFFERED.BINS (COFFSET) PFI.MAKE.LPT.STREAM (LEFT) SPY.SUM (SUM) \\IFS.LOOKUPFILE ( -PFSLOOKUPFILESOCKET PFSLOOKUPFILELOCK PFSLOOKUPFAILCNT) MSDOES (REP OTHERSET MSVERB TENSE) -\\BUFFERED.BOUT (COFFSET CBUFDIRTY) POSTSCRIPT.STARTPAGE (POSTSCRIPTPENDINGXFORM -POSTSCRIPTFONTCHANGEDFLG POSTSCRIPTPAGEBLANK) DELDEF (FILEPROP FILECHANGES FILEDATES ALLFIELDS) -\\BUFFERED.BOUTS (COFFSET CBUFDIRTY) SEDIT::INITIALIZE-ATOMIC (SEDIT::NAME SEDIT::ASSIGN-FORMAT +FMTNEWPAGEBEFORE FMTNEWPAGEAFTER) \COURIER.ATTENTIONFN (SPPOUTPUTABORTEDFN SPPOUTPUTABORTEDP) +TEDIT.SELECT (X0 XLIM DX SET \TEXTOBJ CH# CHLIM DCH POINT) TEDIT.DISPLAYTEXT (REALFILE) +\ALLOCVIRTUALPAGEBLOCK (FullSpaceUsed PAGE#) \DSPSPACEFACTOR.IP (IPSPACEWIDTH IPSPACEFACTOR) +OPT.RETPOP (LEVEL) SETUPFONTS.PRESS (PRHEADINGFONT) \NSRANDOM.RELEASE.LOCK (NSHACCESS) +TEDIT.SUBPARALOOKS (\DIRTY PPARALOOKS) \TEDIT.CONVERT.TO.FORMATTED (PPARALAST FORMATTEDP) DISCARDXIPS +(INQUEUELENGTH) \INSPECTW.REDISPLAYPROP (ITEMINFO SELECTABLEITEMREGION) MSCOMMAND (ID MSPRED REP +MSVERB OTHERSET SUBJECT OTHERSTUFF) \GENERIC.CHARSET (CHARSET) CHAT.CLOSE (RUNNING?) +\INSERT.FIRST.PIECE (\INSERTPC PSTR \INSERTSTRING) TB.UNSELECT.ALL.ITEMS (TISELECTED +TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM) SPYOBJ (LABEL PERCENT CACHEDLABEL) MAKEBRES (X Y IX IY MAJOR +IPX IPY P) \DSPRESET.PSC (CHARPOSITION) SEDIT::SHIFT-LINEAR-FORM (SEDIT::START-X) OPT.JLENPASS (JMIN +JU JML) \COURIER.CHECK.PROCEDURES (FN# ARGS RETURNSNOISE RESULTS REPORTSNOISE ERRORS) +\ADVANCE.STORAGE.STATE (FullSpaceUsed) SUBSTRING (READONLY BASE TYP LENGTH OFFST) SEDIT::SET-POINT-LIST + (SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::POINT-TYPE) \UPDATE.PBT.RASTERWIDTHS (PAGE# PBTDESTBPL) +\DOSTORAGEFULLINTERRUPT (STORAGEFULL) \DSPTOPMARGIN.IP (IPTOP) \VAMAdjustGroup (nextFilePage filePage +volumePage) SETYREL.IP (IPYPOS IPCHARVISIBLEP) TYPEINMENU (ITEMS WHENSELECTEDFN) ALLOCSTRING (LENGTH +BASE TYP) \PRESSINIT (IMAGETYPE IMCLOSEFN IMXPOSITION IMYPOSITION IMFONT IMLEFTMARGIN IMRIGHTMARGIN +IMLINEFEED IMDRAWLINE IMDRAWCURVE IMDRAWCIRCLE IMDRAWELLIPSE IMFILLCIRCLE IMBLTSHADE IMBITBLT IMSCALE +IMTERPRI IMBOTTOMMARGIN IMTOPMARGIN IMFONTCREATE IMNEWPAGE IMSPACEFACTOR IMSTRINGWIDTH IMCHARWIDTH +IMBITMAPSIZE IMCLIPPINGREGION IMSCALEDBITBLT IMDRAWARC) NORMSECT (X P LX RX) SEDIT::GENERATE-LINEAR-FORM + (SEDIT::RIGHT-MARGIN SEDIT::START-X SEDIT::ACTUAL-WIDTH SEDIT::FIRST-LINE SEDIT::CURRENT-NODE +SEDIT::LAST-LINEARIZED-SUB-NODE-INDEX SEDIT::LINEAR-POINTER SEDIT::LINEAR-PREV SEDIT::ACTUAL-LLENGTH +SEDIT::LAST-LINE SEDIT::CHANGED?) \SPP.CLEANUP (SPPTERMINATEDP DEVICEINFO SPPOUTPUTSTREAM +SPPINPUTSTREAM SPPSUBSTREAM SPPMYNSOCKET SPPPROCESS) \LEAF.ABORT.FROMMENU (LEAFABORTSTATUS) ADJUSTLINE + (END LASTCOL START) \DSPCLIPPINGREGION.PSC (POSTSCRIPTCLIPPINGREGION POSTSCRIPTPENDINGXFORM) +PFI.COLLECT.DEFINERS (NAME PATTERNS TESTFN) SEDIT::INITIALIZE-LISTS (SEDIT::NAME SEDIT::ASSIGN-FORMAT SEDIT::COMPUTE-FORMAT-VALUES SEDIT::LINEARIZE SEDIT::SUB-NODE-CHANGED SEDIT::COMPUTE-POINT-POSITION SEDIT::COMPUTE-SELECTION-POSITION SEDIT::SET-POINT SEDIT::SET-SELECTION SEDIT::GROW-SELECTION SEDIT::SELECT-SEGMENT SEDIT::INSERT CL:DELETE SEDIT::COPY-STRUCTURE SEDIT::COPY-SELECTION SEDIT::STRINGIFY - SEDIT::BACK-SPACE SEDIT::CLOSE-NODE) \\BSP.HANDLE.ACK (ADATATIMEOUT LASTACKID SYSQUEUEHEAD -SYSQUEUETAIL EPREQUEUE ACKREQUESTED QLINK \#UNACKEDPUPS \#UNACKEDBYTES PUPALLOCCOUNT MAXPUPALLOC -BYTESPERPUP PUPALLOC BYTEALLOC) TEDIT (TXTEDITING) FB.SEEFULLFN (ITEMS MENUROWS WHENSELECTEDFN -CENTERFLG LEFT BOTTOM) |\\SFFixY| (DDCHARSETASCENT PBTDEST PBTDESTHI PBTDESTLO PBTSOURCE -DDCHARHEIGHTDELTA PBTSOURCEHI PBTSOURCELO PBTHEIGHT DDCHARSETDESCENT) D-ASSEM:INTERN-DCODE (NA PV -STARTPC ARGTYPE \#FRAMENAME NTSIZE NLOCALS FVAROFFSET CLOSUREP FIXED STKMIN) READ-AFM-FILE (ITEMS -MENUFONT LEFT BOTTOM FID IL-FONTID DESCENT ASCENT WIDTHS FIRSTCHAR LASTCHAR) \\CHANGECHARSET.DISPLAY ( -DDWIDTHSCACHE DDOFFSETSCACHE DDCHARIMAGEWIDTHS DDCHARSET PBTSOURCEBPL PBTSOURCE PBTSOURCEHI -PBTSOURCELO) |\\VFMMarkBufferDirty| (DIRTY) \\SLOWBLTCHAR (DDXPOSITION PBTDESTBIT PBTWIDTH -PBTSOURCEBIT) \\NULLDEVICE (DEVICENAME RANDOMACCESSP NODIRECTORIES CLOSEFILE DELETEFILE OPENFILE -REOPENFILE BIN BOUT PEEKBIN READP BACKFILEPTR EOFP RENAMEFILE GETFILENAME EVENTFN BLOCKIN BLOCKOUT -GENERATEFILES GETFILEPTR GETEOFPTR SETFILEPTR GETFILEINFO SETFILEINFO SETEOFPTR) CREATEREGION (LEFT -BOTTOM WIDTH HEIGHT) SEDIT::DOT-THIS-LIST (SEDIT::NODE-TYPE) POSTSCRIPT.SET-FAKE-LANDSCAPE (WIDTH -HEIGHT LEFT BOTTOM POSTSCRIPTCLIPPINGREGION POSTSCRIPTPAGEREGION POSTSCRIPTLEFTMARGIN -POSTSCRIPTBOTTOMMARGIN POSTSCRIPTRIGHTMARGIN POSTSCRIPTTOPMARGIN POSTSCRIPTLANDSCAPE -POSTSCRIPTPENDINGXFORM) TB.EXPANDFN (TBUPDATEFROMHERE) COURIER.READ.NSNAME (NSORGANIZATION NSDOMAIN -NSOBJECT) BSPGETMARK (MARKPENDING F4) \\FLUSHNDBS (NDBNEXT NDBWATCHER NDBTRANSLATIONS NDBIQ) -\\NAMEDTABSIZE (XSIZE YSIZE YDESC XKERN) IRM.CREF.BOX (XSIZE YSIZE YDESC XKERN) MSKNOWN (KNOWN) -\\10MB.TURNONETHER (NDBCSB DLFIRSTOCB DLFIRSTICB DLOUTPUTMASK DLINPUTMASK DLMISSEDPACKETS DLLASTICB -DLLASTOCB) \\BSPINIT (DEVICENAME RESETABLE RANDOMACCESSP PAGEMAPPED FDBINABLE FDBOUTABLE BUFFERED -CLOSEFILE DELETEFILE GETFILEINFO OPENFILE READPAGES SETFILEINFO GENERATEFILES TRUNCATEFILE WRITEPAGES -GETFILENAME REOPENFILE EVENTFN DIRECTORYNAMEP HOSTNAMEP BIN BOUT READP EOFP PEEKBIN GETFILEPTR -SETFILEPTR BACKFILEPTR BLOCKIN BLOCKOUT GETNEXTBUFFER FORCEOUTPUT LASTC GETEOFPTR) PSCFONT.READFONT ( -FID IL-FONTID FIRSTCHAR LASTCHAR ASCENT DESCENT WIDTHS) INITDATATYPENAMES (DTDNAME DTDPTRS -DTDFINALIZABLE) SEDIT::LINEARIZE (SEDIT::LINEAR-POINTER SEDIT::LINEAR-FORM SEDIT::LINEAR-THREAD -SEDIT::LINEAR-PREV SEDIT::LAST-LINEARIZED-SUB-NODE-INDEX SEDIT::ACTUAL-WIDTH SEDIT::RIGHT-MARGIN -SEDIT::START-X SEDIT::CURRENT-NODE) \\SPP.SYSPKT (SPPSYSPKT CC SEQNO) SPY.MERGETREE (SUM COUNT -TREEFROM STATUS) NEWDEFC (FNHEADER) \\BSP.HANDLE.INTERRUPT (RCVINTERRUPTID INTERRUPTIN) -|\\LFRenameFile| (DIRINFO F4 FULLFILENAME |fileName| |TimeWrite|) PARAMETRICSPLINE (\#KNOTS SPLINEX -SPLINEY SPLINEDX SPLINEDY SPLINEDDX SPLINEDDY SPLINEDDDX SPLINEDDDY) \\NULL.OPENFILE (USERCLOSEABLE -ACCESS FULLFILENAME DEVICE) \\TEDIT.LOOKS.UPDATE (CURRENTPARALOOKS TICURPARALOOKS CURRENTLOOKS F10 -LHASPROT) \\MAKE.COURIER.REP.STREAM (DEVICE BLOCKIN BLOCKOUT ACCESSBITS STRMBINFN STRMBOUTFN -ENDOFSTREAMOP CRWORDLIST F1) UPDATEFILES (CHANGED) \\SHOWSEL (ONFLG) TEDIT.STREAMCHANGEDP (\\DIRTY -\\XDIRTY) SET/LAYOUT/POSITION (XCOORD YCOORD) |\\PFTransferFilePage| (|fileID| |attributesInAllPages| -|filePage| |filePageHi| |filePageLo|) \\FIXLINELENGTH.IP (LINELENGTH) BOXCOUNT (DTDCNT DTDOLDCNT -DTDCNT0) |\\VFMDelete1| (|used|) SETX.IP (IPCHARVISIBLEP IPXPOS IPCORRECTSTARTX) \\FILEOUTCHARFN ( -CHARSET CHARPOSITION) GRAPHEDITCOMMANDFN (ITEMS CENTERFLG CHANGEOFFSETFLG LEFT BOTTOM) -\\TELERAIDSERVER (HIBYTE LOBYTE PUPLENGTH PUPTYPE) SET/LABEL/SIZE (NODEWIDTH NODEHEIGHT) -TEDIT.UNDO.DELETION (\\INSERTPCVALID THFIRSTPIECE TEXTLEN CH# CHLIM DCH POINT THACTION) -\\DSPLEFTMARGIN.IP (IPLEFT) BRH/LAYOUT (FROMNODES NODEPOSITION XCOORD YCOORD) -MB.DEFAULTBUTTON.ACTIONFN (EDITOPACTIVE CH# CHLIM DCH POINT CARETLOOKS EDITFINISHEDFLG SET ONFLG) -OPT.FRAMELOCAL (OPNAME) |\\VFMDelete2| (|key| |volumePage| |used|) \\GETREGION.CHECKOPPT (XCOORD -YCOORD) \\LEAF.READFILEPROP (OPWORD HANDLE FILEADDRESS SIGNEXTEND DATALENGTH LEAFLENGTH) -|\\LFTruncateFile| (EPAGE EOFFSET) \\ALLOCMAPBUFFER (VMEMPAGE SYSNEXT) IMAGEOBJCREATE (OBJECTDATUM -IMAGEOBJPLIST IMAGEOBJFNS) SEDIT::REVIVE-NODE (SEDIT::DEPTH) COURIER.OPEN (ENDOFSTREAMOP) -TEDITCHAT.MENUFN (HELD ITEMS LEFT BOTTOM RUNNING?) TB.FLUSH.WINDOW (TBITEMS TBWINDOW TBTAILHINT) -COERCETEXTOBJ (ACCESSBITS) \\EDIT.DOWNCARET (TCCARETX TCCARETY TCFORCEUP) REFLECT/GRAPH/VERTICALLY ( -YCOORD) \\INIT.ETHER.BUFFER.POOL (D0NEXTIOCB) DINFO.UPDATE.GRAPH.DISPLAY (LAST.GRAPH.LOCATION) -TB.RENUMBER.TAIL (TI# TBTAILHINT) SETXY.IP (IPCHARVISIBLEP IPXPOS IPCORRECTSTARTX IPYPOS) -|\\VFMSaveBuffer| (DIRTY) PFI.SETUP.TRANSLATIONS (OUTCHARFN) \\DSPFONT.HDCPYDISPLAY (DDCHARIMAGEWIDTHS - DDLINEFEED) \\PNC (OFFST DISPLACED-P OFFSET LENGTH FILL-POINTER TOTAL-SIZE DIMS) SPY.NEXT.TREE ( -CALLEES NAME COUNT) PUTDEFN (DEFPOINTER ARGTYPE FASTP CCODEP PSEUDOCODEP) TERM.MOVETO (XPOS YPOS) -\\ACTONDISKPAGES (DISKCAS FIXEDDISKBUFFER DISKDAS DISKVERSION DISKFIRSTPAGE DISKLASTPAGE -DISKHINTLASTPAGE RETURNONCHECKERROR DISKACTION LASTDISKACTION MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) - \\BSP.HANDLE.INTERRUPTREPLY (XMITINTERRUPTID INTERRUPTOUT) \\DSPPOPSTATE.PSC (POSTSCRIPTXFORMSTACK -POSTSCRIPTCLIPPINGREGION POSTSCRIPTPAGEREGION POSTSCRIPTBOTTOMMARGIN POSTSCRIPTTOPMARGIN -POSTSCRIPTLEFTMARGIN POSTSCRIPTRIGHTMARGIN POSTSCRIPTLANDSCAPE POSTSCRIPTPENDINGXFORM POSTSCRIPTTRANSX - POSTSCRIPTTRANSY) \\IDLERKEYACTION (INTERRUPTLIST) \\NSFILING.RELEASE.BULKSTREAM (FSCOURIERSTREAMS) -PARSE.NSNAME (NSOBJECT NSDOMAIN NSORGANIZATION) ADDFILE0 (LOADTYPE FILEPROP COMSNAME FILEDATES -FILEDATE DATEFILENAME TOBEDUMPED) MB.SELFN (SELKIND SET ONFLG) CREATE-UNIX-SOCKET-STREAM (ACCESS -DEVICE EOLCONVENTION OPENFILELST) \\TEDIT.HCPYLOOKS.UPDATE (CURRENTPARALOOKS TICURPARALOOKS -CURRENTLOOKS F10) \\DOACTONDISKPAGES (DISKREQUEST CURRENTDAS DISKERRORCNT SAWCHECKERROR CBCLEANUPFN -CBLASTPTR CBFREEPTR CBPENDINGPTR LASTPAGEACTEDON CBLABELADDR) \\DOGCDISABLEDINTERRUPT (GCDISABLED) -OPENPOSTSCRIPTSTREAM (OUTCHARFN IMAGEDATA IMAGEOPS POSTSCRIPTSCALE POSTSCRIPTPAGEREGION -POSTSCRIPTCLIPPINGREGION POSTSCRIPTLEFTMARGIN POSTSCRIPTBOTTOMMARGIN POSTSCRIPTTOPMARGIN -POSTSCRIPTRIGHTMARGIN POSTSCRIPTHEADING POSTSCRIPTHEADINGFONT) SETSTKNAME (VALIDNAMETABLE \#FRAMENAME -FRAMENAME NAMETABLE FAST NAMETABLE#) \\TEXTBIN (COFFSET CHARSLEFT F2 PIECE F5 BINABLE FATSTREAMP F4 -CURRENTPARALOOKS TICURPARALOOKS CURRENTLOOKS F10 CBUFSIZE CPAGE PCSTARTCH FW7 PCSTARTPG FW6) -\\WRITEOUTBUFFERS (IODIRTY CBUFDIRTY) PUTFILEMAP (FMFROMFILE? FMRECENT? FMROOTNAME FMENVIRONMENT -FMFILEMAP FMFILECREATEDLOC FMFILECREATEDLST) SHRINK-VECTOR (FILL-POINTER-P FILL-POINTER) \\MAKEFLOAT ( -HIWORD LOWORD SIGNBIT EXPONENT HIFRACTION LOFRACTION) \\INFINITY (SIGNBIT EXPONENT HIFRACTION -LOFRACTION) SEDIT::REPLACE-ROOT (SEDIT::FIRST-LINE SEDIT::LINEAR-THREAD SEDIT::SUPER-NODE -SEDIT::SUB-NODE-INDEX SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::POINT-TYPE) \\CLEARMAP (CBUFSIZE -CBUFPTR BUFFERNEXT BUFFS) \\LEAF.GETFILEINFO.OPEN (PAGE OFFSET) TEDIT.REDO.INSERTION (PNEW -THFIRSTPIECE \\INSERTPCVALID POBJ TEXTLEN CH# CHLIM DCH THACTION) \\WRITEDISKPAGES (DISKCAS -FIXEDDISKBUFFER DISKDAS DISKVERSION DISKFIRSTPAGE DISKLASTPAGE DISKHINTLASTPAGE DISKNOALLOC -DISKWRITELASTNUMCHARS MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) |\\VFMFreeVPage| (|filePage| -|volumePage| |nextFilePage|) \\DO-DEFINE-FILE-INFO (REPACKAGE REREADTABLE REBASE RESPEC) INITGC ( -FREEPTR NEXTFREE) SEDIT:RESET-COMMANDS (SEDIT::COMMAND-TABLE SEDIT::HELP-MENU) SETY.PRESS (PRYPOS) -ADDFILE (CHANGED) \\DOWRITEDISKPAGES (DISKACTION LASTDISKACTION RETURNONCHECKERROR FIXEDDISKBUFFER -DISKFIRSTPAGE DISKREQUEST CURRENTDAS DISKERRORCNT SAWCHECKERROR CBCLEANUPFN CBLASTPTR CBFREEPTR -CBPENDINGPTR DLNEXT DLPREVIOUS DLNUMCHARS CBLABELADDR LASTPAGEACTEDON) \\RELEASEBUFFER (BUFFERNEXT) -TEDIT.HARDCOPY.PAGEHEADING (LMARK CHARLIM 1STLN LSTLN LHEIGHT ASCENT DESCENT LTRUEASCENT LTRUEDESCENT) - \\COPYFNHEADER (STARTPC) CL:SET-DISPATCH-MACRO-CHARACTER (DISPATCHMACRODEFS) IRM.DISPLAY.CREF (LEFT -BOTTOM HEIGHT WIDTH) DINFO.UPDATE.MENU.DISPLAY (MENUFONT ITEMWIDTH CENTERFLG MENUCOLUMNS + SEDIT::BACK-SPACE) SEDIT::SETUP-WINDOW-CONTEXT-DEPENDENCIES (LEFT BOTTOM WIDTH HEIGHT) +TEDIT.GET.OBJECT (POBJ PFILE PSTR PLOOKS) \CH.UPDATE.CACHE (OCORGANIZATION DCKNOWNSERVERS OCDOMAINS +DCDOMAIN OCALLSERVERS) \PAGED.INCFILEPTR (COFFSET CBUFDIRTY CBUFSIZE CBUFPTR CPAGE) TB.DESELECTRANGE ( +TISELECTED TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM) \STARTPAGE.PRESS (PRSPACEFACTOR PRPAGENUM) +\TEDIT.FIND (CH# CHLIM DCH POINT CARETLOOKS \INSERTNEXTCH) MAKETITLEBARICON (LEFT BOTTOM HEIGHT WIDTH) + \FIXILINES (CHAR1 DIRTY TXTNEEDSUPDATE CHARLIM CHARTOP) \LEAF.DEVICEP (DEVICENAME CLOSEFILE +DELETEFILE GETFILEINFO OPENFILE READPAGES WRITEPAGES SETFILEINFO TRUNCATEFILE GETFILENAME REOPENFILE +GENERATEFILES EVENTFN DIRECTORYNAMEP HOSTNAMEP RENAMEFILE DEVICEINFO PFSNAME PFSOSTYPE PFSLEAFSEQUIN +FORCEOUTPUT OPENP REGISTERFILE UNREGISTERFILE BREAKCONNECTION) FB.MAKE.SUBDIRECTORY.ITEM ( +TIUNSELECTABLE TIDATA FILENAME STARTOFPNAME VERSIONLESSNAME DIRECTORYP) TEDIT.SET.SEL.LOOKS (HOW +HOWHEIGHT HASCARET) MKSTRING (XBASE LENGTH OFFST XREADONLY TYP) \DOGCDISABLEDINTERRUPT (GCDISABLED) +\LFUnpackName (VOLNUM CHARLIST VERSION) LAYOUTSEXPR1 (NODEID NODELABEL TONODES) \BUFFERED.BIN (COFFSET +) \HDCPYDISPLAY.FIX.YPOS (DDMICAYPOS) \LEAF.DELETEFILE (OPWORD HANDLE LEAFLENGTH LEAFCONNECTION) +IDLE.SET.OPTION (ITEMS TITLE CENTERFLG) MAKESCAN (REST) MOVD (DEFPOINTER DEFCELLFLAGS AUXDEFCELLFLAGS) + DBG::ATTACH-BACKTRACE-MENU (ITEMS LABEL BKMENUINFO WHENSELECTEDFN MENUOUTLINESIZE MENUFONT +MENUCOLUMNS XCOORD YCOORD) SEDIT::REPLACE-CHARS (SEDIT::REAL-LENGTH LENGTH SEDIT::OPEN-NODE-CHANGED?) +SPY.MERGE.CALLEES (TREEFROM CALLEES STATUS) \SETXIPCHECKSUM (XIPCHECKSUM) CREATEREGION (LEFT BOTTOM +WIDTH HEIGHT) \3MBRAWRECEIVE (EPTYPE) \LFPurgeDirectory (fileID volNum type size) FB.COUNT.FILE.CHANGE + (TOTALFILES DELETEDFILES TOTALPAGES DELETEDPAGES) \LEAF.SETCREATIONDATE (OPWORD HANDLE FILEADDRESS +SIGNEXTEND DATALENGTH LEAFFILEDATE LEAFLENGTH LFCREATIONDATE) SETF-SYMBOL-PACKAGE (PACKAGE) +\BUFFERED.BOUT (COFFSET CBUFDIRTY) MB.COPYFN (OBJECTDATUM IMAGEOBJPLIST IMAGEOBJFNS) SEDIT::MAKE-GAP ( +SEDIT::LINEAR-ITEM) TEDIT.INCLUDE (THACTION THCH# THLEN THFIRSTPIECE TEXTLEN CHLIM CH# DCH DX POINT +SELKIND SELOBJ \DIRTY) MSPARSE (VPART C VB1 VB2) \NSFILING.SET.CONTINUANCE (FSCONTINUANCE) +FB.UNDELETE.FILE (DELETEDFILES DELETEDPAGES) ASKUSER (KEY OPTIONS) COERCETEXTOBJ (ACCESSBITS) +\BBTCURVEPT (PBTSOURCE PBTHEIGHT PBTDEST PBTDESTBIT PBTSOURCEBIT PBTWIDTH PBTOPERATION PBTSOURCETYPE) +\GETSPP (SPPACCEPTNO) \BUFFERED.BINS (COFFSET) SHOWBITMAP.IP (LEFT BOTTOM WIDTH HEIGHT) +\DSPLINEFEED.IP (IPLINEFEED) SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (SEDIT::PREV-LINE BOTTOM HEIGHT) +\TERMINATESPP (SPPTERMINATEDP SPPSTATE SPPPROCESS) \10MB.CREATENDB (NDBNSNET# NDBPUPNET# NETTYPE +NDBPUPTYPE NDBTRANSMITTER NDBENCAPSULATOR NDBBROADCASTP NDBTASK# NDBETHERFLUSHER NDBCANHEARSELF) +\LFOpenOldFile (FULLFILENAME FILEDESC DIRINFO DEVICE LEADERPAGE size EPAGE EOFFSET) \LFDirectoryP ( +fileID volNum type ACCESS MAXBUFFERS) CCCSCAN (CODEARRAY NAMELOCS CONSTLOCS DEFLOCS PTRLOCS) +\CENTICLOCK (CENTICLOCKSIGNBIT) \BUFFERED.BOUTS (COFFSET CBUFDIRTY) TB.INSERT.ITEM (TBITEMS TB#ITEMS +TB#DELETED TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM) SEDIT::REPLACE-QUOTE (SEDIT::SUPER-NODE +SEDIT::SUB-NODE-INDEX) MARK/GRAPH/NODE (NODEBORDER NODELABELSHADE) SEDIT::INITIALIZE-COMMENTS (SEDIT::NAME + SEDIT::ASSIGN-FORMAT SEDIT::COMPUTE-FORMAT-VALUES SEDIT::LINEARIZE SEDIT::SET-POINT SEDIT::SET-SELECTION + SEDIT::GROW-SELECTION SEDIT::SELECT-SEGMENT SEDIT::COMPUTE-POINT-POSITION +SEDIT::COMPUTE-SELECTION-POSITION SEDIT::INSERT CL:DELETE SEDIT::COPY-STRUCTURE SEDIT::COPY-SELECTION +SEDIT::STRINGIFY SEDIT::BACK-SPACE SEDIT::CLOSE-NODE) TWODINSPECT.SELECTITEM (ELTWIDTH ELTLEFT +ELTBOTTOM ROWPROP COLUMNPROP) \LEAF.GETFILE (LEAFREALLYOPEN LEAFCACHEDFILE OPCODE OPENMODE LEAFLENGTH +DEVICE LEAFCONNECTION LEAFHANDLE FULLFILENAME LEAFPAGECACHE EPAGE EOFFSET) RESET/NODE/LABELSHADE ( +NODELABELSHADE NODELABELBITMAP XCOORD YCOORD) \SLOWBLTCHAR (DDXPOSITION PBTDESTBIT PBTWIDTH +PBTSOURCEBIT) \PS.SCALEHACK (LEFT BOTTOM WIDTH HEIGHT POSTSCRIPTX POSTSCRIPTY POSTSCRIPTLEFTMARGIN +POSTSCRIPTRIGHTMARGIN POSTSCRIPTBOTTOMMARGIN POSTSCRIPTTOPMARGIN POSTSCRIPTTRANSX POSTSCRIPTTRANSY +POSTSCRIPTSCALEHACK POSTSCRIPTPENDINGXFORM) D-ASSEM:INTERN-DCODE (NA PV STARTPC ARGTYPE %#FRAMENAME +NTSIZE NLOCALS FVAROFFSET CLOSUREP FIXED) SEDIT::REPLACE-LIST (SEDIT::SUB-NODE-INDEX SEDIT::SUPER-NODE + CL:STRUCTURE SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::POINT-TYPE SEDIT::SELECT-START SEDIT::SELECT-END + SEDIT::NODE-TYPE) \CARET.FLASH.AGAIN (NEXT) \MAKEFLOAT (HIWORD LOWORD SIGNBIT EXPONENT HIFRACTION +LOFRACTION) TEDIT.DEFAULT.MENUFN (EDITOPACTIVE CH# CHLIM DCH POINT CARETLOOKS \INSERTPCVALID) +\DSPRIGHTMARGIN.IP (IPRIGHT IPMINCHARRIGHT) TEDIT.STREAMCHANGEDP (\DIRTY) \NULLDEVICE (DEVICENAME +RANDOMACCESSP NODIRECTORIES CLOSEFILE DELETEFILE OPENFILE REOPENFILE BIN BOUT PEEKBIN READP +BACKFILEPTR EOFP RENAMEFILE GETFILENAME EVENTFN BLOCKIN BLOCKOUT GENERATEFILES GETFILEPTR GETEOFPTR +SETFILEPTR GETFILEINFO SETFILEINFO SETEOFPTR) SETXYREL.IP (IPXPOS IPYPOS IPCHARVISIBLEP +IPCORRECTSTARTX) FW-OFD-EXISTS? (OFDSTATUS) \CHANGECHARSET.DISPLAY (DDWIDTHSCACHE DDOFFSETSCACHE +DDCHARIMAGEWIDTHS DDCHARSET PBTSOURCEBPL PBTSOURCE) \TEDIT.SCALEREGION (LEFT BOTTOM WIDTH HEIGHT) +SEDIT::SELECT-SEGMENT (SEDIT::DELETE-OK? SEDIT::PENDING-DELETE?) \BRUSHBITMAP (BRUSHCACHE) +TEDIT.ADD.MENUITEM (ITEMS MENUROWS MENUCOLUMNS ITEMWIDTH ITEMHEIGHT IMAGE) \SFFixY (DDCHARSETASCENT +PBTDEST PBTSOURCE DDCHARHEIGHTDELTA PBTHEIGHT DDCHARSETDESCENT) \NULL.OPENFILE (USERCLOSEABLE ACCESS +FULLFILENAME DEVICE) \DSPLEFTMARGIN.IP (IPLEFT) SEDIT::CREATE-QUOTED-GAP (SEDIT::NODE-TYPE CL:STRUCTURE + SEDIT::SUB-NODES SEDIT::UNASSIGNED SEDIT::SUPER-NODE SEDIT::SUB-NODE-INDEX SEDIT::LINEAR-FORM) +\VFMPutNext (key volumePage nextKey) MAKELINE (ORIG DIFF WIND) SETXY.IP (IPCHARVISIBLEP IPXPOS +IPCORRECTSTARTX IPYPOS) SETX.IP (IPCHARVISIBLEP IPXPOS IPCORRECTSTARTX) \TEXTSTREAMBOUT (CH# CHLIM +POINT DCH SELKIND CHARLIM CHARTOP EDITOPACTIVE X0 XLIM PIECE CPPTR CPAGE COFFSET PCSTARTCH PCSTARTPG +CBUFSIZE EPAGE CHARSLEFT REALFILE) SEDIT::CLEAR-LINEAR-FORM (SEDIT::START-X SEDIT::LINEAR-FORM +SEDIT::LINEAR-THREAD) TTYINBUFFERSTREAM (DEVICE ACCESS TTYINPUT TTYEOF TTYEOFACTION TTYORIGINPUT) +TEDIT.EXTEND.SEL (CHLIM XLIM YLIM LN CH# X0 Y0 L1 DCH POINT DX SELOBJ) \INFINITY (SIGNBIT EXPONENT +HIFRACTION LOFRACTION) BRH/OFFSET (YCOORD) \EDIT.UPCARET (TCFORCEUP) \SHOWSEL (ONFLG) BOXCOUNT (DTDCNT +) \TEDIT.FORMAT.FOOTNOTE (PAGELINECACHE CACHE LTEXTOBJ LEFTMARGIN RIGHTMARGIN) +ENCAPSULATEDOBJ.IMAGEBOXFN (XSIZE YSIZE YDESC XKERN) SEDIT::MAKE-BROKEN-ATOM (SEDIT::ATOM-CHARS) +IRM.CREF.BOX (XSIZE YSIZE YDESC XKERN) TEDIT.COMPOUND.PAGEFORMAT (REGIONFILLMETHOD REGIONSUBBOXES +REGIONSPEC) TB.DELETE.ITEM (TIDELETED TB#DELETED) \MEDW.PUTWINDOWPROP (RIGHTBUTTONFN BUTTONEVENTFN +CLOSEFN MOVEFN CURSORINFN CURSOROUTFN CURSORMOVEDFN RESHAPEFN REPAINTFN EXTENT SCROLLFN NEWREGIONFN +PROCESS WINDOWENTRYFN USERDATA) MAKEFLOATNUMBER (HIWORD LOWORD) DELDEF (FILEPROP FILECHANGES FILEDATES + ALLFIELDS) \COPYHARRAYP (NULLSLOTS LASTINDEX HARRAYPBASE OVERFLOWACTION NUMSLOTS NUMKEYS) +TB.SELECTRANGE (TISELECTED TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM) HASHARRAY (HARRAYPBASE LASTINDEX +RECLAIMABLE OVERFLOWACTION NUMSLOTS NULLSLOTS NUMKEYS HASHBITSFN EQUIVFN) \SLOWRETURN (FASTP) +\POSTSCRIPT.OUTCHARFN (POSTSCRIPTY POSTSCRIPTCHARSTOSHOW POSTSCRIPTX) \CH.GUESS.NEW.PROPERTIES ( +NSOBJECT) TERM.MOVETO (XPOS YPOS) \TEXTBIN (COFFSET CHARSLEFT PIECE BINABLE FATSTREAMP +CURRENTPARALOOKS CURRENTLOOKS CBUFSIZE CPAGE PCSTARTCH PCSTARTPG) TEDITCHAT.MENUFN (HELD ITEMS +RUNNING?) SEDIT::THROW-AWAY-CHANGES (SEDIT::ATOM-STARTED SEDIT::ATOM-STARTED-UNDO-POINTER +SEDIT::CHANGED-STRUCTURE? SEDIT::UNDO-LIST SEDIT::UNDO-UNDO-LIST) \TEDIT.REFRESH.SHOWSEL (ONFLG SET) +\ALLOCMAPBUFFER (VMEMPAGE SYSNEXT) CLOSENSOCKET (NSOCEVENT) LOG (EXPONENT) SEDIT::SETUP-NEW-CONTEXT ( +SEDIT::CONTEXT-LOCK) \LFCreateDevice (NODIRECTORIES DEVICENAME CLOSEFILE DELETEFILE RENAMEFILE +TRUNCATEFILE GETFILEINFO GETFILENAME OPENFILE READPAGES SETFILEINFO WRITEPAGES REOPENFILE +GENERATEFILES EVENTFN DIRECTORYNAMEP HOSTNAMEP OPENP REGISTERFILE UNREGISTERFILE) SETSTKNAME ( +VALIDNAMETABLE %#FRAMENAME FRAMENAME NAMETABLE) \LEAF.SETFILETYPE (OPWORD HANDLE FILEADDRESS +SIGNEXTEND DATALENGTH LEAFFILETYPE LEAFBYTESIZE LEAFLENGTH) \LFCreateFile (FULLFILENAME FILEDESC +fileID volNum type DEVICE filePage volumePage nextFilePage LEADERPAGE) \NSGATELISTENER ( +XIPFIRSTDATAWORD NET# %#HOPS) WHO-LINE-CHANGE-USER (TITLE CENTERFLG ITEMS) \NAMEDTABSIZE (XSIZE YSIZE +YDESC XKERN) \LEAF.TIMEDOUT.EXCESSIVE (LEAFABORTBUTTONWINDOW ITEMS WHENSELECTEDFN XCOORD YCOORD) +\COPYFNHEADER (STARTPC) SPY.DELETE (CALLEES) \SENDSPP (SPPSEQNO SENDACK) SUBARRAY (BASE LENGTH TYP +OFFST ORIG) TEDIT.HARDCOPY-COLUMN-END (YBOT YBASE) DASSEM.COUNTVARS (VARINDEX) SEDIT::PRETTY-PRINT ( +SEDIT::DISPLAY-WINDOW SEDIT::ENVIRONMENT SEDIT::CURRENT-X SEDIT::COMMENT-WIDTH SEDIT::COMMENT-SEPARATION + SEDIT::NODE-TYPE SEDIT::SUB-NODES SEDIT::START-X SEDIT::DEPTH SEDIT::CURRENT-NODE) MSSEEKPHRASE ( +SOUGHT ITEM C PARSED POSSIBLES START ENDING MODIFIER) IMAGEOBJPROP (OBJECTDATUM DISPLAYFN IMAGEBOXFN +PUTFN GETFN COPYFN BUTTONEVENTINFN COPYBUTTONEVENTINFN WHENMOVEDFN WHENINSERTEDFN WHENDELETEDFN +WHENCOPIEDFN WHENOPERATEDONFN PREPRINTFN IMAGECLASSNAME) SWITCH/NODE/HEIGHT/WIDTH (NODEWIDTH) +CHECKBUFFERREFVAL (NOREFERENCE) CREATEWFROMIMAGE (SCREEN LEFT BOTTOM WIDTH HEIGHT) +%%COPY-STRING-TO-ARRAY (BASE STRING-P TYPE-NUMBER FILL-POINTER TOTAL-SIZE) \AddShade (SHADEDITEMS) +\HCPYMODEBLTCHAR (DDXPOSITION PBTDESTBIT PBTWIDTH PBTSOURCEBIT) MSSETREP (EXPRESSION PRED +MSPATHOPTIONS MSVERB OTHERSET RECS ROOT MODIFIER QUOTED NEGATED REP) DINFO.UPDATE.GRAPH.DISPLAY ( +LAST.GRAPH.LOCATION) \LFGetStreamForFile (fileID volNum type) PRINTANDBOX (LEFT BOTTOM HEIGHT WIDTH) +COMP.STUNBIND (OPNAME OPARG) \WRITEOUTBUFFERS (IODIRTY CBUFDIRTY) \SETWINFOXSIZE (ATXSIZE) +OPT.COMMONBACK (TAG) FW-CREATE-OFD (FILESTREAM FULLNAME NAMEWIDTH EOFPOS READING? WRITING? RANDOM? +OFDSTATUS) \TELERAIDSEND (PUPDESTHOST PUPDESTNET PUPDESTSOCKETHI PUPDESTSOCKETLO PUPSOURCESOCKETHI +PUPSOURCESOCKETLO PUPCHECKSUM 3MBDESTHOST 3MBLENGTH) SETY.PRESS (PRYPOS) \CLEARMAP (CBUFSIZE CBUFPTR +BUFFERNEXT BUFFS) PUTPUPSTRING (PUPLENGTH) FILING.CALL (FSSESSIONHANDLE FSREALACTIVITY +FSLASTREALACTIVITYTIMER) FLOATP.TO.BCPL (BCPLEXPONENT SIGNIFICANTBIT BCPLHIFRACTION BCPLLOFRACTION) +PUP.ECHOSERVER (TYPEWORD EPREQUEUE) RESUME (EDFXP) OPT.JUMPREV (NXT PREV TAG OPNAME) +\CH.CHECK.CLEARINGHOUSE (NSOBJECT NSDOMAIN NSORGANIZATION) \PNC (OFFST LENGTH) SETX.PRESS (PRXPOS) +SETXREL.IP (IPXPOS IPCHARVISIBLEP IPCORRECTSTARTX) \RESUME (ACLINK) \DO-DEFINE-FILE-INFO (REPACKAGE +REREADTABLE REBASE REFORMAT RESPEC) DMCHAT.HANDLE.WRAP (EATTOCRLF) SHRINK-VECTOR (FILL-POINTER-P +FILL-POINTER) SEDIT::SET-SELECTION (SEDIT::DELETE-OK? SEDIT::PENDING-DELETE?) BCPL.TO.FLOATP (SIGNBIT +EXPONENT HIFRACTION LOFRACTION) PUP.ECHOUSER (PUPLENGTH) ADDFILE (CHANGED) STRINGREGION (LEFT BOTTOM +WIDTH HEIGHT) SEDIT::OPEN-LITATOM (SEDIT::OPEN-NODE SEDIT::PRIN-2? SEDIT::REAL-LENGTH LENGTH STRING) +HARRAYPROP (OVERFLOWACTION EQUIVFN RECLAIMABLE HASHBITSFN HASHUSERDATA) RESET/NODE/BORDER (XCOORD +YCOORD NODEBORDER NODELABELBITMAP) \POSTSCRIPT.ACCENTFN (POSTSCRIPTCHARSTOSHOW) \TEDIT2 (ACCESSBITS +EDITFINISHEDFLG) \RELEASEBUFFER (BUFFERNEXT) \TEDIT.LOOKS.UPDATE (CURRENTPARALOOKS CURRENTLOOKS +LHASPROT) \TEDIT.MOVE.PIECEMAPFN (PNEW PSTR) \CREATE.SPP.DEVICE (DEVICENAME FDBINABLE BUFFERED EVENTFN + TRUNCATEFILE CLOSEFILE BIN BOUT EOFP READP PEEKBIN BACKFILEPTR FORCEOUTPUT BLOCKIN BLOCKOUT +GETNEXTBUFFER GETFILEPTR SETFILEPTR) MARGINBAR.CREATE (XSIZE YSIZE YDESC XKERN MARL1 MARLN MARR +MARTABS MARUNIT MARTABTYPE LEFT BOTTOM WIDTH HEIGHT) COMP.STBIND (PARENT LEVEL CPIOK OPNAME OPARG) +COMP.MAP (OPNAME TAG) DASSEM.MATCHVARS (VARINDEX) \ACTONDISKPAGES (DISKCAS FIXEDDISKBUFFER DISKDAS +DISKVERSION DISKFIRSTPAGE DISKLASTPAGE DISKHINTLASTPAGE RETURNONCHECKERROR DISKACTION LASTDISKACTION +MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) \PS.SCALEREGION (LEFT BOTTOM WIDTH HEIGHT) CLRHASH (KEY VALUE + NULLSLOTS NUMKEYS) \TEDIT.MARKINACTIVE (EDITOPACTIVE) MSVERBTYPE (MODIFIER) FILEBROWSER (MENUFONT +ITEMS CENTERFLG MENUCOLUMNS WHENSELECTEDFN TITLE WIDTH HEIGHT BROWSERWINDOW BROWSERFONT +OVERFLOWSPACING SORTBY FIXEDTITLE INFOMENUCHOICES FBLOCK FBDEPTH HEADINGWINDOW PROMPTWINDOW +ABORTWINDOW MENUOUTLINESIZE TABLEBROWSER) \EDIT.DOWNCARET (TCCARETX TCCARETY TCFORCEUP) +CL:SET-DISPATCH-MACRO-CHARACTER (DISPATCHMACRODEFS) \ENDVECRUN (VECWASDISPLAYING VECSEGCHARS) +SHOWSHADEDITEMS (WIDTH) %%COPY-ONED-ARRAY (BASE STRING-P FILL-POINTER-P TYPE-NUMBER FILL-POINTER +TOTAL-SIZE) MENUITEMREGION (LEFT BOTTOM WIDTH HEIGHT) \SLOWHCPYMODEBLTCHAR (DDXPOSITION PBTDESTBIT +PBTWIDTH PBTSOURCEBIT) SKIP/ZAP (LASTSKIP LASTSKIPCHAR) TTADJUSTWIDTH (LASTCOL) PUTFILEMAP ( +FMFROMFILE? FMRECENT? FMROOTNAME FMENVIRONMENT FMFILEMAP FMFILECREATEDLOC FMFILECREATEDLST) \TEXTBOUT +(PIECE CPPTR CPAGE COFFSET PCSTARTCH PCSTARTPG CBUFSIZE EPAGE CHARSLEFT REALFILE) IRM.DISPLAY.CREF ( +LEFT BOTTOM HEIGHT WIDTH) DINFO.UPDATE.MENU.DISPLAY (MENUFONT ITEMWIDTH CENTERFLG MENUCOLUMNS MENUOUTLINESIZE ITEMS WHENSELECTEDFN LEFT BOTTOM WIDTH HEIGHT XCOORD YCOORD SUBNODE.MENU.WINDOW) -\\FILLRTPPUP (PUPLENGTH TYPEWORD PUPID) TB.UPDATE.DISPLAY (HEIGHT TBORIGIN BOTTOM) \\SETXFORM.PSC ( -POSTSCRIPTPENDINGXFORM POSTSCRIPTMOVEFLG POSTSCRIPTFONTCHANGEDFLG) RESUME (EDFXP) \\TEDIT.MARKINACTIVE - (EDITOPACTIVE) \\BSP.DECLARE.FILEPTR (BSPFILEPTR BSPFILEPTRHI FW6 BSPFILEPTRLO FW7) \\SLOWRETURN ( -FASTP \#BLINK \#CLINK SLOWP) \\BSP.HANDLE.ERROR (MAXPUPALLOC PUPALLOCCOUNT) |MakeMenuOfPrinters| ( -ITEMS TITLE WHENSELECTEDFN LEFT BOTTOM) \\SEQUIN.HANDLE.ACK (\#UNACKEDSEQS LASTACKEDSEQ) -PFI.COLLECT.DEFINERS (NAME PATTERNS TESTFN) SEDIT::MAP-COMMENT-INDEX (SEDIT::\\Z SEDIT::\\T SEDIT::\\X - SEDIT::\\Y) \\LEAF.SETVALIDATION (VALIDATION) \\GETMAPBUFFER (IODIRTY USERMAPPED BUFFERNEXT) -\\ACTONVMEMPAGES (FIXEDDISKBUFFER DISKCAS DISKDAS DISKFIRSTPAGE DISKLASTPAGE DISKHINTLASTPAGE -DISKACTION LASTDISKACTION) \\3MB.CREATENDB (NDBPUPHOST# NDBPUPNET# NDBNSNET# NETTYPE NDBPUPTYPE -NDBTRANSMITTER NDBENCAPSULATOR NDBBROADCASTP NDBETHERFLUSHER NDBWATCHER) \\RESUME (ACLINK \#BLINK -\#CLINK \#ALINK) \\WRITEVMEMPAGES (DISKCAS FIXEDDISKBUFFER DISKDAS DISKVERSION DISKFIRSTPAGE -DISKLASTPAGE DISKHINTLASTPAGE DISKNOALLOC DISKWRITELASTNUMCHARS) \\COPYHARRAYP (NULLSLOTS LASTINDEX -HARRAYPBASE OVERFLOWACTION NUMSLOTS NUMKEYS) SUBARRAY (BASE LENGTH TYP OFFST ORIG) -\\NSFILING.ERRORHANDLER (SPPERRORHANDLER F1 F2 F3 F4 F5 FW6 FW7 SPPSUBSTREAM CBUFPTR CBUFSIZE COFFSET) - \\DSKDISPLAY.RESHAPEFN (XCOORD YCOORD) CLEARFILEPKG (FILEPROP FILECHANGES) CLEARPUP (EPLINK -EPUSERFIELD EPPLIST EPREQUEUE EPSOCKET EPNETWORK) SETXREL.IP (IPXPOS IPCHARVISIBLEP IPCORRECTSTARTX) -HASHARRAY (HARRAYPBASE LASTINDEX RECLAIMABLE OVERFLOWACTION NUMSLOTS NULLSLOTS NUMKEYS HASHBITSFN -EQUIVFN) \\TEXTBOUT (PIECE F5 CPPTR CPAGE COFFSET PCSTARTCH FW7 PCSTARTPG FW6 CBUFSIZE EPAGE CHARSLEFT - F2 REALFILE F1) \\NSFILING.HOSTNAMEP (DEVICENAME REMOTEP SUBDIRECTORIES OPENFILE REOPENFILE CLOSEFILE - GETFILEINFO SETFILEINFO GETEOFPTR DELETEFILE HOSTNAMEP GETFILENAME DIRECTORYNAMEP GENERATEFILES -RENAMEFILE EVENTFN OPENP REGISTERFILE UNREGISTERFILE BREAKCONNECTION DEVICEINFO NSFILESERVER -NSFILINGLOCK NSFILINGNAME NSCONNECTIONS) SETSTKARGNAME (NAMETABLE FAST NAMETABLE# VALIDNAMETABLE) -\\TEDIT2 (ACCESSBITS EDITFINISHEDFLG) TEDIT.QUIT (EDITFINISHEDFLG) DINFO.UPDATE.TEXT.DISPLAY ( -LAST.TEXT) \\TEDIT.MARKACTIVE (EDITOPACTIVE) \\DSPCLIPPINGREGION.IP (|IPClippingRegion|) -CREATEMENUEDWINDOW (ITEMS CENTERFLG TITLE LEFT BOTTOM MENUROWS WIDTH HEIGHT) \\BSP.TIMERFN (EPREQUEUE -ACKREQUESTED ADATACOUNT) FB.ANALYZE.PATTERN (PATTERNPARSED? DIRECTORYSTART NAMESTART) FLOATP.TO.BCPL ( -BCPLEXPONENT SIGNIFICANTBIT BCPLHIFRACTION BCPLLOFRACTION) SEDIT::COPY-STRUCTURE-QUOTE (CL:STRUCTURE) -MB.SETIMAGE (XSIZE YSIZE YDESC XKERN) TEDIT.SKIP.SPECIALCOND (LMARK 1STLN LSTLN LHEIGHT ASCENT DESCENT - LTRUEASCENT LTRUEDESCENT CHARLIM) DINFO.UPDATE (CURRENTNODE) \\FM.CHANGELABEL (FM.LABEL FM.REGION -FM.MAXREGION FM.BITMAP FM.HIGHLIGHT) TEDIT.UNDO.INSERTION (\\INSERTPCVALID POINT THACTION) -\\DODISKCOMMAND (CBHEADERADDR CBDATAADDR CBLABELADDR DLPAGENO CBPAGENO CBDA CBCOMMAND CBLINK CBQSTATUS - CBLASTPTR) |\\VAMRecomputeFreePageCount| (|freePageCount| |lowerBound|) \\ENDVECRUN (VECWASDISPLAYING - VECSEGCHARS) BCPL.TO.FLOATP (SIGNBIT EXPONENT HIFRACTION LOFRACTION) |\\VFMFind| (|key| |volumePage|) - \\GETDISKCB (CBFREEPTR) MAKEFLOATNUMBER (HIWORD LOWORD) REOPENTEXTSTREAM (ACCESS BINABLE STRMBINFN -STRMBOUTFN) SETX.PRESS (PRXPOS) \\CLEANUPDISKQUEUE (CBSTATUS CBPENDINGPTR CBLASTPTR CBSHORTSEAL -CBFREEPTR TOTALDISKERRORS DISKERRORCNT SAWCHECKERROR CURRENTDISKPAGE CURRENTNUMCHARS) CLRHASH (KEY -VALUE NULLSLOTS NUMKEYS) CHECKBUFFERREFVAL (NOREFERENCE) SEDIT::REPLACE-NODE (SEDIT::SELECT-NODE -SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::SELECT-TYPE SEDIT::PENDING-DELETE?) COMP.STTAG (LEVEL -FRAME) INSPECT/AS/RECORD (ITEMS WHENHELDFN LEFT BOTTOM) OPT.FRAMEMERGE (VARS NNILS NVALS OPNAME OPARG) - DMCHAT.HANDLE.WRAP (EATTOCRLF) \\MAPPAGE (USERMAPPED NOREFERENCE BUFFERNEXT BUFFS FILEPAGE#) -FB.CHECK.NAME.LENGTH (OVERFLOWWIDTHS) SEDIT::COPY-STRUCTURE-LIST (CL:STRUCTURE) -\\NSRANDOM.HANDLE.ERROR (NSFILING.CONNECTION F3) \\TEDIT.INTEGER.IMAGEBOX (XKERN YDESC YSIZE XSIZE) -\\SEQUIN.FLUSH.RETRANSMIT (SEQRETRANSMITNEXT) \\TEDIT.MOVE.PIECEMAPFN (PNEW PSTR) -\\NSFILING.WHENCLOSED (FSCOURIERSTREAMS) DINFO.UPDATE.HISTORY (HISTORY.ITEMS MENUFONT TITLE CENTERFLG -MENUCOLUMNS ITEMS WHENSELECTEDFN LEFT BOTTOM HISTORY.MENU.WINDOW) \\DSPBOTTOMMARGIN.IP (IPBOTTOM) -TB.ITEM.UPDATABLE? (TBUPDATEFROMHERE) SCALE/GRAPH (GRAPHNODES NODEPOSITION XCOORD YCOORD NODEWIDTH -NODEHEIGHT NODEFONT TONODES NODEBORDER) UNMARKASCHANGED (TOBEDUMPED) \\GETREGION.CHECKBASEPT (XCOORD -YCOORD) SETUPFONTS.IP (IPFONT IPHEADINGFONT) BSP.PUTINTERRUPT (INTERRUPTOUT) -SEDIT::RELINEARIZE-WHERE-NECESSARY (SEDIT::CHANGED?) COMP.STJUMP (OPNAME TAG JT FRAME LEVEL) -\\TFBRAVO.INSTALL.PAGEFORMAT (TXTPAGEFRAMES TFBRAVODEFAULT TFBRAVOODD TFBRAVOEVEN) TERM.HOME (XPOS -YPOS) SET-FILL-POINTER (FILL-POINTER) |\\LFExtendFile| (|filePage| |volumePage| |nextFilePage|) -\\QUEUE.INPUT.IOCB (DLFOROUTPUTUSE DLNEXTIOCB DLRETRANSMISSIONMASK DLIOCBSTATUS DLIOCBLENGTH -DLIOCBBUFFER DLIOCBBUFFERHI DLIOCBBUFFERLO DLFIRSTICB DLLASTICB D0NEXTIOCB D0RETRANSMISSIONMASK -D0IOCBSTATUS D0IOCBLENGTH D0IOCBBUFFER D0IOCBBUFFERHI D0IOCBBUFFERLO D0FIRSTICB D0LASTICB) HARRAYPROP -(OVERFLOWACTION EQUIVFN RECLAIMABLE HASHBITSFN HASHUSERDATA) \\PUNT.BLTSHADE.BITMAP (PBTWIDTH -PBTHEIGHT) \\STORAGE.TYPE (NPAGES PAGE# NITEMS NFREE NINUSE NALLOCATED) UNMAKEHARDCOPYSTREAM (IMAGEOPS - STRMBOUTFN OUTCHARFN) \\FILLINSPP (EPTYPE CC DSTYPE) INSPECT/AS/BLOCKRECORD (ITEMS WHENHELDFN LEFT -BOTTOM) \\BITBLT.BITMAP.SLOW (PBTWIDTH PBTHEIGHT) EXPANDING-PAGEFULLFN (HEIGHT BOTTOM) \\SETEOF (EPAGE - EOFFSET CBUFSIZE CBUFDIRTY CBUFPTR) \\NOTE.3TO10 (NDBTRANSLATIONS) |\\VFMDeletePageGroup| (|fileID| -|filePage| |type| |volumePage| |nextFilePage|) \\MAKE.PMAP.DEVICE (FDBINABLE FDBOUTABLE FDEXTENDABLE -RESETABLE RANDOMACCESSP PAGEMAPPED BUFFERED BIN BOUT PEEKBIN READP BACKFILEPTR SETFILEPTR GETFILEPTR -GETEOFPTR SETEOFPTR EOFP BLOCKIN BLOCKOUT GETNEXTBUFFER FORCEOUTPUT) \\HDCPYDSPPRINTCHAR (CHARPOSITION -) FILES.PUTDEF (TOBEDUMPED FILEDATES) \\ADDLEAFSTRING (LEAFLENGTH) |\\LFSetFileInfo| (TYPE -|typeHolder| |TimeCreate|) WHO-LINE-CHANGE-USER (TITLE CENTERFLG ITEMS LEFT BOTTOM) STORAGE.LEFT ( -PAGE#) SEDIT::RECOMPUTE-WIDTH (SEDIT::ACTUAL-WIDTH) CHAT.ICONFN (ICON MASK TITLEREG) -\\PUNT.BITBLT.BITMAP (PBTWIDTH PBTHEIGHT) CHAT.SWITCH.EMACS (CHATINEMACS) DMCHAT.ADDRESS (ADDRESSING) -\\PAGEDSETFILEPTR (CBUFDIRTY CBUFSIZE CBUFPTR CPAGE COFFSET) \\TTY.CREATING.DISPLAYSTREAM (OUTCHARFN -FULLFILENAME) \\PAGED.GETNEXTBUFFER (CBUFDIRTY CBUFSIZE CBUFPTR COFFSET CPAGE EPAGE EOFFSET -CBUFMAXSIZE) \\LEAF.REPAIR.BROKEN.PUP (HANDLE LEAFSTATUS EPUSERFIELD) SEDIT::COPY-STRUCTURE-STRING ( -CL:STRUCTURE SEDIT::ATOM-CHARS STRING SEDIT::FONT SEDIT::PRIN-2?) FILEPKGCHANGES (CHANGED) -SEDIT::COLLECT-UNDO-BLOCK (SEDIT::UNDO-LIST) \\FILLBSPPUP (PUPLENGTH TYPEWORD PUPID EPREQUEUE) -TEDIT.EDIT.OBJECT (CH# CHLIM DCH \\TEXTOBJ DIRTY TXTNEEDSUPDATE) LINELENGTH (LINELENGTH) -SEDIT::COMPUTE-POINT-POSITION-LIST (SEDIT::POINT-X SEDIT::POINT-LINE) \\DOFORMATTING.HARDCOPY ( -LTRUEDESCENT LTRUEASCENT TLSPACEFACTOR LHEIGHT DESCENT ASCENT LEFTMARGIN LXLIM) DSPSOURCETYPE ( -DDSOURCETYPE PBTOPERATION PBTSOURCETYPE) SENDXIP (EPTYPE XIPTCONTROL) SEDIT::UNDO-COMMENT-CHANGE ( -CL:STRUCTURE SEDIT::SUPER-NODE SEDIT::SUB-NODE-INDEX) \\SETIODIRTY (IODIRTY) INSTALLBRUSH (BRUSHARRAY -CREATEMETHOD) |\\LFWritePages| (REVALIDATEFLG) DOWINDOWCOM (ITEMS CHANGEOFFSETFLG MENUOFFSET XCOORD -YCOORD WHENHELDFN WHENUNHELDFN CENTERFLG LEFT BOTTOM) SEDIT::PROPAGATE-WIDTH-CHANGE (WIDTH -SEDIT::ACTUAL-WIDTH) UNIX-BACKFILEPTR-NEW (COFFSET) PUTHASHTEXT (|Start| |End|) \\HASHACCESS (KEY -VALUE NUMKEYS NULLSLOTS) COMP.BOOL (OPNAME TAG) \\3MBENCAPSULATE (3MBDESTHOST 3MBSOURCEHOST 3MBLENGTH -3MBTYPE) TERM.PRINTCHAR (XPOS) CROPMARK.IMAGEBOXFN (XSIZE YSIZE YDESC XKERN) SPY.LEGEND (NODEID -NODELABEL TONODES NODEFONT NODEBORDER NODELABELSHADE) \\10MB.STARTDRIVER (NDBTQ DLFIRSTICB NDBWATCHER) - |\\VAMFreePageGroup| (|freePageCount| |lowerBound|) MSSOLVE (REP INVERTED OSET QUOTED) \\CLEARCB ( -CBQSTATUS) INITDATATYPES (DTDTYPEENTRY DTDSUPERTYPE DTDSIZE) \\HASHRECLAIM (KEY VALUE NUMKEYS) -SPY.MAKEGRAPHNODES (NODEID NODELABEL TONODES NODEBORDER NODEFONT) DSPCREATE (USERCLOSEABLE OUTCHARFN -IMAGEDATA PBTDISJOINT IMAGEOPS DEVICE ACCESS) \\PARTEND.PRESS (PRPARTSTART) GETPROMPTWINDOW (LEFT -BOTTOM WIDTH HEIGHT) SEDIT::CFV-QUOTE (SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH) \\PAGED.FORCEOUTPUT - (CBUFDIRTY CBUFSIZE CBUFPTR) NODECREATE (NODEID NODEPOSITION NODELABEL NODEFONT TONODES FROMNODES -NODEBORDER NODELABELSHADE) \\LEAF.USE.NEW.CONNECTION (EPLINK LEAFSTATUS EPUSERFIELD HANDLE) -FB.DELVERCOMMAND (TITLE ITEMS CENTERFLG LEFT BOTTOM) \\NSFILING.GET.STREAM (FSCOURIERSTREAMS) -\\TEDIT.HCPYFMTSPEC (1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD FMTBASETOBASE QUAD -TABSPEC FMTSPECIALX FMTSPECIALY) \\UFS.CREATE.DEVICE (NODIRECTORIES DEVICENAME CLOSEFILE DELETEFILE -RENAMEFILE TRUNCATEFILE GETFILEINFO GETFILENAME OPENFILE READPAGES SETFILEINFO WRITEPAGES REOPENFILE -GENERATEFILES EVENTFN DIRECTORYNAMEP HOSTNAMEP OPENP REGISTERFILE UNREGISTERFILE) -\\TEDIT.WORDBOUND.READTABLE (READMACRODEFS) SETFONT.IP (IPFONT) \\NSFILING.DELETEFILE (FSCACHEDHANDLES -) MENUWINDOW (ITEMS CENTERFLG LEFT BOTTOM MENUCOLUMNS MENUROWS MENUOUTLINESIZE) -GET-ENVIRONMENT-AND-FILEMAP (FMRECENT?) \\FAULTINIT (|KbdFXP| |MiscFXP|) \\UFS.UNREGISTER.GFS (FINFOID - DIRECTORY DEV) \\TEDIT.UPDATE.SHOWSEL (ONFLG) BULKDATA.GENERATE.NEXT (BGITEMSLEFT BGLASTSEGMENT?) -OPT.COMPINIT (OPNAME) GETXIP (INQUEUELENGTH) \\VANILLADISKINIT (DEVICENAME EVENTFN HOSTNAMEP) -\\SET.VMEM.FULL.STATE (VMEMFULL) |\\SFFixFont| (|DDSlowPrintingCase| DDCHARSET DDCHARSETASCENT) -TRANSLATE.DATATYPE (N LEN FD |fdTypeName| |fdType| |fdOffset|) DISPLAYGRAPH (XCOORD YCOORD) -\\CODEARRAY (TYP BASE LENGTH ORIG) \\DISPLAYSTREAMINCRXPOSITION (DDXPOSITION) |\\SFFixClippingRegion| -(|DDClippingRight| |DDClippingLeft| |DDClippingTop| |DDClippingBottom|) \\TEDIT.GET.SINGLE.PARALOOKS ( +SPY.DUMP.BUFFER (STATUS COUNT) \DOACTONDISKPAGES (DISKREQUEST CURRENTDAS DISKERRORCNT SAWCHECKERROR +CBCLEANUPFN CBLASTPTR CBFREEPTR CBPENDINGPTR LASTPAGEACTEDON CBLABELADDR) FB.SEEFULLFN (ITEMS MENUROWS + WHENSELECTEDFN CENTERFLG) TEDIT.UNDO.DELETION (\INSERTPCVALID THFIRSTPIECE TEXTLEN CH# CHLIM DCH +POINT THACTION) \FIXLINELENGTH.IP (LINELENGTH) SETSTKARGNAME (NAMETABLE) \GETMAPBUFFER (IODIRTY +USERMAPPED BUFFERNEXT) \LFUpdateLeaderPage (EofPage EOffSet AllocatedPages TimeWrite TimeCreate +VALIDATION TimeRead) REOPENTEXTSTREAM (ACCESS BINABLE STRMBINFN STRMBOUTFN) DINFO.UPDATE.TEXT.DISPLAY +(LAST.TEXT) OPENBSPSTREAM (RCVBYTEID RCVINTERRUPTID XMITBYTEID XMITINTERRUPTID LASTACKID ADATATIMEOUT +MAXPUPALLOC BSPINPUTSTREAM DEVICE ACCESS STRMBOUTFN ACCESSBITS BSPOUTPUTSTREAM BSPSOC %#UNREADPUPS +%#UNACKEDPUPS %#UNACKEDBYTES PUPALLOC BYTESPERPUP BYTEALLOC PUPALLOCCOUNT ADATACOUNT BSPFAILURESTRING +BSPTIMEOUT BSPINACTIVITYTIMEOUT BSPINPUTHANDLER BSPOTHERPUPFN BSPERRORHANDLER BSPIOTIMEOUT IOTIMEOUTFN + BSPWHENCLOSEDFN BSPINPUTEVENT) \HDCPYDISPLAY.FIX.XPOS (DDMICAXPOS) MB.SIZEFN (XSIZE YSIZE YDESC XKERN +) TERM.HOME (XPOS YPOS) OPT.LABELNTHPR (FRAME LEVEL) FILEPKGCHANGES (CHANGED) \WRITEDISKPAGES (DISKCAS + FIXEDDISKBUFFER DISKDAS DISKVERSION DISKFIRSTPAGE DISKLASTPAGE DISKHINTLASTPAGE DISKNOALLOC +DISKWRITELASTNUMCHARS MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) MB.DEFAULTBUTTON.ACTIONFN (EDITOPACTIVE + CH# CHLIM DCH POINT CARETLOOKS EDITFINISHEDFLG SET ONFLG) TEDIT.QUIT (EDITFINISHEDFLG) +SET-FILL-POINTER (FILL-POINTER) CH.SERVERS (NSOBJECT NSDOMAIN NSORGANIZATION) \HASHACCESS (KEY VALUE +NUMKEYS NULLSLOTS) SEDIT::INSERT-MULTI-ESCAPE (SEDIT::POINT-INDEX SEDIT::POINT-TYPE) \DOWRITEDISKPAGES + (DISKACTION LASTDISKACTION RETURNONCHECKERROR FIXEDDISKBUFFER DISKFIRSTPAGE DISKREQUEST CURRENTDAS +DISKERRORCNT SAWCHECKERROR CBCLEANUPFN CBLASTPTR CBFREEPTR CBPENDINGPTR DLNEXT DLPREVIOUS DLNUMCHARS +CBLABELADDR LASTPAGEACTEDON) \MEDW.DSPCREATE (USERCLOSEABLE IMAGEDATA DDDestination DEVICE ACCESS +STRMBOUTFN OUTCHARFN IMAGEOPS) ITEM.WINDOW.SET.STACK.ARG (ITEMS) \GENERIC.DSPCREATE (USERCLOSEABLE +OUTCHARFN IMAGEDATA IMAGEOPS DEVICE ACCESS) \SENDLEAF (EPUSERFIELD LEAFFLAGS PUPLENGTH LEAFSTATUS) +\TFBRAVO.INSTALL.PAGEFORMAT (TXTPAGEFRAMES TFBRAVODEFAULT TFBRAVOODD TFBRAVOEVEN) +\LFMakeVolumeDirectory (fileID volNum type size filePage volumePage nextFilePage) \SWITCHFONTS.PSC ( +POSTSCRIPTACCENTED POSTSCRIPTFONTCHANGEDFLG) \TEDIT.MARKACTIVE (EDITOPACTIVE) DINFO.UPDATE ( +CURRENTNODE) MENUREGION (WIDTH HEIGHT LEFT BOTTOM) \COURIER.REP.BIN (CRNEXTBYTE CRWORDLIST F1) +REFLECT/GRAPH/DIAGONALLY (SIDESFLG XCOORD YCOORD) \HASHRECLAIM (KEY VALUE NUMKEYS) \LEAF.CLOSEFILE ( +LEAFREALLYOPEN LEAFCACHEDFILE OPWORD HANDLE LEAFLENGTH LEAFPAGECACHE LEAFCONNECTION) \MAPPAGE ( +USERMAPPED NOREFERENCE BUFFERNEXT BUFFS FILEPAGE#) \ACTONVMEMPAGES (FIXEDDISKBUFFER DISKCAS DISKDAS +DISKFIRSTPAGE DISKLASTPAGE DISKHINTLASTPAGE DISKACTION LASTDISKACTION) FLTSTR (FILL-POINTER-P +TOTAL-SIZE) \TELERAIDGET (TRANSOPERATION) \SETEOF (EPAGE EOFFSET CBUFSIZE CBUFDIRTY CBUFPTR) \INITSPP +(EVENTFN) \WRITEVMEMPAGES (DISKCAS FIXEDDISKBUFFER DISKDAS DISKVERSION DISKFIRSTPAGE DISKLASTPAGE +DISKHINTLASTPAGE DISKNOALLOC DISKWRITELASTNUMCHARS) \SETWINFOYSIZE (ATYSIZE) \VAMFindFreePages ( +volumePage nextFilePage) TRANSLATE.DATATYPE (N LEN FD fdTypeName fdType fdOffset) TEDIT.REDO.INSERTION + (PNEW THFIRSTPIECE \INSERTPCVALID POBJ TEXTLEN CH# CHLIM DCH THACTION) LINELENGTH (LINELENGTH) +\COURIER.BROADCAST.ON.NET (XIPDESTNET) STORAGE.LEFT (PAGE#) \NSRANDOM.UPDATE.VALIDATION (REVALIDATEFLG +) SETUPFONTS.IP (IPFONT IPHEADINGFONT) \STORAGE.TYPE (NPAGES PAGE# NITEMS NFREE NINUSE NALLOCATED) +\DSPBOTTOMMARGIN.IP (IPBOTTOM) SEDIT::DOT-THIS-LIST (SEDIT::NODE-TYPE) POSTSCRIPT.SET-FAKE-LANDSCAPE ( +WIDTH HEIGHT LEFT BOTTOM POSTSCRIPTCLIPPINGREGION POSTSCRIPTPAGEREGION POSTSCRIPTLEFTMARGIN +POSTSCRIPTBOTTOMMARGIN POSTSCRIPTRIGHTMARGIN POSTSCRIPTTOPMARGIN POSTSCRIPTLANDSCAPE +POSTSCRIPTPENDINGXFORM) \BITBLT.BITMAP.SLOW (PBTWIDTH PBTHEIGHT) MB.SELFN (SELKIND SET ONFLG) +\BSPBACKFILEPTR (COFFSET) FB.ADD.FILE (TOTALPAGES TOTALFILES) \DSPROTATE.PSC (POSTSCRIPTROTATION +POSTSCRIPTPENDINGXFORM) ONEDINSPECT.SELECTPROP (ELTWIDTH ELTLEFT ELTBOTTOM PROP) \PUNT.BITBLT.BITMAP ( +PBTWIDTH PBTHEIGHT) INITIALIZE-SHELL-DEVICE (NODIRECTORIES DEVICENAME BIN BOUT PEEKBIN CLOSEFILE +GETFILEINFO SETFILEINFO EOFP BACKFILEPTR) \SETIODIRTY (IODIRTY) \NSRANDOM.WROTE.HANDLE (NSHWASWRITTEN +NSHATTRIBUTES NSHWASMODIFIED) \PUNT.BLTSHADE.BITMAP (PBTWIDTH PBTHEIGHT) \FM.NUMBER-CHANGESTATE ( +FM.STATE) TEDIT.EDIT.OBJECT (CH# CHLIM DCH \TEXTOBJ DIRTY TXTNEEDSUPDATE) \DODISKCOMMAND (CBHEADERADDR + CBDATAADDR CBLABELADDR DLPAGENO CBPAGENO CBDA CBCOMMAND CBLINK CBQSTATUS CBLASTPTR) DSPSOURCETYPE ( +DDSOURCETYPE PBTOPERATION PBTSOURCETYPE) SEDIT::OUTPUT-CONSTANT-STRING (SEDIT::LINEAR-PREV +SEDIT::LINEAR-FORM SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::CURRENT-X) REFLECT/GRAPH/VERTICALLY ( +YCOORD) BRH/LAYOUT (FROMNODES NODEPOSITION XCOORD YCOORD) \GETDISKCB (CBFREEPTR) SET/LABEL/SIZE ( +NODEWIDTH NODEHEIGHT) \XIPERROR (ERRORXIPCODE ERRORXIPARG XIPLENGTH XIPTYPE EPREQUEUE) TB.EXPANDFN ( +TBUPDATEFROMHERE) \MAKE.PMAP.DEVICE (FDBINABLE FDBOUTABLE FDEXTENDABLE RESETABLE RANDOMACCESSP +PAGEMAPPED BUFFERED BIN BOUT PEEKBIN READP BACKFILEPTR SETFILEPTR GETFILEPTR GETEOFPTR SETEOFPTR EOFP +BLOCKIN BLOCKOUT GETNEXTBUFFER FORCEOUTPUT) DO.EDIT.PP (FIRSTCOL LASTCOL) \CLEANUPDISKQUEUE (CBSTATUS +CBPENDINGPTR CBLASTPTR CBSHORTSEAL CBFREEPTR TOTALDISKERRORS DISKERRORCNT SAWCHECKERROR +CURRENTDISKPAGE CURRENTNUMCHARS) \CODEARRAY (TYP BASE LENGTH ORIG) \FM.WINDOWEXTENT (WIDTH) +\IDLERKEYACTION (INTERRUPTLIST) SPY.NEXT.TREE (CALLEES NAME COUNT) READHOTSPOT (XCOORD YCOORD) +COPY.TEXT.TO.IMAGE (ENDOFSTREAMOP) SEDIT::SET-DEPTH (SEDIT::DEPTH) COMP.STSETQ (OPNAME OPARG) +\PAGED.GETNEXTBUFFER (CBUFDIRTY CBUFSIZE CBUFPTR COFFSET CPAGE EPAGE EOFFSET CBUFMAXSIZE) CHAT.ICONFN +(ICON MASK TITLEREG) \MAKE.EXPEDITED.STREAM (DEVICE ACCESS CBUFPTR COFFSET EOFFSET CBUFSIZE +ENDOFSTREAMOP WRITEXTENSIONFN) \PAGED.FORCEOUTPUT (CBUFDIRTY CBUFSIZE CBUFPTR) \CARET.FLASH (STREAM +STREAMX STREAMY RATE) \DSPCLIPPINGREGION.IP (IPClippingRegion) \PAGEDSETFILEPTR (CBUFDIRTY CBUFSIZE +CBUFPTR CPAGE COFFSET) DASSEM.DSTOREFNDEF (NA PV STARTPC ARGTYPE FRAMENAME NTSIZE NLOCALS FVAROFFSET +FIXED) POSTSCRIPT.STARTPAGE (POSTSCRIPTPENDINGXFORM POSTSCRIPTFONTCHANGEDFLG POSTSCRIPTPAGEBLANK) +SETFONT.IP (IPFONT) DINFO.UPDATE.HISTORY (HISTORY.ITEMS MENUFONT TITLE CENTERFLG MENUCOLUMNS ITEMS +WHENSELECTEDFN HISTORY.MENU.WINDOW) \VFMAtLoad (fileID filePage) TEDIT.UNDO.INSERTION (\INSERTPCVALID +POINT THACTION) MSBLOCK (TYPES FNS FILES) \IFS.LOOKUPFILE (PFSLOOKUPFILESOCKET PFSLOOKUPFILELOCK +PFSLOOKUPFAILCNT) DSPCREATE (USERCLOSEABLE OUTCHARFN IMAGEDATA IMAGEOPS DEVICE ACCESS) +\FM.UPDATEGROUPEXTENT (LEFT BOTTOM WIDTH HEIGHT) \LEAF.RESENDPUPS (PUPSOURCESOCKET) SPY.SUM (SUM) +\DSPTRANSLATE.PSC (POSTSCRIPTTRANSX POSTSCRIPTTRANSY POSTSCRIPTPENDINGXFORM) CHAT.SWITCH.EMACS ( +CHATINEMACS) \FM.EDIT-SETUP (FM.REGION FM.MESSAGE FM.INITSTATE FM.SYSSELECTEDFN) \COURIER.REP.BOUT ( +HIBYTE LOBYTE CRLASTWORD CRWORDLIST CRNEXTBYTE) \PARTEND.PRESS (PRPARTSTART) SEDIT::OUTPUT-CR ( +SEDIT::ACTUAL-WIDTH SEDIT::PREV-LINE SEDIT::LINE-SKIP SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::INDENT + SEDIT::YCOORD SEDIT::LINEAR-POINTER SEDIT::LINEAR-FORM SEDIT::NODE SEDIT::LINE-LENGTH SEDIT::SHIFT-Y +SEDIT::CURRENT-BLOCK SEDIT::BLOCK-NEW-X SEDIT::BLOCK-START SEDIT::CURRENT-LINE SEDIT::NEXT-LINE +SEDIT::CURRENT-X SEDIT::LINEAR-PREV) REFLECT/GRAPH/HORIZONTALLY (XCOORD) NS.ECHOUSER (XIPLENGTH) +TERM.PRINTCHAR (XPOS) \ALLOCBLOCK.NEW (PAGE#) SWAPXIPADDRESSES (XIPSOURCESOCKET XIPSOURCENET +XIPSOURCEHOST) OPT.PRDEL (NXT PREV) NSNETDAYTIME0 (TIMEOP TIMEVERSION XIPLENGTH) SQRT (EXPONENT +HIFRACTION) \SFFixDestination (PBTDESTBPL DDCHARSET DDCHARSETASCENT) \HANDLE.RAW.XIP (EPREQUEUE +XIPDESTNET NDBNSNET# NSNET RTNET# RTHOPCOUNT RTGATEWAY# RTNDB RTRECENT INQUEUELENGTH) TB.FLUSH.WINDOW +(TBITEMS TBWINDOW TBTAILHINT) \LEAF.READFILEPROP (OPWORD HANDLE FILEADDRESS SIGNEXTEND DATALENGTH +LEAFLENGTH) MSJOINSET (DET TYPE REP ID SET1 SET2) BSPPUTMARK (COFFSET PUPTYPE) \MAIKO.ALLOCBLOCK ( +INUSE GCTYPE) \FM.TRANSPOSEVERT (BOTTOM) \BSP.HANDLE.DATA (SYSQUEUEHEAD QLINK RCVBYTEID %#UNREADPUPS) +\DSPRIGHTMARGIN.HDCPYDISPLAY (DDMICARIGHTMARGIN) DMCHAT.ADDRESS (ADDRESSING) COMP.LOOKUPCONST (OPNAME +OPARG) COMP.NUMBERTEST (OPNAME TAG) OPENIPSTREAM (IPPAGEREGION IPLEFT IPRIGHT IPTOP IPBOTTOM +IPSHOWSTREAM IPDOCNAME IPCLIPINCLUSIVE NAME OUTCHARFN EOL IMAGEOPS IPDATA IPROTATION IPYOFFSET +IPPAGEFRAME LEFT BOTTOM WIDTH HEIGHT IPHEADING) \GETREGION.PACKPTS (XCOORD YCOORD) \VFMMarkBufferDirty + (DIRTY) \FM.NUMBER-SETUP (FM.REGION FM.MESSAGE FM.INITSTATE FM.SYSSELECTEDFN) \MAKEFREEARRAYBLOCK ( +ABFLAGS ARLEN) FW-UPDATE-OFD-WINDOW (OFDSTATUS CURPOS EOFPOS LEFT BOTTOM WIDTH PCTPOS) MB.SETIMAGE ( +XSIZE YSIZE YDESC XKERN) \CLEARCB (CBQSTATUS) \DISPLAYSTREAMINCRXPOSITION (DDXPOSITION) \SFFixFont ( +DDSlowPrintingCase DDCHARSET DDCHARSETASCENT) TEDIT.HARDCOPY.PAGEHEADING (LMARK CHARLIM 1STLN LSTLN +LHEIGHT ASCENT DESCENT LTRUEASCENT LTRUEDESCENT) SEDIT::LINEARIZE (SEDIT::LINEAR-POINTER SEDIT::LINEAR-FORM + SEDIT::LINEAR-THREAD SEDIT::LINEAR-PREV SEDIT::LAST-LINEARIZED-SUB-NODE-INDEX SEDIT::ACTUAL-WIDTH +SEDIT::RIGHT-MARGIN SEDIT::START-X SEDIT::CURRENT-NODE) EXTENDREGIONTOP (HEIGHT) \DSPPOPSTATE.PSC ( +POSTSCRIPTXFORMSTACK POSTSCRIPTCLIPPINGREGION POSTSCRIPTPAGEREGION POSTSCRIPTBOTTOMMARGIN +POSTSCRIPTTOPMARGIN POSTSCRIPTLEFTMARGIN POSTSCRIPTRIGHTMARGIN POSTSCRIPTLANDSCAPE +POSTSCRIPTPENDINGXFORM POSTSCRIPTTRANSX POSTSCRIPTTRANSY) \LINKBLOCK (FWD BKWD) +\TEDIT.HCPYLOOKS.UPDATE (CURRENTPARALOOKS CURRENTLOOKS) READ-AFM-FILE (ITEMS MENUFONT FID IL-FONTID +DESCENT ASCENT WIDTHS FIRSTCHAR LASTCHAR) CHAT.ENDOFSTREAMOP (ENDOFSTREAMOP) \CARET.FLASH? (NEXT) +PARSE.NSNAME (NSOBJECT NSDOMAIN NSORGANIZATION) SHEDSCAN (GEOM REST BY TY WC) \VANILLADISKINIT ( +DEVICENAME EVENTFN HOSTNAMEP) \DELETEBLOCK? (BKWD FWD) \FM.TRANSPOSEHORZ (LEFT) BSPGETMARK ( +MARKPENDING) \TEDIT.PARSE.CHARLOOKS.LIST (CLFONT CLBOLD CLITAL CLPROTECTED CLSELHERE CLULINE CLOLINE +CLSTRIKE CLINVISIBLE CLINVERTED CLOFFSET CLSTYLE CLUSERINFO CLSIZE) SPY.MERGETREE (SUM COUNT TREEFROM +STATUS) \LEAF.GETFILEINFO.OPEN (PAGE OFFSET) \DSPPUSHSTATE.PSC (POSTSCRIPTXFORMSTACK PSXCLIP PSXPAGE +PSXLEFT PSXRIGHT PSXTOP PSXBOTTOM PSXTRANX PSXTRANY PSXLAND PSXXFORMPEND) \UFS.UNREGISTER.GFS (FINFOID + DIRECTORY DEV) \UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (LINELENGTH) SEDIT::REVIVE-NODE (SEDIT::DEPTH) + \BSP.HANDLE.ACK (ADATATIMEOUT LASTACKID SYSQUEUEHEAD SYSQUEUETAIL EPREQUEUE ACKREQUESTED QLINK +%#UNACKEDPUPS %#UNACKEDBYTES PUPALLOCCOUNT MAXPUPALLOC BYTESPERPUP PUPALLOC BYTEALLOC) +COURIER.READ.NSNAME (NSORGANIZATION NSDOMAIN NSOBJECT) \BSP.DECLARE.FILEPTR (BSPFILEPTR) +\MAIKO.PUNTBLTCHAR (DDXPOSITION) \VANILLAHOSTNAMEP (EVENTFN) GET-ENVIRONMENT-AND-FILEMAP (FMRECENT?) +TERM.DOWN (YPOS) \INIT.ETHER.BUFFER.POOL (D0NEXTIOCB) \DSPFONT.HDCPYDISPLAY (DDCHARIMAGEWIDTHS +DDLINEFEED) \LOCATE.NSNET (RTNET# RTHOPCOUNT RTTIMER) GRAPHEDITCOMMANDFN (ITEMS CENTERFLG +CHANGEOFFSETFLG) RESTOREBUF (OLDTAIL) NODECREATE (NODEID NODEPOSITION NODELABEL NODEFONT TONODES +FROMNODES NODEBORDER NODELABELSHADE) \FLUSHNDBS (NDBNEXT NDBWATCHER NDBTRANSLATIONS NDBIQ) PUTHASHTEXT + (Start End) \BULK.DATA.CLOSE (SPPATTENTIONFN BULK.DATA.CONTINUATION SPPINPKT CBUFPTR CBUFSIZE +ENDOFSTREAMOP SPPSUBSTREAM F10) \UNVISIBLE.PAGED.REVALIDATEFILELST (ACCESS) \CHECKFORSTORAGEFULL ( +STORAGEFULL) \INIT.POWERS.OF.TEN (EXP HI LO) \GETREGIONTRACKWITHBOX (XCOORD YCOORD) +\SFFixClippingRegion (DDClippingRight DDClippingLeft DDClippingTop DDClippingBottom) OPT.LBMERGE (TAG +LEVEL FRAME) \TEDIT.PARSE.PARALOOKS.LIST (TABKIND TABX 1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE +LEADAFTER LINELEAD TABSPEC QUAD FMTPARATYPE FMTPARASUBTYPE FMTNEWPAGEBEFORE FMTNEWPAGEAFTER +FMTHEADINGKEEP FMTKEEP FMTBASETOBASE FMTREVISED FMTCOLUMN FMTSPECIALX FMTSPECIALY FMTSTYLE +FMTCHARSTYLES FMTUSERINFO) \TEDIT.WORDBOUND.READTABLE (READMACRODEFS) SEDIT::INITIALIZE-ATOMIC (SEDIT::NAME + SEDIT::ASSIGN-FORMAT SEDIT::COMPUTE-FORMAT-VALUES SEDIT::LINEARIZE SEDIT::SUB-NODE-CHANGED +SEDIT::COMPUTE-POINT-POSITION SEDIT::COMPUTE-SELECTION-POSITION SEDIT::SET-POINT SEDIT::SET-SELECTION +SEDIT::GROW-SELECTION SEDIT::SELECT-SEGMENT SEDIT::INSERT CL:DELETE SEDIT::COPY-STRUCTURE +SEDIT::COPY-SELECTION SEDIT::STRINGIFY SEDIT::BACK-SPACE SEDIT::CLOSE-NODE) \TEXTTTYBOUT (CHARPOSITION +) FW-CLOSEFN (OFDSTATUS) TEXTICON (XCOORD YCOORD) \UFS.CREATE.DEVICE (NODIRECTORIES DEVICENAME +CLOSEFILE DELETEFILE RENAMEFILE TRUNCATEFILE GETFILEINFO GETFILENAME OPENFILE READPAGES SETFILEINFO +WRITEPAGES REOPENFILE GENERATEFILES EVENTFN DIRECTORYNAMEP HOSTNAMEP OPENP REGISTERFILE UNREGISTERFILE +) TEDIT.SKIP.SPECIALCOND (LMARK 1STLN LSTLN LHEIGHT ASCENT DESCENT LTRUEASCENT LTRUEDESCENT CHARLIM) +TB.RENUMBER.TAIL (TI# TBTAILHINT) \FAULTINIT (KbdFXP MiscFXP) \FM.EDIT-INSERT (WIDTH FM.BITMAP +FM.LABEL) SET/LAYOUT/POSITION (XCOORD YCOORD) COURIER.OPEN (ENDOFSTREAMOP) BLOCK (WAKEREASON PQNEXT +PQLAST PROCFX) \BN.TO.FIXP (ELEMENTS) \CREATESTARFONT (FONTDEVICE FONTFAMILY FONTSIZE FONTFACE +\SFFACECODE ROTATION OTHERDEVICEFONTPROPS FONTSCALE) TB.UPDATE.DISPLAY (HEIGHT TBORIGIN BOTTOM) +\SET.VMEM.FULL.STATE (VMEMFULL) \VFMDelete1 (used) \SETGROUPMIN (ATNOWX ATNOWY ATMINX ATMINY ATMAXX +ATMAXY) LOOKUP-ENVIRONMENT-AND-FILEMAP (FMRECENT?) FW-RESIZE-OFD (WIDTH HEIGHT LEFT BOTTOM +CURPOSXOFFSET EOFPOSXOFFSET PCTPOSXOFFSET ACCESSXOFFSET PCTREGION) PRINTDATE (FILECHANGES FILEDATE +DATEFILENAME) CLEARPUP (EPLINK EPUSERFIELD EPPLIST EPREQUEUE EPSOCKET EPNETWORK) TEDIT.MOVE (SET +\INSERTPCVALID \INSERTPC THTEXTOBJ THACTION THLEN THCH# THFIRSTPIECE THAUXINFO THOLDINFO \DIRTY +TEXTLEN CH# CHLIM DCH DX POINT) \NSFILING.RELEASE.BULKSTREAM (FSCOURIERSTREAMS) FREEATTACHEDWINDOW ( +XCOORD YCOORD) \CLOSELINE (LINEBUFSTATE) \SFFIXLINELENGTH (LINELENGTH) \UFSOpenFile (FULLFILENAME +DEVICE EPAGE EOFFSET EOLCONVENTION VALIDATION ENDOFSTREAMOP FILEID CDATE UNIXNAME) \INCPARENCOUNT ( +INSTRINGP LPARCOUNT FW6 LBRKCOUNT FW7) EDITSHADEREPAINTFN (REGION LABEL HELP) \GETFBB (FBBBDX FBBBDY +FBBBOX FBBBOY) \DOVE.FAULTINIT (PAGE# HINUM LONUM) SEDIT::MAP-COMMENT-INDEX (SEDIT::\Z SEDIT::\T SEDIT::\X + SEDIT::\Y) \TEDIT.UPDATE.SHOWSEL (ONFLG) \READACFONTBOXES (RASTERWIDTHX RASTERWIDTHY BBOX BBOY BBDX +BBDY) \RESETLINE (LINEBUFSTATE) \DL.FAULTINIT (PAGE# DLPROCESSORCMD NSHost0 NSHost1 NSHost2) +\VFMSaveBuffer (DIRTY) \SEQUIN.HANDLE.ACK (%#UNACKEDSEQS LASTACKEDSEQ) DASSEM.DASSEM (OPNAME OPARG +NVALS NNILS FREEVARINDEX JPT JMIN JD) \LEAF.SETVALIDATION (VALIDATION) \TEDIT.GET.SINGLE.PARALOOKS ( 1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD TABX TABKIND FMTSPECIALX FMTSPECIALY FMTUSERINFO FMTPARATYPE FMTPARASUBTYPE FMTSTYLE FMTCHARSTYLES FMTNEWPAGEBEFORE -FMTNEWPAGEAFTER FMTHEADINGKEEP FMTKEEP FMTBASETOBASE FMTREVISED FMTCOLUMN) -\\UNVISIBLE.PAGED.REVALIDATEFILELST (ACCESS) \\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (LINELENGTH) -INITIALIZE-NEW-SHELL-DEVICE (FDBINABLE NODIRECTORIES DEVICENAME BIN BOUT PEEKBIN CLOSEFILE GETFILEINFO - SETFILEINFO EOFP BACKFILEPTR GETNEXTBUFFER BLOCKIN) \\D01.FAULTINIT (HINUM LONUM |NSHost0| |NSHost1| -|NSHost2|) SQRT (EXPONENT HIFRACTION) \\3MBGETPACKET (EPNETWORK EPTYPE) PRINTDATE (FILECHANGES -FILEDATE DATEFILENAME) \\10MB.INPUT.INTERRUPT (10MBLENGTH EPRECEIVING EPNETWORK) |\\SFFixDestination| -(PBTDESTBPL DDCHARSET DDCHARSETASCENT) \\MAIKO.PUNTBLTCHAR (DDXPOSITION) MAKEHARDCOPYSTREAM (IMAGEOPS -STRMBOUTFN OUTCHARFN) \\DL.FAULTINIT (PAGE# DLPROCESSORCMD |NSHost0| |NSHost1| |NSHost2|) -\\CREATESTARFONT (FONTDEVICE FONTFAMILY FONTSIZE FONTFACE \\SFFACECODE ROTATION OTHERDEVICEFONTPROPS -FONTSCALE) \\MAIKO.FAULTINIT (PAGE#) MB.THREESTATE.WHENOPERATEDFN (SET ONFLG) SEDIT::CONS-ATOM ( -SEDIT::ATOM-CHARS) \\READACFONTBOXES (RASTERWIDTHX RASTERWIDTHY BBOX BBOY BBDX BBDY) -\\VANILLAHOSTNAMEP (EVENTFN) LOOKUP-ENVIRONMENT-AND-FILEMAP (FMRECENT?) SEDIT::CFV-LIST ( -SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH) \\FILEMAP-HASHOVERFLOW (FMRECENT?) \\SFFIXLINELENGTH ( -LINELENGTH) \\TEDIT.PARSE.CHARLOOKS.LIST (CLFONT CLBOLD CLITAL CLPROTECTED CLSELHERE CLULINE CLOLINE -CLSTRIKE CLINVISIBLE CLINVERTED CLOFFSET CLSTYLE CLUSERINFO CLSIZE) \\MAIKO.ALLOCBLOCK (INUSE GCTYPE) -\\GETFBB (FBBBDX FBBBDY FBBBOX FBBBOY) FLTSTR (FILL-POINTER-P TOTAL-SIZE) |\\LFOpenFile| (EPAGE -EOFFSET NONDEFAULTDATEFLG VALIDATION) \\MAKEFREEARRAYBLOCK (ABFLAGS ARLEN) SEDIT::PARSE-NEW ( -SEDIT::CURRENT-NODE SEDIT::\\X) \\DOVE.FAULTINIT (PAGE# HINUM LONUM) CHAT.ENDOFSTREAMOP (ENDOFSTREAMOP -) \\ALLOCBLOCK.NEW (PAGE#) |\\UFSOpenFile| (FULLFILENAME DEVICE EPAGE EOFFSET EOLCONVENTION VALIDATION - ENDOFSTREAMOP FILEID F1 CDATE F2 UNIXNAME F5) OPT.NOTJUMP (OPNAME OPARG) TWODINSPECT.SELECTCOLUMNPROP - (ELTWIDTH ELTLEFT ELTBOTTOM PROP) FB.HANDLE.ABORT.BUTTON (ABORTING) \\LINKBLOCK (FWD BKWD) -SEDIT::BACKSPACE-LIST (SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::POINT-TYPE) MB.BUTTONEVENTINFN ( -SELKIND) \\RESETLINE (LINEBUFSTATE F5) REMWINDOWPROP (USERDATA) CRITSECT (LX RX) FB.DELETE.FILE ( -DELETEDFILES DELETEDPAGES) DINFO.SETUP.WINDOW (WINDOW) \\TEDIT.NSCHAR.RUN (\\INSERTPCVALID PFILE PFPOS - PFATP PSTR PLEN TEXTLEN) \\SEQUIN.RETRANSMITNEXT (EPREQUEUE RECEIVESEQ ALLOCATE SEQRETRANSMITNEXT -SEQRETRANSMITTING \#SEQRETRANSMITS) \\TEXTTTYBOUT (CHARPOSITION) \\SPPWATCHER (SPPACTIVITYTIMER -SPPINACTIVECOUNT SPPACKPENDING) SEDIT::COMPUTE-SELECTION-POSITION-LITATOM (SEDIT::SELECT-START-LINE -SEDIT::SELECT-END-LINE) SEDIT::BUILD-PRELINEARIZED-NODE (SEDIT::CURRENT-NODE SEDIT::\\X) -|\\LFGenerateFiles| (DIRPTR CHARLIST NEXTFILEFN FILEINFOFN GENFILESTATE CURRENTFILE RESTOFFILES -ATTRIBUTES) \\COPYSEL (Y0 X0 DX CH# XLIM CHLIM DCH L1 LN YLIM POINT SET \\TEXTOBJ SELKIND HOW -HOWHEIGHT HASCARET SELOBJ ONFLG) \\CLOSELINE (LINEBUFSTATE F5) \\DELETEBLOCK? (BKWD FWD) -\\NSRANDOM.PREPARE.CACHE (NSFILING.PAGE.CACHE NSPSIZE NSPTAIL NSPBUFFERS F1) \\CHAIN.UP.RPT (NEXTRP -LOCKED UNAVAILABLE VP) \\TEDIT.PARSE.PARALOOKS.LIST (TABKIND TABX 1STLEFTMAR LEFTMAR RIGHTMAR -LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD FMTPARATYPE FMTPARASUBTYPE FMTNEWPAGEBEFORE FMTNEWPAGEAFTER - FMTHEADINGKEEP FMTKEEP FMTBASETOBASE FMTREVISED FMTCOLUMN FMTSPECIALX FMTSPECIALY FMTSTYLE -FMTCHARSTYLES FMTUSERINFO) |\\UFSTruncateFile| (EPAGE EOFFSET VALIDATION) OPT.CHECKTAG (LEVEL) -TERM.DOWN (YPOS) \\FM.PUTITEMPROP (FM.LABEL FM.ID FM.GROUPID FM.STATE FM.INITSTATE FM.FONT FM.BITMAP -FM.HIGHLIGHT FM.REGION FM.MAXREGION FM.MESSAGE FM.LINKS FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN -FM.DOWNFN FM.HELDFN FM.MOVEDFN FM.SELECTEDFN) |\\UFSCloseFile| (FILEID F1 CDATE F2) WYOFFSET (BOTTOM) -\\TEDIT.FORMATTABS (PTNEWTX PTOLDTAB PTTYPE PTTABX PTWBASE PTOLDTX) |\\VFMSplit1| (|key| |volumePage| -|used|) TEDIT.INCLUDE (THACTION THCH# THLEN THFIRSTPIECE TEXTLEN CHLIM CH# DCH DX POINT SELKIND SELOBJ - \\DIRTY \\XDIRTY) SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::POINT-NODE SEDIT::POINT-TYPE) +FMTNEWPAGEAFTER FMTHEADINGKEEP FMTKEEP FMTBASETOBASE FMTREVISED FMTCOLUMN) \TEXTMARK (PAGE OFFSET) +\MAIKO.FAULTINIT (PAGE#) \BSPINIT (DEVICENAME RESETABLE RANDOMACCESSP PAGEMAPPED FDBINABLE FDBOUTABLE +BUFFERED CLOSEFILE DELETEFILE GETFILEINFO OPENFILE READPAGES SETFILEINFO GENERATEFILES TRUNCATEFILE +WRITEPAGES GETFILENAME REOPENFILE EVENTFN DIRECTORYNAMEP HOSTNAMEP BIN BOUT READP EOFP PEEKBIN +GETFILEPTR SETFILEPTR BACKFILEPTR BLOCKIN BLOCKOUT GETNEXTBUFFER FORCEOUTPUT LASTC GETEOFPTR) +TEDIT.FIND (THACTION THAUXINFO \INSERTPCVALID) FB.DELVERCOMMAND (TITLE ITEMS CENTERFLG) +\TEDIT.INTEGER.IMAGEBOX (XKERN YDESC YSIZE XSIZE) SNAPW (SCREEN REGION) \UFSTruncateFile (EPAGE +EOFFSET VALIDATION) WXOFFSET (LEFT) \3MB.CREATENDB (NDBPUPHOST# NDBPUPNET# NDBNSNET# NETTYPE +NDBPUPTYPE NDBTRANSMITTER NDBENCAPSULATOR NDBBROADCASTP NDBETHERFLUSHER NDBWATCHER) \COPYSEL (Y0 X0 DX + CH# XLIM CHLIM DCH L1 LN YLIM POINT SET \TEXTOBJ SELKIND HOW HOWHEIGHT HASCARET SELOBJ ONFLG) +SET-PROFILE-INTERACTIVELY (TITLE ITEMS CENTERFLG) WYOFFSET (BOTTOM) TTY.PROCESS (PROCOLDTTYPROC +PROCTYPEAHEAD INTERRUPTLIST) \FM.EDIT-PREPARETOEDIT (FM.SELECTEDFN) \D01.FAULTINIT (HINUM LONUM +NSHost0 NSHost1 NSHost2) SCALE/GRAPH (GRAPHNODES NODEPOSITION XCOORD YCOORD NODEWIDTH NODEHEIGHT +NODEFONT TONODES NODEBORDER) \PFTransferFilePage (fileID attributesInAllPages filePage) DMCHAT.NEWLINE + (XPOS AUTOLF EATLF EATCRLF) \10MB.TURNONETHER (NDBCSB DLFIRSTOCB DLFIRSTICB DLOUTPUTMASK DLINPUTMASK +DLMISSEDPACKETS DLLASTICB DLLASTOCB) SEDIT:RESET-COMMANDS (SEDIT::COMMAND-TABLE SEDIT::HELP-MENU) +OPT.JUMPTHRU (TAG OPNAME) \FM.EDITSTART-SELECTEDFN (FM.SELECTEDFN) \BSP.HANDLE.INTERRUPT ( +RCVINTERRUPTID INTERRUPTIN) \LFRenameFile (DIRINFO FULLFILENAME fileName TimeWrite) FB.ANALYZE.PATTERN + (PATTERNPARSED? DIRECTORYSTART NAMESTART) \ADVANCE.ARRAY.SEGMENTS (PAGE#) SEDIT::REPLACE-ROOT ( +SEDIT::FIRST-LINE SEDIT::LINEAR-THREAD SEDIT::SUPER-NODE SEDIT::SUB-NODE-INDEX SEDIT::POINT-NODE +SEDIT::POINT-INDEX SEDIT::POINT-TYPE) ONEDINSPECT.SELECTITEM (ELTWIDTH ELTLEFT ELTBOTTOM PROP) +\LITATOM.EATCHARS (PNAMELENGTH) \MEDW.SHRINKW (XCOORD YCOORD) \UFSCloseFile (FILEID CDATE) +OPENPOSTSCRIPTSTREAM (IMAGEDATA IMAGEOPS OUTCHARFN POSTSCRIPTSCALE POSTSCRIPTPAGEREGION +POSTSCRIPTCLIPPINGREGION POSTSCRIPTLEFTMARGIN POSTSCRIPTBOTTOMMARGIN POSTSCRIPTTOPMARGIN +POSTSCRIPTRIGHTMARGIN POSTSCRIPTHEADING POSTSCRIPTHEADINGFONT NAME EOL) \LEAF.REPAIR.BROKEN.PUP ( +HANDLE LEAFSTATUS) SPY.MAKEGRAPHNODES (NODEID NODELABEL TONODES NODEBORDER NODEFONT) SPY.LEGEND ( +NODEID NODELABEL TONODES NODEFONT NODEBORDER NODELABELSHADE) SEDIT::COPY-STRUCTURE-QUOTE (CL:STRUCTURE +) \TEDIT.HCPYFMTSPEC (1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD FMTBASETOBASE QUAD +TABSPEC FMTSPECIALX FMTSPECIALY) TEDIT.SETFUNCTION (READMACRODEFS MACROTYPE MACROFN) +DBG::DEBUGGER-BUTTON-EVENT (ITEMS WHENHELDFN) DINFO.SETUP.WINDOW (WINDOW) TEDIT.SETSEL (ONFLG CH# +CHLIM DCH POINT SELOBJ \TEXTOBJ BLUEPENDINGDELETE SET CARETLOOKS) \SEQUIN.FLUSH.RETRANSMIT ( +SEQRETRANSMITNEXT) \SMASHMENUIMAGEONRESET (IMAGE) \FILEMAP-HASHOVERFLOW (FMRECENT?) EXTENDREGIONRIGHT +(WIDTH) MSSETSETTYPE (DEFAULTTYPE) \TEDIT.NSCHAR.RUN (\INSERTPCVALID PFILE PFPOS PFATP PSTR PLEN +TEXTLEN) \NSFILING.HOSTNAMEP (DEVICENAME REMOTEP SUBDIRECTORIES OPENFILE REOPENFILE CLOSEFILE +GETFILEINFO SETFILEINFO GETEOFPTR DELETEFILE HOSTNAMEP GETFILENAME DIRECTORYNAMEP GENERATEFILES +RENAMEFILE EVENTFN OPENP REGISTERFILE UNREGISTERFILE BREAKCONNECTION DEVICEINFO NSFILESERVER +NSFILINGLOCK NSFILINGNAME NSCONNECTIONS) \DSKDISPLAY.RESHAPEFN (XCOORD YCOORD) COMP.EXPR (EXTCALL) +TEDIT.BUILD.PCTB (TXTFILE TXTPAGEFRAMES EOLCONVENTION PLOOKS PPARALOOKS PFILE PFPOS PLEN PREVPIECE +PPARALAST PCTB TXTCHARLOOKSLIST TXTPARALOOKSLIST FORMATTEDP NEXTPIECE) \LFTruncateFile (EPAGE EOFFSET) + \CHAIN.UP.RPT (NEXTRP LOCKED UNAVAILABLE) FB.CHECK.NAME.LENGTH (OVERFLOWWIDTHS) TB.ITEM.UPDATABLE? ( +TBUPDATEFROMHERE) SEDIT::REPLACE-NODE (SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END +SEDIT::SELECT-TYPE SEDIT::PENDING-DELETE?) \SETFATSYNCODE (NSCHARHASH) PTPLUS (XCOORD YCOORD) +PACKAGE-ENABLE (REPACKAGE) TRACKW (XCOORD YCOORD) \DSPTOPMARGIN.PRESS (PRTOP) \SHOW.ARRAY.FREELISTS ( +SAFITEMS SAFCELLS) OPT.XVARSCAN1 (NOXVAR) \VFMDelete2 (key volumePage used) \DEVICEFILE.EOSERROR ( +BUFFS FILEPAGE# BUFFERNEXT SYSNEXT CBUFSIZE EOFFSET COFFSET CBUFPTR) SHOW.PRESS (PRFONT STARTCHARBYTE) + \FM.CREATEITEM (FM.TYPE FM.LABEL FM.ID FM.GROUPID FM.INITSTATE FM.FONT FM.BITMAP FM.HIGHLIGHT +FM.REGION FM.MAXREGION FM.MESSAGE FM.LINKS FM.DOWNFN FM.HELDFN FM.MOVEDFN FM.SELECTEDFN) +\BSP.HANDLE.INTERRUPTREPLY (XMITINTERRUPTID INTERRUPTOUT) TERM.LEFT (XPOS) MSDOES (REP OTHERSET MSVERB + TENSE) \TEDIT.FORMATTABS (PTNEWTX PTOLDTAB PTTYPE PTTABX PTWBASE PTOLDTX) \FM.EDITSTART-SETUP ( +FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN) \NSFILING.ERRORHANDLER (SPPERRORHANDLER F1 F2 +F3 F4 F5 FW6 FW7 SPPSUBSTREAM CBUFPTR CBUFSIZE COFFSET) \BSP.HANDLE.ERROR (MAXPUPALLOC PUPALLOCCOUNT) +MB.THREESTATE.WHENOPERATEDFN (SET ONFLG) \VFMFreeVPage (filePage volumePage nextFilePage) +SEDIT::RELINEARIZE-WHERE-NECESSARY (SEDIT::CHANGED?) \MAKE.COURIER.REP.STREAM (DEVICE BLOCKIN BLOCKOUT + ACCESSBITS STRMBINFN STRMBOUTFN ENDOFSTREAMOP CRWORDLIST) CHANGEBACKGROUNDBORDER (DLDISPBORDER) +NESTED.SUBMENU (ITEMS MENUOFFSET XCOORD YCOORD CHANGEOFFSETFLG CENTERFLG MENUFONT MENUBORDERSIZE +MENUOUTLINESIZE WHENHELDFN WHENUNHELDFN SUBITEMFN) DBG::NEAR-BY-REGION (LEFT BOTTOM WIDTH HEIGHT) +\QUEUE.INPUT.IOCB (DLFOROUTPUTUSE DLNEXTIOCB DLRETRANSMISSIONMASK DLIOCBSTATUS DLIOCBLENGTH +DLIOCBBUFFER DLFIRSTICB DLLASTICB D0NEXTIOCB D0RETRANSMISSIONMASK D0IOCBSTATUS D0IOCBLENGTH +D0IOCBBUFFER D0FIRSTICB D0LASTICB) UNMAKEHARDCOPYSTREAM (IMAGEOPS STRMBOUTFN OUTCHARFN) FB.DELETE.FILE + (DELETEDFILES DELETEDPAGES) \RESHOWBORDER1 (SAVE WBORDER REG LEFT BOTTOM WIDTH HEIGHT) RENUMBER.LINES + (ROW) \INITIALIZESWAPDISK (ALTODSKOBJ ddPOINTER DSKPARTITION DISKDEVICENAME) \MEDW.RELMOVEW (XCOORD +YCOORD) \DOFORMATTING.HARDCOPY (LTRUEDESCENT LTRUEASCENT TLSPACEFACTOR LHEIGHT DESCENT ASCENT +LEFTMARGIN LXLIM) PSCFONT.READFONT (FID IL-FONTID FIRSTCHAR LASTCHAR ASCENT DESCENT WIDTHS) +EXPANDING-PAGEFULLFN (HEIGHT BOTTOM) CROPMARK.IMAGEBOXFN (XSIZE YSIZE YDESC XKERN) \DECPARENCOUNT ( +INSTRINGP LPARCOUNT FW6 LBRKCOUNT FW7) \EXTENDISFMAP (ISFONEPAGE ISFONEDA ISFLAST) +ACCEPT-UNIX-SOCKET-STREAM (ACCESS DEVICE EOLCONVENTION OPENFILELST) SEDIT::COPY-STRUCTURE-LIST ( +CL:STRUCTURE) DEFAULT.INSPECTW.VALUECOMMANDFN (ITEMS) MSKNOWN (KNOWN) SEDIT::COPY-STRUCTURE-STRING ( +CL:STRUCTURE SEDIT::ATOM-CHARS STRING SEDIT::FONT SEDIT::PRIN-2?) \INTERPRETER1 (%#FRAMENAME NTSIZE +NLOCALS NAMETABLE) SEDIT::COLLECT-UNDO-BLOCK (SEDIT::UNDO-LIST) \BSP.TIMERFN (EPREQUEUE ACKREQUESTED +ADATACOUNT) \INITBFS (SHORTCB ddPOINTER ALTODSKOBJ NDISKS NTRACKS NHEADS NSECTORS RETRYCOUNT DDDIRTY +DDVALID DISKVERSION RETURNONCHECKERROR) TEDIT.PAGEFORMAT (TXTPAGEFRAMES \DIRTY) \SMASHLINK (ALINK +CLINK SLOWP) SEDIT::RECOMPUTE-WIDTH (SEDIT::ACTUAL-WIDTH) OPT.XVARSCAN (NOXVAR) \DSPTRANSFORMREGION ( +LEFT BOTTOM WIDTH HEIGHT) \FILLBUFFER (PEEKEDCHAR PEEKEDECHOFLG LINEBUFSTATE LBRKCOUNT INSTRINGP +LPARCOUNT) \TELERAIDSERVER (HIBYTE LOBYTE PUPLENGTH PUPTYPE) \STARTDISPLAY (LEFT BOTTOM WIDTH HEIGHT +SCDESTINATION SCWIDTH SCHEIGHT) \MEDW.MOVEW (XCOORD YCOORD LEFT BOTTOM WIDTH HEIGHT REG) +\OFFSETCLIPPINGREGION (LEFT BOTTOM WIDTH HEIGHT) \FM.DISPLAY-SETUP (FM.MESSAGE) FB.HANDLE.ABORT.BUTTON + (ABORTING) UPDATE/SCROLL/REG (VERTSCROLLWINDOW HORIZSCROLLWINDOW VERTSCROLLREG LEFT BOTTOM WIDTH +HEIGHT HORIZSCROLLREG) \SPP.SYSPKT (SPPSYSPKT CC SEQNO) SEDIT::COMPUTE-POINT-POSITION-LIST (SEDIT::POINT-X + SEDIT::POINT-LINE) \TEDIT.GET.INSERT.CHARLOOKS (CLPROTECTED CLSELHERE) \TEDIT.READTABLE ( +READMACRODEFS) \SETTERMSYNTAX (TERMCLASS) DSPBACKUP (DDYPOSITION) MB.BUTTONEVENTINFN (SELKIND) +\CreateScreenBitMap (BITMAPBASE BITMAPWIDTH BITMAPRASTERWIDTH BITMAPHEIGHT) CREATE-UNIX-SOCKET-STREAM +(ACCESS DEVICE EOLCONVENTION OPENFILELST) VIDEOCOLOR (DLDISPCONTROL) \3MBENCAPSULATE (3MBDESTHOST +3MBSOURCEHOST 3MBLENGTH 3MBTYPE) \10MB.STARTDRIVER (NDBTQ DLFIRSTICB NDBWATCHER) +\SETUP-COMPILED-CLOSURE-CALL (USECNT IVAR FLAGS NOPUSH %#BLINK %#CLINK %#ALINK FNHEADER PC NEXTBLOCK +MiscFXP) \COPYSYNTAX (NSCHARHASH) \FILLINSPP (EPTYPE CC DSTYPE) \LEAF.USE.NEW.CONNECTION (EPLINK +LEAFSTATUS HANDLE) PACKAGE-DISABLE (REPACKAGE) PTDIFFERENCE (XCOORD YCOORD) \VFMFind (key volumePage) +FW-CLOSE-CMD (TITLE ITEMS) \VAMRecomputeFreePageCount (freePageCount lowerBound) TEDIT.PARSE.PAGEFRAMES1 (REGIONFILLMETHOD REGIONTYPE REGIONLOCALINFO REGIONSPEC REGIONSUBBOXES) -\\CHECKFORSTORAGEFULL (STORAGEFULL) GRAPHDELETENODE (GRAPHNODES) \\DEQUEUE (SYSQUEUEHEAD SYSQUEUETAIL -QLINK) \\FM.EDIT-DELETE (FM.LABEL) \\FIXLOCALNET (PUPNET# PUPHOST#) TEDIT.GET (PCTB \\DIRTY \\XDIRTY -NEXTLINE \\INSERTPCVALID TEXTLEN CH# CHLIM DCH POINT SET CARETLOOKS THACTION) SEDIT::INPUT-NORMAL-CHAR - (SEDIT::ATOM-STARTED SEDIT::ATOM-STARTED-UNDO-POINTER) SPP.DSTYPE (DSTYPE SPPDSTYPE) WXOFFSET (LEFT) -EDITDELETENODE (XCOORD YCOORD) \\REQUEUE.ETHERPACKET (EPREQUEUE) |\\LFEventFn| (REOPENFILE) -\\COMPUTE.ARC.POINTS (XCOORD YCOORD) SEDIT::PARSE--GAP (SEDIT::LINEAR-FORM SEDIT::INLINE-WIDTH -SEDIT::PREFERRED-WIDTH SEDIT::ACTUAL-WIDTH SEDIT::ACTUAL-LLENGTH) \\NSRANDOM.FETCH.CACHE (NSPTAIL) -BULKDATA.GENERATOR (BGSTREAM BGPROGRAM BGTYPE BGLASTSEGMENT? BGITEMSLEFT) |\\LFReturnNextFile| ( -CURRENTFILE RESTOFFILES) BLOCK (WAKEREASON PQNEXT PQLAST PROCFX) OPT.RETMERGE (FRAME LEVEL TAG) -DMCHAT.NEWLINE (XPOS AUTOLF EATLF EATCRLF) TEDIT.MOVE (SET \\INSERTPCVALID \\INSERTPC THTEXTOBJ -THACTION THLEN THCH# THFIRSTPIECE THAUXINFO THOLDINFO \\DIRTY \\XDIRTY TEXTLEN CH# CHLIM DCH DX POINT) - \\10MB.OUTPUT.INTERRUPT (EPTRANSMITTING EPNETWORK) CREATESCREEN (SCONOFF SCDESTINATION SCWIDTH -SCHEIGHT SCDEPTH SCTOPW SCTITLEDS CREATEWFN OPENWFN CLOSEWFN MOVEWFN RELMOVEWFN SHRINKWFN EXPANDWFN -SHAPEWFN REDISPLAYFN BURYWFN TOTOPWFN DSPCREATEFN GETWINDOWPROPFN PUTWINDOWPROPFN SETCURSORFN -WINIMAGEOPS WINFDEV BBTTOWIN BBTFROMWIN BBTWINWIN SCCARETFLASH SCGETSCREENPOSITION -SCGETBOXSCREENPOSITION SCGETSCREENREGION) TTY.PROCESS (PROCOLDTTYPROC PROCTYPEAHEAD INTERRUPTLIST) -\\INIT.POWERS.OF.TEN (EXP HI LO) \\TEXTMARK (PAGE OFFSET) MB.THREESTATEBUTTON.FN (ONFLG) -\\FTP.OPENFILE.FROM.PLIST (FULLFILENAME FTPFILEPROPS F5 ACCESS EOLCONVENTION DEVICE) -\\CLOSELEAFCONNECTION (PFSLEAFSEQUIN) \\INCPARENCOUNT (INSTRINGP LPARCOUNT FW6 LBRKCOUNT FW7) -\\INITIALIZESWAPDISK (ALTODSKOBJ |ddPOINTER| DSKPARTITION DISKDEVICENAME) -SEDIT::COMPUTE-POINT-POSITION-LITATOM (SEDIT::POINT-LINE) \\ICONW.SHOW.TITLE (ICTITLE) SEDIT::SET-PROPS - (SEDIT::COMPLETION-FN SEDIT::ROOT-CHANGED-FN SEDIT::ENVIRONMENT SEDIT::PROFILE SEDIT::EVAL-IN-PROCESS - SEDIT::EVAL-FN) SPP.OPEN (SPPSERVERFLAG SPPSERVERFN SPPTERMINATEDP SPPWHENCLOSEDFN SPPATTENTIONFN -SPPERRORHANDLER SPPEOMONFORCEOUT SPPOTHERXIPHANDLER) TEDIT.BUILD.PCTB (TXTFILE TXTPAGEFRAMES -EOLCONVENTION PLOOKS PPARALOOKS PFILE PFPOS PLEN PREVPIECE PPARALAST PCTB TXTCHARLOOKSLIST -TXTPARALOOKSLIST FORMATTEDP NEXTPIECE) \\NSFILING.EVENTFN (DEVICEINFO) \\DOFORMATTING (LTRUEDESCENT -LTRUEASCENT TLSPACEFACTOR LHEIGHT DESCENT ASCENT LEFTMARGIN LXLIM) SEDIT::PARSE (SEDIT::\\X -SEDIT::CURRENT-NODE) PACKAGE-ENABLE (REPACKAGE) |\\VAMAllocPageGroup| (|freePageCount| |lowerBound| -|nextFilePage| |volumePage|) |\\VFMCreateVPage| (|filePage| |volumePage| |nextFilePage|) -TEDIT.SETFUNCTION (READMACRODEFS MACROTYPE MACROFN) \\DEVICEFILE.EOSERROR (BUFFS FILEPAGE# BUFFERNEXT -SYSNEXT CBUFSIZE EOFFSET COFFSET CBUFPTR) SEDIT::SELECT-NODE-SEGMENT (SEDIT::SELECT-NODE -SEDIT::SELECT-START SEDIT::SELECT-END) \\FM.EDIT-WORDDELETE (FM.LABEL) SEDIT::ASSIGN-FORMAT-LIST ( -SEDIT::UNASSIGNED) \\TEDIT.MENU.INIT (MBSTRING MBLABEL MBTEXT MBCHANGESTATEFN MBBUTTONS -MBMAXITEMSPERLINE MBFONT MBBUTTONEVENTFN MBINITENTRY MBINITSTATE) \\EXTENDISFMAP (ISFONEPAGE ISFONEDA -ISFLAST) \\TEDIT.HARDCOPY.FORMATLINE (LOOKSUPDATEFN TILOOKSUPDATEFN CHARLIM CHAR1 CR\\END LHASTABS -LSTLN TLFIRSTSPACE PC PCOFF PCNO PIECE F5 1STLN LEFTMARGIN RIGHTMARGIN PTTABX LHEIGHT ASCENT DESCENT -CHARTOP LXLIM DESC LEN SPACELEFT LFMTSPEC) \\SETFATSYNCODE (NSCHARHASH) WINDOWWORLD (SCTOPW SCONOFF -PROMPTW) \\SEND.ANSWERING.RFC (CONNID EPREQUEUE) TB.DISPLAY.LINES (TBMAXXPOS WIDTH) -POSTSCRIPT.SHOWACCUM (POSTSCRIPTCHARSTOSHOW) SEDIT::CLOSE-NODE-LITATOM (SEDIT::ATOM-STARTED -SEDIT::ATOM-STARTED-UNDO-POINTER CL:STRUCTURE STRING SEDIT::OPEN-NODE) SEDIT::FIND-NODE (SEDIT::\\X) -\\LOADNSHOSTNUMBER (NSHOST0 NSHOST1 NSHOST2) \\INITBFS (SHORTCB |ddPOINTER| ALTODSKOBJ NDISKS NTRACKS -NHEADS NSECTORS RETRYCOUNT DDDIRTY DDVALID DISKVERSION RETURNONCHECKERROR) \\SEQUIN.HANDLE.INPUT ( -SEQCONTROL SEQOUTALLOC SEQSTATE MYRECEIVESEQ SEQTIMEOUT) \\DECPARENCOUNT (INSTRINGP LPARCOUNT FW6 -LBRKCOUNT FW7) \\DSPYPOSITION.HCPYMODE (DDYPOSITION DDCHARSET DDCHARSETASCENT) SELECT.LIST.INSPECTOR ( -ITEMS CENTERFLG LEFT BOTTOM) CHANGEBACKGROUNDBORDER (DLDISPBORDER) \\ADVANCE.ARRAY.SEGMENTS (PAGE#) -SEDIT::SET-OPTIONS (SEDIT::EDIT-OPTIONS) \\ETHEREVENTFN (NDBNEXT) \\BN.TO.FIXP (ELEMENTS) -GRAPHDELETELINK (TONODES FROMNODES) OPENIPSTREAM (IPPAGEREGION IPLEFT IPRIGHT IPTOP IPBOTTOM -IPSHOWSTREAM IPDOCNAME IPCLIPINCLUSIVE OUTCHARFN IMAGEOPS IPDATA IMAGEDATA IPROTATION IPYOFFSET -IPPAGEFRAME LEFT BOTTOM WIDTH HEIGHT IPHEADING) \\MAIKO.NEWFAULTINIT (PAGE#) \\NSRANDOM.READ.SEGMENT ( -NSHATTRIBUTES NSHWASREAD) \\MAIKO.DO.MOVDS (DEFPOINTER DEFCELLFLAGS AUXDEFCELLFLAGS) TEDIT.HARDCOPYFN -(EDITOPACTIVE) \\TEXTMENU.DOC.CREATE (MENUFLG EDITPROPS) SCROLL.HANDLER (VERTSCROLLWINDOW -HORIZSCROLLWINDOW) \\DSPTRANSFORMREGION (LEFT BOTTOM WIDTH HEIGHT) \\COERCEASCIITONSFONT ( -OTHERDEVICEFONTPROPS FONTFAMILY FONTDEVICESPEC) DSPBACKUP (DDYPOSITION) \\MAIKO.ASSIGNBUFFERS ( -|UserNameAddr| |UserPswdAddr| |MDSZoneLength| |MDSZone|) \\TEDIT.READTABLE (READMACRODEFS) -\\STARTDISPLAY (LEFT BOTTOM WIDTH HEIGHT SCDESTINATION SCWIDTH SCHEIGHT) \\DSPFONT.IP (IPFONT -IPSPACEWIDTH IPLINEFEED NSTRANSTABLE IPMAXVISIBLEBASELINE IPMINVISIBLEBASELINE IPCHARVISIBLEP) -DRAWMARGINSCALE (LEFT BOTTOM WIDTH HEIGHT) TWODINSPECT.SELECTROWPROP (ELTWIDTH ELTLEFT ELTBOTTOM PROP) - \\OFFSETCLIPPINGREGION (LEFT BOTTOM WIDTH HEIGHT) \\FILLBUFFER (PEEKEDCHAR F3 PEEKEDECHOFLG -LINEBUFSTATE F5 LBRKCOUNT FW7 INSTRINGP LPARCOUNT FW6) MARGINBAR (LEFT BOTTOM HEIGHT WIDTH) VIDEOCOLOR - (DLDISPCONTROL) SEDIT::QUERY-THROW-AWAY-CHANGES (ITEMS TITLE LEFT BOTTOM) SKIP/ZAP (LASTSKIP -LASTSKIPCHAR) OPENNSOCKET (ID# NSOCEVENT) SEDIT::SET-SELECTION-COMMENT-WORD (SEDIT::SELECT-NODE -SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::SELECT-TYPE) INIT/NODES/FOR/LAYOUT (NODEPOSITION NODEFONT -) TEDIT.PAGEFORMAT (TXTPAGEFRAMES \\DIRTY \\XDIRTY) FSETVAL (VALUE) \\DSPTOPMARGIN.PRESS (PRTOP) -|\\VFMInsertPageGroup| (|fileID| |filePage| |type|) MSINTERPRET (TENSE REP MSVERB OTHERSET ROOT -MODIFIER) UPDATEWFROMIMAGE (LEFT BOTTOM WIDTH HEIGHT) \\SPP.SENDPKT (ACKNO ALLOCNO SPPINPUTBLOCKED -SPPACKREQUESTED SPPACKREQTIME SPPACKREQTIMEOUT SPPACKPENDING SPPRETRANSMITTIMER) \\DOCOMPRESSVMEM ( -|NActivePages|) \\SPP.CREATE.STREAM (DEVICE ACCESS) SHOW.PRESS (PRFONT STARTCHARBYTE) \\SETTERMSYNTAX -(TERMCLASS) \\SHOW.ARRAY.FREELISTS (SAFITEMS SAFCELLS) |\\CreateScreenBitMap| (BITMAPBASE BITMAPWIDTH -BITMAPRASTERWIDTH BITMAPHEIGHT) \\FLUSHNSOCQUEUE (INQUEUELENGTH) MAKE-UNICODE-FORMATS (EOLVALID EOL -INCCODEFN PEEKCCODEFN BACKCHARFN FILEOUTCHARFN) CHAT.TYPEOUT (TERM.STATE) POSTSCRIPT.CLOSESTRING ( -POSTSCRIPTCHARSTOSHOW) |\\LFFindNextFile| (CHARLIST VERSION FULLNAME NAME INFO) OPT.JFIXPASS (JU) -TERM.LEFT (XPOS) DIRFILENAME (LITERALNAME) \\INITBCPLDISPLAY (DEVICE BOUT ACCESS LINELENGTH -USERCLOSEABLE USERVISIBLE OUTCHARFN) TB.REPLACE.ITEMS (TI# TBTAILHINT TBITEMS TB#ITEMS TB#DELETED -TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM) \\SEQUIN.RETRANSMIT (SEQRETRANSMITNEXT SYSQUEUEHEAD -SYSQUEUETAIL SEQRETRANSMITTING) \\NSFILING.CLOSEFILE (NSHDATUM NSHNAME) SPP.SENDEOM (ENDOFMESSAGE) -TITLEDICONW (ICIMAGE ICFONT ICJUST ICREGION ICBREAKCHARS ICOPERATION) CONTINUEDIT (FILECHANGES -FILEDATES FILEDATE DATEFILENAME) \\GETBRUSHBBT (PBTDESTBPL PBTSOURCEBPL PBTFLAGS PBTDISJOINT -PBTOPERATION PBTSOURCETYPE) LATTICE/BREAK/CYCLES (NODEPOSITION) \\TEDIT.GET.INSERT.CHARLOOKS ( -CLPROTECTED CLSELHERE) HARDCOPYGRAPH (XCOORD YCOORD) \\NSFILING.LOGIN (FSADDRESS FSPARSEDNAME -FSNAMESTRING FSPROCESSNAME FSCOURIERSTREAMS FSSESSIONHANDLE FSPROTOCOLNAME FSDEVICENAME FSPROTOCOLDEF -FSSESSIONLOCK FSSESSIONTIMER FSLOGINNAME NSCONNECTIONS NSRANDOMDEVICE DEVICENAME OPENFILE REOPENFILE -CLOSEFILE GETFILEINFO SETFILEINFO REGISTERFILE UNREGISTERFILE READPAGES WRITEPAGES TRUNCATEFILE -DEVICEINFO REMOTEP SUBDIRECTORIES SETEOFPTR) \\NSFILING.LOOKUP.CACHE (FSCACHEDHANDLES) -\\MEDW.GETSCREENREGION (XCOORD YCOORD SCREEN LEFT BOTTOM WIDTH HEIGHT) \\INTERPRETER1 (\#FRAMENAME -NTSIZE NLOCALS NAMETABLE FAST NAMETABLE# VALIDNAMETABLE) \\DSCCOUT (CHARPOSITION) \\LITATOM.EATCHARS ( -PNAMELENGTH) DELETE/AND/DISPLAY/LINK (XCOORD YCOORD) \\DSKDISPLAY.BUTTONEVENTFN (ITEMS LEFT BOTTOM) -\\FM.EDIT-BACKUP (FM.LABEL) \\SMASHLINK (ALINK \#BLINK \#CLINK \#ALINK CLINK SLOWP) -SEDIT::FINALIZE-MOUSE-SELECTION (SEDIT::SELECTION-DISPLAYED? SEDIT::LAST-MOUSE-X SEDIT::LAST-MOUSE-Y -SEDIT::LAST-MOUSE-TYPE) MAKEISOFORMAT (INCCODEFN PEEKCCODEFN BACKCHARFN FILEOUTCHARFN) -|\\LFParseFileName| (VOL NAME VERSION) CONTROL (CONTROLFLG) \\ETHERINIT (DEVICENAME EVENTFN -DIRECTORYNAMEP HOSTNAMEP) \\TRANSMIT.STRATEGY (ACKREQUESTED ADATACOUNT PUPTYPE) -\\NSFILING.DISCARD.SESSION (NSCONNECTIONS FSCOURIERSTREAMS FSSESSIONHANDLE) OPT.JLENPASS (JMIN JU JML) - OPT.RETPOP (LEVEL) TTMAKECOMPLEXCHAR (CPXREALCHAR CPXWIDTH CPXNCHARS CPXPRINTCHARS) COPYTERMTABLE ( -TERMSA) \\DSPSPACEFACTOR.PRESS (PRSPACEFACTOR) PROCESSWORLD (PROCFX PQNEXT PQLAST PROCNEVERSTARTED -PROCFINISHED PROCDELETED PROCTIMERLINK NEXTPROCHANDLE) |\\PFPutRootDirectoryType| ( -|volumeRootDirectory|) \\SEQUIN.FLUSH.CONNECTION (SEQSTATE SEQSOCKET SEQPROCESS SEQCLOSEME) -\\FTP.NEXTFILE (FTPGENCONNECTION FTPGENPLIST) BMOBJ.CREATE.MENU (TITLE ITEMS CENTERFLG CHANGEOFFSETFLG - MENUOFFSET XCOORD YCOORD LEFT BOTTOM) \\LEAF.GETFILEDATES (LEAFINFO F4) PACKAGE-DISABLE (REPACKAGE) -TEDIT.SHOWSEL (\\TEXTOBJ) \\RUN.PROCESS (PQNEXT PQLAST NEXTPROCHANDLE PROCSTATUS WAKEREASON) -\\NSRANDOM.RELEASE.HANDLE (NSFILING.HANDLE F4 NSFILING.CONNECTION F3 NSHBUSYCOUNT) LOOKUP.NS.SERVER ( -NSSOCKET) NORMSECT (X P LX RX) \\NSFILING.UPDATE.ATTRIBUTES (NSHATTRIBUTES) DRIBBLE (USERCLOSEABLE -USERVISIBLE) \\START.PROCESSES (PROCFX) \\DSPRIGHTMARGIN.HCPYMODE (DDMICARIGHTMARGIN) -\\ENTITYSTART.PRESS (PRSPACEWIDTH PRFONT DLSTARTBYTE ELSTARTBYTE STARTCHARBYTE) POSTSCRIPT.INIT ( -OTHERFDS IMAGETYPE IMCLOSEFN IMXPOSITION IMYPOSITION IMMOVETO IMFONT IMLEFTMARGIN IMRIGHTMARGIN +\DSPSPACEFACTOR.PRESS (PRSPACEFACTOR) \NSFILING.WHENCLOSED (FSCOURIERSTREAMS) CONTROL (CONTROLFLG) +\INITBCPLDISPLAY (DEVICE BOUT ACCESS LINELENGTH USERCLOSEABLE USERVISIBLE OUTCHARFN) +\MAIKO.NEWFAULTINIT (PAGE#) COPYTERMTABLE (TERMSA) \DSCCOUT (CHARPOSITION) \MAIKO.DO.MOVDS (DEFPOINTER + DEFCELLFLAGS AUXDEFCELLFLAGS) \DSPFONT.IP (IPFONT IPSPACEWIDTH IPLINEFEED NSTRANSTABLE +IPMAXVISIBLEBASELINE IPMINVISIBLEBASELINE IPCHARVISIBLEP) \TEDIT.WINDOW.SETUP (PROMPTWINDOW) +\PROMPTWINDOW.SET.HEIGHT (XCOORD YCOORD) \MAKEFREEBLOCK (SIZE FLAGWORD) \CREATEDISPLAY (DEVICENAME +RESETABLE RANDOMACCESSP PAGEMAPPED CLOSEFILE DELETEFILE GETFILEINFO OPENFILE READPAGES SETFILEINFO +GENERATEFILES TRUNCATEFILE WRITEPAGES GETFILENAME REOPENFILE EVENTFN DIRECTORYNAMEP HOSTNAMEP BIN BOUT + PEEKBIN BACKFILEPTR BLOCKIN BLOCKOUT DEVICEINFO ONOFF) \NSRANDOM.HANDLE.ERROR (NSFILING.CONNECTION) +DELETECONTROL (DELCHARECHO LINEDELETE 1STCHDEL NTHCHDEL POSTCHDEL EMPTYCHDEL) \MAIKO.ASSIGNBUFFERS ( +UserNameAddr UserPswdAddr MDSZoneLength MDSZone) \NSFILING.GET.STREAM (FSCOURIERSTREAMS) +NESTED.SUBMENU.POS (XCOORD YCOORD) \SHAPEW2 (REG SAVE) EXTENDREGIONLEFT (LEFT WIDTH) \MEDW.CLOSEW ( +SCTOPW NEXTW) \NSFILING.DELETEFILE (FSCACHEDHANDLES) EDITDELETENODE (XCOORD YCOORD) +\CREATE.TWODINSPECTOR.INSPECTMENU (ITEMS) SEDIT::CFV-QUOTE (SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH +) \SETUP-ENVIRONMENT-CALL (NEXTBLOCK IVAR NOPUSH %#BLINK %#CLINK %#ALINK FNHEADER PC MiscFXP) +PFI.HANDLE.DEFDEFINER (NAME PATTERNS TESTFN) OPT.SCANOPT (OPNAME OPARG) \M-VMEMSAVE (MISCSTACKRESULT +Key CurrentFXP) DISPLAYSTREAMINIT (LEFT BOTTOM WIDTH HEIGHT) \LFExtendFile (filePage volumePage +nextFilePage) \ENTITYSTART.PRESS (PRSPACEWIDTH PRFONT DLSTARTBYTE ELSTARTBYTE STARTCHARBYTE) +\DOCOMPRESSVMEM (NActivePages) DMCHAT.CLEAR (ROLLMODE) \10MB.INPUT.INTERRUPT (10MBLENGTH EPRECEIVING +EPNETWORK) MAKEHARDCOPYSTREAM (IMAGEOPS STRMBOUTFN OUTCHARFN) TEDIT.INSERT.OBJECT (\INSERTFIRSTCH PSTR + PFILE POBJ PLEN PPARALOOKS PLOOKS THACTION THCH# THLEN THFIRSTPIECE TEXTLEN \INSERTPCVALID \DIRTY +DESC SELKIND DCH DX CHLIM CH# POINT) \START.PROCESSES (PROCFX) \DOFORMATTING (LTRUEDESCENT LTRUEASCENT + TLSPACEFACTOR LHEIGHT DESCENT ASCENT LEFTMARGIN LXLIM) \VFMDeletePageGroup (fileID filePage type +volumePage nextFilePage) BSP.PUTINTERRUPT (INTERRUPTOUT) DELETELINE (NEXTLINE END START) DRIBBLE ( +USERCLOSEABLE USERVISIBLE) RESETGRID.NEW (LEFT BOTTOM) PROCESSWORLD (PROCFX PQNEXT PQLAST +PROCNEVERSTARTED PROCFINISHED PROCDELETED PROCTIMERLINK NEXTPROCHANDLE) INSURE.BRUSH (BRUSHSHAPE +BRUSHSIZE BRUSHCOLOR) SEDIT::PROPAGATE-WIDTH-CHANGE (WIDTH SEDIT::ACTUAL-WIDTH) \SETUP.DEFAULT.LINEBUF + (READP EOFP PEEKBIN FULLFILENAME LINEBUFSTATE USERCLOSEABLE USERVISIBLE ENDOFSTREAMOP) +\COERCEASCIITONSFONT (OTHERDEVICEFONTPROPS FONTFAMILY FONTDEVICESPEC) ADD.PROCESS (PROCTIMERSET +WAKEREASON PROCFORM RESTARTABLE PROCPRIORITY PROCSTATUS PROCSYSTEMP PROCAFTEREXIT PROCBEFOREEXIT +PROCTTYENTRYFN PROCTTYEXITFN PROCWINDOW PROCINFOHOOK PROCUSERDATA PROCRESTARTFORM PROCQUEUE +PROCNEVERSTARTED) \MEDW.OPENW (NEXTW SCTOPW PBTDESTBPL) \FM.PUSHGROUP (BOTTOM LEFT) +\CREATE.TWODINSPECTOR.SETMENU (ITEMS) TEDIT.HARDCOPYFN (EDITOPACTIVE) \3MBGETPACKET (EPNETWORK EPTYPE) + SEDIT::CFV-LIST (SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH) \CARET.CREATE (CURSOR) NEWPAGE.IP ( +IPFONT IPPAGEFONTS IPNEXTFRAMEVAR IPPAGENUM) \ICONW.SHOW.TITLE (ICTITLE) CREATE.EVENT (EVENTNAME) +FW-CHANGE-POSITION (XCOORD YCOORD) \FILLRTPPUP (PUPLENGTH TYPEWORD PUPID) \TEDIT.MENU.INIT (MBSTRING +MBLABEL MBTEXT MBCHANGESTATEFN MBBUTTONS MBMAXITEMSPERLINE MBFONT MBBUTTONEVENTFN MBINITENTRY +MBINITSTATE) \DSPRIGHTMARGIN.PRESS (PRRIGHT) \RELEASE.PROCESS (PROCFX PROCOLDTTYPROC PROCDELETED +PROCSTATUS PROCFORM PROCRESTARTFORM PROCQUEUE PROCWINDOW PROCTIMERSET NEXTPROCHANDLE) +\FTP.OPENFILE.FROM.PLIST (FULLFILENAME FTPFILEPROPS ACCESS EOLCONVENTION DEVICE) \ADDLEAFSTRING ( +LEAFLENGTH) DINFO.OPENTEXTSTREAM (LAST.TEXT) \DSPLINEFEED.PRESS (PRLINEFEED) CHAT.SET.EMULATOR ( +TERM.STATE TYPEOUTPROC) MB.THREESTATEBUTTON.FN (ONFLG) \FILLBSPPUP (PUPLENGTH TYPEWORD PUPID EPREQUEUE +) ECHOCHAR (CCECHO) \LFSetFileInfo (TYPE TimeCreate) SEDIT::INPUT-NORMAL-CHAR (SEDIT::ATOM-STARTED +SEDIT::ATOM-STARTED-UNDO-POINTER) SEDIT::PARSE-NEW (SEDIT::CURRENT-NODE SEDIT::\X) OPT.SETUPOPT (PREV +NXT) SETMAINTPANEL (DLMAINTPANEL) MARGINBAR (LEFT BOTTOM HEIGHT WIDTH) SHAPEW1 (REG SAVE LEFT BOTTOM +WIDTH HEIGHT) SEDIT::UNDO-COMMENT-CHANGE (CL:STRUCTURE SEDIT::SUPER-NODE SEDIT::SUB-NODE-INDEX) +\RUN.PROCESS (PQNEXT PQLAST NEXTPROCHANDLE PROCSTATUS WAKEREASON) \TFBRAVO.INIT.CHARLOOKS (CLSIZE +CLNAME CLOFFSET) \HDCPYDSPPRINTCHAR (CHARPOSITION) BULKDATA.GENERATE.NEXT (BGITEMSLEFT BGLASTSEGMENT?) + GETXIP (INQUEUELENGTH) TTNEXTPOS (ROWPOS COLPOS) \CREATELINEBUFFER (LINEBUFSTATE KEYBOARDSTREAM +USERCLOSEABLE USERVISIBLE ENDOFSTREAMOP EOLCONVENTION DEVICE EOFP) DMCHAT.RIGHT (XPOS) +\SEQUIN.RETRANSMITNEXT (EPREQUEUE RECEIVESEQ ALLOCATE SEQRETRANSMITNEXT SEQRETRANSMITTING +%#SEQRETRANSMITS) SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::POINT-NODE SEDIT::POINT-TYPE) +\TEXTMENU.DOC.CREATE (MENUFLG EDITPROPS) \DL.NEWFAULTINIT (PAGE# DLDISPCONTROL VP FILEPAGE EMPTY +UNAVAILABLE) \NEXTCONSPAGE (PAGE# DTDNEXTPAGE) SEDIT::COMPUTE-SELECTION-POSITION-LITATOM ( +SEDIT::SELECT-START-LINE SEDIT::SELECT-END-LINE) SEDIT::BUILD-PRELINEARIZED-NODE (SEDIT::CURRENT-NODE +SEDIT::\X) ECHOMODE (ECHOFLG) \LFWritePages (REVALIDATEFLG) SEDIT::CONS-ATOM (SEDIT::ATOM-CHARS) +DRAWMARGINSCALE (LEFT BOTTOM WIDTH HEIGHT) FW-RECALL-CMD (TITLE CENTERFLG ITEMS OFDSTATUS) +\MOUSE.PROCESS (PROCSYSTEMP PROCTYPEAHEAD) \PROMPTWINDOW.EXPAND (HEIGHT) ICMLARRAY.MENUW.APPLY (XCOORD + YCOORD) \NOTE.3TO10 (NDBTRANSLATIONS) TEDIT.GET (PCTB \DIRTY NEXTLINE \INSERTPCVALID TEXTLEN CH# +CHLIM DCH POINT SET CARETLOOKS THACTION) PUTMENUPROP (MENUUSERDATA) \SETSPACE.PRESS (PRSPACEWIDTH) +\MAIKO.CONS.UFN (CAR CDR NEXTCELL CNT FULLCARFIELD CDRCODE) CHAT.HOLD (HELD) \DEQUEUE (SYSQUEUEHEAD +SYSQUEUETAIL QLINK) \MEDW.CREATEW (REG SAVE WTITLE WBORDER NEXTW SCREEN DSP XWINDOWHINT LEFT BOTTOM +WIDTH HEIGHT) RELSTK (EDFXP) RAISE (RAISEFLG) SETXY.PRESS (PRXPOS PRYPOS) SEDIT::BACKSPACE-LIST ( +SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::POINT-TYPE) CHAT.MENU (HELD ITEMS LOCALECHO RUNNING?) +GRAPHDELETELINK (TONODES FROMNODES) SEDIT::COMPUTE-POINT-POSITION-LITATOM (SEDIT::POINT-LINE) +TEDIT.DELETELINE (NEXTLINE PREVLINE) \CLOSELEAFCONNECTION (PFSLEAFSEQUIN) RESETTERMTABLE (RAISEFLG +DELCHARECHO LINEDELETE 1STCHDEL NTHCHDEL POSTCHDEL EMPTYCHDEL CONTROLFLG ECHOFLG) \LFOpenFile (EPAGE +EOFFSET NONDEFAULTDATEFLG VALIDATION) \FM.LAYOUTGRID (LEFT BOTTOM WIDTH HEIGHT) SEDIT::PARSE--GAP ( +SEDIT::LINEAR-FORM SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH SEDIT::ACTUAL-WIDTH SEDIT::ACTUAL-LLENGTH +) COMP.UNBIND.VARS (PRIMARYRETURN) COMP.LABELS (OPNAME) SENDXIP (EPTYPE XIPTCONTROL) \TEDIT.BASICFIND +(\INSERTPCVALID) TWOD.TRACKCURSOR (ELTWIDTH ELTLEFT ELTBOTTOM ROWPROP COLUMNPROP) +\10MB.OUTPUT.INTERRUPT (EPTRANSMITTING EPNETWORK) \SETFVARSLOT (BINDINGPTR) \INITBIGNUMS (ELEMENTS) +GRAPHDELETENODE (GRAPHNODES) \REQUEUE.ETHERPACKET (EPREQUEUE) \UFS.NEXTFILEFN (SUBGENERATORS THISFILE +FILEID CURRENT-DEPTH MAX-DEPTH) \SETTYPEMASK (DTDTYPEENTRY) FB.AFTERCLOSEFN (TABLEBROWSER) +\ORIGTERMTABLE (TERMSA NSCHARHASH DELCHARECHO ECHOFLG LINEDELETE 1STCHDEL NTHCHDEL POSTCHDEL +EMPTYCHDEL) TB.DISPLAY.LINES (TBMAXXPOS WIDTH) DINFO.FMW.CLOSEFN (FMENU.WINDOW) +\TFBRAVO.WRITE.PARAGRAPH (FMTPARATYPE) \PROG0 (%#FRAMENAME NTSIZE NAMETABLE) SEDIT::SET-PROPS ( +SEDIT::COMPLETION-FN SEDIT::ROOT-CHANGED-FN SEDIT::ENVIRONMENT SEDIT::PROFILE SEDIT::EVAL-IN-PROCESS +SEDIT::EVAL-FN) ICMLARRAY.MENUW.GETLEVEL (ITEMS) \VAMFreePageGroup (freePageCount lowerBound) +DINFO.READ.GRAPH (TOPNODEID TEXTPROPS LOOKUPFN MENUFN FREEMENUITEMS NODELST USERDATA NAME DEFAULTHOST +DEFAULTDEVICE DEFAULTDIR) \FIXLOCALNET (PUPNET# PUPHOST#) \INITCONSPAGE (NEXTCELL FULLCARFIELD +NEXTFREE CNT NEXTPAGE) \INSPECT/CODE/RESHAPEFN (XCOORD YCOORD LEFT BOTTOM WIDTH HEIGHT) +\CREATE.TWODINSPECTOR.TITLEMENU (ITEMS) TEDIT.SHOWSEL (\TEXTOBJ) EXTENDREGIONBOTTOM (BOTTOM HEIGHT) +\ALLOCMDSPAGE (PAGE#) \NSFILING.EVENTFN (DEVICEINFO) \NSRANDOM.FETCH.CACHE (NSPTAIL) +TEDIT.MINIMAL.WINDOW.SETUP (TCCARETDS SELWINDOW \WINDOW DISPLAYCACHE DISPLAYCACHEDS LEFT BOTTOM WIDTH +HEIGHT WTOP WRIGHT WBOTTOM WLEFT LINES) DELETE/AND/DISPLAY/LINK (XCOORD YCOORD) BMOBJ.CREATE.MENU ( +TITLE ITEMS CENTERFLG CHANGEOFFSETFLG MENUOFFSET XCOORD YCOORD) SEDIT::SELECT-NODE-SEGMENT ( +SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END) \PEEKREFILL (PEEKEDCHAR PEEKEDECHOFLG) +\DSPLEFTMARGIN.PRESS (PRLEFT) \FIXLINELENGTH.PRESS (LINELENGTH) \GET.PRIORITY.QUEUE (PQPRIORITY +PQHIGHER PQLOWER) FORWARD.DELETE.TO (END LASTCOL START) \SPP.SENDPKT (ACKNO ALLOCNO SPPINPUTBLOCKED +SPPACKREQUESTED SPPACKREQTIME SPPACKREQTIMEOUT SPPACKPENDING SPPRETRANSMITTIMER) DISPLAYGRAPH (XCOORD +YCOORD) \SET.PROCESS.NAME (PROCNAME) VKBD.FIX.FONT (KEYBOARDDISPLAYFONT) \EVALA (%#FRAMENAME NTSIZE +NAMETABLE) BULKDATA.GENERATOR (BGSTREAM BGPROGRAM BGTYPE BGLASTSEGMENT? BGITEMSLEFT) CHECKCONSPAGES ( +PAGE#) LATTICE/BREAK/CYCLES (NODEPOSITION) SPP.OPEN (SPPSERVERFLAG SPPSERVERFN SPPTERMINATEDP +SPPWHENCLOSEDFN SPPATTENTIONFN SPPERRORHANDLER SPPEOMONFORCEOUT SPPOTHERXIPHANDLER) \DL.ASSIGNBUFFERS +(UserNameAddr UserPswdAddr MDSZoneLength MDSZone) \MAPMDS (PAGE#) HARDCOPYGRAPH (XCOORD YCOORD) +\SUBREAD (LASTCCODE) RESETREADTABLE (READMACROFLG ESCAPEFLG COMMONLISP NUMBERBASE CASEINSENSITIVE +COMMONNUMSYNTAX USESILPACKAGE HASHMACROCHAR ESCAPECHAR MULTESCAPECHAR PACKAGECHAR DISPATCHMACRODEFS +READMACRODEFS) \DL.MARK.PAGES.UNAVAILABLE (UNAVAILABLE) \CHECKCONSPAGE (PAGE#) SEDIT::SET-OPTIONS ( +SEDIT::EDIT-OPTIONS) PUTTEXTPROP (TXTREADONLY TXTEDITING TXTNONSCHARS EDITPROPS) +\TEDIT.FIND.FIRST.LINE (NEXTLINE YBOT PREVLINE) TEDIT.DEACTIVATE.WINDOW (\WINDOW EDITFINISHEDFLG) +\ETHEREVENTFN (NDBNEXT) SEDIT::ASSIGN-FORMAT-LIST (SEDIT::UNASSIGNED) TITLEDICONW (ICIMAGE ICFONT +ICJUST ICREGION ICBREAKCHARS ICOPERATION) \ADJUSTABLE-STRING-STREAM-OUTCHARFN (CHARPOSITION) ESCAPE ( +ESCAPEFLG) \SEQUIN.HANDLE.INPUT (SEQCONTROL SEQOUTALLOC SEQSTATE MYRECEIVESEQ SEQTIMEOUT) TERM.UP ( +YPOS) \TOP-LEVEL-READ (ENDOFSTREAMOP) \KEYHANDLER1 (READ TELERAIDFXP W0 W1 W2 W3 W4 W5 WU WRITE) +COMP.STFN (OPNAME OPARG) \UNWIND.PROCESS (PROCFINISHED PROCBEINGDELETED) SEDIT::CLOSE-NODE-LITATOM ( +SEDIT::ATOM-STARTED SEDIT::ATOM-STARTED-UNDO-POINTER CL:STRUCTURE STRING SEDIT::OPEN-NODE) +MAKE-FILL-POINTER-OUTPUT-STREAM (DEVICE F1 ACCESS OTHERPROPS OUTCHARFN STRMBOUTFN) SEDIT::FIND-NODE ( +SEDIT::\X) \LFGenerateFiles (DIRPTR CHARLIST NEXTFILEFN FILEINFOFN GENFILESTATE CURRENTFILE +RESTOFFILES ATTRIBUTES) \FM.LAYOUTCOLUMN (LEFT BOTTOM WIDTH HEIGHT) DEL.PROCESS (PROCBEINGDELETED) +\STRING-STREAM-OUTCHARFN (CHARPOSITION) SEDIT::PARSE (SEDIT::\X SEDIT::CURRENT-NODE) COMP.BIND.VARS ( +VARNAME COMP.VARTYPE PARENT NVALS VARS FRAMETYPE NNILS DECLS) COMP.TAGBODY (LBNO FRAME LEVEL +PROGLABELS) \TEDIT.UCASE.SEL (THACTION) EDITBMRESHAPEFN (LEFT BOTTOM WIDTH HEIGHT) \LET0 (%#FRAMENAME +NTSIZE NAMETABLE) MENUDESELECT (MENUUSERDATA) SEDIT::QUERY-THROW-AWAY-CHANGES (ITEMS TITLE) +SEDIT::SET-SELECTION-COMMENT-WORD (SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END +SEDIT::SELECT-TYPE) READTABLEPROP (NUMBERBASE READTBLNAME COMMONLISP COMMONNUMSYNTAX USESILPACKAGE +CASEINSENSITIVE ESCAPECHAR MULTESCAPECHAR PACKAGECHAR HASHMACROCHAR) BREAKREGIONSPEC (LEFT BOTTOM +WIDTH HEIGHT) LAYOUTGRAPH (GRAPH.PROPS) \LET* (%#FRAMENAME NTSIZE NAMETABLE) SKIPSEPRCODES (LASTCCODE) + EXTENDREGION (WIDTH LEFT HEIGHT BOTTOM) %%BROADCAST-STREAM-DEVICE-OUTCHARFN (CHARPOSITION) +\NSRANDOM.RELEASE.HANDLE (NSFILING.HANDLE NSFILING.CONNECTION NSHBUSYCOUNT) POSTSCRIPT.SHOWACCUM ( +POSTSCRIPTCHARSTOSHOW) DIRECTORY.NEXTFILE (STRINGNAME LITERALNAME FILEGENERATORS) \FM.LAYOUTROW (LEFT +BOTTOM WIDTH HEIGHT) TB.REPLACE.ITEMS (TI# TBTAILHINT TBITEMS TB#ITEMS TB#DELETED TBFIRSTSELECTEDITEM +TBLASTSELECTEDITEM) %%CONCATENATED-STREAM-DEVICE-BIN (F1) \DSPCOLOR.IP (IPCOLOR) \LFReturnNextFile ( +CURRENTFILE RESTOFFILES) PUTSTREAMPROP (ENDOFSTREAMOP OTHERPROPS) \SEQUIN.RETRANSMIT ( +SEQRETRANSMITNEXT SYSQUEUEHEAD SYSQUEUETAIL SEQRETRANSMITTING) MAKEFILE (LOADTYPE DATEFILENAME +TOBEDUMPED) INITIALIZECOLOR.IP (IPCOLORMODEL) \VAMAllocPageGroup (freePageCount lowerBound +nextFilePage volumePage) DSPEOLFN (DDEOLFN) \DSPCLIPPINGREGION.PRESS (PRClippingRegion) +RESTART.PROCESS (WAKEREASON) HASHBEFORECLOSE (Valid?) UNIX-BACKFILEPTR-NEW (COFFSET) +INSTALL-PROTOTYPE-DEFN (TITLE ITEMS) %%CONCATENATED-STREAM-DEVICE-PEEKBIN (F1) MSSOLVE (REP INVERTED +OSET QUOTED) \LOADNSHOSTNUMBER (NSHOST0 NSHOST1 NSHOST2) \LFEventFn (REOPENFILE) READMACROS ( +READMACROFLG) WAKE.PROCESS (WAKEREASON) \ETHERINIT (DEVICENAME EVENTFN DIRECTORYNAMEP HOSTNAMEP) +CL:MAKE-CONCATENATED-STREAM (DEVICE ACCESS F1) SCALEREGION (LEFT BOTTOM WIDTH HEIGHT) \SUSPEND.PROCESS + (PROCSTATUS NEXTPROCHANDLE PQLAST PQNEXT) %%CONCATENATED-STREAM-DEVICE-CLOSEFILE (ACCESS F1) +MB.CREATE.THREESTATEBUTTON (XSIZE YSIZE YDESC XKERN) \FTP.NEXTFILE (FTPGENCONNECTION FTPGENPLIST) +TEDIT.CARETLOOKS (\INSERTPCVALID CARETLOOKS) \NSRANDOM.PREPARE.CACHE (NSFILING.PAGE.CACHE NSPSIZE +NSPTAIL NSPBUFFERS) TB.SET.FONT (TBFONT TBFONTHEIGHT TBITEMHEIGHT TBFONTASCENT TBBASELINE TBORIGIN +TBEXTENT LEFT BOTTOM WIDTH HEIGHT TBMAXXPOS) %%CONCATENATED-STREAM-DEVICE-EOFP (F1) COMP.BINDLIST ( +VARNAME COMP.VARTYPE) \TEXTMENU.TOGGLE.WHENOPERATEDFN (SET ONFLG) CL:FLOAT-SIGN (SIGNBIT) +PROCESS.RESULT (PROCFINISHEVENT) \TEDIT.INSERTLINE (PREVLINE NEXTLINE) \NSRANDOM.READ.SEGMENT ( +NSHATTRIBUTES NSHWASREAD) TERM.RESET.DISPLAY.PARMS (PLAINFONT FONT CHATBOLDFONT ITALICFONT FONTHEIGHT +FONTWIDTH FONTDESCENT TTYHEIGHT TOPMARGIN BOTTOMMARGIN HOMEPOS TTYWIDTH) \DSPYPOSITION.HCPYMODE ( +DDYPOSITION DDCHARSET DDCHARSETASCENT) TEDIT.COPY (SET THACTION THLEN THCH# THFIRSTPIECE THOLDINFO +\DIRTY TEXTLEN CH# CHLIM DCH DX POINT \INSERTPCVALID) SELECT.FNS.EDITOR (ITEMS CENTERFLG) +\SEQUIN.FLUSH.CONNECTION (SEQSTATE SEQSOCKET SEQPROCESS SEQCLOSEME) \DSPXPOSITION.HCPYMODE ( +DDXPOSITION) \LEAF.GETFILEDATES (LEAFINFO) \SPPWATCHER (SPPACTIVITYTIMER SPPINACTIVECOUNT +SPPACKPENDING) INITIALIZE-NEW-SHELL-DEVICE (FDBINABLE NODIRECTORIES DEVICENAME BIN BOUT PEEKBIN +CLOSEFILE GETFILEINFO SETFILEINFO EOFP BACKFILEPTR GETNEXTBUFFER BLOCKIN) \VFMSplit1 (key volumePage +used) FOREST/BREAK/CYCLES (NODEPOSITION) \VFMCreateVPage (filePage volumePage nextFilePage) MENUSELECT + (MENUUSERDATA) TEDIT.KILL (EDITFINISHEDFLG) %%SYNONYM-STREAM-DEVICE-CLOSEFILE (F1 OPENFILELST) +\TEDIT.CREATE.LINECACHE (LCBITMAP LCNEXTCACHE) PRIN2-LONG-STRING (LONGSTRINGP LONGSTRING1MARGINP +LONGSTRINGSYMMETRICP) SEDIT::FINALIZE-MOUSE-SELECTION (SEDIT::SELECTION-DISPLAYED? SEDIT::LAST-MOUSE-X + SEDIT::LAST-MOUSE-Y SEDIT::LAST-MOUSE-TYPE) \FM.FORMATBYGRID (LEFT WIDTH) FB.SET.DEFAULT.NAME.WIDTH ( +INFOSTART NAMEOVERHEAD DIGITWIDTH OVERFLOWWIDTHS) \FUNCT1 (%#FRAMENAME NTSIZE NAMETABLE) +COMP.TOPLEVEL.COMPILE (VARS NNILS COMTYPE CODE TOPFRAME ARGS) \LFFindNextFile (CHARLIST VERSION +FULLNAME NAME INFO) \MAKESTACKP (STACKP0 EDFXP) \PFTrimHelper (filePage volumePage nextFilePage size) +\TRACKCURSOR (NEWMOUSEX NEWMOUSEY NEWMOUSESTATE) \SEND.ANSWERING.RFC (CONNID EPREQUEUE) SPP.DSTYPE ( +DSTYPE SPPDSTYPE) DMCHAT.CLEARMODES (BRIGHTMODE BLINKMODE IDMODE ADDRESSING ROLLMODE) +%%SYNONYM-STREAM-DEVICE-OUTCHARFN (CHARPOSITION) DMCHAT.HANDLECHARACTER (DINGED AUTOLF EATLF EATCRLF +EATTOCRLF ADDRESSING ROLLMODE BRIGHTMODE IDMODE) NOTIFY.EVENT (EVENTQUEUETAIL PROCEVENTLINK +PROCEVENTORLOCK EVENTWAKEUPPENDING) \FM.NWAY-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN +FM.SYSSELECTEDFN) CL:GET-OUTPUT-STREAM-STRING (F1) CREATEPOSITION (XCOORD YCOORD) +\DOBUFFEREDTRANSITIONS (W0 W1 W2 W3 W4 W5 WU READ DUMMY1SHIFT DUMMY2SHIFT DUMMYLOCK DUMMYCTRL +DUMMYMETA DUMMYFONT DUMMYUSERMODE1 DUMMYUSERMODE2 DUMMYUSERMODE3 DUMMYALTGRAPH DUMMYDEADKEYPENDING) +SEDIT::GET-CONTEXT (SEDIT::COMPLETION-EVENT SEDIT::ROOT SEDIT::ICON-TITLE SEDIT::EDIT-TYPE) FILEPKGCOM + (ADD DELETE MACRO CONTENTS) \CARET.DOWN (STREAM) INIT/NODES/FOR/LAYOUT (NODEPOSITION NODEFONT) +ADVISEWDS (LEFT BOTTOM WIDTH HEIGHT) \FLUSHPAGE (NActivePages FILEPAGE Key) \RSTRING2 (LASTCCODE) +\DSPSPACEFACTOR.HCPYMODE (DDMICAXPOS DDSPACEWIDTH) \TRANSFERPAGE (PAGE#) \LEAF.ACKED (SEQINPUTQLENGTH) + MENU.HANDLER (XCOORD YCOORD) \EDITBMHOWMUCH (TITLE ITEMS CENTERFLG) POSTSCRIPT.INIT (OTHERFDS +IMAGETYPE IMCLOSEFN IMXPOSITION IMYPOSITION IMMOVETO IMFONT IMLEFTMARGIN IMRIGHTMARGIN IMLINEFEED +IMDRAWLINE IMDRAWCURVE IMDRAWCIRCLE IMDRAWELLIPSE IMFILLCIRCLE IMBLTSHADE IMBITBLT IMSCALEDBITBLT +IMNEWPAGE IMSCALE IMSCALE2 IMCOLOR IMTERPRI IMTOPMARGIN IMBOTTOMMARGIN IMSPACEFACTOR IMFONTCREATE +IMCLIPPINGREGION IMRESET IMDRAWPOLYGON IMFILLPOLYGON IMSTRINGWIDTH IMCHARWIDTH IMDRAWARC IMROTATE +IMTRANSLATE IMDRAWPOINT IMPUSHSTATE IMPOPSTATE) READGRAPH (SIDESFLG DIRECTEDFLG GRAPH.MOVENODEFN +GRAPH.ADDNODEFN GRAPH.DELETENODEFN GRAPH.ADDLINKFN GRAPH.DELETELINKFN GRAPH.FONTCHANGEFN +GRAPH.INVERTBORDERFN GRAPH.INVERTLABELFN GRAPH.CHANGELABELFN GRAPH.PROPS GRAPHNODES NODEID NODELABEL +NODEPOSITION NODEFONT NODEBORDER NODELABELSHADE TONODES FROMNODES) \SETMACROSYNTAX (READMACRODEFS +MACROTYPE MACROFN) POSTSCRIPT.CLOSESTRING (POSTSCRIPTCHARSTOSHOW) FW-CHANGE-ANCHOR (CENTERFLG TITLE +ITEMS) \VFMInsertPageGroup (fileID filePage type) ADDCHAR (END LASTCOL) \DSPBOTTOMMARGIN.PRESS ( +PRBOTTOM) \NSFILING.LOOKUP.CACHE (FSCACHEDHANDLES) %%TWO-WAY-STREAM-DEVICE-OUTCHARFN (CHARPOSITION) +EDITCHANGELABEL (XCOORD YCOORD NODELABEL NODELABELBITMAP) \NSFILING.UPDATE.ATTRIBUTES (NSHATTRIBUTES) +\DSKDISPLAY.BUTTONEVENTFN (ITEMS) \ATBLSET (REREADTABLE REBASE REFORMAT) \INSERTCR (PPARALAST +\INSERTPCVALID) SPP.SENDEOM (ENDOFMESSAGE) \TEXTBACKFILEPTR (PIECE BINABLE FATSTREAMP CURRENTLOOKS +CHARSLEFT COFFSET CPAGE CBUFSIZE CPPTR) %%BROADCAST-STREAM-DEVICE-CLOSEFILE (ACCESS F1) +\NSFILING.LOGIN (FSADDRESS FSPARSEDNAME FSNAMESTRING FSPROCESSNAME FSCOURIERSTREAMS FSSESSIONHANDLE +FSPROTOCOLNAME FSDEVICENAME FSPROTOCOLDEF FSSESSIONLOCK FSSESSIONTIMER FSLOGINNAME NSCONNECTIONS +NSRANDOMDEVICE DEVICENAME OPENFILE REOPENFILE CLOSEFILE GETFILEINFO SETFILEINFO REGISTERFILE +UNREGISTERFILE READPAGES WRITEPAGES TRUNCATEFILE DEVICEINFO REMOTEP SUBDIRECTORIES SETEOFPTR) +\TEDIT.PEEKBIN.NEW.PAGE (COFFSET CPPTR CPAGE CBUFSIZE CHARSLEFT) \TEXTPEEKBIN (COFFSET PIECE +CURRENTLOOKS BINABLE CBUFSIZE CHARSLEFT CPAGE PCSTARTCH PCSTARTPG CURRENTPARALOOKS) \UFSPrintTypeMenu +(TITLE ITEMS CENTERFLG) \DSPFONT.PRESS (PRCURRFDE PRFONT PRWIDTHSCACHE PRLINEFEED) TRACEREGION (LEFT +BOTTOM WIDTH HEIGHT) \FTP.CLOSEFILE (FTPFILEPROPS DEVICE) \CREATE.TEDIT.RESTART.MENU (ITEMS) +\INTERPRESSINIT (IMAGETYPE IMCLOSEFN IMXPOSITION IMYPOSITION IMFONT IMLEFTMARGIN IMRIGHTMARGIN IMLINEFEED IMDRAWLINE IMDRAWCURVE IMDRAWCIRCLE IMDRAWELLIPSE IMFILLCIRCLE IMBLTSHADE IMBITBLT -IMSCALEDBITBLT IMNEWPAGE IMSCALE IMSCALE2 IMCOLOR IMTERPRI IMTOPMARGIN IMBOTTOMMARGIN IMSPACEFACTOR -IMFONTCREATE IMCLIPPINGREGION IMRESET IMDRAWPOLYGON IMFILLPOLYGON IMSTRINGWIDTH IMCHARWIDTH IMDRAWARC -IMROTATE IMTRANSLATE IMDRAWPOINT IMPUSHSTATE IMPOPSTATE) \\DL.NEWFAULTINIT (PAGE# DLDISPCONTROL VP -FILEPAGE EMPTY UNAVAILABLE) \\RELEASE.PROCESS (PROCFX PROCOLDTTYPROC PROCDELETED PROCSTATUS PROCFORM -PROCRESTARTFORM PROCQUEUE PROCWINDOW PROCTIMERSET NEXTPROCHANDLE) FB.AFTERCLOSEFN (TABLEBROWSER) -|\\PFTrimHelper| (|filePage| |volumePage| |nextFilePage| |size|) DELETECONTROL (DELCHARECHO LINEDELETE - 1STCHDEL NTHCHDEL POSTCHDEL EMPTYCHDEL) SETMAINTPANEL (DLMAINTPANEL) \\LEAFINIT (DEVICENAME RESETABLE - RANDOMACCESSP PAGEMAPPED HOSTNAMEP EVENTFN DELETEFILE GETFILEINFO OPENFILE SETFILEINFO GETFILENAME -GENERATEFILES DIRECTORYNAMEP RENAMEFILE) DINFO.OPENTEXTSTREAM (LAST.TEXT) SHEDSCAN (GEOM REST BY TY WC -) MSQUOTED (QUOTED) DMCHAT.CLEAR (ROLLMODE) DINFO.READ.GRAPH (TOPNODEID TEXTPROPS LOOKUPFN MENUFN -FREEMENUITEMS NODELST USERDATA NAME DEFAULTHOST DEFAULTDEVICE DEFAULTDIR) GETBOXSCREENREGION (SCREEN -LEFT BOTTOM WIDTH HEIGHT) MAKEXYPT (X Y) BUTTONPANEL (ITEMS CENTERFLG WHENSELECTEDFN WHENHELDFN LEFT -BOTTOM) \\DSPRIGHTMARGIN.PRESS (PRRIGHT) \\MEDW.GETBOXSCREENPOSITION (SCREEN XCOORD YCOORD) -MB.CREATE.THREESTATEBUTTON (XSIZE YSIZE YDESC XKERN) EDITCHANGELABEL (XCOORD YCOORD NODELABEL -NODELABELBITMAP) \\SETBSPTIMEOUT (BSPTIMEOUT) TEDIT.INSERT.OBJECT (\\INSERTFIRSTCH PSTR PFILE POBJ -PLEN PPARALOOKS PLOOKS THACTION THCH# THLEN THFIRSTPIECE TEXTLEN \\INSERTPCVALID \\DIRTY \\XDIRTY DESC - SELKIND DCH DX CHLIM CH# POINT) TB.SET.FONT (TBFONT TBFONTHEIGHT TBITEMHEIGHT TBFONTASCENT TBBASELINE - TBORIGIN TBEXTENT LEFT BOTTOM WIDTH HEIGHT TBMAXXPOS) \\SETUP-COMPILED-CLOSURE-CALL (USECNT IVAR -FLAGS NOPUSH \#BLINK \#CLINK \#ALINK FNHEADER PC NEXTBLOCK |MiscFXP|) DISPLAYSTREAMINIT (LEFT BOTTOM -WIDTH HEIGHT) SPP.CLEAREOM (SPPEOFP SPPEOFBITS FW8) TEDIT.DELETELINE (NEXTLINE PREVLINE) -\\DSPXPOSITION.HCPYMODE (DDXPOSITION) \\BUILD.EXPEDITED.XIP (LOWVERSION HIGHVERSION MSGTYPE -TRANSACTIONID PROGRAM# VERSION# PROCEDURE# XIPLENGTH) SEDIT::SET-POINT-COMMENT-WORD (SEDIT::POINT-NODE - SEDIT::POINT-INDEX SEDIT::POINT-TYPE) \\TEDIT.WINDOW.SETUP (PROMPTWINDOW) \\M-VMEMSAVE ( -MISCSTACKRESULT |Key| |CurrentFXP|) \\INSPECTW.REDISPLAYPROP (ITEMINFO SELECTABLEITEMREGION) -\\NSRANDOM.ENSURE.WATCHER (NSWATCHERPROC) UNIX.SETDISPLAYTYPE (HELD) READGRAPH (SIDESFLG DIRECTEDFLG -GRAPH.MOVENODEFN GRAPH.ADDNODEFN GRAPH.DELETENODEFN GRAPH.ADDLINKFN GRAPH.DELETELINKFN -GRAPH.FONTCHANGEFN GRAPH.INVERTBORDERFN GRAPH.INVERTLABELFN GRAPH.CHANGELABELFN GRAPH.PROPS GRAPHNODES - NODEID NODELABEL NODEPOSITION NODEFONT NODEBORDER NODELABELSHADE TONODES FROMNODES) -\\TFBRAVO.INIT.CHARLOOKS (CLSIZE CLNAME CLOFFSET) CHAT.HOLD (HELD) MSSETPHRASE (DET TYPE REP KNOWN) -SEDIT::KILL-NODE (SEDIT::DEPTH SEDIT::FIRST-LINE SEDIT::LAST-LINE SEDIT::START-X SEDIT::LINEAR-THREAD) - \\DSPLINEFEED.PRESS (PRLINEFEED) |\\VFMGetPageGroup| (|fileID| |filePage| |type| |volumePage| -|nextFilePage|) \\MAKEFREEBLOCK (SIZE FLAGWORD) SET-PROFILE-INTERACTIVELY (TITLE ITEMS CENTERFLG LEFT -BOTTOM) \\CREATEDISPLAY (DEVICENAME RESETABLE RANDOMACCESSP PAGEMAPPED CLOSEFILE DELETEFILE -GETFILEINFO OPENFILE READPAGES SETFILEINFO GENERATEFILES TRUNCATEFILE WRITEPAGES GETFILENAME -REOPENFILE EVENTFN DIRECTORYNAMEP HOSTNAMEP BIN BOUT PEEKBIN BACKFILEPTR BLOCKIN BLOCKOUT DEVICEINFO -ONOFF) CREATE.EVENT (EVENTNAME) \\LEAF.HANDLE.INPUT (SEQINPUTQLENGTH LEAFSTATUS EPUSERFIELD -LEAFERRORCNT FW7) \\TEDIT.BASICFIND (\\INSERTPCVALID) \\SPP.CREATE.STREAMS (SPPINPUTSTREAM -SPP.CONNECTION F1 STRMBOUTFN SPPOUTPUTSTREAM DEVICEINFO) \\DSPSPACEFACTOR.HCPYMODE (DDMICAXPOS -DDSPACEWIDTH) SETXY.PRESS (PRXPOS PRYPOS) ECHOCHAR (CCECHO) MAKEFILE (LOADTYPE DATEFILENAME TOBEDUMPED -) FB.SET.DEFAULT.NAME.WIDTH (INFOSTART NAMEOVERHEAD DIGITWIDTH OVERFLOWWIDTHS) DELETELINE (NEXTLINE -END START) \\LEAF.ACKED (SEQINPUTQLENGTH) \\NSRANDOM.STREAM.CHANGED (EPAGE EOFFSET NSFILING.PAGE.CACHE - F1) |\\LFFindInfo| (INFO |fileID| |volNum| |type| ACCESS) \\NSFILING.INIT (DEVICENAME HOSTNAMEP -EVENTFN) CREATE.PACKET.EXCHANGE.XIP (PACKETEXCHANGETYPE PACKETEXCHANGEID0 PACKETEXCHANGEID1) -FOREST/BREAK/CYCLES (NODEPOSITION) HLSTORGB (RED GREEN BLUE) \\NSFILING.ADD.TO.CACHE (FSCACHEDHANDLES) - \\SEND.RFC (PUPLENGTH PUPTYPE PUPID PUPSOURCE LCLPORT) \\CREATELINEBUFFER (LINEBUFSTATE F5 -KEYBOARDSTREAM F2 USERCLOSEABLE USERVISIBLE ENDOFSTREAMOP EOLCONVENTION DEVICE EOFP) SEDIT::GET-CONTEXT - (SEDIT::COMPLETION-EVENT SEDIT::ROOT SEDIT::ICON-TITLE SEDIT::EDIT-TYPE) \\SETUP.DEFAULT.LINEBUF ( -READP EOFP PEEKBIN FULLFILENAME LINEBUFSTATE F5 USERCLOSEABLE USERVISIBLE ENDOFSTREAMOP) -\\MEDW.GETSCREENPOSITION (SCREEN XCOORD YCOORD) NEWPAGE.IP (IPFONT IPPAGEFONTS IPNEXTFRAMEVAR -IPPAGENUM) \\BSP.SENDBUFFER (PUPLENGTH PUPID AUXWORD XMITBYTEID BSPFILEPTRLO BSPFILEPTRHI FW6 FW7 -\#UNACKEDPUPS \#UNACKEDBYTES PUPALLOC BYTEALLOC BSPCURRENTPUP F3 CBUFMAXSIZE CBUFSIZE CPPTR EPREQUEUE) - \\NEXTCONSPAGE (PAGE# DTDNEXTPAGE) \\ALLOCMDSPAGE (PAGE#) \\TTW1 (LEFT BOTTOM WIDTH HEIGHT NEXTW -SCTOPW) \\MAIKO.CONS.UFN (CAR CDR NEXTCELL CNT FULLCARFIELD CDRCODE) MAKETITLEBARICON (LEFT BOTTOM -HEIGHT WIDTH) \\CARET.FLASH.AGAIN (NEXT) \\SPP.PREPARE.INPUT (SPPFILEPTRLO FW7 SPPFILEPTRHI FW6 -COFFSET CBUFSIZE SPPINPKT CBUFPTR SPPEOFP SPPEOFBITS FW8 SPPINPUTDSTYPE) \\TEDIT.FIND.FIRST.LINE ( -NEXTLINE YBOT PREVLINE) |\\VFMMerge1| (|used| |key|) SEDIT::SET-POINT-COMMENT (SEDIT::POINT-NODE -SEDIT::POINT-INDEX SEDIT::POINT-TYPE) TEDIT.DEACTIVATE.WINDOW (\\WINDOW EDITFINISHEDFLG) -\\DSKDISPLAY.CREATE.WINDOW (WIDTH HEIGHT LEFT BOTTOM XCOORD YCOORD) TEDIT.MINIMAL.WINDOW.SETUP ( -TCCARETDS SELWINDOW \\WINDOW DISPLAYCACHE DISPLAYCACHEDS LEFT BOTTOM WIDTH HEIGHT WTOP WRIGHT WBOTTOM -WLEFT LINES) MAKEBRES (X Y IX IY MAJOR IPX IPY P) COMP.BLOCK (LEVEL FRAME PROGLABELS BLOCKCONTEXT -BLOCKTAG BLOCKEND) ADD.PROCESS (PROCTIMERSET WAKEREASON PROCFORM RESTARTABLE PROCPRIORITY PROCSTATUS -PROCSYSTEMP PROCAFTEREXIT PROCBEFOREEXIT PROCTTYENTRYFN PROCTTYEXITFN PROCWINDOW PROCINFOHOOK -PROCUSERDATA PROCRESTARTFORM PROCQUEUE PROCNEVERSTARTED) \\MOUSE.PROCESS (PROCSYSTEMP PROCTYPEAHEAD) -ETHERHOSTNAME (PUPNET# PUPHOST# PUPLENGTH NETHOST SOCKET) \\SPP.ESTABLISH (SPPATTENTIONFN -SPPWHENCLOSEDFN SPPERRORHANDLER SPPDESTID SPPSYSPKT SPPESTABLISHEDP SPPSTATE SPPDESTINATIONKNOWN) -\\TFBRAVO.PARSE.PARA (PARALOOKS RUNS RUNLENGTH RUNLOOKS) MAKESCAN (REST) RAISE (RAISEFLG) -\\10MBENCAPSULATE (10MBDESTHOST 10MBLENGTH 10MBTYPE) CHECKCONSPAGES (PAGE#) \\COERCE.NS.SOCKET ( -NSSOCKET) \\INITCONSPAGE (NEXTCELL FULLCARFIELD NEXTFREE CNT NEXTPAGE) INSURE.BRUSH (BRUSHSHAPE -BRUSHSIZE BRUSHCOLOR) \\MAPMDS (PAGE#) \\DSPLINEFEED.HCPYMODE (DDLINEFEED) \\TEDIT.UCASE.SEL (THACTION -) \\LEAF.FIX.BROKEN.SEQUIN (EPLINK SYSQUEUEHEAD SYSQUEUETAIL SEQSOCKET PUPSOURCESOCKET) -\\SETUP-ENVIRONMENT-CALL (NEXTBLOCK IVAR NOPUSH \#BLINK \#CLINK \#ALINK FNHEADER PC |MiscFXP|) -\\FTP.GENERATEFILES (FTPBUSY NEXTFILEFN FILEINFOFN GENFILESTATE FTPGENCONNECTION FTPDEVICEWANTED -FTPGENPLIST FTPNAMEFILTER) DINFO.FMW.CLOSEFN (FMENU.WINDOW) \\DL.MARK.PAGES.UNAVAILABLE (UNAVAILABLE -VP) \\CHECKCONSPAGE (PAGE#) \\COPYSYNTAX (NSCHARHASH) COMP.APPLY* (EXTCALL) \\UFS.NEXTFILEFN ( -SUBGENERATORS THISFILE FILEID CURRENT-DEPTH MAX-DEPTH) IMAGEFNSCREATE (DISPLAYFN IMAGEBOXFN PUTFN -GETFN COPYFN BUTTONEVENTINFN COPYBUTTONEVENTINFN WHENMOVEDFN WHENINSERTEDFN WHENDELETEDFN WHENCOPIEDFN - WHENOPERATEDONFN PREPRINTFN) SEDIT::ADJUST-WIDTH (SEDIT::WIDTH SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH - SEDIT::ACTUAL-WIDTH SEDIT::ACTUAL-LLENGTH) \\TEXTMENU.TOGGLE.WHENOPERATEDFN (SET ONFLG) -RESETTERMTABLE (RAISEFLG DELCHARECHO LINEDELETE 1STCHDEL NTHCHDEL POSTCHDEL EMPTYCHDEL CONTROLFLG -ECHOFLG) TWODINSPECT.SELECTITEM (ELTWIDTH ELTLEFT ELTBOTTOM ROWPROP COLUMNPROP) \\SET.PROCESS.NAME ( -PROCNAME) \\ORIGTERMTABLE (TERMSA NSCHARHASH DELCHARECHO ECHOFLG LINEDELETE 1STCHDEL NTHCHDEL -POSTCHDEL EMPTYCHDEL) \\DSPLEFTMARGIN.PRESS (PRLEFT) |\\PFPatchRootDirEntries| (|countEntries|) -\\DL.ASSIGNBUFFERS (|UserNameAddr| |UserPswdAddr| |MDSZoneLength| |MDSZone|) CHAT.SET.EMULATOR ( -TERM.STATE TYPEOUTPROC) \\TEDIT.INSERTLINE (PREVLINE NEXTLINE) DMCHAT.RIGHT (XPOS) -\\SPP.RELEASE.ACKED.PACKETS (SPPACKEDSEQNO SPPRETRANSMITTING) ITEM.WINDOW.SET.STACK.ARG (ITEMS LEFT -BOTTOM) \\STRING-STREAM-OUTCHARFN (CHARPOSITION) CHAT.MENU (HELD ITEMS LEFT BOTTOM LOCALECHO RUNNING?) - RELSTK (EDFXP) \\ADJUSTABLE-STRING-STREAM-OUTCHARFN (CHARPOSITION) DBG::ATTACH-BACKTRACE-MENU (ITEMS -LABEL BKMENUINFO WHENSELECTEDFN MENUOUTLINESIZE MENUFONT MENUCOLUMNS LEFT BOTTOM XCOORD YCOORD) -\\BSP.FLUSH.SOCKET.QUEUES (CBUFSIZE BSPCURRENTPUP CPPTR F3) TYPEINMENU (ITEMS WHENSELECTEDFN LEFT -BOTTOM) \\SPP.CREATE.CON (SPPXIPLENGTH SPPXIPTYPE SPPSOURCEID SPPMYNSOCKET SPPSOURCESKT# SPPACCEPTNO) -\\DSPFONT.HCPYMODE (DDFONT DDLINEFEED DDSPACEWIDTH) \\FTP.CLOSEFILE (FTPFILEPROPS F5 DEVICE) -\\LEAF.TIMEDIN (LEAFABORTBUTTONWINDOW LEAFABORTSTATUS LEAFTIMEOUTSTATUS) SEDIT::CREATE-SIMPLE-NODE ( -SEDIT::NODE-TYPE CL:STRUCTURE SEDIT::SUB-NODES SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH -SEDIT::ACTUAL-WIDTH SEDIT::ACTUAL-LLENGTH SEDIT::LINEAR-FORM STRING SEDIT::WIDTH SEDIT::FONT SEDIT::PRIN-2? -) \\BBTCURVEPT (PBTSOURCE PBTSOURCEHI PBTSOURCELO PBTHEIGHT PBTDEST PBTDESTHI PBTDESTLO PBTDESTBIT -PBTSOURCEBIT PBTWIDTH PBTOPERATION PBTSOURCETYPE) SEDIT::INITIALIZE (SEDIT::NAME SEDIT::ASSIGN-FORMAT +IMNEWPAGE IMMOVETO IMSCALE IMTERPRI IMBOTTOMMARGIN IMTOPMARGIN IMFONTCREATE IMSPACEFACTOR IMCOLOR +IMSTRINGWIDTH IMCHARWIDTH IMSCALEDBITBLT IMCLIPPINGREGION IMFILLPOLYGON IMDRAWARC IMPUSHSTATE +IMPOPSTATE IMROTATE IMSCALE2 IMTRANSLATE IMDEFAULTSTATE IMOPERATION IMBITMAPSIZE IMDRAWPOLYGON +IMDRAWPOINT) %%TWO-WAY-STREAM-DEVICE-CLOSEFILE (ACCESS F1 F2 OPENFILELST) \SPP.PREPARE.INPUT ( +SPPFILEPTRLO SPPFILEPTRHI FW6 COFFSET CBUFSIZE SPPINPKT CBUFPTR SPPEOFP SPPINPUTDSTYPE) +INTERSECTREGIONS (LEFT BOTTOM WIDTH HEIGHT) \SETUP.TYPENUM.TABLE (DTDGCTYPE DTDHUNKP) +SEDIT::SET-POINT-COMMENT (SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::POINT-TYPE) \MOVEREALPAGE ( +LOCKED VP FILEPAGE PAGE#) \SELECTREALPAGE (EMPTY NEXTRP) TWODINSPECT.ADJUSTSELECTION (ELTBOTTOM +ELTWIDTH ELTLEFT ROWPROP COLUMNPROP) \10MBENCAPSULATE (10MBDESTHOST 10MBLENGTH 10MBTYPE) +%%FILL-POINTER-STREAM-DEVICE-CLOSEFILE (F1) TEDIT.INSERT.UPDATESCREEN (CH# CHLIM POINT DCH SELKIND +EDITOPACTIVE) \DSPLINEFEED.HCPYMODE (DDLINEFEED) \FTP.GENERATEFILES (FTPBUSY NEXTFILEFN FILEINFOFN +GENFILESTATE FTPGENCONNECTION FTPDEVICEWANTED FTPGENPLIST FTPNAMEFILTER) \UPDATECHAIN (NEXTRP) +WHO-LINE-SET-TIME (TITLE CENTERFLG ITEMS) POSITION (CHARPOSITION) \FM.STATE-CHANGESTATE (FM.STATE) +\MAIKO.DISPLAYLINE (LEFT BOTTOM WIDTH HEIGHT DDXPOSITION) \TRANSMIT.STRATEGY (ACKREQUESTED ADATACOUNT +PUPTYPE) \SETACCESS (ACCESSBITS BINABLE BOUTABLE EXTENDABLE STRMBINFN STRMBOUTFN) \LFParseFileName ( +VOL NAME VERSION) PROCESS.WINDOW (PROCWINDOW) SEDIT::KILL-NODE (SEDIT::DEPTH SEDIT::FIRST-LINE +SEDIT::LAST-LINE SEDIT::START-X SEDIT::LINEAR-THREAD) COMP.PROG (LEVEL FRAME LBNO PROGLABELS) +ONED.TRACKCURSOR (ELTWIDTH ELTLEFT ELTBOTTOM PROP) PRINSHUT (STOPX STOPY) \INSTALL.EXTERNALFORMAT ( +NAME) \NSFILING.CLOSEFILE (NSHDATUM NSHNAME) \NSFILING.ADD.TO.CACHE (FSCACHEDHANDLES) +\LEAF.FIX.BROKEN.SEQUIN (EPLINK SYSQUEUEHEAD SYSQUEUETAIL SEQSOCKET PUPSOURCESOCKET) +\NSRANDOM.STREAM.CHANGED (EPAGE EOFFSET NSFILING.PAGE.CACHE) CREATE.PACKET.EXCHANGE.XIP ( +PACKETEXCHANGETYPE PACKETEXCHANGEID0 PACKETEXCHANGEID1) \TFBRAVO.HANDLE.HEADING (FMTPARATYPE +FMTPARASUBTYPE FMTSPECIALX FMTSPECIALY) PAINTW.READBRUSHSHADE (CENTERFLG TITLE ITEMS MENUBORDERSIZE) +WINDOW.MOUSE.HANDLER (XCOORD YCOORD) \PFPutRootDirectoryType (volumeRootDirectory) \GC.HANDLEOVERFLOW +(CLEAR DTDCNT0) \DEFINEFONT.PRESS (PRESSFONTDIR DESCR FONT# FONTSET# PRNEXTFONT# PRMAXFONTSET) +\NSFILING.DISCARD.SESSION (NSCONNECTIONS FSCOURIERSTREAMS FSSESSIONHANDLE) SETUPSTACK (CurrentFXP +ResetFXP FAULTFXP SubovFXP KbdFXP StackBase EndOfStack) \MAKENUMBER (HINUM LONUM) SUPERPRINT/WRAPPER ( +WRAPPER) FILL.INITTBLE (PBTFLAGS PBTDESTBPL PBTSOURCEBPL PBTUSEGRAY PBTGRAYWIDTHLESSONE +PBTGRAYHEIGHTLESSONE PBTDISJOINT PBTOPERATION PBTSOURCETYPE PBTHEIGHT FBBT TX TY ADDR LLEN TXTW TXTH +TXTA TEXT STRM BITS LFT RGT TOP BOT) \SPP.CREATE.STREAM (DEVICE ACCESS) CHAT.TTYENTRYFN (HELD) +SEDIT::ADJUST-WIDTH (SEDIT::WIDTH SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH SEDIT::ACTUAL-WIDTH +SEDIT::ACTUAL-LLENGTH) \SETBSPTIMEOUT (BSPTIMEOUT) CHAT.TYPEOUT.CLOSE (RUNNING?) \LEAF.HANDLE.INPUT ( +SEQINPUTQLENGTH LEAFSTATUS LEAFERRORCNT FW7 EPUSERFIELD) \PROC.RESUME (ACLINK) CREATE.NUMBERPAD.READER + (ITEMS MENUCOLUMNS CENTERFLG MENUFONT WHENHELDFN WHENSELECTEDFN MENUOUTLINESIZE ITEMHEIGHT XCOORD +YCOORD LEFT BOTTOM WIDTH HEIGHT) \LEAFINIT (DEVICENAME RESETABLE RANDOMACCESSP PAGEMAPPED HOSTNAMEP +EVENTFN DELETEFILE GETFILEINFO OPENFILE SETFILEINFO GETFILENAME GENERATEFILES DIRECTORYNAMEP +RENAMEFILE) \SETFVAR.UFN (VALUE) \TEDIT1 (\WINDOW EDITFINISHEDFLG) OPENNSOCKET (ID# NSOCEVENT) +SEDIT::SET-POINT-COMMENT-WORD (SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::POINT-TYPE) +\TEDIT.CHARDELETE (OFFST LENGTH CHLIM CH# DCH) MAKE-READER-ENVIRONMENT (REPACKAGE REREADTABLE REBASE +REFORMAT) DMCHAT.STATE (CLEARMODEFN) FONTCREATE (FONTAVGCHARWIDTH) \FLUSHNSOCQUEUE (INQUEUELENGTH) +\DSPRIGHTMARGIN.HCPYMODE (DDMICARIGHTMARGIN) \INTERPRETER (MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) +\LFFindInfo (INFO fileID volNum type ACCESS) %%INITIALIZE-CLSTREAM-TYPES (DEVICENAME RESETABLE +RANDOMACCESSP NODIRECTORIES BUFFERED PAGEMAPPED FDBINABLE FDBOUTABLE FDEXTENDABLE DEVICEINFO HOSTNAMEP + EVENTFN DIRECTORYNAMEP REOPENFILE CLOSEFILE GETFILENAME DELETEFILE GENERATEFILES RENAMEFILE BIN BOUT +PEEKBIN READP EOFP BLOCKIN BLOCKOUT FORCEOUTPUT GETFILEINFO SETFILEINFO CHARSETFN BACKFILEPTR +INPUT-INDIRECTED OUTPUT-INDIRECTED INPUTSTREAM OUTPUTSTREAM OPENFILE GETFILEPTR) \TEXTMENU.TOGGLEFN ( +ONFLG) GRAPHERPROP (GRAPH.PROPS) \COERCE.NS.SOCKET (NSSOCKET) \DSPFONT.HCPYMODE (DDFONT DDLINEFEED +DDSPACEWIDTH) SHOWWTITLE (LEFT BOTTOM WIDTH HEIGHT) \POLYSHADE.DISPLAY (X P LX RX) \FM.STATE-SETUP ( +FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN FM.STATE ITEMS MENUFONT CENTERFLG TITLE) +SEDIT::CREATE-SIMPLE-NODE (SEDIT::NODE-TYPE CL:STRUCTURE SEDIT::SUB-NODES SEDIT::INLINE-WIDTH +SEDIT::PREFERRED-WIDTH SEDIT::ACTUAL-WIDTH SEDIT::ACTUAL-LLENGTH SEDIT::LINEAR-FORM STRING SEDIT::WIDTH + SEDIT::FONT SEDIT::PRIN-2?) \LEAF.TIMEDIN (LEAFABORTBUTTONWINDOW LEAFABORTSTATUS LEAFTIMEOUTSTATUS) +\INSERTCH (PLEN \INSERTLEN \INSERTLEFT \INSERTNEXTCH THACTION THLEN THCH# THFIRSTPIECE THPOINT PSTR +PLOOKS PPARALOOKS PPARALAST PNEW \INSERTSTRING \INSERTPCNO \INSERTPC \INSERTFIRSTCH THOLDINFO TEXTLEN +\INSERTPCVALID \DIRTY PFATP) EDITBMSCROLLFN (LEFT BOTTOM) \CREATE.THROUGH.EXTERNALFORMAT (NAME +INCCODEFN PEEKCCODEFN BACKCCODEFN OUTCHARFN EOL) SEDIT::INITIALIZE (SEDIT::NAME SEDIT::ASSIGN-FORMAT SEDIT::COMPUTE-FORMAT-VALUES SEDIT::LINEARIZE SEDIT::SUB-NODE-CHANGED SEDIT::COMPUTE-POINT-POSITION SEDIT::COMPUTE-SELECTION-POSITION SEDIT::SET-POINT SEDIT::SET-SELECTION SEDIT::GROW-SELECTION SEDIT::SELECT-SEGMENT SEDIT::INSERT CL:DELETE SEDIT::COPY-STRUCTURE SEDIT::COPY-SELECTION SEDIT::BACK-SPACE - SEDIT::STRINGIFY SEDIT::LINEAR-ITEM) \\BRUSHBITMAP (BRUSHCACHE) \\SETSPACE.PRESS (PRSPACEWIDTH) -\\NSFILING.OPENFILE (OPENFILELST) SCRATCHCONS (OLDTAIL) \\SETFVARSLOT (BINDINGPTR BINDLO BINDHI) -SCALEREGION (LEFT BOTTOM WIDTH HEIGHT) PUTTEXTPROP (TXTREADONLY TXTEDITING TXTNONSCHARS EDITPROPS) -RESETREADTABLE (READMACROFLG ESCAPEFLG COMMONLISP NUMBERBASE CASEINSENSITIVE COMMONNUMSYNTAX -USESILPACKAGE HASHMACROCHAR ESCAPECHAR MULTESCAPECHAR PACKAGECHAR DISPATCHMACRODEFS READMACRODEFS) -ECHOMODE (ECHOFLG) \\FLUSHPUPSOCQUEUE (INQUEUELENGTH) \\GET.PRIORITY.QUEUE (PQPRIORITY PQHIGHER -PQLOWER) \\FIXLINELENGTH.PRESS (LINELENGTH) \\NSFILING.CONNECT (NSHDIRECTORYPATH NSHDATUM) \\PROG0 ( -\#FRAMENAME NTSIZE NAMETABLE FAST NAMETABLE# VALIDNAMETABLE) \\INITBIGNUMS (ELEMENTS) DEL.PROCESS ( -PROCBEINGDELETED) \\SETTYPEMASK (DTDTYPEENTRY) MAKE-FILL-POINTER-OUTPUT-STREAM (DEVICE F1 ACCESS -OTHERPROPS OUTCHARFN STRMBOUTFN) %BROADCAST-STREAM-DEVICE-OUTCHARFN (CHARPOSITION) HASHBEFORECLOSE ( -|Valid?|) \\TEDIT.CREATE.LINECACHE (LCBITMAP LCNEXTCACHE) %BROADCAST-STREAM-DEVICE-CLOSEFILE (ACCESS -F1) TERM.UP (YPOS) ESCAPE (ESCAPEFLG) CCCSCAN (CODEARRAY NAMELOCS CONSTLOCS DEFLOCS PTRLOCS) -\\RTP.HANDLE.RFC (NET PUPLENGTH TYPEWORD EPREQUEUE) \\KEYHANDLER1 (READ TELERAIDFXP W0 W1 W2 W3 W4 W5 -WU WRITE) |\\LFVersions| (DIRPTR CHARLIST) %CONCATENATED-STREAM-DEVICE-PEEKBIN (F1) \\LEAF.TIMEDOUT ( -LEAFTIMEOUTSTATUS) \\LEAF.RECONNECT (PFSLEAFSEQUIN) PUTSTREAMPROP (OTHERPROPS) RESTART.PROCESS ( -WAKEREASON) %CONCATENATED-STREAM-DEVICE-BIN (F1) \\PEEKREFILL (PEEKEDCHAR F3 PEEKEDECHOFLG) -\\UNWIND.PROCESS (PROCFINISHED PROCBEINGDELETED) CREATE-SHELL-STREAM (ACCESS DEVICE OPENFILELST) -\\TFBRAVO.WRITE.PARAGRAPH (FMTPARATYPE) LAYOUTGRAPH (GRAPH.PROPS) \\SPP.SKIPBYTES (COFFSET) -WAKE.PROCESS (WAKEREASON) \\EVALA (\#FRAMENAME NTSIZE NAMETABLE FAST NAMETABLE# VALIDNAMETABLE) -\\SEQUIN.CONTROL (PUPLENGTH SEQCONTROL) COMP.STUNBIND (OPNAME OPARG) \\EXTERNALFORMAT ( -EXTERNALFORMAT.NAME NOTXCCS OTHERPROPS INCCODEFN PEEKCCODEFN BACKCHARFN EOLCONVENTION EXTERNALFORMAT -OUTCHARFN) OPT.JUMPREV (NXT PREV TAG OPNAME) READTABLEPROP (NUMBERBASE READTBLNAME COMMONLISP -COMMONNUMSYNTAX USESILPACKAGE CASEINSENSITIVE ESCAPECHAR MULTESCAPECHAR PACKAGECHAR HASHMACROCHAR) -CL:FLOAT-SIGN (SIGNBIT) |\\PFPurgeRootDirectory| (|fileID| |volNum| |type| |size|) OPT.COMMONBACK (TAG -) SEDIT::CHANGE-QUOTE (SEDIT::UNASSIGNED) FB.ADD.FILEGROUP (TIDATA) \\MOVETO.PSC (POSTSCRIPTX -POSTSCRIPTY POSTSCRIPTMOVEFLG) \\SUBREAD (LASTCCODE) FILEPKGCOM (ADD DELETE MACRO CONTENTS) -%CONCATENATED-STREAM-DEVICE-EOFP (F1) %SYNONYM-STREAM-DEVICE-CLOSEFILE (F1 OPENFILELST) -POSTSCRIPT.FONTCREATE (IL-FONTID OTHERDEVICEFONTPROPS FONTSCALE FONTDEVICE FONTFAMILY FONTSIZE -FONTFACE ROTATION |\\SFHeight| |\\SFAscent| |\\SFDescent| FONTDEVICESPEC) \\RTP.FILTER (FRNNET) -%CONCATENATED-STREAM-DEVICE-CLOSEFILE (ACCESS F1) \\TEXTBACKFILEPTR (PIECE F5 BINABLE FATSTREAMP F4 -CURRENTLOOKS F10 CHARSLEFT F2 COFFSET CPAGE CBUFSIZE CPPTR) PROCESS.RESULT (PROCFINISHEVENT) -\\TOP-LEVEL-READ (ENDOFSTREAMOP) TB.REMOVE.ITEM (TBITEMS TB#ITEMS TB#DELETED TBFIRSTSELECTEDITEM -TBLASTSELECTEDITEM) \\TEXTMENU.TOGGLEFN (ONFLG) PFI.HANDLE.DEFDEFINER (NAME PATTERNS TESTFN) -DASSEM.COUNTVARS (VARINDEX) PARSE-NSADDRESS (NSSOCKET NSHNM2 NSHNM1 NSHNM0 NSNETLO NSNETHI) READC ( -LASTCCODE) PUTSEQUIN (SEQCONTROL SEQSTATE) ADDCHAR (END LASTCOL) \\SPP.CREATE.WATCHER (SPPINPUTEVENT -SPPLOCK SPPROUNDTRIPTIME SPPPROCESS) \\LEAF.WHENCLOSED (LEAFCACHEDFILE LEAFABORTBUTTONWINDOW -LEAFSTATUS EPUSERFIELD SEQINPUTQLENGTH PFSLEAFSEQUIN) \\SPP.HANDLE.DATA (QLINK SYSQUEUEHEAD SPPSTATE -ACCESS STRMBOUTFN SPPTERMINATEDP SPPACKNO) MENU.HANDLER (XCOORD YCOORD) PRINTANDBOX (LEFT BOTTOM -HEIGHT WIDTH) CL:GET-OUTPUT-STREAM-STRING (F1) \\SUSPEND.PROCESS (PROCSTATUS NEXTPROCHANDLE PQLAST -PQNEXT) \\TRANSFERPAGE (PAGE#) GRAPHERPROP (GRAPH.PROPS) \\DSPCOLOR.IP (IPCOLOR) \\LET0 (\#FRAMENAME -NTSIZE NAMETABLE FAST NAMETABLE# VALIDNAMETABLE) SKIPSEPRCODES (LASTCCODE) \\SEND.ACK (ACKPENDING -ACKBYTESPERPUP ACKPUPS ACKBYTES SENTZEROALLOC) READMACROS (READMACROFLG) -%SYNONYM-STREAM-DEVICE-OUTCHARFN (CHARPOSITION) GRAPHADDNODE (GRAPHNODES) ADVISEWDS (LEFT BOTTOM WIDTH - HEIGHT) \\CARET.DOWN (STREAM) \\LET* (\#FRAMENAME NTSIZE NAMETABLE FAST NAMETABLE# VALIDNAMETABLE) -SEDIT::STRING-OFFSET (SEDIT::SELECT-END-X SEDIT::POINT-X) NOTIFY.EVENT (EVENTQUEUETAIL PROCEVENTLINK -PROCEVENTORLOCK EVENTWAKEUPPENDING) TEDIT.COPY (SET THACTION THLEN THCH# THFIRSTPIECE THOLDINFO -\\DIRTY \\XDIRTY TEXTLEN CH# CHLIM DCH DX POINT \\INSERTPCVALID) BRV/OFFSET (NODEPOSITION XCOORD -YCOORD) TEDIT.KILL (EDITFINISHEDFLG) \\FIXLINELENGTH.PSC (LINELENGTH) |\\VFMInsert1| (|used|) -\\FLUSHPAGE (|NActivePages| FILEPAGE |Key|) STRINGREGION (LEFT BOTTOM WIDTH HEIGHT) \\SETWINFOYSIZE ( -ATYSIZE) FB.SHAPECOMMAND (WIDTH HEIGHT LEFT) \\TEXTMENU.TOGGLE.CREATE (XSIZE YSIZE YDESC XKERN) -FB.FASTSEECOMMAND (SEEWINDOW) FB.MAYBE.WIDEN.NAMES (INFOSTART) \\DSPFONT.PSC (POSTSCRIPTFONT -POSTSCRIPTSPACEWIDTH POSTSCRIPTNATURALSPACEWIDTH POSTSCRIPTACCENTED POSTSCRIPTFONTCHANGEDFLG) -\\CREATE.TEDIT.RESTART.MENU (ITEMS LEFT BOTTOM) DELETETO (END LASTCOL) DASSEM.MATCHVARS (VARINDEX) -\\INSERTCR (PPARALAST \\INSERTPCVALID) \\QUEUE.OUTPUT.IOCB (DLFOROUTPUTUSE DLIOCBLENGTH DLNEXTIOCB -DLRETRANSMISSIONMASK DLIOCBSTATUS DLIOCBBUFFER DLIOCBBUFFERHI DLIOCBBUFFERLO DLFIRSTOCB DLLASTOCB -D0IOCBLENGTH D0NEXTIOCB D0RETRANSMISSIONMASK D0IOCBSTATUS D0IOCBBUFFER D0IOCBBUFFERHI D0IOCBBUFFERLO -D0FIRSTOCB D0LASTOCB) \\INSTALL.EXTERNALFORMAT (NAME) |\\PFRemoveRootDirEntry| (|countEntries|) -\\DOBUFFEREDTRANSITIONS (W0 W1 W2 W3 W4 W5 WU READ DUMMY1SHIFT DUMMY2SHIFT DUMMYLOCK DUMMYCTRL -DUMMYMETA DUMMYFONT DUMMYUSERMODE1 DUMMYUSERMODE2 DUMMYUSERMODE3 DUMMYALTGRAPH DUMMYDEADKEYPENDING) -\\DSPCLIPPINGREGION.PRESS (|PRClippingRegion|) \\SELECTREALPAGE (EMPTY VP NEXTRP) \\UPDATECHAIN ( -NEXTRP) PFI.PRINT.BITMAP (OUTCHARFN) %TWO-WAY-STREAM-DEVICE-OUTCHARFN (CHARPOSITION) CHAT (ITEMS TITLE - LEFT BOTTOM) SEDIT::SET-POINT-NOWHERE (SEDIT::POINT-NODE SEDIT::POINT-TYPE) COMP.STBIND (PARENT LEVEL - CPIOK OPNAME OPARG) TERM.RESET.DISPLAY.PARMS (PLAINFONT FONT CHATBOLDFONT ITALICFONT FONTHEIGHT -FONTWIDTH FONTDESCENT TTYHEIGHT TOPMARGIN BOTTOMMARGIN HOMEPOS TTYWIDTH) OPT.LABELNTHPR (FRAME LEVEL) -DMCHAT.HANDLECHARACTER (DINGED AUTOLF EATLF EATCRLF EATTOCRLF ADDRESSING ROLLMODE BRIGHTMODE IDMODE) -LOG (EXPONENT) TEDIT.REMOVE.MENUITEM (ITEMS MENUCOLUMNS MENUROWS) FB.ADJUST.DATE.WIDTH (INFOWIDTH) -\\DSPLEFTMARGIN.PSC (POSTSCRIPTLEFTMARGIN) \\SPP.PREPARE.OUTPUT (SPPOUTPKT CBUFPTR COFFSET CBUFMAXSIZE -) \\GC.HANDLEOVERFLOW (CLEAR DTDCNT0) CL:MAKE-CONCATENATED-STREAM (DEVICE ACCESS F1) -ONEDINSPECT.SELECTPROP (ELTWIDTH ELTLEFT ELTBOTTOM PROP) \\TFBRAVO.READ.PARALOOKS (TABSPEC FMTUSERINFO - LEFTMAR 1STLEFTMAR RIGHTMAR LINELEAD LEADAFTER LEADBEFORE FMTSPECIALX FMTSPECIALY QUAD FMTPARATYPE) -BROWSE/LAYOUT/LATTICE (GRAPHNODES SIDESFLG DIRECTEDFLG) \\NSFILING.DESERIALIZE (NSHDATUM) -INTERSECTREGIONS (LEFT BOTTOM WIDTH HEIGHT) \\NSFILING.CLOSE.CONNECTIONS (NSFILING.CONNECTION F3) -\\TEDIT.TABTYPE.SET (MARTABTYPE) ENCAPSULATEDOBJ.IMAGEBOXFN (XSIZE YSIZE YDESC XKERN) DISCARDPUPS ( -INQUEUELENGTH) \\SETMACROSYNTAX (READMACRODEFS MACROTYPE MACROFN) MSPRED (REP NEGATED MSVERB OTHERSET) - PRINSHUT (STOPX STOPY) INITIALIZECOLOR.IP (IPCOLORMODEL) \\SETWINFOXSIZE (ATXSIZE) \\RTP.CLEANUP ( -BSPUSERSTATE BSPINPUTSTREAM) SEDIT::NOTE-CHANGE-IN-SIMPLE (STRING SEDIT::WIDTH SEDIT::INLINE-WIDTH -SEDIT::PREFERRED-WIDTH SEDIT::ACTUAL-WIDTH SEDIT::ACTUAL-LLENGTH SEDIT::CHANGED?) \\BSP.SKIPBYTES ( -COFFSET) \\TRACKCURSOR (NEWMOUSEX NEWMOUSEY NEWMOUSESTATE) TEDIT.CARETLOOKS (\\INSERTPCVALID -CARETLOOKS) |\\UFSPrintTypeMenu| (TITLE ITEMS CENTERFLG LEFT BOTTOM) \\FUNCT1 (\#FRAMENAME NTSIZE -NAMETABLE FAST NAMETABLE# VALIDNAMETABLE) \\MEDW.PUTWINDOWPROP (RIGHTBUTTONFN BUTTONEVENTFN CLOSEFN -MOVEFN CURSORINFN CURSOROUTFN CURSORMOVEDFN RESHAPEFN REPAINTFN EXTENT SCROLLFN NEWREGIONFN PROCESS -WINDOWENTRYFN USERDATA) SEDIT::DETACH-NODE (SEDIT::LINEAR-THREAD) MOVENODE (XCOORD YCOORD) -\\TEDIT.LINECACHE (LCBITMAP) \\MAKESTACKP (STACKP0 EDFXP) MSNEXTWORD (MODIFIER) DMCHAT.CLEARMODES ( -BRIGHTMODE BLINKMODE IDMODE ADDRESSING ROLLMODE) VRULE.IMAGEBOXFN (XSIZE YSIZE YDESC XKERN) -\\FM.WINDOWEXTENT (WIDTH) \\DSPBOTTOMMARGIN.PRESS (PRBOTTOM) PROCESS.WINDOW (PROCWINDOW) -|\\PFCreateRootDirectory| (|fileID| |volNum| |type| |size| |filePage| |nextFilePage|) \\SEQUIN.PUT ( -PUPTYPE PUPDEST PUPDESTSOCKET RECEIVESEQ SENDSEQ MYSENDSEQ \#SEQTURNOVERS EPREQUEUE \#UNACKEDSEQS -ALLOCATE) SEDIT::RELINEARIZE (SEDIT::WINDOW-LEFT SEDIT::WINDOW-BOTTOM SEDIT::WINDOW-RIGHT SEDIT::WINDOW-TOP - SEDIT::RELINEARIZATION-TIME-STAMP SEDIT::SHIFT-Y SEDIT::SHIFT-DOWN SEDIT::BELOW? SEDIT::MATCHING? -SEDIT::CURRENT-BLOCK SEDIT::VISIBLE? SEDIT::BLOCK-START SEDIT::BLOCK-X SEDIT::BLOCK-NEW-X SEDIT::BITS? - SEDIT::BLOCK-WIDTH SEDIT::BLOCK-BASE-LINE SEDIT::BLOCK-ASCENT SEDIT::BLOCK-DESCENT SEDIT::REPAINT-X -SEDIT::REPAINT-LINE SEDIT::REPAINT-START SEDIT::CACHED-ASCENT SEDIT::CACHED-DESCENT SEDIT::CACHED-Y -SEDIT::CACHE-TIME SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::CURRENT-X SEDIT::CURRENT-NODE -SEDIT::CURRENT-LINE SEDIT::LINEAR-POINTER SEDIT::LINEAR-PREV SEDIT::LAST-LINEARIZED-SUB-NODE-INDEX -SEDIT::ACTUAL-WIDTH SEDIT::ACTUAL-LLENGTH SEDIT::LAST-LINE SEDIT::CHANGED? SEDIT::LINE-LENGTH -SEDIT::NEXT-LINE BOTTOM HEIGHT) SEDIT::FORMAT-FROM-INDENT (SEDIT::LIST-FORMATS SEDIT::LIST-SUBLISTS -SEDIT::LIST-INLINE? SEDIT::LIST-PFORMAT SEDIT::LIST-MFORMAT) SUPERPRINT/WRAPPER (WRAPPER) -\\SPPCONNECTION (SPPDESTINATIONKNOWN) \\FM.NUMBER-CHANGESTATE (FM.STATE) \\SETACCESS (ACCESSBITS -BINABLE BOUTABLE EXTENDABLE STRMBINFN STRMBOUTFN) \\LEAF.IDLE (LEAFCLOSING) COMP.MAP (OPNAME TAG) -\\CH.FIND.ORG.SERVER (DCDOMAIN DCKNOWNSERVERS OCORGANIZATION OCALLSERVERS OCDOMAINS NSOBJECT NSDOMAIN -NSORGANIZATION) \\FM.UPDATEGROUPEXTENT (LEFT BOTTOM WIDTH HEIGHT) \\DEFINEFONT.PRESS (PRESSFONTDIR -DESCR FONT# FONTSET# PRNEXTFONT# PRMAXFONTSET) \\MOVEREALPAGE (LOCKED VP FILEPAGE PAGE#) -|\\PFAddRootDirEntry| (|type| |file| |countEntries|) MSINTERPRETSET (REP HTABLES OSET DET TYPE QUOTED -ID NEGATED SET1 MSVERB TENSE VPART OTHERSET SET2 MSPATHOPTIONS FROM TO TOPFLG INVERTED HTABLE BADMARKS -) MENUITEMREGION (LEFT BOTTOM WIDTH HEIGHT) \\MAKENUMBER (HINUM LONUM) SEDIT::INSTALL-SPECIAL-FORMATS -(SEDIT::LIST-FORMATS SEDIT::LIST-INLINE? SEDIT::LIST-PFORMAT SEDIT::LIST-MFORMAT) \\INTERPRETER ( -MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) \\CREATE.JIS.EXTERNALFORMAT (INCCODEFN PEEKCCODEFN BACKCHARFN - FILEOUTCHARFN) \\FM.EDIT-SETUP (FM.REGION FM.MESSAGE FM.INITSTATE FM.SYSSELECTEDFN) -%INITIALIZE-CLSTREAM-TYPES (DEVICENAME RESETABLE RANDOMACCESSP NODIRECTORIES BUFFERED PAGEMAPPED -FDBINABLE FDBOUTABLE FDEXTENDABLE DEVICEINFO HOSTNAMEP EVENTFN DIRECTORYNAMEP REOPENFILE CLOSEFILE -GETFILENAME DELETEFILE GENERATEFILES RENAMEFILE BIN BOUT PEEKBIN READP EOFP BLOCKIN BLOCKOUT -FORCEOUTPUT GETFILEINFO SETFILEINFO CHARSETFN BACKFILEPTR INPUT-INDIRECTED OUTPUT-INDIRECTED -INPUTSTREAM OUTPUTSTREAM OPENFILE GETFILEPTR) FB.MAKECOUNTERWINDOW (LEFT BOTTOM HEIGHT WIDTH -COUNTERWINDOW) UTF16BE.OUTCHARFN (CHARPOSITION) \\TEXTPEEKBIN (COFFSET PIECE F5 CURRENTLOOKS F10 -BINABLE CBUFSIZE CHARSLEFT F2 CPAGE PCSTARTCH FW7 PCSTARTPG FW6 CURRENTPARALOOKS TICURPARALOOKS) -CREATE.NUMBERPAD.READER (ITEMS MENUCOLUMNS CENTERFLG MENUFONT WHENHELDFN WHENSELECTEDFN -MENUOUTLINESIZE ITEMHEIGHT LEFT BOTTOM HEIGHT XCOORD YCOORD WIDTH) TB.DO.ITEM.SELECTION (TISELECTED -TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM) \\TFBRAVO.HANDLE.HEADING (FMTPARATYPE FMTPARASUBTYPE -FMTSPECIALX FMTSPECIALY) COMP.STSETQ (OPNAME OPARG) \\TEDIT.FIXCHANGEDLINE (DESC YBOT YBASE NEXTLINE) -MSNEGATESET (REP NEGATED) PRIN2-LONG-STRING (LONGSTRINGP LONGSTRING1MARGINP LONGSTRINGSYMMETRICP) -TTDELETELINE (END LASTCOL) \\PROC.RESUME (ACLINK \#BLINK \#CLINK \#ALINK) RENUMBER.LINES (ROW) GETPUP -(INQUEUELENGTH) SPY.TREE (PACKAGE READTABLE PRINT-CASE CUMULATIVE THRESHOLD MERGETYPE DEPTH) -IMAGEOBJPROP (OBJECTDATUM DISPLAYFN IMAGEBOXFN PUTFN GETFN COPYFN BUTTONEVENTINFN COPYBUTTONEVENTINFN -WHENMOVEDFN WHENINSERTEDFN WHENDELETEDFN WHENCOPIEDFN WHENOPERATEDONFN PREPRINTFN IMAGECLASSNAME) -WINDOW.MOUSE.HANDLER (XCOORD YCOORD) OPENPUPSOCKET (PSOCKETHI PSOCKETLO PUPSOCEVENT) \\RSTRING2 ( -LASTCCODE) \\TEDIT.BLTCHAR (PBTDESTBIT PBTWIDTH PBTSOURCEBIT) FB.DEPTHCOMMAND (ITEMS CENTERFLG LEFT -BOTTOM FBDEPTH) \\JISPEEK (IN.KANJIIN OUT.KANJIIN) %TWO-WAY-STREAM-DEVICE-CLOSEFILE (ACCESS F1 F2 -OPENFILELST) SHOWWTITLE (LEFT BOTTOM WIDTH HEIGHT) \\ENQUEUE (SYSQUEUEHEAD QLINK SYSQUEUETAIL) -\\DSPRIGHTMARGIN.PSC (POSTSCRIPTRIGHTMARGIN) \\GCMAPTABLE (CLEAR DTDCNT0) \\ATBLSET (REREADTABLE -REBASE) \\TFBRAVO.FONT.FROM.CHARLOOKS (CLFONT) TB.USERDATA (TBUSERDATA) SPP.CLEARATTENTION (SPPEOFP -SPPEOFBITS FW8 CBUFSIZE) \\CREATE.SHIFTJIS.EXTERNALFORMAT (INCCODEFN PEEKCCODEFN BACKCHARFN -FILEOUTCHARFN EOLVALID EOL) FB.MAKEHEADINGWINDOW (LEFT BOTTOM WIDTH HEIGHT) CLOSEHASHFILE (|File|) -MAKE-READER-ENVIRONMENT (REPACKAGE REREADTABLE REBASE) TTYIN.FINISH (OLDTAIL) |\\LFDirectorySearch| ( -DIRHOLEPTR F5 DIRPTR) CHAT.TYPEOUT.CLOSE (RUNNING?) \\TEDIT.PEEKBIN.NEW.PAGE (COFFSET CPPTR CPAGE -CBUFSIZE CHARSLEFT F2) DMCHAT.STATE (CLEARMODEFN) SPY.FIND.TREE (NAME COUNT) \\10MBSENDPACKET ( -EPNETWORK EPTYPE) PROCESS.EVAL (PROCEVAPPLYRESULT) |\\PFPutRootDirectory| (|fileID| |volNum| |type| -|size|) CHANGE.NODEFONT.SIZE (XCOORD YCOORD NODELABELBITMAP NODEFONT) |\\AddShade| (SHADEDITEMS) -TEDIT.REDO.REPLACE (POINT THOLDINFO THACTION THCH#) TTYIN (FIRSTLINE START ROW OLDTAIL STORAGECOUNTER) - CREATEWFROMIMAGE (SCREEN LEFT BOTTOM WIDTH HEIGHT) \\FM.NUMBER-SETUP (FM.REGION FM.MESSAGE -FM.INITSTATE FM.SYSSELECTEDFN) \\SETFVAR.UFN (VALUE) \\LEAF.OPENFILE (LEAFCACHEHITS LEAFCACHEMISSES -\#SEQRESTARTS \#SEQTIMEOUTS \#SEQDUPLICATES CBUFSIZE CBUFPTR EOLCONVENTION) \\TEDIT.CHARDELETE (OFFST -DISPLACED-P OFFSET LENGTH FILL-POINTER TOTAL-SIZE DIMS CHLIM CH# DCH) \\TEDIT.CREATEMENU (ITEMS -CENTERFLG MENUFONT WHENHELDFN WHENSELECTEDFN LEFT BOTTOM) \\TEDIT1 (\\WINDOW EDITFINISHEDFLG) -TB.REDISPLAY.ITEMS (TBMAXXPOS) SHOWSHADEDITEMS (WIDTH) \\DSPLINEFEED.PSC (POSTSCRIPTLINESPACING) -\\TEDIT.NEWREGIONFN (XCOORD YCOORD) TTYIN1RESTART (END NEXTLINE) \\TFBRAVO.READ.CHARLOOKS (CLUSERINFO -CLSIZE CLNAME CLOFFSET CLSTRIKE CLULINE CLBOLD CLITAL CLINVISIBLE) SEDIT::INSERT-COMMENT-CHARS (STRING - CL:STRUCTURE SEDIT::SUB-NODE-INDEX SEDIT::SUPER-NODE SEDIT::DEPTH) \\INSERTCH (PLEN \\INSERTLEN -\\INSERTLEFT \\INSERTNEXTCH THACTION THLEN THCH# THFIRSTPIECE THPOINT PSTR PLOOKS PPARALOOKS PPARALAST - PNEW \\INSERTSTRING \\INSERTPCNO \\INSERTPC \\INSERTFIRSTCH THOLDINFO TEXTLEN \\INSERTPCVALID \\DIRTY - \\XDIRTY PFATP) TEDIT.CURSOROUTFN (MOUSEREGION) DASSEM.DSTOREFNDEF (NA PV STARTPC ARGTYPE FRAMENAME -NTSIZE NLOCALS FVAROFFSET FIXED STKMIN) RESTOREBUF (OLDTAIL) \\TEDIT.COMMAND.RESET.SETUP (EDITOPACTIVE - TXTEDITING TXTHISTORY SELWINDOW) TEDIT.INSERT.UPDATESCREEN (CH# CHLIM POINT DCH SELKIND EDITOPACTIVE) - TTYIN.SETUP (TTOLDRIGHTFN TTOLDBUTTONFN TTOLDENTRYFN TTYINWINDOW) \\CREATE.EUC.EXTERNALFORMAT ( -INCCODEFN PEEKCCODEFN BACKCHARFN FILEOUTCHARFN) \\TEDIT.SET.WINDOW (\\WINDOW) \\TEDIT-OPEN-FONT-FILE ( -LINELENGTH) FB.INFOMENU.WHENSELECTEDFN (INFOMENUCHOICES) \\JISFILEOUTCHARFN (IN.KANJIIN OUT.KANJIIN -CHARPOSITION) CLOSEPUPSOCKET (PUPSOCEVENT) CREATEPOSITION (XCOORD YCOORD) \\JISIN (IN.KANJIIN -OUT.KANJIIN) SEDIT::SCAN-FOR-BOUNDS (SEDIT::FIRST-LINE SEDIT::PREV-LINE SEDIT::NEXT-LINE SEDIT::LAST-LINE - SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT) \\FM.TRANSPOSEVERT (BOTTOM) \\DSPFONT.PRESS (PRCURRFDE PRFONT - PRWIDTHSCACHE PRLINEFEED) \\TEDIT.RESTARTFN (\\WINDOW \\DIRTY \\XDIRTY ACCESSBITS) -BROWSE/LAYOUT/HORIZ/COMPACTLY (NODELABEL NODEID TONODES NODEWIDTH NODEHEIGHT FROMNODES GRAPHNODES -SIDESFLG DIRECTEDFLG) \\NSFILING.AFTER.LOGIN (FSLOGINCHANGED) SWAPPUPPORTS (PUPSOURCE -PUPSOURCESOCKETHI PUPSOURCESOCKETLO) \\CREATECHARSET.IP (CHARSETDESCENT CHARSETASCENT YWIDTHS) -OPT.PRDEL (NXT PREV) GETFRAMEVAR.IP (IPNEXTFRAMEVAR) FONTCREATE (FONTAVGCHARWIDTH) \\TEDIT.SET-TOTLEN -(TOTLEN) SENDPUP (EPTYPE PUPTCONTROL PUPSOURCESOCKETHI PUPSOURCESOCKETLO) OPENHASHFILE (|ByteStream| -|#Entries| |Size| |ValueType| |ItemLength| |Write?| |File| |Stream|) \\SETLOCALNSNUMBERS (NSHOST0 -NSHOST1 NSHOST2 NSHNM0 NSHNM1 NSHNM2) POSITION (CHARPOSITION) CL:MAKE-ECHO-STREAM (DEVICE ACCESS F1 F2 - LINELENGTH OUTCHARFN OPENFILELST) SPP.FLUSH.TO.EOF (COFFSET SPPEOFP SPPEOFBITS FW8) \\PROCESS.EVAL1 ( -PROCEVAPPLYRESULT) CL:MAKE-SYNONYM-STREAM (DEVICE ACCESS F1 LINELENGTH OUTCHARFN OPENFILELST) -\\GENERIC.DSPCREATE (USERCLOSEABLE OUTCHARFN IMAGEDATA PBTDISJOINT IMAGEOPS DEVICE ACCESS) -CL:MAKE-BROADCAST-STREAM (DEVICE ACCESS F1 OUTCHARFN) \\SETGROUPMIN (ATNOWX ATNOWY ATMINX ATMINY -ATMAXX ATMAXY) \\SEQUIN.PROCESS (SEQLASTRESTART SEQTIMEOUT) \\DECODETRANSITION (1SHIFT 2SHIFT LOCK -CTRL META FONT USERMODE1 USERMODE2 USERMODE3 WAITINGINTERRUPT INTCHARCODE) CL:MAKE-TWO-WAY-STREAM ( -DEVICE ACCESS F1 F2 LINELENGTH OUTCHARFN OPENFILELST) \\CREATE.THROUGH.EXTERNALFORMAT (INCCODEFN -PEEKCCODEFN BACKCHARFN FILEOUTCHARFN EOLVALID EOL) TEXTICON (XCOORD YCOORD) \\LEAF.WRITEPAGES ( -REVALIDATEFLG OPWORD HANDLE FILEADDRESS PAGE OFFSET DATALENGTH EOFBIT LEAFLENGTH) -%FILL-POINTER-STREAM-DEVICE-CLOSEFILE (F1) SEDIT::INSERT-COMMENT (SEDIT::OPEN-NODE-CHANGED?) -TTYIN.READ (LINEBUFSTATE F5) \\CARET.FLASH (STREAM STREAMX STREAMY RATE) \\BSP.PREPARE.OUTPUT ( -BSPCURRENTPUP F3 TYPEWORD CPPTR COFFSET CBUFMAXSIZE) \\EUCFILEOUTCHARFN (CHARPOSITION) -\\HANDLE.RAW.10TO3 (TRANSPUPHOST TRANSOPERATION EPREQUEUE) PROCESS.APPLY (PROCEVAPPLYRESULT) -TEDIT.FORMATTEXTBOX (PAGEFOOTNOTELINES PAGELINECACHE CACHE LTEXTOBJ LEFTMARGIN RIGHTMARGIN STATE -REQUIREDREGIONTYPE YBOT YBASE) \\INTERPRESSINIT (IMAGETYPE IMCLOSEFN IMXPOSITION IMYPOSITION IMFONT -IMLEFTMARGIN IMRIGHTMARGIN IMLINEFEED IMDRAWLINE IMDRAWCURVE IMDRAWCIRCLE IMDRAWELLIPSE IMFILLCIRCLE -IMBLTSHADE IMBITBLT IMNEWPAGE IMMOVETO IMSCALE IMTERPRI IMBOTTOMMARGIN IMTOPMARGIN IMFONTCREATE -IMSPACEFACTOR IMCOLOR IMSTRINGWIDTH IMCHARWIDTH IMSCALEDBITBLT IMCLIPPINGREGION IMFILLPOLYGON -IMDRAWARC IMPUSHSTATE IMPOPSTATE IMROTATE IMSCALE2 IMTRANSLATE IMDEFAULTSTATE IMOPERATION IMBITMAPSIZE - IMDRAWPOLYGON IMDRAWPOINT) \\DRAWLINE.PSC (POSTSCRIPTX POSTSCRIPTY POSTSCRIPTMOVEFLG) DCODERD (NA PV -STARTPC ARGTYPE FRAMENAME NTSIZE NLOCALS FVAROFFSET FIXED STKMIN) \\SHIFT.DOCUMENT (PPARALOOKS -1STLEFTMAR LEFTMAR RIGHTMAR TABSPEC) \\MEDW.DSPCREATE (USERCLOSEABLE IMAGEDATA PBTDISJOINT -|DDDestination| DEVICE ACCESS STRMBOUTFN OUTCHARFN IMAGEOPS) \\FM.TRANSPOSEHORZ (LEFT) -\\TEDIT.LCASE.SEL (THACTION) \\FM.EDIT-INSERT (WIDTH FM.BITMAP FM.LABEL) -SEDIT::PARENTHESIZE-CURRENT-SELECTION (SEDIT::POINT-NODE SEDIT::POINT-TYPE SEDIT::POINT-INDEX) -|\\SFFixY.HCPYMODE| (PBTDEST PBTDESTHI PBTDESTLO PBTSOURCE DDCHARHEIGHTDELTA PBTSOURCEHI PBTSOURCELO -PBTHEIGHT DDCHARSETDESCENT) \\PROCESS.APPLY1 (PROCEVAPPLYRESULT) \\SHIFTJISFILEOUTCHARFN (CHARPOSITION -) \\PUTSYSBUF (READ WRITE) CHAT.TTYENTRYFN (HELD) COMP.LOOKUPCONST (OPNAME OPARG) COMP.NUMBERTEST ( -OPNAME TAG) OPT.LBMERGE (TAG LEVEL FRAME) |\\PFNewPages| (|filePage| |volumePage| |nextFilePage| -|size|) PROMPTFORWORD (XCOORD YCOORD) TEDIT.FORMATFOLIO (CACHE LTEXTOBJ LEFTMARGIN RIGHTMARGIN YBOT -YBASE) FB.DISPLAY.COUNTERS (COUNTERPOSITIONS COUNTERPAGESTRING) \\MEDW.BLTCHAR (DDXPOSITION PBTDESTBIT - PBTWIDTH PBTSOURCEBIT) \\TRANSLATE.10TO3 (EPTYPE TRANSOPERATION TRANSSENDERPUPHOST EPREQUEUE) -WHO-LINE-SET-TIME (TITLE CENTERFLG ITEMS LEFT BOTTOM) DINFO.READ.KOTO.GRAPH (NODELST TOPNODEID -TEXTPROPS LOOKUPFN MENUFN NAME DEFAULTHOST DEFAULTDEVICE DEFAULTDIR) \\10MBGETPACKET (EPTYPE) -\\MEDW.XOFFSET (DDXOFFSET) \\MAIKO.10MBTURNONETHER (NDBCSB DLFIRSTOCB DLFIRSTICB DLOUTPUTMASK -DLINPUTMASK DLMISSEDPACKETS DLLASTICB DLLASTOCB) \\TEDITOUTCHARFN (CHARPOSITION) -\\MAKESPACEFORLOCKEDPAGE (|LastLockedFilePage|) TEDIT.SETSEL (ONFLG CH# CHLIM DCH POINT SELOBJ -\\TEXTOBJ BLUEPENDINGDELETE SET CARETLOOKS) \\FTPINIT (DEVICENAME OPENFILE REOPENFILE CLOSEFILE -DIRECTORYNAMEP GETFILENAME GETFILEINFO RENAMEFILE DELETEFILE GENERATEFILES EVENTFN OPENP REGISTERFILE -UNREGISTERFILE) FB.NEWINFOCOMMAND (ITEMS MENUROWS TITLE CENTERFLG MENUFONT WHENSELECTEDFN LEFT BOTTOM -XCOORD YCOORD INFOMENUW) \\LEAF.TRUNCATEFILE (OPWORD HANDLE FILEADDRESS PAGE OFFSET EOFBIT DATALENGTH -LEAFLENGTH) FREEATTACHEDWINDOW (XCOORD YCOORD) \\TEDIT.WORDDELETE (CH# CHLIM DCH) \\NOIMAGE.DSPFONT ( -IMAGEDATA) \\TEDIT.LOOKS (XCOORD YCOORD TITLE ITEMS CENTERFLG LEFT BOTTOM) -\\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (PNEW POBJ) CHAT.CHOOSE.EMULATOR (HOST DPYNAME DPYCODE) -\\TEDIT.COPY.LINEDESCRIPTOR (LEFTMARGIN RIGHTMARGIN LXLIM SPACELEFT LHEIGHT CHAR1 CHARLIM CHARTOP -DIRTY CR\\END LDOBJ LHASPROT LFMTSPEC LTRUEDESCENT LTRUEASCENT ASCENT DESCENT LHASTABS LMARK 1STLN -LSTLN) MSVERBED (MSVERB OTHERSET DET) BROWSE/LAYOUT/HORIZ (GRAPHNODES SIDESFLG DIRECTEDFLG) -GC-FILING-DIRECTORY (FSCACHEDHANDLES) \\SEQUIN.CLOSE (SEQSTATE) OPT.JUMPTHRU (TAG OPNAME) -|\\PFGetRootDirectory| (|fileID| |volNum| |type| |size|) \\RELEASE.ETHERPACKET (EPREQUEUE EPUSERFIELD -EPNETWORK EPPLIST EPSOCKET) \\PUPERROR (ERRORPUPCODE ERRORPUPARG PUPLENGTH PUPTYPE EPREQUEUE) -MSADDANALYZE (SETNAME GETDEF-FN MARKCHANGED-FN FILEPKGNAME) TEDIT.REDO.MOVE (CH# CHLIM DCH SET) -\\UNQUEUE.EVENT (EVLOCKQUEUETAIL EVENTQUEUETAIL PROCEVENTLINK PROCEVENTORLOCK) \\DONEWEPHEMERALPAGE ( -VP FILEPAGE PAGE#) \\FM.EDIT-PREPARETOEDIT (FM.SELECTEDFN) \\LOOKUPPUPNUMBER (XIPTYPE XIPLENGTH) -|\\PFTransferPage| (DISKADDRESS BUFFER RUNLENGTH LABEL MODE MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) -SPP.SENDATTENTION (FIRSTSPPDATABYTE XIPLENGTH) SEDIT::DEGRADE-COMMENT (SEDIT::UNASSIGNED) SETUPPUP ( -PUPLENGTH TYPEWORD PUPID PUPDEST PUPDESTSOCKET EPREQUEUE) MAKE-COMPILED-CLOSURE (FNHEADER ENVIRONMENT) - \\FM.CREATEITEM (FM.TYPE FM.LABEL FM.ID FM.GROUPID FM.INITSTATE FM.FONT FM.BITMAP FM.HIGHLIGHT -FM.REGION FM.MAXREGION FM.MESSAGE FM.LINKS FM.DOWNFN FM.HELDFN FM.MOVEDFN FM.SELECTEDFN) -INTERPRESS.OUTCHARFN (IPXPOS) \\TEDIT.OBJECT.SHOWSEL (LEFT BOTTOM WIDTH HEIGHT) \\CLOSEFILE (ACCESS) -FONTCLASS (FONTCLASSNAME PRETTYFONT# DISPLAYFD PRESSFD INTERPRESSFD OTHERFDS) \\CHANGECHARSET.HCPYMODE - (DDWIDTHSCACHE DDOFFSETSCACHE DDCHARIMAGEWIDTHS DDCHARSET PBTSOURCEBPL OTHERDEVICEFONTPROPS PBTSOURCE - PBTSOURCEHI PBTSOURCELO) SEDIT::CREATE-STRING-ITEM (STRING SEDIT::WIDTH SEDIT::FONT SEDIT::PRIN-2?) -SEDIT::CREATE-PRETTY-PRINT-ENV (SEDIT::DEFAULT-FONT SEDIT::ITALIC-FONT SEDIT::KEYWORD-FONT -SEDIT::COMMENT-FONT SEDIT::BROKEN-ATOM-FONT SEDIT::SPACE-WIDTH SEDIT::DEFAULT-LINE-SKIP SEDIT::INDENT-BASE - SEDIT::INDENT-STEP SEDIT::EM-WIDTH SEDIT::MAX-WIDTH) \\CARET.FLASH? (NEXT) SEDIT::DELETE-COMMENT ( -SEDIT::OPEN-NODE-CHANGED?) |\\LFMakeLeaderPage| (|seal| TYPE |typeHolder| |TimeCreate| |TimeWrite| -|FileID| |AllocatedPages| |EofPage| |EOffSet| |fileName| |author| |version|) EXTENDREGIONTOP (HEIGHT) -\\MEDW.YOFFSET (DDYOFFSET DDCHARSET DDCHARSETASCENT) INITSEQUIN (SEQSOCKET SEQSTATE SEQLOCK SEQEVENT -MYSENDSEQ MYRECEIVESEQ LASTACKEDSEQ SEQOUTALLOC \#UNACKEDSEQS \#SEQRESTARTS \#SEQDUPLICATES -\#SEQTIMEOUTS \#SEQRETRANSMITS \#SEQTURNOVERS SEQPROCESS) TERM.TAB (XPOS) TEDIT.FORMAT.HARDCOPY (PAGE# - FIRSTPAGE STATE MINPAGE# MAXPAGE# CHNO PAGEHEADINGS PAGE#GENERATOR PAGE#TEXT PRESSREGION -REQUIREDREGIONTYPE PAGECOUNT) \\TEXTINIT (IMAGETYPE IMXPOSITION IMYPOSITION IMLEFTMARGIN IMRIGHTMARGIN - IMFONT IMCLOSEFN IMFONTCREATE IMLINEFEED IMCHARWIDTH IMSTRINGWIDTH DEVICENAME RESETABLE RANDOMACCESSP - PAGEMAPPED GETFILENAME BIN BOUT CLOSEFILE OPENFILE DELETEFILE DIRECTORYNAMEP EVENTFN GENERATEFILES -GETFILEINFO HOSTNAMEP READPAGES REOPENFILE ACCESS SETFILEINFO BACKFILEPTR SETFILEPTR PEEKBIN GETEOFPTR - GETFILEPTR EOFP FDBINABLE FDBOUTABLE FDEXTENDABLE TRUNCATEFILE WRITEPAGES READCHARCODE BINABLE -BOUTABLE USERCLOSEABLE USERVISIBLE DEVICE F1 F2 F3 F5 FW6 FW7 MAXBUFFERS IMAGEOPS IMAGEDATA OUTCHARFN) - OBTAIN.MONITORLOCK (MLOCKOWNER MLOCKLINK PROCOWNEDLOCKS) TEDIT.FIND (THACTION THAUXINFO -\\INSERTPCVALID) SEDIT::CHECK-SELECTION (SEDIT::POINT-NODE) SEDIT::SET-SELECTION-NOWHERE ( -SEDIT::SELECT-NODE) \\TEMPLOCKPAGES (MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) RELEASE.MONITORLOCK ( -MLOCKOWNER PROCOWNEDLOCKS MLOCKLINK MLOCKQUEUETAIL PROCEVENTLINK PROCEVENTORLOCK) TB.MAKE.BROWSER ( -TBWINDOW TBFONT TBLOCK TB#LINESPERITEM TBBASELINE TBCOLUMNS TBPRINTFN TBCOPYFN TBCLOSEFN -TBAFTERCLOSEFN TBUSERDATA TBHEADINGWINDOW TBLINETHICKNESS TBITEMHEIGHT TBHEIGHTEXPLICIT TBREADY) -\\CURSORBITSPERPIXEL (CUIMAGE CUMASK) HASHFILEPROP (|ItemCopyFn|) TEDIT.PARALOOKS (TABKIND TABX -PPARALOOKS 1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER FMTBASETOBASE LINELEAD TABSPEC QUAD -FMTPARATYPE FMTPARASUBTYPE FMTSPECIALX FMTSPECIALY FMTNEWPAGEBEFORE FMTNEWPAGEAFTER FMTHEADINGKEEP -FMTKEEP FMTHARDCOPY FMTUSERINFO FMTREVISED FMTSTYLE FMTCHARSTYLES FMTCOLUMN \\DIRTY \\XDIRTY THACTION -THLEN THCH# THFIRSTPIECE THOLDINFO THAUXINFO) \\IMAGEIOINIT (IMAGETYPE IMXPOSITION IMYPOSITION IMFONT -IMLEFTMARGIN IMRIGHTMARGIN IMLINEFEED IMSPACEFACTOR IMFONTCREATE IMSTRINGWIDTH IMCHARWIDTH IMCHARSET -IMDRAWPOLYGON IMDRAWPOINT) ONEDINSPECT.SELECTITEM (ELTWIDTH ELTLEFT ELTBOTTOM PROP) \\NOTE.10TO3 ( -NDBTRANSLATIONS) DASSEM.DASSEM (OPNAME OPARG NVALS NNILS FREEVARINDEX JPT JMIN JD) MENUREGION (WIDTH -HEIGHT LEFT BOTTOM) RELEASINGVMEMPAGE (NOREFERENCE) CREATE.MONITORLOCK (MLOCKPERPROCESS MLOCKNAME) -READHOTSPOT (XCOORD YCOORD) TERM.SETMARGINS (TOPMARGIN BOTTOMMARGIN) CHAT.INIT (RUNNING? CHATINEMACS -INSTREAM OUTSTREAM WINDOW DSP TEXTSTREAM ENDOFSTREAMOP) \\TEDIT.APPLY.PAGEFORMATTING (\\DIRTY \\XDIRTY -) OPT.XVARSCAN1 (NOXVAR) TEDIT.FORMATHEADING (TEXTLEN CACHE LTEXTOBJ LEFTMARGIN RIGHTMARGIN YBOT YBASE -) \\FM.EDITSTART-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN) -SEDIT::CREATE-PRELINEARIZED-NODE (SEDIT::SUPER-NODE SEDIT::DEPTH SEDIT::SUB-NODE-INDEX) -\\ENQUEUE.EVENT/LOCK (PROCEVENTORLOCK PROCEVENTLINK EVLOCKQUEUETAIL EVENTQUEUETAIL) TEDIT.FORMATPAGE ( -STATE CHNO NEWPAGELAYOUT PAGE# FIRSTPAGE PAGE#TEXT PAGE#GENERATOR PAGECOUNT) |\\LFMakeDirEntry| ( -DIRINFO F4) \\SOFTCURSORUP (PBTDESTBPL PBTDEST PBTDESTHI PBTDESTLO PBTSOURCE PBTSOURCEHI PBTSOURCELO -PBTSOURCEBPL PBTWIDTH PBTHEIGHT) \\SETUFNENTRY (FNINDEX NEXTRA NARGS) SI::MONITOR-UNWIND (MLOCKOWNER -PROCOWNEDLOCKS MLOCKLINK MLOCKQUEUETAIL PROCEVENTLINK PROCEVENTORLOCK) \\NEWEPHEMERALPAGE (MISCSTACKFN - MISCSTACKARG1 MISCSTACKARG2) \\DEVICEEVENT (REVALIDATEFLG) \\SOFTCURSORUPCURRENT (PBTDEST PBTDESTHI -PBTDESTLO PBTDESTBIT PBTSOURCE PBTSOURCEHI PBTSOURCELO PBTSOURCEBIT PBTWIDTH PBTHEIGHT) \\DOFLUSHVM ( -MISCSTACKRESULT |CurrentFXP|) \\FM.EDITSTART-SELECTEDFN (FM.SELECTEDFN) \\HARDCURSORPOSITION ( -NEWMOUSEX NEWMOUSEY NEWMOUSESTATE) BITMAPCREATE (BITMAPRASTERWIDTH BITMAPWIDTH BITMAPHEIGHT -BITMAPBITSPERPIXEL BITMAPBASE) TTYIN1 (PEEKEDCHAR F3 FIRSTCOL LASTCOL) COMP.EXPR (EXTCALL) -\\TEDIT.TEXTBIN.NEW.PAGE (COFFSET CPPTR CPAGE CBUFSIZE CHARSLEFT F2) SEDIT::SET-SELECTION-ME ( -SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::SELECT-START-X SEDIT::SELECT-TYPE) -\\FLUSHVM (MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) \\HANDLE.NS.ROUTING.INFO (RTNET# RTTIMER -RTGATEWAY# RTNDB RTHOPCOUNT RTRECENT) FB.SETNEWPATTERN (PATTERN PREPAREDPATTERN PATTERNPARSED? -NSPATTERN?) \\CURSORDESTINATION (NEWMOUSEX NEWMOUSEY NEWMOUSESTATE PBTSOURCEBPL PBTDESTBPL) CALLSCCODE - (LNCALLED CALLED BOUND USEDFREE GLOBALS) \\EP.PUT.AUX (EPPLIST) \\RELEASEWORKINGSET (EMPTY VP) SYSOUT - (TOTALTIME) \\MAKE.PROCESS1 (PROCFX ACLINK \#BLINK \#CLINK \#ALINK) \\GETREGIONTRACKWITHBOX (XCOORD -YCOORD) EDITADDNODE (XCOORD YCOORD) \\PROCESS.MOVEFRAME (RESIDUAL IVAR NEXTBLOCK BLINK \#BLINK \#CLINK - SLOWP NAMETABLO |MiscFXP|) \\TEDIT.SELECT.CHARACTER (SELOBJ X0 Y0 LEFT BOTTOM WIDTH HEIGHT SET) -MAKEINITBFS (DISKDEVICENAME CBNEXT CBQUEUE) \\ABORT.BULK.DATA (COFFSET) SEDIT::CREATE-NEW-COMMENT ( -SEDIT::NODE-TYPE CL:STRUCTURE SEDIT::DEPTH SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH SEDIT::UNASSIGNED - SEDIT::SUB-NODES SEDIT::LINEAR-FORM) NEW/INSTANCE/OF/GRAPHNODE (NODEID NODELABEL NODEFONT NODEWIDTH -NODEHEIGHT NODEBORDER NODELABELSHADE) TOGGLE/DIRECTEDFLG (DIRECTEDFLG) EDITSHADEREPAINTFN (REGION -LABEL HELP) \\NSFILING.GETFILE (NSHATTRIBUTES NSFILING.NEW.ATTRIBUTES F5 NSHDATUM NSHACCESS -FULLFILENAME NSFILING.CONNECTION F3 NSFILING.HANDLE F4 DEVICE NSHBUSYCOUNT) -\\TEDIT.FILL.IN.CHARLOOKS.MENU (SET) \\DSPOPERATION.IP (IPOPERATION) \\TEDIT.CONVERT.FOREIGN.FORMAT ( -TXTPAGEFRAMES) FB.GET.SORT.MENU (SORTMENU ITEMS LEFT BOTTOM) SETBSPUSERINFO (BSPUSERSTATE) -FB.CREATE.FILEBUCKET (STARTOFPNAME VERSIONLESSNAME SUBDIREND STARTOFNAME HASDIRPREFIX DIRECTORYFILEP -FILEDEPTH FILENAME VERSION FILEINFO SIZE SORTVALUE) \\TEDIT.FORMAT.FOUNDBOX? (STATE) -\\GENERIC.READCCODE (LASTCCODE) \\MATCHPCS (PTREENODE UPWARD) TEDIT.PARSE.PAGEFRAMES (REGIONFILLMETHOD - REGIONTYPE REGIONLOCALINFO REGIONSPEC REGIONSUBBOXES) BRHL/LAYOUT/DAUGHTERS (FROMNODES) -COPYTEXTSTREAM (CH# CHLIM DCH TEXTLEN MENUFLG) |\\VFMGetInterval| (|key| |volumePage| |nextKey|) -OPENPRSTREAM (PRPAGEREGION PDSTREAM ELSTREAM PRDOCNAME LEFT BOTTOM WIDTH HEIGHT XPRPAGEREGION PRLEFT -PRBOTTOM PRRIGHT PRTOP OUTCHARFN IMAGEOPS IMAGEDATA PRHEADING) DISPLAYAFTERENTRY (BITMAPBASE) -\\TRANSLATE.3TO10 (EPTYPE TRANSOPERATION TRANSPUPHOST TRANSSENDERPUPHOST EPREQUEUE) TERM.SET.TAB ( -TERM.TAB.STOPS) CREATE-PROCESS-STREAM (ACCESS DEVICE EOLCONVENTION OPENFILELST) \\CREATECHARSET ( -|\\SFAscent| |\\SFDescent| |\\SFHeight|) OPT.XVARSCAN (NOXVAR) \\NSFILING.COPY/RENAME (FSCACHEDHANDLES - NSHBUSYCOUNT NSHDATUM NSHATTRIBUTES NSHNAME) SNAPW (SCREEN REGION) \\ENQUEUE.TIMER (PROCTIMERLINK) -\\UNQUEUE.TIMER (PROCTIMERLINK PROCTIMERSET) SEDIT::COPY-STRUCTURE-COMMENT-WORD (CL:STRUCTURE STRING) -BRHL/MOVE/RIGHT (XCOORD) FB.ALLOW.ABORT (UPDATEPROC) TEDIT.CURSORMOVEDFN (BOTTOM HEIGHT MOUSEREGION -LEFT WIDTH) OPENRTPSOCKET (RTPSTATE CONNID BSPINPUTHANDLER BSPOTHERPUPFN PUPSOC LCLPORT LCLSOCKET -BSPFAILURESTRING FRNPORT FRNSOCKET LISTENING BSPINITTIMER) CREATE.NEW.NODEPOSITION (XCOORD YCOORD) -|\\VFMGet1| (|key| |volumePage| |nextKey|) GRAPHADDLINK (FROMNODES TONODES) \\TEXTSETEOF (EPAGE -EOFFSET) \\FM.DISPLAY-SETUP (FM.MESSAGE) FB.INSERT.SUBDIRECTORIES (SUBDIREND) \\TEDIT.GET.CHARLOOKS ( -PNEW PFATP PLOOKS PLEN PFPOS) \\DISPLAYINIT (WSDESTINATION WSREGION LEFT BOTTOM WIDTH HEIGHT IMAGETYPE - IMFONT IMLEFTMARGIN IMRIGHTMARGIN IMLINEFEED IMXPOSITION IMYPOSITION IMCLOSEFN IMDRAWCURVE -IMFILLCIRCLE IMDRAWLINE IMDRAWELLIPSE IMDRAWCIRCLE IMFILLPOLYGON IMBITBLT IMSCALEDBITBLT IMBLTSHADE -IMNEWPAGE IMSCALE IMSPACEFACTOR IMFONTCREATE IMCOLOR IMBACKCOLOR IMOPERATION IMSTRINGWIDTH IMCHARWIDTH - IMCLIPPINGREGION IMRESET IMDRAWARC IMDRAWPOLYGON IMDRAWPOINT IMBLTCHAR IMXOFFSET IMYOFFSET DEVICENAME - RESETABLE RANDOMACCESSP PAGEMAPPED CLOSEFILE DELETEFILE GETFILEINFO OPENFILE READPAGES SETFILEINFO -GENERATEFILES TRUNCATEFILE WRITEPAGES GETFILENAME REOPENFILE EVENTFN DIRECTORYNAMEP HOSTNAMEP BIN BOUT - PEEKBIN BACKFILEPTR BLOCKIN BLOCKOUT WINDOWOPS WINDOWDATA DEVICEINFO) CL:VALUES (PC) -SEDIT::CREATE-GAP-NODE (SEDIT::NODE-TYPE CL:STRUCTURE SEDIT::SUB-NODES SEDIT::INLINE-WIDTH -SEDIT::PREFERRED-WIDTH SEDIT::ACTUAL-LLENGTH SEDIT::ACTUAL-WIDTH SEDIT::LINEAR-FORM) CREATEHASHFILE ( -|ByteStream| |File| |Stream| |Size| |#Entries| |Write?| |ValueType| |ItemCopyFn| |ItemLength|) -DINFO.GET.GRAPH.WINDOW (GRAPH.WINDOW) SEDIT::COPY-STRUCTURE-COMMENT (CL:STRUCTURE) \\SIMULATE.UNBIND ( -NEXTBLOCK FASTP \#BLINK \#CLINK SLOWP) OPT.SCANOPT (OPNAME OPARG) \\PROCESS.INIT (DEVICENAME EVENTFN -DIRECTORYNAMEP HOSTNAMEP) SEDIT::CREATE-NODE (SEDIT::NODE-TYPE SEDIT::SUPER-NODE CL:STRUCTURE -SEDIT::SUB-NODES SEDIT::DEPTH SEDIT::SUB-NODE-INDEX SEDIT::LINEAR-FORM) CL:VALUES-LIST (PC) -\\GETSYSBUF (READ) \\FM.PUSHGROUP (BOTTOM LEFT) ICONW (LEFT BOTTOM WIDTH HEIGHT) -\\NSFILING.GENERATEFILES (NEXTFILEFN FILEINFOFN GENFILESTATE NSGENERATOR NSFILTER NSCONNECTION -NSIGNOREDIRECTORIES NSBULKSTREAM) \\LEAF.REOPENFILE (VALIDATION) TEDIT.SUBSTITUTE (TEXTLEN CARETLOOKS -CHLIM CH# DCH) XIPAPPEND.CELL (XIPLENGTH) NESTED.SUBMENU (ITEMS MENUOFFSET XCOORD YCOORD -CHANGEOFFSETFLG CENTERFLG MENUFONT MENUBORDERSIZE MENUOUTLINESIZE WHENHELDFN WHENUNHELDFN SUBITEMFN -LEFT BOTTOM) \\MAIKO.INPUT.INTERRUPT (10MBLENGTH EPNETWORK EPTYPE DLFIRSTICB) \\OPENFILE (ACCESS CPAGE - COFFSET) DBG::NEAR-BY-REGION (LEFT BOTTOM WIDTH HEIGHT) \\CREATE.TWODINSPECTOR.INSPECTMENU (ITEMS -LEFT BOTTOM) \\LEAF.DIRECTORYNAMEP (PFSKNOWNDIRS) \\PAGEDBACKFILEPTR (COFFSET CBUFDIRTY CBUFSIZE -CBUFPTR CPAGE CHARPOSITION) TERM.RIGHT (XPOS) \\UNWIND.UFN (NEXTBLOCK NOPUSH) \\TEDITPAGEMENU.CREATE ( -MBSTRING MBFONT) \\DSPPRINTCHAR (CHARPOSITION) CL::VALUES-UFN (HIBYTE LOBYTE NEXTBLOCK PC) -OPT.SETUPOPT (PREV NXT) \\CREATECHARSET.PSC (OFFSETS IMAGEWIDTHS) PTPLUS (XCOORD YCOORD) -\\PROMPTWINDOW.SET.HEIGHT (XCOORD YCOORD) TRANSGRAPH (GRAPHNODES NODEPOSITION XCOORD YCOORD) -TEDIT.BUILD.PCTB1 (TXTPAGEFRAMES PPARALAST FORMATTEDP PFILE PFPOS PLEN PREVPIECE PPARALOOKS NEXTPIECE -PLOOKS) \\DO.PARAMS.AT.OPEN (EOLCONVENTION) FB.SORTCOMMAND (SORTVALUE STARTOFPNAME NOSUBDIRECTORIES -SORTBY SORTATTRIBUTE SORTINDEX SORTBYDATE) MB.NWAYBUTTON.SELFN (LEFT BOTTOM WIDTH HEIGHT) -SEDIT::CREATE-ENVIRONMENTS (SEDIT::PARSE-INFO SEDIT::PARSE-INFO-UNKNOWN SEDIT::DEFAULT-FONT -SEDIT::ITALIC-FONT SEDIT::KEYWORD-FONT SEDIT::COMMENT-FONT SEDIT::BROKEN-ATOM-FONT SEDIT::SPACE-WIDTH -SEDIT::DEFAULT-LINE-SKIP SEDIT::COMMAND-TABLE SEDIT::HELP-MENU SEDIT::DEFAULT-CHAR-HANDLER SEDIT::EM-WIDTH - SEDIT::INDENT-BASE SEDIT::INDENT-STEP SEDIT::MAX-WIDTH SEDIT::COMMENT-WIDTH-PERCENT -SEDIT::INIT-COMMENT-SEPARATION) SETFILEINFO (EOLCONVENTION ENDOFSTREAMOP MAXBUFFERS) \\KEYBOARDINIT ( -READ WRITE) \\CREATE.TWODINSPECTOR.SETMENU (ITEMS LEFT BOTTOM) TRACKW (XCOORD YCOORD) \\SPLITTREE ( -COUNT UPWARD TOTLEN) \\DRAWPOLYGON.DISPLAY (BRUSHSHAPE) SEDIT::COMPUTE-SELECTION-POSITION-COMMENT ( -SEDIT::SELECT-START-LINE SEDIT::SELECT-START-X SEDIT::SELECT-END-LINE SEDIT::SELECT-END-X) -EXTENDREGIONLEFT (LEFT WIDTH) %COPY-ONED-ARRAY (BASE STRING-P FILL-POINTER-P TYPE-NUMBER FILL-POINTER -TOTAL-SIZE) TEDIT.REDO (CH# CHLIM DCH POINT \\INSERTPCVALID) SEDIT::CREATE-CONSTANT-STRINGS ( -SEDIT::LPAREN-STRING SEDIT::RPAREN-STRING SEDIT::DOT-STRING SEDIT::QUOTE-STRING SEDIT::COMMENT-STRING) - SEDIT::UNDO (SEDIT::UNDO-LIST SEDIT::UNDO-UNDO-LIST) \\DSPCLIPPINGREGION.DISPLAY (|DDClippingRegion| -DDCHARSET DDCHARSETASCENT) |\\LFGenFileID| (|lastIDAllocated|) \\CLEARSYSBUF (READ PROCTYPEAHEAD) -DBG::DEBUGGER-BUTTON-EVENT (ITEMS WHENHELDFN LEFT BOTTOM) SEDIT::BUILD-WINDOW (SEDIT::DISPLAY-WINDOW -SEDIT::WINDOW-LEFT SEDIT::WINDOW-BOTTOM SEDIT::WINDOW-RIGHT SEDIT::WINDOW-TOP) \\SETGLOBALVAL.UFN ( -VALUE) \\SMASHMENUIMAGEONRESET (IMAGE) \\RPLACD.UFN (CDR FULLCARFIELD CDRCODE NEXTCELL CNT) -\\DOVMEMFULLINTERRUPT (VMEMFULL) TEDIT.STYLESHEET (TXTSTYLESHEET) TTYINBUFFERDEVICE (DEVICENAME + SEDIT::STRINGIFY SEDIT::LINEAR-ITEM) \TEDIT.COMMAND.RESET.SETUP (EDITOPACTIVE TXTEDITING TXTHISTORY +SELWINDOW) \TEXTMENU.TOGGLE.CREATE (XSIZE YSIZE YDESC XKERN) \ALLOCWIDTHTOGROUPEDWINDOW (ATXSIZE) +TEDIT.REDO.REPLACE (POINT THOLDINFO THACTION THCH#) \PFPatchRootDirEntries (countEntries) COMP.BLOCK ( +LEVEL FRAME PROGLABELS BLOCKCONTEXT BLOCKTAG BLOCKEND) DELETETO (END LASTCOL) DO.SHIFTED.SELECTION ( +COLPOS ROWPOS) OPT.RESOLVEJUMPS (JSN JML JU) TTYIN (FIRSTLINE START ROW OLDTAIL STORAGECOUNTER) +\SEND.RFC (PUPLENGTH PUPTYPE PUPID PUPSOURCE LCLPORT) \TEDIT.SET-TOTLEN (TOTLEN) \FLUSHPUPSOCQUEUE ( +INQUEUELENGTH) MAKEINITBFS (DISKDEVICENAME CBNEXT CBQUEUE) \BSP.SENDBUFFER (PUPLENGTH PUPID AUXWORD +XMITBYTEID BSPFILEPTRLO BSPFILEPTRHI FW6 %#UNACKEDPUPS %#UNACKEDBYTES PUPALLOC BYTEALLOC BSPCURRENTPUP + CBUFMAXSIZE CBUFSIZE CPPTR EPREQUEUE) FB.MAKEHEADINGWINDOW (LEFT BOTTOM WIDTH HEIGHT) \GCMAPTABLE ( +CLEAR DTDCNT0) \TEDIT.OBJECT.SHOWSEL (LEFT BOTTOM WIDTH HEIGHT) \FM.FORMAT (LEFT BOTTOM WIDTH HEIGHT) +VRULE.IMAGEBOXFN (XSIZE YSIZE YDESC XKERN) INTERPRESS.OUTCHARFN (IPXPOS) \DECODETRANSITION (1SHIFT +2SHIFT LOCK CTRL META FONT USERMODE1 USERMODE2 USERMODE3 WAITINGINTERRUPT INTCHARCODE) \LEAF.RECONNECT + (PFSLEAFSEQUIN) TTYIN.READ (LINEBUFSTATE) \FM.3STATE-CHANGESTATE (FM.STATE FM.BITMAP FM.REGION) +\TEDIT.LINECACHE (LCBITMAP) \LEAF.TIMEDOUT (LEAFTIMEOUTSTATUS) TTYIN.SETUP (TTOLDRIGHTFN TTOLDBUTTONFN + TTOLDENTRYFN TTYINWINDOW) \SETXFORM.PSC (POSTSCRIPTPENDINGXFORM POSTSCRIPTMOVEFLG +POSTSCRIPTFONTCHANGEDFLG) PROCESS.EVAL (PROCEVAPPLYRESULT) MAKEMACFORMAT (NAME INCCODEFN PEEKCCODEFN +BACKCCODEFN OUTCHARFN) TEDIT.REMOVE.MENUITEM (ITEMS MENUCOLUMNS MENUROWS) \PROCESS.EVAL1 ( +PROCEVAPPLYRESULT) \NSFILING.INIT (DEVICENAME HOSTNAMEP EVENTFN) \BUILD.EXPEDITED.XIP (LOWVERSION +HIGHVERSION MSGTYPE TRANSACTIONID PROGRAM# VERSION# PROCEDURE# XIPLENGTH) TTYINBUFFERBIN (TTYINPUT) +TTYIN.FINISH (OLDTAIL) DEFAULT.INSPECTW.TITLECOMMANDFN (ITEMS) \IMAGEIOINIT (IMAGETYPE IMXPOSITION +IMYPOSITION IMFONT IMLEFTMARGIN IMRIGHTMARGIN IMLINEFEED IMSPACEFACTOR IMFONTCREATE IMSTRINGWIDTH +IMCHARWIDTH IMCHARSET IMDRAWPOLYGON IMDRAWPOINT) \TEDIT.HARDCOPY.FORMATLINE (LOOKSUPDATEFN CHARLIM +CHAR1 CR\END LHASTABS LSTLN TLFIRSTSPACE PC PCOFF PCNO PIECE 1STLN LEFTMARGIN RIGHTMARGIN PTTABX +LHEIGHT ASCENT DESCENT CHARTOP LXLIM DESC LEN SPACELEFT LFMTSPEC) \SEQUIN.CONTROL (PUPLENGTH +SEQCONTROL) TERM.TAB (XPOS) DCODERD (NA PV STARTPC ARGTYPE FRAMENAME NTSIZE NLOCALS FVAROFFSET FIXED) +RELEASINGVMEMPAGE (NOREFERENCE) TB.REMOVE.ITEM (TBITEMS TB#ITEMS TB#DELETED TBFIRSTSELECTEDITEM +TBLASTSELECTEDITEM) \MEDW.BLTCHAR (DDXPOSITION PBTDESTBIT PBTWIDTH PBTSOURCEBIT) +\NSRANDOM.ENSURE.WATCHER (NSWATCHERPROC) \DSKDISPLAY.CREATE.WINDOW (WIDTH HEIGHT LEFT BOTTOM XCOORD +YCOORD) \TEDIT.CREATEMENU (ITEMS CENTERFLG MENUFONT WHENHELDFN WHENSELECTEDFN) SPP.CLEAREOM (SPPEOFP) +\MEDW.XOFFSET (DDXOFFSET) FB.ADD.FILEGROUP (TIDATA) CHAT.CHOOSE.EMULATOR (HOST DPYNAME DPYCODE) +CL:MAKE-BROADCAST-STREAM (DEVICE ACCESS F1 OUTCHARFN) TTYIN1 (PEEKEDCHAR FIRSTCOL LASTCOL) +\TEDIT.TABTYPE.SET (MARTABTYPE) \MEDW.YOFFSET (DDYOFFSET DDCHARSET DDCHARSETASCENT) CREATEARRAYSLICE ( +SELECTEDDIMS OFFSETS OFFSETCONSTANT LINEARIZEDARRAY) FB.MAKECOUNTERWINDOW (LEFT BOTTOM HEIGHT WIDTH +COUNTERWINDOW) \PUTSYSBUF (READ WRITE) CL:MAKE-ECHO-STREAM (DEVICE ACCESS F1 F2 LINELENGTH OUTCHARFN +OPENFILELST) WINDOWPOSITION (XCOORD YCOORD) \TEDIT.COPYTEXTSTREAM.PIECEMAPFN (PNEW POBJ) +\NOIMAGE.DSPFONT (IMAGEDATA) \CREATECHARSET.IP (CHARSETDESCENT CHARSETASCENT YWIDTHS) INITGC (FREEPTR +NEXTFREE) \TEDIT.NEWREGIONFN (XCOORD YCOORD) CL:MAKE-SYNONYM-STREAM (DEVICE ACCESS F1 LINELENGTH +OUTCHARFN OPENFILELST) \VFMGetPageGroup (fileID filePage type volumePage nextFilePage) TTDELETELINE ( +END LASTCOL) BRV/OFFSET (NODEPOSITION XCOORD YCOORD) \SPP.CREATE.STREAMS (SPPINPUTSTREAM +SPP.CONNECTION STRMBOUTFN SPPOUTPUTSTREAM DEVICEINFO) CL:MAKE-TWO-WAY-STREAM (DEVICE ACCESS F1 F2 +LINELENGTH OUTCHARFN OPENFILELST) \TFBRAVO.READ.PARALOOKS (TABSPEC FMTUSERINFO LEFTMAR 1STLEFTMAR +RIGHTMAR LINELEAD LEADAFTER LEADBEFORE FMTSPECIALX FMTSPECIALY QUAD FMTPARATYPE) \TEDIT-OPEN-FONT-FILE + (LINELENGTH) CHANGE.NODEFONT.SIZE (XCOORD YCOORD NODELABELBITMAP NODEFONT) FB.FASTSEECOMMAND ( +SEEWINDOW) \PROCESS.APPLY1 (PROCEVAPPLYRESULT) \TEDIT.LCASE.SEL (THACTION) \TEDIT.RESTARTFN (\WINDOW +\DIRTY ACCESSBITS) \TEDIT.SET.WINDOW (\WINDOW) \TFBRAVO.FONT.FROM.CHARLOOKS (CLFONT) PROCESS.APPLY ( +PROCEVAPPLYRESULT) FONTCLASS (FONTCLASSNAME PRETTYFONT# DISPLAYFD PRESSFD INTERPRESSFD OTHERFDS) +\ALLOCHEIGHTTOGROUPEDWINDOW (ATYSIZE) \NSFILING.CONNECT (NSHDIRECTORYPATH NSHDATUM) SPY.TREE (PACKAGE +READTABLE PRINT-CASE CUMULATIVE THRESHOLD MERGETYPE DEPTH) TB.USERDATA (TBUSERDATA) PROMPTFORWORD ( +XCOORD YCOORD) GETFRAMEVAR.IP (IPNEXTFRAMEVAR) \LEAF.WHENCLOSED (LEAFCACHEDFILE LEAFABORTBUTTONWINDOW +LEAFSTATUS SEQINPUTQLENGTH PFSLEAFSEQUIN) \VFMMerge1 (used key) \LINEBLT (PBTDEST PBTSOURCE +PBTGRAYOFFSET PBTDESTBIT PBTSOURCEBIT PBTWIDTH) \SPP.ESTABLISH (SPPATTENTIONFN SPPWHENCLOSEDFN +SPPERRORHANDLER SPPDESTID SPPSYSPKT SPPESTABLISHEDP SPPSTATE SPPDESTINATIONKNOWN) MSINTERPRET (TENSE +REP MSVERB OTHERSET ROOT MODIFIER) DEFAULT.INSPECTW.PROPCOMMANDFN (ITEMS) MOVENODE (XCOORD YCOORD) +BROWSE/LAYOUT/LATTICE (GRAPHNODES SIDESFLG DIRECTEDFLG) TTYIN1RESTART (END NEXTLINE) +\TEDIT.FIXCHANGEDLINE (DESC YBOT YBASE NEXTLINE) PUTSEQUIN (SEQCONTROL SEQSTATE) \CURSORBITSPERPIXEL ( +CUIMAGE CUMASK) MAKE-COMPILED-CLOSURE (FNHEADER ENVIRONMENT) COPYIMAGEOBJ (OBJECTDATUM IMAGEOBJPLIST +IMAGEOBJFNS) \CREATE.TITLEMENU (ITEMS) LOOKUP.NS.SERVER (NSSOCKET) \TFBRAVO.READ.CHARLOOKS (CLUSERINFO + CLSIZE CLNAME CLOFFSET CLSTRIKE CLULINE CLBOLD CLITAL CLINVISIBLE) \BSP.FLUSH.SOCKET.QUEUES (CBUFSIZE + BSPCURRENTPUP CPPTR) SELECT.ATOM.ASPECT (ITEMS TITLE CENTERFLG) INITDATATYPENAMES (DTDNAME DTDPTRS +DTDFINALIZABLE) TEDIT.CURSOROUTFN (MOUSEREGION) \SHIFT.DOCUMENT (PPARALOOKS 1STLEFTMAR LEFTMAR +RIGHTMAR TABSPEC) \SPP.SKIPBYTES (COFFSET) TRANSLATEREG (LEFT BOTTOM WIDTH HEIGHT) \TFBRAVO.PARSE.PARA + (PARALOOKS RUNS RUNLENGTH RUNLOOKS) \CURSORDESTINATION (NEWMOUSEX NEWMOUSEY NEWMOUSESTATE +PBTSOURCEBPL PBTDESTBPL) FW-INIT-PROPS (XCOORD YCOORD) \TEDIT.WORDDELETE (CH# CHLIM DCH) +\TEDITOUTCHARFN (CHARPOSITION) MSQUOTED (QUOTED) \CLOSEFILE (ACCESS) \UNQUEUE.EVENT (EVLOCKQUEUETAIL +PROCEVENTLINK PROCEVENTORLOCK) SEDIT::CHANGE-QUOTE (SEDIT::UNASSIGNED) DINFO.READ.KOTO.GRAPH (NODELST +TOPNODEID TEXTPROPS LOOKUPFN MENUFN NAME DEFAULTHOST DEFAULTDEVICE DEFAULTDIR) CHAT.INIT (RUNNING? +CHATINEMACS INSTREAM OUTSTREAM WINDOW DSP TEXTSTREAM ENDOFSTREAMOP) SEDIT::STRING-OFFSET ( +SEDIT::SELECT-END-X SEDIT::POINT-X) \ENQUEUE.EVENT/LOCK (PROCEVENTORLOCK PROCEVENTLINK EVLOCKQUEUETAIL +) FB.SHAPECOMMAND (WIDTH HEIGHT LEFT) GRAPHADDNODE (GRAPHNODES) MAKEIBMFORMAT (NAME INCCODEFN +PEEKCCODEFN BACKCCODEFN OUTCHARFN) SPY.FIND.TREE (NAME COUNT) \MAKESPACEFORLOCKEDPAGE ( +LastLockedFilePage) \TEDIT.BLTCHAR (PBTDESTBIT PBTWIDTH PBTSOURCEBIT) \SPP.CREATE.WATCHER ( +SPPINPUTEVENT SPPLOCK SPPROUNDTRIPTIME SPPPROCESS) TB.MAKE.BROWSER (TBWINDOW TBFONT TBLOCK +TB#LINESPERITEM TBBASELINE TBCOLUMNS TBPRINTFN TBCOPYFN TBCLOSEFN TBAFTERCLOSEFN TBUSERDATA +TBHEADINGWINDOW TBLINETHICKNESS TBITEMHEIGHT TBHEIGHTEXPLICIT TBREADY) \SPP.HANDLE.DATA (QLINK +SYSQUEUEHEAD SPPSTATE ACCESS STRMBOUTFN SPPTERMINATEDP SPPACKNO) \MOVETO.PSC (POSTSCRIPTX POSTSCRIPTY +POSTSCRIPTMOVEFLG) FB.MAYBE.WIDEN.NAMES (INFOSTART) CHAT (ITEMS TITLE) OBTAIN.MONITORLOCK (MLOCKOWNER +MLOCKLINK PROCOWNEDLOCKS) DISPLAYAFTERENTRY (BITMAPBASE) \CREATE.SETABLEMENU (ITEMS) +\HARDCURSORPOSITION (NEWMOUSEX NEWMOUSEY NEWMOUSESTATE) \DEVICEEVENT (REVALIDATEFLG) +\QUEUE.OUTPUT.IOCB (DLFOROUTPUTUSE DLIOCBLENGTH DLNEXTIOCB DLRETRANSMISSIONMASK DLIOCBSTATUS +DLIOCBBUFFER DLFIRSTOCB DLLASTOCB D0IOCBLENGTH D0NEXTIOCB D0RETRANSMISSIONMASK D0IOCBSTATUS +D0IOCBBUFFER D0FIRSTOCB D0LASTOCB) INSPECT/BITMAP (ITEMS) CLOSEHASHFILE (File) SYSOUT (TOTALTIME) +ICONPOSITION.FROM.WINDOW (XCOORD YCOORD) \SETUFNENTRY (FNINDEX NEXTRA NARGS) FB.ADJUST.DATE.WIDTH ( +INFOWIDTH) SEDIT::SET-POINT-NOWHERE (SEDIT::POINT-NODE SEDIT::POINT-TYPE) \RTP.HANDLE.RFC (NET +PUPLENGTH TYPEWORD EPREQUEUE) \SOFTCURSORUP (PBTDESTBPL PBTDEST PBTSOURCE PBTSOURCEBPL PBTWIDTH +PBTHEIGHT) DOICONWINDOWCOM (ITEMS CHANGEOFFSETFLG MENUOFFSET XCOORD YCOORD WHENHELDFN WHENUNHELDFN +CENTERFLG) \NEWEPHEMERALPAGE (MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) \PFPurgeRootDirectory (fileID +volNum type size) \TEDIT.TEXTBIN.NEW.PAGE (COFFSET CPPTR CPAGE CBUFSIZE CHARSLEFT) +\SOFTCURSORUPCURRENT (PBTDEST PBTDESTBIT PBTSOURCE PBTSOURCEBIT PBTWIDTH PBTHEIGHT) +\DONEWEPHEMERALPAGE (VP FILEPAGE PAGE#) RELEASE.MONITORLOCK (MLOCKOWNER PROCOWNEDLOCKS MLOCKLINK +MLOCKQUEUETAIL PROCEVENTLINK PROCEVENTORLOCK) BITMAPCREATE (BITMAPRASTERWIDTH BITMAPWIDTH BITMAPHEIGHT + BITMAPBITSPERPIXEL BITMAPBASE) FW-AFTERMOVEFN (XCOORD YCOORD) OPT.PRATTACH (NXT PREV) TEDIT.REDO.MOVE + (CH# CHLIM DCH SET) OPENPRSTREAM (PRPAGEREGION PDSTREAM ELSTREAM PRDOCNAME OUTCHARFN IMAGEOPS +IMAGEDATA PRHEADING) DISCARDPUPS (INQUEUELENGTH) CREATE.MONITORLOCK (MLOCKPERPROCESS MLOCKNAME) +\NSFILING.OPENFILE (OPENFILELST) DOATTACHEDWINDOWCOM (ITEMS CHANGEOFFSETFLG MENUOFFSET XCOORD YCOORD +WHENHELDFN WHENUNHELDFN CENTERFLG) TERM.SET.TAB (TERM.TAB.STOPS) UNIONREGIONS (LEFT BOTTOM WIDTH +HEIGHT) SI::MONITOR-UNWIND (MLOCKOWNER PROCOWNEDLOCKS MLOCKLINK MLOCKQUEUETAIL PROCEVENTLINK +PROCEVENTORLOCK) \FM.3STATE-SETUPOFFBITMAP (FM.HIGHLIGHT) SEDIT::NOTE-CHANGE-IN-SIMPLE (STRING SEDIT::WIDTH + SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH SEDIT::ACTUAL-WIDTH SEDIT::ACTUAL-LLENGTH SEDIT::CHANGED?) + \SEND.ACK (ACKPENDING ACKBYTESPERPUP ACKPUPS ACKBYTES SENTZEROALLOC) CALLSCCODE (LNCALLED CALLED +BOUND USEDFREE GLOBALS) MSSETPHRASE (DET TYPE REP KNOWN) SEDIT::RELINEARIZE (SEDIT::WINDOW-LEFT +SEDIT::WINDOW-BOTTOM SEDIT::WINDOW-RIGHT SEDIT::WINDOW-TOP SEDIT::RELINEARIZATION-TIME-STAMP SEDIT::SHIFT-Y + SEDIT::SHIFT-DOWN SEDIT::BELOW? SEDIT::MATCHING? SEDIT::CURRENT-BLOCK SEDIT::VISIBLE? SEDIT::BLOCK-START + SEDIT::BLOCK-X SEDIT::BLOCK-NEW-X SEDIT::BITS? SEDIT::BLOCK-WIDTH SEDIT::BLOCK-BASE-LINE +SEDIT::BLOCK-ASCENT SEDIT::BLOCK-DESCENT SEDIT::REPAINT-X SEDIT::REPAINT-LINE SEDIT::REPAINT-START +SEDIT::CACHED-ASCENT SEDIT::CACHED-DESCENT SEDIT::CACHED-Y SEDIT::CACHE-TIME SEDIT::LINE-ASCENT +SEDIT::LINE-DESCENT SEDIT::CURRENT-X SEDIT::CURRENT-NODE SEDIT::CURRENT-LINE SEDIT::LINEAR-POINTER +SEDIT::LINEAR-PREV SEDIT::LAST-LINEARIZED-SUB-NODE-INDEX SEDIT::ACTUAL-WIDTH SEDIT::ACTUAL-LLENGTH +SEDIT::LAST-LINE SEDIT::CHANGED? SEDIT::LINE-LENGTH SEDIT::NEXT-LINE BOTTOM HEIGHT) SEDIT::DETACH-NODE + (SEDIT::LINEAR-THREAD) TEDIT.FORMATTEXTBOX (PAGEFOOTNOTELINES PAGELINECACHE CACHE LTEXTOBJ LEFTMARGIN + RIGHTMARGIN STATE REQUIREDREGIONTYPE YBOT YBASE) COPYTEXTSTREAM (CH# CHLIM DCH TEXTLEN MENUFLG) +FB.DEPTHCOMMAND (ITEMS CENTERFLG FBDEPTH) \LFVersions (DIRPTR CHARLIST) \CREATE.INSPECTABLEMENU (ITEMS +) TERM.SETMARGINS (TOPMARGIN BOTTOMMARGIN) TTYINBUFFERBACKPTR (TTYINPUT) INSPECT/ATOM (ITEMS) +\SEQUIN.PUT (PUPTYPE PUPDEST PUPDESTSOCKET RECEIVESEQ SENDSEQ MYSENDSEQ %#SEQTURNOVERS EPREQUEUE +%#UNACKEDSEQS ALLOCATE) SEDIT::FORMAT-FROM-INDENT (SEDIT::LIST-FORMATS SEDIT::LIST-SUBLISTS +SEDIT::LIST-INLINE? SEDIT::LIST-PFORMAT SEDIT::LIST-MFORMAT) ONEDINSPECT.ADJUSTSELECTION (ELTBOTTOM +ELTWIDTH ELTLEFT PROP) \TEMPLOCKPAGES (MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) \SPP.CREATE.CON ( +SPPXIPLENGTH SPPXIPTYPE SPPSOURCEID SPPMYNSOCKET SPPSOURCESKT# SPPACCEPTNO) \TEDIT.LOOKS (XCOORD +YCOORD TITLE ITEMS CENTERFLG) \LEAF.IDLE (LEAFCLOSING) DEFAULT.BACKGROUND.COPYFN (ITEMS +CHANGEOFFSETFLG MENUOFFSET XCOORD YCOORD CENTERFLG) \DSPFONT.PSC (POSTSCRIPTFONT POSTSCRIPTSPACEWIDTH +POSTSCRIPTNATURALSPACEWIDTH POSTSCRIPTACCENTED POSTSCRIPTFONTCHANGEDFLG) \FM.3STATE-SETUP (FM.MESSAGE +FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN) PARSE-NSADDRESS (NSSOCKET NSHNM2 NSHNM1 NSHNM0 NSNETLO +NSNETHI) POSTSCRIPT.FONTCREATE (IL-FONTID OTHERDEVICEFONTPROPS FONTSCALE FONTDEVICE FONTFAMILY +FONTSIZE FONTFACE ROTATION \SFHeight \SFAscent \SFDescent FONTDEVICESPEC) \SPP.RELEASE.ACKED.PACKETS ( +SPPACKEDSEQNO SPPRETRANSMITTING) CL:VALUES (PC) \RELEASE.ETHERPACKET (EPREQUEUE EPUSERFIELD EPNETWORK +EPPLIST EPSOCKET) TOPW.ADJUSTSELECTION (ELTBOTTOM ELTWIDTH ELTLEFT PROP) \SIMULATE.UNBIND (NEXTBLOCK +FASTP) COMPOSEREGS (LEFT BOTTOM) CL:VALUES-LIST (PC) MAKEISOFORMAT (NAME INCCODEFN PEEKCCODEFN +BACKCCODEFN OUTCHARFN) DOBACKGROUNDCOM (ITEMS CHANGEOFFSETFLG MENUOFFSET XCOORD YCOORD WHENHELDFN +WHENUNHELDFN CENTERFLG) FB.INFOMENU.WHENSELECTEDFN (INFOMENUCHOICES) \DISPLAYINIT (WSDESTINATION +WSREGION LEFT BOTTOM WIDTH HEIGHT IMAGETYPE IMFONT IMLEFTMARGIN IMRIGHTMARGIN IMLINEFEED IMXPOSITION +IMYPOSITION IMCLOSEFN IMDRAWCURVE IMFILLCIRCLE IMDRAWLINE IMDRAWELLIPSE IMDRAWCIRCLE IMFILLPOLYGON +IMBITBLT IMSCALEDBITBLT IMBLTSHADE IMNEWPAGE IMSCALE IMSPACEFACTOR IMFONTCREATE IMCOLOR IMBACKCOLOR +IMOPERATION IMSTRINGWIDTH IMCHARWIDTH IMCLIPPINGREGION IMRESET IMDRAWARC IMDRAWPOLYGON IMDRAWPOINT +IMBLTCHAR IMXOFFSET IMYOFFSET DEVICENAME RESETABLE RANDOMACCESSP PAGEMAPPED CLOSEFILE DELETEFILE +GETFILEINFO OPENFILE READPAGES SETFILEINFO GENERATEFILES TRUNCATEFILE WRITEPAGES GETFILENAME +REOPENFILE EVENTFN DIRECTORYNAMEP HOSTNAMEP BIN BOUT PEEKBIN BACKFILEPTR BLOCKIN BLOCKOUT WINDOWOPS +WINDOWDATA DEVICEINFO) CREATE-SHELL-STREAM (ACCESS DEVICE OPENFILELST) FB.SETNEWPATTERN (PATTERN +PREPAREDPATTERN PATTERNPARSED? NSPATTERN?) \MAKE.PROCESS1 (PROCFX ACLINK) \TEDIT.COPY.LINEDESCRIPTOR ( +LEFTMARGIN RIGHTMARGIN LXLIM SPACELEFT LHEIGHT CHAR1 CHARLIM CHARTOP DIRTY CR\END LDOBJ LHASPROT +LFMTSPEC LTRUEDESCENT LTRUEASCENT ASCENT DESCENT LHASTABS LMARK 1STLN LSTLN) TB.REDISPLAY.ITEMS ( +TBMAXXPOS) DELETEMENU (WHENSELECTEDFN) \RTP.FILTER (FRNNET) \DOFLUSHVM (MISCSTACKRESULT CurrentFXP) +\TEXTSETEOF (EPAGE EOFFSET) \RELEASEWORKINGSET (EMPTY) \PROCESS.MOVEFRAME (RESIDUAL IVAR NEXTBLOCK +BLINK NAMETABLO MiscFXP) \MATCHPCS (PTREENODE UPWARD) UPDATE/MENU/IMAGE (MENUFONT MENUBORDERSIZE +MENUOUTLINESIZE ITEMWIDTH ITEMHEIGHT ITEMS MENUCOLUMNS MENUROWS LEFT BOTTOM WIDTH HEIGHT MENUOFFSET +XCOORD YCOORD SAVE IMAGE WBORDER) \DSPLEFTMARGIN.PSC (POSTSCRIPTLEFTMARGIN) OPENHASHFILE (ByteStream +%#Entries Size ValueType ItemLength Write? File Stream) \FLUSHVM (MISCSTACKFN MISCSTACKARG1 +MISCSTACKARG2) \NSFILING.DESERIALIZE (NSHDATUM) CL::VALUES-UFN (HIBYTE LOBYTE NEXTBLOCK PC) +\TEDIT.SELECT.CHARACTER (SELOBJ X0 Y0 LEFT BOTTOM WIDTH HEIGHT SET) TTYINBUFFERDEVICE (DEVICENAME RANDOMACCESSP NODIRECTORIES CLOSEFILE DELETEFILE OPENFILE REOPENFILE BIN BOUT PEEKBIN READP BACKFILEPTR EOFP RENAMEFILE GETFILENAME EVENTFN BLOCKIN BLOCKOUT GENERATEFILES GETFILEPTR GETEOFPTR -SETFILEPTR GETFILEINFO SETFILEINFO SETEOFPTR) \\LEAF.EVENTFN (PFSLOOKUPFILESOCKET PFSLOOKUPFILELOCK) -\\CONS.UFN (CAR CDR PAGE# NEXTCELL CNT FULLCARFIELD CDRCODE NEXTFREE) PAINTW (CUIMAGE CUMASK -CUHOTSPOTX CUHOTSPOTY CUDATA) \\DSPOPERATION.DISPLAY (DDOPERATION PBTOPERATION PBTSOURCETYPE) -\\BSP.PREPARE.INPUT (BSPCURRENTPUP F3 COFFSET MARKPENDING CBUFSIZE CPPTR F4) SEDIT::SHIFT-BLOCK ( -SEDIT::REPAINT-START SEDIT::REPAINT-LINE SEDIT::REPAINT-X) \\CREATE.TWODINSPECTOR.TITLEMENU (ITEMS -LEFT BOTTOM) \\RESHOWBORDER1 (SAVE WBORDER REG LEFT BOTTOM WIDTH HEIGHT) XIPAPPEND.STRING (XIPLENGTH) -BRHL/LAYOUT (FROMNODES NODEPOSITION XCOORD YCOORD) DINFO.FIND (FIND.STRING) \\NSRANDOM.CLOSEFILE ( -ACCESS) MB.MARGINBAR.SIZEFN (XSIZE YSIZE YDESC XKERN) TEDIT.NEXT (CH# CHLIM DCH POINT -BLUEPENDINGDELETE CARETLOOKS) POSTSCRIPT.HARDCOPYW (WIDTH HEIGHT LEFT BOTTOM) \\GETREGION.PACKPTS ( -XCOORD YCOORD) \\REVALIDATEFILE (F1 F2 F3 F4 F5 FW6 FW7 VALIDATION EPAGE EOFFSET) TEDIT.BUILD.PCTB0 ( -PFILE PFPOS PLEN PREVPIECE PPARALOOKS NEXTPIECE PPARALAST FORMATTEDP) \\BLTSHADE.DISPLAY (PBTWIDTH -PBTHEIGHT) \\GETKEY (PROCTYPEAHEAD) \\HANDLE.RAW.3TO10 (TRANSOPERATION EPREQUEUE) \\BSP.CLEANUP.INPUT -(BSPFILEPTRLO BSPFILEPTRHI FW6 FW7 BSPCURRENTPUP F3 CBUFSIZE CPPTR \#UNREADPUPS) %COPY-STRING-TO-ARRAY - (BASE STRING-P TYPE-NUMBER FILL-POINTER TOTAL-SIZE) TEDIT.SCAN.LINE (SET SELKIND Y0 X0 DX CH# XLIM -CHLIM YLIM POINT DCH SELOBJ \\TEXTOBJ) \\RPLACA.UFN (CAR CARFIELD) \\NSFILING.NEXTFILE (CURRENTINFO) -\\BITBLT.DISPLAY (PBTWIDTH PBTHEIGHT) \\MEDW.RELMOVEW (XCOORD YCOORD) TEDIT.CREATEW (HEIGHT) -BRHC/OFFSET (NODEPOSITION YCOORD) \\SAVESYSBUF (PROCTYPEAHEAD) KILLSEGMENT (OLDTAIL) -\\PROC.AFTER.WINDOWWORLD (PROCWINDOW) ADD/AND/DISPLAY/LINK (XCOORD YCOORD) \\PAGED.REVALIDATEFILELST ( -ACCESS) TEDIT.BUILD.PCTB2 (TXTPAGEFRAMES PCTB TXTCHARLOOKSLIST TXTPARALOOKSLIST PPARALAST FORMATTEDP -PFILE PFPOS PLEN PREVPIECE PPARALOOKS NEXTPIECE PLOOKS) SEDIT::SELECT-NODE (SEDIT::PENDING-DELETE?) -\\NSFILING.PARSE.FILENAME (NSDIRECTORIES NSROOTNAME NSVERSION NSDIRECTORYP NSHASPERIOD) -\\BACKCOLOR.DISPLAY (|DDTexture|) SETFONTCLASSCOMPONENT (DISPLAYFD INTERPRESSFD PRESSFD OTHERFDS) -\\SPP.HANDLE.INPUT (SPPRETRANSMITTING SPPTERMINATEDP SPPOUTPUTALLOCNO SPPACKPENDING SPPROUNDTRIPTIME -SPPACKREQUESTED) \\SETPUPCHECKSUM (PUPCHECKSUM) \\UNQUEUE (SYSQUEUEHEAD SYSQUEUETAIL QLINK) -FORGETPAGES (BUFFERNEXT BUFFS) TOGGLE/SIDESFLG (SIDESFLG) DEFAULT.INSPECTW.VALUECOMMANDFN (ITEMS LEFT -BOTTOM) CL::VALUES-LIST-UFN (HIBYTE LOBYTE NEXTBLOCK PC) RESTOREMAP (BUFFERNEXT BUFFS) XIPAPPEND.WORD -(XIPLENGTH) \\RPLCONS (NEXTCELL CNT FULLCARFIELD CDRCODE) \\PAGED.REVALIDATEFILE (F1 F2 F3 F4 F5 FW6 -FW7 VALIDATION EPAGE EOFFSET) SEDIT::CFV-CLISP (SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH) -\\PARAS.IN.SEL (CH# DCH) DINFO.LOOKUP (LOOKUP.STRING) UPDATE/SCROLL/REG (VERTSCROLLWINDOW -HORIZSCROLLWINDOW VERTSCROLLREG LEFT BOTTOM WIDTH HEIGHT HORIZSCROLLREG) ICMLARRAY.MENUW.GETLEVEL ( -ITEMS LEFT BOTTOM) SEDIT::COMPUTE-POINT-POSITION-COMMENT (SEDIT::POINT-X SEDIT::POINT-LINE) -\\TEDIT.ABBREV.EXPAND (\\INSERTPCVALID) \\PAGED.REVALIDATEFILES (ACCESS) \\DSPXPOSITION.DISPLAY ( -DDXPOSITION CHARPOSITION) \\DRAWLINE.DISPLAY (BRUSHCOLOR |DDDestination| |DDClippingTop| -|DDClippingBottom|) SEDIT::UNDO-ATOM-CHANGE (CL:STRUCTURE) \\CARET.CREATE (CURSOR) SETINTERRUPT ( -INTERRUPTLIST) \\HTFIND (HIBITS CNT STKBIT EMPTY NEXTFREE FREEPTR NXTPTR CONTENTS LINKPTR) -TWOD.TRACKCURSOR (ELTWIDTH ELTLEFT ELTBOTTOM ROWPROP COLUMNPROP) \\DSPLINEFEED.DISPLAY (DDLINEFEED) -FB.EXPUNGE?.MENU (ITEMS MENUROWS CENTERFLG TITLE MENUFONT LEFT BOTTOM) SEDIT::REUSE-LINEAR-FORM ( -SEDIT::START-X SEDIT::FIRST-LINE SEDIT::PREV-LINE SEDIT::LINE-LENGTH SEDIT::INDENT SEDIT::BLOCK-START -SEDIT::CURRENT-LINE SEDIT::SHIFT-Y SEDIT::BLOCK-X SEDIT::BLOCK-NEW-X SEDIT::BLOCK-ASCENT -SEDIT::BLOCK-DESCENT SEDIT::BLOCK-BASE-LINE SEDIT::BITS? SEDIT::YCOORD SEDIT::CURRENT-X -SEDIT::LINEAR-POINTER SEDIT::LINEAR-PREV) \\FILLCIRCLE.DISPLAY (PBTFLAGS PBTDESTBPL PBTSOURCEBPL -PBTUSEGRAY PBTGRAYWIDTHLESSONE PBTGRAYHEIGHTLESSONE PBTDISJOINT PBTOPERATION PBTSOURCETYPE PBTHEIGHT) -EXTENDREGIONRIGHT (WIDTH) \\BUFFERED.REVALIDATEFILE (F1 F2 F3 F4 F5 FW6 FW7 VALIDATION EPAGE EOFFSET) -\\MEDW.MOVEW (LEFT BOTTOM WIDTH HEIGHT XCOORD YCOORD REG) \\FONTFACE (WEIGHT SLOPE EXPANSION) -|\\VFMGet| (|key| |volumePage| |nextKey|) \\BUFFERED.REVALIDATEFILELST (ACCESS) -\\DSPLEFTMARGIN.DISPLAY (|DDLeftMargin|) %SET-ARRAY-OFFSET (OFFSET) PTDIFFERENCE (XCOORD YCOORD) -\\RESETKEYBOARD (W0 W1 W2 W3 W4 W5 WU LOCK 1SHIFT 2SHIFT CTRL META FONT USERMODE1 USERMODE2 USERMODE3 -MOUSESTATE READ) \\FM.LAYOUTGRID (LEFT BOTTOM WIDTH HEIGHT) \\ASSIGNDATATYPE1 (DTDDESCRS DTDSUPERTYPE -DTDTYPESPECS DTDOBSOLETE DTDTYPEENTRY DTDNAME DTDFREE DTDSIZE DTDPTRS) \\DSPFONT.DISPLAY (DDFONT -DDLINEFEED DDSPACEWIDTH) MB.MARGINBAR.TABTRACK (TABX) \\TURN.ON.PROCESSES (PROCFX) -ICMLARRAY.MENUW.APPLY (XCOORD YCOORD) SEDIT::COPY-NODE (SEDIT::NODE-TYPE CL:STRUCTURE SEDIT::SUB-NODE-INDEX - SEDIT::CHANGED? SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH SEDIT::UNASSIGNED SEDIT::SUB-NODES -SEDIT::SUPER-NODE SEDIT::LINEAR-FORM SEDIT::ACTUAL-WIDTH SEDIT::ACTUAL-LLENGTH) \\GENERATENOFILES ( -NEXTFILEFN FILEINFOFN GENFILESTATE NOFILETYPE NOFILEPATTERN) %SET-ARRAY-TYPE-NUMBER (TYPE-NUMBER) -\\TEDIT.ADJUST.LINES (YBOT YBASE) SEDIT::COMPUTE-COMMENT-COLUMN (SEDIT::COMMENT-WIDTH -SEDIT::COMMENT-SEPARATION) \\MEDW.SHRINKW (XCOORD YCOORD) \\PROCESS.MAKEFRAME (MISCSTACKFN -MISCSTACKARG1 MISCSTACKARG2 PROCFX) \\SPP.NOT.RESPONDING (SPPINACTIVECOUNT SPPTERMINATEDP -SPPROUNDTRIPTIME) \\NULLFILEGENERATOR (NEXTFILEFN) \\DSPSCALE.PSC (POSTSCRIPTSCALE) \\SHAPEW2 (REG -SAVE) SCROLLBYREPAINTFN (LEFT BOTTOM WIDTH HEIGHT) \\INSERTTREE (PTREENODE UPWARD TOTLEN COUNT) -\\MEDW.CLOSEW (SCTOPW NEXTW) WHO-LINE-SAVE-VMEM (TITLE CENTERFLG ITEMS LEFT BOTTOM) DINFO.ADD.FMENU ( -FMENU.WINDOW) POSTSCRIPT.ENDPAGE (POSTSCRIPTPENDINGXFORM POSTSCRIPTFONTSUSED) -\\UPDATE.PBT.RASTERWIDTHS (PAGE# PBTDESTBPL) \\TELERAIDBREAK (FAULTFXP TELERAIDFXP) \\LEAF.FLUSH.CACHE - (LEAFCACHEDFILE) \\ENVCALL.UFN (MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) COPYGRAPH (GRAPHNODES -NODEPOSITION NODELABEL) UTF8.OUTCHARFN (CHARPOSITION) SETHASHSTATUS (|Valid?|) TERM.NEWLINE (XPOS) -COMP.UNBIND.VARS (PRIMARYRETURN) \\SHOWTEXT (YBOT CHAR1 CHARLIM SPACELEFT RIGHTMARGIN NEXTLINE CHARTOP - LHEIGHT LXLIM CR\\END ASCENT DESCENT LTRUEASCENT LFMTSPEC) SEDIT::CLOSE-NODE-COMMENT (SEDIT::OPEN-NODE -) EXTEND/TRANSITION/CHAIN (YCOORD) \\FIXDLINES (DIRTY TXTNEEDSUPDATE CHAR1 CHARLIM CHARTOP NEXTLINE -PREVLINE DELETED) \\MAIKO.CONSOLE-LOG-PRINT (LOGMSGSPENDING) RESETGRID.NEW (LEFT BOTTOM) -\\NSRANDOM.WRITEPAGES (NSFILING.SERVER.LENGTH F2 NSFILING.LAST.REQUEST FW6) PPROCEXTENT (LEFT BOTTOM -WIDTH HEIGHT) \\DSPYPOSITION.DISPLAY (DDYPOSITION DDCHARSET DDCHARSETASCENT) |\\VFMGetBufferFor| ( -VOLUME VOLPAGENUM PAGE DIRTY) \\FM.LAYOUTCOLUMN (LEFT BOTTOM WIDTH HEIGHT) \\MAIKO.IO-INTERRUPT ( -IOINTERRUPT) INSTALL-PROTOTYPE-DEFN (TITLE ITEMS LEFT BOTTOM) \\NSFILING.OPEN.HANDLE (NSHDATUM -NSHACCESS) \\DSPRIGHTMARGIN.DISPLAY (|DDRightMargin|) \\NSRANDOM.READPAGES (NSFILING.LAST.REQUEST FW6) - \\PRESSCURVE2 (VECMOVINGRIGHT VECWASDISPLAYING VECSEGCHARS VECCURX VECCURY) SEDIT::UNDO-EXTRACT ( -SEDIT::SUPER-NODE SEDIT::SUB-NODE-INDEX) \\HANDLE.RAW.PUP (TYPEWORD EPREQUEUE PUPDESTNET NDBPUPNET# -PUPNET# PUPHOST# RTNET# RTHOPCOUNT RTGATEWAY# RTNDB RTRECENT INQUEUELENGTH) \\NOFILESNEXTFILEFN ( -NOFILETYPE NOFILENAME) \\FM.LAYOUTROW (LEFT BOTTOM WIDTH HEIGHT) \\MAIKO.ETHER-INTERRUPT ( -ETHERINTERRUPT 10MBLENGTH EPNETWORK EPTYPE DLFIRSTICB) \\DRAWLINE.UFN (BITS) UNMAKEHARDCOPYMODESTREAM -(IMAGEOPS STRMBOUTFN OUTCHARFN) \\DO.PROGV.SETUP.FRAME.AND.EXECUTE (FRAMENAME \#FRAMENAME NTSIZE -NAMETABLE FAST NAMETABLE# VALIDNAMETABLE) SEDIT::REDO (SEDIT::UNDO-UNDO-LIST) \\SMASHBSPSTREAM ( -BSPOUTPUTSTREAM BSPCURRENTPUP MARKPENDING F2 F3 F4 CBUFSIZE CPPTR COFFSET ACCESS BSPSOC F1 -BSPINPUTSTREAM) SEDIT::COMPUTE-SELECTION-POSITION-DEFAULT (SEDIT::SELECT-START-X SEDIT::SELECT-START-LINE - SEDIT::SELECT-END-X SEDIT::SELECT-END-LINE) COMP.STFN (OPNAME OPARG) DINFO.INVERT.NODE ( -LAST.INVERTED.NODE NODELABELSHADE) COMP.BIND.VARS (VARNAME COMP.VARTYPE PARENT NVALS VARS FRAMETYPE -NNILS DECLS) \\AGE.ROUTING.TABLE (RTRECENT) MSVERB (ROOT TENSE MODIFIER) RAISE/TRANSITION/CHAIN ( -YCOORD) \\NSRANDOM.SESSION.WATCHER (NSWATCHERPROC) DINFO.DEFAULT.MENU (DINFO.MENU ITEMS CENTERFLG -MENUFONT LEFT BOTTOM) \\MISCN.UFN (IVAR NEXTBLOCK) \\INIT.RTPPROCESS (RTPPROCESS RTPEVENT BSPLOCK) -\\TEDIT.SHOW.CHARLOOKS (SET) POSTSCRIPT.PUTCOMMAND (POSTSCRIPTPAGEBLANK) \\MAIKO.10MBSENDPACKET ( -EPNETWORK EPTYPE) \\DSPCOLOR.DISPLAY (DDCOLOR) EXTENDREGIONBOTTOM (BOTTOM HEIGHT) PRETTYFILEINDEX ( -ACCESS) \\SPP.RETRANSMIT.NEXT (SENDACK SPPRETRANSMITTING) SEDIT::GETKEY (PROCTYPEAHEAD) \\DELETECH ( -\\INSERTLEN PLEN \\INSERTNEXTCH THLEN \\INSERTPCVALID THACTION THCH# THFIRSTPIECE NEXTPIECE PREVPIECE -TEXTLEN \\DIRTY \\XDIRTY) INSERTLINE (NEXTLINE START END FIRSTCOL LASTCOL ROW) RESETKEYACTION ( -INTERRUPTLIST) SHAPEW1 (REG SAVE LEFT BOTTOM WIDTH HEIGHT) PROCESS.STATUS.WINDOW (ITEMS WHENSELECTEDFN - MENUFONT CENTERFLG LEFT BOTTOM MENUCOLUMNS WIDTH HEIGHT XCOORD YCOORD) \\TEDIT.UPDATETREE (TOTLEN) -TTNEXTPOS (ROWPOS COLPOS) \\INSPECT/CODE/RESHAPEFN (XCOORD YCOORD LEFT BOTTOM WIDTH HEIGHT) ADDMENU ( -XCOORD YCOORD LEFT BOTTOM WHENSELECTEDFN) \\PROMPTWINDOW.EXPAND (HEIGHT) COMP.LABELS (OPNAME) -DINFO.LAYOUTGRAPH (NODEID NODELABEL NODELABELSHADE TONODES LAST.INVERTED.NODE) \\RELEASE.IOCB ( -D0NEXTIOCB) \\TEDIT.FIXINSSEL (CH# CHLIM) NESTED.SUBMENU.POS (XCOORD YCOORD) \\UNBOXFLOAT3 (NEXTBLOCK) - SPAWN.MOUSE (PROCSYSTEMP) TEDIT.SELECT.LINE.SCANNER (SET \\TEXTOBJ SELOBJ SELKIND NEXTLINE PREVLINE -CH# CHLIM POINT DCH Y0 YLIM X0 XLIM DX) \\DSPBACKCOLOR.DISPLAY (DDCOLOR) |\\PFFindPageAddr| (PAGEGROUP -) CHECK/MENU/IMAGE (IMAGE) \\CORE.CLOSEFILE (IOEPAGE IOEOFFSET CBUFPTR CBUFSIZE) \\MAPPNAME.INTERNAL ( -OUTCHARFN STRMBOUTFN) \\DSPCOLOR.PSC (POSTSCRIPTCOLOR) \\CORE.RELEASEPAGES (PAGEPOINTER) COMP.TAGBODY -(LBNO FRAME LEVEL PROGLABELS) \\MEDW.CREATEW (REG SAVE WTITLE WBORDER NEXTW SCREEN DSP XWINDOWHINT -LEFT BOTTOM WIDTH HEIGHT) \\MEDW.OPENW (NEXTW SCTOPW PBTDESTBPL) SEDIT::VERIFY-STRUCTURE ( -SEDIT::CURRENT-NODE SEDIT::\\X SEDIT::SUB-NODES) \\CORE.UPDATEOF (CPAGE COFFSET CBUFPTR EPAGE EOFFSET -CBUFSIZE) DINFO.SELECT.GRAPH (CENTERFLG TITLE ITEMS LEFT BOTTOM) SHADEITEM (WIDTH) \\RTP.ACTION ( -BSPINITTIMER RTPSTATE RTPTIMEOUT) \\TEDIT.NEUTRALIZE.CHARLOOKS (SET) XIPAPPEND.BYTE (XIPLENGTH) -\\SELECTPROCESS (ITEMS TITLE CENTERFLG MENUFONT LEFT BOTTOM) \\PROCESS.GO.TO.SLEEP (EVENTWAKEUPPENDING - PROCSTATUS PQLAST PQNEXT NEXTPROCHANDLE PROCTIMERSET PROCWAKEUPTIMER PROCFX) MB.MARGINBAR.DISPLAYFN ( -LEFT BOTTOM WIDTH HEIGHT) RESHAPEBYREPAINTFN (LEFT BOTTOM WIDTH HEIGHT) MB.NB.SIZEFN (XSIZE YSIZE -YDESC XKERN) SEDIT::OUTPUT-STRING (STRING SEDIT::WIDTH SEDIT::FONT SEDIT::PRIN-2? SEDIT::LINEAR-POINTER - SEDIT::LINEAR-FORM SEDIT::LINEAR-PREV SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::CURRENT-X) -FONTCOPY (WEIGHT SLOPE EXPANSION BACKCOLOR FORECOLOR) PUTMENUPROP (MENUUSERDATA) -\\MAIKO.10MBSTARTDRIVER (NDBTQ DLFIRSTICB) \\HCPYMODEDSPPRINTCHAR (CHARPOSITION) BKSYSCHARCODE (READ) -\\CORE.GETINFOBLOCK (IOFILEFULLNAME PAGENUMBER) RESET.INTERRUPTS (INTERRUPTLIST) \\PRINTFPTOVP (PAGE#) - SELECT.FNS.EDITOR (ITEMS CENTERFLG LEFT BOTTOM) LLBREAK (FNHEADER) \\CORE.FINDPAGE (PAGEPOINTER -PAGENUMBER COREPAGECACHE F10) \\NSRANDOM.TRUNCATEFILE (PAGE OFFSET NSFILING.SERVER.LENGTH F2) -|\\VFMReadNext| (|key| |volumePage|) \\CORE.GENERATEFILES (NEXTFILEFN FILEINFOFN GENFILESTATE -COREFILELST) ENDPREAMBLE.IP (IPPREAMBLEFONTS IPPREAMBLENEXTFRAMEVAR IPPAGESTATE) \\GCRECLAIMCELL ( -FULLLINKFIELD CDRCODE OFFSETCODE DTDFREE) TEDIT.PUT (DESC TXTFILE \\DIRTY \\XDIRTY PFPOS PFILE PSTR -\\INSERTPCVALID \\INSERTPC THACTION THCH# THLEN THFIRSTPIECE) DEFINEFONT.IP (IPPAGEFONTS) -\\PSWOP.SELECTED (ITEMS TITLE CENTERFLG LEFT BOTTOM) SEDIT::CFV-COMMENT (SEDIT::INLINE-WIDTH -SEDIT::PREFERRED-WIDTH) TEDIT.RESET.EXTEND.PENDING.DELETE (BLUEPENDINGDELETE) TEDIT.GET.OBJECT0 (POBJ -PFILE PSTR PLOOKS) \\SETPOS.PSC (POSTSCRIPTMOVEFLG) CLOSERTPSOCKET (BSPINITTIMER RTPPROCESS) -CH.FINDSERVER (NSOBJECT NSDOMAIN NSORGANIZATION) \\PUTBASEBYTE (HIBYTE LOBYTE) ENDPAGE.IP (IPPAGESTATE -) HEADINGOP.IP (IPHEADINGOPVAR) SEDIT::SET-SELECTION-STRING (SEDIT::SELECT-NODE SEDIT::SELECT-STRING -SEDIT::SELECT-START) \\TEDIT.UNIQUIFY.PARALOOKS (TXTPARALOOKSLIST) FB.MAYBE.INSERT.FILE (TIDATA -TISELECTED) \\TERPRI.PSC (CHARPOSITION) \\CORE.GETFILEINFO.FROM.INFOBLOCK (PAGE OFFSET) -\\ONSCREENCLIPPINGREGION (LEFT BOTTOM WIDTH HEIGHT) \\TFBRAVO.INIT.PARALOOKS (LEFTMAR 1STLEFTMAR -LINELEAD LEADBEFORE RIGHTMAR LEADAFTER TABSPEC FMTSPECIALX FMTSPECIALY) BRHC/LAYOUT/TERMINAL (XCOORD -YCOORD) \\NSRANDOM.DESTROY.STREAM (CBUFDIRTY CBUFSIZE CBUFPTR NSFILING.SERVER.LENGTH F2) \\RETCALL ( -MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) |\\PFCreateVols| (|seal|) TEDIT.UNDO.MOVE (CH# CHLIM DCH -POINT TEXTLEN THACTION THTEXTOBJ THAUXINFO THOLDINFO THCH#) BITMAPTEDITOBJ (BITMAP BMOBJSCALEFACTOR -BMOBJROTATION BMOBJDESCENT) INSERTHASHKEY (|#Entries|) SEDIT::COMPUTE-ALL-FORMATS ( -SEDIT::DONT-COLLECT-CHANGES?) \\8DISPLAYINIT (IMAGETYPE IMFONT IMLEFTMARGIN IMRIGHTMARGIN IMLINEFEED -IMXPOSITION IMYPOSITION IMCLOSEFN IMDRAWCURVE IMFILLCIRCLE IMDRAWLINE IMDRAWELLIPSE IMDRAWCIRCLE -IMBITBLT IMBLTSHADE IMNEWPAGE IMSCALE IMSPACEFACTOR IMFONTCREATE IMCOLOR IMBACKCOLOR IMOPERATION -IMSTRINGWIDTH IMCHARWIDTH IMCLIPPINGREGION IMRESET IMDRAWARC IMDRAWPOLYGON IMDRAWPOINT IMBLTCHAR -IMXOFFSET IMYOFFSET DEVICENAME RESETABLE RANDOMACCESSP PAGEMAPPED CLOSEFILE DELETEFILE GETFILEINFO -OPENFILE READPAGES SETFILEINFO GENERATEFILES TRUNCATEFILE WRITEPAGES GETFILENAME REOPENFILE EVENTFN -DIRECTORYNAMEP HOSTNAMEP BIN BOUT PEEKBIN BACKFILEPTR BLOCKIN BLOCKOUT DEVICEINFO WINDOWOPS) -DINFO.SHOWGRAPH (LEFT BOTTOM HEIGHT WIDTH) COMP.BINDLIST (VARNAME COMP.VARTYPE) \\TEDIT.FIXDELSEL (CH# - CHLIM DCH) \\CORE.DELETEFILE (IOFILEPAGES PAGENUMBER) TEDIT.PUT.PCTB2 (PFILE DEFAULTCHARLOOKS -CARETLOOKS FMTSPEC) \\TEDIT.UNIQUIFY.CHARLOOKS (TXTCHARLOOKSLIST) SEDIT::OUTPUT-SPACE ( -SEDIT::LINEAR-POINTER SEDIT::LINEAR-FORM SEDIT::LINEAR-PREV SEDIT::CURRENT-X) \\LOCATE.PUPNET (RTNET# -RTHOPCOUNT RTTIMER) \\POP.N.UFN (NEXTBLOCK NOPUSH) GLCCODE (FILL-POINTER-P FILL-POINTER) -\\DSPTOPMARGIN.PSC (POSTSCRIPTTOPMARGIN) EDITBM (BITMAPBITSPERPIXEL BITMAPWIDTH) POSTSCRIPT.GETFONTID -(FONTIDNAME FONTXFACTOR FONTOBLIQUEFACTOR) \\TEDIT.DELETE (THPOINT CH# CHLIM POINT DCH DX) -TWODINSPECT.ADJUSTSELECTION (ELTBOTTOM ELTWIDTH ELTLEFT ROWPROP COLUMNPROP) \\IRM.WILD.REF (ITEMS -CENTERFLG TITLE LEFT BOTTOM) \\RTP.SHOW.FAILURE (BSPFAILURESTRING BSPFAILUREREASON) ASSURE.PUP.READY ( -NDBPUPHOST# PUPNET# PUPHOST#) SHOW.IP (IPCORRECTSTARTX) \\CREATEDISPLAYFONT (FONTDEVICE FONTFAMILY -FONTSIZE FONTFACE |\\SFAscent| |\\SFDescent| |\\SFHeight| ROTATION FONTDEVICESPEC) -\\NSRANDOM.CREATE.STREAM (NSHACCESS NSFILING.HANDLE F4 EPAGE EOFFSET MULTIBUFFERHINT CPAGE COFFSET -NSFILING.SERVER.LENGTH F2) SEDIT::SET-SELECTION-LITATOM (SEDIT::SELECT-NODE SEDIT::SELECT-STRING -SEDIT::SELECT-START) MB.NB.WHENOPERATEDFN (SET) DINFO (MONITORLOCK) |\\PFRemoveDirectoryID| (|seal| -|version| |maxEntries|) \\BSP.HANDLE.INPUT (ACKPENDING) FB.FINISH.COMMAND (UPDATEPROC ABORTING) -\\CORE.GETFILEHANDLE (IOEOFFSET IOEPAGE IOFILEPAGES PAGENUMBER DEVICE INFOBLK FULLFILENAME EOFFSET -EPAGE EOLCONVENTION CBUFMAXSIZE F1) |\\PFFindDirectoryID| (|seal| |version| |maxEntries|) -COMP.TOPLEVEL.COMPILE (VARS NNILS COMTYPE CODE TOPFRAME ARGS) MSCOMMAND (ID MSPRED REP MSVERB OTHERSET - SUBJECT OTHERSTUFF) SEDIT::CREATE-NULL-LIST (SEDIT::NODE-TYPE CL:STRUCTURE SEDIT::SUB-NODES -SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH SEDIT::LINEAR-FORM) HRULE.IMAGEBOXFN (XSIZE YSIZE YDESC -XKERN) SPYOBJ.IMAGEBOX (XSIZE YSIZE YDESC XKERN) FORWARD.DELETE.TO (END LASTCOL START) \\FDEVINSTANCE -(DEVICEINFO CLOSEFILE GETFILEINFO OPENFILE READPAGES SETFILEINFO TRUNCATEFILE WRITEPAGES REOPENFILE -BIN BOUT PEEKBIN BACKFILEPTR SETFILEPTR GETFILEPTR GETEOFPTR EOFP BLOCKIN BLOCKOUT FORCEOUTPUT) -\\FILLINXIP (EPTYPE XIPTCONTROL XIPTYPE XIPSOURCENSADDRESS XIPSOURCESOCKET XIPLENGTH XIPDESTNSADDRESS -XIPDESTNET XIPDESTSOCKET XIPDESTHOST) CARET (CURSOR) TEDIT.UNDO.REPLACE (THOLDINFO THACTION CH# CHLIM -DCH POINT THPOINT) \\HDCPYDISPLAYINIT (IMAGETYPE IMFONT IMRIGHTMARGIN IMXPOSITION IMYPOSITION -IMSTRINGWIDTH IMCHARWIDTH) \\10MBRAWENCAPSULATE (10MBLENGTH) SEDIT::CFV-DOTLIST (SEDIT::INLINE-WIDTH -SEDIT::PREFERRED-WIDTH) %MAKE-STRING-ARRAY-FAT (BASE TYPE-NUMBER) SEDIT::BACKSPACE-COMMENT ( -SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::POINT-TYPE) GNCCODE (OFFST DISPLACED-P OFFSET LENGTH -FILL-POINTER TOTAL-SIZE DIMS) SEDIT::OUTPUT-BITMAP (SEDIT::LINEAR-PREV SEDIT::LINE-ASCENT -SEDIT::LINE-DESCENT) EXTENDREGION (WIDTH LEFT HEIGHT BOTTOM) |\\PFInitFileDescriptors| (|fileID|) -COPY.TEXT.TO.IMAGE (ENDOFSTREAMOP) \\CREATE.TEDIT.SIZE.MENU (ITEMS CENTERFLG MENUROWS TITLE LEFT -BOTTOM) \\SLOWHDCPYBLTCHAR (DDXPOSITION PBTDESTBIT PBTWIDTH PBTSOURCEBIT) \\LEAF.REQUESTPAGE ( -LEAFCACHECNT FW6 OPWORD HANDLE FILEADDRESS PAGE OFFSET READWRITEMODE DATALENGTH LEAFLENGTH) -\\FTP.OPEN.CONNECTION (FTPIN FTPOUT FTPHOST FTPBUSY) \\CREATE-REAL-CHARSET.DISPLAY (WEIGHT SLOPE) -DEFAULT.INSPECTW.TITLECOMMANDFN (ITEMS LEFT BOTTOM) \\BUILDSLUGCSINFO (CHARSETASCENT CHARSETDESCENT -IMAGEWIDTHS OFFSETS CHARSETBITMAP) TERM.GODOWN (YPOS) \\4DISPLAYINIT (IMAGETYPE IMFONT IMLEFTMARGIN +SETFILEPTR GETFILEINFO SETFILEINFO SETEOFPTR) \10MBSENDPACKET (EPNETWORK EPTYPE) CL::VALUES-LIST-UFN ( +HIBYTE LOBYTE NEXTBLOCK PC) \PUTONSCREENW (XCOORD YCOORD) \LEAF.OPENFILE (LEAFCACHEHITS +LEAFCACHEMISSES %#SEQRESTARTS %#SEQTIMEOUTS %#SEQDUPLICATES CBUFSIZE CBUFPTR EOLCONVENTION) \OPENFILE +(ACCESS CPAGE COFFSET) \SPPCONNECTION (SPPDESTINATIONKNOWN) SEDIT::INSERT-COMMENT-CHARS (STRING +CL:STRUCTURE SEDIT::SUB-NODE-INDEX SEDIT::SUPER-NODE SEDIT::DEPTH) TEDIT.FORMATFOLIO (CACHE LTEXTOBJ +LEFTMARGIN RIGHTMARGIN YBOT YBASE) \DO.PARAMS.AT.OPEN (EOLCONVENTION) \PAGEDBACKFILEPTR (COFFSET +CBUFDIRTY CBUFSIZE CBUFPTR CPAGE CHARPOSITION) \CLEARSYSBUF (READ PROCTYPEAHEAD) \CREATECHARSET ( +\SFAscent \SFDescent \SFHeight) \PFRemoveRootDirEntry (countEntries) \GETKEY (PROCTYPEAHEAD) SENDPUP ( +EPTYPE PUPTCONTROL PUPSOURCESOCKETHI PUPSOURCESOCKETLO) TB.DO.ITEM.SELECTION (TISELECTED +TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM) \NSFILING.CLOSE.CONNECTIONS (NSFILING.CONNECTION) +CLOSEPUPSOCKET (PUPSOCEVENT) WHO-LINE-SAVE-VMEM (TITLE CENTERFLG ITEMS) \ENQUEUE.TIMER (PROCTIMERLINK) + \DRAWPOLYGON.DISPLAY (BRUSHSHAPE) PAINTW.READCOMMAND (ITEMS) \DSPPRINTCHAR (CHARPOSITION) +TEDIT.FORMATHEADING (TEXTLEN CACHE LTEXTOBJ LEFTMARGIN RIGHTMARGIN YBOT YBASE) NEAREST/PT/ON/GRID ( +XCOORD YCOORD) SETFILEINFO (EOLCONVENTION ENDOFSTREAMOP MAXBUFFERS) ICMLARRAY.GETMENUWGROUP (XCOORD +YCOORD) SWAPPUPPORTS (PUPSOURCE PUPSOURCESOCKETHI PUPSOURCESOCKETLO) \RTP.CLEANUP (BSPUSERSTATE +BSPINPUTSTREAM) \FTPINIT (DEVICENAME OPENFILE REOPENFILE CLOSEFILE DIRECTORYNAMEP GETFILENAME +GETFILEINFO RENAMEFILE DELETEFILE GENERATEFILES EVENTFN OPENP REGISTERFILE UNREGISTERFILE) +INITDATATYPES (DTDTYPEENTRY DTDSUPERTYPE DTDSIZE) MENUWRESHAPEFN (ITEMWIDTH ITEMHEIGHT XCOORD YCOORD) +UNIX.SETDISPLAYTYPE (HELD) \DSPCLIPPINGREGION.DISPLAY (DDClippingRegion DDCHARSET DDCHARSETASCENT) +\GETSYSBUF (READ) \SPP.PREPARE.OUTPUT (SPPOUTPKT CBUFPTR COFFSET CBUFMAXSIZE) \DSPRIGHTMARGIN.PSC ( +POSTSCRIPTRIGHTMARGIN) SEDIT::SCAN-FOR-BOUNDS (SEDIT::FIRST-LINE SEDIT::PREV-LINE SEDIT::NEXT-LINE +SEDIT::LAST-LINE SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT) PAINTW.READMODE (ITEMS) \SAVESYSBUF ( +PROCTYPEAHEAD) HASHFILEPROP (ItemCopyFn) \ASSIGNDATATYPE1 (DTDDESCRS DTDSUPERTYPE DTDTYPESPECS +DTDOBSOLETE DTDTYPEENTRY DTDNAME DTDFREE DTDSIZE DTDPTRS) SEDIT::INSERT-COMMENT (SEDIT::OPEN-NODE-CHANGED? +) \CH.FIND.ORG.SERVER (DCDOMAIN DCKNOWNSERVERS OCORGANIZATION OCALLSERVERS OCDOMAINS NSOBJECT NSDOMAIN + NSORGANIZATION) \DSPOPERATION.DISPLAY (DDOPERATION PBTOPERATION PBTSOURCETYPE) \IMAGEUSERPROP ( +IMAGEOBJPLIST) \FORMATBYTESTREAM (EOLCONVENTION) TERM.RIGHT (XPOS) \SFFixY.HCPYMODE (PBTDEST PBTSOURCE + DDCHARHEIGHTDELTA PBTHEIGHT DDCHARSETDESCENT) \LEAF.WRITEPAGES (REVALIDATEFLG OPWORD HANDLE +FILEADDRESS PAGE OFFSET DATALENGTH EOFBIT LEAFLENGTH) DINFO.GET.GRAPH.WINDOW (GRAPH.WINDOW) +\BACKCOLOR.DISPLAY (DDTexture) \FM.TOGGLE-CHANGESTATE (FM.STATE FM.BITMAP FM.REGION) \BSP.SKIPBYTES ( +COFFSET) \PROCESS.INIT (DEVICENAME EVENTFN DIRECTORYNAMEP HOSTNAMEP) SEDIT::PARENTHESIZE-CURRENT-SELECTION + (SEDIT::POINT-NODE SEDIT::POINT-TYPE SEDIT::POINT-INDEX) \KEYBOARDINIT (READ WRITE) COMP.DECLARE1 ( +OPNAME) \UNQUEUE.TIMER (PROCTIMERLINK PROCTIMERSET) \DSPOPERATION.IP (IPOPERATION) \ENQUEUE ( +SYSQUEUEHEAD QLINK SYSQUEUETAIL) \BLTSHADE.DISPLAY (PBTWIDTH PBTHEIGHT) \SETLOCALNSNUMBERS (NSHOST0 +NSHOST1 NSHOST2 NSHNM0 NSHNM1 NSHNM2) ICONW (LEFT BOTTOM WIDTH HEIGHT) \DSPLINEFEED.PSC ( +POSTSCRIPTLINESPACING) SETFONTCLASSCOMPONENT (DISPLAYFD INTERPRESSFD PRESSFD OTHERFDS) +\HANDLE.RAW.10TO3 (TRANSPUPHOST TRANSOPERATION EPREQUEUE) \FIXLINELENGTH.PSC (LINELENGTH) +EDITBMBUTTONFN (ITEMS CENTERFLG LEFT BOTTOM MENUROWS WIDTH HEIGHT TITLE) \REVALIDATEFILE (F1 F2 F3 F4 +F5 FW6 FW7 VALIDATION EPAGE EOFFSET) \BITBLT.DISPLAY (PBTWIDTH PBTHEIGHT) ICMLARRAY.GETREGIONFN ( +XCOORD YCOORD) GETPUP (INQUEUELENGTH) PRINTERDEVICE (OPENFILE CLOSEFILE ACCESS) \SPLITTREE (COUNT +UPWARD TOTLEN) TEDIT.CURSORMOVEDFN (BOTTOM HEIGHT MOUSEREGION LEFT WIDTH) \VFMInsert1 (used) +OPENPUPSOCKET (PSOCKETHI PSOCKETLO PUPSOCEVENT) DELETE.LONG.SEGMENT1 (NEXTLINE LASTCOL END) +\SEQUIN.PROCESS (SEQLASTRESTART SEQTIMEOUT) TEDIT.FORMATPAGE (STATE CHNO NEWPAGELAYOUT PAGE# FIRSTPAGE + PAGE#TEXT PAGE#GENERATOR PAGECOUNT) FB.DISPLAY.COUNTERS (COUNTERPOSITIONS COUNTERPAGESTRING) +FB.NEWINFOCOMMAND (ITEMS MENUROWS TITLE CENTERFLG MENUFONT WHENSELECTEDFN XCOORD YCOORD INFOMENUW) +TEDIT.REDO (CH# CHLIM DCH POINT \INSERTPCVALID) COMP.DECLARE (OPNAME) \PAGED.REVALIDATEFILELST (ACCESS +) \DRAWLINE.DISPLAY (BRUSHCOLOR) SEDIT::CHECK-SELECTION (SEDIT::POINT-NODE) +BROWSE/LAYOUT/HORIZ/COMPACTLY (NODELABEL NODEID TONODES NODEWIDTH NODEHEIGHT FROMNODES GRAPHNODES +SIDESFLG DIRECTEDFLG) \TEDIT.APPLY.PAGEFORMATTING (\DIRTY) \TEDIT.GET.CHARLOOKS (PNEW PFATP PLOOKS +PLEN PFPOS) \FILLCIRCLE.DISPLAY (PBTFLAGS PBTDESTBPL PBTSOURCEBPL PBTUSEGRAY PBTGRAYWIDTHLESSONE +PBTGRAYHEIGHTLESSONE PBTDISJOINT PBTOPERATION PBTSOURCETYPE PBTHEIGHT) \TEXTINIT (IMAGETYPE +IMXPOSITION IMYPOSITION IMLEFTMARGIN IMRIGHTMARGIN IMFONT IMCLOSEFN IMFONTCREATE IMLINEFEED +IMCHARWIDTH IMSTRINGWIDTH DEVICENAME RESETABLE RANDOMACCESSP PAGEMAPPED GETFILENAME BIN BOUT CLOSEFILE + OPENFILE DELETEFILE DIRECTORYNAMEP EVENTFN GENERATEFILES GETFILEINFO HOSTNAMEP READPAGES REOPENFILE +ACCESS SETFILEINFO BACKFILEPTR SETFILEPTR PEEKBIN GETEOFPTR GETFILEPTR EOFP FDBINABLE FDBOUTABLE +FDEXTENDABLE TRUNCATEFILE WRITEPAGES BINABLE BOUTABLE USERCLOSEABLE USERVISIBLE DEVICE F1 F2 F3 F5 FW6 + FW7 MAXBUFFERS IMAGEOPS IMAGEDATA OUTCHARFN) INSPECTW.REDISPLAY (SELECTABLEITEMREGION COMMANDFN +ITEMINFO ITEMINFOTYPE LEFT BOTTOM WIDTH HEIGHT) \LFDirectorySearch (DIRHOLEPTR DIRPTR) FORGETPAGES ( +BUFFERNEXT BUFFS) \PFCreateRootDirectory (fileID volNum type size filePage nextFilePage) \XCCSOUTCHAR +(CHARSET CHARPOSITION) SEDIT::DEGRADE-COMMENT (SEDIT::UNASSIGNED) NEW/INSTANCE/OF/GRAPHNODE (NODEID +NODELABEL NODEFONT NODEWIDTH NODEHEIGHT NODEBORDER NODELABELSHADE) FILEPKGTYPE (DESCRIPTION) MSPRED ( +REP NEGATED MSVERB OTHERSET) RESTOREMAP (BUFFERNEXT BUFFS) \DSPYPOSITION.DISPLAY (DDYPOSITION +DDCHARSET DDCHARSETASCENT) \SEQUIN.CLOSE (SEQSTATE) \CHANGECHARSET.HCPYMODE (DDWIDTHSCACHE +DDOFFSETSCACHE DDCHARIMAGEWIDTHS DDCHARSET PBTSOURCEBPL OTHERDEVICEFONTPROPS PBTSOURCE) +\LEAF.TRUNCATEFILE (OPWORD HANDLE FILEADDRESS PAGE OFFSET EOFBIT DATALENGTH LEAFLENGTH) +\PAGED.REVALIDATEFILE (F1 F2 F3 F4 F5 FW6 FW7 VALIDATION EPAGE EOFFSET) \DSPXPOSITION.DISPLAY ( +DDXPOSITION CHARPOSITION) \TEDIT.FILL.IN.CHARLOOKS.MENU (SET) \UNWIND.UFN (NEXTBLOCK NOPUSH) +\DSPLINEFEED.DISPLAY (DDLINEFEED) \XCCSFORMATBYTESTREAM (CHARSET) COMP.LOOKUPVAR (COMP.VARTYPE VARNAME +) \TEDIT.FORMAT.FOUNDBOX? (STATE) \GETREGION.CHECKOPPT (XCOORD YCOORD) \PAGED.REVALIDATEFILES (ACCESS) + \DSPRIGHTMARGIN.DISPLAY (DDRightMargin) ICMLARRAY (XCOORD YCOORD) \CREATE.XCCS.EXTERNALFORMAT (NAME +INCCODEFN PEEKCCODEFN BACKCCODEFN OUTCHARFN FORMATBYTESTREAMFN EOL EOLVALID) FB.CREATE.FILEBUCKET ( +STARTOFPNAME VERSIONLESSNAME SUBDIREND STARTOFNAME HASDIRPREFIX DIRECTORYFILEP FILEDEPTH FILENAME +VERSION FILEINFO SIZE SORTVALUE) \TEDIT.CONVERT.FOREIGN.FORMAT (TXTPAGEFRAMES) TEDIT.STYLESHEET ( +TXTSTYLESHEET) \PUPERROR (ERRORPUPCODE ERRORPUPARG PUPLENGTH PUPTYPE EPREQUEUE) LOADPOLY (A B C D) +\PROC.AFTER.WINDOWWORLD (PROCWINDOW) TEDIT.PARSE.PAGEFRAMES (REGIONFILLMETHOD REGIONTYPE +REGIONLOCALINFO REGIONSPEC REGIONSUBBOXES) FB.ALLOW.ABORT (UPDATEPROC) EDITADDNODE (XCOORD YCOORD) +\BUFFERED.REVALIDATEFILE (F1 F2 F3 F4 F5 FW6 FW7 VALIDATION EPAGE EOFFSET) \DSPFONT.DISPLAY (DDFONT +DDLINEFEED DDSPACEWIDTH) \DELETECH (\INSERTLEN PLEN \INSERTNEXTCH THLEN \INSERTPCVALID THACTION THCH# +THFIRSTPIECE NEXTPIECE PREVPIECE TEXTLEN \DIRTY) SPP.CLEARATTENTION (SPPEOFP CBUFSIZE) \HTFIND (HIBITS + CNT STKBIT EMPTY NEXTFREE FREEPTR NXTPTR CONTENTS LINKPTR) \BUFFERED.REVALIDATEFILELST (ACCESS) +\DRAWLINE.PSC (POSTSCRIPTX POSTSCRIPTY POSTSCRIPTMOVEFLG) \DSPLEFTMARGIN.DISPLAY (DDLeftMargin) +DUMPINITPAGES (NxtPMAddr NActivePages NDirtyPages filePnPMP0 filePnPMT0 LVersion MinBVersion +MinRVersion Key) \PFAddRootDirEntry (type file countEntries) DINFO.LOOKUP (LOOKUP.STRING) +\FM.TOGGLE-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN) SEDIT::SET-SELECTION-NOWHERE + (SEDIT::SELECT-NODE) \BSP.PREPARE.OUTPUT (BSPCURRENTPUP TYPEWORD CPPTR COFFSET CBUFMAXSIZE) +\SETGLOBALVAL.UFN (VALUE) CREATEHASHFILE (ByteStream File Stream Size %#Entries Write? ValueType +ItemCopyFn ItemLength) \FONTFACE (WEIGHT SLOPE EXPANSION) DINFO.FIND (FIND.STRING) ADDFILE0 (LOADTYPE +FILEPROP COMSNAME FILEDATES FILEDATE DATEFILENAME TOBEDUMPED) \TEDIT.ABBREV.EXPAND (\INSERTPCVALID) +\RPLACA.UFN (CAR CARFIELD) \GENERATENOFILES (NEXTFILEFN FILEINFOFN GENFILESTATE NOFILETYPE +NOFILEPATTERN) \TURN.ON.PROCESSES (PROCFX) %%SET-ARRAY-TYPE-NUMBER (TYPE-NUMBER) SEDIT::DELETE-COMMENT + (SEDIT::OPEN-NODE-CHANGED?) BROWSE/LAYOUT/HORIZ (GRAPHNODES SIDESFLG DIRECTEDFLG) \RPLACD.UFN (CDR +FULLCARFIELD CDRCODE NEXTCELL CNT) \DOVMEMFULLINTERRUPT (VMEMFULL) \NULLFILEGENERATOR (NEXTFILEFN) +TEDIT.CREATEW (HEIGHT) \NSFILING.AFTER.LOGIN (FSLOGINCHANGED) INITSEQUIN (SEQSOCKET SEQSTATE SEQLOCK +SEQEVENT MYSENDSEQ MYRECEIVESEQ LASTACKEDSEQ SEQOUTALLOC %#UNACKEDSEQS %#SEQRESTARTS %#SEQDUPLICATES +%#SEQTIMEOUTS %#SEQRETRANSMITS %#SEQTURNOVERS SEQPROCESS) TERM.NEWLINE (XPOS) \CONS.UFN (CAR CDR PAGE# + NEXTCELL CNT FULLCARFIELD CDRCODE NEXTFREE) \TRANSLATE.10TO3 (EPTYPE TRANSOPERATION +TRANSSENDERPUPHOST EPREQUEUE) %%SET-ARRAY-OFFSET (OFFSET) SPP.FLUSH.TO.EOF (COFFSET SPPEOFP) +SEDIT::INSTALL-SPECIAL-FORMATS (SEDIT::LIST-FORMATS SEDIT::LIST-INLINE? SEDIT::LIST-PFORMAT +SEDIT::LIST-MFORMAT) NEWDEFC (FNHEADER) PAINTW.READBRUSHSIZE (ITEMS) \NOTE.10TO3 (NDBTRANSLATIONS) +PAINTW.READBRUSHSHAPE (ITEMS) \RESETKEYBOARD (W0 W1 W2 W3 W4 W5 WU LOCK 1SHIFT 2SHIFT CTRL META FONT +USERMODE1 USERMODE2 USERMODE3 MOUSESTATE READ) TEDIT.PARALOOKS (TABKIND TABX PPARALOOKS 1STLEFTMAR +LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER FMTBASETOBASE LINELEAD TABSPEC QUAD FMTPARATYPE FMTPARASUBTYPE +FMTSPECIALX FMTSPECIALY FMTNEWPAGEBEFORE FMTNEWPAGEAFTER FMTHEADINGKEEP FMTKEEP FMTHARDCOPY +FMTUSERINFO FMTREVISED FMTSTYLE FMTCHARSTYLES FMTCOLUMN \DIRTY THACTION THLEN THCH# THFIRSTPIECE +THOLDINFO THAUXINFO) PAINTW (CUIMAGE CUMASK CUHOTSPOTX CUHOTSPOTY CUDATA) TEDIT.NEXT (CH# CHLIM DCH +POINT BLUEPENDINGDELETE CARETLOOKS) \PFPutRootDirectory (fileID volNum type size) SETUPPUP (PUPLENGTH +TYPEWORD PUPID PUPDEST PUPDESTSOCKET EPREQUEUE) \NOFILESNEXTFILEFN (NOFILETYPE NOFILENAME) +INSPECT/HUNK (ITEMS CENTERFLG) \LOOKUPPUPNUMBER (XIPTYPE XIPLENGTH) TEDIT.SUBSTITUTE (TEXTLEN +CARETLOOKS CHLIM CH# DCH) SETINTERRUPT (INTERRUPTLIST) \4DISPLAYINIT (IMAGETYPE IMFONT IMLEFTMARGIN IMRIGHTMARGIN IMLINEFEED IMXPOSITION IMYPOSITION IMCLOSEFN IMDRAWCURVE IMFILLCIRCLE IMDRAWLINE IMDRAWELLIPSE IMDRAWCIRCLE IMBITBLT IMBLTSHADE IMNEWPAGE IMSCALE IMSPACEFACTOR IMFONTCREATE IMCOLOR IMBACKCOLOR IMOPERATION IMSTRINGWIDTH IMCHARWIDTH IMCLIPPINGREGION IMRESET IMDRAWARC IMDRAWPOLYGON IMDRAWPOINT IMBLTCHAR IMXOFFSET IMYOFFSET DEVICENAME RESETABLE RANDOMACCESSP PAGEMAPPED CLOSEFILE DELETEFILE GETFILEINFO OPENFILE READPAGES SETFILEINFO GENERATEFILES TRUNCATEFILE WRITEPAGES GETFILENAME REOPENFILE EVENTFN DIRECTORYNAMEP HOSTNAMEP BIN BOUT PEEKBIN BACKFILEPTR BLOCKIN BLOCKOUT -DEVICEINFO WINDOWOPS) SPP.FORCEOUTPUT (XIPLENGTH SPPFILEPTRLO FW7 SPPFILEPTRHI FW6 SPPOUTPKT -CBUFMAXSIZE COFFSET CBUFPTR ENDOFMESSAGE SPPOUTPUTABORTEDP) \\FM.FORMATBYGRID (LEFT WIDTH) -\\POLYSHADE.DISPLAY (X P LX RX) DUMPINITPAGES (|NxtPMAddr| |NActivePages| |NDirtyPages| |filePnPMP0| -|filePnPMT0| |LVersion| |MinBVersion| |MinRVersion| |Key|) TEDIT.GET.CHARLOOKS0 (PLOOKS PNEW CLSTYLE -CLUSERINFO CLBOLD CLITAL CLULINE CLOLINE CLSTRIKE CLSMALLCAP CLPROTECTED CLINVISIBLE CLSELHERE -CLCANCOPY CLSIZE CLOFFSET CLFONT) \\FM.STATE-CHANGESTATE (FM.STATE) MB.MARGINBAR.SELFN (LEFT BOTTOM -WIDTH HEIGHT MARTABS TABKIND TABX MARL1 MARLN MARR) \\TEDIT.CHARLOOKSMENU.CREATE (MBLABEL -MBBUTTONEVENTFN MBSTRING) MENUDESELECT (MENUUSERDATA) \\TEDIT.TEXTBIN.STRINGSETUP (CPPTR CPAGE COFFSET - PCSTARTPG FW6 PCSTARTCH FW7 CBUFSIZE EPAGE CHARSLEFT F2 REALFILE F1 BINABLE FATSTREAMP F4) -\\24DISPLAYINIT (IMAGETYPE IMFONT IMLEFTMARGIN IMRIGHTMARGIN IMLINEFEED IMXPOSITION IMYPOSITION +DEVICEINFO WINDOWOPS) SEDIT::CREATE-PRETTY-PRINT-ENV (SEDIT::DEFAULT-FONT SEDIT::ITALIC-FONT +SEDIT::KEYWORD-FONT SEDIT::COMMENT-FONT SEDIT::BROKEN-ATOM-FONT SEDIT::SPACE-WIDTH SEDIT::DEFAULT-LINE-SKIP + SEDIT::INDENT-BASE SEDIT::INDENT-STEP SEDIT::EM-WIDTH SEDIT::MAX-WIDTH) IMAGEOBJCREATE (OBJECTDATUM +IMAGEOBJPLIST IMAGEOBJFNS) GRAPHADDLINK (FROMNODES TONODES) SEDIT::CREATE-STRING-ITEM (STRING SEDIT::WIDTH + SEDIT::FONT SEDIT::PRIN-2?) \PFNewPages (filePage volumePage nextFilePage size) MSINTERPRETSET (REP +HTABLES OSET DET TYPE QUOTED ID NEGATED SET1 MSVERB TENSE VPART OTHERSET SET2 MSPATHOPTIONS FROM TO +TOPFLG INVERTED HTABLE BADMARKS) TEDIT.BUILD.PCTB0 (PFILE PFPOS PLEN PREVPIECE PPARALOOKS NEXTPIECE +PPARALAST FORMATTEDP) GETGRIDBOXREGION (LEFT BOTTOM WIDTH HEIGHT) \PRESSCURVE2 (VECMOVINGRIGHT +VECWASDISPLAYING VECSEGCHARS VECCURX VECCURY) \10MBGETPACKET (EPTYPE) \DSPBACKCOLOR.DISPLAY (DDCOLOR) +\DSPCOLOR.DISPLAY (DDCOLOR) PFI.PRINT.BITMAP (OUTCHARFN) LLBREAK (FNHEADER) \MISCN.UFN (IVAR NEXTBLOCK +) TEDIT.SCAN.LINE (SET SELKIND Y0 X0 DX CH# XLIM CHLIM YLIM POINT DCH SELOBJ \TEXTOBJ) +SEDIT::CREATE-NEW-COMMENT (SEDIT::NODE-TYPE CL:STRUCTURE SEDIT::DEPTH SEDIT::INLINE-WIDTH +SEDIT::PREFERRED-WIDTH SEDIT::UNASSIGNED SEDIT::SUB-NODES SEDIT::LINEAR-FORM) BRHL/MOVE/RIGHT (XCOORD) + \RPLCONS (NEXTCELL CNT FULLCARFIELD CDRCODE) \FIXDLINES (DIRTY TXTNEEDSUPDATE CHAR1 CHARLIM CHARTOP +NEXTLINE PREVLINE DELETED) MSNEXTWORD (MODIFIER) \PFGetRootDirectory (fileID volNum type size) +UTF16BE.OUTCHARFN (CHARPOSITION) \INSERTTREE (PTREENODE UPWARD TOTLEN COUNT) TEDIT.FORMAT.HARDCOPY ( +PAGE# FIRSTPAGE STATE MINPAGE# MAXPAGE# CHNO PAGEHEADINGS PAGE#GENERATOR PAGE#TEXT PRESSREGION +REQUIREDREGIONTYPE PAGECOUNT) \ENVCALL.UFN (MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) +SET-CONNECTED-DIRECTORY-INTERACTIVELY (TITLE ITEMS) \EP.PUT.AUX (EPPLIST) \MAIKO.CONSOLE-LOG-PRINT ( +LOGMSGSPENDING) PUTDEFN (DEFPOINTER ARGTYPE FASTP CCODEP PSEUDOCODEP) SETHASHSTATUS (Valid?) +\MAIKO.IO-INTERRUPT (IOINTERRUPT) MSNEGATESET (REP NEGATED) PPROCEXTENT (LEFT BOTTOM WIDTH HEIGHT) +\PROCESS.MAKEFRAME (MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2 PROCFX) OPT.FRAMEVAR (VARS NNILS NVALS) +DINFO.ADD.FMENU (FMENU.WINDOW) SEDIT::SET-SELECTION-ME (SEDIT::SELECT-NODE SEDIT::SELECT-START +SEDIT::SELECT-END SEDIT::SELECT-START-X SEDIT::SELECT-TYPE) \UNBOXFLOAT3 (NEXTBLOCK) +SEDIT::CREATE-PRELINEARIZED-NODE (SEDIT::SUPER-NODE SEDIT::DEPTH SEDIT::SUB-NODE-INDEX) RESETKEYACTION + (INTERRUPTLIST) COMP.COND (OPNAME TAG) RESHAPEBYREPAINTFN (LEFT BOTTOM WIDTH HEIGHT) \8DISPLAYINIT ( +IMAGETYPE IMFONT IMLEFTMARGIN IMRIGHTMARGIN IMLINEFEED IMXPOSITION IMYPOSITION IMCLOSEFN IMDRAWCURVE +IMFILLCIRCLE IMDRAWLINE IMDRAWELLIPSE IMDRAWCIRCLE IMBITBLT IMBLTSHADE IMNEWPAGE IMSCALE IMSPACEFACTOR + IMFONTCREATE IMCOLOR IMBACKCOLOR IMOPERATION IMSTRINGWIDTH IMCHARWIDTH IMCLIPPINGREGION IMRESET +IMDRAWARC IMDRAWPOLYGON IMDRAWPOINT IMBLTCHAR IMXOFFSET IMYOFFSET DEVICENAME RESETABLE RANDOMACCESSP +PAGEMAPPED CLOSEFILE DELETEFILE GETFILEINFO OPENFILE READPAGES SETFILEINFO GENERATEFILES TRUNCATEFILE +WRITEPAGES GETFILENAME REOPENFILE EVENTFN DIRECTORYNAMEP HOSTNAMEP BIN BOUT PEEKBIN BACKFILEPTR +BLOCKIN BLOCKOUT DEVICEINFO WINDOWOPS) \SELECTPROCESS (ITEMS TITLE CENTERFLG MENUFONT) +\TRANSLATE.3TO10 (EPTYPE TRANSOPERATION TRANSPUPHOST TRANSSENDERPUPHOST EPREQUEUE) \ABORT.BULK.DATA ( +COFFSET) SEDIT::COPY-STRUCTURE-COMMENT (CL:STRUCTURE) BRHL/LAYOUT (FROMNODES NODEPOSITION XCOORD +YCOORD) MakeMenuOfImageTypes (ITEMS TITLE) \DO.PROGV.SETUP.FRAME.AND.EXECUTE (FRAMENAME NTSIZE +NAMETABLE) MAKEWITHINREGION (LEFT BOTTOM) \TEDIT.UPDATETREE (TOTLEN) \TEDIT.DELETE (THPOINT CH# CHLIM +POINT DCH DX) CREATE.NEW.NODEPOSITION (XCOORD YCOORD) \CORE.CLOSEFILE (IOEPAGE IOEOFFSET CBUFPTR +CBUFSIZE) \DRAWLINE.UFN (BITS) DINFO.INVERT.NODE (LAST.INVERTED.NODE NODELABELSHADE) +PROCESS.STATUS.WINDOW (ITEMS WHENSELECTEDFN MENUFONT CENTERFLG MENUCOLUMNS LEFT BOTTOM WIDTH HEIGHT +XCOORD YCOORD) DINFO.DEFAULT.MENU (DINFO.MENU ITEMS CENTERFLG MENUFONT) \FM.MOMENTARY-SETUP ( +FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN) \CORE.RELEASEPAGES (PAGEPOINTER) +MB.NWAYBUTTON.SELFN (LEFT BOTTOM WIDTH HEIGHT) UPDATEFILES (CHANGED) \PARAS.IN.SEL (CH# DCH) +\MAPPNAME.INTERNAL (OUTCHARFN STRMBOUTFN) \CORE.UPDATEOF (CPAGE COFFSET CBUFPTR EPAGE EOFFSET CBUFSIZE +) RIGHTW.ADJUSTSELECTION (ELTBOTTOM ELTWIDTH ELTLEFT PROP) \GETREGION.CHECKBASEPT (XCOORD YCOORD) +SHADEITEM (WIDTH) \NSFILING.GETFILE (NSHATTRIBUTES NSFILING.NEW.ATTRIBUTES NSHDATUM NSHACCESS +FULLFILENAME NSFILING.CONNECTION NSFILING.HANDLE DEVICE NSHBUSYCOUNT) \LFMakeLeaderPage (TYPE +TimeCreate TimeWrite FileID AllocatedPages EofPage EOffSet fileName author version) SHOW.IP ( +IPCORRECTSTARTX) FILES.PUTDEF (TOBEDUMPED FILEDATES) SPAWN.MOUSE (PROCSYSTEMP) \PFTransferPage ( +DISKADDRESS BUFFER RUNLENGTH LABEL MODE MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) +\TEDIT.UNIQUIFY.CHARLOOKS (TXTCHARLOOKSLIST) \TEDIT.ADJUST.LINES (YBOT YBASE) FW-INIT-MENUS (TITLE +CENTERFLG MENUOFFSET CHANGEOFFSETFLG ITEMS) CHECK/MENU/IMAGE (IMAGE) SEDIT::CREATE-NODE (SEDIT::NODE-TYPE + SEDIT::SUPER-NODE CL:STRUCTURE SEDIT::SUB-NODES SEDIT::DEPTH SEDIT::SUB-NODE-INDEX SEDIT::LINEAR-FORM +) \LFMakeDirEntry (DIRINFO) ENDPREAMBLE.IP (IPPREAMBLEFONTS IPPREAMBLENEXTFRAMEVAR IPPAGESTATE) +\CORE.DELETEFILE (IOFILEPAGES PAGENUMBER) \SHOWTEXT (YBOT CHAR1 CHARLIM SPACELEFT RIGHTMARGIN NEXTLINE + CHARTOP LHEIGHT LXLIM CR\END ASCENT DESCENT LTRUEASCENT LFMTSPEC) ADDMENU (XCOORD YCOORD LEFT BOTTOM +WHENSELECTEDFN) CLEARFILEPKG (FILEPROP FILECHANGES) OPT.FRAMEDEL (OPNAME OPARG FRAME LEVEL EXTCALL +PARENT) \TEDITPAGEMENU.CREATE (MBSTRING MBFONT) \CORE.GETINFOBLOCK (IOFILEFULLNAME) +MB.MARGINBAR.TABTRACK (TABX) DINFO.LAYOUTGRAPH (NODEID NODELABEL NODELABELSHADE TONODES +LAST.INVERTED.NODE) DINFO.SELECT.GRAPH (CENTERFLG TITLE ITEMS) BKSYSCHARCODE (READ) +MB.MARGINBAR.SIZEFN (XSIZE YSIZE YDESC XKERN) SEDIT::CREATE-GAP-NODE (SEDIT::NODE-TYPE CL:STRUCTURE +SEDIT::SUB-NODES SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH SEDIT::ACTUAL-LLENGTH SEDIT::ACTUAL-WIDTH +SEDIT::LINEAR-FORM) \MAIKO.ETHER-INTERRUPT (ETHERINTERRUPT 10MBLENGTH EPNETWORK EPTYPE DLFIRSTICB) +\CORE.FINDPAGE (PAGEPOINTER PAGENUMBER COREPAGECACHE) GC-FILING-DIRECTORY (FSCACHEDHANDLES) +SPP.SENDATTENTION (FIRSTSPPDATABYTE XIPLENGTH) TEDIT.SELECT.LINE.SCANNER (SET \TEXTOBJ SELOBJ SELKIND +NEXTLINE PREVLINE CH# CHLIM POINT DCH Y0 YLIM X0 XLIM DX) SEDIT::COPY-STRUCTURE-COMMENT-WORD ( +CL:STRUCTURE STRING) \CORE.GENERATEFILES (NEXTFILEFN FILEINFOFN GENFILESTATE COREFILELST) +\PROCESS.GO.TO.SLEEP (EVENTWAKEUPPENDING PROCSTATUS PQLAST PQNEXT NEXTPROCHANDLE PROCTIMERSET +PROCWAKEUPTIMER PROCFX) PARAMETRICSPLINE (%#KNOTS SPLINEX SPLINEY SPLINEDX SPLINEDY SPLINEDDX +SPLINEDDY SPLINEDDDX SPLINEDDDY) FILL.INCY (PBTDEST ADDR) TEDIT.RESET.EXTEND.PENDING.DELETE ( +BLUEPENDINGDELETE) \MAIKO.10MBTURNONETHER (NDBCSB DLFIRSTOCB DLFIRSTICB DLOUTPUTMASK DLINPUTMASK +DLMISSEDPACKETS DLLASTICB DLLASTOCB) \LEAF.REOPENFILE (VALIDATION) FB.SORTCOMMAND (SORTVALUE +STARTOFPNAME NOSUBDIRECTORIES SORTBY SORTATTRIBUTE SORTINDEX SORTBYDATE) FONTCOPY (WEIGHT SLOPE +EXPANSION BACKCOLOR FORECOLOR) TOGGLE/DIRECTEDFLG (DIRECTEDFLG) TOGGLE/SIDESFLG (SIDESFLG) +\HANDLE.NS.ROUTING.INFO (RTNET# RTTIMER RTGATEWAY# RTNDB RTHOPCOUNT RTRECENT) RESET.INTERRUPTS ( +INTERRUPTLIST) TEDIT.BUILD.PCTB1 (TXTPAGEFRAMES PPARALAST FORMATTEDP PFILE PFPOS PLEN PREVPIECE +PPARALOOKS NEXTPIECE PLOOKS) BRHL/LAYOUT/DAUGHTERS (FROMNODES) SETBSPUSERINFO (BSPUSERSTATE) +\CORE.NEXTFILEFN (COREFILELST) FB.EXPUNGE?.MENU (ITEMS MENUROWS CENTERFLG TITLE MENUFONT) +\24DISPLAYINIT (IMAGETYPE IMFONT IMLEFTMARGIN IMRIGHTMARGIN IMLINEFEED IMXPOSITION IMYPOSITION IMCLOSEFN IMDRAWCURVE IMFILLCIRCLE IMDRAWLINE IMDRAWELLIPSE IMDRAWCIRCLE IMBITBLT IMBLTSHADE IMNEWPAGE IMSCALE IMSPACEFACTOR IMFONTCREATE IMCOLOR IMBACKCOLOR IMOPERATION IMSTRINGWIDTH IMCHARWIDTH IMCLIPPINGREGION IMRESET IMDRAWARC IMDRAWPOLYGON IMDRAWPOINT IMBLTCHAR IMXOFFSET IMYOFFSET DEVICENAME RESETABLE RANDOMACCESSP PAGEMAPPED CLOSEFILE DELETEFILE GETFILEINFO OPENFILE READPAGES SETFILEINFO GENERATEFILES TRUNCATEFILE WRITEPAGES GETFILENAME REOPENFILE EVENTFN DIRECTORYNAMEP HOSTNAMEP BIN BOUT - PEEKBIN BACKFILEPTR BLOCKIN BLOCKOUT DEVICEINFO WINDOWOPS) \\MAKEPCTB (COUNT TOTLEN DOWN1 DLEN1 DOWN2 - DLEN2 PTREENODE) \\HANDLE.PUP.ROUTING.INFO (RTNET# RTTIMER RTGATEWAY# RTNDB RTHOPCOUNT RTRECENT) -\\NSFILING.FILLIN.ATTRIBUTES (NSHATTRIBUTES NSHPATHNAME NSHFILEID NSHDIRECTORYP) SEDIT::SET-POINT-STRING - (SEDIT::POINT-NODE SEDIT::POINT-STRING) \\TEDIT.DIFFUSE.PARALOOKS (PPARALOOKS) SEDIT::BUILD-NODE ( -SEDIT::CURRENT-NODE SEDIT::\\X) |\\PFCreatePhysicalVolume| (|seal|) \\DSPBOTTOMMARGIN.PSC ( -POSTSCRIPTBOTTOMMARGIN) \\TEDIT.WINDOW.OPS (LEFT BOTTOM WIDTH HEIGHT) ONED.TRACKCURSOR (ELTWIDTH -ELTLEFT ELTBOTTOM PROP) PROCESS.BACKTRACE (LEFT BOTTOM WIDTH HEIGHT) COMP.PROG (LEVEL FRAME LBNO -PROGLABELS) SET-CONNECTED-DIRECTORY-INTERACTIVELY (TITLE ITEMS LEFT BOTTOM) \\SFMAKEITALIC ( -CHARSETBITMAP) SEDIT::BUILD-LINEAR-FORM (SEDIT::CURRENT-X SEDIT::CURRENT-NODE + PEEKBIN BACKFILEPTR BLOCKIN BLOCKOUT DEVICEINFO WINDOWOPS) SEDIT::CREATE-ENVIRONMENTS (SEDIT::PARSE-INFO + SEDIT::PARSE-INFO-UNKNOWN SEDIT::DEFAULT-FONT SEDIT::ITALIC-FONT SEDIT::KEYWORD-FONT SEDIT::COMMENT-FONT + SEDIT::BROKEN-ATOM-FONT SEDIT::SPACE-WIDTH SEDIT::DEFAULT-LINE-SKIP SEDIT::COMMAND-TABLE SEDIT::HELP-MENU + SEDIT::DEFAULT-CHAR-HANDLER SEDIT::EM-WIDTH SEDIT::INDENT-BASE SEDIT::INDENT-STEP SEDIT::MAX-WIDTH +SEDIT::COMMENT-WIDTH-PERCENT SEDIT::INIT-COMMENT-SEPARATION) DINFO.SHOWGRAPH (LEFT BOTTOM HEIGHT WIDTH +) OPT.FRAMELOCAL (OPNAME) \PSWOP.SELECTED (ITEMS TITLE CENTERFLG) DEFINEFONT.IP (IPPAGEFONTS) +\CORE.GETFILEINFO.FROM.INFOBLOCK (PAGE OFFSET) \GCRECLAIMCELL (FULLLINKFIELD CDRCODE OFFSETCODE +DTDFREE) FB.GET.SORT.MENU (SORTMENU ITEMS) FB.INSERT.SUBDIRECTORIES (SUBDIREND) \CORE.GETFILEHANDLE ( +IOEOFFSET IOEPAGE IOFILEPAGES PAGENUMBER DEVICE INFOBLK FULLFILENAME EOFFSET EPAGE EOLCONVENTION +CBUFMAXSIZE) CREATESCREEN (SCONOFF SCDESTINATION SCWIDTH SCHEIGHT SCDEPTH SCTOPW SCTITLEDS CREATEWFN +OPENWFN CLOSEWFN MOVEWFN RELMOVEWFN SHRINKWFN EXPANDWFN SHAPEWFN REDISPLAYFN BURYWFN TOTOPWFN +DSPCREATEFN GETWINDOWPROPFN PUTWINDOWPROPFN SETCURSORFN WINIMAGEOPS WINFDEV BBTTOWIN BBTFROMWIN +BBTWINWIN SCCARETFLASH SCGETSCREENPOSITION SCGETBOXSCREENPOSITION SCGETSCREENREGION) \RETCALL ( +MISCSTACKFN MISCSTACKARG1 MISCSTACKARG2) CHANGE-TTY-PROCESS-INTERACTIVELY (TITLE CENTERFLG ITEMS) +TEDIT.BUILD.PCTB2 (TXTPAGEFRAMES PCTB TXTCHARLOOKSLIST TXTPARALOOKSLIST PPARALAST FORMATTEDP PFILE +PFPOS PLEN PREVPIECE PPARALOOKS NEXTPIECE PLOOKS) \TEDIT.UNIQUIFY.PARALOOKS (TXTPARALOOKSLIST) GNCCODE + (OFFST LENGTH) TRANSGRAPH (GRAPHNODES NODEPOSITION XCOORD YCOORD) \FDEVINSTANCE (DEVICEINFO CLOSEFILE + GETFILEINFO OPENFILE READPAGES SETFILEINFO TRUNCATEFILE WRITEPAGES REOPENFILE BIN BOUT PEEKBIN +BACKFILEPTR SETFILEPTR GETFILEPTR GETEOFPTR EOFP BLOCKIN BLOCKOUT FORCEOUTPUT) GLCCODE (FILL-POINTER-P + FILL-POINTER) MSVERBED (MSVERB OTHERSET DET) \POP.N.UFN (NEXTBLOCK NOPUSH) \PRINTFPTOVP (PAGE#) +INSERTHASHKEY (%#Entries) TEDIT (TXTEDITING) FW-RE-INIT (NAMEWIDTH) MSADDANALYZE (SETNAME GETDEF-FN +MARKCHANGED-FN FILEPKGNAME) ENDPAGE.IP (IPPAGESTATE) \NSFILING.GENERATEFILES (NEXTFILEFN FILEINFOFN +GENFILESTATE NSGENERATOR NSFILTER NSCONNECTION NSIGNOREDIRECTORIES NSBULKSTREAM) \LEAF.EVENTFN ( +PFSLOOKUPFILESOCKET PFSLOOKUPFILELOCK) \VFMGet1 (key volumePage nextKey) \HANDLE.RAW.3TO10 ( +TRANSOPERATION EPREQUEUE) \NSFILING.COPY/RENAME (FSCACHEDHANDLES NSHBUSYCOUNT NSHDATUM NSHATTRIBUTES +NSHNAME) EDITBM (BITMAPBITSPERPIXEL BITMAPWIDTH) HEADINGOP.IP (IPHEADINGOPVAR) UNMARKASCHANGED ( +TOBEDUMPED) SETTOPVAL (VALUE) %%MAKE-STRING-ARRAY-FAT (BASE TYPE-NUMBER) \MAKEPCTB (COUNT TOTLEN DOWN1 + DLEN1 DOWN2 DLEN2 PTREENODE) \TEDIT.TEXTBIN.STRINGSETUP (CPPTR CPAGE COFFSET PCSTARTPG PCSTARTCH +CBUFSIZE EPAGE CHARSLEFT REALFILE BINABLE FATSTREAMP) \PUTBASEBYTE (HIBYTE LOBYTE) OPENRTPSOCKET ( +RTPSTATE CONNID BSPINPUTHANDLER BSPOTHERPUPFN PUPSOC LCLPORT LCLSOCKET BSPFAILURESTRING FRNPORT +FRNSOCKET LISTENING BSPINITTIMER) \CREATEDISPLAYFONT (FONTDEVICE FONTFAMILY FONTSIZE FONTFACE +\SFAscent \SFDescent \SFHeight ROTATION FONTDEVICESPEC) TEDIT.PUT (DESC TXTFILE \DIRTY PFPOS PFILE +PSTR \INSERTPCVALID \INSERTPC THACTION THCH# THLEN THFIRSTPIECE) FB.FINISH.COMMAND (UPDATEPROC +ABORTING) TEDIT.PUT.PCTB2 (PFILE DEFAULTCHARLOOKS CARETLOOKS FMTSPEC) SETPROPLIST (PROPLIST) +\TFBRAVO.INIT.PARALOOKS (LEFTMAR 1STLEFTMAR LINELEAD LEADBEFORE RIGHTMAR LEADAFTER TABSPEC FMTSPECIALX + FMTSPECIALY) \TEDIT.DIFFUSE.PARALOOKS (PPARALOOKS) \NSRANDOM.CLOSEFILE (ACCESS) +\CREATE-REAL-CHARSET.DISPLAY (WEIGHT SLOPE) SEDIT::BUILD-WINDOW (SEDIT::DISPLAY-WINDOW SEDIT::WINDOW-LEFT + SEDIT::WINDOW-BOTTOM SEDIT::WINDOW-RIGHT SEDIT::WINDOW-TOP) SEDIT::COMPUTE-POINT-POSITION-COMMENT ( +SEDIT::POINT-X SEDIT::POINT-LINE) RAISE/TRANSITION/CHAIN (YCOORD) XIPAPPEND.STRING (XIPLENGTH) +PROCESS.BACKTRACE (LEFT BOTTOM WIDTH HEIGHT) KILLSEGMENT (OLDTAIL) \TEDIT.COPY.PIECEMAPFN (PNEW POBJ +PLOOKS CLPROTECTED CLSELHERE) TERM.GODOWN (YPOS) UNMAKEHARDCOPYMODESTREAM (IMAGEOPS STRMBOUTFN +OUTCHARFN) SEDIT::SELECT-NODE (SEDIT::PENDING-DELETE?) INSERTLINE (NEXTLINE START END FIRSTCOL LASTCOL + ROW) \SFMAKEITALIC (CHARSETBITMAP) CHAT.RECONNECT (ITEMS) TEDIT.GET.OBJECT0 (POBJ PFILE PSTR PLOOKS) +SEDIT::UNDO (SEDIT::UNDO-LIST SEDIT::UNDO-UNDO-LIST) SEDIT::CREATE-CONSTANT-STRINGS (SEDIT::LPAREN-STRING + SEDIT::RPAREN-STRING SEDIT::DOT-STRING SEDIT::QUOTE-STRING SEDIT::COMMENT-STRING) SEDIT::CFV-CLISP ( +SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH) TEDIT.UNDO.REPLACE (THOLDINFO THACTION CH# CHLIM DCH POINT + THPOINT) \BUILDSLUGCSINFO (CHARSETASCENT CHARSETDESCENT IMAGEWIDTHS OFFSETS CHARSETBITMAP) \UNQUEUE ( +SYSQUEUEHEAD SYSQUEUETAIL QLINK) SEDIT::REUSE-LINEAR-FORM (SEDIT::START-X SEDIT::FIRST-LINE +SEDIT::PREV-LINE SEDIT::LINE-LENGTH SEDIT::INDENT SEDIT::BLOCK-START SEDIT::CURRENT-LINE SEDIT::SHIFT-Y + SEDIT::BLOCK-X SEDIT::BLOCK-NEW-X SEDIT::BLOCK-ASCENT SEDIT::BLOCK-DESCENT SEDIT::BLOCK-BASE-LINE +SEDIT::BITS? SEDIT::YCOORD SEDIT::CURRENT-X SEDIT::LINEAR-POINTER SEDIT::LINEAR-PREV) +ADD/AND/DISPLAY/LINK (XCOORD YCOORD) \CORE.OPENFILE (IOEOFFSET IOEPAGE IOFILEPAGES PAGENUMBER DEVICE +INFOBLK FULLFILENAME EOFFSET EPAGE EOLCONVENTION CBUFMAXSIZE) FW-RESET (OFDSTATUS) BITMAPTEDITOBJ ( +BITMAP BMOBJSCALEFACTOR BMOBJROTATION BMOBJDESCENT) DIRECTORY (PATTERN FILEGENERATORS) TEDIT.UNDO.MOVE + (CH# CHLIM DCH POINT TEXTLEN THACTION THTEXTOBJ THAUXINFO THOLDINFO THCH#) \CORE.SETACCESSTIME ( +ReadTime WriteTime) MARKASCHANGED (CHANGED) \SETPUPCHECKSUM (PUPCHECKSUM) DSPSCROLL (DDScroll) +\SFROTATECSINFO (CHARSETBITMAP OFFSETS) POSTSCRIPT.HARDCOPYW (WIDTH HEIGHT LEFT BOTTOM) +\VFMGetInterval (key volumePage nextKey) \COREFILE.SETPARAMETERS (EOLCONVENTION COREEOLC IOFIBType +IOFIBCreationTime) \LEAF.DIRECTORYNAMEP (PFSKNOWNDIRS) SCRATCHCONS (OLDTAIL) GETPROMPTWINDOW (LEFT +BOTTOM WIDTH HEIGHT) SEDIT::UNDO-ATOM-CHANGE (CL:STRUCTURE) \BSP.PREPARE.INPUT (BSPCURRENTPUP COFFSET +MARKPENDING CBUFSIZE CPPTR) \TEDIT.FIXINSSEL (CH# CHLIM) \DOHARDRETURN1 (ALINK SIZE RESIDUAL NEXTBLOCK + BLINK USECNT NAMETABLO FASTP ACLINK) COMP.STTAG (LEVEL FRAME) MB.NB.SIZEFN (XSIZE YSIZE YDESC XKERN) +SEDIT::COMPUTE-COMMENT-COLUMN (SEDIT::COMMENT-WIDTH SEDIT::COMMENT-SEPARATION) +SEDIT::COMPUTE-SELECTION-POSITION-COMMENT (SEDIT::SELECT-START-LINE SEDIT::SELECT-START-X +SEDIT::SELECT-END-LINE SEDIT::SELECT-END-X) BRHC/OFFSET (NODEPOSITION YCOORD) \TEDIT.TEXTBIN.FILESETUP + (PCSTARTPG PCSTARTCH CPPTR CPAGE COFFSET EPAGE CBUFSIZE CHARSLEFT REALFILE FATSTREAMP BINABLE) +\TEDIT.FIXDELSEL (CH# CHLIM DCH) \CREATE.SYMBOL (VALUE PNAMEBASE PNAMELENGTH FATPNAMEP) DOWINDOWCOM ( +ITEMS CHANGEOFFSETFLG MENUOFFSET XCOORD YCOORD WHENHELDFN WHENUNHELDFN CENTERFLG) \GCSCANSTACK (SIZE) +SEDIT::COPY-NODE (SEDIT::NODE-TYPE CL:STRUCTURE SEDIT::SUB-NODE-INDEX SEDIT::CHANGED? SEDIT::INLINE-WIDTH + SEDIT::PREFERRED-WIDTH SEDIT::UNASSIGNED SEDIT::SUB-NODES SEDIT::SUPER-NODE SEDIT::LINEAR-FORM +SEDIT::ACTUAL-WIDTH SEDIT::ACTUAL-LLENGTH) \CORE.SETFILEPTR (CBUFSIZE CBUFPTR CPAGE COFFSET) +OPT.FRAMEMERGE (VARS NNILS NVALS OPNAME OPARG) \TEDIT.MARK.LINES.DIRTY (DIRTY TXTNEEDSUPDATE) +\LFGenFileID (lastIDAllocated) SEDIT::CLOSE-NODE-COMMENT (SEDIT::OPEN-NODE) \CORE.BACKFILEPTR (COFFSET + CBUFSIZE CBUFPTR CPAGE CHARPOSITION) SEDIT::SHIFT-BLOCK (SEDIT::REPAINT-START SEDIT::REPAINT-LINE +SEDIT::REPAINT-X) \ORIGREADTABLE (READMACROFLG ESCAPEFLG NUMBERBASE USESILPACKAGE ESCAPECHAR +PACKAGECHAR HASHMACROCHAR) \CORE.SETEOFPTR (EPAGE EOFFSET CBUFSIZE CBUFPTR) \FM.CHANGELABEL (FM.LABEL +FM.REGION FM.MAXREGION FM.BITMAP FM.HIGHLIGHT) \DECUSECOUNT (USECNT) CHAT.PROMPT.FOR.INPUT (LEFT +BOTTOM WIDTH HEIGHT) \CORE.SETFILEINFO (IOFIBType COREEOLC) \SPP.HANDLE.INPUT (SPPRETRANSMITTING +SPPTERMINATEDP SPPOUTPUTALLOCNO SPPACKPENDING SPPROUNDTRIPTIME SPPACKREQUESTED) \INCUSECOUNT (USECNT +FASTP) COMP.STJUMP (OPNAME TAG JT FRAME LEVEL) MENUWINDOW (ITEMS CENTERFLG MENUCOLUMNS MENUROWS +MENUOUTLINESIZE) \DOSTACKOVERFLOW (SubovFXP) FB.MAYBE.INSERT.FILE (TIDATA TISELECTED) +\CORE.GETNEXTBUFFER (CBUFSIZE CBUFPTR COFFSET CPAGE EPAGE EOFFSET) \CREATE.TEDIT.FACE.MENU (ITEMS +CENTERFLG TITLE) INSPECT/AS/BLOCKRECORD (ITEMS WHENHELDFN) \MOVEFRAME (SIZE FLAGWORD RESIDUAL +NEXTBLOCK BLINK NAMETABLO) XIPAPPEND.WORD (XIPLENGTH) \TEDIT.SHOW.CHARLOOKS (SET) WINDOWWORLD (SCTOPW +SCONOFF PROMPTW) \BSP.CLEANUP.INPUT (BSPFILEPTRLO BSPFILEPTRHI FW6 BSPCURRENTPUP CBUFSIZE CPPTR +%#UNREADPUPS) \ALLOCBLOCK (INUSE GCTYPE) \NSFILING.PARSE.FILENAME (NSDIRECTORIES NSROOTNAME NSVERSION +NSDIRECTORYP NSHASPERIOD) \SETUPUSERSTACK (EndOfStack) \NSFILING.NEXTFILE (CURRENTINFO) +TEDIT.GET.CHARLOOKS0 (PLOOKS PNEW CLSTYLE CLUSERINFO CLBOLD CLITAL CLULINE CLOLINE CLSTRIKE CLSMALLCAP + CLPROTECTED CLINVISIBLE CLSELHERE CLCANCOPY CLSIZE CLOFFSET CLFONT) HRULE.IMAGEBOXFN (XSIZE YSIZE +YDESC XKERN) \GATHER-CLEANUP-FORMS (PROCHARDRESETINFO) SEDIT::REDO (SEDIT::UNDO-UNDO-LIST) +\CREATECHARSET.PSC (OFFSETS IMAGEWIDTHS) FW-MOVEW (OFDLEFT OFDBOTTOM) \MKATOM.FULL (STORAGEFULL) +\CREATECOREDEVICE (FDBINABLE FDBOUTABLE FDEXTENDABLE DEVICENAME RESETABLE RANDOMACCESSP PAGEMAPPED +NODIRECTORIES BUFFERED CLOSEFILE DELETEFILE GETFILEINFO OPENFILE READPAGES SETFILEINFO TRUNCATEFILE +WRITEPAGES GETFILENAME REOPENFILE GENERATEFILES EVENTFN DEVICEINFO DIRECTORYNAMEP HOSTNAMEP READP BIN +BOUT PEEKBIN BACKFILEPTR SETFILEPTR GETFILEPTR GETEOFPTR SETEOFPTR EOFP BLOCKIN BLOCKOUT FORCEOUTPUT +GETNEXTBUFFER OPENP REGISTERFILE UNREGISTERFILE) COPYGRAPH (GRAPHNODES NODEPOSITION NODELABEL) +SEDIT::COMPUTE-SELECTION-POSITION-DEFAULT (SEDIT::SELECT-START-X SEDIT::SELECT-START-LINE +SEDIT::SELECT-END-X SEDIT::SELECT-END-LINE) MB.NB.WHENOPERATEDFN (SET) \LEAF.FLUSH.CACHE ( +LEAFCACHEDFILE) \SMASHBSPSTREAM (BSPOUTPUTSTREAM BSPCURRENTPUP MARKPENDING CBUFSIZE CPPTR COFFSET +ACCESS BSPSOC BSPINPUTSTREAM) MAPATOMS (PAGE#) \EXTENDSTACK (STACKOVERFLOW EndOfStack) +BMOBJ.IMAGEBOXFN (XSIZE YSIZE YDESC XKERN) EXTEND/TRANSITION/CHAIN (YCOORD) \MAIKO.INPUT.INTERRUPT ( +10MBLENGTH EPNETWORK EPTYPE DLFIRSTICB) \RELEASE.IOCB (D0NEXTIOCB) %%EXTEND-ARRAY (BASE READ-ONLY-P +TYPE-NUMBER TOTAL-SIZE BOUND0 BOUND1 DISPLACED-P FILL-POINTER-P OFFSET FILL-POINTER) +\AGE.ROUTING.TABLE (RTRECENT) REMWINDOWPROP (USERDATA) CREATE-PROCESS-STREAM (ACCESS DEVICE +EOLCONVENTION OPENFILELST) \INIT.KEYBOARD.STREAM (DEVICENAME CLOSEFILE EVENTFN BIN PEEKBIN READP EOFP +GETFILENAME USERCLOSEABLE USERVISIBLE FULLFILENAME DEVICE ACCESS) TEDIT.GET.PARALOOKS0 (PPARALOOKS +1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD TABX TABKIND) ED (ITEMS TITLE) +\UNBOXFLOAT2 (NEXTBLOCK) SEDIT::UNDO-EXTRACT (SEDIT::SUPER-NODE SEDIT::SUB-NODE-INDEX) +%%ALTER-AS-DISPLACED-TO-BASE-ARRAY (STORAGE INDIRECT-P DISPLACED-P FILL-POINTER-P TYPE-NUMBER OFFSET +FILL-POINTER TOTAL-SIZE DIMS) CREATEMENUEDWINDOW (ITEMS CENTERFLG TITLE MENUROWS WIDTH HEIGHT BOTTOM +LEFT) MBUTTON.FIND.NEXT.FIELD (CH# CHLIM DCH SELOBJ POINT SELKIND) \UNBOXFLOAT1 (NEXTBLOCK HIWORD +LOWORD) \HANDLE.RAW.PUP (TYPEWORD EPREQUEUE PUPDESTNET NDBPUPNET# PUPNET# PUPHOST# RTNET# RTHOPCOUNT +RTGATEWAY# RTNDB RTRECENT INQUEUELENGTH) \BUFFERED.COPYBYTES (COFFSET) \FONTFACE.COLOR (WEIGHT SLOPE +EXPANSION BACKCOLOR FORECOLOR COLOR) INSPECT/AS/RECORD (ITEMS WHENHELDFN) SEDIT::GETKEY (PROCTYPEAHEAD +) \GENERIC-UNREGISTER-STREAM (OPENFILELST) \DSPSCALE.PSC (POSTSCRIPTSCALE) FW-SHAPEW (LEFT OFDLEFT +BOTTOM OFDBOTTOM WIDTH OFDWIDTH HEIGHT OFDHEIGHT) INSTALLBRUSH (BRUSHARRAY CREATEMETHOD) CURSOR.INIT ( +PBTSOURCEBPL PBTDISJOINT PBTSOURCETYPE PBTOPERATION PBTDESTBIT PBTSOURCEBIT PBTDESTBPL) +\ADD-OPEN-STREAM (OPENFILELST) %%ALTER-AS-DISPLACED-ARRAY (STORAGE READ-ONLY-P INDIRECT-P DISPLACED-P +FILL-POINTER-P OFFSET FILL-POINTER TOTAL-SIZE DIMS) \SETUPGUARDBLOCK (FLAGWORD SIZE) \VFMGet (key +volumePage nextKey) \TEDIT.NEUTRALIZE.CHARLOOKS (SET) FW-FORGET-CMD (TITLE ITEMS) BEGINPREAMBLE.IP ( +IPPAGESTATE) \PAGEDGETEOFPTR (PAGE OFFSET) \CREATE.TEDIT.DEFAULT.FMTSPEC (QUAD 1STLEFTMAR LEFTMAR +RIGHTMAR LEADBEFORE LEADAFTER LINELEAD TABSPEC) \COMPUTE.ARC.POINTS (XCOORD YCOORD) \SFLHASHLOOKUP ( +HASHPAGE#) POSTSCRIPT.ENDPAGE (POSTSCRIPTPENDINGXFORM POSTSCRIPTFONTSUSED) \PAGEDGETFILEPTR (PAGE +OFFSET) GET.EDIT.BITMAP.MENU (TITLE ITEMS CENTERFLG CHANGEOFFSETFLG) \NSRANDOM.READPAGES ( +NSFILING.LAST.REQUEST) BREAKLINE (END LASTCOL) \SPP.RETRANSMIT.NEXT (SENDACK SPPRETRANSMITTING) +\IRM.WILD.REF (ITEMS CENTERFLG TITLE) SET-READTABLE-INTERACTIVELY (TITLE ITEMS CENTERFLG) +PUTCURSORPROP (CUDATA) \NODIRCORE.OPENFILE (DEVICE INFOBLK FULLFILENAME EOFFSET EPAGE EOLCONVENTION +CBUFMAXSIZE) \TEDIT.WINDOW.OPS (LEFT BOTTOM WIDTH HEIGHT) \NSRANDOM.SESSION.WATCHER (NSWATCHERPROC) +SI::NON-LOCAL-GO (PC) SEDIT::CFV-COMMENT (SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH) +\CREATE.TEDIT.SIZE.MENU (ITEMS CENTERFLG MENUROWS TITLE) \MAIKO.10MBSENDPACKET (EPNETWORK EPTYPE) +XIPAPPEND.BYTE (XIPLENGTH) \RENAMEDFN (FNHEADER) MB.MARGINBAR.DISPLAYFN (LEFT BOTTOM WIDTH HEIGHT) +SI::UNWIND-TO-BLIP (PC) \NODIRCOREFDEV (READP) \INIT-MISCN-TABLE (MISCN-MVS) \PUTD (PSEUDOCODEP CCODEP + ARGTYPE FASTP DEFPOINTER DEFCELLFLAGS) GETD (FNHEADER) \CREATEPIECEORSTREAM (PSTR PFILE PLEN +PPARALAST PPARALOOKS PFATP PLOOKS) POSTSCRIPT.PUTCOMMAND (POSTSCRIPTPAGEBLANK) SPYOBJ.IMAGEBOX (XSIZE +YSIZE YDESC XKERN) \CHANGE-VISIBLE-REGION.IP (IPVISLEFT IPVISRIGHT IPVISTOP IPVISBOTTOM +IPVISIBLEREGION IPMAXVISIBLEBASELINE IPMINVISIBLEBASELINE IPCHARVISIBLEP IPMINCHARRIGHT) +PRETTYFILEINDEX (ACCESS) SEDIT::OUTPUT-STRING (STRING SEDIT::WIDTH SEDIT::FONT SEDIT::PRIN-2? +SEDIT::LINEAR-POINTER SEDIT::LINEAR-FORM SEDIT::LINEAR-PREV SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT +SEDIT::CURRENT-X) %%MAKE-ONED-ARRAY (BASE READ-ONLY-P BIT-P STRING-P DISPLACED-P FILL-POINTER-P +EXTENDABLE-P TYPE-NUMBER OFFSET FILL-POINTER TOTAL-SIZE) \PFFindPageAddr (PAGEGROUP) DELETEHASHKEY ( +%#Entries) TEDIT.SUBLOOKS (\DIRTY PLOOKS) MB.MARGINBAR.SELFN (LEFT BOTTOM WIDTH HEIGHT MARTABS TABKIND + TABX MARL1 MARLN MARR) FB.COPY/RENAME.MANY (DEFAULTDIR) \HCPYMODEDSPPRINTCHAR (CHARPOSITION) +\TEDIT.CHARLOOKSMENU.CREATE (MBLABEL MBBUTTONEVENTFN MBSTRING) XIPAPPEND.CELL (XIPLENGTH) DIRFILENAME +(LITERALNAME) SEDIT::VERIFY-STRUCTURE (SEDIT::CURRENT-NODE SEDIT::\X SEDIT::SUB-NODES) COMP.BOOL ( +OPNAME TAG) \TTY.CREATING.DISPLAYSTREAM (OUTCHARFN FULLFILENAME) \MEDW.GETSCREENREGION (XCOORD YCOORD +SCREEN LEFT BOTTOM WIDTH HEIGHT) \DSPCOLOR.PSC (POSTSCRIPTCOLOR) SEDIT::OUTPUT-SPACE (SEDIT::LINEAR-POINTER + SEDIT::LINEAR-FORM SEDIT::LINEAR-PREV SEDIT::CURRENT-X) ARRAY (TYP LENGTH ORIG OFFST BASE HIBYTE +LOBYTE) TEDIT.OBJECT.CHANGED (\DIRTY) \CREATE.TEDIT.MOVESELECTION (HASCARET HOWHEIGHT) +FB.GET.NEW.FILE.SPEC (DEFAULTDIR) BRHC/LAYOUT/DAUGHTERS (XCOORD YCOORD) \MAIKO.10MBSTARTDRIVER (NDBTQ +DLFIRSTICB) \INIT.RTPPROCESS (RTPPROCESS RTPEVENT BSPLOCK) \DELETETREE (TOTLEN COUNT) +TEDIT.DO.BLUEPENDINGDELETE (CHLIM DCH POINT) \HDCPYDISPLAYINIT (IMAGETYPE IMFONT IMRIGHTMARGIN +IMXPOSITION IMYPOSITION IMSTRINGWIDTH IMCHARWIDTH) \TEDIT.CARET (TCCARET) SEDIT::SET-SELECTION-STRING +(SEDIT::SELECT-NODE SEDIT::SELECT-STRING SEDIT::SELECT-START) \TEDIT.REOPEN.STREAM (PFILE TXTFILE) +TEDIT.GET.OBJECT1 (POBJ PFILE PSTR PLOOKS) SEDIT::COMPUTE-ALL-FORMATS (SEDIT::DONT-COLLECT-CHANGES?) +CURSORCREATE (CUIMAGE CUMASK CUHOTSPOTX CUHOTSPOTY CUDATA) OPT.COMPINIT (OPNAME) \READSTRIKEFONTFILE ( +CHARSETASCENT CHARSETDESCENT CHARSETBITMAP IMAGEWIDTHS) BEGINPAGE.IP (IPPAGESTATE) \TEDIT.CHANGE.LOOKS + (\DIRTY PLOOKS CLFONT CLBOLD CLITAL CLPROTECTED CLSELHERE CLULINE CLOLINE CLSTRIKE CLINVISIBLE +CLOFFSET CLSTYLE CLUSERINFO CLINVERTED CLSIZE CARETLOOKS \INSERTPCVALID) \READACFONTFILE (IMAGEWIDTHS +LEFTKERN CHARSETDESCENT CHARSETASCENT CHARSETBITMAP) \VFMReadNext (key volumePage) \LOCATE.PUPNET ( +RTNET# RTHOPCOUNT RTTIMER) OPT.NOTJUMP (OPNAME OPARG) \INFER.FILE.TYPE (ENDOFSTREAMOP) +FW-ADJUST-PLACEMENT (BOTTOM OFDSTATUS) SEDIT::CREATE-NULL-LIST (SEDIT::NODE-TYPE CL:STRUCTURE +SEDIT::SUB-NODES SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH SEDIT::LINEAR-FORM) TEDIT.UNDO.PARALOOKS ( +PPARALOOKS THOLDINFO) ASSURE.PUP.READY (NDBPUPHOST# PUPNET# PUPHOST#) TEDIT.LOOKS (THACTION THLEN +THCH# THFIRSTPIECE THOLDINFO THAUXINFO) \NSRANDOM.WRITEPAGES (NSFILING.SERVER.LENGTH +NSFILING.LAST.REQUEST) \VFMGetBufferFor (VOLUME VOLPAGENUM PAGE DIRTY) \TEDIT.FLUSH.UNUSED.LOOKS ( +CLMARK FMTMARK TXTCHARLOOKSLIST TXTPARALOOKSLIST) %%DO-LOGICAL-OP (PBTHEIGHT PBTDISJOINT PBTSOURCE +PBTSOURCEBIT PBTDEST PBTDESTBIT PBTDESTBPL PBTSOURCEBPL PBTWIDTH PBTSOURCETYPE PBTOPERATION) +\VECFONTINIT (FONTDEVICE FONTFAMILY FONTSIZE FONTFACE ROTATION FONTAVGCHARWIDTH WIDTHS) +\NSFILING.OPEN.HANDLE (NSHDATUM NSHACCESS) \DISCARDFRAME (ACLINK USECNT) TEDIT.PUT.PCTB (LINELENGTH +PFILE DEFAULTCHARLOOKS CARETLOOKS FMTSPEC) \TEDIT.GET.PARALOOKS1 (1STLEFTMAR LEFTMAR RIGHTMAR +LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD TABX TABKIND FMTSPECIALX FMTSPECIALY FMTUSERINFO +FMTPARATYPE FMTPARASUBTYPE FMTSTYLE FMTCHARSTYLES FMTNEWPAGEBEFORE FMTNEWPAGEAFTER) TERM.CLEAR.TAB ( +TERM.TAB.STOPS) \NSRANDOM.TRUNCATEFILE (PAGE OFFSET NSFILING.SERVER.LENGTH) SETFILEPTR (CHARPOSITION) +\CREATE.TEDIT.DELETESELECTION (HOW HASCARET HOWHEIGHT) BUTTONPANEL (ITEMS CENTERFLG WHENSELECTEDFN +WHENHELDFN) \DELETEPIECE (PREVPIECE NEXTPIECE) MakeMenuOfPrinters (ITEMS TITLE WHENSELECTEDFN) +\RTP.ACTION (BSPINITTIMER RTPSTATE RTPTIMEOUT) \SETUPGETCH (FATSTREAMP PIECE COFFSET CPAGE PCSTARTPG +PCSTARTCH PCOFFSET BINABLE CHARSLEFT CBUFSIZE CURRENTPARALOOKS CURRENTLOOKS) TEDIT.SELECTED.PIECES ( +\INSERTPC) MAKEHARDCOPYMODESTREAM (IMAGEOPS STRMBOUTFN OUTCHARFN) \TEDIT.SET.SEL.LOOKS (HOW HOWHEIGHT +HASCARET) SEDIT::CFV-DOTLIST (SEDIT::INLINE-WIDTH SEDIT::PREFERRED-WIDTH) \TELERAIDBREAK (FAULTFXP +TELERAIDFXP) GRAPHOBJ.IMAGEBOXFN (XSIZE YSIZE YDESC XKERN) \CURSORPOSITION (NEWMOUSEX NEWMOUSEY +NEWMOUSESTATE) \BASEBYTES.BLOCKIO (COFFSET) SCROLL.HANDLER (VERTSCROLLWINDOW HORIZSCROLLWINDOW) +\SPP.NOT.RESPONDING (SPPINACTIVECOUNT SPPTERMINATEDP SPPROUNDTRIPTIME) \TERPRI.PSC (CHARPOSITION) +SEDIT::OUTPUT-BITMAP (SEDIT::LINEAR-PREV SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT) PROCESSPROP ( +PROCWINDOW RESTARTABLE PROCINFOHOOK PROCAFTEREXIT PROCBEFOREEXIT PROCTTYENTRYFN PROCTTYEXITFN +PROCUSERDATA PROCRESTARTFORM) SEDIT::SET-SELECTION-LITATOM (SEDIT::SELECT-NODE SEDIT::SELECT-STRING +SEDIT::SELECT-START) ROTATE-BITMAP (PBTDISJOINT PBTDEST PBTSOURCE PBTDESTBPL PBTSOURCEBPL PBTSOURCEBIT + PBTDESTBIT PBTFLAGS PBTHEIGHT PBTWIDTH) \FM.PUTITEMPROP (FM.LABEL FM.ID FM.GROUPID FM.STATE +FM.INITSTATE FM.FONT FM.BITMAP FM.HIGHLIGHT FM.REGION FM.MAXREGION FM.MESSAGE FM.LINKS FM.SYSDOWNFN +FM.SYSMOVEDFN FM.SYSSELECTEDFN FM.DOWNFN FM.HELDFN FM.MOVEDFN FM.SELECTEDFN) SEDIT::SET-POINT-STRING ( +SEDIT::POINT-NODE SEDIT::POINT-STRING) \BASEBYTES.IO.INIT (DEVICENAME RESETABLE RANDOMACCESSP +PAGEMAPPED FDBINABLE FDBOUTABLE FDEXTENDABLE CLOSEFILE DELETEFILE DIRECTORYNAMEP EVENTFN GENERATEFILES + GETFILEINFO GETFILENAME HOSTNAMEP OPENFILE READPAGES REOPENFILE SETFILEINFO TRUNCATEFILE WRITEPAGES +BIN BOUT PEEKBIN READP BACKFILEPTR BBSNCHARS SETFILEPTR GETFILEPTR GETEOFPTR EOFP BLOCKIN BLOCKOUT +RENAMEFILE) SEDIT::BUILD-NODE (SEDIT::CURRENT-NODE SEDIT::\X) SEDIT::BACKSPACE-COMMENT (SEDIT::POINT-NODE + SEDIT::POINT-INDEX SEDIT::POINT-TYPE) TWODINSPECT.SELECTCOLUMNPROP (ELTWIDTH ELTLEFT ELTBOTTOM PROP) +CLEARSTK (PAGE# EDFXP) \BASEBYTES.SETFILEPTR (COFFSET BBSNCHARS) BRHC/LAYOUT/TERMINAL (XCOORD YCOORD) +CHAT.CHOOSE.PHONE.NUMBER (ITEMS TITLE) ROTATE-BITMAP-LEFT (PBTDISJOINT PBTDEST PBTSOURCE PBTDESTBPL +PBTSOURCEBPL PBTSOURCEBIT PBTDESTBIT PBTFLAGS PBTHEIGHT PBTWIDTH) \BIGNUM.LSH (ELEMENTS) +CURSORPOSITION (XCOORD YCOORD) \IRM.CHOOSE.REF (CENTERFLG TITLE ITEMS) \SFMAKECOLOR (CHARSETBITMAP) +\DSPTOPMARGIN.PSC (POSTSCRIPTTOPMARGIN) \RESETTERMINAL (LPARCOUNT LBRKCOUNT INSTRINGP PEEKEDCHAR) +FW-CREATEW (OFDWINDOW LEFT OFDLEFT BOTTOM OFDBOTTOM WIDTH OFDWIDTH HEIGHT OFDHEIGHT) \BASEBYTES.BOUT ( +COFFSET) STRIKECSINFO (WIDTHS OFFSETS IMAGEWIDTHS CHARSETBITMAP YWIDTHS CHARSETASCENT CHARSETDESCENT) +\BASEBYTES.BIN (COFFSET) UPDATEWFROMIMAGE (LEFT BOTTOM WIDTH HEIGHT) CH.FINDSERVER (NSOBJECT NSDOMAIN +NSORGANIZATION) CLOSERTPSOCKET (BSPINITTIMER RTPPROCESS) \TEDIT.PRESS.HARDCOPY (EDITOPACTIVE) +OPT.CHECKTAG (LEVEL) UTF8.OUTCHARFN (CHARPOSITION) %%FAST-COPY-BASE (PBTDISJOINT PBTSOURCETYPE +PBTOPERATION PBTSOURCE PBTSOURCEBIT PBTDEST PBTDESTBIT PBTDESTBPL PBTSOURCEBPL PBTWIDTH PBTHEIGHT) +\CREATE.TEDIT.SHIFTEDSELECTION (HASCARET) \FILLINXIP (EPTYPE XIPTCONTROL XIPTYPE XIPSOURCENSADDRESS +XIPSOURCESOCKET XIPLENGTH XIPDESTNSADDRESS XIPDESTNET XIPDESTSOCKET XIPDESTHOST) \SETUPSTACK1 ( +FLAGWORD PADDING IVAR FLAGBYTE USECNT %#BLINK %#ALINK %#CLINK FNHEADER PC NEXTBLOCK) +\TEDIT.CLOSEUPLINES (YBOT YBASE NEXTLINE PREVLINE) \CHANGECHARSET.HDCPYDISPLAY (DDCHARIMAGEWIDTHS) +\OPENLEAFCONNECTION (SEQNAME SEQFRNPORT SEQACKED SEQINPUT SEQBROKEN SEQABORTED SEQTIMEDOUT SEQTIMEDIN +SEQCLOSED SEQIDLEFN SEQIDLETIMEOUTCOMPUTER SEQOPENERRORHANDLER SEQDONEQ LEAFCACHETIMER +SEQIGNOREDUPLICATES LEAFOPENCLOSELOCK LEAFCACHEHITS LEAFCACHEMISSES LEAFOPCODE LEAFLENGTH PUPLENGTH +EPUSERFIELD LEAFFLAGS LEAFPCONNTIMEOUT LEAFPLOCKTIMEOUT) TTMAKECOMPLEXCHAR (CPXREALCHAR CPXWIDTH +CPXNCHARS CPXPRINTCHARS) \10MBRAWENCAPSULATE (10MBLENGTH) \LEAF.LOOKUPCACHE (LEAFPAGECACHE) +DELETE.TO.END (NEXTLINE END LASTCOL) \MEDW.GETBOXSCREENPOSITION (SCREEN XCOORD YCOORD) DINFO ( +MONITORLOCK) \RESETSTACK0 (FAULTFXP HardReturnFXP TELERAIDFXP KbdFXP GCFXP SubovFXP MiscFXP StackBase +ResetFXP) \MAKEBASEBYTESTREAM (ACCESS DEVICE USERCLOSEABLE USERVISIBLE BYTESIZE CPAGE EPAGE CBUFPTR +COFFSET BIASOFFST CBUFSIZE EOFFSET FULLFILENAME OUTCHARFN LINELENGTH CHARPOSITION WRITEXTENSIONFN +BBSNCHARS) TEDIT.UNDO.LOOKS (PLOOKS CARETLOOKS THOLDINFO) POSTSCRIPT.GETFONTID (FONTIDNAME FONTXFACTOR + FONTOBLIQUEFACTOR) \ROUTE.PUP (EPNETWORK PUPDESTNET PUPSOURCENET PUPSOURCEHOST) \MBS.OUTCHARFN ( +BBSNCHARS FW7) \TEDIT.INSERT.PIECES (\INSERTPCVALID PFILE PFPOS PLOOKS PPARALOOKS) +\NSRANDOM.CREATE.STREAM (NSHACCESS NSFILING.HANDLE EPAGE EOFFSET MULTIBUFFERHINT CPAGE COFFSET +NSFILING.SERVER.LENGTH) \BASEBYTES.TRUNCATEFN (EOFFSET) \FBITMAPBIT.UFN (BITS) CARET (CURSOR) +CONTINUEDIT (FILECHANGES FILEDATES FILEDATE DATEFILENAME) OPENSTRINGSTREAM (CHARSET USERCLOSEABLE +USERVISIBLE F2 STRMBINFN) FW-CREATE-OFD-WINDOWS (OFDSTREAM) \PFInitFileDescriptors (fileID) +\OUTCHARFN.PRESS (CHARPOSITION CHARWASDISPLAYING PRXPOS) \RTP.SHOW.FAILURE (BSPFAILURESTRING +BSPFAILUREREASON) SET-PACKAGE-INTERACTIVELY (TITLE ITEMS CENTERFLG) \PUSHSTATE.IP (XPOS YPOS) +%%MAKE-TWOD-ARRAY (BASE READ-ONLY-P BIT-P EXTENDABLE-P TYPE-NUMBER BOUND0 BOUND1 TOTAL-SIZE) +\NSFILING.FULLNAME (NSHNAME) CURSORHOTSPOT (XCOORD YCOORD) \DSPBOTTOMMARGIN.PSC ( +POSTSCRIPTBOTTOMMARGIN) SEDIT::NEW-BLOCK (SEDIT::BLOCK-START SEDIT::BITS?) PFI.MAKE.LPT.STREAM (LEFT) +\TEDIT.GET.CHARLOOKS1 (PLOOKS PNEW CLSTYLE CLUSERINFO CLBOLD CLITAL CLULINE CLOLINE CLSTRIKE +CLSMALLCAP CLPROTECTED CLINVISIBLE CLSELHERE CLCANCOPY CLSIZE CLOFFSET CLFONT) FSETVAL (VALUE) +CHARLOOKS.FROM.FONT (CLFONT CLBOLD CLITAL CLSIZE CLOFFSET) BRHC/LAYOUT (FROMNODES NODEPOSITION XCOORD +YCOORD) \ROUTE.XIP (EPNETWORK XIPDESTNET XIPSOURCENET) \HDCPYBLTCHAR (DDMICAXPOS DDXPOSITION +PBTDESTBIT PBTWIDTH PBTSOURCEBIT) OPT.RETMERGE (FRAME LEVEL TAG) CRITSECT (LX RX) SEDIT::SET-POINT-LITATOM + (SEDIT::POINT-NODE SEDIT::POINT-STRING SEDIT::POINT-INDEX SEDIT::POINT-TYPE) \BSP.HANDLE.INPUT ( +ACKPENDING) MSVERB (ROOT TENSE MODIFIER) MAKEXYPT (X Y) GETBOXSCREENREGION (SCREEN LEFT BOTTOM WIDTH +HEIGHT) SEDIT::BUILD-LINEAR-FORM (SEDIT::CURRENT-X SEDIT::CURRENT-NODE SEDIT::LAST-LINEARIZED-SUB-NODE-INDEX SEDIT::LINEAR-FORM SEDIT::PREV-LINE SEDIT::NODE SEDIT::LINE-SKIP SEDIT::LINE-ASCENT SEDIT::LINE-DESCENT SEDIT::INDENT SEDIT::YCOORD SEDIT::LINEAR-PREV SEDIT::CURRENT-LINE SEDIT::FIRST-LINE SEDIT::LINEAR-POINTER SEDIT::FIRST-BLOCK SEDIT::BLOCK-NEW-X SEDIT::BLOCK-START SEDIT::CURRENT-BLOCK SEDIT::RELINEARIZATION-TIME-STAMP SEDIT::BELOW? SEDIT::LINE-LENGTH -SEDIT::ACTUAL-LLENGTH SEDIT::ACTUAL-WIDTH SEDIT::LAST-LINE) \\CORE.OPENFILE (IOEOFFSET IOEPAGE -IOFILEPAGES PAGENUMBER DEVICE INFOBLK FULLFILENAME EOFFSET EPAGE EOLCONVENTION CBUFMAXSIZE F1) -CHAT.RECONNECT (ITEMS LEFT BOTTOM) |\\PFInsertDirectoryID| (|seal| |version| |maxEntries|) -SPP.BACKFILEPTR (COFFSET) MARKASCHANGED (CHANGED) |\\LFFileSpec| (VERSION EXPANDEDNAME FSDIRPTR) -\\10MBRAWRECEIVE (10MBLENGTH EPTYPE) |\\VFMGenerateFileIDs| (|filePage|) MBUTTON.FIND.NEXT.FIELD (CH# -CHLIM DCH SELOBJ POINT SELKIND) \\ROUTE.XIP (EPNETWORK XIPDESTNET XIPSOURCENET) FILL.INITTBLE ( -PBTFLAGS PBTDESTBPL PBTSOURCEBPL PBTUSEGRAY PBTGRAYWIDTHLESSONE PBTGRAYHEIGHTLESSONE PBTDISJOINT -PBTOPERATION PBTSOURCETYPE PBTHEIGHT FBBT TX TY ADDR LLEN TXTW TXTH TXTA TEXT STRM BITS LFT RGT TOP -BOT) TRACEREGION (LEFT BOTTOM WIDTH HEIGHT) \\SFROTATECSINFO (CHARSETBITMAP OFFSETS) -\\CREATE.TEDIT.FACE.MENU (ITEMS CENTERFLG TITLE LEFT BOTTOM) BMOBJ.IMAGEBOXFN (XSIZE YSIZE YDESC XKERN -) \\LEAF.LOOKUPCACHE (LEAFPAGECACHE F3) EDITBMRESHAPEFN (LEFT BOTTOM WIDTH HEIGHT) -\\OPENLEAFCONNECTION (SEQNAME SEQFRNPORT SEQACKED SEQINPUT SEQBROKEN SEQABORTED SEQTIMEDOUT SEQTIMEDIN - SEQCLOSED SEQIDLEFN SEQIDLETIMEOUTCOMPUTER SEQOPENERRORHANDLER SEQDONEQ LEAFCACHETIMER -SEQIGNOREDUPLICATES LEAFOPENCLOSELOCK LEAFCACHEHITS LEAFCACHEMISSES LEAFOPCODE LEAFLENGTH PUPLENGTH -EPUSERFIELD LEAFFLAGS EPFLAGS LEAFPCONNTIMEOUT LEAFPLOCKTIMEOUT) GRAPHOBJ.IMAGEBOXFN (XSIZE YSIZE -YDESC XKERN) \\DOHARDRETURN1 (ALINK \#BLINK \#CLINK \#ALINK SIZE RESIDUAL NEXTBLOCK BLINK SLOWP USECNT - NAMETABLO FASTP ACLINK) \\DSPSPACEFACTOR.PSC (POSTSCRIPTSPACEFACTOR POSTSCRIPTSPACEWIDTH) -MAKEHARDCOPYMODESTREAM (IMAGEOPS STRMBOUTFN OUTCHARFN) SETPROPLIST (PROPLIST) PAINTW.READBRUSHSHADE ( -CENTERFLG TITLE ITEMS MENUBORDERSIZE LEFT BOTTOM) BRHC/LAYOUT/DAUGHTERS (XCOORD YCOORD) \\UNBOXFLOAT2 -(NEXTBLOCK) FB.COPY/RENAME.MANY (DEFAULTDIR) \\TEDIT.COPY.PIECEMAPFN (PNEW POBJ PLOOKS CLPROTECTED -CLSELHERE) \\CORE.NEXTFILEFN (COREFILELST) \\GCSCANSTACK (SIZE) MENUSELECT (MENUUSERDATA) -\\CORE.SETFILEPTR (CBUFSIZE CBUFPTR CPAGE COFFSET) \\TEDIT.TEXTBIN.FILESETUP (PCSTARTPG FW6 PCSTARTCH -FW7 CPPTR CPAGE COFFSET EPAGE CBUFSIZE CHARSLEFT F2 REALFILE F1 FATSTREAMP F4 BINABLE) DIRECTORY ( -PATTERN FILEGENERATORS) \\ROUTE.PUP (EPNETWORK PUPDESTNET PUPSOURCENET PUPSOURCEHOST) DSPEOLFN ( -DDEOLFN) \\NSFILING.FULLNAME (NSHNAME) TEDIT.GET.PARALOOKS0 (PPARALOOKS 1STLEFTMAR LEFTMAR RIGHTMAR -LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD TABX TABKIND) \\CORE.BACKFILEPTR (COFFSET CBUFSIZE CBUFPTR -CPAGE CHARPOSITION) \\FM.STATE-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN FM.STATE -ITEMS MENUFONT CENTERFLG TITLE LEFT BOTTOM) SEDIT::NEW-BLOCK (SEDIT::BLOCK-START SEDIT::BITS?) -DIRECTORY.NEXTFILE (STRINGNAME LITERALNAME FILEGENERATORS) \\FM.FORMAT (LEFT BOTTOM WIDTH HEIGHT) -\\SETUP.TYPENUM.TABLE (DTDGCTYPE DTDHUNKP) \\COURIER.CHECK.PROCEDURES (FN# ARGS RETURNSNOISE RESULTS -REPORTSNOISE ERRORS) \\CHANGECHARSET.HDCPYDISPLAY (DDCHARIMAGEWIDTHS) BREAKREGIONSPEC (LEFT BOTTOM -WIDTH HEIGHT) \\DECUSECOUNT (USECNT) DELETE.LONG.SEGMENT1 (NEXTLINE LASTCOL END) \\CORE.SETFILEINFO ( -|IOFIBType| COREEOLC) DSPSCROLL (|DDScroll|) |\\PFCreateFileDescriptors| (|volNum| |type| |size| -|fileID|) %EXTEND-ARRAY (BASE READ-ONLY-P TYPE-NUMBER TOTAL-SIZE BOUND0 BOUND1 DISPLACED-P -FILL-POINTER-P OFFSET FILL-POINTER) \\INCUSECOUNT (USECNT FASTP \#BLINK \#CLINK SLOWP) WINDOWPOSITION -(XCOORD YCOORD) \\DOSTACKOVERFLOW (|SubovFXP|) \\EDITBMHOWMUCH (TITLE ITEMS CENTERFLG LEFT BOTTOM) -\\FM.NWAY-SETUP (FM.MESSAGE FM.SYSDOWNFN FM.SYSMOVEDFN FM.SYSSELECTEDFN) MSPARSE (VPART C VB1 VB2) -\\SPP.CLEANUP (SPPTERMINATEDP DEVICEINFO SPPOUTPUTSTREAM SPPINPUTSTREAM SPPSUBSTREAM SPPMYNSOCKET -SPPPROCESS) SEDIT::CLOSE-NODE (SEDIT::OPEN-NODE-CHANGED?) \\MOVEFRAME (SIZE FLAGWORD RESIDUAL -NEXTBLOCK BLINK \#BLINK \#CLINK SLOWP NAMETABLO) DO.SHIFTED.SELECTION (COLPOS ROWPOS) -\\COREFILE.SETPARAMETERS (EOLCONVENTION COREEOLC |IOFIBType| |IOFIBCreationTime|) SEDIT::SET-POINT-LITATOM - (SEDIT::POINT-NODE SEDIT::POINT-STRING SEDIT::POINT-INDEX SEDIT::POINT-TYPE) GET.EDIT.BITMAP.MENU ( -TITLE ITEMS CENTERFLG CHANGEOFFSETFLG LEFT BOTTOM) \\CORE.SETACCESSTIME (|ReadTime| |IOFIBReadTime| -|WriteTime| |IOFIBWriteTime|) \\3MBRAWRECEIVE (EPTYPE) \\HDCPYBLTCHAR (DDMICAXPOS DDXPOSITION -PBTDESTBIT PBTWIDTH PBTSOURCEBIT) \\RELEASE.FTPCONNECTION (FTPBUSY) \\INIT-MISCN-TABLE (MISCN-MVS) -%ALTER-AS-DISPLACED-ARRAY (STORAGE READ-ONLY-P INDIRECT-P DISPLACED-P FILL-POINTER-P OFFSET -FILL-POINTER TOTAL-SIZE DIMS) OPT.RESOLVEJUMPS (JSN JML JU) \\CREATECOREDEVICE (FDBINABLE FDBOUTABLE -FDEXTENDABLE DEVICENAME RESETABLE RANDOMACCESSP PAGEMAPPED NODIRECTORIES BUFFERED CLOSEFILE DELETEFILE - GETFILEINFO OPENFILE READPAGES SETFILEINFO TRUNCATEFILE WRITEPAGES GETFILENAME REOPENFILE -GENERATEFILES EVENTFN DEVICEINFO DIRECTORYNAMEP HOSTNAMEP READP BIN BOUT PEEKBIN BACKFILEPTR -SETFILEPTR GETFILEPTR GETEOFPTR SETEOFPTR EOFP BLOCKIN BLOCKOUT FORCEOUTPUT GETNEXTBUFFER OPENP -REGISTERFILE UNREGISTERFILE) %ALTER-AS-DISPLACED-TO-BASE-ARRAY (STORAGE INDIRECT-P DISPLACED-P -FILL-POINTER-P TYPE-NUMBER OFFSET FILL-POINTER TOTAL-SIZE DIMS) \\FONTFACE.COLOR (WEIGHT SLOPE -EXPANSION BACKCOLOR FORECOLOR COLOR) \\EXTENDSTACK (STACKOVERFLOW |EndOfStack|) TB.NTH.ITEM ( -TBTAILHINT) \\GENERIC-UNREGISTER-STREAM (OPENFILELST) FB.GET.NEW.FILE.SPEC (DEFAULTDIR) GETNSPRINTER ( -NSPRINTERNAME NSPRINTERADDRESS) SEDIT::LINE-FINISHED (SEDIT::BLOCK-WIDTH SEDIT::BLOCK-START -SEDIT::NEXT-BLOCK SEDIT::REPAINT-START SEDIT::REPAINT-LINE SEDIT::REPAINT-X) \\ADD-OPEN-STREAM ( -OPENFILELST) \\TEDIT.PRESS.HARDCOPY (EDITOPACTIVE) \\INIT.KEYBOARD.STREAM (DEVICENAME CLOSEFILE -EVENTFN BIN PEEKBIN READP EOFP GETFILENAME USERCLOSEABLE USERVISIBLE FULLFILENAME DEVICE ACCESS) -DO.EDIT.PP (FIRSTCOL LASTCOL) CREATEARRAYSLICE (SELECTEDDIMS OFFSETS OFFSETCONSTANT LINEARIZEDARRAY) -\\FM.3STATE-CHANGESTATE (FM.STATE FM.BITMAP FM.REGION) ED (ITEMS TITLE LEFT BOTTOM) \\PAGEDGETEOFPTR ( -PAGE OFFSET) |\\VAMAdjustGroup| (|nextFilePage| |filePage| |volumePage|) -\\CREATE.TEDIT.DEFAULT.FMTSPEC (QUAD 1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD TABSPEC -) \\PAGEDGETFILEPTR (PAGE OFFSET) \\SETXIPCHECKSUM (XIPCHECKSUM) TEDIT.SUBLOOKS (\\DIRTY \\XDIRTY -PLOOKS) SEDIT::BUILD-INTERNAL-STRUCTURE (SEDIT::NODE-TYPE SEDIT::DEPTH SEDIT::SUB-NODES SEDIT::LINEAR-FORM - SEDIT::START-X SEDIT::ACTUAL-WIDTH SEDIT::ROOT SEDIT::CARET-POINT SEDIT::SELECTION SEDIT::CURRENT-NODE - SEDIT::\\X SEDIT::OPEN-NODE SEDIT::OPEN-NODE-INFO SEDIT::BUFFER-STRING SEDIT::SUBSTRING) -CHAT.PROMPT.FOR.INPUT (LEFT BOTTOM WIDTH HEIGHT) \\FTP.FIX.BROKEN.INPUT (FTPIN FTPOUT) -SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END -SEDIT::SELECT-START-X SEDIT::SELECT-TYPE) \\NODIRCORE.OPENFILE (DEVICE INFOBLK FULLFILENAME EOFFSET -EPAGE EOLCONVENTION CBUFMAXSIZE F1 PAGENUMBER) \\TERMINATESPP (SPPTERMINATEDP SPPSTATE SPPPROCESS) -INSPECT/ATOM (ITEMS LEFT BOTTOM) \\ALLOCBLOCK (INUSE GCTYPE) \\SETUPGUARDBLOCK (FLAGWORD SIZE) -\\DSPCLIPPINGREGION.PSC (POSTSCRIPTCLIPPINGREGION POSTSCRIPTPENDINGXFORM) \\LEAF.ABORT.FROMMENU ( -LEAFABORTSTATUS) \\CORE.GETNEXTBUFFER (CBUFSIZE CBUFPTR COFFSET CPAGE EPAGE EOFFSET) ICONTITLE ( -ICREGION ICFONT ICJUST) CHANGE-TTY-PROCESS-INTERACTIVELY (TITLE CENTERFLG ITEMS LEFT BOTTOM) -CURSOR.INIT (PBTSOURCEBPL PBTDISJOINT PBTSOURCETYPE PBTOPERATION PBTDESTBIT PBTSOURCEBIT PBTDESTBPL) -\\PS.SCALEHACK (LEFT BOTTOM WIDTH HEIGHT POSTSCRIPTX POSTSCRIPTY POSTSCRIPTLEFTMARGIN -POSTSCRIPTRIGHTMARGIN POSTSCRIPTBOTTOMMARGIN POSTSCRIPTTOPMARGIN POSTSCRIPTTRANSX POSTSCRIPTTRANSY -POSTSCRIPTSCALEHACK POSTSCRIPTPENDINGXFORM) \\CREATE.TITLEMENU (ITEMS LEFT BOTTOM) -\\POSTSCRIPT.OUTCHARFN (POSTSCRIPTY POSTSCRIPTCHARSTOSHOW POSTSCRIPTX) \\UNBOXFLOAT1 (NEXTBLOCK HIWORD - LOWORD) \\POSTSCRIPT.ACCENTFN (POSTSCRIPTCHARSTOSHOW) FB.COUNT.FILE.CHANGE (TOTALFILES DELETEDFILES -TOTALPAGES DELETEDPAGES) \\LEAF.DEVICEP (DEVICENAME CLOSEFILE DELETEFILE GETFILEINFO OPENFILE -READPAGES WRITEPAGES SETFILEINFO TRUNCATEFILE GETFILENAME REOPENFILE GENERATEFILES EVENTFN -DIRECTORYNAMEP HOSTNAMEP RENAMEFILE DEVICEINFO PFSNAME PFSOSTYPE PFSLEAFSEQUIN FORCEOUTPUT OPENP -REGISTERFILE UNREGISTERFILE BREAKCONNECTION) \\TEDIT.CHANGE.LOOKS (\\DIRTY \\XDIRTY PLOOKS CLFONT -CLBOLD CLITAL CLPROTECTED CLSELHERE CLULINE CLOLINE CLSTRIKE CLINVISIBLE CLOFFSET CLSTYLE CLUSERINFO -CLINVERTED CLSIZE CARETLOOKS \\INSERTPCVALID) GRAPHOBJ.BUTTONEVENTINFN (ITEMS LEFT BOTTOM) MAPATOMS ( -PAGE#) DELETEHASHKEY (|#Entries|) SEDIT::ATOM-CHANGE-RELINEARIZE (SEDIT::CHANGED?) %MAKE-ONED-ARRAY ( -BASE READ-ONLY-P BIT-P STRING-P DISPLACED-P FILL-POINTER-P EXTENDABLE-P TYPE-NUMBER OFFSET -FILL-POINTER TOTAL-SIZE) \\TEDIT.CARET (TCCARET) \\ORIGREADTABLE (READMACROFLG ESCAPEFLG NUMBERBASE -USESILPACKAGE ESCAPECHAR PACKAGECHAR HASHMACROCHAR) \\DISPLAYLINE (LEFT BOTTOM WIDTH HEIGHT -DDXPOSITION) MSSEEKPHRASE (SOUGHT ITEM C PARSED POSSIBLES START ENDING MODIFIER) -\\CREATE.TEDIT.MOVESELECTION (HASCARET HOWHEIGHT) MAKEMACFORMAT (INCCODEFN PEEKCCODEFN BACKCHARFN -FILEOUTCHARFN) TEDIT.GET.OBJECT1 (POBJ PFILE PSTR PLOOKS) \\TEDIT.REOPEN.STREAM (PFILE TXTFILE) -\\BUFFERED.COPYBYTES (COFFSET) SI::UNWIND-TO-BLIP (PC) \\LINEBLT (PBTDEST PBTDESTHI PBTDESTLO -PBTSOURCE PBTGRAYOFFSET PBTSOURCEHI PBTSOURCELO PBTDESTBIT PBTSOURCEBIT PBTWIDTH) \\CREATE.SYMBOL ( -VALUE PNAMEBASE PNAMELENGTH FATPNAMEP) TEDIT.UNDO.PARALOOKS (PPARALOOKS THOLDINFO) -\\CHANGE-VISIBLE-REGION.IP (IPVISLEFT IPVISRIGHT IPVISTOP IPVISBOTTOM IPVISIBLEREGION -IPMAXVISIBLEBASELINE IPMINVISIBLEBASELINE IPCHARVISIBLEP IPMINCHARRIGHT) \\ALLOCHEIGHTTOGROUPEDWINDOW -(ATYSIZE) SEDIT::SCAN-STRING (SEDIT::POINT-INDEX SEDIT::POINT-TYPE SEDIT::POINT-LINE SEDIT::POINT-X -SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::SELECT-TYPE SEDIT::SELECT-START-LINE SEDIT::SELECT-END-LINE - SEDIT::SELECT-END-X SEDIT::SELECT-START-X) \\TEDIT.GET.PARALOOKS1 (1STLEFTMAR LEFTMAR RIGHTMAR -LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD TABX TABKIND FMTSPECIALX FMTSPECIALY FMTUSERINFO -FMTPARATYPE FMTPARASUBTYPE FMTSTYLE FMTCHARSTYLES FMTNEWPAGEBEFORE FMTNEWPAGEAFTER) PUTCURSORPROP ( -CUDATA) \\NSRANDOM.RELEASE.LOCK (NSHACCESS) \\ALLOCWIDTHTOGROUPEDWINDOW (ATXSIZE) \\CH.UPDATE.CACHE ( -OCORGANIZATION DCKNOWNSERVERS OCDOMAINS DCDOMAIN OCALLSERVERS) TEDIT.LOOKS (THACTION THLEN THCH# -THFIRSTPIECE THOLDINFO THAUXINFO) TTYINBUFFERBACKPTR (TTYINPUT F1) \\CREATE.TEDIT.DELETESELECTION (HOW - HASCARET HOWHEIGHT) \\TEDIT.MARK.LINES.DIRTY (DIRTY TXTNEEDSUPDATE) \\COURIER.CHECK.ERRORS (ERR# ARGS -) SEDIT::SHIFT-LINEAR-FORM (SEDIT::START-X) \\GATHER-CLEANUP-FORMS (PROCHARDRESETINFO) -|\\LFUnpackName| (VOLNUM CHARLIST VERSION) \\COURIER.ATTENTIONFN (SPPOUTPUTABORTEDFN SPPOUTPUTABORTEDP -) MSSETREP (EXPRESSION PRED MSPATHOPTIONS MSVERB OTHERSET RECS ROOT MODIFIER QUOTED NEGATED REP) -BRHC/LAYOUT (FROMNODES NODEPOSITION XCOORD YCOORD) BEGINPREAMBLE.IP (IPPAGESTATE) DELETE.TO.END ( -NEXTLINE END LASTCOL) DOICONWINDOWCOM (ITEMS CHANGEOFFSETFLG MENUOFFSET XCOORD YCOORD WHENHELDFN -WHENUNHELDFN CENTERFLG LEFT BOTTOM) DISCARDXIPS (INQUEUELENGTH) \\TEDIT.SET.SEL.LOOKS (HOW HOWHEIGHT -HASCARET) SEDIT:SEDIT (SEDIT::CHANGED-STRUCTURE?) \\CREATEPIECEORSTREAM (PSTR PFILE PLEN PPARALAST -PPARALOOKS PFATP PLOOKS) SELECT.ATOM.ASPECT (ITEMS TITLE CENTERFLG LEFT BOTTOM) SETTOPVAL (VALUE) -\\HCPYMODEDISPLAYINIT (IMAGETYPE IMFONT IMRIGHTMARGIN IMLEFTMARGIN IMLINEFEED IMDRAWLINE IMDRAWCURVE -IMDRAWCIRCLE IMDRAWELLIPSE IMFILLCIRCLE IMBLTSHADE IMBITBLT IMXPOSITION IMYPOSITION IMMOVETO -IMSTRINGWIDTH IMCHARWIDTH IMFONTCREATE IMSCALE IMNEWPAGE IMSPACEFACTOR) \\NODIRCOREFDEV (READP) -\\CORE.SETEOFPTR (EPAGE EOFFSET CBUFSIZE CBUFPTR) \\DSPRESET.PSC (CHARPOSITION) ARRAY (TYP LENGTH ORIG - OFFST BASE HIBYTE LOBYTE) |\\LFPurgeDirectory| (|fileID| |volNum| |type| |size|) |\\LFDirectoryP| ( -|fileID| |volNum| |type| ACCESS MAXBUFFERS) \\READSTRIKEFONTFILE (CHARSETASCENT CHARSETDESCENT -CHARSETBITMAP IMAGEWIDTHS) TERM.CLEAR.TAB (TERM.TAB.STOPS) \\FORMATLINE (RIGHTMARGIN YBOT -LOOKSUPDATEFN TILOOKSUPDATEFN CHARLIM DIRTY CHAR1 CR\\END LHASTABS PC PCOFF PCNO LHASPROT -DISPLAYHCPYDS LMARK 1STLN LEFTMARGIN LSTLN PTTABX LHEIGHT ASCENT DESCENT CHARTOP LXLIM SPACELEFT DESC -LEN LFMTSPEC) TB.UNSELECT.ALL.ITEMS (TISELECTED TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM) -\\READACFONTFILE (IMAGEWIDTHS LEFTKERN CHARSETDESCENT CHARSETASCENT CHARSETBITMAP) MSVERBTYPE ( -MODIFIER) |\\LFOpenOldFile| (|seal| FULLFILENAME FILEDESC DIRINFO DEVICE LEADERPAGE F1 F4 F2 |size| -EPAGE EOFFSET) \\TEDIT.FLUSH.UNUSED.LOOKS (CLMARK FMTMARK TXTCHARLOOKSLIST TXTPARALOOKSLIST) -SEDIT::INITIALIZE-LISTS (SEDIT::NAME SEDIT::ASSIGN-FORMAT SEDIT::COMPUTE-FORMAT-VALUES SEDIT::LINEARIZE - SEDIT::SUB-NODE-CHANGED SEDIT::COMPUTE-POINT-POSITION SEDIT::COMPUTE-SELECTION-POSITION SEDIT::SET-POINT - SEDIT::SET-SELECTION SEDIT::GROW-SELECTION SEDIT::SELECT-SEGMENT SEDIT::INSERT CL:DELETE -SEDIT::COPY-STRUCTURE SEDIT::COPY-SELECTION SEDIT::STRINGIFY SEDIT::BACK-SPACE) SEDIT::GENERATE-LINEAR-FORM - (SEDIT::RIGHT-MARGIN SEDIT::START-X SEDIT::ACTUAL-WIDTH SEDIT::FIRST-LINE SEDIT::CURRENT-NODE -SEDIT::LAST-LINEARIZED-SUB-NODE-INDEX SEDIT::LINEAR-POINTER SEDIT::LINEAR-PREV SEDIT::ACTUAL-LLENGTH -SEDIT::LAST-LINE SEDIT::CHANGED?) \\FM.3STATE-SETUPOFFBITMAP (FM.HIGHLIGHT) \\SFLHASHLOOKUP (HASHPAGE# -) TEDIT.UNDO.LOOKS (PLOOKS CARETLOOKS THOLDINFO) DEFAULT.INSPECTW.PROPCOMMANDFN (ITEMS LEFT BOTTOM) -OPT.PRATTACH (NXT PREV) \\DELETETREE (TOTLEN COUNT) \\SETUPUSERSTACK (|EndOfStack|) IDLE.SET.OPTION ( -ITEMS LEFT BOTTOM TITLE CENTERFLG) CURSORCREATE (CUIMAGE CUMASK CUHOTSPOTX CUHOTSPOTY CUDATA) -SEDIT::SET-POINT-LIST (SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::POINT-TYPE) -ONEDINSPECT.ADJUSTSELECTION (ELTBOTTOM ELTWIDTH ELTLEFT PROP) SEDIT::SETUP-WINDOW-CONTEXT-DEPENDENCIES - (LEFT BOTTOM WIDTH HEIGHT) ICONPOSITION.FROM.WINDOW (XCOORD YCOORD) \\CREATE.INSPECTABLEMENU (ITEMS -LEFT BOTTOM) MBUTTON.CREATE (XSIZE YSIZE YDESC XKERN) SEDIT::REPLACE-CHARS (SEDIT::REAL-LENGTH LENGTH -FILL-POINTER TOTAL-SIZE DIMS SEDIT::OPEN-NODE-CHANGED?) \\RENAMEDFN (FNHEADER) SI::NON-LOCAL-GO (PC) -\\BASEBYTES.BLOCKIO (COFFSET) %DO-LOGICAL-OP (PBTHEIGHT PBTDISJOINT PBTSOURCE PBTSOURCEHI PBTSOURCELO -PBTSOURCEBIT PBTDEST PBTDESTHI PBTDESTLO PBTDESTBIT PBTDESTBPL PBTSOURCEBPL PBTWIDTH PBTSOURCETYPE -PBTOPERATION) \\DISCARDFRAME (ACLINK \#BLINK \#CLINK \#ALINK USECNT) INSPECT/BITMAP (ITEMS LEFT BOTTOM -) ROTATE-BITMAP (PBTDISJOINT PBTDEST PBTSOURCE PBTDESTBPL PBTSOURCEBPL PBTSOURCEBIT PBTDESTBIT -PBTFLAGS PBTHEIGHT PBTWIDTH PBTDESTHI PBTDESTLO PBTSOURCEHI PBTSOURCELO) \\BASEBYTES.IO.INIT ( -DEVICENAME RESETABLE RANDOMACCESSP PAGEMAPPED FDBINABLE FDBOUTABLE FDEXTENDABLE CLOSEFILE DELETEFILE -DIRECTORYNAMEP EVENTFN GENERATEFILES GETFILEINFO GETFILENAME HOSTNAMEP OPENFILE READPAGES REOPENFILE -SETFILEINFO TRUNCATEFILE WRITEPAGES BIN BOUT PEEKBIN READP BACKFILEPTR BBSNCHARS FW7 SETFILEPTR -GETFILEPTR GETEOFPTR EOFP BLOCKIN BLOCKOUT RENAMEFILE) \\CREATE.SETABLEMENU (ITEMS LEFT BOTTOM) -\\TEDIT.GET.CHARLOOKS1 (PLOOKS PNEW CLSTYLE CLUSERINFO CLBOLD CLITAL CLULINE CLOLINE CLSTRIKE -CLSMALLCAP CLPROTECTED CLINVISIBLE CLSELHERE CLCANCOPY CLSIZE CLOFFSET CLFONT) -\\NSFILING.SET.CONTINUANCE (FSCONTINUANCE) PFCOPYBYTES (ENDOFSTREAMOP) ROTATE-BITMAP-LEFT (PBTDISJOINT - PBTDEST PBTSOURCE PBTDESTBPL PBTSOURCEBPL PBTSOURCEBIT PBTDESTBIT PBTFLAGS PBTHEIGHT PBTWIDTH -PBTDESTHI PBTDESTLO PBTSOURCEHI PBTSOURCELO) GETD (FNHEADER) \\CURSORPOSITION (NEWMOUSEX NEWMOUSEY -NEWMOUSESTATE) \\INFER.FILE.TYPE (ENDOFSTREAMOP) DOATTACHEDWINDOWCOM (ITEMS CHANGEOFFSETFLG MENUOFFSET - XCOORD YCOORD WHENHELDFN WHENUNHELDFN CENTERFLG LEFT BOTTOM) \\SFMAKECOLOR (CHARSETBITMAP) -\\CREATE.TEDIT.SHIFTEDSELECTION (HASCARET) PROCESSPROP (PROCWINDOW RESTARTABLE PROCINFOHOOK -PROCAFTEREXIT PROCBEFOREEXIT PROCTTYENTRYFN PROCTTYEXITFN PROCUSERDATA PROCRESTARTFORM) \\GETSPP ( -SPPACCEPTNO) \\SETUPGETCH (FATSTREAMP F4 PIECE F5 COFFSET CPAGE PCSTARTPG FW6 PCSTARTCH FW7 PCOFFSET -TIPCOFFSET BINABLE CHARSLEFT F2 CBUFSIZE CURRENTPARALOOKS TICURPARALOOKS CURRENTLOOKS F10) -TEDIT.SELECTED.PIECES (\\INSERTPC) RESET/NODE/LABELSHADE (NODELABELSHADE NODELABELBITMAP XCOORD YCOORD -) TRANSLATEREG (LEFT BOTTOM WIDTH HEIGHT) \\IRM.CHOOSE.REF (CENTERFLG TITLE ITEMS LEFT BOTTOM) -BREAKLINE (END LASTCOL) MENUWRESHAPEFN (ITEMWIDTH WIDTH ITEMHEIGHT HEIGHT XCOORD YCOORD) UNIONREGIONS -(LEFT BOTTOM WIDTH HEIGHT) \\BASEBYTES.BOUT (COFFSET) \\BASEBYTES.BIN (COFFSET) \\DELETEPIECE ( -PREVPIECE NEXTPIECE) FB.MAKE.SUBDIRECTORY.ITEM (TIUNSELECTABLE TIDATA FILENAME STARTOFPNAME -VERSIONLESSNAME DIRECTORYP) \\GETFTPCONNECTION (FTPBUSY ACCESS) \\TEXTMENU.START (LEFT BOTTOM WIDTH -HEIGHT MENUFLG) MARK/GRAPH/NODE (NODEBORDER NODELABELSHADE) TEDIT.FORMATBOX (LEFT BOTTOM REGIONSPEC -PAGELINECACHE LTEXTOBJ CHNO) SEDIT::MAKE-GAP (SEDIT::LINEAR-ITEM) SEDIT::REPLACE-QUOTE (SEDIT::SUPER-NODE - SEDIT::SUB-NODE-INDEX) %FAST-COPY-BASE (PBTDISJOINT PBTSOURCETYPE PBTOPERATION PBTSOURCE PBTSOURCEHI -PBTSOURCELO PBTSOURCEBIT PBTDEST PBTDESTHI PBTDESTLO PBTDESTBIT PBTDESTBPL PBTSOURCEBPL PBTWIDTH -PBTHEIGHT) \\TEDIT.RESHAPEFN (WTOP WRIGHT WBOTTOM WLEFT YBOT NEXTLINE PREVLINE YBASE) MAKELINE (ORIG -DIFF WIND) \\TEDIT.INSERT.PIECES (\\INSERTPCVALID PFILE PFPOS PLOOKS PPARALOOKS) \\10MB.CREATENDB ( -NDBNSNET# NDBPUPNET# NETTYPE NDBPUPTYPE NDBTRANSMITTER NDBENCAPSULATOR NDBBROADCASTP NDBTASK# -NDBETHERFLUSHER NDBCANHEARSELF) \\MKATOM.FULL (STORAGEFULL) \\FM.3STATE-SETUP (FM.MESSAGE FM.SYSDOWNFN - FM.SYSMOVEDFN FM.SYSSELECTEDFN) \\TEDIT.CUMULATE.EVENTS (THLEN NEXTPIECE PREVPIECE) -TOPW.ADJUSTSELECTION (ELTBOTTOM ELTWIDTH ELTLEFT PROP) \\CH.GUESS.NEW.PROPERTIES (NSOBJECT) -\\LEAF.SETCREATIONDATE (OPWORD HANDLE FILEADDRESS SIGNEXTEND DATALENGTH LEAFFILEDATE LEAFLENGTH -LFCREATIONDATE) \\LEAF.DELETEFILE (OPWORD HANDLE LEAFLENGTH LEAFCONNECTION F1) FILEBROWSER (MENUFONT -ITEMS CENTERFLG MENUCOLUMNS WHENSELECTEDFN TITLE LEFT BOTTOM WIDTH HEIGHT BROWSERWINDOW BROWSERFONT -OVERFLOWSPACING SORTBY FIXEDTITLE INFOMENUCHOICES FBLOCK FBDEPTH HEADINGWINDOW PROMPTWINDOW -ABORTWINDOW MENUOUTLINESIZE TABLEBROWSER) \\BASEBYTES.SETFILEPTR (COFFSET BBSNCHARS FW7) -TEDIT.DISPLAYTEXT (REALFILE F1) INSPECTW.REDISPLAY (SELECTABLEITEMREGION COMMANDFN ITEMINFO -ITEMINFOTYPE LEFT BOTTOM WIDTH HEIGHT) INITIALIZE-SHELL-DEVICE (NODIRECTORIES DEVICENAME BIN BOUT -PEEKBIN CLOSEFILE GETFILEINFO SETFILEINFO EOFP BACKFILEPTR) \\MAKEBASEBYTESTREAM (ACCESS DEVICE -USERCLOSEABLE USERVISIBLE BYTESIZE CPAGE EPAGE CBUFPTR COFFSET BIASOFFST FW6 CBUFSIZE EOFFSET -FULLFILENAME OUTCHARFN LINELENGTH CHARPOSITION WRITEXTENSIONFN F1 BBSNCHARS FW7) TB.DESELECTRANGE ( -TISELECTED TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM) \\PUTD (PSEUDOCODEP CCODEP ARGTYPE FASTP DEFPOINTER - DEFCELLFLAGS) SEDIT::INITIALIZE-COMMENTS (SEDIT::NAME SEDIT::ASSIGN-FORMAT SEDIT::COMPUTE-FORMAT-VALUES - SEDIT::LINEARIZE SEDIT::SET-POINT SEDIT::SET-SELECTION SEDIT::GROW-SELECTION SEDIT::SELECT-SEGMENT -SEDIT::COMPUTE-POINT-POSITION SEDIT::COMPUTE-SELECTION-POSITION SEDIT::INSERT CL:DELETE -SEDIT::COPY-STRUCTURE SEDIT::COPY-SELECTION SEDIT::STRINGIFY SEDIT::BACK-SPACE SEDIT::CLOSE-NODE) -|\\LFCreateDevice| (NODIRECTORIES DEVICENAME CLOSEFILE DELETEFILE RENAMEFILE TRUNCATEFILE GETFILEINFO -GETFILENAME OPENFILE READPAGES SETFILEINFO WRITEPAGES REOPENFILE GENERATEFILES EVENTFN DIRECTORYNAMEP -HOSTNAMEP OPENP REGISTERFILE UNREGISTERFILE) STRIKECSINFO (WIDTHS OFFSETS IMAGEWIDTHS CHARSETBITMAP -YWIDTHS CHARSETASCENT CHARSETDESCENT) \\MBS.OUTCHARFN (BBSNCHARS FW7) \\TEDIT.CLOSEUPLINES (YBOT YBASE - NEXTLINE PREVLINE) \\SETUPSTACK1 (FLAGWORD PADDING IVAR FLAGBYTE USECNT \#BLINK \#ALINK \#CLINK -FNHEADER PC NEXTBLOCK) \\BASEBYTES.TRUNCATEFN (EOFFSET) SEDIT::REPLACE-LIST (SEDIT::SUB-NODE-INDEX -SEDIT::SUPER-NODE CL:STRUCTURE SEDIT::POINT-NODE SEDIT::POINT-INDEX SEDIT::POINT-TYPE SEDIT::SELECT-START - SEDIT::SELECT-END SEDIT::NODE-TYPE) TEDIT.PUT.PCTB (LINELENGTH PFILE DEFAULTCHARLOOKS CARETLOOKS -FMTSPEC) FB.UPDATEBROWSERITEMS (INFODISPLAYED INFOWIDTH FBREADY BROWSERFONT DELETEDFILES DELETEDPAGES -TOTALPAGES TOTALFILES SORTMENU PATTERNPARSED? SIZEINDEX PAGECOUNT? NOSUBDIRECTORIES SORTATTRIBUTE -SORTBY) \\VECFONTINIT (FONTDEVICE FONTFAMILY FONTSIZE FONTFACE ROTATION FONTAVGCHARWIDTH WIDTHS) -TEDIT.DO.BLUEPENDINGDELETE (CHLIM DCH POINT) %MAKE-GENERAL-ARRAY (STORAGE READ-ONLY-P INDIRECT-P BIT-P - STRING-P ADJUSTABLE-P DISPLACED-P FILL-POINTER-P EXTENDABLE-P TYPE-NUMBER OFFSET FILL-POINTER -TOTAL-SIZE DIMS) ICMLARRAY.GETMENUWGROUP (XCOORD YCOORD) COPYIMAGEOBJ (OBJECTDATUM IMAGEOBJPLIST -IMAGEOBJFNS) |\\VFMPutNext| (|key| |volumePage| |nextKey|) CLEARSTK (PAGE# EDFXP) BEGINPAGE.IP ( -IPPAGESTATE) SEDIT::SELECT-SEGMENT (SEDIT::DELETE-OK? SEDIT::PENDING-DELETE?) SETFILEPTR (CHARPOSITION -) TEDIT.RAW.INCLUDE (TXTRAWINCLUDESTREAM PFILE PFPOS PLEN PREVPIECE NEXTPIECE PLOOKS PPARALAST -PPARALOOKS TEXTLEN CHLIM CH# DCH DX POINT SELKIND SELOBJ \\DIRTY \\XDIRTY PC PCOFF PCNO) -TB.INSERT.ITEM (TBITEMS TB#ITEMS TB#DELETED TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM) -TEDIT.OBJECT.CHANGED (\\DIRTY \\XDIRTY) EDITBMSCROLLFN (LEFT BOTTOM) \\RESETSTACK0 (FAULTFXP -|HardReturnFXP| TELERAIDFXP |KbdFXP| GCFXP |SubovFXP| |MiscFXP| |StackBase| |ResetFXP|) -SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (SEDIT::PREV-LINE BOTTOM HEIGHT) %MAKE-TWOD-ARRAY (BASE -READ-ONLY-P BIT-P EXTENDABLE-P TYPE-NUMBER BOUND0 BOUND1 TOTAL-SIZE) \\BACKFORMAT (YBOT YBASE PREVLINE - NEXTLINE) |\\LFGetStreamForFile| (|fileID| |volNum| |type|) TB.UNDELETE.ITEM (TIDELETED TB#DELETED) -SPYOBJ (LABEL PERCENT CACHEDLABEL) \\CENTICLOCK (CENTICLOCKSIGNBIT) \\FM.TOGGLE-CHANGESTATE (FM.STATE -FM.BITMAP FM.REGION) \\BIGNUM.LSH (ELEMENTS) \\HDCPYDISPLAY.FIX.YPOS (DDMICAYPOS) PRINTERDEVICE ( -OPENFILE CLOSEFILE ACCESS) \\RESETTERMINAL (LPARCOUNT FW6 LBRKCOUNT FW7 INSTRINGP PEEKEDCHAR F3) -\\LEAF.GETFILE (LEAFREALLYOPEN F5 LEAFCACHEDFILE OPCODE OPENMODE LEAFLENGTH DEVICE LEAFCONNECTION F1 -LEAFHANDLE F2 FULLFILENAME LEAFPAGECACHE F3 EPAGE EOFFSET) SET-READTABLE-INTERACTIVELY (TITLE ITEMS -CENTERFLG LEFT BOTTOM) \\CH.CHECK.CLEARINGHOUSE (NSOBJECT NSDOMAIN NSORGANIZATION) PAINTW.READCOMMAND -(ITEMS LEFT BOTTOM) CURSORPOSITION (XCOORD YCOORD) CURSORHOTSPOT (XCOORD YCOORD) COMP.CALL (EXTCALL) -SEDIT::THROW-AWAY-CHANGES (SEDIT::ATOM-STARTED SEDIT::ATOM-STARTED-UNDO-POINTER SEDIT::CHANGED-STRUCTURE? - SEDIT::UNDO-LIST SEDIT::UNDO-UNDO-LIST) \\STRINGSTREAM.INIT (DEVICENAME CLOSEFILE DELETEFILE -DIRECTORYNAMEP EVENTFN GENERATEFILES GETFILEINFO GETFILENAME HOSTNAMEP OPENFILE READPAGES REOPENFILE -SETFILEINFO TRUNCATEFILE WRITEPAGES BIN F2 F1 PEEKBIN READP BACKFILEPTR EOFP) SEDIT::SETUP-NEW-CONTEXT - (SEDIT::CONTEXT-LOCK) TB.SELECTRANGE (TISELECTED TBFIRSTSELECTEDITEM TBLASTSELECTEDITEM) -|\\CreateCursorBitMap| (BITMAPRASTERWIDTH BITMAPWIDTH BITMAPHEIGHT BITMAPBASE) COMP.DECLARE1 (OPNAME) -MSBLOCK (TYPES FNS FILES) |\\LFUpdateLeaderPage| (|EofPage| |EOffSet| |AllocatedPages| |TimeWrite| -|TimeCreate| VALIDATION |TimeRead|) CHAT.CHOOSE.PHONE.NUMBER (ITEMS TITLE LEFT BOTTOM) COMP.LAM1 ( -OPNAME) |\\LFCreateFile| (FULLFILENAME FILEDESC |fileID| |volNum| |type| DEVICE F1 |filePage| -|volumePage| |nextFilePage| LEADERPAGE F2) IRM.CREF.BUTTONEVENTFN (HEIGHT WIDTH LEFT BOTTOM) -ICMLARRAY.GETREGIONFN (XCOORD YCOORD) MB.COPYFN (OBJECTDATUM IMAGEOBJPLIST IMAGEOBJFNS) -SEDIT::MAKE-BROKEN-ATOM (SEDIT::ATOM-CHARS) OPENSTRINGSTREAM (CHARSET USERCLOSEABLE USERVISIBLE F2 -STRMBINFN) DSPDESTINATION (DEVICE IMAGEOPS |DDDestination|) \\FBITMAPBIT.UFN (BITS) CLOSENSOCKET ( -NSOCEVENT) UPDATEPCNODES (TOTLEN) |\\LFMakeVolumeDirectory| (|fileID| |volNum| |type| |size| -|filePage| |volumePage| |nextFilePage|) SEDIT::CLEAR-LINEAR-FORM (SEDIT::START-X SEDIT::LINEAR-FORM -SEDIT::LINEAR-THREAD) \\SENDSPP (SPPSEQNO SENDACK) \\BITBLT.BITMAP (PBTWIDTH PBTHEIGHT) INTERRUPTED ( -IN-PROGRESS P-ETHERINTERRUPT P-LOGMSGSPENDING P-IOINTERRUPT P-STORAGEFULL P-STACKOVERFLOW P-VMEMFULL -P-GCDISABLED INTCHARCODE WAITINGINTERRUPT P-WAITINGINTERRUPT) BEEPOFF (DLBEEPCMD) REGIONONSCREEN (LEFT - BOTTOM WIDTH HEIGHT) TTYINBUFFERBIN (TTYINPUT F1) \\DOMISCAPPLY1 (MISCSTACKRESULT) -\\MAIKO.DISPLAYLINE (LEFT BOTTOM WIDTH HEIGHT DDXPOSITION) SPY.MERGE.CALLEES (TREEFROM CALLEES STATUS) - CL:VECTOR-POP (FILL-POINTER) \\TELERAIDSEND (PUPDESTHOST PUPDESTNET PUPDESTSOCKETHI PUPDESTSOCKETLO -PUPSOURCESOCKETHI PUPSOURCESOCKETLO PUPCHECKSUM 3MBDESTHOST 3MBLENGTH) TEDIT.MAKESEL (CH# CHLIM DCH -POINT \\TEXTOBJ SET) \\TEDIT.FIND (CH# CHLIM DCH POINT CARETLOOKS \\INSERTNEXTCH) LAYOUTSEXPR1 (NODEID - NODELABEL TONODES) BEEPON (DLBEEPFREQ DLBEEPCMD) SEDIT::CREATE-QUOTED-GAP (SEDIT::NODE-TYPE -CL:STRUCTURE SEDIT::SUB-NODES SEDIT::UNASSIGNED SEDIT::SUPER-NODE SEDIT::SUB-NODE-INDEX SEDIT::LINEAR-FORM -) \\TEDIT.HISTORYADD (TXTHISTORY) COMPOSEREGS (LEFT BOTTOM) FILING.CALL (FSSESSIONHANDLE -FSREALACTIVITY FSLASTREALACTIVITYTIMER) \\PUSHSTATE.IP (XPOS YPOS) \\SETDAYTIME0 (LONUM HINUM -DLPROCESSOR2 DLPROCESSOR1 DLPROCESSORCMD DLTODVALID) \\CREATE.SPP.DEVICE (DEVICENAME FDBINABLE -BUFFERED EVENTFN TRUNCATEFILE CLOSEFILE BIN BOUT EOFP READP PEEKBIN BACKFILEPTR FORCEOUTPUT BLOCKIN -BLOCKOUT GETNEXTBUFFER GETFILEPTR SETFILEPTR) NIL -REFFREE CLOCKDIFFERENCE (\\MISCSTATS) FASL:MAKE-OPTABLE (FASL::END-MARK) TB.SHOW.SELECTION ( -TB.SELECTION.BITMAP) \\DOMISCAPPLY1 (|\\MiscFXP|) SEDIT::PARSE--BROKEN-ATOM (SEDIT::TYPE-LITATOM) -SEDIT::COMPLETE (:CLOSE :ABORT :CLOSE-ON-COMPLETION :SHRINK :DONE) RCOMP3 (COUTFILE) -\\HARDRESET-CLEANUP1 (MYALINK \\STACKHI WORDSPERQUAD WORDSPERCELL \\LITATOM \\NEW-ATOM PVARCODE) -SEDIT::PRETTY-PRINT (SEDIT::PRETTY-PRINT-ENV MICASPERPT SEDIT::TYPE-ROOT) TWODINSPECT.REPAINTFN ( -INSPECTPRINTLEVEL) PRINTPACKETDATA (BYTESPERWORD) ADJUSTLINE.AND.RESTORE (\\HOMECOL \\ARROW \\CURSOR) -NS.ECHOUSER (|\\NS.WKS.Echo| \\XIPT.ECHO \\XECHO.OP.REQUEST \\XIPOVLEN BYTESPERWORD \\XECHO.OP.REPLY -\\XIPT.ERROR) APPENDOP.IP (SHORTOP LONGOP) \\HCPYMODEBLTCHAR (MICASPERPT \\CURSORDESTINATION -\\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS) ADD.BORDER.TO.BITMAP (WHITESHADE) COMPILER::*LITERALLY-T* - (:VALUE) \\TELERAIDCOMMAND (\\EM.KBDAD0 \\EM.KBDAD1 \\EM.KBDAD2 \\EM.KBDAD3 \\EM.UTILIN \\EM.KBDAD4 -\\EM.KBDAD5 \\TELERAIDBLOCK \\MACHINETYPE \\DANDELION \\DAYBREAK) COMP.DECLARE (SYSSPECVARS -SYSLOCALVARS FRAME COMP.UNBOXED.TAG) \\DISABLEGC1 (|\\MDSTypeTable| |\\MDSTTsize|) \\HARDRESET-CLEANUP - (WORDSPERQUAD CELLSPERQUAD) BACKWARD.DELETE.TO (\\CURSOR) \\COPYSYS (\\CONNECTED.DIRECTORY -\\LASTUSERACTION) COMPSET (COMPSETKEYLST) UNIX-USERNAME (\\MACHINETYPE \\MAIKO) FILES? (FILELST -FILEPKGTYPES NOTCOMPILEDFILES NOTLISTEDFILES) \\DORETCALL (\\STACKHI \\#ALINK.OFFSET) MB.SHOWSELFN ( -BLACKSHADE) SCALEPAGEUNITS (TEDIT.PAPER.SIZES) TWODINSPECT.BUTTONEVENTFN (INSPECTPRINTLEVEL -LASTMOUSEBUTTONS) \\GCERROR (\\GCDISABLED) \\SWITCHFONTS.PSC (*POSTSCRIPT-UNACCENTED-FONTS* :EOL) -LAYOUTLATTICE (DEFAULTFONT) SEDIT::SMART-TTYFN (L) \\MAKE.PROCESS0 (\\DEFAULTLINEBUF \\LINEBUF.OFD -*READTABLE* \\PRIMTERMTABLE \\PRIMTERMSA \\DEFAULTTTYDISPLAYSTREAM |\\MiscFXP| *DRIBBLE-OUTPUT* -\\PROC.RESETME \\PROC.KILLME \\PROC.RESTARTME PROMPTWINDOW) \\GC.ENTER.BIGREFCNT (\\HTBIGCOUNT -\\HTBIGENTRYSIZE WORDSPERPAGE \\MP.BIGREFCNTALREADYPRESENT \\MAXHTCNT) FASL:OPEN-FASL-HANDLE ( -FASL:SIGNATURE FASL:CURRENT-VERSION :STREAM) \\CLEANUP.STACKFULL (AUTOHARDRESETFLG RESETSTATE) -\\UFS.RECOGNIZE.FILE (|\\DSKtopMonitor| |\\UFStopMonitor| MAX-PATHNAME-LEN \\FIXP RECOG-OLD -RECOG-OLDEST RECOG-NEW RECOG-NEW-OLD RECOG-NON) \\ZEROWORDS (WORDSPERSEGMENT) FASL:UNIMPLEMENTED-OPCODE - (:OPNAME) \\GATHER-SPECIAL-BINDINGS (FVARCODE |\\AtomHI| *HARDRESET-IGNORE-VARS* IVARCODE PVARCODE -\\STACKHI) SEDIT::OPEN-LITATOM (SEDIT::TYPE-STRING) SEDIT::TRACK-SELECT (LASTMOUSEBUTTONS -SEDIT::SCRATCH-SELECTION SEDIT::PENDING-SELECTION SEDIT::PENDING-CARET) COMPILER::CLOSURE-ANNOTATE-TAGBODY - (:SCOPE :LEXICAL :KIND :VARIABLE :NAME :BINDER :CLOSED-OVER) \\FTP.WHENCLOSED (FTPDEBUGLOG) -\\DRAWARC.PSC (:EOL) \\GC.MODIFY.BIGREFCNT (\\HTBIGCOUNT \\HTBIGENTRYSIZE \\ADDREFCASE MAX.SMALLP -\\DELREFCASE \\MAXHTCNT \\SCANREFCASE \\UNSCANREFCASE) ARG (\\STACKSPACE) UNIX-FULLNAME (\\MACHINETYPE - \\MAIKO) COMP.COMMENT (COMPILE.CONTEXT EXP) \\NSGATELISTENER (|\\NS.WKS.RoutingInformation| :PROTOCOL - \\NSROUTER.PROBETIMER \\NS.ROUTING.TABLE \\RT.AGEINTERVAL \\XIPT.ROUTINGINFO BROADCASTNSHOSTNUMBER -\\XIPOVLEN BYTESPERWORD \\NS.ROUTINGINFO.WORDS \\XROUTINGINFO.OP.REQUEST \\RT.INFINITY -\\NSROUTER.PROBEINTERVAL) OPT.DELETEFRAMECHECK (CODE PRA) MOVE.BACK.TO (\\CURSORCOL) -%TYPE-SIZE-TO-TYPENUMBER (%LIT-ARRAY-TYPES %LIT-ARRAY-SIZES) \\VECPUT (SPRUCEPAPERBOTTOMSCANS -SPRUCEPAPERTOPSCANS SPRUCEPAPERLEFTSCANS SPRUCEPAPERRIGHTSCANS |MicasPerScan|) |\\VAMFilePageNumber| ( -|tLispFile| |tLispDirectory| |tVolumeFileMap| |tRootDirectory| |tDiagnosticMicrocode|) \\SENDLEAF ( -\\LF.ALLOWERRORS \\LF.WANTANSWER \\PUPOVLEN \\ETHERTIMEOUT \\LEAF.BROKEN.STATUS \\LEAFOP.ERROR -\\LEAF.GOODSTATUS) APPENDRATIONAL.IP (SEQRATIONAL) \\SHOWMENULABEL (MENUSUBITEMMARK :ESCAPE) -PFI.AFTER.NEW.PAGE (DEFAULTFONT :INDEX *PFI-PAGE-PREFIX* BOLDFONT ITALICFONT) COMPILER::FIND-COPIED-VARIABLE - (:LEXICAL COMPILER::*COPY-NODE-TABLE*) NTHCHARCODE (%FAT-CHAR-TYPENUMBER \\PNAME.HI \\PLIST.HI) -\\SLOWHCPYMODEBLTCHAR (\\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS) -\\GC.BIGREFCNT.MISSING (\\MP.BIGREFCNTMISSING) COMPILER::*LITERALLY-NIL* (:VALUE) \\TELERAIDGET ( -\\EPT.PUP \\PUPSOC.TELERAID \\EPT.3TO10 \\TRANS.OP.REQUEST |\\InterfacePage| \\TRANS.OP.RESPONSE -\\TRANS.DATALENGTH) SPECVARP (MSDATABASELST LOCALVARS SPECVARS LOCALFREEVARS GLOBALVARS) FB.THINP ( -*COMPILED-EXTENSIONS*) \\PRESSINIT (MICASPERINCH) \\GC.LOOKUP.BIGREFCNT (\\HTBIGCOUNT \\MAXHTCNT -\\HTBIGENTRYSIZE) APPENDNUMBER.IP (SEQINTEGER) MULTIFILEINDEX (:PATHNAME) COMPILER::COPY-VARIABLE ( -COMPILER::*COPY-NODE-TABLE* :NAME :SCOPE :KIND :BINDER) RESET (MYALINK \\STACKHI \\PROC.RESETME -\\#ALINK.OFFSET PROMPTWINDOW) SETUPFONTS.PRESS (DEFAULTFONT) \\ALLOCPAGEBLOCK (WORDSPERPAGE) -\\SPPGETERROR (XIPTRACEFILE) UNIX-GETPARM (\\MACHINETYPE \\MAIKO) CL::%ASIN-FLOAT (CL::%ASIN-EPSILON -CL::%ASIN-PPOLY CL::%ASIN-QPOLY CL::%PI/2) ALLOCSTRING (|\\MaxArrayLen| \\MAXTHINCHAR \\ST.POS16 -\\ST.BYTE %THIN-CHAR-TYPENUMBER %FAT-CHAR-TYPENUMBER) RECORD.REMOVE.COMMENTS (COMMENTFLG) \\BITBLTSUB -(SUBRCALL) STRPOS (\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER \\TRANSPARENT \\ST.BYTE \\ST.POS16) -COMP.QUOTE (EXP) ADDTOFILES? (DWIMWAIT FILEPKGTYPES READBUF ADDTOFILEKEYLST FILELST) OPT.FRAMEVAR ( -CODE OPPOP OPNIL EQCONSTFN) \\SET.STORAGE.STATE (\\MACHINETYPE \\DOLPHIN \\DANDELION |\\InterfacePage| - \\SFS.SWITCHABLE \\SFS.NOTSWITCHABLE) SUBSTRING (\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER -\\ST.POS16 \\ST.BYTE %THIN-CHAR-TYPENUMBER) \\FILING.ATTRIBUTE.TYPE (\\NSFILING.ATTRIBUTES) -\\FREELISTCELL (\\CONSPAGE.LAST) MKSTRING (\\PNAME.HI \\PLIST.HI \\ST.POS16 \\ST.BYTE -%FAT-CHAR-TYPENUMBER %THIN-CHAR-TYPENUMBER *PRINT-BASE* *READTABLE*) \\GCMAPSCAN (\\HTMAINSIZE -\\HTMAIN GCREF) \\INSERT.FIRST.PIECE (DEFAULTFONT TEDIT.DEFAULT.FMTSPEC) \\GCMAPUNSCAN (\\HTMAINSIZE -\\HTMAIN) SEDIT::TRACK-EXTEND (SEDIT::PENDING-CARET SEDIT::PENDING-SELECTION SEDIT::INITIAL-SELECTION -LASTMOUSEBUTTONS SEDIT::SCRATCH-SELECTION) MARGINBAR.CREATE (MARGINBARIMAGEFNS) COMPILE1 (FREEVARS) -MAKE-PRIME-HASHTABLE-SIZE (PACKAGE-REHASH-THRESHOLD) FILEPKGTYPE (FILEPKGTYPEPROPS) GETHOSTINFO ( -NETWORKOSTYPES \\IP.HOSTNAMES NETWORKLOGINFO) \\ONSCREENW (HARDCURSORWIDTH) TWODINSPECT.COPYBUTTONFN ( -INSPECTPRINTLEVEL) \\REFCNT (|\\MDSTypeTable| \\HTMAIN \\MAXHTCNT \\HTCOLL) |UnixTempFile| ( -|FISTempDir|) \\EQREFCNT1 (|\\MDSTypeTable| \\HTMAIN \\HTCOLL) WORD.MATCHES.BUFFER (\\MAXTHINCHAR -\\RDTBLSA ESCAPE.RC MULTIPLE-ESCAPE.RC) \\EXTENDEDVMEMINIT (|\\InterfacePage| \\SWAPDSK1 \\SWAPDSK2 -\\MAINDISK) COMP.COND (COMPILE.CONTEXT CODE OPTIMIZATIONSOFF) TURN.ON.ETHER (\\NSFLG) OPT.FRAMEDEL ( -FRA CODE OPCOPY CL:LABELS PRA OPNIL OPPOP FRAMES) FIND.MATCHING.QUOTE (\\MAXTHINCHAR \\RDTBLSA -STRINGDELIM.RC ESCAPE.RC) NECCSPEC (U) \\DSKDISPLAY.UPDATE (\\DSKDISPLAY.STATE \\DSKDISPLAY.WINDOW) -\\LEAF.CLOSEFILE (\\SS.OPEN |AppendBit| |WriteBit| \\LEAFOP.CLOSE \\OPCODE.SHIFT \\LEN.CLOSEREQUEST -:CACHE) MAKE-PACKAGE-HASHTABLE (HASHTABLE-SIZE-LIMIT PACKAGE-REHASH-THRESHOLD) XCL::PPRINT-DEFINER ( -SPACEWIDTH :DEFINITION-PRINT-TEMPLATE COMMENTFLG *STANDARD-OUTPUT* :BODY) \\SET.FINALIZATION.FUNCTION -(|\\MaxTypeNumber| \\FINALIZATION.FUNCTIONS) SEDIT::INPUT-TOKENDELIM (SEDIT::TYPE-COMMENT) -\\STRINGWIDTH.HCPYMODE (IHALFMICASPERPT IMICASPERPT) \\TYPENUMBERFROMNAME (|\\MaxTypeNumber| -|\\DTDSpaceBase|) \\STARTPAGE.PRESS (MICASPERINCH) OPENBSPSTREAM (\\STATE.OPEN \\STATE.ENDRECEIVED -\\BSP.INITIAL.ADATATIMEOUT \\BSP.INITIAL.MAXPUPALLOC \\BSPFDEV \\STREAM.DEFAULT.MAXBUFFERS -\\NOIMAGEOPS FILELINELENGTH LF.EOLC |NoBits| |BothBits| \\BSP.INACTIVITY.TIMEOUT) BCOMPL2 (GLOBALVARS -RETFNS BLKLIBRARY NOLINKFNS LINKFNS DONTCOMPILEFNS SPECVARS LOCALVARS FNS BLOCKS) CLISPDEC1 ( -CLISPRECORDTYPES DECLWORDS SKORLST1) BITMAPBIT (MINIMUMCOLOR BITMASKARRAY 4BITMASKARRAY -\\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS) \\INITMDSPAGE (WORDSPERPAGE -|\\MDSIncrement|) TEDIT.DEFAULT.MENUFN (TEDIT.DEFAULT.MENU WAITINGCURSOR TEDIT.EXPANDED.PAGEMENU) -COURIER.REP.LENGTH (%FAT-CHAR-TYPENUMBER) |UnixPrintCommand| (UNIXPRINTSWITCHES) IRM.GET.CREF ( -\\IRM.CREF.IMAGEFNS) \\LISP.TO.NSFILING.ATTRIBUTE (\\NSFILING.TYPE.BINARY -\\LISP.TO.NSFILING.ATTRIBUTES \\NSFILING.ATTRIBUTES) \\DSPSPACEFACTOR.IP (AMPLIFYSPACE) FLIPCURSOR ( -\\EM.CURSORBITMAP HARDCURSORHEIGHT HARDCURSORWIDTH \\MACHINETYPE \\DAYBREAK \\MAIKO) -SETF-SYMBOL-PACKAGE (\\PNAME.HI *UNINTERNED-PACKAGE-INDEX*) SEDIT::INSERT-LITATOM (*PRINT-CASE* -:UPCASE) SEDIT::SHRINKFN (:CLOSE-ON-COMPLETION :SHRINK) FNTYP (\\DEF.HI) D-ASSEM:ALLOCATE-CODE-BLOCK ( -BYTESPERQUAD BYTESPERCELL CELLSPERQUAD) \\ALLOCVIRTUALPAGEBLOCK (|\\NxtArrayPage| \\GUARDSTORAGEFULL -|\\NxtMDSPage| |\\PagesPerMDSUnit| \\STORAGEFULLSTATE \\SFS.SWITCHABLE \\SFS.ARRAYSWITCHED -|\\SecondArrayPage| |\\SecondMDSPage|) RIGHTW.ADJUSTSELECTION (INSPECTPRINTLEVEL) D-ASSEM:FIXUP-PTR ( -GCREF :4-BYTE COMPILER::*HOST-ARCHITECTURE* :3-BYTE) SEDIT::TTYFN (EDITCHANGES L :NAME :TYPE -:COMPLETION-FN) \\BLTCHAR (SUBRCALL) POSTSCRIPT.STARTPAGE (:EOL \\PS.SCALE0) SHOWBITMAP.IP ( -BYTESPERCELL MAXLONGSEQUENCEBYTES) \\PROCESS.AFTER.EXIT (\\PROCESS.AFTEREXIT.EVENT) -CURRENT-TTY-PACKAGE (*WHO-LINE-PACKAGE-NAME-CACHE*) RECLAIMMIN (MAX.SMALL.INTEGER) ASKUSER ( -DEFAULTKEYLST ASKUSERTTBL READBUF) TEDIT (TEDIT.STARTUP.MONITORLOCK TEDIT.DEFAULT.PROPS) BACKSKREAD ( -\\BUFFER \\MAXTHINCHAR \\RDTBLSA LEFTPAREN.RC LEFTBRACKET.RC ESCAPE.RC STRINGDELIM.RC -MULTIPLE-ESCAPE.RC OTHER.RC RDTBL) \\PROCESS.BEFORE.LOGOUT (\\PROCESSES) FIND-LEXICAL-ENVIRONMENT ( -LASTPOS) D-ASSEM:FIXUP-PTR-NO-REF (:4-BYTE COMPILER::*HOST-ARCHITECTURE* :3-BYTE) NSNETDAYTIME0 ( -BROADCASTNSHOSTNUMBER \\TIMESOCKET \\EXTYPE.TIME \\TIMEOP.TIMEREQUEST \\TIMEVERSION \\MAXETHERTRIES -\\TIMEOP.TIMERESPONSE) \\SLOWBLTCHAR (\\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS) - PFI.MAKE.LPT.STREAM (DEFAULTPRINTINGHOST *PFI-PRINTOPTIONS*) \\OPENLINEBUF (\\DEFAULTLINEBUF) -D-ASSEM:FIXUP-SYMBOL (:4-BYTE COMPILER::*HOST-ARCHITECTURE* :3-BYTE) \\DSPPRINTCR/LF ( -\\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS) D-ASSEM:ASSEMBLE-FUNCTION (:FUNCTION) - \\MAIKO.SET.STORAGE.STATE (|\\InterfacePage| \\SFS.NOTSWITCHABLE \\SFS.SWITCHABLE) -MB.MARGINBAR.SHOWTAB (\\TEDIT.LEFTTAB \\TEDIT.CENTERTAB \\TEDIT.RIGHTTAB \\TEDIT.DECIMALTAB -\\TEDIT.DOTTED.LEFTTAB \\TEDIT.DOTTED.CENTERTAB \\TEDIT.DOTTED.RIGHTTAB \\TEDIT.DOTTED.DECIMALTAB) -\\USEREVENT (AROUNDEXITFNS) FB.SEEFULLFN (FB.MORE.BORDER) |\\SFFixY| (MAX.SMALL.INTEGER) -RECORDALLOCATIONS (USERRECLST) TWODINSPECT.DEFAULT.VALUECOMMANDFN (\;) \\FTP.SENDVERSION ( -\\FTP.VERSION) UNECCSPEC (MSDATABASELST) |\\VAMBufferSave| (|\\VAMbufferVolumePage| -|\\VAMbufferVolume| |\\VAMbuffer|) CREATEW (|MinWindowWidth| |MinWindowHeight| \\CURSORSCREEN) -CL::%TAN-FLOAT (CL:PI CL::%PI/2 CL::%TAN-EPSILON CL::%TAN-PPOLY CL::%TAN-QPOLY) COMPILER::COPY-NODE-VAR-REF - (:VARIABLE) SEDIT::INPUT-STRINGDELIM (SEDIT::TYPE-STRING) PRINT-BITMAPS-NICELY (*PRINT-LENGTH*) GCTRP - (\\RECLAIM.COUNTDOWN) ADDTOFILE (FILELST) OPT.CLEANFRAME (FRAMES FRA) \\DOGCDISABLEDINTERRUPT ( -SCREENHEIGHT) CLISPLOOKUP1 (CLASS WORD CLISPRECORDTYPES VAR1 VAR2 CLASSDEF) RIGHTW.BUTTONEVENTFN ( -INSPECTPRINTLEVEL LASTMOUSEBUTTONS) SEDIT::COMPLETION (:ABORT) COMPILER:COPY-ENV-WITH-VARIABLE ( -:LEXICAL) AIN (%THIN-CHAR-TYPENUMBER \\ST.BYTE %FAT-CHAR-TYPENUMBER \\ST.POS16 \\ST.CODE \\ST.INT32 -\\ST.FLOAT \\ST.BIT) AT.END.OF.SCREEN (\\ARROW \\CURSOR \\CURSORCOL \\CHARWIDTH \\RMARG) IRM.CREF.BOX -(IRM.CREF.FONT) D-ASSEM:INTERN-DCODE (WORDSPERQUAD BYTESPERWORD CELLSPERQUAD BYTESPERCELL GCREF -:CLOSURE :FUNCTION) MB.DEFAULTBUTTON.ACTIONFN (TEDIT.EXPANDED.PAGEMENU) AOUT (%THIN-CHAR-TYPENUMBER -\\ST.BYTE %FAT-CHAR-TYPENUMBER \\ST.POS16 \\ST.CODE \\ST.INT32 \\ST.FLOAT) -TWODINSPECT.DEFAULT.TITLECOMMANDFN (LASTMOUSEBUTTONS \;) PFI.LINES.REMAINING (*STANDARD-OUTPUT*) -COMPILER:ENV-BOUNDP (:SPECIAL :GLOBAL) LIST-ALL-BLOCKRECORDS (USERRECLST) SEDIT::HASFAT ( -%FAT-CHAR-TYPENUMBER \\MAXTHINCHAR) \\TELERAIDSERVER (\\LOCALNDBS \\TELERAIDPACKET TR.GIVEPAGE -WORDSPERPAGE \\VMAP.VACANT \\TELERAIDBUFFER BYTESPERPAGE \\PUPOVLEN TR.HEREISPAGE TR.STORE -TR.STOREDONE TR.GO TR.GOACK TR.GOREPLY MAX.SMALL.INTEGER \\EM.KBDAD0 \\EM.KBDAD1 \\EM.KBDAD2 -\\EM.KBDAD3 \\EM.UTILIN \\EM.KBDAD4 \\EM.KBDAD5 \\TELERAIDBLOCK |\\ResetFXP| \\MISCSTATS \\RCLKSECOND -TR.ERROR) < (CL::%<) USERNAME (|\\InterfacePage| GCONST \\USERNAME) COMPILER:ASSEMBLER-ERROR ( -:FORMAT-STRING :FORMAT-ARGUMENTS) DODIRCOMMANDS (UPPERCASEARRAY FILEINFOTYPES) CL:USE-PACKAGE ( -*PACKAGE*) \\COURIER.WHENCLOSED (COURIERTRACEFILE) \\TEDIT.LOOKS.UPDATE (LOOKS |LMInvisibleRun| ASCENT - DESCENT DEVICE |LMLooksChange|) \\MAKE.COURIER.REP.STREAM (|BothBits|) UPDATEFILES (FILEPKGTYPES -FILELST) \\SHOWSEL (BLACKSHADE) SEDIT:DEFAULT-COMMANDS (SEDIT::DEFAULT-COMMAND-TABLE-SPEC) -TEDIT.STRINGWIDTH (%FAT-CHAR-TYPENUMBER) > (CL::%>) MSCHECKVARS1 (ENTRIES V U MSDATABASELST -BLKAPPLYFNS BLKAPPLYCALLERS SEEN BLKFNS) COMPILER:COPY-ENV-WITH-FUNCTION (:FUNCTION) |\\VFMSaveBuffer| - (|\\VFMbufferPool|) FEQP (\\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER \\SMALLP \\EXPONENT.BIAS \\8BITS -\\SIGNBIT \\MAX.EXPONENT \\HIDDENBIT) CL:MAKE-PACKAGE (:NAME :NAMESYMBOL :EXTERNAL-ONLY -:INTERNAL-SYMBOLS :EXTERNAL-SYMBOLS :INDEX *PACKAGE-FROM-NAME* *PACKAGE-FROM-INDEX*) BOXCOUNT ( -|\\DTDSpaceBase| \\FIXP) CLIPBOARD-PASTE-STREAM (CLIPBOARD-FORMAT) COMPILER::COPY-NODE-UNWIND-PROTECT -(:STMT :CLEANUP) OPT.FRAMELOCAL (SYSSPECVARS) CLISPIFY2B (TAIL PARENT SUBPARENT CLISPTRANFLG -CLISPCHARS LAMBDASPLST CLISPARRAY) REPLACEFIELD (\\FIXP \\SMALLP \\FLOATP) CONSCOUNT (\\LISTP) -SETUSERNAME (|\\InterfacePage| GCONST) EXPORT (*PACKAGE*) INVERT.TEXTURE.BITMAP (BITSPERWORD WORDMASK) - APPENDLARGEVECTOR.IP (SEQLARGEVECTOR) COMPILER::COPY-NODE-THROW (:TAG :VALUE) INVERT.TEXTURE ( -BLACKSHADE) INITPUPLEVEL1 (\\MACHINETYPE \\DANDELION) REMOVE-COMMENTS (*REMOVE-INTERLISP-COMMENTS*) -COMPILER:OPTIMIZE-AND-MACROEXPAND-1 (COMPILER::*ENVIRONMENT* COMPILER::*CONTEXT*) \\COERCEFONTDESC ( -\\DISPLAYSTREAMTYPES DEFAULTFONT) COURIER.OPEN (|\\NS.WKS.Courier| \\SPPDSTYPE.COURIER -COURIERTRACEFILE COURIER.VERSION#) CL:SHADOWING-IMPORT (*PACKAGE*) CL:SHADOW (*PACKAGE*) COMP.GENFN ( -COMFN) \\TEDIT.TRY.ABBREV (TEDIT.ABBREVS) |InstallUnixPrinter| (PRINTERTYPES) SEDIT:RESET-COMMANDS ( -SEDIT::COMMAND-TABLE-SPEC) DBG::COLLECT-ACTIVE-ESCAPES (XCL:*EVAL-FUNCTION*) \\ACTONDISKPAGES ( -\\SYSDISK \\MAINDISK \\MISCSTATS \\DISKREQUESTBLOCK \\EMUDISKBUFFERS \\EMUSCRATCH \\DC.WRITEHLD -\\DC.WRITELD \\DC.WRITED WORDSPERPAGE \\EMUDISKBUFEND WORDSPERCELL |\\MiscFXP| BYTESPERPAGE) -MAXIMUMSHADE (BLACKSHADE) WTFIXLOADEF (DWIMIFYING FASL.EXT COMPILE.EXT DWIMWAIT DWIMKEYLST) -PFI.SETUP.TRANSLATIONS (*PFI-CHARACTER-TRANSLATIONS*) CHECKBUFFERREFVAL (GCREF) \\DISKERROR ( -\\DSK.HARD.ERROR \\MAINDISK \\DSK.FULL.ERROR) \\TELERAIDINIT (\\TELERAIDBITMAPS) INTERPRESSBITMAP ( -MICASPERINCH DEFAULT.INTERPRESS.BITMAP.ROTATION) PARSE.NSNAME (CH.DEFAULT.DOMAIN -CH.DEFAULT.ORGANIZATION) IMPORT (*PACKAGE*) \\INDICATESTRING (\\MAXTHINCHAR) MB.SELFN (BLACKSHADE) -\\SETETHERFLAGS (\\MACHINETYPE \\DANDELION \\DAYBREAK \\MAIKO BYTESPERPAGE \\DORADO |\\InterfacePage|) - \\TEDIT.HCPYLOOKS.UPDATE (LOOKS |LMInvisibleRun| DEVICE ASCENT DESCENT |LMLooksChange|) -\\DOACTONDISKPAGES (\\EOFDA \\DC.NOOP \\FILLINDA \\DSK.HARD.ERROR) ARRAYTYP (\\ST.BYTE \\ST.PTR2 -\\ST.PTR \\ST.POS16 \\ST.CODE \\ST.INT32 \\ST.FLOAT \\ST.BIT) OPENPOSTSCRIPTSTREAM (\\PS.TEMPARRAYLEN -\\POSTSCRIPTIMAGEOPS USERNAME \\POSTSCRIPT.JOB.SETUP POSTSCRIPT.PAGETYPE POSTSCRIPT.PAGEREGIONS -POSTSCRIPT.IMAGESIZEFACTOR \\PS.SCALE0 DEFAULTFONT \\POSTSCRIPT.ORIENTATION.MENU) \\INSTANCE-P ( -\\LITATOM \\NEW-ATOM) UPDATECHANGED1 (MSDATABASELST MSCHANGEDARRAY) RAISE-SIGNAL ( -*CONDITION-HANDLER-BINDINGS* :MULTIPLE-HANDLER-BINDINGS) CREATETEXTUREFROMBITMAP (BITMASKARRAY) -GETSUPERTYPE (|\\DTDSpaceBase|) \\CLEARMAP (|AppendBit| |WriteBit|) NSNAME.TO.STRING ( -CH.DEFAULT.ORGANIZATION CH.DEFAULT.DOMAIN) SEDIT:REPLACE-SELECTION (:SUB-LIST) GLOBALVARP (GLOBALVARS) - |\\PFRoomForFile| (|tVolumeFileMap|) SETD (\\ST.PTR2) GETFIELDSPECS (|\\DTDSpaceBase|) -COMPILER::COPY-NODE-TAGBODY (COMPILER::*COPY-NODE-TABLE* :TAGS :STMTS) ELTD (\\ST.PTR2) SETY.PRESS ( -SPRUCEPAPERBOTTOMMICAS SPRUCEPAPERTOPMICAS |SetYCode|) INTERPRESS.BITMAPSCALE (POINTSPERINCH) -CL:RENAME-PACKAGE (*PACKAGE-FROM-NAME*) \\DOWRITEDISKPAGES (\\FILLINDA \\EOFDA \\DC.WRITED -\\SPAREDISKWRITEBUFFER \\DC.READLD BYTESPERPAGE \\DC.WRITELD \\DSK.HARD.ERROR \\DSK.FULL.ERROR) -CH.ISMEMBER (\\CH.BROADCAST.SOCKET \\CH.NULL.PROPERTY) VARSBOUNDINFORM (LAMBDASPLST COMPILERMACROPROPS -) M44.SIGNAL.DISK.ERROR (\\DSK.HARD.ERROR \\DSK.FULL.ERROR) IRM.DISPLAY.CREF (IRM.CREF.FONT) -DELETE-PACKAGE (*PACKAGE-FROM-NAME* *PACKAGE-FROM-INDEX*) RESOLVE-USE-PACKAGE-CONFLICT (:PACKAGE -:SYMBOLS :USED-PACKAGE) TB.UPDATE.DISPLAY (WHITESHADE) \\TYPENAMEFROMNUMBER (|\\MaxTypeNumber| -|\\DTDSpaceBase|) SEDIT::GET-BUTTON-STRING (SEDIT::TYPE-STRING) CL:UNUSE-PACKAGE (*PACKAGE*) -EXCHANGEXIPS (\\ETHERTIMEOUT) \\EXPECTED.FILE.TYPE (\\MACHINETYPE \\MAIKO) UNDOSAVE (LISPXHIST -UNDOSAVES DWIMWAIT) PFI.COLLECT.DEFINERS (FILEPKGTYPES *PFI-DEFINER-PROPS*) FINDPTRSBUFFER ( -SYSTEMBUFFERLIST) CL:UNINTERN (*PACKAGE*) REHASH (WORDSPERCELL) CL:READ-CHAR (*STANDARD-INPUT*) -\\SPP.DUPLICATE.REQUEST (\\SPPDEVICE) CLEARMAP (\\OPENFILES) OPT.MERGEFRAMEP (MERGEFRAMETYPES -SYSSPECVARS FRAMES FREEVARS MERGEFRAMEFLG) \\3MB.CREATENDB (\\3MBTYPE.PUP) LRSH (\\FIXP \\SMALLP -\\FLOATP \\SIGNBIT) STKNTHNAME (MYALINK \\STACKHI \\#ALINK.OFFSET WORDSPERCELL) RESTORE.CURSOR ( -\\HOMECOL \\HOMEROW) \\NSFILING.ADDQUOTES (%FAT-CHAR-TYPENUMBER) ADD-SYMBOL (\\PNAME.HI \\PLIST.HI -HASHTABLE-SIZE-LIMIT PACKAGE-REHASH-THRESHOLD) CLIPBOARD-COPY-STREAM (CLIPBOARD-FORMAT) CL:STRING= ( -SLEN1 SLEN2 BASE1 TYPENUMBER1 BASE2 TYPENUMBER2) HASHARRAY (|\\MaxArrayNCells| PTRBLOCK.GCT) DATATYPEP - (|\\DTDSpaceBase| |\\MaxTypeNumber|) RESOLVE-EXPORT-MISSING (:PACKAGE :SYMBOLS) INSURE.B&W.TEXTURE ( -WHITESHADE BLACKSHADE) NUKE-SYMBOL (%FAT-CHAR-TYPENUMBER) \\MEDW.BITBLT (\\TOPWDS \\SCREENBITMAPS) -\\BITBLT.MERGE (BITSPERWORD) BLOCKCOMPILE (NLAMA NLAML LAMS LAMA NOFIXFNSLST NOFIXVARSLST SYSSPECVARS -FILERDTBL) MAPBUFFERCOUNT (SYSTEMBUFFERLIST) \\ACTONVMEMPAGES (\\SWAPREQUESTBLOCK) TB.PRINT.LINE ( -TB.LEFT.MARGIN) RESOLVE-EXPORT-CONFLICT (:PACKAGE :SYMBOLS :EXPORTED-SYMBOLS :PACKAGES) -\\WRITEVMEMPAGES (\\DISKREQUESTBLOCK WORDSPERCELL BYTESPERPAGE) FB.ANALYZE.PATTERN (UPPERCASEARRAY) -COURIER.ABORT.BULKDATA (:BULKDATA :ABORT) CL:UNEXPORT (*PACKAGE*) DATATYPES (|\\MaxTypeNumber| -|\\MaxSysTypeNum|) \\MAPPAGE (GCREF |AppendBit| |WriteBit|) MSCHECKBOUNDFREE (MSDATABASELST -LOCALFREEVARS BLKFNS LOCALVARS SPECVARS) \\DODISKCOMMAND (\\FILLINDA \\DC.READHLD \\IDC.READHLD -\\DC.READLD \\IDC.READLD \\DC.READD \\IDC.READD \\DC.WRITEHLD \\IDC.WRITEHLD \\DC.WRITELD -\\IDC.WRITELD \\DC.WRITED \\IDC.WRITED \\DC.SEEKONLY \\IDC.SEEKONLY \\DC.RESTORE GCONST \\CBS.GOODMASK - \\CBS.ERRORBITS \\CB.PENDING \\MISCSTATS) |\\VAMRecomputeFreePageCount| (|\\VAMmonitor|) \\ENDVECRUN -(|MicasPerScan| SPRUCEPAPERLEFTSCANS SPRUCEPAPERBOTTOMSCANS SPRUCEPAPERTOPSCANS SPRUCEPAPERRIGHTSCANS) - CL::%SIN-FLOAT (CL::%PI/2 CL::%2PI CL:PI CL::%SIN-EPSILON CL::%SIN-PPOLY CL::%SIN-QPOLY) -PFI.PRINT.INDEX (*PFI-PAGE-COUNT* :INDEX *PFI-TITLE* *PFI-LOCATIONS*) \\SETEOF (BYTESPERPAGE) -COMPILER::COPY-NODE-SETQ (:VAR :VALUE) RESOLVE-IMPORT-CONFLICT (:PACKAGE :SYMBOLS) SETX.PRESS ( -SPRUCEPAPERLEFTMICAS SPRUCEPAPERRIGHTMICAS |SetXCode|) \\POSTSCRIPT.NSHASH (*POSTSCRIPT-NS-HASH*) -MSCOLLECTDATA (TABLE.TO.NOTICED FNDATA) \\CLEANUPDISKQUEUE (GCONST \\CB.PENDING \\CBS.FAKEERROR -\\CBS.GOODMASK \\CBS.GOOD MAX.SMALL.INTEGER \\CBS.CHECKERROR BITSPERWORD \\DC.RESTORE \\FILLINDA) -CLRHASH (WORDSPERCELL) SEDIT::REPLACE-NODE (SEDIT::TEMP-POINT SEDIT::TEMP-SELECTION) COMP.PUNT (EXP) -INSPECT/AS/RECORD (USERRECLST) OPT.FRAMEMERGE (MERGEFRAMEMAX FRA OPPOP OPNIL) SEDIT:GET-SELECTION ( -:SUB-LIST :CHARACTERS) BCOMPL1A (DFNFLG COUTFILE COMMENTFLG) TWODINSPECT.SETELT (INSPECTPRINTLEVEL -XCL:*EVAL-FUNCTION*) UNMARKASCHANGED (FILELST) \\LISPERROR (\\INTERRUPTABLE \\MP.UNINTERRUPTABLE) -MB.DISPLAY (BLACKSHADE) ONEDINSPECT.REPAINTFN (INSPECTPRINTLEVEL) CL:LIST-ALL-PACKAGES ( -*PACKAGE-FROM-NAME*) MAPHASH (WORDSPERCELL \\HASH.NULL.VALUE) SPLIT89 (L SKORLST3) \\WRITEDISKPAGES ( -\\SYSDISK \\MAINDISK \\MISCSTATS \\DISKREQUESTBLOCK \\EMUDISKBUFFERS \\EMUSCRATCH \\DC.WRITED -\\DC.WRITEHLD \\DC.WRITELD WORDSPERPAGE \\EMUDISKBUFEND WORDSPERCELL BITSPERWORD BYTESPERPAGE -|\\MiscFXP|) \\REALDISKDA (\\EOFDA) SEDIT::DELETE-LITATOM (SEDIT::TYPE-STRING) SETUPFONTS.IP ( -DEFAULTFONT) SEDIT::ATOM-CHAR-ESCAPED (*READTABLE* \\MAXTHINCHAR STOPATOMBIT INNERESCAPEBIT) -MSNLAMBDACHECK (MSDATABASELST) FB.NAMES.DECREASING.VERSION (UPPERCASEARRAY) TEXTUREOFCOLOR ( -BLACKSHADE16) DBG::INVOKE-ESCAPE-FROM-MENU (BRKCOND *DEBUG-IO*) \\NSINIT (\\NSOCKETS \\LOCALNDBS -\\NS.READY.EVENT) COMP.AC (EXP DONOTHING) \\3MBWATCHER (\\MAXWATCHERGETS) SEDIT:ADD-COMMAND ( -SEDIT::COMMAND-TABLE-SPEC) MSCHECKBLOCKBASIC (BLKLIBRARY MSDATABASELST) \\CHECKFREEPAGE (BITSPERWORD -\\FILLINDA) \\SEQUIN.COMPARE (\\SC.EQUAL \\SC.PREVIOUS \\SC.DUPLICATE \\SC.AHEAD \\SC.OUTOFRANGE) -APPENDSEQUENCEDESCRIPTOR.IP (SHORTSEQUENCE LONGSEQUENCE) \\STORAGE.TYPE (|\\DTDSpaceBase| CDRCODING -|\\MDSIncrement| |\\PagesPerMDSUnit| HUNKSTATS \\LISTP \\LISTPDTD) PFI.PROCESS.FILE (*PFI-PREVIEWERS* -*STANDARD-INPUT*) COMPILER::COPY-NODE-RETURN (COMPILER::*COPY-NODE-TABLE* :BLOCK :VALUE) -\\3MBSENDPACKET (\\3MBENCAPSULATION.WORDS *MAXIMUM-PACKET-SIZE* \\MISCSTATS \\EPT.PUP PUPTRACEFILE -XIPTRACEFILE) SIMPLETEXTEDIT (TTYINEDITPROMPT) \\STORAGE.HUNKTYPE (UNBOXEDBLOCK.GCT PTRBLOCK.GCT -CODEBLOCK.GCT HUNKSTATS) MSCHECKFNINBLOCK (ENTRIES BLKLIBRARY MSDATABASELST BLKFNS RETFNS BLKAPPLYFNS) - \\PROMISCUOUS.OFF (\\LOCALNDBS GCONST) |\\VFMDeletePageGroup| (|\\VFMmonitor| |nullVolumePage|) -APPENDIDENTIFIER.IP (SEQIDENTIFIER %FAT-CHAR-TYPENUMBER) PFI.PRINT.MULTI.INDEX (:CONSECUTIVE -:ENVIRONMENT *STANDARD-OUTPUT* *PFI-PAGE-COUNT* BOLDFONT DEFAULTFONT :PACKAGE :READTABLE) STORAGE.LEFT - (\\STORAGEFULLSTATE \\SFS.ARRAYSWITCHED |\\SecondMDSPage| |\\NxtMDSPage| |\\NxtArrayPage| -|\\PagesPerMDSUnit| \\SFS.SWITCHABLE |\\SecondArrayPage| |\\LeastMDSPage| \\MDSFREELISTPAGE -|\\LastAtomPage| |\\FirstMDSPage| |\\FirstArrayPage| \\SFS.NOTSWITCHABLE) COMPILER::COPY-NODE-PROGV ( -:SYMS-EXPR :VALS-EXPR :STMT) \\TEDIT.SEARCH.CODETABLE (|\\AlphaNumericFlag| |\\AlphaFlag| -|\\OneCharPattern| |\\AnyStringPattern| |\\OneAlphaPattern| |\\OneNonAlphaPattern| |\\AnyAlphaPattern| - |\\AnyNonAlphaPattern| |\\LeftBracketPattern| |\\RightBracketPattern|) \\PUNT.BITBLT.BITMAP ( -BLACKSHADE) DBG::PRINT-BACKTRACE (:ALINK) \\PAGED.GETNEXTBUFFER (|NoBits| BYTESPERPAGE) MSUPDATE ( -DWIMIFYCOMPFLG CLISPIFYPRETTYFLG COMMENTFLG MSPRINTFLG ANALYZEUSERFNS MSERRORFN) FIND-SYMBOL* (\\FIXP) - SEDIT::EDIT-HELP (PROMPTWINDOW) CL::\\OPENSTREAM-WITH-DEFAULT (*DEFAULT-PATHNAME-DEFAULTS* -LOADPARAMETERS) MAPWORD (BYTESPERPAGE) SHOWRECTANGLE.PRESS (|ShowRectangleCode|) TTPRINSPACE (\\RMARG -\\DSP) STORAGE (\\FIXP |\\MaxTypeNumber| |\\DTDSpaceBase| \\STORAGEFULLSTATE \\SFS.FULLYSWITCHED -\\SFS.ARRAYSWITCHED |\\LeastMDSPage| |\\FirstArrayPage| |\\NxtArrayPage| |\\SecondArrayPage| -|\\AtomFrLst| |\\LastAtomPage|) \\HASHRECLAIM (WORDSPERCELL) \\PAGEDSETFILEPTR (BYTESPERPAGE) -\\TEDITMENU.CREATE (TEDIT.EXPANDEDMENU.SPEC) TB.SHOW.DELETION (BLACKSHADE TB.LEFT.MARGIN) -\\PAGED.SETEOFPTR (BYTESPERPAGE |WriteBit| |AppendBit|) RESOLVE-UNINTERN-CONFLICT (:SYMBOL :SYMBOLS -:PACKAGE) \\PUNT.BLTSHADE.BITMAP (WHITESHADE BLACKSHADE) SEDIT::ICON-COPYFN (:|name|) BCOMPL.BODY ( -SYSLOCALVARS COMPILE.EXT BCOMPL.SCRATCH NLAMA NLAML LAMS) COMPILER::NULL-EFFECTS-INTERSECTION-EXCEPT-CONS - (:NONE :ANY) INSPECT/AS/BLOCKRECORD (PROMPTWINDOW) ICONW.PRINT-JUSTIFIED (BLACKSHADE WHITESHADE) -GET-TWOD-DISPLAYW (MAX.SMALLP) \\BITBLT.BITMAP.SLOW (BLACKSHADE) \\CLEARCB (\\LENSHORTCB \\CB.FREE) -IRM.LOAD-GRAPH (IRM.HOST&DIR) MSUPDATEFN1 (MSDATABASELST) \\TIME.NOT.SET (PROMPTWINDOW) \\HASHACCESS ( -\\HASH.NULL.VALUE SYSHASHARRAY) COMP.BOOL (COMPILE.CONTEXT) \\3MBENCAPSULATE (\\3MBENCAPSULATION.WORDS -) OPT.DEFREFS (CL:LABELS) TTDELSECTION (\\DSP \\DESCENT) SPY.LEGEND (SPY.BORDERS SPY.FONT) -MSCHECKBLOCK (SPECVARS LOCALVARS GLOBALVARS RETFNS BLKLIBRARY NOLINKFNS LINKFNS DONTCOMPILEFNS -SYSSPECVARS SYSLOCALVARS MSDATABASELST) \\GETMISCNSOCKET (\\NSOCKETS) PFI.PRINT.FILECREATED ( -ITALICFONT LAMBDAFONT :READTABLE :PACKAGE *PRINT-BASE* :BASE) COMPILER::COPY-NODE-PROGN (:STMTS) -SEDIT::GET-MENU (SEDIT::MENU-DESCRIPTION) \\HASHTABLE.DEFPRINT (*READTABLE*) DSPCREATE (|ScreenBitMap| - SCREENWIDTH \\DISPLAYIMAGEOPS |DisplayFDEV| \\STREAM.DEFAULT.MAXBUFFERS FILELINELENGTH LF.EOLC -|NoBits| DEFAULTFONT) COMPILER::NULL-EFFECTS-INTERSECTION (:NONE :ANY) PRINT3TO10 (XIPIGNORETYPES -XIPTRACEFILE \\TRANS.OP.REQUEST \\TRANS.OP.RESPONSE) |\\VAMFreePageGroup| (|\\VAMmonitor|) -ONEDINSPECT.COPYBUTTONFN (INSPECTPRINTLEVEL) SEDIT::SEDITL (TYPE :NAME :TYPE) GET-TOPW (MAX.SMALLP) -\\STRINGHASHBITS-UFN (%FAT-CHAR-TYPENUMBER \\PNAME.HI \\PLIST.HI) ONEDINSPECT.BUTTONEVENTFN ( -INSPECTPRINTLEVEL LASTMOUSEBUTTONS) INVERTED/SHADE/FOR/GRAPHER (BLACKSHADE) COMPILE1A (COUTFILE -NOSPELLFLG) SEDIT::PARSE--LIST (SEDIT::LIST-PARSE-INFO) \\STRING-EQUAL-HASHBITS-UFN ( -%FAT-CHAR-TYPENUMBER \\PNAME.HI \\PLIST.HI) \\TEDIT.INTERRUPT.SETUP (TEDIT.INTERRUPTS) -\\TEDIT.UPDATE.SHOWSEL (BLACKSHADE) DBG::ESCAPE-FROM-DEBUGGER (BRKCOND *DEBUG-IO*) EDITDEF.FNS ( -*ERROR-OUTPUT*) \\VANILLADISKINIT (UPPERCASEARRAY \\MAXCHAR) |\\SFFixFont| (MAX.SMALLP) WARNUSER ( -PROGVARS EXP) \\CODEARRAY (\\ST.CODE CODEBLOCK.GCT CELLSPERQUAD) |\\SFFixClippingRegion| ( -MAX.SMALL.INTEGER) TTPRIN1COMMENT (\\COMMENTFONT) \\PAGED.FORCEOUTPUT (|AppendBit| |WriteBit|) -CL:FRESH-LINE (*STANDARD-OUTPUT*) \\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (%ECHO-STREAM-DEVICE -%TWO-WAY-STREAM-DEVICE %SYNONYM-STREAM-DEVICE) FIND-DEBUGGER-ENTRY-FRAME (*DEBUGGER-ENTRY-POINTS*) -RECORDACCESS (USERRECLST) \\3MBGETPACKET (\\MISCSTATS \\3MBLOCALNDB) \\PAGEDREADP (EOL.TC -\\MAXTHINCHAR \\PRIMTERMSA CR.EOLC CRLF.EOLC NSCHARSETSHIFT \\NORUNCODE LF.EOLC) |\\DSKOpenDevice| ( -|\\DSKtopMonitor|) |\\SFFixDestination| (MAX.SMALLP) \\PROMISCUOUS.ON (\\LOCALNDBS GCONST -BROADCASTNSHOSTNUMBER) \\SEQUIN.CLEANUP (RESETSTATE \\SS.OPEN \\SEQUIN.BROKEN \\SS.ABORT) -\\STRINGWIDTH.PRESS (\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER) \\WHICHPART (|\\XVmemFmapHighBase|) -\\CHECKARRAYBLOCK (|\\ArrayBlockPassword| |\\ArrayBlockTrailerCells| |\\MinArrayBlockSize| -\\FREEBLOCKBUCKETS \\MAXBUCKETINDEX \\MP.BADARRAYBLOCK) |\\LFOpenDevice| (|\\LFtopMonitor| -|\\LFdevice|) CL:FIND-ALL-SYMBOLS (*PACKAGE-FROM-NAME*) \\ALLOCBLOCK.OLD (\\MAXBUCKETINDEX -\\FREEBLOCKBUCKETS |\\ArrayBlockPassword| |\\ArrayBlockTrailerCells| \\MP.BADARRAYBLOCK -\\MAX.CELLSPERHUNK |\\ArrayBlockOverheadCells| |\\ArrayBlockHeaderWords|) \\VIRTUALDISKDA (\\EOFDA) -\\CREATESTARFONT (\\DEFAULTCHARSET \\ASCIITONS \\MAXCHARSET) |\\UFSOpenDevice| (|\\UFStopMonitor|) -CL:APROPOS-LIST (%FAT-CHAR-TYPENUMBER) \\ALLOCBLOCK.NEW (|\\ArrayFrLst| |\\NxtMDSPage| -\\GUARDSTORAGEFULL |\\NxtArrayPage| \\VAL.HI) \\SWAPDISKERROR (\\DSK.HARD.ERROR \\MAINDISK \\SWAPDSK1) - \\IDLE.PROMPT.WATCHER (\\FIXP \\LASTUSERACTION) UNPACK (\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER) -DCHCON (\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER) SEDIT::SEDITE (:NAME :TYPE :COMPLETION-FN -:ROOT-CHANGED-FN) \\FIXCODEPTR (GCREF) \\SFFIXLINELENGTH (MAX.SMALLP) POSTSCRIPT.FONTSAVAILABLE ( -POSTSCRIPT.FONT.ALIST POSTSCRIPTFONTDIRECTORIES \\POSTSCRIPT.MAX.WILD.FONTSIZE) BKLINBUF (*READTABLE* -\\LINEBUF.OFD \\MAXTHINCHAR) MSCHECKBLOCKS (SYSLOCALVARS FILELST MSFNTYPES DONTCOMPILEFNS) -\\MAIKO.ALLOCBLOCK (|\\ArrayBlockLinkingCells| |\\MaxArrayNCells| UNBOXEDBLOCK.GCT PTRBLOCK.GCT -CELLSPERPAGE \\MAX.CELLSPERHUNK |\\ArrayBlockOverheadCells| |\\ArrayBlockTrailerCells| -|\\ArrayBlockHeaderWords| GCREF) CL:APROPOS (%FAT-CHAR-TYPENUMBER) COMPILER::COPY-NODE-OPCODES (:BYTES -) \\ALLOCHUNK (\\MAX.CELLSPERHUNK UNBOXEDBLOCK.GCT \\HUNK.UNBOXEDSIZES PTRBLOCK.GCT \\HUNK.PTRSIZES -CODEBLOCK.GCT CELLSPERQUAD \\UNBOXEDHUNK.TYPENUM.TABLE \\CODEHUNK.TYPENUM.TABLE -\\PTRHUNK.TYPENUM.TABLE |\\DTDSpaceBase| CELLSPERPAGE GCREF) DUNPACK (\\PNAME.HI \\PLIST.HI -%FAT-CHAR-TYPENUMBER) \\CLOSELINE (READING.LBS) MSSHOWUSE (MSFNTYPES) SCANDECLARECOLON (VARLST FNLST -LDFLG) UALPHORDER (UPPERCASEARRAY) CHECK-SYMBOL-NAMESTRING (:EXTERNAL) \\MERGEFORWARD (|\\ArrayFrLst| -|\\ArrayFrLst2|) OPT.CODEFRAME (FRA TOPFRAME) ALPHORDER (\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER -\\TRANSPARENT \\ST.POS16) RESOLVE-MISSING-EXTERNAL-SYMBOL (:NAME :PACKAGE) FB.HANDLE.ABORT.BUTTON ( -FB.ITEMSELECTEDSHADE) \\IDLE.IS.PREVIOUS (\\IDLE.PASSWORD.SET |\\InterfacePage|) \\LINKBLOCK ( -|\\MinArrayBlockSize| \\MAXBUCKETINDEX) \\LOOKUPFMAP (\\ISFMAPOFFSET \\ISFMAP \\FILLINDA) -ONEDINSPECT.DEFAULT.VALUECOMMANDFN (\;) SEDIT::START-PROCESS (SEDIT::EDITOR-NAME) \\NEW.READ.SYMBOL ( -*READTABLE* FILERDTBL CODERDTBL *KEYWORD-PACKAGE* *PACKAGE*) \\MERGEBACKWARD (\\ARRAYSPACE -\\ARRAYSPACE2 |\\ArrayBlockTrailerWords|) IOCBQLENGTH (\\IOCBFREELIST) RESOLVE-READER-CONFLICT ( -:EXTERNAL *PREFERRED-READING-SYMBOLS*) WINDOWADDFNPROP (LAMBDASPLST) \\RESETLINE (FILLING.LBS) -TWODINSPECT.SELECTCOLUMNPROP (INSPECTPRINTLEVEL) \\TEXTTTYBOUT (ERASECHARCODE IGNORE.CCE \\MAXTHINCHAR - \\PRIMTERMSA) RESOLVE-MISSING-PACKAGE (:PACKAGE-NAME :SYMBOL-NAME :EXTERNAL) -SEDIT::COMPUTE-SELECTION-POSITION-LITATOM (SEDIT::TYPE-STRING) MSNOTICEFILE (FILELST DWIMWAIT) -\\NEW.MKATOM (\\MAXTHINCHAR *INTERLISP-PACKAGE*) DEFAULTMAKENEWCOM (FILEPKGCOMSPLST) -BUTTONPANEL/SELECTION/FN (WHITESHADE MENUSELECTSHADE) SEDIT::PARSE--UNKNOWN (SEDIT::TYPE-UNKNOWN) -SPP.DSTYPE (|ReadBit|) COMPILER::EFFECTLESS-EXCEPT-CONS (:NONE) PACKC (\\PNAMELIMIT \\MAXTHINCHAR -\\FATPNAMESTRINGP) COMP.PICOUNT (ARGVARS) TTY.PROCESS (TTY.PROCESS.DEFAULT \\PROCESSES -\\DEFAULTKEYACTION \\TTY.PROCESS.EVENT) \\INCPARENCOUNT (STRINGDELIM.RC LEFTPAREN.RC RIGHTPAREN.RC -LEFTBRACKET.RC RIGHTBRACKET.RC) \\NEW2PAGE (WORDSPERPAGE) CL::%SQRT-FLOAT (\\EXPONENT.BIAS) -\\DELETEBLOCK? (|\\MinArrayBlockSize| \\FREEBLOCKBUCKETS \\MAXBUCKETINDEX \\MP.BADDELETEBLOCK) -COMPILER::ANALYZE-TREE (:ONCE) COMPILER::COPY-NODE-MV-PROG1 (:STMTS) SEDIT::EXTRACT-CURRENT-SELECTION -(SEDIT::TYPE-COMMENT) \\CHECKFORSTORAGEFULL (|\\NxtMDSPage| |\\NxtArrayPage| |\\PagesPerMDSUnit| -\\GUARDSTORAGEFULL \\STORAGEFULLSTATE \\SFS.NOTSWITCHABLE \\SFS.FULLYSWITCHED \\MP.MDSFULL -\\GUARD1STORAGEFULL \\MP.MDSFULLWARNING \\SFS.SWITCHABLE |\\LeastMDSPage| |\\SecondMDSPage| -|\\SecondArrayPage| \\SFS.ARRAYSWITCHED) PACK (\\FATPNAMESTRINGP \\PNAMELIMIT) SETDISPLAYHEIGHT ( -\\MACHINETYPE \\DOLPHIN \\DORADO |\\DisplayStarted| BITSPERWORD SCREENHEIGHT) INTERN-LITATOM ( -:INTERNAL *KEYWORD-PACKAGE*) \\SETBRUSH.IP (MICASPERPOINT STROKEWIDTH ROUND SQUARE BUTT STROKEEND) -CL::%LOG-FLOAT (\\EXPONENT.BIAS CL::%LOG-PPOLY CL::%LOG-QPOLY CL::%LOG2) \\PACK.ITEM (\\PNAMELIMIT -\\PNAMESTRING) INVERTW (BLACKSHADE) COMPILER::COPY-NODE-MV-CALL (:FN :ARG-EXPRS) CONVERT-LITATOM ( -\\PNAME.HI \\PLIST.HI) CLEARBUF (\\LINEBUF.OFD *STANDARD-INPUT* \\DEFAULTLINEBUF) -CL:DOUBLE-FLOAT-EPSILON (CL:SINGLE-FLOAT-EPSILON) MSGETDEF (MSFNTYPES MSDATABASELST) TTYINEDIT ( -TTYINPRINTFN TTYINEDITPROMPT HISTSTR1) SEDIT::PARSE--GAP (SEDIT::TYPE-GAP) SPP.OPEN (SPP.USER.TIMEOUT) - COMPILER::EFFECTLESS (:NONE) \\LITATOM.EATCHARS (\\PNAME.HI \\PLIST.HI) BLOCK (\\MP.PROCERROR -\\HIGHEST.PRIORITY.QUEUE \\MP.STACKRELEASED MYALINK MAX.FIXP BACKGROUNDFNS) OPT.RETMERGE (FRA) -PAGEFULLFN (\\LINEBUF.OFD \\STOPSCROLLMESSAGE ERASECHARCODE) DBG::MAKE-FRAME-INSPECT-WINDOW (:TOP) -CL:LEAST-NEGATIVE-DOUBLE-FLOAT (CL:LEAST-NEGATIVE-SINGLE-FLOAT) \\ARRAYBLOCKMERGER ( -|\\MaxArrayBlockSize| |\\ArrayBlockOverheadCells| \\MAX.CELLSPERHUNK |\\MinArrayBlockSize|) -SCANDEFINEQ (VARS LDFLG) SCANEXP (VARLST ADR LDFLG) \\PREFIXALIGNMENT? (|\\ArrayBlockHeaderWords| -CELLSPERPAGE CODEBLOCK.GCT |\\ArrayBlockOverheadCells| CELLSPERSEGMENT) CL:LEAST-POSITIVE-DOUBLE-FLOAT - (CL:LEAST-POSITIVE-SINGLE-FLOAT) CONCOCT-SYMBOL (CMLSYMBOLS.SHARED *INTERLISP-PACKAGE* *LISP-PACKAGE* -) TEDIT.SETFUNCTION (TEDIT.READTABLE \\MAXTHINCHAR FUNCTIONCALL.TTC NONE.TTC) -SEDIT::COMPUTE-POINT-POSITION-LITATOM (SEDIT::TYPE-STRING) CL:LEAST-NEGATIVE-LONG-FLOAT ( -CL:LEAST-NEGATIVE-SINGLE-FLOAT) FB.EDITLISPFILE (PROMPTWINDOW) CL:DOUBLE-FLOAT-NEGATIVE-EPSILON ( -CL:SINGLE-FLOAT-NEGATIVE-EPSILON) XCL:PACK (*PACKAGE*) CL:LEAST-NEGATIVE-SHORT-FLOAT ( -CL:LEAST-NEGATIVE-SINGLE-FLOAT) SEDIT::SET-PROPS (:COMPLETION-FN :ROOT-CHANGED-FN :ENVIRONMENT -SEDIT::LISP-EDIT-ENVIRONMENT :PROFILE :EVAL-IN-PROCESS :EVAL-FN) RECORD.FIELD.VALUE (FIELDS.IN.CREATE -USINGEXPR USINGTYPE) CL:INTERN (*PACKAGE* %FAT-CHAR-TYPENUMBER) TERMCHARWIDTH (\\CHARMASK) CL::%RANDOM - (CL:MOST-POSITIVE-FIXNUM CL::%RANDOM-SIZE) PACKAGE-HIERARCHY-INIT (*INTERLISP-PACKAGE* :EXTERNAL) -SCANCOMPILEDFN (LDFLG VARS) INTEGERLENGTH (\\SMALLP \\FIXP MAX.POS.HINUM \\SIGNBIT BITS.PER.FIXP -MAX.SMALL.INTEGER BITSPERWORD) CL:LONG-FLOAT-EPSILON (CL:SINGLE-FLOAT-EPSILON) \\INITIALIZESWAPDISK ( -\\MAINDISK \\NWORDS.DSKOBJ |\\XVmemFmapBase|) PACKAGE-ENABLE (*INTERLISP-PACKAGE*) COMP.CPI (FRAME -TOPFRAME ARGVARS LEVEL TOPLAB FRA) \\COPYARRAYBLOCK (|\\ArrayBlockHeaderWords| |\\ArrayBlockPassword| -|\\ArrayBlockOverheadCells| PTRBLOCK.GCT WORDSPERCELL CODEBLOCK.GCT) OPT.RETTEST (FRA PRA) -MAKEBITTABLE (\\MAXTHINCHAR \\MAXCHAR) CL:LEAST-POSITIVE-LONG-FLOAT (CL:LEAST-POSITIVE-SINGLE-FLOAT) -|\\VAMAllocPageGroup| (|\\VAMmonitor|) \\COPYCODEBLOCK (GCREF) PLAYTUNE (\\MACHINETYPE \\DAYBREAK -\\MAIKO \\DANDELION \\RCLKMILLISECOND \\DLION.RCLKMILLISECOND) CL:LEAST-POSITIVE-SHORT-FLOAT ( -CL:LEAST-POSITIVE-SINGLE-FLOAT) COMPILER::COPY-NODE-LITERAL (:VALUE) COPYALL (DONTCOPYDATATYPES) -%ARRAY-TYPE-TABLE (%LIT-ARRAY-TABLE %LIT-ARRAY-TYPES %LIT-ARRAY-SIZES) CL::%NOT-FLOAT-ERROR ( -:EXPECTED-TYPE :NAME :VALUE) \\IDLE.AUTHENTICATE (CH.DEFAULT.DOMAIN) SETLINELENGTH (\\TERM.OFD) -\\SETFATSYNCODE (\\MAXTHINCHAR \\NSCHARHASHKEYS \\NSCHARHASHOVERFLOW) -ONEDINSPECT.DEFAULT.TITLECOMMANDFN (LASTMOUSEBUTTONS \;) \\TEDIT.HARDCOPY.FORMATLINE (FORMATTINGSTATE -TEDIT.DONT.LAST.CHARS TEDIT.DONT.BREAK.CHARS DEFAULTFONT) DESCRIBE-VIRTUAL-MEMORY (\\MACHINETYPE -\\DORADO |\\InterfacePage| \\ISFMAP \\LASTVMEMFILEPAGE) \\ADVANCE.ARRAY.SEGMENTS (\\VAL.HI -|\\NxtArrayPage| |\\ArrayFrLst| CELLSPERPAGE |\\MinArrayBlockSize| |\\LeastMDSPage|) COMPILEMODE ( -COMPILEMODELST) \\SAVELINEBUF (\\LINEBUF.OFD FILLING.LBS RETYPING.LBS) CL:LONG-FLOAT-NEGATIVE-EPSILON -(CL:SINGLE-FLOAT-NEGATIVE-EPSILON) COMP.ARGTYPE (LAMA LAMS NLAML NLAMA BLKDEFS BLKLIBRARY NOFIXFNSLST) - CL::%NOT-NUMBER-ERROR (:EXPECTED-TYPE :NAME :VALUE) DEFMACRO-ARG-TEST (%MIN-ARGS %ARG-COUNT) FILEPOS -(\\ST.BYTE \\TRANSPARENT \\PNAME.HI FILEPOS.SEGMENT.SIZE) \\M44DOEXTENDVMEMFILE ( -\\SPAREDISKWRITEBUFFER \\ISFSCRATCHDAS \\ISFMAP \\ISFCHUNKSIZE \\EOFDA \\FILLINDA \\MAINDISK -\\DC.READD \\SWAPREQUESTBLOCK BYTESPERPAGE \\ISFSCRATCHCAS \\DC.WRITED) CL:MOST-NEGATIVE-DOUBLE-FLOAT -(CL:MOST-NEGATIVE-SINGLE-FLOAT) TEDIT.GETFUNCTION (TEDIT.READTABLE FUNCTIONCALL.TTC \\MAXTHINCHAR) -SEDIT::CLOSE-NODE-LITATOM (SEDIT::TYPE-STRING) CL:MOST-POSITIVE-DOUBLE-FLOAT ( -CL:MOST-POSITIVE-SINGLE-FLOAT) \\SEQUIN.HANDLE.INPUT (\\PT.SEQUIN \\SEQUIN.BROKEN \\SC.OUTOFRANGE -\\SC.AHEAD \\SEQUIN.RESTART \\SC.DUPLICATE \\SC.PREVIOUS \\SEQUIN.DALLYING \\SEQUIN.DATA \\SS.OPENING -\\SS.OPEN \\SS.CLOSING \\SEQUIN.QUIT \\SS.CLOSED \\SEQUIN.DESTROY \\SS.DALLYING) HISTORYFIND1 (LST Z -CHCONLST1) \\BYTESETA (\\ST.BYTE \\ST.CODE) \\DECPARENCOUNT (STRINGDELIM.RC LEFTPAREN.RC RIGHTPAREN.RC - LEFTBRACKET.RC RIGHTBRACKET.RC) VMEMSIZE (|\\InterfacePage|) \\ECHOCHAR (\\PRIMTERMTABLE \\TERM.OFD) -\\DSPYPOSITION.HCPYMODE (MAX.SMALLP) \\WORDELT (\\ST.POS16) FFILEPOS (\\PNAME.HI \\MAX.PATTERN.SIZE -\\MIN.PATTERN.SIZE \\MIN.SEARCH.LENGTH \\ST.BYTE \\TRANSPARENT FILEPOS.SEGMENT.SIZE \\MAXCHAR) CHCON ( -\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER) CL:MOST-NEGATIVE-SHORT-FLOAT (CL:MOST-NEGATIVE-SINGLE-FLOAT -) CL::%RATIO-PRINT (*READTABLE*) FB.PRINTFN (%FAT-CHAR-TYPENUMBER) CHANGEBACKGROUNDBORDER ( -\\MACHINETYPE \\DANDELION \\DAYBREAK) CL:MOST-NEGATIVE-LONG-FLOAT (CL:MOST-NEGATIVE-SINGLE-FLOAT) -\\SETUP.FFILEPOS (BITSPERBYTE \\MAXCHAR) \\ETHEREVENTFN (|\\DTDSpaceBase| \\MACHINETYPE \\DANDELION -\\IOPAGE \\DAYBREAK RESTARTETHERFNS) CL::%NOT-RATIONAL-ERROR (:EXPECTED-TYPE :VALUE :NAME) -CL::%NOT-NONCOMPLEX-NUMBER-ERROR (:EXPECTED-TYPE :NAME :VALUE) CCODEP (\\DEF.HI) CROPMARK.DISPLAYFN ( -CROPMARK.IMAGE) \\GETCHAR (\\LINEBUF.OFD \\PRIMTERMTABLE) \\FIXP.FROM.FLOATP (\\FIXP MAX.POS.HINUM -MAX.SMALL.INTEGER \\SMALLP \\EXPONENT.BIAS \\8BITS \\SIGNBIT \\MAX.EXPONENT \\HIDDENBIT) -\\ARRAYTYPENAME (\\ST.CODE) \\FILLBUFFER (*READTABLE* \\PRIMTERMTABLE READC.FT \\MAXTHINCHAR -\\PRIMTERMSA RETYPE.TC \\TERM.OFD RETYPING.LBS NSCHARSETSHIFT \\NORUNCODE FILLING.LBS CHARDELETE.TC -LINEDELETE.TC WORDDELETE.TC CTRLV.TC EOL.TC ESCAPE.RC RATOM/RSTRING.FT STOPATOMBIT READ.FT -LEFTPAREN.RC LEFTBRACKET.RC STRINGDELIM.RC IMMEDIATE.RMW WAKEUPMASK) \\BLOCKDATAP ( -|\\FirstArraySegment| |\\DTDSpaceBase|) OPENIPSTREAM (DEFAULTLANDPAGEREGION DEFAULTPAGEREGION -\\NOIMAGEOPS \\IPIMAGEOPS ENCODING SERVER) \\MAYBEPRINTPACKET (\\EPT.PUP PUPTRACEFLG XIPTRACEFLG -PUPTRACEFILE XIPTRACEFILE) \\STREAMCHARWIDTH (\\CHARMASK \\UNITWIDTHSVECTOR \\MAXTHINCHAR -\\PRIMTERMTABLE INDICATE.CCE SIMULATE.CCE REAL.CCE ERASECHARCODE IGNORE.CCE) CL:MOST-POSITIVE-LONG-FLOAT - (CL:MOST-POSITIVE-SINGLE-FLOAT) CL::%COMPLEX-PRINT (*READTABLE*) CARETRATE (\\CARET.TIMER -DEFAULTCARETRATE) \\CHDEL1 (\\LINEBUF.OFD \\NORUNCODE NSCHARSETSHIFT) SPP.DESTADDRESS ( -\\#WDS.NSADDRESS) CL:MOST-POSITIVE-SHORT-FLOAT (CL:MOST-POSITIVE-SINGLE-FLOAT) -COMPILER::CLOSURE-ANNOTATE-BLOCK (:SCOPE :LEXICAL :KIND :VARIABLE :NAME :BINDER :CLOSED-OVER) -\\NSFILING.MAYBE.CREATE (:ASKED DWIMWAIT) \\MAKEFREEARRAYBLOCK (|\\FreeArrayFlagWord| -|\\ArrayBlockTrailerCells|) PROMPTINWINDOW (LASTMOUSEX LASTMOUSEY |WindowTitleDisplayStream|) -\\PRINTFMAP (|\\XVmemFmapBase| \\ISFMAPOFFSET) \\TEDIT.READTABLE (CHARDELETE.TTC WORDDELETE.TTC -DELETE.TTC UNDO.TTC NEXT.TTC CMD.TTC REDO.TTC \\MAXTHINCHAR) CLISPIFYFNS (FILELST) \\STARTDISPLAY ( -SCREENWIDTH SCREENHEIGHT WINDOWBACKGROUNDSHADE) \\DSPFONT.IP (SETFONT \\DEFAULTCHARSET MICASPERINCH -POINTSPERINCH) DRAWMARGINSCALE (WHITESHADE BLACKSHADE) CL:SHORT-FLOAT-EPSILON (CL:SINGLE-FLOAT-EPSILON -) DUMPGRAPH (FILERDTBL) \\SHOW.ARRAY.FREELISTS (STORAGE.ARRAYSIZES MAX.SMALLP UNBOXEDBLOCK.GCT -\\MAXBUCKETINDEX \\FREEBLOCKBUCKETS WORDSPERCELL) \\LOOKUPCOLORNAME (COLORNAMES) MARGINBAR (WHITESHADE - BLACKSHADE EDITGRAY TEDIT.EXTENDEDRIGHTMARK) CL:SHORT-FLOAT-NEGATIVE-EPSILON ( -CL:SINGLE-FLOAT-NEGATIVE-EPSILON) SEDIT::QUERY-THROW-AWAY-CHANGES (:DISPLAY) PROMPTPRINT (PROMPTWINDOW -) SEDIT::EDIT-SELECTION (SEDIT:*EDIT-FN*) \\TITLEICONMINSIZE (|MinWindowWidth|) INIT/NODES/FOR/LAYOUT -(NODELST) \\STOPSCROLL? (\\#DISPLAYLINES) |\\VFMInsertPageGroup| (|\\VFMmonitor| |nullVolumePage|) -\#BITSON (BITSPERSHADE) \\FILLBUFFER.WORDSEPRP (WORDSEPR.TC \\MAXTHINCHAR \\PRIMTERMSA OTHER.RC RTBLSA -) SEDIT::PARSE-INDENT-GROUPS (:VERTICAL) COMPILER::COPY-NODE-LAMBDA (:NAME :ARG-TYPE :NO-SPREAD-NAME -:ALLOW-OTHER-KEYS) SPP.CLOSE (|NoBits|) BITMAPOBJ.SNAPW (DEFAULT.BITMAP.SCALE) SHOW.PRESS (|FontCode| -|ShowCharactersShortCode| |ShowCharactersCode|) \\BYTELT (\\ST.BYTE \\ST.CODE) DISPLAYSTREAMP ( -\\DISPLAYSTREAMTYPES) WFROMDS (\\DEFAULTTTYDISPLAYSTREAM) |\\CreateScreenBitMap| (\\DISPLAYREGION) -\\TEXTDSPYPOSITION (\\CURRENTDISPLAYLINE) \\UNPACKDATE (|\\DayLightSavings| MIN.FIXP |\\TimeZoneComp| -|\\4YearsDays|) \\TFBRAVO.GET.FONTSTYLE (USER.CM.ALIST) COMP.NOSIDEEFFECTP (*NO-SIDE-EFFECT-FNS*) -SETSYNONYM (MSWORDS) END.DELETE.MODE (TTYINBSFLG) TWODINSPECT.SELECTROWPROP (INSPECTPRINTLEVEL) -|\\CoerceToDisplayDevice| (|LastCreatedDisplayDevice|) \\INITBCPLDISPLAY (\\STREAM.DEFAULT.MAXBUFFERS -\\NOIMAGEOPS LF.EOLC |NoBits|) SPP.SENDEOM (|WriteBit| |AppendBit|) TITLEDICONW (DEFAULTICONFONT -|WBorder| DEFAULTICONWIDTH BLACKSHADE WHITESHADE) DASSEM.DSTOREFN (:4-BYTE *BC-MACRO-ENVIRONMENT* -:3-BYTE) LATTICE/BREAK/CYCLES (NODELST) IRM.GET.DINFOGRAPH (IRM.DINFOGRAPH) HARDCOPYGRAPH ( -GRAPH/HARDCOPY/FORMAT) VIDEOCOLOR (\\MACHINETYPE \\MAIKO \\DANDELION MAX.SMALLP \\DAYBREAK -|\\DoveDisplay.XorCursor|) \\INTERPRETER1 (MYALINK \\STACKHI WORDSPERQUAD \\LITATOM \\NEW-ATOM -IVARCODE PVARCODE \\STACKSPACE WORDSPERCELL) GETLOCALDEC (LAMBDASPLST COMMENTFLG FAULTFN) NU\\TOTOPWDS - (\\SCREENBITMAPS) DELETE/AND/DISPLAY/LINK (PROMPTWINDOW) SEDIT::FINALIZE-MOUSE-SELECTION ( -SEDIT::PENDING-SELECTION SEDIT::PENDING-LAST-X SEDIT::PENDING-LAST-Y SEDIT::PENDING-TYPE -SEDIT::PENDING-CARET) \\FTP.NEXTFILE (\\FTP.IDLE.TIMEOUT) CL:BOOLE (CL:BOOLE-CLR CL:BOOLE-SET CL:BOOLE-1 - CL:BOOLE-2 CL:BOOLE-C1 CL:BOOLE-C2 CL:BOOLE-AND CL:BOOLE-IOR CL:BOOLE-XOR CL:BOOLE-EQV CL:BOOLE-NAND -CL:BOOLE-NOR CL:BOOLE-ANDC1 CL:BOOLE-ANDC2 CL:BOOLE-ORC1 CL:BOOLE-ORC2) CL::%MAKE-RANDOM-ARRAY ( -CL::%RANDOM-SIZE CL:MOST-POSITIVE-FIXNUM) \\DSCCOUT (\\MAXTHINCHAR \\PRIMTERMSA INDICATE.CCE -SIMULATE.CCE REAL.CCE IGNORE.CCE) \\STACKARGPTR (\\STACKHI \\#ALINK.OFFSET MYALINK WORDSPERCELL -\\MAXSAFEUSECOUNT) \\PACKDATE (|\\TimeZoneComp|) \\TFBRAVO.GET.FONTSIZE (USER.CM.ALIST) COMP.ANONP ( -LOCALVARS SPECVARS LOCALFREEVARS) FAULTAPPLY (LAMBDASPLST LAMBDATRANFNS) OPT.RETPOP (TOPFRAME) -\\IDATESCANTOKEN (*STR*) %CANONICAL-CML-TYPES (%ARRAY-TYPE-TABLE) COMPILER::TEST-ANALYSIS (:ALL) -PROCESSWORLD (|\\TopLevelTtyWindow| PSTAT.QUIT \\FIXP \\STACKHI \\HIGHEST.PRIORITY.QUEUE) -PRINTERRORXIP (XIPERRORMESSAGES) \\SEQUIN.FLUSH.CONNECTION (\\SS.ABORT) \\SMASHLINK (MYALINK \\STACKHI - WORDSPERCELL \\#ALINK.OFFSET) SEDIT::SCALE-INDENT (SEDIT::LISP-EDIT-ENVIRONMENT) -\\DSPXPOSITION.HCPYMODE (MICASPERPT) \\ENTITYEND.PRESS (|NopCode| LISPENTITYTYPE) -UPDATESCREENDIMENSIONS (\\MACHINETYPE \\DOLPHIN \\DORADO \\DANDELION \\DAYBREAK \\MAIKO) SPY.END ( -SPY.BUTTON SPY.CLOSED) \\RUN.PROCESS (\\PSTAT.RUNNING \\PSTAT.DELETED) \\PARSEARRAYSPACE ( -|\\ArrayFrLst2| \\ARRAYSPACE2 \\ARRAYSPACE |\\ArrayFrLst|) COMPILER::COPY-NODE-IF (:PRED :THEN :ELSE) -\\DSPRIGHTMARGIN.HCPYMODE (MICASPERPT) CH.CHANGE.ITEM (\\CH.BROADCAST.SOCKET) CHANGESLICE (LISPXHIST) -POSTSCRIPT.INIT (FONTDEFS *POSTSCRIPT-NS-TRANSLATIONS*) \\RELEASE.PROCESS (\\PROCESS.NAME.TABLE -\\PSTAT.DELETED \\PSTAT.WAITING) CL:CEILING (XCL::SCEILING) NONSYSPROPNAMES (SYSPROPS) -\\FM.MENUHANDLER (MENUHELDWAIT PROMPTWINDOW LASTMOUSEBUTTONS) COMP.LINKCALLP (NOLINKFNS BLKDEFS -BLKLIBRARY LINKFNS) \\SETUP-COMPILED-CLOSURE-CALL (\\STACKHI WORDSPERCELL \\STK.FSB \\STACKSPACE -\\STK.BF \\STK.FX) OPT.RETFIND (OPRETURN) DRIBBLEFILE (*DRIBBLE-OUTPUT*) CL:CLOSE (|AppendBit| -|WriteBit|) XCL::PROTOTYPE-DEFINERS-FOR-TYPE (XCL::*DEFINITION-PROTOTYPES*) LISPXFIND0 (TYPE LINE) -\\NEW4PAGE (WORDSPERPAGE) \\MAIKO.CONS.UFN (CDRCODING \\LISTP GCREF \\LISTPDTD \\CDR.ONPAGE \\CDR.NIL -\\CDR.INDIRECT) XCL::MAKE-PROTOTYPE (XCL::*DEFINITION-PROTOTYPES*) \\FILLBUFFER.BACKUP (\\TERM.OFD) -CL:CLEAR-INPUT (*STANDARD-INPUT*) READGRAPH (FILERDTBL) TB.SET.FONT (MAX.SMALLP) DISPLAYSTREAMINIT ( -|ScreenBitMap| SCREENHEIGHT SCREENWIDTH) SPP.CLEAREOM (\\SPPFLAG.EOM \\SPPFLAG.END \\SPPFLAG.ATTENTION -) \\TEDIT.SHRINK.ICONCREATE (TEDIT.TITLED.ICON.TEMPLATE TEDIT.ICON.FONT) SEDIT::GET-CONTEXT ( -SEDIT::EDITOR-NAME) \\SETUP.DEFAULT.LINEBUF (READING.LBS \\LINEBUF.OFD) XCL::PROTOTYPE-DEFN-TYPES ( -XCL::*DEFINITION-PROTOTYPES*) CL:COPY-READTABLE (*READTABLE*) \\MOVE.WINDOWS.ONTO.SCREEN (SCREENWIDTH -SCREENHEIGHT \\OLDSCREENWIDTH \\OLDSCREENHEIGHT) \\IDLE.OUT (IDLE.PROFILE \\LASTUSERACTION) -TTGIVEHELP1 (SPELLSTR1 SPELLSTR2 \\FIX) CAR (CAR) RPLACA (RPLACA) COMP.CLEANFNOP (CLEANFNTEST) ARGLIST - (\\DEF.HI) OPT.RETOPT (CODE) TTINSERTSECTION (\\DSP \\DESCENT) \\SPY.INTERRUPT (MYALINK \\STACKHI -\\#ALINK.OFFSET SPY.NEXT SPY.BUFFER.THRESHOLD) RPLACD (RPLACD) |\\VFMGetPageGroup| (|\\VFMmonitor|) -\\MAKEFREEBLOCK (\\STACKHI \\STK.FSB.WORD) \\INTERPRETER-LAMBDA (\\STACKHI MYALINK WORDSPERCELL) -\\HINUM (\\FIXP \\SMALLP \\FLOATP) \\CREATELINEBUFFER (READING.LBS \\KEYBOARD.STREAM -|\\RefillBufferFn| CR.EOLC) COMPILER::COPY-NODE-GO (COMPILER::*COPY-NODE-TABLE* :TAGBODY :TAG) -SEDIT::DEFAULT-EDIT-FN (:DISPLAY :DONTWAIT) ETHERHOSTNAME (\\PUP.READY \\LOCALPUPNETHOST -\\PUPSOCKET.MISCSERVICES \\PT.ADDRLOOKUP \\MAXETHERTRIES \\PT.ADDRRESPONSE %FAT-CHAR-TYPENUMBER -\\PT.NAME/ADDRERROR PUPTRACEFILE) PROMPTFOREVALED (LASTMOUSEX LASTMOUSEY) SETXY.PRESS ( -SPRUCEPAPERLEFTMICAS SPRUCEPAPERRIGHTMICAS |SetXCode| SPRUCEPAPERBOTTOMMICAS SPRUCEPAPERTOPMICAS -|SetYCode|) LINEBUFFER-SKIPSEPRS (\\LINEBUF.OFD) GRAPHOBJ.PUTALIGN (FILERDTBL) -FB.SET.DEFAULT.NAME.WIDTH (FB.DEFAULT.NAME.WIDTH) \\SPP.PREPARE.INPUT (\\SPPFLAG.ATTENTION -\\SPPFLAG.EOM \\SPPFLAG.END \\SPPDSTYPE.END \\SPPDSTYPE.ENDREPLY \\SPPDSTYPE.BULKDATA \\XIPOVLEN -\\SPPHEAD.LENGTH) CHECK-PARAMETER-NAME (CL:LAMBDA-LIST-KEYWORDS :TEST) \\TTW1 (\\CURSORDESTINATION -\\EM.DISPINTERRUPT \\SCREENBITMAPS) \\LINEBUF.PEEKBIN (|\\RefillBufferFn|) \\SETUP-ENVIRONMENT-CALL ( -\\STACKHI WORDSPERCELL \\#ALINK.OFFSET \\STK.FSB \\STK.BF.WORD \\STK.FX \\STK.FLAGS.SHIFT) -MAKETITLEBARICON (|MinWindowWidth|) FOREST/BREAK/CYCLES (NODELST) \\IRM.GET.REF (\\IRM.HASHFILE) -\\TIMER.PROCESS (\\TIMERQHEAD PSTAT.TIMEDOUT) \\NSFILING.ADD.TO.CACHE (FILING.CACHE.LIMIT) OPENWINDOWS - (\\SCREENS) \\RPLPTR (GCREF) \\INTERMP (\\LINEBUF.OFD) CONDITIONS::%RESTART-PRINTER ( -CL::%DEFAULT-PRINT-FUNCTION) LISPXSTATE (LISPXHIST) SEDIT::ATOM-POINT-TYPE (*READTABLE* -%FAT-CHAR-TYPENUMBER) NEWPAGE.IP (METERSPERMICA ENCODING DOSAVE MICASPERINCH SETCORRECTTOLERANCE -AMPLIFYSPACE) \\NEXTCONSPAGE (WORDSPERPAGE) GRAPHOBJ.GETALIGN (FILERDTBL) \\EVALOTHER (\\DEFEVALFNS) -\\STKNAME (\\STACKHI \\STACKSPACE WORDSPERCELL) CLISPDEC0 (COMMENTFLG) \\BACKGROUND.PROCESS ( -BACKGROUNDFNS) \\FREESTACKBLOCK (|\\StackAreaSize| |\\MinExtraStackWords| |\\InterfacePage| \\STACKHI -\\STK.FSB \\STK.GUARD \\STK.FX \\STK.BF WORDSPERCELL \\MP.STACKFULL WORDSPERQUAD) CL:DECODE-FLOAT ( -\\EXPONENT.BIAS) \\LONUM (\\FIXP \\SMALLP \\FLOATP) LINEBUFFER-EOFP (\\LINEBUF.OFD) CHANGEBACKGROUND ( -WINDOWBACKGROUNDSHADE \\CURSORSCREEN) \\START.PROCESSES (\\HIGHEST.PRIORITY.QUEUE \\MP.STACKRELEASED -MYALINK \\MP.PROCERROR \#SCHEDULER#) DEFAULT.ADDNODEFN (DEFAULT.GRAPH.NODEFONT DEFAULTFONT) EXEC ( -*EXEC-COMMAND-TABLE* *PER-EXEC-VARIABLES*) BRKDWNBOXES (BDLST) \\SPP.ESTABLISH (\\#WDS.NSADDRESS -\\SPS.OPEN) COURIERPROGRAM.PRETTYPRINT (SPACEWIDTH) \\STOPDISPLAY (|ScreenBitMap|) \\OUTTERMP ( -\\TERM.OFD) EDITCOMS (L) \\ALLOCMDSPAGE (\\MP.BADMDSFREELIST |\\NxtMDSPage| |\\MDSIncrement| -WORDSPERPAGE) CL:DESCRIBE (CL::*DESCRIBE-PRINT-LENGTH* CL::*DESCRIBE-PRINT-LEVEL*) -\\TFBRAVO.PARSE.PARA (|DefaultParagraphLooks| USER.CM.CHARLOOKS) FAULTEVAL (COMPILERMACROPROPS -*MACROEXPAND-HOOK* LAMBDASPLST) CL:ARRAY-DIMENSION-LIMIT (CL:ARRAY-TOTAL-SIZE-LIMIT) CROPMARK.CREATE ( -CROPMARK.IMAGEFNS CROPMARK.DEFAULT.PAGESIZE TEXTOBJ) SPY.START (SPY.BUTTON SPY.OPEN SPY.FREQUENCY) -CHECKCONSPAGES (CDRCODING \\LISTPDTD \\LISTP) PRINTXIPDATA (\\XIPOVLEN) SEDIT::EXPANDREGIONFN (:EXPAND - DEFAULTFONT) CL:DECODE-UNIVERSAL-TIME (|\\TimeZoneComp| |\\DayLightSavings|) \\INITCONSPAGE ( -CDRCODING) \\MAPMDS (\\STORAGEFULLSTATE \\SFS.FULLYSWITCHED |\\DefaultSecondArrayPage| |\\MaxMDSPage| -|\\NxtMDSPage| |\\LeastMDSPage| \\SMALLP) CHARMACRO? (\\READING LISPXID) \\ISDST? (|\\BeginDST| -|\\EndDST|) CL:DISASSEMBLE (*STANDARD-OUTPUT*) \\INVALIDATE.PROCESS.WINDOW (LIGHTGRAYSHADE) TTY/EDITL -(EDITCALLS LISPXHISTORY) \\PROC.REPEATEDLYEVALQT (|\\TopLevelTtyWindow|) SEDIT::ASSIGN-FORMAT-LITATOM -(:KEYWORD) \\FAX.PARSE.NAME (%FAT-CHAR-TYPENUMBER FAXADDRESSES DEFAULTFAXHOST) TWODINSPECT.SELECTITEM -(INSPECTPRINTLEVEL) APPLY (\\DEF.HI) CDR (CDR) ADD.PROCESS (PROC.DEFAULT.PRIORITY \\PSTAT.WAITING -\\FIXP \\STACKHI) PRINT-CIRCLE-LABEL-P (*PRINT-CIRCLE-HASHTABLE*) \\SET.PROCESS.NAME ( -\\PROCESS.NAME.TABLE) APPLY* (\\DEF.HI) IRM.DISPLAY.REF (WINDOW) \\CKAPPLYARGS (MYALINK \\STACKHI -WORDSPERCELL \\#ALINK.OFFSET) CL::%EXPT-INTEGER (MIN.INTEGER MAX.INTEGER) CL:DIRECTORY (\\MACHINETYPE -\\MAIKO) COMPILER::COPY-NODE-CATCH (:TAG :STMT) GREETFILENAME (\\MACHINETYPE \\MAIKO -*COMPILED-EXTENSIONS* USERGREETFILES) CONS (CONS) COMP.CLEANFNP (CLEANFNTEST) MSTRYSPELLTYPE (SPELLING - S MSWORDS) CL:FCEILING (XCL::SCEILING) \\SPP.RELEASE.ACKED.PACKETS (\\SPP.RETRANSMITQ.SIZE) -MAYBE.PRETTYPRINT.BOLD (DEFAULTFONT) \\IDLE.WAIT (\\IDLING.OVER) CL:ENOUGH-NAMESTRING ( -*DEFAULT-PATHNAME-DEFAULTS*) \\NSADDRESS.DEFPRINT (*NSADDRESS-FORMAT* :DECIMAL) -\\TEDIT.HARDCOPY.DISPLAYLINE (|LMInvisibleRun| |LMLooksChange|) \\CHANGE.ETHER.TRACING ( -LASTMOUSEBUTTONS) PRINTBELLS (BELLS) DBG::ATTACH-BACKTRACE-MENU (*SHORT-BACKTRACE-FILTER* -BACKTRACEFONT |MaxBkMenuWidth| :LEFT) CL::%RATIONAL-FLOAT (\\EXPONENT.BIAS) CL::%RATIONALIZE-FLOAT ( -\\EXPONENT.BIAS \\8BITS) TTYINFIX (LISPXREADFN TTYINFIXLIMIT HISTSTR0 LISPXID) SETNTHTOPLEVELELT ( -MAXINSPECTCDRLEVEL) \\TEXTMENU.TOGGLE.SHOWSELFN (BLACKSHADE) BSPPRINTPUP (\\PUPOVLEN \\PT.AMARK -\\PT.MARK) \\SETVAR (\\STACKHI) SEDIT::INITIALIZE (SEDIT::GAP-BITMAP SEDIT::ARGS-BITMAP SEDIT::BODY-BITMAP -) FB.ICONFN (FB.ICONSPEC FB.ICONFONT) CL:FLOOR (XCL::SFLOOR) COMPILER::EFFECTS-ANALYZE-VAR-REF (:NONE) - \\SETSPACE.PRESS (|SetSpaceXShortCode| |SetSpaceXCode|) \\NSFILING.OPENFILE (|NoBits|) OPT.FINDEND ( -PRA) \\SETFVARSLOT (MYALINK \\STACKHI FVARCODE) CL::%EXP-FLOAT (CL::%LOG-BASE2-E CL::%EXP-TABLE -CL::%EXP-POLY) COMPILER::COPY-NODE-CALL (:FN :ARGS) SEDIT::CONVERT-COMMENT-STRUCTURE (COMMENTFLG -SEDIT::LEVEL-3-COMMENT SEDIT:CONVERT-UPGRADE SEDIT::LEVEL-2-COMMENT SEDIT::LEVEL-1-COMMENT) -PRINT-LOADED-FILE-INFORMATION (LOADEDFILELST) PROG (WORDSPERQUAD CELLSPERQUAD) \\CKPOSSOUT ( -%FAT-CHAR-TYPENUMBER) \\NSFILING.CONNECT (\\NSFILING.NULL.HANDLE) CL:FFLOOR (XCL::SFLOOR) CURSOR ( -\\CURRENTCURSOR DEFAULTCURSOR \\SOFTCURSORP) \\FM.WINDOWENTRYFN (LASTMOUSEBUTTONS) NEXTSIZEFONT ( -DECREASING.FONT.LIST) COMPILER::COPY-NODE-BLOCK (:NAME COMPILER::*COPY-NODE-TABLE*) BRKDWNCONSES ( -BDLST) CH.RETRIEVE.ITEM (\\CH.BROADCAST.SOCKET) INTERPRESSFILEP (FILETYPE.INTERPRESS -NOVERSIONENCODINGSTRING) \\LITPRIN (*READTABLE* \\PNAME.HI *PACKAGE-FROM-INDEX* *KEYWORD-PACKAGE* -*PRINT-CASE* \\PLIST.HI :CAPITALIZE) MAKE-FILL-POINTER-OUTPUT-STREAM (\\FILL-POINTER-STREAM-DEVICE -\\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS FILELINELENGTH LF.EOLC |NoBits|) \\PROG0 (MYALINK \\STACKHI -WORDSPERQUAD \\STACKSPACE WORDSPERCELL \\LITATOM \\NEW-ATOM PVARCODE) LOADUP (SYSFILES) -COMPILER::META-CALL-LAMBDA-SUBSTITUTE (:LEXICAL) COMPILER::CONSTRUCT-LIST (COMPILER::*LITERALLY-NIL* -:FN :ARGS) MSSETWORDTYPE (MSWORDS) SPY.TOGGLE (\\PERIODIC.INTERRUPT WAITINGCURSOR) -TB.COPYBUTTONEVENTFN (LASTMOUSEBUTTONS) TTCRLF.ACCOUNT (\\TTPAGELENGTH \\DSP \\LMARG) \\PRINSTRING ( -*READTABLE* %FAT-CHAR-TYPENUMBER) CCCSCAN (|\\AtomHI| BITSPERBYTE) \\KEYHANDLER1 (ALLUP \\DLMOUSE.UP -\\MISCSTATS |\\KbdFXP| \\PERIODIC.INTERRUPT.FREQUENCY \\EM.MOUSEX \\EM.MOUSEY \\EM.REALUTILIN -\\DLMOUSE.WAITING \\DLMOUSE.NORMAL \\EM.UTILIN \\EM.KBDAD0 \\EM.KBDAD1 \\EM.KBDAD2 \\EM.KBDAD3 -\\EM.KBDAD4 \\EM.KBDAD5 |\\InterfacePage| \\KEYBOARDEVENT.LAST \\KEYBOARDEVENT.FIRST -\\KEYBOARDEVENT.SIZE \\MACHINETYPE \\MAIKO \\RCLKSECOND) \\DSPLEFTMARGIN.HCPYMODE (MICASPERPT) -DOFILESLOAD (:COMPILED *STANDARD-INPUT* DIRECTORIES LDFLG *COMPILED-EXTENSIONS* LOADOPTIONS) -NTHTOPLEVELELT (MAXINSPECTCDRLEVEL) \\PRINT-USING-DEFPRINT (\\DEFPRINTFNS) CL:FINISH-OUTPUT ( -*STANDARD-OUTPUT*) \\SPPSENDERROR (XIPTRACEFILE) RESTART.PROCESS (\\PROC.RESTARTME) \\PRINSTACKP ( -\\PNAME.HI *READTABLE*) CL:ENCODE-UNIVERSAL-TIME (|\\TimeZoneComp|) \\UNWIND.PROCESS (\\PROC.KILLME) -GET-ONED-DISPLAYW (MAX.SMALLP) ONEDINSPECT.SETELT (INSPECTPRINTLEVEL XCL:*EVAL-FUNCTION*) -\\CHECKCONSPAGE (WORDSPERCELL) EVALA (WORDSPERQUAD CELLSPERQUAD) DASSEM.CANSHAREBINDING (FRAMES VCA -FRA FRAME) PRINTPUPQUEUE (\\PUPOVLEN) WAKE.PROCESS (\\PSTAT.RUNNING PSTAT.WAKEUP) ENDLOADUP ( -USERRECLST SYSTEMINITVARS MEDLEY-INIT-VARS FILEPKGTYPES) CL:FLOAT-PRECISION (\\HIDDENBIT) -FB.HARDCOPY.DIRECTORY (MAX.SMALLP FB.HARDCOPY.FONT FB.HARDCOPY.DIRECTORY.FONT ITALICFONT) \\EVALA ( -MYALINK \\STACKHI WORDSPERQUAD \\STACKSPACE \\LITATOM \\NEW-ATOM PVARCODE WORDSPERCELL) COMP.STUNBIND -(FRA) \\EXTERNALFORMAT (:XCCS LF.EOLC *SUPPORTED-EXTERNALFORMATS*) CHECKSYNONYM (MSWORDS SPELLING) -EDITL1 (EDITRDTBL L ATM) COMPILER::EFFECTS-ANALYZE-THROW (:ANY) NCHARS (\\PNAME.HI -%FAT-CHAR-TYPENUMBER) |\\PFPurgeRootDirectory| (|tRootDirectory| |tUnassigned|) DEFINEDP (\\DEF.HI) -CL:FORCE-OUTPUT (*STANDARD-OUTPUT*) COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS (COMPILER::*LITERALLY-NIL* -) OPT.COMMONBACK (FRAME) SEDIT::CHANGE-QUOTE (SEDIT::QUOTE-WRAPPER-LIST) \\LITPRIN.INTERNAL ( -\\PNAME.HI \\PLIST.HI UPPERCASEARRAY *PRINT-CASE* \\MAXTHINCHAR ESCAPEBIT STOPATOMBIT INNERESCAPEBIT -:CAPITALIZE) \\SOUT (\\DISPLAYSTREAMTYPES *DRIBBLE-OUTPUT* \\PRIMTERMSA \\TERM.OFD -%FAT-CHAR-TYPENUMBER) SET (\\STACKHI) CL:FROUND (XCL::SROUND) FIND-EXTERNAL-SYMBOL ( -%FAT-CHAR-TYPENUMBER \\FIXP) \\SEQUIN.CONTROL (\\PUPOVLEN) \\GENERIC.CURSOR (\\CURRENTCURSOR \\SCREENS -) POSTSCRIPT.FONTCREATE (\\MAXCHARSET \\MAXTHINCHAR *POSTSCRIPT-NS-HASH*) \\ELIDE.ELEMENT.CHAR ( -*READTABLE*) CL:FTRUNCATE (XCL::STRUNCATE) CCCSUBFN? (OLDREF) PROCESS-STATUS (\\STACKHI -\\#ALINK.OFFSET) ERRORSET (SI::NLSETQ-PROCEED-CASE *PROCEED-CASES* *CONDITION-HANDLER-BINDINGS* -:NORMAL) CLISPDEC (CLISPRECORDTYPES CLISPARITHCLASSLST CLISPARITHOPLST DECLWORDS) \\SUSPEND.PROCESS ( -\\PSTAT.RUNNING \\PSTAT.WAITING \\MP.PROCERROR) OPT.JUMPREV (FRA PRA OPPOP OPCOPY VCONDITIONALS -CONDITIONALS OPNIL) MAP.PROCESSES (\\PROCESSES) SEDIT::STRING-OFFSET (*READTABLE*) VALUOF ( -LISPXHISTORY) \\SMASHRETURN (MYALINK \\STACKHI \\#ALINK.OFFSET *CURRENT-PROCESS*) DASSEM.COUNTVARS ( -VCA) PUTSEQUIN (\\SS.OPEN \\SEQUIN.DATA \\SS.UNOPENED \\SS.OPENING \\SEQUIN.OPEN \\ETHERTIMEOUT) -SEDIT::PARSE-INDENT (:VERTICAL) CL:STRING-CAPITALIZE (SLEN) \\SPP.HANDLE.DATA (\\SPPDSTYPE.END -\\SPS.ENDRECEIVED \\SPS.DALLYING \\SPPDSTYPE.ENDREPLY \\SPS.ENDSENT \\SPS.CLOSED) MENU.HANDLER ( -LASTMOUSEBUTTONS MENUHELDWAIT LASTMOUSEX LASTMOUSEY) PUTPROPS.PRETTYPRINT (MACROPROPS FNSLST -*STANDARD-OUTPUT*) \\PRINTADDR (\\ADDRMASK) \\PRINTNSADDRESS (\\LINELENGTH MAX.SMALLP) GO (MYALINK -\\STACKHI WORDSPERCELL \\#ALINK.OFFSET) BACKSPACEDEL (ERASECHARCODE) FRESHLINE (|WriteBit| |AppendBit| -) BREAK.NSFILING.CONNECTION (\\FILEDEVICES) \\LET0 (MYALINK \\STACKHI WORDSPERQUAD \\STACKSPACE -WORDSPERCELL \\LITATOM \\NEW-ATOM PVARCODE) PERIODICALLYRECLAIM (\\LASTUSERACTION RECLAIMWAIT -\\LASTRECLAIM) \\GETACCESS (|NoBits| |ReadBit| |AppendBit| |OutputBits| |BothBits|) THIS.PROCESS ( -\\RUNNING.PROCESS) \\CARET.DOWN (\\CARET.FORCED.OFF.RATE \\CARET.TIMER) \\LET* (MYALINK \\STACKHI -WORDSPERQUAD \\LITATOM \\NEW-ATOM PVARCODE \\STACKSPACE WORDSPERCELL) SI::NLSETQ-PROCEED-CASE (:NAME -:SELECTOR :TEST :REPORT) \\SYMBOL.ESCAPE.COUNT (UPPERCASEARRAY \\PNAME.HI \\PLIST.HI \\MAXTHINCHAR -ESCAPEBIT STOPATOMBIT INNERESCAPEBIT *READ-BASE*) COURIER.SKIP (BYTESPERWORD) BRV/OFFSET (NODELST -TERMY) INSPECT (INSPECTMACROS |\\DTDSpaceBase| PROMPTWINDOW) INPUT (\\LINEBUF.OFD) \\DRAWLINE.IP ( -MICASPERPOINT DOSAVESIMPLEBODY { }) \\DOMOUSECHORDING (\\MOUSE.ALLBITS \\DLMOUSE.UP \\DLMOUSE.WAITING -\\MOUSE.LRBIT ALLUP \\MOUSE.MIDDLEBIT \\DLMOUSE.MIDDLE \\MISCSTATS \\MOUSE.LEFTBIT -\\DLMOUSE.MIDDLE&RIGHT \\MOUSE.RIGHTBIT \\DLMOUSE.MIDDLE&LEFT \\EM.UTILIN) CL:INTEGER-DECODE-FLOAT ( -\\EXPONENT.BIAS) DWIMDEF (DWIMIFYCOMPFLG CLISPIFYPRETTYFLG) \\STREAM.DEFPRINT (|ReadBit| |OutputBits| -|BothBits| |AppendBit|) FB.SHAPECOMMAND (SCREENWIDTH SCROLLBARWIDTH) \\TEXTMENU.TOGGLE.CREATE ( -\\TOGGLEIMAGEFNS) \\DEFPRINT.BY.NAME (*READTABLE*) FB.FASTSEECOMMAND (:NEXT) FB.MAYBE.WIDEN.NAMES ( -FB.OVERFLOW.MAXFRAC FB.OVERFLOW.MAXABSOLUTE) \\ELIDE.TAIL.STRING (*READTABLE*) \\NUMERIC.PNAMEP ( -*READTABLE* *READ-BASE* %FAT-CHAR-TYPENUMBER \\PNAME.HI \\PLIST.HI) \\MEDW.CURSOR (\\CURRENTCURSOR -DEFAULTCURSOR \\SOFTCURSORP) TEDIT.CHARWIDTH (\\MAXTHINCHAR INDICATE.CCE SIMULATE.CCE REAL.CCE -IGNORE.CCE) GIVE.TTY.PROCESS (LASTMOUSEBUTTONS) \\DOBUFFEREDTRANSITIONS (\\KEYBOARDEVENT.LAST -\\KEYBOARDEVENT.FIRST \\KEYBOARDEVENT.SIZE \\CHARMASK) SEDIT::SETF-OF-GET-FORMAT (SEDIT::*FSPEC-TABLE* -) MKATOM (\\PNAMELIMIT %FAT-CHAR-TYPENUMBER) SETREADFN (|\\DisplayStarted|) LET (WORDSPERQUAD -CELLSPERQUAD) FORMAT-EXPONENT-MARKER (*READ-DEFAULT-FLOAT-FORMAT*) PFI.PRINT.BITMAP (*STANDARD-OUTPUT* -) SEDIT::FORMAT-VALUES-CHANGED (SEDIT::TYPE-LITATOM) PROCESS.TTY (\\TERM.OFD) COMPILER::META-CALL-LAMBDA - (:SPECIAL) COMP.STBIND (FRA CODE) INFILECOMTAIL (COMMENTFLG) MSPRED (LASTPARSED) TTYINSTRING ( -\\ENDBUFFER \\MAXTHINCHAR) MAKE-UNICODE-TRANSLATION-TABLES (N-TRANSLATION-SEGMENTS MISSINGCODE -TRANSLATION-MASK TRANSLATION-SHIFT MAX-ALIST-LENGTH TRANSLATION-SEGMENT-SIZE) CLISPFORERR1 (I.S. -I.S.PTRS) FB.HARDCOPY.TOFILE (PRINTFILETYPES) EDITBF (MAXLEVEL) \\IDLE.PROMPTING.WINDOW (PROMPTWINDOW) - CL:LISP-IMPLEMENTATION-VERSION (MAKESYSNAME LISP-RELEASE-VERSION MAKESYSDATE) \\KEYBOARDOFF ( -\\EM.DISPINTERRUPT |\\LispKeyMask| \\MACHINETYPE \\MAIKO) ONEDINSPECT.SELECTPROP (INSPECTPRINTLEVEL) -\\TFBRAVO.READ.PARALOOKS (USER.CM.PARALOOKS) COPYVM (|\\InterfacePage| |\\IFPValidKey|) -BROWSE/LAYOUT/LATTICE (NODELST) \\DTEST.UFN (|\\DTDSpaceBase| \\FIXP \\SMALLP \\FLOATP) -\\UPDATE.EXTENT.IMAGE (BLACKSHADE SCROLLBARSHADE) \\NSFILING.CLOSE.CONNECTIONS (:ABORT) \\DRAWPOINT.IP - (MICASPERPT) \\EVALFORM (\\DEF.HI) \\SAVEVMBACKGROUND (SAVEVMMAX |\\InterfacePage| |\\IFPValidKey| -SAVEVMWAIT \\LASTUSERACTION) OPT.LABELNTHPR (PRA FRAME FRA) \\GET.EXTERNALFORMAT.FROM.NAME ( -*EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT*) \\RELEASE.ETHERPACKET (\\FREE.PACKET.QUEUE) PPSOC ( -\\STATE.LISTENING RTPSTATES) \\SPP.HANDLE.ATTN (LAMBDASPLST PROMPTWINDOW) ENVAPPLY (\\DEF.HI) -CL::STRUCTURE-FUNCTION-P (CL::*PARSED-DEFSTRUCTS*) \\GC.HANDLEOVERFLOW (\\HTOVERFLOW WORDSPERCELL -|\\DTDSpaceBase| \\LISTP \\FIXP \\SMALLP \\FLOATP MAX.SMALL.INTEGER) SEDIT::RELINEARIZE (WHITESHADE) -TIME.SINCE.PACKET (\\FIXP WORDSPERCELL \\RCLKMILLISECOND) MSNEXTWORD (SENTENCE MSWORDS PARSED) -USEREXEC (LISPXHISTORY) SPY.TREE (*PACKAGE* *READTABLE* *PRINT-CASE* SPY.SHOW.THRESHOLD) -SORT.NSADDRESSES.BY.DISTANCE (\\ETHERTIMEOUT) \\SEQUIN.PUT (\\PT.SEQUIN) TTPRIN1 (\\LMARG \\DSP -\\RMARG) OPT.LBDEL (PRA) TTYINREADP (HISTSTR0 \\LINEBUF.OFD) \\INTERPRETER (\\DEF.HI |\\MiscFXP| -WORDSPERQUAD CELLSPERQUAD) NSNET.DISTANCE (\\ETHERTIMEOUT) GETSEQUIN (\\SS.OPEN) \\MAKENUMBER ( -|\\SmallNegHi| \\FIXP) SEDIT::INSTALL-SPECIAL-FORMATS (:CLISP :DOTLIST) \\TRACKCURSOR ( -\\LASTUSERACTION \\MISCSTATS WORDSPERCELL \\CURSORDESTWIDTH \\CURSORHOTSPOTX \\MACHINETYPE \\DANDELION - BITSPERWORD \\CURSORDESTHEIGHT HARDCURSORHEIGHT \\CURSORHOTSPOTY \\DAYBREAK \\MAIKO \\EM.MOUSEX -\\EM.MOUSEY \\EM.CURSORX \\EM.CURSORY) SMALLP (\\SMALLP) STKAPPLY (\\DEF.HI) \\PERIODIC.INTERRUPTFRAME - (\\PERIODIC.INTERRUPT) PRINTPROPS (USERWORDS) FIXP (\\TT.FIXP) DASSEM.MATCHVARS (VCA) SI::UNWIND ( -MYALINK \\STACKHI \\#ALINK.OFFSET WORDSPERCELL) CL::TIME-FORMAT (:EXEC) SEDIT::DEFAULT-PACKAGE ( -*PACKAGE*) \\STORENSADDRESS (\\#WDS.NSADDRESS) COMPILER::META-EVAL-UNWIND-PROTECT (:ARGUMENT) -\\TFBRAVO.HANDLE.HEADING (IN USER.CM.PARALOOKS MAX.FIXP) COMP.STSETQ (LEVEL) PRINT10TO3 ( -XIPIGNORETYPES XIPTRACEFILE \\TRANS.OP.REQUEST \\TRANS.OP.RESPONSE) OPT.UBDEL (FRAMES) SETLASTC ( -\\LINEBUF.OFD) LITATOM (COPY TYPEMASK.N EQ) \\PROC.RESUME (MYALINK \\STACKHI WORDSPERCELL -\\#ALINK.OFFSET) \\DRAWCURVE.IP (DOSAVESIMPLEBODY { }) RETAPPLY (\\STACKHI \\#ALINK.OFFSET \\DEF.HI) -DASHES (LL) \\SOFTCURSORPOSITION (\\EM.DISPINTERRUPT \\EM.CURSORX \\EM.CURSORY) -|\\PFCreateRootDirectory| (|tRootDirectory|) FLOATP (\\FLOATP) \\TEDIT.PEEKBIN.NEW.PAGE (|NoBits|) -VIDEORATE (\\MACHINETYPE \\DOLPHIN \\DORADO \\DANDELION) WINDOW.MOUSE.HANDLER (LASTMOUSEX LASTMOUSEY -LASTMOUSEBUTTONS \\CURSORSCREEN \\CURSORDESTWIDTH) FB.DEPTHCOMMAND (FB.DEPTH.MENU.ITEMS :NUMBER) -GETDEFFROMFILE (FILELST) RETEVAL (\\STACKHI \\#ALINK.OFFSET) TWODINSPECT.REDISPLAY (INSPECTPRINTLEVEL -WHITESHADE) \\JISPEEK (*DEFAULT-NOT-CONVERTED-FAT-CODE* *JIS-TO-XCCS-CONV-TABLE-LIST* -*JIS-TO-XCCS-CONV-NO-FONT-TABLE* *HANKAKU-TO-ZENKAKU-CONV-TABLE*) FB.HEADINGW.DISPLAY (BLACKSHADE -TB.LEFT.MARGIN) XCL::UNDOABLY-SET-SYMBOL (\\STACKHI) EDIT\: (L COPYFLG) \\MAKEFUNARGFRAME ( -WORDSPERQUAD CELLSPERQUAD) ICONW.SHADE (WHITESHADE) COURIER.WRITE.STRING (%FAT-CHAR-TYPENUMBER) CL:ISQRT - (:EXPECTED-TYPE :NAME :VALUE :MESSAGE) DASSEM.DPRINTLAP (LSTFIL) TEDIT.INSERT.UPDATESCREEN ( -TEDIT.SELECTION) CL:LONG-SITE-NAME (XCL:*LONG-SITE-NAME* XCL:*SHORT-SITE-NAME*) \\MAKESTACKP (\\STACKP - \\STACKHI) \\VAROFFSET (\\STACKHI IVARCODE WORDSPERCELL PVARCODE FVARCODE) COMPILER::META-EVAL-VAR-REF - (:EFFECT COMPILER::*LITERALLY-NIL*) \\LOADNSADDRESS (\\#WDS.NSADDRESS) COMPILER::META-EVAL-THROW ( -:ARGUMENT :MV) TEDIT.MODIFYLOOKS (BLACKSHADE) CL:MACHINE-INSTANCE (\\MACHINETYPE \\MAIKO -\\MY.NSHOSTNUMBER) PRINTPACKET (\\PACKET.PRINTERS XIPTRACEFILE) OPT.PRDEL (PRA) TTREADLIST (\\BUFFER -\\ENDBUFFER) EDITQF (CLISPTRANFLG) \\DSPFONT.PRESS (|FontCode| |MicasPerPoint|) BESTNSADDRESS ( -\\RT.INFINITY \\NS.ROUTING.TABLE.RADIUS \\ETHERTIMEOUT) BLIPSCAN (MYALINK \\STACKSPACE \\STACKHI -\\#ALINK.OFFSET) SETBLIPVAL (MYALINK \\STACKSPACE \\STACKHI WORDSPERCELL \\#ALINK.OFFSET) -TITLEW.REPAINTFN (BLACKSHADE) CL:MAKE-BROADCAST-STREAM (%BROADCAST-STREAM-DEVICE -\\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS FILELINELENGTH LF.EOLC |NoBits|) CLISPFORERR (FAULTFN) -TOPW.REPAINTFN (INSPECTPRINTLEVEL) XCL::PROFILE-VARIABLES (XCL:*PROFILE*) STACKP (\\STACKP) -\\SETACCESS (|NoBits| |ReadBit| |AppendBit| |OutputBits| |BothBits|) CL:MAKE-ECHO-STREAM ( -\\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS LF.EOLC |NoBits|) COURIER.WRITE.SEQUENCE.UNSPECIFIED ( -BITSPERWORD %FAT-CHAR-TYPENUMBER) \\SHIFTJISPEEK (*DEFAULT-NOT-CONVERTED-FAT-CODE* -*JIS-TO-XCCS-CONV-TABLE-LIST* *JIS-TO-XCCS-CONV-NO-FONT-TABLE* *HANKAKU-TO-ZENKAKU-CONV-TABLE*) -\\TFBRAVO.READ.CHARLOOKS (USER.CM.CHARLOOKS) \\REALFRAMEP (\\STACKHI \\INTERNAL OPENFNS BRKINFOLST) -DASSEM.DSTOREFNDEF (WORDSPERQUAD BYTESPERQUAD CELLSPERQUAD \\LITATOM \\NEW-ATOM LOADTIMECONSTANTMARKER - PVARCODE FVARCODE IVARCODE BITSPERBYTE BITSPERWORD) FB.MAKEHEADINGWINDOW (BLACKSHADE) \\INSERTCH ( -%FAT-CHAR-TYPENUMBER \\MAXTHINCHAR) CL:MACHINE-TYPE (\\MACHINETYPE \\DANDELION \\DORADO \\DAYBREAK -\\MAIKO) BLIPVAL (MYALINK \\STACKSPACE \\STACKHI WORDSPERCELL \\#ALINK.OFFSET) \\SHIFTJISIN ( -*DEFAULT-NOT-CONVERTED-FAT-CODE* *JIS-TO-XCCS-CONV-TABLE-LIST* *JIS-TO-XCCS-CONV-NO-FONT-TABLE* -*HANKAKU-TO-ZENKAKU-CONV-TABLE*) \\IPCURVE2 (\\SPLINESTEP.IP MICASPERPOINT UBFLOAT3 -MAXSEGSPERTRAJECTORY) EXPRP (\\DEF.HI) PRINTNUM-TO-STRING (NILNUMPRINTFLG) \\TIMER.INTERRUPTFRAME ( -\\PERIODIC.INTERRUPT.FREQUENCY \\RCLKSECOND \\MISCSTATS) GETDEFSAVED (SAVEDDEFS) \\STKARG (\\STACKHI -WORDSPERCELL IVARCODE PVARCODE) FB.INFOMENU.WHENSELECTEDFN (WHITESHADE FB.INFOSHADE) VIRGINFN ( -*TERMINAL-IO*) XCL::SETF-FIND-PROFILE (XCL::*PROFILES*) DOAROUNDEXITFORMS (BEFORELOGOUTFORMS -AFTERLOGOUTFORMS BEFORESYSOUTFORMS AFTERSYSOUTFORMS BEFOREMAKESYSFORMS AFTERMAKESYSFORMS) -\\LEVELTEXTURE (BLACKSHADE16 DARKGRAY16 MEDIUMGRAY16 LIGHTGRAY16 WHITESHADE16) -\\GET.COURIER.DEFINITION (\\COURIERPROGRAM) |\\PFPutRootDirectory| (|tRootDirectory|) -\\EUCFILEOUTCHARFN (CR.EOLC LF.EOLC CRLF.EOLC *XCCS-TO-JIS-CONV-TABLE* :HTOZP -*ZENKAKU-TO-HANKAKU-CONV-TABLE*) LISTP (\\LISTP CDRCODING) \\TEDIT.RESTARTFN (|BothBits|) -BROWSE/LAYOUT/HORIZ/COMPACTLY (DEFAULT.GRAPH.NODELABELSHADE DEFAULT.GRAPH.NODEFONT -DEFAULT.GRAPH.NODEBORDER MOTHERD) \\NSFILING.AFTER.LOGIN (\\NSFILING.ACTIVE.SESSIONS) \\FUNCT1 ( -MYALINK \\STACKHI WORDSPERQUAD WORDSPERCELL \\LITATOM \\NEW-ATOM PVARCODE) MICROCODEVERSION ( -|\\InterfacePage|) MSPATHS4 (SEEN MSDATABASELST) \\CREATE.JIS.EXTERNALFORMAT (:JIS) CL:MAKE-RANDOM-STATE - (*RANDOM-STATE* :I :J :ARRAY) LET* (WORDSPERQUAD CELLSPERQUAD) \\EUCPEEK ( -*DEFAULT-NOT-CONVERTED-FAT-CODE* *JIS-TO-XCCS-CONV-TABLE-LIST* *JIS-TO-XCCS-CONV-NO-FONT-TABLE* -*HANKAKU-TO-ZENKAKU-CONV-TABLE*) CHARACTER (\\MAXTHINCHAR \\FATPNAMESTRINGP \\PNAMELIMIT -|\\OneCharAtomBase|) REALMEMORYSIZE (|\\InterfacePage|) \\JISIN (*DEFAULT-NOT-CONVERTED-FAT-CODE* -*JIS-TO-XCCS-CONV-TABLE-LIST* *JIS-TO-XCCS-CONV-NO-FONT-TABLE* *HANKAKU-TO-ZENKAKU-CONV-TABLE*) -\\CREATE.EUC.EXTERNALFORMAT (:EUC) \\EUCIN (*DEFAULT-NOT-CONVERTED-FAT-CODE* -*JIS-TO-XCCS-CONV-TABLE-LIST* *JIS-TO-XCCS-CONV-NO-FONT-TABLE* *HANKAKU-TO-ZENKAKU-CONV-TABLE*) -FB.MAKERIGIDWINDOW (SCREENWIDTH) \\SETLOCALNSNUMBERS (|\\InterfacePage|) \\TFBRAVO.FIND.LAST.TRAILER ( -BRAVO.TRAILER.CHARS) \\ADD.ROUTING.TABLE.ENTRY (\\ROUTING.TABLE.TYPENUM :CULPRIT :EXPECTED-TYPE -\\ROUTING.TABLE.MASK) TTYDISPLAYSTREAM (\\DEFAULTTTYDISPLAYSTREAM \\DISPLAYSTREAMTYPES) -VRULE.DISPLAYFN (BLACKSHADE) CL:MAKE-SYNONYM-STREAM (\\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS LF.EOLC -|NoBits|) \\GENERIC.DSPCREATE (|ScreenBitMap| \\SCREENS SCREENWIDTH \\DISPLAYIMAGEOPS |DisplayFDEV| -\\STREAM.DEFAULT.MAXBUFFERS FILELINELENGTH LF.EOLC |NoBits| DEFAULTFONT) DISMISS (MAX.FIXP) -\\SEQUIN.PROCESS (\\PT.SEQUIN \\PT.ERROR PUPTRACEFLG \\SS.OPENING \\PUPE.NOSOCKET \\SS.ABORT -\\SS.CLOSING PSTAT.TIMEDOUT \\SEQUIN.TIMEOUTMAX \\SEQUIN.DESTROY \\SEQUIN.NOOP) PP (*TERMINAL-IO*) -RESHADEITEM (BLACKSHADE) SEDIT::GET-INDENT (SEDIT:*INDENT-ALIST*) \\PROCESS.EVAL1 (:ABORTED -\\PSTAT.RUNNING) TEXTICON (DEFAULTTEXTICON) \\CREATE.THROUGH.EXTERNALFORMAT (CR.EOLC :THROUGH) -\\SHIFTJISFILEOUTCHARFN (CR.EOLC LF.EOLC CRLF.EOLC *XCCS-TO-JIS-CONV-TABLE* :HTOZP -*ZENKAKU-TO-HANKAKU-CONV-TABLE*) \\CREATE.SHIFTJIS.EXTERNALFORMAT (CRLF.EOLC :W-MS :MS) PROCESS.EVAL ( -\\PSTAT.NORESULT) REQUIREVERSION (|\\InterfacePage|) FB.INFOMENU.SHADEINITIALSELECTIONS (FB.INFOSHADE) - \\HANDLE.RAW.10TO3 (\\EPT.10TO3 \\TRANS.OP.REQUEST \\MY.NSADDRESS \\3MBENCAPSULATION.WORDS -\\TRANS.DATALENGTH \\TRANS.OP.RESPONSE XIPIGNORETYPES XIPTRACEFILE) PROCESS.APPLY (\\PSTAT.NORESULT) -\\OK.TO.IDLE? (\\GETPASSWORD.LOCK) \\DECODETRANSITION (\\LASTUSERACTION \\MISCSTATS WORDSPERCELL -\\NKEYS \\LASTKEYSTATE \\CURRENTKEYACTION IGNORE.TF LOCKSHIFT.TF NOLOCKSHIFT.TF EVENT.TF 1SHIFTUP.TF -1SHIFTDOWN.TF 2SHIFTUP.TF 2SHIFTDOWN.TF LOCKUP.TF LOCKDOWN.TF LOCKTOGGLE.TF CTRLUP.TF CTRLDOWN.TF -METAUP.TF METADOWN.TF FONTUP.TF FONTDOWN.TF FONTTOGGLE.TF USERMODE1UP.TF USERMODE1DOWN.TF -USERMODE1TOGGLE.TF USERMODE2UP.TF USERMODE2DOWN.TF USERMODE2TOGGLE.TF USERMODE3UP.TF USERMODE3DOWN.TF -USERMODE3TOGGLE.TF \\COMMANDKEYACTION \\CTRLMASK \\KEYBOARD.META) CL:MERGE-PATHNAMES ( -*DEFAULT-PATHNAME-DEFAULTS* :NEWEST) \\MEDW.DSPCREATE (SCREENWIDTH |ScreenBitMap| -\\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS FILELINELENGTH LF.EOLC |NoBits| DEFAULTFONT) U-CASE ( -\\PLIST.HI \\PNAME.HI *INTERLISP-PACKAGE* \\PNAMELIMIT \\FATPNAMESTRINGP %FAT-CHAR-TYPENUMBER) -%TWO-WAY-STREAM-DEVICE-CLOSEFILE (%TWO-WAY-STREAM-DEVICE %ECHO-STREAM-DEVICE) TTGIVEHELP (\\DSP) -\\JISFILEOUTCHARFN (CR.EOLC LF.EOLC CRLF.EOLC *XCCS-TO-JIS-CONV-TABLE* :HTOZP -*ZENKAKU-TO-HANKAKU-CONV-TABLE*) CL:MAKE-TWO-WAY-STREAM (\\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS -LF.EOLC |NoBits|) DBG::STKPTR-CCODE (\\STACKHI) \\PROCESS.APPLY1 (:ABORTED \\PSTAT.RUNNING) -|\\SFFixY.HCPYMODE| (MAX.SMALL.INTEGER) \\BACKTRACE (\\STACKHI WORDSPERCELL \\#ALINK.OFFSET) -\\GCMAPTABLE (\\HTOVERFLOW WORDSPERCELL |\\DTDSpaceBase| \\FIXP \\SMALLP \\FLOATP MAX.SMALL.INTEGER -|\\MaxTypeNumber|) \\PUTSYSBUF (\\SYSBUFFER.LAST \\SYSBUFFER.FIRST) BCPLVERSION (|\\InterfacePage|) -\\TEDIT.MARK.REVISION (BLACKSHADE) COMP.LOOKUPCONST (OPNIL) \\PRINTFRAME (\\STACKHI WORDSPERCELL -\\#ALINK.OFFSET PVARCODE FVARCODE \\VALSPACE) OPT.LBMERGE (FRA) PNAMESTREAMP (\\PNAMEDEVICE) SHOWCHARS - (CODE) TEDIT.FORMATFOLIO (TEDIT.DEFAULT.FOLIO.LOOKS) FB.DISPLAY.COUNTERS (MAX.SMALLP WHITESHADE) -\\TRANSLATE.10TO3 (\\EPT.10TO3 \\TRANS.OP.REQUEST \\MY.NSADDRESS \\TRANS.DATALENGTH) DASSEM.DWRITEFN ( -LAPFLG CODEINDICATOR *READTABLE* FILERDTBL CODERDTBL LOADTIMECONSTANTMARKER) EDIT4E (CHCONLST2 -EDITQUIETFLG CLISPTRANFLG) DBG::FIND-NAMED-STACK-POSITION (NOSPELLFLG) \\GETDEVICEFROMHOSTNAME ( -\\DEVICENAMETODEVICE \\FILEDEVICES) \\SEQUIN.CLOSE (\\SS.OPEN \\SS.CLOSING \\SEQUIN.DESTROY) APROPOS ( -UPPERCASEARRAY) READPRINTERPORT (READPRINTERPORT) FB.NEWINFOCOMMAND (FB.INFO.MENU.ITEMS FB.MENUFONT) -\\UNQUEUE.EVENT (\\MP.PROCERROR) \\TEDIT.LOOKS (TEDIT.KNOWN.FONTS TEDIT.FACE.MENU TEDIT.SIZE.MENU) -CL::TIME-CALL (*TRACE-OUTPUT*) \\HARDCURSORUP (\\CURSORDESTINATION |CursorBitMap| HARDCURSORHEIGHT -HARDCURSORWIDTH \\MACHINETYPE \\DAYBREAK \\MAIKO) COMPILER::META-EVAL-SETQ (:ARGUMENT) \\PRINTBF ( -\\STACKHI IVARCODE \\STACKSPACE) MSVERBED (LASTPARSED) BROWSE/LAYOUT/HORIZ (NODELST) -COMPILER::EFFECTS-ANALYZE-OPCODES (:NONE) OPT.JUMPTHRU (FRA PRA OPNIL COMFN OPRETURN VCONDITIONALS -OPCOPY OPPOP) |\\PFGetRootDirectory| (|tRootDirectory|) PRIN2 (PLVLFILEFLG *PRINT-LEVEL* -*PRINT-LENGTH* *INTERLISP-PACKAGE* *PACKAGE* \\LINELENGTH MAX.SMALLP) MSPATHS2 (SEEN MSBLIP -MSDATABASELST) EDITFPAT (CHCONLST1) CH.DELETE.PROPERTY (\\CH.BROADCAST.SOCKET) SHOWPRESSBITMAPREGION ( -PRESSBITMAPREGION) \\LOOKUPPUPNUMBER (BROADCASTNSHOSTNUMBER \\NS.WKS.PUPLOOKUP \\EXTYPE.REQUEST -\\XIPT.PUPLOOKUP \\#WDS.NSHOSTNUMBER \\MAXETHERTRIES \\ETHERTIMEOUT \\EXTYPE.RESPONSE XIPTRACEFILE -\\EXTYPE.NEGATIVE \\XIPOVLEN) \\SCANFORNTENTRY (|\\AtomHI|) GRAPHBUTTONEVENTFN (LASTMOUSEBUTTONS -LASTMOUSEX LASTMOUSEY) GETDEFCURRENT (MACROPROPS) BRKDWNTIME (BDLST) CL:COMPILED-FUNCTION-P (\\ST.CODE -) INTERPRESS.OUTCHARFN (\\MAXTHINCHAR NSCHARSETSHIFT) EDITMBD (EDITEMBEDTOKEN) CL:PEEK-CHAR ( -*STANDARD-INPUT* CR.EOLC CRLF.EOLC NSCHARSETSHIFT \\NORUNCODE LF.EOLC) \\PRINTSTK (.I7 \\STACKSPACE) -\\CLOSEFILE (|ReadBit|) EDITSW (L) SEDIT::CREATE-PRETTY-PRINT-ENV (SEDIT::LISP-EDIT-ENVIRONMENT -DEFAULTFONT ITALICFONT CLISPFONT COMMENTFONT MICASPERPT) COMP.MACRO (COMPILE.CONTEXT) OPT.JUMPOPT ( -CL:LABELS) INITSEQUIN (\\SS.UNOPENED) \\TEXTINIT (FILELINELENGTH LF.EOLC |NoBits|) |UnixPrint| ( -|UnixPrinterName|) OBTAIN.MONITORLOCK (\\INTERRUPTABLE) WRITEPRINTERPORT (WRITEPRINTERPORT) -\\ADD.CONNECTED.DIR (\\CONNECTED.DIRECTORY) PRESS.BITMAPSCALE (PRESSBITMAPREGION |PointsPerMica|) -TB.MAKE.BROWSER (TB.DELETEDLINEHEIGHT TB.LEFT.MARGIN) MOVE.TO.START.OF.WORD (\\ARROW \\CURSOR) -ONEDINSPECT.SELECTITEM (INSPECTPRINTLEVEL) TEMPLATE (USERTEMPLATES MSTEMPLATES) DASSEM.DASSEM ( -CONSTOPS TOPFRAME :4-BYTE *BC-MACRO-ENVIRONMENT* :3-BYTE FVINDEXHARRAY NARGMAX NLOCALMAX NFREEMAX VCA -OPNIL OPPOP LBA) \\DEVICEEVENT (\\FILEDEVICES) ARRAYP (\\ARRAYP) COMPILER::META-EVAL-PROGV (:ARGUMENT) - \\TEDIT.APPLY.PAGEFORMATTING (TEDIT.PAGE.FRAMES) COMP.PROG1 (COMPILE.CONTEXT) EDITFROMFILE (FILELST -DWIMWAIT FILEPKGTYPES) OPT.XVARSCAN1 (FRA TOPFRAME) \\HARDCURSORPOSITION (\\CURSORDESTHEIGHT -\\CURSORDESTWIDTH \\CURSORHOTSPOTX BITSPERWORD \\CURSORHOTSPOTY \\MACHINETYPE \\DANDELION \\DAYBREAK -\\MAIKO \\EM.MOUSEX \\EM.MOUSEY \\EM.CURSORX \\EM.CURSORY) CL:RANDOM (*RANDOM-STATE*) EDITMV (L -LASTAIL) CL:PHASE (CL:PI) FULLPRESSBITMAP (PRESSBITMAPREGION |MicasPerPoint|) \\CLEARBM (WHITESHADE) -WRITE-UNICODE-INCLUDED (XCCS-SET-NAMES) CL:PARSE-NAMESTRING (:TYPE :DIRECTORY :PATH :SUBDIRECTORY -:RELATIVE :WILD :NEWEST) TEDIT.FORMATPAGE (:SEARCHING-FOR-EQUIVALENT-PAGE :NEW-PAGE-LAYOUT) -\\IDLE.EXIT? (PROMPTWINDOW IDLE.PROFILE \\GETPASSWORD.LOCK) RELEASE.MONITORLOCK (OLDVALUE -\\MP.PROCERROR) CL:PPRINT (*STANDARD-OUTPUT*) SI::MONITOR-UNWIND (SI::*LOCKED-MONITOR* \\MP.PROCERROR) - C.FLOATUNBOX (COMPILE.CONTEXT) \\SOFTCURSORUPCURRENT (\\EM.DISPINTERRUPT \\SOFTCURSORWIDTH -\\SOFTCURSORHEIGHT \\CURSORDESTWIDTH \\CURSORDESTHEIGHT \\CURSORDESTRASTERWIDTH \\VAL.HI -\\CURSORDESTLINEBASE \\CURRENTCURSOR \\SOFTCURSORUPBM \\SOFTCURSORDOWNBM \\SOFTCURSORBBT2 -\\SOFTCURSORBBT3 \\SOFTCURSORBBT4) FNCHECK (USERWORDS SPELLINGS2) EDIT4F (CLISPTRANFLG MAXLEVEL -LASTAIL) \\TEDIT.TEXTBIN.NEW.PAGE (|NoBits|) \\CCODEARGLIST (WORDSPERQUAD WORDSPERCELL :INTERLISP) -ERRORSTRING (\\ERRORMESSAGELIST) DBG::FIND-DEBUGGER-STACK-FRAME (LASTPOS) \\HANDLE.NS.ROUTING.INFO ( -\\XROUTINGINFO.OP.RESPONSE \\XIPOVLEN \\NS.ROUTING.TABLE \\ROUTING.TABLE.MASK -\\NS.ROUTING.TABLE.RADIUS \\NS.ROUTINGINFO.WORDS \\RT.INFINITY WORDSPERCELL \\RT.TIMEOUTINTERVAL) -CLOSESEQUIN (\\ETHERTIMEOUT \\SS.CLOSED \\SS.CLOSING) COMPILER::GENCODE-CALL (:RETURN :FUNCTION -COMPILER::*CURRENT-FRAME* COMPILER::*TAIL-RECURSION-THRESHOLD* :ARGUMENT :GLOBAL) \\CURSORDESTINATION -(\\CURRENTCURSOR \\MACHINETYPE \\DAYBREAK \\MAIKO \\DANDELION \\EM.MOUSEX \\EM.MOUSEY \\EM.CURSORX -\\EM.CURSORY \\VAL.HI) BITMAPCREATE (|\\MaxBitMapWidth| |\\MaxBitMapHeight| |\\MaxBitMapWords|) -\\GR.GETDEFFN (GLOBAL.RESOURCES) \\EP.PUT.AUX (\\FIXP) \\CCODEIVARSCAN (|\\AtomHI| BITSPERBYTE -IVARCODE) KILL.LINES (\\ENDBUFFER) \\MAKE.PROCESS1 (MYALINK \\STACKHI WORDSPERCELL \\#ALINK.OFFSET) -\\BLTSHADE.IP (PRINTSERVICE \\INTERPRESSSCALE) MSPATHS1 (SEEN MSBLIP MSDATABASELST LL) CL:READ-LINE ( -READ-LINE-RDTBL) CLISPDSUBST (BODY I.V. CLISPARRAY) PACK* (\\FATPNAMESTRINGP \\PNAME.HI \\PLIST.HI -\\PNAMELIMIT) \\PROCESS.MOVEFRAME (WORDSPERCELL \\STACKHI PROC.FREESPACESIZE \\STK.FSB WORDSPERQUAD) -MAKEINITBFS (\\NWORDS.DSKOBJ \\FIXEDLENDISKREQUEST \\DEFAULTDASTORAGELENGTH \\LENCB BITSPERWORD) -\\NSRANDOM.OPENFILE (|NoBits|) LISPERROR (\\ERRORMESSAGELIST) WRITE-UNICODE-MAPPING-FILENAME ( -UNICODEDIRECTORIES) TWODINSPECT.DOWINDOWCOMFN (|WindowMenu|) XCL::PROFILE-ENTRY-VALUE-NAME (XCL:*PROFILE* -) \\PRIMARYTEXTURE (REDTEXTURE BLUETEXTURE GREENTEXTURE) \\DUMP.COURIERPROGRAMS (\\COURIERPROGRAM -PRETTYCOMFONT DEFAULTFONT) CL:ROOM (\\LASTVMEMFILEPAGE) MINIMUMWINDOWSIZE (|MinWindowWidth|) -\\GENERIC.READCCODE (CR.EOLC CRLF.EOLC NSCHARSETSHIFT \\NORUNCODE LF.EOLC) \\TRANSLATE.3TO10 ( -\\EPT.3TO10 \\TRANS.OP.REQUEST \\MY.NSADDRESS BROADCASTNSHOSTNUMBER \\TRANS.DATALENGTH -\\10MBTYPE.3TO10) BRKDWNRESULTS1 (BRKDWNTOTLST) BRHL/LAYOUT/DAUGHTERS (NODELST) -COMPILER::EFFECTS-ANALYZE-LITERAL (:ANY :NONE) DBG::DEBUGGER-MENU-HELP (PROMPTWINDOW -*DEBUGGER-COMMAND-TABLE*) |\\VAMInit| (|\\VAMmonitor|) MACROEXPANSION (LAMBDASPLST) OPENPRSTREAM ( -DEFAULTPAGEREGION SPRUCEPAPERLEFTMICAS SPRUCEPAPERBOTTOMMICAS SPRUCEPAPERRIGHTMICAS \\NOIMAGEOPS -\\PRESSIMAGEOPS) CL:SHORT-SITE-NAME (XCL:*SHORT-SITE-NAME*) \\GETSTREAM (*STANDARD-INPUT* -\\DEFAULTLINEBUF \\KEYBOARD.STREAM \\LINEBUF.OFD *STANDARD-OUTPUT* \\TERM.OFD) -COMPILER:OPTIMIZE-AND-MACROEXPAND (COMPILER::*ENVIRONMENT* COMPILER::*CONTEXT*) \\SOFTCURSORDOWN ( -\\EM.DISPINTERRUPT \\SOFTCURSORBBT6) COMPILER::META-EVAL-PROGN (:EFFECT COMPILER::*LITERALLY-NIL*) -\\READCREFILL (\\LINEBUF.OFD READC.FT) COMP.VAR (COMPILE.CONTEXT ALLDECLS) -\\TEDIT.CLEAR.SCREEN.BELOW.LINE (WHITESHADE) OPT.XVARSCAN (CODE FRAMES TOPFRAME) \\RECLAIMCODEBLOCK ( -SI::*CLOSURE-CACHE* GCREF) CL:SOFTWARE-VERSION (MAKEINITDATES) SNAPW (|WBorder| :SNAP) -ONEDINSPECT.REDISPLAY (INSPECTPRINTLEVEL WHITESHADE) \\UNQUEUE.TIMER (\\TIMERQHEAD) COMPEM (COUTFILE) -BRHL/MOVE/RIGHT (MOTHERD NODELST) RECOMP? (CHANGES EXPRSLST) \\CLEARSYSBUF (\\PROCESSES) \\TEXTSETEOF -(BYTESPERPAGE) \\GETKEY (\\MISCSTATS \\FIXP) PFI.MERGE.INDICES (UPPERCASEARRAY) CL:VALUES (MYALINK -\\STACKHI \\#ALINK.OFFSET |\\AtomHI|) SEDIT::CREATE-GAP-NODE (SEDIT::TYPE-GAP) \\RECLAIMARRAYBLOCK ( -|\\ArrayBlockHeaderWords| |\\FirstArraySegment| |\\ArrayBlockPassword| \\MP.BADARRAYRECLAIM -PTRBLOCK.GCT |\\ArrayBlockTrailerCells| WORDSPERCELL CODEBLOCK.GCT) CREATEHASHFILE ( -HASHFILEDEFAULTSIZE HFGROWTHFACTOR HASH.KEY.SIZE) COMP.CONST (COMPILE.CONTEXT) \\SIMULATE.UNBIND ( -\\STACKHI WORDSPERCELL MYALINK) OPT.SCANOPT (CODE CONSTFNS VCONDITIONALS CONDITIONALS CONST.FNS OPPOP -FRAMES PRA OPCOPY) \\TTYBACKGROUND (\\LINEBUF.OFD \\KEYBOARD.STREAM TTYBACKGROUNDFNS) -COMPILER::EFFECTS-ANALYZE-LAMBDA (:NONE) |\\VFMInit| (|\\VFMmonitor|) CL:VALUES-LIST (MYALINK -\\STACKHI \\#ALINK.OFFSET |\\AtomHI|) PRINTFILEPROP (PRINTFILETYPES) \\GETSYSBUF (\\SYSBUFFER.LAST -\\SYSBUFFER.FIRST) \\PFI.DO.HARDCOPY (\\PFI.PROCESSLOCK) \\CAR.UFN (CDRCODING \\CDR.INDIRECT -CAR/CDRERR) \\DO.PARAMS.AT.OPEN (CR.EOLC LF.EOLC CRLF.EOLC STREAM-AFTER-OPEN-FNS) \\WRITEPRESSBITMAP ( -|ShowDotsCode|) WAIT.FOR.TTY (\\TTY.PROCESS.EVENT) SPYOBJ.DISPLAY (SPY.FONT) \\DRAWCURVE.PRESS ( -|ScansPerMica|) \\PROCESS.EVENTFN (\\PROCESSES \\PROCESS.AFTEREXIT.EVENT) XIPAPPEND.CELL (BYTESPERWORD - \\XIPOVLEN BYTESPERCELL \\MAX.XIPDATALENGTH) SEDIT:*INDENT-ALIST* (:VERTICAL :KEYWORD-ARG :HORIZONTAL - :HORIZONTAL-ATOM :SQUASH :DATA :BINDING :BINDING-LIST :COND-CLAUSE :LAMBDA-LIST) \\PROC.CODEFORTFRAME - (\\MP.TOPUNWOUND) DBG::NEAR-BY-REGION (\\CURSORDESTWIDTH \\CURSORDESTHEIGHT) \\WAIT.FOR.TTY ( -\\TTY.PROCESS.EVENT) CL:STRING-LEFT-TRIM (SLEN) \\SPP.INFO.HOOK (SPPCON) CONVHANKAKU (:HTOZP) -\\PUTBASEBITS (BITSPERWORD) SEDIT::CREATE-ENVIRONMENTS (SEDIT::COMMAND-TABLE-SPEC DEFAULTFONT -ITALICFONT CLISPFONT COMMENTFONT) NTYPX (|\\MDSTypeTable| \\TT.TYPEMASK) \\TEDITPAGEMENU.CREATE ( -TEDIT.PAGEMENU.SPEC TEDIT.MENUDIVIDER.SPEC TEDIT.CHARLOOKSMENU.SPEC) CHARSET (NSCHARSETSHIFT -\\MAXCHARSET) COMP.USERFN (CL:LAMBDA-LIST-KEYWORDS TOPFN ALLVARS COMPILEUSERFN) PRINTROUTINGTABLE ( -\\NS.ROUTING.TABLE \\PUP.ROUTING.TABLE \\ROUTING.TABLE.TYPENUM :CULPRIT :EXPECTED-TYPE -\\ROUTING.TABLE.MASK WORDSPERCELL *NSADDRESS-FORMAT* :DECIMAL :HOPS) MSSEEKTYPE (MSWORDS SPELLING) -CL:STRING-NOT-GREATERP (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 OFFSET1 SLEN2) CL:STRING-GREATERP (BASE1 -TYPENUMBER1 BASE2 TYPENUMBER2 SLEN2 SLEN1 OFFSET1) \\NSFILING.GETFILEINFO ( -\\NSFILING.ALL.ATTRIBUTE.TYPES \\LISP.TO.NSFILING.ATTRIBUTES |AppendBit| |WriteBit| -\\NSFILING.USEFUL.ATTRIBUTE.TYPES) CL::VALUES-LIST-UFN (MYALINK \\STACKHI \\#ALINK.OFFSET |\\AtomHI|) -OLDFAULT1 (:NAME :ARGUMENTS) \\SYSBUFP (\\LONGSYSBUF \\SYSBUFFER) CL:STRING-NOT-LESSP (BASE1 -TYPENUMBER1 BASE2 TYPENUMBER2 SLEN2 OFFSET1) CL:STRING-DOWNCASE (SLEN) \\CDR.UFN (CDRCODING \\CDR.NIL -\\CDR.ONPAGE \\CDR.INDIRECT CAR/CDRERR) \\ENQUEUE.TIMER (\\TIMERQHEAD \\PROCTIMER.SCRATCH) -SEDIT::STRINGWIDTH (*READTABLE* %FAT-CHAR-TYPENUMBER) CL:STRING-LESSP (BASE1 TYPENUMBER1 BASE2 -TYPENUMBER2 SLEN1 SLEN2 OFFSET1) OPEN (:INPUT :DEFAULT :FILE-STREAM-P) MAKEFILES (FILEPKGTYPES FILELST -) \\KEYBOARDINIT (\\SYSBUFFER.LAST \\SYSBUFFER.FIRST \\SYSBUFSIZE \\MISCSTATS \\KEYBOARDEVENT.LAST -\\KEYBOARDEVENT.SIZE \\KEYBOARDEVENT.FIRST ALLUP \\DLMOUSE.UP \\EM.KBDAD0 \\EM.KBDAD1 \\EM.KBDAD2 -\\EM.KBDAD3 \\EM.UTILIN \\EM.KBDAD4 \\EM.KBDAD5 \\MOUSECHORDMILLISECONDS) \\COURIER.PUTDEF ( -\\COURIERPROGRAM DFNFLG) CL:STRING-NOT-EQUAL (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 SLEN1 SLEN2 OFFSET1) - TRACKW (CROSSHAIRS LASTMOUSEBUTTONS LOCKEDSPOT LASTMOUSEX LASTMOUSEY) \\MEDW.SHRINKW (DEFAULTICONFN) -CL::SET-PARSED-STRUCTURE (CL::*PARSED-DEFSTRUCTS*) BRKDWNFORM (BRKDWNTYPES) MOUSECHORDWAIT (MAX.SMALLP - \\RCLKMILLISECOND) CL:STRING-UPCASE (SLEN) C.FLOATBOX (COMPILE.CONTEXT) \\ALLOCLOCKED (CELLSPERPAGE) -\\PEEKSYSBUF (\\SYSBUFFER) COMPILER::META-EVAL-MV-CALL (:ARGUMENT) CL::VALUES-UFN (MYALINK \\STACKHI -\\#ALINK.OFFSET |\\AtomHI|) FIND.START.OF.WORD (\\ENDBUFFER \\MAXTHINCHAR \\PRIMTERMSA WORDSEPR.TC -\\RDTBLSA STOPATOMBIT) MSSEEK-WORD (SPELLING) SEDIT::BUILD-WINDOW (:CREATE DEFAULTFONT SEDIT::EDITOR-NAME -) SETFILEINFO (CR.EOLC CRLF.EOLC LF.EOLC \\MAXFILEPTR) DBG::DEBUGGER-BUTTON-EVENT ( -*DEBUGGER-MENU-ITEMS* LASTMOUSEBUTTONS) XIPAPPEND.STRING (\\XIPOVLEN BYTESPERWORD \\MAX.XIPDATALENGTH) - BLOCKCOMPILE1 (FREEVARS COUTFILE) \\SMASHMENUIMAGEONRESET (RESETSTATE) CL:STRING/= (BASE1 TYPENUMBER1 - BASE2 TYPENUMBER2 SLEN1 SLEN2 OFFSET1) \\TURN.ON.PROCESSES (\\PROCESSES RESETVARSLST) -\\SETGLOBALVAL.UFN (\\PNPSPACE \\NEWATOM-VALOFFSET) WRITE-UNICODE-MAPPING (XCCS-SET-NAMES) -XCL::PROFILE-ENTRY-VALUE (XCL:*PROFILE*) \\UNWIND.UFN (MYALINK \\STACKHI WORDSPERCELL) \\UNKNOWN.UFN ( -\\MP.UNKNOWN.UFN) CL:STRING>= (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 SLEN2 OFFSET1) \\RESHOWBORDER1 ( -\\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS) \\ROUTINGTABLE.INFOHOOK (:PROTOCOL -:WINDOW \\NS.ROUTING.TABLE \\PUP.ROUTING.TABLE \\ROUTING.TABLE.TYPENUM :CULPRIT :EXPECTED-TYPE -\\ROUTING.TABLE.MASK WORDSPERCELL :NAME) BRKDWNCOMPILE2 (LOCALVARS SYSLOCALVARS) BRHL/LAYOUT ( -PERSONALD MOTHERD) PACKFILENAME (\\FILENAME.SYNTAX) CL:STRING< (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 -SLEN1 SLEN2 OFFSET1) \\NSRANDOM.CLOSEFILE (|AppendBit| |WriteBit|) KEYACTIONTABLE (PTRBLOCK.GCT -\\NKEYS \\MAXTHINCHAR \\ORIGKEYACTIONS KEYBOARD.APPLICATION-SPECIFIC-KEYACTIONS) BRECOMPILE1 (CFILE -COUTFILE LCFIL FILEMAPLST) DEFAULT.INSPECTW.VALUECOMMANDFN (PROMPTWINDOW LASTMOUSEBUTTONS) CL:STRING<= - (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 OFFSET1 SLEN2) \\TEXTOPENF-SUBTREE (|NoBits| STREAM) -CLISPFORVARS1 (LEFT.ARROW.BITTABLE) \\ASSIGNDATATYPE1 (|\\DTDSpaceBase| |\\MaxSysTypeNum| -|\\EndTypeNumber| |\\DTDSize| WORDSPERPAGE \\TT.TYPEMASK GCREF) \\INSPECT/CODE/REPAINTFN ( -INSPECTPRINTLEVEL) FB.ALPHABETIC.ATTR (UPPERCASEARRAY) \\FINDKEY.UFN (MYALINK \\STACKHI WORDSPERCELL) -CLRPROMPT (PROMPTWINDOW) TEDIT.SCAN.LINE (|LMInvisibleRun| |LMLooksChange|) KEYACTION ( -\\CURRENTKEYACTION \\NKEYS) \\COURIER.GETDEF (\\COURIERPROGRAM) \\CREATECELL (CDRCODING \\LISTP) -TTYIN.LASTINPUT (TTYINBUFFER) MENU (LASTMOUSEBUTTONS) TEDIT.CREATEW (PROMPTWINDOW -TEDIT.PROMPTWINDOW.HEIGHT TEDIT.PROMPT.FONT) BRHC/OFFSET (NODELST) \\SAVESYSBUF (\\SAVEDSYSBUFFER) -\\HARDRETURN (|\\HardReturnFXP|) \\NSFILING.SETFILEINFO (PROMPTWINDOW) \\HANDLE.RAW.3TO10 (\\EPT.3TO10 - \\TRANS.OP.REQUEST \\10MBENCAPSULATION.WORDS \\TRANS.DATALENGTH \\MY.NSADDRESS \\TRANS.OP.RESPONSE -\\10MBTYPE.3TO10 XIPIGNORETYPES XIPTRACEFILE) BRKDWN1 (BRKDWNLST) ADD/AND/DISPLAY/LINK (PROMPTWINDOW) -PAINTW.SHADE.LABEL (MENUFONT) OPT.POSTOPT (TOPFRAME) \\CLEAR.ROUTING.TABLE (\\ROUTING.TABLE.TYPENUM -\\ROUTING.TABLE.MASK WORDSPERCELL) CL:TERPRI (*STANDARD-OUTPUT*) \\SPP.HANDLE.INPUT (\\XIPT.SPP -\\XIPT.ERROR \\XIPE.NOSOCKET \\XIPOVLEN \\SPPHEAD.LENGTH \\SPP.RETRANSMITQ.SIZE SPP.MIN.TIMEOUT -SPP.USER.TIMEOUT) COMPILEFILES0 (NOTCOMPILEDFILES FILELST) \\RPLACD.UFN (CDRCODING GCREF -\\CDR.INDIRECT \\CDR.MAXINDIRECT \\CDR.NIL \\CDR.ONPAGE) \\RPLPTR.UFN (GCREF) \\KEYBOARDEVENTFN ( -\\MACHINETYPE |\\InterfacePage| \\COMMANDKEYACTION \\DEFAULTKEYACTION \\ORIGKEYACTIONS) TTRACKMOUSE ( -LASTMOUSEBUTTONS \\DSP \\TTPAGELENGTH \\LOC.ROW.0 \\BMARG \\CHARHEIGHT \\LMARG \\RMARG \\FONT) -\\MISCN.UFN (MYALINK \\STACKHI) TTSETCURSOR (\\TTPAGELENGTH \\CHARHEIGHT \\BMARG \\DSP) XIPAPPEND.WORD - (BYTESPERWORD \\XIPOVLEN \\MAX.XIPDATALENGTH) CL:STRING> (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 SLEN2 -SLEN1 OFFSET1) \\RPLCONS (CDRCODING \\CDR.MAXINDIRECT GCREF \\LISTPDTD \\CDR.ONPAGE) BITBLT.INSERT ( -\\DSP \\RMARG \\CHARHEIGHT) \\PROC.AFTER.WINDOWWORLD (|\\TopLevelTtyWindow|) %GET-TYPE-TABLE-ENTRY ( -%ARRAY-TYPE-TABLE) OPT.SETUPOPT (CODE PRA) MB.MARGINBAR.TABTRACK (LASTMOUSEBUTTONS) \\NSYSBUFCHARS ( -\\LONGSYSBUF \\SYSBUFFER \\SYSBUFSIZE) CL:WRITE-LINE (*STANDARD-OUTPUT*) PPROC ( -\\HIGHEST.PRIORITY.QUEUE \\TIMERQHEAD \\PROCESSES) \\PROCESS.MAKEFRAME0 (\\STACKHI \\STK.FSB \\DEF.HI -\\MP.PROCNOFRAME) \\CHECKAPPLY* (\\DEF.HI) SEDIT::UNDO-ATOM-CHANGE (SEDIT::TYPE-STRING) CL:UNREAD-CHAR - (*STANDARD-INPUT* \\NORUNCODE) TWOD.TRACKCURSOR (LASTMOUSEBUTTONS) FB.EXPUNGE?.MENU ( -FB.CLOSE.MENU.ITEMS FB.BROWSERFONT) \\RPLACA.UFN (CDRCODING GCREF \\CDR.INDIRECT) \\MEDW.MOVEW ( -LAMBDASPLST \\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS) COMPILER::EFFECTS-ANALYZE-GO - (:NONE) \\CONS.UFN (CDRCODING \\LISTP GCREF \\LISTPDTD \\CDR.ONPAGE) \\DRAWCURVE.PRESS.LINE ( -SPRUCEPAPERLEFTMICAS SPRUCEPAPERRIGHTMICAS SPRUCEPAPERBOTTOMMICAS SPRUCEPAPERTOPMICAS) -CONDITIONS:INVOKE-DEBUGGER (:CONDITION) GETINTERRUPT (\\CURRENTKEYACTION \\SYSTEMINTERRUPTS) -GETWINDOWPROP (VALUE) CL:USER-HOMEDIR-PATHNAME (:DSK LOGINHOST/DIR *DEFAULT-PATHNAME-DEFAULTS*) -CH.DELETE.ALIAS (\\CH.BROADCAST.SOCKET) \\RESTLIST.UFN (MYALINK \\STACKHI WORDSPERCELL) -CL:WRITE-TO-STRING (*PRINT-ESCAPE* *PRINT-RADIX* *PRINT-BASE* *PRINT-CIRCLE* *PRINT-PRETTY* -*PRINT-LEVEL* *PRINT-LENGTH* *PRINT-CASE* *PRINT-ARRAY* *PRINT-GENSYM*) \\TYPEGLOBALVARIABLE ( -\\BUILT-IN-SYSTEM-TYPES GLOBALVARS) \\RESETKEYBOARD (\\MACHINETYPE \\DANDELION \\DAYBREAK \\MAIKO -\\EM.UTILIN ALLUP \\LASTKEYSTATE \\EM.KBDAD0 \\EM.KBDAD1 \\EM.KBDAD2 \\EM.KBDAD3 \\EM.KBDAD4 -\\EM.KBDAD5 \\EM.REALUTILIN \\DLMOUSE.UP \\LASTUSERACTION) CL::ESTABLISH-PREDICATE ( -CL::*DEFSTRUCT-INFO-CACHE* :ONLY) \\UNBOXFLOAT3 (MYALINK \\STACKHI \\STACKSPACE WORDSPERCELL) -\\TEDIT.ADJUST.LINES (WHITESHADE) MSWORD? (MSWORDS) INTCHAR (\\SYSTEMINTERRUPTS) -WRITE-UNICODE-MAPPING-HEADER (UNICODE-MAPPING-HEADER) \\SPP.NOT.RESPONDING (SPP.MAX.FAILED.PROBES -SPP.INACTIVITY.TIMEOUT SPP.USER.TIMEOUT PROMPTWINDOW) FB.GREATEST.PREFIX (UPPERCASEARRAY) -MULTIFILEINDEX1 (:CONSECUTIVE :FIRSTPAGE :PART :DONTPRINT EMPRESS#SIDES) \\HTFIND (|\\MDSTypeTable| -\\HTMAIN \\ADDREFCASE \\DELREFCASE \\SCANREFCASE \\MAXHTCNT \\MP.DELREF0 \\UNSCANREFCASE -\\HTCOLLTHRESHOLD \\HTCOLLMAX) CONDITIONS:INVOKE-RESTART (:NAME) INSPECT.FLIPSELECTION (GRAYSHADE) -\\MEDW.CLOSEW (\\CURSORDESTINATION \\EM.DISPINTERRUPT \\SCREENBITMAPS) CONDITIONS:INVOKE-RESTART-INTERACTIVELY - (:NAME) %LIT-SIZE-TO-SIZE (%LIT-ARRAY-SIZES) DBG::SET-UP-DEBUGGER-WINDOW (BRKPOS LASTPOS) COMP.UNBOX -(CODE) |ExtensionForPrintFileType| (PRINTFILETYPES) CONDITIONS:COMPUTE-RESTARTS (*PROCEED-CASES*) -SEDIT:GET-FORMAT (SEDIT::*FSPEC-TABLE*) \\UPDATE.PBT.RASTERWIDTHS (|\\MDSIncrement| \\VP.DISPLAY -SCREENWIDTH) PPROCREPAINTFN (LASTMOUSEBUTTONS) UNMAKEHARDCOPYMODESTREAM (\\DISPLAYIMAGEOPS) -SEDIT::TRANSLATE-CHARS (*READTABLE* %FAT-CHAR-TYPENUMBER) \\DRAWLINE.UFN (BITMASKARRAY WORDMASK) -\\PROCESS.MAKEFRAME (\\MP.PROCERROR |\\MiscFXP| \\PSTAT.RUNNING) PPROCEXTENT (\\PROCESSES) -\\TYPECHECK.UFN (|\\DTDSpaceBase|) \\COURIER.DELDEF (\\COURIERPROGRAM) COMPILER::META-EVAL-LAMBDA ( -:RETURN) COMP.UNBIND.VARS (COMPILE.CONTEXT CODE FRAME BCINFO) \\SHOWTEXT (WHITESHADE WAITINGCURSOR -TEDIT.DEFAULT.FMTSPEC) MSSPLST (MSWORDS) \\MAIKO.CONSOLE-LOG-PRINT (PROMPTWINDOW) -\\NSRANDOM.WRITEPAGES (BYTESPERPAGE) \\GETBRUSHFONT.PRESS (|\\VecFontDir| |PointsPerMica|) -COMP.UBFLOAT2 (COMPILE.CONTEXT) \\STKSCAN (MYALINK \\STACKHI WORDSPERCELL \\#ALINK.OFFSET \\LITATOM -\\NEW-ATOM \\PNPSPACE \\NEWATOM-VALOFFSET BITSPERBYTE IVARCODE PVARCODE FVARCODE) \\TYPEMASK.UFN ( -|\\MDSTypeTable|) \\MAIKO.IO-INTERRUPT (\\MAIKO.IO-INTERRUPT-VECTOR \\MAIKO.IO-INTERRUPT-FLAGS) -DELFROMCOM (COMSNAME) SETINTERRUPT (\\CURRENTKEYACTION \\SYSTEMINTERRUPTS) PPROC1 (\\PSTAT.RUNNING) -\\ARG0 (MYALINK \\STACKHI WORDSPERCELL \\STACKSPACE) \\NSRANDOM.READPAGES (BYTESPERPAGE WORDSPERPAGE -*NSFILING-PAGE-CACHE-INCREMENT* |AppendBit| |WriteBit|) \\PRESSCURVE2 (|ResetSpaceCode| |MicasPerScan| - UBFLOAT3) \\KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS (\\SUN.TYPE3KEYBOARD |\\InterfacePage| -\\MAIKOKEYACTIONS \\SUN.TYPE4KEYBOARD \\MAIKOKEYACTIONST4 \\SUN.JLEKEYBOARD \\MAIKO-JLE-KEYACTIONS -\\TOSHIBA.JIS \\TOSHIBA-KEYACTIONS) \\MAIKO.ETHER-INTERRUPT (\\MAIKO.10MB.NDB |\\ETHERtopMonitor| -\\ES.PENDING \\10MBTYPE.TRANSLATIONS) DELFROMCOM1 (COMSNAME) CLISPFOR1 (FIRSTI.V. DUMMYVARS -I.S.OPRSLST) CL::GET-PS-FROM-ACCESSOR (CL::*PARSED-DEFSTRUCTS*) FONTNAME.IP ( -INTERPRESSPRINTWHEELFAMILIES INTERPRESSFAMILYALIASES CHARACTERCODEVERSION) \\MYARGCOUNT (MYALINK -\\STACKHI WORDSPERCELL) \\KEYACTION1 (IGNORE.TF LOCKSHIFT.TF NOLOCKSHIFT.TF EVENT.TF CTRLDOWN.TF -CTRLUP.TF DEADKEY.TF \\NKEYS 1SHIFTDOWN.TF 1SHIFTUP.TF 2SHIFTDOWN.TF 2SHIFTUP.TF LOCKDOWN.TF LOCKUP.TF - LOCKTOGGLE.TF METADOWN.TF METAUP.TF FONTUP.TF FONTDOWN.TF FONTTOGGLE.TF USERMODE1UP.TF -USERMODE1DOWN.TF USERMODE1TOGGLE.TF USERMODE2UP.TF USERMODE2DOWN.TF USERMODE2TOGGLE.TF USERMODE3UP.TF -USERMODE3DOWN.TF USERMODE3TOGGLE.TF ALTGRUP.TF ALTGRDOWN.TF ALTGRTOGGLE.TF) CLEANUP (CLEANUPOPTIONS -NOTLISTEDFILES NOTCOMPILEDFILES) \\ENVCALL.UFN (|\\MiscFXP|) COMPILER::META-EVAL-IF (:ARGUMENT) -COMP.BIND.VARS (CODE OPNIL MAXBVALS EXP FRAME FRA) \\AGE.ROUTING.TABLE (\\ROUTING.TABLE.TYPENUM -:CULPRIT :EXPECTED-TYPE \\ROUTING.TABLE.MASK \\RT.TIMEOUTINTERVAL WORDSPERCELL) BRKDWNSETUP ( -BRKDWNARGS BRKDWNLABELS) SPYOBJ.HEIGHT (SPY.MAXLINES) XIPAPPEND.BYTE (\\XIPOVLEN \\MAX.XIPDATALENGTH) -\\INVERTITEM (BLACKSHADE) PFI.ENQUEUE (\\PFI.PROCESSLOCK) SEDIT:RESET-FORMATS (SEDIT::*FSPEC-TABLE*) -CL::SUBTYPEP-TYPE-EXPAND (CL::*COMMON-LISP-BASE-TYPES*) CONTROL-T (PROMPTWINDOW \\CONTROL-T.DEPTH -\\MISCSTATS) |\\PFInitializeVols| (|\\PhysVolumePage|) \\STORE.N.UFN (\\STACKSPACE MYALINK \\STACKHI -WORDSPERCELL) PRETTYFILEINDEX (*STANDARD-OUTPUT* *STANDARD-INPUT* EMPRESS#SIDES *PFI-TYPES* -*PFI-MAX-WASTED-LINES* :COMMON *COMMON-LISP-READ-ENVIRONMENT* :DONTPRINT :NONE :FIRSTPAGE :PART) -\\SPP.RETRANSMIT.NEXT (\\SPP.RETRANSMITQ.SIZE) FB.MERGE.DIRECTORIES (\\FILENAME.SYNTAX) BITBLT.DELETE -(\\RMARG \\DSP \\CHARHEIGHT) IDLE.SHOW.OPTIONS (PROMPTWINDOW IDLE.PROFILE) FIND.PROCESS ( -\\PROCESS.NAME.TABLE) INTERRUPT (:CONDITION :FUNCTION) PROCESS.STATUS.WINDOW (\\PROCESSES SCREENHEIGHT - SELECTIONSHADE MAX.SMALLP) \\MEDW.OPENW (\\CURSORDESTINATION \\EM.DISPINTERRUPT \\SCREENBITMAPS) -\\MAP.ROUTING.TABLE (\\ROUTING.TABLE.TYPENUM :CULPRIT :EXPECTED-TYPE \\ROUTING.TABLE.MASK WORDSPERCELL -) \\SETPRINTLEVEL (\\TERM.OFD) ADDMENU (LASTMOUSEX LASTMOUSEY LASTSCREEN) RETRYSCAN (FILE -*FILEMAP-HASH*) EDIT4E1 (EDITQUIETFLG) SPAWN.MOUSE (PROCESS.MAXMOUSE MAX.SMALLP) SHADEITEM (WHITESHADE - MENUSUBITEMMARK) \\READPRINTERPORT.UFN (\\MACHINETYPE \\DANDELION) COMPILEUSERFN1 (COREFLG FN -NOSPELLFLG ARGS OTHERVARS DEF) XCL::%DEFINE-TYPE-DELDEF (*DEFINITION-HASH-TABLE*) ERROR! (MYALINK -\\STACKHI \\#ALINK.OFFSET WORDSPERCELL \\PROC.RESETME) TTNEXTPOS (\\ENDBUFFER) -\\TEDIT.CREATEW.FROM.REGION (TEDIT.PROMPTWINDOW.HEIGHT TEDIT.PROMPT.FONT) XCL::%DEFINE-TYPE-GETDEF ( -*DEFINITION-HASH-TABLE*) \\SETRECLAIMMIN (\\TERM.OFD) CHECK/MENU/IMAGE (LASTSCREEN) PRESSBITMAP ( -PRESSBITMAPREGION |MicasPerPoint|) \\RETURN (MYALINK \\STACKHI \\#ALINK.OFFSET) AWAIT.EVENT (MAX.FIXP) - HEIGHTIFWINDOW (|WBorder|) CL::PRINT-STRUCTURE-INSTANCE (CL::%DEFAULT-PRINT-FUNCTION) \\COPY.N.UFN ( -\\STACKSPACE MYALINK \\STACKHI WORDSPERCELL) MONITOR.AWAIT.EVENT (MAX.FIXP) WIDTHIFWINDOW (|WBorder|) -\\TFBRAVO.READ.USER.CM (USER.CM.RDTBL) CL:TYPE-OF (|\\DTDSpaceBase|) PACKFILENAME.STRING ( -\\FILENAME.SYNTAX) RESETKEYACTION (\\DEFAULTKEYACTION) CL::BASE-SUBTYPEP (CL::*COMMON-LISP-BASE-TYPES* - CL::*BASE-TYPE-LATTICE*) CL::%SIMPLE-NSUBST (CL::TREE-FORM) \\SELECTPROCESS (\\PROCESSES -INTERRUPTMENUFONT) \\PROCESS.GO.TO.SLEEP (\\PSTAT.WAITING \\MP.PROCERROR \\HIGHEST.PRIORITY.QUEUE -\\MP.STACKRELEASED MYALINK) PRINCOPY (VPRINTLEVEL) XCL::%DEFINE-TYPE-FILE-DEFINITIONS (:NAME :TYPE) -\\KEYNAMETONUMBER (\\KEYNAMES) SEDIT::SPLIT-LITATOM (SEDIT::TYPE-STRING) CURRENTINTERRUPTS ( -\\CURRENTKEYACTION) DBG::CREATE-DEBUGGER-WINDOW (\\TERM.OFD BREAKREGIONSPEC DEFAULTTTYREGION) -\\GCRECLAIMCELL (\\LISTP CDRCODING \\CDR.INDIRECT GCREF \\CDR.MAXINDIRECT \\FINALIZATION.FUNCTIONS -|\\DTDSpaceBase|) CL::%NSUBST-IF (CL::TREE-FORM) PFI.NEW.LISTFILES1 (:PATHNAME) \\HCPYMODEDSPPRINTCHAR - (\\MAXTHINCHAR \\PRIMTERMSA INDICATE.CCE SIMULATE.CCE REAL.CCE ERASECHARCODE IGNORE.CCE) -CL::%COMPLEX-NSUBST (CL::TREE-FORM) INSPECT/TOP/LEVEL/LIST (MAXINSPECTCDRLEVEL PROMPTWINDOW) -RESET.INTERRUPTS (\\SYSTEMINTERRUPTS) \\SPP.PROBE (\\SPPHEAD.CC.ACKNOWLEDGE) FB.MAKE.BROWSER.BUSY ( -FB.ITEMSELECTEDSHADE) GETFILEINFO (|NoBits| CR.EOLC LF.EOLC CRLF.EOLC) DO.LF (\\DSP) -BRACKET.CURRENT.WORD (\\MAXTHINCHAR \\PRIMTERMSA WORDSEPR.TC \\RDTBLSA STOPATOMBIT) %LIT-TYPE-TO-TYPE -(%LIT-ARRAY-TYPES) SI::INTERNAL-THROW (:TAG) CL::GET-PS-FROM-PREDICATE (CL::*PARSED-DEFSTRUCTS*) -CL:WRITE-STRING (*STANDARD-OUTPUT*) \\WRITEPRINTERPORT.UFN (\\MACHINETYPE \\DANDELION) CHARCODEP ( -\\MAXNSCHAR) \\PSWOP.SELECTED (PROCMENU LAMBDASPLST PROCESS.STATUS.WINDOW) DEFINEFONT.IP (MAKEVEC -FINDFONT MICASPERPOINT MODIFYFONT) GRAPHOBJ.FINDGRAPH (BLACKSHADE LASTMOUSEX LASTMOUSEY -LASTMOUSEBUTTONS) \\PRINDATUM (\\LITATOM \\NEW-ATOM \\LISTP \\SMALLP \\FIXP *PRINT-BASE* *READTABLE* -\\FLOATP \\FLOATFORMAT \\STACKP) \\PSW.SELECTED (WHITESHADE SELECTIONSHADE) BRKDWNFBOXES (BDLST) -CL::%NSUBST-IF-NOT (CL::TREE-FORM) COMP.FLOATUNBOX (CODE) SHOWSTACKBLOCK1 (.I7) WHATIS (FILELST) -GETDESCRIPTORS (|\\DTDSpaceBase|) HEADINGOP.IP (MAKESIMPLECO { HEADINGFONTNUMBER MICASPERINCH }) -SEDIT::SET-SELECTION-STRING (SEDIT::BUTTON-STRING) HASTTYWINDOWP (\\DEFAULTTTYDISPLAYSTREAM) -COMPILEUSERFN (LAMBDASPLST) TWODINSPECT.MAKEREGIONS (INSPECTPRINTLEVEL) \\AB.BACK (|\\ArrayFrLst| -|\\FirstArraySegment| |\\ArrayBlockPassword|) \\GCSCAN2 (\\HTSTKBIT \\HTMAIN) IDLE.BITMAP (DEFAULTFONT -) INSPECT.INVERTREGION (BLACKSHADE) \\TFBRAVO.INIT.PARALOOKS (TEDIT.DEFAULT.FMTSPEC -|HardwareRightMargin| |HardwareLeftMargin| |DefaultRightMargin|) \\PUTBASEBYTE (BITSPERBYTE -BYTESPERWORD) SPYOBJ.GET (FILERDTBL SPYOBJ.IMAGEFNS) \\CLOSEF.PRESS (BITSPERWORD USERNAME) \\RETCALL ( -|\\MiscFXP|) \\CLEARXIPHEADER (\\XIPOVLEN) PRINTFILETYPE (PRINTFILETYPES) PFI.PASS.COMMENT ( -COMMENTFONT *STANDARD-INPUT* *STANDARD-OUTPUT* DEFAULTFONT) TRACE (XCL::*TRACED-FNS*) -\\HDCPYDISPLAYINIT (\\DISPLAYIMAGEOPS) BMOBJ.GETFN5 (FILERDTBL) TTYIN.READ?=ARGS (|null| \\?TAIL -\\BUFFER) \\ADDBASE (\\FIXP \\SMALLP \\FLOATP MAX.SMALL.INTEGER MAX.POS.HINUM) PRINT-CIRCLE-LOOKUP ( -*PRINT-CIRCLE-HASHTABLE*) EDITFINDP (MAXLEVEL) COMPILER::META-EVAL-CATCH (:ARGUMENT) -\\PRINT-USING-ADDRESS (*READTABLE*) COMP.LOOKFORDECLARE (COMMENTFLG) \\ATOMCELL (\\LITATOM \\NEW-ATOM -\\DEF.HI \\VAL.HI \\PLIST.HI \\PNAME.HI \\NEWATOM-DEFOFFSET \\NEWATOM-VALOFFSET \\NEWATOM-PLISTOFFSET -\\NEWATOM-PNAMEOFFSET \\OLDATOMSPACE) GRAPHEROBJ (GRAPHERIMAGEFNS) FB.COMPILECOMMAND ( -*DEFAULT-CLEANUP-COMPILER*) TWODINSPECT.ARRANGEWINDOWS (MAX.SMALLP) SEDIT::SUBNODE-CHANGED-LIST ( -SEDIT::TYPE-DOTLIST) CL::%EQCODEP (\\DEF.HI) POSTSCRIPT.GETFONTID (GOLDEN.RATIO) -TWODINSPECT.ADJUSTSELECTION (INSPECTPRINTLEVEL) \\NSRANDOM.SETEOFPTR (BYTESPERPAGE |WriteBit| -|AppendBit|) \\GCSCAN1 (\\HTMAIN) RECORDTRAN (PATGENSYMVARS EXPR FAULTFN RECORDWORDS CLISPRECORDWORDS -LAMBDASPLST) UNTRACE (XCL::*TRACED-FNS* :IN) SHOWSTACKBLOCKS (|\\InterfacePage| \\STACKHI \\STK.FSB -\\STK.FSB.WORD \\STK.GUARD \\STK.FX WORDSPERCELL \\STK.NOTFLAG \\STK.BF .I7) ADDTOCOM (COMSNAME -MACROPROPS) SEDIT::SET-SELECTION-LITATOM (SEDIT::BUTTON-STRING) \\SLOWIPLUS2 (\\FIXP \\SMALLP \\FLOATP - MAX.POS.HINUM MAX.SMALL.INTEGER) \\POP.N.UFN (MYALINK \\STACKHI \\STACKSPACE) TTSKIPSEPR (\\ENDBUFFER -) FB.FINISH.COMMAND (FB.ITEMUNSELECTEDSHADE) SEDIT::COMPILE-STRUCTURE (PROMPTWINDOW SEDIT:*COMPILE-FN* -) COMPILER::META-EVAL-CALL (:ARGUMENT :EFFECT :NONE :STMTS :VALUE :FORM :FN :ARGS) -COMP.TOPLEVEL.COMPILE (LOCALVARS SPECVARS *BC-MACRO-ENVIRONMENT* :PARENT OPCODEPROP LAPFLG LSTFIL -BYTEASSEMFN TOPFN) INVERT.SEGMENT (\\ARROW \\TTPAGELENGTH \\LOC.ROW.0 \\CHARHEIGHT \\BMARG \\DESCENT -BLACKSHADE DOTSHADE \\DSP) MSCOMMAND (LASTPARSED) SEDIT::CREATE-NULL-LIST (SEDIT::TYPE-LIST) COMP.BOX -(CODE) SPYOBJ.IMAGEBOX (SPY.FONT) READATABASE (MSDATABASELST MSCHANGEDARRAY) \\FILLINXIP (\\EPT.XIP -\\XIPOVLEN \\MY.NSADDRESS) TTYINFOSTREAM (\\DEFAULTTTYDISPLAYSTREAM PROMPTWINDOW) \\SLOWIQUOTIENT ( -\\FIXP \\SMALLP \\FLOATP MAX.POS.HINUM MAX.SMALL.INTEGER \\SIGNBIT \\OVERFLOW) \\10MB.GETPACKETSTATUS -(\\MACHINETYPE \\DANDELION \\ES.PENDING \\ES.PACKET.TOO.LONG \\DL.BAD.ALIGNMENT \\DL.OVERRUN -\\DL.BAD.CRC \\ES.GOOD.PACKET \\ES.OVERRUN \\DL.ODDLENGTH \\ES.BAD.CRC \\ES.BAD.CRC&ALIGNMENT -\\ES.BAD.ALIGNMENT \\ES.OTHER.ERROR \\ES.TOO.MANY.COLLISIONS \\DL.COLLISION \\DL.UNDERRUN -\\ES.UNDERRUN \\DAYBREAK \\DOLPHIN \\D0.GOOD.PACKET \\D0.LATE.COLLISION \\ES.LATE.COLLISION -\\D0.TOO.MANY.COLLISIONS \\D0.PACKET.TOO.LONG \\D0.BAD.ALIGNMENT \\D0.INPUT.BAD.CRC \\D0.INPUT.OVERRUN - \\D0.OUTPUT.UNDERRUN) MAKEHARDCOPYMODESTREAM (\\HCPYMODEDISPLAYIMAGEOPS.PRESS -\\HCPYMODEDISPLAYIMAGEOPS.INTERPRESS MICASPERPT) SPYOBJ.SAVE (FILERDTBL) DUMPDATABASE1 (DUMPTABLE) -RIGHTW.REPAINTFN (INSPECTPRINTLEVEL) |\\PFInitFileDescriptors| (|\\PhysVolumePage| -|\\PFLogicalVolumeFileD| |\\PFMarkerFileD|) \\UPDATE.PROCESS.WINDOW (\\PROCESSES LIGHTGRAYSHADE -PROCESS.STATUS.WINDOW) \\SLOWHDCPYBLTCHAR (\\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS -\\SCREENBITMAPS) BMOBJ.PUTFN (FILERDTBL) \\10MB.GETPACKETLENGTH (\\MACHINETYPE \\DANDELION \\DAYBREAK -\\DOLPHIN) EDITFERROR (EDITCOMS DWIMWAIT DUMMY-EDIT-FUNCTION-BODY) PROCESS.BACKTRACE ( -PROCESS.STATUS.WINDOW PROCBACKTRACEHEIGHT BACKTRACEFONT) \\SLOWLLSH1 (\\FIXP \\SMALLP \\FLOATP) -MOUSECONFIRM (PROMPTWINDOW MOUSECONFIRMCURSOR LASTMOUSEBUTTONS) CL::BOA-ARG-LIST-WITH-INITIAL-VALUES ( -CL:LAMBDA-LIST-KEYWORDS) KEYDOWNP (BITSPERBYTE \\LASTKEYSTATE) EDITCOLUMN (\\LASTCHAR \\CURSORCOL) -PUTHASHFILE (HASHTEXTCHAR) COMPPRINT (COUTFILE) COMP.ASET (ALLDECLS COMPILE.CONTEXT) EDITF2 (LISPXHIST -) EXEC-FORMAT (*CURRENT-EVENT*) ATTACHEDWINDOWS (*ATTACHED-WINDOW-COMMAND-SYNONYMS*) -MB.MARGINBAR.SELFN (LASTMOUSEBUTTONS WHITESHADE) EDITF (LASTWORD) SAVESET (DFNFLG UNDOSIDE0) -\\TEDIT.TEXTBIN.STRINGSETUP (%FAT-CHAR-TYPENUMBER) READOCT (RAIDIX) FIX89A (LPARKEY CHARLST) -COMPILER::EFFECTS-UNION (:NONE :ANY) \\CHARWIDTH.PRESS (\\CHARMASK) |\\PFCreateVols| ( -|maxLogicalVolumes| |logicalVolumeSeal|) MENUDESELECT (WHITESHADE) |\\PFCreatePhysicalVolume| ( -|physicalVolumeSeal|) FIND-EDIT-LOCATION (*REMOVE-INTERLISP-COMMENTS*) \\TEDIT.WINDOW.OPS ( -LASTMOUSEBUTTONS \\TEDIT.MAKESPLITCURSOR \\TEDIT.MOVESPLITCURSOR \\TEDIT.UNSPLITCURSOR -\\TEDIT.SPLITCURSOR) \\CREATEW1 (|WBorder|) ONED.TRACKCURSOR (LASTMOUSEBUTTONS) NCREATE2 ( -|\\DTDSpaceBase| GCREF) \\SLOWLOGXOR2 (\\FIXP \\SMALLP \\FLOATP) IREMAINDER (\\FIXP \\SMALLP \\FLOATP -MAX.POS.HINUM MAX.SMALL.INTEGER \\SIGNBIT \\OVERFLOW) \\SLOWLLSH8 (\\FIXP \\SMALLP \\FLOATP) LSH ( -MAX.FIXP) GETHASHFILE (HASHTEXTCHAR) COMP.TRANSFORM (COMPILE.CONTEXT *BC-MACRO-ENVIRONMENT* -COMPILERMACROPROPS) DELETE.LONG.SEGMENT1 (\\RMARG) COMP.AREF (ALLDECLS COMPILE.CONTEXT) -SEDIT::NEW-FUNCTION-BODY (SEDIT::ARGS-GAP SEDIT::BODY-GAP) APPENDTOVAR (DFNFLG) DUMPDATABASE ( -MSDATABASELST NODUMPRELATIONS) SHOWSHADE.IP (DOSAVESIMPLEBODY { MASKRECTANGLE }) \\ROUTE.XIP ( -\\10MBLOCALNDB \\3MBLOCALNDB \\EPT.XIP) COMPILER::REMOVE-EFFECT (:NONE :ANY) UNSAVEBLOCK? (FILELST -DWIMWAIT) \\SLOWIDIFFERENCE (\\FIXP \\SMALLP \\FLOATP MAX.SMALL.INTEGER MAX.POS.HINUM \\SIGNBIT) -SEDIT::FIND-OBJ (SEDIT:*WRAP-SEARCH*) \\CHANGECHARSET.HDCPYDISPLAY (MICASPERPT \\MAXTHINCHAR) -DO?CMD.ERRORHANDLER (\\?TAIL) ONEDINSPECT.ARRANGEWINDOWS (MAX.SMALLP) \\AB.NEXT (|\\ArrayFrLst| -|\\FirstArraySegment| |\\ArrayBlockPassword|) EDITDEFAULT1 (SPELLSTATS1) SEDIT::STRINGIFY-LIST ( -SEDIT::TYPE-DOTLIST) ADDTOVAR (DFNFLG) TEDITFROMBRAVO (MAX.FIXP) PAINTW.READBRUSHSHADE (PAINTW.SHADES) - BRHC/LAYOUT/DAUGHTERS (MOTHERD NODELST FAMILYD) \\UNBOXFLOAT2 (MYALINK \\STACKHI \\STACKSPACE -WORDSPERCELL) EDITH (EDITRDTBL HISTSTR0 P.A.STATS) |\\PFCreateFileDescriptors| (|maxLogicalVolumes| -|tLogicalVolumeRootPage| |tSubVolumeMarkerPage| |tFreePage| |tVolumeAllocationMap| |tVolumeFileMap|) -CREATEW1 (|WBorder| |MinWindowWidth| |MinWindowHeight| \\CURSORSCREEN) SEDIT::SET-POINT-STRING ( -SEDIT::BUTTON-STRING) MENUSELECT (MENUSELECTSHADE) \\TEDIT.TEXTBIN.FILESETUP (|NoBits| BYTESPERPAGE) -INFILECOMSMACRO (ONFILETYPE MACROPROPS) CLISPIF (DWIMIFYING VARS BREAKFLG EXPR NOFIXFNSLST -NOFIXVARSLST LISPXHIST) SHIFTDOWNP (\\LASTKEYSTATE) SEDIT::SET-POINT-LITATOM (SEDIT::BUTTON-STRING) -\\HUNKFIT? (|\\MDSIncrement| CELLSPERPAGE) GRAPHOBJ.GETFN (FILERDTBL) KEYNUMBERP (\\NKEYS) -SCREENBITMAP (|ScreenBitMap|) \\COURIER.CHECK.PROCEDURES (COMMENTFLG) BAKTRACE (BREAKDELIMITER) \\VAG2 - (BITSPERBYTE) \\SLOWIGREATERP (\\FIXP \\SMALLP \\FLOATP \\SIGNBIT) EDITDEFAULT (EDITOPS HISTORYCOMS -EDITCOMSA EDITCOMSL EDITRDTBL COMS LPARKEY HISTSTR0) PRIN3 (*READTABLE* PLVLFILEFLG *PRINT-LEVEL* -*PRINT-LENGTH* *INTERLISP-PRIN1-CASE* *PRINT-CASE*) METASHIFT (\\ORIGKEYACTIONS) EDITRAN (EDITOPS) -MARKASCHANGED (MARKASCHANGEDFNS) \\SLOWFGREATERP (\\SIGNBIT \\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER -\\SMALLP \\EXPONENT.BIAS \\8BITS \\MAX.EXPONENT \\HIDDENBIT) IFCDECLARE (DECLARETAGSLST) FIX89 ( -LPARKEY FAULTX EXPR) MAKE-VECTOR (CL:ARRAY-TOTAL-SIZE-LIMIT) \\PAPERSIZE.IP (DEFAULTINTERPRESSMEDIUM -KNOWN.MEDIA.SIZES MICASPERMILLIMETER) PRINTPUPDATA (\\PUPOVLEN) MAKE-KEYWORD (*KEYWORD-PACKAGE*) -DIRECTORYNAME (\\CONNECTED.DIRECTORY LOGINHOST/DIR) \\SPP.CLEANUP (RESETSTATE) \\SLOWLOGAND2 (\\FIXP -\\SMALLP \\FLOATP) PFI.INDEX.BREAK (*STANDARD-OUTPUT*) CL::ARGUMENT-NAMES (CL:LAMBDA-LIST-KEYWORDS -:REQUIRED-ARG) \\SLOWLRSH1 (\\FIXP \\SMALLP \\FLOATP) DBG::REUSE-CURRENT-WINDOW (PROMPTWINDOW) -\\SLOWLOGOR2 (\\FIXP \\SMALLP \\FLOATP) DO.SHIFTED.SELECTION (LASTMOUSEBUTTONS \\DSP \\CURSOR -\\ENDBUFFER \\ARROW) \\UNBOXFLOAT1 (MYALINK \\STACKHI \\STACKSPACE WORDSPERCELL) EDITCOM (EDITRACEFN) -HRULE.DISPLAYFN (BLACKSHADE) DIRECTORYNAMEP (\\CONNECTED.DIRECTORY) \\SETXIPCHECKSUM (\\NULLCHECKSUM) -CL:ELT (:NAME :INDEX) SETUP.OFFICE.KEYBOARD (\\DLIONOSDKEYACTIONS \\DOVEOSDKEYACTIONS) -\\BOXIDIFFERENCE (\\FIXP \\SMALLP \\FLOATP MAX.SMALL.INTEGER) CALLS (GLOBALVARS NOPACKCALLSFLG -LAMBDASPLST MS.VERB.TO.NOTICED) \\HDCPYBLTCHAR (IHALFMICASPERPT IMICASPERPT \\CURSORDESTINATION -\\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS) TTYIN.PRINTARGS (*PRINT-CASE* :UPCASE *READTABLE* -:ALLOW-OTHER-KEYS \\CURSORCOL \\LMARG) EDUP (LASTAIL CLISPTRANFLG) DIRECTORY (FILEINFOTYPES -DIRCOMMANDS \\MACHINETYPE \\MAIKO ASKUSERTTBL) CHCON1 (%FAT-CHAR-TYPENUMBER \\PNAME.HI \\PLIST.HI) -HOSTNAMEP (\\FILEDEVICENAMES \\FILEDEVICES) \\TEDIT.APPLY.PARASTYLES (TEDIT.STYLES) PRINTVA (.I2) -UNPACKFILENAME.STRING (%FAT-CHAR-TYPENUMBER) EQUAL (\\FLOATP \\SMALLP \\FIXP \\IMAX.FLOAT \\IMIN.FLOAT - MAX.SMALLP \\STACKP \\COMPILED-CLOSURE) SEDIT::SELECT-SEGMENT-LITATOM (SEDIT::TYPE-STRING) -GO.TO.ADDRESSING (\\LOC.ROW.0) CH.LOOKUP.OBJECT (\\CH.BROADCAST.SOCKET) EDITCOMA (USERMACROS -EDITMACROS COM0 L0 EDITESTATS EDITRDTBL) EDITCOML (EDITMACROS EDITISTATS CLISPTRANFLG) \\SLOWLRSH8 ( -\\FIXP \\SMALLP \\FLOATP) \\SLOWITIMES2 (\\FIXP \\SMALLP \\FLOATP MAX.POS.HINUM MIN.FIXP -MAX.SMALL.INTEGER) EDITCOM1 (LISPXHIST) SUBATOM (\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER -\\PNAMELIMIT) \\BOXIPLUS (\\FIXP \\SMALLP \\FLOATP MAX.SMALL.INTEGER) EDITSAVE (DONTSAVEHISTORYCOMS -COMPACTHISTORYCOMS EDITHISTORY HISTSTR0 HISTORYCOMS) EDIT!UNDO (P.A.STATS UNDOLST) -SEDIT::BUILD-INTERNAL-STRUCTURE (SEDIT::TYPE-ROOT) UNDOEDITCOM1 (EDITUNDOSTATS) \\SETUP.TYPENUM.TABLE -(\\MAX.CELLSPERHUNK UNBOXEDBLOCK.GCT INITIALDTDCONTENTS |\\DTDSpaceBase|) EXEC-EVAL (LISPXHISTORY -LISPXHIST) \\TERMINATESPP (\\SPS.CLOSED \\SPS.ABORTED \\SPS.INIT \\SPS.LISTENING \\SPS.OPEN -\\SPPHEAD.CC.ACKNOWLEDGE \\SPPHEAD.CC.EOM \\SPPDSTYPE.END \\SPS.ENDSENT) CL::DEFINE-CONSTRUCTORS ( -:CONSTRUCTOR) EDITSMASH1 (L ATM) DO.DELETE.LINES (\\DSP \\BMARG \\CHARHEIGHT \\RMARG \\LMARG \\DESCENT -) DOUSERFNS2 (LAMBDASPLST) ADD-EXEC (XCL:*PROFILE*) DBG::PRINT-ENTRY-MESSAGE (BRKCOND) %SETELT (:NAME -:INDEX) INSPECT/AS/FUNCTION (\\STACKHI) \\POSTSCRIPT.ACCENTFN (%FAT-CHAR-TYPENUMBER) <= (CL::%<=) -SEDIT::SCAN-STRING (*READTABLE*) PARSERELATION (MSDATABASELST) SEDIT::ATOM-CHANGE-RELINEARIZE ( -SEDIT::TYPE-LITATOM) \\TEDIT.CARET (BXCARET) \\DISPLAYLINE (WHITESHADE |LMInvisibleRun| -|LMLooksChange| BLACKSHADE) COMP.ATTEMPT.COMPILE (COUTFILE BYTECOMPFLG SPECVARS LOCALFREEVARS) -MSSEEKPHRASE (SEEKING CONJUNCTABLE) EDIT4F1 (L CLISPTRANFLG C3) \\CREATE.TEDIT.MOVESELECTION ( -BLACKSHADE) MAKEMACFORMAT (:MACINTOSH) RANDACCESSP (\\LINEBUF.OFD) CURSOR.INIT (|ScreenBitMap|) EDIT2F - (L CLISPTRANFLG) FILEPATCHBLOCK (OUTX |\\FreeArrayFlagWord| |\\ArrayBlockHeaderCells| -|\\ArrayBlockOverheadCells|) GETVARS (FAULTPOS) PRINTPUP (PUPTRACEFILE PUPPRINTMACROS \\PUPOVLEN -PUPTYPES) CL:ADJUST-ARRAY (CL:ARRAY-RANK-LIMIT CL:ARRAY-TOTAL-SIZE-LIMIT) UNBREAK (BROKENFNS :IN) -COPYCHARS (\\MAXFILEPTR CR.EOLC CRLF.EOLC NSCHARSETSHIFT \\NORUNCODE LF.EOLC) \\INIT.KEYBOARD.STREAM ( -\\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS FILELINELENGTH LF.EOLC |NoBits|) XCL:COMPILE-DEFINER (:PARENT -) BREAK-FUNCTION (*ERROR-OUTPUT* :IN :NO-ERROR :NAME :UPCASE) IFCPROPSCAN (ONFILETYPE SYSPROPS) -XCL:COMPILE-FORM (:PARENT SPECVARS LOCALVARS GLOBALVARS) COMPILER::CONSTRUCT-PROG1-TREE (:VARIABLE -:REQUIRED :BODY :STMTS :FN :ARGS) TEDIT.PROMPTPRINT (STREAM PROMPTWINDOW) UPDATEFN (MSCHANGEDARRAY -MSDATABASELST) EDIT4F2 (EDITQUIETFLG) \\COURIER.CHECK.ERRORS (COMMENTFLG) GTHASHFILE (SYSHASHFILE) -BYTEBLOCKCOMPILE2 (RETFNS NOLINKFNS BLKAPPLYFNS) MSSETREP (LASTPARSED SPELLING) BRHC/LAYOUT (PERSONALD -) EDIT1F (CLISPTRANFLG) \\COPYOPENFILE (\\MACHINETYPE \\MAIKO) BPNT (L) SEDIT:SEDIT (SEDIT::BASIC-GAP -:NAME :TYPE :EXPRESSION) \\POSTSCRIPT.ACCENTPAIR (%FAT-CHAR-TYPENUMBER ACCENT) \\CREATEPIECEORSTREAM ( -%FAT-CHAR-TYPENUMBER |NoBits| DEFAULTFONT TEDIT.DEFAULT.FMTSPEC) \\STRINGWIDTH.HCPYDISPLAYAUX ( -\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER *PRINT-LEVEL* *PRINT-LENGTH*) EDIT.RI (L) ENTER-DEBUGGER-P -(HELPCLOCK HELPTIME) COPYFILES (DWIMWAIT) BRKDWNRESULTS (BRKDWNTOTLST BRKDWNLST BRKDWNFLTFMT -BRKDWNLABELS BRKDWNTYPES) IDLE.SHOW.OPTION (IDLE.PROFILE PROMPTWINDOW) EDITBF1 (CLISPTRANFLG) -RAIDROOTFRAME (VMEMFILE |\\InterfacePage|) HASH-TABLE-FOR-DOC-TYPE (*DOCUMENTATION-HASH-TABLE*) -DOUSERFNS (LAMBDASPLST) ONEDINSPECT.MAKEREGIONS (INSPECTPRINTLEVEL) DO.MOUSE (LASTMOUSEBUTTONS \\DSP) -TTPROMPTCHAR (\\FIRSTLINE \\PROMPT1 \\PROMPT2) \\MACPEEKCCODEFN (NSCHARSETSHIFT \\NORUNCODE -*MACTOXEROXMAP*) EDITSMASH (L EDITUNDOSAVES CLISPTRANFLG) CL::%ATAN-FLOAT (CL::%PI/2 CL:PI -CL::%INV-2-SQRT3 CL::%PI/3 CL::%SQRT3 CL::%2-SQRT3 CL::%PI/6) CLOSEF (\\LINEBUF.OFD \\TERM.OFD) -COPYBYTES (\\MAXFILEPTR) SEDIT::MAKE-FUNCTION-PROTOTYPE (SEDIT::ARGS-GAP SEDIT::BODY-GAP) PRINTADDRS ( -.I7 .I5) \\FORMATLINE (|LMInvisibleRun| TEDIT.DONT.LAST.CHARS TEDIT.DONT.BREAK.CHARS DEFAULTFONT) -MSVERBTYPE (MSWORDS) SEDIT::INITIALIZE-LISTS (SEDIT::TYPE-ROOT) \\CREATE.TEDIT.DELETESELECTION ( -BLACKSHADE) EDITBELOW (C) XCL:UNADVISE-FUNCTION (:IN :NO-ERROR) EDITNTH (CLISPTRANFLG) IDLE.SET.OPTION - (PROMPTWINDOW IDLE.PROFILE IDLE.FUNCTIONS) SEDIT::SET-POINT-LIST (SEDIT::TYPE-DOTLIST) -ONEDINSPECT.ADJUSTSELECTION (INSPECTPRINTLEVEL) IGREATERP (IGREATERP) XCL:ADVISE-FUNCTION (:BEFORE -:LAST *ERROR-OUTPUT* :NAME :IN :NO-ERROR ADVISEDFNS) SEDIT::SETUP-WINDOW-CONTEXT-DEPENDENCIES ( -:|ChangedStructure?| :|package| *PACKAGE* :|name|) IQUOTIENT (IQUOTIENT) \\CURSORUP ( -\\CURSORDESTINATION HARDCURSORWIDTH HARDCURSORHEIGHT |ScreenBitMap| \\CURSORHOTSPOTX \\CURSORHOTSPOTY) - RAIDSTACKCMD (|\\InterfacePage| WORDSPERPAGE \\STACKHI \\STK.FX .I7 ALINKS? RAIDIX) SEDIT::REPLACE-CHARS - (*READTABLE* SEDIT::TYPE-STRING) \\FTP.RECOGNIZEFILE (\\NO.ILLEGAL.DIRECTORY FTPDEBUGLOG -\\NO.FILE.NOT.FOUND) PRINTHISTORY1 (HISTSTR2 HISTSTR0) EDITSAVE1 (HISTSTR3) \\COMPUTE.HUNK.TYPEDECLS ( -CODEBLOCK.GCT \\MAX.CELLSPERHUNK PTRBLOCK.GCT) INSPECT/ARRAY (MAXINSPECTARRAYLEVEL PROMPTWINDOW) -\\SEARCH.OUTPUTQ (\\PT.INTERRUPT) IDIFFERENCE (IDIFFERENCE) |\\UFStoOtherCopyMess| ( -DEFAULTFILETYPELIST DEFAULTFILETYPE) XCL:REBREAK-FUNCTION (XCL::*BREAK-HASH-TABLE* *ERROR-OUTPUT*) -NUMBERPAD.HELDFN (RNUMBER.ABORT.BITMAP RNUMBER.CLEAR.BITMAP) \\HANDLE.RAW.OTHER (XIPTRACEFILE) -DEBUGGER (DBG::*IN-THE-DEBUGGER* \\LINEBUF.OFD \\TERM.OFD *STANDARD-INPUT* *STANDARD-OUTPUT* -\\#DISPLAYLINES \\PRIMTERMTABLE \\PRIMTERMSA *NOT-YET-EVALUATED* DBG::*DEBUGGER-TERMINAL-TABLE* -AUTOBACKTRACEFLG :READ *DEBUGGER-COMMAND-TABLE* *EXEC-COMMAND-TABLE* XCL:*DEBUGGER-PROMPT*) -TTYIN.PPTOFILE (\\RMARG \\INITPOS \\DSP) FILL/GRAPHNODE/LABEL (BLACKSHADE WHITESHADE) -\\NSFILING.SET.CONTINUANCE (MAX.SMALLP) \\BIGNUM.COMPARE (MIN.INTEGER MAX.INTEGER) -ADJUSTCURSORPOSITION (\\CURSORHOTSPOTX \\CURSORDESTHEIGHT \\CURSORHOTSPOTY) IFCPROPS (TYPE) CLISPATOM -(CLISPFLG FAULTXX WTFIXCHCONLST LPARKEY RPARKEY FAULTX FAULTPOS) TRANSLATE.IP (TRANSLATE) -XCL:CREATE-TRACE-WINDOW (TRACEREGION) \\CURSORPOSITION (\\CURSORDESTHEIGHT \\CURSORDESTWIDTH -\\CURSORHOTSPOTX BITSPERWORD \\CURSORHOTSPOTY \\MACHINETYPE \\DANDELION \\DAYBREAK \\MAIKO \\EM.MOUSEX - \\EM.MOUSEY \\EM.CURSORX \\EM.CURSORY) \\CREATE.TEDIT.SHIFTEDSELECTION (BLACKSHADE) EXEC-PRINT ( -*TERMINAL-IO*) DIFFERENCE (DIFFERENCE) SHOWBITMAP1.IP (BITSPERCELL DOSAVESIMPLEBODY { -SEQPACKEDPIXELVECTOR BYTESPERCELL MAKEPIXELARRAY MASKPIXEL }) EDITGETD (CLISPARRAY) -\\POSTSCRIPT.PRINTSLUG (BLACKSHADE) INFILECOMSVAL (ONFILETYPE TYPE) FIXCONTINUE (DWIMWAIT DWIMKEYLST) -\\MAYBEPEEKPUP (PUPTRACEFILE) \\GETFTPCONNECTION (\\FTPCONNECTIONS FTPDEBUGLOG UPPERCASEARRAY -PROMPTWINDOW) MARK/GRAPH/NODE (BORDER.FOR.MARKING LABELSHADE.FOR.MARKING) TEDIT.FORMATBOX ( -:NEW-PAGE-LAYOUT) CURSORPOSITION (\\CURSORHOTSPOTX \\CURSORDESTHEIGHT \\CURSORHOTSPOTY) -COURIER.VERSION# (COURIER.VERSION#) FM.CHANGELABEL (\\FM.GROUPSPEC) %FAST-COPY-BASE (PTRBLOCK.GCT) -CURSORSCREEN (\\CURRENTCURSOR) \\MACINCCODEFN (NSCHARSETSHIFT \\NORUNCODE *MACTOXEROXMAP*) -\\10MB.CREATENDB (\\10MBTYPE.PUP \\EPT.PUP \\10MBTYPE.3TO10 \\EPT.3TO10 \\MACHINETYPE \\DOLPHIN) -\\VECFONTINIT (\\MAXCHARSET \\MAXTHINCHAR) \\FLUSH.OPEN.STREAMS (|AppendBit| |WriteBit|) -\\HDCPYDISPLAY.FIX.YPOS (MICASPERPT) EDITCALLERS (FILELST SYSFILES DWIMIFYCOMPFLG) FILEBROWSER ( -|WindowTitleDisplayStream| FB.BROWSERFONT FB.MENU.ITEMS *KEYWORD-PACKAGE* FB.INFO.MENU.ITEMS -DIRCOMMANDS FB.DEFAULT.INFO FB.MENUFONT FB.PROMPTLINES FB.PROMPTFONT FB.DEFAULT.NAME.WIDTH -TB.LEFT.MARGIN) \\SPP.SEND.ENDREPLY (\\SPPHEAD.CC.EOM \\SPPHEAD.CC.ACKNOWLEDGE \\SPPDSTYPE.ENDREPLY) -TEDIT.DISPLAYTEXT (%FAT-CHAR-TYPENUMBER WHITESHADE) SCANFILE0 (FILECREATEDLOC) SETTERMCHARS (EDITRDTBL -) SEDIT::SETUP-WINDOW-AND-PROCESS (SEDIT::TERMINAL-TABLE \\CURRENTKEYACTION PROMPTWINDOW) -\\BIGNUM.QUOTIENT (MAX.INTEGER MIN.INTEGER) ENDREAD? (\\CURSOR \\BUFFER \\ENDBUFFER \\READING -\\PROMPT1 \\MAXTHINCHAR \\RDTBLSA SEPRCHAR.RC LEFTPAREN.RC LEFTBRACKET.RC ESCAPE.RC MULTIPLE-ESCAPE.RC -) XCL:TRACE-FUNCTION (:NAME *ERROR-OUTPUT* :IN :NO-ERROR :UPCASE) CLISPERROR (FAULTFN PARENT TAIL -FAULTX) UPDATECHANGED (MSCHANGEDARRAY) SEDIT::REPLACE-LIST (SEDIT::TYPE-DOTLIST SEDIT::TYPE-LIST) -TEDIT.PUT.PCTB (*TEDIT-FILE-READTABLE* MAX.SMALLP TEDIT.DEFAULT.CHARLOOKS CR.EOLC -TEDIT.DEFAULT.FMTSPEC %FAT-CHAR-TYPENUMBER) EDITTOGGLELABEL (PROMPTWINDOW) RAIDSHOWFRAME (ROOTFRAME -\\STACKHI WORDSPERCELL \\#ALINK.OFFSET RAIDIX) RAIDCOMMAND (RAIDIX \\STACKHI \\DEF.HI .I2 \\LITATOM -\\NEW-ATOM |\\InterfacePage| .I7 VMEMFILE BYTESPERPAGE) INFILECOMSPROP (ONFILETYPE) FIXCONTINUE1 ( -OKREEVALST) \\PUTBASEFIXP.UFN (\\SMALLP MASKWORD1\'S \\FIXP) TRANS.IP (TRANS.IPOP) SEDIT::PARSE--STRING - (SEDIT::TYPE-STRING) \\FTP.PRINTPLIST (%FAT-CHAR-TYPENUMBER \\PNAME.HI \\PLIST.HI \\MAXTHINCHAR -FTPDEBUGLOG) COMPILER::CLOSURE-ANNOTATE-VAR-REF (:LEXICAL) \\TYPE.FROM.FILETYPE (FILING.TYPES) -SAVEONSYSRECLST (COMMENTFLG) SEDIT::SETUP-PROFILE (*PRINT-BASE*) MSPATHOPTIONS (LASTPARSED) TTLOADBUF -(HISTSTR1 HISTSTR0 \\ENDBUFFER \\READING RDTBL) HRULE.CREATE (HRULE.IMAGEFNS HRULE.DEFAULT.WIDTH -TEXTOBJ) SPYOBJ (LABEL SPYOBJ.IMAGEFNS) LASTMOUSEY (LASTMOUSEY) \\FILETYPE.FROM.TYPE (FILING.TYPES) -\\MAYBEPEEKNS (XIPTRACEFILE) \\BIGNUM.LSH (MIN.INTEGER MAX.INTEGER) PRESSFILEP (BYTESPERRECORD) -LASTMOUSEX (LASTMOUSEX) STKPOS (MYALINK \\STACKHI \\#ALINK.OFFSET WORDSPERCELL) -\\STRINGWIDTH.HDCPYDISPLAY (IHALFMICASPERPT IMICASPERPT) \\RSH (\\FIXP \\SMALLP \\FLOATP) PRINTXIP ( -XIPTRACEFILE XIPPRINTMACROS \\XIPOVLEN XIPTYPES) CURSOREXIT (LASTSCREEN LASTMOUSEX LASTMOUSEY -\\MAINSCREEN \\COLORSCREEN) SETFILEPTR (\\MAXFILEPTR \\NORUNCODE) WALK-FORM-INTERNAL ( -XCL::*WALK-FUNCTION* XCL::*ENVIRONMENT*) \\TAN.OLD (CL:PI PI/180 PI/2 -PI/2 PI/4 -PI/4 UBFLOAT3) -GETMOUSESTATE (\\CURSORHOTSPOTX \\CURSORDESTHEIGHT \\CURSORHOTSPOTY \\LASTKEYSTATE \\MOUSE.ALLBITS -\\CURSORSCREEN) SEDIT::SETUP-NEW-CONTEXT (SEDIT::EDITOR-NAME) \\CREATE.TEDIT.SELECTION (BLACKSHADE) -|PopUpWindowAndGetAtom| (LASTMOUSEX SCREENWIDTH LASTMOUSEY) SEDIT::PARSE--LITATOM (SEDIT::TYPE-LITATOM -) DWIMLOADFNS? (FAULTX LISPXHIST) IDLE.BOUNCING.BOX (IDLE.BOUNCING.BOX) BEEPON (\\MACHINETYPE -\\DANDELION \\DAYBREAK \\MAIKO) SEDIT::PARSE--LIST-INTERNAL (SEDIT::TYPE-LIST) \\WWCHANGESCREENSIZE ( -WINDOWBACKGROUNDSHADE) CL:CHAR-NAME (CHARACTERNAMES CHARACTERSETNAMES) FORMAT-NEWLINE ( -*STANDARD-OUTPUT*) \\MACOUTCHARFN (*XEROXTOMACMAP*) \\SENDSPP (\\SPP.RETRANSMITQ.SIZE -\\SPPDSTYPE.ENDREPLY) RECORDECLARATIONS (USERRECLST CLISPTRANFLG CLISPRECORDTYPES) REGIONONSCREEN ( -LASTMOUSEX LASTMOUSEY SCREENWIDTH SCREENHEIGHT) FIND.MATCHING.WORD (\\CURSOR) \\MAIKO.DISPLAYLINE ( -WHITESHADE |LMInvisibleRun| |LMLooksChange| BLACKSHADE) SPY.MERGE.CALLEES (SPY.HASH) -CL::%NOT-INTEGER-ERROR (:EXPECTED-TYPE :NAME :VALUE) INSPECT/TYPELESS (|\\FirstArraySegment| -|\\ArrayBlockHeaderWords| |\\ArrayBlockPassword| |\\ArrayBlockTrailerCells| -|\\ArrayBlockOverheadWords|) LAYOUTSEXPR1 (DEFAULT.GRAPH.NODELABELSHADE DEFAULT.GRAPH.NODEFONT -DEFAULT.GRAPH.NODEBORDER) DELFROMFILES (FILELST) \\PICK.EVALQT (|\\TopLevelTtyWindow| XCL:*PROFILE*) -\\GETINTERNALCLOCK (\\MISCSTATS WORDSPERCELL) BCOMPL3 (COUTFILE) BRH/LAYOUT/DAUGHTERS (NODELST) -SMARTARGLIST (COMPILERMACROPROPS) VRULE.CREATE (VRULE.IMAGEFNS VRULE.DEFAULT.HEIGHT TEXTOBJ) -FILING.CALL (PROMPTWINDOW :CLOSED \\FIXP WORDSPERCELL) PAINTW.READBRUSHTEXTURE (\\CURSORDESTINATION) -INFILECOMSVALS (COMMENTFLG) FIXATOM1 (NEWTAIL PARENT TAIL FAULTFN) \\PEEKPUP (\\LOCALNDBS GCONST -PROMPTWINDOW \\LOCALPUPNETHOST) LOAD? (LOADEDFILELST COMPILE.EXT) \\MAKE.EXPEDITED.STREAM ( -\\BASEBYTESDEVICE \\XIPOVLEN \\MAX.XIPDATALENGTH) TTADJUSTWIDTH (\\ARROW) PUTPUPSTRING (\\PUPOVLEN) -|\\VFMAtLoad| (|lastPageNumber|) \\PROCESS.RESET.TIMERS (\\SYSTEMTIMERVARS \\PROCESSES \\PSTAT.WAITING -) PUP.ECHOSERVER (\\PUPSOCKET.ECHO \\PT.ECHOME \\PT.IAMECHO) \\NSFILING.GET.ATTRIBUTES (DESIREDPROPS) -CL:ERROR (HELPDEPTH *ERROR-OUTPUT* :CONDITION :AT) \\TEDIT.WORD.BOUND (TEDIT.WORDBOUND.READTABLE -\\MAXTHINCHAR) DEFAULT.BACKGROUND.COPYFN (LASTMOUSEBUTTONS) FIXAPPLY (FAULTX CLISPCHARRAY CHARLST -FAULTARGS FAULTPOS NOSPELLFLG FAULTXX HISTENTRY LPARKEY SPELLINGS1 SPELLINGS2) -\\NSRANDOM.WRITE.SEGMENT (BYTESPERPAGE) BEEPOFF (\\MACHINETYPE \\DANDELION \\DAYBREAK \\MAIKO) -WRITE-STRING* (*STANDARD-OUTPUT*) CHARACTER.PRINT (*READTABLE*) FORMAT-EAT-WHITESPACE ( -*FORMAT-CONTROL-STRING*) \\SECONDSCLOCKGREATERP (\\MISCSTATS WORDSPERCELL) |MakeMenuOfImageTypes| ( -IMAGESTREAMTYPES \\DISPLAYSTREAMTYPES) PFI.LOOKUP.NAME (*PFI-INDEX-ALIST*) \\READNUMBER.OUTLINEREGION -(BLACKSHADE) SWAPXIPADDRESSES (\\#WDS.NSADDRESS \\MY.NSHOSTNUMBER) CL:CODE-CHAR (|\\SmallPosHi|) -TTADDTAB (\\CURSORCOL \\ARROW \\CHARWIDTH) LISPXFIX (HISTSTR0) UPDATE/MENU/IMAGE (LASTSCREEN -MENUSUBITEMMARK BLACKSHADE WHITESHADE MAX.SMALLP) \\LEAF.TIMEDOUT.EXCESSIVE (LEAFABORTREGION -\\LEAFOP.WRITE \\LEAFOP.CLOSE \\LEAFOP.TRUNCATE |AppendBit| |WriteBit| MENUFONT) \\LEAF.SETFILETYPE ( -\\LEAFOP.WRITE \\OPCODE.SHIFT \\OFFSET.FILETYPE \\BYTES.PER.TRIDENT.PAGE \\LEN.FILETYPE&SIZE \\FT.TEXT - \\FT.UNKNOWN \\FT.BINARY \\LEN.FILEREQUEST) \\IDLER (\\LASTUSERACTION IDLE.PROFILE \\IDLING.OVER -IDLE.SUSPEND.PROCESS.NAMES IDLE.RESETVARS PROMPTWINDOW WHOLESCREEN WHITESHADE BLACKSHADE SAVINGCURSOR) - CSUBST (SPECIALFIELDS CREATEINFO USINGEXPR ARGS BODY FIELDNAMES SUBSTYPE RECORD.TRAN RECORDEXPRESSION - CLISPARRAY DECLST) INSPECT/DATATYPE (|\\DTDSpaceBase| PROMPTWINDOW) \\CREATEPRESSFONT (\\MAXCHARSET) -CHAT.LOGIN (PROMPTWINDOW CHAT.WAIT.TIME) SWAPPEDCOND (L CLISPARRAY) AUTOCR? (\\CURSORCOL -TTYINAUTOFILLMARGIN \\RMARG \\ARROW \\CURSOR) \\SETDAYTIME0 (\\MISCSTATS WORDSPERCELL MAX.SMALLP -BITSPERWORD \\MACHINETYPE \\DANDELION \\DL.PROCESSORBUSY \\DL.SETTOD) COURIER.BROADCAST.CALL ( -\\COURIERPROGRAM BROADCASTNSHOSTNUMBER \\EXTYPE.EXPEDITED.COURIER PROMPTWINDOW \\NS.ROUTING.TABLE) -\\COS.OLD (2PI PI/180 PI/2 -PI/2 3PI/2 CL:PI PI/4 UBFLOAT3 4/PI) TEDIT.SET.SEL.LOOKS (BLACKSHADE -COPYSELSHADE COPYLOOKSSELSHADE EDITMOVESHADE) \\COURIER.BROADCAST.ON.NET (PROMPTWINDOW) -TTYINBUFFERSTREAM (TTYINBUFFERDEVICE \\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS FILELINELENGTH LF.EOLC -|NoBits| \\ENDBUFFER) BRH/OFFSET (NODELST) \\GS.INITBUF (\\GS.BUF) COMPILER::MAYBE-REMOVE-COMMENTS ( -FORM) PUP.ECHOUSER (PROMPTWINDOW \\PUPSOCKET.ECHO \\PT.ECHOME BYTESPERWORD \\PT.IAMBADECHO -\\PT.IAMECHO \\PT.ERROR) FTPGETMARK (FTPDEBUGLOG) EDITTOGGLEBORDER (PROMPTWINDOW) INSPECT/HUNK ( -CODEBLOCK.GCT PTRBLOCK.GCT INSPECT.HUNK.COMMANDS MAXINSPECTARRAYLEVEL) ADJUSTLINE (TTYJUSTLENGTH -\\RMARG \\CHARWIDTH \\LMARG \\ARROW \\CURSORCOL) COMP.LOOKUPVAR (ALLVARS) \\CLOCKGREATERP (\\MISCSTATS -) TTDOTABS (\\CURSOR \\ENDBUFFER \\CHARWIDTH \\CURSORCOL) VALUEOF (LISPXHISTORY) PFI.SORT.INDICES ( -*PFI-INDEX-ORDER*) FIXATOM (FAULTPOS ONLYSPELLFLG PARENT GLOBALVARS SPELLINGS3 CLISPCONTEXT -CLISPIFWORDSPLST :RESPELL CLISPFORWORDSPLST CLISPISWORDSPLST WTFIXCHCONLST CLISPINFIXSPLST -WTFIXCHCONLST1) INFILECOM (TYPE COMMENTFLG NAME MACROPROPS) IDATE (TIME.ZONES) \\HDCPYDISPLAY.FIX.XPOS - (MICASPERPT) RAND (MAX.SMALLP) \\FTP.OPENFILE (DEFAULTFILETYPE) \\LOCATE.NSNET (\\NS.ROUTING.TABLE -\\ROUTING.TABLE.MASK \\RT.INFINITY) \\DSPRIGHTMARGIN.HDCPYDISPLAY (MICASPERPT) \\NSFILING.GDATE ( -MIN.FIXP) SPY.MAKE.TREE (SPY.ICON) IDLE (IDLE.PROFILE) \\GENERIC.READP (EOL.TC \\MAXTHINCHAR -\\PRIMTERMSA NSCHARSETSHIFT \\NORUNCODE) INITUFNTABLE (|\\UFNTable| |\\UFNTableSize| \\OPCODES) -CHAT.CLOSE (CHATWINDOW HIGHLIGHTSHADE) GETHASH (\\HASH.NULL.VALUE) DO?CMD (RDTBL \\BUFFER |null| -\\CURSOR) COMPILER::ALPHA-LAMBDA-LIST (:REQUIRED) TTRATOM (\\ENDBUFFER |null|) GETPUPSTRING ( -\\PUPOVLEN) SETY.IP (SETYREL SETXY) \\FTP.HANDLE.NO (\\NO.FILE.NOT.FOUND FTPDEBUGLOG -\\NO.BAD.TRANSFER.PARMS \\NO.BAD.EOLCONVENTION \\NO.FILE.PROTECTED \\NO.ILLEGAL.CONNECTPASSWORD -PROMPTWINDOW \\NO.ILLEGAL.USERNAME \\NO.ILLEGAL.USERPASSWORD \\NO.ILLEGAL.NAME.ERRORS -\\NO.STORAGE.FULL) \\NSFILING.GETFILEINFO.FROM.PLIST (\\LISP.TO.NSFILING.ATTRIBUTES) MAKEIBMFORMAT ( -:IBM) CREATEFIELDS (FIELDS.IN.CREATE) \\ATMOUT (\\PNAME.HI \\PLIST.HI) PRINT-EVENT (INPUTFONT HISTSTR0 - PRINTOUTFONT VALUEFONT) \\TEDIT.COMMAND.LOOP (\\SCRATCHLEN TEDIT.READTABLE \#CURRENTRDTBL# -\\PRIMTERMSA \\MAXTHINCHAR CHARDELETE.TTC WORDDELETE.TTC DELETE.TTC UNDO.TTC REDO.TTC FUNCTIONCALL.TTC - NEXT.TTC EXPAND.TTC CHARDELETE.TC WORDDELETE.TC LINEDELETE.TC) SEDIT::OUTPUT-CR (MICASPERPT) -*WHO-LINE-COLOR* (:WHITE) SETUPSTACK (\\STACKSPACE |\\InitStackSize| |WordsPerPage| WORDSPERCELL -|\\StackAreaSize| RESETPC RESETPTR) BSPPUTMARK (\\PT.MARK) COMPILER::COMPILE-ONE-LAMBDA ( -COMPILER::*NULL-CONTEXT*) \\MAKEBRUSH.SQUARE (BLACKSHADE) TTYIN.SHOW.?ALTERNATIVES (\\MAXTHINCHAR -\\RDTBLSA MULTIPLE-ESCAPE.RC ESCAPE.RC SPLST USERWORDS \\LASTCHAR DIDESCAPECODE *PRINT-CASE* :UPCASE -RDTBL) \\XIPERROR (\\XIPT.ERROR \\XIPOVLEN) \\BULK.DATA.CLOSE (|WriteBit| |AppendBit|) LISPXUSE ( -HISTSTR0) \\PUTFIXP (\\FIXP \\SMALLP \\FLOATP) FIX89TYPEIN (FAULTPOS FAULTX) FMAX (MIN.FLOAT) MOVD ( -\\DEF.HI) TEDIT.GET.OBJECT (DEFAULTFONT) SEDIT::LINEARIZE-LIST (SEDIT::TYPE-COMMENT) CHANGECALLERS ( -DEFAULTRENAMEMETHOD FILELST) \\PUTSWAPPEDFIXP (\\FIXP \\SMALLP \\FLOATP) \\PAGED.INCFILEPTR ( -BYTESPERPAGE) FMIN (MAX.FLOAT) \\MAKEBRUSH.ROUND (BLACKSHADE) DO.INSERT.LINE (\\DSP \\DESCENT \\RMARG -\\LMARG \\TTPAGELENGTH \\CHARHEIGHT \\BMARG) GETPUPSTREAM (\\PUPOVLEN) |\\VFMBlankInterval| ( -|\\VFMvolumeHandle| |\\VFMintervals| |treeDepth|) SETYREL.IP (SETYREL) EDITBMBUTTONFN ( -LASTMOUSEBUTTONS \\CURRENTCURSOR \\CURSORDESTINATION WHITESHADE BLACKSHADE SCREENWIDTH SCREENHEIGHT) -CLOSEBSPSTREAM (\\RTP.DEFAULTTIMEOUT \\STATE.OPEN \\STATE.ENDRECEIVED) PRINT-EVENT-PROMPT (PROMPTFONT -XCL:*EXEC-PROMPT*) \\IBMPEEKCCODEFN (NSCHARSETSHIFT \\NORUNCODE *IBMTOXEROXMAP*) GETDEFN (\\DEF.HI) -\\SIN.OLD (2PI PI/180 -PI/2 3PI/2 PI/2 CL:PI PI/4 UBFLOAT3 4/PI) \\MAKEBRUSH.VERTICAL (BLACKSHADE) -\\TEDIT.REFRESH.SHOWSEL (TEDIT.SELECTION TEDIT.SHIFTEDSELECTION TEDIT.MOVESELECTION -TEDIT.DELETESELECTION TEDIT.COPYLOOKSSELECTION) U/L-CASE (\\ARROW) IMAX (MIN.INTEGER) -|\\VFMCreateIntervals| (|maxLogicalVolumes|) SETXYREL.IP (SETXYREL) %CML-TYPE-TO-TYPENUMBER ( -%FAT-CHAR-TYPENUMBER) EDITMOVENODE (PROMPTWINDOW LASTMOUSEBUTTONS) MAKECREATE1 (USINGTYPE MSBLIP -FIELDINFO FIELDS.IN.CREATE RECORDEXPRESSION DECLST RECORD.TRAN) WRITE (*STANDARD-OUTPUT* -*PRINT-ESCAPE* *PRINT-RADIX* *PRINT-BASE* *PRINT-LEVEL* *PRINT-LENGTH* *PRINT-CASE* *PRINT-GENSYM* -*PRINT-ARRAY* *PRINT-PRETTY* *PRINT-CIRCLE*) MAKEWITHINREGION (WHOLEDISPLAY) IMIN (MAX.INTEGER) -LOCALVARS (SYSSPECVARS) ACCEPT-UNIX-SOCKET-STREAM (*NEW-SHELL-DEVICE* LF.EOLC -\\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS FILELINELENGTH |NoBits| *SHELL-DEVICE*) FNS.PUTDEF ( -LAMBDASPLST) \\BSP.HANDLE.DATA (\\PUPOVLEN) TTUNREADBUF (\\CURSOR \\ENDBUFFER) \\HANDLE.RAW.XIP ( -\\EPT.XIP MASKWORD1\'S \\NSOCKETS XIPTRACEFILE \\XIPT.ECHO |\\NS.WKS.Echo| \\XECHO.OP.REQUEST -\\XIPE.CHECKSUM \\XECHO.OP.REPLY \\XIPE.NOSOCKET \\XIPE.SOCKETFULL \\NS.ROUTING.TABLE) SPY.INIT ( -SPY.BUFFER.SIZE) COMPILER::ALPHA-LABELS (:NAME :SCOPE :LEXICAL :KIND :FUNCTION :BINDER) \\MOVEBYTES ( -BYTESPERWORD) MAX (MIN.INTEGER) WORDSPERNAMEENTRY (:3-BYTE COMPILER::*TARGET-ARCHITECTURE* -:3-BYTE-INIT) \\IFS.LOOKUPFILE (\\SOCKET.LOOKUPFILE \\PT.LOOKUPFILE \\MAXETHERTRIES -\\PT.LOOKUPFILEREPLY \\PT.LOOKUPFILEERROR \\PT.ERROR \\PUPE.NOSOCKET PUPTRACEFILE) DELDEF (MACROPROPS -LISPXMACROS LISPXHISTORYMACROS) \\NSFILING.GETEOFPTR (|AppendBit| |WriteBit|) RETDWIM1 (CLISPCHARS) -\\FTPERROR (FTPDEBUGLOG) \\BSP.HANDLE.ACK (\\BSP.MIN.ADATA.TIMEOUT \\BSP.MAX.ADATA.TIMEOUT -\\PT.INTERRUPT \\PUPOVLEN \\BSP.ALLOCHYSTERESIS \\BSP.MAXPUPALLOC \\MAX.PUPLENGTH) FIXSPELL ( -DWIM.GIVE.UP.TIME DWIM.GIVE.UP.INTERVAL FIXSPELLREL SPELLINGS1 SPELLINGS2 SPELLINGS3 LASTWORD -LISPXHIST SPELLSTR1) CL:FIND-PACKAGE (*PACKAGE-FROM-NAME*) FIXLAMBDA (LAMBDASPLST) READ-AFM-FILE ( -|WeightMenuItems| |SlopeMenuItems| *POSTSCRIPT-EXTRA-CHARACTERS*) \\LOAD-STREAM (*PACKAGE* FILERDTBL -DFNFLG BUILDMAPFLG ADDSPELLFLG LISPXHIST *OLD-INTERLISP-READ-ENVIRONMENT* FASL:SIGNATURE) MIN ( -MAX.INTEGER) UNSAFE.TO.MODIFY (UNSAFE.TO.MODIFY.FNS DWIMWAIT) CLISPFOR0 (CLISPDUMMYFORVARS VARS -NOFIXFNSLST NOFIXVARSLST HISTENTRY LISPXHIST) |\\VFMMarkBufferDirty| (|\\VFMbufferPool|) FM.EDITITEM ( -\\FM.GROUPSPEC) SEDIT::DOT-THIS-LIST (SEDIT::TYPE-DOTLIST) |\\LFDeleteFile| (|\\LFtopMonitor|) HASDEF -(MACROPROPS LISPXMACROS LISPXHISTORYMACROS USERMACROS FILEPKGCOMSPLST FILEPKGTYPES) FDIFFERENCE ( -FDIFFERENCE) |\\PFReplaceString| (%FAT-CHAR-TYPENUMBER) XCL:FIND-PROFILE (XCL::*PROFILES*) -FIND.CHAT.PROTOCOL (CHAT.PROTOCOLTYPES) FIXEDITDATE (LAMBDASPLST COMMENTFLG) XCL::VARIABLE-SPECIAL-P ( -:UNSURE) XCL:LIST-ALL-PROFILES (XCL::*PROFILES*) COMP.EXP1 (COMPILE.CONTEXT) COMPILER::SET-CONSTANT-VALUE - (COMPILER::*CONSTANTS-HASH-TABLE*) FABS (UBFLOAT1) READ-UNICODE-MAPPING-FILENAMES (UNICODEDIRECTORIES - XCCS-SET-NAMES) XCL:PROFILE-NAME (XCL:*PROFILE*) LOAD (LOADOPTIONS LOADPARAMETERS) PPSPPSTREAM ( -\\SPPFLAG.END \\SPPFLAG.ATTENTION \\SPPFLAG.EOM) \\BOXFPLUSDIF (\\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER - \\SMALLP \\EXPONENT.BIAS \\8BITS \\SIGNBIT \\MAX.EXPONENT \\HIDDENBIT) SETUPTIMER (\\RCLKMILLISECOND -\\RCLKSECOND) TTCOMPLETEWORD (\\CURSOR \\BUFFER SPLST \\MAXTHINCHAR \\RDTBLSA MULTIPLE-ESCAPE.RC -ESCAPE.RC *PACKAGE* \\CURSORCOL SPELLSTR1 USERWORDS) DEFAULTPRINTER (DEFAULTPRINTINGHOST) -\\10MB.TURNONETHER (\\IOPAGE |\\InterfacePage| \\#WDS.NSHOSTNUMBER) DINFO.UPDATE.FMENU (FASSOC) -ADDSPELL2 (SPELLSTR2) SPY.ADD.ENTRY (SPY.BUFFER SPY.BUFFER.SIZE) FASL::DUMMY-HANDLE (:STREAM :OUTPUT -:STATE :BLOCK :HASH) \\CHARWIDTH.HDCPYDISPLAY (IHALFMICASPERPT IMICASPERPT) \\SPP.SYSPKT ( -\\SPPHEAD.CC.SYSTEM) BSPOPENP (\\STATE.OPEN \\STATE.ENDRECEIVED \\STATE.ENDSENT) \\BOXFQUOTIENT ( -\\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER \\SMALLP \\EXPONENT.BIAS \\8BITS \\SIGNBIT \\MAX.EXPONENT -\\HIDDENBIT \\OVERFLOW) NEWDEFC (SVFLG *ERROR-OUTPUT*) \\IBMINCCODEFN (NSCHARSETSHIFT \\NORUNCODE -*IBMTOXEROXMAP*) |\\LFRenameFile| (|\\LFtopMonitor|) COMPILER::ALPHA-IF (:PRED COMPILER::*PREDICATE-CONTEXT* - :THEN :ELSE) \\NULL.OPENFILE (\\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS FILELINELENGTH LF.EOLC -|NoBits|) \\BOXFTIMES2 (\\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER \\SMALLP \\EXPONENT.BIAS \\8BITS -\\SIGNBIT \\MAX.EXPONENT \\HIDDENBIT) HISTORY-NTH (*CURRENT-EVENT*) XCL:RESTORE-PROFILE (XCL:*PROFILE* -) COMP.STRETURN (OPRETURN) \\LFINITCASEARRAY (\\DISKNAMECASEARRAY) XCL::VARIABLE-LEXICALLY-BOUNDP ( -:UNSURE XCL::*LEXICAL-VARIABLES*) \\BSP.HANDLE.INTERRUPT (\\PT.INTERRUPTREPLY \\PUPOVLEN) EDITP ( -USERWORDS) |\\PFTransferFilePage| (|\\PhysVolumePage|) \\NSFILING.CLOSE.BULKSTREAM (RESETSTATE) -CL::CACHE-SLOT-INFO (CL::*DEFSTRUCT-INFO-CACHE*) TTRUBOUT (\\ARROW \\CURSOR \\BUFFER) SCALE.FONT ( -DECREASING.FONT.LIST) \\SEARCHINTERPRESSFONTS (INTERPRESSFONTDIRECTORIES INTERPRESSFONTEXTENSIONS) -EDITV (LASTWORD) |\\VFMDelete1| (|\\VFMlowPtr| |\\VFMhighPtr| |\\VFMinterval| |nextKey| |\\VFMhigh|) -SETX.IP (SETXREL SETXY) \\FILEOUTCHARFN (\\NORUNCODE NSCHARSETSHIFT CR.EOLC LF.EOLC CRLF.EOLC) -GRAPHEDITCOMMANDFN (EDITGRAPHMENUCOMMANDS) TIMEREXPIRED? (\\TIMEREXPIRED.BOX) TIME.UNTIL ( -\\TIMEREXPIRED.BOX) TEDIT.UNDO.DELETION (INSPC#) BRH/LAYOUT (PERSONALD MOTHERD) \\ARGPTR (MYALINK -\\DEF.HI \\STACKHI WORDSPERCELL \\#ALINK.OFFSET) |\\VFMDelete2| (|nextKey| |\\VFMlow| |\\VFMold| -|\\VFMoldPtr| |\\VFMhighPtr| |deleteLevel|) SETXY.IP (SETXY) FM.SHADE (\\FM.GROUPSPEC) LISPXEVAL ( -LISPXHISTORY) SETARG (\\STACKSPACE) |\\LFTruncateFile| (BYTESPERPAGE) RETDWIM (SIDES LISPXHIST FAULTFN - FAULTX PARENT CLISPCHARRAY CHARLST FAULTPOS) \\ARG (\\STACKSPACE) TEDITCHAT.MENUFN (LASTMOUSEBUTTONS -TEDITCHAT.MENUITEMS) FILEMAP (FILECREATEDLST) COERCETEXTOBJ (|ReadBit|) COMPILER::CONSTANT-EXPRESSION-P - (:NONE) DO.CHAT.OPTION (PROMPTWINDOW) |\\VFMCorrectBufferP| (|\\VFMvolumeHandle|) PUTDEFN (\\DEF.HI -BITSPERBYTE LOCKEDFNS OUTX) \\MAKEBRUSH.HORIZONTAL (BLACKSHADE) \\INIT.ETHER.BUFFER.POOL ( -|\\InterfacePage| WORDSPERQUAD \\MACHINETYPE \\DAYBREAK |\\DoveEther.IOIOCBLength| \\IOCB.LENGTH -\\MAXIOCBS \\10MB.MAX.INPUT.LENGTH) \\SETRTPPORTS (WORDSPERPORT) STKNTH (MYALINK \\STACKHI -\\#ALINK.OFFSET WORDSPERCELL) \\DSPFONT.HDCPYDISPLAY (MICASPERPT \\MAXTHINCHAR) INITDATATYPENAMES ( -|\\EndTypeNumber| INITIALDTDCONTENTS |\\DTDSpaceBase| \\LITATOM \\NEW-ATOM) XCL:SAVE-PROFILE ( -XCL:*PROFILE*) \\LEAF.GETFILEINFO.OPEN (\\OFFSET.FILETYPE \\LEN.FILETYPE&SIZE \\FT.UNKNOWN \\FT.TEXT -\\FT.BINARY \\OFFSET.AUTHOR \\LEN.AUTHOR \\OFFSET.BACKUPDATE \\LEN.DATE) \\IDLERKEYACTION ( -IDLE.KEYACTIONTABLE) COMPILER::CONSTANT-VALUE (COMPILER::*CONSTANTS-HASH-TABLE*) IMAGESTREAMP ( -\\TERM.OFD *STANDARD-OUTPUT*) CL:GET-DISPATCH-MACRO-CHARACTER (*READTABLE*) SEDIT::DELETE-QUOTE ( -SEDIT::BASIC-GAP) SETSTKNAME (\\STACKHI GCREF) CREATE-UNIX-SOCKET-STREAM (*NEW-SHELL-DEVICE* LF.EOLC -\\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS FILELINELENGTH |NoBits| *SHELL-DEVICE*) \\LEAF.READFILEPROP ( -\\LEAFOP.READ \\OPCODE.SHIFT \\BYTES.PER.TRIDENT.PAGE \\LEN.FILEREQUEST NOFILEPROPERROR -\\LEAF.GOODSTATUS \\LEN.READANSWER) FB.NAMES.INCREASING.VERSION (UPPERCASEARRAY) |\\LFGetFileInfo| ( -|\\LFtopMonitor| BYTESPERPAGE) PUTFILEMAP (*FILEMAP-HASH*) FTPPRINTCODE (FTPDEBUGLOG FTPNOCODES) -COMPILER::COMPILE-AND-DUMP (:FUNCTION) \\GETREGION.CHECKOPPT (NEWREGIONFNARG) CLISPCAR/CDR (ENDTAIL) -|\\LFCreateDirectories| (|maxLogicalVolumes|) CL:GET-MACRO-CHARACTER (*READTABLE*) XCL:OPEN-STREAM-P ( -|NoBits|) STKSCAN (MYALINK \\STACKHI WORDSPERCELL \\#ALINK.OFFSET) |\\PFPutFileMapPage| ( -|\\PFFileMapFileD|) TEDIT.REDO.INSERTION (START-OF-PIECE) %TWOD-ARRAY-P (%TWOD-ARRAY) WTFIX0 (FAULTPOS -) \\FRAMESCAN (\\STACKHI IVARCODE PVARCODE WORDSPERCELL FVARCODE) |\\VFMFreeVPage| ( -|\\VFMvolumeHandle| |\\PFFileMapFileD|) \\DO-DEFINE-FILE-INFO (*INTERLISP-PACKAGE* FILERDTBL) INITGC ( -\\HTMAIN \\HTMAINSIZE \\HTOVERFLOW \\HTBIGCOUNT WORDSPERPAGE \\HTCOLLSIZE) %ONED-ARRAY-P (%ONED-ARRAY) - \\INFINITY (\\MAX.EXPONENT \\MAX.HI.FRAC) CL:MAKE-DISPATCH-MACRO-CHARACTER (*READTABLE*) -COMPILER::ALPHA-IL-FUNCTION (COMPILER::*ENVIRONMENT* :FN :ARGS) COMPILER::CHECK-GLOBAL-CONSTANT ( -COMPVARMACROHASH) ADDSPELL (\#USERWORDS \#SPELLINGS2 \#SPELLINGS3) CL:SET-MACRO-CHARACTER (*READTABLE* -) PSCFONTFROMCACHE.SPELLFILE (POSTSCRIPT.FONT.ALIST POSTSCRIPTFONTCACHE) UPDATEFILEMAP (DFNFLG) -CL:SET-SYNTAX-FROM-CHAR (*READTABLE* CMLRDTBL) %GENERAL-ARRAY-P (%GENERAL-ARRAY) XCL:COPY-PROFILE ( -XCL:*PROFILE*) CL:SET-DISPATCH-MACRO-CHARACTER (*READTABLE*) MOVE.FORWARD.TO (\\CURSORCOL \\ARROW) +SEDIT::ACTUAL-LLENGTH SEDIT::ACTUAL-WIDTH SEDIT::LAST-LINE) BEEPON (DLBEEPFREQ DLBEEPCMD) \SETPOS.PSC +(POSTSCRIPTMOVEFLG) \TEDIT.RESHAPEFN (WTOP WRIGHT WBOTTOM WLEFT YBOT NEXTLINE PREVLINE YBASE) \TTW1 ( +NEXTW SCTOPW) COMP.LAM1 (OPNAME) \STRINGSTREAM.INIT (DEVICENAME CLOSEFILE DELETEFILE DIRECTORYNAMEP +EVENTFN GENERATEFILES GETFILEINFO GETFILENAME HOSTNAMEP OPENFILE READPAGES REOPENFILE SETFILEINFO +TRUNCATEFILE WRITEPAGES BIN F2 F1 PEEKBIN READP BACKFILEPTR EOFP) TEDIT.RAW.INCLUDE ( +TXTRAWINCLUDESTREAM PFILE PFPOS PLEN PREVPIECE NEXTPIECE PLOOKS PPARALAST PPARALOOKS TEXTLEN CHLIM CH# + DCH DX POINT SELKIND SELOBJ \DIRTY PC PCOFF PCNO) \DSPSPACEFACTOR.PSC (POSTSCRIPTSPACEFACTOR +POSTSCRIPTSPACEWIDTH) \CreateCursorBitMap (BITMAPRASTERWIDTH BITMAPWIDTH BITMAPHEIGHT BITMAPBASE) +INTERRUPTED (IN-PROGRESS P-ETHERINTERRUPT P-LOGMSGSPENDING P-IOINTERRUPT P-STORAGEFULL P-STACKOVERFLOW + P-VMEMFULL P-GCDISABLED INTCHARCODE WAITINGINTERRUPT P-WAITINGINTERRUPT) BEEPOFF (DLBEEPCMD) +%%MAKE-GENERAL-ARRAY (STORAGE READ-ONLY-P INDIRECT-P BIT-P STRING-P ADJUSTABLE-P DISPLACED-P +FILL-POINTER-P EXTENDABLE-P TYPE-NUMBER OFFSET FILL-POINTER TOTAL-SIZE DIMS) \TEDIT.CUMULATE.EVENTS ( +THLEN NEXTPIECE PREVPIECE) \DOMISCAPPLY1 (MISCSTACKRESULT) MAKE-UNICODE-FORMATS (NAME EOL INCCODEFN +PEEKCCODEFN BACKCCODEFN OUTCHARFN) UPDATEPCNODES (TOTLEN) SELECT.LIST.INSPECTOR (ITEMS CENTERFLG) +COMP.CALL (EXTCALL) HLSTORGB (RED GREEN BLUE) SPP.BACKFILEPTR (COFFSET) \DISPLAYLINE (LEFT BOTTOM +WIDTH HEIGHT DDXPOSITION) IRM.CREF.BUTTONEVENTFN (HEIGHT WIDTH LEFT BOTTOM) \FM.EDIT-WORDDELETE ( +FM.LABEL) MBUTTON.CREATE (XSIZE YSIZE YDESC XKERN) \MEDW.GETSCREENPOSITION (SCREEN XCOORD YCOORD) +\DISABLEGC1 (NOREFCNT GCDISABLED) SEDIT::BUILD-INTERNAL-STRUCTURE (SEDIT::NODE-TYPE SEDIT::DEPTH +SEDIT::SUB-NODES SEDIT::LINEAR-FORM SEDIT::START-X SEDIT::ACTUAL-WIDTH SEDIT::ROOT SEDIT::CARET-POINT +SEDIT::SELECTION SEDIT::CURRENT-NODE SEDIT::\X SEDIT::OPEN-NODE SEDIT::OPEN-NODE-INFO SEDIT::BUFFER-STRING + SEDIT::SUBSTRING) SEDIT::CLOSE-NODE (SEDIT::OPEN-NODE-CHANGED?) \FM.EDIT-DELETE (FM.LABEL) +SEDIT::LINE-FINISHED (SEDIT::BLOCK-WIDTH SEDIT::BLOCK-START SEDIT::NEXT-BLOCK SEDIT::REPAINT-START +SEDIT::REPAINT-LINE SEDIT::REPAINT-X) ETHERHOSTNAME (PUPNET# PUPHOST# PUPLENGTH NETHOST SOCKET) +\GC.MODIFY.BIGREFCNT (OVFLCNTLO OVFLCNTHI CNT OVFLPTR STKBIT) \MAKE.PROCESS0 (MISCSTACKFN +MISCSTACKARG1 MISCSTACKARG2 PROCRESULT PROCFINISHED) \LEAF.REQUESTPAGE (LEAFCACHECNT FW6 OPWORD HANDLE + FILEADDRESS PAGE OFFSET READWRITEMODE DATALENGTH LEAFLENGTH) CHAT.TYPESCRIPT1 (TYPESCRIPTSTREAM) +\TEDIT.HISTORYADD (TXTHISTORY) \SLOWHDCPYBLTCHAR (DDXPOSITION PBTDESTBIT PBTWIDTH PBTSOURCEBIT) +DSPDESTINATION (DEVICE IMAGEOPS DDDestination) \GC.ENTER.BIGREFCNT (OVFLCNTHI OVFLCNTLO OVFLPTR CNT) +\LFFileSpec (VERSION EXPANDEDNAME FSDIRPTR) \SETDAYTIME0 (LONUM HINUM DLPROCESSOR2 DLPROCESSOR1 +DLPROCESSORCMD DLTODVALID) CLEARHASHFILES (Valid?) \VFMGenerateFileIDs (filePage) \BLTSHADE.BITMAP ( +PBTWIDTH PBTHEIGHT) \BITBLT.BITMAP (PBTWIDTH PBTHEIGHT) \HANDLE.PUP.ROUTING.INFO (RTNET# RTTIMER +RTGATEWAY# RTNDB RTHOPCOUNT RTRECENT) \FTP.FIX.BROKEN.INPUT (FTPIN FTPOUT) \TEXTMENU.START (LEFT +BOTTOM WIDTH HEIGHT MENUFLG) \FORMATLINE (RIGHTMARGIN YBOT LOOKSUPDATEFN CHARLIM DIRTY CHAR1 CR\END +LHASTABS PC PCOFF PCNO LHASPROT DISPLAYHCPYDS LMARK 1STLN LEFTMARGIN LSTLN PTTABX LHEIGHT ASCENT +DESCENT CHARTOP LXLIM SPACELEFT DESC LEN LFMTSPEC) CHAT.TYPEOUT (TERM.STATE) \HARDRESET-CLEANUP ( +PROCHARDRESETINFO) \FM.EDIT-BACKUP (FM.LABEL) CL:VECTOR-POP (FILL-POINTER) \HARDRESET-CLEANUP1 ( +%#FRAMENAME NTSIZE NAMETABLE PVVALUE BOUND) \NSRANDOM.DESTROY.STREAM (CBUFDIRTY CBUFSIZE CBUFPTR +NSFILING.SERVER.LENGTH) IMAGEFNSCREATE (DISPLAYFN IMAGEBOXFN PUTFN GETFN COPYFN BUTTONEVENTINFN +COPYBUTTONEVENTINFN WHENMOVEDFN WHENINSERTEDFN WHENDELETEDFN WHENCOPIEDFN WHENOPERATEDONFN PREPRINTFN) + ICONTITLE (ICREGION ICFONT ICJUST) TB.UNDELETE.ITEM (TIDELETED TB#DELETED) \CREATEPRESSFONT ( +FONTDEVICE FONTFAMILY FONTSIZE FONTFACE \SFFACECODE ROTATION FONTSCALE \SFHeight \SFAscent \SFDescent) + SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::SELECT-NODE SEDIT::SELECT-START SEDIT::SELECT-END +SEDIT::SELECT-START-X SEDIT::SELECT-TYPE) FB.UPDATEBROWSERITEMS (INFODISPLAYED INFOWIDTH FBREADY +BROWSERFONT DELETEDFILES DELETEDPAGES TOTALPAGES TOTALFILES SORTMENU PATTERNPARSED? SIZEINDEX +PAGECOUNT? NOSUBDIRECTORIES SORTATTRIBUTE SORTBY) \RELEASE.FTPCONNECTION (FTPBUSY) +TWODINSPECT.SELECTROWPROP (ELTWIDTH ELTLEFT ELTBOTTOM PROP) PFI.SETUP.TRANSLATIONS (OUTCHARFN) +SPP.FORCEOUTPUT (XIPLENGTH SPPFILEPTRLO SPPFILEPTRHI FW6 SPPOUTPKT CBUFMAXSIZE COFFSET CBUFPTR +ENDOFMESSAGE SPPOUTPUTABORTEDP) \GCMAPSCAN (NXTPTR LINKPTR CONTENTS FREEPTR EMPTY) +\FTP.OPEN.CONNECTION (FTPIN FTPOUT FTPHOST FTPBUSY) OPT.JFIXPASS (JU) SEDIT::ATOM-CHANGE-RELINEARIZE ( +SEDIT::CHANGED?) \10MBRAWRECEIVE (10MBLENGTH EPTYPE) \HCPYMODEDISPLAYINIT (IMAGETYPE IMFONT +IMRIGHTMARGIN IMLEFTMARGIN IMLINEFEED IMDRAWLINE IMDRAWCURVE IMDRAWCIRCLE IMDRAWELLIPSE IMFILLCIRCLE +IMBLTSHADE IMBITBLT IMXPOSITION IMYPOSITION IMMOVETO IMSTRINGWIDTH IMCHARWIDTH IMFONTCREATE IMSCALE +IMNEWPAGE IMSPACEFACTOR) TB.NTH.ITEM (TBTAILHINT) GRAPHOBJ.BUTTONEVENTINFN (ITEMS) \PUTFIXP (HINUM +LONUM) \DORETCALL (MiscFXP) REGIONONSCREEN (LEFT BOTTOM WIDTH HEIGHT) \FREELISTCELL (CDRCODE NEXTCELL +CNT NEXTPAGE DTDNEXTPAGE) \PUTSWAPPEDFIXP (LONUM HINUM) TEDIT.MAKESEL (CH# CHLIM DCH POINT \TEXTOBJ +SET) FW-FORGET-STREAM (OFDSTATUS) SEDIT:SEDIT (SEDIT::CHANGED-STRUCTURE?) TEDIT.FORMATBOX (LEFT BOTTOM + REGIONSPEC PAGELINECACHE LTEXTOBJ CHNO) \NSFILING.FILLIN.ATTRIBUTES (NSHATTRIBUTES NSHPATHNAME +NSHFILEID NSHDIRECTORYP) \GETBRUSHBBT (PBTDESTBPL PBTSOURCEBPL PBTFLAGS PBTDISJOINT PBTOPERATION +PBTSOURCETYPE) SEDIT::SCAN-STRING (SEDIT::POINT-INDEX SEDIT::POINT-TYPE SEDIT::POINT-LINE SEDIT::POINT-X + SEDIT::SELECT-START SEDIT::SELECT-END SEDIT::SELECT-TYPE SEDIT::SELECT-START-LINE SEDIT::SELECT-END-LINE + SEDIT::SELECT-END-X SEDIT::SELECT-START-X) \DOSTACKFULLINTERRUPT (STACKOVERFLOW) +\PFCreateFileDescriptors (volNum type size fileID) \BACKFORMAT (YBOT YBASE PREVLINE NEXTLINE) \VECPUT +(VECMOVINGRIGHT VECCURX VECCURY VECWASDISPLAYING VECSEGCHARS) NIL +REFFREE \FREELISTCELL (\CONSPAGE.LAST) COMPILE-FILE-SCAN-FIRST (DFNFLG) MSSTOREDATA (MSCHANGEDARRAY +MSDATABASELST NODUMPRELATIONS) \UFS.RECOGNIZE.FILE (\DSKtopMonitor \UFStopMonitor MAX-PATHNAME-LEN +\FIXP RECOG-OLD RECOG-OLDEST RECOG-NEW RECOG-NEW-OLD RECOG-NON) FASL:OPEN-FASL-HANDLE (FASL:SIGNATURE +FASL:CURRENT-VERSION :STREAM) \GETFTPCONNECTION (\FTPCONNECTIONS FTPDEBUGLOG UPPERCASEARRAY +PROMPTWINDOW) \TYPENUMBERFROMNAME (\MaxTypeNumber \DTDSpaceBase) FASL:MAKE-OPTABLE (FASL::END-MARK) +\DEVICE.OUTPUT (MISC2) \COURIER.CHECK.ERRORS (COMMENTFLG) \ALLOCPAGEBLOCK (WORDSPERPAGE) +\TEDIT.COMMAND.LOOP (\SCRATCHLEN TEDIT.READTABLE %#CURRENTRDTBL# \PRIMTERMSA \MAXTHINCHAR +CHARDELETE.TTC WORDDELETE.TTC DELETE.TTC UNDO.TTC REDO.TTC FUNCTIONCALL.TTC NEXT.TTC EXPAND.TTC +CHARDELETE.TC WORDDELETE.TC LINEDELETE.TC) \DISPLAYLINE (WHITESHADE LMInvisibleRun LMLooksChange +BLACKSHADE) \BITBLTSUB (SUBRCALL) \ALLOCVIRTUALPAGEBLOCK (\NxtArrayPage \GUARDSTORAGEFULL \NxtMDSPage +\PagesPerMDSUnit \STORAGEFULLSTATE \SFS.SWITCHABLE \SFS.ARRAYSWITCHED \SecondArrayPage \SecondMDSPage) + \DSPSPACEFACTOR.IP (AMPLIFYSPACE) FLIPCURSOR (\EM.CURSORBITMAP HARDCURSORHEIGHT HARDCURSORWIDTH +\MACHINETYPE \DAYBREAK \MAIKO) GETNSPRINTER (PROMPTWINDOW) \SET.STORAGE.STATE (\MACHINETYPE \DOLPHIN +\DANDELION \InterfacePage \SFS.SWITCHABLE \SFS.NOTSWITCHABLE) COPYFILES (DWIMWAIT) +FASL:UNIMPLEMENTED-OPCODE (:OPNAME) SETUPFONTS.PRESS (DEFAULTFONT) \READNUMBER.OUTLINEREGION ( +BLACKSHADE) VRULE.CREATE (VRULE.IMAGEFNS VRULE.DEFAULT.HEIGHT TEXTOBJ) SPYOBJ (LABEL SPYOBJ.IMAGEFNS) +TEDIT.DISPLAYTEXT (WHITESHADE) PFI.PROCESS.FILE (*PFI-PREVIEWERS* *STANDARD-INPUT*) CL::%%EXP-FLOAT ( +CL::%%LOG-BASE2-E CL::%%EXP-TABLE CL::%%EXP-POLY) UNIX-USERNAME (\MACHINETYPE \MAIKO) +\HANDLE.RAW.OTHER (XIPTRACEFILE) FB.UPDATEBROWSERITEMS (FB.BROWSERFONT FB.INFO.FIELDS UPPERCASEARRAY) +SUBSTRING (\ST.POS16 \ST.BYTE) SEDIT::SET-POINT-LIST (SEDIT::TYPE-DOTLIST) XCL::IMPLICIT-KEY-MAP-HASH +(XCL::*DELETED-IMPLICIT-HASH-SLOT*) MAKETITLEBARICON (MinWindowWidth) RECLAIMMIN (MAX.SMALL.INTEGER) +ALLOCSTRING (\MaxArrayLen \MAXTHINCHAR \ST.POS16 \ST.BYTE) \FTP.PRINTPLIST (\MAXTHINCHAR FTPDEBUGLOG) *WHO-LINE-ENTRY-REGISTRY* (*WHO-LINE-USER-ENTRY* *WHO-LINE-HOST-NAME-ENTRY* *WHO-LINE-PACKAGE-ENTRY* *WHO-LINE-READTABLE-ENTRY* *WHO-LINE-TTY-PROC-ENTRY* *WHO-LINE-DIRECTORY-ENTRY* *WHO-LINE-VMEM-ENTRY* *WHO-LINE-SYMBOL-SPACE-ENTRY* *WHO-LINE-TIME-ENTRY* *WHO-LINE-SHOW-ACTIVE-ENTRY* -*WHO-LINE-PROFILE-ENTRY* *WHO-LINE-TTY-STATE-ENTRY*) FGREATERP (FGREATERP) DINFO.UPDATE.MENU.DISPLAY ( -\\DINFO.MAX.MENU.LEN MENUFONT) \\FILLRTPPUP (\\PUPOVLEN) TEDIT.WORDSET (\\MAXTHINCHAR -TEDIT.WORDBOUND.READTABLE PUNCT.TTC WHITESPACE.TTC TEXT.TTC) \\SETXFORM.PSC (:EOL) -XCL::VARIABLE-LEXICAL-P (:UNSURE XCL::*LEXICAL-VARIABLES*) \\COPYFNHEADER (WORDSPERQUAD GCREF) -\\BSP.DECLARE.FILEPTR (BITSPERWORD MAX.SMALL.INTEGER) \\SETARG (\\STACKSPACE) \\IBMOUTCHARFN ( -*XEROXTOIBMMAP*) |MakeMenuOfPrinters| (DEFAULTPRINTINGHOST) \\10MB.LOADINPUTQ (\\10MBPACKETLENGTH) -PFI.CENTER.PRINT (BOLDFONT *STANDARD-OUTPUT* DEFAULTFONT) %DEFPRINT-ARRAY (*READTABLE*) -OPENIMAGESTREAM (DEFAULTPRINTINGHOST IMAGESTREAMTYPES PRINTFILETYPES) RESUME (\\STACKHI -\\#ALINK.OFFSET MYALINK) COMPILER::ALPHA-GO (COMPILER::*TAGBODY-STACK* :TAGBODY :TAG) \\CML-LOAD ( -CMLRDTBL) PRINTCOPYRIGHT1 (*READTABLE*) LISPXREADBUF (HISTSTR0 HISTSTR3 HISTSTR2) PRINTERTYPE ( -PRINTERTYPES DEFAULTPRINTERTYPE DEFAULTPRINTINGHOST) ADDFILE (FILEPKGTYPES USERWORDS) UTOXCODE ( -*UNICODETOXCCS* TRANSLATION-SHIFT TRANSLATION-MASK) \\SPREADFRAMEP (\\STACKSPACE \\STACKHI -WORDSPERCELL) \\MAKEFLOAT (\\SIGNBIT MAX.POS.HINUM \\UNDERFLOW \\EXPONENT.BIAS \\8BITS -MAX.SMALL.INTEGER \\HIDDENBIT \\MAX.HI.FRAC \\MAX.EXPONENT \\OVERFLOW) LISPXPUT (LISPXHISTORY) -PRINTFILETYPE.FROM.EXTENSION (PRINTFILETYPES) NARGS (\\DEF.HI) MOVETO.IP (MOVETO) FIND.NON.SPACE ( -\\ENDBUFFER) \\NSFILING.ERRORHANDLER (NSFILING.SHOW.STATUS PROMPTWINDOW) TTNTHLINE (\\FIRSTLINE) -CLEARPUP (\\MAX.PUPLENGTH) \\RESUME (MYALINK \\STACKHI WORDSPERCELL \\#ALINK.OFFSET) PRINTCOPYRIGHT ( -DWIMWAIT COPYRIGHTOWNERS DEFAULTCOPYRIGHTOWNER DEFAULTCOPYRIGHTKEYLST) SETXREL.IP (SETXREL) -\\BSP.HANDLE.ERROR (\\PUPE.SOCKETFULL \\PUPE.GATEWAYFULL \\PUPE.NOSOCKET \\EVENT.ABORT) -\\NSFILING.HOSTNAMEP (\\SPP.BULKDATA.DEVICE) \\FLOAT (\\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER -\\EXPONENT.BIAS \\SMALLP :EXPECTED-TYPE :NAME :VALUE :MESSAGE) STKARGNAME (|\\AtomHI| \\STACKHI -WORDSPERCELL IVARCODE PVARCODE) \\CURVE2 (\\TOPWDS \\SCREENBITMAPS \\CURSORDESTINATION -\\EM.DISPINTERRUPT UBFLOAT3) %DEFPRINT-BITVECTOR (*READTABLE*) COMP.FLOATBOX (CODE) CLISPATOMIS2 ( -CLISPLASTSUB) SETSTKARGNAME (|\\AtomHI| \\STACKHI WORDSPERCELL IVARCODE PVARCODE \\LITATOM \\NEW-ATOM) - \\TEDIT2 (|BothBits|) %DEFPRINT-VECTOR (*READTABLE*) SETSTKARG (IVARCODE \\STACKHI WORDSPERCELL -PVARCODE) \\BITMAPTOSCREEN (\\SCREENS) SI::CLEAR-CLOSURE-CACHE (GCREF SI::*CLOSURE-CACHE*) PRINTERPROP - (PRINTERTYPES) TEDIT.WORDGET (\\MAXTHINCHAR TEDIT.WORDBOUND.READTABLE) \\CREATEINTERPRESSFONT ( -\\ASCIITONS ASCIITONSTRANSLATIONS \\ASCIITOSTAR) STKNARGS (\\STACKHI WORDSPERCELL) READLINE ( -LISPXREADFN HISTSTR4 HISTSTR0) \\ARBIN (*TEDIT-FILE-READTABLE*) \\FTP.EOL.FROM.PLIST (LF.EOLC -CRLF.EOLC CR.EOLC) CREATEMENUEDWINDOW (|WindowTitleDisplayStream| |WBorder|) \\BSP.TIMERFN ( -\\STATE.OPEN \\STATE.ENDSENT \\STATE.ENDRECEIVED \\EVENT.FORCECLOSE \\PT.ADATA \\PUPOVLEN) TTNLEFT ( -\\ARROW) MAINSCREEN (\\MAINSCREEN) EXEC-PRIN1 (*TERMINAL-IO*) CLISPATOMARE1 (CLISPLASTSUB) -\\COURIER.EXPEDITED.OVERFLOW (PROMPTWINDOW) HASH-B (*READTABLE*) FQUOTIENT (FQUOTIENT) LOOKUP-SYMBOL ( -\;) PFI.PRINT.INDICES (*STANDARD-OUTPUT*) LISPX/1 (LISPXFNS VARS) BCPL.TO.FLOATP (MAX.SMALL.INTEGER) -%DEFPRINT-GENERIC-ARRAY (*READTABLE*) |\\VFMFind| (|\\VFMinterval| |nullVolumePage| |\\VFMold| -|\\VFMlow| |\\VFMmaxKey|) FLOATP.TO.BCPL (MAX.SMALL.INTEGER \\FIXP) FM.REDISPLAYITEM (\\FM.GROUPSPEC) -\\LEAF.REPAIR.BROKEN.PUP (\\LEAFOP.READ \\LEAFOP.WRITE \\LEAFOP.TRUNCATE \\LEAFOP.DELETE -\\LEAFOP.CLOSE \\LEAF.BROKEN.STATUS) |\\LFGetFileName| (|\\LFtopMonitor|) CL::PROCESS-ACCESSORS (:ONLY -) GETSETQ (CLISPCHARRAY) GATHEREXPORTS (*DEFAULT-MAKEFILE-ENVIRONMENT* -*OLD-INTERLISP-READ-ENVIRONMENT*) XTOUCODE (*XCCSTOUNICODE* TRANSLATION-SHIFT TRANSLATION-MASK) -CHAT.BUTTONFN (LASTMOUSEBUTTONS) \\INTERPFRAMENT (\\STACKHI) PRINTSPP (\\SPPDSTYPE.COURIER -\\SPPDSTYPE.BULKDATA \\SPPDSTYPE.END \\SPPDSTYPE.ENDREPLY \\XIPOVLEN \\SPPHEAD.LENGTH) HASH-COLON ( -*READTABLE*) LINETO.IP (LINETO) TTYIN.BALANCE (\\BUFFER \\ENDBUFFER \\MAXTHINCHAR \\RDTBLSA -RIGHTBRACKET.RC \\CURSOR) FIND.SYMBOL (\; :INTERNAL :EXTERNAL :INHERITED) COMPILER::RESOLVE-VARIABLE-BINDING - (:LEXICAL COMPILER::*NEW-GLOBALS* GLOBALVARS COMPILER::*NEW-SPECIALS* LOCALFREEVARS SPECVARS -LOCALVARS :SPECIAL) COMP.STTAG (FRA) %DEFPRINT-STRING (*READTABLE*) \\NSRANDOM.HANDLE.ERROR (:PATHNAME - PROMPTWINDOW) \\TFBRAVO.GET.NAMEDTAB (\\NAMEDTAB.IMAGEFNS) \\POLYSHADE.BLT (MIN.INTEGER MAX.INTEGER) -FILEPKGCOMS.PUTDEF (FILEPKGTYPEPROPS) %NUMERIC-STRING-P (%FAT-CHAR-TYPENUMBER) \\NSFILING.WHENCLOSED ( -\\NSFILING.ACTIVE.SESSIONS) DINFO.UPDATE.HISTORY (DINFO.HISTORY.LENGTH MENUFONT) TTNTH (\\ARROW) -ONEDINSPECTW.CREATE (INSPECTORFONT |WindowTitleDisplayStream| INSPECTPRINTLEVEL) TEDIT.SETSYNTAX ( -\\MAXTHINCHAR TEDIT.READTABLE CHARDELETE.TTC WORDDELETE.TTC DELETE.TTC UNDO.TTC REDO.TTC CMD.TTC -FUNCTIONCALL.TTC NEXT.TTC EXPAND.TTC NONE.TTC) FILECREATED1 (PRETTYHEADER) MB.CREATE.NWAYBUTTON ( -NWAYBUTTONIMAGEFNS) \\GETREGION.CHECKBASEPT (NEWREGIONFNARG) HASH-DOT (*READTABLE*) SIZE/GRAPH/WINDOW -(DEFAULT.GRAPH.WINDOWSIZE SCREENWIDTH SCREENHEIGHT) PREINITARRAYS (\\VAL.HI |\\FirstArraySegment| -\\ARRAYSPACE2 |\\ArrayFrLst|) \\COMMONBACKCHARFN (\\NORUNCODE) |\\LFReadPages| (BYTESPERPAGE -WORDSPERPAGE) \\ITEMW.FLIPCOPY (GRAYSHADE) SETSPACE.IP (SPACE) FTPPRINTMARK (FTPDEBUGLOG FTPMARKTYPES) - EDITLOADFNS? (FILELST *TERMINAL-IO* DWIMWAIT) UNIX-STREAM-CLOSE (*SHELL-DEVICE*) TB.CLOSE/SHRINK ( -PROMPTWINDOW) BSP.PUTINTERRUPT (\\PT.INTERRUPT \\PUPOVLEN BYTESPERWORD) %INITIALIZE-DEFAULT-PATHNAME ( -:NEWEST) APPENDINTEGER.IP (SEQINTEGER) AT.END.OF.TEXT (\\ENDBUFFER) |\\PFGetFileMapPage| ( -|\\PFFileMapFileD|) \\QUEUE.INPUT.IOCB (\\MACHINETYPE \\DANDELION \\ES.PENDING \\DL.ENABLE.INPUT -\\DL.ETHERINPUTREG \\DAYBREAK \\DOLPHIN \\D0.ENABLE.10MBINPUT \\D0.INPUTSTATE) PFI.CONDENSE.INDEX ( -*PFI-FILTERS* UPPERCASEARRAY) COPY.WINDOW.TO.BITMAP (\\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS -\\SCREENBITMAPS) XCL::SHOW-CLOSURE-CACHE (SI::*CLOSURE-CACHE*) EQUALALL (ORIGTERMSYNTAX -ORIGDELETECONTROL) UNMAKEHARDCOPYSTREAM (\\DISPLAYIMAGEOPS) SAVECOPYRIGHT (COPYRIGHTFLG) \\FILLINSPP ( -\\EPT.XIP \\#WDS.SPPINFO) GET-NEXT-HISTORY-EVENT (:ID) EXPANDING-PAGEFULLFN (\\#DISPLAYLINES) -\\REUSETO (FD) |\\PFPutAllocationMapPage| (|\\PFAllocationMapFileD|) COMP.STJUMP (CODE FRA) -NSOCKETFROMNUMBER (\\NSOCKETS) CLISPATOMARE2 (TAIL PARENT) PARSERELATION1 (MSWORDS) HCOPYALL1 ( -DONTCOPYDATATYPES HPRINTHASHARRAY) \\HDCPYDSPPRINTCHAR (\\MAXTHINCHAR \\PRIMTERMSA INDICATE.CCE -SIMULATE.CCE REAL.CCE ERASECHARCODE IGNORE.CCE) SPY.MERGEINFO (SPY.MERGEINFO) PRETTYPRINT3 ( -CLISPIFYPRETTYFLG CHANGES COMMENTFLG DEFAULTFONT FNSLST) HASH-O (*READTABLE*) \\TURN.ON.HUNKING ( -\\HUNK.UNBOXEDSIZES UNBOXEDBLOCK.GCT \\HUNK.CODESIZES CODEBLOCK.GCT \\HUNK.PTRSIZES PTRBLOCK.GCT) -\\ADDLEAFSTRING (BYTESPERWORD \\PNAME.HI \\MAX.PUPLENGTH) |\\LFSetFileInfo| (|\\LFtopMonitor|) -LINELENGTH (MAX.SMALLP) \\FM.EDIT-UPDATEAFTERDELETE (WHITESHADE BITMAP BOXOFFSET ITEMWIDTH FONT WINDOW - DISPLAYLEFT DISPLAYBOTTOM MAXWIDTH) \\DUMPEXPORTS (BEGINEXPORTDEFSTRING ENDEXPORTDEFFORM) FIXR ( -\\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER \\SMALLP \\EXPONENT.BIAS \\8BITS \\SIGNBIT \\MAX.EXPONENT -\\HIDDENBIT \\OVERFLOW MAX.FIXP MIN.FIXP) CHAT.ICONFN (TTYKBD TTYKBDMASK TTYKBDICONSPECREGION) -CL:VECTOR-PUSH-EXTEND (*DEFAULT-PUSH-EXTENSION-SIZE*) FIND.PACKAGE (READSYS.PACKAGE.FROM.NAME -\\HASH.NULL.VALUE) COMPILER::ALPHA-FUNCTION (COMPILER::*CONTEXT* COMPILER::*NULL-CONTEXT*) ATAN ( -UBFLOAT3 PI/2 CL:PI 2PI 180/PI) FASL-FILEDATE (FASL:SIGNATURE) COMPILER::ALPHA-EVAL-WHEN ( -COMPILER::*LITERALLY-NIL*) ADDSPELL1 (SPELLSTR1) TEDIT.GETSYNTAX (\\MAXTHINCHAR TEDIT.READTABLE -WORDDELETE.TTC CHARDELETE.TTC DELETE.TTC UNDO.TTC REDO.TTC FUNCTIONCALL.TTC CMD.TTC NEXT.TTC -EXPAND.TTC) NEW/FN (CHCONLST) PPSPP (\\#WDS.NSADDRESS \\SPPDSTYPE.COURIER \\SPPDSTYPE.BULKDATA -\\SPP.RETRANSMITQ.SIZE) |\\LFExtendFile| (|\\LFrunSize|) %MAKE-PATHNAME (:HOST :DEVICE :DIRECTORY -:NAME :TYPE :VERSION) FILEPKGCHANGES (FILEPKGTYPES) COMPILE.FILE.APPLY (COMPILED.FILE) \\FILLBSPPUP ( -\\PUPOVLEN) HASH-R (*READTABLE*) COMPILER::RESOLVE-VARIABLE-REFERENCE (:VARIABLE) RECDEC? ( -CLISPTRANFLG CLISPRECORDTYPES) INITATOMS (|\\AtomHashTable| |\\AtomHTpages| \\PNAMELIMIT \\ATOMSPACE -\\LITATOM \\NEW-ATOM) HASH-X (*READTABLE*) SEDIT::COMPUTE-POINT-POSITION-LIST (SEDIT::TYPE-COMMENT) -RESETBUFS (READBUF) TRANSLATE.DATATYPE (:4-BYTE-TEMP COMPILER::*TARGET-ARCHITECTURE* :4-BYTE -BITSPERCELL BITSPERBYTE BITSPERWORD WORDSPERCELL |\\MDSIncrement|) \\NSFILING.DIRECTORYNAMEP (:ASK) -\\TEDIT.PAPERWIDTH (TEDIT.PAPER.SIZES) SEDIT::UNDO-COMMENT-CHANGE (SEDIT::TYPE-COMMENT-WORD) -POSTEDITALISTS (FILEPKGFLG) TYPE-VARIABLE-FROM-TYPE-NAME (\\PNAME.HI \\PLIST.HI) -\\SETUP.HUNK.TYPENUMBERS (\\BUILT-IN-SYSTEM-TYPES \\HUNK.PTRSIZES PTRBLOCK.GCT \\HUNK.UNBOXEDSIZES -UNBOXEDBLOCK.GCT \\HUNK.CODESIZES CODEBLOCK.GCT) DOWINDOWCOM (|WindowMenuCommands|) UNSAVED1 (DFNFLG) -OPT.CFRPTQ (COMPILE.CONTEXT) SENDXIP (\\EPT.XIP \\NS.READY.EVENT XIPTRACEFILE) PRETTYPRINT (PRTTYFILE -REPRINTFNS USERWORDS) EXTTOINT (\\EXPONENT.BIAS \\SIGNBIT) TERM.PRINTCHAR (BLACKSHADE -CHAT.UNDERLINE.DESCENT) ARCTAN2 (-PI CL:PI 180/PI) \\10MB.STARTDRIVER (\\RCLKSECOND -\\10MB.EXPECTED.RECEIVE.INTERVAL \\ES.PENDING) |\\DSKEventFn| (|\\DSKtopMonitor| \\UFS.GFS.TABLE) -TTLASTLINE (\\FIRSTLINE) HASH-STRUCTURE-LOOKUP (*CIRCLE-READ-LIST*) %REDUCE-INTEGER (MAX.FIXP) -\\SLOWRETURN (MYALINK \\STACKHI WORDSPERCELL) COMPILER::ALPHA-FLET (COMPILER::*ENVIRONMENT*) -SPY.MAKEGRAPHNODES (SPY.BORDERS TOPCOUNT SPY.FONT DEFAULT.GRAPH.NODELABELSHADE) HASH-NUMBER-SIGN ( -*CIRCLE-READ-LIST*) \\LEAF.USE.NEW.CONNECTION (\\LEAFOP.READ \\LEAFOP.WRITE \\LEAFOP.TRUNCATE -\\LEAFOP.DELETE \\LEAFOP.CLOSE |AppendBit| |WriteBit| \\LEAFOP.OPEN \\LEAF.BROKEN.STATUS) DWIMIFY0? ( -DWIMIFYFLG NOFIXFNSLST NOFIXVARSLST) FLTINTLOG (EXTPOWERS) GET-ENVIRONMENT-AND-FILEMAP (*FILEMAP-HASH* -) OLD.FIND.SYMBOL (\\MAXTHINCHAR \\ORIGREADTABLE |\\AtomHashTable| \\OLDATOMSPACE -\\NEWATOM-PNAMEOFFSET \\ATOMSPACE \\PLIST.HI \\LITATOM \\NEW-ATOM) CLISPATOM1 (FAULTX LPARKEY RPARKEY -CLISPCHARS SUBPARENT NOFIXVARSLST0) CLISPEXPANSION (CLISPARRAY) SI::CANONICALIZE-ADVICE-SYMBOL (:IN) -NODECREATE (DEFAULT.GRAPH.NODEFONT DEFAULTFONT) \\TEDIT.PAPERHEIGHT (TEDIT.PAPER.SIZES) -FB.DELVERCOMMAND (FB.VERSION.MENU.ITEMS :NUMBER) \\SEARCHPRESSFONTS (PRESSFONTWIDTHSFILES) EXPANDBM ( -WHITESHADE) TWODINSPECTW.CREATE (INSPECTORFONT |WindowTitleDisplayStream| INSPECTPRINTLEVEL) -|\\DSKCloseDevice| (|\\DSKtopMonitor| |\\DSKdevice|) \\TEDIT.WORDBOUND.READTABLE (\\MAXTHINCHAR -PUNCT.TTC TEXT.TTC WHITESPACE.TTC MSPACE NSPACE THINSPACE FIGSPACE) GETCLEARINGHOUSE ( -LOCAL.CLEARINGHOUSE \\CH.MAINLOCK \\CH.BROADCAST.SOCKET CH.NET.HINT) COMPILER::ALPHA-FUNCTIONAL-FORM ( -COMPILER::*CONTEXT*) SETFONT.IP (SETFONT) EVENTS-INPUT (HISTSTR0) EDITGRAPH2 (PROMPTWINDOW -LASTMOUSEBUTTONS) CLISPCAR/CDR2 (FAULTPOS) GLOBAL-MACRO-FUNCTION (COMPILERMACROPROPS) COMPILE-IN-CORE -(SYSSPECVARS FREEVARS) \\UFS.UNREGISTER.GFS (\\UFS.GFS.TABLE) DIGITSBDP (\\FIXP MAX.POS.HINUM -MAX.SMALL.INTEGER \\SMALLP \\EXPONENT.BIAS \\8BITS \\SIGNBIT \\MAX.EXPONENT \\HIDDENBIT) -DO-HISTORY-SEARCH (*CURRENT-EVENT*) PRETTYCOM (PRTTYFILE USERWORDS DECLARETAGSLST PRETTYPRINTMACROS -SYSPROPS COMMENTFLG DEFAULTFONT FILEPKGCOMSPLST) \\MAKEFRAME (\\DEF.HI) RPLCHARCODE (\\MAXTHINCHAR -%FAT-CHAR-TYPENUMBER) GETXIP (\\EPT.XIP XIPTRACEFILE) CLISPTRAN (CLISPTRANFLG) -BLTPATTERN.REPLACEDISPLAY (WHITESHADE) TTECHO.TO.FILE (\\FIRSTLINE OPTIONS \\PROMPT2 \\ENDBUFFER) -\\FAULTINIT (\\MAIKO \\MP.OBSOLETEVMEM \\DORADO \\DANDELION \\DAYBREAK \\MP.32MBINUSE -\\LASTVMEMFILEPAGE \\GUARDVMEMFULL \\DEF.HI \\KBDSTACKBASE |\\StackAreaSize| \\MISCSTACKBASE) -\\SET.VMEM.FULL.STATE (|\\InterfacePage| \\LASTVMEMFILEPAGE |\\IFPValidKey|) |GetImageFile| ( -PRINTFILETYPES) CLISPCAR/CDR1 (VAR1) INIT-CML-READTABLES (\\MAXTHINCHAR) CL::%COPY-TIME-STATS ( -SWAPWAITTIME GCTIME PAGEFAULTS SWAPWRITES TOTALTIME DISKIOTIME NETIOTIME DISKOPS) UNCLISPTRAN ( -CLISPTRANFLG) \\SETIOPOINTERS (|\\InterfacePage| \\DOLPHIN \\DORADO GCONST ALLUP \\DANDELION \\MAIKO -\\IOPAGE \\DAYBREAK) \\MAIKO.BITBLTSUB (SUBRCALL) HASH-COMMA (:FORM *READTABLE*) HASH-BACKSLASH ( -CL:CHAR-FONT-LIMIT) HASH-DOUBLEQUOTE (*READTABLE*) \\UNVISIBLE.FLUSH.OPEN.STREAMS (|AppendBit| -|WriteBit|) \\CHECKSUM (MASKWORD1\'S) INITDATATYPES (INITIALDTDCONTENTS |\\DTDSpaceBase| WORDSPERPAGE -|\\DTDSize| \\TT.NUMBERP \\TT.ATOM \\TT.FIXP \\TT.NOREF \\TT.SYMBOLP \\LITATOM CDRCODING \\VAL.HI -\\LISTP) SAVE.CURSOR (\\CURSORROW \\CURSORCOL) \\10MB.INPUT.INTERRUPT (\\ES.PENDING \\ES.GOOD.PACKET -\\10MB.GETGARBAGE \\MACHINETYPE \\DANDELION \\DAYBREAK \\MIN2PAGEBUFLENGTH WORDSPERPAGE -\\10MB.RAWPACKETQ \\10MBPACKETLENGTH \\10MB.INPUT.TIMEOUT \\10MB.INPUT.TIMER) SPY.BUFFER.ENTRY ( -SPY.BUFFER.SIZE SPY.BUFFER) MAKEHARDCOPYSTREAM (\\HDCPYDISPLAYIMAGEOPS) \\DL.FAULTINIT (\\VP.IOCBS -|\\IFPValidKey| \\MP.INVALIDVMEM \\DLION.RCLKMILLISECOND \\DLION.RCLKSECOND \\MISCSTATS -\\DL.PROCESSORBUSY \\DL.READPID) SPY.UPDATE.TITLE (LASTMOUSEBUTTONS) \\MAIKO.BLTCHAR (SUBRCALL) -\\LEAF.READFILENAME (\\OFFSET.FILENAME \\MAXLEN.FILENAME) \\MP.ERROR (\\MACHINETYPE \\DANDELION -\\DAYBREAK RAID) CREATEMDSTYPETABLE (|\\MDSTypeTable| |\\MDSTTsize| \\TT.NOREF |\\SmallPosHi| -|\\SmallNegHi| PAGESPERSEGMENT \\TT.FIXP \\TT.NUMBERP \\TT.ATOM \\SMALLP |\\MDSIncrement| \\CHARHI -\\CHARACTERP \\MISCSTATS \\FIXP) SQRT (\\EXPONENT.BIAS \\MAX.EXPONENT) MSDWIMTRAN (FNNAME FNDEF) -\\MAIKO.FAULTINIT (\\VP.IOCBS \\MISCSTATS) HASH-VBAR (*READ-SUPPRESS* *READTABLE*) SYMBOL.PACKAGE ( -\\PNPSPACE \\OLDATOMSPACE \\NEWATOM-PNAMEOFFSET \\PNAME.HI *UNINTERNED-PACKAGE-INDEX* -READSYS.PACKAGE.FROM.INDEX) PRINTFNS (PRTTYFILE FNSLST) PRETTYDEF (\#RPARS -*OLD-INTERLISP-READ-ENVIRONMENT* *NEW-INTERLISP-MAKEFILE-ENVIRONMENT* *DEFAULT-MAKEFILE-ENVIRONMENT*) -LOOKUP-ENVIRONMENT-AND-FILEMAP (*FILEMAP-HASH* UPPERCASEARRAY) SEDIT::CFV-LIST (SEDIT::TYPE-COMMENT) -\\FILEMAP-HASHOVERFLOW (*FILEMAP-LIMIT* FILELST *FILEMAP-VERSIONS*) D-ASSEM::FIXUP-NTENTRY (:3-BYTE -COMPILER::*HOST-ARCHITECTURE*) \\MAIKO.PUNTBLTCHAR (\\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS -\\SCREENBITMAPS SUBRCALL) \\EXTNORMALIZE (\\SIGNBIT MAX.POS.HINUM MAX.SMALL.INTEGER) -\\TEDIT.PARSE.CHARLOOKS.LIST (TEDIT.DEFAULT.CHARLOOKS) |\\PFGetAllocationMapPage| ( -|\\PFAllocationMapFileD|) \\CH.PRINT.BLURB (PROMPTWINDOW) \\FM.EDIT-MOVECARET (EDITITEM FONT LEFT -MOUSEX WINDOW BOXOFFSET STREAM) \\D01.FAULTINIT (\\MISCSTATS GCONST \\ALTO.RCLKMILLISECOND \\VAL.HI -\\ALTO.RCLKSECOND \\MACHINETYPE \\DORADO) \\EXTFQUOTIENT (\\MAX.EXPONENT \\SIGNBIT MAX.POS.HINUM -MAX.SMALL.INTEGER \\EXPONENT.BIAS) INTTOEXT (\\EXPONENT.BIAS \\FIXP \\SMALLP \\FLOATP \\SIGNBIT -MAX.POS.HINUM) \\COPYDATATYPE (|\\DTDSpaceBase| GCREF) FLUSHFILEMAPS (*FILEMAP-HASH*) FLTSTR (\\FIXP -MAX.POS.HINUM MAX.SMALL.INTEGER \\SMALLP \\EXPONENT.BIAS \\8BITS \\SIGNBIT \\MAX.EXPONENT \\HIDDENBIT) - FM.RESETSTATE (\\FM.GROUPSPEC) |\\LFOpenFile| (|\\LFtopMonitor| :PATHNAME) |\\UFSWritePages| (\\FIXP -:MESSAGE) |\\UFSGenerateFiles| (|\\DSKtopMonitor| |\\UFStopMonitor|) PRETTYDEFCOMS (\#RPARS) -TIMESPOW10 (EXTPOWERS) |\\UFSOpenFile| (|\\DSKtopMonitor| |\\UFStopMonitor| ACCESS-INPUT ACCESS-OUTPUT - ACCESS-BOTH ACCESS-APPEND ACCESS-OTHER RECOG-OLD RECOG-OLDEST RECOG-NEW RECOG-NEW-OLD RECOG-OTHER -\\FIXP |AppendBit| |WriteBit| :PATHNAME BYTESPERPAGE \\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS -FILELINELENGTH |NoBits|) \\CONVERT.FLOATING.NUMBER (\\FLOATFORMAT) |\\LFExtendFileIfNecessary| ( -|\\LFtopMonitor|) |\\UFSDirectoryNameP| (\\DSK.DEFAULT.DIRECTORY \\UFS.DEFAULT.DIRECTORY -MAX-PATHNAME-LEN) CL:COMPILE-FILE (*ERROR-OUTPUT* :PARENT SYSLOCALVARS GLOBALVARS NLAMA NLAML LAMA -DONTCOMPILEFNS :ABORT :INPUT :NEWEST FILERDTBL) PRINTDATE1 (DEFAULTFONT LAMBDAFONT) PRETTYDEF1 ( -PRTTYCOMS LAM?LST) |\\UFSSetFileInfo| (|\\DSKtopMonitor| |\\UFStopMonitor| \\FIXP ATTR-WDATE -ATTR-PROTECTION) \\TEDIT.PARSE.PARALOOKS.LIST (TEXTOBJ TEDIT.DEFAULT.FMTSPEC) \\HANDLE.RAW.PACKET ( -\\PACKET.FILTERS) ICMLARRAY.VALUECOMMANDFN (\;) CL:MAKE-ARRAY (CL:ARRAY-RANK-LIMIT -CL:ARRAY-TOTAL-SIZE-LIMIT) MSPRGDWIM (VARS) CL:MACROEXPAND-1 (*MACROEXPAND-HOOK*) COMPILER::ALPHA-CATCH - (:TAG :STMT) MB.THREESTATE.SHOWSELFN (BLACKSHADE) COMPILE.FILE.DEFINEQ (DONTCOMPILEFNS) \\FIXPASSWORD - (\\IFSERROR.PROTECTION \\IFSERROR.PASSWORD \\IFSERROR.USERNAME \\IFSERROR.NEED.USERNAME -\\IFSERROR.CONNECTPASSWORD \\IFSERROR.CONNECTNAME \\IFSERROR.NO.LOGIN) |\\LFGenerateFiles| ( -|\\LFtopMonitor| %FAT-CHAR-TYPENUMBER) \\D01.ASSIGNBUFFERS (|\\InterfacePage| WORDSPERPAGE -\\MAXSWAPBUFFERS) |\\UFSRenameFile| (\\MACHINETYPE \\MAIKO \\FIXP) \\DUMMYKEYHANDLER (|\\KbdFXP|) -DIRECTORY.FILL.PATTERN (\\CONNECTED.DIRECTORY) CLISPATOM2C (TYP TAIL) \\NSRANDOM.PREPARE.CACHE ( -*NSFILING-PAGE-CACHE-LIMIT*) \\SPPWATCHER (SPP.USER.TIMEOUT \\SPPHEAD.CC.ACKNOWLEDGE) INCORNER.REGION -(LASTMOUSEX MODERN-WINDOW-MARGIN LASTMOUSEY) |\\UFSTruncateFile| (\\FIXP ATTR-WDATE) |\\UFSEventFn| ( -|\\UFStopMonitor| \\UFS.GFS.TABLE) ARCTAN (-PI/2 PI/2 UBFLOAT3 180/PI) TTDELETECHAR (\\CURSOR \\BUFFER - \\ARROW) MSCHECKEMPTY (DWIMWAIT) \\PARSE.PORTCONSTANT (%FAT-CHAR-TYPENUMBER) |\\VFMSplit1| (|page| -|\\VFMinterval| |nullVolumePage| |\\VFMlowPtr| |keyStone| |\\VFMlow|) CHANGETRAN1 (DECLST) -POSTSCRIPT.PUTBITMAPBYTES (PS.BITMAPARRAY) SETRGB.IP (MAKEVEC DO COLOR.IMVAR) FM.CHANGESTATE ( -\\FM.GROUPSPEC) \\DOVE.FAULTINIT (\\VP.IOCBS |\\InterfacePage| |\\IFPValidKey| \\MP.INVALIDVMEM -\\DOVE.RCLKMILLISECOND \\VAL.HI \\MISCSTATS \\DOVE.RCLKSECOND) |\\PFCreateFreePage| (|\\PFFreeFileD|) -|\\UFSCloseFile| (\\FIXP |AppendBit| |WriteBit|) TTDELETEWORD (\\CURSOR \\BUFFER \\ARROW) MSOUTPUT ( -FILELINELENGTH) ADDNAKEDCHAR (\\CURSOR \\ENDBUFFER EOLCHARCODE) GETVERBTABLES (MSDATABASELST) -TEDIT.GET (PROMPTWINDOW WAITINGCURSOR) COMPILER::MAKE-CHILD-ENV (:PARENT) POSTEDITPROPS (FILEPKGFLG) -FM.HIGHLIGHTITEM (\\FM.GROUPSPEC) EDITDELETENODE (PROMPTWINDOW) PRINTDEF1 (PRTTYFILE FNSLST) -|\\LFEventFn| (|\\LFtopMonitor|) PRINT-READER-ENVIRONMENT (*OLD-INTERLISP-READ-ENVIRONMENT* -*INTERLISP-PACKAGE* FILERDTBL) |\\UFSCloseDevice| (|\\UFStopMonitor| |\\UFSdevice|) CLISPATOM2D (TAIL -CLISPARRAY TYP) \\CURVEEND (\\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS -LEFTMINUSBRUSH RIGHTPLUS1 BOTTOMMINUSBRUSH TOP DESTINATIONBASE OPERATION HEIGHTMINUS1 RASTERWIDTH LEFT - BRUSHWIDTH NBITSRIGHTPLUS1 TOPMINUSBRUSH |DestinationBitMap| BRUSHHEIGHT BRUSHBASE BRUSHRASTERWIDTH -COLORBRUSHBASE NBITS DISPLAYDATA DASHLST) CLISPLOOKUP (EXPR FAULTFN) \\FM.EDIT-DELETE (BOXOFFSET -DISPLAYBOTTOM FONT DISPLAYLEFT WINDOW LASTMOUSEBUTTONS LEFT BITMAP MAXWIDTH BLACKSHADE STREAM) -SEDIT::CREATE-COMMENT-WORD-NODE (SEDIT::TYPE-COMMENT-WORD) \\TAN-FLOAT (CL:PI PI/2 -PI/4 -PI/2 PI/4 -\\TAN-EPSILON UBFLOAT3) SYMBOL.VALUE (\\ATOM.HI \\NEWATOM-VALOFFSET) \\10MB.OUTPUT.INTERRUPT ( -\\ES.PENDING) CREATESCREEN (WINDOWTITLEFONT MAX.SMALLP \\DISPLAYIMAGEOPS |DisplayFDEV|) \\UFS.FULLNAME - (*DSK-HOST-NAME* *UFS-HOST-NAME*) FIXPRINTIN (LISPXHIST) DIRPRINTNAME (\\MAXTHINCHAR UPPERCASEARRAY) -NLAMBDAFNP (NLAMA NLAML) PRETTYVAR (COMMENTFLG) COMPILER::ALPHA-COMBINATION (COMPILER::*ENVIRONMENT* -:FN COMPILER::*CONTEXT* :ARGS :NOT-INLINE NLAMA NLAML) LVLPRIN (FILE) FIXDATUM (CLISPCHARRAY -RECORDEXPRESSION COMPILERMACROPROPS) \\FTP.OPENFILE.FROM.PLIST (\\FTPFDEV) \\BN.TO.FIXP (MAX.FIXP -MIN.FIXP MAX.INTEGER MIN.INTEGER) COMPILE.CHECK.ARGTYPE (ARGTYPE.VARS COUTFILE) CL::STEP-PRINT ( -CL::*STEP-PRINT-LEVEL* CL::*STEP-PRINT-LENGTH* CL::*STEP-IO* CL::*STEP-INDENTATION-LEVEL* -CL::*STEP-MAX-INDENTATION*) SEDIT::ASSIGN-FORMAT-QUOTE (:DATA) CL::STEP-PRINT-VALUES (CL::*STEP-IO*) -\\PS.BOUTFIXP (\\PS.TEMPARRAYLEN) PRETTYVAR1 (PRETTYPRINTMACROS DEFAULTFONT) SCALEBM (WHITESHADE) -CL:TRUNCATE (XCL::STRUNCATE) XCL::PPRINT-DEFINER-FITP (COMMENTFLG *STANDARD-OUTPUT*) FILLNGON.IP ( -MAXSEGSPERTRAJECTORY DOSAVESIMPLEBODY { MAKEOUTLINE MASKFILL }) WHO-LINE-WHAT-IS-RUNNING ( -*WHO-LINE-STATE-UNINTERESTING-FNS*) |\\LFDirectoryNameP| (|\\LFtopMonitor|) SUPERPRINTEQ ( -PRETTYEQUIVLST) SYMBOL.PNAME (\\PNAMELIMIT \\PNPSPACE \\ATOM.HI \\NEWATOM-PNAMEOFFSET) -\\NSFILING.EVENTFN (:TEST :ABORT |AppendBit| |WriteBit|) \\GTREADTABLE1 (\\READTABLEHASH) -D-ASSEM::TYPE-NAME-FROM-SIZE (\\HUNK.PTRSIZES) TB.SHOW.COPY.SELECTION (GRAYSHADE TB.LEFT.MARGIN) -MAKEDEFLIST (MACROPROPS) TAN (PI/180) LVLPRIN0 (CLISPTRANFLG FILE COMMENTFLG) \\FM.EDIT-WORDDELETE ( -BOXOFFSET \\FM.EDIT-WORDDELIMCHARS FONT BITMAP LEFT WINDOW STREAM) XCL::%DEFINE-TYPE-SAVE-DEFN ( -*DEFINITION-HASH-TABLE*) MSINIT (MSDATABASEINIT USERTEMPLATES) HPINITRDTBL (HPFORWRDCHR HPFORWRDCDRCHR - HPBAKCHAR HPFILLCHAR HPFINALCHAR) |\\VFMCreateVPage| (|\\VFMvolumeHandle| |\\PFFileMapFileD|) -|\\UFSError| (:MESSAGE :PATHNAME) INFINITEP (MAX.INTEGER MIN.INTEGER) \\READCLASSTOCODE (ESCAPEBIT -STOPATOMBIT BREAKBIT INNERESCAPEBIT SEPRCHAR.RC) GETSYNTAX (BREAKBIT ALWAYS.RMC FIRST.RMC ALONE.RMC -CONTEXTMASK IMMEDIATE.RMW NONIMMEDIATE.RMW WAKEUPMASK ESC.RME NOESC.RME ESCAPEBIT) -\\UFS.REMOVE.HOST.FIELD (:PATHNAME \\DSK.DEFAULT.DIRECTORY \\UFS.DEFAULT.DIRECTORY) |\\UFSDeleteFile| -(|\\DSKtopMonitor| |\\UFStopMonitor| \\FIXP) SEDIT::ASSIGN-FORMAT-LIST (SEDIT::TYPE-COMMENT) -\\GETREADSYNTAX (\\MAXTHINCHAR CONTEXTMASK ALWAYS.RMC FIRST.RMC ALONE.RMC WAKEUPMASK IMMEDIATE.RMW -NONIMMEDIATE.RMW ESCAPEBIT ESC.RME NOESC.RME) |\\UFSReadPages| (\\FIXP :MESSAGE BYTESPERPAGE -WORDSPERPAGE) |\\UFSeol| (PROMPTWINDOW LF.EOLC \\UFS.DEFAULT.EOLC) TEDIT.BUILD.PCTB ( -*TEDIT-FILE-READTABLE* TEDIT.DEFAULT.FMTSPEC DEFAULTFONT CR.EOLC TEDIT.INPUT.FORMATS -|\\PieceDescriptorPAGEFRAME| |\\PieceDescriptorCHARLOOKSLIST| |\\PieceDescriptorPARALOOKSLIST| -|\\PieceDescriptorPARA| |\\PieceDescriptorLOOKS| |\\PieceDescriptorOBJECT|) D-ASSEM::DCODE-FROM-DLAMBDA - (:FRAME-NAME :CLOSURE-P :CLOSURE D-ASSEM::*LOCAL-FN-FIXUPS*) PRETTYCOM1 (COMMENTFLG) -WHO-LINE-TTY-STATE (*WHO-LINE-STATE-UNINTERESTING-FNS*) \\REMOVE-DECLS (*SPECIAL-BINDING-MARK*) -COMP.SETARG (COMTYPE ARGVARS CODE) \\SEND.ANSWERING.RFC (\\STATE.LISTENING WORDSPERPORT \\PT.RFC -\\PUPOVLEN) \\BN.TIMES2 (\\BIGNUM.BETA) ADDTO (MSFNDATA INCLISP) \\EXTFTIMES (\\8BITS \\EXPONENT.BIAS) - \\TERMCLASSTOCODE (EOL.TC NONE.TC CHARDELETE.TC WORDDELETE.TC WORDSEPR.TC LINEDELETE.TC RETYPE.TC -CTRLV.TC) \\BN.DIVIDE (\\BIG.0 \\BIGNUM.BETA \\BIGNUM.BETA1) ARGTYPE.STATE (ARGTYPE.VARS) -\\10MBWATCHER (\\MAXWATCHERGETS) PFI.HANDLE.* (*STANDARD-OUTPUT*) \\INITBFS (\\MAINDISK WORDSPERPAGE -|\\InterfacePage| \\LENSHORTCB \\LENFP WORDSPERCELL) \\BN.FLOAT (\\BIGNUM.BETA) -XCL::PPRINT-DEFINER-RECURSE (*STANDARD-OUTPUT*) COMPILER::ALPHA-BLOCK (:NAME :CONTEXT COMPILER::*CONTEXT* -) D-ASSEM::FETCH-HUNK (D-ASSEM::*HUNK-MAP*) FB.UPDATE.COUNTERS (WHITESHADE) \\M44ACTONVMEMFILE ( -\\ISFSCRATCHDAS \\ISFSCRATCHCAS |\\XVmemFmapBase| \\ISFCHUNKSIZE |\\XVmemFmapHighBase| WORDSPERPAGE -\\FILLINDA \\SWAPREQUESTBLOCK WORDSPERCELL |\\XVmemDiskBase| \\DC.WRITED \\DC.READD \\ISFMAP -\\MAINDISK) FINITEP (MAX.INTEGER MIN.INTEGER) \\LEAF.ERROR (\\IFSERROR.FILE.NOT.FOUND -\\IFSERROR.MALFORMED \\IFSERROR.ALLOCATION \\IFSERROR.BAD.HANDLE \\IFSERROR.BUSY -\\IFS.ERROR.BROKEN.LEAF \\SHORT.ERROR.PUPLEN \\LEAFOP.OPEN PROMPTWINDOW) CHECKRECORDNAME (DECL) -\\BIGNUM.TO.INT (\\BIGNUM.BETA) SPECVARS (SYSLOCALVARS) WINDOWWORLD (WINDOWBACKGROUNDSHADE -WINDOWBACKGROUNDBORDER INITIAL-EXEC-REGION INITIAL-PROMPT-REGION BLACKSHADE WINDOWUSERFORMS) \\BN.2TH -(\\BIGNUM.THETA) TTYINENTRYFN (LASTMOUSEBUTTONS) \\CHAIN.UP.RPT (\\RPTSIZE \\RPTENTRYLENGTH -\\RPT.UNAVAILABLE \\RPT.EMPTY \\PAGETABLESTOPFLG) \\DSKDISPLAY.REPAINTFN (\\DSKDISPLAY.FONT -\\DSKDISPLAY.BOLD) \\INIT.POWERS.OF.TEN (\\EXPONENT.BIAS) \\LOOKUPPORT (\\PUPSOCKET.MISCSERVICES -\\PT.NAMELOOKUP \\MAXETHERTRIES \\PT.NAMERESPONSE \\PUPOVLEN \\PORTIDLEN PUPTRACEFILE -\\PT.NAME/ADDRERROR) SI::ADVISE-CONTENTS (:IN) SETCOLOR16.IP (SEQPACKEDPIXELVECTOR MAKEPIXELARRAY -MAKESAMPLEDBLACK COLOR.IMVAR) D-ASSEM::DIGEST-FUNCTION (:FUNCTION D-ASSEM::*DCODE* :ARGUMENT) -XCL::%DEFINER-NAME (:DEFINITION-NAME) \\MAIKO.NEWFAULTINIT (\\DLBUFFERPAGES \\VP.BUFFERS) -CLISPBROADSCOPE1 (CLISPCONTEXT) \\NSRANDOM.READ.SEGMENT (BYTESPERPAGE |AppendBit| |WriteBit|) -\\BN.INTEGERLENGTH (\\BIGNUM.BETA MAX.INTEGER) \\MAIKO.DO.MOVDS (\\MAIKO.MOVDS \\DEF.HI) NEARTOP ( -LASTMOUSEY) \\UFS.DIRECTORY.NAME (|\\DSKtopMonitor| |\\UFStopMonitor| \\FIXP) MAKEFILE1 (:SAVE) -|\\InitCurveBrushes| (|\\BrushNames|) PRINTPARA1 (RMARG FILE LMARG) \\NSFILING.DISCARD.SESSION ( -:CLOSED) COMP.ARG (COMPILE.CONTEXT COMTYPE ARGVARS CODE) \\SEND.ENDREPLY (\\PT.ENDREPLY \\PUPOVLEN) -SCROLL.HANDLER (LASTMOUSEX LASTMOUSEY SCROLLWAITTIME |VertScrollCursor| |ScrollUpCursor| -|ScrollDownCursor| |VertThumbCursor| |HorizScrollCursor| |ScrollLeftCursor| |HorizThumbCursor| -|ScrollRightCursor| LASTMOUSEBUTTONS WAITBETWEENSCROLLTIME WAITBEFORESCROLLTIME) -\\AUTHENTICATION.FIND.SERVER (\\AUTHENTICATION.SOCKET AUTHENTICATION.NET.HINT) \\COERCEASCIITONSFONT ( -PROMPTWINDOW) CH.LIST.PROPERTIES (\\CH.BROADCAST.SOCKET) D-ASSEM::DVAR-FROM-LAP-VAR (D-ASSEM::*DVAR-ENV* -) \\STRINGOUT (%FAT-CHAR-TYPENUMBER) UNDOLISPX3 (UNDOSTATS LISPXHIST) CL::STEP-FORM ( -CL::*STEP-INDENTATION-INCREMENT* CL::*STEP-INDENTATION-LEVEL*) D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL - (D-ASSEM::*LOCAL-FN-FIXUPS* D-ASSEM::*DVAR-ENV*) \\SETNEWTIME0 (\\FIXP PROMPTWINDOW) FSETVAL ( -\\VAL.HI) CLISPATOM2A (DWIMIFYING CLISPCONTEXT NOFIXFNSLST NOFIXVARSLST TYP VAR1 FAULTPOS GLOBALVARS -SPELLINGS3 CLISPCHARS) OPENNSOCKET (\\MISCSTATS \\MAX.EPKTS.ON.NSOCKET) TYPESOF (FILEPKGTYPES -SHADOW-TYPES FILELST) \\M-VMEMSAVE (\\EMUSWAPBUFFERS |\\IFPValidKey| WORDSPERPAGE) \\FM.EDIT-BACKUP ( -FONT WINDOW STREAM BITMAP BOXOFFSET) MSINTERPRET (MSPRINTFLG MSFNTYPES MSBLIP MSCHANGEDARRAY -MSDATABASELST) HVFWDREAD (HPBAKCHAR) RECORDERROR (DWIMIFYFLG FAULTFN) \\BN.FROM.FIXP (MIN.FIXP -\\BIGNUM.THETA) \\SPP.CREATE.STREAM (\\SPPDEVICE \\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS -FILELINELENGTH LF.EOLC |NoBits|) \\SETTERMSYNTAX (\\MAXTHINCHAR) RECORDECLBLOCK (COMMENTFLG -DATATYPEFIELDTYPES DATATYPEFIELDCOERCIONS STRUCNAME) SKIP/ZAP (\\CURSOR \\ARROW) MAKE-UNICODE-FORMATS -(LF.EOLC CR.EOLC CRLF.EOLC :UTF16BE :UTF16BE-RAW :UTF8-RAW :UTF8) \\SETREADSYNTAX (\\MAXTHINCHAR -BREAKBIT MACROBIT) CHAT.TYPEOUT (CHAT.DRIVERTYPES \\SYSBUFFER) \\MEDW.GETBOXSCREENPOSITION (BOXCURSOR -LASTMOUSEBUTTONS LASTMOUSEX LASTMOUSEY GRAYSHADE CROSSHAIRS LASTSCREEN) D-ASSEM::INSTALL-LOCAL (:LOCAL - D-ASSEM::*PVAR-COUNT*) OPT.JFIXPASS (LBA) UNCOPYATOM (READSYS.PACKAGE.FROM.NAME) |\\PFTrimHelper| ( -|nullVolumePage|) ARCCOS (PI/2) \\GTTERMTABLE (\\PRIMTERMTABLE \\ORIGTERMTABLE) D-ASSEM::GENERATE-EASY-ENTRY - (D-ASSEM:+LAMBDA-SPREAD+ D-ASSEM::*DCODE* D-ASSEM:+NLAMBDA-SPREAD+ D-ASSEM:+LAMBDA-NO-SPREAD+ -D-ASSEM:+NLAMBDA-NO-SPREAD+) \\NSFILING.CLOSEFILE (|AppendBit| |WriteBit|) MAKEFILE (PRETTYFLG -*PRINT-BASE* DWIMWAIT MAKEFILEFORMS MAKEFILEOPTIONS) NEARESTCORNER (LASTMOUSEX LASTMOUSEY) -D-ASSEM::GENERATE-HARD-ENTRY (D-ASSEM::*DCODE* D-ASSEM:+LAMBDA-NO-SPREAD+) -\\TEDIT.GET.INSERT.CHARLOOKS (DEFAULTFONT) \\NSFILING.LOGIN (\\NSFILING.PROGRAM.NAME PROMPTWINDOW -\\COURIERPROGRAM \\FIXP) \\DSKDISPLAY.BUTTONEVENTFN (LASTMOUSEBUTTONS) \\RTP.ERROR (PUPTRACEFILE -RTPEVENTS RTPSTATES) NETDATE (\\FIXP) MSPRGLAMBDA (VARS CL:LAMBDA-LIST-KEYWORDS FNNAME MSCHANGEDARRAY -LAMBDATRANFNS) \\MAPCHARTABLE (\\MAXTHINCHAR) SETCOLORLV.IP (SEQLARGEVECTOR MAKEPIXELARRAY -MAKESAMPLEDBLACK COLOR.IMVAR) D-ASSEM::EASY-ENTRY-P (:IGNORED) FTP.BREAKCONNECTION (\\FTPCONNECTIONS) -MAKEISOFORMAT (:ISO8859/1) RECORDECLTAIL (CLISPRECORDTYPES COMMENTFLG) COMPILER::ALPHA-ARGUMENT-FORM ( -COMPILER::*ARGUMENT-CONTEXT*) \\DOCOMPRESSVMEM (\\RP.GCTABLE \\FPTOVP \\NO.VMEM.PAGE) COMP.EFFECT ( -LEVEL CODE AC) TB.RECONSIDERRANGE (LASTVISIBLE# FIRSTVISIBLE# BROWSER) \\TRANSMIT.STRATEGY (\\PT.DATA -\\PT.ADATA \\PT.MARK \\PT.AMARK) SYNTAXP (\\MAXTHINCHAR BREAKBIT ALWAYS.RMC FIRST.RMC ALONE.RMC -CONTEXTMASK IMMEDIATE.RMW NONIMMEDIATE.RMW WAKEUPMASK ESC.RME NOESC.RME ESCAPEBIT) OPT.JLENPASS (LBA) -COPYATOM (*INTERLISP-PACKAGE* *KEYWORD-PACKAGE* *LISP-PACKAGE* \\SCRATCHSTRING \\LITATOM \\NEW-ATOM) -ARCSIN (PI/2 180/PI) D-ASSEM::STORE-DIGEST-INFO (D-ASSEM::*FREE-VARS* D-ASSEM::*BOUND-SPECIALS* -D-ASSEM::*PVAR-COUNT* D-ASSEM:+FVAR-CODE+ D-ASSEM::*DCODE*) |\\UFSGetFileInfo| (|\\DSKtopMonitor| -|\\UFStopMonitor| \\FIXP ATTR-LENGTH ATTR-WDATE ATTR-RDATE MAX-UNAME-LEN ATTR-AUTHOR ATTR-PROTECTION -ATTR-ALL) ONFILE (MSFNTYPES FILELST) SUBPRINT/ENDLINE (COMMENTFLG LEFT) AS.DELETE.PASSWORDS ( -AS.WELL.KNOWN.NAME) HVRPTREAD (HPRPTSTRING) DWIMIFYREC (DECL VARS FAULTFN) \\MEDW.GETSCREENREGION ( -EXPANDINGBOX GRAYSHADE \\CURSORDESTINATION LASTMOUSEX LASTMOUSEY \\CURSORDESTWIDTH \\CURSORDESTHEIGHT -LASTMOUSEBUTTONS CLICKWAITTIME FORCEPS \\CURSORSCREEN) PRINENDLINE (*STANDARD-OUTPUT* DEFAULTFONT -SPACEWIDTH) NUMBERPAD.READER.DECODE (TEDIT.READTABLE) SUPERPRINT (PRETTYPRINTYPEMACROS LEFT RMARGIN -*STANDARD-OUTPUT* FIRSTPOS COMMENTFLG CLISPARRAY) HVREADEND (HPFINALCHAR) D-ASSEM::INTERN-VAR ( -D-ASSEM::*DVAR-ENV*) SUPERPRINTGETPROP (PRETTYEQUIVLST) D-ASSEM::STACK-ANALYZE (D-ASSEM::*LEVEL*) -\\LEAF.HANDLE.INPUT (\\LEAFOP.ERROR \\LF.ALLOWERRORS \\LEAFOP.CLOSE \\IFSERROR.BAD.HANDLE -\\LF.WANTANSWER) |\\PFEnsureInitialized| (|\\PhysVolumePage|) \\DL.NEWFAULTINIT (|\\InterfacePage| -\\RP.STARTBUFFERS \\VP.INITSCRATCH \\DLBUFFERPAGES \\FPTOVP \\NO.VMEM.PAGE \\VMAP.VACANT \\MACHINETYPE - \\DAYBREAK \\VP.IOCBS \\MP.IOCBPAGE \\VMAP.CLEAN \\IOCBPAGE WORDSPERPAGE \\VP.IFPAGE \\FP.IFPAGE -\\RP.IOPAGE \\DANDELION 2MBPAGES PAGESPERSEGMENT \\NP.DISPLAY |\\MaxScreenPage| \\RP.DISPLAY -\\VP.DISPLAY \\DOVEIORGNSIZE \\VP.DOVEIORGN \\RP.DOVEIORGN \\VP.RPT \\WIDEDOVEDISPLAYWIDTH -\\RP.AFTERDOVEDISPLAY \\RP.AFTERDISPLAY \\VP.BUFFERS |\\SmallNegHi| \\RPTENTRYLENGTH \\RP.TEMPDISPLAY -\\RPT.UNAVAILABLE \\RPT.EMPTY) \\BN.IGNN (\\BIGNUM.BETA) SETMAINTPANEL (\\MACHINETYPE \\DANDELION -\\DOLPHIN MISC1 \\DAYBREAK DOVEMISC) TB.UNDOSELECTION (FIRSTVISIBLE# LASTVISIBLE# TS.IDLE) -\\MAIKO.ASSIGNBUFFERS (WORDSPERPAGE) CHAT.EMACS.MOVE (CHAT.EMACSCOMMANDS) FITP (*STANDARD-OUTPUT* -\#CAREFULCOLUMNS RMARGIN AVERAGEVARLENGTH) \\SIN-FLOAT (PI/2 2PI CL:PI \\SIN-EPSILON UBFLOAT3) -D-ASSEM::INTERN-TAG (D-ASSEM::*DTAG-ENV*) \\DSKDISPLAY.CREATE.WINDOW (\\DSKDISPLAY.FONT |WBorder| -|WindowTitleDisplayStream|) \\SEND.ABORT (\\PT.ABORT BYTESPERWORD \\PUPOVLEN \\STATE.SENTRFC) -\\TEDITPARAMENU.CREATE (TEDIT.PARAMENU.SPEC) BESTPUPADDRESS (\\PUP.READY \\LOCALPUPNETHOST -\\ETHERPORTS \\RT.INFINITY \\PUP.ROUTING.TABLE.RADIUS \\ETHERTIMEOUT) MSPRGTEMPLATE (VARS MSMACROPROPS -) XCL::%EXPAND-DEFINER (:DEFINITION-EXPANDER) MB.CREATE.THREESTATEBUTTON (THREESTATEIMAGEFNS) -EDITCHANGELABEL (PROMPTWINDOW) \\8859PEEKCCODEFN (NSCHARSETSHIFT \\NORUNCODE *ISO8859TOXEROXMAP*) -TEDIT.INSERT.OBJECT (TEDIT.DEFAULT.FMTSPEC TEDIT.SELECTION) D-ASSEM::STACK-ANALYZE-CODE (D-ASSEM::*LEVEL* - D-ASSEM::*ENDING-DEPTH*) RECORDECL0 (CLISPRECORDTYPES RECORDTRANHASH) CLISPATOM1B (UNDOSIDE UNDOSIDE0 - CLISPARRAY) SI::ADVICE-HASDEF (SI::*ADVICE-HASH-TABLE*) \\BUILD.EXPEDITED.XIP (\\COURIERMSG.CALL -\\XIPOVLEN) \\GETTERMSYNTAX (\\MAXTHINCHAR) \\TEDIT.WINDOW.SETUP (TEDIT.PROMPTWINDOW.HEIGHT -TEDIT.PROMPT.FONT) |\\PFVersionOK| (|pilotVersion|) CL::PROCESS-TYPE (:PREDICATE) -\\INSPECTW.REDISPLAYPROP (INSPECTPRINTLEVEL) SHEDSCAN (ORIG DIFF) PRINTLEAF (\\PUPOVLEN \\SEQUIN.DATA -SEQUINOPS \\LEAFOP.OPEN \\LEAFOP.CLOSE \\LEAFOP.READ \\LEAFOP.WRITE \\LEAFOP.ERROR LEAFOPCODES -\\LEAFOP.RESET BYTESPERPAGE BITSPERWORD) UNIX.SETDISPLAYTYPE (UNIXCHAT.TSET.DELAY) TB.CONSIDERRANGE ( -LASTVISIBLE# FIRSTVISIBLE# BROWSER) |\\LFFindInfo| (|tLispFile|) D-ASSEM::RESOLVE-JUMPS (D-ASSEM::*DCODE* -) CHAT.HOLD (LASTMOUSEBUTTONS) |\\UFSGetFileType| (DEFAULTFILETYPELIST DEFAULTFILETYPE) -|\\PFGetFreePage| (|\\PFFreeFileD|) PFI.HANDLE.PUTPROPS (MACROPROPS *PFI-PROPERTIES*) -DISPLAY/NUMBER/READER/TOTAL (WHITESHADE) MSHASHLIST1 (MSBLIP BADMARKS) MAKELISPXMACROSCOMS ( -LISPXHISTORYMACROS LISPXMACROS LISPXCOMS HISTORYCOMS) GETFILEPKGTYPE (FILEPKGTYPES FILEPKGCOMSPLST) -HVREADCHECKGETFN (UNDERREADIMAGEOBJ HPRINTREADFNS IMAGEOBJGETFNS) BIGNUM.DEFPRINT (*READTABLE* -MIN.INTEGER *PRINT-BASE* \\BIGNUM.BETA) |\\VFMMerge1| (|\\VFMinterval| |leftInterval| |mergeLevel| -|treeDepth| |\\VFMlowPtr| |\\VFMlow|) \\SPP.CREATE.STREAMS (\\SPPDEVICE) ECHOCHAR (\\MAXTHINCHAR -REAL.CCE IGNORE.CCE SIMULATE.CCE INDICATE.CCE) \\COPYSYNTAX (\\MAXTHINCHAR \\NSCHARHASHKEYS -\\NSCHARHASHOVERFLOW) CLISP\ (CLISPTRANFLG) D-ASSEM::COMPUTE-JUMP-SIZE (D-ASSEM::+JUMP-RANGE-SIZE-MAP+ -) DELETELINE (\\FIRSTLINE \\PROMPT1 \\PROMPT2 \\BUFFER) \\NSRANDOM.STREAM.CHANGED (|AppendBit| -|WriteBit| BYTESPERPAGE) ROTATE.IP (ROTATE) \\TEST.PARAGRAPH.LOOKS (|not| |legal| |after| \a -|paragraph| |look|) D-ASSEM::PRETTY-JUMPS (D-ASSEM::*JUMP-LIST*) CREATE.PACKET.EXCHANGE.XIP ( -\\XIPT.EXCHANGE \\XIPOVLEN) \\UFS.HANDLE.RELATIVEDIRECTORY (\\DSK.DEFAULT.DIRECTORY -\\UFS.DEFAULT.DIRECTORY) \\SEND.RFC (WORDSPERPORT \\PUPOVLEN \\PT.RFC) PRETTYPRINT2 (OLDFILEMAP -SOURCEFILE PRTTYFILE) MSPRGTEMPLATE1 (PARENT FNNAME FNDEF PARENTCONTEXT VARS TOPVARS) -CH.NUMBER.TO.PROPERTY (CH.PROPERTIES) XCL::UNDOABLY-MAKUNBOUND (COMPVARMACROHASH) SCALE2.IP (SCALE2) -D-ASSEM::SPLICE-IN-JUMPS (D-ASSEM::+JUMP-CHOICES+) ASKUSERSETUP (OPTIONSLST FILE) \\8859INCCODEFN ( -NSCHARSETSHIFT \\NORUNCODE *ISO8859TOXEROXMAP*) MAKEUSERMACROSCOMS (USERMACROS EDITMACROS) -\\MEDW.GETSCREENPOSITION (CROSSHAIRS LASTMOUSEBUTTONS \\CURSORSCREEN LASTSCREEN LASTMOUSEX LASTMOUSEY) - D-ASSEM::COMPUTE-DEBUGGING-INFO (D-ASSEM::*DCODE*) CLISPATOM1A (PARENT) ECHOCONTROL (\\MAXTHINCHAR) -|\\UFStoOtherRenameMess| (DEFAULTFILETYPELIST DEFAULTFILETYPE) \\CARET.FLASH.AGAIN (\\CARET.UP) -|\\UFSSetFileType| (DEFAULTFILETYPELIST DEFAULTFILETYPE) D-ASSEM::START-PC-FROM-NT-COUNT (WORDSPERQUAD - WORDSPERCELL BYTESPERWORD) \\SEND.EXPEDITED.XIP (\\MAXETHERTRIES \\ETHERTIMEOUT \\XIPT.EXCHANGE -\\COURIERMSG.RETURN \\COURIERMSG.REJECT \\COURIERMSG.ABORT \\XIPT.ERROR \\XIPE.NOSOCKET) -TEDIT.MINIMAL.WINDOW.SETUP (TEDIT.SELECTION) SEGMENT.BIT.LENGTH (\\FONT) ETHERPORT (\\ETHERPORTS) -\\BN.ISUM0 (\\BIGNUM.BETA) COMP.BLOCK (COMPILE.CONTEXT FRA) CLISPATOM2 (PARENT BRACKETCNT BRACKET -CLISPCONTEXT CLISPIFWORDSPLST :RESPELL CLISPINFIXSPLST SUBPARENT LASTWORD CLISPLASTSUB) MASKSTROKE.IP -(MASKSTROKE) D-ASSEM::CONVERT-TO-BINARY (D-ASSEM::*DCODE* CELLSPERQUAD) EDITCHANGEFONT (PROMPTWINDOW) -\\SETBSPTIMEOUT (\\BSP.OUTSTANDINGDATATIMEOUT \\BSP.IDLETIMEOUT) EQP (\\STACKP \\COMPILED-CLOSURE) -SI::ADVICE-DELDEF (SI::*ADVICE-HASH-TABLE*) \\BSP.SENDBUFFER (\\PUPOVLEN MAX.SMALL.INTEGER) -COMPILER::ALPHA-ATOM (COMPILER::*ENVIRONMENT*) \\10MBENCAPSULATE (\\10MBHOST.WORDS \\MY.NSADDRESS -\\10MBENCAPSULATION.WORDS) PFI.PRINT.LAMBDA.BODY (LAMBDAFONT BOLDFONT DEFAULTFONT) -NUMBERPAD.READER.HANDLE.CHAR (RNUMBER.ABORT.BITMAP RNUMBER.CLEAR.BITMAP) \\COERCE.NS.SOCKET ( -\\#WDS.NSADDRESS) \\EVAL-INVOKE-LAMBDA (\\STACKHI MYALINK) \\SPP.DEFAULT.ERRORHANDLER ( -\\SPPDSTYPE.BULKDATA) \\UFS.NEXTFILEFN (*DSK-HOST-NAME* *UFS-HOST-NAME*) \\BN.QRS (\\BIGNUM.BETA) -\\LEAF.FIX.BROKEN.SEQUIN (\\SS.OPENING \\LEAFOP.RESET \\SS.OPEN \\SS.CLOSING PROMPTWINDOW -\\LEAF.RECOVERY.TIMEOUT) \\FTP.GENERATEFILES (\\FTP.IDLE.TIMEOUT) SHOW.MATCHING.PAREN (\\LOC.ROW.0 -SHOWPARENFLG \\DSP) COMP.EVALFORM (COMPILE.CONTEXT MAXARGS) \\SEND.END (\\PT.END \\PUPOVLEN) MSPRGERR -(MSERRORFN) CONSFN (DECLST) \\ARBOUT (*TEDIT-FILE-READTABLE*) \\INTERPRET-ARGUMENTS (:CALLEE :ACTUAL -:MAXIMUM &BODY &INTERLISP &AUX) D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL (:3-BYTE COMPILER::*ENVIRONMENT* - :3-BYTE-INIT WORDSPERQUAD WORDSPERCELL BYTESPERWORD) \\BN.D2TH (\\BIGNUM.THETA) \\8859OUTCHARFN ( -*XEROXTOISO8859MAP*) \\DL.UNMAPPAGES (\\FPTOVP \\NO.VMEM.PAGE \\VMAP.VACANT) BRUSHP (KNOWN.BRUSHES) -CLOSEPOSTSCRIPTSTREAM (:EOL) \\INSURESCREEN (\\CURSORSCREEN) \\DL.MARK.PAGES.UNAVAILABLE (\\RPOFFSET -\\REALPAGETABLE \\RPT.UNAVAILABLE \\RPTENTRYLENGTH) SI::ADVICE-PUTDEF (SI::*ADVICE-HASH-TABLE* :BEFORE - :AFTER :AROUND) GETSCREENREGION (\\CURSORSCREEN) FORMAT-FIND-COMMAND (*FORMAT-INDEX*) RECORDECL1 ( -DECLARATIONCHAIN CLISPRECORDTYPES) |\\PFPutMarkerPage| (|\\PFMarkerFileD| |\\PhysVolumePage|) -DIRECTORY.PARSE (DEFAULTEXT DEFAULTVERS DESIREDPROPS) \\BN.ICANON (\\BIGNUM.BETA) HVBAKREAD ( -HPRPTSTRING FILERDTBL BACKREFS BACKREFCNT) \\DL.ASSIGNBUFFERS (WORDSPERPAGE) \\UFS.REGISTER.GFS ( -\\UFS.GFS.TABLE) CHAT.SET.EMULATOR (CHAT.DISPLAYTYPES) CHAT.MENU (LASTMOUSEBUTTONS CHATMENUITEMS -CHAT.DRIVERTYPES) SETTAIL? (\\BUFFER \\ENDBUFFER \\CURSOR \\ARROW \\CURSORCOL) \\NSPRINT.UNSUPPORTED ( -PROMPTWINDOW) CLISPRECORD (EXPR FAULTFN) /LISPXPUT (LISPXHISTORY) \\ORIGTERMTABLE ( -\\NSCHARHASHOVERFLOW ERASECHARCODE \\MAXTHINCHAR) SI::ADVICE-GETDEF (SI::*ADVICE-HASH-TABLE*) -*WHO-LINE-ACTIVE-TIMER* (*WHO-LINE-ACTIVE-PERIOD*) DINFO.CREATE.FMENU (MENUFONT) MENUBUTTONFN ( -LASTMOUSEBUTTONS) ICMLARRAY.SETVALUE (INSPECTPRINTLEVEL XCL:*EVAL-FUNCTION*) AS.CREATE.PASSWORDS ( -AS.WELL.KNOWN.NAME) MSPRGRECORD (MSFNDATA) EDITMODE (*EDITMODE* *DISPLAY-EDITOR*) \\TERMCODETOCLASS ( -EOL.TC NONE.TC CHARDELETE.TC WORDDELETE.TC WORDSEPR.TC LINEDELETE.TC RETYPE.TC CTRLV.TC) -\\SPP.CREATE.CON (\\XIPOVLEN \\SPPHEAD.LENGTH \\XIPT.SPP \\SPP.INITIAL.ALLOCATION -\\SPP.RETRANSMITQ.SIZE \\MY.NSADDRESS \\#WDS.NSADDRESS) \\FTP.CLOSEFILE (\\FTPCONNECTIONS FTPDEBUGLOG -PROMPTWINDOW \\NO.STORAGE.FULL \\BSPFDEV) INTERLISPMODE (:READTABLE :PACKAGE) COMPILE-FILE-SCAN-FIRST -(DFNFLG) \\BN.MADD (\\BIGNUM.BETA) COMP.GETBASE (COMPILE.CONTEXT EXP CODE) CLUNARYMINUS? (CURRTAIL -SUBPARENT TYPE-IN?) TB.DECONSIDERRANGE (LASTVISIBLE# FIRSTVISIBLE# BROWSER) \\BN.TH2B (\\BIGNUM.THETA) - \\BRUSHBITMAP (|\\BrushAList|) \\DO.PROGV (WORDSPERQUAD CELLSPERQUAD) GETSCREENPOSITION ( -\\CURSORSCREEN) \\PUPINIT (\\MACHINETYPE \\MAIKO) \\FAULTHANDLER (|\\InterfacePage| \\FAULTFXP) -ISET.IP (ISET) I.S.OPR (DFNFLG I.S.OPRLST) GETBOXSCREENPOSITION (\\CURSORSCREEN) ETHERHOSTNUMBER ( -\\PUP.READY \\LOCALPUPNETHOST) FIND-READTABLE (\\READTABLEHASH) |\\VFMClearIntervals| ( -|maxLogicalVolumes| |\\VFMintervals|) GETCP.IP (GETCP) \\GETMISCSOCKET (\\PUPSOCKETS) READ/NODE ( -LASTMOUSEBUTTONS) \\TEDIT.APPLY.STYLES (TEDIT.STYLES) PRINTLINE (TEXTOBJ) CLBINARYMINUS? (TAIL PARENT) - \\INITBIGNUMS (\\TT.FIXP \\TT.NUMBERP \\TT.ATOM) \\UFS.ABORT.DIRECTORY (FILEGROUP) ANTILOG (UBFLOAT3 -\\ANTILOGCARRAY) |PopUpWindowAndGetList| (LASTMOUSEX SCREENWIDTH LASTMOUSEY TTYINWORDRDTBL) -MAKEFILESCOMS (LOADOPTIONS) PFI.PRINT.LAMBDA (*PFI-FNSLST*) \\RTP.HANDLE.RFC (\\STATE.LISTENING -\\STATE.SENTRFC \\STATE.OPEN \\STATE.ENDSENT \\EVENT.RFC \\PUPOVLEN BYTESPERWORD \\PT.ABORT) CL:LOAD ( -*LOAD-VERBOSE* *LOAD-PRINT-STUFF* :ERROR *TERMINAL-IO*) MSBINDVAR (INVISIBLEVARS PARENT) RECLISPLOOKUP - (LISPXFNS) LISPX (LISPXMACROS LISPXHIST HELPFLAG LISPXHISTORY LISPXHISTORYMACROS MACROPROPS HISTSTR2 -HISTSTR0) \\TEDITMENU.SELSCREENER (TEDIT.SCRATCHSELECTION) \\UFS.ABORT.CL-DIRECTORY (GENERATOR) -\\LEAF.TIMEDOUT (\\SEQUIN.BROKEN \\MAXLEAFTRIES \\SS.OPENING :OPEN PROMPTWINDOW \\SS.OPEN PUPTRACEFILE - \\SS.CLOSING) \\LEAF.RECONNECT (\\LEAFCONNECTIONLOCK \\SS.OPEN) |\\UFSMakeUnixFormatName| ( -|\\UFSDefaultDelimiter|) \\PEEKREFILL (\\PRIMTERMTABLE) BREAKDOWN (BDLST BRKDWNLENGTH BDSINK) -POSTSCRIPT.BITMAPSCALE (POSTSCRIPT.BITMAP.SCALE POSTSCRIPT.PAGETYPE POSTSCRIPT.PAGEREGIONS -POSTSCRIPT.PREFER.LANDSCAPE \\POSTSCRIPT.ORIENTATION.MENU) CREATE-SHELL-STREAM (*NEW-SHELL-DEVICE* -*SHELL-DEVICE* \\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS FILELINELENGTH LF.EOLC |NoBits|) \\INVALIDADDR - (\\MP.INVALIDADDR) XCL::WHERE-IS-DEFAULT-DEFINE-TYPES (FILEPKGTYPES) COMPILE (NLAMA NLAML LAMS LAMA -NOFIXFNSLST NOFIXVARSLST SPECVARS LOCALVARS FILERDTBL) \\FILLPOLYGON.IP (DOSAVESIMPLEBODY { -MAKEOUTLINE MAKEOUTLINEODD MASKFILL }) \\LOOKUPPAGEMAP (|\\PageMapTBL| \\EMPTYPMTENTRY \\PAGEMAP) -\\SETTYPEMASK (|\\DTDSpaceBase| |\\MDSTypeTable|) RATOM (*INTERLISP-PACKAGE* *PACKAGE* RATOM.RT -UPPERCASEARRAY \\PNAMELIMIT \\FATPNAMESTRINGP) COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION ( -COMPILER::*ENVIRONMENT* COMPILER::*HOST-ARCHITECTURE*) \\UFS.CLEANUP.GFS.TABLE (\\UFS.GFS.TABLE) -LISPXUNREAD (HISTSTR3 HISTSTR0) \\SUBREAD (READ.RT RATOM.RT \\MAXTHINCHAR NSCHARSETSHIFT \\NORUNCODE -SEPRCHAR.RC OTHER.RC STOPATOMBIT PACKAGEDELIM.RC *KEYWORD-PACKAGE* CONTEXTMASK FIRST.RMC ALONE.RMC -*READTABLE* ESCAPE.RC CR.EOLC CRLF.EOLC LF.EOLC MULTIPLE-ESCAPE.RC \\PNAMELIMIT \\FATPNAMESTRINGP -*INTERLISP-PACKAGE* LEFTPAREN.RC PROPRB.RT NOPROPRB.RT LEFTBRACKET.RC RIGHTPAREN.RC RIGHTBRACKET.RC -STRINGDELIM.RC BREAKCHAR.RC) DIRECTORY.MATCH1 (UPPERCASEARRAY \\MAXTHINCHAR) LISPXREAD (LISPXREADFN) -MSUSERVBTABLES (MSUSERVBTABLES) \\GTREADTABLE (*READTABLE*) \\INVALIDVP (\\MP.INVALIDVP) LOWERCASE ( -LCASEFLG) \\RATOM/RSTRING-REFILL (\\LINEBUF.OFD RATOM/RSTRING.FT) LAYOUTGRAPH (DEFAULT.GRAPH.NODEFONT -DEFAULTFONT) \\TEDIT.BRAVOFILE? (TEXTOBJ) |\\UFSParse-Directory| (|\\UFSDefaultDelimiterChar| -|\\UFSDefaultDelimiter| \\DSK.DEFAULT.DIRECTORY \\UFS.DEFAULT.DIRECTORY) -\\PERIODICALLY-WHO-LINE-SHOW-ACTIVE (*WHO-LINE* *WHO-LINE-ACTIVE-PERIOD*) DINFO.ICONFN (WINDOW -TEDIT.TITLED.ICON.TEMPLATE TEDIT.ICON.FONT) CL:KEYWORDP (*KEYWORD-PACKAGE*) \\UFS.PARSE.BODY ( -|\\UFSBeforeType| |\\UFSBeforeVersion|) UNSET (SPELLINGS3) \\TOP-LEVEL-READ (*READTABLE* -*INTERLISP-PACKAGE* *PACKAGE* READ.RT UPPERCASEARRAY \\PNAMELIMIT \\FATPNAMESTRINGP) \\SEND.ACK ( -\\BSP.MAXPUPS \\PT.ACK \\PUPOVLEN \\MAX.PUPLENGTH) \\ALLOCATE.ETHERPACKET (\\FREE.PACKET.QUEUE -\\XIPOVLEN) PFI.HANDLE.DEFDEFINER (:NAME MAKESYSNAME :LYRIC :TEMPLATE :DEFINITION-PRINT-TEMPLATE) -PARSE-NSADDRESS (%FAT-CHAR-TYPENUMBER MASKWORD1\'S) READC (CR.EOLC CRLF.EOLC NSCHARSETSHIFT -\\NORUNCODE LF.EOLC) FINDFIELDUSAGE (FIELDS.IN.CREATE) ADDCHAR (\\RMARG) \\SPP.CREATE.WATCHER ( -\\SPP.INITIAL.ROUNDTRIP) \\LEAF.WHENCLOSED (\\SS.NOSOCKET \\LEAF.NEVER.OPENED \\LEAF.BROKEN.STATUS) -\\TRANSFERPAGE (\\VMAP.DIRTY \\REALPAGETABLE \\EMBUFBASE WORDSPERPAGE \\VMAP.VACANT \\EMBUFVP -\\RPOFFSET \\EMBUFRP \\MISCSTATS) \\PUTBASEFIXP (\\SMALLP MASKWORD1\'S \\FIXP) \\PUT.FILING.ATTRIBUTE -(\\NSFILING.ATTRIBUTES) SCANFORWARD (\\ARROW) SKIPSEPRCODES (SEPRCHAR.RC \\MAXTHINCHAR NSCHARSETSHIFT -\\NORUNCODE) \\FLUSHPAGE (\\REALPAGETABLE \\RPT.EMPTY \\VMAP.DIRTY \\MP.WRITING.LOCKED.PAGE -\\LASTVMEMFILEPAGE \\GUARDVMEMFULL \\PAGEMAP |\\PageMapTBL| \\FPTOVP \\NO.VMEM.PAGE |\\IFPValidKey| -|\\FirstVmemBlock| \\RPOFFSET) BREAK1 (:FORM :ENVIRONMENT :STACK-POSITION :CONDITION :FUNCTION) -TEDIT.PUT.PAGEFRAMES (*TEDIT-FILE-READTABLE*) CHDIR (|\\UFStopMonitor|) STOPSCAN? (BRACKETCNT BRACKET) - SETCORNER (|UpperRightCursor| |LowerRightCursor| |UpperLeftCursor| |LowerLeftCursor|) BITBLT.ERASE ( -\\TEXTURE \\DSP) CLISPIF0 (LISPXHIST COMMENTFLG) SEDIT::PARSE--COMMENT-WORD (SEDIT::TYPE-COMMENT-WORD) - DWIMIFYFNS (NOFIXFNSLST NOFIXVARSLST FILELST) \\GET.FILING.ATTRIBUTE (\\NSFILING.ATTRIBUTES) -\\FIXLINELENGTH.PSC (MAX.SMALLP) \\RTP.HANDLE.PUP (\\PT.RFC \\PT.END \\EVENT.END \\PT.ENDREPLY -\\EVENT.ENDREPLY \\PT.ABORT \\EVENT.ABORT BYTESPERWORD \\PT.ERROR \\PUPE.NOSOCKET) EXCHANGEPUPS ( -\\ETHERTIMEOUT) |\\VFMInsert1| (|maxReadPtr| |\\VFMlowPtr| |\\VFMhighPtr| |insertKey| |\\VFMhigh| -|insertLevel| |insertVolumePage|) ERASE.TO.END.OF.LINE (\\DSP \\DESCENT \\RMARG \\CHARHEIGHT) -TEDIT.FORMATTEDFILEP (TEDIT.DEFAULT.CHARLOOKS) FLIPNODE (BLACKSHADE) |\\UFSGetPrintFileType| ( -DEFAULTFILETYPELIST) SKREAD (\\MAXTHINCHAR RIGHTPAREN.RC RIGHTBRACKET.RC) \\DSPFONT.PSC ( -*POSTSCRIPT-UNACCENTED-FONTS*) CLISPATOM0 (LISPXHIST WTFIXCHCONLST WTFIXCHCONLST1) DO.CRLF ( -\\CHARHEIGHT \\DSP) DELETETO (\\BUFFER \\DSP) SI::INSERT-ADVICE-FORM (:FIRST :LAST) -CL:MAKE-CONCATENATED-STREAM (%CONCATENATED-STREAM-DEVICE \\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS -FILELINELENGTH LF.EOLC |NoBits|) PEEKCCODE (CR.EOLC CRLF.EOLC NSCHARSETSHIFT \\NORUNCODE LF.EOLC) -\\UPDATE-WHO-LINE-ACTIVE-FLAG (BLACKSHADE) |\\PFGetMarkerPage| (|\\PFMarkerFileD| |\\PhysVolumePage|) -\\QUEUE.OUTPUT.IOCB (\\MACHINETYPE \\DANDELION \\ES.PENDING \\DL.ENABLE.OUTPUT \\DL.ETHEROUTPUTREG -\\DAYBREAK \\DOLPHIN \\D0.ENABLE.10MBOUTPUT \\D0.OUTPUTSTATE) SEPRCASE (FILERDTBL CLISPCHARS) -MSGETBLOCKDEC (FILELST) \\ASSURE.FPTOVP.PAGE (|\\InterfacePage| WORDSPERPAGE \\FPTOVP) -\\FM.COLLECTNWAYS (\\FM.GROUPSPEC) INIT.CURSOR (\\DSP \\TTPAGELENGTH \\CHARHEIGHT) FILEGETDEF.MACROS ( -MACROPROPS) \\LEAF.IDLE? (\\LEAF.CACHETIMEOUT \\LEAF.IDLETIMEOUT) |\\DFSFreeDiskPages| ( -|\\LFtopMonitor|) ERASE.TO.END.OF.PAGE (\\DSP \\BMARG \\LMARG \\DESCENT \\RMARG) CL:READ ( -*STANDARD-INPUT* *READTABLE* READ.RT UPPERCASEARRAY \\PNAMELIMIT \\FATPNAMESTRINGP) -UTF16BE.PEEKCCODEFN (*UNICODETOXCCS* TRANSLATION-SHIFT TRANSLATION-MASK) CHAT (CHAT.ALLHOSTS) -LISP-TO-UNIX-TERMTYPE (CHAT.TO.UNIX.TERMINALS) ERRORMESS1 (*STANDARD-OUTPUT*) \\LFCASEARRAYFETCH ( -\\LFCASEARRAY) TERM.RESET.DISPLAY.PARMS (CHAT.FONT) CL:READ-PRESERVING-WHITESPACE (*STANDARD-INPUT* -*READTABLE* READ.RT UPPERCASEARRAY \\PNAMELIMIT \\FATPNAMESTRINGP) CONCATT.IP (CONCATT) LOG (2^-126 -\\EXPONENT.BIAS UBFLOAT3 LN2) \\COURIER.HANDLE.ERROR (PROMPTWINDOW) SI::COMPILED-FUNCTION-DEBUGGING-INFO - (WORDSPERQUAD BYTESPERWORD BYTESPERCELL) CLRPLNODE (UNDOSIDE UNDOSIDE0) \\SPP.PREPARE.OUTPUT ( -\\MAX.XIPDATALENGTH \\SPPHEAD.LENGTH) PRINDOTP (RMARGIN *STANDARD-OUTPUT* FIRSTPOS) COMP.PROGN ( -COMPILE.CONTEXT CODE OPPOP) SI::SET-ADVICE-MIDDLE-MAN (SI::*ADVICE-HASH-TABLE*) -COURIER.EXECUTE.EXPEDITED.CALL (\\EXTYPE.EXPEDITED.COURIER) SEDIT::PARSE--COMMENT ( -SEDIT::COMMENT-LEVEL-TABLE) WHO-LINE-SHOW-ACTIVE (*WHO-LINE* *WHO-LINE-ACTIVE-PERIOD*) -INTERSECTREGIONS (MIN.FIXP MAX.FIXP) COMP.MAP (ALLVARS SPECVARS LOCALVARS DONOTHING) \\RTP.CLEANUP ( -\\EVENT.FORCECLOSE) AS.REPLACE.PASSWORDS (AS.WELL.KNOWN.NAME) MSPRGE (INVISIBLEVARS VARS TOPVARS -PARENT USERTEMPLATES MSTEMPLATES MSRECORDTRANFLG) SHRKFY (FORM CLISPIFYFN) SCANBACK (\\ARROW) -LISPXFIND (ARCHIVELST HISTSTR0) INITIALIZECOLOR.IP (MAKEVEC FINDCOLORMODELOPERATOR DO) -PUPSOCKETFROMNUMBER (\\PUPSOCKETS) \\READTABLEP.DEFPRINT (*READTABLE*) SKIPSEPRS (SEPRCHAR.RC -\\MAXTHINCHAR NSCHARSETSHIFT \\NORUNCODE) \\MOVEREALPAGE (\\RPT.EMPTY \\EMBUFVP \\RPOFFSET \\EMBUFBASE - WORDSPERPAGE \\EMBUFRP) CMLRDTBL (\\MAXTHINCHAR) DMCHAT.HANDLECHARACTER (\\MACHINETYPE \\DORADO -INVERTWINDOWFN) \\NSFILING.DESERIALIZE (:PATHNAME) XCL::WHERE-IS-NOTICE (XCL::*WHERE-IS-HASH-FILE-SIZE* - :DIRECTION :IO) SI::PARSE-CL-ARGLIST (:REQUIRED) SCALE.IP (SCALE.OP) |\\PFPutLogicalVolumePage| ( -|\\PFLogicalVolumeFileD|) OVERFLOW? (\\CURSORCOL \\RMARG \\ARROW \\CURSOR) CREATE.NUMBERPAD.READER ( -BOLDFONT DEFAULTFONT RNUMBER.ABORT.BITMAP RNUMBER.CLEAR.BITMAP) MSINTERPA (OTHERSET) RPTEND (RPTCNT -RPTLAST HPFINALCHAR) SUPERPRINT/WRAPPER (*STANDARD-OUTPUT* RMARGIN LEFT) REALSTKNTH (\\STACKHI -\\#ALINK.OFFSET WORDSPERCELL) \\SPPCONNECTION (\\#WDS.NSADDRESS) RPTPUT (HPFINALCHAR) \\LEAF.IDLE ( -\\SEQUIN.NOOP) CL:READ-DELIMITED-LIST (*STANDARD-INPUT* *READTABLE* READ.RT UPPERCASEARRAY -\\PNAMELIMIT \\FATPNAMESTRINGP) \\UPDATECHAIN (\\REALPAGETABLE \\PAGETABLESTOPFLG \\RPT.EMPTY -\\PAGEMAP \\MP.MAPNOTLOCKED \\VMAP.REF \\RPOFFSET) SHOWWTITLE (WINDOWTITLESHADE BLACKSHADE -WINDOWTITLEPRINTLEVEL) |\\UFSGetFileTypeConfirm| (|FileTypeMenu|) SI::COMPILED-FUNCTION-INTERLISP? ( -:INTERLISP) MSINTERPRETSET (MSBLIP FILELST MSDATABASELST) MSADDTYPE (MSWORDS) COMPILER::START-COMPILATION - (COMPILER::*FASL-HANDLE* COMPILER::*INPUT-STREAM* COMPILER::*INPUT-FILENAME*) CHECKDEFS ( -RECORDEXPRESSION) TTBIN (EDITPREFIXCHAR \\DSP) INVERT.BITMAP.B/W (BLACKSHADE) \\LEAF.READPAGES ( -\\ETHERTIMEOUT \\LEAF.BROKEN.STATUS \\LEAFOP.ERROR \\LEN.READANSWER |ReadBit| BYTESPERPAGE) -\\INTERNAL/GETPASSWORD (LOGINPASSWORDS) MAPHASHFILE (HASH.HEADER.SIZE HASHFILERDTBL HASH.KEY.SIZE) -UTF16BE.OUTCHARFN (*XCCSTOUNICODE* TRANSLATION-SHIFT TRANSLATION-MASK) CLISPFORVARS ( -LEFT.ARROWS.BITTABLE LEFT.ARROW) COMP.SELECTQ (CODE SELECTVARTYPES COMPILE.CONTEXT) -TB.DO.ITEM.SELECTION (TS.IDLE LASTMOUSEBUTTONS TS.REPLACING TS.ADDING TS.REMOVING TS.EXTENDING.HI -TS.EXTENDING.LO TS.SHRINKING.HI TS.SHRINKING.LO) SHOWWFRAME (BLACKSHADE WHITESHADE) SPP.CLEARATTENTION - (\\SPPFLAG.ATTENTION \\SPPFLAG.EOM \\SPPFLAG.END) \\RSTRING2 (CRLF.EOLC CR.EOLC LF.EOLC -NSCHARSETSHIFT \\NORUNCODE \\MAXTHINCHAR STOPATOMBIT OTHER.RC ESCAPE.RC *READTABLE* STRINGDELIM.RC -SEPRCHAR.RC \\PNAMELIMIT) |\\PFVolumeNumber| (|\\DFSLogicalVolumeHash|) PRIN2-LONG-STRING (*READTABLE* - %FAT-CHAR-TYPENUMBER \\MAXTHINCHAR SEPRCHAR.RC) TTDELETELINE (\\BUFFER) RSTRING (\\PNAMELIMIT -\\FATPNAMESTRINGP) \\RTP.INFO.HOOK (BSPSOCKET) GETPUP (\\EPT.PUP PUPTRACEFILE) MSINITFNDATA (MSFNDATA) - SI::CLEAN-UP-CL-ARGLIST (:REQUIRED) TTSKREAD (\\ENDBUFFER \\MAXTHINCHAR \\RDTBLSA LEFTPAREN.RC -LEFTBRACKET.RC RIGHTPAREN.RC RIGHTBRACKET.RC STRINGDELIM.RC ESCAPE.RC MULTIPLE-ESCAPE.RC OTHER.RC -RDTBL) CANONICAL.HOSTNAME (\\DEVICENAMETODEVICE \\HOSTNAMES) READTABLEPROP (\\READTABLEHASH) -TRACKCURSOR (LASTMOUSEBUTTONS) READBQUOTECOMMA (*READTABLE*) \\FM.EDIT-SETUP (\\FM.EDIT-TTBL) COS ( -PI/180) FIXFIELDORDER (BINDINGS) \\SMASHSTRING (%FAT-CHAR-TYPENUMBER \\MAXTHINCHAR) SEDIT::PRINT-STRING - (*READTABLE* %FAT-CHAR-TYPENUMBER) \\FM.MAKELINKS (\\FM.GROUPSPEC) SI::GET-ADVICE-MIDDLE-MAN ( -SI::*ADVICE-HASH-TABLE*) SIN (PI/180) COURIER.EXPEDITED.CALL (\\COURIERPROGRAM) OPENPUPSOCKET ( -\\MAX.EPKTS.ON.PUPSOCKET) MAKE-READER-ENVIRONMENT (*PACKAGE* *READTABLE* *PRINT-BASE*) -|\\PFCurrentVol| (|\\PhysVolumePage|) INSIDE? (LASTMOUSEX LASTMOUSEY) \\INTERNAL/SETPASSWORD ( -\\GETPASSWORD.LOCK LOGINPASSWORDS |\\InterfacePage| UPPERCASEARRAY \\AFTERLOGINFNS) CLOSEHASHFILE ( -SYSHASHFILE) LLSH (\\FIXP \\SMALLP \\FLOATP MAX.POS.HINUM) TTYIN.FINISH (RDTBL \\ARROW \\MAXTHINCHAR -\\RDTBLSA ESCAPE.RC ECHOTOFILE \\BUFFER TTYINCOMMENTCHAR \\LINEBUF.OFD TTYINRESPONSES) SHOWSHADEDITEMS - (MENUSUBITEMMARK) PRIN2STRING (*DIVIDE-LONG-STRINGS* RMARGIN *STANDARD-OUTPUT* FIRSTPOS) -\\10MBSENDPACKET (\\MY.NSADDRESS \\10MBTYPE.TRANSLATIONS) POSITION (*STANDARD-OUTPUT*) MASTERSCOPEXEC -(CLISPCHARRAY) \\FM.MAKEBITMAP (WHITESHADE) TTYIN (TTYINFILLDEFAULT TTYINRAISEFLG \\PRIMTERMTABLE -TYPEAHEADFLG TTYINWORDRDTBL DEFAULTPROMPT) TTWAITFORINPUT (\\DSP LASTMOUSEBUTTONS \\CHARHEIGHT -LASTMOUSEX LASTMOUSEY \\BUFFER \\ENDBUFFER \\BMARG \\TTPAGELENGTH \\LOC.ROW.0 \\TTYINSTATE) -\\FM.NUMBER-SETUP (\\FM.EDIT-TTBL) \\LEAF.OPENERRORHANDLER (\\PUPE.NOSOCKET PROMPTWINDOW \\SS.NOSOCKET - \\PUPE.NOROUTE) \\LEAF.OPENFILE (CR.EOLC LF.EOLC CRLF.EOLC DEFAULTFILETYPE) TTYIN1 (\\FONT \\DSP -\\LMARG \\CURSORCOL \\CHARWIDTH OPTIONS HISTSTR1 HISTSTR0 RDTBL TTYINREADMACROS \\BUFFER \\ENDBUFFER -\\MAXTHINCHAR \\PRIMTERMSA CHARDELETE.TC LINEDELETE.TC WORDDELETE.TC RETYPE.TC \\FIRSTLINE -DISPLAYTERMFLG \\RDTBLSA WAKEUPMASK IMMEDIATE.RMW STOPATOMBIT RIGHTPAREN.RC RIGHTBRACKET.RC USERWORDS -LASTWORD DIDESCAPECODE \\PROMPTFORWORD EOLCHARCODE TTYINCOMMENTCHAR DORADO.RESTORE.BUF.CODES -TTYIN.RESTORE.BUF.CODES) SI::CONSTRUCT-MIDDLE-MAN (:UPCASE) CREATEWFROMIMAGE (|MinWindowWidth|) -\\FM.READUSERDATA (\\FM.DESCRIPTION-PROPS) SHRIEKER (NCONCLKUP NCONC1LKUP) EXEC-READ-LINE (*READTABLE* -) TTYIN1RESTART (\\LINEBUF.OFD \\TTYINSTATE) SI::DELETE-ADVICE (SI::*ADVICE-HASH-TABLE*) -SEDIT::INSERT-COMMENT-CHARS (SEDIT::TYPE-COMMENT-WORD) TB.CLEAR.LINE (WHITESHADE) TTYIN.READ ( -\\ENDBUFFER \\MAXTHINCHAR \\RDTBLSA RIGHTPAREN.RC RIGHTBRACKET.RC ESCAPE.RC \\NORUNCODE \\LINEBUF.OFD -READING.LBS) DRAWGRAYBOX (\\SOFTCURSORUPP \\EM.DISPINTERRUPT) \\TEDIT.COMMAND.RESET.SETUP ( -DEFAULTTTYREGION) ALLCALLS (MSFNDATA) CH.PROPERTY (CH.PROPERTIES) FASL::DUMP-INTEGER ( -FASL::+SMALLEST-FOUR-BYTE-INTEGER+ FASL::+LARGEST-FOUR-BYTE-INTEGER+) TTYIN.SETUP (\\DSP -\\SCREENBITMAPS) INITIALIZEMASTER.IP (NOVERSIONENCODINGSTRING INTERPRESSVERSION) \\SETMACROSYNTAX ( -ALWAYS.RMC FIRST.RMC ALONE.RMC IMMEDIATE.RMW NONIMMEDIATE.RMW ESC.RME NOESC.RME \\MAXTHINCHAR) -\\TEDIT-OPEN-FONT-FILE (MAX.SMALLP) CLISPIFYMATCHUP (CLISPISNOISEWORDS) TTBITWIDTH (\\FONT) DWMFY2 ( -PARENT DWIMEQUIVLST CLISPCONTEXT CLISPCHARRAY FAULTFN COMMENTFLG) CONCATLIST (%FAT-CHAR-TYPENUMBER -\\PLIST.HI) CL:PARSE-INTEGER (CMLRDTBL %FAT-CHAR-TYPENUMBER \\MAXTHINCHAR SEPRCHAR.RC) MAKEDOTPTAIL ( -\\DEDITDPHASH) COMP.EQ (COMPILE.CONTEXT CODE EXP) DWIMIFY1A (CLISPCONTEXT FAULTFN) MOVEBOX ( -\\SOFTCURSORUPP \\EM.DISPINTERRUPT) TTYINREAD (\\LINEBUF.OFD LISPXID HISTSTR0) READFROMBUF (\\ARROW -\\CURSOR EOLCHARCODE) STRING-EQUAL (SLEN1 SLEN2 BASE1 TYPENUMBER1 BASE2 TYPENUMBER2) -\\CREATECHARSET.IP (\\MAXTHINCHAR INTERPRESSFONTDIRECTORIES INTERPRESSFONTEXTENSIONS |noInfoCode|) -READ-EXTENDED-TOKEN (UPPERCASEARRAY NSCHARSETSHIFT \\NORUNCODE \\MAXTHINCHAR ESCAPE.RC CR.EOLC -CRLF.EOLC LF.EOLC MULTIPLE-ESCAPE.RC STOPATOMBIT \\PNAMELIMIT \\FATPNAMESTRINGP) UNBREAK0 (:IN) -EDITBMTEXTURE (DARKBITSHADE WHITESHADE) FONTCREATE (\\DEFAULTCHARSET IMAGESTREAMTYPES) RESTOREBUF ( -\\CURSOR \\ARROW \\CURSORCOL) SYSRECLOOK1 (SYSTEMRECLST) SENDPUP (\\EPT.PUP \\PUP.READY PUPTRACEFILE) -FLIPCURSORBAR (\\EM.CURSORBITMAP MAX.SMALLP \\MACHINETYPE \\DAYBREAK \\MAIKO) OPENHASHFILE ( -HASHACCESSTYPES SYSHASHFILELST) COPYALLBYTES (PFDEFAULT) XCL::DEL-WHERE-IS-DATABASE ( -XCL::*WHERE-IS-CASH-FILES*) SPP.FLUSH.TO.EOF (\\SPPFLAG.EOM \\SPPFLAG.END \\SPPFLAG.ATTENTION) -\\READREFILL (\\LINEBUF.OFD READ.FT) HISTORYSAVE (HISTSTR3 HISTSTR2 REDOCNT \#REDOCNT EDITHISTORY -EDITSTATS LISPXSTATS) HPRINTEND (HPFORWRDCDRCHR HPFORWRDCHR HPFINALCHAR) ALLPATHS (AVOID) -\\TRACKWITHBOX (\\CURSORDESTINATION LASTMOUSEBUTTONS FORCEPS LASTMOUSEX LASTMOUSEY) \\LEAF.WRITEPAGES -(\\LEAFOP.WRITE \\OPCODE.SHIFT BYTESPERPAGE \\LEN.FILEREQUEST) ICMLARRAY.DOWINDOWCOMFN (|WindowMenu|) -PRINT-DOCUMENTATION (*TERMINAL-IO*) \\CARET.FLASH (\\CARET.OFF.RATE) \\APPLYREADMACRO (*READTABLE*) -\\BSP.PREPARE.OUTPUT (\\PT.DATA) COMPILER::PRINT-CONTEXT (:UNKNOWN) \\INTERPRESSINIT (MICASPERINCH -POINTSPERINCH) \\DRAWLINE.PSC (:EOL) DCODERD (*READTABLE* FILERDTBL CODERDTBL WORDSPERQUAD -BYTESPERQUAD CELLSPERQUAD \\NT.PVARCODE \\NT.FVARCODE \\NT.IVARCODE BITSPERBYTE BITSPERWORD) -\\SHIFT.DOCUMENT (|\\FirstPieceOffset| TEXTOBJ) SI::ADD-ADVICE (SI::*ADVICE-HASH-TABLE*) RETFROM ( -\\STACKHI \\#ALINK.OFFSET) |\\PFGetLogicalVolumePage| (|\\PFLogicalVolumeFileD|) \\SUBREADCONCAT ( -\\FATPNAMESTRINGP) MASTERSCOPE1 (MASTERSCOPEDATE LISPXHISTORY) \\INVALID.SYMBOL (:NAME -*KEYWORD-PACKAGE* \\FATPNAMESTRINGP) MSADDMODIFIER (MSWORDS MSUSERVBTABLES) \\FM.GETBITMAPS ( -BLACKSHADE) \\FM.EDIT-INSERT (CHCODE WINDOW FONT \\FM.EDIT-BLOCKSIZE STREAM BOXOFFSET -\\FM.EDIT-CONTROLCHARS ECHOCHAR \\FM.EDIT-CONTROLCHARSECHO DISPLAYLEFT DISPLAYBOTTOM LEFT) DCODESKIP ( -*READTABLE* FILERDTBL CODERDTBL CODEINDICATOR) PRIN4 (PLVLFILEFLG *PRINT-LEVEL* *PRINT-LENGTH* -*INTERLISP-PACKAGE* *PACKAGE*) CL:GENTEMP (*PACKAGE* CL::*GENTEMP-COUNTER*) COMP.NUMBERTEST (DONOTHING - COMPILE.CONTEXT CODE) RECREDECLARE2 (RECNAME RECFIELDS) \\MAKESPACEFORLOCKEDPAGE (\\VP.STACK -\\RP.STACK \\VP.DISPLAY \\RP.TEMPDISPLAY \\VP.FPTOVP \\RP.FPTOVP |\\InterfacePage| \\RP.MISCLOCKED -\\FPTOVP \\NO.VMEM.PAGE) \\ITEM.WINDOW.SELECTION.HANDLER (LASTMOUSEBUTTONS LASTMOUSEX LASTMOUSEY) -\\IMAGEIOINIT (\\CURRENTDISPLAYLINE NSCHARSETSHIFT) \\DRAWCURVE.PSC (:EOL) \\ALLOC.CODE.BLOCK ( -CODEBLOCK.GCT CELLSPERQUAD) \\TFBRAVO.ADD.NAMEDTAB (\\NAMEDTAB.IMAGEFNS) WHO-LINE-SET-TIME ( -*WHO-LINE-OLD-TIME*) SI::DESCRIBE-INTERNAL (CL::*DESCRIBE-DEPTH*) \\10MBGETPACKET (\\10MB.RAWPACKETQ -\\10MBTYPE.TRANSLATIONS) PFI.ESTIMATE.SIZE (:DEFINITION-PRINT-TEMPLATE :BODY) COMPILER::GENCODE-UNWIND-PROTECT - (:ARGUMENT) \\MAIKO.10MBTURNONETHER (\\IOPAGE |\\InterfacePage| \\#WDS.NSHOSTNUMBER) \\MEDW.YOFFSET ( -MAX.SMALLP) \\FTPINIT (\\BSPFDEV) \\LEAF.TRUNCATEFILE (\\LEAFOP.WRITE \\OPCODE.SHIFT \\LEN.FILEREQUEST -) \\TEDIT.WORDDELETE (TEDIT.WORDBOUND.READTABLE \\MAXTHINCHAR TEXT.TTC) \\NOIMAGE.DSPFONT ( -FONTESCAPECHAR) HPRINT1 (HPRINTHASHARRAY HPFILLSTRING HPFILLCHAR HPRINTMACROS HPBAKCHAR HPFINALCHAR -\\MAXTHINCHAR) DO-EVENT (ADDSPELLFLG PRINTOUTFONT *THIS-EXEC-COMMANDS* *CURRENT-EVENT* VALUEFONT) -CHAT.CHOOSE.EMULATOR (CHAT.DISPLAYTYPES) |\\LFMakeDirHole| (BYTESPERPAGE) RINGBELLS (\\MACHINETYPE -\\DAYBREAK \\DANDELION \\MAIKO RINGBELLS.L1 RINGBELLS.L2) SPP.SENDATTENTION (\\SPPHEAD.CC.ATTENTION) -COMPARENCHARS (*READTABLE*) FAKE-COMPILE-FILE (NLAML NLAMA LAMS LAMA *INTERLISP-PACKAGE* SYSLOCALVARS -*COMMON-LISP-READ-ENVIRONMENT* COMPILE.EXT) READHOTSPOT (LASTMOUSEBUTTONS) \\UPDATEXYANDBOX ( -\\CURSORDESTINATION BASEPT OPPT) \\PUPERROR (\\PT.ERROR PUPTRACEFILE PUPERRORMESSAGES \\PUPHEADERLEN -\\PUPOVLEN BYTESPERWORD) MSADDANALYZE (MSWORDS) COMP.VAL (LEVEL CODE AC) \\FM.EDIT-PREPARETOEDIT ( -WINDOW TIMEOUT) COMPILER::LOCAL-CONSTANT-P (COMPILER::*CONSTANTS-HASH-TABLE*) \\MEDW.BLTCHAR ( -\\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS) |\\PFTransferPage| (|\\MiscFXP|) WBOX - (BLACKSHADE) SEDIT::DEGRADE-COMMENT (SEDIT::COMMENT-MARKERS) PREVWORD (\\ARROW \\MAXTHINCHAR -\\PRIMTERMSA WORDSEPR.TC \\RDTBLSA STOPATOMBIT) STRINGWIDTH (DEFAULTFONT) EDITMOVESUBTREE ( -PROMPTWINDOW LASTMOUSEBUTTONS) ADDTEMPLATEWORD (MSFNDATA MSDATABASELST MSDATABASEINIT) FIELDLOOK ( -USERRECLST) |\\VAMGetVAMPageFor| (|\\VAMbuffer|) FSET.IP (FSET) \\FM.EDIT-ITEM (\\FM.EDIT-TTBL -\\FM.EDIT-TIMEOUT LASTMOUSEBUTTONS) \\ORIG-INVALID.SYMBOL (*KEYWORD-PACKAGE*) |\\PFGetVols| ( -|\\PhysVolumePage|) GETFILEDEF (FILELST) DWIMIFY2? (DWIMIFYING NOFIXFNSLST NOFIXVARSLST) -SUPERPRINT/COMMENT (RMARGIN COMMENTFLG COMMENTCOL LEFT COMMENTFONT TAIL) GETCHATWINDOW ( -CHAT.WINDOW.SIZE CHAT.WINDOW.REGION) \\CARET.FLASH? (\\CARET.TIMER \\CARET.DEFAULT \\CARET.ON.RATE) -\\NEWEPHEMERALPAGE (|\\MiscFXP|) COMP.STFIX (CODE NUMBERFNS) |\\LFMakeLeaderPage| (DEFAULTFILETYPE -|leaderPageSeal| |lispFileVersion|) COMPILE-FILE? (*DEFAULT-CLEANUP-COMPILER*) PFI.ESTIMATE.SIZE1 ( -*PFI-MAX-WASTED-LINES*) COMPILER::PRINT-NODE (COMPILER::*NODE-HASH* COMPILER::*INDENT-INCREMENT*) -TEDIT.FORMAT.HARDCOPY (TEDIT.PAGE.FRAMES TEDIT.DEFAULTPAGEREGION :NEW-PAGE-LAYOUT -:SEARCHING-FOR-EQUIVALENT-PAGE) SUPERPRINT/SPACE (RMARGIN SPACEWIDTH LEFT) CL:RETURN-FROM (:TAG) ROUND - (XCL::SROUND) PRODUCE (COMVAR##) GREET (PREGREETFORMS POSTGREETFORMS) DWMFY1 (DWIMEQUIVLST \; VARS) -COMP.DELFIX (CODE) \\DONEWEPHEMERALPAGE (|\\PageMapTBL| \\EMPTYPMTENTRY \\PAGEMAP \\VMAP.VACANT -\\MP.NEWPAGE \\UPDATECHAINFREQ \\REALPAGETABLE \\RPT.UNAVAILABLE \\RPOFFSET \\VMAP.DIRTY WORDSPERPAGE -\\MISCSTATS) \\STREAM.FROM.PACKET (\\XIPOVLEN) SETUPPUP (\\PUP.READY \\PUPOVLEN) \\DEFINEDP (\\DEF.HI) - CLISPIFYMAPS (FORM) \\DRAWCIRCLE.PSC (:EOL) \\CCLOSURE.DEFPRINT (*READTABLE*) CHAT.INIT ( -CHAT.IN.EMACS?) PREVLINE (\\FIRSTLINE) TOPPATHS (DECLST USERRECLST) ADIEU (COMVAR##) -SUBPRINT/WRAPPERTAIL (*STANDARD-OUTPUT* RMARGIN LEFT) \\SPECIALRP (\\VP.STACK \\RP.STACK \\VP.DISPLAY -\\RP.DISPLAY) CLISPIFYRPLAC (CLTYP0 PARENT) \\FM.CHECKPROPS (\\FM.FORMAT-TYPES) HELP (:FORMAT-STRING -:FORMAT-ARGUMENTS) \\FM.EDIT-FINDNEXT (EDITITEM WINDOW) COMP.GETBASEBITS (COMPILE.CONTEXT EXP CODE) -\\SELECTREALPAGE (\\MAXCLEANPROBES \\MINSHORTSEEK \\REALPAGETABLE \\PAGETABLESTOPFLG \\RPT.EMPTY -\\MP.CHAIN.UNAVAIL \\VMAP.REF \\RPOFFSET \\RP.STACK \\MACHINETYPE \\DANDELION \\DAYBREAK \\VMAP.DIRTY -\\VMEM.FULL.STATE \\LASTVMEMFILEPAGE \\MAXSHORTSEEK \\MP.FLUSHLOCKED \\PAGEMAP \\MP.MAPNOTLOCKED -\\VMAP.VACANT \\MP.SELECTLOOP) \\DRAWELLIPSE.PSC (:EOL) \\SETUFNENTRY (|\\UFNTable| \\LITATOM -\\NEW-ATOM) SI::FINISH-ADVISING (:UPCASE) DWIM (DWIMODELST) HREAD (HPRINTRDTBL) \\GETUFNENTRY ( -|\\UFNTable|) \\DOFLUSHVM (\\EMUSWAPBUFFERS) COMP.FMEMB (COMPILE.CONTEXT CODE DONOTHING EXP) -FLONUM-TO-STRING (*DIGIT-STRING*) SKOR (SPELLCASEARRAY) COMPILER::PRINT-TREE (:UPCASE) -CH.DELETE.MEMBER.FROM.DOMAIN.ACL (\\CH.BROADCAST.SOCKET) COMP.EXPR (CODE COMPILETYPELST F -COMPILERMACROPROPS *BC-MACRO-ENVIRONMENT* :MACRO PIFN) GETCFILE (DWIMWAIT) \\FLUSHVM (|\\MiscFXP| -\\FAULTFXP \\SYSTEMCACHEVARS) \\READNUMBER.FLASHAREA (BLACKSHADE) SEDIT::MAP-FONT (DEFAULTFONT -CLISPFONT ITALICFONT COMMENTFONT BOLDFONT) GETEXPRESSIONFROMEVENTSPEC (LISPXHISTORY HISTSTR0) -DSKDISPLAY (\\DSKDISPLAY.WINDOW) DISPLAYAFTERENTRY (\\EM.CURSORBITMAP |\\VideoColor|) AU-REVOIR ( -COMVAR##) CMLREAD.FEATURE.PARSER (*FEATURES*) \\INSPECTW.COMMAND.HANDLER (INSPECTPRINTLEVEL -LASTMOUSEBUTTONS) DISPLAYBEFOREEXIT (|\\DisplayStarted|) \\GET-COMPILED-DEFINITION (\\DEF.HI) -PROVIDE.PROMPTING.WINDOW (TTYREGIONOFFSETS UNSCHEDULEDPROMPTREGION) \\RELEASEWORKINGSET (\\RPTSIZE -\\REALPAGETABLE \\RPT.EMPTY \\RPOFFSET \\VMAP.VACANT) XCL::GET-WHERE-IS-ENTRIES ( -XCL::*WHERE-IS-CASH-FILES*) COMPILER::COMPILE-SCAN-DEFINE-FILE-INFO (COMPILER::*INPUT-STREAM*) -MERGLIST (MAX.INTEGER) \\SHADEBITS (DARKBITSHADE WHITESHADE LASTMOUSEBUTTONS) DWMFY0 (DWIMIFYING TAIL -PARENT CLISPCONTEXT SUBPARENT ONEFLG) CL:MAKE-SYMBOL (%FAT-CHAR-TYPENUMBER) COMP.SPREAD ( -CL:CALL-ARGUMENTS-LIMIT) FILLTRAJECTORY.IP (MAKEOUTLINE MASKFILL) \\PROMPTFORWORDRETYPE ( -DONTECHOTYPEIN.FLG CHARBUFFER ECHO.CHANNEL) RETVALUES (\\STACKHI \\#ALINK.OFFSET) EDITADDNODE ( -PROMPTWINDOW) \\CODEBLOCKP (|\\FirstArraySegment| |\\ArrayBlockHeaderWords| |\\ArrayBlockPassword| -CODEBLOCK.GCT |\\ArrayBlockTrailerCells| |\\DTDSpaceBase|) \\WRITEDIRTYPAGE1 (\\VMAP.DIRTY) -\\COURIER.TRACE (COURIERTRACEFILE COURIERTRACEFLG COURIERPRINTLEVEL) \\PROMPTFORWORDBS ( -DONTECHOTYPEIN.FLG ECHO.CHANNEL) CLISPNOTVARP (VARS NOFIXVARSLST0 NOFIXVARSLST FAULTPOS GLOBALVARS -LOCALVARS SPECVARS) MODERNWINDOW.BUTTONEVENTFN (LASTMOUSEBUTTONS LASTKEYBOARD -|WindowTitleDisplayStream| MODERN-WINDOW-MARGIN) \\PROMPTFORWORDBIN (\\LINEBUF.OFD \\KEYBOARD.STREAM -TERMINCHARS.LST) \\ABORT.BULK.DATA (\\SPPFLAG.END \\SPPFLAG.ATTENTION \\SPPFLAG.EOM SPP.USER.TIMEOUT) -SEDIT::CREATE-NEW-COMMENT (SEDIT::TYPE-COMMENT) COMPILER::GENCODE-THROW (:ARGUMENT) EDITSHADEREPAINTFN - (BLACKSHADE) COMP.GETD (COMPILE.CONTEXT EXP) |\\VFMGetInterval| (|\\VFMvolumeHandle| |\\VFMintervals| - |treeDepth| |\\VFMnullKey|) FASL::DUMP-ARRAY (:OBJECT) MAKESYS (MAKESYSNAME HERALDSTRING) -EDITAPPLYTOLINK (PROMPTWINDOW) COURIER.WRITE (BITSPERWORD) \\TEMPLOCKPAGES (|\\MiscFXP|) -\\FILLCIRCLE.PSC (:EOL POSTSCRIPT.TEXTURE.SCALE) \\GETREGIONTRACKWITHBOX (\\CURSORDESTINATION -DASHEDSHADE LASTMOUSEBUTTONS FORCEPS LASTMOUSEX LASTMOUSEY NEWREGFNS) SI::UNADVISE-FROM-RESTORE-CALLS -(ADVISEDFNS *TERMINAL-IO*) \\MATCHPCS (\\WORDSINBTREEMAIN) DWIMUNSAVEDEF (COMMENTFLG LISPXHIST) -BRECOMPILE (NLAMA NLAML LAMS LAMA DWIMIFYCOMPFLG NOFIXFNSLST NOFIXVARSLST SYSLOCALVARS -RECOMPILEDEFAULT COMPILE.EXT DWIMWAIT BCOMPL.SCRATCH) CHARACTER.READ (\\MAXTHINCHAR *READTABLE* -STOPATOMBIT) CLISPIFYCROPS0 (FORM) UNSAVEFNS (MSFNTYPES RECOMPILEDEFAULT FILELST) EXPRCHECK (USERWORDS -) MSPRINTHELPFILE (MSHELPFILE) \\FM.CHECKDESCRIPTION (\\FM.ITEM-TYPES \\FM.HJUSTIFY-SPECS -\\FM.VJUSTIFY-SPECS BLACKSHADE \\FM.BOXSPACE) MKACCESSFN (RECORDEXPRESSION DECLST) -\\PROMPTFORWORDERASE (X0Y0 ECHO.CHANNEL) LISPDIRECTORYP (|\\LFtopMonitor|) CL::DEFSTRUCT-PARSE-OPTIONS - (:NAME :CONC-NAME) CALLSCCODE (IGNOREFNS |\\AtomHI| BITSPERBYTE :4-BYTE COMPILER::*HOST-ARCHITECTURE* - :3-BYTE) CREATE-PROCESS-STREAM (*NEW-SHELL-DEVICE* *SHELL-DEVICE* LF.EOLC \\STREAM.DEFAULT.MAXBUFFERS - \\NOIMAGEOPS FILELINELENGTH |NoBits|) SET-SYMBOL (*SPECIAL-BINDING-MARK* \\STACKHI) COMP.NUMBERCALL ( -EXP COMPILE.CONTEXT COMP.UNBOXED.TAG ALLDECLS CODE) COMPUTE-MACRO-ARGS (*MACRO-FORM* *MACRO-DEFAULT*) -POLYSHADE.SCAN.IP (DOSAVESIMPLEBODY { FILL.WRULE }) \\CREATECHARSET (\\MAXCHARSET \\DISPLAYSTREAMTYPES - IMAGESTREAMTYPES) TEDIT.INSERT (%FAT-CHAR-TYPENUMBER) \\BLTSHADE.PSC (BLACKSHADE WHITESHADE :EOL -POSTSCRIPT.TEXTURE.SCALE) \\NSFILING.COPY/RENAME (:PATHNAME PROMPTWINDOW) DEFAULTFONT ( -\\GUARANTEEDDISPLAYFONT) PRINTCOMSTRAN (PRINTOUTTOKENS VARS FAULTFN) DWIMARKASCHANGED (LISPXHIST) -WHO-LINE-SYMBOL-SPACE (|\\LastAtomPage| |\\AtomFrLst| *WHO-LINE-SYMBOL-SPACE*) TEDIT.CURSORMOVEDFN ( -\\TEDIT.SPLITCURSOR TEDIT.LINECURSOR) COMP.COMPARENUM (COMPILE.CONTEXT) OPENRTPSOCKET (\\STATE.CLOSED -\\LOCALPUPNETHOST \\FIXP \\EVENT.OPEN \\EVENT.OPENLISTENING \\EVENT.OPENIMMEDIATE \\RTP.DEFAULTTIMEOUT - \\STATE.OPEN \\STATE.ENDRECEIVED) TEDIT.UNDO (WAITINGCURSOR TEDIT.HISTORY.TYPELST) |\\VFMGet1| ( -|getLevel| |\\VFMlow| |\\VFMhigh|) GRAYBOXAREA (BLACKSHADE) FREEMENU (\\FM.DEFAULTFORMAT DEFAULTFONT -\\FM.ROWSPACE \\FM.COLUMNSPACE) CLISPIFYCROPS (PARENT CLISPCHARS FORM CAR/CDRSTRING) \\FTP.CLEANUP ( -\\FTP.IDLE.TIMEOUT \\FTPCONNECTIONS) XCL::WALK-MULTIPLE-VALUE-BIND (XCL::*DECLARATIONS* -XCL::*LEXICAL-VARIABLES*) COMP.STCOPY (LEVEL OPCOPY) EXPANDMACRO (CLISPARRAY COMPILERMACROPROPS) -COMP.NUMERIC (EXP COMPILE.CONTEXT COMP.UNBOXED.TAG ALLDECLS CODE) SUPERPRINT/COMMENT2 (TAIL -*STANDARD-OUTPUT*) 32MBADDRESSABLE (\\MACHINETYPE \\DORADO \\DOLPHIN \\DAYBREAK |\\InterfacePage|) -PFI.ADD.TO.INDEX (:NONE *PFI-PAGE-COUNT*) COMPILER::GENCODE-TAGBODY-INLINE (COMPILER::*CURRENT-FRAME*) - READVARS-FROM-STREAM (HPRINTRDTBL) \\TEDIT.DEFAULTSSEL (TEDIT.DEFAULT.CHARLOOKS) SEDIT::START-COMMENT - (SEDIT::TYPE-QUOTE) ENTEREVALQT (RESETFORMS) TEDIT.SUBSTITUTE (%FAT-CHAR-TYPENUMBER) -PFI.DEFAULT.HANDLER (*PFI-DEFINER-PROPS* :DEFINITION-PRINT-TEMPLATE *PFI-TYPES* :NAME *PFI-PAGE-COUNT* -) COMPILER::COMPILE-SCAN-DECLARE\: (DFNFLG COMPILER::*EVAL-WHEN-COMPILE*) CHANGERECORD ( -MSRECORDTRANFLG) \\MAIKO.INPUT.INTERRUPT (\\ES.PENDING \\10MBTYPE.TRANSLATIONS) COMPILER::META-EVALUATE - (:ARGUMENT) \\SET.LASTVMEMFILEPAGE (|\\InterfacePage| \\GUARDVMEMFULL) SEDIT::ASSIGN-FORMAT-CLISP ( -:KEYWORD) %COPY-ONED-ARRAY (PTRBLOCK.GCT) XCL::SET-CONSTANTP (COMPVARMACROHASH) RECREDECLARE1 ( -CLISPARRAY) COMPILER::TEST-ALPHA-2 (COMPILER::*NULL-CONTEXT* SYSLOCALVARS GLOBALVARS) -\\PAGEDBACKFILEPTR (|AppendBit| BYTESPERPAGE) CHARCODE.DECODE (CHARACTERNAMES CHARACTERSETNAMES) -TIMEALL (:OUTPUT :TIMED-FORM :DATA-TYPES :REPEAT) \\DSPPRINTCHAR (\\MAXTHINCHAR \\PRIMTERMSA REAL.CCE -ERASECHARCODE INDICATE.CCE SIMULATE.CCE \\MACHINETYPE \\DANDELION \\DAYBREAK \\MAIKO IGNORE.CCE) -MENUTITLEFONT (LASTSCREEN) STRPOSL (\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER \\MAXTHINCHAR) -POLYSHADE.BLT (FILL.WRULE) EDITSHADE (LASTMOUSEBUTTONS LASTMOUSEX LASTMOUSEY DARKBITSHADE WHITESHADE -BLACKSHADE) \\CREATECHARSET.PSC (\\MAXTHINCHAR) MACROS.GETDEF (MACROPROPS) -SI::UNBREAK-FROM-RESTORE-CALLS (BROKENFNS *TERMINAL-IO*) TEDIT.REDO (WAITINGCURSOR) CALLS3 ( -INVISIBLEVARS) \\NSFILING.GENERATEFILES (\\LISP.TO.NSFILING.ATTRIBUTES PROMPTWINDOW) HPRINT ( -HPRINTRDTBL) TEDIT.BUILD.PCTB1 (TEDIT.DEFAULT.FMTSPEC DEFAULTFONT |\\FirstPieceOffset| -|\\PieceDescriptorPAGEFRAME| |\\EltsPerPiece| |\\PieceDescriptorPARA| |\\PieceDescriptorLOOKS| -|\\PieceDescriptorOBJECT|) CLISPACKUP (CLISPCHARS CLISPCHARRAY) \\BSP.PREPARE.INPUT (\\PT.MARK -\\PT.AMARK \\PUPOVLEN) \\STRINGWIDTH.GENERIC (\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER *PRINT-LEVEL* - *PRINT-LENGTH*) FIX-FORM (TTYINFIXLIMIT :CLOSE-ON-COMPLETION *CURRENT-EVENT* INPUTFONT *READ-BASE*) -\\SPLITTREE (\\WORDSINBTREEMAIN \\BTREETOPHALFOFFSET \\BTREEMAXENTRIES \\BTREEWORDSPERENTRY) -COMPILER::TRANSFORM-GET/PUT-BASE (:FN :BYTES :ARGS :META-P :GET) CHANGECCODE (GCREF) PURGEDSKDIRECTORY - (|\\LFtopMonitor| PROMPTWINDOW) \\ITEMW.FLIPITEM (BLACKSHADE) \\PROMPTWINDOW.SET.HEIGHT (SCREENHEIGHT -) AS.CHANGE.OWN.PASSWORDS (AS.WELL.KNOWN.NAME) \\DSPCLIPPINGREGION.DISPLAY (MAX.SMALLP) -CL::ENSURE-CONSISTENT-PS (CL::%DEFAULT-DEFSTRUCT-TYPE CL::%NO-CONSTRUCTOR CL::%NO-PREDICATE -CL::%NO-COPIER CL::%DEFAULT-PRINT-FUNCTION) POLYSHADE.IP (\;) CODEWRAPPER.PRETTYPRINT (FNSLST) -COMPILER::GENCODE-SETQ (:ARGUMENT) PRINTCODENT (OUTF I4 CODEBASE |\\AtomHI| BITSPERBYTE IVARCODE -PVARCODE) MAKEACCESS1 (RECORDEXPRESSION NEWVALUE DECLST) \\DOVMEMFULLINTERRUPT (|\\InterfacePage| -\\LASTVMEMFILEPAGE) SHRIEKIFY (FORM) COMP.SHIFT (CODE EXP) \\TEDIT.DEFAULTS.CARET ( -TEDIT.DEFAULT.CHARLOOKS) \\FTP.RENAMEFILE (\\NO.UNIMPLEMENTED FTPDEBUGLOG) \\LEAF.EVENTFN (\\SS.ABORT) - PAINTW (PROMPTWINDOW BLACKSHADE LASTMOUSEX LASTMOUSEY LASTMOUSEBUTTONS) \\SETPUPCHECKSUM ( -\\NULLCHECKSUM) \\SCALEDBITBLT.PSC (POSTSCRIPT.BITMAP.SCALE :EOL) PROG1.PRETTYPRINT (*STANDARD-OUTPUT* -) \\CARET.CREATE (DEFAULTCARET) \\BACKCOLOR.DISPLAY (WORDMASK) DWIMIFY1? (DWIMIFYING NOFIXFNSLST -NOFIXVARSLST) SEDIT::COPY-SELECTION-COMMENT (SEDIT::TYPE-STRING) FORMAT-ERROR (:ARGS -*FORMAT-CONTROL-STRING* *FORMAT-INDEX*) BCOMPL (NLAML NLAMA LAMS LAMA DWIMIFYCOMPFLG NOFIXVARSLST -NOFIXFNSLST) SUPERPRINT/COMMENT1 (COMMENTFONT *STANDARD-OUTPUT* SPACEWIDTH COMMENTCOLUMN) COMP.RPLACD -(OPNIL COMPILE.CONTEXT) \\RTP.HANDLE.INPUT (\\EVENT.TIMEOUT) COLLECTFNDATA (CALLSDATA) -CH.ADD.MEMBER.TO.DOMAIN.ACL (\\CH.BROADCAST.SOCKET) TEDIT.BUILD.PCTB0 (TEDIT.DEFAULT.FMTSPEC -|\\FirstPieceOffset| |\\PieceDescriptorLOOKS| |\\PieceDescriptorOBJECT| |\\PieceDescriptorPARA| -|\\EltsPerPiece|) EDITDATE (COMMENTFLG) ASKUSERLOOKUP (OPTIONS OPTIONSLST) EDITDATE? (COMMENTFLG -INITIALS) \\BSP.CLEANUP.INPUT (\\PUPOVLEN MAX.SMALL.INTEGER) \\BLTSHADE.DISPLAY (\\TOPWDS -\\SCREENBITMAPS \\CURSORDESTINATION \\EM.DISPINTERRUPT) XCL::WALK-LET/LET* (XCL::*DECLARATIONS* -XCL::*LEXICAL-VARIABLES*) POSTSCRIPT.HARDCOPYW (POSTSCRIPT.BITMAP.SCALE) INDENTATION.FROM.HERE ( -*STANDARD-OUTPUT*) XCL::EXEC-TITLE-FUNCTION (*READTABLE*) TEDIT.PROMPTFLASH (PROMPTWINDOW) CLISPNOEVAL - (DWIMEQUIVLST NLAMA NLAML MACROPROPS) \\READBMDIMENSIONS (\\CURSORDESTINATION) POLYSHADE.DISPLAY ( -FILL.WRULE) |\\VFMKillBuffer| (|\\VFMbufferPool|) DWIMIFY0 (LISPXHIST ATM DWIMEQUIVLST DFNFLG) -CASE.PRETTYPRINT (*STANDARD-OUTPUT* *BACKQUOTE-WRAPPERS*) COMPILER::*COMPILE-DEFINER-CONTEXT* ( -:SETF-SYMBOL-FUNCTION-FN :DEFINEQ-FN :DEFCONSTANT-FN :DECLARE\:-FN :DEFINE-FILE-INFO-FN +*WHO-LINE-PROFILE-ENTRY* *WHO-LINE-TTY-STATE-ENTRY*) MAKEFILESCOMS (LOADOPTIONS) PRINTPUP ( +PUPTRACEFILE PUPPRINTMACROS \PUPOVLEN PUPTYPES) MAKE-PACKAGE-HASHTABLE (HASHTABLE-SIZE-LIMIT +PACKAGE-REHASH-THRESHOLD) \SPP.CLEANUP (RESETSTATE) \LEAF.ABORT.FROMMENU (GRAYSHADE) IDLE.SET.OPTION ( +PROMPTWINDOW IDLE.PROFILE IDLE.FUNCTIONS) GETHOSTINFO (NETWORKOSTYPES \IP.HOSTNAMES NETWORKLOGINFO) +UNIX-FULLNAME (\MACHINETYPE \MAIKO) PFI.COLLECT.DEFINERS (FILEPKGTYPES *PFI-DEFINER-PROPS*) GCTRP ( +\RECLAIM.COUNTDOWN) \INITMDSPAGE (WORDSPERPAGE \MDSIncrement) TEDIT.GET.OBJECT (DEFAULTFONT) +\CH.UPDATE.CACHE (PROMPTWINDOW) \STARTPAGE.PRESS (MICASPERINCH) SEDIT::INITIALIZE-LISTS (SEDIT::TYPE-ROOT +) MAKE-PRIME-HASHTABLE-SIZE (PACKAGE-REHASH-THRESHOLD) \SETXIPCHECKSUM (\NULLCHECKSUM) +SEDIT::MENU-INIT-STATE (*PACKAGE* *PRINT-BASE*) \LFScavVersion (MAX.SMALLP) MKSTRING (\ST.POS16 +\ST.BYTE *PRINT-BASE* *READTABLE*) \DOGCDISABLEDINTERRUPT (SCREENHEIGHT) CL::STRUCTURE-FUNCTION-P ( +CL::*PARSED-DEFSTRUCTS*) \COURIER.CHECK.PROCEDURES (COMMENTFLG) \LEAF.SETCREATIONDATE (\LEAFOP.WRITE +\OPCODE.SHIFT \BYTES.PER.TRIDENT.PAGE \LEN.DATE \LEN.FILEREQUEST) BRH/LAYOUT/DAUGHTERS (NODELST) +UNIX-GETPARM (\MACHINETYPE \MAIKO) COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION (COMPILER::*ENVIRONMENT* + COMPILER::*HOST-ARCHITECTURE*) BITMAPBIT (MINIMUMCOLOR BITMASKARRAY 4BITMASKARRAY \CURSORDESTINATION +\EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS) DBG::ATTACH-BACKTRACE-MENU (*SHORT-BACKTRACE-FILTER* +BACKTRACEFONT MaxBkMenuWidth :LEFT) \SEARCH.OUTPUTQ (\PT.INTERRUPT) IDLE.BOUNCING.BOX ( +IDLE.BOUNCING.BOX) SPY.MERGE.CALLEES (SPY.HASH) XCL::PPRINT-DEFINER (SPACEWIDTH +:DEFINITION-PRINT-TEMPLATE COMMENTFLG *STANDARD-OUTPUT* :BODY) STRPOS (\TRANSPARENT \ST.BYTE \ST.POS16 +) SHRKFY (FORM CLISPIFYFN) ANTILOG (UBFLOAT3 \ANTILOGCARRAY) COURIER.WRITE.NSADDRESS (\#WDS.NSADDRESS) + EDITGETDEF (SEDIT::CONTEXTS) COMP.EVALFORM (COMPILE.CONTEXT MAXARGS) CREATEW (MinWindowWidth +MinWindowHeight \CURSORSCREEN) IRM.GET.CREF (\IRM.CREF.IMAGEFNS) \NSFILING.SET.CONTINUANCE (MAX.SMALLP +) ASKUSER (DEFAULTKEYLST ASKUSERTTBL READBUF) \GENERIC.CURSOR (\CURRENTCURSOR \SCREENS) +\FILLPOLYGON.PSC (:EOL FILL.WRULE POSTSCRIPT.TEXTURE.SCALE) COERCETEXTOBJ (ReadBit) AIN (\ST.BYTE +\ST.CODE \ST.POS16 \ST.INT32 \ST.FLOAT \ST.BIT) CLISPDEC (CLISPRECORDTYPES CLISPARITHCLASSLST +CLISPARITHOPLST DECLWORDS) \TERMINATESPP (\SPS.CLOSED \SPS.ABORTED \SPS.INIT \SPS.LISTENING \SPS.OPEN +\SPPHEAD.CC.ACKNOWLEDGE \SPPHEAD.CC.EOM \SPPDSTYPE.END \SPS.ENDSENT) AOUT (\ST.BYTE \ST.CODE \ST.POS16 + \ST.INT32 \ST.FLOAT) \BLTCHAR (SUBRCALL) \EXTENDEDVMEMINIT (\InterfacePage \SWAPDSK1 \SWAPDSK2 +\MAINDISK) PFI.PRINT.INDEX (*PFI-PAGE-COUNT* :INDEX *PFI-TITLE* *PFI-LOCATIONS*) \MAYBEPEEKPUP ( +PUPTRACEFILE) \PROCESS.AFTER.EXIT (\PROCESS.AFTEREXIT.EVENT) MSEDITF (MSFNTYPES) \SPP.SETFILEPTR ( +ReadBit) \DRAWPOLYGON.PSC (:EOL) \MAIKO.SET.STORAGE.STATE (\InterfacePage \SFS.NOTSWITCHABLE +\SFS.SWITCHABLE) \PRESSINIT (MICASPERINCH) \USEREVENT (AROUNDEXITFNS) TWODINSPECT.SELECTITEM ( +INSPECTPRINTLEVEL) \PROCESS.BEFORE.LOGOUT (\PROCESSES) D-ASSEM:ASSEMBLE-FUNCTION (:FUNCTION) +\MEDW.CURSOR (\CURRENTCURSOR DEFAULTCURSOR \SOFTCURSORP) FEQP (\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER +\SMALLP \EXPONENT.BIAS \8BITS \SIGNBIT \MAX.EXPONENT \HIDDENBIT) \DEVICE.INPUT (MISC1) \OPENLINEBUF ( +\DEFAULTLINEBUF) \SPP.RESETCLOSE (RESETSTATE) D-ASSEM:INTERN-DCODE (WORDSPERQUAD BYTESPERWORD +CELLSPERQUAD BYTESPERCELL GCREF :CLOSURE :FUNCTION) SEDIT::REPLACE-LIST (SEDIT::TYPE-DOTLIST +SEDIT::TYPE-LIST) \DSPPRINTCR/LF (\CURSORDESTINATION \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS) +TTYIN.LASTINPUT (TTYINBUFFER) TEDIT.DEFAULT.MENUFN (TEDIT.DEFAULT.MENU WAITINGCURSOR +TEDIT.EXPANDED.PAGEMENU) SEPRCASE (FILERDTBL CLISPCHARS) %%LIT-SIZE-TO-SIZE (%%LIT-ARRAY-SIZES) +SHOWBITMAP.IP (BYTESPERCELL MAXLONGSEQUENCEBYTES) XCL::MAKE-IMPLICIT-KEY-HASH-TABLE (:FIRST :BASE +PTRBLOCK.GCT :LAST-INDEX :NUM-SLOTS :NUM-KEYS :NULL-SLOTS :KEY-ACCESSOR) \BSP.CLOSE.OPEN.SOCKETS ( +\BSPSOCKETS \STATE.CLOSED \STATE.LISTENING \STATE.ABORTED) DWIMIFYFNS (NOFIXFNSLST NOFIXVARSLST +FILELST) D-ASSEM:FIXUP-PTR-NO-REF (:4-BYTE COMPILER::*HOST-ARCHITECTURE* :3-BYTE) \SFFixY ( +MAX.SMALL.INTEGER) \SLOWBLTCHAR (\CURSORDESTINATION \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS) +D-ASSEM:FIXUP-SYMBOL (:4-BYTE COMPILER::*HOST-ARCHITECTURE* :3-BYTE) %%GET-TYPE-TABLE-ENTRY ( +%%ARRAY-TYPE-TABLE) PFI.PRINT.FILECREATED (ITALICFONT LAMBDAFONT :READTABLE :PACKAGE *PRINT-BASE* +:BASE) D-ASSEM:ALLOCATE-CODE-BLOCK (BYTESPERQUAD BYTESPERCELL CELLSPERQUAD) \CARET.FLASH.AGAIN ( +\CARET.UP) D-ASSEM:FIXUP-PTR (GCREF :4-BYTE COMPILER::*HOST-ARCHITECTURE* :3-BYTE) \PEEKPUP ( +\LOCALNDBS GCONST PROMPTWINDOW \LOCALPUPNETHOST) TTYINBUFFERSTREAM (TTYINBUFFERDEVICE \ENDBUFFER) +\LEAF.STREAM.IN.QUEUE (\LEAFOP.WRITE \LEAFOP.TRUNCATE \LEAFOP.CLOSE AppendBit WriteBit) +PFI.PRINT.MULTI.INDEX (:CONSECUTIVE :ENVIRONMENT *STANDARD-OUTPUT* *PFI-PAGE-COUNT* BOLDFONT +DEFAULTFONT :PACKAGE :READTABLE) ARRAYTYP (\ST.BYTE \ST.PTR2 \ST.PTR \ST.POS16 \ST.CODE \ST.INT32 +\ST.FLOAT \ST.BIT) CL:MAKE-PACKAGE (:NAME :NAMESYMBOL :EXTERNAL-ONLY :INTERNAL-SYMBOLS +:EXTERNAL-SYMBOLS :INDEX *PACKAGE-FROM-NAME* *PACKAGE-FROM-INDEX*) REPLACEFIELD (\FIXP \SMALLP \FLOATP +) BRH/OFFSET (NODELST) \SHOWSEL (BLACKSHADE) \MAYBEPEEKNS (XIPTRACEFILE) BOXCOUNT (\DTDSpaceBase \FIXP +) USERNAME (\InterfacePage GCONST \USERNAME) DASSEM.CANSHAREBINDING (FRAMES FRAME) +\POSTSCRIPT.OUTCHARFN (\POSTSCRIPT.CHARTYPE *POSTSCRIPT-NS-HASH*) SETD (\ST.PTR2) CONSCOUNT (\LISTP) +CL:USE-PACKAGE (*PACKAGE*) FTPGETMARK (FTPDEBUGLOG) ELTD (\ST.PTR2) SETUSERNAME (\InterfacePage GCONST +) CLISPFORERR1 (I.S. I.S.PTRS) %%LIT-TYPE-TO-TYPE (%%LIT-ARRAY-TYPES) \INDICATESTRING (\MAXTHINCHAR) +SEDIT::PARSE--LIST-INTERNAL (SEDIT::TYPE-LIST) \COERCEFONTDESC (\DISPLAYSTREAMTYPES DEFAULTFONT) +BSPREADP (\PT.MARK \PT.AMARK) HASHARRAY (\MaxArrayNCells PTRBLOCK.GCT) STKNTHNAME (MYALINK) +ICMLARRAY.SETVALUE (INSPECTPRINTLEVEL XCL:*EVAL-FUNCTION*) COMPILER:ENV-BOUNDP (:SPECIAL :GLOBAL) +CHARMACRO? (\READING LISPXID) IMPORT (*PACKAGE*) INVERT.TEXTURE.BITMAP (BITSPERWORD WORDMASK) +TB.SHOW.SELECTION (TB.SELECTION.BITMAP) DO.CHAT.OPTION (PROMPTWINDOW) CL:SHADOWING-IMPORT (*PACKAGE*) +LRSH (\FIXP \SMALLP \FLOATP \SIGNBIT) CLISPFORVARS (LEFT.ARROWS.BITTABLE LEFT.ARROW) +ONEDINSPECT.SETELT (INSPECTPRINTLEVEL XCL:*EVAL-FUNCTION*) \LEAF.SETFILETYPE (\LEAFOP.WRITE +\OPCODE.SHIFT \OFFSET.FILETYPE \BYTES.PER.TRIDENT.PAGE \LEN.FILETYPE&SIZE \FT.TEXT \FT.UNKNOWN +\FT.BINARY \LEN.FILEREQUEST) CL:SHADOW (*PACKAGE*) \NSGATELISTENER (\NS.WKS.RoutingInformation +:PROTOCOL \NSROUTER.PROBETIMER \NS.ROUTING.TABLE \RT.AGEINTERVAL \XIPT.ROUTINGINFO +BROADCASTNSHOSTNUMBER \XIPOVLEN BYTESPERWORD \NS.ROUTINGINFO.WORDS \XROUTINGINFO.OP.REQUEST +\RT.INFINITY \NSROUTER.PROBEINTERVAL) \INSTANCE-P (\LITATOM \NEW-ATOM) \SENDSPP (\SPP.RETRANSMITQ.SIZE + \SPPDSTYPE.ENDREPLY) EXPORT (*PACKAGE*) GETSUPERTYPE (\DTDSpaceBase) SEDIT::PRETTY-PRINT ( +SEDIT::PRETTY-PRINT-ENV MICASPERPT SEDIT::TYPE-ROOT) MAXIMUMSHADE (BLACKSHADE) INFILECOMTAIL ( +COMMENTFLG) \TYPENAMEFROMNUMBER (\MaxTypeNumber \DTDSpaceBase) CHECKBUFFERREFVAL (GCREF) +REMOVE-COMMENTS (*REMOVE-INTERLISP-COMMENTS*) \FTP.HANDLE.NO (\NO.FILE.NOT.FOUND FTPDEBUGLOG +\NO.BAD.TRANSFER.PARMS \NO.BAD.EOLCONVENTION \NO.FILE.PROTECTED \NO.ILLEGAL.CONNECTPASSWORD +PROMPTWINDOW \NO.ILLEGAL.USERNAME \NO.ILLEGAL.USERPASSWORD \NO.ILLEGAL.NAME.ERRORS \NO.STORAGE.FULL) +%%COPY-STRING-TO-ARRAY (%%THIN-CHAR-TYPENUMBER) GETFIELDSPECS (\DTDSpaceBase) \HCPYMODEBLTCHAR ( +MICASPERPT \CURSORDESTINATION \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS) CLEARMAP (\OPENFILES) +IRM.CREF.BOX (IRM.CREF.FONT) COMPILER:COPY-ENV-WITH-FUNCTION (:FUNCTION) \DRAWARC.PSC (:EOL) +\LEAF.TIMEDOUT.EXCESSIVE (LEAFABORTREGION \LEAFOP.WRITE \LEAFOP.CLOSE \LEAFOP.TRUNCATE AppendBit +WriteBit MENUFONT) > (CL::%%>) COMPILER:ASSEMBLER-ERROR (:FORMAT-STRING :FORMAT-ARGUMENTS) +COMPILER::START-COMPILATION (COMPILER::*FASL-HANDLE* COMPILER::*INPUT-STREAM* COMPILER::*INPUT-FILENAME* +) COMPILER:OPTIMIZE-AND-MACROEXPAND-1 (COMPILER::*ENVIRONMENT* COMPILER::*CONTEXT*) FB.THINP ( +*COMPILED-EXTENSIONS*) \CLEARMAP (AppendBit WriteBit) INVERT.TEXTURE (BLACKSHADE) PRINTPROPS ( +USERWORDS) FILING.CALL (PROMPTWINDOW :CLOSED \FIXP WORDSPERCELL) MARGINBAR.CREATE (MARGINBARIMAGEFNS) +PUP.ECHOSERVER (\PUPSOCKET.ECHO \PT.ECHOME \PT.IAMECHO) < (CL::%%<) \CH.CHECK.CLEARINGHOUSE ( +PROMPTWINDOW) \MEDW.BITBLT (\TOPWDS \SCREENBITMAPS) RESOLVE-USE-PACKAGE-CONFLICT (:PACKAGE :SYMBOLS +:USED-PACKAGE) SETY.PRESS (SPRUCEPAPERBOTTOMMICAS SPRUCEPAPERTOPMICAS SetYCode) UNDOSAVE (LISPXHIST +UNDOSAVES DWIMWAIT) XCL::PROFILE-VARIABLES (XCL:*PROFILE*) \ENDVECRUN (MicasPerScan +SPRUCEPAPERLEFTSCANS SPRUCEPAPERBOTTOMSCANS SPRUCEPAPERTOPSCANS SPRUCEPAPERRIGHTSCANS) CL:READ-CHAR ( +*STANDARD-INPUT*) COMPILER:COPY-ENV-WITH-VARIABLE (:LEXICAL) SEDIT::TRACK-SELECT (LASTMOUSEBUTTONS +SEDIT::SCRATCH-SELECTION SEDIT::PENDING-SELECTION SEDIT::PENDING-CARET) TTYINFIX (LISPXREADFN +TTYINFIXLIMIT HISTSTR0 LISPXID) TEDIT.WORDSET (\MAXTHINCHAR TEDIT.WORDBOUND.READTABLE PUNCT.TTC +WHITESPACE.TTC TEXT.TTC) COMP.MAP (ALLVARS SPECVARS LOCALVARS DONOTHING) COURIER.READ.NSADDRESS ( +\#WDS.NSADDRESS) \ACTONDISKPAGES (\SYSDISK \MAINDISK \MISCSTATS \DISKREQUESTBLOCK \EMUDISKBUFFERS +\EMUSCRATCH \DC.WRITEHLD \DC.WRITELD \DC.WRITED WORDSPERPAGE \EMUDISKBUFEND WORDSPERCELL \MiscFXP +BYTESPERPAGE) SEDIT::SMART-TTYFN (L) DATATYPES (\MaxTypeNumber \MaxSysTypeNum) FILEBROWSER ( +WindowTitleDisplayStream FB.BROWSERFONT FB.MENU.ITEMS *KEYWORD-PACKAGE* FB.INFO.MENU.ITEMS DIRCOMMANDS + FB.DEFAULT.INFO FB.MENUFONT FB.PROMPTLINES FB.PROMPTFONT FB.DEFAULT.NAME.WIDTH TB.LEFT.MARGIN) +\DISKERROR (\DSK.HARD.ERROR \MAINDISK \DSK.FULL.ERROR) CLOSEBSPSTREAM (\RTP.DEFAULTTIMEOUT \STATE.OPEN + \STATE.ENDRECEIVED) %%COPY-ONED-ARRAY (PTRBLOCK.GCT) \FTP.WHENCLOSED (FTPDEBUGLOG) +\SLOWHCPYMODEBLTCHAR (\CURSORDESTINATION \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS) \FTP.OPENFILE ( +DEFAULTFILETYPE) CL:UNINTERN (*PACKAGE*) \GENERIC.DSPCREATE (ScreenBitMap \SCREENS \DISPLAYIMAGEOPS +DisplayFDEV DEFAULTFONT SCREENWIDTH) MAPHASH (\HASH.NULL.VALUE) CL:RENAME-PACKAGE (*PACKAGE-FROM-NAME* +) DATATYPEP (\DTDSpaceBase \MaxTypeNumber) \IDLER (\LASTUSERACTION IDLE.PROFILE \IDLING.OVER +IDLE.SUSPEND.PROCESS.NAMES IDLE.RESETVARS PROMPTWINDOW WHOLESCREEN WHITESHADE BLACKSHADE SAVINGCURSOR) + FINDPTRSBUFFER (SYSTEMBUFFERLIST) CLISPIFYMATCHUP (CLISPISNOISEWORDS) \DOACTONDISKPAGES (\EOFDA +\DC.NOOP \FILLINDA \DSK.HARD.ERROR) FB.SEEFULLFN (FB.MORE.BORDER) PUP.ECHOUSER (PROMPTWINDOW +\PUPSOCKET.ECHO \PT.ECHOME BYTESPERWORD \PT.IAMBADECHO \PT.IAMECHO \PT.ERROR) IRM.DISPLAY.CREF ( +IRM.CREF.FONT) \SEARCHINTERPRESSFONTS (INTERPRESSFONTDIRECTORIES INTERPRESSFONTEXTENSIONS) +\BITBLT.MERGE (BITSPERWORD) \TEDIT2 (BothBits) SEDIT::TRACK-EXTEND (SEDIT::PENDING-CARET +SEDIT::PENDING-SELECTION SEDIT::INITIAL-SELECTION LASTMOUSEBUTTONS SEDIT::SCRATCH-SELECTION) +CL:UNUSE-PACKAGE (*PACKAGE*) OPENBSPSTREAM (\STATE.OPEN \STATE.ENDRECEIVED \BSP.INITIAL.ADATATIMEOUT +\BSP.INITIAL.MAXPUPALLOC \BSPFDEV BothBits \BSP.INACTIVITY.TIMEOUT) TEDIT.WORDGET (\MAXTHINCHAR +TEDIT.WORDBOUND.READTABLE) SETX.PRESS (SPRUCEPAPERLEFTMICAS SPRUCEPAPERRIGHTMICAS SetXCode) +\WRITEDISKPAGES (\SYSDISK \MAINDISK \MISCSTATS \DISKREQUESTBLOCK \EMUDISKBUFFERS \EMUSCRATCH +\DC.WRITED \DC.WRITEHLD \DC.WRITELD WORDSPERPAGE \EMUDISKBUFEND WORDSPERCELL BITSPERWORD BYTESPERPAGE +\MiscFXP) PRINTXIP (XIPTRACEFILE XIPPRINTMACROS \XIPOVLEN XIPTYPES) DELETE-PACKAGE ( +*PACKAGE-FROM-NAME* *PACKAGE-FROM-INDEX*) \HASHACCESS (\HASH.NULL.VALUE SYSHASHARRAY) +MB.MARGINBAR.SHOWTAB (\TEDIT.LEFTTAB \TEDIT.CENTERTAB \TEDIT.RIGHTTAB \TEDIT.DECIMALTAB +\TEDIT.DOTTED.LEFTTAB \TEDIT.DOTTED.CENTERTAB \TEDIT.DOTTED.RIGHTTAB \TEDIT.DOTTED.DECIMALTAB) +CLISPFORERR (FAULTFN) \DOWRITEDISKPAGES (\FILLINDA \EOFDA \DC.WRITED \SPAREDISKWRITEBUFFER \DC.READLD +BYTESPERPAGE \DC.WRITELD \DSK.HARD.ERROR \DSK.FULL.ERROR) \MEDW.DSPCREATE (ScreenBitMap DEFAULTFONT +SCREENWIDTH) TTADJUSTWIDTH (\ARROW) \SPP.SEND.ENDREPLY (\SPPHEAD.CC.EOM \SPPHEAD.CC.ACKNOWLEDGE +\SPPDSTYPE.ENDREPLY) M44.SIGNAL.DISK.ERROR (\DSK.HARD.ERROR \DSK.FULL.ERROR) MAPBUFFERCOUNT ( +SYSTEMBUFFERLIST) RESOLVE-EXPORT-CONFLICT (:PACKAGE :SYMBOLS :EXPORTED-SYMBOLS :PACKAGES) ADD-SYMBOL ( +HASHTABLE-SIZE-LIMIT PACKAGE-REHASH-THRESHOLD) RESOLVE-EXPORT-MISSING (:PACKAGE :SYMBOLS) +INSURE.B&W.TEXTURE (WHITESHADE BLACKSHADE) TEDIT.UNDO.DELETION (INSPC#) COURIER.VERSION# ( +COURIER.VERSION#) \LISPERROR (\INTERRUPTABLE \MP.UNINTERRUPTABLE) RAISE-SIGNAL ( +*CONDITION-HANDLER-BINDINGS* :MULTIPLE-HANDLER-BINDINGS) TURN.ON.ETHER (\NSFLG) PRINTDEF (DEFAULTFONT) + \STRINGWIDTH.HCPYMODE (IHALFMICASPERPT IMICASPERPT) \MAPPAGE (GCREF AppendBit WriteBit) +\ACTONVMEMPAGES (\SWAPREQUESTBLOCK) \SWITCHFONTS.PSC (*POSTSCRIPT-UNACCENTED-FONTS* :EOL) IDLE ( +IDLE.PROFILE) \SETEOF (BYTESPERPAGE) \WRITEVMEMPAGES (\DISKREQUESTBLOCK WORDSPERCELL BYTESPERPAGE) +MAPWORD (BYTESPERPAGE) CL:UNEXPORT (*PACKAGE*) STORAGE (\FIXP \MaxTypeNumber \DTDSpaceBase +\STORAGEFULLSTATE \SFS.FULLYSWITCHED \SFS.ARRAYSWITCHED \LeastMDSPage \FirstArrayPage \NxtArrayPage +\SecondArrayPage \AtomFrLst \LastAtomPage) \LEVELTEXTURE (BLACKSHADE16 DARKGRAY16 MEDIUMGRAY16 +LIGHTGRAY16 WHITESHADE16) SHOWRECTANGLE.PRESS (ShowRectangleCode) DWIMIFY1A (CLISPCONTEXT FAULTFN) +TEDIT.REDO.INSERTION (START-OF-PIECE) LOG (2^-126 \EXPONENT.BIAS UBFLOAT3 LN2) XCL::SETF-FIND-PROFILE +(XCL::*PROFILES*) CL:LIST-ALL-PACKAGES (*PACKAGE-FROM-NAME*) SPY.MAKE.TREE (SPY.ICON) CL:STRING= ( +SLEN1 SLEN2 BASE1 TYPENUMBER1 BASE2 TYPENUMBER2) \COURIER.BROADCAST.ON.NET (PROMPTWINDOW) STORAGE.LEFT + (\STORAGEFULLSTATE \SFS.ARRAYSWITCHED \SecondMDSPage \NxtMDSPage \NxtArrayPage \PagesPerMDSUnit +\SFS.SWITCHABLE \SecondArrayPage \LeastMDSPage \MDSFREELISTPAGE \LastAtomPage \FirstMDSPage +\FirstArrayPage \SFS.NOTSWITCHABLE) \HASHTABLE.DEFPRINT (*READTABLE*) SETUPFONTS.IP (DEFAULTFONT) +\STORAGE.TYPE (\DTDSpaceBase CDRCODING \MDSIncrement \PagesPerMDSUnit HUNKSTATS \LISTP \LISTPDTD) +DASSEM.DPRINTLAP (LSTFIL) SEDIT::TTYFN (EDITCHANGES L :NAME :TYPE :COMPLETION-FN) \BITBLT.BITMAP.SLOW +(BLACKSHADE) DO.MOUSE (LASTMOUSEBUTTONS \DSP) \STORAGE.HUNKTYPE (UNBOXEDBLOCK.GCT PTRBLOCK.GCT +CODEBLOCK.GCT HUNKSTATS) UNDONLSETQ (LISPXHIST) BSPOPENP (\STATE.OPEN \STATE.ENDRECEIVED +\STATE.ENDSENT) TEXTUREOFCOLOR (BLACKSHADE16) \VFMBlankInterval (\VFMvolumeHandle \VFMintervals +treeDepth) XCL:LIST-ALL-PROFILES (XCL::*PROFILES*) ONEDINSPECT.SELECTPROP (INSPECTPRINTLEVEL) +\PUNT.BITBLT.BITMAP (BLACKSHADE) XCL:PROFILE-NAME (XCL:*PROFILE*) SEDIT::LINEARIZE-LIST ( +SEDIT::TYPE-COMMENT) \PUNT.BLTSHADE.BITMAP (WHITESHADE BLACKSHADE) FAKE-COMPILE-FILE (NLAML NLAMA LAMS + LAMA *INTERLISP-PACKAGE* SYSLOCALVARS *COMMON-LISP-READ-ENVIRONMENT* COMPILE.EXT) \DODISKCOMMAND ( +\FILLINDA \DC.READHLD \IDC.READHLD \DC.READLD \IDC.READLD \DC.READD \IDC.READD \DC.WRITEHLD +\IDC.WRITEHLD \DC.WRITELD \IDC.WRITELD \DC.WRITED \IDC.WRITED \DC.SEEKONLY \IDC.SEEKONLY \DC.RESTORE +GCONST \CBS.GOODMASK \CBS.ERRORBITS \CB.PENDING \MISCSTATS) SETREADFN (\DisplayStarted) BRH/LAYOUT ( +PERSONALD MOTHERD) WHO-LINE-WHAT-IS-RUNNING (*WHO-LINE-STATE-UNINTERESTING-FNS*) XCL:FIND-PROFILE ( +XCL::*PROFILES*) \FTPERROR (FTPDEBUGLOG) XCL:COPY-PROFILE (XCL:*PROFILE*) \IFS.LOOKUPFILE ( +\SOCKET.LOOKUPFILE \PT.LOOKUPFILE \MAXETHERTRIES \PT.LOOKUPFILEREPLY \PT.LOOKUPFILEERROR \PT.ERROR +\PUPE.NOSOCKET PUPTRACEFILE) COMP.SELECTQ (CODE SELECTVARTYPES COMPILE.CONTEXT) \CLEANUPDISKQUEUE ( +GCONST \CB.PENDING \CBS.FAKEERROR \CBS.GOODMASK \CBS.GOOD MAX.SMALL.INTEGER \CBS.CHECKERROR +BITSPERWORD \DC.RESTORE \FILLINDA) \CODEARRAY (\ST.CODE CODEBLOCK.GCT CELLSPERQUAD) XCL:RESTORE-PROFILE + (XCL:*PROFILE*) SEDIT::SHRINKFN (:CLOSE-ON-COMPLETION :SHRINK) \NSFILING.GDATE (MIN.FIXP) +CLISPIFYRPLAC (CLTYP0 PARENT) \XIPERROR (\XIPT.ERROR \XIPOVLEN) INCORNER.REGION (LASTMOUSEX +MODERN-WINDOW-MARGIN LASTMOUSEY) XCL:SAVE-PROFILE (XCL:*PROFILE*) \PAGED.GETNEXTBUFFER (NoBits +BYTESPERPAGE) \CREATEINTERPRESSFONT (\ASCIITONS ASCIITONSTRANSLATIONS \ASCIITOSTAR) +\NSFILING.GET.ATTRIBUTES (DESIREDPROPS) \MAKE.EXPEDITED.STREAM (\BASEBYTESDEVICE \XIPOVLEN +\MAX.XIPDATALENGTH) FB.NAMES.DECREASING.VERSION (UPPERCASEARRAY) \PAGED.FORCEOUTPUT (AppendBit +WriteBit) \FIXCODEPTR (GCREF) COMPILE-FILE? (*DEFAULT-CLEANUP-COMPILER*) DASSEM.DSTOREFNDEF ( +WORDSPERQUAD BYTESPERQUAD CELLSPERQUAD \LITATOM \NEW-ATOM LOADTIMECONSTANTMARKER PVARCODE FVARCODE +IVARCODE) RESOLVE-UNINTERN-CONFLICT (:SYMBOL :SYMBOLS :PACKAGE) POSTSCRIPT.STARTPAGE (:EOL \PS.SCALE0) + FASL::DUMP-INTEGER (FASL::+SMALLEST-FOUR-BYTE-INTEGER+ FASL::+LARGEST-FOUR-BYTE-INTEGER+) +\PAGED.SETEOFPTR (WriteBit BYTESPERPAGE AppendBit) \REALDISKDA (\EOFDA) \CARET.FLASH (\CARET.OFF.RATE) + WHO-LINE-TTY-STATE (*WHO-LINE-STATE-UNINTERESTING-FNS*) \VFMAtLoad (lastPageNumber) +\TFBRAVO.GET.NAMEDTAB (\NAMEDTAB.IMAGEFNS) DSPCREATE (ScreenBitMap \DISPLAYIMAGEOPS DisplayFDEV +DEFAULTFONT SCREENWIDTH) RESOLVE-IMPORT-CONFLICT (:PACKAGE :SYMBOLS) SYSRECLOOK1 (SYSTEMRECLST) +\PAGEDREADP (EOL.TC \MAXTHINCHAR \PRIMTERMSA) CLISPIFYMAPS (FORM) \CHECKARRAYBLOCK ( +\ArrayBlockPassword \MinArrayBlockSize \FREEBLOCKBUCKETS \MAXBUCKETINDEX \MP.BADARRAYBLOCK) +XCL:OPEN-STREAM-P (NoBits) \FM.EDIT-SETUP (\FM.EDIT-TTBL) \CHECKFREEPAGE (BITSPERWORD \FILLINDA) +\ALLOCBLOCK.OLD (\MAXBUCKETINDEX \FREEBLOCKBUCKETS \ArrayBlockPassword \MP.BADARRAYBLOCK +\MAX.CELLSPERHUNK \ArrayBlockOverheadCells \ArrayBlockHeaderWords) TTYINREADP (HISTSTR0 \LINEBUF.OFD) +NS.ECHOUSER (\NS.WKS.Echo \XIPT.ECHO \XECHO.OP.REQUEST \XIPOVLEN BYTESPERWORD \XECHO.OP.REPLY +\XIPT.ERROR) TWODINSPECT.REDISPLAY (INSPECTPRINTLEVEL WHITESHADE) TEDIT.SETSYNTAX (\MAXTHINCHAR +TEDIT.READTABLE CHARDELETE.TTC WORDDELETE.TTC DELETE.TTC UNDO.TTC REDO.TTC CMD.TTC FUNCTIONCALL.TTC +NEXT.TTC EXPAND.TTC NONE.TTC) \ALLOCBLOCK.NEW (\ArrayFrLst \NxtMDSPage \GUARDSTORAGEFULL \NxtArrayPage + \VAL.HI) SWAPXIPADDRESSES (\#WDS.NSADDRESS \MY.NSHOSTNUMBER) SEDIT::INPUT-STRINGDELIM (SEDIT::TYPE-STRING +) \FM.NUMBER-SETUP (\FM.EDIT-TTBL) \ALLOCHUNK (\MAX.CELLSPERHUNK UNBOXEDBLOCK.GCT \HUNK.UNBOXEDSIZES +PTRBLOCK.GCT \HUNK.PTRSIZES CODEBLOCK.GCT CELLSPERQUAD \UNBOXEDHUNK.TYPENUM.TABLE +\CODEHUNK.TYPENUM.TABLE \PTRHUNK.TYPENUM.TABLE \DTDSpaceBase CELLSPERPAGE GCREF) SEDIT::INPUT-TOKENDELIM + (SEDIT::TYPE-COMMENT) NSNETDAYTIME0 (BROADCASTNSHOSTNUMBER \TIMESOCKET \EXTYPE.TIME +\TIMEOP.TIMEREQUEST \TIMEVERSION \MAXETHERTRIES \TIMEOP.TIMERESPONSE) TOPW.REPAINTFN ( +INSPECTPRINTLEVEL) NEARESTCORNER (LASTMOUSEX LASTMOUSEY) \SFFixDestination (MAX.SMALLP) +\HANDLE.RAW.XIP (\EPT.XIP MASKWORD1'S \NSOCKETS XIPTRACEFILE \XIPT.ECHO \NS.WKS.Echo \XECHO.OP.REQUEST + \XIPE.CHECKSUM \XECHO.OP.REPLY \XIPE.NOSOCKET \XIPE.SOCKETFULL \NS.ROUTING.TABLE) \LEAF.READFILEPROP +(\LEAFOP.READ \OPCODE.SHIFT \BYTES.PER.TRIDENT.PAGE \LEN.FILEREQUEST NOFILEPROPERROR \LEAF.GOODSTATUS +\LEN.READANSWER) TTPRINSPACE (\RMARG \DSP) FIND-SYMBOL* (\FIXP) \MAIKO.ALLOCBLOCK ( +\ArrayBlockLinkingCells \MaxArrayNCells UNBOXEDBLOCK.GCT PTRBLOCK.GCT CELLSPERPAGE \MAX.CELLSPERHUNK +\ArrayBlockOverheadCells \ArrayBlockHeaderWords GCREF) \BSP.HANDLE.DATA (\PUPOVLEN) CLISPIFYCROPS ( +PARENT CLISPCHARS FORM CAR/CDRSTRING) \TEDIT.WORDBOUND.READTABLE (\MAXTHINCHAR PUNCT.TTC TEXT.TTC +WHITESPACE.TTC MSPACE NSPACE THINSPACE FIGSPACE) COMP.NUMBERTEST (DONOTHING COMPILE.CONTEXT CODE) +\IDLERKEYACTION (IDLE.KEYACTIONTABLE) SEDIT::COMPLETION (:ABORT) \MAKEFREEARRAYBLOCK ( +\FreeArrayFlagWord) \TEDIT.INTERRUPT.SETUP (TEDIT.INTERRUPTS) \CLEARCB (\LENSHORTCB \CB.FREE) +DWIMARKASCHANGED (LISPXHIST) \MERGEFORWARD (\ArrayFrLst \ArrayFrLst2) \VFMCreateIntervals ( +maxLogicalVolumes) \FTP.SENDVERSION (\FTP.VERSION) DBG::FIND-DEBUGGER-STACK-FRAME (LASTPOS) \LINKBLOCK + (\MinArrayBlockSize \MAXBUCKETINDEX) \SETETHERFLAGS (\MACHINETYPE \DANDELION \DAYBREAK \MAIKO +BYTESPERPAGE \DORADO \InterfacePage) \MERGEBACKWARD (\ARRAYSPACE \ARRAYSPACE2 \ArrayBlockTrailerWords) + \VANILLADISKINIT (UPPERCASEARRAY \MAXCHAR) COMP.VAL (LEVEL CODE AC) TTPRIN1COMMENT (\COMMENTFONT) +\LEAF.GETFILEINFO.OPEN (\OFFSET.FILETYPE \LEN.FILETYPE&SIZE \FT.UNKNOWN \FT.TEXT \FT.BINARY +\OFFSET.AUTHOR \LEN.AUTHOR \OFFSET.BACKUPDATE \LEN.DATE) \DELETEBLOCK? (\MinArrayBlockSize +\FREEBLOCKBUCKETS \MAXBUCKETINDEX \MP.BADDELETEBLOCK) BSPPUTMARK (\PT.MARK) RECREDECLARE2 (RECNAME +RECFIELDS) TEDIT.GETSYNTAX (\MAXTHINCHAR TEDIT.READTABLE WORDDELETE.TTC CHARDELETE.TTC DELETE.TTC +UNDO.TTC REDO.TTC FUNCTIONCALL.TTC CMD.TTC NEXT.TTC EXPAND.TTC) \SPPGETERROR (XIPTRACEFILE) +\VIRTUALDISKDA (\EOFDA) \SFFixClippingRegion (MAX.SMALL.INTEGER) \PREFIXALIGNMENT? ( +\ArrayBlockHeaderWords CELLSPERPAGE CODEBLOCK.GCT \ArrayBlockOverheadCells CELLSPERSEGMENT) +IRM.LOAD-GRAPH (IRM.HOST&DIR) \FM.EDIT-INSERT (CHCODE WINDOW FONT \FM.EDIT-BLOCKSIZE STREAM BOXOFFSET +\FM.EDIT-CONTROLCHARS ECHOCHAR \FM.EDIT-CONTROLCHARSECHO DISPLAYLEFT DISPLAYBOTTOM LEFT) INTEGERLENGTH + (\SMALLP \FIXP MAX.POS.HINUM \SIGNBIT BITS.PER.FIXP MAX.SMALL.INTEGER BITSPERWORD) \BSP.HANDLE.ACK ( +\BSP.MIN.ADATA.TIMEOUT \BSP.MAX.ADATA.TIMEOUT \PT.INTERRUPT \PUPOVLEN \BSP.ALLOCHYSTERESIS +\BSP.MAXPUPALLOC \MAX.PUPLENGTH) SCALE.FONT (DECREASING.FONT.LIST) CL:FIND-ALL-SYMBOLS ( +*PACKAGE-FROM-NAME*) \UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (%%ECHO-STREAM-DEVICE +%%TWO-WAY-STREAM-DEVICE %%SYNONYM-STREAM-DEVICE) \LOCATE.NSNET (\NS.ROUTING.TABLE \ROUTING.TABLE.MASK +\RT.INFINITY) \DSKOpenDevice (\DSKtopMonitor) INITPUPLEVEL1 (\MACHINETYPE \DANDELION) \NEW2PAGE ( +WORDSPERPAGE) CLISPNOTVARP (VARS NOFIXVARSLST0 NOFIXVARSLST FAULTPOS GLOBALVARS LOCALVARS SPECVARS) +CL:FRESH-LINE (*STANDARD-OUTPUT*) \SFFIXLINELENGTH (MAX.SMALLP) \CHECKFORSTORAGEFULL (\NxtMDSPage +\NxtArrayPage \PagesPerMDSUnit \GUARDSTORAGEFULL \STORAGEFULLSTATE \SFS.NOTSWITCHABLE +\SFS.FULLYSWITCHED \MP.MDSFULL \GUARD1STORAGEFULL \MP.MDSFULLWARNING \SFS.SWITCHABLE \LeastMDSPage +\SecondMDSPage \SecondArrayPage \SFS.ARRAYSWITCHED) \LFOpenDevice (\LFtopMonitor \LFdevice) +DASSEM.DWRITEFN (LAPFLG CODEINDICATOR *READTABLE* FILERDTBL CODERDTBL LOADTIMECONSTANTMARKER) +\NSFILING.GETFILEINFO.FROM.PLIST (\LISP.TO.NSFILING.ATTRIBUTES) EDITFROMFILE (FILELST DWIMWAIT +FILEPKGTYPES) ICMLARRAY.DOWINDOWCOMFN (WindowMenu) CLISPDSUBST (BODY I.V. CLISPARRAY) \UFSOpenDevice ( +\UFStopMonitor) \NSFILING.GETEOFPTR (AppendBit WriteBit) EXPRCHECK (USERWORDS) TEXTICON ( +DEFAULTTEXTICON) SEDIT::DELETE-QUOTE (SEDIT::BASIC-GAP) UALPHORDER (UPPERCASEARRAY) +XCL::PROFILE-ENTRY-VALUE-NAME (XCL:*PROFILE*) DBG::FIND-NAMED-STACK-POSITION (NOSPELLFLG) ALPHORDER ( +\TRANSPARENT \ST.POS16) COURIER.OPEN (\NS.WKS.Courier \SPPDSTYPE.COURIER COURIERTRACEFILE +COURIER.VERSION#) \SFFixFont (MAX.SMALLP) BLOCK (\MP.PROCERROR \HIGHEST.PRIORITY.QUEUE +\MP.STACKRELEASED MYALINK MAX.FIXP BACKGROUNDFNS) \CREATESTARFONT (\DEFAULTCHARSET \ASCIITONS) +\SETBRUSH.IP (MICASPERPOINT STROKEWIDTH ROUND SQUARE BUTT STROKEEND) BKLINBUF (*READTABLE* +\LINEBUF.OFD \MAXTHINCHAR) \TEDIT.SEARCH.CODETABLE (\AlphaNumericFlag \AlphaFlag \OneCharPattern +\AnyStringPattern \OneAlphaPattern \OneNonAlphaPattern \AnyAlphaPattern \AnyNonAlphaPattern +\LeftBracketPattern \RightBracketPattern) \ARRAYBLOCKMERGER (\MaxArrayBlockSize +\ArrayBlockOverheadCells \MAX.CELLSPERHUNK \MinArrayBlockSize) SEDIT::OUTPUT-CR (MICASPERPT) +\PRIMARYTEXTURE (REDTEXTURE BLUETEXTURE GREENTEXTURE) DWIMUNSAVEDEF (COMMENTFLG LISPXHIST) \CLOSELINE +(READING.LBS) CHECK-SYMBOL-NAMESTRING (:EXTERNAL) \INCPARENCOUNT (STRINGDELIM.RC LEFTPAREN.RC +RIGHTPAREN.RC LEFTBRACKET.RC RIGHTBRACKET.RC) \SWAPDISKERROR (\DSK.HARD.ERROR \MAINDISK \SWAPDSK1) +CLISPIFYCROPS0 (FORM) PACKC (\PNAMELIMIT \MAXTHINCHAR \FATPNAMESTRINGP) UnixPrintCommand ( +UNIXPRINTSWITCHES) \LOOKUPFMAP (\ISFMAPOFFSET \ISFMAP \FILLINDA) \GR.GETDEFFN (GLOBAL.RESOURCES) +\FTP.EOL.FROM.PLIST (LF.EOLC CRLF.EOLC CR.EOLC) TB.UPDATE.DISPLAY (WHITESHADE) INVERT.SEGMENT (\ARROW +\TTPAGELENGTH \LOC.ROW.0 \CHARHEIGHT \BMARG \DESCENT BLACKSHADE DOTSHADE \DSP) \RESETLINE (FILLING.LBS +) \WHICHPART (\XVmemFmapHighBase) BRECOMPILE (NLAMA NLAML LAMS LAMA DWIMIFYCOMPFLG NOFIXFNSLST +NOFIXVARSLST SYSLOCALVARS RECOMPILEDEFAULT COMPILE.EXT DWIMWAIT BCOMPL.SCRATCH) \COPYARRAYBLOCK ( +\ArrayBlockHeaderWords \ArrayBlockPassword \ArrayBlockOverheadCells PTRBLOCK.GCT WORDSPERCELL +CODEBLOCK.GCT) CLEARBUF (\LINEBUF.OFD *STANDARD-INPUT* \DEFAULTLINEBUF) DASSEM.DASSEM (CONSTOPS +TOPFRAME :4-BYTE *BC-MACRO-ENVIRONMENT* :3-BYTE NARGMAX NLOCALMAX NFREEMAX OPNIL OPPOP) +RESOLVE-MISSING-PACKAGE (:PACKAGE-NAME :SYMBOL-NAME :EXTERNAL) \NEW.READ.SYMBOL (*READTABLE* FILERDTBL + CODERDTBL *KEYWORD-PACKAGE* *PACKAGE*) \COPYCODEBLOCK (GCREF) PACK (\FATPNAMESTRINGP \PNAMELIMIT) +COMP.GETBASEBITS (COMPILE.CONTEXT EXP CODE) DBG::DEBUGGER-MENU-HELP (PROMPTWINDOW +*DEBUGGER-COMMAND-TABLE*) COPYALL (DONTCOPYDATATYPES) NEARTOP (LASTMOUSEY LASTMOUSEX) \PACK.ITEM ( +\PNAMELIMIT \PNAMESTRING) FIND-DEBUGGER-ENTRY-FRAME (*DEBUGGER-ENTRY-POINTS*) \3MB.CREATENDB ( +\3MBTYPE.PUP) OPEN (:INPUT :DEFAULT :FILE-STREAM-P) \SAVELINEBUF (\LINEBUF.OFD FILLING.LBS +RETYPING.LBS) COMPILER::PRINT-NODE (COMPILER::*NODE-HASH* COMPILER::*INDENT-INCREMENT*) +\ADVANCE.ARRAY.SEGMENTS (\VAL.HI \NxtArrayPage \ArrayFrLst CELLSPERPAGE \MinArrayBlockSize +\LeastMDSPage) TTY.PROCESS (TTY.PROCESS.DEFAULT \PROCESSES \DEFAULTKEYACTION \TTY.PROCESS.EVENT) +\LFINITCASEARRAY (\DISKNAMECASEARRAY) \FM.EDIT-PREPARETOEDIT (WINDOW TIMEOUT) COMPILER::GENCODE-UNWIND-PROTECT + (:ARGUMENT) CL:ARRAY-DIMENSION-LIMIT (CL:ARRAY-TOTAL-SIZE-LIMIT) \PFTransferFilePage (\PhysVolumePage +) \NEW.MKATOM (\MAXTHINCHAR *INTERLISP-PACKAGE*) \BYTELT (\ST.BYTE \ST.CODE) SETDISPLAYHEIGHT ( +\MACHINETYPE \DOLPHIN \DORADO \DisplayStarted BITSPERWORD SCREENHEIGHT) COMP.DELFIX (CODE) +RESOLVE-MISSING-EXTERNAL-SYMBOL (:NAME :PACKAGE) \BYTESETA (\ST.BYTE \ST.CODE) PRINTBELLS (BELLS) +INVERTW (BLACKSHADE) \CARET.FLASH? (\CARET.TIMER \CARET.DEFAULT \CARET.ON.RATE) FB.ANALYZE.PATTERN ( +UPPERCASEARRAY) \WORDELT (\ST.POS16) XCL:PACK (*PACKAGE*) COMP.STFIX (CODE NUMBERFNS) +ONEDINSPECT.SELECTITEM (INSPECTPRINTLEVEL) TTNTHLINE (\FIRSTLINE) \MEDW.SHRINKW (DEFAULTICONFN) +\ARRAYTYPENAME (\ST.CODE) \NSINIT (\NSOCKETS \LOCALNDBS \NS.READY.EVENT) CL:INTERN (*PACKAGE*) +INTERPRESSBITMAP (MICASPERINCH DEFAULT.INTERPRESS.BITMAP.ROTATION) CLISPACKUP (CLISPCHARS CLISPCHARRAY +) INTERN-LITATOM (:INTERNAL *KEYWORD-PACKAGE*) TB.PRINT.LINE (TB.LEFT.MARGIN) OLDFAULT1 (:NAME +:ARGUMENTS) SPY.LEGEND (SPY.BORDERS SPY.FONT) PAGEFULLFN (\LINEBUF.OFD \STOPSCROLLMESSAGE +ERASECHARCODE) COMPILER::GENCODE-THROW (:ARGUMENT) RESOLVE-READER-CONFLICT (:EXTERNAL +*PREFERRED-READING-SYMBOLS*) SPY.MAKEGRAPHNODES (SPY.BORDERS TOPCOUNT SPY.FONT) MAKEBITTABLE ( +\MAXTHINCHAR \MAXCHAR) COMP.FMEMB (COMPILE.CONTEXT CODE DONOTHING EXP) \3MBWATCHER (\MAXWATCHERGETS) +EXCHANGEXIPS (\ETHERTIMEOUT) DBG::DEBUGGER-BUTTON-EVENT (*DEBUGGER-MENU-ITEMS* LASTMOUSEBUTTONS) +\BLOCKDATAP (\DTDSpaceBase) SETLINELENGTH (\TERM.OFD) COMP.EXPR (CODE COMPILETYPELST F +COMPILERMACROPROPS *BC-MACRO-ENVIRONMENT* :MACRO PIFN) \NSFILING.HOSTNAMEP (\SPP.BULKDATA.DEVICE) +OPENPOSTSCRIPTSTREAM (\POSTSCRIPTIMAGEOPS USERNAME \POSTSCRIPT.JOB.SETUP POSTSCRIPT.PAGETYPE +POSTSCRIPT.PAGEREGIONS POSTSCRIPT.IMAGESIZEFACTOR \PS.SCALE0 DEFAULTFONT \POSTSCRIPT.ORIENTATION.MENU) + DISPLAYSTREAMP (\DISPLAYSTREAMTYPES) \LEAF.REPAIR.BROKEN.PUP (\LEAFOP.READ \LEAFOP.WRITE +\LEAFOP.TRUNCATE \LEAFOP.DELETE \LEAFOP.CLOSE \LEAF.BROKEN.STATUS) CONCOCT-SYMBOL (CMLSYMBOLS.SHARED +*INTERLISP-PACKAGE* *LISP-PACKAGE*) \BSP.HANDLE.INTERRUPT (\PT.INTERRUPTREPLY \PUPOVLEN) +\SETFATSYNCODE (\MAXTHINCHAR \NSCHARHASHKEYS \NSCHARHASHOVERFLOW) TERMCHARWIDTH (\CHARMASK) +PACKAGE-ENABLE (*INTERLISP-PACKAGE*) \SPP.DUPLICATE.REQUEST (\SPPDEVICE) COMPILER::PRINT-TREE (:UPCASE +) PLAYTUNE (\MACHINETYPE \DAYBREAK \MAIKO \DANDELION \RCLKMILLISECOND \DLION.RCLKMILLISECOND) +\SHOW.ARRAY.FREELISTS (STORAGE.ARRAYSIZES MAX.SMALLP UNBOXEDBLOCK.GCT \MAXBUCKETINDEX +\FREEBLOCKBUCKETS WORDSPERCELL) FILEPOS (\ST.BYTE \TRANSPARENT FILEPOS.SEGMENT.SIZE) +CL:LEAST-NEGATIVE-LONG-FLOAT (CL:LEAST-NEGATIVE-SINGLE-FLOAT) \LFCreateDirectories (maxLogicalVolumes) + \M44DOEXTENDVMEMFILE (\SPAREDISKWRITEBUFFER \ISFSCRATCHDAS \ISFMAP \ISFCHUNKSIZE \EOFDA \FILLINDA +\MAINDISK \DC.READD \SWAPREQUESTBLOCK BYTESPERPAGE \ISFSCRATCHCAS \DC.WRITED) SHRIEKIFY (FORM) +CL:DOUBLE-FLOAT-EPSILON (CL:SINGLE-FLOAT-EPSILON) C.FLOATUNBOX (COMPILE.CONTEXT) CLISPFORVARS1 ( +LEFT.ARROW.BITTABLE) \STREAMCHARWIDTH (\CHARMASK \UNITWIDTHSVECTOR \MAXTHINCHAR \PRIMTERMTABLE +INDICATE.CCE SIMULATE.CCE REAL.CCE ERASECHARCODE IGNORE.CCE) \PFPutFileMapPage (\PFFileMapFileD) +PACKAGE-HIERARCHY-INIT (*INTERLISP-PACKAGE* :EXTERNAL) \NSFILING.CLOSE.BULKSTREAM (RESETSTATE) +\VFMCorrectBufferP (\VFMvolumeHandle) EDITDATE (COMMENTFLG) NSNAME.TO.STRING (CH.DEFAULT.ORGANIZATION +CH.DEFAULT.DOMAIN) XCL::PROFILE-ENTRY-VALUE (XCL:*PROFILE*) FTPPRINTCODE (FTPDEBUGLOG FTPNOCODES) +\PARSEARRAYSPACE (\ArrayFrLst2 \ARRAYSPACE2 \ARRAYSPACE \ArrayFrLst) CL:LEAST-NEGATIVE-SHORT-FLOAT ( +CL:LEAST-NEGATIVE-SINGLE-FLOAT) FFILEPOS (\MAX.PATTERN.SIZE \MIN.PATTERN.SIZE \MIN.SEARCH.LENGTH +\ST.BYTE \TRANSPARENT FILEPOS.SEGMENT.SIZE \MAXCHAR) CL:LEAST-NEGATIVE-DOUBLE-FLOAT ( +CL:LEAST-NEGATIVE-SINGLE-FLOAT) XCL::SHOW-CLOSURE-CACHE (SI::*CLOSURE-CACHE*) \FM.EDIT-ITEM ( +\FM.EDIT-TTBL \FM.EDIT-TIMEOUT LASTMOUSEBUTTONS) \SETUP.FFILEPOS (BITSPERBYTE \MAXCHAR) +COMP.NUMBERCALL (EXP COMPILE.CONTEXT COMP.UNBOXED.TAG ALLDECLS CODE) CL:LEAST-POSITIVE-LONG-FLOAT ( +CL:LEAST-POSITIVE-SINGLE-FLOAT) C.FLOATBOX (COMPILE.CONTEXT) TEDIT.SETFUNCTION (TEDIT.READTABLE +\MAXTHINCHAR FUNCTIONCALL.TTC NONE.TTC) CHANGEBACKGROUNDBORDER (\MACHINETYPE \DANDELION \DAYBREAK) +FASL::DUMP-ARRAY (:OBJECT) \MAKE.COURIER.REP.STREAM (BothBits) COMP.GETD (COMPILE.CONTEXT EXP) \CHDEL1 + (\LINEBUF.OFD) \BSP.HANDLE.ERROR (\PUPE.SOCKETFULL \PUPE.GATEWAYFULL \PUPE.NOSOCKET \EVENT.ABORT) +DBG::NEAR-BY-REGION (\CURSORDESTWIDTH \CURSORDESTHEIGHT) UnixTempFile (FISTempDir) POSTINITARRAYS ( +\MAXBUCKETINDEX \ArrayFrLst \MaxArrayBlockSize \MinArrayBlockSize \VAL.HI \NxtArrayPage \ARRAYSPACE +\MDSIncrement) \NSFILING.ERRORHANDLER (NSFILING.SHOW.STATUS PROMPTWINDOW) \ECHOCHAR (\PRIMTERMTABLE +\TERM.OFD) \INITIALIZESWAPDISK (\MAINDISK \NWORDS.DSKOBJ \XVmemFmapBase) +COMPILER::COMPILE-SCAN-DEFINE-FILE-INFO (COMPILER::*INPUT-STREAM*) TB.CLOSE/SHRINK (PROMPTWINDOW) +EXPANDING-PAGEFULLFN (\#DISPLAYLINES) \SETRTPPORTS (WORDSPERPORT) \DECPARENCOUNT (STRINGDELIM.RC +LEFTPAREN.RC RIGHTPAREN.RC LEFTBRACKET.RC RIGHTBRACKET.RC) CLREMPARS (CLISPCHARRAY) +CL:LONG-FLOAT-NEGATIVE-EPSILON (CL:SINGLE-FLOAT-NEGATIVE-EPSILON) COMP.STCOPY (LEVEL OPCOPY) +CL::%%NOT-NUMBER-ERROR (:EXPECTED-TYPE :NAME :VALUE) \INTERPRETER1 (MYALINK \STACKHI WORDSPERQUAD +\LITATOM \NEW-ATOM IVARCODE PVARCODE \STACKSPACE) CARETRATE (\CARET.TIMER DEFAULTCARETRATE) +\BSP.TIMERFN (\STATE.OPEN \STATE.ENDSENT \STATE.ENDRECEIVED \EVENT.FORCECLOSE \PT.ADATA \PUPOVLEN) +SEDIT::ICON-COPYFN (:name) CL:MOST-NEGATIVE-DOUBLE-FLOAT (CL:MOST-NEGATIVE-SINGLE-FLOAT) +TEDIT.GETFUNCTION (TEDIT.READTABLE FUNCTIONCALL.TTC \MAXTHINCHAR) CL::%%NOT-RATIONAL-ERROR ( +:EXPECTED-TYPE :VALUE :NAME) \SMASHLINK (MYALINK) COMP.NUMERIC (EXP COMPILE.CONTEXT COMP.UNBOXED.TAG +ALLDECLS CODE) \GETCHAR (\LINEBUF.OFD \PRIMTERMTABLE) \STACKARGPTR (MYALINK \MAXSAFEUSECOUNT) +CL:LEAST-POSITIVE-SHORT-FLOAT (CL:LEAST-POSITIVE-SINGLE-FLOAT) \COURIER.WHENCLOSED (COURIERTRACEFILE) +\FILLBUFFER (*READTABLE* \PRIMTERMTABLE READC.FT \MAXTHINCHAR \PRIMTERMSA RETYPE.TC \TERM.OFD +RETYPING.LBS FILLING.LBS CHARDELETE.TC LINEDELETE.TC WORDDELETE.TC CTRLV.TC EOL.TC ESCAPE.RC +RATOM/RSTRING.FT READ.FT LEFTPAREN.RC LEFTBRACKET.RC STRINGDELIM.RC IMMEDIATE.RMW) BCOMPL (NLAML NLAMA + LAMS LAMA DWIMIFYCOMPFLG NOFIXVARSLST NOFIXFNSLST) TWODINSPECT.DOWINDOWCOMFN (WindowMenu) +\STARTDISPLAY (SCREENWIDTH SCREENHEIGHT WINDOWBACKGROUNDSHADE) SEDIT::EDIT-HELP (PROMPTWINDOW) +COMPILER::COMPILE-SCAN-DECLARE%: (DFNFLG COMPILER::*EVAL-WHEN-COMPILE*) \FILLBUFFER.WORDSEPRP ( +WORDSEPR.TC \MAXTHINCHAR \PRIMTERMSA OTHER.RC RTBLSA) CL::%%RATIO-PRINT (*READTABLE*) \MEDW.MOVEW ( +LAMBDASPLST \CURSORDESTINATION \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS) \INTERPRETER-LAMBDA (\STACKHI + MYALINK) \TIME.NOT.SET (PROMPTWINDOW) FB.HANDLE.ABORT.BUTTON (FB.ITEMSELECTEDSHADE) +\FILLBUFFER.BACKUP (\TERM.OFD) UPDATE/SCROLL/REG (SCROLLBARWIDTH) DESCRIBE-VIRTUAL-MEMORY ( +\MACHINETYPE \DORADO \InterfacePage \ISFMAP \LASTVMEMFILEPAGE) SEDIT::COMPUTE-POINT-POSITION-LIST ( +SEDIT::TYPE-COMMENT) CL:DOUBLE-FLOAT-NEGATIVE-EPSILON (CL:SINGLE-FLOAT-NEGATIVE-EPSILON) VMEMSIZE ( +\InterfacePage) FAULTAPPLY (LAMBDASPLST LAMBDATRANFNS) COMP.COMPARENUM (COMPILE.CONTEXT) ASKUSERLOOKUP + (OPTIONS OPTIONSLST) COMPILER::TEST-ALPHA-2 (COMPILER::*NULL-CONTEXT* SYSLOCALVARS GLOBALVARS) +\TFBRAVO.GET.FONTSIZE (USER.CM.ALIST) UPDATESCREENDIMENSIONS (\MACHINETYPE \DOLPHIN \DORADO \DANDELION + \DAYBREAK \MAIKO) \UNPACKDATE (\DayLightSavings MIN.FIXP \TimeZoneComp \4YearsDays) +CL:MOST-POSITIVE-LONG-FLOAT (CL:MOST-POSITIVE-SINGLE-FLOAT) InstallUnixPrinter (PRINTERTYPES) +CL::%%COMPLEX-PRINT (*READTABLE*) \CreateScreenBitMap (\DISPLAYREGION) CL:MOST-NEGATIVE-SHORT-FLOAT ( +CL:MOST-NEGATIVE-SINGLE-FLOAT) \ENTITYEND.PRESS (NopCode LISPENTITYTYPE) VIDEOCOLOR (\MACHINETYPE +\MAIKO \DANDELION MAX.SMALLP \DAYBREAK \DoveDisplay.XorCursor) CL::%%NOT-FLOAT-ERROR (:EXPECTED-TYPE +:NAME :VALUE) \3MBENCAPSULATE (\3MBENCAPSULATION.WORDS) \SETUP-COMPILED-CLOSURE-CALL (WORDSPERCELL +\STACKHI \STACKSPACE \STK.BF \STK.FX) SI::CLEAR-CLOSURE-CACHE (GCREF SI::*CLOSURE-CACHE*) \STOPSCROLL? + (\#DISPLAYLINES) \PRINTFMAP (\XVmemFmapBase \ISFMAPOFFSET) \FILLINSPP (\EPT.XIP \#WDS.SPPINFO) +\CoerceToDisplayDevice (LastCreatedDisplayDevice) CL:MOST-POSITIVE-SHORT-FLOAT ( +CL:MOST-POSITIVE-SINGLE-FLOAT) \LEAF.USE.NEW.CONNECTION (\LEAFOP.READ \LEAFOP.WRITE \LEAFOP.TRUNCATE +\LEAFOP.DELETE \LEAFOP.CLOSE AppendBit WriteBit \LEAFOP.OPEN \LEAF.BROKEN.STATUS) RECREDECLARE1 ( +CLISPARRAY) SPY.MERGEINFO (SPY.MERGEINFO) CL::%%NOT-NONCOMPLEX-NUMBER-ERROR (:EXPECTED-TYPE :NAME +:VALUE) CL:SHORT-FLOAT-EPSILON (CL:SINGLE-FLOAT-EPSILON) COMPILER::GENCODE-TAGBODY-INLINE ( +COMPILER::*CURRENT-FRAME*) \FIXP.FROM.FLOATP (\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER \SMALLP +\EXPONENT.BIAS \8BITS \SIGNBIT \MAX.EXPONENT \HIDDENBIT) CL:MOST-POSITIVE-DOUBLE-FLOAT ( +CL:MOST-POSITIVE-SINGLE-FLOAT) CL:SHORT-FLOAT-NEGATIVE-EPSILON (CL:SINGLE-FLOAT-NEGATIVE-EPSILON) +PROMPTPRINT (PROMPTWINDOW) SHOW.PRESS (FontCode ShowCharactersShortCode ShowCharactersCode) +\NSFILING.WHENCLOSED (\NSFILING.ACTIVE.SESSIONS) \PACKDATE (\TimeZoneComp) CL:LONG-FLOAT-EPSILON ( +CL:SINGLE-FLOAT-EPSILON) MAKEFILES (FILEPKGTYPES FILELST) \NSFILING.DIRECTORYNAMEP (:ASK) +CL:MOST-NEGATIVE-LONG-FLOAT (CL:MOST-NEGATIVE-SINGLE-FLOAT) \IDATESCANTOKEN (*STR*) \FILLRTPPUP ( +\PUPOVLEN) \DSCCOUT (\MAXTHINCHAR \PRIMTERMSA INDICATE.CCE SIMULATE.CCE REAL.CCE IGNORE.CCE) +\FM.EDIT-FINDNEXT (EDITITEM WINDOW) \DSPFONT.IP (SETFONT \DEFAULTCHARSET MICASPERINCH POINTSPERINCH) +FW-UPDATE-OFD-WINDOWS (FW-OFDList) \PROMPTWINDOW.SET.HEIGHT (SCREENHEIGHT) \MAKEFREEBLOCK ( +\STK.FSB.WORD) WFROMDS (\DEFAULTTTYDISPLAYSTREAM) FB.EDITLISPFILE (PROMPTWINDOW) COMP.SHIFT (CODE EXP) + INTERPRESS.BITMAPSCALE (POINTSPERINCH) CLISP-SIMPLE-FUNCTION-P (COMPILERMACROPROPS) \FREESTACKBLOCK ( +\StackAreaSize \MinExtraStackWords \InterfacePage \STK.FSB \STK.GUARD \STK.FX WORDSPERCELL +\MP.STACKFULL WORDSPERQUAD) ONEDINSPECT.REDISPLAY (INSPECTPRINTLEVEL WHITESHADE) CLEANUP ( +CLEANUPOPTIONS NOTLISTEDFILES NOTCOMPILEDFILES) \MEDW.CLOSEW (\CURSORDESTINATION \EM.DISPINTERRUPT +\SCREENBITMAPS) \STKNAME (\STACKSPACE WORDSPERCELL) COMPILER::TRANSFORM-GET/PUT-BASE (:FN :BYTES :ARGS + :META-P :GET) CLISPELL (LISPXHIST) \TFBRAVO.GET.FONTSTYLE (USER.CM.ALIST) \SETUP-ENVIRONMENT-CALL ( +\STACKHI WORDSPERCELL \STK.BF.WORD \STK.FX \STK.FLAGS.SHIFT \#ALINK.OFFSET) PAINTW.SHADE.LABEL ( +MENUFONT) RECOMP? (CHANGES EXPRSLST) TB.SHOW.DELETION (BLACKSHADE TB.LEFT.MARGIN) DISPLAYSTREAMINIT ( +ScreenBitMap SCREENHEIGHT SCREENWIDTH) \LFExtendFile (\LFrunSize) TEDIT.INSERT.OBJECT (TEDIT.SELECTION +) \PFGetFileMapPage (\PFFileMapFileD) COMPILER::GENCODE-SETQ (:ARGUMENT) SEDIT::GET-MENU ( +SEDIT::MENU-DESCRIPTION) CL:LEAST-POSITIVE-DOUBLE-FLOAT (CL:LEAST-POSITIVE-SINGLE-FLOAT) DRIBBLEFILE ( +*DRIBBLE-OUTPUT*) \START.PROCESSES (\HIGHEST.PRIORITY.QUEUE \MP.STACKRELEASED MYALINK \MP.PROCERROR +%#SCHEDULER#) FTPPRINTMARK (FTPDEBUGLOG FTPMARKTYPES) \EVALOTHER (\DEFEVALFNS) \GETMISCNSOCKET ( +\NSOCKETS) \POSTSCRIPT.NSHASH (*POSTSCRIPT-NS-HASH*) COURIERPROGRAM.PRETTYPRINT (SPACEWIDTH) CLISP3A ( +PARENT) PROCESSWORLD (\TopLevelTtyWindow PSTAT.QUIT \HIGHEST.PRIORITY.QUEUE) CLISPCOND1 (NOVALFLG) +SEDIT::PARSE--LIST (SEDIT::LIST-PARSE-INFO) \SETUP.DEFAULT.LINEBUF (READING.LBS \LINEBUF.OFD) +\COERCEASCIITONSFONT (PROMPTWINDOW) ADD.PROCESS (PROC.DEFAULT.PRIORITY \PSTAT.WAITING) \MEDW.OPENW ( +\CURSORDESTINATION \EM.DISPINTERRUPT \SCREENBITMAPS) CHANGEBACKGROUND (WINDOWBACKGROUNDSHADE +\CURSORSCREEN) COMPILEUSERFN1 (COREFLG FN NOSPELLFLG ARGS OTHERVARS DEF) PUTPROPS.PRETTYPRINT ( +MACROPROPS FNSLST *STANDARD-OUTPUT*) MAYBE.PRETTYPRINT.BOLD (DEFAULTFONT) \RUN.PROCESS (\PSTAT.RUNNING + \PSTAT.DELETED) SEDIT::CFV-LIST (SEDIT::TYPE-COMMENT) \CARET.CREATE (DEFAULTCARET) NEWPAGE.IP ( +METERSPERMICA ENCODING DOSAVE MICASPERINCH SETCORRECTTOLERANCE AMPLIFYSPACE) \3MBSENDPACKET ( +\3MBENCAPSULATION.WORDS *MAXIMUM-PACKET-SIZE* \MISCSTATS \EPT.PUP PUPTRACEFILE XIPTRACEFILE) +\LINEBUF.PEEKBIN (\RefillBufferFn) \3MBGETPACKET (\MISCSTATS \3MBLOCALNDB) \RPLPTR (GCREF) SEDIT::SEDITE + (:NAME :TYPE :COMPLETION-FN :ROOT-CHANGED-FN) \MOVE.WINDOWS.ONTO.SCREEN (SCREENWIDTH SCREENHEIGHT +\OLDSCREENWIDTH \OLDSCREENHEIGHT) CROPMARK.DISPLAYFN (CROPMARK.IMAGE) CLISPFOR1 (FIRSTI.V. DUMMYVARS +I.S.OPRSLST) \RELEASE.PROCESS (\PROCESS.NAME.TABLE \PSTAT.DELETED \PSTAT.WAITING) +\FTP.OPENFILE.FROM.PLIST (\FTPFDEV) FAULTEVAL (COMPILERMACROPROPS *MACROEXPAND-HOOK* LAMBDASPLST) +FILEARRAYBASE (\ARRAYSPACE MKI.CODESTARTOFFSET MKI.FirstDataByte) \ADDLEAFSTRING (BYTESPERWORD +\MAX.PUPLENGTH) \LEAF.READFILENAME (\OFFSET.FILENAME \MAXLEN.FILENAME) \FILLBSPPUP (\PUPOVLEN) +CHAT.HOLD (LASTMOUSEBUTTONS) SPY.UPDATE.TITLE (LASTMOUSEBUTTONS) COMPILEFILES0 (NOTCOMPILEDFILES +FILELST) COMP.RPLACD (OPNIL COMPILE.CONTEXT) OPENWINDOWS (\SCREENS) CL:BOOLE (CL:BOOLE-CLR CL:BOOLE-SET + CL:BOOLE-1 CL:BOOLE-2 CL:BOOLE-C1 CL:BOOLE-C2 CL:BOOLE-AND CL:BOOLE-IOR CL:BOOLE-XOR CL:BOOLE-EQV +CL:BOOLE-NAND CL:BOOLE-NOR CL:BOOLE-ANDC1 CL:BOOLE-ANDC2 CL:BOOLE-ORC1 CL:BOOLE-ORC2) COMPEM (COUTFILE +) \LONUM (\FIXP \SMALLP \FLOATP) SETXY.PRESS (SPRUCEPAPERLEFTMICAS SPRUCEPAPERRIGHTMICAS SetXCode +SPRUCEPAPERBOTTOMMICAS SPRUCEPAPERTOPMICAS SetYCode) SEDIT::UNDO-COMMENT-CHANGE (SEDIT::TYPE-COMMENT-WORD +) \PFPutAllocationMapPage (\PFAllocationMapFileD) \HINUM (\FIXP \SMALLP \FLOATP) CL:CLEAR-INPUT ( +*STANDARD-INPUT*) BLOCKCOMPILE1 (FREEVARS COUTFILE) \NEW4PAGE (WORDSPERPAGE) XCL::MAKE-PROTOTYPE ( +XCL::*DEFINITION-PROTOTYPES*) TTNEXTPOS (\ENDBUFFER) \CREATELINEBUFFER (READING.LBS \KEYBOARD.STREAM +\RefillBufferFn CR.EOLC) \PROMISCUOUS.ON (\LOCALNDBS GCONST BROADCASTNSHOSTNUMBER) CONS (CONS) +SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::TYPE-COMMENT) LINEBUFFER-SKIPSEPRS (\LINEBUF.OFD) +\NEXTCONSPAGE (WORDSPERPAGE) COMPILER::COMPILE-FILE-PROCESS-FUNCTION (:FUNCTION) \CKAPPLYARGS (MYALINK + \STACKHI WORDSPERCELL) \INSPECT/CODE/REPAINTFN (INSPECTPRINTLEVEL) CHAT.MENU (LASTMOUSEBUTTONS +CHATMENUITEMS CHAT.DRIVERTYPES) LINEBUFFER-EOFP (\LINEBUF.OFD) DBG::SET-UP-DEBUGGER-WINDOW (BRKPOS +LASTPOS) CLISP4 (CLISPARRAY VARS CLISPCHARRAY CLISPIFYFN FORM) XCL::PROTOTYPE-DEFINERS-FOR-TYPE ( +XCL::*DEFINITION-PROTOTYPES*) CHAT.EMACS.MOVE (CHAT.EMACSCOMMANDS) RECORDTRAN (PATGENSYMVARS EXPR +FAULTFN RECORDWORDS CLISPRECORDWORDS LAMBDASPLST) \OUTTERMP (\TERM.OFD) COMPILER::*COMPILE-SCAN-CONTEXT* + (:SETF-SYMBOL-FUNCTION-FN :DEFINEQ-FN :DEFCONSTANT-FN :DECLARE%:-FN :DEFINE-FILE-INFO-FN :PACKAGE-FORM-FN :PROCLAIM-FN :COMPILER-LET-FN :MACROLET-FN :DEFINER-FN :NAMED-PROGN-FN -:PROCESS-FUNCTION-FN :PROCESS-LOOSE-FORM-FN :PROCESS-OUTSTANDING-LOOSE-FORMS-FN) TEDIT.BUILD.PCTB2 ( -TEDIT.DEFAULT.FMTSPEC DEFAULTFONT |\\FirstPieceOffset| |\\PieceDescriptorPAGEFRAME| |\\EltsPerPiece| -|\\PieceDescriptorCHARLOOKSLIST| |\\PieceDescriptorPARALOOKSLIST| |\\PieceDescriptorPARA| -|\\PieceDescriptorLOOKS| |\\PieceDescriptorOBJECT|) EDITFNS (FILELST) \\NSFILING.PARSE.FILENAME ( -MAX.SMALLP) SEQUENTIAL.PRETTYPRINT (*STANDARD-OUTPUT* *BACKQUOTE-WRAPPERS*) PROGV.PRETTYPRINT ( -*STANDARD-OUTPUT*) SEDIT::SHIFT-BLOCK (WHITESHADE) \\DRAWELLIPSE.DISPLAY (\\TOPWDS \\SCREENBITMAPS -\\CURSORDESTINATION \\EM.DISPINTERRUPT) UNICODE.UNMAPPED (N-TRANSLATION-SEGMENTS) \\IFSERRORSTRING ( -\\CONNECTED.HOST) TYPEP (CL::*TYPEP-HASH-TABLE*) %COPY-STRING-TO-ARRAY (%THIN-CHAR-TYPENUMBER) -\\DRAWLINE.DISPLAY (\\TOPWDS \\SCREENBITMAPS) SETUPPAGEMAP (\\PAGEMAP |\\PageMapTBL| |\\NumPMTpages| -|\\EmptyPMTEntry| |\\NumPageMapPages| |\\PMblockSize| |\\FirstVmemBlock| \\LOCKEDPAGETABLE -|\\NumLPTPages|) COMPILER::ESTABLISH-MACRO-IN-COMPILER (COMPILER::*ENVIRONMENT* :MACRO) -PFI.MAYBE.NEW.PAGE (*STANDARD-OUTPUT* *PFI-MAX-WASTED-LINES*) COMPILER::GENCODE-RETURN ( -COMPILER::*CURRENT-FRAME*) \\MAIKO.10MBWATCHER (\\MAXWATCHERGETS) XCL::SETF-GET-PROCESS-PROFILE ( -XCL:*PROFILE*) \\READBINARYBITMAP (BYTESPERWORD) \\FILLCIRCLE.DISPLAY (\\TOPWDS \\SCREENBITMAPS -\\CURSORDESTINATION \\EM.DISPINTERRUPT) LEAF.ASSURE.FINISHED (\\ETHERTIMEOUT) \\FONT.COMPARESYMBOL ( -*PACKAGE-FROM-INDEX* \\PNAME.HI *INTERLISP-PACKAGE* \\PLIST.HI) SUBPRINT (FORMFLG *BACKQUOTE-WRAPPERS* - CLISPFONT FONTWORDS USERFONT FNSLST FONTFNS SYSTEMFONT CLISPCHARS FUNNYATOMLST PRETTYEQUIVLST -*STANDARD-OUTPUT* SPACEWIDTH COMMENTFLG) CACHEMACRO (:MACRO CLISPARRAY) UPDATE/SCROLL/REG ( -SCROLLBARWIDTH) \\DSPYPOSITION.DISPLAY (MAX.SMALLP) SUPERPRINT0 (PRETTYPRINTMACROS \#RPARS RMARGIN -*STANDARD-OUTPUT*) \\BITMAPFROMTEXTURE (BITMASKARRAY) \\GETREGION.PACKPTS (BASEX BASEY OPPX OPPY) -COMPAREPRINT1 (COMMENTFLG **COMMENT**FLG) CLREMPARS (CLISPCHARRAY) \\DRAWCIRCLE.DISPLAY (\\TOPWDS -\\SCREENBITMAPS \\CURSORDESTINATION \\EM.DISPINTERRUPT) PRINTSQ (LEFT COMMENTFLG) |\\VFMGet| ( -|treeDepth| |\\VFMnullKey| |\\VFMvolumeHandle| |\\VFMmaxKey| |\\VFMinterval|) \\POLYSHADE.YSCAN.IP ( -MIN.INTEGER MAX.INTEGER) CHANGEVAR (COMPILE.TIME.CONSTANTS) MSDESCRIBE (MSDATABASELST BOLDFONT -DEFAULTFONT GLOBALVARS DESCRIBELST) \\FM.LAYOUTGRID (\\FM.PROPSPEC BLACKSHADE \\FM.BOXSPACE -\\FM.GROUPSPEC) \\BITBLT.DISPLAY (\\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS) -|\\PFGetVol| (|\\DFSLogicalVolumes|) \\MAKE.JIS.TO.XCCS.CONV.TABLE (*JIS-TO-XCCS-CONV-NO-FONT-TABLE* -*HANKAKU-TO-ZENKAKU-CODE-MAP* *JIS-TO-XCCS-CODE-MAP*) SPLITKEY (HASHBITTABLE) \\LOOKUPFONT ( -\\FONTSINCORE) COMPILER::META-SUBST-VAR-REF (COMPILER::*SUBST-VAR* COMPILER::*SUBST-EXPR*) PRIN1 ( -*READTABLE* PLVLFILEFLG *PRINT-LEVEL* *PRINT-LENGTH* *INTERLISP-PRIN1-CASE* *PRINT-CASE* \\LINELENGTH -MAX.SMALLP) |\\LFDirectoryScrambled| (PROMPTWINDOW) |\\PFFindFileSize| (MAX.FIXP) DSFIT2 (COMMENTFLG -*STANDARD-OUTPUT* CAREFUL AVERAGEFNLENGTH SPACEWIDTH AVERAGEVARLENGTH) DO.PRETTYPRINT ( -*STANDARD-OUTPUT* SPACEWIDTH) READVARS (HPRINTRDTBL) \\DSPSCALE.PSC (:EOL) \\UNCOPY (\\SMALLP -|\\SmallPosHi| \\FIXP \\FLOATP \\LITATOM \\STRINGP \\CHARACTERP \\CHARHI %ONED-ARRAY PTRBLOCK.GCT -\\LISTP) CONCAT (%FAT-CHAR-TYPENUMBER \\PLIST.HI) PRINTNUM (NILNUMPRINTFLG) \\INSERTTREE ( -\\WORDSINBTREEMAIN \\BTREEMAXCOUNT) READPAGEMAP (|\\InterfacePage| \\PAGEMAP PAGESPERSEGMENT -|\\PMblockSize| |\\NumPMTpages| |\\PageMapTBL| |\\EmptyPMTEntry|) FILLRECTANGLE.IP (|MicasToDev| -MASKRECTANGLE) SI::*CLOSURE-CACHE* (:FIRST) COMPILER::GENCODE-PROGN (:RETURN :EFFECT) -POSTSCRIPT.ENDPAGE (:EOL) XCL::PUT-IMPLICIT-KEY-HASH (XCL::*DELETED-IMPLICIT-HASH-SLOT*) -MB.THREESTATE.DISPLAY (BLACKSHADE) \\PRINTBINARYBITMAP (BYTESPERWORD) \\TELERAIDBREAK (\\TELERAIDBLOCK - \\STACKHI \\#ALINK.OFFSET WORDSPERCELL \\MP.INVALIDADDR \\MP.INVALIDVP \\MP.MOB \\MP.RESIDENT -\\EM.KBDAD0 \\EM.KBDAD1 \\EM.KBDAD2 \\EM.KBDAD3 \\EM.UTILIN \\EM.KBDAD4 \\EM.KBDAD5 \\STK.FSB \\DEF.HI -) \\LEAF.FLUSH.CACHE (:CACHE) DSFIT1 (ENDTAIL CAREFUL *STANDARD-OUTPUT* AVERAGEVARLENGTH SPACEWIDTH) -|\\LFFindDirectoryVol| (|logicalVolumeSeal|) \\MAP-CODE-LITERALS (|\\ArrayBlockHeaderWords| -|\\DTDSpaceBase| CODEBLOCK.GCT |\\AtomHI| BITSPERBYTE) UTF8.OUTCHARFN (LF.EOLC CR.EOLC CRLF.EOLC -*XCCSTOUNICODE* TRANSLATION-SHIFT TRANSLATION-MASK) SI::PRINT-TRACE-EXIT-INFO (*TRACE-DEPTH* BOLDFONT -DEFAULTFONT) CLISPELL (LISPXHIST) TB.BROWSER.BUSY (TB.CROSSCURSOR) COMP.LABELS (ALLVARS SUBFNFREEVARS -COMPILE.CONTEXT) CLISP-SIMPLE-FUNCTION-P (COMPILERMACROPROPS) RESETGRID.NEW (WHITESHADE DARKBITSHADE) -GO.TO.RELATIVE (\\TTPAGELENGTH \\LOC.ROW.0 \\CHARHEIGHT \\BMARG \\DSP) \\PRINDATUM.TO.STRING (\\FIXP -\\SMALLP \\FLOATP *PRINT-BASE* *READTABLE* \\MAXTHINCHAR %FAT-CHAR-TYPENUMBER) \\DRAWPOLYGON.IP ( -MICASPERPOINT DOSAVESIMPLEBODY { MAXSEGSPERTRAJECTORY }) \\FM.LAYOUTCOLUMN (\\FM.PROPSPEC BLACKSHADE -\\FM.BOXSPACE \\FM.GROUPSPEC) COMPILER::*COMPILE-FILE-CONTEXT* (:SETF-SYMBOL-FUNCTION-FN :DEFINEQ-FN -:DEFCONSTANT-FN :DECLARE\:-FN :DEFINE-FILE-INFO-FN :PACKAGE-FORM-FN :PROCLAIM-FN :COMPILER-LET-FN +:PROCESS-FUNCTION-FN :PROCESS-LOOSE-FORM-FN :PROCESS-OUTSTANDING-LOOSE-FORMS-FN) +XCL::PROTOTYPE-DEFN-TYPES (XCL::*DEFINITION-PROTOTYPES*) PRINTLINE (TEXTOBJ) +\PERIODICALLY-WHO-LINE-SHOW-ACTIVE (*WHO-LINE* *WHO-LINE-ACTIVE-PERIOD*) \INTERMP (\LINEBUF.OFD) +TTGIVEHELP1 (SPELLSTR1 SPELLSTR2 \FIX) \MAIKO.CONS.UFN (CDRCODING \LISTP GCREF \LISTPDTD \CDR.ONPAGE +\CDR.NIL \CDR.INDIRECT) \IRM.GET.REF (\IRM.HASHFILE) \UPDATE-WHO-LINE-ACTIVE-FLAG (BLACKSHADE) EDITFNS + (FILELST) CL:CLOSE (AppendBit WriteBit) SEDIT::START-PROCESS (SEDIT::EDITOR-NAME) CAR (CAR) +COMPILER::GENCODE-RETURN (COMPILER::*CURRENT-FRAME*) \STOPDISPLAY (ScreenBitMap) \TEDIT.READTABLE ( +CHARDELETE.TTC WORDDELETE.TTC DELETE.TTC UNDO.TTC NEXT.TTC CMD.TTC REDO.TTC \MAXTHINCHAR) +\SETSPACE.PRESS (SetSpaceXShortCode SetSpaceXCode) COMPILER::IS-CALL-TO (:GLOBAL :FUNCTION) +\TIMER.PROCESS (\TIMERQHEAD PSTAT.TIMEDOUT) CDR (CDR) \SPP.SYSPKT (\SPPHEAD.CC.SYSTEM) +POSTSCRIPT.FONTSAVAILABLE (POSTSCRIPT.FONT.ALIST POSTSCRIPTFONTDIRECTORIES +\POSTSCRIPT.MAX.WILD.FONTSIZE) DISPLAY/NUMBER/READER/TOTAL (WHITESHADE) COMPILER::ESTABLISH-MACRO-IN-COMPILER + (COMPILER::*ENVIRONMENT* :MACRO) COURIER.ABORT.BULKDATA (:BULKDATA :ABORT) \ISDST? (\BeginDST \EndDST +) IRM.GET.DINFOGRAPH (IRM.DINFOGRAPH) DBG::CREATE-DEBUGGER-WINDOW (\TERM.OFD BREAKREGIONSPEC +DEFAULTTTYREGION) \BACKGROUND.PROCESS (BACKGROUNDFNS) RPLACA (RPLACA) MSCOLLECTDATA (TABLE.TO.NOTICED +FNDATA) \SETVAR (\STACKHI) CL:FLOOR (XCL::SFLOOR) CL:CEILING (XCL::SCEILING) EXEC ( +*EXEC-COMMAND-TABLE* *PER-EXEC-VARIABLES*) BRECOMPILE1 (CFILE COUTFILE LCFIL FILEMAPLST) RPLACD ( +RPLACD) \LFExtendFileIfNecessary (\LFtopMonitor) SEDIT::CREATE-COMMENT-WORD-NODE (SEDIT::TYPE-COMMENT-WORD +) \PFGetAllocationMapPage (\PFAllocationMapFileD) TWOD.TRACKCURSOR (LASTMOUSEBUTTONS) \SETFVARSLOT ( +MYALINK FVARCODE \STACKHI) NSOCKETFROMNUMBER (\NSOCKETS) TB.SHOW.COPY.SELECTION (GRAYSHADE +TB.LEFT.MARGIN) CL:DECODE-FLOAT (\EXPONENT.BIAS) PROG (WORDSPERQUAD CELLSPERQUAD) COMPILEUSERFN ( +LAMBDASPLST) EDITCOMS (L) \TEDIT.SHRINK.ICONCREATE (TEDIT.TITLED.ICON.TEMPLATE TEDIT.ICON.FONT) +CL:DECODE-UNIVERSAL-TIME (\TimeZoneComp \DayLightSavings) FW-RECALL-CMD (FW-OFDList) +SEDIT::ASSIGN-FORMAT-QUOTE (:DATA) \PROG0 (MYALINK \STACKHI WORDSPERQUAD \STACKSPACE WORDSPERCELL +\LITATOM \NEW-ATOM PVARCODE) SEDIT::SEDITL (TYPE :NAME :TYPE) INTERPRESSFILEP (FILETYPE.INTERPRESS +NOVERSIONENCODINGSTRING) COMP.LABELS (ALLVARS SUBFNFREEVARS COMPILE.CONTEXT) \PROC.REPEATEDLYEVALQT ( +\TopLevelTtyWindow) COMPILER::*COMPILE-DEFINER-CONTEXT* (:SETF-SYMBOL-FUNCTION-FN :DEFINEQ-FN +:DEFCONSTANT-FN :DECLARE%:-FN :DEFINE-FILE-INFO-FN :PACKAGE-FORM-FN :PROCLAIM-FN :COMPILER-LET-FN :MACROLET-FN :DEFINER-FN :NAMED-PROGN-FN :PROCESS-FUNCTION-FN :PROCESS-LOOSE-FORM-FN -:PROCESS-OUTSTANDING-LOOSE-FORMS-FN) PUPNET.DISTANCE (\\ETHERTIMEOUT) \\NSFILING.OPEN.HANDLE ( -\\NSFILING.NULL.HANDLE) CLISP3A (PARENT) BROKENDEF (CELLSPERQUAD GCREF) FIXLISPX/ (VARS) -SHOW.CLEARINGHOUSE (\\CH.CACHE) \\ACTONVMEMFILE (\\MACHINETYPE \\DANDELION \\DAYBREAK) INSERTLINE ( -\\ENDBUFFER \\CURSORCOL) MSMARKCHANGED (MSFNTYPES) \\HANDLE.RAW.PUP (\\EPT.PUP \\PUPSOCKETS -PUPTRACEFILE \\PT.ECHOME \\PUPSOCKET.ECHO MASKWORD1\'S \\PT.IAMBADECHO \\PT.IAMECHO \\PUPE.NOSOCKET -\\PUPE.SOCKETFULL \\PUPE.CHECKSUM \\PUP.ROUTING.TABLE) \\FM.LAYOUTROW (\\FM.PROPSPEC BLACKSHADE -\\FM.BOXSPACE \\FM.GROUPSPEC) OPT.OPTCHECK (CODE CL:LABELS FRAMES TOPFRAME FRA PRA) FGET.IP (FGET) -DRAWAREABOX (BLACKSHADE) \\MAP-CODE-POINTERS (|\\ArrayBlockHeaderWords| |\\DTDSpaceBase| CODEBLOCK.GCT - BITSPERBYTE) |\\LFCloseDevice| (|\\LFtopMonitor| |\\LFdevice|) \\DO.PROGV.SETUP.FRAME.AND.EXECUTE ( -MYALINK \\STACKHI WORDSPERQUAD \\STACKSPACE \\LITATOM \\NEW-ATOM PVARCODE WORDSPERCELL GCREF) -\\COURIER.RESULTS (\\COURIERMSG.RETURN \\COURIERMSG.ABORT \\COURIERPROGRAM \\COURIERMSG.REJECT) -REPLACEHASHKEY (HASHFILERDTBL) COMP.STFN (INTERNALBLKFNS) DINFO.INVERT.NODE (BLACKSHADE WHITESHADE) -COMPILER::IS-CALL-TO (:GLOBAL :FUNCTION) INSTALL-PROTOTYPE-DEFN (:NEW) ACCESSDEF (DECLST USERRECLST) -\\NSRANDOM.SESSION.WATCHER (|AppendBit| |WriteBit| *NSFILING-SESSION-TIMEOUT* \\FIXP) -\\POSITION.MENU.IMAGE (LASTSCREEN LASTMOUSEX LASTMOUSEY) PFI.PRETTYPRINT (*PFI-FNSLST*) -|\\VFMGetBufferFor| (|\\VFMvolumeHandle| |\\VFMbufferSize|) POSTSCRIPT.PUTCOMMAND (:EOL) -\\MAIKO.10MBSENDPACKET (\\MY.NSADDRESS \\10MBTYPE.TRANSLATIONS) COMPILER::GENERATE-CODE (:ARGUMENT) -CHECKFPTOVP1 (\\RPOFFSET) \\TEXTMENU.TOGGLE.DISPLAY (BLACKSHADE) SEDIT::LINEARIZE-CLISP ( -SEDIT::TYPE-COMMENT :KEYWORD SEDIT::CLISP-PROGRAM-WORDS SEDIT::CLISP-INDENT-WORDS) COMPAREPRINT ( -*COMPARE-LEVEL* *COMPARE-LENGTH*) CHECKFPTOVP (|\\InterfacePage| \\FPTOVP \\NO.VMEM.PAGE) PRINTDEF ( -DEFAULTFONT) \\DSPSCALE2.PSC (:EOL) PRINTCODE (BITSPERBYTE BYTESPERWORD BYTESPERQUAD BYTESPERCELL -\\PRINTCODE.LEVEL \\PRINTCODE.STKSTATE |\\AtomHI| \\INITSUBRS \\USER-SUBR-LIST) -COMPILER::*COMPILE-SCAN-CONTEXT* (:SETF-SYMBOL-FUNCTION-FN :DEFINEQ-FN :DEFCONSTANT-FN :DECLARE\:-FN -:DEFINE-FILE-INFO-FN :PACKAGE-FORM-FN :PROCLAIM-FN :COMPILER-LET-FN :MACROLET-FN :DEFINER-FN -:NAMED-PROGN-FN :PROCESS-FUNCTION-FN :PROCESS-LOOSE-FORM-FN :PROCESS-OUTSTANDING-LOOSE-FORMS-FN) -DECODEBUTTONS (LASTMOUSEBUTTONS) READPAGEMAPBLOCK (|\\PMblockSize| VMEMFILE) SETCOLOR.IP (BLACKSHADE -SETGRAY WHITESHADE PRINTSERVICE) WHO-LINE-VMEM (\\LASTVMEMFILEPAGE |\\InterfacePage| |\\IFPValidKey|) -SEDIT::RECOMPUTE-FORMAT-VALUES (SEDIT::TYPE-LITATOM) GAINSPACE (GAINSPACEFORMS DWIMWAIT) -SEDIT::PAINT-TO-END-OF-LINE (WHITESHADE) MAKEHASHKEY (HASH.HEADER.SIZE HASHSCRATCHLST HASH.KEY.SIZE) -WINDOWTITLEFONT (|WindowTitleDisplayStream|) COMP.STPOP (OPPOP) DINFO.LAYOUTGRAPH (MENUFONT -DEFAULT.GRAPH.NODELABELSHADE DEFAULT.GRAPH.NODEFONT DEFAULT.GRAPH.NODEBORDER BLACKSHADE) -COMP.RETURN-FROM (FRAME FRA COMFN LEVEL CODE) COMPILER::COMPILE-FILE-PROCESS-FUNCTION (:FUNCTION) -|CreateCursorBitMap| (WORDMASK) CLISPCOND1 (NOVALFLG) \\FM.FORMATEXPLICIT (\\FM.GROUPSPEC) CL:GENSYM ( -CL::*GENSYM-PREFIX*) DASSEM.CLEANFNTEST (CONDITIONALS VCONDITIONALS NUMBERFNS CLEANFNLIST NOFREEVARFNS - NOSIDEFNS) SPACES (\\LINELENGTH MAX.SMALLP) \\MAPPNAME.INTERNAL (\\PNAMEDEVICE |OutputBits| -MAX.SMALLP \\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS LF.EOLC) \\DSPCOLOR.PSC (:EOL) COMP.TAGBODY (FRAME - FRA COMPILE.CONTEXT CODE) FB.PROMPTW.FORMAT (:UPCASE) OUTPUT (\\TERM.OFD) \\RTP.ACTION (\\EVENT.OPEN -\\STATE.CLOSED \\STATE.SENTRFC \\EVENT.OPENLISTENING \\STATE.LISTENING \\EVENT.OPENIMMEDIATE -\\STATE.OPEN \\EVENT.CLOSE \\STATE.ABORTED \\STATE.ENDSENT \\STATE.ENDRECEIVED \\STATE.DALLYING -\\EVENT.FORCECLOSE \\EVENT.RFC WORDSPERPORT \\EVENT.ABORT \\EVENT.END \\EVENT.ENDREPLY \\EVENT.TIMEOUT - \\RTP.DALLY.TIMEOUT \\RFC.TIMEOUT) NEGATE (NEGATIONS) UNIXCHAT.OPEN (\\MACHINETYPE \\MAIKO) -COMPAREFAIL (COMPARETRANSFORMS) SEDIT::OUTPUT-STRING (SEDIT::STRINGWIDTH) \\MAIKO.10MBSTARTDRIVER ( -\\RCLKSECOND \\10MB.EXPECTED.RECEIVE.INTERVAL \\ES.PENDING) COMPILER::ALPHA-LAMBDA (COMPILER::*NULL-CONTEXT* -) CLISPIFY (LASTAIL ATM) \\10MBSETUPRECEIVER (\\TELERAIDIOCB \\10MBPACKETLENGTH) -SEDIT::ASSIGN-FORMAT-DOTLIST (:DATA) BKSYSCHARCODE (\\SYSBUFFER.LAST \\SYSBUFFER.FIRST) -FONTPROFILE.ADDDEVICE (FONTDEFS FONTNAME) \\PRINTFPTOVP (|\\InterfacePage| \\FPTOVP \\NO.VMEM.PAGE -\\PNAME.HI \\DEF.HI \\VAL.HI \\PLIST.HI \\STACKHI \\HTMAIN \\HTOVERFLOW) FONTSAVAILABLE ( -IMAGESTREAMTYPES) \\CORE.UPDATEOF (BYTESPERPAGE) \\COPY (\\SMALLNEGSPACE \\SMALLPOSPSPACE \\FIXP -\\FLOATP \\CHARHI) TYPENAME (\\ARRAYP |\\DTDSpaceBase|) \\MAPPNAME (*READTABLE* *INTERLISP-PACKAGE* -*PACKAGE* *PRINT-BASE* *PRINT-RADIX*) \\CORE.FINDPAGE (WORDSPERPAGE) MAPPAGES (|\\InterfacePage|) -\\POLYSHADE.XSCAN.IP (MIN.INTEGER MAX.INTEGER) SI::PRINT-TRACE-ENTRY-INFO (*TRACE-DEPTH* BOLDFONT -DEFAULTFONT) SI::ARGUMENT-ERROR (:CALLEE :MINIMUM :ACTUAL :MAXIMUM) \\FIND.LOCALPUPHOSTNUMBER ( -\\MY.NSHOSTNUMBER PUPTRACEFILE \\OLDPUPHOST#) |\\VFMReadNext| (|\\VFMbuffer| |\\VFMold| |\\VFMlow| -|\\VFMmaxKey| |nullVolumePage|) BKSYSBUF (\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER *READTABLE* -*PACKAGE*) \\LOCKFN (\\DEF.HI) ENDPREAMBLE.IP (ENDPREAMBLE) \\LOOKUPFONTSINCORE (\\FONTSINCORE) -TEDIT.PUT (CR.EOLC) RECORD (CLISPRECORDTYPES) PRINTOPCODES (\\OPCODES) DIRECTORY.MATCH.SETUP ( -\\MAXTHINCHAR) CURSORBITMAP (|CursorBitMap|) DWIMIFY (NOFIXFNSLST NOFIXVARSLST) SUBDECLARATIONS ( -DECLST CLISPTRANFLG) \\NSFILING.CONFLICTP (|AppendBit| |WriteBit|) RPLSTRING (\\PNAME.HI \\PLIST.HI -%FAT-CHAR-TYPENUMBER) TEDIT.GET.OBJECT0 (DEFAULTFONT) \\CORE.GETINFOBLOCK (CR.EOLC) CLOSERTPSOCKET ( -\\RTP.DEFAULTTIMEOUT \\EVENT.CLOSE \\STATE.CLOSED \\STATE.ABORTED \\EVENT.FORCECLOSE) CHOOZ (SPELLSTR1 - SPELLSTR2 SKORLST2) \\STARTPUP (\\PUPSOCKETS) CLISP3C (FUNNYATOMLST) SPELLFILE (DIRECTORIES -NOSPELLFLG \\FILEDEVICENAMES) ENDPAGE.IP (ENDPAGE) \\LOCATE.PUPNET (\\PUP.READY \\PUP.ROUTING.TABLE -\\ROUTING.TABLE.MASK \\RT.INFINITY) TEDIT.PUT.PCTB2 (|\\FirstPieceOffset| TEDIT.DEFAULT.CHARLOOKS -CR.EOLC TEDIT.DEFAULT.FMTSPEC %FAT-CHAR-TYPENUMBER) \\#BLOCKDATACELLS (|\\FirstArraySegment| -|\\ArrayBlockHeaderWords| |\\ArrayBlockOverheadCells| |\\DTDSpaceBase|) \\SMASHABLESTRING ( -%FAT-CHAR-TYPENUMBER) SEDIT::OUTPUT-SPACE (DEFAULTFONT) \\CURVE (BRUSHWIDTH BRUSHHEIGHT -\\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS LEFTMINUSBRUSH RIGHTPLUS1 -BOTTOMMINUSBRUSH TOP DESTINATIONBASE OPERATION HEIGHTMINUS1 RASTERWIDTH LEFT NBITSRIGHTPLUS1 -TOPMINUSBRUSH |DestinationBitMap| BRUSHBASE BRUSHRASTERWIDTH COLORBRUSHBASE NBITS DASHLST) CLISPFOR ( -DWIMIFYING VARS NOFIXFNSLST NOFIXVARSLST LISPXHIST) FIXAPPLY1 (LISPXHISTORY EXPR) \\RPLCHARCODE ( -\\MAXTHINCHAR %FAT-CHAR-TYPENUMBER) MISSPELLED? (SPELLSTATS1 LASTWORD) *WHO-LINE-LAST-DIRECTORY* ( -*DEFAULT-PATHNAME-DEFAULTS*) FINDFN (BRKTYPE) FIND.NEXT.WORD (\\ARROW \\MAXTHINCHAR \\PRIMTERMSA -WORDSEPR.TC \\RDTBLSA STOPATOMBIT) COMPILER::GENCODE-MV-CALL (:ARGUMENT) SAVEPUT (DFNFLG) -MSMARKCHANGE1 (MSCHANGEDARRAY) TEDIT.UNDO.MOVE (TEDIT.SELECTION) MAKEHASHLINKS (USINGEXPR USINGTYPE) -BITMAPTEDITOBJ (BITMAPIMAGEFNS) LOADFNS (*INTERLISP-PACKAGE* DFNFLG BUILDMAPFLG ADDSPELLFLG LISPXHIST -LOADOPTIONS) INSERTHASHKEY (HASHLOADFACTOR) XCL::WALK-DO/DO* (XCL::*DECLARATIONS* -XCL::*LEXICAL-VARIABLES*) GENSYM (\\GS.BUFSIZE MAX.FIXP) DINFO.SHOWGRAPH (SCREENHEIGHT SCREENWIDTH) -FONTSET (FONTDEFS DEFAULTFONT FONTVARS FONTPROFILE) SPP.READP (|ReadBit|) COMP.RETURN (FRAME -PROGCONTEXT LEVEL FRA COMFN CODE RETURNLABEL) \\CORE.GETFILEHANDLE (:PATHNAME BYTESPERPAGE -\\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS FILELINELENGTH |NoBits|) \\UNITWIDTHSVECTOR (\\MAXCHAR) -GLCCODE (%FAT-CHAR-TYPENUMBER) \\CONVERTTOFRACTION (BITSPERINTEGER INTEGERBITS \\FIXP) EDITBM ( -|CursorBitMap| \\CURSORDESTINATION \\CURSORDESTWIDTH GRIDTHICKNESS \\CURSORDESTHEIGHT NORMALGRIDSQUARE - MINGRIDSQUARE) \\COURIER.OUTPUT.ABORTED (|AppendBit| |WriteBit| :BULKDATA :ABORT) \\CORE.GETFILEINFO -(|NoBits|) UPDATE/BM/DISPLAY/SELECTED/REGION (BLACKSHADE) \\RTP.SHOW.FAILURE (PROMPTWINDOW) -ASSURE.PUP.READY (\\PUP.READY.LOCK \\LOCALNDBS \\PUP.READY.EVENT) |\\VFMLower| (|\\VFMmaxKey|) -PROCESS.EVALV (MYALINK) MAKEINITFIRST (|\\InterfacePage|) SHOW.IP (SETCORRECTMEASURE CORRECT { -SEQSTRING SHOW }) SORT.PUPHOSTS.BY.DISTANCE (\\ETHERTIMEOUT) UNIX.HOST.FILTER (\\MACHINETYPE \\MAIKO) -COMPILER::ALPHA-UNWIND-PROTECT (:STMT COMPILER::*CONTEXT* :CLEANUP COMPILER::*EFFECT-CONTEXT*) -\\BSP.HANDLE.INPUT (\\PT.MARK \\PT.DATA \\PT.AMARK \\PT.ADATA \\PT.ACK \\PT.INTERRUPT -\\PT.INTERRUPTREPLY \\PT.ERROR \\EVENT.TIMEOUT) CREATEDSKDIRECTORY (|\\LFtopMonitor|) -|\\PFRemoveDirectoryID| (|rootDirSeal| |rootDirVersion| |rootDirMaxEntries|) COMPARE1 (COMMENTFLG -LOOSEMATCH) L-CASE (\\PLIST.HI \\PNAME.HI *INTERLISP-PACKAGE* \\PNAMELIMIT \\FATPNAMESTRINGP -%FAT-CHAR-TYPENUMBER) U-CASEP (\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER) CL:SYMBOL-PACKAGE ( -\\PNAME.HI *PACKAGE-FROM-INDEX*) CHAT.STARTUP (CHAT.PROTOCOL.ABBREVS CHAT.PROTOCOLTYPES CHAT.OSTYPES -CHAT.HOSTINFO CHAT.INTERRUPTS :INTERRUPTS CHAT.KEYACTIONS :KEYACTIONS PROMPTWINDOW) -|\\PFFindDirectoryID| (|rootDirSeal| |rootDirVersion| |rootDirMaxEntries|) >= (CL::%>=) SPP.EOFP ( -|ReadBit|) \\CORE.GETFILEINFO.FROM.INFOBLOCK (CR.EOLC LF.EOLC CRLF.EOLC) OPT.DS1 (FRA PRA) -READIMAGEOBJ (IMAGEOBJGETFNS) FORWARD.DELETE.TO (\\CURSOR \\CURSORCOL) PFI.HANDLE.EXPR (COMMENTFLG -*PFI-HANDLERS*) CARET (DEFAULTCARET) CLISP4 (CLISPARRAY VARS CLISPCHARRAY CLISPIFYFN FORM) ALLFIELDS ( -DECLST) \\10MBRAWENCAPSULATE (\\10MBENCAPSULATION.WORDS |\\InterfacePage|) SEDIT::CFV-DOTLIST ( -SEDIT::TYPE-DOTLIST) \\NSRANDOM.CREATE.STREAM (BYTESPERPAGE \\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS -FILELINELENGTH LF.EOLC |NoBits|) GNCCODE (%FAT-CHAR-TYPENUMBER) SCAVENGEDSKDIRECTORY (|\\LFtopMonitor| - |tLispDirectory| |tLispFile|) PFI.PRINT.TO.TAB (ITALICFONT DEFAULTFONT) COMPILER::GENCODE-LET ( -COMPILER::*SPECIAL-VENV* :LEXICAL :ARGUMENT) EDITGETDEF (SEDIT::CONTEXTS) MSSTOREDATA (MSCHANGEDARRAY -MSDATABASELST NODUMPRELATIONS) COPY.TEXT.TO.IMAGE (NSCHARSETSHIFT \\NORUNCODE) CL:COMPILE (:PARENT -:TARGET-ARCHITECTURE COMPILER::*HOST-ARCHITECTURE*) \\10MBRAWRECEIVE (\\MACHINETYPE \\DAYBREAK -\\TELERAIDIOCB |DoveEther.outputIOCBType| \\ES.PENDING \\ES.GOOD.PACKET) PURGEHISTORY1 (EDITHISTORY) -\\LEAF.REQUESTPAGE (\\LEAF.MAXLOOKAHEAD \\LEAFOP.READ \\OPCODE.SHIFT \\LEAFMODE.DONTEXTEND -BYTESPERPAGE \\LEN.FILEREQUEST) COMP.GO (CODE FRAME LEVEL) \\FTP.OPEN.CONNECTION (PROMPTWINDOW -\\PUPSOCKET.FTP) \\CREATECHARSET.DISPLAY (DISPLAYFONTCOERCIONS) \\CREATE-REAL-CHARSET.DISPLAY ( -MISSINGCHARSETDISPLAYFONTCOERCIONS MISSINGDISPLAYFONTCOERCIONS) \\BUILDSLUGCSINFO (\\MAXTHINCHAR -BLACKSHADE) GETPROBE (PROBELST) |\\LFPutDirectory| (|\\LFdirectories|) CL::%DEFSTRUCT-CONSP-OPTIONS ( -CL::%DEFSTRUCT-OPTIONS) COMP.PROG (ALLVARS ALLDECLS LOCALVARS SPECVARS COMPILE.CONTEXT FRA FRAME CODE -OPPOP) \\FM.FORMATBYGRID (\\FM.GROUPSPEC) \\POLYSHADE.DISPLAY (MIN.SMALLP MAX.SMALLP) ADDPME ( -|\\PageMapTBL| |\\EmptyPMTEntry| WORDSPERPAGE \\PAGEMAP |\\PMblockSize| \\LOCKEDPAGETABLE BITSPERWORD) - DUMPINITPAGES (\\MAXVMPAGE NEXTPM NEXTVMEM \\PAGEMAP |\\PageMapTBL| |\\IFPValidKey| |MKI.Page0Byte|) -EDITBMRESHAPEFN (GRIDTHICKNESS NORMALGRIDSQUARE MINGRIDSQUARE) STREQUAL (%FAT-CHAR-TYPENUMBER) -DO.EDIT.PP (\\FIRSTLINE RDTBL \\BUFFER \\CURSORCOL HISTSTR1) \\TEDIT.CHARLOOKSMENU.CREATE ( -TEDIT.CHARLOOKSMENU.SPEC) COMPILER::ALPHA-THROW (:TAG :VALUE COMPILER::*NULL-CONTEXT*) -\\DEFAULTSTATE.IP (CURRENTTRANS) \\CORE.UNPACKFILENAME (:PATHNAME) \\CREATEDISPLAYFONT (\\MAXCHARSET) -CONCAT.IP (CONCAT) \\HANDLE.PUP.ROUTING.INFO (\\PT.GATEWAYRESPONSE \\PUPOVLEN \\PUP.ROUTING.TABLE -\\ROUTING.TABLE.MASK \\PUP.ROUTING.TABLE.RADIUS \\PUP.ROUTINGINFO.WORDS \\RT.INFINITY WORDSPERCELL -\\RT.TIMEOUTINTERVAL) \\NSFILING.FILLIN.ATTRIBUTES (\\NSFILING.USEFUL.ATTRIBUTE.TYPES) \\DURATIONTRAN -(DURATIONCLISPWORDS) WRITEIMAGEOBJ (HPRINTRDTBL) SET-CONNECTED-DIRECTORY-INTERACTIVELY ( -*WHO-LINE-DIRECTORIES* PROMPTWINDOW) |\\LFCloseFile| (|\\LFtopMonitor|) \\READDISPLAYFONTFILE ( -DISPLAYFONTEXTENSIONS DISPLAYFONTDIRECTORIES) GETTOPVAL (\\VAL.HI) GETHASHKEY (HASHFILERDTBL -HASH.HEADER.SIZE HASH.KEY.SIZE) |GetBcplString| (\\PNAMELIMIT) XCL::WALK-DECLARATIONS (XCL::*ENVIRONMENT* -) CHAT.RECONNECT (LASTMOUSEBUTTONS) ERROR (HELPFLAG *LAST-CONDITION*) |\\PFInsertDirectoryID| ( -|rootDirSeal| |rootDirVersion| |rootDirMaxEntries|) BQUOTIFY (*BQUOTE-COMMA* *BQUOTE-COMMA-ATSIGN* -*BQUOTE-COMMA-DOT*) COMP.LAMBDA (CODE DONOTHING ALLVARS ALLDECLS LOCALVARS SPECVARS COMPILE.CONTEXT) -CHECKIFPAGE (|\\IFPValidKey| |\\InterfacePage|) OPT.DELCOPYFN (PRA) \\MAKEWRITABLESTRING ( -%FAT-CHAR-TYPENUMBER) |\\VFMGenerateFileIDs| (|\\VFMmonitor| MAX.FIXP |\\VFMmaxID|) SETTOPVAL ( -\\VAL.HI) COURIERTRACE (LASTMOUSEBUTTONS) SPY.BUTTON (SPY.CLOSED LASTMOUSEBUTTONS) \\FM.FORMAT ( -\\FM.PROPSPEC BLACKSHADE \\FM.BOXSPACE) SUBFIELDCREATE (RECORD.TRAN RNAME MSBLIP FIELDS.IN.CREATE) -\\10MBRAWTRANSMIT (\\TELERAIDIOCB \\10MB.MINPACKETLENGTH \\ES.PENDING) SEDIT::SET-LIST-FORMAT ( -SEDIT::LIST-FORMATS-TABLE) PURGEHISTORY (LISPXHISTORY EDITHISTORY LASTHISTORY ARCHIVELST LISPXCOMS) -\\LEAF.LOOKUPCACHE (\\LEAF.MAXCACHE) \## (L LASTAIL MARKLST UNFIND) \\OPENLEAFCONNECTION (NONLEAFHOSTS - \\LEAF.NEVER.OPENED PROMPTWINDOW \\SOCKET.LEAF \\LEAFCONNECTIONLOCK \\FIXP -\\SEQUIN.DEFAULT.RETRANSMITMAX \\ETHERTIMEOUT \\SEQUIN.DEFAULT.ALLOCATION \\SS.UNOPENED -\\LEN.RESETLEAF \\LEAFOP.RESET \\PUPOVLEN \\LF.ALLOWERRORS \\LF.WANTANSWER \\SS.OPENING \\SS.OPEN -\\LEAF.BROKEN.STATUS \\LEAFOP.ERROR \\PASSWORD.ERRORS \\LEAF.IDLETIMEOUT \\LEN.LEAFPARAMS -\\LEAFOP.PARAMS) %MAKE-STRING-ARRAY-FAT (%FAT-CHAR-TYPENUMBER) CLISP3 (SUBPARENT TAIL) COURIER.CALL ( -\\COURIERPROGRAM) \\SEARCHFONTFILES (*OLD-FONT-EXTENSIONS*) \\DOHARDRETURN (|\\InterfacePage| -|\\HardReturnFXP|) \\DOHARDRETURN1 (\\STACKHI \\#ALINK.OFFSET WORDSPERCELL \\STK.FSB -|\\MinExtraStackWords| WORDSPERQUAD) \\ITEM.WINDOW.COPY.HANDLER (LASTMOUSEBUTTONS) \\SETARG0 (MYALINK -\\STACKHI WORDSPERCELL) TITLEW.BUTTONEVENTFN (INSPECTPRINTLEVEL) EDITBMREPAINTFN (NOTINUSEGRAY -GRIDTHICKNESS) GETFIELDFORCREATE (RECORD.TRAN FIELDS.IN.CREATE MSBLIP USINGTYPE) FIND.LINE ( -\\FIRSTLINE) ICONBUTTONEVENTFN (LASTMOUSEBUTTONS WAITINGCURSOR) HASH.PASSWORD (%FAT-CHAR-TYPENUMBER) -CLISP3B (CLTYP0 TAIL) \\CORE.SETFILEPTR (BYTESPERPAGE |AppendBit|) ENDMASTER.IP (ENDMASTER) -\\ROUTE.PUP (\\LOCALNDBS BROADCASTNSHOSTNUMBER) ERASE/GRAPHNODE (WHITESHADE) \\CORE.BACKFILEPTR ( -|AppendBit| BYTESPERPAGE) MAKEROOMFORPME (|\\PageMapTBL| |\\EmptyPMTEntry| WORDSPERPAGE \\PAGEMAP -|\\PMblockSize|) \\SEARCHDISPLAYFONTFILES (DISPLAYFONTDIRECTORIES DISPLAYFONTEXTENSIONS) -\\FONTINFOFROMFILENAME (UPPERCASEARRAY) MAKETEDITFORM (TEDITSUPPORT TEDITSYSTEMDATE) FILL.INITTBLE ( -\\TOPWDS \\SCREENBITMAPS) \\GETINTEGERPART (BITSPERWORD INTEGERBITS) \\DECUSECOUNT (\\STACKHI -WORDSPERCELL \\#ALINK.OFFSET) \\CORE.SETFILEINFO (CR.EOLC LF.EOLC CRLF.EOLC) CL:PRINT ( -*STANDARD-OUTPUT*) DO.EDIT.COMMAND (\\BUFFER \\ENDBUFFER \\ARROW \\FIRSTLINE \\LOC.ROW.0 \\CURSORROW -\\TTYINSTATE \\MAXTHINCHAR \\PRIMTERMSA WORDSEPR.TC \\RDTBLSA STOPATOMBIT EDITPREFIXCHAR EOLCHARCODE) -UNDONLSETQ (LISPXHIST) CLISPIFY2D (CLISPCHARS VARS NOFIXVARSLST GLOBALVARS) \\PUTBASESTRING ( -%FAT-CHAR-TYPENUMBER \\MAXTHINCHAR \\PNAME.HI \\PLIST.HI) MISCN-NUMBER (\\MISCN-TABLE-LIST) -CLIPRECTANGLE.IP (CLIPRECTANGLE) \\PUPGATELISTENER (\\PUPSOCKET.ROUTING :PROTOCOL -\\PUPROUTER.PROBETIMER \\PUP.ROUTING.TABLE \\RT.AGEINTERVAL \\PT.GATEWAYREQUEST -\\PUPROUTER.PROBEINTERVAL) \\NSFILING.HANDLE.ERROR (PROMPTWINDOW UPPERCASEARRAY :PATHNAME) -COMPILER::ALPHA-TAGBODY (COMPILER::*TAGBODY-STACK*) \\CORE.GETNEXTBUFFER (|NoBits| BYTESPERPAGE) -\\DOSTACKOVERFLOW (|\\SubovFXP|) GETPROPLIST (\\PLIST.HI) \\FINDFONTFILE (*OLD-FONT-EXTENSIONS*) -INSPECTW.REPAINTFN (INSPECTPRINTLEVEL) LISPFORM.SIMPLIFY (COMPILERMACROPROPS CLISPARRAY) \\INCUSECOUNT - (\\STACKHI \\MAXSAFEUSECOUNT \\MP.USECOUNTOVERFLOW \\STK.NOTFLAG WORDSPERCELL \\STK.BF \\STK.FX) -\\CORE.PACKFILENAME (ROOT EXT VERS) CONSTANTEXPRESSIONP (*BC-MACRO-ENVIRONMENT* CONSTANTFOLDFNS -COMPILERMACROPROPS) NO.SIDEEFFECTS.FNP (NOSIDEFNS) COMPILER::COMPILE-FILE-PROCLAMATION ( -COMPILER::*ENVIRONMENT*) COMPSETREAD (DWIMWAIT COMPSETDEFAULTKEYLST HISTSTR0) PFI.PRINT.ENVIRONMENT ( -*INTERLISP-PACKAGE* *READTABLE* *PACKAGE*) \\GATHER-CLEANUP-FORMS (\\PROCESSES \\RUNNING.PROCESS -\\SAVED.USER.CONTEXT) MAKECREATELST1 (MSBLIP USINGTYPE COMMENTFLG) \\GET-MY-BF (MYALINK) -\\CORE.OPENFILE (BYTESPERPAGE \\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS FILELINELENGTH |NoBits| CR.EOLC - LF.EOLC CRLF.EOLC) \\DOGC (\\GCFXP) \\SFMAKEITALIC (\\MAXTHINCHAR) \\INIT-MISCN-TABLE ( -\\MISCN-TABLE-LIST) \\FONTFILENAME.OLD (*DISPLAY-FONT-NAME-MAP*) \\MKATOM (\\MAXTHINCHAR -\\ORIGREADTABLE |\\AtomHashTable| \\OLDATOMSPACE \\NEWATOM-PNAMEOFFSET \\ATOMSPACE \\PLIST.HI -\\LITATOM \\NEW-ATOM) COMPILER::ALPHA-SETQ (:VAR COMPILER::*ENVIRONMENT* :VALUE :STMTS) \\GCSCANSTACK -(|\\InterfacePage| \\STACKHI \\STK.FX GCREF WORDSPERCELL \\STK.GUARD \\STK.FSB \\STK.BF) -MBUTTON.FIND.BUTTON (PCNO) \\FONTFACE.COLOR (\\COLORDISPLAYSTREAMTYPES) \\EXTENDSTACK ( -|\\LastStackAddr| |\\GuardStackAddr| \\STACKHI WORDSPERPAGE) NUMBERP (\\TT.NUMBERP) POSTINITARRAYS ( -\\MAXBUCKETINDEX |\\ArrayFrLst| |\\MaxArrayBlockSize| |\\MinArrayBlockSize| \\VAL.HI |\\NxtArrayPage| -\\ARRAYSPACE |\\MDSIncrement|) \\LOCKVAR (\\VAL.HI) \\PARSE.NUMBER (*READTABLE* \\ORIGREADTABLE -*READ-BASE* MAX.DIGITS.ACCURACY) GETNSPRINTER (PROMPTWINDOW) FINDATOM (EXPR) SPELLFILEDIR (NAME -EXTENSION VERSION DIRHOSTS) \\COREFILE.SETPARAMETERS (CR.EOLC LF.EOLC CRLF.EOLC DEFAULTFILETYPE) -\\MOVEFRAME (\\STACKHI \\STK.FSB |\\InterfacePage| |\\GuardStackAddr| WORDSPERCELL WORDSPERQUAD -\\STK.FSB.WORD) \\PAGEDEOFP (|ReadBit|) MSEDITF (MSFNTYPES) ED (:DISPLAY :CURRENT :NEW PROMPTWINDOW) -FIXSPELL1 (READBUF FAULTFN FIXSPELLDEFAULT DWIMKEYLST FIXSPELLKEYLST VETOSTATS COMMENTFLG SPELLSTATS -SPELLSTATS1 RUNONSTATS) \\VARNOTUSED (\\QUOTIFYING.NLS \\WALKABLE.SPECIALFORMS) CL:FORMAT ( -*STANDARD-OUTPUT*) \\INITATOMPAGE (\\PNPSPACE \\DEFSPACE \\PLISTSPACE \\VALSPACE CELLSPERPAGE -WORDSPERCELL \\OLDATOMSPACE WORDSPERPAGE \\NEWATOM-VALOFFSET) \\FTP.FIX.BROKEN.INPUT (PROMPTWINDOW -\\FTPCONNECTIONS) ARGS.COMMUTABLEP (\\QUOTIFYING.NLS \\WALKABLE.SPECIALFORMS) CHAT.PROMPT.FOR.INPUT ( -LASTMOUSEX LASTMOUSEY) \\MAKEMDSENTRY (|\\MDSTypeTable| \\GCDISABLED \\TT.NOREF) \\CORE.SETEOFPTR ( -|WriteBit| BYTESPERPAGE) \\NODIRCORE.OPENFILE (BYTESPERPAGE \\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS -FILELINELENGTH |NoBits| CR.EOLC LF.EOLC) CL:SYMBOL-NAME (\\PNAME.HI \\PLIST.HI :EXPECTED-TYPE :CULPRIT -) INSPECT/ATOM (PROMPTWINDOW) \\ALLOCBLOCK (|\\ArrayBlockLinkingCells| |\\MaxArrayNCells| -UNBOXEDBLOCK.GCT PTRBLOCK.GCT CELLSPERPAGE \\MAX.CELLSPERHUNK |\\ArrayBlockOverheadCells| -|\\ArrayBlockTrailerCells| |\\ArrayBlockHeaderWords| GCREF) \\INSPECTW.VALUE.MARGIN ( -|MinSpaceBetweenProperyAndValue| |PropertyLeftMargin| |MaxValueLeftMargin|) \\SETUPGUARDBLOCK ( -\\STK.GUARD.WORD \\STACKHI) \\D0.STARTIO (MISC1) \\LEAF.ABORT.FROMMENU (GRAYSHADE) SETA (\\ST.PTR -\\ST.PTR2 \\ST.INT32 \\ST.BYTE \\ST.CODE \\ST.POS16 \\ST.BIT BITSPERWORD \\ST.FLOAT) SETPROPLIST ( -\\PLIST.HI) COMPILER::COMPILE-FILE-DEFINE-FILE-INFO (COMPILER::*INPUT-STREAM*) -CHANGE-TTY-PROCESS-INTERACTIVELY (\\PROCESSES) MAKEINITLAST (MKI.PLHA MKI.TVHA BYTESPERPAGE -WORDSPERPAGE |\\FirstArrayPage| MKI.CODESTARTOFFSET INITVALUES INITPTRS \\LITATOM \\NEW-ATOM -MKI.VALUES MKI.PTRS LOCKEDVARS MKI.ATOMARRAY) ARRAY (|\\MaxArrayLen| \\ST.BYTE \\ST.POS16 PTRBLOCK.GCT - \\ST.PTR \\ST.PTR2 \\ST.INT32 \\ST.FLOAT \\ST.BIT WORDSPERCELL MASKWORD1\'S) EDIT.BITMAP.REAL ( -PROMPTWINDOW) COMPILER::ALPHA-RETURN-FROM (COMPILER::*BLOCK-STACK* :BLOCK :VALUE) -\\POSTSCRIPT.OUTCHARFN (\\POSTSCRIPT.CHARTYPE *POSTSCRIPT-NS-HASH*) HELPSYS (MACROPROPS IRMWINDOW) -\\TELEBLTCURSOR (\\EM.CURSORBITMAP \\#WORDS.CURSOR \\MACHINETYPE \\DAYBREAK) FILEARRAYBASE ( -\\ARRAYSPACE MKI.CODESTARTOFFSET |MKI.FirstDataByte|) EVALUABLE.CONSTANTP (CONSTANTFOLDFNS -\\WALKABLE.SPECIALFORMS) FILEBLOCKTRAILER (OUTX |\\UsedArrayFlagWord|) \\LEAF.DEVICEP (UPPERCASEARRAY -\\MACHINETYPE \\MAIKO \\FTPFDEV) |\\PFPilotVolumeP| (|nonPilotVolume|) \\TEDIT.EXPANDED.MENU ( -TEDIT.EXPANDED.MENU) \\SPP.RESETCLOSE (RESETSTATE) MAPATOMS (|\\DTDSpaceBase| \\NEW-ATOM |\\AtomFrLst| - WORDSPERPAGE |\\PagesPerMDSUnit| |\\MDSIncrement| \\MAXVMPAGE |\\MDSTypeTable| \\TT.TYPEMASK) -USER-SUBR-NUMBER (\\USER-SUBR-LIST) LISPVERSION (|\\InterfacePage|) COMP.SETQ (ALLDECLS -COMPILE.CONTEXT) SI::NON-LOCAL-GO (\\STACKHI) |\\LFGetDirectory| (|\\LFdirectories|) RECORDFIELD? ( -USERRECLST) |\\LFScavFileName| (%FAT-CHAR-TYPENUMBER) TEDIT.GET.OBJECT1 (DEFAULTFONT) DELETE.TO.END ( -\\CURSOR \\CURSORCOL) SCALE/TONODES (|ScalableLinkParameters|) CLISPIFY2 (CLISPCHARS) EOFCLOSEF ( -DEFAULTEOFCLOSE) |\\VAMUpdateVAM| (BITSPERPAGE BITSPERWORD) \\CREATE.SYMBOL (|\\MaxAtomFrLst| -\\NEW-ATOM \\PNPSPACE \\NEWATOM-VALOFFSET |\\MDSIncrement| \\TT.NOREF \\TT.SYMBOLP \\TT.ATOM \\LITATOM - \\OLDATOMSPACE \\NEWATOM-PNAMEOFFSET GCREF \\ATOMSPACE \\PLIST.HI) BEGINPREAMBLE.IP (BEGINPREAMBLE) -\\CH.UPDATE.CACHE (PROMPTWINDOW) XCL::IMPLICIT-KEY-REHASH (XCL::*DELETED-IMPLICIT-HASH-SLOT*) -\\POPSTATE.IP (} SETXY) UNSAVEDEF (DFNFLG) ATOMHASH#PROBES (\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER - \\MAXTHINCHAR \\PNAMELIMIT |\\AtomHashTable| \\OLDATOMSPACE \\NEWATOM-PNAMEOFFSET) OPENP ( -\\FILEDEVICES) |\\LFPurgeDirectory| (|tLispDirectory|) \\CLIPANDDRAWLINE1 (\\CURSORDESTINATION -\\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS) XCL::WALK-BINDINGS-1 (XCL::*LEXICAL-VARIABLES*) -\\INIT-USER-SUBR-TABLE (\\USER-SUBR-LIST) |\\LFUnpackName| (%FAT-CHAR-TYPENUMBER) -\\COURIER.ATTENTIONFN (\\SPPDSTYPE.BULKDATA |WriteBit| |AppendBit| PROMPTWINDOW) DOICONWINDOWCOM ( -|IconWindowMenuCommands|) RECLOOK (USERRECLST) DELETETO1 (\\ENDBUFFER TTYINBSFLG) CLOSEALL ( -\\OPENFILES) \\IRM.GET.HASHFILE (IRM.HASHFILE.NAME IRM.HOST&DIR) FROM.SCREEN.BITMAP (PROMPTWINDOW) -\\TEDIT.SET.SEL.LOOKS (BLACKSHADE COPYSELSHADE COPYLOOKSSELSHADE EDITMOVESHADE) INSPECTW.CREATE ( -INSPECTPRINTLEVEL |MaxInspectorPropertyValueWidth| |MaxInspectorWindowHeight|) COMPILER::GENCODE-IF ( -:ARGUMENT :RETURN) \\HCPYMODEDISPLAYINIT (\\DISPLAYIMAGEOPS MICASPERINCH) CL:SYMBOL-FUNCTION (:NAME) -\\DEVICE.OUTPUT (MISC2) DECLARERECORD (RECORDTRANHASH DFNFLG) ELT (\\ST.PTR \\ST.PTR2 \\ST.INT32 -\\ST.BYTE \\ST.CODE \\ST.POS16 \\ST.BIT BITSPERWORD \\ST.FLOAT) ERRORMESS (*LAST-CONDITION* -*ERROR-OUTPUT*) |\\LFDirectoryP| (|tLispDirectory| |lispFileVersion| MAX.SMALLP) \\READSTRIKEFONTFILE -(\\MAXTHINCHAR) XCL::WALK-ARGLIST (CL:LAMBDA-LIST-KEYWORDS) \\READACFONTFILE (\\MAXTHINCHAR BLACKSHADE -) |\\LFOpenOldFile| (|leaderPageSeal| |\\LFdevice| \\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS -FILELINELENGTH LF.EOLC |NoBits| BYTESPERPAGE) GETD (\\DEF.HI) FASL::SETESCAPE (FASL::FASL-EXTENDED) PF - (*COMPILED-EXTENSIONS*) SI::GET-CACHE-CLOSURE (SI::*CLOSURE-CACHE*) SEDIT::MENU-INIT-STATE (*PACKAGE* - *PRINT-BASE*) OPT.PRATTACH (PRA) \\DELETETREE (\\BTREELASTREALOFFSET) COMP.NOT (COMPILE.CONTEXT) -\\FONTRESETCHARWIDTHS (\\MAXCHAR) \\DRAWPOLYGON.PSC (:EOL) FASL:PROCESS-BLOCK (FASL:*DEFAULT-OPTABLE*) - SETUP-WHOLINE-TIMER (*WHO-LINE*) SI::PVAR-VALUE-IN-FRAME (\\STACKHI PVARCODE) LOOKUPHASHFILE ( -MAX.INTEGER HASHTEXTCHAR HASHFILERDTBL) COMPILER::ALPHA-PROGN (:STMTS COMPILER::*CONTEXT* -COMPILER::*EFFECT-CONTEXT*) DEFAULT.INSPECTW.PROPCOMMANDFN (XCL:*EVAL-FUNCTION*) FASL:CLOSE-FASL-HANDLE - (FASL::END-OF-DATA-MARK :CLOSED) MBUTTON.CREATE (DEFAULTFONT MBUTTONIMAGEFNS) |\\LFScavVersion| ( -MAX.SMALLP) \\BSP.CLOSE.OPEN.SOCKETS (\\BSPSOCKETS \\STATE.CLOSED \\STATE.LISTENING \\STATE.ABORTED) -FASL::DO-OP (FASL::*BLOCK-LEVEL* FASL::*CURRENT-OPTABLE*) MAKE-NETWORK-TRACE-WINDOW (LASTMOUSEBUTTONS) - COMPILER::GENCODE-GO (COMPILER::*CURRENT-FRAME*) COURIER.WRITE.NSADDRESS (\\#WDS.NSADDRESS) -HISTORYFIND (LINE LISPXFINDSPLST HISTORY TYPE BACKUP QUIETFLG) \\TELERAIDEXIT (\\TELERAIDBLOCK) -FASL::FETCH-VALUE (FASL::*VALUE-TABLE*) SI::INTERNAL-THROW-VALUES (:TAG) \\DISCARDFRAME (\\STACKHI -WORDSPERCELL \\#ALINK.OFFSET) FASL::NEW-VALUE-TABLE (FASL::INITIAL-VALUE-TABLE-SIZE) PMORE (LASTFNDEF) - COMPILER::ALPHA-PROGV (:SYMS-EXPR :VALS-EXPR :STMT) \\SPP.SETFILEPTR (|ReadBit|) -COMPILER::COMPILE-FILE-DECLARE\: (COMPILER::*EVAL-WHEN-COMPILE*) PRINTFNDEF (PFDEFAULT) CL:FIND-SYMBOL - (*PACKAGE* %FAT-CHAR-TYPENUMBER) \\DECL.COMNT.PROCESS (COMMENTFLG) XCL::IMPLICIT-KEY-MAP-HASH ( -XCL::*DELETED-IMPLICIT-HASH-SLOT*) SCALE/GRAPHNODE/BORDER (NODEBORDERWIDTH) CLISPIFY1 (FORM) -PFCOPYBYTES (MAX.SMALL.INTEGER NSCHARSETSHIFT \\NORUNCODE) SUBRNUMBER (\\INITSUBRS) -DOATTACHEDWINDOWCOM (|WindowMenuCommands|) \\TEDIT.EXPANDEDCHARLOOKS.MENU (TEDIT.CHARLOOKS.MENU) -FASL::FASL-END-OF-BLOCK (FASL::*BLOCK-LEVEL* :STREAM) \\RENAMEDFN (CELLSPERQUAD) WTFIX1 (NOSPELLFLG +:PROCESS-OUTSTANDING-LOOSE-FORMS-FN) %%TYPE-SIZE-TO-TYPENUMBER (%%LIT-ARRAY-TYPES %%LIT-ARRAY-SIZES) +\FIXPASSWORD (\IFSERROR.PROTECTION \IFSERROR.PASSWORD \IFSERROR.USERNAME \IFSERROR.NEED.USERNAME +\IFSERROR.CONNECTPASSWORD \IFSERROR.CONNECTNAME \IFSERROR.NO.LOGIN) \INITCONSPAGE (CDRCODING) +IRM.DISPLAY.REF (WINDOW) GREETFILENAME (\MACHINETYPE \MAIKO *COMPILED-EXTENSIONS* USERGREETFILES) +PRINT-CIRCLE-LABEL-P (*PRINT-CIRCLE-HASHTABLE*) \ALLOCMDSPAGE (\MP.BADMDSFREELIST \NxtMDSPage +\MDSIncrement WORDSPERPAGE) \NSFILING.EVENTFN (:TEST :ABORT AppendBit WriteBit) TTY/EDITL (EDITCALLS +LISPXHISTORY) CLISPFOR (DWIMIFYING VARS NOFIXFNSLST NOFIXVARSLST LISPXHIST) \INVALIDATE.PROCESS.WINDOW + (LIGHTGRAYSHADE) CreateCursorBitMap (WORDMASK) DELETE/AND/DISPLAY/LINK (PROMPTWINDOW) CL:COPY-READTABLE + (*READTABLE*) *WHO-LINE-ACTIVE-TIMER* (*WHO-LINE-ACTIVE-PERIOD*) COMPILER::*COMPILE-FILE-CONTEXT* ( +:SETF-SYMBOL-FUNCTION-FN :DEFINEQ-FN :DEFCONSTANT-FN :DECLARE%:-FN :DEFINE-FILE-INFO-FN +:PACKAGE-FORM-FN :PROCLAIM-FN :COMPILER-LET-FN :MACROLET-FN :DEFINER-FN :NAMED-PROGN-FN +:PROCESS-FUNCTION-FN :PROCESS-LOOSE-FORM-FN :PROCESS-OUTSTANDING-LOOSE-FORMS-FN) \SMASHRETURN (MYALINK + *CURRENT-PROCESS*) DRAWMARGINSCALE (WHITESHADE BLACKSHADE) \PROMISCUOUS.OFF (\LOCALNDBS GCONST) +DBG::REUSE-CURRENT-WINDOW (PROMPTWINDOW) GO (MYALINK \STACKHI WORDSPERCELL) SEDIT::SET-PROPS ( +:COMPLETION-FN :ROOT-CHANGED-FN :ENVIRONMENT SEDIT::LISP-EDIT-ENVIRONMENT :PROFILE :EVAL-IN-PROCESS +:EVAL-FN) EVALA (WORDSPERQUAD CELLSPERQUAD) \SET.PROCESS.NAME (\PROCESS.NAME.TABLE) CLISP3C ( +FUNNYATOMLST) \EVALA (MYALINK \STACKHI WORDSPERQUAD \STACKSPACE \LITATOM \NEW-ATOM PVARCODE +WORDSPERCELL) NUMBERPAD.READER.HANDLE.CHAR (RNUMBER.ABORT.BITMAP RNUMBER.CLEAR.BITMAP) +NUMBERPAD.READER.DECODE (TEDIT.READTABLE) CHECKCONSPAGES (CDRCODING \LISTPDTD \LISTP) BSP.PUTINTERRUPT + (\PT.INTERRUPT \PUPOVLEN BYTESPERWORD) CL:DESCRIBE (CL::*DESCRIBE-PRINT-LENGTH* +CL::*DESCRIBE-PRINT-LEVEL*) \MAPMDS (\STORAGEFULLSTATE \SFS.FULLYSWITCHED \DefaultSecondArrayPage +\MaxMDSPage \NxtMDSPage \LeastMDSPage \SMALLP) MSNLAMBDACHECK (MSDATABASELST) \DSPYPOSITION.HCPYMODE ( +MAX.SMALLP) \CHECKCONSPAGE (WORDSPERCELL) UPDATECHANGED1 (MSDATABASELST MSCHANGEDARRAY) +DASSEM.CLEANFNTEST (CONDITIONALS VCONDITIONALS NUMBERFNS CLEANFNLIST NOFREEVARFNS NOSIDEFNS) +CL:ENCODE-UNIVERSAL-TIME (\TimeZoneComp) FTP.BREAKCONNECTION (\FTPCONNECTIONS) \MAYBEPRINTPACKET ( +\EPT.PUP PUPTRACEFLG XIPTRACEFLG PUPTRACEFILE XIPTRACEFILE) CURSOR (\CURRENTCURSOR DEFAULTCURSOR +\SOFTCURSORP) CL:DISASSEMBLE (*STANDARD-OUTPUT*) COMPILER::GENCODE-PROGN (:RETURN :EFFECT) +\ETHEREVENTFN (\DTDSpaceBase \MACHINETYPE \DANDELION \IOPAGE \DAYBREAK RESTARTETHERFNS) +SEDIT::ASSIGN-FORMAT-LIST (SEDIT::TYPE-COMMENT) ERRORSET (SI::NLSETQ-PROCEED-CASE *PROCEED-CASES* +*CONDITION-HANDLER-BINDINGS* :NORMAL) TITLEDICONW (DEFAULTICONFONT WBorder DEFAULTICONWIDTH BLACKSHADE + WHITESHADE) OPT.OPTCHECK (CODE CL:LABELS FRAMES TOPFRAME) CL::%%RATIONAL-FLOAT (\EXPONENT.BIAS) +SI::NLSETQ-PROCEED-CASE (:NAME :SELECTOR :TEST :REPORT) SPP.OPEN (SPP.USER.TIMEOUT) +\PRINT-USING-DEFPRINT (\DEFPRINTFNS) \TEST.PARAGRAPH.LOOKS (not legal after a paragraph look) +CL::%%RATIONALIZE-FLOAT (\EXPONENT.BIAS \8BITS) \KEYHANDLER1 (ALLUP \DLMOUSE.UP \MISCSTATS \KbdFXP +\PERIODIC.INTERRUPT.FREQUENCY \EM.MOUSEX \EM.MOUSEY \EM.REALUTILIN \DLMOUSE.WAITING \DLMOUSE.NORMAL +\EM.UTILIN \EM.KBDAD0 \EM.KBDAD1 \EM.KBDAD2 \EM.KBDAD3 \EM.KBDAD4 \EM.KBDAD5 \InterfacePage +\KEYBOARDEVENT.LAST \KEYBOARDEVENT.FIRST \KEYBOARDEVENT.SIZE \MACHINETYPE \MAIKO \RCLKSECOND) MSUPDATE + (DWIMIFYCOMPFLG CLISPIFYPRETTYFLG COMMENTFLG MSPRINTFLG ANALYZEUSERFNS MSERRORFN) \PRINSTACKP ( +\PNAME.HI *READTABLE*) COMP.STFN (INTERNALBLKFNS) \UNWIND.PROCESS (\PROC.KILLME) DINFO.CREATE.FMENU ( +MENUFONT) MAKE-FILL-POINTER-OUTPUT-STREAM (\FILL-POINTER-STREAM-DEVICE) \PRINSTRING (*READTABLE*) +MAKEFILE (PRETTYFLG *PRINT-BASE* DWIMWAIT MAKEFILEFORMS MAKEFILEOPTIONS) DOFILESLOAD (:COMPILED +*STANDARD-INPUT* DIRECTORIES LDFLG *COMPILED-EXTENSIONS* LOADOPTIONS) COMP.TAGBODY (FRAME +COMPILE.CONTEXT CODE) \SPY.INTERRUPT (MYALINK SPY.NEXT SPY.BUFFER.THRESHOLD) LET (WORDSPERQUAD +CELLSPERQUAD) FB.HARDCOPY.DIRECTORY (MAX.SMALLP FB.HARDCOPY.FONT FB.HARDCOPY.DIRECTORY.FONT ITALICFONT +) LOADUP (SYSFILES) CLISP3 (SUBPARENT TAIL) \LET0 (MYALINK \STACKHI WORDSPERQUAD \STACKSPACE +WORDSPERCELL \LITATOM \NEW-ATOM PVARCODE) CL:FCEILING (XCL::SCEILING) WRITEIMAGEOBJ (HPRINTRDTBL) +SEDIT::QUERY-THROW-AWAY-CHANGES (:DISPLAY) \AB.BACK (\ArrayFrLst \ArrayBlockPassword) CL:DIRECTORY ( +\MACHINETYPE \MAIKO) TTRACKMOUSE (LASTMOUSEBUTTONS \DSP \TTPAGELENGTH \LOC.ROW.0 \BMARG \CHARHEIGHT +\LMARG \RMARG \FONT) \LITPRIN (*READTABLE* *KEYWORD-PACKAGE* \PNAME.HI *PRINT-CASE* :CAPITALIZE) +MAP.PROCESSES (\PROCESSES) \LET* (MYALINK \STACKHI WORDSPERQUAD \LITATOM \NEW-ATOM PVARCODE +\STACKSPACE WORDSPERCELL) SEDIT::PARSE-INDENT-GROUPS (:VERTICAL) COMP.STPOP (OPPOP) +\DSKDISPLAY.REPAINTFN (\DSKDISPLAY.FONT \DSKDISPLAY.BOLD) LET* (WORDSPERQUAD CELLSPERQUAD) +\ELIDE.ELEMENT.CHAR (*READTABLE*) SPP.DESTADDRESS (\#WDS.NSADDRESS) \CONVERTTOFRACTION (BITSPERINTEGER + INTEGERBITS \FIXP) COMP.RETURN-FROM (FRAME COMFN LEVEL CODE) MSUPDATEFN1 (MSDATABASELST) +\DURATIONTRAN (DURATIONCLISPWORDS) CL:FFLOOR (XCL::SFLOOR) \ELIDE.TAIL.STRING (*READTABLE*) +\PFCreateFreePage (\PFFreeFileD) RESTART.PROCESS (\PROC.RESTARTME) \LEAF.ERROR ( +\IFSERROR.FILE.NOT.FOUND \IFSERROR.MALFORMED \IFSERROR.ALLOCATION \IFSERROR.BAD.HANDLE \IFSERROR.BUSY +\IFS.ERROR.BROKEN.LEAF \SHORT.ERROR.PUPLEN \LEAFOP.OPEN PROMPTWINDOW) INSPECT.FLIPSELECTION (GRAYSHADE +) CL:FINISH-OUTPUT (*STANDARD-OUTPUT*) MSSHOWUSE (MSFNTYPES) CLISPIF (DWIMIFYING VARS BREAKFLG EXPR +NOFIXFNSLST NOFIXVARSLST LISPXHIST) WAKE.PROCESS (\PSTAT.RUNNING PSTAT.WAKEUP) ENDLOADUP (USERRECLST +SYSTEMINITVARS MEDLEY-INIT-VARS FILEPKGTYPES) EDITL1 (EDITRDTBL L ATM) \SUSPEND.PROCESS ( +\PSTAT.RUNNING \PSTAT.WAITING \MP.PROCERROR) DINFO.ICONFN (WINDOW TEDIT.TITLED.ICON.TEMPLATE +TEDIT.ICON.FONT) CL::BOA-ARG-LIST-WITH-INITIAL-VALUES (CL:LAMBDA-LIST-KEYWORDS) FIND-EXTERNAL-SYMBOL ( +\FIXP) SPP.DSTYPE (ReadBit) TB.SET.FONT (MAX.SMALLP) CURSORBITMAP (CursorBitMap) CL:ENOUGH-NAMESTRING +(*DEFAULT-PATHNAME-DEFAULTS*) COMP.RETURN (FRAME PROGCONTEXT LEVEL COMFN CODE RETURNLABEL) +WHO-LINE-SHOW-ACTIVE (*WHO-LINE* *WHO-LINE-ACTIVE-PERIOD*) PERIODICALLYRECLAIM (\LASTUSERACTION +RECLAIMWAIT \LASTRECLAIM) INSTALL-PROTOTYPE-DEFN (:NEW) \LITPRIN.INTERNAL (\PNAME.HI UPPERCASEARRAY +*PRINT-CASE* \MAXTHINCHAR :CAPITALIZE) \SEND.ANSWERING.RFC (\STATE.LISTENING WORDSPERPORT \PT.RFC +\PUPOVLEN) BACKSPACEDEL (ERASECHARCODE) SEDIT::SCALE-INDENT (SEDIT::LISP-EDIT-ENVIRONMENT) +\DSPXPOSITION.HCPYMODE (MICASPERPT) CL:FLOAT-PRECISION (\HIDDENBIT) \SPPWATCHER (SPP.USER.TIMEOUT +\SPPHEAD.CC.ACKNOWLEDGE) FB.ICONFN (FB.ICONSPEC FB.ICONFONT) \CURVE (BRUSHWIDTH BRUSHHEIGHT +\CURSORDESTINATION \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS LEFTMINUSBRUSH RIGHTPLUS1 BOTTOMMINUSBRUSH + TOP DESTINATIONBASE OPERATION HEIGHTMINUS1 RASTERWIDTH LEFT NBITSRIGHTPLUS1 TOPMINUSBRUSH +DestinationBitMap BRUSHBASE BRUSHRASTERWIDTH COLORBRUSHBASE NBITS DASHLST) \VFMSplit1 (page +\VFMinterval nullVolumePage \VFMlowPtr keyStone \VFMlow) \FTP.NEXTFILE (\FTP.IDLE.TIMEOUT) CLISP3B ( +CLTYP0 TAIL) CROPMARK.CREATE (CROPMARK.IMAGEFNS CROPMARK.DEFAULT.PAGESIZE TEXTOBJ) CL:FTRUNCATE ( +XCL::STRUNCATE) READIMAGEOBJ (IMAGEOBJGETFNS) \KEYBOARDOFF (\EM.DISPINTERRUPT \LispKeyMask +\MACHINETYPE \MAIKO) SEDIT::FINALIZE-MOUSE-SELECTION (SEDIT::PENDING-SELECTION SEDIT::PENDING-LAST-X +SEDIT::PENDING-LAST-Y SEDIT::PENDING-TYPE SEDIT::PENDING-CARET) TB.RECONSIDERRANGE (LASTVISIBLE# +FIRSTVISIBLE# BROWSER) TERM.RESET.DISPLAY.PARMS (CHAT.FONT) \FUNCT1 (MYALINK \STACKHI WORDSPERQUAD +WORDSPERCELL \LITATOM \NEW-ATOM PVARCODE) \DOMOUSECHORDING (\MOUSE.ALLBITS \DLMOUSE.UP +\DLMOUSE.WAITING \MOUSE.LRBIT ALLUP \MOUSE.MIDDLEBIT \DLMOUSE.MIDDLE \MISCSTATS \MOUSE.LEFTBIT +\DLMOUSE.MIDDLE&RIGHT \MOUSE.RIGHTBIT \DLMOUSE.MIDDLE&LEFT \EM.UTILIN) COMP.GO (CODE FRAME LEVEL) +CL:FORCE-OUTPUT (*STANDARD-OUTPUT*) MSNOTICEFILE (FILELST DWIMWAIT) \MAKESTACKP (\STACKP \STACKHI) +\PFTrimHelper (nullVolumePage) \TRACKCURSOR (\LASTUSERACTION \MISCSTATS WORDSPERCELL \CURSORDESTWIDTH +\CURSORHOTSPOTX \MACHINETYPE \DANDELION BITSPERWORD \CURSORDESTHEIGHT HARDCURSORHEIGHT \CURSORHOTSPOTY + \DAYBREAK \MAIKO \EM.MOUSEX \EM.MOUSEY \EM.CURSORX \EM.CURSORY) PROMPTINWINDOW (LASTMOUSEX LASTMOUSEY + WindowTitleDisplayStream) CL:FROUND (XCL::SROUND) FIX89A (LPARKEY CHARLST) \DEFPRINT.BY.NAME ( +*READTABLE*) TB.CONSIDERRANGE (LASTVISIBLE# FIRSTVISIBLE# BROWSER) \SYMBOL.ESCAPE.COUNT ( +UPPERCASEARRAY \MAXTHINCHAR \PNAME.HI *READ-BASE*) COMPILER::GENCODE-MV-CALL (:ARGUMENT) +\MAKEFUNARGFRAME (WORDSPERQUAD CELLSPERQUAD) \TEDIT.BRAVOFILE? (TEXTOBJ) INSPECT.INVERTREGION ( +BLACKSHADE) \OUTCHAR (\DEFAULTOUTCHAR) \DOBUFFEREDTRANSITIONS (\KEYBOARDEVENT.LAST +\KEYBOARDEVENT.FIRST \KEYBOARDEVENT.SIZE) \NUMERIC.PNAMEP (*READTABLE* *READ-BASE*) \PRINTADDR ( +\ADDRMASK) SEDIT::GET-CONTEXT (SEDIT::EDITOR-NAME) THIS.PROCESS (\RUNNING.PROCESS) +\TEXTMENU.TOGGLE.SHOWSELFN (BLACKSHADE) CALLS (GLOBALVARS NOPACKCALLSFLG LAMBDASPLST +MS.VERB.TO.NOTICED) \SOUT (\DISPLAYSTREAMTYPES *DRIBBLE-OUTPUT* \PRIMTERMSA \TERM.OFD) SI::UNWIND ( +MYALINK \STACKHI) FRESHLINE (WriteBit AppendBit) \AB.NEXT (\ArrayFrLst \ArrayBlockPassword) +BRACKET.CURRENT.WORD (\MAXTHINCHAR \PRIMTERMSA WORDSEPR.TC \RDTBLSA) PROCESS.TTY (\TERM.OFD) +CL::ARGUMENT-NAMES (CL:LAMBDA-LIST-KEYWORDS :REQUIRED-ARG) PRINTERRORXIP (XIPERRORMESSAGES) +TEDIT.CHARWIDTH (\MAXTHINCHAR INDICATE.CCE SIMULATE.CCE REAL.CCE IGNORE.CCE) PNAMESTREAMP ( +\PNAMEDEVICE) COMPILER::ALPHA-UNWIND-PROTECT (:STMT COMPILER::*CONTEXT* :CLEANUP COMPILER::*EFFECT-CONTEXT* +) TTRUBOUT (\ARROW \CURSOR \BUFFER) TWODINSPECT.MAKEREGIONS (INSPECTPRINTLEVEL) \CARET.DOWN ( +\CARET.FORCED.OFF.RATE \CARET.TIMER) \STREAM.DEFPRINT (ReadBit OutputBits BothBits AppendBit) +CLISPIFY2D (CLISPCHARS VARS NOFIXVARSLST GLOBALVARS) COPYVM (\InterfacePage \IFPValidKey) +CL:STRING-CAPITALIZE (SLEN) BLIPVAL (MYALINK \STACKSPACE WORDSPERCELL) MSCHECKEMPTY (DWIMWAIT) FIX89 ( +LPARKEY FAULTX EXPR) GIVE.TTY.PROCESS (LASTMOUSEBUTTONS) \VAROFFSET (IVARCODE PVARCODE \STACKHI +FVARCODE) TB.UNDOSELECTION (FIRSTVISIBLE# LASTVISIBLE# TS.IDLE) SETBLIPVAL (MYALINK \STACKSPACE +WORDSPERCELL) \DSKDISPLAY.BUTTONEVENTFN (LASTMOUSEBUTTONS) \SAVEVMBACKGROUND (SAVEVMMAX \InterfacePage + \IFPValidKey SAVEVMWAIT \LASTUSERACTION) SPP.SENDEOM (WriteBit AppendBit) BLIPSCAN (MYALINK +\STACKSPACE) SPY.END (SPY.BUTTON SPY.CLOSED) \DRAWPOINT.IP (MICASPERPT) \GETACCESS (NoBits ReadBit +AppendBit OutputBits BothBits) CH.CHANGE.ITEM (\CH.BROADCAST.SOCKET) EDITBF (MAXLEVEL) GETVARS ( +FAULTPOS) \TEDIT.PEEKBIN.NEW.PAGE (NoBits) \DSPFONT.PRESS (FontCode MicasPerPoint) \RTP.ERROR ( +PUPTRACEFILE RTPEVENTS RTPSTATES) \FTP.CLOSEFILE (\FTPCONNECTIONS FTPDEBUGLOG PROMPTWINDOW +\NO.STORAGE.FULL \BSPFDEV) \NSFILING.LOGIN (\NSFILING.PROGRAM.NAME PROMPTWINDOW \COURIERPROGRAM \FIXP) + INSPECT (INSPECTMACROS \DTDSpaceBase PROMPTWINDOW) \INTERPRESSINIT (MICASPERINCH POINTSPERINCH) +UPDATEFN (MSCHANGEDARRAY MSDATABASELST) \REALFRAMEP (\INTERNAL OPENFNS BRKINFOLST) +\PERIODIC.INTERRUPTFRAME (\PERIODIC.INTERRUPT) PRINTNUM-TO-STRING (NILNUMPRINTFLG) \SPP.PREPARE.INPUT +(\SPPFLAG.ATTENTION \SPPDSTYPE.END \SPPDSTYPE.ENDREPLY \SPPDSTYPE.BULKDATA \XIPOVLEN \SPPHEAD.LENGTH) +INPUT (\LINEBUF.OFD) EDITQF (CLISPTRANFLG) \IPCURVE2 (\SPLINESTEP.IP MICASPERPOINT UBFLOAT3 +MAXSEGSPERTRAJECTORY) LISPERROR (\ERRORMESSAGELIST) MSGETDEF (MSFNTYPES MSDATABASELST) \STKARG ( +IVARCODE PVARCODE \STACKHI) %%TWO-WAY-STREAM-DEVICE-CLOSEFILE (%%TWO-WAY-STREAM-DEVICE +%%ECHO-STREAM-DEVICE) CL::DEFINE-CONSTRUCTORS (:CONSTRUCTOR) \SETACCESS (NoBits ReadBit AppendBit +OutputBits BothBits) MODERNWINDOW.BUTTONEVENTFN (LASTMOUSEBUTTONS LASTKEYBOARD +WindowTitleDisplayStream MODERN-WINDOW-MARGIN) TEDIT.INSERT.UPDATESCREEN (TEDIT.SELECTION) +\SOFTCURSORPOSITION (\EM.DISPINTERRUPT \EM.CURSORX \EM.CURSORY) CL:ISQRT (:EXPECTED-TYPE :NAME :VALUE +:MESSAGE) POSTSCRIPT.INIT (FONTDEFS *POSTSCRIPT-NS-TRANSLATIONS*) WHO-LINE-SET-TIME ( +*WHO-LINE-OLD-TIME*) \SPP.CREATE.STREAMS (\SPPDEVICE) \SEND.ENDREPLY (\PT.ENDREPLY \PUPOVLEN) +\LEAF.FIX.BROKEN.SEQUIN (\SS.OPENING \LEAFOP.RESET \SS.OPEN \SS.CLOSING PROMPTWINDOW +\LEAF.RECOVERY.TIMEOUT) CL:INTEGER-DECODE-FLOAT (\EXPONENT.BIAS) XCL::WHERE-IS-DEFAULT-DEFINE-TYPES ( +FILEPKGTYPES) CLISPIFY2 (CLISPCHARS) VIDEORATE (\MACHINETYPE \DOLPHIN \DORADO \DANDELION) +FB.SET.DEFAULT.NAME.WIDTH (FB.DEFAULT.NAME.WIDTH) COMP.PROG (ALLVARS ALLDECLS LOCALVARS SPECVARS +COMPILE.CONTEXT FRAME CODE OPPOP) ONED.TRACKCURSOR (LASTMOUSEBUTTONS) DISMISS (MAX.FIXP) COMPILER::GENCODE-LET + (COMPILER::*SPECIAL-VENV* :LEXICAL :ARGUMENT) \NSFILING.CLOSEFILE (AppendBit WriteBit) +\SETUP.TYPENUM.TABLE (\MAX.CELLSPERHUNK UNBOXEDBLOCK.GCT INITIALDTDCONTENTS \DTDSpaceBase) +\GC.HANDLEOVERFLOW (\HTOVERFLOW WORDSPERCELL \DTDSpaceBase \LISTP \FIXP \SMALLP \FLOATP +MAX.SMALL.INTEGER) SPP.CLOSE (NoBits) COMPILER::ALPHA-TAGBODY (COMPILER::*TAGBODY-STACK*) +\TFBRAVO.HANDLE.HEADING (IN USER.CM.PARALOOKS MAX.FIXP) PAINTW.READBRUSHSHADE (PAINTW.SHADES) RECLOOK +(USERRECLST) \DRAWLINE.IP (MICASPERPOINT DOSAVESIMPLEBODY { }) \DTEST.UFN (\DTDSpaceBase \FIXP \SMALLP + \FLOATP) MENU.HANDLER (LASTMOUSEBUTTONS MENUHELDWAIT LASTMOUSEX LASTMOUSEY) MKATOM (\PNAMELIMIT) +PFI.MERGE.INDICES (UPPERCASEARRAY) MSOUTPUT (FILELINELENGTH) RECORDFIELD? (USERRECLST) +CL:LISP-IMPLEMENTATION-VERSION (MAKESYSNAME LISP-RELEASE-VERSION MAKESYSDATE) SEDIT::EXPANDREGIONFN ( +:EXPAND DEFAULTFONT) DBG::PRINT-ENTRY-MESSAGE (BRKCOND) \NSFILING.DISCARD.SESSION (:CLOSED) SETUPSTACK + (\STACKSPACE \InitStackSize WordsPerPage WORDSPERCELL \StackAreaSize RESETPC RESETPTR) \MAKENUMBER ( +\SmallNegHi) TTCRLF.ACCOUNT (\TTPAGELENGTH \DSP \LMARG) \SPP.CREATE.STREAM (\SPPDEVICE) +ICONBUTTONEVENTFN (LASTMOUSEBUTTONS WAITINGCURSOR) \LEAF.HANDLE.INPUT (\LEAFOP.ERROR \LEAFOP.CLOSE +\IFSERROR.BAD.HANDLE) \FTP.GENERATEFILES (\FTP.IDLE.TIMEOUT) \PROC.RESUME (MYALINK) +CREATE.NUMBERPAD.READER (BOLDFONT DEFAULTFONT RNUMBER.ABORT.BITMAP RNUMBER.CLEAR.BITMAP) COMP.LAMBDA ( +CODE DONOTHING ALLVARS ALLDECLS LOCALVARS SPECVARS COMPILE.CONTEXT) \GET.EXTERNALFORMAT.FROM.NAME ( +*EXTERNALFORMATS*) \HUNKFIT? (\MDSIncrement CELLSPERPAGE) \PFI.DO.HARDCOPY (\PFI.PROCESSLOCK) EDIT%: ( +L COPYFLG) SCREENBITMAP (ScreenBitMap) \GCMAPTABLE (\HTOVERFLOW WORDSPERCELL \DTDSpaceBase \FIXP +\SMALLP \FLOATP MAX.SMALL.INTEGER \MaxTypeNumber) DEFAULT.INSPECTW.PROPCOMMANDFN (XCL:*EVAL-FUNCTION*) + \INSERTCH (\MAXTHINCHAR) \TIMER.INTERRUPTFRAME (\PERIODIC.INTERRUPT.FREQUENCY \RCLKSECOND \MISCSTATS) + \DSPRIGHTMARGIN.HCPYMODE (MICASPERPT) \INTERPRETER (\MiscFXP WORDSPERQUAD CELLSPERQUAD) \LFFindInfo ( +tLispFile) FILEPATCHBLOCK (OUTX \FreeArrayFlagWord \ArrayBlockHeaderCells \ArrayBlockOverheadCells) +INVERT.BITMAP.B/W (BLACKSHADE) WINDOW.MOUSE.HANDLER (LASTMOUSEX LASTMOUSEY LASTMOUSEBUTTONS +\CURSORSCREEN \CURSORDESTWIDTH) SMALLP (\SMALLP) \PFGetFreePage (\PFFreeFileD) \COERCE.NS.SOCKET ( +\#WDS.NSADDRESS) SEDIT::CONVERT-COMMENT-STRUCTURE (COMMENTFLG SEDIT::LEVEL-3-COMMENT SEDIT:CONVERT-UPGRADE + SEDIT::LEVEL-2-COMMENT SEDIT::LEVEL-1-COMMENT) FIXP (\TT.FIXP) \SPP.DEFAULT.ERRORHANDLER ( +\SPPDSTYPE.BULKDATA) DOAROUNDEXITFORMS (BEFORELOGOUTFORMS AFTERLOGOUTFORMS BEFORESYSOUTFORMS +AFTERSYSOUTFORMS BEFOREMAKESYSFORMS AFTERMAKESYSFORMS) CL::%%ATAN-FLOAT (CL::%%PI/2 CL:PI +CL::%%INV-2-SQRT3 CL::%%PI/3 CL::%%SQRT3 CL::%%2-SQRT3 CL::%%PI/6) \BSP.SENDBUFFER (\PUPOVLEN +MAX.SMALL.INTEGER) TB.DECONSIDERRANGE (LASTVISIBLE# FIRSTVISIBLE# BROWSER) FLOATP (\FLOATP) +\SPP.ESTABLISH (\#WDS.NSADDRESS \SPS.OPEN) \CREATE.THROUGH.EXTERNALFORMAT (:THROUGH CR.EOLC) +\TEDIT.COMMAND.RESET.SETUP (DEFAULTTTYREGION) \TEXTMENU.TOGGLE.CREATE (\TOGGLEIMAGEFNS) LITATOM (COPY +TYPEMASK.N EQ) \PRINTFRAME (PVARCODE \STACKHI FVARCODE \VALSPACE WORDSPERCELL) ONFILE (MSFNTYPES +FILELST) FB.FASTSEECOMMAND (:NEXT) FIXCONTINUE1 (OKREEVALST) LISTP (\LISTP CDRCODING) VIRGINFN ( +*TERMINAL-IO*) PRINTXIPDATA (\XIPOVLEN) \PRINTBF (IVARCODE \STACKSPACE) SPY.START (SPY.BUTTON SPY.OPEN + SPY.FREQUENCY) ARRAYP (\ARRAYP) INSPECTW.CREATE (INSPECTPRINTLEVEL MaxInspectorPropertyValueWidth +MaxInspectorWindowHeight) EDITCALLERS (FILELST SYSFILES DWIMIFYCOMPFLG) FB.MAKEHEADINGWINDOW ( +BLACKSHADE) HASH-TABLE-FOR-DOC-TYPE (*DOCUMENTATION-HASH-TABLE*) \TFBRAVO.FIND.LAST.TRAILER ( +BRAVO.TRAILER.CHARS) BCPLVERSION (\InterfacePage) INTERPRESS.OUTCHARFN (\MAXTHINCHAR NSCHARSETSHIFT) +\DECODETRANSITION (\LASTUSERACTION \MISCSTATS WORDSPERCELL \NKEYS \LASTKEYSTATE \CURRENTKEYACTION +IGNORE.TF LOCKSHIFT.TF NOLOCKSHIFT.TF EVENT.TF 1SHIFTUP.TF 1SHIFTDOWN.TF 2SHIFTUP.TF 2SHIFTDOWN.TF +LOCKUP.TF LOCKDOWN.TF LOCKTOGGLE.TF CTRLUP.TF CTRLDOWN.TF METAUP.TF METADOWN.TF FONTUP.TF FONTDOWN.TF +FONTTOGGLE.TF USERMODE1UP.TF USERMODE1DOWN.TF USERMODE1TOGGLE.TF USERMODE2UP.TF USERMODE2DOWN.TF +USERMODE2TOGGLE.TF USERMODE3UP.TF USERMODE3DOWN.TF USERMODE3TOGGLE.TF \COMMANDKEYACTION \CTRLMASK +\KEYBOARD.META) STACKP (\STACKP) TTPRIN1 (\LMARG \DSP \RMARG) COMPILER::COMPILE-FILE-PROCLAMATION ( +COMPILER::*ENVIRONMENT*) \SCANFORNTENTRY (\AtomHI) \LEAF.TIMEDOUT (\SEQUIN.BROKEN \MAXLEAFTRIES +\SS.OPENING :OPEN PROMPTWINDOW \SS.OPEN PUPTRACEFILE \SS.CLOSING) CL:MACHINE-TYPE (\MACHINETYPE +\DANDELION \DORADO \DAYBREAK \MAIKO) TTYDISPLAYSTREAM (\DEFAULTTTYDISPLAYSTREAM \DISPLAYSTREAMTYPES) +CLISPIFY1 (FORM) \PRINTSTK (.I7 \STACKSPACE) PROCESS.EVAL (\PSTAT.NORESULT) PP (*TERMINAL-IO*) +COMP.SETQ (ALLDECLS COMPILE.CONTEXT) CHARACTER (\MAXTHINCHAR \FATPNAMESTRINGP \PNAMELIMIT +\OneCharAtomBase) REALMEMORYSIZE (\InterfacePage) \PROCESS.EVAL1 (:ABORTED \PSTAT.RUNNING) +\SETXFORM.PSC (:EOL) \COMPUTE.HUNK.TYPEDECLS (CODEBLOCK.GCT \MAX.CELLSPERHUNK PTRBLOCK.GCT) +SHOWPRESSBITMAPREGION (PRESSBITMAPREGION) CL:MACHINE-INSTANCE (\MACHINETYPE \MAIKO \MY.NSHOSTNUMBER) +\PFPutMarkerPage (\PFMarkerFileD \PhysVolumePage) \LEAF.RECONNECT (\LEAFCONNECTIONLOCK \SS.OPEN) PRIN2 + (PLVLFILEFLG *PRINT-LEVEL* *PRINT-LENGTH* *INTERLISP-PACKAGE* *PACKAGE* \LINELENGTH MAX.SMALLP) +TWODINSPECT.ADJUSTSELECTION (INSPECTPRINTLEVEL) \DSPLEFTMARGIN.HCPYMODE (MICASPERPT) COMPILER::ALPHA-SETQ + (:VAR COMPILER::*ENVIRONMENT* :VALUE :STMTS) SET (\STACKHI) \CHANGE.ETHER.TRACING (LASTMOUSEBUTTONS) +\NSADDRESS.DEFPRINT (*NSADDRESS-FORMAT* :DECIMAL) CL:MAKE-RANDOM-STATE (*RANDOM-STATE* :I :J :ARRAY) +CLISPFUNCTION? (NOFIXFNSLST0 NOFIXFNSLST CLISPCHARRAY SPELLINGS2) SAVEONSYSRECLST (COMMENTFLG) +CL::%%MAKE-SMALL-FIXP-ACCESSOR (MAX.SMALLFIXP \SmallNegHi) \GETINTEGERPART (BITSPERWORD INTEGERBITS) +COMPILER::ALPHA-RETURN-FROM (COMPILER::*BLOCK-STACK* :BLOCK :VALUE) %## (L LASTAIL MARKLST UNFIND) +SPP.CLEAREOM (\SPPFLAG.EOM) CL:MAKE-BROADCAST-STREAM (%%BROADCAST-STREAM-DEVICE) REQUIREVERSION ( +\InterfacePage) \DSKDISPLAY.CREATE.WINDOW (\DSKDISPLAY.FONT WBorder WindowTitleDisplayStream) +\FAX.PARSE.NAME (FAXADDRESSES DEFAULTFAXHOST) CL:COMPILED-FUNCTION-P (\ST.CODE) MSINTERPRET ( +MSPRINTFLG MSFNTYPES MSBLIP MSCHANGEDARRAY MSDATABASELST) \PUTSYSBUF (\SYSBUFFER.LAST \SYSBUFFER.FIRST +) CLISPATOM (CLISPFLG FAULTXX WTFIXCHCONLST LPARKEY RPARKEY FAULTX FAULTPOS) PARSERELATION ( +MSDATABASELST) U-CASE (*INTERLISP-PACKAGE* \PNAMELIMIT \FATPNAMESTRINGP) TITLEW.BUTTONEVENTFN ( +INSPECTPRINTLEVEL) \CREATECHARSET.IP (INTERPRESSFONTDIRECTORIES INTERPRESSFONTEXTENSIONS noInfoCode +\MAXTHINCHAR) INITGC (\HTMAIN \HTMAINSIZE \HTOVERFLOW \HTBIGCOUNT WORDSPERPAGE \HTCOLLSIZE) +\GETMISCSOCKET (\PUPSOCKETS) \TEDIT.RESTARTFN (BothBits) CL:LONG-SITE-NAME (XCL:*LONG-SITE-NAME* +XCL:*SHORT-SITE-NAME*) \SEND.ABORT (\PT.ABORT BYTESPERWORD \PUPOVLEN \STATE.SENTRFC) +DO.SHIFTED.SELECTION (LASTMOUSEBUTTONS \DSP \CURSOR \ENDBUFFER \ARROW) \SETBSPTIMEOUT ( +\BSP.OUTSTANDINGDATATIMEOUT \BSP.IDLETIMEOUT) SPY.TOGGLE (\PERIODIC.INTERRUPT WAITINGCURSOR) +SETSYNONYM (MSWORDS) COMPILER::ALPHA-THROW (:TAG :VALUE COMPILER::*NULL-CONTEXT*) \PROCESS.APPLY1 ( +:ABORTED \PSTAT.RUNNING) \SEND.RFC (WORDSPERPORT \PUPOVLEN \PT.RFC) TB.COPYBUTTONEVENTFN ( +LASTMOUSEBUTTONS) FB.HARDCOPY.TOFILE (PRINTFILETYPES) \DRAWCURVE.IP (DOSAVESIMPLEBODY { }) FIXCONTINUE + (DWIMWAIT DWIMKEYLST) PROCESS.APPLY (\PSTAT.NORESULT) DEFAULT.ADDNODEFN (DEFAULT.GRAPH.NODEFONT +DEFAULTFONT) APROPOS (UPPERCASEARRAY) SPY.TREE (*PACKAGE* *READTABLE* *PRINT-CASE* SPY.SHOW.THRESHOLD) + SCANFORWARD (\ARROW) COMPILER::COMPILE-FILE-DEFINE-FILE-INFO (COMPILER::*INPUT-STREAM*) +WRITEPRINTERPORT (WRITEPRINTERPORT) \LEAF.WHENCLOSED (\SS.NOSOCKET \LEAF.NEVER.OPENED +\LEAF.BROKEN.STATUS) \VFMMerge1 (\VFMinterval leftInterval mergeLevel treeDepth \VFMlowPtr \VFMlow) +CL:MERGE-PATHNAMES (*DEFAULT-PATHNAME-DEFAULTS* :NEWEST) \SPPSENDERROR (XIPTRACEFILE) +\GETDEVICEFROMHOSTNAME (\DEVICENAMETODEVICE \FILEDEVICES) MICROCODEVERSION (\InterfacePage) +READPRINTERPORT (READPRINTERPORT) \SEND.END (\PT.END \PUPOVLEN) \HARDCURSORUP (\CURSORDESTINATION +CursorBitMap HARDCURSORHEIGHT HARDCURSORWIDTH \MACHINETYPE \DAYBREAK \MAIKO) \TEDIT.WORDDELETE ( +TEDIT.WORDBOUND.READTABLE \MAXTHINCHAR TEXT.TTC) SEDIT::PARSE--COMMENT-WORD (SEDIT::TYPE-COMMENT-WORD) + NEXTSIZEFONT (DECREASING.FONT.LIST) XCL::WHERE-IS-NOTICE (XCL::*WHERE-IS-HASH-FILE-SIZE* :DIRECTION +:IO) SEDIT::PARSE-INDENT (:VERTICAL) INITDATATYPENAMES (\EndTypeNumber INITIALDTDCONTENTS +\DTDSpaceBase \LITATOM \NEW-ATOM) EDIT4E (CHCONLST2 EDITQUIETFLG CLISPTRANFLG) COMPILER::GENCODE-IF ( +:ARGUMENT :RETURN) CLISPERROR (FAULTFN PARENT TAIL FAULTX) FB.MAKERIGIDWINDOW (SCREENWIDTH) +UPDATECHANGED (MSCHANGEDARRAY) COMPILER::ALPHA-PROGV (:SYMS-EXPR :VALS-EXPR :STMT) \TFBRAVO.PARSE.PARA + (DefaultParagraphLooks USER.CM.CHARLOOKS) FNCHECK (USERWORDS SPELLINGS2) \CURSORDESTINATION ( +\CURRENTCURSOR \MACHINETYPE \DAYBREAK \MAIKO \DANDELION \EM.MOUSEX \EM.MOUSEY \EM.CURSORX \EM.CURSORY +\VAL.HI) FW-INIT-PROPS (FW-Properties PROMPTWINDOW SCREENWIDTH SCREENHEIGHT) \CCODEARGLIST ( +WORDSPERQUAD WORDSPERCELL :INTERLISP) PRESS.BITMAPSCALE (PRESSBITMAPREGION PointsPerMica) +WHO-LINE-SYMBOL-SPACE (\LastAtomPage \AtomFrLst *WHO-LINE-SYMBOL-SPACE*) \CLOSEFILE (ReadBit) +\UNQUEUE.EVENT (\MP.PROCERROR) SEDIT::CHANGE-QUOTE (SEDIT::QUOTE-WRAPPER-LIST) \SHIFT.DOCUMENT ( +\FirstPieceOffset TEXTOBJ) DOICONWINDOWCOM (IconWindowMenuCommands) EDITFPAT (CHCONLST1) +FB.MAYBE.WIDEN.NAMES (FB.OVERFLOW.MAXFRAC FB.OVERFLOW.MAXABSOLUTE) PACK* (\FATPNAMESTRINGP \PNAMELIMIT +) BSPPRINTPUP (\PUPOVLEN \PT.AMARK \PT.MARK) COMP.NOT (COMPILE.CONTEXT) CL:PARSE-NAMESTRING (:TYPE +:DIRECTORY :PATH :SUBDIRECTORY :RELATIVE :WILD :NEWEST) \ADD.CONNECTED.DIR (\CONNECTED.DIRECTORY) +\WWCHANGESCREENSIZE (WINDOWBACKGROUNDSHADE) \CCODEIVARSCAN (\AtomHI BITSPERBYTE IVARCODE) DWIMLOADFNS? + (FAULTX LISPXHIST) \LEAF.IDLE? (\LEAF.CACHETIMEOUT \LEAF.IDLETIMEOUT) \SPP.HANDLE.DATA ( +\SPPDSTYPE.END \SPS.ENDRECEIVED \SPS.DALLYING \SPPDSTYPE.ENDREPLY \SPS.ENDSENT \SPS.CLOSED) +COMPILER::ALPHA-PROGN (:STMTS COMPILER::*CONTEXT* COMPILER::*EFFECT-CONTEXT*) PFI.ENQUEUE ( +\PFI.PROCESSLOCK) \TRANSMIT.STRATEGY (\PT.DATA \PT.ADATA \PT.MARK \PT.AMARK) EDITMBD (EDITEMBEDTOKEN) +HPRINT.IMAGEOBJ (HPRINTRDTBL) OBTAIN.MONITORLOCK (\INTERRUPTABLE) POSTSCRIPT.FONTCREATE (\MAXTHINCHAR +*POSTSCRIPT-NS-HASH*) EDITSW (L) \HARDCURSORPOSITION (\CURSORDESTHEIGHT \CURSORDESTWIDTH +\CURSORHOTSPOTX BITSPERWORD \CURSORHOTSPOTY \MACHINETYPE \DANDELION \DAYBREAK \MAIKO \EM.MOUSEX +\EM.MOUSEY \EM.CURSORX \EM.CURSORY) COMPILER::GENCODE-GO (COMPILER::*CURRENT-FRAME*) \DEVICEEVENT ( +\FILEDEVICES) ICONW.SHADE (WHITESHADE) INITATOMS (\AtomHashTable \AtomHTpages \PNAMELIMIT \ATOMSPACE +\LITATOM \NEW-ATOM) SEDIT::SETF-OF-GET-FORMAT (SEDIT::*FSPEC-TABLE*) CL:PEEK-CHAR (*STANDARD-INPUT*) +DELFROMFILES (FILELST) TIME.SINCE.PACKET (\FIXP WORDSPERCELL \RCLKMILLISECOND) \CLEARBM (WHITESHADE) +CL:PHASE (CL:PI) ONEDINSPECT.MAKEREGIONS (INSPECTPRINTLEVEL) \TFBRAVO.ADD.NAMEDTAB (\NAMEDTAB.IMAGEFNS +) \RTP.HANDLE.RFC (\STATE.LISTENING \STATE.SENTRFC \STATE.OPEN \STATE.ENDSENT \EVENT.RFC \PUPOVLEN +BYTESPERWORD \PT.ABORT) FILES? (FILELST FILEPKGTYPES NOTCOMPILEDFILES NOTLISTEDFILES) +\SPP.CREATE.WATCHER (\SPP.INITIAL.ROUNDTRIP) \STORENSADDRESS (\#WDS.NSADDRESS) FULLPRESSBITMAP ( +PRESSBITMAPREGION MicasPerPoint) \SOFTCURSORUPCURRENT (\EM.DISPINTERRUPT \SOFTCURSORWIDTH +\SOFTCURSORHEIGHT \CURSORDESTWIDTH \CURSORDESTHEIGHT \CURSORDESTRASTERWIDTH \VAL.HI +\CURSORDESTLINEBASE \CURRENTCURSOR \SOFTCURSORUPBM \SOFTCURSORDOWNBM \SOFTCURSORBBT2 \SOFTCURSORBBT3 +\SOFTCURSORBBT4) FIXATOM (FAULTPOS ONLYSPELLFLG PARENT GLOBALVARS SPELLINGS3 CLISPCONTEXT +CLISPIFWORDSPLST :RESPELL CLISPFORWORDSPLST CLISPISWORDSPLST WTFIXCHCONLST CLISPINFIXSPLST +WTFIXCHCONLST1) RELEASE.MONITORLOCK (OLDVALUE \MP.PROCERROR) \PUT.FILING.ATTRIBUTE ( +\NSFILING.ATTRIBUTES) BITMAPCREATE (\MaxBitMapWidth \MaxBitMapHeight \MaxBitMapWords) CH.RETRIEVE.ITEM + (\CH.BROADCAST.SOCKET) OPENPRSTREAM (DEFAULTPAGEREGION \NOIMAGEOPS \PRESSIMAGEOPS) +\NSPRINT.UNSUPPORTED (PROMPTWINDOW) FIXATOM1 (NEWTAIL PARENT TAIL FAULTFN) CL:PPRINT ( +*STANDARD-OUTPUT*) ADDTOCOM1 (COMSNAME) RECORDECLARATIONS (USERRECLST CLISPTRANFLG CLISPRECORDTYPES) +MACROEXPANSION (LAMBDASPLST) DOATTACHEDWINDOWCOM (WindowMenuCommands) PUPSOCKETFROMNUMBER (\PUPSOCKETS +) \PRINTNSADDRESS (\LINELENGTH MAX.SMALLP) SI::MONITOR-UNWIND (SI::*LOCKED-MONITOR* \MP.PROCERROR) +\TEDIT.TEXTBIN.NEW.PAGE (NoBits) CL::%%ASIN-FLOAT (CL::%%ASIN-EPSILON CL::%%ASIN-PPOLY CL::%%ASIN-QPOLY + CL::%%PI/2) \SEND.ACK (\BSP.MAXPUPS \PT.ACK \PUPOVLEN \MAX.PUPLENGTH) FB.HEADINGW.DISPLAY (BLACKSHADE + TB.LEFT.MARGIN) COMPILER:OPTIMIZE-AND-MACROEXPAND (COMPILER::*ENVIRONMENT* COMPILER::*CONTEXT*) +PRINTPUPQUEUE (\PUPOVLEN) COMP.CARCDR (COMPILE.CONTEXT EXP) CL:RANDOM (*RANDOM-STATE*) TB.MAKE.BROWSER + (TB.DELETEDLINEHEIGHT TB.LEFT.MARGIN) FASL::FAT-STRING-P (\ST.POS16) SEDIT::PARSE--COMMENT ( +SEDIT::COMMENT-LEVEL-TABLE) \TAN.OLD (CL:PI PI/180 PI/2 -PI/2 PI/4 -PI/4 UBFLOAT3) \TURN.ON.HUNKING ( +\HUNK.UNBOXEDSIZES UNBOXEDBLOCK.GCT \HUNK.CODESIZES CODEBLOCK.GCT \HUNK.PTRSIZES PTRBLOCK.GCT) +ONEDINSPECT.ADJUSTSELECTION (INSPECTPRINTLEVEL) SEDIT::DEFAULT-EDIT-FN (:DISPLAY :DONTWAIT) SCANBACK ( +\ARROW) COMPILER::COMPILE-FILE-DECLARE%: (COMPILER::*EVAL-WHEN-COMPILE*) \TEDIT.LOOKS ( +TEDIT.KNOWN.FONTS TEDIT.FACE.MENU TEDIT.SIZE.MENU) EDIT4F (CLISPTRANFLG MAXLEVEL LASTAIL) +\SPP.RELEASE.ACKED.PACKETS (\SPP.RETRANSMITQ.SIZE) COMPILER::ALPHA-MV-PROG1 (COMPILER::*CONTEXT* +:STMTS COMPILER::*EFFECT-CONTEXT*) VRULE.DISPLAYFN (BLACKSHADE) \BLTSHADE.IP (PRINTSERVICE +\INTERPRESSSCALE) COURIER.SKIP (BYTESPERWORD) PARSE-NSADDRESS (MASKWORD1'S) ERRORSTRING ( +\ERRORMESSAGELIST) MSTRYSPELLTYPE (SPELLING S MSWORDS) CL:VALUES (MYALINK \AtomHI) CL::TIME-FORMAT ( +:EXEC) TOPW.ADJUSTSELECTION (INSPECTPRINTLEVEL) OPT.DELCODE (FRAMES CL:LABELS) \SIMULATE.UNBIND ( +\STACKHI WORDSPERCELL MYALINK) \LEAF.IDLE (\SEQUIN.NOOP) %%ARRAY-TYPE-TABLE (%%LIT-ARRAY-TABLE +%%LIT-ARRAY-TYPES %%LIT-ARRAY-SIZES) \PFGetMarkerPage (\PFMarkerFileD \PhysVolumePage) CL:VALUES-LIST +(MYALINK \AtomHI) MSHASHLIST1 (MSBLIP BADMARKS) COMPILER::GENCODE-BLOCK (COMPILER::*CURRENT-FRAME*) +MULTIFILEINDEX1 (:CONSECUTIVE :FIRSTPAGE :PART :DONTPRINT EMPRESS#SIDES) \LOADNSADDRESS ( +\#WDS.NSADDRESS) PACKFILENAME (\FILENAME.SYNTAX) SEDIT::PRINT-STRING (*READTABLE*) \MAKE.PROCESS1 ( +MYALINK) COMPILER::GENCODE-CATCH (:ARGUMENT) XCL::DEL-WHERE-IS-DATABASE (XCL::*WHERE-IS-CASH-FILES*) +\PROCESS.MOVEFRAME (WORDSPERCELL PROC.FREESPACESIZE WORDSPERQUAD \STACKHI) PREINITARRAYS (\VAL.HI +\FirstArraySegment \ARRAYSPACE2 \ArrayFrLst) \SOFTCURSORDOWN (\EM.DISPINTERRUPT \SOFTCURSORBBT6) +TB.DO.ITEM.SELECTION (TS.IDLE LASTMOUSEBUTTONS TS.REPLACING TS.ADDING TS.REMOVING TS.EXTENDING.HI +TS.EXTENDING.LO TS.SHRINKING.HI TS.SHRINKING.LO) CL::VALUES-UFN (MYALINK \AtomHI) +SEDIT::INSERT-COMMENT-CHARS (SEDIT::TYPE-COMMENT-WORD) \RELEASE.ETHERPACKET (\FREE.PACKET.QUEUE) +CL:READ-LINE (READ-LINE-RDTBL) \LFCASEARRAYFETCH (\LFCASEARRAY) CL::VALUES-LIST-UFN (MYALINK \AtomHI) +PRINTPACKET (\PACKET.PRINTERS XIPTRACEFILE) \LEAF.OPENFILE (CR.EOLC LF.EOLC CRLF.EOLC DEFAULTFILETYPE) + \WRITEPRESSBITMAP (ShowDotsCode) EDITMV (L LASTAIL) \LEAF.OPENERRORHANDLER (\PUPE.NOSOCKET +PROMPTWINDOW \SS.NOSOCKET \PUPE.NOROUTE) RECORD.REMOVE.COMMENTS (COMMENTFLG) \SPP.HANDLE.ATTN ( +LAMBDASPLST PROMPTWINDOW) \DO.PARAMS.AT.OPEN (:DEFAULT CR.EOLC LF.EOLC CRLF.EOLC STREAM-AFTER-OPEN-FNS +) \CLEARSYSBUF (\PROCESSES) MENUWRESHAPEFN (BLACKSHADE) CL::SET-PARSED-STRUCTURE ( +CL::*PARSED-DEFSTRUCTS*) \GETKEY (\MISCSTATS \FIXP) FIXAPPLY (FAULTX CLISPCHARRAY CHARLST FAULTARGS +FAULTPOS NOSPELLFLG FAULTXX HISTENTRY LPARKEY SPELLINGS1 SPELLINGS2) CL:ROOM (\LASTVMEMFILEPAGE) +\SPP.CREATE.CON (\XIPOVLEN \SPPHEAD.LENGTH \XIPT.SPP \SPP.INITIAL.ALLOCATION \MY.NSADDRESS +\#WDS.NSADDRESS) SORT.NSADDRESSES.BY.DISTANCE (\ETHERTIMEOUT) \RTP.HANDLE.PUP (\PT.RFC \PT.END +\EVENT.END \PT.ENDREPLY \EVENT.ENDREPLY \PT.ABORT \EVENT.ABORT BYTESPERWORD \PT.ERROR \PUPE.NOSOCKET) +\WAIT.FOR.TTY (\TTY.PROCESS.EVENT) \ENQUEUE.TIMER (\TIMERQHEAD \PROCTIMER.SCRATCH) \TTYBACKGROUND ( +\LINEBUF.OFD \KEYBOARD.STREAM TTYBACKGROUNDFNS) \COS.OLD (2PI PI/180 PI/2 -PI/2 3PI/2 CL:PI PI/4 +UBFLOAT3 4/PI) CHARSET (NSCHARSETSHIFT \MAXCHARSET) SEDIT::RELINEARIZE (WHITESHADE) \GETSYSBUF ( +\SYSBUFFER.LAST \SYSBUFFER.FIRST) CL:SHORT-SITE-NAME (XCL:*SHORT-SITE-NAME*) SETFILEINFO (CR.EOLC +CRLF.EOLC LF.EOLC ANY.EOLC) ICMLARRAY.GETMENUWGROUP (MAX.SMALLP) WAIT.FOR.TTY (\TTY.PROCESS.EVENT) +FIX89TYPEIN (FAULTPOS FAULTX) \SPPCONNECTION (\#WDS.NSADDRESS) \RTP.CLEANUP (\EVENT.FORCECLOSE) +\FTPINIT (\BSPFDEV) WHO-LINE-VMEM (\LASTVMEMFILEPAGE \InterfacePage \IFPValidKey) INITDATATYPES ( +INITIALDTDCONTENTS \DTDSpaceBase WORDSPERPAGE \DTDSize \TT.NUMBERP \TT.ATOM \TT.FIXP \TT.NOREF +\TT.SYMBOLP \LITATOM CDRCODING \VAL.HI \LISTP) CHANGECALLERS (DEFAULTRENAMEMETHOD FILELST) \ONSCREENW +(HARDCURSORWIDTH) \NSYSBUFCHARS (\LONGSYSBUF \SYSBUFFER \SYSBUFSIZE) \RECLAIMCODEBLOCK ( +SI::*CLOSURE-CACHE* GCREF) COMPILER::ALPHA-MACROLET (COMPILER::*ENVIRONMENT* :MACRO) +\TYPEGLOBALVARIABLE (\BUILT-IN-SYSTEM-TYPES GLOBALVARS) \SAVESYSBUF (\SAVEDSYSBUFFER) +COURIER.WRITE.SEQUENCE.UNSPECIFIED (BITSPERWORD) \ASSIGNDATATYPE1 (\DTDSpaceBase \MaxSysTypeNum +\EndTypeNumber \DTDSize WORDSPERPAGE \TT.TYPEMASK GCREF) BITBLT.INSERT (\DSP \RMARG \CHARHEIGHT) +\ADD.ROUTING.TABLE.ENTRY (\ROUTING.TABLE.TYPENUM :CULPRIT :EXPECTED-TYPE \ROUTING.TABLE.MASK) +\PFPutLogicalVolumePage (\PFLogicalVolumeFileD) PRINT10TO3 (XIPIGNORETYPES XIPTRACEFILE +\TRANS.OP.REQUEST \TRANS.OP.RESPONSE) CREATEHASHFILE (HASHFILEDEFAULTSIZE HFGROWTHFACTOR HASH.KEY.SIZE +) \SYSBUFP (\LONGSYSBUF \SYSBUFFER) \SFFixY.HCPYMODE (MAX.SMALL.INTEGER) \LEAF.WRITEPAGES ( +\LEAFOP.WRITE \OPCODE.SHIFT BYTESPERPAGE \LEN.FILEREQUEST) \PROC.CODEFORTFRAME (\MP.TOPUNWOUND) +COMPILER::MAYBE-REMOVE-COMMENTS (FORM) BESTNSADDRESS (\RT.INFINITY \NS.ROUTING.TABLE.RADIUS +\ETHERTIMEOUT) \PEEKSYSBUF (\SYSBUFFER) ADDTOFILES? (DWIMWAIT FILEPKGTYPES READBUF ADDTOFILEKEYLST +FILELST) MSSETWORDTYPE (MSWORDS) \KEYBOARDINIT (\SYSBUFFER.LAST \SYSBUFFER.FIRST \SYSBUFSIZE +\MISCSTATS \KEYBOARDEVENT.LAST \KEYBOARDEVENT.SIZE \KEYBOARDEVENT.FIRST \MOUSECHORDMILLISECONDS) +COMP.DECLARE1 (FRAME) \UNQUEUE.TIMER (\TIMERQHEAD) \READNUMBER.FLASHAREA (BLACKSHADE) +\HANDLE.RAW.10TO3 (\EPT.10TO3 \TRANS.OP.REQUEST \MY.NSADDRESS \3MBENCAPSULATION.WORDS +\TRANS.DATALENGTH \TRANS.OP.RESPONSE XIPIGNORETYPES XIPTRACEFILE) CL::ESTABLISH-SETFS-AND-OPTIMIZERS ( +CL::*DEFSTRUCT-INFO-CACHE* :ONLY :ACCESSOR) \SETLOCALNSNUMBERS (\InterfacePage) MOUSECHORDWAIT ( +MAX.SMALLP \RCLKMILLISECOND) %%CANONICAL-CML-TYPES (%%ARRAY-TYPE-TABLE) \PROCESS.EVENTFN (\PROCESSES +\PROCESS.AFTEREXIT.EVENT) EDITMOVESUBTREE (PROMPTWINDOW LASTMOUSEBUTTONS) PAINTW.READBRUSHTEXTURE ( +\CURSORDESTINATION) \ALLOCLOCKED (CELLSPERPAGE) CL:SOFTWARE-VERSION (MAKEINITDATES) \PUTBASEBITS ( +BITSPERWORD) KEYACTIONTABLE (\ORIGKEYACTIONS KEYBOARD.APPLICATION-SPECIFIC-KEYACTIONS) FIXLAMBDA ( +LAMBDASPLST) \DRAWCURVE.PRESS (ScansPerMica) \RTP.INFO.HOOK (BSPSOCKET) \GET.FILING.ATTRIBUTE ( +\NSFILING.ATTRIBUTES) \SETUP.HUNK.TYPENUMBERS (\BUILT-IN-SYSTEM-TYPES \HUNK.PTRSIZES PTRBLOCK.GCT +\HUNK.UNBOXEDSIZES UNBOXEDBLOCK.GCT \HUNK.CODESIZES CODEBLOCK.GCT) \LEAF.READPAGES (\ETHERTIMEOUT +\LEAF.BROKEN.STATUS \LEAFOP.ERROR \LEN.READANSWER ReadBit BYTESPERPAGE) DELETE.LONG.SEGMENT1 (\RMARG) +\RECLAIMARRAYBLOCK (\ArrayBlockHeaderWords \FirstArraySegment \ArrayBlockPassword \MP.BADARRAYRECLAIM +PTRBLOCK.GCT WORDSPERCELL CODEBLOCK.GCT) FB.DISPLAY.COUNTERS (MAX.SMALLP WHITESHADE) +PFI.NEW.LISTFILES1 (:PATHNAME) TEDIT.REDO (WAITINGCURSOR) COMP.DECLARE (SYSSPECVARS SYSLOCALVARS FRAME + COMP.UNBOXED.TAG) \UNKNOWN.UFN (\MP.UNKNOWN.UFN) PPSOC (\STATE.LISTENING RTPSTATES) \PFVolumeNumber ( +\DFSLogicalVolumeHash) \CAR.UFN (CDRCODING \CDR.INDIRECT CAR/CDRERR) CHECKSYNONYM (MSWORDS SPELLING) +SEDIT::INSTALL-SPECIAL-FORMATS (:CLISP :DOTLIST) \CDR.UFN (CDRCODING \CDR.NIL \CDR.ONPAGE +\CDR.INDIRECT CAR/CDRERR) COMPSET (COMPSETKEYLST) \TURN.ON.PROCESSES (\PROCESSES RESETVARSLST) +\KEYBOARDEVENTFN (\MACHINETYPE \InterfacePage \COMMANDKEYACTION \DEFAULTKEYACTION \ORIGKEYACTIONS) +NTYPX (\MDSTypeTable \TT.TYPEMASK) MSPRED (LASTPARSED) \PROC.AFTER.WINDOWWORLD (\TopLevelTtyWindow) +CL:STRING-NOT-EQUAL (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 SLEN1 SLEN2 OFFSET1) TWODINSPECT.REPAINTFN ( +INSPECTPRINTLEVEL) \TEDIT.CREATEW.FROM.REGION (TEDIT.PROMPTWINDOW.HEIGHT TEDIT.PROMPT.FONT) KEYACTION +(\CURRENTKEYACTION \NKEYS) CL:STRING-GREATERP (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 SLEN2 SLEN1 OFFSET1 +) SEDIT::DEGRADE-COMMENT (SEDIT::COMMENT-MARKERS) \VFMInsert1 (maxReadPtr \VFMlowPtr \VFMhighPtr +insertKey \VFMhigh insertLevel insertVolumePage) CL::%%TAN-FLOAT (CL:PI CL::%%PI/2 CL::%%TAN-EPSILON +CL::%%TAN-PPOLY CL::%%TAN-QPOLY) \KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS (\SUN.TYPE3KEYBOARD +\InterfacePage \MAIKOKEYACTIONS \SUN.TYPE4KEYBOARD \MAIKOKEYACTIONST4 \SUN.JLEKEYBOARD +\MAIKO-JLE-KEYACTIONS \TOSHIBA.JIS \TOSHIBA-KEYACTIONS) \UNWIND.UFN (MYALINK WORDSPERCELL \STACKHI) +PFI.PRINT.BITMAP (*STANDARD-OUTPUT*) CL::ESTABLISH-PREDICATE (CL::*DEFSTRUCT-INFO-CACHE* :ONLY) +COMPILER::FIND-COPIED-VARIABLE (:LEXICAL COMPILER::*COPY-NODE-TABLE*) COMP.COMMENT (COMPILE.CONTEXT +EXP) CL:STRING-LESSP (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 SLEN1 SLEN2 OFFSET1) MSINTERPA (OTHERSET) +TOPW.BUTTONEVENTFN (INSPECTPRINTLEVEL LASTMOUSEBUTTONS) RETDWIM (SIDES LISPXHIST FAULTFN FAULTX PARENT + CLISPCHARRAY CHARLST FAULTPOS) \HARDRETURN (\HardReturnFXP) CL:STRING-LEFT-TRIM (SLEN) +*WHO-LINE-LAST-DIRECTORY* (*DEFAULT-PATHNAME-DEFAULTS*) CREATEMDSTYPETABLE (\MDSTypeTable \MDSTTsize +\TT.NOREF \SmallPosHi \SmallNegHi PAGESPERSEGMENT \TT.FIXP \TT.NUMBERP \TT.ATOM \SMALLP \MDSIncrement +\CHARHI \CHARACTERP \MISCSTATS \FIXP) CL:STRING-DOWNCASE (SLEN) \RPLPTR.UFN (GCREF) \LOOKUPPUPNUMBER ( +BROADCASTNSHOSTNUMBER \NS.WKS.PUPLOOKUP \EXTYPE.REQUEST \XIPT.PUPLOOKUP \#WDS.NSHOSTNUMBER +\MAXETHERTRIES \ETHERTIMEOUT \EXTYPE.RESPONSE XIPTRACEFILE \EXTYPE.NEGATIVE \XIPOVLEN) CL::TIME-CALL ( +*TRACE-OUTPUT*) \HTFIND (\MDSTypeTable \HTMAIN \ADDREFCASE \DELREFCASE \SCANREFCASE \MAXHTCNT +\MP.DELREF0 \UNSCANREFCASE \HTCOLLTHRESHOLD \HTCOLLMAX) \GET.COURIER.DEFINITION (\COURIERPROGRAM) MENU + (LASTMOUSEBUTTONS) \GETBRUSHFONT.PRESS (\VecFontDir PointsPerMica) FILEPKGTYPE (FILEPKGTYPEPROPS) +XCL::GET-WHERE-IS-ENTRIES (XCL::*WHERE-IS-CASH-FILES*) CL:STRING< (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 + SLEN1 SLEN2 OFFSET1) MOVE.TO.START.OF.WORD (\ARROW \CURSOR) \TEDIT.DEFAULTSSEL ( +TEDIT.DEFAULT.CHARLOOKS) \LEAF.TRUNCATEFILE (\LEAFOP.WRITE \OPCODE.SHIFT \LEN.FILEREQUEST) CL:STRING<= + (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 OFFSET1 SLEN2) CLRPROMPT (PROMPTWINDOW) ADDTOFILE (FILELST) +SI::INTERNAL-THROW (:TAG) COMPILER::COPY-VARIABLE (COMPILER::*COPY-NODE-TABLE* :NAME :SCOPE :KIND +:BINDER) COMP.QUOTE (EXP) \RPLACA.UFN (CDRCODING GCREF \CDR.INDIRECT) OPT.DELETEFRAMECHECK (CODE) +\BSP.PREPARE.OUTPUT (\PT.DATA) FONTNAME.IP (INTERPRESSPRINTWHEELFAMILIES INTERPRESSFAMILYALIASES +CHARACTERCODEVERSION) BITBLT.DELETE (\RMARG \DSP \CHARHEIGHT) SPLITKEY (HASHBITTABLE) \RPLACD.UFN ( +CDRCODING GCREF \CDR.INDIRECT \CDR.MAXINDIRECT \CDR.NIL \CDR.ONPAGE) \PFGetLogicalVolumePage ( +\PFLogicalVolumeFileD) \PROCESS.MAKEFRAME0 (\MP.PROCNOFRAME) TEDIT.CREATEW (PROMPTWINDOW +TEDIT.PROMPTWINDOW.HEIGHT TEDIT.PROMPT.FONT) TEDIT.UNDO (WAITINGCURSOR TEDIT.HISTORY.TYPELST) +\CONS.UFN (CDRCODING \LISTP GCREF \LISTPDTD \CDR.ONPAGE) \TRANSLATE.10TO3 (\EPT.10TO3 +\TRANS.OP.REQUEST \MY.NSADDRESS \TRANS.DATALENGTH) SEDIT::GET-INDENT (SEDIT:*INDENT-ALIST*) \SIN.OLD ( +2PI PI/180 -PI/2 3PI/2 PI/2 CL:PI PI/4 UBFLOAT3 4/PI) CLISPFOR0 (CLISPDUMMYFORVARS VARS NOFIXFNSLST +NOFIXVARSLST HISTENTRY LISPXHIST) TWODINSPECT.BUTTONEVENTFN (INSPECTPRINTLEVEL LASTMOUSEBUTTONS) +ADDSPELL2 (SPELLSTR2) \RESETKEYBOARD (\MACHINETYPE \DANDELION \DAYBREAK \MAIKO \EM.UTILIN ALLUP +\LASTKEYSTATE \EM.KBDAD0 \EM.KBDAD1 \EM.KBDAD2 \EM.KBDAD3 \EM.KBDAD4 \EM.KBDAD5 \EM.REALUTILIN +\DLMOUSE.UP \LASTUSERACTION) CL:STRING> (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 SLEN2 SLEN1 OFFSET1) +PPROC (\HIGHEST.PRIORITY.QUEUE \TIMERQHEAD \PROCESSES) CL::GET-PS-FROM-ACCESSOR (CL::*PARSED-DEFSTRUCTS* +) MSGETBLOCKDEC (FILELST) RETDWIM1 (CLISPCHARS) CL:STRING>= (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 SLEN2 + OFFSET1) \DRAWCURVE.PRESS.LINE (SPRUCEPAPERLEFTMICAS SPRUCEPAPERRIGHTMICAS SPRUCEPAPERBOTTOMMICAS +SPRUCEPAPERTOPMICAS) CL:STRING/= (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 SLEN1 SLEN2 OFFSET1) +\FINDKEY.UFN (MYALINK \STACKHI WORDSPERCELL) \TEXTOPENF-SUBTREE (NoBits STREAM) CL:STRING-UPCASE (SLEN +) \CREATECELL (CDRCODING \LISTP) PPROC1 (\PSTAT.RUNNING) INTCHAR (\SYSTEMINTERRUPTS) NEWDEFC (SVFLG +*ERROR-OUTPUT*) CLISPCAR/CDR (ENDTAIL) GETWINDOWPROP (VALUE) CL::GET-PS-FROM-PREDICATE ( +CL::*PARSED-DEFSTRUCTS*) MSINTERPRETSET (MSBLIP FILELST MSDATABASELST) SETINTERRUPT (\CURRENTKEYACTION + \SYSTEMINTERRUPTS) WTFIX0 (FAULTPOS) GETINTERRUPT (\CURRENTKEYACTION \SYSTEMINTERRUPTS) \PRESSCURVE2 +(ResetSpaceCode MicasPerScan UBFLOAT3) \KEYACTION1 (IGNORE.TF LOCKSHIFT.TF NOLOCKSHIFT.TF EVENT.TF +CTRLDOWN.TF CTRLUP.TF DEADKEY.TF \NKEYS 1SHIFTDOWN.TF 1SHIFTUP.TF 2SHIFTDOWN.TF 2SHIFTUP.TF +LOCKDOWN.TF LOCKUP.TF LOCKTOGGLE.TF METADOWN.TF METAUP.TF FONTUP.TF FONTDOWN.TF FONTTOGGLE.TF +USERMODE1UP.TF USERMODE1DOWN.TF USERMODE1TOGGLE.TF USERMODE2UP.TF USERMODE2DOWN.TF USERMODE2TOGGLE.TF +USERMODE3UP.TF USERMODE3DOWN.TF USERMODE3TOGGLE.TF ALTGRUP.TF ALTGRDOWN.TF ALTGRTOGGLE.TF) +CL:UNREAD-CHAR (*STANDARD-INPUT*) PACKFILENAME.STRING (\FILENAME.SYNTAX) COMPILER::COMPILE-ONE-LAMBDA +(COMPILER::*NULL-CONTEXT*) CL::SUBTYPEP-TYPE-EXPAND (CL::*COMMON-LISP-BASE-TYPES*) \KEYNAMETONUMBER ( +\KEYNAMES) GRAPHBUTTONEVENTFN (LASTMOUSEBUTTONS LASTMOUSEX LASTMOUSEY) \RESTLIST.UFN (MYALINK \STACKHI + WORDSPERCELL) CLISPIFY2B (TAIL PARENT SUBPARENT CLISPTRANFLG CLISPCHARS LAMBDASPLST CLISPARRAY) +RECORDALLOCATIONS (USERRECLST) CL::CACHE-SETF-INFO (CL::*DEFSTRUCT-INFO-CACHE*) PFI.PASS.COMMENT ( +COMMENTFONT *STANDARD-INPUT* *STANDARD-OUTPUT* DEFAULTFONT) \MISCN.UFN (MYALINK) RCOMP3 (COUTFILE) +\TEDIT.DEFAULTS.CARET (TEDIT.DEFAULT.CHARLOOKS) SEDIT::CREATE-NEW-COMMENT (SEDIT::TYPE-COMMENT) +\RPLCONS (CDRCODING \CDR.MAXINDIRECT GCREF \LISTPDTD \CDR.ONPAGE) CL:WRITE-TO-STRING (*PRINT-ESCAPE* +*PRINT-RADIX* *PRINT-BASE* *PRINT-CIRCLE* *PRINT-PRETTY* *PRINT-LEVEL* *PRINT-LENGTH* *PRINT-CASE* +*PRINT-ARRAY* *PRINT-GENSYM*) PPROCREPAINTFN (LASTMOUSEBUTTONS) BCOMPL3 (COUTFILE) GETFILEINFO (NoBits + CR.EOLC LF.EOLC CRLF.EOLC ANY.EOLC) CL:USER-HOMEDIR-PATHNAME (:DSK LOGINHOST/DIR +*DEFAULT-PATHNAME-DEFAULTS*) CL::PRINT-STRUCTURE-INSTANCE (CL::%%DEFAULT-PRINT-FUNCTION) \ENVCALL.UFN +(\MiscFXP) CL:STRING-NOT-LESSP (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 SLEN2 OFFSET1) CH.DELETE.PROPERTY +(\CH.BROADCAST.SOCKET) CL:TYPE-OF (\DTDSpaceBase) WTFIXLOADEF (DWIMIFYING FASL.EXT COMPILE.EXT +DWIMWAIT DWIMKEYLST) \TYPECHECK.UFN (\DTDSpaceBase) COMPILER::ALPHA-LAMBDA-LIST (:REQUIRED) SEDIT::MAP-FONT + (DEFAULTFONT CLISPFONT ITALICFONT COMMENTFONT BOLDFONT) ICONW.PRINT-JUSTIFIED (BLACKSHADE WHITESHADE) + \STKSCAN (MYALINK \LITATOM \NEW-ATOM BITSPERBYTE IVARCODE \STACKHI PVARCODE FVARCODE) PUTDEFN ( +LOCKEDFNS OUTX) \MAIKO.IO-INTERRUPT (\MAIKO.IO-INTERRUPT-VECTOR \MAIKO.IO-INTERRUPT-FLAGS) PPROCEXTENT + (\PROCESSES) \PROCESS.MAKEFRAME (\MP.PROCERROR \MiscFXP \PSTAT.RUNNING) OPT.FRAMEVAR (CODE OPPOP +OPNIL EQCONSTFN) SET-CONNECTED-DIRECTORY-INTERACTIVELY (*WHO-LINE-DIRECTORIES* PROMPTWINDOW) +CL::CACHE-SLOT-INFO (CL::*DEFSTRUCT-INFO-CACHE*) NSNET.DISTANCE (\ETHERTIMEOUT) \READBINARYBITMAP ( +BYTESPERWORD) \LFMakeDirHole (BYTESPERPAGE) \UNBOXFLOAT3 (MYALINK \STACKSPACE WORDSPERCELL) +CL::BASE-SUBTYPEP (CL::*COMMON-LISP-BASE-TYPES* CL::*BASE-TYPE-LATTICE*) RESETKEYACTION ( +\DEFAULTKEYACTION) COMP.COND (COMPILE.CONTEXT CODE OPTIMIZATIONSOFF) \TYPEMASK.UFN (\MDSTypeTable) +COMPILER::COMPILE-AND-DUMP (:FUNCTION) FIND.PROCESS (\PROCESS.NAME.TABLE) CONTROL-T (PROMPTWINDOW +\CONTROL-T.DEPTH \MISCSTATS) COMPILER::ALPHA-LABELS (:NAME :SCOPE :LEXICAL :KIND :FUNCTION :BINDER) +TWODINSPECT.COPYBUTTONFN (INSPECTPRINTLEVEL) CL:WRITE-STRING (*STANDARD-OUTPUT*) \SELECTPROCESS ( +\PROCESSES INTERRUPTMENUFONT) CL:WRITE-LINE (*STANDARD-OUTPUT*) PFI.INDEX.BREAK (*STANDARD-OUTPUT*) +\EP.PUT.AUX (\FIXP) TTYIN.READ?=ARGS (null \?TAIL \BUFFER) \HANDLE.NS.ROUTING.INFO ( +\XROUTINGINFO.OP.RESPONSE \XIPOVLEN \NS.ROUTING.TABLE \ROUTING.TABLE.MASK \NS.ROUTING.TABLE.RADIUS +\NS.ROUTINGINFO.WORDS \RT.INFINITY WORDSPERCELL \RT.TIMEOUTINTERVAL) \PRINDATUM (\LITATOM \NEW-ATOM +\LISTP \SMALLP \FIXP *PRINT-BASE* *READTABLE* \FLOATP \FLOATFORMAT \STACKP) \DRAWLINE.UFN ( +BITMASKARRAY WORDMASK) DINFO.INVERT.NODE (BLACKSHADE WHITESHADE) PROCESS.STATUS.WINDOW (\PROCESSES +SCREENHEIGHT SELECTIONSHADE MAX.SMALLP) MSNEXTWORD (SENTENCE MSWORDS PARSED) CL:TERPRI ( +*STANDARD-OUTPUT*) \STORE.N.UFN (\STACKSPACE MYALINK WORDSPERCELL) UPDATEFILES (FILEPKGTYPES FILELST) +BRKDWNRESULTS1 (BRKDWNTOTLST) COMPILER::COPY-NODE-VAR-REF (:VARIABLE) \COPY.N.UFN (\STACKSPACE MYALINK + WORDSPERCELL) OPT.FRAMEDEL (CODE OPCOPY CL:LABELS OPNIL OPPOP FRAMES) SHADEITEM (WHITESHADE +MENUSUBITEMMARK) \PRINTBINARYBITMAP (BYTESPERWORD) GETDESCRIPTORS (\DTDSpaceBase) \LFMakeLeaderPage ( +DEFAULTFILETYPE lispFileVersion) \MAIKO.CONSOLE-LOG-PRINT (PROMPTWINDOW) CLISPATOMARE2 (TAIL PARENT) +\RETURN (MYALINK) \PFTransferPage (\MiscFXP) \CURVE2 (\TOPWDS \SCREENBITMAPS \CURSORDESTINATION +\EM.DISPINTERRUPT UBFLOAT3) \ARG0 (MYALINK \STACKSPACE) FIND.SYMBOL (; :INTERNAL :EXTERNAL :INHERITED) + CHECK/MENU/IMAGE (LASTSCREEN) MASTERSCOPEXEC (CLISPCHARRAY) EDIT4E1 (EDITQUIETFLG) CLISPATOMIS2 ( +CLISPLASTSUB) \MYARGCOUNT (MYALINK) ADDMENU (LASTMOUSEX LASTMOUSEY LASTSCREEN) \SETRECLAIMMIN ( +\TERM.OFD) XCL::%%DEFINE-TYPE-GETDEF (*DEFINITION-HASH-TABLE*) TWODINSPECT.DEFAULT.VALUECOMMANDFN (;) +AWAIT.EVENT (MAX.FIXP) \DRAWPOLYGON.IP (MICASPERPOINT DOSAVESIMPLEBODY { MAXSEGSPERTRAJECTORY }) +WIDTHIFWINDOW (WBorder) \FTP.CLEANUP (\FTP.IDLE.TIMEOUT \FTPCONNECTIONS) PRIN3 (*READTABLE* +PLVLFILEFLG *PRINT-LEVEL* *PRINT-LENGTH* *INTERLISP-PRIN1-CASE* *PRINT-CASE*) CL::%%SIN-FLOAT ( +CL::%%PI/2 CL::%%2PI CL:PI CL::%%SIN-EPSILON CL::%%SIN-PPOLY CL::%%SIN-QPOLY) ERROR! (MYALINK +\PROC.RESETME) CL:STRING-NOT-GREATERP (BASE1 TYPENUMBER1 BASE2 TYPENUMBER2 OFFSET1 SLEN2) +MONITOR.AWAIT.EVENT (MAX.FIXP) PRINT-CIRCLE-LOOKUP (*PRINT-CIRCLE-HASHTABLE*) +COMPILER::COPY-NODE-UNWIND-PROTECT (:STMT :CLEANUP) \MAIKO.ETHER-INTERRUPT (\MAIKO.10MB.NDB +\ETHERtopMonitor \ES.PENDING \10MBTYPE.TRANSLATIONS) \CLOSEF.PRESS (BITSPERWORD USERNAME) BCOMPL2 ( +GLOBALVARS RETFNS BLKLIBRARY NOLINKFNS LINKFNS DONTCOMPILEFNS SPECVARS LOCALVARS FNS BLOCKS) +\PRINT-USING-ADDRESS (*READTABLE*) RIGHTW.ADJUSTSELECTION (INSPECTPRINTLEVEL) \PROCESS.GO.TO.SLEEP ( +\PSTAT.WAITING \MP.PROCERROR \HIGHEST.PRIORITY.QUEUE \MP.STACKRELEASED MYALINK) DASHES (LL) +HEIGHTIFWINDOW (WBorder) \SETPRINTLEVEL (\TERM.OFD) CL::%%NSUBST-IF (CL::TREE-FORM) INTERRUPT ( +:CONDITION :FUNCTION) CURRENTINTERRUPTS (\CURRENTKEYACTION) \MAIKO.10MBTURNONETHER (\IOPAGE +\InterfacePage \#WDS.NSHOSTNUMBER) DO.INSERT.LINE (\DSP \DESCENT \RMARG \LMARG \TTPAGELENGTH +\CHARHEIGHT \BMARG) CL::%%COMPLEX-NSUBST (CL::TREE-FORM) XCL::%%DEFINE-TYPE-DELDEF ( +*DEFINITION-HASH-TABLE*) FW-INIT-MENUS (FW-Commands) COMPILE-IN-CORE (SYSSPECVARS FREEVARS) +COMPILER::ALPHA-IL-FUNCTION (COMPILER::*ENVIRONMENT* :FN :ARGS) MSPATHS4 (SEEN MSDATABASELST) +RESET.INTERRUPTS (\SYSTEMINTERRUPTS) DINFO.SHOWGRAPH (SCREENHEIGHT SCREENWIDTH) COMPILE1 (FREEVARS) +CL::%%SIMPLE-NSUBST (CL::TREE-FORM) \READPRINTERPORT.UFN (\MACHINETYPE \DANDELION) COMPILER::COPY-NODE-THROW + (:TAG :VALUE) REPLACEHASHKEY (HASHFILERDTBL) CL::\OPENSTREAM-WITH-DEFAULT ( +*DEFAULT-PATHNAME-DEFAULTS* LOADPARAMETERS) RIGHTW.BUTTONEVENTFN (INSPECTPRINTLEVEL LASTMOUSEBUTTONS) +FIND.PACKAGE (READSYS.PACKAGE.FROM.NAME \HASH.NULL.VALUE) XCL::%%DEFINE-TYPE-FILE-DEFINITIONS (:NAME +:TYPE) CL::%%NSUBST-IF-NOT (CL::TREE-FORM) DEFINEFONT.IP (MAKEVEC FINDFONT MICASPERPOINT MODIFYFONT) +COMP.GENFN (COMFN) OPT.CLEANFRAME (FRAMES) \GCRECLAIMCELL (\LISTP CDRCODING \CDR.INDIRECT GCREF +\CDR.MAXINDIRECT \FINALIZATION.FUNCTIONS \DTDSpaceBase) MSVERBED (LASTPARSED) +TWODINSPECT.DEFAULT.TITLECOMMANDFN (LASTMOUSEBUTTONS ;) MAKE-KEYWORD (*KEYWORD-PACKAGE*) SPAWN.MOUSE ( +PROCESS.MAXMOUSE MAX.SMALLP) \GCSCAN1 (\HTMAIN) PRINT-BITMAPS-NICELY (*PRINT-LENGTH*) \PSW.SELECTED ( +WHITESHADE SELECTIONSHADE) SPLIT89 (L SKORLST3) FB.MAKE.BROWSER.BUSY (FB.ITEMSELECTEDSHADE) \GCSCAN2 ( +\HTSTKBIT \HTMAIN) COMPILER::ALPHA-IF (:PRED COMPILER::*PREDICATE-CONTEXT* :THEN :ELSE) +\WRITEPRINTERPORT.UFN (\MACHINETYPE \DANDELION) CHARCODEP (\MAXNSCHAR) PRESSBITMAP (PRESSBITMAPREGION +MicasPerPoint) FASL::DUMMY-HANDLE (:STREAM :OUTPUT :STATE :BLOCK :HASH) FB.GREATEST.PREFIX ( +UPPERCASEARRAY) \RETCALL (\MiscFXP) CHANGE-TTY-PROCESS-INTERACTIVELY (\PROCESSES) DINFO.LAYOUTGRAPH ( +MENUFONT BLACKSHADE) HASTTYWINDOWP (\DEFAULTTTYDISPLAYSTREAM) BRKDWNCOMPILE2 (LOCALVARS SYSLOCALVARS) +MAKE-UNICODE-TRANSLATION-TABLES (N-TRANSLATION-SEGMENTS MISSINGCODE TRANSLATION-MASK TRANSLATION-SHIFT + MAX-ALIST-LENGTH TRANSLATION-SEGMENT-SIZE) DO?CMD.ERRORHANDLER (\?TAIL) OPT.FRAMELOCAL (SYSSPECVARS) +\POP.N.UFN (MYALINK \STACKSPACE) SEDIT::COPY-SELECTION-COMMENT (SEDIT::TYPE-STRING) NCREATE2 ( +\DTDSpaceBase GCREF) COMPILER::CONSTANT-EXPRESSION-P (:NONE) \FTP.RENAMEFILE (\NO.UNIMPLEMENTED +FTPDEBUGLOG) \ATOMCELL (\LITATOM \NEW-ATOM \DEF.HI \VAL.HI \PLIST.HI \PNAME.HI \NEWATOM-DEFOFFSET +\NEWATOM-VALOFFSET \NEWATOM-PLISTOFFSET \NEWATOM-PNAMEOFFSET \OLDATOMSPACE) FW-RE-INIT (FW-Font +WBorder FW-OFDList) CLISPATOMARE1 (CLISPLASTSUB) \NSFILING.GENERATEFILES (\LISP.TO.NSFILING.ATTRIBUTES + PROMPTWINDOW) CL::PROCESS-ACCESSORS (:ONLY) \VFMGet1 (getLevel \VFMlow \VFMhigh) MASTERSCOPE1 ( +MASTERSCOPEDATE LISPXHISTORY) \HANDLE.RAW.3TO10 (\EPT.3TO10 \TRANS.OP.REQUEST \10MBENCAPSULATION.WORDS + \TRANS.DATALENGTH \MY.NSADDRESS \TRANS.OP.RESPONSE \10MBTYPE.3TO10 XIPIGNORETYPES XIPTRACEFILE) +EDITFINDP (MAXLEVEL) MAKEHASHKEY (HASH.HEADER.SIZE HASHSCRATCHLST HASH.KEY.SIZE) HEADINGOP.IP ( +MAKESIMPLECO { HEADINGFONTNUMBER MICASPERINCH }) UNMARKASCHANGED (FILELST) FB.EXPUNGE?.MENU ( +FB.CLOSE.MENU.ITEMS FB.BROWSERFONT) FB.MERGE.DIRECTORIES (\FILENAME.SYNTAX) CLISPCAR/CDR2 (FAULTPOS) +\PUTBASEBYTE (BITSPERBYTE BYTESPERWORD) \LEAF.EVENTFN (\SS.ABORT) INSERTHASHKEY (HASHLOADFACTOR) +\PSWOP.SELECTED (PROCMENU LAMBDASPLST PROCESS.STATUS.WINDOW) OPENRTPSOCKET (\STATE.CLOSED +\LOCALPUPNETHOST \EVENT.OPEN \EVENT.OPENLISTENING \EVENT.OPENIMMEDIATE \RTP.DEFAULTTIMEOUT \STATE.OPEN + \STATE.ENDRECEIVED) \CLEAR.ROUTING.TABLE (\ROUTING.TABLE.TYPENUM \ROUTING.TABLE.MASK WORDSPERCELL) +PRINTROUTINGTABLE (\NS.ROUTING.TABLE \PUP.ROUTING.TABLE \ROUTING.TABLE.TYPENUM :CULPRIT :EXPECTED-TYPE + \ROUTING.TABLE.MASK WORDSPERCELL *NSADDRESS-FORMAT* :DECIMAL :HOPS) FB.FINISH.COMMAND ( +FB.ITEMUNSELECTEDSHADE) ATAN (UBFLOAT3 PI/2 CL:PI 2PI 180/PI) COMPILE.FILE.APPLY (COMPILED.FILE) +DIRECTORYNAME (\CONNECTED.DIRECTORY LOGINHOST/DIR) SEDIT::SHIFT-BLOCK (WHITESHADE) ADDSPELL1 ( +SPELLSTR1) KEYDOWNP (BITSPERBYTE \LASTKEYSTATE) ADDTOVAR (DFNFLG) LOOKUP-SYMBOL (;) KEYNUMBERP (\NKEYS +) SPYOBJ.DISPLAY (SPY.FONT) UNTRACE (XCL::*TRACED-FNS* :IN) XIPAPPEND.STRING (\XIPOVLEN BYTESPERWORD +\MAX.XIPDATALENGTH) PROCESS.BACKTRACE (PROCESS.STATUS.WINDOW PROCBACKTRACEHEIGHT BACKTRACEFONT) +CLIPBOARD-COPY-STREAM (CLIPBOARD-FORMAT) TTYINFOSTREAM (\DEFAULTTTYDISPLAYSTREAM PROMPTWINDOW) +UNMAKEHARDCOPYMODESTREAM (\DISPLAYIMAGEOPS) \ADDBASE (\FIXP \SMALLP \FLOATP MAX.SMALL.INTEGER +MAX.POS.HINUM) \UPDATE.PROCESS.WINDOW (\PROCESSES LIGHTGRAYSHADE PROCESS.STATUS.WINDOW) MSPATHS1 (SEEN + MSBLIP MSDATABASELST LL) LEAF.ASSURE.FINISHED (\ETHERTIMEOUT) \VAG2 (BITSPERBYTE) OPT.MERGEFRAMEP ( +MERGEFRAMETYPES SYSSPECVARS FRAMES FREEVARS MERGEFRAMEFLG) COMPILER::COPY-NODE-TAGBODY ( +COMPILER::*COPY-NODE-TABLE* :TAGS :STMTS) BAKTRACE (BREAKDELIMITER) MAKE-VECTOR ( +CL:ARRAY-TOTAL-SIZE-LIMIT) \DUMP.COURIERPROGRAMS (\COURIERPROGRAM PRETTYCOMFONT DEFAULTFONT) +COMPILER::ALPHA-FUNCTIONAL-FORM (COMPILER::*CONTEXT*) CREATETEXTUREFROMBITMAP (BITMASKARRAY) +EDITFERROR (EDITCOMS DWIMWAIT DUMMY-EDIT-FUNCTION-BODY) EXEC-FORMAT (*CURRENT-EVENT*) MOUSECONFIRM ( +PROMPTWINDOW MOUSECONFIRMCURSOR LASTMOUSEBUTTONS) DIRECTORY (FILEINFOTYPES DIRCOMMANDS \MACHINETYPE +\MAIKO ASKUSERTTBL) METASHIFT (\ORIGKEYACTIONS) MARKASCHANGED (MARKASCHANGEDFNS) \CHARWIDTH.PRESS ( +\CHARMASK) CL:ELT (:NAME :INDEX) \VFMGetInterval (\VFMvolumeHandle \VFMintervals treeDepth \VFMnullKey +) EDITF2 (LISPXHIST) \SLOWIPLUS2 (\FIXP \SMALLP \FLOATP MAX.POS.HINUM MAX.SMALL.INTEGER) EDITF ( +LASTWORD) \SLOWIDIFFERENCE (\FIXP \SMALLP \FLOATP MAX.SMALL.INTEGER MAX.POS.HINUM \SIGNBIT) +ATTACHEDWINDOWS (*ATTACHED-WINDOW-COMMAND-SYNONYMS*) COMPILER::COPY-NODE-SETQ (:VAR :VALUE) SHIFTDOWNP + (\LASTKEYSTATE) COMP.PUNT (EXP) \SLOWITIMES2 (\FIXP \SMALLP \FLOATP MAX.POS.HINUM MIN.FIXP +MAX.SMALL.INTEGER) OLD.FIND.SYMBOL (\MAXTHINCHAR \ORIGREADTABLE \AtomHashTable \ATOMSPACE \LITATOM +\NEW-ATOM) GETPROBE (PROBELST) \SLOWIQUOTIENT (\FIXP \SMALLP \FLOATP MAX.POS.HINUM MAX.SMALL.INTEGER +\SIGNBIT \OVERFLOW) MSPATHS2 (SEEN MSBLIP MSDATABASELST) DIRECTORYNAMEP (\CONNECTED.DIRECTORY) BRKDWN1 + (BRKDWNLST) DOWINDOWCOM (WindowMenuCommands) PUTHASHFILE (HASHTEXTCHAR) SEDIT:*INDENT-ALIST* ( +:VERTICAL :KEYWORD-ARG :HORIZONTAL :HORIZONTAL-ATOM :SQUASH :DATA :BINDING :BINDING-LIST :COND-CLAUSE +:LAMBDA-LIST) IREMAINDER (\FIXP \SMALLP \FLOATP MAX.POS.HINUM MAX.SMALL.INTEGER \SIGNBIT \OVERFLOW) +SYMBOL.PACKAGE (\PNPSPACE \OLDATOMSPACE \NEWATOM-PNAMEOFFSET *UNINTERNED-PACKAGE-INDEX* +READSYS.PACKAGE.FROM.INDEX) HOSTNAMEP (\FILEDEVICENAMES \FILEDEVICES) EDITDEF.FNS (*ERROR-OUTPUT*) +GETHASHKEY (HASHFILERDTBL HASH.HEADER.SIZE HASH.KEY.SIZE) COMPILER::ALPHA-GO (COMPILER::*TAGBODY-STACK* + :TAGBODY :TAG) XIPAPPEND.WORD (BYTESPERWORD \XIPOVLEN \MAX.XIPDATALENGTH) FW-RESET (FW-OFDList) +APPENDTOVAR (DFNFLG) SEDIT:GET-FORMAT (SEDIT::*FSPEC-TABLE*) GETHASHFILE (HASHTEXTCHAR) \SLOWLLSH1 ( +\FIXP \SMALLP \FLOATP) \BSP.PREPARE.INPUT (\PT.MARK \PT.AMARK \PUPOVLEN) SUBATOM (\PNAMELIMIT) +UNSAVEBLOCK? (FILELST DWIMWAIT) RECORDACCESS (USERRECLST) \SLOWLLSH8 (\FIXP \SMALLP \FLOATP) +\SPP.HANDLE.INPUT (\XIPT.SPP \XIPT.ERROR \XIPE.NOSOCKET \XIPOVLEN \SPPHEAD.LENGTH +\SPP.RETRANSMITQ.SIZE SPP.MIN.TIMEOUT SPP.USER.TIMEOUT) COMPILER::COPY-NODE-RETURN ( +COMPILER::*COPY-NODE-TABLE* :BLOCK :VALUE) COMP.AC (EXP DONOTHING) \SLOWLRSH1 (\FIXP \SMALLP \FLOATP) +TRACE (XCL::*TRACED-FNS*) CH.DELETE.ALIAS (\CH.BROADCAST.SOCKET) EDITDEFAULT1 (SPELLSTATS1) +CLISPATOM2D (TAIL CLISPARRAY TYP) \SLOWLRSH8 (\FIXP \SMALLP \FLOATP) SAVESET (DFNFLG UNDOSIDE0) <= ( +CL::%%<=) \VFMKillBuffer (\VFMbufferPool) EDITH (EDITRDTBL HISTSTR0 P.A.STATS) \SLOWLOGOR2 (\FIXP +\SMALLP \FLOATP) PUPNET.DISTANCE (\ETHERTIMEOUT) WINDOWADDFNPROP (LAMBDASPLST) +\NSFILING.PARSE.FILENAME (MAX.SMALLP) TB.BROWSER.BUSY (TB.CROSSCURSOR) \SLOWLOGAND2 (\FIXP \SMALLP +\FLOATP) \COURIER.GETDEF (\COURIERPROGRAM) COMPILER::ALPHA-FUNCTION (COMPILER::*CONTEXT* +COMPILER::*NULL-CONTEXT*) SEDIT::RECOMPUTE-FORMAT-VALUES (SEDIT::TYPE-LITATOM) %%SETELT (:NAME :INDEX) + SETUP.OFFICE.KEYBOARD (\DLIONOSDKEYACTIONS \DOVEOSDKEYACTIONS) UnixPrint (UnixPrinterName) +\SLOWLOGXOR2 (\FIXP \SMALLP \FLOATP) SETUP-WHOLINE-TIMER (*WHO-LINE*) FIND.START.OF.WORD (\ENDBUFFER +\MAXTHINCHAR \PRIMTERMSA WORDSEPR.TC \RDTBLSA) CL::%%SQRT-FLOAT (\EXPONENT.BIAS) +\FM.EDIT-UPDATEAFTERDELETE (WHITESHADE BITMAP BOXOFFSET ITEMWIDTH FONT WINDOW DISPLAYLEFT +DISPLAYBOTTOM MAXWIDTH) WRITE-UNICODE-INCLUDED (XCCS-SET-NAMES) LSH (MAX.FIXP) \SPP.INFO.HOOK (SPPCON) + \BSP.CLEANUP.INPUT (\PUPOVLEN MAX.SMALL.INTEGER) COMPILER::COPY-NODE-PROGV (:SYMS-EXPR :VALS-EXPR +:STMT) TWODINSPECT.SETELT (INSPECTPRINTLEVEL XCL:*EVAL-FUNCTION*) SYMBOL.PNAME (\PNAMELIMIT \PNPSPACE +\ATOM.HI \NEWATOM-PNAMEOFFSET) TTYIN.PRINTARGS (*PRINT-CASE* :UPCASE *READTABLE* :ALLOW-OTHER-KEYS +\CURSORCOL \LMARG) MAKETEDITFORM (TEDITSUPPORT TEDITSYSTEMDATE) \PFFindFileSize (MAX.FIXP) EDITRAN ( +EDITOPS) \MAIKO.INPUT.INTERRUPT (\ES.PENDING \10MBTYPE.TRANSLATIONS) \VFMGet (treeDepth \VFMnullKey +\VFMvolumeHandle \VFMmaxKey \VFMinterval) ADD/AND/DISPLAY/LINK (PROMPTWINDOW) OPT.FRAMEMERGE ( +MERGEFRAMEMAX OPPOP OPNIL) SEDIT:RESET-FORMATS (SEDIT::*FSPEC-TABLE*) ONEDINSPECT.REPAINTFN ( +INSPECTPRINTLEVEL) \DEFAULTSTATE.IP (CURRENTTRANS) EDITDEFAULT (EDITOPS HISTORYCOMS EDITCOMSA +EDITCOMSL EDITRDTBL COMS LPARKEY HISTSTR0) \TEDIT.WINDOW.OPS (LASTMOUSEBUTTONS \TEDIT.MAKESPLITCURSOR +\TEDIT.MOVESPLITCURSOR \TEDIT.UNSPLITCURSOR \TEDIT.SPLITCURSOR) SPYOBJ.HEIGHT (SPY.MAXLINES) ARCTAN2 ( +-PI CL:PI 180/PI) COMPILE.FILE.DEFINEQ (DONTCOMPILEFNS) COMPILER::ALPHA-FLET (COMPILER::*ENVIRONMENT*) + SEDIT::PAINT-TO-END-OF-LINE (WHITESHADE) \PAPERSIZE.IP (DEFAULTINTERPRESSMEDIUM KNOWN.MEDIA.SIZES +MICASPERMILLIMETER) EDITCOM (EDITRACEFN) TTSETCURSOR (\TTPAGELENGTH \CHARHEIGHT \BMARG \DSP) +\UNBOXFLOAT2 (MYALINK \STACKSPACE WORDSPERCELL) CL:ADJUST-ARRAY (CL:ARRAY-RANK-LIMIT +CL:ARRAY-TOTAL-SIZE-LIMIT) \MAP.ROUTING.TABLE (\ROUTING.TABLE.TYPENUM :CULPRIT :EXPECTED-TYPE +\ROUTING.TABLE.MASK WORDSPERCELL) CREATEMENUEDWINDOW (WindowTitleDisplayStream WBorder) UNSAVEFNS ( +MSFNTYPES RECOMPILEDEFAULT FILELST) CLISPCAR/CDR1 (VAR1) \UNBOXFLOAT1 (MYALINK \STACKSPACE +WORDSPERCELL) INSPECT/AS/RECORD (USERRECLST) \COURIER.PUTDEF (\COURIERPROGRAM DFNFLG) EDUP (LASTAIL +CLISPTRANFLG) \POPSTATE.IP (} SETXY) RANDACCESSP (\LINEBUF.OFD) CURSOR.INIT (ScreenBitMap) CLISPLOOKUP + (EXPR FAULTFN) BRKDWNSETUP (BRKDWNARGS BRKDWNLABELS) \LEAF.FLUSH.CACHE (:CACHE) ARCTAN (-PI/2 PI/2 +UBFLOAT3 180/PI) EDIT!UNDO (P.A.STATS UNDOLST) \SLOWIGREATERP (\FIXP \SMALLP \FLOATP \SIGNBIT) +\GETSTREAM (*STANDARD-INPUT* \DEFAULTLINEBUF \KEYBOARD.STREAM \LINEBUF.OFD *STANDARD-OUTPUT* \TERM.OFD +) CHANGERECORD (MSRECORDTRANFLG) EDITCOMA (USERMACROS EDITMACROS COM0 L0 EDITESTATS EDITRDTBL) +CLISPATOM2C (TYP TAIL) \SLOWFGREATERP (\SIGNBIT \FIXP MAX.POS.HINUM MAX.SMALL.INTEGER \SMALLP +\EXPONENT.BIAS \8BITS \MAX.EXPONENT \HIDDENBIT) COPYCHARS (CR.EOLC CRLF.EOLC LF.EOLC) +\MAIKO.10MBWATCHER (\MAXWATCHERGETS) EDITCOML (EDITMACROS EDITISTATS CLISPTRANFLG) \RTP.HANDLE.INPUT ( +\EVENT.TIMEOUT) SPYOBJ.IMAGEBOX (SPY.FONT) \INCHAR (LF.EOLC ANY.EOLC CR.EOLC CRLF.EOLC \DEFAULTINCCODE +) EDITCOM1 (LISPXHIST) RECORD.FIELD.VALUE (FIELDS.IN.CREATE USINGEXPR USINGTYPE) EQUAL (\FLOATP +\SMALLP \FIXP \IMAX.FLOAT \IMIN.FLOAT MAX.SMALLP \STACKP \COMPILED-CLOSURE) \SPP.RETRANSMIT.NEXT ( +\SPP.RETRANSMITQ.SIZE) WRITE-UNICODE-MAPPING-FILENAME (UNICODEDIRECTORIES) \CURVEEND ( +\CURSORDESTINATION \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS LEFTMINUSBRUSH RIGHTPLUS1 BOTTOMMINUSBRUSH + TOP DESTINATIONBASE OPERATION HEIGHTMINUS1 RASTERWIDTH LEFT BRUSHWIDTH NBITSRIGHTPLUS1 TOPMINUSBRUSH +DestinationBitMap BRUSHHEIGHT BRUSHBASE BRUSHRASTERWIDTH COLORBRUSHBASE NBITS DISPLAYDATA DASHLST) +EDITSAVE (DONTSAVEHISTORYCOMS COMPACTHISTORYCOMS EDITHISTORY HISTSTR0 HISTORYCOMS) \BOXIPLUS (\FIXP +\SMALLP \FLOATP MAX.SMALL.INTEGER) BRKDWNFBOXES (BDLST) BCOMPL1A (DFNFLG COUTFILE COMMENTFLG) +\BOXIDIFFERENCE (\FIXP \SMALLP \FLOATP MAX.SMALL.INTEGER) XIPAPPEND.BYTE (\XIPOVLEN \MAX.XIPDATALENGTH +) TEDIT.PROMPTPRINT (STREAM PROMPTWINDOW) UNDOEDITCOM1 (EDITUNDOSTATS) \HCPYMODEDSPPRINTCHAR ( +\MAXTHINCHAR \PRIMTERMSA INDICATE.CCE SIMULATE.CCE REAL.CCE ERASECHARCODE IGNORE.CCE) +SI::CANONICALIZE-ADVICE-SYMBOL (:IN) \COPYOPENFILE (\MACHINETYPE \MAIKO) XIPAPPEND.CELL (BYTESPERWORD +\XIPOVLEN BYTESPERCELL \MAX.XIPDATALENGTH) EDITSMASH1 (L ATM) FW-FORGET-CMD (FW-OFDList) +\LFDirectoryScrambled (PROMPTWINDOW) IDIFFERENCE (IDIFFERENCE) \MAIKO.10MBSENDPACKET (\MY.NSADDRESS +\10MBTYPE.TRANSLATIONS) ONEDINSPECT.BUTTONEVENTFN (INSPECTPRINTLEVEL LASTMOUSEBUTTONS) +\CREATEPIECEORSTREAM (NoBits DEFAULTFONT TEDIT.DEFAULT.FMTSPEC) BITMAPTEDITOBJ (BITMAPIMAGEFNS) +IGREATERP (IGREATERP) EDITSAVE1 (HISTSTR3) SHOWSHADE.IP (DOSAVESIMPLEBODY { MASKRECTANGLE }) +COMPILE.CHECK.ARGTYPE (ARGTYPE.VARS COUTFILE) CL::STEP-PRINT-VALUES (CL::*STEP-IO*) SEDIT::OUTPUT-STRING + (SEDIT::STRINGWIDTH) IQUOTIENT (IQUOTIENT) FIXPRINTIN (LISPXHIST) IDLE.BITMAP (DEFAULTFONT) +SYMBOL.VALUE (\ATOM.HI \NEWATOM-VALOFFSET) CLOSEF (\LINEBUF.OFD \TERM.OFD) BRKDWNFORM (BRKDWNTYPES) +EDIT2F (L CLISPTRANFLG) MSSEEKTYPE (MSWORDS SPELLING) GET-TWOD-DISPLAYW (MAX.SMALLP) PFI.SORT.INDICES +(*PFI-INDEX-ORDER*) EDIT4F1 (L CLISPTRANFLG C3) CL::%%LOG-FLOAT (\EXPONENT.BIAS CL::%%LOG-PPOLY +CL::%%LOG-QPOLY CL::%%LOG2) PRETTYFILEINDEX (*STANDARD-OUTPUT* *STANDARD-INPUT* EMPRESS#SIDES +*PFI-TYPES* *PFI-MAX-WASTED-LINES* :COMMON *COMMON-LISP-READ-ENVIRONMENT* :DONTPRINT :NONE :FIRSTPAGE +:PART) FB.COMPILECOMMAND (*DEFAULT-CLEANUP-COMPILER*) COMPILER::COPY-NODE-PROGN (:STMTS) EDIT1F ( +CLISPTRANFLG) COMP.BOOL (COMPILE.CONTEXT) \10MBSETUPRECEIVER (\TELERAIDIOCB \10MBPACKETLENGTH) +DIFFERENCE (DIFFERENCE) DEBUGGER (DBG::*IN-THE-DEBUGGER* \LINEBUF.OFD \TERM.OFD *STANDARD-INPUT* +*STANDARD-OUTPUT* \#DISPLAYLINES \PRIMTERMTABLE \PRIMTERMSA *NOT-YET-EVALUATED* +DBG::*DEBUGGER-TERMINAL-TABLE* AUTOBACKTRACEFLG :READ *DEBUGGER-COMMAND-TABLE* *EXEC-COMMAND-TABLE* +XCL:*DEBUGGER-PROMPT*) ARGTYPE.STATE (ARGTYPE.VARS) CL::STEP-PRINT (CL::*STEP-PRINT-LEVEL* +CL::*STEP-PRINT-LENGTH* CL::*STEP-IO* CL::*STEP-INDENTATION-LEVEL* CL::*STEP-MAX-INDENTATION*) +SEDIT::OUTPUT-SPACE (DEFAULTFONT) \BIGNUM.COMPARE (MIN.INTEGER MAX.INTEGER) EDITBELOW (C) +PFI.LOOKUP.NAME (*PFI-INDEX-ALIST*) EXEC-EVAL (LISPXHISTORY LISPXHIST) EDITSMASH (L EDITUNDOSAVES +CLISPTRANFLG) EDIT4F2 (EDITQUIETFLG) ADD-EXEC (XCL:*PROFILE*) HISTORYFIND1 (LST Z CHCONLST1) +TEDIT.PUT.PCTB (*TEDIT-FILE-READTABLE* MAX.SMALLP TEDIT.DEFAULT.CHARLOOKS LF.EOLC +TEDIT.DEFAULT.FMTSPEC) \HDCPYDISPLAYINIT (\DISPLAYIMAGEOPS) ENTER-DEBUGGER-P (HELPCLOCK HELPTIME) +MAKEFILE1 (:SAVE) \NSFILING.CONFLICTP (AppendBit WriteBit) BPNT (L) TAN (PI/180) COMPILER::COPY-NODE-OPCODES + (:BYTES) EDIT.RI (L) ONEDINSPECT.COPYBUTTONFN (INSPECTPRINTLEVEL) \SPP.PROBE (\SPPHEAD.CC.ACKNOWLEDGE +) OPT.DEFREFS (CL:LABELS) \UFStoOtherCopyMess (DEFAULTFILETYPELIST DEFAULTFILETYPE) TRANS.IP ( +TRANS.IPOP) CHANGEVAR (COMPILE.TIME.CONSTANTS) EDITBF1 (CLISPTRANFLG) MSSEEK-WORD (SPELLING) STKPOS ( +MYALINK) \VFMReadNext (\VFMbuffer \VFMold \VFMlow \VFMmaxKey nullVolumePage) \CURSORUP ( +\CURSORDESTINATION HARDCURSORWIDTH HARDCURSORHEIGHT ScreenBitMap \CURSORHOTSPOTX \CURSORHOTSPOTY) +SET-READTABLE-INTERACTIVELY (\READTABLEHASH) UNCOPYATOM (READSYS.PACKAGE.FROM.NAME) \TEDIT.CARET ( +BXCARET) CLISPBROADSCOPE1 (CLISPCONTEXT) COMPILER::ALPHA-EVAL-WHEN (COMPILER::*LITERALLY-NIL*) MSWORD? + (MSWORDS) \VFMGetBufferFor (\VFMvolumeHandle \VFMbufferSize) SORT.PUPHOSTS.BY.DISTANCE (\ETHERTIMEOUT +) EDITNTH (CLISPTRANFLG) UNBREAK (BROKENFNS :IN) CL::%%RANDOM (CL:MOST-POSITIVE-FIXNUM CL::%%RANDOM-SIZE +) \NSFILING.OPEN.HANDLE (\NSFILING.NULL.HANDLE) \FM.EDIT-MOVECARET (EDITITEM FONT LEFT MOUSEX WINDOW +BOXOFFSET STREAM) \TAN-FLOAT (CL:PI PI/2 -PI/4 -PI/2 PI/4 \TAN-EPSILON UBFLOAT3) \COURIER.DELDEF ( +\COURIERPROGRAM) COMPILER::COPY-NODE-MV-PROG1 (:STMTS) DEFAULTMAKENEWCOM (FILEPKGCOMSPLST) +COMP.PICOUNT (ARGVARS) \LOCATE.PUPNET (\PUP.READY \PUP.ROUTING.TABLE \ROUTING.TABLE.MASK \RT.INFINITY) + SEDIT::SUBNODE-CHANGED-LIST (SEDIT::TYPE-DOTLIST) \BIGNUM.QUOTIENT (MAX.INTEGER MIN.INTEGER) +LISPXFIND0 (TYPE LINE) \RTP.ACTION (\EVENT.OPEN \STATE.CLOSED \STATE.SENTRFC \EVENT.OPENLISTENING +\STATE.LISTENING \EVENT.OPENIMMEDIATE \STATE.OPEN \EVENT.CLOSE \STATE.ABORTED \STATE.ENDSENT +\STATE.ENDRECEIVED \STATE.DALLYING \EVENT.FORCECLOSE \EVENT.RFC WORDSPERPORT \EVENT.ABORT \EVENT.END +\EVENT.ENDREPLY \EVENT.TIMEOUT \RTP.DALLY.TIMEOUT \RFC.TIMEOUT) ADJUSTCURSORPOSITION (\CURSORHOTSPOTX +\CURSORDESTHEIGHT \CURSORHOTSPOTY) GET-TOPW (MAX.SMALLP) OPT.CODEFRAME (TOPFRAME) FIND.LINE ( +\FIRSTLINE) NU\TOTOPWDS (\SCREENBITMAPS) \CURSORPOSITION (\CURSORDESTHEIGHT \CURSORDESTWIDTH +\CURSORHOTSPOTX BITSPERWORD \CURSORHOTSPOTY \MACHINETYPE \DANDELION \DAYBREAK \MAIKO \EM.MOUSEX +\EM.MOUSEY \EM.CURSORX \EM.CURSORY) \SPP.NOT.RESPONDING (SPP.MAX.FAILED.PROBES SPP.INACTIVITY.TIMEOUT +SPP.USER.TIMEOUT PROMPTWINDOW) COMPILER::ALPHA-COMBINATION (COMPILER::*ENVIRONMENT* :FN COMPILER::*CONTEXT* + :ARGS :NOT-INLINE NLAMA NLAML) HRULE.DISPLAYFN (BLACKSHADE) WRITE-UNICODE-MAPPING (XCCS-SET-NAMES) +\PUTBASEFIXP.UFN (\SMALLP MASKWORD1'S \FIXP) CLIPBOARD-PASTE-STREAM (CLIPBOARD-FORMAT) BREAK-FUNCTION +(*ERROR-OUTPUT* :IN :NO-ERROR :NAME :UPCASE) \FLUSH.OPEN.STREAMS (AppendBit WriteBit) +COMPILER::COPY-NODE-MV-CALL (:FN :ARG-EXPRS) BCOMPL.BODY (SYSLOCALVARS COMPILE.EXT BCOMPL.SCRATCH +NLAMA NLAML LAMS) TWODINSPECT.SELECTCOLUMNPROP (INSPECTPRINTLEVEL) COPYATOM (*INTERLISP-PACKAGE* +*KEYWORD-PACKAGE* *LISP-PACKAGE* \SCRATCHSTRING \LITATOM \NEW-ATOM) MSSPLST (MSWORDS) \BIGNUM.LSH ( +MIN.INTEGER MAX.INTEGER) CURSORPOSITION (\CURSORHOTSPOTX \CURSORDESTHEIGHT \CURSORHOTSPOTY) +ONEDINSPECT.DEFAULT.VALUECOMMANDFN (;) GTHASHFILE (SYSHASHFILE) \RSH (\FIXP \SMALLP \FLOATP) +GETLOCALDEC (LAMBDASPLST COMMENTFLG FAULTFN) CURSORSCREEN (\CURRENTCURSOR) CL::STEP-FORM ( +CL::*STEP-INDENTATION-INCREMENT* CL::*STEP-INDENTATION-LEVEL*) NUMBERPAD.HELDFN (RNUMBER.ABORT.BITMAP +RNUMBER.CLEAR.BITMAP) FROM.SCREEN.BITMAP (PROMPTWINDOW) DEFMACRO-ARG-TEST (%%MIN-ARGS %%ARG-COUNT) +\TELERAIDBREAK (\TELERAIDBLOCK \STACKHI \MP.INVALIDADDR \MP.INVALIDVP \MP.MOB \MP.RESIDENT \EM.KBDAD0 +\EM.KBDAD1 \EM.KBDAD2 \EM.KBDAD3 \EM.UTILIN \EM.KBDAD4 \EM.KBDAD5) MAKEHARDCOPYMODESTREAM ( +\HCPYMODEDISPLAYIMAGEOPS.PRESS \HCPYMODEDISPLAYIMAGEOPS.INTERPRESS MICASPERPT) \TEDIT.SET.SEL.LOOKS ( +BLACKSHADE COPYSELSHADE COPYLOOKSSELSHADE EDITMOVESHADE) POSTSCRIPT.GETFONTID (GOLDEN.RATIO) +COMPILER::ALPHA-CATCH (:TAG :STMT) *WHO-LINE-COLOR* (:WHITE) CLOSERTPSOCKET (\RTP.DEFAULTTIMEOUT +\EVENT.CLOSE \STATE.CLOSED \STATE.ABORTED \EVENT.FORCECLOSE) EDIT.BITMAP.REAL (PROMPTWINDOW) +\MAIKO.10MBSTARTDRIVER (\RCLKSECOND \10MB.EXPECTED.RECEIVE.INTERVAL \ES.PENDING) %%FAST-COPY-BASE ( +PTRBLOCK.GCT) TRANSLATE.IP (TRANSLATE) EDITGETD (CLISPARRAY) \FILLINXIP (\EPT.XIP \XIPOVLEN +\MY.NSADDRESS) \TEDIT.CLOSEUPLINES (WHITESHADE) \CHANGECHARSET.HDCPYDISPLAY (MICASPERPT \MAXTHINCHAR) +\OPENLEAFCONNECTION (NONLEAFHOSTS \LEAF.NEVER.OPENED PROMPTWINDOW \SOCKET.LEAF \LEAFCONNECTIONLOCK +\FIXP \LEN.RESETLEAF \LEAFOP.RESET \PUPOVLEN \LF.ALLOWERRORS \LF.WANTANSWER \SS.OPENING \SS.OPEN +\ETHERTIMEOUT \LEAF.BROKEN.STATUS \LEAFOP.ERROR \PASSWORD.ERRORS \LEAF.IDLETIMEOUT \LEN.LEAFPARAMS +\LEAFOP.PARAMS) \TYPE.FROM.FILETYPE (FILING.TYPES) \10MBRAWENCAPSULATE (\10MBENCAPSULATION.WORDS +\InterfacePage) \LEAF.LOOKUPCACHE (\LEAF.MAXCACHE) CLISPIFYFNS (FILELST) \FILETYPE.FROM.TYPE ( +FILING.TYPES) CLISPATOM2A (DWIMIFYING CLISPCONTEXT NOFIXFNSLST NOFIXVARSLST TYP VAR1 FAULTPOS +GLOBALVARS SPELLINGS3 CLISPCHARS) \VFMLower (\VFMmaxKey) CURSOREXIT (LASTSCREEN LASTMOUSEX LASTMOUSEY +\MAINSCREEN \COLORSCREEN) \LOOKUPCOLORNAME (COLORNAMES) \ROUTE.PUP (\LOCALNDBS BROADCASTNSHOSTNUMBER) +CL::%%MAKE-RANDOM-ARRAY (CL::%%RANDOM-SIZE CL:MOST-POSITIVE-FIXNUM) \NSRANDOM.CREATE.STREAM ( +BYTESPERPAGE) LASTMOUSEY (LASTMOUSEY) ARCCOS (PI/2) CL::%%NOT-INTEGER-ERROR (:EXPECTED-TYPE :NAME +:VALUE) LASTMOUSEX (LASTMOUSEX) WRITE-UNICODE-MAPPING-HEADER (UNICODE-MAPPING-HEADER) +SI::ADVISE-CONTENTS (:IN) SEDIT::STRINGIFY-LIST (SEDIT::TYPE-DOTLIST) CLISPATOM1B (UNDOSIDE UNDOSIDE0 +CLISPARRAY) LISPXSTATE (LISPXHIST) \RTP.SHOW.FAILURE (PROMPTWINDOW) \MACPEEKCCODEFN (*MACTOXEROXMAP*) +DO.LF (\DSP) \PUPGATELISTENER (\PUPSOCKET.ROUTING :PROTOCOL \PUPROUTER.PROBETIMER \PUP.ROUTING.TABLE +\RT.AGEINTERVAL \PT.GATEWAYREQUEST \PUPROUTER.PROBEINTERVAL) SETTERMCHARS (EDITRDTBL) COMPILEMODE ( +COMPILEMODELST) \PUSHSTATE.IP (DOSAVESIMPLEBODY {) PRINTPUPDATA (\PUPOVLEN) +\TFBRAVO.PARSE.PROFILE.PARA (NEXTPARAPTR PROFILE.PARA.RDTBL PTSPERINCH) \SIN-FLOAT (PI/2 2PI CL:PI +\SIN-EPSILON UBFLOAT3) GETMOUSESTATE (\CURSORHOTSPOTX \CURSORDESTHEIGHT \CURSORHOTSPOTY \LASTKEYSTATE +\MOUSE.ALLBITS \CURSORSCREEN) HASHFILEP (SYSHASHFILELST) \ROUTE.XIP (\10MBLOCALNDB \3MBLOCALNDB +\EPT.XIP) COURIERTRACE (LASTMOUSEBUTTONS) SEDIT::FIND-OBJ (SEDIT:*WRAP-SEARCH*) \HDCPYBLTCHAR ( +IHALFMICASPERPT IMICASPERPT \CURSORDESTINATION \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS) TTSKIPSEPR ( +\ENDBUFFER) \10MBRAWTRANSMIT (\TELERAIDIOCB \10MB.MINPACKETLENGTH \ES.PENDING) \FM.EDIT-DELETE ( +BOXOFFSET DISPLAYBOTTOM FONT DISPLAYLEFT WINDOW LASTMOUSEBUTTONS LEFT BITMAP MAXWIDTH BLACKSHADE +STREAM) FW-CREATE-OFD-WINDOWS (FW-OFDList FW-Font) COMPILER::COPY-NODE-LITERAL (:VALUE) BEEPON ( +\MACHINETYPE \DANDELION \DAYBREAK \MAIKO) COMP.CPI (FRAME TOPFRAME ARGVARS LEVEL TOPLAB) +ONEDINSPECT.DEFAULT.TITLECOMMANDFN (LASTMOUSEBUTTONS ;) \TTW1 (\CURSORDESTINATION \EM.DISPINTERRUPT +\SCREENBITMAPS) CLISPDEC0 (COMMENTFLG) ARCSIN (PI/2 180/PI) COMPILER::ALPHA-ATOM (COMPILER::*ENVIRONMENT* +) SPYOBJ.SAVE (FILERDTBL) BEEPOFF (\MACHINETYPE \DANDELION \DAYBREAK \MAIKO) SHOWBITMAP1.IP ( +BITSPERCELL DOSAVESIMPLEBODY { SEQPACKEDPIXELVECTOR BYTESPERCELL MAKEPIXELARRAY MASKPIXEL }) +MSMARKCHANGED (MSFNTYPES) CLISPATOM2 (PARENT BRACKETCNT BRACKET CLISPCONTEXT CLISPIFWORDSPLST :RESPELL + CLISPINFIXSPLST SUBPARENT LASTWORD CLISPLASTSUB) CHANGESLICE (LISPXHIST) CL:CHAR-NAME (CHARACTERNAMES + CHARACTERSETNAMES) \HANDLE.PUP.ROUTING.INFO (\PT.GATEWAYRESPONSE \PUPOVLEN \PUP.ROUTING.TABLE +\ROUTING.TABLE.MASK \PUP.ROUTING.TABLE.RADIUS \PUP.ROUTINGINFO.WORDS \RT.INFINITY WORDSPERCELL +\RT.TIMEOUTINTERVAL) \FTP.OPEN.CONNECTION (PROMPTWINDOW \PUPSOCKET.FTP) \FTP.FIX.BROKEN.INPUT ( +PROMPTWINDOW \FTPCONNECTIONS) \FM.EDIT-WORDDELETE (BOXOFFSET \FM.EDIT-WORDDELIMCHARS FONT BITMAP LEFT +WINDOW STREAM) CHAT.LOGIN (PROMPTWINDOW CHAT.WAIT.TIME) CL:ERROR (HELPDEPTH *ERROR-OUTPUT* :CONDITION +:AT) SPYOBJ.GET (FILERDTBL SPYOBJ.IMAGEFNS) COMPILER::COPY-NODE-LAMBDA (:NAME :ARG-TYPE +:NO-SPREAD-NAME :ALLOW-OTHER-KEYS) \GETINTERNALCLOCK (\MISCSTATS WORDSPERCELL) COMP.NOSIDEEFFECTP ( +*NO-SIDE-EFFECT-FNS*) ETHERHOSTNAME (\PUP.READY \LOCALPUPNETHOST \PUPSOCKET.MISCSERVICES +\PT.ADDRLOOKUP \MAXETHERTRIES \PT.ADDRRESPONSE \PT.NAME/ADDRERROR PUPTRACEFILE) \LFPutDirectory ( +\LFdirectories) CL:CODE-CHAR (\SmallPosHi) CL::PROCESS-TYPE (:PREDICATE) SCAVENGEDSKDIRECTORY ( +\LFtopMonitor tLispDirectory tLispFile) \SLOWHDCPYBLTCHAR (\CURSORDESTINATION \EM.DISPINTERRUPT +\TOPWDS \SCREENBITMAPS) TWODINSPECT.SELECTROWPROP (INSPECTPRINTLEVEL) \LEAF.REQUESTPAGE ( +\LEAF.MAXLOOKAHEAD \LEAFOP.READ \OPCODE.SHIFT \LEAFMODE.DONTEXTEND BYTESPERPAGE \LEN.FILEREQUEST) +CURRENT-TTY-PACKAGE (*WHO-LINE-PACKAGE-NAME-CACHE*) COMPILER::ALPHA-BLOCK (:NAME :CONTEXT COMPILER::*CONTEXT* +) \SETDAYTIME0 (\MISCSTATS WORDSPERCELL MAX.SMALLP BITSPERWORD \MACHINETYPE \DANDELION +\DL.PROCESSORBUSY \DL.SETTOD) \VFMGenerateFileIDs (\VFMmonitor MAX.FIXP \VFMmaxID) +\PROCESS.RESET.TIMERS (\SYSTEMTIMERVARS \PROCESSES \PSTAT.WAITING) IDATE (TIME.ZONES) \CLEARXIPHEADER +(\XIPOVLEN) CL::%%EXPT-INTEGER (MIN.INTEGER MAX.INTEGER) \FM.EDIT-BACKUP (FONT WINDOW STREAM BITMAP +BOXOFFSET) \FTP.RECOGNIZEFILE (\NO.ILLEGAL.DIRECTORY FTPDEBUGLOG \NO.FILE.NOT.FOUND) COMP.ANONP ( +LOCALVARS SPECVARS LOCALFREEVARS) RAND (MAX.SMALLP) \SECONDSCLOCKGREATERP (\MISCSTATS WORDSPERCELL) +DASSEM.DSTOREFN (:4-BYTE *BC-MACRO-ENVIRONMENT* :3-BYTE) \BSP.HANDLE.INPUT (\PT.MARK \PT.DATA +\PT.AMARK \PT.ADATA \PT.ACK \PT.INTERRUPT \PT.INTERRUPTREPLY \PT.ERROR \EVENT.TIMEOUT) INITUFNTABLE ( +\UFNTable \UFNTableSize \OPCODES) \MACINCCODEFN (*MACTOXEROXMAP*) NONSYSPROPNAMES (SYSPROPS) +\CLOCKGREATERP (\MISCSTATS) WALK-FORM-INTERNAL (XCL::*WALK-FUNCTION* XCL::*ENVIRONMENT*) SMARTARGLIST +(COMPILERMACROPROPS) WRITE-STRING* (*STANDARD-OUTPUT*) CHECK-PARAMETER-NAME (CL:LAMBDA-LIST-KEYWORDS +:TEST) COMPILER::ALPHA-ARGUMENT-FORM (COMPILER::*ARGUMENT-CONTEXT*) REGIONONSCREEN (LASTMOUSEX +LASTMOUSEY SCREENWIDTH SCREENHEIGHT) CHARACTER.PRINT (*READTABLE*) \D0.STARTIO (MISC1) \10MBRAWRECEIVE + (\MACHINETYPE \DAYBREAK \TELERAIDIOCB DoveEther.outputIOCBType \ES.PENDING \ES.GOOD.PACKET) +\HCPYMODEDISPLAYINIT (\DISPLAYIMAGEOPS MICASPERINCH) MODERN-MENUBUTTONFN (LASTMOUSEBUTTONS +LASTKEYBOARD WindowTitleDisplayStream) \PUTFIXP (\FIXP \SMALLP \FLOATP) BREAKCONNECTION (\FILEDEVICES) + \PUTSWAPPEDFIXP (\FIXP \SMALLP \FLOATP) SWAPPEDCOND (L CLISPARRAY) PRINT-READER-ENVIRONMENT ( +*OLD-INTERLISP-READ-ENVIRONMENT* *INTERLISP-PACKAGE* FILERDTBL) SEDIT:SEDIT (SEDIT::BASIC-GAP :NAME +:TYPE :EXPRESSION) \STRINGWIDTH.HCPYDISPLAYAUX (*PRINT-LEVEL* *PRINT-LENGTH*) +\NSFILING.FILLIN.ATTRIBUTES (\NSFILING.USEFUL.ATTRIBUTE.TYPES) WORD.MATCHES.BUFFER (\MAXTHINCHAR +\RDTBLSA ESCAPE.RC MULTIPLE-ESCAPE.RC) XCL::IMPLICIT-KEY-REHASH (XCL::*DELETED-IMPLICIT-HASH-SLOT*) +CLISPATOM1A (PARENT) FMAX (MIN.FLOAT) \TITLEICONMINSIZE (MinWindowWidth) GETSCREENPOSITION ( +\CURSORSCREEN) CLUNARYMINUS? (CURRTAIL SUBPARENT TYPE-IN?) \VAMUpdateVAM (BITSPERPAGE BITSPERWORD) +SETY.IP (SETYREL SETXY) \INSERT.FIRST.PIECE (DEFAULTFONT TEDIT.DEFAULT.FMTSPEC) \GS.INITBUF (\GS.BUF) +\BACKCCODE (\DEFAULTBACKCCODE) \VECPUT (SPRUCEPAPERBOTTOMSCANS SPRUCEPAPERTOPSCANS +SPRUCEPAPERLEFTSCANS SPRUCEPAPERRIGHTSCANS MicasPerScan) EDITTOGGLELABEL (PROMPTWINDOW) \INCCODE ( +\DEFAULTINCCODE) FMIN (MAX.FLOAT) LOAD? (LOADEDFILELST COMPILE.EXT) \COURIER.ATTENTIONFN ( +\SPPDSTYPE.BULKDATA WriteBit AppendBit PROMPTWINDOW) GETHASH (\HASH.NULL.VALUE) SCALE/TONODES ( +ScalableLinkParameters) SI::ADVICE-HASDEF (SI::*ADVICE-HASH-TABLE*) PFI.CENTER.PRINT (BOLDFONT +*STANDARD-OUTPUT* DEFAULTFONT) RECLISPLOOKUP (LISPXFNS) MAKE-NETWORK-TRACE-WINDOW (LASTMOUSEBUTTONS) +HRULE.CREATE (HRULE.IMAGEFNS HRULE.DEFAULT.WIDTH TEXTOBJ) \PEEKCCODE (LF.EOLC ANY.EOLC CR.EOLC +CRLF.EOLC \DEFAULTPEEKCCODE) DUMPDATABASE1 (DUMPTABLE) CLISPRECORD (EXPR FAULTFN) +\INSPECTW.REDISPLAYPROP (INSPECTPRINTLEVEL) PREVWORD (\ARROW \MAXTHINCHAR \PRIMTERMSA WORDSEPR.TC +\RDTBLSA) MSCOMMAND (LASTPARSED) CHAT.CLOSE (CHATWINDOW HIGHLIGHTSHADE) \FM.MENUHANDLER (MENUHELDWAIT +PROMPTWINDOW LASTMOUSEBUTTONS) FW-FILTERED-FILE? (FW-Filters) ADD.BORDER.TO.BITMAP (WHITESHADE) +COMPILER::COPY-NODE-IF (:PRED :THEN :ELSE) IMAX (MIN.INTEGER) COMP.LINKCALLP (NOLINKFNS BLKDEFS +BLKLIBRARY LINKFNS) VALUEOF (LISPXHISTORY) OPT.RETPOP (TOPFRAME) TEDIT.SET.SEL.LOOKS (BLACKSHADE +COPYSELSHADE COPYLOOKSSELSHADE EDITMOVESHADE) IMIN (MAX.INTEGER) SI::ADVICE-DELDEF ( +SI::*ADVICE-HASH-TABLE*) PFI.CONDENSE.INDEX (*PFI-FILTERS* UPPERCASEARRAY) APPENDNUMBER.IP (SEQINTEGER +) PRINT-LOADED-FILE-INFORMATION (LOADEDFILELST) CLBINARYMINUS? (TAIL PARENT) GETBOXSCREENPOSITION ( +\CURSORSCREEN) READATABASE (MSDATABASELST MSCHANGEDARRAY) SETYREL.IP (SETYREL) \NSFILING.HANDLE.ERROR +(PROMPTWINDOW UPPERCASEARRAY :PATHNAME) MENUBUTTONFN (LASTMOUSEBUTTONS) SEDIT::REPLACE-CHARS ( +*READTABLE* SEDIT::TYPE-STRING) MAX (MIN.INTEGER) ADJUSTLINE (TTYJUSTLENGTH \RMARG \CHARWIDTH \LMARG +\ARROW \CURSORCOL) \LFGetDirectory (\LFdirectories) BRKDWNRESULTS (BRKDWNTOTLST BRKDWNLST BRKDWNFLTFMT + BRKDWNLABELS BRKDWNTYPES) \UPDATE.PBT.RASTERWIDTHS (\MDSIncrement \VP.DISPLAY SCREENWIDTH) +COMPILER::COPY-NODE-GO (COMPILER::*COPY-NODE-TABLE* :TAGBODY :TAG) MIN (MAX.INTEGER) COMP.CLEANFNOP ( +CLEANFNTEST) \MACOUTCHARFN (*XEROXTOMACMAP*) CONSFN (DECLST) OPT.RETFIND (OPRETURN) \PAGED.INCFILEPTR +(BYTESPERPAGE) FILL/GRAPHNODE/LABEL (BLACKSHADE WHITESHADE) FW-SORT-FN (FW-Anchor FW-SortFn) +FIND.NEXT.WORD (\ARROW \MAXTHINCHAR \PRIMTERMSA WORDSEPR.TC \RDTBLSA) SCALE/GRAPHNODE/BORDER ( +NODEBORDERWIDTH) \LEAF.DEVICEP (UPPERCASEARRAY \MACHINETYPE \MAIKO \FTPFDEV) FINDFIELDUSAGE ( +FIELDS.IN.CREATE) SEDIT::SETUP-WINDOW-CONTEXT-DEPENDENCIES (:ChangedStructure? :package *PACKAGE* +:name) \10MB.CREATENDB (\10MBTYPE.PUP \EPT.PUP \10MBTYPE.3TO10 \EPT.3TO10 \MACHINETYPE \DOLPHIN) +FORMAT-EXPONENT-MARKER (*READ-DEFAULT-FLOAT-FORMAT*) \LEAF.DELETEFILE (\LEAFOP.DELETE \OPCODE.SHIFT +\LEN.CLOSEREQUEST) SEDIT::MAKE-FUNCTION-PROTOTYPE (SEDIT::ARGS-GAP SEDIT::BODY-GAP) EDITCOLUMN ( +\LASTCHAR \CURSORCOL) FIND.CHAT.PROTOCOL (CHAT.PROTOCOLTYPES) FQUOTIENT (FQUOTIENT) \TELERAIDEXIT ( +\TELERAIDBLOCK) DIRECTORY.MATCH1 (UPPERCASEARRAY \MAXTHINCHAR) COMPILER::COPY-NODE-CATCH (:TAG :STMT) +FDIFFERENCE (FDIFFERENCE) COMP.CLEANFNP (CLEANFNTEST) CLRPLNODE (UNDOSIDE UNDOSIDE0) +FW-CREATE-OFD-LIST (FW-OpenFiles) FGREATERP (FGREATERP) SETXY.IP (SETXY) \CANONICAL.HOSTNAME ( +\HOSTNAMES) UNSET (SPELLINGS3) WRITE (*STANDARD-OUTPUT* *PRINT-ESCAPE* *PRINT-RADIX* *PRINT-BASE* +*PRINT-LEVEL* *PRINT-LENGTH* *PRINT-CASE* *PRINT-GENSYM* *PRINT-ARRAY* *PRINT-PRETTY* *PRINT-CIRCLE*) +FABS (UBFLOAT1) LOCALVARS (SYSSPECVARS) OPT.RETOPT (CODE) \BOXFPLUSDIF (\FIXP MAX.POS.HINUM +MAX.SMALL.INTEGER \SMALLP \EXPONENT.BIAS \8BITS \SIGNBIT \MAX.EXPONENT \HIDDENBIT) TTYIN.BALANCE ( +\BUFFER \ENDBUFFER \MAXTHINCHAR \RDTBLSA RIGHTBRACKET.RC \CURSOR) \LFPurgeDirectory (tLispDirectory) +\BOXFTIMES2 (\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER \SMALLP \EXPONENT.BIAS \8BITS \SIGNBIT +\MAX.EXPONENT \HIDDENBIT) SI::ADVICE-PUTDEF (SI::*ADVICE-HASH-TABLE* :BEFORE :AFTER :AROUND) +PFI.PRINT.INDICES (*STANDARD-OUTPUT*) TTLASTLINE (\FIRSTLINE) \MOVEBYTES (BYTESPERWORD) \BOXFQUOTIENT +(\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER \SMALLP \EXPONENT.BIAS \8BITS \SIGNBIT \MAX.EXPONENT \HIDDENBIT + \OVERFLOW) \TELEBLTCURSOR (\EM.CURSORBITMAP \#WORDS.CURSOR \MACHINETYPE \DAYBREAK) \LFOpenOldFile ( +\LFdevice BYTESPERPAGE) \HDCPYDISPLAY.FIX.YPOS (MICASPERPT) SEDIT::SETUP-WINDOW-AND-PROCESS ( +SEDIT::TERMINAL-TABLE \CURRENTKEYACTION PROMPTWINDOW) COMPILER::COPY-NODE-CALL (:FN :ARGS) +SEDIT::SETUP-PROFILE (*PRINT-BASE*) \LFDirectoryP (tLispDirectory lispFileVersion MAX.SMALLP) CCCSCAN +(\AtomHI BITSPERBYTE) \CENTICLOCK (\CENTICLOCKBOX WORDSPERCELL \RCLKMILLISECOND) RPTPUT (HPFINALCHAR) +SEDIT::PARSE--STRING (SEDIT::TYPE-STRING) MARK/GRAPH/NODE (BORDER.FOR.MARKING LABELSHADE.FOR.MARKING) +COMPILER::EFFECTS-ANALYZE-VAR-REF (:NONE) VALUOF (LISPXHISTORY) \STRINGWIDTH.HDCPYDISPLAY ( +IHALFMICASPERPT IMICASPERPT) \FLOAT (\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER \EXPONENT.BIAS \SMALLP +:EXPECTED-TYPE :NAME :VALUE :MESSAGE) \GETSPP (SPP.USER.TIMEOUT) \LEAF.GETFILE (\LEN.OPENREQUEST +\LEAFOP.OPEN \LEAF.READBIT \LEAF.WRITEBIT \LEAF.EXTENDBIT \LEAF.DEFAULT.HIGHEST \LEAF.CREATEBIT +\LEAF.DEFAULT.NEXT \LEAF.DEFAULT.LOWEST \LEAF.EXPLICIT.ANY \LEAF.GOODSTATUS \PASSWORD.ERRORS +\CONNECT.PASSWORD.ERRORS \IFSERROR.INVALID.DIRECTORY \IFSERROR.MALFORMED \LEAF.BROKEN.STATUS +\IFSERROR.PROTECTION \IFSERROR.FILE.NOT.FOUND) \PFPilotVolumeP (nonPilotVolume) \MAKEFLOAT (\SIGNBIT +MAX.POS.HINUM \UNDERFLOW \EXPONENT.BIAS \8BITS MAX.SMALL.INTEGER \HIDDENBIT \MAX.HI.FRAC \MAX.EXPONENT + \OVERFLOW) SI::ADVICE-GETDEF (SI::*ADVICE-HASH-TABLE*) CL:FIND-PACKAGE (*PACKAGE-FROM-NAME*) +STOPSCAN? (BRACKETCNT BRACKET) FW-OFD-EXISTS? (FW-OFDList) %%CML-TYPE-TO-TYPENUMBER ( +%%FAT-CHAR-TYPENUMBER) FILEGETDEF.MACROS (MACROPROPS) CLISPIF0 (LISPXHIST COMMENTFLG) +\CANONICALIZE.PUP.HOSTNAME (FIXSPELLREL) AT.END.OF.TEXT (\ENDBUFFER) BREAKDOWN (BDLST BRKDWNLENGTH +BDSINK) MB.SHOWSELFN (BLACKSHADE) FIXSPELL (DWIM.GIVE.UP.TIME DWIM.GIVE.UP.INTERVAL FIXSPELLREL +SPELLINGS1 SPELLINGS2 SPELLINGS3 LASTWORD LISPXHIST SPELLSTR1) SETUPTIMER (\RCLKMILLISECOND +\RCLKSECOND) \LOAD-STREAM (*PACKAGE* FILERDTBL DFNFLG BUILDMAPFLG ADDSPELLFLG LISPXHIST +*OLD-INTERLISP-READ-ENVIRONMENT* FASL:SIGNATURE) \TEDIT.REFRESH.SHOWSEL (TEDIT.SELECTION +TEDIT.SHIFTEDSELECTION TEDIT.MOVESELECTION TEDIT.DELETESELECTION TEDIT.COPYLOOKSSELECTION) +FILEWATCHPROP (FW-Properties) APPENDLARGEVECTOR.IP (SEQLARGEVECTOR) SEDIT::CREATE-QUOTED-GAP ( +SEDIT::TYPE-QUOTE SEDIT::QUOTE-WRAPPER-LIST) CLISPATOM0 (LISPXHIST WTFIXCHCONLST WTFIXCHCONLST1) +\VFMPutNext (\VFMold \VFMbuffer) SETX.IP (SETXREL SETXY) FW-LOOP (FW-Interval) DWIMDEF (DWIMIFYCOMPFLG + CLISPIFYPRETTYFLG) SETXYREL.IP (SETXYREL) TTNTH (\ARROW) \BRUSHBITMAP (\BrushAList) \TELERAIDENTRY ( +\TELERAIDBLOCK \EM.CURSORBITMAP \#WORDS.CURSOR \TELERAIDPACKET) TTNLEFT (\ARROW) +COMPILER::META-CALL-LAMBDA-SUBSTITUTE (:LEXICAL) \TEDIT.WORD.BOUND (TEDIT.WORDBOUND.READTABLE +\MAXTHINCHAR) \INFINITY (\MAX.EXPONENT \MAX.HI.FRAC) TIMEREXPIRED? (\TIMEREXPIRED.BOX) FIXFIELDORDER ( +BINDINGS) NTHTOPLEVELELT (MAXINSPECTCDRLEVEL) SETCORNER (UpperRightCursor LowerRightCursor +UpperLeftCursor LowerLeftCursor) EDITTOGGLEBORDER (PROMPTWINDOW) LAYOUTLATTICE (DEFAULTFONT) +DUMPDATABASE (MSDATABASELST NODUMPRELATIONS) LOAD (LOADOPTIONS LOADPARAMETERS) USEREXEC (LISPXHISTORY) + HASDEF (MACROPROPS LISPXMACROS LISPXHISTORYMACROS USERMACROS FILEPKGCOMSPLST FILEPKGTYPES) TIME.UNTIL + (\TIMEREXPIRED.BOX) FIXEDITDATE (LAMBDASPLST COMMENTFLG) SCALEPAGEUNITS (TEDIT.PAPER.SIZES) \ARGPTR ( +MYALINK) IMAGESTREAMP (\TERM.OFD *STANDARD-OUTPUT*) SETARG (\STACKSPACE) \UPDATE.EXTENT.IMAGE ( +BLACKSHADE SCROLLBARSHADE) DELDEF (MACROPROPS LISPXMACROS LISPXHISTORYMACROS) \ARG (\STACKSPACE) +CCCSUBFN? (OLDREF) FNS.PUTDEF (LAMBDASPLST) \SLOWRETURN (MYALINK) \SETARG (\STACKSPACE) STKNTH ( +MYALINK) UNSAFE.TO.MODIFY (UNSAFE.TO.MODIFY.FNS DWIMWAIT) MSSEEKPHRASE (SEEKING CONJUNCTABLE) +COMPILER::CONSTRUCT-LIST (COMPILER::*LITERALLY-NIL* :FN :ARGS) TEDITCHAT.MENUFN (LASTMOUSEBUTTONS +TEDITCHAT.MENUITEMS) \FM.WINDOWENTRYFN (LASTMOUSEBUTTONS) EDITV (LASTWORD) \LFCreateFile (tLispFile +\LFdevice \LFrunSize) COMPILER::COPY-NODE-BLOCK (:NAME COMPILER::*COPY-NODE-TABLE*) +SEDIT::SETUP-NEW-CONTEXT (SEDIT::EDITOR-NAME) SETSTKNAME (\STACKHI) U/L-CASE (\ARROW) SETTAIL? ( +\BUFFER \ENDBUFFER \CURSOR \ARROW \CURSORCOL) \TELERAIDSEND (\PUPSOC.TELERAID \NULLCHECKSUM +\3MBENCAPSULATION.WORDS) \COPYFNHEADER (WORDSPERQUAD GCREF) FILEMAP (FILECREATEDLST) EDITP (USERWORDS) + PRINTPACKETDATA (BYTESPERWORD) CL:GET-DISPATCH-MACRO-CHARACTER (*READTABLE*) SEDIT::PARSE--LITATOM ( +SEDIT::TYPE-LITATOM) STKSCAN (MYALINK) DINFO.UPDATE.FMENU (FASSOC) RPTEND (RPTCNT RPTLAST HPFINALCHAR) + OPENIMAGESTREAM (DEFAULTPRINTINGHOST IMAGESTREAMTYPES PRINTFILETYPES) CREATEWFROMIMAGE ( +MinWindowWidth) CL:SET-SYNTAX-FROM-CHAR (*READTABLE* CMLRDTBL) GET-ONED-DISPLAYW (MAX.SMALLP) +\FRAMESCAN (IVARCODE PVARCODE \STACKHI FVARCODE) INSIDE? (LASTMOUSEX LASTMOUSEY) MSSETREP (LASTPARSED +SPELLING) COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS (COMPILER::*LITERALLY-NIL*) SEDIT::COMPLETE ( +:CLOSE :ABORT :CLOSE-ON-COMPLETION :SHRINK :DONE) \LFGetStreamForFile (\LFdevice :PATHNAME tLispFile +MAX.SMALLP PROMPTWINDOW) PRINTERPROP (PRINTERTYPES) CL:GET-MACRO-CHARACTER (*READTABLE*) +\LFMakeVolumeDirectory (tLispDirectory directorySize) OPT.COMMONBACK (FRAME) PUTFILEMAP ( +*FILEMAP-HASH*) SHRIEKER (NCONCLKUP NCONC1LKUP) PRINTERTYPE (PRINTERTYPES DEFAULTPRINTERTYPE +DEFAULTPRINTINGHOST) \VAMEnoughSpace (tVolumeFileMap) SETSPACE.IP (SPACE) ADDSPELL (%#USERWORDS +%#SPELLINGS2 %#SPELLINGS3) GETDEFFROMFILE (FILELST) FW-CREATE-OFD (FW-Font) FLOATP.TO.BCPL ( +MAX.SMALL.INTEGER) XCL::UNDOABLY-SET-SYMBOL (\STACKHI) RESUME (MYALINK) OPT.JUMPREV (OPPOP OPCOPY +VCONDITIONALS CONDITIONALS OPNIL) DRAWGRAYBOX (\SOFTCURSORUPP \EM.DISPINTERRUPT) %%ONED-ARRAY-P ( +%%ONED-ARRAY) CL:SET-MACRO-CHARACTER (*READTABLE*) PRINTFILETYPE.FROM.EXTENSION (PRINTFILETYPES) +\RESUME (MYALINK) \DO-DEFINE-FILE-INFO (*INTERLISP-PACKAGE* FILERDTBL :XCCS :PACKAGE :READTABLE :BASE +:FORMAT) EXEC-READ-LINE (*READTABLE*) GETDEFSAVED (SAVEDDEFS) BCPL.TO.FLOATP (MAX.SMALL.INTEGER) +ADDFILE (FILEPKGTYPES USERWORDS) MOVEBOX (\SOFTCURSORUPP \EM.DISPINTERRUPT) %%GENERAL-ARRAY-P ( +%%GENERAL-ARRAY) CHAT.BUTTONFN (LASTMOUSEBUTTONS) MSVERBTYPE (MSWORDS) SEDIT::OPEN-LITATOM ( +SEDIT::TYPE-STRING) UPDATEFILEMAP (DFNFLG) HPRINTEND (HPFORWRDCDRCHR HPFORWRDCHR HPFINALCHAR) +%%TWOD-ARRAY-P (%%TWOD-ARRAY) \TEDIT.LOOKS.UPDATE (LOOKS LMInvisibleRun ASCENT DESCENT DEVICE +LMLooksChange) SETXREL.IP (SETXREL) COMP.STBIND (CODE) \SPREADFRAMEP (\STACKSPACE) SETNTHTOPLEVELELT ( +MAXINSPECTCDRLEVEL) PUTPUPSTRING (\PUPOVLEN) DINFO.UPDATE.MENU.DISPLAY (\DINFO.MAX.MENU.LEN MENUFONT) +\INTERPFRAMENT (\STACKHI) CL:SET-DISPATCH-MACRO-CHARACTER (*READTABLE*) SHOWSHADEDITEMS ( +MENUSUBITEMMARK) \SENDLEAF (\LF.ALLOWERRORS \LF.WANTANSWER \PUPOVLEN \ETHERTIMEOUT \LEAF.BROKEN.STATUS + \LEAFOP.ERROR \LEAF.GOODSTATUS) SETSTKARG (IVARCODE PVARCODE \STACKHI) SKIP/ZAP (\CURSOR \ARROW) +\FILLPOLYGON.IP (DOSAVESIMPLEBODY { MAKEOUTLINE MAKEOUTLINEODD MASKFILL }) COMPILER::META-CALL-LAMBDA +(:SPECIAL) STKARGNAME (\AtomHI IVARCODE \STACKHI PVARCODE) \CML-LOAD (CMLRDTBL) GREET (PREGREETFORMS +POSTGREETFORMS) SI::INSERT-ADVICE-FORM (:FIRST :LAST) SETSTKARGNAME (\AtomHI IVARCODE PVARCODE +\LITATOM \NEW-ATOM) MB.DEFAULTBUTTON.ACTIONFN (TEDIT.EXPANDED.PAGEMENU) \TEDIT.TRY.ABBREV ( +TEDIT.ABBREVS) COMPILER::META-EVAL-VAR-REF (:EFFECT COMPILER::*LITERALLY-NIL*) CL:VECTOR-PUSH-EXTEND ( +*DEFAULT-PUSH-EXTENSION-SIZE*) \POSTSCRIPT.ACCENTPAIR (ACCENT) LISPXPUT (LISPXHISTORY) +%%DEFPRINT-ARRAY (*READTABLE*) LISPXEVAL (LISPXHISTORY) PRETTYDEF (%#RPARS +*OLD-INTERLISP-READ-ENVIRONMENT* *NEW-INTERLISP-MAKEFILE-ENVIRONMENT* *DEFAULT-MAKEFILE-ENVIRONMENT* +:FORMAT) COMPILER::EFFECTS-ANALYZE-THROW (:ANY) OPT.LABELNTHPR (FRAME) FILEPKGCHANGES (FILEPKGTYPES) +HPRINT1 (HPRINTHASHARRAY HPFILLSTRING HPFILLCHAR HPRINTMACROS HPBAKCHAR HPFINALCHAR \MAXTHINCHAR) +CL:MAKE-DISPATCH-MACRO-CHARACTER (*READTABLE*) TTECHO.TO.FILE (\FIRSTLINE OPTIONS \PROMPT2 \ENDBUFFER) + LISPXREADBUF (HISTSTR0 HISTSTR3 HISTSTR2) %%DEFPRINT-VECTOR (*READTABLE*) \HDCPYDISPLAY.FIX.XPOS ( +MICASPERPT) %%DEFPRINT-GENERIC-ARRAY (*READTABLE*) \IBMPEEKCCODEFN (*IBMTOXEROXMAP*) PRINTCOPYRIGHT ( +DWIMWAIT COPYRIGHTOWNERS DEFAULTCOPYRIGHTOWNER DEFAULTCOPYRIGHTKEYLST) SI::SET-ADVICE-MIDDLE-MAN ( +SI::*ADVICE-HASH-TABLE*) %%DEFPRINT-STRING (*READTABLE*) %%DEFPRINT-BITVECTOR (*READTABLE*) +PRINTCOPYRIGHT1 (*READTABLE*) HASH-B (*READTABLE*) RESHADEITEM (BLACKSHADE) CHECKDEFS ( +RECORDEXPRESSION) FIXR (\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER \SMALLP \EXPONENT.BIAS \8BITS \SIGNBIT +\MAX.EXPONENT \HIDDENBIT \OVERFLOW MAX.FIXP MIN.FIXP) \FM.COLLECTNWAYS (\FM.GROUPSPEC) SAVECOPYRIGHT ( +COPYRIGHTFLG) HASH-BACKSLASH (CL:CHAR-FONT-LIMIT) READFROMBUF (\ARROW \CURSOR EOLCHARCODE) FLTSTR ( +\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER \SMALLP \EXPONENT.BIAS \8BITS \SIGNBIT \MAX.EXPONENT \HIDDENBIT) + \TELERAIDGET (\EPT.PUP \PUPSOC.TELERAID \EPT.3TO10 \TRANS.OP.REQUEST \InterfacePage +\TRANS.OP.RESPONSE \TRANS.DATALENGTH) TTGIVEHELP (\DSP) EDITBMTEXTURE (DARKBITSHADE WHITESHADE) +SPY.INIT (SPY.BUFFER.SIZE) HASH-COLON (*READTABLE*) APPENDSEQUENCEDESCRIPTOR.IP (SHORTSEQUENCE +LONGSEQUENCE) \TRACKWITHBOX (\CURSORDESTINATION LASTMOUSEBUTTONS FORCEPS LASTMOUSEX LASTMOUSEY) DWMFY2 + (PARENT DWIMEQUIVLST CLISPCONTEXT CLISPCHARRAY FAULTFN COMMENTFLG) TIMESPOW10 (EXTPOWERS) +TRANSLATE.DATATYPE (:4-BYTE-TEMP COMPILER::*TARGET-ARCHITECTURE* :4-BYTE BITSPERCELL BITSPERBYTE +BITSPERWORD WORDSPERCELL \MDSIncrement) GETPUPSTREAM (\PUPOVLEN) PRINT-DOCUMENTATION (*TERMINAL-IO*) +\LEAF.CLOSEFILE (\SS.OPEN AppendBit WriteBit \LEAFOP.CLOSE \OPCODE.SHIFT \LEN.CLOSEREQUEST :CACHE) +INTTOEXT (\EXPONENT.BIAS \FIXP \SMALLP \FLOATP \SIGNBIT MAX.POS.HINUM) SEDIT::PARSE--BROKEN-ATOM ( +SEDIT::TYPE-LITATOM) LINELENGTH (MAX.SMALLP) EXTTOINT (\EXPONENT.BIAS \SIGNBIT) COURIER.BROADCAST.CALL + (\COURIERPROGRAM BROADCASTNSHOSTNUMBER \EXTYPE.EXPEDITED.COURIER PROMPTWINDOW \NS.ROUTING.TABLE) +SAVE.CURSOR (\CURSORROW \CURSORCOL) FLTINTLOG (EXTPOWERS) \UPDATEXYANDBOX (\CURSORDESTINATION BASEPT +OPPT) DWMFY0 (DWIMIFYING TAIL PARENT CLISPCONTEXT SUBPARENT ONEFLG) FW-CLOSEFN (FW-OFDList) +RPLCHARCODE (\MAXTHINCHAR) \REUSETO (FD) DWIMIFY2? (DWIMIFYING NOFIXFNSLST NOFIXVARSLST) FILECREATED1 +(PRETTYHEADER) DO-EVENT (ADDSPELLFLG PRINTOUTFONT *THIS-EXEC-COMMANDS* *CURRENT-EVENT* VALUEFONT) +%%REDUCE-INTEGER (MAX.FIXP) HASH-DOUBLEQUOTE (*READTABLE*) READLINE (LISPXREADFN HISTSTR4 HISTSTR0) +FB.NAMES.INCREASING.VERSION (UPPERCASEARRAY) HASH-DOT (*READTABLE*) SI::GET-ADVICE-MIDDLE-MAN ( +SI::*ADVICE-HASH-TABLE*) PFI.HANDLE.* (*STANDARD-OUTPUT*) TOPPATHS (DECLST USERRECLST) PRODUCE ( +COMVAR##) %%MAKE-PATHNAME (:HOST :DEVICE :DIRECTORY :NAME :TYPE :VERSION) HASH-COMMA (:FORM +*READTABLE*) DIGITSBDP (\FIXP MAX.POS.HINUM MAX.SMALL.INTEGER \SMALLP \EXPONENT.BIAS \8BITS \SIGNBIT +\MAX.EXPONENT \HIDDENBIT) EDITLOADFNS? (FILELST *TERMINAL-IO* DWIMWAIT) DO.EDIT.PP (\FIRSTLINE RDTBL +\BUFFER \CURSORCOL HISTSTR1) CONCATT.IP (CONCATT) COMPILER::META-EVAL-UNWIND-PROTECT (:ARGUMENT) +SEDIT::DOT-THIS-LIST (SEDIT::TYPE-DOTLIST) HASH-R (*READTABLE*) TEMPLATE (USERTEMPLATES MSTEMPLATES) +TTYINSTRING (\ENDBUFFER \MAXTHINCHAR) READHOTSPOT (LASTMOUSEBUTTONS) CHAT.ICONFN (TTYKBD TTYKBDMASK +TTYKBDICONSPECREGION) GETFILEDEF (FILELST) COMP.STSETQ (LEVEL) RESETBUFS (READBUF) TTDELETECHAR ( +\CURSOR \BUFFER \ARROW) \FM.MAKELINKS (\FM.GROUPSPEC) TITLEW.REPAINTFN (BLACKSHADE) +\NSRANDOM.WRITE.SEGMENT (BYTESPERPAGE) FLONUM-TO-STRING (*DIGIT-STRING*) \EXTFTIMES (\8BITS +\EXPONENT.BIAS) SI::DELETE-ADVICE (SI::*ADVICE-HASH-TABLE*) APPENDIDENTIFIER.IP (SEQIDENTIFIER) DWMFY1 + (DWIMEQUIVLST ; VARS) MSPATHOPTIONS (LASTPARSED) SEDIT::INSERT-LITATOM (*PRINT-CASE* :UPCASE) HASH-X +(*READTABLE*) \LISP.TO.NSFILING.ATTRIBUTE (\NSFILING.TYPE.BINARY \LISP.TO.NSFILING.ATTRIBUTES +\NSFILING.ATTRIBUTES) PRETTYPRINT3 (CLISPIFYPRETTYFLG CHANGES COMMENTFLG DEFAULTFONT FNSLST) +GETPUPSTRING (\PUPOVLEN) GETDEFCURRENT (MACROPROPS) %%INITIALIZE-DEFAULT-PATHNAME (:NEWEST) HASH-VBAR +(*READ-SUPPRESS* *READTABLE*) \TEDIT.HCPYLOOKS.UPDATE (LOOKS LMInvisibleRun DEVICE ASCENT DESCENT +LMLooksChange) COMPARENCHARS (*READTABLE*) SETFONT.IP (SETFONT) SCALE.IP (SCALE.OP) COMPILER::META-EVAL-THROW + (:ARGUMENT :MV) HASH-NUMBER-SIGN (*CIRCLE-READ-LIST*) \TELERAIDCOMMAND (\EM.KBDAD0 \EM.KBDAD1 +\EM.KBDAD2 \EM.KBDAD3 \EM.UTILIN \EM.KBDAD4 \EM.KBDAD5 \TELERAIDBLOCK \MACHINETYPE \DANDELION +\DAYBREAK) TTRATOM (\ENDBUFFER null) WBOX (BLACKSHADE) HASH-O (*READTABLE*) \IBMINCCODEFN ( +*IBMTOXEROXMAP*) ALLPATHS (AVOID) UNSAVED1 (DFNFLG) OPT.UBDEL (FRAMES) HASH-STRUCTURE-LOOKUP ( +*CIRCLE-READ-LIST*) PRETTYPRINT (PRTTYFILE REPRINTFNS USERWORDS) TERM.PRINTCHAR (BLACKSHADE +CHAT.UNDERLINE.DESCENT) \VAMFilePageNumber (tLispFile tLispDirectory tVolumeFileMap tRootDirectory +tDiagnosticMicrocode) FIELDLOOK (USERRECLST) \SEARCHPRESSFONTS (PRESSFONTWIDTHSFILES) +DINFO.UPDATE.HISTORY (DINFO.HISTORY.LENGTH MENUFONT) SPY.ADD.ENTRY (SPY.BUFFER SPY.BUFFER.SIZE) +\FM.READUSERDATA (\FM.DESCRIPTION-PROPS) \EXTNORMALIZE (\SIGNBIT MAX.POS.HINUM MAX.SMALL.INTEGER) +FW-INTERACT (FW-InteractMenu) SQRT (\EXPONENT.BIAS \MAX.EXPONENT) COPYALLBYTES (PFDEFAULT) +\EXTFQUOTIENT (\MAX.EXPONENT \SIGNBIT MAX.POS.HINUM MAX.SMALL.INTEGER \EXPONENT.BIAS) +\POSTSCRIPT.PRINTSLUG (BLACKSHADE) CLISPEXPANSION (CLISPARRAY) CL::ENSURE-CONSISTENT-PS ( +CL::%%DEFAULT-DEFSTRUCT-TYPE CL::%%NO-CONSTRUCTOR CL::%%NO-PREDICATE CL::%%NO-COPIER +CL::%%DEFAULT-PRINT-FUNCTION) SEDIT::HASFAT (\MAXTHINCHAR) INIT-CML-READTABLES (\MAXTHINCHAR) SETLASTC + (\LINEBUF.OFD) GRAYBOXAREA (BLACKSHADE) \DSPRIGHTMARGIN.HDCPYDISPLAY (MICASPERPT) \DSKEventFn ( +\DSKtopMonitor \UFS.GFS.TABLE) \CONVERT.FLOATING.NUMBER (\FLOATFORMAT) COMP.LOOKUPCONST (OPNIL) +OPENIPSTREAM (DEFAULTLANDPAGEREGION DEFAULTPAGEREGION \NOIMAGEOPS \IPIMAGEOPS ENCODING SERVER) +\GETREGION.PACKPTS (BASEX BASEY OPPX OPPY) \VFMMarkBufferDirty (\VFMbufferPool) \VAMBufferSave ( +\VAMbufferVolumePage \VAMbufferVolume \VAMbuffer) CL:TRUNCATE (XCL::STRUNCATE) DWIMIFY0? (DWIMIFYFLG +NOFIXFNSLST NOFIXVARSLST) XCL::SETF-GET-PROCESS-PROFILE (XCL:*PROFILE*) NODECREATE ( +DEFAULT.GRAPH.NODEFONT DEFAULTFONT) FASL-FILEDATE (FASL:SIGNATURE) EDITMOVENODE (PROMPTWINDOW +LASTMOUSEBUTTONS) \TEDIT.PARSE.CHARLOOKS.LIST (TEDIT.DEFAULT.CHARLOOKS) CL:MAKE-ARRAY ( +CL:ARRAY-RANK-LIMIT CL:ARRAY-TOTAL-SIZE-LIMIT) SKOR (SPELLCASEARRAY) \DSKCloseDevice (\DSKtopMonitor +\DSKdevice) RESTOREBUF (\CURSOR \ARROW \CURSORCOL) CL::%%COPY-TIME-STATS (SWAPWAITTIME GCTIME +PAGEFAULTS SWAPWRITES TOTALTIME DISKIOTIME NETIOTIME DISKOPS) SI::ADD-ADVICE (SI::*ADVICE-HASH-TABLE*) + SHEDSCAN (ORIG DIFF) COMPILER::META-EVAL-SETQ (:ARGUMENT) \FM.MAKEBITMAP (WHITESHADE) +\MAIKO.BITBLTSUB (SUBRCALL) TTREADLIST (\BUFFER \ENDBUFFER) MERGLIST (MAX.INTEGER) +GLOBAL-MACRO-FUNCTION (COMPILERMACROPROPS) \UFS.UNREGISTER.GFS (\UFS.GFS.TABLE) PARSE.NSNAME ( +CH.DEFAULT.DOMAIN CH.DEFAULT.ORGANIZATION) \CHECKSUM (MASKWORD1'S) PRETTYCOM (PRTTYFILE USERWORDS +DECLARETAGSLST PRETTYPRINTMACROS SYSPROPS COMMENTFLG DEFAULTFONT FILEPKGCOMSPLST) +\UNVISIBLE.FLUSH.OPEN.STREAMS (AppendBit WriteBit) ADIEU (COMVAR##) \MAIKO.PUNTBLTCHAR ( +\CURSORDESTINATION \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS SUBRCALL) FW-OPENP (\FILEDEVICES +FW-OpenP-ScratchList) GET-ENVIRONMENT-AND-FILEMAP (*FILEMAP-HASH*) \INIT.ETHER.BUFFER.POOL ( +\InterfacePage WORDSPERQUAD \MACHINETYPE \DAYBREAK \DoveEther.IOIOCBLength \IOCB.LENGTH \MAXIOCBS +\10MB.MAX.INPUT.LENGTH) COMPILER::EFFECTS-ANALYZE-OPCODES (:NONE) \MAIKO.BLTCHAR (SUBRCALL) +READ-AFM-FILE (WeightMenuItems SlopeMenuItems *POSTSCRIPT-EXTRA-CHARACTERS*) MINIMUMWINDOWSIZE ( +MinWindowWidth) GRAPHEDITCOMMANDFN (EDITGRAPHMENUCOMMANDS) MB.CREATE.NWAYBUTTON (NWAYBUTTONIMAGEFNS) +\SHADEBITS (DARKBITSHADE WHITESHADE LASTMOUSEBUTTONS) PRINTFNS (PRTTYFILE FNSLST) \BULK.DATA.CLOSE ( +WriteBit AppendBit) COMPILER::PRINT-CONTEXT (:UNKNOWN) GETEXPRESSIONFROMEVENTSPEC (LISPXHISTORY +HISTSTR0) \INIT.POWERS.OF.TEN (\EXPONENT.BIAS) PFI.HANDLE.PUTPROPS (MACROPROPS *PFI-PROPERTIES*) +\GETREGIONTRACKWITHBOX (\CURSORDESTINATION DASHEDSHADE LASTMOUSEBUTTONS FORCEPS LASTMOUSEX LASTMOUSEY +NEWREGFNS) AU-REVOIR (COMVAR##) SEDIT:DEFAULT-COMMANDS (SEDIT::DEFAULT-COMMAND-TABLE-SPEC) +\DSKDISPLAY.UPDATE (\DSKDISPLAY.STATE \DSKDISPLAY.WINDOW) CL:COMPILE-FILE (*ERROR-OUTPUT* :PARENT +SYSLOCALVARS GLOBALVARS NLAMA NLAML LAMA DONTCOMPILEFNS :ABORT :INPUT :NEWEST FILERDTBL) MB.DISPLAY ( +BLACKSHADE) PRETTYDEF1 (PRTTYCOMS LAM?LST) FW-CLOSE-OLD-OFD-WINDOWS (FW-OFDList) +\TEDIT.PARSE.PARALOOKS.LIST (TEXTOBJ TEDIT.DEFAULT.FMTSPEC) \FILING.ATTRIBUTE.TYPE ( +\NSFILING.ATTRIBUTES) TTDELETEWORD (\CURSOR \BUFFER \ARROW) \10MB.TURNONETHER (\IOPAGE \InterfacePage +\#WDS.NSHOSTNUMBER) \FAULTINIT (\MAIKO \MP.OBSOLETEVMEM \DORADO \DANDELION \DAYBREAK \MP.32MBINUSE +\LASTVMEMFILEPAGE \GUARDVMEMFULL \KBDSTACKBASE \StackAreaSize \MISCSTACKBASE) \UFSEventFn ( +\UFStopMonitor \UFS.GFS.TABLE) \FM.GETBITMAPS (BLACKSHADE) \BN.FROM.FIXP (MIN.FIXP \BIGNUM.THETA) +\CHARWIDTH.HDCPYDISPLAY (IHALFMICASPERPT IMICASPERPT) \DSPFONT.HDCPYDISPLAY (MICASPERPT \MAXTHINCHAR) +CH.ISMEMBER (\CH.BROADCAST.SOCKET \CH.NULL.PROPERTY) \BN.TO.FIXP (MAX.FIXP MIN.FIXP MAX.INTEGER +MIN.INTEGER) LISPINTERRUPTS.WHEELSCROLL (WHEELSCROLLINTERRUPTS) \SET.VMEM.FULL.STATE (\InterfacePage +\LASTVMEMFILEPAGE \IFPValidKey) \VFMDelete1 (\VFMlowPtr \VFMhighPtr \VFMinterval nextKey \VFMhigh) +\UFSDirectoryNameP (\DSK.DEFAULT.DIRECTORY \UFS.DEFAULT.DIRECTORY MAX-PATHNAME-LEN) +LOOKUP-ENVIRONMENT-AND-FILEMAP (*FILEMAP-HASH* UPPERCASEARRAY) FW-RESIZE-OFD (FW-WindowNoNameWidth +FW-WindowHeight FW-Anchor FW-Position FW-WindowBottom FW-CurPosTab FW-EofPosTab FW-PercentTab +FW-AccessTab FW-PercentWidth FW-PercentHeight) SETRGB.IP (MAKEVEC DO COLOR.IMVAR) CLEARPUP ( +\MAX.PUPLENGTH) \TEXTTTYBOUT (ERASECHARCODE IGNORE.CCE \MAXTHINCHAR \PRIMTERMSA) \BN.INTEGERLENGTH ( +\BIGNUM.BETA MAX.INTEGER) CL:MACROEXPAND-1 (*MACROEXPAND-HOOK*) \SETIOPOINTERS (\InterfacePage +\DOLPHIN \DORADO GCONST ALLUP \DANDELION \MAIKO \IOPAGE \DAYBREAK) \UFSOpenFile (\DSKtopMonitor +\UFStopMonitor ACCESS-INPUT ACCESS-OUTPUT ACCESS-BOTH ACCESS-APPEND ACCESS-OTHER RECOG-OLD +RECOG-OLDEST RECOG-NEW RECOG-NEW-OLD RECOG-OTHER \FIXP AppendBit WriteBit :PATHNAME BYTESPERPAGE) +\TELERAIDINIT (\TELERAIDBITMAPS) SIZE/GRAPH/WINDOW (DEFAULT.GRAPH.WINDOWSIZE SCREENWIDTH SCREENHEIGHT) + \D01.FAULTINIT (\MISCSTATS GCONST \ALTO.RCLKMILLISECOND \VAL.HI \ALTO.RCLKSECOND \MACHINETYPE \DORADO +) \UFSGenerateFiles (\DSKtopMonitor \UFStopMonitor) ENTEREVALQT (RESETFORMS) \DOVE.FAULTINIT ( +\VP.IOCBS \InterfacePage \IFPValidKey \MP.INVALIDVMEM \DOVE.RCLKMILLISECOND \VAL.HI \MISCSTATS +\DOVE.RCLKSECOND) \UFSSetFileInfo (\DSKtopMonitor \UFStopMonitor \FIXP ATTR-WDATE ATTR-PROTECTION) +DO.DELETE.LINES (\DSP \BMARG \CHARHEIGHT \RMARG \LMARG \DESCENT) INFINITEP (MAX.INTEGER MIN.INTEGER) +PRETTYDEFCOMS (%#RPARS) \DL.FAULTINIT (\VP.IOCBS \IFPValidKey \MP.INVALIDVMEM \DLION.RCLKMILLISECOND +\DLION.RCLKSECOND \MISCSTATS \DL.PROCESSORBUSY \DL.READPID) \UFSWritePages (\FIXP :MESSAGE) +\TEDIT.UPDATE.SHOWSEL (BLACKSHADE) \LFDeleteFile (\LFtopMonitor) \MP.ERROR (\MACHINETYPE \DANDELION +\DAYBREAK RAID) \IBMOUTCHARFN (*XEROXTOIBMMAP*) \10MB.LOADINPUTQ (\10MBPACKETLENGTH) PRINTDATE1 ( +DEFAULTFONT LAMBDAFONT) \MAIKO.FAULTINIT (\VP.IOCBS \MISCSTATS) SEDIT:RESET-COMMANDS ( +SEDIT::COMMAND-TABLE-SPEC) \UFSReadPages (\FIXP :MESSAGE BYTESPERPAGE WORDSPERPAGE) +XCL::WALK-MULTIPLE-VALUE-BIND (XCL::*DECLARATIONS* XCL::*LEXICAL-VARIABLES*) FB.DELVERCOMMAND ( +FB.VERSION.MENU.ITEMS :NUMBER) SNAPW (WBorder :SNAP) \UFSTruncateFile (\FIXP ATTR-WDATE) +CL::DEFSTRUCT-PARSE-OPTIONS (:NAME :CONC-NAME) \BN.TIMES2 (\BIGNUM.BETA) \UFSGetFileInfo ( +\DSKtopMonitor \UFStopMonitor \FIXP ATTR-LENGTH ATTR-WDATE ATTR-RDATE MAX-UNAME-LEN ATTR-AUTHOR +ATTR-PROTECTION ATTR-ALL) \BN.DIVIDE (\BIG.0 \BIGNUM.BETA \BIGNUM.BETA1) OPT.JUMPTHRU (OPNIL COMFN +OPRETURN VCONDITIONALS OPCOPY OPPOP) \VFMSaveBuffer (\VFMbufferPool) \UFSDeleteFile (\DSKtopMonitor +\UFStopMonitor \FIXP) \FILEMAP-HASHOVERFLOW (*FILEMAP-LIMIT* FILELST *FILEMAP-VERSIONS*) \BN.FLOAT ( +\BIGNUM.BETA) \ARBIN (*TEDIT-FILE-READTABLE*) \DUMMYKEYHANDLER (\KbdFXP) COMPILER::LOCAL-CONSTANT-P ( +COMPILER::*CONSTANTS-HASH-TABLE*) \UFSRenameFile (\MACHINETYPE \MAIKO \FIXP) FINITEP (MAX.INTEGER +MIN.INTEGER) \TEDITMENU.CREATE (TEDIT.EXPANDEDMENU.SPEC) COMPILER::MAKE-CHILD-ENV (:PARENT) SPECVARP ( +MSDATABASELST LOCALVARS SPECVARS LOCALFREEVARS GLOBALVARS) SEDIT::GET-BUTTON-STRING (SEDIT::TYPE-STRING +) D-ASSEM::TYPE-NAME-FROM-SIZE (\HUNK.PTRSIZES) \BIGNUM.TO.INT (\BIGNUM.BETA) D-ASSEM::FIXUP-NTENTRY ( +:3-BYTE COMPILER::*HOST-ARCHITECTURE*) \LFRenameFile (\LFtopMonitor) FLUSHFILEMAPS (*FILEMAP-HASH*) +\UFSCloseFile (\FIXP AppendBit WriteBit) SEDIT:REPLACE-SELECTION (:SUB-LIST) \BN.2TH (\BIGNUM.THETA) +COMP.MACRO (COMPILE.CONTEXT) TRACKW (CROSSHAIRS LASTMOUSEBUTTONS LOCKEDSPOT LASTMOUSEX LASTMOUSEY) +FW-UPDATE-OFD-WINDOW (FW-PercentWidth FW-PercentHeight BLACKSHADE FW-Shade) \BN.QRS (\BIGNUM.BETA) +PRETTYCOM1 (COMMENTFLG) EDITSHADE (LASTMOUSEBUTTONS LASTMOUSEX LASTMOUSEY DARKBITSHADE WHITESHADE +BLACKSHADE) PSCFONTFROMCACHE.SPELLFILE (POSTSCRIPT.FONT.ALIST POSTSCRIPTFONTCACHE) SI::FINISH-ADVISING + (:UPCASE) \GTREADTABLE1 (\READTABLEHASH) MAKEACCESS1 (RECORDEXPRESSION NEWVALUE DECLST) \UFSeol ( +PROMPTWINDOW LF.EOLC \UFS.DEFAULT.EOLC) \GTTERMTABLE (\PRIMTERMTABLE \ORIGTERMTABLE) +\INSPECTW.COMMAND.HANDLER (INSPECTPRINTLEVEL LASTMOUSEBUTTONS) \UFSCloseDevice (\UFStopMonitor +\UFSdevice) READVARS-FROM-STREAM (HPRINTRDTBL) \SMASHMENUIMAGEONRESET (RESETSTATE) \TERMCLASSTOCODE ( +EOL.TC NONE.TC CHARDELETE.TC WORDDELETE.TC WORDSEPR.TC LINEDELETE.TC RETYPE.TC CTRLV.TC) +\D01.ASSIGNBUFFERS (\InterfacePage WORDSPERPAGE \MAXSWAPBUFFERS) \UFSError (:MESSAGE :PATHNAME) +UNECCSPEC (MSDATABASELST) XCL::PPRINT-DEFINER-FITP (COMMENTFLG *STANDARD-OUTPUT*) \READCLASSTOCODE ( +ESCAPEBIT STOPATOMBIT BREAKBIT INNERESCAPEBIT SEPRCHAR.RC) \LFTruncateFile (BYTESPERPAGE) +\CHAIN.UP.RPT (\RPTSIZE \RPTENTRYLENGTH \PAGETABLESTOPFLG) SI::DESCRIBE-INTERNAL (CL::*DESCRIBE-DEPTH* +) \UFS.FULLNAME (*DSK-HOST-NAME* *UFS-HOST-NAME*) DIRECTORY.FILL.PATTERN (\CONNECTED.DIRECTORY) +XCL::PPRINT-DEFINER-RECURSE (*STANDARD-OUTPUT*) COMP.PROG1 (COMPILE.CONTEXT) \GETREADSYNTAX ( +\MAXTHINCHAR) OPT.JUMPOPT (CL:LABELS) \VFMFreeVPage (\VFMvolumeHandle \PFFileMapFileD) \PFRoomForFile +(tVolumeFileMap) SEDIT:GET-SELECTION (:SUB-LIST :CHARACTERS) TTYINENTRYFN (LASTMOUSEBUTTONS) +\GETTERMSYNTAX (\MAXTHINCHAR) ENABLEWHEELSCROLL (\CURRENTKEYACTION \COMMANDKEYACTION \DEFAULTKEYACTION + WHEELSCROLLINTERRUPTS) PRETTYVAR1 (PRETTYPRINTMACROS DEFAULTFONT) MAKEDEFLIST (MACROPROPS) +OPT.XVARSCAN1 (TOPFRAME) \VFMDelete2 (nextKey \VFMlow \VFMold \VFMoldPtr \VFMhighPtr deleteLevel) +SEDIT:ADD-COMMAND (SEDIT::COMMAND-TABLE-SPEC) XCL::WALK-LET/LET* (XCL::*DECLARATIONS* +XCL::*LEXICAL-VARIABLES*) DWIMIFY1? (DWIMIFYING NOFIXFNSLST NOFIXVARSLST) FIX-FORM (TTYINFIXLIMIT +:CLOSE-ON-COMPLETION *CURRENT-EVENT* INPUTFONT *READ-BASE*) PRINTDEF1 (PRTTYFILE FNSLST) PRETTYVAR ( +COMMENTFLG) COMPILER::META-EVAL-PROGV (:ARGUMENT) \TEDIT.PAPERHEIGHT (TEDIT.PAPER.SIZES) +COMPILER::META-EVAL-PROGN (:EFFECT COMPILER::*LITERALLY-NIL*) NECCSPEC (U) COMPILER::EFFECTS-ANALYZE-LITERAL + (:ANY :NONE) EDITGRAPH2 (PROMPTWINDOW LASTMOUSEBUTTONS) \LFGetFileInfo (\LFtopMonitor BYTESPERPAGE) +\FM.CHECKPROPS (\FM.FORMAT-TYPES) EDITSHADEREPAINTFN (BLACKSHADE) D-ASSEM::FETCH-HUNK (D-ASSEM::*HUNK-MAP* +) XCL::%%DEFINE-TYPE-SAVE-DEFN (*DEFINITION-HASH-TABLE*) COMP.VAR (COMPILE.CONTEXT ALLDECLS) +SEDIT::REPLACE-NODE (SEDIT::TEMP-POINT SEDIT::TEMP-SELECTION) MKACCESSFN (RECORDEXPRESSION DECLST) +\M44ACTONVMEMFILE (\ISFSCRATCHDAS \ISFSCRATCHCAS \XVmemFmapBase \ISFCHUNKSIZE \XVmemFmapHighBase +WORDSPERPAGE \FILLINDA \SWAPREQUESTBLOCK WORDSPERCELL \XVmemDiskBase \DC.WRITED \DC.READD \ISFMAP +\MAINDISK) \TEXTDSPYPOSITION (\CURRENTDISPLAYLINE) SEDIT::DELETE-LITATOM (SEDIT::TYPE-STRING) +SUPERPRINTEQ (PRETTYEQUIVLST) \ITEM.WINDOW.SELECTION.HANDLER (LASTMOUSEBUTTONS LASTMOUSEX LASTMOUSEY) +\UFS.REMOVE.HOST.FIELD (:PATHNAME \DSK.DEFAULT.DIRECTORY \UFS.DEFAULT.DIRECTORY) MENUTITLEFONT ( +LASTSCREEN) \SEQUIN.COMPARE (\SC.EQUAL \SC.PREVIOUS \SC.DUPLICATE \SC.AHEAD \SC.OUTOFRANGE) +COMPAREPRINT1 (COMMENTFLG **COMMENT**FLG) \RESHOWBORDER1 (\CURSORDESTINATION \EM.DISPINTERRUPT \TOPWDS + \SCREENBITMAPS) LVLPRIN (FILE) ADDNAKEDCHAR (\CURSOR \ENDBUFFER EOLCHARCODE) SEDIT::ATOM-CHAR-ESCAPED + (*READTABLE* \MAXTHINCHAR) ACCEPT-UNIX-SOCKET-STREAM (*NEW-SHELL-DEVICE* LF.EOLC *SHELL-DEVICE*) +\REMOVE-DECLS (*SPECIAL-BINDING-MARK*) SETCOLORLV.IP (SEQLARGEVECTOR MAKEPIXELARRAY MAKESAMPLEDBLACK +COLOR.IMVAR) FORMAT-ERROR (:ARGS *FORMAT-CONTROL-STRING* *FORMAT-INDEX*) +DEFAULT.INSPECTW.VALUECOMMANDFN (PROMPTWINDOW LASTMOUSEBUTTONS) UNMAKEHARDCOPYSTREAM (\DISPLAYIMAGEOPS +) \LFGetFileName (\LFtopMonitor) \INITBFS (\MAINDISK WORDSPERPAGE \InterfacePage \LENSHORTCB \LENFP +WORDSPERCELL) COMPILER::GENCODE-CALL (:RETURN :FUNCTION COMPILER::*CURRENT-FRAME* +COMPILER::*TAIL-RECURSION-THRESHOLD* :ARGUMENT :GLOBAL) TEDIT.BUILD.PCTB (*TEDIT-FILE-READTABLE* +TEDIT.DEFAULT.FMTSPEC DEFAULTFONT LF.EOLC TEDIT.INPUT.FORMATS \PieceDescriptorPAGEFRAME +\PieceDescriptorCHARLOOKSLIST \PieceDescriptorPARALOOKSLIST \PieceDescriptorPARA \PieceDescriptorLOOKS + \PieceDescriptorOBJECT) COMP.CONST (COMPILE.CONTEXT) OPT.XVARSCAN (CODE FRAMES TOPFRAME) +SETCOLOR16.IP (SEQPACKEDPIXELVECTOR MAKEPIXELARRAY MAKESAMPLEDBLACK COLOR.IMVAR) READVARS (HPRINTRDTBL +) COMPILER::EFFECTS-ANALYZE-LAMBDA (:NONE) \TELERAIDSERVER (\LOCALNDBS \TELERAIDPACKET TR.GIVEPAGE +WORDSPERPAGE \TELERAIDBUFFER BYTESPERPAGE \PUPOVLEN TR.HEREISPAGE TR.STORE TR.STOREDONE TR.GO TR.GOACK + TR.GOREPLY MAX.SMALL.INTEGER \EM.KBDAD0 \EM.KBDAD1 \EM.KBDAD2 \EM.KBDAD3 \EM.UTILIN \EM.KBDAD4 +\EM.KBDAD5 \TELERAIDBLOCK \ResetFXP \MISCSTATS \RCLKSECOND TR.ERROR) PFI.PRINT.LAMBDA (*PFI-FNSLST*) +\UFS.DIRECTORY.NAME (\DSKtopMonitor \UFStopMonitor \FIXP) \TEDIT.PAPERWIDTH (TEDIT.PAPER.SIZES) +LVLPRIN0 (CLISPTRANFLG FILE COMMENTFLG) PPSPP (\SPPDSTYPE.COURIER \SPPDSTYPE.BULKDATA +\SPP.RETRANSMITQ.SIZE) INVERTED/SHADE/FOR/GRAPHER (BLACKSHADE) PRINTPARA1 (RMARG FILE LMARG) +XCL::%%EXPAND-DEFINER (:DEFINITION-EXPANDER) \TEDIT.GET.INSERT.CHARLOOKS (DEFAULTFONT) \BN.IGNN ( +\BIGNUM.BETA) CREATE-UNIX-SOCKET-STREAM (*NEW-SHELL-DEVICE* LF.EOLC *SHELL-DEVICE*) \SETTERMSYNTAX ( +\MAXTHINCHAR) D-ASSEM::DCODE-FROM-DLAMBDA (:FRAME-NAME :CLOSURE-P :CLOSURE D-ASSEM::*LOCAL-FN-FIXUPS*) + \SETREADSYNTAX (\MAXTHINCHAR) PFI.PRINT.LAMBDA.BODY (LAMBDAFONT BOLDFONT DEFAULTFONT) +MB.THREESTATE.SHOWSELFN (BLACKSHADE) SPECVARS (SYSLOCALVARS) \FM.CHECKDESCRIPTION (\FM.ITEM-TYPES +\FM.HJUSTIFY-SPECS \FM.VJUSTIFY-SPECS BLACKSHADE \FM.BOXSPACE) SYNTAXP (\MAXTHINCHAR) +\QUEUE.INPUT.IOCB (\MACHINETYPE \DANDELION \ES.PENDING \DL.ENABLE.INPUT \DL.ETHERINPUTREG \DAYBREAK +\DOLPHIN \D0.ENABLE.10MBINPUT \D0.INPUTSTATE) PRINT3TO10 (XIPIGNORETYPES XIPTRACEFILE +\TRANS.OP.REQUEST \TRANS.OP.RESPONSE) \10MB.STARTDRIVER (\RCLKSECOND \10MB.EXPECTED.RECEIVE.INTERVAL +\ES.PENDING) \ITEMW.FLIPITEM (BLACKSHADE) \COPYSYNTAX (\MAXTHINCHAR \NSCHARHASHKEYS +\NSCHARHASHOVERFLOW) CHECK.MARGIN (\RMARG) \BITMAPFROMTEXTURE (BITMASKARRAY) +SI::UNADVISE-FROM-RESTORE-CALLS (ADVISEDFNS *TERMINAL-IO*) XCL::%%DEFINER-NAME (:DEFINITION-NAME) +SPY.BUFFER.ENTRY (SPY.BUFFER.SIZE SPY.BUFFER) KILL.LINES (\ENDBUFFER) \READBMDIMENSIONS ( +\CURSORDESTINATION) \MAPCHARTABLE (\MAXTHINCHAR) \VFMFind (\VFMinterval nullVolumePage \VFMold \VFMlow + \VFMmaxKey) D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL (D-ASSEM::*LOCAL-FN-FIXUPS* D-ASSEM::*DVAR-ENV* +) \VAMRecomputeFreePageCount (\VAMmonitor) DWIMIFY0 (LISPXHIST ATM DWIMEQUIVLST DFNFLG) CLISPNOEVAL ( +DWIMEQUIVLST NLAMA NLAML MACROPROPS) XCL::EXEC-TITLE-FUNCTION (*READTABLE*) BIGNUM.DEFPRINT ( +*READTABLE* MIN.INTEGER *PRINT-BASE* \BIGNUM.BETA) \MAIKO.NEWFAULTINIT (\DLBUFFERPAGES \VP.BUFFERS) +\UFStoOtherRenameMess (DEFAULTFILETYPELIST DEFAULTFILETYPE) MSCHECKVARS1 (ENTRIES V U MSDATABASELST +BLKAPPLYFNS BLKAPPLYCALLERS SEEN BLKFNS) \MAIKO.DO.MOVDS (\MAIKO.MOVDS) FW-CLOSE-CMD (FW-OFDList) +D-ASSEM::DIGEST-FUNCTION (:FUNCTION D-ASSEM::*DCODE* :ARGUMENT) \TEDIT.WINDOW.SETUP ( +TEDIT.PROMPTWINDOW.HEIGHT TEDIT.PROMPT.FONT) \VFMDeletePageGroup (\VFMmonitor nullVolumePage) +\NSRANDOM.HANDLE.ERROR (:PATHNAME PROMPTWINDOW) \INVERTITEM (BLACKSHADE) \MAIKO.ASSIGNBUFFERS ( +WORDSPERPAGE) TYPESOF (FILEPKGTYPES SHADOW-TYPES FILELST) D-ASSEM::INSTALL-LOCAL (:LOCAL +D-ASSEM::*PVAR-COUNT*) \POSITION.MENU.IMAGE (LASTSCREEN LASTMOUSEX LASTMOUSEY) \BN.ISUM0 (\BIGNUM.BETA +) EDITDELETENODE (PROMPTWINDOW) D-ASSEM::STORE-DIGEST-INFO (D-ASSEM::*FREE-VARS* D-ASSEM::*BOUND-SPECIALS* + D-ASSEM::*PVAR-COUNT* D-ASSEM:+FVAR-CODE+ D-ASSEM::*DCODE*) GLOBALVARP (GLOBALVARS) PRINTSPP ( +\SPPDSTYPE.COURIER \SPPDSTYPE.BULKDATA \SPPDSTYPE.END \SPPDSTYPE.ENDREPLY \XIPOVLEN \SPPHEAD.LENGTH) +ROTATE.IP (ROTATE) D-ASSEM::DVAR-FROM-LAP-VAR (D-ASSEM::*DVAR-ENV*) SUPERPRINTGETPROP (PRETTYEQUIVLST) + COMPILER::META-EVALUATE (:ARGUMENT) \M-VMEMSAVE (\EMUSWAPBUFFERS \IFPValidKey WORDSPERPAGE) +D-ASSEM::INTERN-TAG (D-ASSEM::*DTAG-ENV*) GETCFILE (DWIMWAIT) PRINENDLINE (*STANDARD-OUTPUT* +DEFAULTFONT SPACEWIDTH) FB.UPDATE.COUNTERS (WHITESHADE) PRINTFILEPROP (PRINTFILETYPES) \DOCOMPRESSVMEM + (\RP.GCTABLE \FPTOVP \NO.VMEM.PAGE) FIXLISPX/ (VARS) D-ASSEM::EASY-ENTRY-P (:IGNORED) +MAKEHARDCOPYSTREAM (\HDCPYDISPLAYIMAGEOPS) \SEQUIN.CLEANUP (RESETSTATE \SS.OPEN \SEQUIN.BROKEN +\SS.ABORT) POLYSHADE.SCAN.IP (DOSAVESIMPLEBODY { FILL.WRULE }) OPT.SCANOPT (CODE CONSTFNS +VCONDITIONALS CONDITIONALS CONST.FNS OPPOP FRAMES OPCOPY) DELETELINE (\FIRSTLINE \PROMPT1 \PROMPT2 +\BUFFER) \LFReadPages (BYTESPERPAGE WORDSPERPAGE) RESETGRID.NEW (WHITESHADE DARKBITSHADE) D-ASSEM::INTERN-VAR + (D-ASSEM::*DVAR-ENV*) SUBPRINT/ENDLINE (COMMENTFLG LEFT) COMP.USERFN (CL:LAMBDA-LIST-KEYWORDS TOPFN +ALLVARS COMPILEUSERFN) EQP (\STACKP \COMPILED-CLOSURE) FITP (*STANDARD-OUTPUT* %#CAREFULCOLUMNS +RMARGIN AVERAGEVARLENGTH) \IDLE.PROMPT.WATCHER (\LASTUSERACTION) DELFROMCOM (COMSNAME) +\UFS.HANDLE.RELATIVEDIRECTORY (\DSK.DEFAULT.DIRECTORY \UFS.DEFAULT.DIRECTORY) SUPERPRINT ( +PRETTYPRINTYPEMACROS LEFT RMARGIN *STANDARD-OUTPUT* FIRSTPOS COMMENTFLG CLISPARRAY) DECODEBUTTONS ( +LASTMOUSEBUTTONS) D-ASSEM::GENERATE-EASY-ENTRY (D-ASSEM:+LAMBDA-SPREAD+ D-ASSEM::*DCODE* +D-ASSEM:+NLAMBDA-SPREAD+ D-ASSEM:+LAMBDA-NO-SPREAD+ D-ASSEM:+NLAMBDA-NO-SPREAD+) SCALE2.IP (SCALE2) +UTOXCODE (*UNICODETOXCCS* TRANSLATION-SHIFT TRANSLATION-MASK) SI::UNBREAK-FROM-RESTORE-CALLS ( +BROKENFNS *TERMINAL-IO*) D-ASSEM::GENERATE-HARD-ENTRY (D-ASSEM::*DCODE* D-ASSEM:+LAMBDA-NO-SPREAD+) +PRETTYPRINT2 (OLDFILEMAP SOURCEFILE PRTTYFILE) CHAT.SET.EMULATOR (CHAT.DISPLAYTYPES) \BN.D2TH ( +\BIGNUM.THETA) ECHOCHAR (\MAXTHINCHAR REAL.CCE IGNORE.CCE SIMULATE.CCE INDICATE.CCE) \LFSetFileInfo ( +\LFtopMonitor) \10MB.INPUT.INTERRUPT (\ES.PENDING \ES.GOOD.PACKET \10MB.GETGARBAGE \MACHINETYPE +\DANDELION \DAYBREAK \MIN2PAGEBUFLENGTH WORDSPERPAGE \10MB.RAWPACKETQ \10MBPACKETLENGTH +\10MB.INPUT.TIMEOUT \10MB.INPUT.TIMER) BITMAPOBJ.SNAPW (DEFAULT.BITMAP.SCALE) GETFILEPKGTYPE ( +FILEPKGTYPES FILEPKGCOMSPLST) OPT.SETUPOPT (CODE) SETMAINTPANEL (\MACHINETYPE \DANDELION \DOLPHIN +MISC1 \DAYBREAK DOVEMISC) \COURIER.EXPEDITED.OVERFLOW (PROMPTWINDOW) MARGINBAR (WHITESHADE BLACKSHADE +EDITGRAY TEDIT.EXTENDEDRIGHTMARK) COMPILER::META-EVAL-MV-CALL (:ARGUMENT) \UFSGetFileType ( +DEFAULTFILETYPELIST DEFAULTFILETYPE) \HDCPYDSPPRINTCHAR (\MAXTHINCHAR \PRIMTERMSA INDICATE.CCE +SIMULATE.CCE REAL.CCE ERASECHARCODE IGNORE.CCE) \BN.ICANON (\BIGNUM.BETA) SUBDECLARATIONS (DECLST +CLISPTRANFLG) D-ASSEM::STACK-ANALYZE-CODE (D-ASSEM::*LEVEL* D-ASSEM::*ENDING-DEPTH*) GETXIP (\EPT.XIP +XIPTRACEFILE) \IDLE.IS.PREVIOUS (\IDLE.PASSWORD.SET \InterfacePage) IOCBQLENGTH (\IOCBFREELIST) +FIXAPPLY1 (LISPXHISTORY EXPR) \HANDLE.RAW.PACKET (\PACKET.FILTERS) XCL::UNDOABLY-MAKUNBOUND ( +COMPVARMACROHASH) ECHOCONTROL (\MAXTHINCHAR) \DL.NEWFAULTINIT (\InterfacePage \RP.STARTBUFFERS +\VP.INITSCRATCH \DLBUFFERPAGES \FPTOVP \VMAP.VACANT \MACHINETYPE \DAYBREAK \VP.IOCBS \MP.IOCBPAGE +\VMAP.CLEAN \IOCBPAGE WORDSPERPAGE \VP.IFPAGE \FP.IFPAGE \RP.IOPAGE \DANDELION 2MBPAGES +PAGESPERSEGMENT \NP.DISPLAY \MaxScreenPage \RP.DISPLAY \VP.DISPLAY \DOVEIORGNSIZE \VP.DOVEIORGN +\RP.DOVEIORGN \VP.RPT \WIDEDOVEDISPLAYWIDTH \RP.AFTERDOVEDISPLAY \RP.AFTERDISPLAY \VP.BUFFERS +\SmallNegHi \RPTENTRYLENGTH \RP.TEMPDISPLAY) POLYSHADE.BLT (FILL.WRULE) CL::%%DEFSTRUCT-CONSP-OPTIONS +(CL::%%DEFSTRUCT-OPTIONS) COMPILER::EFFECTS-ANALYZE-GO (:NONE) UPDATE/BM/DISPLAY/SELECTED/REGION ( +BLACKSHADE) SEDIT::COMPUTE-SELECTION-POSITION-LITATOM (SEDIT::TYPE-STRING) BRUSHP (KNOWN.BRUSHES) +SEDIT::PARSE--UNKNOWN (SEDIT::TYPE-UNKNOWN) PFI.HANDLE.DEFDEFINER (:NAME MAKESYSNAME :LYRIC :TEMPLATE +:DEFINITION-PRINT-TEMPLATE) FW-CHANGE-POSITION (FW-OFDList PROMPTWINDOW) \UFSSetFileType ( +DEFAULTFILETYPELIST DEFAULTFILETYPE) GETCP.IP (GETCP) TEDIT.GET (PROMPTWINDOW WAITINGCURSOR) +GETCLEARINGHOUSE (LOCAL.CLEARINGHOUSE \CH.MAINLOCK \CH.BROADCAST.SOCKET CH.NET.HINT) COMPILER::GENERATE-CODE + (:ARGUMENT) ADDTOCOM (COMSNAME MACROPROPS) \BN.MADD (\BIGNUM.BETA) COMPAREPRINT (*COMPARE-LEVEL* +*COMPARE-LENGTH*) MSCHECKBLOCKBASIC (BLKLIBRARY MSDATABASELST) OPT.POSTOPT (TOPFRAME) MOVE.BACK.TO ( +\CURSORCOL) UNIX-STREAM-CLOSE (*SHELL-DEVICE*) DELFROMCOM1 (COMSNAME) XCL::WALK-DO/DO* ( +XCL::*DECLARATIONS* XCL::*LEXICAL-VARIABLES*) READ-UNICODE-MAPPING-FILENAMES (UNICODEDIRECTORIES +XCCS-SET-NAMES) POLYSHADE.IP (;) SEDIT::COMPUTE-POINT-POSITION-LITATOM (SEDIT::TYPE-STRING) \BN.TH2B ( +\BIGNUM.THETA) \LFOpenFile (\LFtopMonitor :PATHNAME) \FM.LAYOUTGRID (\FM.PROPSPEC BLACKSHADE +\FM.BOXSPACE \FM.GROUPSPEC) D-ASSEM::STACK-ANALYZE (D-ASSEM::*LEVEL*) \UFS.REGISTER.GFS ( +\UFS.GFS.TABLE) SEDIT::PARSE--GAP (SEDIT::TYPE-GAP) COMP.UNBIND.VARS (COMPILE.CONTEXT CODE FRAME) +ACCESSDEF (DECLST USERRECLST) SENDXIP (\EPT.XIP \NS.READY.EVENT XIPTRACEFILE) \CH.PRINT.BLURB ( +PROMPTWINDOW) D-ASSEM::RESOLVE-JUMPS (D-ASSEM::*DCODE*) TIMEALL (:OUTPUT :TIMED-FORM :DATA-TYPES +:REPEAT) \INITBIGNUMS (\TT.FIXP \TT.NUMBERP \TT.ATOM) \TERMCODETOCLASS (EOL.TC NONE.TC CHARDELETE.TC +WORDDELETE.TC WORDSEPR.TC LINEDELETE.TC RETYPE.TC CTRLV.TC) \EVAL-INVOKE-LAMBDA (\STACKHI MYALINK) +\UFS.NEXTFILEFN (*DSK-HOST-NAME* *UFS-HOST-NAME*) MSCHECKBOUNDFREE (MSDATABASELST LOCALFREEVARS BLKFNS + LOCALVARS SPECVARS) \SETTYPEMASK (\DTDSpaceBase \MDSTypeTable) COMP.EQ (COMPILE.CONTEXT CODE EXP) +\ORIGTERMTABLE (\NSCHARHASHOVERFLOW ERASECHARCODE \MAXTHINCHAR) CHOOZ (SPELLSTR1 SPELLSTR2 SKORLST2) +D-ASSEM::CONVERT-TO-BINARY (D-ASSEM::*DCODE* CELLSPERQUAD) COMPILER::META-SUBST-VAR-REF (COMPILER::*SUBST-VAR* + COMPILER::*SUBST-EXPR*) \INTERPRET-ARGUMENTS (:CALLEE :ACTUAL :MAXIMUM &BODY &INTERLISP &AUX) +D-ASSEM::COMPUTE-JUMP-SIZE (D-ASSEM::+JUMP-RANGE-SIZE-MAP+) \VAMFreePageGroup (\VAMmonitor) COMP.UNBOX + (CODE) MASKSTROKE.IP (MASKSTROKE) XTOUCODE (*XCCSTOUNICODE* TRANSLATION-SHIFT TRANSLATION-MASK) +COMPILER::META-EVAL-LAMBDA (:RETURN) D-ASSEM::PRETTY-JUMPS (D-ASSEM::*JUMP-LIST*) +POSTSCRIPT.PUTBITMAPBYTES (PS.BITMAPARRAY) COMPAREFAIL (COMPARETRANSFORMS) +D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL (:3-BYTE COMPILER::*ENVIRONMENT* :3-BYTE-INIT WORDSPERQUAD +WORDSPERCELL BYTESPERWORD) MSCHECKFNINBLOCK (ENTRIES BLKLIBRARY MSDATABASELST BLKFNS RETFNS +BLKAPPLYFNS) \IDLE.AUTHENTICATE (CH.DEFAULT.DOMAIN) \ARBOUT (*TEDIT-FILE-READTABLE*) D-ASSEM::SPLICE-IN-JUMPS + (D-ASSEM::+JUMP-CHOICES+) TEDIT.MINIMAL.WINDOW.SETUP (TEDIT.SELECTION) FINDFN (BRKTYPE) +D-ASSEM::COMPUTE-DEBUGGING-INFO (D-ASSEM::*DCODE*) \PEEKREFILL (\PRIMTERMTABLE) CLISP% (CLISPTRANFLG) + ISET.IP (ISET) \LOOKUPPORT (\PUPSOCKET.MISCSERVICES \PT.NAMELOOKUP \MAXETHERTRIES \PT.NAMERESPONSE +\PUPOVLEN \PORTIDLEN PUPTRACEFILE \PT.NAME/ADDRERROR) D-ASSEM::START-PC-FROM-NT-COUNT (WORDSPERQUAD +WORDSPERCELL BYTESPERWORD) PARSERELATION1 (MSWORDS) \TEDIT.APPLY.STYLES (TEDIT.STYLES) +FORWARD.DELETE.TO (\CURSOR \CURSORCOL) \POLYSHADE.YSCAN.IP (MIN.INTEGER MAX.INTEGER) PROMPTFOREVALED ( +LASTMOUSEX LASTMOUSEY) DIRECTORY.PARSE (DEFAULTEXT DEFAULTVERS DESIREDPROPS) PRINCOPY (VPRINTLEVEL) +EDITMODE (*EDITMODE* *DISPLAY-EDITOR*) ALLFIELDS (DECLST) RATOM (*INTERLISP-PACKAGE* *PACKAGE* +RATOM.RT UPPERCASEARRAY \PNAMELIMIT \FATPNAMESTRINGP) LATTICE/BREAK/CYCLES (NODELST) +FW-CHANGE-JUSTIFICATION (PROMPTWINDOW) \DL.ASSIGNBUFFERS (WORDSPERPAGE) \10MBWATCHER (\MAXWATCHERGETS) + \SUBREAD (READ.RT RATOM.RT \MAXTHINCHAR SEPRCHAR.RC OTHER.RC PACKAGEDELIM.RC *KEYWORD-PACKAGE* +FIRST.RMC ALONE.RMC *READTABLE* ESCAPE.RC MULTIPLE-ESCAPE.RC \PNAMELIMIT \FATPNAMESTRINGP +*INTERLISP-PACKAGE* LEFTPAREN.RC PROPRB.RT NOPROPRB.RT LEFTBRACKET.RC RIGHTPAREN.RC RIGHTBRACKET.RC +STRINGDELIM.RC BREAKCHAR.RC) \DL.MARK.PAGES.UNAVAILABLE (\RPOFFSET \RPTENTRYLENGTH) VKBD.FIX.FONT ( +VKBD.CONFIGURATIONS) WHATIS (FILELST) SI::PRINT-TRACE-EXIT-INFO (*TRACE-DEPTH* BOLDFONT DEFAULTFONT) +\PS.BOUTFIXP (\PS.TEMPARRAYLEN) FIND-READTABLE (\READTABLEHASH) \DL.UNMAPPAGES (\FPTOVP \VMAP.VACANT) +\RATOM/RSTRING-REFILL (\LINEBUF.OFD RATOM/RSTRING.FT) COMP.UBFLOAT2 (COMPILE.CONTEXT) HARDCOPYGRAPH ( +GRAPH/HARDCOPY/FORMAT) \10MB.OUTPUT.INTERRUPT (\ES.PENDING) \TOP-LEVEL-READ (*READTABLE* +*INTERLISP-PACKAGE* *PACKAGE* READ.RT UPPERCASEARRAY \PNAMELIMIT \FATPNAMESTRINGP) COMPILER::META-EVAL-IF + (:ARGUMENT) \TEDITPARAMENU.CREATE (TEDIT.PARAMENU.SPEC) \LFGenerateFiles (\LFtopMonitor) \DO.PROGV ( +WORDSPERQUAD CELLSPERQUAD) \READCREFILL (\LINEBUF.OFD READC.FT) COMP.BIND.VARS (CODE OPNIL MAXBVALS +EXP FRAME) \8859PEEKCCODEFN (*ISO8859TOXEROXMAP*) \CREATEW1 (WBorder) FIND.MATCHING.QUOTE ( +\MAXTHINCHAR \RDTBLSA STRINGDELIM.RC ESCAPE.RC) FILLRECTANGLE.IP (MicasToDev MASKRECTANGLE) +\UFS.ABORT.DIRECTORY (FILEGROUP) FIND-EDIT-LOCATION (*REMOVE-INTERLISP-COMMENTS*) \FM.LAYOUTCOLUMN ( +\FM.PROPSPEC BLACKSHADE \FM.BOXSPACE \FM.GROUPSPEC) EDITBMRESHAPEFN (GRIDTHICKNESS NORMALGRIDSQUARE +MINGRIDSQUARE) GRAPHOBJ.PUTALIGN (FILERDTBL) SHOWSTACKBLOCKS (\InterfacePage \STK.FSB \STK.GUARD +\STK.FX \STK.NOTFLAG WORDSPERCELL .I7) MENUDESELECT (WHITESHADE) SUBFIELDCREATE (RECORD.TRAN RNAME +MSBLIP FIELDS.IN.CREATE) \UFS.ABORT.CL-DIRECTORY (GENERATOR) PURGEHISTORY (LISPXHISTORY EDITHISTORY +LASTHISTORY ARCHIVELST LISPXCOMS) READTABLEPROP (\READTABLEHASH) SEDIT::EDIT-SELECTION (SEDIT:*EDIT-FN* +) SI::PRINT-TRACE-ENTRY-INFO (*TRACE-DEPTH* BOLDFONT DEFAULTFONT) LAYOUTGRAPH (DEFAULT.GRAPH.NODEFONT +DEFAULTFONT) SKIPSEPRCODES (SEPRCHAR.RC \MAXTHINCHAR) \GTREADTABLE (*READTABLE*) +\UFS.CLEANUP.GFS.TABLE (\UFS.GFS.TABLE) MSCHECKBLOCKS (SYSLOCALVARS FILELST MSFNTYPES DONTCOMPILEFNS) +MB.CREATE.THREESTATEBUTTON (THREESTATEIMAGEFNS) COMPARE1 (COMMENTFLG LOOSEMATCH) \FM.LAYOUTROW ( +\FM.PROPSPEC BLACKSHADE \FM.BOXSPACE \FM.GROUPSPEC) XCL::WALK-DECLARATIONS (XCL::*ENVIRONMENT*) +COMP.FLOATUNBOX (CODE) \VFMCreateVPage (\VFMvolumeHandle \PFFileMapFileD) \VAMAllocPageGroup ( +\VAMmonitor) INITIALIZECOLOR.IP (MAKEVEC FINDCOLORMODELOPERATOR DO) INSPECT/TOP/LEVEL/LIST ( +MAXINSPECTCDRLEVEL PROMPTWINDOW) FOREST/BREAK/CYCLES (NODELST) \FAULTHANDLER (\InterfacePage \FAULTFXP +) \UFSMakeUnixFormatName (\UFSDefaultDelimiter) SEDIT::CLOSE-NODE-LITATOM (SEDIT::TYPE-STRING) +\SEQUIN.HANDLE.INPUT (\PT.SEQUIN \SEQUIN.BROKEN \SC.OUTOFRANGE \SC.AHEAD \SEQUIN.RESTART \SC.DUPLICATE + \SC.PREVIOUS \SEQUIN.DALLYING \SEQUIN.DATA \SS.OPENING \SS.OPEN \SS.CLOSING \SEQUIN.QUIT \SS.CLOSED +\SEQUIN.DESTROY \SS.DALLYING) SKREAD (\MAXTHINCHAR RIGHTPAREN.RC RIGHTBRACKET.RC) \LFEventFn ( +\LFtopMonitor) \NSRANDOM.READ.SEGMENT (BYTESPERPAGE AppendBit WriteBit) DMCHAT.HANDLECHARACTER ( +\MACHINETYPE \DORADO INVERTWINDOWFN) INFILECOMSMACRO (ONFILETYPE MACROPROPS) CL:MAKE-CONCATENATED-STREAM + (%%CONCATENATED-STREAM-DEVICE) MSDWIMTRAN (FNNAME FNDEF) I.S.OPR (DFNFLG I.S.OPRLST) +\UFSParse-Directory (\UFSDefaultDelimiterChar \UFSDefaultDelimiter \DSK.DEFAULT.DIRECTORY +\UFS.DEFAULT.DIRECTORY) MSCHECKBLOCK (SPECVARS LOCALVARS GLOBALVARS RETFNS BLKLIBRARY NOLINKFNS +LINKFNS DONTCOMPILEFNS SYSSPECVARS SYSLOCALVARS MSDATABASELST) COMPILER::REMOVE-EFFECT (:NONE :ANY) +\LFDirectoryNameP (\LFtopMonitor) \8859INCCODEFN (*ISO8859TOXEROXMAP*) MAKEHASHLINKS (USINGEXPR +USINGTYPE) LISPXREAD (LISPXREADFN) CL:READ (*STANDARD-INPUT* *READTABLE* READ.RT UPPERCASEARRAY +\PNAMELIMIT \FATPNAMESTRINGP) CONDITIONS::%%RESTART-PRINTER (CL::%%DEFAULT-PRINT-FUNCTION) +\SETNEWTIME0 (PROMPTWINDOW) \ASSURE.FPTOVP.PAGE (\InterfacePage WORDSPERPAGE \FPTOVP) +CL:READ-PRESERVING-WHITESPACE (*STANDARD-INPUT* *READTABLE* READ.RT UPPERCASEARRAY \PNAMELIMIT +\FATPNAMESTRINGP) \TEDIT.HARDCOPY.DISPLAYLINE (LMInvisibleRun LMLooksChange) CREATEW1 (WBorder +MinWindowWidth MinWindowHeight \CURSORSCREEN) SETCOLOR.IP (BLACKSHADE SETGRAY WHITESHADE PRINTSERVICE) + CL:READ-DELIMITED-LIST (*STANDARD-INPUT* *READTABLE* READ.RT UPPERCASEARRAY \PNAMELIMIT +\FATPNAMESTRINGP) BACKWARD.DELETE.TO (\CURSOR) \INVALIDADDR (\MP.INVALIDADDR) \UFS.PARSE.BODY ( +\UFSBeforeType \UFSBeforeVersion) SHOWSTACKBLOCK1 (.I7) CL:PARSE-INTEGER (CMLRDTBL \MAXTHINCHAR +SEPRCHAR.RC) MENUSELECT (MENUSELECTSHADE) MSPRGDWIM (VARS) \LOOKUPPAGEMAP (\PageMapTBL \EMPTYPMTENTRY +\PAGEMAP) COMPILER::META-EVAL-CALL (:ARGUMENT :EFFECT :NONE :STMTS :VALUE :FORM :FN :ARGS) +COMPILER::EFFECTS-UNION (:NONE :ANY) PRIN2-LONG-STRING (*READTABLE* \MAXTHINCHAR SEPRCHAR.RC) +\FM.FORMATEXPLICIT (\FM.GROUPSPEC) \FM.FORMATBYGRID (\FM.GROUPSPEC) COMP.TOPLEVEL.COMPILE (LOCALVARS +SPECVARS *BC-MACRO-ENVIRONMENT* :PARENT OPCODEPROP LAPFLG LSTFIL BYTEASSEMFN TOPFN) +COMP.LOOKFORDECLARE (COMMENTFLG) PFI.ESTIMATE.SIZE1 (*PFI-MAX-WASTED-LINES*) \IDLE.OUT (IDLE.PROFILE +\LASTUSERACTION) CMLRDTBL (\MAXTHINCHAR) COMPILER::ALPHA-LAMBDA (COMPILER::*NULL-CONTEXT*) \INVALIDVP +(\MP.INVALIDVP) FINDATOM (EXPR) COMPILER::META-EVAL-CATCH (:ARGUMENT) DUMPGRAPH (FILERDTBL) +RIGHTW.REPAINTFN (INSPECTPRINTLEVEL) CL:KEYWORDP (*KEYWORD-PACKAGE*) INIT/NODES/FOR/LAYOUT (NODELST) +PFI.ESTIMATE.SIZE (:DEFINITION-PRINT-TEMPLATE :BODY) LOWERCASE (LCASEFLG) \AUTHENTICATION.FIND.SERVER +(\AUTHENTICATION.SOCKET AUTHENTICATION.NET.HINT) LISPXUNREAD (HISTSTR3 HISTSTR0) CH.LIST.PROPERTIES ( +\CH.BROADCAST.SOCKET) CHDIR (\UFStopMonitor) GETFIELDFORCREATE (RECORD.TRAN FIELDS.IN.CREATE MSBLIP +USINGTYPE) PURGEHISTORY1 (EDITHISTORY) RSTRING (\PNAMELIMIT \FATPNAMESTRINGP) +ExtensionForPrintFileType (PRINTFILETYPES) \FLUSHPAGE (\MP.WRITING.LOCKED.PAGE \LASTVMEMFILEPAGE +\GUARDVMEMFULL \PAGEMAP \PageMapTBL \FPTOVP \NO.VMEM.PAGE \IFPValidKey \FirstVmemBlock \RPOFFSET) +\RSTRING2 (\MAXTHINCHAR CRLF.EOLC ANY.EOLC OTHER.RC ESCAPE.RC *READTABLE* LF.EOLC CR.EOLC +STRINGDELIM.RC SEPRCHAR.RC \PNAMELIMIT) \TRANSFERPAGE (\VMAP.DIRTY \EMBUFBASE WORDSPERPAGE +\VMAP.VACANT \EMBUFVP \RPOFFSET \EMBUFRP \MISCSTATS) \POLYSHADE.XSCAN.IP (MIN.INTEGER MAX.INTEGER) +\UFSGetFileTypeConfirm (FileTypeMenu) LISPX (LISPXMACROS LISPXHIST HELPFLAG LISPXHISTORY +LISPXHISTORYMACROS MACROPROPS HISTSTR2 HISTSTR0) \PUTBASEFIXP (\SMALLP MASKWORD1'S \FIXP) +\UFSGetPrintFileType (DEFAULTFILETYPELIST) READOCT (RAIDIX) READ-EXTENDED-TOKEN (UPPERCASEARRAY +\MAXTHINCHAR ESCAPE.RC MULTIPLE-ESCAPE.RC \PNAMELIMIT \FATPNAMESTRINGP) \SETMACROSYNTAX (\MAXTHINCHAR +ALWAYS.RMC ESC.RME NONIMMEDIATE.RMW) \SEQUIN.FLUSH.CONNECTION (\SS.ABORT) \VFMInsertPageGroup ( +\VFMmonitor nullVolumePage) \SMASHSTRING (\MAXTHINCHAR) \NSRANDOM.PREPARE.CACHE ( +*NSFILING-PAGE-CACHE-LIMIT*) \READTABLEP.DEFPRINT (*READTABLE*) ADDCHAR (\RMARG) DELETETO (\BUFFER +\DSP) IFCDECLARE (DECLARETAGSLST) \ATBLSET (:XCCS) FW-CHANGE-ANCHOR (PROMPTWINDOW) BREAK1 (:FORM +:ENVIRONMENT :STACK-POSITION :CONDITION :FUNCTION) ERASE.TO.END.OF.PAGE (\DSP \BMARG \LMARG \DESCENT +\RMARG) MSINIT (MSDATABASEINIT USERTEMPLATES) AS.DELETE.PASSWORDS (AS.WELL.KNOWN.NAME) EDITBMREPAINTFN + (NOTINUSEGRAY GRIDTHICKNESS) BITBLT.ERASE (\TEXTURE \DSP) PRINTLEAF (\PUPOVLEN \SEQUIN.DATA SEQUINOPS + \LEAFOP.OPEN \LEAFOP.CLOSE \LEAFOP.READ \LEAFOP.WRITE \LEAFOP.ERROR LEAFOPCODES \LEAFOP.RESET +BYTESPERPAGE BITSPERWORD) ERRORMESS1 (*STANDARD-OUTPUT*) \NSFILING.ADD.TO.CACHE (FILING.CACHE.LIMIT) +BRKDWNBOXES (BDLST) SI::COMPILED-FUNCTION-DEBUGGING-INFO (WORDSPERQUAD BYTESPERWORD BYTESPERCELL) +DOUSERFNS2 (LAMBDASPLST) DO.CRLF (\CHARHEIGHT \DSP) COS (PI/180) \CLIPANDDRAWLINE1 (\CURSORDESTINATION + \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS) PRINDOTP (RMARGIN *STANDARD-OUTPUT* FIRSTPOS) +TWODINSPECT.ARRANGEWINDOWS (MAX.SMALLP) \MOVEREALPAGE (\EMBUFVP \RPOFFSET \EMBUFBASE WORDSPERPAGE +\EMBUFRP) SIN (PI/180) XCL::WALK-BINDINGS-1 (XCL::*LEXICAL-VARIABLES*) READ/NODE (LASTMOUSEBUTTONS) +COMP.BOX (CODE) \SPECIALRP (\VP.STACK \RP.STACK \VP.DISPLAY \RP.DISPLAY) CREATE.PACKET.EXCHANGE.XIP ( +\XIPT.EXCHANGE \XIPOVLEN) SI::CLEAN-UP-CL-ARGLIST (:REQUIRED) TEDIT.PUT.PAGEFRAMES ( +*TEDIT-FILE-READTABLE*) STRING-EQUAL (SLEN1 SLEN2 BASE1 TYPENUMBER1 BASE2 TYPENUMBER2) +ERASE.TO.END.OF.LINE (\DSP \DESCENT \RMARG \CHARHEIGHT) \SELECTREALPAGE (\MAXCLEANPROBES \MINSHORTSEEK + \REALPAGETABLE \PAGETABLESTOPFLG \MP.CHAIN.UNAVAIL \RPOFFSET \RP.STACK \MACHINETYPE \DANDELION +\DAYBREAK \VMEM.FULL.STATE \LASTVMEMFILEPAGE \MAXSHORTSEEK \MP.FLUSHLOCKED \PAGEMAP \MP.MAPNOTLOCKED +\VMAP.VACANT \MP.SELECTLOOP) \10MBENCAPSULATE (\10MBHOST.WORDS \MY.NSADDRESS \10MBENCAPSULATION.WORDS) + SUPERPRINT/WRAPPER (*STANDARD-OUTPUT* RMARGIN LEFT) NLAMBDAFNP (NLAMA NLAML) \UPDATECHAIN ( +\REALPAGETABLE \PAGETABLESTOPFLG \PAGEMAP \MP.MAPNOTLOCKED \RPOFFSET \VMAP.REF) POSITION ( +*STANDARD-OUTPUT*) SI::COMPILED-FUNCTION-INTERLISP? (:INTERLISP) READBQUOTECOMMA (*READTABLE*) +\MAIKO.DISPLAYLINE (WHITESHADE LMInvisibleRun LMLooksChange BLACKSHADE) INIT.CURSOR (\DSP +\TTPAGELENGTH \CHARHEIGHT) PRINTVA (.I2) COMPPRINT (COUTFILE) MAKEDOTPTAIL (\DEDITDPHASH) DOUSERFNS ( +LAMBDASPLST) OVERFLOW? (\CURSORCOL \RMARG \ARROW \CURSOR) MAKE-READER-ENVIRONMENT (*PACKAGE* +*READTABLE* *PRINT-BASE* *DEFAULT-EXTERNALFORMAT*) \NSRANDOM.STREAM.CHANGED (AppendBit WriteBit +BYTESPERPAGE) \IDLE.WAIT (\IDLING.OVER) PFI.ADD.TO.INDEX (:NONE *PFI-PAGE-COUNT*) GETVERBTABLES ( +MSDATABASELST) CANONICAL.HOSTNAME (\DEVICENAMETODEVICE \HOSTNAMES) SI::PARSE-CL-ARGLIST (:REQUIRED) +INITIALIZEMASTER.IP (NOVERSIONENCODINGSTRING INTERPRESSVERSION) UNSAVEDEF (DFNFLG) HISTORYSAVE ( +HISTSTR3 HISTSTR2 REDOCNT %#REDOCNT EDITHISTORY EDITSTATS LISPXSTATS) BESTPUPADDRESS (\PUP.READY +\LOCALPUPNETHOST \ETHERPORTS \RT.INFINITY \PUP.ROUTING.TABLE.RADIUS \ETHERTIMEOUT) IFCPROPSCAN ( +ONFILETYPE SYSPROPS) PRIN2STRING (*DIVIDE-LONG-STRINGS* RMARGIN *STANDARD-OUTPUT* FIRSTPOS) ADDTO ( +MSFNDATA INCLISP) BACKSKREAD (\BUFFER \MAXTHINCHAR \RDTBLSA LEFTPAREN.RC LEFTBRACKET.RC ESCAPE.RC +STRINGDELIM.RC MULTIPLE-ESCAPE.RC OTHER.RC RDTBL) DECLARERECORD (RECORDTRANHASH DFNFLG) +SEDIT::ASSIGN-FORMAT-LITATOM (:KEYWORD) \READREFILL (\LINEBUF.OFD READ.FT) COMP.PROGN (COMPILE.CONTEXT + CODE OPPOP) \TEDITMENU.SELSCREENER (TEDIT.SCRATCHSELECTION) LISPXFIND (ARCHIVELST HISTSTR0) +SHOWWFRAME (BLACKSHADE WHITESHADE) GRAPHOBJ.GETALIGN (FILERDTBL) FW-REPAINTFN (FW-OFDList) +COMP.TRANSFORM (COMPILE.CONTEXT *BC-MACRO-ENVIRONMENT* COMPILERMACROPROPS) EDITCHANGEFONT ( +PROMPTWINDOW) MAKECREATELST1 (MSBLIP USINGTYPE COMMENTFLG) OPENNSOCKET (\MISCSTATS) +\NSFILING.MAYBE.CREATE (:ASKED DWIMWAIT) COMP.ASET (ALLDECLS COMPILE.CONTEXT) +ONEDINSPECT.ARRANGEWINDOWS (MAX.SMALLP) FONTCREATE (\DEFAULTCHARSET IMAGESTREAMTYPES) +SEDIT::ATOM-POINT-TYPE (*READTABLE*) COMP.AREF (ALLDECLS COMPILE.CONTEXT) TTBITWIDTH (\FONT) +\SEND.EXPEDITED.XIP (\MAXETHERTRIES \ETHERTIMEOUT \XIPT.EXCHANGE \COURIERMSG.RETURN \COURIERMSG.REJECT + \COURIERMSG.ABORT \XIPT.ERROR \XIPE.NOSOCKET) \APPLYREADMACRO (*READTABLE*) \PFEnsureInitialized ( +\PhysVolumePage) FILEBLOCKTRAILER (OUTX \UsedArrayFlagWord) \INTERNAL/SETPASSWORD (\GETPASSWORD.LOCK +LOGINPASSWORDS \InterfacePage UPPERCASEARRAY \AFTERLOGINFNS) UNDOLISPX2 (UNDOSTATS) INSPECTW.REPAINTFN + (INSPECTPRINTLEVEL) INTERSECTREGIONS (MIN.FIXP MAX.FIXP) LLSH (\FIXP \SMALLP \FLOATP MAX.POS.HINUM) +\POLYSHADE.DISPLAY (MIN.SMALLP MAX.SMALLP) CHAT.CHOOSE.EMULATOR (CHAT.DISPLAYTYPES) \SUBREADCONCAT ( +\FATPNAMESTRINGP) FILL.INITTBLE (\TOPWDS \SCREENBITMAPS) \PFVersionOK (pilotVersion) EDITBMSCROLLFN ( +SCREENWIDTH SCREENHEIGHT WHITESHADE) TTBIN (EDITPREFIXCHAR \DSP) RAIDROOTFRAME (VMEMFILE +\InterfacePage) \INVALID.SYMBOL (:NAME *KEYWORD-PACKAGE* \FATPNAMESTRINGP) TTWAITFORINPUT (\DSP +LASTMOUSEBUTTONS \CHARHEIGHT LASTMOUSEX LASTMOUSEY \BUFFER \ENDBUFFER \BMARG \TTPAGELENGTH \LOC.ROW.0 +\TTYINSTATE) SI::CONSTRUCT-MIDDLE-MAN (:UPCASE) SHOWWTITLE (WINDOWTITLESHADE BLACKSHADE +WINDOWTITLEPRINTLEVEL) ETHERPORT (\ETHERPORTS) COMP.BLOCK (COMPILE.CONTEXT) FSET.IP (FSET) +TEDIT.FORMATTEDFILEP (TEDIT.DEFAULT.CHARLOOKS) \TFBRAVO.READ.PARALOOKS (USER.CM.PARALOOKS) TTYIN ( +TTYINFILLDEFAULT TTYINRAISEFLG \PRIMTERMTABLE TYPEAHEADFLG TTYINWORDRDTBL DEFAULTPROMPT) +INFILECOMSPROP (ONFILETYPE) \TEDIT.HARDCOPY.FORMATLINE (FORMATTINGSTATE TEDIT.DONT.LAST.CHARS +TEDIT.DONT.BREAK.CHARS DEFAULTFONT) MAKEINITBFS (\NWORDS.DSKOBJ \FIXEDLENDISKREQUEST +\DEFAULTDASTORAGELENGTH \LENCB BITSPERWORD) EDITCHANGELABEL (PROMPTWINDOW) \INTERNAL/GETPASSWORD ( +LOGINPASSWORDS) TTSKREAD (\ENDBUFFER \MAXTHINCHAR \RDTBLSA LEFTPAREN.RC LEFTBRACKET.RC RIGHTPAREN.RC +RIGHTBRACKET.RC STRINGDELIM.RC ESCAPE.RC MULTIPLE-ESCAPE.RC OTHER.RC RDTBL) \FM.FORMAT (\FM.PROPSPEC +BLACKSHADE \FM.BOXSPACE) READGRAPH (FILERDTBL) CLOSEPOSTSCRIPTSTREAM (:EOL) MSPRGLAMBDA (VARS +CL:LAMBDA-LIST-KEYWORDS FNNAME MSCHANGEDARRAY LAMBDATRANFNS) TTYIN.READ (\ENDBUFFER \MAXTHINCHAR +\RDTBLSA RIGHTPAREN.RC RIGHTBRACKET.RC ESCAPE.RC \NORUNCODE \LINEBUF.OFD READING.LBS) SEDIT::INITIALIZE + (SEDIT::GAP-BITMAP SEDIT::ARGS-BITMAP SEDIT::BODY-BITMAP) COMPILER::CONSTRUCT-PROG1-TREE (:VARIABLE +:REQUIRED :BODY :STMTS :FN :ARGS) GETCHATWINDOW (CHAT.WINDOW.SIZE CHAT.WINDOW.REGION) BRV/OFFSET ( +NODELST TERMY) TTYIN.SETUP (\DSP \SCREENBITMAPS) CH.NUMBER.TO.PROPERTY (CH.PROPERTIES) PRINTADDRS (.I7 + .I5) HISTORYFIND (LINE LISPXFINDSPLST HISTORY TYPE BACKUP QUIETFLG) COMP.ATTEMPT.COMPILE (COUTFILE +BYTECOMPFLG SPECVARS LOCALFREEVARS) MAKEMACFORMAT (:MACINTOSH) \BUILD.EXPEDITED.XIP (\COURIERMSG.CALL +\XIPOVLEN) PRINTFILETYPE (PRINTFILETYPES) TTYIN.FINISH (RDTBL \ARROW \MAXTHINCHAR \RDTBLSA ESCAPE.RC +ECHOTOFILE \BUFFER TTYINCOMMENTCHAR \LINEBUF.OFD TTYINRESPONSES) EQUAL-READER-ENVIRONMENT (:XCCS) +\IMAGEIOINIT (\CURRENTDISPLAYLINE NSCHARSETSHIFT) UNDOLISPX (LISPXHISTORY) \ITEM.WINDOW.COPY.HANDLER ( +LASTMOUSEBUTTONS) DCODERD (*READTABLE* FILERDTBL CODERDTBL WORDSPERQUAD BYTESPERQUAD CELLSPERQUAD +\NT.PVARCODE \NT.FVARCODE \NT.IVARCODE) TTYINREAD (\LINEBUF.OFD LISPXID HISTSTR0) \SEQUIN.CONTROL ( +\PUPOVLEN) \MEDW.BLTCHAR (\CURSORDESTINATION \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS) UNBREAK0 (:IN) +XCL::WALK-ARGLIST (CL:LAMBDA-LIST-KEYWORDS) TTYIN1 (\FONT \DSP \LMARG \CURSORCOL \CHARWIDTH OPTIONS +HISTSTR1 HISTSTR0 RDTBL TTYINREADMACROS \BUFFER \ENDBUFFER \MAXTHINCHAR \PRIMTERMSA CHARDELETE.TC +LINEDELETE.TC WORDDELETE.TC RETYPE.TC \FIRSTLINE DISPLAYTERMFLG \RDTBLSA IMMEDIATE.RMW RIGHTPAREN.RC +RIGHTBRACKET.RC USERWORDS LASTWORD DIDESCAPECODE \PROMPTFORWORD STOPATOMBIT EOLCHARCODE +TTYINCOMMENTCHAR DORADO.RESTORE.BUF.CODES TTYIN.RESTORE.BUF.CODES) WTFIX1 (NOSPELLFLG DWIM.GIVE.UP.TIME DWIM.GIVE.UP.INTERVAL EXPR LISPXHIST LISPXHISTORY WTFIXCHCONLST LPARKEY CLISPCHARRAY CLISPCHARS WTFIXCHCONLST1 COMMENTFLG DWIMUSERFORMS FAULTARGS SPELLINGS2 CLISPCONTEXT CLISPISWORDSPLST - TAIL PARENT CLISPINFIXSPLST :RESPELL) CLISPFUNCTION? (NOFIXFNSLST0 NOFIXFNSLST CLISPCHARRAY -SPELLINGS2) \\GETSPP (SPP.USER.TIMEOUT) \\PUTD (\\DEF.HI \\ST.CODE) UNDOLISPX (LISPXHISTORY) BREAKLINE - (\\CURSORCOL) MENUWRESHAPEFN (BLACKSHADE) COMPILER::ALPHA-MV-PROG1 (COMPILER::*CONTEXT* :STMTS -COMPILER::*EFFECT-CONTEXT*) FASL::FAT-STRING-P (%THIN-CHAR-TYPENUMBER \\ST.BYTE %FAT-CHAR-TYPENUMBER -\\ST.POS16) BEGINMASTER.IP (BEGINMASTER) \\CANONICAL.HOSTNAME (\\HOSTNAMES) SI::UNWIND-TO-BLIP ( -MYALINK \\STACKHI \\#ALINK.OFFSET WORDSPERCELL) CLEARSTK (\\STACKP \\STACKHI WORDSPERCELL -|\\MDSIncrement|) BSPREADP (\\PT.MARK \\PT.AMARK) \\CLIPANDDRAWLINE (BLACKSHADE \\CURSORDESTINATION -\\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS) HARDRESET (|\\ResetFXP|) \\DEVICE.INPUT (MISC1) -CL:SYMBOL-VALUE (:EXPECTED-TYPE :CULPRIT) STRING.EQUAL (\\PNAME.HI \\PLIST.HI %FAT-CHAR-TYPENUMBER -\\ST.BYTE \\MAXTHINCHAR) PRINTHISTORY (EDITHISTORY) COURIER.READ.NSADDRESS (\\#WDS.NSADDRESS) COMPERRM - (COUTFILE) RELSTKP (\\STACKHI \\#ALINK.OFFSET) TOPW.ADJUSTSELECTION (INSPECTPRINTLEVEL) -\\LEAF.SETCREATIONDATE (\\LEAFOP.WRITE \\OPCODE.SHIFT \\BYTES.PER.TRIDENT.PAGE \\LEN.DATE -\\LEN.FILEREQUEST) \\LEAF.DELETEFILE (\\LEAFOP.DELETE \\OPCODE.SHIFT \\LEN.CLOSEREQUEST) -INSPECTW.REDISPLAY (INSPECTPRINTLEVEL |PropertyLeftMargin| |MinSpaceBetweenProperyAndValue|) -\\SFROTATECSINFOOFFSETS (\\MAXTHINCHAR \\MAXCHAR) SI::VARIABLE-NAME-IN-FRAME (\\STACKHI |\\AtomHI|) -FILL.XPER (\\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS) COMP.CARCDR ( -COMPILE.CONTEXT EXP) COMP.GLOBALVARP (GLOBALVARS) |\\LFCreateFile| (|tLispFile| |\\LFdevice| -\\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS FILELINELENGTH LF.EOLC |NoBits| |\\LFrunSize|) -\\FILLPOLYGON.PSC (:EOL FILL.WRULE POSTSCRIPT.TEXTURE.SCALE) COMPILER::GENCODE-BLOCK ( -COMPILER::*CURRENT-FRAME*) \\TEDIT.EXPANDEDPARA.MENU (TEDIT.EXPANDEDPARA.MENU) \\TEDIT.CLOSEUPLINES ( -WHITESHADE) \\SETUPSTACK1 (WORDSPERQUAD \\STACKHI WORDSPERCELL \\STACKSPACE \\STK.BF.WORD -\\#ALINK.OFFSET) \\TFBRAVO.PARSE.PROFILE.PARA (NEXTPARAPTR PROFILE.PARA.RDTBL PTSPERINCH) -FB.UPDATEBROWSERITEMS (FB.BROWSERFONT FB.INFO.FIELDS UPPERCASEARRAY) EDITBMSCROLLFN (SCREENWIDTH -SCREENHEIGHT WHITESHADE) \\MAKEBASEBYTESTREAM (\\BASEBYTESDEVICE \\STREAM.DEFAULT.MAXBUFFERS -\\NOIMAGEOPS FILELINELENGTH LF.EOLC |NoBits| BITSPERBYTE) XCL::MAKE-IMPLICIT-KEY-HASH-TABLE (:FIRST -:BASE PTRBLOCK.GCT :LAST-INDEX :NUM-SLOTS :NUM-KEYS :NULL-SLOTS :KEY-ACCESSOR) |\\VFMPutNext| ( -|\\VFMold| |\\VFMbuffer|) BEGINPAGE.IP (BEGINPAGE) \\CANONICALIZE.PUP.HOSTNAME (FIXSPELLREL) -TEDIT.RAW.INCLUDE (DEFAULTFONT TEDIT.DEFAULT.FMTSPEC) |\\LFMakeVolumeDirectory| (|tLispDirectory| -|directorySize|) INITBITMASKS (WORDMASK) HASHFILEP (SYSHASHFILELST) \\DUMMYTELERAID (|\\TeleRaidFXP|) -\\RESETSTACK0 (|\\StackAreaSize| \\FAULTFXP |\\ResetFXP| \\DEF.HI \\STACKHI \\STK.FSB) -\\GET-COMPILED-CODE-BASE (\\DEF.HI \\COMPILED-CLOSURE) \\RESETSTACK (|\\ResetFXP|) CHECK.MARGIN ( -\\RMARG) |\\LFGetStreamForFile| (|\\LFdevice| :PATHNAME |tLispFile| MAX.SMALLP PROMPTWINDOW) -FASL::CLEAR-TABLE (FASL::*VALUE-TABLE*) MAXMENUITEMWIDTH (:ESCAPE MENUSUBITEMMARK) COMPILER::GENCODE-CATCH - (:ARGUMENT) WRITESTRIKEFONTFILE (\\MAXCHARSET) SETINITIALS (INITIALSLST) RECORD.FIELD.VALUE0 ( -USINGEXPR USINGTYPE) \\TELERAIDENTRY (\\TELERAIDBLOCK \\EM.CURSORBITMAP \\#WORDS.CURSOR -\\TELERAIDPACKET) \\RESETTERMINAL (|\\VideoColor|) ERASEPROPS (SMASHPROPSLST SMASHPROPSMENU) -UNDONLSETQ1 (UNDOSTATS) \\LEAF.GETFILE (\\LEN.OPENREQUEST \\LEAFOP.OPEN \\LEAF.READBIT \\LEAF.WRITEBIT - \\LEAF.EXTENDBIT \\LEAF.DEFAULT.HIGHEST \\LEAF.CREATEBIT \\LEAF.DEFAULT.NEXT \\LEAF.DEFAULT.LOWEST -\\LEAF.EXPLICIT.ANY \\LEAF.GOODSTATUS \\STREAM.DEFAULT.MAXBUFFERS \\NOIMAGEOPS FILELINELENGTH LF.EOLC -|NoBits| BYTESPERPAGE \\PASSWORD.ERRORS \\CONNECT.PASSWORD.ERRORS \\IFSERROR.INVALID.DIRECTORY -\\IFSERROR.MALFORMED \\LEAF.BROKEN.STATUS \\IFSERROR.PROTECTION \\IFSERROR.FILE.NOT.FOUND) -SET-READTABLE-INTERACTIVELY (\\READTABLEHASH) \\CH.CHECK.CLEARINGHOUSE (PROMPTWINDOW) \\KEYBOARDON ( -\\EM.DISPINTERRUPT |\\LispKeyMask| \\MACHINETYPE \\MAIKO) ICMLARRAY.GETMENUWGROUP (MAX.SMALLP) -|\\VAMEnoughSpace| (|tVolumeFileMap|) TOPW.BUTTONEVENTFN (INSPECTPRINTLEVEL LASTMOUSEBUTTONS) -FASL:OPCODE-SEQUENCE (FASL:*DEFAULT-OPTABLE* FASL::FASL-EXTENDED) EVALQT (LISPXHISTORY) CURRENT.WORD ( -\\ARROW \\CURSOR TTYINCOMMENTCHAR \\MAXTHINCHAR \\RDTBLSA OTHER.RC ESCAPE.RC MULTIPLE-ESCAPE.RC -STOPATOMBIT) |\\CreateCursorBitMap| (\\EM.CURSORBITMAP) COMP.DECLARE1 (FRAME) COMP.LAM1 (ALLVARS -SUBFNFREEVARS) \\LINEWITHBRUSH (\\TOPWDS \\SCREENBITMAPS \\CURSORDESTINATION \\EM.DISPINTERRUPT) -\\CENTICLOCK (\\CENTICLOCKBOX WORDSPERCELL \\RCLKMILLISECOND) OPT.DELCODE (FRAMES CL:LABELS FRA PRA) -IRM.CREF.BUTTONEVENTFN (BLACKSHADE LASTMOUSEBUTTONS) \\CONTEXTAPPLY (MYALINK |\\InterfacePage|) -HPRINT.IMAGEOBJ (HPRINTRDTBL) COMPILER::ALPHA-MACROLET (COMPILER::*ENVIRONMENT* :MACRO) -POSTSCRIPT.OUTSTR (%FAT-CHAR-TYPENUMBER \\PNAME.HI \\PLIST.HI) UNDOLISPX2 (UNDOSTATS) BITBLT ( -\\CURSORDESTINATION \\EM.DISPINTERRUPT \\TOPWDS \\SCREENBITMAPS) FILECODEBLOCK ( -|\\ArrayBlockOverheadCells| CELLSPERQUAD CODEBLOCK.GCT OUTX |\\CodeArrayFlagWord|) OPENSTRINGSTREAM ( -%FAT-CHAR-TYPENUMBER \\NORUNCODE) PAGEFAULTS (\\MISCSTATS) RETURN (MYALINK \\STACKHI \\#ALINK.OFFSET) -\\FBITMAPBIT.UFN (BITMASKARRAY NOTBITMASKARRAY) FASL::STORE-VALUE (FASL::*VALUE-TABLE* -FASL::VALUE-TABLE-INCREMENT) \\SETTOTALTIME (\\MISCSTATS) \\CREATE.TTYDISPLAYSTREAM (TTYREGIONOFFSETS -DEFAULTTTYREGION \\DEFAULTTTYDISPLAYSTREAM) \\BITBLT.BITMAP (BLACKSHADE) INTERRUPTED ( -\\CURRENTKEYACTION) \\LEAF.STREAM.IN.QUEUE (\\LEAFOP.WRITE \\LEAFOP.TRUNCATE \\LEAFOP.CLOSE -|AppendBit| |WriteBit|) \\SETUPUSERSTACK (|\\InitStackSize| \\STACKHI \\MAIKO \\FAULTFXP \\RECLAIMMIN) - \\SERIALNUMBER (|\\InterfacePage|) \\DOTELERAID (|\\TeleRaidFXP|) BREAKCONNECTION (\\FILEDEVICES) -\\TELERAIDSEND (\\PUPSOC.TELERAID \\NULLCHECKSUM \\3MBENCAPSULATION.WORDS) \\BLTSHADE.BITMAP ( -WHITESHADE BLACKSHADE) \\GATHER-CLEANUP-FORMS1 (|\\InterfacePage| \\STACKHI \\STK.FX WORDSPERCELL -\\STK.BF \\#ALINK.OFFSET) \\SEARCHOPENFILES (\\OPENFILES) \\CAUSEINTERRUPT (|\\InterfacePage| -\\STACKHI) FASL:PROCESS-SEGMENT (FASL:*DEFAULT-OPTABLE*) SI::BQUOTE-NCONC (SI::*BACKQUOTE-LEVEL*) -ADDTOCOM1 (COMSNAME) MACHINETYPE (|\\InterfacePage| \\DORADO \\DANDELION \\DAYBREAK \\MAIKO) -SEDIT::CREATE-QUOTED-GAP (SEDIT::TYPE-QUOTE SEDIT::QUOTE-WRAPPER-LIST) GRID (BLACKSHADE WHITESHADE) -\\FINDOP (\\OPCODES) \\PUSHSTATE.IP (DOSAVESIMPLEBODY {) STRIKECSINFO (\\MAXTHINCHAR) FASL:BEGIN-TEXT -(:TEXT) ARCTO.IP (ARCTO) SI::BQUOTE-APPEND (SI::*BACKQUOTE-LEVEL*) SCANFILE1 (FNLST LDFLG VARS) NIL -REF LISPXSTOREVALUE (VALUE VALUES) \\DSPTOPMARGIN.IP (IPSTREAM) TB.SHOW.SELECTION (BROWSER BM BASELINE - ITEM OPERATION) GN/BOTTOM (NODE) IOFILE (FILE) TEDIT.COPY.PARALOOKS (STREAM DEST TEXTOBJ) -SEDIT::UNDERLINE-SELECTION (SEDIT::SELECTION SEDIT::WINDOW SEDIT::SHADE) SEDIT::COMPLETE (SEDIT::CONTEXT - SEDIT::REASON SEDIT::OPTIONS) \\FTP.ERRORHANDLER (ERRCODE) OUTFILEP (FILE) OPENFILE (FILE ACCESS -RECOG PARAMETERS OPTIONAL) \\MOVEWORDS (DBASE DOFFSET SBASE SOFFSET NWORDS) OUTFILE (FILE) -\\TEDIT.SCALEREGION (REGION SCALEFACTOR) TWODINSPECT.REPAINTFN (WINDOW VERTMARKS ROWPROPS TOP BOTTOM -HORZMARKS COLUMNPROPS LEFT RIGHT FETCHFN DATUM FDESCENT) PRINTPACKETDATA (FILE LENGTH BASE STREAM) -\\PS.SCALEREGION (SCALE REGION) NS.ECHOUSER (ECHOHOST ECHOADDRESS TIMER) CL::%ASIN-FLOAT (CL::X CL::R2 -) COMPILER::ENV-ANALYZE-MV-PROG1 (COMPILER::NODE COMPILER::STMT) SEDIT::INSPECT-SELECTION (SEDIT::CONTEXT - $$OUTPUT) \\HCPYMODEBLTCHAR (CHARCODE DISPLAYSTREAM CHAR8CODE) \\ZEROWORDS (ENDBASE DIF) -\\TELERAIDCOMMAND (KEYNUMBER NDB) \\FINDOP (X OPNAME) SEDIT::PRETTY-PRINT (STREAM SEDIT::ROOT -CL:STRUCTURE SEDIT::RIGHT-MARGIN) DIRCONJ (CONJ) SEDIT::SETUP-CONTEXT-WINDOW-DEPENDENCIES (SEDIT::CONTEXT - SEDIT::WINDOW) COMPILER::META-SUBST-GO (COMPILER::NODE) \\ZEROBYTES (BASE FIRST LAST) COMP.DECLARE (A - B) CLOCKDIFFERENCE (OLDCLOCK) BACKWARD.DELETE.TO (BUF) FB.INSERT.DIRECTORY (TBROWSER FBROWSER -DATAWITHSUBDIR BEFOREITEM) |\\VAMFindFreePages| (|vol| |filePtr|) SCALEPAGEUNITS (FACTOR PAPERSIZE -OTHEREDGE) TWODINSPECT.BUTTONEVENTFN (WINDOW W RP CP DATUM SELECTEDROWPROP SELECTEDCOLUMNPROP) INFILE -(FILE) \\SWITCHFONTS.PSC (FONT FONTID STREAM) \\GC.MODIFY.BIGREFCNT (CASE) \\DSPROTATE.IP (IPSTREAM -ROTATION) TB.SELECT.ITEM (ITEM BROWSER N) INSPECT/MAKE/CCODEP (CODE) DISPLAYLINK/TB (PARAMS TRANS GNT -GNB WIDTH OPERATION STREAM) TEDIT.COPY.LOOKS (STREAM DEST TEXTOBJ) SEDIT::TRACK-SELECT (SEDIT::CONTEXT - SEDIT::WINDOW SEDIT::POINT-TYPE SEDIT::POINT? SEDIT::BAR-X SEDIT::BAR-LINE) \\FTP.WHENCLOSED ( -INSTREAM) COMPILER::STOP-UNBINDS-AT-FRAME-BOUNDARY (CONDITIONS:RESTART) ARG (VAR M) SEDIT::SETUP-CONTEXT - (SEDIT::CONTEXT) COMPILER::META-SUBST-CATCH (COMPILER::NODE A1678 A1677) COURIER.NSNAME.LENGTH (TYPE -NSNAME) COMP.COMMENT (A) \\NSGATELISTENER (NSOC TIMER) SEDIT::EQUALIZE-STRING-WIDTHS (SEDIT::STRING-LIST - SEDIT::FONT SEDIT::PRIN2?) %TYPE-SIZE-TO-TYPENUMBER (LIT-TYPE LIT-SIZE) \\UFS.RECOGNIZE.FILE (DEV -#:G846 FILENAME RECOG NAMEAREA ERRNO) MAKEPRESS (FILE PFILE FONTS HEADING TABS PRINTOPTIONS) -\\SENDLEAF (SEQUIN FILENAME DONTWAIT) COMPILER::FIND-COPIED-VARIABLE (COMPILER::VAR) -SEDIT::INSERT-SPECIAL-CHARACTER (SEDIT::CONTEXT CL:CHAR SEDIT::POINT STRING) \\SLOWHCPYMODEBLTCHAR ( -CHARCODE DISPLAYSTREAM CHAR8CODE) \\GETPILOTBBTSCRATCHBM (WIDTH HEIGHT) \\TELERAIDGET (RECEIVER NDB) -\\PRESSINIT (STREAM X Y) \\GC.LOOKUP.BIGREFCNT (ENTRY) COMPILER::ENV-ANALYZE-MV-CALL (COMPILER::NODE -COMPILER::ARG) COMPILER::COPY-VARIABLE (COMPILER::BINDER) SEDIT::INSERT-MULTI-ESCAPE (SEDIT::CONTEXT -TYPE CL:CHAR) \\INSUREBITSPERPIXEL (NBITS) COMPILER::META-SUBST-CALL (COMPILER::NODE) -COURIER.WRITE.NSNAME (STREAM NAME TYPE) COMP.QUOTE (A) ADDTOFILES? (VARSCHANGES F FL X I) MOVE.BACK.TO - (BUFTAIL) LASTCHPOS (STR CH) \\FILING.ATTRIBUTE.TYPE (ATTR NOERRORFLG) \\DSPRIGHTMARGIN.IP (IPSTREAM) - |\\VAMFilePageNumber| (|fileType| |filePageNumber| |volumePageNumber|) GN/LEFT (NODE) SIMPLE.FINDFILE - (DIRLST FILE) SEDIT::TRACK-EXTEND (SEDIT::CONTEXT SEDIT::$$SOURCE SEDIT::WINDOW) OPENBSPSTREAM ( -FAILURESTRING OTHERPUPHANDLER ERRORHANDLER IOTIMEOUT IOTIMEOUTFN WHENCLOSEDFN) FB.ADD.FILE (ITEM -FBROWSER TBROWSER BEFOREITEM) GETHOSTINFO (ATTRIBUTE) SEDIT::LOCATE-NODE-FROM-EDITCHAIN (SEDIT::ROOT) -TWODINSPECT.COPYBUTTONFN (WINDOW W RP CP) HARDCOPYW (WINDOW/BITMAP/REGION HARDCOPYTITLE) \\REFCNT (PTR -) POSTSCRIPT.SET-FAKE-LANDSCAPE (STREAM OLAND) RECORD.REMOVE.COMMENTS (X A D) DODIR (LISPXLINE NOP -DEFAULTEXT DEFAULTVERS) SEDIT::SET-DEPTH (SEDIT::DEPTH SEDIT::X) COMPILER::META-SUBST-BLOCK (COMPILER::NODE - A1676 A1675) HASHFILENAME (HASHFILE) COMP.COND (HERE CONTEXT END) \\SET.FINALIZATION.FUNCTION (TYPE -FN) FIND.MATCHING.QUOTE (END CHAR TABLE CH) COMPILER::META-EVAL-LABELS (A1642 COMPILER:CONTEXT A1641) -UNPACKPATHNAME.STRING (RESULT FILE) \\EQREFCNT1 (PTR) \\LEAF.CLOSEFILE (INTERNAL) XCL::PPRINT-DEFINER -(XCL::DEFINE-EXPRESSION TAIL) COMPILER::COPY-NODE-LIST (COMPILER::NODES COMPILER::NODE) -SEDIT::INPUT-TOKENDELIM (SEDIT::CONTEXT SEDIT::POINT SEDIT::CHARCODE SEDIT::POINTNODE) -\\STRINGWIDTH.HCPYMODE (STREAM STR WIDTHSBASE RDTBL) \\TYPENUMBERFROMNAME (INDEX) \\BLTSHADE.BITMAP ( -DESTINATIONBITMAP OPERATION) ARGINFO-MUNG (LST THING) \\UPF.NEXTPOS (STRING CHAR) -RIGHTW.ADJUSTSELECTION (WINDOW MAINWINDOW ROWPROPS VERTMARKS SELROWPROP ROWPROPSPACE) BITMAPBIT (X Y) -SEDIT::TTYFN (SEDIT::EVENT SEDIT::ATM TYPE SEDIT::COMPLETION-FN SEDIT::CONTEXT) TWODINSPECT.CLOSEFN ( -WINDOW) POSTSCRIPT.STARTPAGE (STREAM FONT) \\DSPSPACEFACTOR.IP (STREAM) TB.BOTTOM.OF.ITEM (BROWSER -ITEM) \\GC.BIGREFCNT.MISSING (PTR ENTRY) GN/TOP (NODE) \\UPF.TEMPFILEP (FILENAME START) -\\DSPCLIPTRANSFORMY (Y DD TY) SEDIT::SHRINKFN (SEDIT::WINDOW SEDIT::CONTEXT $$OUTPUT SEDIT::LOCK) -FNTYP (FN #:G858 #:G859) BSPOUTPUTSTREAM (BSPSTREAM) FILEPKGCOMPROPS (PROPS Y) TEDIT.GETPOINT (SEL -STREAM TSEL) \\DSPLINEFEED.IP (IPSTREAM) %DESTRUCTIVE-RESULT-VECTOR (VECTOR RESULT START) GN/RIGHT ( -NODE) BLTCHAR (CHARCODE DISPLAYSTREAM) FILEPKGTYPE (N) TEDIT (PROPS) \\DSPCLIPTRANSFORMX (X DD TX) -BACKSKREAD (BUF CHAR TABLE CH) FIND-LEXICAL-ENVIRONMENT (STACKPOS) NSNETDAYTIME0 (SOC) \\SLOWBLTCHAR ( -CHARCODE DISPLAYSTREAM) \\DSPPRINTCR/LF (DISPLAY-STREAM DD CHARCODE CLIPREG) TB.NORMALIZE.ITEM ( -BROWSER ITEM WINDOW CLIP BOT) DISABLEGC (NOERROR) \\CHANGECHARSET.DISPLAY (CHARSET CSINFO) SEDIT::RESHAPEFN - (SEDIT::WINDOW SEDIT::NEW-REGION SEDIT::OLD-IMAGE-REGION SEDIT::CONTEXT SEDIT::OLD-IMAGE SEDIT::OLD-BOTTOM -) \\FTP.SENDVERSION (CONNECTION OUTS INS ECHOSTREAM) \\USEREVENT (EVENT FN) |\\SFFixY| (Y CSINFO) -COPIEDTOSPEC (SPEC) TWODINSPECT.DEFAULT.VALUECOMMANDFN (SETMENU INSPECTMENU ROWPROP COLUMNPROP WINDOW) - FLASHWINDOW (SHADE) CREATEW (BORDERSIZE NOOPENFLG PROPS) CL::%TAN-FLOAT (CL::X CL::SIGN CL::R2) -COMPILER::ENV-ANALYZE-LAMBDA (COMPILER::NODE COMPILER::OPT-VAR COMPILER::KEY-VAR) COMPILER::COPY-NODE-VAR-REF - (COMPILER::NODE) SEDIT::INPUT-STRINGDELIM (SEDIT::CONTEXT SEDIT::POINT) CREATEREGION (LEFT BOTTOM -WIDTH HEIGHT) PRINT-BITMAPS-NICELY (BITMAP WIDTH BITS-PER-PIXEL HEIGHT) SEDIT::SELECT-NEXT-GAP ( -SEDIT::INDEX SEDIT::CONTEXT) COURIER.READ.NSNAME (STREAM TYPE) ADDTOFILE (NAME NEAR LISTNAME F) -\\DOGCDISABLEDINTERRUPT (W) \. (MASTERSCOPECOMMAND) COMPILER::MAKE-LAP-VAR (COMPILER::VAR) -RIGHTW.BUTTONEVENTFN (WINDOW MAINWINDOW P) \\FLUSHNDBS (EVENT) SEDIT::COMPLETION (TYPE CL:STRUCTURE -CL:ATOM) TWODINSPECT.DEFAULT.TITLECOMMANDFN (WINDOW TITLEMENU DATUM) AIN (APTR INDEX STRING FILE) -USERNAME (STRPTR PRESERVECASE) TB.FIND.PREVIOUS.TAIL (BROWSER ITEM#) SEDIT::REPAINTFN (SEDIT::WINDOW) -GCGAG (MESSAGE) \\TELERAIDSERVER (NDB IDLO IDHI KEYNUMBER EXCESS) < (CL::ARGS) \\WRITEBITMAP (BITMAP -FILE OFD W) = (CL::ARGS CL::FIRST-ARG) AOUT (APTR INDEX STRING FILE) \\TEDIT.SET.WINDOW.EXTENT ( -WINDOWS) UPDATEFILES (PRLST FLST PREVITEMS) TEDIT.STRINGWIDTH (STR STRING FONT) SET/LAYOUT/POSITION ( -NODE POS) \\FIXLINELENGTH.IP (IPDATA) COMPILER::ENV-ANALYZE-LABELS (COMPILER::NODE COMPILER::FUN) -COMPILER::COPY-NODE-UNWIND-PROTECT (COMPILER::NODE) CLISPIFY2B (X) TEXTUREP (OBJECT) SET/LABEL/SIZE ( -STREAM LAB SCALE) SETUSERNAME (ADDR) \\FILING.ATTRIBUTE.TYPE.SEQUENCE (ATTRIBUTETYPES ATTR) -\\DSPLEFTMARGIN.IP (IPSTREAM) INVERT.TEXTURE.BITMAP (BM SCRATCHBM NEWBM LASTBASE) DISPLAYLINK/LR ( -PARAMS TRANS GNL GNR WIDTH OPERATION STREAM) COMPILER::COPY-NODE-THROW (COMPILER::NODE) SEDIT::INPUT-QUOTE - (SEDIT::CONTEXT SEDIT::QUOTE-TYPE SEDIT::SELECTION SEDIT::CHARCODE SEDIT::POINT SEDIT::NODE) -INVERT.TEXTURE (TEXTURE SCRATCHBM) COMPILER::ENV-ANALYZE-IF (COMPILER::NODE) READBITMAP (FILE STRM -WIDTH HEIGHT) SEDIT::REVIVE-NODE (SEDIT::SUBNODE) COURIER.OPEN (HOSTNAME NAME W) SEDIT:RESET-COMMANDS -(SEDIT::COMMANDS) TEDIT.\\INSERT (STREAM TEXTOBJ CH CH# OTEXTLEN XPOINT) DBG::COLLECT-ACTIVE-ESCAPES ( -DBG::ESCAPE-1 DBG::ESCAPE-2) TB.RENUMBER.TAIL (TAIL FIRST#) |\\VFMSaveBuffer| (|notAll|) \\PNC (LEN -OFFST CH NV) OPPOSITECOLOR (BITSPERPIXEL COLOR) SEDIT::PUNT-SET-SELECTION (SEDIT::SELECTION SEDIT::CONTEXT - SEDIT::NODE) DODIRCOMMANDS (COMMANDS FILEGROUP COMDATE FILENAME) \\TELERAIDINIT (FN VAR) -TWODINSPECT.COLUMNWIDTH (COLUMNPROP FONT ROWPROPS FETCHFN DATUM) ARRAYSIZE (X) -\\TEDIT.HCPYLOOKS.UPDATE (TEXTOBJ BASEA1534 N ARR VAL BASEA1535 BASEA1536 BASEA1537 BASEA1538 -BASEA1539 BASEA1540 BASEA1541 BASEA1542) HARDCOPYIMAGEW.TOPRINTER (W IMAGETYPE) OPPOSITESHADE ( -BITSPERPIXEL SHADE) OPENPOSTSCRIPTSTREAM (FILE OPTIONS X) CREATETEXTUREFROMBITMAP (BITMAP W H) -SEDIT::REPLACE-ROOT (SEDIT::CONTEXT SEDIT::ROOT SEDIT::SUBNODES) COMPILER::COLLECT-NONLOCAL-VAR-EFFECTS - (COMPILER::VARS) HASHFILESPLST (XWORD) NSNAME.TO.STRING (DOM COLON ORG) COMP.FUNCTION (A) COPYARRAY ( -ARRAY NHARRAY SIZE TYPE ORIG) SEDIT:REPLACE-SELECTION (SEDIT::CONTEXT SEDIT::SELECTION -SEDIT::SELECTION-TYPE SEDIT::S CL:STRUCTURE SEDIT::POINT) > (CL::ARGS) |\\PFRoomForFile| (|groupPtr| -|filePtr| |vol|) SETD (A N BASEA1798 BASE V) \\WRITEPAGES (STREAM FIRSTPAGE BUFFERLIST) -COMPILER::COPY-NODE-TAGBODY (COMPILER::NODE COMPILER::NEW-TAGBODY COMPILER::SEGMENT) ELTD (A N -BASEA1797 BASE) ARRAYORIG (ARRAY) CLEARMAP (FILE STREAM PAGES) REHASH (OLDAR APTR1 BASEA1809 N BASE -NEWAR) TEDIT.HARDCOPY.PAGEHEADING (TEXTSTREAM IMAGESTREAM PARALOOKS TEXTOBJ HEADINGTYPE CHNO -FORMATTINGSTATE) HARDCOPYIMAGEW.TOFILE (W) \\COPYHARRAYP (SOURCE) MAXIMUMSHADE (BITSPERPIXEL) -\\READPAGES (STREAM FIRSTPAGE BUFFERLIST) TB.UPDATE.DISPLAY (BROWSER FROMITEM# TYPE ITEMHEIGHT WINDOW -ITEMBOTTOM) DOPMAP (STREAM PAGE# VMEMPAGE) ARRAYTYP (ARRAY) \\MEDW.BITBLT (SOURCE DESTINATION DSTWIN + TAIL PARENT CLISPINFIXSPLST :RESPELL) \MEDW.YOFFSET (MAX.SMALLP) \VFMGetPageGroup (\VFMmonitor) +DCODESKIP (*READTABLE* FILERDTBL CODERDTBL CODEINDICATOR) TTYIN1RESTART (\LINEBUF.OFD \TTYINSTATE) +SETINITIALS (INITIALSLST) \NOIMAGE.DSPFONT (FONTESCAPECHAR) MAXMENUITEMWIDTH (:ESCAPE MENUSUBITEMMARK) + IFCPROPS (TYPE) PRIN4 (PLVLFILEFLG *PRINT-LEVEL* *PRINT-LENGTH* *INTERLISP-PACKAGE* *PACKAGE*) +TTDELETELINE (\BUFFER) \ORIG-INVALID.SYMBOL (*KEYWORD-PACKAGE*) FW-BUTTONEVENTFN (LASTMOUSEBUTTONS) +\PUPINIT (\MACHINETYPE \MAIKO) EXEC-PRINT (*TERMINAL-IO*) \ALLOC.CODE.BLOCK (CODEBLOCK.GCT +CELLSPERQUAD) FLIPCURSORBAR (\EM.CURSORBITMAP MAX.SMALLP \MACHINETYPE \DAYBREAK \MAIKO) FW-AFTERMOVEFN + (FW-OFDList SCREENWIDTH SCREENHEIGHT) ETHERHOSTNUMBER (\PUP.READY \LOCALPUPNETHOST) INFILECOMSVAL ( +ONFILETYPE TYPE) \TEDIT-OPEN-FONT-FILE (MAX.SMALLP) \NSFILING.CONNECT (\NSFILING.NULL.HANDLE) CL:GENTEMP + (*PACKAGE* CL::*GENTEMP-COUNTER*) \LINEWITHBRUSH (\TOPWDS \SCREENBITMAPS \CURSORDESTINATION +\EM.DISPINTERRUPT) GO.TO.ADDRESSING (\LOC.ROW.0) RAIDSTACKCMD (\InterfacePage WORDSPERPAGE .I7 ALINKS? + RAIDIX) RECORD.FIELD.VALUE0 (USINGEXPR USINGTYPE) PROVIDE.PROMPTING.WINDOW (TTYREGIONOFFSETS +UNSCHEDULEDPROMPTREGION) ERASEPROPS (SMASHPROPSLST SMASHPROPSMENU) AT.END.OF.SCREEN (\ARROW \CURSOR +\CURSORCOL \CHARWIDTH \RMARG) BROWSE/LAYOUT/LATTICE (NODELST) RESTORE.CURSOR (\HOMECOL \HOMEROW) +\ALLOCATE.ETHERPACKET (\FREE.PACKET.QUEUE \XIPOVLEN) PRINTHISTORY (EDITHISTORY) ROUND (XCL::SROUND) +AS.CREATE.PASSWORDS (AS.WELL.KNOWN.NAME) PRINTHISTORY1 (HISTSTR2 HISTSTR0) BRKDWNCONSES (BDLST) +\CCLOSURE.DEFPRINT (*READTABLE*) \TFBRAVO.READ.CHARLOOKS (USER.CM.CHARLOOKS) HELPSYS (MACROPROPS +IRMWINDOW) POSTSCRIPT.BITMAPSCALE (POSTSCRIPT.BITMAP.SCALE POSTSCRIPT.PAGETYPE POSTSCRIPT.PAGEREGIONS +POSTSCRIPT.PREFER.LANDSCAPE \POSTSCRIPT.ORIENTATION.MENU) TB.CLEAR.LINE (WHITESHADE) +SUPERPRINT/COMMENT (RMARGIN COMMENTFLG COMMENTCOL LEFT COMMENTFONT TAIL) RINGBELLS (\MACHINETYPE +\DAYBREAK \DANDELION \MAIKO RINGBELLS.L1 RINGBELLS.L2) UNIX.SETDISPLAYTYPE (UNIXCHAT.TSET.DELAY) +\IDLE.PROMPTING.WINDOW (PROMPTWINDOW) PFI.DEFAULT.HANDLER (*PFI-DEFINER-PROPS* +:DEFINITION-PRINT-TEMPLATE *PFI-TYPES* :NAME *PFI-PAGE-COUNT*) PUTSEQUIN (\SS.OPEN \SEQUIN.DATA +\SS.UNOPENED \SS.OPENING \SEQUIN.OPEN \ETHERTIMEOUT) STRINGWIDTH (DEFAULTFONT) HREAD (HPRINTRDTBL) +MSPRGTEMPLATE (VARS MSMACROPROPS) CHAT.INIT (CHAT.IN.EMACS?) SEDIT::STRING-OFFSET (*READTABLE*) +FB.SHAPECOMMAND (SCREENWIDTH SCROLLBARWIDTH) BYTEBLOCKCOMPILE2 (RETFNS NOLINKFNS BLKAPPLYFNS) +MAKEIBMFORMAT (:IBM) \MAKESPACEFORLOCKEDPAGE (\VP.STACK \RP.STACK \VP.DISPLAY \RP.TEMPDISPLAY +\VP.FPTOVP \RP.FPTOVP \InterfacePage \RP.MISCLOCKED \FPTOVP) RAIDCOMMAND (RAIDIX \STACKHI .I2 \LITATOM + \NEW-ATOM \InterfacePage .I7 VMEMFILE BYTESPERPAGE) SETUPPAGEMAP (\PAGEMAP \PageMapTBL \NumPMTpages +\EmptyPMTEntry \NumPageMapPages \PMblockSize \FirstVmemBlock \LOCKEDPAGETABLE \NumLPTPages) +WORDSPERNAMEENTRY (:3-BYTE COMPILER::*TARGET-ARCHITECTURE* :3-BYTE-INIT) INSPECT/ARRAY ( +MAXINSPECTARRAYLEVEL PROMPTWINDOW) CL:RETURN-FROM (:TAG) DISPLAYAFTERENTRY (\EM.CURSORBITMAP +\VideoColor) COMPSETREAD (DWIMWAIT COMPSETDEFAULTKEYLST HISTSTR0) DISPLAYBEFOREEXIT (\DisplayStarted) +CLOSEHASHFILE (SYSHASHFILE) SUPERPRINT/SPACE (RMARGIN SPACEWIDTH LEFT) MSPRGTEMPLATE1 (PARENT FNNAME +FNDEF PARENTCONTEXT VARS TOPVARS) CMLREAD.FEATURE.PARSER (*FEATURES*) TEDIT.MODIFYLOOKS (BLACKSHADE) +\SETUFNENTRY (\UFNTable \LITATOM \NEW-ATOM) SEDIT::FORMAT-VALUES-CHANGED (SEDIT::TYPE-LITATOM) +\GETUFNENTRY (\UFNTable) \NEWEPHEMERALPAGE (\MiscFXP) \PFPurgeRootDirectory (tRootDirectory +tUnassigned) \DONEWEPHEMERALPAGE (\PageMapTBL \EMPTYPMTENTRY \PAGEMAP \MP.NEWPAGE \UPDATECHAINFREQ +\RPT.UNAVAILABLE \RPOFFSET \VMAP.DIRTY WORDSPERPAGE \MISCSTATS) MAKESYS (MAKESYSNAME HERALDSTRING) +FORMAT-NEWLINE (*STANDARD-OUTPUT*) CHARACTER.READ (\MAXTHINCHAR *READTABLE*) INFILECOM (TYPE +COMMENTFLG NAME MACROPROPS) GRID (BLACKSHADE WHITESHADE) \VFMClearIntervals (maxLogicalVolumes +\VFMintervals) \8859OUTCHARFN (*XEROXTOISO8859MAP*) SUBPRINT/WRAPPERTAIL (*STANDARD-OUTPUT* RMARGIN +LEFT) PURGENSFONTS (NSFONTFAMILIES) INFILECOMSVALS (COMMENTFLG) FORMAT-EAT-WHITESPACE ( +*FORMAT-CONTROL-STRING*) \PICK.EVALQT (\TopLevelTtyWindow XCL:*PROFILE*) MSPRGERR (MSERRORFN) FLIPNODE + (BLACKSHADE) \TEDIT.MARK.REVISION (BLACKSHADE) CALLSCCODE (IGNOREFNS \AtomHI BITSPERBYTE :4-BYTE +COMPILER::*HOST-ARCHITECTURE* :3-BYTE) EXCHANGEPUPS (\ETHERTIMEOUT) FB.DEPTHCOMMAND ( +FB.DEPTH.MENU.ITEMS :NUMBER) BREAK.NSFILING.CONNECTION (\FILEDEVICES) COMPILER::CLOSURE-ANNOTATE-VAR-REF + (:LEXICAL) FILLTRAJECTORY.IP (MAKEOUTLINE MASKFILL) MAKEISOFORMAT (:ISO8859/1) \SHOWMENULABEL ( +MENUSUBITEMMARK :ESCAPE) INSPECT/ATOM (PROMPTWINDOW) \SEQUIN.PUT (\PT.SEQUIN) \INSPECTW.VALUE.MARGIN ( +MinSpaceBetweenProperyAndValue PropertyLeftMargin MaxValueLeftMargin) \CODEBLOCKP (\FirstArraySegment +\ArrayBlockHeaderWords \ArrayBlockPassword CODEBLOCK.GCT \DTDSpaceBase) DEFAULT.BACKGROUND.COPYFN ( +LASTMOUSEBUTTONS) \TEMPLOCKPAGES (\MiscFXP) TTPROMPTCHAR (\FIRSTLINE \PROMPT1 \PROMPT2) +ADJUSTLINE.AND.RESTORE (\HOMECOL \ARROW \CURSOR) NSDISPLAYSIZE (DISPLAYFONTEXTENSIONS NSFONTFAMILIES +INTERPRESSFONTEXTENSIONS) RAIDSHOWFRAME (ROOTFRAME RAIDIX) READPAGEMAPBLOCK (\PMblockSize VMEMFILE) +PFI.PRETTYPRINT (*PFI-FNSLST*) \DSPFONT.PSC (*POSTSCRIPT-UNACCENTED-FONTS*) \QUEUE.OUTPUT.IOCB ( +\MACHINETYPE \DANDELION \ES.PENDING \DL.ENABLE.OUTPUT \DL.ETHEROUTPUTREG \DAYBREAK \DOLPHIN +\D0.ENABLE.10MBOUTPUT \D0.OUTPUTSTATE) \DFSFreeDiskPages (\LFtopMonitor) HELP (:FORMAT-STRING +:FORMAT-ARGUMENTS) SEDIT::DEFAULT-PACKAGE (*PACKAGE*) COMP.SPREAD (CL:CALL-ARGUMENTS-LIMIT) +\PROMPTFORWORDRETYPE (DONTECHOTYPEIN.FLG CHARBUFFER ECHO.CHANNEL) \NSFILING.OPENFILE (NoBits) +FILECODEBLOCK (\ArrayBlockOverheadCells CELLSPERQUAD CODEBLOCK.GCT OUTX \CodeArrayFlagWord) DWIM ( +DWIMODELST) \PROMPTFORWORDERASE (X0Y0 ECHO.CHANNEL) FB.INFOMENU.WHENSELECTEDFN (WHITESHADE +FB.INFOSHADE) \PROMPTFORWORDBIN (\LINEBUF.OFD \KEYBOARD.STREAM TERMINCHARS.LST) CREATE-SHELL-STREAM ( +*NEW-SHELL-DEVICE* *SHELL-DEVICE*) FM.CHANGELABEL (\FM.GROUPSPEC) READPAGEMAP (\InterfacePage \PAGEMAP + PAGESPERSEGMENT \PMblockSize \NumPMTpages \PageMapTBL \EmptyPMTEntry) TEDIT.FORMATFOLIO ( +TEDIT.DEFAULT.FOLIO.LOOKS) \DOFLUSHVM (\EMUSWAPBUFFERS) CHAT (CHAT.ALLHOSTS) \RELEASEWORKINGSET ( +\RPTSIZE \RPOFFSET \VMAP.VACANT) \PROMPTFORWORDBS (DONTECHOTYPEIN.FLG ECHO.CHANNEL) UPDATE/MENU/IMAGE +(LASTSCREEN MENUSUBITEMMARK BLACKSHADE WHITESHADE MAX.SMALLP) OPENHASHFILE (HASHACCESSTYPES +SYSHASHFILELST) \FLUSHVM (\MiscFXP \FAULTFXP \SYSTEMCACHEVARS) \NSFILING.DESERIALIZE (:PATHNAME) +COURIER.EXECUTE.EXPEDITED.CALL (\EXTYPE.EXPEDITED.COURIER) \10MBSENDPACKET (\MY.NSADDRESS +\10MBTYPE.TRANSLATIONS) LISPXFIX (HISTSTR0) XCL::SET-CONSTANTP (COMPVARMACROHASH) CHARCODE.DECODE ( +CHARACTERNAMES CHARACTERSETNAMES) TTYIN.PPTOFILE (\RMARG \INITPOS \DSP) DSKDISPLAY (\DSKDISPLAY.WINDOW +) \PAGEDBACKFILEPTR (AppendBit BYTESPERPAGE) MAPHASHFILE (HASH.HEADER.SIZE HASHFILERDTBL HASH.KEY.SIZE +) STRPOSL (\MAXTHINCHAR) \MATCHPCS (\WORDSINBTREEMAIN) SET-SYMBOL (*SPECIAL-BINDING-MARK* \STACKHI) +\CREATECHARSET (\MAXCHARSET \DISPLAYSTREAMTYPES IMAGESTREAMTYPES) COMPUTE-MACRO-ARGS (*MACRO-FORM* +*MACRO-DEFAULT*) CHANGECCODE (GCREF) SENDPUP (\EPT.PUP \PUP.READY PUPTRACEFILE) +\NSFILING.CLOSE.CONNECTIONS (:ABORT) MACROS.GETDEF (MACROPROPS) TRACKCURSOR (LASTMOUSEBUTTONS) +MSPRGRECORD (MSFNDATA) DEFAULTFONT (\GUARANTEEDDISPLAYFONT) EXPANDMACRO (CLISPARRAY COMPILERMACROPROPS +) \COURIER.HANDLE.ERROR (PROMPTWINDOW) \DSPPRINTCHAR (\MAXTHINCHAR \PRIMTERMSA REAL.CCE ERASECHARCODE +INDICATE.CCE SIMULATE.CCE \MACHINETYPE \DANDELION \DAYBREAK \MAIKO IGNORE.CCE) MSUSERVBTABLES ( +MSUSERVBTABLES) AS.REPLACE.PASSWORDS (AS.WELL.KNOWN.NAME) SUPERPRINT/COMMENT2 (TAIL *STANDARD-OUTPUT*) + \STRINGWIDTH.GENERIC (*PRINT-LEVEL* *PRINT-LENGTH*) PRINT-EVENT (INPUTFONT HISTSTR0 PRINTOUTFONT +VALUEFONT) SUPERPRINT/COMMENT1 (COMMENTFONT *STANDARD-OUTPUT* SPACEWIDTH COMMENTCOLUMN) +\DSPCLIPPINGREGION.DISPLAY (MAX.SMALLP) \PEEKCCODE.NOEOLC (\DEFAULTPEEKCCODE) \SPP.PREPARE.OUTPUT ( +\MAX.XIPDATALENGTH \SPPHEAD.LENGTH) MAPPAGES (\InterfacePage) INSPECT/TYPELESS (\ArrayBlockHeaderWords + \ArrayBlockPassword \ArrayBlockOverheadWords) \CLIPANDDRAWLINE (BLACKSHADE \CURSORDESTINATION +\EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS) \INCCODE.EOLC (LF.EOLC ANY.EOLC CR.EOLC CRLF.EOLC +\DEFAULTINCCODE) PopUpWindowAndGetAtom (LASTMOUSEX SCREENWIDTH LASTMOUSEY) COMPILER::CLOSURE-ANNOTATE-TAGBODY + (:SCOPE :LEXICAL :KIND :VARIABLE :NAME :BINDER :CLOSED-OVER) MSBINDVAR (INVISIBLEVARS PARENT) +\BACKCOLOR.DISPLAY (WORDMASK) PRINTCOMSTRAN (PRINTOUTTOKENS VARS FAULTFN) \FIXLINELENGTH.PSC ( +MAX.SMALLP) PREVLINE (\FIRSTLINE) \UNCOPY (\SMALLP \SmallPosHi \FIXP \FLOATP \LITATOM \STRINGP +\CHARACTERP \CHARHI %%ONED-ARRAY PTRBLOCK.GCT \LISTP) FB.INFOMENU.SHADEINITIALSELECTIONS (FB.INFOSHADE +) COMP.GETBASE (COMPILE.CONTEXT EXP CODE) \BLTSHADE.DISPLAY (\TOPWDS \SCREENBITMAPS \CURSORDESTINATION + \EM.DISPINTERRUPT) \OK.TO.IDLE? (\GETPASSWORD.LOCK) PRINTCODE (BITSPERBYTE BYTESPERWORD BYTESPERQUAD +BYTESPERCELL \PRINTCODE.LEVEL \PRINTCODE.STKSTATE \AtomHI \INITSUBRS \USER-SUBR-LIST) +TEDIT.CURSORMOVEDFN (\TEDIT.SPLITCURSOR TEDIT.LINECURSOR) MAKEROOMFORPME (\PageMapTBL \EmptyPMTEntry +WORDSPERPAGE \PAGEMAP \PMblockSize) PFI.HANDLE.EXPR (COMMENTFLG *PFI-HANDLERS*) TEDIT.FORMATPAGE ( +:SEARCHING-FOR-EQUIVALENT-PAGE :NEW-PAGE-LAYOUT) EDITBMBUTTONFN (LASTMOUSEBUTTONS \CURRENTCURSOR +\CURSORDESTINATION WHITESHADE BLACKSHADE SCREENWIDTH SCREENHEIGHT) \BITBLT.DISPLAY (\CURSORDESTINATION + \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS) \PFCreateRootDirectory (tRootDirectory) PRINTCODENT (OUTF +I4 CODEBASE \AtomHI BITSPERBYTE IVARCODE PVARCODE) GETPUP (\EPT.PUP PUPTRACEFILE) DELETETO1 ( +\ENDBUFFER TTYINBSFLG) POLYSHADE.DISPLAY (FILL.WRULE) \SPLITTREE (\WORDSINBTREEMAIN +\BTREETOPHALFOFFSET \BTREEMAXENTRIES \BTREEWORDSPERENTRY) PRINT-EVENT-PROMPT (PROMPTFONT +XCL:*EXEC-PROMPT*) TYPEP (CL::*TYPEP-HASH-TABLE*) \DRAWCIRCLE.DISPLAY (\TOPWDS \SCREENBITMAPS +\CURSORDESTINATION \EM.DISPINTERRUPT) \SEQUIN.PROCESS (\PT.SEQUIN \PT.ERROR PUPTRACEFLG \SS.OPENING +\PUPE.NOSOCKET \SS.ABORT \SS.CLOSING PSTAT.TIMEDOUT \SEQUIN.TIMEOUTMAX \SEQUIN.DESTROY \SEQUIN.NOOP) +CODEWRAPPER.PRETTYPRINT (FNSLST) UNIXCHAT.OPEN (\MACHINETYPE \MAIKO) \DRAWELLIPSE.DISPLAY (\TOPWDS +\SCREENBITMAPS \CURSORDESTINATION \EM.DISPINTERRUPT) COMPILER::*LITERALLY-T* (:VALUE) \XCCSINCCODE ( +NSCHARSETSHIFT \NORUNCODE) SEQUENTIAL.PRETTYPRINT (*STANDARD-OUTPUT* *BACKQUOTE-WRAPPERS*) CSUBST ( +SPECIALFIELDS CREATEINFO USINGEXPR ARGS BODY FIELDNAMES SUBSTYPE RECORD.TRAN RECORDEXPRESSION +CLISPARRAY DECLST) 32MBADDRESSABLE (\MACHINETYPE \DORADO \DOLPHIN \DAYBREAK \InterfacePage) +\DRAWLINE.DISPLAY (\TOPWDS \SCREENBITMAPS) BROWSE/LAYOUT/HORIZ/COMPACTLY (MOTHERD) +\TEDIT.APPLY.PAGEFORMATTING (TEDIT.PAGE.FRAMES) \TEDIT.CLEAR.SCREEN.BELOW.LINE (WHITESHADE) CLISPDEC1 +(CLISPRECORDTYPES DECLWORDS SKORLST1) \FILLCIRCLE.DISPLAY (\TOPWDS \SCREENBITMAPS \CURSORDESTINATION +\EM.DISPINTERRUPT) FILL.XPER (\CURSORDESTINATION \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS) +INSPECTW.REDISPLAY (INSPECTPRINTLEVEL PropertyLeftMargin MinSpaceBetweenProperyAndValue) MAKECREATE1 ( +USINGTYPE MSBLIP FIELDINFO FIELDS.IN.CREATE RECORDEXPRESSION DECLST RECORD.TRAN) EDITDATE? (COMMENTFLG + INITIALS) \XCCSOUTCHAR (\NORUNCODE NSCHARSETSHIFT) CASE.PRETTYPRINT (*STANDARD-OUTPUT* +*BACKQUOTE-WRAPPERS*) \SET.LASTVMEMFILEPAGE (\InterfacePage \GUARDVMEMFULL) \DSPYPOSITION.DISPLAY ( +MAX.SMALLP) \SEQUIN.CLOSE (\SS.OPEN \SS.CLOSING \SEQUIN.DESTROY) PFI.MAYBE.NEW.PAGE (*STANDARD-OUTPUT* + *PFI-MAX-WASTED-LINES*) INDENTATION.FROM.HERE (*STANDARD-OUTPUT*) \PFCurrentVol (\PhysVolumePage) +MAKEINITLAST (MKI.PLHA MKI.TVHA BYTESPERPAGE WORDSPERPAGE \FirstArrayPage MKI.CODESTARTOFFSET +INITVALUES INITPTRS \LITATOM \NEW-ATOM MKI.VALUES MKI.PTRS LOCKEDVARS MKI.ATOMARRAY) COMPILER::*LITERALLY-NIL* + (:VALUE) COMP.LOOKUPVAR (ALLVARS) PROG1.PRETTYPRINT (*STANDARD-OUTPUT*) \GETREGION.CHECKOPPT ( +NEWREGIONFNARG) DODIRCOMMANDS (UPPERCASEARRAY FILEINFOTYPES) \CREATE.XCCS.EXTERNALFORMAT (:XCCS +LF.EOLC) FGET.IP (FGET) \NSFILING.AFTER.LOGIN (\NSFILING.ACTIVE.SESSIONS) SUPERPRINT0 ( +PRETTYPRINTMACROS %#RPARS RMARGIN *STANDARD-OUTPUT*) ENDREAD? (\CURSOR \BUFFER \ENDBUFFER \READING +\PROMPT1 \MAXTHINCHAR \RDTBLSA SEPRCHAR.RC LEFTPAREN.RC LEFTBRACKET.RC ESCAPE.RC MULTIPLE-ESCAPE.RC) +\LOOKUPFONT (\FONTSINCORE) \MAKEBRUSH.ROUND (BLACKSHADE) PROGV.PRETTYPRINT (*STANDARD-OUTPUT*) HPRINT +(HPRINTRDTBL) \DRAWLINE.PSC (:EOL) INSPECT/DATATYPE (\DTDSpaceBase PROMPTWINDOW) \10MBGETPACKET ( +\10MB.RAWPACKETQ \10MBTYPE.TRANSLATIONS) DUMPINITPAGES (\MAXVMPAGE NEXTPM NEXTVMEM \PAGEMAP +\PageMapTBL \IFPValidKey MKI.Page0Byte) DO.PRETTYPRINT (*STANDARD-OUTPUT* SPACEWIDTH) MSPRGE ( +INVISIBLEVARS VARS TOPVARS PARENT USERTEMPLATES MSTEMPLATES MSRECORDTRANFLG) +XCL::VARIABLE-LEXICALLY-BOUNDP (:UNSURE XCL::*LEXICAL-VARIABLES*) FREEMENU (\FM.DEFAULTFORMAT +DEFAULTFONT \FM.ROWSPACE \FM.COLUMNSPACE) UNIX.HOST.FILTER (\MACHINETYPE \MAIKO) \COPY (\SMALLNEGSPACE + \SMALLPOSPSPACE \FIXP \FLOATP \CHARHI) DIRPRINTNAME (\MAXTHINCHAR UPPERCASEARRAY) CH.PROPERTY ( +CH.PROPERTIES) CREATEFIELDS (FIELDS.IN.CREATE) COURIER.EXPEDITED.CALL (\COURIERPROGRAM) SUBPRINT ( +FORMFLG *BACKQUOTE-WRAPPERS* CLISPFONT FONTWORDS USERFONT FNSLST FONTFNS SYSTEMFONT CLISPCHARS +FUNNYATOMLST PRETTYEQUIVLST *STANDARD-OUTPUT* SPACEWIDTH COMMENTFLG) \DOVMEMFULLINTERRUPT ( +\InterfacePage \LASTVMEMFILEPAGE) CLISPLOOKUP1 (CLASS WORD CLISPRECORDTYPES VAR1 VAR2 CLASSDEF) +FB.NEWINFOCOMMAND (FB.INFO.MENU.ITEMS FB.MENUFONT) \PUPERROR (\PT.ERROR PUPTRACEFILE PUPERRORMESSAGES +\PUPHEADERLEN \PUPOVLEN BYTESPERWORD) INITSEQUIN (\SS.UNOPENED) \MAP-CODE-POINTERS ( +\ArrayBlockHeaderWords \DTDSpaceBase CODEBLOCK.GCT BITSPERBYTE) TTLOADBUF (HISTSTR1 HISTSTR0 +\ENDBUFFER \READING RDTBL) UTF16BE.PEEKCCODEFN (*UNICODETOXCCS* TRANSLATION-SHIFT TRANSLATION-MASK) +SPP.CLEARATTENTION (\SPPFLAG.ATTENTION) LISP-TO-UNIX-TERMTYPE (CHAT.TO.UNIX.TERMINALS) +\MAP-CODE-LITERALS (\ArrayBlockHeaderWords \DTDSpaceBase CODEBLOCK.GCT \AtomHI BITSPERBYTE) +\DRAWCURVE.PSC (:EOL) \FONT.COMPARESYMBOL (*PACKAGE-FROM-INDEX* \PNAME.HI *INTERLISP-PACKAGE*) +CHECKIFPAGE (\IFPValidKey \InterfacePage) FIND-LEXICAL-ENVIRONMENT (LASTPOS) DSFIT1 (ENDTAIL CAREFUL +*STANDARD-OUTPUT* AVERAGEVARLENGTH SPACEWIDTH) PAINTW (PROMPTWINDOW BLACKSHADE LASTMOUSEX LASTMOUSEY +LASTMOUSEBUTTONS) LISPXUSE (HISTSTR0) \PFPutRootDirectory (tRootDirectory) PRINTSQ (LEFT COMMENTFLG) +SETUPPUP (\PUP.READY \PUPOVLEN) INSPECT/HUNK (CODEBLOCK.GCT PTRBLOCK.GCT INSPECT.HUNK.COMMANDS +MAXINSPECTARRAYLEVEL) BRKDWNTIME (BDLST) DBG::COLLECT-ACTIVE-ESCAPES (XCL:*EVAL-FUNCTION*) +XCL::VARIABLE-SPECIAL-P (:UNSURE) \MAKEBRUSH.SQUARE (BLACKSHADE) EDITADDNODE (PROMPTWINDOW) CACHEMACRO + (:MACRO CLISPARRAY) XCL::VARIABLE-LEXICAL-P (:UNSURE XCL::*LEXICAL-VARIABLES*) SI::*CLOSURE-CACHE* ( +:FIRST) MSADDTYPE (MSWORDS) \PFGetRootDirectory (tRootDirectory) DSFIT2 (COMMENTFLG *STANDARD-OUTPUT* +CAREFUL AVERAGEFNLENGTH SPACEWIDTH AVERAGEVARLENGTH) GETSEQUIN (\SS.OPEN) \IDLE.EXIT? (PROMPTWINDOW +IDLE.PROFILE \GETPASSWORD.LOCK) HISTORY-NTH (*CURRENT-EVENT*) SEGMENT.BIT.LENGTH (\FONT) COMPILE! ( +LOCALVARS SYSLOCALVARS NLAMA NLAML LAMS LAMA NOFIXFNSLST NOFIXVARSLST) SPP.FLUSH.TO.EOF (\SPPFLAG.EOM +\SPPFLAG.ATTENTION \SPPFLAG.END) SHOW.MATCHING.PAREN (\LOC.ROW.0 SHOWPARENFLG \DSP) \ACTONVMEMFILE ( +\MACHINETYPE \DANDELION \DAYBREAK) MAKEINITFIRST (\InterfacePage) TEDIT.BUILD.PCTB0 ( +TEDIT.DEFAULT.FMTSPEC \FirstPieceOffset \PieceDescriptorLOOKS \PieceDescriptorOBJECT +\PieceDescriptorPARA \EltsPerPiece) TEDIT.SCAN.LINE (LMInvisibleRun LMLooksChange) MISSPELLED? ( +SPELLSTATS1 LASTWORD) PopUpWindowAndGetList (LASTMOUSEX SCREENWIDTH LASTMOUSEY TTYINWORDRDTBL) +TEDIT.PROMPTFLASH (PROMPTWINDOW) SEDIT::CREATE-PRETTY-PRINT-ENV (SEDIT::LISP-EDIT-ENVIRONMENT +DEFAULTFONT ITALICFONT CLISPFONT COMMENTFONT MICASPERPT) \PRINDATUM.TO.STRING (\FIXP \SMALLP \FLOATP +*PRINT-BASE* *READTABLE* \MAXTHINCHAR) BROKENDEF (CELLSPERQUAD GCREF) XCL::PUT-IMPLICIT-KEY-HASH ( +XCL::*DELETED-IMPLICIT-HASH-SLOT*) UTF16BE.OUTCHARFN (*XCCSTOUNICODE* TRANSLATION-SHIFT +TRANSLATION-MASK) \INSERTTREE (\WORDSINBTREEMAIN \BTREEMAXCOUNT) TEDIT.FORMAT.HARDCOPY ( +TEDIT.PAGE.FRAMES TEDIT.DEFAULTPAGEREGION :NEW-PAGE-LAYOUT :SEARCHING-FOR-EQUIVALENT-PAGE) +BRHL/MOVE/RIGHT (MOTHERD NODELST) \STREAM.FROM.PACKET (\XIPOVLEN) \DRAWCIRCLE.PSC (:EOL) ADDPME ( +\PageMapTBL \EmptyPMTEntry WORDSPERPAGE \PAGEMAP \PMblockSize \LOCKEDPAGETABLE BITSPERWORD) +BROWSE/LAYOUT/HORIZ (NODELST) PFI.PRINT.TO.TAB (ITALICFONT DEFAULTFONT) CLOSESEQUIN (\ETHERTIMEOUT +\SS.CLOSED \SS.CLOSING) \TEDITPAGEMENU.CREATE (TEDIT.PAGEMENU.SPEC TEDIT.MENUDIVIDER.SPEC +TEDIT.CHARLOOKSMENU.SPEC) SAVEPUT (DFNFLG) MSINITFNDATA (MSFNDATA) PRIN1 (*READTABLE* PLVLFILEFLG +*PRINT-LEVEL* *PRINT-LENGTH* *INTERLISP-PRIN1-CASE* *PRINT-CASE* \LINELENGTH MAX.SMALLP) FONTSET ( +FONTDEFS DEFAULTFONT FONTVARS FONTPROFILE) MAINSCREEN (\MAINSCREEN) SPACES (\LINELENGTH MAX.SMALLP) +FIND.MATCHING.WORD (\CURSOR) PRINTNUM (NILNUMPRINTFLG) \DRAWELLIPSE.PSC (:EOL) PRINTOPCODES (\OPCODES) + \TRANSLATE.3TO10 (\EPT.3TO10 \TRANS.OP.REQUEST \MY.NSADDRESS BROADCASTNSHOSTNUMBER \TRANS.DATALENGTH +\10MBTYPE.3TO10) \ABORT.BULK.DATA (SPP.USER.TIMEOUT) BRHL/LAYOUT (PERSONALD MOTHERD) +MakeMenuOfImageTypes (IMAGESTREAMTYPES \DISPLAYSTREAMTYPES) \DO.PROGV.SETUP.FRAME.AND.EXECUTE (MYALINK + \STACKHI WORDSPERQUAD \STACKSPACE \LITATOM \NEW-ATOM PVARCODE WORDSPERCELL) MAKEWITHINREGION ( +WHOLEDISPLAY) ALLCALLS (MSFNDATA) \MAKEBRUSH.HORIZONTAL (BLACKSHADE) \PFGetVols (\PhysVolumePage) +\COURIER.TRACE (COURIERTRACEFILE COURIERTRACEFLG COURIERPRINTLEVEL) \MAPPNAME.INTERNAL (\PNAMEDEVICE +OutputBits MAX.SMALLP \STREAM.DEFAULT.MAXBUFFERS \NOIMAGEOPS LF.EOLC) COMP.EXP1 (COMPILE.CONTEXT) +\CORE.UPDATEOF (BYTESPERPAGE) OUTPUT (\TERM.OFD) MSADDMODIFIER (MSWORDS MSUSERVBTABLES) SHOW.IP ( +SETCORRECTMEASURE CORRECT { SEQSTRING SHOW }) TEDIT.BUILD.PCTB2 (TEDIT.DEFAULT.FMTSPEC DEFAULTFONT +\FirstPieceOffset \PieceDescriptorPAGEFRAME \EltsPerPiece \PieceDescriptorCHARLOOKSLIST +\PieceDescriptorPARALOOKSLIST \PieceDescriptorPARA \PieceDescriptorLOOKS \PieceDescriptorOBJECT) +\TEDIT.ADJUST.LINES (WHITESHADE) VARSBOUNDINFORM (LAMBDASPLST COMPILERMACROPROPS) \DUMPEXPORTS ( +BEGINEXPORTDEFSTRING ENDEXPORTDEFFORM) GO.TO.RELATIVE (\TTPAGELENGTH \LOC.ROW.0 \CHARHEIGHT \BMARG +\DSP) GET-NEXT-HISTORY-EVENT (:ID) WINDOWTITLEFONT (WindowTitleDisplayStream) CL:GENSYM ( +CL::*GENSYM-PREFIX*) COMPILER::SET-CONSTANT-VALUE (COMPILER::*CONSTANTS-HASH-TABLE*) +PFI.PRINT.ENVIRONMENT (*INTERLISP-PACKAGE* *READTABLE* *PACKAGE*) ENDPREAMBLE.IP (ENDPREAMBLE) +SEDIT::START-COMMENT (SEDIT::TYPE-QUOTE) \SHOWTEXT (WHITESHADE WAITINGCURSOR TEDIT.DEFAULT.FMTSPEC) +MB.MARGINBAR.TABTRACK (LASTMOUSEBUTTONS) EDITAPPLYTOLINK (PROMPTWINDOW) CHAT.STARTUP ( +CHAT.PROTOCOL.ABBREVS CHAT.PROTOCOLTYPES CHAT.OSTYPES CHAT.HOSTINFO CHAT.INTERRUPTS :INTERRUPTS +CHAT.KEYACTIONS :KEYACTIONS PROMPTWINDOW) BKSYSCHARCODE (\SYSBUFFER.LAST \SYSBUFFER.FIRST) FM.EDITITEM + (\FM.GROUPSPEC) \VAMGetVAMPageFor (\VAMbuffer) \GETREGION.CHECKBASEPT (NEWREGIONFNARG) BKSYSBUF ( +*READTABLE* *PACKAGE*) COMP.STRETURN (OPRETURN) \CORE.FINDPAGE (WORDSPERPAGE) NEGATE (NEGATIONS) +SHOWCHARS (CODE) \MAKEBRUSH.VERTICAL (BLACKSHADE) \MAPPNAME (*READTABLE* *INTERLISP-PACKAGE* *PACKAGE* + *PRINT-BASE* *PRINT-RADIX*) FONTPROFILE.ADDDEVICE (FONTDEFS FONTNAME) CHECKFPTOVP1 (\RPOFFSET) +PROCESS.EVALV (MYALINK) DBG::ESCAPE-FROM-DEBUGGER (BRKCOND *DEBUG-IO*) \BITMAPTOSCREEN (\SCREENS) +CHECKFPTOVP (\InterfacePage \FPTOVP) DIRECTORY.MATCH.SETUP (\MAXTHINCHAR) \FILLCIRCLE.PSC (:EOL +POSTSCRIPT.TEXTURE.SCALE) CH.DELETE.MEMBER.FROM.DOMAIN.ACL (\CH.BROADCAST.SOCKET) TEDIT.BUILD.PCTB1 ( +TEDIT.DEFAULT.FMTSPEC DEFAULTFONT \FirstPieceOffset \PieceDescriptorPAGEFRAME \EltsPerPiece +\PieceDescriptorPARA \PieceDescriptorLOOKS \PieceDescriptorOBJECT) FONTSAVAILABLE (IMAGESTREAMTYPES) +SEDIT::CREATE-GAP-NODE (SEDIT::TYPE-GAP) SEDIT::STRINGWIDTH (*READTABLE*) LISPDIRECTORYP ( +\LFtopMonitor) SEDIT::CREATE-ENVIRONMENTS (SEDIT::COMMAND-TABLE-SPEC DEFAULTFONT ITALICFONT CLISPFONT +COMMENTFONT) EQUALALL (ORIGTERMSYNTAX ORIGDELETECONTROL) GAINSPACE (GAINSPACEFORMS DWIMWAIT) +COMPILER::CONSTANT-VALUE (COMPILER::*CONSTANTS-HASH-TABLE*) \CORE.GETFILEINFO.FROM.INFOBLOCK (CR.EOLC +LF.EOLC CRLF.EOLC) WARNUSER (PROGVARS EXP) \LOOKUPFONTSINCORE (\FONTSINCORE) MB.THREESTATE.DISPLAY ( +BLACKSHADE) FB.ALPHABETIC.ATTR (UPPERCASEARRAY) \CORE.GETFILEHANDLE (:PATHNAME BYTESPERPAGE) +CREATESCREEN (WINDOWTITLEFONT MAX.SMALLP \DISPLAYIMAGEOPS DisplayFDEV) BRHL/LAYOUT/DAUGHTERS (NODELST) + SPP.SENDATTENTION (\SPPHEAD.CC.ATTENTION) COMPILE (NLAMA NLAML LAMS LAMA NOFIXFNSLST NOFIXVARSLST +SPECVARS LOCALVARS FILERDTBL) CURRENT.WORD (\ARROW \CURSOR TTYINCOMMENTCHAR \MAXTHINCHAR \RDTBLSA +OTHER.RC ESCAPE.RC MULTIPLE-ESCAPE.RC) \RPLCHARCODE (\MAXTHINCHAR) \BLTSHADE.PSC (BLACKSHADE +WHITESHADE :EOL POSTSCRIPT.TEXTURE.SCALE) \TFBRAVO.READ.USER.CM (USER.CM.RDTBL) \CORE.GETFILEINFO ( +NoBits) RECORD (CLISPRECORDTYPES) DBG::INVOKE-ESCAPE-FROM-MENU (BRKCOND *DEBUG-IO*) NUMBERP ( +\TT.NUMBERP) LISPX/1 (LISPXFNS VARS) \PRINTFPTOVP (\InterfacePage \FPTOVP \NO.VMEM.PAGE \PNAME.HI +\DEF.HI \VAL.HI \PLIST.HI \STACKHI \HTMAIN \HTOVERFLOW) CL:LOAD (*LOAD-VERBOSE* *LOAD-PRINT-STUFF* +:ERROR *TERMINAL-IO*) TTDOTABS (\CURSOR \ENDBUFFER \CHARWIDTH \CURSORCOL) TYPENAME (\ARRAYP +\DTDSpaceBase) DWIMIFY (NOFIXFNSLST NOFIXVARSLST) TEDIT (TEDIT.STARTUP.MONITORLOCK TEDIT.DEFAULT.PROPS +) MSADDANALYZE (MSWORDS) CLISPIFY (LASTAIL ATM) \VAMInit (\VAMmonitor) L-CASE (*INTERLISP-PACKAGE* +\PNAMELIMIT \FATPNAMESTRINGP) ENDPAGE.IP (ENDPAGE) FILEPKGCOMS.PUTDEF (FILEPKGTYPEPROPS) GATHEREXPORTS + (*DEFAULT-MAKEFILE-ENVIRONMENT* *OLD-INTERLISP-READ-ENVIRONMENT*) EXEC-PRIN1 (*TERMINAL-IO*) +\UNITWIDTHSVECTOR (\MAXCHAR) \NSFILING.COPY/RENAME (:PATHNAME PROMPTWINDOW) EDITBM (CursorBitMap +\CURSORDESTINATION \CURSORDESTWIDTH GRIDTHICKNESS \CURSORDESTHEIGHT NORMALGRIDSQUARE MINGRIDSQUARE) +TEDIT.PUT (CR.EOLC) LOADFNS (*INTERLISP-PACKAGE* DFNFLG BUILDMAPFLG ADDSPELLFLG LISPXHIST LOADOPTIONS) + SI::ARGUMENT-ERROR (:CALLEE :MINIMUM :ACTUAL :MAXIMUM) %%MAKE-STRING-ARRAY-FAT (%%FAT-CHAR-TYPENUMBER +) CONCAT.IP (CONCAT) POSTEDITALISTS (FILEPKGFLG) COMP.FLOATBOX (CODE) LIST-ALL-BLOCKRECORDS ( +USERRECLST) NEW/FN (CHCONLST) FB.PROMPTW.FORMAT (:UPCASE) \#BLOCKDATACELLS (\ArrayBlockHeaderWords +\ArrayBlockOverheadCells \DTDSpaceBase) GETPROPLIST (\PLIST.HI) \CORE.PACKFILENAME (ROOT EXT VERS) +\ROUTINGTABLE.INFOHOOK (:PROTOCOL :WINDOW \NS.ROUTING.TABLE \PUP.ROUTING.TABLE \ROUTING.TABLE.TYPENUM +:CULPRIT :EXPECTED-TYPE \ROUTING.TABLE.MASK WORDSPERCELL :NAME) >= (CL::%%>=) TEDIT.GET.OBJECT0 ( +DEFAULTFONT) \TFBRAVO.INIT.PARALOOKS (TEDIT.DEFAULT.FMTSPEC HardwareRightMargin HardwareLeftMargin +DefaultRightMargin) SPELLFILE (DIRECTORIES NOSPELLFLG \FILEDEVICENAMES) FW-ADJUST-REGION (FW-OFDList +FW-Position FW-WindowHeight WBorder FW-Anchor) COMPILER::CHECK-GLOBAL-CONSTANT (COMPVARMACROHASH) +\CREATE-REAL-CHARSET.DISPLAY (MISSINGCHARSETDISPLAYFONTCOERCIONS MISSINGDISPLAYFONTCOERCIONS) +SEDIT::BUILD-WINDOW (:CREATE DEFAULTFONT SEDIT::EDITOR-NAME) CONSTANTEXPRESSIONP ( +*BC-MACRO-ENVIRONMENT* CONSTANTFOLDFNS COMPILERMACROPROPS) \PUTBASESTRING (\MAXTHINCHAR) +\CORE.UNPACKFILENAME (:PATHNAME) INSERTLINE (\ENDBUFFER \CURSORCOL) \SFMAKEITALIC (\MAXTHINCHAR) +CHAT.RECONNECT (LASTMOUSEBUTTONS) AUTOCR? (\CURSORCOL TTYINAUTOFILLMARGIN \RMARG \ARROW \CURSOR) +\TEXTMENU.TOGGLE.DISPLAY (BLACKSHADE) GENSYM (\GS.BUFSIZE MAX.FIXP) BMOBJ.GETFN5 (FILERDTBL) FM.SHADE +(\FM.GROUPSPEC) HCOPYALL1 (DONTCOPYDATATYPES HPRINTHASHARRAY) \CREATECHARSET.DISPLAY ( +DISPLAYFONTCOERCIONS) \BUILDSLUGCSINFO (\MAXTHINCHAR BLACKSHADE) \IFSERRORSTRING (\CONNECTED.HOST) +COURIER.WRITE (BITSPERWORD) GetBcplString (\PNAMELIMIT) COMPILE1A (COUTFILE NOSPELLFLG) \CORE.OPENFILE + (BYTESPERPAGE CR.EOLC LF.EOLC CRLF.EOLC) \NSRANDOM.CLOSEFILE (AppendBit WriteBit) DRAWAREABOX ( +BLACKSHADE) \READDISPLAYFONTFILE (DISPLAYFONTEXTENSIONS DISPLAYFONTDIRECTORIES) \VFMInit (\VFMmonitor) + ENDMASTER.IP (ENDMASTER) \TEDIT.TEXTBIN.FILESETUP (NoBits) CLISPATOM1 (FAULTX LPARKEY RPARKEY +CLISPCHARS SUBPARENT NOFIXVARSLST0) \SETPUPCHECKSUM (\NULLCHECKSUM) \NSRANDOM.OPENFILE (NoBits) +POSTSCRIPT.HARDCOPYW (POSTSCRIPT.BITMAP.SCALE) \SETARG0 (MYALINK \STACKHI) BQUOTIFY (*BQUOTE-COMMA* +*BQUOTE-COMMA-ATSIGN* *BQUOTE-COMMA-DOT*) \COREFILE.SETPARAMETERS (CR.EOLC LF.EOLC CRLF.EOLC +DEFAULTFILETYPE) MISCN-NUMBER (\MISCN-TABLE-LIST) AS.CHANGE.OWN.PASSWORDS (AS.WELL.KNOWN.NAME) +TEDIT.PUT.PCTB2 (\FirstPieceOffset TEDIT.DEFAULT.CHARLOOKS CR.EOLC TEDIT.DEFAULT.FMTSPEC) +CHAT.PROMPT.FOR.INPUT (LASTMOUSEX LASTMOUSEY) \DOHARDRETURN (\InterfacePage \HardReturnFXP) TTADDTAB ( +\CURSORCOL \ARROW \CHARWIDTH) \DOHARDRETURN1 (\STACKHI \MinExtraStackWords WORDSPERCELL WORDSPERQUAD) +EXPANDBM (WHITESHADE) GETSETQ (CLISPCHARRAY) TEDIT.UNDO.MOVE (TEDIT.SELECTION) \MKATOM (\MAXTHINCHAR +\ORIGREADTABLE \AtomHashTable \ATOMSPACE \LITATOM \NEW-ATOM) BRHC/OFFSET (NODELST) \CREATE.SYMBOL ( +\MaxAtomFrLst \NEW-ATOM \MDSIncrement \TT.NOREF \TT.SYMBOLP \TT.ATOM \LITATOM GCREF \ATOMSPACE) +\GCSCANSTACK (\InterfacePage \STK.FX GCREF \STACKHI WORDSPERCELL \STK.GUARD \STK.FSB) TTDELSECTION ( +\DSP \DESCENT) \CORE.SETFILEPTR (AppendBit) UNCLISPTRAN (CLISPTRANFLG) EVENTS-INPUT (HISTSTR0) +DBG::PRINT-BACKTRACE (:ALINK) \PARSE.NUMBER (*READTABLE* \ORIGREADTABLE *READ-BASE* +MAX.DIGITS.ACCURACY) \DOGC (\GCFXP) \CORE.BACKFILEPTR (AppendBit BYTESPERPAGE) DEFAULTPRINTER ( +DEFAULTPRINTINGHOST) CL:COMPILE (:PARENT :TARGET-ARCHITECTURE COMPILER::*HOST-ARCHITECTURE*) +\EXPECTED.FILE.TYPE (\MACHINETYPE \MAIKO) ADDTEMPLATEWORD (MSFNDATA MSDATABASELST MSDATABASEINIT) +\CORE.SETEOFPTR (WriteBit BYTESPERPAGE) \SEARCHFONTFILES (*OLD-FONT-EXTENSIONS*) \DECUSECOUNT ( +\STACKHI WORDSPERCELL) \CORE.SETFILEINFO (CR.EOLC LF.EOLC CRLF.EOLC) PURGEDSKDIRECTORY (\LFtopMonitor +PROMPTWINDOW) FM.REDISPLAYITEM (\FM.GROUPSPEC) \SEARCHDISPLAYFONTFILES (DISPLAYFONTDIRECTORIES +DISPLAYFONTEXTENSIONS) \INCUSECOUNT (\STACKHI \MAXSAFEUSECOUNT \MP.USECOUNTOVERFLOW \STK.NOTFLAG +WORDSPERCELL \STK.BF) SCANEXP (VARLST ADR LDFLG) \COPYDATATYPE (\DTDSpaceBase GCREF) COMP.STJUMP (CODE +) DO?CMD (RDTBL \BUFFER null \CURSOR) \INITATOMPAGE (\PNPSPACE \DEFSPACE \PLISTSPACE \VALSPACE +CELLSPERPAGE WORDSPERCELL \OLDATOMSPACE WORDSPERPAGE \NEWATOM-VALOFFSET) \DOSTACKOVERFLOW (\SubovFXP) +\CORE.GETNEXTBUFFER (NoBits BYTESPERPAGE) CH.ADD.MEMBER.TO.DOMAIN.ACL (\CH.BROADCAST.SOCKET) +SIMPLETEXTEDIT (TTYINEDITPROMPT) \MAKEMDSENTRY (\MDSTypeTable \GCDISABLED \TT.NOREF) \MOVEFRAME ( +\InterfacePage \GuardStackAddr WORDSPERCELL \STACKHI WORDSPERQUAD \STK.FSB.WORD) WINDOWWORLD ( +WINDOWBACKGROUNDSHADE WINDOWBACKGROUNDBORDER INITIAL-EXEC-REGION INITIAL-PROMPT-REGION BLACKSHADE +WINDOWUSERFORMS) \ALLOCBLOCK (\ArrayBlockLinkingCells \MaxArrayNCells UNBOXEDBLOCK.GCT PTRBLOCK.GCT +CELLSPERPAGE \MAX.CELLSPERHUNK \ArrayBlockOverheadCells \ArrayBlockHeaderWords GCREF) \SETUPUSERSTACK +(\InitStackSize \STACKHI \MAIKO \FAULTFXP \RECLAIMMIN) BMOBJ.PUTFN (FILERDTBL) SEDIT::ASSIGN-FORMAT-CLISP + (:KEYWORD) \GATHER-CLEANUP-FORMS (\PROCESSES \RUNNING.PROCESS \SAVED.USER.CONTEXT) IDLE.SHOW.OPTIONS +(PROMPTWINDOW IDLE.PROFILE) COMPILER::NULL-EFFECTS-INTERSECTION-EXCEPT-CONS (:NONE :ANY) +COMPILER::RESOLVE-VARIABLE-BINDING (:LEXICAL COMPILER::*NEW-GLOBALS* GLOBALVARS COMPILER::*NEW-SPECIALS* + LOCALFREEVARS SPECVARS LOCALVARS :SPECIAL) \FONTINFOFROMFILENAME (UPPERCASEARRAY) \FONTFILENAME.OLD ( +*DISPLAY-FONT-NAME-MAP*) TTYIN.SHOW.?ALTERNATIVES (\MAXTHINCHAR \RDTBLSA MULTIPLE-ESCAPE.RC ESCAPE.RC +SPLST USERWORDS \LASTCHAR DIDESCAPECODE *PRINT-CASE* :UPCASE RDTBL) \PFGetVol (\DFSLogicalVolumes) +ERROR (HELPFLAG *LAST-CONDITION*) CONDITIONS:INVOKE-RESTART (:NAME) SPELLFILEDIR (NAME EXTENSION +VERSION DIRHOSTS) RECDEC? (CLISPTRANFLG CLISPRECORDTYPES) \AGE.ROUTING.TABLE (\ROUTING.TABLE.TYPENUM +:CULPRIT :EXPECTED-TYPE \ROUTING.TABLE.MASK \RT.TIMEOUTINTERVAL WORDSPERCELL) +COMPILER::RESOLVE-VARIABLE-REFERENCE (:VARIABLE) MAPATOMS (\DTDSpaceBase \NEW-ATOM \AtomFrLst +WORDSPERPAGE \PagesPerMDSUnit \MDSIncrement \MAXVMPAGE \MDSTypeTable \TT.TYPEMASK) \EXTENDSTACK ( +\LastStackAddr \GuardStackAddr \STACKHI WORDSPERPAGE) CL:PRINT (*STANDARD-OUTPUT*) LISPVERSION ( +\InterfacePage) MOVETO.IP (MOVETO) CONDITIONS:COMPUTE-RESTARTS (*PROCEED-CASES*) SCANDEFINEQ (VARS +LDFLG) INSPECT/AS/BLOCKRECORD (PROMPTWINDOW) ATOMHASH#PROBES (\MAXTHINCHAR \PNAMELIMIT \AtomHashTable +\OLDATOMSPACE) CREATE-PROCESS-STREAM (*NEW-SHELL-DEVICE* *SHELL-DEVICE* LF.EOLC) ONEDINSPECTW.CREATE ( +INSPECTORFONT WindowTitleDisplayStream INSPECTPRINTLEVEL) GRAPHOBJ.FINDGRAPH (BLACKSHADE LASTMOUSEX +LASTMOUSEY LASTMOUSEBUTTONS) LISPFORM.SIMPLIFY (COMPILERMACROPROPS CLISPARRAY) APPENDINTEGER.IP ( +SEQINTEGER) \SCALEDBITBLT.PSC (POSTSCRIPT.BITMAP.SCALE :EOL) MSPRINTHELPFILE (MSHELPFILE) +CLIPRECTANGLE.IP (CLIPRECTANGLE) CLISPTRAN (CLISPTRANFLG) TEDITFROMBRAVO (MAX.FIXP) \HANDLE.RAW.PUP ( +\EPT.PUP \PUPSOCKETS PUPTRACEFILE \PT.ECHOME \PUPSOCKET.ECHO MASKWORD1'S \PT.IAMBADECHO \PT.IAMECHO +\PUPE.NOSOCKET \PUPE.SOCKETFULL \PUPE.CHECKSUM \PUP.ROUTING.TABLE) \FONTFACE.COLOR ( +\COLORDISPLAYSTREAMTYPES) POSTSCRIPT.ENDPAGE (:EOL) \ITEMW.FLIPCOPY (GRAYSHADE) DO-HISTORY-SEARCH ( +*CURRENT-EVENT*) DBG::MAKE-FRAME-INSPECT-WINDOW (:TOP) SCANDECLARECOLON (VARLST FNLST LDFLG) +\DSPSCALE.PSC (:EOL) \FINDFONTFILE (*OLD-FONT-EXTENSIONS*) CONDITIONS:INVOKE-RESTART-INTERACTIVELY ( +:NAME) \COURIER.RESULTS (\COURIERMSG.RETURN \COURIERMSG.ABORT \COURIERPROGRAM \COURIERMSG.REJECT) +\SETUPGUARDBLOCK (\STK.GUARD.WORD) CONDITIONS:INVOKE-DEBUGGER (:CONDITION) SEDIT::TRANSLATE-CHARS ( +*READTABLE*) SEDIT::UNDO-ATOM-CHANGE (SEDIT::TYPE-STRING) NO.SIDEEFFECTS.FNP (NOSIDEFNS) +BEGINPREAMBLE.IP (BEGINPREAMBLE) POSTEDITPROPS (FILEPKGFLG) \FIND.LOCALPUPHOSTNUMBER (\MY.NSHOSTNUMBER + PUPTRACEFILE \OLDPUPHOST#) \NSRANDOM.READPAGES (BYTESPERPAGE WORDSPERPAGE +*NSFILING-PAGE-CACHE-INCREMENT* AppendBit WriteBit) \TEDIT.APPLY.PARASTYLES (TEDIT.STYLES) ED ( +:DISPLAY :CURRENT :NEW PROMPTWINDOW) FIXSPELL1 (READBUF FAULTFN FIXSPELLDEFAULT DWIMKEYLST +FIXSPELLKEYLST VETOSTATS COMMENTFLG SPELLSTATS SPELLSTATS1 RUNONSTATS) SEDIT::ASSIGN-FORMAT-DOTLIST ( +:DATA) \POLYSHADE.BLT (MIN.INTEGER MAX.INTEGER) BREAKLINE (\CURSORCOL) OPT.CFRPTQ (COMPILE.CONTEXT) +GRAPHEROBJ (GRAPHERIMAGEFNS) \NODIRCORE.OPENFILE (BYTESPERPAGE) \PUTD (\ST.CODE) FIXDATUM ( +CLISPCHARRAY RECORDEXPRESSION COMPILERMACROPROPS) BLTPATTERN.REPLACEDISPLAY (WHITESHADE) \GET-MY-BF ( +MYALINK) \RENAMEDFN (CELLSPERQUAD) LINETO.IP (LINETO) SI::UNWIND-TO-BLIP (MYALINK \STACKHI +WORDSPERCELL) \INIT-MISCN-TABLE (\MISCN-TABLE-LIST) SCALEBM (WHITESHADE) EVALUABLE.CONSTANTP ( +CONSTANTFOLDFNS \WALKABLE.SPECIALFORMS) BLOCKCOMPILE (NLAMA NLAML LAMS LAMA NOFIXFNSLST NOFIXVARSLST +SYSSPECVARS FILERDTBL) CL:SYMBOL-NAME (:EXPECTED-TYPE :CULPRIT) SI::GET-CACHE-CLOSURE ( +SI::*CLOSURE-CACHE*) POSTSCRIPT.PUTCOMMAND (:EOL) CLOSEALL (\OPENFILES) \NSFILING.SETFILEINFO ( +PROMPTWINDOW) \VARNOTUSED (\QUOTIFYING.NLS \WALKABLE.SPECIALFORMS) \DSPSCALE2.PSC (:EOL) +PFI.AFTER.NEW.PAGE (DEFAULTFONT :INDEX *PFI-PAGE-PREFIX* BOLDFONT ITALICFONT) BUTTONPANEL/SELECTION/FN + (WHITESHADE MENUSELECTSHADE) \NSRANDOM.SESSION.WATCHER (AppendBit WriteBit *NSFILING-SESSION-TIMEOUT* + \FIXP) \PFInitializeVols (\PhysVolumePage) EOFCLOSEF (DEFAULTEOFCLOSE) CL:SYMBOL-VALUE ( +:EXPECTED-TYPE :CULPRIT) \NSFILING.GETFILEINFO (\NSFILING.ALL.ATTRIBUTE.TYPES +\LISP.TO.NSFILING.ATTRIBUTES AppendBit WriteBit \NSFILING.USEFUL.ATTRIBUTE.TYPES) CL:FORMAT ( +*STANDARD-OUTPUT*) \FINDOP (\OPCODES) \TEDIT.CHARLOOKSMENU.CREATE (TEDIT.CHARLOOKSMENU.SPEC) +\PAGEDEOFP (ReadBit) SEDIT::LINEARIZE-CLISP (SEDIT::TYPE-COMMENT :KEYWORD SEDIT::CLISP-PROGRAM-WORDS +SEDIT::CLISP-INDENT-WORDS) \GET-COMPILED-CODE-BASE (\COMPILED-CLOSURE) \DECL.COMNT.PROCESS (COMMENTFLG +) SEDIT::SPLIT-LITATOM (SEDIT::TYPE-STRING) OPENP (\FILEDEVICES) SPY.BUTTON (SPY.CLOSED +LASTMOUSEBUTTONS) TWODINSPECTW.CREATE (INSPECTORFONT WindowTitleDisplayStream INSPECTPRINTLEVEL) SETA +(\ST.PTR \ST.PTR2 \ST.INT32 \ST.BYTE \ST.CODE \ST.POS16 \ST.BIT BITSPERWORD \ST.FLOAT) \DSPCOLOR.PSC ( +:EOL) COMP.ARGTYPE (LAMA LAMS NLAML NLAMA BLKDEFS BLKLIBRARY NOFIXFNSLST) PFCOPYBYTES (ANY.EOLC +FONTESCAPECHAR) CHECKRECORDNAME (DECL) ARRAY (\MaxArrayLen \ST.BYTE \ST.POS16 PTRBLOCK.GCT \ST.PTR +\ST.PTR2 \ST.INT32 \ST.FLOAT \ST.BIT WORDSPERCELL MASKWORD1'S) ERRORMESS (*LAST-CONDITION* +*ERROR-OUTPUT*) COPY.WINDOW.TO.BITMAP (\CURSORDESTINATION \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS) +\10MB.GETPACKETSTATUS (\MACHINETYPE \DANDELION \ES.PENDING \ES.PACKET.TOO.LONG \DL.BAD.ALIGNMENT +\DL.OVERRUN \DL.BAD.CRC \ES.GOOD.PACKET \ES.OVERRUN \DL.ODDLENGTH \ES.BAD.CRC \ES.BAD.CRC&ALIGNMENT +\ES.BAD.ALIGNMENT \ES.OTHER.ERROR \ES.TOO.MANY.COLLISIONS \DL.COLLISION \DL.UNDERRUN \ES.UNDERRUN +\DAYBREAK \DOLPHIN \D0.GOOD.PACKET \D0.LATE.COLLISION \ES.LATE.COLLISION \D0.TOO.MANY.COLLISIONS +\D0.PACKET.TOO.LONG \D0.BAD.ALIGNMENT \D0.INPUT.BAD.CRC \D0.INPUT.OVERRUN \D0.OUTPUT.UNDERRUN) +\DELETETREE (\BTREELASTREALOFFSET) SI::INTERNAL-THROW-VALUES (:TAG) SCANCOMPILEDFN (LDFLG VARS) +\TEDIT.EXPANDED.MENU (TEDIT.EXPANDED.MENU) ARGS.COMMUTABLEP (\QUOTIFYING.NLS \WALKABLE.SPECIALFORMS) +ERASE/GRAPHNODE (WHITESHADE) CALLS3 (INVISIBLEVARS) SEDIT::SET-SELECTION-STRING (SEDIT::BUTTON-STRING) + COMPILER::NULL-EFFECTS-INTERSECTION (:NONE :ANY) USER-SUBR-NUMBER (\USER-SUBR-LIST) TEDIT.GET.OBJECT1 + (DEFAULTFONT) HPINITRDTBL (HPFORWRDCHR HPFORWRDCDRCHR HPBAKCHAR HPFILLCHAR HPFINALCHAR) MSDESCRIBE ( +MSDATABASELST BOLDFONT DEFAULTFONT GLOBALVARS DESCRIBELST) \READSTRIKEFONTFILE (\MAXTHINCHAR) +SI::PVAR-VALUE-IN-FRAME (PVARCODE \STACKHI) BEGINPAGE.IP (BEGINPAGE) MAKEUSERMACROSCOMS (USERMACROS +EDITMACROS) MOVE.FORWARD.TO (\CURSORCOL \ARROW) \READACFONTFILE (\MAXTHINCHAR BLACKSHADE) +SI::VARIABLE-NAME-IN-FRAME (\AtomHI) \LFCloseDevice (\LFtopMonitor \LFdevice) COMPILER::EFFECTLESS-EXCEPT-CONS + (:NONE) FW-ADJUST-PLACEMENT (FW-WindowBottomDelta) SEDIT::CREATE-NULL-LIST (SEDIT::TYPE-LIST) +SHOW.CLEARINGHOUSE (\CH.CACHE) ASSURE.PUP.READY (\PUP.READY.LOCK \LOCALNDBS \PUP.READY.EVENT) +MB.MARGINBAR.SELFN (LASTMOUSEBUTTONS WHITESHADE) FASL::FASL-END-OF-BLOCK (FASL::*BLOCK-LEVEL* :STREAM) + \MEDW.GETSCREENREGION (EXPANDINGBOX GRAYSHADE \CURSORDESTINATION LASTMOUSEX LASTMOUSEY +\CURSORDESTWIDTH \CURSORDESTHEIGHT LASTMOUSEBUTTONS CLICKWAITTIME FORCEPS \CURSORSCREEN) RETURN ( +MYALINK) LOOKUPHASHFILE (MAX.INTEGER HASHTEXTCHAR HASHFILERDTBL) \DISCARDFRAME (WORDSPERCELL \STACKHI) + MBUTTON.FIND.BUTTON (PCNO) \INIT-USER-SUBR-TABLE (\USER-SUBR-LIST) SEDIT::COMPILE-STRUCTURE ( +PROMPTWINDOW SEDIT:*COMPILE-FN*) COLLECTFNDATA (CALLSDATA) PF (*COMPILED-EXTENSIONS*) COMPILER::ANALYZE-TREE + (:ONCE) CL:FIND-SYMBOL (*PACKAGE*) CHANGETRAN1 (DECLST) \CREATE.TEDIT.DELETESELECTION (BLACKSHADE) +MakeMenuOfPrinters (DEFAULTPRINTINGHOST) BRHC/LAYOUT/DAUGHTERS (MOTHERD NODELST FAMILYD) +CL:SYMBOL-FUNCTION (:NAME) FASL::SETESCAPE (FASL::FASL-EXTENDED) \NSRANDOM.WRITEPAGES (BYTESPERPAGE) +PMORE (LASTFNDEF) SCROLL.HANDLER (LASTMOUSEX LASTMOUSEY SCROLLWAITTIME VertScrollCursor ScrollUpCursor + ScrollDownCursor VertThumbCursor HorizScrollCursor ScrollLeftCursor HorizThumbCursor +ScrollRightCursor LASTMOUSEBUTTONS WAITBETWEENSCROLLTIME WAITBEFORESCROLLTIME) ELT (\ST.PTR \ST.PTR2 +\ST.INT32 \ST.BYTE \ST.CODE \ST.POS16 \ST.BIT BITSPERWORD \ST.FLOAT) UNDOLISPX3 (UNDOSTATS LISPXHIST) +\SFROTATECSINFOOFFSETS (\MAXTHINCHAR \MAXCHAR) PRINTFNDEF (PFDEFAULT) \FONTRESETCHARWIDTHS (\MAXCHAR) +SEDIT::SET-POINT-STRING (SEDIT::BUTTON-STRING) \STARTPUP (\PUPSOCKETS) FM.CHANGESTATE (\FM.GROUPSPEC) +HVRPTREAD (HPRPTSTRING) CLEARSTK (\STACKP \STACKHI WORDSPERCELL \MDSIncrement) UNICODE.UNMAPPED ( +N-TRANSLATION-SEGMENTS) \IRM.GET.HASHFILE (IRM.HASHFILE.NAME IRM.HOST&DIR) HARDRESET (\ResetFXP) +SEDIT::CFV-DOTLIST (SEDIT::TYPE-DOTLIST) FASL:CLOSE-FASL-HANDLE (FASL::END-OF-DATA-MARK :CLOSED) +HVFWDREAD (HPBAKCHAR) FASL::CLEAR-TABLE (FASL::*VALUE-TABLE*) FM.RESETSTATE (\FM.GROUPSPEC) +\RESETTERMINAL (\VideoColor) MULTIFILEINDEX (:PATHNAME) \KEYBOARDON (\EM.DISPINTERRUPT \LispKeyMask +\MACHINETYPE \MAIKO) %#BITSON (BITSPERSHADE) FASL:PROCESS-BLOCK (FASL:*DEFAULT-OPTABLE*) +WRITESTRIKEFONTFILE (\MAXCHARSET) FASL::NEW-VALUE-TABLE (FASL::INITIAL-VALUE-TABLE-SIZE) DWIMIFYREC ( +DECL VARS FAULTFN) \COURIER.OUTPUT.ABORTED (AppendBit WriteBit :BULKDATA :ABORT) UTF8.OUTCHARFN ( +LF.EOLC CR.EOLC CRLF.EOLC *XCCSTOUNICODE* TRANSLATION-SHIFT TRANSLATION-MASK) TTUNREADBUF (\CURSOR +\ENDBUFFER) \SETUPSTACK1 (WORDSPERQUAD \STACKHI WORDSPERCELL \STACKSPACE \STK.BF.WORD \#ALINK.OFFSET) +\TEDIT.EXPANDEDCHARLOOKS.MENU (TEDIT.CHARLOOKS.MENU) SEDIT::SET-LIST-FORMAT (SEDIT::LIST-FORMATS-TABLE +) FASL::FETCH-VALUE (FASL::*VALUE-TABLE*) FASL::STORE-VALUE (FASL::*VALUE-TABLE* +FASL::VALUE-TABLE-INCREMENT) SEDIT::SET-SELECTION-LITATOM (SEDIT::BUTTON-STRING) DELETE.TO.END ( +\CURSOR \CURSORCOL) \MEDW.GETBOXSCREENPOSITION (BOXCURSOR LASTMOUSEBUTTONS LASTMOUSEX LASTMOUSEY +GRAYSHADE CROSSHAIRS LASTSCREEN) STRIKECSINFO (\MAXTHINCHAR) \RESETSTACK (\ResetFXP) +ICMLARRAY.VALUECOMMANDFN (;) PAGEFAULTS (\MISCSTATS) \PFCreateVols (maxLogicalVolumes) \RESETSTACK0 ( +\StackAreaSize \FAULTFXP \ResetFXP) BEGINMASTER.IP (BEGINMASTER) \MAKEBASEBYTESTREAM (\BASEBYTESDEVICE + BITSPERBYTE) SUBRNUMBER (\INITSUBRS) \SETTOTALTIME (\MISCSTATS) \DUMMYTELERAID (\TeleRaidFXP) +CLOCKDIFFERENCE (\MISCSTATS) FASL::DO-OP (FASL::*BLOCK-LEVEL* FASL::*CURRENT-OPTABLE*) \DOTELERAID ( +\TeleRaidFXP) \SERIALNUMBER (\InterfacePage) CARET (DEFAULTCARET) OPENSTRINGSTREAM (\NORUNCODE) +\FBITMAPBIT.UFN (BITMASKARRAY NOTBITMASKARRAY) COMPILER::EFFECTLESS (:NONE) \PFInitFileDescriptors ( +\PhysVolumePage \PFLogicalVolumeFileD \PFMarkerFileD) APPENDOP.IP (SHORTOP LONGOP) MAKELISPXMACROSCOMS + (LISPXHISTORYMACROS LISPXMACROS LISPXCOMS HISTORYCOMS) COMP.SETARG (COMTYPE ARGVARS CODE) TTYINEDIT ( +TTYINPRINTFN TTYINEDITPROMPT HISTSTR1) INITBITMASKS (WORDMASK) SCANFILE1 (FNLST LDFLG VARS) SPP.EOFP ( +ReadBit) COURIER.CALL (\COURIERPROGRAM) EVALQT (LISPXHISTORY) PRESSFILEP (BYTESPERRECORD) +PFI.MAKE.LPT.STREAM (DEFAULTPRINTINGHOST *PFI-PRINTOPTIONS*) RECORDECL1 (DECLARATIONCHAIN +CLISPRECORDTYPES) STRING.EQUAL (\ST.BYTE \MAXTHINCHAR) SEDIT::NEW-FUNCTION-BODY (SEDIT::ARGS-GAP +SEDIT::BODY-GAP) BRHC/LAYOUT (PERSONALD) GetImageFile (PRINTFILETYPES) SPP.READP (ReadBit) +\CAUSEINTERRUPT (\InterfacePage) TTINSERTSECTION (\DSP \DESCENT) SEDIT::SET-POINT-LITATOM ( +SEDIT::BUTTON-STRING) SCANFILE0 (FILECREATEDLOC) CREATEDSKDIRECTORY (\LFtopMonitor) FM.HIGHLIGHTITEM ( +\FM.GROUPSPEC) RECORDECLTAIL (CLISPRECORDTYPES COMMENTFLG) HVREADEND (HPFINALCHAR) CH.LOOKUP.OBJECT ( +\CH.BROADCAST.SOCKET) \InitCurveBrushes (\BrushNames) TEDIT.RAW.INCLUDE (DEFAULTFONT +TEDIT.DEFAULT.FMTSPEC) \CreateCursorBitMap (\EM.CURSORBITMAP) INTERRUPTED (\CURRENTKEYACTION) +PFI.SETUP.TRANSLATIONS (*PFI-CHARACTER-TRANSLATIONS*) COMPERRM (COUTFILE) \DOMISCAPPLY1 (\MiscFXP) +ARCTO.IP (ARCTO) COMP.ARG (COMPILE.CONTEXT COMTYPE ARGVARS CODE) MAKE-UNICODE-FORMATS (LF.EOLC CR.EOLC + CRLF.EOLC :UTF16BE :UTF16BE-RAW :UTF8-RAW :UTF8) \ZEROWORDS (WORDSPERSEGMENT) \CONTEXTAPPLY (MYALINK +\InterfacePage) FASL:OPCODE-SEQUENCE (FASL:*DEFAULT-OPTABLE* FASL::FASL-EXTENDED) +IRM.CREF.BUTTONEVENTFN (BLACKSHADE LASTMOUSEBUTTONS) \GATHER-CLEANUP-FORMS1 (\InterfacePage \STACKHI) +DO.EDIT.COMMAND (\BUFFER \ENDBUFFER \ARROW \FIRSTLINE \LOC.ROW.0 \CURSORROW \TTYINSTATE \MAXTHINCHAR +\PRIMTERMSA WORDSEPR.TC \RDTBLSA EDITPREFIXCHAR EOLCHARCODE) MBUTTON.CREATE (DEFAULTFONT +MBUTTONIMAGEFNS) \MEDW.GETSCREENPOSITION (CROSSHAIRS LASTMOUSEBUTTONS \CURSORSCREEN LASTSCREEN +LASTMOUSEX LASTMOUSEY) \DISABLEGC1 (\MDSTypeTable \MDSTTsize) \GATHER-SPECIAL-BINDINGS (FVARCODE +\AtomHI *HARDRESET-IGNORE-VARS* IVARCODE PVARCODE \STACKHI) HVREADCHECKGETFN (UNDERREADIMAGEOBJ +HPRINTREADFNS IMAGEOBJGETFNS) RECORDECLBLOCK (COMMENTFLG DATATYPEFIELDTYPES DATATYPEFIELDCOERCIONS +STRUCNAME) RECORDERROR (DWIMIFYFLG FAULTFN) \GC.MODIFY.BIGREFCNT (\HTBIGCOUNT \HTBIGENTRYSIZE +\ADDREFCASE MAX.SMALLP \DELREFCASE \MAXHTCNT \SCANREFCASE \UNSCANREFCASE) \MAKE.PROCESS0 ( +\DEFAULTLINEBUF \LINEBUF.OFD *READTABLE* \PRIMTERMTABLE \PRIMTERMSA \DEFAULTTTYDISPLAYSTREAM \MiscFXP +*DRIBBLE-OUTPUT* \PROC.RESETME \PROC.KILLME \PROC.RESTARTME PROMPTWINDOW) XCL:COMPILE-FORM (:PARENT +SPECVARS LOCALVARS GLOBALVARS) \10MB.GETPACKETLENGTH (\MACHINETYPE \DANDELION \DAYBREAK \DOLPHIN) +\GCERROR (\GCDISABLED) FILLNGON.IP (MAXSEGSPERTRAJECTORY DOSAVESIMPLEBODY { MAKEOUTLINE MASKFILL }) +RETRYSCAN (FILE *FILEMAP-HASH*) BITBLT (\CURSORDESTINATION \EM.DISPINTERRUPT \TOPWDS \SCREENBITMAPS) +CHECKSAMEDIR (MIGRATIONS :TEST SAMEDIRWAIT SAMEDIRDEFAULT) \GC.ENTER.BIGREFCNT (\HTBIGCOUNT +\HTBIGENTRYSIZE WORDSPERPAGE \MP.BIGREFCNTALREADYPRESENT \MAXHTCNT) COMPILER::CLOSURE-ANNOTATE-BLOCK ( +:SCOPE :LEXICAL :KIND :VARIABLE :NAME :BINDER :CLOSED-OVER) TTCOMPLETEWORD (\CURSOR \BUFFER SPLST +\MAXTHINCHAR \RDTBLSA MULTIPLE-ESCAPE.RC ESCAPE.RC *PACKAGE* \CURSORCOL SPELLSTR1 USERWORDS) +\NSRANDOM.SETEOFPTR (WriteBit AppendBit) \BLTSHADE.BITMAP (WHITESHADE BLACKSHADE) FORMAT-FIND-COMMAND +(*FORMAT-INDEX*) \BITBLT.BITMAP (BLACKSHADE) \SEARCHOPENFILES (\OPENFILES) \CREATE.TTYDISPLAYSTREAM ( +TTYREGIONOFFSETS DEFAULTTTYREGION \DEFAULTTTYDISPLAYSTREAM) ARG (\STACKSPACE) CHAT.TYPEOUT ( +CHAT.DRIVERTYPES \SYSBUFFER) SEDIT::SCAN-STRING (*READTABLE*) COMP.GLOBALVARP (GLOBALVARS) +\LFCloseFile (\LFtopMonitor) UNDONLSETQ1 (UNDOSTATS) \HARDRESET-CLEANUP1 (MYALINK \STACKHI +WORDSPERQUAD WORDSPERCELL \LITATOM \NEW-ATOM PVARCODE) COMP.EFFECT (LEVEL CODE AC) HVBAKREAD ( +HPRPTSTRING FILERDTBL BACKREFS BACKREFCNT) \HARDRESET-CLEANUP (WORDSPERQUAD CELLSPERQUAD) +XCL:UNADVISE-FUNCTION (:IN :NO-ERROR) SEDIT::BUILD-INTERNAL-STRUCTURE (SEDIT::TYPE-ROOT) +GRAPHOBJ.GETFN (FILERDTBL) \GC.BIGREFCNT.MISSING (\MP.BIGREFCNTMISSING) /LISPXPUT (LISPXHISTORY) +SI::BQUOTE-NCONC (SI::*BACKQUOTE-LEVEL*) ASKUSERSETUP (OPTIONSLST FILE) \INSURESCREEN (\CURSORSCREEN) +COMP.LAM1 (ALLVARS SUBFNFREEVARS) \GC.LOOKUP.BIGREFCNT (\HTBIGCOUNT \MAXHTCNT \HTBIGENTRYSIZE) +SEDIT::SELECT-SEGMENT-LITATOM (SEDIT::TYPE-STRING) \FORMATLINE (LMInvisibleRun TEDIT.DONT.LAST.CHARS +TEDIT.DONT.BREAK.CHARS DEFAULTFONT) \GCMAPSCAN (\HTMAINSIZE \HTMAIN GCREF) XCL:ADVISE-FUNCTION ( +:BEFORE :LAST *ERROR-OUTPUT* :NAME :IN :NO-ERROR ADVISEDFNS) END.DELETE.MODE (TTYINBSFLG) +PFI.LINES.REMAINING (*STANDARD-OUTPUT*) COMPILER::TEST-ANALYSIS (:ALL) \TEDIT.EXPANDEDPARA.MENU ( +TEDIT.EXPANDEDPARA.MENU) \GCMAPUNSCAN (\HTMAINSIZE \HTMAIN) IDLE.SHOW.OPTION (IDLE.PROFILE +PROMPTWINDOW) FIND.NON.SPACE (\ENDBUFFER) GETSCREENREGION (\CURSORSCREEN) \DORETCALL (\STACKHI) +RECORDECL0 (CLISPRECORDTYPES RECORDTRANHASH) XCL:COMPILE-DEFINER (:PARENT) FW-FORGET-STREAM ( +FW-OFDList) \CLEANUP.STACKFULL (AUTOHARDRESETFLG RESETSTATE) TEDIT.FORMATBOX (:NEW-PAGE-LAYOUT) +SI::BQUOTE-APPEND (SI::*BACKQUOTE-LEVEL*) SEDIT::ATOM-CHANGE-RELINEARIZE (SEDIT::TYPE-LITATOM) +XCL:REBREAK-FUNCTION (XCL::*BREAK-HASH-TABLE* *ERROR-OUTPUT*) MACHINETYPE (\InterfacePage \DORADO +\DANDELION \DAYBREAK \MAIKO) \REFCNT (\MDSTypeTable \HTMAIN \MAXHTCNT \HTCOLL) XCL:TRACE-FUNCTION ( +:NAME *ERROR-OUTPUT* :IN :NO-ERROR :UPCASE) FASL:PROCESS-SEGMENT (FASL:*DEFAULT-OPTABLE*) +MSMARKCHANGE1 (MSCHANGEDARRAY) \EQREFCNT1 (\MDSTypeTable \HTMAIN \HTCOLL) \PFCreateFileDescriptors ( +maxLogicalVolumes tLogicalVolumeRootPage tSubVolumeMarkerPage tFreePage tVolumeAllocationMap +tVolumeFileMap) RESET (MYALINK \PROC.RESETME PROMPTWINDOW) APPENDRATIONAL.IP (SEQRATIONAL) FASL:BEGIN-TEXT + (:TEXT) \SET.FINALIZATION.FUNCTION (\MaxTypeNumber \FINALIZATION.FUNCTIONS) XCL:CREATE-TRACE-WINDOW ( +TRACEREGION) \COPYSYS (\CONNECTED.DIRECTORY \LASTUSERACTION) NIL +REF LOADVARS (FILE LDFLG VARS) FNTYP (FN #:G2 #:G3) TEDIT.COPY.LOOKS (STREAM DEST TEXTOBJ) COMP.APPLY* + (A) \UFS.RECOGNIZE.FILE (DEV #:G101 FILENAME RECOG NAMEAREA ERRNO) \GETFTPCONNECTION (HOST H) +\TYPENUMBERFROMNAME (INDEX) GETNSPRINTER (HOST) \TFBRAVO.APPLY.PARALOOKS (MARGIN.CANDIDATE TEXTOBJ +PARALOOKS LENGTH) CL::MAYBE-MAKE-BINDING-FORM (CL::NEWVAR CL::SETTER CL::NEWVAL-FORM) +\TEDIT.COMMAND.LOOP (STREAM TEDITSA TEDITFNHASH BLANKSEEN CRSEEN) LOADFNS-MAKELIST (Y) +ANALYZE-PARAMETER (PARAM ERRLOC NEW-WHOLE) XCL::CLEAR-IMPLICIT-KEY-HASH (XCL::IK-HASH-TABLE XCL::BASE +XCL::LAST-INDEX) \DSPSPACEFACTOR.IP (STREAM) CH.DOMAINS.SERVED (CHADDRESS) \TEDIT.CONVERT.TO.FORMATTED + (START END TEXTLEN START-OF-PIECE PCNO CRSTRING) \GETPILOTBBTSCRATCHBM (WIDTH HEIGHT) +SEDIT::MENU-PACKAGE-SELECTEDFN (SEDIT::ITEM SEDIT::PACKAGE-NAME-ITEM CL:PACKAGE-NAME SEDIT::BUTTONS +SEDIT::WINDOW $$OUTPUT) RECREDECLARE (RECNAME RECFIELDS OLDFLG) SPYOBJ (NAME PERCENT) +TEDIT.DISPLAYTEXT (TEXTOBJ XPOINT LINE LOOKS DS CH FONT) \DSPRESET.PSC (IMAGEDATA) WHILEDOUNTIL ($FORM +) OPT.JLENPASS (JL PROP) \INSUREBITSPERPIXEL (NBITS) CL::SETF-ERROR (CL::FN) ANALYZE-KEY (TEMP) +XCL::IMPLICIT-KEY-MAP-HASH (XCL::IK-HASH-TABLE XCL::BASE XCL::LAST-INDEX) \DSPTOPMARGIN.IP (IPSTREAM) +LASTCHPOS (STR CH) COMP.PUSHCALL (N CHK LEV FR LP FORM) \UPF.TEMPFILEP (FILENAME START) +TEDITCHAT.CHARFN (CHAT.STATE TEXTSTREAM CH SEL) \FTP.PRINTPLIST (STREAM PLIST PAIR) \UPF.NEXTPOS ( +STRING CHAR) \SPP.CLEANUP (INSTREAM F) GCGAG (MESSAGE) RECORDECL (DEC) GETHOSTINFO (ATTRIBUTE) +\DSPCLIPPINGREGION.PSC (STREAM OLDCLIP) XCL::PPRINT-DEFINER (XCL::DEFINE-EXPRESSION TAIL) +\CH.UPDATE.CACHE (OBJECT ADDRESS DOMAINS.SERVED) TEXTPROP (X) DISABLEGC (NOERROR) SET.TTYINEDIT.WINDOW + (OFFSET) UNPACKPATHNAME.STRING (RESULT FILE) \FIXILINES (SEL DCH OTEXTLEN) SEDIT::MENU-INIT-STATE ( +SEDIT::PRINT-BASE SEDIT::MENU CL:PACKAGE-NAME) \DOGCDISABLEDINTERRUPT (W) TTYINMETA (FLG) +BRH/LAYOUT/DAUGHTERS (DS Y X MOMLST) FLASHWINDOW (SHADE) HASHFILENAME (HASHFILE) IDLE.SET.OPTION ( +OPTION X) \LEAF.SETCREATIONDATE (STREAM DATE OPUP FILEDATE) BITMAPBIT (X Y) \SEARCH.OUTPUTQ (SOCKET) +EDITREC (L) SPY.MERGE.CALLEES (NEWORIGINAL OLDCOPY SPYDATA PARENTS) \FILLPOLYGON.PSC (KNOTS STREAM K +LASTPOINT) SHRKFY (LOOKAT WORKFLAG) ANTILOG (X XX) SEDIT::MENU-FIND-SELECTEDFN (SEDIT::ITEM SEDIT::WINDOW + SEDIT::FIND-ITEM SEDIT::BUTTONS) LINE.LESSP (ARG1 ARG2) \DSPCLIPTRANSFORMX (X DD TX) COMP.EVALFORM ( +LP DONE) \IGR.MAKEPRETTYCOMSL (NAME) CREATEW (BORDERSIZE NOOPENFLG PROPS) DWIMIFY2A ($TAIL $TYP Y X) +\DSPCLIPTRANSFORMY (Y DD TY) IDLE.BOUNCING.BOX (WINDOW MAXX MAXY) \GENERIC.CURSOR (SCREEN INVERTFLG) +CL::GET-SHARED-SETF-METHOD (CL::ARG CL::G CL::FORM CL::NEW-VAR) COERCETEXTOBJ (STREAM TEXTOBJ TYPE +PCTB) \BBTCURVEPT (Y TOPMINUSBRUSH BRUSHHEIGHT BRUSHBASE BOTTOMMINUSBRUSH TOP BRUSHRASTERWIDTH +DESTINATIONBASE RASTERWIDTH DestinationBitMap LEFT NBITS BRUSHWIDTH LEFTMINUSBRUSH NBITSRIGHTPLUS1 +SourceTypeA0618 DISPLAYDATA SourceTypeA0620 RIGHTPLUS1) CREATEREGION (LEFT BOTTOM WIDTH HEIGHT) AIN ( +APTR INDEX FILE) \DSPLINEFEED.IP (IPSTREAM) \TERMINATESPP (TIMEOUT TIMER) AOUT (APTR INDEX FILE) +CHAT.RECONNECT.OFF (WINDOW FN) \DRAWPOLYGON.PSC (POINTS STREAM BRUSH IMAGEDATA DASHING D P LASTPOINT) +SHRKFY2 (LOOKAT WORKFLAG STAGEFLAG) BLTCHAR (CHARCODE DISPLAYSTREAM) \FTP.PACKFILENAME (PLIST PAIR +HOST) \USEREVENT (EVENT FN) TWODINSPECT.SELECTITEM (WINDOW ROWPROPS COLUMNPROPS VERTMARKS FETCHFN +DATUM HORZMARKS) TEDIT.UPDATE.SCREEN (STARTINGLINE INCREMENTAL? NEXTCARETCH#) SEDIT::MENU-CLOSEFN (SEDIT::W +) \MEDW.CURSOR (INVERTFLG) \SLOWBLTCHAR (CHARCODE DISPLAYSTREAM) \TEXTCLOSEF (STREAM TEXTOBJ) +\DSPPRINTCR/LF (DISPLAY-STREAM DD CHARCODE CLIPREG) BMOBJ.COPYFN (IMAGEOBJ BMOBJ) \DSPRIGHTMARGIN.IP ( +IPSTREAM) SEPRCASE (Y X) FASL::DUMP-BITMAP (FASL::VALUE FASL::HANDLE) COMP.PUSHNILS (N CHK LEV FR LP +FN) XCL::MAKE-IMPLICIT-KEY-HASH-TABLE (XCL::NUM-SLOTS XCL::LOGICAL-SLOTS XCL::KEY-ACCESSOR) +\BSP.CLOSE.OPEN.SOCKETS (SOC) DWIMIFYFNS (FNS X) \SFFixY (Y CSINFO) PRINTWORDS (NWORDS BASE) +\DSPLEFTMARGIN.IP (IPSTREAM) \CARET.FLASH.AGAIN (X Y) \LEAF.CREATIONDATE (STREAM) TTYINBUFFERSTREAM ( +BUF END EOFACTION) ARRAYSIZE (X) SYNONYM (NAME&FIELDS) SPY.ORIGINAL (TREES X) \STRINGWIDTH.PSC (STREAM + STR IMAGEDATA RDTBL) CLISPIFYLOOKUP (WORD VAR1 VAR2) ARRAYTYP (ARRAY) ARRAYORIG (ARRAY) CHARMACRO? ( +MACRO) BRH/OFFSET (NODEIDS YINC) \CHANGECHARSET.DISPLAY (CHARSET CSINFO) \SHOWSEL (TEXTOBJ SHADEHEIGHT + SHADE) COPYARRAY (ARRAY NHARRAY SIZE TYPE ORIG) USERNAME (STRPTR PRESERVECASE) SETD (A N BASEA0290 +BASE V) FASL::DUMP-STRUCTURE (FASL::VALUE) \TEXTSTREAMBOUT (BYTE LOOKS) BSPREADP (STREAM) FTPGETMARK ( +STREAM) ELTD (A N BASEA0289 BASE) SETUSERNAME (ADDR) \MEDW.PUTWINDOWPROP (PROP) REHASH (OLDAR APTR1 +BASEA0301 N BASE NEWAR) \COPYHARRAYP (SOURCE) HASHARRAY (OVERFLOW MINKEYS IDEALSIZE PHYSLOTS +RECLAIMABLE HASHBITSFN EQUIVFN) HARRAYSIZE (HARRAY) SEDIT::JOIN (SEDIT::CONTEXT SEDIT::SELECTION +SEDIT::PROMPTWINDOW SEDIT::POINT) FTPPUTCODE (STREAM CODE NOCODEP) HARRAYP (X) DO.CHAT.OPTION ( +CHAT.STATE) INVERT.TEXTURE (TEXTURE SCRATCHBM) COMP.MLLVAR (X) \LEAF.SETFILETYPE (OPUP STREAM) %. ( +MASTERSCOPECOMMAND) \MEDW.GETWINDOWPROP (PROP) READBITMAP (FILE STRM WIDTH HEIGHT) \NAMEDTABSIZE ( +TABOBJECT MODE PTSIZE CURRENTX) CL::GET-SIMPLE-SETF-METHOD (CL::ARG CL::G CL::FORM CL::NEW-VAR) +SPY.DELETE (TREES NAMES) \NSGATELISTENER (NSOC TIMER) \DRAWARC.PSC (STREAM BRUSH IMAGEDATA DASHING D +CENTERX CENTERY RADIUS STARTANGLE NDEGREES) CLMAPS2 (VAR) SUBARRAY (X N M LEN ORIG OLD) MAXIMUMSHADE ( +BITSPERPIXEL) FASL::DUMP-FLOAT32 (FASL::HANDLE CL:NUMBER) TTYINFIX (INPUT) TXTFILE (TEXTOBJ) TEXTUREP +(OBJECT) \FTP.HANDLE.NO (CONNECTION INSTREAM FLUSHER HOST $$OUTPUT PAIR) HARRAY (MINKEYS) +%%COPY-STRING-TO-ARRAY (LOCAL-STRING SIZE) \HCPYMODEBLTCHAR (CHARCODE DISPLAYSTREAM CHAR8CODE) +CLEARMAP (FILE STREAM PAGES) XCL::PROFILE-VALUES (XCL::PROFILE XCL::X) \FTP.ERRORHANDLER (ERRCODE) = ( +CL::ARGS CL::FIRST-ARG) INVERT.TEXTURE.BITMAP (BM SCRATCHBM NEWBM LASTBASE) OPPOSITESHADE ( +BITSPERPIXEL SHADE) \PNC (LEN OFFST CH) COMP.MLL (LL X P S F V) > (CL::ARGS) READATOM ( +SI::$PROG1-FIRST-EXPRESSION$) \GR.CONTENTS (TYPE) OPPOSITECOLOR (BITSPERPIXEL COLOR) PRINTPROPS (AT TL +) SEDIT::INSPECT-SELECTION (SEDIT::CONTEXT $$OUTPUT) < (CL::ARGS) \CH.CHECK.CLEARINGHOUSE (ADDRESSES) +OVERFLOW (FLG) \WRITEPAGES (STREAM FIRSTPAGE BUFFERLIST) \MEDW.BITBLT (SOURCE DESTINATION DSTWIN SOURCELEFT SOURCEBOTTOM DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT SOURCETYPE OPERATION TEXTURE -CLIPPINGREGION DD SRCWIN SOURCELEFTTRANSFORMED SOURCEBOTTOMTRANSFORMED) SEDIT::PLACE-CARET-AND-SELECTION - (SEDIT::CONTEXT SEDIT::Y SEDIT::SELECTION TYPE) EXCHANGEXIPS (SOC OUTXIP TIMER) \\SEQUIN.HANDLE.ACK ( -QUEUE ACKSEQ) FINDPTRSBUFFER (PTR) TXTFILE (TEXTOBJ) CL:READ-CHAR (STREAM EOF-VALUE) COMPILER::COLLECT-CODE - (COMPILER::NODE COMPILER:CONTEXT) HARRAYP (X) BITMAPBIT.EXPANDER (ARGS) LOCKMAP (PTR) -\\NSFILING.ADDQUOTES (STRING) FINISH-READING-BITMAP (STREAM) HARRAY (MINKEYS) \\SPP.CLOSE.IF.ERROR ( -STREAM) MAPAFTERCLOSE (STREAM) SUBARRAY (X N M LEN ORIG OLD) \\BITBLT.MERGE (OPERATION SOURCEBITMAP -DESTBITMAP PILOTBBT SLX STY DLX DTY HEIGHT TEXTURE WIDTH SCRATCHLEFT SCRATCHTOP) TEDIT.QUIT (VALUE) -LAYOUT/POSITION (NODE) \\CLIPLINE (WIDTH CLIPREG HALFWIDTH) TB.PRINT.LINE (BROWSER ITEM WINDOW PRINTFN -) DISPLAYNODELINKS (G NODE NODELST NODEHASHTABLE TRANS STREAM LINEWIDTH TOSONLY) SEDIT::OUTLINE-SELECTION - (SEDIT::SELECTION SEDIT::ENDLINE SEDIT::FN SEDIT::WINDOW SEDIT::SHADE) MAPPAGE (FILE STREAM PAGE# -READONLY) FB.ANALYZE.PATTERN (SAMPLE) TEDIT.SKIP.SPECIALCOND (TEXTSTREAM IMAGESTREAM PARALOOKS -HEADINGTYPE CHNO) TWODINSPECT.ROWPROPWIDTH (ROWPROPS FONT) HARDCOPYIMAGEW (W) \\MAPPAGE (FILEPAGE#) -HASHARRAY (OVERFLOW MINKEYS IDEALSIZE PHYSLOTS RECLAIMABLE HASHBITSFN EQUIVFN) HARRAYPROP (NARGS PROP) - CL::%SIN-FLOAT (CL::X CL::SIGN CL::R2) COMPILER::ENV-ANALYZE-CATCH (COMPILER::NODE) COMPILER::COPY-NODE-SETQ - (COMPILER::NODE) SEDIT::VAR-CHANGED (CL:ATOM CL:STRUCTURE) EXPRESSIONS.WHENCHANGED (EXPR X) MAPWORD ( -FILEADR FILE) SEDIT::PROPLST-CHANGED (CL:ATOM CL:STRUCTURE) SEDIT::REPLACE-NODE (SEDIT::CONTEXT -SEDIT::POINT SEDIT::NODE SEDIT::NEW-NODE) \\NSNAME.DEFPRINT (NAME) COMP.PUNT (EM) \\3MBSENDPACKET ( -NWORDS) SEDIT:GET-SELECTION (SEDIT::CONTEXT SEDIT::SELECTION TYPE STRING SEDIT::END SEDIT::CHARS) -TWODINSPECT.SETELT (WINDOW ROWPROP COLUMNPROP PRTWINDOW) FB.CHECK.NAME.LENGTH (FILEDATA PRINTLENGTH -SPACING) UNLOCKMAP (PTR) SEDIT::PROP-CHANGED (CL:ATOM CL:STRUCTURE) TWODINSPECT.COLUMNWIDTHS ( -COLUMNPROPS DATUM ROWPROPS COLUMNPROP FETCHFN FONT) UNMARKASCHANGED (NAME CHANGED) -\\TEDIT.MOVE.PIECEMAPFN (TOOBJ FROMOBJ) MAPHASH (HARRAY HA BASEA1801 N BASE BASEA1802 MAPHFN NULLVALUE - LASTSLOT) \\DSPBOTTOMMARGIN.IP (IPSTREAM) SCALE/GRAPH (STREAM GRAPH SCALE) OVERFLOW (FLG) -SEDIT::LESS-PROMPT-WINDOW (SEDIT::REGION SEDIT::FONT) SEDIT::ATOM-CHAR-ESCAPED (CL:CHAR TABLEA1618 -TABLEA1619) \\FTP.GETFILEINFO.FROM.PROPS (ATTRIBUTE PROPS) WORDCONTENTS (PTR) TEXTUREOFCOLOR (COLOR -NOERRORFLG TEX) SEDIT::RELINEARIZE-WHERE-NECESSARY (SEDIT::CONTEXT) \\NSINIT (SOC) -\\TFBRAVO.INSTALL.PAGEFORMAT (VAR PAGENUMBERX PAGENUMBERY TOPMARGIN BOTTOMMARGIN NUMBEROFCOLUMNS -BETWEENCOLUMNS) CLRHASH (HARRAY BASEA1799 N BASE BASEA1800 LASTSLOT) \\HASHACCESS (ITEM BASEA1807 -BASEA1808 VAL) SEDIT:ADD-COMMAND (SEDIT::FORM SEDIT::SCROLL? SEDIT::KEY-CODE SEDIT::COMMAND-NAME) -COMPILER::SIDE-EFFECTS (COMPILER::NAME) \\COLLECTDIRTYBUFS (FIRSTPAGE) \\SEQUIN.COMPARE (X Y DIF) -COMPILER::ENV-ANALYZE-CALL (COMPILER::NODE COMPILER::ARG) COMPILER::COPY-NODE-RETURN (COMPILER::NODE) -SEDIT::HELPMENU (SEDIT::CONTEXT) INSPECT/AS/BLOCKRECORD (INSTANCE ITEM WHERE) SEDIT::INPUT-DOT ( -SEDIT::CONTEXT SEDIT::POINT) \\NOTE.3TO10 (PUPHOST NDB NSADDR) DBG::PRINT-BACKTRACE (DBG::FROM DBG::TO - DBG::X DBG::OUTPUT) |\\VFMDeletePageGroup| (|filePtr| |vol| |interval| |fileSize| |previousKey|) -EXPANDBITMAP (BITMAP) \\MAKE.PMAP.DEVICE (DEVICE) COMPILER::ENV-ANALYZE-BLOCK (COMPILER::NODE) -COMPILER::COPY-NODE-PROGV (COMPILER::NODE) \\TEDIT.SEARCH.CODETABLE (CODETBL) PUTHASH (KEY HARRAY) -\\PUNT.BITBLT.BITMAP (DESTBITMAP SOURCEBITMAP DESTINATIONLEFT DESTINATIONBOTTOM SOURCELEFT -SOURCEBOTTOM CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM OPERATION) \\PAGED.GETNEXTBUFFER (WHATFOR) -SEDIT::EDIT-HELP (SEDIT::CONTEXT SEDIT::POINT SEDIT::PROMPTWINDOW) REMHASH (KEY HARRAY) -SEDIT::RECOMPUTE-WIDTH (SEDIT::STARTX) \\PAGED.FORCEOUTPUT (Y X) COMP.APPLYFNP (X) \\3MB.BROADCASTP ( -PACKET) \\PAGEDSETFILEPTR (INDX NEWPAGE NEWOFF) /SETWORDCONTENTS (PTR N) TB.SHOW.DELETION (BROWSER -WINDOW BASELINE THICKNESS ITEM OPERATION) \\PAGED.SETEOFPTR (NBYTES STREAM NEWEP NEWEO) WORDOFFSET ( -PTR N) \\PUNT.BLTSHADE.BITMAP (DESTINATIONBITMAP OPERATION) SEDIT::ICON-COPYFN (WINDOW) \\UPDATEOF ( -STREAM) SETWORDCONTENTS (PTR N) DEFAULT.EDITDEF (NAME TYPE) FIND.LINE.BREAK (END) -\\DOFORMATTING.HARDCOPY (FMTSPEC QUAD SPACELEFT TEXTOBJ BASEA1526 CHLIST BASEA1527 BASEA1528 BASEA1529 - WLIST BASEA1530 BASEA1531 BASEA1532 N ARR VAL BASEA1533) GET-TWOD-DISPLAYW (WHERE DISPLAYWINDOW FONT -DATUM FETCHFN STOREFN VALUECOMMANDFN ROWPROPCOMMANDFN COLUMNPROPCOMMANDFN TITLECOMMANDFN ROWPROPS -COLUMNPROPS PROFILE) INSERT.TEXT (END ENDOFLINE START) COMPILER::PASSABLE (COMPILER::NODE-1 COMPILER::NODE-2 -) SCANFILE2 (X) SEDIT::PROPAGATE-WIDTH-CHANGE (SEDIT::NODE SEDIT::WIDTH SEDIT::OLD-WIDTH SEDIT::CONTEXT -) PUTHASHTEXT (SRCFIL START END KEY) COMP.BOOL (END) \\3MBENCAPSULATE (PDH NDB LENGTH TYPE) SPY.LEGEND - (X) |\\VAMFreePageGroup| (|groupPtr| |group| |filePtr| |\\DFSVAMjunkPage| RUNLENGTH |\\DFSVAMpage|) -COMPILER::COPY-NODE-PROGN (COMPILER::NODE) SEDIT::GET-MENU (SEDIT::CONTEXT) ADDTOCOMS (COMSNAME NAME -NEAR LISTNAME) PRINT3TO10 (EPKT CALLER) EDITDEF.FNS (NAME EDITCOMS OPTIONS) TTDELSECTION (WIDTH) -SEDIT::SEDITL (CL:ATOM SEDIT::EDITEXPR SEDIT::MESSAGE SEDIT::EDITCHANGES) GET-TOPW (DISPLAYWINDOW -TOPWINDOW FONT) \\STRINGHASHBITS-UFN (ARG-PTR STRING) INVERTED/SHADE/FOR/GRAPHER (NB) COMPILE1A (DEF -FN) HASHOVERFLOW (HARRAY OLDARRAY) \\PAGEDREADP (STREAM TABLE CHA1728 EOLCA1727) TB.FIND.SELECTED.ITEM - (LAST# BROWSER FIRST#) EP (ATOM) HARRAYSIZE (HARRAY) PRINTDISPLAYNODE (NODE) DSPSOURCETYPE ( -DISPLAYSTREAM |Operation| |SourceType|) \\TEDIT.INTERRUPT.SETUP (PROC) CLISPIFY2A (FORM) -SEDIT::HIGHLIGHT-SELECTION (SEDIT::SELECTION SEDIT::WINDOW SEDIT::SHADE) SEDIT::PUNT-SET-POINT ( -SEDIT::POINT SEDIT::CONTEXT SEDIT::NODE SEDIT::WHICH-END SEDIT::COMPUTE-LOCATION?) |\\SFFixFont| ( -BITSPERPIXEL FONT DISPLAYSTREAM) DSPYOFFSET (YOFFSET) |\\SFFixDestination| (BM DISPLAYSTREAM) -\\DISPLAYSTREAMINCRXPOSITION (DD N) INTERSECT/REGIONP/LBWH (HOW REG B H L W) \\NSFILING.REMOVEQUOTES ( -NAME) \\CLIPCURVELINE.IP (LEFT RIGHT TOP BOTTOM PT1VISP IPSTREAM) \\SETIODIRTY (STREAM PAGENUMBER) -\\HASHTABLE.DEFPRINT (STREAM CL:HASH-TABLE) DISPLAYGRAPH (N CLIP/REG) DSPXOFFSET (XOFFSET) -|\\SFFixClippingRegion| (CLIPREG BM) \\CODEARRAY (NBYTES INITONPAGE) \\VANILLADISKINIT (ARR) -\\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (DISPLAYSTREAM NEWLENGTH) SETTTBLPROP (PROP TTBL) -\\VANILLAHOSTNAMEP (NAME) RECORDACCESS (X NEWVALUE) \\SFFIXLINELENGTH (DD) SEDIT::FN-CHANGED (CL:ATOM -CL:STRUCTURE) |\\DSKOpenDevice| (DEV) DBG::%RELEASE-STACK-DATUM (DBG::W DBG::ST) PPBUFS (BUF0) -\\SEQUIN.CLEANUP (SEQUIN) \\HASHRECLAIM (HARRAY BASEA1805 N BASE BASEA1806 LASTSLOT) -\\BITBLT.BITMAP.SLOW (DESTBITMAP SOURCEBITMAP DESTINATIONLEFT DESTINATIONBOTTOM SOURCELEFT -SOURCEBOTTOM CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM OPERATION) \\CHECKARRAYBLOCK (BASE N FBL) -\\NEWLENGTHIS (STREAM PGE OFF) BYTECOMPILE2 (FN DEF) \\FIXCODENUM (CA BASE NUM) -TB.REV.FIND.SELECTED.ITEM (FIRST# LAST# BROWSER) |\\UFSOpenDevice| (DEV) \\ALLOCBLOCK.OLD (BASE N -GCTYPE 1STBLOCK.IN.FREECHAIN) \\ALLOCBLOCK.NEW (ARLEN GCTYPE) SEDIT::SHIFT-STRING (CL:LENGTH) -\\VANILLAEVENTFN (EVENT FDEV) \\ALLOCHUNK (GCTYPE TYPENUM.TABLE) SEDIT::SEDITE (SEDIT::CONTEXT -CL:STRUCTURE SEDIT::CHANGED? SEDIT::IFCHANGEDFN SEDIT::OLD-PROPS SEDIT::EVENT SEDIT::OPTIONS -SEDIT::COMPLETION-FN) GET-CORNERW (DISPLAYWINDOW FONT CORNERWINDOW) POSTSCRIPT.FONTSAVAILABLE (FAMILY -SIZE FACE PAIR DIRECTORY PATTERN FILE DEVICE RAWNAME INVERSE.ALIST NFD) BKLINBUF (STR SA) DSPTEXTURE ( -TEXTURE DISPLAYSTREAM) \\MAIKO.ALLOCBLOCK (ARLEN BASE N) CL::%SQRT-COMPLEX (CL::Z ABS CL:PHASE) -COMPILER::COPY-NODE-OPCODES (COMPILER::NODE) GETSELECTEDITEMS (WMENU) SCANDECLARECOLON (VARLST) -SEDIT::PARSE-NEW (SEDIT::EXPRESSION) \\INCPARENCOUNT (RSNX) COPYHASHFILE (NEWNAME VALUETYPE ACCESS KEY - NEWHASHFILE FN) COMP.EVQ (X) \\DISPLAY.PILOTBITBLT (PILOTBBT N) SEDIT::DECOMPOSE-PSEUDO-SELECTION ( -SEDIT::PSEL) TWODINSPECT.SELECTCOLUMNPROP (WINDOW TOPWINDOW COLUMNPROPS COLUMNPROP HORZMARKS) -PAGEHEIGHT (N) \\LINKBLOCK (N FBL) SEDIT::START-PROCESS (SEDIT::CONTEXT SEDIT::EVENT) -TWODINSPECT.RESHAPEFN (WINDOW) \\MERGEBACKWARD (N) CLEARBUF (FILE STRM) DBG::STACK-FRAME-PROPERTY ( -DBG::PROP DBG::DATUM) TB.FIRST.VISIBLE.ITEM# (BROWSER REGION) \\FIXCODEPTR (CA PTR BASE BN LO) -\\STRING-EQUAL-HASHBITS-UFN (ARG-PTR STRING) SETSYNTAXPROP (CH CLASS RDTBL) TEXTSTREAMP (STREAM) -SEDIT::GRAY (SEDIT::WINDOW) SEDIT::BUILD-PRELINEARIZED-NODE (CL:STRUCTURE SEDIT::NODE-TYPE STRING -SEDIT::PRIN-2? SEDIT::FONT) DEFAULTMAKENEWCOM (TYPE NAME) BUTTONPANEL/SELECTION/FN (ITEM MENU WINDOW) -SEDIT::PARSE--UNKNOWN (CL:STRUCTURE SEDIT::CONTEXT) SPP.DSTYPE (STREAM) \\SAVELINEBUF (NBYTES STR -STRING) COPYHASHITEM (KEY HASHFILE NEWHASHFILE) \\MAKEFREEARRAYBLOCK (LENGTH BASE N) -SEDIT::COMPOSE-PSEUDO-SELECTION (SEDIT::NODE) TTY.PROCESS (KEYACTION) TRAPLOOP (LOOP) WYOFFSET (WINDOW - DS DY) CL::%SQRT-FLOAT (CL::SIGN CL:EXP CL::HI CL::LO) \\DELETEBLOCK? (BASE N FBL) CL::PUTHASH (KEY -EXTRA VALUE CL:HASH-TABLE) LINKPARAMETERS (TOND FROMND) COMPILER::COPY-NODE-MV-PROG1 (COMPILER::NODE) -SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::CONTEXT SEDIT::SELECTION SEDIT::PROMPTWINDOW SEDIT::S) -\\MERGEFORWARD (N) SETDISPLAYHEIGHT (MAGICADDR) \\SETBRUSH.IP (BRUSH IPSTREAM OPERATION) CL::%LOG-FLOAT - (CL::SIGN CL::HI CL::LO CL::Z CL::Z2) DISPLAY/NAME (ND) COMPILER::COPY-NODE-MV-CALL (COMPILER::NODE) -SEDIT::EXPAND (SEDIT::CONTEXT SEDIT::SELECTION SEDIT::PROMPTWINDOW) WXOFFSET (WINDOW DS DX) -\\PREFIXALIGNMENT? (BASE GCTYPE ARLEN) INVERTW (WIN SHADE) SEDIT::PARSE--GAP (CL:STRUCTURE SEDIT::CONTEXT - SEDIT::WIDTH) SPP.OPEN (SOCKET NAME PROPS TIMER TAIL) COMP.CPI1 (ARGS N) BLOCK (TOFX FN) -SEDIT::PSEUDO-SELECTION-FROM-SELECTION (SEDIT::SEL) TEDIT.MOVE (CROSSCOPY) PAGEFULLFN (KEYSTREAM -STREAM) DBG::MAKE-FRAME-INSPECT-WINDOW (DBG::TTYWINDOW DBG::W) TB.LAST.VISIBLE.ITEM# (BROWSER REGION) -\\NEW2PAGE (BASE) SCANEXP (EXP1 EXP2 X) TEDIT.SETFUNCTION (CHAR TABLE CODE) \\MOVETO.HCPYMODE (STREAM -X Y) PLAYTUNE (TUNEPAIRS X |\\DurationLimit|) SETLINELENGTH (N) TB.FIND.ITEM (BROWSER LO HI) -COMPILER::ANALYZE-TREE (COMPILER::TREE) DISPLAYSTREAMP (X STYPE) SEDIT::SET-PROPS (SEDIT::PROPS -SEDIT::PROCESS SEDIT::PROCFORM) TOPW.RESHAPEFN (WINDOW) RECORD.FIELD.VALUE (FIELDNAME) TERMCHARWIDTH ( -CHARCODE STREAM TTBL) CL::%RANDOM (CL::STATE CL:ARRAY) SCANCOMPILEDFN (X FNAME) \\ARRAYBLOCKMERGER ( -BASE NBASE) SEDIT::PARSE (SEDIT::PARSER SEDIT::ENVIRONMENT CL:STRUCTURE SEDIT::DATA SEDIT::REUSE-NODES -) COMPILER::SUBSTITUTABLE-P (COMPILER::VAR COMPILER::ARG) COMP.CPI (ARGS FN) \\COPYARRAYBLOCK (HEADER -LEN TYP) TERMINAL-INPUT (U STREAM) |\\VAMAllocPageGroup| (|filePtr| |\\DFSVAMjunkPage| |\\DFSVAMpage|) - \\COPYCODEBLOCK (NEWCA OLDCA NWORDS) \\STREAMCHARWIDTH (STREAM TABLEA1723 TTBL TABLEA1724 SPACEWIDTH) - COMPILER::COPY-NODE-LITERAL (COMPILER::NODE) SEDIT::EVAL-SELECTION (SEDIT::CONTEXT SEDIT::PROMPTWINDOW - SEDIT::PROCESS) COPYALL (VAL TN Y NH SIZE TYPE IM) TERMINAL-OUTPUT (U STREAM) -\\TEDIT.HARDCOPY.FORMATLINE (TEXTOBJ CH#1 IMAGESTREAM BASEA1521 N ARR VAL BASEA1522 BASEA1523 -BASEA1524 DEVICE NEWDESCENT FONTDESC CHARCODE BASEA1525) \\ADVANCE.ARRAY.SEGMENTS (NXTPAGE) -COMP.ARGTYPE (FN) TB.DISPLAY.LINES (LAST# FIRST# WINDOW PRINTFN) TEDIT.GETFUNCTION (TABLEA1580) -\\BYTELT (J) SEDIT::FIND-NODE (SEDIT::X) \\LOADNSHOSTNUMBER (BASE) DBG::STACK-FRAME-VALUE-COMMAND ( -DBG::PROP DBG::VALUE DBG::DATUM DBG::WINDOW) \\BYTESETA (J V) \\DECPARENCOUNT (RSNX) GETTTBLPROP (PROP - TTBL) \\DSPYPOSITION.HCPYMODE (HARDCOPYSTREAM OLD-POS) \\WORDELT (J) CHANGEBACKGROUNDBORDER (SHADE) -SEDIT::SET-OPTIONS (SEDIT::OPTIONS) \\ETHEREVENTFN (EVENT FN) \\TFBRAVO.INIT.PAGEFORMAT (TEXTOBJ) -CCODEP (FN) \\GETCHAR (C) \\ARRAYTYPENAME (X) GRAPHDELETELINK (GRAPH WINDOW) GETSYNTAXPROP (CH RDTBL) -\\BLOCKDATAP (X TYPENO) \\FILLBUFFER.WORDSEPRP (CHAR) COPYDEF (OLD SOURCE OPTIONS NEW) SPP.DESTADDRESS - (STREAM ADDRESS CON) \\FILLBUFFER.BACKUP (CHAR) TEDIT.MAPPIECES (TEXTOBJ PCTB FN FNARG) MIN/LEFT ( -NODES) \\NSFILING.MAYBE.CREATE (SESSION DIRLST DIR) \\DSPTRANSFORMREGION (REGION DS) CHARWIDTH ( -CHARCODE FONT FONTDESCA1720) PROMPTINWINDOW (BORDERSIZE PROMPTWBORDER PROMPTSTR WHICHCORNER X Y) -\\TEDIT.READTABLE (CHAR TABLE CODE RTBL) CLISPIFYFNS (FNS X) \\STARTDISPLAY (W) SEDIT::FIND-LINE-START - (SEDIT::CONTEXT SEDIT::Y) TWODINSPECT.SELECTROWPROP (WINDOW RIGHTWINDOW ROWPROPS ROWPROP VERTMARKS -ROWPROPSPACE) \\OFFSETCLIPPINGREGION (DD CREG) DSPBACKUP (WIDTH DD) MARGINBAR (W UNIT UPDATE RIGHTLIM -OLDOP TABS TAB) VIDEOCOLOR (NARGS) \\TEDIT.HARDCOPY.MODIFYLOOKS (PRSTREAM LOOKS STARTX LINE CURX -RULEWIDTH STREAMSCALE CURY) \\POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS (FD TYPE ROTATION DEVICE) -\\SHOW.ARRAY.FREELISTS (N) \\TEDIT.PRIMARYW (TEXTSTREAM) \\10MB.PRINT.ENCAPSULATION (STREAM PACKET) -DBG::STACK-FRAME-FETCHFN (DBG::WHICHSPEC DBG::FRAMESPEC) |\\VFMInsertPageGroup| (|filePtr| |groupPtr| -|vol| |interval|) \#BITSON (N) CL:ACOSH (CL:NUMBER CL::FX) COMPILER::COPY-NODE-LAMBDA (COMPILER::NODE -COMPILER::NEW-LAMBDA COMPILER::VAR COMPILER::OPT-VAR COMPILER::KEY-VAR) SEDIT::DO-MUTATION (SEDIT::MUTATOR - SEDIT::NODE) \\PARSEARRAYSPACE1 (START END BASE N) CL:/= (CL::ARGS) CL::%PRINT-RANDOM-STATE (CL::STATE - STREAM CL::PRINT-LEVEL) |\\CreateScreenBitMap| (WIDTH RASTERWIDTH HEIGHT) GETWINDOWUSERPROP (WINDOW -USERPROP) \\TFBRAVO.GET.FONTSTYLE (FONT) COMP.NOSIDEEFFECTP (EXP) CL:ASINH (CL:NUMBER CL::FX) -\\FILLBUFFER (FILLTYPE STRM KEYSTREAM TABLE RTBLSA ILB ISP ILP) TB.REPLACE.ITEMS (NEWITEMS REGION) -|\\CoerceToDisplayDevice| (|NameOrDevice| DEV) SPP.SENDEOM (CON) CL:ATAN (CL::Y CL::R CL::I) -WHITESPACE-CHAR-P (CH) HARDCOPYGRAPH (IMAGETYPE PSTREAM GRAPH/WINDOW GRAPH GRAPH-REGION -SCREENPOINTS-PER-INCH ORIGINAL-CLIPREGION PSCALE RIGHT-MARGIN UPPER-MARGIN GRAPH-WIDTH PAGE-WIDTH -GRAPH-HEIGHT PAGE-HEIGHT TRANS CLIPREGION NUMBER-OF-Y-PAGES NUMBER-OF-X-PAGES LEFT-CENTERING-OFFSET -GRAPH-LEFT GRAPH-BOTTOM SCALED-GRAPH N PTRANS) \\NSFILING.LOOKUP.CACHE (ID PATHLENGTH) -SEDIT::QUERY-THROW-AWAY-CHANGES (SEDIT::OPTIONS SEDIT::NAME) \\INTERPRETER1 (DEF NNILS NPVARARGS -NTSIZE NACTUAL FN) \\DSCCOUT (CHARCODE) DELETE/AND/DISPLAY/LINK (G TMP WIN LPARAMS) \\SMASHLINK ( -OLDCLINK OLDALINK) SEDIT::FINALIZE-MOUSE-SELECTION (SEDIT::SELECTION) CL:BOOLE (CL::OP CL::INTEGER1 -CL::INTEGER2) CL::%MAKE-RANDOM-ARRAY (CL::SEED1 CL::SEED2 CL::X CL::RANDOM-LIST) \\STACKARGPTR (FRAME) - CL:ASH (INTEGER CL:COUNT) COLLECTKEYS (HASHFILE KEY1 KEY2 KEY) \\TFBRAVO.GET.FONTSIZE (FONT) -COMP.ANONP (E) MERGEINSERT (NEW X) TTMAKECOMPLEXCHAR (PRINTCHARS C REALCHAR) PRINTNSHOSTNUMBER ( -NSHOSTNUMBER FILE) DBG::STACK-FRAME-STOREFN (DBG::WHICHSPEC DBG::FRAMESPEC DBG::PLIST DBG::NEWVALUE) -PRINTERRORXIP (FILE ERRCODE ERRARG) \\SEQUIN.FLUSH.CONNECTION (FINALSTATE REASON) CL:ATOM (X) -COMPILER::COPY-NODE-LABELS (COMPILER::NEW-LABELS COMPILER::NODE) SEDIT::DELETE-WORD (SEDIT::CONTEXT -SEDIT::POINT) \\DSPXPOSITION.HCPYMODE (HARDCOPYSTREAM) DBG::BACKTRACE-ITEM-SELECTED (DBG::ITEM DBG::MENU - DBG::TTYWINDOW DBG::FRAMESPECFN DBG::BKPOS DBG::POS) |\\GetRootDirectoryType| (|vol|) CHANGESLICE (N) - \\PARSEARRAYSPACE (FN) CL:CIS (CL::RADIANS) COMPILER::COPY-NODE-IF (COMPILER::NODE) -SEDIT::DELETE-SELECTION (SEDIT::CONTEXT SEDIT::SELECTION) \\DSPRIGHTMARGIN.HCPYMODE (DISPLAYSTREAM) -CL:CEILING (CL:NUMBER CL::DIVISOR) DISPLAYSTREAMINIT (TTYFONT N) FAULTAPPLY (FAULTFN ARGLISTA1717 CNT -FAULTARGS) SEDIT::LINEARIZE-ROOT (SEDIT::NODE SEDIT::CONTEXT) TEDIT.DELETELINE (LINE TEXTOBJ WINDOW) -COMP.LINKCALLP (FN) \\SETUP-COMPILED-CLOSURE-CALL (CLOSURE INTERPFRAME CODE NEWSTACK START) MAX/RIGHT -(NODES) XCL::PROTOTYPE-DEFINERS-FOR-TYPE (TYPE) COMPILER::TEST-ANALYSIS (COMPILER::FN COMPILER::TREE) -CL:COMMONP (CL::OBJECT) |\\PFPutRootDirectoryType| (|directoryID|) XCL::MAKE-PROTOTYPE (XCL:DEFINER -TYPE XCL::NAME) \\FTP.FILEINFOFN (GENSTATE ATTRIBUTE) CL:CLEAR-INPUT (STREAM) CL:1- (CL:NUMBER) -TB.SET.FONT (WINDOW HWIDTH) \\LINEBUF.READP (STREAM FLG) SEDIT::GET-CONTEXT (TYPE) -RDTBL\\NONOTHERCODES (RT RESULT) XCL::PROTOTYPE-DEFN-TYPES (XCL::X) CHARPOS (STREAM) TEDIT.MAPLINES ( -TEXTOBJ FN TOP BOT) \\MOVE.WINDOWS.ONTO.SCREEN (WINDOWS) CL:CLOSE (STREAM) SEDIT::KILL-NODE (SEDIT::X) - COMPILER::META-SUBSTITUTE (COMPILER::TREE) COMP.CLEANFNOP (FN TYPE) ARGLIST (FN SMARTP) -TTINSERTSECTION (WIDTH) DBG::STACK-FRAME-PROPERTIES (DBG::POS DBG::FNNAME) |\\VFMGetPageGroup| ( -|filePtr| |filePage| |vol| |interval| |key|) MOST/VISIBLE/OPERATION (SHADE) CL::%EXPT-FLOAT-INTEGER ( -CL::POWER CL::BASE) BUTTONPANEL (LABELLST LABEL) COMPILER::COPY-NODE-GO (COMPILER::NODE) -SEDIT::DEFAULT-EDIT-FN (SEDIT::OBJ SEDIT::OPTIONS) \\DSPSPACEFACTOR.HCPYMODE (DISPLAYSTREAM FACTOR) -\\FREESTACKBLOCK (N) CL:COUNT-IF (SEQUENCE LENGTH TEST START KEY) FB.SET.DEFAULT.NAME.WIDTH (FONT) -CHANGEBACKGROUND (W) CL::COUNT-OCCURRENCES (CL::FORM CL:SYMBOL) \\SPP.PREPARE.INPUT (NBYTES) -CL:COUNT-IF-NOT (SEQUENCE LENGTH TEST START KEY) \\LINEBUF.PEEKBIN (STREAM) \\WRITE1 (OBJECT STREAM) -MIN/BOTTOM (NODES) \\NSFILING.ADD.TO.CACHE (HANDLE NOERRORFLG) OPT.JSIZE (OP FN D) TB.SCROLLFN (WINDOW - BROWSER DX DY CONTINUOUSFLG) \\MAKEFREEBLOCK (SIZE) CL:COUNT (SEQUENCE LENGTH ITEM START KEY TEST-NOT - TEST) SIMPLE-COMPARE (START1 START2 LEN1 LEN2) LISPXSTATE (NAME STATE) SEDIT::EXPANDREGIONFN ( -SEDIT::WINDOW SEDIT::CONTEXT) \\FTP.FROM.LISP.ATTRIBUTE (ATTR) CL:DELETE-DUPLICATES (SEQUENCE LENGTH -START FROM-END KEY TEST-NOT TEST) \\EVALOTHER (X) LINEBUFFER-SKIPSEPRS (STREAM RDTBL S *READTABLE*) -\\CREATEDISPLAY (DISPLAYNAME NAME) CL:DELETE-FILE (FILE) COMPLEX-COMPARE-FORWARD (START1 START2 LEN1 -LEN2) \\EVALVAR (VP) TEDIT.DEACTIVATE.WINDOW (W PANE) MAX/TOP (NODES) MAKEBRES (X0 Y0 DX DY) -LINEBUFFER-EOFP (STREAM S) XCL::ADD-PROTOTYPE-FN (TYPE XCL:DEFINER XCL::PROTOTYPE-FN) -DEFAULT.ADDNODEFN (GRAPH WINDOW BOXED) CL:DEPOSIT-FIELD (CL::BYTESPEC CL::SIZE CL:POSITION CL::NEWBYTE - CL::MASK INTEGER) \\LINEBUF.EOFP (STREAM STRM) CL:COSH (CL:NUMBER CL::Z) \\STKNAME (POS NAME BFLINK) -CL:DECODE-FLOAT (CL::SIGN CL:EXP CL::HI CL::LO) \\NSADDRESS.PRINT.DECIMAL (ZERO STREAM) -\\TFBRAVO.PARSE.PARA (FILE OLDPLOOKS) MAINWINDOW (WINDOW) SPY.START (FILE) -DBG::BACKTRACE-MENU-BUTTONEVENTFN (DBG::WINDOW) PRINTXIPDATA (XIP OFFSET MACRO FILE) \\INTERMP (OFD) -CL:DECODE-UNIVERSAL-TIME (UNIVERSAL-TIME TIME-ZONE) CL:DELETE-IF-NOT (SEQUENCE LENGTH TEST START -FROM-END KEY) \\DSPLINEFEED.HCPYMODE (DISPLAYSTREAM) \\SETUP-ENVIRONMENT-CALL (UFNFX UFNBF CALLNEXT -ALINK) CL:DISASSEMBLE (NAME-OR-COMPILED-FUNCTION LEVEL-P RADIX OUTPUT FIRST-BYTE MARKED-PC) -TB.REPAINTFN (WINDOW BROWSER REGION) \\DEFINEDISPLAYINFO (DISPLAYINFO) CL:DOCUMENTATION (NAME DOC-TYPE -) \\EVALFORMASLAMBDA (FAULTX) SEDIT::EXPANDFN (SEDIT::WINDOW) SEDIT::ADJUST-WIDTH (SEDIT::NEW-WIDTH) -CL:DIRECTORY (PATHNAME) TWODINSPECT.SELECTITEM (WINDOW ROWPROPS COLUMNPROPS VERTMARKS FETCHFN DATUM -HORZMARKS) FB.DATE (DT) CL::MAYBE-MAKE-BINDING-FORM (CL::NEWVAR CL::SETTER CL::NEWVAL-FORM) CL:DESCRIBE - (CL::OBJECT) PRINT-CIRCLE-LABEL-P (OBJECT TABLEENTRY) \\OUTTERMP (OFD) APPLY* (U ARGLIST CNT FN) -|\\PFPatchRootDirEntries| (|rootDir|) FILE-STREAM-POSITION (STREAM) CL::%EXPT-INTEGER (CL::POWER -CL::BASE) CL:DELETE-IF (SEQUENCE LENGTH TEST START FROM-END KEY) CL:EVERY (PREDICATE FIRST-SEQUENCE) -COMPILER::COPY-NODE-CATCH (COMPILER::NODE) DEFEVAL (TYPE) DPB (CL::BYTESPEC CL::NEWBYTE CL::SIZE -CL:POSITION INTEGER) SEDIT::INSERT-CHANGED (SEDIT::NODE SEDIT::DEPTH) COMPILER::META-CALL-LABELS ( -COMPILER::NODE COMPILER:CONTEXT) CL:ATANH (CL:NUMBER CL::FX) APPLY (U V CNT) COMP.CLEANFNP (X TYPE) -EVALV (VAR) CL:FCEILING (CL:NUMBER CL::DIVISOR) FAULTEVAL (FAULTX) TB.NUMBER.OF.ITEMS (TYPE) -CL::SETF-ERROR (CL::FN) \\STRING-STREAM-OUTCHARFN (CHAR) \\NSADDRESS.DEFPRINT (BASE SOCKET NET STREAM -SHARP) \\TEDIT.HARDCOPY.DISPLAYLINE (LINE THISLINE TEXTOBJ PRSTREAM TEXTLEN REGION BASEA1514 LOOKS -LEFTMARGIN STREAMSCALE BASEA1515 CHLIST BASEA1516 BASEA1517 WLIST X Y BASEA1518 BASEA1519 DOTWIDTH -BASEA1520 NO ARR) RELSTK (FX) \\CHANGE.ETHER.TRACING (WINDOW FLGNAME) DBG::ATTACH-BACKTRACE-MENU ( -TTYREGION) XIPTRACE (REGION FLG) TB.BUTTONEVENTFN (WINDOW) CL::STRUCTURE-POINTER-SLOTS (CL::PS) -PUTTEXTPROP (PROP VALUE) \\DSPFONT.HCPYMODE (HDCPYDSTREAM FONTDESC CHARCODE) -MAKE-FILL-POINTER-OUTPUT-STREAM (STRING) SEDIT::DRAW-UNDERLINE (LAST SEDIT::SHADE SEDIT::WINDOW SEDIT::ENDX -) SEDIT::CREATE-SIMPLE-NODE (STRING SEDIT::FONT SEDIT::PRIN-2? SEDIT::NODETYPE CL:STRUCTURE SEDIT::WIDTH -) CL:FILE-NAMESTRING (PATHNAME PATH RESULT) \\ADJUSTABLE-STRING-STREAM-OUTCHARFN (CHAR) \\BBTCURVEPT ( -Y TOPMINUSBRUSH BRUSHHEIGHT BRUSHBASE BOTTOMMINUSBRUSH TOP BRUSHRASTERWIDTH DESTINATIONBASE -RASTERWIDTH |DestinationBitMap| LEFT NBITS BRUSHWIDTH LEFTMINUSBRUSH NBITSRIGHTPLUS1 |SourceTypeA1693| - DISPLAYDATA |SourceTypeA1695| RIGHTPLUS1) SEDIT::INITIALIZE (SEDIT::CLASS SEDIT::C) TYPEINMENU (LST) -COMPILER::META-CALL-LAMBDA-SUBSTITUTE (COMPILER::NODE COMPILER::FN COMPILER::REQUIRED-ARGS) -FINDFILE-WITH-EXTENSIONS (FIELDS TAIL EXTENSIONS) COMP.CLEANEXPP (X TYPE) -%BROADCAST-STREAM-DEVICE-BOUT (STREAM S BYTE) \\EVALV1 (VAR) LISPXFIND0 (LST INDEX MOD) -COMPILER::EFFECTS-ANALYZE-VAR-REF (COMPILER::NODE) \\NSFILING.OPENFILE (DEVICE FILENAME ACCESS RECOG -PARAMETERS PAIR) ENSURE.RGB (COLOR) %NEW-FILE (FILENAME) CL::%EXP-FLOAT (CL::X CL::M CL::R CL::N) -CL:ENCODE-UNIVERSAL-TIME (MONTH DATE SECOND MINUTE) MEASUREGRAPHNODE (NODE RESETFLG) COMPILER::COPY-NODE-CALL - (COMPILER::NODE) SEDIT::CONVERT-COMMENT-STRUCTURE (SEDIT::EXPR) PREDICT-NAME (PATHNAME) VALUOF-EVENT -(Y X) GRAPHREGION (GRAPH N) \\NSFILING.CONNECT (SESSION DIRPATH DIR CREATE?) -%BROADCAST-STREAM-DEVICE-FORCEOUTPUT (|stream| \s |waitForFinish?|) CL:ARRAY-RANK (ARRAY) -COMPILER::EFFECTS-ANALYZE-UNWIND-PROTECT (COMPILER::NODE) NEXTSIZEFONT (NOWFONT WHICHDIR NOWSIZE) -COMPILER::COPY-NODE-BLOCK (COMPILER::NODE COMPILER::NEW-BLOCK) SEDIT::CONVERT-COMMENT (SEDIT::CONTEXT -SEDIT::SELECTION SEDIT::DEPTH SEDIT::PROMPTWINDOW SEDIT::NUMBER-OF-COMMENTS) -%BROADCAST-STREAM-DEVICE-CHARSETFN (STREAM NEWVALUE) \\CKAPPLYARGS (FRAME) CL:FIND-IF (SEQUENCE LENGTH - TEST START FROM-END KEY) CL:FILE-WRITE-DATE (FILE) SET (VP) CL:FFLOOR (CL:NUMBER CL::DIVISOR) -LOADFNS-MAKELIST (Y) INSPECTW.GETHASH (ITEM HARRAY) SEDIT::HANDLE-COMPLETION (SEDIT::CONTEXT) -CL:FIND-IF-NOT (SEQUENCE LENGTH TEST START FROM-END KEY) COMPILER::CONSTRUCT-LIST (COMPILER::ARGS -COMPILER::ARG) HASHBEFORECLOSE (FILE) \\TEDIT.CREATE.LINECACHE (\#CACHES CACHES CACHE) \\CKPOSSOUT (X -STREAM STRING) \\PROG0 (NNILS NVARS NTSIZE X) CL:FLOAT-PRECISION (FLOAT CL::SIGN CL:EXP CL::HI CL::LO) - DBG::REGION-NEXT-TO (REGION RWIDTH RHEIGHT NLFT NBTM) TB.COPYBUTTONEVENTFN (WINDOW BROWSER) -\\PRINSTACKP (STREAM) CL:FILE-AUTHOR (CL::FILE) |\\PFFindRootDirEntryNum| (|rootDir| |directories| -|index| |type|) GETTEXTPROP (PROP TEXTOBJ) \\DSPLEFTMARGIN.HCPYMODE (DISPLAYSTREAM) -%CONCATENATED-STREAM-DEVICE-PEEKBIN (|stream|) SEDIT::DRAW-OUTLINE (SEDIT::Y-1 SEDIT::Y-2 SEDIT::X-1 -SEDIT::X-2 SEDIT::SHADE SEDIT::WINDOW SEDIT::X-3) SEDIT::COPY-SELECTION-DEFAULT (SEDIT::SELECTION -SEDIT::NODE SEDIT::END) CL:FINISH-OUTPUT (OUTPUT-STREAM) FB.GETALLFILEINFO (ATTRIBUTES GENERATOR -BROWSER) CL::GET-SHARED-SETF-METHOD (CL::ARG CL::G CL::FORM CL::NEW-VAR) CL:FILL (SEQUENCE LENGTH) -CL:FLOAT-DIGITS (FLOAT) \\TFBRAVO.WRITE.PARAGRAPH (PARA INFILE TEXTOBJ MARGIN.CANDIDATE) -CL:ENOUGH-NAMESTRING (PATHNAME DEFAULTS PATH RESULT) FORMAT-EXP-AUX (NUMBER) \\LITPRIN (X I RDTBL -STREAM) CL:FORCE-OUTPUT (OUTPUT-STREAM) CL:GETHASH (CL::KEY CL::HASHTABLE CL::DEFAULT) -\\CURSOR.DEFPRINT (STREAM CURSOR) SEDIT::GET-SELECTED-STRUCTURE (SEDIT::CONTEXT SEDIT::SELECTION) -%ECHO-STREAM-DEVICE-BIN (STREAM BYTE) COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS (COMPILER::NODE -COMPILER::FN COMPILER::PARAM) ENDLOADUP (R FILE TYPE) %SYNONYM-STREAM-DEVICE-GET-INDIRECT-STREAM ( -SYNONYM-STREAM) %BROADCAST-STREAM-DEVICE-OUTCHARFN (S CHARCODE) COMPILER::EFFECTS-ANALYZE-THROW ( -COMPILER::NODE) |\\PFPurgeRootDirectory| (|vol| |fileD|) COMPLEX-COMPARE-BACKWARD (END1 END2 LEN1 LEN2 -) \\PRINT-USING-DEFPRINT (X TYPE CPL STREAM) \\CKPOSBOUT (STREAM X) CL:FROUND (CL:NUMBER CL::DIVISOR) -CL:FLOATP (CL::X) \\EVALA (NNILS NVARS ALIST NTSIZE X FORM) SEDIT::CHANGE-QUOTE (SEDIT::QUOTE-TYPE -SEDIT::CONTEXT) RECORDPRIORITY (RECNAME PRIORITY) \\PRINSTRING (X STRING ESC STREAM) LOADUP (FILES X) -CL:ARRAY-TOTAL-SIZE (ARRAY) FB.ADD.FILEGROUP (FBROWSER FIRSTDATA TBROWSER D ITEM) ROT (N FIELDSIZE -NA1709 N.B X) \\SEQUIN.CONTROL (CONTROL SEQUIN) \\GENERIC.CURSOR (SCREEN INVERTFLG) -POSTSCRIPT.FONTCREATE (FACE SIZE FAMILY ROTATION DEVICE WEIGHT SLOPE EXPANSION) CL:FTRUNCATE (CL:NUMBER - CL::DIVISOR) SMASHFILECOMSLST (COMS COM) %SYNONYM-STREAM-DEVICE-BIN (STREAM) CL:FILE-POSITION ( -CL::FILE-STREAM) CL:FILE-LENGTH (FILE-STREAM) ONEDINSPECT.SETELT (WINDOW PROP PRTWINDOW) CL:GCD ( -CL::ARGS) CTEXTPROP (FORMTAIL PROP) %SYNONYM-STREAM-DEVICE-BOUT (STREAM BYTE) SEDIT::DRAW-HIGHLIGHT ( -SEDIT::SHADE SEDIT::WINDOW SEDIT::X-2 SEDIT::H-1 SEDIT::X-1 SEDIT::H-2) CL:FLOAT-SIGN (CL::FLOAT1 -CL::NEW-SIGN-BIT) CL:GET-SETF-METHOD (CL::FORM CL::ENVIRONMENT) BAKTRACE1 (IPOS) DOFILESLOAD (FILES -INPUTNAME) \\NSNET.CLOSERP (X Y) UNREADITEM (ITEM) %SYNONYM-STREAM-DEVICE-GETFILEINFO (STREAM -ATTRIBUTE) CL:GET-SETF-METHOD-MULTIPLE-VALUE (CL::FORM CL::ENVIRONMENT) SI::NLSETQHANDLER (C) -\\DRAWELLIPSE.HCPYMODE (STREAM ORIENTATION BRUSH DASHING) %SYNONYM-STREAM-DEVICE-PEEKBIN (STREAM -NOERRORFLG?) %CONCATENATED-STREAM-DEVICE-EOFP (|stream|) %CONCATENATED-STREAM-DEVICE-CHARSETFN (STREAM - NEWVALUE) SET-DOCUMENTATION (NAME DOC-TYPE NEW-STRING) %SYNONYM-STREAM-DEVICE-EOFP (STRM STREAM) -\\PRINTNSADDRESS (L BASE) %CONCATENATED-STREAM-DEVICE-BIN (STREAM) %SYNONYM-STREAM-DEVICE-FORCEOUTPUT -(STREAM WAITFORFINISH) GRAPHERPROP (PROPLIST PROP) BREAK.NSFILING.CONNECTION (HOST DEVICE) -\\DSPCOLOR.IP (IPSTREAM RGB) %SYNONYM-STREAM-DEVICE-SETFILEINFO (STREAM ATTRIBUTE VALUE) -INSPECTW.PUTHASH (ITEM VALUE HARRAY) ERRORSET (*PROCEED-CASES* FORM) DISPLAYNODE (NODE TRANS STREAM G -TOSONLY) %SYNONYM-STREAM-DEVICE-OUTCHARFN (OTHER-STREAM CHARCODE) %SYNONYM-STREAM-DEVICE-CHARSETFN ( -STREAM NEWVALUE) \\SMASHRETURN (MYCALLER FRAME) \\LITPRIN.INTERNAL (SYMBOL RDTBL MULTESCAPE -PNAMELENGTH A STREAM ESCAPE) PRINTCCODE (FILE CHARCODE) %CONCATENATED-STREAM-DEVICE-CLOSEFILE (\s) -%CONCATENATED-STREAM-DEVICE-BACKFILEPTR (|stream|) %SYNONYM-STREAM-DEVICE-READP (STREAM FLG) \\SETVAR -(VP) SEDIT::STRING-OFFSET (SEDIT::END STRING SEDIT::ESC SEDIT::FONT SEDIT::STARTX) CL:HASH-TABLE-COUNT - (CL:HASH-TABLE) REMEMBER (LINE) %SYNONYM-STREAM-DEVICE-BACKFILEPTR (STREAM) INSPECT (WHERE ITEMTYPE -DTD) \\DRAWLINE.IP (X1 Y1 X2 Y2 WIDTH OPERATION IPSTREAM COLOR IPDATA W) %TWO-WAY-STREAM-DEVICE-BOUT ( -STREAM BYTE) DEFINEDP (A) CL:HASH-TABLE-P (CL::OBJECT) CALL.MOVENODEFN (GRAPH NODE NEWPOS WINDOW -OLDPOS) CGETTEXTPROP (PROP) %TWO-WAY-STREAM-DEVICE-OUTPUTSTREAM (STREAM) SEDIT::SUBNODE-CHANGED ( -SEDIT::NODE SEDIT::CONTEXT) \\FTP.FLUSH.TO.MARK (INSTREAM) \\OUTCHAR (STREAM CHARCODE) BACKSPACEDEL ( -TTBL) FB.MAYBE.WIDEN.NAMES (CURRENTSTART) XCL::UNDOABLY-SETQ (XCL::VARVALUE) CL:INTEGER-DECODE-FLOAT ( -CL::SIGN CL:EXP CL::HI CL::LO) CL:INPUT-STREAM-P (STREAM) \\MEDW.CURSOR (INVERTFLG) -%TWO-WAY-STREAM-DEVICE-INPUTSTREAM (|stream|) \\INSERTCR (CH CH#) PROG1 (U) |\\PFRemoveRootDirEntry| ( -|type| |rootDir| |directories| |index|) %TWO-WAY-STREAM-DEVICE-EOFP (STRM |stream|) \\NUMERIC.PNAMEP ( -RADIX EFFECTIVE-RADIX SYMBOL STRING) %TWO-WAY-STREAM-DEVICE-BIN (|stream|) CL:LCM (CL::ARGS) -SEDIT::CHANGE-PRINTBASE (SEDIT::CONTEXT SEDIT::PROMPTWINDOW SEDIT::NEW-PRINTBASE-STRING) -\\DRAWCURVE.HCPYMODE (STREAM KNOTS CLOSED BRUSH DASHING) %TWO-WAY-STREAM-DEVICE-READP (STREAM FLG) -EVALA (A VAR X) FORMAT-EXPONENT-MARKER (CL:NUMBER) PUTDQ (X Y) PUTDQ? (FN DEF) \\SETFVARSLOT (FX VAR -ATOM# NEWBINDING) LOADEFS (FNS FILE) SEDIT::FORMAT-VALUES-CHANGED (SEDIT::NODE SEDIT::CONTEXT -SEDIT::OLD-INLINE-WIDTH SEDIT::OLD-PREFERRED-WIDTH) \\SYMBOL.ESCAPE.COUNT (SYMBOL RDTBL SA ESCAPE LEN) - COMPILER::META-CALL-LAMBDA (COMPILER::FN COMPILER::NEW-PROG1) COMP.STBIND (X) PRINTPACKETQUEUE (QUEUE - CALLER FILE) TTYINSTRING (BUF CH) \\CHECKFLTFMT (FORMAT) LET* (U VARLST) FB.ADJUST.DATE.WIDTH ( -INFOWANTED BROWSER FONT) CL::GET-SIMPLE-SETF-METHOD (CL::ARG CL::G CL::FORM CL::NEW-VAR) IMODLESSP (Y -X MODULUS) \\MAPCHARS (\\MAPCHARFN CHAR X FLG RDTBL) ONEDINSPECT.SELECTPROP (WINDOW RIGHTWINDOW -ROWPROPS PROP VERTMARKS ROWPROPSPACE) \\MEDW.PUTWINDOWPROP (PROP) %TWO-WAY-STREAM-DEVICE-CHARSETFN ( -STREAM NEWVALUE) FORMAT-FIXED-AUX (NUMBER) \\EVALFORM (ARGLIST CNT FN) TEDIT.CARETLOOKS (STREAM LOOKS) - GRAPHER/CENTERPRINTINAREA (EXP X WIDTH STRWIDTH Y HEIGHT) \\NSFILING.CLOSE.CONNECTIONS (DEVICE ABORT? - DEVINFO) \\DRAWPOINT.IP (IPSTREAM BRUSH X WIDTH Y HEIGHT OPERATION) \\NET.SETTIME (RETFLG) -%TWO-WAY-STREAM-DEVICE-PEEKBIN (|stream| |noErrorFlg?|) COPYVM (FILE) CHANGE.NODEFONT.SIZE (HOW WINDOW - GRAPH) SI::ERRORSET-PRINT-FUNCTION (STREAM) \\LET* (NNILS NVARS NTSIZE X) -%TWO-WAY-STREAM-DEVICE-FORCEOUTPUT (|stream| |waitForFinish?|) SEDIT::CONFLICTING-SELECTION? ( -SEDIT::CONTEXT) SEDIT::NOTE-CHANGE-IN-SIMPLE (SEDIT::CONTEXT) CL:LOGANDC1 (CL::INTEGER1 CL::INTEGER2) -ENVAPPLY (FN ARGS CNT) PROG (U VARLST) LOADVARS (FILE LDFLG VARS) CL::%PRINT-TIMING-ITEM (CL::NUM -STREAM STRING) \\GC.HANDLEOVERFLOW (X LX ARG) LDB (CL::BYTESPEC INTEGER CL:POSITION CL::SIZE) -\\STORENSADDRESS (BASE A) \\TEDIT.LINECACHE (BITMAP WIDTH HEIGHT) TIME.SINCE.PACKET (CLK0 PACKET CLK1) - TTGIVEHELP (HELPKEY) SPY.TREE (THRESHOLD MERGETYPE DEPTHLIMIT SPYDATA) COND (U) -|\\PFCreateRootDirectory| (|vol| |fileD| |rootDir|) \\SEQUIN.PUT (SENDSEQ) CL:LDB-TEST (CL::BYTESPEC -INTEGER) \\GCMAPTABLE (ARG XA1810 LX XA1811) COMPILER::COPY-CODE (COMPILER::TREE) SEDIT::CHANGE-PACKAGE - (SEDIT::CONTEXT SEDIT::PROMPTWINDOW) \\DRAWCIRCLE.HCPYMODE (STREAM BRUSH DASHING) -%FILL-POINTER-STREAM-DEVICE-GETFILEPTR (STREAM) \\DTEST.UFN (TYPEN) COMPILER::EFFECTS-ANALYZE-RETURN ( -COMPILER::NODE) |\\PFAddRootDirEntry| (|index| |type| |directoryID| |entryNum|) GETSEQUIN (SEQUIN) -\\FUNCT1 (NNILS NVARS VARLST NTSIZE) CL:LOGIOR (CL::ARGS) COMPILER::RELEASE-VAR-REF (COMPILER::NODE) -SEDIT::BACKSPACE (SEDIT::CONTEXT SEDIT::POINT) \\CHARWIDTH.HCPYMODE (STREAM CHARCODE) CL:IDENTITY ( -CL::THING) %TWO-WAY-STREAM-DEVICE-BACKFILEPTR (STREAM) SMALLP (X) FIXP (X) CENTERPRINTINAREA (EXP X -WIDTH STRWIDTH Y HEIGHT PFN) CL:LOGEQV (CL::ARGS) \\LET0 (NNILS NVARS NTSIZE X) SI::UNWIND (TARGET) -CL::TIME-FORMAT (STREAM) STKAPPLY (POS FN ARGS CNT) COMPILER::META-EVAL-VAR-REF (COMPILER:CONTEXT -COMPILER::NODE) COMPILER::META-EVAL-UNWIND-PROTECT (COMPILER::NODE A1672 A1671 A1674 A1673 COMPILER:CONTEXT -) LET (U VARLST) \\TFBRAVO.HANDLE.HEADING (TEXTOBJ) COMP.STSETQ (VREF) PRINT10TO3 (EPKT CALLER) -SETLASTC (CHAR) LOGNOT (INTEGER) \\NSFILING.LOGOUT (SESSION) \\DRAWCURVE.IP (IPSTREAM BRUSH CLOSED) -DUMMYDEF (LST) GO (U LABEL) COMPILER::EFFECTS-ANALYZE-SETQ (COMPILER::NODE) CL:LOGORC1 (CL::INTEGER1 -CL::INTEGER2) FLOATP (X) STKEVAL (POS FORM) \\TEDIT.BLTCHAR (CHARCODE DISPLAYDATA CURX CLIPRIGHT) -CL:LOGNAND (CL::INTEGER1 CL::INTEGER2) %SYNONYM-STREAM-DEVICE-GET-STREAM (|stream|) -TWODINSPECT.REDISPLAY (WINDOW FETCHFN DATUM RPROP CPROP COLUMNPROPS COLUMNWIDTHS HORZMARKS ROWPROPS -VERTMARKS FHEIGHT FDESCENT) FB.HEADINGW.DISPLAY (WINDOW CLIP BORDER FBROWSER STREAM DEPTH RMARG) -XCL::UNDOABLY-SET-SYMBOL (CL:SYMBOL XCL::VP XCL::VALUE) CL:INTEGERP (X) \\MAKEFUNARGFRAME (VAR) -HARRAYKEYS (HARRAY HASHITEM) \\MEDW.GETWINDOWPROP (PROP) USEREXEC (LISPXID LISPXXMACROS LISPXXUSERFN) -TEDIT.INSERT.UPDATESCREEN (CHARS CH#) STACKP (X) \\MAKESTACKP (FX OLDFX) \\VAROFFSET (FRAME NT ATN) -SEDIT::DEFAULT-GETDEF-FN (SEDIT::NAME TYPE SEDIT::NEW-DEF SEDIT::OLD-DEF) \\LOADNSADDRESS (A BASE) -COMPILER::META-EVAL-THROW (COMPILER::NODE A1668 A1667 A1670 A1669 COMPILER:CONTEXT) TEDIT.MODIFYLOOKS -(DS LOOKS STARTX CURY LINE CURX FONT LINEBASEY) COMP.STVAR (VREF) PRINTPACKET (PACKET TYPE DOFILTER) -DF (FN ARGS) SEDIT::CLEAR-ALL-LINEAR-FORMS (SEDIT::CONTEXT) CL:MACHINE-INSTANCE (CL::HOST) -SPY.FIND.TREE (FN) \\RECLAIMSTACKP (PTR FX) SEDIT::CLOSEFN (SEDIT::WINDOW) BESTNSADDRESS (ADDR) -BLIPSCAN (BLIPTYP) TTREADLIST (STRM) SETBLIPVAL (BLIPTYP A VAL) CL:LOGTEST (CL::INTEGER1 CL::INTEGER2) - COMPILER::RELEASE-UNWIND-PROTECT (COMPILER::NODE) SEDIT::ADD-MENU (SEDIT::CONTEXT SEDIT::WINDOW -SEDIT::PROMPTWINDOW) \\DRAWLINE.HCPYMODE (STREAM OPERATION COLOR) ALLATTACHEDWINDOWS (MAINW ATW) -CL:LISTEN (STREAM) CL:MAKE-BROADCAST-STREAM (STREAMS STREAM) TOPW.REPAINTFN (WINDOW DISPLAYW LEFT -RIGHT BOTTOM) CL:ISQRT (INTEGER CL::ILENGTH CL::LOW) TB.REDISPLAY.ITEMS (REGION) -XCL::GET-UNDOABLE-SETF-METHOD (XCL::FORM XCL::ENVIRONMENT) \\COURIER.RECORDTRAN (ARGS OP FIELD) -CL:MAKE-ECHO-STREAM (CL::INPUT-STREAM CL::OUTPUT-STREAM STREAM) COMPILER::EFFECTS-ANALYZE-PROGV ( -COMPILER::NODE) LISTP (X) \\GENERIC.DSPCREATE (OLDDSP) \\INTERPRETER (N FN X NACTUAL CNT) -FORMAT-PRINT-RADIX-AUX (CL:NUMBER) |\\PFPutRootDirectory| (|vol| |fileD| |rootDir|) \\INSERTCH (CH -STRING LEN CH# \\INEXTCH IMARKPC IMARKCH \\INLEFT \\INLEN START-OF-PIECE FATP) GRAPHEDITEVENTFN ( -GRWINDOW) COMPARELST (X Y) LAPRD (FN) \\IPCURVE2 (SPLINE BRUSH DASHING IPSTREAM \#KNOTS XPOLY X\'POLY -|X'''| |X''| X\' X YPOLY Y\'POLY |Y'''| |Y''| Y\' Y) EXPRP (FN) CL:LOGANDC2 (CL::INTEGER1 CL::INTEGER2 -) SAVEDEF (NAME I) \\STKARG (N FRAME NOSUCH DEFAULT) FUNCTION (FN) CL:MAKE-STRING (SIZE FATP STRING -INITIAL-ELEMENT) VIRGINFN (FN) COMPARELISTS (X Y TAIL PAIR) RETEVAL (POS FX FORM) -\\GET.COURIER.DEFINITION (NAME TYPE PROGRAM) CGETD (X) PNAMESTREAMP (STRM) CL:MAKE-PATHNAME (HOST -DEVICE NAME TYPE VERSION) COMPAREDEFS (NAME FILE DP S1 S2) \\DRAWARC.IP (STREAM CENTERX CENTERY RADIUS - STARTANGLE NDEGREES BRUSH DASHING) SELECTQ (SELCQ) USERLISPXPRINT (POS X FILE Z) CL:MAKE-RANDOM-STATE - (CL::STATE) CL:LOGNOR (CL::INTEGER1 CL::INTEGER2) CL:LOGORC2 (CL::INTEGER1 CL::INTEGER2) -DOAROUNDEXITFORMS (EVENT $$FORM) CL:MAP (FUNCTION SEQUENCE) ARRAYP (X) PRINTNUM-TO-STRING (FORMAT FMT -\\NUMSTR \\NUMSTR1) BLIPVAL (BLIPTYP A) CL:MASK-FIELD (CL::BYTESPEC INTEGER CL::SIZE CL:POSITION) -MERGE (COMPAREFN) \\TFBRAVO.FIND.LAST.TRAILER (FILE STREAM) RETAPPLY (POS FX FN ARGS CNT) -\\HANDLE.RAW.10TO3 (TYPE XA1600 NDB) PATHNAME (THING) DBG::STKPTR-CCODE (DBG::STKPTR) -PACKAGE-NAME-AS-SYMBOL (PACKAGE) %TWO-WAY-STREAM-DEVICE-OUTCHARFN (CHARCODE) CENTEREDPRIN1 (LEFT WIDTH - EXP DS Y) \\REALFRAMEP (FRAME NAME INTERPFLG) CL:MAKE-TWO-WAY-STREAM (CL::INPUT-STREAM -CL::OUTPUT-STREAM STREAM) TEXTICON (WINDOW ICON REG) CL:MISMATCH (SEQUENCE1 SEQUENCE2 LENGTH1 LENGTH2 -START1 START2 KEY TEST-NOT TEST INDEX SUBLEN1 SUBLEN2) BACKTRACE (FILE IPOS EPOS PRINTFN) ESUBST (OLD -NEW CHARFLG UNDOLST1) CL:NOTANY (PREDICATE FIRST-SEQUENCE) STRINGP (OBJECT) \\SETFVAR.UFN (V) -SEDIT::BUTTONEVENTFN (WINDOW) CL:MERGE (RESULT-TYPE SEQUENCE1 SEQUENCE2 PREDICATE KEY RESULT) PRINTFN -(FN FROMFILE LOC TOFILE) CHANGENAME1 (Y X) FB.SET.BROWSER.TITLE (BROWSER) COPIEDFILENAME (COPIEDTOSPEC - FROMCHARS COPIEDFROMSPEC) CL:MERGE-PATHNAMES (PATHNAME DEFAULTS PATH DEFAULT-PATH HOST DEVICE -DEFAULT-VERSION) \\MEDW.DSPCREATE (OLDSTREAM SCREEN DESTINATION DSTRM) FORMAT-PRINT-RADIX (CL:NUMBER -COLON ATSIGN) COMPILER::EFFECTS-ANALYZE-PROGN (COMPILER::NODE) SORT1 (DATA END COMPAREFN) ENVEVAL ( -FORM) APROPRINT (FILE STRING VALUE) CHARACTER (BASEA1770 \\PNAMESTRING STRING) CL:NSUBSTITUTE ( -SEQUENCE LENGTH NEWITEM OLDITEM START FROM-END KEY TEST-NOT TEST) COMPILER::RELEASE-THROW (COMPILER::NODE -) SEDIT::COMMENT-OUT-SELECTION (SEDIT::CONTEXT SEDIT::SELECTION) |\\SFFixY.HCPYMODE| (Y FONT CSINFO) -CL:NSTRING-CAPITALIZE (STRING START END) RADIX (R) LIST* (NARGS) VARS (FN USEDATABASE) -COMPILER::META-EVAL-TAGBODY (COMPILER::NODE COMPILER:CONTEXT) \\TEDIT.MARK.REVISION (IMAGESTREAM LINE -SCALE) COMP.LOOKUPCONST (Y) \\PRINTFRAME (FRAME USECNT ALINK FNHEADER NEXTBLOCK NAMETABLE BLINK NMT -PRINTFN) SEDIT::CHECK-SELECTION (SEDIT::SELECTION) CL:NUMBERP (CL::X) SHOWCHARS (FONT TOCHAR FROMCHAR) - FB.DISPLAY.COUNTERS (COUNTERW COUNTERWIDTH SECTIONWIDTH COUNTERFONT TOTAL DEL TOTALPAGES DELPAGES -THRESHOLDWIDTH HEIGHT) CL:OUTPUT-STREAM-P (STREAM) CL:NSTRING-UPCASE (STRING START END) CDDDR (X) -\\MEDW.TOTOPW (NOCALLTOTOPFNFLG) \\TRANSLATE.10TO3 (NDB X Y NSADDR) FORMAT-PRINT-HEXADECIMAL (COLON -ATSIGN PARMS) CL:NSUBSTITUTE-IF (SEQUENCE LENGTH NEWITEM TEST START FROM-END KEY) -DBG::FIND-NAMED-STACK-POSITION (DBG::FN DBG::N DBG::LSTPOS) CDDAR (X) APROPOS (STRING ATOM CASEARRAY) -CL:NSUBSTITUTE-IF-NOT (SEQUENCE LENGTH NEWITEM TEST START FROM-END KEY) TEDIT.SETSEL (STREAM CH# LEN -POINT OPERATION) CHANGENAME1A (NEW DEF OLD) SEDIT::DELETE-NODES (SEDIT::NODE SEDIT::CONTEXT SEDIT::END - SEDIT::SET-POINT? STRING) CL:PATHNAME-TYPE (PATHNAME) CL:MAKE-SYNONYM-STREAM (CL:SYMBOL STREAM) -CLEARCLISPARRAY (TYPE NAME FORM) CL::TIME-CALL (CL::TIME-BEFORE CL::TIME-DO-NOTHING CL::TIME-AFTER -CL::OUTPUT CL::REPEAT CL::TIMED-FORM CL::DATA-TYPES) SEDIT::CREATE-STRING-ITEM (STRING SEDIT::FONT) -\\GET.COURIER.TYPE (PROGRAMNAME TYPENAME) COMPILER::META-EVAL-SETQ (COMPILER::NODE A1666 A1665 -COMPILER:CONTEXT) PRINTHISTORY2 (INPUT FILE X FL NOVALUES) CDDR (X) \\PRINTBF (BL NMT PRINTFN) -DELFROMCOMS (COMSNAME NAME) NCONC (N) \\CHANGECHARSET.HCPYMODE (CHARSET CSINFO CSDINFO) -COMPILER::EFFECTS-ANALYZE-OPCODES (COMPILER::NODE) \\SCANFORNTENTRY (NMT NTENTRY) CDAR (X) -\\CHARWIDTH.IP (CHARCODE STREAM FONTDESCA1588) \\FLOATTOBYTE.UFN (CNT DBASE SBASE) TOLINKS (NODE) -COMPILER::RELEASE-TAGBODY (COMPILER::NODE COMPILER::SEGMENT COMPILER::STMT) CLISPFORINITVAR (EXP VAR) -COMPILER::NODE-TYPE-NAME (COMPILER::TRUE-NAME) COMPILER::EFFECTS-ANALYZE-MV-PROG1 (COMPILER::NODE) -CDAAR (X) \\CLOSEIPSTREAM (IPSTREAM) \\BLKFABSMAX.UFN (BASE CNT) GRAPHBUTTONEVENTFN (WINDOW GRAPH -LEFTFNOFNODE MIDDLEFNOFNODE NODELST DS) COMPILER::RELEASE-SETQ (COMPILER::NODE) TEDIT.ADD.STYLESHEET ( -SHEET) CL:POSITION-IF (SEQUENCE LENGTH TEST START FROM-END KEY) \\BLKFABSMIN.UFN (BASE CNT) -SEDIT::STRUCTURE-FROM-SELECTION (SEDIT::SELECTION SEDIT::NODE) |\\PFFindRootDirEntry| (|type| -|rootDir| |index|) CDDDDR (X) CL:PEEK-CHAR (STREAM PEEK-TYPE CHA1713 EOLCA1712 NOERROR EOF-VALUE -CHA1715 EOLCA1714 DESIREDCHAR) \\CLISPKEYWORDPROCESS (WORDLST) CL:PLUSP (CL:NUMBER) GETBLOCKDEC (FN) -CL::%GET-TIMING-INFO (CL::TIME-BEFORE CL::TIME-AFTER) CL:COMPILED-FUNCTION-P (CL::FN) -COMPILER::META-EVAL-RETURN (COMPILER::NODE A1664 A1663 COMPILER:CONTEXT) CL:NSTRING-DOWNCASE (STRING -START END) COMP.MACRO (MAC EXP EXPANSION) FINDATS (X L) CL:PROBE-FILE (FILE) -DBG::FIND-ORIGINAL-NAME-AND-DEFINITION (DBG::STKPTR DBG::NAME CL:SYMBOL) CAAR (X) -\\CANONICALIZE.NSADDRESS (NSADDR) INITSEQUIN (PROCNAME) MAP (MAPFN1) CDDAAR (X) |UnixPrint| (HOST -PRINTOPTIONS PRINTER) EQCLOOKS (CLOOK1 CLOOK2) TEDIT.FIND (END#) \\BLKFLOATP2COMP.UFN (CNT DEST $$BASE - SOURCE) CDADR (X) |\\PFGetRootDirectory| (|vol| |fileD| |rootDir|) CL:POSITION-IF-NOT (SEQUENCE -LENGTH TEST START FROM-END KEY) \\BLKFMAX.UFN (BASE CNT) XCL::UNDOABLY-SETF-MACRO-FUNCTION (XCL::X) -\\BLKEXPONENT.UFN (CNT DEST SOURCE) \\GET-NEXT-RUN (MAX OFFSET RUN-LENGTH) CL:PPRINT (OUTPUT-STREAM -OBJECT) CL:PHASE (CL:NUMBER) TEMPLATE (FN TEMPLATE) \\NOTE.10TO3 (NDB PUPADDRESS X Y NSADDR HOST BOX) -FORMAT-PRINT-OCTAL (COLON ATSIGN PARMS) LOADFNS-FINDFILE (FN) CAAAAR (X) CAADDR (X) CDDADR (X) -LOADBLOCK (FN LDFLG) CL::%STATS-OBJECT-DIFFERENCE (CL::BEFORE CL::AFTER CL::AFTER-TIME-BLOCK -CL::BEFORE-TIME-BLOCK) SEDIT::CREATE-PRELINEARIZED-NODE (CL:STRUCTURE SEDIT::ENVIRONMENT SEDIT::NODETYPE - STRING SEDIT::PRIN-2? SEDIT::FONT SEDIT::SUPER-NODE) COMPILER::META-EVAL-PROGV (COMPILER::NODE A1658 -A1657 A1660 A1659 A1662 COMPILER:CONTEXT A1661) \\TEDIT.APPLY.PAGEFORMATTING (SEL W TEXTOBJ) CDADAR (X -) COMP.PROG1 (A) EDITFROMFILE (EDITPATTERN) FASSOC (KEY) COMPILER::EFFECTS-ANALYZE-MV-CALL (COMPILER::NODE -) MAXSTRINGWIDTH (L FONT PRIN2FLG RDTBL) \\BLKFDIFF.UFN (COUNT DEST SOURCE1 SOURCE2) CDAADR (X) -COMPILER::RELEASE-RETURN (COMPILER::NODE) TEDIT.PUSH.STYLESHEET (SHEET) \\BLKFMIN.UFN (BASE CNT) -\\BLKSEP.UFN (CNT DEST SOURCE1 SOURCE2) CL:READ-CHAR-NO-HANG (STREAM EOF-VALUE RECURSIVE-P) -CL:PARSE-NAMESTRING (THING START END PATH-LIST VERSION) \\BLKPERM.UFN (CNT DEST ORIG PERMUTATIONS) -CL:READ-FROM-STRING (STRING STREAM EOF-ERROR-P EOF-VALUE) CL:RANDOM (CL:NUMBER CL::STATE) -\\MEDW.REDISPLAYW (WINDOW DSP) CL:PATHNAME-VERSION (PATHNAME) \\MEDW.BURYW (OVERLAPPINGWINDOWS W) -CAAADR (X) \\BLKMAG.UFN (CNT COMPLEX-ARRAY MAGNITUDE-ARRAY) CDAAAR (X) FNCHECK (SPELLFLG TAIL) -CL:READ-BYTE (BINARY-INPUT-STREAM STREAM EOF-VALUE) POSTSCRIPTSEND (HOST FILE PRINTOPTIONS) -\\BLKFTIMES.UFN (COUNT DEST SOURCE1 SOURCE2) SEDIT::SET-SELECTION-ME (SEDIT::NODE) \\BSP.FLUSHINPUT ( -STREAM) SPY.COPYBUTTON (WINDOW) DBG::FIND-DEBUGGER-STACK-FRAME (DBG::LSTPOS) CAADAR (X) -\\HANDLE.NS.ROUTING.INFO (XIP HOSTBASE TABLE MASK RADIUS) CLOSESEQUIN (SEQUIN) CL:REM (CL:NUMBER -CL::DIVISOR CL::FY) LISPXREPRINT (X) %STRING-BASE-COMPARE-EQUAL (START1 START2) CADDR (X) -\\BRUSHCONVERT.HCPYMODE (BRUSH BB) CDDDAR (X) COMPILER::GENCODE-CALL (COMPILER::NODE COMPILER::ARGS -COMPILER:CONTEXT COMPILER::FN COMPILER::VAR COMPILER::NUM-ARGS COMPILER::FN-VAR COMPILER::PARAMETER-NAME - COMPILER::*CODE* COMPILER::INNER-CODE COMPILER::LV) %STRING-BASE-COMPARE (START1 START2) CL:REDUCE ( -SEQUENCE LENGTH FUNCTION START INITIAL-VALUE) PACK* (U \\PNAMESTRING STRING BASE LEN FATP -PREFIX-LENGTH) \\MISC5.UFN (ALPHA) \\EP.PUT.AUX (PKT KEY PLIST CELL) CADADR (X) TYPERECORD ( -NAME&FIELDS) \\MISC6.UFN (ALPHA ARG1 ARG2 ARG3 ARG4 ARG5 ARG6) GETPROP (ATM PROP) -ONEDINSPECT.SELECTITEM (WINDOW ROWPROPS VERTMARKS FETCHFN DATUM) CDADDR (X) \\BLTSHADE.IP (STREAM -DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT TEXTURE) ERRORSTRING (X) \\BACKTRACE ( -SI::$PROG1-FIRST-EXPRESSION$ .I7 PRINTFN EPOS) MEMBTONODES (TONODES TOND) CL:READ-LINE (EOF-VALUE -RESULT) CADDDR (X) \\BLKSMALLP2FLOAT.UFN (CNT DEST SOURCE) CADR (X) CL:REMOVE-DUPLICATES (SEQUENCE -LENGTH START FROM-END KEY TEST-NOT TEST) \\CCODEARGLIST (FNHD N) CADAAR (X) CHANGETRAN (X) -\\BLKFPLUS.UFN (COUNT DEST SOURCE1 SOURCE2) FORMAT-PRINT-BINARY (COLON ATSIGN PARMS) CL:REMOVE-IF ( -SEQUENCE LENGTH TEST START FROM-END KEY) CL:PATHNAME-NAME (PATHNAME) ARGTYPE (FN) TOGGLE/DIRECTEDFLG ( -WIN) \\NSRANDOM.OPENFILE (ACCESS RECOG PARAMETERS DEVICE) SCANX (DX DY X0 Y0) CONSTANTS (VARS X) -\\PRINTSTK (I) \\CCODEIVARSCAN (START X CODEBASE OFFSET FNHD DEF LC SIZE) DISPLAYLINK (G TOND FRND -TRANS LINEWIDTH STREAM PARAMS) CL:REMOVE-IF-NOT (SEQUENCE LENGTH TEST START FROM-END KEY) CL:SCALE-FLOAT - (CL::SIGN CL:EXP CL::HI CL::LO INTEGER CL::OLD-BOX) CLISPFOR4 (X) CL:SEARCH (SEQUENCE1 SEQUENCE2 -LENGTH1 LENGTH2 START1 START2) BSPINPUTSTREAM (STREAM) LISPERROR (X CONTINUEOKFLG) -TWODINSPECT.DOWINDOWCOMFN (TWODWINDOW) CAAAR (X) \\ARG.NOT.LITATOM (X) \\DUMP.COURIERPROGRAMS (NAMES -TAIL) CL:ROOM (CL::STORAGE-LEFT CL::ONE-PERCENT-VMEM CL::DATA-REMAINING CL::SYMBOLS-REMAINING -CL::VMEM-PERCENT) CADDAR (X) \\MEDW.SHAPEW (OLDSIZE) \\TRANSLATE.3TO10 (PUPHOSTNUMBER NDB -MYPUPHOSTNUMBER) BRKDWNRESULTS1 (NLST PTR N) COMPILER::EFFECTS-ANALYZE-LITERAL (COMPILER::NODE) -DBG::DEBUGGER-MENU-HELP (DBG::COMMAND) MACROEXPANSION (EXPR COMPILE.CONTEXT) CL:SINH (CL:NUMBER CL::Z) - COMPILER::RELEASE-PROGV (COMPILER::NODE) GETMACROPROP (PROPS FN) CAADR (X) %STRING-UPCASE (STRING -START END OFFSET) SETERRORN (NUM MESS) FORMAT-PRINT-DECIMAL (COLON ATSIGN PARMS) SEDIT::CREATE-NODE ( -SEDIT::NODETYPE CL:STRUCTURE) COMPILER::META-EVAL-PROGN (COMPILER:CONTEXT A1652 A1654 A1656 A1655) -COMP.VAR (DECL) \\RECLAIMCODEBLOCK (CODEBASE PTR) CADAR (X) XCCSSTRING (CODE) CL:SOME (PREDICATE -FIRST-SEQUENCE) ONEDINSPECT.REDISPLAY (WINDOW FETCHFN DATUM ROWPROPS VERTMARKS ELTPROP VALUEWIDTH -FHEIGHT FDESCENT) \\MEDW.EXPANDW (ICONW) \\BITBLT.HCPYMODE (SOURCEBITMAP SOURCELEFT SOURCEBOTTOM -DESTSTRM WIDTH HEIGHT SOURCETYPE OPERATION TEXTURE CLIPPINGREGION CLIPPEDSOURCELEFT -CLIPPEDSOURCEBOTTOM) BRKDWNRESULTS2 (X NAME TEM NCALLS TOT) CL:SLEEP (CL::SECONDS) GRAPHADDLINK (GRAPH - FROM TO WINDOW) \\TEXTSETEOF (EOFPTR) CLISPFORF/L (EXP) CL:VALUES (IMMEDIATE-CALLER CODE X ARGS N -WIDTH JUMPBASE) PRIN2 (FILE STRM L X) SEDIT::CREATE-GAP-NODE (SEDIT::GAP SEDIT::WIDTH) -COMPILER::META-EVAL-OPCODES (COMPILER::NODE COMPILER:CONTEXT) CREATEHASHFILE (SMASH COPYFN) ARRAYBLOCK - (NAME&FIELDS) CL:RENAME-FILE (NEW-NAME OLD-PATHNAME) SEDIT::TTYEXITFN (SEDIT::OLDPROC) -COMPILER::EFFECTS-ANALYZE-LAMBDA (COMPILER::NODE COMPILER::EFFECTS COMPILER::AFFECTED) DBG::DEBUGGER-EVAL - (CL:VALUES) \\DRAWELLIPSE.PRESS (PRSTREAM CENTERX COSOR SEMIMAJORRADIUS CENTERY SINOR SEMIMINORRADIUS - BRUSH DASHING) CL:VALUES-LIST (IMMEDIATE-CALLER CODE X CL:VALUES N WIDTH JUMPBASE) CL:SQRT (CL:NUMBER -) COMPILER::RELEASE-PROGN (COMPILER::NODE) SEDIT::SUBSTITUTE-OBJ (SEDIT::CONTEXT SEDIT::SELECTION) -SPYOBJ.DISPLAY (STREAM OBJ HEIGHT) DBG::NEAR-BY-REGION (DBG::REGIONTEMPLATE DBG::REGION DBG::WIDTH -DBG::HEIGHT) XIPAPPEND.CELL (CELL) NESTED.SUBMENU (MENU SUBITEMS SUBMENULST) CL:STRING-LEFT-TRIM ( -STRING LEFT-END) \\BLTSHADE.HCPYMODE (TEXTURE STREAM WIDTH HEIGHT OPERATION CLIPPINGREGION) -\\TEDIT.INSPECTCODE (CODEPRINTER FN LVFLG RADIX WHERE) NTYPX (X) CL:STREAM-EXTERNAL-FORMAT (STREAM) -\\SIMULATE.UNBIND (NEXT N PVAR0BASE RETURNER) \\PUTBASEBITS (POSITION ADDR VAL NA1711 POSA1710) -SEDIT::CREATE-ENVIRONMENTS (SEDIT::COMMANDS) COMPILER::META-EVAL-MV-PROG1 (COMPILER::NODE COMPILER::STMTS - COMPILER:CONTEXT A1648 A1650) COMP.USERFN (X) PRINTROUTINGTABLE (TB X Y ENTRY) SEDIT::UPDATE-TITLE ( -SEDIT::WINDOW SEDIT::CONTEXT) CL:STRING-NOT-GREATERP (STRING1 STRING2 START1 END1 START2 END2 INDEX -REL-INDEX) COMPILER::EFFECTS-ANALYZE-LABELS (COMPILER::NODE) \\NSFILING.GETFILEINFO (ATTRIBUTE DEVICE -STREAM) INITX (DX DY X0 Y0) CL::VALUES-LIST-UFN (CL::ARG-PTR CODE X CL:VALUES N WIDTH JUMPBASE) -CL:STRING-NOT-LESSP (STRING1 STRING2 START1 END1 START2 END2 INDEX REL-INDEX) \\TEXTOUTCHARFN (CH -STREAM) CL:STRING-DOWNCASE (STRING START END) CL:STRING-GREATERP (STRING1 STRING2 START1 END1 START2 -END2 INDEX REL-INDEX) SEDIT::STRINGWIDTH (SEDIT::STR SEDIT::FONT SEDIT::READ-TABLE STRING SEDIT::ESCAPE -) CL:STRING-LESSP (STRING1 STRING2 START1 END1 START2 END2 INDEX REL-INDEX) COMPILER:OPTIMIZE-AND-MACROEXPAND - (COMPILER::FORM COMPILER::ENVIRONMENT COMPILER:CONTEXT) CL::VALUES-UFN (CODE X CL::ARGCOUNT CL::ARG-PTR - N WIDTH JUMPBASE) CL:TREE-EQUAL (CL::X CL::Y) MAPFILES (X FN DEFAULTEXT DEFAULTVERS ATTRIBUTES -INCLUDE-DIRECTORIES) CL:STRING-NOT-EQUAL (STRING1 STRING2 START1 END1 START2 END2 INDEX) -\\MEDW.SHRINKW (REG) CL::%COMPLEX-TREE-EQUAL (CL::X CL::Y CL::TEST) BRKDWNFORM (LST STAT X SETFORM PTR -) \\UNWIND.UFN (NEXT N.KEEP PVAR0BASE) CL:STRING-UPCASE (STRING START END) \\CDR.UFN (Q) CL:LIST-LENGTH - (LIST) CL::%PRINT-TIMING-INFO (CL::STATS-OBJECT STREAM CL::TIME-BLOCK) SEDIT::CREATE-CONSTANT-STRINGS - (SEDIT::FONT SEDIT::PREFIX) COMPILER::META-EVAL-MV-CALL (COMPILER::NODE A1646 A1645 COMPILER:CONTEXT) - COMP.TRYUSERFN (EXP) SEARCHPRETTYTYPELST (TYPE) SEDIT::BUILD-WINDOW (SEDIT::DISPLAY-WINDOW -SEDIT::ENVIRONMENT) COMPILER::EFFECTS-ANALYZE-IF (COMPILER::NODE) CL:STRING/= (STRING1 STRING2 START1 -END1 START2 END2 INDEX) XIPAPPEND.STRING (EPKT) \\SETGLOBALVAL.UFN (V BASE N) ASSOC (KEY) CL:STRING-TRIM - (STRING LEFT-END RIGHT-END) COMPILER::RELEASE-MV-PROG1 (COMPILER::NODE) TEDIT.STYLESHEET (SHEET) -\\DASHINGCONVERT.HCPYMODE (DASHING) CL:STRING> (STRING1 STRING2 START1 END1 START2 END2 INDEX -REL-INDEX) \\TYPEP.UFN (X N) XIPAPPEND.IFSSTRING (XIP STRING OFFST) CL:STRING>= (STRING1 STRING2 -START1 END1 START2 END2 INDEX REL-INDEX) \\ROUTINGTABLE.INFOHOOK (PROC TYPE FONT BUTTON) CLISPFOR3 (X) - \\HARDRETURN (VAL) TOGGLE/SIDESFLG (WIN) TERMX (DX DY X0 Y0) \\COURIER.PUTDEF (TYPE DEFINITION) -\\CHECKAPPLY* (FN) CL:STRING<= (STRING1 STRING2 START1 END1 START2 END2 INDEX REL-INDEX) -CL::%SIMPLE-TREE-EQUAL (CL::X CL::Y) CLISPFORVARS1 (L FLG) \\ASSIGNDATATYPE1 (NAME PTRFIELDS -DESCRIPTORS SUPERTYPENUMBER PAGE NEWTYPEENTRY SPECS) \\INSPECT/CODE/REPAINTFN (WIN UPPERLEFT) -\\RPLACD.UFN (RP.Q A D) CL:SUBSTITUTE-IF-NOT (SEQUENCE LENGTH NEWITEM TEST START FROM-END KEY) -COMPILEFILES0 (FILES OPTIONS) %STRING-DOWNCASE (STRING START END OFFSET) CL:STRING-RIGHT-TRIM (STRING -RIGHT-END) \\COURIER.GETDEF (TYPE NAME) CL:SUBTYPEP (CL::TYPE1 CL::TYPE2) CL::%SIMPLE-ASSOC (CL::ITEM -CL::A-LIST) \\MEDW.RELMOVEW (WINDOW WINREG POS) BRKDWN1 (LST BLOCK A) \\CREATECELL (TYP) CL:SUBSTITUTE - (SEQUENCE LENGTH NEWITEM OLDITEM START FROM-END KEY TEST-NOT TEST) \\NSFILING.SETFILEINFO (ATTRIBUTE -VALUE NAME.OR.STREAM DEVICE HANDLE SESSION) \\SCALEDBITBLT.IP (DESTINATION DESTINATION-LEFT OLDX +CLIPPINGREGION DD SRCWIN SOURCELEFTTRANSFORMED SOURCEBOTTOMTRANSFORMED) HASHFILESPLST (XWORD) +SEDIT::INSERT-SPECIAL-CHARACTER (SEDIT::CONTEXT CL:CHAR SEDIT::POINT STRING) XCL::PROFILE-VARIABLES ( +XCL::PROFILE XCL::X) HARRAYPROP (NARGS PROP) \FTP.WHENCLOSED (INSTREAM) FINISH-READING-BITMAP (STREAM) + TEDIT.WORDSET (CHAR TABLE CODE CHARCODE CLASS) COMP.MAP (L XARG ENDLP LP OUT) \READPAGES (STREAM +FIRSTPAGE BUFFERLIST) CLRHASH (HARRAY BASEA0291 N BASE LASTSLOT) DOPMAP (STREAM PAGE# VMEMPAGE) +CL:READ-CHAR (STREAM EOF-VALUE) \BSP.GETFILEPTR (STREAM) CLOSEBSPSTREAM (STREAM SOCKET INPUTSTREAM) +%%COPY-ONED-ARRAY (LOCAL-ARRAY OFFSET SIZE TYPENUMBER BASE) CHAT.TAKE.INPUT1 (WINDOW PWINDOW +*LAST-CONDITION*) \SLOWHCPYMODEBLTCHAR (CHARCODE DISPLAYSTREAM CHAR8CODE) \FTP.OPENFILE (ACCESS RECOG +FILENAME OTHERINFO) TTADJUSTWIDTH (DELTA END) \GENERIC.DSPCREATE (OLDDSP) MAPHASH (HARRAY HA BASEA0292 + N BASE MAPHFN NULLVALUE LASTSLOT) LOG (X) HASHLINK (NAME&FIELDS) FINDPTRSBUFFER (PTR) \CHARWIDTH.PSC +(CHARCODE STREAM FONTDESCA0728) TEDIT.UNDO.DELETION (CH# PCTB START-OF-PIECE LEN OTEXTLEN) +\ICONW.FORMAT.TITLE1 (TITLE TITLELEN FONT MAXWIDTH BREAKCHARS) \BITBLT.MERGE (OPERATION SOURCEBITMAP +DESTBITMAP PILOTBBT SLX STY DLX DTY HEIGHT TEXTURE WIDTH SCRATCHLEFT SCRATCHTOP) \TEDIT2 (WINDOW) +OPENBSPSTREAM (FAILURESTRING OTHERPUPHANDLER ERRORHANDLER IOTIMEOUT IOTIMEOUTFN WHENCLOSEDFN) +SETTEMPLATE (FN TEMPLATE OLD NOSAVEFLG) BITMAPBIT.EXPANDER (ARGS) TEDIT.WORDGET (CHAR TABLE CH) +LOCKMAP (PTR) PUTHASH (KEY HARRAY) \HASHACCESS (ITEM BASEA0299 BASEA0300 VAL) \FIXLINELENGTH.IP ( +IPDATA) SEDIT::INSERT-MULTI-ESCAPE (SEDIT::CONTEXT TYPE CL:CHAR) \MEDW.DSPCREATE (OLDSTREAM SCREEN +DESTINATION DSTRM) \SPP.SEND.ENDREPLY (CON) MAPAFTERCLOSE (STREAM) CL::PUTHASH (KEY EXTRA VALUE +CL:HASH-TABLE) \IDLER (TIMEOUT START.TIME) FASL::DUMP-DCODE (FASL::HANDLE) \BSP.SETFILEPTR (STREAM +INDX) \FTPERROR (CONNECTION ERRARG) MAPPAGE (FILE STREAM PAGE# READONLY) REMHASH (KEY HARRAY) PRINTDEF + (FILE *STANDARD-OUTPUT* EXPR FIRSTPOS SPACEWIDTH TAIL) \HASHRECLAIM (HARRAY BASEA0298 N BASE LASTSLOT +) \STRINGWIDTH.HCPYMODE (STREAM STR WIDTHSBASE RDTBL) \MAPPAGE (FILEPAGE#) HASHOVERFLOW (HARRAY +OLDARRAY) RECORDINIT (X) SAVESETQ (SETQX) \DSPROTATE.PSC (STREAM OROT) CLMAPS1 (FN) MAPWORD (FILEADR +FILE) UNDONLSETQ (UNDOFORM UNDOFN) \LEVELTEXTURE (LEVEL) DWIMIFY1A (PARENT) IDLE (FROMTIMEOUT) +TEDIT.REDO.INSERTION (CH# PCTB LEN OTEXTLEN) SPY.MAKE.TREE (SPYDATA TREES WINDOW) UNLOCKMAP (PTR) +\HASHTABLE.DEFPRINT (STREAM CL:HASH-TABLE) \DSPBOTTOMMARGIN.IP (IPSTREAM) FINDCALLERS (ATOMS FILES X) +\BITBLT.BITMAP.SLOW (DESTBITMAP SOURCEBITMAP DESTINATIONLEFT DESTINATIONBOTTOM SOURCELEFT SOURCEBOTTOM + CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM OPERATION) CLISPFORINITVAR (EXP VAR) \COLLECTDIRTYBUFS ( +FIRSTPAGE) \BSPBACKFILEPTR (STREAM) BSPOPENP (STREAM) TEXTUREOFCOLOR (COLOR NOERRORFLG TEX) +WORDCONTENTS (PTR) XCL::SETF-PROFILE-ENTRY-VALUE-NAME (CL:VARIABLE XCL::NAME) \MEDW.TOTOPW ( +NOCALLTOTOPFNFLG) \PUNT.BITBLT.BITMAP (DESTBITMAP SOURCEBITMAP DESTINATIONLEFT DESTINATIONBOTTOM +SOURCELEFT SOURCEBOTTOM CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM OPERATION) \SETIODIRTY (STREAM +PAGENUMBER) \STRINGHASHBITS-UFN (ARG-PTR STRING) /SETWORDCONTENTS (PTR N) COURIER.NSNAME.LENGTH (TYPE +NSNAME) \STRING-EQUAL-HASHBITS-UFN (ARG-PTR STRING) SEDIT::OUTPUT-CONSTANT-STRING (SEDIT::STRINGITEM +SEDIT::LINEAR) SETWORDCONTENTS (PTR N) EXPANDBITMAP (BITMAP) SEDIT::INPUT-TOKENDELIM (SEDIT::CONTEXT +SEDIT::POINT SEDIT::CHARCODE SEDIT::POINTNODE) \MAKE.PMAP.DEVICE (DEVICE) \CODEARRAY (NBYTES +INITONPAGE) COMPILER::TEST-GENCODE (COMPILER::FN) RECORDACCESSFORM (FIELD DATUM NEWVALUE) WORDOFFSET ( +PTR N) \DRAWPOINT.PSC (BRUSH STREAM X WIDTH Y HEIGHT OPERATION) \PUNT.BLTSHADE.BITMAP ( +DESTINATIONBITMAP OPERATION) TEDIT.SETSYNTAX (TABLE CODE CLASS) \PAGED.GETNEXTBUFFER (WHATFOR) +XCL::SETF-PROFILE-NAME (XCL::PROFILE XCL::NAME) \MEDW.BURYW (OVERLAPPINGWINDOWS W) \FIXCODENUM (CA +BASE NUM) \TFBRAVO.GET.NAMEDTAB (CHARSTREAM) \PAGED.FORCEOUTPUT (Y X) DSPSOURCETYPE (DISPLAYSTREAM +Operation SourceType) \FIXCODEPTR (CA PTR BASE BN LO) \CLIPLINE (WIDTH CLIPREG HALFWIDTH) +\PAGEDSETFILEPTR (INDX NEWPAGE NEWOFF) BRH/LAYOUT (MOMLST X W Y N) DSPYOFFSET (YOFFSET) FASL::DUMP-INTEGER + (FASL::VALUE FASL::HANDLE FASL::MINBITS FASL::NBYTES) \CLISPKEYWORDPROCESS (WORDLST) \PAGED.SETEOFPTR + (NBYTES STREAM NEWEP NEWEO) ARGINFO-MUNG (LST THING) DSPXOFFSET (XOFFSET) TEDIT.UNDO.INSERTION (CH# +LEN) \UPDATEOF (STREAM) \IFS.LOOKUPFILE (NAME HOSTNAME RECOG ATTRIBUTE) SYSRECLOOK1 (RECNAME) +\PAGEDREADP (STREAM CHAR TABLE) \CARET.FLASH (STREAM X Y RATE UNLESSOCCLUDED) CLISPIFYMAPS (OPR IN-ON) + \CHECKARRAYBLOCK (BASE N FBL) TEDIT.GETSYNTAX (CHAR TABLE CH) COURIER.WRITE.NSNAME (STREAM NAME TYPE) + \BSPWRITEBLOCK (STREAM BASE OFF NBYTES) \ALLOCBLOCK.OLD (GCTYPE 1STBLOCK.IN.FREECHAIN) TTYINREADP ( +FLG) TWODINSPECT.REDISPLAY (WINDOW FETCHFN DATUM RPROP CPROP COLUMNPROPS COLUMNWIDTHS HORZMARKS +ROWPROPS VERTMARKS FHEIGHT FDESCENT) \ALLOCBLOCK.NEW (ARLEN GCTYPE) SEDIT::INPUT-STRINGDELIM ( +SEDIT::CONTEXT SEDIT::POINT) EP (ATOM) \ALLOCHUNK (GCTYPE TYPENUM.TABLE) DECREASING.FONT.LIST (SIZE) +TOPW.REPAINTFN (WINDOW DISPLAYW LEFT RIGHT BOTTOM) \SFFixDestination (BM DISPLAYSTREAM) FTPPUTMARK ( +STREAM MARK) \LEAF.READFILEPROP (STREAM OPUP OFFSET LEN CONNECTION) BSPPUTMARK (MARKBYTE) +\MAIKO.ALLOCBLOCK (ARLEN) \BSP.HANDLE.DATA (SOCKET) CHAT.TYPESCRIPT (STATE) \NEWLENGTHIS (STREAM PGE +OFF) \DSPPOPSTATE.PSC (STREAM XFORM) CLISPIFYCROPS (X PARENT0) DSPTEXTURE (TEXTURE DISPLAYSTREAM) +\TEDIT.WORDBOUND.READTABLE (CHAR TABLE CODE RTBL) COMP.NUMBERTEST (FORM X TEST) BSPOUTPUTSTREAM ( +BSPSTREAM) \MAKEFREEARRAYBLOCK (LENGTH) FASL::DUMP-COMPLEX (FASL::HANDLE FASL::VALUE) +\TEDIT.INTERRUPT.SETUP (PROC) CLISPFORF/L (EXP) INSURE.RGB.COLOR (COLOR) \BSP.GETNEXTBUFFER (WHATFOR) +\DISPLAYSTREAMINCRXPOSITION (DD N) \MERGEFORWARD (N) CLISPIFYRPLAC (X TYP PARENT0) SPY.NEXT.TREE (TREE + FN) XCL::PROFILE-VALUE-TYPE-CHECK (XCL::DEFINITION) \MEDW.REDISPLAYW (WINDOW DSP) \LINKBLOCK (N FBL) +TEXTOBJ (STREAM) PUTHASHTEXT (SRCFIL START END KEY) \MERGEBACKWARD (N) SPY.SUM (Y) \CLIPCURVELINE.IP ( +LEFT RIGHT TOP BOTTOM PT1VISP IPSTREAM) \VANILLADISKINIT (ARR) TTPRIN1COMMENT (STR DOWNCASE) +\LEAF.GETFILEINFO.OPEN (ATTRIBUTE STREAM) \DELETEBLOCK? (BASE N FBL) \BSP.HANDLE.ACK (PUP) +RECREDECLARE2 (FORM) PPBUFS (BUF0) \DSPPUSHSTATE.PSC (STREAM IMAGEDATA) \SFFixClippingRegion (CLIPREG +BM) \PREFIXALIGNMENT? (BASE GCTYPE ARLEN) GET.OBJ.FROM.USER (TEXTOBJ) CHAT.CLEAR.FROM.MENU (WINDOW +STATE) COURIER.READ.NSNAME (STREAM TYPE) SPY.MERGETREE (PARENTS NEWORIGINAL SPYDATA DEPTH) +DWIMARKASCHANGED (FN $SIDES) \FTP.SENDVERSION (CONNECTION OUTS INS ECHOSTREAM) \VANILLAHOSTNAMEP (NAME +) \SFFixFont (BITSPERPIXEL FONT DISPLAYSTREAM) CLISPIFYCROPS1 (CROPFN) SEDIT::INPUT-QUOTE (SEDIT::CONTEXT + SEDIT::QUOTE-TYPE SEDIT::SELECTION SEDIT::CHARCODE SEDIT::POINT SEDIT::NODE) \DSKOpenDevice (DEV) +XCL::SETF-PROFILE-ENTRY-VALUE (CL:VARIABLE XCL::VALUE) \MEDW.SHAPEW (OLDSIZE) \NEW2PAGE (BASE) +\DSPTRANSLATE.PSC (STREAM TX TY MDX MDY REG) \UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (DISPLAYSTREAM +NEWLENGTH) \SFFIXLINELENGTH (DD) CROPMARK.PUTFN (HRULE OUTPUT.STREAM) SCALE.FONT (WID STR) +FASL::DUMP-RATIONAL (FASL::HANDLE FASL::VALUE) COMP.SPREADFN (ARGS 2FN) \UFSOpenDevice (DEV) +BSPFORCEOUTPUT (DEMANDINGLY) \CARET.FLASH? (OFFRATE X Y ONRATE) COPYHASHFILE (NEWNAME VALUETYPE ACCESS + KEY NEWHASHFILE FN) \BSP.DECLARE.FILEPTR (ADR) \VANILLAEVENTFN (EVENT FDEV) +XCL::PROFILE-ENTRY-VALUE-NAME (CL:VARIABLE XCL::PROFILE) \DISPLAY.PILOTBITBLT (PILOTBBT N) +CHAT.SWITCH.EMACS (WINDOW) BLOCK (TOFX FN) \SETBRUSH.IP (BRUSH IPSTREAM OPERATION) BKLINBUF (STR SA) +\ARRAYBLOCKMERGER (BASE NBASE) SEDIT::OUTPUT-CR (SEDIT::LINESKIP SEDIT::INDENT SEDIT::NEW-LPTR) +CLISPFOR4 (X) \PRIMARYTEXTURE (PRIMARY LEVEL TEXTURE) DWIMUNSAVEDEF (FN) CHAT.TAKE.INPUT (WINDOW) +TEXTSTREAMP (STREAM) COMPILER::GENCODE-VAR-REF (COMPILER::NODE) \INCPARENCOUNT (RSNX) CLISPIFYCROPS0 ( +CROPSLST) PAGEHEIGHT (N) \GR.GETDEFFN (NAME) \FTP.EOL.FROM.PLIST (PLIST) INVERT.SEGMENT (NOSWAP LEFT +BOTTOM WIDTH) CROPMARK.COPYFN (IMAGEOBJ TOSTREAM) \COPYARRAYBLOCK (HEADER LEN TYP) CLEARBUF (FILE STRM +) \COPYCODEBLOCK (NEWCA OLDCA NWORDS) COMP.GETBASEBITS (A) COPYALL (VAL TN Y NH SIZE TYPE IM) +\MEDW.EXPANDW (ICONW) WXOFFSET (WINDOW DS DX) \TFBRAVO.PUT.NAMEDTAB (OBJ CHARSTREAM) \SAVELINEBUF ( +NBYTES STR) \ADVANCE.ARRAY.SEGMENTS (NXTPAGE) TTY.PROCESS (KEYACTION) COMPILER::GENCODE-UNWIND-PROTECT + (COMPILER::NODE) \BYTELT (J) COPYHASHITEM (KEY HASHFILE NEWHASHFILE) SETDISPLAYHEIGHT (MAGICADDR) +\BYTESETA (J V) \BSP.HANDLE.INTERRUPT (PUP DIF #:G118) INVERTW (WIN SHADE) WYOFFSET (WINDOW DS DY) +\WORDELT (J) \TEDIT.PROCEXITFN (THISP) \LEAF.STRIP.QUOTES (NAME) \MEDW.SHRINKW (REG) \ARRAYTYPENAME (X +) SPY.LEGEND (X) SPY.MAKEGRAPHNODES (TREE SPYDATA STATUS LABEL COUNT THRESHOLD) COMPILER::GENCODE-THROW + (COMPILER::NODE) CLISPIFYNOT (FORM) CCODEP (FN) PAGEFULLFN (KEYSTREAM STREAM) FASL::WRITE-INTEGER-BYTES + (FASL::HANDLE) SEDIT::MAKE-COMMENT-STRING (SEDIT::NODE CL:LENGTH) \SETRTPPORTS (PUP SOCKET) +\BLOCKDATAP (X TYPENO) CROPMARK.GETFN (INPUT.STREAM PAGESIZE) SETLINELENGTH (N) +\BSP.HANDLE.INTERRUPTREPLY (PUP) DISPLAYSTREAMP (X STYPE) TEDIT.SETFUNCTION (CHAR TABLE CODE) +\CARET.SHOW (CARET UNLESSOCCLUDED) \TEDIT.PROCENTRYFN (NEWPROCESS) COMP.FIX (A) TERMCHARWIDTH ( +CHARCODE STREAM TTBL) CLISPFOR3 (X) CROPMARK.IMAGEBOXFN (IMAGE.STREAM) PLAYTUNE (TUNEPAIRS X +\DurationLimit) \SHOW.ARRAY.FREELISTS (N) SEDIT::INPUT-DOT (SEDIT::CONTEXT SEDIT::POINT) +TERMINAL-INPUT (U STREAM) NSNAME.TO.STRING (DOM COLON ORG) SHRIEKIFY (LOOKAT) EDITDATE (INITLS NEWDATE +) CLISPFORVARS1 (L FLG) \STREAMCHARWIDTH (STREAM TABLEA0498 TTBL SPACEWIDTH) XCL::SHOW-CLOSURE-CACHE ( +STREAM XCL::KEY XCL::VAL) SEDIT::HELPMENU (SEDIT::CONTEXT) TERMINAL-OUTPUT (U STREAM) +XCL::PROFILE-ENTRY-VALUE (XCL::PROFILE CL:VARIABLE) FTPPRINTCODE (CODE) \PARSEARRAYSPACE (FN) +\GR.WITHRESOURCEMAC (X) \BSP.HANDLE.ERROR (PUP #:G117) \FTP.GETFILEINFO.FROM.PROPS (ATTRIBUTE PROPS) +\TEDIT.GET.TERMSA.WIDTHS (A J V NWIDTHS FONT TERMSA) \PARSEARRAYSPACE1 (START END BASE N) +\TEDIT.COPYINSERTFN (WW INSERTIONS TEXTSTREAM SEL) COMP.NUMBERCALL (COERSIONS) CHANGEBACKGROUNDBORDER +(SHADE) EDITDEF.FILES (NAME SOURCE EDITCOMS OPTIONS) SEDIT::VERIFY-COMMENT (SEDIT::NODE STRING) +COMP.GETD (A) \FILLRTPPUP (LENGTH TYPE SOCKET) POSTINITARRAYS (CODESTARTPAGE EXTRACELLS AFTERCODEPTR +CODENEXTPAGE) \TEDIT.UNPARSE.PARALOOKS.LIST (FMTSPEC) \MEDW.RELMOVEW (WINDOW WINREG POS) +COURIERPROGRAM.PRETTYPRINT (TAB1 TAB2) \TFBRAVO.COPY.NAMEDTAB (OBJ) \DECPARENCOUNT (RSNX) CLREMPARS (X +) ICONW.TITLE (ICONW) SPY.MERGE (SPYDATA X) DINFO.TITLEMENUFN (DINFOW GRAPH MENUFN) \INTERPRETER1 (DEF + NNILS NPVARARGS NTSIZE NACTUAL FN) FASL::DUMP-ARRAY (CL:ARRAY FASL::HANDLE FASL::REMEMBER) +TEDIT.GETFUNCTION (TABLEA0736) \SMASHLINK (OLDCLINK OLDALINK) COMP.NUMERIC (FN COERSIONS ZERO) +\GETCHAR (C) \NSNAME.DEFPRINT (NAME) CLISPANGLEBRACKETS (LST) \STACKARGPTR (FRAME) \FILLBUFFER ( +FILLTYPE STRM KEYSTREAM TABLE RTBLSA ILB ISP ILP) TWODINSPECT.DOWINDOWCOMFN (TWODWINDOW) \STARTDISPLAY + (W) SEDIT::EDIT-HELP (SEDIT::CONTEXT SEDIT::POINT SEDIT::PROMPTWINDOW) \FILLBUFFER.WORDSEPRP (CHAR) +\MEDW.MOVEW (OLDREGION Y) \DSPTRANSFORMREGION (REGION DS) \FILLBUFFER.BACKUP (CHAR) +COMPILER::GENCODE-TAGBODY-INLINE (COMPILER::NODE COMPILER::STK-NUM) CHARWIDTH (CHARCODE FONT +FONTDESCA0491) FAULTAPPLY (FAULTFN ARGLISTA0614 CNT FAULTARGS) \TEDIT.READTABLE (CHAR TABLE CODE RTBL) + COMP.COMPARENUM (A TYPE FN) DSPBACKUP (WIDTH DD) TEDIT.GET.PARALOOKS (TEXTSTREAM SELORCH# TEXTOBJ) +\CreateScreenBitMap (WIDTH RASTERWIDTH HEIGHT) \OFFSETCLIPPINGREGION (DD CREG) VIDEOCOLOR (NARGS) +COMPILER::GENCODE-TAGBODY (COMPILER::NODE COMPILER:CONTEXT) \SETUP-COMPILED-CLOSURE-CALL (CLOSURE +INTERPFRAME CODE NEWSTACK START) FW-PERCENTAGE (X Y) \PARSE.REMOTE.FILENAME (DEVICE FILENAME OSTYPE) +\FILLINSPP (CON) \CoerceToDisplayDevice (NameOrDevice DEV) RECREDECLARE1 (ORIG) SPY.MERGEINFO (SPYDATA + NAME PARENT-NAME) \POSTSCRIPT.NSHASH (MAPPING-LIST CHARCODE) CLISPAND1 ($FORM CLAUSE) MAKEKEYLST (LST + KEY AUTOCOMPLETEFLG) \3MBSENDPACKET (NWORDS) \PROMPTWINDOW.OPENFN (WINDOW) FASL::DUMP-GENERAL-ARRAY ( +CL:ARRAY FASL::HANDLE FASL::NELTS FASL::ELT-TYPE) \CURSOR.DEFPRINT (STREAM CURSOR) \3MBENCAPSULATE ( +PDH NDB LENGTH TYPE) SPY.MAX (TREES X) \DSCCOUT (CHARCODE) ARGLIST (FN SMARTP) CL:/= (CL::ARGS) +\PROMPTWINDOW.SET.HEIGHT (PWINDOW OBSCUREDHEIGHT HEIGHT) \MAKEFREEBLOCK (SIZE) \CREATEDISPLAY ( +DISPLAYNAME NAME) FASL::DUMP-BIT-ARRAY (CL:ARRAY) CLISPFOR0A ($I.S.OPR LASTPTR) CL:1- (CL:NUMBER) +COMP.SHIFT (A) CLISP-SIMPLE-FUNCTION-P (CARFORM) \FREESTACKBLOCK (N) FW-UPDATE-OFD-WINDOWS (OFD) +XCL::IN-PROFILE (XCL::PROFILE) COMPILER::GENCODE-SETQ (COMPILER::NODE) \STKNAME (POS NAME BFLINK) +GETWINDOWUSERPROP (WINDOW USERPROP) COMPILER::TRANSFORM-GET/PUT-BASE (COMPILER::NODE COMPILER::ARGS +COMPILER::OFFSET COMPILER::USE COMPILER:CONTEXT) \FTP.UNPACKFILENAME (FILENAME FIELDS TAIL) +\SETUP-ENVIRONMENT-CALL (UFNFX UFNBF CALLNEXT ALINK) \ICONW.FORMAT.TITLE (TITLE FONT MAXWIDTH +BREAKCHARS) CL:ASH (INTEGER CL:COUNT) DISPLAYSTREAMINIT (TTYFONT N) MAYBE.PRETTYPRINT.BOLD (VAR) +DELETE.LONG.SEGMENT (START END) RPAQX.PRETTYPRINT (EXPR) \3MB.BROADCASTP (PACKET) COLLECTKEYS ( +HASHFILE KEY1 KEY2 KEY) SEDIT::GET-MENU (SEDIT::CONTEXT) \LEAF.READFILENAME (STREAM DEVINFO) +DINFO.GET.FILENAME (NODE GRAPH) FTPPRINTMARK (MARK) \EVALOTHER (X) BSP.PUTINTERRUPT (STREAM TIMER CODE + STRING) CHAT.EMACS.MOVE (CHAT.STATE CLOC) CL:ACOSH (CL:NUMBER CL::FX) CLISPCOND1 (L) \EVALVAR (VP) +CL:ATANH (CL:NUMBER CL::FX) CHANGEBACKGROUND (W) PUTPROPS.PRETTYPRINT (TEM) CL:ATOM (X) +SEDIT::CREATE-COMMENT-WORD-NODES (SEDIT::CHARS SEDIT::ENVIRONMENT) \CARET.CREATE (CURSOR) +\ICONW.SHOW.TITLE (ICONW BITS JUST FONT REG OPERATION TEXT NEWFLG) \SPP.SYSPKT (CCBITS) +\LINEBUF.PEEKBIN (STREAM) \PROMPTWINDOW.PAGEFULLFN (WINDOW PWINDOWPROP) \MOVE.WINDOWS.ONTO.SCREEN ( +WINDOWS) CROPMARK.DISPLAYFN (CROPMARK PAGESIZE IMAGE.STREAM SCALE THICK HEIGHT WIDTH) CLISPFOR1 ( +OPRTAIL END END1) CL:ATAN (CL::Y CL::R CL::I) \FTP.OPENFILE.FROM.PLIST (HOST ACCESS DESIREDPLIST) +FAULTEVAL (FAULTX) \ADDLEAFSTRING (PUP) DINFO.OPENTEXTSTREAM (WINDOW FILE FROM TO THIS.TEXT PROPS) +FTPDEBUG (REGION WINDOW) CL:ASINH (CL:NUMBER CL::FX) \FILLBSPPUP (LENGTH TYPE ID REQUEUE SOCKET) +CHAT.HOLD (WINDOW) \LINEBUF.READP (STREAM FLG) COMP.RPLACD (A) CLISPAND (FORM) XCL::ADD-PROTOTYPE-FN ( +TYPE XCL:DEFINER XCL::PROTOTYPE-FN) CL:BOOLE (CL::OP CL::INTEGER1 CL::INTEGER2) \EVALFORMASLAMBDA ( +FAULTX) SEDIT::UNDO-COMMENT-CHANGE (SEDIT::CONTEXT SEDIT::NODE SEDIT::OLD-VALUE SEDIT::COMMENT-WORDS) +\LINEBUF.EOFP (STREAM STRM) APPLY (U V CNT) XCL::MAKE-PROTOTYPE (XCL:DEFINER TYPE XCL::NAME) TTNEXTPOS + (COL) SEDIT::STRINGIFY-COMMENT (SEDIT::NODE) CL:CLEAR-INPUT (STREAM) APPLY* (U ARGLIST CNT FN) /CNDIR + (HOST/DIR) SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::CONTEXT SEDIT::SELECTION SEDIT::PROMPTWINDOW SEDIT::S +) INVERT.BITMAP.VERTICALLY (BITMAP HEIGHT WIDTH NEW.BITMAP X2) LINEBUFFER-SKIPSEPRS (STREAM RDTBL S +*READTABLE*) DINFO.SHOWSEL (SEL TEXTSTREAM) TTGIVEHELP1 (NO.INTRO) \CKAPPLYARGS (FRAME) +SPY.UPDATE.TITLE (W) CHAT.MENU (WINDOW) LINEBUFFER-EOFP (STREAM S) EQFMTSPEC (PARALOOK1 PARALOOK2) +CLISP4 (EXP SUBPARENT $TAIL) DEFEVAL (TYPE) RECORDTRAN (RECORDEXPRESSION WORDTYPE SETQPART SETQTAIL X) + \OUTTERMP (OFD) \PROMPTWINDOW.EXPAND (%#LINES PWINDOW HEIGHT) CL:CEILING (CL:NUMBER CL::DIVISOR) +CLISPIF2 (X) \INTERMP (OFD) EVALV (VAR) CL:CLOSE (STREAM) TRIM.BITMAP (BITMAP WIDTH HEIGHT) +\MEDW.CREATEW (SCREEN DSP REGION TITLE BORDERSIZE R TWICEBORDER) RELSTK (FX) +XCL::PROTOTYPE-DEFINERS-FOR-TYPE (TYPE) XCL::PROTOTYPE-DEFN-TYPES (XCL::X) CL:COMMONP (CL::OBJECT) +\FIXPASSWORD (CONNECTION ERRCODE DIRECTORY) \EVALV1 (VAR) CL:COSH (CL:NUMBER CL::Z) \WRITE1 (OBJECT +STREAM) FILES.WHENCHANGED (NAME REASON) FASL::DUMP-SIMPLE-VECTOR (CL:VECTOR) CL:COUNT (SEQUENCE LENGTH + ITEM START KEY TEST-NOT TEST) \LEAF.DIRECTORYNAMEONLY (FILENAME DIR) CLISPCOND (CLAUSE CPYFLG) +\SETVAR (VP) COMP.LABELS (DEF FUNCTIONS Z) \PRINTCCODE (FILE CHARCODE) CL:CIS (CL::RADIANS) +\DEFINEDISPLAYINFO (DISPLAYINFO) TTBEFOREPOS (X Y) PRINTCCODE (FILE CHARCODE) TWOD.TRACKCURSOR (WINDOW + VERTMARKS ROWPROPS HORZMARKS COLUMNPROPS NEW-ITEM-FN HIGHLIGHT-FN HEIGHT) \SETFVARSLOT (FX VAR ATOM# +NEWBINDING) SEDIT::EXPAND (SEDIT::CONTEXT SEDIT::SELECTION SEDIT::PROMPTWINDOW) \MOVETO.HCPYMODE ( +STREAM X Y) CL:DECODE-FLOAT (CL::SIGN CL:EXP CL::HI CL::LO) PROG (U VARLST) \TEST.PARAGRAPH.LOOKS ( +FILE) CL:DECODE-UNIVERSAL-TIME (UNIVERSAL-TIME TIME-ZONE) SEDIT::CREATE-COMMENT-WORD-NODE (SEDIT::CHARS + SEDIT::ENVIRONMENT) COMPILER::GENCODE-RETURN (COMPILER::NODE CL:BLOCK) \PROG0 (NNILS NVARS NTSIZE X) +CL:COUNT-IF (SEQUENCE LENGTH TEST START KEY) REATTACHPROMPTWINDOW (PWINDOW MAINWINDOW +OLDPASSTOMAINCOMS) FINDFILE-WITH-EXTENSIONS (FIELDS TAIL EXTENSIONS) MAINWINDOW (WINDOW) CLISPIF3 ( +ORIGWORDPAIR CLAUSE) CL:COUNT-IF-NOT (SEQUENCE LENGTH TEST START KEY) INVERT.BITMAP.HORIZONTALLY ( +BITMAP WIDTH HEIGHT NEW.BITMAP X2) TEDIT.SHOWSEL (STREAM TEXTOBJ ONFLG) PRINT-CIRCLE-LABEL-P (OBJECT +TABLEENTRY) \GR.METHODEXPANDER (X NAME METHOD) PFI.MAYBE.PP.DEFINITION (OUTSTREAM INSTREAM START END) +CL:DELETE-IF (SEQUENCE LENGTH TEST START FROM-END KEY) CL:DELETE-IF-NOT (SEQUENCE LENGTH TEST START +FROM-END KEY) CreateCursorBitMap (BM ARRAY) CL:ARRAY-RANK (ARRAY) \SMASHRETURN (MYCALLER FRAME) +COMPILER::ENSURE-EFFECT-CONTEXT (COMPILER::CTXT COMPILER::FORM COMPILER::SUBST-INDICES COMPILER::NAME) + CLISPIF1 (L0 L FORM) CL:DELETE-FILE (FILE) GO (U LABEL) TTGIVEHELP2 (HELPKEY) \SPP.SENDPKT (EPKT ACK# + ALLOC#) EVALA (A VAR X) CL:DELETE-DUPLICATES (SEQUENCE LENGTH START FROM-END KEY TEST-NOT TEST) +CL:ARRAY-TOTAL-SIZE (ARRAY) CLISP3C (L3) \EVALA (NNILS NVARS ALIST NTSIZE X FORM) CL:DEPOSIT-FIELD ( +CL::BYTESPEC CL::SIZE CL:POSITION CL::NEWBYTE CL::MASK INTEGER) COMPILER::IS-CALL-TO (COMPILER::NODE +COMPILER::FN COMPILER::VAR COMPILER::NAME) SET-DOCUMENTATION (NAME DOC-TYPE NEW-STRING) +INVERT.LONG.SEGMENT (MODE) SEDIT::COPY-HASH-TABLE (SEDIT::KEY SEDIT::NEW-TABLE SEDIT::VALUE +SEDIT::OLD-TABLE) \DSPYPOSITION.HCPYMODE (HARDCOPYSTREAM OLD-POS) DPB (CL::BYTESPEC CL::NEWBYTE CL::SIZE + CL:POSITION INTEGER) FASL::DUMP-SYMBOL (CL:SYMBOL) PUTTEXTPROP (PROP VALUE) DASSEM.CLEANFNTEST (TYPE) + CL:ENCODE-UNIVERSAL-TIME (MONTH DATE SECOND MINUTE) FTP.BREAKCONNECTION (HOST STREAM) +SMASHFILECOMSLST (COMS COM) CL:DISASSEMBLE (NAME-OR-COMPILED-FUNCTION LEVEL-P RADIX OUTPUT FIRST-BYTE +MARKED-PC) COMPILER::GENCODE-PROGN (COMPILER:CONTEXT COMPILER::NODE COMPILER::TAIL) +\TEST.CHARACTER.LOOKS (FILE) CL:GETHASH (CL::KEY CL::HASHTABLE CL::DEFAULT) ERRORSET (*PROCEED-CASES* +FORM) TITLEDICONW (TITLE TITLEWIDTH BORDER POSITION JUST NOOPENFLG) XCL::WHERE-IS-GET-WRITE-DATE ( +CL:NAMESTRING HASH-FILE:HASH-FILE) LOADUP (FILES X) CL::STRUCTURE-POINTER-SLOTS (CL::PS) +\PRINT-USING-DEFPRINT (X TYPE CPL STREAM) SI::NLSETQHANDLER (C) CL:DIRECTORY (PATHNAME) \PRINSTACKP ( +STREAM) MAKE-FILL-POINTER-OUTPUT-STREAM (STRING) FILE-STREAM-POSITION (STREAM) \PRINSTRING (X ESC +STREAM) \UPDATE-WHO-LINE-ACTIVE-FLAG (WINDOW) SI::ERRORSET-PRINT-FUNCTION (STREAM) COMP.TAGBODY (A) +\CKPOSBOUT (STREAM X) \SPP.OTHER.BOUT (STREAM BYTE) LET (U VARLST) %%BROADCAST-STREAM-DEVICE-BOUT ( +STREAM S BYTE) \CKPOSSOUT (X STREAM) CLISP3 (X) \LET0 (NNILS NVARS NTSIZE X) CL:FILE-AUTHOR (CL::FILE) + XCL::WHERE-IS-SET-WRITE-DATE (CL:NAMESTRING PATHNAME HASH-FILE:HASH-FILE) CL:FCEILING (CL:NUMBER +CL::DIVISOR) LET* (U VARLST) FASL::DUMP-CHARACTER (CL:CHAR FASL::HANDLE FASL::CODE STREAM) +CL:DOCUMENTATION (NAME DOC-TYPE) CL:FILE-LENGTH (FILE-STREAM) \LITPRIN (X RDTBL STREAM) \BSPEVENTFN ( +EVENT DEV) \LET* (NNILS NVARS NTSIZE X) SEDIT::PARSE-INDENT-GROUPS (SEDIT::INDENTS SEDIT::TAGBODY?) +CL:FILE-WRITE-DATE (FILE) %%BROADCAST-STREAM-DEVICE-OUTCHARFN (S CHARCODE) COND (U) TTRACKMOUSE (END) +CL:FILL (SEQUENCE LENGTH) \ADJUSTABLE-STRING-STREAM-OUTCHARFN (CHAR) %%CONCATENATED-STREAM-DEVICE-BIN +(STREAM) COMP.RETURN-FROM (A) CL:FILE-NAMESTRING (PATHNAME PATH RESULT) \DURATIONTRAN (FORM +EXPIREDFORM) PROG1 (U) CL:DESCRIBE (CL::OBJECT) CL:FFLOOR (CL:NUMBER CL::DIVISOR) CL:FILE-POSITION ( +CL::FILE-STREAM) ENDLOADUP (R FILE TYPE) %%BROADCAST-STREAM-DEVICE-FORCEOUTPUT (stream s +waitForFinish?) HASHBEFORECLOSE (FILE) SEDIT::DO-MUTATION (SEDIT::MUTATOR SEDIT::NODE) CL:FINISH-OUTPUT + (OUTPUT-STREAM) %%NEW-FILE (FILENAME) %%CONCATENATED-STREAM-DEVICE-PEEKBIN (stream) CLISPIF (FORM +FNSLST0 VARSLST0) CL:FLOAT-DIGITS (FLOAT) SEDIT::SET-SELECTION-COMMENT-WORD (SEDIT::NODE SEDIT::OFFSET + SEDIT::CONTEXT) \TEDIT.PUT.CHARLOOKS (LOOKS FILE CHLIM CH1 STREAM W LOOKSHARRAY) PUTDQ? (FN DEF) +PREDICT-NAME (PATHNAME) SEDIT::DELETE-WORD (SEDIT::CONTEXT SEDIT::POINT) +%%CONCATENATED-STREAM-DEVICE-CLOSEFILE (s) %%CONCATENATED-STREAM-DEVICE-BACKFILEPTR (stream) +CL:FIND-IF-NOT (SEQUENCE LENGTH TEST START FROM-END KEY) GETTEXTPROP (PROP TEXTOBJ) +%%CONCATENATED-STREAM-DEVICE-EOFP (stream) CL:ENOUGH-NAMESTRING (PATHNAME DEFAULTS PATH RESULT) +COMP.RETURN (A) PACKAGE-NAME-AS-SYMBOL (PACKAGE) \LEAF.ERROR (PUP DATA FILENAME CONNECTION) ENVEVAL ( +FORM) FASL::DUMP-VALUE-FETCH (FASL::HANDLE FASL::INDEX) SEDIT::SIMPLE-STRING-OFFSET (SEDIT::INDEX +SEDIT::STRINGITEM) PUTDQ (X Y) \LITPRIN.INTERNAL (SYMBOL RDTBL MULTESCAPE PNAMELENGTH A STREAM ESCAPE) + SEDIT::EVAL-SELECTION (SEDIT::CONTEXT SEDIT::PROMPTWINDOW SEDIT::PROCESS) DEFINEDP (A) +ROTATE.BITMAP.RIGHT (BITMAP HEIGHT WIDTH X1) BACKSPACEDEL (TTBL) SEDIT::SCALE-INDENT (SEDIT::INDENT +SEDIT::INDENT-BASE SEDIT::INDENT-STEP LEFT RIGHT) \DSPXPOSITION.HCPYMODE (HARDCOPYSTREAM) +CL:FLOAT-PRECISION (FLOAT CL::SIGN CL:EXP CL::HI CL::LO) DOFILESLOAD (FILES INPUTNAME) \SPPWATCHER ( +SOCEVENT ACKINTERVAL) ENVAPPLY (FN ARGS CNT) CL:EVERY (PREDICATE FIRST-SEQUENCE) DSPEOLFN ( +DISPLAYSTREAM) ENSURE.RGB (COLOR) TERM.RESET.DISPLAY.PARMS (DSP FONT FONTHEIGHT FONTWIDTH FONTDESCENT +WINDOW TTYHEIGHT) SEDIT::SIMPLE-STRING-SCAN (SEDIT::STRINGITEM STRING SEDIT::FONT) CLISP3B (CLTYP) +%%ECHO-STREAM-DEVICE-BIN (STREAM BYTE) CL:FIND-IF (SEQUENCE LENGTH TEST START FROM-END KEY) CL:FTRUNCATE + (CL:NUMBER CL::DIVISOR) \DSPCOLOR.IP (IPSTREAM RGB) RECORDPRIORITY (RECNAME PRIORITY) FUNCTION (FN) +%%SYNONYM-STREAM-DEVICE-GET-INDIRECT-STREAM (SYNONYM-STREAM) CL:GCD (CL::ARGS) \FTP.FILEINFOFN ( +GENSTATE ATTRIBUTE) CHAT.DID.RESHAPE (CHAT.STATE) \FUNCT1 (NNILS NVARS VARLST NTSIZE) +%%BROADCAST-STREAM-DEVICE-CHARSETFN (STREAM NEWVALUE) COMP.GO (A) CL:FORCE-OUTPUT (OUTPUT-STREAM) +\MAKESTACKP (FX OLDFX) %%SYNONYM-STREAM-DEVICE-EOFP (STRM STREAM) CL:FROUND (CL:NUMBER CL::DIVISOR) +FIX89A (N) TWODINSPECT.MAKEREGIONS (WINDOW ROWPROPS COLUMNPROPS WINDOWHEIGHT LF SPACE) +%%SYNONYM-STREAM-DEVICE-OUTCHARFN (OTHER-STREAM CHARCODE) SEDIT::DELETE-SELECTION (SEDIT::CONTEXT +SEDIT::SELECTION) \SYMBOL.ESCAPE.COUNT (SYMBOL RDTBL SA ESCAPE LEN) COMPILER::GENCODE-MV-CALL (COMPILER::NODE + COMPILER::FN) \MAKEFUNARGFRAME (VAR) \TEDIT.BRAVOFILE? (FILE ORIGINAL.FILE.POSITION) +%%SYNONYM-STREAM-DEVICE-BOUT (STREAM BYTE) CTEXTPROP (FORMTAIL PROP) INVERT.BITMAP.DIAGONALLY (BITMAP +HEIGHT WIDTH) STKEVAL (POS FORM) \CONVERTTOFRACTION (FLOAT) CL:FLOAT-SIGN (CL::FLOAT1 CL::NEW-SIGN-BIT +) XCL::WHERE-IS-NAMESTRING (PATHNAME) \NUMERIC.PNAMEP (RADIX EFFECTIVE-RADIX SYMBOL) STKAPPLY (POS FN +ARGS CNT) FASL::SAVE-VALUE (FASL::HANDLE) CGETTEXTPROP (PROP) CROPMARK.CREATE (CROPMARK WIDTH) +\SEND.ENDREPLY (SOCKET) \FTP.REOPENFILE (ACCESS STREAM) SI::UNWIND (TARGET) +%%SYNONYM-STREAM-DEVICE-BIN (STREAM) RETEVAL (POS FX FORM) TEDIT.COPY (CROSSCOPY) CL:FLOATP (CL::X) +%%SYNONYM-STREAM-DEVICE-PEEKBIN (STREAM NOERRORFLG?) CL:HASH-TABLE-COUNT (CL:HASH-TABLE) +BRACKET.CURRENT.WORD (LINE ENDLINE X CH COL) SEDIT::SET-SELECTION-COMMENT (SEDIT::ITEM SEDIT::SELECTION + SEDIT::CONTEXT SEDIT::NODE) INTERACT&SHIFT.BITMAP.LEFT (BITMAP) RETAPPLY (POS FX FN ARGS CNT) +%%SYNONYM-STREAM-DEVICE-CHARSETFN (STREAM NEWVALUE) \DSPSPACEFACTOR.HCPYMODE (DISPLAYSTREAM FACTOR) +PNAMESTREAMP (STRM) TTRUBOUT (PREVL) %%SYNONYM-STREAM-DEVICE-BACKFILEPTR (STREAM) +%%SYNONYM-STREAM-DEVICE-READP (STREAM FLG) CL:GET-SETF-METHOD-MULTIPLE-VALUE (CL::FORM CL::ENVIRONMENT +) %%CONCATENATED-STREAM-DEVICE-CHARSETFN (STREAM NEWVALUE) CLISPIFY2D (FORM) COPYVM (FILE) +%%TWO-WAY-STREAM-DEVICE-BIN (stream) BLIPVAL (BLIPTYP A) TEDIT.CHARWIDTH (FONT) CL:GET-SETF-METHOD ( +CL::FORM CL::ENVIRONMENT) CL:INPUT-STREAM-P (STREAM) \TEDIT.GET.PARALOOKS (N WIDTH LOOKS# PARAHASH) +ROTATE.BITMAP.LEFT (BITMAP HEIGHT WIDTH Y1) \VAROFFSET (FRAME NT ATN) \CHECKFLTFMT (FORMAT) +\SEND.ANSWERING.RFC (IPUP) SETBLIPVAL (BLIPTYP A VAL) %%SYNONYM-STREAM-DEVICE-GETFILEINFO (STREAM +ATTRIBUTE) \MAPCHARS (\MAPCHARFN CHAR X FLG RDTBL) BLIPSCAN (BLIPTYP) \DRAWPOINT.IP (IPSTREAM BRUSH X +WIDTH Y HEIGHT OPERATION) READIMAGEOBJ (OBJ STREAM) %%TWO-WAY-STREAM-DEVICE-READP (STREAM FLG) +FASL::LOOKUP-VALUE (FASL::HANDLE FASL::VALUE) %%TWO-WAY-STREAM-DEVICE-OUTPUTSTREAM (STREAM) FIX89 (N +FORM C) \RTP.ERROR (EVENT SOCKET) \FTP.CLOSEFILE (ACCESS FILENAME) %%TWO-WAY-STREAM-DEVICE-BACKFILEPTR + (STREAM) PFI.MAYBE.SEE.PRETTY (TOFILE FROMFILE) INSPECT (WHERE ITEMTYPE DTD) +%%SYNONYM-STREAM-DEVICE-SETFILEINFO (STREAM ATTRIBUTE VALUE) \REALFRAMEP (FRAME NAME INTERPFLG) +%%TWO-WAY-STREAM-DEVICE-OUTCHARFN (CHARCODE) PRINTNUM-TO-STRING (FORMAT FMT \NUMSTR \NUMSTR1) +%%SYNONYM-STREAM-DEVICE-FORCEOUTPUT (STREAM WAITFORFINISH) EXPRP (FN) \IPCURVE2 (SPLINE BRUSH DASHING +IPSTREAM %#KNOTS XPOLY X'POLY X''' X'' X' X YPOLY Y'POLY Y''' Y'' Y' Y) LISPERROR (X CONTINUEOKFLG) +WHO-LINE-TIME (NOW) \STRING-STREAM-OUTCHARFN (CHAR) \SETUP.TYPENUM.TABLE (SIZELST PREFIX GCTYPE TABLE) + CL:INTEGERP (X) CL:HASH-TABLE-P (CL::OBJECT) CL:LDB-TEST (CL::BYTESPEC INTEGER) \NET.SETTIME (RETFLG) + ALISTS.GETDEF (NAME) \DSPLINEFEED.HCPYMODE (DISPLAYSTREAM) CL:IDENTITY (CL::THING) POSTSCRIPT.INIT ( +FD) %%TWO-WAY-STREAM-DEVICE-FORCEOUTPUT (stream waitForFinish?) \TRANSMIT.STRATEGY (PUPALLOC) +%%TWO-WAY-STREAM-DEVICE-BOUT (STREAM BYTE) CL:LCM (CL::ARGS) SELECTQ (SELCQ) COMP.PROG (VARS VALS +PROGCONTEXT RETURNLABEL) \EVALFORM (ARGLIST CNT FN) COMPILER::GENCODE-LET (COMPILER::FN COMPILER::ARGS +) LDB (CL::BYTESPEC INTEGER CL:POSITION CL::SIZE) \GC.HANDLEOVERFLOW (X LX ARG) VRULE.PUTFN (HRULE +OUTPUT.STREAM) CL:LISTEN (STREAM) \DRAWLINE.IP (X1 Y1 X2 Y2 WIDTH OPERATION IPSTREAM COLOR IPDATA W) +\DTEST.UFN (TYPEN) %%TWO-WAY-STREAM-DEVICE-EOFP (STRM stream) %%FILL-POINTER-STREAM-DEVICE-GETFILEPTR +(STREAM) CL:INTEGER-DECODE-FLOAT (CL::SIGN CL:EXP CL::HI CL::LO) DUMMYDEF (LST) XCL::WHERE-IS-FILES ( +XCL::PATTERN XCL::FILES) %%TWO-WAY-STREAM-DEVICE-INPUTSTREAM (stream) \FTP.DIRECTORYNAMEP (HOST/DIR +DEV) \BACKTRACE (SI::$PROG1-FIRST-EXPRESSION$ .I7 PRINTFN EPOS) SETUPSTACK (INITFLG) SPY.START (FILE) +\FTP.ADD.QUOTES (NAME) CL:ISQRT (INTEGER CL::ILENGTH CL::LOW) LAPRD (FN) \STKARG (N FRAME NOSUCH +DEFAULT) CLISPIFY2C (FORM SUBPARENT) BACKTRACE (FILE IPOS EPOS PRINTFN) VRULE.COPYFN (IMAGEOBJ) +COMP.LAMBDA (FN X) \SETFVAR.UFN (V) \HUNKFIT? (N) %%TWO-WAY-STREAM-DEVICE-PEEKBIN (stream noErrorFlg?) + \GCMAPTABLE (ARG XA0287 LX XA0288) PRINTFN (FN FROMFILE LOC TOFILE) RADIX (R) +SEDIT::PARSE-INDENT-GROUP-BODY (SEDIT::GROUP) \DSPRIGHTMARGIN.HCPYMODE (DISPLAYSTREAM) \INTERPRETER (N + FN X NACTUAL CNT) FILEPATCHBLOCK (ARLEN) TTYINBUFFERPEEK (STREAM BUF CH) SMALLP (X) SAVEDEF (NAME I) +CL:LOGNOR (CL::INTEGER1 CL::INTEGER2) COLLECTDESCENDENTS (Node Graph) TWODINSPECT.PRINTELEMENT (RIGHT +ELT WINDOW BOTTOM FDESCENT) SEDIT::CONVERT-COMMENT-STRUCTURE (SEDIT::EXPR) \DSPFONT.HCPYMODE ( +HDCPYDSTREAM FONTDESC CHARCODE) FIXP (X) CL:LOGNAND (CL::INTEGER1 CL::INTEGER2) +\SPP.DEFAULT.ERRORHANDLER (CONDITION STREAM) DOAROUNDEXITFORMS (EVENT $$FORM) CL::%%ATAN-FLOAT (CL::Y +CL::FY) \BSP.SENDBUFFER (NBYTES SOCKET) FLOATP (X) \FTP.FROM.LISP.ATTRIBUTE (ATTR) SEDIT::PARSE-INDENT-NAME + (SEDIT::NAME SEDIT::INDENTS) \FTP.GENERATEFILES (PATTERN DESIREDPROPS PROP CODE OPTIONS) COMP.SETN (A +) CL:LOGORC2 (CL::INTEGER1 CL::INTEGER2) TEDIT.NEW.FONT (TEXTOBJ) \PRINTFRAME (FRAME USECNT ALINK +FNHEADER NEXTBLOCK NAMETABLE BLINK NMT PRINTFN) CL:LOGANDC1 (CL::INTEGER1 CL::INTEGER2) LISTP (X) +CGETD (X) SEDIT::SET-POINT-COMMENT (SEDIT::NODE) \FTP.GETFILENAME (RECOG NAME DEV) \PRINTBF (BL NMT +PRINTFN) \SPP.CREATE.STREAM (ACCESS) ARRAYP (X) INSPECTW.CREATE (PROFILE DATUM IWFONT FETCHFN WHERE +TITLE STOREFN PROPCOMMANDFN VALUECOMMANDFN TITLECOMMANDFN SELECTIONFN) SEDIT::PARSE-STRING-INTO-WORDS +(SEDIT::CHARS) PFI.CHOOSE.BEST (LST) \TEDIT.COMMAND.RESET.SETUP (TEXT&WIND WINDOW WW) CL:LOGANDC2 ( +CL::INTEGER1 CL::INTEGER2) STRINGP (OBJECT) CL:LOGIOR (CL::ARGS) VRULE.IMAGEBOXFN (IMAGE.STREAM) +\DRAWARC.IP (STREAM CENTERX CENTERY RADIUS STARTANGLE NDEGREES BRUSH DASHING) STACKP (X) CL:LOGEQV ( +CL::ARGS) \SCANFORNTENTRY (NMT NTENTRY) VARS (FN USEDATABASE) \RECLAIMSTACKP (PTR FX) NCONC (N) +MAKENEWCOM (FILE) DECODE/WINDOW/OR/DISPLAYSTREAM (WINDOWVAR WINDOW) \PRINTSTK (I) TTPRIN1 (STR) +CLISPIFY1 (CLTYP0) COMP.SETQ (A) CHARACTER (BASEA0354 \PNAMESTRING) INVERT.BITMAP.B/W (BITMAP +NEW.BITMAP WIDTH HEIGHT) MERGE (COMPAREFN) %%TWO-WAY-STREAM-DEVICE-CHARSETFN (STREAM NEWVALUE) +\COMPUTE.HUNK.TYPEDECLS (SIZELST GCTYPE PREFIX FINAL) PRINTTIMER (LABEL TIMER DIF) TTYINBUFFERBIN (BUF + CH) CL:MACHINE-INSTANCE (CL::HOST) \SETXFORM.PSC (STREAM CLIP) %%SYNONYM-STREAM-DEVICE-GET-STREAM ( +stream) \LEAF.RECONNECT (DEVICE) PRIN2 (FILE STRM L X) DF (FN ARGS) \DSPLEFTMARGIN.HCPYMODE ( +DISPLAYSTREAM) CL:MAKE-PATHNAME (HOST DEVICE NAME TYPE VERSION) COMPILER::GENCODE-LABELS (COMPILER::INNER-CODE +) LIST* (NARGS) SORT1 (DATA END COMPAREFN) CL:LOGTEST (CL::INTEGER1 CL::INTEGER2) \SEND.ABORT (SOCKET +PUP) \GETINTEGERPART (FRACT ROUNDER) VIRGINFN (FN) \TEDIT.RESTARTFN (WINDOW PROPS ODIRTY) +\DRAWCURVE.IP (IPSTREAM BRUSH CLOSED) CL:MAKE-BROADCAST-STREAM (STREAMS STREAM) CL:COMPILED-FUNCTION-P + (CL::FN) SEDIT::SELECT-SEGMENT-COMMENT (SEDIT::SELECTION) COLLECT.CHILD.NODES (Node Graph GraphNodes) + CLISPATOM (CLST PARENT) CL:MAKE-ECHO-STREAM (CL::INPUT-STREAM CL::OUTPUT-STREAM STREAM) \SEND.END ( +SOCKET) SEDIT::DEFAULT-EDIT-FN (SEDIT::OBJ SEDIT::OPTIONS) CHANGENAME1A (NEW DEF OLD) FASSOC (KEY) +CHANGENAME1 (Y X) CL:MAKE-SYNONYM-STREAM (CL:SYMBOL STREAM) CL:MAKE-TWO-WAY-STREAM (CL::INPUT-STREAM +CL::OUTPUT-STREAM STREAM) SAVEONSYSRECLST (NAMES) SEDIT::CONVERT-COMMENT (SEDIT::CONTEXT SEDIT::SELECTION + SEDIT::DEPTH SEDIT::PROMPTWINDOW SEDIT::NUMBER-OF-COMMENTS) INTERACT&SHIFT.BITMAP.DOWN (BITMAP) +\CHANGE.ETHER.TRACING (WINDOW FLGNAME) \CLOSEIPSTREAM (IPSTREAM) CDDR (X) VRULE.GETFN (INPUT.STREAM) +INTERACT&SHIFT.BITMAP.UP (BITMAP) XCL::WHERE-IS-NOTICE (XCL::DATABASE-FILE XCL::FILE XCL::HASH-FILE-SIZE + HASH-FILE:HASH-FILE PATHNAME) FIXCONTINUE (FN) MAP (MAPFN1) CL:LOGORC1 (CL::INTEGER1 CL::INTEGER2) +APROPOS (STRING ATOM CASEARRAY) CADR (X) LOGNOT (INTEGER) SEDIT::PARSE-INDENT-BODY (SEDIT::OFFSET +CL:FIRST SEDIT::INDENTS SEDIT::REPEAT) CDAR (X) CL:MAKE-STRING (SIZE FATP STRING INITIAL-ELEMENT) +CL:MAKE-RANDOM-STATE (CL::STATE) CLDISABLE (OP X) TEXTSTREAM (STREAM) CHAT.TYPEOUT.CLOSE (WINDOW +OUTSTREAM MSG NEWSTATE) \FTP.GETFILEINFO (STREAM DEV ATTRIBUTE) CDDDR (X) APROPRINT (FILE STRING VALUE +) TTYINBUFFERREADP (STRM) CAAR (X) DO.SHIFTED.SELECTION (STARTBUF ENDBUF) \GET-NEXT-RUN (MAX OFFSET +RUN-LENGTH) SEDIT::PARSE-INDENT (SEDIT::ISPEC) \DRAWELLIPSE.HCPYMODE (STREAM ORIENTATION BRUSH DASHING +) CDADR (X) \FLOATTOBYTE.UFN (CNT DBASE SBASE) FASL::ELEMENTS-IDENTICAL-P (CL:ARRAY FASL::SEQ FASL::X +FASL::TESTELT) EQCLOOKS (CLOOK1 CLOOK2) CDDAR (X) CL:NSTRING-DOWNCASE (STRING START END) +\FTP.DELETEFILE (FILENAME NAME DEVICE PROP) ARGTYPE (FN) INITDATATYPENAMES (X) +RECURSIVE.COLLECTDESCENDENTS (Node Graph) CADDR (X) CL:NSTRING-CAPITALIZE (STRING START END) +COMPILER::GENCODE-IF (COMPILER::NODE COMPILER:CONTEXT) \BLKFABSMAX.UFN (BASE CNT) \SHIFT.DOCUMENT ( +BASEA0775 NO ARR PCTB DELTAX ELEMENT) \BSP.FLUSH.SOCKET.QUEUES (SOCKET) CDAAR (X) \LINEBLT (LEFT RIGHT + Y TOP BOTTOM DESTINATIONBASE RASTERWIDTH GRAYBASE GRAYHEIGHT NBITS GRAYWIDTH) \BLKFABSMIN.UFN (BASE +CNT) CAADR (X) ESUBST (OLD NEW CHARFLG UNDOLST1) \CCODEARGLIST (FNHD N) TWODINSPECT.ADJUSTSELECTION ( +WINDOW ROWPROPS VERTMARKS SELROWPROP FETCHFN DATUM SELCOLPROP COLUMNPROPS HORZMARKS) CADAR (X) +CL:MASK-FIELD (CL::BYTESPEC INTEGER CL::SIZE CL:POSITION) CL:MERGE-PATHNAMES (PATHNAME DEFAULTS PATH +DEFAULT-PATH HOST DEVICE DEFAULT-VERSION) SEDIT::SET-POINT-COMMENT-WORD (SEDIT::NODE SEDIT::OFFSET) +GETPROP (ATM PROP) DEFAULT.INSPECTW.PROPCOMMANDFN (PROPERTY INSPECTW OLDVALUEITEM PWINDOW) CDDDDR (X) +FNCHECK (SPELLFLG TAIL) CL:MERGE (RESULT-TYPE SEQUENCE1 SEQUENCE2 PREDICATE KEY RESULT) \FTP.MAKEPLIST + (HOST INFO FILENAME DESIREDPROPS) \BLKSMALLP2FLOAT.UFN (CNT DEST SOURCE) SEDIT::PARSE--COMMENT-WORD ( +CL:STRUCTURE SEDIT::CONTEXT) CAAAR (X) CL:NOTANY (PREDICATE FIRST-SEQUENCE) PACK* (U \PNAMESTRING BASE + LEN FATP PREFIX-LENGTH) BSPPRINTPUP (PUP) COMP.NOT (A) CDDDAR (X) CL:MISMATCH (SEQUENCE1 SEQUENCE2 +LENGTH1 LENGTH2 START1 START2 KEY TEST-NOT TEST INDEX SUBLEN1 SUBLEN2) \WWCHANGESCREENSIZE (W) +\CCODEIVARSCAN (START X CODEBASE OFFSET FNHD DEF LC SIZE) \TFBRAVO.ADD.NAMEDTAB (TABNO PARALOOKS +TEXTOBJ) CAAAAR (X) CL:PATHNAME-NAME (PATHNAME) \BLKMAG.UFN (CNT COMPLEX-ARRAY MAGNITUDE-ARRAY) +COMPILER::GENCODE-GO (COMPILER::NODE CL:TAGBODY) CDDAAR (X) \BLKEXPONENT.UFN (CNT DEST SOURCE) +CL:PARSE-NAMESTRING (THING START END PATH-LIST VERSION) ICONW.SHADE (WINDOW) TTYINBUFFEREOFP (STRM) +CDDADR (X) TIME.SINCE.PACKET (CLK0 PACKET CLK1) \RTP.HANDLE.RFC (BSPSOCKET) \FTPEVENTFN (EVENT DEV) +INTERACT&SHIFT.BITMAP.RIGHT (BITMAP) SEDIT::SETF-OF-GET-FORMAT (SEDIT::NAME) \DRAWCURVE.HCPYMODE ( +STREAM KNOTS CLOSED BRUSH DASHING) CADADR (X) CL:MAP (FUNCTION SEQUENCE) SCANFORWARD (CH CHAR) +\BLKFDIFF.UFN (COUNT DEST SOURCE1 SOURCE2) BSPBOUT (STREAM BYTE) CDAAAR (X) CL:OUTPUT-STREAM-P (STREAM +) CL:NSUBSTITUTE-IF-NOT (SEQUENCE LENGTH NEWITEM TEST START FROM-END KEY) \TEDIT.MAKEFILENAME (STRING) + CONSTANTS (VARS X) \LEAF.GETFILEINFO (ATTRIBUTE DEV) PPSOC.CURRENT (PUP STREAM) COMP.STCROP (X) +CDADAR (X) \BLKFLOATP2COMP.UFN (CNT DEST $$BASE SOURCE) CL:NSUBSTITUTE-IF (SEQUENCE LENGTH NEWITEM +TEST START FROM-END KEY) MENUWMINSIZEFN (MENUW MENU TITLE?) \BLKPERM.UFN (CNT DEST ORIG PERMUTATIONS) +SEDIT::LINEARIZE-COMMENT (SEDIT::NODE SEDIT::CONTEXT SEDIT::ENVIRONMENT SEDIT::LEVEL SEDIT::PREFIX) +\BLKFMIN.UFN (BASE CNT) FIXATOM (DWIMUSERFORM) CDADDR (X) \SPP.CREATE.WATCHER (NAME) \BLKFPLUS.UFN ( +COUNT DEST SOURCE1 SOURCE2) \BLKFMAX.UFN (BASE CNT) SPY.FIND.TREE (FN) CDAADR (X) CL:NUMBERP (CL::X) +SPY.TREE (THRESHOLD MERGETYPE DEPTHLIMIT SPYDATA) FIXATOM1 (POS) CAADDR (X) CL:PHASE (CL:NUMBER) +CL:PPRINT (OUTPUT-STREAM OBJECT) RECORDECLARATIONS (DECS) \BLKFTIMES.UFN (COUNT DEST SOURCE1 SOURCE2) +SEDIT::CHANGE-PACKAGE (SEDIT::CONTEXT SEDIT::PROMPTWINDOW) CADDDR (X) \BLKSEP.UFN (CNT DEST SOURCE1 +SOURCE2) CL:POSITION-IF-NOT (SEQUENCE LENGTH TEST START FROM-END KEY) GETMACROPROP (PROPS FN) +CL::%%ASIN-FLOAT (CL::X CL::R2) MACROEXPANSION (EXPR COMPILE.CONTEXT) CHAT.OPTIONMENU (INSTREAM FN) +CAADAR (X) INFILECOMS? (ONFILETYPE LITERALS) PATHNAME (THING) \MISC5.UFN (ALPHA) CL::%%PRINT-TIMING-ITEM + (CL::NUM STREAM STRING) PRINTPUPQUEUE (QUEUE HEADER) COMP.CARCDR (A X) CADDAR (X) CL:NSTRING-UPCASE ( +STRING START END) SEDIT::CHANGE-QUOTE (SEDIT::QUOTE-TYPE SEDIT::CONTEXT) FASL::FAT-STRING-P (STRING) +SEDIT::PARSE--COMMENT (CL:STRUCTURE) CADAAR (X) CL:PLUSP (CL:NUMBER) ADDTOCOM1 (NAME) \FTP.REGISTER ( +STREAM) \MISC6.UFN (ALPHA ARG1 ARG2 ARG3 ARG4 ARG5 ARG6) SEDIT::FORMAT-FROM-INDENT (SEDIT::ARGS +SEDIT::SUBLISTS SEDIT::INLINE? SEDIT::INDENTS) \DRAWCIRCLE.HCPYMODE (STREAM BRUSH DASHING) CL:PROBE-FILE + (FILE) PRINTCURSOR (VAR) CL:PEEK-CHAR (STREAM PEEK-TYPE EOF-VALUE NOERROR DESIREDCHAR) +\UPDATECACHEDFIELDS (DS) SEDIT::CHANGE-PRINTBASE (SEDIT::CONTEXT SEDIT::PROMPTWINDOW +SEDIT::NEW-PRINTBASE-STRING) \CHARWIDTH.IP (CHARCODE STREAM FONTDESCA0733) BLOCKRECORD (NAME&FIELDS) +CAAADR (X) CL:POSITION-IF (SEQUENCE LENGTH TEST START FROM-END KEY) VRULE.DISPLAYFN (HRULE +IMAGE.STREAM SCALE RULEHEIGHT WIDTHS Y REALHEIGHT) \BLTSHADE.IP (STREAM DESTINATIONLEFT +DESTINATIONBOTTOM WIDTH HEIGHT TEXTURE) XCL::SAME-WHERE-IS-DATABASE (XCL::X XCL::Y XCL::PATHNAME-X +XCL::PATHNAME-Y) DINFO.CREATE.GRAPH.WINDOW (GRAPH DINFOW DINFOREGION REGION LEFT BOTTOM) +\FTP.DIRECTORYNAMEONLY (DIRNAME) IBLT1 (BitmapAddr Kount TextureArray ValueArray ValHeight XCoord +ValWidth BitmapWidth) COMPILER:OPTIMIZE-AND-MACROEXPAND (COMPILER::FORM COMPILER::ENVIRONMENT COMPILER:CONTEXT +) ERRORSTRING (X) CL:READ-BYTE (BINARY-INPUT-STREAM STREAM EOF-VALUE) \TAN.OLD (X) CL:VALUES ( +IMMEDIATE-CALLER CODE X ARGS N WIDTH JUMPBASE) CL::TIME-FORMAT (STREAM) TEDIT.FLASHCARET (CARETS) +IBLT2 (BitmapAddr Kount TextureArray ValueArray ValHeight XCoord ValWidth BitmapWidth) +\SIMULATE.UNBIND (NEXT N PVAR0BASE RETURNER) %%STRING-BASE-COMPARE (START1 START2) CL:PATHNAME-VERSION + (PATHNAME) CL:VALUES-LIST (IMMEDIATE-CALLER CODE X CL:VALUES N WIDTH JUMPBASE) SEDIT::BACKSPACE ( +SEDIT::CONTEXT SEDIT::POINT) ERRM-TO-CONDITION (NUM) CL:PATHNAME-TYPE (PATHNAME) \PUTONSCREENW (W) +%%STRING-DOWNCASE (STRING START END OFFSET) SETERRORN (NUM MESS) \TEDIT.LOOKS (TEXTOBJ REGION SEL POS) + SCANBACK (BUF CH CHAR) COMPILER::GENCODE-CATCH (COMPILER::NODE COMPILER:CONTEXT) +XCL::DEL-WHERE-IS-DATABASE (XCL::DATABASE XCL::ELEMENT) \ARG.NOT.LITATOM (X) CL:RANDOM (CL:NUMBER +CL::STATE) \SEND.ACK (PUP %#PUPS) %%STRING-BASE-COMPARE-EQUAL (START1 START2) STRICTLY/BETWEEN (VAL +LOWER HIGHER) CL:READ-FROM-STRING (STRING STREAM EOF-ERROR-P EOF-VALUE) \RTP.HANDLE.PUP (BSPSOCKET +#:G116) \FTP.UNREGISTER (STREAM DEVICE) %%STRING-UPCASE (STRING START END OFFSET) CL::VALUES-UFN (CODE + X CL::ARGCOUNT CL::ARG-PTR N WIDTH JUMPBASE) XCL::SETF-PACKAGE-PREFIX (XCL::PREFIX) +SEDIT::INSERT-COMMENT-CHARS (SEDIT::CONTEXT CL:LENGTH SEDIT::STRING-LENGTH SEDIT::FONT SEDIT::NODE +SEDIT::NEW-SUBNODE SEDIT::WORDS SEDIT::DEPTH) CL:REMOVE-IF (SEQUENCE LENGTH TEST START FROM-END KEY) +CL::VALUES-LIST-UFN (CL::ARG-PTR CODE X CL:VALUES N WIDTH JUMPBASE) COMPILER::GENCODE-BLOCK (COMPILER::NODE + COMPILER::END-TAG COMPILER::STK-NUM COMPILER:CONTEXT) \DRAWLINE.HCPYMODE (STREAM OPERATION COLOR) +CL:REDUCE (SEQUENCE LENGTH FUNCTION START INITIAL-VALUE) MULTIFILEINDEX1 (FILES *STANDARD-OUTPUT*) +CL:REMOVE-DUPLICATES (SEQUENCE LENGTH START FROM-END KEY TEST-NOT TEST) \SPPCONNECTION (SKT# NAME) +RECORD.REMOVE.COMMENTS (X A D) CL:REM (CL:NUMBER CL::DIVISOR CL::FY) MERGEINSERT1 (X Y) +MOVEDESCENDENTS (Node Graph deltaX deltaY DisplayStream) ACCESSFNS (NAME&FIELDS) MENUWRESHAPEFN ( +WINDOW) CL::SET-PARSED-STRUCTURE (CL::NAME CL::PS) \TEDIT.UNPARSE.CHARLOOKS.LIST (LOOKS A) FIXAPPLY ( +DWIMUSERFORM) CL:ROOM (CL::STORAGE-LEFT CL::ONE-PERCENT-VMEM CL::DATA-REMAINING CL::SYMBOLS-REMAINING +CL::VMEM-PERCENT) CL:READ-CHAR-NO-HANG (STREAM EOF-VALUE RECURSIVE-P) CL:NSUBSTITUTE (SEQUENCE LENGTH +NEWITEM OLDITEM START FROM-END KEY TEST-NOT TEST) CL:REMOVE-IF-NOT (SEQUENCE LENGTH TEST START +FROM-END KEY) INTERACT&ADD.BORDER.TO.BITMAP (BITMAP) CL:READ-LINE (EOF-VALUE RESULT) \TEXTSETEOF ( +EOFPTR) \RTP.FILTER (PUP) XCL::WHERE-IS-NOTICE-INTERNAL (XCL::NAME HASH-FILE:HASH-FILE TYPE XCL::ALIST + XCL::OLD-ENTRY) CL:RENAME-FILE (NEW-NAME OLD-PATHNAME) PRINTPACKET (PACKET TYPE DOFILTER) +FW-INIT-PROPS (XMAX YMIN XMIN YMAX FN) \LEAF.OPENFILE (DEV OTHERINFO ACCESS DEVINFO RECOG) +\TEXTOUTCHARFN (CH STREAM) FIX89TYPEIN (X CLST) CL:SIGNUM (CL:NUMBER) WHO-LINE-VMEM (ONE-PERCENT-VMEM +VMEM-PERCENT) INITDATATYPES (NSYSTYPES) CL:SCALE-FLOAT (CL::SIGN CL:EXP CL::HI CL::LO INTEGER +CL::OLD-BOX) \ONSCREENW (W) SI::%%STRUCTURE-DECLARE-DATATYPE (CL::NAME CL::WORD-LENGTH +CL::FIELD-DESCRIPTORS) \RECLAIMCODEBLOCK (CODEBASE PTR) \TYPEGLOBALVARIABLE (TYPENAME VAR) +\ICONW.REPAINTFN (WINDOW IMAGEBM) XCL::ADD-WHERE-IS-DATABASES (XCL::PATHNAMES) CL:SLEEP (CL::SECONDS) +\ASSIGNDATATYPE1 (NAME PTRFIELDS DESCRIPTORS SUPERTYPENUMBER PAGE NEWTYPEENTRY SPECS) BITBLT.INSERT (X + Y WIDTH) EDITMOVESUBTREE (WINDOW DS) \COS.OLD (X) CL:SEARCH (SEQUENCE1 SEQUENCE2 LENGTH1 LENGTH2 +START1 START2) PRINT10TO3 (EPKT CALLER) CREATEHASHFILE (SMASH COPYFN) SEDIT::ADD-MENU (SEDIT::CONTEXT +SEDIT::WINDOW SEDIT::PROMPTWINDOW) \SFFixY.HCPYMODE (Y FONT CSINFO) \LEAF.WRITEPAGES (BUFFERLIST +FIRSTPAGE OPUP) DINFO.GET.GRAPH.WINDOW (REGION) PROPERTAILP (Y) PFI.CONSTANTNAMES (EXPR X) ADDTOFILES? + (VARSCHANGES F FL X I) CL::%%SIMPLE-TREE-EQUAL (CL::X CL::Y) PPSOC (FILE SOC STATE LOCALPORT) +COMP.DECLARE1 (VAL OTHERVAR SYSOTHERVAR) COMPILER::STOP-UNBINDS-AT-FRAME-BOUNDARY (CONDITIONS:RESTART) + CL::ESTABLISH-SETFS-AND-OPTIMIZERS (CL::PS CL::SLOT CL:INLINE) CL:SQRT (CL:NUMBER) REMPROP (ATM PROP) + CL::%%COMPLEX-TREE-EQUAL (CL::X CL::Y CL::TEST) PUTPROP (ATM PROP VAL) \HANDLE.RAW.10TO3 (TYPE XA0719 + NDB) FIXLAMBDA (DEF) CL:SOME (PREDICATE FIRST-SEQUENCE) \RTP.INFO.HOOK (PROC BUTTON) +SETF-MACRO-FUNCTION (X BODY) PRINTPACKETQUEUE (QUEUE CALLER FILE) CL:STREAM-EXTERNAL-FORMAT (STREAM) +CL:TREE-EQUAL (CL::X CL::Y) CL::SET-SHARED-SETF-INVERSE (CL::NAME CL::SHARED-UPDATE-FN) +\RECLAIMARRAYBLOCK (B TRAILER) CL:SINH (CL:NUMBER CL::Z) CL:LIST-LENGTH (LIST) \TEDIT.ACTIVE.WINDOWP ( +W) COMP.DECLARE (A B) PFI.VARNAME (EXPR NAME) TEDIT.UNDO (TEXTOBJ SEL) SEDIT::SPLIT-COMMENT (SEDIT::CONTEXT + SEDIT::NODE SEDIT::COMMENT SEDIT::START CL:LENGTH SEDIT::POINT) SEDIT::GET-INDENT (SEDIT::NAME) +TWODINSPECT.TOTALWIDTH (COLUMNWIDTHS SPACE FONT) SEDIT::COMMENT-OUT-SELECTION (SEDIT::CONTEXT +SEDIT::SELECTION) \CHARWIDTH.HCPYMODE (STREAM CHARCODE) \CDR.UFN (Q) \PUTBASEBITS (POSITION ADDR VAL +NA0617 POSA0616) SEDIT::DEGRADE-COMMENT (SEDIT::NODE SEDIT::CONTEXT) NTYPX (X) TWODINSPECT.REPAINTFN ( +WINDOW VERTMARKS ROWPROPS TOP BOTTOM HORZMARKS COLUMNPROPS LEFT RIGHT FETCHFN DATUM FDESCENT) +CL:STRING-NOT-EQUAL (STRING1 STRING2 START1 END1 START2 END2 INDEX) \TEDIT.CREATEW.FROM.REGION (PROPS +PROMPT REGION FILE) GETBOXPOSITION.FROMINITIALREGION (Region Window DisplayStream) +\CHANGECHARSET.HCPYMODE (CHARSET CSINFO CSDINFO) \TYPEP.UFN (X N) L-CASECODE (CHAR) CL:NTH (CL::N LIST +) CL::%%TAN-FLOAT (CL::X CL::SIGN CL::R2) CL:STRING-LESSP (STRING1 STRING2 START1 END1 START2 END2 +INDEX REL-INDEX) \UNWIND.UFN (NEXT N.KEEP PVAR0BASE) \SPP.CREATE.CON (SKT# NSOC CON) +CL::ESTABLISH-PREDICATE (CL::PS CL::PREDICATE) COMPILER::FIND-COPIED-VARIABLE (COMPILER::VAR) +TEDIT.NEXT (STREAM) COMP.COMMENT (A) \CHECKAPPLY* (FN) RETDWIM (ARGS) \HARDRETURN (VAL) +CL:STRING-LEFT-TRIM (STRING LEFT-END) *WHO-LINE-LAST-DIRECTORY* (NAMESTRING) CREATEMDSTYPETABLE ( +SEGMENT) CL:STRING-DOWNCASE (STRING START END) \RPLPTR.UFN (OBJ OFFSET SLOT VAL) OVERLAPPINGWINDOWS ( +WINDOW X) DELETE.LONG.SEGMENT1 (STARTCOL ENDCOL) \LEAF.READPAGES (BUFFERLIST FIRSTPAGE STREAM) \HTFIND + (PTR PROBE CASE GCCNT) PRINTBITMAP (BITMAP FILE) \SCALEDBITBLT.IP (DESTINATION DESTINATION-LEFT OLDX DESTINATION-BOTTOM OLDY SCALE STREAM-SCALE WIDTH HEIGHT CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM -SOURCEBITMAP) BRKDWNCOMPILE2 (FN DEF) \\FINDKEY.UFN (CALLER BLINK IVAR NARGS ARGN KEY) -\\RECLAIMARRAYBLOCK (B BASE N TRAILER) ADD/AND/DISPLAY/LINK (TOND FROMND G WIN) -CL::ESTABLISH-SETFS-AND-OPTIMIZERS (CL::PS CL::SLOT) ERRM-TO-CONDITION (NUM) CL:TERPRI (OUTPUT-STREAM) - CL::SYMBOL-TYPE (CL:SYMBOL) IBLT1 (|BitmapAddr| |Kount| |TextureArray| |ValueArray| |ValHeight| -|XCoord| |ValWidth| |BitmapWidth|) \\RPLPTR.UFN (OBJ OFFSET SLOT VAL) CL:TRUENAME (PATHNAME RESULT) -CL::SET-PARSED-STRUCTURE (CL::NAME CL::PS) CL:SUBSTITUTE-IF (SEQUENCE LENGTH NEWITEM TEST START -FROM-END KEY) LINE.LESSP (ARG1 ARG2) XIPAPPEND.WORD (WORD) SETF-MACRO-FUNCTION (X BODY) \\CONS.UFN (X -A LO CDROFFSET) CL:SIGNUM (CL:NUMBER) CL:TANH (CL:NUMBER CL::FY) IBLT2 (|BitmapAddr| |Kount| -|TextureArray| |ValueArray| |ValHeight| |XCoord| |ValWidth| |BitmapWidth|) UNMAKEHARDCOPYMODESTREAM ( -DISPLAYSTREAM) CL::ARRAY-TYPE (CL:ARRAY CL::RANK CL::SIZE CL::ELT-TYPE) \\BOUT (BYTE) -%GET-TYPE-TABLE-ENTRY (TYPENUMBER) CL:WRITE-BYTE (BINARY-OUTPUT-STREAM INTEGER) CL:NTH (CL::N LIST) -CL:WRITE-LINE (STRING STREAM CL::START CL::END) LISTGET (PROP) SEDIT::UNDO-ATOM-CHANGE (SEDIT::CONTEXT - SEDIT::OLD-VALUE) CL:UNREAD-CHAR (STREAM INPUT-STREAM) \\EVAL (FORM) TWOD.TRACKCURSOR (WINDOW -VERTMARKS ROWPROPS HORZMARKS COLUMNPROPS NEW-ITEM-FN HIGHLIGHT-FN HEIGHT) CL::%RANGE-TYPE (CL::LOW -CL::HIGH CL::BASE-TYPE) CL::%TYPEP-PRED (TYPE) INTCHAR (TABLE LST) \\MEDW.MOVEW (OLDREGION Y) -CL::BIGNUMP (CL::X) CL::%SIMPLE-MEMBER (CL::ITEM LIST) COMPILER::EFFECTS-ANALYZE-GO (COMPILER::NODE) -SI::%STRUCTURE-DECLARE-DATATYPE (CL::NAME CL::WORD-LENGTH CL::FIELD-DESCRIPTORS) -\\DRAWCURVE.PRESS.LINE (BRUSH X1 X2 Y1 Y2 PRSTREAM) SI::DATATYPE-P (SI::NAME) CL:STRING< (STRING1 -STRING2 START1 END1 START2 END2 INDEX REL-INDEX) GETINTERRUPT (CHAR) COMPILER::RELEASE-MV-CALL (COMPILER::NODE -) SEDIT::GET-USER-STRING (SEDIT::CONTEXT SEDIT::PROMPTWINDOW SEDIT::PROMPT SEDIT::DEFAULT) -SETINTERRUPT (HARDFLG) \\INSPECT/CODE/RESHAPEFN (WIN FONT) \\RESTLIST.UFN (CALLER BLINK IVAR FIRSTN -LASTN BASE) CL:WRITE-TO-STRING (OBJECT) \\TYPEGLOBALVARIABLE (TYPENAME VAR) CL::SET-SHARED-SETF-INVERSE - (CL::NAME CL::SHARED-UPDATE-FN) CL::ESTABLISH-PREDICATE (CL::PS CL::PREDICATE) SEDIT::COPY-NODE ( -SEDIT::NODE SEDIT::CONTEXT) COMPILER::META-EVAL-LITERAL (COMPILER::NODE COMPILER:CONTEXT) REHASHFILE ( -NEWNAME VALUETYPE ACCESS) PUTPROP (ATM PROP VAL) COMP.PROGLST (CONTEXT) CL::SUBTYPEP-TYPE-EXPAND (TYPE -) SEDIT::COMPUTE-COMMENT-COLUMN (SEDIT::WINDOW SEDIT::ENVIRONMENT) \\PROCESS.MAKEFRAME (FN ARGS FRAME -FN&ARGS) NUTF8STRINGBYTES (STRING) FB.EXPUNGECOMMAND (FBROWSER TBROWSER ITEM) \\QUEUELENGTH (Q) -FORMAT-PRINT-ORDINAL (N) INSPECT.FLIPSELECTION (WINDOW LEFT BOTTOM WIDTH HEIGHT) HASHLINKS (TRAN) -CL::RANGE<= (CL::TYPE1 CL::TYPE2) FORMAT-PRINT-CARDINAL (N) %LIT-SIZE-TO-SIZE (LIT-SIZE) SPYOBJ.LABEL -(OBJ DATUM) DBG::SET-UP-DEBUGGER-WINDOW (DBG::W) CL::EQUAL-DIMENSIONS (CL::DIMS1 CL::DIMS2) -\\TYPEMASK.UFN (N X) \\INSUREWINDOW (WINDOW) SEDIT::NORMALIZE-SELECTION (SEDIT::CONTEXT SEDIT::SELECTION -) SEDIT::TRANSLATE-CHARS (SEDIT::CHARS STRING SEDIT::ESC SEDIT::MULT-ESC SEDIT::POINT-TYPE) -\\DRAWLINE.UFN (FIRSTBIT XDELTA YDELTA OPERATIONCODE PIXELSINX PIXELSINY YINCR) FMEMB (X) -CL::COMPLETE-META-EXPRESSION-DEFAULTS (TYPE) CL::USEFUL-TYPE-EXPANSION-P (CL::EXPANSION) SEDIT::CONTAINS? - (SEDIT::SELECTION-1 SEDIT::SELECTION-2) \\COURIER.DELDEF (TYPE NAME) COMPILER::META-EVAL-LAMBDA ( -COMPILER::NODE A1644 A1643 COMPILER:CONTEXT) COMP.UNBIND.VARS (F) CL::%APPEND (CL::LIST1 CL::LIST2) -RESULTS (RETURNVALUESFLG) SEDIT::REDO (SEDIT::PROMPTWINDOW) \\FIXDLINES (CH#LIM CH#1 CH#1L DCH) -REMOVETONODES (TONODES TOND) REMPROP (ATM PROP) \\NSRANDOM.WRITEPAGES (BUFFERS FIRSTPAGE# EP HANDLE -FIRSTBYTE) \\MOVETO.IP (IPSTREAM X Y) CL::BASE-SUBTYPEP (CL::TYPE1 CL::TYPE2 CL::SYMBOL-TYPE1 -CL::SYMBOL-TYPE2) \\STKSCAN (VAR ATOM# BASE N CODEBASE OFFSET) \\TYPECHECK.UFN (OBJ TYPEN) CLISPFOR0A -($I.S.OPR LASTPTR) CL::EQUAL-ELEMENT-TYPE (CL::ELEMENT-TYPE-2 CL::ELEMENT-TYPE-1) EQL (X Y) -COMPILER::EFFECTS-ANALYZE-CALL (COMPILER::NODE) \\NSRANDOM.READPAGES (BUFFERS FIRSTPAGE# EP EO) -\\DSPYPOSITION.IP (IPSTREAM) CL:BUTLAST (CL::N LIST CL:LENGTH) WHICHW (X Y) \\MAIKO.ETHER-INTERRUPT ( -NDB TYPE) COMPILER::RELEASE-LAMBDA (COMPILER::NODE COMPILER::VAR COMPILER::OPT-VAR COMPILER::KEY-VAR) -CLISPFOR1 (OPRTAIL END END1) \\PRESSCURVE2 (BRUSHFONT PRSTREAM PRDATA SPLINE DASHING X0 Y0 \#KNOTS -XPOLY X\'POLY |X'''| |X''| X\' X YPOLY Y\'POLY |Y'''| |Y''| Y\' Y) \\RPLCONS (A LO) CL:COPY-ALIST ( -LIST) KNOTLOOP (KNOTS) SEDIT::COMPUTE-SELECTION-POSITION-DEFAULT (SEDIT::START) COMPILER::META-EVAL-IF - (COMPILER::NODE A1636 A1635 A1638 COMPILER:CONTEXT A1637 A1640 A1639) CL:NRECONC (CL::X CL::Y) -COMP.BIND.VARS (ARGS VARNAME DECLARATIONS TYPE) CL:NBUTLAST (CL::N LIST CL:LENGTH CL::INDEX) -BRKDWNSETUP (DEF PTR N BDEF FN) SEDIT::GETKEY (SEDIT::CONTEXT) \\DELETECH (CHLIM CH# \\INFIRSTCH LEN -TEXTLEN PCNON) SPYOBJ.HEIGHT (OBJ STREAM DATUM FH) DBG::CLOSE-DEBUGGER-WINDOW (DBG::W DBG::PROCESS) -DBG::RELEASE-DEBUGGER-WINDOW (DBG::W) XIPAPPEND.BYTE (WHERE BYTE) \\INVERTITEM (COLUMN ROW MENU DSP) -\\MISC8.UFN (ALPHA ARG1 ARG2 ARG3 ARG4 ARG5 ARG6 ARG7 ARG8) CL::GET-PS-FROM-ACCESSOR (CL::ACCESSOR) -\\HTFIND (PTR PROBE CASE GCCNT) COMPILER::EFFECTS-ANALYZE-CATCH (COMPILER::NODE) \\GETBRUSHFONT.PRESS -(LIST1) SEDIT::STRINGIFY-ATOM (SEDIT::NODE) \\WRITEPRINTERPORT.UFN (DATUM) NUTF8CODEBYTES (N) CL:MAPHASH - (CL:HASH-TABLE CL::FN CL::KEY CL::VALUE) FB.MAYBE.EXPUNGE (BROWSER COMMAND) FIND.PROCESS (PROC) -\\ARG0 (N BFLINK) \\ONQUEUE (Q ITEM) \\TFBRAVO.LCASER (WORD LST) \\MAP.ROUTING.TABLE (TABLE MAPFN -ENTRY) SI::INTERNAL-THROW (TAG&VALUES) XCL::%DEFINE-TYPE-GETDEF (TYPE XCL::NAME XCL::DEFN) -SEDIT::COMPUTE-FORMATS-AND-FORMAT-VALUES (SEDIT::NODE SEDIT::CONTEXT SEDIT::SUBNODE) COMPILER::META-EVAL-GO - (COMPILER::NODE COMPILER:CONTEXT) \\RELEASE.IOCB (USE) XCL::%DEFINE-TYPE-DELDEF (TYPE XCL::NAME) -CL::%SIMPLE-SUBST (CL::OLD CL::TREE CL::NEW) COMPILER::EFFECTS-ANALYZE-BLOCK (COMPILER::NODE) CL:ZEROP - (CL:NUMBER) COMP.CHECK.VAR (X) XCL::%DEFINE-TYPE-FILE-DEFINITIONS (XCL::NAME TYPE XCL::NAMES) -CL::%SUBST-IF-NOT (CL::TEST CL::TREE CL::NEW) CL::%COMPLEX-SUBST (CL::TEST CL::OLD CL::TREE CL::NEW) -LISPXUSE1 (VARS ARGS EXPRS) \\GCRECLAIMCELL (CELL) COMPILER::RELEASE-LABELS (COMPILER::NODE COMPILER::BINDING -) GETDEF (NAME NOERROR) CL::CACHE-SETF-INFO (CL::SLOT CL::PS) AWAIT.EVENT (EVENT) \\MISC1.UFN (ALPHA) -UTF8HEXSTRING (CHARCODE) FB.UPDATECOMMAND (BROWSER) \\COPY.N.UFN (ALPHA) MONITOR.AWAIT.EVENT ( -RELEASELOCK EVENT) \\TFBRAVO.PARAMNAMEP (LIS NAME WORD) CL:COPY-TREE (CL::OBJECT) INTERRUPT (INTFN) -SEDIT::UNDO-REPLACE-QUOTE (SEDIT::NODE SEDIT::CONTEXT SEDIT::OLD-VALUE) CL::%SUBST-IF (CL::TEST CL::TREE - CL::NEW) %LLARRAY-MAKE-ACCESSOR-EXPR (TYPENUMBER ENTRY) CL:REVAPPEND (CL::X CL::Y) -CL::GET-SLOT-DESCRIPTOR-FROM-PS (CL::ACCESSOR) PUTDEF (NAME DEFINITION REASON) \\SELECTPROCESS ( -TTYNAME ME MOUSEITEM TITLE) \\PROCESS.GO.TO.SLEEP (TOFX) CL:LDIFF (LIST CL::SUBLIST) -XCL::%DEFINE-TYPE-PUTDEF (XCL::NAME TYPE) SEDIT::SPLIT-LITATOM (STRING SEDIT::NODE SEDIT::START SEDIT::END - CL:LENGTH SEDIT::CONTEXT SEDIT::POINT) FTPGETCODE (STREAM NOCODEP) %AREF1 (ARRAY INDEX BASE-ARRAY) -PUTMENUPROP (PROPERTY VALUE) %ASET1 (ARRAY INDEX BASE-ARRAY NEWVALUE TYPE-NUMBER ROW-MAJOR-INDEX) -\\MISC2.UFN (ALPHA ARG1 ARG2) \\HCPYMODEDSPPRINTCHAR (CHARCODE DD SPACEWIDTH) CL::%COMPLEX-NSUBST ( -CL::TEST CL::OLD CL::NEW) XCL::%DEFINE-TYPE-FILEGETDEF (XCL::SOURCE XCL::VAL XCL::NOTFOUND) -SEDIT::UNDO-LIST-REPLACE (SEDIT::NODE SEDIT::CONTEXT SEDIT::BOUNDS SEDIT::REDOT?) RESET.INTERRUPTS ( -TRIPLE) SELECT.FNS.EDITOR (FN) CL:NSUBST (CL::NEW CL::OLD CL::TREE CL::TEST-NOT CL::TEST CL::KEY) -CL::%NSUBST-IF (CL::TEST CL::NEW) \\DOINTERRUPTHERE (CLASS) \\ATOMCELL (X ATOMNO N LOC OFFSET) -CURRENTINTERRUPTS (TABLE) CL::%NSUBST-IF-NOT (CL::TEST CL::NEW) %LIT-TYPE-TO-TYPE (LIT-TYPE) -INTERRUPTABLE (FLAG) CL::GET-PS-FROM-PREDICATE (CL::PREDICATE CL::VALUE) \\NSRANDOM.TRUNCATEFILE (LO -HANDLE) CL:WRITE-STRING (STRING STREAM CL::START CL::END) APPLYTOSELECTEDNODE (WINDOW) CLISPIF3 ( -ORIGWORDPAIR CLAUSE) CL:NSUBST-IF (CL::NEW CL::TEST CL::TREE CL::KEY) CL:SUBST-IF-NOT (CL::NEW CL::TEST - CL::TREE CL::KEY) CL:TYPE-OF (CL::X) \\CONTROL-T.PRINTRATIO (N STREAM TOTAL LABEL) CL::%SIMPLE-SUBLIS - (CL::TREE CL::A-LIST CL::NEW-CAR CL::NEW-CDR) CL:SUBST-IF (CL::NEW CL::TEST CL::TREE CL::KEY) -\\UNBOXFLOAT3 (OP) \\MISC10.UFN (ALPHA ARG1 ARG2 ARG3 ARG4 ARG5 ARG6 ARG7 ARG8 ARG9 ARG10) -\\MEDW.CREATEW (SCREEN DSP REGION TITLE BORDERSIZE R TWICEBORDER) \\STORE.N.UFN (ALPHA VAL) -\\CANONICAL.NSHOSTNAME (HOST) BRKDWNFBOXES (PTRA1614 VALA1613 BDX BDEXP PTRA1616 VALA1615) -CL::DEFAULT-STRUCTURE-PRINTER (CL::STRUC STREAM) \\P-MISC2.UFN (ALPHA ARG1 ARG2) \\MISC7.UFN (ALPHA -ARG1 ARG2 ARG3 ARG4 ARG5 ARG6 ARG7) CL:PRINC (OBJECT OUTPUT-STREAM) XCL::INTERESTING-FRAME-P (XCL::POS - XCL::NAME) \\PSC.SYMBOLS (STREAM OLDFONT IMAGEDATA CHAR) \\POP.N.UFN (N) CLISPIF1 (L0 L FORM) -CL::%COMPLEX-SUBLIS (CL::TREE CL::A-LIST CL::TEST CL::TEST-NOT-P CL::NEW-CAR CL::NEW-CDR) -CL:NSUBST-IF-NOT (CL::NEW CL::TEST CL::TREE CL::KEY) SEDIT::SET-SELECTION-STRING (TYPE SEDIT::CONTEXT -SEDIT::NODE SEDIT::ITEM SEDIT::OFFSET) \\FTP.FLUSH.TO.EOC (INSTREAM) HASTTYWINDOWP (PROCESS) -GETDESCRIPTORS (TYPENAME) TWODINSPECT.MAKEREGIONS (WINDOW ROWPROPS COLUMNPROPS WINDOWHEIGHT LF SPACE) -CL::%SIMPLE-NSUBLIS (CL::TREE CL::A-LIST) XCL::UNDOHOOK (XCL::FORM XCL::ENV) CL::%COMPLEX-ASSOC ( -CL::TEST CL::ITEM CL::A-LIST) INTERRUPTCHAR (CHAR TYP/FORM HARDFLG TABLE VAL) OPENWP (WINDOW) -SEDIT::SUBNODE-CHANGED-QUOTE (SEDIT::NODE SEDIT::SUBNODE) INSPECT.INVERTREGION (WINDOW LEFT BOTTOM -WIDTH HEIGHT) CL:PRIN1 (OBJECT OUTPUT-STREAM) CONVERT-AFM-FILES (FILE-LIST FNAME) -CL::PRINT-STRUCTURE-INSTANCE (CL::OBJECT STREAM CL::DEPTH) SPYOBJ.GET (STREAM) \\PUTBASEBYTE (PTR) -\\RETCALL (NARGS) \\DRAWARC.PRESS (STREAM CENTERX CENTERY RADIUS STARTANGLE NDEGREES BRUSH DASHING) -GETMENUPROP (MENU PROPERTY) CL::%SIMPLE-NSUBST (CL::OLD CL::NEW) PROCESS.NAME (PROC) TRACE (CL::FN) -COMPILER::RELEASE-IF (COMPILER::NODE) CL::%COMPLEX-NSUBLIS (CL::TREE CL::A-LIST CL::TEST CL::TEST-NOT-P -) CL:SUBLIS (CL::A-LIST CL::TREE CL::TEST-NOT CL::TEST CL::KEY) FORMAT-WRITE-FIELD (STRING STRLEN -MINPAD MINCOL COLINC) CL:SUBST (CL::NEW CL::OLD CL::TREE CL::TEST-NOT CL::TEST CL::KEY) CHARCODEP ( -CHCODE) TMPSUBFN (FN X) COMPILER::META-EVAL-CATCH (COMPILER::NODE A1632 A1631 A1634 COMPILER:CONTEXT -A1633) \\GETBASEBYTE (N PTR) COMP.BINDLIST (VARS VAR) \\PRINT-USING-ADDRESS (X STREAM) -TWODINSPECT.ADJUSTSELECTION (WINDOW ROWPROPS VERTMARKS SELROWPROP FETCHFN DATUM SELCOLPROP COLUMNPROPS - HORZMARKS) FB.COMPILECOMMAND (BROWSER COMPILEOP) CL::STRUCTURE-SLOT-NAMES (CL::PS) -SEDIT::SUBNODE-CHANGED-LIST (SEDIT::NODE SEDIT::SUBNODE SEDIT::CONTEXT) CL::%EQCODEP (CL::TESTFN -CL::KNOWNFN) POSTSCRIPT.GETFONTID (FID SLOPE WEIGHT EXPANSION) \\TEDIT.DELETE (STREAM TEXTOBJ CH# -CHLIM) \\NSRANDOM.SETEOFPTR (NBYTES STREAM NEWEP NEWEO) FIND-EDIT-LOCATION-TAIL (X OTHERS EXPRESSION) -RECORDTRAN (RECORDEXPRESSION WORDTYPE SETQPART SETQTAIL X) UNTRACE (CL::ENTRY CL::FN) \\PSC.SPACEWID ( -CHAR FONTDESC) CLISPIF2 (X) CL:COPY-LIST (LIST) SEDIT::SET-SELECTION-LITATOM (TYPE SEDIT::CONTEXT -SEDIT::NODE SEDIT::ITEM SEDIT::OFFSET) \\FTP.PACK.DIRECTORYNAMEP (PLIST CONNECTION DEVICE DIRECTORY) -SIGNAL (XCL::DATUM XCL::ARGS XCL:*CURRENT-CONDITION*) SEDIT::COMPILE-STRUCTURE (SEDIT::CONTEXT SEDIT::NAME - TYPE SEDIT::BODY SEDIT::PW) COMPILER::META-EVAL-CALL (A1630 A1629 COMPILER::FN COMPILER:CONTEXT -COMPILER::EFFECTS COMPILER::VALUE) \\BLT (NWORDS NN DBASE SBASE) COMP.TOPLEVEL.COMPILE (COMFN RECNAME -CODE FREEVARS OUTER-ALLVARS OUTER-VARS USES-LIST NLAMS1) CL::%COMPLEX-MEMBER (CL::TEST CL::ITEM LIST) -SEDIT::CREATE-NULL-LIST (SEDIT::CONTEXT SEDIT::WIDTH) SPYOBJ.IMAGEBOX (OBJ HEIGHT) \\PUTBITS.UFN (V -N.FD FIRST WIDTH NV) \\DRAWCIRCLE.PRESS (RADIUS CENTERX CENTERY R2RAD BRUSH DASHING STREAM) CL::%FLOAT - (CL::HIWORD CL::LOWORD) CL:NSUBLIS (CL::A-LIST CL::TREE CL::TEST-NOT CL::TEST CL::KEY) ADD1VAR (ADD1X -) COMPILER::RELEASE-GO (COMPILER::NODE) SEDIT::FIND-SELECTION-BACKWARDS (SEDIT::CONTEXT SEDIT::SELECTION - SEDIT::NODE SEDIT::PROMPTWINDOW) \\INSTANCEP.UFN (OBJ) %LLARRAY-MAKE-SETTOR-EXPR (TYPENUMBER ENTRY) -SPYOBJ.SAVE (OBJ STREAM) \\PUTBASE.UFN (X D V) PRINTXIPROUTE (FILE PACKET CONTROL) CL:UNION ( -CL::TEST-NOT CL::TEST CL::LIST2) /SET (NAME VALUE) COMPILER::RELEASE-CATCH (COMPILER::NODE) -SEDIT::FIND-SELECTION (SEDIT::CONTEXT SEDIT::SELECTION SEDIT::NODE SEDIT::PROMPTWINDOW) -\\SLOWHDCPYBLTCHAR (CHARCODE DISPLAYSTREAM CHAR8CODE) \\10MB.GETPACKETLENGTH (IOCB) PRIN3 (FILE STRM X -) /DREMOVE (X) \\ELIDE.PRINT.TAIL (STREAM) |\\PFInitFileDescriptors| (|lastVolNum| |index|) -CL:INTERSECTION (CL::TEST-NOT CL::TEST CL::RESULT) SEDIT::BUILD-NODE (CL:STRUCTURE SEDIT::NODE-TYPE) -COMPILER::META-EVAL-BLOCK (COMPILER::NODE COMPILER:CONTEXT A1628 A1627) PUTHASHFILE (KEY1 KEY HASHFILE -) COMPPRINT (X) CL:NUNION (CL::LIST2) SEDIT::MARKASCHANGEDFN (SEDIT::FORM SEDIT::NAME TYPE) -\\PRINDATUM (OBJECT STREAM R \\NUMSTR \\NUMSTR1 CPL) FONTNAMELIST (FONTDESC) \\VAG2 (H L) SHOWSHADE.IP - (IPSTREAM SHADE OPERATION SCALE ANGLE REGION) CL:SET-DIFFERENCE (CL::TEST-NOT CL::TEST CL::RESULT) -PRINT-CIRCLE-LOOKUP (OBJECT) \\10MB.GETPACKETSTATUS (IOCB) MARKASCHANGED (NAME LST) \\PSC.SPACEDISP ( -STREAM WIDTH) \\ADDBASE (X) FIX89A (N) COMPILER::EFFECTS-UNION (COMPILER::ONE COMPILER::TWO) -SEDIT::SET-POINT-STRING (TYPE SEDIT::CONTEXT SEDIT::NODE SEDIT::OFFSET SEDIT::ITEM SEDIT::COMPUTE-LOCATION? -) PROPRECORD (NAME&FIELDS) FB.OPERATE.ON.FILES (FILELIST) SEDIT::STRINGIFY-QUOTE (SEDIT::NODE -SEDIT::ENVIRONMENT) ONED.TRACKCURSOR (WINDOW MARKS PROPS NEW-ITEM-FN HIGHLIGHT-FN HEIGHT) -FORMAT-PRINT-NAMED-CHARACTER (CHAR CH) \\TEDIT.COPY.PIECEMAPFN (FROMOBJ TOOBJ TEXTOBJ) FETCHFIELD ( -DESCRIPTOR OFFSET FT OFF N WIDTH) SAVESET (X) UNION (X Y) \\MISCN.UFN (ALPHA-BETA MY-IVAR ARG-COUNT -RESULT-IVAR INDEX UFN-ENTRY MY-PARMS-PTR) CL:SUBSETP (CL::TEST-NOT CL::TEST) \\ELIDE.PRINT.ELEMENT ( -STREAM) GETHASHFILE (KEY1 KEY HASHFILE) COMP.TRANSFORM (FORM *BC-MACRO-ENVIRONMENT* VAL) -TRANSMIT.ETHERPACKET (NDB PACKET) EXEC-FORMAT (FORMAT-STRING ARGS) SEDIT::NEW-FUNCTION-BODY ( -SEDIT::DUMMY-BODY) CL:NSET-EXCLUSIVE-OR (CL::TEST-NOT CL::TEST) SPYOBJ.COPY (OBJ) CACCESSFNS ( -NAME&FIELDS) \\ROUTE.XIP (NET X) COMPILER::REMOVE-EFFECT (COMPILER::EFFECTS-REP COMPILER::EFFECT) -CL::SET-SETF-INVERSE (CL::NAME CL::UPDATE-FN) LSH (N) \\SLOWFDIFFERENCE (X Y) COMPILER::RELEASE-CALL ( -COMPILER::NODE) SEDIT::FIND-OBJ (SEDIT::CONTEXT SEDIT::SELECTION SEDIT::WRAP?) -\\CHANGECHARSET.HDCPYDISPLAY (CHARSET HDCPYDSTREAM FD CSINFO) CL:CONCATENATE (RESULT-TYPE) -CL::STRUCTURE-CONSTRUCTOR (CL::STRUCTURE-NAME CL::PS CL::CONSTRUCTOR) CL::SET-SETF-METHOD-EXPANDER ( -CL::NAME CL::EXPANDER) \\SLOWFTIMES2 (X Y) TWODINSPECT.PRINTELEMENT (RIGHT ELT WINDOW BOTTOM FDESCENT) - EDIT-IN-FUNCTION (DEF SEEN NAME) XCL::UNDOABLY-FMAKUNBOUND (CL:SYMBOL) MAKE-KEYWORD (CL:SYMBOL) -LDIFFERENCE (X Y) SEDIT::STRINGIFY-LIST (SEDIT::NODE SEDIT::ENVIRONMENT) ADDTOVAR (X VAR) -COMPILER::ENV-ANALYZE-VAR-REF (COMPILER::NODE) TEDIT.DELETE (STREAM LEN LEAVECARETLOOKS TEXTOBJ) -\\UNBOXFLOAT2 (OP) \\FILLINXIP (TYPE DESTHOST) \\BITBLT.IP (DESTINATION DESTINATIONLEFT OLDX -DESTINATIONBOTTOM OLDY STREAMSCALE WIDTH HEIGHT DESTWIDTH DESTHEIGHT CLIPPEDSOURCELEFT -CLIPPEDSOURCEBOTTOM SOURCEBITMAP) CL:PAIRLIS (CL::KEYS CL::DATA CL::A-LIST) ATTACH (X) CLISPIF (FORM -FNSLST0 VARSLST0) MAKE-SEQUENCE-OF-TYPE (BROAD-TYPE LENGTH TYPE) SEDIT::SET-POINT-LITATOM (TYPE -SEDIT::CONTEXT SEDIT::NODE SEDIT::ITEM SEDIT::COMPUTE-LOCATION?) %AREF2 (ARRAY I J BASE-ARRAY -ROW-MAJOR-INDEX) OPT.INITHASH (X H) \\COURIER.CHECK.PROCEDURES (DEFS) %ASET2 (ARRAY I J BASE-ARRAY -NEWVALUE TYPE-NUMBER ROW-MAJOR-INDEX) APPENDTOVAR (X VAR PAIR) CL:VECTOR (ARGS VECTOR) DEFINE (X) -LINEY (DX DY Y0 X0) CL:COPY-SEQ (SEQUENCE) DEFINEQ (X) CHANGEPROP (X PROP1 PROP2) FIX89 (N FORM C) -MAKE-VECTOR (SIZE ELEMENT-TYPE FATP VECTOR INITIAL-ELEMENT) DSUBST (NEW) FIND-EDIT-LOCATION (SEEN -DEFINITION) \\SLOWFPLUS2 (X Y) DEFLIST (PROP) ATOMRECORD (NAME&FIELDS) ENCAPSULATE.ETHERPACKET (NDB -PACKET PDH NBYTES ETYPE) \\UNBOXFLOAT1 (OP) GO.TO.ADDRESSING (ROW COL ABSROW) YSECT (DU DY DX DV X0 Y0 - U0 V0) WBREAK (ON) XYSECT (DU DY DX DV X0 Y0 U0 V0) VECTOR-LENGTH (VECTOR) \\BOXIDIFFERENCE (X LX) -\\HDCPYBLTCHAR (CHARCODE DISPLAYSTREAM CHAR8CODE) %MAKE-ARRAY-TYPE-TABLE (TYPE-ENTRY LIT-TYPE -SIZE-ENTRY LIT-TABLE) EVERY (EVERYFN1) OPT.RESOLVEJUMPS (PROP FN) CL:PRIN1-TO-STRING (OBJECT) -\\FINDPIECE (PC PCTB NODE) CL::%LIST-MAP-OPTIMIZER (CL::FN CL::COLLECT-P CL::NCONC-P CL::LISTS) -SEDIT::SELECT-SEGMENT-LITATOM (SEDIT::SELECTION SEDIT::NODE SEDIT::ITEM SEDIT::OFFSET) CL:MAKE-SEQUENCE - (TYPE LENGTH INITIAL-ELEMENT VECTOR) \\MISC3.UFN (ALPHA ARG1 ARG2 ARG3) FB.LOADCOMMAND (BROWSER -LOADOP) \\SLOWFQUOTIENT (X Y) \\MISC4.UFN (ALPHA ARG1 ARG2 ARG3 ARG4) SEDIT::SET-SELECTION-QUOTE ( -SEDIT::INDEX TYPE SEDIT::ITEM SEDIT::SELECTION SEDIT::CONTEXT SEDIT::NODE) \\PUTBASEPTR.UFN (X D V) -CL:SET-EXCLUSIVE-OR (CL::TEST-NOT CL::TEST CL::RESULT) COMPILER::ENV-ANALYZE-UNWIND-PROTECT (COMPILER::NODE -) INTERSECTION (Y) COMPILER::RELEASE-BLOCK (COMPILER::NODE) SEDIT::FIND-NODE-SUBSTRUCTURE-BACKWARDS ( -SEDIT::NODE SEDIT::SUBNODES SEDIT::SUBLENGTH) EDIT-IN-FNS (DEF SEEN NAME) CL:SUBSEQ (SEQUENCE LENGTH) -SEDIT::BUILD-INTERNAL-STRUCTURE (SEDIT::ROOT STRING CL:STRUCTURE) MEMBER (X) GREATERP (X Y) -COMP.RETFROM.POINT (COMFN DEF RECNAME) CL:NTHCDR (CL::N LIST) SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::NODE -) EXEC-EVAL (ID PROMPT) FB.SEEBUTTONFN (MENU MENUW ITEM WINDOW) CL:MAKE-LIST (CL::SIZE) ADD-EXEC ( -XCL::REGION XCL::HANDLE) SEDIT::SET-SELECTION-LIST (SEDIT::ITEM TYPE SEDIT::SELECTION SEDIT::CONTEXT -SEDIT::NODE) GETLIS (X PROPS) ARRAYRECORD (NAME&FIELDS) TCONC (X) %MAKE-CML-TYPE-TABLE (TYPE-ENTRY -CMLTYPE ARRAY-TABLE) LISTPUT1 (LST PROP VAL) OPT.COMPILERERROR (MESS1 MESS2) %SETELT (INDEX SEQUENCE) -LISTGET1 (PROP) \\POSTSCRIPT.ACCENTFN (STREAM CHAR STRING) <= (CL::ARGS) CL:CONSP (X) SEDIT::SCAN-STRING - (STRING SEDIT::READ-TABLE CL:LENGTH SEDIT::FONT SEDIT::ESC-CHAR SEDIT::NODE) CL:ARRAY-ELEMENT-TYPE ( -ARRAY) PARSERELATION (RELATION Y) SEDIT::ATOM-CHANGE-RELINEARIZE (SEDIT::CONTEXT CL:STRUCTURE) -\\COURIER.CHECKDEF (DEF NAME TAIL) COMPILER::CONSTRUCT-PROG1-TREE (COMPILER::PROG1-VAR CL:REST -COMPILER::PROG1-VAR-REF COMPILER::NEW-LAMBDA CL:FIRST) \\DISPLAYLINE (TEXTOBJ WINDOW LINE HCPYDS -OLDCACHE DS TEXTLEN THISLINE BASEA1590 LOOKS BASEA1591 BASEA1592 CHLIST BASEA1593 WLIST BASEA1594 -BASEA1595 LEADERFONT DOTWIDTH WINDOWDS) COMP.ATTEMPT.COMPILE (TOPFN DEF RECNAME COMFNS) -CL::TYPE-EXPANDER (CL::SYMBOL-TYPE TYPE CL::DEFTYPE-FORM) BRKDWNRESULTS (LABEL TOT TERP) -TEDIT.PROMPTPRINT (MSG) COMPILER::ENV-ANALYZE-THROW (COMPILER::NODE) CL:MAPCAR (CL:FUNCTION LIST) -DEBUGGER (\\TERM.OFD BRKCOND BRKENV XCL::INPUT XCL::ENV) \\MAIKO.CONSOLE-LOG-PRINT (MESSAGE-BUFFER) -TEDIT.UNDO.PARALOOKS (TEXTOBJ OLDLOOKSLIST CH# SEL) CL::%MAPCAR-MULTIPLE (CL::LISTS) FIX/SCALE ( -PARAMVALUE V SCALE) CL::%SET-NTH (CL::N) XSECT (DU DY DX DV X0 Y0 U0 V0) BREAK-FUNCTION (XCL::FN-TO-BREAK - XCL::REBREAK? XCL::FN XCL::WHEN-EXPR XCL::ORIGINAL XCL::ORIGINAL-DEF XCL::MIDDLE-MAN) -SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE-BACKWARDS (SEDIT::CONTEXT SEDIT::STR SEDIT::SCOPE SEDIT::TOP -SEDIT::PROMPTWINDOW) COMPILER::ENV-ANALYZE-TAGBODY (COMPILER::NODE COMPILER::SEGMENT COMPILER::STMT) -ENTER-DEBUGGER-P (CONDITION) UPDATEFN (TYPE IFCANT) SEDIT::ASSIGN-FORMAT-NIL (SEDIT::NODE SEDIT::SUBNODE - SEDIT::CONTEXT) \\COURIER.CHECK.ERRORS (DEFS) MAP2CAR (MAPFN1) GTHASHFILE (WRITE) BYTEBLOCKCOMPILE2 ( -BLKNAME BLKDEFS ENTRIES INTERNALBLKFNS) CL::%MAPLIST-MULTIPLE (CL::LISTS) UNBREAK (XCL::ENTRY XCL::FN) - CL:ELT (INDEX SEQUENCE) MAPCON (MAPFN1) DBG::SIMPLE-REPORT-CONDITION (STREAM) \\BOXIPLUS (X LX) -MAPCAR (MAPFN1) \\POSTSCRIPT.ACCENTPAIR (STREAM IMAGEDATA CHAR STRING ACCENTS UNDER-ACCENTS FONT) -\\CREATEPIECEORSTREAM (PARALOOKS LOOKS) \\STRINGWIDTH.HCPYDISPLAYAUX (STR FONT SPACEWIDTH CHARCODE -STRING CC) MAP2C (MAPFN1) SEDIT::REPLACE-STRING (SEDIT::CONTEXT SEDIT::NODE STRING SEDIT::CHARS SEDIT::END - SEDIT::START SEDIT::POINT TYPE) SEDIT::FIND-NODE-SUBSTRUCTURE (SEDIT::NODE SEDIT::END SEDIT::SUBNODES -) COMPILER::FIND-SEGMENT (CL:TAGBODY COMPILER::TAG) CL:MAPC (CL:FUNCTION LIST) LSUBST (OLD NEW) -MAPCONC (MAPFN1) SEDIT::SET-POINT-QUOTE (SEDIT::POINT SEDIT::CONTEXT SEDIT::NODE TYPE -SEDIT::COMPUTE-LOCATION? SEDIT::ITEM) ONEDINSPECT.MAKEREGIONS (WINDOW ROWPROPS WINDOWHEIGHT LF -VALUESPACE) ASSOCRECORD (NAME&FIELDS) CL::%MAPC-MULTIPLE (CL::LISTS) TTPROMPTCHAR (LINE) -SEDIT::SET-POINT-UNKNOWN (SEDIT::POINT SEDIT::CONTEXT SEDIT::NODE SEDIT::OFFSET SEDIT::COMPUTE-LOCATION? -) CL::%ATAN-FLOAT (CL::Y CL::FY) COMPILER::EXPAND-NESTED-PROGNS (COMPILER::NODE-LIST COMPILER::NODE) -CL:MAPLIST (CL:FUNCTION LIST) MAPC (MAPFN1) NLEFT (L TAIL) SELECT.ATOM.ASPECT (ATOM) CL:MAPL ( -CL:FUNCTION LIST) TEDIT.UNDO.LOOKS (OLDLOOKSLIST \\INPC CH# SEL) CL:REPLACE (SEQUENCE1 SEQUENCE2 -LENGTH1 LENGTH2 START1 START2 SUBLEN1 SUBLEN2) NOTEVERY (EVERYX EVERYFN1 EVERYFN2) CL::TYPE-EXPAND ( -CL::FORM) NOTANY (SOMEX SOMEFN1 SOMEFN2) SEDIT::SET-POINT-LIST (SEDIT::NODE SEDIT::ITEM -SEDIT::NUMBER-SUBNODES SEDIT::CONTEXT SEDIT::COMPUTE-LOCATION?) ONEDINSPECT.ADJUSTSELECTION (WINDOW -ROWPROPS VERTMARKS SELPROP FETCHFN DATUM) SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE (SEDIT::CONTEXT SEDIT::STR - SEDIT::SCOPE SEDIT::TOP SEDIT::PROMPTWINDOW) RATOMS (FILE RDTBL A) CL:MAPCAN (CL:FUNCTION LIST) -PUTASSOC (ALST KEY VAL) \\POSTSCRIPT.SPECIALOUTCHARFN (STREAM CHAR) CL::%MAPCAN-MULTIPLE (CL::LISTS) -SEDIT::PRINT-GAP (STREAM SEDIT::GAP) SEDIT::REPLACE-CHARS (SEDIT::CHARS SEDIT::END SEDIT::START -SEDIT::DELTA-LENGTH TYPE SEDIT::STRING-ITEM SEDIT::FONT SEDIT::PRIN-2? CL:LENGTH SEDIT::NODE SEDIT::POINT - NV SEDIT::DELTA-WIDTH) \\FTP.RECOGNIZEFILE (NAME OPTION RECOG DESIREDPROPS) PRINTHISTORY1 (EVENT FILE - X FL NOVALUES) CL::%MAPL-MULTIPLE (CL::LISTS) PLUS (N) COMPILER::ENV-ANALYZE-SETQ (COMPILER::NODE) -\\BIGNUM.PLUS (X Y) COMPILER::TEST-ANNOTATION (COMPILER::FN COMPILER::TREE) CL:MAPCON (CL:FUNCTION -LIST) RPT (RPTF) NUMBERPAD.HELDFN (ITEM) \\HANDLE.RAW.OTHER (PACKET) TTYIN.PPTOFILE (STREAM RDTBL -*STANDARD-OUTPUT* EXPRS) FILL/GRAPHNODE/LABEL (STREAM LEFT NBW BOTTOM WIDTH HEIGHT) -\\NSFILING.SET.CONTINUANCE (SECONDS) CL::%EVERY-MAP-OPTIMIZER (CL::FN) RPTQ (RPTZ) CLISPATOM (CLST -PARENT) LOGAND (N) MAPLIST (MAPFN1) CL::%MAPCON-MULTIPLE (CL::LISTS) EDITCALLERS (FILE PATTERN COMS) -EXEC-PRINT (VALUE) FIX-SUBR-NAME (NAME) LOGOR (N) TEDIT.SELECTED.PIECES (SEL PCTB CHLIM CH1 INSERTPC -FNARG1 FNARG2) RESET/NODE/LABELSHADE (TRANS SHADE) SHOWBITMAP1.IP (XBYTES YPIXELS XPIXELS BITMAP -HEIGHT REGIONBOTTOM FIRSTROW IPSTREAM SCALEFACTOR TOTALBYTES LEFT SCRATCHBM) \\BIGNUM.LOGOR (X Y) -\\POSTSCRIPT.PRINTSLUG (STREAM IMAGEDATA CHAR) \\CHTOPCNO (PCTB CH#) FIXCONTINUE (FN) LOGXOR (N) -SEDIT::MAKE-GAP (SEDIT::ITEM) \\GETFTPCONNECTION (HOST H) GETRELATION (RELATION ITEM TABLE) -SEDIT::REPLACE-QUOTE (SEDIT::SUBNODES SEDIT::CONTEXT SEDIT::NODE) ITIMES (N) \\TEDIT.INSERT.PIECES ( -CH# TOPCTB TOLEN START-OF-PIECE) \\10MB.CREATENDB (ETHERTASK#) IPLUS (N) \\VECFONTINIT (BRUSH WIDTHS) -\\BIGNUM.TIMES (X Y) \\BIGNUM.DIFFERENCE (X Y) SELECT (.SELEC.) TEDIT.REDO.PARALOOKS (TEXTOBJ EVENT -SEL NEWLOOKS) \\HDCPYDISPLAY.FIX.YPOS (HARDCOPYSTREAM) TIMES (N) \\BIGNUM.LOGAND (X Y) -COMPILER::CLOSURE-ANNOTATE-UNWIND-PROTECT (COMPILER::NODE COMPILER::IN-LOOP-P) +SOURCEBITMAP) ASSOC (KEY) CL:STRING-GREATERP (STRING1 STRING2 START1 END1 START2 END2 INDEX REL-INDEX) + \BSP.FLUSHINPUT (STREAM) \SETGLOBALVAL.UFN (V) CL:STRING<= (STRING1 STRING2 START1 END1 START2 END2 +INDEX REL-INDEX) SI::INTERNAL-THROW (TAG&VALUES) COMPILER::COPY-VARIABLE (COMPILER::BINDER) ADDTOFILE +(NAME NEAR LISTNAME F) COMP.QUOTE (A) CL:STRING-UPCASE (STRING START END) GETDEFN (A) +\BSP.PREPARE.OUTPUT (TIMER) CL::%%GET-TIMING-INFO (CL::TIME-BEFORE CL::TIME-AFTER) CL:STRING< (STRING1 + STRING2 START1 END1 START2 END2 INDEX REL-INDEX) \RPLACD.UFN (RP.Q A D) TWODINSPECT.BUTTONEVENTFN ( +WINDOW W RP CP DATUM SELECTEDROWPROP SELECTEDCOLUMNPROP) TEDIT.CREATEW (PROMPT PROPS FILE) SHOWREGION +(REGION STREAM) \TEDIT.ABBREV.EXPAND (STREAM) SEDIT::STRUCTURE-FROM-SELECTION (SEDIT::SELECTION SEDIT::NODE +) \CONS.UFN (X A LO CDROFFSET) \LEAF.TRUNCATEFILE (OPUP STREAM LASTOFF) CL::TIME-CALL (CL::TIME-BEFORE + CL::TIME-DO-NOTHING CL::TIME-AFTER CL::OUTPUT CL::REPEAT CL::TIMED-FORM CL::DATA-TYPES) GROW/REGION ( +REGION) CL:MAPHASH (CL:HASH-TABLE CL::FN CL::KEY CL::VALUE) CL::%%SIMPLE-ASSOC (CL::ITEM CL::A-LIST) +NEWDEFC (NM DF) CL:STRING/= (STRING1 STRING2 START1 END1 START2 END2 INDEX) CL::SYMBOL-TYPE (CL:SYMBOL +) BSPPEEKBIN (STREAM NOERRORFLG) CL:STRING-TRIM (STRING LEFT-END RIGHT-END) FMEMB (X) BITBLT.DELETE (X + WIDTH Y MOVEDWIDTH) CL::GET-PS-FROM-ACCESSOR (CL::VALUE CL::ACCESSOR) CL:STRING-RIGHT-TRIM (STRING +RIGHT-END) RETDWIM1 (L $TAIL $CURRTAIL X) CL::%%SIMPLE-MEMBER (CL::ITEM LIST) CHAT.SENDSCREENPARAMS ( +INSTREAM HEIGHT WIDTH) SPY.COPYBUTTON (WINDOW) TEDIT.SUBSTITUTE (TEXTSTREAM REPLACEMENT CONFIRM? +YESLIST) \FINDKEY.UFN (CALLER BLINK IVAR NARGS ARGN KEY) \LEAF.SETFILEINFO (ATTRIBUTE DEV) CL::BIGNUMP + (CL::X) SEDIT::INSERT-COMMENT (SEDIT::WHERE SEDIT::NODE SEDIT::POINT) \CREATECELL (TYP) INTCHAR ( +TABLE LST) \TRANSLATE.10TO3 (NDB X Y NSADDR) \TEDIT.GET.CHARLOOKS (FILE FLAGS LOOKSARRAY N WIDTH) +CL:TANH (CL:NUMBER CL::FY) \DSPYPOSITION.IP (IPSTREAM) CL:SUBSTITUTE-IF-NOT (SEQUENCE LENGTH NEWITEM +TEST START FROM-END KEY) CL::ARRAY-TYPE (CL:ARRAY CL::RANK CL::SIZE CL::ELT-TYPE) +CL::GET-PS-FROM-PREDICATE (CL::PREDICATE CL::VALUE) SETINTERRUPT (HARDFLG) \BOUT (BYTE) CL::%%TYPEP-PRED + (TYPE) CL:STRING-NOT-LESSP (STRING1 STRING2 START1 END1 START2 END2 INDEX REL-INDEX) INTERRUPTCHAR ( +CHAR TYP/FORM HARDFLG TABLE VAL) REHASHFILE (NEWNAME VALUETYPE ACCESS) CL::GET-SLOT-DESCRIPTOR-FROM-PS + (CL::ACCESSOR) \NOTE.10TO3 (NDB PUPADDRESS X Y NSADDR HOST BOX) CL:STRING-NOT-GREATERP (STRING1 +STRING2 START1 END1 START2 END2 INDEX REL-INDEX) \RESTLIST.UFN (CALLER BLINK IVAR FIRSTN LASTN BASE) +XCL::GET-WHERE-IS-ENTRIES (XCL::TAIL) GETINTERRUPT (CHAR) CL::CACHE-SETF-INFO (CL::SLOT CL::PS) +SEDIT::DELETE-COMMENT (SEDIT::NODE SEDIT::START SEDIT::END) CL:SUBSTITUTE-IF (SEQUENCE LENGTH NEWITEM +TEST START FROM-END KEY) \MISCN.UFN (ALPHA-BETA MY-IVAR ARG-COUNT RESULT-IVAR INDEX UFN-ENTRY +MY-PARMS-PTR) CL::%%RANGE-TYPE (CL::LOW CL::HIGH CL::BASE-TYPE) CL::%%APPEND (CL::LIST1 CL::LIST2) +CL:SUBSTITUTE (SEQUENCE LENGTH NEWITEM OLDITEM START FROM-END KEY TEST-NOT TEST) \RPLCONS (A LO) +CL:SUBTYPEP (CL::TYPE1 CL::TYPE2) \BRUSHCONVERT.HCPYMODE (BRUSH BB) LISTGET (PROP) CL:COPY-TREE ( +CL::OBJECT) \EVAL (FORM) \RTP.SOCKET.PROCESS (BSPSOCKET) CL:ZEROP (CL:NUMBER) +CL::PRINT-STRUCTURE-INSTANCE (CL::OBJECT STREAM CL::DEPTH) \FTP.FLUSH.TO.MARK (INSTREAM) \INSUREWINDOW + (WINDOW) FIND.PROCESS (PROC) \SIN.OLD (X) CL:COPY-ALIST (LIST) CL:NRECONC (CL::X CL::Y) +CL:WRITE-TO-STRING (OBJECT) \TYPECHECK.UFN (OBJ TYPEN) CL::COMPLETE-META-EXPRESSION-DEFAULTS (TYPE) +CL:REVAPPEND (CL::X CL::Y) CL:STRING>= (STRING1 STRING2 START1 END1 START2 END2 INDEX REL-INDEX) +\STKSCAN (VAR ATOM# CODEBASE OFFSET) PUTDEFN (FN SIZE CA BASE BLOCKINFO) CL:NBUTLAST (CL::N LIST +CL:LENGTH CL::INDEX) CL:STRING> (STRING1 STRING2 START1 END1 START2 END2 INDEX REL-INDEX) +TWODINSPECT.COPYBUTTONFN (WINDOW W RP CP) \DOINTERRUPTHERE (CLASS) CL:BUTLAST (CL::N LIST CL:LENGTH) +\MISC8.UFN (ALPHA ARG1 ARG2 ARG3 ARG4 ARG5 ARG6 ARG7 ARG8) CL::EQUAL-DIMENSIONS (CL::DIMS1 CL::DIMS2) +CL:LDIFF (LIST CL::SUBLIST) CL:UNREAD-CHAR (INPUT-STREAM) WHICHW (X Y) \UNBOXFLOAT3 (OP) SI::DATATYPE-P + (SI::NAME) CL::BASE-SUBTYPEP (CL::TYPE1 CL::TYPE2 CL::SYMBOL-TYPE1 CL::SYMBOL-TYPE2) COMPILER::COPY-NODE-LIST + (COMPILER::NODES COMPILER::NODE) CL:WRITE-LINE (STRING STREAM CL::START CL::END) COMP.COND (HERE +CONTEXT END) \TYPEMASK.UFN (N X) CL::SUBTYPEP-TYPE-EXPAND (TYPE) TOPWP (WINDOW) +CL::DEFAULT-STRUCTURE-PRINTER (CL::STRUC STREAM) \INBETWEENP (X LFT RGHT) CL:WRITE-BYTE ( +BINARY-OUTPUT-STREAM INTEGER) \LEAF.GENERATEFILES (DEVICE PATTERN DESIREDPROPS OPTIONS) CL:WRITE-STRING + (STRING STREAM CL::START CL::END) CL::STEP-SLEEP (CL::FUNCTIONS) \SELECTPROCESS (TTYNAME ME MOUSEITEM + TITLE) RECORDALLOCATIONS (DECS X) CL:TYPE-OF (CL::X) CL::USEFUL-TYPE-EXPANSION-P (CL::EXPANSION) +\ELIDE.PRINT.TAIL (STREAM) TTYIN.READ?=ARGS (TTSCRATCHFILE) EQL (X Y) \FTP.FLUSH.TO.EOC (INSTREAM) +\PRINDATUM (OBJECT STREAM R \NUMSTR \NUMSTR1 CPL) ICONW.PRINT-JUSTIFIED (REG STREAM FONT REAL-FONT +OPERATION TEXT BREAKCHARS JUST LEFTOVER MAXCHAR OLDCLIP) CL:TRUENAME (PATHNAME RESULT) +\BITBLT.HCPYMODE (SOURCEBITMAP SOURCELEFT SOURCEBOTTOM DESTSTRM WIDTH HEIGHT SOURCETYPE OPERATION +TEXTURE CLIPPINGREGION CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM) \DRAWLINE.UFN (FIRSTBIT XDELTA YDELTA +OPERATIONCODE PIXELSINX PIXELSINY YINCR) \LEAF.GETFILENAME (DEV DEVINFO NAME RECOG) PFI.INDEX.BREAK ( +OLDY Y NOTERPRI) FETCHFIELD (DESCRIPTOR OFFSET FT OFF N WIDTH) \PROCESS.MAKEFRAME (FN ARGS FRAME +FN&ARGS) CHAT.LOGINFO (INSTREAM HOST NAME) \STORE.N.UFN (ALPHA VAL) \MISC7.UFN (ALPHA ARG1 ARG2 ARG3 +ARG4 ARG5 ARG6 ARG7) CL::%%COMPLEX-SUBST (CL::TEST CL::OLD CL::TREE CL::NEW) COMPILER::COPY-NODE-VAR-REF + (COMPILER::NODE) \COPY.N.UFN (ALPHA) CL::%%SIMPLE-SUBST (CL::OLD CL::TREE CL::NEW) GETDESCRIPTORS ( +TYPENAME) \MAIKO.CONSOLE-LOG-PRINT (MESSAGE-BUFFER) CLISPATOMARE2 (L) TWODINSPECT.CLOSEFN (WINDOW) +CL::STRUCTURE-SLOT-NAMES (CL::PS) EDITMOVEREGION (Window) \ARG0 (N BFLINK) FIND.SYMBOL (STRING LENGTH +HASH PACKAGE EHASH HEAD A0348 A0350 A0346) CL::EQUAL-ELEMENT-TYPE (CL::ELEMENT-TYPE-2 CL::ELEMENT-TYPE-1 +) CL:SUBST-IF-NOT (CL::NEW CL::TEST CL::TREE CL::KEY) CLISPATOMIS2 ($TYP) +TWODINSPECT.DEFAULT.VALUECOMMANDFN (SETMENU INSPECTMENU ROWPROP COLUMNPROP WINDOW) INTERRUPT (INTFN) +\ELIDE.PRINT.ELEMENT (STREAM) SEDIT::SUBSTITUTE-OBJ (SEDIT::CONTEXT SEDIT::SELECTION) AWAIT.EVENT ( +EVENT) CREATE.NEW.NODEPOSITION (Node deltaX OldPos deltaY) CL::%%SUBST-IF (CL::TEST CL::TREE CL::NEW) +PRIN3 (FILE STRM X) CL::%%SIN-FLOAT (CL::X CL::SIGN CL::R2) CREATEBSPSTREAM (SOCKET OTHERPUPHANDLER +ERRORHANDLER IOTIMEOUT IOTIMEOUTFN WHENCLOSEDFN) CHAT.FLUSH&WAIT (INSTREAM) MONITOR.AWAIT.EVENT ( +RELEASELOCK EVENT) CL:SUBST-IF (CL::NEW CL::TEST CL::TREE CL::KEY) PRINT-CIRCLE-LOOKUP (OBJECT) +COMPILER::COPY-NODE-UNWIND-PROTECT (COMPILER::NODE) UPDATEFILES (PRLST FLST PREVITEMS) \MOVETO.IP ( +IPSTREAM X Y) CL:TERPRI (OUTPUT-STREAM) CL:PRIN1 (OBJECT OUTPUT-STREAM) \PRINT-USING-ADDRESS (X STREAM +) SEDIT::COPY-STRUCTURE-COMMENT-WORD (SEDIT::NEW-STRING) \TEDIT.SUBST.FN2 (TRIALSTART# END# TEXTOBJ) +\PROCESS.GO.TO.SLEEP (TOFX) LISTFILES1 (FILE PRINTOPTIONS) CL::%%NSUBST-IF (CL::TEST CL::NEW) +SEDIT::CREATE-NEW-COMMENT (SEDIT::CONTEXT SEDIT::WIDTH) XCL::%%DEFINE-TYPE-GETDEF (TYPE XCL::NAME +XCL::DEFN) CURRENTINTERRUPTS (TABLE) GETDEF (NAME NOERROR) CL::RANGE<= (CL::TYPE1 CL::TYPE2) +CL::%%SIMPLE-NSUBST (CL::OLD CL::NEW) CL:NSUBST-IF (CL::NEW CL::TEST CL::TREE CL::KEY) +DINFO.INVERT.NODE (WINDOW DINFO.NODE) WHO-LINE-CURRENT-DIRECTORY (CONNECTED-DIRECTORY DIR-NAME) +COMPILE-IN-CORE (fn-type fn-name) CL:PRINC (OBJECT OUTPUT-STREAM) CL:NSUBST (CL::NEW CL::OLD CL::TREE +CL::TEST-NOT CL::TEST CL::KEY) BRKDWNRESULTS1 (NLST PTR N) RESET.INTERRUPTS (TRIPLE) DINFO.SHOWGRAPH ( +GRAPHER.GRAPH DINFO.GRAPH GRAPH.REGION GRAPH.WINDOW WINDOW.REGION LEFT BOTTOM HEIGHT WIDTH) CL:COPY-LIST + (LIST) \FTP.CLEANUP (INTERVAL TIMER PROC) SETBSPUSERINFO (STREAM VALUE) DINFO.LAYOUTGRAPH (NODE ID +NODELST CHILDREN CHILD GRAPHER.NODE PARENT SIBLINGS SIBLING PARENT.GRAPHER.NODE SIBLING.GRAPHER.NODES +CHILD.GRAPHER.NODES FONT) \MISC1.UFN (ALPHA) PRINT-BITMAPS-NICELY (BITMAP WIDTH BITS-PER-PIXEL HEIGHT) + CL:NSUBST-IF-NOT (CL::NEW CL::TEST CL::TREE CL::KEY) COMPILER::COPY-NODE-THROW (COMPILER::NODE) +INTERRUPTABLE (FLAG) FIND.PACKAGE (NAME ITEM HA BASEA0286) CL::%%COMPLEX-NSUBST (CL::TEST CL::OLD +CL::NEW) CL::%%NSUBST-IF-NOT (CL::TEST CL::NEW) CL::%%COMPLEX-SUBLIS (CL::TREE CL::A-LIST CL::TEST +CL::TEST-NOT-P CL::NEW-CAR CL::NEW-CDR) XCL::HASH-FILE-WHERE-IS (TYPE XCL::ENTRY XCL::NAME) +\GCRECLAIMCELL (CELL) TWODINSPECT.DEFAULT.TITLECOMMANDFN (WINDOW TITLEMENU DATUM) MAKE-KEYWORD ( +CL:SYMBOL) WHO-LINE-COPY-INSERT (X TTY-WINDOW) \CONTROL-T.PRINTRATIO (N STREAM TOTAL LABEL) +\WRITEBITMAP (BITMAP FILE OFD W) CL::%%STATS-OBJECT-DIFFERENCE (CL::BEFORE CL::AFTER +CL::AFTER-TIME-BLOCK CL::BEFORE-TIME-BLOCK) COMPILER::MAKE-LAP-VAR (COMPILER::VAR) +CL::STRUCTURE-CONSTRUCTOR (CL::STRUCTURE-NAME CL::PS CL::CONSTRUCTOR) FW-WIPE (OFD) \PRINTBINARYBITMAP + (STREAM BITMAP W) COMPILE.FILE.RESET (ROOTNAME) CL::%%SUBST-IF-NOT (CL::TEST CL::TREE CL::NEW) +\WRITEPRINTERPORT.UFN (DATUM) CL::%%COMPLEX-ASSOC (CL::TEST CL::ITEM CL::A-LIST) CL::%%SIMPLE-SUBLIS ( +CL::TREE CL::A-LIST CL::NEW-CAR CL::NEW-CDR) BSPINPUTSTREAM (STREAM) PROCESS.NAME (PROC) +XCL::%%DEFINE-TYPE-FILE-DEFINITIONS (XCL::NAME TYPE XCL::NAMES) CL:SUBST (CL::NEW CL::OLD CL::TREE +CL::TEST-NOT CL::TEST CL::KEY) PUTDEF (NAME DEFINITION REASON) CL::%%COMPLEX-NSUBLIS (CL::TREE +CL::A-LIST CL::TEST CL::TEST-NOT-P) BRKDWNRESULTS2 (X NAME TEM NCALLS TOT) \RETCALL (NARGS) +CL::SET-SETF-METHOD-EXPANDER (CL::NAME CL::EXPANDER) %%AREF1 (ARRAY INDEX BASE-ARRAY) BRKDWNCOMPILE2 ( +FN DEF) CHARCODEP (CHCODE) \MAIKO.ETHER-INTERRUPT (NDB TYPE) XCL::%%DEFINE-TYPE-FILEGETDEF (XCL::SOURCE + XCL::VAL XCL::NOTFOUND) %%ASET1 (ARRAY INDEX BASE-ARRAY NEWVALUE TYPE-NUMBER ROW-MAJOR-INDEX) +\MISC2.UFN (ALPHA ARG1 ARG2) CL:NSUBLIS (CL::A-LIST CL::TREE CL::TEST-NOT CL::TEST CL::KEY) CL:SUBLIS +(CL::A-LIST CL::TREE CL::TEST-NOT CL::TEST CL::KEY) \DASHINGCONVERT.HCPYMODE (DASHING) \POP.N.UFN (N) +DO?CMD.ERRORHANDLER (CONDITION) OPENWP (WINDOW) CL::%%EQCODEP (CL::TESTFN CL::KNOWNFN) TRANSGRAPH ( +GRAPH N X Y) \ATOMCELL (X ATOMNO N LOC OFFSET) HASTTYWINDOWP (PROCESS) SEDIT::COPY-SELECTION-COMMENT ( +SEDIT::SELECTION SEDIT::CONTEXT SEDIT::NODE SEDIT::POINT STREAM SEDIT::PROMPTWINDOW) \GETBASEBYTE (N +PTR) CL::%%COMPLEX-MEMBER (CL::TEST CL::ITEM LIST) \LEAF.REOPENFILE (ACCESS FDEV NAME RECOG) +CLISPATOMARE1 (X FLG) \INSTANCEP.UFN (OBJ) BSPBIN (STREAM) ADD.CHAT.MESSAGE (STREAM MSG) +CL::SET-SETF-INVERSE (CL::NAME CL::UPDATE-FN) CL::%%SIMPLE-NSUBLIS (CL::TREE CL::A-LIST) HRULE.COPYFN +(IMAGEOBJ TOSTREAM) \BLT (NWORDS NN DBASE SBASE) XCL::%%DEFINE-TYPE-PUTDEF (XCL::NAME TYPE) +XCL::%%DEFINE-TYPE-DELDEF (TYPE XCL::NAME) \MISC10.UFN (ALPHA ARG1 ARG2 ARG3 ARG4 ARG5 ARG6 ARG7 ARG8 +ARG9 ARG10) COERCETOBITMAP (BMSPEC) \P-MISC2.UFN (ALPHA ARG1 ARG2) CL:CONCATENATE (RESULT-TYPE) +CLISPCAR/CDR2 (X) \PUTBASEBYTE (PTR) OPENRTPSOCKET (CONNID TIMEOUT) VECTOR-LENGTH (VECTOR) +\FDIFS/FROM/DERIVS (NSTEPS DZ RAD DDZ DDDZ) CGETWINDOWPROP (WINFORM PROP) \PUTBASE.UFN (X D V) +COMPILE.FILE.APPLY (FORM PROP) DO.INSERT.LINE (WIDTH) CHANGE-TTY-PROCESS-INTERACTIVELY (PROC X Y) +\BITBLT.IP (DESTINATION DESTINATIONLEFT OLDX DESTINATIONBOTTOM OLDY STREAMSCALE WIDTH HEIGHT DESTWIDTH + DESTHEIGHT CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM SOURCEBITMAP) \PUTBASEPTR.UFN (X D V) LOOKUP-SYMBOL +(TABLE VEC SXHASH LEN HASH ENTRY-HASH SYMBOL-NAME STRING H2) XCL::INTERESTING-FRAME-P (XCL::POS XCL::NAME +) MAKE-SEQUENCE-OF-TYPE (BROAD-TYPE LENGTH TYPE) TTYIN.PRINTARGS (FN EQUALS ARGTYPE) \LEAF.EVENTFN ( +FDEV EVENT-TYPE) \PUTBITS.UFN (V N.FD FIRST WIDTH NV) CL:UNION (CL::TEST-NOT CL::TEST CL::LIST2) +UNMAKEHARDCOPYMODESTREAM (DISPLAYSTREAM) \ADDBASE (X) COMPILER::COLLECT-CODE (COMPILER::NODE COMPILER:CONTEXT +) CL:VECTOR (ARGS VECTOR) GETBSPUSERINFO (STREAM) \VAG2 (H L) CL:COPY-SEQ (SEQUENCE) +COMPILER::COPY-NODE-TAGBODY (COMPILER::NODE COMPILER::NEW-TAGBODY COMPILER::SEGMENT) COMP.FUNCTION (A) + /DREMOVE (X) CWINDOWPROP (FORMTAIL) MAKE-VECTOR (SIZE ELEMENT-TYPE FATP VECTOR INITIAL-ELEMENT) UNION + (X Y) COMPILE-FILE-EX/IMPORT (FORM LCFIL RDTBL) CL:ARRAY-ELEMENT-TYPE (ARRAY) CL:SET-DIFFERENCE ( +CL::TEST-NOT CL::TEST CL::RESULT) CREATETEXTUREFROMBITMAP (BITMAP W H) HRULE.PUTFN (HRULE +OUTPUT.STREAM) EXEC-FORMAT (FORMAT-STRING ARGS) PRINTROUTINGTABLE (TB X Y ENTRY) CL:NSET-EXCLUSIVE-OR +(CL::TEST-NOT CL::TEST) CLISPATOMIS1 (SUBJ X OBJ ALST) MARKASCHANGED (NAME LST) CL:ELT (INDEX SEQUENCE +) \TEDIT.FIND.WC1 (TRIALEND# TEXTOBJ END#) \LEAF.DIRECTORYNAMEP (HOST/DIR DEV) ENDBSPSTREAM (STREAM +TIMEOUT) GETPROMPTWINDOW (MAINWINDOW STRWIDTH MAINWIDTH) \BSP.PREPARE.INPUT (TIMER) +CHAT.CLOSE.CONNECTION (INSTREAM OUTSTREAM) CL:SUBSETP (CL::TEST-NOT CL::TEST) CL:INTERSECTION ( +CL::TEST-NOT CL::TEST CL::RESULT) CL::%%PRINT-TIMING-INFO (CL::STATS-OBJECT STREAM CL::TIME-BLOCK) +COMP.PUNT (EM) SIGNAL (XCL::DATUM XCL::ARGS XCL:*CURRENT-CONDITION*) OLD.FIND.SYMBOL (OFFST LEN BASE +NEWATOM) ADD1VAR (ADD1X) GETDEF.I.S.OPR (Y) CL:MAKE-SEQUENCE (TYPE LENGTH INITIAL-ELEMENT VECTOR) +CL:NUNION (CL::LIST2) ADDTOVAR (X VAR) BRKDWN1 (LST BLOCK A) CL:MAKE-LIST (CL::SIZE) PUTHASHFILE (KEY1 + KEY HASHFILE) CL:SET-EXCLUSIVE-OR (CL::TEST-NOT CL::TEST CL::RESULT) \BLTSHADE.HCPYMODE (TEXTURE +STREAM WIDTH HEIGHT OPERATION CLIPPINGREGION) APPENDTOVAR (X VAR PAIR) SYMBOL.PACKAGE (N INDEX) +SETUP-WHOLINE-TIMER (OLD-TIMER) DUMPI.S.OPRS (X Y) SEDIT::CLOSE-NODE-COMMENT (SEDIT::NODE) +TWODINSPECT.ROWPROPWIDTH (ROWPROPS FONT) \FIRSTNODE (TREE) GETHASHFILE (KEY1 KEY HASHFILE) +COMPILER::COPY-NODE-SETQ (COMPILER::NODE) \LEAF.FORCEOUTPUT (STREAM) SEDIT:GET-FORMAT (SEDIT::FNAME) +\TEDIT.MARK.LINES.DIRTY (CH1 CHLIM CHLIM# CH#) \FTP.ADD.USERINFO (HOST INFO) CL::%%SQRT-COMPLEX (CL::Z + ABS CL:PHASE) \BSP.CLEANUP.INPUT (PUP SOCKET) RECORDACCESS (X NEWVALUE) LDIFFERENCE (X Y) RESULTS ( +RETURNVALUESFLG) CL:SUBSEQ (SEQUENCE LENGTH) COMPILER::COPY-NODE-RETURN (COMPILER::NODE) +\READBINARYBITMAP (BMW BMH BPP) /SET (NAME VALUE) CL:NTHCDR (CL::N LIST) \FINDPIECE (PC PCTB NODE) +SEDIT::COMPUTE-POINT-POSITION-COMMENT (SEDIT::CONTEXT SEDIT::NODE) ATTACH (X) SAVESET (X) <= (CL::ARGS +) CL:PAIRLIS (CL::KEYS CL::DATA CL::A-LIST) BRKDWNFORM (LST STAT X SETFORM PTR) CHANGEPROP (X PROP1 +PROP2) SEDIT::GET-USER-STRING (SEDIT::CONTEXT SEDIT::PROMPTWINDOW SEDIT::PROMPT SEDIT::DEFAULT) +CHAT.DEACTIVATE.WINDOW (WINDOW TITLE) WINDOWADDFNPROP (WINDOW PROP ITEMTOADD) SPYOBJ.DISPLAY (STREAM +OBJ HEIGHT) COMPILE-FILE-SETF-SYMBOL-FUNCTION (FORM LCFIL) DINFO.HISTORIC.UPDATE (ITEM MENU WINDOW ID +GRAPH $$OUTPUT SEL) %%SETELT (INDEX SEQUENCE) BMOBJ.DISPLAYFN (IMAGEOBJ IMAGE.STREAM STREAM-SCALE +DESCENT STREAMTYPE CACHE BITMAP) UnixPrint (HOST PRINTOPTIONS PRINTER) DEFINE (X) ADDTOCOMS (COMSNAME +NAME NEAR LISTNAME) CL::%%SET-NTH (CL::N) CL::%%SQRT-FLOAT (CL::SIGN CL:EXP CL::HI CL::LO) FTPGETCODE +(STREAM NOCODEP) LSH (N) CL::TYPE-EXPAND (CL::FORM) DEFINEQ (X) COMPILER::COPY-NODE-PROGV (COMPILER::NODE +) COMP.APPLYFNP (X) \SLOWFPLUS2 (X Y) SYMBOL.PNAME (N) POSTSCRIPTSEND (HOST FILE PRINTOPTIONS) +CL::TYPE-EXPANDER (CL::SYMBOL-TYPE TYPE CL::DEFTYPE-FORM) DWIM-SYMBOL-PACKAGE (SYM) CL:RASSOC (CL::ITEM + CL::A-LIST CL::TEST-NOT CL::TEST CL::KEY) TRACE (CL::FN) \SLOWFDIFFERENCE (X Y) +TWODINSPECT.COLUMNWIDTHS (COLUMNPROPS DATUM ROWPROPS COLUMNPROP FETCHFN FONT) BSPHELP (MSG) +DOWINDOWCOM (ARGS) \SLOWFTIMES2 (X Y) UNTRACE (CL::ENTRY CL::FN) REMWINDOWPROP (PROP) CL:PRIN1-TO-STRING + (OBJECT) \LEAF.RENAMEFILE (OLD-DEVICE OLDFILE NEW-DEVICE NEWFILE) \SLOWFQUOTIENT (X Y) +COMPILE.FILE.DEFINEQ (FORM) CL::%%LIST-MAP-OPTIMIZER (CL::FN CL::COLLECT-P CL::NCONC-P CL::LISTS) +DEFLIST (PROP) BRKDWNSETUP (DEF PTR N BDEF FN) FIND.START.OF.WORD (X CH) \UNBOXFLOAT2 (OP) +SEDIT:RESET-FORMATS (SEDIT::DONT-REPARSE?) MBUTTON.FIND.NEXT.FIELD (TEXTOBJ CH# PCTB) CLISPCAR/CDR1 (N +) \UNBOXFLOAT1 (OP) SET-READTABLE-INTERACTIVELY (NAME VALUE X Y READTABLE) BITMAPTEDITOBJ (BITMAP +SCALEFACTOR ROTATION DESCENT) GETLIS (X PROPS) SPYOBJ.LABEL (OBJ DATUM) %%ASET2 (ARRAY I J BASE-ARRAY +NEWVALUE TYPE-NUMBER ROW-MAJOR-INDEX) DSUBST (NEW) SEDIT::COMMENT-LENGTH (SEDIT::NODE +SEDIT::NUMBER-OF-SUBNODES) %%AREF2 (ARRAY I J BASE-ARRAY ROW-MAJOR-INDEX) TCONC (X) ARCTAN (X) +ATTACHMENU (MENU EDGE MAINWINDOW POSITIONONEDGE NOOPENFLG) CLISPATOM2C (Y X) INTERSECTION (Y) +HRULE.IMAGEBOXFN (IMAGE.STREAM HRULE RIGHT.MARGIN CURRENT.X WIDTHS SCALE) \RTP.HANDLE.INPUT (BSPSOCKET + PUPSOC) GREATERP (X Y) SPYOBJ.HEIGHT (OBJ STREAM DATUM FH) MEMBER (X) EVERY (EVERYFN1) TTSETCURSOR ( +COL ROW) \BOXIPLUS (X LX) BRKDWNFBOXES (PTRA0716 VALA0715 BDX BDEXP PTRA0718 VALA0717) SHOWSHADE.IP ( +IPSTREAM SHADE OPERATION SCALE ANGLE REGION) SEDIT::CFV-COMMENT (SEDIT::CONTEXT SEDIT::WIDTH) +\BOXIDIFFERENCE (X LX) \TEDIT.REOPEN.STREAM (PIECESTREAM TEXTSTREAM PCTB NEWSTREAM) \CURVESLOPE (KNOTS + %#KNOTS) \HCPYMODEDSPPRINTCHAR (CHARCODE DD SPACEWIDTH) LISTPUT1 (LST PROP VAL) \CURVEEND (A +NEWXA0633 NEWYA0632 DX DY) CL:REPLACE (SEQUENCE1 SEQUENCE2 LENGTH1 LENGTH2 START1 START2 SUBLEN1 +SUBLEN2) \CREATEPIECEORSTREAM (PARALOOKS LOOKS) LISTGET1 (PROP) \LEAF.BREAKCONNECTION (DEVICE S) +HRULE.GETFN (INPUT.STREAM) \MISC3.UFN (ALPHA ARG1 ARG2 ARG3) RECORD.FIELD.VALUE (FIELDNAME) +INSURE.WINDOW (WIN?) CL:MAPCAR (CL:FUNCTION LIST) \TFBRAVO.PARSE.PROFILE.VALUE (INCHES POINTSPERINCH) +SAMECLOOKS (FEATURES CLOOK1 CLOOK2) LSUBST (OLD NEW) COMPILE.CHECK.ARGTYPE (AT X ATYPEPAIR) +CL::%%MAPCAR-MULTIPLE (CL::LISTS) BMOBJ.IMAGEBOXFN (IMAGEOBJ BITMAPOBJ IMAGE.STREAM BITMAP STREAMTYPE +SCALE DESCENT) IDLE.BITMAP (REGION WIDTH HEIGHT FONT) SYMBOL.VALUE (SYMBOL LOC) +SEDIT::COMPUTE-SELECTION-POSITION-COMMENT (SEDIT::CONTEXT SEDIT::NODE SEDIT::START SEDIT::START-SUBNODE + SEDIT::END-SUBNODE) IPLUS (N) GET-TWOD-DISPLAYW (WHERE DISPLAYWINDOW FONT DATUM FETCHFN STOREFN +VALUECOMMANDFN ROWPROPCOMMANDFN COLUMNPROPCOMMANDFN TITLECOMMANDFN ROWPROPS COLUMNPROPS PROFILE) +\BIGNUM.PLUS (X Y) \MISC4.UFN (ALPHA ARG1 ARG2 ARG3 ARG4) TEDIT.SUBLOOKS (OLDLOOKSLIST NEWLOOKSLIST +TEXTSTREAM TEXTOBJ PCTB A SEL FIRSTPC OLDLOOKS FEATURELIST) MAP2C (MAPFN1) PLUS (N) CL::%%LOG-FLOAT ( +CL::SIGN CL::HI CL::LO CL::Z CL::Z2) \FM.EDIT-STRINSERT (STRING N CHAR) \FTP.PACK.DIRECTORYNAMEP ( +PLIST CONNECTION DEVICE DIRECTORY) SPYOBJ.IMAGEBOX (OBJ HEIGHT) \BIGNUM.DIFFERENCE (X Y) +COMPILER::COPY-NODE-PROGN (COMPILER::NODE) COMP.BOOL (END) MAPC (MAPFN1) \10MBSETUPRECEIVER (NDB +PACKET) PFI.LOOKUP.NAME (NAME TYPE) \TFBRAVO.ASSERT (X Y) PFI.SORT.INDICES (Y ROWDIF) MAP2CAR (MAPFN1) + ARGTYPE.STATE (X) CL::STEP-PRINT (CL::FORM) \BIGNUM.COMPARE (X Y) DEBUGGER (\TERM.OFD BRKCOND BRKENV +XCL::INPUT XCL::ENV) MAPCON (MAPFN1) TEDIT.OBJECT.CHANGED (STREAM OBJ PC OBJECT) LOGAND (N) MAPCAR ( +MAPFN1) \INIT.RTPPROCESS (PROC) TEDIT.PUT.PCTB (TEDIT.PUT.FINISHEDFORMS FORM) \BIGNUM.LOGAND (X Y) +MAPLIST (MAPFN1) CL::%%PRINT-RANDOM-STATE (CL::STATE STREAM CL::PRINT-LEVEL) LOGOR (N) +\FM.EDIT-STRDELETE (STRING N M) MAPCONC (MAPFN1) \BIGNUM.LOGOR (X Y) CL::%%MAPLIST-MULTIPLE (CL::LISTS +) \TEDIT.SET.SEL.LOOKS (OPERATION) CL::%%MAPC-MULTIPLE (CL::LISTS) MAKE.LOCAL.ATOM (ATM.NAME PKG.NAME) + LOGXOR (N) CLISPBROADSCOPE (CONTEXT $TYP) NLEFT (L TAIL) GET-TOPW (DISPLAYWINDOW TOPWINDOW FONT) +\BIGNUM.LOGXOR (X Y) GTHASHFILE (WRITE) \TEDIT.PARSE.SEARCHSTRING (TEDIT.WILDCARD.CHARACTERS) +UNCOPYATOM (N) ITIMES (N) ADD-EXEC (XCL::REGION XCL::HANDLE) CLISPBROADSCOPE1 (CONTEXT) \CURVESTART (X + Y) GET-CORNERW (DISPLAYWINDOW FONT CORNERWINDOW) SPYOBJ.COPY (OBJ) \BIGNUM.TIMES (X Y) +SEDIT::FIND-SELECTION-BACKWARDS (SEDIT::CONTEXT SEDIT::SELECTION SEDIT::NODE SEDIT::PROMPTWINDOW) +ENTER-DEBUGGER-P (CONDITION) NOTEVERY (EVERYX EVERYFN1 EVERYFN2) CL::%%RANDOM (CL::STATE CL:ARRAY) +\TEDIT.FLUSH.UNUSED.LOOKS (CHARLOOKS PARALOOKS) TIMES (N) \BSP.OTHERBOUT (STREAM BYTE) NOTANY (SOMEX +SOMEFN1 SOMEFN2) TEDIT.LOOKS (STREAM TEXTOBJ LEN NEWLOOKS) CL::%%MAPCAN-MULTIPLE (CL::LISTS) +COMPILER::COPY-NODE-MV-PROG1 (COMPILER::NODE) RATOMS (FILE RDTBL A) \BIGNUM.QUOTIENT (Y X) CL:MAPC ( +CL:FUNCTION LIST) CL:MAPLIST (CL:FUNCTION LIST) PUTASSOC (ALST KEY VAL) \RTP.ACTION (EVENT PUP) +\SETUPGETCH (TEXTOBJ CH# PCTB START-OF-PIECE) QUOTIENT (X Y) EXEC-EVAL (ID PROMPT) \MAP.ROUTING.TABLE +(TABLE MAPFN ENTRY) \TAN-FLOAT (X) SPYOBJ.GET (STREAM) COMP.EVQ (X) FIND.LINE (BUF) NU\TOTOPWDS (DS +NOTOTOPFNFLG) CL:MAPCON (CL:FUNCTION LIST) TAN (X XX) COMPILE-FILE-WALK-FUNCTION (FORM) +CL::%%MAPCON-MULTIPLE (CL::LISTS) DINFO.UPDATE.FROM.MENU (MENU ITEM) CL:CONSP (X) \PUTBASEFIXP.UFN ( +BASE OFFST) \FM.EDIT-GETPOINTERINFO (LEFT STRING FONT) CHAT.BIN (OUTSTREAM) RPT (RPTF) CL:MAPCAN ( +CL:FUNCTION LIST) COMPILER::COPY-NODE-MV-CALL (COMPILER::NODE) UNBREAK (XCL::ENTRY XCL::FN) +CL::%%EVERY-MAP-OPTIMIZER (CL::FN) FRPTQ (RPTZ) COPYATOM (N BASE OFFST) COMP.CPI1 (ARGS N) +\BIGNUM.REMAINDER (X Y) COMPILER::COPY-NODE-OPCODES (COMPILER::NODE) RPTQ (RPTZ) TWODINSPECT.RESHAPEFN + (WINDOW) WHITESPACE-CHAR-P (CH) SEDIT::FIND-SELECTION (SEDIT::CONTEXT SEDIT::SELECTION SEDIT::NODE +SEDIT::PROMPTWINDOW) CL::%%MAPL-MULTIPLE (CL::LISTS) TRANSMIT.ETHERPACKET (NDB PACKET) +\TEDIT.CHANGE.LOOKS (STREAM CH# LEN START-OF-PIECE PCNO1 PCNON NLOOKSAVE) RECURSIVELY-ANALYZE (ARGLIST + PATH ERRLOC WHOLE) INTERLISP-NLAMBDA-FUNCTION-P (X) CL:MAPL (CL:FUNCTION LIST) RSH (X N) +HRULE.DISPLAYFN (HRULE RULEWIDTH IMAGE.STREAM WIDTHS SCALE X) \TELERAIDBREAK (KEYNUMBER) +CENTERPRINTINREGION (STREAM EXP PRIN2FLG) MINUSP (CL:NUMBER) SEDIT::BACKSPACE-COMMENT (SEDIT::CONTEXT +SEDIT::NODE) CLOSERTPSOCKET (TIMEOUT) ILESSP (Y X) IMINUS (X) BREAK-FUNCTION (XCL::FN-TO-BREAK +XCL::REBREAK? XCL::FN XCL::WHEN-EXPR XCL::ORIGINAL XCL::ORIGINAL-DEF XCL::MIDDLE-MAN) SUB1 (X) +\CHANGECHARSET.HDCPYDISPLAY (CHARSET HDCPYDSTREAM FD CSINFO) SELECT1 (M) \10MBRAWENCAPSULATE (LENGTH) +ZEROP (X) SELECT (.SELEC.) DINFO (WINDOW.OR.REGION GRAPH.OR.FILE W NO.FREEMENU? SETUP.ONLY?) ADD1 (X) +SELECTC (M SELCQ) \CHTOPCNO (PCTB CH#) CLISPATOM2A (PARENT) PFI.COMPUTE.INDEX.SHAPE (INDEXPAIRS P +INDEXNOWIDTH INDEXLEN) GCD (N2 N1) \TEDIT.SUBST.FN1 (TEXTOBJ TARGETLIST START# END#) +\OPENLEAFCONNECTION (HOST SEQUIN TIMEOUT) SOME (SOMEFN1) CL::%%MAKE-RANDOM-ARRAY (CL::SEED1 CL::SEED2 +CL::X CL::RANDOM-LIST) IEQP (X Y) SETQQ (X Y) CL::%%NOT-INTEGER-ERROR (CL::OBJECT) \BITMAPSIZE.IP ( +DIMENSION BITMAP) XCL::ADJUST-IMPLICIT-KEY-HASH (XCL::OLD-IK-TABLE XCL::NEW-IK-TABLE) +\BIGNUM.INTEGERLENGTH (X) CLISPATOM1B (L1) STRMEMB (X) \RTP.SHOW.FAILURE (REASON) SPYOBJ.SAVE (OBJ +STREAM) SET-PACKAGE-INTERACTIVELY (X Y) SUBSET (MAPFN1) \TFBRAVO.PARSE.PROFILE.PARA (IN PARAEND +TEXTOBJ) ANALYZE-REST (ARGLIST CL:KEYWORD PATH ERRLOC BODY DECLS) SUB1VAR (SUB1X) CL::STEP-FORM ( +CL::RESULTS) CL::STEP-EVAL (CL::RESULTS) SPY.PRINT (X) FSETVAL (VAL) COMPILEMODE (X) +CHARLOOKS.FROM.FONT (FONT) TEDIT.SCANSEL (STREAM TEXTOBJ) TOPW.RESHAPEFN (WINDOW) CHARPOS (STREAM) +SEDIT::FIND-OBJ (SEDIT::CONTEXT SEDIT::SELECTION SEDIT::WRAP?) \HDCPYBLTCHAR (CHARCODE DISPLAYSTREAM +CHAR8CODE) INTERLISP-FORMAT-P (STREAM) TTSKIPSEPR (END CH) \10MBRAWTRANSMIT (NDB PACKET) FLOAT ( +CL:NUMBER) \FM.EDIT-DELETE (REGION PIVOT BOTTOM HEIGHT SI::$PROG1-FIRST-EXPRESSION$) CHAT.SCREENPARAMS + (WINDOW A HEIGHT WIDTH TITLE CHAT.STATE) ERSETQ (ERSETX) COMPILER::COPY-NODE-LITERAL (COMPILER::NODE) + COMP.CPI (ARGS FN) ENCAPSULATE.ETHERPACKET (NDB PACKET PDH NBYTES ETYPE) CL::%%/ (CL::X CL::Y) +PUSH-KEYWORD-BINDING (VARIABLE ERRLOC) NLSETQ (NLSETX) CL::STEP-COMMAND (CL::FORM CL::ENVIRONMENT +CL::VALUE) REMAINDER (X Y) ARCSIN (X) SHOWBITMAP1.IP (XBYTES YPIXELS XPIXELS BITMAP HEIGHT +REGIONBOTTOM FIRSTROW IPSTREAM SCALEFACTOR TOTALBYTES LEFT SCRATCHBM) FREMAINDER (X Y) CLISPATOM2 (X +CLISPCLASS) LESSP (Y X) \SIN-FLOAT (X) \TEDIT.FIND.WC (TEXTOBJ TARGETLIST START# END#) WALK-TEMPLATE ( +XCL::TEMPLATE) COPY.SEGMENT (START END) \FTP.FIX.BROKEN.INPUT (INSTREAM FULLNAME POS PROPS) MINUS (X) +CL::%%EXPT-FLOAT-INTEGER (CL::POWER CL::BASE) ARCCOS (X XX) CHAT.LOGIN (HOST WINDOW STATE OPTION +OSTYPE X) XNLSETQ (XNLSETQX XNLSETFLG XNLSETFN) WINDOWADDPROP (WINDOW PROP ITEMTOADD) FMINUS (X) +COMPILER::COPY-NODE-LAMBDA (COMPILER::NODE COMPILER::NEW-LAMBDA COMPILER::VAR COMPILER::OPT-VAR +COMPILER::KEY-VAR) CL:CHAR-NAME (CHAR) RESETLST (RESETX) \ATMIN (N WIDTH LEN STREAM) RANDSET (N Z) +WALK-FORM-INTERNAL (XCL::FORM XCL::CONTEXT) CL:INT-CHAR (INTEGER) SEDIT::FIND-NODE-SUBSTRUCTURE-BACKWARDS + (SEDIT::NODE SEDIT::SUBNODES SEDIT::SUBLENGTH) \SLOWHDCPYBLTCHAR (CHARCODE DISPLAYSTREAM CHAR8CODE) +CURRENT-TTY-PACKAGE (PACKAGE) IDATE (*STR* UCHAR START) RESETSAVE (RESETX FORM) DASSEM.ASMAJ (OP) +SEDIT::FIND-NODE-SUBSTRUCTURE (SEDIT::NODE SEDIT::END SEDIT::SUBNODES) \FM.EDIT-WORDDELETE (STRING +SI::$PROG1-FIRST-EXPRESSION$) RESETFORM (RESETZ) \TEDIT.FONTCOPY (FONT TEXTOBJ OLDFAMILY OLDSIZE) +BSPFRNADDRESS (STREAM) CL::%%EXPT-INTEGER (CL::POWER CL::BASE) \FM.EDIT-BACKUP ( +SI::$PROG1-FIRST-EXPRESSION$) \FTP.RECOGNIZEFILE (NAME OPTION RECOG DESIREDPROPS) COMPILER::COPY-NODE-LABELS + (COMPILER::NEW-LABELS COMPILER::NODE) TEDIT.COPY.PARALOOKS (STREAM DEST TEXTOBJ) COMP.ANONP (E) +RESETVARS (RESETX) MERGEINSERT (NEW X) DASSEM.DSTOREFN (X) \BSP.HANDLE.INPUT (PUPSOC LOCK) +INITUFNTABLE (OP) IMOD (N) CL:CODE-CHAR (BITS FONT CODE) COMP.NOSIDEEFFECTP (EXP) CL:CHAR-CODE (CHAR) +WRITE-STRING* (STRING END START STREAM) CHECK-PARAMETER-NAME (ERRLOC) \BSP.DEFAULT.ERROR.HANDLER ( +ERRCODE SOCKET) CL:CHAR-INT (CHAR) CHARACTER.PRINT (CHAR STREAM) \TELERAIDRELEASE (NDB PACKET) +\FTP.OPEN.CONNECTION (HOST FAILURESTRING ECHOSTREAM) \10MBRAWRECEIVE (NDB METADEBUGGING STATUS) +PutUnboxed (PTR NUM) \HCPYMODEDISPLAYINIT (STREAM) RESETVAR (RESETX RESETY RESETZ) CL:CHAR-BIT (NAME) +CL:CHAR-BITS (CHAR) CL:CHAR-FONT (CHAR) WORD.MATCHES.BUFFER (START BUFTAIL TABLE CH WORD) +PRINT-READER-ENVIRONMENT (ENV STREAM) POWEROFTWOP (X) SEDIT:SEDIT (SEDIT::PROPS SEDIT::NAME TYPE +SEDIT::OPTIONS) \STRINGWIDTH.HCPYDISPLAYAUX (STR FONT SPACEWIDTH CHARCODE CC) CL:GRAPHIC-CHAR-P (CHAR) + CL:MOD (CL:NUMBER CL::DIVISOR CL::FX CL::FY) XCL::IMPLICIT-KEY-REHASH (XCL::FROM-TABLE XCL::TO-TABLE +XCL::FROM-BASE XCL::FROM-LAST-INDEX) CL:NAME-CHAR (NAME) CLISPATOM1A (TAIL) GETSCREENPOSITION (CURSOR) + DUMPDATABASE1 (VALUE) CH.RETRIEVE.DOMAIN.ACL (WHICH.LIST AUTH) ERRORX (ERRORPOS) SETY.IP (IPSTREAM Y) + TEDIT.MAKESEL (STREAM CH# LEN POINT TEXTOBJ) \GS.INITBUF (BUF BUFSIZE) RPLNODE (A D) +\NSRANDOM.RELEASE.LOCK (SESSION) CL:SET-CHAR-BIT (NAME) ODDP (INTEGER) EDITTOGGLELABEL (W GRAPH DS) +PASTEFROMCLIPBOARD (STR) FMIN (K) LOAD? (ROOT LDFLG PRINTFLG) CL:DIGIT-CHAR (FONT WEIGHT RADIX) +TEDIT.SELECT (TEXTOBJ X Y WINDOW REGION WORDSELFLG SELOPERATION EXTENDING TEXTLEN) +COMPILER::ENV-PROCLAIMED-SPECIAL-P (COMPILER::NAME COMPILER:ENV) CL:MAKE-CHAR (BITS FONT CHAR) +SI::ADVICE-HASDEF (SI::NAME) PRINT-LOADED-FILE-INFORMATION (STRING FILE) LOADCOMP? (FILE FULLNAME +LDFLG) FILESLOAD (FILES) GEQ (X Y) TEDIT.SUBPARALOOKS (OLDLOOKSLIST NEWLOOKSLIST TEXTSTREAM TEXTOBJ +PCTB A SEL FIRSTPC OLDLOOKS FEATURELIST) \TEDIT.FINDAGAIN (TEXTSTREAM TEXTOBJ SEL) LOADCOMP (FILE NAME + VAL FULLNAME LDFLG) \ITEMW.CLEARSELECTION (INSPECTW) IGEQ (X Y) \INSPECTW.REDISPLAYPROP (WINDOW +PROPERTY DATUM NEWVALUE) FLESSP (Y X) \COURIER.ATTENTIONFN (BYTE DSTYPE) \CIRCSHADE.XSCAN.IP (STREAM +TEXTURE OPERATION R CX CY) CL::ASSIGN-STRUCTURE-REPRESENTATION (CL::PS) SCALE/TONODES (NODE SCALE) +ILEQ (X Y) \3MBRAWTRANSMIT (PBI) GENSYM? (X) ADD.BORDER.TO.BITMAP (BITMAP NBITS WIDTH REAL.NBITS +HEIGHT TEXTURE) COMPILER::COPY-NODE-IF (COMPILER::NODE) IMAX (K) COMP.LINKCALLP (FN) RPAQQ (X Y) +CL:ALPHANUMERICP (CHAR) TB.MAP.ITEMS (BROWSER MAPFN ITEM) SETATOMVAL (X Y) TEDIT.SET.SEL.LOOKS ( +OPERATION WASON) COMPILER::ENV-PROCLAIM-SPECIAL (COMPILER::NAME COMPILER:ENV) IMIN (K) SI::ADVICE-DELDEF + (SI::NAME) COMPLEX-COMPARE-BACKWARD (END1 END2 LEN1 LEN2) GETBOXSCREENPOSITION (BOXWIDTH BOXHEIGHT +ORGX ORGY WINDOW PROMPTMSG) VALUEOF (LINE) CL:BOTH-CASE-P (CHAR) SEDIT::REPLACE-STRING (SEDIT::CONTEXT + SEDIT::NODE STRING SEDIT::CHARS SEDIT::END SEDIT::START SEDIT::POINT TYPE) CLBINARYMINUS? ($TAIL) ROT + (N FIELDSIZE NA0615 N.B X) SI::GET-DESCRIBERS (TYPE) BRKDWNRESULTS (LABEL TOT TERP) LEQ (X Y) RPAQ? ( +RPAQX RPAQY) LOADFROM (FILE LDFLG) \GETBRUSH (BRUSH) SETYREL.IP (IPSTREAM) MAX (K) +\NSFILING.HANDLE.ERROR (SESSION LOCK FILENAME) ADJUSTLINE (IDEALLENGTH) RPAQ (RPAQX RPAQY) +CL:DIGIT-CHAR-P (CHAR CODE RADIX) COMPILER::COPY-NODE-GO (COMPILER::NODE) MIN (K) COMP.CLEANFNOP (FN +TYPE) \MACOUTCHARFN (CHARCODE STREAM) PRINT-LISP-INFORMATION (FILE STRING) FILL/GRAPHNODE/LABEL ( +STREAM LEFT NBW BOTTOM WIDTH HEIGHT) \PUTBASEFLOATP (BASE OFFST VAL) FB.UNDELETEALLCOMMAND (BROWSER) +OCTALSTRING (N \NUMSTR \NUMSTR1) READ-FILECREATED (STREAM) BREAKDOWN (X BLOCK) FORMAT-EXP-AUX (NUMBER) + \GETBASEFLOATP (BASE OFFST) INSPECTW.REPLACE (INSPECTW STOREFN DATUM PROPERTY NEWVALUE) COMPILER::CHECK-ARG + (COMPILER::VAR) DMPHASH (L ARRAYNAME A ITEM VAL) MAKE-NETWORK-TRACE-WINDOW (STREAMVAR REGION TITLE +FLGVAR WINDOW FLG) FTIMES (N) \UPDATE.PBT.RASTERWIDTHS (PAGENO) FEXPT (A N) REPLACESTKARG (WHICHSPEC +FRAMESPEC NEWVALUE) SEDIT::COPY-SELECTION (SEDIT::POINT SEDIT::SELECTION $$OUTPUT SEDIT::CONTEXT) +FORMAT-EXPONENT-MARKER (CL:NUMBER) FPLUS (N) HVFWDCDREAD (FILE RDTBL) MOVD (FROM TO FROMCELL NEWFLG) +CL:CHAR-LESSP (N) CL::COERCE-TYPE (CL::ELEMENT-TYPE) DIRECTORY.MATCH1 (TESTNAME NAMELIMIT CASEBASE) +\CIRCSHADE.DISPLAY (STREAM TEXTURE OPERATION R CY CX) DINFO.SPECIAL.UPDATE (GRAPH TYPE CURRENT.NODE +$$OUTPUT DINFOW) CL:CHAR-EQUAL (N) MSTRYSPELL (WORD) COMPILER::COPY-NODE-CATCH (COMPILER::NODE) +CL:CHAR-GREATERP (N) COMP.CLEANFNP (X TYPE) MOVD? (TO FROM DONTCOPY) CLRPLNODE (A D) CL:ALPHA-CHAR-P ( +CHAR CODE) CL:CHAR-NOT-GREATERP (N) SETXY.IP (IPSTREAM X Y) TEDIT.INCLUDE (FILE START-OF-PIECE INSPC#) + CL:CHARACTERP (OBJECT) \TELERAIDEXIT (RESET) \PS.SCALEHACK (STREAM SCALEFACTOR OLDSCALE) +CL:CHAR-NOT-EQUAL (N) \DelShade (KEY) HPRINTSP (X) NCONC1 (LST X) \BOXFPLUSDIF (BOX) DMATCH (TESTNAME) + SELECTQ1 (M) \GETSPP (CON TIMER) \TEDIT.SEL.CHANGED? (OLDSEL OLDSELOP NEWSELOP) +COMPILER::ENV-INLINE-DISALLOWED (COMPILER::NAME COMPILER:ENV COMPILER::PARENT) \BOXFTIMES2 (BOX) +SI::ADVICE-PUTDEF (SI::DEFINITION SI::NAME SI::CURRENT-ADVICE SI::CANONICAL-DEFN) CL:STRING-CHAR-P ( +CHAR) PROPNAMES (ATM) \CIRCSHADE.IP (STREAM TEXTURE OPERATION R CX CY) SEDIT::PARSE--STRING ( +CL:STRUCTURE SEDIT::CONTEXT) \BOXFQUOTIENT (BOX) \TELEBLTCURSOR (CURSOR) CL:UPPER-CASE-P (CHAR) FMAX ( +K) SEDIT::REPLACE-CHARS (SEDIT::CHARS SEDIT::END SEDIT::START SEDIT::DELTA-LENGTH TYPE SEDIT::STRING-ITEM + SEDIT::FONT SEDIT::PRIN-2? CL:LENGTH SEDIT::NODE SEDIT::POINT SEDIT::DELTA-WIDTH) \TEDIT.FIND ( +TEXTSTREAM) \LFPurgeDirectory (vol) COMPILER::COPY-NODE-CALL (COMPILER::NODE) CL:CHAR< (N) +COMP.CLEANEXPP (X TYPE) CL:LOWER-CASE-P (CHAR) CCCSCAN (DEF CA OLDREF X SUBMAPS LC CODEBASE OFFSET) +CHANGENAME (FN FROM TO) CL:CHAR> (N) CL:STANDARD-CHAR-P (CHAR) ADDPROP (PROP) CL:CHAR<= (N) +\PRESSFAMILYCODELST (WSTRM) \FLOAT (X) RPTPUT (CNT ITEM) RESET/NODE/LABELSHADE (TRANS SHADE) /REMPROP +(ATM PROP) HPERR (A1 A2) \BIGNUM.TO.FLOAT (X) ONEDINSPECT.VALUEWIDTH (PROPS FETCHFN DATUM FONT) +CL:CHAR-NOT-LESSP (N) TEDIT.EXTEND.SEL (NEWSEL X Y TEXTOBJ OSEL SELOPERATION SELWINDOW TEXTLEN A) +COMPILER::ENV-INLINE-ALLOWED (COMPILER::NAME COMPILER:ENV COMPILER::PARENT) \MAKEFLOAT (SIGN) +SI::ADVICE-GETDEF (SI::NAME SI::ENTRY) COMPILER::EFFECTS-ANALYZE-VAR-REF (COMPILER::NODE) +CL:FIND-PACKAGE (NAME) STOPSCAN? (OPR) SETXYREL.IP (IPSTREAM) CL:CHAR= (N) \CANONICALIZE.PUP.HOSTNAME +(NAME) CIRCSHADE.BLT (CENTERX CENTERY RADIUS STREAM TEXTURE OPERATION) %%MAP-FOR-EFFECT (FUNCTION +SEQUENCE) \ItemNumber (ALLITEMS ITEM) CL:CHAR/= (N) FIXSPELL (SPLST FLG) BLTVLINE (SHADE DESTINATION X + YA YB A) \LEAF.GETFILE (DEVICE FILENAME DEVINFO ACCESS OPTION RECOG) MSERASE (ATOMS AT) \LOAD-STREAM +(STREAM LDFLG PRINTFLG PACKAGE) \TEDIT.REFRESH.SHOWSEL (OLDOP NEWOP NEWSEL TEXTOBJ) \LFDirectoryP (vol +) %%MAP-SINGLE-FOR-EFFECT (FUNCTION SEQUENCE) FILEWATCHPROP (FILEWATCH#ARGS PROPNAME PROPVALUE +OLDPROPVALUE) BLTHLINE (SHADE DESTINATION XA XB Y A) CLISPATOM0 (PARENT TAIL NOFIXVARSLST1 FAULTX) NOT + (X) SETX.IP (IPSTREAM X) \VFMPutNext (key volumePage level) %%MAP-FOR-RESULT-MULTIPLE (SEQUENCES +RESULT-TYPE MIN-LENGTH) \TEDIT.FIND.PROTECTED.START (LIMITCH# TEXTOBJ CH# PCTB OURLIMIT) +%%MAP-FOR-RESULT-SINGLE (SEQUENCE RESULT-TYPE LENGTH RESULT) \LEAF.DELETEFILE (DEV FILENAME OPUP) +HRULE.CREATE (HRULE) \CIRCSHADE.BLT (STREAM R TEXTURE CX CY) \BRUSHBITMAP (BRUSHSHAPE BRUSHWIDTH +NEWBRUSHBM) %%MAP-TO-LIST (FUNCTION SEQUENCE) \TELERAIDENTRY (METADEBUGGING) TTNLEFT (BUF) CL:CHAR>= ( +N) \PFPilotVolumeP (vol) \INFINITY (SIGN) SEDIT::SELECT-SEGMENT (SEDIT::NODE SEDIT::CONTEXT SEDIT::SUBNODE + SEDIT::INDEX SEDIT::OFFSET SEDIT::ITEM) \LEAF.DEVICEP (HOST) SETCORNER (X2 X1 Y2 Y1) EDITTOGGLEBORDER + (W GRAPH DS) %%MAP-SINGLE-TO-LIST (FUNCTION SEQUENCE) DUMPDATABASE (FN) LOAD (FILE PRINTFLG) +%%MAP-SINGLE-TO-SIMPLE (RESULT-TYPE FUNCTION SEQUENCE) INSPECTW.PROPERTIES (INSPECTW) +\TEDIT.FORMAT.FOOTNOTE (PRSTREAM TEXTOBJ FORMATTINGSTATE REGION) HASDEF (NAME NODEF OPTS) +%%EVERY-MULTIPLE (SEQUENCES) IMAGEOBJP (X) \TFBRAVO.GETPARAMS (LIS NAMES) FIXEDITDATE (EXPR) +\POSTSCRIPTTAB (POSTSCRIPTDATA TABSPACE) %%NOTANY-MULTIPLE (SEQUENCES) SEDIT::GROW-SELECTION ( +SEDIT::SELECTION SEDIT::CONTEXT) XCL::UNDOABLY-SETF-SYMBOL-FUNCTION (CL:SYMBOL) MAKEFLOATNUMBER (N0 N1 +) FB.UNDELETECOMMAND (BROWSER) DELDEF (LST FIELD P) %%SOME-MULTIPLE (SEQUENCES) COMPILER::ENV-DISALLOW-INLINES + (COMPILER:ENV COMPILER::NAMES) PutFloat (PTR N) SI::MAKE-AROUND-BODY (SI::NEXT-AROUND-FORM +SI::AROUND-FORMS SI::CALLING-FORM) IMODLESSP (Y X MODULUS) EQUALN (X Y) FNS.PUTDEF (NAME REASON) +FB.UNDELETE.FILE (ITEM TBROWSER FBROWSER) TEDIT.COMPOUND.PAGEFORMAT (FIRST VERSO RECTO) +%%MAP-TO-SIMPLE (RESULT-TYPE FUNCTION SEQUENCE) FORMAT-FIXED-AUX (NUMBER) \MATMULT441 (ABASE BBASE +CBASE) UNSAFE.TO.MODIFY (FN OPTION) MSSEEKPHRASE (SOUGHT SEEKING SK MARKER OS OLA OC OP ORS) +SEDIT::PARSE--LITATOM (CL:STRUCTURE SEDIT::CONTEXT) DINFO.UPDATE.FMENU (GRAPH NEW.NODE NODELST W NODE) + \MATMULT144 (ABASE BBASE CBASE) %%SOME-SINGLE (SEQUENCE) EQMEMB (X Y) COMPILER::COPY-NODE-BLOCK ( +COMPILER::NODE COMPILER::NEW-BLOCK) \MATMULT331 (ABASE BBASE CBASE) CL::INSERT-INCLUDED-SLOT ( +CL::NEW-SLOT CL::SUPER-SLOTS CL::PS CL::OLD-SLOT) %%MAP-FOR-EFFECT-MULTIPLE (SEQUENCES) \MATMULT133 ( +ABASE BBASE CBASE) \TELERAIDSEND (NDB) GET-ONED-DISPLAYW (WHERE DISPLAYWINDOW FONT DATUM FETCHFN +STOREFN VALUECOMMANDFN PROPCOMMANDFN TITLECOMMANDFN PROPS PROFILE) FILEMAP (FILEMAP) +COMPILER::ENV-ALLOW-INLINES (COMPILER:ENV COMPILER::NAMES) \MATMULT444 (ABASE BBASE CBASE) +TEDIT.HARDCOPY-COLUMN-END (TEXTOBJ FORCENEXTPAGE CHNO FORMATTINGSTATE REGION) PRINTPACKETDATA (FILE +LENGTH BASE STREAM) NSLOGIN (HOST MSG) MSTRYPARSE (FN ARGS) \MATMULT333 (ABASE BBASE CBASE) +IMAGEOBJPROP (NARGS PROP VAL) HASH-LEFT-PAD-INITIAL-CONTENTS (SIZE IVAL-LIST PADLENGTH) +CL:SET-SYNTAX-FROM-CHAR (TO-CHAR FROM-CHAR FROM-READTABLE TO-READTABLE) \AddShade (ITEM SHADE) +CL:GET-DISPATCH-MACRO-CHARACTER (SUB-CHAR DISP-CHAR READTABLE) INSIDE? (X BOX Y) MSSETREP (X PAT VAL) +SEDIT::PARSE--BROKEN-ATOM (CL:STRUCTURE SEDIT::CONTEXT) \TEDIT.NEUTRALIZE.PARALOOKS.MENU (SEL TEXTOBJ) + FIND-MACRO-FUNCTION (FORM) LCSKIP (FN FLG) %%NOTEVERY-MULTIPLE (SEQUENCES) SEDIT::INSERT (SEDIT::POINT + SEDIT::CONTEXT SEDIT::SELECTION) CL:GET-MACRO-CHARACTER (CHAR READTABLE) COUNTDOWN (X N) RUNION (L1) +PUTFILEMAP (FILE FROMFILE?) BUILDTESTRELQ (X VAR R) DO-DISPATCH-MACRO (RDTBL CHAR STREAM +DISP-CHARACTER *READTABLE*) SETSPACE.IP (IPSTREAM SPACEWIDTH) ADDSPELL (X N) PRINTANDBOX (STREAM STRM +LFTMARGIN MINSPACE EXP) CL:MAKE-DISPATCH-MACRO-CHARACTER (CHAR READTABLE) +COMPILER::EFFECTS-ANALYZE-UNWIND-PROTECT (COMPILER::NODE) DRAWGRAYBOX (Y1 X1 X2 DESTINATION SHADE Y2) +CLISPRESPELL (TL WORDS FLG) CL:SET-MACRO-CHARACTER (CHAR READTABLE) SETXREL.IP (IPSTREAM) +\DO-DEFINE-FILE-INFO (ARGS TAIL P R) DMCHAT.HANDLE.WRAP (CHAT.STATE) FORMAT-PRINT-RADIX-AUX (CL:NUMBER +) CL:SET-DISPATCH-MACRO-CHARACTER (DISP-CHAR READTABLE NEWTABLE FUNCTION) +\TEDITMENU.RECORD.UNFORMATTED (NEWSTATE TEXTSTREAM TEXTOBJ FLG) ADDFILE (FILE ROOTNAME PRLST) +FILECOMSLST (FLG TYPE FILE) STRINGREGION (STREAM STR PRIN2FLG RDTBL) RESET/NODE/BORDER (BORDER ONBW) +IL-UNWRAP-MACRO (FORM) SEDIT::OPEN-LITATOM (SEDIT::NODE STRING SEDIT::STRING-LENGTH) +FB.HARDCOPY.PRINT.TITLE (LMARG RMARG TITLE IMAGESTREAM) UPDATEFILEMAP (DECLARESTRING FILEMAP) +HPRINTEND (Y Z HERE) SEDIT::SET-SELECTION (SEDIT::NODE SEDIT::CONTEXT SEDIT::INDEX SEDIT::OFFSET +SEDIT::ITEM TYPE) \TEDIT.LOOKS.UPDATE (TEXTOBJ BASEA0761 N ARR VAL BASEA0762 BASEA0763 BASEA0764 +BASEA0765 BASEA0766) ALLATTACHEDWINDOWS (MAINW ATW) TERM.MOVETO (CX FONTWIDTH CY) ROOTFILENAME (NAME) +READPLIST (TAB1 STREAM READTABLES NOERRORFLG) DINFO.UPDATE.MENU.DISPLAY (NODE NODELST LENGTH DINFOW +CHILD MENU BITS) \MAXWIDTHOFGROUP (ATWINFOS) SMASHFILECOMS (FILE) ITEM.WINDOW.SET.STACK.ARG (FRAME +VARNAME WINDOW OLDVALUEITEM) SI::DESCRIBE-USING-RECORD-DECL (SI::DEPTH SI::FIELD-NAME SI::OBJECT DECL) + COMP.STBIND (X) MENUITEMREGION (IMENU ITEMS ITEM GRIDSPEC BORDER) \TEDIT.FIND.PROTECTED.END (LIMITCH# + TEXTOBJ CH# OURLIMIT) FASL:PROCESS-FILE (FASL::TEXT STREAM) \FILLPOLYGON.IP (STREAM TEXTURE OPERATION + POINTS TRAJECTORY WINDNUMBER) CL::MERGE-SLOTS (CL::SUPER-SLOTS) CL-MACRO-WRAPPED-P (FORM) GET-TITLEW +(DISPLAYWINDOW TITLEWINDOW TITLEFONT TITLE DATUM) MAPRINT (LSPXPRNTFLG FILE) TB.DELETE.ITEM (BROWSER) +COMPILER::ENV-DECL-P (COMPILER::SPECIFIER COMPILER:ENV COMPILER::PARENT) ENUM-STRING (OUTSTR \NUMSTR +\NUMSTR1) SI::INSERT-ADVICE-FORM (SI::PRIORITY SI::FORM SI::ENTRY) RPTPRINT (X) +MB.DEFAULTBUTTON.ACTIONFN (OBJ) PROMPTCHAR (X) MSFIXUPTYPES (PRSD X NS) SEDIT::INSERT-STRING (SEDIT::WHERE + SEDIT::NODE SEDIT::CONTEXT SEDIT::CHARS SEDIT::POINT) DINFO.UPDATE.TEXT.DISPLAY (NODE WINDOW PROPS +FROM TO SEL OLD.TEXTSTREAM) CL:VECTOR-PUSH-EXTEND (NEW-ELEMENT EXTENSION-SIZE) \TEDIT.FIND.LAST.LINE ( +TEXTOBJ) LISPXPUT (PROP L) PUTPUPSTRING (STR) COMPILER::COPY-CODE (COMPILER::TREE) \CONVERTNUMBER (N +MAGNITUDE NS R DIGIT NSB) DINFO.UPDATE.GRAPH.DISPLAY (NODE LOCATION) COMPILER::EFFECTS-ANALYZE-THROW ( +COMPILER::NODE) NLIST (N) FILEPKGCHANGES (N) SET-FILL-POINTER (NEWVALUE) HASH-LEFTPAREN (STREAM XCL-USER::T0 + VEC) COERCE (CL::OBJECT CL::RESULT-TYPE CL::SUBTYPE) TTECHO.TO.FILE (FILE STREAM CHAR) \CML-LOAD ( +PACKAGE STREAM EOF-MARK FULL) HPRINT1 (SIZE K PR Y) HASH-A (STREAM PARAM CONTENTS) +ONEDINSPECT.RESHAPEFN (WINDOW) FILECREATED (X FILEDATE) CL-UNWRAP-MACRO (FORM) FORMAT-PRINT-RADIX ( +CL:NUMBER COLON ATSIGN) COMPILER::ENV-ADD-DECLS (COMPILER:ENV COMPILER::SPECIFIERS) FNUM-STRING ( +MANTSTR DIGITS INTEXP OUTSTR POINTPLACE) SI::SET-ADVICE-MIDDLE-MAN (SI::NAME SI::MIDDLE-MAN) +COMPILER::EFFECTS-ANALYZE-SETQ (COMPILER::NODE) CL:VECTOR-PUSH (VECTOR) COPIEDTOSPEC (SPEC) +DEFINE-FILE-INFO (ARGS) SI::DESCRIBE-USING-INSPECT-MACRO (SI::MACRO SI::DEPTH SI::FIELD-NAME SI::FETCHFN + SI::OBJECT SI::FIELDS) HASH-B (STREAM CHAR PARAM) RESHADEITEM (NEWSHADE ITEMREGION DSP MENU ITEM) +HASH-C (STREAM CHAR PARAM) \IBMPEEKCCODEFN (STRM NOERROR) HASH-BACKSLASH (STREAM) FILLTRIANGLE ( +TEMPLIST X1 Y1 X2 Y2 X3 Y3 STREAM TEXTURE OPERATION) CL::RESOLVE-SLOTS (CL::LOCAL-SLOT-DESCRIPTIONS +CL::PS CL::SUPER-SLOTS CL::LOCAL-SLOTS) FLTSTR (\NUMSTR \NUMSTR1) MOVEBOX (Y1 X2 X3 DESTINATION SHADE +X1 Y2 Y3) GREET (X) RAISEP (TTBL) \TELERAIDGET (RECEIVER NDB) TTGIVEHELP (HELPKEY) GLC (X) +\TRACKWITHBOX (SHADE) \MAXHEIGHTOFGROUP (ATWINFOS) LISPXREADP (FLG) FW-INTERACT (W) \TEDIT.WORD.BOUND +(TEXTOBJ PREVCH CH READSA) \SENDLEAF (SEQUIN FILENAME DONTWAIT) GETPUPSTREAM (LENGTH ACCESS +WRITEXTENSIONFN) \LFMakeVolumeDirectory (vol directoryID) HASH-COLON (STREAM CHAR PARAM) HASH-COMMA ( +STREAM CHAR PARAM FORM) EDITBMTEXTURE (BM X Y) FILEDATE (CFLG) HASH-DOT (STREAM CHAR PARAM) GREET0 ( +DATE) FLTINTLOG (TEXP THI TLO RESULT) /PUT (PROP VAL) DWMFY0 (DWIMIFYCHANGE) RPLCHARCODE (X CHAR LEN +BASEA0356 OFFSETA0355) FILECREATED1 (X FILE) \LEAF.CLOSEFILE (INTERNAL) HASH-DOUBLEQUOTE (STREAM CHAR +PARAM) SEDIT::SET-POINT (SEDIT::NODE SEDIT::POINT SEDIT::CONTEXT SEDIT::INDEX SEDIT::OFFSET SEDIT::ITEM + TYPE SEDIT::COMPUTE-LOCATION?) EDITE (COMS ATM TYPE IFCHANGEDFN OPTIONS) \LIMITBYMAX (N) +\UPDATEXYANDBOX (DESTINATION SHADE) HASH-MINUS (STREAM CHAR PARAM) RIGHTW.RESHAPEFN (WINDOW) +PRETTYCOMPRINT (X) TRACKNODE (W) HASH-ILLEGAL-HASH-CHAR (CHAR) HASH-LEFTANGLE (CHAR PARAM STREAM) +SI::GET-ADVICE-MIDDLE-MAN (SI::NAME) PUTPROPS (X Y) READLINE (FL RDTBL) HASH-PLUS (STREAM CHAR PARAM) +BOOTSTRAP-NAMEFIELD (FILE) DMCHAT.ADDRESS (CHAR ADDRESSING NEXTPOS CHAT.STATE) COMPILER::ENV-BIND-VARIABLE + (COMPILER::NAME COMPILER::STRUCT COMPILER:ENV) %%PRINT-PATHNAME (STREAM S) HASH-O (STREAM CHAR PARAM) + CONCATT.IP (IPSTREAM) %%PRINT-DIRECTORY-COMPONENT (S STREAM) DINFO.UPDATE.HISTORY (OLDITEMS DINFOW +HISTORYW) HASH-R (STREAM) TEMPLATE (FN TEMPLATE) TTYINSTRING (BUF CH) DECLARE%: (X) COMPILER::RELEASE-VAR-REF + (COMPILER::NODE) HASH-QUOTE (STREAM CHAR PARAM) COMP.STSETQ (VREF) PUTPUPBYTE (BYTE# VALUE) RESETBUFS + (FORMS) BUILDGETRELQ (X VAR REL) HASH-STAR (STREAM CONTENTS LEN BITARRAY) TITLEW.REPAINTFN (WINDOW) +FILE-NAME (FILE NAME) COMPILER::PRINT-ENV (STREAM COMPILER::STRUCT) \EXTFTIMES (EXPX EXPY) +SI::DELETE-ADVICE (SI::NAME) GETBOXREGION (WIDTH HEIGHT ORGX ORGY WINDOW PROMPTMSG) DWMFY1 (FORM) +\LIMITBYMIN (N) INSIDEP (REGION POSORX Y) HASH-X (STREAM CHAR PARAM) COPYINSERT (TTYW IMAGEOBJ) +\STRINGIN (SETLEN N WIDTH LEN STREAM) REMPROPLIST (ATM PROPS) NODELST/AS/MENU (NODELST POS Y X) +SETFONT.IP (IPSTREAM FONTNUM) %%NUMERIC-STRING-P (STRING) HASH-VBAR (CHAR PARAM STREAM) +FB.HARDCOPY.MAXWIDTH (FONT FILES ATTRINDEX) COMPARENCHARS (X) ENDFILE (FILE) SCALE.IP (IPSTREAM S) +CL::ASSIGN-SLOT-OFFSET (CL::PS) READHOTSPOT (GRIDSPEC DS BM GRIDINTERIOR) HASH-NUMBER-SIGN (PARAM +CIRCLE-PART) \TELERAIDCOMMAND (KEYNUMBER NDB) TTRATOM (STRM) WBOX (DS REG TEXTURE) \ITEMW.DESELECTITEM + (WINDOW) FORMAT-PRINT-HEXADECIMAL (COLON ATSIGN PARMS) HASH-S (STREAM CHAR PARAM) HASH-EQUAL (NEWNODE + STREAM) COMP.STVAR (VREF) SI::INSPECT-MACRO-USABLE-BY-DESCRIBE? (SI::MACRO) HASH-STRUCTURE-LOOKUP ( +SLOTCONTENTS) GETPUPSTRING (NC) FB.SORT.VERSIONS (SORTFN) FORMAT-PRINT-OCTAL (COLON ATSIGN PARMS) +\SEARCHPRESSFONTS (FAMILY PSIZE FACE ROTATION) COMPILER::ALPHA-FORM (COMPILER::FORM) +COMPILER::EFFECTS-ANALYZE-RETURN (COMPILER::NODE) CMLREADSEMI (STREAM) TERM.ADDLINE (CHAT.STATE ATYPOS + DSP FONTHEIGHT TTYWIDTH Y) FORMAT-PRINT-BINARY (COLON ATSIGN PARMS) \EXTFQUOTIENT (EXPX EXPY) +CLISPEXPANSION (X) MSJOINSET (SET2) CL::ENSURE-CONSISTENT-PS (CL::PS) INIT-CML-READTABLES (FILETBL) +TYPERECORD (NAME&FIELDS) SETLASTC (CHAR) SEDIT::HASFAT (SEDIT::STR) GRAYBOXAREA (TEXTURE DS X Y WIDTH +HEIGHT) PARSE-NAMESTRING1 (START) COMPILER::EFFECTS-ANALYZE-PROGN (COMPILER::NODE) +\CONVERT.FLOATING.NUMBER (OUTSTR OSINDEX OUTSTRPTR \CFNSTRING) COMP.LOOKUPCONST (Y) EDITMOVENODE ( +WINDOW DS) \VFMMarkBufferDirty (BUFFERPAGE) TERM.PRINTCHAR (DSP DISPLAYDATA CHAR XPOS) CL:TRUNCATE ( +CL:NUMBER CL::DIVISOR) \TEDIT.SCALE (VALUE SCALEFACTOR) PUTPUPWORD (WORD# VALUE) +%%DIRECTORY-COMPONENT-EQUAL (COMPONENT1 COMPONENT2) \IBMINCCODEFN (STRM) CL:LOG (CL:NUMBER) +COMPAREPRINTN (N STREAM) FASL-FILEDATE (STREAM X CFLG) CL:MAKE-ARRAY (RANK NELTS DISPLACED-TO +ELEMENT-TYPE DISPLACED-INDEX-OFFSET FATP INITIAL-CONTENTS INITIAL-ELEMENT) SEDIT::INSERT-LITATOM ( +SEDIT::NODE SEDIT::CONTEXT SEDIT::WHERE SEDIT::POINT) SKOR (X Y) COMPILER::PRINT-CONTEXT (COMPILER::STRUCT + COMPILER::TL COMPILER::VALS COMPILER::PRED COMPILER::APP STREAM) CL::%%COPY-TIME-STATS ( +CL::DESTINATION-BLOCK CL::REFERENCE-BLOCK) SI::ADD-ADVICE (SI::NAME) CL:SPECIAL-FORM-P (CL::X) MSFAIL +(FLG) CL::PS-NUMBER-OF-SLOTS (CL::PS) COMPILER::EFFECTS-ANALYZE-OPCODES (COMPILER::NODE) TTREADLIST ( +STRM) MB.CREATE.NWAYBUTTON (BUTTONS OBJECT INITSTATE) GLOBAL-MACRO-FUNCTION (ENV X) %%MAKE-PATHNAME ( +HOST DEVICE DIRECTORY NAME TYPE VERSION) COMPILER::RELEASE-TAGBODY (COMPILER::NODE COMPILER::SEGMENT +COMPILER::STMT) \CHECKSUM (BASE NWORDS) \PFReplaceString (maxLength LENGTH startLoc lengthLoc) +\IBMOUTCHARFN (CHARCODE STREAM) COMPILER::EFFECTS-ANALYZE-PROGV (COMPILER::NODE) +SEDIT::GROW-SELECTION-LITATOM (SEDIT::SELECTION SEDIT::CONTEXT SEDIT::NODE) \MAIKO.PUNTBLTCHAR ( +CHARCODE DISPLAYSTREAM) COMPILER::RELEASE-THROW (COMPILER::NODE) GET-ENVIRONMENT-AND-FILEMAP (FULL) +TERM.DOWN (YPOS BOTTOM XPOS FONTHEIGHT NLINES DSP) FB.IS.NOT.SUBDIRECTORY.ITEM (ITEM) +FORMAT-PRINT-DECIMAL (COLON ATSIGN PARMS) \GETPRESSFONTNAMES (FACE WSTRM PSIZE FAMILYCODELST FAMILY +MICASIZE ROTATION) GRAPHEDITCOMMANDFN (GRAPHWINDOW) \SHADEBITS (BM COLOR BITSWIDE W GRIDSPEC BITSHIGH +GRIDINTERIOR) \FLOATINGSCALE (INTEXP TEXP THI TLO BOX) COMPILER::RELEASE-UNWIND-PROTECT (COMPILER::NODE +) GETEXPRESSIONFROMEVENTSPEC (LINE) \INIT.POWERS.OF.TEN (TEXP THI TLO) COMPILER:ENV-FBOUNDP (COMPILER:ENV +) GET-FILEMAP-FROM-FILECREATED (STREAM) \SETGROUPMIN (GROUPSIZE) CL:COMPILE-FILE (CL:LOAD +COMPILER::*LAP-STREAM* COMPILER::INPUT-FILE) IMAGEBOX (OBJ STREAM MODE) EXTENDREGIONTOP (OLDTOP NEWTOP +) SI::DESCRIBE-USING-DESCRIBERS (SI::DESCRIBER SI::OBJECT SI::DEPTH SI::DESCRIBERS) +LOOKUP-ENVIRONMENT-AND-FILEMAP (FULL KEY ENTRY) \DRAWLINE1 (BITMAPBASE Y0 RASTERWIDTH X0 DX YINC DY +MODE CDL XLIMIT YLIMIT) \MAKEFRAME (FN ST ALINK CLINK END DEF ARGS ARGLOCN) CL:MACRO-FUNCTION (CL::X +CL::ENV) \VFMSmartBLT (SBASE DBASE XA0721 NWORDS) GETREGION (MINWIDTH MINHEIGHT INITREGION NEWREGIONFN + NEWREGIONFNARG INITCORNERS) \BN.DIFFERENCE (U V) SETRGB.IP (IPSTREAM RED GREEN BLUE COLORMODEL.FVAR) +\GETBASEFIXP (\NewBaseAddr BASE OFFST) \FILING.ATTRIBUTE.TYPE.SEQUENCE (ATTRIBUTETYPES ATTR) +\TEXTTTYBOUT (BYTE TEXTOBJ TABLEA0735) NODECREATE (ID POS LABEL FONT TONODEIDS FROMNODEIDS BORDER +LABELSHADE) \SETIOPOINTERS (KBDBASE) CL::DEFSTRUCT-PARSE-OPTIONS (CL::NAME&OPTIONS CL::NAME CL::PS) +ARRAYBLOCK (NAME&FIELDS) SIZE/GRAPH/WINDOW (GRAPH WINDOW/TITLE GRAPHREG) TB.FINISH.CLOSE (BROWSER +CLOSEFLG DONTCLOSE) \D01.FAULTINIT (WIDTH) FW-RESIZE-OFD (MAXNAMEWIDTH NAMEWIDTH) COMPILER::LOCAL-CONSTANT-P + (CL:SYMBOL) ENTEREVALQT (X) INFINITEP (CL:NUMBER) \DL.FAULTINIT (BASE) IN/ITEM? (POS ITEMS XPOS YPOS) + \SEQUIN.HANDLE.ACK (QUEUE ACKSEQ) \MP.ERROR (STRING ARG1 ARG2) \TEXTMARK (TEXTOBJ STREAM) +FW-UPDATE-OFD-WINDOW (FILESTREAM OLDEOFPOS OFDSTREAM OLDCURPOS OLDPCTPOS BOXBORDER) \TEDIT.PAPERWIDTH +(PAPERSIZE) \FILING.ATTRIBUTE.TYPE (ATTR NOERRORFLG) GETPUPBYTE (BYTE#) CL:MACROEXPAND (CL::ENV) +\SPP.CHECK.INPUT.QUEUE (CON INQ ACKNO) PARSE-DEFMACRO (ARGUMENT-LIST) \TELERAIDINIT (FN VAR) +\BULK.DATA.CLOSE (CONTINUATION) \BN.DIVIDE (FLG) SI::FINISH-UNADVISING (SI::ADVICE-NAME) +COMPILER::ENV-BIND-FUNCTION (COMPILER::NAME COMPILER::KIND COMPILER::EXPN-OR-VAR COMPILER:ENV) +\FILEMAP-HASHOVERFLOW (HARRAY VAL ROOT KEY) READVARS-FROM-STREAM (SYMBOL VALUE SYMBOLS STREAM) +SEDIT::LINEARIZE (SEDIT::NEW-LPTR SEDIT::RIGHT-MARGIN SEDIT::ME) WALK-FORM (XCL::X XCL::FORM XCL::RESULT +) FB.DELVER.FILES (FILES NVERSIONS TBROWSER) FB.DELVERCOMMAND (FBROWSER ITEM) FINITEP (CL:NUMBER) +COMPILER::MAKE-CHILD-ENV (COMPILER::PARENT) MS-SMASH-PACKAGE (PACKAGE CARPART CDRPART) +SEDIT::GET-BUTTON-STRING (SEDIT::NODE) DINFO.SETUP.WINDOW (WINDOW) \BIGNUM.TO.INT (X) FLUSHFILEMAPS ( +ROOTNAME ME FULLNAME) COMPILER::RELEASE-SETQ (COMPILER::NODE) FB.CLOSE&EXPUNGE (TBROWSER WINDOW +BROWSER FLG) COMP.MACRO (MAC EXP EXPANSION) HASHRECORD (NAME&FIELDS) CL::ENSURE-VALID-TYPE ( +CL::TYPE-FORM) \BN.QRS (I) PPSPPSTREAM (FILE) EDITSHADE ($$OUTPUT) \ARBIN (N WIDTH LEN STREAM) \BN.ABS + (U) SI::FINISH-ADVISING (SI::FN-TO-ADVISE SI::ORIGINAL SI::ADVICE-NAME) \TEDIT.HCPYFMTSPEC ( +IMAGESTREAM SPEC SCALEFACTOR TAB) \TEXTDSPXPOSITION (STREAM) LISPSOURCEFILEP (HERE) +\INSPECTW.COMMAND.HANDLER (INSPECTW) SI::DESCRIBE-INTERNAL (SI::DEPTH SI::OBJECT TYPE SI::TYPE-NAME) +COMPILER::EFFECTS-ANALYZE-MV-PROG1 (COMPILER::NODE) EDITSHADEREPAINTFN (WIN) LVLPRINT (X FILE CARLVL +CDRLVL TAIL) SEDIT::DETRANSLATE-CHARS (SEDIT::STR) COMPILER::CRACK-DEFMACRO (COMPILER::FORM) +XCL::PPRINT-DEFINER-FITP (XCL::ITEM) ENTRY# (HIST) COURIER.READ.BULKDATA (STREAM PROGRAM TYPE +DONTCLOSE) DIRECTORY.FILL.PATTERN (PATTERN DEFAULTVERS DEFAULTEXT) COMP.PROG1 (A) CL:BIT-VECTOR-P ( +VECTOR) \VFMFreeVPage (volumePage vfmFileD group) SETCOLORLV.IP (DIM SHADE IPSTREAM ANGLE) +\TEDIT.PAPERHEIGHT (PAPERSIZE) %%PATHNAME-EQUAL (PATHNAME1 PATHNAME2) TERM.DELCHAR (CHAT.STATE DSP +XPOS FONTWIDTH Y TTYWIDTH FONTHEIGHT) EQMEMBHASH (V X H) HPRINT0 (VARS X) SETCOLOR16.IP (DIM SHADE +IPSTREAM OPERATION) CL::SIMPLE-STRING= (STRING1 STRING2 BASE1 OFFSET1 TYPENUMBER1 BASE2 OFFSET2 +TYPENUMBER2) TERM.LEFT (XPOS NCHARS) FORMAT-PRINT-ORDINAL (N) CL:ARRAY-DIMENSIONS (ARRAY) +SEDIT::DELETE-LITATOM (SEDIT::NODE SEDIT::START SEDIT::END STRING SEDIT::CONTEXT SEDIT::SET-POINT?) +COMPILER::EFFECTS-ANALYZE-LITERAL (COMPILER::NODE) LVLPRIN1 (X CARLVL CDRLVL TAIL) +MB.THREESTATE.WHENOPERATEDFN (OPERATION OBJ DS) %%FLATTEN-ARRAY (ARRAY) \TEDIT.NSCHAR.RUN (STREAM CHNO + PCTB START-OF-PIECE) REDISPLAYGRAPH (WINDOW REGION) COMPILER::RELEASE-PROGV (COMPILER::NODE) +XCL::%%DEFINE-TYPE-SAVE-DEFN (XCL::NAME CL:HASH-TABLE) COMP.VAR (DECL) \MAKERECODEMAP (CODEMAP CSMAP +MAPARRAY) \M44ACTONVMEMFILE (FIRSTPAGE BUFFER CAs DAs LASTPAGE) COMPILER::RELEASE-RETURN (COMPILER::NODE +) LVLPRIN2 (X CARLVL CDRLVL TAIL) \TEXTDSPYPOSITION (STREAM) \TEDIT.FORMATTABS (TABSPEC DFLTTABX +MARGINXOFFSET GRAIN CHBASE WBASE) SUPERPRINTEQ (X) \ITEM.WINDOW.SELECTION.HANDLER (WINDOW) GETPOSITION + (WINDOW CURSOR) SCALEPAGEXUNITS (FACTOR PAPERSIZE LANDSCAPE?) \SEQUIN.COMPARE (X Y DIF) COMPAREPRINT1 + (A B STREAM) LVLPRIN (X CARLVL CDRLVL) CL::PARSE-SLOT (CL::DESCRIPTION CL::SLOT) \TELERAIDSERVER (NDB + IDLO IDHI KEYNUMBER EXCESS) \REMOVE-DECLS (CL:DECLARATION CL::NAME CL::ENVIRONMENT CL::NEW-FORM CL::VAR +) PTPLUS (PT1 PT2) SI::UNADVISE-FROM-RESTORE-CALLS (SI::ENTRY SI::FROM SI::FN SI::TO) MSREHASH (HA) +SEDIT::COPY-STRUCTURE-STRING (SEDIT::FONT SEDIT::PRIN-2?) COMPILER::EFFECTS-ANALYZE-LAMBDA (COMPILER::NODE + COMPILER::EFFECTS COMPILER::AFFECTED) \LEASTPTAT (DA DB THISB) MB.THREESTATE.SHOWSELFN (OBJ DS +IMAGEBOX SEL) PRINTPARA (FILE LIST) EXTENDREGIONRIGHT (OLDRIGHT NEWRIGHT) COMPILER::RELEASE-PROGN ( +COMPILER::NODE) \PFFetchString (lengthLoc maxLength STR startLoc) ENABLEWHEELSCROLL (K KAT I) READVARS + (VARS) TERM.ERASE.TO.EOL (CHAT.STATE XPOS) \BN.IDIVIDE (A B) \EVAL-PROGN (BODY ENVIRONMENT) +XCL::%%DELETE-DEFINER (XCL::NAME) PPSPP (CON NEXT) COMMON-LISP (COMMON-LISP-FORMS) XCL::%%EXPAND-DEFINER + (XCL:DEFINER XCL::DEFINITION-WITHOUT-COMMENTS XCL::ENV) READVISE (ENTRY) \TRANSLATE-CL%:LAMBDA (EXPR) + \TEXTLEFTMARGIN (STREAM) COMPILER::EFFECTS-ANALYZE-MV-CALL (COMPILER::NODE) SCALEPAGEYUNITS (FACTOR +PAPERSIZE LANDSCAPE?) XCL::GET-DEFINER-NAME (STRING XCL:DEFINER) EDITGRAPH2 (W) SUBLIS (EXPR A D ALST) + SPECVARS (A) XCL::%%REMOVE-SPECIAL-FORM (XCL::X) \TEDIT.PURGE.SPACES (BASEA0744 CHLIST BASEA0745) +DSUBLIS (ALST FLG A D) \ITEMW.FLIPITEM (ITEM DS REG) CL::RECORD-DOCUMENTATION (CL::PS) +XCL::%%DEFINER-NAME (XCL:DEFINER XCL::DEFINITION-WITHOUT-COMMENTS) HISTORYMATCH (INPUT PAT) +FB.DELETE.FILE (ITEM TBROWSER FBROWSER) PTDIFFERENCE (PT1 PT2) \VFMFind (key level proc) PRINTPARA1 ( +CLOSECOUNT) TEDIT.PARSE.PAGEFRAMES1 (VAL ALIST FRAMESPEC) BIGNUM.DEFPRINT (BIGN R STREAM C) +\MAIKO.NEWFAULTINIT (NBUFFERS) \BN.TH2D (TH MAXFACTOR) \MAIKO.DO.MOVDS (PAIR FROMCELL) \INVALID.RADIX +(N) \BITMAPFROMTEXTURE (FIXP SHADE) \ATWGROUPSIZE (ATW) PARSE-BODY (XCL::BODY XCL::TAIL XCL::DECLS +XCL::DOC) ROTATE.IP (IPSTREAM S) \TEXTRIGHTMARGIN (STREAM TEXTOBJ RIGHTMAR) FB.UPDATE.COUNTERS ( +FBROWSER COUNTERW TOTAL DEL TOTALPAGES DELPAGES TYPE XPOSPAIRS PAGESTRING HEIGHT) NESTED.SUBMENU.POS ( +IMENU STREAM ITEMS ITEM GRIDSPEC BORDER DD) TB.MAP.SELECTED.ITEMS (BROWSER LASTITEM# MAPFN) +EXTENDREGIONLEFT (OLDLEFT NEWLEFT) \BN.NZEROS (N) CONSTANTOK (X) PRINTSPP (EPKT BASE FILE COMMA) +ADDHASH (ITEM ARRAY VAL) \TEXTSTREAM.FILENAME (TEXTSTREAM TEXTOBJ) TEDIT.HARDCOPYFN (WINDOW +IMAGESTREAM) PRINT3TO10 (EPKT CALLER) PRINENDLINE (NEWXPOSITION NS) FIXLISPX/ (X FN) +FORMAT-PRINT-CARDINAL (N) CHANGEFONT (FILE) ITEMW.REPAINTFN (WINDOW REGION) EDITDELETENODE (W GRAPH DS + TOND FROMND) POLYSHADE.SCAN.IP (SCANDIRECTION MicasToDev I STREAM TEXTURE OPERATION) +CL::ASSIGN-SLOT-ACCESSOR (CL::SLOT CL::CONC-NAME) \TEDIT.APPLY.PARALOOKS (SEL W TEXTOBJ TAB A B +MAINTEXT) COMPILER::EFFECTS-ANALYZE-LABELS (COMPILER::NODE) \GREATESTPTAT (DA DB THISB) +MB.THREESTATEBUTTON.FN (OBJ TEXTOBJ) RESETGRID.NEW (WINDOW WIDTH HEIGHT BM) BITMAPOBJ.SNAPW (REG SCALE +) SUBPRINT/ENDLINE (FILE N) COMP.USERFN (X) EDITGRAPH (G W) FITP (SPACEWIDTH LSTCOL N X) +\TEDIT.BUTTONEVENTFN (W) SUPERPRINT (E TAIL TEM BRFLG) MAKEHASH (N) SUBHASH (ITEM ARRAY VAL) +SEMI-COLON-COMMENT-P (E) MAKEHVPRETTYCOMS (VARS X) \TEXTDSPFONT (STREAM TEXTOBJ WIN) SCALE2.IP ( +IPSTREAM X Y) SEDIT::COPY-SELECTION-LITATOM (SEDIT::SELECTION SEDIT::NODE STRING SEDIT::END TYPE +SEDIT::CHARS SEDIT::CONTEXT SEDIT::POINT SEDIT::DELETE?) FB.DELETECOMMAND (BROWSER) \MENU.ITEM.SELECT +(MENU COLUMN ROW) CL::REMOVE-DOCUMENTATION (CL::SLOT-DESCRIPTIONS CL::DOC? CL::PS) DINFO.READ.GRAPH ( +QUIETFLG FILE FULLFILENAME DATA) COMPILER::EFFECTS-ANALYZE-IF (COMPILER::NODE) \SEQUIN.CLEANUP (SEQUIN +) \CLIPCODE (X LEFT Y TOP BOTTOM RIGHT) DMCHAT.CLEAR (DM2500.STATE) COMPILER::RELEASE-MV-PROG1 (COMPILER::NODE +) GETFILEPKGTYPE (TYPE ONLY) COMP.TRYUSERFN (EXP) SETMAINTPANEL (N) SPY.DRAWBOX (BITMAP BORDERWIDTH +HEIGHT TEXTURE WIDTH) \NOTE.3TO10 (PUPHOST NDB NSADDR) TERM.ADDCHAR (CHAT.STATE DSP XPOS Y FONTWIDTH +FONTHEIGHT) \BN.ICANON (SIGN U0) PRINTATBOX (OLDBOX WINDOW EXP) COMPILER::GENERATE-CODE (COMPILER::TREE + COMPILER::*CODE*) \DOFORMATTING (FMTSPEC QUAD SPACELEFT TEXTOBJ BASEA0746 CHLIST BASEA0747 BASEA0748 +BASEA0749 WLIST BASEA0750 BASEA0751 N ARR VAL BASEA0752) \TEDIT.PARABOUNDS (TEXTOBJ CH# PCTB) +FIXAPPLY1 (POS OLD NEW *FORM*BLIP X) XCL::UNDOABLY-MAKUNBOUND (CL:SYMBOL) FB.HEADINGW.REDISPLAYFN ( +WINDOW) \TEXTMENU.DOC.CREATE (MENUPROPS MENUDESC) \DL.NEWFAULTINIT (NREALPAGES SCRATCHVP SCRATCHBASE +LASTREALPAGE NBUFFERS) POLYSHADE.BLT (POINTS STREAM TEXTURE OPERATION) +SEDIT::COMPUTE-SELECTION-POSITION-LITATOM (SEDIT::NODE SEDIT::STRING-ITEM) XCL::MAKE-UNDOABLE (XCL::FORM +) KEYWORD-TEST (ARGS TAIL) COMPILER::EFFECTS-ANALYZE-GO (COMPILER::NODE) +UPDATE/BM/DISPLAY/SELECTED/REGION (W) COMPILER::RELEASE-MV-CALL (COMPILER::NODE) COMP.PROGLST (CONTEXT +) MAPRELATION (MAPFN RELATION MAPW MAPFN2 MAPX HT2 MAPZ Z) SHAPEW.POP (WINDOW) GETCP.IP (IPSTREAM) +\TEXTDSPLINEFEED (STREAM) DMCHAT.RIGHT (XPOS DM2500.STATE) \NSFILING.REMOVEQUOTES (NAME) \BN.MADD (A B +) COMPAREPRINT (X Y STREAM) CL:IF (CL::TEST CL::THEN CL::ELSE) COMPILER::META-EVALUATE (COMPILER:CONTEXT +) TEXTMENU.CLOSEFN (W) POLYSHADE.IP (STREAM POINTS TEXTURE OPERATION WINDNUMBER) +SEDIT::COMPUTE-POINT-POSITION-LITATOM (SEDIT::NODE) COMPILER::EFFECTS-ANALYZE-CATCH (COMPILER::NODE) +HASHLINKS (TRAN) SHOWBUTTON (BUTTON BLOCK DS) PROMPTFOREVALED (FONT MSG MINWIDTH MINHEIGHT) +FB.COUNTER.STRING (FBROWSER NFILES NPAGES) COMP.UNBIND.VARS (F) COMPILER::ANNOTATE-TREE (COMPILER::TREE +) \TEDIT.BASICFIND (CHLIM STRING SEL TEXTLIM TEXTSTREAM CH#1) LEVELEDFORM (EXP CARLEV CDRLEV) +FORMAT-WRITE-FIELD (STRING STRLEN MINPAD MINCOL COLINC) FB.HEADINGW.RESHAPEFN (WINDOW FBROWSER) +\SETTYPEMASK (NTYPX DTD BITS) CL:EVAL (CL::HOOKFN CL::EXPRESSION CL::ENVIRONMENT) CHOOZ (X NCXWORD0 +FROMDWIM) \INTERPRET-ARGUMENTS (\LENGTH \FN-NAME \ARGUMENT-BLOCK \ENVIRONMENT) TESTRELATION (RELATION +ITEM TABLE) LASTC (FILE LASTCCODE) MASKSTROKE.IP (IPSTREAM) \TEXTDSPCHARWIDTH (CHARCODE STREAM) +TERM.DELETELINE (CHAT.STATE DSP BOTTOMMARGIN FONTHEIGHT TTYWIDTH ATYPOS) POSTSCRIPT.PUTBITMAPBYTES ( +BITMAP WIDTH STREAM HEIGHT BYTEOFFSETPERROW BYTESPERROW BMBASE PS.BITMAPARRAYBASE PRVBM PRVBASE) +COMPAREFAIL (FN X Y) EXTENDREGIONBOTTOM (OLDBOTTOM NEWBOTTOM) PEEKC (FILE STREAM) +TEDIT.MINIMAL.WINDOW.SETUP (PROPS TEXTSTREAM SEL) PEEKCCODE (FILE NOERROR) PARSERELATION1 (ROOT MOD) +CLISP% (CLISPX) ISET.IP (IPSTREAM IVAR) TEXTSTREAM.TITLE (STREAM TEXTOBJ) \LOOKUPPORT (OPUP SOC) +BRKDWNINIT (BLOCK) \CHECKEOLC.CRLF (STREAM BYTECOUNTVAR BYTECOUNTVAL) /DSUBST (NEW) +\POLYSHADE.YSCAN.IP (STRM FILL.SHADE FILL.FRULE ALIST FILL.WRULE) \NSIN.24BITENCODING.ERROR (STREAM) +/NCONC (L) BMOBJ.GETFN4 (STREAM SCALE ROT DESCENT) COMPILER::PEEPHOLE-OPTIMIZE (COMPILER::LAP-FN) +RATOM (FILE *READTABLE* \PNAMESTRING) SMASH.THE.DAMNED.CONST.IN.ATTACHWINDOW (TEMPWINDOW) /ATTACH (X) +\SUBREAD (READTYPE EOF-VALUE TABLE SA PBASE \RBFLG) TEDIT.GET (FILE UNFORMATTED? +TEDIT.GET.FINISHEDFORMS FORM) \DL.MARK.PAGES.UNAVAILABLE (LASTRP FIRSTRP) \TEXTDSPSTRINGWIDTH (STRING +STREAM) /SETPROPLIST (ATM LST) TREEGRAPHNODE (TREE DEPTH) \PS.BOUTFIXP (STREAM BASE c) UPPERCASEARRAY +(CA) \FDECODE/BUTTON (BUTTONSTATE) COMPAREMAX (X Y) \DL.UNMAPPAGES (LASTFP FIRSTFP) +FIND-EDIT-LOCATION-TAIL (X OTHERS EXPRESSION) ONEDINSPECT.SCROLLFN (WINDOW DY RIGHTWINDOW FLG DX) +/NCONC1 (LST X) SHOWPRIN2 (X FILE RDTBL) UPDATE/SHADE/DISPLAY (WIN BOTTOM BM) /PUTHASH (ITEM ARRAY VAL +) TERM.UP (YPOS HOMEPOS NLINES) \TOP-LEVEL-READ (OLD-EOS-OP EOF-VALUE \PNAMESTRING PRESERVE-WHITESPACE + RESULT) CHECK-BINDABLE (VAR) SEDIT::CLOSE-NODE-LITATOM (SEDIT::OLD-STRING) READC (RDTBL) +MB.CREATE.THREESTATEBUTTON (TEXT FONT BOX OBJ STATECHANGEFN INITSTATE) \DO.PROGV (VARS VAR VALUES +FNTOCALL) COMPILER::RELEASE-LAMBDA (COMPILER::NODE COMPILER::VAR COMPILER::OPT-VAR COMPILER::KEY-VAR) +COMP.BIND.VARS (ARGS VARNAME DECLARATIONS TYPE) \8859PEEKCCODEFN (STRM NOERROR) GRAPHDELETENODE (NODE +WINDOW) FILLRECTANGLE.IP (IPSTREAM IPDATA SCALED-VISRIGHT SCALED-VISLEFT SCALED-VISTOP +SCALED-VISBOTTOM) READCCODE (RDTBL CODE) CACCESSFNS (NAME&FIELDS) GET-RIGHTW (DISPLAYWINDOW +RIGHTWINDOW FONT) EDITBMRESHAPEFN (BMEDITWINDOW BM TEMPBM.W TEMPBM.H ZEROBMFLG) MOVETOP (X) +BMOBJ.GETFN2 (STREAM SCALE ROT) READP (FILE STREAM DEVICE FLG) SEDIT::EDIT-SELECTION (SEDIT::CONTEXT +SEDIT::OPTIONS) \LOADNSHOSTNUMBER (BASE) FIND-EDIT-LOCATION (SEEN DEFINITION) +\10MB.PRINT.ENCAPSULATION (STREAM PACKET) \TEXTOPENF (STREAM TEXTOBJ) LAYOUTGRAPH (ROOTIDS NODELST +FORMAT N) POSTSCRIPT.SHOWACCUM (STREAM) SKIPSEPRCODES (FILE RDTBL CHAR TABLE SA) +\TEDIT.MENU.WHENHELDFN (ITEM) /PUTASSOC (ALST KEY VAL) SEDIT::BACKSPACE-UNKNOWN (SEDIT::CONTEXT SEDIT::NODE +) SKIPSEPRS (FILE RDTBL) SHOWPRINT (X FILE RDTBL) COMPILER::RELEASE-LABELS (COMPILER::NODE COMPILER::BINDING +) FB.COUNTERW.REDISPLAYFN (COUNTERWINDOW BROWSER) COMP.CHECK.VAR (X) MOUSESTATE-NAME (KEYNAME) +\VFMCreateVPage (vfmFileD group) \SIMPLIFY.CL.ARGLIST (LST) CLOSE.WINDOWS.IN.REGION (W) +INITIALIZECOLOR.IP (IPSTREAM COLORMODELOP.FVAR) MBUTTON.SET.FIELD (TEXTSTREAM TEXTOBJ FIELD VALUE) +\SETNEWTIME0 (NEWTIME A OLDTIME) TERM.MODIFY.ATTRIBUTES (CHAT.STATE ATTRIBUTES) COMPILER::EFFECTS-ANALYZE-CALL + (COMPILER::NODE) FORMAT-PRINT-NAMED-CHARACTER (CHAR CH) \PAGEFAULT (X) SKREAD (RDTBL FILE TABLEA0343 +*READTABLE*) TEDITMENU.STREAM (TEXTSTREAM MAINWINDOW) DMCHAT.HANDLECHARACTER (CHAR) +CL:MAKE-CONCATENATED-STREAM (STREAMS STREAM) I.S.OPR (NAME UC EXP) SEDIT::BACKSPACE-LITATOM (SEDIT::CONTEXT + SEDIT::NODE STRING SEDIT::SUPER-NODE SEDIT::START SEDIT::END) \TEDIT.APPLY.SLOPE (BUTTON NEWLOOKS) +CL:MAKE-STRING-INPUT-STREAM (CL::START STRING) EXTENDREGION (INCLUDEREGION) COMPILER::REMOVE-EFFECT ( +COMPILER::EFFECTS-REP COMPILER::EFFECT) COMPILER::RELEASE-IF (COMPILER::NODE) TOTOPW.MODERNIZE (WINDOW +) COMP.BINDLIST (VARS VAR) EDITDELETELINK (W) LISPXREAD (FILE RDTBL) CL:READ (INPUT-STREAM +\PNAMESTRING EOF-VALUE) \8859INCCODEFN (STRM) \ASSURE.FPTOVP.PAGE (FILEPAGE) \INSPECT.STORE.FATCHAR ( +INSTANCE FIELD NEWVALUE) POSTSCRIPT.CLOSESTRING (STREAM) CL:READ-PRESERVING-WHITESPACE (STREAM +\PNAMESTRING EOF-VALUE) MAKE-INSPECTOR-PROFILE (NAME P-NAME) FREEVARS (FN USEDATABASE) SETCOLOR.IP ( +IPSTREAM SCALE ANGLE) CL:READ-DELIMITED-LIST (CHAR INPUT-STREAM \PNAMESTRING) TWODINSPECT.SCROLLFN ( +WINDOW DX TOPWINDOW FLG DY RIGHTWINDOW) \INVALIDADDR (ADDR) BMOBJ.GETFN3 (STREAM SCALE DESC) +CL:PARSE-INTEGER (STRING R OFFST LEN TABLE SA BASE) SHAPEW.AND.SAVE (WINDOW NEWREGION) \LOOKUPPAGEMAP +(VP PRIMENTRY) SEDIT::BACKSPACE-GAP (SEDIT::CONTEXT SEDIT::NODE) \TEDIT.APPLY.ULINE (BUTTON NEWLOOKS) +\MKINTEGER (END BASE RADIX) LISPX/ (X) COMPILER::EFFECTS-ANALYZE-BLOCK (COMPILER::NODE) COMPILER::RELEASE-GO + (COMPILER::NODE) COMP.TOPLEVEL.COMPILE (COMFN RECNAME CODE FREEVARS OUTER-ALLVARS OUTER-VARS +USES-LIST NLAMS1) GRAPHCHANGELABEL (GRAPH W NODE) CMLRDTBL (TBL) NS\FONTFILENAME.OLD (FAMILY SIZE FACE + EXTENSION CHARACTERSET) EDIT-IN-FUNCTION (DEF SEEN NAME) \INVALIDVP (VP) FINDATOM (ATOM POS X) +EDIT-IN-FNS (DEF SEEN NAME) RIGHTW.REPAINTFN (WINDOW DISPLAYW VERTMARKS ROWPROPS TOP BOTTOM +ROWPROPWIDTH FDESCENT) CL:KEYWORDP (CL::OBJECT) COMPILER::EFFECTS-UNION (COMPILER::ONE COMPILER::TWO) +DECLARED-SPECIAL (VAR) LISPXUNREAD (LST) FILEPKGCOM (N) \INSPECT.STORE.CHAR (INSTANCE FIELD NEWVALUE) +CL:APPLY (CL::N ARGLIST CNT FN) RSTRING (RDTBL FILE *READTABLE* RSFLG \PNAMESTRING) \FLUSHPAGE ( +RPTINDEX IFVP) \RSTRING2 (PNSTR RSFLG CHAR TABLE SA EOLC BASEA0345 OFFSETA0344 PBASE) +\TEDIT.MENU.WHENSELECTEDFN (ITEM MENU BUTTON) \TRANSFERPAGE (VP RPTINDEX FILEPAGE) \POLYSHADE.XSCAN.IP + (STRM FILL.SHADE FILL.FRULE ALIST I FILL.WRULE) SPY.TITLE (X TOPCOUNT) PROPRECORD (NAME&FIELDS) LISPX + (LISPXID X TAIL) SI::CREATE-CONDITION-CASE-LITERALS (SI::CATCH-TAG SI::TYPE-LIST SI::CONDITION) +\PUTBASEFIXP (BASE OFFST) BMOBJ.GETFN (STREAM BITMAP FIELDS) READ-EXTENDED-TOKEN (\PNAMESTRING STRM SA + PBASE) MOUSESTATE-EXPR (EXPR MOUSEBUTTONMASK X OPT) STORETABLE (KEY TABLST VALUE Z OLDREL) +\SEQUIN.FLUSH.CONNECTION (FINALSTATE REASON) \SMASHSTRING (SOURCE DEST DBASE) PRINTNSHOSTNUMBER ( +NSHOSTNUMBER FILE) \EDITBMHOWMUCH (BM EDITWIDTH EDITHEIGHT TITLEQ) CL:COMPILER-LET ( +$$COMPILER-LET-TAIL X) \NSFILING.LOOKUP.CACHE (ID PATHLENGTH) BRKDWNCLEAR (N PTR) CONCATLIST (L) +ADVISEWDS (WINDOW) BREAK0 (FN WHEN X) ADDCHAR (CHAR WIDTH PC OVFL) BREAK1 (BRKWHEN BRKFN POS BRKEXP +CONDITION) LOWERCASE (X) BOTTOMOFGRIDCOORD (GRIDSPEC GRIDY) MSINIT (DATABASE) +SI::COMPILED-FUNCTION-ARGLIST (SI::FN SI::X) EDITBMREPAINTFN (WIN BM GRIDSPEC EDITAREABITWIDTH +EDITAREABITHEIGHT) BITBLT.ERASE (LEFT BOTTOM WIDTH HEIGHT) COMP.COMPILER-LET (\A X) \INSPECT.STORE.32 +(INSTANCE FIELD NEWVALUE) BRKDWNBOXES (PTRA0712 VALA0711 BDX BDEXP PTRA0714 VALA0713) +SI::COMPILED-FUNCTION-DEBUGGING-INFO (SI::FN SI::FNHEADER SI::SIZE SI::NAME-TABLE-WORDS SI::START-PC +SI::PAST-NAME-TABLE-IN-WORDS) SUBREGIONP (SMALLREGION LARGEREGION) \CLIPANDDRAWLINE1 (BITMAP LEFT +RIGHT BOTTOM TOP DS BMRASTERWIDTH OPERATION COLOR) TWODINSPECT.ARRANGEWINDOWS (DISPLAYWINDOW +TITLEWINDOW ROWPROPS RIGHTWINDOW TOPWINDOW ROWPROPSPACE COLUMNWIDTHS COLUMNPROPSPACE TOPRIGHT REGION +CORNERWINDOW) ERASE.TO.END.OF.PAGE (BELOW) \MOVEREALPAGE (SOURCERPT SOURCEVP DESTINDEX SOURCEFLAGS) +\TEXTSETFILEPTR (STREAM TEXTOBJ FILEPOS) TEDIT.WINDOW.SETUP (TEXTOBJ WINDOW PROPS TEXTSTREAM +AFTERWINDOW) RETFROM (POS VAL) FB.SUBITEMP (ITEM SUBITEM) READ/NODE (DS CR NODES) \SPECIALRP (VP) +DISPTREE (TREE DEPTH G X) SI::CLEAN-UP-CL-ARGLIST (SI::ARG-LIST) \TEDIT.PUT.PARALOOKS (PC FILE STREAM +W LOOKS PARAHASH) \SELECTREALPAGE (A DONTMOVETOPFLG) SI::GET-STORED-ARGLIST (SI::NAME) +\ITEM.WINDOW.BUTTON.HANDLER (WINDOW) HISTORYSAVE (INPUT3 ID PROPS MOD SIZE) FILL.LINE (TBLE) +SEDIT::ATOM-POINT-TYPE (SEDIT::INDEX SEDIT::STR SEDIT::ESC-CHAR SEDIT::MULT-ESC-CHAR) +\TEDIT.APPLY.STRIKEOUT (BUTTON NEWLOOKS) SI::COMPILED-FUNCTION-INTERLISP? (SI::FN) ASSOCRECORD ( +NAME&FIELDS) ERASE.TO.END.OF.LINE (X) \TEDITMENU.SELSCREENER (TEXTOBJ MAINW SEL) TILEAREA (SRCBM WIN +LFT BTM WDTH HGHT) SCALED.BITMAP.GETFN (INPUT.STREAM) COMPILER::RELEASE-CATCH (COMPILER::NODE) +SI::FUNCTION-WRAPPER-INFO (SI::WRAPPED-FN SI::DEFN SI::FN-TO-CALL) COMPPRINT (X) EDITCHANGELABEL (W +GRAPH DS TRANS) OVERFLOW? (WIDTH OLDLINE) FB.COMMANDSELECTEDFN (MENU WINDOW FBROWSER REALITEM PWINDOW +KEY) ONEDINSPECT.ARRANGEWINDOWS (DISPLAYWINDOW TITLEWINDOW ROWPROPSPACE RIGHTWINDOW ROWPROPS +VALUEWIDTH VALUESPACE TOPRIGHT REGION) REALSTKNTH (POS N INTERPFLG OLDPOS) SI::CHANGE-CALLS-IN-CCODE ( +SI::FROM SI::CCODE SI::REFMAP SI::BASE SI::LOC) COMPILER::FIND-TAG-DUPLICATION (COMPILER::CODE +COMPILER::FIND-P) SHADEGRIDBOX (GRIDBORDER SHADE DS X GRIDSPEC BORDER Y OPERATION) GETVERBTABLES (ROOT + MODIFIER Y) SI::PARSE-CL-ARGLIST (SI::ARG-LIST SI::PARAM SI::REQUIRED SI::OPTIONAL CL:REST SI::KEY +SI::KEY-APPEARED? SI::ALLOW-OTHER-KEYS) INITIALIZEMASTER.IP (IPSTREAM) \TEXTGETEOFPTR (STREAM) +SI::CHANGE-CALLS (SI::FN SI::REAL-FN-SYMBOL) MOVETOUPPERLEFT (STREAM ASCENT) \INSPECT.STORE.16 ( +INSTANCE FIELD NEWVALUE) SI::HAS-CALLS (SI::CALLER SI::REAL-CALLER SI::CALLEE) DECLARERECORD (X) +SEDIT::ASSIGN-FORMAT-LITATOM (SEDIT::NODE SEDIT::CONTEXT SEDIT::ENVIRONMENT CL:FORMAT) +COMPILER::ENV-ANALYZE-VAR-REF (COMPILER::NODE) ATOMRECORD (NAME&FIELDS) DELETETO (TAIL N) LISPXFIND ( +QUIETFLG TYPE MOD X) CL:NOTEVERY (PREDICATE FIRST-SEQUENCE) COMPILER::RELEASE-CALL (COMPILER::NODE) +SI::RESTORE-CALLS (SI::FN) COMP.TRANSFORM (FORM *BC-MACRO-ENVIRONMENT* VAL) EDITCHANGEFONT (W GRAPH +HOW DS) REGIONP (X) BESTPUPADDRESS (HOST PAIR) CL:EVAL-WHEN (OPTIONS.BODY) SI::ADD-CHANGED-CALL ( +SI::BODY SI::TO SI::FROM SI::WCC-FORM) \NSFILING.ADD.TO.CACHE (HANDLE NOERRORFLG) \VALIDADDRESSP (BASE +) \NSFILING.MAYBE.CREATE (SESSION DIRLST DIR) \APPLYREADMACRO (MACDEF STREAM ANSCELL) FILEBLOCKTRAILER + (BLOCKINFO) UNDOLISPX2 (PROP X DWIMCHANGE) INSPECTW.REPAINTFN (WINDOW WREG) INTERSECTREGIONS (REGIONS +) SHOWWTITLE (WINDOW BORDER BM TITLE) \POLYSHADE.DISPLAY (STRM FILL.SHADE FILL.FRULE ALIST I +FILL.WRULE) \SUBREADCONCAT (J) FILL.INITTBLE (DISPLAYSTREAM DISPLAYDATA) EDITBMSCROLLFN (W DX DY) +TTBITWIDTH (CHAR) COMPILER::RELEASE-BLOCK (COMPILER::NODE) \INVALID.SYMBOL (XCL::BASE XCL::LEN) +COMP.RETFROM.POINT (COMFN DEF RECNAME) \LET*-RECURSION (VARS $$LET*-ENV $$LET*-SPECIALS $$LET*-BODY) +SI::CONSTRUCT-MIDDLE-MAN (SI::OBJECT-FN SI::IN-FN) TEDIT.REDO.REPLACE (TEXTOBJ CH#) ERRORMESS1 (MESS3) + \GETBASESTRING (NCHARS BASE BYTEOFFSET STR) FSET.IP (IPSTREAM FINDEX) \TEXTGETFILEPTR (STREAM +CHARSLEFT OFFSET LIMIT) \EDITBM/PUTUP/DISPLAY (BM GRIDSPEC BITSWIDE BITSHIGH WINDOW) TTYIN (OPTIONS +UNREADBUF \BUFFER) \INSPECT.STORE.8 (INSTANCE FIELD NEWVALUE) FB.OPTIONSCOMMAND (BROWSER) +\FIND.PACKAGE.INTERNAL (BASE OFFSET LEN FATP) COMPILER::ENV-ANALYZE-UNWIND-PROTECT (COMPILER::NODE) +GRAPHADDNODE (W) TTSKREAD (CHAR TABLE CH) \RECODECCODE (MAPARRAY CODE) COMPILER::FIND-REACHABLE-TAGS ( +COMPILER::CODE) \TEDIT.TABTYPE.SET (SEL OBJ TEXTOBJ CH# FNARG PC) REMOVE (L X) ETHERPORT (NAME) +COMPILER::ENV-ANALYZE-THROW (COMPILER::NODE) ARRAYRECORD (NAME&FIELDS) EDITBMCLOSEFN (BMW) FILDIR ( +FILEGROUP) COMP.ATTEMPT.COMPILE (TOPFN DEF RECNAME COMFNS) MAKEMACFORMAT (XEROXTOMAC) TTYIN.CLEANUP ( +\TTYINSTATE) RELEASE.PUP (PUP) TTYIN.FINISH (FINALCHAR START CHAR TABLE CH \COMMAND LINE) GRIDYCOORD ( +YPOS GRIDSPEC GY) UNDOLISPX (X) \ITEM.WINDOW.COPY.HANDLER (WINDOW) \TEDIT.CREATEMENU (ITEMS) +DEFAULT.INSPECTW.TITLECOMMANDFN (INSPECTW DATUM) TTYINREAD (FILE RDTBL) HISTORYFIND (LST INDEX MOD +TAIL X0) TERM.TAB (XPOS FONTWIDTH CURSORX) TEDIT.FORMATTEDFILEP (STREAM TEXTOBJ) \SEQUIN.CONTROL ( +CONTROL SEQUIN) UNBREAK0 (FN) TEDIT.CURSOROUTFN (W) LEFTOFGRIDCOORD (GRIDSPEC GRIDX) WTFIX1 (BREAKFLG +FAULTFN DWIMUSERFORM RESULT) TTYIN.READ (CHAR CH FINALCHAR TABLE) \ORIG-READ.SYMBOL (BASE OFFSET LEN +FATP) GETFRAMEVAR.IP (IPSTREAM FV) \TEXTEOFP (STREAM) \INSPECT.FETCH.FATCHAR (INSTANCE FIELD) +BRKDWNCONSES (PTRA0708 VALA0707 BDX BDEXP PTRA0710 VALA0709) TB.USERDATA (NEWDATA) \LETtran (LETTAIL +BINDENTRY VARS VALS) \ORIG-INVALID.SYMBOL (NCOLONS EXTRASEGMENTS BASE LEN) \TFBRAVO.READ.PARALOOKS ( +OLDLOOKS FILE MICASPERPOINT) \TEDIT.FIND.OVERLAPPING.LINE (Y) TB.REMOVE.ITEM (ITEM ITEM# LASTITEM#) +FLIPCURSORBAR (N) \ALLOCHEIGHTTOGROUPEDWINDOW (WGROUPINFO WHEREONEDGE EXTBUCKET TOTALXTRA TOTALNOWSIZE +) \TEDIT.LCASE.SEL (STREAM SEL STR POS LEN POINT TEXTOBJ) TRAJECTORY.IP (IPSTREAM POINTS P) +\TEDIT.SET.WINDOW (TOWIND) \ALLOCWIDTHTOGROUPEDWINDOW (WGROUPINFO WHEREONEDGE EXTBUCKET TOTALXTRA +TOTALNOWSIZE) GETPUPWORD (WORD#) REGIONSINTERSECTP (REGION1 REGION2) \NSFILING.CONNECT (SESSION +DIRPATH DIR CREATE?) \VFMDelete (deleteKey deleteLevel volumePage nextKey) COMP.BLOCK (A CTX BLOCKEND) + NS\FONTFILENAME (FAMILY SIZE FACE EXTENSION CHARACTERSET) \LINEWITHBRUSH (DASHLST DISPLAYSTREAM BRUSH + DISPLAYDATA) GRIDXCOORD (XPOS GRIDSPEC GX) INIT.CURSOR (YBOT COL) SHOWWFRAME (WIN BORDER SAVEIMAGE +DSP) GO.TO.ADDRESSING (ROW COL ABSROW) TRANSLATEREG (INNER OUTER) MOVENODE (OLDPOS POS NODE STREAM +GRAPH) INREADMACROP (NM) TTYIN1 (TTSCRATCHFILE START TABLE CH) MAPDL (MAPDLFN) \TEDITOUTCHARFN ( +CHARCODE) \TFBRAVO.READ.CHARLOOKS (FILE) \INSPECT.FETCH.CHAR (INSTANCE FIELD) POSTSCRIPT.BITMAPSCALE ( +PAGEREGION LONGEDGE SHORTEDGE MINDIML MINDIMP) TB.CLEAR.LINE (BROWSER LEFT ITEM WIDTH) \VFMInsert ( +insertKey insertLevel) READQUOTE (FILE) READVBAR (STREAM RDTBL) PRINTHISTORY (HISTORY FILE EVENT) +READHASHMACRO (RDTBL CHAR STREAM READFN CONTENTS) HREAD (FILE) TERM.SMOOTHSCROLL (CHAT.STATE +FONTHEIGHT DSP TTYWIDTH TTYHEIGHT) UNADVISE (ENTRY) READBQUOTE (FILE) CHARCODE.UNDECODE (CODE) +BYTEBLOCKCOMPILE2 (BLKNAME BLKDEFS ENTRIES INTERNALBLKFNS) MAKEIBMFORMAT (XEROXTOIBM) +\MAKESPACEFORLOCKEDPAGE (VP FILEPAGE) SKIP.HASH.COMMENT (STREAM RDTBL) \SW2BM (P Q CL CB XP XQ YP YQ) +GENERATE (HANDLE VAL) \8859OUTCHARFN (CHARCODE STREAM) CMLREAD.FEATURE.PARSER (EXPR) CL:RETURN-FROM ( +CL::RETVALUES) ESTIMATE-DIMENSIONALITY (CONTENTS) INSPECT/BITMAP (BITMAP WHERE) \INSPECT.FETCH.32 ( +INSTANCE FIELD) READNUMBERINBASE (STREAM BODY RADIX) \INSPECT.COMPUTE.TITLE (DATUM WINDOW) NODEREGION +(NODE) LISPXUSEC (HISTORY) CL:MAKE-SYMBOL (BASE OFFST LEN FATP) MBUTTON.SET.NEXT.FIELD (TEXTOBJ CH# +SCRATCHSEL) COURIER.SIGNAL.ERROR (ERRORFORM PROGRAM PROCEDURE) FILL-VECTOR (VECTOR TOTAL-SIZE START) +MAKEISOFORMAT (XEROXTOISO) \NEWEPHEMERALPAGE (BASE NOERROR) \DONEWEPHEMERALPAGE (BASE VP) +BREAK.NSFILING.CONNECTION (HOST DEVICE) CHARACTER.READ (STREAM TABLEA0348 NEXTCHAR) TERM.SETMARGINS ( +HOMEPOS TOP FONTHEIGHT BOTTOM) SEARCHPDL (SRCHFN) GRID (GRIDSPEC GRIDSHADE HEIGHT SQHEIGHT DS X0 Y0 +WIDTH SQWIDTH) TEDIT.REDO.MOVE (TEXTOBJ EVENT OLDCH# LEN SEL) FILLTRAJECTORY.IP (IPSTREAM POINTS) +DIRCONJ (CONJ) \NSFILING.OPENFILE (DEVICE FILENAME ACCESS RECOG PARAMETERS PAIR) TERM.SET.TAB ( +TERMINAL.X) COMPILER::ENV-ANALYZE-TAGBODY (COMPILER::NODE COMPILER::SEGMENT COMPILER::STMT) +UNIONREGIONS (REGIONS) COMPILER::ENV-ANALYZE-RETURN (COMPILER::NODE) RETVALUES (POS VALUES) +DEFMACRO-LAMBDA-LIST-KEYWORD-P (S) COURIER.READ (TYPE STREAM N WIDTH PROGRAM ITEM BASETYPE NAMEANDTYPE + WHICH) REALFRAMEP (POS INTERPFLG) FLIPNODE (DS NODE) FB.DEPTHCOMMAND (OLDDEPTH) CL:FUNCTION (CL::FN) +INSPECT/ATOM (ATM ALWAYSASKFLG OFFER-INSPECT-CODE? PROFILE WHERE) \INSPECT.FETCH.8 (INSTANCE FIELD) +MAKEEPSFILE (IMAGEOBJ IMAGEBOX FILENAME) LISPXSTOREVALUE (VALUE VALUES) \INSPECTW.VALUE.MARGIN (PROPS +FONT) \TEMPLOCKPAGES (BASE NPAGES) TTPROMPTCHAR (LINE) COMPOSEREGS (OUTER INNER) EXCHANGEPUPS (SOC +OUTPUP TIMEOUT EVENT TIMER) \TEDIT.NEUTRALIZE.CHARLOOKS.MENU (TEXTOBJ) COMPILER::ENV-ANALYZE-PROGV ( +COMPILER::NODE) HELP (MESS1 MESS2) DODIR (LISPXLINE NOP DEFAULTEXT DEFAULTVERS) COMP.MLLIST (FN CC) +COMP.SPREAD (L LSTCHECK LEV FR LP X ARG VAR FN) DIGITBASEP (RADIX) FILECODEBLOCK (NCELLS ARLEN +INITONPAGE) CL:FUNCTIONP (CL::FN) NSDISPLAYSIZE (EXTENSION FAMILY SIZE) TERM.SCROLLDOWN (CHAT.STATE +BOTTOMMARGIN FONTHEIGHT DSP NEARBOTTOM TTYWIDTH TOP) COMPILER::ENV-ANALYZE-SETQ (COMPILER::NODE) +\SEQUIN.PUT (SENDSEQ) MAPHASHFILE (MAPFN) FM.CHANGELABEL (WINDOW NEWLABEL OLDREGION) TEDIT.FORMATFOLIO + (REGIONSPEC PRSTREAM VALUE FOLIOINFO FORMATTINGSTATE REGION) FB.SHAPECOMMAND (BROWSER WINDOW EXTENT) +FB.INFOMENU.WHENSELECTEDFN (ITEM MENU WINDOW INFO) \MATCHPCS (PCNODE) POSTSCRIPTFILEP (FILE) +OPENHASHFILE (FILE SMASH) \FLUSHVM (MAIKO.SYSOUTFILE VAR) \NSFILING.DESERIALIZE (FILENAME DEVICE +SERIALSTREAM) INSPECT/LISTP (LST WHERE) LISPXFIX (INPUT COMS) DECODE.WINDOW.ARG (WHERESPEC WIDTH +HEIGHT BORDER TITLE NOOPENFLG) XCL::SET-CONSTANTP (CL:SYMBOL) TEDIT.FORMATTEXTBOX (CH# PAGEREGION +PRSTREAM VALUE REGION TEXTOBJ) CHARCODE.DECODE (STR) TTYIN.PPTOFILE (STREAM RDTBL *STANDARD-OUTPUT* +EXPRS) DSKDISPLAY (newState oldState) CL:APPLYHOOK (CL::EVALHOOKFN CL::APPLYHOOKFN) STRPOSL ( +\STRPOSLARRAY CHAR TABLE) SET-SYMBOL (CL:SYMBOL VALUE) COMPUTE-MACRO-ARGS (MACRO-CALL-BODY CL:KEYWORD +DEFAULT-VALUE CONTEXT BINDING) \NSFILING.CLOSE.CONNECTIONS (DEVICE ABORT? DEVINFO) MACROS.GETDEF (NAME +) \WRITEDIRTYPAGE1 (RPTR RP) EXPANDMACRO (COMPILE.CONTEXT) \COURIER.HANDLE.ERROR (PROGRAM PROCEDURE +ERRORARGS) EXPAND-DEFMACRO (FORM DEFAULT-VALUE DEF *MACRO-VARS* *MACRO-VALS* VAL) TEDIT.FORMATHEADING +(PAGEREGION PRSTREAM VALUE LOCALINFO FORMATTINGSTATE PC REGION) NEAREST/PT/ON/GRID (GRIDN) +MSUSERVBTABLES (VERB MOD) CL:EVALHOOK (CL::EVALHOOKFN CL::APPLYHOOKFN CL::FORM CL::ENV) SWAPPUPPORTS ( +PUP) \INSPECT.STORE.PTR (INSTANCE FIELD NEWVALUE) CSELECT (L SELECTOR) HASHFILEPROP (HASHFILE PROP) +\AREAINREGIONP (LFT REGION BTM RGHT TOP) COPIEDFILENAME (COPIEDTOSPEC FROMCHARS COPIEDFROMSPEC) +\PEEKCCODE.NOEOLC (STREAM NOERROR) \SPP.PREPARE.OUTPUT (EPKT) NSPRINT (FILE DATASTREAM) \LASTNODE ( +TREE COUNT) \INCCODE.EOLC (EOLCA0804 CHA0805 STREAM BYTECOUNTVAR BYTECOUNTVAL EOLC) \CLIPANDDRAWLINE ( +BITMAP DS WIDTH OPERATION RIGHT LEFT TOP BOTTOM A) COMP.GETBASE (OPCODE) \ILLEGAL.ARG (X) +\FORMATBYTESTREAM (STREAM FORMAT EOLC) TERM.RIGHT (XPOS FONTWIDTH TTYWIDTH NCHARS) PRINTCOMSTRAN ( +MACROS FORM) PREVLINE (LINE) MBUTTON.NEXT.FIELD.AS.ATOM (TEXTOBJ CH# STR) \UNCOPY (X LENGTH PTR SIZE +OFFSET TYPENUMBER BASE) FB.INFOMENU.SHADEINITIALSELECTIONS (MENUWINDOW MENU INITIALSELECTIONS +SELECTION MENUITEMS) TRACKCURSOR (ND DS GRAPH) ICONW (ICON ICONW MASK NOOPENFLG) TEDIT.CURSORMOVEDFN ( +W X Y) COMPILER::PEEPHOLE-OPTIMIZE-CODE (COMPILER::CODE COMPILER::CHANGED-P) TEDIT.FORMATPAGE (CH# +REGION PRSTREAM TEXTOBJ PAGEPROPS PAGEREGION PRE-EXISTING-FONT) EDITBMBUTTONFN (W REG) +\INSPECT.FETCH.PTR (INSTANCE FIELD) TEDIT.UNPARSE.PAGEFRAMES (PAGEFRAME FRAME SUBREGION) LISPXUSE0 ( +GENLST X) COMPILER::ENV-ANALYZE-MV-PROG1 (COMPILER::NODE COMPILER::STMT) TTLOADBUF (STREAM) +MBUTTON.NEXT.FIELD.AS.TEXT (TEXTOBJ CH#) VMEM.PURE.STATE (FLG) \XCCSINCCODE (STREAM BYTECOUNTVAL) +FREEMENU (TITLE BACKGROUND BORDER WINDOW) \TEDIT.APPLY.PAGEFORMATTING (SEL W TEXTOBJ) CLISPDEC1 (X) +\XCCSPEEKCCODE (STREAM NOERROR) INSPECTW.REDISPLAY (WINDOW PROPERTIES DATUM PROPCOMMANDFN FETCHFN +VALUECOMMANDFN NOWEXTENT SELITEM) ADVISE (ARGS WHAT X) \XCCSOUTCHAR (CHARCODE) \SET.LASTVMEMFILEPAGE ( +N) CLISPLOOKUP2 (X) COMPILER::ENV-ANALYZE-PROGN (COMPILER::NODE COMPILER::STMT) +\TEDIT.FILL.IN.CHARLOOKS.MENU (TEXTOBJ) ENDREAD? (CHAR TABLE CH) MBUTTON.NEXT.FIELD.AS.PIECES (TEXTOBJ + CH#) CL:CATCH (\CATCH-FORMS) MAKEINITLAST (P AFL PTR VERSIONS) UNIXCHAT.OPEN (TERMTYPE STR) +\XCCSFORMATBYTESTREAM (STREAM) COMP.LOOKUPVAR (V) \TEDIT.FORMAT.FOUNDBOX? (PAGEREGION) +\GETREGION.CHECKOPPT (BASEPT BASEX MINWID BASEY MINHGHT NEWREGFNS FN) DODIRCOMMANDS (COMMANDS +FILEGROUP COMDATE FILENAME) COMPILE! (X) FGET.IP (IPSTREAM FINDEX) \TEDIT.CONVERT.FOREIGN.FORMAT ( +CONVERSIONFN FILE PREDICATERESULT) CL:CERROR (CL::DATUM CL::ARGUMENTS) TEDIT.PARSE.PAGEFRAMES (ALIST +FRAMESPEC) FB.ALLOW.ABORT (BROWSER W) CONCAT (N) \MAKEBRUSH.ROUND (SIZE) CL:UNWIND-PROTECT ( +\UNWIND-FORMS) COMPILER::ENV-ANALYZE-MV-CALL (COMPILER::NODE COMPILER::ARG) MOVE.TO.LINE (NEWLINE) +MBUTTON.NEXT.FIELD.AS.NUMBER (TEXTOBJ CH#) CL:TAGBODY (TAIL TL) \COPY (X VAL) %%SET-ARRAY-OFFSET ( +NEWVALUE) %%SET-ARRAY-TYPE-NUMBER (NEWVALUE) FB.NEWINFOCOMMAND (WINDOW) HPRINT (FILE EXPR STREAM) +INITSEQUIN (PROCNAME) \REGIONOVERLAPAREAP (REG RGHT LFT TOP BTM) DIRPRINTNAME (FILEGROUP FULLNAME +LASTNAME STREAM) \INVALID.DOTTED.SYMBOL (BASE START LEN FATP) \MVLIST (X) \INVALID.INTEGER (SIGN BASE +START END RADIX) UNIX.HOST.FILTER (HOST) GETGRIDBOXREGION (GRIDINTERIOR WINDOW GRIDREGION BASEPT +RAWREGION GRIDSPEC) LISPXUSE (HISTORY LSPXHST) SETUPPUP (TYPE ID DESTSOCKET) INSPECT/MAKE/CCODEP (CODE +) BRKDWNTIME (PTRA0704 VALA0703 BDX BDEXP PTRA0706 VALA0705) \AREAVISIBLE? (WIN LFT BTM RGHT TOP) +\MAKEBRUSH.SQUARE (SIZE) EDITADDNODE (W GRAPH NewPosition Stream $$OUTPUT MSGW) CACHEMACRO (BODY) +\PUPERROR (ERRCODE MSG) XCL::SET-GLOBALLY-NOTINLINE-P (XCL::FN XCL::VAL) FB.NEWPATTERNCOMMAND (BROWSER +) TEDIT.BUILD.PCTB0 (START PCCOUNT TEXT END N WIDTH TEXTSTREAM) MSADDTYPE (TYPE) POSTSCRIPT.TEXT (FILE + PSCFILE FONTS HEADING TABS) DSPXSCREENTOWINDOW (X DS) \ACTONVMEMFILE (FILEPAGE BUFFER NPAGES +WRITEFLAG) \NSGC.COLLECT.DIRECTORIES (DEVICE DIRPATH) \PRINDATUM.TO.STRING (X \NUMSTR \NUMSTR1 STR +CODE VAL KEY) GETSEQUIN (SEQUIN) \TFBRAVO.SPREAD.LOOKS (RUN INSTR LOOKS) \INSERTTREE (OLD PREV OLDLEN) + TEDIT.FORMAT.HARDCOPY (STREAM FIRSTPG# STARTPG ENDPG TEXTOBJ PRINTOPTIONS TEXTSTREAM SERVER DONTSEND) + FB.YES-OR-NO-P (PROMPT DEFAULT FBROWSER) \STREAM.FROM.PACKET (EPKT) XCL::DECL-SPECIFIER-P (CL:SYMBOL) + XCL::SET-DECL-SPECIFIER-P (XCL::SPEC XCL::VAL) \NSFILING.LOGOUT (SESSION) SHOW.MATCHING.PAREN (BUF +MATCHING) FORMAT-ROUND-COLUMNS (WIDTH MINCOL COLINC) TERPRI (FILE) \TEDIT.APPLY.OLINE (BUTTON NEWLOOKS +) PRIN1 (FILE STRM L X) SPACES (FILE STREAM L N) FIND.MATCHING.WORD (WORDS X START) PRINTNUM (FORMAT +FMT \NUMSTR \NUMSTR1 FILE) CLOSESEQUIN (SEQUIN) \FATTENSTRING (STR) TAB (FILE MINSPACES POS) MAPFILES +(X FN DEFAULTEXT DEFAULTVERS ATTRIBUTES INCLUDE-DIRECTORIES) \PRINTVP (STREAM VP) \TEDIT.UPDATETREE ( +DELTA) \DO.PROGV.SETUP.FRAME.AND.EXECUTE (NNILS NVARS VARS NTSIZE) MB.MARGINBAR.SIZEFN (OBJ BOX) +GETSTREAM (FILE ACCESS NOERROR) POSTSCRIPT.TEDIT (PFILE) SPPSTREAMP (STREAM) \MAKEBRUSH.HORIZONTAL ( +SIZE) \TRANSLATE.3TO10 (PUPHOSTNUMBER NDB MYPUPHOSTNUMBER) \COURIER.TRACE (EVENT PROGRAM PROCEDURE) +\MAPPNAME.INTERNAL (FN X) COMP.EXP1 (E) \GETREGION.CHECKBASEPT (NEWREGFNS) UPIQUOTIENT (N DIVISOR) +SHOW.IP (IPSTREAM) TEDIT.BUILD.PCTB2 (START PCCOUNT TEXT END N WIDTH TEXTSTREAM) FIX (N) +VARSBOUNDINFORM (FORM FN X) \VAMGetVAMPageFor (vol VAMPage# volumePage) RPLSTRING (X Y OLDSTRING N) +ENDPREAMBLE.IP (IPSTREAM) XCL::GLOBALLY-NOTINLINE-P (XCL::FN) MB.MARGINBAR.TABTRACK (OBJ STREAM CLIP +UNIT) EDITAPPLYTOLINK (GRAPH DS ABORTMSG FN MSG) \TEDIT.APPLY.BOLDNESS (BUTTON NEWLOOKS) BKSYSCHARCODE + (CHAR R) MSADDMODIFIER (RELATION table) DSPYSCREENTOWINDOW (Y DS) BKSYSBUF (X CODE) +GC-FILING-DIRECTORY (DEVICE PARSE HANDLE) CL:LOAD (FILENAME STREAM LOADFLG *LOAD-PRINT-STUFF* PACKAGE) + \MAPPNAME (RDTBL *READTABLE* FN X) \TFBRAVO.EOLS (N TEXTOBJ) CHECKFPTOVP1 (VP FP2 FP RPTINDEX) +FB.SORTCOMMAND (TBROWSER) PROCESS.EVALV (PROC VAR P) \IRM.GET.KEYWORDS ($$OUTPUT WINDOW) +\MAKEBRUSH.VERTICAL (SIZE) MSADDRELATION (RELATION ROOT TABLES) CURRENT.WORD (CHAR TABLE CH) +LISPXGETINPUT (INPUT) MDESCALE (UNIT VAL) TEDIT.BUILD.PCTB1 (START PCCOUNT TEXT END N WIDTH TEXTSTREAM +) COMPILER::ENV-ANALYZE-LABELS (COMPILER::NODE COMPILER::FUN) \TEDIT.APPLY.CHARLOOKS (SEL W TEXTOBJ +MAINTEXT) COMPILER::ENV-ANALYZE-IF (COMPILER::NODE) MB.THREESTATE.DISPLAY (OBJ STREAM FONT CURX CURY) +FB.ALPHABETIC.ATTR (X Y) GAINSPACE (X ATM) EDITADDLINK (W) COROUTINE (COROUTFORM## ENDFORM##) WARNUSER + (X VAR) FB.INSERT.SUBDIRECTORIES (FILES FD1 FD2 BROWSER) SHOWCHARS (FONT TOCHAR FROMCHAR) +\SMASHABLESTRING (STR) TERM.IDENTIFY.SELF (CHAT.STATE) \TEDIT.PARSE.CHARLOOKS.MENU (TEXTOBJ) +COMPILER::ENV-ANALYZE-LAMBDA (COMPILER::NODE COMPILER::OPT-VAR COMPILER::KEY-VAR) FB.PROMPTFORINPUT ( +BROWSER PWINDOW PROMPTWIDTH DEFAULT WINDOWWIDTH EXCESSWIDTH) \RPLCHARCODE (X N CHAR BASEA0359 +OFFSETA0358) NTHCHAR (X N FLG RDTBL) COMPARE (NAME1 TYPE NAME2 DEF1 DEF2) \IRM.WILDCARD (WILDATOM LIST + WILDLIST SCRATCH) \TFBRAVO.READ.USER.CM (RDTBL) GNC (X) CL::%%DO-TRANSLATE (CL::X CL::VARS) GNCCODE ( +LEN OFFST) GLCCODE (LEN) DWIMIFY (X) STREQUAL (X Y BASEX BASEY) TYPENAME (X) CL:SYMBOL-PACKAGE ( +CL:SYMBOL) CLISPIFY (X) COMPILE (X) L-CASE (X \PNAMESTRING) ENDPAGE.IP (IPSTREAM) \DWIN (FILE) U-CASEP + (X) \LOCKCODE (CODEBLOCK) \MAKEWRITABLESTRING (STR) \LOCKCELL (X NPGS) SPPOUTPUTSTREAM ( +SPPINPUTSTREAM) RECORD (NAME&FIELDS) CL:1+ (CL:NUMBER) TEDIT.UNDO.REPLACE (TEXTOBJ LEN CH# FIRSTPIECE) + %%MAKE-STRING-ARRAY-FAT (ARRAY) CONCAT.IP (IPSTREAM) \TEDIT.TEXTBIN.STRINGSETUP (PS CHOFFSET +CHARSLEFT) \TFBRAVO.INIT.PARALOOKS (USER.CM.LOOKS MICASPERPOINT) \LOCKWORDS (BASE) +%%MAKE-ARRAY-WRITEABLE (ARRAY) FIX-SUBR-NAME (NAME) ZEROD.FETCHFN (SLICE) \ROUTINGTABLE.INFOHOOK (PROC + TYPE FONT BUTTON) >= (CL::ARGS) TEDIT.GET.OBJECT0 (STREAM FILE CURCH# TEXTOBJ) \#BLOCKDATACELLS ( +DATAWORD TYPENO) \LOCKVAR (VAR) \TEDIT.GET.CHARLOOKS.LIST (N WIDTH FILE) SPELLFILE (FILE) FONTPROFILE +(PROFILE X) FORMAT-DO-ITERATION (*ORIGINAL-ARGUMENTS*) \PUTBASESTRING (BASE BYTEOFFSET) TERM.GODOWN ( +YPOS BOTTOM NLINES) FB.PROMPTW.FORMAT (BROWSER) \FORWARD.PUP (PUP) \TEDIT.SHOW.CHARLOOKS (W MAINTEXT +TEXTOBJ MAINCH#) \PUTBASESTRINGFAT (SBASE SOFFSET DBASE DBYTEOFFSET LEN) HOST&DIRECTORYFIELD (FILENAME +) \TEXTMENU.TOGGLE.DISPLAY (OBJ STREAM FONT CURX CURY) BQUOTIFY (FN X DEFAULT) LOADFNS (FNS VARS) +SCANFILE2 (X) \BrushFromWidth (W) \MAKEBRUSH.DIAGONAL (SIZE) COURIER.WRITE (TYPE STREAM W FIXP PROGRAM + KEY SIZE BASETYPE WHICH) GetBcplString (BASE L) CLEAR-CLISPARRAY (REASON) DRAWAREABOX (W BOXLEFT +BOXBOTTOM BORDER BOXHEIGHT OP BOXWIDTH) AS.CHANGE.OWN.PASSWORDS (USERINFO) SetBcplString (STR L BASE) +ENDMASTER.IP (IPSTREAM) \TEDIT.TEXTBIN.FILESETUP (CHARSLEFT CHOFFSET PC BYTEOFFSET OPERATION +NOERRORFLG BYTESLEFT) \NSRANDOM.OPENFILE (ACCESS RECOG PARAMETERS DEVICE) POSTSCRIPT.HARDCOPYW (FILE +TITLE Landscape? SCALEFACTOR STREAM IMAGEDATA BITMAP SCLIP) \SETARG0 (N BFLINK VAL) +FB.INCREASING.NUMERIC.ATTR (X Y XVAL YVAL) MSADDANALYZE (PLURAL SINGLE word GETDEF-FN MARKCHANGED-FN) +MISCN-NUMBER (NAME) ZEROD.STOREFN (NEWVALUE SLICE) \TEDIT.NEUTRALIZE.CHARLOOKS (W TEXTOBJ CH#) +COMPILER::ENV-ANALYZE-CATCH (COMPILER::NODE) MB.MARGINBAR.DISPLAYFN (OBJ STREAM MODE IMAGEBOX OBJDATUM +) SCANDECLARECOLON (VARLST) ADDTEMPLATEWORD (WORD) TEDIT.UNDO.MOVE (TOOBJ FROMOBJ CH# LEN SOURCECH#) +TEDIT.GET.PAGEFRAMES (FILE) INSPECTW.FETCH (INSPECTW PROPERTY) \GCSCANSTACK (EASP) QUOTE (U) +\IRM.WILD.REF (WINDOW KEYWORD $$OUTPUT MATCH) CL:COMPILE (SPECVARS LOCALVARS GLOBALVARS COMPILER::LAP +COMPILER::DEFN COMPILER::COMPILED-DEFN) TERM.ERASE.IN.DISPLAY (CHAT.STATE PARAM TTYWIDTH YPOS +FONTDESCENT FONTHEIGHT XPOS) COMPILER::ENV-ANALYZE-CALL (COMPILER::NODE COMPILER::ARG) DO?CMD (CMD +\?TAIL FNEND FNSTART FN *READTABLE*) MB.NB.DISPLAYFN (OBJ STREAM OBJBOX BUTTONIMAGES BUTTONY BUTTONX +BUTTONLIST) PTON10GRID (FIXEDPT) BMOBJ.PUTFN (BMOBJ BITMAPOBJ STREAM) \INCUSECOUNT (FRAME) SCANEXP ( +EXP1 EXP2 X) XCCSSTRING (CODE) GETSELECTEDITEMS (WMENU) \TEDIT.APPLY.PARASTYLES (PARALOOKS TEXTOBJ +STYLE-SHEET PC) \PROMPT.FOR.PUP.NUMBER (DEFAULT) INSPECT/AS/BLOCKRECORD (INSTANCE ITEM WHERE) +\MOVEFRAME (OLDFRAME) BMOBJ.GETFN5 (INPUT.STREAM) CONDITIONS::%%RESTART-DEFAULT-REPORTER (CONDITIONS:RESTART + STREAM) CONDITIONS:INVOKE-RESTART-INTERACTIVELY (CONDITIONS:RESTART) SLICESET (ARGS SLICE NEWVALUE +OFFSETCONSTANT OFFSETS) \COURIER.HANDLE.BULKDATA (DATASTREAM) TEDIT.GET.CHARLOOKS0 (N WIDTH FILE) +MBUTTON.FIND.NEXT.BUTTON (TEXTOBJ CH# PCTB) ERROR (MESS1 MESS2) CONDITIONS:INVOKE-RESTART (CONDITIONS:RESTART + CONDITIONS::ARGUMENTS) FB.DECREASING.NUMERIC.ATTR (X Y XVAL YVAL) \EXTENDSTACK (EASP) CL:PRINT ( +OUTPUT-STREAM OBJECT) CONDITIONS:INVOKE-DEBUGGER (CONDITION) \NSFILING.SETFILEINFO (ATTRIBUTE VALUE +NAME.OR.STREAM DEVICE HANDLE SESSION) \RELEASE.IOCB (USE) ONEDINSPECTW.CREATE (PROFILE DATUM WHERE +FETCHFN STOREFN VALUECOMMANDFN PROPCOMMANDFN TITLECOMMANDFN FONT TITLE TITLEFONT TOPRIGHT) +TEDIT.GET.PARALOOKS0 (N WIDTH FILE) LISPFORM.SIMPLIFY (FN) \VAMCheckEndOfVol (volPage# vol) +NEAREST/MULTIPLE (X N) CLIPRECTANGLE.IP (IPSTREAM X Y W H) COMPILER::ENV-ANALYZE-BLOCK (COMPILER::NODE +) TEDITFROMBRAVO (FILIN TEXTSTREAM NEWSTREAM USER.CM) \HANDLE.RAW.PUP (TYPE SOCLO SOCHI) +\NSFILING.GETFILEINFO (ATTRIBUTE DEVICE STREAM) POSTSCRIPT.ENDPAGE (STREAM) GETNODEFROMID (ID NODELST) + CODE.SUBPAIR (L1 L2 FORM) \COURIER.RESULTS (STREAM PROCDEF PROGRAM TYPE PGMDEF NUMBER PROCEDURE +NOERRORFLG) TEDIT.GET.PAGEFRAMES1 (FILE) \SETUPGUARDBLOCK (LEN) FB.DIRECTORYP (FILE) FMAPRINT (FILE) +BEGINPREAMBLE.IP (IPSTREAM) \FIND.LOCALPUPHOSTNUMBER (NDB EVENT) \NSRANDOM.READPAGES (BUFFERS +FIRSTPAGE# EP EO) CODE.SUBST (X Y FORM) INSTALLBRUSH (BRUSHNAME) \POLYSHADE.BLT (ALIST FILL.WRULE +FILL.SHADE STRM FILL.FRULE) XCL::ADD-WHERE-IS-DATABASE (PATHNAME XCL::NEW-PATHNAME) +ARGS.COMMUTABLEP.LIST (L X Y) BREAKLINE (USECR OLDEND OLDLINE) VAR.NOT.USED (FORM SETQONLY?) +CL:MAKUNBOUND (CL:SYMBOL) \NSRANDOM.SESSION.WATCHER (DEVICE) SI::NON-LOCAL-GO (BLIP PC) FROMLINKS ( +NODE) SI::UNWIND-TO-BLIP (BLIP) TEDIT.HARDCOPY (STREAM FILE DONTSEND BREAKPAGETITLE PRINTOPTIONS) +\INIT-MISCN-TABLE (MISCN-ENTRY N) BUTTONPANEL/SELECTION/FN (ITEM MENU WINDOW) BOUNDP (CL::VAR) +SETTTBLPROP (PROP TTBL) POSTSCRIPT.PUTCOMMAND (S.STRS STREAM) EVALUABLE.CONSTANT.FIXP (X) GETMENUITEM +(MENU YGRID XGRID) ED (CL::TYPES-WITH-DEFNS) SI::NON-LOCAL-RETURN (BLIP&VALUES) SLICEDIMENSION ( +SELECTION DIM) DRAW/GRAPHNODE/BORDER (BORDER LEFT BOTTOM WIDTH HEIGHT STREAM) \VARNOTUSED.LIST (L FORM + X SETQONLY?) CL:SYMBOL-NAME (CL:SYMBOL) \UNDEFINED-MISCN-UFN (INDEX ARG-COUNT ARG-PTR) +\WALKOVER.SPECIALFORMS (CLZ PRED REST1 REST2 REST3 L) \VARNOTUSED (FORM VAR) MISCN-COLLECT (ARG-COUNT +ARG-PTR) SI::NON-LOCAL-RETURN-VALUES (BLIP) MB.MARGINBAR.SELFN (OBJ STREAM IMAGEBOX SELWINDOW UNIT +RELX RELY CLIP RIGHTLIM A SCALEDTABS) GET (CL:SYMBOL CL::INDICATOR CL::DEFAULT) +\TEDIT.GET.PARALOOKS.LIST (N WIDTH FILE TEXTOBJ) %%MAKE-ONED-ARRAY (ELEMENT-TYPE FATP DISPLACED-TO +TOTAL-SIZE TYPE-NUMBER READ-ONLY-P FILL-POINTER EXTENDABLE-P DISPLACED-INDEX-OFFSET) +\DECL.COMNT.PROCESS (FORMS) SPY.BUTTON (REG) TWODINSPECTW.CREATE (DATUM PROFILE WHERE FETCHFN STOREFN +VALUECOMMANDFN ROWPROPCOMMANDFN COLUMNPROPCOMMANDFN TITLECOMMANDFN FONT TITLE TITLEFONT TOPRIGHT) SETA + (N BASE V) \CANONICAL.NSHOSTNAME (HOST) CL:THROW (THROW-TAG THROW-VALUE) ARRAY (TYPE ORIG ALIGN BASE +NWORDS) MKCONS (CARPART) AS.MAKE.CONVERSATION (RECIPIENT NONCE) \WALKOVER.FUNCTION (PRED REST1 REST2 +REST3) \10MB.GETPACKETSTATUS (IOCB) \SELITEM.FROM.PROPERTY (INSPECTW PROPERTY) \DELETETREE (OLD OLDLEN +) SI::INTERNAL-THROW-VALUES (TAG) SCANCOMPILEDFN (X FNAME) \TEDIT.EXPANDED.MENU (STREAM) +\MEDW.GETSCREENREGION (NEWREGIONFN A) CL:FMAKUNBOUND (CL:SYMBOL) FB.FETCHFILENAME (ITEM) +USER-SUBR-NUMBER (NAME) TEDIT.GET.OBJECT1 (STREAM FILE CURCH# TEXTOBJ) MSDESCRIBE (FN SN) +SI::PVAR-VALUE-IN-FRAME (FRAME NT ATOM#) BEGINPAGE.IP (IPSTREAM) SETF-SYMBOL-FUNCTION (CL:SYMBOL) +\NSRANDOM.TRUNCATEFILE (LO HANDLE) SI::VARIABLE-NAME-IN-FRAME (FRAME NT CODE) TERM.CLEAR.TAB ( +CHAT.STATE TERMINAL.X) MSDESCRIBE1 (STR) ASSURE.PUP.READY (QUIET) CL:FORMAT (CL::FORMAT-ARGUMENTS +CL::CONTROL-STRING) \WALKOVER.SF.LIST (L PRED X REST1 REST2 REST3) ADD-USER-SUBR (USER-SUBR-NAME +USER-SUBR-INDEX USER-SUBR-UFN) CL:SYMBOL-VALUE (CL:SYMBOL) LOOKUPHASHFILE (KEY1 KEY X Y CALLTYPE INDEX + VALUE) \DISCARDFRAME (OLDALINK ALINK SIZE BLINK) MBUTTON.FIND.BUTTON (LABEL TEXTSTREAM CH# PCTB +LABELATOM) \INIT-USER-SUBR-TABLE (SUBR-ENTRY) \TEDIT.GET.PARALOOKS1 (N WIDTH FILE) +FB.CANONICALIZE.PATTERN (SAMPLE PATTERN PATHOSTEND) CL:FBOUNDP (CL::FN) CL:REMOVE (SEQUENCE LENGTH +ITEM START FROM-END KEY TEST-NOT TEST) NUTF8STRINGBYTES (STRING) BUTTONPANEL (LABELLST LABEL) +\DELETEPIECE (PC) CL:FIND (SEQUENCE LENGTH ITEM START FROM-END KEY TEST-NOT TEST) ITEMOFPROPERTYVALUE +(WINDOW PROPERTY) COMPILER::ANALYZE-TREE (COMPILER::TREE) TEDIT-BOOK (FILES DOC DIRECTORY FILE +PRINT-FILE DONT-SEND) TB.COLLECT.ITEMS (BROWSER) DEFAULTWHENSELECTEDFN (ITEM) ASKUSER1 (CHAR) +CL:SYMBOL-FUNCTION (CL:SYMBOL) \NSRANDOM.WRITEPAGES (BUFFERS FIRSTPAGE# EP HANDLE FIRSTBYTE) SLICEREF +(ARGS SLICE LINEARIZEDARRAY OFFSETCONSTANT OFFSETS) ELT (A N) UNDOLISPX3 (DWIMCHANGE EVENT COMS) +PROCESSPROP (ARGS PROP) \IRM.CHOOSE.REF (REFS KEYWORD REF TYPE) \STARTPUP (SOC EVENT) +MBUTTON.CHANGENAME (OBJ NEWNAME TEXTOBJ) \UNDEFINED-USER-SUBR-UFN (USER-SUBR-INDEX ARG-COUNT ARG-PTR) +EQ-TO-CADR (ITEM LIST) CLEARSTK (PAGE FLG) TERM.ERASEBITS (CHAT.STATE DSP LEFT BOTTOM WIDTH HEIGHT) +\MEDW.CARET.SHOW (CARET) CL:COPY-SYMBOL (CL::SYM CL::NEW-SYM) RELSTKP (X FRAME) SPP.EOFP (STREAM +CONDITION) NUTF8CODEBYTES (N) %#BITSON (N) FASL:CLOSE-FASL-HANDLE (FASL::HANDLE) EQ-TO-CAR (ITEM LIST) + GETTTBLPROP (PROP TTBL) \TEDIT.PRESS.HARDCOPY (PFILE) FB.PROMPTWPRINT (U WINDOW) ASKUSER$ (KEYLST NC +CHAR) \USER-SUBR-UFN (ARG-PTR USER-SUBR-INDEX ARG-COUNT) DWIMIFYREC (NEWVARS PARENT ONEFLG FAULTFN) +COMP.UNWIND-PROTECT (CLEANUPFN) \RANGELIMIT (MIN MAX VAL) LIST (N) \ITEMW.SELECTITEM (WINDOW) +\SETUPSTACK1 (STKEND DEFPTR NARGS ALINK CLINK PC) \TEDIT.EXPANDEDCHARLOOKS.MENU (STREAM) +TEDIT.HCPYFILE (FILE STREAM IMAGETYPE BREAKPAGETITLE) FINDPCNODE (PC) COMP.CATCH (ARG) ERASE/GRAPHNODE + (STREAM NODE) CL:SYMBOLP (X) COMP.GLOBALVARP (X) BEGINMASTER.IP (IPSTREAM) SUBRNUMBER (NAME) +\NSRANDOM.SETEOFPTR (NBYTES STREAM NEWEP NEWEO) TTUNREADBUF (CH) \TEDIT.GET.CHARLOOKS1 (FILE N WIDTH) +\BUILDATWSTRUCTURE (SIDE MAINW ATTACHEDWINDOWS EDGEBUCKETLIST) UTF8HEXSTRING (CHARCODE) +MOST/VISIBLE/OPERATION (SHADE) SETSYNTAXPROP (CH CLASS RDTBL) FB.SELECTEDFILES (BROWSER) +ERASEMENUIMAGE (W MENU) ASKUSERPRIN1 (NODOFLG X) CL:WARN (CL::DATUM CL::ARGUMENTS) FM.GETITEM (WINDOW +ITEMS ID) \UPCASEBASE (OFFSET LENGTH BASE CODE) COURIER.CALL (ARGS PROGRAM PROCEDURE) +XCL::GET-WALKER-TEMPLATE (XCL::X) \RESETSTACK0 (OLDBASE) RECORDBIND (VAL) \CONTEXTAPPLY (CNTXT FN ARG +MYALINK) CL:ASSOC (CL::ITEM CL::A-LIST CL::TEST-NOT CL::TEST CL::KEY) INSPECTW.SELECTITEM (INSPECTW) +\CAUSEINTERRUPT (CNTXT FN) \TEXTMENU.START (TITLE HEIGHT MENU) SPP.READP (STREAM) TTCOMPLETEWORD (CHAR + TABLE X) APPENDOP.IP (OP STREAM) TB.NTH.ITEM (N) \InitCurveBrushes (BRUSHNAME) +ICMLARRAY.TITLECOMMANDFN (WINDOW) /RAISE (TTBL) INTERRUPTED (CH HARDFLG CLASS) WINDOWSIZE (WINDOW EXT) + AS.NEXT.VERIFIER (ADDR BL CONVKEY E) XCL:COMPILE-FORM (COMPILER::LAP) ARCTO.IP (IPSTREAM X1 Y1 X2 Y2) + GETSYNTAXPROP (CH RDTBL) COMP.CALL (F TYP) CRITSECT (SCANY) CREATEPAGES (N VA LOCKFLG BLANKFLG) +FASL:OPCODE-SEQUENCE (FASL::OPNAME) \DISPLAYLINE (TEXTOBJ WINDOW LINE HCPYDS OLDCACHE DS TEXTLEN +THISLINE BASEA0753 LOOKS BASEA0754 CHLIST BASEA0755 WLIST BASEA0756 LEADERFONT DOTWIDTH WINDOWDS) +IRM.CREF.BUTTONEVENTFN (IMAGEOBJ BOUNDBOX HEIGHT WIDTH WINDOW WSTREAM REGION ITEM) +\GATHER-CLEANUP-FORMS1 (EOS BOS) FB.TABLEBROWSER (BROWSER) DO.EDIT.COMMAND (CH) MBUTTON.CREATE (MBFONT + IMAGEFNS MBTEXT REAL-FONT OBJ MBFN) \MEDW.GETSCREENPOSITION (CURSOR) UPDATEPCNODES (DELTA) +CHECKSAMEDIR (DATES) \GATHER-SPECIAL-BINDINGS (NT IVAR FRAME) \MAKE.PROCESS0 (FORM \LINEBUF.OFD) +SPP.BACKFILEPTR (STREAM) CHAT.TYPESCRIPT1 (PWINDOW) COMP.LAM1 (FN DEF) SUB-FORMAT (START END) +\TEDIT.EXPANDEDPARA.MENU (STREAM) GETBOXSCREENREGION (WIDTH HEIGHT ORGX ORGY WINDOW PROMPTMSG) TEDIT.UNPARSE.PAGEFORMAT (PAGEREGION PAPER REGIONS REGION PAPERWIDTH PAPERHEIGHT UNITS HDG) -\\BIGNUM.COMPARE (X Y) \\BIGNUM.QUOTIENT (Y X) ENDREAD? (CHAR TABLE CH) SOME (SOMEFN1) QUOTIENT (X Y) -COURIERPROGRAM (X) SETQQ (X Y) SEDIT::REPLACE-LIST (SEDIT::START SEDIT::END SEDIT::S SEDIT::DELTA-LENGTH - SEDIT::DEPTH SEDIT::CONTEXT SEDIT::POINT) \\BIGNUM.LOGXOR (X Y) TEDIT.DO.BLUEPENDINGDELETE (TEXTOBJ) -EDITTOGGLELABEL (W GRAPH DS) \\BITMAPSIZE.IP (DIMENSION BITMAP) STRMEMB (X) \\PUTBASEFIXP.UFN (BASE -OFFST) SEDIT::PRINT-BROKEN-ATOM (STREAM SEDIT::BROKEN-ATOM) SEDIT::PARSE--STRING (CL:STRUCTURE -SEDIT::CONTEXT) \\FTP.PRINTPLIST (STREAM PLIST PAIR STRING) COMPILER::CLOSURE-ANNOTATE-VAR-REF (COMPILER::NODE - COMPILER::VAR) SEDIT::SET-INITIAL-SELECTION (SEDIT::CONTEXT) WALK-FORM-INTERNAL (XCL::FORM XCL::CONTEXT -) NUMBER.READER.HANDLER (DIGIT MENU) \\FLUSH.NDB.QUEUE (QUEUE EVENT USE) FRPTQ (RPTZ) TTLOADBUF ( -STREAM) SELECTC (M SELCQ) SPYOBJ (NAME PERCENT) \\MAYBEPEEKNS (X XIP XA1596 XA1597) -SEDIT::FIND-AND-DISPLAY-STRUCTURE-BACKWARDS (SEDIT::CONTEXT SEDIT::STR SEDIT::SCOPE SEDIT::TOP -SEDIT::PROMPTWINDOW) TEDIT.REDO.LOOKS (TEXTOBJ EVENT SEL NEWLOOKS) \\STRINGWIDTH.HDCPYDISPLAY (STREAM -STR HARDCOPYFD RDTBL FONT CHARCODE) PRINTXIP (XIP TYPE CALLER) COMPILER::ENV-ANALYZE-RETURN (COMPILER::NODE -) COMPILER::ENV-ANALYZE-PROGN (COMPILER::NODE COMPILER::STMT) RSH (X N) ERSETQ (ERSETX) SAMEPARALOOKS -(FEATURES PARALOOK1 PARALOOK2) MINUSP (CL:NUMBER) MSECT (DUDY X0 DXDV U0 DX DU V0 Y0) SUB1VAR (SUB1X) -WALK-TEMPLATE (XCL::TEMPLATE) \\TAN.OLD (X) NLSETQ (NLSETX) IMINUS (X) SUB1 (X) ZEROP (X) -SEDIT::MAKE-BROKEN-ATOM (STRING) SEDIT::PARSE--LITATOM (CL:STRUCTURE SEDIT::CONTEXT) -\\FTP.PACKFILENAME (PLIST PAIR HOST) TWODINSPECT.TOTALWIDTH (COLUMNWIDTHS SPACE FONT) ADD1 (X) XNLSETQ - (XNLSETQX XNLSETFLG XNLSETFN) SEDIT::PARSE--LIST-INTERNAL (CL:STRUCTURE SEDIT::CONTEXT) -INSPECT.INVERTSELECTION (WINDOW) \\WWCHANGESCREENSIZE (W) CL:CHAR-NAME (CHAR) SUBSET (MAPFN1) -COMPILER::CLOSURE-ANNOTATE-THROW (COMPILER::NODE COMPILER::IN-LOOP-P) CL:CHAR-INT (CHAR) -REGIONONSCREEN (POS WIDTH HEIGHT) CL:CHAR-CODE (CHAR) FIND.MATCHING.WORD (WORDS X START) RESETLST ( -RESETX) SPY.MERGE.CALLEES (NEWORIGINAL OLDCOPY SPYDATA PARENTS) IEQP (X Y) \\MAKE.ITEMS.VERT.ORDER ( -\#ROWS ITEMS \#COLUMNS ROWS EMPTY.STRING ROW) \\BIGNUM.REMAINDER (X Y) RESETSAVE (RESETX FORM) GCD (N2 - N1) \\DSPYPOSITION.HDCPYDISPLAY (HARDCOPYSTREAM) LISPXSUBST (X Y Z) RESETFORM (RESETZ) -SEDIT::FIND-AND-DISPLAY-STRUCTURE (SEDIT::CONTEXT SEDIT::STR SEDIT::SCOPE SEDIT::TOP SEDIT::PROMPTWINDOW -) LOADFNSCAN (DICT) COMPILER::ENV-ANALYZE-PROGV (COMPILER::NODE) \\TEDIT.HISTORYADD (EVENT OETYPE -ETYPE OSTART NSTART OLDEND NEWEND) RESETVARS (RESETX) FILING.CALL (ARGS) XPROD (X0 Y0 DX DY) FIXATOM1 -(POS) ILESSP (Y X) LOAD? (ROOT LDFLG PRINTFLG) \\MAKE.EXPEDITED.STREAM (OSTREAM ACCESS XIP) -\\BSP.SETFILEPTR (STREAM INDX) PUTPUPSTRING (STR) ACCESSFNS (NAME&FIELDS) CL::%NOT-INTEGER-ERROR ( -CL::OBJECT) SELECT1 (M) RESET/NODE/BORDER (BORDER ONBW) DELFROMFILES (FILES NAME FN) WRITE-STRING* ( -STRING END START STREAM) TEXTPROP (X) \\NSRANDOM.WRITE.SEGMENT (SESSION HANDLE FIRSTBYTE BYTESTOSTORE -BUFFERS BULKSTREAM) \\REGIONOVERLAPAREAP (REG RGHT LFT TOP BTM) FIXAPPLY (DWIMUSERFORM) RESETVAR ( -RESETX RESETY RESETZ) \\READNUMBER.OUTLINEREGION (OUTLINESIZE WIN REG N) CL:CHAR-BITS (CHAR) -TTADJUSTWIDTH (DELTA END) CL::%/ (CL::X CL::Y) \\LEAF.TIMEDOUT.EXCESSIVE (W N WIDTH WINDOW) FILESLOAD -(FILES) INSPECT/DATATYPE (DATUM WHERE) CL:CHAR-FONT (CHAR) \\CREATEPRESSFONT (DEVICE FAMILY PSIZE FACE - ROTATION FD) CHARACTER.PRINT (CHAR STREAM) CL:INT-CHAR (INTEGER) FILL.TEST (STRM TEXT YMAX YMIN) -CL:CODE-CHAR (BITS FONT CODE) CHARLOOKS.FROM.FONT (FONT) CL:GRAPHIC-CHAR-P (CHAR) FIXATOM ( -DWIMUSERFORM) \\NSRANDOM.UPDATE.VALIDATION (SESSION HANDLE NEWATTRS) \\AREAINREGIONP (LFT REGION BTM -RGHT TOP) OCTALSTRING (N \\NUMSTR \\NUMSTR1) \\BIGNUM.INTEGERLENGTH (X) LOADCOMP (FILE NAME VAL -FULLNAME LDFLG) \\COURIER.BROADCAST.ON.NET (NET NSOC PROGRAM PGMDEF PROCEDURE PROCDEF \#TRIES) -\\BSPBACKFILEPTR (STREAM) BRH/OFFSET (NODEIDS YINC) TTYINBUFFERSTREAM (BUF END EOFACTION) \\GS.INITBUF - (BUF BUFSIZE) READPLIST (TAB1 STREAM READTABLES NOERRORFLG) ADJUSTLINE (IDEALLENGTH) EDITTOGGLEBORDER - (W GRAPH DS) CL:NAME-CHAR (NAME) INSPECT/HUNK (GCTYPE DATUM WHERE SIZE) FLOAT (CL:NUMBER) CL:DIGIT-CHAR - (FONT WEIGHT RADIX) READ-FILECREATED (STREAM) CL:CHAR-BIT (NAME) CL:SET-CHAR-BIT (NAME) FMINUS (X) -VALUEOF (LINE) BREAK.MSG.INTO.LINES (MSG MSGSTR FONT WIDTH) LOADFROM (FILE LDFLG) FM.TOPGROUPID ( -WINDOW) \\LEAF.NOT.RESPONDING (OUTSTREAM SEQUIN REASON) LESSP (Y X) IDATE (*STR* UCHAR START) IMOD (N) - RANDSET (N Z) COMPILER::ALPHA-LAMBDA-LIST (COMPILER::BINDER COMPILER::AUX) GENSYM? (X) FM.WHICHITEM ( -Y) \\LEAF.RESENDPUPS (SEQUIN) REMAINDER (X Y) RPAQQ (X Y) FEXPT (A N) MINUS (X) SETATOMVAL (X Y) -LOADCOMP? (FILE FULLNAME LDFLG) |PutUnboxed| (PTR NUM) FILL.INCY (TBLE) DO?CMD (CMD \\?TAIL FNEND -FNSTART FN *READTABLE*) CHANGENAME (FN FROM TO) \\PROTECTED.APPLY (FN WINDOW) \\BSPWRITEBLOCK (STREAM -BASE OFF NBYTES) GETPUPSTRING (NC) CH.ADD.MEMBER (DONTCHECK PROPERTY) SETY.IP (IPSTREAM Y) -NODELST/AS/MENU (NODELST POS Y X) MAKEIBMFORMAT (XEROXTOIBM) DMPHASH (L ARRAYNAME A ITEM VAL) \\ATMOUT - (STREAM W) CL:BOTH-CASE-P (CHAR) FIX89TYPEIN (X CLST) \\AREAVISIBLE? (WIN LFT BTM RGHT TOP) -\\TEDIT.COMMAND.LOOP (STREAM NV TEDITSA TEDITFNHASH BLANKSEEN CRSEEN) \\SETCARET (DS Y CLIPREGION X -TEXTOBJ CARET) TEDIT.COMPOUND.PAGEFORMAT (FIRST VERSO RECTO) CL:DIGIT-CHAR-P (CHAR CODE RADIX) CL:MOD -(CL:NUMBER CL::DIVISOR CL::FX CL::FY) \\PRESSFAMILYCODELST (WSTRM) /REMPROP (ATM PROP) FILENAMEFROMID -(|volumename| |stream| |highhalf| |lowhalf| |version|) CL:CHARACTERP (OBJECT) RPAQ? (RPAQX RPAQY) -\\BULK.DATA.CLOSE (CONTINUATION) EQMEMBHASH (V X H) CL:MAKE-CHAR (BITS FONT CHAR) CL:ALPHANUMERICP ( -CHAR) BMOBJ.COPYFN (IMAGEOBJ BMOBJ) CL:STANDARD-CHAR-P (CHAR) CL:STRING-CHAR-P (CHAR) MOVD (FROM TO -FROMCELL NEWFLG) TEDIT.GET.OBJECT (STREAM FILE CURCH# TEXTOBJ) FREMAINDER (X Y) CL:CHAR-EQUAL (N) -FM.ENDEDIT (WINDOW WAITFLG) \\NSRANDOM.WROTE.HANDLE (SESSION) FMAX (K) CL:ALPHA-CHAR-P (CHAR CODE) -TEDIT.ADD.MENUITEM (ITEM) CL:UPPER-CASE-P (CHAR) CL:LOWER-CASE-P (CHAR) MOVD? (TO FROM DONTCOPY) -\\BSP.GETNEXTBUFFER (WHATFOR) \\TEDIT.NEUTRALIZE.PARALOOKS.MENU (SEL TEXTOBJ) GETPUPSTREAM (LENGTH -ACCESS WRITEXTENSIONFN) |\\VFMBlankInterval| (|volNum| |intervalCache|) ERRORX (ERRORPOS) SETYREL.IP ( -IPSTREAM) CL:CHAR-GREATERP (N) \\IBMPEEKCCODEFN (STREAM NOERROR) LOADPOLY (A B C D) \\DWOUT (FILE -NUMBER) CL:CHAR-NOT-GREATERP (N) RETDWIM1 (L $TAIL $CURRTAIL X) FLESSP (Y X) TTRATOM (STRM) -\\TEXTCLOSEF (STREAM TEXTOBJ) RPAQ (RPAQX RPAQY) CL:CHAR-NOT-EQUAL (N) PROPNAMES (ATM) NCONC1 (LST X) -U/L-CASE (N NEXTWD) PUTPUPBYTE (BYTE# VALUE) DO.INSERT.LINE (WIDTH) ODDP (INTEGER) SETXYREL.IP ( -IPSTREAM) EDITMOVENODE (WINDOW DS) GETDEFN (A) CL:CHAR/= (N) SELECTQ1 (M) POWEROFTWOP (X) SHOWREGION ( -REGION STREAM) FNS.PUTDEF (NAME REASON) CL:CHAR-NOT-LESSP (N) %MAP-FOR-RESULT-MULTIPLE (SEQUENCES -RESULT-TYPE MIN-LENGTH) \\BSP.HANDLE.DATA (SOCKET) TTUNREADBUF (CH) IMAX (K) %MAP-FOR-EFFECT (FUNCTION - SEQUENCE) COMPILER::ALPHA-LABELS (COMPILER::*ENVIRONMENT* COMPILER::BINDING CL:LABELS COMPILER::STRUCT - COMPILER::BINDINGS) %MAP-FOR-EFFECT-MULTIPLE (SEQUENCES) CL:CHAR-LESSP (N) -XCL::UNDOABLY-SETF-SYMBOL-FUNCTION (CL:SYMBOL) BSPFORCEOUTPUT (DEMANDINGLY) IGEQ (X Y) -%MAP-SINGLE-FOR-EFFECT (FUNCTION SEQUENCE) ILEQ (X Y) DELDEF (LST FIELD P) %MAP-SINGLE-TO-LIST ( -FUNCTION SEQUENCE) \\BSP.HANDLE.ACK (PUP) FIXSPELL (SPLST FLG) CL:FIND-PACKAGE (NAME) FIXLAMBDA (DEF) -%MAP-FOR-RESULT-SINGLE (SEQUENCE RESULT-TYPE LENGTH RESULT) GEQ (X Y) \\LOAD-STREAM (STREAM LDFLG -PRINTFLG PACKAGE) FTIMES (N) \\GETBASEFLOATP (BASE OFFST) UNSAFE.TO.MODIFY (FN OPTION) ADDPROP (PROP) -%MAP-TO-SIMPLE (RESULT-TYPE FUNCTION SEQUENCE) MSREHASH (HA) FMIN (K) EQMEMB (X Y) CL:CHAR< (N) -FM.EDITITEM (WINDOW) %SOME-MULTIPLE (SEQUENCES) MIN (K) HASDEF (NAME NODEF OPTS) %MAP-SINGLE-TO-SIMPLE - (RESULT-TYPE FUNCTION SEQUENCE) |\\PFReplaceString| (|maxLength| LENGTH STRING |startLoc| |lengthLoc| -) TB.EXPANDFN (WINDOW) %MAP-TO-LIST (FUNCTION SEQUENCE) CL:CHAR> (N) %NOTANY-MULTIPLE (SEQUENCES) -READ-UNICODE-MAPPING-FILENAMES (FILESPEC) CL:CHAR>= (N) LOAD (FILE PRINTFLG) TEDIT.STREAMCHANGEDP ( -STREAM) EQUALN (X Y) COMP.VALN (L) %SOME-SINGLE (SEQUENCE) PSCFONT.READFONT (FONTFILENAME S) -COMPILER::ALPHA-IF (COMPILER::PRED-FORM COMPILER::THEN-FORM COMPILER::ELSE-FORM) \\SPP.SYSPKT (CCBITS) - \\SEL.LINEDESC (SEL) CLISPFOR0 (EXP LC PTRS UNDOLST) CH.ADD.GROUP.PROPERTY (DONTCHECK X PROPERTY -DATASTREAM) \\IBMINCCODEFN (STREAM) FILECOMSLST (FLG TYPE FILE) TEDIT.PUT.OBJECT (PIECE FONTFILE -OBJECT OFILE FONTCH# CURCH#) \\PUTBASEFLOATP (BASE OFFST VAL) TB.SHRINKFN (WINDOW) %EVERY-MULTIPLE ( -SEQUENCES) \\BSP.HANDLE.INTERRUPT (PUP DIF #:G843) TTRUBOUT (PREVL) SCALE.FONT (WID STR) MAKEHASH (N) -\\BOXFQUOTIENT (BOX) \\BOXFTIMES2 (BOX) SETX.IP (IPSTREAM X) FM.EDITP (WINDOW) GRAPHEDITCOMMANDFN ( -GRAPHWINDOW) TYPE.BUFFER (END PC) CL:CHAR<= (N) BRH/LAYOUT (MOMLST X W Y N) SUBHASH (ITEM ARRAY VAL) -\\BOXFPLUSDIF (BOX) LEQ (X Y) SETXY.IP (IPSTREAM X Y) FM.SHADE (WINDOW X SHADE) CL::STEP-SLEEP ( -CL::FUNCTIONS) TRACKNODE (W) FPLUS (N) RETDWIM (ARGS) PUTDEFN (FN SIZE CA BASE BLOCKINFO) -TB.FLUSH.WINDOW (WINDOW) COERCETEXTOBJ (STREAM TEXTOBJ TYPE PCTB) \\EDIT.DOWNCARET (DS X Y) -\\SEARCHINTERPRESSFONTS (FAMILY PSIZE FACE ROTATION) TERM.MOVETO (CX FONTWIDTH CY) COMP.VAL1 (L) -\\SETRTPPORTS (PUP SOCKET) \\LFINITCASEARRAY (CASEARRAY) COMPILER::ALPHA-IL-FUNCTION (COMPILER::FN) -MAPRINT (LSPXPRNTFLG FILE) LCSKIP (FN FLG) TTCOMPLETEWORD (CHAR TABLE X) NOT (X) -\\BSP.HANDLE.INTERRUPTREPLY (PUP) CL:CHAR= (N) FILEMAP (FILEMAP) CL:GET-DISPATCH-MACRO-CHARACTER ( -SUB-CHAR DISP-CHAR READTABLE) IMIN (K) CL:SET-SYNTAX-FROM-CHAR (TO-CHAR FROM-CHAR FROM-READTABLE -TO-READTABLE) PUTPUPWORD (WORD# VALUE) NLIST (N) GETPUPBYTE (BYTE#) FIND-MACRO-FUNCTION (FORM) -ADDSPELL (X N) CL:GET-MACRO-CHARACTER (CHAR READTABLE) PUTFILEMAP (FILE FROMFILE?) DO-DISPATCH-MACRO ( -RDTBL CHAR STREAM DISP-CHARACTER *READTABLE*) ADDHASH (ITEM ARRAY VAL) \\BIGNUM.TO.FLOAT (X) -HASH-LEFT-PAD-INITIAL-CONTENTS (SIZE IVAL-LIST PADLENGTH) FM.REDISPLAYMENU (WINDOW) \\INFINITY (SIGN) -FIXEDITDATE (EXPR) MAX (K) ADDFILE (FILE ROOTNAME PRLST) %NOTEVERY-MULTIPLE (SEQUENCES) -CL:SET-MACRO-CHARACTER (CHAR READTABLE) LISPXREADP (FLG) |\\VFMCorrectBufferP| (BUFFER VOLPAGENUM) -CL:MAKE-DISPATCH-MACRO-CHARACTER (CHAR READTABLE) CL:SET-DISPATCH-MACRO-CHARACTER (DISP-CHAR READTABLE - NEWTABLE FUNCTION) \\MAKEFLOAT (SIGN) \\TEXTBOUT (TEXTOBJ CH# BYTE STRING) DINFO.TOGGLE.GRAPH (WINDOW - ITEM GRAPH) PROMPTCHAR (X) \\FILLRTPPUP (LENGTH TYPE SOCKET) IL-UNWRAP-MACRO (FORM) SMASHFILECOMS ( -FILE) \\DO-DEFINE-FILE-INFO (ARGS TAIL P R) \\IBMOUTCHARFN (STREAM CHARCODE) \\10MB.LOADINPUTQ (NDB) -\\MATMULT441 (ABASE BBASE CBASE) COMPILER::ALPHA-GO (COMPILER::TAG COMPILER::DEST) ZEROD.FETCHFN ( -SLICE) \\SEL.LIMIT (SEL) \\MATMULT144 (ABASE BBASE CBASE) ZEROD.STOREFN (NEWVALUE SLICE) -CL-MACRO-WRAPPED-P (FORM) UTOXCODE (UNICODE) LISPXPUT (PROP L) |PutFloat| (PTR N) CL-UNWRAP-MACRO ( -FORM) MOVETO.IP (IPSTREAM X Y) FIND.NON.SPACE (CH) FILEPKGCHANGES (N) \\DSKDISPLAY.RESHAPEFN (W REG) -\\MATMULT331 (ABASE BBASE CBASE) \\CML-LOAD (PACKAGE STREAM EOF-MARK FULL) DECREASING.FONT.LIST (SIZE) - FASL:PROCESS-FILE (FASL::TEXT STREAM) SETXREL.IP (IPSTREAM) \\STRINGIN (SETLEN N WIDTH LEN STREAM) -\\BSP.HANDLE.ERROR (PUP #:G842) \\MATMULT333 (ABASE BBASE CBASE) \\FLOAT (X) \\CURVE2 (DASHLST -DISPLAYSTREAM BRUSH SPLINE DISPLAYDATA A XPOLY X/PRIME/POLY YPOLY Y/PRIME/POLY D3XFACTOR D3YFACTOR -DDDX/PER/SEG DDDY/PER/SEG) COURIER.READ.BULKDATA (STREAM PROGRAM TYPE DONTCLOSE) CLISPATOMIS2 ($TYP) -ROOTFILENAME (NAME) FILECREATED (X FILEDATE) \\TEDIT2 (WINDOW) \\MATMULT133 (ABASE BBASE CBASE) COERCE - (CL::OBJECT CL::RESULT-TYPE CL::SUBTYPE) RAISEP (TTBL) DINFO.TOGGLE.MENU (WINDOW ITEM GRAPH -SUBNODE.MENU.WINDOW) EDITE (COMS ATM TYPE IFCHANGEDFN OPTIONS) \\BITMAPTOSCREEN (BITMAP) TTNLEFT (BUF) - HASH-A (STREAM PARAM CONTENTS) \\CREATEINTERPRESSFONT (FAMILY SIZE FONTFACE ROTATION DEVICE) READLINE - (FL RDTBL) \\ARBIN (N WIDTH LEN STREAM) REDISPLAYGRAPH (WINDOW REGION) TEDIT.FIND.OBJECT (OBJ) -SLICESET (ARGS SLICE NEWVALUE OFFSETCONSTANT OFFSETS) CLISPATOMARE1 (X FLG) LOOKUP-SYMBOL (TABLE VEC -SXHASH LEN HASH ENTRY-HASH SYMBOL-NAME STRING H2) HASH-LEFTPAREN (STREAM XCL-USER::T0 VEC) HASH-B ( -STREAM CHAR PARAM) UPDATEFILEMAP (DECLARESTRING FILEMAP) DEFINE-FILE-INFO (ARGS) HASH-C (STREAM CHAR -PARAM) TESTRELATION (RELATION ITEM TABLE) SHRINKBITMAP (BITMAP WIDTHFACTOR HEIGHTFACTOR WIDTH HEIGHT -HFACTOR BITSPP DESTINATIONBITMAP WFACTOR DESTINATION SCRATCH) COMPILER::ALPHA-FUNCTION (COMPILER::FORM -) FM.REDISPLAYITEM (WINDOW) \\TEDIT.STRIKEOUT.CARET.OFF (TEXTOBJ TEXTSTREAM SEL) -\\LEAF.REPAIR.BROKEN.PUP (OLDSEQUIN) BKSYSBUF.GENERAL (TYPE) XTOUCODE (XCCSCODE) TB.CLOSEFN (WINDOW) -HASH-COLON (STREAM CHAR PARAM) LINETO.IP (IPSTREAM X Y) TTYIN.BALANCE (ADDPARENS CHAR TABLE CH) -FILEDATE (CFLG) TEDIT.FIND.OBJECT.SUBTREE (OBJ) FILE-NAME (FILE NAME) \\NSRANDOM.HANDLE.ERROR (ERROR -STREAM DEVICE SESSION PROCEDURE) REMPROPLIST (ATM PROPS) %NUMERIC-STRING-P (STRING) DINFO.TOGGLE.TEXT -(WINDOW DINFOW GRAPH MONITORLOCK ITEM) \\FAST4BIT (A N B MAP) \\CREATE.TTY.OUTCHARFN (CHAR) TTNTH (END -) ONEDINSPECTW.CREATE (PROFILE DATUM WHERE FETCHFN STOREFN VALUECOMMANDFN PROPCOMMANDFN TITLECOMMANDFN - FONT TITLE TITLEFONT TOPRIGHT) %PRINT-PATHNAME (STREAM S) /PUT (PROP VAL) FILECREATED1 (X FILE) -SETSPACE.IP (IPSTREAM SPACEWIDTH) |\\PFFetchString| (|lengthLoc| |maxLength| STR |startLoc|) HASH-DOT -(STREAM CHAR PARAM) SIZE/GRAPH/WINDOW (GRAPH WINDOW/TITLE GRAPHREG) \\COMMONBACKCHARFN (STREAM) -\\ITEMW.FLIPCOPY (ITEM DS REG) ENUM-STRING (OUTSTR \\NUMSTR \\NUMSTR1) %DIRECTORY-COMPONENT-EQUAL ( -COMPONENT1 COMPONENT2) FIND.SYMBOL (STRING LENGTH HASH PACKAGE EHASH HEAD A0348 A0350 A0346) -TB.CLOSE/SHRINK (WINDOW BROWSER FLG) MAKEFLOATNUMBER (N0 N1) DMCHAT.HANDLE.WRAP (CHAT.STATE) -BSP.PUTINTERRUPT (STREAM TIMER CODE STRING) HASH-DOUBLEQUOTE (STREAM CHAR PARAM) APPENDINTEGER.IP (N -STREAMA1585 NUMA1584 STREAM LEN) AT.END.OF.TEXT (BUF CH) CLISPATOMARE2 (L) \\QUEUE.INPUT.IOCB (NDB -LENGTH BUFFER) PARSE-NAMESTRING1 (START) MAPRELATION (MAPFN RELATION MAPW MAPFN2 MAPX HT2 MAPZ Z) -COMPILER::ALPHA-FUNCTIONAL-FORM (COMPILER::FORM) BOOTSTRAP-NAMEFIELD (FILE) \\FILLINSPP (CON) -%PRINT-DIRECTORY-COMPONENT (S STREAM) \\TEDIT.STRIKEOUT.CARET.ON (TEXTOBJ TEXTSTREAM SEL) -EXPANDING-PAGEFULLFN (W OLDREGION INCREMENT CURRENTHEIGHT) \\FM.EDIT-STRINSERT (STRING N CHAR) -HASH-PLUS (STREAM CHAR PARAM) PARSERELATION1 (ROOT MOD) COMPILER::ALPHA-EVAL-WHEN (COMPILER::TIMES -COMPILER::FORMS) DECLARE\: (X) CL:VECTOR-PUSH-EXTEND (NEW-ELEMENT EXTENSION-SIZE) FM.RESETSHAPE ( -WINDOW) \\TEDIT.UNDERLINE.CARET.OFF (TEXTOBJ TEXTSTREAM SEL) HASH-O (STREAM CHAR PARAM) ENDFILE (FILE) - RESETBUFS (FORMS) HASH-R (STREAM) FIND.PACKAGE (NAME ITEM HA BASEA1812) HASH-ILLEGAL-HASH-CHAR (CHAR) - HASH-QUOTE (STREAM CHAR PARAM) DMCHAT.ADDRESS (CHAR ADDRESSING NEXTPOS CHAT.STATE) -DINFO.TOGGLE.HISTORY (WINDOW ITEM GRAPH HISTORY.MENU.WINDOW) BLTPATTERN.GENERIC (SRCE DW DX SX SY DEST - OPER) SLICEDIMENSION (SELECTION DIM) FM.RESETGROUPS (WINDOW GROUPLIST) HASH-STAR (STREAM CONTENTS LEN - BITARRAY) HASH-COMMA (STREAM CHAR PARAM FORM) |\\LFExtendFile| (|stream| |vol| |fileDesc| -|minBackingFileSize|) %MAKE-PATHNAME (HOST DEVICE DIRECTORY NAME TYPE VERSION) HASH-S (STREAM CHAR -PARAM) ATTACHMENU (MENU EDGE MAINWINDOW POSITIONONEDGE NOOPENFLG) \\MAKERECODEMAP (CODEMAP CSMAP -MAPARRAY) TEDIT.EDIT.OBJECT (STREAM) FNUM-STRING (MANTSTR DIGITS INTEXP OUTSTR POINTPLACE) HASH-X ( -STREAM CHAR PARAM) CLISPCAR/CDR2 (X) PUTPROPS (X Y) \\TEDIT.PAPERWIDTH (PAPERSIZE) HASH-VBAR (CHAR -PARAM STREAM) \\MATMULT444 (ABASE BBASE CBASE) HASH-MINUS (STREAM CHAR PARAM) DOWINDOWCOM (ARGS) -TB.PROCESS (FORM NAME RESTARTABLE) CL:VECTOR-PUSH (VECTOR) HASH-EQUAL (NEWNODE STREAM) TERM.PRINTCHAR -(DSP DISPLAYDATA CHAR XPOS) MOVE.TO.WHEREVER (BUF) \\10MB.STARTDRIVER (MYNSNUMBER) \\FM.EDIT-STRDELETE - (STRING N M) FASL-FILEDATE (STREAM X CFLG) HASH-STRUCTURE-LOOKUP (SLOTCONTENTS) DWIMIFY1 (FORM) -FM.RESETMENU (WINDOW ITEM NWAY) \\TEDIT.UNDERLINE.CARET.ON (TEXTOBJ TEXTSTREAM SEL) -\\LEAF.USE.NEW.CONNECTION (SEQUIN) PRETTYCOMPRINT (X) GET-FILEMAP-FROM-FILECREATED (STREAM) FLTINTLOG -(TEXP THI TLO RESULT) GETPROMPTWINDOW (MAINWINDOW STRWIDTH MAINWIDTH) CMLREADSEMI (STREAM) -CLISPATOMIS1 (SUBJ X OBJ ALST) OLD.FIND.SYMBOL (OFFST LEN BASE NEWATOM) CLISPEXPANSION (X) -SI::CANONICALIZE-ADVICE-SYMBOL (CL:SYMBOL) NODECREATE (ID POS LABEL FONT TONODEIDS FROMNODEIDS BORDER -LABELSHADE) \\TEDIT.PAPERHEIGHT (PAPERSIZE) \\SEARCHPRESSFONTS (FAMILY PSIZE FACE ROTATION) EXPANDBM ( -SRCEBM DESTX DESTY XSCALE XSPACE YSCALE YSPACE DESTBM) TILE (SRC DST) TWODINSPECTW.CREATE (DATUM -PROFILE WHERE FETCHFN STOREFN VALUECOMMANDFN ROWPROPCOMMANDFN COLUMNPROPCOMMANDFN TITLECOMMANDFN FONT -TITLE TITLEFONT TOPRIGHT) INIT-CML-READTABLES (FILETBL) SETFONT.IP (IPSTREAM FONTNUM) \\TEDIT.SCALE ( -VALUE SCALEFACTOR) EDITGRAPH2 (W) GET-ENVIRONMENT-AND-FILEMAP (FULL) \\DRAWARC.GENERIC (NDEGREES -CENTERX CENTERY RADIUS STARTANGLE BRUSH DASHING STREAM) GLC (X) CLISPCAR/CDR1 (N) SYMBOL.PNAME (N) -\\MAKEFRAME (FN ST ALINK CLINK END DEF ARGS ARGLOCN) HASH-LEFTANGLE (CHAR PARAM STREAM) COMPILER:ENV-FBOUNDP - (COMPILER:ENV) TTECHO.TO.FILE (FILE STREAM CHAR) BLTPATTERN.REPLACEDISPLAY (DW DH DEST DX DY SRCE SX -SY) CL:SPECIAL-FORM-P (CL::X) EDITGRAPH (G W) HASH-NUMBER-SIGN (PARAM CIRCLE-PART) \\GETBASEFIXP ( -|\\NewBaseAddr| BASE OFFST) \\EXTFTIMES (EXPX EXPY) SYMBOL.PACKAGE (N INDEX) GLOBAL-MACRO-FUNCTION ( -ENV X) RPLCHARCODE (X CHAR LEN BASEA1772 OFFSETA1771 STRING) \\FILLBSPPUP (LENGTH TYPE ID REQUEUE -SOCKET) SET-FILL-POINTER (NEWVALUE) FLTSTR (\\NUMSTR \\NUMSTR1) CL::%COPY-TIME-STATS ( -CL::DESTINATION-BLOCK CL::REFERENCE-BLOCK) \\CHECKSUM (BASE NWORDS) FILLCIRCLE.IP (STREAM RADIUS -CENTERX CENTERY TEXTURE OPERATION) \\10MB.INPUT.INTERRUPT (NDB LENGTH) \\MAIKO.PUNTBLTCHAR (CHARCODE -DISPLAYSTREAM) COMPILER::ALPHA-COMPILER-LET (COMPILER::BINDINGS COMPILER::BINDING COMPILER::BODY) -\\DL.FAULTINIT (BASE) \\TEDIT.SUPERSCRIPT.CARET (TEXTOBJ TEXTSTREAM SEL) DINFO.FMENU.HANDLER (WINDOW -ITEM TYPE GRAPH BUTTONS) \\CONVERTNUMBER (N MAGNITUDE NS R DIGIT NSB) SLICEREF (ARGS SLICE -LINEARIZEDARRAY OFFSETCONSTANT OFFSETS) MSDWIMTRAN (EXPR) LOOKUP-ENVIRONMENT-AND-FILEMAP (FULL KEY -ENTRY) \\FILEMAP-HASHOVERFLOW (HARRAY VAL ROOT KEY) SI::ADD-OLD-STYLE-ADVICE (SI::OLD-ADVICE) -SCALEPAGEXUNITS (FACTOR PAPERSIZE LANDSCAPE?) \\TEDIT.PARSE.CHARLOOKS.LIST (TEXTOBJ) \\D01.FAULTINIT ( -WIDTH) \\EXTFQUOTIENT (EXPX EXPY) \\MP.ERROR (STRING ARG1 ARG2) HASH-BACKSLASH (STREAM) FLUSHFILEMAPS -(ROOTNAME ME FULLNAME) FM.RESETSTATE (WINDOW X INITSTATE) CL:MACROEXPAND (CL::ENV) -\\CONVERT.FLOATING.NUMBER (OUTSTR OSINDEX OUTSTRPTR \\CFNSTRING) TERM.ADDLINE (CHAT.STATE ATYPOS DSP -FONTHEIGHT TTYWIDTH Y) CL:COMPILE-FILE (CL:LOAD COMPILER::*LAP-STREAM* COMPILER::INPUT-FILE) -\\SETIOPOINTERS (KBDBASE) LISPSOURCEFILEP (HERE) READVISE1 (FN NAME) SCALEPAGEYUNITS (FACTOR PAPERSIZE - LANDSCAPE?) CL:LOG (CL:NUMBER) CIRCSHADE.IP (STREAM RADIUS CENTERX CENTERY TEXTURE OPERATION) -\\TEDIT.PARSE.PARALOOKS.LIST (SPEC) \\HANDLE.RAW.PACKET (PACKET TYPE) ICMLARRAY.VALUECOMMANDFN (ARGS -SETABLEMENU INSPECTABLEMENU) SPY.DRAWBOX (BITMAP BORDERWIDTH HEIGHT TEXTURE WIDTH) MSPRGDWIM ( -FILEPKGFLG NOSPELLFLG X FN DEF) CH.LIST.ORGANIZATIONS (ORGANIZATIONPATTERN) COMPILER::ALPHA-CATCH ( -COMPILER::TAG COMPILER::FORMS) WALK-FORM (XCL::X XCL::FORM XCL::RESULT) \\SPPWATCHER (SOCEVENT -ACKINTERVAL) GETMENUITEM (MENU YGRID XGRID) \\TEDIT.ITALIC.CARET.ON (TEXTOBJ TEXTSTREAM SEL) -CL:MAKE-ARRAY (RANK NELTS DISPLACED-TO ELEMENT-TYPE DISPLACED-INDEX-OFFSET FATP INITIAL-CONTENTS -INITIAL-ELEMENT) PARSE-DEFMACRO (ARGUMENT-LIST) \\COPYSEL (FROM) CL:MACRO-FUNCTION (CL::X CL::ENV) -DIRECTORY.FILL.PATTERN (PATTERN DEFAULTVERS DEFAULTEXT) \\GETPRESSFONTNAMES (FACE WSTRM PSIZE -FAMILYCODELST FAMILY MICASIZE ROTATION) \\NSRANDOM.PREPARE.CACHE (NPAGES OLDSIZE) CHANGETRAN1 ( -RECORDEXPRESSION CHANGEWORD) ADDNAKEDCHAR (CHAR) |\\LFExtendFileIfNecessary| (|buffers| -|streamFirstPage| |runLength| |stream|) TERM.DOWN (YPOS BOTTOM XPOS FONTHEIGHT NLINES DSP) -COMPILER::CRACK-DEFMACRO (COMPILER::FORM) TTDELETECHAR (PREV) \\PARSE.PORTCONSTANT (STRING) STORETABLE - (KEY TABLST VALUE Z OLDREL) TEDIT.INCLUDE (FILE START-OF-PIECE INSPC#) CL:TRUNCATE (CL:NUMBER -CL::DIVISOR) COMPILER::ENV-BIND-FUNCTION (COMPILER::NAME COMPILER::KIND COMPILER::EXPN-OR-VAR COMPILER:ENV -) SETRGB.IP (IPSTREAM RED GREEN BLUE COLORMODEL.FVAR) TEDIT.PARSE.PAGEFRAMES1 (VAL ALIST FRAMESPEC) -GRAPHDELETENODE (NODE WINDOW) BLTPATTERN (DEST DX DY DW DH) TTDELETEWORD (N TAIL) \\FLOATINGSCALE ( -INTEXP TEXP THI TLO BOX) GETVERBTABLES (ROOT MODIFIER Y) TEDIT.GET (FILE UNFORMATTED? -TEDIT.GET.FINISHEDFORMS FORM) COMPILER::MAKE-CHILD-ENV (COMPILER::PARENT) FM.HIGHLIGHTITEM (WINDOW) -EDITDELETENODE (W GRAPH DS TOND FROMND) \\COMPUTE.ARC.POINTS (NDEGREES ANGLESIZE RADIUS STARTANGLE -CENTERX CENTERY) SCALEBM (DESTBM SRCEBM XSCALE YSCALE SRCEX SRCEY DESTX DESTY) \\NSRANDOM.FETCH.CACHE -(STREAM PAGENO) \\MEDW.CARET.SHOW (CARET) \\FM.EDIT-DELETE (REGION PIVOT BOTTOM HEIGHT -SI::$PROG1-FIRST-EXPRESSION$) PRINT-READER-ENVIRONMENT (ENV STREAM) SYMBOL.VALUE (SYMBOL LOC) -\\10MB.OUTPUT.INTERRUPT (NDB) COMP.NAMEDLET (ARGS FN X) FM.GETITEM (WINDOW ITEMS ID) -\\TEDIT.APPLY.PARALOOKS (SEL W TEXTOBJ TAB A B MAINTEXT) LVLPRINT (X FILE CARLVL CDRLVL TAIL) -COMPILER::ALPHA-COMBINATION (COMPILER::FN COMPILER::ARGS) |\\LFRemoveDirEntry| (|dirStream| |stream| -ENTRYSIZE) \\SPP.SENDPKT (EPKT ACK# ALLOC#) \\TEDIT.SUBSCRIPT.CARET (TEXTOBJ TEXTSTREAM SEL) -\\CLOSELEAFCONNECTION (CONN) CL::STEP-PRINT (CL::FORM) %PATHNAME-EQUAL (PATHNAME1 PATHNAME2) -\\BN.DIFFERENCE (U V) LVLPRIN1 (X CARLVL CDRLVL TAIL) SI::ADVICE-ADDTOCOM (TYPE SI::COM SI::NAME) -XCL::PPRINT-DEFINER-FITP (XCL::ITEM) FILLNGON.IP (IPSTREAM TEXTURE OPERATION CENTERX CENTERY RADIUS) -CLISPLOOKUP (WORD $VAR1 $VAR2 $LISPFN) \\FM.EDIT-GETPOINTERINFO (LEFT STRING FONT) -TB.SHOW.COPY.SELECTION (BROWSER ITEM) |\\LFReturnInfo| (GENERATED PROP) CLISPATOM2C (Y X) -MAKE.LOCAL.ATOM (ATM.NAME PKG.NAME) TERM.DELCHAR (CHAT.STATE DSP XPOS FONTWIDTH Y TTYWIDTH FONTHEIGHT) - %FLATTEN-ARRAY (ARRAY) \\FM.EDIT-WORDDELETE (STRING SI::$PROG1-FIRST-EXPRESSION$) -XCL::%DEFINE-TYPE-SAVE-DEFN (XCL::NAME CL:HASH-TABLE) MSINIT (DATABASE) INFINITEP (CL:NUMBER) -\\INIT.POWERS.OF.TEN (TEXP THI TLO) CREATESCREEN (DESTINATION) FM.GETSTATE (WINDOW NWAY ITEM) -PRINTPARA (FILE LIST) LVLPRIN (X CARLVL CDRLVL) FIXDATUM (FORM DECLST N Y) TEDIT.BUILD.PCTB (N WIDTH -TEXTSTREAM CHARLOOKSLIST PARALOOKSLIST) SUPERPRINTEQ (X) \\TEDIT.CARETLOOKS.VERIFY (TEXTOBJ NEWLOOKS) -\\REMOVE-DECLS (CL::ENVIRONMENT CL::NEW-FORM CL::VAR) COMP.SETARG (A ARG) \\SEND.ANSWERING.RFC (IPUP) -ADDTO (RELATION WHAT PRNT) LVLPRIN2 (X CARLVL CDRLVL TAIL) \\BN.DIVIDE (FLG) \\RECODECCODE (MAPARRAY -CODE) CL::SIMPLE-STRING= (STRING1 STRING2 BASE1 OFFSET1 TYPENUMBER1 BASE2 OFFSET2 TYPENUMBER2) -\\10MBWATCHER (MESSAGE-BUFFER NDB) CL:BIT-VECTOR-P (VECTOR) FM.CHANGESTATE (WINDOW) \\SPP.OTHER.BOUT ( -STREAM BYTE) \\M44ACTONVMEMFILE (FIRSTPAGE BUFFER CA\s DA\s LASTPAGE) \\TEDIT.SELECT.ALL (TEXTSTREAM -TEXTOBJ) FINITEP (CL:NUMBER) U-CASECODE (CHAR) SPECVARS (A) CENTERPRINTINREGION (STREAM EXP PRIN2FLG) -\\BIGNUM.TO.INT (X) ICMLARRAY.TITLECOMMANDFN (WINDOW) CIRCSHADE.DISPLAY (CENTERX CENTERY RADIUS STREAM - TEXTURE OPERATION) TTYINENTRYFN (WINDOW) DSUBLIS (ALST FLG A D) \\DSKDISPLAY.REPAINTFN (W |vol|) -\\LOOKUPPORT (OPUP SOC) CL:ARRAY-DIMENSIONS (ARRAY) SI::ADVISE-CONTENTS (TYPE SI::COM) SETCOLOR16.IP ( -DIM SHADE IPSTREAM OPERATION) PRINTPARA1 (CLOSECOUNT) XCL::%DEFINER-NAME (XCL:DEFINER -XCL::DEFINITION-WITHOUT-COMMENTS) \\MAIKO.NEWFAULTINIT (NBUFFERS) XCL::GET-DEFINER-NAME (STRING -XCL:DEFINER) CLISPBROADSCOPE1 (CONTEXT) \\NSRANDOM.READ.SEGMENT (STREAM NEXTRA FIRSTPAGE# EP EO -BUFFERS BULKSTREAM) SUBLIS (EXPR A D ALST) XCL::%DELETE-DEFINER (XCL::NAME) PARSE-BODY (XCL::BODY -XCL::TAIL XCL::DECLS XCL::DOC) COMP.ARG (X OP) \\SEND.ENDREPLY (SOCKET) \\SETNEWTIME0 (NEWTIME A -OLDTIME) MSPRGLST (L X PARNT CNTX) \\TRANSLATE-CL\:LAMBDA (EXPR) EDITDELETELINK (W) UNDOLISPX3 ( -DWIMCHANGE EVENT COMS) CL::STEP-FORM (CL::RESULTS) CLISPATOM2A (PARENT) FSETVAL (VAL) -\\COERCEASCIITONSFONT (ASCIITONSFIXARRAY ASCIITONSMAPARRAY NSFAMILY SIZE FONTFACE ROTATION DEVICE -ASCIITONSMAP ASCIIFAMILY WIDTHS) XCL::%REMOVE-SPECIAL-FORM (XCL::X) TEDIT.PAGEFORMAT (STREAM FORMAT) -\\FM.EDIT-BACKUP (SI::$PROG1-FIRST-EXPRESSION$) \\CARET.FLASH.MULTIPLE (STREAMS CARETS ONRATE OFFRATE) - COMPILER::ALPHA-ARGUMENT-FORM (COMPILER::FORM) \\SPP.CREATE.STREAM (ACCESS) TRIM.BITMAP (BITMAP WIDTH - HEIGHT) \\TEDIT.STRIKEOUT.SEL.ON (TEXTSTREAM SEL) MAKE-UNICODE-FORMATS (STREAM NOERROR COUNTP -CHARCODE) |\\LFFindNextFile| (|directory| SEARCHSTATE HOST&DIRNAME) COMPILER::ALPHA-BLOCK (COMPILER::NAME - COMPILER::NEW-BLOCK COMPILER::*BLOCK-STACK* COMPILER::BODY) UNCOPYATOM (N) TERM.LEFT (XPOS NCHARS) -CLISPBROADSCOPE (CONTEXT $TYP) XCL::%EXPAND-DEFINER (XCL:DEFINER XCL::DEFINITION-WITHOUT-COMMENTS -XCL::ENV) SI::ADVICE-NEWCOM (SI::NAME SI::LISTNAME SI::FILE) COMMON-LISP (COMMON-LISP-FORMS) -\\TEDIT.GET.INSERT.CHARLOOKS (TEXTOBJ SEL CH# PCTB) \\DSKDISPLAY.BUTTONEVENTFN (W) \\RTP.ERROR (EVENT -SOCKET) MSPRGLAMBDA (EXPR TYPE FLG) SETCOLORLV.IP (DIM SHADE IPSTREAM ANGLE) \\TEXTSTREAM.FILENAME ( -TEXTSTREAM TEXTOBJ) MAKEISOFORMAT (XEROXTOISO) START.NEW.LINE (USECR) CONSTANTOK (X) CHANGEFONT (FILE) - |\\PFTrimHelper| (|targetFileSize| |vol|) \\TRANSMIT.STRATEGY (PUPALLOC) SEMI-COLON-COMMENT-P (E) -TERM.ERASE.TO.EOL (CHAT.STATE XPOS) \\10MB.BROADCASTP (PACKET) \\FM.EDIT-FINDFIRST (WINDOW) -CL::STEP-EVAL (CL::RESULTS) COMPILER::ALPHA-ATOM (COMPILER::FORM) \\TEDIT.STRIKEOUT.SEL.OFF ( -TEXTSTREAM SEL) PRINENDLINE (NEWXPOSITION NS) \\EVAL-PROGN (BODY ENVIRONMENT) NUMBERPAD.READER.DECODE -(CHAR) SUPERPRINT (E TAIL TEM BRFLG) INVERT.BITMAP.VERTICALLY (BITMAP HEIGHT WIDTH NEW.BITMAP X2) -\\TEDIT.UNDERLINE.SEL.OFF (TEXTSTREAM SEL) \\LEAF.HANDLE.INPUT (SEQUIN PUPDATA) \\DL.NEWFAULTINIT ( -NREALPAGES SCRATCHVP SCRATCHBASE LASTREALPAGE NBUFFERS) COPYATOM (STRING N BASE OFFST) -\\CIRCSHADE.XSCAN.IP (STREAM TEXTURE OPERATION R CX CY) DEFAULTWHENSELECTEDFN (ITEM) \\BN.ABS (U) -|\\LFHighestVersions| (FILELIST) FITP (SPACEWIDTH LSTCOL N X) DMCHAT.CLEAR (DM2500.STATE) -\\DSKDISPLAY.CREATE.WINDOW (W REG POS) \\SEND.ABORT (SOCKET PUP) BESTPUPADDRESS (HOST PAIR) -MSPRGTEMPLATE (TEMPLATE PARENT) \\CIRCSHADE.DISPLAY (STREAM TEXTURE OPERATION R CY CX) ROTATE.IP ( -IPSTREAM S) TEDITMENU.STREAM (TEXTSTREAM MAINWINDOW) EDITCHANGELABEL (W GRAPH DS TRANS) -\\8859PEEKCCODEFN (STREAM NOERROR) TEDIT.INSERT.OBJECT (STREAM OBJECT START-OF-PIECE) CLISPATOM1B (L1) - SUBPRINT/ENDLINE (FILE N) SI::ADVICE-HASDEF (SI::NAME) SETMAINTPANEL (N) \\TEDIT.WINDOW.SETUP (WINDOW - TEXTSTREAM PROPS ICONFN) \\ITEMW.CLEARSELECTION (INSPECTW) XCL::UNDOABLY-MAKUNBOUND (CL:SYMBOL) -XCL::GET-WALKER-TEMPLATE (XCL::X) TB.CONSIDERRANGE (LAST# FIRST#) |\\LFFindInfo| (PROPS FILES -DIRECTORY BACKWARDPROPS ATTRIBUTE) TERM.ADDCHAR (CHAT.STATE DSP XPOS Y FONTWIDTH FONTHEIGHT) -\\BN.IDIVIDE (A B) \\STORENSHOSTNUMBER (NSHNM BASE) DISPLAY/NUMBER/READER/TOTAL (WIN TOTALREG TOTSTR) -BIGNUM.DEFPRINT (BIGN R STREAM C) ERASEMENUIMAGE (W MENU) COMP.APPLY* (A) SLICERANK (SELECTION) -INVERT.BITMAP.HORIZONTALLY (BITMAP WIDTH HEIGHT NEW.BITMAP X2) \\TEDIT.UNDERLINE.SEL.ON (TEXTSTREAM -SEL) \\LEAF.ACKED (SEQUIN PUP) \\FM.EDIT-MESSAGE (BUTTONS) TB.RECONSIDERRANGE (LAST# FIRST#) -|\\PFSaveBuffers| (VOL) \\INVALID.RADIX (N) XCL::MAKE-UNDOABLE (XCL::FORM) \\NSRANDOM.STREAM.CHANGED ( -NEWHANDLE LEN) |\\LFSortFiles| (A B) |\\LFWriteLeaderPage| (|stream| |fileDesc|) CL::STEP-COMMAND ( -CL::FORM CL::ENVIRONMENT CL::VALUE) \\BN.TH2D (TH MAXFACTOR) WINDOWADDPROP (WINDOW PROP ITEMTOADD) CL:IF - (CL::TEST CL::THEN CL::ELSE) COMP.PUSHCALL (N CHK LEV FR LP FORM) SHOW.MATCHING.PAREN (BUF MATCHING) -MSPRGTEMPLATE1 (TEMPLATE EXPR LEGAL-KEYS) CH.NUMBER.TO.PROPERTY (PNUM) SCALE2.IP (IPSTREAM X Y) -TEXTSTREAM.TITLE (STREAM TEXTOBJ) GRAPHCHANGELABEL (GRAPH W NODE) /RAISE (TTBL) \\8859INCCODEFN ( -STREAM) SEEFILE (ST ND) KEYWORD-TEST (ARGS TAIL) \\CIRCSHADE.IP (STREAM TEXTURE OPERATION R CX CY) -CLISPATOM1A (TAIL) FM.ITEMPROP (ARGPTR) \\CARET.FLASH.AGAIN (X Y) \\TEDIT.FIND.FIRST.LINE (TEXTOBJ -TEXTSTREAM WHEIGHT) SEGMENT.BIT.LENGTH (END) COLLECT.CHILD.NODES (|Node| |Graph| |GraphNodes|) CLISP\ - (CLISPX) ETHERPORT (NAME) CLISPATOM2 (X CLISPCLASS) MASKSTROKE.IP (IPSTREAM) MBUTTON.SET.FIELD ( -TEXTSTREAM TEXTOBJ FIELD VALUE) EDITCHANGEFONT (W GRAPH HOW DS) COMP.BLOCK (A CTX BLOCKEND) -CIRCSHADE.BLT (CENTERX CENTERY RADIUS STREAM TEXTURE OPERATION) CL:EVAL (CL::HOOKFN CL::EXPRESSION -CL::ENVIRONMENT) REPLACESTKARG (WHICHSPEC FRAMESPEC NEWVALUE) \\BN.NZEROS (N) SI::ADVICE-DELDEF ( -SI::NAME) \\BSP.SENDBUFFER (NBYTES SOCKET) \\CIRCSHADE.BLT (STREAM R TEXTURE CX CY) \\10MBENCAPSULATE -(PDH LENGTH TYPE) NUMBERPAD.READER.HANDLE.CHAR (WIN DIGIT TOTSTR) \\MAIKO.DO.MOVDS (PAIR FROMCELL) -SPY.TITLE (X TOPCOUNT) \\SPP.DEFAULT.ERRORHANDLER (CONDITION STREAM) INVERT.BITMAP.DIAGONALLY (BITMAP -HEIGHT WIDTH) \\TEDIT.UCASE.SEL (STREAM SEL STR POS LEN POINT TEXTOBJ) \\LEAF.FIX.BROKEN.SEQUIN (STATE - DEVICE |\\DurationLimit|) DINFO.FMW.CLOSEFN (W DINFOW) TWODINSPECT.REPLACE (WINDOW STOREFN NEWVALUE -DATUM ROWPROP COLUMNPROP) COMP.EVALFORM (LP DONE) \\SEND.END (SOCKET) \\TEDIT.APPLY.SLOPE (BUTTON -NEWLOOKS) MSPRGERR (EXPR) \\INTERPRET-ARGUMENTS (\\LENGTH \\FN-NAME \\ARGUMENT-BLOCK \\ENVIRONMENT) -\\8859OUTCHARFN (STREAM CHARCODE) /DSUBST (NEW) ONEDINSPECT.REPLACE (WINDOW STOREFN NEWVALUE DATUM -PROP) /NCONC (L) SI::ADVICE-PUTDEF (SI::DEFINITION SI::NAME SI::CURRENT-ADVICE SI::CANONICAL-DEFN) -\\DL.UNMAPPAGES (LASTFP FIRSTFP) \\BN.ICANON (SIGN U0) /ATTACH (X) SHOWPRINT (X FILE RDTBL) \\BN.QRS ( -I) /NCONC1 (LST X) TB.CONTIGUOUS.SELP (LAST# FIRST# BROWSER) DMCHAT.RIGHT (XPOS DM2500.STATE) -ITEM.WINDOW.SET.STACK.ARG (FRAME VARNAME WINDOW OLDVALUEITEM) \\DL.MARK.PAGES.UNAVAILABLE (LASTRP -FIRSTRP) SI::ADVICE-GETDEF (SI::NAME SI::ENTRY) TREEGRAPHNODE (TREE DEPTH) DINFO.CREATE.FMENU (GRAPH -FM) MENUBUTTONFN (W) COMP.PUSHNILS (N CHK LEV FR LP FN) \\BSP.FLUSH.SOCKET.QUEUES (SOCKET) -\\TEDIT.APPLY.ULINE (BUTTON NEWLOOKS) \\BN.MADD (A B) MSPRGRECORD (PRNT CNTXT WITHSLOT Y) -CH.DELETE.MEMBER.FROM.PROPERTY.ACL (DONTCHECK PROPERTY WHICH.LIST AUTH) /PUTHASH (ITEM ARRAY VAL) -\\SPP.CREATE.CON (SKT# NSOC CON) ROTATE.BITMAP.RIGHT (BITMAP HEIGHT WIDTH X1) \\TEDIT.SUBSCRIPTSEL ( -TEXTSTREAM SEL) ICMLARRAY.SETVALUE (DISPLAYWINDOW MAINW SLICERANK ROW COLUMN) /DEFINE (X) SHOWPRIN2 (X - FILE RDTBL) COURIER.READ (TYPE STREAM N WIDTH PROGRAM ITEM BASETYPE NAMEANDTYPE WHICH) COMP.GETBASE ( -OPCODE) FASL::DUMP-BITMAP (FASL::VALUE FASL::HANDLE) /SETPROPLIST (ATM LST) TB.DECONSIDERRANGE (LAST# -FIRST#) TERM.DELETELINE (CHAT.STATE DSP BOTTOMMARGIN FONTHEIGHT TTYWIDTH ATYPOS) \\DO.PROGV (VARS VAR -VALUES FNTOCALL) RECURSIVE.COLLECTDESCENDENTS (|Node| |Graph|) SCALEREGION (SCALE REGION) -\\FM.STARTEDIT (WINDOW ITEM CLEARFLG) ISET.IP (IPSTREAM IVAR) I.S.OPR (NAME UC EXP) SEGMENT.LENGTH ( -END) \\FM.CREATEW (GROUPS REGION BORDER TITLE WINDOW BACKGROUND) CHECK-BINDABLE (VAR) GETCP.IP ( -IPSTREAM) GETFILEPKGTYPE (TYPE ONLY) READ/NODE (DS CR NODES) /PUTASSOC (ALST KEY VAL) PRINTLINE (LN) -\\SIMPLIFY.CL.ARGLIST (LST) CLBINARYMINUS? ($TAIL) WHILEDOUNTIL ($FORM) \\PAGEFAULT (X) |\\LFVersions| - (UNPACKEDNAME STREAM TLIST A B) LASTC (FILE STREAM LASTCCODE) TERM.UP (YPOS HOMEPOS NLINES) -\\RTP.HANDLE.RFC (BSPSOCKET) \\TEDIT.APPLY.STRIKEOUT (BUTTON NEWLOOKS) CL:LOAD (FILENAME STREAM -LOADFLG *LOAD-PRINT-STUFF* PACKAGE) MSBINDVAR (TYPE EXPR) |\\PFPutPage| (|file| |filePageNumber| -|volumePageNumber| |frame|) COMPILER::CHECK-ARG (COMPILER::VAR) LISPX (LISPXID X TAIL) -ROTATE.BITMAP.LEFT (BITMAP HEIGHT WIDTH Y1) \\TEDIT.SUPERSCRIPTSEL (TEXTSTREAM SEL) \\LEAF.TIMEDOUT ( -CNT STATE) /DEFINEQ (X) BSPBOUT (STREAM BYTE) FREEVARS (FN USEDATABASE) BREAKDOWN (X BLOCK) -\\INVALIDADDR (ADDR) SI::MAKE-AROUND-BODY (SI::NEXT-AROUND-FORM SI::AROUND-FORMS SI::CALLING-FORM) -LAYOUTGRAPH (ROOTIDS NODELST FORMAT N) COMPILE (X) \\FILLPOLYGON.IP (STREAM TEXTURE OPERATION POINTS -TRAJECTORY WINDNUMBER) \\LOOKUPPAGEMAP (VP PRIMENTRY) \\SETTYPEMASK (NTYPX DTD BITS) RATOM (FILE -*READTABLE* \\PNAMESTRING) LISPXUNREAD (LST) \\SUBREAD (READTYPE STRING EOF-VALUE TABLE SA CHA1791 -EOLCA1790 CHA1793 EOLCA1792 PBASE \\RBFLG) TERM.MODIFY.ATTRIBUTES (CHAT.STATE ATTRIBUTES) LISPXREAD ( -FILE RDTBL) MSUSERVBTABLES (VERB MOD) \\FM.SETATTACHPOINT (ITEMS ITEM MAXREGION WIDTH HEIGHT -SI::$PROG1-FIRST-EXPRESSION$) PEEKC (FILE STREAM) \\INVALIDVP (VP) UPPERCASEARRAY (CA) LOWERCASE (X) -FASL::DUMP-STRUCTURE (FASL::VALUE) PEEKCCODE (FILE CHA1778 EOLCA1777 STREAM NOERROR) FILEPKGCOM (N) -DISPTREE (TREE DEPTH G X) CL:KEYWORDP (CL::OBJECT) \\RTP.FILTER (PUP) MSPRGCALL (CONTEXT FN PRNT) -CH.ADD.MEMBER.TO.PROPERTY.ACL (DONTCHECK PROPERTY WHICH.LIST AUTH) FASL::DUMP-FLOAT32 (FASL::HANDLE -CL:NUMBER) LISPX/ (X) \\TOP-LEVEL-READ (OLD-EOS-OP EOF-VALUE \\PNAMESTRING PRESERVE-WHITESPACE RESULT) - \\SEND.ACK (PUP \#PUPS) MENUREPAINTFN (WINDOW MENU DSP) READC (RDTBL FILE CHA1781 EOLCA1780 -STREAMA1779 CHA1784 EOLCA1783 STREAMA1782) ADDCHAR (CHAR WIDTH PC OVFL) \\SPP.CREATE.WATCHER (NAME) -INTERACT&SHIFT.BITMAP.LEFT (BITMAP) \\TEDIT.SMALLER.CARET (TEXTOBJ TEXTSTREAM SEL) \\LEAF.WHENCLOSED ( -REASON CODE) \\TRANSFERPAGE (VP RPTINDEX FILEPAGE) READP (FILE STREAM DEVICE FLG) \\PUTBASEFIXP (BASE -OFFST) FILLTRIANGLE (TEMPLIST X1 Y1 X2 Y2 X3 Y3 STREAM TEXTURE OPERATION) BREAK0 (FN WHEN X) -SCANFORWARD (CH CHAR) COLLECTDESCENDENTS (|Node| |Graph|) SHRKFY2 (LOOKAT WORKFLAG STAGEFLAG) -\\ASSURE.FPTOVP.PAGE (FILEPAGE) READCCODE (RDTBL) BREAK1 (BRKWHEN BRKFN POS BRKEXP CONDITION) -GRAPHADDNODE (W) \\MAXWIDTHOFGROUP (ATWINFOS) ADVISEWDS (WINDOW) PLCHAIN (LN) STOPSCAN? (OPR) -BITBLT.ERASE (LEFT BOTTOM WIDTH HEIGHT) DWIMIFYFNS (FNS X) \\RTP.HANDLE.PUP (BSPSOCKET #:G841) -EXCHANGEPUPS (SOC OUTPUP TIMEOUT EVENT TIMER) MSPRGMACRO (FORM MACDEF ME CONTEXT) \\FLUSHPAGE ( -RPTINDEX IFVP) ERASE.TO.END.OF.LINE (X) TEDIT.FORMATTEDFILEP (STREAM TEXTOBJ) FLIPNODE (DS NODE) -\\MAXHEIGHTOFGROUP (ATWINFOS) SKREAD (RDTBL FILE TABLEA1785 *READTABLE*) CLISPATOM0 (PARENT TAIL -NOFIXVARSLST1 FAULTX) \\NSFILING.DESERIALIZE1 (SERIALSESSION DIRHANDLE NEWATTRS BULKSTREAM -SERIALSTREAM) GETPUPWORD (WORD#) TEXTOBJ (STREAM) SI::INSERT-ADVICE-FORM (SI::PRIORITY SI::FORM -SI::ENTRY) SI::CREATE-CONDITION-CASE-LITERALS (SI::CATCH-TAG SI::TYPE-LIST SI::CONDITION) -\\QUEUE.OUTPUT.IOCB (NDB LENGTH BUFFER) CL:MAKE-STRING-INPUT-STREAM (CL::START STRING) -\\FM.COLLECTNWAYS (WINDOW ITEM) DELETETO (TAIL N) INIT.CURSOR (YBOT COL) INTERACT&SHIFT.BITMAP.DOWN ( -BITMAP) \\TK.DESCRIBEFONT (FONT) \\LEAF.IDLE? (SEQUIN) ERASE.TO.END.OF.PAGE (BELOW) -CL:MAKE-CONCATENATED-STREAM (STREAMS STREAM) CL:READ (INPUT-STREAM \\PNAMESTRING EOF-VALUE) -UTF16BE.PEEKCCODEFN (STREAM) CL:APPLY (CL::N ARGLIST CNT FN) ERRORMESS1 (MESS3) \\LFCASEARRAYFETCH ( -CHARCODE) COURIER.SIGNAL.ERROR (ERRORFORM PROGRAM PROCEDURE) CL:READ-PRESERVING-WHITESPACE (STREAM -\\PNAMESTRING EOF-VALUE) CONCATT.IP (IPSTREAM) SAVESETQQ (SETQX SETQY) COMP.COMPILER-LET (\\A X) -\\COURIER.HANDLE.ERROR (PROGRAM PROCEDURE ERRORARGS) SI::COMPILED-FUNCTION-DEBUGGING-INFO (SI::FN -SI::FNHEADER SI::SIZE SI::NAME-TABLE-WORDS SI::START-PC SI::PAST-NAME-TABLE-IN-WORDS) CLRPLNODE (A D) -DECLARED-SPECIAL (VAR) MOVETOUPPERLEFT (STREAM ASCENT) CLISPIFYLOOKUP (WORD VAR1 VAR2) SKIPSEPRCODES ( -FILE RDTBL TABLE SA) SI::COMPILED-FUNCTION-INTERLISP? (SI::FN) DWIMIFY2A ($TAIL $TYP Y X) -\\NSFILING.DESERIALIZE (FILENAME DEVICE SERIALSTREAM) INTERSECTREGIONS (REGIONS) SCANBACK (BUF CH CHAR -) MOVEDESCENDENTS (|Node| |Graph| |deltaX| |deltaY| |DisplayStream|) MSPRGE (Z SUPEXPR EVALCONTEXT ME) - NSMAP (ZERODEFAULT TABLE MAP X) CH.RETRIEVE.PROPERTY.ACL (PROPERTY WHICH.LIST AUTH) SHRKFY (LOOKAT -WORKFLAG) INITIALIZECOLOR.IP (IPSTREAM COLORMODELOP.FVAR) \\MKINTEGER (END BASE RADIX) MOVENODE ( -OLDPOS POS NODE STREAM GRAPH) COUNTDOWN (X N) REGIONP (X) SKIPSEPRS (FILE RDTBL STREAM TABLE SA) -\\MOVEREALPAGE (SOURCERPT SOURCEVP DESTINDEX SOURCEFLAGS) SI::GET-STORED-ARGLIST (SI::NAME) -\\UTF16.BACKCHARFN (STREAM) DMCHAT.HANDLECHARACTER (CHAR) SI::COMPILED-FUNCTION-ARGLIST (SI::FN SI::X) - RELEASE.PUP (PUP) SI::PARSE-CL-ARGLIST (SI::ARG-LIST SI::PARAM SI::REQUIRED SI::OPTIONAL CL:REST -SI::KEY SI::KEY-APPEARED? SI::ALLOW-OTHER-KEYS) SCALE.IP (IPSTREAM S) \\GET.IOCB (USE) -CREATE.NUMBERPAD.READER (DIGITFONT MSGFONT WPOSITION NUMBER/READER/MAXDIGITS LINE) -SI::FUNCTION-WRAPPER-INFO (SI::WRAPPED-FN SI::DEFN SI::FN-TO-CALL) FASL::DUMP-DCODE (FASL::HANDLE) -LISPXFIND (QUIETFLG TYPE MOD X) REALSTKNTH (POS N INTERPFLG OLDPOS) \\SPPCONNECTION (SKT# NAME) -INTERACT&SHIFT.BITMAP.RIGHT (BITMAP) \\TEDIT.SMALLERSEL (TEXTSTREAM TEXTOBJ SEL) SI::CLEAN-UP-CL-ARGLIST - (SI::ARG-LIST) CL:READ-DELIMITED-LIST (CHAR INPUT-STREAM \\PNAMESTRING) SHOWWTITLE (WINDOW BORDER BM -TITLE) CL:PARSE-INTEGER (STRING R OFFST LEN TABLE SA BASE) SI::SET-ADVICE-MIDDLE-MAN (SI::NAME -SI::MIDDLE-MAN) SI::CHANGE-CALLS-IN-CCODE (SI::FROM SI::CCODE SI::REFMAP SI::BASE SI::LOC) MSADDTYPE ( -TYPE) \\FM.READUSERDATA (DESCRIPTION X ITEM) INVERT.BITMAP.B/W (BITMAP NEW.BITMAP WIDTH HEIGHT) -\\TEDIT.LARGERSEL (TEXTSTREAM TEXTOBJ SEL) BLTMENUIMAGE (MENU WIN DSTWIN SRC BORDER CR) MAPHASHFILE ( -MAPFN) UTF16BE.OUTCHARFN (STREAM CHARCODE) \\FM.MAKELINKS (WINDOW ITEM) TB.DO.ITEM.SELECTION (WINDOW) -SHOWWFRAME (WIN BORDER SAVEIMAGE DSP) SI::CHANGE-CALLS (SI::FN SI::REAL-FN-SYMBOL) |\\PFVolumeNumber| -(|vol|) DINFO.CLOSEFN (W GRAPH) CL:NOTEVERY (PREDICATE FIRST-SEQUENCE) |ShowIntervals| (|vol| -|intervalCache| |Number| |Start|) \\RTP.INFO.HOOK (PROC BUTTON) \\RSTRING2 (PNSTR STRING EOLC RSFLG -TABLE SA BASEA1789 OFFSETA1788 PBASE) \\FM.NUMBER-CHANGESTATE (SI::$PROG1-FIRST-EXPRESSION$) TTSKREAD -(CHAR TABLE CH) TRACKCURSOR (ND DS GRAPH) \\LIMITBYMAX (N) SI::HAS-CALLS (SI::CALLER SI::REAL-CALLER -SI::CALLEE) TTBITWIDTH (CHAR) SHOWSHADEDITEMS (MENU ALLITEMS DSP) SI::ADD-CHANGED-CALL (SI::BODY SI::TO - SI::FROM SI::WCC-FORM) SI::GET-ADVICE-MIDDLE-MAN (SI::NAME) RSTRING (RDTBL FILE *READTABLE* RSFLG -\\PNAMESTRING) CONCATLIST (L STRING) OVERFLOW? (WIDTH OLDLINE) TTYIN.CLEANUP (\\TTYINSTATE) -\\FM.EDIT-SETUP (SI::$PROG1-FIRST-EXPRESSION$) UTF16BE.INCCODEFN (STREAM) TB.DO.UNLESS.BUSY (WINDOW -BROWSER FN) |\\LFDirectorySearch| (CHARLIST KINDOFMATCH) CMLRDTBL (TBL) \\VALIDADDRESSP (BASE) -|\\LFFindDirHole| (UNAME DIRSTREAM BYTES) \\10MBSENDPACKET (X Y NDB TYPE) MSADDRELATION (RELATION ROOT - TABLES) TEDIT.REDO.REPLACE (TEXTOBJ CH#) TTYIN (OPTIONS UNREADBUF \\BUFFER) TTYIN.FINISH (FINALCHAR -START CHAR TABLE CH \\COMMAND LINE) INTERACT&SHIFT.BITMAP.UP (BITMAP) \\TEDIT.LARGER.CARET (TEXTOBJ -TEXTSTREAM SEL) \\LEAF.OPENERRORHANDLER (PUP SEQUIN) ICMLARRAY.INDICES (DISPLAYWINDOW MAINW PRTWINDOW -CURRENTLEVELS COLUMN ROW) \\FM.NUMBER-SETUP (SI::$PROG1-FIRST-EXPRESSION$) SI::CONSTRUCT-MIDDLE-MAN ( -SI::OBJECT-FN SI::IN-FN) CREATEWFROMIMAGE (SCREEN IMAGE) /TCONC (X) \\FM.MAKEBITMAP (ID WIDTH HEIGHT -BOXOFFSET BITMAP LABEL FONT STREAM) \\CARET.FLASH (STREAM X Y RATE UNLESSOCCLUDED) SI::DELETE-ADVICE ( -SI::NAME) DINFO.SHRINKFN (W) TTYIN.READ (CHAR CH FINALCHAR TABLE) REDISPLAYBITMAP (BITMAP WINDOW DSP) -ICMLARRAY.DETACHDISPLAY (STATUSGROUP DISPLAYGROUP) ALLCALLS (FNDEF) CH.PROPERTY (PROP) FASL::DUMP-INTEGER - (FASL::VALUE FASL::HANDLE FASL::MINBITS FASL::NBYTES) \\LET*-RECURSION (VARS $$LET*-ENV -$$LET*-SPECIALS $$LET*-BODY) INITIALIZEMASTER.IP (IPSTREAM) \\TEDIT.SET.WINDOW (TOWIND) NODEREGION ( -NODE) \\LIMITBYMIN (N) BSPPEEKBIN (STREAM NOERRORFLG) CL:EVAL-WHEN (OPTIONS.BODY) REMOVE (L X) -BACKGROUNDWHENSELECTEDFN (ITEM) DWIMIFY1A (PARENT) \\SMASHSTRING (SOURCE DEST STRING DBASE) TTYINREAD -(FILE RDTBL) READFROMBUF (END) \\CREATECHARSET.IP (PSIZE FAMILY FACE CHARSET NSMICASIZE FONTDESC N -WIDTH) READ-EXTENDED-TOKEN (\\PNAMESTRING STRING STREAM SA CHA1787 EOLCA1786 PBASE) ULREDISPLAYBITMAP -(BITMAP WNEW DSP) UNBREAK0 (FN) GETFRAMEVAR.IP (IPSTREAM FV) \\TEDIT1 (WINDOW PROPS) \\SETGROUPMIN ( -GROUPSIZE) SI::RESTORE-CALLS (SI::FN) SWAPPUPPORTS (PUP) EDITBMTEXTURE (BM X Y) CLMAPS2 (VAR) -OPENHASHFILE (FILE SMASH) \\UTF8.BACKCHARFN (C) FLIPCURSORBAR (N) MENUREGION (MENU) CLMAPS1 (FN) -INTERACT&ADD.BORDER.TO.BITMAP (BITMAP) \\TEDIT.ITALIC.SEL.ON (TEXTSTREAM SEL) DINFO.EXPANDFN (W GRAPH -GRAPHW) SCROLLBITMAP (WINDOW BITMAP DSP YDELTA XDELTA) ICMLARRAY.DOWINDOWCOMFN (WINDOW CENTRAL -DISPLAYGROUP PASSTOMAINCOMS) CH.IS.IN.DOMAIN.ACL (WHICH PROPERTY NAME AUTH) FASL::DUMP-COMPLEX ( -FASL::HANDLE FASL::VALUE) CLISPIFYMATCHUP ($VARS) \\APPLYREADMACRO (MACDEF STREAM ANSCELL) -\\BSP.PREPARE.OUTPUT (TIMER) TTYIN1 (TTSCRATCHFILE START TABLE CH) \\INTERPRESSINIT (MAPPINGS) -|\\LETtran| (LETTAIL BINDENTRY VARS VALS) SI::ADD-ADVICE (SI::NAME) \\SUBREADCONCAT (J) RETFROM (POS -VAL) CLISPRESPELL (TL WORDS FLG) \\INVALID.SYMBOL (XCL::BASE XCL::LEN) MSADDMODIFIER (RELATION |table| -) \\TEDIT.LCASE.SEL (STREAM SEL STR POS LEN POINT TEXTOBJ) \\FM.EDIT-INSERT ( -SI::$PROG1-FIRST-EXPRESSION$) UNADVISE (ENTRY) \\FIND.PACKAGE.INTERNAL (BASE OFFSET LEN FATP) -XCL::WALK-UNEXPECTED-DECLARE (XCL::FORM) |\\PFNewPages| (|group| |vol| |startSize|) -\\MAKESPACEFORLOCKEDPAGE (VP FILEPAGE) \\ITEM.WINDOW.SELECTION.HANDLER (WINDOW) |\\VFMSplit| ( -|splitKey| |splitLevel| |keyStone| |page|) \\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (FROMOBJ TOOBJ TEXTOBJ) -DINFO.READ.KOTO.GRAPH (QUIETFLG FILE FULLFILENAME DATA) \\10MBGETPACKET (TYPE) COMP.SPREADFN (ARGS 2FN -) \\RTP.SOCKET.PROCESS (BSPSOCKET) \\TEDIT.NEUTRALIZE.CHARLOOKS.MENU (TEXTOBJ) FASL::DUMP-RATIONAL ( -FASL::HANDLE FASL::VALUE) \\TEDIT.ITALIC.SEL.OFF (TEXTSTREAM TEXTOBJ SEL) BITMAPSCROLLFN (WINDOW -XDELTA YDELTA) BSPBIN (STREAM) \\TEDIT.WORDDELETE (TEXTOBJ INSCH# STREAM READSA) \\SELECTREALPAGE (A -DONTMOVETOPFLG) TERM.TAB (XPOS FONTWIDTH CURSORX) XCL::WALK-TAGBODY-1 (XCL::CONTEXT) |\\LFMakeDirHole| - (DIRSTREAM DIRSIZE WHERE HOLESIZE) COMPARENCHARS (X) |\\LFFileName| (UNPACKEDNAME CHARLIST VERSION) -GC-FILING-DIRECTORY (DEVICE PARSE HANDLE) READHOTSPOT (GRIDSPEC DS BM GRIDINTERIOR) PREVLINE (LINE) -\\PUPERROR (ERRCODE MSG) MSADDANALYZE (PLURAL SINGLE |word| GETDEF-FN MARKCHANGED-FN) TEDIT.REDO.MOVE -(TEXTOBJ EVENT OLDCH# LEN SEL) \\DONEWEPHEMERALPAGE (BASE VP) TRAJECTORY.IP (IPSTREAM POINTS P) -\\FM.EDIT-PREPARETOEDIT (SI::$PROG1-FIRST-EXPRESSION$ REGION) TTYINWORDRDTBL (TBL BREAKS) WBOX (DS REG - TEXTURE) PREVWORD (BUF CH) EDITMOVESUBTREE (WINDOW DS) ADDTEMPLATEWORD (WORD) \\FM.CREATEITEM (ID -FONTDEFAULT FONT REGIONS TYPE LABEL GROUPID BITMAPS ITEM) FSET.IP (IPSTREAM FINDEX) \\FM.EDIT-ITEM ( -EDITITEM WINDOW STARTFLG TIMEOUT) \\ORIG-INVALID.SYMBOL (NCOLONS EXTRASEGMENTS BASE LEN) -TERM.SMOOTHSCROLL (CHAT.STATE FONTHEIGHT DSP TTYWIDTH TTYHEIGHT) XCL::WALK-TAGBODY (XCL::FORM -XCL::CONTEXT) \\CARET.FLASH? (OFFRATE X Y ONRATE) SEARCHPDL (SRCHFN) |\\LFMakeLeaderPage| (|Info| TYPE - |CurrentTime| |file| |fileName| |Author|) \\NSGC.COLLECT.DIRECTORIES (DEVICE DIRPATH) EXTENDEXTENT ( -WINDOW INCLUDEREGION) SETUPPUP (TYPE ID DESTSOCKET) COMPILER::PRINT-NODE (COMPILER::NODE COMPILER::INDENT -) \\FM.GETREGIONS (ID FONT HL HIGHLIGHTWIDTH HIGHLIGHTHEIGHT MAXWIDTH MAXHEIGHT LEFT BOTTOM) -COMPILER::ALPHA-FORM (COMPILER::FORM) CL:RETURN-FROM (CL::RETVALUES) \\TEDIT.ITALIC.CARET.OFF (TEXTOBJ - TEXTSTREAM SEL) /SETSEPR (RDTBL LST FLG) ENDBSPSTREAM (STREAM TIMEOUT) RETVALUES (POS VALUES) -IN/ITEM? (POS ITEMS XPOS YPOS) DWMFY1 (FORM) HASHFILEPROP (HASHFILE PROP) UTF8.PEEKCCODEFN (STREAM -NOERROR) \\FM.EDITSTART-MESSAGE (BUTTONS) SI::FINISH-UNADVISING (SI::ADVICE-NAME) REALFRAMEP (POS -INTERPFLG) \\NEWEPHEMERALPAGE (BASE NOERROR) CLISPIFYMAPS (OPR IN-ON) INREADMACROP (NM) -TERM.SETMARGINS (HOMEPOS TOP FONTHEIGHT BOTTOM) XCL::WALK-PROG* (XCL::FORM XCL::CONTEXT) -TB.ITEM.FROM.YCOORD (BROWSER YPOS N) \\LFDWIN (FILE) \\GETBASESTRING (NCHARS BASE BYTEOFFSET STR -STRING) MAPDL (MAPDLFN) |\\LFMakeDirEntry| (UNAME NC |DirStream| POS STREAM W C) HISTORYSAVE (INPUT3 -ID PROPS MOD SIZE) \\FM.EDITSTART-SETUP (SI::$PROG1-FIRST-EXPRESSION$) CLISPIFYRPLAC (X TYP PARENT0) -READQUOTE (FILE) \\FM.CHECKPROPS (PROPS PROP) HELP (MESS1 MESS2) COMP.GETBASEBITS (A) CL:FUNCTION ( -CL::FN) READVBAR (STREAM RDTBL) \\FM.GETBITMAPS (ID ITEMREGION FONT WIDTH HEIGHT HIGHLIGHTREGION -BOXSHADE BOX) READHASHMACRO (RDTBL CHAR STREAM READFN CONTENTS) COMPAREPRINTN (N STREAM) -SI::FINISH-ADVISING (SI::FN-TO-ADVISE SI::ORIGINAL SI::ADVICE-NAME) TEDIT.UNPARSE.PAGEFRAMES ( -PAGEFRAME FRAME SUBREGION) HREAD (FILE) WTODSY (WY WINDOW) \\FM.EDITSTART-SELECTEDFN (WINDOW EDITITEM -SI::$PROG1-FIRST-EXPRESSION$ BUTTONS) COMPILER::PRINT-TREE (COMPILER::TREE) -CH.DELETE.MEMBER.FROM.DOMAIN.ACL (DONTCHECK WHICH.LIST AUTH) FASL::WRITE-INTEGER-BYTES (FASL::HANDLE) -CHARCODE.UNDECODE (CODE) /SETD (A N V) CREATEBSPSTREAM (SOCKET OTHERPUPHANDLER ERRORHANDLER IOTIMEOUT -IOTIMEOUTFN WHENCLOSEDFN) \\FLUSHVM (MAIKO.SYSOUTFILE VAR) \\READNUMBER.FLASHAREA (WIN LFT BTM WDTH -HGHT) SKIP.HASH.COMMENT (STREAM RDTBL) CL:COMPILER-LET ($$COMPILER-LET-TAIL X) DSKDISPLAY (|newState| -|oldState|) \\TEDIT.SETDEFAULT.FROM.SEL (TEXTSTREAM SEL LOOKS) CMLREAD.FEATURE.PARSER (EXPR) -\\ORIG-READ.SYMBOL (BASE OFFSET LEN FATP) \\INSPECTW.COMMAND.HANDLER (INSPECTW) -ESTIMATE-DIMENSIONALITY (CONTENTS) CL:FUNCTIONP (CL::FN) READNUMBERINBASE (STREAM BODY RADIX) -\\SHADEBITS (BM COLOR BITSWIDE W GRIDSPEC BITSHIGH GRIDINTERIOR) READBQUOTE (FILE) OVERFLOWLINE? (LINE -) GETBOXPOSITION.FROMINITIALREGION (|Region| |Window| |DisplayStream|) CLISPIFYCROPS1 (CROPFN) -COMP.SPREAD (L LSTCHECK LEV FR LP X ARG VAR FN) FILLTRAJECTORY.IP (IPSTREAM POINTS) \\TEMPLOCKPAGES ( -BASE NPAGES) EDITADDNODE (W GRAPH |NewPosition| |Stream| $$OUTPUT MSGW) \\WRITEDIRTYPAGE1 (RPTR RP) -\\COURIER.TRACE (EVENT PROGRAM PROCEDURE) \\NSFILING.COPYFILE (NEWDEVICE DEVICE FROMFILE TOFILE) -CHARACTER.READ (STREAM TABLEA1795 TABLEA1796 NEXTCHAR) \\SPECIALRP (VP) EDITSHADEREPAINTFN (WIN) -COMP.GETD (A) NTH.COLUMN.OF (LINE N) \\TEDIT.FILL.IN.CHARLOOKS.MENU (TEXTOBJ) \\DSPOPERATION.IP ( -IPSTREAM) FASL::DUMP-ARRAY (CL:ARRAY FASL::HANDLE FASL::REMEMBER) CL:EVALHOOK (CL::EVALHOOKFN -CL::APPLYHOOKFN CL::FORM CL::ENV) \\TEDIT.CONVERT.FOREIGN.FORMAT (CONVERSIONFN FILE PREDICATERESULT) -EDITAPPLYTOLINK (GRAPH DS ABORTMSG FN MSG) /SETBRK (RDTBL LST FLG) SETBSPUSERINFO (STREAM VALUE) -NSPRINT (FILE DATASTREAM) COURIER.WRITE (TYPE STREAM W FIXP PROGRAM KEY SIZE BASETYPE WHICH) -CL:APPLYHOOK (CL::EVALHOOKFN CL::APPLYHOOKFN) SI::UNADVISE-FROM-RESTORE-CALLS (SI::ENTRY SI::FROM SI::FN - SI::TO) \\MATCHPCS (PCNODE) TEDIT.PARSE.PAGEFRAMES (ALIST FRAMESPEC) DEFMACRO-LAMBDA-LIST-KEYWORD-P ( -S) DWIMUNSAVEDEF (FN) COPYTEXTSTREAM (ORIGINAL TEXTOBJ CROSSCOPY) DWMFY0 (DWIMIFYCHANGE) -|\\VFMGetInterval| (|volNum| |intervalArray|) EXPANDMACRO (COMPILE.CONTEXT) MACROS.GETDEF (NAME) -\\FM.CHECKDESCRIPTION (ID TYPE PROP) XCL::SET-CONSTANTP (CL:SYMBOL) \\TEDIT.SHOWCARETLOOKS (TEXTOBJ -TEXTSTREAM LOOKS) EDITPROP (NAME) ICMLARRAY.DISPLAYSLICE (CMLARRAY LEVELS SLICE WHERE TOPRIGHT) -TERM.SET.TAB (TERMINAL.X) XCL::WALK-PROG (XCL::FORM XCL::CONTEXT) TB.ITEM.VISIBLE? (BROWSER ITEM BOT -CLIP) COMPUTE-MACRO-ARGS (MACRO-CALL-BODY CL:KEYWORD DEFAULT-VALUE CONTEXT BINDING) POLYSHADE.SCAN.IP -(SCANDIRECTION |MicasToDev| I STREAM TEXTURE OPERATION) CLISPIFYCROPS0 (CROPSLST) \\DRAWLINE1 ( -BITMAPBASE Y0 RASTERWIDTH X0 DX YINC DY MODE CDL XLIMIT YLIMIT) SPPOUTPUTSTREAM (SPPINPUTSTREAM) -CSELECT (L SELECTOR) \\NSFILING.COPY/RENAME (FROMFILE TOFILE DEVICE NEWDEVICE N) \\CARET.SHOW (CARET -UNLESSOCCLUDED) READVISE (ENTRY) \\LASTNODE (TREE COUNT) PRINTCOMSTRAN (MACROS FORM) DWIMARKASCHANGED -(FN $SIDES) GRAYBOXAREA (TEXTURE DS X Y WIDTH HEIGHT) COMP.COMPARENUM (A TYPE FN) OPENRTPSOCKET ( -CONNID TIMEOUT) CREATE.NEW.NODEPOSITION (|Node| |deltaX| |OldPos| |deltaY|) CLISPIFYCROPS (X PARENT0) -CH.CANONICAL.NAME (NAME PARSED) FASL::DUMP-GENERAL-ARRAY (CL:ARRAY FASL::HANDLE FASL::NELTS FASL::ELT-TYPE -) NEW/EDITDATE (OLDATE INITLS) NTH.RELATIVE.COLUMN.OF (LINE END) /SETA (A N V) GETBSPUSERINFO (STREAM) - FREEMENU (TITLE BACKGROUND BORDER WINDOW) WTODSX (WX WINDOW) ICMLARRAY.ATTACHDISPLAY (DISPLAYGROUP -STATUSGROUP W DISPLAYEDLEVELS) TERM.SCROLLDOWN (CHAT.STATE BOTTOMMARGIN FONTHEIGHT DSP NEARBOTTOM -TTYWIDTH TOP) VMEM.PURE.STATE (FLG) \\NUMBERPAD.READER.CLOSEFN (WINDOW) \\FM.PUSHGROUP (GROUPS DIR -ITEM AMOUNT) ICONW (ICON ICONW MASK NOOPENFLG) \\TEDIT.DEFAULTSSEL (TEXTSTREAM SEL) SET-SYMBOL ( -CL:SYMBOL VALUE) MENUTITLEFONT (MENU) COMPILER::TEST-ALPHA-2 (COMPILER::FN) \\FM.NUMBER-MESSAGE ( -BUTTONS) FMAPRINT (FILE) \\MAIKO.INPUT.INTERRUPT (NDB TYPE) COMPILER::META-EVALUATE (COMPILER:CONTEXT) - \\SET.LASTVMEMFILEPAGE (N) SEDIT::ASSIGN-FORMAT-CLISP (SEDIT::NODE SEDIT::SUBNODES SEDIT::CONTEXT -SEDIT::SUBNODE SEDIT::CLISP-TYPE) \\TEDIT.CENTER.SEL.REV (SEL TEXTOBJ TEXTSTREAM PARA SAVECH# SAVEDCH) - FM.SKIPNEXT (WINDOW FM.PROCESS CLEARFLG) \\ILLEGAL.ARG (X) DIGITBASEP (RADIX) LEVELEDFORM (EXP CARLEV - CDRLEV) EXPAND-DEFMACRO (FORM DEFAULT-VALUE DEF *MACRO-VARS* *MACRO-VALS* VAL) \\FM.DISPLAY-SETUP ( -SI::$PROG1-FIRST-EXPRESSION$) TERM.RIGHT (XPOS FONTWIDTH TTYWIDTH NCHARS) TB.RESHAPEFN (WINDOW BROWSER - OLDIMAGEBM OLDREGION REGION) TIMEALL (TIMEFORM DATATYPES) \\FM.NUMBER-SELECTEDFN (ITEM WINDOW BUTTONS -) STRPOSL (\\STRPOSLARRAY CHAR TABLE) POLYSHADE.BLT (POINTS STREAM TEXTURE OPERATION) EDITSHADE ( -$$OUTPUT) COMP.SHIFT (A) MOVE.TO.LINE (NEWLINE) \\TEDIT.APPLY.OLINE (BUTTON NEWLOOKS) TRANSGRAPH ( -GRAPH N X Y) CLISPIFYNOT (FORM) FASL::DUMP-BIT-ARRAY (CL:ARRAY) HPRINT (FILE EXPR STREAM) -TEDIT.BUILD.PCTB1 (START PCCOUNT TEXT END N WIDTH TEXTSTREAM) \\ATWGROUPSIZE (ATW) \\BSP.PREPARE.INPUT - (TIMER) ADVISE (ARGS WHAT X) CHARCODE.DECODE (STR) \\MAKE.JIS.TO.XCCS.CONV.TABLE (MAP) -\\TEXTRIGHTMARGIN (STREAM TEXTOBJ RIGHTMAR) SI::UNBREAK-FROM-RESTORE-CALLS (SI::ENTRY SI::FROM SI::FN -SI::TO) |\\LFCheckBang| (DIRSTREAM) %SORT-SUBLIST (START END MID PRED) |\\LFGenFileID| (|vol|) CL:CATCH - (\\CATCH-FORMS) NUMBERPAD.READ (NUMBERPAD/READER) MSDESCRIBE1 (STR) SI::FINISH-UNBREAKING (SI::ENTRY) - CL:MAKE-SYMBOL (STRING BASE OFFST LEN FATP) SHRIEKIFY (LOOKAT) \\TEDIT.DEFAULTS.CARET (TEXTSTREAM -TEXTOBJ SEL) \\FTP.RENAMEFILE (OLD-DEVICE NEW-DEVICE OLDFILE) \\FM.JUSTIFYGROUPS (GROUPS DAUGHTER) -\\LEASTPTAT (DA DB THISB) POLYSHADE.IP (STREAM POINTS TEXTURE OPERATION WINDNUMBER) COMPILER::TEST-ALPHA - (COMPILER::FN COMPILER::TREE) \\FM.NWAY-CHANGESTATE (COLLECTION WINDOW NWAY) \\CARET.CREATE (CURSOR) -DINFO.FIND (DINFOW BUTTONS TEXTSTREAM) \\FM.JUSTIFYITEMS (GROUPS) COMP.RPLACD (A) \\RTP.HANDLE.INPUT ( -BSPSOCKET PUPSOC) \\TEDIT.PARSE.CHARLOOKS.MENU (TEXTOBJ) EDITMOVEREGION (|Window|) COLLECTFNDATA (LST -X) CH.ADD.MEMBER.TO.DOMAIN.ACL (DONTCHECK WHICH.LIST AUTH) TEDIT.BUILD.PCTB0 (START PCCOUNT TEXT END N - WIDTH TEXTSTREAM) EDITADDLINK (W) /PRINTLEVEL (RESULT CARVAL CDRVAL) \\BSP.CLEANUP.INPUT (PUP SOCKET) - \\CLIPCODE (X LEFT Y TOP BOTTOM RIGHT) \\NSFILING.NEXTFILE (GENERATOR SESSION) TEDIT.PROMPTFLASH ( -TEXTSTREAM) DC (FILE ARGS) CL:CERROR (CL::DATUM CL::ARGUMENTS) \\FORWARD.PUP (PUP) |\\VFMKillBuffer| ( -VOLPAGENUM) CLISPACKUP (L) COMPAREPRINT1 (A B STREAM) TEDIT.BUILD.PCTB2 (START PCCOUNT TEXT END N -WIDTH TEXTSTREAM) SEDIT::SELECT-NODE (SEDIT::CONTEXT SEDIT::NODE) EDITFNS (Y) \\STRINGWIDTH.IP (STRING - STREAM RDTBL) UNICODE.UNMAPPED (TRANSLATION-TABLE CODE FORWARD) \\ACTONVMEMFILE (FILEPAGE BUFFER -NPAGES WRITEFLAG) FILL-VECTOR (VECTOR TOTAL-SIZE START) SETUPPAGEMAP (PAGEMAPKEY) \\POLYSHADE.YSCAN.IP - (STRM FILL.SHADE FILL.FRULE ALIST FILL.WRULE) CLISPAND1 ($FORM CLAUSE) \\GREATESTPTAT (DA DB THISB) -\\COURIER.HANDLE.BULKDATA (DATASTREAM) \\MAIKO.10MBWATCHER (MESSAGE-BUFFER NDB) COMPILER::ANNOTATE-TREE - (COMPILER::TREE) \\READBINARYBITMAP (BMW BMH BPP) \\PARAS.IN.SEL (TEXTOBJ PC) LEAF.ASSURE.FINISHED ( -SEQUIN) DINFO.LOOKUP (DINFOW BUTTONS) CACHEMACRO (BODY) UPDATE/SCROLL/REG (IMAGEREG) -ICMLARRAY.MENUW.GETLEVEL (ITEM MENUWINDOW CMLARRAY DIM LEVMENU PRTWINDOW $$OUTPUT) -\\TEDIT.APPLY.BOLDNESS (BUTTON NEWLOOKS) ICMLARRAY.MENUW.APPLY (MENUWINDOW CMLARRAY LEVELS $$OUTPUT) -\\BITMAPFROMTEXTURE (FIXP SHADE) FASL::DUMP-SIMPLE-VECTOR (CL:VECTOR) /PUTDQ (X Y) -ICMLARRAY.MENUW.SHOW (MENUWINDOW DISPLAYEDLEVELS CMLARRAY) \\MVLIST (X) CLREMPARS (X) CL:TAGBODY (TAIL - TL) SEDIT::CFV-CLISP (SEDIT::ENVIRONMENT SEDIT::PAREN-WIDTH) CONCAT (N STRING) DP (ATOM ARGS) -XCL::SET-DECL-SPECIFIER-P (XCL::SPEC XCL::VAL) \\FM.NWAY-SELECTEDFN (BUTTONS ITEM WINDOW) -\\INVALID.INTEGER (SIGN BASE START END RADIX) MSDESCRIBE (FN SN) \\FM.LAYOUTGRID (PROP MOTHER GRIDTAIL - AMOUNT ITEMDESC) XCL::SET-GLOBALLY-NOTINLINE-P (XCL::FN XCL::VAL) CLISPANGLEBRACKETS (LST) -\\INVALID.DOTTED.SYMBOL (BASE START LEN FATP) TERPRI (FILE) CL:UNWIND-PROTECT (\\UNWIND-FORMS) -SPLITKEY (KEY) XCL::WALK-LET* (XCL::FORM XCL::CONTEXT) /MOVD (TO FROM NEWFLG) PRIN1 (FILE STRM L X) -|\\LFDirectoryScrambled| (DIRSTREAM) %SET-ARRAY-TYPE-NUMBER (NEWVALUE) |\\PFFindFileSize| (|file|) -SPACES (FILE STREAM L N) %SET-ARRAY-OFFSET (NEWVALUE) UTF8.OUTCHARFN (CHARCODE) PRINTNUM (FORMAT FMT -\\NUMSTR \\NUMSTR1 FILE) \\INSERTTREE (OLD PREV OLDLEN) FILLRECTANGLE.IP (IPSTREAM IPDATA -SCALED-VISRIGHT SCALED-VISLEFT SCALED-VISTOP SCALED-VISBOTTOM) DINFO.ADD.FMENU (WINDOW) TAB (FILE -MINSPACES POS) FILLWITHBACKGROUND (REG WIN) SHIFT.BITMAP.UP (BITMAP WIDTH HEIGHT NBITS) -\\TEDIT.APPLY.CHARLOOKS (SEL W TEXTOBJ MAINTEXT) SI::PRINT-TRACE-EXIT-INFO (SI::TRACED-FN SI::FN-VALUES - SI::VALUE) COMPILER::PEEPHOLE-OPTIMIZE (COMPILER::LAP-FN) \\PRINTVP (STREAM VP) \\TELERAIDBREAK ( -KEYNUMBER) \\PRINTBINARYBITMAP (STREAM BITMAP W) GETSTREAM (FILE ACCESS NOERROR) OPT.OPTCHECK (X Y) -SETHASHSTATUS (HASHFILE) XCL::WALK-LET (XCL::FORM XCL::CONTEXT) /MAPCONC (MAPFN1) |CreateCursorBitMap| - (BM ARRAY) \\LFDWOUT (FILE NUMBER) |\\PFFindPageAddr| (|filePage|) RESETGRID.NEW (WINDOW WIDTH HEIGHT - BM) XCL::DECL-SPECIFIER-P (CL:SYMBOL) \\FM.NWAY-MOVEDFN (ITEM WINDOW NWAY BUTTONS) \\DRAWPOLYGON.IP ( -IPSTREAM POINTS BRUSH IPDATA HALFWIDTH) \\FM.LAYOUTCOLUMN (PROP MOTHER ITEMDESC GROUPBOTTOM) FIX (N) -TEDIT.GET.PAGEFRAMES (FILE) DRAW/GRAPHNODE/BORDER (BORDER LEFT BOTTOM WIDTH HEIGHT STREAM) FIXLISPX/ ( -X FN) INSERTLINE (ROW) \\HANDLE.RAW.PUP (TYPE SOCLO SOCHI) CLISPAND (FORM) \\FM.LAYOUTROW (PROP MOTHER - ITEMDESC GROUPLEFT) XCL::GLOBALLY-NOTINLINE-P (XCL::FN) FGET.IP (IPSTREAM FINDEX) \\DWIN (FILE) -DRAWAREABOX (W BOXLEFT BOXBOTTOM BORDER BOXHEIGHT OP BOXWIDTH) \\DO.PROGV.SETUP.FRAME.AND.EXECUTE ( -NNILS NVARS VARS NTSIZE) \\COURIER.RESULTS (STREAM PROCDEF PROGRAM TYPE PGMDEF NUMBER PROCEDURE -NOERRORFLG) REPLACEHASHKEY (HASHFILE HASHKEY INDEX VALUE) \\NSFILING.FILEINFOFN (GENFILESTATE -ATTRIBUTE) INSTALL-PROTOTYPE-DEFN (NAME ARGS MENU) |\\PFGetPage| (|file| |filePageNumber| -|volumePageNumber| |frame| |runLength| |noBreak|) \\NSRANDOM.SESSION.WATCHER (DEVICE) -DINFO.DEFAULT.MENU (DINFOW) \\POSITION.MENU.IMAGE (MENU) DASSEM.CLEANFNTEST (TYPE) \\INIT.RTPPROCESS ( -PROC) \\TEDIT.SHOW.CHARLOOKS (W MAINTEXT TEXTOBJ MAINCH#) COMPILER::EXPAND-OPENLAMBDA-CALL (COMPILER::ARG - COMPILER::UNSUBBED-PARAMS) \\MAIKO.10MBSENDPACKET (X Y NDB TYPE) OPT.CCHECK (X) CHECKFPTOVP1 (VP FP2 -FP RPTINDEX) SEDIT::LINEARIZE-CLISP (SEDIT::NODE SEDIT::CONTEXT SEDIT::PAREN-WIDTH SEDIT::SPACE-WIDTH -SEDIT::ITEM #:G844 SEDIT::MIN-INDENT) COMPAREPRINT (X Y STREAM) \\FM.NWAY-DOWNFN (ITEM WINDOW NWAY -BUTTONS) \\TEDIT.UPDATETREE (DELTA) READPAGEMAPBLOCK (VP) SETCOLOR.IP (IPSTREAM SCALE ANGLE) GAINSPACE - (X ATM) MAKEHASHKEY (KEY RANGE) \\FATTENSTRING (STR) TB.WINDOW (BROWSER) EDITFB (FN) -|\\VFMGetBufferFor| (VOLPAGENUM) \\PROMPT.FOR.PUP.NUMBER (DEFAULT) \\FM.FORMATEXPLICIT (LEFT BOTTOM -PROPS DESCRIPTION ITEMDESC FONT ROWSPACE COLUMNSPACE ID EXTENT) CLISP-SIMPLE-FUNCTION-P (CARFORM) -COMPILER::GENERATE-CODE (COMPILER::TREE COMPILER::*CODE*) COROUTINE (COROUTFORM## ENDFORM##) COMPARE ( -NAME1 TYPE NAME2 DEF1 DEF2) \\FM.NWAY-MESSAGE (ITEM WINDOW BUTTONS) PRINTDEF (FILE *STANDARD-OUTPUT* -EXPR FIRSTPOS SPACEWIDTH TAIL) \\MAPPNAME.INTERNAL (FN X) FIXAPPLY1 (POS OLD NEW *FORM*BLIP X) -\\RTP.ACTION (EVENT PUP) \\TEDIT.NEUTRALIZE.CHARLOOKS (W TEXTOBJ CH#) COMPILER::COMPLETELY-EXPAND ( -COMPILER::FORM) FASL::DUMP-CHARACTER (CL:CHAR FASL::HANDLE FASL::CODE STREAM) UNIXCHAT.OPEN (TERMTYPE -STR) /MAPCON (MAPFN1) \\BSP.OTHERBOUT (STREAM BYTE) CLOSE.PROCESS.MENU (WINDOW) \\PRINDATUM.TO.STRING -(X \\NUMSTR \\NUMSTR1 STR CODE VAL KEY STRING) SHIFT.BITMAP.DOWN (BITMAP WIDTH HEIGHT NBITS) -\\MAIKO.10MBSTARTDRIVER (MYNSNUMBER) CLISPIFY (X) \\10MBSETUPRECEIVER (NDB PACKET) COERCETOBITMAP ( -BMSPEC) BKSYSCHARCODE (CHAR R) FASL::DUMP-SYMBOL (CL:SYMBOL) BKSYSBUF (X STRING CODE) UTF8.INCCODEFN ( -STREAM CODE COUNT) TYPENAME (X) %STABLE-SORT-VECTOR (VECTOR PRED LENGTH) \\MAPPNAME (RDTBL *READTABLE* - FN X) \\POLYSHADE.XSCAN.IP (STRM FILL.SHADE FILL.FRULE ALIST I FILL.WRULE) MAPPAGES (BOT TOP IVP FN) -SI::PRINT-TRACED-ARGUMENT (SI::INDENT SI::NAME SI::VALUE) SEDIT::ASSIGN-FORMAT-DOTLIST (SEDIT::NODE -SEDIT::SUBNODE SEDIT::CONTEXT) \\FIND.LOCALPUPHOSTNUMBER (NDB EVENT) CLISPCOND (CLAUSE CPYFLG) -ENDPREAMBLE.IP (IPSTREAM) \\TEDIT.GET.CHARLOOKS.LIST (N WIDTH FILE) FROMLINKS (NODE) RECORD ( -NAME&FIELDS) \\LOCKCELL (X NPGS) DWIMIFY (X) SI::PRINT-TRACE-ENTRY-INFO (SI::TRACED-FN) RPLSTRING (X Y - OLDSTRING STRING N) UPDATE/SHADE/DISPLAY (WIN BOTTOM BM) CLOSERTPSOCKET (TIMEOUT) \\STARTPUP (SOC -EVENT) \\DSPSCALE2.IP (IPSTREAM S\x S\y) CH.FINDSERVER (ORGANIZATION DOMAIN) FASL::DUMP-VALUE-FETCH ( -FASL::HANDLE FASL::INDEX) SPELLFILE (FILE) ENDPAGE.IP (IPSTREAM) MISSPELLED? (SPLST REL FLG TAIL) -/LISTPUT1 (LST PROP VAL) COMPAREMAX (X Y) \\#BLOCKDATACELLS (DATAWORD TYPENO) \\SMASHABLESTRING (STR -STRING) CLISPCOND1 (L) CL::%DO-TRANSLATE (CL::X CL::VARS) \\RPLCHARCODE (X N CHAR STRING BASEA1775 -OFFSETA1774) |\\VFMMerge| (|leftInterval| |mergeKey| |mergeLevel| |rightInterval|) FIND.NEXT.WORD (END - X CH) SHIFT.BITMAP.LEFT (BITMAP WIDTH NBITS HEIGHT) SAVEPUT (ATM PROP VAL) MSMARKCHANGE1 (FNS) -TEDIT.UNDO.MOVE (TOOBJ FROMOBJ CH# LEN SOURCECH#) COMPAREFAIL (FN X Y) \\TELERAIDRELEASE (NDB PACKET) -BITMAPTEDITOBJ (BITMAP SCALEFACTOR ROTATION DESCENT) /ADDPROP (PROP) LOADFNS (FNS VARS) \\LOCKWORDS ( -BASE) INSERTHASHKEY (HASHFILE HASHKEY INDEX VALUE) GNC (X) |\\PFRemoveDirectoryID| (|vol| |type|) -FONTPROFILE (PROFILE X) CLISP3C (L3) GNCCODE (LEN OFFST NV) GLCCODE (LEN STRING) \\CONVERTTOFRACTION ( -FLOAT) \\LOCKCODE (CODEBLOCK) STREQUAL (X Y STRING BASEX BASEY) DINFO.WRITE.GRAPH (GRAPH FILE) -UPDATE/BM/DISPLAY/SELECTED/REGION (W) \\RTP.SHOW.FAILURE (REASON) ASSURE.PUP.READY (QUIET) SHORTEN ( -STRING LEN) PROCESS.EVALV (PROC VAR P) FASL::SAVE-VALUE (FASL::HANDLE) CL:1+ (CL:NUMBER) SHOW.IP ( -IPSTREAM) \\TEDIT.GET.PARALOOKS.LIST (N WIDTH FILE TEXTOBJ) UNIX.HOST.FILTER (HOST) GETNODEFROMID (ID -NODELST) \\BSP.HANDLE.INPUT (PUPSOC LOCK) L-CASE (X \\PNAMESTRING STRING) /LISTPUT (PROP VAL) -SEDIT::LINEARIZE-DOTLIST (SEDIT::CONTEXT) HASHFILESPLST1 (HASHFILE KEY) U-CASEP (X STRING) -TERM.IDENTIFY.SELF (CHAT.STATE) |\\PFFindDirectoryID| (|vol| |type|) %SORT-VECTOR (VECTOR PRED LOWER -UPPER) |\\VFMLower| (A B AFILE BFILE APAGE BPAGE) \\MAKEWRITABLESTRING (STR STRING) OPT.DS1 (VAR) -CL:SYMBOL-PACKAGE (CL:SYMBOL I) FORWARD.DELETE.TO (BUFTAIL DELETEDWIDTH) SHIFT.BITMAP.RIGHT (BITMAP -WIDTH NBITS HEIGHT) TEDIT.UNDO.REPLACE (TEXTOBJ LEN CH# FIRSTPIECE) >= (CL::ARGS) \\10MBRAWENCAPSULATE - (LENGTH) SEDIT::CFV-DOTLIST (SEDIT::ENVIRONMENT SEDIT::NUMBER-OF-SUBNODES SEDIT::SPACE-WIDTH -SEDIT::SUBNODES SEDIT::WIDTH-OF-DOT) %MAKE-STRING-ARRAY-FAT (ARRAY) DUMPINITPAGES (CODENEXTPAGE -CODEFIRSTPAGE VPAGE) QUOTE (U) CLISP4 (EXP SUBPARENT $TAIL) \\FM.STATE-SELECTEDFN (ITEM WINDOW BUTTONS -) FILL.LINE (TBLE) %MAKE-ARRAY-WRITEABLE (ARRAY) MSSTOREDATA (FNNAME KWN) \\FM.FORMATBYROW (LEFT -BOTTOM ROW FONT ROWSPACE COLUMNSPACE ID EXTENT PROPS) CL:COMPILE (SPECVARS LOCALVARS GLOBALVARS COMPILER::LAP - COMPILER::DEFN COMPILER::COMPILED-DEFN) \\10MBRAWRECEIVE (NDB METADEBUGGING STATUS) BMOBJ.DISPLAYFN ( -IMAGEOBJ IMAGE.STREAM STREAM-SCALE DESCENT STREAMTYPE CACHE BITMAP) \\TEDIT.CENTER.SEL (SEL TEXTOBJ -TEXTSTREAM PARA SAVECH# SAVEDCH) \\LEAF.REQUESTPAGE (PAGE#) DEFAULT.INSPECTW.TITLECOMMANDFN (INSPECTW -DATUM) GETPROBE (KEY) TERM.GODOWN (YPOS BOTTOM NLINES) XCL::WALK-DO (XCL::FORM XCL::CONTEXT) -SHOWBUTTON (BUTTON BLOCK DS) TB.MAP.DELETED.ITEMS (BROWSER MAPFN) |\\LFPutDirectory| (|vol| -|directory|) \\LOCKVAR (VAR) WINDOWWORLDP (SCREEN) OPT.DEADSETQP (VAR CD) ADDPME (VP NEWPAGEOK) -\\POLYSHADE.DISPLAY (STRM FILL.SHADE FILL.FRULE ALIST I FILL.WRULE) DO.EDIT.PP (\\BUFFER TTSCRATCHFILE -) CLOSEMAINWINDOW (ICONWIN) COMPILER::ALPHA-THROW (COMPILER::TAG COMPILER::VALUE) \\DEFAULTSTATE.IP ( -IPSTREAM) FASL::LOOKUP-VALUE (FASL::HANDLE FASL::VALUE) CLEAR-CLISPARRAY (REASON) CONCAT.IP (IPSTREAM) - \\PUTBASESTRINGFAT (SBASE SOFFSET DBASE DBYTEOFFSET LEN) \\BSP.DEFAULT.ERROR.HANDLER (ERRCODE SOCKET) - \\TEDIT.FOREIGN.COPY? (SEL SOURCE.TEXTOBJ) \\DURATIONTRAN (FORM EXPIREDFORM) GETHASHKEY (HASHFILE -INDEX HKEY RANGE) |GetBcplString| (BASE L) XCL::WALK-DECLARATIONS (XCL::BODY XCL::FN XCL::OLD-BODY) -ERROR (MESS1 MESS2) |\\PFInsertDirectoryID| (|vol| |type| |directoryID|) WAKE.MY.PROCESS (WINDOW) -\\FM.FORMATBYCOLUMN (LEFT BOTTOM DESCRIPTION COL FONT ROWSPACE COLUMNSPACE ID EXTENT COLID HEIGHT -PROPS) |\\LFFileSpec| (NAME RECOG) MAKEROOMFORPME (VP) NTHCHAR (X N FLG RDTBL) \\FM.STATE-CHANGESTATE -(NEWSTATE SI::$PROG1-FIRST-EXPRESSION$ WINDOW) \\FM.STATE-SETUP (SI::$PROG1-FIRST-EXPRESSION$ -MENU.ITEMS MENU.FONT) FILL.INITTBLE (DISPLAYSTREAM DISPLAYDATA) SPY.BUTTON (REG) \\FM.FORMAT (PROP -MOTHER) \\10MBRAWTRANSMIT (NDB PACKET) BMOBJ.IMAGEBOXFN (IMAGEOBJ BITMAPOBJ IMAGE.STREAM BITMAP -STREAMTYPE SCALE DESCENT) \\LEAF.LOOKUPCACHE (PAGE#) \## (L) \\FM.NWAY-SETUP ( -SI::$PROG1-FIRST-EXPRESSION$ REGIONS) ICONBUTTONEVENTFN (ICONW) SEDIT::SET-LIST-FORMAT (SEDIT::FN) -\\SETARG0 (N BFLINK VAL) TITLEW.BUTTONEVENTFN (TITLEWINDOW MAINWINDOW) COMPILER::FIND-TAG-DUPLICATION -(COMPILER::CODE COMPILER::FIND-P) TEDIT-BOOK (FILES DOC DIRECTORY FILE PRINT-FILE DONT-SEND) -|SetBcplString| (STR L BASE) EDITBMREPAINTFN (WIN BM GRIDSPEC EDITAREABITWIDTH EDITAREABITHEIGHT) -FIND.LINE (BUF) COMPILER::ALPHA-TAGBODY (COMPILER::BODY CL:TAGBODY) DOSLINKER (FILES STREAM OLDDIR -FILE) BQUOTIFY (FN X DEFAULT) ENDMASTER.IP (IPSTREAM) ERASE/GRAPHNODE (STREAM NODE) -\\NSRANDOM.REESTABLISH (STREAM) XCL::ADD-WHERE-IS-DATABASE (PATHNAME XCL::NEW-PATHNAME) -\\EDITBMHOWMUCH (BM EDITWIDTH EDITHEIGHT TITLEQ) DO.EDIT.COMMAND (CH) UNDONLSETQ (UNDOFORM UNDOFN) -POP-IP-STACK (IPSTREAM) \\PUTBASESTRING (BASE BYTEOFFSET STRING) XCL::WALK-DO* (XCL::FORM XCL::CONTEXT -) CLIPRECTANGLE.IP (IPSTREAM X Y W H) EDITBMRESHAPEFN (BMEDITWINDOW BM TEMPBM.W TEMPBM.H ZEROBMFLG) -CLISP3 (X) \\GETINTEGERPART (FRACT ROUNDER) \\DSPTRANSLATE.IP (IPSTREAM T\x T\y) LISPFORM.SIMPLIFY (FN -) \\INCUSECOUNT (FRAME) CL:PRINT (OUTPUT-STREAM OBJECT) CLISPIFY2D (FORM) SAVESETQ (SETQX) -CONDITIONS::%RESTART-DEFAULT-REPORTER (CONDITIONS:RESTART STREAM) \\TEDIT.BOLD.CARET.ON (TEXTOBJ -TEXTSTREAM SEL) \\INIT-MISCN-TABLE (MISCN-ENTRY N) CREATEARRAYSLICE (CMLARRAY DIMS SCANDIMS LEVELS) -COMPILER::ALPHA-SETQ (COMPILER::FORMS COMPILER::TAIL COMPILER::SETQS) CH.RETRIEVE.DOMAIN.ACL ( -WHICH.LIST AUTH) BOUNDP (CL::VAR) CLISP3B (CLTYP) \\EXTENDSTACK (EASP) \\FM.FORMATBYGRID (LEFT BOTTOM -DESCRIPTION FONT ROWSPACE COLUMNSPACE ID EXTENT PROPS) CODE.SUBST (X Y FORM) FINDATOM (ATOM POS X) -COMPILER::FIND-REACHABLE-TAGS (COMPILER::CODE) \\TEDIT.PRESS.HARDCOPY (PFILE) CODE.SUBPAIR (L1 L2 FORM -) \\MOVEFRAME (OLDFRAME) COURIER.CALL (ARGS PROGRAM PROCEDURE) /ECHOMODE (TTBL) -\\FM.3STATE-CHANGESTATE (NEWSTATE SI::$PROG1-FIRST-EXPRESSION$) ED (CL::TYPES-WITH-DEFNS) -MISCN-COLLECT (ARG-COUNT ARG-PTR) \\VARNOTUSED (FORM VAR) \\GCSCANSTACK (EASP) CL:FORMAT ( -CL::FORMAT-ARGUMENTS CL::CONTROL-STRING) FIND1STPRIME (N) TERM.ERASE.IN.DISPLAY (CHAT.STATE PARAM -TTYWIDTH YPOS FONTDESCENT FONTHEIGHT XPOS) TB.ITEM.DELETED? (ITEM) ARGS.COMMUTABLEP.LIST (L X Y) -|\\LFFullFileName| (UNPACKEDNAME) CL:SYMBOL-NAME (CL:SYMBOL) INSPECT/ATOM (ATM ALWAYSASKFLG -OFFER-INSPECT-CODE? PROFILE WHERE) EVALUABLE.CONSTANT.FIXP (X) UNIX-STREAM-IN (STREAM) CL:MAKUNBOUND ( -CL:SYMBOL) \\MENUSUBITEMS (MENU ITEM) MISCN-NUMBER (NAME) EDIT.BITMAP.REAL (BITMAP) -COMPILER::ALPHA-RETURN-FROM (COMPILER::NAME COMPILER::DEST COMPILER::FORM) HELPSYS (PROPS FN) -%MAKE-ONED-ARRAY (ELEMENT-TYPE FATP DISPLACED-TO TOTAL-SIZE TYPE-NUMBER READ-ONLY-P FILL-POINTER -EXTENDABLE-P DISPLACED-INDEX-OFFSET) \\TELEBLTCURSOR (CURSOR) SEDIT::STRINGIFY (SEDIT::NODE -SEDIT::ENVIRONMENT) \\TEDIT.BOLD.CARET.OFF (TEXTOBJ TEXTSTREAM SEL) VAR.NOT.USED (FORM SETQONLY?) -GET.MENU.LIST (CMLARRAY RANK) \\VARNOTUSED.LIST (L FORM X SETQONLY?) OPT.EQVALUE (V) \\SPP.RESETCLOSE -(STREAM) FILEBLOCKTRAILER (BLOCKINFO) DELETEHASHKEY (HASHFILE HASHKEY) \\WALKOVER.SF.LIST (L PRED X -REST1 REST2 REST3) XCL::WALK-BINDINGS-2 (XCL::WALKED-BINDINGS XCL::BINDING XCL::WALKED-BINDING -XCL::CONTEXT) TB.ITEM.SELECTED? (ITEM) TEDITWINDOWP (TEXTOBJ) \\WALKOVER.FUNCTION (PRED REST1 REST2 -REST3) |\\LFGetDirectory| (|vol|) ARRAY (TYPE ORIG ALIGN BASE NWORDS) TILEAREA (SRCBM WIN LFT BTM WDTH - HGHT) \\FM.3STATE-SELECTEDFN (ITEM) SCALE/TONODES (NODE SCALE) IP-TOS (IPSTREAM) SETA (N BASE V) -BEGINPREAMBLE.IP (IPSTREAM) \\SETUPGUARDBLOCK (LEN) \\WALKOVER.SPECIALFORMS (CLZ PRED REST1 REST2 -REST3 L) \\ALLOCHEIGHTTOGROUPEDWINDOW (WGROUPINFO WHEREONEDGE EXTBUCKET TOTALXTRA TOTALNOWSIZE) -\\EDITBM/PUTUP/DISPLAY (BM GRIDSPEC BITSWIDE BITSHIGH WINDOW) DELETETO1 (TAIL) CLOSEICONWINDOW ( -MAINWIN) \\POPSTATE.IP (IPSTREAM |State|) GET (CL:SYMBOL CL::INDICATOR CL::DEFAULT) SI::NON-LOCAL-RETURN - (BLIP&VALUES) \\ALLOCWIDTHTOGROUPEDWINDOW (WGROUPINFO WHEREONEDGE EXTBUCKET TOTALXTRA TOTALNOWSIZE) -\\CLIPANDDRAWLINE1 (BITMAP LEFT RIGHT BOTTOM TOP DS BMRASTERWIDTH OPERATION COLOR) HASHFILEDATA ( -HASHFILE) \\TEDIT.MARK.LINES.DIRTY (CH1 CHLIM CHLIM# CH#) XCL::WALK-BINDINGS-1 (XCL::BINDING -XCL::OLD-DECLARATIONS XCL::OLD-LEXICAL-VARIABLES XCL::CONTEXT) \\INIT-USER-SUBR-TABLE (SUBR-ENTRY) -|\\LFUnpackName| (|name| PARSEDNAME STRING) \\UNDEFINED-MISCN-UFN (INDEX ARG-COUNT ARG-PTR) -|\\LFReadFileID| (|directory| |position|) OPT.JUMPCOPYTEST (VL) DOICONWINDOWCOM (WINDOW) CL:REMOVE ( -SEQUENCE LENGTH ITEM START FROM-END KEY TEST-NOT TEST) COMPILER::ALPHA-PROGV (COMPILER::SYMS-EXPR -COMPILER::VALS-EXPR COMPILER::BODY-FORMS) FASL::ELEMENTS-IDENTICAL-P (CL:ARRAY FASL::SEQ FASL::X -FASL::TESTELT) CL:FIND (SEQUENCE LENGTH ITEM START FROM-END KEY TEST-NOT TEST) \\3MBRAWTRANSMIT (PBI) -SEDIT::COPY-SELECTION (SEDIT::POINT SEDIT::SELECTION $$OUTPUT SEDIT::CONTEXT) \\TEDIT.BOLD.SEL.ON ( -TEXTSTREAM TEXTOBJ SEL) \\LEAF.ADD.QUOTES (NAME OSTYPE) /DELETECONTROL (TYPE) ADD-USER-SUBR ( -USER-SUBR-NAME USER-SUBR-INDEX USER-SUBR-UFN) CL:SYMBOL-FUNCTION (CL:SYMBOL) CLISPIFY2C (FORM -SUBPARENT) CL:FMAKUNBOUND (CL:SYMBOL) \\DELETETREE (OLD OLDLEN) \\FM.3STATE-DOWNFN (ITEM WINDOW) -CL:THROW (THROW-TAG THROW-VALUE) TERM.CLEAR.TAB (CHAT.STATE TERMINAL.X) XCL::WALK-ARGLIST (XCL::CONTEXT -) TB.UNSELECT.ALL.ITEMS (START END) \\DECL.COMNT.PROCESS (FORMS) |\\LFOpenOldFile| (|fullFileName| -|directoryPointer| |leaderPage|) OPT.EQOP (OP1 OP2) EQ-TO-CADR (ITEM LIST) \\FM.3STATE-SETUPOFFBITMAP -(FONT SI::$PROG1-FIRST-EXPRESSION$ BOX STREAM) SI::INTERNAL-THROW-VALUES (TAG) USER-SUBR-NUMBER (NAME) - OPT.PRATTACH (ITEM) FINDPCNODE (PC) SI::PVAR-VALUE-IN-FRAME (FRAME NT ATOM#) ICONPOSITION.FROM.WINDOW - (WINDOW WREG ICONREGION) COMPILER::ALPHA-PROGN (COMPILER::FORMS COMPILER::TAIL COMPILER::OLD-CONTEXT) - SI::UNWIND-TO-BLIP (BLIP) \\UNDEFINED-USER-SUBR-UFN (USER-SUBR-INDEX ARG-COUNT ARG-PTR) -FASL:CLOSE-FASL-HANDLE (FASL::HANDLE) /CONTROL (TTBL) \\BSP.CLOSE.OPEN.SOCKETS (SOC) -MAKE-NETWORK-TRACE-WINDOW (STREAMVAR REGION TITLE FLGVAR WINDOW FLG) SI::NON-LOCAL-GO (BLIP PC) ELT (A - N) LIST (N) \\TELERAIDEXIT (RESET) \\TEDIT.BOLD.SEL.OFF (TEXTSTREAM TEXTOBJ SEL) \\DISCARDFRAME ( -OLDALINK ALINK SIZE BLINK) SETF-SYMBOL-FUNCTION (CL:SYMBOL) INSPECT/BITMAP (BITMAP WHERE) -UNIX-STREAM-PEEK (STREAM NO-ERROR) DECODE/WINDOW/OR/DISPLAYSTREAM (WINDOWVAR WINDOW) -SI::NON-LOCAL-RETURN-VALUES (BLIP) CL:SYMBOL-VALUE (CL:SYMBOL) CL:FBOUNDP (CL::FN) CL:FIND-SYMBOL ( -STRING) EDITBMCLOSEFN (BMW) CURRENT.WORD (CHAR TABLE CH) SCALE/GRAPHNODE/BORDER (SCALE) CLISPIFY1 ( -CLTYP0) SUBRNUMBER (NAME) \\TEDIT.SHOWSELS (TEXTOBJ SELN HOW ON) PROCESSPROP (ARGS PROP) WTFIX1 ( -BREAKFLG FAULTFN DWIMUSERFORM RESULT) PRINTCURSOR (VAR) CL:SYMBOLP (X) BREAKLINE (USECR OLDEND OLDLINE -) COMPILER::ALPHA-MV-PROG1 (COMPILER::FORMS COMPILER::VALS-USED) CLDISABLE (OP X) EQ-TO-CAR (ITEM LIST -) FASL::FAT-STRING-P (STRING) BEGINMASTER.IP (IPSTREAM) SEDIT::INSERT (SEDIT::POINT SEDIT::CONTEXT -SEDIT::SELECTION) DISPLAYLINK/RL (PARAMS TRANS GNR GNL WIDTH OPERATION STREAM) BSPREADP (STREAM) -\\CLIPANDDRAWLINE (BITMAP DS WIDTH OPERATION RIGHT LEFT TOP BOTTOM A) COMP.CATCH (ARG) CL:ASSOC ( -CL::ITEM CL::A-LIST CL::TEST-NOT CL::TEST CL::KEY) \\TEDIT.RESHAPEFN (W OLDREGION NEWWHEIGHT NEWWWIDTH - NEWBOTTOM NEWLEFT) COMP.UNWIND-PROTECT (CLEANUPFN) CL:COPY-SYMBOL (CL::SYM CL::NEW-SYM) TRANSLATEREG -(INNER OUTER) \\MENUITEMLABEL (ITEM) \\FM.3STATE-SETUP (SI::$PROG1-FIRST-EXPRESSION$ REGIONS) RELSTKP -(X FRAME) \\TEDIT.CUMULATE.EVENTS (EVENT1 EVENT2 OLDLEN REALEVENT) TEDIT.SCANSEL (STREAM TEXTOBJ) -\\TEDIT.FINDAGAIN (TEXTSTREAM TEXTOBJ SEL) \\LEAF.SETCREATIONDATE (STREAM DATE OPUP FILEDATE) CL:WARN -(CL::DATUM CL::ARGUMENTS) CLEARSTK (PAGE FLG) GETHASHTEXT (KEY HASHFILE HASHTEXTPTR DSTFIL) -SI::VARIABLE-NAME-IN-FRAME (FRAME NT CODE) XCL::RELIST*-INTERNAL (XCL::ARGS XCL::X) TB.DESELECTRANGE ( -FIRSTSEL LASTSEL) FILL.XPER (STRM TEXT YMAX YMIN) COMP.GLOBALVARP (X) |\\LFCreateFile| (|fileName| -|vol| |info|) \\LINEWITHBRUSH (DASHLST DISPLAYSTREAM BRUSH DISPLAYDATA) \\TEDIT.CLOSEUPLINES (TEXTOBJ -WINDOW WWIDTH) \\SETUPSTACK1 (STKEND DEFPTR NARGS ALINK CLINK PC) TEDIT.OBJECT.CHANGED (STREAM OBJ PC -OBJECT) \\SAFE.FIRST (LIST.OR.ATOM) EDITBMSCROLLFN (W DX DY) CHECK.MARGIN (LINE BUF) -\\NOTENEWICONPOSITION (NEWPOS) |\\VFMPutNext| (|key| |volumePage| |level|) NSLOGIN (HOST MSG) -BEGINPAGE.IP (IPSTREAM) SEDIT::SELECT-SEGMENT (SEDIT::NODE SEDIT::CONTEXT SEDIT::SUBNODE SEDIT::INDEX -SEDIT::OFFSET SEDIT::ITEM) \\USER-SUBR-UFN (ARG-PTR USER-SUBR-INDEX ARG-COUNT) \\RESETSTACK0 (OLDBASE) - PRINTWORDS (NWORDS BASE) BIT.IN.ROW (BITMAP ROW) INSPECT/LISTP (LST WHERE) UNIX-STREAM-EOFP (STREAM -CH) XCL::RELIST* (XCL::X XCL::ARGS) TB.UNSELECT.ITEM (ITEM BROWSER N) FILL.CONT (STRM TEXT YMAX YMIN) -ICMLARRAY.GETMENUWGROUP (FONT CMLARRAY DISPLAYEDLEVELS BFONT DIMS PHEIGHT) |\\LFGetStreamForFile| ( -NAME RECOG FULLNAME ACCESS OTHERINFO) \\UPCASEBASE (OFFSET LENGTH BASE CODE) MAXMENUITEMWIDTH (MENU -FONT P2FLG) \\FM.TOGGLE-CHANGESTATE (SI::$PROG1-FIRST-EXPRESSION$) \\TELERAIDENTRY (METADEBUGGING) -COURIER.EXECUTE.CALL (PROGRAM PROCEDURE ARGLIST STREAM OUTSTREAM W FIXP PGMDEF PROCDEF ARGTYPES -NOERRORFLG) UNDONLSETQ1 (TAIL) \\FM.TOGGLE-SELECTEDFN (ITEM) TOPW.BUTTONEVENTFN (WINDOW MAINWINDOW P) -FASL:OPCODE-SEQUENCE (FASL::OPNAME) COMP.CALL (F TYP) XCL::RECONS (XCL::X CAR CDR) TB.SELECTRANGE ( -LAST# FIRST# FIRSTSEL LASTSEL) COMP.LAM1 (FN DEF) |\\LFUpdateLeaderPage| (|time|) TERM.ERASEBITS ( -CHAT.STATE DSP LEFT BOTTOM WIDTH HEIGHT) ICMLARRAY.GETREGIONFN (WINDOW STATE) COMPILER::ALPHA-MACROLET - (COMPILER::BINDINGS COMPILER::NEW-ENV COMPILER::MACRO) DATATYPE (NAME&FIELDS) \\CONTEXTAPPLY (CNTXT -FN ARG MYALINK) SEDIT::GROW-SELECTION (SEDIT::SELECTION SEDIT::CONTEXT) FILECODEBLOCK (NCELLS ARLEN -INITONPAGE) \\BSP.GETFILEPTR (STREAM) UPDATEPCNODES (DELTA) SI::BQUOTE-EXPANDER (SI::LEVEL SI::FORM) -CHARCODE (CHAR) TOPW.ADJUSTSELECTION (WINDOW MAINWINDOW SELCOLPROP COLUMNPROPS HORZMARKS) -SI::BQUOTE-PROCESS-LIST (LIST) OPT.SKIPPUSH (CD) MAXMENUITEMHEIGHT (MENU ITEM) BIT.IN.COLUMN (BITMAP -COLUMN) \\BQUOTE.BREAKRESET (FLG) STRICTLY/BETWEEN (VAL LOWER HIGHER) \\TELERAIDSEND (NDB) -TEDIT.MAKESEL (STREAM CH# LEN POINT TEXTOBJ) \\TEDIT.FIND (TEXTSTREAM) \\LEAF.CREATIONDATE (STREAM) -STRING.EQUAL (STRING) BREAKCONNECTION (FAST) FASL:PROCESS-SEGMENT (STREAM FASL::ITEM-FN FASL::OPTABLE) - \\GATHER-CLEANUP-FORMS1 (EOS BOS) \\ATMIN (N WIDTH LEN STREAM) SI::COMMA-ERROR-EXPANDER (SI::FORM) -COMPOSEREGS (OUTER INNER) ADJUSTLINE.AND.RESTORE (JUSTIFYING) SI::BQUOTE-CONS (SI::BCAR) -\\PUSHSTATE.IP (IPSTREAM |XVar#| |YVar#|) FASL:BEGIN-TEXT (FASL::HANDLE) ARCTO.IP (IPSTREAM X1 Y1 X2 -Y2) INTERRUPTED (CH HARDFLG CLASS) FASL:MAKE-OPTABLE (FASL::TABLE CL:VECTOR) BQUOTE.WRAPPER (E) -SEDIT::PARSE--BROKEN-ATOM (CL:STRUCTURE SEDIT::CONTEXT) FB.HARDCOPY.PRINT.TITLE (LMARG RMARG TITLE -IMAGESTREAM) RCOMP3 (DEF FN) \\HARDRESET-CLEANUP1 (NNILS NVARS VARIABLES NTSIZE TABLE MASTERLIST) -ONEDINSPECT.PRINTELEMENT (BOTTOM SUB1DESCENT WINDOW ELT) \\COURIER.REP.BOUT (BYTE) \\CAUSEINTERRUPT ( -CNTXT FN) QUOTE.WRAPPER (SYN) \\FM.TOGGLE-DOWNFN (ITEM WINDOW) \\VECSKIP (PRSTREAM DX DY) -FB.THINCOMMAND (FBROWSER) APPENDOP.IP (OP STREAM) VARIABLES (POS) FASL:CHECK-VERSION (STREAM FASL::VERSION -) ADD.BORDER.TO.BITMAP (BITMAP NBITS WIDTH REAL.NBITS HEIGHT TEXTURE) \\DSPROTATE.PSC (STREAM OROT) -FASL:OPEN-FASL-HANDLE (STREAM) OPT.ONLYMEMB (X) \\TEXTSTREAMBOUT (BYTE LOOKS STRING) UNIX-USERNAME ( -UNIXSTRING) DISPLAYLINK/BT (PARAMS TRANS GNB GNT WIDTH OPERATION STREAM) TEDIT.GETSEL (STREAM) -\\DORETCALL (RCFRAME RETURNER FNHEADER PC NARGS RETURNEE FN START ARGLOC) MB.SHOWSELFN (OBJ DS OBJBOX) - \\TEDIT.REPAINTFN (W TEXTOBJ WREG) \\PUTONSCREENW (W) SUBSTRING (X N M NV %NEW-TYPE-NUMBER) -LAYOUTLATTICE (ROOTIDS NODELST FORMAT) \\UPDATECACHEDFIELDS (DS) \\MAKE.PROCESS0 (FORM \\LINEBUF.OFD) -PASTEFROMCLIPBOARD (STR) \\TEDIT.WINDOW.TITLE (TEXTSTREAM TEXTOBJ) \\GATHER-SPECIAL-BINDINGS (NT IVAR -FRAME) SEDIT::OPEN-LITATOM (SEDIT::NODE SEDIT::STRING-LENGTH NV) FB.HARDCOPY.MAXWIDTH (FONT FILES -ATTRINDEX) \\DRAWARC.PSC (STREAM BRUSH IMAGEDATA DASHING D CENTERX CENTERY RADIUS STARTANGLE NDEGREES) - UNIX-FULLNAME (UNIXSTRING) OPT.DELETEFRAMECHECK (F) \\FM.TOGGLE-SETUP (SI::$PROG1-FIRST-EXPRESSION$ -REGIONS) \\VECPUT (PRSTREAM DX HALFVECWIDTH DY) UNIX-GETENV (UNIXSTRING X) APPENDRATIONAL.IP (N D -STREAM I) \\SHOWMENULABEL (ITEM MENU DSP ITEMREGION LABEL) PFI.AFTER.NEW.PAGE (STREAM OLDFONT) -NTHCHARCODE (N X STRING RDTBL CODE) \\FM.MOMENTARY-SELECTEDFN (ITEM WINDOW) SPECVARP (X FN) FB.THINP ( -FILENAME EXT AGE ONEDAY DELTATIMESTAMP) APPENDNUMBER.IP (STREAMA1587 NUMA1586 STREAM LEN) -MULTIFILEINDEX (FL PRINTOPTIONS) TTYINPROMPTFORWORD (CANDIDATE.STR GENERATE?LIST.FN URGENCY.OPTION) -SETUPFONTS.PRESS (FONTS PRSTREAM) \\ALLOCPAGEBLOCK (NPAGES) \\DRAWPOINT.PSC (BRUSH STREAM X WIDTH Y -HEIGHT OPERATION) \\SPPGETERROR (TRIALPKT) UNIX-GETPARM (UNIXSTRING) SET-PACKAGE-INTERACTIVELY (X Y) -FASL:UNIMPLEMENTED-OPCODE (FASL::OPCODE) \\ICONW.FORMAT.TITLE1 (TITLE TITLELEN FONT MAXWIDTH -BREAKCHARS) COMPILER::CLOSURE-ANNOTATE-SETQ (COMPILER::NODE COMPILER::IN-LOOP-P) TEDIT.SEL.AS.STRING ( -SEL TEXTOBJ) OPT.FRAMEVAR (F X) \\VECENCODE (DY DX) MKSTRING (X R RDTBL BASE) \\IMAGEUSERPROP (PROP -VAL) SEDIT::INSERT-STRING (SEDIT::WHERE SEDIT::NODE SEDIT::CONTEXT SEDIT::CHARS SEDIT::POINT) -COMPILER::CLOSURE-ANNOTATE-PROGV (COMPILER::NODE COMPILER::IN-LOOP-P) MARGINBAR.CREATE (MARL1 MARLN -MARR MARTABS MARUNIT MARTABTYPE BOX) COMPILE1 (FN COREFLG) MAKE-PRIME-HASHTABLE-SIZE (N) -\\TEDIT.FORMAT.FOOTNOTE (PRSTREAM TEXTOBJ FORMATTINGSTATE REGION) MB.WHENOPERATEDFN (OPERATION OBJ SEL - DS) CL:POSITION (SEQUENCE LENGTH ITEM START FROM-END KEY TEST-NOT TEST) \\CWSU.DEFAULT (STREAM ITEM -PROGRAM TYPE) MAKE-PACKAGE-HASHTABLE (SIZE RES N) |UnixTempFile| (|host| |Prefix| |dir| |str|) -\\ADVANCE.STORAGE.STATE (FLG) \\DSPTRANSLATE.PSC (STREAM TX TY MDX MDY REG) CL::PRINT-PACKAGE (STREAM -PACKAGE) WORD.MATCHES.BUFFER (START BUFTAIL TABLE CH WORD) \\HARDRESET-CLEANUP (BINDINGS VARIABLES X -PAIR) TEDIT.GET.LOOKS (TEXTOBJ) OPT.FRAMEDEL (F FRM X VR F2) \\FM.MOMENTARY-SETUP ( -SI::$PROG1-FIRST-EXPRESSION$) NECCSPEC (VAR BINDER) \\ONSCREENW (W) STRPOS (CAOFFST CHAR CASIZE CABASE - CAFAT LASTI JMAX JSTART) \\TEDIT.CONVERT.TO.FORMATTED (START END TEXTLEN START-OF-PIECE PCNO CRSTRING -) COMPILER::CLOSURE-ANNOTATE-TAGBODY (COMPILER::NODE COMPILER::SEGMENTS COMPILER::COULD-BE-A-LOOP -COMPILER::*NEED-STORAGE*) \\STARTPAGE.PRESS (PRSTREAM) BCOMPL2 (DONTCOMPILEFNS ENTRIES) CLISPDEC1 (X) -TEDIT.HARDCOPY-COLUMN-END (TEXTOBJ FORCENEXTPAGE CHNO FORMATTINGSTATE REGION) EQUAL.CH.NAMES (NAME1 -NAME2) \\INITMDSPAGE (SIZE SLOP) MB.SIZEFN (OBJ STREAM) TEDIT.DEFAULT.MENUFN (W) COURIER.REP.LENGTH ( -TYPE STRING PROGRAM BASETYPE WHICH) \\TFBRAVO.GETPARAMS (LIS NAMES) |UnixPrintCommand| (COPIES NAME -TMPNAME) SWITCH/NODE/HEIGHT/WIDTH (NL N) IRM.GET.CREF (FILE IMAGEOBJ DATA) \\FIXILINES (SEL DCH -OTEXTLEN) SEDIT::INSERT-LITATOM (SEDIT::NODE SEDIT::CONTEXT SEDIT::WHERE SEDIT::POINT) -COMPILER::CLOSURE-ANNOTATE-RETURN (COMPILER::NODE COMPILER::IN-LOOP-P) MSCALE (VAL UNIT) +ICMLARRAY.VALUECOMMANDFN (ARGS SETABLEMENU INSPECTABLEMENU) SI::BQUOTE-EXPANDER (SI::LEVEL SI::FORM) +\FORMATLINE (OLINE BASEA0737 N ARR VAL BASEA0738 BASEA0739 BASEA0740 DS BASEA0741 BASEA0742 FONTDESC +CHARCODE BASEA0743) \TEDIT.CUMULATE.EVENTS (EVENT1 EVENT2 OLDLEN REALEVENT) \HARDRESET-CLEANUP ( +BINDINGS VARIABLES X PAIR) MB.PUTFN (OBJ FILE TEXT MBFN FONT STREAM W ATTR) UNDONLSETQ1 (TAIL) +\HARDRESET-CLEANUP1 (NNILS NVARS VARIABLES NTSIZE TABLE MASTERLIST) COMP.EFFECT (LV E) HASH.PASSWORD ( +PASSWORD) XCL:UNADVISE-FUNCTION (XCL::FN-TO-UNADVISE XCL::FN XCL::ADVICE-NAME) \BQUOTE.BREAKRESET (FLG +) RDTBL\NONOTHERCODES (RT RESULT) XCL:READVISE-FUNCTION (XCL::FN-TO-READVISE XCL::FN XCL::IN-FN) +ASKUSERSETUP (ENTRY) XCL:REINSTALL-ADVICE (XCL::BEFORE XCL::AFTER XCL::AROUND) SPP.FORCEOUTPUT (NBYTES +) XCL:ADVISE-FUNCTION (XCL::FN-TO-ADVISE XCL::FN CL:WHEN XCL::PRIORITY XCL::ADVICE-NAME) QUOTE.WRAPPER + (SYN) \10MB.GETPACKETLENGTH (IOCB) GETSCREENREGION (MINWIDTH MINHEIGHT INITREGION NEWREGIONFN +NEWREGIONFNARG INITCORNERS) CL::COUNT-OCCURRENCES (CL::FORM CL:SYMBOL) \DORETCALL (RCFRAME RETURNER +FNHEADER PC NARGS RETURNEE FN START ARGLOC) XCL:COMPILE-DEFINER (COMPILER::NAME TYPE) +SI::COMMA-ERROR-EXPANDER (SI::FORM) TEDIT.FORMATBOX (REGION TEXTOBJ PRSTREAM CH# REGIONSPEC) +FASL:BEGIN-TEXT (FASL::HANDLE) \CARET.FLASH.MULTIPLE (STREAMS CARETS ONRATE OFFRATE) XCL:REBREAK-FUNCTION + (XCL::FN-TO-REBREAK XCL::FN XCL::NAME) \TEDIT.PUT.PARALOOKS.LIST2 (FILE STREAM W LOOKSLIST LOOKSHASH) + XCL:TRACE-FUNCTION (XCL::FN-TO-TRACE XCL::FN XCL::ORIGINAL XCL::MIDDLE-MAN XCL::ENTRY) +FASL:PROCESS-SEGMENT (STREAM FASL::ITEM-FN FASL::OPTABLE) \ALLOCMINIMUMSIZES (INTMINWIDTH INTMINHEIGHT + ATW) BQUOTE.WRAPPER (E) APPENDRATIONAL.IP (N D STREAM I) CHARCODE (CHAR) FIND.NON.SPACE (CH) +XCL:CREATE-TRACE-WINDOW (XCL::REGION XCL::TITLE XCL::WINDOW) DASSEM.DASMBIND (NV NN K) +COMPILE-FILE-SCAN-FIRST (FIRSTFLG DOCOPY EVAL@COMPILE FORM COMPILED.FILE) MSSTOREDATA (FNNAME KWN) +FB.COUNT.FILE.CHANGE (FLG ITEM SIGN) DBG::REGION-NEXT-TO (REGION RWIDTH RHEIGHT NLFT NBTM) +SI::BQUOTE-PROCESS-LIST (LIST) FASL:MAKE-OPTABLE (FASL::TABLE CL:VECTOR) VARIABLES (POS) +\COURIER.CHECK.ERRORS (DEFS) \ALLOCPAGEBLOCK (NPAGES) SEDIT::SET-POINT-QUOTE (SEDIT::POINT SEDIT::CONTEXT + SEDIT::NODE TYPE SEDIT::COMPUTE-LOCATION? SEDIT::ITEM) ICONTITLE (ICONW MSG) MAKEFILESCOMS (FILES) +MSMARKCHANGE1 (FNS) \GETBRUSHBBT (BRUSHBM DISPLAYDATA Operation SourceType) \ATMOUT (STREAM W) +SETUPFONTS.PRESS (FONTS PRSTREAM) SI::BQUOTE-CONS (SI::BCAR) CL::STRUCTURES.HASDEF (CL::NAME) +FASL:UNIMPLEMENTED-OPCODE (FASL::OPCODE) MODERN-SNAPW (W) \READNUMBER.OUTLINEREGION (OUTLINESIZE WIN +REG N) COPYFILES (OPTIONS SOURCE BACKUP COPYFILESTOSPEC FILENAME DT1 STR) FASL:CHECK-VERSION (STREAM +FASL::VERSION) VRULE.CREATE (VRULE DASHING) \FM.EDIT-FINDFIRST (WINDOW) FASL:OPEN-FASL-HANDLE (STREAM) + TB.UNSELECT.ALL.ITEMS (START END) MAKEBRES (X0 Y0 DX DY) SEDIT::SET-POINT-UNKNOWN (SEDIT::POINT +SEDIT::CONTEXT SEDIT::NODE SEDIT::OFFSET SEDIT::COMPUTE-LOCATION?) CL::%%EXP-FLOAT (CL::X CL::M CL::R +CL::N) UNIX-USERNAME (UNIXSTRING) \NSRANDOM.REESTABLISH (STREAM) \HANDLE.RAW.OTHER (PACKET) +\ADVANCE.STORAGE.STATE (FLG) SUBSTRING (X N M) SEDIT::SET-POINT-LIST (SEDIT::NODE SEDIT::ITEM +SEDIT::NUMBER-SUBNODES SEDIT::CONTEXT SEDIT::COMPUTE-LOCATION?) MAKETITLEBARICON (WINDOW SCREEN) +CL:POSITION (SEQUENCE LENGTH ITEM START FROM-END KEY TEST-NOT TEST) COMPILE-FILE-EXPRESSION ( +COMPILED.FILE DEFER FORCE-OUTPUT-P DEFINITION BODY X VARS VALS INNER-FORM) SLICERANK (SELECTION) +\VECENCODE (DY DX) ALLOCSTRING (FATFLG) %%GET-TYPE-TABLE-ENTRY (TYPENUMBER) CLOSEATTACHEDWINDOWS ( +WINDOW ATTACHEDWINDOW) PRINTPUP (PACKET TYPE CALLER) BREAK.MSG.INTO.LINES (MSG MSGSTR FONT WIDTH) +MAKE-PACKAGE-HASHTABLE (SIZE RES N) VRULE.GETFN2 (INPUT.STREAM) \LEAF.ABORT.FROMMENU (MENU) \SPP.BOUTS + (STREAM BASE OFF NBYTES) UNIX-FULLNAME (UNIXSTRING) \SPP.GETNEXTBUFFER (WHATFOR STREAM) +TB.DESELECTRANGE (FIRSTSEL LASTSEL) \INITMDSPAGE (SIZE SLOP) FM.ITEMPROP (ARGPTR) \LFScavFileName ( +NAME&VERSION) UNIX-GETENV (UNIXSTRING X) \STARTPAGE.PRESS (PRSTREAM) PFI.COLLECT.DEFINERS (BYPROP +KNOWNTYPES NAMEPROP) CL::STRUCTURES.EDITDEF (CL::NAME CL::SOURCE CL::EDITCOMS CL::OPTIONS TYPE) +FB.UPDATEBROWSERITEMS (WANTED FONT TBROWSER) NTHCHARCODE (N X RDTBL CODE) FB.MAKE.SUBDIRECTORY.ITEM ( +DATAWITHSUBDIR FBROWSER SUBDIRECTORY DIRSTART) \LFScavVersion (NAME&VERSION FILEID) MKSTRING (X R +RDTBL BASE) \LFUnpackName (name PARSEDNAME) SEDIT::PRINT-GAP (STREAM SEDIT::GAP) +CL::STRUCTURE-FUNCTION-P (CL::PS CL:SYMBOL CL::KEY) CL::PRINT-PACKAGE (STREAM PACKAGE) TEDIT.\INSERT ( +STREAM TEXTOBJ CH CH# OTEXTLEN XPOINT) \TEDIT.REPAINTFN (W TEXTOBJ WREG) \COURIER.CHECK.PROCEDURES ( +DEFS) MSPARSE (SENTENCE) UNIX-GETPARM (UNIXSTRING) COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION (COMPILER::NAME + COMPILER::*ENVIRONMENT* COMPILER::DEFINITION) \FM.EDIT-MESSAGE (BUTTONS) MAKE-PRIME-HASHTABLE-SIZE (N +) TB.UNSELECT.ITEM (ITEM BROWSER N) \SPP.SETFILEPTR (STREAM INDX) STRPOS (CAOFFST CHAR CASIZE CABASE +CAFAT LASTI JMAX JSTART) PFI.PRINT.FILECREATED (STR FONT TABSTOP ENV SPEC) SETF-SYMBOL-PACKAGE (VALUE) + COMPILER::FUNCTION-P (COMPILER::FORM) TWODINSPECT.REPLACE (WINDOW STOREFN NEWVALUE DATUM ROWPROP +COLUMNPROP) SEDIT::MAKE-GAP (SEDIT::ITEM) BAKTRACE1 (IPOS) IRM.GET.CREF (FILE IMAGEOBJ DATA) +\NSFILING.SET.CONTINUANCE (SECONDS) CENTERINWIDTH (RELATIVETOREGION WIDTHTOCENTER) ASKUSER (WAIT EOL +SPACE OPTIONSLST OPTIONS ORIGKEYLST ORIGDEFAULT) \FLUSH.NDB.QUEUE (QUEUE EVENT USE) SEDIT::REPLACE-QUOTE + (SEDIT::SUBNODES SEDIT::CONTEXT SEDIT::NODE) CLISPDEC (X) DISPLAYLINK/BT (PARAMS TRANS GNB GNT WIDTH +OPERATION STREAM) COURIER.WRITE.NSADDRESS (STREAM ADDR) TEDIT.GET.OBJECT (STREAM FILE CURCH# TEXTOBJ) +\SPP.GETFILEPTR (STREAM) PFI.PRINT.INDEX (LASTPAGE CRDATE INDICES LINESPERPAGE) \MAYBEPEEKPUP (PUP) +CREATECELL (TYP) DBG::ATTACH-BACKTRACE-MENU (TTYREGION) \DWOUT (FILE NUMBER) CL::PRINT-PACKAGE-HASHTABLE + (STREAM CL::TABLE) \PRESSINIT (STREAM) SHOWBITMAP.IP (IPSTREAM BITMAP MAXYPIXELSPERCHUNK ROTATION +HEIGHT) TEDIT.GETPOINT (SEL STREAM TSEL) D-ASSEM:ASSEMBLE-FUNCTION (D-ASSEM::TAG D-ASSEM::*DTAG-ENV* +D-ASSEM::LAP-FN D-ASSEM:DCODE) TEDIT.DEFAULT.MENUFN (W) \COURIER.CHECKDEF (DEF NAME TAIL) +BitFieldShiftedMask (FD) EDITGETDEF (TYPE) \SPP.RESETCLOSE (STREAM) D-ASSEM:INTERN-DCODE (D-ASSEM:DCODE + D-ASSEM::NAME-TABLE D-ASSEM::NAME-TABLE-SIZE D-ASSEM::NTSIZE D-ASSEM::OVERHEADBYTES D-ASSEM::NTWORDS +D-ASSEM::FRAME-NAME D-ASSEM::FVAROFFSET) SEDIT::REPLACE-LIST (SEDIT::START SEDIT::END SEDIT::S +SEDIT::DELTA-LENGTH SEDIT::DEPTH SEDIT::CONTEXT SEDIT::POINT) COLLECT-CASE-SELECTORS (CLAUSES CLAUSE +NAME) BitFieldMask (FD) SEDIT::PRINT-BROKEN-ATOM (STREAM SEDIT::BROKEN-ATOM) ONEDINSPECT.REPLACE ( +WINDOW STOREFN NEWVALUE DATUM PROP) BitFieldShift (FD) IRM.PUT.CREF (IMAGEOBJ STREAM) %%SUFFIX-SYMBOL +(SYMBOL SUFFIX PACKAGE) BitFieldWidth (FD) %%LIT-SIZE-TO-SIZE (LIT-SIZE) D-ASSEM:FIXUP-PTR-NO-REF ( +D-ASSEM::PTR D-ASSEM::BASE D-ASSEM::OFFSET D-ASSEM::LOW) \TEDIT.PROMPT.PAGEFULLFN ( +PROMPT-DISPLAY-STREAM PROMPT-WINDOW OLDREGION MAINWINDOW %#LINES ATTACHEDMENUS OLDBOTTOM OLDTOP) +COURIERPROGRAM (X) \DTEST (OBJ TYPE) COURIER.EXECUTE.CALL (PROGRAM PROCEDURE ARGLIST STREAM OUTSTREAM +W FIXP PGMDEF PROCDEF ARGTYPES NOERRORFLG) D-ASSEM:FIXUP-SYMBOL (CL:SYMBOL D-ASSEM::BASE D-ASSEM::OFFSET + D-ASSEM::HIBYTE D-ASSEM::WORD) DISPLAYLINK/RL (PARAMS TRANS GNR GNL WIDTH OPERATION STREAM) +SI::SPLIT-PROCEED-CLAUSES (SI::CLAUSES SI::CASES SI::BODIES) TB.INSERT.ITEM (LASTITEM#) D-ASSEM:ALLOCATE-CODE-BLOCK (D-ASSEM::NT-COUNT D-ASSEM::START-PC D-ASSEM::CODE-LEN D-ASSEM::TOTAL-SIZE - D-ASSEM::CODE-BASE) CL::PRINT-PACKAGE-HASHTABLE (STREAM CL::TABLE) \\TEDIT.PROMPT.PAGEFULLFN ( -PROMPT-DISPLAY-STREAM PROMPT-WINDOW OLDREGION MAINWINDOW \#LINES ATTACHEDMENUS OLDBOTTOM OLDTOP) -D-ASSEM:FIXUP-PTR (D-ASSEM::PTR D-ASSEM::BASE D-ASSEM::OFFSET D-ASSEM::LOW) ALLOCSTRING (FATFLG NV -%NEW-TYPE-NUMBER) |UnixShellQuote| (STRING X) REFLECT/GRAPH/HORIZONTALLY (GRAPH W) D-ASSEM:ASSEMBLE-FUNCTION - (D-ASSEM::TAG D-ASSEM::*DTAG-ENV* D-ASSEM::LAP-FN D-ASSEM:DCODE) RECORDALLOCATIONS (DECS X) -SHOWBITMAP.IP (IPSTREAM BITMAP MAXYPIXELSPERCHUNK ROTATION HEIGHT) COMPILER::CLOSURE-ANNOTATE-PROGN ( -COMPILER::NODE COMPILER::IN-LOOP-P) \\DSPPUSHSTATE.PSC (STREAM IMAGEDATA) D-ASSEM:FIXUP-WORD (D-ASSEM::BASE - D-ASSEM::OFFSET D-ASSEM::WORD) CURRENT-TTY-PACKAGE (PACKAGE) ASKUSER (WAIT EOL SPACE OPTIONSLST -OPTIONS ORIGKEYLST ORIGDEFAULT) D-ASSEM:RELEASE-DCODE (D-ASSEM:DCODE) %SUFFIX-SYMBOL (SYMBOL SUFFIX -PACKAGE) D-ASSEM:FIXUP-PTR-NO-REF (D-ASSEM::PTR D-ASSEM::BASE D-ASSEM::OFFSET D-ASSEM::LOW) -CHECK-*CASE-SELECTOR (SELECTOR NAME) PFI.MAKE.LPT.STREAM (IMAGETYPE DEFAULTOPTIONS) -TEDIT.UPDATE.SCREEN (STARTINGLINE INCREMENTAL? NEXTCARETCH#) STANDARDEDITE (EXPR COMS ATM TYPE -IFCHANGEDFN) COLLECT-CASE-SELECTORS (CLAUSES CLAUSE NAME) \\TEDITMENU.RECORD.UNFORMATTED (NEWSTATE -TEXTSTREAM TEXTOBJ FLG) \\TESTPARTITION (NUM HERE) SI::SPLIT-PROCEED-CLAUSES (SI::CLAUSES SI::CASES -SI::BODIES) TB.FINISH.CLOSE (BROWSER CLOSEFLG DONTCLOSE) MB.MARGINBAR.SHOWTAB (TAB UNIT W TABX MODE) -CLISPLOOKUP2 (X) FB.SEEFULLFN (DSP WINDOW) D-ASSEM:FIXUP-SYMBOL (CL:SYMBOL D-ASSEM::BASE D-ASSEM::OFFSET - D-ASSEM::HIBYTE D-ASSEM::WORD) SI::EXPAND-CONDITION-CASE (SI::FORM) OVERLAPPINGWINDOWS (WINDOW X) -IRM.PUT.CREF (IMAGEOBJ STREAM) \\FM.CLEARITEM (WINDOW ITEM) UNECCSPEC (VAR FN) |BitFieldMask| (FD) -|BitFieldShift| (FD) CONDITIONS::PARSE-RESTART-CASE (CONDITIONS::CLAUSE CONDITIONS::FILTER CONDITIONS::REPORT - CONDITIONS::INTERACTIVE) OPT.CLEANFRAME (FRAME AVOIDING) CONDITIONS::CONVERT-RESTART-CASES (CONDITIONS::CASES - CONDITIONS::BODIES CONDITIONS::ANY-ARGLISTS?) FB.FASTSEE.ONEFILE (FILE BROWSER WINDOW) -INTERNAL-SYMBOL-COUNT (PACKAGE) GROW/REGION (REGION) COMPILER:COPY-ENV-WITH-VARIABLE (COMPILER::NEW-ENV - COMPILER::VAR COMPILER::KIND) |BitFieldWidth| (FD) IRM.CREF.BOX (STREAM TYPE IMAGEOBJ) D-ASSEM:INTERN-DCODE - (D-ASSEM:DCODE D-ASSEM::NAME-TABLE D-ASSEM::NAME-TABLE-SIZE D-ASSEM::NTSIZE D-ASSEM::OVERHEADBYTES -D-ASSEM::NTWORDS D-ASSEM::FRAME-NAME D-ASSEM::FVAROFFSET) MB.DEFAULTBUTTON.ACTIONFN (OBJ) CREATECELL ( -TYP) IMAGEOBJCREATE (IMAGEFNS OBJECTDATUM) COMPILER:ENV-BOUNDP (COMPILER::NAME COMPILER:ENV -COMPILER::SCOPE-OR-STRUCT COMPILER::PARENT) SEDIT::HASFAT (SEDIT::STR STRING) DEDITE (EXPR) -COMPILER:ASSEMBLER-ERROR (STRING COMPILER::ARGUMENTS) \\TEDIT.LOOKS.UPDATE (TEXTOBJ BASEA1552 N ARR -VAL BASEA1553 BASEA1554 BASEA1555 BASEA1556 BASEA1557) \\MAKE.COURIER.REP.STREAM (LIST.OF.WORDS) -\\SHOWSEL (TEXTOBJ SHADEHEIGHT SHADE) REPLACEFIELD (DESCRIPTOR FT OFFSET X) \\FM.INSUREVISIBLE (WINDOW - ITEM) MSCHECKVARS1 (FN X) COMPILER:COPY-ENV-WITH-FUNCTION (COMPILER::NEW-ENV COMPILER::FN COMPILER::KIND - COMPILER::EXP-FN) CL:MAKE-PACKAGE (CL::INTERNAL-SYMBOLS CL::EXTERNAL-SYMBOLS CL::%PACKAGE-INDEX CL::USE - PACKAGE CL::NICKNAMES) BOXCOUNT (N) CLIPBOARD-PASTE-STREAM (OST) OPT.FRAMELOCAL (F) \\DTEST (OBJ TYPE -) COMPILER::CLOSURE-ANNOTATE-MV-PROG1 (COMPILER::NODE COMPILER::IN-LOOP-P) \\FM.ENDEDIT (WINDOW -FM.PROCESS WAITFLG) PRINTERROR (LL) APPENDLARGEVECTOR.IP (ARRAY ASIZE AORIG STREAM) \\TYPECHECK (OBJ -TYPE) REMOVE-COMMENTS (XCL::X XCL::A XCL::D) COMPILER:OPTIMIZE-AND-MACROEXPAND-1 (COMPILER::FORM -COMPILER::ENVIRONMENT) COURIER.WRITE.REP (STREAM VALUE PROGRAM TYPE) \\TEDIT.TRY.ABBREV (ABBREV STREAM -) |InstallUnixPrinter| (|PrinterTypes|) REFLECT/GRAPH/VERTICALLY (GRAPH H) %PRINT-CONDITION (STREAM -CONDITION) \\ACTONDISKPAGES (FIRSTPAGE LASTPAGE ACTION HINTLASTPAGE |ReturnOnCheckError| WIDTH) -IMAGEFNSP (X) SEDIT::GROW-SELECTION-LITATOM (SEDIT::SELECTION SEDIT::CONTEXT SEDIT::NODE) TERMTABLEP ( -TTBL) INTERPRESSBITMAP (OUTPUTFILE BITMAP) FB.MENU.WHENSELECTEDFN (ITEM) PARSE.NSNAME (\#PARTS) -\\DISKERROR (ERRCODE) MB.SELFN (FN OBJ TSEL W) ONEDINSPECT.PROPWIDTH (PROPS FONT) \\INBETWEENP (X LFT -RGHT) SI::CONDITION-CASE-ERROR (SI::REAL-SELECTOR SI::POSSIBILITIES) CONSCOUNT (N) \\INSTANCE-P ( -OBJECT TYPE) UPDATECHANGED1 (KEY) RAISE-SIGNAL (CONDITION) GETSUPERTYPE (TYPENAME N) -RESOLVE-USE-PACKAGE-CONFLICT (PACKAGE XCL::USED-PACKAGE) DEFPACKAGE (OPTION KEY CL:VALUES SYMBOL -CL:SYMBOL SYMBOLS-TO-SHADOW FORM) OPT.NONILVAR (CD FR V) \\TYPENAMEFROMNUMBER (N) \\FM.CHANGESTATE (X -WINDOW NEWSTATE) GLOBALVARP (X) \\DSPPOPSTATE.PSC (STREAM XFORM) BYTESININT.IP (N) GETFIELDSPECS ( -TYPENAME) |BitFieldShiftedMask| (FD) SETY.PRESS (PRSTREAM Y ELSTREAM) INTERPRESS.BITMAPSCALE (WIDTH -HEIGHT RATIO) VARSBOUNDINFORM (FORM FN X) TEST-PROCEED-CASE (PC) CL:IN-PACKAGE (NAME USE NICKNAMES) -CH.ISMEMBER (PROPERTY NAME) CL:RENAME-PACKAGE (NICKNAMES) NCREATE (TYPE OLDOBJ) \\DOWRITEDISKPAGES ( -DAS LASTPAGE BUFFER CAS) TOPWP (WINDOW) REPLACEFIELDVAL (DESCRIPTOR DATUM NEWVALUE) IRM.DISPLAY.CREF ( -STREAM IMAGEOBJ STRING STRINGREGION LEFT BOTTOM REGION TOP RIGHT) \\DOACTONDISKPAGES (DAS CLEANUPFN -FIRSTPAGE LASTPAGE BUFFER CAS) DEFAULT-PROCEED-REPORTER (STREAM PC) PUTBASEPTRX (DATUM OFFSET NEWVALUE -) CONDITIONS::DEFAULT-RESTART-REPORTER (STREAM CONDITIONS:RESTART) SEDIT::GET-BUTTON-STRING (SEDIT::NODE -) /REPLACEFIELD (DESCRIPTOR DATUM NEWVALUE) CONDITION-PARENT (TYPE PARENT) \\EXPECTED.FILE.TYPE (FILE -HOST) PFI.COLLECT.DEFINERS (BYPROP KNOWNTYPES NAMEPROP) CL:UNINTERN (CL:SYMBOL) TYPENAMEP (TYPE DATUM) - \\SPP.DUPLICATE.REQUEST (XIP SOURCEID) SI::INVOKE-ACTUAL-RESTART (SI::RESTART SI::ARGUMENTS) -LISPXGETINPUT (INPUT) OPT.MERGEFRAMEP (PARENT VARS FR) \\WRITEVMEMPAGES (|DAorigin| BUFFERS DA\s FID -FIRSTPAGE LASTPAGE HINTLASTPAGE LASTNUMCHARS DSK) STKNTHNAME (N) M44.SIGNAL.DISK.ERROR (EC FILENAME) -ADD-SYMBOL (TABLE CL:SYMBOL SIZE LEN) \\LISPERROR (N X CONTINUEOKFLG) CLIPBOARD-COPY-STREAM (OST) -CL:STRING= (STRING1 STRING2) \\FLUSH.PACKET.QUEUE (QUEUE) RESOLVE-EXPORT-MISSING (PACKAGE) -\\WRITEDISKPAGES (FIRSTPAGE LASTPAGE LASTACTION HINTLASTPAGE LASTNUMCHARS WIDTH) -COMPILER::CLOSURE-ANNOTATE-MV-CALL (COMPILER::NODE COMPILER::IN-LOOP-P) RESHAPEALLWINDOWS (MAINW -NEWREGION NEWWIDTH NEWHEIGHT) LAYOUTFOREST (NODELST ROOTIDS FORMAT BOXING FONT MOTHERD PERSONALD) -CL:MEMBER (CL::ITEM LIST CL::TEST-NOT CL::TEST CL::KEY) DATATYPEP (DATATYPESPEC DTD) -RESOLVE-EXPORT-CONFLICT (XCL::A XCL::B PACKAGE XCL::EXPORTED-SYMBOLS) SEDIT::DETRANSLATE-CHARS (SEDIT::STR -) \\DSPCLIPPINGREGION.IP (STREAM) FB.CLOSE&EXPUNGE (TBROWSER WINDOW BROWSER FLG) MB.SETIMAGE (OBJ -MBTEXT MBFONT) DINFO.UPDATE (NEW.NODE WINDOW NODE MONITORLOCK SEL STATUS FORCE?) \\FM.CHANGELABEL ( -NEWLABEL NEWDESC LEFT BOTTOM FONT SI::$PROG1-FIRST-EXPRESSION$) MSCHECKBOUNDFREE (BOUNDFREE V USERS -SEEN BINDERS U LF) CL:DELETE (SEQUENCE LENGTH ITEM START FROM-END KEY TEST-NOT TEST) \\DODISKCOMMAND ( -BUFFER PAGENO VDA ACTION) \\ENDVECRUN (PRSTREAM HALFVECWIDTH CH) APPENDINT.IP (LENGTH STREAM NUM) -PFI.PRINT.INDEX (LASTPAGE CRDATE INDICES LINESPERPAGE) RESOLVE-IMPORT-CONFLICT (PACKAGE) SETX.PRESS ( -PRSTREAM X ELSTREAM) \\POSTSCRIPT.NSHASH (MAPPING-LIST CHARCODE) MSCOLLECTDATA (TNAME) -\\CLEANUPDISKQUEUE (CB) \\ACTONVMEMPAGES (|DAorigin| BUFFERS DA\s FIRSTPAGE LASTPAGE HINTLASTPAGE -ACTION DSK) COMPILER::CLOSURE-ANNOTATE-LAMBDA (COMPILER::NODE) INSPECT/AS/RECORD (INSTANCE WHERE) -OPT.FRAMEMERGE (F) CROPMARK.PUTFN (HRULE OUTPUT.STREAM) WARNUSER (X VAR) MB.DISPLAY (STREAM OBJ X -OBJBOX FONT TEXT) ONEDINSPECT.REPAINTFN (WINDOW VERTMARKS ROWPROPS TOP BOTTOM FETCHFN DATUM DESCENT) -COURIER.READ.REP (LIST.OF.WORDS PROGRAM TEMPLATE) CL:LIST-ALL-PACKAGES (V) SPLIT89 (N) \\REALDISKDA ( -DSK NSECTORS NHEADS NTRACKS) SEDIT::DELETE-LITATOM (SEDIT::NODE SEDIT::START SEDIT::END STRING -SEDIT::CONTEXT SEDIT::SET-POINT?) STORAGE (FREE TOTALALLOCMDS PAGE-THRESHOLD IN-USE-THRESHOLD -TOTALHUNKS) MSNLAMBDACHECK (FN2) \\STLINP (STR ALLOC TOT) SEDIT::LINEAR-ITEM-WIDTH (SEDIT::ITEM) -OPT.FRAMEOPT (X F TRYXVAR) STORAGE.LEFT (MDSFREE) CROPMARK.COPYFN (IMAGEOBJ TOSTREAM) -\\FM.HIGHLIGHTITEM (WINDOW ITEM) MSCHECKBLOCKBASIC (BLKNAME BLOCK X) \\INDEXATOMPNAME (X) -APPENDSEQUENCEDESCRIPTOR.IP (TYPE LENGTH STREAM) \\STORAGE.TYPE (TYPE TOTALALLOCMDS PAGE-THRESHOLD -FREE) CL:AREF (ARGS) CL::\\OPENSTREAM-WITH-DEFAULT (CL::FILENAME) SIMPLETEXTEDIT (WINDOW TTSCRATCHFILE -) \\STORAGE.HUNKTYPE (GCTYPE.NAME TOTAL) \\FM.DISPLAYITEM (WINDOW ITEM) MSCHECKFNINBLOCK (FN FN2 -BLOCKS BLOCK) \\CHECKFREEPAGE (CB DSK) SHOWRECTANGLE.PRESS (PRSTREAM ELSTREAM WIDTH HEIGHT) -APPENDIDENTIFIER.IP (STREAM STRING) PFI.PRINT.MULTI.INDEX (PRINTOPTIONS INDEXENTRIES INDEXITEM -FATSPACE DIGITSWIDTH RANGEWIDTH LEFT MAXWIDTH LINEWIDTH) INSPECT/TYPERECORD (X WHERE) MSUPDATE (FNNAME - FNDEF F) FIND-SYMBOL* (SYM WHERE) SETUPFONTS.IP (IPSTREAM FONTS) OPT.SETDEFREFS (D V) \\STMDSTYPE ( -NAME NPAGESALLOCATED ALLOC FREE INUSE BOXCOUNT) CROPMARK.GETFN (INPUT.STREAM PAGESIZE) FIXATOM2 (X) -RESOLVE-UNINTERN-CONFLICT (CL:SYMBOL PACKAGE) SEDIT::COPY-STRUCTURE-STRING (SEDIT::FONT SEDIT::PRIN-2? -) COMPILER::CLOSURE-ANNOTATE-IF (COMPILER::NODE COMPILER::IN-LOOP-P) BCOMPL.BODY (OPTIONSSET CFILE -FILES STREAM DEFS X) \\HLSVALUEFN (MIN MAX) ICONW.PRINT-JUSTIFIED (REG STREAM FONT REAL-FONT OPERATION - TEXT BREAKCHARS JUST LEFTOVER MAXCHAR OLDCLIP) COURIER.WRITE.BULKDATA (ITEMLIST STREAM W PROGRAM TYPE -) MSUPDATEFN1 (FN EACHTIME) MAKE-DO-SYMBOLS-CODE (VARS) \\TEDIT.HCPYFMTSPEC (IMAGESTREAM SPEC -SCALEFACTOR TAB) \\VIRTUALDISKDA (REALDA DSK) OPT.DEFREFS (D) \\STMDS.APPROX (N) CROPMARK.IMAGEBOXFN ( -IMAGE.STREAM) \\FM.CPUTITEMPROP (PROP ITEM VALUE) MSCHECKBLOCK (BLOCK FNS BLOCKS SHOULDBESPECVARS -LOCALFREEVARS GLOBALVARS) ONEDINSPECT.BUTTONEVENTFN (WINDOW W P DATUM SELECTEDPROP) CGETWINDOWPROP ( -WINFORM PROP) APPENDBYTE.IP (STREAM BYTE) PFI.PRINT.FILECREATED (STR FONT TABSTOP ENV SPEC) -GETDEF.I.S.OPR (Y) \\PARTEND.PRESS (PRSTREAM PARTTYPE STREAM W) ICONW.TITLE (ICONW) CWINDOWPROP ( -FORMTAIL) BRECOMPILE2 (FN X NX CHAR) SEDIT::PARSE--LIST (CL:STRUCTURE) SEDIT::COPY-SELECTION-LITATOM ( -SEDIT::SELECTION SEDIT::NODE STRING SEDIT::END TYPE SEDIT::CHARS SEDIT::CONTEXT SEDIT::POINT SEDIT::DELETE? -) PUSH-IP-STACK (IPSTREAM OBJECT) ONEDINSPECT.COPYBUTTONFN (WINDOW W P) \\STRINGWIDTH.PRESS (STREAM -STRING PRFONT WIDTHSBASE) BULKDATA.GENERATE.NEXT (STREAM) CL:FIND-ALL-SYMBOLS (STRING-OR-SYMBOL RES) -COMPILER::CLOSURE-ANNOTATE-LABELS (COMPILER::NODE COMPILER::*NEED-STORAGE*) TTPRIN1COMMENT (STR -DOWNCASE) CL:FRESH-LINE (OUTPUT-STREAM) BRIEFLY-DESCRIBE-SYMBOL (CL:SYMBOL) \\TEDIT.UPDATE.SHOWSEL ( -TEXTOBJ SHADEHEIGHT SHADE) UNPACK (X STRING RDTBL) CL:APROPOS (BASE OFFSET LENGTH FATP) -\\SWAPDISKERROR (ERRCODE DISK) PRINTERSTATUS (PRINTER) \\WHICHPART (PAGE) ASSOCGET (KEY ALST) -PRINTBINDINGS (AT) \\LOOKUPFMAP (PAGE) RETDWIM3 (X M1 N1) \\CREATESTARFONT (CHARSET PSIZE DEVICE -FAMILY FACE ROTATION FD CS) CL:APROPOS-LIST (STRING BASE OFFSET LENGTH FATP LIST) -FB.HEADINGW.REDISPLAYFN (WINDOW) \\IDLE.PROMPT.WATCHER (TIMEOUT PROC) DCHCON (X STRING CODE RDTBL L2 -SCRATCHLIST) ONEDINSPECT.CLOSEFN (WINDOW) WINDOWADDFNPROP (WINDOW PROP ITEMTOADD) CHCON (X STRING CODE - RDTBL) \\FM.CGETITEMPROP (PROP) MSCHECKBLOCKS (FL FT) ERROR-MISSING-EXTERNAL-SYMBOL (NAME PACKAGE) -\\GETFBB (BOXLIST BOX) DUMPI.S.OPRS (X Y) RETURN-FIRST-OF-THREE (ONE) \\ACCHARPOSLIST (FILE ENDCHAR -STARTCHAR DIRECTORYSTART) MSSHOWUSE (SHOWFN SHOWSET SHOWEDIT SHOWTYPE ITEM SS PRNT SE) -\\ACCHARIMAGELIST (BOXLIST BOX) \\TEDIT.NSCHAR.RUN (STREAM CHNO PCTB START-OF-PIECE) -CHECK-SYMBOL-NAMESTRING (BASE OFFSET LEN FATP CLAUSE PREFIX PREFIX-LENGTH WHERE) \\READACFONTBOXES ( -FILE ENDCHAR STARTCHAR N WIDTH) OPT.CODEFRAME (CD) \\ACCHARWIDTHLIST (BOXLIST FBBOX) \\SPP.STREAM.LOST - (STREAM) RESOLVE-MISSING-EXTERNAL-SYMBOL (NAME PACKAGE) FB.HANDLE.ABORT.BUTTON (MENU ITEM) -\\IDLE.IS.PREVIOUS (PASSWORDADDR PWD NULLOK) \\FACECODE (FACE) MB.BUTTONEVENTINFN (OBJ RELX RELY -OBJBOX) \\ICONW.FORMAT.TITLE (TITLE FONT MAXWIDTH BREAKCHARS) REMWINDOWPROP (PROP) \\NEW.READ.SYMBOL ( -BASE OFFSET LEN FATP) UALPHORDER (ARG1 B) \\FAMILYCODE (WSTRM FAMILY NCHARS) RESOLVE-READER-CONFLICT ( -CLSYMWHERE ILSYM CLSYM) SEDIT::INPUT-NORMAL-CHAR ($$OUTPUT SEDIT::POINT-TYPE SEDIT::POINT) DUNPACK (X -STRING CODE RDTBL L2 SCRATCHLIST) \\ACROTATECHAR (BITMAP) \\TEXTTTYBOUT (BYTE TEXTOBJ TABLEA1582 -TABLEA1583) RESOLVE-MISSING-PACKAGE (CL:PACKAGE-NAME CL:SYMBOL-NAME XCL::EXTERNALP) ALPHORDER (A -STRING B CHAR CASIZE CAFAT) SEDIT::COMPUTE-SELECTION-POSITION-LITATOM (SEDIT::NODE SEDIT::STRING-ITEM) - FB.HEADINGW.RESHAPEFN (WINDOW FBROWSER) \\NEW.MKATOM (BASE OFFST LEN FIRSTCHAR FATCHARSEENP) PACKC (X - \\PNAMESTRING STRING PBASE) \\TEDIT.FORMATTABS (TABSPEC DFLTTABX MARGINXOFFSET GRAIN CHBASE WBASE) -CASEARRAY (AR) OPT.CODELEV (CD LEV) INTERPRET/MARK/FORMAT (FORMAT) \\FM.PUTITEMPROP (PROP VALUE) -SEDIT::CREATE-COMMAND-TABLE (SEDIT::DESCRIPTION SEDIT::COMMAND SEDIT::KEY SEDIT::TABLE SEDIT::MENU-ITEMS - SEDIT::MENU-LEFT SEDIT::MENU-RIGHT) LITATOM.EXISTS (STRING) COMPILER::CLOSURE-ANNOTATE-CALL (COMPILER::NODE - COMPILER::IN-LOOP-P) \\FM.GETITEMPROP (PROP ITEM) INTERN-LITATOM (WHERE PACKAGE ATOM) \\PACK.ITEM ( -BASEA1769 OFFSETA1768 CODE STRING ITEM) CONVERT-LITATOM (ATOM BASE LEN FATP CLAUSE PREFIX -PREFIX-LENGTH WHERE) \\PAGEPAD.PRESS (STRM P) \\REQUEUE.ETHERPACKET (REQUEUE) -\\TEDIT.GET.TERMSA.WIDTHS (A J V NWIDTHS FONT TERMSA) MSGETDEF (NAME SOURCE OPTIONS TYPE) SHOULDNT ( -MESS) \\SHOWSEL.HILIGHT (DS X0 SEL XLIM SHADEHEIGHT SHADE LINES TEXTOBJ) TTYINEDIT (PROMPT EXPRS \\DSP - RDTBL TTSCRATCHFILE) \\TEDIT.PURGE.SPACES (BASEA1565 CHLIST BASEA1566) BULKDATA.GENERATOR (STREAM -PROGRAM TYPE) \\LITATOM.EATCHARS (LITATOM N LEN) OPT.RETMERGE (TEST TARGET END) -ONEDINSPECT.DEFAULT.VALUECOMMANDFN (SETMENU INSPECTMENU PROP WINDOW) RETDWIM2 (X $TAIL) \\TEXTMARK ( -TEXTOBJ STREAM) CONCOCT-SYMBOL (STRING SYM) SEDIT::COMPUTE-POINT-POSITION-LITATOM (SEDIT::NODE) -/ASSOCPUT (KEY VAL ALST) FB.EDITLISPFILE (FILE BROWSER) \\IDLE.ISMEMBER (GROUP NAME) XCL:PACK (NAMES -PACKAGE) \\ICONW.SHOW.TITLE (ICONW BITS JUST FONT REG OPERATION TEXT NEWFLG) INSURE.WINDOW (WIN?) -TRANSFER-SYMBOL (TO FROM) CL:INTERN (STRING BASE OFFSET LENGTH FATP) IRM.RESET (W) -PACKAGE-HIERARCHY-INIT (ATOM) TEDIT.GET.PARALOOKS (TEXTSTREAM SELORCH# TEXTOBJ) -\\TEDIT.UNPARSE.PARALOOKS.LIST (FMTSPEC) XCL:PACK* (NAMES) \\DOFORMATTING (FMTSPEC QUAD SPACELEFT -TEXTOBJ BASEA1567 CHLIST BASEA1568 BASEA1569 BASEA1570 WLIST BASEA1571 BASEA1572 N ARR VAL BASEA1573) -PACKAGE-INIT (CONVERT?) PACKAGE-ENABLE (PACKAGE) \\TEDIT.LINE.LIST (TEXTOBJ WINDOW) MSSETUP (V X A Y -AS F SYN TYPES L OTHERS) MAKEBITTABLE (L CHAR TABLE CODE X) PACK (\\PNAMESTRING STRING) -\\M44DOEXTENDVMEMFILE (DA\s SCRATCHBUF CA\s) CONCATCODES (CHARCODES STR) \\BCPLSOUT.PRESS (X STRM NC) -\\INITIALIZESWAPDISK (|ISFindex|) CL::%NOT-FLOAT-ERROR (CL::OBJECT) \\IDLE.AUTHENTICATE (TYPE OUTPUT -NAME PWD IFALLDOWN) \\SETFATSYNCODE (CHAR CODE) ONEDINSPECT.DEFAULT.TITLECOMMANDFN (WINDOW TITLEMENU -DATUM) DESCRIBE-VIRTUAL-MEMORY (NOBCPL VMSIZE) COMPILEMODE (X) IRM.SMART.LOOKUP (KEYWORD GRAPH) -CL::%NOT-NUMBER-ERROR (CL::OBJECT) OPT.RETTEST (TEST TARGET) \\TEXTDSPXPOSITION (STREAM) -CL::%NOT-RATIONAL-ERROR (CL::OBJECT) SEDIT::CLOSE-NODE-LITATOM (SEDIT::OLD-STRING) XTOUSTRING ( -XCCSSTRING RAWFLG USTR) CL::%RATIO-PLUS (CL::DENOMINATOR-1 CL::DENOMINATOR-2 CL::GCD-D CL::NUMERATOR-1 - CL::NUMERATOR-2 CL::D1/GCD-D CL::TOP CL::D2/GCD-TOP) SEDIT::COPY-HASH-TABLE (SEDIT::KEY SEDIT::NEW-TABLE - SEDIT::VALUE SEDIT::OLD-TABLE) FILEPOS (FILE STRING STREAM CA SKIPCHAR) CL::%RATIO-TIMES ( -CL::NUMERATOR-1 CL::DENOMINATOR-2 CL::NUMERATOR-2 CL::DENOMINATOR-1 CL::K CL::H) SELECT.LIST.INSPECTOR - (LST) FFILEPOS (FILE STREAM STRING \\FFDELTA1 \\FFDELTA2 \\FFPATCHAR PATCHAR DELTA1 DELTA2 CASE -MAXPATINDEX) COMPILER::CLOSURE-ANNOTATE-CATCH (COMPILER::NODE COMPILER::VAR COMPILER::*NEED-STORAGE* -COMPILER::IN-LOOP-P) CL::%RATIO-PRINT (CL:NUMBER STREAM CL::TOP CL::BOTTOM) FB.PRINTFN (TBROWSER ITEM -WINDOW FDATA STREAM FILENAME STRING END BASE FBROWSER FONT) \\SETUP.FFILEPOS (PATLEN DELTA1 -PATLEN\,PATLEN MAXPATINDEX PATCHAR CASE PATBASE PATOFFSET DELTA2) \\EXTENDISFMAP (PAGE DA LASTOFFSET) -FB.COUNTER.STRING (FBROWSER NFILES NPAGES) CL::%NOT-NONCOMPLEX-NUMBER-ERROR (CL::OBJECT) -CROPMARK.DISPLAYFN (CROPMARK PAGESIZE IMAGE.STREAM SCALE THICK HEIGHT WIDTH) CL::%COMPLEX-- (CL::IMAG-1 - CL::REAL-1 CL::REAL-2 CL::IMAG-2) \\FIXP.FROM.FLOATP (VAL) CL::%COMPLEX-* (CL::IMAG-1 CL::REAL-1 -CL::REAL-2 CL::IMAG-2) BRKDWNINIT (BLOCK) OPENIPSTREAM (IPFILE OPTIONS MARGINREGION FILE) -\\MAYBEPRINTPACKET (PACKET TYPE CALLER FILE PRE.NOTE) CL::%COMPLEX-PRINT (CL:NUMBER CL:REALPART -CL:IMAGPART STREAM) \\TEDIT.SHRINKFN (W) COMPILER::CLOSURE-ANNOTATE-BLOCK (COMPILER::NODE COMPILER::VAR - COMPILER::*NEED-STORAGE*) CL::%COMPLEX-+ (CL::IMAG-1 CL::REAL-1 CL::REAL-2 CL::IMAG-2) BYTE (CL::SIZE - CL:POSITION) \\TEXTMENU.DOC.CREATE (MENUPROPS MENUDESC) \\TEXTDSPYPOSITION (STREAM) \\PUTBASE (X D V) - SEDIT::BACKSPACE-UNKNOWN (SEDIT::CONTEXT SEDIT::NODE) \\DSPFONT.IP (IPSTREAM) DRAWMARGINSCALE (W WREG - UNIT OLDOP) FAX.HOSTNAMEP (PRINTERNAME) DUMPGRAPH (STREAM GRAPH) \\LOOKUPCOLORNAME (COLORNAME) -\\GETBASE (X D) RECURSIVELY-ANALYZE (ARGLIST PATH ERRLOC WHOLE) NU\\TOTOPWDS (DS NOTOTOPFNFLG) -PROMPTPRINT (N) SEDIT::EDIT-SELECTION (SEDIT::CONTEXT SEDIT::OPTIONS) DASSEM.ASMAJ (OP) -INIT/NODES/FOR/LAYOUT (NS ROOTIDS FONT FORMAT R) DINFOGRAPH (X) \\DSPTOPMARGIN.PRESS (PRSTREAM) -\\PUTBASEPTR (X D V) UPDATEWFROMIMAGE (WINDOW IMAGE) SEDIT::PARSE-INDENT-GROUPS (SEDIT::INDENTS -SEDIT::TAGBODY?) CL:ADJOIN (CL::ITEM LIST CL::TEST-NOT CL::TEST) ID (X) BITMAPOBJ.SNAPW (REG SCALE) -SHOW.PRESS (PRSTREAM CURBYTE) DATE (FORMAT) CL::%< (CL::Y CL::X) FB.CLOSEFN (TBROWSER FLG) -SET.TTYINEDIT.WINDOW (OFFSET) \\HILOC (X) OPT.RETOPT1 (L X Y) DATEFORMAT (FORMAT) FAX.PROPERTIES (HOST -) CONDITIONS::DEFECT-FROM-XCL-TO-CONDITIONS (CONDITIONS::NAME) \\TEDIT.FIXSELS (TEXTOBJ EXCEPT) GDATE -(DATE FORMAT STRPTR) TITLEDICONW (TITLE TITLEWIDTH BORDER POSITION JUST NOOPENFLG) CL::%COMPLEX-/ ( -CL::IMAG-1 CL::REAL-2 CL::IMAG-2 CL::REAL-1 CL::MODULUS) DASSEM.DSTOREFN (X) LATTICE/BREAK/CYCLES ( -STACK) \\RPLPTR (OBJ VAL) TEXTMENU.CLOSEFN (W) GETLOCALDEC (EXPR FN) \\TITLEICONMINSIZE (WINDOW) -\\TEXTLEFTMARGIN (STREAM) CL::%COMPLEX-ABS (CL::Z CL::Y) CL::DEFECT-FROM-IL-TO-XCL (CL::NAME) -SEDIT::BACKSPACE-LITATOM (SEDIT::CONTEXT SEDIT::NODE STRING SEDIT::SUPER-NODE SEDIT::START SEDIT::END) - NEWPAGE?.IP (IPSTREAM) FB.COUNTERW.REDISPLAYFN (COUNTERWINDOW BROWSER) \\TEXTMENU.SET.TOGGLE (TEXT -TEXTSTREAM VALUE) \\LOLOC (X) LOC (X) FB.COPYFN (ITEM) \\PACKDATE (TIMEZONE) VAG (LOC) FIXVERBSETTYPE -(SETPHRSE) \\IDATESCANTOKEN (CHAR UCHAR) \\FM.MENUHANDLER (WINDOW TIMER $$OUTPUT) -\\DSPSPACEFACTOR.PRESS (STREAM) PROCESSWORLD (FLG RESULT) ANALYZE-REST (ARGLIST CL:KEYWORD PATH ERRLOC - BODY DECLS) PPROMPT2 (ITEM) SEDIT::SCALE-INDENT (SEDIT::INDENT SEDIT::INDENT-BASE SEDIT::INDENT-STEP -LEFT RIGHT) CL::%GCD (CL::K) CL::%RECIPROCOL (CL:NUMBER) \\ENTITYEND.PRESS (PRSTREAM PRDATA ETYPE -STREAM W XOFFSET YOFFSET) \\FM.DOSELECTION (WINDOW ITEM BUTTONS) \\DSPRIGHTMARGIN.PRESS (PRSTREAM) -\\RUN.PROCESS (REASON) PRINTER.BITMAPSCALE (PRINTERTYPE WIDTH HEIGHT HOST) SEDIT::PARSE-INDENT-GROUP-BODY - (SEDIT::GROUP) \\IDATE-PARSE-MONTH (MONTH) \\START.PROCESSES (TOFX) CH.CHANGE.ITEM (PROPERTY NEWVALUE -) \\ENTITYSTART.PRESS (PRSTREAM STRM) POSTSCRIPT.INIT (FD DIMENSION STREAM BITMAP) CL::%LCM (CL:GCD) -FB.AFTERCLOSEFN (WINDOW TBROWSER) EQFMTSPEC (PARALOOK1 PARALOOK2) NONSYSPROPNAMES (ATM) CL::%BUILD-RATIO - (CL::X CL::Y CL:REM) TTGIVEHELP2 (HELPKEY) ADD.PROCESS (ARGS) OPT.RETFIND (C) \\RPLRIGHT (S AT N -MINDIGITS) PUTWINDOWPROP (PROP VALUE) \\OUTDATE-STRING (S N STRING) \\TEXTDSPFONT (STREAM TEXTOBJ WIN) - XCL::SCEILING (CL:NUMBER CL::RESULT) XCL::SROUND (CL:NUMBER) SEDIT::BACKSPACE-GAP (SEDIT::CONTEXT -SEDIT::NODE) TOTOPW.MODERNIZE (WINDOW) FAX.STATUS (HOST) READGRAPH (STREAM F X) \\IDLE.OUT (TIMEOUT) -TTYINMETA (FLG) EVENP (INTEGER) \\TEDIT.SHRINK.ICONCREATE (W SHRINKFN ICON-POSITION) CREATE.EVENT ( -NAME) XCL::SFLOOR (CL:NUMBER CL::RESULT) DASSEM.DASMBIND (NV NN K) \\IRM.SMART.REF (WINDOW) -CL::%LOGICAL-OPTIMIZER (CL:IDENTITY) TTGIVEHELP1 (NO.INTRO) \\NEXTCONSPAGE (N) CL::%LOGIOR (CL::X CL::Y -) MSSETPHRASE (KNOWN TYPE) CONDITIONS::%RESTART-PRINTER (CONDITIONS:RESTART STREAM CONDITIONS::LEVEL -CONDITIONS::REPORTER) \\FM.RIGHTBUTTONFN (WINDOW) \\DSPLINEFEED.PRESS (PRSTREAM) PUSH-KEYWORD-BINDING -(VARIABLE ERRLOC) \\GETBASEPTR (X D) EXEC (XCL::ID XCL::X) ETHERHOSTNAME (OPUP SOC STRING) -PROMPTFOREVALED (FONT MSG MINWIDTH MINHEIGHT) SETXY.PRESS (PRSTREAM X Y) GRAPHOBJ.PUTALIGN (ALIGN -GRAPH STREAM) HLSTORGB (HLS L S H) CHECK-PARAMETER-NAME (ERRLOC) CL::%BIGNUM-LOGCOUNT (BIGNUM) -CL::%LLSH8 (CL::X) MAKETITLEBARICON (WINDOW SCREEN) \\IRM.GET.REF (WINDOW) \\TIMER.PROCESS (HEAD) -CLISPDEC0 (FN) OPT.RETOPT (RL C X Z) \\NEW4PAGE (PTR) \\TEXTDSPLINEFEED (STREAM) ENDCOLLECT (Y) -\\INITCONSPAGE (LINK) BRKDWNCLEAR (N PTR) SEDIT::ATOM-POINT-TYPE (SEDIT::INDEX SEDIT::STR STRING -SEDIT::ESC-CHAR SEDIT::MULT-ESC-CHAR) NEWPAGE.IP (IPSTREAM) DOCOLLECT (ITEM) GRAPHOBJ.GETALIGN (STREAM - GRAPH) \\MAIKO.CONS.UFN (X A LO D) COURIER.SKIP.SEQUENCE (STREAM PROGRAM BASETYPE) CL::OPTIMIZE-BYTE -(CL::SIZE CL:POSITION) CL::%LLSH1 (CL::X) INSPECT/PROPLIST (ATOM WHERE) EQ (X Y) -CL::%INTEGER-COERCE-OPTIMIZER (CL::CONTEXT CL::FORM) CL::%LRSH8 (CL::X) BRKDWNBOXES (PTRA1610 VALA1609 - BDX BDEXP PTRA1612 VALA1611) MAKEINTERPRESS (FILE IPFILE FONTS HEADING TABS OPTIONS) -COMPILER::FRAME-ANNOTATE-UNWIND-PROTECT (COMPILER::SELF) \\SPP.ESTABLISH (INITCON XIP) -CL::%CONSTANT-BYTESPEC-P (CL::BYTESPEC) COURIERPROGRAM.PRETTYPRINT (TAB1 TAB2) CL::%LRSH1 (CL::X) -CROPMARK.CREATE (CROPMARK WIDTH) PRINTER.BITMAPFILE (PRINTERTYPE) \\DTSCAN (X) \\BACKGROUND.PROCESS ( -FN) \\MAPMDS (FN) BMOBJ.GETFN4 (STREAM SCALE ROT DESCENT) \\ISDST? (HOUR WDAY) \\CHECKCONSPAGE (PN PTR -) TTY/EDITL (X MESS) LASTN (N) \\TEXTDSPCHARWIDTH (CHARCODE STREAM) IMAGEFNSCREATE (DISPLAYFN -IMAGEBOXFN PUTFN COPYFN BUTTONEVENTINFN COPYBUTTONEVENTINFN WHENMOVEDFN WHENINSERTEDFN WHENDELETEDFN -WHENCOPIEDFN WHENOPERATEDONFN PREPRINTFN) SEDIT::ASSIGN-FORMAT-LITATOM (SEDIT::NODE SEDIT::CONTEXT -SEDIT::ENVIRONMENT CL:FORMAT) \\TEXTMENU.TOGGLE.WHENOPERATEDFN (OPERATION OBJ DS) \\FAX.PARSE.NAME ( -PLACE STRING CHAR) \\GET.PRIORITY.QUEUE (PRIORITY) CHARMACRO? (MACRO) ONEDINSPECT.VALUEWIDTH (PROPS -FETCHFN DATUM FONT) \\SET.PROCESS.NAME (FIRSTNAME) EDITL0 (L MESS) IRM.DISPLAY.REF (REF GRAPH $$OUTPUT -) \\FM.BUTTONEVENTFN (WINDOW) \\DSPLEFTMARGIN.PRESS (PRSTREAM) CL:FLOOR (CL:NUMBER CL::DIVISOR) -CH.ADD.ITEM.PROPERTY (STREAM PROPERTY VALUE) PRINTTIMER (LABEL TIMER DIF) \\ALLOCMDSPAGE (TYP) SETQ (U -) MSTRYSPELLTYPE (TYPE INTERP WORD) \\SPP.RELEASE.ACKED.PACKETS (ACKNO MAXACKNO POOL) NEQ (X Y) -MAYBE.PRETTYPRINT.BOLD (VAR) CL::STRUCTURES.HASDEF (CL::NAME) \\STRINGWIDTHGUESS (X FONT) AND (U) -VRULE.COPYFN (IMAGEOBJ) CL::%RATIONAL-FLOAT (CL:NUMBER CL::SIGN CL::HI CL::LO) \\CHECKDSTCHANGE (YDAY -DSTDAY WDAY HOUR) ANALYZE-PARAMETER (PARAM ERRLOC NEW-WHOLE) \\TEXTDSPSTRINGWIDTH (STRING STREAM) -CL::%RATIONALIZE-FLOAT (CL::X CL::BIT-SIGN CL:EXP) BMOBJ.GETFN2 (STREAM SCALE ROT) SETNTHTOPLEVELELT ( -N LST NEWVALUE) \\TEXTMENU.TOGGLE.SHOWSELFN (OBJ DS IMAGEBOX SEL) BSPPRINTPUP (PUP) STREAMPROP (X) -\\TEDIT.GET.PARALOOKS (N WIDTH LOOKS# PARAHASH) UNDOEDITL (ULST ULST0 L) FB.ICONFN (OLDICON WINDOW -POSITION) GETSTREAMPROP (PROP STREAM) OPT.DELTAGREF (REF TAG) \\FM.WINDOWENTRYFN (WINDOW) -\\SETSPACE.PRESS (PRSTREAM S STREAM W) DEL.PROCESS (PROC) OPT.FINDEND (STOP) SEDIT::REPAINT (SEDIT::CONTEXT - SEDIT::X SEDIT::Y SEDIT::DSP) PRINT-LOADED-FILE-INFORMATION (STRING FILE) COMPILER::FRAME-ANNOTATE-TAGBODY + D-ASSEM::CODE-BASE) COMPILER::SCAN-ONE-FORM (COMPILER::FORM) TB.SELECTRANGE (LAST# FIRST# FIRSTSEL +LASTSEL) FB.THINCOMMAND (FBROWSER) INTERNAL-SYMBOL-COUNT (PACKAGE) CHECK-*CASE-SELECTOR (SELECTOR NAME +) SI::EXPAND-CONDITION-CASE (SI::FORM) CONDITIONS::CONVERT-RESTART-CASES (CONDITIONS::CASES CONDITIONS::BODIES + CONDITIONS::ANY-ARGLISTS?) \SPP.EVENTFN (EVENT DEVICE STREAM) PFI.PRINT.MULTI.INDEX (PRINTOPTIONS +INDEXENTRIES INDEXITEM FATSPACE DIGITSWIDTH RANGEWIDTH LEFT MAXWIDTH LINEWIDTH) \LEAF.STREAM.IN.QUEUE +(SEQUIN) TEDIT.PUT.OBJECT (PIECE FONTFILE OBJECT OFILE FONTCH# CURCH#) \TESTPARTITION (NUM HERE) +MSEDITF (ARGCOUNT FNAME FEDITCOMS) REPLACEFIELD (DESCRIPTOR FT OFFSET X) D-ASSEM:RELEASE-DCODE (D-ASSEM:DCODE +) MODERN-ADD-EXEC (U PROC) \MAYBEPEEKNS (X XIP XA0722 XA0723) BOXCOUNT (N) ENCAPSULATEDOBJ.IMAGEBOXFN +(STREAM OBJ FONT GETFN) SEDIT::MAKE-BROKEN-ATOM (STRING) ICMLARRAY.SETVALUE (DISPLAYWINDOW MAINW +SLICERANK ROW COLUMN) CL:MAKE-PACKAGE (CL::INTERNAL-SYMBOLS CL::EXTERNAL-SYMBOLS CL::%%PACKAGE-INDEX +CL::USE PACKAGE CL::NICKNAMES) CONSCOUNT (N) MSEDITE (ARGCOUNT FPTYPE FNAME FEDITCOMS FNDEF) +IRM.CREF.BOX (STREAM TYPE IMAGEOBJ) \TYPECHECK (OBJ TYPE) D-ASSEM:FIXUP-PTR (D-ASSEM::PTR D-ASSEM::BASE + D-ASSEM::OFFSET D-ASSEM::LOW) D-ASSEM:FIXUP-WORD (D-ASSEM::BASE D-ASSEM::OFFSET D-ASSEM::WORD) +TEDIT.STRINGWIDTH (STR FONT) SEDIT::PARSE--LIST-INTERNAL (CL:STRUCTURE SEDIT::CONTEXT) +CONDITIONS::PARSE-RESTART-CASE (CONDITIONS::CLAUSE CONDITIONS::FILTER CONDITIONS::REPORT CONDITIONS::INTERACTIVE +) MSFIND (IN X) DEFPACKAGE (OPTION KEY CL:VALUES SYMBOL CL:SYMBOL SYMBOLS-TO-SHADOW FORM) STKNTHNAME ( +N) COMPILER:ENV-BOUNDP (COMPILER::NAME COMPILER:ENV COMPILER::SCOPE-OR-STRUCT COMPILER::PARENT) +DISPLAYLINK/TB (PARAMS TRANS GNT GNB WIDTH OPERATION STREAM) %%LIT-TYPE-TO-TYPE (LIT-TYPE) TERMTABLEP +(TTBL) MARGINBAR.CREATE (MARL1 MARLN MARR MARTABS MARUNIT MARTABTYPE BOX) ONEDINSPECT.SETELT (WINDOW +PROP PRTWINDOW) COMPILER:COPY-ENV-WITH-FUNCTION (COMPILER::NEW-ENV COMPILER::FN COMPILER::KIND +COMPILER::EXP-FN) DASSEM.CANSHAREBINDING (V1 V2 Y) \INSTANCE-P (OBJECT TYPE) ULREDISPLAYBITMAP (BITMAP + WNEW DSP) CLISPFORERR1 (Z Y) SEDIT::OUTPUT-CR-OR-SPACE (SEDIT::CONTEXT SEDIT::SPACE-WIDTH SEDIT::INDENT +) TB.SHOW.SELECTION (BROWSER BM BASELINE ITEM OPERATION) GETSUPERTYPE (TYPENAME N) DASSEM.COUNTVARS ( +VARS) SEDIT::PRETTY-PRINT (STREAM SEDIT::ROOT CL:STRUCTURE SEDIT::RIGHT-MARGIN) \TYPENAMEFROMNUMBER (N +) CL::STRUCTURE-OBJECT-INSPECT-STOREFN (CL::PROPERTY CL::OBJECT CL::NEWVALUE) REMOVE-COMMENTS (XCL::X +XCL::A XCL::D) %%LLARRAY-MAKE-SETTOR-EXPR (TYPENUMBER ENTRY) INSPECTW.GETHASH (ITEM HARRAY) +\TEDIT.MOVE.PIECEMAPFN (TOOBJ FROMOBJ) GETFIELDSPECS (TYPENAME) %%LLARRAY-MAKE-ACCESSOR-EXPR ( +TYPENUMBER ENTRY) COMPAREDEFS (NAME FILE DP S1 S2) COMPILER::RAW-COMPILE (COMPILER::NAME COMPILER::DEFINITION + COMPILER::COMPILED-DEFN) SEDIT::UNDERLINE-SELECTION (SEDIT::SELECTION SEDIT::WINDOW SEDIT::SHADE) +FB.INSERT.DIRECTORY (TBROWSER FBROWSER DATAWITHSUBDIR BEFOREITEM) \POSTSCRIPT.OUTCHARFN (STREAM XPOS +OLDFONT) \LEAF.TIMEDOUT.EXCESSIVE (W N WIDTH WINDOW) NCREATE (TYPE OLDOBJ) MSCALE (VAL UNIT) +COMPILER:ASSEMBLER-ERROR (STRING COMPILER::ARGUMENTS) COMPILER::START-COMPILATION (COMPILER::FASL-STREAM + COMPILER::FILECREATED) TB.SELECT.ITEM (ITEM BROWSER N) COMPILER:OPTIMIZE-AND-MACROEXPAND-1 (COMPILER::FORM + COMPILER::ENVIRONMENT) REPLACEFIELDVAL (DESCRIPTOR DATUM NEWVALUE) \ENDVECRUN (PRSTREAM HALFVECWIDTH +CH) FILING.CALL (ARGS) CENTERINHEIGHT (RELATIVETOREGION HEIGHTTOCENTER) PUTBASEPTRX (DATUM OFFSET +NEWVALUE) TEDIT.FIND.OBJECT.SUBTREE (OBJ) RESOLVE-USE-PACKAGE-CONFLICT (PACKAGE XCL::USED-PACKAGE) +/REPLACEFIELD (DESCRIPTOR DATUM NEWVALUE) CL:IN-PACKAGE (NAME USE NICKNAMES) GN/TOP (NODE) FB.THINP ( +FILENAME EXT AGE ONEDAY DELTATIMESTAMP) PUP.ECHOUSER (HOST SOC PORT OPUP TIMER) \SEARCHINTERPRESSFONTS + (FAMILY PSIZE FACE ROTATION) DINFO.TOGGLE.GRAPH (WINDOW ITEM GRAPH) COMPILER:COPY-ENV-WITH-VARIABLE ( +COMPILER::NEW-ENV COMPILER::VAR COMPILER::KIND) TYPENAMEP (TYPE DATUM) SEDIT::TRACK-SELECT (SEDIT::CONTEXT + SEDIT::WINDOW SEDIT::POINT-TYPE SEDIT::POINT? SEDIT::BAR-X SEDIT::BAR-LINE) FB.ADD.FILE (ITEM +FBROWSER TBROWSER BEFOREITEM) \CREATE.SPP.DEVICE (NAME CLOSEFN) PUP.ECHOSERVER (SOC) GN/BOTTOM (NODE) +SETY.PRESS (PRSTREAM Y ELSTREAM) COURIER.READ.NSADDRESS (STREAM ADDR) \ACTONDISKPAGES (FIRSTPAGE +LASTPAGE ACTION HINTLASTPAGE ReturnOnCheckError WIDTH) \PS.SCALEREGION (SCALE REGION) CONDITION-PARENT + (TYPE PARENT) FB.SEEFULLFN (DSP WINDOW) CL::STRUCTURE-OBJECT-PROPCOMMANDFN (CL::DATUM CL::PROPERTY +CL::INSPECTOR-WINDOW) \DISKERROR (ERRCODE) IRM.DISPLAY.CREF (STREAM IMAGEOBJ STRING STRINGREGION LEFT +BOTTOM REGION TOP RIGHT) INSPECTW.PUTHASH (ITEM VALUE HARRAY) PRINTXIP (XIP TYPE CALLER) FILEBROWSER ( +TAIL VALUE TITLEFONT BROWSERFONTHEIGHT) CL:UNINTERN (CL:SYMBOL) CL:RENAME-PACKAGE (NICKNAMES) +DATATYPEP (DATATYPESPEC DTD) CLISPIFYMATCHUP ($VARS) \DOACTONDISKPAGES (DAS CLEANUPFN FIRSTPAGE +LASTPAGE BUFFER CAS) SEDIT::NEXT-NODE-TYPE (SEDIT::NODE) DEFAULT-PROCEED-REPORTER (STREAM PC) +DINFO.TOGGLE.MENU (WINDOW ITEM GRAPH SUBNODE.MENU.WINDOW) %%PRINT-CONDITION (STREAM CONDITION) +TB.BOTTOM.OF.ITEM (BROWSER ITEM) SEDIT::TRACK-EXTEND (SEDIT::CONTEXT SEDIT::$$SOURCE SEDIT::WINDOW) +CONDITIONS::DEFAULT-RESTART-REPORTER (STREAM CONDITIONS:RESTART) \LEAF.NOT.RESPONDING (OUTSTREAM +SEQUIN REASON) SETX.PRESS (PRSTREAM X ELSTREAM) \WRITEDISKPAGES (FIRSTPAGE LASTPAGE LASTACTION +HINTLASTPAGE LASTNUMCHARS WIDTH) TEDIT.QUIT (VALUE) CL:MEMBER (CL::ITEM LIST CL::TEST-NOT CL::TEST +CL::KEY) MB.MARGINBAR.SHOWTAB (TAB UNIT W TABX MODE) SI::CONDITION-CASE-ERROR (SI::REAL-SELECTOR +SI::POSSIBILITIES) \DOWRITEDISKPAGES (DAS LASTPAGE BUFFER CAS) SI::INVOKE-ACTUAL-RESTART (SI::RESTART +SI::ARGUMENTS) FB.MENU.WHENSELECTEDFN (ITEM) SCROLLBITMAP (WINDOW BITMAP DSP YDELTA XDELTA) +M44.SIGNAL.DISK.ERROR (EC FILENAME) REDISPLAYBITMAP (BITMAP WINDOW DSP) POSTSCRIPT.OUTSTR (STREAM) +DASSEM.EQCONSTANTP (ARG) TEST-PROCEED-CASE (PC) ADD-SYMBOL (TABLE CL:SYMBOL SIZE LEN) +SEDIT::LINEARIZE-QUOTE (SEDIT::CONTEXT SEDIT::X) FB.FASTSEE.ONEFILE (FILE BROWSER WINDOW) +DBG::STKPTR-CCODE (DBG::STKPTR) DINFO.UPDATE (NEW.NODE WINDOW NODE MONITORLOCK SEL STATUS FORCE?) +HARRAYKEYS (HARRAY HASHITEM) \TFBRAVO.INSTALL.PAGEFORMAT (VAR PAGENUMBERX PAGENUMBERY TOPMARGIN +BOTTOMMARGIN NUMBEROFCOLUMNS BETWEENCOLUMNS) TEDIT.FIND.OBJECT (OBJ) \LISPERROR (N X CONTINUEOKFLG) +RAISE-SIGNAL (CONDITION) SEDIT::LOCATE-NODE-FROM-EDITCHAIN (SEDIT::ROOT) +CL::STRUCTURE-OBJECT-INSPECT-PROPPRINTFN (CL::PROPERTY) \FORWARD.XIP (XIP) \ACTONVMEMPAGES (DAorigin +BUFFERS DAs FIRSTPAGE LASTPAGE HINTLASTPAGE ACTION DSK) RESOLVE-EXPORT-MISSING (PACKAGE) +RESOLVE-EXPORT-CONFLICT (XCL::A XCL::B PACKAGE XCL::EXPORTED-SYMBOLS) \SWITCHFONTS.PSC (FONT FONTID +STREAM) \WRITEVMEMPAGES (DAorigin BUFFERS DAs FID FIRSTPAGE LASTPAGE HINTLASTPAGE LASTNUMCHARS DSK) +STORAGE (FREE TOTALALLOCMDS PAGE-THRESHOLD IN-USE-THRESHOLD TOTALHUNKS) SHOWRECTANGLE.PRESS (PRSTREAM +ELSTREAM WIDTH HEIGHT) CL:DELETE (SEQUENCE LENGTH ITEM START FROM-END KEY TEST-NOT TEST) +ATTACHEDWINDOWREGION (MAINW COM ATWIN) \STLINP (STR ALLOC TOT) CL:LIST-ALL-PACKAGES (V) CL:STRING= ( +STRING1 STRING2) \COURIER.BROADCAST.ON.NET (NET NSOC PROGRAM PGMDEF PROCEDURE PROCDEF %#TRIES) +STORAGE.LEFT (MDSFREE) SETUPFONTS.IP (IPSTREAM FONTS) \STORAGE.TYPE (TYPE TOTALALLOCMDS PAGE-THRESHOLD + FREE) DASSEM.DPRINTLAP (FN OUTSTREAM NAMETABLE ARGTYPE CD) COMPARELST (X Y) \STORAGE.HUNKTYPE ( +GCTYPE.NAME TOTAL) \STRINGWIDTH.PRESS (STREAM STRING PRFONT WIDTHSBASE) +DBG::FIND-ORIGINAL-NAME-AND-DEFINITION (DBG::STKPTR DBG::NAME CL:SYMBOL) REMOVEWINDOW (WINDOW) +XCL:LIST-ALL-PROFILES (XCL::VALUE XCL::PROFILE) ONEDINSPECT.SELECTPROP (WINDOW RIGHTWINDOW ROWPROPS +PROP VERTMARKS ROWPROPSPACE) \NSFILING.GET/SETINFO (STREAM INFOFN DEVICE) XCL:PROFILE-NAME (XCL::PROFILE +) BITMAPSCROLLFN (WINDOW XDELTA YDELTA) SEDIT::LINEARIZE-LIST (SEDIT::NODE SEDIT::CONTEXT +SEDIT::ENVIRONMENT SEDIT::LPAREN SEDIT::STARTX SEDIT::PAREN-WIDTH SEDIT::RIGHT-MARGIN +SEDIT::COMMENT-SEPARATION SEDIT::SUBNODE SEDIT::COMMENT-START SEDIT::SPACE-WIDTH) PUSH-IP-STACK ( +IPSTREAM OBJECT) FAKE-COMPILE-FILE (COMPILER-OUTPUT COMPILE.FILE.AFTER) \FM.NUMBER-CHANGESTATE ( +SI::$PROG1-FIRST-EXPRESSION$) COURIER.REP.LENGTH (TYPE PROGRAM BASETYPE WHICH) \DODISKCOMMAND (BUFFER +PAGENO VDA ACTION) CL:AREF (ARGS) SEDIT::TTYFN (SEDIT::EVENT SEDIT::ATM TYPE SEDIT::COMPLETION-FN +SEDIT::CONTEXT) \STMDSTYPE (NAME NPAGESALLOCATED ALLOC FREE INUSE BOXCOUNT) TEDIT.EDIT.OBJECT (STREAM) + CL::INSPECT-STRUCTURE-OBJECT (CL:STRUCTURE CL::WHERE) XCL:FIND-PROFILE (XCL::NAME) \XIPERROR (X +ERRCODE) XCL:COPY-PROFILE (XCL::PROFILE) COMP.SELECTQ (C END Y) \CLEANUPDISKQUEUE (CB) \SEL.LIMIT (SEL +) RESOLVE-IMPORT-CONFLICT (PACKAGE) TB.NORMALIZE.ITEM (BROWSER ITEM WINDOW CLIP BOT) SEDIT::SHRINKFN ( +SEDIT::WINDOW SEDIT::CONTEXT $$OUTPUT SEDIT::LOCK) GN/LEFT (NODE) \INDEXATOMPNAME (X) TB.EXPANDFN ( +WINDOW) \VFMBlankInterval (volNum intervalCache) INCORNER.REGION (A MAINREGION TOPMARGIN) +XCL:SAVE-PROFILE (XCL::PROFILE XCL::X) \CREATEINTERPRESSFONT (FAMILY SIZE FONTFACE ROTATION DEVICE) +\NSFILING.GET.ATTRIBUTES (SESSION HANDLE) \MAKE.EXPEDITED.STREAM (OSTREAM ACCESS XIP) SEDIT::INSERT-LIST + (SEDIT::WHERE SEDIT::NODE SEDIT::CONTEXT SEDIT::SUBNODES SEDIT::POINT) \DSPCLIPPINGREGION.IP (STREAM) + COMPILE-FILE? (FILE TYPE) DASSEM.DSTOREFNDEF (FN LC CD NTBYTESIZE ARGTYPE NARGS NLOCALS NFREEVARS) +RESOLVE-UNINTERN-CONFLICT (CL:SYMBOL PACKAGE) POSTSCRIPT.STARTPAGE (STREAM FONT) ICMLARRAY.INDICES ( +DISPLAYWINDOW MAINW PRTWINDOW CURRENTLEVELS COLUMN ROW) DINFO.TOGGLE.TEXT (WINDOW DINFOW GRAPH +MONITORLOCK ITEM) \STMDS.APPROX (N) \REALDISKDA (DSK NSECTORS NHEADS NTRACKS) XCL:PROFILE-P (XCL::OBJECT +) REPOSITIONATTACHEDWINDOWS (WINDOW ATTW) COMP.PREDP (CTX) COMPARELISTS (X Y TAIL PAIR) \SEL.LINEDESC +(SEL) DINFO.TOGGLE.HISTORY (WINDOW ITEM GRAPH HISTORY.MENU.WINDOW) \LEAF.RESENDPUPS (SEQUIN) +SEDIT::RESHAPEFN (SEDIT::WINDOW SEDIT::NEW-REGION SEDIT::OLD-IMAGE-REGION SEDIT::CONTEXT SEDIT::OLD-IMAGE + SEDIT::OLD-BOTTOM) DELFROMCOMS (COMSNAME NAME) TB.FIND.PREVIOUS.TAIL (BROWSER ITEM#) XCL:OPEN-STREAM-P + (STREAM) \FM.EDIT-SETUP (SI::$PROG1-FIRST-EXPRESSION$) \COURIER.REP.BOUT (BYTE) \CHECKFREEPAGE (CB +DSK) \PARTEND.PRESS (PRSTREAM PARTTYPE STREAM W) XCL:ECHO-STREAM-INPUT-STREAM (STREAM) +CL::STRUCTURE-OBJECT-INSPECT-FETCHFN (CL::PROPERTY CL::OBJECT) NS.ECHOUSER (ECHOHOST ECHOADDRESS TIMER +) XCL:MAKE-PROFILE (XCL:PROFILE-NAME XCL::PROFILE) SWAPXIPADDRESSES (DESTSOCKET NDB) +XCL:ECHO-STREAM-OUTPUT-STREAM (STREAM) \FM.NUMBER-SETUP (SI::$PROG1-FIRST-EXPRESSION$) FILENAMEFROMID +(volumename stream highhalf lowhalf version) XCL:TWO-WAY-STREAM-OUTPUT-STREAM (STREAM) +POSTSCRIPT.SET-FAKE-LANDSCAPE (STREAM OLAND) NSNETDAYTIME0 (SOC) MAKE-DO-SYMBOLS-CODE (VARS) +NEARESTCORNER (REGION) \HANDLE.RAW.XIP (TYPE MYADDR SOCNUM) XCL:ECHO-STREAM-P (STREAM) FIND-SYMBOL* ( +SYM WHERE) %%MAKE-ARRAY-TYPE-TABLE (TYPE-ENTRY LIT-TYPE SIZE-ENTRY LIT-TABLE) XCL:TWO-WAY-STREAM-P ( +STREAM) SEDIT::REPAINTFN (SEDIT::WINDOW) DISPLAYLINK/LR (PARAMS TRANS GNL GNR WIDTH OPERATION STREAM) +FINDATS (X L) TB.SHRINKFN (WINDOW) XCL:TWO-WAY-STREAM-INPUT-STREAM (STREAM) ENCAPSULATEDOBJ.DISPLAYFN +(STREAM FONT OBJ OBJBOX CURX CURY GETFN XSIZE YSIZE OLDFONT) SEDIT::COMPLETION (TYPE CL:STRUCTURE +CL:ATOM) ICMLARRAY.DETACHDISPLAY (STATUSGROUP DISPLAYGROUP) CHCON (X CODE RDTBL) GN/RIGHT (NODE) +DBG::FIND-DEBUGGER-STACK-FRAME (DBG::LSTPOS) XCL:CONCATENATED-STREAM-P (STREAM) +XCL:CONCATENATED-STREAM-STREAMS (STREAM) CHANGETRAN (X) \NSFILING.GETEOFPTR (STREAM) UNPACK (X RDTBL) +WTODSY (WY WINDOW) TB.FLUSH.WINDOW (WINDOW) TEDIT.MOVE (CROSSCOPY) CLISPLOOKUP0 (WORD LISPFN) +XCL:BROADCAST-STREAM-STREAMS (STREAM) COMP.VAL (X LV) COMPILER::COMPILE-SCAN-LOOSE-FORM (COMPILER::FORM +) \TEDIT.STRIKEOUT.CARET.OFF (TEXTOBJ TEXTSTREAM SEL) XCL:SYNONYM-STREAM-SYMBOL (STREAM) +SEDIT::PUNT-SET-SELECTION (SEDIT::SELECTION SEDIT::CONTEXT SEDIT::NODE) \SPPGETERROR (TRIALPKT) +\VIRTUALDISKDA (REALDA DSK) XCL:BROADCAST-STREAM-P (STREAM) DBG::FIND-NAMED-STACK-POSITION (DBG::FN +DBG::N DBG::LSTPOS) XCL:FOLLOW-SYNONYM-STREAMS (STREAM) \FM.EDIT-INSERT (SI::$PROG1-FIRST-EXPRESSION$) + \CWSU.DEFAULT (STREAM ITEM PROGRAM TYPE) BRIEFLY-DESCRIBE-SYMBOL (CL:SYMBOL) COMPILER::NODE-TYPE-NAME + (COMPILER::TRUE-NAME) XCL:SET-DEFAULT-EXEC-TYPE (TYPE) CL::STRUCTURE-OBJECT-P (CL::OBJECT) +CL:FIND-ALL-SYMBOLS (STRING-OR-SYMBOL STRING V A0429 RES) TCOMPL (FILES) \LOCATE.NSNET (NET BUCKET) +DCHCON (X CODE RDTBL L2 SCRATCHLIST) CLEARCLISPARRAY (TYPE NAME FORM) \NSFILING.GETFILEINFO.FROM.PLIST + (ATTRIBUTE ENTRY) \FLUSHNDBS (EVENT) CLISPNOTVARP (X) CL:FRESH-LINE (OUTPUT-STREAM) SEDIT::DELETE-QUOTE + (SEDIT::START SEDIT::NODE SEDIT::CONTEXT SEDIT::SUBNODE SEDIT::GAP-NODE) XCL:SET-EXEC-TYPE (TYPE) +ENCAPSULATEDOBJ.PUTFN (IMAGEOBJ DATANBYTES) CL:APROPOS-LIST (STRING BASE OFFSET LENGTH FATP LIST) +EDITFROMFILE (EDITPATTERN) ICMLARRAY.DOWINDOWCOMFN (WINDOW CENTRAL DISPLAYGROUP PASSTOMAINCOMS) +DUNPACK (X CODE RDTBL L2 SCRATCHLIST) \TEDIT.SEARCH.CODETABLE (CODETBL) CL:APROPOS (BASE OFFSET LENGTH + FATP) RECOMPILE (PFILE CFILE FNS) TEXTICON (WINDOW ICON REG) %%MAKE-CML-TYPE-TABLE (TYPE-ENTRY +CMLTYPE ARRAY-TABLE) UALPHORDER (ARG1 B) TB.RENUMBER.TAIL (TAIL FIRST#) \FLUSH.PACKET.QUEUE (QUEUE) +DASSEM.DWRITEFN (ARGS LOCALS NLOCALS ARGTYPE FN FRAMENAME OUTSTREAM LC NFREEVARS NARGS *READTABLE*) +\TEDIT.STRIKEOUT.CARET.ON (TEXTOBJ TEXTSTREAM SEL) ALPHORDER (A B CHAR CASIZE CAFAT) COURIER.OPEN ( +HOSTNAME NAME W) CASEARRAY (AR) TB.UPDATE.DISPLAY (BROWSER FROMITEM# TYPE ITEMHEIGHT WINDOW ITEMBOTTOM +) RETURN-FIRST-OF-THREE (ONE) DBG::DEBUGGER-EVAL (CL:VALUES) NEARTOP (MAINREGION TOPMARGIN LEFT WIDTH) + XCL:SYNONYM-STREAM-P (STREAM) \NSFILING.RELEASE.BULKSTREAM (STREAM) FREEATTACHEDWINDOW (WINDOW +MAINWINDOW REGION EDGE ATWINS BOTTOM HEIGHT) CHECK-SYMBOL-NAMESTRING (BASE OFFSET LEN FATP CLAUSE +PREFIX PREFIX-LENGTH WHERE) \TEDIT.UNDERLINE.CARET.ON (TEXTOBJ TEXTSTREAM SEL) CONCATCODES (CHARCODES +STR) \SWAPDISKERROR (ERRCODE DISK) \ACCHARWIDTHLIST (BOXLIST FBBOX) PACKC (X \PNAMESTRING PBASE) +COURIER.WRITE.REP (STREAM VALUE PROGRAM TYPE) \LOOKUPFMAP (PAGE) ERROR-MISSING-EXTERNAL-SYMBOL (NAME +PACKAGE) \READACFONTBOXES (FILE ENDCHAR STARTCHAR N WIDTH) CL::BUILD-COPIER-TYPE-CHECK (CL::PS) +\WHICHPART (PAGE) \GETFBB (BOXLIST BOX) \ACCHARIMAGELIST (BOXLIST BOX) DASSEM.DASSEM (CC FN ARGTYPE +VARCOUNT FRAME VARS Y N F) RESOLVE-MISSING-PACKAGE (CL:PACKAGE-NAME CL:SYMBOL-NAME XCL::EXTERNALP) +\NEW.READ.SYMBOL (BASE OFFSET LEN FATP) \COPYSEL (FROM) PACK (\PNAMESTRING) DINFO.FMENU.HANDLER ( +WINDOW ITEM TYPE GRAPH BUTTONS) DBG::DEBUGGER-MENU-HELP (DBG::COMMAND) TEDIT.FIND (END#) \PACK.ITEM ( +BASEA0364 OFFSETA0363 CODE ITEM) \NSFILING.GETFILENAME (DEVICE NAME RECOG) OPEN (FILENAME DIRECTION +ELEMENT-TYPE STREAM) UnixPrintCommand (COPIES NAME TMPNAME) WTODSX (WX WINDOW) COMPILER::PRINT-NODE ( +COMPILER::NODE COMPILER::INDENT) SEDIT::DELETE-LIST (SEDIT::NODE SEDIT::CONTEXT SEDIT::START SEDIT::END + SEDIT::SET-POINT?) \ACROTATECHAR (BITMAP) \FM.EDIT-PREPARETOEDIT (SI::$PROG1-FIRST-EXPRESSION$ REGION +) \LFINITCASEARRAY (CASEARRAY) LITATOM.EXISTS (STRING) SEDIT::VAR-CHANGED (CL:ATOM CL:STRUCTURE) +\PAGEPAD.PRESS (STRM P) \CREATESTARFONT (CHARSET PSIZE DEVICE FAMILY FACE ROTATION FD CS) +\PFTransferFilePage (file filePageNumber index volumePageNumber frame operation noBreak) \NEW.MKATOM ( +BASE OFFST LEN FIRSTCHAR FATCHARSEENP) TB.CLOSEFN (WINDOW) COMP.DELFIX (TYPE) CONVERT-LITATOM (ATOM +BASE LEN FATP CLAUSE PREFIX PREFIX-LENGTH WHERE) RESOLVE-MISSING-EXTERNAL-SYMBOL (NAME PACKAGE) +\FM.EDITSTART-SELECTEDFN (WINDOW EDITITEM SI::$PROG1-FIRST-EXPRESSION$ BUTTONS) \FAMILYCODE (WSTRM +FAMILY NCHARS) SEDIT::PLACE-CARET-AND-SELECTION (SEDIT::CONTEXT SEDIT::Y SEDIT::SELECTION TYPE) +FB.ANALYZE.PATTERN (SAMPLE) \FACECODE (FACE) XCL:PACK (NAMES PACKAGE) ONEDINSPECT.SELECTITEM (WINDOW +ROWPROPS VERTMARKS FETCHFN DATUM) \LITATOM.EATCHARS (LITATOM N LEN) \TEDIT.SUPERSCRIPT.CARET (TEXTOBJ +TEXTSTREAM SEL) \NSINIT (SOC) CL:INTERN (BASE OFFSET LENGTH FATP) INTERPRESSBITMAP (OUTPUTFILE BITMAP) + CLISPACKUP (L) INTERN-LITATOM (WHERE PACKAGE ATOM) \ACCHARPOSLIST (FILE ENDCHAR STARTCHAR +DIRECTORYSTART) OLDFAULT1 (FAULTX FAULTARGS) XCL:PACK* (NAMES) C.FLOATUNBOX (A) SEDIT::PROPLST-CHANGED + (CL:ATOM CL:STRUCTURE) BRECOMPILE (STREAM DESCR DEFQ FORM NLAMA NLAML LAMS) MAKEBITTABLE (L CHAR +TABLE CODE X) CL::DEFINE-COPIERS (CL::PS) EXCHANGEXIPS (SOC OUTXIP TIMER) IRM.RESET (W) TEDIT.SETSEL ( +STREAM CH# LEN POINT OPERATION) TB.PRINT.LINE (BROWSER ITEM WINDOW PRINTFN) COMP.EXPR (COMPILE.CONTEXT +) TRANSFER-SYMBOL (TO FROM) \FM.EDITSTART-MESSAGE (BUTTONS) \DSKDISPLAY.RESHAPEFN (W REG) +\NSFILING.HOSTNAMEP (HOST) SEDIT::OUTLINE-SELECTION (SEDIT::SELECTION SEDIT::ENDLINE SEDIT::FN +SEDIT::WINDOW SEDIT::SHADE) \SPP.CLOSE.IF.ERROR (STREAM) CONCOCT-SYMBOL (STRING SYM) NEWPAGE?.IP ( +IPSTREAM) \SETFATSYNCODE (CHAR CODE) \FM.EDIT-ITEM (EDITITEM WINDOW STARTFLG TIMEOUT) PACKAGE-ENABLE ( +PACKAGE) \BCPLSOUT.PRESS (X STRM NC) SCANX (DX DY X0 Y0) WINDOWWORLDP (SCREEN) PACKAGE-INIT (CONVERT?) + \NSFILING.ERRORHANDLER (ERRCODE) DETACHALLWINDOWS (MAINWINDOW W) FILEPOS (FILE STREAM CA SKIPCHAR) +\M44DOEXTENDVMEMFILE (DAs SCRATCHBUF CAs) PRINTDISPLAYNODE (NODE) SHOW.PRESS (PRSTREAM CURBYTE) +UnixShellQuote (STRING X) OPENPOSTSCRIPTSTREAM (FILE OPTIONS X) FB.CHECK.NAME.LENGTH (FILEDATA +PRINTLENGTH SPACING) \PFPutFileMapPage (volumePageNumber frame) \EXTENDISFMAP (PAGE DA LASTOFFSET) +RESOLVE-READER-CONFLICT (CLSYMWHERE ILSYM CLSYM) \VFMCorrectBufferP (BUFFER VOLPAGENUM) COMP.STCONST ( +X) SHOULDNT (MESS) \FM.EDITSTART-SETUP (SI::$PROG1-FIRST-EXPRESSION$) FFILEPOS (FILE STREAM \FFDELTA1 +\FFDELTA2 \FFPATCHAR PATCHAR DELTA1 DELTA2 CASE MAXPATINDEX) SEDIT::LESS-PROMPT-WINDOW (SEDIT::REGION +SEDIT::FONT) SEDIT::LINEAR-ITEM-WIDTH (SEDIT::ITEM) \SETUP.FFILEPOS (PATLEN DELTA1 PATLEN,PATLEN +MAXPATINDEX PATCHAR CASE PATBASE PATOFFSET DELTA2) C.FLOATBOX (A) SEDIT::PROP-CHANGED (CL:ATOM +CL:STRUCTURE) \MAKE.COURIER.REP.STREAM (LIST.OF.WORDS) CL::BUILD-COPIER-SLOT-SETFS (CL::SLOTS) +XTOUSTRING (XCCSSTRING RAWFLG USTR) DBG::NEAR-BY-REGION (DBG::REGIONTEMPLATE DBG::REGION DBG::WIDTH +DBG::HEIGHT) UnixTempFile (host Prefix dir str) TEDIT.MAPPIECES (TEXTOBJ PCTB FN FNARG) +\LEAF.REPAIR.BROKEN.PUP (OLDSEQUIN) \INITIALIZESWAPDISK (ISFindex) COMPILER::COMPILE-SCAN-DEFINE-FILE-INFO + (COMPILER::FORM) TB.CLOSE/SHRINK (WINDOW BROWSER FLG) \NSFILING.CLOSE.BULKSTREAM (CONNECTION) +EXPANDING-PAGEFULLFN (W OLDREGION INCREMENT CURRENTHEIGHT) INTERPRESS.BITMAPSCALE (WIDTH HEIGHT RATIO) + PACKAGE-HIERARCHY-INIT (ATOM) IRM.SMART.LOOKUP (KEYWORD GRAPH) SEDIT::COPY-STRUCTURE-LIST (SEDIT::SUBNODE +) CL::%%NOT-NUMBER-ERROR (CL::OBJECT) \FM.DISPLAY-SETUP (SI::$PROG1-FIRST-EXPRESSION$) +\NSFILING.RENAMEFILE (NEWDEVICE DEVICE OLDNAME NEWNAME) TB.FIND.SELECTED.ITEM (LAST# BROWSER FIRST#) +SEDIT::ICON-COPYFN (WINDOW) TB.SHOW.DELETION (BROWSER WINDOW BASELINE THICKNESS ITEM OPERATION) +CL::%%NOT-RATIONAL-ERROR (CL::OBJECT) PSCFONT.READFONT (FONTFILENAME S) \SPP.DUPLICATE.REQUEST (XIP +SOURCEID) \ENTITYEND.PRESS (PRSTREAM PRDATA ETYPE STREAM W XOFFSET YOFFSET) COMPILER::PRINT-TREE ( +COMPILER::TREE) BCOMPL (CFILE NOBLOCKSFLG OPTIONSSET) \TFBRAVO.INIT.PAGEFORMAT (TEXTOBJ) SCALE/GRAPH ( +STREAM GRAPH SCALE) TB.PROCESS (FORM NAME RESTARTABLE) \TEDIT.UNDERLINE.CARET.OFF (TEXTOBJ TEXTSTREAM +SEL) CL::%%RATIO-PRINT (CL:NUMBER STREAM CL::TOP CL::BOTTOM) FB.HANDLE.ABORT.BUTTON (MENU ITEM) +UPDATE/SCROLL/REG (IMAGEREG) DESCRIBE-VIRTUAL-MEMORY (NOBCPL VMSIZE) SEDIT::COMPUTE-POINT-POSITION-LIST + (SEDIT::NODE) NEWFAULT1 (FAULTX FAULTARGS) DATE (FORMAT) CL:ADJOIN (CL::ITEM LIST CL::TEST-NOT CL::TEST +) SEDIT::FN-CHANGED (CL:ATOM CL:STRUCTURE) ICMLARRAY.DISPLAYSLICE (CMLARRAY LEVELS SLICE WHERE +TOPRIGHT) ASKUSERLOOKUP (FIELD) CL::%%BUILD-RATIO (CL::X CL::Y CL:REM) DBG::RELEASE-DEBUGGER-WINDOW ( +DBG::W) DINFOGRAPH (X) BRECOMPILE3 (FN FILEMAPLST) CL::%%COMPLEX-PRINT (CL:NUMBER CL:REALPART +CL:IMAGPART STREAM) FM.SKIPNEXT (WINDOW FM.PROCESS CLEARFLG) DATEFORMAT (FORMAT) +CL::DEFAULT-CONSTRUCTOR-NAME (CL::STRUCTURE-NAME) CL::%%NOT-FLOAT-ERROR (CL::OBJECT) CL::%%COMPLEX-+ ( +CL::IMAG-1 CL::REAL-1 CL::REAL-2 CL::IMAG-2) \TEDIT.PRIMARYW (TEXTSTREAM) GDATE (DATE FORMAT STRPTR) +\TEDIT.FORMATTEDP1 (FILE N WIDTH) ID (X) \TEDIT.SUBSCRIPT.CARET (TEXTOBJ TEXTSTREAM SEL) +DISPLAYNODELINKS (G NODE NODELST NODEHASHTABLE TRANS STREAM LINEWIDTH TOSONLY) +\LEAF.USE.NEW.CONNECTION (SEQUIN) COMPILER::TEST-ALPHA-2 (COMPILER::FN) \TFBRAVO.GET.FONTSIZE (FONT) +TERMX (DX DY X0 Y0) CL::%%NOT-NONCOMPLEX-NUMBER-ERROR (CL::OBJECT) NEW/EDITDATE (OLDATE INITLS) +\FIXP.FROM.FLOATP (VAL) COURIER.READ.REP (LIST.OF.WORDS PROGRAM TEMPLATE) \DSPTOPMARGIN.PRESS ( +PRSTREAM) SEARCHPRETTYTYPELST (TYPE) CL::%%COMPLEX-/ (CL::IMAG-1 CL::REAL-2 CL::IMAG-2 CL::REAL-1 +CL::MODULUS) \GETBASE (X D) \NSFILING.WHENCLOSED (STREAM) DOMAINWINDOWCOMFN (ATTACHEDW) \PACKDATE ( +TIMEZONE) \PUTBASE (X D V) \NSFILING.DIRECTORYNAMEP (DEVICE HOST/DIR) \IDATESCANTOKEN (CHAR UCHAR) +CL::%%COMPLEX-ABS (CL::Z CL::Y) \DSPFONT.IP (IPSTREAM) \IDATE-PARSE-MONTH (MONTH) DP (ATOM ARGS) +CL::DEFECT-FROM-IL-TO-XCL (CL::NAME) COMPILER::COMPILER-ERROR (COMPILER::COMPILER-CONTEXT COMPILER::ARGS +) ICMLARRAY.ATTACHDISPLAY (DISPLAYGROUP STATUSGROUP W DISPLAYEDLEVELS) \TEDIT.SHRINKFN (W) +FB.EDITLISPFILE (FILE BROWSER) ASKUSEREXPLAIN (KEYLST ENTRY OPTIONS PREV KEY OPTIONSLST DELIMITER X) +CL::%%RATIO-PLUS (CL::DENOMINATOR-1 CL::DENOMINATOR-2 CL::GCD-D CL::NUMERATOR-1 CL::NUMERATOR-2 +CL::D1/GCD-D CL::TOP CL::D2/GCD-TOP) CONDITIONS::DEFECT-FROM-XCL-TO-CONDITIONS (CONDITIONS::NAME) +InstallUnixPrinter (PrinterTypes) PROMPTPRINT (N) EVENP (INTEGER) \NSFILING.DELETEFILE (DEVICE +FILENAME HANDLE) FB.COPYFN (ITEM) CL::%%RATIO-TIMES (CL::NUMERATOR-1 CL::DENOMINATOR-2 CL::NUMERATOR-2 + CL::DENOMINATOR-1 CL::K CL::H) \GETBASEPTR (X D) SEDIT::CFV-QUOTE (SEDIT::SUBNODE SEDIT::QUOTE-WIDTH) + CHECKTRAN (X) MAKEALISTCOMS (X PR) CL::%%COMPLEX-- (CL::IMAG-1 CL::REAL-1 CL::REAL-2 CL::IMAG-2) +RECOMP? (FNS X) \PUTBASEPTR (X D V) \LFExtendFile (stream vol fileDesc minBackingFileSize) \RPLRIGHT ( +S AT N MINDIGITS) \ENTITYSTART.PRESS (PRSTREAM STRM) CL::BUILD-CONSTRUCTOR-SLOT-SETFS (CL::PS +CL::ARGUMENT-LIST CL::SLOT CL::ARGUMENT CL::SLOTS) CL::%%< (CL::Y CL::X) \HILOC (X) +TEDIT.INSERT.OBJECT (STREAM OBJECT START-OF-PIECE) TEDIT.MAPLINES (TEXTOBJ FN TOP BOT) \OUTDATE-STRING + (S N STRING) COMP.ST (DL X) \LOLOC (X) \TEDIT.SELECT.ALL (TEXTSTREAM TEXTOBJ) \FM.NUMBER-SELECTEDFN ( +ITEM WINDOW BUTTONS) \PFGetFileMapPage (volumePageNumber frame) SEDIT::HIGHLIGHT-SELECTION ( +SEDIT::SELECTION SEDIT::WINDOW SEDIT::SHADE) CL::%%COMPLEX-* (CL::IMAG-1 CL::REAL-1 CL::REAL-2 +CL::IMAG-2) PROCESSWORLD (FLG RESULT) SEDIT::PARSE--LIST (CL:STRUCTURE) \COERCEASCIITONSFONT ( +ASCIITONSFIXARRAY ASCIITONSMAPARRAY NSFAMILY SIZE FONTFACE ROTATION DEVICE ASCIITONSMAP ASCIIFAMILY +WIDTHS) ADD.PROCESS (ARGS) \DSPSPACEFACTOR.PRESS (STREAM) COMPILEUSERFN1 (Y) FB.CLOSEFN (TBROWSER FLG) + \START.PROCESSES (TOFX) \RUN.PROCESS (REASON) SEDIT::CFV-LIST (SEDIT::ENVIRONMENT SEDIT::SUBNODE +SEDIT::INDENT SEDIT::SPACE-WIDTH SEDIT::TWO-PARENS) NEWPAGE.IP (IPSTREAM) DISPLAYGRAPH (N CLIP/REG) +BYTE (CL::SIZE CL:POSITION) SEDIT::SEDITL (CL:ATOM SEDIT::EDITEXPR SEDIT::MESSAGE SEDIT::EDITCHANGES) +\RPLPTR (OBJ VAL) SEDIT::SEDITE (SEDIT::CONTEXT CL:STRUCTURE SEDIT::CHANGED? SEDIT::IFCHANGEDFN +SEDIT::OLD-PROPS SEDIT::EVENT SEDIT::OPTIONS SEDIT::COMPLETION-FN) ICMLARRAY.MENUW.SHOW (MENUWINDOW +DISPLAYEDLEVELS CMLARRAY) CLISPELL (X FORM) EQ (X Y) \IRM.SMART.REF (WINDOW) \INSPECT/CODE/REPAINTFN ( +WIN UPPERLEFT) UNMAKEMAINWINDOW (MAINWINDOW) OPT.CALLP (OP) LOC (X) \DSPLINEFEED.PRESS (PRSTREAM) +\FM.NUMBER-MESSAGE (BUTTONS) TB.FIRST.VISIBLE.ITEM# (BROWSER REGION) DBG::CLOSE-DEBUGGER-WINDOW (DBG::W + DBG::PROCESS) VAG (LOC) SEDIT::INPUT-NORMAL-CHAR ($$OUTPUT SEDIT::POINT-TYPE SEDIT::POINT) +TB.REV.FIND.SELECTED.ITEM (FIRST# LAST# BROWSER) CL::%%LCM (CL:GCD) COMPEM (X) KNOTLOOP (KNOTS) +SETXY.PRESS (PRSTREAM X Y) INITX (DX DY X0 Y0) CL::BOA-CONSTRUCTOR-P (CL::CONSTRUCTOR) CL::%%RECIPROCOL + (CL:NUMBER) CL::%%GCD (CL::K) \TEDIT.ITALIC.CARET.ON (TEXTOBJ TEXTSTREAM SEL) BLOCKCOMPILE1 (BLKNAME +X) \NEW4PAGE (PTR) EDITPROP (NAME) UPDATECHANGED1 (KEY) PUTWINDOWPROP (PROP VALUE) CREATE.EVENT (NAME) + XCL::SFLOOR (CL:NUMBER CL::RESULT) NSOCKETNUMBER (NSOC) PAINTW.SHADE.LABEL (FILLING BM) COMPILEFILES0 + (FILES OPTIONS) \NEXTCONSPAGE (N) FILLWITHBACKGROUND (REG WIN) \FM.NWAY-CHANGESTATE (COLLECTION +WINDOW NWAY) \NSFILING.COURIER.OPEN (ADDRESS NAME) \PFPutAllocationMapPage (volumePageNumber frame) +SEDIT::GRAY (SEDIT::WINDOW) COMPILER::TEST-ALPHA (COMPILER::FN COMPILER::TREE) TB.FIND.ITEM (BROWSER +LO HI) SEDIT::CREATE-COMMAND-TABLE (SEDIT::DESCRIPTION SEDIT::COMMAND SEDIT::KEY SEDIT::TABLE +SEDIT::MENU-ITEMS SEDIT::MENU-LEFT SEDIT::MENU-RIGHT) DRAWMARGINSCALE (W WREG UNIT OLDOP) EDITFNS (Y) +SEDIT::START-PROCESS (SEDIT::CONTEXT SEDIT::EVENT) ICMLARRAY.MENUW.APPLY (MENUWINDOW CMLARRAY LEVELS +$$OUTPUT) BULKDATA.GENERATE.NEXT (STREAM) \MAIKO.CONS.UFN (X A LO D) \IRM.GET.REF (WINDOW) +\TEDIT.INSPECTCODE (CODEPRINTER FN LVFLG RADIX WHERE) ONEDINSPECT.REDISPLAY (WINDOW FETCHFN DATUM +ROWPROPS VERTMARKS ELTPROP VALUEWIDTH FHEIGHT FDESCENT) POSTSCRIPT.FONTSAVAILABLE (FAMILY SIZE FACE +PAIR DIRECTORY PATTERN FILE DEVICE RAWNAME INVERSE.ALIST NFD) \BACKGROUND.PROCESS (FN) +\TEDIT.SHRINK.ICONCREATE (W SHRINKFN ICON-POSITION) \SETSPACE.PRESS (PRSTREAM S STREAM W) +\TIMER.PROCESS (HEAD) XCL::SROUND (CL:NUMBER) SEDIT::BACKSPACE-LIST (SEDIT::CONTEXT) +VARSBOUNDINEDITCHAIN (EDITCHAIN) \DTSCAN (X) COMPILER::ESTABLISH-MACRO-IN-COMPILER (COMPILER::NAME +COMPILER::EXPN-FN) \FM.NWAY-SELECTEDFN (BUTTONS ITEM WINDOW) NUMBERPAD.READER.DECODE (CHAR) \ISDST? ( +HOUR WDAY) %%TYPE-SIZE-TO-TYPENUMBER (LIT-TYPE LIT-SIZE) CL::%%INTEGER-COERCE-OPTIMIZER (CL::CONTEXT +CL::FORM) XCL::SCEILING (CL:NUMBER CL::RESULT) COMPILER::COMPILE-FILE-PROCESS-FUNCTION (COMPILER::NAME + COMPILER::DEFINITION) PRINTLINE (LN) CL:FLOOR (CL:NUMBER CL::DIVISOR) \TEXTMENU.SET.TOGGLE (TEXT +TEXTSTREAM VALUE) EXEC (XCL::ID XCL::X) BRECOMPILE1 (FN/BLOCK LST NAME ADRLST0) CL::%%LOGICAL-OPTIMIZER + (CL:IDENTITY) \DSPRIGHTMARGIN.PRESS (PRSTREAM) \LFExtendFileIfNecessary (buffers streamFirstPage +runLength stream) INTERPRESSFILEP (FILE) CL::BUILD-CONSTRUCTOR-ARGLIST (CL::SLOT CL::SLOTS) +\PFGetAllocationMapPage (vol volumePageNumber frame) CL::%%LOGIOR (CL::X CL::Y) UNMODERNWINDOW (WINDOW +) NSOCKETFROMNUMBER (SOC#) TB.SHOW.COPY.SELECTION (BROWSER ITEM) DOCOLLECT (ITEM) +\NSFILING.CHILDLESS-P (SESSION HANDLE) COMPILEUSERFN (Y) FB.AFTERCLOSEFN (WINDOW TBROWSER) CL::%%LLSH1 + (CL::X) ENDCOLLECT (Y) SEDIT::ASSIGN-FORMAT-QUOTE (SEDIT::NODE SEDIT::CONTEXT CL:FORMAT) +PAINTW.CACHE.SHADE (SHADE) LINKPARAMETERS (TOND FROMND) \REQUEUE.ETHERPACKET (REQUEUE) +CL::%%BIGNUM-LOGCOUNT (BIGNUM) SEDIT::SET-PROPS (SEDIT::PROPS SEDIT::PROCESS SEDIT::PROCFORM) +ICMLARRAY.MENUW.GETLEVEL (ITEM MENUWINDOW CMLARRAY DIM LEVMENU PRTWINDOW $$OUTPUT) MAKEINTERPRESS ( +FILE IPFILE FONTS HEADING TABS OPTIONS) CL::%%LRSH8 (CL::X) \INITCONSPAGE (LINK) IRM.DISPLAY.REF (REF +GRAPH $$OUTPUT) \INSPECT/CODE/RESHAPEFN (WIN FONT) \TEDIT.STRIKEOUT.SEL.ON (TEXTSTREAM SEL) +\ALLOCMDSPAGE (TYP) \NSFILING.EVENTFN (EVENT DEVICE) DC (FILE ARGS) TTY/EDITL (X MESS) CLISPFOR (FORM) + DISPLAY/NUMBER/READER/TOTAL (WIN TOTALREG TOTSTR) \CLOSELEAFCONNECTION (CONN) DELETE/AND/DISPLAY/LINK + (G TMP WIN LPARAMS) GRAPHDELETELINK (GRAPH WINDOW) EDITFB (FN) \TEDIT.STRIKEOUT.SEL.OFF (TEXTSTREAM +SEL) LASTN (N) MSCOLLECTDATA (TNAME) \DSPLEFTMARGIN.PRESS (PRSTREAM) DBG::SET-UP-DEBUGGER-WINDOW (DBG::W +) \TFBRAVO.WRITE.PARAGRAPH (PARA INFILE TEXTOBJ MARGIN.CANDIDATE) CL::%%LLSH8 (CL::X) +\GET.PRIORITY.QUEUE (PRIORITY) \NSFILING.GET.NEW.SESSION (DEVICE OLDSESSION NOLOCK) \CHECKDSTCHANGE ( +YDAY DSTDAY WDAY HOUR) NUMBERPAD.READER.HANDLE.CHAR (WIN DIGIT TOTSTR) COMPILER::COMPILE-FILE-LOOSE-FORM + (COMPILER::FORM) \SET.PROCESS.NAME (FIRSTNAME) \TEDIT.UNDERLINE.SEL.ON (TEXTSTREAM SEL) +TB.DISPLAY.LINES (LAST# FIRST# WINDOW PRINTFN) BULKDATA.GENERATOR (STREAM PROGRAM TYPE) +CL::%%CONSTANT-BYTESPEC-P (CL::BYTESPEC) SPP.OPEN (SOCKET NAME PROPS TIMER TAIL) \MAPMDS (FN) +COURIER.WRITE.BULKDATA (ITEMLIST STREAM W PROGRAM TYPE) \CHECKCONSPAGE (PN PTR) SEDIT::SET-OPTIONS ( +SEDIT::OPTIONS) DISPLAY/NAME (ND) CL::%%LRSH1 (CL::X) \MAYBEPRINTPACKET (PACKET TYPE CALLER FILE +PRE.NOTE) CURSOR (INVERTFLG) TEDIT.DEACTIVATE.WINDOW (W PANE) INSPECT.FLIPSELECTION (WINDOW LEFT +BOTTOM WIDTH HEIGHT) \ETHEREVENTFN (EVENT FN) \TFBRAVO.GET.FONTSTYLE (FONT) EDITL0 (L MESS) +\FIXLINELENGTH.PRESS (PRDATA) COMPILER::EXPAND-OPENLAMBDA-CALL (COMPILER::ARG COMPILER::UNSUBBED-PARAMS +) SEDIT::ASSIGN-FORMAT-LIST (CL:FORMAT SEDIT::CONTEXT SEDIT::SUBNODE SEDIT::LAST-FORMAT) +DINFO.FMW.CLOSEFN (W DINFOW) OPT.OPTCHECK (X Y) CL::%%RATIONAL-FLOAT (CL:NUMBER CL::SIGN CL::HI CL::LO +) \LFRemoveDirEntry (dirStream stream ENTRYSIZE) UNDOEDITL (ULST ULST0 L) MSUPDATE (FNNAME FNDEF F) +\PFCreatePage (file filePageNumber volumePageNumber frame runLength noBreak) CL::%%RATIONALIZE-FLOAT ( +CL::X CL::BIT-SIGN CL:EXP) \KEYHANDLER1 (MOUSETEMP MOUSETIMER R W EXCESS) SEEFILE (ST ND) COMP.STFN (N + FN) DINFO.CREATE.FMENU (GRAPH FM) \FM.NWAY-MOVEDFN (ITEM WINDOW NWAY BUTTONS) MODERNWINDOW.UNSETUP ( +ORIGFN PKGNAME) SEDIT::FIND-NODE (SEDIT::X) SETQ (U) CL::%%FLOAT (CL::HIWORD CL::LOWORD) NEQ (X Y) +\TEDIT.UCASE.SEL (STREAM SEL STR POS LEN POINT TEXTOBJ) FB.HARDCOPY.DIRECTORY (WINDOW IMAGESTREAM +FBROWSER LMARG RMARG SCALE TBROWSER NAMERIGHTMARG DIRFONT) XYSECT (DU DY DX DV X0 Y0 U0 V0) AND (U) +WRITEIMAGEOBJ (IMAGEOBJ STREAM) PROCESSP (PROC) SEDIT::QUERY-THROW-AWAY-CHANGES (SEDIT::OPTIONS SEDIT::NAME +) CL::OPTIMIZE-BYTE (CL::SIZE CL:POSITION) TB.LAST.VISIBLE.ITEM# (BROWSER REGION) DEL.PROCESS (PROC) +CL::BOA-ARG-LIST-WITH-INITIAL-VALUES (CL::ARG-LIST CL::PS CL::NEW-ARG-LIST CL::OPTIONAL CL::SLOTS) +MAP.PROCESSES (MAPFN) TEDIT.CARETLOOKS (STREAM LOOKS) COMP.STPOP (N) STREAMPROP (X) \FM.NWAY-DOWNFN ( +ITEM WINDOW NWAY BUTTONS) \DSKDISPLAY.REPAINTFN (W vol) RELPROCESSP (PROCHANDLE) SEDIT::FIND-LINE-START + (SEDIT::CONTEXT SEDIT::Y) SPP.DESTADDRESS (STREAM ADDRESS CON) GETSTREAMPROP (PROP STREAM) +\DSPXPOSITION.IP (IPSTREAM) MSUPDATEFN1 (FN EACHTIME) PUTSTREAMPROP (PROP) MAKEFILE (X) +CHECKFORCHANGED (SET NEEDUPDATE X) PROCESS.RETURN (VALUE) \PFCreateFreePage (vol volumePageNumber +frame runLength noBreak) RESTART.PROCESS (PROC) \GETFILINGCONNECTION (DEVICE DEVINFO) +TB.RECONSIDERRANGE (LAST# FIRST#) INSTALL-PROTOTYPE-DEFN (NAME ARGS MENU) OPT.CCHECK (X) +\EXTERNALFORMAT (STREAM) TB.REPLACE.ITEMS (NEWITEMS REGION) MSSOLVE (FN X) WAKE.PROCESS (PROC STATUS) +SCALEREGION (SCALE REGION) \FM.NWAY-MESSAGE (ITEM WINDOW BUTTONS) SEDIT::FINALIZE-MOUSE-SELECTION ( +SEDIT::SELECTION) \DSPCLIPPINGREGION.PRESS (STREAM) SPP.DSTYPE (STREAM) SUSPEND.PROCESS (P) +PROMPTINWINDOW (BORDERSIZE PROMPTWBORDER PROMPTSTR WHICHCORNER X Y) \TEXTMENU.TOGGLE.WHENOPERATEDFN ( +OPERATION OBJ DS) PLCHAIN (LN) PROCESS.RESULT (EVENT) \POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS (FD TYPE +ROTATION DEVICE) COMPILER::COMPLETELY-EXPAND (COMPILER::FORM) CL::BOA-SLOT-SETFS (CL::PS) +SELECT.FNS.EDITOR (FN) LISTPUT (PROP VAL) \TEDIT.UNDERLINE.SEL.OFF (TEXTSTREAM SEL) FB.ICONFN (OLDICON + WINDOW POSITION) \CURVE (N X0 Y0 DISPLAYDATA A NEWXA0625 NEWYA0624 X1 Y1 NEWXA0627 NEWYA0626 +NEWXA0629 NEWYA0628 NEWXA0631 NEWYA0630) \SPP.STREAM.LOST (STREAM) STREAMP (X) \FM.NWAY-SETUP ( +SI::$PROG1-FIRST-EXPRESSION$ REGIONS) TB.SCROLLFN (WINDOW BROWSER DX DY CONTINUOUSFLG) +FB.SET.DEFAULT.NAME.WIDTH (FONT) \LFReturnInfo (GENERATED PROP) \LFFindNextFile (directory SEARCHSTATE + HOST&DIRNAME) \PFTrimHelper (targetFileSize vol) TB.SET.FONT (WINDOW HWIDTH) \DEFPRINT.BY.NAME ( +TYPENAME STREAM OBJECT) TB.CONSIDERRANGE (LAST# FIRST#) INSPECT.INVERTREGION (WINDOW LEFT BOTTOM WIDTH + HEIGHT) NCHARS (X RDTBL ESC) FB.GET.NEWPATTERN (BROWSER) FAX.HOSTNAMEP (PRINTERNAME) \OUTCHAR (STREAM + CODE) \PRINTADDR (STREAM X \NUMSTR \NUMSTR1) SEDIT::GET-CONTEXT (TYPE) MSSHOWUSE (SHOWFN SHOWSET +SHOWEDIT SHOWTYPE ITEM SS PRNT SE) \TEXTMENU.TOGGLE.SHOWSELFN (OBJ DS IMAGEBOX SEL) CALLS (VAR) \SOUT +(STREAM X) EDITL2 (FILE ATM) MSNLAMBDACHECK (FN2) CL::ARGUMENT-NAMES (CL::ARG CL::ARG-LIST) +PRINTERRORXIP (FILE ERRCODE ERRARG) READTABLEP (RDTBL) \INSERTCR (CH CH#) TTY.PROCESSP (PROC) +\TEDIT.SUPERSCRIPTSEL (TEXTSTREAM SEL) \LEAF.ACKED (SEQUIN PUP) WBREAK (ON) YSECT (DU DY DX DV X0 Y0 +U0 V0) \STREAM.DEFPRINT (STRM OUTSTREAM TYPE) CL:STRING-CAPITALIZE (STRING START END NEW-STRING) +WINDOWP (X) \DSPBOTTOMMARGIN.PRESS (PRSTREAM) GIVE.TTY.PROCESS (WINDOW) \NSFILING.LOGIN (FILESERVER +PROCNAME DEVICE) NSMAP (ZERODEFAULT TABLE MAP X) \CARET.DOWN (UNLESSOCCLUDED INTERVAL) +\DSKDISPLAY.BUTTONEVENTFN (W) SPP.SENDEOM (CON) \FDEV.DEFPRINT (DEV STREAM) NEWLINE.IP (IPSTREAM +IPDATA) GETTEMPLATE (FN) \GETACCESS (STREAM) CH.CHANGE.ITEM (PROPERTY NEWVALUE) VERBNOTICELIST (VPART) + EDITBF (FF) \NSFILING.UPDATE.ATTRIBUTES (NEWATTRS) \DSPFONT.PRESS (PRSTREAM) +DBG::SIMPLE-REPORT-CONDITION (STREAM) \INTERPRESSINIT (MAPPINGS) APPEND (L) MENU.HANDLER (MENU DSP +MGRIDSPEC NROWS NCOLUMNS MOVEDLEFT LOCALMENUHELDWAIT) FAX.PROPERTIES (HOST) \SPP.PREPARE.INPUT (NBYTES +) COMPILER::ALPHA-THROW (COMPILER::TAG COMPILER::VALUE) EDITQF (PAT) OPT.DS1 (VAR) \PFSaveBuffers (VOL +) \LFSortFiles (A B) \SETACCESS (ACCESS DEVICE) WINDOW.BITMAP (W REGION) TEDIT.INSERT.UPDATESCREEN ( +CHARS CH#) \SOFTCURSORPOSITION (X Y) MSGETDEF (NAME SOURCE OPTIONS TYPE) \STREAM.NOT.OPEN (STREAM) +\TEDIT.SMALLER.CARET (TEXTOBJ TEXTSTREAM SEL) \FM.STATE-CHANGESTATE (NEWSTATE +SI::$PROG1-FIRST-EXPRESSION$ WINDOW) CLOSEMAINWINDOW (ICONWIN) \LEAF.FIX.BROKEN.SEQUIN (STATE DEVICE +\DurationLimit) CL::DEFINE-CONSTRUCTORS (CL::PS CL::CONSTRUCTORS CL::EXPORTNAME CL::CONSTRUCTOR +CL::SLOTS CL::ARGUMENT-LIST) MODERNWINDOW.BUTTONEVENTFN (WINDOW MAINREGION ATTACHEDREGION +STARTINGREGION TITLEPROPORTION) XSECT (DU DY DX DV X0 Y0 U0 V0) PROCESS.WINDOW (PROC) BPNT0 (X FILE +CARLVL CDRLVL TAIL) ONED.TRACKCURSOR (WINDOW MARKS PROPS NEW-ITEM-FN HIGHLIGHT-FN HEIGHT) +\INSTALL.EXTERNALFORMAT (EXTFORMAT/NAME) \NSFILING.CLOSEFILE (OPTIONS FILESTREAM) +\NSADDRESS.PRINT.DECIMAL (ZERO STREAM) FB.INFO.ITEM.NAMED (ITEMS TAG) OPENW (USEROPENFN) +SEDIT::EXPANDREGIONFN (SEDIT::WINDOW SEDIT::CONTEXT) TB.CONTIGUOUS.SELP (LAST# FIRST# BROWSER) +COMPILER::ALPHA-TAGBODY (COMPILER::BODY CL:TAGBODY) \TFBRAVO.HANDLE.HEADING (TEXTOBJ) +PAINTW.READBRUSHSHADE (FILLPAT) RECLOOK (LOCALDEC DEC PARENT) ENCAPSULATEDIMAGEFNS (GETFN IMAGEFNS) +MKATOM (X LEN) GET.MENU.LIST (CMLARRAY RANK) FB.BROWSECOMMAND (BROWSER NAMETAIL) RECORDFIELD? (FIELD +DECLARATIONS) TB.REPAINTFN (WINDOW BROWSER REGION) \DEFINEFONT.PRESS (PRSTREAM FONT) +\NSFILING.DISCARD.SESSION (DEVICE) CREATE.NUMBERPAD.READER (DIGITFONT MSGFONT WPOSITION +NUMBER/READER/MAXDIGITS LINE) \TEDIT.SUBSCRIPTSEL (TEXTSTREAM SEL) \FM.STATE-SELECTEDFN (ITEM WINDOW +BUTTONS) ICONBUTTONEVENTFN (ICONW) \LEAF.HANDLE.INPUT (SEQUIN PUPDATA) SEDIT::EXPANDFN (SEDIT::WINDOW) + TB.BUTTONEVENTFN (WINDOW) LINEY (DX DY Y0 X0) DREMOVE (X) DINFO.CLOSEFN (W GRAPH) \TEXTMENU.TOGGLEFN +(OBJ TEXTOBJ) OPT.DEADSETQP (VAR CD) \WAITFORSYSBUFP (N \DISMISSTIMER NOW) FB.DATE (DT) EDIT%: (TYPE) +\PROC.RESUME (FRAME) CL::DEFINE-BOA-CONSTRUCTOR (CL::NAME&ARGLIST CL::ARGLIST CL::PS CL::RESULT-ARG +CL::NEW-ARGUMENT-LIST) MSSETUP (V X A Y AS F SYN TYPES L OTHERS) WAITFORINPUT (\DISMISSTIMER NOW N-100 + STREAM) UPDATEFN (TYPE IFCANT) \INSERTCH (CH LEN CH# \INEXTCH IMARKPC IMARKCH \INLEFT \INLEN +START-OF-PIECE FATP) TB.DECONSIDERRANGE (LAST# FIRST#) TITLEW.BUTTONEVENTFN (TITLEWINDOW MAINWINDOW) +\LFFindInfo (PROPS FILES DIRECTORY BACKWARDPROPS ATTRIBUTE) EVAL.IN.TTY.PROCESS (FORM WAITFORRESULT) +TB.NUMBER.OF.ITEMS (TYPE) \LFWriteLeaderPage (stream fileDesc) CL::%%MAKE-SMALL-FIXP-ACCESSOR ( +CL::OBJECT CL::OFFSET A0611 A0612) \PFGetFreePage (vol volumePageNumber frame runLength noBreak) +EVAL.AS.PROCESS (FORM) \COERCE.NS.SOCKET (COPYADDR) \DOTRANSITIONS (OLD NEW KEYBASE) NEXTSIZEFONT ( +NOWFONT WHICHDIR NOWSIZE) \TK.DESCRIBEFONT (FONT) \FM.STATE-SETUP (SI::$PROG1-FIRST-EXPRESSION$ +MENU.ITEMS MENU.FONT) CLOSEICONWINDOW (MAINWIN) TB.COPYBUTTONEVENTFN (WINDOW BROWSER) SEDIT::DRAW-UNDERLINE + (LAST SEDIT::SHADE SEDIT::WINDOW SEDIT::ENDX) \SPP.ESTABLISH (INITCON XIP) PROCESS.EVAL (PROC P FORM) + SEDIT::REPAINT (SEDIT::CONTEXT SEDIT::X SEDIT::Y SEDIT::DSP) \LFHighestVersions (FILELIST) +DEFAULT.ADDNODEFN (GRAPH WINDOW BOXED) \THROUGHOUTCHARFN (CHARCODE OUTSTREAM) CH.ADD.ITEM.PROPERTY ( +STREAM PROPERTY VALUE) ONFILE (FT) FAX.STATUS (HOST) \CREATECHARSET.IP (PSIZE FAMILY FACE CHARSET +NSMICASIZE FONTDESC N WIDTH) \PEEKBIN (STREAM NOERRORFLG) FB.FASTSEECOMMAND (W WINDOW TAIL UNFORMATTED +) \TEDIT1 (WINDOW PROPS) CLISPRPLNODE (A D) \THROUGHIN (STREAM) \TFBRAVO.FIND.LAST.TRAILER (FILE +STREAM) \NSPRINT.COURIER.OPEN (PRINTER) INTERPRESS.OUTCHARFN (IPSTREAM CHARCODE NSCODE OLD-CSET) +\DECODETRANSITION (KEYNUMBER TI) PROCESS.READ (OLDTTY) COMPILER::COMPILE-FILE-PROCLAMATION (COMPILER::FORM +) \FM.3STATE-CHANGESTATE (NEWSTATE SI::$PROG1-FIRST-EXPRESSION$) \NOTENEWICONPOSITION (NEWPOS) +\LEAF.TIMEDOUT (CNT STATE) SEDIT::DRAW-OUTLINE (SEDIT::Y-1 SEDIT::Y-2 SEDIT::X-1 SEDIT::X-2 SEDIT::SHADE + SEDIT::WINDOW SEDIT::X-3) TTYDISPLAYSTREAM (A) PRINTXIPDATA (XIP OFFSET MACRO FILE) EDITCALLERS (FILE + PATTERN COMS) PP (X NAME TYPE) MB.NWAYBUTTON.ADDITEM (NEWBUTTON OBJECT BUTTONS) OPT.EQVALUE (V) +\PROCESS.EVAL1 (..PEV-FORM..) COURIER.SKIP.SEQUENCE (STREAM PROGRAM BASETYPE) SHOWPRESSBITMAPREGION ( +STR) \TEXTMENU.TOGGLE.CREATE (TEXT FONT BOX OBJ STATECHANGEFN INITSTATE) CL::%%MAKE-FLOAT-ACCESSOR ( +CL::OBJECT CL::OFFSET) \PFPutMarkerPage (index frame) PRESSWINDOW (W BITMAP PRSTREAM PTSTOMICAS) +COMPILER::ALPHA-SETQ (COMPILER::FORMS COMPILER::TAIL COMPILER::SETQS) SET (VP) +\NSRANDOM.ENSURE.WATCHER (DEVICE) \NSADDRESS.DEFPRINT (BASE SOCKET NET STREAM SHARP) \UNCOMMA (X TAIL +BCAR BCDR) \FAX.PARSE.NAME (PLACE CHAR) CLISPFUNCTION? (TYPE Y FN2) \BACKFILEPTR (STREAM) +\NSPRINT.MEDIUM.CHECK (MEDIUM MEDIA PRINTER) COMPILER::ALPHA-RETURN-FROM (COMPILER::NAME COMPILER::DEST + COMPILER::FORM) %## (L) \TEDIT.NEWREGIONFN (FIXEDPOINT) \DSKDISPLAY.CREATE.WINDOW (W REG POS) +CREATEARRAYSLICE (CMLARRAY DIMS SCANDIMS LEVELS) RECORDFIELDNAMES (RECORDNAME DECL TRAN S X) +\PUTSYSBUF (R W CHAR) PARSERELATION (RELATION Y) NEWPAGE.PRESS (PRSTREAM) U-CASE (X \PNAMESTRING +OFFSET CODE) \VALID.FILING.CONNECTIONP (SESSION) FB.GETALLFILEINFO (ATTRIBUTES GENERATOR BROWSER) +DISPLAYNODE (NODE TRANS STREAM G TOSONLY) FB.MAKECOUNTERWINDOW (HEIGHT WIDTH TITLE COUNTERW FONT +BROWSERWINDOW) DINFO.SHRINKFN (W) MEASUREGRAPHNODE (NODE RESETFLG) FILES?PRINTLST (LST STR) +FB.ADD.FILEGROUP (FBROWSER FIRSTDATA TBROWSER D ITEM) \PROCESS.APPLY1 (..PEV-FN.. ..PEV-ARGS..) +FB.MAKEHEADINGWINDOW (WIDTH HEIGHT FONT HEADINGW BROWSERWINDOW) FB.HARDCOPY.TOFILE (FILES BROWSER +CONVERTERS) NEWLINE.PRESS (PRSTREAM PRDATA) PROCESS.APPLY (PROC P FN ARGS) \PUT.SESSION.HANDLE (ITEM +STREAM) ATTACHEDWINDOWTOTOPFN (WINDOW ROOT) PUPSOCKETEVENT (PUPSOC) \GETDEVICEFROMNAME (NAME HOST +DONTCREATE) COMPILER::COMPILE-FILE-DEFINE-FILE-INFO (COMPILER::FORM) \LEAF.WHENCLOSED (REASON CODE) +MSECT (DUDY X0 DXDV U0 DX DU V0 Y0) \SPPSENDERROR (MSG EPKT) \HARDCURSORUP (NEWCURSOR) MSINTERPRET ( +COMMAND SET FN EDITCOMS NEEDUPDATE EDIT KEY AT SUBROUTINE) \TEDIT.WORDDELETE (TEXTOBJ INSCH# STREAM +READSA) FILENAMEFIELD (FILE FIELDNAME) CHANGE.NODEFONT.SIZE (HOW WINDOW GRAPH) CL::%%MAKE-FIXP-ACCESSOR + (CL::OBJECT CL::OFFSET) \TEDIT.LARGER.CARET (TEXTOBJ TEXTSTREAM SEL) FIXVERBSETTYPE (SETPHRSE) +\CURSORBITSPERPIXEL (NEWBITSPERPIXEL) COPYIMAGEOBJ (FROM) \TEDIT.SMALLERSEL (TEXTSTREAM TEXTOBJ SEL) +FB.HARDCOPYCOMMAND (BROWSER OPTION ITEM) \REMOVEDEVICE (DEV) SELECT.ATOM.ASPECT (ATOM) EDIT4E ( +CHANGEFLG) CHECKPATHS (OPTIONS) CLISPERROR (TYPE) FB.MAKERIGIDWINDOW (WINDOW HEIGHT) +\REMOVEDEVICE.NAMES (DEV) \TFBRAVO.PARSE.PARA (FILE OLDPLOOKS) \NSPRINT.UNSUPPORTED (PRINTER FEATURE +VALUE) \CURSORDESTINATION (DESTINATION) OPT.EQOP (OP1 OP2) \PFPutPage (file filePageNumber +volumePageNumber frame) \CLOSEFILE (DEVICE ABORTFLG) DINFO.EXPANDFN (W GRAPH GRAPHW) \EVENT.DEFPRINT ( +EVENT STREAM) DINFO.READ.KOTO.GRAPH (QUIETFLG FILE FULLFILENAME DATA) \FM.3STATE-SELECTEDFN (ITEM) +DOICONWINDOWCOM (WINDOW) EDITFPAT (PAT X) SEDIT::DRAW-HIGHLIGHT (SEDIT::SHADE SEDIT::WINDOW SEDIT::X-2 + SEDIT::H-1 SEDIT::X-1 SEDIT::H-2) EDLOCL (COMS L) PRESS.BITMAPSCALE (HEIGHT WIDTH) +ONEDINSPECT.MAKEREGIONS (WINDOW ROWPROPS WINDOWHEIGHT LF VALUESPACE) \ADD.CONNECTED.DIR (FILENAME) +\TEDIT.ITALIC.SEL.ON (TEXTSTREAM SEL) DWIMLOADFNS? (FN) EDITXTR (LC L) MODERNWINDOW (WINDOW) +FAX.SEND.FILE (HOST HOST&OPTIONS FILE PRINTOPTIONS) \SPP.HANDLE.DATA (ACKNO) INTERLISP-NAMESTRING ( +PATHNAME) \TFBRAVO.WRITE.RUNS (PARA INFILE PARALOOKS TEXTOBJ) COMPILER::ALPHA-PROGV (COMPILER::SYMS-EXPR + COMPILER::VALS-EXPR COMPILER::BODY-FORMS) EDITMBD (X) HPRINT.IMAGEOBJ (IMAGEOBJ STREAM) +OBTAIN.MONITORLOCK (UNWINDSAVE WASINTERRUPTABLE) POSTSCRIPT.FONTCREATE (FACE SIZE FAMILY ROTATION +DEVICE WEIGHT SLOPE EXPANSION) EDITSW (M N Y Z) EDITMV (L0 L COM0) CL::%%MAKE-FLAG-ACCESSOR (CL::OBJECT + CL::OFFSET CL::WORD-OFFSET) \NSNET.CLOSERP (X Y) \DEVICEEVENT (EVENT D) PARSE-NSADDRESS (BASE +MAXDIGIT DEFAULTSOCKET) FB.MAYBE.WIDEN.NAMES (CURRENTSTART) DELFROMFILES (FILES NAME FN) +\FM.3STATE-DOWNFN (ITEM WINDOW) ICONPOSITION.FROM.WINDOW (WINDOW WREG ICONREGION) \CLEARBM (TXT BM REG +) FB.ADJUST.DATE.WIDTH (INFOWANTED BROWSER FONT) COMPILER::ALPHA-PROGN (COMPILER::FORMS COMPILER::TAIL + COMPILER::OLD-CONTEXT) \SOFTCURSORUP (NEWCURSOR) OPT.JUMPCOPYTEST (VL) \STORENSADDRESS (BASE A) +\LEAF.IDLE? (SEQUIN) \SOFTCURSORUPCURRENT (N) TEDIT.ADD.STYLESHEET (SHEET) MSSETPHRASE (KNOWN TYPE) +\PUT.FILING.ATTRIBUTE (ITEM STREAM VALUE PROGRAM) BITMAPCREATE (WIDTH HEIGHT) OPT.PRATTACH (ITEM) +CH.RETRIEVE.ITEM (PROPERTY) OPENPRSTREAM (PRFILE OPTIONS) MSTRYSPELLTYPE (TYPE INTERP WORD) +CREATE.MONITORLOCK (NAME) \TEDIT.EXPANDFN (W) \GET.SESSION.HANDLE (STREAM) TB.DO.ITEM.SELECTION ( +WINDOW) \PRINTNSADDRESS (L BASE) PFI.ENQUEUE (FORM) FULLPRESSBITMAP (FILE PRSTREAM BITMAP +PRESSPAGEWIDTH PRESSPAGEHEIGHT) \FM.3STATE-SETUPOFFBITMAP (FONT SI::$PROG1-FIRST-EXPRESSION$ BOX +STREAM) PUPSOCKETNUMBER (PUPSOC) SEDIT::CONFLICTING-SELECTION? (SEDIT::CONTEXT) FB.HEADINGW.DISPLAY ( +WINDOW CLIP BORDER FBROWSER STREAM DEPTH RMARG) SEDIT::RELINEARIZE (SEDIT::DISPLAY-WINDOW-REGION +SEDIT::WIDTH SEDIT::BOTTOM-Y SEDIT::Y-1 SEDIT::Y-2 SEDIT::OLD-ACTUAL-WIDTH) FILES?1 (TYPE) +\GENERATEFILES (FDEV DESIREDPROPS OPTIONS) \LFVersions (UNPACKEDNAME STREAM TLIST A B) TB.MAKE.BROWSER + (PROPS WINDOWSPEC TITLE FONT LINESPERITEM BASELINE COLUMNS PRINTFN COPYFN CLOSEFN AFTERCLOSEFN +USERDATA HEADINGWINDOW LINETHICKNESS ITEMS FN) CL::%%MAKE-WORD-ACCESSOR (CL::OBJECT CL::OFFSET) +XIPTRACE (REGION FLG) IRM.LOOKUP (GRAPH KEYWORD TYPE WINDOW MONITORLOCK) \MONITORLOCK.DEFPRINT (LOCK +STREAM) MSHASHLIST (HTABLE PREVVALUE) ONEDINSPECT.ADJUSTSELECTION (WINDOW ROWPROPS VERTMARKS SELPROP +FETCHFN DATUM) MSHASHLIST1 (VAL KEY) \TEDIT.LARGERSEL (TEXTSTREAM TEXTOBJ SEL) EDIT4F (FF PAT0) XPROD +(X0 Y0 DX DY) \GENERATENEXTFILE (GENOBJ NAMEONLY) \TFBRAVO.WRITE.RUN (RUN TEXTOBJ PARALOOKS IN LOOKS) +COURIER.SKIP (TYPE STREAM PROGRAM BASETYPE NAMEANDTYPE WHICH) \FM.3STATE-SETUP ( +SI::$PROG1-FIRST-EXPRESSION$ REGIONS) SEDIT::CLOSEFN (SEDIT::WINDOW) \GENERATEFILEINFO (GENOBJ +ATTRIBUTE) COMPILER::ALPHA-MV-PROG1 (COMPILER::FORMS COMPILER::VALS-USED) MAYBE.PRETTYFILEINDEX ( +FILENAME PRINTOPTIONS) TOPW.ADJUSTSELECTION (WINDOW MAINWINDOW SELCOLPROP COLUMNPROPS HORZMARKS) +\LFCASEARRAYFETCH (CHARCODE) \PROCESS.RELEASE.LOCKS (P) \WRITEPRESSBITMAP (BM PRSTREAM PRDATA XPOS +YPOS STREAM W WW HT) EDITCONT (FLG LC2) \PFGetMarkerPage (index frame) \GETFILENAME (RECOG) +\SPP.RELEASE.ACKED.PACKETS (ACKNO MAXACKNO POOL) TB.DO.UNLESS.BUSY (WINDOW BROWSER FN) +\GENERIC.OUTFILEP (DEV NAME) \LOADNSADDRESS (A BASE) FB.SETNEWPATTERN (PATTERN) PACKFILENAME (N X BLIP +) SEDIT::PRINT-STRING (SEDIT::WINDOW SEDIT::STR STREAM SEDIT::ESC-CHAR) \MAKE.PROCESS1 (TOP) REBREAK ( +FN) FB.STARTUP (BROWSER COMMANDMENU FN) \PROCESS.MOVEFRAME (OLDFRAME) COURIER.WRITE.FAT.STRING (STRING + CORE STREAM W) CL::%%MAKE-BIT-ACCESSOR (CL::OBJECT CL::SIZE CL::OFFSET CL::WORD-OFFSET) +CALL.MOVENODEFN (GRAPH NODE NEWPOS WINDOW OLDPOS) \TEDIT.MAINW (TEXTSTREAM TEXTOBJ) +\READNUMBER.FLASHAREA (WIN LFT BTM WDTH HGHT) \OPENFILE (ACCESS PARAMETERS RECOG STREAM-FDEV) +COMPILER::COMPILE-FILE-DEFINEQ (COMPILER::DEFN COMPILER::FORM) \LEAF.OPENERRORHANDLER (PUP SEQUIN) +\SPP.HANDLE.ATTN (CON XIP BYTE DSTYPE) \DO.PARAMS.AT.OPEN (PARAMETERS FN ACCESS) \IOMODEP (STREAM +NOERROR) CH.DELETE.SELF (STREAM PROPERTY) MSLISTSET (SET TYPE) \GETKEY (\KEYBOARDWAITBOX) +TEDIT.PUSH.STYLESHEET (SHEET) \PROCESS.DEFPRINT (PROC STREAM) \ENQUEUE.TIMER (TIMER) +TB.REDISPLAY.ITEMS (REGION) \TTYBACKGROUND (X) MAKEMAINWINDOW (MAINWINDOW) PRETTY-TYPE-NAME (TYPESPEC +OTHER NAME X) \DRAWELLIPSE.PRESS (PRSTREAM CENTERX COSOR SEMIMAJORRADIUS CENTERY SINOR SEMIMINORRADIUS + BRUSH DASHING) \GETSYSBUF (R) \IMAGEUSERPROP (PROP VAL) SETFILEINFO (ATTRIB VALUE) GETRELATION ( +RELATION ITEM TABLE) ICMLARRAY.GETMENUWGROUP (FONT CMLARRAY DISPLAYEDLEVELS BFONT DIMS PHEIGHT) +LISTHARD (SET TABLE) \DRAWLINE.PRESS (X1 Y1 X2 Y2 WIDTH OPERATION PRSTREAM COLOR) \VFMSplit (splitKey +splitLevel keyStone page) \TEDIT.ITALIC.CARET.OFF (TEXTOBJ TEXTSTREAM SEL) \STRINGWIDTH.IP (STRING +STREAM RDTBL) CHANGECALLERS (AS-TYPES OLD NEW) \NSRANDOM.RELEASE.IF.ERROR (SESSION HANDLE) +\NSYSBUFCHARS (R W) \COURIER.RECORDTRAN (ARGS OP FIELD) COMPILER::ALPHA-MACROLET (COMPILER::BINDINGS +COMPILER::NEW-ENV COMPILER::MACRO) SEDIT::SCAN-FOR-BOUNDS (SEDIT::LINE) CHOOZ1 (NC1 NC2 SC) +\SAVESYSBUF (CH) OPT.SKIPPUSH (CD) CL::%%MAKE-ARRAY-ACCESSOR (CL:VECTOR CL::OFFSET) +\PFPutLogicalVolumePage (vol frame) COURIER.WRITE.SEQUENCE.UNSPECIFIED (TYPE STREAM W FIXP PROGRAM) +HARDCOPYW (WINDOW/BITMAP/REGION HARDCOPYTITLE) BESTNSADDRESS (ADDR) MSSETWORDTYPE (WORD TYPE SYN) +COMPILER::MAYBE-REMOVE-COMMENTS (COMPILER::FORM) \FM.TOGGLE-CHANGESTATE (SI::$PROG1-FIRST-EXPRESSION$) + \PROCESS.INIT (DONTRESET) INSPECT.INVERTSELECTION (WINDOW) \DSPOPERATION.IP (IPSTREAM) +\ADD.ROUTING.TABLE.ENTRY (ENTRY) %%DESTRUCTIVE-RESULT-VECTOR (VECTOR RESULT START) MOUSECHORDWAIT ( +MSECS) \RENAMEFILE (NEW-DEVICE) FB.SET.BROWSER.TITLE (BROWSER) \TEDIT.SETDEFAULT.FROM.SEL (TEXTSTREAM +SEL LOOKS) FIXSPELL2 (X) \ALLOCLOCKED (NCELLS BLOCK) FILEPKGTYPE (N) ICMLARRAY.GETREGIONFN (WINDOW +STATE) MSMEMBSET (SET ITEM) KEYACTIONTABLE (X) \DRAWCURVE.PRESS (PRSTREAM BRUSH KNOT CLOSED) +\GET.FILING.ATTRIBUTE (STREAM ATTR PROGRAM) MOVEATTACHEDWINDOWTOPLACE (MAINW ATWIN) OPENPUPSOCKET ( +SKT# IFCLASH) \NUMBERPAD.READER.CLOSEFN (WINDOW) CH.ADD.SELF (STREAM PROPERTY) +COMPILER::COMPILE-FILE-SETF-SYMBOL-FUNCTION (COMPILER::FORM COMPILER::NAME-FORM COMPILER::FUNCTION-FORM +) \FM.TOGGLE-SELECTEDFN (ITEM) SEDIT::BUTTONEVENTFN (WINDOW) FB.DISPLAY.COUNTERS (COUNTERW +COUNTERWIDTH SECTIONWIDTH COUNTERFONT TOTAL DEL TOTALPAGES DELPAGES THRESHOLDWIDTH HEIGHT) +\PROCESS.EVENTFN (EVENTNAME) \TEDIT.ITALIC.SEL.OFF (TEXTSTREAM TEXTOBJ SEL) PFI.NEW.LISTFILES1 ( +FILENAME PRINTOPTIONS) TOPW.BUTTONEVENTFN (WINDOW MAINWINDOW P) \PAGED.REVALIDATEFILELST (DEVICE FN) +FB.COPY/RENAME.COMMAND (FBROWSER CMD MOVEFN OLDNAME) \PFVolumeNumber (vol) CL::%%MAKE-POINTER-ACCESSOR + (CL::OBJECT CL::OFFSET) CHECKSYNONYM (X) \PRINT-REVALIDATION-RESULT (STREAM RESULT) OPT.ONLYMEMB (X) +\LFFindDirHole (UNAME DIRSTREAM BYTES) \KEYBOARDEVENTFN (EVENT X) CL::%%MAKE-ACCESSOR-CLOSURE (CL::SLOT +) RESTOREMAP (STREAM) \DELETECH (CHLIM CH# \INFIRSTCH LEN TEXTLEN PCNON) KEYACTION (KEYNAME TABLE NUMB +) FB.COPYTEXTCOMMAND (BROWSER) BREAK.PROCESS (PROC P) \TEDIT.SHOWCARETLOOKS (TEXTOBJ TEXTSTREAM LOOKS) + \FM.TOGGLE-DOWNFN (ITEM WINDOW) \KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS (CAPS-LOCK-ACTIONS) +PFI.PRINT.BITMAP (BM) SEDIT::FIND-NTH-STRUCTURE (SEDIT::CONTEXT) \PAGED.REVALIDATEFILES (LIST FN +DEVICE) ICMLARRAY (CMLARRAY RANK LESS1RANK DISPLAYEDLEVELS WHERE FONT) MSINTERPA (KEY) +FB.CREATE.FILEBUCKET (BROWSER NAMELENGTH CHAR FILEINFO) TEDIT.STYLESHEET (SHEET) COPY (VAL) LOADPOLY ( +A B C D) \LFDirectorySearch (CHARLIST KINDOFMATCH) \GETBRUSHFONT.PRESS (LIST1) +ONEDINSPECT.PRINTELEMENT (BOTTOM SUB1DESCENT WINDOW ELT) DEFAULTMENUHELDFN (ITEM) +\GET.COURIER.DEFINITION (NAME TYPE PROGRAM) \BUFFERED.REVALIDATEFILELST (DEVICE FN) SETSPELLCASE (X Y) + MEMBTONODES (TONODES TOND) NUMBERPAD.READ (NUMBERPAD/READER) \TRUNCATEFILE (STREAM LASTPAGE +LASTOFFSET) COMPILER::PROCESS-FORMS (COMPILER::PROCESS-ENTIRE-FILE) \FM.TOGGLE-SETUP ( +SI::$PROG1-FIRST-EXPRESSION$ REGIONS) \FILE-CONFLICT (NAME DEVICE FILENAME ACCESS EXISTING-ACCESS-MODE +) MENU (MENU POSITION) SEDIT::SHOW-CARET (SEDIT::CONTEXT) MB.NWAYMENU.NEWBUTTON (OLDBUTTON BUTTON +ARBITRATOR TEXTOBJ CH#) OPT.DELETEFRAMECHECK (F) /RPLNODE (A D) FONTNAME.IP (FONTDESC) \PFNewPages ( +group vol startSize) COURIER.WRITE.SEQUENCE (TYPE STREAM PROGRAM W X) CL::%%MAKE-LIST-ACCESSOR ( +CL::OFFSET LIST) \PFGetLogicalVolumePage (vol frame) \PROCESS.MAKEFRAME0 (FN&ARGS FRAME FN ARGS) +TB.ITEM.FROM.YCOORD (BROWSER YPOS N) ALISTS.WHENCHANGED (NAME VARTYPE NEWFLG) \LOOKUPPUPNUMBER (SOC +NSNUMBER) ShowIntervals (vol intervalCache Number Start) FB.COPYBINARYCOMMAND (BROWSER) CLISPFOR0 (EXP + LC PTRS UNDOLST) TEDIT.PARALOOKS (SEL LEN SPEC) \TEDIT.DEFAULTSSEL (TEXTSTREAM SEL) ADDSPELL2 (WORD +SPLST) \RESETKEYBOARD (KEYNUMBER) IMAGEOBJCREATE (IMAGEFNS OBJECTDATUM) \NOFILESINFOFN (GENSTATE +ATTRIBUTE) FILEPKGCOMPROPS (PROPS Y) MSGETBLOCKDEC (FILES TYPE) FB.INSERT.FILE (BROWSER FILE TBROWSER +ITEM FBSORTFN FD1 FD2 MYDATA) TOLINKS (NODE) \ENDPAGE.PRESS (PRSTREAM ELSTREAM) \FILINGHANDLE.DEFPRINT + (HANDLE STREAM) \DRAWCURVE.PRESS.LINE (BRUSH X1 X2 Y1 Y2 PRSTREAM) FLUSHRIGHT (FILE X MIN) DINFO.FIND + (DINFOW BUTTONS TEXTSTREAM) PPROC1 (PROC FILE) PPROC (FILE NOW) BCOMPL3 (FILES) GRAPHADDLINK (GRAPH +FROM TO WINDOW) GETWINDOWPROP (PROP) CH.DELETE.PROPERTY (PROPERTY) MSINTERPRETSET (OP OTHERSET HTABS X + FILE Y MSVERB OS) INFILEP (FILE) \PRESSCURVE2 (BRUSHFONT PRSTREAM PRDATA SPLINE DASHING X0 Y0 %#KNOTS + XPOLY X'POLY X''' X'' X' X YPOLY Y'POLY Y''' Y'' Y' Y) \KEYACTION1 (TABLE TI ACTION X PAIR) +PACKFILENAME.STRING (N X BLIP) COMPILER::COMPILE-ONE-LAMBDA (COMPILER::DEFN COMPILER::NAME COMPILER::TREE +) \KEYNAMETONUMBER (KEYNAME) GRAPHBUTTONEVENTFN (WINDOW GRAPH LEFTFNOFNODE MIDDLEFNOFNODE NODELST DS) +CLISPIFY2B (X) FULLNAME (X) PPROCRESHAPEFN (WINDOW OLDCONTENTS REGION) \TEDIT.DEFAULTS.CARET ( +TEXTSTREAM TEXTOBJ SEL) RCOMP3 (DEF FN) SCROLLBYREPAINTFN (WINDOW DSP EXTENTUSE) CL::CACHE-SLOT-INFO ( +CL::ACCESSOR CL::PS) \CANONICALIZE.NSADDRESS (NSADDR) \FIXDLINES (CH#LIM CH#1 CH#1L DCH) KEYBOARDTYPE +(MT) MSPATHSPRINTFN (FN) MAKE-UNICODE-TRANSLATION-TABLES (MAPPING LTORARRAY P RTOLARRAY) IMAGEFNSP (X) + PPROCREPAINTFN (WINDOW) SASSOC (KEY) COURIER.WRITE.STRING (STREAM LENGTH) GETFILEINFO (FILE ATTRIB) +\COURIER.TYPE.ERROR (TYPE ITEM) SPLITKEY (KEY) \FILE.NOT.OPEN (X) \EP.PUT.AUX (PKT KEY PLIST CELL) +FEDITFINDP (AT LST) \FILE.WONT.OPEN (X) SEDIT::MAP-FONT (SEDIT::FONT SEDIT::ENV) OPT.FRAMEVAR (F X) +\ILLEGAL.DEVICEOP (N) \LFFileName (UNPACKEDNAME CHARLIST VERSION) DINFO.LOOKUP (DINFOW BUTTONS) +\IS.NOT.RANDACCESSP (N THING) PPROCEXTENT (WINDOW H) \LFMakeDirHole (DIRSTREAM DIRSIZE WHERE HOLESIZE) + HARDCOPYIMAGEW.TOPRINTER (W IMAGETYPE) TB.ITEM.VISIBLE? (BROWSER ITEM BOT CLIP) DINFO.ADD.FMENU ( +WINDOW) DSPFILL (STREAM TEXTURE OPERATION) MB.NWAYBUTTON.SELFN (SEL OBJ BUTTONIMAGES BUTTONWIDTHS +BUTTONY BUTTONX BUTTONLIST BUTTONHEIGHT MOUSEX MOUSEY W OLDSTATE) SHIFT.BITMAP.UP (BITMAP WIDTH HEIGHT + NBITS) SETHASHSTATUS (HASHFILE) RESHAPEBYREPAINTFN (WINDOW IMAGEREGION DSP OLDWIDTH OLDHEIGHT +NEWSCREENREGION OLDIMAGE) COMPILER::COMPILE-AND-DUMP (COMPILER::NAME COMPILER::KIND COMPILER::DEFN) +\NSPRINT.FULL.REQUEST.STATUS (ID) COMPILER::ALPHA-LABELS (COMPILER::*ENVIRONMENT* COMPILER::BINDING +CL:LABELS COMPILER::STRUCT COMPILER::BINDINGS) COMPILER::ALPHA-LAMBDA-LIST (COMPILER::BINDER COMPILER::AUX +) COMPILE1 (FN COREFLG) \FM.MOMENTARY-SELECTEDFN (ITEM WINDOW) CL::ESTABLISH-ACCESSORS (CL::PS CL::SLOT +) \HANDLE.NS.ROUTING.INFO (XIP HOSTBASE TABLE MASK RADIUS) \TEDIT.DELETE (STREAM TEXTOBJ CH# CHLIM) +PROCESS.STATUS.WINDOW (P PROCS WINDOW) DINFO.DEFAULT.MENU (DINFOW) \FM.MOMENTARY-SETUP ( +SI::$PROG1-FIRST-EXPRESSION$) \PARAS.IN.SEL (TEXTOBJ PC) MB.NB.PACKITEMS (WIDTH SPACING) +RIGHTW.ADJUSTSELECTION (WINDOW MAINWINDOW ROWPROPS VERTMARKS SELROWPROP ROWPROPSPACE) OPT.FRAMEDEL (F +FRM X VR F2) SHADEITEM (SHADE MENU NEWSHADE) \NSFILING.GETFILE (DEVICE FILENAME PARAMETERS RECOG LOCK) + \LFMakeLeaderPage (Info TYPE CurrentTime file fileName Author) REPLACEHASHKEY (HASHFILE HASHKEY INDEX + VALUE) \PFTransferPage (buffer label absoluteDiskAddress mode) \CURVE2 (DASHLST DISPLAYSTREAM BRUSH +SPLINE DISPLAYDATA A XPOLY X/PRIME/POLY YPOLY Y/PRIME/POLY D3XFACTOR D3YFACTOR DDDX/PER/SEG +DDDY/PER/SEG) HARDCOPYIMAGEW.TOFILE (W) \GETCHARCODE (C X) OPT.CLEANFRAME (FRAME AVOIDING) +\LFMakeDirEntry (UNAME NC DirStream POS STREAM W C) EDIT4E1 (X) MAKEHASHKEY (KEY RANGE) ADDMENU ( +DONTOPENFLG) \FILINGSESSION.DEFPRINT (STREAM SESSION) HARDCOPYIMAGEW (W) TB.RESHAPEFN (WINDOW BROWSER +OLDIMAGEBM OLDREGION REGION) \DRAWPOLYGON.IP (IPSTREAM POINTS BRUSH IPDATA HALFWIDTH) WIDTHIFWINDOW ( +INTERIORWIDTH BORDER) \FM.CLEARITEM (WINDOW ITEM) \GET.COURIER.TYPE (PROGRAMNAME TYPENAME) +GETBOXPOSITION (BOXWIDTH BOXHEIGHT ORGX ORGY WINDOW PROMPTMSG) DEFINEFONT.IP (IPSTREAM FONT IPDATA) +SKOR0 (TWORD NCTWORD NCXWORD NDBLS LST) \CLOSEF.PRESS (PRSTREAM PRDATA STREAM W DDFILEPTR) BCOMPL2 ( +DONTCOMPILEFNS ENTRIES) FB.CANONICAL.DIRECTORY (FBROWSER PWINDOW OLDTTYPROC OLDTTYSTREAM DIRNAME CMD) +CL::DEFINE-ACCESSORS (CL::PS CL::SLOT) DASHES (MARKER) HEIGHTIFWINDOW (INTERIORHEIGHT BORDER) +\DRAWARC.PRESS (STREAM CENTERX CENTERY RADIUS STARTANGLE NDEGREES BRUSH DASHING) STANDARDEDITE (EXPR +COMS ATM TYPE IFCHANGEDFN) TEDIT.INSERT (TEXTOBJ) COMPILER::COMPILE-AND-DUMP-1 (COMPILER::NAME COMPILER::DEFN +) \CREATECHARSET.PRESS (CHARSET) FB.EDITCOMMAND (BROWSER OPTION ITEM MENU KEY) COMPILER::ALPHA-IL-FUNCTION + (COMPILER::FN) MSPATHS4 (FROM Y) \FM.INSUREVISIBLE (WINDOW ITEM) \TEDIT.CENTER.SEL.REV (SEL TEXTOBJ +TEXTSTREAM PARA SAVECH# SAVEDCH) CL::\OPENSTREAM-WITH-DEFAULT (CL::FILENAME) RIGHTW.BUTTONEVENTFN ( +WINDOW MAINWINDOW P) OPT.FRAMELOCAL (F) \PSWOP.SELECTED (ITEM P BUTTON MENU \DurationLimit) +\NSFILING.CLOSE.HANDLE (SESSION HANDLE) \LFDWIN (FILE) \PFGetPhysicalVolumePage (buffer) \PSW.SELECTED + (ITEM MENU) MASTERSCOPEXEC (X) SPLIT89 (N) FB.MAKE.BROWSER.BUSY (BROWSER DONTWAIT MENU) COMPILER::ALPHA-IF + (COMPILER::PRED-FORM COMPILER::THEN-FORM COMPILER::ELSE-FORM) SEDIT::TRY-REUSING-BITS (CL:BLOCK +SEDIT::CONTEXT SEDIT::WIDTH SEDIT::END SEDIT::ASCENT SEDIT::DESCENT SEDIT::NEW-X) PRESSBITMAP (FILE +PRSTREAM BITMAP PRESSPAGEWIDTH PRESSPAGEHEIGHT) CL::PROCESS-ACCESSORS (CL::PS) XIPAPPEND.IFSSTRING ( +XIP STRING OFFST) \FDEVINSTANCE (FDEV STREAM ATTRIB CDNAME ACCESS RECOG OTHERINFO FIRSTPAGE BUFFERLIST + ATTRIBUTE VALUE LASTPAGE LASTOFFSET NAME OLDSTREAM BYTE NOERRORFLG INDX BASE OFFSET NBYTES) +SHIFT.BITMAP.DOWN (BITMAP WIDTH HEIGHT NBITS) NCREATE2 (NTYPX OLDOBJ NEW DTD) COMPILER::CONSTANT-EXPRESSION-P + (COMPILER::FORM COMPILER::FN COMPILER::S-E-DATA) \FTP.RENAMEFILE (OLD-DEVICE NEW-DEVICE OLDFILE) +\PRESS.CONVERT.NSCHARACTER (CHARCODE) \NSFILING.GENERATEFILES (PATTERN DEVICE DESIREDPROPS SCOPE +INFINITE.DEPTH OPTIONS) \DRAWCIRCLE.PRESS (RADIUS CENTERX CENTERY R2RAD BRUSH DASHING STREAM) ESUBST1 +(X) CNDIR (NEW-DEFAULTS TEMP-DEFAULTS) EDITFINDP (X) CL:PATHNAME-DIRECTORY (PATHNAME) HEADINGOP.IP ( +IPSTREAM) UNMARKASCHANGED (NAME CHANGED) CL:PATHNAME-DEVICE (PATHNAME) EDITL (L COMS ATM MESS +EDITCHANGES) \BITMAPSIZE.PRESS (DIMENSION BITMAP) CL:PATHNAME-HOST (PATHNAME) DEDITE (EXPR) +INSERTHASHKEY (HASHFILE HASHKEY INDEX VALUE) \HLSVALUEFN (MIN MAX) ONEDINSPECT.PROPWIDTH (PROPS FONT) +\HANDLE.RAW.3TO10 (TYPE) WFROMMENU (MENU) MSONPATH (SETREP X SEEN TOPFLG) FIXATOM2 (X) EDITFA (TYPE +DEF) DWIMIFY1 (FORM) DIRECTORYNAME (HOST CREATE?) SEDIT::SHIFT-BLOCK (SEDIT::CURRENT-LINE SEDIT::Y +SEDIT::DESCENT SEDIT::CURRENT-LINE-BOTTOM SEDIT::REPAINT-START SEDIT::START SEDIT::NEW-X SEDIT::X +SEDIT::END SEDIT::WIDTH) ADDSPELL1 (WORD) KEYDOWNP (\BitMask BASE \ByteNo OFFST POSITIONA0374 KEYNAME) + TWODINSPECT.COLUMNWIDTH (COLUMNPROP FONT ROWPROPS FETCHFN DATUM) OPT.MERGEFRAMEP (PARENT VARS FR) +KEYNUMBERP (X) HASHFILESPLST1 (HASHFILE KEY) CL::SETF-NAME (CL::ACCESSOR-NAME) XIPAPPEND.STRING (EPKT) + PROCESS.BACKTRACE (PROC FX CMD) CLIPBOARD-COPY-STREAM (OST) \TEDIT.COPY.PIECEMAPFN (FROMOBJ TOOBJ +TEXTOBJ) TTYINFOSTREAM (PROCESS) SEDIT::SELECT-NODE (SEDIT::CONTEXT SEDIT::NODE) PREEDITFN (TYPE ATM X + EDITCHANGES) \UPDATE.PROCESS.WINDOW (WINDOW) MSMATCHRATING (X Y CONJ) \FM.ENDEDIT (WINDOW FM.PROCESS +WAITFLG) LEAF.ASSURE.FINISHED (SEQUIN) MSPATHS1 (FROM FN X) FB.EXPUNGECOMMAND (FBROWSER TBROWSER ITEM) + \TEDIT.FOREIGN.COPY? (SEL SOURCE.TEXTOBJ) SEDIT::UNDO (SEDIT::PROMPTWINDOW) \DSPSCALE2.IP (IPSTREAM +Sx Sy) BAKTRACE (IPOS SKIPFN FLAGS EPOS) MODIFY.KEYACTIONS (KeyActions ITEM action table) +\DUMP.COURIERPROGRAMS (NAMES TAIL) CL:NAMESTRING (PATHNAME) SEDIT::REUSE-LINEAR-FORM (SEDIT::DELTA-X +SEDIT::DELTA-Y) SHIFT.BITMAP.LEFT (BITMAP WIDTH NBITS HEIGHT) EDITFERROR (FN FLG) EDITDEF.FNS (NAME +EDITCOMS OPTIONS) DIRECTORY (FILES) METASHIFT (FLG METASTATUS) \CHARWIDTH.PRESS (STREAM FONTDESC) +DSPSCROLL (DISPLAYSTREAM) RESHAPEALLWINDOWS (MAINW NEWREGION NEWWIDTH NEWHEIGHT) EDITF2 (EXPR ATM) +SHIFT.BITMAP.RIGHT (BITMAP WIDTH NBITS HEIGHT) COMPILER::SET-UP-BLOCK-DECLS (CL:HASH-TABLE) +\FM.CHANGESTATE (X WINDOW NEWSTATE) DISPLAYLINK (G TOND FRND TRANS LINEWIDTH STREAM PARAMS) CLISPIFY2A + (FORM) ATTACHEDWINDOWS (WINDOW AWS) SHIFTDOWNP (SHIFT) MB.NB.SIZEFN (OBJ RIGHTMARGIN SLACK MAXWIDTH +MINHEIGHT BUTTONWIDTHS SPACING MINWIDTH MAXHEIGHT BUTTONHEIGHT) OPT.NONILVAR (CD FR V) GETPROBE (KEY) +FB.MAYBE.EXPUNGE (BROWSER COMMAND) MSPATHS2 (FN) DIRECTORYNAMEP (DIRNAME DN) TEDIT.DELETE (STREAM LEN +LEAVECARETLOOKS TEXTOBJ) EDITDEF (NAME EDITCOMS OPTIONS) OPT.FRAMEMERGE (F) HOSTNAMEP (NAME) +\LFGenFileID (vol) EDITF1 (EXPR COMS ATM TYPE IFCHANGEDFN) GETHASHKEY (HASHFILE INDEX HKEY RANGE) +CL::CACHE-PREDICATE-INFO (CL::PREDICATE) \VFMContextSet (vol) MEMB (X) \DSPTRANSLATE.IP (IPSTREAM Tx +Ty) FB.FINISH.COMMAND (W MENU) \VFMGetInterval (volNum intervalArray) DINFO.WRITE.GRAPH (GRAPH FILE) +ATTACHWINDOW (MAINWINDOW WINDOWTOATTACH WINDOWCOMACTION) SUBATOM (N M X) EXPRESSIONS.WHENCHANGED (EXPR + X) UNSAVEBLOCK? (FILE BLOCK FN X) SEDIT::NORMALIZE-SELECTION (SEDIT::CONTEXT SEDIT::SELECTION) +COMPILER::ALPHA-FUNCTIONAL-FORM (COMPILER::FORM) CHCON1 (X) TTY/EDITE (IFCHANGEDFN COMS ECHOFILE) +LOADDEF (NAME TYPE SOURCE) WRITE-UNICODE-INCLUDED (INCLUDECHARSETS MAPPING) UNPACKFILENAME.STRING ( +DIRFLG STA0395 ENDA0394 LEN DSTSTRING DSTBASE STA0397 ENDA0396 ST NAM CHAR STA0399 ENDA0398 STA0401 +ENDA0400) MSNEEDUNSAVE (MSG) EDITDEFAULT1 (X) \BLTSHADE.PRESS (DESTINATIONLEFT DESTINATIONBOTTOM WIDTH + HEIGHT REGION TEXTURE STREAM OPERATION) \BACKPEEKBIN (STREAM) DECODE-NS-STRING (STR OFFSET LENGTH +LASTOFFSET BASE FATSTR) \VFMKillBuffer (VOLPAGENUM) EDITH (C) PRINTBINDINGS (AT) \BACKBIN (STREAM) +PUPNET.DISTANCE (NET#) RETDWIM3 (X M1 N1) EDIT* (L N X) ADD/AND/DISPLAY/LINK (TOND FROMND G WIN) +\DRAWARC.GENERIC (NDEGREES CENTERX CENTERY RADIUS STARTANGLE BRUSH DASHING STREAM) \COURIER.GETDEF ( +TYPE NAME) BIN (STREAM) SEDIT::RECOMPUTE-FORMAT-VALUES (SEDIT::NODE SEDIT::SUBNODE SEDIT::CONTEXT) +\NSPRINT.WATCH.JOB (PRINTRESULTS PRINTER JOBNAME) APPLYTOSELECTEDNODE (WINDOW) COMPILER::ALPHA-GO ( +COMPILER::TAG COMPILER::DEST) SHRINKW (TOWHAT ICONPOSITION EXPANDFN) \BINS (BASE OFF NBYTES) +\FM.HIGHLIGHTITEM (WINDOW ITEM) EDLOC (EDX OLDL OLDF) FB.MAYBE.INSERT.FILE (FBROWSER ATTR CMD) +\SPP.INFO.HOOK (BUTTON PROC) BOUT (BYTE STREAM) SEDIT::WALK-UP-TREE (SEDIT::FN SEDIT::NODE SEDIT::CONTEXT +) \FM.CHANGELABEL (NEWLABEL NEWDESC LEFT BOTTOM FONT SI::$PROG1-FIRST-EXPRESSION$) EDOR (L) +MB.NB.WHENOPERATEDFN (OPERATION OBJ STATE DS) TWODINSPECT.SETELT (WINDOW ROWPROP COLUMNPROP PRTWINDOW) + MOVEW (WINDOW POSorX Y FORCE) \BOUTS (BASE OFF NBYTES) XIPAPPEND.WORD (WORD) \PFFindFileSize (file) +EDITRAN (C X Y %#1 %#2 %#3 L0) FIND1STPRIME (N) \MAIKO.INPUT.INTERRUPT (NDB TYPE) \VFMGet (getLevel +getKey) %%EXTEND-ARRAY (NEW-ARRAY DIMENSIONS BASE TYPE-NUMBER TOTAL-SIZE FILL-POINTER) \LFCheckBang ( +DIRSTREAM) EDITTO (LC2 L FLG) ONEDINSPECT.REPAINTFN (WINDOW VERTMARKS ROWPROPS TOP BOTTOM FETCHFN +DATUM DESCENT) \DEFAULTSTATE.IP (IPSTREAM) %%ARRAY-CONTENT-INITIALIZE (ARRAY INITIAL-CONTENTS DIMS) +\QUEUELENGTH (Q) \INIT.KEYBOARD.STREAM (MODE) \ONQUEUE (Q ITEM) COMPILER::ALPHA-FUNCTION (COMPILER::FORM +) \COURIER.PUTDEF (TYPE DEFINITION) COPYBYTES (SRCFIL DSTFIL START SRC DST) SEDIT::PAINT-TO-END-OF-LINE + (SEDIT::CONTEXT SEDIT::THIS-LINE SEDIT::BLANK-FROM SEDIT::LINEAR-END) \PAPERSIZE.IP (PSIZE) EDITCOM ( +C) \ADD.PACKET.FILTER (FILTER) CL:ADJUST-ARRAY (ADJUSTABLE-ARRAY RANK NELTS +ADJUSTABLE-ARRAY-ELEMENT-TYPE DISPLACED-TO DISPLACED-INDEX-OFFSET DISPLACED-TO-BASE FATP NEW-ARRAY +INITIAL-CONTENTS INITIAL-ELEMENT) \GETEOFPTR (STREAM) SEDIT::UNDO-REPLACE-QUOTE (SEDIT::NODE SEDIT::CONTEXT + SEDIT::OLD-VALUE) DEFAULT.EDITDEF (NAME TYPE) EDRPT (EDRX) \MAIKO.10MBWATCHER (MESSAGE-BUFFER NDB) +\SCALEDBITBLT.PRESS (DESTINATION DESTINATIONLEFT OLDX DESTINATIONBOTTOM OLDY SOURCEBITMAP SCALE +CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM WIDTH HEIGHT) \BUFFERED.COPYBYTES (DST DEV NOERRORFLG) EDITELT ( +LC) \NSFILING.PARSE.FILENAME (FILENAME NC) \DEL.PACKET.FILTER (FILTER) \POPSTATE.IP (IPSTREAM State) +RANDACCESSP (FILE STREAM) \NSFILING.COMPOSE.PATHNAME (DIRPATH DIR) EDITMAC (C) FB.PRINTFN (TBROWSER +ITEM WINDOW FDATA STREAM FILENAME END BASE FBROWSER FONT) DREAD (PROMPT) CLISPLOOKUP (WORD $VAR1 $VAR2 + $LISPFN) \SETFILEPTR (STREAM INDX) INSPECT/AS/RECORD (INSTANCE WHERE) EDIT!UNDO (PRINTFLG) +%%ALTER-AS-DISPLACED-TO-BASE-ARRAY (DIMENSIONS ELEMENT-TYPE FATP DISPLACED-TO-BASE FILL-POINTER +TYPE-NUMBER DISPLACED-INDEX-OFFSET TOTAL-SIZE) CL:ADJUSTABLE-ARRAY-P (ARRAY) CHANGERECORD (RNAME +RFIELDS F) EDITCOMA (UNDOLST UF) DPRIN1 (STR) \DSPXPOSITION.PRESS (PRSTREAM) COPYCHARS (SRCFIL DSTFIL +SRCSTRM DSTSTRM CNT) CURSORPROP (X) \INCHAR (EOLCA0806 CHA0807 STREAM BYTECOUNTVAR BYTECOUNTVAL EOLC) +POP-IP-STACK (IPSTREAM) GETCURSORPROP (CURSOR PROP) WRITE-UNICODE-MAPPING-FILENAME (FILE CSETINFO +RANGES) PUTCURSORPROP (PROP) EDITSAVE (COM) FUNCTIONSMSMC (NAME TYPE REASON) UNDOEDITCOM (X) +CL::DEFAULT-PREDICATE-NAME (CL::STRUCTURE-NAME) XIPAPPEND.BYTE (WHERE BYTE) EDITCOM1 (LST X) +TEDIT.PROMPTPRINT (MSG) UNDOEDITCOM1 (X) FB.UPDATECOMMAND (BROWSER) EXTENDABLE-ARRAY-P (ARRAY) +SI::CANONICALIZE-ADVICE-SYMBOL (CL:SYMBOL) \COPYOPENFILE (DESTPARAMETERS INSTREAM NEWNAME) +SEDIT::UNDO-LIST-REPLACE (SEDIT::NODE SEDIT::CONTEXT SEDIT::BOUNDS SEDIT::REDOT?) TB.WINDOW (BROWSER) +\CURSORMASKPROPNAME (BITSPERPIXEL) OPENSTREAM (ACCESS RECOG OBSOLETE) OPT.FRAMEOPT (X F TRYXVAR) +\MAIKO.10MBSENDPACKET (X Y NDB TYPE) \CURSORIMAGEPROPNAME (BITSPERPIXEL) \CHANGE-VISIBLE-REGION.IP ( +VISIBLE-REGION FONT) %%COPY-TO-NEW-ARRAY (OLD-DIMS NEW-DIMS OLD-ARRAY OLD-OFFSET NEW-ARRAY NEW-OFFSET +SIZE) CL:ARRAY-HAS-FILL-POINTER-P (ARRAY) RETDWIM2 (X $TAIL) EDITSAVE1 (X) %%ALTER-AS-DISPLACED-ARRAY +(DISPLACED-TO DIMENSIONS FILL-POINTER TOTAL-SIZE) COMPILER::ALPHA-EVAL-WHEN (COMPILER::TIMES COMPILER::FORMS +) SEDIT::OUTPUT-STRING (SEDIT::NEW-LPTR) EDITSMASH (A D) CL:FILL-POINTER (VECTOR) OPT.SETDEFREFS (D V) + CLOSEF (FILE STREAM FN) \TEDIT.WINDOW.OPS (TEXTOBJ WINDOWTOSPLIT WINDOWOPREGION) \PFFindPageAddr ( +filePage) EDIT2F (N) DELETEHASHKEY (HASHFILE HASHKEY) MSSEEKTYPE (TYPE) PROGN (U) FUNCTIONSMSGETDEF ( +NAME SOURCE OPTIONS) EDIT4F1 (PAT) ARRAY-NEEDS-INDIRECTION-P (ARRAY) \FM.DISPLAYITEM (WINDOW ITEM) +EDITAPPEND (X) XIPAPPEND.CELL (CELL) DIRFILENAME (NAME) \LFDWOUT (FILE NUMBER) BITSPERPIXEL (BITMAP) +FB.REMOVE.FILE (ITEM TBROWSER FD1 FD2 FBROWSER) EDIT1F (C L) \TEDIT.BOLD.CARET.ON (TEXTOBJ TEXTSTREAM +SEL) EDITCOML (X UF) EDITFPAT1 (X NC) \COMPUTE.ARC.POINTS (NDEGREES ANGLESIZE RADIUS STARTANGLE +CENTERX CENTERY) \SPP.PROBE (CON) COPYFILE (DESTPARAMETERS) SEDIT::OUTPUT-SPACE (SEDIT::X SEDIT::NEW-LPTR +) SEDIT::VERIFY-STRUCTURE (CL:STRUCTURE SEDIT::CHECK-STRUCTURE) EDITBELOW (PLACE L) +SI::ADD-OLD-STYLE-ADVICE (SI::OLD-ADVICE) UNPACKFILENAME (FILE ONEFIELDFLG OSTYPE) +SEDIT::SUBNODE-CHANGED-QUOTE (SEDIT::NODE SEDIT::SUBNODE) EDITNCONC (Y) EDIT4F2 (NODE MATCH X) +\MAIKO.10MBSTARTDRIVER (MYNSNUMBER) %%DO-LOGICAL-OP (SOURCE DEST SOURCE-BASE SOURCE-OFFSET DEST-BASE +DEST-OFFSET SOURCE-SIZE SOURCE-OP LOG-OP) CLIPBOARD-PASTE-STREAM (OST) INSPECT/TYPERECORD (X WHERE) +TEDIT.DO.BLUEPENDINGDELETE (TEXTOBJ) EDIT4F3 (X) CL:ARRAY-DIMENSION (ARRAY DIMENSION DIMS RANK) +\FM.CPUTITEMPROP (PROP ITEM VALUE) BPNT (X) FB.COMPILECOMMAND (BROWSER COMPILEOP) BIT-ARRAY-P (ARRAY) +SEDIT::UPDATE (SEDIT::CONTEXT SEDIT::SELECTION SEDIT::WINDOW SEDIT::SCROLL?) TRANS.IP (IPSTREAM) +CURSORCREATE (IMAGE DATA) EDIT.RI (X M N) COPYDEF (OLD SOURCE OPTIONS NEW) OPT.DEFREFS (D) +\UFStoOtherCopyMess (INSTREAM OUTSTREAM EXTENSION) DIRGETFILEINFO (FILEGROUP ATTRIBUTE) \PFGetPage ( +file filePageNumber volumePageNumber frame runLength noBreak) \PUPNET.CLOSERP (X Y) \BITBLT.PRESS ( +DESTINATION DESTINATIONLEFT OLDX DESTINATIONBOTTOM OLDY SOURCEBITMAP CLIPPEDSOURCELEFT +CLIPPEDSOURCEBOTTOM WIDTH HEIGHT) STKPOS (N FRAMENAME OPOS) MAKEFILE1 (FILE COMPILER ROOTNAME +OTHERFILES OPTIONS) \VECFONTINIT (BRUSH WIDTHS) \CURSORUP (NEWCURSOR INVERTFLG) OPT.CODEFRAME (CD) +\INFER.FILE.TYPE (OLDEOF) FB.OPERATE.ON.FILES (FILELIST) CH.CREATE.ALIAS (ALIAS) \LFDirectoryScrambled + (DIRSTREAM) EDIT.LO (N) FB.COPY/RENAME.MANY (CMD FD1 FD2 MOVEFN) TEDIT.UNDO.PARALOOKS (TEXTOBJ +OLDLOOKSLIST CH# SEL) PRINTCONSTANT (VAR FILE CONSTANTLIST) \VFMGetBufferFor (VOLPAGENUM) +\CURSOR-VALID-P (CURSOR IMAGE HOTSPOT-X HOTSPOT-Y) BCOMPL.BODY (OPTIONSSET CFILE FILES STREAM DEFS X) +IP-TOS (IPSTREAM) COMPILER::ALPHA-COMPILER-LET (COMPILER::BINDINGS COMPILER::BINDING COMPILER::BODY) +\COURIER.DELDEF (TYPE NAME) \NSFILING.CONFLICTP (DEVICE SESSION HANDLE NAME ACCESS) +SEDIT::UNDO-REPLACE-ROOT (SEDIT::NODE SEDIT::CONTEXT SEDIT::OLD-VALUE) TRANSLATE.IP (IPSTREAM X Y) +EDIT.LI (N) \LOCATE.PUPNET (NET BUCKET) READVISE1 (FN NAME) SETFILEPTR (FILE ADR) +SEDIT::SUBNODE-CHANGED-LIST (SEDIT::NODE SEDIT::SUBNODE SEDIT::CONTEXT) CURSORP (X) MSSEEK-WORD (LST +WORD) CL::PS-NAME-SLOT-POSITION (CL::PS CL::SUPER-SLOTS) LISPXFIND0 (LST INDEX MOD) CHANGEVAR (NAME) +ASSOCGET (KEY ALST) TEDIT.SELECTED.PIECES (SEL PCTB CHLIM CH1 INSERTPC FNARG1 FNARG2) +ADJUSTCURSORPOSITION (DELTAX N WIDTH DELTAY) ONEDINSPECT.CLOSEFN (WINDOW) \TEDIT.CARET (CARETS) EOFP ( +STRM FILE) \TEDIT.CENTER.SEL (SEL TEXTOBJ TEXTSTREAM PARA SAVECH# SAVEDCH) EDIT.BO (N) +NSPRINTREQUEST.STATUS (PRINTER REQUESTID) COMPILER::ALPHA-COMBINATION (COMPILER::FN COMPILER::ARGS) +SEDIT::OUTPUT-BITMAP (SEDIT::BITMAP) CONVERT-AFM-FILES (FILE-LIST FNAME) WRITE-UNICODE-MAPPING ( +INCLUDECHARSETS) \TEDIT.SHOWSELS (TEXTOBJ SELN HOW ON) FORCEOUTPUT (WAITFORFINISH) \FM.PUTITEMPROP ( +PROP VALUE) ONEDINSPECT.BUTTONEVENTFN (WINDOW W P DATUM SELECTEDPROP) FB.GET.NEW.FILE.SPEC (CMD +OLDNAME) \FLUSH.OPEN.STREAMS (FDEV) EQUAL-DIMENSIONS-P (ARRAY-1 ARRAY-2 DIMS) ONEDINSPECT.COPYBUTTONFN + (WINDOW W P) DEFAULTMAKENEWCOM (TYPE NAME) EDIT.BI (M) OPT.CODELEV (CD LEV) \DSPYPOSITION.PRESS ( +PRSTREAM) MSSPLST (MEANING WORD) ACCESS-CHARSET (STREAM NEWVALUE) CHANGEI.S. (REASON NAME) +CURSORPOSITION (DISPLAYSTREAM N WIDTH) ONEDINSPECT.DEFAULT.VALUECOMMANDFN (SETMENU INSPECTMENU PROP +WINDOW) GETEOFPTR (FILE STREAM) GETLOCALDEC (EXPR FN) CURSORSCREEN (SCREEN) NSPRINTER.PROPERTIES ( +PRINTER) NUMBERPAD.HELDFN (ITEM) \DSPUNTRANSFORMY (Y DD) CL:CHAR (STRING INDEX) SI::ADVICE-ADDTOCOM ( +TYPE SI::COM SI::NAME) SEDIT::STRINGIFY-QUOTE (SEDIT::NODE SEDIT::ENVIRONMENT) COMPILER::ALPHA-CATCH ( +COMPILER::TAG COMPILER::FORMS) \DSPUNTRANSFORMX (X DD) /ASSOCPUT (KEY VAL ALST) MSWORD? (X) +VARIABLESMSGETDEF (NAME SOURCE OPTIONS) %%FAST-COPY-BASE (FROM-TYPENUMBER TO-TYPENUMBER FROM-BASE +BITS-PER-ELEMENT FROM-OFFSET TO-BASE TO-OFFSET CNT) EDITGETD (X FN EDITCHAIN) CL::PREDICATE-BODY (CL::PS +) \FILLINXIP (TYPE DESTHOST) COPY-ARRAY (FROM-ARRAY FROM-TYPE-NUMBER TO-TYPE-NUMBER) MSPATHS (FROM X +SEEN) \TEDIT.INSERT.PIECES (CH# TOPCTB TOLEN START-OF-PIECE) \TEDIT.CLOSEUPLINES (TEXTOBJ WINDOW +WWIDTH) \PFRemoveDirectoryID (vol rootDir type) SEDIT::UNDO-EVENT (SEDIT::CONTEXT SEDIT::SUBEVENT) +\TEDIT.BOLD.SEL.ON (TEXTSTREAM TEXTOBJ SEL) CL:BIT-NOT (BIT-ARRAY) \LEAF.LOOKUPCACHE (PAGE#) +CLISPIFYFNS (FNS X) COPY-VECTOR (FROM-VECTOR TO-VECTOR FROM-LENGTH TO-LENGTH START1 START2 +FROM-TYPE-NUMBER TO-TYPE-NUMBER SUBLEN1 SUBLEN2) \FILETYPE.FROM.TYPE (TYPE) CH.DELETE.OBJECT (STREAM) +CHANGEMACRO (REASON NAME TYPE) HASHFILEDATA (HASHFILE) TEDIT.UNDO.LOOKS (OLDLOOKSLIST \INPC CH# SEL) +GETFILEPTR (FILE STREAM) EDIT.BITMAP.REAL (BITMAP) \VFMLower (A B AFILE BFILE APAGE BPAGE) +\LOOKUPCOLORNAME (COLORNAME) DISPLACED-ARRAY-P (ARRAY) \ROUTE.PUP (NET HOST) \SETCLOSEDFILELENGTH ( +FILENAME STREAM NBYTES) TB.MAP.DELETED.ITEMS (BROWSER MAPFN) \NSRANDOM.CREATE.STREAM (OLDACCESS ACCESS + SESSION ATTRS LEN OLDATTRS) LASTMOUSEY (DS) FB.LOADCOMMAND (BROWSER LOADOP) \SETEOFPTR (STREAM LEN) +LASTMOUSEX (DS) WRITE-UNICODE-MAPPING-HEADER (STREAM LINE CSETINFO RANGES R) SI::ADVISE-CONTENTS (TYPE + SI::COM) SEDIT::STRINGIFY-LIST (SEDIT::NODE SEDIT::ENVIRONMENT) CH.CREATE.OBJECT (STREAM) +\FM.CGETITEMPROP (PROP) /ECHOCONTROL (CHAR) TEDIT.REDO.LOOKS (TEXTOBJ EVENT SEL NEWLOOKS) LISPXSTATE ( +NAME STATE) BOUT16 (STREAM N) \MACPEEKCCODEFN (STRM NOERROR) \VECSKIP (PRSTREAM DX DY) /SETSYNTAX ( +CLASS CH) PUPTRACE (REGION FLG) \PUSHSTATE.IP (IPSTREAM XVar# YVar#) BIN16 (STREAM) SIMPLE-COMPARE ( +START1 START2 LEN1 LEN2) CURSORHOTSPOT (NEWPOSITION) \NSPRINT.ENQUIRE (OP) \GENERIC.BINS (NBYTES BASE +STREAM) SEDIT::NEW-BLOCK (SEDIT::CONTEXT) GETMOUSESTATE (N WIDTH) OPT.RETMERGE (TEST TARGET END) +\GENERIC.BOUTS (NBYTES STREAM BASE) POSTSCRIPT.GETFONTID (FID SLOPE WEIGHT EXPANSION) +CL::ASSIGN-FIELD-DESCRIPTORS (CL::PS) SCAVENGEVOLUME (volName) %%MAKE-DISPLACED-ARRAY (DISPLACED-TO +DISPLACED-INDEX-OFFSET DIMENSIONS TOTALSIZE ELEMENT-TYPE FILL-POINTER READ-ONLY-P EXTENDABLE) +COURIERTRACE (REGION WINDOW) TB.ITEM.DELETED? (ITEM) %%GET-CANONICAL-CML-TYPE (ELEMENT-TYPE) +\ROUTE.XIP (NET X) \TEDIT.BOLD.SEL.OFF (TEXTSTREAM TEXTOBJ SEL) \FM.GETITEMPROP (PROP ITEM) MSVERB ( +TENSE) FB.SEEBUTTONFN (MENU MENUW ITEM WINDOW) SEDIT::TYPE-OF-INPUT (SEDIT::CONTEXT) BEEPON (FREQ) +\PFFindDirectoryID (vol rootDir type) ONEDINSPECT.DEFAULT.TITLECOMMANDFN (WINDOW TITLEMENU DATUM) +\NSFILING.CHECK.ACCESS (SESSION HANDLE RESULT TYPE) CLISPDEC0 (FN) NSPRINTER.STATUS (PRINTER) +READ-ONLY-ARRAY-P (ARRAY) SEDIT::LINE-FINISHED (SEDIT::THIS-LINE SEDIT::X) +TWODINSPECT.SELECTCOLUMNPROP (WINDOW TOPWINDOW COLUMNPROPS COLUMNPROP HORZMARKS) FIRSTATOM (X) +CHARMACRO (X) \PUPGATELISTENER (SOCKET TIMER) SEDIT::SET-SELECTION-QUOTE (SEDIT::INDEX TYPE SEDIT::ITEM + SEDIT::SELECTION SEDIT::CONTEXT SEDIT::NODE) FILL-ARRAY (ARRAY) MSMARKCHANGED (REASON NAME) +FB.COPYCOMMAND (BROWSER) TEDIT.REDO.PARALOOKS (TEXTOBJ EVENT SEL NEWLOOKS) CHANGESLICE (N) +SELECT.LIST.INSPECTOR (LST) \VFMMerge (leftInterval mergeKey mergeLevel rightInterval) +WITHOUT-INTERRUPTS (FORM) \TEDIT.BOLD.CARET.OFF (TEXTOBJ TEXTSTREAM SEL) DISPLAYDOWN (NSCANLINES FORM) + CL:SCHAR (SIMPLE-STRING INDEX) SEDIT::SUBNODE-CHANGED-ROOT (SEDIT::CONTEXT) \GETINTERNALCLOCK (BOX +CLOCKOFFSET) ETHERHOSTNAME (OPUP SOC) OPT.RETTEST (TEST TARGET) CL:SIMPLE-VECTOR-P (VECTOR) CL:ERROR ( +CL::DATUM CL::ARGS XCL:*CURRENT-CONDITION* ERRORPOS) \CREATEPRESSFONT (DEVICE FAMILY PSIZE FACE +ROTATION FD) \LEAF.REQUESTPAGE (PAGE#) SCAVENGEDSKDIRECTORY (volName vol) CL:SIMPLE-BIT-VECTOR-P ( +VECTOR) COURIER.READ.STRING (STREAM LENGTH STRING BASE OFFSET) \TEDIT.HISTORYADD (EVENT OETYPE ETYPE +OSTART NSTART OLDEND NEWEND) TB.ITEM.SELECTED? (ITEM) TWODINSPECT.SELECTROWPROP (WINDOW RIGHTWINDOW +ROWPROPS ROWPROP VERTMARKS ROWPROPSPACE) OPT.RETOPT1 (L X Y) CL:SVREF (CL:SIMPLE-VECTOR INDEX) +%%MAKE-GENERAL-ARRAY (ELEMENT-TYPE FATP DISPLACED-TO TOTAL-SIZE TYPE-NUMBER READ-ONLY-P DIMENSIONS +ADJUSTABLE-P FILL-POINTER EXTENDABLE-P DISPLACED-INDEX-OFFSET) \LFFileSpec (NAME RECOG) MAKEFN (FORM +BODY X) \VFMGenerateFileIDs (vol desiredType) %%MAKE-TWOD-ARRAY (DIMENSIONS ELEMENT-TYPE FATP +TOTAL-SIZE TYPE-NUMBER READ-ONLY-P EXTENDABLE-P BOUND0 BOUND1) BIT.IN.ROW (BITMAP ROW) PP* (X) +DATATYPE (NAME&FIELDS) COMPILER::ALPHA-ATOM (COMPILER::FORM) PRINTERRORPUP (FILE PUP) IMAGEFNSCREATE ( +DISPLAYFN IMAGEBOXFN PUTFN COPYFN BUTTONEVENTINFN COPYBUTTONEVENTINFN WHENMOVEDFN WHENINSERTEDFN +WHENDELETEDFN WHENCOPIEDFN WHENOPERATEDONFN PREPRINTFN) %%AREF0 (ARRAY BASE-ARRAY INDEX) +SEDIT::SET-SELECTION-LIST (SEDIT::ITEM TYPE SEDIT::SELECTION SEDIT::CONTEXT SEDIT::NODE) +\SECONDSCLOCKGREATERP (OLDCLOCK SECONDS) MSOBJTYPE (MSVERB) REMEMBER (LINE) FB.RENAMECOMMAND (BROWSER) + \MACINCCODEFN (STRM) NONSYSPROPNAMES (ATM) \CLOCKGREATERP (OLDCLOCK MSECS) \SETDAYTIME0 (TMP) +SMARTARGLIST (TAIL) CL:ARRAY-ROW-MAJOR-INDEX (ARGS ARRAY) GETHASHTEXT (KEY HASHFILE HASHTEXTPTR DSTFIL +) \RCLOCK0 (BOX) NSPRINTER.HOSTNAMEP (PRINTERNAME) COMPILER::ALPHA-BLOCK (COMPILER::NAME COMPILER::NEW-BLOCK + COMPILER::*BLOCK-STACK* COMPILER::BODY) CL:ARRAY-IN-BOUNDS-P (ARGS ARRAY) SEDIT::LAST-LINE-LINEAR ( +SEDIT::CONTEXT) CH.LIST.OBJECTS (PROPERTY) CL::PROCESS-TYPE (CL::PS CL::EXPORTNAME) EDITGETD-LET (FORM +) SI::ADVICE-NEWCOM (SI::NAME SI::LISTNAME SI::FILE) HLSTORGB (HLS L S H) TB.UNDELETE.ITEM (BROWSER +WINDOW) %%ASET0 (ARRAY BASE-ARRAY NEWVALUE TYPE-NUMBER INDEX) \NSFILING.FULLNAME (HANDLE.OR.PARSE +CONNECTION PAIR NC DIR) COND.TO.IF (CONDCLAUSES X) PATH.LESSP (PATH1 PATH2) ASET (ARGS) +MODERN-MENUBUTTONFN (WINDOW) BREAKCONNECTION (FAST) EDITGETD-LAMBDA (BODY) REGIONONSCREEN (POS WIDTH +HEIGHT) COURIER.READ.SEQUENCE (STREAM PROGRAM BASETYPE) CL::ROW-MAJOR-ASET (INDEX ARRAY BASE-ARRAY +NEWVALUE TYPE-NUMBER ROW-MAJOR-INDEX) SWAPPEDCOND (CND C1 C2) MSSUBJTYPE (MSVERB) +CL::%%STRUCTURE-TYPE-TO-FIELDSPEC (CL::ELEMENT-TYPE CL::COERCED-TYPE) PRINTXIPROUTE (FILE PACKET +CONTROL) XCL:ROW-MAJOR-AREF (INDEX ARRAY BASE-ARRAY) \TEDIT.WINDOW.TITLE (TEXTSTREAM TEXTOBJ) +\PFInsertDirectoryID (vol rootDir type directoryID) \DSPROTATE.IP (IPSTREAM ROTATION) +\GENERIC.RENAMEFILE (OLDDEVICE) COMPILER::ALPHA-ARGUMENT-FORM (COMPILER::FORM) \GENERIC.OPENP (DEVICE) + \LFPutDirectory (vol directory) COMPLEX-COMPARE-FORWARD (START1 START2 LEN1 LEN2) +\HANDLE.PUP.ROUTING.INFO (PUP NDB TABLE MASK RADIUS) CL::SIMPLE-STRING-EQUAL (STRING1 STRING2 BASE1 +OFFSET1 TYPENUMBER1 BASE2 OFFSET2 TYPENUMBER2) SAMEPARALOOKS (FEATURES PARALOOK1 PARALOOK2) +\NSFILING.FILLIN.ATTRIBUTES (SESSION ATTRS X) PRINTPUPROUTE (FILE PACKET CONTROL) \TITLEICONMINSIZE ( +WINDOW) \TOTALFIXEDHEIGHT (ATWSINFO) \VAMUpdateVAM (page vol VAMPage# VAMWord# POSITIONA0720 VAMBit# +allocOrFree) PRINTPUPDATA (PUP OFFSET MACRO FILE) FILEGETDEF.VARS (SOURCE NAME) COPY-CIRCLE (X) +\BACKCCODE (STREAM) /DEFINE (X) SEDIT::STRINGIFY (SEDIT::NODE SEDIT::ENVIRONMENT) \STRINGWIDTHGUESS (X + FONT) \INCCODE (STREAM BYTECOUNTVAL) \LEAF.ADD.QUOTES (NAME OSTYPE) \TEDIT.GET.SINGLE.PARALOOKS2 (N +WIDTH FILE) GETHASH (HARRAY HA ITEM BASEA0293 DEFAULT BASEA0294) PARSE-FORMAT-OPERATION (CH COLON +ATSIGN) ALTO.TO.LISP.DATE (DATE) RECLISPLOOKUP (WORD VAR1 VAR2) \PEEKCCODE (EOL CHA0349 STREAM NOERROR +) HARDCOPY.SOMEHOW (WINDOW FILE PRINTERTYPE) SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE-BACKWARDS (SEDIT::CONTEXT + SEDIT::STR SEDIT::SCOPE SEDIT::TOP SEDIT::PROMPTWINDOW) LISP.TO.ALTO.DATE (DATE) VALUOF-EVENT (Y X) +\NSFILING.OPEN.HANDLE (SESSION PNAME.OR.PROPS NOERRORFLG RESULT) INSPECT/PROPLIST (ATOM WHERE) +PREVWORD (BUF CH) SEDIT::FIRST-LINE-LINEAR (SEDIT::CONTEXT) CHAT.CLOSE (WINDOW ABORTED) +\FM.MENUHANDLER (WINDOW TIMER $$OUTPUT) \VECPUT (PRSTREAM DX HALFVECWIDTH DY) IMLTLIST (KLIST PT M11 +M12 M13 M21 M22 M23) START.NEW.LINE (USECR) SHORTEN (STRING LEN) SEDIT::SHIFT-LINEAR-FORM ( +SEDIT::RIGHT-SHIFT) SEDIT::ASSIGN-FORMAT-NIL (SEDIT::NODE SEDIT::SUBNODE SEDIT::CONTEXT) +\LFFullFileName (UNPACKEDNAME) \MAP-OPEN-STREAMS (DEVICES ACCESS FN STREAM) \TEDIT.PUT.CHARLOOKS.LIST2 + (FILE STREAM W LOOKSLIST LOOKSHASH) \NCONC2 (X Y) NS.MAKE.SIMPLE.CREDENTIALS (NAME/PASS) +PFI.CENTER.PRINT (LMAR STR TAIL) PFI.CONDENSE.INDEX (TRIPLES TRIP X Y LASTPAGE) \TOTALFIXEDWIDTH ( +ATWSINFO) \EOF.ACTION (STREAM) \VAMAdjustGroup (groupPtr) MB.COPYFN (OBJ) FILEGETDEF.FNS (OPTIONS NAME +) TYPEINMENU (LST) NUMBER.READER.HANDLER (DIGIT MENU) \EOSERROR (STREAM) /DEFINEQ (X) +\SETUPTIMERmacrofn (X FORM) SEDIT::GENERATE-LINEAR-FORM (SEDIT::CURRENT-X SEDIT::RIGHT-MARGIN) STKARGS + (POS) \FM.DOSELECTION (WINDOW ITEM BUTTONS) \PSC.SYMBOLS (STREAM OLDFONT IMAGEDATA CHAR) SUBST (OLD +NEW) XYPT.LESSP (PT1 PT2) FW-FILTERED-FILE? (FULLNAME) \INCFILEPTR (STREAM AMOUNT) +SEDIT::SETUP-WINDOW-CONTEXT-DEPENDENCIES (SEDIT::CONTEXT SEDIT::ROOT SEDIT::WINDOW SEDIT::HEIGHT) +\CanonicalizeTimerUnits (X) CONSFN (X Y) OPT.RETFIND (C) \PAGED.INCFILEPTR (AMOUNT) +\COURIER.UNKNOWN.TYPE (TYPE) SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE (SEDIT::CONTEXT SEDIT::STR SEDIT::SCOPE + SEDIT::TOP SEDIT::PROMPTWINDOW) COMPILER::META-SUBSTITUTE (COMPILER::TREE) GRAPHOBJ.COPYBUTTONEVENTFN + (GROBJ WINDOW) FIND.NEXT.WORD (END X CH) \FIXPOUT (STRM N) BIT.IN.COLUMN (BITMAP COLUMN) TEDIT.GETSEL + (STREAM) OPT.RETOPT (RL C X Z) \LFGetDirectory (vol) \FIXPIN (STRM) +SEDIT::FIND-AND-DISPLAY-STRUCTURE-BACKWARDS (SEDIT::CONTEXT SEDIT::STR SEDIT::SCOPE SEDIT::TOP +SEDIT::PROMPTWINDOW) LOOKIN (PAT X) INTCHECK (CHAR) MENUBUTTONFN (W) USERLISPXPRINT (POS X FILE Z) +\HDCPYDISPLAY.FIX.YPOS (HARDCOPYSTREAM) MAKESCAN (SELF) SEDIT::RELINEARIZE-PRELINEARIZED-NODE (SEDIT::NODE +) APPENDNUMBER.IP (STREAMA0732 NUMA0731 STREAM LEN) READ (RDTBL FLG FILE) FIND.CHAT.PROTOCOL (NAME) +\FM.RIGHTBUTTONFN (WINDOW) \PSC.SPACEWID (CHAR FONTDESC) \LFReadFileID (directory position) FW-SORT-FN + (OFD2 OFD1) \BUFFERED.PEEKBIN (STREAM NOERRORFLG) SCALE/GRAPHNODE/BORDER (SCALE) +SEDIT::SETUP-WINDOW-AND-PROCESS (SEDIT::CONTEXT SEDIT::WINDOW SEDIT::PROCESS TABLE) \SHAREOFXTRAY ( +TOTALOLDSIZE WINFO TOTALNEWSIZE) \BUFFERED.BOUT (BYTE) FILEGETDEF.PROPS (SOURCE NAME) UNREADITEM (ITEM +) OPT.JSIZE (OP FN D) WRITE (OBJECT) MENUREPAINTFN (WINDOW MENU DSP) COMPILER::FRAME-ANNOTATE-THROW ( +COMPILER::SELF) COMPILER::META-CALL-LABELS (COMPILER::NODE COMPILER:CONTEXT) EF (FN) +\TEDIT.PUT.SINGLE.PARALOOKS2 (STREAM W FILE LOOKS TAB) TTYIN.BALANCE (ADDPARENS CHAR TABLE CH) +\BUFFERED.BINS (NBYTES DBASE NOERRORFLG) LAYOUTSEXPR1 (TREE D) EV (VAR) +SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (SEDIT::CONTEXT SEDIT::WINDOW SEDIT::LEFT SEDIT::NODE) \SETCARET + (DS Y CLIPREGION X TEXTOBJ CARET) \MOVEBYTES (SBASE SBYTE DBASE DBYTE) \FM.BUTTONEVENTFN (WINDOW) +DELFROMLIST (VAL VAR X) \LFOpenOldFile (fullFileName directoryPointer leaderPage) DOSLINKER (FILES +STREAM OLDDIR FILE) SEDIT::SETUP-PROFILE (SEDIT::CONTEXT SEDIT::PROFILE) LOCALVARS (A) EMBEDPROG (DEF +BINDVARS BINDVALS) \BUFFERED.BOUTS (SBASE DEV) SEDIT::FIND-AND-DISPLAY-STRUCTURE (SEDIT::CONTEXT SEDIT::STR + SEDIT::SCOPE SEDIT::TOP SEDIT::PROMPTWINDOW) TEDIT.GET.LOOKS (TEXTOBJ) \STRINGWIDTH.HDCPYDISPLAY ( +STREAM STR HARDCOPYFD RDTBL FONT CHARCODE) PFI.PRINT.INDICES (LINESPERPAGE HALFPAGE) MB.GETFN (OBJ +FILE TEXT MBFN FONT STREAM W ATTR) \SCROLL.HANDLER.DOIT (WINDOW WBORDER SCROLLREGION DIRECTION BUTTON +XPOS SIZEOFORIGIN YPOS CONTINUOUS?) \TEDIT.PUT.SINGLE.CHARLOOKS2 (LOOKS FONT FILE STREAM W) +%%CHECK-SEQUENCE-DIMENSIONS (DIM-LST SEQUENCE) MKPROGN1 (L) \SHAREOFXTRAX (WINFO TOTALNEWSIZE +TOTALOLDSIZE) OPT.FINDEND (STOP) TEDIT.STREAMCHANGEDP (STREAM) \NULLDEVICE (STREAM) +%%FILL-ARRAY-FROM-SEQUENCE (DIMS) NEGL (L) HEXSTRING (WIDTH STR) CIRCLAR-COPYER (INPUT) +TEDIT.SEL.AS.STRING (SEL TEXTOBJ) SAVESETQQ (SETQX SETQY) \PSC.SPACEDISP (STREAM WIDTH) +FILEGETDEF.MACROS (SOURCE X) NEGLST (L) \10MB.CREATENDB (ETHERTASK#) TEDIT.ADD.MENUITEM (ITEM) +MB.SHOWSELFN (OBJ DS OBJBOX) FW-OFD-EXISTS? (FULLNAME FILESTREAM) BACKGROUNDWHENSELECTEDFN (ITEM) +\NULL.OPENFILE (OLDSTREAM ACCESS DEVICE) COMPILER::FRAME-ANNOTATE-UNWIND-PROTECT (COMPILER::SELF) +\TOTALPROPOSEDSIZE (ATW RESTATWS PWIDTH PHEIGHT) SEDIT::CREATE-QUOTED-GAP (SEDIT::GAP SEDIT::QUOTE-TYPE + SEDIT::CONTEXT) NULL (X) FW-CREATE-OFD-LIST (OFD) SETUPTIMER.DATE (DTS OldTimer?) DWIMDEF (DEF SOURCE +) \TEDIT.SCALEREGION (REGION SCALEFACTOR) XCL::UNDOABLY-SETQ (XCL::VARVALUE) COMPILER::FRAME-ANNOTATE-TAGBODY (COMPILER::SELF COMPILER::SEGMENT COMPILER::STMT COMPILER::*REFERENCES* COMPILER::REQUESTOR -COMPILER::REFERENCE) \\FIXLINELENGTH.PRESS (PRDATA) PROCESS.RETURN (VALUE) CURSOR (INVERTFLG) -PUTSTREAMPROP (PROP) LOOKIN (PAT X) BRKDWNCONSES (PTRA1606 VALA1605 BDX BDEXP PTRA1608 VALA1607) -CH.RETRIEVE.ITEM (PROPERTY) INTERPRESSFILEP (FILE) COMPILER::FRAME-ANNOTATE-THROW (COMPILER::SELF) -\\TEDIT.PUT.CHARLOOKS (LOOKS FILE CHLIM CH1 STREAM W LOOKSHARRAY) MAP.PROCESSES (MAPFN) -SEDIT::PARSE-INDENT-NAME (SEDIT::NAME SEDIT::INDENTS) MSSETWORDTYPE (WORD TYPE SYN) CCCSCAN (DEF CA -OLDREF X SUBMAPS LC CODEBASE OFFSET) LISTPUT (PROP VAL) ANALYZE-KEY (TEMP) \\KEYHANDLER1 (MOUSETEMP -MOUSETIMER R W EXCESS) \\TEXTOPENF (STREAM TEXTOBJ) PROCESSP (PROC) BMOBJ.GETFN3 (STREAM SCALE DESC) -NTHTOPLEVELELT (N LST) FB.OPTIONSCOMMAND (BROWSER) FAX.SEND.FILE (HOST HOST&OPTIONS FILE PRINTOPTIONS) - \\SPPSENDERROR (MSG EPKT) RESTART.PROCESS (PROC) RPAQX.PRETTYPRINT (EXPR) CL::STRUCTURES.EDITDEF ( -CL::NAME CL::SOURCE CL::EDITCOMS CL::OPTIONS TYPE) SEDIT::PARSE-INDENT-BODY (SEDIT::OFFSET CL:FIRST -SEDIT::INDENTS SEDIT::REPEAT) GET-ONED-DISPLAYW (WHERE DISPLAYWINDOW FONT DATUM FETCHFN STOREFN -VALUECOMMANDFN PROPCOMMANDFN TITLECOMMANDFN PROPS PROFILE) RELPROCESSP (PROCHANDLE) -DASSEM.CANSHAREBINDING (V1 V2 Y) PRINTPUPQUEUE (QUEUE HEADER) WAKE.PROCESS (PROC STATUS) STREAMP (X) -PPSOC.CURRENT (PUP STREAM) FB.HARDCOPY.DIRECTORY (WINDOW IMAGESTREAM FBROWSER LMARG RMARG SCALE -TBROWSER NAMERIGHTMARG DIRFONT) \\DEFPRINT.BY.NAME (TYPENAME STREAM OBJECT) \\EXTERNALFORMAT (NAME) -CHECKSYNONYM (X) TTYINFIX (INPUT) OPT.COMMONBACK (REF) \\PRINTADDR (STREAM X \\NUMSTR \\NUMSTR1) -FB.BROWSECOMMAND (BROWSER NAMETAIL) PRINT-LISP-INFORMATION (FILE STRING) \\SOUT (STREAM X STRING) -GET-TITLEW (DISPLAYWINDOW TITLEWINDOW TITLEFONT TITLE DATUM) DASSEM.COUNTVARS (VARS) READTABLEP (RDTBL -) CLISPDEC (X) OPT.JUMPREV (OPT.DEFREFS TAG LEVEL APD) PROCESS.RESULT (EVENT) TB.REMOVE.ITEM (ITEM -ITEM# LASTITEM#) \\TEXTMENU.TOGGLEFN (OBJ TEXTOBJ) \\STREAM.DEFPRINT (STRM OUTSTREAM TYPE) -|\\DelShade| (KEY) SUSPEND.PROCESS (P) SEDIT::PARSE-INDENT (SEDIT::ISPEC) CL:STRING-CAPITALIZE (STRING - START END NEW-STRING) BMOBJ.GETFN (STREAM BITMAP FIELDS) \\SPP.HANDLE.DATA (ACKNO) MENU.HANDLER (MENU - DSP MGRIDSPEC NROWS NCOLUMNS MOVEDLEFT LOCALMENUHELDWAIT) FB.GET.NEWPATTERN (BROWSER) VRULE.PUTFN ( -HRULE OUTPUT.STREAM) \\FDEV.DEFPRINT (DEV STREAM) \\GETACCESS (STREAM) COMPILER::FRAME-ANNOTATE-SETQ ( -COMPILER::SELF) \\CARET.DOWN (UNLESSOCCLUDED INTERVAL) COURIER.SKIP (TYPE STREAM PROGRAM BASETYPE -NAMEANDTYPE WHICH) APPEND (L) NCHARS (X RDTBL STRING ESC) TEDIT.COPY (CROSSCOPY) BRV/OFFSET (N GN D) -\\SCROLL.HANDLER.DOIT (WINDOW WBORDER SCROLLREGION DIRECTION BUTTON XPOS SIZEOFORIGIN YPOS CONTINUOUS? -) \\TEXTSETFILEPTR (STREAM TEXTOBJ FILEPOS) DWIMDEF (DEF SOURCE) NEWLINE.IP (IPSTREAM IPDATA) -FB.SHAPECOMMAND (BROWSER WINDOW EXTENT) \\TEXTMENU.TOGGLE.CREATE (TEXT FONT BOX OBJ STATECHANGEFN -INITSTATE) FB.FASTSEECOMMAND (W WINDOW TAIL UNFORMATTED) EDITL2 (FILE ATM) ONEDINSPECT.RESHAPEFN ( -WINDOW) \\STREAM.NOT.OPEN (STREAM) TEDIT.CHARWIDTH (FONT) \\FM.UPDATEWINDOWEXTENT (WINDOW EXTENT) -\\DSPCLIPPINGREGION.PRESS (STREAM) GIVE.TTY.PROCESS (WINDOW) SEDIT::SETF-OF-GET-FORMAT (SEDIT::NAME) -TTY.PROCESSP (PROC) SCALED.BITMAP.GETFN (INPUT.STREAM) FB.INFO.ITEM.NAMED (ITEMS TAG) CH.DELETE.SELF ( -STREAM PROPERTY) WINDOWP (X) PUTPROPS.PRETTYPRINT (TEM) VRULE.GETFN (INPUT.STREAM) -MAKE-UNICODE-TRANSLATION-TABLES (MAPPING LTORARRAY P RTOLARRAY) CLISPFORERR1 (Z Y) FB.HARDCOPY.TOFILE -(FILES BROWSER CONVERTERS) MKATOM (X STRING LEN) EDITBF (FF) \\SETACCESS (ACCESS DEVICE) -PFI.PRINT.BITMAP (BM) COURIER.WRITE.FAT.STRING (STRING CORE STREAM W) DREMOVE (X) -\\TFBRAVO.READ.PARALOOKS (OLDLOOKS FILE MICASPERPOINT) DASSEM.EQCONSTANTP (ARG) BROWSE/LAYOUT/LATTICE -(NS) RUNION (L1) \\UPDATE.EXTENT.IMAGE (SCROLLBARW SCROLLINGW EXTENT DIRECTION EXHEIGHT SCROLLREGION -WINREGION EXWIDTH) CL:RASSOC (CL::ITEM CL::A-LIST CL::TEST-NOT CL::TEST CL::KEY) \\TEDIT.TABTYPE.SET ( -SEL OBJ TEXTOBJ CH# FNARG PC) MSPATHSPRINTFN (FN) OPT.LABELNTHPR (CODE DL LEVEL) IMAGEOBJP (X) -DELFROMLIST (VAL VAR X) \\DSPXPOSITION.IP (IPSTREAM) COMPILER::FRAME-ANNOTATE-RETURN (COMPILER::SELF) -MB.NWAYBUTTON.ADDITEM (NEWBUTTON OBJECT BUTTONS) \\TEDIT.MAKEFILENAME (STRING) \\SPP.HANDLE.ATTN (CON -XIP BYTE DSTYPE) CL::STRUCTURE-FUNCTION-P (CL::PS CL:SYMBOL CL::KEY) \\IGR.MAKEPRETTYCOMSL (NAME) -PPSOC (FILE SOC STATE LOCALPORT) SEDIT::RELINEARIZE (SEDIT::DISPLAY-WINDOW-REGION SEDIT::WIDTH -SEDIT::BOTTOM-Y SEDIT::Y-1 SEDIT::Y-2 SEDIT::OLD-ACTUAL-WIDTH) OPENW (USEROPENFN) OPT.LBDEL (TAG DEF) -VRULE.IMAGEBOXFN (IMAGE.STREAM) \\FM.WINDOWEXTENT (WINDOW EXTENT) \\DSPBOTTOMMARGIN.PRESS (PRSTREAM) -PROCESS.WINDOW (PROC) |\\ItemNumber| (ALLITEMS ITEM) TTPRIN1 (STR) SEDIT::FORMAT-FROM-INDENT (SEDIT::ARGS - SEDIT::SUBLISTS SEDIT::INLINE? SEDIT::INDENTS) TTYINREADP (FLG) BPNT0 (X FILE CARLVL CDRLVL TAIL) -\\FM.UPDATEGROUPEXTENT (GROUPS ID SUBID ITEM) \\DEFINEFONT.PRESS (PRSTREAM FONT) MENUITEMREGION (IMENU - ITEMS ITEM GRIDSPEC BORDER) COMPILER::FRAME-ANNOTATE-PROGV (COMPILER::SELF) -\\CREATE.JIS.EXTERNALFORMAT (XFMT) CH.ADD.SELF (STREAM PROPERTY) WINDOW.BITMAP (W REGION) PRINTPROPS ( -AT TL) TEDIT.NEW.FONT (TEXTOBJ) FB.MAKECOUNTERWINDOW (HEIGHT WIDTH TITLE COUNTERW FONT BROWSERWINDOW) -CL::STRUCTURE-OBJECT-INSPECT-STOREFN (CL::PROPERTY CL::OBJECT CL::NEWVALUE) \\GR.CONTENTS (TYPE) -EDITQF (PAT) \\TEDIT.FIXCHANGEDLINE (PREVYBOT TEXTOBJ WHEIGHT WINDOW) OPT.UBDEL (CD) \\PROC.RESUME ( -FRAME) DASHES (MARKER) RIGHTW.RESHAPEFN (WINDOW) \\TEXTGETEOFPTR (STREAM) IMAGEOBJPROP (NARGS PROP VAL -) GETDEFFROMFILE (NAME TYPE OPTIONS NOTFOUND VAL) COPIEDFILEMATCH (SEMI*) FB.DEPTHCOMMAND (OLDDEPTH) -\\JISPEEK (STREAM NOERROR CONVTABLE SET CODE) \\REMOVE.EXTERNALFORMAT (EXTERNALFORMAT) -GRAPHOBJ.CHECKALIGN (GRAPH) XCL::PROFILE-VALUES (XCL::PROFILE XCL::X) \\SOFTCURSORPOSITION (X Y) -EDIT\: (TYPE) ICONW.SHADE (WINDOW) COURIER.WRITE.STRING (STREAM LENGTH) DASSEM.DPRINTLAP (FN OUTSTREAM - NAMETABLE ARGTYPE CD) EVAL.AS.PROCESS (FORM) PFI.MAYBE.PP.DEFINITION (OUTSTREAM INSTREAM START END) -CL::STRUCTURE-OBJECT-PROPCOMMANDFN (CL::DATUM CL::PROPERTY CL::INSPECTOR-WINDOW) TITLEW.REPAINTFN ( -WINDOW) \\WAITFORSYSBUFP (N \\DISMISSTIMER NOW) FB.HARDCOPYCOMMAND (BROWSER OPTION ITEM) \\BACKJISCHAR - (STREAM) \\FM.TRANSPOSEVERT (WINDOW NEWHEIGHT OLDHEIGHT) \\DSPFONT.PRESS (PRSTREAM) PROCESS.EVAL ( -PROC P FORM) XCL::SETF-PACKAGE-PREFIX (XCL::PREFIX) SEND.FILE.TO.PRINTER (STRM PRINTOPTIONS) -|\\AddShade| (ITEM SHADE) EVAL.IN.TTY.PROCESS (FORM WAITFORRESULT) REMOVEDUPS (LST) \\BACKSHIFTJISCHAR - (STREAM CHAR) XCL::PROFILE-VARIABLES (XCL::PROFILE XCL::X) \\TEDIT.NEWREGIONFN (FIXEDPOINT) -COURIER.WRITE.SEQUENCE.UNSPECIFIED (TYPE STREAM W STRING FIXP PROGRAM) \\SHIFTJISPEEK (STREAM NOERROR -CONVTABLE SET CODE) \\TFBRAVO.READ.CHARLOOKS (FILE) DASSEM.DSTOREFNDEF (FN LC CD NTBYTESIZE ARGTYPE -NARGS DEFA1622 VALUEA1621 NLOCALS NFREEVARS DEFA1624 VALUEA1623 DEFA1626 VALUEA1625) -FB.MAKEHEADINGWINDOW (WIDTH HEIGHT FONT HEADINGW BROWSERWINDOW) \\SHIFTJISIN (STREAM HI LO CONVTABLE -SET CODE) \\TEXTGETFILEPTR (STREAM CHARSLEFT OFFSET LIMIT) GETDEFSAVED (TYPE NAME OPTIONS) -FB.INFOMENU.WHENSELECTEDFN (ITEM MENU WINDOW INFO) TTYDISPLAYSTREAM (A) WAITFORINPUT (\\DISMISSTIMER -NOW N-100 STREAM) \\LEVELTEXTURE (LEVEL) COURIER.WRITE.SEQUENCE (TYPE STREAM PROGRAM W X) -\\TEDIT.RESTARTFN (WINDOW PROPS ODIRTY) BROWSE/LAYOUT/HORIZ/COMPACTLY (ROOTS) \\BACKEUCCHAR (STREAM) -MSPATHS4 (FROM Y) \\CREATE.SHIFTJIS.EXTERNALFORMAT (XFMT1 XFMT2) GETDEFERR (OPTIONS TYPE NAME) -COMPILER::FRAME-ANNOTATE-MV-PROG1 (COMPILER::SELF COMPILER::STMT) \\CREATE.EUC.EXTERNALFORMAT (XFMT) -\\EUCIN (STREAM KU TEN CONVTABLE SET CODE) FB.MAKERIGIDWINDOW (WINDOW HEIGHT) -CL::STRUCTURE-OBJECT-INSPECT-PROPPRINTFN (CL::PROPERTY) PROPERTAILP (Y) \\PROCESS.EVAL1 (..PEV-FORM..) - \\ADD.ROUTING.TABLE.ENTRY (ENTRY) \\CREATE.THROUGH.EXTERNALFORMAT (XFMT) VRULE.DISPLAYFN (HRULE -IMAGE.STREAM SCALE RULEHEIGHT WIDTHS Y REALHEIGHT) PP (X NAME TYPE) RESHADEITEM (NEWSHADE ITEMREGION -DSP MENU ITEM) SEDIT::GET-INDENT (SEDIT::NAME) \\JISIN (STREAM CONVTABLE SET CODE KU TEN) -\\THROUGHFILEOUTCHARFN (CHARCODE OUTSTREAM) \\BACKTHROUGHCHAR (STREAM) COMPILER::FRAME-ANNOTATE-PROGN -(COMPILER::SELF COMPILER::STMT) \\TEXTEOFP (STREAM) \\THROUGHPEEK (STREAM NOERROR) PROCESS.READ ( -OLDTTY) FB.INFOMENU.SHADEINITIALSELECTIONS (MENUWINDOW MENU INITIALSELECTIONS SELECTION MENUITEMS) -PROCESS.APPLY (PROC P FN ARGS) TEDIT.FORMATTEXTBOX (CH# PAGEREGION PRSTREAM VALUE REGION TEXTOBJ) -\\DECODETRANSITION (KEYNUMBER TI) \\FM.TRANSPOSEHORZ (WINDOW NEWWIDTH OLDWIDTH) NEWPAGE.PRESS ( -PRSTREAM) U-CASE (X \\PNAMESTRING STRING OFFSET CODE) \\DOTRANSITIONS (OLD NEW KEYBASE) -\\PROCESS.APPLY1 (..PEV-FN.. ..PEV-ARGS..) PRESSWINDOW (W BITMAP PRSTREAM PTSTOMICAS) \\PUTSYSBUF (R W - CHAR) OPT.LBMERGE (FROM REFS X) \\EUCPEEK (STREAM NOERROR KU TEN CONVTABLE SET CODE) FB.STARTUP ( -BROWSER COMMANDMENU FN) \\IDLE.TIME (START.TIME ONEDAY) \\ICONW.REPAINTFN (WINDOW IMAGEBM) -\\GETDEVICEFROMNAME (NAME HOST DONTCREATE) DASSEM.DWRITEFN (ARGS LOCALS NLOCALS ARGTYPE FN FRAMENAME -OUTSTREAM LC NFREEVARS NARGS *READTABLE*) EDIT4E (CHANGEFLG) \\TEDITOUTCHARFN (CHARCODE) FILENAMEFIELD - (FILE FIELDNAME) \\INSPECT.DATATYPE.RAW.FETCH (DESCRS FIELD INSTANCE) FB.NEWINFOCOMMAND (WINDOW) -XCL::SETF-PROFILE-ENTRY-VALUE-NAME (CL:VARIABLE XCL::NAME) \\TEDIT.LOOKS (TEXTOBJ REGION SEL POS) -\\HARDCURSORUP (NEWCURSOR) \\TEDIT.EXPANDFN (W) SEDIT::FIND-NTH-STRUCTURE (SEDIT::CONTEXT) -\\TEDIT.COPY.LINEDESCRIPTOR (FROMLINE) OPT.JUMPTHRU (OPT.DEFREFS TAG DEF LEVEL) BROWSE/LAYOUT/HORIZ ( -ROOTIDS) \\FM.INITCORNERSFN (WINDOW LEFT BOTTOM) CL::INSPECT-STRUCTURE-OBJECT (CL:STRUCTURE CL::WHERE) - \\REMOVEDEVICE (DEV) MSPATHS2 (FN) EDITFPAT (PAT X) GETDEFCOM0 (COM Y X) CH.DELETE.PROPERTY (PROPERTY -) SHOWPRESSBITMAPREGION (STR) \\LOOKUPPUPNUMBER (SOC NSNUMBER) \\FM.FILLWINDOW (WINDOW REGION SHADE) -NEWLINE.PRESS (PRSTREAM PRDATA) \\REMOVEDEVICE.NAMES (DEV) MSONPATH (SETREP X SEEN TOPFLG) EDITXTR (LC - L) \\THROUGHIN (STREAM) GETDEFCURRENT (TYPE NAME OPTIONS COMS) BRKDWNTIME (PTRA1602 VALA1601 BDX -BDEXP PTRA1604 VALA1603) INTERPRESS.OUTCHARFN (IPSTREAM CHARCODE NSCODE OLD-CSET) -COMPILER::FRAME-ANNOTATE-MV-CALL (COMPILER::SELF COMPILER::ARG) \\CLOSEFILE (DEVICE ABORTFLG) -XCL::SETF-PROFILE-NAME (XCL::PROFILE XCL::NAME) EDLOCL (COMS L) EDITMV (L0 L COM0) \\TEDIT.MAINW ( -TEXTSTREAM TEXTOBJ) TEDIT.FORMATFOLIO (REGIONSPEC PRSTREAM VALUE FOLIOINFO FORMATTINGSTATE REGION) -MSMATCHRATING (X Y CONJ) EMPRESS (FILE HOST PRINTOPTIONS) \\TEXTINIT (DIMENSION BITMAP X Y CONDITION) -COPYINSERT (TTYW IMAGEOBJ) OBTAIN.MONITORLOCK (UNWINDSAVE WASINTERRUPTABLE) L-CASECODE (CHAR) -\\EVENT.DEFPRINT (EVENT STREAM) \\NSPRINT.FULL.REQUEST.STATUS (ID) PRESS.BITMAPSCALE (HEIGHT WIDTH) -PFI.MAYBE.SEE.PRETTY (TOFILE FROMFILE) CL::STRUCTURE-OBJECT-INSPECT-FETCHFN (CL::PROPERTY CL::OBJECT) -EDITMBD (X) \\ADD.CONNECTED.DIR (FILENAME) DASSEM.DASSEM (CC FN ARGTYPE VARCOUNT FRAME VARS Y N F) -\\TEDIT.UNPARSE.CHARLOOKS.LIST (LOOKS A) CREATE.MONITORLOCK (NAME) SEDIT::SHOW-CARET (SEDIT::CONTEXT) -\\COURIER.TYPE.ERROR (TYPE ITEM) EDITSW (M N Y Z) OPT.XVARSCAN1 (CD A) TB.MAKE.BROWSER (PROPS -WINDOWSPEC TITLE FONT LINESPERITEM BASELINE COLUMNS PRINTFN COPYFN CLOSEFN AFTERCLOSEFN USERDATA -HEADINGWINDOW LINETHICKNESS ITEMS FN) \\FM.RESETCLIPPINGREGION (WINDOW) OPT.JUMPOPT (X) -\\CURSORBITSPERPIXEL (NEWBITSPERPIXEL) \\CURSORDESTINATION (DESTINATION) FULLPRESSBITMAP (FILE -PRSTREAM BITMAP PRESSPAGEWIDTH PRESSPAGEHEIGHT) \\CLEARBM (TXT BM REG) WRITE-UNICODE-INCLUDED ( -INCLUDECHARSETS MAPPING) TEDIT.FORMATPAGE (CH# REGION PRSTREAM TEXTOBJ PAGEPROPS PAGEREGION -PRE-EXISTING-FONT) \\IDLE.EXIT? (GROUP) \\SOFTCURSORUP (NEWCURSOR) INTERLISP-NAMESTRING (PATHNAME) -TEDIT.FORMATHEADING (PAGEREGION PRSTREAM VALUE LOCALINFO FORMATTINGSTATE PC REGION) C.FLOATUNBOX (A) -\\SOFTCURSORUPCURRENT (N) IRM.LOOKUP (GRAPH KEYWORD TYPE WINDOW MONITORLOCK) CLISPLOOKUP0 (WORD LISPFN -) EDIT4F (FF PAT0) \\MONITORLOCK.DEFPRINT (LOCK STREAM) FB.NEWPATTERNCOMMAND (BROWSER) \\GENERATEFILES - (FDEV DESIREDPROPS OPTIONS) FB.SETNEWPATTERN (PATTERN) CL::STRUCTURE-OBJECT-P (CL::OBJECT) -BITMAPCREATE (WIDTH HEIGHT) \\GR.GETDEFFN (NAME) \\DEVICEEVENT (EVENT D) \\MAKE.PROCESS1 (TOP) -MSPATHS1 (FROM FN X) \\PROCESS.RELEASE.LOCKS (P) \\GENERATENEXTFILE (GENOBJ NAMEONLY) +COMPILER::REFERENCE) CRIT.LESSP (SCAN1 SCAN2) TTNTH (END) MOVE.TO.WHEREVER (BUF) +%%CML-TYPE-TO-TYPENUMBER (ELEMENT-TYPE CANONICAL-TYPE) TIMEREXPIRED? (TIMER ClockValue.or.timerUnits) +FIXFIELDORDER (EXPRESSION) NTHTOPLEVELELT (N LST) POSSIBILITYFN (FN) LAYOUTLATTICE (ROOTIDS NODELST +FORMAT) PRINTER.BITMAPSCALE (PRINTERTYPE WIDTH HEIGHT HOST) NARGS (FN N) \DSPYPOSITION.HDCPYDISPLAY ( +HARDCOPYSTREAM) FILEGETDEF.RECORDS (SOURCE VAL NOTFOUND) \TEDIT.GET.CHARLOOKS.LIST2 (N WIDTH FILE) +USEREXEC (LISPXID LISPXXMACROS LISPXXUSERFN) TIME.UNTIL (TIMER UNITS) BLTMENUIMAGE (MENU WIN DSTWIN +SRC BORDER CR) SCALEPAGEUNITS (FACTOR PAPERSIZE OTHEREDGE) \ARGPTR (VAR INTERPDEF A N) +APPENDLARGEVECTOR.IP (ARRAY ASIZE AORIG STREAM) IMAGESTREAMP (NARGS STREAM) SETARG (VAR M X) +\UPDATE.EXTENT.IMAGE (SCROLLBARW SCROLLINGW EXTENT DIRECTION EXHEIGHT SCROLLREGION WINREGION EXWIDTH) +IMAGESTREAMTYPE (STREAM) COMPILER::META-CALL-LAMBDA-SUBSTITUTE (COMPILER::NODE COMPILER::FN +COMPILER::REQUIRED-ARGS) \ARG (VAR M) OPT.DELTAGREF (REF TAG) IMAGESTREAMTYPEP (STREAM S STYPE) +AT.END.OF.TEXT (BUF CH) \SETARG (VAR M X) \CH.GUESS.NEW.PROPERTIES (DOMAIN) STKNTH (N OPOS) +%%MAKE-ARRAY-STORAGE (NELTS BITS-PER-ELEMENT GC-TYPE INIT-ON-PAGE ALIGNMENT) TEDITCHAT.MENUFN (WINDOW) + \FM.WINDOWENTRYFN (WINDOW) COMPILER::CONSTRUCT-LIST (COMPILER::ARGS COMPILER::ARG) STKNAME (POS) +\LFCreateFile (fileName vol info) \FM.STARTEDIT (WINDOW ITEM CLEARFLG) SEDIT::SETUP-NEW-CONTEXT ( +SEDIT::LOCK) PRINT-ARGLIST (FILE) SETSTKNAME (POS NAME) U/L-CASE (N NEXTWD) UNIX-STREAM-IN (STREAM) +\COPYFNHEADER (FNHD) LISPXEVAL (LISPXFORM) PFI.PREVIEW.DECLARE (FN) \TEXTBOUT (TEXTOBJ CH# BYTE) NOTE +(VAL) MB.SIZEFN (OBJ STREAM) STKSCAN (VAR A OPOS) SEDIT::SET-INITIAL-SELECTION (SEDIT::CONTEXT) +OPENIMAGESTREAM (DEFPRINTER OPTIONS STREAM) /TCONC (X) \FRAMESCAN (FRAME NT ATOM#) +COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS (COMPILER::NODE COMPILER::FN COMPILER::PARAM) +CHAT.RESHAPEWINDOW (WINDOW OLDIMAGE IMAGEREGION CHAT.PROC) SEDIT::COMPLETE (SEDIT::CONTEXT SEDIT::REASON + SEDIT::OPTIONS) RETTO (POS P VAL) \LFGetStreamForFile (NAME RECOG FULLNAME ACCESS OTHERINFO) +\FM.CREATEW (GROUPS REGION BORDER TITLE WINDOW BACKGROUND) PRINTERPROP (PRINTERTYPE PROP) +SEDIT::SETUP-CONTEXT-WINDOW-DEPENDENCIES (SEDIT::CONTEXT SEDIT::WINDOW) \SETWINFOXSIZE (PROPOSEDSIZE) +OPT.COMMONBACK (REF) APPENDINT.IP (LENGTH STREAM NUM) FW-CREATE-OFD (FILESTREAM FULLNAME) +\VAMEnoughSpace (filePtr RUNLENGTH vol) FILEGETDEF.LISPXMACROS (SOURCE NAME) GETDEFFROMFILE (NAME TYPE + OPTIONS NOTFOUND VAL) PFI.PREVIEW.DEFINEQ (FN) XCL::UNDOABLY-SET-SYMBOL (CL:SYMBOL XCL::VP XCL::VALUE +) RESUME (TOFX FROMFX VAL) \ALLOCSPACETOGROUPEDWINDOWS (WGROUPINFO) %%ONED-ARRAY-P (ARRAY) +SEDIT::EQUALIZE-STRING-WIDTHS (SEDIT::STRING-LIST SEDIT::FONT SEDIT::PRIN2?) +PRINTFILETYPE.FROM.EXTENSION (FILE EXT) \RESUME (FRAME) CREATEWFROMIMAGE (SCREEN IMAGE) EXEC-READ-LINE + (BUFFER-STRING) SHRINK-VECTOR (NEW-SIZE) XCL::GET-UNDOABLE-SETF-METHOD (XCL::FORM XCL::ENVIRONMENT) +STKARG (VAL) %%GENERAL-ARRAY-P (ARRAY) CHAT.BUTTONFN (WINDOW) \TEDIT.SET.WINDOW.EXTENT (WINDOWS) +\POSTSCRIPT.ACCENTFN (STREAM CHAR) \LFUpdateLeaderPage (time) \FM.SETATTACHPOINT (ITEMS ITEM MAXREGION + WIDTH HEIGHT SI::$PROG1-FIRST-EXPRESSION$) %%TWOD-ARRAY-P (ARRAY) COMPILER::FRAME-ANNOTATE-RETURN ( +COMPILER::SELF) \SPREADFRAMEP (FRAME) NOTOKSWAP (EXPR1 EXPR2) TRYNEXT1 (MSG##) +SWITCH/NODE/HEIGHT/WIDTH (NL N) \INTERPFRAMENT (FX) CENTERPRINTINAREA (EXP X WIDTH STRWIDTH Y HEIGHT +PFN) CH.DELETE.MEMBER (DONTCHECK PROPERTY) SHOWSHADEDITEMS (MENU ALLITEMS DSP) SETSTKARG (POS N FRAME +VAL) SETNTHTOPLEVELELT (N LST NEWVALUE) UNIX-STREAM-PEEK (STREAM NO-ERROR) COMPILER::META-CALL-LAMBDA +(COMPILER::FN COMPILER::NEW-PROG1) STKARGNAME (POS N FRAME X) FILEGETDEF.ALISTS (SOURCE NAME) +SETSTKARGNAME (POS N X NAME) PRINTER.BITMAPFILE (PRINTERTYPE) \TEDIT.TRY.ABBREV (ABBREV STREAM) +%%PRINT-ARRAY-CONTENTS (DIMENSIONS NELTS STREAM) CHAT.CLOSEFN (WINDOW) \FM.UPDATEWINDOWEXTENT (WINDOW +EXTENT) GETDEFSAVED (TYPE NAME OPTIONS) \FM.COLLECTNWAYS (WINDOW ITEM) SEDIT::SETUP-CONTEXT (SEDIT::CONTEXT +) %%DEFPRINT-ARRAY (ARRAY STREAM) PRETTYDEF (CHANGES) STKNARGS (POS FRAME) OPT.LABELNTHPR (CODE DL +LEVEL) CL:PRINC-TO-STRING (OBJECT) FRAMESCAN (POS FX ATOM) CL:WRITE-CHAR (OUTPUT-STREAM CHARACTER) +PFI.HANDLE.PACKAGE (EXPR) OPT.JUMPREV (OPT.DEFREFS TAG LEVEL APD) %%DEFPRINT-VECTOR (VECTOR STREAM +SIZE) UNIX-STREAM-EOFP (STREAM CH) \HDCPYDISPLAY.FIX.XPOS (HARDCOPYSTREAM) PRINTCOPYRIGHT (FILENAME X +CURRENTYEAR) \GOOD.DASHLST (DASHING BRUSH BRUSHSIZE) %%DEFPRINT-STRING (STRING) CENTEREDPRIN1 (LEFT +WIDTH EXP DS Y) \APPEND2 (L2 VAL) PRINTCOPYRIGHT1 (OWNER LINE) CHECKDEFS (X FIELDS) %%ARRAY-READ (BASE + TYPE-NUMBER INDEX) %%DEFPRINT-BITVECTOR (CL:BIT-VECTOR SIZE) SAVECOPYRIGHT (FILENAME) BITMAPWIDTH ( +BITMAP) \DSPXPOSITION.HDCPYDISPLAY (HARDCOPYSTREAM) COMPILER::FRAME-ANNOTATE-SETQ (COMPILER::SELF) +DECLAREDATATYPE (SUPERSPECS) READFROMBUF (END) %%ARRAY-WRITE (NEWVALUE BASE TYPE-NUMBER INDEX) +\TEDIT.GET.PARALOOKS.LIST2 (N WIDTH FILE) MB.WHENOPERATEDFN (OPERATION OBJ SEL DS) MENUREGION (MENU) +\SETWINFOYSIZE (PROPOSEDSIZE) \VAMFindFreePages (vol filePtr) COMPILER::META-EVAL-VAR-REF (COMPILER:CONTEXT + COMPILER::NODE) \EDIT.DOWNCARET (DS X Y) TRANSLATE.DATATYPE (FIELDSPECS UNUSED) PRINT-DOCUMENTATION ( +NAME TYPE) %%SLOW-ARRAY-WRITE (NEWVALUE) COMPILER::FRAME-ANNOTATE-PROGV (COMPILER::SELF) +\POSTSCRIPT.ACCENTPAIR (STREAM IMAGEDATA CHAR ACCENTS UNDER-ACCENTS FONT) LINELENGTH (FILE) +BITMAPHEIGHT (BITMAP) \NSRANDOM.UPDATE.VALIDATION (SESSION HANDLE NEWATTRS) CLEANPOSLST (PLST X) +XCL::WALK-UNEXPECTED-DECLARE (XCL::FORM) \RESHAPEATTACHEDWINDOWSAROUNDMAINW (MAINW MAINWEXTENT +ATWINSINFO) SEDIT::DOT-THIS-LIST (SEDIT::CONTEXT SEDIT::POINT SEDIT::INDEX SEDIT::NUM-SUBNODES) +%%REDUCE-MOD (ELEMENT-TYPE MODNUM) GETDEFERR (OPTIONS TYPE NAME) APPENDSEQUENCEDESCRIPTOR.IP (TYPE +LENGTH STREAM) GETFILEDEF (FILENAME) MAXSTRINGWIDTH (L FONT PRIN2FLG RDTBL) READ-UNICODE-MAPPING ( +FILESPEC) DO-EVENT (ORIGINAL-INPUT TABLE X) %%REDUCE-INTEGER (ELEMENT-TYPE BOUND) EXTENDEXTENT (WINDOW + INCLUDEREGION) MakeBitField (FIRST WIDTH) %%GET-ENCLOSING-UNSIGNED-BYTE (ELEMENT-TYPE NBITS) +\NSRANDOM.WROTE.HANDLE (SESSION) \TEDIT.PUT.SINGLE.PARALOOKS (FILE STREAM W LOOKS TAB FILEPOS) +%%GET-ENCLOSING-SIGNED-BYTE (ELEMENT-TYPE NBITS) XCL::WALK-TAGBODY (XCL::FORM XCL::CONTEXT) +FLONUM-TO-STRING (X ROUND POINTPLACE) PFI.HANDLE.* (EXPR LINEGUESS) TOPPATHS (FIELD DECS LST TL) +PRODUCE (VAL) REFLECT/GRAPH/VERTICALLY (GRAPH H) EQUAL.CH.NAMES (NAME1 NAME2) PRINTHISTORY2 (INPUT +FILE X FL NOVALUES) EDITLOADFNS? (FILES) DO.EDIT.PP (\BUFFER TTSCRATCHFILE) COURIER.BROADCAST.CALL ( +PROGRAM PROCEDURE PGMDEF DESTSOCKET# ARGS RESULTFN RT HOPS) COMPILER::META-EVAL-UNWIND-PROTECT (COMPILER::NODE + A0679 A0678 A0681 A0680 COMPILER:CONTEXT) CHAT.ICONFN (WINDOW OLDICON) \FM.WINDOWEXTENT (WINDOW +EXTENT) \POSTSCRIPT.SPECIALOUTCHARFN (STREAM CHAR) MMLTLIST (KLIST PT M11 M12 M13 M21 M22 M23) +\FM.MAKELINKS (WINDOW ITEM) COPY.TEXT.TO.IMAGE (IMAGESTREAM FONTS FONTARRAY INFILE MAXFONT LEFTMARGIN +CURRENT.X TAB.WIDTH CURRENT.STOP) TTDELETECHAR (PREV) SEDIT::SET-DEPTH (SEDIT::DEPTH SEDIT::X) +TYPE-VARIABLE-FROM-TYPE-NAME (TYPE-NAME BASE LEN FATP PREFIX PREFIX-LENGTH) GETDEFCOM0 (COM Y X) +REMOVEDUPS (LST) DISPLAYP (STREAM) \NSRANDOM.WRITE.SEGMENT (SESSION HANDLE FIRSTBYTE BYTESTOSTORE +BUFFERS BULKSTREAM) GLOBALVARS (A) XCL::WALK-TAGBODY-1 (XCL::CONTEXT) \BREAKAPARTATWSTRUCTURE (ATWLST +ATW) \VAMFilePageNumber (fileType filePageNumber volumePageNumber) BitFieldFirst (FD) OPT.LBDEL (TAG +DEF) GETDEFCURRENT (TYPE NAME OPTIONS COMS) /SETSEPR (RDTBL LST FLG) SET/LABEL/SIZE (STREAM LAB SCALE) + XCL::UNDOABLY-SETF-MACRO-FUNCTION (XCL::X) COMPILER::FRAME-ANNOTATE-PROGN (COMPILER::SELF COMPILER::STMT +) SCAN.LESSP (SCAN1 SCAN2) COMPILER::META-EVAL-THROW (COMPILER::NODE A0675 A0674 A0677 A0676 COMPILER:CONTEXT +) \FM.UPDATEGROUPEXTENT (GROUPS ID SUBID ITEM) \POSTSCRIPT.PRINTSLUG (STREAM IMAGEDATA CHAR) +COMPILEDFETCHFIELD (X DESCRIPTOR FT OFF) \LFCloseDirectory (vol) \FM.READUSERDATA (DESCRIPTION X ITEM) + SEDIT::SELECT-NEXT-GAP (SEDIT::INDEX SEDIT::CONTEXT) ALLPATHS (LST PR) DRAWDASHEDLINE (WIDTH X2 Y2 +ADJACENT OPPOSITE DASHING OPERATION STREAM COLOR) GENERATEFN (FN) OPT.UBDEL (CD) PRETTYPRINT (FNS) +CANONICAL.CH.NAME (NAME) DRAWLINE (X1 Y1 X2 Y2 WIDTH OPERATION COLOR DASHING) PRETTYPRINT3 (FN) +COMPILEDREPLACEFIELD (X DESCRIPTOR FT OFFSET NEWVALUE) RECORDCHAIN (LST) REFLECT/GRAPH/HORIZONTALLY ( +GRAPH W) MOVETO (X Y) AU-REVOIR (VAL##) MSFINDP (SUB) LAYOUTFOREST (NODELST ROOTIDS FORMAT BOXING FONT + MOTHERD PERSONALD) SEND.FILE.TO.PRINTER (STRM PRINTOPTIONS) SI::PRINT-TRACED-CL-ARGLIST ( +SI::SMALL-INDENT) SQRT (N X) \CHARWIDTH.HDCPYDISPLAY (FONTA0700 CHARCODE STREAM) CL::SXHASH-PATHNAME ( +PATHNAME) \FM.TRANSPOSEVERT (WINDOW NEWHEIGHT OLDHEIGHT) APPENDIDENTIFIER.IP (STREAM STRING) +BYTESININT.IP (N) \FM.MAKEBITMAP (ID WIDTH HEIGHT BOXOFFSET BITMAP LABEL FONT STREAM) +\DSPRIGHTMARGIN.HDCPYDISPLAY (DISPLAYSTREAM) DSPBACKCOLOR (COLOR) OPENIPSTREAM (IPFILE OPTIONS +MARGINREGION FILE) FIELDLOOK (FIELDNAME) CL::%%SXHASH (CL::OBJECT) MB.SELFN (FN OBJ TSEL W) +MB.SETIMAGE (OBJ MBTEXT MBFONT) XCL::SETF-GET-PROCESS-PROFILE (XCL::PROCESS) /SETD (A N V) +TEDIT.HARDCOPY.PAGEHEADING (TEXTSTREAM IMAGESTREAM PARALOOKS TEXTOBJ HEADINGTYPE CHNO FORMATTINGSTATE) + COMPILEDNCREATE (X) DSPBOTTOMMARGIN (YPOSITION) COMPILER::META-EVAL-TAGBODY (COMPILER::NODE COMPILER:CONTEXT +) UNIX-READ (STREAM CH) \TEDIT.HCPYLOOKS.UPDATE (TEXTOBJ BASEA0795 N ARR VAL BASEA0796 BASEA0797 +BASEA0798 BASEA0799 BASEA0800 BASEA0801 BASEA0802 BASEA0803) READ-AFM-FILE (FILE PSCFONT IFILE +BOLDNESS ITALICNESS A W) XCL::WALK-PROG (XCL::FORM XCL::CONTEXT) DSPCOLOR (COLOR) \UFS.CREATE.DEVICE ( +NAME EVENTFN) \FM.TRANSPOSEHORZ (WINDOW NEWWIDTH OLDWIDTH) \TEDIT.PARSE.CHARLOOKS.LIST (TEXTOBJ) +\LFDeleteFile (fileName stream dev) \FM.GETBITMAPS (ID ITEMREGION FONT WIDTH HEIGHT HIGHLIGHTREGION +BOXSHADE BOX) COMPILER::FRAME-ANNOTATE-MV-CALL (COMPILER::SELF COMPILER::ARG) SEDIT::REVIVE-NODE ( +SEDIT::SUBNODE) PRETTYCOM (PRTTYX ATM) RECLOOK1 (DECS DEC AVOIDDECS RECNAME) +\UNVISIBLE.FLUSH.OPEN.STREAMS (FDEV) ADIEU (VAL##) SEDIT:RESET-COMMANDS (SEDIT::COMMANDS) FW-OPENP ( +FNAME L2) CH.ADD.MEMBER (DONTCHECK PROPERTY) LISPXREPRINT (X) \DSPFONT.HDCPYDISPLAY (HDCPYDSTREAM +CSINFO) MINIMUMWINDOWSIZE (WINDOW) EQLENGTH (N) UNIX-BACKFILEPTR (STREAM) PARSE.NSNAME (%#PARTS) +\UNVISIBLE.PAGED.REVALIDATEFILELST (DEVICE FN) \DSKEventFn (Event Dev VAL) SUBPAIR (EXPR A D) +SEDIT::AWAKE-COMMAND-PROCESS (SEDIT::CONTEXT) OPT.LBMERGE (FROM REFS X) COMPILER::META-EVAL-SETQ ( +COMPILER::NODE A0673 A0672 COMPILER:CONTEXT) FW-CLOSE-OLD-OFD-WINDOWS (OFD) MB.DISPLAY (STREAM OBJ X +OBJBOX FONT TEXT) PRETTYDEF1 (X) FW-CLOSEFN (W) \TEDIT.PARSE.PARALOOKS.LIST (SPEC) /SETBRK (RDTBL LST +FLG) TEDIT.SKIP.SPECIALCOND (TEXTSTREAM IMAGESTREAM PARALOOKS HEADINGTYPE CHNO) FILEFNSLST (FILE) +\UFSEventFn (Event Dev VAL) SET/LAYOUT/POSITION (NODE POS) \TEDIT.GET.SINGLE.PARALOOKS (FILE N WIDTH +FILEPOS LOOKSLEN TEXTOBJ) DSPFONT (FONT) FILEPKG.CHANGEDFNS (CHANGES) FILECHANGES (FCEXPR) +SEDIT::MAP-COMMENT-INDEX (SEDIT::NODE SEDIT::START SEDIT::OPEN-NODE) \UFSDirectoryNameP (DIRSPEC DEV +#:G105) \VFMSaveBuffer (notAll) TRANSLATE.LOCF (ARGS) COMPILER::FRAME-ANNOTATE-MV-PROG1 (COMPILER::SELF + COMPILER::STMT) XCL::SAVE-CURRENT-EXEC-PROFILE (XCL::PROFILE) PSCFONT.WRITEFONT (FONTFILENAME PF S +STREAM W) CL:MACROEXPAND-1 (CL::ENV) DO.DELETE.LINES (%#LINES TOTALHEIGHT BOTTOM WIDTH) DSPLEFTMARGIN +(XPOSITION) U-CASECODE (CHAR) MKPROGN (X) UNIQLIST (LIST PT) PFI.HANDLE.PUTPROPS (EXPR NAME PROP) +\UFSGenerateFiles (FDEV #:G108) RECFIELDLOOK (RECLST Y X FIELD) APPENDBYTE.IP (STREAM BYTE) +\UFSSetFileInfo (DEVICE #:G107 STREAM ATTRIBUTE ERRNO) \UFSOpenFile (FDEV #:G100 ACCESS RECOG FILE +FULLNAME REC ACC ERRNO OTHERINFO) \TEDIT.UPDATE.SHOWSEL (TEXTOBJ SHADEHEIGHT SHADE) PRETTYDEFCOMS ( +PRTTYCOMS L) CH.NAME.TO.STRING (NSNAME FULLNAMEFLG) DSPLINEFEED (DELTAY) PRINTDATE (OUTSTREAM DAT) +TEDIT.BUILD.PCTB (N WIDTH TEXTSTREAM CHARLOOKSLIST PARALOOKSLIST) TRYNEXT (PLST## VAL## ENDFORM##) +\UFSGetFileName (FILENAME RECOG DEV) \UFSWritePages (stream ESIZE CSIZE buffers streamFirstPage fileID + ERRNO) D-ASSEM::EMIT-BYTE (BYTE) PRINTDATE1 (OUTSTREAM DAT TERMINATING.STRING) CH.ADD.GROUP.PROPERTY +(DONTCHECK X PROPERTY DATASTREAM) XCL::WALK-PROG* (XCL::FORM XCL::CONTEXT) DSPOPERATION (OPERATION) +PRETTYDEF0 (MADEFILE) \10MB.LOADINPUTQ (NDB) FILEPKG.MERGECHANGES (C2 C1) \UFSTruncateFile (needSize +curEof FILEPTR ERRNO DT) HARDCOPYSTREAMTYPE (IMAGESTREAM) DSPRIGHTMARGIN (XPOSITION) D-ASSEM::FIXUP-NTENTRY + (CL:SYMBOL D-ASSEM::BASE D-ASSEM::OFFSET D-ASSEM::HIBYTE D-ASSEM::WORD) SCALE-EXPONENT (X) +PFI.HANDLE.PUTDEF (EXPR) OPT.JUMPTHRU (OPT.DEFREFS TAG DEF LEVEL) \UFSDeleteFile (DEV #:G104 FILENAME +ERRNO) SEDIT:REPLACE-SELECTION (SEDIT::CONTEXT SEDIT::SELECTION SEDIT::SELECTION-TYPE SEDIT::S +CL:STRUCTURE SEDIT::POINT) CH.ISMEMBER (PROPERTY NAME) TTDELETEWORD (N TAIL) DSPTOPMARGIN (YPOSITION) +SPECVARP (X FN) COMPILER::META-EVAL-RETURN (COMPILER::NODE A0671 A0670 COMPILER:CONTEXT) +D-ASSEM::TYPE-NAME-FROM-SIZE (D-ASSEM::LEN) \FM.INITCORNERSFN (WINDOW LEFT BOTTOM) \LFRenameFile ( +OLD-DEVICE NEW-DEVICE dir FILESPEC oldPtr) \FM.GETREGIONS (ID FONT HL HIGHLIGHTWIDTH HIGHLIGHTHEIGHT +MAXWIDTH MAXHEIGHT LEFT BOTTOM) \UFSCloseFile (DEVICE ERRNO) SEDIT::REPLACE-ROOT (SEDIT::CONTEXT +SEDIT::ROOT SEDIT::SUBNODES) TRACKW (DX DY) DSPSCALE (SCALE) \UFSRenameFile (OLD-DEVICE NEW-DEVICE +OLD-NAME NEW-NAME NEWUNIXNAME ERRNO) TTYINENTRYFN (WINDOW) GETSYNTAX (TABLE VAL KEY DEF C) +PSCFONTFROMCACHE.SPELLFILE (FAMILY SIZE FACE) /SETA (A N V) \GTREADTABLE1 (X) MAKEACCESS1 (TYPE +RECTYPE NEWVAL BODY) \TEDIT.CARETLOOKS.VERIFY (TEXTOBJ NEWLOOKS) \UFSeol (RECOG FILENAME) EMPRESS ( +FILE HOST PRINTOPTIONS) INVERTED/SHADE/FOR/GRAPHER (NB) /PUTDQ (X Y) D-ASSEM::COPY-LAP-FN (D-ASSEM::FN +) \DOFORMATTING.HARDCOPY (FMTSPEC QUAD SPACELEFT TEXTOBJ BASEA0787 CHLIST BASEA0788 BASEA0789 +BASEA0790 WLIST BASEA0791 BASEA0792 BASEA0793 N ARR VAL BASEA0794) \TERMCLASSTOCODE (CLASS) \UFSError +(ERRNO NO) UNECCSPEC (VAR FN) \FM.FILLWINDOW (WINDOW REGION SHADE) \READCLASSTOCODE (CLASS) +\LFTruncateFile (needPages curPages curEof FILEPTR) \FM.CREATEITEM (ID FONTDEFAULT FONT REGIONS TYPE +LABEL GROUPID BITMAPS ITEM) DSPXPOSITION (XPOSITION) PSCFONTFROMCACHE.COERCEFILE (EXPANSION FAMILY +SIZE WEIGHT SLOPE ROTATION DEVICE) \UFSGetFileInfo (DEVICE #:G106 STREAM ATTRIBUTE ERRNO) +\GETREADSYNTAX (C TABLEA0392 TBL B E) OPT.JUMPOPT (X) SEDIT::CHARCODE (CL:CHAR) \UFS.ADD.HOST.FIELD ( +DEV) \PFRoomForFile (groupPtr filePtr vol) SEDIT:GET-SELECTION (SEDIT::CONTEXT SEDIT::SELECTION TYPE +STRING SEDIT::END SEDIT::CHARS) \GETTERMSYNTAX (C TABLEA0389 TBL) PRETTYVAR1 (VAR DEF LASTCOL) +DSPYPOSITION (YPOSITION) \UFSReadPages (buffers streamFirstPage stream fileID) MAKEDEFLIST (X PROP) +OPT.XVARSCAN1 (CD A) D-ASSEM::REF-VAR (D-ASSEM::VAR) %%SORT-SUBLIST (START END MID PRED) GETDEFCOM (X +Y) DWIMIFY1? (FORM) FIX-FORM (INPUT) \UFS.FULLNAME (DEV) \UFS.OPENP (DEV COMPAREFN UNIXNAME) COMPILER::FRAME-ANNOTATE-LAMBDA (COMPILER::SELF COMPILER::OPT-VAR COMPILER::KEY-VAR COMPILER::*REFERENCES* - COMPILER::REFERENCE COMPILER::REQUESTS) \\PROCESS.MOVEFRAME (OLDFRAME) XCL::SETF-PROFILE-ENTRY-VALUE -(CL:VARIABLE XCL::VALUE) \\TEDIT.SELECT.CHARACTER (TXB LINE SELWINDOW DS OBJBOX TEXTOBJ X Y -SELOPERATION) BRECOMPILE3 (FN FILEMAPLST) NEW/INSTANCE/OF/GRAPHNODE (GN NEW) \\GETFILENAME (RECOG) -IMAGEBOX (OBJ STREAM MODE) \\GENERATEFILEINFO (GENOBJ ATTRIBUTE) COMPILER::FRAME-ANNOTATE-IF (COMPILER::SELF -) WRITE-UNICODE-MAPPING-FILENAME (FILE CSETINFO RANGES) FB.CREATE.FILEBUCKET (BROWSER NAMELENGTH CHAR -FILEINFO) \\TEDIT.FORMAT.FOUNDBOX? (PAGEREGION) EDITCONT (FLG LC2) \\PRIMARYTEXTURE (PRIMARY LEVEL -TEXTURE) DECODE-NS-STRING (STR STRING OFFSET LENGTH LASTOFFSET BASE FATSTR) \\GENERIC.READCCODE (RDTBL - FILE CHA1814 EOLCA1813 CHA1816 EOLCA1815) FUNCTIONSMSMC (NAME TYPE REASON) BRHL/LAYOUT/DAUGHTERS (DS -Y X MOMLST) \\FM.UNSCROLLWINDOW (WINDOW) \\PEEKBIN (STREAM NOERRORFLG) \\NSIN.24BITENCODING.ERROR ( -STREAM) OPENPRSTREAM (PRFILE OPTIONS) PFI.CHOOSE.BEST (LST) FINDSYSRECDECL (DATUM) \\PROCESS.DEFPRINT -(PROC STREAM) \\TEDIT.FORMATTEDP1 (FILE N WIDTH) \\TEDIT.CLEAR.SCREEN.BELOW.LINE (WINDOW TEXTOBJ LINE) - OPT.XVARSCAN (X) FB.INSERT.FILE (BROWSER FILE TBROWSER ITEM FBSORTFN FD1 FD2 MYDATA) -XCL::PROFILE-VALUE-TYPE-CHECK (XCL::DEFINITION) INSURE.RGB.COLOR (COLOR) \\ENQUEUE.TIMER (TIMER) -PRETTY-TYPE-NAME (TYPESPEC OTHER NAME X) FB.COPY/RENAME.COMMAND (FBROWSER CMD MOVEFN OLDNAME) -VARIABLESMSGETDEF (NAME SOURCE OPTIONS) BRHL/MOVE/RIGHT (GN STACK X W NEWX NSTACK) -CL::BUILD-COPIER-TYPE-CHECK (CL::PS) RECOMP? (FNS X) MSPATHS (FROM X SEEN) FB.INSERT.SUBDIRECTORIES ( -FILES FD1 FD2 BROWSER) MB.NWAYMENU.NEWBUTTON (OLDBUTTON BUTTON ARBITRATOR TEXTOBJ CH#) -\\TEDIT.GET.CHARLOOKS (FILE FLAGS LOOKSARRAY N WIDTH) FB.COPYTEXTCOMMAND (BROWSER) PACKFILENAME (N X -BLIP) \\TTYBACKGROUND (X) \\FM.RESHAPEFN (WINDOW OLDREGION OLDWIDTH MINWIDTH NEWWIDTH OLDHEIGHT -MINHEIGHT NEWHEIGHT) \\PROCESS.INIT (DONTRESET) COMPEM (X) PRINTFILEPROP (PRINTFILETYPE PROP) -\\GETSYSBUF (R) \\DO.PARAMS.AT.OPEN (PARAMETERS FN ACCESS) \\WRITEPRESSBITMAP (BM PRSTREAM PRDATA XPOS - YPOS STREAM W WW HT) MINIMUMWINDOWSIZE (WINDOW) \\FM.REDISPLAYMENU (WINDOW ITEM) \\DRAWCURVE.PRESS ( -PRSTREAM BRUSH KNOT CLOSED) \\PROCESS.EVENTFN (EVENTNAME) CONVERT.FILE.TO.TYPE.FOR.PRINTER (FILE -PRINTERTYPE SCRATCH PRINTOPTIONS HEADING) C.FLOATBOX (A) INSPECT/ALIST (ALST X WHERE) \\NSYSBUFCHARS ( -R W) \\SPP.INFO.HOOK (BUTTON PROC) CONVHANKAKU (ARGS) FB.COPYBINARYCOMMAND (BROWSER) FINDRECDECL ( -DATUM) \\SAVESYSBUF (CH) FIND.START.OF.WORD (X CH) MSSEEKTYPE (TYPE) SETFILEINFO (ATTRIB VALUE) -\\OPENFILE (ACCESS PARAMETERS RECOG STREAM-FDEV) OLDFAULT1 (FAULTX FAULTARGS) \\IOMODEP (STREAM -NOERROR) FB.SORTCOMMAND (TBROWSER) MB.NWAYBUTTON.SELFN (SEL OBJ BUTTONIMAGES BUTTONWIDTHS BUTTONY -BUTTONX BUTTONLIST BUTTONHEIGHT MOUSEX MOUSEY W OLDSTATE) COMPILER::FRAME-ANNOTATE-CATCH ( -COMPILER::*REFERENCES* COMPILER::SELF COMPILER::REQUESTOR COMPILER::REFERENCE) \\KEYBOARDINIT ( -KEYNUMBER) OPEN (FILENAME DIRECTION ELEMENT-TYPE STREAM) TRACKW (DX DY) \\TEDIT.ACTIVE.WINDOWP (W) -XCL::PROFILE-ENTRY-VALUE-NAME (CL:VARIABLE XCL::PROFILE) CL::BUILD-COPIER-SLOT-SETFS (CL::SLOTS) -\\GR.WITHRESOURCEMAC (X) SEDIT::UNDO (SEDIT::PROMPTWINDOW) MSSEEK-WORD (LST WORD) KEYACTIONTABLE (X) -\\FM.OPENFN (WINDOW) \\DRAWLINE.PRESS (X1 Y1 X2 Y2 WIDTH OPERATION PRSTREAM COLOR) BLOCKCOMPILE1 ( -BLKNAME X) /RPLNODE (A D) INSPECTABLEFIELDNAMES (DECL) WRITE-UNICODE-MAPPING (INCLUDECHARSETS) -XCL::PROFILE-ENTRY-VALUE (XCL::PROFILE CL:VARIABLE) \\GENERIC.OUTFILEP (DEV NAME) MOUSECHORDWAIT ( -MSECS) \\RESHOWBORDER1 (NEWBORDER OLDBORDER REGION OLDSAVE) BREAK.PROCESS (PROC P) -\\TFBRAVO.SPREAD.LOOKS (RUN INSTR LOOKS) FUNCTIONSMSGETDEF (NAME SOURCE OPTIONS) BRHL/LAYOUT (MOMLST X - W Y N) RELDSPYOFFSET (DY DISPLAYSTREAM) MENU (MENU POSITION) MB.MARGINBAR.SIZEFN (OBJ BOX) -BRECOMPILE1 (FN/BLOCK LST NAME ADRLST0) MAPFILES1 (FILESPEC FILEGROUP FN) FB.ALPHABETIC.ATTR (X Y) -MB.NB.PACKITEMS (WIDTH SPACING) PAINTW.SHADE.LABEL (FILLING BM) TEDIT.SCAN.LINE (THISLINE TEXTOBJ LINE - BASEA1544 LLIST BASEA1545 CHLIST BASEA1546 BASEA1547 BASEA1548 BASEA1549 SELOPERATION Y WINDOW -EXTENDING BASEA1550 WLIST TEXTLEN) KEYACTION (KEYNAME TABLE NUMB) DEFAULTMENUHELDFN (ITEM) -\\RENAMEFILE (NEW-DEVICE) TEDIT.CREATEW (PROMPT PROPS FILE) BRHC/OFFSET (N GN D) CL::DEFINE-COPIERS ( -CL::PS) \\HANDLE.RAW.3TO10 (TYPE) REMOVEITEM (X LST Y) OPT.POSTOPT (TAG) COMPILER::FRAME-ANNOTATE-CALL - (COMPILER::SELF COMPILER::ARG) \\ALLOCLOCKED (NCELLS BLOCK) \\PRINT-REVALIDATION-RESULT (STREAM -RESULT) CL::DEFAULT-CONSTRUCTOR-NAME (CL::STRUCTURE-NAME) COMPILER::FRAME-ANNOTATE-GO (COMPILER::SELF) - TTRACKMOUSE (END) TTSETCURSOR (COL ROW) COMPILER::FRAME-ANNOTATE-LABELS (COMPILER::SELF COMPILER::PAIR -) PAINTW.CACHE.SHADE (SHADE) MAYBE.PRETTYFILEINDEX (FILENAME PRINTOPTIONS) BITBLT.INSERT (X Y WIDTH) -ALISTP (LST) RELDSPXOFFSET (DX DISPLAYSTREAM) PPROC1 (PROC FILE) MB.MARGINBAR.TABTRACK (OBJ STREAM -CLIP UNIT) NEWFAULT1 (FAULTX FAULTARGS) PPROC (FILE NOW) \\PROCESS.MAKEFRAME0 (FN&ARGS FRAME FN ARGS) -FB.INCREASING.NUMERIC.ATTR (X Y XVAL YVAL) FB.CANONICAL.DIRECTORY (FBROWSER PWINDOW OLDTTYPROC -OLDTTYSTREAM DIRNAME CMD) RESHOWBORDER (BORDER WINDOW) FLUSHRIGHT (FILE X MIN) \\ENDPAGE.PRESS ( -PRSTREAM ELSTREAM) \\BUFFERED.REVALIDATEFILELST (DEVICE FN) RESTOREMAP (STREAM) CONDITIONS:INVOKE-DEBUGGER - (CONDITION) \\GETKEY (\\KEYBOARDWAITBOX) GETWINDOWPROP (PROP) \\PAGED.REVALIDATEFILES (LIST FN DEVICE -) \\TRUNCATEFILE (STREAM LASTPAGE LASTOFFSET) BSPHELP (MSG) \\FILE-CONFLICT (NAME DEVICE FILENAME -ACCESS EXISTING-ACCESS-MODE) \\RESETKEYBOARD (KEYNUMBER) PPROCRESHAPEFN (WINDOW OLDCONTENTS REGION) -\\TEDIT.ADJUST.LINES (DY LINETOP TEXTOBJ WINDOW) MSWORD? (X) WRITE-UNICODE-MAPPING-HEADER (STREAM LINE - CSETINFO RANGES R) FB.EDITCOMMAND (BROWSER OPTION ITEM MENU KEY) CL::BUILD-CONSTRUCTOR-SLOT-SETFS ( -CL::PS CL::ARGUMENT-LIST CL::SLOT CL::ARGUMENT CL::SLOTS) CONDITIONS:INVOKE-RESTART (CONDITIONS:RESTART - CONDITIONS::ARGUMENTS) ONEDINSPECT.SCROLLFN (WINDOW DY RIGHTWINDOW FLG DX) \\SHAPEW2 (REGION -OLDREGION WBORDER OLDCLIPREG) SCROLLBYREPAINTFN (WINDOW DSP EXTENTUSE) \\TFBRAVO.WRITE.RUNS (PARA -INFILE PARALOOKS TEXTOBJ) TTBEFOREPOS (X Y) CONDITIONS:INVOKE-RESTART-INTERACTIVELY (CONDITIONS:RESTART -) \\KEYBOARDEVENTFN (EVENT X) MDESCALE (UNIT VAL) COMP.UNBOX (TYPE) |ExtensionForPrintFileType| (TYPE) - \\MENU.ITEM.SELECT (MENU COLUMN ROW) SEDIT:GET-FORMAT (SEDIT::FNAME) \\UPDATE.PBT.RASTERWIDTHS ( -PAGENO) PPROCREPAINTFN (WINDOW) INSPECT/PLIST (PLST X WHERE) FB.DECREASING.NUMERIC.ATTR (X Y XVAL YVAL -) COPYGRAPH (GRAPH) XCL::IN-PROFILE (XCL::PROFILE) PPROCEXTENT (WINDOW H) MULTIFILEINDEX1 (FILES -*STANDARD-OUTPUT*) MSSPLST (MEANING WORD) EXTEND/TRANSITION/CHAIN (LTC RTC) \\SHOWTEXT (TEXTOBJ) -COMP.UBFLOAT2 (OP) KEYBOARDTYPE (MT) DSPFILL (STREAM TEXTURE OPERATION) \\ADD.PACKET.FILTER (FILTER) -INFILEP (FILE) COPY (VAL) \\KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS (CAPS-LOCK-ACTIONS) DELFROMCOM1 (NAME - FLG) DELFROMCOM (COM NAME TYPE) CH.CREATE.ALIAS (ALIAS) FONTNAME.IP (FONTDESC) \\DEL.PACKET.FILTER ( -FILTER) ALIGNMENTNODE (NODESPEC GRAPH) TEDIT.SELECT.LINE.SCANNER (TEXTOBJ WINDOW LINE.LIST WREG Y -REGION THISLINE X SELOPERATION EXTENDING TEXTLEN) SEDIT::WALK-UP-TREE (SEDIT::FN SEDIT::NODE SEDIT::CONTEXT -) RESHAPEBYREPAINTFN (WINDOW IMAGEREGION DSP OLDWIDTH OLDHEIGHT NEWSCREENREGION OLDIMAGE) MSVERB ( -TENSE) RAISE/TRANSITION/CHAIN (TC RAISE) EXTENDPASTVERTBOUNDARIES (VIEW EXTENT) DWIM-SYMBOL-PACKAGE ( -SYM) CAN.PRINT.DIRECTLY (FILETYPE PRINTERTYPE) NESTED.SUBMENU.POS (IMENU STREAM ITEMS ITEM GRIDSPEC -BORDER DD) PFI.ENQUEUE (FORM) SEDIT:RESET-FORMATS (SEDIT::DONT-REPARSE?) NOSUCHATOM (ATM) -PACKFILENAME.STRING (N X BLIP) BITBLT.DELETE (X WIDTH Y MOVEDWIDTH) COMPILEUSERFN1 (Y) GETFILEINFO ( -FILE ATTRIB) COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::SELF COMPILER::*REFERENCES* COMPILER::REQUESTOR - COMPILER::REFERENCE) IDLE.SHOW.OPTIONS (TAIL) CL::EQLHASHBITSFN-UFN (ARG-PTR) GET-RIGHTW ( -DISPLAYWINDOW RIGHTWINDOW FONT) SHAPEW1 (REGION OLDREGION WBORDER OLDCLIPREG) PROCESS.STATUS.WINDOW (P - PROCS WINDOW) \\TFBRAVO.EOLS (N TEXTOBJ) TTNEXTPOS (COL) SASSOC (KEY) HRULE.COPYFN (IMAGEOBJ TOSTREAM -) ADDMENU (DONTOPENFLG) EDIT4E1 (X) SEDIT::VERIFY-STRUCTURE (CL:STRUCTURE SEDIT::CHECK-STRUCTURE) -SHADEITEM (SHADE MENU NEWSHADE) FULLNAME (X) \\TEDIT.FIXINSSEL (TEXTOBJ CH#1 DCH) MSOBJTYPE (MSVERB) -\\PAGED.REVALIDATEFILELST (DEVICE FN) FEDITFINDP (AT LST) GETBOXPOSITION (BOXWIDTH BOXHEIGHT ORGX ORGY - WINDOW PROMPTMSG) CL::BOA-CONSTRUCTOR-P (CL::CONSTRUCTOR) \\TEDIT.CREATEW.FROM.REGION (PROPS PROMPT -REGION FILE) \\FILE.NOT.OPEN (X) PRESSBITMAP (FILE PRSTREAM BITMAP PRESSPAGEWIDTH PRESSPAGEHEIGHT) -SKOR0 (TWORD NCTWORD NCXWORD NDBLS LST) NSPRINTREQUEST.STATUS (PRINTER REQUESTID) FB.REMOVE.FILE (ITEM - TBROWSER FD1 FD2 FBROWSER) TWODINSPECT.SCROLLFN (WINDOW DX TOPWINDOW FLG DY RIGHTWINDOW) RELMOVEW ( -POS) WIDTHIFWINDOW (INTERIORWIDTH BORDER) \\TFBRAVO.READ.USER.CM (RDTBL) \\NOFILESINFOFN (GENSTATE -ATTRIBUTE) COMP.DECLARETYPE (X) HEIGHTIFWINDOW (INTERIORHEIGHT BORDER) VARSBOUNDINEDITCHAIN (EDITCHAIN -) \\GETCHARCODE (C X) PRINCOPY (X) \\KEYNAMETONUMBER (KEYNAME) MB.NB.SIZEFN (OBJ RIGHTMARGIN SLACK -MAXWIDTH MINHEIGHT BUTTONWIDTHS SPACING MINWIDTH MAXHEIGHT BUTTONHEIGHT) PFI.NEW.LISTFILES1 (FILENAME -PRINTOPTIONS) INSPECT/TOP/LEVEL/LIST (LST WHERE) EXTENDPASTHORIZBOUNDARIES (VIEW EXTENT) \\SPP.PROBE ( -CON) CHECKTRAN (X) PFI.CONSTANTNAMES (EXPR X) CL::BUILD-CONSTRUCTOR-ARGLIST (CL::SLOT CL::SLOTS) -\\ILLEGAL.DEVICEOP (N) BRACKET.CURRENT.WORD (LINE ENDLINE X CH COL) HRULE.PUTFN (HRULE OUTPUT.STREAM) -\\FILE.WONT.OPEN (X) ADDNEWCOM (NAME TYPE LISTNAME FILE COMSNAME) DEFINEFONT.IP (IPSTREAM FONT IPDATA) - \\UNCOMMA (X TAIL BCAR BCDR) GRAPHOBJ.FINDGRAPH (WINDOW DS REG) \\PSWOP.SELECTED (ITEM P BUTTON MENU -|\\DurationLimit|) \\PSW.SELECTED (ITEM MENU) IN/SCROLL/BAR? (WINDOW X Y) CL::SXHASH-UFN (ARG-PTR) -SHOWSTACKBLOCK1 (PTR GOODFLG STR) HEADINGOP.IP (IPSTREAM) PRINTCONSTANT (VAR FILE CONSTANTLIST) -NSPRINTER.PROPERTIES (PRINTER) COMPILEUSERFN (Y) GRAPHOBJ.DISPLAYFN (GROBJ STREAM SCALE GRAPH) -IDLE.BITMAP (REGION WIDTH HEIGHT FONT) \\ONSCREENCLIPPINGREGION (WIN) \\TFBRAVO.INIT.PARALOOKS ( -USER.CM.LOOKS MICASPERPOINT) BRHC/LAYOUT/TERMINAL (X/SW GN) \\CLOSEF.PRESS (PRSTREAM PRDATA STREAM W -DDFILEPTR) \\FDECODE/BUTTON (BUTTONSTATE) BMOBJ.GETFN5 (INPUT.STREAM) \\CREATECHARSET.PRESS (CHARSET) -CH.DELETE.OBJECT (STREAM) TTYIN.READ?=ARGS (TTSCRATCHFILE) ESUBST1 (X) EDITFINDP (X) SEDIT::UPDATE ( -SEDIT::CONTEXT SEDIT::SELECTION SEDIT::WINDOW SEDIT::SCROLL?) \\TEDIT.FIXDELSEL (TEXTOBJ CH#LIM DCH -CH#1) MSSUBJTYPE (MSVERB) HRULE.GETFN (INPUT.STREAM) \\NSPRINT.ENQUIRE (OP) GRAPHEROBJ (GRAPH HALIGN -VALIGN OBJ REG) EDITL (L COMS ATM MESS EDITCHANGES) \\KEYACTION1 (TABLE TI ACTION X PAIR) -TWODINSPECT.ARRANGEWINDOWS (DISPLAYWINDOW TITLEWINDOW ROWPROPS RIGHTWINDOW TOPWINDOW ROWPROPSPACE -COLUMNWIDTHS COLUMNPROPSPACE TOPRIGHT REGION CORNERWINDOW) PPROMPT3 (ITEM) TTSKIPSEPR (END CH) -COMP.LOOKFORDECLARE (Z) \\IS.NOT.RANDACCESSP (N THING) FB.MAKE.BROWSER.BUSY (BROWSER DONTWAIT MENU) -DETACHWINDOW (WINDOWTODETACH MAINWINDOW MAINW WHEREAT) SHOWSTACKBLOCKS (ORIG EASP) ADDTOCOM (TYPE COM -NAME) INVERT.LONG.SEGMENT (MODE) MB.NB.WHENOPERATEDFN (OPERATION OBJ STATE DS) DINFO (WINDOW.OR.REGION - GRAPH.OR.FILE W NO.FREEMENU? SETUP.ONLY?) PROCESS.BACKTRACE (PROC FX CMD) PFI.VARNAME (EXPR NAME) -\\GR.METHODEXPANDER (X NAME METHOD) SEDIT::UNDO-REPLACE-ROOT (SEDIT::NODE SEDIT::CONTEXT SEDIT::OLD-VALUE -) WFROMMENU (MENU) INVERT.SEGMENT (NOSWAP LEFT BOTTOM WIDTH) SAMECLOOKS (FEATURES CLOOK1 CLOOK2) -COMP.BOX (TYPE) HRULE.IMAGEBOXFN (IMAGE.STREAM HRULE RIGHT.MARGIN CURRENT.X WIDTHS SCALE) -\\PRESS.CONVERT.NSCHARACTER (CHARCODE) COPY.SEGMENT (START END) TTYINFOSTREAM (PROCESS) NCREATE2 ( -NTYPX OLDOBJ NEW DTD) PREEDITFN (TYPE ATM X EDITCHANGES) /CNDIR (HOST/DIR) DUMPDATABASE1 (VALUE) -RIGHTW.REPAINTFN (WINDOW DISPLAYW VERTMARKS ROWPROPS TOP BOTTOM ROWPROPWIDTH FDESCENT) TTY/EDITE ( -IFCHANGEDFN COMS ECHOFILE) \\UPDATE.PROCESS.WINDOW (WINDOW) BMOBJ.PUTFN (BMOBJ BITMAPOBJ STREAM) -CREATESCROLLINGW (TITLE BORDER) FB.FINISH.COMMAND (W MENU) EDITFA (TYPE DEF) DSPSCROLL (DISPLAYSTREAM) - CL::BOA-ARG-LIST-WITH-INITIAL-VALUES (CL::ARG-LIST CL::PS CL::NEW-ARG-LIST CL::OPTIONAL CL::SLOTS) -KEYDOWNP (|\\BitMask| BASE |\\ByteNo| OFFST POSITIONA1767 KEYNAME) SEDIT::UNDO-EVENT (SEDIT::CONTEXT -SEDIT::SUBEVENT) BAKTRACE (IPOS SKIPFN FLAGS EPOS) DELETE.LONG.SEGMENT (START END) MSTRYPARSE (FN ARGS -) EDITF2 (EXPR ATM) ADJUSTOFFSETS (WINDOW YDELTA DSP XDELTA) ATTACHEDWINDOWS (WINDOW AWS) -MB.MARGINBAR.SELFN (OBJ STREAM IMAGEBOX SELWINDOW UNIT RELX RELY CLIP RIGHTLIM A SCALEDTABS) -MENUDESELECT (ITEM) \\TEDIT.TEXTBIN.STRINGSETUP (PS STRING CHOFFSET CHARSLEFT) ATTACHWINDOW ( -MAINWINDOW WINDOWTOATTACH WINDOWCOMACTION) CH.CREATE.OBJECT (STREAM) FB.CANONICALIZE.PATTERN (SAMPLE -PATTERN PATHOSTEND) NSPRINTER.STATUS (PRINTER) PRINTERRORPUP (FILE PUP) GRAPHOBJ.PUTFN (GROBJ STREAM -DATUM OBJORIGIN) \\HUNKFIT? (N) \\TEDIT.WINDOW.OPS (TEXTOBJ WINDOWTOSPLIT WINDOWOPREGION) -COURIER.READ.SEQUENCE (STREAM PROGRAM BASETYPE) EDITDEF (NAME EDITCOMS OPTIONS) INFILEPAIRS (LST LL) -CL:PATHNAME-DIRECTORY (PATHNAME) DIRECTORYNAME (HOST CREATE?) CL::BOA-SLOT-SETFS (CL::PS) EDITF1 (EXPR - COMS ATM TYPE IFCHANGEDFN) SEDIT::TYPE-OF-INPUT (SEDIT::CONTEXT) DELETE.LONG.SEGMENT1 (STARTCOL -ENDCOL) MSTRYSPELL (WORD) \\CREATEW1 (BORDERSIZE REGION SCREEN TITLE PROPS OLDWINDOW) -FB.MAYBE.INSERT.FILE (FBROWSER ATTR CMD) DUMPDATABASE (FN) EDITFERROR (FN FLG) UNSAVEBLOCK? (FILE -BLOCK FN X) \\CHARWIDTH.PRESS (STREAM FONTDESC) DO?CMD.ERRORHANDLER (CONDITION) LOADDEF (NAME TYPE -SOURCE) HEXSTRING (WIDTH STR) GRAPHOBJ.IMAGEBOXFN (GROBJ STREAM DATUM SCALE) RNUMBER (MSG POSITION -MSGFONT DIGITFONT INCLUDEABORTFLG FLOATINGPTFLG POSITIVEONLYFLG ACCEPTTYPEINFLG) DSPEOLFN ( -DISPLAYSTREAM) COURIER.READ.STRING (STREAM LENGTH STRING BASE OFFSET) TEDITFROMBRAVO (FILIN TEXTSTREAM - NEWSTREAM USER.CM) NSPRINTER.HOSTNAMEP (PRINTERNAME) BRHC/LAYOUT/DAUGHTERS (DS X/SW X MOMLST) -PAINTW.READBRUSHSHADE (FILLPAT) CL:PATHNAME-DEVICE (PATHNAME) FB.COPY/RENAME.MANY (CMD FD1 FD2 MOVEFN) - MOVEW (WINDOW |POSorX| Y FORCE) CREATEW1 (BORDERSIZE PROPS OLDWINDOW) EDITH (C) MENUSELECT (ITEM) -ONEDINSPECT.ARRANGEWINDOWS (DISPLAYWINDOW TITLEWINDOW ROWPROPSPACE RIGHTWINDOW ROWPROPS VALUEWIDTH -VALUESPACE TOPRIGHT REGION) \\TEDIT.TEXTBIN.FILESETUP (CHARSLEFT CHOFFSET PC BYTEOFFSET OPERATION -NOERRORFLG BYTESLEFT) SHRINKW (TOWHAT ICONPOSITION EXPANDFN) EDITDEFAULT1 (X) PUPTRACE (REGION FLG) -COMP.ASET (A) GRAPHOBJ.GETFN (STREAM GRAPH) KEYNUMBERP (X) EDLOC (EDX OLDL OLDF) SHIFTDOWNP (SHIFT) -CNDIR (NEW-DEFAULTS TEMP-DEFAULTS) \\COURIER.UNKNOWN.TYPE (TYPE) MODIFY.KEYACTIONS (|KeyActions| ITEM -|action| |table|) \\FDEVINSTANCE (FDEV STREAM ATTRIB CDNAME ACCESS RECOG OTHERINFO FIRSTPAGE -BUFFERLIST ATTRIBUTE VALUE LASTPAGE LASTOFFSET NAME OLDSTREAM BYTE NOERRORFLG INDX BASE OFFSET NBYTES) - \\BITMAPSIZE.PRESS (DIMENSION BITMAP) COMP.AREF (A) INFILECOMSMACRO (ATS X PROPS PROP) %EXTEND-ARRAY -(NEW-ARRAY DIMENSIONS BASE TYPE-NUMBER TOTAL-SIZE FILL-POINTER) METASHIFT (FLG METASTATUS) EDITRAN (C -X Y \#1 \#2 \#3 L0) CL:ADJUST-ARRAY (ADJUSTABLE-ARRAY RANK NELTS ADJUSTABLE-ARRAY-ELEMENT-TYPE -DISPLACED-TO DISPLACED-INDEX-OFFSET DISPLACED-TO-BASE FATP NEW-ARRAY INITIAL-CONTENTS INITIAL-ELEMENT) - \\PAPERSIZE.IP (PSIZE) PRINTPUPDATA (PUP OFFSET MACRO FILE) MSPARSE (SENTENCE) \\SPP.CLEANUP ( -INSTREAM F) PFI.INDEX.BREAK (OLDY Y NOTERPRI) CL::ARGUMENT-NAMES (CL::ARG CL::ARG-LIST) EDITELT (LC) -DIRECTORY (FILES) %COPY-TO-NEW-ARRAY (OLD-DIMS NEW-DIMS OLD-ARRAY OLD-OFFSET NEW-ARRAY NEW-OFFSET SIZE -) DO.SHIFTED.SELECTION (STARTBUF ENDBUF) \\SETUP.TYPENUM.TABLE (SIZELST PREFIX GCTYPE TABLE) EDITCOM ( -C) HRULE.DISPLAYFN (HRULE RULEWIDTH IMAGE.STREAM WIDTHS SCALE X) CL:NAMESTRING (PATHNAME) EDOR (L) -MEMB (X) EDRPT (EDRX) HOSTNAMEP (NAME) CALLS (VAR) TTYIN.PRINTARGS (FN EQUALS ARGTYPE) DIRECTORYNAMEP -(DIRNAME DN) %ALTER-AS-DISPLACED-ARRAY (DISPLACED-TO DIMENSIONS FILL-POINTER TOTAL-SIZE) EDIT* (L N X) - \\TEDIT.APPLY.PARASTYLES (PARALOOKS TEXTOBJ STYLE-SHEET PC) PRINTVA (X) -%ALTER-AS-DISPLACED-TO-BASE-ARRAY (DIMENSIONS ELEMENT-TYPE FATP DISPLACED-TO-BASE FILL-POINTER -TYPE-NUMBER DISPLACED-INDEX-OFFSET TOTAL-SIZE) CL:PATHNAME-HOST (PATHNAME) TB.NTH.ITEM (N) EDITTO (LC2 - L FLG) FB.GET.NEW.FILE.SPEC (CMD OLDNAME) EDITCOMA (UNDOLST UF) \\USERFNISDON\'T (USERFN) -CL:FILL-POINTER (VECTOR) EDITCOML (X UF) MSERASE (ATOMS AT) EDITCOM1 (LST X) %ARRAY-CONTENT-INITIALIZE - (ARRAY INITIAL-CONTENTS DIMS) CL:ADJUSTABLE-ARRAY-P (ARRAY) \\SCALEDBITBLT.PRESS (DESTINATION -DESTINATIONLEFT OLDX DESTINATIONBOTTOM OLDY SOURCEBITMAP SCALE CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM -WIDTH HEIGHT) EDITMAC (C) \\BINS (BASE OFF NBYTES) TEDIT.SUBLOOKS (OLDLOOKSLIST NEWLOOKSLIST -TEXTSTREAM TEXTOBJ PCTB A SEL FIRSTPC OLDLOOKS FEATURELIST) EDITSAVE (COM) SEDIT::SUBNODE-CHANGED-ROOT - (SEDIT::CONTEXT) EXTENDABLE-ARRAY-P (ARRAY) \\TEDIT.NEXT.LINE.BOTTOM (LINE CURYBOT PREVLINE) -UNDOEDITCOM1 (X) SUBATOM (N M X STRING) \\BACKBIN (STREAM) \\TERMINATESPP (TIMEOUT TIMER) -CL::DEFINE-CONSTRUCTORS (CL::PS CL::CONSTRUCTORS CL::EXPORTNAME CL::CONSTRUCTOR CL::SLOTS -CL::ARGUMENT-LIST) BIN (STREAM) DO.DELETE.LINES (\#LINES TOTALHEIGHT BOTTOM WIDTH) DOUSERFNS2 (WINDOW -ARG1 ARG2 ARG3 USERFN) ICONTITLE (ICONW MSG) EDITNCONC (Y) MAKEMACFORMAT (XEROXTOMAC) UNDOEDITCOM (X) -EDIT!UNDO (PRINTFLG) INSPECT/AS/FUNCTION (ATM STKP EDITORARGS) UNPACKFILENAME.STRING (DIRFLG STA1730 -ENDA1729 LEN STRING DSTSTRING DSTBASE STA1732 ENDA1731 ST NAM CHAR STA1734 ENDA1733 STA1736 ENDA1735) -PRINTADDRS (X BASE CNT LB) CL:ARRAY-DIMENSION (ARRAY DIMENSION DIMS RANK) \\APPLYINSPECTMACRO (ARGLST -DATUM WHERE) FB.COUNT.FILE.CHANGE (FLG ITEM SIGN) \\TEDIT.CHANGE.LOOKS (STREAM CH# LEN START-OF-PIECE -PCNO1 PCNON NLOOKSAVE) GRAPHOBJ.BUTTONEVENTINFN (GROBJ WINDOW DATUM) FILEPATCHBLOCK (ARLEN) \\LINEBLT -(LEFT RIGHT Y TOP BOTTOM DESTINATIONBASE RASTERWIDTH GRAYBASE GRAYHEIGHT NBITS GRAYWIDTH) -\\TEDIT.CARET (CARETS) \\BUFFERED.COPYBYTES (DST DEV NOERRORFLG) MSSEEKPHRASE (SOUGHT SEEKING SK -MARKER OS OLA OC OP ORS) EDIT4F1 (PAT) EDIT2F (N) \\TEDIT.REOPEN.STREAM (PIECESTREAM TEXTSTREAM PCTB -NEWSTREAM) \\BLTSHADE.PRESS (DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT REGION TEXTURE STREAM -OPERATION) RANDACCESSP (FILE STREAM) EDITAPPEND (X) PUTCURSORPROP (PROP) IFCEXPRTYPE (COM FN) -ARRAY-NEEDS-INDIRECTION-P (ARRAY) \\CHANGE-VISIBLE-REGION.IP (VISIBLE-REGION FONT) PRINTPUP (PACKET -TYPE CALLER) BOUT (BYTE STREAM) \\DSPXPOSITION.PRESS (PRSTREAM) COPYCHARS (SRCFIL DSTFIL SRCSTRM -DSTSTRM CHA1818 EOLCA1817 CHA1820 EOLCA1819) \\INIT.KEYBOARD.STREAM (MODE) XCL:COMPILE-DEFINER (COMPILER::NAME - TYPE) \\BACKPEEKBIN (STREAM) \\GETEOFPTR (STREAM) IFCPROPSCAN (ATOMS PROPNAMES) PRINTPUPROUTE (FILE -PACKET CONTROL) EDIT1F (C L) TEDIT.LOOKS (STREAM TEXTOBJ LEN NEWLOOKS) GRAPHOBJ.COPYFN (GROBJ DATUM -NEW) \\TEDIT.FLUSH.UNUSED.LOOKS (CHARLOOKS PARALOOKS) EDIT4F2 (NODE MATCH X) SEDIT::SHIFT-LINEAR-FORM -(SEDIT::RIGHT-SHIFT) \\BOUTS (BASE OFF NBYTES) MSSETREP (X PAT VAL) BRHC/LAYOUT (H X W MOMLST N) -\\CURSORMASKPROPNAME (BITSPERPIXEL) \\DECODE.EXTENT.USE (EXTENTUSE) BIT-ARRAY-P (ARRAY) \\SETFILEPTR ( -STREAM INDX) BPNT (X) SEDIT:SEDIT (SEDIT::PROPS SEDIT::NAME TYPE SEDIT::OPTIONS) EQUAL-DIMENSIONS-P ( -ARRAY-1 ARRAY-2 DIMS) EDIT.RI (X M N) EDITFPAT1 (X NC) COPYFILES (OPTIONS SOURCE BACKUP -COPYFILESTOSPEC FILENAME DT1 STR) IDLE.SHOW.OPTION (OPTION VALUE) DOUSERFNS (WINDOW) \\COPYOPENFILE ( -DESTPARAMETERS INSTREAM NEWNAME) OPENSTREAM (ACCESS RECOG OBSOLETE) \\MACPEEKCCODEFN (STREAM NOERROR) -EDITSMASH (A D) CLOSEF (FILE STREAM FN) COPYBYTES (SRCFIL DSTFIL START SRC DST) EDIT.LO (N) -\\FORMATLINE (OLINE BASEA1558 N ARR VAL BASEA1559 BASEA1560 BASEA1561 DS BASEA1562 BASEA1563 FONTDESC -CHARCODE BASEA1564) PROGN (U) EDIT.BI (M) BITSPERPIXEL (BITMAP) \\FIRSTNODE (TREE) BUILDTESTRELQ (X -VAR R) XCL:UNADVISE-FUNCTION (XCL::FN-TO-UNADVISE XCL::FN XCL::ADVICE-NAME) \\CURSORIMAGEPROPNAME ( -BITSPERPIXEL) XCL:READVISE-FUNCTION (XCL::FN-TO-READVISE XCL::FN XCL::IN-FN) FB.RENAMECOMMAND (BROWSER -) IDLE.SET.OPTION (OPTION X) XCL:REINSTALL-ADVICE (XCL::BEFORE XCL::AFTER XCL::AROUND) -\\INTERACTIVE.CLOSEW (WINDOW CLOSEFN) CL::DEFINE-BOA-CONSTRUCTOR (CL::NAME&ARGLIST CL::ARGLIST CL::PS -CL::RESULT-ARG CL::NEW-ARGUMENT-LIST) CHCON1 (X STRING) XCL:ADVISE-FUNCTION (XCL::FN-TO-ADVISE XCL::FN - CL:WHEN XCL::PRIORITY XCL::ADVICE-NAME) SEDIT::SETUP-WINDOW-CONTEXT-DEPENDENCIES (SEDIT::CONTEXT -SEDIT::ROOT SEDIT::WINDOW SEDIT::HEIGHT) XCL:COMPILE-FORM (COMPILER::LAP) UNPACKFILENAME (FILE -ONEFIELDFLG OSTYPE) COPYFILE (DESTPARAMETERS) EDIT.BO (N) CURSORCREATE (IMAGE DATA) RAIDSTACKCMD (CMD) - EDIT4F3 (X) EDITSAVE1 (X) CL:BIT-NOT (BIT-ARRAY) \\CURSOR-VALID-P (CURSOR IMAGE HOTSPOT-X HOTSPOT-Y) -\\COMPUTE.HUNK.TYPEDECLS (SIZELST GCTYPE PREFIX FINAL) %DO-LOGICAL-OP (SOURCE DEST SOURCE-BASE -SOURCE-OFFSET DEST-BASE DEST-OFFSET SOURCE-SIZE SOURCE-OP LOG-OP) INSPECT/ARRAY (ARRAY BEGINOFFSET -FIRSTELT WHERE) \\SEARCH.OUTPUTQ (SOCKET) EDIT.LI (N) \\DSPYPOSITION.PRESS (PRSTREAM) EDITBELOW (PLACE - L) CL::%MAKE-FLOAT-ACCESSOR (CL::OBJECT CL::OFFSET) XCL:REBREAK-FUNCTION (XCL::FN-TO-REBREAK XCL::FN -XCL::NAME) STKPOS (N FRAMENAME OPOS) TTYINBUFFEREOFP (STRM) XCL:TRACE-FUNCTION (XCL::FN-TO-TRACE XCL::FN - XCL::ORIGINAL XCL::MIDDLE-MAN XCL::ENTRY) GETCURSORPROP (CURSOR PROP) ADJUSTCURSORPOSITION (DELTAX N -WIDTH DELTAY) \\CURSORUP (NEWCURSOR INVERTFLG) IFCPROPS (COM PAIR) TRANSLATE.IP (IPSTREAM X Y) -XCL:CREATE-TRACE-WINDOW (XCL::REGION XCL::TITLE XCL::WINDOW) \\DSPUNTRANSFORMREGION (REGION -DISPLAYDATA) GRAPHOBJ.COPYBUTTONEVENTFN (GROBJ WINDOW) CL:CHAR (STRING INDEX) \\INFER.FILE.TYPE ( -OLDEOF) \\SETUPGETCH (TEXTOBJ CH# PCTB START-OF-PIECE) COPY-ARRAY (FROM-ARRAY FROM-TYPE-NUMBER -TO-TYPE-NUMBER) EDITGETD (X FN EDITCHAIN) \\DELETEPIECE (PC) RAIDSHOWFRAME (N) INFILECOMSVAL (X) -FB.MAKE.SUBDIRECTORY.ITEM (DATAWITHSUBDIR FBROWSER SUBDIRECTORY DIRSTART) CURSORP (X) -READ-UNICODE-MAPPING (FILESPEC) FB.COPYCOMMAND (BROWSER) TEDIT.FORMATBOX (REGION TEXTOBJ PRSTREAM CH# -REGIONSPEC) CURSORPOSITION (DISPLAYSTREAM N WIDTH) NS.MAKE.SIMPLE.CREDENTIALS (NAME/PASS) \\OKTOCLOSEW - (WINDOW) %FAST-COPY-BASE (FROM-TYPENUMBER TO-TYPENUMBER FROM-BASE BITS-PER-ELEMENT FROM-OFFSET -TO-BASE TO-OFFSET CNT) CURSORSCREEN (SCREEN) \\MACINCCODEFN (STREAM) BUILDGETRELQ (X VAR REL) -FORCEOUTPUT (WAITFORFINISH) \\DSPUNTRANSFORMY (Y DD) \\FLUSH.OPEN.STREAMS (FDEV) -\\CH.GUESS.NEW.PROPERTIES (DOMAIN) INSPECTCODE (FN WHERE LVFLG RADIX PC CODEPRINTER WINDOW) -\\DSPUNTRANSFORMX (X DD) \\MAYBEPEEKPUP (PUP) FILEBROWSER (TAIL VALUE TITLEFONT BROWSERFONTHEIGHT) -\\SPP.SEND.ENDREPLY (CON) ACCESS-CHARSET (STREAM NEWVALUE) TEDIT.DISPLAYTEXT (TEXTOBJ XPOINT LINE -LOOKS DS CH STRING FONT) CL::%MAKE-FIXP-ACCESSOR (CL::OBJECT CL::OFFSET) SEDIT::SETUP-WINDOW-AND-PROCESS - (SEDIT::CONTEXT SEDIT::WINDOW SEDIT::PROCESS TABLE) DISPLACED-ARRAY-P (ARRAY) TTYINBUFFERPEEK (STREAM - BUF CH) MSFIXUPTYPES (PRSD X NS) VRULE.GETFN2 (INPUT.STREAM) CLISPERROR (TYPE) TB.UNDELETE.ITEM ( -BROWSER WINDOW) /ECHOCONTROL (CHAR) |\\UFStoOtherCopyMess| (INSTREAM OUTSTREAM EXTENSION) -TEDIT.PUT.PCTB (STRING TEDIT.PUT.FINISHEDFORMS FORM) \\BITBLT.PRESS (DESTINATION DESTINATIONLEFT OLDX -DESTINATIONBOTTOM OLDY SOURCEBITMAP CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM WIDTH HEIGHT) FM.CHANGELABEL - (WINDOW NEWLABEL OLDREGION) %MAKE-GENERAL-ARRAY (ELEMENT-TYPE FATP DISPLACED-TO TOTAL-SIZE -TYPE-NUMBER READ-ONLY-P DIMENSIONS ADJUSTABLE-P FILL-POINTER EXTENDABLE-P DISPLACED-INDEX-OFFSET) -RAIDCOMMAND (X ATM A D VA PAGE) INFILECOMSPROP (AT PROP) SETFILEPTR (FILE ADR) TRANS.IP (IPSTREAM) -TB.INSERT.ITEM (LASTITEM#) %MAKE-DISPLACED-ARRAY (DISPLACED-TO DISPLACED-INDEX-OFFSET DIMENSIONS -TOTALSIZE ELEMENT-TYPE FILL-POINTER READ-ONLY-P EXTENDABLE) CL::%MAKE-SMALL-FIXP-ACCESSOR (CL::OBJECT) - SAVEONSYSRECLST (NAMES) SEDIT::SETUP-PROFILE (SEDIT::CONTEXT SEDIT::PROFILE) %MAKE-TWOD-ARRAY ( -DIMENSIONS ELEMENT-TYPE FATP TOTAL-SIZE TYPE-NUMBER READ-ONLY-P EXTENDABLE-P BOUND0 BOUND1) -\\BACKFORMAT (TEXTOBJ WHEIGHT) LASTMOUSEY (DS) HRULE.CREATE (HRULE) TTYINBUFFERREADP (STRM) PRESSFILEP - (LEN) BUFTAILP (TAIL END) GETEOFPTR (FILE STREAM) %GET-CANONICAL-CML-TYPE (ELEMENT-TYPE) -INSPECT/HARRAYP (HARRAY WHERE) CHARMACRO (X) READ-ONLY-ARRAY-P (ARRAY) \\SETEOFPTR (STREAM LEN) -CL:ARRAY-HAS-FILL-POINTER-P (ARRAY) COPY-VECTOR (FROM-VECTOR TO-VECTOR FROM-LENGTH TO-LENGTH START1 -START2 FROM-TYPE-NUMBER TO-TYPE-NUMBER SUBLEN1 SUBLEN2) FIRSTATOM (X) LASTMOUSEX (DS) -|PopUpWindowAndGetAtom| (PROMPTSTRING FONT WIDTH PROMPTW) \\TEDIT.FONTCOPY (FONT TEXTOBJ OLDFAMILY -OLDSIZE) GETMOUSESTATE (N WIDTH) SEDIT::SETUP-NEW-CONTEXT (SEDIT::LOCK) BOUT16 (STREAM N) PP* (X) -CH.DELETE.MEMBER (DONTCHECK PROPERTY) CL:SCHAR (SIMPLE-STRING INDEX) GETFILEPTR (FILE STREAM) -CURSORPROP (X) \\GENERIC.BINS (NBYTES BASE STREAM) \\FILETYPE.FROM.TYPE (TYPE) CURSORHOTSPOT ( -NEWPOSITION) DWIMLOADFNS? (FN) TB.MAP.ITEMS (BROWSER MAPFN ITEM) IDLE.BOUNCING.BOX (WINDOW MAXX MAXY) -BEEPON (FREQ) BIN16 (STREAM) \\MACOUTCHARFN (STREAM CHARCODE) TEDITCHAT.CHARFN (CHAT.STATE TEXTSTREAM -CH SEL) CL::%MAKE-WORD-ACCESSOR (CL::OBJECT CL::OFFSET) RECORDECLARATIONS (DECS) FILL-ARRAY (ARRAY) -CL:SIMPLE-VECTOR-P (VECTOR) TTYINBUFFERBIN (BUF CH) \\MAIKO.DISPLAYLINE (TEXTOBJ WINDOW LINE HCPYDS -OLDCACHE DS TEXTLEN THISLINE BASEA1574 LOOKS BASEA1575 BASEA1576 CHLIST BASEA1577 WLIST BASEA1578 -BASEA1579 LEADERFONT DOTWIDTH WINDOWDS) /SETSYNTAX (CLASS CH) WITHOUT-INTERRUPTS (FORM) CL:SVREF ( -CL:SIMPLE-VECTOR INDEX) \\SETCLOSEDFILELENGTH (FILENAME STREAM NBYTES) INSPECT/TYPELESS (ITEM BASE N -WHERE) DISPLAYDOWN (NSCANLINES FORM) LAYOUTSEXPR1 (TREE D) \\GETINTERNALCLOCK (BOX CLOCKOFFSET) -CL:SIMPLE-BIT-VECTOR-P (VECTOR) BCOMPL3 (FILES) BRH/LAYOUT/DAUGHTERS (DS Y X MOMLST) SMARTARGLIST ( -TAIL) VRULE.CREATE (VRULE DASHING) CL:ARRAY-IN-BOUNDS-P (ARGS ARRAY) EDITGETD-LAMBDA (BODY) -INFILECOMSVALS (X FLG) EDITGETD-LET (FORM) MSJOINSET (SET2) TEDIT.SELECT (TEXTOBJ X Y WINDOW REGION -WORDSELFLG SELOPERATION EXTENDING TEXTLEN) INFILECOMS (COMS X) EOFP (STRM FILE) COND.TO.IF ( -CONDCLAUSES X) SEDIT::SET-SELECTION (SEDIT::NODE SEDIT::CONTEXT SEDIT::INDEX SEDIT::OFFSET SEDIT::ITEM - TYPE) COMPILER::PROCESS-FORMS (COMPILER::PROCESS-ENTIRE-FILE) PUP.ECHOSERVER (SOC) FTPPUTCODE (STREAM - CODE NOCODEP) \\TEDIT.GET.SINGLE.PARALOOKS2 (N WIDTH FILE) CL:ERROR (CL::DATUM CL::ARGS -XCL:*CURRENT-CONDITION* ERRORPOS) \\TEDIT.WORD.BOUND (TEXTOBJ PREVCH CH READSA) XCL:ROW-MAJOR-AREF ( -INDEX ARRAY BASE-ARRAY) SEDIT::OUTPUT-CR-OR-SPACE (SEDIT::CONTEXT SEDIT::SPACE-WIDTH SEDIT::INDENT) -SWAPPEDCOND (CND C1 C2) MAKEFN (FORM BODY X) \\TFBRAVO.APPLY.PARALOOKS (MARGIN.CANDIDATE TEXTOBJ -PARALOOKS LENGTH) %ASET0 (ARRAY BASE-ARRAY NEWVALUE TYPE-NUMBER INDEX) FB.UNDELETEALLCOMMAND (BROWSER) - |MakeMenuOfImageTypes| (MENUTITLE) PFI.LOOKUP.NAME (NAME TYPE) SWAPXIPADDRESSES (DESTSOCKET NDB) -DELETEMENU (FROMWINDOW W) LISPXFIX (INPUT COMS) TEDIT.SUBPARALOOKS (OLDLOOKSLIST NEWLOOKSLIST -TEXTSTREAM TEXTOBJ PCTB A SEL FIRSTPC OLDLOOKS FEATURELIST) CL::ROW-MAJOR-ASET (INDEX ARRAY BASE-ARRAY - NEWVALUE TYPE-NUMBER ROW-MAJOR-INDEX) \\LEAF.SETFILETYPE (OPUP STREAM) \\IDLER (TIMEOUT START.TIME) -CL::%MAKE-BIT-ACCESSOR (CL::OBJECT CL::SIZE CL::OFFSET CL::WORD-OFFSET) ASET (ARGS) UNIX-BACKFILEPTR ( -STREAM) %AREF0 (ARRAY BASE-ARRAY INDEX) CHAT.TYPESCRIPT1 (PWINDOW) XCL::WALK-TEMPLATE-HANDLE-REPEAT-1 -(XCL::STOP-FORM XCL::TEMPLATE XCL::CONTEXT) \\CLOCKGREATERP (OLDCLOCK MSECS) \\COS.OLD (X) CHAT.LOGIN -(HOST WINDOW STATE OPTION OSTYPE X) \\SETDAYTIME0 (TMP) \\GENERIC.BOUTS (NBYTES STREAM BASE) -SEDIT::NEXT-NODE-TYPE (SEDIT::NODE) \\BACKFILEPTR (STREAM) \\NSFILING.GET.ATTRIBUTES (SESSION HANDLE) -COURIER.BROADCAST.CALL (PROGRAM PROCEDURE PGMDEF DESTSOCKET# ARGS RESULTFN RT HOPS) -\\SECONDSCLOCKGREATERP (OLDCLOCK SECONDS) FB.UNDELETE.FILE (ITEM TBROWSER FBROWSER) MSFAIL (FLG) -TEDIT.SET.SEL.LOOKS (OPERATION WASON) \\SW2BM (P Q CL CB XP XQ YP YQ) REBREAK (FN) MERGEINSERT1 (X Y) -COMPILER::MAYBE-REMOVE-COMMENTS (COMPILER::FORM) PUP.ECHOUSER (HOST SOC PORT OPUP TIMER) FTPGETMARK ( -STREAM) \\TEDIT.PUT.CHARLOOKS.LIST2 (FILE STREAM W LOOKSLIST LOOKSHASH) RECONS (X C Y) -CL::%MAKE-FLAG-ACCESSOR (CL::OBJECT CL::OFFSET CL::WORD-OFFSET) PROCESS-EXEC-ID (PROCESS NAME) -UNIX-READ (STREAM CH) XCL::WALK-TEMPLATE-HANDLE-REPEAT (XCL::FORM XCL::STOP-FORM XCL::TEMPLATE -XCL::CONTEXT) ICMLARRAY (CMLARRAY RANK LESS1RANK DISPLAYEDLEVELS WHERE FONT) PFI.SORT.INDICES (Y -ROWDIF) COMPILER::PEEPHOLE-OPTIMIZE-CODE (COMPILER::CODE COMPILER::CHANGED-P) \\FORWARD.XIP (XIP) -INFILECOM (COM COMNAME Z) LISPXUSEC (HISTORY) \\HDCPYDISPLAY.FIX.XPOS (HARDCOPYSTREAM) YMAPLIST (I) -SPY.ORIGINAL (TREES X) \\GENERIC.RENAMEFILE (OLDDEVICE) SEARCH-FOR-EVENT-NUMBER (ID SPEC HISTORY) -\\FTP.OPENFILE (ACCESS RECOG FILENAME OTHERINFO) |GetNewPrinterFromUser| (PROMPTSTRING) -CANONICAL.CH.NAME (NAME) LISPXPRINTDEF0 (FILE EXPR LEFT DEF TAIL) \\LOCATE.NSNET (NET BUCKET) -\\GENERIC.OPENP (DEVICE) LISPXUSE0 (GENLST X) \\DSPRIGHTMARGIN.HDCPYDISPLAY (DISPLAYSTREAM) -SPY.MAKE.TREE (SPYDATA TREES WINDOW) \\RCLOCK0 (BOX) |\\LFCloseDirectory| (|vol|) -CL::%MAKE-ARRAY-ACCESSOR (CL:VECTOR CL::OFFSET) STKARGS (POS) INITUFNTABLE (OP) CHAT.CLOSE (WINDOW -ABORTED) COMP.LOOKUPVAR (V) PRINTBITMAP (BITMAP FILE) LISP.TO.ALTO.DATE (DATE) MS-SMASH-PACKAGE ( -PACKAGE CARPART CDRPART) \\TEDIT.SEL.CHANGED? (OLDSEL OLDSELOP NEWSELOP) DINFO.SPECIAL.UPDATE (GRAPH -TYPE CURRENT.NODE $$OUTPUT DINFOW) CHOOZ1 (NC1 NC2 SC) COMPILER::COMPILE-ONE-LAMBDA (COMPILER::DEFN -COMPILER::NAME COMPILER::TREE) NEAREST/PT/ON/GRID (GRIDN) \\FTP.HANDLE.NO (CONNECTION INSTREAM FLUSHER - HOST $$OUTPUT PAIR) \\TEDIT.PUT.SINGLE.PARALOOKS2 (STREAM W FILE LOOKS TAB) IDLE (FROMTIMEOUT) -SEDIT::LINEARIZE-QUOTE (SEDIT::CONTEXT SEDIT::X) ALISTS.WHENCHANGED (NAME VARTYPE NEWFLG) -\\MAP-OPEN-STREAMS (DEVICES ACCESS FN STREAM) CL:ARRAY-ROW-MAJOR-INDEX (ARGS ARRAY) SEDIT::OUTPUT-CR ( -SEDIT::LINESKIP SEDIT::INDENT SEDIT::NEW-LPTR) ALTO.TO.LISP.DATE (DATE) FB.UNDELETECOMMAND (BROWSER) -REBINDP (OB) CL::%MAKE-POINTER-ACCESSOR (CL::OBJECT CL::OFFSET) \\NCONC2 (X Y) BSPPUTMARK (MARKBYTE) -INTCHECK (CHAR) \\NSFILING.GETFILEINFO.FROM.PLIST (ATTRIBUTE ENTRY) PRINT-EVENT (EVENT FILE POSITION X -) \\MAKEBRUSH.SQUARE (SIZE) \\SIN.OLD (X) CH.NAME.TO.STRING (NSNAME FULLNAMEFLG) -PFI.COMPUTE.INDEX.SHAPE (INDEXPAIRS P INDEXNOWIDTH INDEXLEN) \\EOSERROR (STREAM) \\XIPERROR (X ERRCODE -) LISPXUSE (HISTORY LSPXHST) |\\VFMSmartBLT| (SBASE DBASE XA1599 NWORDS) SPY.DELETE (TREES NAMES) -SUBST (OLD NEW) \\TEDIT.FIND.PROTECTED.START (LIMITCH# TEXTOBJ CH# PCTB OURLIMIT) \\INCFILEPTR (STREAM - AMOUNT) SEDIT::LINEARIZE-LIST (SEDIT::NODE SEDIT::CONTEXT SEDIT::ENVIRONMENT SEDIT::LPAREN SEDIT::STARTX - SEDIT::PAREN-WIDTH SEDIT::RIGHT-MARGIN SEDIT::COMMENT-SEPARATION SEDIT::SUBNODE SEDIT::COMMENT-START -SEDIT::SPACE-WIDTH) CHANGECALLERS (AS-TYPES OLD NEW) CL::SIMPLE-STRING-EQUAL (STRING1 STRING2 BASE1 -OFFSET1 TYPENUMBER1 BASE2 OFFSET2 TYPENUMBER2) \\PAGED.INCFILEPTR (AMOUNT) TB.DELETE.ITEM (BROWSER) -TEDIT.EXTEND.SEL (NEWSEL X Y TEXTOBJ OSEL SELOPERATION SELWINDOW TEXTLEN A) CREATEFIELDS (FIELDS) -FIXSPELL2 (X) \\FIXPOUT (STRM N) EF (FN) SEDIT::SET-POINT (SEDIT::NODE SEDIT::POINT SEDIT::CONTEXT -SEDIT::INDEX SEDIT::OFFSET SEDIT::ITEM TYPE SEDIT::COMPUTE-LOCATION?) SETUPSTACK (INITFLG) -EDITBMBUTTONFN (W REG) CLOSEBSPSTREAM (STREAM SOCKET INPUTSTREAM) \\TEDIT.PUT.SINGLE.CHARLOOKS2 (LOOKS - FONT FILE STREAM W) |\\SETUPTIMERmacrofn| (X FORM) EV (VAR) \\DSPXPOSITION.HDCPYDISPLAY ( -HARDCOPYSTREAM) FIND-HISTORY-EVENTS (HISTORY SPEC ORIGINAL-EVENT-SPEC) \\NSFILING.GET/SETINFO (STREAM -INFOFN DEVICE) READ (RDTBL FLG FILE) SEDIT::OUTPUT-CONSTANT-STRING (SEDIT::STRINGITEM SEDIT::LINEAR) -\\MAKEBRUSH.ROUND (SIZE) \\MAKEBRUSH.VERTICAL (SIZE) \\TEDIT.REFRESH.SHOWSEL (OLDOP NEWOP NEWSEL -TEXTOBJ) \\BUFFERED.PEEKBIN (STREAM NOERRORFLG) PRINT-EVENT-PROMPT (TERM EVENT) -|\\CanonicalizeTimerUnits| (X) XCL::HASH-FILE-WHERE-IS (TYPE XCL::ENTRY XCL::NAME) -COMPILER::COMPILE-AND-DUMP-1 (COMPILER::NAME COMPILER::DEFN) GETGRIDBOXREGION (GRIDINTERIOR WINDOW -GRIDREGION BASEPT RAWREGION GRIDSPEC) GETHASH (HARRAY HA ITEM BASEA1803 DEFAULT BASEA1804) -\\TEDIT.GET.CHARLOOKS.LIST2 (N WIDTH FILE) \\GENERIC.READP (STREAM TABLE) MAKECREATE1 (TYPE CREATEINFO - SPECIALFIELDS FIELD.USAGE) CL::%MAKE-LIST-ACCESSOR (CL::OFFSET LIST) WRITE (OBJECT) LOCALVARS (A) -ACCEPT-UNIX-SOCKET-STREAM (SOCKSTREAM NEWSTREAM) %FILL-ARRAY-FROM-SEQUENCE (DIMS) MKPROGN1 (L) -|FetchDefaultPrinter| (P) \\FIXPIN (STRM) LISPXPRINTDEF (EXPR FILE LEFT DEF TAIL) \\HANDLE.RAW.XIP ( -TYPE MYADDR SOCNUM) %CHECK-SEQUENCE-DIMENSIONS (DIM-LST SEQUENCE) NEGL (L) \\BUFFERED.BINS (NBYTES -DBASE NOERRORFLG) SPY.SUM (Y) \\IFS.LOOKUPFILE (NAME HOSTNAME RECOG ATTRIBUTE) \\EOF.ACTION (STREAM) -SETSPELLCASE (X Y) %CML-TYPE-TO-TYPENUMBER (ELEMENT-TYPE CANONICAL-TYPE) \\NSFILING.GETEOFPTR (STREAM) - \\BUFFERED.BOUTS (SBASE DEV) \\FTPERROR (CONNECTION ERRARG) /PUT-1 (ATM PROP) \\MOVEBYTES (SBASE -SBYTE DBASE DBYTE) READ-AFM-FILE (FILE IFILE BOLDNESS ITALICNESS A W) NEGLST (L) -|\\VFMMarkBufferDirty| (BUFFERPAGE) \\NULLDEVICE (STREAM) SEDIT::DOT-THIS-LIST (SEDIT::CONTEXT SEDIT::POINT - SEDIT::INDEX SEDIT::NUM-SUBNODES) |\\LFDeleteFile| (|fileName| |stream| |dev|) \\BUFFERED.BOUT (BYTE) - CREATEPAGES (N VA LOCKFLG BLANKFLG) XCL:FIND-PROFILE (XCL::NAME) FIND.CHAT.PROTOCOL (NAME) -SEDIT::INSERT-LIST (SEDIT::WHERE SEDIT::NODE SEDIT::CONTEXT SEDIT::SUBNODES SEDIT::POINT) -XCL:LIST-ALL-PROFILES (XCL::VALUE XCL::PROFILE) RECORDBINDVAL (VAL) COMP.EXP1 (E) COMPILER::SET-CONSTANT-VALUE - (CL:SYMBOL COMPILER::VALUE) INSPECTW.FETCH (INSPECTW PROPERTY) PSCFONT.WRITEFONT (FONTFILENAME PF S -STREAM W) XCL:PROFILE-NAME (XCL::PROFILE) \\NAMEDTABSIZE (TABOBJECT MODE PTSIZE CURRENTX) PPSPPSTREAM -(FILE) FB.IS.NOT.SUBDIRECTORY.ITEM (ITEM) DINFO.UPDATE.FMENU (GRAPH NEW.NODE NODELST W NODE) ADDSPELL2 - (WORD SPLST) XCL::VARIABLE-SPECIAL-P (XCL::VAR) \\CHARWIDTH.HDCPYDISPLAY (FONTA1620 CHARCODE STREAM) -SEDIT::LINEARIZE (SEDIT::NEW-LPTR SEDIT::RIGHT-MARGIN SEDIT::ME) SPY.MERGETREE (PARENTS NEWORIGINAL -SPYDATA DEPTH) BSPOPENP (STREAM) NEWDEFC (NM DF) \\LEAF.READFILEPROP (STREAM OPUP OFFSET LEN -CONNECTION) |\\LFRenameFile| (OLD-DEVICE NEW-DEVICE |dir| FILESPEC |oldPtr|) \\TEDIT.FIND.LAST.LINE ( -TEXTOBJ) \\NULL.OPENFILE (OLDSTREAM ACCESS DEVICE) HISTORY-NTH (ID) TIMEREXPIRED? (TIMER -|ClockValue.or.timerUnits|) MODERN-SNAPW (W) NULL (X) CHAT.RECONNECT.OFF (WINDOW FN) -XCL::VARIABLE-LEXICALLY-BOUNDP (XCL::VAR) \\MAKEBRUSH.DIAGONAL (SIZE) |\\PFTransferFilePage| (|file| -|filePageNumber| |index| |volumePageNumber| |frame| |operation| |noBreak|) \\NSFILING.CLOSE.BULKSTREAM - (CONNECTION) CL::CACHE-SLOT-INFO (CL::ACCESSOR CL::PS) COMPILER::CONSTANT-EXPRESSION-P (COMPILER::FORM - COMPILER::FN COMPILER::S-E-DATA) DSPXSCREENTOWINDOW (X DS) PRINT-ARGLIST (FILE) XCL:MAKE-PROFILE ( -XCL:PROFILE-NAME XCL::PROFILE) TEDIT.UNDO.DELETION (CH# PCTB START-OF-PIECE LEN OTEXTLEN) -OPENATTACHEDWINDOWS (WINDOW ATTACHEDWINDOW) PREPLOOP (I) \\FILEOUTCHARFN (CHARCODE) \\ARGPTR (VAR -INTERPDEF A N) \\NSFILING.RENAMEFILE (NEWDEVICE DEVICE OLDNAME NEWNAME) \\GETREGION.CHECKOPPT (BASEPT -BASEX MINWID BASEY MINHGHT NEWREGFNS FN) UPIQUOTIENT (N DIVISOR) \\TEDIT.GET.PARALOOKS.LIST2 (N WIDTH -FILE) XCL:SAVE-PROFILE (XCL::PROFILE XCL::X) SETARG (VAR M X) |\\LFTruncateFile| (|needPages| -|curPages| |curEof| FILEPTR) \\TEDIT.FIND.PROTECTED.END (LIMITCH# TEXTOBJ CH# OURLIMIT) PRINT-HISTORY -(HISTORY EVENTS X NOVALUES) SEDIT::AWAKE-COMMAND-PROCESS (SEDIT::CONTEXT) TEDITCHAT.MENUFN (WINDOW) -NARGS (FN N) DO.CHAT.OPTION (CHAT.STATE) XCL::VARIABLE-LEXICAL-P (XCL::VAR) \\MAKEBRUSH.HORIZONTAL ( -SIZE) |NewPrinter| (PRINTER PRINTER-NAME ENTRY) DINFO.UPDATE.GRAPH.DISPLAY (NODE LOCATION) -XCL:ECHO-STREAM-INPUT-STREAM (STREAM) \\DSPFONT.HDCPYDISPLAY (HDCPYDSTREAM CSINFO) INITDATATYPENAMES ( -X) SPY.NEXT.TREE (TREE FN) FTPPUTMARK (STREAM MARK) RENAME (TYPES OLD NEW FILES METHOD) -\\LEAF.GETFILEINFO.OPEN (ATTRIBUTE STREAM) MAKECREATE0 (RECORD.TRAN NEEDACELL) TOPATTACHEDWINDOWS ( -WINDOW ATTACHEDWINDOW) \\NSFILING.RELEASE.BULKSTREAM (STREAM) CL::%MAKE-ACCESSOR-CLOSURE (CL::SLOT) -COMPILER::CONSTANT-VALUE (CL:SYMBOL COMPILER::VALUE) PSCFONTFROMCACHE.COERCEFILE (EXPANSION FAMILY -SIZE WEIGHT SLOPE ROTATION DEVICE) XCL:TWO-WAY-STREAM-OUTPUT-STREAM (STREAM) CREATE-UNIX-SOCKET-STREAM - (STR) IMAGESTREAMP (NARGS STREAM) TIME.UNTIL (TIMER UNITS) \\SPP.CHECK.INPUT.QUEUE (CON INQ ACKNO) -SEDIT::DELETE-QUOTE (SEDIT::START SEDIT::NODE SEDIT::CONTEXT SEDIT::SUBNODE SEDIT::GAP-NODE) -FORMAT-ROUND-COLUMNS (WIDTH MINCOL COLINC) XCL:ECHO-STREAM-P (STREAM) |\\LFGetFileInfo| (|attribute| -|infoPage|) UNDOLISPX1 (EVENT) SHRINK-VECTOR (NEW-SIZE) FTPPRINTCODE (CODE) COMPILER::COMPILE-AND-DUMP - (COMPILER::NAME COMPILER::KIND COMPILER::DEFN) %MAKE-ARRAY-STORAGE (NELTS BITS-PER-ELEMENT GC-TYPE -INIT-ON-PAGE ALIGNMENT) XCL:TWO-WAY-STREAM-P (STREAM) CHAT.RESHAPEWINDOW (WINDOW OLDIMAGE IMAGEREGION -CHAT.PROC) \\NSFILING.GETFILENAME (DEVICE NAME RECOG) SETSTKNAME (POS NAME) XCL:PROFILE-P (XCL::OBJECT -) XCL:ECHO-STREAM-OUTPUT-STREAM (STREAM) XCL:TWO-WAY-STREAM-INPUT-STREAM (STREAM) |\\PFPutFileMapPage| - (|volumePageNumber| |frame|) TEDIT.REDO.INSERTION (CH# PCTB LEN OTEXTLEN) %TWOD-ARRAY-P (ARRAY) -STKNTH (N OPOS) XCL:CONCATENATED-STREAM-P (STREAM) |\\VFMFreeVPage| (|volumePage| |vfmFileD| |group|) -%ONED-ARRAY-P (ARRAY) IMAGESTREAMTYPE (STREAM) SEDIT::MAP-COMMENT-INDEX (SEDIT::NODE SEDIT::START -SEDIT::OPEN-NODE) XCL:CONCATENATED-STREAM-STREAMS (STREAM) COMPILER::CHECK-GLOBAL-CONSTANT (CL:SYMBOL -COMPILER::VALUE-EXPR COMPILER::VALUE) \\ARG (VAR M) PSCFONTFROMCACHE.SPELLFILE (FAMILY SIZE FACE) -XCL:BROADCAST-STREAM-P (STREAM) %GENERAL-ARRAY-P (ARRAY) XCL:COPY-PROFILE (XCL::PROFILE) STKNAME (POS) - PRINTCOPYRIGHT (FILENAME X CURRENTYEAR) DINFO.UPDATE.MENU.DISPLAY (NODE NODELST LENGTH DINFOW CHILD -MENU BITS) IMAGESTREAMTYPEP (STREAM S STYPE) TEDIT.WORDSET (CHAR TABLE CODE CHARCODE CLASS) -\\SETXFORM.PSC (STREAM CLIP) XCL:SYNONYM-STREAM-SYMBOL (STREAM) SEDIT::DELETE-LIST (SEDIT::NODE -SEDIT::CONTEXT SEDIT::START SEDIT::END SEDIT::SET-POINT?) \\BSP.DECLARE.FILEPTR (ADR) XCL:OPEN-STREAM-P - (STREAM) PRINTCOPYRIGHT1 (OWNER LINE) |MakeMenuOfPrinters| (MENUTITLE) RESUME (TOFX FROMFX VAL) -PFI.CENTER.PRINT (LMAR STR TAIL) %DEFPRINT-ARRAY (ARRAY STREAM) OPENIMAGESTREAM (DEFPRINTER OPTIONS -STREAM) XCL:SET-DEFAULT-EXEC-TYPE (TYPE) HARDCOPYSTREAMTYPE (IMAGESTREAM) \\COPYFNHEADER (FNHD) -XCL:FOLLOW-SYNONYM-STREAMS (STREAM) XCL:SYNONYM-STREAM-P (STREAM) SIMPLEP (Z) CL::DEFINE-ACCESSORS ( -CL::PS CL::SLOT) CL:WRITE-CHAR (OUTPUT-STREAM CHARACTER) \\SPREADFRAMEP (FRAME) UNIX-STREAM-OUT ( -STREAM CHAR) \\RESUME (FRAME) PRINTFILETYPE.FROM.EXTENSION (FILE EXT) XCL:SET-EXEC-TYPE (TYPE) -\\NSFILING.ERRORHANDLER (ERRCODE) CLEARFILEPKG (FLG) SETSTKARG (POS N FRAME VAL) -XCL:BROADCAST-STREAM-STREAMS (STREAM) COMPILER::SET-UP-BLOCK-DECLS (CL:HASH-TABLE) DSPYSCREENTOWINDOW -(Y DS) \\SETARG (VAR M X) \\TEDIT.PUT.SINGLE.PARALOOKS (FILE STREAM W LOOKS TAB FILEPOS) STKARGNAME ( -POS N FRAME X) SHRINKATTACHEDWINDOWS (WINDOW ATTACHEDWINDOW) %DEFPRINT-BITVECTOR (CL:BIT-VECTOR SIZE) -HISTORY-ADD-TO-SPELLING-LISTS (INPUT) SETSTKARGNAME (POS N X NAME) RETTO (POS P VAL) %DEFPRINT-VECTOR -(VECTOR STREAM SIZE) STKARG (VAL) |\\BrushFromWidth| (W) \\NSFILING.COURIER.OPEN (ADDRESS NAME) -DINFO.UPDATE.TEXT.DISPLAY (NODE WINDOW PROPS FROM TO SEL OLD.TEXTSTREAM) PRINTERPROP (PRINTERTYPE PROP -) TEDIT.WORDGET (CHAR TABLE CH) \\FRAMESCAN (FRAME NT ATOM#) STKNARGS (POS FRAME) STKSCAN (VAR A OPOS) - XCL::VARIABLE-GLOBALLY-SPECIAL-P (CL:SYMBOL) \\NSFILING.HOSTNAMEP (HOST) COMPILE-IN-CORE (|fn-type| -|fn-name|) FRAMESCAN (POS FX ATOM) MAXATTACHEDWINDOWEXTENT (MAINW) COMPILER::VALUE-FOLDABLE-P (COMPILER::VALUE -) PSCFONT.COERCEFILE (EXPANSION FAMILY SIZE WEIGHT SLOPE ROTATION DEVICE) VARS.PUTDEF (NAME DEFINITION -) MODERN-ADD-EXEC (U PROC) %ARRAY-READ (BASE TYPE-NUMBER INDEX) SEDIT::MAKE-COMMENT-STRING (SEDIT::NODE - CL:LENGTH) FB.SORT.VERSIONS (SORTFN) TEDIT.UNDO.INSERTION (CH# LEN) PFI.PRINT.INDICES (LINESPERPAGE -HALFPAGE) %SLOW-ARRAY-WRITE (NEWVALUE) EQUALHASH (AR1 AR2 KEY VAL Y) |\\VFMFind| (|key| |level| |proc| -) SPY.MAX (TREES X) %PRINT-ARRAY-CONTENTS (DIMENSIONS NELTS STREAM) \\LEAF.STRIP.QUOTES (NAME) -|\\LFGetFileName| (|FileName| |Recog|) CL::PROCESS-ACCESSORS (CL::PS) GETSETQ (OKVARS NVARS PARENT -INDECL) CL:PRINC-TO-STRING (OBJECT) UNIX-STREAM-EOFP-NEW (STREAM) \\INTERPFRAMENT (FX) EXEC-PRIN1 ( -VALUE) CHAT.TAKE.INPUT1 (WINDOW PWINDOW *LAST-CONDITION*) MOVEATTACHEDWINDOWS (NEWPOS WINDOW -ATTACHEDWINDOW DELTA) COMPILER::RESOLVE-VARIABLE-BINDING (CL:SYMBOL COMPILER:ENV) CHAT.BUTTONFN ( -WINDOW) %DEFPRINT-STRING (STRING) SEDIT::COPY-STRUCTURE-LIST (SEDIT::SUBNODE) DECLAREDATATYPE ( -SUPERSPECS) \\TFBRAVO.GET.NAMEDTAB (CHARSTREAM) PRINTSPP (EPKT BASE FILE COMMA) FILEPKGCOMS.PUTDEF ( -DEFINITION I NAME PROP) SEDIT::VERIFY-COMMENT (SEDIT::NODE STRING) FB.DELVER.FILES (FILES NVERSIONS -TBROWSER) \\NSFILING.WHENCLOSED (STREAM) DINFO.UPDATE.HISTORY (OLDITEMS DINFOW HISTORYW) -XCL::SHOW-CLOSURE-CACHE (STREAM XCL::KEY XCL::VAL) TEDIT.SETSYNTAX (TABLE CODE CLASS) LISTFILES1 (FILE - PRINTOPTIONS) MB.CREATE.NWAYBUTTON (BUTTONS OBJECT INITSTATE) \\GETREGION.CHECKBASEPT (NEWREGFNS) -\\NSFILING.DIRECTORYNAMEP (DEVICE HOST/DIR) COMPILE.FILE.RESET (ROOTNAME) TRANSLATE.DATATYPE ( -FIELDSPECS UNUSED) |\\LFReadPages| (|stream| |streamFirstPage| |buffers| |file|) CL::ESTABLISH-ACCESSORS - (CL::PS CL::SLOT) FTPPRINTMARK (MARK) EDITLOADFNS? (FILES) UNIX-STREAM-CLOSE (STREAM) \\POLYSHADE.BLT - (ALIST FILL.WRULE FILL.SHADE STRM FILL.FRULE) BITMAPWIDTH (BITMAP) PPSPP (CON ADDRESS NEXT) -PRETTYPRINT3 (FN) |\\PFGetFileMapPage| (|volumePageNumber| |frame|) PFI.CONDENSE.INDEX (TRIPLES TRIP X - Y LASTPAGE) COPY.WINDOW.TO.BITMAP (WINDOW) BITMAPHEIGHT (BITMAP) %ARRAY-WRITE (NEWVALUE BASE -TYPE-NUMBER INDEX) EQUALALL (X Y Z) UNMAKEHARDCOPYSTREAM (DISPLAYSTREAM) SAVECOPYRIGHT (FILENAME) -SPY.MERGE (SPYDATA X) SEDIT::CHARCODE (CL:CHAR) |\\PFPutAllocationMapPage| (|volumePageNumber| |frame| -) PFI.PREVIEW.DEFINEQ (FN) CHAT.CLOSEFN (WINDOW) NSOCKETFROMNUMBER (SOC#) RECEVAL (DATUM NEWVALUE -FIELDNAME) HCOPYALL1 (X SIZE TYP Y FIELD) \\HDCPYDSPPRINTCHAR (CHARCODE DD SPACEWIDTH) LISPXEVAL ( -LISPXFORM) \\FTP.EOL.FROM.PLIST (PLIST) SPY.MERGEINFO (SPYDATA NAME PARENT-NAME) FILES.PUTDEF ( -DEFINITION REASON) SEDIT::BACKSPACE-QUOTE (SEDIT::CONTEXT SEDIT::ATOM-NODE) \\ADDLEAFSTRING (PUP) -|\\LFSetFileInfo| (|attribute|) CL::SETF-NAME (CL::ACCESSOR-NAME) LINELENGTH (FILE) FTPDEBUG (REGION -WINDOW) \\DUMPEXPORTS (COMS TAIL) CHAT.SWITCH.EMACS (WINDOW) %GET-ENCLOSING-UNSIGNED-BYTE ( -ELEMENT-TYPE NBITS) DISPLAYP (STREAM) ADDSPELL1 (WORD) TEDIT.GETSYNTAX (CHAR TABLE CH) GLOBALVARS (A) -OPT.CFRPTQ (L ST END) \\NSFILING.CHILDLESS-P (SESSION HANDLE) COMPILE.FILE.APPLY (FORM PROP) -MINATTACHEDWINDOWEXTENT (MAINW) COMPILER::RESOLVE-VARIABLE-REFERENCE (COMPILER::OBJ) |GetImageFile| (W -) CL::SXHASH-PATHNAME (PATHNAME) SEDIT::COMPUTE-POINT-POSITION-LIST (SEDIT::NODE) -TYPE-VARIABLE-FROM-TYPE-NAME (TYPE-NAME BASE LEN FATP PREFIX PREFIX-LENGTH) |MakeBitField| (FIRST -WIDTH) SEDIT::UNDO-COMMENT-CHANGE (SEDIT::CONTEXT SEDIT::NODE SEDIT::OLD-VALUE SEDIT::COMMENT-WORDS) -FORMAT-DO-ITERATION (*ORIGINAL-ARGUMENTS*) INSTALLBRUSH (BRUSHNAME) |\\LFWritePages| ( -|streamFirstPage| |buffers| |file|) CHAT.ICONFN (WINDOW OLDICON) UNIX-BACKFILEPTR-NEW (STREAM) -CHAT.TAKE.INPUT (WINDOW) |BitFieldFirst| (FD) CL::%SXHASH (CL::OBJECT) MSSOLVE (FN X) RECDEC? (X) -HCOPYALL (X) INITDATATYPES (NSYSTYPES) POSTEDITALISTS (EDITCHANGES OLDTOKENS NEWENTRIES NEWENTRY) -SPY.MAKEGRAPHNODES (TREE SPYDATA STATUS LABEL COUNT THRESHOLD) \\PARSE.REMOTE.FILENAME (DEVICE -FILENAME OSTYPE) ITEMOFPROPERTYVALUE (WINDOW PROPERTY) GET-NEXT-HISTORY-EVENT (ID PROMPT) -\\FDIFS/FROM/DERIVS (NSTEPS DZ RAD DDZ DDDZ) CLISPATOM1 (X) NSOCKETEVENT (NSOC) FB.DELVERCOMMAND ( -FBROWSER ITEM) \\UFS.CREATE.DEVICE (NAME EVENTFN) \\TEDIT.WORDBOUND.READTABLE (CHAR TABLE CODE RTBL) -COMPILEDREPLACEFIELD (X DESCRIPTOR FT OFFSET NEWVALUE) %GET-ENCLOSING-SIGNED-BYTE (ELEMENT-TYPE NBITS) - SEDIT::CFV-QUOTE (SEDIT::SUBNODE SEDIT::QUOTE-WIDTH) \\NSFILING.DELETEFILE (DEVICE FILENAME HANDLE) -COMPILE-FILE-EX/IMPORT (FORM LCFIL RDTBL) %REDUCE-MOD (ELEMENT-TYPE MODNUM) DO-HISTORY-SEARCH (SPEC) -\\CURVESLOPE (KNOTS \#KNOTS) PRETTYPRINT (FNS) OPT.COMPINIT (X) GETXIP (NSOC NSOCQ) -SEDIT::CREATE-COMMENT-WORD-NODES (SEDIT::CHARS SEDIT::ENVIRONMENT) PRETTYDEF1 (X) EVENTS-INPUT (EVENTS - EVENT INPUT) NEAREST/MULTIPLE (X N) |\\DSKEventFn| (|Event| |Dev| VAL) \\GOOD.DASHLST (DASHING BRUSH -BRUSHSIZE) DRAWLINE (X1 Y1 X2 Y2 WIDTH OPERATION COLOR DASHING) \\TEDIT.GET.SINGLE.PARALOOKS (FILE N -WIDTH FILEPOS LOOKSLEN TEXTOBJ) \\UNVISIBLE.PAGED.REVALIDATEFILELST (DEVICE FN) -\\SELITEM.FROM.PROPERTY (INSPECTW PROPERTY) FILEPKG.CHANGEDFNS (CHANGES) \\APPEND2 (L2 VAL) -PROPS.WHENCHANGED (NAME NEWFLG) \\UNVISIBLE.FLUSH.OPEN.STREAMS (FDEV) PRINTDATE (OUTSTREAM DAT) -PFI.PREVIEW.DECLARE (FN) NSOCKETNUMBER (NSOC) FILEFNSLST (FILE) MAKEHARDCOPYSTREAM (IMAGETYPE) -COMPILEDFETCHFIELD (X DESCRIPTOR FT OFF) SPY.UPDATE.TITLE (W) PRETTYCOM (PRTTYX ATM) -\\LEAF.READFILENAME (STREAM DEVINFO) CREATEMDSTYPETABLE (SEGMENT) SQRT (N X) GET.OBJ.FROM.USER ( -TEXTOBJ) SETUPTIMER.DATE (DTS |OldTimer?|) FILECHANGES (FCEXPR) MB.THREESTATE.WHENOPERATEDFN ( -OPERATION OBJ DS) DSPBACKCOLOR (COLOR) COMPILE-FILE-SETF-SYMBOL-FUNCTION (FORM LCFIL) PRETTYDEF ( -CHANGES) COMPILEDNCREATE (X) COMPILER::ENV-DECLARE-A-GLOBAL (COMPILER::VAR COMPILER:ENV) D-ASSEM::EMIT-BYTE - (BYTE) DRAWDASHEDLINE (WIDTH X2 Y2 ADJACENT OPPOSITE DASHING OPERATION STREAM COLOR) SEDIT::CFV-LIST -(SEDIT::ENVIRONMENT SEDIT::SUBNODE SEDIT::INDENT SEDIT::SPACE-WIDTH SEDIT::TWO-PARENS) PRETTYDEF0 ( -MADEFILE) \\TFBRAVO.PUT.NAMEDTAB (OBJ CHARSTREAM) D-ASSEM::FIXUP-NTENTRY (CL:SYMBOL D-ASSEM::BASE -D-ASSEM::OFFSET D-ASSEM::HIBYTE D-ASSEM::WORD) |\\PFGetAllocationMapPage| (|vol| |volumePageNumber| -|frame|) \\CH.PRINT.BLURB (MSG ORGANIZATION) |\\UFSGenerateFiles| (FDEV #:G853) CHECKFORCHANGED (SET -NEEDUPDATE X) \\COPYDATATYPE (X NTYP DTD NEW P) %REDUCE-INTEGER (ELEMENT-TYPE BOUND) -|\\UFSDirectoryNameP| (DIRSPEC DEV #:G850) |\\LFOpenFile| (RECOG ACCESS) |\\UFSWritePages| (|stream| -ESIZE CSIZE |buffers| |streamFirstPage| |fileID| ERRNO) DSPBOTTOMMARGIN (YPOSITION) PRETTYDEFCOMS ( -PRTTYCOMS L) MOVETO (X Y) |\\UFSOpenFile| (FDEV #:G845 ACCESS RECOG FILE FULLNAME REC ACC ERRNO -OTHERINFO) CHAT.TYPESCRIPT (STATE) CL::DEFAULT-PREDICATE-NAME (CL::STRUCTURE-NAME) -COMPILER::ENV-DECLARE-A-SPECIAL (COMPILER::VAR COMPILER:ENV) D-ASSEM::COPY-LAP-CODE (D-ASSEM::CODE) -|\\UFSEventFn| (|Event| |Dev| VAL) DSPCOLOR (COLOR) SEDIT::BACKSPACE-LIST (SEDIT::CONTEXT) PRINTDATE1 -(OUTSTREAM DAT TERMINATING.STRING) OPT.NOTJUMP (X) CRITSECT (SCANY) FB.DELETE.FILE (ITEM TBROWSER -FBROWSER) HARDCOPY.SOMEHOW (WINDOW FILE PRINTERTYPE) SUBPAIR (EXPR A D) DINFO.SETUP.WINDOW (WINDOW) -D-ASSEM::TYPE-NAME-FROM-SIZE (D-ASSEM::LEN) \\TEDIT.PROCEXITFN (THISP) POSTSCRIPT.PUTBITMAPBYTES ( -BITMAP WIDTH STREAM HEIGHT BYTEOFFSETPERROW BYTESPERROW BMBASE PS.BITMAPARRAYBASE PRVBM PRVBASE) -CL:MACROEXPAND-1 (CL::ENV) UNDOSET (NAME VALUE) MB.THREESTATE.SHOWSELFN (OBJ DS IMAGEBOX SEL) -D-ASSEM::COPY-LAP-FN (D-ASSEM::FN) \\FTP.UNPACKFILENAME (FILENAME FIELDS TAIL) COMPILE.FILE.DEFINEQ ( -FORM) \\FIXPASSWORD (CONNECTION ERRCODE DIRECTORY) |\\LFGenerateFiles| (PATTERN STRING DESIREDPROPS) -|\\UFSRenameFile| (OLD-DEVICE NEW-DEVICE OLD-NAME NEW-NAME NEWUNIXNAME ERRNO) \\CURVESTART (X Y) -INCORNER.REGION (A MAINREGION TOPMARGIN) |\\UFSTruncateFile| (|needSize| |curEof| FILEPTR ERRNO DT) -CHAT.CLEAR.FROM.MENU (WINDOW STATE) SEDIT::STRINGIFY-COMMENT (SEDIT::NODE) ARCTAN (X) |\\PFCreatePage| - (|file| |filePageNumber| |volumePageNumber| |frame| |runLength| |noBreak|) |\\UFSCloseFile| (DEVICE -ERRNO) HPRINSP (X) |\\UFSReadPages| (|buffers| |streamFirstPage| |stream| |fileID|) |\\UFSDeleteFile| -(DEV #:G849 FILENAME ERRNO) |\\PFCreateFreePage| (|vol| |volumePageNumber| |frame| |runLength| -|noBreak|) \\NSFILING.GET.NEW.SESSION (DEVICE OLDSESSION NOLOCK) PTON10GRID (FIXEDPT) HVREADERR (M1 M2 -) FILEPKG.MERGECHANGES (C2 C1) D-ASSEM::FETCH-HUNK (D-ASSEM::LEVEL D-ASSEM::MAP-ENTRY) -\\NSFILING.EVENTFN (EVENT DEVICE) PRINTDEF1 (EXPR) |\\LFEventFn| (|Event|) D-ASSEM::EMIT-BYTE-LIST ( -D-ASSEM::L BYTE) DO-APPLY-EVENT (TODO) \\CURVEEND (A NEWXA1708 NEWYA1707 DX DY) DSPLINEFEED (DELTAY) -RELEASE.XIP (XIP) SEDIT::CREATE-COMMENT-WORD-NODE (SEDIT::CHARS SEDIT::ENVIRONMENT) \\TAN-FLOAT (X) -|\\UFSGetFileInfo| (DEVICE #:G851 STREAM ATTRIBUTE ERRNO) PFI.HANDLE.PACKAGE (EXPR) D-ASSEM::MAX-ARG ( -D-ASSEM::OPCODE D-ASSEM::RANGE) SCROLLW (WINDOW DX DY CONTINUOUSFLG) \\TEDIT.PROCENTRYFN (NEWPROCESS) -\\PS.BOUTFIXP (STREAM BASE \c) DSPFONT (FONT) MB.THREESTATEBUTTON.FN (OBJ TEXTOBJ) -\\FTP.OPENFILE.FROM.PLIST (HOST ACCESS DESIREDPLIST) COMPILE.CHECK.ARGTYPE (AT X ATYPEPAIR) -\\LEAF.DIRECTORYNAMEONLY (FILENAME DIR) DECLSUBFIELD (SUBDECL DEC) CL::CACHE-PREDICATE-INFO ( -CL::PREDICATE) COMPILER::ENV-DECLARE-GLOBALS (COMPILER:ENV COMPILER::GLOBALS) D-ASSEM::REF-VAR (D-ASSEM::VAR -) \\ITEMW.SELECTITEM (WINDOW) MKPROGN (X) SEDIT::ASSIGN-FORMAT-QUOTE (SEDIT::NODE SEDIT::CONTEXT -CL:FORMAT) PRETTYVAR1 (VAR DEF LASTCOL) |\\UFSGetFileName| (FILENAME RECOG DEV) -\\TFBRAVO.COPY.NAMEDTAB (OBJ) |\\UFSError| (ERRNO NO) TB.MAP.SELECTED.ITEMS (BROWSER LASTITEM# MAPFN) -|\\LFDirectoryNameP| (|DirSpec|) \\UFS.OPENP (DEV COMPAREFN UNIXNAME) OPT.CHLEV (N) \\GTREADTABLE1 (X) - |\\UFSSetFileInfo| (DEVICE #:G852 STREAM ATTRIBUTE ERRNO) MAKEDEFLIST (X PROP) \\UFS.ADD.HOST.FIELD ( -DEV) OPT.JUMPCHECK (C) TAN (X XX) \\UFS.FULLNAME (DEV) VERBNOTICELIST (VPART) GETSYNTAX (TABLE VAL KEY - DEF C) BLOCK\: (X) |\\VFMCreateVPage| (|vfmFileD| |group|) DSPRIGHTMARGIN (XPOSITION) POSTEDITPROPS ( -EDITCHANGES OLDPROPS) SEDIT::SELECT-NODE-SEGMENT (SEDIT::CONTEXT SEDIT::NODE SEDIT::START SEDIT::END -SEDIT::POINT) \\READCLASSTOCODE (CLASS) COMPILER::ENV-DECLARE-SPECIALS (COMPILER:ENV COMPILER::SPECIALS -) \\UFS.REMOVE.HOST.FIELD (FILE PARSE-LIST DEV #:G856) SEDIT::ASSIGN-FORMAT-LIST (CL:FORMAT SEDIT::CONTEXT - SEDIT::SUBNODE SEDIT::LAST-FORMAT) \\GETREADSYNTAX (C TABLEA1765 TBL B E) EQLENGTH (N) D-ASSEM::PUSH-INTEGER - (D-ASSEM::N) D-ASSEM::DCODE-FROM-DLAMBDA (D-ASSEM::DLAMBDA D-ASSEM::LEVEL D-ASSEM::*DCODE*) -PRETTYCOM1 (PRTYCOM X) FB.UPDATE.COUNTERS (FBROWSER COUNTERW TOTAL DEL TOTALPAGES DELPAGES TYPE -XPOSPAIRS PAGESTRING HEIGHT) D-ASSEM::CHOOSE-OP (D-ASSEM::ARG D-ASSEM::CHOICES) \\UPDATE.PSC ( -IMAGEDATA STREAM) \\TEDIT.COPYINSERTFN (WW INSERTIONS TEXTSTREAM SEL) POSTSCRIPT.SHOWACCUM (STREAM) -UNDOPRINT (X) HPINITRDTBL (RDTBL) ASKUSER1 (CHAR) ARGTYPE.STATE (X) TRANSLATE.LOCF (ARGS) PFI.HANDLE.* - (EXPR LINEGUESS) \\BLTSHADE.GENERICPRINTER (DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT STREAM -SHADESCALE TEXTURE OPERATION) DPRIN1 (STR) DSPXPOSITION (XPOSITION) \\LEAF.ERROR (PUP DATA FILENAME -CONNECTION) CL::PS-NAME-SLOT-POSITION (CL::PS CL::SUPER-SLOTS) INSPECTW.SELECTITEM (INSPECTW) -PRINTARRAY-TO-LIST (V) DSPYPOSITION (YPOSITION) \\TERMCLASSTOCODE (CLASS) READARRAY-FROM-LIST (SIZE -TYPE ORIG A) DREAD (PROMPT) \\GETFILINGCONNECTION (DEVICE DEVINFO) \\RANGELIMIT (MIN MAX VAL) NORMLOOP - (LIST) \\GETTERMSYNTAX (C TABLEA1760 TBL TABLEA1761) |\\UFSeol| (RECOG FILENAME) DSPLEFTMARGIN ( -XPOSITION) D-ASSEM::DIGEST-FUNCTION (D-ASSEM::DLAMBDA D-ASSEM::FN-PAIR D-ASSEM::CLOSED-OVER D-ASSEM::DVAR - D-ASSEM::TAIL D-ASSEM::OPT-VAR) WINDOWSIZE (WINDOW EXT) EXPANDATTACHEDWINDOWS (WINDOW ATTACHEDWINDOW) - DSPROTATE (ROTATION) MAKEFILE1 (FILE COMPILER ROOTNAME OTHERFILES OPTIONS) NEARTOP (MAINREGION -TOPMARGIN) \\UFS.DIRECTORY.NAME (DIRSTRING NAMEAREA DEV #:G847 #:G848) SEDIT::SIMPLE-STRING-SCAN ( -SEDIT::STRINGITEM STRING SEDIT::FONT) |\\InitCurveBrushes| (BRUSHNAME) TEDIT.HARDCOPYFN (WINDOW -IMAGESTREAM) D-ASSEM::STORE-DIGEST-INFO (D-ASSEM::FREE-VAR-ALIST D-ASSEM::FREE-VAR-COUNT D-ASSEM::DVAR -) MKCONS (CARPART) POSTSCRIPT.CLOSESTRING (STREAM) DIRPRINTNAME (FILEGROUP FULLNAME LASTNAME STREAM) -DSPTOPMARGIN (YPOSITION) MOVETOFILE (NAME TOFILE) D-ASSEM::DVAR-FROM-LAP-VAR (D-ASSEM::LAP-VAR) -\\ALLOCMINIMUMSIZES (INTMINWIDTH INTMINHEIGHT ATW) \\STRINGOUT (STRING STREAM) -COMPILE-FILE-WALK-FUNCTION (FORM) BREAK (X) IMPORTFILE (RETURNFLG) COMPILER::ENV-PROCLAIMED-GLOBAL-P ( -COMPILER::NAME COMPILER:ENV) D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL (D-ASSEM::FN D-ASSEM::DLAMBDA -D-ASSEM::ID D-ASSEM::DVAR D-ASSEM::PENDING A1716) DSPSCALE (SCALE) SHOWDEF (NAME TYPE) D-ASSEM::DIGEST-CODE - (D-ASSEM::LAP-CODE D-ASSEM::TAIL) OPENNSOCKET (SOCNUM IFCLASH) SEDIT::SET-SELECTION-COMMENT-WORD ( -SEDIT::NODE SEDIT::OFFSET SEDIT::CONTEXT) FB.DELETECOMMAND (BROWSER) MSINTERPRET (COMMAND SET FN -EDITCOMS NEEDUPDATE EDIT KEY AT SUBROUTINE) DSPOPERATION (OPERATION) HVFWDREAD (FILE RDTBL) -D-ASSEM::INTERN-VAR (D-ASSEM::VAR) \\SETTERMSYNTAX (CHAR TABLE CODE TBL C TABLEA1763 CLASS TABLEA1764) - RECORDECLBLOCK (DEC FIELDS DLIST) CL::PREDICATE-BODY (CL::PS) |\\UFSRenameFile-C| (FDEV) -INSPECTW.REPLACE (INSPECTW STOREFN DATUM PROPERTY NEWVALUE) \\NSFILING.DISCARD.SESSION (DEVICE) PPT (X -) UNIX.SENDSCREENPARAMS (STREAM WIDTH HEIGHT) DINFO.TITLEMENUFN (DINFOW GRAPH MENUFN) -XCL::WHERE-IS-GET-WRITE-DATE (CL:NAMESTRING HASH-FILE:HASH-FILE) OPT.JFIXPASS (JL FN) \\SETREADSYNTAX -(C TABLEA1766 TBL OLDSYNTAX CHAR TABLE CODE) ARCCOS (X XX) DOATTACHEDWINDOWCOM2 (ATTACHEDW) -COMPILER::ENV-PROCLAIM-GLOBAL (COMPILER::NAME COMPILER:ENV) D-ASSEM::GENERATE-EASY-ENTRY (D-ASSEM::DLAMBDA - D-ASSEM::ARG-TYPE) CHAT.TYPEOUT (DPYNAME WINDOW INSTREAM OUTSTREAM HANDLECHARFN TYPEIN.PROCESS) -\\NSFILING.CLOSEFILE (OPTIONS FILESTREAM) MAKEFILE (X) NEARESTCORNER (REGION) D-ASSEM::GENERATE-HARD-ENTRY - (D-ASSEM::DLAMBDA D-ASSEM::NUM-REQUIRED D-ASSEM::NUM-OPTIONAL) \\COURIER.EXPEDITED.ARGS (ARGTYPES -ARGLIST STREAM PROGRAM) SEDIT::SIMPLE-STRING-OFFSET (SEDIT::INDEX SEDIT::STRINGITEM) -\\TEDIT.BUTTONEVENTFN (WINDOW) \\MEDW.GETSCREENREGION (NEWREGIONFN A) IRNDLIST (PATH I) \\MAPCHARTABLE - (FN CHARTBL) D-ASSEM::INSTALL-LOCAL (D-ASSEM::CLOSED-OVER D-ASSEM::DVAR) D-ASSEM::EASY-ENTRY-P ( -D-ASSEM::DLAMBDA) FTP.BREAKCONNECTION (HOST STREAM) \\NSFILING.UPDATE.ATTRIBUTES (NEWATTRS) -INTERLISP-NLAMBDA-FUNCTION-P (X) SUPERPRINTGETPROP (ATM PROP) |\\LFParseFileName| (FULLNAME) -CHAT.SETDISPLAYTYPE (INSTREAM CODE NAME) DINFO.GET.FILENAME (NODE GRAPH) DIRFILENAME (NAME) -OPT.JLENPASS (JL PROP) ARCSIN (X) CH.RETRIEVE.MEMBERS (STREAM) D-ASSEM::GENERATE-ARG-CHECK (D-ASSEM::DLAMBDA - D-ASSEM::MIN-ARGS) ONFILE (FT) RECORDECLTAIL (FIELDNAMES TRANSLATION DEC LOCALVARS TYPES SETQPART -SETQTAIL) \\NSFILING.LOGIN (FILESERVER PROCNAME DEVICE) HVRPTREAD (FILE RDTBL) DWIMIFYREC (NEWVARS -PARENT ONEFLG FAULTFN) PRINTARRAY (V) D-ASSEM::GENERATE-KEY (D-ASSEM::NUM-REQUIRED D-ASSEM::NUM-OPTIONAL - D-ASSEM::DLAMBDA) ASKUSER$ (KEYLST NC CHAR) TEDIT.SHOWSEL (STREAM TEXTOBJ ONFLG) PFI.HANDLE.PUTDEF ( -EXPR) CHECKPATHS (OPTIONS) COMP.EFFECT (LV E) ASKUSERPRIN1 (NODOFLG X) HVREADEND (FILE RDTBL) -\\TEDIT.PARABOUNDS (TEXTOBJ CH# PCTB) DIRGETFILEINFO (FILEGROUP ATTRIBUTE) D-ASSEM::STACK-ANALYZE ( -D-ASSEM::CODE D-ASSEM::*ENDING-DEPTH*) SYNTAXP (CLASS CODE TABLEA1744 TABLE TABLEA1745 TABLEA1746 -TABLEA1748 TABLEA1749 TABLEA1751 TABLEA1752 TABLEA1754 TABLEA1755 TABLEA1757 TABLEA1758) RECORDECL0 ( -DEC PARENT TRANSLATION) CL::ASSIGN-FIELD-DESCRIPTORS (CL::PS) D-ASSEM::GATHER-TAGS (D-ASSEM::TAGS-FOUND -) DELETECONTROL (TTBL TYPE) DINFO.OPENTEXTSTREAM (WINDOW FILE FROM TO THIS.TEXT PROPS) CHAT.EMACS.MOVE - (CHAT.STATE CLOC) \\SIN-FLOAT (X) \\GETBRUSHBBT (BRUSHBM DISPLAYDATA |Operation| |SourceType|) -\\VALID.FILING.CONNECTIONP (SESSION) DINFO.READ.GRAPH (QUIETFLG FILE FULLFILENAME DATA) -GETBOXSCREENREGION (WIDTH HEIGHT ORGX ORGY WINDOW PROMPTMSG) MAKEXYPT (IX IY) |\\UFSDeleteFile-C| ( -FDEV) MB.CREATE.THREESTATEBUTTON (TEXT FONT BOX OBJ STATECHANGEFN INITSTATE) POSITIONP (X) -\\BSPEVENTFN (EVENT DEV) \\NSRANDOM.ENSURE.WATCHER (DEVICE) \\BUILDATWSTRUCTURE (SIDE MAINW -ATTACHEDWINDOWS EDGEBUCKETLIST) DSPSCALE2 (S\x S\y) COMPILER::ENV-PROCLAIMED-SPECIAL-P (COMPILER::NAME - COMPILER:ENV) D-ASSEM::STACK-ANALYZE-CODE (D-ASSEM::INIT-DEPTH D-ASSEM::INIT-BINDING-DEPTH) -D-ASSEM::ASSEMBLE-CODE (D-ASSEM::DEPTH) D-ASSEM::ASSEMBLE (D-ASSEM::LAP-CODE) \\BUILD.EXPEDITED.XIP ( -PGMDEF PROCDEF PROGRAM) SEDIT::SET-POINT-COMMENT-WORD (SEDIT::NODE SEDIT::OFFSET) MAKELISPXMACROSCOMS -(X Z) RECORDECL1 (STRUCNAME FIELD Y ARRAYDESC PARENT) CL::PROCESS-TYPE (CL::PS CL::EXPORTNAME) -\\INSPECTW.REDISPLAYPROP (WINDOW PROPERTY DATUM NEWVALUE) \\TOTALFIXEDHEIGHT (ATWSINFO) PRINTLEAF (PUP - LENGTH N WIDTH) UNIX.SETDISPLAYTYPE (STREAM TIMER BS) INTERLISP-FORMAT-P (STREAM) DINFO.SHOWSEL (SEL -TEXTSTREAM) XCL::WHERE-IS-SET-WRITE-DATE (CL:NAMESTRING PATHNAME HASH-FILE:HASH-FILE) CHAT.HOLD ( -WINDOW) |\\UFSGetFileType| (FILENAME) |\\PFGetFreePage| (|vol| |volumePageNumber| |frame| |runLength| -|noBreak|) DRAWBETWEEN (PT1 PT2 WIDTH OPERATION COLOR DASHING) PFI.HANDLE.PUTPROPS (EXPR NAME PROP) -DRAWCIRCLE (RADIUS CENTERX CENTERY BRUSH DASHING) MSHASHLIST1 (VAL KEY) HVREADCHECKGETFN (FN) -|\\VFMDelete| (|deleteKey| |deleteLevel| |volumePage| |nextKey|) \\TEDIT.BASICFIND (CHLIM STRING SEL -TEXTLIM TEXTSTREAM CH#1) INSURE.BRUSH (STREAM) ECHOCHAR (CHARCODE X TTBL SA CHAR TABLE CODE) -CLOSEATTACHEDWINDOWS (WINDOW ATTACHEDWINDOW) COMPILER::ENV-PROCLAIM-SPECIAL (COMPILER::NAME COMPILER:ENV -) D-ASSEM::COMPUTE-JUMP-SIZE (D-ASSEM::KIND D-ASSEM::PAIRS D-ASSEM::DISTANCE) \\NSPRINT.COURIER.OPEN ( -PRINTER) \\TEST.PARAGRAPH.LOOKS (FILE) CREATE.PACKET.EXCHANGE.XIP (NSOCKET DESTHOST DESTSOCKET TYPE) -SEDIT::SET-SELECTION-COMMENT (SEDIT::ITEM SEDIT::SELECTION SEDIT::CONTEXT SEDIT::NODE) SUB-FORMAT ( -START END) \\GETBRUSH (BRUSH) \\UFS.HANDLE.RELATIVEDIRECTORY (DEV #:G857) \\MEDW.GETSCREENPOSITION ( -CURSOR) SI::GET-DESCRIBERS (TYPE) MAKEPROPSCOMS (X PAIR) /PUT+1 (ATM PROP TAIL) D-ASSEM::GATHER-ROOTS -(D-ASSEM::CODE D-ASSEM::TAG-LIST) IMPORTEVAL (FORM Z) D-ASSEM::SPLICE-IN-JUMPS (D-ASSEM::JUMP-LIST -D-ASSEM::JUMP D-ASSEM::TAG D-ASSEM::KIND D-ASSEM::DISTANCE) \\TOTALFIXEDWIDTH (ATWSINFO) ASKUSERSETUP -(ENTRY) D-ASSEM::REDUCE-UNCERTAINTY (D-ASSEM::JUMP-LIST D-ASSEM::CUMULATIVE-UNCERTAINTY -D-ASSEM::DECREASE-IN-UNCERTAINTY) \\UFS.REGISTER.GFS (GENFILESTATE) DSPTRANSLATE (T\x T\y) RECORDBIND -(VAL) |\\UFStoOtherRenameMess| (NEW-DEVICE OLD-NAME EXTENSION NEW-NAME) D-ASSEM::RESOLVE-JUMPS ( -D-ASSEM::JUMP-LIST D-ASSEM::START-PC) D-ASSEM::START-PC-FROM-NT-COUNT (D-ASSEM::NT-COUNT D-ASSEM::NT-SIZE - D-ASSEM::NT-WORDS) \\SEND.EXPEDITED.XIP (\#TRIES NSOC XIP TIMER EVENT ID X PROGRAM PGMDEF PROCEDURE -PROCDEF NOERRORFLG) SEDIT::SET-POINT-COMMENT (SEDIT::NODE) PATH.LESSP (PATH1 PATH2) -TEDIT.MINIMAL.WINDOW.SETUP (PROPS TEXTSTREAM SEL) GETSCREENREGION (MINWIDTH MINHEIGHT INITREGION -NEWREGIONFN NEWREGIONFNARG INITCORNERS) D-ASSEM::INTERN-TAG (D-ASSEM::ID) GETECHOMODE (TTBL) -|\\UFSSetFileType| (FILENAME EXTENSION) D-ASSEM::CONVERT-TO-BINARY (D-ASSEM::BYTE-LIST D-ASSEM::CODELEN - D-ASSEM::CODE-ARRAY D-ASSEM::PUSH-TAG-FIXUPS) \\SHAREOFXTRAX (WINFO TOTALNEWSIZE TOTALOLDSIZE) -\\ARBOUT (STREAM W SIZE) GETCONTROL (TTBL) RECORDECL (DEC) CL::%STRUCTURE-TYPE-TO-FIELDSPEC ( -CL::ELEMENT-TYPE CL::COERCED-TYPE) \\UFS.FILEINFOFN (GENFILESTATE ATTRIBUTE) GETTERMTABLE (TTBL) -XCL::WHERE-IS-NAMESTRING (PATHNAME) MAKESCAN (SELF) PFI.PRINT.LAMBDA.BODY (DEF FNSLST) -D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL (D-ASSEM::NT-COUNT D-ASSEM::NT-SIZE D-ASSEM::NT-WORDS) -\\COERCE.NS.SOCKET (COPYADDR) GETRAISE (TTBL) CONSFN (X Y) D-ASSEM::PERFORM-LOCAL-FN-FIXUPS (D-ASSEM:DCODE -) \\FTP.GENERATEFILES (PATTERN DESIREDPROPS PROP CODE OPTIONS) GETDELETECONTROL (TTBL TYPE) DRAWCURVE -(BRUSH KNOTS CLOSED DASHING) READARRAY (SIZE TYPE ORIG A) /LISPXPUT (PROP L) PRETTYPRINT2 (FN) -\\FTP.REOPENFILE (ACCESS STREAM) SETTERMTABLE (TBL) RESETTERMTABLE (FROM TTBL FR) -COMPILER::ENV-INLINE-DISALLOWED (COMPILER::NAME COMPILER:ENV COMPILER::PARENT) \\LITCHECK (X) -\\NSPRINT.MEDIUM.CHECK (MEDIUM MEDIA PRINTER) CLOSEPOSTSCRIPTSTREAM (STREAM) ACCESSFN (NAME&FIELDS) -\\TEST.CHARACTER.LOOKS (FILE) DRAWELLIPSE (CENTERX CENTERY SEMIMINORRADIUS SEMIMAJORRADIUS ORIENTATION - BRUSH DASHING) \\UFS.VALID.PROPP (DESIREDPROPS PROP) \\ORIGTERMTABLE (TBL) |\\PFPutMarkerPage| ( -|index| |frame|) \\UFS.NEXTFILEFN (FINFOID DEV DIR FILEGROUP) MSHASHLIST (HTABLE PREVVALUE) HVBAKREAD -(FILE RDTBL X CH RPTCNT) |\\VFMInsert| (|insertKey| |insertLevel|) ECHOCONTROL (CHAR MODE TTBL) EQP (X - Y) BRUSHP (BRUSH?) |\\LFNormalizeVolumeName| (|volName|) \\FTP.ADD.QUOTES (NAME) CHAT.SET.EMULATOR ( -TYPEOUTPROC WINDOW OLDTITLE) \\COPYSYNTAX (A) CHAT.MENU (WINDOW) CL::ASSIGN-STRUCTURE-REPRESENTATION ( -CL::PS) COMPILER::ENV-INLINE-ALLOWED (COMPILER::NAME COMPILER:ENV COMPILER::PARENT) -\\ITEMW.DESELECTITEM (WINDOW) \\NSPRINT.UNSUPPORTED (PRINTER FEATURE VALUE) \\DSPXPOSITION.PSC (STREAM - IMAGEDATA) DRAWPOLYGON (POINTS CLOSED BRUSH DASHING) XCL::WHERE-IS-FILES (XCL::PATTERN XCL::FILES) -FB.SUBITEMP (ITEM SUBITEM) PRINTERS.WHENSELECTEDFN (ITEM) PFI.HANDLE.DEFINEQ (EXPR DEF) EMBEDPROG (DEF - BINDVARS BINDVALS) \\TERMCODETOCLASS (CODE) \\FTP.CLOSEFILE (ACCESS FILENAME) COMPILE-FILE-SCAN-FIRST - (FIRSTFLG DOCOPY EVAL@COMPILE FORM COMPILED.FILE) |\\PFGetLVPage| (|lvName|) \\TEDIT.MENU.WHENHELDFN -(ITEM) TYPESOF (SOURCE POSSIBLETYPES IMPOSSIBLETYPES NAME) COPY-CIRCLE (X) FILLPOLYGON (POINTS TEXTURE - OPERATION) COMP.MLLVAR (X) SEDIT::PARSE-STRING-INTO-WORDS (SEDIT::CHARS) \\BRUSHBITMAP (BRUSHSHAPE -BRUSHWIDTH NEWBRUSHBM) IMLTLIST (KLIST PT M11 M12 M13 M21 M22 M23) \\GET.SESSION.HANDLE (STREAM) -GETSCREENPOSITION (CURSOR) MSLISTSET (SET TYPE) HVFWDCDREAD (FILE RDTBL) FILEGETDEF.VARS (SOURCE NAME) - COMPILER::SCAN-ONE-FORM (COMPILER::FORM) \\TOTALPROPOSEDSIZE (ATW RESTATWS PWIDTH PHEIGHT) XYPT.LESSP - (PT1 PT2) \\PUT.SESSION.HANDLE (ITEM STREAM) GETBOXSCREENPOSITION (BOXWIDTH BOXHEIGHT ORGX ORGY -WINDOW PROMPTMSG) MSMEMBSET (SET ITEM) PARSE-FORMAT-OPERATION (CH COLON ATSIGN) MAKEFILESCOMS (FILES) -COMPILER::FUNCTION-P (COMPILER::FORM) DRAWTO (X Y WIDTH OPERATION COLOR DASHING) \\SHAREOFXTRAY ( -TOTALOLDSIZE WINFO TOTALNEWSIZE) \\TEDIT.APPLY.STYLES (LOOKS TEXTOBJ STYLE-SHEET PC) GENERATOR (FORM## -) IN-READTABLE (RDTBL) FILLCIRCLE (CENTERX CENTERY RADIUS TEXTURE) COMP.MLL (LL X P S F V) -SEDIT::SELECT-SEGMENT-COMMENT (SEDIT::SELECTION) ANTILOG (X XX) |PopUpWindowAndGetList| (PROMPTSTRING -FONT WIDTH PROMPTW CANDIDATE RESPONSE) COPYREADTABLE (RDTBL) PFI.PRINT.LAMBDA (DEF *PFI-ITEM*) -POSTSCRIPT.BITMAPSCALE (PAGEREGION LONGEDGE SHORTEDGE MINDIML MINDIMP) GETBRK (RDTBL) RECLISPLOOKUP ( -WORD VAR1 VAR2) \\TEDITMENU.SELSCREENER (TEXTOBJ MAINW SEL) \\UFS.ABORT.CL-DIRECTORY (GFS) -\\FTP.DIRECTORYNAMEP (HOST/DIR DEV) COMPILE-FILE-EXPRESSION (COMPILED.FILE DEFER FORCE-OUTPUT-P -DEFINITION BODY X VARS VALS INNER-FORM) \\LEAF.RECONNECT (DEVICE) RECREDECLARE (RECNAME RECFIELDS -OLDFLG) CL::COERCE-TYPE (CL::ELEMENT-TYPE) COMPILER::ENV-DISALLOW-INLINES (COMPILER:ENV COMPILER::NAMES -) |\\UFSMakeUnixFormatName| (FILE OLDFILE LEN NEWINDEX NEWFILE) INSPECTW.PROPERTIES (INSPECTW) -\\DSPYPOSITION.PSC (STREAM IMAGEDATA) CREATE-SHELL-STREAM (TERMTYPE COMMAND SHELL-DEV STR) GETSEPR ( -RDTBL) CRIT.LESSP (SCAN1 SCAN2) COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION (COMPILER::NAME -COMPILER::*ENVIRONMENT* COMPILER::DEFINITION) |\\UFSParseNameString| (FILE OLDFILE NEWFILE) -\\FTP.MAKEPLIST (HOST INFO FILENAME DESIREDPROPS) DRAWPOINT (X Y BRUSH OPERATION) -\\UFS.CLEANUP.GFS.TABLE (VAL NOTICETOCP) COMP.MLLIST (FN CC) DIRECTORY.MATCH1 (TESTNAME NAMELIMIT -CASEBASE) LISTHARD (SET TABLE) HPRINTSP (X) \\UFS.ADJUST.HOST (FIELDS) CENTERINWIDTH (RELATIVETOREGION - WIDTHTOCENTER) GETREADTABLE (RDTBL) COMPILER::ENV-ALLOW-INLINES (COMPILER:ENV COMPILER::NAMES) -RELDRAWTO (STREAM DX DY STRM WIDTH OPERATION COLOR DASHING) RPLNODE (A D) \\MOVETO.PSC (STREAM X Y) -HPERR (A1 A2) \\TEDIT.BRAVOFILE? (FILE ORIGINAL.FILE.POSITION) |\\UFSParse-Directory| (PARSE DEV -#:G854 #:G855) FB.COMMANDSELECTEDFN (MENU WINDOW FBROWSER REALITEM PWINDOW KEY) ESCAPE (FLG) -\\UFS.PARSE.BODY (PARSEDNAME) READMACROS (FLG) \\FTP.GETFILENAME (RECOG NAME DEV) -SI::DESCRIBE-USING-RECORD-DECL (SI::DEPTH SI::FIELD-NAME SI::OBJECT DECL) DRAWARC (CENTERX CENTERY -RADIUS STARTANGLE NDEGREES BRUSH DASHING) PFI.HANDLE.DEFDEFINER (EXPR) BITMAPIMAGESIZE (STREAM BITMAP -DIMENSION) PARSE-NSADDRESS (BASE STRING MAXDIGIT DEFAULTSOCKET) READTABLEPROP (ARGS) PRINOPEN (TAIL -FILE PAREN) EDITREC (L) PRINTANDBOX (STREAM STRM LFTMARGIN MINSPACE EXP) \\GTREADTABLE (X FLG) -FILEGETDEF.FNS (OPTIONS NAME) XCL::WHERE-IS-NOTICE-INTERNAL (XCL::NAME HASH-FILE:HASH-FILE TYPE -XCL::ALIST XCL::OLD-ENTRY) \\PUT.FILING.ATTRIBUTE (ITEM STREAM VALUE PROGRAM) SETCORNER (X2 X1 Y2 Y1) -\\FZEROP (X) FILEGETDEF.MACROS (SOURCE X) PUPSOCKETEVENT (PUPSOC) \\ALLOCSPACETOGROUPEDWINDOWS ( -WGROUPINFO) TEDIT.PUT.PAGEFRAMES (FILE PAGEFRAMES) \\TEDIT.MENU.WHENSELECTEDFN (ITEM MENU BUTTON) -CHDIR (PATHNAME) CIRCLAR-COPYER (INPUT) SETBRK (LST RDTBL X FLG) SEPRCASE (Y X) MODERNWINDOW.UNSETUP ( -ORIGFN PKGNAME) SEDIT::PARSE--COMMENT-WORD (CL:STRUCTURE SEDIT::CONTEXT) STRINGREGION (STREAM STR -PRIN2FLG RDTBL) TEDIT.WINDOW.SETUP (TEXTOBJ WINDOW PROPS TEXTSTREAM AFTERWINDOW) \\FIXLINELENGTH.PSC ( -IMAGEDATA TMP) BLTHLINE (SHADE DESTINATION XA XB Y A) MAKEEPSFILE (IMAGEOBJ IMAGEBOX FILENAME) -FILEGETDEF.RECORDS (SOURCE VAL NOTFOUND) DIR (ARGS) PUPSOCKETNUMBER (PUPSOC) \\FTP.GETFILEINFO (STREAM - DEV ATTRIBUTE) \\TEDIT.PUT.SINGLE.CHARLOOKS (FILE LOOKS FONT STREAM W FILEPOS) SETSEPR (LST RDTBL X -FLG) ATTACHEDWINDOWREGION (MAINW COM ATWIN) COMPILER::ENV-DECL-P (COMPILER::SPECIFIER COMPILER:ENV -COMPILER::PARENT) |\\UFSGetPrintFileType| (FILENAME) \\DSPFONT.PSC (STREAM OLDFONT) PRINSHUT (FILE) -SCALEDBITBLT (DESTINATION SOURCE SOURCELEFT SOURCEBOTTOM DESTINATIONLEFT DESTINATIONBOTTOM WIDTH -HEIGHT SOURCETYPE OPERATION TEXTURE SCALE) SEDIT::LINEARIZE-COMMENT (SEDIT::NODE SEDIT::CONTEXT -SEDIT::ENVIRONMENT SEDIT::LEVEL SEDIT::PREFIX) \\UPDATE-WHO-LINE-ACTIVE-FLAG (WINDOW) -|\\PFGetMarkerPage| (|index| |frame|) MSGETBLOCKDEC (FILES TYPE) RPTPUT (CNT ITEM) NOTOKSWAP (EXPR1 -EXPR2) \\TEDIT.PUT.PARALOOKS (PC FILE STREAM W LOOKS PARAHASH) |\\UFSGetFileTypeConfirm| (FILENAME) -TRYNEXT1 (MSG##) \\LEAF.GETFILEINFO (ATTRIBUTE DEV) |\\DFSFreeDiskPages| (|volName| |vol| |recompute|) - \\DRAWPOLYGON.GENERIC (BRUSH STREAM COLOR DASHING) LISP-TO-UNIX-TERMTYPE (TERMTYPE) PRETTYDEFMACROS ( -ARGS X) SETFONT (FILE OLDFONT) TERM.RESET.DISPLAY.PARMS (DSP FONT FONTHEIGHT FONTWIDTH FONTDESCENT -WINDOW TTYHEIGHT) HASHLINK (NAME&FIELDS) LOG (X) CENTERINHEIGHT (RELATIVETOREGION HEIGHTTOCENTER) -COMPILER::ENV-ADD-DECLS (COMPILER:ENV COMPILER::SPECIFIERS) \\DRAWCIRCLE.GENERIC (RADIUS CENTERX -CENTERY R2RAD BRUSH DASHING STREAM) \\DSPLEFTMARGIN.PSC (STREAM) \\SPP.PREPARE.OUTPUT (EPKT) PRINDOTP -(E FILE DOT MAXPOS) UNMODERNWINDOW (WINDOW) CREATEPOSITION (XCOORD YCOORD) -COURIER.EXECUTE.EXPEDITED.CALL (PROGRAM PROCEDURE ARGLIST NSOC ADDRESS SOCKET# PGMDEF PROCDEF ARGTYPES - NOERRORFLG) SEDIT::PARSE--COMMENT (CL:STRUCTURE) SI::INSPECT-MACRO-USABLE-BY-DESCRIBE? (SI::MACRO) -INSIDE? (X BOX Y) BLTVLINE (SHADE DESTINATION X YA YB A) ENCAPSULATEDOBJ.IMAGEBOXFN (STREAM OBJ FONT -GETFN) POSTSCRIPTFILEP (FILE) FILEGETDEF.PROPS (SOURCE NAME) \\FTP.DELETEFILE (FILENAME NAME DEVICE -PROP) COMP.MAP (L XARG ENDLP LP OUT) \\READTABLEP.DEFPRINT (RDTBL STREAM) |\\PFFreeDiskPages| (|vol|) -\\DRAWPOINT.GENERIC (X Y BRUSH OPERATION STREAM) PRIN2STRING (FILE STR TAIL LMARG RMARG COMMENTP TEM) -PRIN2S (TAIL FILE STR) XCL::WHERE-IS-NOTICE (XCL::DATABASE-FILE XCL::FILE XCL::HASH-FILE-SIZE -HASH-FILE:HASH-FILE PATHNAME) CHAT.DID.RESHAPE (CHAT.STATE) FIND-READTABLE (NAME) COMPILER::RAW-COMPILE - (COMPILER::NAME COMPILER::DEFINITION COMPILER::COMPILED-DEFN) \\GET.FILING.ATTRIBUTE (STREAM ATTR -PROGRAM) |\\PFPutLogicalVolumePage| (|vol| |frame|) \\CH.FIND.ORG.SERVER (ORGANIZATION ORG) MSINTERPA -(KEY) SUPERPRINT/WRAPPER (E BODY FILE MACRO TAIL X Y BRFLG) FIXFIELDORDER (EXPRESSION) POSSIBILITYFN ( -FN) SI::DESCRIBE-USING-INSPECT-MACRO (SI::MACRO SI::DEPTH SI::FIELD-NAME SI::FETCHFN SI::OBJECT -SI::FIELDS) SET-DEFAULT-HASHMACRO-SETTINGS (RDTBL) \\CH.LOCATE.SERVERS (ORGANIZATION CHSERVER -NOERRORFLG SERVERGROUP) \\SETWINFOYSIZE (PROPOSEDSIZE) MSINTERPRETSET (OP OTHERSET HTABS X FILE Y -MSVERB OS) COMPILER::START-COMPILATION (COMPILER::FASL-STREAM COMPILER::FILECREATED) -\\TEDIT.PUT.PARALOOKS.LIST (FILE STREAM W LOOKSLIST LOOKSHASH) CLEANPOSLST (PLST X) SYNONYM ( -NAME&FIELDS) \\LEAF.READPAGES (BUFFERLIST FIRSTPAGE STREAM) RECORDINIT (X) CL::INSERT-INCLUDED-SLOT ( -CL::NEW-SLOT CL::SUPER-SLOTS CL::PS CL::OLD-SLOT) \\INTERNAL/GETPASSWORD (INFO MSG DEFAULTNAME) -\\FTP.DIRECTORYNAMEONLY (DIRNAME) COMP.SELECTQ (C END Y) \\SETMACROSYNTAX (CLASS C CHAR TABLE CODE) -PRIN1S (TAIL FILE STR) XCL::SAME-WHERE-IS-DATABASE (XCL::X XCL::Y XCL::PATHNAME-X XCL::PATHNAME-Y) -TEXTSTREAM (STREAM) PRIN2-LONG-STRING (STREAM ESC STRING RMARG TAIL LMARG HASH SA) -\\FILINGHANDLE.DEFPRINT (HANDLE STREAM) SCAN.LESSP (SCAN1 SCAN2) MOVEBOX (Y1 X2 X3 DESTINATION SHADE -X1 Y2 Y3) FILEGETDEF.LISPXMACROS (SOURCE NAME) MAKEDOTPTAIL (B V) OPENPUPSOCKET (SKT# IFCLASH) -\\FTPEVENTFN (EVENT DEV) \\TEDIT.PUT.CHARLOOKS.LIST (FILE STREAM W LOOKSLIST LOOKSHASH) -READBQUOTECOMMA (FILE CH) REMOVEWINDOW (WINDOW) COMPILER::ENV-BIND-VARIABLE (COMPILER::NAME COMPILER::STRUCT - COMPILER:ENV) COS (X XX) \\DSPRIGHTMARGIN.PSC (STREAM) CHECKDEFS (X FIELDS) DMATCH (TESTNAME) SIN (X -XX) COURIER.EXPEDITED.CALL (ARGS PROGRAM PROCEDURE ADDRESS SOCKET#) SEDIT::SPLIT-COMMENT (SEDIT::CONTEXT - SEDIT::NODE SEDIT::COMMENT SEDIT::START CL:LENGTH SEDIT::POINT) LOGIN (HOST FLG DIRECTORY MSG) -TB.USERDATA (NEWDATA) |\\PFCurrentVol| (|index|) \\RESHAPEATTACHEDWINDOWSAROUNDMAINW (MAINW -MAINWEXTENT ATWINSINFO) READATOM (SI::$PROG1-FIRST-EXPRESSION$) \\INTERNAL/SETPASSWORD (MSG FN) -SEDIT::PRINT-STRING (SEDIT::WINDOW SEDIT::STR STRING STREAM SEDIT::ESC-CHAR) RPTPRINT (X) -CHAT.TYPEOUT.CLOSE (WINDOW OUTSTREAM MSG NEWSTATE) MAKE-READER-ENVIRONMENT (R) \\DRAWELLIPSE.GENERIC ( -COSOR SEMIMAJORRADIUS SINOR SEMIMINORRADIUS ROOT2DIV2 CENTERX CENTERY BRUSH DASHING STREAM) -PFI.HANDLE.RPAQQ (EXPR NAME *MAINFILECOMS*) COMPILER::TEST-GENCODE (COMPILER::FN) MASTERSCOPEXEC (X) -HPRINTEND (Y Z HERE) NOTE (VAL) \\SETWINFOXSIZE (PROPOSEDSIZE) \\LEAF.OPENFILE (DEV OTHERINFO ACCESS -DEVINFO RECOG) \\TEDIT.CHARDELETE (NV PCTB) \\TEDIT.CREATEMENU (ITEMS) COMPILER::PRINT-ENV (STREAM -COMPILER::STRUCT) \\DSPLINEFEED.PSC (STREAM) SET-READER-ENVIRONMENT (ENV) SEDIT::INSERT-COMMENT-CHARS -(SEDIT::CONTEXT CL:LENGTH SEDIT::STRING-LENGTH SEDIT::FONT SEDIT::NODE SEDIT::NEW-SUBNODE SEDIT::WORDS - SEDIT::DEPTH) TB.CLEAR.LINE (BROWSER LEFT ITEM WIDTH) TEDIT.CURSOROUTFN (W) DRAWGRAYBOX (Y1 X1 X2 -DESTINATION SHADE Y2) \\TEDIT.COMMAND.RESET.SETUP (TEXT&WIND WINDOW WW) FILEGETDEF.ALISTS (SOURCE NAME -) COMP.PREDP (CTX) MBUTTON.SET.NEXT.FIELD (TEXTOBJ CH# SCRATCHSEL) \\FTP.REGISTER (STREAM) -\\NSRANDOM.RELEASE.IF.ERROR (SESSION HANDLE) SETPASSWORD (PASSWORD) \\BREAKAPARTATWSTRUCTURE (ATWLST -ATW) \\ADJUST.USERNAME (OSTYPE) SEDIT::SCAN-FOR-BOUNDS (SEDIT::LINE) INSIDEP (REGION POSORX Y) -SETTEMPLATE (FN TEMPLATE OLD NOSAVEFLG) \\UNIMPIMAGEOP (STREAM OP) \\ENCRYPT.PWD (STR) -SEDIT::INSERT-COMMENT (SEDIT::WHERE SEDIT::NODE SEDIT::POINT) \\TEDIT.FIND.OVERLAPPING.LINE (Y) -REPOSITIONATTACHEDWINDOWS (WINDOW ATTW) GETOSTYPE (HOST) STRING-EQUAL (STRING1 STRING2) FONTCREATE ( -CHARSET CHSET) SYSRECLOOK1 (RECNAME) CL::RESOLVE-SLOTS (CL::LOCAL-SLOT-DESCRIPTIONS CL::PS -CL::SUPER-SLOTS CL::LOCAL-SLOTS) EXEC-READ-LINE (BUFFER-STRING) XCL::DEL-WHERE-IS-DATABASE (XCL::DATABASE - XCL::ELEMENT) SETREADTABLE (RDTBL) COMPILER::COMPILE-SCAN-LOOSE-FORM (COMPILER::FORM) -SI::DESCRIBE-USING-DESCRIBERS (SI::DESCRIBER SI::OBJECT SI::DEPTH SI::DESCRIBERS) CL::MERGE-SLOTS ( -CL::SUPER-SLOTS) GREET (X) GREET0 (DATE) ALLPATHS (LST PR) GENERATEFN (FN) \\TRACKWITHBOX (SHADE) -\\LEAF.WRITEPAGES (BUFFERLIST FIRSTPAGE OPUP) PRINT-DOCUMENTATION (NAME TYPE) \\FTP.UNREGISTER (STREAM - DEVICE) \\DECRYPT.PWD (STR) COMPILER::PRINT-CONTEXT (COMPILER::STRUCT COMPILER::TL COMPILER::VALS -COMPILER::PRED COMPILER::APP STREAM) \\DRAWLINE.PSC (STREAM X2 X1 Y2 Y1 OPERATION COLOR DASHING D) -DCODERD (INSTREAM FN CODELEN NTBYTESIZE ARGTYPE NARGS DEFA1738 VALUEA1737 NLOCALS NFREEVARS DEFA1740 -VALUEA1739 DEFA1742 VALUEA1741) \\SHIFT.DOCUMENT (BASEA1543 NO ARR PCTB DELTAX ELEMENT) DEFC (NM DF -PROP) |\\PFGetLogicalVolumePage| (|vol| |frame|) \\LOGIN.READ (OSTYPE DEFAULTNAME TERMINATIONS) BKBUFS - (BUFS) EQUAL-READER-ENVIRONMENT (ENV1 ENV2) HPRINT1 (SIZE K PR Y) SEDIT::PARENTHESIZE-CURRENT-SELECTION - (SEDIT::CONTEXT SEDIT::SELECTION SEDIT::END) DCODESKIP (INSTREAM RDTBL FN) CLBUFS (BUF) PRIN4 (FILE -STRM X) CHAT.TTYENTRYFN (PROCESS) PROMPTFORWORD (TTBL X) COMP.NUMBERTEST (FORM X TEST) RECREDECLARE2 ( -FORM) COMPILER::LOCAL-CONSTANT-P (CL:SYMBOL) \\IMAGEIOINIT (STREAM OPOS STR RDTBL CHARSET DIMENSION -BITMAP X Y) \\DRAWCURVE.PSC (STREAM BRUSH IMAGEDATA DASHING D KNOTS CLOSED) \\ALLOC.CODE.BLOCK (NBYTES - INITONPAGE) \\TFBRAVO.ADD.NAMEDTAB (TABNO PARALOOKS TEXTOBJ) SPPSTREAMP (STREAM) \\REALNAMEP (X) -SI::DESCRIBE-INTERNAL (SI::DEPTH SI::OBJECT TYPE SI::TYPE-NAME) PFI.ESTIMATE.SIZE (EXPR) -COMPILER::GENCODE-UNWIND-PROTECT (COMPILER::NODE) POSTSCRIPT.TEXT (FILE PSCFILE FONTS HEADING TABS) -RECLOOK1 (DECS DEC AVOIDDECS RECNAME) ADIEU (VAL##) \\LEAF.TRUNCATEFILE (OPUP STREAM LASTOFF) -VOLUMESIZE (|volName| |vol|) RELMOVETO (DX DY) DO-EVENT (ORIGINAL-INPUT TABLE X) CHAT.CHOOSE.EMULATOR -(HOST) MODERNWINDOW.BUTTONEVENTFN.ANYWHERE (WINDOW) SPP.SENDATTENTION (STREAM CON CC ATTENTIONBYTE) -SEDIT::DEGRADE-COMMENT (SEDIT::NODE SEDIT::CONTEXT) FAKE-COMPILE-FILE (COMPILER-OUTPUT -COMPILE.FILE.AFTER) MMLTLIST (KLIST PT M11 M12 M13 M21 M22 M23) \\FILINGSESSION.DEFPRINT (STREAM -SESSION) WINDOWPROP (X) COMP.VAL (X LV) STRINGWIDTH (STR RDTBL FONTDESC CHARCODE) -\\NSFILING.CLOSE.HANDLE (SESSION HANDLE) \\UPDATEXYANDBOX (DESTINATION SHADE) |\\PFTransferPage| ( -|buffer| |label| |absoluteDiskAddress| |mode|) GETBOXREGION (WIDTH HEIGHT ORGX ORGY WINDOW PROMPTMSG) -FLONUM-TO-STRING (X ROUND POINTPLACE) GETFILEDEF (FILENAME) |\\VAMGetVAMPageFor| (|vol| |VAMPage#| -|volumePage|) FINDCALLERS (ATOMS FILES X) \\TEDIT.OBJECT.SHOWSEL (SEL SELWINDOW WWIDTH WHEIGHT X OBJ -XOFFSET YOFFSET WIDTH TEXTOBJ) FREEATTACHEDWINDOW (WINDOW MAINWINDOW REGION EDGE ATWINS BOTTOM HEIGHT) - FONTCLASS (FONTLIST NAME FSPEC CREATEFORDEVICES) MAKE-COMPILED-CLOSURE (CODEBASE ENVIRONMENT) -SUPERPRINT/COMMENT (FILE L DSLMARG INDENT HERE) GETCHATWINDOW (DPYTYPE HOST TITLE SIZE) -\\NOIMAGE.DSPFONT (OLDFONT FONT) SEDIT::DELETE-COMMENT (SEDIT::NODE SEDIT::START SEDIT::END) -EXTENDREGIONTOP (OLDTOP NEWTOP) PFI.ESTIMATE.SIZE1 (EXPR) COMPILER::GENCODE-VAR-REF (COMPILER::NODE) -TEDIT.FORMAT.HARDCOPY (STREAM FIRSTPG# STARTPG ENDPG TEXTOBJ PRINTOPTIONS TEXTSTREAM SERVER DONTSEND) -SUPERPRINT/SPACE (FILE) TOPPATHS (FIELD DECS LST TL) MBUTTON.NEXT.FIELD.AS.ATOM (TEXTOBJ CH# STR) -ROUND (CL:NUMBER CL::DIVISOR) PRODUCE (VAL) \\LEAF.SETFILEINFO (ATTRIBUTE DEV) RECORDACCESSFORM (FIELD - DATUM NEWVALUE) CL::ASSIGN-SLOT-OFFSET (CL::PS) TEDIT.PARALOOKS (SEL LEN SPEC) COMP.DELFIX (TYPE) -XCL::ADD-WHERE-IS-DATABASES (XCL::PATHNAMES) \\STREAM.FROM.PACKET (EPKT) WHO-LINE-TIME (NOW) VOLUMES ( -|vol|) \\POSSIBLECOLOR (COLOR?) \\DEFINEDP (A) \\DRAWCIRCLE.PSC (STREAM BRUSH IMAGEDATA DASHING D -CENTERX CENTERY RADIUS) COMPILE-FILE? (FILE TYPE) CHAT.INIT (STREAMS DISPLAYTYPE OUTSTREAM WINDOW -DPYNAME) COMP.FIX (A) SUBPRINT/WRAPPERTAIL (TAIL BODY DOT MACRO BRFLG) HLSP (X) RGBP (X) -SI::PRINT-TRACED-CL-ARGLIST (SI::SMALL-INDENT) \\DRAWELLIPSE.PSC (STREAM BRUSH IMAGEDATA DASHING D -CENTERX CENTERY MAJORRADIUS MINORRADIUS ORIENTATION) \\SETUFNENTRY (FN NEXTRA NARGS) \\GETUFNENTRY ( -BASE N OP INDEX) NEGSHADE (SHADE) ENCAPSULATEDOBJ.DISPLAYFN (STREAM FONT OBJ OBJBOX CURX CURY GETFN -XSIZE YSIZE OLDFONT) \\CCLOSURE.DEFPRINT (CLOSURE STREAM TYPE) POSTSCRIPT.TEDIT (PFILE) COMP.EXPR ( -COMPILE.CONTEXT) MBUTTON.NEXT.FIELD.AS.TEXT (TEXTOBJ CH#) DASHINGP (DASHING) GETCFILE (FILES) SKOR (X -Y) COMPILER::GENCODE-THROW (COMPILER::NODE) SEDIT::MAP-FONT (SEDIT::FONT SEDIT::ENV) OP# (X) -GETEXPRESSIONFROMEVENTSPEC (LINE) RECORDCHAIN (LST) AU-REVOIR (VAL##) \\LEAF.GETFILENAME (DEV DEVINFO -NAME RECOG) CL::PS-NUMBER-OF-SLOTS (CL::PS) DISPLAYBEFOREEXIT (EXITFN) \\MEDW.BLTCHAR (CHARCODE -DISPLAYSTREAM) XCL::GET-WHERE-IS-ENTRIES (XCL::TAIL) COMPILER::COMPILE-SCAN-DEFINE-FILE-INFO (COMPILER::FORM -) \\DSPMOVELR (CHAR TTBL DD FONT YPRIME HEIGHT) \\SUBFNDEF (X) \\PROMPTFORWORDRETYPE (CHAR) -\\NSFILING.GETFILE (DEVICE FILENAME PARAMETERS RECOG LOCK) RECORDWORD (WORDTYPE) \\PROMPTFORWORDBS (CH -) CLISPNOTVARP (X) MODERNWINDOW.BUTTONEVENTFN (WINDOW MAINREGION ATTACHEDREGION STARTINGREGION) -\\PROMPTFORWORDBIN (KEYSTREAM) SEDIT::CREATE-NEW-COMMENT (SEDIT::CONTEXT SEDIT::WIDTH) -\\PROMPTFORWORDERASE (0X 0Y Y) RECOMPILE (PFILE CFILE FNS) UNIQLIST (LIST PT) GETREGION (MINWIDTH -MINHEIGHT INITREGION NEWREGIONFN NEWREGIONFNARG INITCORNERS) \\PROMPTWINDOW.OPENFN (WINDOW) -TEDIT.FLASHCARET (CARETS) CALLSCCODE (DEF OPTION CODEBASE X OFFSET FNAPPLY) MAKESYS (NAME FILE NEWFILE -) MBUTTON.NEXT.FIELD.AS.PIECES (TEXTOBJ CH#) DOMAINWINDOWCOMFN (ATTACHEDW) TEDIT.INSERT (TEXTOBJ -STRING) MODERNWINDOW (WINDOW) \\CODEBLOCKP (PTR BASE N) |\\PFGetPhysicalVolumePage| (|buffer|) SYSOUT -(FILE TOTALTIMESAVE) COMPILER::GENCODE-TAGBODY (COMPILER::NODE COMPILER:CONTEXT) MKACCESSFN (TYPE -FIELD ARGS) POSSIBILITIES (FORM##) \\LEAF.GENERATEFILES (DEVICE PATTERN DESIREDPROPS OPTIONS) -LISPDIRECTORYP (|volumeName|) CL::DEFSTRUCT-PARSE-OPTIONS (CL::NAME&OPTIONS CL::NAME CL::PS) -CHARWIDTHY (CHARCODE FONT) PRINTATBOX (OLDBOX WINDOW EXP) USEDFREE (A) CREATE-PROCESS-STREAM ( -SHELL-DEV COMM STR) |\\DisplayEventFn| (EVENT) DINFO.CREATE.GRAPH.WINDOW (GRAPH DINFOW DINFOREGION -REGION LEFT BOTTOM) \\TFBRAVO.WRITE.RUN (RUN TEXTOBJ PARALOOKS IN LOOKS) CHAT.OPTIONMENU (INSTREAM FN) - \\CREATECHARSET (CHARSET CREATEFN NOSLUG? N WIDTH) DETACHALLWINDOWS (MAINWINDOW W) COMP.STCONST (X) -\\FILLCIRCLE.PSC (STREAM CENTERX CENTERY RADIUS) BRECOMPILE (STREAM DESCR DEFQ FORM NLAMA NLAML LAMS) -\\BLTSHADE.PSC (DESTINATIONLEFT DESTINATIONBOTTOM STREAM IMAGEDATA) COMP.NUMBERCALL (COERSIONS) -DEFAULTFONT (DEVICE) SEDIT::COPY-STRUCTURE-COMMENT-WORD (SEDIT::NEW-STRING) SCALE-EXPONENT (X) -TEDIT.CURSORMOVEDFN (W X Y) DSPCLEOL (DD YPOS HEIGHT) COMPILE.FILECHECK (FILE) -MBUTTON.NEXT.FIELD.AS.NUMBER (TEXTOBJ CH#) ENTEREVALQT (X) \\DISPLAYINIT (DIMENSION STREAM BITMAP X Y -NAME) \\FTP.CLEANUP (INTERVAL TIMER PROC) COMPILER::TEST-META-EVAL (COMPILER::FN COMPILER::TREE) -DINFO.GET.GRAPH.WINDOW (REGION) COMP.NUMERIC (FN COERSIONS ZERO) SUPERPRINT/COMMENT2 (CMT -COMMENT-MIDPOINT COMMENT-RMARGIN COMMENT-LMARGIN) XCL::SAVE-CURRENT-EXEC-PROFILE (XCL::PROFILE) -LAYOUTSEXPR (RESULT FORMAT FONT MOTHERD PERSONALD FAMILYD) PFI.ADD.TO.INDEX (TYPE/ENTRY TYPE NAME) -COMPILER::GENCODE-TAGBODY-INLINE (COMPILER::NODE COMPILER::STK-NUM) MSNEEDUNSAVE (MSG) LOGOUT (FAST) -READVARS-FROM-STREAM (SYMBOL VALUE SYMBOLS STREAM) RECFIELDLOOK (RECLST Y X FIELD) TRYNEXT (PLST## -VAL## ENDFORM##) SEDIT::START-COMMENT (SEDIT::CONTEXT SEDIT::CARET-POINT SEDIT::POINT-TYPE) -\\LEAF.REOPENFILE (ACCESS FDEV NAME RECOG) SHOULD-BE-DWIMIFIED? (LAMBDA-FORM) SHOWGRAPH (TOPJUSTIFYFLG - CENTERFLG COPYBUTTONEVENTFN LEFTBUTTONFN MIDDLEBUTTONFN) PFI.DEFAULT.HANDLER (EXPR CAR-OF-FORM PAIR -NAME) CHANGERECORD (RNAME RFIELDS F) MAKEACCESS (TYPE BODY NEWVAL) %COPY-ONED-ARRAY (LOCAL-ARRAY -OFFSET SIZE TYPENUMBER BASE) \\LEAF.DIRECTORYNAMEP (HOST/DIR DEV) RECREDECLARE1 (ORIG) -CL::ENSURE-VALID-TYPE (CL::TYPE-FORM) COMP.ST (DL X) \\DSPPRINTCHAR (CHARCODE DD SPACEWIDTH) -CHANGECCODE (FN SEAL NEWREF MAP LC) \\CREATECHARSET.PSC (WIDTHS) PTPLUS (PT1 PT2) -\\PROMPTWINDOW.SET.HEIGHT (PWINDOW OBSCUREDHEIGHT HEIGHT) AS.CHANGE.OWN.PASSWORDS (USERINFO) -\\NSFILING.GENERATEFILES (PATTERN DEVICE DESIREDPROPS SCOPE INFINITE.DEPTH OPTIONS) COMPILER::COMPILER-ERROR - (COMPILER::COMPILER-CONTEXT COMPILER::ARGS) \\DRAWPOINT.DISPLAY (BRUSH BRUSHBM DISPLAYSTREAM X Y -OPERATION) CL::ENSURE-CONSISTENT-PS (CL::PS) TEDIT.UNDO (TEXTOBJ SEL) \\STRINGWIDTH.GENERIC (STR FONT -SPACEWIDTH FONTDESC CHARCODE STRING CC) \\BITBLT.PSC (SOURCEBITMAP SOURCELEFT SOURCEBOTTOM STREAM -DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT SOURCETYPE OPERATION TEXTURE CLIPPINGREGION -CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM) FB.ALLOW.ABORT (BROWSER W) COMPILER::TRANSFORM-GET/PUT-BASE ( -COMPILER::NODE COMPILER::ARGS COMPILER::OFFSET COMPILER::USE COMPILER:CONTEXT) TEDIT.SUBSTITUTE ( -TEXTSTREAM REPLACEMENT CONFIRM? YESLIST STRING) SEDIT::COMPUTE-SELECTION-POSITION-COMMENT (SEDIT::CONTEXT - SEDIT::NODE SEDIT::START SEDIT::START-SUBNODE SEDIT::END-SUBNODE) \\DRAWARC.DISPLAY (STREAM CENTERX -CENTERY RADIUS STARTANGLE NDEGREES BRUSH DASHING) EXTENDREGIONLEFT (OLDLEFT NEWLEFT) PURGEDSKDIRECTORY - (|volName| |vol| |diskDevice| F) \\ITEMW.FLIPITEM (ITEM DS REG) FONTCLASSUNPARSE (FONTCLASS X) -SEDIT::TRY-REUSING-BITS (CL:BLOCK SEDIT::CONTEXT SEDIT::WIDTH SEDIT::END SEDIT::ASCENT SEDIT::DESCENT -SEDIT::NEW-X) ITEMW.REPAINTFN (WINDOW REGION) \\DRAWPOLYGON.DISPLAY (BRUSH PTBRUSH POINTS STREAM -DASHING) COMPILER::META-SUBST-ANY-CALL (COMPILER::NODE) OPT.CALLP (OP) \\DSPCLIPPINGREGION.DISPLAY ( -DISPLAYSTREAM) FONTUNPARSE (FONT) SETUPHASHARRAY (ARRAYNAME SIZE) |\\VFMContextSet| (|vol|) -COMPILER::GENCODE-SETQ (COMPILER::NODE) CHANGEI.S. (REASON NAME) EDITDEF.FILES (NAME SOURCE EDITCOMS -OPTIONS) WINDOWDELPROP (WINDOW PROP CURRENT ITEMTODELETE) HPRINT0 (VARS X) |\\VAMCheckEndOfVol| ( -|volPage#| |vol|) \\STRINGWIDTH.DISPLAY (STREAM STR DD RDTBL) %COPY-STRING-TO-ARRAY (LOCAL-STRING SIZE -) FIX-FORM (INPUT) HASHRECORD (NAME&FIELDS) \\LEAF.EVENTFN (FDEV EVENT-TYPE) UNMAKEMAINWINDOW ( -MAINWINDOW) EDITDATE? (COMMENT INITIALS?) \\DSPOPERATION.DISPLAY (DISPLAYSTREAM |SourceTypeA1718|) -\\NSPRINT.WATCH.JOB (PRINTRESULTS PRINTER JOBNAME) \\SCALEDBITBLT.PSC (STREAM IMAGEDATA SCALE1 -SOURCEBITMAP BITMAPWIDTH BITMAPHEIGHT SOURCELEFT SOURCEBOTTOM SOURCETYPE SCALE2 OPERATION) -PROG1.PRETTYPRINT (LEFT) \\BACKCOLOR.DISPLAY (DISPLAYSTREAM) DWIMIFY1? (FORM) SEDIT::COPY-SELECTION-COMMENT - (SEDIT::SELECTION SEDIT::CONTEXT SEDIT::NODE SEDIT::POINT STREAM SEDIT::PROMPTWINDOW) TCOMPL (FILES) -FB.YES-OR-NO-P (PROMPT DEFAULT FBROWSER) XYSECTLSEG (X0 DX Y0 DY U0 DU V0 DV) SUPERPRINT/COMMENT1 (CF -RMARGIN FILE FONT) EDITDATE (INITLS NEWDATE) \\PROMPTWINDOW.PAGEFULLFN (WINDOW PWINDOWPROP) TEDIT.NEXT - (STREAM) POSTSCRIPT.HARDCOPYW (FILE TITLE |Landscape?| SCALEFACTOR STREAM IMAGEDATA BITMAP SCLIP) -GETDEFCOM (X Y) MAKEACCESS1 (TYPE RECTYPE NEWVAL BODY) GETPOSITION (WINDOW CURSOR) ASKUSERLOOKUP ( -FIELD) \\BLTSHADE.DISPLAY (STREAM OPERATION) SETFONTDESCRIPTOR (SIZE) ENCAPSULATEDOBJ.PUTFN (IMAGEOBJ -DATANBYTES) ENTRY# (HIST) FORMAT-ERROR (COMPLAINT FORMAT-ARGS) BCOMPL (CFILE NOBLOCKSFLG OPTIONSSET) -\\NEWPAGE.DISPLAY (STREAM) XCL::EXEC-TITLE-FUNCTION (XCL::WINDOW EXEC-ID) DO.PRETTYPRINT (EXPR HEAD -LEFT START) PROVIDE.PROMPTING.WINDOW (TITLE W WINDOW) COMPILER::ENSURE-EFFECT-CONTEXT (COMPILER::CTXT -COMPILER::FORM COMPILER::SUBST-INDICES COMPILER::NAME) SEDIT::COMPUTE-POINT-POSITION-COMMENT ( -SEDIT::CONTEXT SEDIT::NODE) \\AVGCHARWIDTH (FONT) SEQUENTIAL.PRETTYPRINT (LEFT) POLYSHADE.DISPLAY ( -POINTS STREAM TEXTURE OPERATION) REATTACHPROMPTWINDOW (PWINDOW MAINWINDOW OLDPASSTOMAINCOMS) DWIMIFY0 -(X SIDES) \\DRAWCIRCLE.DISPLAY (CENTERX CENTERY BRUSH DISPLAYSTREAM \\BRUSHBBT XA1697 XA1698) -\\NSFILING.PARSE.FILENAME (FILENAME NC) PROGV.PRETTYPRINT (HERE) SEDIT::SHIFT-BLOCK (SEDIT::CURRENT-LINE - SEDIT::Y SEDIT::DESCENT SEDIT::CURRENT-LINE-BOTTOM SEDIT::REPAINT-START SEDIT::START SEDIT::NEW-X SEDIT::X - SEDIT::END SEDIT::WIDTH) CL::RECORD-DOCUMENTATION (CL::PS) \\DRAWELLIPSE.DISPLAY (CENTERX CENTERY -SEMIMINORRADIUS SEMIMAJORRADIUS DISPLAYSTREAM BRUSH \\BRUSHBBT DISPLAYDATA SEMIMAJORRADIUSSQUARED -|cosOrientation| SEMIMINORRADIUSSQUARED |sinOrientation| X Y) \\CHARWIDTH.DISPLAY (FONTDESCA1721 -CHARCODE STREAM) \\IFSERRORSTRING (ERR-FILE-NAME EOL CODE) TYPEP (TYPE CL::SYMBOL-TYPE CL::OBJECT) -FONTCLASSCOMPONENT (FONTCLASS DEVICE NOERRORFLG) COMPILER::ESTABLISH-MACRO-IN-COMPILER (COMPILER::NAME - COMPILER::EXPN-FN) PRINTPROG (FILE FORMLEFT BRFLG LABELL) PRINTCODENT (START1 STR CODEBASE OFFSET X) -PFI.MAYBE.NEW.PAGE (MINLINES EXPR) COMPILER::GENCODE-RETURN (COMPILER::NODE CL:BLOCK) -\\DSPRESET.DISPLAY (WINDOW DD) HISTORYMATCH (INPUT PAT) ACCESSDEF4 (LST TRAN SUBDEC) -CODEWRAPPER.PRETTYPRINT (HERE) XCL::SETF-GET-PROCESS-PROFILE (XCL::PROCESS) \\DRAWCURVE.DISPLAY ( -\\BRUSHBBT DASHING BRUSH KNOTS DISPLAYSTREAM DASHLST BBT CLOSED) \\DRAWLINE.DISPLAY (\\BRUSHBBT -DISPLAYSTREAM X1 Y1 X2 Y2 BBT OPERATION YY1 YY2) XCL::GET-PROCESS-PROFILE (XCL::PROCESS) -\\FONT.COMPARESYMBOL (USERINPUT KEY INPUTNC A0417) \\LEAF.RENAMEFILE (OLD-DEVICE OLDFILE NEW-DEVICE -NEWFILE) SETFONTCLASSCOMPONENT (FONT NEWFONT) PRINTCODE (FN SI::$PROG1-FIRST-EXPRESSION$ I4 OUTF I6 -CODEBASE OFFSET IVARS PVARS FVARS NNILS NVALS) \\DSPYPOSITION.DISPLAY (DISPLAYSTREAM) SUBPRINT (FILE -TAIL0 BRFLG CLW0) \\TEDIT.ABBREV.EXPAND (STREAM) BACKARROWP (X) ASKUSEREXPLAIN (KEYLST ENTRY OPTIONS -PREV KEY OPTIONSLST DELIMITER X) \\FILLCIRCLE.DISPLAY (DISPLAYSTREAM \\BRUSHBBT CENTERX CENTERY) RPARS - (NP E) SUPERPRINT0 (FN FILE TAIL LEFT) \\DSPLINEFEED.DISPLAY (DISPLAYSTREAM) \\FONT.SYMBOLMEMB (LIST -USERINPUT) \\NEWPAGE.PSC (STREAM) PRINTPROGVARS (TAIL BRFLG FILE) EXTENDREGIONRIGHT (OLDRIGHT NEWRIGHT -) \\DSPRIGHTMARGIN.DISPLAY (DISPLAYSTREAM) \\FONTFACE (DEV OLDFACE) PRINTSQ (FILE KEYL HERE BRFLG) -|\\VFMGet| (|getLevel| |getKey|) SUBPRINT1 (LST END) \\DSPLEFTMARGIN.DISPLAY (DISPLAYSTREAM) CHANGEVAR - (NAME) PTDIFFERENCE (PT1 PT2) READVARS (VARS) \\FONT.SYMBOLASSOC (LIST USERINPUT NC) -\\DSPFONT.DISPLAY (DISPLAYSTREAM FONTDESC CHARCODE) \\BITBLT.DISPLAY (DESTINATION DS SOURCETYPE) -FONTPROP (PROP) |\\PFGetVol| (|volNum|) CL::PARSE-SLOT (CL::DESCRIPTION CL::SLOT) -\\SCALEDBITBLT.DISPLAY (SOURCEBITMAP DESTINATION SOURCELEFT SOURCEBOTTOM SOURCETYPE OPERATION TEXTURE -CLIPPINGREGION) COMPILER::META-SUBST-VAR-REF (COMPILER::NODE COMPILER::NEW-CODE) FONTASCENT (FONTSPEC) - FIELDLOOK (FIELDNAME) DSFIT2 (X FILE) CL::ASSIGN-SLOT-ACCESSOR (CL::SLOT CL::CONC-NAME) -SEDIT::REUSE-LINEAR-FORM (SEDIT::DELTA-X SEDIT::DELTA-Y) MAKE-INSPECTOR-PROFILE (NAME P-NAME) -\\DSPSCALE.PSC (STREAM SCALE OSCALE) \\UNCOPY (X STRING LENGTH PTR SIZE OFFSET TYPENUMBER BASE) -FONTDESCENT (FONTSPEC) COMPILER::COMPILE-FILE-LOOSE-FORM (COMPILER::FORM) FB.PROMPTFORINPUT (BROWSER -PWINDOW PROMPTWIDTH DEFAULT WINDOWWIDTH EXCESSWIDTH) DSFIT1 (LST N FILE N1) COMPILER::GENCODE-PROGN ( -COMPILER:CONTEXT COMPILER::NODE COMPILER::TAIL) FONTHEIGHT (FONTSPEC) POSTSCRIPT.ENDPAGE (STREAM) -XCL::PUT-IMPLICIT-KEY-HASH (XCL::IK-HASH-TABLE XCL::ITEM XCL::BITS XCL::LIMIT XCL::DELETED-INDICATOR) -ACCESSDEF (DEC) MB.THREESTATE.DISPLAY (OBJ STREAM FONT CURX CURY) \\FONTSYMBOL (X) \\LEAF.FORCEOUTPUT -(STREAM) \\MAP-CODE-LITERALS (CODEBLOCK TYPENO MAPFN X CODEBASE OFFSET DEF LC) \\FTP.ADD.USERINFO ( -HOST INFO) XCL::EXEC-SHRINKFN (XCL::WINDOW XCL::PROCESS) COMPILER::META-SUBST-UNWIND-PROTECT (COMPILER::NODE - A1692 A1691) CLISPELL (X FORM) \\MAP-CODE-POINTERS (CODEBLOCK TYPENO MAPFN CODEBASE OFFSET) -CHAT.SENDSCREENPARAMS (INSTREAM HEIGHT WIDTH) SEDIT::CLOSE-NODE-COMMENT (SEDIT::NODE) \\LOOKUPFONT ( -ROTATION FACE SIZE FAMILY DEVICE X) EXTENDREGIONBOTTOM (OLDBOTTOM NEWBOTTOM) \\TEDIT.SUBST.FN2 ( -TRIALSTART# END# TEXTOBJ) CHANGEMACRO (REASON NAME TYPE) MAKEHVPRETTYCOMS (VARS X) PUPNET.DISTANCE ( -NET#) \\NSFILING.OPEN.HANDLE (SESSION PNAME.OR.PROPS NOERRORFLG RESULT) BROKENDEF (DEF CA WHEN -CODEBASE OFFSET NEWVALUE) SHOW.CLEARINGHOUSE (ORG DOM) COMP.LABELS (DEF FUNCTIONS Z) MSMARKCHANGED ( -REASON NAME) /PUTPROP (PROP VAL) SEDIT::UNDO-EXTRACT (SEDIT::NODE SEDIT::SUBNODES SEDIT::CONTEXT) -\\NSFILING.COMPOSE.PATHNAME (DIRPATH DIR) |\\LFCloseDevice| (VOL) /PUTD (FN DEF FLG TEM) -|\\LFFindDirectoryVol| (|volumes| |currentVol|) COMPILER::META-SUBST-THROW (COMPILER::NODE A1690 A1689 -) COMP.STFN (N FN) MAKEALISTCOMS (X PR) DINFO.INVERT.NODE (WINDOW DINFO.NODE) COMPILER::IS-CALL-TO ( -COMPILER::NODE COMPILER::FN COMPILER::VAR COMPILER::NAME) ADD.CHAT.MESSAGE (STREAM MSG) -SEDIT::COMMENT-LENGTH (SEDIT::NODE SEDIT::NUMBER-OF-SUBNODES) MAKEKEYLST (LST KEY AUTOCOMPLETEFLG) -PFI.PRETTYPRINT (NAME EXPR FORMFLG) \\DSPBACKCOLOR.DISPLAY (STREAM) AS.MAKE.CONVERSATION (RECIPIENT -NONCE) POSTSCRIPT.PUTCOMMAND (S.STRS STREAM) FIELDNAMESIN (DECS X) XCL::GET-IMPLICIT-KEY-HASH ( -XCL::IK-HASH-TABLE) \\TEXTMENU.TOGGLE.DISPLAY (OBJ STREAM FONT CURX CURY) \\DSPCOLOR.DISPLAY (STREAM) -LLBREAK (FN WHEN) CL::REMOVE-DOCUMENTATION (CL::SLOT-DESCRIPTIONS CL::DOC? CL::PS) \\DSPSCALE2.PSC ( -STREAM IMAGEDATA Y-SCALE) GETCHARBITMAP (FONT FONTDESC) COMPILER::COMPILE-FILE-PROCESS-FUNCTION ( -COMPILER::NAME COMPILER::DEFINITION) WHO-LINE-VMEM (ONE-PERCENT-VMEM VMEM-PERCENT) -SEDIT::RECOMPUTE-FORMAT-VALUES (SEDIT::NODE SEDIT::SUBNODE SEDIT::CONTEXT) SEDIT::PAINT-TO-END-OF-LINE - (SEDIT::CONTEXT SEDIT::THIS-LINE SEDIT::BLANK-FROM SEDIT::LINEAR-END) SEDIT::SKIP-TO-GAP (SEDIT::CONTEXT - SEDIT::SELECTION SEDIT::POINT SEDIT::PROMPTWINDOW) WINDOWTITLEFONT (FONT) COMP.STPOP (N) -DINFO.LAYOUTGRAPH (NODE ID NODELST CHILDREN CHILD GRAPHER.NODE PARENT SIBLINGS SIBLING -PARENT.GRAPHER.NODE SIBLING.GRAPHER.NODES CHILD.GRAPHER.NODES FONT) CHAT.LOGINFO (INSTREAM HOST NAME) -PRINTOPCODES (X OP) \\DEVICESYMBOL (|ElseReturnXFlg|) SEDIT::SELECTED-FN-NAME (SEDIT::CONTEXT SEDIT::POINT -) OPENDISPLAYSTREAM (OPTIONS FILE) \\DSPCOLOR.PSC (STREAM) SHAPEW (OLDSIZE MAINONLYFLG) COMP.TAGBODY ( -A) FB.PROMPTW.FORMAT (BROWSER) XCL::SETUP-EXEC-WINDOW (XCL::WINDOW) XCL:UNBREAK-FUNCTION (XCL::BROKEN-FN - XCL::FN XCL::MIDDLE-MAN) \\IRM.GET.KEYWORDS ($$OUTPUT WINDOW) MOVECHARBITMAP (SRCEFONT DESTFONT -SRCECODE SRCEDESC DESTDESC DESTCODE) \\4DISPLAYINIT (DIMENSION STREAM BITMAP X Y NAME) -MB.MARGINBAR.DISPLAYFN (OBJ STREAM MODE IMAGEBOX OBJDATUM) COMP.RETURN-FROM (A) REDISPLAYW (WINDOW -REGION ALWAYSFLG) \\INSPECT.STORE.FATCHAR (INSTANCE FIELD NEWVALUE) SEDIT::OUTPUT-STRING (SEDIT::NEW-LPTR -) FONTCOPY (FONTSPECS J) \\CORE.DELETEFILE (FILENAME DEV) SUBDECLARATIONS (TRAN TEM) \\8DISPLAYINIT ( -DIMENSION STREAM BITMAP X Y NAME) \\LEAF.BREAKCONNECTION (DEVICE S) FONTSAVAILABLE (DEVICE SIZE FACE -EXTANTDEV) WINDOWREGION (WINDOW COM) \\COPY (X VAL) \\CORE.RELEASEPAGES (STREAM) \\TEDIT.PROCIDLEFN ( -WINDOW) SI::ARGUMENT-ERROR (SI::FRAME SI::NUM-ARGS SI::MIN-ARGS SI::FRAME-NAME) \\CORE.GENERATEFILES ( -PATTERN FDEV NAME FILTER VERS) \\PUPNET.CLOSERP (X Y) TEDIT.PUT (STREAM) DIRECTORY.MATCH (TESTNAME -PATTERN) \\CHTOPC (PCTB CH#) XCL::EXEC-CLOSEFN (XCL::WINDOW XCL::PROCESS) DIRECTORY.MATCH.SETUP (BASE) - FONTFILEFORMAT (LEAVEOPEN) SEDIT::CFV-COMMENT (SEDIT::CONTEXT SEDIT::WIDTH) \\NSFILING.CONFLICTP ( -DEVICE SESSION HANDLE NAME ACCESS) \\CORE.FILEINFOFN (GENFILESTATE ATTRIBUTE) TEDIT.GET.OBJECT0 ( -STREAM FILE CURCH# TEXTOBJ) \\IRM.WILDCARD (WILDATOM LIST WILDLIST SCRATCH) FONTP (X) CHOOZ (X -NCXWORD0 FROMDWIM) MB.NB.DISPLAYFN (OBJ STREAM OBJBOX BUTTONIMAGES BUTTONY BUTTONX BUTTONLIST) -\\LOCATE.PUPNET (NET BUCKET) TEDIT.PUT.PCTB2 (BASEA1551 NO ARR STRING TEDIT.PUT.FINISHEDFORMS FORM) -NAMEFIELD (FILE STR) \\TEDIT.UNIQUIFY.PARALOOKS (TEXTOBJ NEWLOOKS) \\TERPRI.PSC (IMAGEDATA NEWY) -\\CURVE (N X0 Y0 DISPLAYDATA A NEWXA1700 NEWYA1699 X1 Y1 NEWXA1702 NEWYA1701 NEWXA1704 NEWYA1703 -NEWXA1706 NEWYA1705) CLISPFOR (FORM) \\LOOKUPFONTSINCORE (FAMILY SIZE FACE ROTATION DEVICE) -*WHO-LINE-LAST-DIRECTORY* (NAMESTRING) \\INSPECT.STORE.32 (INSTANCE FIELD NEWVALUE) \\TEDIT.FIND.WC1 ( -TRIALEND# TEXTOBJ END#) COMPILER::GENCODE-MV-CALL (COMPILER::NODE COMPILER::FN) \\CORE.FINDPAGE (PN) -SEDIT::REDISPLAY (SEDIT::CONTEXT) EDITCHAR (FONT CHARCODE FONTDESC) FONTPROFILE.ADDDEVICE (FD) -COMPILER::META-SUBST-SETQ (COMPILER::NODE A1688 A1687) COMPILER::META-SUBST-TAGBODY (COMPILER::NODE) -DINFO.SHOWGRAPH (GRAPHER.GRAPH DINFO.GRAPH GRAPH.REGION GRAPH.WINDOW WINDOW.REGION LEFT BOTTOM HEIGHT -WIDTH) FONTSET (TEM) CHAT.FLUSH&WAIT (INSTREAM) SPP.READP (STREAM) COMP.RETURN (A) \\COERCETODS (X) -\\TEDIT.UNIQUIFY.CHARLOOKS (TEXTOBJ NEWLOOKS) SEDIT::OUTPUT-SPACE (SEDIT::X SEDIT::NEW-LPTR) BITMAPP ( -X) \\DSPTOPMARGIN.PSC (STREAM) \\COURIER.OUTPUT.ABORTED (STREAM) SEDIT::BACKSPACE-COMMENT (SEDIT::CONTEXT - SEDIT::NODE) EXTENDREGION (INCLUDEREGION) \\IRM.WILD.REF (WINDOW KEYWORD $$OUTPUT MATCH) -FILES.WHENCHANGED (NAME REASON) \\CORE.GETFILEINFO (STREAM ATTRIBUTE DEV) MBUTTON.FIND.NEXT.BUTTON ( -TEXTOBJ CH# PCTB) \\CREATEDISPLAYFONT (DEVICE FAMILY SIZE FACE ROTATION FONTDESC CHARSET) -\\TEDIT.PUTRESET (PROC&VALUE) CREATEDSKDIRECTORY (|volName| |vol|) \\CORE.GETFILEHANDLE (NAME RECOG FD - ACCESS) \\GETLEAFSTRING (ADDR LEN) CHAT.STARTUP (LOGOPTION TAIL PROC KEY OSINFO HOSTINFO INTERRUPTS -KEYACTIONS INITSTREAM $$OUTPUT) SPP.EOFP (STREAM CONDITION) \\CORE.GETFILEINFO.FROM.INFOBLOCK ( -ATTRIBUTE) \\NSFILING.CHECK.ACCESS (SESSION HANDLE RESULT TYPE) SCAVENGEVOLUME (|volName|) -PFI.HANDLE.EXPR (EXPR) ALLFIELDS (TRAN) \\CREATECHARSET.DISPLAY (FAMILY SIZE CHARSET FACE ROTATION -DEVICE FONTDESC NOSLUG?) SEDIT::QUOTE-CURRENT-SELECTION (SEDIT::CONTEXT SEDIT::SELECTION) -\\NSRANDOM.CREATE.STREAM (OLDACCESS ACCESS SESSION ATTRS LEN OLDATTRS) \\PROMPTWINDOW.EXPAND (\#LINES -PWINDOW HEIGHT) \\SETPOS.PSC (STREAM) SEDIT::OUTPUT-BITMAP (SEDIT::BITMAP) PFI.PRINT.TO.TAB (TABSTOP -WIDTH STR) COMPILER::GENCODE-LET (COMPILER::FN COMPILER::ARGS) EDITGETDEF (TYPE) \\CORE.GETFILENAME ( -NAME FD CREATEFLG RECOG) COPY.TEXT.TO.IMAGE (IMAGESTREAM FONTS FONTARRAY INFILE MAXFONT LEFTMARGIN -CURRENT.X TAB.WIDTH CURRENT.STOP) \\INSPECT.STORE.CHAR (INSTANCE FIELD NEWVALUE) NLISTP (X) -PURGEHISTORY1 (ENTRY) SEDIT::MUTATE (SEDIT::CONTEXT SEDIT::SELECTION SEDIT::PROMPTWINDOW) COMP.GO (A) -\\FTP.OPEN.CONNECTION (HOST FAILURESTRING ECHOSTREAM) \\CREATE-REAL-CHARSET.DISPLAY (ROTATION FAMILY -SIZE FACE DEVICE FONTDESC) \\BUILDSLUGCSINFO (ASCENT DESCENT WIDTH) \\ITEM.WINDOW.COPY.HANDLER (WINDOW -) READIMAGEOBJ (OBJ STREAM) \\LEAF.MAYBE.FLUSH.CACHE (SEQUIN) DINFO.HISTORIC.UPDATE (ITEM MENU WINDOW -ID GRAPH $$OUTPUT SEL) SPP.FORCEOUTPUT (NBYTES) COMPILER::META-SUBST-RETURN (COMPILER::NODE A1686 -A1685) \\CORE.NAMESCAN (NAME) DV (VAR ARGS) TEDIT.GET.CHARLOOKS0 (N WIDTH FILE) MOUSESTATE-NAME ( -KEYNAME) WRITEIMAGEOBJ (IMAGEOBJ STREAM) AS.NEXT.VERIFIER (ADDR BL CONVKEY E) \\CORE.UNPACKFILENAME ( -NAME START END) \\24DISPLAYINIT (DIMENSION STREAM BITMAP X Y NAME) \\HANDLE.PUP.ROUTING.INFO (PUP NDB -TABLE MASK RADIUS) \\NSFILING.FILLIN.ATTRIBUTES (SESSION ATTRS X) \\TEDIT.DIFFUSE.PARALOOKS (PPLOOKS) -CL:BLOCK (CL::TAIL) FB.DIRECTORYP (FILE) \\DSPBOTTOMMARGIN.PSC (STREAM) MAKEINITLAST (P AFL PTR -VERSIONS) COMP.PROG (VARS VALS PROGCONTEXT RETURNLABEL) PUTCHARBITMAP (NEWCHARBITMAP) SUBREGIONP ( -SMALLREGION LARGEREGION) |\\LFCloseFile| (STREAM) COMPILER::META-SUBST-PROGV (COMPILER::NODE A1684 -A1683) GETTOPVAL (X) \\ITEM.WINDOW.BUTTON.HANDLER (WINDOW) COMPILER::META-SUBST-PROGN (COMPILER::NODE) - CHAT.RECONNECT (WINDOW MAINW) CHAT.CLOSE.CONNECTION (INSTREAM OUTSTREAM) \\CORE.SETACCESSTIME (ACCESS - DT) |\\VFMGenerateFileIDs| (|vol| |desiredType|) MBUTTON.FIND.NEXT.FIELD (TEXTOBJ CH# PCTB) MSEDITE ( -ARGCOUNT FPTYPE FNAME FEDITCOMS FNDEF) MOVETOP (X) \\COREFILE.SETPARAMETERS (PARAMETERS) -TEXTTOIMAGEFILE (FILE IMAGEFILE IMAGETYPE HEADING TABS FONTS OPTIONS) \\SFROTATECSINFO (CSINFO -ROTATION) BLTSHADE (DESTINATION TEXTURE DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT OPERATION -CLIPPINGREGION STREAM) PURGEHISTORY (COM) SEDIT::MENU-SUBSTITUTE-SELECTEDFN (SEDIT::ITEM SEDIT::WINDOW - SEDIT::FIND-ITEM SEDIT::SUBITEM SEDIT::BUTTONS) \\OPENLEAFCONNECTION (HOST SEQUIN TIMEOUT) -\\READDISPLAYFONTFILE (FAMILY SIZE FACE ROTATION DEVICE CHARSET) \\SEARCHFONTFILES (EXTLST DIRLST SIZE - FILEPATTERN) CH.LIST.OBJECTS (PROPERTY) \\DSPSPACEFACTOR.PSC (STREAM FACTOR OLDFACTOR) -WHO-LINE-COPY-INSERT (X TTY-WINDOW) \\CORE.NAMESEGMENT (NAME) WHO-LINE-CURRENT-DIRECTORY ( -CONNECTED-DIRECTORY DIR-NAME) OR (U) TEDIT.GET.PARALOOKS0 (N WIDTH FILE) GETFIELDFORCREATE (RNAME -DEFAULTS USEUNIVDEFAULT TOPDEFAULTS) HASH.PASSWORD (PASSWORD STRING) \\CORE.SETFILEPTR (INDX NEWPAGE -NEWOFF) SCAVENGEDSKDIRECTORY (|volName| |vol|) \\ROUTE.PUP (NET HOST) \\NSFILING.FULLNAME ( -HANDLE.OR.PARSE CONNECTION PAIR NC DIR) TEDIT.HARDCOPY (STREAM FILE DONTSEND BREAKPAGETITLE -PRINTOPTIONS) \\FONTINFOFROMFILENAME (FONTFILE FILENAMELIST) \\CORE.SETEOFPTR (NBYTES NEWBYTES NEWEP -NEWEO) GETTEMPLATE (FN) TEDIT.GET.PAGEFRAMES1 (FILE) XCL::ADJUST-IMPLICIT-KEY-HASH (XCL::OLD-IK-TABLE -XCL::NEW-IK-TABLE) \\SEARCHDISPLAYFONTFILES (FAMILY SIZE FACE ROTATION DEVICE) \\PUPGATELISTENER ( -SOCKET TIMER) SEDIT::NEW-BLOCK (SEDIT::CONTEXT) \\NSFILING.HANDLE.ERROR (SESSION LOCK FILENAME) -\\CORE.GETNEXTBUFFER (WHATFOR) NUMBERP (X) GETPROPLIST (ATM) SUBFIELDCREATE (X) \\FINDFONTFILE (EXTLST - FAMILY SIZE FACE CHARSET DIRLST) INSPECTW.REPAINTFN (WINDOW WREG) COURIERTRACE (REGION WINDOW) -\\CORE.PACKFILENAME (DEVICE FULLNAME) \\INSPECT.STORE.16 (INSTANCE FIELD NEWVALUE) \\SPP.BOUTS (STREAM - BASE OFF NBYTES) SPP.BACKFILEPTR (STREAM) COMPSETREAD (DEFAULT KEYLST) PFI.PRINT.ENVIRONMENT (SPEC -KEYWORD VALUE) \\CORE.GETINFOBLOCK (NAME FD RECOG) SPELLFILE1 (ARR FIELDS) MAKECREATELST1 (AU DU A D) -FINDFILE (FILE NSFLG) PURGEHISTORY2 (ENTRY) \\INSPECT.FETCH.FATCHAR (INSTANCE FIELD) -\\CREATECOREDEVICE (NAME OLDSTREAM) \\SFMAKEITALIC (CSINFO ASCENT DESCENT OLDBITMAP OFFSETS WIDTHS) -COMPILER::COMPILE-FILE-PROCLAMATION (COMPILER::FORM) MOUSESTATE-EXPR (EXPR MOUSEBUTTONMASK X OPT) -\\MKATOM (OFFST LEN BASE NEWATOM) SETPROPLIST (LST) MBUTTON.FIND.BUTTON (LABEL TEXTSTREAM CH# PCTB -LABELATOM) \\CREATE.SYMBOL (LEN BASE N PN OFFSET) COREDEVICE (NAME NODIRFLG) -\\GENERIC-UNREGISTER-STREAM (STREAM) POSTINITARRAYS (CODESTARTPAGE EXTRACELLS AFTERCODEPTR -CODENEXTPAGE) \\PARSE.NUMBER (BN LEN END BASE) GETNSPRINTER (HOST) SEDIT::LINE-FINISHED (SEDIT::THIS-LINE - SEDIT::X) SPELLFILEDIR (DIR) WINDOWPOSITION (WINDOW REG) FB.FETCHFILENAME (ITEM) CH.DOMAINS.SERVED ( -CHADDRESS) MSEDITF (ARGCOUNT FNAME FEDITCOMS) FIXSPELL1 (WORD DEFAULT) |\\VAMAdjustGroup| (|groupPtr|) - \\FONTFILENAME (SIZE FACESPEC CSETNAME FAMILY SIZEPATT EXTENSION) SEDIT::MENU-SELECTEDFN (SEDIT::WINDOW - SEDIT::CONTEXT SEDIT::COMMAND SEDIT::ITEM SEDIT::EXTRA-ARGS) SPELLFILE.MATCHINGDIRS (DIRS) -ALISTS.GETDEF (NAME) \\INITATOMPAGE (PN OFFSET) \\FTP.FIX.BROKEN.INPUT (INSTREAM FULLNAME POS PROPS) -SPELLFILE.SPELL (HOST DIRECTORY NAME ROOTNAME RELATIVEDIRECTORY SUBDIRECTORY) COMPILER::META-SUBST-OPCODES - (COMPILER::NODE) CHAT.PROMPT.FOR.INPUT (PROMPT FONT MINLENGTH) \\MAKEMDSENTRY (VP V) -CHAT.DEACTIVATE.WINDOW (WINDOW TITLE) COMP.SETN (A) \\NODIRCORE.OPENFILE (ACCESS FDEV INFOBLK RECOG -PARAMETERS) \\PAGEDGETFILEPTR (STREAM) \\ALLOCBLOCK (ARLEN BASE N SI::$PROG1-FIRST-EXPRESSION$) -\\INSPECTW.VALUE.MARGIN (PROPS FONT) \\DSPCLIPPINGREGION.PSC (STREAM OLDCLIP) \\LEAF.ABORT.FROMMENU ( -MENU) \\TFBRAVO.PARSE.PROFILE.VALUE (INCHES POINTSPERINCH) \\SPP.GETFILEPTR (STREAM) -COMPILER::COMPILE-FILE-DEFINE-FILE-INFO (COMPILER::FORM) CHANGE-TTY-PROCESS-INTERACTIVELY (PROC X Y) -COMP.LAMBDA (FN X) \\PS.SCALEHACK (STREAM SCALEFACTOR OLDSCALE) COMPILER::GENCODE-IF (COMPILER::NODE -COMPILER:CONTEXT) INSPECTW.CREATE (PROFILE DATUM IWFONT FETCHFN WHERE TITLE STOREFN PROPCOMMANDFN -VALUECOMMANDFN TITLECOMMANDFN SELECTIONFN) \\POSTSCRIPT.OUTCHARFN (STREAM XPOS OLDFONT) SMASHPATTERN ( -X PATTERN CARVAL EFF) MBUTTON.CHANGENAME (OBJ NEWNAME TEXTOBJ) \\PAGEDGETEOFPTR (STREAM) -\\LEAF.DEVICEP (HOST) |\\PFPilotVolumeP| (|vol|) \\TEDIT.EXPANDED.MENU (STREAM) MAPATOMS (FN DTD -FIRSTFREE SIZE LASTFREE LASTFREE2) BSPFRNADDRESS (STREAM) \\PAGEDEOFP (STREAM CURPAGE) -COMPILER::META-SUBST-MV-PROG1 (COMPILER::NODE) \\CORE.SETFILEINFO (STREAM DEV ATTRIBUTE) -\\ORIGREADTABLE (TBL) COMP.SETQ (A) \\ADD-OPEN-STREAM (STREAM DEVICE) REGIONSINTERSECTP (REGION1 -REGION2) |\\LFScavFileName| (NAME&VERSION STRING) TEDIT.GET.OBJECT1 (STREAM FILE CURCH# TEXTOBJ) -XCL::CLEAR-IMPLICIT-KEY-HASH (XCL::IK-HASH-TABLE XCL::BASE XCL::LAST-INDEX) MSFIND (IN X) -XCL::HASH-FILE-TYPES-OF (XCL::NAME XCL::TYPES) |\\VAMUpdateVAM| (|page| |vol| |VAMPage#| |VAMWord#| -POSITIONA1598 |VAMBit#| |allocOrFree|) %ARRAY-BASE (ARRAY) MAXIMUMMAINWINDOWSIZE (WINDOW) + COMPILER::REFERENCE COMPILER::REQUESTS) D-ASSEM::EMIT-BYTE-LIST (D-ASSEM::L BYTE) DSPROTATE (ROTATION +) CHAT.SETDISPLAYTYPE (INSTREAM CODE NAME) \FM.RESETCLIPPINGREGION (WINDOW) BLOCK%: (X) \LFGetFileInfo + (attribute infoPage) \FM.CHECKPROPS (PROPS PROP) D-ASSEM::FETCH-HUNK (D-ASSEM::LEVEL D-ASSEM::MAP-ENTRY +) SEDIT::REPLACE-NODE (SEDIT::CONTEXT SEDIT::POINT SEDIT::NODE SEDIT::NEW-NODE) MKACCESSFN (TYPE FIELD + ARGS) D-ASSEM::COPY-LAP-CODE (D-ASSEM::CODE) POSSIBILITIES (FORM##) \SHOWSEL.HILIGHT (DS X0 SEL XLIM +SHADEHEIGHT SHADE LINES TEXTOBJ) COMPILER::META-EVAL-PROGV (COMPILER::NODE A0665 A0664 A0667 A0666 +A0669 COMPILER:CONTEXT A0668) \UFS.REMOVE.HOST.FIELD (FILE PARSE-LIST DEV #:G111) /PRINTLEVEL (RESULT +CARVAL CDRVAL) PRETTYCOM1 (PRTYCOM X) \RESHOWBORDER1 (NEWBORDER OLDBORDER REGION OLDSAVE) D-ASSEM::MAX-ARG + (D-ASSEM::OPCODE D-ASSEM::RANGE) WINDOWDELPROP (WINDOW PROP CURRENT ITEMTODELETE) ADDNAKEDCHAR (CHAR) + ACCEPT-UNIX-SOCKET-STREAM (SOCKSTREAM NEWSTREAM) RELDSPYOFFSET (DY DISPLAYSTREAM) D-ASSEM::CHOOSE-OP +(D-ASSEM::ARG D-ASSEM::CHOICES) D-ASSEM::PUSH-INTEGER (D-ASSEM::N) FORMAT-ERROR (COMPLAINT FORMAT-ARGS +) PFI.PRINT.LAMBDA (DEF *PFI-ITEM*) COMPILER::FRAME-ANNOTATE-LABELS (COMPILER::SELF COMPILER::PAIR) +COMPILER::META-EVAL-OPCODES (COMPILER::NODE COMPILER:CONTEXT) PRINTDEF1 (EXPR) +SEDIT::RELINEARIZE-WHERE-NECESSARY (SEDIT::CONTEXT) \LFGetFileName (FileName Recog) +\FM.CHECKDESCRIPTION (ID TYPE PROP) TEDIT.PAGEFORMAT (STREAM FORMAT) SEDIT::RECOMPUTE-WIDTH (SEDIT::STARTX +) OPT.XVARSCAN (X) XYSECTLSEG (X0 DX Y0 DY U0 DU V0 DV) NECCSPEC (VAR BINDER) PRINTARRAY-TO-LIST (V) +PSCFONT.COERCEFILE (EXPANSION FAMILY SIZE WEIGHT SLOPE ROTATION DEVICE) MENUTITLEFONT (MENU) +READARRAY-FROM-LIST (SIZE TYPE ORIG A) RESHOWBORDER (BORDER WINDOW) COMPILER::META-EVAL-PROGN ( +COMPILER:CONTEXT A0659 A0661 A0663 A0662) NESTED.SUBMENU (MENU SUBITEMS SUBMENULST) DSPSCALE2 (Sx Sy) +CREATE-UNIX-SOCKET-STREAM (STR) SEDIT:ADD-COMMAND (SEDIT::FORM SEDIT::SCROLL? SEDIT::KEY-CODE +SEDIT::COMMAND-NAME) RELDSPXOFFSET (DX DISPLAYSTREAM) COMPILER::GENCODE-CALL (COMPILER::NODE COMPILER::ARGS + COMPILER:CONTEXT COMPILER::FN COMPILER::VAR COMPILER::NUM-ARGS COMPILER::FN-VAR COMPILER::PARAMETER-NAME + COMPILER::*CODE* COMPILER::INNER-CODE COMPILER::LV) PFI.HANDLE.DEFINEQ (EXPR DEF) +\TEDIT.GET.INSERT.CHARLOOKS (TEXTOBJ SEL CH# PCTB) \INSPECT.DATATYPE.RAW.FETCH (DESCRS FIELD INSTANCE) + \FM.UNSCROLLWINDOW (WINDOW) \SETTERMSYNTAX (CHAR TABLE CODE TBL C TABLEA0391 CLASS) +SEDIT::ATOM-CHAR-ESCAPED (CL:CHAR TABLEA0702) MB.BUTTONEVENTINFN (OBJ RELX RELY OBJBOX) +\UFS.DIRECTORY.NAME (DIRSTRING NAMEAREA DEV #:G102 #:G103) D-ASSEM::DCODE-FROM-DLAMBDA (D-ASSEM::DLAMBDA + D-ASSEM::LEVEL D-ASSEM::*DCODE*) /MOVD (TO FROM NEWFLG) \SETREADSYNTAX (C TABLEA0393 TBL OLDSYNTAX +CHAR TABLE CODE) MAKEACCESS (TYPE BODY NEWVAL) DSPTRANSLATE (Tx Ty) SYNTAXP (CLASS CODE TABLEA0378 +TABLE TABLEA0379 TABLEA0381 TABLEA0383 TABLEA0385 TABLEA0387) XCL::GET-PROCESS-PROFILE (XCL::PROCESS) +\UFSDeleteFile-C (FDEV) \COPYSYNTAX (A) UNMAKEHARDCOPYSTREAM (DISPLAYSTREAM) CHECK.MARGIN (LINE BUF) +SHOWDEF (NAME TYPE) BREAK (X) \MAPCHARTABLE (FN CHARTBL) SEDIT::BACKSPACE-QUOTE (SEDIT::CONTEXT +SEDIT::ATOM-NODE) D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL (D-ASSEM::FN D-ASSEM::DLAMBDA D-ASSEM::ID +D-ASSEM::DVAR D-ASSEM::PENDING A0808) DWIMIFY0 (X SIDES) XCL::EXEC-TITLE-FUNCTION (XCL::WINDOW EXEC-ID +) D-ASSEM::DIGEST-CODE (D-ASSEM::LAP-CODE D-ASSEM::TAIL) COMPILER::FRAME-ANNOTATE-IF (COMPILER::SELF) +\UFStoOtherRenameMess (NEW-DEVICE OLD-NAME EXTENSION NEW-NAME) MSCHECKVARS1 (FN X) FINDRECDECL (DATUM) + PPT (X) \NSRANDOM.HANDLE.ERROR (ERROR STREAM DEVICE SESSION PROCEDURE) \UFSRenameFile-C (FDEV) +XCL::WALK-LET* (XCL::FORM XCL::CONTEXT) COMPILER::TEST-META-EVAL (COMPILER::FN COMPILER::TREE) +\TEDIT.WINDOW.SETUP (WINDOW TEXTSTREAM PROPS ICONFN) DRAWBETWEEN (PT1 PT2 WIDTH OPERATION COLOR +DASHING) \VFMDeletePageGroup (filePtr vol interval fileSize previousKey) \QUEUE.INPUT.IOCB (NDB LENGTH + BUFFER) DELETECONTROL (TTBL TYPE) \INVERTITEM (COLUMN ROW MENU DSP) READ-UNICODE-MAPPING-FILENAMES ( +FILESPEC) D-ASSEM::DIGEST-FUNCTION (D-ASSEM::DLAMBDA D-ASSEM::FN-PAIR D-ASSEM::CLOSED-OVER D-ASSEM::DVAR + D-ASSEM::TAIL D-ASSEM::OPT-VAR) POSITIONP (X) /MAPCONC (MAPFN1) \LITCHECK (X) \SHAPEW2 (REGION +OLDREGION WBORDER OLDCLIPREG) D-ASSEM::STORE-DIGEST-INFO (D-ASSEM::FREE-VAR-ALIST D-ASSEM::FREE-VAR-COUNT + D-ASSEM::DVAR) GLOBALVARP (X) \STRINGOUT (STRING STREAM) D-ASSEM::DVAR-FROM-LAP-VAR (D-ASSEM::LAP-VAR +) SUPERPRINTGETPROP (ATM PROP) FIELDNAMESIN (DECS X) D-ASSEM::INTERN-TAG (D-ASSEM::ID) GETCFILE (FILES +) LAYOUT/POSITION (NODE) PRINTFILEPROP (PRINTFILETYPE PROP) REMOVEITEM (X LST Y) D-ASSEM::EASY-ENTRY-P + (D-ASSEM::DLAMBDA) MAKEHARDCOPYSTREAM (IMAGETYPE) DRAWCIRCLE (RADIUS CENTERX CENTERY BRUSH DASHING) +TYPESOF (SOURCE POSSIBLETYPES IMPOSSIBLETYPES NAME) \FM.RESHAPEFN (WINDOW OLDREGION OLDWIDTH MINWIDTH +NEWWIDTH OLDHEIGHT MINHEIGHT NEWHEIGHT) PRINTARRAY (V) SEDIT::PUNT-SET-POINT (SEDIT::POINT SEDIT::CONTEXT + SEDIT::NODE SEDIT::WHICH-END SEDIT::COMPUTE-LOCATION?) \FM.PUSHGROUP (GROUPS DIR ITEM AMOUNT) +INSURE.BRUSH (STREAM) SEDIT::PROPAGATE-WIDTH-CHANGE (SEDIT::NODE SEDIT::WIDTH SEDIT::OLD-WIDTH +SEDIT::CONTEXT) SHAPEW1 (REGION OLDREGION WBORDER OLDCLIPREG) COMPILER::META-EVAL-MV-PROG1 (COMPILER::NODE + COMPILER::STMTS COMPILER:CONTEXT A0655 A0657) EQP (X Y) PRINTERROR (LL) \LFReadPages (stream +streamFirstPage buffers file) \IDLE.PROMPT.WATCHER (TIMEOUT PROC) EXTENDPASTVERTBOUNDARIES (VIEW +EXTENT) XCL::EXEC-SHRINKFN (XCL::WINDOW XCL::PROCESS) D-ASSEM::INTERN-VAR (D-ASSEM::VAR) +\UFS.HANDLE.RELATIVEDIRECTORY (DEV #:G112) XCL::WALK-LET (XCL::FORM XCL::CONTEXT) +D-ASSEM::GENERATE-EASY-ENTRY (D-ASSEM::DLAMBDA D-ASSEM::ARG-TYPE) UTOXCODE (UNICODE) +XCL::SETUP-EXEC-WINDOW (XCL::WINDOW) D-ASSEM::GENERATE-HARD-ENTRY (D-ASSEM::DLAMBDA D-ASSEM::NUM-REQUIRED + D-ASSEM::NUM-OPTIONAL) GETDELETECONTROL (TTBL TYPE) BUFTAILP (TAIL END) DRAWARC (CENTERX CENTERY +RADIUS STARTANGLE NDEGREES BRUSH DASHING) CHAT.SET.EMULATOR (TYPEOUTPROC WINDOW OLDTITLE) +\FM.REDISPLAYMENU (WINDOW ITEM) ECHOCHAR (CHARCODE X TTBL SA CHAR TABLE CODE) \LFSetFileInfo ( +attribute value) LISPXUSE1 (VARS ARGS EXPRS) D-ASSEM::GATHER-ROOTS (D-ASSEM::CODE D-ASSEM::TAG-LIST) +READARRAY (SIZE TYPE ORIG A) ACCESSDEF4 (LST TRAN SUBDEC) PFI.PRINT.LAMBDA.BODY (DEF FNSLST) +INSPECTABLEFIELDNAMES (DECL) FINDSYSRECDECL (DATUM) SEDIT::DECOMPOSE-PSEUDO-SELECTION (SEDIT::PSEL) +\TEDIT.FIXSELS (TEXTOBJ EXCEPT) MARGINBAR (W UNIT UPDATE RIGHTLIM OLDOP TABS TAB) NSOCKETEVENT (NSOC) +D-ASSEM::GENERATE-ARG-CHECK (D-ASSEM::DLAMBDA D-ASSEM::MIN-ARGS) \UFSGetFileType (FILENAME) +\HDCPYDSPPRINTCHAR (CHARCODE DD SPACEWIDTH) \POSITION.MENU.IMAGE (MENU) SUBDECLARATIONS (TRAN TEM) +D-ASSEM::STACK-ANALYZE-CODE (D-ASSEM::INIT-DEPTH D-ASSEM::INIT-BINDING-DEPTH) COMPILE.FILECHECK (FILE) + COMPILER::FRAME-ANNOTATE-CATCH (COMPILER::*REFERENCES* COMPILER::SELF COMPILER::REQUESTOR COMPILER::REFERENCE +) \FM.JUSTIFYGROUPS (GROUPS DAUGHTER) SEDIT::SHIFT-STRING (CL:LENGTH) SI::FINISH-UNBREAKING (SI::ENTRY +) D-ASSEM::INSTALL-LOCAL (D-ASSEM::CLOSED-OVER D-ASSEM::DVAR) PRETTYPRINT2 (FN) D-ASSEM::ASSEMBLE ( +D-ASSEM::LAP-CODE) ECHOCONTROL (CHAR MODE TTBL) D-ASSEM::GATHER-TAGS (D-ASSEM::TAGS-FOUND) DRAWCURVE ( +BRUSH KNOTS CLOSED DASHING) \FM.OPENFN (WINDOW) \LFWritePages (streamFirstPage buffers file) +\FM.JUSTIFYITEMS (GROUPS) BRUSHP (BRUSH?) NOSUCHATOM (ATM) SEDIT::PARSE--UNKNOWN (CL:STRUCTURE +SEDIT::CONTEXT) GETECHOMODE (TTBL) COMPILER::META-SUBST-ANY-CALL (COMPILER::NODE) FW-CHANGE-POSITION ( +OLDPOS) \UFSSetFileType (FILENAME EXTENSION) %%SORT-VECTOR (VECTOR PRED LOWER UPPER) GETCONTROL (TTBL) + PUTMENUPROP (PROPERTY VALUE) ADDTOCOM (TYPE COM NAME) /MAPCON (MAPFN1) \TEDIT.HARDCOPY.MODIFYLOOKS ( +PRSTREAM LOOKS STARTX LINE CURX RULEWIDTH STREAMSCALE CURY) GETTERMTABLE (TTBL) RELMOVEW (POS) +D-ASSEM::ASSEMBLE-CODE (D-ASSEM::DEPTH) MSCHECKBLOCKBASIC (BLKNAME BLOCK X) ALISTP (LST) MOVE.BACK.TO +(BUFTAIL) INTERSECT/REGIONP/LBWH (HOW REG B H L W) SEDIT::PARSE-NEW (SEDIT::EXPRESSION) DELFROMCOM1 ( +NAME FLG) COMPILER::META-EVAL-LITERAL (COMPILER::NODE COMPILER:CONTEXT) DRAWELLIPSE (CENTERX CENTERY +SEMIMINORRADIUS SEMIMAJORRADIUS ORIENTATION BRUSH DASHING) UNIX-STREAM-CLOSE (STREAM) GETRAISE (TTBL) +D-ASSEM::REDUCE-UNCERTAINTY (D-ASSEM::JUMP-LIST D-ASSEM::CUMULATIVE-UNCERTAINTY +D-ASSEM::DECREASE-IN-UNCERTAINTY) CLOSE.PROCESS.MENU (WINDOW) \IDLE.ISMEMBER (GROUP NAME) +RESETTERMTABLE (FROM TTBL FR) DELFROMCOM (COM NAME TYPE) D-ASSEM::GENERATE-KEY (D-ASSEM::NUM-REQUIRED +D-ASSEM::NUM-OPTIONAL D-ASSEM::DLAMBDA) D-ASSEM::STACK-ANALYZE (D-ASSEM::CODE D-ASSEM::*ENDING-DEPTH*) + \UFS.REGISTER.GFS (GENFILESTATE) SEDIT::PARSE--GAP (CL:STRUCTURE SEDIT::CONTEXT SEDIT::WIDTH) +ACCESSDEF (DEC) EXTENDPASTHORIZBOUNDARIES (VIEW EXTENT) COMPILER::META-SUBST-UNWIND-PROTECT (COMPILER::NODE + A0699 A0698) COMPILER::META-EVAL-MV-CALL (COMPILER::NODE A0653 A0652 COMPILER:CONTEXT) SETTERMTABLE ( +TBL) UNIX-STREAM-OUT (STREAM CHAR) \CH.PRINT.BLURB (MSG ORGANIZATION) DRAWPOLYGON (POINTS CLOSED BRUSH + DASHING) TIMEALL (TIMEFORM DATATYPES) \TERMCODETOCLASS (CODE) \ONSCREENCLIPPINGREGION (WIN) +\UFS.NEXTFILEFN (FINFOID DEV DIR FILEGROUP) MSCHECKBOUNDFREE (BOUNDFREE V USERS SEEN BINDERS U LF) +\10MB.INPUT.INTERRUPT (NDB LENGTH) GETXIP (NSOC NSOCQ) \ORIGTERMTABLE (TBL) IN/SCROLL/BAR? (WINDOW X Y +) OPT.POSTOPT (TAG) DRAWPOINT (X Y BRUSH OPERATION) COMPILER::META-SUBST-VAR-REF (COMPILER::NODE +COMPILER::NEW-CODE) D-ASSEM::COMPUTE-JUMP-SIZE (D-ASSEM::KIND D-ASSEM::PAIRS D-ASSEM::DISTANCE) +\VAMFreePageGroup (groupPtr group filePtr \DFSVAMjunkPage RUNLENGTH \DFSVAMpage) %%STABLE-SORT-VECTOR +(VECTOR PRED LENGTH) SEDIT::PSEUDO-SELECTION-FROM-SELECTION (SEDIT::SEL) SEDIT::BUILD-PRELINEARIZED-NODE + (CL:STRUCTURE SEDIT::NODE-TYPE STRING SEDIT::PRIN-2? SEDIT::FONT) XTOUCODE (XCCSCODE) +CL::EQLHASHBITSFN-UFN (ARG-PTR) /LISTPUT1 (LST PROP VAL) COMPILER::FRAME-ANNOTATE-CALL (COMPILER::SELF + COMPILER::ARG) COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::SELF COMPILER::*REFERENCES* COMPILER::REQUESTOR + COMPILER::REFERENCE) D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL (D-ASSEM::NT-COUNT D-ASSEM::NT-SIZE +D-ASSEM::NT-WORDS) MSCHECKFNINBLOCK (FN FN2 BLOCKS BLOCK) WAKE.MY.PROCESS (WINDOW) \FM.LAYOUTGRID ( +PROP MOTHER GRIDTAIL AMOUNT ITEMDESC) UNIX-STREAM-EOFP-NEW (STREAM) XCL::EXEC-CLOSEFN (XCL::WINDOW +XCL::PROCESS) \UFS.FILEINFOFN (GENFILESTATE ATTRIBUTE) FILLPOLYGON (POINTS TEXTURE OPERATION) +XCL::WALK-DO* (XCL::FORM XCL::CONTEXT) COMPILER::META-SUBST-THROW (COMPILER::NODE A0697 A0696) +SEDIT::SELECT-NODE-SEGMENT (SEDIT::CONTEXT SEDIT::NODE SEDIT::START SEDIT::END SEDIT::POINT) +SI::UNBREAK-FROM-RESTORE-CALLS (SI::ENTRY SI::FROM SI::FN SI::TO) ACCESSFN (NAME&FIELDS) +SI::PRINT-TRACED-ARGUMENT (SI::INDENT SI::NAME SI::VALUE) ADDNEWCOM (NAME TYPE LISTNAME FILE COMSNAME) + INSPECT/ALIST (ALST X WHERE) D-ASSEM::START-PC-FROM-NT-COUNT (D-ASSEM::NT-COUNT D-ASSEM::NT-SIZE +D-ASSEM::NT-WORDS) CL::SXHASH-UFN (ARG-PTR) XCL::UNDOHOOK (XCL::FORM XCL::ENV) \IDLE.AUTHENTICATE ( +TYPE OUTPUT NAME PWD IFALLDOWN) PRETTYDEFMACROS (ARGS X) FORWARD.DELETE.TO (BUFTAIL DELETEDWIDTH) +PFI.HANDLE.RPAQQ (EXPR NAME *MAINFILECOMS*) TEDIT.DELETELINE (LINE TEXTOBJ WINDOW) D-ASSEM::CONVERT-TO-BINARY + (D-ASSEM::BYTE-LIST D-ASSEM::CODELEN D-ASSEM::CODE-ARRAY D-ASSEM::PUSH-TAG-FIXUPS) DRAWTO (X Y WIDTH +OPERATION COLOR DASHING) PRINCOPY (X) \TEDIT.LINE.LIST (TEXTOBJ WINDOW) ALLFIELDS (TRAN) +COMPILER::META-EVAL-LAMBDA (COMPILER::NODE A0651 A0650 COMPILER:CONTEXT) RELEASE.XIP (XIP) +COMPILER::FRAME-ANNOTATE-GO (COMPILER::SELF) COPYREADTABLE (RDTBL) CONVERT.FILE.TO.TYPE.FOR.PRINTER ( +FILE PRINTERTYPE SCRATCH PRINTOPTIONS HEADING) \UFS.VALID.PROPP (DESIREDPROPS PROP) +LATTICE/BREAK/CYCLES (STACK) FILLCIRCLE (CENTERX CENTERY RADIUS TEXTURE) \BLTSHADE.GENERICPRINTER ( +DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT STREAM SHADESCALE TEXTURE OPERATION) COMP.UNBOX (TYPE) +INTERPRET/MARK/FORMAT (FORMAT) \LFOpenFile (RECOG ACCESS) \10MB.STARTDRIVER (MYNSNUMBER) +D-ASSEM::PERFORM-LOCAL-FN-FIXUPS (D-ASSEM:DCODE) D-ASSEM::SPLICE-IN-JUMPS (D-ASSEM::JUMP-LIST D-ASSEM::JUMP + D-ASSEM::TAG D-ASSEM::KIND D-ASSEM::DISTANCE) SI::PRINT-TRACE-EXIT-INFO (SI::TRACED-FN SI::FN-VALUES +SI::VALUE) /LISTPUT (PROP VAL) FIND-READTABLE (NAME) PPROMPT3 (ITEM) \TEDIT.APPLY.STYLES (LOOKS +TEXTOBJ STYLE-SHEET PC) \10MBWATCHER (MESSAGE-BUFFER NDB) \TEDIT.FIND.FIRST.LINE (TEXTOBJ TEXTSTREAM +WHEIGHT) CREATESCROLLINGW (TITLE BORDER) FW-CHANGE-JUSTIFICATION (OLDJUST?) IN-READTABLE (RDTBL) +COMP.UBFLOAT2 (OP) HARDCOPYGRAPH (IMAGETYPE PSTREAM GRAPH/WINDOW GRAPH GRAPH-REGION +SCREENPOINTS-PER-INCH ORIGINAL-CLIPREGION PSCALE RIGHT-MARGIN UPPER-MARGIN GRAPH-WIDTH PAGE-WIDTH +GRAPH-HEIGHT PAGE-HEIGHT TRANS CLIPREGION NUMBER-OF-Y-PAGES NUMBER-OF-X-PAGES LEFT-CENTERING-OFFSET +GRAPH-LEFT GRAPH-BOTTOM SCALED-GRAPH N PTRANS) ESCAPE (FLG) D-ASSEM::RESOLVE-JUMPS (D-ASSEM::JUMP-LIST + D-ASSEM::START-PC) \IDLE.IS.PREVIOUS (PASSWORDADDR PWD NULLOK) GETBRK (RDTBL) COMPILER::META-EVAL-IF +(COMPILER::NODE A0643 A0642 A0645 COMPILER:CONTEXT A0644 A0647 A0646) GETREADTABLE (RDTBL) +\LFGenerateFiles (PATTERN DESIREDPROPS) \FM.LAYOUTCOLUMN (PROP MOTHER ITEMDESC GROUPBOTTOM) +SEDIT::COMPOSE-PSEUDO-SELECTION (SEDIT::NODE) SEDIT::PARSE (SEDIT::PARSER SEDIT::ENVIRONMENT +CL:STRUCTURE SEDIT::DATA SEDIT::REUSE-NODES) GETSEPR (RDTBL) \CREATEW1 (BORDERSIZE REGION SCREEN TITLE + PROPS OLDWINDOW) FIND.MATCHING.QUOTE (END CHAR TABLE CH) RELDRAWTO (STREAM DX DY STRM WIDTH OPERATION + COLOR DASHING) GETMENUPROP (MENU PROPERTY) ADJUSTOFFSETS (WINDOW YDELTA DSP XDELTA) \FZEROP (X) +SHOWSTACKBLOCKS (ORIG EASP) READMACROS (FLG) SUBFIELDCREATE (X) \UFS.ABORT.CL-DIRECTORY (GFS) +PURGEHISTORY (COM) READTABLEPROP (ARGS) CAN.PRINT.DIRECTLY (FILETYPE PRINTERTYPE) +SI::PRINT-TRACE-ENTRY-INFO (SI::TRACED-FN) GENERATOR (FORM##) \GTREADTABLE (X FLG) +PFI.HANDLE.DEFDEFINER (EXPR) BITMAPIMAGESIZE (STREAM BITMAP DIMENSION) MSCHECKBLOCKS (FL FT) +\LFEventFn (Event) \FM.LAYOUTROW (PROP MOTHER ITEMDESC GROUPLEFT) XCL::WALK-DECLARATIONS (XCL::BODY +XCL::FN XCL::OLD-BODY) COMPILER::META-SUBST-SETQ (COMPILER::NODE A0695 A0694) DETACHWINDOW ( +WINDOWTODETACH MAINWINDOW MAINW WHEREAT) \VAMAllocPageGroup (filePtr \DFSVAMjunkPage \DFSVAMpage) +INSPECT/TOP/LEVEL/LIST (LST WHERE) \UFS.CLEANUP.GFS.TABLE (VAL NOTICETOCP) \UFSMakeUnixFormatName ( +FILE OLDFILE LEN NEWINDEX NEWFILE) UNIX-BACKFILEPTR-NEW (STREAM) COMP.DECLARETYPE (X) \UFS.ADJUST.HOST + (FIELDS) \10MB.OUTPUT.INTERRUPT (NDB) DV (VAR ARGS) INFILEPAIRS (LST LL) \UFSParseNameString (FILE +OLDFILE NEWFILE) COMPILER::META-EVAL-GO (COMPILER::NODE COMPILER:CONTEXT) XCL::UNDOABLY-FMAKUNBOUND ( +CL:SYMBOL) MSDWIMTRAN (EXPR) \UFSParse-Directory (PARSE DEV #:G109 #:G110) MSCHECKBLOCK (BLOCK FNS +BLOCKS SHOULDBESPECVARS LOCALFREEVARS GLOBALVARS) \LFDirectoryNameP (DirSpec) \FM.FORMATEXPLICIT (LEFT + BOTTOM PROPS DESCRIPTION ITEMDESC FONT ROWSPACE COLUMNSPACE ID EXTENT) XCL::WALK-DO (XCL::FORM +XCL::CONTEXT) COMPILER::META-SUBST-TAGBODY (COMPILER::NODE) INSPECT/PLIST (PLST X WHERE) +SHOULD-BE-DWIMIFIED? (LAMBDA-FORM) CONDITIONS::%%RESTART-PRINTER (CONDITIONS:RESTART STREAM CONDITIONS::LEVEL + CONDITIONS::REPORTER) \10MB.BROADCASTP (PACKET) \TEDIT.HARDCOPY.DISPLAYLINE (LINE THISLINE TEXTOBJ +PRSTREAM TEXTLEN REGION BASEA0776 LOOKS LEFTMARGIN STREAMSCALE BASEA0777 CHLIST BASEA0778 BASEA0779 +WLIST X Y BASEA0780 DOTWIDTH BASEA0781 NO ARR) CREATEW1 (BORDERSIZE PROPS OLDWINDOW) +BACKWARD.DELETE.TO (BUF) MIN/BOTTOM (NODES) OPENDISPLAYSTREAM (OPTIONS FILE) COMPILER::META-EVAL-CATCH + (COMPILER::NODE A0639 A0638 A0641 COMPILER:CONTEXT A0640) SCALEDBITBLT (DESTINATION SOURCE SOURCELEFT + SOURCEBOTTOM DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT SOURCETYPE OPERATION TEXTURE SCALE) +SHOWSTACKBLOCK1 (PTR GOODFLG STR) \IDLE.OUT (TIMEOUT) SETBRK (LST RDTBL X FLG) MSPRGDWIM (FILEPKGFLG +NOSPELLFLG X FN DEF) MENUDESELECT (ITEM) \DRAWPOINT.GENERIC (X Y BRUSH OPERATION STREAM) +\HANDLE.RAW.PACKET (PACKET TYPE) CH.LIST.ORGANIZATIONS (ORGANIZATIONPATTERN) PRIN2-LONG-STRING (STREAM + ESC STRING RMARG TAIL LMARG HASH SA) \UFS.PARSE.BODY (PARSEDNAME) \FM.FORMATBYGRID (LEFT BOTTOM +DESCRIPTION FONT ROWSPACE COLUMNSPACE ID EXTENT PROPS) SEDIT::LINEARIZE-ROOT (SEDIT::NODE SEDIT::CONTEXT +) SETREADTABLE (RDTBL) COMP.LOOKFORDECLARE (Z) MENUSELECT (ITEM) \DRAWPOLYGON.GENERIC (BRUSH STREAM +COLOR DASHING) DUMPGRAPH (STREAM GRAPH) SETSEPR (LST RDTBL X FLG) INIT/NODES/FOR/LAYOUT (NS ROOTIDS +FONT FORMAT R) \USERFNISDON'T (USERFN) \DRAWCIRCLE.GENERIC (RADIUS CENTERX CENTERY R2RAD BRUSH DASHING + STREAM) \NSRANDOM.READ.SEGMENT (STREAM NEXTRA FIRSTPAGE# EP EO BUFFERS BULKSTREAM) PRINOPEN (TAIL +FILE PAREN) CREATEPOSITION (XCOORD YCOORD) PFI.ESTIMATE.SIZE1 (EXPR) PFI.ESTIMATE.SIZE (EXPR) +\NSRANDOM.PREPARE.CACHE (NPAGES OLDSIZE) DIR (ARGS) CHDIR (PATHNAME) /ECHOMODE (TTBL) +GETFIELDFORCREATE (RNAME DEFAULTS USEUNIVDEFAULT TOPDEFAULTS) MIN/LEFT (NODES) PURGEHISTORY1 (ENTRY) +INFILECOMSMACRO (ATS X PROPS PROP) ExtensionForPrintFileType (TYPE) \STORENSHOSTNUMBER (NSHNM BASE) +PRINSHUT (FILE) \UFSGetFileTypeConfirm (FILENAME) \UFSGetPrintFileType (FILENAME) \SETMACROSYNTAX ( +CLASS C CHAR TABLE CODE) FW-CHANGE-ANCHOR (OLDANCHOR) \VFMInsertPageGroup (filePtr groupPtr vol +interval) \READTABLEP.DEFPRINT (RDTBL STREAM) \UPDATE.PSC (IMAGEDATA STREAM) \TEDIT.CREATE.LINECACHE ( +%#CACHES CACHES CACHE) COMPILER::META-EVAL-CALL (A0637 A0636 COMPILER::FN COMPILER:CONTEXT COMPILER::EFFECTS + COMPILER::VALUE) SETFONT (FILE OLDFONT) PRIN1S (TAIL FILE STR) TEDIT.PUT.PAGEFRAMES (FILE PAGEFRAMES) + PRIN2S (TAIL FILE STR) \NSRANDOM.FETCH.CACHE (STREAM PAGENO) \GetRootDirectoryType (vol) +SET-DEFAULT-HASHMACRO-SETTINGS (RDTBL) COMPILER::META-SUBST-RETURN (COMPILER::NODE A0693 A0692) +\DRAWELLIPSE.GENERIC (COSOR SEMIMAJORRADIUS SINOR SEMIMINORRADIUS ROOT2DIV2 CENTERX CENTERY BRUSH +DASHING STREAM) DOUSERFNS2 (WINDOW ARG1 ARG2 ARG3 USERFN) COS (X XX) PRINDOTP (E FILE DOT MAXPOS) +\NSRANDOM.STREAM.CHANGED (NEWHANDLE LEN) SIN (X XX) XCL::WALK-BINDINGS-1 (XCL::BINDING +XCL::OLD-DECLARATIONS XCL::OLD-LEXICAL-VARIABLES XCL::CONTEXT) INSPECT/AS/FUNCTION (ATM STKP +EDITORARGS) SMASHPAT1 (PATTERN XV) CREATE.PACKET.EXCHANGE.XIP (NSOCKET DESTHOST DESTSOCKET TYPE) +STRING-EQUAL (STRING1 STRING2) CH.RETRIEVE.MEMBERS (STREAM) \COURIER.EXPEDITED.ARGS (ARGTYPES ARGLIST +STREAM PROGRAM) \10MBENCAPSULATE (PDH LENGTH TYPE) SUPERPRINT/WRAPPER (E BODY FILE MACRO TAIL X Y +BRFLG) PRINTLEAF (PUP LENGTH N WIDTH) COMPILER::META-EVAL-BLOCK (COMPILER::NODE COMPILER:CONTEXT A0635 + A0634) \MAIKO.DISPLAYLINE (TEXTOBJ WINDOW LINE HCPYDS OLDCACHE DS TEXTLEN THISLINE BASEA0757 LOOKS +BASEA0758 CHLIST BASEA0759 WLIST BASEA0760 LEADERFONT DOTWIDTH WINDOWDS) READBQUOTECOMMA (FILE CH) +\LFParseFileName (FULLNAME) \FM.FORMATBYCOLUMN (LEFT BOTTOM DESCRIPTION COL FONT ROWSPACE COLUMNSPACE +ID EXTENT COLID HEIGHT PROPS) PRINTVA (X) SEDIT::KILL-NODE (SEDIT::X) MAKEDOTPTAIL (B V) DOUSERFNS ( +WINDOW) \ARBOUT (STREAM W SIZE) LOGIN (HOST FLG DIRECTORY MSG) MAX/RIGHT (NODES) +MAKE-READER-ENVIRONMENT (R FORMAT) IFCEXPRTYPE (COM FN) \TEDIT.PUT.PARALOOKS.LIST (FILE STREAM W +LOOKSLIST LOOKSHASH) XCL::WALK-BINDINGS-2 (XCL::WALKED-BINDINGS XCL::BINDING XCL::WALKED-BINDING +XCL::CONTEXT) COMP.BOX (TYPE) COMPILER::META-SUBST-PROGV (COMPILER::NODE A0691 A0690) \UNIMPIMAGEOP ( +STREAM OP) \PFPutRootDirectoryType (directoryID) UNSAVEDEF (NAME X) \INTERNAL/GETPASSWORD (INFO MSG +DEFAULTNAME) /DELETECONTROL (TYPE) EQUAL-READER-ENVIRONMENT (ENV1 ENV2) ADDTO (RELATION WHAT PRNT) +BACKSKREAD (BUF CHAR TABLE CH) READGRAPH (STREAM F X) CHAT.TTYENTRYFN (PROCESS) SEDIT::ADJUST-WIDTH ( +SEDIT::NEW-WIDTH) MIDDX (DX DY X0 Y0) \FM.FORMATBYROW (LEFT BOTTOM ROW FONT ROWSPACE COLUMNSPACE ID +EXTENT PROPS) GRAPHOBJ.GETALIGN (STREAM GRAPH) SEDIT::INSERT-CHANGED (SEDIT::NODE SEDIT::DEPTH) +SET-READER-ENVIRONMENT (ENV) MAKECREATELST1 (AU DU A D) COMPILER::META-SUBST-PROGN (COMPILER::NODE) +SETPASSWORD (PASSWORD) PURGEHISTORY2 (ENTRY) COMP.ASET (A) GRAPHOBJ.PUTALIGN (ALIGN GRAPH STREAM) +OPENNSOCKET (SOCNUM IFCLASH) FONTCREATE (CHARSET CHSET) \TEDIT.CHARDELETE (PCTB) MAKECREATELST ( +TEMPLATE USING NEEDACELL) GRAPHREGION (GRAPH N) \SEND.EXPEDITED.XIP (%#TRIES NSOC XIP TIMER EVENT ID X + PROGRAM PGMDEF PROCEDURE PROCDEF NOERRORFLG) OPT.INITHASH (X H) \MENUSUBITEMS (MENU ITEM) PRIN2STRING + (FILE STR TAIL LMARG RMARG COMMENTP TEM) \INTERNAL/SETPASSWORD (MSG FN) MSPRGLST (L X PARNT CNTX) +CHAT.CHOOSE.EMULATOR (HOST) SEDIT::CREATE-SIMPLE-NODE (STRING SEDIT::FONT SEDIT::PRIN-2? SEDIT::NODETYPE + CL:STRUCTURE SEDIT::WIDTH) \FM.FORMAT (PROP MOTHER) XCL::HASH-FILE-TYPES-OF (XCL::NAME XCL::TYPES) +SEDIT::INITIALIZE (SEDIT::CLASS SEDIT::C) MINIMUMMAINWINDOWSIZE (WINDOW) MAX/TOP (NODES) +\PFPatchRootDirEntries (rootDir) \TEDIT.PUT.SINGLE.CHARLOOKS (FILE LOOKS FONT STREAM W FILEPOS) +OPT.RESOLVEJUMPS (PROP FN) CH.NUMBER.TO.PROPERTY (PNUM) INFILECOMSPROP (AT PROP) /CONTROL (TTBL) +\TEDIT.HARDCOPY.FORMATLINE (TEXTOBJ CH#1 IMAGESTREAM BASEA0782 N ARR VAL BASEA0783 BASEA0784 BASEA0785 + DEVICE NEWDESCENT FONTDESC CHARCODE BASEA0786) \INTERACTIVE.CLOSEW (WINDOW CLOSEFN) \ENCRYPT.PWD (STR +) IFCPROPSCAN (ATOMS PROPNAMES) \DSPUNTRANSFORMREGION (REGION DISPLAYDATA) COMP.AREF (A) +CLOSEPOSTSCRIPTSTREAM (STREAM) \TEDIT.PUT.CHARLOOKS.LIST (FILE STREAM W LOOKSLIST LOOKSHASH) +XCL::RELIST*-INTERNAL (XCL::ARGS XCL::X) COMPILER::FIND-SEGMENT (CL:TAGBODY COMPILER::TAG) +COMPILER::META-SUBST-MV-PROG1 (COMPILER::NODE) MSPRGLAMBDA (EXPR TYPE FLG) SEGMENT.LENGTH (END) +\LOGIN.READ (OSTYPE DEFAULTNAME TERMINATIONS) GETCHATWINDOW (DPYTYPE HOST TITLE SIZE) +SEDIT::COPY-SELECTION-DEFAULT (SEDIT::SELECTION SEDIT::NODE SEDIT::END) \DECODE.EXTENT.USE (EXTENTUSE) + \LFNormalizeVolumeName (volName) \ADJUST.USERNAME (OSTYPE) PRINTADDRS (X BASE CNT LB) +SEDIT::HANDLE-COMPLETION (SEDIT::CONTEXT) SMASHPATTERN (X PATTERN CARVAL EFF) \DECRYPT.PWD (STR) +\BUILD.EXPEDITED.XIP (PGMDEF PROCDEF PROGRAM) FW-REPAINTFN (W) \TEDIT.FIXCHANGEDLINE (PREVYBOT TEXTOBJ + WHEIGHT WINDOW) \IMAGEIOINIT (STREAM OPOS STR RDTBL CHARSET) DCODERD (INSTREAM FN CODELEN NTBYTESIZE +ARGTYPE NARGS NLOCALS NFREEVARS) \OKTOCLOSEW (WINDOW) \MEDW.BLTCHAR (CHARCODE DISPLAYSTREAM) +UNIX.SENDSCREENPARAMS (STREAM WIDTH HEIGHT) DEFC (NM DF PROP) \DSPXPOSITION.PSC (STREAM IMAGEDATA) +XCL::WALK-ARGLIST (XCL::CONTEXT) COMPILER::META-SUBST-OPCODES (COMPILER::NODE) WINDOWPOSITION (WINDOW +REG) \TEDIT.COPYTEXTSTREAM.PIECEMAPFN (FROMOBJ TOOBJ TEXTOBJ) \TEDIT.OBJECT.SHOWSEL (SEL SELWINDOW +WWIDTH WHEIGHT X OBJ XOFFSET YOFFSET WIDTH TEXTOBJ) FW-BUTTONEVENTFN (W) \VFMGetPageGroup (filePtr +filePage vol interval key) DCODESKIP (INSTREAM RDTBL FN) OPT.COMPILERERROR (MESS1 MESS2) +PFI.ADD.TO.INDEX (TYPE/ENTRY TYPE NAME) \NOIMAGE.DSPFONT (OLDFONT FONT) MAXMENUITEMWIDTH (MENU FONT +P2FLG) IFCPROPS (COM PAIR) PRIN4 (FILE STRM X) \TEDIT.LINECACHE (BITMAP WIDTH HEIGHT) EXEC-PRINT ( +VALUE) XCL::RELIST* (XCL::X XCL::ARGS) \ALLOC.CODE.BLOCK (NBYTES INITONPAGE) MAXIMUMMAINWINDOWSIZE ( +WINDOW) FW-AFTERMOVEFN (W) \PFFindRootDirEntryNum (rootDir directories index type) \REALNAMEP (X) +FONTCLASS (FONTLIST NAME FSPEC CREATEFORDEVICES) PRINTHISTORY1 (EVENT FILE X FL NOVALUES) +PROMPTFORWORD (TTBL X) GRAPHERPROP (PROPLIST PROP) BKBUFS (BUFS) RAIDSTACKCMD (CMD) +RECORD.FIELD.VALUE0 (FIELDNAME) PROVIDE.PROMPTING.WINDOW (TITLE W WINDOW) ERASEPROPS (RESPONSE X) +BROWSE/LAYOUT/LATTICE (NS) COMPILER::CONSTRUCT-PROG1-TREE (COMPILER::PROG1-VAR CL:REST COMPILER::PROG1-VAR-REF + COMPILER::NEW-LAMBDA CL:FIRST) CLBUFS (BUF) TEXTTOIMAGEFILE (FILE IMAGEFILE IMAGETYPE HEADING TABS +FONTS OPTIONS) LISPXSUBST (X Y Z) MAKE-COMPILED-CLOSURE (CODEBASE ENVIRONMENT) +GRAPHER/CENTERPRINTINAREA (EXP X WIDTH STRWIDTH Y HEIGHT) \POSSIBLECOLOR (COLOR?) GETOSTYPE (HOST) +COMPILER::META-SUBST-MV-CALL (COMPILER::NODE) \CCLOSURE.DEFPRINT (CLOSURE STREAM TYPE) ROUND (CL:NUMBER + CL::DIVISOR) HELPSYS (PROPS FN) \DEFINEDP (A) \MENUITEMLABEL (ITEM) SUPERPRINT/COMMENT (FILE L +DSLMARG INDENT HERE) UNIX.SETDISPLAYTYPE (STREAM TIMER BS) \DSPYPOSITION.PSC (STREAM IMAGEDATA) +PFI.DEFAULT.HANDLER (EXPR CAR-OF-FORM PAIR NAME) INFILECOMSVAL (X) STRINGWIDTH (STR RDTBL FONTDESC +CHARCODE) RELMOVETO (DX DY) MSPRGTEMPLATE (TEMPLATE PARENT) CHAT.INIT (STREAMS DISPLAYTYPE OUTSTREAM +WINDOW DPYNAME) SEDIT::STRING-OFFSET (SEDIT::END STRING SEDIT::ESC SEDIT::FONT SEDIT::STARTX) +\PFGetLVPage (lvName) CH.DELETE.MEMBER.FROM.PROPERTY.ACL (DONTCHECK PROPERTY WHICH.LIST AUTH) NEGSHADE + (SHADE) SEDIT::GET-SELECTED-STRUCTURE (SEDIT::CONTEXT SEDIT::SELECTION) RGBP (X) WINDOWPROP (X) +\TEDIT.BLTCHAR (CHARCODE DISPLAYDATA CURX CLIPRIGHT) DASHINGP (DASHING) TTYINWORDRDTBL (TBL BREAKS) +OP# (X) YMAPLIST (I) \MOVETO.PSC (STREAM X Y) \DisplayEventFn (EVENT) RAIDCOMMAND (X ATM A D VA PAGE) +SETUPPAGEMAP (PAGEMAPKEY) PFI.MAYBE.NEW.PAGE (MINLINES EXPR) COPY1 (X) COMPSETREAD (DEFAULT KEYLST) +\MAKE.ITEMS.VERT.ORDER (%#ROWS ITEMS %#COLUMNS ROWS EMPTY.STRING ROW) HLSP (X) DISPLAYBEFOREEXIT ( +EXITFN) MAXMENUITEMHEIGHT (MENU ITEM) SUPERPRINT/SPACE (FILE) MSPRGTEMPLATE1 (TEMPLATE EXPR LEGAL-KEYS +) SYSOUT (FILE TOTALTIMESAVE) SEDIT::SUBNODE-CHANGED (SEDIT::NODE SEDIT::CONTEXT) \SETUFNENTRY (FN +NEXTRA NARGS) XCL::WALK-TEMPLATE-HANDLE-REPEAT-1 (XCL::STOP-FORM XCL::TEMPLATE XCL::CONTEXT) +\GETUFNENTRY (BASE N OP INDEX) \PFPurgeRootDirectory (vol fileD) INSPECT/ARRAY (ARRAY BEGINOFFSET +FIRSTELT WHERE) MAKESYS (NAME FILE NEWFILE) INFILECOM (COM COMNAME Z) MAXIMUMWINDOWSIZE (WINDOW) +SEDIT::FORMAT-VALUES-CHANGED (SEDIT::NODE SEDIT::CONTEXT SEDIT::OLD-INLINE-WIDTH SEDIT::OLD-PREFERRED-WIDTH +) SEARCH-FOR-EVENT-NUMBER (ID SPEC HISTORY) SUBPRINT/WRAPPERTAIL (TAIL BODY DOT MACRO BRFLG) +\TEDIT.COPY.LINEDESCRIPTOR (FROMLINE) LOGOUT (FAST) MSPRGERR (EXPR) SEDIT::NOTE-CHANGE-IN-SIMPLE ( +SEDIT::CONTEXT) CALLSCCODE (DEF OPTION CODEBASE X OFFSET FNAPPLY) COMPILER::EXPAND-NESTED-PROGNS ( +COMPILER::NODE-LIST COMPILER::NODE) COPIEDFILEMATCH (SEMI*) COMPILER::META-SUBST-LAMBDA (COMPILER::NODE +) COMPILER::META-SUBST-LITERAL (COMPILER::NODE) \APPLYINSPECTMACRO (ARGLST DATUM WHERE) +COMPILER::CLOSURE-ANNOTATE-VAR-REF (COMPILER::NODE COMPILER::VAR) COMPSETY (A) \SUBFNDEF (X) +\SHOWMENULABEL (ITEM MENU DSP ITEMREGION LABEL) CH.ADD.MEMBER.TO.PROPERTY.ACL (DONTCHECK PROPERTY +WHICH.LIST AUTH) COMPILER::TEST-ANNOTATION (COMPILER::FN COMPILER::TREE) \CODEBLOCKP (PTR) +ADJUSTLINE.AND.RESTORE (JUSTIFYING) \DSPFONT.PSC (STREAM OLDFONT) RAIDSHOWFRAME (N) READPAGEMAPBLOCK ( +VP) INFILECOMSVALS (X FLG) PFI.PRETTYPRINT (NAME EXPR FORMFLG) MSPRGRECORD (PRNT CNTXT WITHSLOT Y) +BRV/OFFSET (N GN D) XCL::RECONS (XCL::X CAR CDR) \QUEUE.OUTPUT.IOCB (NDB LENGTH BUFFER) RECORDWORD ( +WORDTYPE) \DFSFreeDiskPages (volName vol recompute) \GET.IOCB (USE) \PROMPTFORWORDRETYPE (CHAR) +TEDIT.MODIFYLOOKS (DS LOOKS STARTX CURY LINE CURX FONT LINEBASEY) \PROMPTFORWORDERASE (0X 0Y Y) +\DISPLAYINIT (NAME) CREATE-SHELL-STREAM (TERMTYPE COMMAND SHELL-DEV STR) GRAPHEDITEVENTFN (GRWINDOW) +\DSPLEFTMARGIN.PSC (STREAM) \DSPMOVELR (CHAR TTBL DD FONT YPRIME HEIGHT) COPYTEXTSTREAM (ORIGINAL +TEXTOBJ CROSSCOPY) DELETEMENU (FROMWINDOW W) USEDFREE (A) \PROMPTFORWORDBS (CH) \PROMPTFORWORDBIN ( +KEYSTREAM) RECONS (X C Y) COMPSETF (A) \TEDIT.SELECT.CHARACTER (TXB LINE SELWINDOW DS OBJBOX TEXTOBJ X + Y SELOPERATION) COMPILER::CLOSURE-ANNOTATE-UNWIND-PROTECT (COMPILER::NODE COMPILER::IN-LOOP-P) +FILL.CONT (STRM TEXT YMAX YMIN) OVERFLOWLINE? (LINE) GRAPHOBJ.CHECKALIGN (GRAPH) \TEDIT.MARK.REVISION +(IMAGESTREAM LINE SCALE) \CREATECHARSET (CHARSET CREATEFN NOSLUG? N WIDTH) \PFRemoveRootDirEntry (type + rootDir directories index) CHANGECCODE (FN SEAL NEWREF MAP LC) INFILECOMS (COMS X) PROCESS-EXEC-ID ( +PROCESS NAME) DEFAULTFONT (DEVICE) INSPECT/HARRAYP (HARRAY WHERE) CHARWIDTHY (CHARCODE FONT) +XCL::WALK-TEMPLATE-HANDLE-REPEAT (XCL::FORM XCL::STOP-FORM XCL::TEMPLATE XCL::CONTEXT) \DSPPRINTCHAR ( +CHARCODE DD SPACEWIDTH) COMPILER::META-SUBST-LABELS (COMPILER::NODE A0689 A0688) \DRAWPOLYGON.DISPLAY +(BRUSH PTBRUSH POINTS STREAM DASHING) \DRAWARC.DISPLAY (STREAM CENTERX CENTERY RADIUS STARTANGLE +NDEGREES BRUSH DASHING) \PFAddRootDirEntry (index type directoryID entryNum) SUPERPRINT/COMMENT2 (CMT +COMMENT-MIDPOINT COMMENT-RMARGIN COMMENT-LMARGIN) \DRAWPOINT.DISPLAY (BRUSH BRUSHBM DISPLAYSTREAM X Y +OPERATION) \STRINGWIDTH.GENERIC (STR FONT SPACEWIDTH FONTDESC CHARCODE CC) PRINT-EVENT (EVENT FILE +POSITION X) SUPERPRINT/COMMENT1 (CF RMARGIN FILE FONT) \PROTECTED.APPLY (FN WINDOW) DSPCLEOL (DD YPOS +HEIGHT) \DSPCLIPPINGREGION.DISPLAY (DISPLAYSTREAM) \DSPRIGHTMARGIN.PSC (STREAM) \CHARWIDTH.DISPLAY ( +FONTDESCA0492 CHARCODE STREAM) MAPPAGES (BOT TOP IVP FN) COMPILER::META-SUBST-GO (COMPILER::NODE) +REBINDP (OB) \STRINGWIDTH.DISPLAY (STREAM STR DD RDTBL) SEDIT::CLEAR-ALL-LINEAR-FORMS (SEDIT::CONTEXT) + PopUpWindowAndGetAtom (PROMPTSTRING FONT WIDTH PROMPTW) \CH.FIND.ORG.SERVER (ORGANIZATION ORG) +\DSPOPERATION.DISPLAY (DISPLAYSTREAM SourceTypeA0499) PRINTERDEVICE (NAME ACCESS RECOG PARAMETERS FDEV + OLDSTREAM STRM SDEV PRINTOPTIONS) MSBINDVAR (TYPE EXPR) \10MBSENDPACKET (X Y NDB TYPE) \DEVICESYMBOL +(ElseReturnXFlg) \FIXLINELENGTH.PSC (IMAGEDATA TMP) \PFFreeDiskPages (vol) \NEWPAGE.DISPLAY (STREAM) +\BACKCOLOR.DISPLAY (DISPLAYSTREAM) SEDIT::DEFAULT-GETDEF-FN (SEDIT::NAME TYPE SEDIT::NEW-DEF SEDIT::OLD-DEF +) COURIER.EXECUTE.EXPEDITED.CALL (PROGRAM PROCEDURE ARGLIST NSOC ADDRESS SOCKET# PGMDEF PROCDEF +ARGTYPES NOERRORFLG) \BLTSHADE.DISPLAY (STREAM OPERATION) PRINTCODE (FN SI::$PROG1-FIRST-EXPRESSION$ +I4 OUTF I6 CODEBASE OFFSET IVARS PVARS FVARS NNILS NVALS) \NSFILING.DESERIALIZE1 (SERIALSESSION +DIRHANDLE NEWATTRS BULKSTREAM SERIALSTREAM) \DSPLINEFEED.PSC (STREAM) SETFONTCLASSCOMPONENT (FONT +NEWFONT) MAKEROOMFORPME (VP) SETUPHASHARRAY (ARRAYNAME SIZE) \TEXTINIT (CONDITION) \BITBLT.DISPLAY ( +DESTINATION DS SOURCETYPE) \PFCreateRootDirectory (vol fileD rootDir) INSPECT/TYPELESS (ITEM WHERE) +PRINTCODENT (START1 STR CODEBASE OFFSET X) \UTF16.BACKCHARFN (STREAM BYTECOUNTVAL) DELETETO1 (TAIL) +POLYSHADE.DISPLAY (POINTS STREAM TEXTURE OPERATION) LISPXPRINTDEF0 (FILE EXPR LEFT DEF TAIL) TYPEP ( +TYPE CL::SYMBOL-TYPE CL::OBJECT) MSPRGCALL (CONTEXT FN PRNT) NTH.COLUMN.OF (LINE N) FONTUNPARSE (FONT) + CODEWRAPPER.PRETTYPRINT (HERE) FONTCLASSUNPARSE (FONTCLASS X) \DSPRESET.DISPLAY (WINDOW DD) +SEQUENTIAL.PRETTYPRINT (LEFT) INSPECTCODE (FN WHERE LVFLG RADIX PC CODEPRINTER WINDOW) FONTPROP (PROP) + SEDIT::CHECK-SELECTION (SEDIT::SELECTION) SEDIT::PARENTHESIZE-CURRENT-SELECTION (SEDIT::CONTEXT +SEDIT::SELECTION SEDIT::END) \CH.LOCATE.SERVERS (ORGANIZATION CHSERVER NOERRORFLG SERVERGROUP) +FONTCLASSCOMPONENT (FONTCLASS DEVICE NOERRORFLG) \SCALEDBITBLT.DISPLAY (SOURCEBITMAP DESTINATION +SOURCELEFT SOURCEBOTTOM SOURCETYPE OPERATION TEXTURE CLIPPINGREGION) \FILLCIRCLE.DISPLAY ( +DISPLAYSTREAM \BRUSHBBT CENTERX CENTERY) COMPILER::CLOSURE-ANNOTATE-THROW (COMPILER::NODE COMPILER::IN-LOOP-P +) \TEDIT.CLEAR.SCREEN.BELOW.LINE (WINDOW TEXTOBJ LINE) MAKECREATE1 (TYPE CREATEINFO SPECIALFIELDS +FIELD.USAGE) PRINT-EVENT-PROMPT (TERM EVENT) EDITDATE? (COMMENT INITIALS?) \DRAWLINE.DISPLAY ( +OPERATION DISPLAYSTREAM X1 Y1 X2 Y2 \BRUSHBBT DD) NEW/INSTANCE/OF/GRAPHNODE (GN NEW) FILL.XPER (STRM +TEXT YMAX YMIN) \DSPYPOSITION.DISPLAY (DISPLAYSTREAM) FILL.TEST (STRM TEXT YMAX YMIN) +\DRAWELLIPSE.DISPLAY (CENTERX CENTERY SEMIMINORRADIUS SEMIMAJORRADIUS DISPLAYSTREAM BRUSH \BRUSHBBT +DISPLAYDATA SEMIMAJORRADIUSSQUARED cosOrientation SEMIMINORRADIUSSQUARED sinOrientation X Y) +MSPRGMACRO (FORM MACDEF ME CONTEXT) COMPILER::CLOSURE-ANNOTATE-TAGBODY (COMPILER::NODE COMPILER::SEGMENTS + COMPILER::COULD-BE-A-LOOP COMPILER::*NEED-STORAGE*) \DRAWCIRCLE.DISPLAY (CENTERX CENTERY BRUSH +DISPLAYSTREAM \BRUSHBBT XA0622 XA0623) PREPLOOP (I) \DSPLINEFEED.DISPLAY (DISPLAYSTREAM) +SEDIT::CREATE-STRING-ITEM (STRING SEDIT::FONT) BROWSE/LAYOUT/HORIZ/COMPACTLY (ROOTS) PROG1.PRETTYPRINT + (LEFT) CH.RETRIEVE.PROPERTY.ACL (PROPERTY WHICH.LIST AUTH) \AVGCHARWIDTH (FONT) CH.PROPERTY (PROP) +SETFONTDESCRIPTOR (SIZE) PRINT-HISTORY (HISTORY EVENTS X NOVALUES) SUPERPRINT0 (FN FILE TAIL LEFT) +\LOOKUPFONT (ROTATION FACE SIZE FAMILY DEVICE X) PROGV.PRETTYPRINT (HERE) COMPILER::META-SUBST-IF ( +COMPILER::NODE A0687 A0686) \DRAWLINE.PSC (STREAM X2 X1 Y2 Y1 OPERATION COLOR DASHING D) \FONTSYMBOL ( +X) \DSPFONT.DISPLAY (DISPLAYSTREAM FONTDESC CHARCODE) DUMPINITPAGES (CODENEXTPAGE CODEFIRSTPAGE VPAGE) + DO.PRETTYPRINT (EXPR HEAD LEFT START) MSPRGE (Z SUPEXPR EVALCONTEXT ME) NTH.RELATIVE.COLUMN.OF (LINE +END) XCL::VARIABLE-LEXICALLY-BOUNDP (XCL::VAR) PRINTPROG (FILE FORMLEFT BRFLG LABELL) +COMPILER::META-SUBST-CALL (COMPILER::NODE) \FONTFACE (DEV OLDFACE) \DSPLEFTMARGIN.DISPLAY ( +DISPLAYSTREAM) PRINTPROGVARS (TAIL BRFLG FILE) CREATEFIELDS (FIELDS) \FONT.SYMBOLMEMB (LIST USERINPUT) + COURIER.EXPEDITED.CALL (ARGS PROGRAM PROCEDURE ADDRESS SOCKET#) \DSPRIGHTMARGIN.DISPLAY ( +DISPLAYSTREAM) SUBPRINT (FILE TAIL0 BRFLG CLW0) FIND-LEXICAL-ENVIRONMENT (STACKPOS) LISPXPRINTDEF ( +EXPR FILE LEFT DEF TAIL) \PFCurrentVol (index) \MAP-CODE-POINTERS (CODEBLOCK TYPENO MAPFN CODEBASE +OFFSET) UTF16BE.PEEKCCODEFN (STREAM) \FONT.SYMBOLASSOC (LIST USERINPUT NC) LISP-TO-UNIX-TERMTYPE ( +TERMTYPE) \MAP-CODE-LITERALS (CODEBLOCK TYPENO MAPFN X CODEBASE OFFSET DEF LC) \DRAWCURVE.PSC (STREAM +BRUSH IMAGEDATA DASHING D KNOTS CLOSED) \FONT.COMPARESYMBOL (USERINPUT KEY INPUTNC A0493) +XCL::VARIABLE-SPECIAL-P (XCL::VAR) PFI.HANDLE.EXPR (EXPR) DSFIT1 (LST N FILE N1) \IDLE.TIME ( +START.TIME ONEDAY) SEDIT::DELETE-NODES (SEDIT::NODE SEDIT::CONTEXT SEDIT::END SEDIT::SET-POINT? STRING +) \PFPutRootDirectory (vol fileD rootDir) \DRAWCURVE.DISPLAY (\BRUSHBBT DASHING BRUSH KNOTS +DISPLAYSTREAM DASHLST BBT CLOSED) INSPECT/DATATYPE (DATUM WHERE) PRINTSQ (FILE KEYL HERE BRFLG) +CH.IS.IN.DOMAIN.ACL (WHICH PROPERTY NAME AUTH) INSPECT/HUNK (GCTYPE DATUM WHERE SIZE) +COMPILER::CLOSURE-ANNOTATE-SETQ (COMPILER::NODE COMPILER::IN-LOOP-P) FIND-HISTORY-EVENTS (HISTORY SPEC + ORIGINAL-EVENT-SPEC) BACKARROWP (X) UTF16BE.INCCODEFN (STREAM BYTECOUNTVAL) \4DISPLAYINIT (NAME) +RPARS (NP E) DBG::COLLECT-ACTIVE-ESCAPES (DBG::ESCAPE-1 DBG::ESCAPE-2) XCL::VARIABLE-LEXICAL-P (XCL::VAR +) COMPILER::META-SUBST-BLOCK (COMPILER::NODE A0683 A0682) /PUT-1 (ATM PROP) FIND.LINE.BREAK (END) +FONTHEIGHT (FONTSPEC) \PFGetRootDirectory (vol fileD rootDir) DSFIT2 (X FILE) COMPILER::META-SUBST-CATCH + (COMPILER::NODE A0685 A0684) FONTDESCENT (FONTSPEC) HISTORY-NTH (ID) XCL::GET-IMPLICIT-KEY-HASH ( +XCL::IK-HASH-TABLE) SEGMENT.BIT.LENGTH (END) \DSPBACKCOLOR.DISPLAY (STREAM) SUBPRINT1 (LST END) +\DSPCOLOR.DISPLAY (STREAM) LLBREAK (FN WHEN) MAKECREATE0 (RECORD.TRAN NEEDACELL) BROWSE/LAYOUT/HORIZ ( +ROOTIDS) \IDLE.EXIT? (GROUP) TEDIT.SCAN.LINE (THISLINE TEXTOBJ LINE BASEA0768 LLIST BASEA0769 CHLIST +BASEA0770 BASEA0771 BASEA0772 BASEA0773 SELOPERATION Y WINDOW EXTENDING BASEA0774 WLIST TEXTLEN) /PUTD + (FN DEF FLG TEM) PopUpWindowAndGetList (PROMPTSTRING FONT WIDTH PROMPTW CANDIDATE RESPONSE) +TEDIT.PROMPTFLASH (TEXTSTREAM) COMPILER::CLOSURE-ANNOTATE-PROGV (COMPILER::NODE COMPILER::IN-LOOP-P) +FONTASCENT (FONTSPEC) BROKENDEF (DEF CA WHEN CODEBASE OFFSET NEWVALUE) MISSPELLED? (SPLST REL FLG TAIL +) /PUTPROP (PROP VAL) UTF16BE.OUTCHARFN (STREAM CHARCODE) UNDOLISPX1 (EVENT) COMPILER::CLOSURE-ANNOTATE-RETURN + (COMPILER::NODE COMPILER::IN-LOOP-P) BRHL/MOVE/RIGHT (GN STACK X W NEWX NSTACK) /ADDPROP (PROP) +\DRAWCIRCLE.PSC (STREAM BRUSH IMAGEDATA DASHING D CENTERX CENTERY RADIUS) ADDPME (VP NEWPAGEOK) +PFI.PRINT.TO.TAB (TABSTOP WIDTH STR) FM.TOPGROUPID (WINDOW) SAVEPUT (ATM PROP VAL) RENAME (TYPES OLD +NEW FILES METHOD) COMPILER::META-EVAL-LABELS (A0649 COMPILER:CONTEXT A0648) SEDIT::SET-SELECTION-ME ( +SEDIT::NODE) VOLUMESIZE (volName vol) FM.WHICHITEM (Y) SEDIT::CREATE-PRELINEARIZED-NODE (CL:STRUCTURE +SEDIT::ENVIRONMENT SEDIT::NODETYPE STRING SEDIT::PRIN-2? SEDIT::FONT SEDIT::SUPER-NODE) FONTSET (TEM) +\10MBGETPACKET (TYPE) \8DISPLAYINIT (NAME) XCL:UNBREAK-FUNCTION (XCL::BROKEN-FN XCL::FN XCL::MIDDLE-MAN +) \DRAWELLIPSE.PSC (STREAM BRUSH IMAGEDATA DASHING D CENTERX CENTERY MAJORRADIUS MINORRADIUS +ORIENTATION) PRINTOPCODES (X OP) SIMPLEP (Z) GETCHARBITMAP (FONT FONTDESC) BRHL/LAYOUT (MOMLST X W Y N +) MakeMenuOfImageTypes (MENUTITLE) \UTF8.BACKCHARFN (C) TTYINPROMPTFORWORD (CANDIDATE.STR +GENERATE?LIST.FN URGENCY.OPTION) TOGGLE/SIDESFLG (WIN) XCL::PUT-IMPLICIT-KEY-HASH (XCL::IK-HASH-TABLE +XCL::ITEM XCL::BITS XCL::LIMIT XCL::DELETED-INDICATOR) ALLCALLS (FNDEF) \CORE.RELEASEPAGES (STREAM) +FM.ENDEDIT (WINDOW WAITFLG) SEDIT::CREATE-NODE (SEDIT::NODETYPE CL:STRUCTURE) TOPATTACHEDWINDOWS ( +WINDOW ATTACHEDWINDOW) SEDIT::START-COMMENT (SEDIT::CONTEXT SEDIT::CARET-POINT SEDIT::POINT-TYPE) +PUTCHARBITMAP (NEWCHARBITMAP) FILES.PUTDEF (DEFINITION REASON) \TEDIT.ADJUST.LINES (DY LINETOP TEXTOBJ + WINDOW) \DUMPEXPORTS (COMS TAIL) \NSFILING.COPYFILE (NEWDEVICE DEVICE FROMFILE TOFILE) +GET-NEXT-HISTORY-EVENT (ID PROMPT) WINDOWTITLEFONT (FONT) COMPILER::SET-CONSTANT-VALUE (CL:SYMBOL +COMPILER::VALUE) \FAST4BIT (A N B MAP) SEDIT::TTYEXITFN (SEDIT::OLDPROC) \CORE.DELETEFILE (FILENAME +DEV) \SHOWTEXT (TEXTOBJ) CLEARFILEPKG (FLG) HISTORY-ADD-TO-SPELLING-LISTS (INPUT) \CORE.GETINFOBLOCK ( +NAME FD RECOG) CHAT.STARTUP (LOGOPTION TAIL PROC KEY OSINFO HOSTINFO INTERRUPTS KEYACTIONS INITSTREAM +$$OUTPUT) REDISPLAYW (WINDOW REGION ALWAYSFLG) VOLUMES (vol) FM.EDITITEM (WINDOW) MAPFILES1 (FILESPEC +FILEGROUP FN) XCL::VARIABLE-GLOBALLY-SPECIAL-P (CL:SYMBOL) \CORE.FINDPAGE (PN) RECORDBINDVAL (VAL) +MOVECHARBITMAP (SRCEFONT DESTFONT SRCECODE SRCEDESC DESTDESC DESTCODE) SPP.SENDATTENTION (STREAM CON +CC ATTENTIONBYTE) TEDIT.SELECT.LINE.SCANNER (TEXTOBJ WINDOW LINE.LIST WREG Y REGION THISLINE X +SELOPERATION EXTENDING TEXTLEN) \TEDIT.UNIQUIFY.CHARLOOKS (TEXTOBJ NEWLOOKS) \CORE.GENERATEFILES ( +PATTERN FDEV NAME FILTER VERS) COMP.VALN (L) CH.DELETE.MEMBER.FROM.DOMAIN.ACL (DONTCHECK WHICH.LIST +AUTH) COMPILER::CLOSURE-ANNOTATE-PROGN (COMPILER::NODE COMPILER::IN-LOOP-P) FILL.INCY (TBLE) +DIRECTORY.MATCH (TESTNAME PATTERN) \BITMAPTOSCREEN (BITMAP) TYPE.BUFFER (END PC) FONTCOPY (FONTSPECS J +) DIRECTORY.MATCH.SETUP (BASE) PFI.PRINT.ENVIRONMENT (SPEC KEYWORD VALUE) \FILLCIRCLE.PSC (STREAM +CENTERX CENTERY RADIUS) \CHTOPC (PCTB CH#) TOGGLE/DIRECTEDFLG (WIN) \CORE.FILEINFOFN (GENFILESTATE +ATTRIBUTE) FONTSAVAILABLE (DEVICE SIZE FACE EXTANTDEV) FONTPROFILE.ADDDEVICE (FD) SEDIT::STRINGWIDTH ( +SEDIT::STR SEDIT::FONT SEDIT::READ-TABLE SEDIT::ESCAPE) LISPDIRECTORYP (volumeName) FM.EDITP (WINDOW) +\24DISPLAYINIT (NAME) SEDIT::CREATE-ENVIRONMENTS (SEDIT::COMMANDS) NAMEFIELD (FILE STR) +\TEDIT.PROCIDLEFN (WINDOW) COMPILER::CONSTANT-VALUE (CL:SYMBOL COMPILER::VALUE) SEDIT::UPDATE-TITLE ( +SEDIT::WINDOW SEDIT::CONTEXT) \CORE.GETFILEINFO.FROM.INFOBLOCK (ATTRIBUTE) \LOOKUPFONTSINCORE (FAMILY +SIZE FACE ROTATION DEVICE) \CORE.GETFILEHANDLE (NAME RECOG FD ACCESS) CREATESCREEN (DESTINATION) +BRHL/LAYOUT/DAUGHTERS (DS Y X MOMLST) UTF8.PEEKCCODEFN (STREAM NOERROR) EQUALHASH (AR1 AR2 KEY VAL Y) +\BLTSHADE.PSC (DESTINATIONLEFT DESTINATIONBOTTOM STREAM IMAGEDATA) FONTFILEFORMAT (LEAVEOPEN) +\DISPLAYSTREAMTYPEBPP (DISPLAYSTREAMTYPE) COMP.VAL1 (L) NLISTP (X) \TFBRAVO.LCASER (WORD LST) +\CORE.GETFILEINFO (STREAM ATTRIBUTE DEV) RECEVAL (DATUM NEWVALUE FIELDNAME) VARS.PUTDEF (NAME +DEFINITION) FONTP (X) NUMBERP (X) COMPILER::CLOSURE-ANNOTATE-MV-PROG1 (COMPILER::NODE COMPILER::IN-LOOP-P +) SHAPEW (OLDSIZE MAINONLYFLG) SEDIT::CREATE-GAP-NODE (SEDIT::GAP SEDIT::WIDTH) OR (U) SHRINKBITMAP ( +BITMAP WIDTHFACTOR HEIGHTFACTOR WIDTH HEIGHT HFACTOR BITSPP DESTINATIONBITMAP WFACTOR DESTINATION +SCRATCH) OPENATTACHEDWINDOWS (WINDOW ATTACHEDWINDOW) CL:BLOCK (CL::TAIL) FILEPKGCOMS.PUTDEF ( +DEFINITION I NAME PROP) EXEC-PRIN1 (VALUE) GETTOPVAL (X) EQUALALL (X Y Z) \NSFILING.COPY/RENAME ( +FROMFILE TOFILE DEVICE NEWDEVICE N) \TEDIT.UNIQUIFY.PARALOOKS (TEXTOBJ NEWLOOKS) WINDOWREGION (WINDOW +COM) MOVEATTACHEDWINDOWS (NEWPOS WINDOW ATTACHEDWINDOW DELTA) \PFFindRootDirEntry (type rootDir index) + EDITCHAR (FONT CHARCODE FONTDESC) TEDIT.PUT (STREAM) POSTEDITALISTS (EDITCHANGES OLDTOKENS NEWENTRIES + NEWENTRY) CH.CANONICAL.NAME (NAME PARSED) \CREATEDISPLAYFONT (DEVICE FAMILY SIZE FACE ROTATION +FONTDESC CHARSET) \TFBRAVO.PARAMNAMEP (LIS NAME WORD) \CORE.GETFILENAME (NAME FD CREATEFLG RECOG) +\CREATE.TTY.OUTCHARFN (CHAR) SI::ARGUMENT-ERROR (SI::FRAME SI::NUM-ARGS SI::MIN-ARGS SI::FRAME-NAME) +GETPROPLIST (ATM) \CORE.PACKFILENAME (DEVICE FULLNAME) TEDIT.PUT.PCTB2 (BASEA0767 NO ARR +TEDIT.PUT.FINISHEDFORMS FORM) \BITBLT.PSC (SOURCEBITMAP SOURCELEFT SOURCEBOTTOM STREAM DESTINATIONLEFT + DESTINATIONBOTTOM WIDTH HEIGHT SOURCETYPE OPERATION TEXTURE CLIPPINGREGION CLIPPEDSOURCELEFT +CLIPPEDSOURCEBOTTOM) SETPROPLIST (LST) \CORE.NAMESEGMENT (NAME) \TEDIT.DIFFUSE.PARALOOKS (PPLOOKS) +FW-ADJUST-REGION (OFD) COMPILER::CHECK-GLOBAL-CONSTANT (CL:SYMBOL COMPILER::VALUE-EXPR COMPILER::VALUE +) \CREATE-REAL-CHARSET.DISPLAY (ROTATION FAMILY SIZE FACE DEVICE FONTDESC) SEDIT::BUILD-WINDOW ( +SEDIT::DISPLAY-WINDOW SEDIT::ENVIRONMENT) \CORE.NAMESCAN (NAME) FetchDefaultPrinter (P) +\TEDIT.FIXINSSEL (TEXTOBJ CH#1 DCH) \CREATECHARSET.DISPLAY (FAMILY SIZE CHARSET FACE ROTATION DEVICE +FONTDESC NOSLUG?) \CORE.UNPACKFILENAME (NAME START END) INSERTLINE (ROW) \SFMAKEITALIC (CSINFO ASCENT +DESCENT OLDBITMAP OFFSETS WIDTHS) CHAT.RECONNECT (WINDOW MAINW) FM.SHADE (WINDOW X SHADE) +ALIGNMENTNODE (NODESPEC GRAPH) SEDIT::CREATE-CONSTANT-STRINGS (SEDIT::FONT SEDIT::PREFIX) SEDIT::CFV-CLISP + (SEDIT::ENVIRONMENT SEDIT::PAREN-WIDTH) HCOPYALL1 (X SIZE TYP Y FIELD) TILE (SRC DST) +BLTPATTERN.GENERIC (SRCE DW DX SX SY DEST OPER) \BUILDSLUGCSINFO (ASCENT DESCENT WIDTH) +\IFSERRORSTRING (ERR-FILE-NAME EOL CODE) TEDIT (PROPS) \TEDIT.PUTRESET (PROC&VALUE) \SCALEDBITBLT.PSC +(STREAM IMAGEDATA SCALE1 SOURCEBITMAP BITMAPWIDTH BITMAPHEIGHT SOURCELEFT SOURCEBOTTOM SOURCETYPE +SCALE2 OPERATION) COMPILE1A (DEF FN) \CORE.OPENFILE (ACCESS FDEV RECOG PARAMETERS) +SHRINKATTACHEDWINDOWS (WINDOW ATTACHEDWINDOW) \READDISPLAYFONTFILE (FAMILY SIZE FACE ROTATION DEVICE +CHARSET) \CORE.SETACCESSTIME (ACCESS DT) CLISPATOM1 (X) \SFROTATECSINFO (CSINFO ROTATION) +RAISE/TRANSITION/CHAIN (TC RAISE) EVENTS-INPUT (EVENTS EVENT INPUT) \COREFILE.SETPARAMETERS ( +PARAMETERS) TTDELSECTION (WIDTH) CHAT.PROMPT.FOR.INPUT (PROMPT FONT MINLENGTH) SEDIT::UNDO-ATOM-CHANGE + (SEDIT::CONTEXT SEDIT::OLD-VALUE) LAYOUTSEXPR (RESULT FORMAT FONT MOTHERD PERSONALD FAMILYD) +FM.REDISPLAYMENU (WINDOW) SEDIT::COPY-NODE (SEDIT::NODE SEDIT::CONTEXT) HCOPYALL (X) GETSETQ (OKVARS +NVARS PARENT INDECL) COMPILER::VALUE-FOLDABLE-P (COMPILER::VALUE) \MKATOM (OFFST LEN BASE NEWATOM) +SEDIT::COMPUTE-COMMENT-COLUMN (SEDIT::WINDOW SEDIT::ENVIRONMENT) BRHC/OFFSET (N GN D) +GetNewPrinterFromUser (PROMPTSTRING) \TEDIT.FIXDELSEL (TEXTOBJ CH#LIM DCH CH#1) \CREATE.SYMBOL (LEN PN + BASE OFFSET) SEDIT::ASSIGN-FORMAT-CLISP (SEDIT::NODE SEDIT::SUBNODES SEDIT::CONTEXT SEDIT::SUBNODE +SEDIT::CLISP-TYPE) \CORE.SETFILEPTR (INDX NEWPAGE NEWOFF) BKSYSBUF.GENERAL (TYPE) PROPS.WHENCHANGED ( +NAME NEWFLG) \PARSE.NUMBER (BN LEN END BASE) SEDIT::REDO (SEDIT::PROMPTWINDOW) SHOWGRAPH ( +TOPJUSTIFYFLG CENTERFLG COPYBUTTONEVENTFN LEFTBUTTONFN MIDDLEBUTTONFN) COMPILER::CLOSURE-ANNOTATE-MV-CALL + (COMPILER::NODE COMPILER::IN-LOOP-P) \ORIGREADTABLE (TBL) \EXPECTED.FILE.TYPE (FILE HOST) +\CORE.SETEOFPTR (NBYTES NEWBYTES NEWEP NEWEO) \SEARCHFONTFILES (EXTLST DIRLST SIZE FILEPATTERN) +EXPANDBM (SRCEBM DESTX DESTY XSCALE XSPACE YSCALE YSPACE DESTBM) \CREATECHARSET.PSC (WIDTHS) +\CORE.SETFILEINFO (STREAM DEV ATTRIBUTE) PURGEDSKDIRECTORY (volName vol diskDevice F) FM.REDISPLAYITEM + (WINDOW) \SEARCHDISPLAYFONTFILES (FAMILY SIZE FACE ROTATION DEVICE) SEDIT::CONTAINS? (SEDIT::SELECTION-1 + SEDIT::SELECTION-2) \COPYDATATYPE (X NTYP DTD NEW P) SEDIT::SKIP-TO-GAP (SEDIT::CONTEXT SEDIT::SELECTION + SEDIT::POINT SEDIT::PROMPTWINDOW) \INITATOMPAGE (PN OFFSET) DBG::PRINT-BACKTRACE (DBG::FROM DBG::TO +DBG::X DBG::OUTPUT) \CORE.GETNEXTBUFFER (WHATFOR) CH.ADD.MEMBER.TO.DOMAIN.ACL (DONTCHECK WHICH.LIST +AUTH) SIMPLETEXTEDIT (WINDOW TTSCRATCHFILE) \MAKEMDSENTRY (VP V) DO-APPLY-EVENT (TODO) SPELLFILE1 (ARR + FIELDS) \ALLOCBLOCK (ARLEN SI::$PROG1-FIRST-EXPRESSION$) COMPILER::COLLECT-NONLOCAL-VAR-EFFECTS ( +COMPILER::VARS) \NSFILING.NEXTFILE (GENERATOR SESSION) \NEWPAGE.PSC (STREAM) IDLE.SHOW.OPTIONS (TAIL) +BYTECOMPILE2 (FN DEF) COREDEVICE (NAME NODIRFLG) INSERT.TEXT (END ENDOFLINE START) +\FONTINFOFROMFILENAME (FONTFILE FILENAMELIST) \FONTFILENAME.OLD (FAMILY SIZE CHARSET EXTENSION) +SEDIT::STRINGIFY-ATOM (SEDIT::NODE) \CREATECOREDEVICE (NAME OLDSTREAM) \PFGetVol (volNum) +FM.RESETGROUPS (WINDOW GROUPLIST) \FONTFILENAME (SIZE FACESPEC CSETNAME FAMILY SIZEPATT EXTENSION) +SEDIT::COMPUTE-SELECTION-POSITION-DEFAULT (SEDIT::START) SPELLFILEDIR (DIR) RECDEC? (X) +COMPILER::RESOLVE-VARIABLE-REFERENCE (COMPILER::OBJ) MAPATOMS (FN DTD FIRSTFREE SIZE LASTFREE +LASTFREE2) DBG::%%RELEASE-STACK-DATUM (DBG::W DBG::ST) EXTEND/TRANSITION/CHAIN (LTC RTC) NewPrinter ( +PRINTER PRINTER-NAME ENTRY) COMPILER::CLOSURE-ANNOTATE-LAMBDA (COMPILER::NODE) MOVETO.IP (IPSTREAM X Y +) SPELLFILE.SPELL (HOST DIRECTORY NAME ROOTNAME RELATIVEDIRECTORY SUBDIRECTORY) BLTPATTERN (DEST DX DY + DW DH) SEDIT::TRANSLATE-CHARS (SEDIT::CHARS SEDIT::ESC SEDIT::MULT-ESC SEDIT::POINT-TYPE) +GRAPHOBJ.FINDGRAPH (WINDOW DS REG) \DSPSCALE.PSC (STREAM SCALE OSCALE) %%ARRAY-BASE (ARRAY) BITMAPP (X +) APPENDINTEGER.IP (N STREAMA0730 NUMA0729 STREAM LEN) COMPILER::PASSABLE (COMPILER::NODE-1 COMPILER::NODE-2 +) MAXATTACHEDWINDOWEXTENT (MAINW) COMPILER::SIDE-EFFECTS (COMPILER::NAME) %%ARRAY-OFFSET (ARRAY) +BLTSHADE (DESTINATION TEXTURE DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT OPERATION CLIPPINGREGION +STREAM) %%ARRAY-TYPE-NUMBER (ARRAY) UNDOSET (NAME VALUE) \ITEMW.FLIPCOPY (ITEM DS REG) +DO-HISTORY-SEARCH (SPEC) \GENERIC-UNREGISTER-STREAM (STREAM) COMPILER::RESOLVE-VARIABLE-BINDING ( +CL:SYMBOL COMPILER:ENV) FINDFILE (FILE NSFLG) DBG::MAKE-FRAME-INSPECT-WINDOW (DBG::TTYWINDOW DBG::W) +\ADD-OPEN-STREAM (STREAM DEVICE) \COERCETODS (X) \NSFILING.FILEINFOFN (GENFILESTATE ATTRIBUTE) +SEDIT::UNDO-EXTRACT (SEDIT::NODE SEDIT::SUBNODES SEDIT::CONTEXT) \PAGEDEOFP (STREAM CURPAGE) +MINATTACHEDWINDOWEXTENT (MAINW) SEDIT::SELECTED-FN-NAME (SEDIT::CONTEXT SEDIT::POINT) \PAGEDGETEOFPTR +(STREAM) \SFLHASHLOOKUP (HASHTABLE PAGE# MASK) \PAGEDGETFILEPTR (STREAM) SEDIT::ASSIGN-FORMAT-DOTLIST +(SEDIT::NODE SEDIT::SUBNODE SEDIT::CONTEXT) SEDIT::GETKEY (SEDIT::CONTEXT) REMOVETONODES (TONODES TOND +) OPT.CFRPTQ (L ST END) PUTD (FN) \NODIRCORE.OPENFILE (ACCESS FDEV INFOBLK RECOG PARAMETERS) +DECLSUBFIELD (SUBDECL DEC) \FINDFONTFILE (EXTLST FAMILY SIZE FACE CHARSET DIRLST) \PUTD (FN DEF) +FIXDATUM (FORM DECLST N Y) HPRINSP (X) PRINTERS.WHENSELECTEDFN (ITEM) COPYGRAPH (GRAPH) \RENAMEDFN ( +DEF CODEBASE WORDSIZE NEWCA FN) LINETO.IP (IPSTREAM X Y) \NODIRCOREFDEV (NAME) MAXIMUMCOLOR ( +BITSPERPIXEL) GETD (A DEF) COMPILER::CLOSURE-ANNOTATE-IF (COMPILER::NODE COMPILER::IN-LOOP-P) +SI::GET-CACHE-CLOSURE (XCL::CODE-BLOCK XCL::CLOSURE XCL::NEW-CLOSURE) DBG::STACK-FRAME-PROPERTY ( +DBG::PROP DBG::DATUM) SCALEBM (DESTBM SRCEBM XSCALE YSCALE SRCEX SRCEY DESTX DESTY) SCROLLW (WINDOW DX + DY CONTINUOUSFLG) GRAPHEROBJ (GRAPH HALIGN VALIGN OBJ REG) \DSPSCALE2.PSC (STREAM IMAGEDATA Y-SCALE) +PRINT (FILE X STRM RDTBL) SPELLFILE.SPELL1 (SPELLFILE HOST DIRECTORY RELATIVEDIRECTORY SUBDIRECTORY +NAME EXTENSION VERSION ROOTNAME) CREATE-PROCESS-STREAM (SHELL-DEV COMM STR) FIXSPELL1 (WORD DEFAULT) +EOFCLOSEF (FILE STREAM) BLTPATTERN.REPLACEDISPLAY (DW DH DEST DX DY SRCE SX SY) POSTEDITPROPS ( +EDITCHANGES OLDPROPS) \FINDOP (X OPNAME) SEDIT::SPLIT-LITATOM (STRING SEDIT::NODE SEDIT::START SEDIT::END + CL:LENGTH SEDIT::CONTEXT SEDIT::POINT) SEDIT::LINEARIZE-CLISP (SEDIT::NODE SEDIT::CONTEXT +SEDIT::PAREN-WIDTH SEDIT::SPACE-WIDTH SEDIT::ITEM #:G115 SEDIT::MIN-INDENT) FM.RESETSHAPE (WINDOW) +\FONTFILENAME.NEW (SIZE FAMILY EXTENSION) SEDIT::COMPUTE-FORMATS-AND-FORMAT-VALUES (SEDIT::NODE +SEDIT::CONTEXT SEDIT::SUBNODE) UTF8.INCCODEFN (STREAM CODE) OPENP (ACCESS) SEDIT::LINEARIZE-DOTLIST ( +SEDIT::CONTEXT) HVREADERR (M1 M2) EVQ (X) IRNDLIST (PATH I) \DSPCOLOR.PSC (STREAM) GRAPHOBJ.IMAGEBOXFN + (GROBJ STREAM DATUM SCALE) \LFFindDirectoryVol (volumes currentVol) COMP.ARGTYPE (FN) WHENCLOSE ( +NARGS STREAM) \GETFONTDESC (SPEC DEVICE NOERRORFLG) STREAMADDPROP (STREAM PROP VAL) +COPY.WINDOW.TO.BITMAP (WINDOW) TEDITWINDOWP (TEXTOBJ) \FONTINFOFROMFILENAME.OLD (FONTFILE FILENAMELIST + DEVICE) UNDOPRINT (X) COMPILER::CLOSURE-ANNOTATE-LABELS (COMPILER::NODE COMPILER::*NEED-STORAGE*) +DBG::STACK-FRAME-VALUE-COMMAND (DBG::PROP DBG::VALUE DBG::DATUM DBG::WINDOW) COLLECTFNDATA (LST X) +FASL::TABLE-STATS (FASL::TABLE) SEDIT::SET-SELECTION-STRING (TYPE SEDIT::CONTEXT SEDIT::NODE SEDIT::ITEM + SEDIT::OFFSET) \LFCloseDevice (VOL) FM.RESETMENU (WINDOW ITEM NWAY) HPINITRDTBL (RDTBL) OPT.COMPINIT +(X) SEDIT::QUOTE-CURRENT-SELECTION (SEDIT::CONTEXT SEDIT::SELECTION) COMPILER::ENV-DECLARE-A-GLOBAL ( +COMPILER::VAR COMPILER:ENV) \READSTRIKEFONTFILE (STRM N WIDTH) SPELLFILE.MATCHINGDIRS (DIRS) +SHOW.CLEARINGHOUSE (ORG DOM) \READACFONTFILE (WID) PFCOPYBYTES (SRCFIL DSTFIL DSTRM SSTRM) SEDIT::REDISPLAY + (SEDIT::CONTEXT) COMPILER::ENV-DECLARE-A-SPECIAL (COMPILER::VAR COMPILER:ENV) FASL::ADD-OP-TRANSLATION + (FASL::NAME FASL::TABLE FASL::OPCODE) SEDIT::CREATE-NULL-LIST (SEDIT::CONTEXT SEDIT::WIDTH) +MOVETOFILE (NAME TOFILE) PFI.AFTER.NEW.PAGE (STREAM OLDFONT) FASL::FASL-END-OF-BLOCK (STREAM) +\TEDIT.NEXT.LINE.BOTTOM (LINE CURYBOT PREVLINE) PF* (FN) RETURN (MV) SEDIT::SET-SELECTION-LITATOM ( +TYPE SEDIT::CONTEXT SEDIT::NODE SEDIT::ITEM SEDIT::OFFSET) FM.RESETSTATE (WINDOW X INITSTATE) +FASL::DEFINE-SINGLE-OPCODE (FASL::TABLE FASL::OPCODE FASL::NAME FASL::TRANS-NAME) SEDIT::COMPILE-STRUCTURE + (SEDIT::CONTEXT SEDIT::NAME TYPE SEDIT::BODY SEDIT::PW) HVFWDREAD (FILE RDTBL) CHANGETRAN1 ( +RECORDEXPRESSION CHANGEWORD) COMPILER::CLOSURE-ANNOTATE-CATCH (COMPILER::NODE COMPILER::VAR +COMPILER::*NEED-STORAGE* COMPILER::IN-LOOP-P) BRHC/LAYOUT/TERMINAL (X/SW GN) PPROMPT2 (ITEM) ERRORMESS + (CONDITION) FINDFNDEF (FROMFILE FN) TRAPLOOP (LOOP) SEDIT::CFV-DOTLIST (SEDIT::ENVIRONMENT +SEDIT::NUMBER-OF-SUBNODES SEDIT::SPACE-WIDTH SEDIT::SUBNODES SEDIT::WIDTH-OF-DOT) FASL::SETESCAPE ( +FASL::TABLE) \BASEBYTES.BLOCKIO (DIRECTION) NORMLOOP (LIST) \TERPRI.PSC (IMAGEDATA NEWY) +\SFROTATECSINFOOFFSETS (ROTATION CSINFO BITMAPHEIGHT OFFSETS WIDTHS) PRINTFNDEF (TYPE START END) +\FONTRESETCHARWIDTHS (FIRSTCHAR LASTCHAR CSINFO offsets maxcharcode mincharcode widths) \GETLEAFSTRING + (ADDR LEN) ROTATE-BITMAP (SOURCE SOURCE-HEIGHT DESTINATION SOURCE-WORD-WIDTH) SEDIT::SET-POINT-STRING + (TYPE SEDIT::CONTEXT SEDIT::NODE SEDIT::OFFSET SEDIT::ITEM SEDIT::COMPUTE-LOCATION?) +\BASEBYTES.IO.INIT (BASE OFFST N) FM.CHANGESTATE (WINDOW) GRAPHOBJ.DISPLAYFN (GROBJ STREAM SCALE GRAPH +) SEDIT::BUILD-NODE (CL:STRUCTURE SEDIT::NODE-TYPE) HVRPTREAD (FILE RDTBL) DBG::STACK-FRAME-STOREFN ( +DBG::WHICHSPEC DBG::FRAMESPEC DBG::PLIST DBG::NEWVALUE) COMPILER::ENV-DECLARE-GLOBALS (COMPILER:ENV +COMPILER::GLOBALS) SEDIT::MARKASCHANGEDFN (SEDIT::FORM SEDIT::NAME TYPE) MakeMenuOfPrinters (MENUTITLE +) \BASEBYTES.SETFILEPTR (I) ROTATE-BITMAP-LEFT (SOURCE SOURCE-WIDTH DESTINATION DEST-WORD-WIDTH) +\BASEBYTES.READP (STREAM CO FLG) \SFMAKECOLOR (BWCSINFO) \BASEBYTES.PEEKBIN (STREAM CO) +\DSPTOPMARGIN.PSC (STREAM) FASL::STORE-VALUE (FASL::OBJ) FASL::DEFINE-OPCODE-RANGE (FASL::NAME) +UNICODE.UNMAPPED (TRANSLATION-TABLE CODE FORWARD) \BASEBYTES.BOUT (BYTE) STRIKECSINFO (CSINFO) +IMPORTFILE (RETURNFLG) \BASEBYTES.BIN (STREAM) UPDATEWFROMIMAGE (WINDOW IMAGE) CH.FINDSERVER ( +ORGANIZATION DOMAIN) WRITESTRIKEFONTFILE (FONT FILENAME W) OPT.NOTJUMP (X) \BASEBYTES.OPENFN (NAME +ACCESS) LOADFILEMAP (FILE) DBG::STACK-FRAME-FETCHFN (DBG::WHICHSPEC DBG::FRAMESPEC) BRECOMPILE2 (FN X +NX CHAR) COMP.NAMEDLET (ARGS FN X) \BASEBYTES.NAME.FROM.STREAM (STREAM) EVAL (U) FILLCIRCLE.IP (STREAM + RADIUS CENTERX CENTERY TEXTURE OPERATION) FASL::DO-OP (STREAM FASL::OP) UTF8.OUTCHARFN (CHARCODE) +TTMAKECOMPLEXCHAR (PRINTCHARS C REALCHAR) FASL::FETCH-VALUE (FASL::TABLE FASL::INDEX) FASL::COLLECT-LIST + (FASL::NELTS STREAM FASL::RESULT) FASL::CLEAR-TABLE (FASL::TABLE) PRESSFILEP (LEN) SEDIT::MUTATE ( +SEDIT::CONTEXT SEDIT::SELECTION SEDIT::PROMPTWINDOW) MULTIFILEINDEX (FL PRINTOPTIONS) \FBITMAPBIT ( +BASE X Y OPERATION HEIGHTMINUS1 RASTERWIDTH) BRHC/LAYOUT/DAUGHTERS (DS X/SW X MOMLST) RNUMBER (MSG +POSITION MSGFONT DIGITFONT INCLUDEABORTFLG FLOATINGPTFLG POSITIVEONLYFLG ACCEPTTYPEINFLG) +\MAKEBASEBYTESTREAM (BASE OFFST WRITEXTENSIONFN) \MBS.OUTCHARFN (CHAR) CLOCKDIFFERENCE (OLDCLOCK) +\BASEBYTES.TRUNCATEFN (BO I EO) \FBITMAPBIT.UFN (BASE HEIGHTMINUS1 Y RASTERWIDTH X BITMASK WORDBASE +OPERATION) OPENSTRINGSTREAM (STR ACCESS) FASL::CONVERT-FASL-DATE (DATESTRING DATE-POS BEGIN-POS +END-POS SHORT-DATE-STRING) SEDIT::MENU-SELECTEDFN (SEDIT::WINDOW SEDIT::CONTEXT SEDIT::COMMAND SEDIT::ITEM + SEDIT::EXTRA-ARGS) \PFInitFileDescriptors (lastVolNum index) MAKELISPXMACROSCOMS (X Z) COMP.SETARG (A + ARG) TTYINEDIT (PROMPT EXPRS \DSP RDTBL TTSCRATCHFILE) DBG::STACK-FRAME-PROPERTIES (DBG::POS DBG::FNNAME +) SCANFILE1 (DICT) MAKEPROPSCOMS (X PAIR) \DSPBOTTOMMARGIN.PSC (STREAM) PFI.MAKE.LPT.STREAM (IMAGETYPE + DEFAULTOPTIONS) RECORDECL1 (STRUCNAME FIELD Y ARRAYDESC PARENT) COMPILER::ENV-DECLARE-SPECIALS (COMPILER:ENV + COMPILER::SPECIALS) SEDIT::NEW-FUNCTION-BODY (SEDIT::DUMMY-BODY) BRHC/LAYOUT (H X W MOMLST N) +GetImageFile (W) \TEDIT.RESHAPEFN (W OLDREGION NEWWHEIGHT NEWWWIDTH NEWBOTTOM NEWLEFT) FIX/SCALE ( +PARAMVALUE V SCALE) CIRCSHADE.IP (STREAM RADIUS CENTERX CENTERY TEXTURE OPERATION) SEDIT::SET-LIST-FORMAT + (SEDIT::FN) TTINSERTSECTION (WIDTH) \MOVEWORDS (DBASE DOFFSET SBASE SOFFSET NWORDS) +COMPILER::CLOSURE-ANNOTATE-CALL (COMPILER::NODE COMPILER::IN-LOOP-P) \SETPOS.PSC (STREAM) MAKEXYPT (IX + IY) FM.HIGHLIGHTITEM (WINDOW) \COURIER.OUTPUT.ABORTED (STREAM) GRAPHOBJ.COPYFN (GROBJ DATUM NEW) +RECORDECLTAIL (FIELDNAMES TRANSLATION DEC LOCALVARS TYPES SETQPART SETQTAIL) HVREADEND (FILE RDTBL) +LOADFNSCAN (DICT) CREATEDSKDIRECTORY (volName vol) TEDIT.RAW.INCLUDE (STREAM HOLDING.FILE +START-OF-PIECE) \DSPSPACEFACTOR.PSC (STREAM FACTOR OLDFACTOR) \ZEROBYTES (BASE FIRST LAST) \ADDOFD ( +STREAM) EXPANDATTACHEDWINDOWS (WINDOW ATTACHEDWINDOW) SEDIT::MENU-SUBSTITUTE-SELECTEDFN (SEDIT::ITEM +SEDIT::WINDOW SEDIT::FIND-ITEM SEDIT::SUBITEM SEDIT::BUTTONS) TOTOPW (WINDOW NOCALLTOTOPFNFLG) +SEDIT::SET-POINT-LITATOM (TYPE SEDIT::CONTEXT SEDIT::NODE SEDIT::ITEM SEDIT::COMPUTE-LOCATION?) +COMP.ARG (X OP) MAKE-UNICODE-FORMATS (STREAM BYTECOUNTVAR BYTECOUNTVAL NOERROR CHARCODE) \ZEROWORDS ( +ENDBASE DIF) /PUT+1 (ATM PROP TAIL) OPT.CHLEV (N) DBG::BACKTRACE-ITEM-SELECTED (DBG::ITEM DBG::MENU +DBG::TTYWINDOW DBG::FRAMESPECFN DBG::BKPOS DBG::POS) SEDIT::SELECT-SEGMENT-LITATOM (SEDIT::SELECTION +SEDIT::NODE SEDIT::ITEM SEDIT::OFFSET) \DELETEOFD (OFD) FM.GETSTATE (WINDOW NWAY ITEM) FONTNAMELIST ( +FONTDESC) GRAPHOBJ.GETFN (STREAM GRAPH) SEDIT::BUILD-INTERNAL-STRUCTURE (SEDIT::ROOT STRING CL:STRUCTURE +) HVREADCHECKGETFN (FN) RECORDECLBLOCK (DEC FIELDS DLIST) COMPILER::ENV-PROCLAIMED-GLOBAL-P (COMPILER::NAME + COMPILER:ENV) \GC.MODIFY.BIGREFCNT (CASE) SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::NODE) TMPSUBFN (FN X) + \SAFE.FIRST (LIST.OR.ATOM) WOVERLAPP (W1 W2) FILLNGON.IP (IPSTREAM TEXTURE OPERATION CENTERX CENTERY +RADIUS) DOATTACHEDWINDOWCOM2 (ATTACHEDW) PRINTERSTATUS (PRINTER) BITBLT (SOURCETYPE DESTINATION +OPERATION CLIPPINGREGION SOURCE DS) COMPILER::ENV-PROCLAIM-GLOBAL (COMPILER::NAME COMPILER:ENV) +COMPILER::CLOSURE-ANNOTATE-BLOCK (COMPILER::NODE COMPILER::VAR COMPILER::*NEED-STORAGE*) \BACKFORMAT ( +TEXTOBJ WHEIGHT) \BLTSHADE.BITMAP (DESTINATIONBITMAP OPERATION) \BITBLT.BITMAP (DESTBITMAP +SOURCEBITMAP DESTINATIONLEFT DESTINATIONBOTTOM SOURCELEFT SOURCEBOTTOM CLIPPEDSOURCELEFT +CLIPPEDSOURCEBOTTOM OPERATION) OPT.JUMPCHECK (C) \SEARCHOPENFILES (NAME) \LEAF.MAYBE.FLUSH.CACHE ( +SEQUIN) COMPILER::TEST-ANALYSIS (COMPILER::FN COMPILER::TREE) CHAT.TYPEOUT (DPYNAME WINDOW INSTREAM +OUTSTREAM HANDLECHARFN TYPEIN.PROCESS) SEDIT::SCAN-STRING (STRING SEDIT::READ-TABLE CL:LENGTH SEDIT::FONT + SEDIT::ESC-CHAR SEDIT::NODE) INFILE (FILE) \LFCloseFile (STREAM) SEDIT::ATOM-CHANGE-RELINEARIZE ( +SEDIT::CONTEXT CL:STRUCTURE) OPENFILE (FILE ACCESS RECOG PARAMETERS OPTIONAL) IMPORTEVAL (FORM Z) +IOFILE (FILE) \GC.BIGREFCNT.MISSING (PTR ENTRY) /LISPXPUT (PROP L) LOADFNS-FINDFILE (FN) +COMPILER::SUBSTITUTABLE-P (COMPILER::VAR COMPILER::ARG) \GC.LOOKUP.BIGREFCNT (ENTRY) GRAPHOBJ.PUTFN ( +GROBJ STREAM DATUM OBJORIGIN) IDLE.SHOW.OPTION (OPTION VALUE) LOADBLOCK (FN LDFLG) ARG (VAR M) OUTFILE + (FILE) GRAPHOBJ.BUTTONEVENTINFN (GROBJ WINDOW DATUM) OUTFILEP (FILE) RECORDECL0 (DEC PARENT +TRANSLATION) DBG::BACKTRACE-MENU-BUTTONEVENTFN (DBG::WINDOW) GETBLOCKDEC (FN) CIRCSHADE.DISPLAY ( +CENTERX CENTERY RADIUS STREAM TEXTURE OPERATION) HVBAKREAD (FILE RDTBL X CH RPTCNT) SIMPLE.FINDFILE ( +DIRLST FILE) \REFCNT (PTR) MAKEPRESS (FILE PFILE FONTS HEADING TABS PRINTOPTIONS) SEDIT::MENU-PRINTBASE-SELECTEDFN (SEDIT::ITEM SEDIT::PRINTBASE-VALUE-ITEM SEDIT::BUTTONS SEDIT::WINDOW - $$OUTPUT) \\DISPLAYSTREAMTYPEBPP (DISPLAYSTREAMTYPE) SEDIT::LAST-LINE-LINEAR (SEDIT::CONTEXT) -\\CH.UPDATE.CACHE (OBJECT ADDRESS DOMAINS.SERVED) \\TEDIT.GET.PARALOOKS1 (N WIDTH FILE) -XCL::IMPLICIT-KEY-REHASH (XCL::FROM-TABLE XCL::TO-TABLE XCL::FROM-BASE XCL::FROM-LAST-INDEX) UNSAVEDEF - (NAME X) EOFCLOSEF (FILE STREAM) FASL::DEFINE-OPCODE-RANGE (FASL::NAME) MINIMUMMAINWINDOWSIZE (WINDOW -) \\NSRANDOM.RELEASE.LOCK (SESSION) \\FONTFILENAME.OLD (FAMILY SIZE CHARSET EXTENSION) -|\\LFPurgeDirectory| (|vol|) TEDIT.HCPYFILE (FILE STREAM IMAGETYPE BREAKPAGETITLE) -COMPILER::META-SUBST-MV-CALL (COMPILER::NODE) SPELLFILE.SPELL1 (SPELLFILE HOST DIRECTORY -RELATIVEDIRECTORY SUBDIRECTORY NAME EXTENSION VERSION ROOTNAME) DINFO.UPDATE.FROM.MENU (MENU ITEM) -FASL::TABLE-STATS (FASL::TABLE) \\COURIER.ATTENTIONFN (BYTE DSTYPE) ATTACHEDWINDOWTOTOPFN (WINDOW ROOT -) RECLOOK (LOCALDEC DEC PARENT) COMPSETF (A) RECORDFIELD? (FIELD DECLARATIONS) COMPILER::GENCODE-LABELS - (COMPILER::INNER-CODE) ENCAPSULATEDIMAGEFNS (GETFN IMAGEFNS) \\TEDIT.SET.SEL.LOOKS (OPERATION) -BOTTOMOFGRIDCOORD (GRIDSPEC GRIDY) SMASHPAT1 (PATTERN XV) FASL::SETESCAPE (FASL::TABLE) COMPSETY (A) -\\HCPYMODEDISPLAYINIT (STREAM) TB.COLLECT.ITEMS (BROWSER) FASL::DEFINE-SINGLE-OPCODE (FASL::TABLE -FASL::OPCODE FASL::NAME FASL::TRANS-NAME) \\DSPRESET.PSC (IMAGEDATA) DECLARERECORD (X) -\\TFBRAVO.ASSERT (X Y) \\SPP.GETNEXTBUFFER (WHATFOR STREAM) FB.PROMPTWPRINT (U WINDOW) SPY.PRINT (X) -ERRORMESS (CONDITION) \\READSTRIKEFONTFILE (STRM N WIDTH) FASL::ADD-OP-TRANSLATION (FASL::NAME FASL::TABLE - FASL::OPCODE) COMPILER::META-SUBST-LITERAL (COMPILER::NODE) SEDIT::GENERATE-LINEAR-FORM (SEDIT::CURRENT-X - SEDIT::RIGHT-MARGIN) PUTD (FN) \\READACFONTFILE (WID) COMP.STCROP (X) \\TEDIT.SUBST.FN1 (TEXTOBJ -TARGETLIST START# END#) GETD (A DEF) \\FONTINFOFROMFILENAME.OLD (FONTFILE FILENAMELIST DEVICE) -STREAMADDPROP (STREAM PROP VAL) SI::GET-CACHE-CLOSURE (XCL::CODE-BLOCK XCL::CLOSURE XCL::NEW-CLOSURE) -SEDIT::MENU-INIT-STATE (SEDIT::PRINT-BASE SEDIT::MENU CL:PACKAGE-NAME) \\INSPECT.FETCH.CHAR (INSTANCE -FIELD) WHENCLOSE (NARGS STREAM) COMP.NOT (A) \\FONTRESETCHARWIDTHS (FIRSTCHAR LASTCHAR CSINFO -|offsets| |maxcharcode| |mincharcode| |widths|) \\DRAWPOLYGON.PSC (POINTS STREAM BRUSH IMAGEDATA -DASHING D P LASTPOINT) EVQ (X) MAXIMUMCOLOR (BITSPERPIXEL) SETUP-WHOLINE-TIMER (OLD-TIMER) -FB.SELECTEDFILES (BROWSER) OPENP (ACCESS) LOOKUPHASHFILE (KEY1 KEY X Y CALLTYPE INDEX VALUE) -SEDIT::MENU-PACKAGE-SELECTEDFN (SEDIT::ITEM SEDIT::PACKAGE-NAME-ITEM CL:PACKAGE-NAME SEDIT::BUTTONS -SEDIT::WINDOW $$OUTPUT) \\FONTFILENAME.NEW (SIZE FAMILY EXTENSION) DEFAULT.INSPECTW.PROPCOMMANDFN ( -PROPERTY INSPECTW OLDVALUEITEM PWINDOW) MBUTTON.CREATE (MBFONT IMAGEFNS MBTEXT REAL-FONT OBJ MBFN) -SHADEGRIDBOX (GRIDBORDER SHADE DS X GRIDSPEC BORDER Y OPERATION) |\\LFScavVersion| (NAME&VERSION -FILEID) \\TEDIT.PARSE.SEARCHSTRING (TEDIT.WILDCARD.CHARACTERS) \\INSPECT.FETCH.8 (INSTANCE FIELD) -COMPILER::GENCODE-GO (COMPILER::NODE CL:TAGBODY) COURIER.WRITE.NSADDRESS (STREAM ADDR) HISTORYFIND ( -LST INDEX MOD TAIL X0) MAKECREATELST (TEMPLATE USING NEEDACELL) FASL::FETCH-VALUE (FASL::TABLE FASL::INDEX -) \\POSTSCRIPTTAB (POSTSCRIPTDATA TABSPACE) FINDFNDEF (FROMFILE FN) PF* (FN) ROTATE-BITMAP (SOURCE -SOURCE-HEIGHT DESTINATION SOURCE-WORD-WIDTH) \\INSPECT.COMPUTE.TITLE (DATUM WINDOW) FASL::DO-OP ( -STREAM FASL::OP) FASL::FASL-END-OF-BLOCK (STREAM) SEDIT::FIRST-LINE-LINEAR (SEDIT::CONTEXT) -FASL::CLEAR-TABLE (FASL::TABLE) \\SPP.SETFILEPTR (STREAM INDX) PRINTFNDEF (TYPE START END) -\\TEDIT.GET.CHARLOOKS1 (FILE N WIDTH) XCL::IMPLICIT-KEY-MAP-HASH (XCL::IK-HASH-TABLE XCL::BASE -XCL::LAST-INDEX) \\CORE.OPENFILE (ACCESS FDEV RECOG PARAMETERS) PFCOPYBYTES (SRCFIL DSTFIL DSTRM FN) -\\INSPECT.STORE.8 (INSTANCE FIELD NEWVALUE) \\SFLHASHLOOKUP (HASHTABLE PAGE# MASK) PRINT (FILE X STRM -RDTBL) ROTATE-BITMAP-LEFT (SOURCE SOURCE-WIDTH DESTINATION DEST-WORD-WIDTH) MAXIMUMWINDOWSIZE (WINDOW) - \\BASEBYTES.READP (STREAM CO FLG) \\TEDIT.EXPANDEDCHARLOOKS.MENU (STREAM) FASL::COLLECT-LIST (FASL::NELTS - STREAM FASL::RESULT) \\GETFONTDESC (SPEC DEVICE NOERRORFLG) \\RENAMEDFN (DEF CODEBASE WORDSIZE NEWCA -FN) \\BASEBYTES.PEEKBIN (STREAM CO) CLISPFUNCTION? (TYPE Y FN2) %ARRAY-OFFSET (ARRAY) -\\INSPECT.FETCH.32 (INSTANCE FIELD) \\GETSPP (CON TIMER) MIDDX (DX DY X0 Y0) |\\LFDirectoryP| (|vol|) -UNIONREGIONS (REGIONS) LEFTOFGRIDCOORD (GRIDSPEC GRIDX) RECORDFIELDNAMES (RECORDNAME DECL TRAN S X) -\\IRM.CHOOSE.REF (REFS KEYWORD REF TYPE) GRIDXCOORD (XPOS GRIDSPEC GX) MENUWRESHAPEFN (WINDOW) -\\BASEBYTES.BOUT (BYTE) LOADFILEMAP (FILE) MB.PUTFN (OBJ FILE TEXT MBFN FONT STREAM W ATTR) -WRITESTRIKEFONTFILE (FONT FILENAME W) \\SFMAKECOLOR (BWCSINFO) \\BASEBYTES.OPENFN (NAME ACCESS) -MAKEMAINWINDOW (MAINWINDOW) \\TEXTMENU.START (TITLE HEIGHT MENU) \\FILLPOLYGON.PSC (KNOTS STREAM K -LASTPOINT) INFILECOMS? (ONFILETYPE LITERALS) \\BASEBYTES.SETFILEPTR (I) FASL::CONVERT-FASL-DATE ( -DATESTRING DATE-POS BEGIN-POS END-POS SHORT-DATE-STRING) FB.TABLEBROWSER (BROWSER) \\INSPECT.STORE.PTR - (INSTANCE FIELD NEWVALUE) \\TEDIT.FIND.WC (TEXTOBJ TARGETLIST START# END#) COMPILER::GENCODE-BLOCK ( -COMPILER::NODE COMPILER::END-TAG COMPILER::STK-NUM COMPILER:CONTEXT) COURIER.READ.NSADDRESS (STREAM -ADDR) \\BASEBYTES.IO.INIT (BASE OFFST N) SEDIT::MENU-FIND-SELECTEDFN (SEDIT::ITEM SEDIT::WINDOW -SEDIT::FIND-ITEM SEDIT::BUTTONS) \\LEAF.DELETEFILE (DEV FILENAME OPUP) BLOCKRECORD (NAME&FIELDS) -\\FBITMAPBIT (BASE X Y OPERATION HEIGHTMINUS1 RASTERWIDTH) INSPECTW.REDISPLAY (WINDOW PROPERTIES DATUM - PROPCOMMANDFN FETCHFN VALUECOMMANDFN NOWEXTENT SELITEM) \\SFROTATECSINFOOFFSETS (ROTATION CSINFO -BITMAPHEIGHT OFFSETS WIDTHS) COMPILER::META-SUBST-LAMBDA (COMPILER::NODE) \\BASEBYTES.BLOCKIO ( -DIRECTION) \\PUTD (FN DEF) COMP.CARCDR (A X) UNDOLISPX (X) COMPILER::COMPILE-FILE-DEFINEQ (COMPILER::DEFN - COMPILER::FORM) SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (SEDIT::CONTEXT SEDIT::WINDOW SEDIT::LEFT -SEDIT::NODE) FILES?PRINTLST (LST STR) \\TEDIT.EXPANDEDPARA.MENU (STREAM) \\MBS.OUTCHARFN (CHAR) -SEDIT::RELINEARIZE-PRELINEARIZED-NODE (SEDIT::NODE) MAKENEWCOM (FILE) CLISPRPLNODE (A D) -\\MAKEBASEBYTESTREAM (BASE OFFST WRITEXTENSIONFN) \\TFBRAVO.PARSE.PROFILE.PARA (IN PARAEND TEXTOBJ) -SET-READTABLE-INTERACTIVELY (NAME VALUE X Y READTABLE) XCL::MAKE-IMPLICIT-KEY-HASH-TABLE (XCL::NUM-SLOTS - XCL::LOGICAL-SLOTS XCL::KEY-ACCESSOR) COPYIMAGEOBJ (FROM) MB.GETFN (OBJ FILE TEXT MBFN FONT STREAM W -ATTR) \\CANONICALIZE.PUP.HOSTNAME (NAME) TEDIT.RAW.INCLUDE (STREAM HOLDING.FILE START-OF-PIECE) -|\\LFMakeVolumeDirectory| (|vol| |directoryID|) DECODE.WINDOW.ARG (WHERESPEC WIDTH HEIGHT BORDER TITLE - NOOPENFLG) \\NODIRCOREFDEV (NAME) COMPILER::META-SUBST-LABELS (COMPILER::NODE A1682 A1681) -\\BASEBYTES.NAME.FROM.STREAM (STREAM) CHAT.BIN (OUTSTREAM) COMPILER::GENCODE-CATCH (COMPILER::NODE -COMPILER:CONTEXT) PRINTERDEVICE (NAME ACCESS RECOG PARAMETERS FDEV OLDSTREAM STRM SDEV PRINTOPTIONS) -\\BASEBYTES.BIN (STREAM) PRINTHISTORY (HISTORY FILE EVENT) ERASEPROPS (RESPONSE X) SEDIT::MENU-CLOSEFN - (SEDIT::W) MENUWMINSIZEFN (MENUW MENU TITLE?) \\LEAF.GETFILE (DEVICE FILENAME DEVINFO ACCESS OPTION -RECOG) \\CH.CHECK.CLEARINGHOUSE (ADDRESSES) RECORD.FIELD.VALUE0 (FIELDNAME) |\\VAMEnoughSpace| ( -|filePtr| RUNLENGTH |vol|) %ARRAY-TYPE-NUMBER (ARRAY) SEDIT::JOIN (SEDIT::CONTEXT SEDIT::SELECTION -SEDIT::PROMPTWINDOW SEDIT::POINT) \\SPP.EVENTFN (EVENT DEVICE STREAM) COMPILER::META-SUBST-IF (COMPILER::NODE - A1680 A1679) UNDOLISPX2 (PROP X DWIMCHANGE) EVAL (U) CHAT.SCREENPARAMS (WINDOW A HEIGHT WIDTH TITLE -CHAT.STATE) FILDIR (FILEGROUP) MSFINDP (SUB) IRM.CREF.BUTTONEVENTFN (IMAGEOBJ BOUNDBOX HEIGHT WIDTH -WINDOW WSTREAM REGION ITEM) TOTOPW (WINDOW NOCALLTOTOPFNFLG) HPRINT.IMAGEOBJ (IMAGEOBJ STREAM) -POSTSCRIPT.OUTSTR (STREAM STRING) MB.COPYFN (OBJ) BITBLT (SOURCETYPE DESTINATION OPERATION -CLIPPINGREGION SOURCE DS) GRIDYCOORD (YPOS GRIDSPEC GY) FB.UPDATEBROWSERITEMS (WANTED FONT TBROWSER) -RETURN (MV) \\FBITMAPBIT.UFN (BASE HEIGHTMINUS1 Y RASTERWIDTH X BITMASK WORDBASE OPERATION) -\\CHARWIDTH.PSC (CHARCODE STREAM FONTDESCA1589) FASL::STORE-VALUE (FASL::OBJ) \\STRINGWIDTH.PSC ( -STREAM STR IMAGEDATA RDTBL) \\BASEBYTES.TRUNCATEFN (BO I EO) COMP.DECLARE1 (VAL OTHERVAR SYSOTHERVAR) -\\ADDOFD (STREAM) \\BITBLT.BITMAP (DESTBITMAP SOURCEBITMAP DESTINATIONLEFT DESTINATIONBOTTOM -SOURCELEFT SOURCEBOTTOM CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM OPERATION) \\LEAF.STREAM.IN.QUEUE ( -SEQUIN) \\DELETEOFD (OFD) WOVERLAPP (W1 W2) \\CREATE.SPP.DEVICE (NAME CLOSEFN) -COMPILER::COMPILE-FILE-SETF-SYMBOL-FUNCTION (COMPILER::FORM COMPILER::NAME-FORM COMPILER::FUNCTION-FORM -) \\INSPECT.FETCH.PTR (INSTANCE FIELD) COPY1 (X) GENERATE (HANDLE VAL) \\SEARCHOPENFILES (NAME) -MOVEATTACHEDWINDOWTOPLACE (MAINW ATWIN) OPENSTRINGSTREAM (STR STRING ACCESS) ADDTOCOM1 (NAME) -SEDIT::CREATE-QUOTED-GAP (SEDIT::GAP SEDIT::QUOTE-TYPE SEDIT::CONTEXT) FILES?1 (TYPE) -\\TEDIT.PUT.PARALOOKS.LIST2 (FILE STREAM W LOOKSLIST LOOKSHASH) GRID (GRIDSPEC GRIDSHADE HEIGHT -SQHEIGHT DS X0 Y0 WIDTH SQWIDTH) STRIKECSINFO (CSINFO) SCANFILE1 (DICT) NIL -SETFREE SCANFILE1 (NOFIXFNSLST) DEFAULT.BACKGROUND.COPYFN (|BackgroundCopyMenu|) -COMPILER::*TAIL-RECURSION-POLICY* (COMPILER::*TAIL-RECURSION-POLICY*) MSINTERPRETSET (NEEDUPDATE) -RPTPRINT (RPTCNT RPTLAST) \\ATBLSET (\\READTABLEHASH \\ORIGREADTABLE \#CURRENTRDTBL# FILERDTBL -*OLD-INTERLISP-READ-ENVIRONMENT* *READTABLE* \\ORIGTERMTABLE \\PRIMTERMTABLE \\PRIMTERMSA) -%INITIALIZE-CLSTREAM-TYPES (%BROADCAST-STREAM-DEVICE %CONCATENATED-STREAM-DEVICE -%TWO-WAY-STREAM-DEVICE %ECHO-STREAM-DEVICE %SYNONYM-STREAM-DEVICE \\FILL-POINTER-STREAM-DEVICE) -MSNEXTWORD (S NEXTWORD RESETS LASTADVERB) CL:ERROR (*LAST-CONDITION*) TEDIT.NEW.FONT ( -TEDIT.KNOWN.FONTS) RCOMP3 (NLAML NLAMA LAMS) COMPILER::*NULL-CONTEXT* (COMPILER::*NULL-CONTEXT*) -CL:READ-PRESERVING-WHITESPACE (\\\\PNAMESTRING.GLOBALRESOURCE) RSTRING (\\\\PNAMESTRING.GLOBALRESOURCE -) FIXFIELDORDER (FIELDS.IN.CREATE) EDITQF (L LASTAIL) COMP.SELECTQ (LBCNT) \\TFBRAVO.HANDLE.HEADING ( -HEADINGPARA NEXTPARAPTR) |\\VFMAtLoad| (|\\VFMmaxID| |\\VFMmaxKey| |\\VFMnullKey| |\\VFMvolumeHandle| -|\\VFMinterval| |\\VFMold| |\\VFMlow| |\\VFMhigh| |\\VFMoldPtr| |\\VFMlowPtr| |\\VFMhighPtr| -|\\VFMmonitor|) FORMAT-EAT-WHITESPACE (*FORMAT-INDEX*) *WHO-LINE-BORDER* (*WHO-LINE-BORDER*) DOERROR ( -ERRORS) \\VECSKIP (|VecCurX| |VecCurY|) FIXAPPLY (TYPE-IN? FAULTFN) \\UPDATECHAIN (\\RPTLAST -\\DIRTYPAGECOUNTER \\PAGEFAULTCOUNTER) FASL::*TABLE-HITS* (FASL::*TABLE-HITS*) UPDATE/MENU/IMAGE ( -MENUFONT) WINDOW.MOUSE.HANDLER (|\\LastInWindow| |\\LastWindowButtons|) SPY.DUMP.BUFFER (SPY.NEXT) -VIDEORATE (\\VIDEORATE) COMPILER::*LITERALLY-T* (COMPILER::*LITERALLY-T*) \\IDLER (\\IDLE.PASSWORD.SET - \\AFTERLOGINFNS) DWIMERRORRETURN (CLISPERTYPE) WAITFORINPUT (\\\\DISMISSTIMER.GLOBALRESOURCE) -*WHO-LINE-PACKAGE-NAME-CACHE* (*WHO-LINE-PACKAGE-NAME-CACHE*) FASL:*DEFAULT-OPTABLE* ( -FASL:*DEFAULT-OPTABLE*) SHRIEKER (WORKFLAG) CL:READ-DELIMITED-LIST (\\\\PNAMESTRING.GLOBALRESOURCE) -%INITIALIZE-STANDARD-STREAMS (*QUERY-IO* *DEBUG-IO* *TERMINAL-IO* *ERROR-OUTPUT*) CLEARHASHFILES ( -SYSHASHFILELST SYSHASHFILE) PAINTW.READMODE (PAINTMODEMENU) COMP.DECLARE (ALLDECLS) \\DISABLEGC1 ( -\\RECLAIM.COUNTDOWN \\RECLAIMMIN \\PENDINGINTERRUPT \\GCDISABLED) OPENPUPSOCKET (\\PUPSOCKETS) -*WHO-LINE-TIME-ENTRY* (*WHO-LINE-TIME-ENTRY*) COMPSET (LSTFIL LAPFLG STRF SVFLG LSTFIL1 LCFIL) -COMPILER::*EFFECT-CONTEXT* (COMPILER::*EFFECT-CONTEXT*) FIXATOM (TAIL CHARLST FAULTX) DF (*LAST-DF*) -TTYIN.FINISH (\\ENDBUFFER \\CURRENTDISPLAYLINE) \\WAITFORSYSBUFP (\\\\DISMISSTIMER.GLOBALRESOURCE) -OCTALSTRING (\\\\NUMSTR.GLOBALRESOURCE \\\\NUMSTR1.GLOBALRESOURCE) SPY.FIND.TREE (SPY.TREE) -TTWAITFORINPUT (\\PFW.FIRSTTIME \\RMARG) PFI.HANDLE.RPAQQ (*PFI-FNSLST*) TTYINBUFFERSTREAM ( -\\TTYINBUFFERSTREAM) MASTERSCOPEXEC (LISPXVALUE) READPLIST (\\READPLIST.READTABLES) -\\CLEANUP.STACKFULL (\\STACKOVERFLOW) GREET (USERNAME) DOBACKGROUNDCOM (|BackgroundMenu|) TTYIN ( -TTYINBUFFER CTRLUFLG) TTYIN.CLEANUP (TTYINBUFFER) NOTE (POSSLIST##) SEDIT::TRACK-SELECT ( -SEDIT::PENDING-LAST-X SEDIT::PENDING-LAST-Y SEDIT::PENDING-TYPE) SEDIT:*COMPILE-FN* (SEDIT:*COMPILE-FN* -) \\FTP.WHENCLOSED (\\FTPCONNECTIONS) \\INITSPP (\\SPPDEVICE \\SPP.BULKDATA.DEVICE) RECORDINIT ( -RECORDINIT) *WHO-LINE-PACKAGE-ENTRY* (*WHO-LINE-PACKAGE-ENTRY*) \\DRAWELLIPSE.GENERIC (EXTRAXOFFSET -EXTRAYOFFSET VERSOXOFFSET VERSOYOFFSET) UNIX-USERNAME (\\UNIXSTRING.GLOBALRESOURCE) EXEC-READ-LINE ( -CTRLUFLG) SET-READER-ENVIRONMENT (*PACKAGE* *READTABLE* *READ-BASE* *PRINT-BASE*) COMP.LOOKUPVAR ( -FREEVARS) TTYIN1RESTART (\\ARROW \\FIRSTLINE \\CURSOR \\BUFFER \\ENDBUFFER \\DELETING) -PAINTW.READBRUSHSHAPE (PAINTSHAPEMENU) \\GS.INITBUF (\\GS.NUMLEN) \\NSGATELISTENER ( -\\NSROUTER.PROBECOUNT) DASSEM.DSTOREFNDEF (DFNFLG) MOVE.BACK.TO (\\CURSOR) *WHO-LINE-OLD-TIME* ( -*WHO-LINE-OLD-TIME*) TTYIN.READ (\\BUFFER) UNIX-GETENV (\\UNIXSTRING.GLOBALRESOURCE) CL::%ASIN-QPOLY ( -CL::%ASIN-QPOLY) \\INTERPRESSINIT (\\IPIMAGEOPS \\ASCIITONS \\ASCIITOSTAR) PFI.AFTER.NEW.PAGE ( -*PFI-PAGE-COUNT* *PFI-ITEM*) TTYIN.SETUP (\\CHARWIDTH \\FONT \\COMMENTFONT \\TTYIN.LAST.COMMENTFONT -\\TTYIN.LAST.FONT \\CHARHEIGHT \\DESCENT \\TEXTURE \\TTPAGELENGTH \\LMARG \\RMARG \\INITPOS) SAVEDEF ( -SAVEDDEFS) CLOSEPUPSOCKET (\\PUPSOCKETS) \\GETPILOTBBTSCRATCHBM (\\PILOTBBTSCRATCHBM) DISMISS ( -\\\\DISMISSTIMER.GLOBALRESOURCE) FIND-STACK-FRAME (LASTPOS) TTYDISPLAYSTREAM (*STANDARD-OUTPUT* -\\TERM.OFD \\LINEBUF.OFD *STANDARD-INPUT* |TtyDisplayStream|) \\PRESSINIT (\\PRESSIMAGEOPS) -\\LOCATE.NSNET (\\NSROUTER.PROBECOUNT \\NSROUTER.PROBETIMER) CL::%ASIN-PPOLY (CL::%ASIN-PPOLY) DWMFY2 -(SUBPARENT FORMSFLG NOFIXVARSLST0 TAIL) RANDSET (RANDSTATE) SPY.MAKE.TREE (SPY.FONT SPY.NODES -SPY.TOPNODES TITLE SPY.WINDOW) \\GET.IOCB (\\IOCB.INPUT.ALLOC \\IOCB.OUTPUT.ALLOC \\IOCBFREELIST) -BROWSE/LAYOUT/HORIZ/COMPACTLY (NODELST) IDLE (\\IDLING) TTYINREAD (READBUF) UNIX-GETPARM ( -\\UNIXSTRING.GLOBALRESOURCE) \\TRACKWITHBOX (ORGX BOXWIDTH ORGY BOXHEIGHT) BPNT0 (COM) -\\TIMER.INTERRUPTFRAME (\\TIMER.INTERRUPT.PENDING) CURSORHOTSPOT (\\CURSORHOTSPOTX \\CURSORHOTSPOTY) -READ-EXTENDED-TOKEN (\\\\PNAMESTRING.GLOBALRESOURCE) CHAT.CLOSE (CHATWINDOWLST) INFILECOM (VAL) -PAINTW.READBRUSHSIZE (PAINTSIZEMENU) CHARACTER (\\\\PNAMESTRING.GLOBALRESOURCE) ADDTOFILES? (LASTFILE) - COMPILER::CLOSURE-ANNOTATE-TAGBODY (COMPILER::*NEED-STORAGE*) SEDIT::FIRST-ADD-COMMAND-MENU-ENTRY ( -SEDIT::FIRST-ADD-COMMAND-MENU-ENTRY) UNIX-FULLNAME (\\UNIXSTRING.GLOBALRESOURCE) LOADFROM (LASTWORD) -TTRATOM (\\BUFFER) PRINTNUM-TO-STRING (\\\\NUMSTR.GLOBALRESOURCE \\\\NUMSTR1.GLOBALRESOURCE) -PACKAGE-REHASH-THRESHOLD (PACKAGE-REHASH-THRESHOLD) \\GR.DELDEFFN (GLOBAL.RESOURCES) -\\SETLOCALNSNUMBERS (\\MY.NSHOSTNUMBER \\MY.NSNETNUMBER \\MY.NSADDRESS) PRINTFN (LASTFNDEF) -SEDIT::TRACK-EXTEND (SEDIT::PENDING-TYPE) COMPILER::COMPILE-SCAN-LOOSE-FORM (COMPILER::*DEFERRED-FORMS* -) MAKEIBMFORMAT (*XEROXTOIBMMAP* *IBMTOXEROXMAP*) \\CHAIN.UP.RPT (\\RPTLAST) COMPILER::*ARGUMENT-CONTEXT* - (COMPILER::*ARGUMENT-CONTEXT*) GETMOUSESTATE (LASTMOUSEX LASTMOUSEY LASTMOUSEBUTTONS LASTKEYBOARD -LASTSCREEN) FILEPKGTYPE (FILEPKGTYPES) \\GCMAPTABLE (\\RECLAIM.COUNTDOWN) FIX89TYPEIN (FAULTARGS) -FASL:CURRENT-VERSION (FASL:CURRENT-VERSION) \\NAMEDTAB.INIT (\\NAMEDTAB.IMAGEFNS) -\\ADVANCE.STORAGE.STATE (\\STORAGEFULLSTATE \\SYSTEMCACHEVARS) *WHO-LINE-COLOR* (*WHO-LINE-COLOR*) -D-ASSEM:+PVAR-CODE+ (D-ASSEM:+PVAR-CODE+) FASL::RESET-DUMPER-STATS (FASL::*TABLE-ATTEMPTS* -FASL::*TABLE-HITS*) RESTOREBUF (\\LASTAIL \\LASTAILCOL \\LASTAILROW) D-ASSEM:+FVAR-CODE+ (D-ASSEM:+FVAR-CODE+ -) COMP.COND (LBCNT) TTDELETELINE (\\CURSOR \\ENDBUFFER) SEDIT::FIRST-ADD-COMMAND (SEDIT::FIRST-ADD-COMMAND -) NECCSPEC (SFLG SHOULDBESPECVARS) TEDIT.FORMATTEXTBOX (IGNORE) RADIX (*PRINT-BASE*) CL::%ASIN-EPSILON - (CL::%ASIN-EPSILON) FASL::*TABLE-ATTEMPTS* (FASL::*TABLE-ATTEMPTS*) CHNGNM (NOLINKMESS) -\\SHIFT.DOCUMENT (TAB.OBJECT) SEDIT::*IGNORE-CHANGES-ON-COMPLETION* (SEDIT::*IGNORE-CHANGES-ON-COMPLETION* -) *WHO-LINE-TIMER* (*WHO-LINE-TIMER*) BCOMPL2 (DEFS BLKFNS) D-ASSEM:+LAMBDA-NO-SPREAD+ ( -D-ASSEM:+LAMBDA-NO-SPREAD+) \\SELECTREALPAGE (\\VMEM.INHIBIT.WRITE \\RPTLAST) \\TEDIT.COMMAND.LOOP ( -TEDIT.COPY.PENDING TEDIT.COPYLOOKS.PENDING TEDIT.MOVE.PENDING TEDIT.DEL.PENDING) HPRINT1 (BACKREFS -CELLCOUNT DATATYPESEEN) D-ASSEM:+NLAMBDA-NO-SPREAD+ (D-ASSEM:+NLAMBDA-NO-SPREAD+) \\FM.EDIT-INSERT ( -CHARWIDTH BITMAP ITEMWIDTH STRINGPTR TAILPTR) U-CASE (\\\\PNAMESTRING.GLOBALRESOURCE) -*WHO-LINE-DISPLAY-NAMES?* (*WHO-LINE-DISPLAY-NAMES?*) CL:MULTIPLE-VALUES-LIMIT (CL:MULTIPLE-VALUES-LIMIT -) D-ASSEM:+LAMBDA-SPREAD+ (D-ASSEM:+LAMBDA-SPREAD+) DO.INSERT.LINE (\\LOC.ROW.0) \\DECODETRANSITION ( -PENDINGINTERRUPT) \\EXTENDEDVMEMINIT (|\\XVmemFmapBase| |\\XVmemFmapHighBase| |\\XVmemDiskBase| -\\LASTVMEMFILEPAGE |\\XVmem|) COMPILER::*LITERALLY-NIL* (COMPILER::*LITERALLY-NIL*) D-ASSEM:+NLAMBDA-SPREAD+ - (D-ASSEM:+NLAMBDA-SPREAD+) COMP.LOOKUPCONST (CONSTS) COMP.NUMBERTEST (LBCNT) CLBUFS (READBUF CTRLUFLG -) PROMPTFORWORD (\\PROMPTFORWORDTTBL) \\IMAGEIOINIT (\\NOIMAGEOPS) FILEPKGCOMPROPS (SYSPROPS) -EDITBMBUTTONFN (COLOR EDITBMWINDOWMENU EDITBMMENU GRIDSIZEMENU) \\TEDIT.PROMPT.PAGEFULLFN ( -\\CURRENTDISPLAYLINE NEWTOP) SI::*ADVICE-HASH-TABLE* (SI::*ADVICE-HASH-TABLE*) -PROVIDE.PROMPTING.WINDOW (\\TTYREGIONOFFSETSPTR) TTYIN1 (\\INITPOS \\LASTAIL \\PROMPT1 TABS UNREADBUF -\\TTSCRATCHFILE.GLOBALRESOURCE \\FIRSTTIME \\LASTCHAR \\PFW.FIRSTTIME \\CURSOR CTRLVFLG -\\RESTOREBUFCODES) \\DEFINEDEVICE (\\DEVICENAMETODEVICE \\FILEDEVICENAMES \\FILEDEVICES) -\\TEDIT.REFRESH.SHOWSEL (GLOBALSEL) U/L-CASE (\\CURSOR) COMPILER::CONTEXT-TEST-FORM ( -COMPILER::CONTEXT-TEST-FORM) |\\VFMCreateIntervals| (|\\VFMintervals|) SEDIT::*FSPEC-TABLE* ( -SEDIT::*FSPEC-TABLE*) \\FTPINIT (\\FTPFDEV \\FTPAVAILABLE) RETDWIM1 (NOFIXVARSLST0 NEXTAIL) -NWAYBUTTON.INIT (NWAYBUTTONIMAGEFNS) RECLAIMMIN (\\RECLAIM.COUNTDOWN \\RECLAIMMIN) DO-EVENT (LISPXHIST - CL:+++ CL:++ + - CL:/// CL:// /) LOCALVARS (LOCALVARS SPECVARS) DWIMIFY2? (NOFIXFNSLST0 NOFIXVARSLST0 -) \\CARET.FLASH (\\CARET.UP) FAKE-COMPILE-FILE (COUTFILE STRF SVFLG LAPFLG LCFIL) MAKECREATE1 ( -USINGEXPR) \\REMOVEDEVICE (\\FILEDEVICENAMES \\DEVICENAMETODEVICE \\FILEDEVICES) \\UPDATEXYANDBOX ( -BASEX BASEY OPPX OPPY) \\HANDLE.RAW.XIP (\\MY.NSNETNUMBER) SPY.INIT (SPY.BUFFER SPY.BUFFER.THRESHOLD -SPY.NEXT SPY.TREE) MSADDANALYZE (MSFNTYPES) FASL::+LARGEST-FOUR-BYTE-INTEGER+ ( -FASL::+LARGEST-FOUR-BYTE-INTEGER+) \\OPENLINEBUF (\\LINEBUF.OFD *STANDARD-INPUT*) \\DONEWEPHEMERALPAGE - (\\PAGEFAULTCOUNTER) \\FM.EDIT-PREPARETOEDIT (BOXOFFSET FONT BITMAP ITEMWIDTH MAXWIDTH LIMITCHARS -SYSLIMITCHARS ECHOCHAR STREAM DISPLAYLEFT DISPLAYBOTTOM LEFT STRINGPTR TAILPTR) EDLOCL (L) ADIEU ( -POSSLIST##) \\REMOVEDEVICE.NAMES (\\DEVICENAMETODEVICE \\FILEDEVICENAMES) SETSPELLCASE (SPELLCASEARRAY -) SETUPPUP (\\PUPCOUNTER) EDITXTR (L) |\\VAMGetVAMPageFor| (|\\VAMbufferVolume| -|\\VAMbufferVolumePage|) DELDEF (PRETTYTYPELST) TEDIT.ADD.STYLESHEET (*TEDIT-PARASTYLE-CACHE* -TEDIT.STYLES *TEDIT-STYLESHEET-SAVE-LIST*) BRKDWNTIME (BDPTR) SEDIT::INITIALIZE-ATOMIC (SEDIT::TYPES -SEDIT::TYPE-LITATOM SEDIT::TYPE-STRING) EDITMBD (L) D-ASSEM:+IVAR-CODE+ (D-ASSEM:+IVAR-CODE+) FIXSPELL - (EDITQUIETFLG) CL::%2/PI (CL::%2/PI) \\HARDCURSORUP (\\SOFTCURSORP \\CURRENTCURSOR) -SEDIT::CREATE-PRETTY-PRINT-ENV (SEDIT::PRETTY-PRINT-ENV) GETCHATWINDOW (CHATWINDOW CHATWINDOWLST) -\\LOAD-STREAM (LOADEDFILELST SYSFILES) TWODINSPECT.DEFAULT.VALUECOMMANDFN (IT) \\SET.STORAGE.STATE ( -\\STORAGEFULLSTATE \\SYSTEMCACHEVARS) OPT.JUMPOPT (ANY) *WHO-LINE-VALUE-FONT* (*WHO-LINE-VALUE-FONT*) -\\PROCESS.AFTER.EXIT (\\PROC.READY) |\\VAMBufferSave| (|\\VAMbufferDirty|) COMPILER::PRINT-NODE ( -COMPILER::*NODE-NUMBER*) CLISPFOR0 (NOFIXFNSLST0 NOFIXVARSLST0) \\TEXTINIT (\\TEXTIMAGEOPS \\TEXTFDEV -\\TEXTOFD) GCGAG (GCMESS) OBTAIN.MONITORLOCK (SI::*LOCKED-MONITOR*) HERALD (HERALDSTRING) -CLISPFORINITVAR (PROGVARS INITVARS) CL:ARRAY-TOTAL-SIZE-LIMIT (CL:ARRAY-TOTAL-SIZE-LIMIT) -*PACKAGE-FROM-NAME* (*PACKAGE-FROM-NAME*) DWMFY1 (NOFIXFNSLST0 NOFIXVARSLST0) \\GR.PUTDEFFN ( -GLOBAL.RESOURCES) COMPILER::*SUBST-OCCURRED* (COMPILER::*SUBST-OCCURRED*) SI::FINISH-UNADVISING ( -ADVISEDFNS SI::*UNADVISED-FNS*) \\INDICATESTRING (PRXFLT) READ-AFM-FILE (|WeightMenu| |SlopeMenu| -CWIDTH CNAME) *DIGITS* (*DIGITS*) WHO-LINE-TIME (*WHO-LINE-TIMER* *WHO-LINE-OLD-TIME*) \\FLUSHNDBS ( -\\LOCALNDBS) CL:PROVIDE (*MODULES*) TWODINSPECT.DEFAULT.TITLECOMMANDFN (IT) EDITFROMFILE ( -EDITLOADFNSFLG) ORDINAL-ONES (ORDINAL-ONES) XCL:*PROFILE* (XCL:*PROFILE*) *WHO-LINE-NAME-FONT* ( -*WHO-LINE-NAME-FONT*) \\BSPINIT (\\BSPFDEV) CLISPIFYRPLAC (SEG) SPY.ADD.ENTRY (SPY.NEXT) -PSCFONT.READFONT (POSTSCRIPTFONTCACHE) |\\VAMMarkBufferDirty| (|\\VAMbufferDirty|) -TEDIT.PUSH.STYLESHEET (*TEDIT-PARASTYLE-CACHE* TEDIT.STYLES *TEDIT-STYLESHEET-SAVE-LIST*) -FASL::DUMMY-HANDLE (FASL::DUMMY-HANDLE) CL::STEP-SLEEP (CL::*STEP-STATE* *EVALHOOK* -CL::*STEP-INDENTATION-LEVEL*) SETUSERNAME (USERNAME \\USERNAME) MSCLOSEFILES (MSOPENFILES) -TEDIT.FORMATPAGE (*TEDIT-PAGE-BREAKS*) \\IDLE.EXIT? (\\IDLE.PASSWORD.SET) \\SOFTCURSORUP ( -\\SOFTCURSORWIDTH \\SOFTCURSORHEIGHT \\SOFTCURSORUPBM \\SOFTCURSORDOWNBM \\CURRENTCURSOR \\SOFTCURSORP -) \\TEDIT.LOOKS.UPDATE (LOOKNO TLEN CHLIST WLIST CHNO INVISIBLERUNS FONT NEWASCENT NEWDESCENT) -\\MAKE.COURIER.REP.STREAM (\\COURIER.REP.DEVICE) SI::FINISH-ADVISING (SI::*UNADVISED-FNS* ADVISEDFNS) -%UNBOUNDED-ARG-COUNT (%UNBOUNDED-ARG-COUNT) UPDATEFILES (NOTLISTEDFILES NOTCOMPILEDFILES) -SEDIT:DEFAULT-COMMANDS (SEDIT::COMMAND-TABLE-SPEC SEDIT::FIRST-ADD-COMMAND-MENU-ENTRY) -*WHO-LINE-SYMBOL-SPACE-ENTRY* (*WHO-LINE-SYMBOL-SPACE-ENTRY*) |\\PFTransferFilePage| ( -|\\label.GLOBALRESOURCE|) MSCHECKVARS1 (LF LF1) CL::%PI/6 (CL::%PI/6) ORDINAL-TENS (ORDINAL-TENS) -CL::%TAN-QPOLY (CL::%TAN-QPOLY) EDIT4F (L UNFIND COM) XCL:*DEBUGGER-PROMPT* (XCL:*DEBUGGER-PROMPT*) -|\\VFMDelete1| (|firstFlag| |lastFlag| |volumePage|) CLISPIFY2B (CLTYP0 NEGFLG VARS) DWIM (DWIMFLG -ADDSPELLFLG) GRAPHEDITCOMMANDFN (EDITGRAPHMENU) GETCFILE (READBUF) COMP.STRETURN (LEVEL FRAME) -\\HANDLE.NS.ROUTING.INFO (\\NSROUTER.PROBECOUNT) CL::%TAN-PPOLY (CL::%TAN-PPOLY) CL:ARRAY-RANK-LIMIT ( -CL:ARRAY-RANK-LIMIT) XCL:*EVAL-FUNCTION* (XCL:*EVAL-FUNCTION*) |\\VFMDelete2| (|\\VFMlowPtr|) -DSKDISPLAY (\\DSKDISPLAY.STATE) \\SOFTCURSORUPCURRENT (\\SOFTCURSORUPP \\CURSORDESTLINE) -DISPLAYAFTERENTRY (|\\DisplayStoppedForLogout|) %ONED-ARRAY (%ONED-ARRAY) NEWDEFC (COMPILE.FILE.AFTER) - SKOR (NCXWORD) XCL:*EXEC-PROMPT* (XCL:*EXEC-PROMPT*) COMPILER::GENCODE-CALL (COMPILER::*FRAME-NAME* -COMPILER::*CODE* COMPILER::*OTHERS* COMPILER::*AVAILABLE-LEXICAL-NAMES*) \\ALLOCMAPBUFFER ( -SYSTEMBUFFERLIST) DISPLAYBEFOREEXIT (|\\DisplayStoppedForLogout|) EDITMV (COM UNFIND) TYPE.BUFFER ( -\\CURSORCOL) PUTDEFN (RESETPTR RESETPC) TEDITCHAT.MENUFN (TEDITCHAT.MENU) \\FLUSHVM (\\DOFAULTINIT) -COMP.GENFN (COMP.GENFN.NUM) *DIGIT-STRING* (*DIGIT-STRING*) RETDWIM (HELPCLOCK DWIMIFY0CHANGE -DWIMIFYCHANGE LASTWORD ATTEMPTFLG CLISPCHANGE) |NewPrinter| (DEFAULTPRINTINGHOST) -\\INIT.ETHER.BUFFER.POOL (\\IOCBFREELIST \\IOCBTOTAL \\TELERAIDIOCB \\IOCB.INPUT.ALLOC -\\IOCB.INPUT.TOTAL \\IOCB.OUTPUT.ALLOC \\IOCB.OUTPUT.TOTAL \\10MB.IDEAL.INPUT.LENGTH) -\\GETREGIONTRACKWITHBOX (OPPX BASEX OPPY BASEY) MSPATHS1 (LINENUM TABS NAMED) PFI.SETUP.TRANSLATIONS ( -*PFI-FUNNY-CHARS*) SEDIT::LIST-FORMATS-TABLE (SEDIT::LIST-FORMATS-TABLE) WTFIXLOADEF (FAULTFN) -*REPLACE-OLD-EDIT-DATES* (*REPLACE-OLD-EDIT-DATES*) COMPILER::FRAME-ANNOTATE-LAMBDA (COMPILER::*REFERENCES* -) \\TELERAIDINIT (\\TELERAIDPACKET \\TELERAIDBLOCK) PACK* (\\\\PNAMESTRING.GLOBALRESOURCE) -*WHO-LINE-HOST-NAME-ENTRY* (*WHO-LINE-HOST-NAME-ENTRY*) \\TEDIT.SELECT.CHARACTER (WORDSELFLG) -\\TEDIT.SETDEFAULT.FROM.SEL (TEDIT.DEFAULT.CHARLOOKS) \\SETETHERFLAGS (\\10MBFLG \\3MBFLG -*MAXIMUM-PACKET-SIZE*) \\TEDIT.HCPYLOOKS.UPDATE (LOOKNO TLEN CHLIST WLIST CHNO INVISIBLERUNS FONT -NEWASCENT NEWDESCENT KERN) \\PROMPTFORWORDBIN (TIMELIMITEXPIRED? BELLBEENHEARD?) ASSURE.ETHER.ON ( -\\NSFLG) CARDINAL-PERIODS (CARDINAL-PERIODS) NEW/INSTANCE/OF/GRAPHNODE (NODELST) *WHO-LINE-ANCHOR* ( -*WHO-LINE-ANCHOR*) AU-REVOIR (POSSLIST##) CL:IN-PACKAGE (*PACKAGE*) CONSTANTS (COMPVARMACROHASH) -|\\VFMGetInterval| (|\\VFMbuffer|) CLISPCAR/CDR (VAR2 VAR1) |\\LFCreateDirectories| (|\\LFdirectories| - |\\PFInitialized|) CLISPFOR4 (TERMINATEFLG MAKEPROGFLG) CHAT.AUTOCRLF (CHAT.AUTOCRLF) DODIRCOMMANDS ( -VALUE) \\PROMPTFORWORDBS (CHARBUFFER RUBBING?) CL::%TAN-EPSILON (CL::%TAN-EPSILON) SEDIT::INPUT-ESCAPE - (SEDIT::THIS-CHAR-ESCAPED) FASL::+SMALLEST-FOUR-BYTE-INTEGER+ (FASL::+SMALLEST-FOUR-BYTE-INTEGER+) -*WHO-LINE-SYMBOL-SPACE* (*WHO-LINE-SYMBOL-SPACE*) MAPRINT (LISPXPRINTFLG) DWIMUNSAVEDEF (SIDES) -UNSAVEFNS (MSDATABASELST NOTCOMPILEDFILES MSNEEDUNSAVE) CL::%-PI/4 (CL::%-PI/4) XCL::*BREAK-HASH-TABLE* - (XCL::*BREAK-HASH-TABLE*) \\RELEASEBUFFER (MAPEMPTYBUFFERLIST) LISPXREADP (READBUF) -TEDIT.POP.STYLESHEET (*TEDIT-PARASTYLE-CACHE* TEDIT.STYLES) CARDINAL-TEENS (CARDINAL-TEENS) -MOVE.FORWARD.TO (\\CURSOR) *WHO-LINE-ENTRY-REGISTRY* (*WHO-LINE-ENTRY-REGISTRY*) PROMPTCHAR (READBUF) -SETERRORN (*LAST-CONDITION*) MAKESYS (MAKESYSDATE) \\SOFTCURSORDOWN (\\SOFTCURSORUPP) NETWORKLOGINFO ( -NETWORKLOGINFO) \\MAIKO.SET.STORAGE.STATE (\\STORAGEFULLSTATE \\SYSTEMCACHEVARS) -XCL::*UNSAFE-TO-DELETE-PACKAGE-NAMES* (XCL::*UNSAFE-TO-DELETE-PACKAGE-NAMES*) SEDIT::GET-BUTTON-STRING - (SEDIT::BUTTON-STRING-NODE SEDIT::BUTTON-STRING) COMPUTE-MACRO-ARGS (*MACRO-VARS* *MACRO-VALS*) -CL::*STEP-MAX-INDENTATION* (CL::*STEP-MAX-INDENTATION*) BRECOMPILE (READBUF LCFIL) -XCL:SET-DEFAULT-EXEC-TYPE (XCL:*PROFILE*) INITATOMS (\\SCRATCHSTRING |\\OneCharAtomBase|) COMP.SPREAD -(LBCNT LEVEL FRAME) \\GETMAPBUFFER (MAPEMPTYBUFFERLIST) USEDFREE (FREEVARS) \\CURSORDESTINATION ( -\\CURSORDESTLINE \\CURSORDESTWIDTH \\CURSORDESTHEIGHT \\CURSORDESTRASTERWIDTH \\CURSORDESTINATION) -WHO-LINE-HOST-NAME (*WHO-LINE-HOST-NAME*) LISPXREADBUF (REDOCNT) MSPATHS (MSCRATCHASH MSPRINTFLG) -CLISPIFYCROPS (SEG) ADDSPELL (USERWORDS SPELLINGS2 LASTWORD SPELLINGS1 SPELLINGS3) OPENRTPSOCKET ( -\\BSPSOCKETS) \\GETKEY (\\\\KEYBOARDWAITBOX.GLOBALRESOURCE) \\DSKDISPLAY.RESHAPEFN ( -DSKDISPLAY.POSITION) CLEARFILEPKG (FILELST LOADEDFILELST) INITDATATYPENAMES (\\FINALIZATION.FUNCTIONS) - VMEM.PURE.STATE (\\VMEM.PURE.LIMIT) OPT.SCANOPT (ANY) PFI.ADD.TO.INDEX (*PFI-LOCATIONS*) -COMPILER::GENCODE-TAGBODY-INLINE (COMPILER::*STACK-NUMBER* COMPILER::*TAG-NUMBER*) MSNEEDUNSAVE ( -MSNEEDUNSAVE) CL::%PI/4 (CL::%PI/4) \\GETSYSBUF (\\LONGSYSBUF) \\PFI.DO.HARDCOPY (\\PFI.PROCESS -\\PFI.PROCESS.COMMANDS) MAPAFTERCLOSE (DEFAULTMAPFILE) FILECREATED (FILECREATEDLST) DEFAULTFONT ( -DEFAULTFONT) WAIT.FOR.TTY (\\OLDTTY) PFI.DEFAULT.HANDLER (*PFI-LOCATIONS*) TEDIT.UNDO (UNDOFN) CL::%PI/3 - (CL::%PI/3) \\MAIKO.INPUT.INTERRUPT (\\MAIKO.INPUT.PACKET) SEDIT:*INDENT-ALIST* (SEDIT:*INDENT-ALIST* -) READLINE (CTRLUFLG REREADFLG READBUF) COMPILER::CLOSURE-ANNOTATE-LAMBDA (COMPILER::*NEED-STORAGE*) -ADDFILE0 (FILELST) EDITCONT (L) OVERFLOW (\\OVERFLOW) \\DISPLAYINIT (|\\DisplayDeviceMethods| -|\\DisplayDeviceData| \\DISPLAYIMAGEOPS |DisplayFDEV|) SEDIT::CREATE-ENVIRONMENTS ( -SEDIT::LISP-EDIT-ENVIRONMENT) CHAT.OSTYPES (CHAT.OSTYPES) \\TEDITPAGEMENU.CREATE ( -TEDIT.EXPANDED.PAGEMENU) \\SET.LASTVMEMFILEPAGE (\\LASTVMEMFILEPAGE \\VMEM.FULL.STATE) MSSEEKTYPE ( -LASTPARSED S) *WHO-LINE-ENTRIES* (*WHO-LINE-ENTRIES*) MSCHECKBOUNDFREE (MSCRATCHASH) MOVE.TO.LINE ( -\\CURSOR \\ARROW) *FEATURES* (*FEATURES*) CLISPIFYNOT (NEGFLG) |\\VFMFind| (|\\VFMbuffer| -|\\VFMoldPtr| |\\VFMlowPtr| |\\VFMhighPtr|) HPRINT (HPRINTHASHARRAY) TEDIT.BUILD.PCTB1 ( -DEFAULTPARALOOKS) CL::*STEP-PRINT-LENGTH* (CL::*STEP-PRINT-LENGTH*) COMPILER::FRAME-ANNOTATE-CATCH ( -COMPILER::*REFERENCES*) GETSETQ (SETQTAIL SETQPART) BKSYSBUF.GENERAL (PRXFLG) MAKEINITBFS (\\MAINDISK -\\SWAPDSK1 \\SWAPDSK2 \\SWAPREQUESTBLOCK \\DISKREQUESTBLOCK \\FREEPAGEFID) MAKEFILES (\#UNDOSAVES) -\\MAKE.JIS.TO.XCCS.CONV.TABLE (*JIS-1KU-TO-XCCS-CONV-TABLE* *JIS-2KU-TO-XCCS-CONV-TABLE* -*JIS-6KU-TO-XCCS-CONV-TABLE* *XCCS-TO-JIS-CONV-TABLE* *HANKAKU-TO-ZENKAKU-CONV-TABLE* -*ZENKAKU-TO-HANKAKU-CONV-TABLE* *JIS-TO-XCCS-CONV-TABLE-LIST*) \\KEYBOARDINIT (\\CURRENTKEYACTION -\\DEFAULTKEYACTION \\COMMANDKEYACTION \\INTERRUPTSTATE \\SYSBUFFER \\SAVEDSYSBUFFER \\LASTUSERACTION -\\KEYBOARDEVENTQUEUE \\LASTKEYSTATE \\SHIFTSTATE \\MOUSETIMERTEMP) COMP.STTAG (LEVEL FRAME CODE) -STRPOSL (\\\\STRPOSLARRAY.GLOBALRESOURCE) COMP.ST (CODE LEVEL) CHAT.TAKE.INPUT1 (STREAM) BLOCKCOMPILE1 - (LINKEDFNS EXPRSLST) MOUSECHORDWAIT (\\MOUSECHORDTICKS \\MOUSECHORDMILLISECONDS) DEFINE-FILE-INFO ( -FILECREATEDLOC) BCOMPL1A (CHANGES FIRST DESTINATIONENV DEFS NOFIXVARSLST OTHERS) SUPERPRINT/COMMENT1 ( -COMMENTCOL) CHAT.UNDERLINE.DESCENT (CHAT.UNDERLINE.DESCENT) %THIN-CHAR-TYPENUMBER ( -%THIN-CHAR-TYPENUMBER) COMPILE-IN-CORE (NLAMA NLAML LAMS LAMA NOFIXFNSLST NOFIXVARSLST COUTFILE -NULLFILE) SEARCHPRETTYTYPELST (PRETTYTYPELST) MSSEEK-WORD (LASTPARSED S) |\\VFMContextSet| ( -|\\VFMvolumeHandle|) DBG::DEBUGGER-BUTTON-EVENT (*DEBUGGER-MENU*) XCL::*DELETED-IMPLICIT-HASH-SLOT* ( -XCL::*DELETED-IMPLICIT-HASH-SLOT*) OPT.SETUPOPT (CL:LABELS FRAMES) COMPILER:PASS (COMPILER:PASS) -SI::FINISH-UNBREAKING (BROKENFNS XCL::*TRACED-FNS* XCL::*UNBROKEN-FNS*) \\DOVMEMFULLINTERRUPT ( -\\PENDINGINTERRUPT \\EXTENDINGVMEMFILE) TEDIT.STYLESHEET (*TEDIT-PARASTYLE-CACHE* TEDIT.STYLES -*TEDIT-STYLESHEET-SAVE-LIST*) CARDINAL-TENS (CARDINAL-TENS) DC (*LAST-DC*) COMPILE.FILE.RESET ( -NOTCOMPILEDFILES) CL::*STEP-PRINT-LEVEL* (CL::*STEP-PRINT-LEVEL*) \\NSPRINT.WATCHDOG ( -*PRINT-JOBS-IN-PROGRESS*) PAINTW (PAINTCOMMANDMODE PAINTCOMMANDSHADE PAINTCOMMANDBRUSH PAINTWCURSOR) -*WHO-LINE-USER-ENTRY* (*WHO-LINE-USER-ENTRY*) \\NSPRINT.WATCH.JOB (*PRINT-JOBS-IN-PROGRESS*) -COMP.STJUMP (FRAME LEVEL) ENUM-STRING (\\\\NUMSTR.GLOBALRESOURCE \\\\NUMSTR1.GLOBALRESOURCE) -\\TFBRAVO.SPREAD.LOOKS (OVERSTRIKE) OPT.CFRPTQ (LBCNT) BRKDWNCOMPILE2 (NLAMA NLAML LAMS LAMA -NOFIXFNSLST NOFIXVARSLST) *WHO-LINE-VMEM-ENTRY* (*WHO-LINE-VMEM-ENTRY*) CLISPATOMARE2 (DEST) -MSCHECKBLOCKBASIC (ENTRIES BLKFNS BLKAPPLYCALLERS) COMP.RPLACD (CODE) MOVE.TO.NEXT.LINE (\\ARROW -\\CURSOR) BRECOMPILE1 (BLKFNS ADRLST) COMPILER::*NODE-NUMBER* (COMPILER::*NODE-NUMBER*) -DEFAULT.INSPECTW.VALUECOMMANDFN (|InspectMenu|) \\TURN.ON.HUNKING (\\UNBOXEDHUNK.TYPENUM.TABLE -\\CODEHUNK.TYPENUM.TABLE \\PTRHUNK.TYPENUM.TABLE \\HUNKING?) MBUTTON.INIT (MBUTTONIMAGEFNS) SPY.MERGE -(SPY.HASH) EXPANDING-PAGEFULLFN (\\CURRENTDISPLAYLINE) COMPILER::FRAME-ANNOTATE-GO (COMPILER::*REFERENCES* -) SETFONTDESCRIPTOR (\\FONTSINCORE) XCL::MAKE-VARIABLE-DEFINITION (XCL::*PROFILE-VARIABLES*) -PRINTCODENT (IVARS PVARS FVARS) SPY.POINTERS (SPY.POINTERS) \\SETUP.HUNK.TYPENUMBERS ( -INITIALDTDCONTENTS) CARDINAL-ONES (CARDINAL-ONES) OPT.FRAMEOPT (FRAMES) CL::%SIN-PPOLY (CL::%SIN-PPOLY -) BRKDWN1 (BRKDWNLENGTH BRKDWNLABELS BRKDWNTOTLST BDLST BDSINK BRKDWNTYPE) \\PROC.CODEFORTFRAME ( -\\RUNNING.PROCESS) PRETTYPRINT (NLAMLST LAMALST NLAMALST LAM?LST PRTTYSPELLFLG) MSUPDATE (MSPRINTCNT) -\\NSINIT (\\NS.ROUTING.TABLE \\NSADDRESS.CACHE \\NSROUTER.PROBECOUNT \\NSROUTER.PROBETIMER \\NSFLG -\\NS.READY) FTPDEBUG (FTPDEBUGLOG FTPDEBUGFLG) CHAT.ICONFN (TTYKBDICONSPEC) \\REUSETO (UNUSED BIT -OFFSET) COMPILER::*COMPILE-DEFINER-CONTEXT* (COMPILER::*COMPILE-DEFINER-CONTEXT*) TEDIT.BUILD.PCTB2 ( -DEFAULTPARALOOKS) KILLSEGMENT (\\ENDBUFFER \\LASTAIL) OPT.SETDEFREFS (CL:LABELS) FASL-FILEDATE (VALUE) - \\TEDITMENU.CREATE (TEDIT.EXPANDED.MENU) \\IFSERRORSTRING (\\IFSERRORFILENAME) NEW/FN (/FNS LISPXFNS) - \\PUNT.BITBLT.BITMAP (\\BBSCRATCHTEXTURE) \\DRAWLINE.DISPLAY (\\\\BRUSHBBT.GLOBALRESOURCE) -CL::%SIN-QPOLY (CL::%SIN-QPOLY) FLTSTR (\\\\NUMSTR.GLOBALRESOURCE \\\\NUMSTR1.GLOBALRESOURCE) -COMPILE.FILE.APPLY (DEFERRED.EXPRESSIONS) CL::*STEP-INDENTATION-LEVEL* (CL::*STEP-INDENTATION-LEVEL*) -BCOMPL.BODY (NOFIXFNSLST) STOPNS (\\NSFLG) TEDIT.CREATEW (TEDIT.DEFAULT.WINDOW) -CONDITIONS::*FUTURE-CITIZENS-OF-CONDITIONS* (CONDITIONS::*FUTURE-CITIZENS-OF-CONDITIONS*) -MAYBE.PRETTYFILEINDEX (NOTLISTEDFILES) %FAT-CHAR-TYPENUMBER (%FAT-CHAR-TYPENUMBER) SIMPLETEXTEDIT ( -\\TTSCRATCHFILE.GLOBALRESOURCE) \\DRAWCURVE.DISPLAY (\\\\BRUSHBBT.GLOBALRESOURCE) GLOBALVARS ( -GLOBALVARS) TEDIT.BUILD.PCTB0 (DEFAULTPARALOOKS) INSTALLBRUSH (|\\BrushAList| KNOWN.BRUSHES) ALLOCHASH - (ALLOCATIONS) OPT.POSTOPT (TAGS) SCANFILE2 (DONELST FNLST) SI::INSTALL-CLOSURE-CACHE ( -SI::*CLOSURE-CACHE-ENABLED*) DWIMIFY1? (NOFIXFNSLST0 NOFIXVARSLST0) SUBPRINT (LEFT) XCL::*WALK-FUNCTION* - (XCL::*WALK-FUNCTION*) COMP.BOOL (LBCNT) OPT.COMPINIT (DONOTHING) COMP.APPLYFNP (ALAMS1) -COMPILER::GENCODE-RETURN (COMPILER::*NON-LOCALS*) \\10MB.STARTDRIVER (\\10MB.RAWPACKETQ -\\10MB.INPUT.TIMEOUT \\MAIKO.INPUT.PACKET) \\KEYBOARDEVENTFN (\\KEYBOARD.BEFORETYPE -\\MAIKO.BEFOREKEYTYPE \\MAIKO.XBEFORE?) \\GETMISCNSOCKET (\\MISC.NSOCKET) MSSOLVE (MSTHOSE) -\\DRAWELLIPSE.DISPLAY (\\\\BRUSHBBT.GLOBALRESOURCE) HCOPYALL (HPRINTHASHARRAY) -CL::*DEFSTRUCT-INFO-CACHE* (CL::*DEFSTRUCT-INFO-CACHE*) SEDIT::GET-MENU (SEDIT::MENUS) -SPY.MAKEGRAPHNODES (SPY.NODES) DOWINDOWCOM (|WindowMenu|) \\DRAWCIRCLE.DISPLAY ( -\\\\BRUSHBBT.GLOBALRESOURCE) DP (*LAST-DP*) *WHO-LINE-LAST-VMEM* (*WHO-LINE-LAST-VMEM*) -\\FILLCIRCLE.DISPLAY (\\\\BRUSHBBT.GLOBALRESOURCE) DWIMIFY0? (NOFIXFNSLST0 NOFIXVARSLST0) -CL::%NO-SUPER-TYPE (CL::%NO-SUPER-TYPE) |\\VAMFreePageGroup| (|\\\\DFSVAMjunkPage.GLOBALRESOURCE| -|\\\\DFSVAMpage.GLOBALRESOURCE|) CL::%PI/2 (CL::%PI/2) COMP.AC (AC) \\FM.LAYOUTGRID (FORMAT LEFT -\\FM.GROUP-ID-COUNTER) CLISPATOM1 (89FLG PARENT CURRTAIL CHARLST NEXTAIL NEWTAIL CLISPCHANGES -CLISPCHANGE) \\ASSIGNDATATYPE1 (|\\MaxTypeNumber|) DEFAULT.EDITDEF (RETRY) CL::%SIN-EPSILON ( -CL::%SIN-EPSILON) \\BITBLT.DISPLAY (\\BBSCRATCHTEXTURE) *WHO-LINE-TTY-STATE-ENTRY* ( -*WHO-LINE-TTY-STATE-ENTRY*) CL::%-PI/2 (CL::%-PI/2) COMPILE1A (NOFIXFNSLST0 NOFIXVARSLST0 NOFIXFNSLST -NOFIXVARSLST) FB.EXPUNGE?.MENU (FB.EXPUNGE?MENU) SI::DISABLE-CLOSURE-CACHE (SI::*CLOSURE-CACHE-ENABLED* -) INIT-CML-READTABLES (CMLRDTBL *COMMON-LISP-READ-ENVIRONMENT* READ-LINE-RDTBL) -CL::*COMMON-LISP-BASE-TYPES* (CL::*COMMON-LISP-BASE-TYPES*) COMPILER::META-SUBST-VAR-REF ( -COMPILER::*SUBST-OCCURRED*) THREESTATE.INIT (THREESTATEIMAGEFNS) COMP.DELFN (LEVEL CODE) CL::SXHASH-MAX - (CL::SXHASH-MAX) COMPILER::CLOSURE-ANNOTATE-LABELS (COMPILER::*NEED-STORAGE*) -CL::*STEP-INDENTATION-INCREMENT* (CL::*STEP-INDENTATION-INCREMENT*) \\RESETKEYBOARD (\\KEYBUFFERING -\\TIMER.INTERRUPT.PENDING \\LONGSYSBUF) \\FAULTINIT (\\MACHINETYPE \\LASTDIRTYSCANPTR \\DOFAULTINIT) -PAINTW.CACHE.SHADE (PAINTW.SHADES) INITDATATYPES (|\\MaxSysTypeNum| |\\MaxTypeNumber|) -|\\DSKCreateDevice| (|\\DSKdevice|) DO-HISTORY-SEARCH (*EVENTS*) PRETTYCOM (PRTTYSPELLFLG) -*TRACE-OUTPUT* (*TRACE-OUTPUT*) PRINTNUM (\\\\NUMSTR.GLOBALRESOURCE \\\\NUMSTR1.GLOBALRESOURCE) -DBG::EXIT-DEBUGGER (BRKVALUES) COMPILER::*INPUT-FILECOMS-VARIABLE* (COMPILER::*INPUT-FILECOMS-VARIABLE* -) \\MEDW.CLOSEW (\\TOPWDS) COMPILER::COMPILE-FILE-LOOSE-FORM (COMPILER::*OUTSTANDING-LOOSE-FORMS*) -SI::*CLOSURE-CACHE* (SI::*CLOSURE-CACHE*) *RANDOM-STATE* (*RANDOM-STATE*) \\SET.VMEM.FULL.STATE ( -\\PENDINGINTERRUPT \\VMEM.FULL.STATE) SI::RESETUNWIND (SI::*RESETFORMS*) COMPILER::*INDENT-INCREMENT* -(COMPILER::*INDENT-INCREMENT*) *READ-DEFAULT-FLOAT-FORMAT* (*READ-DEFAULT-FLOAT-FORMAT*) -COMPILER::*CURRENT-FUNCTION* (COMPILER::*CURRENT-FUNCTION*) CLISPCAR/CDR1 (VAR2) \\RPLCONS ( -\\RECLAIM.COUNTDOWN) CL::%FUNCTION-DEFINING-FORM-KEYWORDS (CL::%FUNCTION-DEFINING-FORM-KEYWORDS) -WHO-LINE-USERNAME (*WHO-LINE-CURRENT-USER*) SETHASHSTATUS (SYSHASHFILELST SYSHASHFILE) -CL::*TYPEP-HASH-TABLE* (CL::*TYPEP-HASH-TABLE*) INITIALIZE-NEW-SHELL-DEVICE (*NEW-SHELL-DEVICE*) -\\D01.FAULTINIT (\\VMEMACCESSFN \\REALPAGETABLE \\RPOFFSET \\RPTSIZE \\RCLKMILLISECOND) XCL::*WALK-FORM* - (XCL::*WALK-FORM*) XCL::IN-PROFILE (XCL:*PROFILE*) MSSPLST (MSSPLST) %LIT-ARRAY-SIZES ( -%LIT-ARRAY-SIZES) CL::*PARSED-DEFSTRUCTS* (CL::*PARSED-DEFSTRUCTS*) SPLIT89 (SPLIT89FLG) -GO.TO.RELATIVE (\\CURSORROW \\CURSORCOL) CL::%2PI/3 (CL::%2PI/3) |\\VFMGetBufferFor| ( -|\\VFMbufferPool|) \\FM.LAYOUTCOLUMN (FORMAT \\FM.GROUP-ID-COUNTER) INTTOEXT (TEXP THI TLO) -\\BITBLT.BITMAP.SLOW (\\BBSCRATCHTEXTURE) COMPILER::*COMPILE-FILE-CONTEXT* (COMPILER::*COMPILE-FILE-CONTEXT* -) COMP.DELPUSH (LEVEL CODE) \\ADD.PACKET.FILTER (\\PACKET.FILTERS) CL:BOOLE-AND (CL:BOOLE-AND) -SHOW.CLEARINGHOUSE (CLEARINGHOUSE.STRUCTURE.WINDOW) \\4DISPLAYINIT (\\4DISPLAYIMAGEOPS \\4DISPLAYFDEV) - BYTECOMPILE2 (COMP.GENFN.NUM) \\HANDLE.RAW.PUP (\\LOCALPUPNETHOST) \\FM.LAYOUTROW (FORMAT -\\FM.GROUP-ID-COUNTER) \\MAIKO.ETHER-INTERRUPT (\\MAIKO.INPUT.PACKET) TTPRINSPACE (\\CURSORCOL) -COMPILER::*COMPILE-SCAN-CONTEXT* (COMPILER::*COMPILE-SCAN-CONTEXT*) XCL::*LEXICAL-VARIABLES* ( -XCL::*LEXICAL-VARIABLES*) CLISPFOR1 (I.V. MAKEPROGFLG UNDOLST I.S.TYPE1 I.S.TYPE) \\DEL.PACKET.FILTER -(\\PACKET.FILTERS) CL:BOOLE-1 (CL:BOOLE-1) SETUPPAGEMAP (NEXTPM NEXTVMEM) D-ASSEM::EMIT-BYTE ( -D-ASSEM::*BYTES* D-ASSEM::*BYTE-COUNT*) CL::%PI (CL::%PI) XCL:UNBREAK-FUNCTION (BROKENFNS -XCL::*TRACED-FNS* XCL::*UNBROKEN-FNS*) CHAT.TTY.PROCESS (CHAT.TTY.PROCESS) LLBREAK (BROKENFNS) -\\VANILLADISKINIT (\\DISKNAMECASEARRAY) \\TEDIT.CREATEW.FROM.REGION (TEDIT.DEFAULT.WINDOW) -*WHO-LINE-STATE-UNINTERESTING-FNS* (*WHO-LINE-STATE-UNINTERESTING-FNS*) \\RELEASE.IOCB ( -\\IOCB.INPUT.ALLOC \\IOCB.OUTPUT.ALLOC \\IOCBFREELIST) \\CHECK.PQUEUE (\\RUNNING.PROCESS) \\CONS.UFN ( -\\RECLAIM.COUNTDOWN) \\FM.EDIT-MOVECARET (POINTER STRINGPTR TAILPTR) \\PRINDATUM.TO.STRING ( -\\\\NUMSTR.GLOBALRESOURCE \\\\NUMSTR1.GLOBALRESOURCE) \\EXTFQUOTIENT (TEXP THI TLO) PFI.ENQUEUE ( -\\PFI.PROCESS \\PFI.PROCESS.COMMANDS) SEDIT:RESET-FORMATS (SEDIT::*FSPEC-TABLE-COPY*) -%INITIALIZE-DEFAULT-PATHNAME (\\CONNECTED.DIRECTORY *DEFAULT-PATHNAME-DEFAULTS*) \\DOHELPINTERRUPT ( -\\PENDINGINTERRUPT) SAVE.CURSOR (\\HOMEROW \\HOMECOL) *LOAD-VERBOSE* (*LOAD-VERBOSE*) CL:BOOLE-ANDC2 ( -CL:BOOLE-ANDC2) COMPILEUSERFN1 (NOFIXFNSLST0 NOFIXVARSLST0 NOFIXFNSLST NOFIXVARSLST) -CL::*BASE-TYPE-LATTICE* (CL::*BASE-TYPE-LATTICE*) COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::*REFERENCES* -) SCANDECLARECOLON (ADR DONELST) \\DOVE.FAULTINIT (\\VMEMACCESSFN \\IOCBPAGE \\RCLKMILLISECOND -\\LASTVMEMFILEPAGE \\VMEM.FULL.STATE) CL:BOOLE-C1 (CL:BOOLE-C1) TIMESPOW10 (TEXP THI TLO) -PROCESS.STATUS.WINDOW (PROCOPMENU PROCESS.STATUS.WINDOW PROCMENU SELECTEDPROC) COMP.EVQ ( -COMPVARMACROHASH) XCL::*ENVIRONMENT* (XCL::*ENVIRONMENT*) CONTROL-T (LAST^TTIMEBOX LAST^TDISKIOTIME -LAST^TNETIOTIME LAST^TGCTIME LAST^TSWAPTIME) CL:BOOLE-ANDC1 (CL:BOOLE-ANDC1) -COMPILER::*TAIL-RECURSION-THRESHOLD* (COMPILER::*TAIL-RECURSION-THRESHOLD*) GAINSPACE (SMASHPROPSLST1) - \\ALLOCHUNK (\\HUNKREJECTS) CL:BOOLE-C2 (CL:BOOLE-C2) FONTSET (FONTNAME) CL:BOOLE-NAND (CL:BOOLE-NAND -) PAGEHEIGHT (\\#DISPLAYLINES \\CURRENTDISPLAYLINE) PRINTDATE1 (MAPADR) -ONEDINSPECT.DEFAULT.VALUECOMMANDFN (IT) CLISPTRAN (CLISPARRAY \#CLISPARRAY) \\EXTNORMALIZE (TEXP THI -TLO) \\MAIKO.ALLOCBLOCK (\\RECLAIM.COUNTDOWN) CL::%DEFAULT-PRINT-FUNCTION (CL::%DEFAULT-PRINT-FUNCTION -) *FORMAT-DISPATCH-TABLE* (*FORMAT-DISPATCH-TABLE*) CL:BOOLE-2 (CL:BOOLE-2) \\DL.FAULTINIT ( -\\VMEMACCESSFN \\IOCBPAGE \\RCLKMILLISECOND \\RCLKSECOND \\LASTVMEMFILEPAGE) CL::*DESCRIBE-PRINT-LENGTH* - (CL::*DESCRIBE-PRINT-LENGTH*) \\DOINTERRUPTHERE (\\PENDINGINTERRUPT) ICMLARRAY.VALUECOMMANDFN (IT) -MSVERB (S LASTADVERB) CL::%2PI (CL::%2PI) MSPRGDWIM (DWIMESSGAG) CL:BOOLE-IOR (CL:BOOLE-IOR) CL:GENSYM - (CL::*GENSYM-COUNTER*) \\SETPRINTLEVEL (\\TCARPRINTLEVEL \\TCDRPRINTLEVEL \\SYSBUF \\LINBUF) -TTYINEDIT (\\TTSCRATCHFILE.GLOBALRESOURCE) CLISPFOR0A (I.S.OPRSLST) CL:BOOLE-SET (CL:BOOLE-SET) -MSNOTICEFILE (LOADDBFLG MSFILELST) CL:BOOLE-NOR (CL:BOOLE-NOR) D-ASSEM::*BYTE-COUNT* (D-ASSEM::*BYTE-COUNT* -) ACCESSDEF (NOTRANFLG) CL:BOOLE-EQV (CL:BOOLE-EQV) *EDIT-INPUT-WITH-TTYIN* (*EDIT-INPUT-WITH-TTYIN*) -\\CURVESTART (\\OLDERX \\OLDX \\CURX \\OLDERY \\OLDY \\CURY) CL:BOOLE-XOR (CL:BOOLE-XOR) -\\VANILLAHOSTNAMEP (\\PSEUDODSK) OPT.CHECKTAG (LEVEL) XCL::*DECLARATIONS* (XCL::*DECLARATIONS*) -INTERPRET/MARK/FORMAT (BOX.BOTH.FLG BOX.LEAVES.FLG BORDER.FOR.MARKING LABELSHADE.FOR.MARKING) -*WHO-LINE-DIRECTORY-ENTRY* (*WHO-LINE-DIRECTORY-ENTRY*) CL:BOOLE-ORC1 (CL:BOOLE-ORC1) -\\IRM.GET.KEYWORDS (\\IRM.KEYWORDS) D-ASSEM::+CONSTANT-OPCODES+ (D-ASSEM::+CONSTANT-OPCODES+) PACKC ( -\\\\PNAMESTRING.GLOBALRESOURCE) |\\VFMSplit1| (|\\VFMxtraBuffer| |\\VFMhighPtr|) *MACROEXPAND-HOOK* ( -*MACROEXPAND-HOOK*) CL:BOOLE-ORC2 (CL:BOOLE-ORC2) COMPILER::*PROCESSED-FUNCTIONS* ( -COMPILER::*PROCESSED-FUNCTIONS*) \\RESETLINE (\\CURRENTDISPLAYLINE) \\TEDIT.UPDATETREE (ITEM#) -SEDIT::SPLIT-LITATOM (SEDIT::BUTTON-STRING-NODE SEDIT::BUTTON-STRING) COMPAREFAIL (LOOSEMATCH -DIFFERENCES) DWIMIFY (NOFIXFNSLST0 NOFIXVARSLST0 PRETTYTRANFLG) \\FM.EDIT-DELETE (MOUSEX MOUSEY -STRINGPTR TAILPTR ITEMWIDTH) XCL:*PRINT-STRUCTURE* (XCL:*PRINT-STRUCTURE*) SCANEXP (NOFIXVARSLST -FILECREATEDLST DONELST) \\MAIKO.10MBSTARTDRIVER (\\10MB.RAWPACKETQ \\10MB.INPUT.TIMEOUT -\\MAIKO.10MB.NDB \\MAIKO.INPUT.PACKET) CL:LEAST-NEGATIVE-DOUBLE-FLOAT (CL:LEAST-NEGATIVE-DOUBLE-FLOAT) - LITATOM-PACKAGE-CONVERSION-TABLE (LITATOM-PACKAGE-CONVERSION-TABLE) COMPILER::*UNKNOWN-FUNCTIONS* ( -COMPILER::*UNKNOWN-FUNCTIONS*) \\8DISPLAYINIT (\\8DISPLAYIMAGEOPS \\8DISPLAYFDEV) BKSYSCHARCODE ( -\\LONGSYSBUF) CLEARBUF (\\LINBUF \\SYSBUF) CL:DOUBLE-FLOAT-EPSILON (CL:DOUBLE-FLOAT-EPSILON) -CL::%DEFSTRUCT-EXPORT-OPTIONS (CL::%DEFSTRUCT-EXPORT-OPTIONS) CLISP3A (SEG) SCANDEFINEQ (DICT0 -FNADRLST ADR NOFIXFNSLST DONELST FNLST) CLISPATOM2D (PARENT) \\CURVEEND (DASHCNT DASHON DASHTAIL -\\OLDERX \\OLDERY \\OLDX \\OLDY \\CURX \\CURY) CL:DOUBLE-FLOAT-NEGATIVE-EPSILON ( -CL:DOUBLE-FLOAT-NEGATIVE-EPSILON) CLISPATOM2C (ENDTAIL TENTATIVE) \\CONVERT.FLOATING.NUMBER ( -\\\\CFNSTRING.GLOBALRESOURCE) OPT.CHLEV (LEVEL) \\MEDW.OPENW (\\TOPWDS) TEDIT.MOVE (TEDIT.MOVE.PENDING -) CL::*DESCRIBE-PRINT-LEVEL* (CL::*DESCRIBE-PRINT-LEVEL*) FIXAPPLY1 (PARENT) CREATESCREEN (\\SCREENS) -\\PEEKNS (\\PEEKNSNUMBER XIPTRACEFILE XIPTRACEFLG) HASH-EQUAL (*CIRCLE-READ-LIST*) DIRPRINTNAME ( -LASTHOST&DIR I NAMEPRINTED) |\\VFMReadNext| (|\\VFMoldPtr| |\\VFMlowPtr| |\\VFMhighPtr|) INTPOWERS ( -INTPOWERS) CL:LEAST-POSITIVE-DOUBLE-FLOAT (CL:LEAST-POSITIVE-DOUBLE-FLOAT) CL:BOOLE-CLR (CL:BOOLE-CLR) - \\PSWOP.SELECTED (PROCOP.WAKEMENU) \\MAIKO.FAULTINIT (\\VMEMACCESSFN \\IOCBPAGE \\RCLKMILLISECOND -\\RCLKSECOND) \\SETRECLAIMMIN (\\SYSBUF \\LINBUF) *REMOVE-INTERLISP-COMMENTS* ( -*REMOVE-INTERLISP-COMMENTS*) \\CHTOPC (START-OF-PIECE) INSTALL-WHO-LINE-OPTIONS (*WHO-LINE*) -\\PRINDATUM (\\\\NUMSTR.GLOBALRESOURCE \\\\NUMSTR1.GLOBALRESOURCE) BLOCK (\\RUNNING.PROCESS) -|\\UFSCreateDevice| (|\\UFSdevice|) CL:LEAST-NEGATIVE-SHORT-FLOAT (CL:LEAST-NEGATIVE-SHORT-FLOAT) -CMLSYMBOLS.SHARED (CMLSYMBOLS.SHARED) LISTFILES (NOTLISTEDFILES) \\CLEARSYSBUF (\\LONGSYSBUF) -BRKDWNFBOXES (BDPTR) TEDIT.RESET.EXTEND.PENDING.DELETE (TEDIT.PENDINGDEL) CL:LEAST-POSITIVE-SINGLE-FLOAT - (CL:LEAST-POSITIVE-SINGLE-FLOAT) FONTMAPARRAY (\\FONTMAPCACHE) SCANCOMPILEDFN (DICT0 FNADRLST DONELST - ADR FNLST) CL:LEAST-NEGATIVE-SINGLE-FLOAT (CL:LEAST-NEGATIVE-SINGLE-FLOAT) CLISP3C (PRXFLG) -SEDIT::COMMAND-TABLE-SPEC (SEDIT::COMMAND-TABLE-SPEC) \\CLOSELINE (\\CURRENTDISPLAYLINE) DREAD (I) -\\LOCATE.PUPNET (\\PUPROUTER.PROBECOUNT \\PUPROUTER.PROBETIMER) \\PACK.ITEM (PACK.INDEX) MSSETUP ( -MSWORDS) DPRIN1 (I) CL:LEAST-POSITIVE-LONG-FLOAT (CL:LEAST-POSITIVE-LONG-FLOAT) COMPILEUSERFN ( -OTHERVARS) PACKAGE-CLEAR (*PACKAGE* *LISP-PACKAGE* *KEYWORD-PACKAGE* *INTERLISP-PACKAGE*) -|\\VAMAllocPageGroup| (|\\\\DFSVAMjunkPage.GLOBALRESOURCE| |\\\\DFSVAMpage.GLOBALRESOURCE|) -CL:LONG-FLOAT-EPSILON (CL:LONG-FLOAT-EPSILON) MSINIT (MSDATABASELST MARKASCHANGEDFNS MSCHANGEDARRAY -MSDBEMPTY MSFILETABLE MSARGTABLE) BLOCK\: (BLOCKS) CL:LEAST-POSITIVE-SHORT-FLOAT ( -CL:LEAST-POSITIVE-SHORT-FLOAT) IRM.RESET (IRM.DINFOGRAPH \\IRM.HASHFILE \\IRM.KEYWORDS) -\\TFBRAVO.INIT.PARALOOKS (|HardwareWidth| |DefaultParagraphLooks|) BRHC/LAYOUT/TERMINAL (RETURNTTC -RETURNBTC) %ARRAY-TYPE-TABLE (%ARRAY-TYPE-TABLE) CL:MOST-NEGATIVE-FIXNUM (CL:MOST-NEGATIVE-FIXNUM) -\\FM.EDIT-WORDDELETE (ITEMWIDTH STRINGPTR TAILPTR) \\PROCESS.GO.TO.SLEEP (\\RUNNING.PROCESS) -|\\PFCreateVols| (|\\DFSLogicalVolumes| |\\DFSLogicalVolumeHash| |\\PFInitialized|) COMPILER::*VAR-NUMBER* - (COMPILER::*VAR-NUMBER*) \\TEDIT.MENU.INIT (TEDIT.MENUDIVIDER.SPEC TEDIT.EXPANDEDMENU.SPEC -TEDIT.CHARLOOKSMENU.SPEC TEDIT.PARAMENU.SPEC TEDIT.PAGEMENU.SPEC) ONEDINSPECT.DEFAULT.TITLECOMMANDFN ( -IT) \\TEDIT.HARDCOPY.FORMATLINE (*TEDIT-CURRENTPARA-CACHE* *TEDIT-CACHED-FMTSPEC*) PACK ( -\\\\PNAMESTRING.GLOBALRESOURCE) \\HDCPYDISPLAYINIT (\\HDCPYDISPLAYIMAGEOPS) TTYIN.READ?=ARGS ( -\\?PARAMS \\TTSCRATCHFILE.GLOBALRESOURCE) SYSBUF (\\SYSBUF) CL:LONG-FLOAT-NEGATIVE-EPSILON ( -CL:LONG-FLOAT-NEGATIVE-EPSILON) CL::%NO-COPIER (CL::%NO-COPIER) WINDOWWORLD (\\TOPWDS \\SCREENBITMAPS -\\SCREENS |WindowTitleDisplayStream| \\DEFAULTTTYDISPLAYSTREAM |\\TopLevelTtyWindow| PROMPTWINDOW -|\\LastInWindow| |\\LastWindowButtons| |\\LastCursorPosition|) D-ASSEM::*DCODE* (D-ASSEM::*DCODE*) -LINBUF (\\LINBUF) CHAT.UNDERLINE.METHOD (CHAT.UNDERLINE.METHOD) CL::%LOG-QPOLY (CL::%LOG-QPOLY) -TTSKIPSEPR (\\BUFFER) PACKAGE-ENABLE (*PER-EXEC-VARIABLES* *DEFAULT-MAKEFILE-ENVIRONMENT* *PACKAGE*) -%LIT-ARRAY-TABLE (%LIT-ARRAY-TABLE) D-ASSEM::*LEVEL* (D-ASSEM::*LEVEL*) CLISPFOR (ATTEMPTFLG -CLISPCHANGE NOFIXFNSLST0 NOFIXVARSLST0 \#UNDOSAVES) COMPILEMODE (COMPILEMODE) CL::*DESCRIBE-INDENT* ( -CL::*DESCRIBE-INDENT*) SPECVARS (SPECVARS LOCALVARS) *WHO-LINE-LAST-DIRECTORY* ( -*WHO-LINE-LAST-DIRECTORY*) XCL::*PROFILES* (XCL::*PROFILES*) PRIME-HASHTABLE-SIZES ( -PRIME-HASHTABLE-SIZES) CL:MOST-POSITIVE-DOUBLE-FLOAT (CL:MOST-POSITIVE-DOUBLE-FLOAT) -XCL::PPRINT-DEFINER-RECURSE (TAIL) CL:MOST-POSITIVE-FIXNUM (CL:MOST-POSITIVE-FIXNUM) -*SPECIAL-BINDING-MARK* (*SPECIAL-BINDING-MARK*) HISTORYFIND1 (L HISTORYFLG) FINDFN (EXPR BREAKFLG -TYPE-IN? TAIL) CL::%E (CL::%E) *WHO-LINE-DIRECTORIES* (*WHO-LINE-DIRECTORIES*) COMPILER::*TAG-NUMBER* -(COMPILER::*TAG-NUMBER*) XCL::*PROFILE-VARIABLES* (XCL::*PROFILE-VARIABLES*) FORWARD.DELETE.TO ( -\\ENDBUFFER) CHANGEBACKGROUNDBORDER (\\CURRENTBACKGROUNDBORDER) ASSURE.PUP.READY (\\PUP.ROUTING.TABLE -\\PUP.READY \\LOCALPUPNETHOST \\OLDPUPHOST# \\PUPROUTER.PROBECOUNT \\PUPROUTER.PROBETIMER) -\\PSW.SELECTED (SELECTEDPROC) RECORDTRAN (CLISPCHANGE) \\ETHEREVENTFN (\\PUP.READY \\NS.READY -\\IP.READY \\3MBLOCALNDB \\LOCALNDBS \\10MBLOCALNDB) PACKAGE-MAKE (*INTERLISP-PACKAGE* *LISP-PACKAGE* -*KEYWORD-PACKAGE*) %LIT-ARRAY-TYPES (%LIT-ARRAY-TYPES) XCL::*WHERE-IS-IGNORE-DEFINE-TYPES* ( -XCL::*WHERE-IS-IGNORE-DEFINE-TYPES*) CLISPCOND (SEG) HPINITRDTBL (HPRINTRDTBL) CL:CHAR-SUPER-BIT ( -CL:CHAR-SUPER-BIT) L-CASE (\\\\PNAMESTRING.GLOBALRESOURCE) CL:MOST-POSITIVE-SINGLE-FLOAT ( -CL:MOST-POSITIVE-SINGLE-FLOAT) CL::%DEFSTRUCT-CONSP-OPTIONS (CL::%DEFSTRUCT-CONSP-OPTIONS) -*ED-OFFERS-PROPERTY-LIST* (*ED-OFFERS-PROPERTY-LIST*) D-ASSEM::+SLOW-FVAR-SLOT+ (D-ASSEM::+SLOW-FVAR-SLOT+ -) TERMINAL-INPUT (*STANDARD-INPUT* \\LINEBUF.OFD) CL:MOST-NEGATIVE-SHORT-FLOAT ( -CL:MOST-NEGATIVE-SHORT-FLOAT) INTERRUPTABLE (\\INTERRUPTABLE) CHAT.STARTUP (CHAT.ALLHOSTS -CHAT.HOSTMENU CHAT.HOST.TO.PROTOCOL \\CURRENTKEYACTION) CMLSYMBOLS.FNNAMES (CMLSYMBOLS.FNNAMES) -CL::STOP-STEPPING (CL::*STEP-STATE* *EVALHOOK*) BRKDWNINIT (BRKDWNLENGTH BDLST BDSINK BDPTR) -CHAT.WAIT.TIME (CHAT.WAIT.TIME) MSCOMMAND (S) OPT.DS1 (TAGS ICNT) CL:MOST-POSITIVE-LONG-FLOAT ( -CL:MOST-POSITIVE-LONG-FLOAT) READATABASE (MSDBEMPTY) *PER-EXEC-VARIABLES* (*PER-EXEC-VARIABLES*) -|\\PFCreatePhysicalVolume| (|\\PFInitialized| |\\PhysVolumePage|) CARETRATE (\\CARET.ON.RATE -\\CARET.OFF.RATE) CARET (\\CARET.DEFAULT) MAKEFILE1 (NOTCOMPILEDFILES) |\\VAMBufferInit| ( -|\\VAMbuffer| |\\VAMbufferVolume| |\\VAMbufferVolumePage| |\\VAMbufferDirty|) PFI.HANDLE.* ( -*PFI-PENDING-COMMENTS*) D-ASSEM::*HUNK-SIZE* (D-ASSEM::*HUNK-SIZE*) D-ASSEM::+MAX-ALLOWABLE-SPECIAL-COUNT+ - (D-ASSEM::+MAX-ALLOWABLE-SPECIAL-COUNT+) \\INIT.POWERS.OF.TEN (\\POWERS.OF.TEN EXTPOWERS) -*ATTACHED-WINDOW-COMMAND-SYNONYMS* (*ATTACHED-WINDOW-COMMAND-SYNONYMS*) CMLSYMBOLS.MACROS ( -CMLSYMBOLS.MACROS) /CNDIR (/LAST.CONNECTED.DIRECTORY) CL:SINGLE-FLOAT-EPSILON (CL:SINGLE-FLOAT-EPSILON -) DUMPDATABASE1 (DUMPEDFLG) CL:MOST-NEGATIVE-LONG-FLOAT (CL:MOST-NEGATIVE-LONG-FLOAT) COMPILER::GENCODE-LET - (COMPILER::*STACK-NUMBER* COMPILER::*AVAILABLE-LEXICAL-NAMES*) COMPILER::CLOSURE-ANNOTATE-BLOCK ( -COMPILER::*NEED-STORAGE*) \\AUTHENTICATION.FIND.SERVER (\\AUTHENTICATION.SERVER.CACHE) MSSTOREDATA ( -MSDBEMPTY) HASHTABLE-SIZE-LIMIT (HASHTABLE-SIZE-LIMIT) CL:SINGLE-FLOAT-NEGATIVE-EPSILON ( -CL:SINGLE-FLOAT-NEGATIVE-EPSILON) ANALYZE-TESTS (ANALYZE-TESTS) |\\InitCurveBrushes| ( -|\\SingleBitBitmap|) \\STARTDISPLAY (|ScreenBitMap| |\\DisplayStarted| WHOLESCREEN WHOLEDISPLAY -\\CURSORDESTINATION \\CURSORDESTWIDTH \\CURSORDESTHEIGHT \\CURSORDESTRASTERWIDTH \\OLDSCREENHEIGHT -\\OLDSCREENWIDTH) SEDIT::MUTATE (SEDIT::MUTATE-CANDIDATE) DBG::*DEBUGGER-TERMINAL-TABLE* ( -DBG::*DEBUGGER-TERMINAL-TABLE*) \\FTP.OPEN.CONNECTION (\\FTPCONNECTIONS) CL:SHORT-FLOAT-EPSILON ( -CL:SHORT-FLOAT-EPSILON) CL::%NO-CONSTRUCTOR (CL::%NO-CONSTRUCTOR) COMP.TOPLEVEL.COMPILE (LBCNT FREELST - SUBFNFREEVARS COMFNS) PRETTYCOM1 (DWIMLOADFNSFLG) *UNINTERNED-PACKAGE-INDEX* ( -*UNINTERNED-PACKAGE-INDEX*) CL:PI (CL:PI) *EXEC-COMMAND-TABLE* (*EXEC-COMMAND-TABLE*) -CMLSYMBOLS.TYPENAMES (CMLSYMBOLS.TYPENAMES) \\CURVE (DASHCNT DASHON DASHTAIL \\OLDERX \\OLDERY \\OLDX -\\OLDY \\CURX \\CURY) CLISPATOM2A (NOFIXFNSLST0 NOFIXVARSLST0 TENTATIVE) BAKTRACE (CLEARSTKLST) -COMP.PROG (LBCNT) D-ASSEM::+MAX-ALLOWABLE-PVAR-COUNT+ (D-ASSEM::+MAX-ALLOWABLE-PVAR-COUNT+) -CL:CHAR-CONTROL-BIT (CL:CHAR-CONTROL-BIT) *WHO-LINE-PROFILE-ENTRY* (*WHO-LINE-PROFILE-ENTRY*) DV ( -*LAST-DV*) DEFAULT.INSPECTW.TITLECOMMANDFN (|ItemWCommandMenu| IT) ADDPME (NEXTPM NEXTVMEM) DO.EDIT.PP - (\\ENDBUFFER \\CURSOR \\TTSCRATCHFILE.GLOBALRESOURCE) MSINTERPRET (MSTHOSE) CL::%LOG-PPOLY ( -CL::%LOG-PPOLY) CLISP3 (NEGFLG SEG) HVFWDREAD (BACKREFCNT BACKREFS) CMLSYMBOLS.VARS (CMLSYMBOLS.VARS) -UNDOLISPX3 (EDITQUIETFLG MAXLEVEL CLISPTRANFLG) \\D01.ASSIGNBUFFERS (\\EMBUFVP \\EMBUFBASE \\EMBUFRP -\\TELERAIDBUFFER \\EMUBUFFERS \\#EMUBUFFERS \\#SWAPBUFFERS \\#DISKBUFFERS \\EMUDISKBUFFERS -\\EMUDISKBUFEND \\EMUSWAPBUFFERS) \\HANDLE.PUP.ROUTING.INFO (\\PUPROUTER.PROBECOUNT) BITMAPOBJ.SNAPW ( -*INSERT-BITMAP*) CL:CHAR-CODE-LIMIT (CL:CHAR-CODE-LIMIT) CL:MOST-NEGATIVE-SINGLE-FLOAT ( -CL:MOST-NEGATIVE-SINGLE-FLOAT) RECORDECLBLOCK (ALLOCATIONS) \\TEDIT.FOREIGN.COPY? (TEDIT.COPY.PENDING) - |\\CreateScreenBitMap| (|\\MaxScreenPage|) SET.TTYINEDIT.WINDOW (TTYINEDITWINDOW) -\\NSFILING.DISCARD.SESSION (\\NSFILING.ACTIVE.SESSIONS) PPT (PRETTYTRANFLG) CMLSYMBOLS.SPECIALFORMS ( -CMLSYMBOLS.SPECIALFORMS) D-ASSEM::*PVAR-COUNT* (D-ASSEM::*PVAR-COUNT*) SIGNAL (*LAST-CONDITION*) -OPT.RETOPT1 (ANY) END.DELETE.MODE (\\DELETING) MAX.SMALLFIXP (MAX.SMALLFIXP) -CMLSYMBOLS.LAMBDA.LIST.KEYWORDS (CMLSYMBOLS.LAMBDA.LIST.KEYWORDS) OPT.RETMERGE (LBCNT) -\\MAPPNAME.INTERNAL (\\\\MAPPNAMESTREAM.GLOBALRESOURCE) \\MAIKO.ASSIGNBUFFERS (\\EMBUFBASE \\EMBUFVP -\\EMBUFRP \\TELERAIDBUFFER \\#SWAPBUFFERS \\#EMUBUFFERS \\#DISKBUFFERS \\EMUSWAPBUFFERS \\EMUBUFFERS) -CL:LEAST-NEGATIVE-LONG-FLOAT (CL:LEAST-NEGATIVE-LONG-FLOAT) OPENNSOCKET (\\NSOCKETS) -*DEBUGGER-COMMAND-TABLE* (*DEBUGGER-COMMAND-TABLE*) CHAT.RECONNECT (CHAT.REOPENMENU) PACKAGE-DISABLE ( -*PACKAGE*) DIRFILENAME (FILE FILENAME) \\SHOW.ARRAY.FREELISTS (\\ABSTORAGETABLE) MSTRYSPELL (SPELLING) - \\24DISPLAYINIT (\\24DISPLAYIMAGEOPS \\24DISPLAYFDEV) \\NSFILING.LOGIN (\\NSFILING.ACTIVE.SESSIONS) -CL:SHORT-FLOAT-NEGATIVE-EPSILON (CL:SHORT-FLOAT-NEGATIVE-EPSILON) |\\PFCreateFileDescriptors| ( -|\\PFInitialized| |\\PFLogicalVolumeFileD| |\\PFMarkerFileD| |\\PFFreeFileD| |\\PFAllocationMapFileD| -|\\PFFileMapFileD|) COURIERTRACE (COURIERTRACEFILE COURIERTRACEFLG) SPY.BUTTON (SPY.BUTTON) -\\M-VMEMSAVE (\\VMEM.PURE.LIMIT) TRACEREGION (TRACEREGION) CMLSYMBOLS.DECLARATORS ( -CMLSYMBOLS.DECLARATORS) TERMINAL-OUTPUT (*STANDARD-OUTPUT* |TtyDisplayStream| \\TERM.OFD) BMOBJ.INIT ( -BITMAPIMAGEFNS) \\TEDIT.CHARLOOKSMENU.CREATE (TEDIT.CHARLOOKS.MENU) CL:CHAR-BITS-LIMIT ( -CL:CHAR-BITS-LIMIT) MAKEISOFORMAT (*XEROXTOISO8859MAP* *ISO8859TOXEROXMAP*) RECORDECLTAIL (ALLOCATIONS -) START.NEW.LINE (\\CURSOR \\ARROW) \\FM.FORMAT (\\FM.GROUP-ID-COUNTER) \\INITBCPLDISPLAY ( -\\BCPLDISPLAY \\TERM.OFD *STANDARD-OUTPUT*) CHECKRECORDNAME (STRUCNAME NAME TAIL CREATEINFO) -SCROLL.HANDLER (|\\LastInWindow|) D-ASSEM::DIGEST-FUNCTION (D-ASSEM::*LOCAL-FN-FIXUPS*) -CL::FUTURE-CITIZENS-OF-XCL (CL::FUTURE-CITIZENS-OF-XCL) \\STOPSCROLL? (\\CURRENTDISPLAYLINE) -XCL::*WHERE-IS-HASH-FILE-SIZE* (XCL::*WHERE-IS-HASH-FILE-SIZE*) *TOTAL-PACKAGES-LIMIT* ( -*TOTAL-PACKAGES-LIMIT*) BRHC/LAYOUT/DAUGHTERS (RETURNTTC RETURNBTC) %CANONICAL-CML-TYPES ( -%CANONICAL-CML-TYPES) CL::*DESCRIBE-DEPTH* (CL::*DESCRIBE-DEPTH*) EDITH (COM READBUF LISPXHISTORY -EDITHIST) CL:MOST-POSITIVE-SHORT-FLOAT (CL:MOST-POSITIVE-SHORT-FLOAT) CL::%SQRT2 (CL::%SQRT2) -HVRPTREAD (RPTCNT RPTVAL) \\CORE.UNPACKFILENAME (ROOT EXT VERS) FIX89A (ATTEMPTFLG) MAKEFILE ( -PRETTYTRANFLG \#UNDOSAVES CLISPIFYPRETTYFLG LASTFILE NOTLISTEDFILES NOTCOMPILEDFILES) CLISPIF ( -ATTEMPTFLG CLISPCHANGE NOFIXFNSLST0 NOFIXVARSLST0 \#UNDOSAVES) PURGEHISTORY (ARCHIVEFLG) -START.CLEARINGHOUSE (\\NS.ROUTING.TABLE.RADIUS NS.SERVER.NAMES.TO.ADDRESSES \\CH.CACHE -LOCAL.CLEARINGHOUSE) ASKUSER$ (KEY) SPY.END (\\PERIODIC.INTERRUPT) EDITCOLUMN (\\HOMECOL) -\\FM.EDIT-SETUPTTBL (\\FM.EDIT-TTBL) LOOKUP.NS.SERVER (NS.SERVER.NAMES.TO.ADDRESSES) CL::%LOG2 ( -CL::%LOG2) EDLOC (UNFIND L) RECORDGENSYM (PATGENSYMVARS) XCL::ADD-WHERE-IS-DATABASE ( -XCL::*WHERE-IS-CASH-FILES*) \\START.PROCESSES (\\RUNNING.PROCESS) BREAKREGIONSPEC (BREAKREGIONSPEC) -VIDEOCOLOR (|\\VideoColor|) EDOR (L) MIN.SMALLFIXP (MIN.SMALLFIXP) POSTSCRIPT.INIT ( -POSTSCRIPTFONTCACHE \\POSTSCRIPT.CHARTYPE \\POSTSCRIPTIMAGEOPS *POSTSCRIPT-NS-HASH*) \\FM.EDIT-BACKUP -(STRINGPTR CHARWIDTH ITEMWIDTH TAILPTR) \\RELEASE.PROCESS (\\PROCESSES) DO.EDIT.COMMAND (\\CURSORCOL -\\CURSOR \\LASTCHAR) DISPLAYSTREAMINIT (|TtyDisplayStream| |\\TopLevelTtyWindow| -\\DEFAULTTTYDISPLAYSTREAM |\\LastTTYLines|) UNDONLSETQ (\#UNDOSAVES) SUBPRINT/ENDLINE (TAIL) -\\LEAFINIT (\\LEAFCONNECTIONLOCK) TB.UNDOSELECTION (SELECTIONSTATE) ADD.PROCESS (\\PROCESSES) -\\PUPGATELISTENER (\\PUPROUTER.PROBECOUNT) MODIFY.KEYACTIONS (\\MODIFIED.KEYACTIONS) INSERT.NODE ( -\\ENDBUFFER) DASSEM.DSTOREFN (CD CODELOC) PROCESSWORLD (\\TTY.PROCESS \\RUNNING.PROCESS \#SCHEDULER# -\\STACKOVERFLOW \\TTY.PROCESS.EVENT \\PROCESS.AFTEREXIT.EVENT \\PROCESSES \\TIMERQHEAD) -CL::%DEFSTRUCT-OPTIONS (CL::%DEFSTRUCT-OPTIONS) \\DSKDISPLAY.CREATE.WINDOW (\\DSKDISPLAY.WINDOW -DSKDISPLAY.POSITION) SETTAIL? (\\LASTAIL \\LASTAILCOL \\LASTAILROW) \\TEDITPARAMENU.CREATE ( -TEDIT.EXPANDEDPARA.MENU) FFILEPOS (\\\\FFDELTA1.GLOBALRESOURCE \\\\FFDELTA2.GLOBALRESOURCE -\\\\FFPATCHAR.GLOBALRESOURCE) |\\VFMMerge1| (|\\VFMxtraBuffer| |mergeFlag|) UPDATESCREENDIMENSIONS ( -SCREENWIDTH SCREENHEIGHT) DIRECTORY (COMTAIL) \\DOSTACKOVERFLOW (\\RECLAIM.COUNTDOWN) \\MAIKO.CONS.UFN - (\\RECLAIM.COUNTDOWN) \\INITBFS (\\SPAREDISKWRITEBUFFER \\SYSDISK \\EMUSCRATCH \\MAXDISKDA\s \\ISFMAP - \\ISFSCRATCHCAS \\ISFSCRATCHDAS \\ISFCHUNKSIZE) DO.SHIFTED.SELECTION (\\LAST.DELETION) -\\SETUPUSERSTACK (\\NEED.HARDRESET.CLEANUP \\RECLAIM.COUNTDOWN) GO.TO.ADDRESSING (\\CURSORROW -\\CURSORCOL) HRULE.DISPLAYFN (WIDTH) COMPSETREAD (READBUF REREADFLG) WBREAK (WBREAK) FIX89 (89CHANGE) -GET.EDIT.BITMAP.MENU (EDIT.BITMAP.MENU) EDITCOM (COM FINDFLAG L) |\\PFEnsureInitialized| ( -|\\PFInitialized|) *NOT-YET-EVALUATED* (*NOT-YET-EVALUATED*) EDITDEFAULT (READBUF COM) -PUSH-KEYWORD-BINDING (%LET-LIST) SEDIT::GET-CONTEXT (SEDIT::CONTEXTS) CALLS (MSRECORDTRANFLG) -CL::%RANDOM-SIZE (CL::%RANDOM-SIZE) GENSYM (\\GS.BUF GENNUM \\GS.NUMLEN \\GS.OGENNUM \\GS.STR) -DASSEM.DASMBIND (CD CODELOC) EDUP (COM L) \\UNITWIDTHSVECTOR (\\UNITWIDTHSVECTOR) -*DEFINITION-HASH-TABLE* (*DEFINITION-HASH-TABLE*) D-ASSEM::+JUMP-SIZES+ (D-ASSEM::+JUMP-SIZES+) -\\IDATESCANTOKEN (*POS*) EDIT* (L LASTAIL) \\TEDIT.APPLY.PARASTYLES (*TEDIT-PARASTYLE-CACHE*) DRIBBLE -(*DRIBBLE-OUTPUT*) DELETELINE (\\ENDBUFFER \\ARROW \\CURSOR) \\CHECKFORSTORAGEFULL (\\STORAGEFULL -\\PENDINGINTERRUPT) OPT.RETOPT (ANY) ANALYZE-REST (%UNBOUNDED-ARG-COUNT %LET-LIST) \\SPY.INTERRUPT ( -\\PERIODIC.INTERRUPT) EDITRAN (L) \\SETIOPOINTERS (\\MACHINETYPE \\EM.MOUSEX \\EM.MOUSEY \\EM.CURSORX -\\EM.CURSORY \\EM.REALUTILIN \\EM.KBDAD0 \\EM.KBDAD1 \\EM.KBDAD2 \\EM.KBDAD3 \\EM.KBDAD4 \\EM.KBDAD5 -\\EM.DISPINTERRUPT \\EM.CURSORBITMAP \\EM.DISPLAYHEAD SCREENWIDTH \\EM.UTILIN) D-ASSEM::+JUMP-CHOICES+ - (D-ASSEM::+JUMP-CHOICES+) MSHASHLIST1 (PREVVALUE) GETNSPRINTER (NS.DEFAULT.PRINTER) FINDATOM (PARENT -SUBPARENT FORMSFLG) \\DL.NEWFAULTINIT (\\RPOFFSET \\REALPAGETABLE \\RPTSIZE) RECORDBIND (BINDINGS) -EDITCOML (UNFIND L EDITLISPFLG LASTP2 LASTP1 COM USERMACROS) *WHO-LINE-TTY-PROC-ENTRY* ( -*WHO-LINE-TTY-PROC-ENTRY*) OUTPUT (*STANDARD-OUTPUT*) MSERASE (MSCHANGEDARRAY MSDATABASELST -MSFILETABLE MSARGTABLE MSDBEMPTY) MAKEROOMFORPME (NEXTPM) ED (XCL::ED-LAST-INFO) CLISPATOM2 (TAIL -ENDTAIL CLISPCHANGE BACKUPFLG TYP TENTATIVE CLTYP) FIXSPELL1 (RESPELLS SIDES) \\TTW1 (\\TOPWDS) -CREATE.PACKET.EXCHANGE.XIP (\\PACKET.EXCHANGE.CNTR) EDITSAVE (EDITHIST EDITLISPFLG) -SPELLFILE.MATCHINGDIRS (DIRHOSTS) CL:CHAR-FONT-LIMIT (CL:CHAR-FONT-LIMIT) EDITCOM1 (EDITLISPFLG -UNDOLST1) COMP.PUSHCALL (LBCNT LEVEL FRAME) CL:CHAR-META-BIT (CL:CHAR-META-BIT) UNDOEDITCOM (COM L) -CL::%NO-PREDICATE (CL::%NO-PREDICATE) \\INIT-MISCN-TABLE (\\MISCN-TABLE) ASKUSERSETUP (KEY -PROMPTSTRING OPTIONS CONFIRMFLG NOECHOFLG NOCASEFLG) CL:CHAR-HYPER-BIT (CL:CHAR-HYPER-BIT) -\\TEXTMENU.TOGGLE.INIT (\\TOGGLEIMAGEFNS) EXEC-EVAL (IT) CL::%DEFAULT-SLOT-TYPE (CL::%DEFAULT-SLOT-TYPE -) INSPECT/ATOM (|InspectPropsMenu|) \\ALLOCBLOCK (\\RECLAIM.COUNTDOWN) EDITTO (L COM TOFLG) -CLISPATOM1A (TENTATIVE) EDRPT (MAXLOOP L) D-ASSEM::+JUMP-RANGE-SIZE-MAP+ (D-ASSEM::+JUMP-RANGE-SIZE-MAP+ -) TTY.PROCESS (\\TTY.PROCESS \\CURRENTKEYACTION) MAKEMACFORMAT (*XEROXTOMACMAP* *MACTOXEROXMAP*) -MAKEINITLAST (MKI.CODELASTPAGE) EDITCOMA (UNDOLST UNDOLST1 COM L EDITLISPFLG LASTP2 LASTP1 UNFIND -MARKLST FINDFLAG) \\DSKDISPLAY.DESTROY.WINDOW (\\DSKDISPLAY.WINDOW) COMPILER::GENCODE-IF ( -COMPILER::*TAG-NUMBER*) COMP.BLOCK (LBCNT) XCL::ADD-PROTOTYPE-FN (XCL::*DEFINITION-PROTOTYPES*) -*EXEC-MAKE-UNDOABLE-P* (*EXEC-MAKE-UNDOABLE-P*) \\GCSCANSTACK (NV) BRKDWNBOXES (BDPTR) -\\DOCOMPRESSVMEM (\\VMEM.INHIBIT.WRITE) EDITSMASH (UNDOLST1) GETDUMMYVAR (DUMMYVARS VARS PROGVARS) -\\EXTENDSTACK (\\STACKOVERFLOW \\PENDINGINTERRUPT) FASL::END-MARK (FASL::END-MARK) \\STOPDISPLAY ( -|\\MaxScreenPage| |\\DisplayStarted|) CL:MOST-NEGATIVE-DOUBLE-FLOAT (CL:MOST-NEGATIVE-DOUBLE-FLOAT) -\\ALLOCMDSPAGE (\\MDSFREELISTPAGE) *DEBUGGER-MENU-ITEMS* (*DEBUGGER-MENU-ITEMS*) FASL::END-OF-DATA-MARK - (FASL::END-OF-DATA-MARK) MSSEEKPHRASE (LASTPARSED S PARSED CONJUNCTIONS LASTADVERB RESETS) %BIT-TYPE -(%BIT-TYPE) SPY.START (\\PERIODIC.INTERRUPT.FREQUENCY \\PERIODIC.INTERRUPT) \\CH.UPDATE.CACHE ( -\\CH.CACHE) EDIT4F1 (N LASTAIL) DELETE.TO.END (\\ENDBUFFER) CL:ARRAY-DIMENSION-LIMIT ( -CL:ARRAY-DIMENSION-LIMIT) EDIT2F (COM) \\CREATE.SYMBOL (|\\AtomFrLst|) TEDIT.UNDO.PARALOOKS ( -TEDIT.PENDINGDEL) DRAWCURVE (\\SYSTEMBRUSHES) EDIT1F (COM LASTAIL) FASL::CHECK-TABLE-SIZE ( -FASL::CHECK-TABLE-SIZE) COMP.EVALFORM (LBCNT LEVEL) DELETETO1 (\\DELETING \\CURSORCOL) -\\DEFINEDISPLAYINFO (\\DISPLAYINFOALIST) MSPRGERR (ERRORS) BREAK-FUNCTION (BROKENFNS XCL::*UNBROKEN-FNS* -) IMAGEFNSCREATE (IMAGEOBJGETFNS) CURSOR.INIT (\\CURSORDESTINATION \\SOFTCURSORUPBM \\SOFTCURSORDOWNBM - \\CURSORDESTLINE \\CURSORDESTLINEBASE \\CURSORDESTWIDTH \\CURSORDESTHEIGHT \\CURSORDESTRASTERWIDTH -\\SOFTCURSORBBT1 \\SOFTCURSORBBT2 \\SOFTCURSORBBT3 \\SOFTCURSORBBT4 \\SOFTCURSORBBT5 \\SOFTCURSORBBT6) - EDITBELOW (COM UNFIND L) SETTERMTABLE (\\PRIMTERMSA \\PRIMTERMTABLE) ADD-USER-SUBR (\\USER-SUBR-LIST) - \\GET.PRIORITY.QUEUE (\\HIGHEST.PRIORITY.QUEUE) FASL::VERSION-RANGE (FASL::VERSION-RANGE) UPDATEFN ( -DEF) EDIT4F2 (NEWFLG) *DEBUGGER-ENTRY-POINTS* (*DEBUGGER-ENTRY-POINTS*) \\INIT-USER-SUBR-TABLE ( -\\USER-SUBR-TABLE) BYTEBLOCKCOMPILE2 (BYTECOMPFLG COMP.GENFN.NUM) INITIALIZEDISPLAYSTREAMS ( -WHOLEDISPLAY \\SYSPILOTBBT \\SYSBBTEXTURE \\GUARANTEEDDISPLAYFONT DEFAULTFONT) MSSETREP (EDITQUIETFLG -S) BRHC/LAYOUT (RETURNTTC RETURNBTC) %CHAR-TYPE (%CHAR-TYPE) CHAT.EMACSCOMMANDS (CHAT.EMACSCOMMANDS) -DOICONWINDOWCOM (|IconWindowMenu|) \\IRM.GET.HASHFILE (\\IRM.HASHFILE) COMPILER::GENCODE-LABELS ( -COMPILER::*CODE*) ENCAPSULATEDIMAGEFNS (ENCAPSULATEDIMAGEFNS) HVBAKREAD (DATATYPESEEN) -\\DL.ASSIGNBUFFERS (\\EMBUFBASE \\EMBUFVP \\EMBUFRP \\TELERAIDBUFFER \\#SWAPBUFFERS \\#EMUBUFFERS -\\#DISKBUFFERS \\EMUSWAPBUFFERS \\EMUBUFFERS) RAIDROOTFRAME (ROOTFRAME) DEFEVAL (\\DEFEVALFNS) -\\MKATOM.FULL (\\STORAGEFULL \\PENDINGINTERRUPT) \\HCPYMODEDISPLAYINIT ( -\\HCPYMODEDISPLAYIMAGEOPS.PRESS \\HCPYMODEDISPLAYIMAGEOPS.INTERPRESS) CL::%DEFAULT-STRUCTURE-INCLUDE ( -CL::%DEFAULT-STRUCTURE-INCLUDE) EDITBF1 (LASTAIL) \\INIT.KEYBOARD.STREAM (\\KEYBOARD.DEVICE -\\KEYBOARD.STREAM) *PREFERRED-READING-SYMBOLS* (*PREFERRED-READING-SYMBOLS*) TTPROMPTCHAR (\\LOC.ROW.0 - \\INITCRLFS \\CURSORROW) DECLARERECORD (USERRECLST) DEFAULT.INSPECTW.PROPCOMMANDFN (|SetPropertyMenu| -) EDITSMASH1 (UNDOLST1) ITEM.WINDOW.SET.STACK.ARG (|SetStackMenu|) FASL::VALUE-TABLE-INCREMENT ( -FASL::VALUE-TABLE-INCREMENT) *WHO-LINE-SHOW-ACTIVE-ENTRY* (*WHO-LINE-SHOW-ACTIVE-ENTRY*) -\\M44DOEXTENDVMEMFILE (\\LASTVMEMFILEPAGE) \\CHANGE.ETHER.TRACING (\\RAWTRACING) DIRECTORY.PARSE ( -FILEGROUP) SEDIT::INITIALIZE-LISTS (SEDIT::TYPES SEDIT::TYPE-LIST SEDIT::TYPE-DOTLIST SEDIT::TYPE-QUOTE -) *WHO-LINE-ACTIVE-TIMER* (*WHO-LINE-ACTIVE-TIMER*) CL::*GENSYM-COUNTER* (CL::*GENSYM-COUNTER*) -COMP.PUSHNILS (LBCNT LEVEL FRAME) POSTINITARRAYS (\\FREEBLOCKBUCKETS) XCL:UNADVISE-FUNCTION ( -SI::*UNADVISED-FNS* ADVISEDFNS) ANALYZE-PARAMETER (%LET-LIST) TEDIT.UNDO.LOOKS (TEDIT.PENDINGDEL) -FASL::INITIAL-VALUE-TABLE-SIZE (FASL::INITIAL-VALUE-TABLE-SIZE) INTERLISPMODE ( -*DEFAULT-MAKEFILE-ENVIRONMENT*) COMPILE-FILE-SCAN-FIRST (FIRSTFORMS) CL::*GENTEMP-COUNTER* ( -CL::*GENTEMP-COUNTER*) SEDIT::INITIALIZE (MARKASCHANGEDFNS SEDIT::TYPES SEDIT::TYPE-ROOT -SEDIT::TYPE-UNKNOWN SEDIT::TYPE-GAP SEDIT::TERMINAL-TABLE SEDIT::BASIC-GAP SEDIT::ARGS-GAP SEDIT::BODY-GAP - SEDIT::PENDING-SELECTION SEDIT::INITIAL-SELECTION SEDIT::SCRATCH-SELECTION SEDIT::PENDING-CARET -SEDIT::SELECTION-PENDING? SEDIT::TEMP-POINT SEDIT::TEMP-SELECTION) VALUOF-EVENT (LINE) TTY/EDITL ( -READBUF EDITIME) MSEAT (S) *WHO-LINE-READTABLE-ENTRY* (*WHO-LINE-READTABLE-ENTRY*) -CL:LAMBDA-LIST-KEYWORDS (CL:LAMBDA-LIST-KEYWORDS) EDITNTH (COM) SCRATCHCONS (\\LASTAIL) -XCL:*TRACE-VERBOSE* (XCL:*TRACE-VERBOSE*) TTCRLF.ACCOUNT (\\CURSORROW \\LOC.ROW.0 \\BMARG \\CURSORCOL) - HVFWDCDREAD (BACKREFCNT BACKREFS) RAIDSTACKCMD (FRAME# ROOTFRAME) \\STKMIN (\\OPSTACKEFFECT -\\OPLENGTH) *DOCUMENTATION-HASH-TABLE* (*DOCUMENTATION-HASH-TABLE*) SEDIT::REPLACE-CHARS ( -SEDIT::BUTTON-STRING-NODE SEDIT::BUTTON-STRING) PF (LASTWORD) OPT.DELTAGREF (CL:LABELS) CL::%EXP-TABLE - (CL::%EXP-TABLE) CL:EVAL (CL::*SKIP-EVALHOOK*) EMBEDPROG (BINDINGS) RESETUNDO (LISPXHIST) -\\GETMISCSOCKET (\\MISC.SOCKET) FASL::*BLOCK-LEVEL* (FASL::*BLOCK-LEVEL*) \\TEDIT.APPLY.STYLES ( -*TEDIT-CURRENTPARA-CACHE* *TEDIT-PARASTYLE-CACHE*) CL::%DEFAULT-DEFSTRUCT-TYPE ( -CL::%DEFAULT-DEFSTRUCT-TYPE) INSPECT/BITMAP (|InspectBitmapMenu|) PRINTLEVEL (*PRINT-LEVEL* -*PRINT-LENGTH*) \\FORMATLINE (*TEDIT-CURRENTPARA-CACHE* *TEDIT-CACHED-FMTSPEC*) -COMPILER::FRAME-ANNOTATE-TAGBODY (COMPILER::*REFERENCES*) CHAT.DISPLAYTYPES (CHAT.DISPLAYTYPES) -HASHBEFORECLOSE (SYSHASHFILE SYSHASHFILELST) CLOSEF (*STANDARD-INPUT* *STANDARD-OUTPUT*) -CL::*GENSYM-PREFIX* (CL::*GENSYM-PREFIX*) PF* (**COMMENT**FLG) MARGINBAR.INIT (MARGINBARIMAGEFNS) -MSBINDVAR (VARS) \\KEYHANDLER1 (\\KEYBUFFERING \\PENDINGINTERRUPT \\TIMER.INTERRUPT.PENDING) LISPX (IT - EDITQUIETFLG LISPXCOMS HISTORYCOMS REDOCNT READBUF) CLISPATOM (CHARLST) *TRACE-DEPTH* (*TRACE-DEPTH*) - DOATTACHEDWINDOWCOM (|WindowMenu|) EDIT4F3 (FLG) BREAKDOWN (BRKDWNLST BDPTR) SEDIT::INTERNAL-WRAPPERS - (SEDIT::INTERNAL-WRAPPERS) BRKDWNCONSES (BDPTR) COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION ( -COMPILER::*PROCESSED-FUNCTIONS* COMPILER::*UNKNOWN-FUNCTIONS*) *WHO-LINE-ACTIVE-PERIOD* ( -*WHO-LINE-ACTIVE-PERIOD*) COMPILER::GENCODE-GO (COMPILER::*NON-LOCALS*) BREAKLINE (\\ARROW \\CURSOR) -RATOM (\\\\PNAMESTRING.GLOBALRESOURCE) CLDISABLE (NOFIXFNSLST0 NOFIXVARSLST0 CLISPCHARS CLISPCHARRAY) -LISPXUNREAD (READBUF) INFILECOMSVAL (LITERALS VAL) COMP.STUNBIND (LEVEL FRAME) CHECKSYNONYM (S) EDITL1 - (FINDFLAG COM L0 COM0 UNDOLST EDITHIST0 LISPXBUFS) XCL:TRACE-FUNCTION (BROKENFNS XCL::*TRACED-FNS* -XCL::*UNBROKEN-FNS*) CL:CALL-ARGUMENTS-LIMIT (CL:CALL-ARGUMENTS-LIMIT) LISPXREAD (READBUF REREADFLG -CTRLUFLG) CL::%EXP-POLY (CL::%EXP-POLY) IN-READTABLE (*READTABLE*) CL:LAMBDA-PARAMETERS-LIMIT ( -CL:LAMBDA-PARAMETERS-LIMIT) PAINTW.READCOMMAND (PAINTCOMMANDMENU) CURSORSCREEN (\\CURSORSCREEN) -%TWOD-ARRAY (%TWOD-ARRAY) \\10MB.CREATENDB (\\10MBTYPE.TRANSLATIONS) LOWERCASE (CHCONLST) -COMPILER::GENCODE-BLOCK (COMPILER::*TAG-NUMBER* COMPILER::*STACK-NUMBER*) \\INITBIGNUMS (\\BIG.0 -\\BIG.1 MIN.INTEGER MAX.INTEGER) COMPERRM (EMFLAG) SEDIT::*FORMAT-ALIAS-DEPTH-LIMIT* ( -SEDIT::*FORMAT-ALIAS-DEPTH-LIMIT*) UPPERCASEARRAY (UPPERCASEARRAY) FILEPKGCOM (FILEPKGCOMSPLST -PRETTYDEFMACROS) DASSEM.COUNTVARS (VARCOUNT) \\PERIODICALLY-WHO-LINE-SHOW-ACTIVE ( -*WHO-LINE-ACTIVE-TIMER*) |\\LFCreateDevice| (|\\LFdevice|) CL::%INV-2-SQRT3 (CL::%INV-2-SQRT3) -TEDIT.DISPLAYTEXT (\\PRIMTERMSA) SCANFILE0 (DICT ADR) INITIALIZE-SHELL-DEVICE (*SHELL-DEVICE*) -%MAXTHINCHAR (%MAXTHINCHAR) HISTORYFIND (LASTHISTORY HISTORYFLG) SPY.OVERFLOW (SPY.NEXT SPY.OVERFLOWED -) SI::NLSETQ-PROCEED-CASE (SI::NLSETQ-PROCEED-CASE) \\FINDOP (\\OPCODEARRAY) SEDIT::INITIALIZE-COMMENTS - (SEDIT::TYPES SEDIT::TYPE-COMMENT SEDIT::TYPE-COMMENT-WORD) SETINITIALS (INITIALS FIRSTNAME) -*PACKAGE-FROM-INDEX* (*PACKAGE-FROM-INDEX*) \\ALLOCATE.ETHERPACKET (\\NEWPACKETCOUNTER) -PFI.HANDLE.DEFDEFINER (*PFI-TYPES* PRETTYPRINTMACROS) \\SUBREAD (\\RBFLG -\\\\PNAMESTRING.GLOBALRESOURCE) ANALYZE-KEY (%LET-LIST) |\\VFMClearBuffers| (|\\VFMbufferPool|) -FINDFIELDUSAGE (FIELD.USAGE) ADDCHAR (\\CURSOR \\CURSORCOL) CURSOR (\\CURSORHOTSPOTX \\CURSORHOTSPOTY) - SET-READTABLE-INTERACTIVELY (*READTABLE*) \\VECFONTINIT (|\\VecFontDir|) \\TRANSFERPAGE ( -\\LASTACCESSEDVMEMPAGE) \\BASEBYTES.IO.INIT (\\BASEBYTESDEVICE) ICMLARRAY.GETMENUWGROUP (*PRINT-ARRAY* -) |\\VFMPutNext| (|\\VFMoldPtr| |\\VFMlowPtr|) \\PRINTADDR (\\\\NUMSTR.GLOBALRESOURCE -\\\\NUMSTR1.GLOBALRESOURCE) %GENERAL-ARRAY (%GENERAL-ARRAY) RAIDCOMMAND (FRAME# VPRINTLEVEL ALINKS?) -INFILECOMSPROP (VAL) \\CANONICALIZE.PUP.HOSTNAME (\\HOSTNAMES) \\RESETSTACK0 (\\SAVED.USER.CONTEXT -\\KBDSTACKBASE \\MISCSTACKBASE \\NEED.HARDRESET.CLEANUP) TTYIN.SCRATCHFILE (TTYINEDIT.SCRATCH) -OPT.DELCODE (ANY) STRING.EQUAL (UPPERCASEARRAY) CL::%2-SQRT3 (CL::%2-SQRT3) SEPRCASE (CLISPCASEARRAYS -SEPRCASEARRAYS) \\ASSURE.FPTOVP.PAGE (\\NEWVMEMPAGEADDED) SEDIT::SETUP-PROFILE (*READ-BASE* -*READ-SUPPRESS* *PACKAGE* *PRINT-ESCAPE* *PRINT-PRETTY* *PRINT-CIRCLE* *PRINT-RADIX* *PRINT-GENSYM* -*PRINT-ARRAY* XCL:*PRINT-STRUCTURE*) CHAT.CHOOSE.PHONE.NUMBER (CHAT.PHONE.NUMBER.MENU -CHAT.PHONE.NUMBERS) GRAPHERIMAGEFNS (GRAPHERIMAGEFNS) \\CENTICLOCK (\\CENTICLOCKFACTOR) \\CARET.DOWN ( -\\CARET.UP) COMPILER::GENCODE-CATCH (COMPILER::*TAG-NUMBER* COMPILER::*STACK-NUMBER*) PRESSFILEP ( -PRESS-STREAM) STOPSCAN? (CLTYP) CNDIR (\\CONNECTED.DIRECTORY *DEFAULT-PATHNAME-DEFAULTS*) EDITL0 ( -LISPXBUFS) ERASEPROPS (SMASHPROPSLST1) TEDIT.COPY (TEDIT.COPY.PENDING) DWIMIFYFNS (NOFIXFNSLST0 -NOFIXVARSLST0) RECORD.FIELD.VALUE0 (FIELD.USAGE) SEDIT::MENU-CLOSEFN (SEDIT::MENUS) -\\CH.CHECK.CLEARINGHOUSE (CH.DEFAULT.DOMAIN CH.DEFAULT.ORGANIZATION LOCAL.CLEARINGHOUSE) INPUT ( -*STANDARD-INPUT*) BELOWMARKER (BELOWCNT) |\\VFMInsert1| (|splitFlag|) SETREADTABLE (*READTABLE*) -PRINOPEN (MAKEMAP) FASL:SIGNATURE (FASL:SIGNATURE) INITIALEVALQT (BOOTFILES) CCCSUBFN? (ALL-CODE-BASES - SUBMAPS) COMPILER::*PREDICATE-CONTEXT* (COMPILER::*PREDICATE-CONTEXT*) CL::%SQRT3 (CL::%SQRT3) -\\TOP-LEVEL-READ (\\\\PNAMESTRING.GLOBALRESOURCE) \\IDLE.PROMPTING.WINDOW (\\IDLE.PASSWORD.SET) -COMP.CALL (NLAMS1 ALAMS1) CLISPATOM0 (SUBPARENT \#UNDOSAVES NOFIXVARSLST0 CLISPCHANGE) PRINSHUT ( -MAKEMAP) DO.CRLF (\\CURRENTDISPLAYLINE) DELETETO (\\DELETING \\CURSORCOL \\CURSOR \\ENDBUFFER) WTFIX1 -(FAULTPOS CLEARSTKLST FAULTFN VARS FAULTX LCASEFLG CLISPFLG CLISPCHANGE) \\MEDW.CURSOR ( -\\CURSORHOTSPOTX \\CURSORHOTSPOTY) INITBITMASKS (BITMASKARRAY NOTBITMASKARRAY 4BITMASKARRAY -NOT4BITMASKARRAY) \\ADDOFD (\\OPENFILES) USEREXEC (READBUF READBUFSOURCE REREADFLG) -*SHORT-BACKTRACE-FILTER* (*SHORT-BACKTRACE-FILTER*) \\INSTALL.EXTERNALFORMAT ( -*SUPPORTED-EXTERNALFORMATS* *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT*) |\\UFSPrintTypeMenu| ( -|FileTypeMenu|) CL::%LOG-BASE2-E (CL::%LOG-BASE2-E) \\DOBUFFEREDTRANSITIONS (\\KEYBUFFERING -\\PENDINGINTERRUPT) INIT.CURSOR (\\LOC.ROW.0 \\BMARG \\CURSORROW \\CURSORCOL) SEDIT::CHANGE-PRINTBASE -(*PRINT-BASE* *PRINT-RADIX*) EVALQT (TOPLISPXBUFS) SETREADFN (LISPXREADFN) \\CHARHI (\\CHARHI) -DWIMLOADFNS? (SIDES) PFI.PRINT.BITMAP (*PFI-BITMAP-BASELINE*) CL:READ (\\\\PNAMESTRING.GLOBALRESOURCE) - CLOSENSOCKET (\\NSOCKETS) CHAT (CHAT.HOSTMENU) SETFONT (\\DEDITFONT# SPACEWIDTH) COMP.STBIND (FRAME -LEVEL) COMP.MAP (LBCNT LEVEL FRAME) OPT.LABELNTHPR (LBCNT) SEDIT:*EDIT-FN* (SEDIT:*EDIT-FN*) -\\CREATE.TTYDISPLAYSTREAM (\\TTYREGIONOFFSETSPTR \\TTYWINDOW *STANDARD-OUTPUT*) -*WHO-LINE-UPDATE-INTERVAL* (*WHO-LINE-UPDATE-INTERVAL*) \\REMOVE.EXTERNALFORMAT ( -*SUPPORTED-EXTERNALFORMATS* *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT*) \\BITBLT.BITMAP ( -\\BBSCRATCHTEXTURE) INTERRUPTED (\\PENDINGINTERRUPT) XCL::*WHERE-IS-CASH-SIZE* (XCL::*WHERE-IS-CASH-SIZE* -) \\DELETEOFD (\\OPENFILES) COPYVM (\\VMEM.INHIBIT.WRITE) WHO-LINE-SHOW-ACTIVE ( -*WHO-LINE-ACTIVE-TIMER*) FLTFMT (\\FLOATFORMAT) \\RTP.CLEANUP (\\BSPSOCKETS) \\BQUOTE.BREAKRESET ( -\\INBQUOTE) \\SAVEVMBACKGROUND (\\DIRTYPAGEHINT) RESETSAVE (SI::*RESETFORMS*) LISPXFIND (EDITQUIETFLG) - SI::*BACKQUOTE-LEVEL* (SI::*BACKQUOTE-LEVEL*) COMPILER::FRAME-ANNOTATE-RETURN (COMPILER::*REFERENCES* -) \\INTERRUPTED (\\PENDINGINTERRUPT) LAYOUTSEXPR1 (RESULT) \\FLUSHPAGE (\\NEWVMEMPAGEADDED -\\DIRTYPAGEHINT) MAKECOM (COM) EDITBF (COM UNFIND L) TTPRIN1 (\\CURSORCOL) \\STRINGSTREAM.INIT ( -\\STRINGSTREAM.FDEV) COMP.DELPOP (LEVEL CODE) OPT.LBDEL (CL:LABELS) *DEFAULT-PUSH-EXTENSION-SIZE* ( -*DEFAULT-PUSH-EXTENSION-SIZE*) BCOMPL3 (NOTCOMPILEDFILES) |MaxBkMenuWidth| (|MaxBkMenuWidth|) -MSINTERPA (V) \\GC.HANDLEOVERFLOW (\\RECLAIM.COUNTDOWN) CLISPFORVARS (FIRSTI.V. I.V. MAKEPROGFLG VARS -IVINITFLG INITVARS UNDOLST I.S.TYPE) INFILECOMTAIL (DWIMLOADFNSFLG) DEFPRINT (\\DEFPRINTFNS) -SEDIT::CHANGE-PACKAGE (*PACKAGE*) FIXATOM1 (FAULTPOS) \\PEEKPUP (\\PEEKPUPNUMBER PUPTRACEFILE -PUPTRACEFLG) \\CH.FIND.ORG.SERVER (\\CH.CACHE) NIL -SET \\BLTSHADE.BITMAP (|left| |bottom| |top| |right| DESTINATIONNBITS DESTINATIONLEFT -DESTINATIONBOTTOM TEXTURE HEIGHT) TEDIT.COPY.PARALOOKS (LOOKS LEN) LAST (XX X) \\FTP.ERRORHANDLER ( -OUTSTREAM TMP) RCOMP3 (TYPE TEM1 TEM2) \\CLEARCELLS (BASE NCELLS) \\HARDRESET-CLEANUP1 (HEADER NT -NILSTART VAR0CODE PVARBASE VAR VAR# NT1 NT2 OP ERRORS-SEEN INFO SLOT NEXT) SIMPLEPRINT (I N X) -\\COURIER.REP.BOUT (X TAIL) TWODINSPECT.REPAINTFN (WINDOWREGION ROWPROP MARK STARTROWPROPS -STARTVERTMARKS LASTROWPROP COLUMNPROP STARTCOLUMNPROPS STARTHORZMARKS LASTCOLUMNPROP XCL:*PROFILE* -VMARK HMARK) HARDCOPYREGION.TOPRINTER (PRINTERTYPE PRINTERCHOICE REGION) PRINTPACKETDATA (OFFSET MACRO - DATATYPE TMP TILOFFSET REPEATMACRO SEPR FINALPRINT CHAR) DOERROR (MSG AT) FB.THINCOMMAND (FILES -TBROWSER NOW ONEDAY SORT# NDELETED TAIL FILE DATA TIMESTAMP CREATIONDATE THISNAME \#DELETED LASTNAME -LASTTIMESTAMP) NS.ECHOUSER (NSOC OXIP OXIPBASE I ECHOXIPLENGTH INTERVAL NTIMES ECHOSTREAM EVENT IXIP -XIPBASE) CL::%ASIN-FLOAT (CL::FX) VARIABLES (N L) RENAMEFILE (OLDFILE NEWFILE) \\HCPYMODEBLTCHAR (CURX - CHARWIDTH MICARIGHT LOCAL1 RIGHT LEFT SOFTCURSORUP DISPINTERRUPT) ADD.BORDER.TO.BITMAP (NEW.BITMAP) -\\OUTCHARFN.PRESS (XPOS CHARCODE NEWXPOS CLIPPINGREGION) SIMPLE.FINDFILE (DIR) RESTART.ETHER (PROC) -OPT.ONLYMEMB (Y) \\TEXTSTREAMBOUT (TEXTLEN WINDOW SEL CH# CURLINE FONT L1 LN PS PC OFFST) \\COPYSYS ( -FILE HOST FULLNAME VAL) COMPSET (FILE) FILES? (FILE CHANGES PRINTED CH TB TYPE FLG FILES) -|\\VAMFindFreePages| (|volPage#| |filePage#|) \\TEDIT.REPAINTFN (WHEIGHT LINES LINE FIRSTCH#) -SCALEPAGEUNITS (TVAL) TWODINSPECT.BUTTONEVENTFN (XCL:*PROFILE*) HARDCOPYREGION.TOFILE (REGION) -\\TEDIT.ORIGINAL.WINDOW.TITLE (TITLE) LAYOUTLATTICE (R FONT FAMILYD MOTHERD PERSONALD) CL:POSITION ( -END) \\GC.MODIFY.BIGREFCNT (PTR TMP OVENTRY) \\GC.ENTER.BIGREFCNT (PTR TMP OVENTRY) PASTEFROMCLIPBOARD - (C) \\UFS.RECOGNIZE.FILE (LEN) \\ZEROWORDS (BASE) \\TEDIT.WINDOW.TITLE (W) SEDIT::OPEN-LITATOM ( -SEDIT::SUB-STRING) FB.HARDCOPY.MAXWIDTH (DATEP ITEM INFO WIDTH MAXWIDTH) \\FTP.WHENCLOSED (C) -\\DRAWARC.PSC (WIDTH COLOR) OPT.DELETEFRAMECHECK (VARS CD) SHORTLST (N) \\COURIER.REP.BIN (X) -\\SENDLEAF (RESULT) TEDIT.COPY.LOOKS (LOOKS LEN) PFI.AFTER.NEW.PAGE (RIGHT LEFT) \\DISABLEGC1 ( -TYPEBASE) \\SLOWHCPYMODEBLTCHAR (ROTATION NEWX CURX LEFT RIGHT PILOTBBT DESTBIT WIDTH SOURCEBIT -SOFTCURSORUP DISPINTERRUPT YPOS HEIGHTMOVED CSINFO) RESET (FX) FIND-STACK-FRAME (POS) \\VECPUT (XPOS -YPOS) BITMAPCOPY (BITMAP NEWBITMAP) APPENDNUMBER.IP (I R) MULTIFILEINDEX (FILES F) -\\GC.LOOKUP.BIGREFCNT (PTR TMP OVENTRY) SEDIT::INSERT-MULTI-ESCAPE (SEDIT::NODE WHERE) -TTYINPROMPTFORWORD (TYPE C ECHO.CHANNEL) SETUPFONTS.PRESS (F FLG) \\ALLOCPAGEBLOCK (BASE) UNIX-GETPARM - (LEN) SET-PACKAGE-INTERACTIVELY (PACKAGE PACKAGE-NAME) \\GCMAPUNSCAN (ENTRY PROBE LNK PREV) -ALLOCSTRING (N INITCHAR STRINGBASE OLD I) \\ALLOCVIRTUALPAGEBLOCK (FIRSTPAGE NPAGES) UNIX-GETENV (I) -\\NSGATELISTENER (EVENT XIP BASE) \\ICONW.FORMAT.TITLE1 (DONE CH NCH WIDTHSOFAR CHWIDTH LASTBREAKPOS -LASTBREAKWIDTH) \\HARDRESET-CLEANUP (TABLE VARTAIL MASTERLIST LINEARBINDINGS VALUE OLDVAL VAR INDEX -NVARS NNILS NTSIZE) TEDIT.SEL.AS.STRING (STREAM TSEL LEN RESULT I) OPT.FRAMEVAR (VARS NNILS NVALS V CD - I ANY VAL) LASTCHPOS (START NC RESULT) \\FILING.ATTRIBUTE.TYPE (X) \\GCMAPSCAN (ENTRY PROBE PREV LINK - PTR) \\INSERT.FIRST.PIECE (PC) SEDIT::INSERT-STRING (SEDIT::START SEDIT::END STRING TYPE) -MARGINBAR.CREATE (OBJ OBJDATUM BITMAP DS) COMPILE1 (DEF) \\TEDIT.FORMAT.FOOTNOTE (LINES LINE THISLINE -FMTSPEC CHNO PREVLINE) FILEPKGTYPE (FIELD TEM TEM2 I) SEDIT::INSERT-SPECIAL-CHARACTER (WHERE SEDIT::NODE -) GETHOSTINFO (HOST NSFLG INFO VAL) SEDIT::LOCATE-NODE-FROM-EDITCHAIN (SEDIT::SUBNODE) -TWODINSPECT.COPYBUTTONFN (XCL:*PROFILE* SELECTION) HARDCOPYW (PRINTHOST BITMAP REGION SCREENREGION -HOST PRINTERTYPE SCALEFACTOR ROTATION FULLFILE) \\REFCNT (ENTRY CNT LINK) |UnixTempFile| (|file| -|unix| \i) REFLECT/GRAPH/DIAGONALLY (N) DODIR (CONJ FILE TAIL) WORD.MATCHES.BUFFER (BUFCH BTAIL CHAR I -) \\EQREFCNT1 (ENTRY LINK) COMP.COND (TEST CLAUSE NEXT X COMPVAL ENDF A) TEDIT.GET.LOOKS (LOOKS NLOOKS -) OPT.FRAMEDEL (VARS FLV DOXVAR PARENT TMP CD OP) FIND.MATCHING.QUOTE (BUF) COMPILER::META-EVAL-LABELS - (COMPILER::NODE) UNPACKPATHNAME.STRING (ONEFIELDFLG COMPONENT) \\LEAF.CLOSEFILE (CONNECTION STREAM -LEAFHANDLE OPUP DATA) STRPOS (PATBASE PATOFFST PATLEN PATFAT PAT STRINGBASE STRINGOFFST STRINGLEN -STRFAT STRING MAXI START SKIP CASEARRAY |1stPATchar| OFFST.I |jthPATchar| J K) ADDTOFILES? (BUFS TYPE -STR LST NAME TEM FILE PLACE COMSNAME NEAR LISTNAME) \\TEDIT.CONVERT.TO.FORMATTED (PC PCTB NEXTCR) -STACK.FULL.WARNING (FLG) COMPILER::CLOSURE-ANNOTATE-TAGBODY (COMPILER::NON-LOCALS COMPILER::SEGMENT -COMPILER::STMT COMPILER::OUTER-NEED-STORAGE) \\STARTPAGE.PRESS (CFONT SPACEFACTOR HFONT) OPENBSPSTREAM - (SOCKET INSTREAM OUTSTREAM SOCKETPROC) BCOMPL2 (X TEM TEM2 LST BLOCK) RIGHTW.ADJUSTSELECTION ( -SELBOTTOM ROWPROP VMARK SELWIDTH XCL:*PROFILE* SELLEFT) TEDIT.HARDCOPY-COLUMN-END (ORIGINAL-LINES LINE - FINAL-CHNO LASTLINE LINES REMOVED-LINES YBOT) BITMAPBIT (NBITS HEIGHT |bitmapbase| WORDX |oldword| -BITX OLDVALUE DD BITMAP TX TY SOFTCURSORUP DISPINTERRUPT) \\INITMDSPAGE (NPAGES LIMIT DISP PREV BASE) -COPIEDFROMSPEC (FROMSPEC I CAN) TEDIT.DEFAULT.MENUFN (PCTB THISMENU WMENU ITEM OFILE SEL CH) -COURIER.REP.LENGTH (ITEM X NAMEANDTYPE VALUE NAMEANDVALUE) \\TFBRAVO.GETPARAMS (TEST REST ALIST L) -\\FIXILINES (CH#1 L1 WW LINES CHAR1 CHARLIM LINE) MB.SIZEFN (FONT BOX) \\LISP.TO.NSFILING.ATTRIBUTE ( -ATTRIBUTE VALUE X COERCEDVALUE ENTRY ACCESS TL) XCL::PPRINT-DEFINER (XCL::TOP-LEVEL-P LEFT XCL::TEMPLATE - XCL::NEXT XCL::NEWLINEP TYPE) FLIPCURSOR (ADDR) \\TYPENUMBERFROMNAME (I) -POSTSCRIPT.SET-FAKE-LANDSCAPE (LAND C0 P0 C P ML MB MR MT) ORDERFROMBOTTOMTOTOP (WPTR ANS) FNTYP (DEF) - NTHCHARCODE (BASE LEN OFFST FATP M) \\TEDIT.PROMPT.PAGEFULLFN (WINDOW) |UnixShellQuote| (C CT FLG) -REFLECT/GRAPH/HORIZONTALLY (N) STRING.EQUAL (LEN BASEX OFFSETX FATPX X BASEY OFFSETY FATPY Y CABASE I -C1 C2 BNX BNY) POSTSCRIPT.STARTPAGE (NEW-PAGE) SHOWBITMAP.IP (REGION XPIXELS YPIXELS XBYTES SCALE LEFT - BOTTOM NEXTROW) COMPILER::CLOSURE-ANNOTATE-PROGN (COMPILER::STMT) SUBSTRING (BASE LEN FATP OFFST -OLDSTRING START END OLDPTR) ASKUSER (KEYLST FILE OLDTTBL TYPEAHEAD BUFS MESS DEFAULT CHAR ECHOEDFLG -KEYLST1 ENTRY TEM ANSWER PRINTLST NC X KEY) TEDIT (TEXT TEDITCREATEDWINDOW WINDOW PROC) BACKSKREAD (X -B INNERMOSTLIST BRACKETFLG ESCAPED) \\PROCESS.BEFORE.LOGOUT (PROC W) NSNETDAYTIME0 (OXIP IXIP) -\\SLOWBLTCHAR (CHAR8CODE DD ROTATION CURX NEWX LEFT RIGHT PILOTBBT DESTBIT WIDTH SOURCEBIT -SOFTCURSORUP DISPINTERRUPT YPOS HEIGHTMOVED CSINFO) PFI.MAKE.LPT.STREAM (TEMPS SCALE REG PRINTOPTIONS -S) TEDIT.UPDATE.SCREEN (TEXTOBJ WW LINE NLINE) \\DSPPRINTCR/LF (ROTATION Y X AMOUNT/BELOW LFT DBITMAP -BTM HGHT WDTH BKGRND SOFTCURSORUP DISPINTERRUPT KEPTWIDTH) \\UPF.NEXTPOS (NCH POS) -SI::SPLIT-PROCEED-CLAUSES (SI::CLAUSE SI::SELECTOR) \\CHANGECHARSET.DISPLAY (BM) TB.FINISH.CLOSE ( -WINDOW) FB.SEEFULLFN (PROP BUTTONS EVENT) |\\SFFixY| (CHARTOP BM TOP) D-ASSEM:INTERN-DCODE (D-ASSEM::RAW-CODE - D-ASSEM::RESULT) FLASHWINDOW (N FLASHINTERVAL WIN? I COLORP) STRIP-KEYWORDS (ARGS) \\FM.CLEARITEM ( -REGION) CREATEW (REGION SCREEN REG) CL::%TAN-FLOAT (CL::FX) SEDIT::INPUT-STRINGDELIM (SEDIT::NEW-STRING -) SEDIT::SELECT-NEXT-GAP (SEDIT::NODE) ADDTOFILE (TYPE FILE COMSNAME) OPT.CLEANFRAME (F) CLISPLOOKUP1 -(TEM VAL LST) RIGHTW.BUTTONEVENTFN (XCL:*PROFILE*) \\FLUSHNDBS (NDB QUEUE) GROW/REGION (AMOUNT) -CL:MAKE-PACKAGE (CL::NAME CL::PREFIX-NAME) AIN (BASE LENGTH OFFST TYP ORIG STBYTE N) USERNAME (NAME -ADDR) OVERLAPPINGWINDOWS (WPTR OVERLAPS OVERLAPPED ADDS DONTS) MB.DEFAULTBUTTON.ACTIONFN (OFILE CH -PRINTHOST \#COPIES PRINTOPTIONS \#SIDES MSG) TB.FIND.PREVIOUS.TAIL (TAIL TAILN) LIST-ALL-BLOCKRECORDS -(RECDEC) SEDIT::HASFAT (SEDIT::C) \\TELERAIDSERVER (RECEIVER VP PTR FILEPAGE BODY) MSCLOSEFILES (X) -\\WRITEBITMAP (LIM BASE) CL:USE-PACKAGE (PACKAGE) \\TEDIT.LOOKS.UPDATE (PARALOOKS TLOOKS PREVPC ORIGPC - NEWPC) AOUT (BASE LENGTH OFFST TYP ORIG STBYTE N) \\TEDIT.SET.WINDOW.EXTENT (WINDOW) UPDATEFILES ( -TYPE CHANGED LST FOUND FILE PCHANGES COMS FILEPROP TYPEDPROP Y) \\SHOWSEL (L1 LN DS LINES CARET) -REPLACEFIELD (DATUM MASK SHIFT HI LO NEWVALUE) TEDIT.STRINGWIDTH (CH) MSCHECKVARS1 (CALLERS VAL) -CL:SHADOWING-IMPORT (PACKAGE) \\FIXLINELENGTH.IP (LLEN) FEQP (X HX LX SIGNX EXPX Y HY LY SIGNY EXPY) -CLIPBOARD-PASTE-STREAM (STRM) \\INDICATESTRING (CHARCODE) OPT.FRAMELOCAL (VARS X ANY) CLISPIFY2B (TEM1 - TEM2 L VAL PARENT SUBPARENT FORM TEM3) COMPILER::CLOSURE-ANNOTATE-MV-PROG1 (COMPILER::STMT) -SET/LABEL/SIZE (WIDTH HEIGHT NBW FONT) PRINTERROR (MSG X PRL PR ERR NEWPRS POS POS2 POS3) EXPORT ( -PACKAGE) INVERT.TEXTURE.BITMAP (BASE1 BASE2) APPENDLARGEVECTOR.IP (INTSIZE I) DODIRCOMMANDS (I COM -COMTAIL DT ATTRVALUE) READBITMAP (BITSPERPIXEL W BM BASE) SEDIT::REVIVE-NODE (SEDIT::DEPTH) -COURIER.OPEN (ADDRESS STREAM LOW.VERSION HIGH.VERSION) CL:SHADOW (PACKAGE) \\TEDIT.TRY.ABBREV ( -EXPANSION CH) |InstallUnixPrinter| (|type| \x) REFLECT/GRAPH/VERTICALLY (N) \\ACTONDISKPAGES (DSK -STREAM FID EMBUFS EMBLOCK DA\s CA\s |DAorigin| EMDA\s EMCA\s BUFFERS BUF FIXEDBUF N EMFIXEDCA RESULT -LASTNC CA) TB.RENUMBER.TAIL (ITEM I) WTFIXLOADEF (FAULTEM2 FAULTEM1 FAULTEM3) |\\VFMSaveBuffer| ( -|whichBuffers| BUF) PFI.SETUP.TRANSLATIONS (FONT PAIR) SEDIT::PUNT-SET-SELECTION (SEDIT::I SEDIT::X) -INTERPRESSBITMAP (IPSTREAM W H ROTATION) TWODINSPECT.COLUMNWIDTH (ROWPROP) PARSE.NSNAME (NAME I -FIRSTPART SECONDPART J THIRDPART) IMPORT (PACKAGE) ONEDINSPECT.PROPWIDTH (PROP) -\\TEDIT.HCPYLOOKS.UPDATE (PARALOOKS TLOOKS PREVPC PC NEWPC OFFSET NEWKERN) \\DOACTONDISKPAGES ( -HINTLASTPAGE CURRENTPAGE CB RESULT THISACTION NEXTCB PAGENO) HARDCOPYIMAGEW.TOPRINTER (PRINTERTYPE) -OPENPOSTSCRIPTSTREAM (PAPER IMAGESIZEFACTOR CLIP REG) UPDATECHANGED1 (VAL) CREATETEXTUREFROMBITMAP ( -TEXTURE Y X) \\CLEARBYTES (OFFST NBYTES BASE) HASHFILESPLST (HASHFILE) NSNAME.TO.STRING (NSNAME) -COMP.FUNCTION (FN) COPYARRAY (NEWARRAY INDEX) \\COERCEFONTDESC (FONT DEVICE) SEDIT:REPLACE-SELECTION ( -SEDIT::NEW-NODES) \\CLEARMAP (BUFFER PREVBUFFER) SETD (N0) TRAPMAKE (UNFINISHED CURRY PTR ALIST LIST1 -LIST2 PT1 PT2 PT4 PT3 TRAP TRAPLIST EDGELIST) ELTD (N0) STKNTHNAME (CFLAG I FRAME) VARSBOUNDINFORM ( -TEM INVAR TAIL ELT VAL) TEST-PROCEED-CASE (FILTER) CL:RENAME-PACKAGE (PACKAGE NAME PREFIX-NAME) -CH.ISMEMBER (GROUPNAME) \\DOWRITEDISKPAGES (FIRSTNEWPAGE FIRSTPAGE NEXTNEWPAGE LASTVDA J I CURRENTPAGE - CB LAB PAGENO) DEFPACKAGE (ARGS PACKAGE POST-MAKE-FORMS) TEDIT.HARDCOPY.PAGEHEADING (NPC PIECES PC -LEN) RESOLVE-USE-PACKAGE-CONFLICT (XCL::SYMBOLS) TB.UPDATE.DISPLAY (DELTA CLIP EXTENTBOTTOM WBOTTOM -LAST#) M44.SIGNAL.DISK.ERROR (ERRCODE) SEDIT::PLACE-CARET-AND-SELECTION (SEDIT::LINE SEDIT::LINEAR -SEDIT::NODE SEDIT::INDEX SEDIT::I SEDIT::X SEDIT::OFFSET) CL:UNUSE-PACKAGE (PACKAGE) EXCHANGEXIPS ( -TIMEOUT INXIP) \\SEQUIN.HANDLE.ACK (PUP NEWACKSEQ) UNDOSAVE (HISTENTRY Y N) PFI.COLLECT.DEFINERS (TYPE - DEFINER ENTRY) FINDPTRSBUFFER (B) CL:UNINTERN (PACKAGE) REHASH (SLOT LASTSLOT V) LRSH (XHI XLO X N) -\\GETMAPBUFFER (BUF PREV) \\SPP.DUPLICATE.REQUEST (INSTREAM CONNECTION) DELETE-PACKAGE (PACKAGE) -OPT.MERGEFRAMEP (V F V2) DATATYPES (N I) \\NSFILING.ADDQUOTES (NAME CH QUOTED LASTCH NAMECHARS) -ADD-SYMBOL (VEC HASH) CLIPBOARD-COPY-STREAM (STRM) HASHARRAY (REHASH-THRESHOLD I J NCELLS LOGSLOTS) -\\FLUSH.PACKET.QUEUE (PACKET CNT) RESOLVE-EXPORT-MISSING (XCL::SYMBOLS) \\WRITEDISKPAGES (DSK STREAM -FID RESULT EMBUFS EMBLOCK DA\s CA\s |DAorigin| EMDA\s EMCA\s BUFFERS BUF FIXEDBUF N EMFIXEDCA) -NUKE-SYMBOL (STRING) COMPILER::CLOSURE-ANNOTATE-MV-CALL (COMPILER::ARG) \\BITBLT.MERGE (SCRATCH) -BLOCKCOMPILE (BLKFNS BLKNAME) TEDIT.QUIT (STREAM MAINW) MAPBUFFERCOUNT (B) \\CLIPLINE (LEFT RIGHT -BOTTOM TOP CA1 X1 X2 Y1 Y2 DX DY CA2) DISPLAYNODELINKS (TONODEID TONODE FROMNDID FROMND) -RESOLVE-EXPORT-CONFLICT (XCL::SYMBOLS XCL::PACKAGES) SEDIT::OUTLINE-SELECTION (SEDIT::MAXX SEDIT::LINE - SEDIT::MINX) FB.CLOSE&EXPUNGE (W MENU ITEM) FB.ANALYZE.PATTERN (SAMPLEHOSTEND PATHOSTEND N LASTPATDIR - STARTOFNAME PATTERN) DATATYPEP (NAME I) MB.SETIMAGE (BOX BITMAP DS) TEDIT.SKIP.SPECIALCOND (NPC -PIECES PC LEN) TWODINSPECT.ROWPROPWIDTH (ROWPROP) RESHAPEALLWINDOWS (TOTALNOWSIZE ATWINSINFO -EXPANSIONWIDTH FIXEDVAR NEWEXPANDABLEWIDTH EXPANSIONHEIGHT NEWEXPANDABLEHEIGHT ATWINFO EXCESS NOW -MWYOFF MWXOFF) \\FM.CHANGELABEL (REGIONS BITMAPS) MSCHECKBOUNDFREE (LF1 X) CL:DELETE (END) -|\\VAMRecomputeFreePageCount| (|firstFree| |page|) \\ENDVECRUN (XPOS YPOS ORIGXPOS ORIGYPOS -ORIGWASDISPLAYING WASDISPLAYING) APPENDINT.IP (I) \\DODISKCOMMAND (LA LASTCB NEXT STATUS) \\SETEOF (EP - EO) RESOLVE-IMPORT-CONFLICT (XCL::SYMBOLS) INSPECT/AS/RECORD (RECORD RECDEC) \\POSTSCRIPT.NSHASH ( -MAPPING) \\CLEANUPDISKQUEUE (SHORTCB FREE LABEL LVDA) \\GETDISKCB (CB) CLRHASH (SLOT) -BITMAPBIT.EXPANDER (NEWVALUE) COMPILER::CLOSURE-ANNOTATE-LAMBDA (COMPILER::NON-LOCALS COMPILER::OPT-VAR - COMPILER::KEY-VAR COMPILER::*NEED-STORAGE* COMPILER::VAR COMPILER::OUTER-NEED-STORAGE) -\\3MBSENDPACKET (PACKET S) OPT.FRAMEMERGE (VARS P P2 VAR CD N V) BCOMPL1A (TEM COMPCOPYFLG0 X -FIRSTFLG0 COMPEVALFLG0 DFNFLG COMPCOPYFLG) TWODINSPECT.SETELT (XCL:*PROFILE* NEWVALUE) \\MAPPAGE (BUF -\#IOBUFFS PREV MOREBUFS PREVAVAIL) FB.CHECK.NAME.LENGTH (TAIL PREVTAIL) MB.DISPLAY (BITMAP Y OLOOKS) -ONEDINSPECT.REPAINTFN (WINDOWREGION PROP MARK STARTPROP STARTVERTMARKS LASTPROP XCL:*PROFILE* VMARK) -\\GETWINDOWHEIGHT (WINDOW) CL:LIST-ALL-PACKAGES (RES) \\SEQUIN.FLUSH.RETRANSMIT (REPUP) CL::%SIN-FLOAT - (CL::THETA) \\TEDIT.MOVE.PIECEMAPFN (PC OBJ MOVEFN) UNMARKASCHANGED (TYPE TAIL ANYFLG F TYPEDPROP -PROP) CL:UNEXPORT (PACKAGE) TB.ITEM.UPDATABLE? (ITEM) SPLIT89 (X Y Z) SCALE/GRAPH (WIDTH HEIGHT N) -MAPHASH (SLOT V) \\REALDISKDA (VDA) SEDIT::ATOM-CHAR-ESCAPED (SEDIT::READ-TABLE) -\\FTP.GETFILEINFO.FROM.PROPS (TMP) MSNLAMBDACHECK (FN) FB.NAMES.DECREASING.VERSION (X Y) -SEDIT::RELINEARIZE-WHERE-NECESSARY (SEDIT::NODE SEDIT::SUPER-NODE SEDIT::CHANGED-NODES -SEDIT::NODES-TO-RELINEARIZE) \\SETIODIRTY (BUF) \\TFBRAVO.INSTALL.PAGEFORMAT (PAGEFRAMES) \\3MBWATCHER - (PACKET CNTR) OPT.FRAMEOPT (ANY) STORAGE.LEFT (FREE MDSFRAC) MSCHECKBLOCKBASIC (FN Y) HARRAYPROP (HA -NEWVALUE HARRAY) \\COLLECTDIRTYBUFS (NEXTBUF B LASTPAGE) \\PUNT.BLTSHADE.BITMAP (|left| |bottom| |top| - |right| DESTINATIONNBITS DESTINATIONLEFT DESTINATIONBOTTOM TEXTURE HEIGHT) \\STORAGE.TYPE (DTD NAME -HUNKP SIZE ITEMSPERMDS ALLOCMDS NPAGESALLOCATED STAT LSTPAG PTR INUSE ALLOC) PFI.PROCESS.FILE (CH FN -EXPR) INSPECT/AS/BLOCKRECORD (CHOICES RECNAME) SIMPLETEXTEDIT (INSTREAM MAINOUTPUT) \\STORAGE.HUNKTYPE - (STAT NPAGESALLOCATED) MSCHECKFNINBLOCK (MACRODEF ISCALLEDP INDIRECTCALLERS OTHERBLOCK) -|\\VFMDeletePageGroup| (|word|) EXPANDBITMAP (WIDTHFACTOR HEIGHTFACTOR HEIGHT WIDTH BITSPERPIXEL -NEWWIDTH NEWHEIGHT NEWBITMAP) APPENDIDENTIFIER.IP (C) PFI.PRINT.MULTI.INDEX (LINESPERPAGE PAIR + $$OUTPUT) \EQREFCNT1 (PTR) LOADEFS (FNS FILE) \SET.FINALIZATION.FUNCTION (TYPE FN) OPT.JFIXPASS (JL +FN) NIL +SETFREE SAVEDEF (SAVEDDEFS) DASSEM.DASMBIND (CD CODELOC) DUMPDATABASE1 (DUMPEDFLG) +COMPILE-FILE-SCAN-FIRST (FIRSTFORMS) MSSTOREDATA (MSDBEMPTY) WINDOW.MOUSE.HANDLER (\LastInWindow +\LastWindowButtons) \LEAFINIT (\LEAFCONNECTIONLOCK) \GS.INITBUF (\GS.NUMLEN) TEDIT.NEW.FONT ( +TEDIT.KNOWN.FONTS) \INSTALL.EXTERNALFORMAT (*EXTERNALFORMATS*) GETNSPRINTER (NS.DEFAULT.PRINTER) +MSPRGDWIM (DWIMESSGAG) *WHO-LINE-HOST-NAME-ENTRY* (*WHO-LINE-HOST-NAME-ENTRY*) \FM.FORMAT ( +\FM.GROUP-ID-COUNTER) FASL:*DEFAULT-OPTABLE* (FASL:*DEFAULT-OPTABLE*) RAIDROOTFRAME (ROOTFRAME) +SEDIT::INITIALIZE (MARKASCHANGEDFNS SEDIT::TYPES SEDIT::TYPE-ROOT SEDIT::TYPE-UNKNOWN SEDIT::TYPE-GAP +SEDIT::TERMINAL-TABLE SEDIT::BASIC-GAP SEDIT::ARGS-GAP SEDIT::BODY-GAP SEDIT::PENDING-SELECTION +SEDIT::INITIAL-SELECTION SEDIT::SCRATCH-SELECTION SEDIT::PENDING-CARET SEDIT::SELECTION-PENDING? +SEDIT::TEMP-POINT SEDIT::TEMP-SELECTION) HASHBEFORECLOSE (SYSHASHFILE SYSHASHFILELST) TTWAITFORINPUT ( +\PFW.FIRSTTIME \RMARG) FASL:CURRENT-VERSION (FASL:CURRENT-VERSION) HVFWDCDREAD (BACKREFCNT BACKREFS) +\SET.STORAGE.STATE (\STORAGEFULLSTATE \SYSTEMCACHEVARS) GRAPHERIMAGEFNS (GRAPHERIMAGEFNS) TTYIN ( +TTYINBUFFER CTRLUFLG) INFILECOMSPROP (VAL) \GETPILOTBBTSCRATCHBM (\PILOTBBTSCRATCHBM) +*WHO-LINE-SYMBOL-SPACE-ENTRY* (*WHO-LINE-SYMBOL-SPACE-ENTRY*) \TEDIT.COMMAND.LOOP (TEDIT.COPY.PENDING +TEDIT.COPYLOOKS.PENDING TEDIT.MOVE.PENDING TEDIT.DEL.PENDING) MAKEINITBFS (\MAINDISK \SWAPDSK1 +\SWAPDSK2 \SWAPREQUESTBLOCK \DISKREQUESTBLOCK \FREEPAGEFID) MSCOMMAND (S) *WHO-LINE-ANCHOR* ( +*WHO-LINE-ANCHOR*) CHAT.CLOSE (CHATWINDOWLST) ANALYZE-PARAMETER (%%LET-LIST) +%%INITIALIZE-STANDARD-STREAMS (*QUERY-IO* *DEBUG-IO* *TERMINAL-IO* *ERROR-OUTPUT*) TEDIT.DISPLAYTEXT ( +\PRIMTERMSA) START.NEW.LINE (\CURSOR \ARROW) \DECODETRANSITION (PENDINGINTERRUPT) TTYIN.READ (\BUFFER) + UNIX-USERNAME (\UNIXSTRING.GLOBALRESOURCE) CL::%%DEFAULT-DEFSTRUCT-TYPE (CL::%%DEFAULT-DEFSTRUCT-TYPE +) GETCHATWINDOW (CHATWINDOW CHATWINDOWLST) CL::%%INV-2-SQRT3 (CL::%%INV-2-SQRT3) +\ADVANCE.STORAGE.STATE (\STORAGEFULLSTATE \SYSTEMCACHEVARS) LOADFROM (LASTWORD) TTYDISPLAYSTREAM ( +*STANDARD-OUTPUT* \TERM.OFD \LINEBUF.OFD *STANDARD-INPUT* TtyDisplayStream) \FTP.OPEN.CONNECTION ( +\FTPCONNECTIONS) HISTORYFIND (LASTHISTORY HISTORYFLG) WHO-LINE-HOST-NAME (*WHO-LINE-HOST-NAME*) +MAKEMACFORMAT (*XEROXTOMACMAP* *MACTOXEROXMAP*) CHARACTER (\\PNAMESTRING.GLOBALRESOURCE) TTYIN.CLEANUP + (TTYINBUFFER) \DSKDISPLAY.DESTROY.WINDOW (\DSKDISPLAY.WINDOW) RECLAIMMIN (\RECLAIM.COUNTDOWN +\RECLAIMMIN) ANALYZE-KEY (%%LET-LIST) COMP.PUSHCALL (LEVEL FRAME) TTPRIN1 (\CURSORCOL) TTYIN.FINISH ( +\ENDBUFFER \CURRENTDISPLAYLINE) DEFAULT.INSPECTW.TITLECOMMANDFN (ItemWCommandMenu IT) \IMAGEIOINIT ( +\NOIMAGEOPS) \TEDIT.HARDCOPY.FORMATLINE (*TEDIT-CURRENTPARA-CACHE* *TEDIT-CACHED-FMTSPEC*) +LOOKUP.NS.SERVER (NS.SERVER.NAMES.TO.ADDRESSES) READATABASE (MSDBEMPTY) VALUOF-EVENT (LINE) +COMPILER::GENCODE-LABELS (COMPILER::*CODE*) GCGAG (GCMESS) \DSKDISPLAY.CREATE.WINDOW ( +\DSKDISPLAY.WINDOW DSKDISPLAY.POSITION) \FM.EDIT-SETUPTTBL (\FM.EDIT-TTBL) UNIX-FULLNAME ( +\UNIXSTRING.GLOBALRESOURCE) TTYIN.SETUP (\CHARWIDTH \FONT \COMMENTFONT \TTYIN.LAST.COMMENTFONT +\TTYIN.LAST.FONT \CHARHEIGHT \DESCENT \TEXTURE \TTPAGELENGTH \LMARG \RMARG \INITPOS) +SEDIT::INITIALIZE-LISTS (SEDIT::TYPES SEDIT::TYPE-LIST SEDIT::TYPE-DOTLIST SEDIT::TYPE-QUOTE) +SEDIT::INTERNAL-WRAPPERS (SEDIT::INTERNAL-WRAPPERS) CL::%%EXP-TABLE (CL::%%EXP-TABLE) FW-INIT-PROPS ( +FW-AllFiles? FW-Anchor FW-Filters FW-Font FW-Interval FW-Justified? FW-Position FW-Shade FW-SortFn) +TTYIN1 (\INITPOS \LASTAIL \PROMPT1 TABS UNREADBUF \TTSCRATCHFILE.GLOBALRESOURCE \FIRSTTIME \LASTCHAR +\PFW.FIRSTTIME \CURSOR CTRLVFLG \RESTOREBUFCODES) \DEFINEDEVICE (\DEVICENAMETODEVICE \FILEDEVICENAMES +\FILEDEVICES) DEFAULT.INSPECTW.PROPCOMMANDFN (SetPropertyMenu) PACKAGE-REHASH-THRESHOLD ( +PACKAGE-REHASH-THRESHOLD) TTCRLF.ACCOUNT (\CURSORROW \LOC.ROW.0 \BMARG \CURSORCOL) CLISPATOM (CHARLST) + TTYIN1RESTART (\ARROW \FIRSTLINE \CURSOR \BUFFER \ENDBUFFER \DELETING) U-CASE ( +\\PNAMESTRING.GLOBALRESOURCE) BRKDWNCONSES (BDPTR) \VFMMerge1 (\VFMxtraBuffer mergeFlag) +\GETMISCSOCKET (\MISC.SOCKET) SPY.OVERFLOW (SPY.NEXT SPY.OVERFLOWED) FINDFIELDUSAGE (FIELD.USAGE) +MOVE.TO.NEXT.LINE (\ARROW \CURSOR) UNIX-GETENV (\UNIXSTRING.GLOBALRESOURCE) LAYOUTSEXPR1 (RESULT) +\10MB.CREATENDB (\10MBTYPE.TRANSLATIONS) *DOCUMENTATION-HASH-TABLE* (*DOCUMENTATION-HASH-TABLE*) +\CHANGE.ETHER.TRACING (\RAWTRACING) EDITCOLUMN (\HOMECOL) UNIX-GETPARM (\UNIXSTRING.GLOBALRESOURCE) +COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION (COMPILER::*PROCESSED-FUNCTIONS* COMPILER::*UNKNOWN-FUNCTIONS* +) MSTRYSPELL (SPELLING) SEDIT::REPLACE-CHARS (SEDIT::BUTTON-STRING-NODE SEDIT::BUTTON-STRING) +TTYINREAD (READBUF) INFILECOMSVAL (LITERALS VAL) SEDIT::INITIALIZE-COMMENTS (SEDIT::TYPES +SEDIT::TYPE-COMMENT SEDIT::TYPE-COMMENT-WORD) WTFIX1 (FAULTPOS CLEARSTKLST FAULTFN VARS FAULTX +LCASEFLG CLISPFLG CLISPCHANGE) CL::%%EXP-POLY (CL::%%EXP-POLY) \PFEnsureInitialized (\PFInitialized) +PROMPTFORWORD (\PROMPTFORWORDTTBL) BREAKDOWN (BRKDWNLST BDPTR) CLEARHASHFILES (SYSHASHFILELST +SYSHASHFILE) GO.TO.ADDRESSING (\CURSORROW \CURSORCOL) CHNGNM (NOLINKMESS) D-ASSEM:+IVAR-CODE+ ( +D-ASSEM:+IVAR-CODE+) CLDISABLE (NOFIXFNSLST0 NOFIXVARSLST0 CLISPCHARS CLISPCHARRAY) RAIDSTACKCMD ( +FRAME# ROOTFRAME) SET.TTYINEDIT.WINDOW (TTYINEDITWINDOW) \HARDCURSORUP (\SOFTCURSORP \CURRENTCURSOR) +LOCALVARS (LOCALVARS SPECVARS) RECORD.FIELD.VALUE0 (FIELD.USAGE) OPT.RETOPT (ANY) +PROVIDE.PROMPTING.WINDOW (\TTYREGIONOFFSETSPTR) ERASEPROPS (SMASHPROPSLST1) \NAMEDTAB.INIT ( +\NAMEDTAB.IMAGEFNS) FW-CREATE-OFD-LIST (FW-OFDList) *WHO-LINE-NAME-FONT* (*WHO-LINE-NAME-FONT*) CLBUFS + (READBUF CTRLUFLG) \ALLOCATE.ETHERPACKET (\NEWPACKETCOUNTER) SETINITIALS (INITIALS FIRSTNAME) +D-ASSEM:+LAMBDA-SPREAD+ (D-ASSEM:+LAMBDA-SPREAD+) %%LIT-ARRAY-SIZES (%%LIT-ARRAY-SIZES) \REMOVEDEVICE +(\FILEDEVICENAMES \DEVICENAMETODEVICE \FILEDEVICES) MSINTERPRET (MSTHOSE) INITDATATYPENAMES ( +\FINALIZATION.FUNCTIONS) COMP.EVALFORM (LEVEL) CL::%%LOG-BASE2-E (CL::%%LOG-BASE2-E) +\PROCESS.AFTER.EXIT (\PROC.READY) \CENTICLOCK (\CENTICLOCKFACTOR) D-ASSEM:+PVAR-CODE+ (D-ASSEM:+PVAR-CODE+ +) COMPILER::GENCODE-IF (COMPILER::*TAG-NUMBER*) TTDELETELINE (\CURSOR \ENDBUFFER) +\MAIKO.SET.STORAGE.STATE (\STORAGEFULLSTATE \SYSTEMCACHEVARS) \PRESSINIT (\PRESSIMAGEOPS) +\CH.UPDATE.CACHE (\CH.CACHE) *WHO-LINE-ENTRIES* (*WHO-LINE-ENTRIES*) D-ASSEM:+FVAR-CODE+ (D-ASSEM:+FVAR-CODE+ +) SEDIT::*FORMAT-ALIAS-DEPTH-LIMIT* (SEDIT::*FORMAT-ALIAS-DEPTH-LIMIT*) \IDLE.PROMPTING.WINDOW ( +\IDLE.PASSWORD.SET) \CURSORDESTINATION (\CURSORDESTLINE \CURSORDESTWIDTH \CURSORDESTHEIGHT +\CURSORDESTRASTERWIDTH \CURSORDESTINATION) XCL::*WHERE-IS-CASH-SIZE* (XCL::*WHERE-IS-CASH-SIZE*) +INSTALL-WHEELSCROLL (WHEELSCROLLINTERRUPTS) \MEDW.CURSOR (\CURSORHOTSPOTX \CURSORHOTSPOTY) +*WHO-LINE-SYMBOL-SPACE* (*WHO-LINE-SYMBOL-SPACE*) \OPENLINEBUF (\LINEBUF.OFD *STANDARD-INPUT*) +*WHO-LINE-USER-ENTRY* (*WHO-LINE-USER-ENTRY*) *WHO-LINE-ENTRY-REGISTRY* (*WHO-LINE-ENTRY-REGISTRY*) +SEPRCASE (CLISPCASEARRAYS SEPRCASEARRAYS) EMBEDPROG (BINDINGS) D-ASSEM:+LAMBDA-NO-SPREAD+ ( +D-ASSEM:+LAMBDA-NO-SPREAD+) \EXTENDEDVMEMINIT (\XVmemFmapBase \XVmemFmapHighBase \XVmemDiskBase +\LASTVMEMFILEPAGE \XVmem) COMP.PUSHNILS (LEVEL FRAME) HERALD (HERALDSTRING) \CANONICALIZE.PUP.HOSTNAME + (\HOSTNAMES) D-ASSEM:+NLAMBDA-NO-SPREAD+ (D-ASSEM:+NLAMBDA-NO-SPREAD+) DWIMIFYFNS (NOFIXFNSLST0 +NOFIXVARSLST0) PACK* (\\PNAMESTRING.GLOBALRESOURCE) SEDIT::MENU-CLOSEFN (SEDIT::MENUS) EDLOCL (L) +MAKEIBMFORMAT (*XEROXTOIBMMAP* *IBMTOXEROXMAP*) SPY.FIND.TREE (SPY.TREE) FIXSPELL (EDITQUIETFLG) +COMPILER::GENCODE-GO (COMPILER::*NON-LOCALS*) \TEDIT.PROMPT.PAGEFULLFN (\CURRENTDISPLAYLINE NEWTOP) +DWIMLOADFNS? (SIDES) EDITXTR (L) %%ONED-ARRAY (%%ONED-ARRAY) MSERASE (MSCHANGEDARRAY MSDATABASELST +MSFILETABLE MSARGTABLE MSDBEMPTY) \LOAD-STREAM (LOADEDFILELST SYSFILES) SEDIT::SETUP-PROFILE ( +*READ-BASE* *READ-SUPPRESS* *PACKAGE* *PRINT-ESCAPE* *PRINT-PRETTY* *PRINT-CIRCLE* *PRINT-RADIX* +*PRINT-GENSYM* *PRINT-ARRAY* XCL:*PRINT-STRUCTURE*) \TEDIT.REFRESH.SHOWSEL (GLOBALSEL) RAIDCOMMAND ( +FRAME# VPRINTLEVEL ALINKS?) \REMOVEDEVICE.NAMES (\DEVICENAMETODEVICE \FILEDEVICENAMES) EDITMBD (L) +CHAT (CHAT.HOSTMENU) OBTAIN.MONITORLOCK (SI::*LOCKED-MONITOR*) DISPLAYAFTERENTRY ( +\DisplayStoppedForLogout) COMPSETREAD (READBUF REREADFLG) CLISPATOM0 (SUBPARENT %#UNDOSAVES +NOFIXVARSLST0 CLISPCHANGE) EDITMV (COM UNFIND) \VFMPutNext (\VFMoldPtr \VFMlowPtr) INSPECT/BITMAP ( +InspectBitmapMenu) DISPLAYBEFOREEXIT (\DisplayStoppedForLogout) *WHO-LINE-VMEM-ENTRY* ( +*WHO-LINE-VMEM-ENTRY*) INITATOMS (\SCRATCHSTRING \OneCharAtomBase) \PEEKPUP (\PEEKPUPNUMBER +PUPTRACEFILE PUPTRACEFLG) COMPILER::FRAME-ANNOTATE-TAGBODY (COMPILER::*REFERENCES*) +CL:LAMBDA-PARAMETERS-LIMIT (CL:LAMBDA-PARAMETERS-LIMIT) TTYINBUFFERSTREAM (\TTYINBUFFERSTREAM) FW-LOOP + (FW-OpenFiles FW-ReInit?) CL::%%SQRT3 (CL::%%SQRT3) \INDICATESTRING (PRXFLT) PFI.DEFAULT.HANDLER ( +*PFI-LOCATIONS*) \SOFTCURSORUP (\SOFTCURSORWIDTH \SOFTCURSORHEIGHT \SOFTCURSORUPBM \SOFTCURSORDOWNBM +\CURRENTCURSOR \SOFTCURSORP) DOICONWINDOWCOM (IconWindowMenu) FIXFIELDORDER (FIELDS.IN.CREATE) +CL::%%2-SQRT3 (CL::%%2-SQRT3) SEDIT:*EDIT-FN* (SEDIT:*EDIT-FN*) \SOFTCURSORUPCURRENT (\SOFTCURSORUPP +\CURSORDESTLINE) FIXATOM (TAIL CHARLST FAULTX) STOPSCAN? (CLTYP) \DONEWEPHEMERALPAGE ( +\PAGEFAULTCOUNTER) *PACKAGE-FROM-NAME* (*PACKAGE-FROM-NAME*) MAKESYS (MAKESYSDATE) INFILECOM (VAL) +SPY.START (\PERIODIC.INTERRUPT.FREQUENCY \PERIODIC.INTERRUPT) SETUPPAGEMAP (NEXTPM NEXTVMEM) +FILEWATCHPROP (FW-ReInit?) MSHASHLIST1 (PREVVALUE) USEREXEC (READBUF READBUFSOURCE REREADFLG) FIXATOM1 + (FAULTPOS) TEDIT.ADD.STYLESHEET (*TEDIT-PARASTYLE-CACHE* TEDIT.STYLES *TEDIT-STYLESHEET-SAVE-LIST*) +*SHORT-BACKTRACE-FILTER* (*SHORT-BACKTRACE-FILTER*) D-ASSEM:+NLAMBDA-SPREAD+ (D-ASSEM:+NLAMBDA-SPREAD+ +) FORMAT-EAT-WHITESPACE (*FORMAT-INDEX*) DOATTACHEDWINDOWCOM (WindowMenu) SEDIT::CHANGE-PACKAGE ( +*PACKAGE*) SETUSERNAME (USERNAME \USERNAME) CONSTANTS (COMPVARMACROHASH) CLOSENSOCKET (\NSOCKETS) +PURGENSFONTS (\FONTSINCORE) \VFMClearBuffers (\VFMbufferPool) CCCSUBFN? (ALL-CODE-BASES SUBMAPS) +MaxBkMenuWidth (MaxBkMenuWidth) INSPECT/ATOM (InspectPropsMenu) \GET.IOCB (\IOCB.INPUT.ALLOC +\IOCB.OUTPUT.ALLOC \IOCBFREELIST) *WHO-LINE-LAST-VMEM* (*WHO-LINE-LAST-VMEM*) \TURN.ON.HUNKING ( +\UNBOXEDHUNK.TYPENUM.TABLE \CODEHUNK.TYPENUM.TABLE \PTRHUNK.TYPENUM.TABLE \HUNKING?) +DEFAULT.BACKGROUND.COPYFN (BackgroundCopyMenu) OPT.DELTAGREF (CL:LABELS) MSSEEKPHRASE (LASTPARSED S +PARSED CONJUNCTIONS LASTADVERB RESETS) COMPILER::GENCODE-CATCH (COMPILER::*TAG-NUMBER* +COMPILER::*STACK-NUMBER*) TEDITCHAT.MENUFN (TEDITCHAT.MENU) SEDIT::CHANGE-PRINTBASE (*PRINT-BASE* +*PRINT-RADIX*) EDIT4F (L UNFIND COM) TTPROMPTCHAR (\LOC.ROW.0 \INITCRLFS \CURSORROW) \ALLOCMAPBUFFER ( +SYSTEMBUFFERLIST) MSPRGERR (ERRORS) INFILECOMTAIL (DWIMLOADFNSFLG) MAYBE.PRETTYFILEINDEX ( +NOTLISTEDFILES) \LFCreateDevice (\LFdevice) CLISPFORVARS (FIRSTI.V. I.V. MAKEPROGFLG VARS IVINITFLG +INITVARS UNDOLST I.S.TYPE) U/L-CASE (\CURSOR) \NSGATELISTENER (\NSROUTER.PROBECOUNT) CHAT.OSTYPES ( +CHAT.OSTYPES) DWIMERRORRETURN (CLISPERTYPE) TTYIN.SCRATCHFILE (TTYINEDIT.SCRATCH) NWAYBUTTON.INIT ( +NWAYBUTTONIMAGEFNS) DASSEM.COUNTVARS (VARCOUNT) CL::%%ASIN-QPOLY (CL::%%ASIN-QPOLY) NOTE (POSSLIST##) +FW-AFTERMOVEFN (FW-Dormant?) EDITCONT (L) PFI.ENQUEUE (\PFI.PROCESS \PFI.PROCESS.COMMANDS) DWIM ( +DWIMFLG ADDSPELLFLG) COMP.SPREAD (LEVEL FRAME) PFI.SETUP.TRANSLATIONS (*PFI-FUNNY-CHARS*) +*WHO-LINE-TTY-STATE-ENTRY* (*WHO-LINE-TTY-STATE-ENTRY*) MAKEISOFORMAT (*XEROXTOISO8859MAP* +*ISO8859TOXEROXMAP*) DOBACKGROUNDCOM (BackgroundMenu) MSSETREP (EDITQUIETFLG S) \DISPLAYINIT ( +\DisplayDeviceMethods \DisplayDeviceData \DISPLAYIMAGEOPS DisplayFDEV) SETERRORN (*LAST-CONDITION*) +CL:PROVIDE (*MODULES*) COMP.STUNBIND (LEVEL FRAME) SHRIEKER (WORKFLAG) *FEATURES* (*FEATURES*) +%%ARRAY-TYPE-TABLE (%%ARRAY-TYPE-TABLE) USEDFREE (FREEVARS) ADDSPELL (USERWORDS SPELLINGS2 LASTWORD +SPELLINGS1 SPELLINGS3) SETTAIL? (\LASTAIL \LASTAILCOL \LASTAILROW) \PROMPTFORWORDBS (CHARBUFFER +RUBBING?) UPDATE/MENU/IMAGE (MENUFONT) \SHIFT.DOCUMENT (TAB.OBJECT) \SOFTCURSORDOWN (\SOFTCURSORUPP) +COMPILER::FRAME-ANNOTATE-RETURN (COMPILER::*REFERENCES*) CL:CHAR-SUPER-BIT (CL:CHAR-SUPER-BIT) +\FLUSHVM (\DOFAULTINIT) \CH.CHECK.CLEARINGHOUSE (CH.DEFAULT.DOMAIN CH.DEFAULT.ORGANIZATION +LOCAL.CLEARINGHOUSE) OVERFLOW (\OVERFLOW) \TEDIT.SELECT.CHARACTER (WORDSELFLG) CL:CHAR-META-BIT ( +CL:CHAR-META-BIT) READPLIST (\READPLIST.READTABLES) CL:IN-PACKAGE (*PACKAGE*) COMPILER::GENCODE-BLOCK +(COMPILER::*TAG-NUMBER* COMPILER::*STACK-NUMBER*) TEDIT.FORMATTEXTBOX (IGNORE) \TEDIT.LOOKS.UPDATE ( +LOOKNO TLEN CHLIST WLIST CHNO INVISIBLERUNS FONT NEWASCENT NEWDESCENT) SEDIT:*COMPILE-FN* ( +SEDIT:*COMPILE-FN*) SEDIT::TRACK-SELECT (SEDIT::PENDING-LAST-X SEDIT::PENDING-LAST-Y SEDIT::PENDING-TYPE +) \RELEASEBUFFER (MAPEMPTYBUFFERLIST) \PROMPTFORWORDBIN (TIMELIMITEXPIRED? BELLBEENHEARD?) RPTPRINT ( +RPTCNT RPTLAST) DSKDISPLAY (\DSKDISPLAY.STATE) CL::*PARSED-DEFSTRUCTS* (CL::*PARSED-DEFSTRUCTS*) +STRPOSL (\\STRPOSLARRAY.GLOBALRESOURCE) \CLEARSYSBUF (\LONGSYSBUF) COMP.MAP (LEVEL FRAME) +XCL::*UNSAFE-TO-DELETE-PACKAGE-NAMES* (XCL::*UNSAFE-TO-DELETE-PACKAGE-NAMES*) COMPUTE-MACRO-ARGS ( +*MACRO-VARS* *MACRO-VALS*) \GETKEY (\\KEYBOARDWAITBOX.GLOBALRESOURCE) FIXAPPLY (TYPE-IN? FAULTFN) +BYTEBLOCKCOMPILE2 (BYTECOMPFLG COMP.GENFN.NUM) TEDIT.PUSH.STYLESHEET (*TEDIT-PARASTYLE-CACHE* +TEDIT.STYLES *TEDIT-STYLESHEET-SAVE-LIST*) ITEM.WINDOW.SET.STACK.ARG (SetStackMenu) +*WHO-LINE-STATE-UNINTERESTING-FNS* (*WHO-LINE-STATE-UNINTERESTING-FNS*) COMP.STBIND (FRAME LEVEL) +CLOSEPUPSOCKET (\PUPSOCKETS) XCL::*DELETED-IMPLICIT-HASH-SLOT* (XCL::*DELETED-IMPLICIT-HASH-SLOT*) +DEFAULTFONT (DEFAULTFONT) WHO-LINE-USERNAME (*WHO-LINE-CURRENT-USER*) \IDLER (\IDLE.PASSWORD.SET +\AFTERLOGINFNS) SPY.DUMP.BUFFER (SPY.NEXT) MAPRINT (LISPXPRINTFLG) MSEAT (S) ENUM-STRING ( +\\NUMSTR.GLOBALRESOURCE \\NUMSTR1.GLOBALRESOURCE) \GETSYSBUF (\LONGSYSBUF) \GETMAPBUFFER ( +MAPEMPTYBUFFERLIST) PROMPTCHAR (READBUF) OPT.DELCODE (ANY) ICMLARRAY.GETMENUWGROUP (*PRINT-ARRAY*) +EXEC-READ-LINE (CTRLUFLG) WAIT.FOR.TTY (\OLDTTY) FIX89TYPEIN (FAULTARGS) %%THIN-CHAR-TYPENUMBER ( +%%THIN-CHAR-TYPENUMBER) \RTP.CLEANUP (\BSPSOCKETS) \FTPINIT (\FTPFDEV \FTPAVAILABLE) INITDATATYPES ( +\MaxSysTypeNum \MaxTypeNumber) COMP.DELPOP (LEVEL CODE) SUPERPRINT/COMMENT1 (COMMENTCOL) CHAT.AUTOCRLF + (CHAT.AUTOCRLF) PAINTW.READCOMMAND (PAINTCOMMANDMENU) HPRINT1 (BACKREFS CELLCOUNT DATATYPESEEN) +%%LIT-ARRAY-TYPES (%%LIT-ARRAY-TYPES) \FTP.WHENCLOSED (\FTPCONNECTIONS) PAINTW.READMODE (PAINTMODEMENU +) FILEPKGTYPE (FILEPKGTYPES) LISPXREADBUF (REDOCNT) COMPILER::*PREDICATE-CONTEXT* ( +COMPILER::*PREDICATE-CONTEXT*) \ASSIGNDATATYPE1 (\MaxTypeNumber) MAPAFTERCLOSE (DEFAULTMAPFILE) +FILECREATED (FILECREATEDLST) GREET (USERNAME) COMPILER::CLOSURE-ANNOTATE-TAGBODY (COMPILER::*NEED-STORAGE* +) SEDIT::TRACK-EXTEND (SEDIT::PENDING-TYPE) MSBINDVAR (VARS) \PROC.CODEFORTFRAME (\RUNNING.PROCESS) +CHAT.TAKE.INPUT1 (STREAM) CL::*DEFSTRUCT-INFO-CACHE* (CL::*DEFSTRUCT-INFO-CACHE*) CL::%%ASIN-PPOLY ( +CL::%%ASIN-PPOLY) COMPILER:PASS (COMPILER:PASS) ADDTOFILES? (LASTFILE) DEFINE-FILE-INFO ( +FILECREATEDLOC) SEDIT::*IGNORE-CHANGES-ON-COMPLETION* (SEDIT::*IGNORE-CHANGES-ON-COMPLETION*) +\KEYBOARDINIT (\CURRENTKEYACTION \DEFAULTKEYACTION \COMMANDKEYACTION \INTERRUPTSTATE \SYSBUFFER +\SAVEDSYSBUFFER \LASTUSERACTION \KEYBOARDEVENTQUEUE \LASTKEYSTATE \SHIFTSTATE \MOUSETIMERTEMP) +\SETLOCALNSNUMBERS (\MY.NSHOSTNUMBER \MY.NSNETNUMBER \MY.NSADDRESS) MOUSECHORDWAIT (\MOUSECHORDTICKS +\MOUSECHORDMILLISECONDS) %%CANONICAL-CML-TYPES (%%CANONICAL-CML-TYPES) INSTALL-WHO-LINE-OPTIONS ( +*WHO-LINE*) \TEDIT.SETDEFAULT.FROM.SEL (TEDIT.DEFAULT.CHARLOOKS) MAKEROOMFORPME (NEXTPM) +\CH.FIND.ORG.SERVER (\CH.CACHE) UNDONLSETQ (%#UNDOSAVES) EDITBMBUTTONFN (COLOR EDITBMWINDOWMENU +EDITBMMENU GRIDSIZEMENU) \BITBLT.DISPLAY (\BBSCRATCHTEXTURE) FLTSTR (\\NUMSTR.GLOBALRESOURCE +\\NUMSTR1.GLOBALRESOURCE) PRINTCODENT (IVARS PVARS FVARS) TEDIT.POP.STYLESHEET ( +*TEDIT-PARASTYLE-CACHE* TEDIT.STYLES) \INITSPP (\SPPDEVICE \SPP.BULKDATA.DEVICE) DELETETO1 (\DELETING +\CURSORCOL) TEDIT.FORMATPAGE (*TEDIT-PAGE-BREAKS*) SPY.INIT (SPY.BUFFER SPY.BUFFER.THRESHOLD SPY.NEXT +SPY.TREE) \SETUP.HUNK.TYPENUMBERS (INITIALDTDCONTENTS) OPENPUPSOCKET (\PUPSOCKETS) FIND-STACK-FRAME ( +LASTPOS) \TRACKWITHBOX (ORGX BOXWIDTH ORGY BOXHEIGHT) DWMFY2 (SUBPARENT FORMSFLG NOFIXVARSLST0 TAIL) +\DRAWCIRCLE.DISPLAY (\\BRUSHBBT.GLOBALRESOURCE) LISPXREADP (READBUF) TIMESPOW10 (TEXP THI TLO) +\GR.DELDEFFN (GLOBAL.RESOURCES) VMEM.PURE.STATE (\VMEM.PURE.LIMIT) \DRAWELLIPSE.DISPLAY ( +\\BRUSHBBT.GLOBALRESOURCE) RECORDINIT (RECORDINIT) DODIRCOMMANDS (VALUE) XCL:*PROFILE* (XCL:*PROFILE*) + COMP.DECLARE (ALLDECLS) COMPILER::*NULL-CONTEXT* (COMPILER::*NULL-CONTEXT*) \DRAWLINE.DISPLAY ( +\\BRUSHBBT.GLOBALRESOURCE) FASL::RESET-DUMPER-STATS (FASL::*TABLE-ATTEMPTS* FASL::*TABLE-HITS*) +BROWSE/LAYOUT/HORIZ/COMPACTLY (NODELST) CHECKSYNONYM (S) \FILLCIRCLE.DISPLAY ( +\\BRUSHBBT.GLOBALRESOURCE) SAVE.CURSOR (\HOMEROW \HOMECOL) CHAT.UNDERLINE.DESCENT ( +CHAT.UNDERLINE.DESCENT) MAKECREATE1 (USINGEXPR) \UPDATEXYANDBOX (BASEX BASEY OPPX OPPY) +COMPILER::*EFFECT-CONTEXT* (COMPILER::*EFFECT-CONTEXT*) \DRAWCURVE.DISPLAY (\\BRUSHBBT.GLOBALRESOURCE) + \BITBLT.BITMAP.SLOW (\BBSCRATCHTEXTURE) \KEYBOARDEVENTFN (\KEYBOARD.BEFORETYPE \MAIKO.BEFOREKEYTYPE +\MAIKO.XBEFORE?) CLISPFORINITVAR (PROGVARS INITVARS) DWIMIFY2? (NOFIXFNSLST0 NOFIXVARSLST0) +\SET.LASTVMEMFILEPAGE (\LASTVMEMFILEPAGE \VMEM.FULL.STATE) DO-EVENT (LISPXHIST CL:+++ CL:++ + - CL:/// + CL:// /) \TEDIT.CREATEW.FROM.REGION (TEDIT.DEFAULT.WINDOW) FILEWATCH (FW-Running?) ORDINAL-TENS ( +ORDINAL-TENS) SEDIT::*FSPEC-TABLE* (SEDIT::*FSPEC-TABLE*) CL:MULTIPLE-VALUES-LIMIT ( +CL:MULTIPLE-VALUES-LIMIT) \PUNT.BITBLT.BITMAP (\BBSCRATCHTEXTURE) INITIALIZE-SHELL-DEVICE ( +*SHELL-DEVICE*) IDLE (\IDLING) READLINE (CTRLUFLG REREADFLG READBUF) MAKEINITLAST (MKI.CODELASTPAGE) +COMPILER::*LITERALLY-NIL* (COMPILER::*LITERALLY-NIL*) FAKE-COMPILE-FILE (COUTFILE STRF SVFLG LAPFLG +LCFIL) PFI.HANDLE.* (*PFI-PENDING-COMMENTS*) OPT.LBDEL (CL:LABELS) *WHO-LINE-DIRECTORY-ENTRY* ( +*WHO-LINE-DIRECTORY-ENTRY*) COMPILER::*LITERALLY-T* (COMPILER::*LITERALLY-T*) FASL::*TABLE-HITS* ( +FASL::*TABLE-HITS*) SETREADFN (LISPXREADFN) RETDWIM (HELPCLOCK DWIMIFY0CHANGE DWIMIFYCHANGE LASTWORD +ATTEMPTFLG CLISPCHANGE) COMP.LOOKUPVAR (FREEVARS) SPY.MAKE.TREE (SPY.FONT SPY.NODES SPY.TOPNODES TITLE + SPY.WINDOW) SETFONTDESCRIPTOR (\FONTSINCORE) INTTOEXT (TEXP THI TLO) TEDIT.STYLESHEET ( +*TEDIT-PARASTYLE-CACHE* TEDIT.STYLES *TEDIT-STYLESHEET-SAVE-LIST*) GLOBALVARS (GLOBALVARS) DO.EDIT.PP +(\ENDBUFFER \CURSOR \TTSCRATCHFILE.GLOBALRESOURCE) CHAT.ICONFN (TTYKBDICONSPEC) SPY.ADD.ENTRY ( +SPY.NEXT) HPRINT (HPRINTHASHARRAY) CLISPIFYRPLAC (SEG) \REUSETO (UNUSED BIT OFFSET) SETSPELLCASE ( +SPELLCASEARRAY) CL::%%ASIN-EPSILON (CL::%%ASIN-EPSILON) CL::*TYPEP-HASH-TABLE* (CL::*TYPEP-HASH-TABLE* +) CL::%%TAN-QPOLY (CL::%%TAN-QPOLY) XCL:*DEBUGGER-PROMPT* (XCL:*DEBUGGER-PROMPT*) MOVE.TO.LINE ( +\CURSOR \ARROW) COMPILER::*TAIL-RECURSION-POLICY* (COMPILER::*TAIL-RECURSION-POLICY*) \VFMInsert1 ( +splitFlag) CLISPCAR/CDR (VAR2 VAR1) DIRPRINTNAME (LASTHOST&DIR I NAMEPRINTED) *DIGITS* (*DIGITS*) +INTPOWERS (INTPOWERS) DASSEM.DSTOREFNDEF (DFNFLG) DWMFY1 (NOFIXFNSLST0 NOFIXVARSLST0) +SEDIT::FIRST-ADD-COMMAND (SEDIT::FIRST-ADD-COMMAND) PAINTW.READBRUSHSIZE (PAINTSIZEMENU) +%%INITIALIZE-DEFAULT-PATHNAME (\CONNECTED.DIRECTORY *DEFAULT-PATHNAME-DEFAULTS*) XCL:*EVAL-FUNCTION* ( +XCL:*EVAL-FUNCTION*) SUBPRINT (LEFT) \GR.PUTDEFFN (GLOBAL.RESOURCES) \DOVMEMFULLINTERRUPT ( +\PENDINGINTERRUPT \EXTENDINGVMEMFILE) ORDINAL-ONES (ORDINAL-ONES) ADDFILE0 (FILELST) \CONS.UFN ( +\RECLAIM.COUNTDOWN) SI::RESETUNWIND (SI::*RESETFORMS*) SEDIT::INITIALIZE-ATOMIC (SEDIT::TYPES +SEDIT::TYPE-LITATOM SEDIT::TYPE-STRING) FW-CLOSEFN (FW-OpenFiles FW-Reset?) TTRATOM (\BUFFER) +CLISPFOR0 (NOFIXFNSLST0 NOFIXVARSLST0) \CARET.FLASH (\CARET.UP) TEDIT.CREATEW (TEDIT.DEFAULT.WINDOW) +HASH-EQUAL (*CIRCLE-READ-LIST*) \RESETKEYBOARD (\KEYBUFFERING \TIMER.INTERRUPT.PENDING \LONGSYSBUF) +CL::%%2/PI (CL::%%2/PI) MSINTERPA (V) PAINTW (PAINTCOMMANDMODE PAINTCOMMANDSHADE PAINTCOMMANDBRUSH +PAINTWCURSOR) BELOWMARKER (BELOWCNT) \DSKCreateDevice (\DSKdevice) PAINTW.READBRUSHSHAPE ( +PAINTSHAPEMENU) FASL::*TABLE-ATTEMPTS* (FASL::*TABLE-ATTEMPTS*) PRETTYPRINT (NLAMLST LAMALST NLAMALST +LAM?LST PRTTYSPELLFLG) FILEPKGCOMPROPS (SYSPROPS) SETUPPUP (\PUPCOUNTER) \CHECK.PQUEUE ( +\RUNNING.PROCESS) COMPILER::*ARGUMENT-CONTEXT* (COMPILER::*ARGUMENT-CONTEXT*) BRKDWNTIME (BDPTR) +\TEXTINIT (\TEXTIMAGEOPS \TEXTFDEV \TEXTOFD) SEDIT::FIRST-ADD-COMMAND-MENU-ENTRY ( +SEDIT::FIRST-ADD-COMMAND-MENU-ENTRY) CL:CHAR-CODE-LIMIT (CL:CHAR-CODE-LIMIT) COMPSET (LSTFIL LAPFLG +STRF SVFLG LSTFIL1 LCFIL) \4DISPLAYINIT (\4DISPLAYIMAGEOPS \4DISPLAYFDEV) \ALLOCHUNK (\HUNKREJECTS) +\EXTNORMALIZE (TEXP THI TLO) %%BIT-TYPE (%%BIT-TYPE) FW-INTERACT (FW-Running?) \TEDIT.HCPYLOOKS.UPDATE + (LOOKNO TLEN CHLIST WLIST CHNO INVISIBLERUNS FONT NEWASCENT NEWDESCENT KERN) CL::%%NO-SUPER-TYPE ( +CL::%%NO-SUPER-TYPE) \EXTFQUOTIENT (TEXP THI TLO) SI::*CLOSURE-CACHE* (SI::*CLOSURE-CACHE*) +TTPRINSPACE (\CURSORCOL) \MAIKO.ALLOCBLOCK (\RECLAIM.COUNTDOWN) INIT-CML-READTABLES (CMLRDTBL +*COMMON-LISP-READ-ENVIRONMENT* READ-LINE-RDTBL) TEDIT.BUILD.PCTB0 (DEFAULTPARALOOKS) CL::SXHASH-MAX ( +CL::SXHASH-MAX) \VFMAtLoad (\VFMmaxID \VFMmaxKey \VFMnullKey \VFMvolumeHandle \VFMinterval \VFMold +\VFMlow \VFMhigh \VFMoldPtr \VFMlowPtr \VFMhighPtr \VFMmonitor) \CONVERT.FLOATING.NUMBER ( +\\CFNSTRING.GLOBALRESOURCE) COMP.LOOKUPCONST (CONSTS) CL::%%PI/6 (CL::%%PI/6) +*WHO-LINE-LAST-DIRECTORY* (*WHO-LINE-LAST-DIRECTORY*) \VAMBufferSave (\VAMbufferDirty) DWIMIFY0? ( +NOFIXFNSLST0 NOFIXVARSLST0) CLISPIFY2B (CLTYP0 NEGFLG VARS) \VFMCreateIntervals (\VFMintervals) +PFI.PRINT.BITMAP (*PFI-BITMAP-BASELINE*) LLBREAK (BROKENFNS) FASL-FILEDATE (VALUE) \IDLE.EXIT? ( +\IDLE.PASSWORD.SET) ASSURE.ETHER.ON (\NSFLG) CL::*COMMON-LISP-BASE-TYPES* (CL::*COMMON-LISP-BASE-TYPES* +) \SETETHERFLAGS (\10MBFLG \3MBFLG *MAXIMUM-PACKET-SIZE*) \RPLCONS (\RECLAIM.COUNTDOWN) SKOR (NCXWORD) + AU-REVOIR (POSSLIST##) CL::*BASE-TYPE-LATTICE* (CL::*BASE-TYPE-LATTICE*) \PRINDATUM.TO.STRING ( +\\NUMSTR.GLOBALRESOURCE \\NUMSTR1.GLOBALRESOURCE) *DIGIT-STRING* (*DIGIT-STRING*) MSNEXTWORD (S +NEXTWORD RESETS LASTADVERB) \VANILLADISKINIT (\DISKNAMECASEARRAY) CHAT.TTY.PROCESS (CHAT.TTY.PROCESS) +COMPILER::COMPILE-SCAN-LOOSE-FORM (COMPILER::*DEFERRED-FORMS*) BCOMPL3 (NOTCOMPILEDFILES) +*LOAD-VERBOSE* (*LOAD-VERBOSE*) EDITFROMFILE (EDITLOADFNSFLG) RCOMP3 (NLAML NLAMA LAMS) CLISPIFYCROPS +(SEG) PRETTYCOM (PRTTYSPELLFLG) \FM.EDIT-INSERT (CHARWIDTH BITMAP ITEMWIDTH STRINGPTR TAILPTR) NEWDEFC + (COMPILE.FILE.AFTER) ADIEU (POSSLIST##) WTFIXLOADEF (FAULTFN) XCL:SET-DEFAULT-EXEC-TYPE (XCL:*PROFILE* +) XCL:UNBREAK-FUNCTION (BROKENFNS XCL::*TRACED-FNS* XCL::*UNBROKEN-FNS*) \VANILLAHOSTNAMEP (\PSEUDODSK +) CL::STEP-SLEEP (CL::*STEP-STATE* *EVALHOOK* CL::*STEP-INDENTATION-LEVEL*) \INIT.ETHER.BUFFER.POOL ( +\IOCBFREELIST \IOCBTOTAL \TELERAIDIOCB \IOCB.INPUT.ALLOC \IOCB.INPUT.TOTAL \IOCB.OUTPUT.ALLOC +\IOCB.OUTPUT.TOTAL \10MB.IDEAL.INPUT.LENGTH) ADDPME (NEXTPM NEXTVMEM) READ-AFM-FILE (WeightMenu +SlopeMenu CWIDTH CNAME) *RANDOM-STATE* (*RANDOM-STATE*) PUTDEFN (RESETPTR RESETPC) RESTOREBUF ( +\LASTAIL \LASTAILCOL \LASTAILROW) DOERROR (ERRORS) \FLUSHNDBS (\LOCALNDBS) SETHASHSTATUS ( +SYSHASHFILELST SYSHASHFILE) *READ-DEFAULT-FLOAT-FORMAT* (*READ-DEFAULT-FLOAT-FORMAT*) +%%UNBOUNDED-ARG-COUNT (%%UNBOUNDED-ARG-COUNT) \DOINTERRUPTHERE (\PENDINGINTERRUPT) XCL:*PRINT-STRUCTURE* + (XCL:*PRINT-STRUCTURE*) \INIT.POWERS.OF.TEN (\POWERS.OF.TEN EXTPOWERS) SI::*ADVICE-HASH-TABLE* ( +SI::*ADVICE-HASH-TABLE*) RETDWIM1 (NOFIXVARSLST0 NEXTAIL) SEDIT::CREATE-PRETTY-PRINT-ENV ( +SEDIT::PRETTY-PRINT-ENV) \UFSCreateDevice (\UFSdevice) %%CHAR-TYPE (%%CHAR-TYPE) CL::%%TAN-PPOLY ( +CL::%%TAN-PPOLY) UPDATEFILES (NOTLISTEDFILES NOTCOMPILEDFILES) NEW/INSTANCE/OF/GRAPHNODE (NODELST) +CL::%%-PI/4 (CL::%%-PI/4) FONTSET (FONTNAME) \DOHELPINTERRUPT (\PENDINGINTERRUPT) \FAULTINIT ( +\MACHINETYPE \LASTDIRTYSCANPTR \DOFAULTINIT) \8DISPLAYINIT (\8DISPLAYIMAGEOPS \8DISPLAYFDEV) +COMPILER::CONTEXT-TEST-FORM (COMPILER::CONTEXT-TEST-FORM) CONTROL-T (LAST^TTIMEBOX LAST^TDISKIOTIME +LAST^TNETIOTIME LAST^TGCTIME LAST^TSWAPTIME) PRINTNUM (\\NUMSTR.GLOBALRESOURCE +\\NUMSTR1.GLOBALRESOURCE) CL::*STEP-PRINT-LENGTH* (CL::*STEP-PRINT-LENGTH*) BLOCK (\RUNNING.PROCESS) +BRECOMPILE (READBUF LCFIL) NETWORKLOGINFO (NETWORKLOGINFO) \SET.VMEM.FULL.STATE (\PENDINGINTERRUPT +\VMEM.FULL.STATE) \VFMDelete1 (firstFlag lastFlag volumePage) MSINTERPRETSET (NEEDUPDATE) +CARDINAL-PERIODS (CARDINAL-PERIODS) XCL:*EXEC-PROMPT* (XCL:*EXEC-PROMPT*) TTYIN.READ?=ARGS (\?PARAMS +\TTSCRATCHFILE.GLOBALRESOURCE) CLISPFOR4 (TERMINATEFLG MAKEPROGFLG) *TRACE-OUTPUT* (*TRACE-OUTPUT*) +\HANDLE.NS.ROUTING.INFO (\NSROUTER.PROBECOUNT) \HANDLE.RAW.XIP (\MY.NSNETNUMBER) \CHECKFORSTORAGEFULL +(\STORAGEFULL \PENDINGINTERRUPT) \PRINDATUM (\\NUMSTR.GLOBALRESOURCE \\NUMSTR1.GLOBALRESOURCE) +\TEDIT.UPDATETREE (ITEM#) CL:BOOLE-1 (CL:BOOLE-1) \SETIOPOINTERS (\MACHINETYPE \EM.MOUSEX \EM.MOUSEY +\EM.CURSORX \EM.CURSORY \EM.REALUTILIN \EM.KBDAD0 \EM.KBDAD1 \EM.KBDAD2 \EM.KBDAD3 \EM.KBDAD4 +\EM.KBDAD5 \EM.DISPINTERRUPT \EM.CURSORBITMAP \EM.DISPLAYHEAD SCREENWIDTH \EM.UTILIN) +PROCESS.STATUS.WINDOW (PROCOPMENU PROCESS.STATUS.WINDOW PROCMENU SELECTEDPROC) D-ASSEM::EMIT-BYTE ( +D-ASSEM::*BYTES* D-ASSEM::*BYTE-COUNT*) CL::%%TAN-EPSILON (CL::%%TAN-EPSILON) \TELERAIDINIT ( +\TELERAIDPACKET \TELERAIDBLOCK) \TFBRAVO.SPREAD.LOOKS (OVERSTRIKE) CL:BOOLE-2 (CL:BOOLE-2) +\D01.FAULTINIT (\VMEMACCESSFN \REALPAGETABLE \RPOFFSET \RPTSIZE \RCLKMILLISECOND) SEDIT:DEFAULT-COMMANDS + (SEDIT::COMMAND-TABLE-SPEC SEDIT::FIRST-ADD-COMMAND-MENU-ENTRY) \MAIKO.ETHER-INTERRUPT ( +\MAIKO.INPUT.PACKET) PAGEHEIGHT (\#DISPLAYLINES \CURRENTDISPLAYLINE) \MAPPNAME.INTERNAL ( +\\MAPPNAMESTREAM.GLOBALRESOURCE) PACKC (\\PNAMESTRING.GLOBALRESOURCE) \SETPRINTLEVEL (\TCARPRINTLEVEL +\TCDRPRINTLEVEL \SYSBUF \LINBUF) OUTPUT (*STANDARD-OUTPUT*) CL::%%DEFAULT-PRINT-FUNCTION ( +CL::%%DEFAULT-PRINT-FUNCTION) DWIMUNSAVEDEF (SIDES) MIN.SMALLFIXP (MIN.SMALLFIXP) CLISPATOMARE2 (DEST) + \RESETLINE (\CURRENTDISPLAYLINE) \DL.FAULTINIT (\VMEMACCESSFN \IOCBPAGE \RCLKMILLISECOND \RCLKSECOND +\LASTVMEMFILEPAGE) GO.TO.RELATIVE (\CURSORROW \CURSORCOL) CARDINAL-TEENS (CARDINAL-TEENS) CLEARBUF ( +\LINBUF \SYSBUF) CL:GENSYM (CL::*GENSYM-COUNTER*) \VAMGetVAMPageFor (\VAMbufferVolume +\VAMbufferVolumePage) \CLOSELINE (\CURRENTDISPLAYLINE) MASTERSCOPEXEC (LISPXVALUE) CL:BOOLE-ANDC2 ( +CL:BOOLE-ANDC2) PRINTDATE1 (MAPADR) CL:BOOLE-C1 (CL:BOOLE-C1) \MAIKO.FAULTINIT (\VMEMACCESSFN +\IOCBPAGE \RCLKMILLISECOND \RCLKSECOND) TWODINSPECT.DEFAULT.VALUECOMMANDFN (IT) CLEARFILEPKG (FILELST +LOADEDFILELST) CARDINAL-TENS (CARDINAL-TENS) \SETRECLAIMMIN (\SYSBUF \LINBUF) FONTMAPARRAY ( +\FONTMAPCACHE) LINBUF (\LINBUF) FASL::+LARGEST-FOUR-BYTE-INTEGER+ (FASL::+LARGEST-FOUR-BYTE-INTEGER+) +\DOVE.FAULTINIT (\VMEMACCESSFN \IOCBPAGE \RCLKMILLISECOND \LASTVMEMFILEPAGE \VMEM.FULL.STATE) +BKSYSCHARCODE (\LONGSYSBUF) FW-INIT-MENUS (FW-InteractMenu BackgroundMenuCommands BackgroundMenu) +CL:BOOLE-ANDC1 (CL:BOOLE-ANDC1) \GETREGIONTRACKWITHBOX (OPPX BASEX OPPY BASEY) \VAMMarkBufferDirty ( +\VAMbufferDirty) SEDIT::LIST-FORMATS-TABLE (SEDIT::LIST-FORMATS-TABLE) SI::FINISH-UNADVISING ( +ADVISEDFNS SI::*UNADVISED-FNS*) COMPILER::*SUBST-OCCURRED* (COMPILER::*SUBST-OCCURRED*) CL:BOOLE-EQV ( +CL:BOOLE-EQV) BCOMPL2 (DEFS BLKFNS) CL:BOOLE-AND (CL:BOOLE-AND) *MACROEXPAND-HOOK* (*MACROEXPAND-HOOK* +) FASL::+SMALLEST-FOUR-BYTE-INTEGER+ (FASL::+SMALLEST-FOUR-BYTE-INTEGER+) CL:ARRAY-DIMENSION-LIMIT ( +CL:ARRAY-DIMENSION-LIMIT) \PROCESS.GO.TO.SLEEP (\RUNNING.PROCESS) \FM.EDIT-PREPARETOEDIT (BOXOFFSET +FONT BITMAP ITEMWIDTH MAXWIDTH LIMITCHARS SYSLIMITCHARS ECHOCHAR STREAM DISPLAYLEFT DISPLAYBOTTOM LEFT + STRINGPTR TAILPTR) PACK (\\PNAMESTRING.GLOBALRESOURCE) *WHO-LINE-TTY-PROC-ENTRY* ( +*WHO-LINE-TTY-PROC-ENTRY*) COMP.STRETURN (LEVEL FRAME) SEDIT::INPUT-ESCAPE (SEDIT::THIS-CHAR-ESCAPED) +CL:BOOLE-C2 (CL:BOOLE-C2) TYPE.BUFFER (\CURSORCOL) DO.INSERT.LINE (\LOC.ROW.0) SEDIT::GET-BUTTON-STRING + (SEDIT::BUTTON-STRING-NODE SEDIT::BUTTON-STRING) \PFTransferFilePage (\label.GLOBALRESOURCE) \BSPINIT + (\BSPFDEV) CL:BOOLE-CLR (CL:BOOLE-CLR) COMPILE-IN-CORE (NLAMA NLAML LAMS LAMA NOFIXFNSLST +NOFIXVARSLST COUTFILE NULLFILE) LITATOM-PACKAGE-CONVERSION-TABLE (LITATOM-PACKAGE-CONVERSION-TABLE) +\PACK.ITEM (PACK.INDEX) SPY.MERGE (SPY.HASH) CL::%%PI/4 (CL::%%PI/4) CL:BOOLE-ORC1 (CL:BOOLE-ORC1) +TEDIT.BUILD.PCTB1 (DEFAULTPARALOOKS) TEDIT.RESET.EXTEND.PENDING.DELETE (TEDIT.PENDINGDEL) +D-ASSEM::+CONSTANT-OPCODES+ (D-ASSEM::+CONSTANT-OPCODES+) CL::%%SIN-QPOLY (CL::%%SIN-QPOLY) +%%FAT-CHAR-TYPENUMBER (%%FAT-CHAR-TYPENUMBER) PRETTYCOM1 (DWIMLOADFNSFLG) CL:BOOLE-ORC2 (CL:BOOLE-ORC2 +) FB.EXPUNGE?.MENU (FB.EXPUNGE?MENU) \24DISPLAYINIT (\24DISPLAYIMAGEOPS \24DISPLAYFDEV) +SEDIT::CREATE-ENVIRONMENTS (SEDIT::LISP-EDIT-ENVIRONMENT) SI::FINISH-ADVISING (SI::*UNADVISED-FNS* +ADVISEDFNS) CL:CHAR-BITS-LIMIT (CL:CHAR-BITS-LIMIT) INTERRUPTABLE (\INTERRUPTABLE) GAINSPACE ( +SMASHPROPSLST1) CMLSYMBOLS.SHARED (CMLSYMBOLS.SHARED) CL:BOOLE-IOR (CL:BOOLE-IOR) COMP.GENFN ( +COMP.GENFN.NUM) \CHTOPC (START-OF-PIECE) *WHO-LINE-PROFILE-ENTRY* (*WHO-LINE-PROFILE-ENTRY*) +CL:BOOLE-NOR (CL:BOOLE-NOR) DBG::DEBUGGER-BUTTON-EVENT (*DEBUGGER-MENU*) TEDIT.UNDO (UNDOFN) +CARDINAL-ONES (CARDINAL-ONES) \IRM.GET.KEYWORDS (\IRM.KEYWORDS) CL:DOUBLE-FLOAT-EPSILON ( +CL:DOUBLE-FLOAT-EPSILON) \D01.ASSIGNBUFFERS (\EMBUFVP \EMBUFBASE \EMBUFRP \TELERAIDBUFFER \EMUBUFFERS +\#EMUBUFFERS \#SWAPBUFFERS \#DISKBUFFERS \EMUDISKBUFFERS \EMUDISKBUFEND \EMUSWAPBUFFERS) \PSW.SELECTED + (SELECTEDPROC) CL:BOOLE-NAND (CL:BOOLE-NAND) TTY.PROCESS (\TTY.PROCESS \CURRENTKEYACTION) +\DSKDISPLAY.RESHAPEFN (DSKDISPLAY.POSITION) CL:DOUBLE-FLOAT-NEGATIVE-EPSILON ( +CL:DOUBLE-FLOAT-NEGATIVE-EPSILON) \CHAIN.UP.RPT (\RPTLAST) CL::*STEP-MAX-INDENTATION* ( +CL::*STEP-MAX-INDENTATION*) XCL::PPRINT-DEFINER-RECURSE (TAIL) SPLIT89 (SPLIT89FLG) CL::%%PI/3 ( +CL::%%PI/3) CL:BOOLE-SET (CL:BOOLE-SET) TWODINSPECT.DEFAULT.TITLECOMMANDFN (IT) PACKAGE-ENABLE ( +*PER-EXEC-VARIABLES* *DEFAULT-MAKEFILE-ENVIRONMENT* *PACKAGE*) D-ASSEM::*BYTE-COUNT* (D-ASSEM::*BYTE-COUNT* +) \TEDITPAGEMENU.CREATE (TEDIT.EXPANDED.PAGEMENU) FASL::DUMMY-HANDLE (FASL::DUMMY-HANDLE) +\TEDITMENU.CREATE (TEDIT.EXPANDED.MENU) CHAT.UNDERLINE.METHOD (CHAT.UNDERLINE.METHOD) SYSBUF (\SYSBUF) + ENABLEWHEELSCROLL (WHEELSCROLLENABLED) OPT.JUMPOPT (ANY) \SHOW.ARRAY.FREELISTS (\ABSTORAGETABLE) +CREATESCREEN (\SCREENS) CHAT.WAIT.TIME (CHAT.WAIT.TIME) TERMINAL-INPUT (*STANDARD-INPUT* \LINEBUF.OFD) + BRKDWNCOMPILE2 (NLAMA NLAML LAMS LAMA NOFIXFNSLST NOFIXVARSLST) \M44DOEXTENDVMEMFILE ( +\LASTVMEMFILEPAGE) CL:CALL-ARGUMENTS-LIMIT (CL:CALL-ARGUMENTS-LIMIT) *WHO-LINE-DIRECTORIES* ( +*WHO-LINE-DIRECTORIES*) CLISPIFYNOT (NEGFLG) DWIMIFY1? (NOFIXFNSLST0 NOFIXVARSLST0) SPY.MAKEGRAPHNODES + (SPY.NODES) CL:LEAST-NEGATIVE-LONG-FLOAT (CL:LEAST-NEGATIVE-LONG-FLOAT) COMPILER::PRINT-NODE ( +COMPILER::*NODE-NUMBER*) %%TWOD-ARRAY (%%TWOD-ARRAY) COMPILE.FILE.RESET (NOTCOMPILEDFILES) +COMPILER::FRAME-ANNOTATE-LAMBDA (COMPILER::*REFERENCES*) TERMINAL-OUTPUT (*STANDARD-OUTPUT* +TtyDisplayStream \TERM.OFD) \PSWOP.SELECTED (PROCOP.WAKEMENU) NECCSPEC (SFLG SHOULDBESPECVARS) +*REMOVE-INTERLISP-COMMENTS* (*REMOVE-INTERLISP-COMMENTS*) FFILEPOS (\\FFDELTA1.GLOBALRESOURCE +\\FFDELTA2.GLOBALRESOURCE \\FFPATCHAR.GLOBALRESOURCE) BLOCK%: (BLOCKS) CL:LEAST-NEGATIVE-DOUBLE-FLOAT +(CL:LEAST-NEGATIVE-DOUBLE-FLOAT) \VFMDelete2 (\VFMlowPtr) PACKAGE-CLEAR (*PACKAGE* *LISP-PACKAGE* +*KEYWORD-PACKAGE* *INTERLISP-PACKAGE*) DWIMIFY (NOFIXFNSLST0 NOFIXVARSLST0 PRETTYTRANFLG) CL::%%-PI/2 +(CL::%%-PI/2) CL:LEAST-POSITIVE-LONG-FLOAT (CL:LEAST-POSITIVE-LONG-FLOAT) \MAKE.COURIER.REP.STREAM ( +\COURIER.REP.DEVICE) CL:LEAST-NEGATIVE-SHORT-FLOAT (CL:LEAST-NEGATIVE-SHORT-FLOAT) FW-ADJUST-REGION ( +FW-WindowBottom FW-WindowBottomDelta) CHANGEBACKGROUNDBORDER (\CURRENTBACKGROUNDBORDER) L-CASE ( +\\PNAMESTRING.GLOBALRESOURCE) \LFCreateDirectories (\LFdirectories \PFInitialized) %%GENERAL-ARRAY ( +%%GENERAL-ARRAY) CL:LEAST-POSITIVE-SHORT-FLOAT (CL:LEAST-POSITIVE-SHORT-FLOAT) PACKAGE-MAKE ( +*INTERLISP-PACKAGE* *LISP-PACKAGE* *KEYWORD-PACKAGE*) %%LIT-ARRAY-TABLE (%%LIT-ARRAY-TABLE) +COMPILER::GENCODE-CALL (COMPILER::*FRAME-NAME* COMPILER::*CODE* COMPILER::*OTHERS* +COMPILER::*AVAILABLE-LEXICAL-NAMES*) *WHO-LINE-SHOW-ACTIVE-ENTRY* (*WHO-LINE-SHOW-ACTIVE-ENTRY*) +POSTINITARRAYS (\FREEBLOCKBUCKETS) %%MAXTHINCHAR (%%MAXTHINCHAR) *REPLACE-OLD-EDIT-DATES* ( +*REPLACE-OLD-EDIT-DATES*) CL:LEAST-NEGATIVE-SINGLE-FLOAT (CL:LEAST-NEGATIVE-SINGLE-FLOAT) +*SPECIAL-BINDING-MARK* (*SPECIAL-BINDING-MARK*) CNDIR (\CONNECTED.DIRECTORY +*DEFAULT-PATHNAME-DEFAULTS*) \UNITWIDTHSVECTOR (\UNITWIDTHSVECTOR) MBUTTON.INIT (MBUTTONIMAGEFNS) +CL:BOOLE-XOR (CL:BOOLE-XOR) EXPANDING-PAGEFULLFN (\CURRENTDISPLAYLINE) CL:LEAST-POSITIVE-DOUBLE-FLOAT +(CL:LEAST-POSITIVE-DOUBLE-FLOAT) SPY.POINTERS (SPY.POINTERS) XCL::*WALK-FUNCTION* (XCL::*WALK-FUNCTION* +) KILLSEGMENT (\ENDBUFFER \LASTAIL) DEFAULT.INSPECTW.VALUECOMMANDFN (InspectMenu) +CL:LONG-FLOAT-NEGATIVE-EPSILON (CL:LONG-FLOAT-NEGATIVE-EPSILON) CMLSYMBOLS.DECLARATORS ( +CMLSYMBOLS.DECLARATORS) D-ASSEM::*DCODE* (D-ASSEM::*DCODE*) CARETRATE (\CARET.ON.RATE \CARET.OFF.RATE) + TEDIT.MOVE (TEDIT.MOVE.PENDING) CL:MOST-NEGATIVE-DOUBLE-FLOAT (CL:MOST-NEGATIVE-DOUBLE-FLOAT) +\INITBFS (\SPAREDISKWRITEBUFFER \SYSDISK \EMUSCRATCH \MAXDISKDAs \ISFMAP \ISFSCRATCHCAS \ISFSCRATCHDAS + \ISFCHUNKSIZE) CMLSYMBOLS.FNNAMES (CMLSYMBOLS.FNNAMES) D-ASSEM::*LEVEL* (D-ASSEM::*LEVEL*) NEW/FN ( +/FNS LISPXFNS) FW-INIT (FW-Dormant? FW-Running?) DBG::EXIT-DEBUGGER (BRKVALUES) +CL:LEAST-POSITIVE-SINGLE-FLOAT (CL:LEAST-POSITIVE-SINGLE-FLOAT) OPENRTPSOCKET (\BSPSOCKETS) +CMLSYMBOLS.TYPENAMES (CMLSYMBOLS.TYPENAMES) GRAPHEDITCOMMANDFN (EDITGRAPHMENU) CL:LONG-FLOAT-EPSILON ( +CL:LONG-FLOAT-EPSILON) COMPILE.FILE.APPLY (DEFERRED.EXPRESSIONS) CMLSYMBOLS.LAMBDA.LIST.KEYWORDS ( +CMLSYMBOLS.LAMBDA.LIST.KEYWORDS) \STARTDISPLAY (ScreenBitMap \DisplayStarted WHOLESCREEN WHOLEDISPLAY +\CURSORDESTINATION \CURSORDESTWIDTH \CURSORDESTHEIGHT \CURSORDESTRASTERWIDTH \OLDSCREENHEIGHT +\OLDSCREENWIDTH) XCL::*LEXICAL-VARIABLES* (XCL::*LEXICAL-VARIABLES*) CMLSYMBOLS.VARS (CMLSYMBOLS.VARS) + BRKDWN1 (BRKDWNLENGTH BRKDWNLABELS BRKDWNTOTLST BDLST BDSINK BRKDWNTYPE) CMLSYMBOLS.SPECIALFORMS ( +CMLSYMBOLS.SPECIALFORMS) D-ASSEM::*HUNK-SIZE* (D-ASSEM::*HUNK-SIZE*) SPECVARS (SPECVARS LOCALVARS) +CL:MOST-NEGATIVE-SINGLE-FLOAT (CL:MOST-NEGATIVE-SINGLE-FLOAT) PSCFONT.READFONT (POSTSCRIPTFONTCACHE) +CMLSYMBOLS.MACROS (CMLSYMBOLS.MACROS) D-ASSEM::*PVAR-COUNT* (D-ASSEM::*PVAR-COUNT*) +\TEDIT.FOREIGN.COPY? (TEDIT.COPY.PENDING) \CORE.UNPACKFILENAME (ROOT EXT VERS) CL:MOST-NEGATIVE-FIXNUM + (CL:MOST-NEGATIVE-FIXNUM) CL::*STEP-PRINT-LEVEL* (CL::*STEP-PRINT-LEVEL*) \TFBRAVO.INIT.PARALOOKS ( +HardwareWidth DefaultParagraphLooks) MSPATHS1 (LINENUM TABS NAMED) CHAT.RECONNECT (CHAT.REOPENMENU) +CL::%%SIN-PPOLY (CL::%%SIN-PPOLY) CL:MOST-NEGATIVE-LONG-FLOAT (CL:MOST-NEGATIVE-LONG-FLOAT) GENSYM ( +\GS.BUF GENNUM \GS.NUMLEN \GS.OGENNUM \GS.STR) *PER-EXEC-VARIABLES* (*PER-EXEC-VARIABLES*) +UPDATESCREENDIMENSIONS (SCREENWIDTH SCREENHEIGHT) SCANFILE2 (DONELST FNLST) \IFSERRORSTRING ( +\IFSERRORFILENAME) CL:MOST-POSITIVE-LONG-FLOAT (CL:MOST-POSITIVE-LONG-FLOAT) BAKTRACE (CLEARSTKLST) +D-ASSEM::+MAX-ALLOWABLE-PVAR-COUNT+ (D-ASSEM::+MAX-ALLOWABLE-PVAR-COUNT+) \CreateScreenBitMap ( +\MaxScreenPage) CL:MOST-NEGATIVE-SHORT-FLOAT (CL:MOST-NEGATIVE-SHORT-FLOAT) MODIFY.KEYACTIONS ( +\MODIFIED.KEYACTIONS) VIDEOCOLOR (\VideoColor) XCL::*BREAK-HASH-TABLE* (XCL::*BREAK-HASH-TABLE*) +CL::*STEP-INDENTATION-LEVEL* (CL::*STEP-INDENTATION-LEVEL*) D-ASSEM::+MAX-ALLOWABLE-SPECIAL-COUNT+ ( +D-ASSEM::+MAX-ALLOWABLE-SPECIAL-COUNT+) XCL::*WALK-FORM* (XCL::*WALK-FORM*) COMPILE1A (NOFIXFNSLST0 +NOFIXVARSLST0 NOFIXFNSLST NOFIXVARSLST) \STOPSCROLL? (\CURRENTDISPLAYLINE) DIRECTORY (COMTAIL) +CL:MOST-POSITIVE-SHORT-FLOAT (CL:MOST-POSITIVE-SHORT-FLOAT) \LOCATE.NSNET (\NSROUTER.PROBECOUNT +\NSROUTER.PROBETIMER) CLISPATOM1 (89FLG PARENT CURRTAIL CHARLST NEXTAIL NEWTAIL CLISPCHANGES +CLISPCHANGE) ALLOCHASH (ALLOCATIONS) *WHO-LINE-READTABLE-ENTRY* (*WHO-LINE-READTABLE-ENTRY*) +\VFMGetInterval (\VFMbuffer) THREESTATE.INIT (THREESTATEIMAGEFNS) CL:SHORT-FLOAT-EPSILON ( +CL:SHORT-FLOAT-EPSILON) COMPILER::GENCODE-TAGBODY-INLINE (COMPILER::*STACK-NUMBER* COMPILER::*TAG-NUMBER* +) SCRATCHCONS (\LASTAIL) CL:MOST-POSITIVE-DOUBLE-FLOAT (CL:MOST-POSITIVE-DOUBLE-FLOAT) FW-RE-INIT ( +FW-SeprWidth FW-AccessWidth FW-FieldWidth FW-PercentWidth FW-PercentHeight FW-CurPosTab FW-EofPosTab +FW-PercentTab FW-AccessTab FW-WindowNoNameWidth FW-WindowBottom FW-WindowHeight) SEARCHPRETTYTYPELST ( +PRETTYTYPELST) \NSINIT (\NS.ROUTING.TABLE \NSADDRESS.CACHE \NSROUTER.PROBECOUNT \NSROUTER.PROBETIMER +\NSFLG \NS.READY) SCANDECLARECOLON (ADR DONELST) COMP.STTAG (LEVEL FRAME CODE) HCOPYALL ( +HPRINTHASHARRAY) \INITBCPLDISPLAY (\BCPLDISPLAY \TERM.OFD *STANDARD-OUTPUT*) +XCL::MAKE-VARIABLE-DEFINITION (XCL::*PROFILE-VARIABLES*) MAKEFILES (%#UNDOSAVES) D-ASSEM::+SLOW-FVAR-SLOT+ + (D-ASSEM::+SLOW-FVAR-SLOT+) MSCHECKVARS1 (LF LF1) CL:MOST-POSITIVE-FIXNUM (CL:MOST-POSITIVE-FIXNUM) +\IDATESCANTOKEN (*POS*) PPT (PRETTYTRANFLG) CL:PI (CL:PI) \CREATE.SYMBOL (\AtomFrLst) DOWINDOWCOM ( +WindowMenu) \GCSCANSTACK (NV) SEDIT:*INDENT-ALIST* (SEDIT:*INDENT-ALIST*) BKSYSBUF.GENERAL (PRXFLG) +BCOMPL1A (CHANGES FIRST DESTINATIONENV DEFS NOFIXVARSLST OTHERS) SI::DISABLE-CLOSURE-CACHE ( +SI::*CLOSURE-CACHE-ENABLED*) CLISPFOR0A (I.S.OPRSLST) \MAIKO.ASSIGNBUFFERS (\EMBUFBASE \EMBUFVP +\EMBUFRP \TELERAIDBUFFER \#SWAPBUFFERS \#EMUBUFFERS \#DISKBUFFERS \EMUSWAPBUFFERS \EMUBUFFERS) +D-ASSEM::DIGEST-FUNCTION (D-ASSEM::*LOCAL-FN-FIXUPS*) COMPILER::CLOSURE-ANNOTATE-LABELS ( +COMPILER::*NEED-STORAGE*) *WHO-LINE-ACTIVE-PERIOD* (*WHO-LINE-ACTIVE-PERIOD*) CL::%%SIN-EPSILON ( +CL::%%SIN-EPSILON) COMPILER::FRAME-ANNOTATE-CATCH (COMPILER::*REFERENCES*) CL:SINGLE-FLOAT-EPSILON ( +CL:SINGLE-FLOAT-EPSILON) XCL::IN-PROFILE (XCL:*PROFILE*) FW-WIPE (FW-AllFiles? FW-Anchor FW-CurPosTab +FW-EofPosTab FW-FieldWidth FW-Filters FW-Font FW-FullNameWidth FW-Interval FW-Justified? FW-OFDList +FW-OpenFiles FW-PercentHeight FW-PercentWidth FW-PercentTab FW-Position FW-ReInit? FW-Reset? +FW-Running? FW-SeprWidth FW-Shade FW-SortFn FW-WindowBottom FW-WindowBottomDelta FW-WindowHeight +FW-WindowNoNameWidth) \MEDW.CLOSEW (\TOPWDS) CL:SHORT-FLOAT-NEGATIVE-EPSILON ( +CL:SHORT-FLOAT-NEGATIVE-EPSILON) GETSETQ (SETQTAIL SETQPART) CL:SINGLE-FLOAT-NEGATIVE-EPSILON ( +CL:SINGLE-FLOAT-NEGATIVE-EPSILON) PACKAGE-DISABLE (*PACKAGE*) DREAD (I) MAX.SMALLFIXP (MAX.SMALLFIXP) +SCANEXP (NOFIXVARSLST FILECREATEDLST DONELST) CONDITIONS::*FUTURE-CITIZENS-OF-CONDITIONS* ( +CONDITIONS::*FUTURE-CITIZENS-OF-CONDITIONS*) COMP.AC (AC) OPT.SCANOPT (ANY) \M-VMEMSAVE ( +\VMEM.PURE.LIMIT) DISPLAYSTREAMINIT (TtyDisplayStream \TopLevelTtyWindow \DEFAULTTTYDISPLAYSTREAM +\LastTTYLines) \DOSTACKOVERFLOW (\RECLAIM.COUNTDOWN) CLISPATOM2D (PARENT) \DOCOMPRESSVMEM ( +\VMEM.INHIBIT.WRITE) CL::FUTURE-CITIZENS-OF-XCL (CL::FUTURE-CITIZENS-OF-XCL) SIGNAL (*LAST-CONDITION*) + EDITH (COM READBUF LISPXHISTORY EDITHIST) WINDOWWORLD (\TOPWDS \SCREENBITMAPS \SCREENS +WindowTitleDisplayStream \DEFAULTTTYDISPLAYSTREAM \TopLevelTtyWindow PROMPTWINDOW \LastInWindow +\LastWindowButtons \LastCursorPosition) COMP.ST (CODE LEVEL) \START.PROCESSES (\RUNNING.PROCESS) +\ALLOCBLOCK (\RECLAIM.COUNTDOWN) \SETUPUSERSTACK (\NEED.HARDRESET.CLEANUP \RECLAIM.COUNTDOWN) EDIT* (L + LASTAIL) DELETELINE (\ENDBUFFER \ARROW \CURSOR) DRIBBLE (*DRIBBLE-OUTPUT*) CLISP3A (SEG) CL::%%PI/2 ( +CL::%%PI/2) COMP.STJUMP (FRAME LEVEL) SUBPRINT/ENDLINE (TAIL) EDITDEFAULT (READBUF COM) +XCL::*DECLARATIONS* (XCL::*DECLARATIONS*) MSNEEDUNSAVE (MSNEEDUNSAVE) SIMPLETEXTEDIT ( +\TTSCRATCHFILE.GLOBALRESOURCE) ADD.PROCESS (\PROCESSES) \MKATOM.FULL (\STORAGEFULL \PENDINGINTERRUPT) +BYTECOMPILE2 (COMP.GENFN.NUM) COMPILEUSERFN1 (NOFIXFNSLST0 NOFIXVARSLST0 NOFIXFNSLST NOFIXVARSLST) +EDLOC (UNFIND L) SI::FINISH-UNBREAKING (BROKENFNS XCL::*TRACED-FNS* XCL::*UNBROKEN-FNS*) DPRIN1 (I) +BMOBJ.INIT (BITMAPIMAGEFNS) CHAT.STARTUP (CHAT.ALLHOSTS CHAT.HOSTMENU CHAT.HOST.TO.PROTOCOL +\CURRENTKEYACTION) SCANDEFINEQ (DICT0 FNADRLST ADR NOFIXFNSLST DONELST FNLST) EDOR (L) +CL:LAMBDA-LIST-KEYWORDS (CL:LAMBDA-LIST-KEYWORDS) SI::INSTALL-CLOSURE-CACHE (SI::*CLOSURE-CACHE-ENABLED* +) \MEDW.OPENW (\TOPWDS) COMP.APPLYFNP (ALAMS1) \VFMContextSet (\VFMvolumeHandle) \EXTENDSTACK ( +\STACKOVERFLOW \PENDINGINTERRUPT) EDITRAN (L) CL::%%FUNCTION-DEFINING-FORM-KEYWORDS ( +CL::%%FUNCTION-DEFINING-FORM-KEYWORDS) PROCESSWORLD (\TTY.PROCESS \RUNNING.PROCESS %#SCHEDULER# +\STACKOVERFLOW \TTY.PROCESS.EVENT \PROCESS.AFTEREXIT.EVENT \PROCESSES \TIMERQHEAD) \RELEASE.PROCESS ( +\PROCESSES) COMPILER::CLOSURE-ANNOTATE-LAMBDA (COMPILER::*NEED-STORAGE*) +\PERIODICALLY-WHO-LINE-SHOW-ACTIVE (*WHO-LINE-ACTIVE-TIMER*) *FORMAT-DISPATCH-TABLE* ( +*FORMAT-DISPATCH-TABLE*) EDITTO (L COM TOFLG) COMPILER::FRAME-ANNOTATE-GO (COMPILER::*REFERENCES*) +\DEL.PACKET.FILTER (\PACKET.FILTERS) \RELEASE.IOCB (\IOCB.INPUT.ALLOC \IOCB.OUTPUT.ALLOC \IOCBFREELIST +) MSCLOSEFILES (MSOPENFILES) \INIT.KEYBOARD.STREAM (\KEYBOARD.DEVICE \KEYBOARD.STREAM) +*WHO-LINE-ACTIVE-TIMER* (*WHO-LINE-ACTIVE-TIMER*) GETCFILE (READBUF) CLISPFOR1 (I.V. MAKEPROGFLG +UNDOLST I.S.TYPE1 I.S.TYPE) XCL::ADD-PROTOTYPE-FN (XCL::*DEFINITION-PROTOTYPES*) XCL::*ENVIRONMENT* ( +XCL::*ENVIRONMENT*) EDITCOM (COM FINDFLAG L) CL::%%PI (CL::%%PI) OPT.SETUPOPT (CL:LABELS FRAMES) +DEFAULT.EDITDEF (RETRY) CL::%%2PI/3 (CL::%%2PI/3) EDRPT (MAXLOOP L) CLISPTRAN (CLISPARRAY %#CLISPARRAY +) COMPILER::*NODE-NUMBER* (COMPILER::*NODE-NUMBER*) SET-READTABLE-INTERACTIVELY (*READTABLE*) +COMP.RPLACD (CODE) EDUP (COM L) OPT.POSTOPT (TAGS) DO-HISTORY-SEARCH (*EVENTS*) LISTFILES ( +NOTLISTEDFILES) SEDIT::GET-MENU (SEDIT::MENUS) INSTALLBRUSH (\BrushAList KNOWN.BRUSHES) CURSOR.INIT ( +\CURSORDESTINATION \SOFTCURSORUPBM \SOFTCURSORDOWNBM \CURSORDESTLINE \CURSORDESTLINEBASE +\CURSORDESTWIDTH \CURSORDESTHEIGHT \CURSORDESTRASTERWIDTH \SOFTCURSORBBT1 \SOFTCURSORBBT2 +\SOFTCURSORBBT3 \SOFTCURSORBBT4 \SOFTCURSORBBT5 \SOFTCURSORBBT6) SPELLFILE.MATCHINGDIRS (DIRHOSTS) +\10MB.STARTDRIVER (\10MB.RAWPACKETQ \10MB.INPUT.TIMEOUT \MAIKO.INPUT.PACKET) FIXAPPLY1 (PARENT) +\NSPRINT.WATCHDOG (*PRINT-JOBS-IN-PROGRESS*) /CNDIR (/LAST.CONNECTED.DIRECTORY) OPT.FRAMEOPT (FRAMES) +CL:MOST-POSITIVE-SINGLE-FLOAT (CL:MOST-POSITIVE-SINGLE-FLOAT) \DL.NEWFAULTINIT (\RPOFFSET +\REALPAGETABLE \RPTSIZE) DRAWCURVE (\SYSTEMBRUSHES) DP (*LAST-DP*) IRM.RESET (IRM.DINFOGRAPH +\IRM.HASHFILE \IRM.KEYWORDS) EDITCOMA (UNDOLST UNDOLST1 COM L EDITLISPFLG LASTP2 LASTP1 UNFIND MARKLST + FINDFLAG) CLISPATOM2C (ENDTAIL TENTATIVE) \CURVEEND (DASHCNT DASHON DASHTAIL \OLDERX \OLDERY \OLDX +\OLDY \CURX \CURY) BITMAPOBJ.SNAPW (*INSERT-BITMAP*) CL::%%DEFSTRUCT-CONSP-OPTIONS ( +CL::%%DEFSTRUCT-CONSP-OPTIONS) DEFEVAL (\DEFEVALFNS) \TEDIT.APPLY.PARASTYLES (*TEDIT-PARASTYLE-CACHE*) + EDITCOML (UNFIND L EDITLISPFLG LASTP2 LASTP1 COM USERMACROS) FIXSPELL1 (RESPELLS SIDES) +GET.EDIT.BITMAP.MENU (EDIT.BITMAP.MENU) NewPrinter (DEFAULTPRINTINGHOST) D-ASSEM::+JUMP-CHOICES+ ( +D-ASSEM::+JUMP-CHOICES+) EDITCOM1 (EDITLISPFLG UNDOLST1) BREAKLINE (\ARROW \CURSOR) +CL::*STEP-INDENTATION-INCREMENT* (CL::*STEP-INDENTATION-INCREMENT*) \MAIKO.CONS.UFN ( +\RECLAIM.COUNTDOWN) D-ASSEM::+JUMP-RANGE-SIZE-MAP+ (D-ASSEM::+JUMP-RANGE-SIZE-MAP+) +XCL::ADD-WHERE-IS-DATABASE (XCL::*WHERE-IS-CASH-FILES*) EDITSAVE (EDITHIST EDITLISPFLG) +COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::*REFERENCES*) XCL::*PROFILES* (XCL::*PROFILES*) +CLISPCAR/CDR1 (VAR2) COMPILER::GENCODE-RETURN (COMPILER::*NON-LOCALS*) \STOPDISPLAY (\MaxScreenPage +\DisplayStarted) \TEDIT.APPLY.STYLES (*TEDIT-CURRENTPARA-CACHE* *TEDIT-PARASTYLE-CACHE*) UNDOEDITCOM ( +COM L) MSCHECKBLOCKBASIC (ENTRIES BLKFNS BLKAPPLYCALLERS) COMPILER::*COMPILE-SCAN-CONTEXT* ( +COMPILER::*COMPILE-SCAN-CONTEXT*) RECORDTRAN (CLISPCHANGE) SEDIT:RESET-FORMATS (SEDIT::*FSPEC-TABLE-COPY* +) \VFMFind (\VFMbuffer \VFMoldPtr \VFMlowPtr \VFMhighPtr) \TEDIT.MENU.INIT (TEDIT.MENUDIVIDER.SPEC +TEDIT.EXPANDEDMENU.SPEC TEDIT.CHARLOOKSMENU.SPEC TEDIT.PARAMENU.SPEC TEDIT.PAGEMENU.SPEC) UNSAVEFNS ( +MSDATABASELST NOTCOMPILEDFILES MSNEEDUNSAVE) *EDIT-INPUT-WITH-TTYIN* (*EDIT-INPUT-WITH-TTYIN*) +\MAIKO.INPUT.INTERRUPT (\MAIKO.INPUT.PACKET) CL::%%DEFSTRUCT-EXPORT-OPTIONS ( +CL::%%DEFSTRUCT-EXPORT-OPTIONS) \NSPRINT.WATCH.JOB (*PRINT-JOBS-IN-PROGRESS*) \GETMISCNSOCKET ( +\MISC.NSOCKET) EDITSMASH1 (UNDOLST1) *WHO-LINE-UPDATE-INTERVAL* (*WHO-LINE-UPDATE-INTERVAL*) +\FM.LAYOUTGRID (FORMAT LEFT \FM.GROUP-ID-COUNTER) CLISPCOND (SEG) \ADD.PACKET.FILTER (\PACKET.FILTERS) + CL::%%E (CL::%%E) *DEFINITION-HASH-TABLE* (*DEFINITION-HASH-TABLE*) BRECOMPILE1 (BLKFNS ADRLST) +D-ASSEM::+JUMP-SIZES+ (D-ASSEM::+JUMP-SIZES+) \DEFINEDISPLAYINFO (\DISPLAYINFOALIST) +*TOTAL-PACKAGES-LIMIT* (*TOTAL-PACKAGES-LIMIT*) SETTERMTABLE (\PRIMTERMSA \PRIMTERMTABLE) FTPDEBUG ( +FTPDEBUGLOG FTPDEBUGFLG) STOPNS (\NSFLG) CL::%%2PI (CL::%%2PI) MOVE.BACK.TO (\CURSOR) MSADDANALYZE ( +MSFNTYPES) \INITBIGNUMS (\BIG.0 \BIG.1 MIN.INTEGER MAX.INTEGER) *UNINTERNED-PACKAGE-INDEX* ( +*UNINTERNED-PACKAGE-INDEX*) PFI.AFTER.NEW.PAGE (*PFI-PAGE-COUNT* *PFI-ITEM*) OPT.SETDEFREFS (CL:LABELS +) CLOSEF (*STANDARD-INPUT* *STANDARD-OUTPUT*) MSCHECKBOUNDFREE (MSCRATCHASH) HASHTABLE-SIZE-LIMIT ( +HASHTABLE-SIZE-LIMIT) COMPILEUSERFN (OTHERVARS) *EXEC-MAKE-UNDOABLE-P* (*EXEC-MAKE-UNDOABLE-P*) CL:EVAL + (CL::*SKIP-EVALHOOK*) COMPILER::*INDENT-INCREMENT* (COMPILER::*INDENT-INCREMENT*) \STKMIN ( +\OPSTACKEFFECT \OPLENGTH) INITIALIZEDISPLAYSTREAMS (WHOLEDISPLAY \SYSPILOTBBT \SYSBBTEXTURE +\GUARANTEEDDISPLAYFONT DEFAULTFONT) PRIME-HASHTABLE-SIZES (PRIME-HASHTABLE-SIZES) EDIT4F1 (N LASTAIL) +COMPILER::META-SUBST-VAR-REF (COMPILER::*SUBST-OCCURRED*) DC (*LAST-DC*) EDIT2F (COM) \FINDOP ( +\OPCODEARRAY) \VAMFreePageGroup (\\DFSVAMjunkPage.GLOBALRESOURCE \\DFSVAMpage.GLOBALRESOURCE) +ACCESSDEF (NOTRANFLG) PAINTW.CACHE.SHADE (PAINTW.SHADES) PRINTLEVEL (*PRINT-LEVEL* *PRINT-LENGTH*) +DIRFILENAME (FILE FILENAME) \INIT-MISCN-TABLE (\MISCN-TABLE) WHO-LINE-SHOW-ACTIVE ( +*WHO-LINE-ACTIVE-TIMER*) SCANCOMPILEDFN (DICT0 FNADRLST DONELST ADR FNLST) EDIT1F (COM LASTAIL) +COMPAREFAIL (LOOSEMATCH DIFFERENCES) ED (XCL::ED-LAST-INFO) XCL::*PROFILE-VARIABLES* ( +XCL::*PROFILE-VARIABLES*) \ALLOCMDSPAGE (\MDSFREELISTPAGE) COMPILER::*UNKNOWN-FUNCTIONS* ( +COMPILER::*UNKNOWN-FUNCTIONS*) SPY.BUTTON (SPY.BUTTON) ANALYZE-TESTS (ANALYZE-TESTS) MOVE.FORWARD.TO ( +\CURSOR) CLISPFOR (ATTEMPTFLG CLISPCHANGE NOFIXFNSLST0 NOFIXVARSLST0 %#UNDOSAVES) +COMPILER::*COMPILE-DEFINER-CONTEXT* (COMPILER::*COMPILE-DEFINER-CONTEXT*) FASL::END-MARK (FASL::END-MARK +) MSSEEKTYPE (LASTPARSED S) \HANDLE.RAW.PUP (\LOCALPUPNETHOST) EDITBELOW (COM UNFIND L) FW-RECALL-CMD +(FW-Reset?) CHECKRECORDNAME (STRUCNAME NAME TAIL CREATEINFO) EDITSMASH (UNDOLST1) FINDFN (EXPR +BREAKFLG TYPE-IN? TAIL) COMPILER::*COMPILE-FILE-CONTEXT* (COMPILER::*COMPILE-FILE-CONTEXT*) +BLOCKCOMPILE1 (LINKEDFNS EXPRSLST) EDIT4F2 (NEWFLG) BRHC/LAYOUT/DAUGHTERS (RETURNTTC RETURNBTC) +\MAIKO.10MBSTARTDRIVER (\10MB.RAWPACKETQ \10MB.INPUT.TIMEOUT \MAIKO.10MB.NDB \MAIKO.INPUT.PACKET) +HISTORYFIND1 (L HISTORYFLG) \GET.PRIORITY.QUEUE (\HIGHEST.PRIORITY.QUEUE) FASL::CHECK-TABLE-SIZE ( +FASL::CHECK-TABLE-SIZE) BRKDWNINIT (BRKDWNLENGTH BDLST BDSINK BDPTR) \TEDIT.CHARLOOKSMENU.CREATE ( +TEDIT.CHARLOOKS.MENU) EDITL0 (LISPXBUFS) \HDCPYDISPLAYINIT (\HDCPYDISPLAYIMAGEOPS) FORWARD.DELETE.TO ( +\ENDBUFFER) MAKEFILE1 (NOTCOMPILEDFILES) CL::%%NO-COPIER (CL::%%NO-COPIER) \IRM.GET.HASHFILE ( +\IRM.HASHFILE) CL::%%LOG-QPOLY (CL::%%LOG-QPOLY) CHAT.DISPLAYTYPES (CHAT.DISPLAYTYPES) TTY/EDITL ( +READBUF EDITIME) *DEBUGGER-ENTRY-POINTS* (*DEBUGGER-ENTRY-POINTS*) DIRECTORY.PARSE (FILEGROUP) +COMPILER::COMPILE-FILE-LOOSE-FORM (COMPILER::*OUTSTANDING-LOOSE-FORMS*) HPINITRDTBL (HPRINTRDTBL) +COMP.DELFN (LEVEL CODE) FASL::END-OF-DATA-MARK (FASL::END-OF-DATA-MARK) SEDIT::SPLIT-LITATOM ( +SEDIT::BUTTON-STRING-NODE SEDIT::BUTTON-STRING) RATOM (\\PNAMESTRING.GLOBALRESOURCE) EDITBF1 (LASTAIL) + VKBD.FIX.FONT (DEFAULTKEYBOARDDISPLAYFONT) *DEBUGGER-MENU-ITEMS* (*DEBUGGER-MENU-ITEMS*) +\DL.ASSIGNBUFFERS (\EMBUFBASE \EMBUFVP \EMBUFRP \TELERAIDBUFFER \#SWAPBUFFERS \#EMUBUFFERS +\#DISKBUFFERS \EMUSWAPBUFFERS \EMUBUFFERS) FASL::VERSION-RANGE (FASL::VERSION-RANGE) \SUBREAD (\RBFLG +\\PNAMESTRING.GLOBALRESOURCE) *DEBUGGER-COMMAND-TABLE* (*DEBUGGER-COMMAND-TABLE*) +COMPILER::*INPUT-FILECOMS-VARIABLE* (COMPILER::*INPUT-FILECOMS-VARIABLE*) *TRACE-DEPTH* (*TRACE-DEPTH* +) *WHO-LINE-PACKAGE-ENTRY* (*WHO-LINE-PACKAGE-ENTRY*) FW-ADJUST-PLACEMENT (FW-WindowBottom) +XCL::*WHERE-IS-HASH-FILE-SIZE* (XCL::*WHERE-IS-HASH-FILE-SIZE*) *WHO-LINE-BORDER* (*WHO-LINE-BORDER*) +SHOW.CLEARINGHOUSE (CLEARINGHOUSE.STRUCTURE.WINDOW) \CURVESTART (\OLDERX \OLDX \CURX \OLDERY \OLDY +\CURY) ASSURE.PUP.READY (\PUP.ROUTING.TABLE \PUP.READY \LOCALPUPNETHOST \OLDPUPHOST# +\PUPROUTER.PROBECOUNT \PUPROUTER.PROBETIMER) PFI.HANDLE.DEFDEFINER (*PFI-TYPES* PRETTYPRINTMACROS) +UPPERCASEARRAY (UPPERCASEARRAY) CURSOR (\CURSORHOTSPOTX \CURSORHOTSPOTY) EDIT4F3 (FLG) COMP.EVQ ( +COMPVARMACROHASH) ADD-USER-SUBR (\USER-SUBR-LIST) CL::%%LOG-PPOLY (CL::%%LOG-PPOLY) \FM.EDIT-MOVECARET + (POINTER STRINGPTR TAILPTR) *WHO-LINE-TIME-ENTRY* (*WHO-LINE-TIME-ENTRY*) CLISP3C (PRXFLG) +\INIT-USER-SUBR-TABLE (\USER-SUBR-TABLE) TEDIT.BUILD.PCTB2 (DEFAULTPARALOOKS) PFI.HANDLE.RPAQQ ( +*PFI-FNSLST*) OPT.COMPINIT (DONOTHING) IN-READTABLE (*READTABLE*) CL::*GENSYM-COUNTER* ( +CL::*GENSYM-COUNTER*) MSUPDATE (MSPRINTCNT) MSPATHS (MSCRATCHASH MSPRINTFLG) +FASL::INITIAL-VALUE-TABLE-SIZE (FASL::INITIAL-VALUE-TABLE-SIZE) SI::NLSETQ-PROCEED-CASE ( +SI::NLSETQ-PROCEED-CASE) BRHC/LAYOUT/TERMINAL (RETURNTTC RETURNBTC) BRKDWNFBOXES (BDPTR) +CL::*GENTEMP-COUNTER* (CL::*GENTEMP-COUNTER*) FASL::VALUE-TABLE-INCREMENT (FASL::VALUE-TABLE-INCREMENT +) *WHO-LINE-PACKAGE-NAME-CACHE* (*WHO-LINE-PACKAGE-NAME-CACHE*) \TOP-LEVEL-READ ( +\\PNAMESTRING.GLOBALRESOURCE) \KEYHANDLER1 (\KEYBUFFERING \PENDINGINTERRUPT \TIMER.INTERRUPT.PENDING) +CL::*GENSYM-PREFIX* (CL::*GENSYM-PREFIX*) \VFMGetBufferFor (\VFMbufferPool) EDITNTH (COM) +*PREFERRED-READING-SYMBOLS* (*PREFERRED-READING-SYMBOLS*) COMPILER::*CURRENT-FUNCTION* ( +COMPILER::*CURRENT-FUNCTION*) \TEDITPARAMENU.CREATE (TEDIT.EXPANDEDPARA.MENU) \VFMReadNext (\VFMoldPtr + \VFMlowPtr \VFMhighPtr) \PEEKNS (\PEEKNSNUMBER XIPTRACEFILE XIPTRACEFLG) SCROLL.HANDLER ( +\LastInWindow) \FM.LAYOUTCOLUMN (FORMAT \FM.GROUP-ID-COUNTER) MAKEFILE (PRETTYTRANFLG %#UNDOSAVES +CLISPIFYPRETTYFLG LASTFILE NOTLISTEDFILES NOTCOMPILEDFILES) SEDIT::COMMAND-TABLE-SPEC ( +SEDIT::COMMAND-TABLE-SPEC) MSSEEK-WORD (LASTPARSED S) PF (LASTWORD) \LOCATE.PUPNET ( +\PUPROUTER.PROBECOUNT \PUPROUTER.PROBETIMER) CL::%%NO-CONSTRUCTOR (CL::%%NO-CONSTRUCTOR) CL::%%SQRT2 ( +CL::%%SQRT2) BREAK-FUNCTION (BROKENFNS XCL::*UNBROKEN-FNS*) \BASEBYTES.IO.INIT (\BASEBYTESDEVICE) DV ( +*LAST-DV*) \VECFONTINIT (\VecFontDir) CLISP3 (NEGFLG SEG) EXEC-EVAL (IT) \SPY.INTERRUPT ( +\PERIODIC.INTERRUPT) CL:CHAR-HYPER-BIT (CL:CHAR-HYPER-BIT) OPT.CHECKTAG (LEVEL) PURGEHISTORY ( +ARCHIVEFLG) TEDIT.UNDO.PARALOOKS (TEDIT.PENDINGDEL) MSSPLST (MSSPLST) BREAKREGIONSPEC (BREAKREGIONSPEC +) FASL::*BLOCK-LEVEL* (FASL::*BLOCK-LEVEL*) *WHO-LINE-OLD-TIME* (*WHO-LINE-OLD-TIME*) UNDOLISPX3 ( +EDITQUIETFLG MAXLEVEL CLISPTRANFLG) ONEDINSPECT.DEFAULT.VALUECOMMANDFN (IT) HVFWDREAD (BACKREFCNT +BACKREFS) COMPILER::*TAIL-RECURSION-THRESHOLD* (COMPILER::*TAIL-RECURSION-THRESHOLD*) +CHAT.CHOOSE.PHONE.NUMBER (CHAT.PHONE.NUMBER.MENU CHAT.PHONE.NUMBERS) CURSORSCREEN (\CURSORSCREEN) +CL:CHAR-CONTROL-BIT (CL:CHAR-CONTROL-BIT) \FM.LAYOUTROW (FORMAT \FM.GROUP-ID-COUNTER) +XCL::*WHERE-IS-IGNORE-DEFINE-TYPES* (XCL::*WHERE-IS-IGNORE-DEFINE-TYPES*) CL::STOP-STEPPING ( +CL::*STEP-STATE* *EVALHOOK*) COMPILER::*VAR-NUMBER* (COMPILER::*VAR-NUMBER*) PF* (**COMMENT**FLG) +CL::*DESCRIBE-PRINT-LEVEL* (CL::*DESCRIBE-PRINT-LEVEL*) CL:CHAR-FONT-LIMIT (CL:CHAR-FONT-LIMIT) +\TEXTMENU.TOGGLE.INIT (\TOGGLEIMAGEFNS) \VAMAllocPageGroup (\\DFSVAMjunkPage.GLOBALRESOURCE +\\DFSVAMpage.GLOBALRESOURCE) INITIALEVALQT (BOOTFILES) *ATTACHED-WINDOW-COMMAND-SYNONYMS* ( +*ATTACHED-WINDOW-COMMAND-SYNONYMS*) ASKUSER$ (KEY) HVRPTREAD (RPTCNT RPTVAL) COMP.DELPUSH (LEVEL CODE) + MSSOLVE (MSTHOSE) CHAT.EMACSCOMMANDS (CHAT.EMACSCOMMANDS) CLISPIF (ATTEMPTFLG CLISPCHANGE +NOFIXFNSLST0 NOFIXVARSLST0 %#UNDOSAVES) \CURVE (DASHCNT DASHON DASHTAIL \OLDERX \OLDERY \OLDX \OLDY +\CURX \CURY) INTERPRET/MARK/FORMAT (BOX.BOTH.FLG BOX.LEAVES.FLG BORDER.FOR.MARKING +LABELSHADE.FOR.MARKING) \VFMSplit1 (\VFMxtraBuffer \VFMhighPtr) EDITL1 (FINDFLAG COM L0 COM0 UNDOLST +EDITHIST0 LISPXBUFS) COMPILER::*PROCESSED-FUNCTIONS* (COMPILER::*PROCESSED-FUNCTIONS*) DELETE.TO.END ( +\ENDBUFFER) RESETUNDO (LISPXHIST) ICMLARRAY.VALUECOMMANDFN (IT) LISPXREAD (READBUF REREADFLG CTRLUFLG) + HRULE.DISPLAYFN (WIDTH) \PFCreateVols (\DFSLogicalVolumes \DFSLogicalVolumeHash \PFInitialized) +\RESETSTACK0 (\SAVED.USER.CONTEXT \KBDSTACKBASE \MISCSTACKBASE \NEED.HARDRESET.CLEANUP) CLISPATOM2A ( +NOFIXFNSLST0 NOFIXVARSLST0 TENTATIVE) FIX89A (ATTEMPTFLG) \ASSURE.FPTOVP.PAGE (\NEWVMEMPAGEADDED) +DBG::*DEBUGGER-TERMINAL-TABLE* (DBG::*DEBUGGER-TERMINAL-TABLE*) TEDIT.COPY (TEDIT.COPY.PENDING) +*WHO-LINE-TIMER* (*WHO-LINE-TIMER*) CL:READ-PRESERVING-WHITESPACE (\\PNAMESTRING.GLOBALRESOURCE) +*EXEC-COMMAND-TABLE* (*EXEC-COMMAND-TABLE*) TEDIT.UNDO.LOOKS (TEDIT.PENDINGDEL) CL::%%NO-PREDICATE ( +CL::%%NO-PREDICATE) CL:READ-DELIMITED-LIST (\\PNAMESTRING.GLOBALRESOURCE) TB.UNDOSELECTION ( +SELECTIONSTATE) INITIALIZE-NEW-SHELL-DEVICE (*NEW-SHELL-DEVICE*) LISPX (IT EDITQUIETFLG LISPXCOMS +HISTORYCOMS REDOCNT READBUF) CARET (\CARET.DEFAULT) RECORDECLTAIL (ALLOCATIONS) SEDIT::MUTATE ( +SEDIT::MUTATE-CANDIDATE) CL::*DESCRIBE-PRINT-LENGTH* (CL::*DESCRIBE-PRINT-LENGTH*) COMPILEMODE ( +COMPILEMODE) *PACKAGE-FROM-INDEX* (*PACKAGE-FROM-INDEX*) TTYINEDIT (\TTSCRATCHFILE.GLOBALRESOURCE) +BCOMPL.BODY (NOFIXFNSLST) *NOT-YET-EVALUATED* (*NOT-YET-EVALUATED*) SETREADTABLE (*READTABLE*) +MSNOTICEFILE (LOADDBFLG MSFILELST) INITBITMASKS (BITMASKARRAY NOTBITMASKARRAY 4BITMASKARRAY +NOT4BITMASKARRAY) CURSORHOTSPOT (\CURSORHOTSPOTX \CURSORHOTSPOTY) SCANFILE1 (NOFIXFNSLST) CL:READ ( +\\PNAMESTRING.GLOBALRESOURCE) LISPXUNREAD (READBUF) FINDATOM (PARENT SUBPARENT FORMSFLG) EVALQT ( +TOPLISPXBUFS) GETMOUSESTATE (LASTMOUSEX LASTMOUSEY LASTMOUSEBUTTONS LASTKEYBOARD LASTSCREEN) COMPERRM +(EMFLAG) STRING.EQUAL (UPPERCASEARRAY) RECORDBIND (BINDINGS) *WHO-LINE-DISPLAY-NAMES?* ( +*WHO-LINE-DISPLAY-NAMES?*) *WHO-LINE-COLOR* (*WHO-LINE-COLOR*) PRINOPEN (MAKEMAP) MSVERB (S LASTADVERB +) GETDUMMYVAR (DUMMYVARS VARS PROGVARS) COURIERTRACE (COURIERTRACEFILE COURIERTRACEFLG) +\DOBUFFEREDTRANSITIONS (\KEYBUFFERING \PENDINGINTERRUPT) ANALYZE-REST (%%UNBOUNDED-ARG-COUNT +%%LET-LIST) COMPILER::*TAG-NUMBER* (COMPILER::*TAG-NUMBER*) LOWERCASE (CHCONLST) \PRINTADDR ( +\\NUMSTR.GLOBALRESOURCE \\NUMSTR1.GLOBALRESOURCE) SEDIT::GET-CONTEXT (SEDIT::CONTEXTS) CL::%%LOG2 ( +CL::%%LOG2) \FM.EDIT-DELETE (MOUSEX MOUSEY STRINGPTR TAILPTR ITEMWIDTH) SCANFILE0 (DICT ADR) +FILEPKGCOM (FILEPKGCOMSPLST) WBREAK (WBREAK) \SAVEVMBACKGROUND (\DIRTYPAGEHINT) PRESSFILEP ( +PRESS-STREAM) OPT.CHLEV (LEVEL) ONEDINSPECT.DEFAULT.TITLECOMMANDFN (IT) CL::%%RANDOM-SIZE ( +CL::%%RANDOM-SIZE) \TTW1 (\TOPWDS) \InitCurveBrushes (\SingleBitBitmap) PUSH-KEYWORD-BINDING ( +%%LET-LIST) \STRINGSTREAM.INIT (\STRINGSTREAM.FDEV) \FLUSHPAGE (\NEWVMEMPAGEADDED \DIRTYPAGEHINT) +INTERRUPTED (\PENDINGINTERRUPT) PRINSHUT (MAKEMAP) \PUPGATELISTENER (\PUPROUTER.PROBECOUNT) +\TRANSFERPAGE (\LASTACCESSEDVMEMPAGE) \VAMBufferInit (\VAMbuffer \VAMbufferVolume \VAMbufferVolumePage + \VAMbufferDirty) CL::%%DEFSTRUCT-OPTIONS (CL::%%DEFSTRUCT-OPTIONS) CL::*DESCRIBE-INDENT* ( +CL::*DESCRIBE-INDENT*) \CARET.DOWN (\CARET.UP) RSTRING (\\PNAMESTRING.GLOBALRESOURCE) ADDCHAR (\CURSOR + \CURSORCOL) POSTSCRIPT.INIT (POSTSCRIPTFONTCACHE \POSTSCRIPT.CHARTYPE \POSTSCRIPTIMAGEOPS +*POSTSCRIPT-NS-HASH*) COPYVM (\VMEM.INHIBIT.WRITE) READ-EXTENDED-TOKEN (\\PNAMESTRING.GLOBALRESOURCE) +\HANDLE.PUP.ROUTING.INFO (\PUPROUTER.PROBECOUNT) \INTERRUPTED (\PENDINGINTERRUPT) END.DELETE.MODE ( +\DELETING) COMP.CALL (NLAMS1 ALAMS1) \FM.EDIT-WORDDELETE (ITEMWIDTH STRINGPTR TAILPTR) FIX89 (89CHANGE +) DELETETO (\DELETING \CURSORCOL \CURSOR \ENDBUFFER) CL:ERROR (*LAST-CONDITION*) \DISABLEGC1 ( +\RECLAIM.COUNTDOWN \RECLAIMMIN \PENDINGINTERRUPT \GCDISABLED) \NSFILING.LOGIN ( +\NSFILING.ACTIVE.SESSIONS) *ED-OFFERS-PROPERTY-LIST* (*ED-OFFERS-PROPERTY-LIST*) SETFONT (\DEDITFONT# +SPACEWIDTH) CLISPATOM2 (TAIL ENDTAIL CLISPCHANGE BACKUPFLG TYP TENTATIVE CLTYP) COMP.TOPLEVEL.COMPILE +(FREELST SUBFNFREEVARS COMFNS) \BITBLT.BITMAP (\BBSCRATCHTEXTURE) RANDSET (RANDSTATE) \VECSKIP ( +VecCurX VecCurY) \ATBLSET (\READTABLEHASH \ORIGREADTABLE %#CURRENTRDTBL# FILERDTBL +*OLD-INTERLISP-READ-ENVIRONMENT* *READTABLE* \ORIGTERMTABLE \PRIMTERMTABLE \PRIMTERMSA) +COMPILER::CLOSURE-ANNOTATE-BLOCK (COMPILER::*NEED-STORAGE*) \AUTHENTICATION.FIND.SERVER ( +\AUTHENTICATION.SERVER.CACHE) SPY.END (\PERIODIC.INTERRUPT) RECORDECLBLOCK (ALLOCATIONS) \ADDOFD ( +\OPENFILES) OPT.RETOPT1 (ANY) MSINIT (MSDATABASELST MARKASCHANGEDFNS MSCHANGEDARRAY MSDBEMPTY +MSFILETABLE MSARGTABLE) SI::*BACKQUOTE-LEVEL* (SI::*BACKQUOTE-LEVEL*) EDITBF (COM UNFIND L) FLTFMT ( +\FLOATFORMAT) DEFPRINT (\DEFPRINTFNS) START.CLEARINGHOUSE (\NS.ROUTING.TABLE.RADIUS +NS.SERVER.NAMES.TO.ADDRESSES \CH.CACHE LOCAL.CLEARINGHOUSE) TRACEREGION (TRACEREGION) +\DRAWELLIPSE.GENERIC (EXTRAXOFFSET EXTRAYOFFSET VERSOXOFFSET VERSOYOFFSET) BRKDWNBOXES (BDPTR) +RESETSAVE (SI::*RESETFORMS*) \CREATE.TTYDISPLAYSTREAM (\TTYREGIONOFFSETSPTR \TTYWINDOW +*STANDARD-OUTPUT*) UPDATEFN (DEF) \FORMATLINE (*TEDIT-CURRENTPARA-CACHE* *TEDIT-CACHED-FMTSPEC*) +\FM.EDIT-BACKUP (STRINGPTR CHARWIDTH ITEMWIDTH TAILPTR) WHO-LINE-TIME (*WHO-LINE-TIMER* +*WHO-LINE-OLD-TIME*) PRINTNUM-TO-STRING (\\NUMSTR.GLOBALRESOURCE \\NUMSTR1.GLOBALRESOURCE) \DELETEOFD +(\OPENFILES) INPUT (*STANDARD-INPUT*) \BQUOTE.BREAKRESET (\INBQUOTE) EDITQF (L LASTAIL) HVBAKREAD ( +DATATYPESEEN) FASL:SIGNATURE (FASL:SIGNATURE) IMAGEFNSCREATE (IMAGEOBJGETFNS) CL::*DESCRIBE-DEPTH* ( +CL::*DESCRIBE-DEPTH*) \UFSPrintTypeMenu (FileTypeMenu) MAKECOM (COM) DASSEM.DSTOREFN (CD CODELOC) +OPT.DS1 (TAGS ICNT) LISPXFIND (EDITQUIETFLG) *DEFAULT-PUSH-EXTENSION-SIZE* ( +*DEFAULT-PUSH-EXTENSION-SIZE*) TTSKIPSEPR (\BUFFER) DO.CRLF (\CURRENTDISPLAYLINE) ASKUSERSETUP (KEY +PROMPTSTRING OPTIONS CONFIRMFLG NOECHOFLG NOCASEFLG) MARGINBAR.INIT (MARGINBARIMAGEFNS) \UPDATECHAIN ( +\RPTLAST \DIRTYPAGECOUNTER \PAGEFAULTCOUNTER) CL::%%DEFAULT-SLOT-TYPE (CL::%%DEFAULT-SLOT-TYPE) +*WHO-LINE-VALUE-FONT* (*WHO-LINE-VALUE-FONT*) CALLS (MSRECORDTRANFLG) CREATE.PACKET.EXCHANGE.XIP ( +\PACKET.EXCHANGE.CNTR) INIT.CURSOR (\LOC.ROW.0 \BMARG \CURSORROW \CURSORCOL) \ETHEREVENTFN (\PUP.READY + \NS.READY \IP.READY \3MBLOCALNDB \LOCALNDBS \10MBLOCALNDB) \PFI.DO.HARDCOPY (\PFI.PROCESS +\PFI.PROCESS.COMMANDS) VIDEORATE (\VIDEORATE) BRHC/LAYOUT (RETURNTTC RETURNBTC) BPNT0 (COM) +INSERT.NODE (\ENDBUFFER) DISMISS (\\DISMISSTIMER.GLOBALRESOURCE) COMPILER::GENCODE-LET ( +COMPILER::*STACK-NUMBER* COMPILER::*AVAILABLE-LEXICAL-NAMES*) XCL:*TRACE-VERBOSE* (XCL:*TRACE-VERBOSE* +) \CHARHI (\CHARHI) \HCPYMODEDISPLAYINIT (\HCPYMODEDISPLAYIMAGEOPS.PRESS +\HCPYMODEDISPLAYIMAGEOPS.INTERPRESS) \GC.HANDLEOVERFLOW (\RECLAIM.COUNTDOWN) \REMOVE.EXTERNALFORMAT ( +*EXTERNALFORMATS*) \TFBRAVO.HANDLE.HEADING (HEADINGPARA NEXTPARAPTR) PFI.ADD.TO.INDEX (*PFI-LOCATIONS* +) ENCAPSULATEDIMAGEFNS (ENCAPSULATEDIMAGEFNS) RECORDGENSYM (PATGENSYMVARS) PRINTFN (LASTFNDEF) +\PFCreatePhysicalVolume (\PFInitialized \PhysVolumePage) CL:ARRAY-RANK-LIMIT (CL:ARRAY-RANK-LIMIT) +DO.EDIT.COMMAND (\CURSORCOL \CURSOR \LASTCHAR) \NSFILING.DISCARD.SESSION (\NSFILING.ACTIVE.SESSIONS) +\CLEANUP.STACKFULL (\STACKOVERFLOW) XCL:UNADVISE-FUNCTION (SI::*UNADVISED-FNS* ADVISEDFNS) +DECLARERECORD (USERRECLST) CL::%%DEFAULT-STRUCTURE-INCLUDE (CL::%%DEFAULT-STRUCTURE-INCLUDE) +%%INITIALIZE-CLSTREAM-TYPES (%%BROADCAST-STREAM-DEVICE %%CONCATENATED-STREAM-DEVICE +%%TWO-WAY-STREAM-DEVICE %%ECHO-STREAM-DEVICE %%SYNONYM-STREAM-DEVICE \FILL-POINTER-STREAM-DEVICE) +CL:ARRAY-TOTAL-SIZE-LIMIT (CL:ARRAY-TOTAL-SIZE-LIMIT) \SELECTREALPAGE (\VMEM.INHIBIT.WRITE \RPTLAST) +OCTALSTRING (\\NUMSTR.GLOBALRESOURCE \\NUMSTR1.GLOBALRESOURCE) XCL:TRACE-FUNCTION (BROKENFNS +XCL::*TRACED-FNS* XCL::*UNBROKEN-FNS*) SET-READER-ENVIRONMENT (*PACKAGE* *READTABLE* *READ-BASE* +*PRINT-BASE*) DF (*LAST-DF*) \WAITFORSYSBUFP (\\DISMISSTIMER.GLOBALRESOURCE) \PFCreateFileDescriptors +(\PFInitialized \PFLogicalVolumeFileD \PFMarkerFileD \PFFreeFileD \PFAllocationMapFileD +\PFFileMapFileD) DO.SHIFTED.SELECTION (\LAST.DELETION) CLISPATOM1A (TENTATIVE) \GCMAPTABLE ( +\RECLAIM.COUNTDOWN) MSSETUP (MSWORDS) WAITFORINPUT (\\DISMISSTIMER.GLOBALRESOURCE) RADIX (*PRINT-BASE* +) OPENNSOCKET (\NSOCKETS) \TIMER.INTERRUPTFRAME (\TIMER.INTERRUPT.PENDING) \INTERPRESSINIT ( +\IPIMAGEOPS \ASCIITONS \ASCIITOSTAR) NIL +SET LOADFNS-MAKELIST (F) FNTYP (DEF) MSSTOREDATA (TAB NEWREL) TEDIT.COPY.LOOKS (LOOKS LEN) COMP.APPLY* + (FN) \UFS.RECOGNIZE.FILE (LEN) DBG::REGION-NEXT-TO (WIDTH HEIGHT) \GETFTPCONNECTION (TRYHARD +CONNECTION CONN) \TYPENUMBERFROMNAME (I) CENTRALWINDOW (MAINW WINDOW) GETNSPRINTER (INFO NAME) +\COURIER.CHECK.ERRORS (ERRDEF INFO) \ALLOCPAGEBLOCK (BASE) \TEDIT.COMMAND.LOOP (SEL WINDOW LINES +IPASSSTRING RTBL WW CH TCH FN) TEDIT.DISPLAYTEXT (CHAR) \ALLOCVIRTUALPAGEBLOCK (FIRSTPAGE NPAGES) +MSMARKCHANGE1 (FLG FN) \TEDIT.PUT.PARALOOKS.LIST2 (LOOKS I) \ATMOUT (CH) FLIPCURSOR (ADDR) +SETUPFONTS.PRESS (F FLG) BRHC/INTERTREE/SPACE (OP TTC NP BTC DIST RAISE) \TEDIT.CONVERT.TO.FORMATTED ( +PC PCTB NEXTCR) SEDIT::MENU-PACKAGE-SELECTEDFN (PACKAGE) COPYFILES (TOSPEC FROMSPEC X COPYFILESOUTPUT +COPYFILESTERSE COPYFILESFN COPYFILESALWAYS COPYFILES.WHENTOSKIP COPYFILESVERSIONS COPYFILESASK +COPYFILESPURGE COPYFILESPURGESOURCE COPYFILESREPLACE COPYFILESASKDEFAULT DONTCOPY SECONDARYSPEC +FULLDST DST COPYFILESSKIPFN BK COPYFILESFROMSPEC NEWFILENAME NF DT2 CF) BITMAPCOPY (BITMAP NEWBITMAP) +TB.UNSELECT.ALL.ITEMS (ITEM I) MAKEBRES (SELF PX PY PXY) WHILEDOUNTIL (FX PL FX1 CONDX TGO DO WHILE +TEM) CL::%%EXP-FLOAT (CL::FX CL::ANSWER) \NSRANDOM.REESTABLISH (HANDLE) \COURIER.CHECK.PROCEDURES ( +FNDEF INFO N ARGS RESULTS ERRORS) \FM.EDIT-FINDFIRST (I) SUBSTRING (BASE LEN FATP OFFST OLDSTRING +START END OLDPTR) SEDIT::SET-POINT-LIST (SEDIT::OFFSET SEDIT::INDEX TYPE) MAKETITLEBARICON (TEXT POS +REG W) LASTCHPOS (START NC RESULT) CL:POSITION (END) COMPILE-FILE-EXPRESSION (FORM) PFI.PROCESS.FILE ( +CH FN EXPR) ALLOCSTRING (N INITCHAR STRINGBASE OLD I) \FTP.PRINTPLIST (ITEM BEFORE CH ISPASSWORD) +MAKEFILESCOMS (FILE) PRINTPUP (FILE MACRO LENGTH) \UPF.NEXTPOS (NCH POS) BREAK.MSG.INTO.LINES (STRLST +CHARWIDTH CHARCODE THISLINE BEGIN LASTSPACE NL I) \SPP.CLEANUP (FN) \FM.EDIT-SETUPTTBL (CC) +\LEAF.ABORT.FROMMENU (SEQUIN) RECORDECL (TEM) GETHOSTINFO (HOST NSFLG INFO VAL) \TEDIT.REPAINTFN ( +WHEIGHT LINES LINE FIRSTCH#) \SPP.GETNEXTBUFFER (ERRCODE CON) XCL::PPRINT-DEFINER (XCL::TOP-LEVEL-P +LEFT XCL::TEMPLATE XCL::NEXT XCL::NEWLINEP TYPE) TB.DESELECTRANGE (FIRST# LAST# I) \INITMDSPAGE ( +NPAGES LIMIT DISP PREV BASE) \LFScavFileName (C A0493) UNIX-GETENV (I) \LFFindDirectory (VOL) +SET.TTYINEDIT.WINDOW (WINDOW) UNPACKPATHNAME.STRING (ONEFIELDFLG COMPONENT) NTHCHARCODE (BASE LEN +OFFST FATP M) \FIXILINES (CH#1 L1 WW LINES CHAR1 CHARLIM LINE) OPT.JLENPASS (X DEC U DEF MIN SMAX SMIN + ML INC U1 CU) MSEDITE (X FPNAME) TEDIT.GET.OBJECT (NBYTES GETFN FILEPTRSAVE OBJ) \LFUnpackName (VOL +charList char A0493 version) BRH/LAYOUT/DAUGHTERS (D FLOOR) \STARTPAGE.PRESS (CFONT SPACEFACTOR HFONT) + FLASHWINDOW (N FLASHINTERVAL WIN? I COLORP) \LEAF.SETCREATIONDATE (DATA) MSPARSE (VAL OUTPUTFILE POSS + Y SPELLING X RESPELL NEXTWORD LASTADVERB PARSED CONJUNCTIONS RESETS LASTPARSED SEEKING S) +UNIX-GETPARM (LEN) COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION (COMPILER::COMPILED-DEFN) BITMAPBIT ( +NBITS HEIGHT bitmapbase WORDX oldword BITX OLDVALUE DD BITMAP TX TY SOFTCURSORUP DISPINTERRUPT) +DBG::ATTACH-BACKTRACE-MENU (TTYWINDOW BKMENU NAME POS N BTW ATW) \SEARCH.OUTPUTQ (LASTPUP PUP) +IDLE.BOUNCING.BOX (WAIT BOX TAIL ORIGBOX BITMAP X Y) SPY.MERGE.CALLEES (ORIGCALLEE COPYCALLEE) +\SPP.SETFILEPTR (SKIPBYTES) STRPOS (PATBASE PATOFFST PATLEN PATFAT PAT STRINGBASE STRINGOFFST +STRINGLEN STRFAT STRING MAXI START SKIP CASEARRAY 1stPATchar OFFST.I jthPATchar J K) SHRKFY (CARLOOKAT + CAARLOOKAT CDARLOOKAT CDDARLOOKAT CARFLAG CDRLOOKAT OPFLG STAGEFLAG FIRSTARGFLG RESULTR OP2FLG +APPSINGFLG CARSAFEFLAG OP3FLG RESULTQ) ANTILOG (YY FRAC IP SSUM) PFI.COLLECT.DEFINERS (TYPE DEFINER +ENTRY) LINE.LESSP (Y1 Y2 DY1 DY2) EDITGETDEF (SEDIT::CONTEXT) \CH.UPDATE.CACHE (NAME.AND.ADDRESS +DOMAIN ORGANIZATION DOMAINSTRING ORGANIZATION.INFO X DOMAIN.INFO) \IGR.MAKEPRETTYCOMSL (L) CREATEW ( +REGION SCREEN REG) BAKTRACE1 (POS TEM N X LST) \FTP.PACKFILENAME (DIR DEVICE NAMEBODY VERSION +SERVERNAME NAME FIELDS I) ASKUSER (KEYLST FILE OLDTTBL TYPEAHEAD BUFS MESS DEFAULT CHAR ECHOEDFLG +KEYLST1 ENTRY TEM ANSWER PRINTLST NC X KEY) \FLUSH.NDB.QUEUE (PACKET IOCB) CL::GET-SHARED-SETF-METHOD +(CL::ARGS CL::VALS CL::VARS CL::SHARED-SETF-INVERSE-FORM CL::GET-FORM) COERCETEXTOBJ (PC DELTA CH# +PFILE C I STR OFILE FMTFILE) \BBTCURVEPT (CLIPPEDTOP STY X) AIN (BASE LENGTH OFFST TYP ORIG STBYTE N) +\MAYBEPEEKPUP (HOST DIRECTION) AOUT (BASE LENGTH OFFST TYP ORIG STBYTE N) STRIP-KEYWORDS (ARGS) +\DRAWPOLYGON.PSC (WIDTH SHAPE COLOR) SHRKFY2 (RESULTP) COMP.MLLFN (FN X) \FILLPOLYGON.PSC (WINDNUMBER +TEXTURE TEXTUREBM TEXTUREWIDTH) MSEDITF (X FPTYPE FPNAME) TB.INSERT.ITEM (BROWSER NEWITEM BEFORE# TAIL + N) PFI.PRINT.FILECREATED (EXPR STRINGS STRWIDTHS) CLISPDEC (DECLST TEM CLASSDEF LST) +TEDIT.UPDATE.SCREEN (TEXTOBJ WW LINE NLINE) \PROCESS.BEFORE.LOGOUT (PROC W) \MEDW.CURSOR (OLDCURSOR +NEWCURSOR) FEQP (X HX LX SIGNX EXPX Y HY LY SIGNY EXPY) \TEXTCLOSEF (PCTB PC) TEDIT.DEFAULT.MENUFN ( +PCTB THISMENU WMENU ITEM OFILE SEL CH) D-ASSEM:INTERN-DCODE (D-ASSEM::RAW-CODE D-ASSEM::RESULT) +SEDIT::REPLACE-LIST (SEDIT::NEW-SUBNODE-COUNT SEDIT::DEAD-NODE SEDIT::UNDO-STRUCTURE SEDIT::DEAD-NODES + SEDIT::UNDO-BOUNDS CL:STRUCTURE SEDIT::X SEDIT::I SEDIT::TRAILING-STRUCTURE SEDIT::CONVERTED? +SEDIT::DOT-LIST?) \DSPPRINTCR/LF (ROTATION Y X AMOUNT/BELOW LFT DBITMAP BTM HGHT WDTH BKGRND +SOFTCURSORUP DISPINTERRUPT KEPTWIDTH) TB.SELECTRANGE (ITEM I) SEPRCASE (RDTBL I CA) +TWODINSPECT.SELECTITEM (SELECTEDROWPROP RPROP SELECTEDCOLUMNPROP CPROP SELECTEDELTBOTTOM VMARK +SELECTEDELTWIDTH XCL:*PROFILE* SELECTEDELTLEFT HMARK) SHOWBITMAP.IP (REGION XPIXELS YPIXELS XBYTES +SCALE LEFT BOTTOM NEXTROW) \BSP.CLOSE.OPEN.SOCKETS (S) DWIMIFYFNS (TEM) \CHANGECHARSET.DISPLAY (BM) +\SFFixY (CHARTOP BM TOP) PRINTWORDS (I) \SLOWBLTCHAR (CHAR8CODE DD ROTATION CURX NEWX LEFT RIGHT +PILOTBBT DESTBIT WIDTH SOURCEBIT SOFTCURSORUP DISPINTERRUPT YPOS HEIGHTMOVED CSINFO) EXPANDW (ICONW) +SI::SPLIT-PROCEED-CLAUSES (SI::CLAUSE SI::SELECTOR) MAKELINE (X0 Y0 DX DY DIR) FB.THINCOMMAND (FILES +TBROWSER NOW ONEDAY SORT# NDELETED TAIL FILE DATA TIMESTAMP CREATIONDATE THISNAME %#DELETED LASTNAME +LASTTIMESTAMP) \GR.MAKEPRETTYCOMSL (L Y NAME DEF) \CARET.FLASH.AGAIN (STREAM OC) \PEEKPUP (L H NETHOST +) \LEAF.STREAM.IN.QUEUE (FIRSTTIME PUP X DEFAULT) \TEDIT.PROMPT.PAGEFULLFN (WINDOW) CLISPIFYLOOKUP ( +CLASS CLASSDEF TEM) \INDICATESTRING (CHARCODE) TEDIT.PUT.OBJECT (LEN) CL:MAKE-PACKAGE (CL::NAME +CL::PREFIX-NAME) REPLACEFIELD (DATUM MASK SHIFT HI LO NEWVALUE) BRH/OFFSET (N) \SHOWSEL (L1 LN DS +LINES CARET) COPYARRAY (NEWARRAY INDEX) \MAYBEPEEKNS (DIRECTION) USERNAME (NAME ADDR) +ENCAPSULATEDOBJ.IMAGEBOXFN (HEIGHT WIDTH) \POSTSCRIPT.OUTCHARFN (CHARWID NEWXPOS MAPPING CHAR) SETD ( +N0) \TEXTSTREAMBOUT (TEXTLEN WINDOW SEL CH# CURLINE FONT L1 LN PS PC OFFST) CL:USE-PACKAGE (PACKAGE) +FTPGETMARK (MARK) ELTD (N0) \MEDW.PUTWINDOWPROP (WINDOW CURREGION OLDDATA OLDVALUE TAIL) REHASH (SLOT +LASTSLOT V) CLISPFORERR1 (TEM X) MODERN-ADD-EXEC (N) PFI.PRINT.MULTI.INDEX (LINESPERPAGE PAIR NAMES&DATES FILEINFO MAXNAME MAXDATE MAXPAGE# E TEM BESTPACKAGE BESTREADTABLE PREFIX INDEX MASTERENTRY - MASTERINDICES I TAB1 TAB2 TAB3 N&D LASTPAGE) \\TEDIT.SEARCH.CODETABLE (I CH CODE) -\\PUNT.BITBLT.BITMAP (|top| DESTINATIONNBITS |left| |bottom| SOURCENBITS |right| |stodx| |stody| -TEXTURE HEIGHT WIDTH DTY DLX STY SLX DBOT DLFT) \\GETWINDOWWIDTH (WINDOW) \\PAGED.GETNEXTBUFFER (COFF -CPAGE# EPAGE# BUF) MSUPDATE (TEM PRFLG DATA ERS) SEDIT::EDIT-HELP (SEDIT::ARGS) \\CHECKFREEPAGE (FID) -SEDIT::RECOMPUTE-WIDTH (SEDIT::WIDTH SEDIT::LINE) STORAGE (TYPE DOBLOCKSFLG HFLG I) SETUPFONTS.IP (F -IPDATA) \\STMDSTYPE (COL) HASHOVERFLOW (OVACTION NEWOVFLW OLDNUMKEYS NEWSIZE NEWARRAY) NTH (X N) -RESOLVE-UNINTERN-CONFLICT (XCL::SYMBOLS) SEDIT::COPY-STRUCTURE-STRING (CL:STRUCTURE) -SEDIT::COLLECT-UNDO-BLOCK (SEDIT::BLOCK-END) BCOMPL.BODY (UNPACKFILE FILEROOT SCRATCHFILE) -\\PAGED.FORCEOUTPUT (STREAM B N BUFFERS) SUBARRAY (N1 M1) \\HLSVALUEFN (HUE) ICONW.PRINT-JUSTIFIED ( -LMARG FONTHEIGHT MAXHEIGHT MAXWIDTH FORMATTEDLINES MAXLINES TITLEHEIGHT LINE CH NCH) -\\DOFORMATTING.HARDCOPY (LINELEAD EXTRASP OPREVSP PREVSP \#BLANKS SP EXISTINGSPACE) -\\BITBLT.BITMAP.SLOW (|top| DESTINATIONNBITS |left| |bottom| SOURCENBITS |right| |stodx| |stody| -TEXTURE HEIGHT WIDTH DTY DLX STY SLX DBOT DLFT) SORT (COMPAREFN) MSUPDATEFN1 (X DEF) -SEDIT::PROPAGATE-WIDTH-CHANGE (SEDIT::SUPER-WIDTH SEDIT::NEW-WIDTH) PUTHASHTEXT (HASHFILE HASHTEXTPTR) - \\HASHACCESS (BITS HASHBITSFN INDEX ABASE SLOT SKEY EQFN DELSLOT FIRSTINDEX REPROBE LIMIT HARRAY HA) -COMP.BOOL (P A) ADDTOCOMS (TYPE TAIL) PRINT3TO10 (FILE) MSCHECKBLOCK (BLKNAME LOCALVARS SPECVARS TEM -TEM2 BLKFNS BLKLIBRARY BOUNDFREE FREEVARS VAR FN DEC X ERRORS) |\\VAMFreePageGroup| ( -|volumePageNumber|) COURIER.WRITE.BULKDATA (SEGMENTLENGTH TAIL LEN) PFI.PRINT.FILECREATED (EXPR -STRINGS STRWIDTHS) GETDEF.I.S.OPR (TEM BODY EVALFLG) SEDIT::GET-MENU (SEDIT::MENU) DSPYOFFSET ( -DISPLAYSTREAM) DSPCREATE (DESTINATION DSTRM) \\PARTEND.PRESS (PDSTREAM START) RESETOPENFILES (FILES F) - EDITDEF.FNS (DEF) ONEDINSPECT.COPYBUTTONFN (XCL:*PROFILE* SELECTION) \\STRINGHASHBITS-UFN (C HASHBITS -) BRECOMPILE2 (N) ONEDINSPECT.BUTTONEVENTFN (XCL:*PROFILE*) DSPXOFFSET (DISPLAYSTREAM) \\PAGEDREADP ( -SCSET CHAR) TB.FIND.SELECTED.ITEM (I) FIND.LINE.BREAK (START) \\HASHRECLAIM (SLOT KEY NUMDELETED) -CLISPIFY2A (TEM) COMPILER::CLOSURE-ANNOTATE-LABELS (COMPILER::NON-LOCALS COMPILER::FUN -COMPILER::OUTER-NEED-STORAGE) \\TEDIT.UPDATE.SHOWSEL (CARET OSEL NSEL EXCHFLG NEWL1 OLDL1 LINES DS -OLDLN NEWLN TSEL L1 LN) BULKDATA.GENERATE.NEXT (CNT) TTPRINSPACE (N) \\VANILLADISKINIT (I) -\\NSFILING.REMOVEQUOTES (CH I) \\CLIPCURVELINE.IP (CA1 X1 X2 Y1 Y2 SWAPPED DX DY CA2) \\FIXCODENUM (BN -) DISPLAYGRAPH (TRANS STREAM SCALE GRAPH LINEWIDTH NNODES NODEHASHTABLE) CHCON (BASE OFFST FATP LEN I -\\CHCONLSTAIL \\CHCONLST) FIND-DEBUGGER-ENTRY-FRAME (POS NAME INBRK) RECORDACCESS (FIELD DEF RECS TEM -TYPE) \\3MBGETPACKET (PACKET) UNPACK (BASE OFFST FATP LEN I CODE \\CHCONLSTAIL \\CHCONLST) CL:APROPOS -(STRING) PPBUFS (B) GETSELECTEDITEMS (ITEM) \\STRINGWIDTH.PRESS (C TOTAL ESC ESCWIDTH CC TOTALWIDTH) -\\CHECKARRAYBLOCK (ERROR TRAILER ROVER) \\NEWLENGTHIS (TMP) PRINTBINDINGS (FL POS VAL EPOS) -|\\LFOpenDevice| (VOL) \\LOOKUPFMAP (ISFMAP HI MID LO) TB.REV.FIND.SELECTED.ITEM (I) \\ALLOCBLOCK.OLD -(ABLOCK PREFIXLEN USABLELEN REMAINDERLEN ARLEN BKTI) SEDIT::CONS-ATOM (SEDIT::RESULT) SEDIT::SHIFT-STRING - (STRING SEDIT::FROM SEDIT::TO) \\ALLOCHUNK (X DTNUMBER HUNKSIZE NCELLS HUNK ONPAGE STRADDLERS FAILCNT -) DCHCON (!SCRATCHTAIL BASE OFFST FATP LEN I) SEDIT::SEDITE (SEDIT::NEW-EXPR) \\ALLOCBLOCK.NEW ( -PREFIXLEN FINALWORD NEXTFREEBLOCK FINALPAGE) POSTSCRIPT.FONTSAVAILABLE (FONTSAVAILABLE FD S NF) FLAST -(X Y) BKLINBUF (C J) MSCHECKBLOCKS (FILES BLOCKS TEM FNS NOBLOCKFNS FN BLOCK) -\\STRING-EQUAL-HASHBITS-UFN (C HASHBITS) \\MAIKO.ALLOCBLOCK (NCELLS GCTYPE ALIGN ABLOCK) \\GETFBB ( + MASTERINDICES I TAB1 TAB2 TAB3 N&D LASTPAGE) TEDIT.STRINGWIDTH (CH) COURIER.EXECUTE.CALL (VALUE TYPE +SOURCEFLG BULKDATAFN SINKFLG DATASTREAM) \COERCEFONTDESC (FONT DEVICE) BSPREADP (SOCKET) DEFPACKAGE ( +ARGS PACKAGE POST-MAKE-FORMS) HASHARRAY (REHASH-THRESHOLD I J NCELLS LOGSLOTS) STKNTHNAME (CFLAG I +FRAME) ICMLARRAY.SETVALUE (PRTWINDOW XCL:*PROFILE* NEWVALUE) SEDIT::JOIN (TYPE SEDIT::SUBNODES +SEDIT::NEW-STRUCTURE SEDIT::SUBNODE SEDIT::INDEX SEDIT::COMMENT-LEVEL SEDIT::NEW-NODE) IMPORT (PACKAGE +) INVERT.TEXTURE.BITMAP (BASE1 BASE2) CLOSENSOCKET (NSOC) CL:SHADOWING-IMPORT (PACKAGE) LRSH (XHI XLO +X N) CLISPFORVARS (L1 LST0 LST TEM X OLDFLG IV VARLST) ONEDINSPECT.SETELT (XCL:*PROFILE* NEWVALUE) +\LEAF.SETFILETYPE (DATA BYTESIZE TYPE) CL:SHADOW (PACKAGE) \MEDW.GETWINDOWPROP (WINDOW) READBITMAP ( +BITSPERPIXEL W BM BASE) CL::GET-SIMPLE-SETF-METHOD (CL::ARGS CL::VALS CL::VARS CL::SETF-INVERSE-FORM +CL::GET-FORM) SPY.DELETE (X) ULREDISPLAYBITMAP (REGION) EXPORT (PACKAGE) CLMAPS2 (WORD Y X TEM) +SUBARRAY (N1 M1) \NSGATELISTENER (EVENT XIP BASE) \SENDSPP (SEQNO) POSTSCRIPT.OUTSTR (c X) +INFILECOMTAIL (COM X) TTYINFIX (TAIL X) BSPEOFP (STREAM) \FTP.HANDLE.NO (CODE INFO CNAME NEWNAME CPASS + ECHOSTREAM) %%COPY-STRING-TO-ARRAY (REMOTE-BASE REMOTE-ARRAY I) MARGINBAR.CREATE (OBJ OBJDATUM BITMAP + DS) \HCPYMODEBLTCHAR (CURX CHARWIDTH MICARIGHT LOCAL1 RIGHT LEFT SOFTCURSORUP DISPINTERRUPT) +\DRAWARC.PSC (WIDTH COLOR) COMPAREDEFS (TYPE SOURCES SRCS SRC DEF DEFS) DASSEM.CANSHAREBINDING (FR V3 +X) \FTP.ERRORHANDLER (OUTSTREAM TMP) \LEAF.TIMEDOUT.EXCESSIVE (FIRSTTIME PUP X FULLNAME PAGE DATA +ENTRY WRITEFILES READFILES) COMP.MLL (N NN) RESOLVE-USE-PACKAGE-CONFLICT (XCL::SYMBOLS) \CLEARMAP ( +BUFFER PREVBUFFER) LOG (EXP SX SSUM) FILING.CALL (SESSION PGMDEF PROCDEF PROGRAM PROCEDURE NARGS +ARGTYPES NOERRORFLG ABSOLUTELY-NO-ERROR KEEPSTREAM ARGLIST I STREAM FAILED RESULT) PUP.ECHOSERVER (FLG + EVENT PUP ISGOOD) \CH.CHECK.CLEARINGHOUSE (DOMAINS DEFAULT) HASHFILESPLST (HASHFILE) UNDOSAVE ( +HISTENTRY Y N) \ENDVECRUN (XPOS YPOS ORIGXPOS ORIGYPOS ORIGWASDISPLAYING WASDISPLAYING) HARRAYPROP (HA + NEWVALUE HARRAY) \FTP.WHENCLOSED (C) \TEDIT.MOVE.PIECEMAPFN (PC OBJ MOVEFN) +SEDIT::INSERT-SPECIAL-CHARACTER (WHERE SEDIT::NODE) COMP.MAP (DOF BINDVALS BOUNDVARS FROMFORM BYF +WHILEF VAL F NXT) DASSEM.MATCHVARS (VAR X VARS TAIL) \ACTONDISKPAGES (DSK STREAM FID EMBUFS EMBLOCK +DAs CAs DAorigin EMDAs EMCAs BUFFERS BUF FIXEDBUF N EMFIXEDCA RESULT LASTNC CA) CLRHASH (SLOT) +DATATYPES (N I) FILEBROWSER (REGION OPTIONS TITLE MENU-TITLE MENU-ITEMS DEPTH KEY ATTRIBUTES X PAIR +COMMANDMENU COMMANDMENUWIDTH PROMPTWHEIGHT COUNTERHEIGHT BROWSERWINDOW BROWSERWIDTH BROWSER +HEADINGWINDOW COMMANDMENUWINDOW W OLDCOMS FILESPEC) CL:RENAME-PACKAGE (PACKAGE NAME PREFIX-NAME) +CLOSEBSPSTREAM (TIMEOUT TIMER) %%COPY-ONED-ARRAY (NCELLS REMOTE-ARRAY REMOTE-BASE I) CHAT.TAKE.INPUT1 +(FILE) \SLOWHCPYMODEBLTCHAR (ROTATION NEWX CURX LEFT RIGHT PILOTBBT DESTBIT WIDTH SOURCEBIT +SOFTCURSORUP DISPINTERRUPT YPOS HEIGHTMOVED CSINFO) \FTP.OPENFILE (HOST DESIREDPLIST PAIR TYPE +BYTESIZE EOLCONVENTION) \GR.CONTENTS (COM X) \CLEARBYTES (OFFST NBYTES BASE) \GENERIC.DSPCREATE ( +DESTINATION SCREEN SC DSTRM) MAPHASH (SLOT V) CLISPFORERR (TEM X Y) DATATYPEP (NAME I) \IDLER (X PROC +W SAVEVM.TIMER IDLE.PROCESS NO.ERROR EXIT? INTERRUPTED.STRING) FINDPTRSBUFFER (B) CLISPIFYMATCHUP (TEM + ALST PAT $LST) \DOACTONDISKPAGES (HINTLASTPAGE CURRENTPAGE CB RESULT THISACTION NEXTCB PAGENO) +FB.SEEFULLFN (PROP BUTTONS EVENT) COMP.MLLVAR (N) \ICONW.FORMAT.TITLE1 (DONE CH NCH WIDTHSOFAR CHWIDTH + LASTBREAKPOS LASTBREAKWIDTH) \GETMAPBUFFER (BUF PREV) \BITBLT.MERGE (SCRATCH) CL:UNINTERN (PACKAGE) +PRINTXIP (FILE MACRO LENGTH) SETTEMPLATE (VAL) BITMAPBIT.EXPANDER (NEWVALUE) CL:UNUSE-PACKAGE (PACKAGE +) OPENBSPSTREAM (SOCKET INSTREAM OUTSTREAM SOCKETPROC) \WRITEDISKPAGES (DSK STREAM FID RESULT EMBUFS +EMBLOCK DAs CAs DAorigin EMDAs EMCAs BUFFERS BUF FIXEDBUF N EMFIXEDCA) TEDIT.QUIT (STREAM MAINW) +DELETE-PACKAGE (PACKAGE) \HASHACCESS (BITS HASHBITSFN INDEX ABASE SLOT SKEY EQFN DELSLOT FIRSTINDEX +REPROBE LIMIT HARRAY HA) \FIXLINELENGTH.IP (LLEN) SEDIT::INSERT-MULTI-ESCAPE (SEDIT::NODE WHERE) +\DOWRITEDISKPAGES (FIRSTNEWPAGE FIRSTPAGE NEXTNEWPAGE LASTVDA J I CURRENTPAGE CB LAB PAGENO) +NUKE-SYMBOL (STRING) RESTART.ETHER (PROC) SCROLLBITMAP (REGION) M44.SIGNAL.DISK.ERROR (ERRCODE) +REDISPLAYBITMAP (WREGION) MAPBUFFERCOUNT (B) SPY.DUMP.BUFFER (NEXTI K TREE J NAME I) TEST-PROCEED-CASE + (FILTER) ADD-SYMBOL (VEC HASH) RESOLVE-EXPORT-MISSING (XCL::SYMBOLS) HARRAYKEYS (ITEMLST) +\TFBRAVO.INSTALL.PAGEFORMAT (PAGEFRAMES) \COURIER.REP.BIN (X) CL:UNEXPORT (PACKAGE) +RESOLVE-EXPORT-CONFLICT (XCL::SYMBOLS XCL::PACKAGES) SEDIT::LOCATE-NODE-FROM-EDITCHAIN (SEDIT::SUBNODE +) PRINTDEF (LEFT) \HASHRECLAIM (SLOT KEY NUMDELETED) \MAPPAGE (BUF %#IOBUFFS PREV MOREBUFS PREVAVAIL) +DO.MOUSE (ROW/COL NEWPOS BUF LINE COL) HASHOVERFLOW (OVACTION NEWOVFLW OLDNUMKEYS NEWSIZE NEWARRAY) +\SETEOF (EP EO) PUP.ECHOUSER (INTERVAL NTIMES ECHOSTREAM I ECHOPUPLENGTH EVENT IPUP) UNDONLSETQ ( +UNDOSIDE UNDOSIDE0 LISPXHIST UNDOTEM) TEDIT.FIND.OBJECT (TEXTOBJ CH PC) STORAGE (TYPE DOBLOCKSFLG HFLG + I) CL:DELETE (END) ATTACHEDWINDOWREGION (REG) TEDIT.REDO.INSERTION (ORIGFIRSTPC NPC INSPC OBJ COPYFN +TL FIRSTPIECE) XCL::SETF-FIND-PROFILE (XCL::NAME XCL::PROFILE) CL:LIST-ALL-PACKAGES (RES) +\BSP.SETFILEPTR (SKIPBYTES) \COURIER.BROADCAST.ON.NET (RESULT) STORAGE.LEFT (FREE MDSFRAC) +TEDIT.UNDO.DELETION (INSPC NEWPIECE OBJECT INSERTFN TL FIRSTPIECE NPC) SETUPFONTS.IP (F IPDATA) +\STORAGE.TYPE (DTD NAME HUNKP SIZE ITEMSPERMDS ALLOCMDS NPAGESALLOCATED STAT LSTPAG PTR INUSE ALLOC) +COMPARELST (LOOSEMATCH) \BITBLT.BITMAP.SLOW (top DESTINATIONNBITS left bottom SOURCENBITS right stodx +stody TEXTURE HEIGHT WIDTH DTY DLX STY SLX DBOT DLFT) \STORAGE.HUNKTYPE (STAT NPAGESALLOCATED) +\COLLECTDIRTYBUFS (NEXTBUF B LASTPAGE) \STRINGWIDTH.PRESS (C TOTAL ESC ESCWIDTH CC TOTALWIDTH) +WHO-LINE-WHAT-IS-RUNNING (POS) \VFMBlankInterval (level) XCL:LIST-ALL-PROFILES (XCL:PROFILES) +ONEDINSPECT.SELECTPROP (SELECTEDPROP PRP SELECTEDELTBOTTOM VMARK SELECTEDELTWIDTH XCL:*PROFILE* +SELECTEDELTLEFT) XCL::SETF-PROFILE-ENTRY-VALUE-NAME (XCL::PROFILE) \MEDW.TOTOPW (WINDOW) +\PUNT.BITBLT.BITMAP (top DESTINATIONNBITS left bottom SOURCENBITS right stodx stody TEXTURE HEIGHT +WIDTH DTY DLX STY SLX DBOT DLFT) \SETIODIRTY (BUF) SEDIT::LINEARIZE-LIST (SEDIT::P SEDIT::LAST-SUBNODE + SEDIT::INFO SEDIT::LAST-INFO SEDIT::SEPR-INFO SEDIT::SET-INDENT? SEDIT::INDENT-BASE SEDIT::BREAK? +SEDIT::INDENT SEDIT::ALREADY-INDENTED? SEDIT::PREV-TYPE SEDIT::PREV-INLINE SEDIT::NEXT-TYPE CL:FIRST +SEDIT::SUBNODES) \STRINGHASHBITS-UFN (C HASHBITS) FAKE-COMPILE-FILE (STREAM ENV FORM INTERLISP-FORMAT +PROCESS-ENTIRE-FILE LSTFIL FILENAME OUTPUT-FILE COMPILE.FILE.VALUE) COURIER.REP.LENGTH (ITEM X +NAMEANDTYPE VALUE NAMEANDVALUE) \DODISKCOMMAND (LA LASTCB NEXT STATUS) \STRING-EQUAL-HASHBITS-UFN (C +HASHBITS) \STMDSTYPE (COL) TEDIT.EDIT.OBJECT (CH# SEL SELOBJ OBJ EDITFN LINE) BRH/LAYOUT (DHEIGHT +YHEIGHT) SPY.MAKE.TREE (TOPCOUNT X THRSH) \GETDISKCB (CB) EXPANDBITMAP (WIDTHFACTOR HEIGHTFACTOR +HEIGHT WIDTH BITSPERPIXEL NEWWIDTH NEWHEIGHT NEWBITMAP) \XIPERROR (LENGTH) NTH (X N) \IFS.LOOKUPFILE ( +START LOCK PUPSOC ROOTNAME SEMI DOT DIREND REMOTENAME OSTYPE OPUP IPUP RESULT) COMP.SELECTQ (A VAR +THISLABEL TEST CLAUSE NEXT) \CLEANUPDISKQUEUE (SHORTCB FREE LABEL LVDA) RESOLVE-IMPORT-CONFLICT ( +XCL::SYMBOLS) XCL:RESTORE-PROFILE (XCL::PROFILE) RECORDACCESSFORM (EXP) SPY.NEXT.TREE (X) FILEWATCH ( +COMMAND FW-PROC) \PUNT.BLTSHADE.BITMAP (left bottom top right DESTINATIONNBITS DESTINATIONLEFT +DESTINATIONBOTTOM TEXTURE HEIGHT) TEDIT.SETSYNTAX (CHAR) \PAGED.GETNEXTBUFFER (COFF CPAGE# EPAGE# BUF) + \CREATEINTERPRESSFONT (TRANSL NEWFONT) COMPARELISTS (STREAM) \MEDW.BURYW (WINDOW ABOVEWINDOWS ATWINS) + \FIXCODENUM (BN) \MAKE.EXPEDITED.STREAM (END) FB.NAMES.DECREASING.VERSION (X Y) \PAGED.FORCEOUTPUT ( +STREAM B N BUFFERS) SEDIT::INSERT-LIST (SEDIT::START SEDIT::END) DSPXOFFSET (DISPLAYSTREAM) +COMPILE-FILE? (X UNKNOWN) \CLIPLINE (LEFT RIGHT BOTTOM TOP CA1 X1 X2 Y1 Y2 DX DY CA2) +DASSEM.DSTOREFNDEF (FRAMENAME NAMETABLE LOCALARGS NTSIZE NTWORDS STARTPC STARTLOCALS LOCALSIZE +REALSIZE CA X LOC FVAROFFSET NT1 NT) RESOLVE-UNINTERN-CONFLICT (XCL::SYMBOLS) POSTSCRIPT.STARTPAGE ( +NEW-PAGE) DSPYOFFSET (DISPLAYSTREAM) TB.EXPANDFN (REGION) \CLISPKEYWORDPROCESS (TMP X) \GR.PUTDEFFN ( +DEF TYPE) \REALDISKDA (VDA) \CARET.FLASH (CURSOR ANSWER) DSPCREATE (DESTINATION DSTRM) +\LEAF.RESENDPUPS (PUPS) SYSRECLOOK1 (D) SPY.SUM (X) DELFROMCOMS (COMS TYPE DONE) CLISPIFYMAPS (FN1 FN2 + VAR TEM) \CHECKARRAYBLOCK (ERROR TRAILER ROVER) SORT (COMPAREFN) \COURIER.REP.BOUT (X TAIL) +\CHECKFREEPAGE (FID) \ALLOCBLOCK.OLD (ABLOCK PREFIXLEN USABLELEN REMAINDERLEN ARLEN BKTI) +\PARTEND.PRESS (PDSTREAM START) SEDIT::OUTPUT-CR (SEDIT::Y SEDIT::THIS-LINE) NS.ECHOUSER (NSOC OXIP +OXIPBASE I ECHOXIPLENGTH INTERVAL NTIMES ECHOSTREAM EVENT IXIP XIPBASE) TWODINSPECT.REDISPLAY ( +ELTROWPROPS ELTCOLUMNPROPS ELTS ELTCOLUMNWIDTHS COLWIDTH COLPROP ELTRIGHTS HMARK ELTBOTTOMS VMARK +ROWPROP XCL:*PROFILE* ELT COLUMNWIDTH RIGHT BOTTOM) WHO-LINE-TTY-STATE (FRAMENAME I) \ALLOCBLOCK.NEW ( +PREFIXLEN FINALWORD NEXTFREEBLOCK FINALPAGE) SWAPXIPADDRESSES (XIP) SEDIT::INPUT-STRINGDELIM ( +SEDIT::NEW-STRING) TB.FIND.PREVIOUS.TAIL (TAIL TAILN) FILENAMEFROMID (start length name) +\NSFILING.GET/SETINFO (SESSION RESULT) \ALLOCHUNK (X DTNUMBER HUNKSIZE NCELLS HUNK ONPAGE STRADDLERS +FAILCNT) POSTSCRIPT.SET-FAKE-LANDSCAPE (LAND C0 P0 C P ML MB MR MT) NSNETDAYTIME0 (OXIP IXIP) +TOPW.REPAINTFN (WINDOWREGION HORZMARKS COLUMNPROPS COLUMNPROP MARK STARTCOLUMNPROPS STARTHORZMARKS +LASTCOLUMNPROP XCL:*PROFILE* HMARK) ICMLARRAY.INDICES (LEVEL FIRSTFLG) \HANDLE.RAW.XIP (DESTADDR NDB +MYNET DESTNET NSOC SOC XIPBASE CSUM) \LEAF.READFILEPROP (DATA IPUP) TTPRINSPACE (N) +DBG::FIND-NAMED-STACK-POSITION (DBG::TEM) \MAIKO.ALLOCBLOCK (NCELLS GCTYPE ALIGN ABLOCK) +\BSP.HANDLE.DATA (DATALENGTH NEWID THISID INQUEUE PREVPUP NEXTPUP DIF PUP) \NEWLENGTHIS (TMP) +CLISPIFYCROPS (TEM1 OPR0 CLTYP0 CROPSLST TEM2 PARENT) PUTHASHTEXT (HASHFILE HASHTEXTPTR) +\TEDIT.WORDBOUND.READTABLE (CH) COMP.NUMBERTEST (A EXIT) BSPPUTMARK (STREAM ERRCODE PUP) CHCON (BASE +OFFST FATP LEN I \CHCONLSTAIL \CHCONLST) INSURE.RGB.COLOR (LEVELS) \BSP.GETNEXTBUFFER (ERRCODE STREAM) + DWIMARKASCHANGED (L) \MERGEFORWARD (NBASE NBINUSE) CLISPIFYRPLAC (LFT RGHT TYP0 TEM CROPS PARENT) +\MEDW.REDISPLAYW (REPAINTFN CLIPREG REGION) \LINKBLOCK (FREEBLOCK) UNPACK (BASE OFFST FATP LEN I CODE +\CHCONLSTAIL \CHCONLST) \MERGEBACKWARD (PTRAILER PBASE) CLISPLOOKUP0 (CLASSDEF VAR1 VAR2 TEM) TCOMPL ( +FILE) \CLIPCURVELINE.IP (CA1 X1 X2 Y1 Y2 SWAPPED DX DY CA2) \VANILLADISKINIT (I) +\LEAF.GETFILEINFO.OPEN (FT BYTESIZE DT) \BSP.HANDLE.ACK (THISID OUTQUEUE INTERRUPTPUP OLDPUP +ADATACOUNT NEXTPUP ACKDATA) SEDIT::PUNT-SET-SELECTION (SEDIT::I SEDIT::X) PPBUFS (B) EDITFROMFILE ( +EDITCOMS FILES FILE TYPE FNS NAME SEEN) CLISPIFYCROPS1 (TEM Y X TAILSTATE N $LST) \PREFIXALIGNMENT? ( +FUDGE ADJUSTMENT DAT) INTEGERLENGTH (X HX LX) SCALE.FONT (FONT) \LOCATE.NSNET (DATA) DCHCON ( +!SCRATCHTAIL BASE OFFST FATP LEN I) XCL::SETF-PROFILE-ENTRY-VALUE (XCL::PROFILE) \MEDW.SHAPEW (WINDOW +NEWSIZE) \NSFILING.GETFILEINFO.FROM.PLIST (PROT) \FLUSHNDBS (NDB QUEUE) FLAST (X Y) TEDIT.MOVE (PCLST +REPLACING TOPCTB EVENT LEN TOLEN INSERTCH#) \CHECKFORSTORAGEFULL (PAGESLEFT) \LFOpenDevice (VOL) +DASSEM.DWRITEFN (X NAMETABLE I LOCALVARINFO FNFIX ATOMFIX PTRFIX LOC) DUNPACK (!SCRATCHTAIL BASE OFFST + FATP LEN I) CLISPDSUBST (TEM) \TEDIT.SEARCH.CODETABLE (I CH CODE) CL:APROPOS (STRING) EXPRCHECK (D X) + TEXTICON (TEXT) TB.RENUMBER.TAIL (ITEM I) \FLUSH.PACKET.QUEUE (PACKET CNT) ALPHORDER (ABASE AOFFSET +ALEN AFATP BBASE BOFFSET BLEN BFATP CABASE CASEARRAY C1 C2 I) COURIER.OPEN (ADDRESS STREAM LOW.VERSION + HIGH.VERSION) BLOCK (PQUEUE PROC FROMFX) CASEARRAY (I) \SETBRUSH.IP (SHAPE WIDTH COLOR) BKLINBUF (C J +) \ARRAYBLOCKMERGER (SECONDBITE ARLEN NARLEN MINBLOCKSIZE SHAVEBACK) COPYHASHFILE (HASHFILE) +\NSFILING.RELEASE.BULKSTREAM (PAIR) FREEATTACHEDWINDOW (ATWIN) CONCATCODES (X I) SPY.MERGE (TREES +NEWNODE OLDNODE Z VAL) \ACCHARWIDTHLIST (BOX BBOX BBOY BBDX BBDY) PACKC (C NN HASFAT N) \LOOKUPFMAP ( +ISFMAP HI MID LO) BSPFORCEOUTPUT (STREAM) \FTP.EOL.FROM.PLIST (PAIR) TB.UPDATE.DISPLAY (DELTA CLIP +EXTENTBOTTOM WBOTTOM LAST#) \READACFONTBOXES (X) FIND-DEBUGGER-ENTRY-FRAME (POS NAME INBRK) \GETFBB ( MINBBOX MINBBOY MAXBBOX MAXBBOY MAXSUMBBOXBBDX MAXSUMBBOYBBDY BBOX BBOY BBDX BBDY BBLIST) -\\ACCHARPOSLIST (HIWORD LOWORD X) MSSHOWUSE (DEF REALDEF ANYFOUND) SCANDECLARECOLON (TEM EVALFLG) -\\TEDIT.NSCHAR.RUN (PC OFFSET PLEN CH PS PF PFPOS NEXTCH NEWPLEN CHARSET TFILE I) COPYHASHFILE ( -HASHFILE) \\READACFONTBOXES (X) \\MERGEFORWARD (NBASE NBINUSE) \\ACCHARWIDTHLIST (BOX BBOX BBOY BBDX -BBDY) FB.HANDLE.ABORT.BUTTON (PROC) \\IDLE.IS.PREVIOUS (OLDPWD PREVIOUS.USERNAME NAME) \\LINKBLOCK ( -FREEBLOCK) CASEARRAY (I) \\ICONW.FORMAT.TITLE (LINE WASTED EXCESS I RESULT) -TWODINSPECT.SELECTCOLUMNPROP (SELECTEDCOLUMNPROP CPROP SELECTEDELTBOTTOM SELECTEDELTWIDTH XCL:*PROFILE* - SELECTEDELTLEFT HMARK) \\MERGEBACKWARD (PTRAILER PBASE) \\FAMILYCODE (TYPE LENGTH NEXT CODE I) -IOCBQLENGTH (FIRSTIOCB) SEDIT::INPUT-NORMAL-CHAR (CL:CHAR WHERE SEDIT::NODE) DUNPACK (!SCRATCHTAIL -BASE OFFST FATP LEN I) ALPHORDER (ABASE AOFFSET ALEN AFATP BBASE BOFFSET BLEN BFATP CABASE CASEARRAY -C1 C2 I) TTYINEDIT (PRINTFN \\PROMPT1) SEDIT::BUILD-PRELINEARIZED-NODE (SEDIT::SUBNODES SEDIT::TAIL) -MSNOTICEFILE (TEM COMS FULL FILE) \\NEW.MKATOM (TEMP) DEFAULTMAKENEWCOM (LISTNAME) CLEARBUF (LINBUF -SYSBUF) PACKC (C NN HASFAT N) SPP.DSTYPE (EPKT CONDITION) \\TEDIT.FORMATTABS (TABWIDTH CURTX -DEFAULTTAB NEXTTAB TAB NEXTTABTYPE NEXTTABX) COPYHASHITEM (VALUE) COMP.PICOUNT (N ND VARS ARGS) -INTERPRET/MARK/FORMAT (PL) TTY.PROCESS (NEWTTY OTHER P TYPEAHEAD C FN) WYOFFSET (CR) -SEDIT::CREATE-COMMAND-TABLE (SEDIT::FN SEDIT::ENTRY) REMWINDOWPROP (WINDOW DATA TAIL PREV) -LINKPARAMETERS (TOPARAMS) SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::SUBNODES) \\CHECKFORSTORAGEFULL ( -PAGESLEFT) \\DEQUEUE (Q) SETDISPLAYHEIGHT (NSCANLINES) \\M44DOEXTENDVMEMFILE (NP I LASTPAGEREAD -LASTPAGEOFFSET LASTFULLPAGE EXTENDED) \\SETBRUSH.IP (SHAPE WIDTH COLOR) CL::%LOG-FLOAT (CL::X CL:EXP -CL::R CL::ANSWER) WXOFFSET (CR) \\PAGEPAD.PRESS (PADDING) \\TEDIT.GET.TERMSA.WIDTHS (I) MSGETDEF ( -TABLEFPTYPE FPTYPE RESULT REALDEF) \\SHOWSEL.HILIGHT (RIGHT LL LEFT) \\SAVELINEBUF (NC) -\\TEDIT.PURGE.SPACES (OPREVSP PREVSP) COMPILER::CLOSURE-ANNOTATE-CALL (COMPILER::ARG) -\\LITATOM.EATCHARS (I J) BLOCK (PQUEUE PROC FROMFX) OPT.RETMERGE (LEV FEQ VEQ G L1 L2) TEDIT.MOVE ( -PCLST REPLACING TOPCTB EVENT LEN TOLEN INSERTCH#) DBG::MAKE-FRAME-INSPECT-WINDOW (DBG::BTWINDOW DBG::ATW - DBG::TTYREGION) \\PEEKNS (HOST) \\ARRAYBLOCKMERGER (SECONDBITE ARLEN NARLEN MINBLOCKSIZE SHAVEBACK) -RETDWIM2 (N M) CL::%SQRT-FLOAT (CL::X CL::V) \\PREFIXALIGNMENT? (FUDGE ADJUSTMENT DAT) -TEDIT.SETFUNCTION (RTBL CHARCODE) SEDIT::GET-DESTINATION-CONTEXT (SEDIT::DESTINATION) FB.EDITLISPFILE -(ROOT) TB.FIND.ITEM (I END INCREMENT PREDFN ITEM) SCANDEFINEQ (TAIL FNAME) \\EXTENDISFMAP (LASTMAP -LASTPAGE) RECORD.FIELD.VALUE (TMP) CL:INTERN (NAME PACKAGE) CL::%RANDOM (CL::RV CL::I CL::J) -\\TEDIT.UNPARSE.PARALOOKS.LIST (PROP PROPNAME METHOD NEWLOOKS) SEDIT::PARSE (SEDIT::THIS-NODE) SCANEXP - (EXP) \\DOFORMATTING (LINELEAD EXTRASP OPREVSP PREVSP \#BLANKS EXISTINGSPACE SPACEOFLOW) COMP.CPI (F) - \\TEDIT.LINE.LIST (WW LINES) MSSETUP (P) MAKEBITTABLE (A I) PACK (ITEM PACK.INDEX X) -|\\VAMAllocPageGroup| (RUNLENGTH) CONCATCODES (X I) \\COPYARRAYBLOCK (NEW OLD) \\IDLE.ISMEMBER (X) -\\STREAMCHARWIDTH (CHARCODE WIDTHSVECTOR CC TABWIDTH NEWXPOSITON) SEDIT::EVAL-SELECTION (SEDIT::VALUE) - COPYALL (TAIL X NEW ORIG) \\BCPLSOUT.PRESS (N I) TRAPLOOP (PT.LESSP PLIST PATH KNOTS LEN CLIST IPATH -JPATH XPATH KPATH TEMP K J I) \\IDLE.AUTHENTICATE (GV UNIX NS CODE) \\SETFATSYNCODE (TABLE) -INTEGERLENGTH (X HX LX) \\TEDIT.HARDCOPY.FORMATLINE (ORIGCHLIST CHLIST ORIGWLIST WLIST LOOKS -TEXTSTREAM TERMSA CLOOKS LOOKNO PC INVISIBLERUNS TLEN CHNO ASCENTB DESCENTB FONT FMTSPEC 1STLN TX -WIDTH TXB1 CH DX BOX ASCENT DESCENT GATHERBLANK CH#B NEWASCENT PREVSP PREVHYPH PREVDHYPH T1SPACE TXB -DXB LOOK#B INVISIBLERUNSB \#BLANKS FORCEEND CTRL\\L\\SEEN TABPENDING TEXTLEN) \\ADVANCE.ARRAY.SEGMENTS - (NCELLSLEFT) TB.DISPLAY.LINES (ITEM HERE MAXXPOS EXTENTCHANGED ITEM# EXTENT HWINDOW) OPT.RETTEST (F1 -F2 L1 L2 ONLYIFSAMEFRAME) \\CHDEL1 (SCSET CHAR) TEDIT.GETFUNCTION (TABLE CHARCODE) -SEDIT::CLOSE-NODE-LITATOM (SEDIT::NEW-STRING) SEDIT::FIND-NODE (SEDIT::LINEAR-ITEM SEDIT::CURRENT-X -SEDIT::LINEAR-POINTER SEDIT::NEXTX) XTOUSTRING (CHARCODE SINDEX I) HISTORYFIND1 (PAT1 PAT2 TEM) -\\SEQUIN.HANDLE.INPUT (ALLOC NEWACKSEQ) \\ECHOCHAR (C) \\BYTESETA (A) FILEPOS (STRBASE STRINDEX PATLEN - STR STARTBYTE ORGFILEPTR ENDBYTE LASTINDEX FIRSTCHAR STARTSEG ENDSEG BIGENDBYTE PATINDEX CHAR) -\\WORDELT (A) FFILEPOS (PATBASE PATOFFSET PATLEN PATTERN ORGFILEPTR STARTOFFSET EOF ENDOFFSET STARTSEG - ENDSEG BIGENDOFFSET LASTCHAR CHAR INC CURPATINDEX) CL::%RATIO-PRINT (CL::PR) FB.PRINTFN (OLDFONT OFF -C NEXTPOS SPEC INFO XPOS FORMAT ACTUALNEXT) \\SETUP.FFILEPOS (I CHAR LASTD2 LASTMATCHPOS J P) -\\ETHEREVENTFN (NDB DB TURNOFFNS TIMESET) \\FIXP.FROM.FLOATP (X HI LO SIGN EXP) \\FILLBUFFER (CHAR -PEEKEDECHOED RAISEDCHAR TCLASS SCSET RSNX) BRKDWNINIT (I) OPENIPSTREAM (OPTION POS) -COMPILER::CLOSURE-ANNOTATE-BLOCK (COMPILER::NON-LOCALS COMPILER::OUTER-NEED-STORAGE) COPYDEF (TYPE DEF - X TEM) \\BYTELT (A) TEDIT.MAPPIECES (PC CH# I) MIN/LEFT (NODE) \\NSFILING.MAYBE.CREATE (CREATE? -OLDHANDLE TAIL NEW.DIR) \\TEXTMENU.DOC.CREATE (MENUTEXT DESC CH# OBJ CH#1) CHARWIDTH (TEMP) -PROMPTINWINDOW (HGHT WDTH PREVTTY READSTR) \\PRINTFMAP (ISFMAP START END VDA OFF) \\TEDIT.READTABLE ( -CH CL FN) CLISPIFYFNS (TEM CLK) \\STARTDISPLAY (OLDWINDOWS) SEDIT::FIND-LINE-START (SEDIT::NEXT-LINE -SEDIT::LINE) DRAWMARGINSCALE (X NOMX) DUMPGRAPH (N IDS \#IDS TEMP SHADES \#SHADES FONTS \#FONTS -BORDERS \#BORDERS X POS) DSPBACKUP (DISPLAYSTREAM BLTWIDTH XPOS FONT ROTATION) MARGINBAR (L1 LN R -FLOATINGRIGHT SCALEDR EXTENDEDRIGHT UNSETL1 SCALEDL1 UNSETLN SCALEDLN) \\TEDIT.HARDCOPY.MODIFYLOOKS ( -YOFFSET) PROMPTPRINT (I) \\POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS (TYPEFONT FONTFILE) -\\SHOW.ARRAY.FREELISTS (SIZESLST TABLE FBL ABLOCK TOTAL ARLEN X SAFENTRY BKTI) \\TEDIT.PRIMARYW ( -WINDOWS WINDOW) DBG::STACK-FRAME-FETCHFN (DBG::FN) |\\VFMInsertPageGroup| (|word|) \#BITSON (NBITS -MASK I) SEDIT::PARSE-INDENT-GROUPS (SEDIT::CURIN) TWODINSPECT.SELECTROWPROP (SELECTEDROWPROP RPROP -SELECTEDELTBOTTOM VMARK SELECTEDELTWIDTH XCL:*PROFILE* SELECTEDELTLEFT) SPP.CLOSE (CON SUBSTREAM -ABORT?) BITMAPOBJ.SNAPW (BM) SHOW.PRESS (ELSTREAM CNT) WFROMDS (DD DS HINTW WINDOW) -|\\CreateScreenBitMap| (MAXPAGE# I) SET.TTYINEDIT.WINDOW (WINDOW) \\DSPFONT.IP (OLDFONT FONT FRAMEVAR) - SETSYNONYM (OLDPHRASE NEWPHRASE KEYLST NXT) CL:ASINH (CL::BOX) TB.REPLACE.ITEMS (BROWSER N ITEM -FIRSTSEL) CONTINUEDIT (STREAM FILE ENV FC FL TEM) SPP.SENDEOM (STREAM) TITLEDICONW (BREAKCHARS FONT -OPERATION BITS REG MASK FORMATTED WIDTH X HEIGHT ICONW TITLESPEC) \\UNPACKDATE (D SEC MIN ZONE FRAC HR - DQ TOTALDAYS DAY4 YEAR4 YDAY WDAY DLS CHECKDLS MONTH) LATTICE/BREAK/CYCLES (DTAIL GN D) HARDCOPYGRAPH - (BOTTOM-CENTERING-OFFSET TRAN X-PAGE-NUMBER Y-PAGE-NUMBER) \\NSFILING.LOOKUP.CACHE (ENTRY NAME X) -TEXTMENU.CLOSEFN (TEXTOBJ) \\INTERPRETER1 (HEADER NT NILSTART ARG ARG# NT1 NT2 *TAIL*) CL:ATAN (CL::Z) - OPT.RETOPT1 (Y1 END) DELETE/AND/DISPLAY/LINK (FROMND TOND) CL::%COMPLEX-ABS (CL::X) -\\TEXTMENU.SET.TOGGLE (OBJ PC WINDOW) CL::%MAKE-RANDOM-ARRAY (CL::RANDOM-CONST-A CL::RANDOM-CONST-B) -\\DSCCOUT (CC) \\STACKARGPTR (P FX) \\TEDIT.FIXSELS (SELN) SEDIT::NEXT-NODE (SEDIT::INDEX SEDIT::NODE) - COLLECTKEYS (KEYLST) CL::%GCD (CL::X CL::Y) MERGEINSERT (LST1 TEM PLACE N LST) OPT.RETPOP (RET VAL -TAGS ANY) TTMAKECOMPLEXCHAR (WIDTH NC) \\PACKDATE (DAYSSINCEDAY0 YDAY YR HR) \\FM.MENUHANDLER (BUTTONS - LASTITEM ITEM REGION PROMPTFLG) DBG::STACK-FRAME-STOREFN (DBG::FN) PROCESSWORLD (PQ P EXECPROC -BACKGROUNDPROC) PRINTERRORXIP (XIP) \\CREATEDISPLAY (FDEV) ANALYZE-REST (REST-ARG) COMPILER::COPY-NODE-LABELS - (COMPILER::FUN COMPILER::NEW-VAR) \\FTP.NEXTFILE (INS PLIST NAME) \\ENTITYEND.PRESS (ELSTREAM -DLLENGTH) \\PARSEARRAYSPACE1 (ROVER) CHANGESLICE (L) CL:ACOSH (CL::BOX) \\IDATESCANTOKEN (CH RESULT) -DEFAULTSUBITEMFN (ITEM) \\LONUM (HI LO NUM) \\START.PROCESSES (PQUEUE PROC FROMFX) CH.CHANGE.ITEM ( -OBJECTNAME) \\SMASHLINK (CALLER ALINK CLINK BLINK) DASSEM.ASMAJ (Y S D P) POSTSCRIPT.INIT (CLASS -COPYFD OLDPSCFD \x) CL::%LCM (CL::X CL::Y) DISPLAYSTREAMINIT (TTYFONTHEIGHT TTYHEIGHT) FAULTAPPLY ( -%LEXICAL-ENVIRONMENT% DEF TRAN TRANFN) NONSYSPROPNAMES (PROP) \\SETUP-COMPILED-CLOSURE-CALL (OLDBF -INTERPBF INTERPIVAR INTERPALINK SLOWP INTERPCLINK STKEND NACTUALS NA NEWFX SP NPVARS ENV) OPT.RETFIND -(L1 R) MAX/RIGHT (NODE) PUTWINDOWPROP (WINDOW) CL:ATANH (CL::BOX) \\OUTDATE-STRING (I) \\RUN.PROCESS ( -PREV NEXT) \\MAIKO.CONS.UFN (CNS.PAGE) DRIBBLE (NEW-DRIBBLE-STREAM) READGRAPH (TEMP NUM IDS I BORDERS -FONTS SHADES) TB.SET.FONT (FONT HEIGHT ASCENT ORIGIN TOTALHEIGHT HW EXTENT FN) GETLOCALDEC (X TL Y) -\\TEDIT.SHRINK.ICONCREATE (ICONTITLE) SEDIT::GET-CONTEXT (SEDIT::CONTEXT) SIMPLE-COMPARE (END1 END2) -\\OPENW1 (WINDOW) \\IRM.SMART.REF (POS KEYWORD TAIL) CL:COPY-READTABLE (FROM-READTABLE) -\\MOVE.WINDOWS.ONTO.SCREEN (W XFACTOR YFACTOR REG) TTGIVEHELP1 (X) \\RELEASE.PROCESS (FX OTHER WINDOW) - \\CLOSEW1 (WINDOW) MSSETPHRASE (VAL SETDET NOTYP SETTYPE REP) \\SPY.INTERRUPT (FRAME) -\\INTERPRETER-LAMBDA (ENV) \\HINUM (HI LO NUM) \\CREATELINEBUFFER (EOFMETHOD DEV) ADD.PROCESS (FORM -NAME VALUE PROP WINDOW PRIORITY AFTEREXIT BEFOREEXIT TTYENTRYFN TTYEXITFN INFOHOOK RESTARTFORM -RESTARTFLG CREATENOW SUSPENDIT USERPROPS I SYSTEMP PROC) ETHERHOSTNAME (NETHOST SOCKET# BUF IPUP -RESULT C) PROMPTFOREVALED (WIN NEWVALUE) SETXY.PRESS (ELSTREAM) ARGLIST (DEF) CL:COUNT-IF (END) -GRAPHOBJ.PUTALIGN (N I) COMPILEFILES (FILES) HLSTORGB (|Max| |Min|) \\SPP.PREPARE.INPUT (EPKT -CONDITION NEW.DSTYPE OLD.DSTYPE SPPDSTYPECHANGEFN) CL:COUNT-IF-NOT (END) \\TTW1 (SCREEN SOFTCURSORUP -DISPINTERRUPT ISECT) \\SETUP-ENVIRONMENT-CALL (LOCNARGS NACTUALS ENV CODE NA NEEDEDSIZE ARGSTART -UFNIVAR FREESIZE SZ UFNNEXT STKEND NEWSTACK SLOWP IVAR SP NPVARS) MAKETITLEBARICON (TEXT POS REG W) -FOREST/BREAK/CYCLES (DTAIL DN) \\IRM.GET.REF (KEYWORD REFS SAMEFLG REF) MIN/BOTTOM (NODE) -\\NSFILING.ADD.TO.CACHE (ID OLDHANDLE H CACHE) OPT.JSIZE (Z) TB.SCROLLFN (HW) OPENWINDOWS (WINDOWS -SCREEN WINDOW) OPT.RETOPT (TESTL TARGL) TEDIT.MAPLINES (LINE) BRKDWNCLEAR (I) SEDIT::ATOM-POINT-TYPE ( -SEDIT::I SEDIT::C SEDIT::ESCAPED SEDIT::RESULT) NEWPAGE.IP (CFONT ROTATION XOFFSET YOFFSET HFONT) -\\TIMER.PROCESS (PROC) CL:DELETE-DUPLICATES (END) GRAPHOBJ.GETALIGN (ALIGN) \\FM.RIGHTBUTTONFN (ITEM -REGION) COMPLEX-COMPARE-FORWARD (END1 END2) \\EVALVAR (VAL) \\FREESTACKBLOCK (SCANPTR EASP FREEPTR -FREESIZE WANTEDSIZE) TEDIT.DEACTIVATE.WINDOW (MENUW) MAX/TOP (NODE) LASTN (X Y L) MAKEBRES (SELF PX PY - PXY) CHANGEBACKGROUND (SHADE SCREEN WINDOWS) DEFAULT.ADDNODEFN (NODELABEL NODENAME) DOCOLLECT (LST) -BRKDWNBOXES (BDZ BDY BDN) \\SPP.ESTABLISH (CON NAME INSTREAM) COURIERPROGRAM.PRETTYPRINT (EXPR) -LISPXSTATE (X Y) CL:COSH (CL::FZ) EDITCOMS (COMS) CL:DECODE-FLOAT (FLOAT) \\NSADDRESS.PRINT.DECIMAL ( -NUM REM PIECES) \\TFBRAVO.PARSE.PARA (ORIGPTR LEN PLOOKS RUNS) MAINWINDOW (MAINW WIN) CL:DELETE-IF ( -END) CHECKCONSPAGES (CPAGE) CL:COUNT (END) \\DTSCAN (L) CL:DECODE-UNIVERSAL-TIME (CHECKDLS TIME SEC -MIN TOTALDAYS HR LEAP400 DAYS LEAP100 LEAP4 YEAR YDAY WDAY DLS MONTH) CL:DELETE-IF-NOT (END) \\MAPMDS -(TYPE TYP VP I) \\ISDST? (YDAY) \\INVALIDATE.PROCESS.WINDOW (OLDBUTTONFN) LISPXFIND0 (LINE0 TEM L1 -THRUFLG L2) TTY/EDITL (COMS EDITHIST0 EDITIME0 TEM2 TEM1 L MARKLST UNDOLST UNDOLST0 UNFIND) -\\DEFINEDISPLAYINFO (BUCKET) \\STOPSCROLL? (WINDOWFN) SEDIT::ASSIGN-FORMAT-LITATOM (CL:ATOM) -LINEBUFFER-SKIPSEPRS (CH) \\FAX.PARSE.NAME (AT PERSON DESTINATION CH PHONE INFO HOST MSG) -TWODINSPECT.SELECTITEM (SELECTEDROWPROP RPROP SELECTEDCOLUMNPROP CPROP SELECTEDELTBOTTOM VMARK -SELECTEDELTWIDTH XCL:*PROFILE* SELECTEDELTLEFT HMARK) APPLY (DEF) FAULTEVAL (TEM TEM2) -ONEDINSPECT.VALUEWIDTH (PROP) \\INTERNALTOTOPW (W1 SCREEN SCREENTOPW) \\SET.PROCESS.NAME (NEWNAME I) -APPLY* (DEF I) EDITL0 (COPYFLG) FINDFILE-WITH-EXTENSIONS (HASEXTENSION HASDIRECTORY EXT VAL DIR -DIR&FIELDS) CL:DIRECTORY (GENERATOR FILE) SEDIT::CONVERT-COMMENT-TAIL (SEDIT::NSPACES X SEDIT::TAIL) -CH.ADD.ITEM.PROPERTY (OBJECTNAME) \\NEXTCONSPAGE (PG) \\ALLOCMDSPAGE (VP VPTR) SEDIT::INSERT-CHANGED ( -SEDIT::NEXT LIST) SETQ (*TAIL*) OPT.FINDEND (C) \\SPP.RELEASE.ACKED.PACKETS (XIP OLDACKNO) -TB.NUMBER.OF.ITEMS (BROWSER I) \\NSADDRESS.DEFPRINT (HOST) \\TEDIT.HARDCOPY.DISPLAYLINE (OLOOKS -FIRST-SCALED-CHAR CURRENTY OFONT KERN LOOKSTARTX LINELEN CH DX LOOKNO TTX TX I) AND (*TAIL*) -\\CHECKCONSPAGE (CNT NXT) DBG::ATTACH-BACKTRACE-MENU (TTYWINDOW BKMENU NAME POS N BTW ATW) -CL::%RATIONAL-FLOAT (CL::MANT CL:EXP) \\MOUSE.PROCESS (OTHERMOUSE \\OLDTTY) GREETFILENAME (FILE USER D -) CL::%RATIONALIZE-FLOAT (CL::XNUM CL:EXPT CL::SIGN CL::HI CL::LO CL::R CL::XDEN) \\DSPFONT.HCPYMODE ( -OLDFONT XFONT) TTYINFIX (TAIL X) SEDIT::DRAW-UNDERLINE (CL:FIRST SEDIT::STARTX) SEDIT::CREATE-SIMPLE-NODE - (SEDIT::NEW-NODE) \\BBTCURVEPT (CLIPPEDTOP STY X) UNDOEDITL (X) SEDIT::REPAINT (SEDIT::MIN-Y SEDIT::END - SEDIT::LINEAR-START SEDIT::ITEM SEDIT::TEMP) \\CKAPPLYARGS (ACNT PTR VAL) OPT.DELTAGREF (X) -\\FM.WINDOWENTRYFN (ITEM REGION) \\SETSPACE.PRESS (ELSTREAM) \\NSFILING.OPENFILE (STREAM SEQUENTIAL -ATVAL OTHER ATTRIBUTES) ENSURE.RGB (RGB) \\SETFVARSLOT (NT NTSIZE A VARINFO) CL::%EXP-FLOAT (CL::FX -CL::ANSWER) EXPANDW (ICONW) SEDIT::CONVERT-COMMENT-STRUCTURE (SEDIT::COMTAIL SEDIT::2-STARS SEDIT::COMCHAR -) PRINT-LOADED-FILE-INFORMATION (X) SMASHFILECOMSLST (NAME) COMPILER::FRAME-ANNOTATE-TAGBODY ( -COMPILER::REQUESTS COMPILER::OUTER-REFERENCES) GRAPHREGION (LEFTOFFSET BOTTOMOFFSET) -\\FIXLINELENGTH.PRESS (LLEN) \\NSFILING.CONNECT (NEW.HANDLE NSPATHNAME) \\PROG0 (HEADER NT NILSTART -VAR VALUEOFF VAR# NT1 NT2 *TAIL*) CURSOR (OLDCURSOR NEWCURSOR) CL:FIND-IF (END) NEXTSIZEFONT (FONTTAIL - FONT) SEDIT::CONVERT-COMMENT (SEDIT::NODE SEDIT::SELECT-END SEDIT::NEXT-NODE) BRKDWNCONSES (BDZ BDY -BDN) CH.RETRIEVE.ITEM (OBJECTPATTERN NAME&VALUE) INTERPRESSFILEP (STRM I) \\CKPOSSOUT (I) \\LITPRIN ( -PKG PKGSEPR C WAS-ALPHA) MAP.PROCESSES (P) \\INITCONSPAGE (CELL J) LOADFNS-MAKELIST (F) PRINTLEVEL ( -CDRVAL CARVAL) COMPILER::META-CALL-LAMBDA-SUBSTITUTE (COMPILER::TAIL COMPILER::VAR) COMPILER::CONSTRUCT-LIST - (COMPILER::NODE) \\TEDIT.CREATE.LINECACHE (I) PUTSTREAMPROP (OLDVALUE TAIL) OPT.COMMONBACK (BDEF FLG -LEVEL FRAME BREF G) DBG::REGION-NEXT-TO (WIDTH HEIGHT) %BROADCAST-STREAM-DEVICE-CHARSETFN (S) -TB.COPYBUTTONEVENTFN (COPYFN SELECTIONREGION NEWITEM LASTX LASTY CURRENTITEM) CL:FIND-IF-NOT (END) -LISTPUT (X X0) \\TEXTOPENF (PCTB) \\KEYHANDLER1 (PERIODCNT CURSORX CURSORY MOUSESTATE OLDU OLD2 WPTR -OLD0 OLD1 OLD3 OLD4 OLD5 OLDFAKEU LOOPCNT) DOFILESLOAD (DIRS LOADOPTIONSFLG FILE FULL FN EXT WORD -FORCEDEXT? NOERRORFLG) ESPATTERN (X) SEDIT::COPY-SELECTION-DEFAULT (SEDIT::X SEDIT::BLANK-BEFORE SEDIT::I -) CCCSCAN (CODELOC NAME NAMELOCS NT1 B TAG DEFLOCS CONSTLOCS PTRLOCS) \\GET.PRIORITY.QUEUE (HEAD PREV -PQ) FB.HARDCOPY.DIRECTORY (MAINFONT TITLE PAD FILES ITEM FDATA MAXNAMEWIDTH COLUMNSPECS SPEC PROTO -DATEWIDTH INDEX INFOLMARG PAIR LABEL W FIRSTINFOCOLUMN FILEINFO HERE NEXT INFO) FB.GETALLFILEINFO ( -ATTR VALUE TREESIZE) \\PRINSTACKP (X) CL::GET-SHARED-SETF-METHOD (CL::ARGS CL::VALS CL::VARS -CL::SHARED-SETF-INVERSE-FORM CL::GET-FORM) COMPLEX-COMPARE-BACKWARD (START1 START2) -\\TFBRAVO.WRITE.PARAGRAPH (LENGTH) EVALA (TMP NVARS NNILS NTSIZE) DASSEM.CANSHAREBINDING (FR V3 X) -PRINTPUPQUEUE (LASTPUP PUP GAP) ENDLOADUP (X) \\SEQUIN.CONTROL (PUP) -COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS (COMPILER::TAIL) \\EVALA (HEADER NT NILSTART PAIR VAR# -NT1 NT2 VALUEOFF) \\EXTERNALFORMAT (EXTFORMAT) CHECKSYNONYM (KEYLST STAIL NXT CNT) EDITL1 (EDITHIST -UNDOLST1) FIND-EXTERNAL-SYMBOL (STRING) NCHARS (C NCHARCNT) CL:FILL (END) \\SMASHRETURN (CALLER FX -DESTPROC) SEDIT::DRAW-OUTLINE (SEDIT::H-1 SEDIT::H-2 SEDIT::W) RECORDPRIORITY (TRAN PREV) -|\\PFFindRootDirEntryNum| (|entryNum|) \\PRINSTRING (C) \\LITPRIN.INTERNAL (NESCAPES FIRSTESCAPE -USEMULTESCAPE CHECKESCAPE C CASEBASE SA WAS-ALPHA SYN FIRSTFLG) FB.BROWSECOMMAND (FILE NAME TAIL -INTERESTING FIELDS MAINDIR SUBDIR) \\SOUT (I) \\SUSPEND.PROCESS (PQHEAD PREV LAST NEXT OLDEVENT EVENT) - FGETD (FN) POSTSCRIPT.FONTCREATE (PSCFD FACECHANGED FULLNAME ASCENT DESCENT UNITFONT SCALEFONTP FD -WIDTHSBLOCK FIXPWIDTHS CH PSCWIDTHSBLOCK) PROCESS-STATUS (STKI) ERRORSET (SI::NLSETQ-VALUE) CLISPDEC ( -DECLST TEM CLASSDEF LST) ONEDINSPECT.SETELT (XCL:*PROFILE* NEWVALUE) \\TEXTBACKFILEPTR (PC PS PF -REALFILE) PROCESS.RESULT (PROCESS) \\PRINT-USING-DEFPRINT (FN) SEDIT::DRAW-HIGHLIGHT (SEDIT::X-3 SEDIT::W - SEDIT::Y-1 SEDIT::Y-2) TB.REMOVE.ITEM (TAIL N) \\TEXTMENU.TOGGLEFN (NEWSTATE) CL:GET-SETF-METHOD ( -CL::TEMP) BAKTRACE1 (POS TEM N X LST) \\NSNET.CLOSERP (ROUTEY) FRESHLINE (STREAM) VALUOF (Y) -SEDIT::PARSE-INDENT (SEDIT::INDENTS) \\EVPROG1 (*TAIL*) \\SPP.HANDLE.DATA (CURRENT PKTNO NEXT XIP -XIPNO) MENU.HANDLER (BOXY BOXX SUBMENUWINDOW OLDBOXX OLDBOXY ITEM MOUSEDOWN SUBMENURESULT HELDSTATE -HOLDTIMER LASTBUTTONSTATE) PUTPROPS.PRETTYPRINT (EXPR PROP) CL:GET-SETF-METHOD-MULTIPLE-VALUE (CL::TEMP -) \\PRINTNSADDRESS (FILE) GO (GOTAIL FIRSTARG FRAME) LET (VAR NVARS NNILS NTSIZE) -BREAK.NSFILING.CONNECTION (DEV) OPT.JUMPREV (R PR BD ABD BR ABR OABR OAR TMP ANY END FLG CD LB DR) -\\LET0 (HEADER NT NILSTART VAR VALUEOFF VAR# NT1 NT2 *TAIL*) PROCESS.FINISHEDP (PROCESS) LET* (VAR -NVARS NNILS NTSIZE) PROG (VAR NVARS NNILS NTSIZE) CL:ENCODE-UNIVERSAL-TIME (YEAR YDAY DAYSSINCEDAY0 I -HOUR) SEDIT::STRING-OFFSET (SEDIT::K SEDIT::OFFSET SEDIT::J) \\SYMBOL.ESCAPE.COUNT (MULTESCAPE C SYN -RESULT NESCAPES FIRSTFLG) COURIER.SKIP (X DEF) NOTIFY.EVENT (EVENT TAIL PROC SUCCESS) COND (VAL *TAIL* -) TEDIT.COPY (PCLST REPLACING TOLEN INSERTCH# UNDOCHAIN LEN PC OBJ AFTERCOPYFN EVENT) BRV/OFFSET (ABSX - P) TEDIT.KILL (STREAM TEDW TEDPROC) INSPECT (IWINDOW INSPECTINFO IMACRO) \\SCROLL.HANDLER.DOIT (LFT -TOP) \\DRAWLINE.IP (HALFWIDTH) \\EVPROGN (*TAIL*) \\DOMOUSECHORDING (LRSTATE STATE REALUTILIN) -CL:INTEGER-DECODE-FLOAT (FLOAT) PROCESS.TTY (PROC) PROG1 (*TAIL*) NEWLINE.IP (NEWYPOS) FB.SHAPECOMMAND - (WWIDTH EXCESSHEIGHT MENUW) \\TEXTMENU.TOGGLE.CREATE (X Y BITMAP DS) FB.FASTSEECOMMAND (FILELIST -SEEWINDOW FILE) FB.MAYBE.WIDEN.NAMES (THRESHOLD PAIR) APPEND (N VAL) \\FTP.FLUSH.TO.MARK (CH) -\\MEDW.CURSOR (OLDCURSOR NEWCURSOR) TEDIT.CHARWIDTH (CH) \\INSERTCR (INPC) GIVE.TTY.PROCESS (FN) -|\\PFRemoveRootDirEntry| (|entryNum|) \\NUMERIC.PNAMEP (C LASTCHARTYPE SEENALPHADIGITS -SEEN-ILLEGAL-SYNTAX MAXALPHADIGIT SEENDECPT SEENDIGITS SEENTIGHTLETTERS SEENEXPONENT) -\\DOBUFFEREDTRANSITIONS (R RPTR) SCALED.BITMAP.GETFN (BITMAP FACTOR) \\INSTALL.EXTERNALFORMAT (NAME -ENTRY) PFI.PRINT.BITMAP (HEIGHT WIDTH BMARG RATIO SCALE MINX CURX CURY BELOWBASELINE NLINESDOWN -LINEHEIGHT BOTTOM IMSTREAM) \\GR.MAKEPRETTYCOMSL (L Y NAME DEF) CH.DELETE.SELF (GROUPNAME) -COMPILER::META-CALL-LAMBDA (COMPILER::PARAM COMPILER::ARG COMPILER::NEW-PARAMS COMPILER::NEW-ARGS -COMPILER::CURRENT-PROG1-TAIL COMPILER::*MADE-CHANGES* COMPILER::CURRENT-PROGN COMPILER::NODE) -PRINTPACKETQUEUE (PACKET) MSPRED (FLG) TTYINSTRING (TAIL FATP NC X RESULT I) -MAKE-UNICODE-TRANSLATION-TABLES (M RCODES RBASE LEFTC CSA I RCOMBINERS PREV) CLISPFORERR1 (TEM X) -FB.HARDCOPY.TOFILE (HCOPYFIELDS TAIL I MSG HCOPYTAIL FORE AFT EXT HAVEDIRECTORY HOST PRINTFILETYPE -TYPE ITEM FILETYPE FN NAME FIELDS) FB.ADJUST.DATE.WIDTH (TAIL SPEC ITEM RESULT INDEX) -CL::GET-SIMPLE-SETF-METHOD (CL::ARGS CL::VALS CL::VARS CL::SETF-INVERSE-FORM CL::GET-FORM) -FB.INFO.ITEM.NAMED (ITEM) COURIER.WRITE.FAT.STRING (LENGTH) ONEDINSPECT.SELECTPROP (SELECTEDPROP PRP -SELECTEDELTBOTTOM VMARK SELECTEDELTWIDTH XCL:*PROFILE* SELECTEDELTLEFT) \\TFBRAVO.READ.PARALOOKS (CHAR - VALUE LMFLAG FLLMFLAG TEM TABINDEX PROPERTY) ENVAPPLY (DEF) BROWSE/LAYOUT/LATTICE (N Y) -TEDIT.CARETLOOKS (CHARLOOKS) GRAPHER/CENTERPRINTINAREA (STREAM XPOS) \\UPDATE.EXTENT.IMAGE ( -SCROLLWIDTH SCROLLHEIGHT WINHEIGHT GRAYHEIGHT GRAYBOTTOM WINWIDTH GRAYWIDTH GRAYLEFT) -\\NSFILING.CLOSE.CONNECTIONS (SESSION PAIR) \\TEDIT.TABTYPE.SET (STATE DOTTEDBUTTON) \\EVALFORM (TEMP -*FORM*) \\GC.HANDLEOVERFLOW (PTR CELL HY LY Y HX) \\TEXTPEEKBIN (PC PS PO PF) \\LET* (HEADER NT -NILSTART VAR VAR# VALUEOFF NT1 NT2 *TAIL*) SEDIT::NOTE-CHANGE-IN-SIMPLE (SEDIT::NEW-WIDTH) -MB.NWAYBUTTON.ADDITEM (FONT HEIGHT DESCENT WIDTHS IMAGES WIDTH BUTTON SPACING SIDEEFFECTFNS DS IMAGE) -PPSOC (STREAM PUP) \\SPP.HANDLE.ATTN (FN) \\MEDW.PUTWINDOWPROP (WINDOW CURREGION OLDDATA OLDVALUE TAIL -) \\IGR.MAKEPRETTYCOMSL (L) EDITBF (PAT X LL Y) SEDIT::RELINEARIZE (SEDIT::FIRST-LINE-LINEAR -SEDIT::FROM-TOP SEDIT::OLD-ACTUALLLENGTH SEDIT::OLD-LAST-LINE SEDIT::LINE SEDIT::NODE SEDIT::SUPER-NODE - SEDIT::FOLLOWING-LINE) \\TEDIT.LINECACHE (CW CH) \\MAKESTACKP (ED) MSNEXTWORD (TEM ADV X) -\\FM.WINDOWEXTENT (ITEM REGION) PROCESS.WINDOW (WINDOW) SORT.NSADDRESSES.BY.DISTANCE (PAIR) -|\\ItemNumber| (SOMEITEM ITEMNUM) TTPRIN1 (DOWNCASE WIDTH CH I CRLFCOUNT) HARRAYKEYS (ITEMLST) -\\MAKEFUNARGFRAME (NVARS ENV NNILS NTSIZE) \\DTEST.UFN (N HI LO OBJ) \\FM.UPDATEGROUPEXTENT (GROUPLIST - GROUP REGION DAUGHTERS BOXOFFSET) NSNET.DISTANCE (NET# ROUTE) GETSEQUIN (PACKET) MENUITEMREGION ( -ITEMNUMBER ITEMTAIL) \\MAKENUMBER (N1 N0) CH.ADD.SELF (GROUPNAME) WINDOW.BITMAP (BM) OPT.LBDEL (B) -OPENW (WINDOW) DUMMYDEF (X) DASSEM.MATCHVARS (VAR X VARS TAIL) SI::UNWIND (RESETSTATE UNWINDER -CLEANUPFN FRAME) \\GR.CONTENTS (COM X) EDITQF (Q1) CL:LOGCOUNT (INTEGER) \\TFBRAVO.HANDLE.HEADING ( -AFTERHEADINGPTR PARALOOKS HEADINGDESC) \\INTERPRETER (DEF ENV ARGLIST NNILS NEXTRA NA NTSIZE I) -\\TEDIT.FIXCHANGEDLINE (CHARLIM OCHLIM OLHEIGHT NEWLINE YBOT LINES OFLOWFN) RUNION (X L2) -CENTERPRINTINAREA (STREAM XPOS) LAPRD (X Y) \\DRAWCURVE.IP (KNOTS K) DREMOVE (Z L) STKAPPLY (DEF) -\\SOFTCURSORPOSITION (DISPINTERRUPT) USERLISPXPRINT (FN) OPT.LABELNTHPR (CD CNT G) -\\TEDIT.PEEKBIN.NEW.PAGE (FILE CH) IMAGEOBJPROP (IMAGEFNS) COPIEDFILEMATCH (FRPAT X CHARS) -FB.DEPTHCOMMAND (NEWDEPTH) WINDOW.MOUSE.HANDLER (\\MHWINDOW \\MHCOM \\MHPROCESS) PRINT10TO3 (FILE) -GRAPHOBJ.CHECKALIGN (ALIGNSPEC) GETDEFFROMFILE (FILE SOURCE DEF TEM2) FB.HEADINGW.DISPLAY (SPEC FORMAT - NEXTPOS) \\ENQUEUE (Q TAILEND JUNK NEXTITEM THISITEM) EDIT\: (X LC) \\GCMAPTABLE (PTR CELL HY LY N HX - DTD I) ICONW.SHADE (SHADEBM IMAGEBM ERASEBM) COURIER.WRITE.STRING (STRING) \\MEDW.GETWINDOWPROP ( -WINDOW) \\JISPEEK (CH2 CH3 CHARNUM IN16BITFLG) TEDIT.INSERT.UPDATESCREEN (L1LIST LNLIST WW L1 LN -SELINE) \\TEDIT.BLTCHAR (IMAGEWIDTH NEWX LEFT RIGHT) PFI.MAYBE.PP.DEFINITION (ENV) \\VAROFFSET (NAME -TMP OFFSET) PRINTNUM-TO-STRING (WIDTH STR RAD TEMP PAD) PRINTPACKET (FN FILE) FB.HARDCOPYCOMMAND ( -PRINTOPTIONS) SPY.FIND.TREE (X) \\DSPFONT.PRESS (OLDFONT FONT CSINFO FDENTRY) BESTNSADDRESS (ADDRESSES - HOSTNAME MSG BESTHOPS NOTLOOKEDUP BESTADDR ROUTE HOPS TRY) BLIPSCAN (A OFF FRAME) |\\AddShade| ( -SHADEDITEM SHADEDITEMS) SEDIT::ADD-MENU (SEDIT::MENU) \\TRACKCURSOR (CURSORX CURSORY) -CL:MAKE-BROADCAST-STREAM (STREAM?) CLISPFORERR (TEM X Y) TOPW.REPAINTFN (WINDOWREGION HORZMARKS -COLUMNPROPS COLUMNPROP MARK STARTCOLUMNPROPS STARTHORZMARKS LASTCOLUMNPROP XCL:*PROFILE* HMARK) -TB.REDISPLAY.ITEMS (FIRSTITEM LASTITEM) XCL::GET-UNDOABLE-SETF-METHOD (XCL::TEMP) \\COURIER.RECORDTRAN - (TYPEDEF REST PROGRAM FORM X TAIL) \\TEDIT.NEWREGIONFN (XDELTA YDELTA) -COURIER.WRITE.SEQUENCE.UNSPECIFIED (ITEM X FN) \\SHIFTJISPEEK (CH2 CH1) \\TFBRAVO.READ.CHARLOOKS (CHAR - VALUE VALFLAG PROPERTY TEM) DASSEM.DSTOREFNDEF (FRAMENAME NAMETABLE LOCALARGS NTSIZE NTWORDS STARTPC -STARTLOCALS LOCALSIZE REALSIZE CA X LOC FVAROFFSET NT1 NT) |\\PFPutRootDirectory| (|where|) \\INSERTCH - (CHAR \\INPC \\INSTRING NEWPC NEWFLAG PC PLOOKS NLOOKS PCTB PREVPC EVENT REPLACING TEXTLEN) SORT1 (L -A TM) COMPARELST (LOOSEMATCH) \\IPCURVE2 (SPLINESTEP HALFWIDTH SPLINEDIFF DASHON DASHLST DASHCNT SEG# -IPDATA LEFT RIGHT BOTTOM TOP VISIBLEP TT DELTA IX IY XT YT DUPLICATEKNOT X\'T Y\'T DX DY XWALLDT -YWALLDT NEWT NEWXT NEWYT XDIFF YDIFF PREVX IPXPOS PREVY IPYPOS KNOT#) SETBLIPVAL (N I P FRAME) -\\TEXTGETFILEPTR (PLEN) GETDEFSAVED (X) \\REMOVE.EXTERNALFORMAT (ENTRY) \\STKARG (NT INDEX NARGS BLINK - NTSIZE) FB.INFOMENU.WHENSELECTEDFN (CHOSEN) DISMISS (DTIMER NOBLOCK) VIRGINFN (REAL-DEFN) -XCL::SETF-FIND-PROFILE (XCL::NAME XCL::PROFILE) COMPARELISTS (STREAM) RETEVAL (RETURNEE) -\\DOTRANSITIONS (BITMASK I) \\GET.COURIER.DEFINITION (PGMDEF OTHERPROGRAM) COURIER.WRITE.SEQUENCE ( -BASETYPE) CLEARW (WINDOW) SAVEDEF (TYPE DEFINITION) CL:INTEGER-LENGTH (INTEGER) \\TEDIT.RESTARTFN ( -TEXT) BROWSE/LAYOUT/HORIZ/COMPACTLY (TOPNODE N GN) COMPAREDEFS (TYPE SOURCES SRCS SRC DEF DEFS) -\\NSFILING.AFTER.LOGIN (SESSION) \\FUNCT1 (HEADER NT NILSTART VAR VALUEOFF VAR# NT1 NT2) MSPATHS4 (TEM -) MERGE (A B ATAIL BTAIL) GETDEFERR (TEM O) CHARACTER (N) \\JISIN (CH1 CH2 CH3 CHARNUM IN16BITFLG) -LIST* (VAL I) BLIPVAL (I FLG P FRAME) TWODINSPECT.REDISPLAY (ELTROWPROPS ELTCOLUMNPROPS ELTS -ELTCOLUMNWIDTHS COLWIDTH COLPROP ELTRIGHTS HMARK ELTBOTTOMS VMARK ROWPROP XCL:*PROFILE* ELT -COLUMNWIDTH RIGHT BOTTOM) \\PROCESS.EVAL1 (..PEV-RESULT..) RETAPPLY (RETURNEE DEF) -\\ADD.ROUTING.TABLE.ENTRY (TABLE) TTYDISPLAYSTREAM (DISPLAYSTREAM WIN DD) TTADJUSTWORD (X) -VRULE.DISPLAYFN (THICKNESS WIDTH X RULING) \\GENERIC.DSPCREATE (DESTINATION SCREEN SC DSTRM) NCONC (J -X L) \\JISFILEOUTCHARFN (CHARCODE) \\SEQUIN.PROCESS (SOCEVENT PUP REASON TIMEOUT CNT -RETRANSMITINCREMENT) \\DECODETRANSITION (SHIFTED ASCIICODE) COUNT (N X) TEXTICON (TEXT) CL:MISMATCH ( -END1 END2) \\FM.TRANSPOSEVERT (ITEM REGION) \\SHIFTJISIN (CH1 CH2) BACKTRACE (FLAGS) \\TEXTEOFP (PC) -ESUBST (EXPR) REQUIREVERSION (TYPE NEEDED) PROCESS.READ (OLDW) \\GET.EXTERNALFORMAT.FROM.NAME (NAME) -SEND.FILE.TO.PRINTER (FULLFILE PFILE FILETYPE HOST X PRINTERTYPE) MAP (MAPX) CHANGENAME1 (DEF) -TEDIT.FORMATTEXTBOX (LINE FOOTNOTELINES PAGEFOOTNOTES FOOTNOTE-REMNANTS KEPT-ONE-LINE COLUMNBOTTOM -LINES THISLINE FORCENEXTPAGE CHNO REST FINAL-CHNO FMTSPEC SPECIALYPOS YBOT LHEIGHT ORPHAN NEWPAGETYPE -BREAKAFTERLASTPARA PRIOR-COLUMN-YBOT COLUMN-YBASE FIRSTLINE PREVLINE) COPIEDFILENAME (FILENAME) -\\DEFINEDEVICE (NAME TEMP DEV) RELEASINGVMEMPAGE (PTR) FORMAT-PRINT-RADIX (PARMS) \\FM.TRANSPOSEHORZ ( -ITEM REGION) U-CASE (C CHANGEFLG I NEWSTRING BASE) INFILECOMTAIL (COM X) CL:NSUBSTITUTE (END) -CHANGENAME1A (X Y) PRESSWINDOW (WIDTH HEIGHT) |\\SFFixY.HCPYMODE| (CHARTOP BM TOP) \\BACKTRACE (RADIX -CNT NAME BLINK IPOS) \\PROCESS.APPLY1 (..PEV-RESULT..) COMP.LOOKUPCONST (X) \\PRINTFRAME (NLOCALS I -TMP J FT) \\EUCPEEK (CH2 CH1) SHOWCHARS (C) TEDIT.FORMATFOLIO (PARALOOKS CHARLOOKS NOFIRSTPAGE -INFOLIST FOLIOFORMAT PRETEXT POSTTEXT PAGE# FOLIOTEXTOBJ FOLIOSTREAM THISLINE FORCENEXTPAGE LINE CHNO -YBOT) FB.DISPLAY.COUNTERS (LABELS MAXWIDTH PAGESTRING LAB HERE NEXTPOS) \\ICONW.REPAINTFN (WIDTH -HEIGHT) \\MEDW.TOTOPW (WINDOW) \\TRANSLATE.10TO3 (TRANS) DASSEM.DWRITEFN (X NAMETABLE I LOCALVARINFO -FNFIX ATOMFIX PTRFIX LOC) EDIT4E (PAT X) CL:NSUBSTITUTE-IF (END) DBG::FIND-NAMED-STACK-POSITION (DBG::TEM -) \\GETDEVICEFROMHOSTNAME (HOSTN D TEMP) APROPOS (OUTPUT BLOCKCOUNT RESULT VAL) CL:NSUBSTITUTE-IF-NOT -(END) TEDIT.SETSEL (SEL TEXTLEN) \\SCANFORNTENTRY (NM NT1 NT2) NOHOST (UP) FB.NEWINFOCOMMAND ( -INFOMENUW REG W) \\UNQUEUE.EVENT (NEXT TAIL) XCL::SETF-PROFILE-ENTRY-VALUE-NAME (XCL::PROFILE) -\\TEDIT.LOOKS (FONT FACE SIZE NEWLOOKS) CL::TIME-CALL (CL:VALUES) \\SHIFTJISFILEOUTCHARFN (CHARCODE -CH2 CH1) PRINTHISTORY2 (TEM) \\PRINTBF (NM I J) DELFROMCOMS (COMS TYPE DONE) OPT.JUMPTHRU (APD PD ALST - INFO REF BR Y PDN N B ANY DR) BROWSE/LAYOUT/HORIZ (N Y) \\IDLE.TIME (GONE) \\ENQUEUE.EVENT/LOCK (TAIL -) |\\PFGetRootDirectory| (|where|) \\FLOATTOBYTE.UFN (I) MSPATHS2 (Y) EDITFPAT (TEM ND CHAR) -\\EUCFILEOUTCHARFN (CHARCODE) CH.DELETE.PROPERTY (OBJECTNAME) \\LOOKUPPUPNUMBER (OXIP TIMER INXIP -RESULT) NEWLINE.PRESS (NEWYPOS) \\REMOVEDEVICE.NAMES (TAIL CHANGED) \\BLKFABSMAX.UFN (IDX MX I) -MSONPATH (INVERTED FROM TO TEM) EDITXTR (X) GRAPHBUTTONEVENTFN (BUTTON NEAR OLDPOS NOW) CL:POSITION-IF - (END) BRKDWNTIME (BDZ BDY BDN) \\BLKFABSMIN.UFN (IDX MN I) INTERPRESS.OUTCHARFN (CHAR-WIDTH NEWXPOS) -\\CLISPKEYWORDPROCESS (TMP X) CL:PEEK-CHAR (CL:CHAR SCSET CHAR) \\HARDCURSORUP (IMAGE) -\\CHANGECHARSET.HCPYMODE (BM) CL::%GET-TIMING-INFO (CL:VALUES) EDITMV (LC X OP L1 L2) \\TEDIT.MAINW ( -WINDOWS WINDOW) \\BLKFMIN.UFN (IDX MN I) GETDEFCOM0 (TEM) \\DELETEFILE (FILENAME DEV) -\\CANONICALIZE.NSADDRESS (TAIL HOST PREVTAIL) MAXSTRINGWIDTH (I M) CL:PROVIDE (CL::MODULE-NAME) -|UnixPrint| (NAME F) COPYINSERT (INSERTFN IMOBJ) TEDIT.FIND (TARGETSTRING SEL START# TARGETLIST X -RESULT1 RESULT) \\BLKFLOATP2COMP.UFN (I) COPIEDFILEPATTERN (FRPAT CHARS TOPAT X) -\\NSPRINT.FULL.REQUEST.STATUS (PRINTER RESULT STATUS) GETBLOCKDEC (FILE BLOCK) RELEASE.MONITORLOCK ( -LOCK PREV TAIL NEXTPROC) PFI.MAYBE.SEE.PRETTY (OUTSTREAM INSTREAM) \\BLKEXPONENT.UFN (X) EDITMBD (Y) -\\GR.PUTDEFFN (DEF TYPE) OBTAIN.MONITORLOCK (LOCK) ONEDINSPECT.SELECTITEM (SELECTEDPROP PRP -SELECTEDELTBOTTOM VMARK SELECTEDELTWIDTH XCL:*PROFILE*) TEMPLATE (OLD) \\NOTE.10TO3 (TRANS) -DASSEM.DASSEM (CODE ARGS NARGS A X D LL FRAMENAME VAR LOCALS FRAMES FREELST FREEVARS NLOCALS NFREEVARS - CD CODELOC OP JL) \\TEDIT.UNPARSE.CHARLOOKS.LIST (PROP PROPNAME NEWLOOKS) \\DEVICEEVENT (STREAM) -\\REMOVEDEVICE (TEMP PAIR) LOADBLOCK (FILE TEM) \\TEDIT.APPLY.PAGEFORMATTING (SCRATCHSEL CH# NEXTB -PAGEID STARTINGPAGE# PAPERSIZE LANDSCAPE? PAGENOS PX PY BUTTON FOLIOFORMAT ALIGNMENT FOLIOPRETEXT -FOLIOPOSTTEXT LEFT RIGHT TOP BOTTOM COLS COLWIDTH INTERCOL HEADINGS HEADINGTYPE HEADINGX HEADINGY -HEADINGINVALID HEADING# PFONT PAGEOPTIONS NPAGEFORMAT OPAGEFRAMES NFPAGEFORMAT) REVERSE (U L) -EDITFROMFILE (EDITCOMS FILES FILE TYPE FNS NAME SEEN) OPT.XVARSCAN1 (FR) TB.MAKE.BROWSER (USERPROPS -WINDOW BROWSER PROP OLDP TAIL) \\BLKSMALLP2FLOAT.UFN (I) \\CURSORBITSPERPIXEL (OLDBITSPERPIXEL -OLDIMAGE OLDMASK NEWIMAGE NEWMASK WHITE BLACK) \\BLKFDIFF.UFN (INDEX) \\CURSORDESTINATION (DESTBPL) -\\BLKSEP.UFN (BETAINDEX GAMMAINDEX DELTAINDEX ALPHAINDEX) FULLPRESSBITMAP (PRDATA SCALEFACTOR WIDTH -HEIGHT XPOS YPOS) WRITE-UNICODE-INCLUDED (ICSETS C KNOWN N POS I IMAPPING M CSI CSETINFO RANGES CTAIL -START END R LAST STR) TEDIT.FORMATPAGE (TEXTLEN THISLINE NEWPARALOOKS PC TPAGE PAGE# STARTING-FILEPTR -LINE CHNO SUBREGION END-OF-PAGE-MARKER) \\IDLE.EXIT? (PWD WATCHER NAME) EXPRP (DEF) -TEDIT.FORMATHEADING (PRECONDITIONS FORM HEADING HEADINGTEXTOBJ HEADINGSTREAM LINES THISLINE -FORCENEXTPAGE LINE YBOT CHNO) SI::MONITOR-UNWIND (LOCK PREV TAIL NEXTPROC) \\MEDW.REDISPLAYW ( -REPAINTFN CLIPREG REGION) \\BLKFPLUS.UFN (INDEX) \\MEDW.BURYW (WINDOW ABOVEWINDOWS ATWINS) -\\BLKMAG.UFN (COMPLEX-CNT REAL IMAG MAGNITUDE) GETDEFCURRENT (DEF X) FNCHECK (X FN FL FILE BLOCK B -BLOCK/FN) CLISPLOOKUP0 (CLASSDEF VAR1 VAR2 TEM) EDIT4F (PAT LL N TOPLVL C3 X TAIL) -\\TEDIT.TEXTBIN.NEW.PAGE (FILE CH) \\BLKFTIMES.UFN (INDEX) FB.NEWPATTERNCOMMAND (PATTERN) LISPXREPRINT - (FILE) \\HANDLE.NS.ROUTING.INFO (HOST HOPS NET BUCKET ENTRY RN OLDHOPS NEWTIMER LENGTH BASE) CL:REM ( -CL::FX) CL:REDUCE (END) \\SOFTCURSORUPCURRENT (DISPINTERRUPT X Y XBASE YBASE WIDTH HEIGHT -MINUSDESTRASTERWIDTH BITSPERPIXEL DEST DESTBIT SOURCEOFFSET UPBMSOURCE DOWNBMSOURCE SOURCEBIT) -TEDIT.NORMALIZECARET (TEXTOBJ) COMPILER::GENCODE-CALL (COMPILER::IL-LAMBDA COMPILER::ARG) -\\BLKPERM.UFN (X) FB.SETNEWPATTERN (ICON) PACK* (ITEM PACK.INDEX M) BITMAPCREATE (BITSPERPIXEL RW) -EDITCONT (LC1 L) \\EP.PUT.AUX (A VAL) \\HARDCURSORPOSITION (YPOS XPOS) KILL.LINES (FIRSTLINE) -CL:REMOVE-IF-NOT (END) CL:POSITION-IF-NOT (END) \\BLTSHADE.IP (DESTREGION OPERATION) MSPATHS1 ( -THISLINE POS TEM NEXTLEVEL Y TABS FIRST) MEMBTONODES (Z) CL:READ-LINE (STREAM) \\MAKE.PROCESS1 ( -MP0CALLER) COMPILER::FRAME-ANNOTATE-LAMBDA (COMPILER::OUTER-REQUESTS COMPILER::OUTER-REFERENCES) -CL:REMOVE-DUPLICATES (END) \\SOFTCURSORUP (IMAGE MASK WIDTH HEIGHT CURSORBITSPERPIXEL UPBMBASE -DOWNBMBASE CURSORBPL BWIDTH) \\PROCESS.MOVEFRAME (BLINK FRAMESIZE FXSIZE BFSIZE RESIDUAL NEW FREESIZE -NXT INITSIZE) XCL::SETF-PROFILE-ENTRY-VALUE (XCL::PROFILE) \\TEDIT.SELECT.CHARACTER (SELRES) -MAKEINITBFS (PREV I) CL:REMOVE-IF (END) EDITSW (TEM) BRECOMPILE3 (DEF FILEDESCR STREAM Y) CL:SCALE-FLOAT - (FLOAT) \\NSRANDOM.OPENFILE (FILENAME) SCANX (Y YDX2 DY2 XL XR) GETPROP (PLIST) \\CCODEIVARSCAN (NM -NUMBER I CODE IVARS NTOFFSET) CL:SEARCH (END1 END2) CL:RENAME-FILE (CL::NEW-FULLNAME FILE) LISPERROR ( -MSG N I) WRITE-UNICODE-MAPPING-FILENAME (RTAIL R) FB.CREATE.FILEBUCKET (FILENAME LASTNAMECHAR CH -VERSION DEC NEWFILEDATA N PREVDIR LASTDIR DEPTH DIRP HASDIRPREFIX STARTOFSHORTNAME STARTOFNAME ATTR -TEM) \\DUMP.COURIERPROGRAMS (PROGRAM PGMDEF) DECODE-NS-STRING (BYTEINC I FATLENGTH CH CSET FATBASE) -\\GENERIC.READCCODE (SCSET CHAR) \\MEDW.SHAPEW (WINDOW NEWSIZE) \\TRANSLATE.3TO10 (PACKET) -BRKDWNRESULTS1 (VAL LST TOT I) BRHL/LAYOUT/DAUGHTERS (DTAIL GN D NP FLOOR) \\BLKFMAX.UFN (IDX MX I) -MACROEXPANSION (MACRODEF) \\CCODEARGLIST (SIZE LOCALSIZE ENDT IVARS X I) CL:SINH (CL::FZ) -CH.LIST.ALIASES.OF (OBJECTPATTERN) OPENPRSTREAM (PRDATA OPT) CLISPDSUBST (TEM) \\GENERATEFILES ( -PATTERN) COMPILER:OPTIMIZE-AND-MACROEXPAND (COMPILER::NEW-FORM COMPILER::CHANGED-P) \\SOFTCURSORDOWN ( -DISPINTERRUPT) COMPILER::META-EVAL-PROGN (COMPILER::TAIL COMPILER::NODE) \\TEDIT.FORMATTEDP1 (LEN -DESCPTR NPIECES PASSWORD) OPT.XVARSCAN (A CD) TWODINSPECT.DOWINDOWCOMFN (COM) FINDSYSRECDECL (TYPENAME - DECL) ONEDINSPECT.REDISPLAY (ELTPROPS ELTS ELTBOTTOMS VMARK PROP XCL:*PROFILE* ELTWIDTH ELT BOTTOM) -\\MEDW.EXPANDW (MAINWINDOW IW USEREXPANDFN EXPANDREGION) MINIMUMWINDOWSIZE (EXT) COMPEM (FL) -BRHL/MOVE/RIGHT (D) GETMACROPROP (X VAL) MSPATHS (FIRST NAMED TEM UNDONE) FB.INSERT.SUBDIRECTORIES ( -TAIL LASTDATA) PFI.MERGE.INDICES (NEWINDEX MASTER) CL:VALUES (BYTE PREVFRAME CALLER I PC NUNBINDS) -PRIN2 (RDTBL \\THISFILELINELENGTH) IBLT2 (TEXTURE BITMAPOFFSET X |val|) \\RECLAIMARRAYBLOCK (P -RECLAIM-P) CREATEHASHFILE (SIZE STREAM VALUETYPE ITEMLENGTH FILE HASHFILE) FB.INSERT.FILE (NEXTITEM N -PREVITEM OTHERDATA) COMP.VAR (VAR) MSRESPELL (SPLST) SEDIT::TTYEXITFN (SEDIT::NEWPROC) \\OPENFILE ( -CDNAME FDEV STREAM NAME) INSURE.RGB.COLOR (LEVELS) OPT.SCANOPT (B A X P CD) PRINTFILEPROP (X) -\\PFI.DO.HARDCOPY (FORM) SEDIT::SUBSTITUTE-OBJ (SEDIT::SCOPE) \\WRITEPRESSBITMAP (BITMAP ELSTREAM CURX - CURY SCALEFACTOR TOTCOUNT) WAIT.FOR.TTY (WINDOW TIMER) \\DRAWCURVE.PRESS (KNOTS LASTKNOT) -\\PROCESS.EVENTFN (PROC ACTION) XIPAPPEND.CELL (XIP WHERE LENGTH) NESTED.SUBMENU (SUBMENU) -CONVERT.FILE.TO.TYPE.FOR.PRINTER (FILETYPE CANPRINT CONVERTER) \\TEDIT.INSPECTCODE (STREAM WINDOW SEL) - CH.LIST.ALIASES (OBJECTNAMEPATTERN) SNAPW (SCREENREGION SCREEN REGION NEWWINDOW) \\SPP.INFO.HOOK ( -WINDOW) \\GETKEY (C) FINDRECDECL (DECL TYPENAME) \\SAVESYSBUF (TA NC BUF J I) CHARSET (STREAM NEWVALUE - OLDVAL) PRINTROUTINGTABLE (TABLE FILE I BASE NET GATE) OPT.SETUPOPT (B P C) \\CHECKAPPLY* (DEF) -\\NSFILING.GETFILEINFO (DESIREDPROPS INFO HANDLE) INITX (Y X) CL::VALUES-LIST-UFN (BYTE PREVFRAME -CALLER VALS PC NUNBINDS) \\GETFILENAME (NAME FDEV) CLOSEW (WINDOW) \\FM.REDISPLAYMENU (GROUP BOX -REGION BACKGROUND) \\ENQUEUE.TIMER (NEXT PREV) FB.SORTCOMMAND (SORTATTR REVERSED SORTFN DATETYPE -BYNAME ALLFILES SORT# ITEM DATA VALUE) MB.NWAYBUTTON.SELFN (BUTTON X Y WIDTH IMAGE STATE) -COMPILER::FRAME-ANNOTATE-CATCH (COMPILER::OUTER-REFERENCES) MAKEFILES (TYPE FLG OPTIONS FILE) MAPFILES - (FILESPEC) TRACKW (WINDOW) \\SIMULATE.UNBIND (SP LASTPVAR) \\MEDW.SHRINKW (WINDOW ICONW TOWHAT -ICONISBITMAP FN ICONPOSITION) BRKDWNFORM (I) \\UNWIND.UFN (OLDTOS SP LASTPVAR DESIREDSP) ASSOC (ALST) -\\PEEKSYSBUF (R) SETFILEINFO (DEV FULLNAME) CL::VALUES-UFN (BYTE PREVFRAME CALLER VALS I PC NUNBINDS) -COMP.TRYUSERFN (M) CLISPFOR3 (TEM) MSSEEK-WORD (FND) PACKFILENAME (VAR VAL I HOST DEVICE DIRECTORY -SUBDIRECTORY RELATIVEDIRECTORY NAME EXTENSION VERSION TEMPORARY TEMP) \\DO.PARAMS.AT.OPEN (X ATTR VAL -HADEXTFORMAT) \\PUTBASEBITS (SIZE) XIPAPPEND.STRING (STRING WHERE LEN) BLOCKCOMPILE1 (ENTRIES TEM FN -DEF COREFLG BLOCKLIST CALLTAGS TAGNUM BLKFNS) \\INSPECT/CODE/REPAINTFN (XCL:*PROFILE*) -INSPECTABLEFIELDNAMES (FIELDNAME) WRITE-UNICODE-MAPPING (CSI F IMAPPING CSETINFO RANGES) -SEARCHPRETTYTYPELST (X FLG) FB.INCREASING.VERSION (Y X) \\RESHOWBORDER1 (DELTA NUWIDTH NUHEIGHT NUSAV -SOFTCURSORUP DISPINTERRUPT) \\ROUTINGTABLE.INFOHOOK (NUMENTRIES TABLE I BASE WINDOW STREAM) -BRECOMPILE1 (X ADR Y) BRHL/LAYOUT (YHEIGHT) FMEMB (Y) MENU (IMAGE DSP SELVAL MVAL) TERMX (Y X) -\\COURIER.PUTDEF (OLDINFO NAME) PRETTY-TYPE-NAME (DOC) SEDIT::STRINGWIDTH (SEDIT::C CL:LENGTH) -\\TEXTOPENF-SUBTREE (PC) CLISPFORVARS1 ($TAIL) MAPFILES1 (ATTRIBUTES NAME LEN) \\HANDLE.RAW.3TO10 ( -ADDR) MB.NB.PACKITEMS (ITEM ITEMWIDTHS LINES CURLINE CURLINEITEMS CURX) CL:SUBSTITUTE-IF-NOT (END) -XCL::MAKE-VARIABLE-DEFINITION (XCL::DEFINITION) TEDIT.SCAN.LINE (X OTX TXB TX CHB CLOOKS PREVCH -PCLOOKS CH CHNO LOOKNO I L L1 LN WW CHOBJB DX) TEDIT.CREATEW (PHEIGHT REGION) BRHC/OFFSET (ABSY) -CL:SUBSTITUTE (END) \\RPLACD.UFN (RP.PAGE) \\NSFILING.SETFILEINFO (RESULT) \\SCALEDBITBLT.IP ( -DESTINATION-REGION SOURCE-REGION) BRKDWN1 (Y LEN I) \\FINDKEY.UFN (I BASE) CL:SUBSTITUTE-IF (END) -\\PAGED.REVALIDATEFILELST (STREAM REASON PAGES) OPT.POSTOPT (C CODE VAL ANY PASS) -\\CLEAR.ROUTING.TABLE (I BASE) \\SPP.HANDLE.INPUT (XIP SPPBASE ADDRESSEDID PKTSEQNO ACTIVE? ATTN ACKED - NEWALLOCNO MAXALLOCNO ALLOCINCREASED ACKRECEIVED) COMPILEFILES0 (X OPTS RCFLG) REMPROP (VAL X X0) -IBLT1 (TEXTURE BITMAPOFFSET X |val|) \\UNQUEUE (NEXT PREV) FORGETPAGES (REFFED BUFFER PREVBUFFER) -TTRACKMOUSE (OLDROW OLDCOL CURSORPOS ROW OLDY OLDX COL WIDTH CH BUF) \\UNQUEUE.TIMER (PREV) -FIND.START.OF.WORD (END BUF) \\CHECK.PQUEUE (P X PREV) XIPAPPEND.WORD (XIP WHERE LENGTH) -PAINTW.CACHE.SHADE (ENTRY) \\CONS.UFN (CNS.PAGE CELL PRIOR OFFSET PRIORPRIOR CPG PG) CL:TANH (CL::FX) -\\INSPECT/CODE/RESHAPEFN (WHEIGHT BOTTOM) ALISTP (ELT) \\BOUT (STREAM) LISTGET (LST) PPROC1 (TIMELEFT -NOW EVLOCK NAME) MB.MARGINBAR.TABTRACK (X OLDX) LINE.LESSP (Y1 Y2 DY1 DY2) \\BIN (STREAM) PPROC (P1 -DONE P PQ) \\PROCESS.MAKEFRAME0 (NXT NXTEND FREE) CLISPFOR2 (LST) SETINTERRUPT (TABLE TEM) \\HTFIND ( -ENTRY LINK PREV) TWOD.TRACKCURSOR (SELECTEDROWPROP SELECTEDCOLUMNPROP SELECTEDELTBOTTOM -SELECTEDELTLEFT SELECTEDELTWIDTH X Y ROWPROP VERTMARK NEWROWPROP BOTTOM COLUMNPROP HORZMARK -NEWCOLUMNPROP NEWHORZMARK WIDTH LEFT SELECTION) \\RENAMEFILE (OLDFILE NEWFILE) FLUSHRIGHT (POS) -\\MEDW.MOVEW (WINDOW OLDSCREEN OLDCLIPREGION OLDLEFT OLDBOTTOM OLDWIDTH OLDHEIGHT POS FN REG LFT BTM -OPEN? MFN NEWREGION SOFTCURSORUP DISPINTERRUPT NEWCLIPPINGREGION NCB OCB OCW NCW OCH NCH NCL OCL OCR -NCR OCT NCT) \\STKSCAN (NT NTSIZE A NUMBER I VARINFO PVAROFFSET FVAR FX) KEYACTIONTABLE (OLD) -\\DRAWCURVE.PRESS.LINE (WIDTH SHAPE BACKOFF LEFT LB TR DIST BOTTOM) RESTOREMAP (P REFFED BUFFER -PREVBUFFER) GETINTERRUPT (TABLE X) GETWINDOWPROP (WINDOW) INTCHAR (VAL CHAR OLDINT SYSDEF HARDFLG) -CH.DELETE.ALIAS (ALIAS) \\RESTLIST.UFN (TAIL I) CL:VALUES-LIST (BYTE PREVFRAME CALLER PC NUNBINDS) -\\TYPEGLOBALVARIABLE (ENTRY I) NEWFAULT1 (FAULTZ) SEDIT::COPY-NODE (SEDIT::SUBNODE) \\UNBOXFLOAT3 ( -NEXT DEGREE COEFFICIENTS X RESULT I MATRIX2 MATRIX1) REHASHFILE (HASHFILE NAME) PUTPROP (X X0) -COMP.PROGLST (VAL LST N) \\TEDIT.ADJUST.LINES (OYBOT OFLOWFN OFLOW PREVLINE LL) -\\BUFFERED.REVALIDATEFILELST (STREAM REASON) \\TYPECHECK.UFN (N) \\PROCESS.MAKEFRAME (NEWFRAME) -NUTF8STRINGBYTES (C I) FB.EDITCOMMAND (FILE) FB.EXPUNGECOMMAND (FILES FILENAME NDELETED FAILED) -\\QUEUELENGTH (X CNT) \\SHAPEW2 (WINDOW SCREEN NUSAV) SCROLLBYREPAINTFN (X CRLEFT CRBOTTOM CRWIDTH -CRHEIGHT XEXTENTUSE YEXTENTUSE NEWX OLDX XDELTA NEWY OLDY YDELTA ONSCREENREG ONSLEFT ONSBOTTOM -ONSWIDTH ONSHEIGHT) \\TFBRAVO.WRITE.RUNS (RUN LENGTH RUNS) \\MEDW.CLOSEW (SOFTCURSORUP DISPINTERRUPT -NEXTW) HASHLINKS (DEC DEC1) WHICHW (SCREEN WINDOW) \\UPDATE.PBT.RASTERWIDTHS (PBT) CL::RANGE<= (CL::LOW1 - CL::HIGH1 CL::LOW2 CL::HIGH2) \\GENERATENOFILES (PATTERN) SEDIT::NORMALIZE-SELECTION (SEDIT::FIRST-LINE -) SEDIT::TRANSLATE-CHARS (SEDIT::C SEDIT::R) \\DRAWLINE.UFN (INITIALBUCKET NY FIRSTADDR MASK PT NX) -\\ASSIGNDATATYPE1 (DTD REDECLARED NEWTYPENUM NEWDTD FOUNDSOME NTYPX) COPYGRAPH (N) SEDIT::CONTAINS? ( -SEDIT::START-1 SEDIT::END-1 SEDIT::NODE-1 SEDIT::START-2 SEDIT::END-2 SEDIT::NODE-2) -FB.GREATEST.PREFIX (C LASTDIR I) MULTIFILEINDEX1 (PRINTOPTIONS TAIL OPTIONS INDICES NOTPRINTED I) -MSSPLST (Y) EXTEND/TRANSITION/CHAIN (LX RX LTAIL RTAIL) \\FIXDLINES (WW LINES CHARLIM CHAR1 NL PL -NLINES LINE) REMOVETONODES (Z) \\NSRANDOM.WRITEPAGES (BUF P SESSION BYTESTOSTORE LASTPAGE -BYTES-TIL-EOF CURRENTEOF ERROR ATTRS) \\SHOWTEXT (WINDOW LINES) COMP.UBFLOAT2 (A N) -\\MAIKO.IO-INTERRUPT (INFO) CLISPFOR0A (I.S.) \\NOFILESNEXTFILEFN (TYPE FILE VER) SASSOC (ALST) -\\NSRANDOM.READPAGES (CACHE NMORE I EXTRABUFFERS) \\PRESSCURVE2 (HALFVECWIDTH DASHON DASHLST DASHCNT -TT DELTA IX IY XT YT DUPLICATEKNOT X\'T Y\'T DX DY XWALLDT YWALLDT NEWT PUTDX EXTRADX PUTDY EXTRADY -NEWXT NEWYT XDIFF YDIFF KNOT#) LISPXUSE1 (L TEM V VFLG A AFLG E EFLG) \\MAIKO.ETHER-INTERRUPT (LENGTH -PAIR PACKET) CLISPFOR1 (BODYTAIL TEM Z LSTFLG BODY LST LST1) CH.CREATE.ALIAS (OBJECTNAME) FONTNAME.IP -(FACE NAME) COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::REQUESTS COMPILER::OUTER-REFERENCES) -\\DOHELPINTERRUPT (PROC) \\RPLCONS (CELL ITEM) ALIGNMENTNODE (N) TEDIT.SELECT.LINE.SCANNER (L TL1 TLN -WW L1 LN PARABOUNDS PARASTART PARAEND LL PREVLINE LINE) KNOTLOOP (I PREVX PREVY CURRX CURRY ALINE -ALIST) SEDIT::COMPUTE-SELECTION-POSITION-DEFAULT (SEDIT::END) RESHAPEBYREPAINTFN (WREGION OLDCRLFT -OLDCRBTM NEWWID DELTAWID NEWHGHT DELTAHGHT NEWCRLFT NEWCRBTM YPOS NEWPTOP OLDPTOP NEWPRIGHT OLDPRIGHT) - COMP.BIND.VARS (VAR X VAL VALS DECLS VLV VLN NNILS NVALS) \\AGE.ROUTING.TABLE (BUCKET ENTRY PURGED -TAIL TABLE I) \\TEDIT.CREATEW.FROM.REGION (PHEIGHT) RAISE/TRANSITION/CHAIN (P) \\DELETECH (PC1 PCN -START-OF-PIECE HIPC PCTB PCLST PC) \\SELECTPROCESS (PROCNAMES PROC NAME) DWIM-SYMBOL-PACKAGE (OTHERS X - CHOICE) NESTED.SUBMENU.POS (ITEMNUMBER ITEMTAIL) \\DOHELPINTERRUPT1 (OLDTTY) -\\MAIKO.CONSOLE-LOG-PRINT (MESSAGE-LENGTH) \\GETBRUSHFONT.PRESS (BRUSH) PROPLISTP (LSTPTR) -\\PAGED.REVALIDATEFILES (STREAM REASON PAGES NEWLIST) PRETTYFILEINDEX (*STANDARD-INPUT* WASOPEN -FILENAME ENV FILECREATED *PFI-TITLE* *STANDARD-OUTPUT* PRINTOPTIONS *PFI-MAX-WASTED-LINES* *PFI-TYPES* - *PFI-LOCATIONS* *PFI-FILEVARS* CRDATE *PFI-PAGE-COUNT* FIRSTPAGE PART# *PFI-PAGE-PREFIX*) -\\SPP.RETRANSMIT.NEXT (XIP SEQNO) GETFILEINFO (DEV FULLNAME) RESETKEYACTION (FROM) \\ONQUEUE (X) -\\TFBRAVO.LCASER (Z) \\TFBRAVO.EOLS (I) \\MAP.ROUTING.TABLE (I BASE) PPROCWINDOW (W) DSPFILL (STRM -REGION) \\SETPRINTLEVEL (OLB OSB CH N CARN BUF) ADDMENU (IMAGEWIDTH IMAGEHEIGHT POSITION SCREEN W) -EDIT4E1 (LST LST1 PAT MATCH PAT1 LST2) SPAWN.MOUSE (NAME I) SHADEITEM (ITEMREGION DSP ITEM) -PROCESS.STATUS.WINDOW (PMENU HEIGHT WIDTH REG LEFT BOTTOM WHERE) SHAPEW1 (WINDOW SCREEN NUSAV NOWOPEN? -) DELFROMCOM (TEM VAR NEW X PROP) CONTROL-T (OUT POS TEMP STKI CNT TOTALDELTA SWAPDELTA DISKIODELTA -NETIODELTA GCDELTA) CLEANUP (FILES OPTIONS TEM1 TEM2) TTNEXTPOS (LINE) MSVERB (ROOT) \\SETRECLAIMMIN ( -OLB OSB CH N BUF) GETDEF (OPTIONS NOCOPY TYPE SOURCE DEF) PRESSBITMAP (PRDATA WIDTH HEIGHT XPOS YPOS -CLIPPINGREGION) SKOR0 (SC TEM) AWAIT.EVENT (TIMEOUT) FB.REMOVE.FILE (PREVITEM NEXTITEM NEXTNEXTITEM N) - |\\PFInitializeVols| (|volNum|) MONITOR.AWAIT.EVENT (TIMEOUT) \\TFBRAVO.PARAMNAMEP (L) -\\TFBRAVO.READ.USER.CM (FILE LINE ALIST) \\MEDW.OPENW (DD SOFTCURSORUP DISPINTERRUPT) -\\TEDIT.FIXINSSEL (CH# CHLIM) RELMOVEW (WINDOW) HEIGHTIFWINDOW (SCREEN) PUTDEF (TYPE) XIPAPPEND.BYTE ( -XIP) COPY (TAIL X) \\PROCESS.GO.TO.SLEEP (HEAD PREV PQUEUE PROC FROMFX) \\TEXTCLOSEF-SUBTREE (PC) -XCL::%DEFINE-TYPE-PUTDEF (XCL::DEFINITION) \\KEYNAMETONUMBER (X I N Y) MB.NB.SIZEFN (WIDTH HEIGHT -BUTTONX ITEM CURX BUTTONY CURY BUTTONINFO LINE BOX) \\GCRECLAIMCELL (TYPE CODE PTR INDEX VAL DONEXT -FINAL DTD PTRFIELDS) FULLNAME (RECOG) ERROR! (NFX FX) \\HCPYMODEDSPPRINTCHAR (CC TABWIDTH) -CL::%COMPLEX-NSUBST (CL::TEST-RESULT) INSPECT/TOP/LEVEL/LIST (X I) SEDIT::UNDO-LIST-REPLACE (SEDIT::SUBNODE -) RESET.INTERRUPTS (|PermittedInterrupts|) CHECK/MENU/IMAGE (IMAGE SCREEN DSP) \\MEDW.CREATEW ( -DISPLAYDATA WINDOW) \\ILLEGAL.DEVICEOP (I) BRACKET.CURRENT.WORD (INSPACES LASTCOL WSTART FIRSTCOL BUF) - SI::INTERNAL-THROW (I) \\NSRANDOM.TRUNCATEFILE (CURRENTEOF NEWEOF SESSION ERROR ATTRS) -\\PROC.FINDREALFRAME (I) ADDNEWCOM (NEWCOM TAIL OLDCOM) DEFINEFONT.IP (ID N FRAMEVAR) CL:TYPE-OF ( -CL::TYPENAME) DELFROMCOM1 (TEM VAL) \\BLT (I) \\PSWOP.SELECTED (VALUE) \\GCSCAN2 (PROBE) \\GCSCAN1 ( -ENT PROBE) FETCHFIELD (DATUM) BRKDWNFBOXES (BDZ BDY BDN) COMP.FLOATUNBOX (NUM) KNOTLINE (I PREVX PREVY - KNOTS CURRX CURRY ALINE ALIST) \\PUTBASEBYTE (BYTE DISP) WHATIS (TEM UCASE) PRINTCONSTANT (X) -\\FTP.FLUSH.TO.EOC (CH) PACKFILENAME.STRING (VAR VAL I HOST DEVICE DIRECTORY SUBDIRECTORY -RELATIVEDIRECTORY NAME EXTENSION VERSION TEMPORARY TEMP) COMPILEUSERFN (TEM) GRAPHOBJ.DISPLAYFN (BOX -REG) CL::%SIMPLE-NSUBLIS (CL::PAIR) IDLE.BITMAP (BITMAP BOX DSP) \\TFBRAVO.INIT.PARALOOKS (LM 1LM -VALUE) CONVERT-AFM-FILES (FL AFM-FILE WEIGHT SLOPE FONT FILENAME) \\10MB.GETPACKETSTATUS (STATUS) -\\CLOSEF.PRESS (PDSTREAM FDE DESCR I DDRECORD) \\CLEARXIPHEADER (XIP) PRINTFILETYPE (FILE TYPE) -PFI.PASS.COMMENT (CH) TRACE (CL::FNS) CH.DELETE.OBJECT (OBJECTNAME) \\ADDBASE (NH NL D XH XL) -TWODINSPECT.MAKEREGIONS (COLUMNWIDTHS XCL:*PROFILE* VERTMARKS I MARK HORZMARKS COLUMNWIDTH) EDITFINDP -(PAT) \\RETURN (X) INVERT.LONG.SEGMENT (START END ROW COL) COMP.LOOKFORDECLARE (EXPS Y DECLS) -\\NSPRINT.ENQUIRE (PRINTER) TWODINSPECT.ADJUSTSELECTION (SELBOTTOM ROWPROP VMARK SELWIDTH XCL:*PROFILE* - SELLEFT COLPROP HMARK) \\POP.N.UFN (NEXT VAL LEN) DSPRUBOUTCHAR (STREAM CHAR TTBL X Y) \\KEYACTION1 ( -DEAD CODE SHIFTDEAD SHIFTCODE ACT ALTGRCODE) TWODINSPECT.ARRANGEWINDOWS (TITLEHEIGHT ROWPROPWIDTH -TWHEIGHT RWWIDTH DWHEIGHT TOTALHEIGHT DWWIDTH TOTALWIDTH TOTALRIGHT TOTALTOP DWLEFT DWBOTTOM) -POSTSCRIPT.GETFONTID (FONTID) PAINTW.READ.AND.SAVE.SHADE (SHADE) \\SLOWTIMES2 (X Y) -FB.MAYBE.INSERT.FILE (N NEWDATA FILEINFO FULLNAME FILE-UNCERTAIN VERSION CRDATE CRDATE2 NEWNAME -NEWITEM TAIL SPEC) \\TEDIT.DELETE (LEN OLINE1 OLINEN TEXTLEN TOPLINE THISW LINES\\DELETED) -DETACHWINDOW (OLDFN) RECORDTRAN (DEF DECLST EXPRESSIONTYPE TAIL FIELDNAMES TRAN DEC TEM2 USINGTYPE -USING TL FIELDS.IN.CREATE USINGEXPR UNUSED TEM RECORD.TRAN) UNTRACE (CL::FNS) SHOWSTACKBLOCKS (SCANPTR - IVAR I) ADDTOCOM (TEM PROP) CLISPIF2 (TEM1 TEM2 TEM3) MB.NB.WHENOPERATEDFN (BUTTON SIDEFN) DINFO ( -GRAPH MONITORLOCK) \\SLOWDIFFERENCE (X Y) PROCESS.BACKTRACE (WINDOW REGION DSP PLACE STKP) -FB.FINISH.COMMAND (M) \\GR.METHODEXPANDER (DEF RVAR) \\SLOWPLUS2 (X Y) COPY.SEGMENT (TAIL) WFROMMENU ( -WINDOW) COMP.TOPLEVEL.COMPILE (COMTYPE ARGS DEF PIFN FRAME TOPFRAME ARGVARS ALLVARS TOPLAB CI X ALAMS1 -) INVERT.SEGMENT (LINE MODE START END) MSCOMMAND (TEM SET) CL::%COMPLEX-NSUBLIS (CL::PAIR) -HRULE.IMAGEBOXFN (THICKNESS) SPYOBJ.IMAGEBOX (FONTSOURCE) READATABASE (NAME FN TAB NEWREL) -\\PUTBITS.UFN (SHIFT MASK X) \\FILLINXIP (EPKT LENGTH) \\SLOWIQUOTIENT (HX LX X HY LY Y SIGNQUOTIENT -SIGNREMAINDER LZ CNT HZ) SAMECLOOKS (F) MAKEHARDCOPYMODESTREAM (IMAGETYPE) SAVESET (OLDVAL PTR FLG TEM - NEWFLG) \\CHARWIDTH.PRESS (CHARCODE) RIGHTW.REPAINTFN (WINDOWREGION ROWPROP MARK STARTROWPROPS -STARTVERTMARKS LASTROWPROP XCL:*PROFILE* VERTMARK) PRINTXIPROUTE (CSECS) TTY/EDITE (EDITCHANGES TEM -EXPR) SEDIT::FIND-SELECTION (SEDIT::START) \\SLOWHDCPYBLTCHAR (ROTATION NEWX CURX LEFT RIGHT PILOTBBT -DESTBIT WIDTH SOURCEBIT SOFTCURSORUP DISPINTERRUPT YPOS HEIGHTMOVED CSINFO) CH.CREATE.OBJECT ( -OBJECTNAME) COMPILER::META-EVAL-CALL (COMPILER::NODE COMPILER::ARGS COMPILER::ARG COMPILER::LIST-OF-VALUES - COMPILER::TRANSFORM) /DREMOVE (Z Y) MOUSECONFIRM (PROMPTSTRING WINDOW PWINDOW DON\'TCLEAR/MAINW -LEFTDOWN) |\\PFInitFileDescriptors| (|volNum|) CL::BOA-ARG-LIST-WITH-INITIAL-VALUES (CL::ARG-TAIL) -SEDIT::BUILD-NODE (SEDIT::SUBNODES SEDIT::TAIL) \\SLOWQUOTIENT (X Y) UNION (ELT TAIL HEAD) BAKTRACE ( -FILE FN POS N) COMP.ASET (DECL) SEDIT::MARKASCHANGEDFN (SEDIT::CONTEXT) \\SLOWLRSH1 (HI LO X) -ATTACHEDWINDOWS (ATTW) MB.MARGINBAR.SELFN (OL1 OLN OR L1 LN R TAB TABX TABS) EDITF (EDITFX FNTYPE) -IREMAINDER (HX LX X HY LY Y SIGNQUOTIENT SIGNREMAINDER LZ CNT HZ) \\TEDIT.TEXTBIN.STRINGSETUP (OFFST) -READOCT (STR CHAR N) \\MAKEPCTB (PLEN) FIX89A (X POS) FB.CANONICALIZE.PATTERN (SAMPLEHOSTEND -LASTPATDIR) |\\PFCreateVols| (|vol| |volNum|) SEDIT::FIND-SELECTION-BACKWARDS (SEDIT::END) -GRAPHOBJ.PUTFN (GRAPH) FB.OPERATE.ON.FILES (LDFLG FN FORMS) ROMANNUMERALS (CHARS NUMBER) -\\TEDIT.WINDOW.OPS (Y OPERATION) \\CREATEW1 (WINDOW) ONED.TRACKCURSOR (SELECTEDELTBOTTOM -SELECTEDELTLEFT SELECTEDELTWIDTH SELECTEDPROP X Y PROP MARK WIDTH BOTTOM NEWPROP LEFT SELECTION) -EDITDEF (TYPE) ATTACHWINDOW (MAINW ATTACHW EDGE POSITIONONEDGE) \\SLOWLOGXOR2 (XH XL X YH YL Y) -\\SLOWLLSH8 (HI LO X) CL::STRUCTURE-SLOT-NAMES (CL::NAMES) INFILEPAIRS (X Y) LSH (X) \\SLOWLLSH1 (HI -LO X) DELETE.LONG.SEGMENT1 (NROWS FIRSTLINE NEXTLINE) MSTRYSPELL (PTR) APPENDTOVAR (TYPE VAL -ADDED-NONLIST? OP) DUMPDATABASE (DUMPTABLE DUMPEDFLG) YSECT (DUDY DXDV X Y) \\ROUTE.XIP (NDB ROUTE PDH -) UNSAVEBLOCK? (ENTRIES) \\SLOWIDIFFERENCE (HX LX X HY LY Y SIGNX) \\UPDATE.PROCESS.WINDOW (P NAME -OLDBUTTONFN) \\CHANGECHARSET.HDCPYDISPLAY (OLDWIDTH W SCALE I) TMPSUBFN (NX C I N) HEXSTRING (LEFT I -CHAR N) GRAPHOBJ.IMAGEBOXFN (GRAPH HALIGN VALIGN REGION ALNODE) \\AB.NEXT (ABHI ABLO PW ABADDR -SIZE.WORDS SIZE) \\SLOWIPLUS2 (HX LX X HY LY Y SIGNX) COURIER.READ.STRING (I) ADDTOVAR (TYPE PAIR VAL -ADDED-NONLIST? OP) TEDITFROMBRAVO (TEXTOBJ USER.CM.ALIST OLDPLOOKS USER.CM.PARALOOKS USER.CM.CHARLOOKS - START CURRENT.PARAGRAPH NEXTPARAPTR SMALLEST.MARGIN) PAINTW.READBRUSHSHADE (SHADE) -BRHC/LAYOUT/DAUGHTERS (D GN LST/DCENTER 1ST/DCENTER TTC BTC OFFSET) TEDIT.DELETE (SEL) \\UNBOXFLOAT2 ( -NEXT Y X) FB.COPY/RENAME.MANY (PREFIX FIELDS HOST DIR DEVICE FIRSTDATA ITEM SUBDIR RETAIN FILELIST -OLDNAME) \\TEDIT.COPY.PIECEMAPFN (PC OBJ COPYFN NEWOBJ) \\BITBLT.IP (DESTINATIONREGION SOURCE-REGION) -EDITH (X LINE COMS TEM Y) EDIT* (TEM) ONEDINSPECT.ARRANGEWINDOWS (TITLEHEIGHT ROWPROPWIDTH RWWIDTH -DWHEIGHT TOTALHEIGHT DWWIDTH TOTALWIDTH TOTALRIGHT TOTALTOP DWLEFT DWBOTTOM) \\TEDIT.TEXTBIN.FILESETUP - (PF FPOS CH) SHRINKW (WINDOW) CLISPIF (UNDOSIDE UNDOSIDE0 LISPXHIST UNDOTEM TEM) CREATEW1 (REGION -SCREEN REG WINDOW) EDITDEFAULT (EDITY EDITX EDITZ) BURYW (WINDOW) GRAPHOBJ.GETFN (IMAGEOBJ) EDLOC (EDL -) \\COURIER.CHECK.PROCEDURES (FNDEF INFO N ARGS RESULTS ERRORS) %ASET2 (BOUND0 BOUND1 OFFSET) -SEDIT::STRINGIFY-LIST (SEDIT::SUBNODE SEDIT::STRINGS SEDIT::DOT) COMP.AREF (DECL) \\SLOWIGREATERP (HX -LX X HY LY Y) |\\PFCreateFileDescriptors| (|volNum|) LINEY (X) METASHIFT (OLDSETTING) EDITRAN (DEF -WORDS C1 TEM) MARKASCHANGED (REASON TYPE FN L) \\SLOWFGREATERP (SIGNX X HX LX EXPX Y HY LY SIGNY EXPY) - IFCDECLARE (TAIL) \\PAPERSIZE.IP (MEDIUM) MSPARSE (VAL OUTPUTFILE POSS Y SPELLING X RESPELL NEXTWORD -LASTADVERB PARSED CONJUNCTIONS RESETS LASTPARSED SEEKING S) \\SPP.CLEANUP (FN) \\SLOWLOGAND2 (XH XL X -YH YL Y) FIND-EDIT-LOCATION (EXPRS FOUND) %AREF2 (BOUND0 BOUND1 OFFSET) EDITNUMBERP (CHAR) +\COPYARRAYBLOCK (NEW OLD) CLEARBUF (LINBUF SYSBUF) DASSEM.DASSEM (CODE ARGS NARGS A X D LL FRAMENAME +VAR LOCALS FRAMES FREELST FREEVARS NLOCALS NFREEVARS CD CODELOC OP JL) OPENPOSTSCRIPTSTREAM (PAPER +IMAGESIZEFACTOR CLIP REG) PACK (ITEM PACK.INDEX X) COMP.GETBASEBITS (OFF) COPYALL (TAIL X NEW ORIG) +\MEDW.EXPANDW (MAINWINDOW IW USEREXPANDFN EXPANDREGION) WXOFFSET (CR) \ACCHARPOSLIST (HIWORD LOWORD X) + \SAVELINEBUF (NC) SET-PROFILE-INTERACTIVELY (PROFILE) \ADVANCE.ARRAY.SEGMENTS (NCELLSLEFT) +TTY.PROCESS (NEWTTY OTHER P TYPEAHEAD C FN) \LFINITCASEARRAY (C) \FM.EDIT-PREPARETOEDIT (POINTER) +\PAGEPAD.PRESS (PADDING) BRECOMPILE (FNS FILES TEM FILE FILE.COM CFILE DESTINATIONENV MSG AUXFILECOM +SCRATCHFILE COREOK X FILEMAPLST FNLST NOFIXFNSLST) \PFTransferFilePage (runLength PAGE-OFFSET +PAGES-LEFT) \NEW.MKATOM (TEMP) INVERT.SEGMENT (LINE MODE START END) \BYTELT (A) COPYHASHITEM (VALUE) +SETDISPLAYHEIGHT (NSCANLINES) \BYTESETA (A) \FAMILYCODE (TYPE LENGTH NEXT CODE I) +SEDIT::PLACE-CARET-AND-SELECTION (SEDIT::LINE SEDIT::LINEAR SEDIT::NODE SEDIT::INDEX SEDIT::I SEDIT::X + SEDIT::OFFSET) \CARET.FLASH? (CARET STREAM) FB.ANALYZE.PATTERN (SAMPLEHOSTEND PATHOSTEND N LASTPATDIR + STARTOFNAME PATTERN) WYOFFSET (CR) \WORDELT (A) COMP.STFIX (TYPE) \LEAF.STRIP.QUOTES (TAIL) +\LITATOM.EATCHARS (I J) \MEDW.SHRINKW (WINDOW ICONW TOWHAT ICONISBITMAP FN ICONPOSITION) CL:INTERN ( +NAME PACKAGE) INTERPRESSBITMAP (IPSTREAM W H ROTATION) CLISPACKUP (L-1 LL L1 TEM OPRFLG L2) +\3MBWATCHER (PACKET CNTR) CLISPIFYNOT (TEM1 TEM2) TTNTHLINE (N LINE) UnixShellQuote (C CT FLG) +SCALE/GRAPH (WIDTH HEIGHT N) MAKEBITTABLE (A I) COMP.FMEMB (A) EXCHANGEXIPS (TIMEOUT INXIP) +TEDIT.SETSEL (SEL TEXTLEN) COMP.EXPR (V M EXP X) SPY.MAKEGRAPHNODES (BORDER X VAL) \NSFILING.HOSTNAMEP + (FULLHOSTNAME FILINGNAME DEVICE) ONEDINSPECT.SELECTITEM (SELECTEDPROP PRP SELECTEDELTBOTTOM VMARK +SELECTEDELTWIDTH XCL:*PROFILE*) TB.ITEM.UPDATABLE? (ITEM) SEDIT::OUTLINE-SELECTION (SEDIT::MAXX SEDIT::LINE + SEDIT::MINX) \LEAF.REPAIR.BROKEN.PUP (NEWCONNECTION DATA) \CARET.SHOW (DS) \SETFATSYNCODE (TABLE) +\FM.EDIT-ITEM (BUTTONS MOUSEX MOUSEY ITEM REGION CHCODE) \BCPLSOUT.PRESS (N I) SCANX (Y YDX2 DY2 XL XR +) CLISPFOR3 (TEM) FB.CHECK.NAME.LENGTH (TAIL PREVTAIL) \SHOW.ARRAY.FREELISTS (SIZESLST TABLE FBL +ABLOCK TOTAL ARLEN X SAFENTRY BKTI) FILEPOS (STRBASE STRINDEX PATLEN STR STARTBYTE ORGFILEPTR ENDBYTE +LASTINDEX FIRSTCHAR STARTSEG ENDSEG BIGENDBYTE PATINDEX CHAR) \FM.EDIT-FINDNEXT (I) +\M44DOEXTENDVMEMFILE (NP I LASTPAGEREAD LASTPAGEOFFSET LASTFULLPAGE EXTENDED) SHRIEKIFY (CARTEST +RESULTP) SHOW.PRESS (ELSTREAM CNT) XTOUSTRING (CHARCODE SINDEX I) CLISPFORVARS1 ($TAIL) +\STREAMCHARWIDTH (CHARCODE WIDTHSVECTOR CC TABWIDTH NEWXPOSITON) \PFPutFileMapPage (vol) \EXTENDISFMAP + (LASTMAP LASTPAGE) REMOVEPROMPTWINDOW (PWINDOW MAINWINDOW) \TEDIT.UNPARSE.PARALOOKS.LIST (PROP +PROPNAME METHOD NEWLOOKS) TEDIT.SETFUNCTION (RTBL CHARCODE) NSNAME.TO.STRING (NSNAME) +\NSFILING.ERRORHANDLER (FULLNAME POS HANDLE OLDPTR NEWSTREAM CON FAILCNT) FFILEPOS (PATBASE PATOFFSET +PATLEN PATTERN ORGFILEPTR STARTOFFSET EOF ENDOFFSET STARTSEG ENDSEG BIGENDOFFSET LASTCHAR CHAR INC +CURPATINDEX) \FTP.GETFILEINFO.FROM.PROPS (TMP) \TEDIT.GET.TERMSA.WIDTHS (I) \PARSEARRAYSPACE1 (ROVER) +\SETUP.FFILEPOS (I CHAR LASTD2 LASTMATCHPOS J P) COMP.NUMBERCALL (TMP TYPE 2FN A N) UnixTempFile (file + unix i) \SPP.DUPLICATE.REQUEST (INSTREAM CONNECTION) TEDIT.GETFUNCTION (TABLE CHARCODE) +PSCFONT.READFONT (FID W C) \FILLRTPPUP (PUP) TEDIT.NORMALIZECARET (TEXTOBJ) POSTINITARRAYS (VP) +\ECHOCHAR (C) COMPILER::GENCODE-TAGBODY-INLINE (COMPILER::SEGMENT) TB.CLOSE/SHRINK (HOW?) +TEDIT.MAPPIECES (PC CH# I) SPY.MAX (MAX) \TEDIT.COPYINSERTFN (INSERTION) \INTERPRETER1 (HEADER NT +NILSTART ARG ARG# NT1 NT2 *TAIL*) \BSP.TIMERFN (PUP) TEDIT.FIND (TARGETSTRING SEL START# TARGETLIST X +RESULT1 RESULT) SEARCHPRETTYTYPELST (X FLG) \SMASHLINK (CALLER ALINK CLINK BLINK) COMP.NUMERIC (2FN +TMP TYPE A N V) MSCLOSEFILES (X) \STACKARGPTR (P FX) \ENTITYEND.PRESS (ELSTREAM DLLENGTH) \FILLBUFFER +(CHAR PEEKEDECHOED RAISEDCHAR TCLASS RSNX) BCOMPL (FILES) TWODINSPECT.DOWINDOWCOMFN (COM) +\STARTDISPLAY (OLDWINDOWS) SEDIT::EDIT-HELP (SEDIT::ARGS) CL::%%RATIO-PRINT (CL::PR) \MEDW.MOVEW ( +WINDOW OLDSCREEN OLDCLIPREGION OLDLEFT OLDBOTTOM OLDWIDTH OLDHEIGHT POS FN REG LFT BTM OPEN? MFN +NEWREGION SOFTCURSORUP DISPINTERRUPT NEWCLIPPINGREGION NCB OCB OCW NCW OCH NCH NCL OCL OCR NCR OCT NCT +) \INTERPRETER-LAMBDA (ENV) COURIERPROGRAM.PRETTYPRINT (EXPR) FB.HANDLE.ABORT.BUTTON (PROC) +TB.FIND.SELECTED.ITEM (I) SEDIT::COMPUTE-POINT-POSITION-LIST (SEDIT::SUBNODE SEDIT::ITEM) NEWFAULT1 ( +FAULTZ) CHARWIDTH (TEMP) ICMLARRAY.DISPLAYSLICE (I) FAULTAPPLY (%%LEXICAL-ENVIRONMENT%% DEF TRAN +TRANFN) COMP.COMPARENUM (V1) DSPBACKUP (DISPLAYSTREAM BLTWIDTH XPOS FONT ROTATION) \UNPACKDATE (D SEC +MIN ZONE FRAC HR DQ TOTALDAYS DAY4 YEAR4 YDAY WDAY DLS CHECKDLS MONTH) BRECOMPILE3 (DEF FILEDESCR +STREAM Y) PROMPTPRINT (I) \CreateScreenBitMap (MAXPAGE# I) \SETUP-COMPILED-CLOSURE-CALL (OLDBF +INTERPBF INTERPIVAR INTERPALINK SLOWP INTERPCLINK STKEND NACTUALS NA NEWFX SP NPVARS ENV) +\TEDIT.PRIMARYW (WINDOWS WINDOW) \TEDIT.FORMATTEDP1 (LEN DESCPTR NPIECES PASSWORD) \STOPSCROLL? ( +WINDOWFN) \PRINTFMAP (ISFMAP START END VDA OFF) \FILLINSPP (BASE) DISPLAYNODELINKS (TONODEID TONODE +FROMNDID FROMND) \LEAF.USE.NEW.CONNECTION (PUP UNSENTPUPS OPCODE DATA OLDSTREAM AFFECTEDFILES +BUSYFILES GOODPUPS BADPUPS STREAM RESENDPUPS) SPY.MERGEINFO (X) TERMX (Y X) \POSTSCRIPT.NSHASH ( +MAPPING) MAKEKEYLST (TEM X KEYSTRING I) \3MBSENDPACKET (PACKET S) \FIXP.FROM.FLOATP (X HI LO SIGN EXP) + \PROMPTWINDOW.OPENFN (MAINW PWINDOWPROP) \PARSE.REMOTE.FILENAME (FIELDS QUOTEP TAIL VALUE HOST DEV +DIR NAME EXT VERSION) InstallUnixPrinter (type x) CLISPFOR2 (LST) \TEDIT.READTABLE (CH CL FN) +CL::%%COMPLEX-ABS (CL::X) \NSFILING.WHENCLOSED (SESSION STREAMPAIRS PAIR DEV) DOMAINWINDOWCOMFN (MAINW +) \PACKDATE (DAYSSINCEDAY0 YDAY YR HR) XCL::MAKE-VARIABLE-DEFINITION (XCL::DEFINITION) MAKEFILES (TYPE + FLG OPTIONS FILE) \IDATESCANTOKEN (CH RESULT) \DSCCOUT (CC) ARGLIST (DEF) \DSPFONT.IP (OLDFONT FONT +FRAMEVAR) \CREATEDISPLAY (FDEV) WFROMDS (DD DS HINTW WINDOW) FB.EDITLISPFILE (ROOT) CLISPFOR0A (I.S.) +ASKUSEREXPLAIN (TEM) COMP.SHIFT (FNS N) \FTP.UNPACKFILENAME (HOST DIR DEVICE NAME EXT PLIST) +\FREESTACKBLOCK (SCANPTR EASP FREEPTR FREESIZE WANTEDSIZE) ONEDINSPECT.REDISPLAY (ELTPROPS ELTS +ELTBOTTOMS VMARK PROP XCL:*PROFILE* ELTWIDTH ELT BOTTOM) CLEANUP (FILES OPTIONS TEM1 TEM2) +\MEDW.CLOSEW (SOFTCURSORUP DISPINTERRUPT NEXTW) COMPILER::TRANSFORM-GET/PUT-BASE ( +COMPILER::LITERAL-OFFSET-VALUE COMPILER::COMPUTED-OFFSET-TREE COMPILER::REAL-BASE) CLISPELL ( +RESPELLTAIL TEM VAL) \SETUP-ENVIRONMENT-CALL (LOCNARGS NACTUALS ENV CODE NA NEEDEDSIZE ARGSTART +UFNIVAR FREESIZE SZ UFNNEXT STKEND NEWSTACK SLOWP IVAR SP NPVARS) MAKEALISTCOMS (ALISTNAME ATNAME +ENTRY) TEDIT.INSERT.OBJECT (CH# TEXTLEN PC NEWPC SUBSTREAM INSERTFN PCTB PREVPC) DISPLAYSTREAMINIT ( +TTYFONTHEIGHT TTYHEIGHT) SEDIT::CREATE-COMMENT-WORD-NODES (SEDIT::I SEDIT::OK? SEDIT::SUBNODES SEDIT::END +) \PFGetFileMapPage (vol) TEDIT.MAPLINES (LINE) \OUTDATE-STRING (I) \LEAF.READFILENAME (REMOTENAME) +\START.PROCESSES (PQUEUE PROC FROMFX) \NSFILING.GET.STREAM (PAIR STREAMPAIR) BSP.PUTINTERRUPT (PUP) +CHAT.EMACS.MOVE (DROW CCOLUMN) DRIBBLE (NEW-DRIBBLE-STREAM) CLISP3A (L) PROCESSWORLD (PQ P EXECPROC +BACKGROUNDPROC) CLISPCOND1 (TEM) \EVALVAR (VAL) CL:ATANH (CL::BOX) \COERCEASCIITONSFONT (CHARSETDIR +NSCODE CS I CHARSETINFO) ADD.PROCESS (FORM NAME VALUE PROP WINDOW PRIORITY AFTEREXIT BEFOREEXIT +TTYENTRYFN TTYEXITFN INFOHOOK RESTARTFORM RESTARTFLG CREATENOW SUSPENDIT USERPROPS I SYSTEMP PROC) +\MEDW.OPENW (DD SOFTCURSORUP DISPINTERRUPT) CHANGEBACKGROUND (SHADE SCREEN WINDOWS) +PUTPROPS.PRETTYPRINT (EXPR PROP) TRIM.BITMAP (LEFT X RIGHT BOTTOM TOP NEW.BITMAP) \RUN.PROCESS (PREV +NEXT) SEDIT::CFV-LIST (SEDIT::LAST-INFO SEDIT::INFO SEDIT::P SEDIT::LAST-SUBNODE SEDIT::IWIDTH +SEDIT::PWIDTH SEDIT::PREV-TYPE SEDIT::NEXT-TYPE FIRST SEDIT::SEPR-INFO SEDIT::SET-INDENT? +SEDIT::INDENT-BASE SEDIT::BREAK? SEDIT::X SEDIT::SUBNODES) \OPENW1 (WINDOW) NEWPAGE.IP (CFONT ROTATION + XOFFSET YOFFSET HFONT) DISPLAYGRAPH (TRANS STREAM SCALE GRAPH LINEWIDTH NNODES NODEHASHTABLE) +\SPP.SYSPKT (XIP BASE) CL:ASINH (CL::BOX) \3MBGETPACKET (PACKET) SEDIT::SEDITE (SEDIT::NEW-EXPR) +\MOVE.WINDOWS.ONTO.SCREEN (W XFACTOR YFACTOR REG) KNOTLOOP (I PREVX PREVY CURRX CURRY ALINE ALIST) +CLISPFOR1 (BODYTAIL TEM Z LSTFLG BODY LST LST1) CL:ATAN (CL::Z) SEDIT::GET-MENU (SEDIT::MENU) +\RELEASE.PROCESS (FX OTHER WINDOW) \FTP.OPENFILE.FROM.PLIST (CONNECTION INS OUTS REMOTEPLIST FULLNAME) + FAULTEVAL (TEM TEM2) \ADDLEAFSTRING (LEAFLEN STRLEN STRBASE STROFF STRING NEWLENGTH PUPSTRBASE I) +CL::%%LCM (CL::X CL::Y) \FILLBSPPUP (PUP) COMPILEFILES0 (X OPTS RCFLG) PUTWINDOWPROP (WINDOW) CLISPAND + (TEM) OPENWINDOWS (WINDOWS SCREEN WINDOW) \ICONW.FORMAT.TITLE (LINE WASTED EXCESS I RESULT) COMPEM ( +FL) \LONUM (HI LO NUM) CL:ACOSH (CL::BOX) INITX (Y X) \PFPutAllocationMapPage (vol) \HINUM (HI LO NUM) + COMP.RPLACD (NEED-POP) SEDIT::INPUT-NORMAL-CHAR (CL:CHAR WHERE SEDIT::NODE) COLLECTKEYS (KEYLST) +BLOCKCOMPILE1 (ENTRIES TEM FN DEF COREFLG BLOCKLIST CALLTAGS TAGNUM BLKFNS) TB.REV.FIND.SELECTED.ITEM +(I) APPLY (DEF) ICMLARRAY.MENUW.SHOW (LEVEL LEVEL-ITEM I) TTNEXTPOS (LINE) \CREATELINEBUFFER ( +EOFMETHOD DEV) INVERT.BITMAP.VERTICALLY (Y X1) APPLY* (DEF I) \CLOSEW1 (WINDOW) LINEBUFFER-SKIPSEPRS ( +CH) \NEXTCONSPAGE (PG) \CKAPPLYARGS (ACNT PTR VAL) \INSPECT/CODE/REPAINTFN (XCL:*PROFILE*) CHAT.MENU ( +COMMAND) CL::%%GCD (CL::X CL::Y) TB.FIND.ITEM (I END INCREMENT PREDFN ITEM) CLISP4 (N FLG POS) +SEDIT::CREATE-COMMAND-TABLE (SEDIT::FN SEDIT::ENTRY) RECORDTRAN (DEF DECLST EXPRESSIONTYPE TAIL +FIELDNAMES TRAN DEC TEM2 USINGTYPE USING TL FIELDS.IN.CREATE USINGEXPR UNUSED TEM RECORD.TRAN) EDITFNS + (X) \MOUSE.PROCESS (OTHERMOUSE \OLDTTY) POSTSCRIPT.FONTSAVAILABLE (FONTSAVAILABLE FD S NF) +ICMLARRAY.MENUW.APPLY (I LEVEL DISPLAYGROUP) BULKDATA.GENERATE.NEXT (CNT) CLISPIF2 (TEM1 TEM2 TEM3) +\GR.METHODEXPANDER (DEF RVAR) TTGIVEHELP1 (X) \MAIKO.CONS.UFN (CNS.PAGE) \IRM.GET.REF (KEYWORD REFS +SAMEFLG REF) \TEDIT.INSPECTCODE (STREAM WINDOW SEL) SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::SUBNODES) + UPDATECHANGED1 (VAL) \DEQUEUE (Q) \MEDW.CREATEW (DISPLAYDATA WINDOW) \TEDIT.SHRINK.ICONCREATE ( +ICONTITLE) \SETSPACE.PRESS (ELSTREAM) \TIMER.PROCESS (PROC) SEDIT::BACKSPACE-LIST (SEDIT::NODE) +MAINWINDOW (MAINW WIN) INTERPRESSFILEP (STRM I) \DTSCAN (L) CL:COSH (CL::FZ) \LEAF.DIRECTORYNAMEONLY ( +N) \ISDST? (YDAY) SEDIT::GET-DESTINATION-CONTEXT (SEDIT::DESTINATION) CL:COUNT (END) SETXY.PRESS ( +ELSTREAM) CLISPCOND (TEM1 TEM2) COMP.LABELS (X) CL:COPY-READTABLE (FROM-READTABLE) BRECOMPILE1 (X ADR +Y) \DEFINEDISPLAYINFO (BUCKET) \LFExtendFileIfNecessary (minBackingFileSize) +INVERT.BITMAP.HORIZONTALLY (Y X1) \IRM.SMART.REF (POS KEYWORD TAIL) TWOD.TRACKCURSOR (SELECTEDROWPROP +SELECTEDCOLUMNPROP SELECTEDELTBOTTOM SELECTEDELTLEFT SELECTEDELTWIDTH X Y ROWPROP VERTMARK NEWROWPROP +BOTTOM COLUMNPROP HORZMARK NEWCOLUMNPROP NEWHORZMARK WIDTH LEFT SELECTION) \SETFVARSLOT (NT NTSIZE A +VARINFO) NSOCKETFROMNUMBER (SOC) CL:DECODE-FLOAT (FLOAT) DOCOLLECT (LST) PROG (VAR NVARS NNILS NTSIZE) + COMPILEUSERFN (TEM) EDITCOMS (COMS) CL:DECODE-UNIVERSAL-TIME (CHECKDLS TIME SEC MIN TOTALDAYS HR +LEAP400 DAYS LEAP100 LEAP4 YEAR YDAY WDAY DLS MONTH) TB.DISPLAY.LINES (ITEM HERE MAXXPOS EXTENTCHANGED + ITEM# EXTENT HWINDOW) FW-RECALL-CMD (FORGOTTEN-OFDS OFD RECALL-OFD) \TFBRAVO.WRITE.PARAGRAPH (LENGTH) + \PROG0 (HEADER NT NILSTART VAR VALUEOFF VAR# NT1 NT2 *TAIL*) PAINTW.CACHE.SHADE (ENTRY) +LINKPARAMETERS (TOPARAMS) CL:COUNT-IF (END) FINDFILE-WITH-EXTENSIONS (HASEXTENSION HASDIRECTORY EXT +VAL DIR DIR&FIELDS) PRINTLEVEL (CDRVAL CARVAL) \INITCONSPAGE (CELL J) GREETFILENAME (FILE USER D) +\UPDATE-WHO-LINE-ACTIVE-FLAG (ENTRY) CL:DELETE-IF (END) \ALLOCMDSPAGE (VP VPTR) \NSFILING.EVENTFN (S) +ICMLARRAY.MENUW.GETLEVEL (LEVEL I NEWVALUE) TTY/EDITL (COMS EDITHIST0 EDITIME0 TEM2 TEM1 L MARKLST +UNDOLST UNDOLST0 UNFIND) CL:DELETE-IF-NOT (END) CLISPFOR (UNDOSIDE UNDOSIDE0 LISPXHIST UNDOTEM TEM) +\INVALIDATE.PROCESS.WINDOW (OLDBUTTONFN) \EVPROG1 (*TAIL*) DELETE/AND/DISPLAY/LINK (FROMND TOND) +SEDIT::UNDO-COMMENT-CHANGE (SEDIT::WORD SEDIT::SUBNODES SEDIT::SUB-NODE-INDEX) CL:DELETE-DUPLICATES ( +END) LASTN (X Y L) \SMASHRETURN (CALLER FX DESTPROC) \INSPECT/CODE/RESHAPEFN (WHEIGHT BOTTOM) +TEDIT.DEACTIVATE.WINDOW (MENUW) CreateCursorBitMap (BASE I) DSPRUBOUTCHAR (STREAM CHAR TTBL X Y) +\FIXLINELENGTH.PRESS (LLEN) \GET.PRIORITY.QUEUE (HEAD PREV PQ) GO (GOTAIL FIRSTARG FRAME) EDITL0 ( +COPYFLG) CL:DIRECTORY (GENERATOR FILE) \SPP.SENDPKT (SEQNO) EVALA (TMP NVARS NNILS NTSIZE) +\TEXTMENU.SET.TOGGLE (OBJ PC WINDOW) PFI.MAYBE.PP.DEFINITION (ENV) \SET.PROCESS.NAME (NEWNAME I) +CLISP3C (TEM) \EVALA (HEADER NT NILSTART PAIR VAR# NT1 NT2 VALUEOFF) NUMBERPAD.READER.HANDLE.CHAR ( +TOTAL POWER) DISPLAY/NUMBER/READER/TOTAL (NCHARS DECPOS NAFTERDEC STR I) CHECKCONSPAGES (CPAGE) +CL:COUNT-IF-NOT (END) INVERT.LONG.SEGMENT (START END ROW COL) \PEEKNS (HOST) \MAPMDS (TYPE TYP VP I) +COURIER.WRITE.BULKDATA (SEGMENTLENGTH TAIL LEN) \CHECKCONSPAGE (CNT NXT) EDITFB (FL) +DASSEM.CLEANFNTEST (FN) FTP.BREAKCONNECTION (CONN HOSTS) SMASHFILECOMSLST (NAME) CURSOR (OLDCURSOR +NEWCURSOR) DRAWMARGINSCALE (X NOMX) \ETHEREVENTFN (NDB DB TURNOFFNS TIMESET) CL:ENCODE-UNIVERSAL-TIME +(YEAR YDAY DAYSSINCEDAY0 I HOUR) MODERNWINDOW.UNSETUP (RENAMEDORIG) COMPILER::EXPAND-OPENLAMBDA-CALL ( +COMPILER::SUBST-ALIST COMPILER::UNSUBBED-ARGS) SEDIT::ASSIGN-FORMAT-LIST (SEDIT::P SEDIT::LAST-SUBNODE + SEDIT::FORMATS SEDIT::SUBNODES) ERRORSET (SI::NLSETQ-VALUE) TITLEDICONW (BREAKCHARS FONT OPERATION +BITS REG MASK FORMATTED WIDTH X HEIGHT ICONW TITLESPEC) PRINTLINE (CH CHNO) OPT.OPTCHECK (B P CD) +CL::%%RATIONAL-FLOAT (CL::MANT CL:EXP) \LFRemoveDirEntry (NEWENTRYSIZE) UNDOEDITL (X) +SEDIT::SIMPLE-STRING-SCAN (CL:LENGTH SEDIT::INDEX SEDIT::CWIDTH SEDIT::OFFSET) \PRINT-USING-DEFPRINT ( +FN) \TEST.PARAGRAPH.LOOKS (CHAR VALUE NONEMPTY PROPERTY) CL::%%RATIONALIZE-FLOAT (CL::XNUM CL:EXPT +CL::SIGN CL::HI CL::LO CL::R CL::XDEN) \KEYHANDLER1 (PERIODCNT CURSORX CURSORY MOUSESTATE OLDU OLD2 +WPTR OLD0 OLD1 OLD3 OLD4 OLD5 OLDFAKEU LOOPCNT) COMPILER::ENSURE-EFFECT-CONTEXT (COMPILER::A +COMPILER::CALL-ARGS COMPILER::LAMBDA-PARAMS COMPILER::LAMBDA-ARGS COMPILER::N) \PRINSTACKP (X) +MSUPDATE (TEM PRFLG DATA ERS) SEDIT::FIND-NODE (SEDIT::LINEAR-ITEM SEDIT::CURRENT-X SEDIT::LINEAR-POINTER + SEDIT::NEXTX) \PRINSTRING (C) SETQ (*TAIL*) \TEST.CHARACTER.LOOKS (CHAR VALUE VALFLAG PROPERTY TEM) +DOFILESLOAD (DIRS LOADOPTIONSFLG FILE FULL FN EXT WORD FORCEDEXT? NOERRORFLG) COMP.TAGBODY (F TAGS X) +\SPY.INTERRUPT (FRAME) LET (VAR NVARS NNILS NTSIZE) FB.HARDCOPY.DIRECTORY (MAINFONT TITLE PAD FILES +ITEM FDATA MAXNAMEWIDTH COLUMNSPECS SPEC PROTO DATEWIDTH INDEX INFOLMARG PAIR LABEL W FIRSTINFOCOLUMN +FILEINFO HERE NEXT INFO) \CKPOSSOUT (I) XYSECT (DUDY DXDV X Y) AND (*TAIL*) CLISP3 (L TEM FLG OPR) +\LET0 (HEADER NT NILSTART VAR VALUEOFF VAR# NT1 NT2 *TAIL*) \AB.BACK (ABHI ABLO PW ABADDR SIZE) +\LEAF.ERROR (ERRCODE MSG) TTRACKMOUSE (OLDROW OLDCOL CURSORPOS ROW OLDY OLDX COL WIDTH CH BUF) +MAKEFILE (OPTIONS FILE ROOTNAME FILEPROP CHANGES FILEDATES FILETYPE SOURCEFILE REPRINTFNS Z TAIL OPT) +\LITPRIN (PKG PKGSEPR C WAS-ALPHA) MAP.PROCESSES (P) \LET* (HEADER NT NILSTART VAR VAR# VALUEOFF NT1 +NT2 *TAIL*) TEDIT.CARETLOOKS (CHARLOOKS) SEDIT::PARSE-INDENT-GROUPS (SEDIT::CURIN) COND (VAL *TAIL*) +SEEFILE (FILE CH I) LET* (VAR NVARS NNILS NTSIZE) CL:FILL (END) SEDIT::FIND-LINE-START (SEDIT::NEXT-LINE + SEDIT::LINE) TB.REPLACE.ITEMS (BROWSER N ITEM FIRSTSEL) \EVPROGN (*TAIL*) COMP.RETURN-FROM (DATA +BLOCKFRAME CTX) MSUPDATEFN1 (X DEF) PUTSTREAMPROP (OLDVALUE TAIL) \DURATIONTRAN (BODY Z L RESOURCENAME + USINGTIMER TEMP TIMERUNITSLST FORDURATION SETUPFORM EXPANSION OLDTIMER Y) PROG1 (*TAIL*) +CHECKFORCHANGED (UPDATEALL) FIX89A (X POS) ROTATE.BITMAP.RIGHT (NEW.BITMAP Y X) ENDLOADUP (X) FGETD ( +FN) TB.RECONSIDERRANGE (ITEM I) INSTALL-PROTOTYPE-DEFN (PROTOTYPE-TYPE) \LFReturnInfo (ATTRIB INFOVAL) + MSSOLVE (REP ND OSET QT) CLISPIF (UNDOSIDE UNDOSIDE0 LISPXHIST UNDOTEM TEM) INVERT.BITMAP.DIAGONALLY +(NEW.BITMAP Y X) \CURVE (OLDX OLDY SOFTCURSORUP DISPINTERRUPT X Y DX DY DDX DDY DDDX DDDY OOLDX OOLDY +DELTAX DELTAY DELTA TX TY I) EDITL1 (EDITHIST UNDOLST1) CL:FIND-IF (END) \SUSPEND.PROCESS (PQHEAD PREV + LAST NEXT OLDEVENT EVENT) RECORDPRIORITY (TRAN PREV) FIND-EXTERNAL-SYMBOL (STRING) SPP.DSTYPE (EPKT +CONDITION) TB.SET.FONT (FONT HEIGHT ASCENT ORIGIN TOTALHEIGHT HW EXTENT FN) PROMPTINWINDOW (HGHT WDTH +PREVTTY READSTR) COMP.RETURN (PROGFRAME) PROCESS.RESULT (PROCESS) \POSTSCRIPT.SPECIALFONT.SCALEDWIDTHS + (TYPEFONT FONTFILE) COMPILER::COMPLETELY-EXPAND (COMPILER::NEW-FORM COMPILER::CHANGED-P) +ROTATE.BITMAP.LEFT (NEW.BITMAP X Y) \LITPRIN.INTERNAL (NESCAPES FIRSTESCAPE USEMULTESCAPE CHECKESCAPE +C CASEBASE SA WAS-ALPHA SYN FIRSTFLG) SEDIT::EVAL-SELECTION (SEDIT::VALUE) +%%BROADCAST-STREAM-DEVICE-CHARSETFN (S) TEDIT.COPY (PCLST REPLACING TOLEN INSERTCH# UNDOCHAIN LEN PC +OBJ AFTERCOPYFN EVENT) TEDIT.KILL (STREAM TEDW TEDPROC) \LEAF.GETFILEDATES (INFOBLK START) LISTPUT (X +X0) \SPPWATCHER (ACTIVITY TIMER) ENVAPPLY (DEF) CL:FIND-IF-NOT (END) ENSURE.RGB (RGB) KNOTLINE (I +PREVX PREVY KNOTS CURRX CURRY ALINE ALIST) PROCESS-STATUS (STKI) \CONVERTTOFRACTION (RESULT BOX) +TB.SCROLLFN (HW) \FTP.NEXTFILE (INS PLIST NAME) \FUNCT1 (HEADER NT NILSTART VAR VALUEOFF VAR# NT1 NT2) + \GETFILINGCONNECTION (SESSION OLDSTREAM) \DOMOUSECHORDING (LRSTATE STATE REALUTILIN) GETDUMMYVAR (VAR +) \LFFindNextFile (ANOTHERENTRY ENTRYSTART VERSION NAMELEN CHARS FILENAME) PROCESS.FINISHEDP (PROCESS) + \MAKESTACKP (ED) \TRACKCURSOR (CURSORX CURSORY) COMP.GO (D) TWODINSPECT.MAKEREGIONS (COLUMNWIDTHS +XCL:*PROFILE* VERTMARKS I MARK HORZMARKS COLUMNWIDTH) TERM.RESET.DISPLAY.PARMS (TERM.STATE) +TB.CONSIDERRANGE (ITEM I) \SYMBOL.ESCAPE.COUNT (MULTESCAPE C SYN RESULT NESCAPES FIRSTFLG) NCHARS (C +NCHARCNT) \MAKEFUNARGFRAME (NVARS ENV NNILS NTSIZE) \TEDIT.BRAVOFILE? (PLOOKS ENDCONDITION NAME DIRS) +NOTIFY.EVENT (EVENT TAIL PROC SUCCESS) \DOBUFFEREDTRANSITIONS (R RPTR) \NUMERIC.PNAMEP (C LASTCHARTYPE + SEENALPHADIGITS SEEN-ILLEGAL-SYNTAX MAXALPHADIGIT SEENDECPT SEENDIGITS SEENTIGHTLETTERS SEENEXPONENT) + PROCESS.TTY (PROC) SEDIT::GET-CONTEXT (SEDIT::CONTEXT) STKAPPLY (DEF) MSSHOWUSE (DEF REALDEF ANYFOUND +) CALLS (FREES GLOBALS FNDEF EXPR FLG LAMFLG CALLSDATA) \SOUT (I) SI::UNWIND (RESETSTATE UNWINDER +CLEANUPFN FRAME) FRESHLINE (STREAM) \AB.NEXT (ABHI ABLO PW ABADDR SIZE.WORDS SIZE) +BRACKET.CURRENT.WORD (INSPACES LASTCOL WSTART FIRSTCOL BUF) RETEVAL (RETURNEE) +INTERACT&SHIFT.BITMAP.LEFT (NBITS) PRINTERRORXIP (XIP) TEDIT.CHARWIDTH (CH) RETAPPLY (RETURNEE DEF) +\INSERTCR (INPC) CL:GET-SETF-METHOD (CL::TEMP) TTRUBOUT (START) CL::BOA-ARG-LIST-WITH-INITIAL-VALUES ( +CL::ARG-TAIL) MENU.HANDLER (BOXY BOXX SUBMENUWINDOW OLDBOXX OLDBOXY ITEM MOUSEDOWN SUBMENURESULT +HELDSTATE HOLDTIMER LASTBUTTONSTATE) CL:GET-SETF-METHOD-MULTIPLE-VALUE (CL::TEMP) YSECT (DUDY DXDV X Y +) POSTSCRIPT.INIT (CLASS COPYFD OLDPSCFD x) CLISPIFY2D (TEM) BLIPVAL (I FLG P FRAME) MSCHECKEMPTY (CF +Q) GIVE.TTY.PROCESS (FN) \VAROFFSET (NAME TMP OFFSET) NSMAP (I) SETBLIPVAL (N I P FRAME) +\NSFILING.LOGIN (SERVERNAME SERVERNSNAME ADDRESS CREDENTIALS NEEDLOGIN STREAM PROBLEM LOGINNAME +SESSIONHANDLE PROGRAM OLDPROBLEM SESSION RANDEVICE) SPP.SENDEOM (STREAM) BLIPSCAN (A OFF FRAME) +PAINTW.READ.AND.SAVE.SHADE (SHADE) MSNOTICEFILE (TEM COMS FULL FILE) CL:INTEGER-LENGTH (INTEGER) +CH.CHANGE.ITEM (OBJECTNAME) EDITBF (PAT X LL Y) GETVARS (POS TEM L X) \TEDIT.PEEKBIN.NEW.PAGE (FILE CH +) \DSPFONT.PRESS (OLDFONT FONT CSINFO FDENTRY) \FTP.CLOSEFILE (C SUCCESS INS) PFI.MAYBE.SEE.PRETTY ( +OUTSTREAM INSTREAM) INSPECT (IWINDOW INSPECTINFO IMACRO) APPEND (N VAL) PRINTNUM-TO-STRING (WIDTH STR +RAD TEMP PAD) \SPP.PREPARE.INPUT (EPKT CONDITION NEW.DSTYPE OLD.DSTYPE SPPDSTYPECHANGEFN) +\NSFILING.UPDATE.ATTRIBUTES (X) EXPRP (DEF) EDITQF (Q1) \IPCURVE2 (SPLINESTEP HALFWIDTH SPLINEDIFF +DASHON DASHLST DASHCNT SEG# IPDATA LEFT RIGHT BOTTOM TOP VISIBLEP TT DELTA IX IY XT YT DUPLICATEKNOT +X'T Y'T DX DY XWALLDT YWALLDT NEWT NEWXT NEWYT XDIFF YDIFF PREVX IPXPOS PREVY IPYPOS KNOT#) LISPERROR +(MSG N I) OPT.DS1 (A CD) \STKARG (NT INDEX NARGS BLINK NTSIZE) WINDOW.BITMAP (BM) SEDIT::SET-POINT-COMMENT + (SEDIT::INDEX SEDIT::ITEM) MSGETDEF (TABLEFPTYPE FPTYPE RESULT REALDEF) INSPECTW.CREATE (XCL:*PROFILE* + VALUEMARGIN MAXVALUEWIDTH PROP WINDOW) MODERNWINDOW.BUTTONEVENTFN (TOPMARGIN CORNER ORIGFUNCTION) +TEDIT.INSERT.UPDATESCREEN (L1LIST LNLIST WW L1 LN SELINE) \SOFTCURSORPOSITION (DISPINTERRUPT) +\FTP.GENERATEFILES (TAIL HOST DIRECTORY NAME EXTENSION VERSION WANTDEVICE DEVICE OSTYPE FILTERNEEDED +DESIREDPLIST NAMEBODY INFO CONNECTION INS OUTS) NEWLINE.IP (NEWYPOS) \LEAF.FIX.BROKEN.SEQUIN ( +UNANSWEREDPUPS AFFECTEDFILES STREAM NEWCONNECTION STRM) CL:INTEGER-DECODE-FLOAT (FLOAT) XSECT (DUDY +DXDV X Y) PROCESS.WINDOW (WINDOW) CLISPIFY2 (POS) COMP.PROG (F A TAGS X FLG) \EVALFORM (TEMP *FORM*) +DISMISS (DTIMER NOBLOCK) COMPILER::GENCODE-LET (COMPILER::ARG COMPILER::PARAM COMPILER::NULL-PARAMS +COMPILER::NON-NULL-PARAMS) \NSFILING.CLOSEFILE (SESSION NEWHANDLE HANDLE INFO) +\NSADDRESS.PRINT.DECIMAL (NUM REM PIECES) FB.INFO.ITEM.NAMED (ITEM) \SETUP.TYPENUM.TABLE (HUNKSIZE +SIZEL TNAME DTNUMBER TYPE DTD I) \GC.HANDLEOVERFLOW (PTR CELL HY LY Y HX) SPP.CLOSE (CON SUBSTREAM +ABORT?) \REMOVE.EXTERNALFORMAT (NAME/EXTFORMAT EF) \TFBRAVO.HANDLE.HEADING (AFTERHEADINGPTR PARALOOKS +HEADINGDESC) PAINTW.READBRUSHSHADE (SHADE) RECLOOK (TEM X) \DRAWLINE.IP (HALFWIDTH) \DTEST.UFN (N HI +LO OBJ) WINDOW.MOUSE.HANDLER (\MHWINDOW \MHCOM \MHPROCESS) PFI.MERGE.INDICES (NEWINDEX MASTER) +GET.MENU.LIST (DIM) MSOUTPUT (FILE) FB.BROWSECOMMAND (FILE NAME TAIL INTERESTING FIELDS MAINDIR SUBDIR +) DUMMYDEF (X) \PFI.DO.HARDCOPY (FORM) TB.CONTIGUOUS.SELP (ITEM I) \BACKTRACE (RADIX CNT NAME BLINK +IPOS) \MAKENUMBER (N1 N0) \FTP.ADD.QUOTES (I PIECES N) \LEAF.HANDLE.INPUT (DONEPUP OPCODE ERROR +DONEPUPDATA STREAM) \INSTALL.EXTERNALFORMAT (NAME EXTERNALFORMAT) CL:LOGCOUNT (INTEGER) LINEY (X) +DREMOVE (Z L) CLISPIFY2C (X) BACKTRACE (FLAGS) CREATE.NUMBERPAD.READER (NUMBERPAD FONTHEIGHT WIN +READERWIDTH PADLEFT TOTALWIDTH MSGLINES TOTALREGION) COMP.LAMBDA (VALS SUBOLD VARS SUBNEW V VAR EXPS F +) \LFHighestVersions (FILES) \GET.EXTERNALFORMAT.FROM.NAME (NAME EF) EDIT%: (X LC) TB.NUMBER.OF.ITEMS +(BROWSER I) \GCMAPTABLE (PTR CELL HY LY N HX DTD I) GETVARS1 (X) DEFAULT.INSPECTW.PROPCOMMANDFN ( +NEWVALUE) OPENW (WINDOW) \INSERTCH (CHAR \INPC \INSTRING NEWPC NEWFLAG PC PLOOKS NLOOKS PCTB PREVPC +EVENT REPLACING TEXTLEN) SEDIT::CONVERT-COMMENT-TAIL (SEDIT::NSPACES X SEDIT::TAIL) \INTERPRETER (DEF +ENV ARGLIST NNILS NEXTRA NA NTSIZE I) OPT.DELCOPYFN (Z_P P X) TWODINSPECT.ADJUSTSELECTION (SELBOTTOM +ROWPROP VMARK SELWIDTH XCL:*PROFILE* SELLEFT COLPROP HMARK) PRESSWINDOW (WIDTH HEIGHT) +SEDIT::PARSE-STRING-INTO-WORDS (SEDIT::I SEDIT::OK? SEDIT::RESULT SEDIT::END) \TEDIT1 (TEXT) SAVEDEF ( +TYPE DEFINITION) \TEXTMENU.TOGGLEFN (NEWSTATE) COLLECTDESCENDENTS (Descendents) \DOTRANSITIONS ( +BITMASK I) \DSPFONT.HCPYMODE (OLDFONT XFONT) RECORDFIELD? (TEM X) SEDIT::CONVERT-COMMENT-STRUCTURE ( +SEDIT::COMTAIL SEDIT::2-STARS SEDIT::COMCHAR) \BSP.SENDBUFFER (NEWLO) LAPRD (X Y) VIRGINFN (REAL-DEFN) + \SPP.ESTABLISH (CON NAME INSTREAM) FB.GETALLFILEINFO (ATTR VALUE TREESIZE) SEDIT::REPAINT (SEDIT::MIN-Y + SEDIT::END SEDIT::LINEAR-START SEDIT::ITEM SEDIT::TEMP) \TEDIT.COMMAND.RESET.SETUP (OWINDOW +OTTYEXITFN OTTYENTRYFN TTYWINDOW OTTYWINDOW) \TEXTMENU.TOGGLE.CREATE (X Y BITMAP DS) DEFAULT.ADDNODEFN + (NODELABEL NODENAME) \PRINTFRAME (NLOCALS I TMP J FT) ONFILE (TYPES FILE TYPE X VAL F) +FB.FASTSEECOMMAND (FILELIST SEEWINDOW FILE) FIXCONTINUE1 (X) NCONC (J X L) TITLEW.BUTTONEVENTFN ( +TITLECOMMANDFN XCL:*PROFILE*) \LFFindInfo (FILE ENTRYSTART STREAM) \PRINTBF (NM I J) +TB.DECONSIDERRANGE (I) CH.ADD.ITEM.PROPERTY (OBJECTNAME) EDITCALLERS (EDITPATTERN ATOMS FULL +FILESTREAM ENV MAP TOP RDTBL CA PATTERNS FFILEPOSPATTERNS ATOM I PRINTFLG NOMAPFLG X Z FNS OTHERSFILES +) ONED.TRACKCURSOR (SELECTEDELTBOTTOM SELECTEDELTLEFT SELECTEDELTWIDTH SELECTEDPROP X Y PROP MARK +WIDTH BOTTOM NEWPROP LEFT SELECTION) COLLECT.CHILD.NODES (NodeID) SORT1 (L A TM) +HASH-TABLE-FOR-DOC-TYPE (DOC-TYPE) INTERPRESS.OUTCHARFN (CHAR-WIDTH NEWXPOS) \DECODETRANSITION ( +SHIFTED ASCIICODE) MERGE (A B ATAIL BTAIL) PROCESS.READ (OLDW) \SCANFORNTENTRY (NM NT1 NT2) +\NOTENEWICONPOSITION (ICONW) \LEAF.TIMEDOUT (PUP) SEDIT::DRAW-OUTLINE (SEDIT::H-1 SEDIT::H-2 SEDIT::W) + MAKENEWCOM (TYPE NAME TEM) SAVEONSYSRECLST (N DECL FIELD) TTYDISPLAYSTREAM (DISPLAYSTREAM WIN DD) +CLISPIFY1 (SUBPARENT PREVEXP NOVALFLG LST TEM TAIL0 TAIL SEG) TTPRIN1 (DOWNCASE WIDTH CH I CRLFCOUNT) +CL::%%ATAN-FLOAT (CL::FARG CL::FX CL::CONSTANT CL::ADD-FLAG CL::CONSTANT-FLAG) CHARACTER (N) +OPT.EQVALUE (CD) \PROCESS.EVAL1 (..PEV-RESULT..) \COMPUTE.HUNK.TYPEDECLS (HUNKSIZE I) +TB.COPYBUTTONEVENTFN (COPYFN SELECTIONREGION NEWITEM LASTX LASTY CURRENTITEM) COMP.SETQ (VAR DECL) DO.SHIFTED.SELECTION (NEWMODE SAVE BUF NEWPOS COL NEWSTART NEWROW NEWEND WORDLEVEL START END MODE -EXTENDING INITMODE) HRULE.DISPLAYFN (THICKNESS Y RULING) LISPXTYPEAHEAD (X L) EDOR (COMS) OPT.DREV (Y -L Z) EDRPT (EDRL EDRPTCNT) \\BOXIDIFFERENCE (HY LY Y HX) CALLS (FREES GLOBALS FNDEF EXPR FLG LAMFLG -CALLSDATA) \\HDCPYBLTCHAR (CURX MICARIGHT RIGHT LOCAL1 LEFT SOFTCURSORUP DISPINTERRUPT) -TTYIN.PRINTARGS (DOWNCASE ACTUALS ARGS NEXTARG KEY USEDKEYS DOSPACE TYPE) EDUP (C-EXP L1 X) -INFILECOMSMACRO (AT) EVERY (EVERYX) CHANGEPROP (Z) %ALTER-AS-DISPLACED-ARRAY (DISPLACED-INDEX-OFFSET -BASE NEED-INDIRECTION-P OFFSET) OPT.RESOLVEJUMPS (Z CU NEW JL) EDITMAC (X Y LST) EDITELT (Y L) -\\TEDIT.APPLY.PARASTYLES (NOSTYLE STYLE) UNPACKFILENAME.STRING (FILE TEM VAL POS OSTYPE HOSTP END TYPE - START SRCPOS CODE NEXTPOS DSTPOS FIRSTDOT SECONDDOT CH I BEYONDEXT BEYONDNAME) TB.NTH.ITEM (TAIL -TAILN) DIRECTORYNAME (DIRNAME DN FDEV) GETLIS (Z) CL:ADJUST-ARRAY (DIMENSIONS ELEMENT-TYPE -FILL-POINTER) FB.GET.NEW.FILE.SPEC (NEWNAME NAMEFIELD FIELDS TAIL PREVTAIL DIR) CH.LOOKUP.OBJECT ( -OBJECTPATTERN) DIRECTORY (COMMANDS COM PFLG PRINTFLG COMTAIL DESIREDPROPS VALUES-WANTED VALUE HEADINGS - PROMPTFLG NAMEFLG COLUMNS OUTFILE DELETEDONLY TEM FILEGROUP SEENP PREVTAIL X I) LDIFFERENCE (Z) -HOSTNAMEP (N D) EDITCOML (C2 C3 TEM C COPYFLG L) TCONC (XX) \\SLOWLRSH8 (HI LO X) \\SLOWITIMES2 (HX LX - X HY LY Y SIGN LR CARRY HR) EDITCOM1 (TEM LISPXHIST) \\SLOWLOGOR2 (XH XL X YH YL Y) INTERSECTION (S X -) SEDIT::FIND-NODE-SUBSTRUCTURE-BACKWARDS (SEDIT::END) EDITSAVE (X) MEMB (Y) XYSECT (DUDY DXDV X Y) -DEFLIST (L) TEDIT.SUBLOOKS (CHANGEMADE CH# PC) UNDOEDITCOM (C) DSUBST (B EXPR) -\\TEDIT.NEXT.LINE.BOTTOM (BASETOBASE PARALOOKS NEWYBOT PARALEADING) MSTYPEMATCHRATING (X Y) -SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::START SEDIT::END SEDIT::INDEX SEDIT::LINEAR-ITEM SEDIT::LINEAR-INDEX -) SUBATOM (BASE OFFST FATP LEN N1 M1) EXEC-EVAL (VALUES) EDITSMASH1 (L0 X) DO.DELETE.LINES (DELHEIGHT) - DIRECTORYNAMEP (FDEV) EDITNCONC (X) LCONC (XX) LISTPUT1 (X) EDITCOMA (TEM LST TEM1 C L) EDIT!UNDO ( -FLG LST) INSPECT/AS/FUNCTION (FRAME CODEBASE) EQUAL (X Y) LISTGET1 (LST) \\POSTSCRIPT.ACCENTFN (CH) -COPYBYTES (NBYTES) \\APPLYINSPECTMACRO (ARGS) FB.COUNT.FILE.CHANGE (SIZE) \\TEDIT.CHANGE.LOOKS (PCTB -\\INPC FONT NEWLOOKS FAMILY FACE SIZE PROT SELHERE ULINE OLINE INVERSEVIDEO STRIKE INVISIBLE SUPER SUB - WEIGHT SLOPE EXPANSION SIZEINC OFFSETINC STYLE STYLESET USERINFO UISET FOOLOOKS CHLIM PC1 PCN -OLDLOOKSLIST NEWPCLOOKS NEWFONT PC) GRAPHOBJ.BUTTONEVENTINFN (W) \\AB.BACK (ABHI ABLO PW ABADDR SIZE) -CURSOR.INIT (DESTBPL) \\LINEBLT (X XRIGHT) \\TEDIT.CARET (CARET) \\DISPLAYLINE (LHEIGHT SCALE CACHE -DISPLAYDATA DDPILOTBBT XOFFSET CLIPLEFT CLIPRIGHT OFONT OLOOKS DDWIDTHCACHE DDOFFSETCACHE LOOKSTARTX -CH DX LOOKNO TTX CURY TX I) COMP.ATTEMPT.COMPILE (FLG) MSSEEKPHRASE (THIS OLDS C TEM X) EDIT4F1 (L XX -TAIL X TEM LVL) TEDIT.PROMPTPRINT (MAINTEXTOBJ WINDOW) \\TEDIT.REOPEN.STREAM (PC) \\BUFFERED.COPYBYTES - (BUF NB END STARTOFFSET NBYTES) DEBUGGER (LASTPOS BRKPOS XCL::DEBUGGER-WINDOW BRKFN) -TEDIT.UNDO.PARALOOKS (OLDLOOKS NEWLOOKSLIST PC) GETVARS (POS TEM L X) PRINTPUP (FILE MACRO LENGTH) -SEDIT::SCAN-STRING (SEDIT::INDEX SEDIT::CWIDTH SEDIT::C SEDIT::OFFSET SEDIT::X SEDIT::IN-MULTI-ESC) -EDIT2F (X TEM CL) COPYCHARS (SRCEOLC DSTEOLC SAMEEXTFORM RAP EOF ACTUALSTART ACTUALEND SCSET CHAR CH I - CNT) XSECT (DUDY DXDV X Y) EDITFPAT1 (VAL N) IFCPROPSCAN (AT PROP) GETVARS1 (X) \\UNBOXFLOAT1 (NEXT X -) PRINTPUPROUTE (CSECS) IFCEXPRTYPE (SUBCOM) BRKDWNRESULTS (CL:VALUES I) \\SETUP.TYPENUM.TABLE ( -HUNKSIZE SIZEL TNAME DTNUMBER TYPE DTD I) PUTCURSORPROP (OLDDATA OLDVALUE TAIL) -\\TEDIT.FLUSH.UNUSED.LOOKS (FIRSTPC LOOKS) EDIT4F2 (FORMAT) \\COURIER.CHECK.ERRORS (ERRDEF INFO) -SEDIT::SHIFT-LINEAR-FORM (SEDIT::X) GTHASHFILE (HASHFILE) LDIFF (V Z X) BYTEBLOCKCOMPILE2 (X) -\\FIRSTNODE (CHILD) BRHC/LAYOUT (H/2 X/SW YCENTER) EDIT1F (TEM) MEMBER (Y) BPNT (Y Z N) \\BOXIPLUS (HY - LY Y HX) SEDIT:SEDIT (CL:STRUCTURE) \\POSTSCRIPT.ACCENTPAIR (CH ACCENT) \\CREATEPIECEORSTREAM (PC -STRING) \\STRINGWIDTH.HCPYDISPLAYAUX (C CSET WIDTHSBASE TOTAL ESC ESCWIDTH TOTALWIDTH) UNBREAK (XCL::FNS -) EDIT.RI (A B) SEDIT::FIND-NODE-SUBSTRUCTURE (SEDIT::START) COPYFILES (TOSPEC FROMSPEC X -COPYFILESOUTPUT COPYFILESTERSE COPYFILESFN COPYFILESALWAYS COPYFILES.WHENTOSKIP COPYFILESVERSIONS -COPYFILESASK COPYFILESPURGE COPYFILESPURGESOURCE COPYFILESREPLACE COPYFILESASKDEFAULT DONTCOPY -SECONDARYSPEC FULLDST DST COPYFILESSKIPFN BK COPYFILESFROMSPEC NEWFILENAME NF DT2 CF) OPENSTREAM (REC -PARAMETERS STREAM FILE OLDSTREAM) EDITBF1 (XX X Y TAIL LVL) HASH-TABLE-FOR-DOC-TYPE (DOC-TYPE) -DOUSERFNS (USERFN) ONEDINSPECT.MAKEREGIONS (XCL:*PROFILE* VALUEWIDTH VERTMARKS I MARK) DO.MOUSE ( -ROW/COL NEWPOS BUF LINE COL) TTPROMPTCHAR (CRLFS) \\MACPEEKCCODEFN (PCODE SCSET CHAR COUNT) EDITSMASH -(TEM L) CL::%ATAN-FLOAT (CL::FARG CL::FX CL::CONSTANT CL::ADD-FLAG CL::CONSTANT-FLAG) EDIT.LO (X) -PRINTADDRS (I NB) \\FORMATLINE (CH#1 ORIGCHLIST CHLIST ORIGWLIST WLIST LOOKS TEXTSTREAM TERMSA CLOOKS -LOOKNO PC INVISIBLERUNS TLEN CHNO ORIGFMTSPEC FMTSPEC HARDCOPYMODE DEVICE SCALE DEFAULTTAB LEFTEDGE -TABSPEC FONT ASCENTB NEWASCENT DESCENTB NEWDESCENT 1STLN TX WIDTH TXB1 CH DX BOX GATHERBLANK CH#B -PREVSP T1SPACE PREVDHYPH PREVHYPH TXB DXB LOOK#B ASCENT DESCENT INVISIBLERUNSB \#BLANKS FORCEEND -TABPENDING TEXTLEN) \\BOUTS (STREAM) PROGN (*TAIL*) MAP2C (MAPX MAPY) MSVERBTYPE (OBJECT SUBJECT TYPE) - TEDIT.LOOKS (TSEL CHANGERESULT) XCL:COMPILE-FORM (COMPILER::VALUE) BUILDTESTRELQ (FORM) EDIT.RO (X N) - TEDIT.UNDO.LOOKS (OLDLOOKS NEWLOOKSLIST PC) CL:REPLACE (END1 END2) MAP2CAR (MAPE CL:MAPL MAPY MAPX) -EDIT.LI (X) CL:SUBSEQ (END) EDITNTH (X N TEM) \\COPYOPENFILE (X PROPS TYPE OUTSTREAM) CURSORCREATE ( -HOTSPOTY HOTSPOTX MASK CURSOR) SEDIT::SET-POINT-LIST (SEDIT::OFFSET SEDIT::INDEX TYPE) -ONEDINSPECT.ADJUSTSELECTION (PROP VMARK XCL:*PROFILE*) NLEFT (X N Y) \\BINS (STREAM) MAPC (MAPX) -COMPILER::FIND-SEGMENT (COMPILER::SEGMENT) RATOMS (X L) EDITBELOW (DEPTH L1 L0) COPYFILE (TOFILE -FROMFILE) EDIT.BO (X) PUTASSOC (X) RAIDSTACKCMD (FRAME) SEDIT::REPLACE-CHARS (STRING) -\\FTP.RECOGNIZEFILE (HOST DESIREDPLIST V DEVICEWANTED CONNECTION INS OUTS CODE RESULT REMOTEPLIST -BESTVERSION BESTPLIST) PRINTHISTORY1 (TEM Y INPUT) EDITSAVE1 (TEM) \\COMPUTE.HUNK.TYPEDECLS (HUNKSIZE -I) PLUS (J R) INSPECT/ARRAY (I) \\SEARCH.OUTPUTQ (LASTPUP PUP) EDIT.BI (N B A X) -|\\UFStoOtherCopyMess| (PAIR) RPT (RPTV RPTN) STKPOS (FLAG I FX) MAPCAR (MAPE CL:MAPL MAPX) -FILL/GRAPHNODE/LABEL (NS) MAPCONC (MAPY CL:MAPL MAPE MAPX) RPTQ (RPTV RPTN) IFCPROPS (ATNAME) -CLISPATOM (TEM) LOGAND (R J) MAPCON (MAPY CL:MAPL MAPE MAPX) MAPLIST (MAPE CL:MAPL MAPX) CL:BIT-NOT ( -RESULT-BIT-ARRAY) \\CURSORPOSITION (YPOS XPOS) EDIT4F3 (FORMAT LST MATCH) EDITCALLERS (EDITPATTERN -ATOMS FULL FILESTREAM ENV MAP TOP RDTBL CA PATTERNS FFILEPOSPATTERNS ATOM I PRINTFLG NOMAPFLG X Z FNS -OTHERSFILES) SAVEDEF1 (X) LOGOR (R J) \\SETUPGETCH (PC CHOFFSET CHARSLEFT PS PF SUBSTREAM) -TEDIT.SELECTED.PIECES (PCLST PC NODE NPCCH PCCH NPC I) COPY-ARRAY (TO-ARRAY) SHOWBITMAP1.IP (ROTATION -Y) EDITGETD (DEF) RAIDSHOWFRAME (FRAME) \\CHTOPCNO (CHNUM INDEX TREE) FIXCONTINUE (X) LOGXOR (R J) -\\MAYBEPEEKPUP (HOST DIRECTION) \\GETFTPCONNECTION (TRYHARD CONNECTION CONN) READ-UNICODE-MAPPING ( -FILE) COPY-VECTOR (END1 END2) TEDIT.FORMATBOX (LINES LAST-CHNO SUBREGION SUBREGIONSPEC LINE CHNO) -GETRELATION (VAL) CURSORPOSITION (DD OLDPOSITION) FM.CHANGELABEL (ITEM GROUPID ITEMID) ITIMES (R J) -MAKELINE (X0 Y0 DX DY DIR) CURSORSCREEN (XCOORD YCOORD DESTINATION) \\MACINCCODEFN (SCSET CHAR COUNT) -SELECT1 (C L A) BUILDGETRELQ (F1 FORM) PRINTXIP (FILE MACRO LENGTH) \\FLUSH.OPEN.STREAMS (STREAM) -\\CH.GUESS.NEW.PROPERTIES (PATTERN MINPROPERTYID MAXPROPERTYID OBJECTS ID) FORCEOUTPUT (STREAM) -FILEBROWSER (REGION OPTIONS TITLE MENU-TITLE MENU-ITEMS DEPTH KEY ATTRIBUTES X PAIR COMMANDMENU -COMMANDMENUWIDTH PROMPTWHEIGHT COUNTERHEIGHT BROWSERWINDOW BROWSERWIDTH BROWSER HEADINGWINDOW -COMMANDMENUWINDOW W OLDCOMS FILESPEC) TEDIT.DISPLAYTEXT (CHAR) SCANFILE0 (FNADRLST DICT0 NXT1 NXT2 NXT -) TEDIT.UNPARSE.PAGEFORMAT (PAGENOS PX PY SPECS PFONT PQUAD HEADINGS COLS COLWIDTH RIGHT INTERCOL -OLDRIGHT LEFT TOP BOTTOM SCALEFACTOR) \\INFER.FILE.TYPE (TYPE) ENDREAD? (X ESCAPED) SOME (SOMEX) -\\TEDIT.INSERT.PIECES (INSPC PREVPC FIRSTPIECE UNDOCHAIN SRCPFILE NPC OBJ AFTERFN CURCH# LEN PC) -/ECHOCONTROL (TTBL) NS.AUTHENTICATE (SIMPLE.CREDENTIALS RESULT) SEDIT::REPLACE-LIST ( -SEDIT::NEW-SUBNODE-COUNT SEDIT::DEAD-NODE SEDIT::UNDO-STRUCTURE SEDIT::DEAD-NODES SEDIT::UNDO-BOUNDS -CL:STRUCTURE SEDIT::X SEDIT::I SEDIT::TRAILING-STRUCTURE SEDIT::CONVERTED? SEDIT::DOT-LIST?) -TEDIT.PUT.PCTB (PC OLDLOOKS TRUEFILE OFILE CURCH# OLDCH# FONTFILE PCCOUNT PARAHASH PARALOOKSSEEN -LOOKSHASH PREVFATP PFILE PSTR CH I CH#S PREVPREVPC PREVPC) BRHC/INTERTREE/SPACE (OP TTC NP BTC DIST -RAISE) SETTERMCHARS (NEXTCHAR LASTCHAR 2CHAR BKCHAR UNQUOTECHAR PPCHAR) EDITTOGGLELABEL (NODE) IPLUS ( -R J) STRMEMB (Y N C) RAIDCOMMAND (CMD) INFILECOMSPROP (X) FIXCONTINUE1 (X) \\PUTBASEFIXP.UFN (LO HI -VAL) TB.INSERT.ITEM (BROWSER NEWITEM BEFORE# TAIL N) \\FTP.PRINTPLIST (ITEM BEFORE CH ISPASSWORD) -SUBSET (RESULT TAIL MAPX) %MAKE-DISPLACED-ARRAY (BASE NEED-INDIRECTION-P OFFSET) EQDEFP (CA1 CA2 I) -SAVEONSYSRECLST (N DECL FIELD) WALK-FORM-INTERNAL (XCL::NEWFORM XCL::WALK-NO-MORE-P XCL::TEMPLATE XCL::FN - XCL::NEWNEWFORM XCL::MACROP) \\BACKFORMAT (CH1 CHNO CH NLINE LINES) FRPTQ (RPTV RPTN) TTLOADBUF (BUF -CHAR NEXTCH START END) BUFTAILP (START) CLISPERROR (TEM AT IN) MSVBTABLES (MOD VERB) TIMES (J R) -\\MAYBEPEEKNS (DIRECTION) \\BIGNUM.LSH (X N) PRESSFILEP (FILE) TAILP (Y) \\RSH (XHI XLO X N) -\\VECFONTINIT (FMLY FD CSINFO) CURSOREXIT (SCREEN XCOORD YCOORD SCREEN2 XCOORD2 YCOORD2) -\\TYPE.FROM.FILETYPE (PAIR) SAMEPARALOOKS (F) \\FLUSH.NDB.QUEUE (PACKET IOCB) /SETSYNTAX (TABLE -OLDCLASS OLDCH) \\TAN.OLD (XX Y FLIPPED X2) \\MAIKO.DISPLAYLINE (LHEIGHT SCALE CACHE DISPLAYDATA -DDPILOTBBT XOFFSET CLIPLEFT CLIPRIGHT OFONT OLOOKS DDWIDTHCACHE DDOFFSETCACHE LOOKSTARTX CH DX LOOKNO -TTX CURY TX I) MSBLOCK (TYPES FNS FILES) CH.DELETE.MEMBER (OLDMEMBER GROUPNAME) \\GENERIC.BINS (OFF) -SELECTC (C L TL) \\FTP.PACKFILENAME (DIR DEVICE NAMEBODY VERSION SERVERNAME NAME FIELDS I) -DWIMLOADFNS? (TEM) TWODINSPECT.TOTALWIDTH (COLUMN) IDLE.BOUNCING.BOX (WAIT BOX TAIL ORIGBOX BITMAP X Y -) \\WWCHANGESCREENSIZE (SCREEN WINDOWS) CL:CHAR-NAME (X CSET CODE) \\SENDSPP (SEQNO) RECORDECLARATIONS - (TEM DEC NAM) REGIONONSCREEN (LEFT BOTTOM) FIND.MATCHING.WORD (BUFTAIL TAIL) \\GENERIC.BOUTS (OFF) -SPY.MERGE.CALLEES (ORIGCALLEE COPYCALLEE) CL:VECTOR-POP (FILL-POINTER) \\MAKE.ITEMS.VERT.ORDER (I C -ITEM.POINTER) WITHOUT-INTERRUPTS (VAL) INSPECT/TYPELESS (HDR TRLR) LAYOUTSEXPR1 (R) DELFROMFILES (TYPE - FILE COMS) MAKECOM (ARGNAMES VAR I ARG FORM LST) BCOMPL3 (FILE) BRH/LAYOUT/DAUGHTERS (D FLOOR) -\\TEDIT.HISTORYADD (REALEVENT) SMARTARGLIST (TEM DEF OTHERDEF FN) FILING.CALL (SESSION PGMDEF PROCDEF -PROGRAM PROCEDURE NARGS ARGTYPES NOERRORFLG ABSOLUTELY-NO-ERROR KEEPSTREAM ARGLIST I STREAM FAILED -RESULT) XPROD (X Y) MSMSGPRINT (MSG) INFILECOMSVALS (Y) FIXATOM1 (OLDTAIL X OLDFN) \\PEEKPUP (L H -NETHOST) MSJOINSET (C TYPE) TEDIT.SELECT (SEL PREVLINE) \\MAKE.EXPEDITED.STREAM (END) \\BSP.SETFILEPTR - (SKIPBYTES) PUTPUPSTRING (PUP) \\PROCESS.RESET.TIMERS (TIMER UNITS PROC) PUP.ECHOSERVER (FLG EVENT -PUP ISGOOD) RESET/NODE/BORDER (TRANS GRAPH) \\SETDAYTIME0 (BOX) \\TEDIT.WORD.BOUND (SYN1 SYN2) LOAD? ( -FULL FILE) PROCESS-EXEC-ID (ID) \\NSRANDOM.WRITE.SEGMENT (BUF BYTESLEFT CNT OFFSET) MAKEFN (ARGLIST A -ACTUAL DEF) FIXAPPLY (X TEM) |MakeMenuOfImageTypes| (IMAGETYPE IMAGETYPENAME) CHECKIMPORTS (FILES FILE - FULLFILENAME DATE) SWAPXIPADDRESSES (XIP) DELETEMENU (OTHERMENUS) TEDIT.SUBPARALOOKS (CHANGEMADE CH# -PC) SPY.DUMP.BUFFER (NEXTI K TREE J NAME I) \\LEAF.TIMEDOUT.EXCESSIVE (FIRSTTIME PUP X FULLNAME PAGE -DATA ENTRY WRITEFILES READFILES) \\LEAF.SETFILETYPE (DATA BYTESIZE TYPE) \\IDLER (X PROC W -SAVEVM.TIMER IDLE.PROCESS NO.ERROR EXIT? INTERRUPTED.STRING) CSUBST (TEM TEM2 X) INSPECT/DATATYPE (DEC - SYSREC I) CHAT.LOGIN (INSTREAM COM NAME/PASS LOGINFO OUTSTREAM) CHAT.TYPESCRIPT1 (FILE) FILL.TEST ( -OPER TBLE I) \\COS.OLD (XX X2) CL:GRAPHIC-CHAR-P (CSET CODE) SEARCH-FOR-EVENT-NUMBER (EVENTS) -\\TEDIT.GET.SINGLE.PARALOOKS2 (TABSPEC TABFLG DEFAULTTAB TABCOUNT TABS TAB#) COURIER.BROADCAST.CALL ( -PROCDEF SKT EPKT RESULT NET NEARBYNETS TAIL PAIR) RANDSET (RS1 RS2 RS X I) FB.UNDELETE.FILE (SIZE) -MSFAIL (POS) LOADCOMP (ROOT) \\COURIER.BROADCAST.ON.NET (RESULT) \\SW2BM (PL PB PH PW QL QB QW QH CW -CH) REBREAK (FNS) BRH/OFFSET (N) MERGEINSERT1 (C1 C2 N) DOBACKGROUNDCOM (FORM) \\GS.INITBUF (N NUMLEN) - READPLIST (TAB2 CH) PUP.ECHOUSER (INTERVAL NTIMES ECHOSTREAM I ECHOPUPLENGTH EVENT IPUP) FTPGETMARK ( -MARK) EDITTOGGLEBORDER (NODE) FNTH (N X) INSPECT/HUNK (ELTSPEC BLOCKRECS I) ADJUSTLINE (LINE ROW -NEXTLINE OVFL \#BITS USECR BREAK START NEWENDLINE OLDENDLINE JUSTIFYING LASTCOL) COMP.LOOKUPVAR (X VAR -) IDATE (N1 *POS* N2 YEAR DAY MONTH CH SECONDS MINUTES DEFAULTTIME HOUR TIMEZONE ZONE DST) RESETVARS ( -V) TTDOTABS (TB SPACES) ICMLARRAY (I DIM DISPLAYGROUP TOPLEFT MENUGROUP) PFI.SORT.INDICES (X PRIORITY -RESULT INDICES) BREAK.MSG.INTO.LINES (STRLST CHARWIDTH CHARCODE THISLINE BEGIN LASTSPACE NL I) FIXATOM - (X TAIL0 Y) COMPILER::PEEPHOLE-OPTIMIZE-CODE (COMPILER::TAIL COMPILER::INST) LISPXUSEC (LISPXIN LINE -LISPY LISPZ LISPX1 LISPX2 LISPXTEM) YMAPLIST (Y PATH1 PATH2 CURRPT NEXTPT X0 Y0 DX DY X YMAP) -\\GENERIC.OPENP (STREAM S) \\GENERIC.RENAMEFILE (OLDFILE NEWFILE) RAND (I J UPPER LOWER) -\\FTP.OPENFILE (HOST DESIREDPLIST PAIR TYPE BYTESIZE EOLCONVENTION) CL::SIMPLE-STRING-EQUAL (END1 END2 -) \\LOCATE.NSNET (DATA) IMOD (X) LISPXUSE0 (EXPR VARS ARGS VAL) \\TEDIT.PUT.CHARLOOKS.LIST2 (LOOKS I) -SPY.MAKE.TREE (TOPCOUNT X THRSH) \\LEAF.RESENDPUPS (PUPS) CREATEFIELDS (X) STKARGS (I) INITUFNTABLE (I - X) CHAT.CLOSE (FILE PROC KEEP ICON) INFILECOM (CFN TEM TAIL X) PRINTBITMAP (BM) DO?CMD (SAVE) CHOOZ1 -(TEM) GETPUPSTRING (PUP OFFSET) FM.WHICHITEM (WINDOW ITEM REGION) CH.ADD.MEMBER (NEWMEMBER GROUPNAME) -COMPILER::COMPILE-ONE-LAMBDA (COMPILER::LAP-CODE) \\FTP.HANDLE.NO (CODE INFO CNAME NEWNAME CPASS -ECHOSTREAM) NODELST/AS/MENU (N T1 T2) DMPHASH (AP) \\ATMOUT (CH) PRINT-EVENT (TEM Y INPUT) -\\AREAVISIBLE? (WPTR) \\TEDIT.COMMAND.LOOP (SEL WINDOW LINES IPASSSTRING RTBL WW CH TCH FN) -\\MAP-OPEN-STREAMS (DEVICE) SEDIT::OUTPUT-CR (SEDIT::Y SEDIT::THIS-LINE) \\MAKEBRUSH.SQUARE (BM) -BSPPUTMARK (STREAM ERRCODE PUP) CL:MOD (CL:REM) \\PRESSFAMILYCODELST (TYPE NEXT PAIRS I) INTCHECK (CHR - NCHR) /REMPROP (VAL X X0) \\TEDIT.PUT.SINGLE.PARALOOKS2 (DEFAULTTAB TABSPECS) -TTYIN.SHOW.?ALTERNATIVES (STARTOFWORD X MATCHED DOWNCASE) PFI.COMPUTE.INDEX.SHAPE (WIDTH PAIR NCOLUMNS - NROWS) \\XIPERROR (LENGTH) \\BULK.DATA.CLOSE (ABORTFLG) LISPXUSE (STATE VARS TEM LST ARGS GENLST LINE - EXPR USE-ARGS) |\\VFMSmartBLT| (\i) CHNGNM (FN OLD DEF NEW Z Y X) \\PUTFIXP (HI LO NUM) SPY.DELETE (X -) FIX89TYPEIN (TEM) FMAX (J Y X) \\TEDIT.FIND.PROTECTED.START (PC START-OF-PIECE) TEDIT.GET.OBJECT ( -NBYTES GETFN FILEPTRSAVE OBJ) EXPT (V N A) FILENAMEFROMID (|start| |length| |name|) SEDIT::LINEARIZE-LIST - (SEDIT::P SEDIT::LAST-SUBNODE SEDIT::INFO SEDIT::LAST-INFO SEDIT::SEPR-INFO SEDIT::SET-INDENT? -SEDIT::INDENT-BASE SEDIT::BREAK? SEDIT::INDENT SEDIT::ALREADY-INDENTED? SEDIT::PREV-TYPE SEDIT::PREV-INLINE - SEDIT::NEXT-TYPE CL:FIRST SEDIT::SUBNODES) \\NSFILING.GETFILEINFO.FROM.PLIST (PROT) \\PUTSWAPPEDFIXP -(HI LO NUM) TEDIT.ADD.MENUITEM (OLDITM) FMIN (J Y X) \\MAKEBRUSH.ROUND (RADIUS BITMAP BASE) -MSSETSETTYPE (REP SET) TEDIT.EXTEND.SEL (NPOINT SETOSELFLG FIXUPNEEDED) \\BSP.GETNEXTBUFFER (ERRCODE -STREAM) \\TEDIT.NEUTRALIZE.PARALOOKS.MENU (SCRATCHSEL) GETPUPSTREAM (PUP OFFSET) |\\VFMBlankInterval| -(|level|) SETYREL.IP (DY) EDITBMBUTTONFN (GRIDSPEC GRIDINTERIOR BM BITSWIDE BITSHIGH WREGION XOFFSET -YOFFSET DXOFFSET DYOFFSET DISPLAYREGION EXTENT GRIDX0 GRIDY0 BITMAPWIDTH BITMAPHEIGHT BITSPERPIXEL POS - CURSORBM ORIGBM COORDWIN NEWGRIDSIZE PAINTW) CLOSEBSPSTREAM (TIMEOUT TIMER) \\NSFILING.GET/SETINFO ( -SESSION RESULT) CHANGECALLERS (METHOD EDITCOMS TEM TYPE REL FNS FILE FILES X) \\IBMPEEKCCODEFN (PCODE -SCSET CHAR COUNT) \\BUFFERED.BIN (OFF X) FIND-HISTORY-EVENTS (*EVENTS* X EVENT-SPEC VAL VALUE-P PRED-P -) SELECTQ1 (C L) \\TEXTCLOSEF (PCTB PC) UPDATE/MENU/IMAGE (SCREEN MENUITEMS CENTER? FONT TITLE -TITLEFONT TITLEHEIGHT TITLEWIDTH NITEMS NUMCOLS NUMROWS BORDER OUTLINE ANYSUBITEMS? I COLWIDTH -ROWHEIGHT WIDTH HEIGHT NITEMSTOFIT BITSPERPIXEL BLK DSP ITEMREGION MAJOR# WINDOW) \\SIN.OLD (XX X2) -\\MAKEBRUSH.VERTICAL (BM) \\TEDIT.REFRESH.SHOWSEL (NOSEL OLDSEL) U/L-CASE (OLDLENGTH CHAR CAPFLG BUF -NEEDADJUST) PUTPUPBYTE (PUP) DO.INSERT.LINE (DY) SETXYREL.IP (DX DY) GETGRIDBOXREGION (NEWREGION) -GETHASH (BITS INDEX ABASE SLOT VALUE SKEY EQFN FIRSTINDEX REPROBE LIMIT) EDITMOVENODE (NODELST NEAR -OLDPOS NOW) MAKECREATE1 (NEEDACELL DEF SMASHFIELDS FIELD VAL CKVALFLG X TEM TEM3) \\PAGED.INCFILEPTR ( -NEWPAGE NEWOFF) WRITE (STREAM *PRINT-CIRCLE-HASHTABLE*) MAKEWITHINREGION (X) NEGC (X) -ACCEPT-UNIX-SOCKET-STREAM (NEWCHAN) ADDPROP (NEW X X0) |\\CanonicalizeTimerUnits| (Y CONVERTEDP) -\\BSP.HANDLE.DATA (DATALENGTH NEWID THISID INQUEUE PREVPUP NEXTPUP DIF PUP) TTUNREADBUF (X) IMAX (J X) - \\HANDLE.RAW.XIP (DESTADDR NDB MYNET DESTNET NSOC SOC XIPBASE CSUM) \\BUFFERED.BINS (IBASE START CNT -END OFFSET BYTESLEFT X) SPY.SUM (X) \\IFS.LOOKUPFILE (START LOCK PUPSOC ROOTNAME SEMI DOT DIREND -REMOTENAME OSTYPE OPUP IPUP RESULT) \\GENERIC.READP (SCSET CHAR SHIFTEDCHARSET) BSPFORCEOUTPUT (STREAM -) SETSPELLCASE (I) \\MOVEBYTES (SBN DBN DB SB NBYTES NWORDS) DELDEF (TYPE TEM) -\\TEDIT.GET.CHARLOOKS.LIST2 (I) RETDWIM1 (TEM FLG) |\\SETUPTIMERmacrofn| (|TimerUnits| |IntervalUnits| - CLOCKFNNAME INTERVALFORM TIMERFORM) /PUT-1 (X X0) \\BSP.HANDLE.ACK (THISID OUTQUEUE INTERRUPTPUP -OLDPUP ADATACOUNT NEXTPUP ACKDATA) FIXSPELL (REL TLST Z X FIXSPELLTEM APPROVALFLG L NDBLS) -READ-AFM-FILE (TOKEN WEIGHT SLOPE FBBOX HEIGHT CMCOUNT CCODE FCHAR LCHAR CC) \\LOAD-STREAM (DFNFLG -ADDSPELLFLG BUILDMAPFLG FILEPKGFLG LISPXHIST LOADA TEM ROOTNAME MAYBEWANTFILEMAP) FTIMES (R J) FPLUS ( -R J) CLISPFOR0 (OPR CLISPWORD I.S. I.S.OPR LASTPTR I.S.TYPE1 I.S.TYPE FOR FROM IN ON TO BY -TERMINATEFLG FIRSTI.V. I.V. AS BIND DECLARELST RETPREDS AFTERPREDS EXCEPTPREDS FINALLY EACHTIME FIRST -TEM I.S.PTRS PROGVARS I.S.BODY VARS RETEXP LSTVAR TERM MAKEPROGFLG ITER IVINITFLG INITVARS LSTVARS -OUTEXP X) |\\VFMMarkBufferDirty| (BUF) FM.EDITITEM (ITEM GROUPID ITEMID CLEARFLG) MIN (J Y X) HASDEF ( -TYPE TY SOURCE) CREATEPAGES (I) \\DECODEPRESSFACEBYTE (EXP FACECODE WEIGHT SLOPE) FIND.CHAT.PROTOCOL ( -PAIR RESULT) TB.EXPANDFN (REGION) \\BUFFERED.PEEKBIN (OFF X) SEDIT::INSERT-LIST (SEDIT::START SEDIT::END -) XCL:LIST-ALL-PROFILES (XCL:PROFILES) READ-UNICODE-MAPPING-FILENAMES (F CSI N) PRINT-ARGLIST (LEFT -ARGS ACTUALS MODE) LOAD (TEM LDFLG PACKAGE STREAM) SETUPTIMER (INTERVAL |OldTimer?| |timerUnits| -|intervalUnits|) TTCOMPLETEWORD (START FIRSTMATCH NEXTCHAR TAIL LASTCHAR MUST.BE.UNIQUE UNIQUE WORD -SUFFIXCHARS FIRSTMATCHCHARS I REFERENCE CH RETYPELENGTH RETYPEBUF RETYPETARGET ESCAPED BUF J OLDLENGTH - NEEDADJUST) \\10MB.TURNONETHER (CSB) EQUALN (DEPTH) ADDSPELL2 (TEM) SPY.ADD.ENTRY (NAME) -PSCFONT.READFONT (FID W C) INITDATATYPENAMES (D NTYPX) \\SPP.SYSPKT (XIP BASE) \\BUFFERED.BOUT (OFF) -|\\PFReplaceString| (|newString| CHAR POS) CH.ADD.GROUP.PROPERTY (MEMBERS OBJECTNAME) \\IBMINCCODEFN ( -SCSET CHAR COUNT) |\\LFRenameFile| (NEW-NAME OLD-NAME) \\TEDIT.FIND.LAST.LINE (LINES OLINE LINE) -TEDIT.PUT.OBJECT (LEN) HISTORY-NTH (EVENT N LST) XCL:RESTORE-PROFILE (XCL::PROFILE) \\LFINITCASEARRAY -(C) EDITP (EDITPX ATM) |\\PFTransferFilePage| (|runLength| PAGE-OFFSET PAGES-LEFT) TTRUBOUT (START) -SCALE.FONT (FONT) EDITV (EDITVX VAR) \\BOXFTIMES2 (X HX LX SIGNX EXPX Y HY LY SIGNY EXPY SAVEHY SAVELY - CARRY LZ HZ HHZ HHY) TEDIT.UNDO.DELETION (INSPC NEWPIECE OBJECT INSERTFN TL FIRSTPIECE NPC) -TYPE.BUFFER (WIDTH CH START) PREPLOOP (|PathOrPathList| NLIST TLIST ILIST) BRH/LAYOUT (DHEIGHT YHEIGHT -) \\ARGPTR (DEF P BFLINK NARGS FRAME) FM.SHADE (GROUPID ITEMID) \\TEDIT.GET.PARALOOKS.LIST2 (I) -\\LEAF.READFILEPROP (DATA IPUP) |\\LFTruncateFile| (PAGE# OFFSET) \\TEDIT.FIND.PROTECTED.END (PC -START-OF-PIECE) PARAMETRICSPLINE (KNOTS \#KNOTS DX DDX DDDX DY DDY DDDY X Y KNOT I A BX BY C R SX SY -D2X D2Y SPLINE) FNTYP1 (X) RETDWIM (X POS) TEDITCHAT.MENUFN (COMMAND) LCSKIP (LA LEN) COERCETEXTOBJ ( -PC DELTA CH# PFILE C I STR OFILE FMTFILE) NARGS (DEF) CLISPCAR/CDR (TAILFLG LST N TEM VAL) -\\MAKEBRUSH.HORIZONTAL (BM) \\INIT.ETHER.BUFFER.POOL (ZONELENGTH ZONE) \\BOXFPLUSDIF (Y HY LY SIGNY -EXPY X HX LX SIGNX EXPX EXPDIFF CARRY PLEASENORMALIZE) \\DSPFONT.HDCPYDISPLAY (W OLDWIDTH SCALE I) -MAPRINT (PFN SEP LST) SPY.NEXT.TREE (X) \\MAKEBRUSH.DIAGONAL (BM X) \\LEAF.GETFILEINFO.OPEN (FT -BYTESIZE DT) \\NSFILING.RELEASE.BULKSTREAM (PAIR) IMAGESTREAMP (STYPE X) PSCFONT.WRITEFONT (C) -ADDFILE0 (COMS FILEPROP ROOTNAME FULLNAME FLG) SETSTKNAME (FNH) \\BOXFQUOTIENT (X HX LX SIGNX EXPX Y -HY LY SIGNY EXPY HZ LZ) IMIN (J X) \\SPP.CHECK.INPUT.QUEUE (CURRENT N1 NEXT N2) STKNTH (CFLAG I FRAME) - FB.NAMES.INCREASING.VERSION (X Y) |\\LFGetFileInfo| (|stream|) UNDOLISPX1 (TEM X Y) IMAGESTREAMTYPEP -(X) GETPUPBYTE (PUP) \\INFINITY (BOX) \\GETREGION.CHECKOPPT (OPPX OPPY USERPT) RENAME (TYPE) LISPXEVAL - (LISPXID LISPXHIST) \\COPYFNHEADER (HEADWORDS NEWFNHD) STKSCAN (FX) |\\PFPutFileMapPage| (|vol|) -TEDIT.REDO.INSERTION (ORIGFIRSTPC NPC INSPC OBJ COPYFN TL FIRSTPIECE) NLIST (V I) DO-DISPATCH-MACRO ( -NEXTCHAR INDEX) \\FRAMESCAN (NAME TMP OFFSET) SEDIT::MAP-COMMENT-INDEX (SEDIT::SUBNODES SEDIT::SUBNODE - CL:LENGTH SEDIT::INDEX) MAX (J Y X) PUTPUPWORD (PUP) UPDATEFILEMAP (TEM FILEMAPADR FILEMAPLOCADR -FILEMAPLOCLEN FULLNAME STREAM) CL:GET-MACRO-CHARACTER (NON-TERMINATING-P TABENTRY) -CL:SET-DISPATCH-MACRO-CHARACTER (SUB-CHAR DISP-CONS) \\TEXTBIN (PO SUBSTREAM OPC PC NPC PS PF) -FB.DECREASING.VERSION (Y X) PROMPTCHAR (PROMPTSTR N MOD) DINFO.UPDATE.MENU.DISPLAY (ID WINDOW) -\\FILLRTPPUP (PUP) \\BUFFERED.BOUTS (DBASE START CNT END NBYTES OFFSET) SMASHFILECOMS (X) -\\DO-DEFINE-FILE-INFO (VALUE PACKAGE READTABLE BASE) OPENIMAGESTREAM (FILE LPTP POS LPTNAME IMAGETYPE -P) PRINTCOPYRIGHT1 (PRIVATE DATES Y START END NEXT) |MakeMenuOfPrinters| (P) \\10MB.LOADINPUTQ ( -PACKETS CNT) PFI.CENTER.PRINT (GAP X) \\MAKEFLOAT (BOX HI LO EXP ROUNDINGBITS) \\MATMULT441 (PRODUCT I - J K) FIXEDITDATE (E) \\CML-LOAD (EXPR) PRINTCOPYRIGHT (OWNER) IL-MACRO-WRAPPED-P (FORM) SIMPLEP (N X) - LISPXREADBUF (RDBUF TEM XX) PRINTERTYPE (HOST X TYPE FN PRINTER) ADDFILE (VAL FCLST LOADTYPE X FLST -TYPE CHANGED) \\MATMULT331 (PRODUCT I J K) \\SPREADFRAMEP (BFLINK NARGS) LISPXPUT (LST Y) -PRINTFILETYPE.FROM.EXTENSION (TYPE) MOVE.FORWARD.TO (BUFTAIL) FIND.NON.SPACE (END BUF) -\\NSFILING.ERRORHANDLER (FULLNAME POS HANDLE OLDPTR NEWSTREAM CON FAILCNT) TTNTHLINE (N LINE) CLEARPUP - (PUP) SETSTKARG (NT INDEX NTSIZE NARGS BLINK) SETXREL.IP (DX) \\STRINGIN (STR I) \\TEXTBOUT (TEXTLEN -WINDOW PS PC OFFST) \\TEDIT.PUT.SINGLE.PARALOOKS (DEFAULTTAB TABSPECS LEN) STKARGNAME (NT NTENTRY -NARGS NM NT1 NT2) \\CURVE2 (BOTTOM TOP RIGHTPLUS1 LEFT |DestinationBitMap| OPERATION NBITS BRUSHBM -COLOR COLORBRUSHBASE RASTERWIDTH DESTINATIONBASE BBT BRUSHBASE BRUSHRASTERWIDTH HEIGHTMINUS1 -BRUSHWIDTH BRUSHHEIGHT LEFTMINUSBRUSH BOTTOMMINUSBRUSH TOPMINUSBRUSH NBITSRIGHTPLUS1 X0 Y0 X1 Y1 DX DY - DDX DDY DDDX DDDY NPOINTS NSEGS POINTSPERSEG D1 D2 D3 D3X D3Y D2X D2Y SOFTCURSORUP DISPINTERRUPT -PERSEG TT I KNOT) COURIER.READ.BULKDATA (LASTSEGMENT?) %DEFPRINT-BITVECTOR (END.INDEX) CLISPATOMIS2 (X -) SETSTKARGNAME (NT NTENTRY NARGS NM NT1 NT2) %DEFPRINT-VECTOR (END.INDEX) SHRINKBITMAP (Y X) -DINFO.UPDATE.TEXT.DISPLAY (FULLFILENAME TEXTSTREAM) \\CREATEINTERPRESSFONT (TRANSL NEWFONT) STKNARGS ( -NA INTERPNT) READLINE (SPACEFLG CHRCODE TEM LINE START) \\MATMULT133 (PRODUCT I J K) \\ARBIN (USERSTR) - \\NSFILING.HOSTNAMEP (FULLHOSTNAME FILINGNAME DEVICE) CREATEMENUEDWINDOW (LOCATION MENU MENUW -MINTOTALWIDTH MENUWIDTH MINTOTALHEIGHT MENUHEIGHT WHOLEREGION WINDOW) \\BSP.TIMERFN (PUP) -MAXATTACHEDWINDOWEXTENT (EXTENT TL TC TR RT RC RB BR BC BL LB LC LT ATW ATWDTH ATWHGHT WHERECODE -ATWHERE) TEDIT.FIND.OBJECT (TEXTOBJ CH PC) \\BITMAPTOSCREEN (SCREEN) TTNLEFT (START X N B) -FLOATP.TO.BCPL (FLONUM EXP FRAC RESULT) CLISPATOMARE1 (L TEM) LOOKUP-SYMBOL (EHASH SYMBOL-NUMBER -INDEX-VAR) MODERN-ADD-EXEC (N) HASH-LEFTPAREN (CONTENTS I) FB.SORT.VERSIONS (THISNAME NEXTTAIL NEWTAIL - TAIL ITEMS PREVTAIL) PFI.PRINT.INDICES (ITEM INDICES FREECHOICE X LINESREMAINING) LISPX/1 (TEM1 TEM2 -TEM3) SLICESET (OFFSET I) EQUALHASH (UNMATCHED) |\\VFMFind| (|word|) \\MATMULT144 (PRODUCT I J K) -SPY.MAX (MAX) \\MATMULT333 (PRODUCT I J K BSTART ASTART) \\LEAF.REPAIR.BROKEN.PUP (NEWCONNECTION DATA) - \\LEAF.STRIP.QUOTES (TAIL) GETSETQ (TL) BKSYSBUF.GENERAL (SEPR OBJECT) GATHEREXPORTS (TOFILE ENV) -|\\PFFetchString| (POS) CHAT.BUTTONFN (CHAT.STATE CHAT.PROC) CHAT.TAKE.INPUT1 (FILE) PRINTERPROP (X) -INITATOMS (C) TTYIN.BALANCE (X) FILEDATE (STREAM OLDPTR VALUE) %REDUCE-INTEGER (LOW HIGH) -GET-NEXT-HISTORY-EVENT (EVENT) \\NSRANDOM.HANDLE.ERROR (S) REMPROPLIST (LST1 LST TEM) PRINTSPP (SEPR -SYSTEMP DS LENGTH) FILEPKGCOMS.PUTDEF (COM TYP) FB.DELVER.FILES (FILE THISNAME \#SEENSOFAR \#DELETED -LASTNAME) \\NSFILING.WHENCLOSED (SESSION STREAMPAIRS PAIR DEV) DINFO.UPDATE.HISTORY (ITEM I) TTNTH ( -BUF N) ONEDINSPECTW.CREATE (XCL:*PROFILE* PROPS DISPLAYWINDOW RIGHTWINDOW TITLEWINDOW GLEFT GBOTTOM -GWIDTH GHEIGHT WINDOWGROUP) TEDIT.SETSYNTAX (CHAR) %PRINT-ARRAY-CONTENTS (ELIDED FINAL.INDEX) -\\FAST4BIT (AW I J) MB.CREATE.NWAYBUTTON (FONT HEIGHT DESCENT WIDTHS IMAGES WIDTH BUTTON SPACING -SIDEEFFECTFNS DS IMAGE TWIDTHS I) \\GETREGION.CHECKBASEPT (FN USERPT) BCPL.TO.FLOATP (BCPLNUM SIGN EXP - FRAC) SIZE/GRAPH/WINDOW (WINDOW TITLE) BSP.PUTINTERRUPT (PUP) |\\LFReadPages| (|lastStreamPage| -|buffer| |offset| |streamPageNumber| |backingFilePageNumber|) UNSAVED1 (DEF PROP FN) /PUT (TEM X X0) -FM.REDISPLAYITEM (ITEM GROUPID ITEMID) \\CONVERTNUMBER (SIGN COMMONLISPY END DIDQ POS X) FIND.SYMBOL ( -SYM WHERE DONE PREV TABLE) EDITLOADFNS? (LST FILE DATES FD) COMP.STJUMP (TAG JT OP NV) TB.CLOSE/SHRINK - (HOW?) ENUM-STRING (POINTPLACE EXPOFFSET INTEXP MANTSTR DIGITS) PPSPP (FILE N I STR) APPENDINTEGER.IP - (I) AT.END.OF.TEXT (X) |\\PFGetFileMapPage| (|vol|) FIND.PACKAGE (BITS INDEX ABASE FIRSTINDEX REPROBE - LIMIT SLOT VALUE SKEY) PFI.CONDENSE.INDEX (INDEX *PFI-INDEX-ALIST* OLDNAME TYPEPAIR FILTERS FILTER -PAIR F) COPY.WINDOW.TO.BITMAP (REGION SCREEN LEFT BOTTOM WIDTH HEIGHT BITMAP SOFTCURSORUP -DISPINTERRUPT) CL:CHARACTER (OBJECT) PARSE-NAMESTRING1 (FILE TEM POS HOSTP END TYPE CODE TEM2 -SUBDIREND) EQUALALL (TEM J I TY FIELD) \\POLYSHADE.BLT (|fulllist| |currlist| |currcrit| |scany| -|scan| |fullcrit| |count| |ex| |clist| |ty| |crity|) SAVECOPYRIGHT (X) \\FILLINSPP (BASE) SPY.MERGE ( -TREES NEWNODE OLDNODE Z VAL) DECLAREDATATYPE (FIELDSPECS DLIST LENGTH P) \\REUSETO (N) -|\\PFPutAllocationMapPage| (|vol|) DECLARE\:1 (EVALFLG X) \\FLOAT (HI LO SIGN) CL::SXHASH-PATHNAME ( -CL::HASH) NSOCKETFROMNUMBER (SOC) CLISPATOMARE2 (X X1) PARSERELATION1 (TAIL) HCOPYALL1 (TYPE NEW ORIG -SEEN) \\HDCPYDSPPRINTCHAR (CC TABWIDTH) \\FTP.EOL.FROM.PLIST (PAIR) SPY.MERGEINFO (X) PRETTYPRINT3 ( -TEM DEF) SEDIT::BACKSPACE-QUOTE (SEDIT::NODE) \\ADDLEAFSTRING (LEAFLEN STRLEN STRBASE STROFF STRING -NEWLENGTH PUPSTRBASE I) |\\LFSetFileInfo| (|stream|) \\GOOD.DASHLST (DASHLST NDASH NOWOFF) FIXR (X HI -LO SIGN EXP ROUNDINGBITS) CLOSE-AND-MAYBE-DELETE (STREAM) FNUM-STRING (PLACESOUT) ATAN (Y X ATAN.Y -ATAN.X T. R D TT) BLTPATTERN.GENERIC (SW SH H RW RX W DH DY) TTLASTLINE (L LINE) SLITLOOP (KLST LAST -PREV CURR PREVSGN CURRLIST SECTLIST CURRSGN) NEW/FN (FN1 FN) %NUMERIC-STRING-P (CHAR) EDITGRAPH1 ( -GRAPH WINDOW) ATTACHMENU (MENUWINDOW) \\MAKERECODEMAP (M) MINATTACHEDWINDOWEXTENT (TL TC TR RT RC RB -BR BC BL LB LC LT ATW EXTENT ATWDTH ATWHGHT WHERECODE ATWHERE) TEDIT.EDIT.OBJECT (CH# SEL SELOBJ OBJ -EDITFN LINE) SEDIT::COMPUTE-POINT-POSITION-LIST (SEDIT::SUBNODE SEDIT::ITEM) TRANSLATE.DATATYPE (DLIST - N S FD X Y BIT OFFSET LEN REUSE) ADDSPELL1 (SPLST L3 M L1 L2) SENDXIP (XIP NDB) SEDIT::UNDO-COMMENT-CHANGE - (SEDIT::WORD SEDIT::SUBNODES SEDIT::SUB-NODE-INDEX) INSTALLBRUSH (OLDENTRY BRUSHARRAY X) -|\\LFWritePages| (|buffer| |backingFilePageNumber|) \\MATMULT444 (PRODUCT I J K BSTART ASTART) -DOWINDOWCOM ($$VAR) \\SEARCHPRESSFONTS (F WSTRM FONTSFOUND) GETPROMPTWINDOW (FONT PAGEFULLFN \#LINES -PWINDOW HEIGHT) POSTEDITALISTS (X FOUNDCHANGE OV) EXTTOINT (EXP LO HI ROUNDFLAG) TERM.PRINTCHAR ( -IMAGEWIDTH CHARWIDTH) ARCTAN2 (Y X ANGLE) MSSOLVE (REP ND OSET QT) FLTINTLOG (FEXP FHI FLO TABENTRY I) - \\APPEND2 (TAIL L1) INITDATATYPES (D DTD TYPENO) SPY.MAKEGRAPHNODES (BORDER X VAL) INTTOEXT (HI LO N -EXP) \\LEAF.USE.NEW.CONNECTION (PUP UNSENTPUPS OPCODE DATA OLDSTREAM AFFECTEDFILES BUSYFILES GOODPUPS -BADPUPS STREAM RESENDPUPS) \\PARSE.REMOTE.FILENAME (FIELDS QUOTEP TAIL VALUE HOST DEV DIR NAME EXT -VERSION) FILEPKGCHANGES (X TEM Y Z) GET-FILEMAP-FROM-FILECREATED (MAPADDR) COMPILER::FIND-TOP-ENVIRONMENT - (COMPILER:ENV) GET-ENVIRONMENT-AND-FILEMAP (MAPENTRY MAP STREAM OLDPOS) |GetImageFile| (FILE -FILETYPEMENU PRINTFILETYPE) \\FDIFS/FROM/DERIVS (S SS SSS) CLISPATOM1 (CLTYP1 ATMS TEM OPRFLAG NOTFLG -BRACKETCNT BRACKET ENDTAIL L TAIL CURRTAIL-1 LST0 TENTATIVE CLTYP TYP BROADSCOPE ISFLG BACKUPFLG) -CLISPEXPANSION (COP) \\TEDIT.PAPERWIDTH (CANONICAL-PAPERSIZE) \\FILLBSPPUP (PUP) FB.DELVERCOMMAND ( -NVERSIONS FILES TBROWSER NDELETED) \\NSFILING.GET.STREAM (PAIR STREAMPAIR) TILE (X Y W H DSTW DSTH) -TTNEXTLINE (L LINE N) \\TEDIT.WORDBOUND.READTABLE (CH) COMPILEDREPLACEFIELD (DATUM) SETFONT.IP (X) -RPLCHARCODE (N) EDITGRAPH2 (VAL) MENUWINDOW (MENU WINDOW) CLISPCAR/CDR2 (NODE N) GLOBAL-MACRO-FUNCTION - (PROP MD) COMPILE-IN-CORE (|fn-expr|) DIGITSBDP (F FHI FLO SIGNF FEXP) DO-HISTORY-SEARCH (PAT2) -\\CURVESLOPE (PARAMS DX DY) PRETTYPRINT (LST CLK FN DEF TEM) GETXIP (EPKT TIMER) -SEDIT::CREATE-COMMENT-WORD-NODES (SEDIT::I SEDIT::OK? SEDIT::SUBNODES SEDIT::END) PRETTYDEF1 (PRTTYTEM - PRTTYCOM PRTTYNEW) BLTPATTERN.REPLACEDISPLAY (W H RX RW SW RY RH SH) TTECHO.TO.FILE (X FIRSTIME END -CH LINE) EXPANDBM (SRCEX SRCEY SRCEW SRCEH DESTW DESTH I POWER J) PORTSTRING (SOCKET NETHOST) -CLISPCAR/CDR1 (TEM) INIT-CML-READTABLES (I) \\TEDIT.GET.SINGLE.PARALOOKS (TABSPEC TABFLG QUAD -DEFAULTTAB TABCOUNT TABS TABTYPE TAB#) \\UNVISIBLE.PAGED.REVALIDATEFILELST (STREAM REASON PAGES) -\\SELITEM.FROM.PROPERTY (SELITEM) BOOTSTRAP-NAMEFIELD (POS START END) \\D01.FAULTINIT (N I) -\\UNVISIBLE.FLUSH.OPEN.STREAMS (STREAM) \\CHECKSUM (CHECKSUM ADDR CNT) PRINTDATE (CHANGES FILEDATES -PREVPAIR) \\10MB.INPUT.INTERRUPT (STATUS IOCB ACCEPTPACKET PACKET) PFI.PREVIEW.DECLARE (NEXT -STARTOFLINE) DRAWDASHEDLINE (LINELENGTH DASHLST NDASH DASHTAIL SINE COSINE DASHCNT LENGTHDRAWN NEWX -NEWY DASHON X1 Y1) SPY.BUFFER.ENTRY (N) COMPILER::ALPHA-COMPILER-LET (COMPILER::VARS COMPILER::VALS) -COMPILEDFETCHFIELD (TYPENAME DATUM) DSPBACKCOLOR (STREAM) PRETTYCOM (PRTTYTEM PRTTYCOM LST X) -\\LEAF.READFILENAME (REMOTENAME) SLICEREF (OFFSET I) SQRT (V) SYMBOL.PNAME (BUFFER ADDR LEN I) -FILECHANGES (STREAM OLDPTR CHANGES FNS) TIMESPOW10 (CURPOWER TABENTRY EXP HI LO POWER) PRINTFNS ( -FNADRLST) CREATEMDSTYPETABLE (VP PAGE) PRETTYDEF (ROOTNAME SOURCEFILE DESTINATIONENV SOURCEFILENV -OLDFILEMAP SOURCEFC REPRINTFNS PRTTYFILE FCLOCATION) CLISPATOMIS1 (EXP) OLD.FIND.SYMBOL (I HASH -FIRSTBYTE FIRSTCHAR HASHENT CHAR# PNBASE ATM# B1 B2 REPROBE) DSPBOTTOMMARGIN (STREAM) -LOOKUP-ENVIRONMENT-AND-FILEMAP (V MAPENTRY HIGHEST-VERSION) SEDIT::CFV-LIST (SEDIT::LAST-INFO SEDIT::INFO - SEDIT::P SEDIT::LAST-SUBNODE SEDIT::IWIDTH SEDIT::PWIDTH SEDIT::PREV-TYPE SEDIT::NEXT-TYPE FIRST -SEDIT::SEPR-INFO SEDIT::SET-INDENT? SEDIT::INDENT-BASE SEDIT::BREAK? SEDIT::X SEDIT::SUBNODES) -\\FILEMAP-HASHOVERFLOW (TEM ENTRIES GROUP ONFILELST NFLUSH TAIL PAIR DATES NUMENTRIES I) -SCALEPAGEXUNITS (OTHEREDGE TVAL) \\EXTNORMALIZE (EXP HI LO ROUNDINGBITS) \\TEDIT.PARSE.CHARLOOKS.LIST -(FONT FAMILY FACE SIZE PROT SELHERE ULINE OLINE INVERSEVIDEO STRIKE INVISIBLE SUPER SUB WEIGHT SLOPE -EXPANSION OFFSETINC SIZEINC STYLE STYLESET USERINFO UISET NLOOKS NEWLOOKS NEWPCLOOKS NEWFONT) -CHECKFORCHANGED (UPDATEALL) \\EXTFQUOTIENT (LX HX LY HY HZ LZ) SUBPAIR (OLD NEW) FLTSTR (|outstring| F - FHI FLO SIGNF FEXP FLOG10 EXP MANT TLO THI TEXP ROUNDINGBITS LOCALK MANTSTRING ENDPOINTER) -FM.RESETSTATE (GROUPID ITEMID) DRAWLINE (STREAM) |\\LFOpenFile| (DATE OTHERINFO IDATE FILE STREAM) -|\\UFSWritePages| (REALPAGE REALOFFSET |buffer| |size| |PageNumber|) DSPCOLOR (STREAM) -TWODINSPECTW.CREATE (ROWPROPS COLUMNPROPS XCL:*PROFILE* DISPLAYWINDOW TOPWINDOW RIGHTWINDOW -CORNERWINDOW TITLEWINDOW GLEFT GBOTTOM GWIDTH GHEIGHT WINDOWGROUP) MOVETO (STREAM) CL:MACROEXPAND ( -CL::FORM CL::FLAG) |\\UFSOpenFile| (CASE.CORRECT.NAME STRM OTHER CASE.CORRECT.FULLFILENAME CDATE -BYTESIZE FILEID EOF-FN CINFO) PRETTYDEFCOMS (\#RPARS) \\CONVERT.FLOATING.NUMBER (FORMAT F) -|\\LFExtendFileIfNecessary| (|minBackingFileSize|) LISTRECORDEFS (CROPS TL) D-ASSEM::COPY-LAP-CODE ( -D-ASSEM::INST) |\\UFSDirectoryNameP| (NAMEAREA LEN) CL:COMPILE-FILE (COMPILER::*INPUT-FILENAME* -COMPILER::*INPUT-STREAM* COMPILER::FASL-PATHNAME COMPILER::*FASL-HANDLE* *ERROR-OUTPUT* -COMPILER::FILE-MANAGER-FORMAT COMPILER::PROCESS-ENTIRE-FILE) SEDIT::BACKSPACE-LIST (SEDIT::NODE) -LISPSOURCEFILEP (FILE) |\\UFSSetFileInfo| (VALUE) SCALEPAGEYUNITS (OTHEREDGE TVAL) DSPCLIPPINGREGION ( -STREAM) FB.DELETE.FILE (SIZE) \\HANDLE.RAW.PACKET (FILTER) ICMLARRAY.VALUECOMMANDFN (INDEX SLICE -DISPLAYWINDOW ROW COLUMN SLICERANK) CL:MAKE-ARRAY (DIMENSIONS FILL-POINTER ARRAY) -POSTSCRIPT.PUTBITMAPBYTES (POS BYTE B BYTEOFFSET R ROWOFFSET REPC BB BO PO PRVO) CL:MACROEXPAND-1 ( -CL::FORM) UNDOSET (TEM) \\SPPWATCHER (ACTIVITY TIMER) \\FTP.UNPACKFILENAME (HOST DIR DEVICE NAME EXT -PLIST) COMPILE.FILE.DEFINEQ (DEF) |\\LFGenerateFiles| (PARSED DIRECTORYSTREAM SEARCHSTATE C A0417 -GENFILTER STR HOST&DIRNAME NEXTFILE FILELIST) \\D01.ASSIGNBUFFERS (EMLEN EMBUF EXTRALEN NPAGES) -\\GETPRESSFONTNAMES (TYPE NEXT XFAMILY XFACE SPEC XFIELD XSIZE XROTATION FONTSFOUND) -\\NSRANDOM.PREPARE.CACHE (CACHE I FREETAIL PREV NAVAIL MORETAIL PREVFREE NCREATED NNEEDED) CHANGETRAN1 - (ARGS VAR1 FORM TEM ELT EXP) \\TEDIT.PARSE.PARALOOKS.LIST (1STLEFT LEFT RIGHT LEADB LEADA LLEAD -TYPESET TYPE SUBTYPESET SUBTYPE NEWBEFORESET NEWBEFORE NEWAFTERSET NEWAFTER HEADINGKEEP KEEP KEEPSET +EXTENDING INITMODE) \PFPutMarkerPage (vol) \LEAF.RECONNECT (SEQUIN) PRIN2 (RDTBL \THISFILELINELENGTH) +LOOKUP.NS.SERVER (NAME ENTRY NAME&VALUE ADDRESSES) SEDIT::CONVERT-COMMENT (SEDIT::NODE SEDIT::SELECT-END + SEDIT::NEXT-NODE) RELEASINGVMEMPAGE (PTR) \CREATECHARSET.IP (WIDTHS WFILE WSTRM RELFLAG FAMCODE TYPE +LENGTH NEXT FILEFAM FILEFACE FIRSTCHAR LASTCHAR SIZE FBBOX CHARSETHEIGHT FIXEDFLAGS TEM I WIDTHSY) +\TEDIT.NEWREGIONFN (XDELTA YDELTA) \NSADDRESS.DEFPRINT (HOST) LIST* (VAL I) CLISPFUNCTION? (CHRLST TEM +) \FAX.PARSE.NAME (AT PERSON DESTINATION CH PHONE INFO HOST MSG) \GETINTEGERPART (HIPART) +RECORDFIELDNAMES (VAL) \DRAWCURVE.IP (KNOTS K) CL:MAKE-BROADCAST-STREAM (STREAM?) REQUIREVERSION (TYPE + NEEDED) \DEFINEDEVICE (NAME TEMP DEV) CREATEARRAYSLICE (DIM RESULT PROD LEVEL SCANDIM SELECTIONDIMS +OFFSETS OFFSETCONSTANT) INTERACT&SHIFT.BITMAP.UP (NBITS) \NSPRINT.MEDIUM.CHECK (X) CLISPATOM (TEM) +\LINEBLT (X XRIGHT) U-CASE (C CHANGEFLG I NEWSTRING BASE) \VALID.FILING.CONNECTIONP (PAIR) \VFMMerge1 +(xtraBufferUsed) CHANGENAME1A (X Y) \TEDIT.RESTARTFN (TEXT) NEXTSIZEFONT (FONTTAIL FONT) CLEARW ( +WINDOW) CHANGENAME1 (DEF) COUNT (N X) RECURSIVE.COLLECTDESCENDENTS (NodeId ChildNode ChildNodeID) +\NSFILING.DISCARD.SESSION (PAIR KEPT) \PROCESS.APPLY1 (..PEV-RESULT..) MSSETUP (P) SEDIT::DRAW-UNDERLINE + (CL:FIRST SEDIT::STARTX) FIXCONTINUE (X) MAP (MAPX) NEWLINE.PRESS (NEWYPOS) APROPOS (OUTPUT +BLOCKCOUNT RESULT VAL) MB.NWAYBUTTON.ADDITEM (FONT HEIGHT DESCENT WIDTHS IMAGES WIDTH BUTTON SPACING +SIDEEFFECTFNS DS IMAGE) SCANFORWARD (N END BUF) \LEAF.WHENCLOSED (PUP DEV) ESUBST (EXPR) +\GETDEVICEFROMHOSTNAME (HOSTN D TEMP) CLDISABLE (OP1 BRACKET TEM FLG) \HARDCURSORUP (IMAGE) +MSINTERPRET (VAL MT REL REP SHOWSET MSPRED SUBJECT TYPE UPDATEALL DONE X FROMFOUND TEM) +\TEDIT.WORDDELETE (CH CHNO) FB.HARDCOPY.TOFILE (HCOPYFIELDS TAIL I MSG HCOPYTAIL FORE AFT EXT +HAVEDIRECTORY HOST PRINTFILETYPE TYPE ITEM FILETYPE FN NAME FIELDS) INTERACT&ADD.BORDER.TO.BITMAP ( +NBITS TEXTURE) MSNLAMBDACHECK (FN) MOVEDESCENDENTS (Child NewPos MovedNodes) +INTERACT&SHIFT.BITMAP.RIGHT (NBITS) \CURSORBITSPERPIXEL (OLDBITSPERPIXEL OLDIMAGE OLDMASK NEWIMAGE +NEWMASK WHITE BLACK) \FLOATTOBYTE.UFN (I) FB.HARDCOPYCOMMAND (PRINTOPTIONS) \REMOVEDEVICE (TEMP PAIR) +\FTP.DELETEFILE (HOST DESIREDPLIST CONNECTION INS OUTS REMOTEPLIST RESULT) INITDATATYPENAMES (D NTYPX) + EDIT4E (PAT X) INTERACT&SHIFT.BITMAP.DOWN (NBITS) CL:MISMATCH (END1 END2) \PUT.SESSION.HANDLE (HANDLE +) CHECKPATHS (PR VAL) \BSP.FLUSH.SOCKET.QUEUES (STREAM) \BLKFABSMAX.UFN (IDX MX I) CLISPERROR (TEM AT +IN) \REMOVEDEVICE.NAMES (TAIL CHANGED) \TFBRAVO.PARSE.PARA (ORIGPTR LEN PLOOKS RUNS) \BLKFABSMIN.UFN ( +IDX MN I) \CURSORDESTINATION (DESTBPL) CL:NSUBSTITUTE-IF (END) FW-INIT-PROPS (FILTER X Y) +\CCODEARGLIST (SIZE LOCALSIZE ENDT IVARS X I) CL:NSUBSTITUTE-IF-NOT (END) \UNQUEUE.EVENT (NEXT TAIL) +GETPROP (PLIST) SETSYNONYM (OLDPHRASE NEWPHRASE KEYLST NXT) FNCHECK (X FN FL FILE BLOCK B BLOCK/FN) +\SHIFT.DOCUMENT (PARALOOKS TSPEC LASTPARALOOKS PC) \FTP.MAKEPLIST (PROP) \BLKSMALLP2FLOAT.UFN (I) +DOICONWINDOWCOM (COM) EDITFPAT (TEM ND CHAR) SEDIT::DRAW-HIGHLIGHT (SEDIT::X-3 SEDIT::W SEDIT::Y-1 +SEDIT::Y-2) INFILECOMS? (TYPE COMS VAL) \DELETEFILE (FILENAME DEV) PACK* (ITEM PACK.INDEX M) COMP.NOT +(TMP) ONEDINSPECT.MAKEREGIONS (XCL:*PROFILE* VALUEWIDTH VERTMARKS I MARK) \WWCHANGESCREENSIZE (SCREEN +WINDOWS) \CCODEIVARSCAN (NM NUMBER I CODE IVARS NTOFFSET) DWIMLOADFNS? (TEM) EDITXTR (X) +\LEAF.GETFILEINFO (SEQUIN DEVINFO RESULT STREAM) \TFBRAVO.WRITE.RUNS (RUN LENGTH RUNS) \BLKMAG.UFN ( +COMPLEX-CNT REAL IMAG MAGNITUDE) \ENQUEUE.EVENT/LOCK (TAIL) EDITMBD (Y) \BLKEXPONENT.UFN (X) +OBTAIN.MONITORLOCK (LOCK) POSTSCRIPT.FONTCREATE (PSCFD FACECHANGED FULLNAME ASCENT DESCENT UNITFONT +SCALEFONTP FD WIDTHSBLOCK FIXPWIDTHS CH PSCWIDTHSBLOCK) ICONW.SHADE (SHADEBM IMAGEBM ERASEBM) +\HARDCURSORPOSITION (YPOS XPOS) \NSNET.CLOSERP (ROUTEY) \DEVICEEVENT (STREAM) SPY.FIND.TREE (X) +INITATOMS (C) CL:PEEK-CHAR (CL:CHAR) REVERSE (U L) \BLKFDIFF.UFN (INDEX) ICONPOSITION.FROM.WINDOW ( +SCREEN) ADDTOCOM1 (COM NEAR) CL:NSUBSTITUTE (END) \SPP.HANDLE.DATA (CURRENT PKTNO NEXT XIP XIPNO) +\BLKSEP.UFN (BETAINDEX GAMMAINDEX DELTAINDEX ALPHAINDEX) DELFROMFILES (TYPE FILE COMS) \SOFTCURSORUP ( +IMAGE MASK WIDTH HEIGHT CURSORBITSPERPIXEL UPBMBASE DOWNBMBASE CURSORBPL BWIDTH) \BLTSHADE.IP ( +DESTREGION OPERATION) MERGEINSERT1 (C1 C2 N) \BLKFLOATP2COMP.UFN (I) MENUWMINSIZEFN (BORDERSIZE +OUTLINESIZE MINWIDTH TITLERELATEDVAR) \BLKPERM.UFN (X) FILES? (FILE CHANGES PRINTED CH TB TYPE FLG +FILES) \SOFTCURSORUPCURRENT (DISPINTERRUPT X Y XBASE YBASE WIDTH HEIGHT MINUSDESTRASTERWIDTH +BITSPERPIXEL DEST DESTBIT SOURCEOFFSET UPBMSOURCE DOWNBMSOURCE SOURCEBIT) FIXATOM (X TAIL0 Y) +FB.ADJUST.DATE.WIDTH (TAIL SPEC ITEM RESULT INDEX) RELEASE.MONITORLOCK (LOCK PREV TAIL NEXTPROC) +\BLKFPLUS.UFN (INDEX) BITMAPCREATE (BITSPERPIXEL RW) CL:POSITION-IF-NOT (END) CH.RETRIEVE.ITEM ( +OBJECTPATTERN NAME&VALUE) OPENPRSTREAM (PRDATA OPT) FB.MAYBE.WIDEN.NAMES (THRESHOLD PAIR) FIXATOM1 ( +OLDTAIL X OLDFN) RECORDECLARATIONS (TEM DEC NAM) \TAN.OLD (XX Y FLIPPED X2) OPT.JUMPCOPYTEST (CDFROM) +\BLKFTIMES.UFN (INDEX) HARDCOPYREGION.TOPRINTER (PRINTERTYPE PRINTERCHOICE REGION) PUPSOCKETFROMNUMBER + (SOCHI SOC#orSOCLO SOC) \PRINTNSADDRESS (FILE) MACROEXPANSION (MACRODEF) SI::MONITOR-UNWIND (LOCK +PREV TAIL NEXTPROC) GETMACROPROP (X VAL) EDITMV (LC X OP L1 L2) \SEND.ACK (DATA) CL:POSITION-IF (END) +FB.HEADINGW.DISPLAY (SPEC FORMAT NEXTPOS) \BLKFMIN.UFN (IDX MN I) PRINTCURSOR (CUR IMAGE MASK) FILES?1 + (STR LST) DINFO.READ.KOTO.GRAPH (FIELD N) \GENERATEFILES (PATTERN) \LFVersions (FIXEDVERSION HMIN PTR + version RESULT) TB.MAKE.BROWSER (USERPROPS WINDOW BROWSER PROP OLDP TAIL) \PUT.FILING.ATTRIBUTE (X +ATTR VALUETYPE) \BLKFMAX.UFN (IDX MX I) MSSETPHRASE (VAL SETDET NOTYP SETTYPE REP) \TRANSMIT.STRATEGY +(MAKEA?) ONEDINSPECT.ADJUSTSELECTION (PROP VMARK XCL:*PROFILE*) COMPILER:OPTIMIZE-AND-MACROEXPAND ( +COMPILER::NEW-FORM COMPILER::CHANGED-P) CL::%%ASIN-FLOAT (CL::FX) SEDIT::LINEARIZE-COMMENT (SEDIT::SUBNODE + FIRST) PRINTPUPQUEUE (LASTPUP PUP GAP) EDIT4F (PAT LL N TOPLVL C3 X TAIL) CL:PROVIDE (CL::MODULE-NAME +) XPROD (X Y) \TFBRAVO.WRITE.RUN (NAMEDTABNUMBER END START) VRULE.DISPLAYFN (THICKNESS WIDTH X RULING) + EDITSW (TEM) IBLT1 (TEXTURE BITMAPOFFSET X val) PARSE-NSADDRESS (STR CH VAL NET HOST NSHOST PREV10 +ADDR) \SPP.RELEASE.ACKED.PACKETS (XIP OLDACKNO) CL:VALUES (BYTE PREVFRAME CALLER I PC NUNBINDS) +GETRELATION (VAL) TEDIT.FLASHCARET (CARET FIRSTTIME) TOPW.ADJUSTSELECTION (SELBOTTOM SELWIDTH +XCL:*PROFILE* SELLEFT COLPROP HMARK) IBLT2 (TEXTURE BITMAPOFFSET X val) \TEDIT.TEXTBIN.NEW.PAGE (FILE +CH) \SIMULATE.UNBIND (SP LASTPVAR) \LEAF.IDLE (STREAM) EDITCONT (LC1 L) \PFGetMarkerPage (vol) +\GETFILENAME (NAME FDEV) CL:VALUES-LIST (BYTE PREVFRAME CALLER PC NUNBINDS) HARDCOPYREGION.TOFILE ( +REGION) CL:READ-LINE (STREAM) PRINTPACKET (FN FILE) MULTIFILEINDEX1 (PRINTOPTIONS TAIL OPTIONS INDICES + NOTPRINTED I) FB.SETNEWPATTERN (ICON) FULLPRESSBITMAP (PRDATA SCALEFACTOR WIDTH HEIGHT XPOS YPOS) +PACKFILENAME (VAR VAL I HOST DEVICE DIRECTORY SUBDIRECTORY RELATIVEDIRECTORY NAME EXTENSION VERSION +TEMPORARY TEMP) SEDIT::PRINT-STRING (SEDIT::DISPLAY-DATA SEDIT::C) \TEDIT.LOOKS (FONT FACE SIZE +NEWLOOKS) \MAKE.PROCESS1 (MP0CALLER) PRINTPACKETQUEUE (PACKET) REBREAK (FNS) \PROCESS.MOVEFRAME (BLINK + FRAMESIZE FXSIZE BFSIZE RESIDUAL NEW FREESIZE NXT INITSIZE) COURIER.SKIP (X DEF) \SOFTCURSORDOWN ( +DISPINTERRUPT) COURIER.WRITE.FAT.STRING (LENGTH) TB.DO.ITEM.SELECTION (SELECTIONREGION LAST# FIRST# +FIRSTVISIBLE# LASTVISIBLE# LASTX LASTY OLDSELECTION OLDSEL# I NEWSELECTION SELECTIONSTATE SEL# +CTRLDOWN OLDLASTMOUSEBUTTONS) CL::VALUES-UFN (BYTE PREVFRAME CALLER VALS I PC NUNBINDS) +SEDIT::INSERT-COMMENT-CHARS (SEDIT::CHARS STRING SEDIT::SUBNODES SEDIT::SUBNODE SEDIT::NEW-STRING SEDIT::N + SEDIT::NEXT-SUBNODE) CL:REMOVE-IF (END) CL:REMOVE-DUPLICATES (END) OPT.DELCODE (X LB FLG CD) +CL::VALUES-LIST-UFN (BYTE PREVFRAME CALLER VALS PC NUNBINDS) \FM.3STATE-SETUPOFFBITMAP (ID OFFREGION +OFFBITMAP) CL:REDUCE (END) SEDIT::PARSE-INDENT (SEDIT::INDENTS) \OPENFILE (CDNAME FDEV STREAM NAME) +\SPPCONNECTION (HOST) CL:REM (CL::FX) \SPP.HANDLE.ATTN (FN) \DO.PARAMS.AT.OPEN (X ATTR VAL) +PRETTY-TYPE-NAME (DOC) MENUWRESHAPEFN (BORDER USABLEWIDTH INTREGION USABLEHEIGHT XTRWIDTH NCOLUMNS +XTRHEIGHT NROWS) \GETKEY (C) FIXAPPLY (X TEM) SCANBACK (START %#HITS X) \LEAF.OPENFILE (FILENAME +OLDHANDLE X TYPE BYTESIZE CRDATE STREAM EOL PROPS SEQUIN) SORT.NSADDRESSES.BY.DISTANCE (PAIR) +\RTP.HANDLE.PUP (PUP) CLOSEPUPSOCKET (PUPSOC) CL:REMOVE-IF-NOT (END) CH.DELETE.SELF (GROUPNAME) +\ENQUEUE.TIMER (NEXT PREV) TB.REDISPLAY.ITEMS (FIRSTITEM LASTITEM) CL:RENAME-FILE (CL::NEW-FULLNAME +FILE) \TEDIT.UNPARSE.CHARLOOKS.LIST (PROP PROPNAME NEWLOOKS) CHARSET (STREAM NEWVALUE OLDVAL) +SEDIT::RELINEARIZE (SEDIT::FIRST-LINE-LINEAR SEDIT::FROM-TOP SEDIT::OLD-ACTUALLLENGTH SEDIT::OLD-LAST-LINE + SEDIT::LINE SEDIT::NODE SEDIT::SUPER-NODE SEDIT::FOLLOWING-LINE) SETFILEINFO (DEV FULLNAME) +ICMLARRAY.GETMENUWGROUP (SWINDOW DIM PWINDOW) LISTHARD (TYPE VAL) WAIT.FOR.TTY (WINDOW TIMER) +FIX89TYPEIN (TEM) \TEDIT.MAINW (WINDOWS WINDOW) INITDATATYPES (D DTD TYPENO) \WRITEPRESSBITMAP (BITMAP + ELSTREAM CURX CURY SCALEFACTOR TOTCOUNT) CL:SCALE-FLOAT (FLOAT) CHANGECALLERS (METHOD EDITCOMS TEM +TYPE REL FNS FILE FILES X) PRINT10TO3 (FILE) CL:SEARCH (END1 END2) \COURIER.RECORDTRAN (TYPEDEF REST +PROGRAM FORM X TAIL) SEDIT::SCAN-FOR-BOUNDS (SEDIT::MAX-ASCENT SEDIT::MAX-DESCENT SEDIT::ITEM +SEDIT::ITEM-NODE SEDIT::START SEDIT::X) \TYPEGLOBALVARIABLE (ENTRY I) CHOOZ1 (TEM) \SAVESYSBUF (TA NC +BUF J I) OPT.SKIPPUSH (N) \ASSIGNDATATYPE1 (DTD REDECLARED NEWTYPENUM NEWDTD FOUNDSOME NTYPX) +SEDIT::INSERT-COMMENT (SEDIT::START) \ADD.ROUTING.TABLE.ENTRY (TABLE) \COS.OLD (XX X2) +COURIER.WRITE.SEQUENCE.UNSPECIFIED (ITEM X FN) HARDCOPYW (PRINTHOST BITMAP REGION SCREENREGION HOST +PRINTERTYPE SCALEFACTOR ROTATION FULLFILE) SEDIT::ADD-MENU (SEDIT::MENU) \SFFixY.HCPYMODE (CHARTOP BM +TOP) \LEAF.WRITEPAGES (BUF DATA LEN PAGE#) DINFO.GET.GRAPH.WINDOW (W) BESTNSADDRESS (ADDRESSES +HOSTNAME MSG BESTHOPS NOTLOOKEDUP BESTADDR ROUTE HOPS TRY) \ICONW.REPAINTFN (WIDTH HEIGHT) \PEEKSYSBUF + (R) ADDTOFILES? (BUFS TYPE STR LST NAME TEM FILE PLACE COMSNAME NEAR LISTNAME) PPSOC (STREAM PUP) +COMP.DECLARE1 (VAR VTAG) \UNQUEUE.TIMER (PREV) \ENQUEUE (Q TAILEND JUNK NEXTITEM THISITEM) +ORDERFROMBOTTOMTOTOP (WPTR ANS) \RENAMEFILE (OLDFILE NEWFILE) EDITMOVESUBTREE (NODELST NEAR OLDPOS NOW +) REMPROP (VAL X X0) CLOSEW (WINDOW) FILEPKGTYPE (FIELD TEM TEM2 I) PUTPROP (X X0) KEYACTIONTABLE (OLD +) \DRAWCURVE.PRESS (KNOTS LASTKNOT) \RTP.INFO.HOOK (WINDOW) \GET.FILING.ATTRIBUTE (X) +MOVEATTACHEDWINDOWTOPLACE (EDGE POSONEDGE ATMINHEIGHT ATMINWIDTH MAINWEXTENT TL TC TR RT RC RB BR BC +BL LB LC LT ATW ATWREG ATWHGHT ATWDTH ATPOSONEDGE ATWHERE EXTENT) OPENPUPSOCKET (PUPSOC SOC SOCHI +SOCLO CLASHP) \LEAF.READPAGES (BUF LEN OPUP I NEWPAGE# IPUP DATA PAGE#) DELETE.LONG.SEGMENT1 (NROWS +FIRSTLINE NEXTLINE) \RECLAIMARRAYBLOCK (P RECLAIM-P) FB.DISPLAY.COUNTERS (LABELS MAXWIDTH PAGESTRING +LAB HERE NEXTPOS) \PROCESS.EVENTFN (PROC ACTION) PRINTBITMAP (BM) TEDIT.REDO (EVENT SEL CH) +TOPW.BUTTONEVENTFN (XCL:*PROFILE*) \PAGED.REVALIDATEFILELST (STREAM REASON PAGES) \BSP.SKIPBYTES ( +ERRCODE BYTESLEFT NBYTES) CHECKSYNONYM (KEYLST STAIL NXT CNT) TWODINSPECT.TOTALWIDTH (COLUMN) +CREATEHASHFILE (SIZE STREAM VALUETYPE ITEMLENGTH FILE HASHFILE) OPT.ONLYMEMB (Y) FORGETPAGES (REFFED +BUFFER PREVBUFFER) \LFFindDirHole (TYPE ENTRYLENGTH PTR) GRAPHBUTTONEVENTFN (BUTTON NEAR OLDPOS NOW) +MSPRED (FLG) RESTOREMAP (P REFFED BUFFER PREVBUFFER) TWODINSPECT.REPAINTFN (WINDOWREGION ROWPROP MARK +STARTROWPROPS STARTVERTMARKS LASTROWPROP COLUMNPROP STARTCOLUMNPROPS STARTHORZMARKS LASTCOLUMNPROP +XCL:*PROFILE* VMARK HMARK) \TEDIT.CREATEW.FROM.REGION (PHEIGHT) \DELETECH (PC1 PCN START-OF-PIECE HIPC + PCTB PCLST PC) \CHANGECHARSET.HCPYMODE (BM) \LEAF.TRUNCATEFILE (DATA) CH.ADD.SELF (GROUPNAME) +ICMLARRAY.GETREGIONFN (WINDOWREGION) CL::%%TAN-FLOAT (CL::FX) \UNWIND.UFN (OLDTOS SP LASTPVAR +DESIREDSP) PFI.PRINT.BITMAP (HEIGHT WIDTH BMARG RATIO SCALE MINX CURX CURY BELOWBASELINE NLINESDOWN +LINEHEIGHT BOTTOM IMSTREAM) CL::TIME-CALL (CL:VALUES) CL:SINH (CL::FZ) \CHECKAPPLY* (DEF) +\PAGED.REVALIDATEFILES (STREAM REASON PAGES NEWLIST) ICMLARRAY (I DIM DISPLAYGROUP TOPLEFT MENUGROUP) +MSINTERPA (Z) FB.CREATE.FILEBUCKET (FILENAME LASTNAMECHAR CH VERSION DEC NEWFILEDATA N PREVDIR LASTDIR + DEPTH DIRP HASDIRPREFIX STARTOFSHORTNAME STARTOFNAME ATTR TEM) RETDWIM (X POS) TEDIT.UNDO (EVENT LEN +CH# FIRSTPIECE) COPY (TAIL X) CLISPCAR/CDR (TAILFLG LST N TEM VAL) COMPSET (FILE) CREATEMDSTYPETABLE ( +VP PAGE) \PUTBASEBITS (SIZE) \LOOKUPPUPNUMBER (OXIP TIMER INXIP RESULT) OVERLAPPINGWINDOWS (WPTR +OVERLAPS OVERLAPPED ADDS DONTS) \GETBRUSHFONT.PRESS (BRUSH) \HTFIND (ENTRY LINK PREV) +\GET.COURIER.DEFINITION (PGMDEF OTHERPROGRAM) \BUFFERED.REVALIDATEFILELST (STREAM REASON) SETSPELLCASE + (I) MEMBTONODES (Z) \SCALEDBITBLT.IP (DESTINATION-REGION SOURCE-REGION) ASSOC (ALST) +\BSP.PREPARE.OUTPUT (PUP SOCKET TIMEOUT ERRCODE) ADDTOFILE (TYPE FILE COMSNAME) \TEXTOPENF-SUBTREE (PC +) \LEAF.SETFILEINFO (VALUE STREAM) SI::INTERNAL-THROW (I) CL::%%GET-TIMING-INFO (CL:VALUES) +\TEDIT.ABBREV.EXPAND (SEL CH# CH EXPANSION OLDLOOKS) OPT.DELETEFRAMECHECK (VARS CD) \GENERATENOFILES ( +PATTERN) FONTNAME.IP (FACE NAME) \LFDirectorySearch (TARGETLENGTH PTR TYP ENTRYLENGTH NEXT HMIN FILEID + VERSION THISNAMELENGTH MATCH C) \RPLACD.UFN (RP.PAGE) NSNET.DISTANCE (NET# ROUTE) \PROCESS.MAKEFRAME0 + (NXT NXTEND FREE) TEDIT.CREATEW (PHEIGHT REGION) MENU (IMAGE DSP SELVAL MVAL) TEDIT.NEXT (SEL TARGET +FIELDSEL OPTION) \CONS.UFN (CNS.PAGE CELL PRIOR OFFSET PRIORPRIOR CPG PG) GROW/REGION (AMOUNT) +ShowIntervals (interval I level) CL:SUBSTITUTE-IF (END) CLISPFOR0 (OPR CLISPWORD I.S. I.S.OPR LASTPTR +I.S.TYPE1 I.S.TYPE FOR FROM IN ON TO BY TERMINATEFLG FIRSTI.V. I.V. AS BIND DECLARELST RETPREDS +AFTERPREDS EXCEPTPREDS FINALLY EACHTIME FIRST TEM I.S.PTRS PROGVARS I.S.BODY VARS RETEXP LSTVAR TERM +MAKEPROGFLG ITER IVINITFLG INITVARS LSTVARS OUTEXP X) TWODINSPECT.BUTTONEVENTFN (XCL:*PROFILE*) +\NOTE.10TO3 (TRANS) ADDSPELL2 (TEM) TEDIT.PARALOOKS (TEXTOBJ CH# CHLIM PCTB PC OLDSTART PC1 NLOOKSAVE +D REPLACEALLFIELDS 1STLEFT LEFT RIGHT LEADB LEADA LLEAD BLEAD BLEADSET QUADD TYPESET TYPE SUBTYPESET +SUBTYPE SPECIALX SPECIALY NEWBEFORESET NEWBEFORE NEWAFTERSET NEWAFTER HEADINGKEEP KEEP KEEPSET +BASETOBASE BASESET HCPYMODE HCPYSET USERINFO USERSET REVISED REVISEDSET TABSPECC STYLE STYLESET +CHARSTYLES CHARSTYLESSET COLUMN COLUMNSET OLDLOOKSLIST LASTLOOKS NEWLOOKS NCHLIM START-OF-PIECE NPC) +FMEMB (Y) PPROC (P1 DONE P PQ) CL::GET-PS-FROM-ACCESSOR (CL::SLOT #:G5) MSGETBLOCKDEC (FILE BLOCK VAL +Y) FB.INSERT.FILE (NEXTITEM N PREVITEM OTHERDATA) RETDWIM1 (TEM FLG) \NOFILESNEXTFILEFN (TYPE FILE VER +) \DRAWCURVE.PRESS.LINE (WIDTH SHAPE BACKOFF LEFT LB TR DIST BOTTOM) TEDIT.SUBSTITUTE (SEARCHSTRING +REPLACESTRING REPLACE-LEN PC CRSEEN CONFIRMFLG SEL BEGINCHAR# STARTCHAR# ENDCHAR# RANGE PENDING.SEL +CHOICE ABORTFLG REPLACEDFLG PC# ACHAR NCH#) \FINDKEY.UFN (I BASE) FLUSHRIGHT (POS) DINFO.FIND (PAIR) +INTCHAR (VAL CHAR OLDINT SYSDEF HARDFLG) PPROC1 (TIMELEFT NOW EVLOCK NAME) SETINTERRUPT (TABLE TEM) +\TRANSLATE.10TO3 (TRANS) CL:TANH (CL::FX) \BIN (STREAM) GETWINDOWPROP (WINDOW) MSINTERPRETSET (TYPE +SET2VAL V R Z H TEM S1 S2 REP VAL VALUE TABLES) NUMBERPAD.READ (FINISHVAL) \BOUT (STREAM) PPROCWINDOW +(W) \CHECK.PQUEUE (P X PREV) \PRESSCURVE2 (HALFVECWIDTH DASHON DASHLST DASHCNT TT DELTA IX IY XT YT +DUPLICATEKNOT X'T Y'T DX DY XWALLDT YWALLDT NEWT PUTDX EXTRADX PUTDY EXTRADY NEWXT NEWYT XDIFF YDIFF +KNOT#) \KEYACTION1 (DEAD CODE SHIFTDEAD SHIFTCODE ACT ALTGRCODE) \LEAF.GETFILENAME (SEQUIN RESULT) +PACKFILENAME.STRING (VAR VAL I HOST DEVICE DIRECTORY SUBDIRECTORY RELATIVEDIRECTORY NAME EXTENSION +VERSION TEMPORARY TEMP) COMPILER::COMPILE-ONE-LAMBDA (COMPILER::LAP-CODE) \KEYNAMETONUMBER (X I N Y) +\RESTLIST.UFN (TAIL I) CLISPIFY2B (TEM1 TEM2 L VAL PARENT SUBPARENT FORM TEM3) FULLNAME (RECOG) +GETINTERRUPT (TABLE X) PFI.PASS.COMMENT (CH) COURIER.WRITE.SEQUENCE (BASETYPE) \SIN.OLD (XX X2) +\PROCESS.MAKEFRAME (NEWFRAME) RCOMP3 (TYPE TEM1 TEM2) SCROLLBYREPAINTFN (X CRLEFT CRBOTTOM CRWIDTH +CRHEIGHT XEXTENTUSE YEXTENTUSE NEWX OLDX XDELTA NEWY OLDY YDELTA ONSCREENREG ONSLEFT ONSBOTTOM +ONSWIDTH ONSHEIGHT) CL:SUBSTITUTE (END) \RPLCONS (CELL ITEM) \CANONICALIZE.NSADDRESS (TAIL HOST +PREVTAIL) \FIXDLINES (WW LINES CHARLIM CHAR1 NL PL NLINES LINE) MSNEXTWORD (TEM ADV X) LISTGET (LST) +SASSOC (ALST) BCOMPL3 (FILE) GETFILEINFO (DEV FULLNAME) WHICHW (SCREEN WINDOW) \FTP.FLUSH.TO.MARK (CH) + REHASHFILE (HASHFILE NAME) CH.DELETE.PROPERTY (OBJECTNAME) CL:TYPE-OF (CL::TYPENAME) WTFIXLOADEF ( +FAULTEM2 FAULTEM1 FAULTEM3) \TYPECHECK.UFN (N) SET-CONNECTED-DIRECTORY-INTERACTIVELY (NEW-DIRECTORY) +ICONW.PRINT-JUSTIFIED (LMARG FONTHEIGHT MAXHEIGHT MAXWIDTH FORMATTEDLINES MAXLINES TITLEHEIGHT LINE CH + NCH) \STKSCAN (NT NTSIZE A NUMBER I VARINFO PVAROFFSET FVAR FX) CL:SUBSTITUTE-IF-NOT (END) +\ILLEGAL.DEVICEOP (I) \LFFileName (CHARLISTLENGTH NAME CHAR I) \MAIKO.IO-INTERRUPT (INFO) +TWODINSPECT.COPYBUTTONFN (XCL:*PROFILE* SELECTION) DSPFILL (STRM REGION) OPT.FRAMEVAR (VARS NNILS +NVALS V CD I ANY VAL) HARDCOPYIMAGEW.TOPRINTER (PRINTERTYPE) \READBINARYBITMAP (STREAM BITMAP) +CL::RANGE<= (CL::LOW1 CL::HIGH1 CL::LOW2 CL::HIGH2) \UNBOXFLOAT3 (NEXT DEGREE COEFFICIENTS X RESULT I +MATRIX2 MATRIX1) RESETKEYACTION (FROM) COMP.COND (TEST CLAUSE NEXT X COMPVAL ENDF A) \DOHELPINTERRUPT +(PROC) RESHAPEBYREPAINTFN (WREGION OLDCRLFT OLDCRBTM NEWWID DELTAWID NEWHGHT DELTAHGHT NEWCRLFT +NEWCRBTM YPOS NEWPTOP OLDPTOP NEWPRIGHT OLDPRIGHT) \PARAS.IN.SEL (PCS PARAENDED PARAS POS) CONTROL-T ( +OUT POS TEMP STKI CNT TOTALDELTA SWAPDELTA DISKIODELTA NETIODELTA GCDELTA) \MAIKO.CONSOLE-LOG-PRINT ( +MESSAGE-LENGTH) DINFO.ADD.FMENU (FM.WINDOW) \SELECTPROCESS (PROCNAMES PROC NAME) BRKDWNRESULTS1 (VAL +LST TOT I) \EP.PUT.AUX (A VAL) \TEXTCLOSEF-SUBTREE (PC) \DOHELPINTERRUPT1 (OLDTTY) +\HANDLE.NS.ROUTING.INFO (HOST HOPS NET BUCKET ENTRY RN OLDHOPS NEWTIMER LENGTH BASE) \FTP.FLUSH.TO.EOC + (CH) \TEDIT.DELETE (LEN OLINE1 OLINEN TEXTLEN TOPLINE THISW LINES\DELETED) \PROC.FINDREALFRAME (I) +DINFO.INVERT.NODE (NODE) PROCESS.STATUS.WINDOW (PMENU HEIGHT WIDTH REG LEFT BOTTOM WHERE) FETCHFIELD ( +DATUM) MB.NWAYBUTTON.SELFN (BUTTON X Y WIDTH IMAGE STATE) UPDATEFILES (TYPE CHANGED LST FOUND FILE +PCHANGES COMS FILEPROP TYPEDPROP Y) \WRITEBITMAP (LIM BASE) MB.NB.PACKITEMS (ITEM ITEMWIDTHS LINES +CURLINE CURLINEITEMS CURX) \SETPRINTLEVEL (OLB OSB CH N CARN BUF) OPT.FRAMEDEL (VARS FLV DOXVAR PARENT + TMP CD OP) SHADEITEM (ITEMREGION DSP ITEM) \NSFILING.GETFILE (SESSION ACCESS SERIALIZE SEQUENTIAL +RANDEVICE HANDLE FILE.ID PARSE DIRPATH EXPLICIT-VERSION ROOTNAME HAVELOCK OLDHANDLE VERSION FILESTREAM + FULLNAME) PRESSBITMAP (PRDATA WIDTH HEIGHT XPOS YPOS CLIPPINGREGION) CLISPATOMARE2 (X X1) \RETURN (X) + \PFTransferPage (runLength DOB STATUS) \CURVE2 (BOTTOM TOP RIGHTPLUS1 LEFT DestinationBitMap +OPERATION NBITS BRUSHBM COLOR COLORBRUSHBASE RASTERWIDTH DESTINATIONBASE BBT BRUSHBASE +BRUSHRASTERWIDTH HEIGHTMINUS1 BRUSHWIDTH BRUSHHEIGHT LEFTMINUSBRUSH BOTTOMMINUSBRUSH TOPMINUSBRUSH +NBITSRIGHTPLUS1 X0 Y0 X1 Y1 DX DY DDX DDY DDDX DDDY NPOINTS NSEGS POINTSPERSEG D1 D2 D3 D3X D3Y D2X +D2Y SOFTCURSORUP DISPINTERRUPT PERSEG TT I KNOT) CL::STRUCTURE-SLOT-NAMES (CL::NAMES) +COURIER.WRITE.STRING (STRING) ERROR! (NFX FX) FIND.SYMBOL (SYM WHERE DONE PREV TABLE) CHECK/MENU/IMAGE + (IMAGE SCREEN DSP) GETDEF (OPTIONS NOCOPY TYPE SOURCE DEF) \LFMakeDirEntry (SIZE) EDIT4E1 (LST LST1 +PAT MATCH PAT1 LST2) CLISPATOMIS2 (X) \SETRECLAIMMIN (OLB OSB CH N BUF) PARAMETRICSPLINE (KNOTS +%#KNOTS DX DDX DDDX DY DDY DDDY X Y KNOT I A BX BY C R SX SY D2X D2Y SPLINE) \DRAWLINE.UFN ( +INITIALBUCKET NY FIRSTADDR MASK PT NX) COMPILE1 (DEF) TEDIT.INSERT (STREAM TEXT CH#ORSEL OTEXTLEN CH# +XPOINT CHARS ACHAR CRSEEN BLANKSEEN NCH#) SEDIT::SUBSTITUTE-OBJ (SEDIT::SCOPE) AWAIT.EVENT (TIMEOUT) +\DRAWPOLYGON.IP (CLOSED LEFT RIGHT BOTTOM TOP IPXPOS IPYPOS VISIBLEP PTS SEG# PREVX PREVY) +\FTP.CLEANUP (CONNS FAIL) CL::%%COMPLEX-NSUBST (CL::TEST-RESULT) CL::%%SIN-FLOAT (CL::THETA) +SHIFT.BITMAP.UP (NEW.BITMAP) MONITOR.AWAIT.EVENT (TIMEOUT) DEFINEFONT.IP (ID N FRAMEVAR) SKOR0 (SC TEM +) \CLOSEF.PRESS (PDSTREAM FDE DESCR I DDRECORD) BCOMPL2 (X TEM TEM2 LST BLOCK) \TEDIT.SUBST.FN2 ( +SUB-FIND-RESULT) XCL::%%DEFINE-TYPE-PUTDEF (XCL::DEFINITION) RIGHTW.ADJUSTSELECTION (SELBOTTOM ROWPROP + VMARK SELWIDTH XCL:*PROFILE* SELLEFT) \PROCESS.GO.TO.SLEEP (HEAD PREV PQUEUE PROC FROMFX) +HEIGHTIFWINDOW (SCREEN) SPAWN.MOUSE (NAME I) OPT.CLEANFRAME (F) \PRINTBINARYBITMAP (BMH) +\MAIKO.10MBTURNONETHER (CSB) \LEAF.REOPENFILE (NEWSTREAM OLDINFO NEWINFO OLDDATES) +\NSPRINT.FULL.REQUEST.STATUS (PRINTER RESULT STATUS) DO.INSERT.LINE (DY) \GETWINDOWWIDTH (WINDOW) +MASTERSCOPEXEC (MASTERSCOPECOMMAND) FB.EDITCOMMAND (FILE) FW-INIT-MENUS (ITEMS) COMPILE-IN-CORE ( +fn-expr) PUTDEF (TYPE) MSPATHS4 (TEM) RESET.INTERRUPTS (PermittedInterrupts) ADDMENU (IMAGEWIDTH +IMAGEHEIGHT POSITION SCREEN W) RIGHTW.BUTTONEVENTFN (XCL:*PROFILE*) FIND.PACKAGE (BITS INDEX ABASE +FIRSTINDEX REPROBE LIMIT SLOT VALUE SKEY) \PSWOP.SELECTED (VALUE) \FM.CLEARITEM (REGION) +MAKE-UNICODE-TRANSLATION-TABLES (M RCODES RBASE LEFTC CSA I RCOMBINERS PREV) \GCRECLAIMCELL (TYPE CODE + PTR INDEX VAL DONEXT FINAL DTD PTRFIELDS) \GCSCAN1 (ENT PROBE) MAKEHASHKEY (CHARCODE INDEX) +\GETWINDOWHEIGHT (WINDOW) SPLIT89 (X Y Z) \GCSCAN2 (PROBE) SEDIT::TRY-REUSING-BITS (SEDIT::SHIFTED-Y +SEDIT::SHIFTED-X SEDIT::LEFT-CLIP SEDIT::START) MASTERSCOPE1 (X) CL::%%COMPLEX-NSUBLIS (CL::PAIR) +FB.GREATEST.PREFIX (C LASTDIR I) CL::%%SIMPLE-NSUBLIS (CL::PAIR) TB.RESHAPEFN (ITEM#) +\TEDIT.CENTER.SEL.REV (LOOKS OLDQUAD NEWQUAD PARASEL NEWQUADS) \MAIKO.ETHER-INTERRUPT (LENGTH PAIR +PACKET) SEDIT::COPY-SELECTION-COMMENT (SEDIT::END SEDIT::COMMENT SEDIT::INSERT SEDIT::OBJ) MSONPATH ( +INVERTED FROM TO TEM) FB.INCREASING.VERSION (Y X) OPT.FRAMELOCAL (VARS X ANY) \POP.N.UFN (NEXT VAL LEN +) COERCETOBITMAP (BM CR) \FTP.RENAMEFILE (OLDPLIST HOST NEWPLIST CONNECTION INS OUTS CODE) +CH.LIST.ALIASES.OF (OBJECTPATTERN) CLISPATOMARE1 (L TEM) \NSFILING.GENERATEFILES (SESSION FILING5 +DIRPATH TAIL N DIR PATHREQUIRED FILTERNEEDED D NAME HANDLE RETURNPROPS PROP FILTERLIST VERSION +VERSIONFILTER SCOPELIST BULKSTREAM RESULT) \LEAF.EVENTFN (CONNECTION SOC) \BLT (I) \HANDLE.RAW.3TO10 ( +ADDR) EDITFINDP (PAT) UNMARKASCHANGED (TYPE TAIL ANYFLG F TYPEDPROP PROP) \MAKEPCTB (PLEN) +CLISPCAR/CDR2 (NODE N) \PUTBASEBYTE (BYTE DISP) OPENRTPSOCKET (FRNPORT SOCKET# PUPSOC SOCKET MODE +INITSTATE) \FDIFS/FROM/DERIVS (S SS SSS) \HLSVALUEFN (HUE) WFROMMENU (WINDOW) PRINTROUTINGTABLE (TABLE + FILE I BASE NET GATE) FB.FINISH.COMMAND (M) ATAN (Y X ATAN.Y ATAN.X T. R D TT) DIRECTORYNAME (DIRNAME + DN FDEV) ADDSPELL1 (SPLST L3 M L1 L2) EDITDEF.FNS (DEF) \BITBLT.IP (DESTINATIONREGION SOURCE-REGION) +ADDTOVAR (TYPE PAIR VAL ADDED-NONLIST? OP) LOOKUP-SYMBOL (EHASH SYMBOL-NUMBER INDEX-VAR) +TTYIN.PRINTARGS (DOWNCASE ACTUALS ARGS NEXTARG KEY USEDKEYS DOSPACE TYPE) \PUTBITS.UFN (SHIFT MASK X) +XIPAPPEND.STRING (STRING WHERE LEN) PROCESS.BACKTRACE (WINDOW REGION DSP PLACE STKP) +CLIPBOARD-COPY-STREAM (STRM) TWODINSPECT.COLUMNWIDTH (ROWPROP) OPT.MERGEFRAMEP (V F V2) +\TEDIT.COPY.PIECEMAPFN (PC OBJ COPYFN NEWOBJ) \ADDBASE (NH NL D XH XL) \UPDATE.PROCESS.WINDOW (P NAME +OLDBUTTONFN) MSPATHS1 (THISLINE POS TEM NEXTLEVEL Y TABS FIRST) LEAF.ASSURE.FINISHED (STREAM PUP) +TRACE (CL::FNS) FB.EXPUNGECOMMAND (FILES FILENAME NDELETED FAILED) \TEDIT.FOREIGN.COPY? (DEST.TEDIT? +PROCW DEST.TEXTOBJ STREAM CH I) COMP.FUNCTION (FN) \SLOWPLUS2 (X Y) BAKTRACE (FILE FN POS N) \UNQUEUE +(NEXT PREV) TTY/EDITE (EDITCHANGES TEM EXPR) \SLOWDIFFERENCE (X Y) \DUMP.COURIERPROGRAMS (PROGRAM +PGMDEF) SHIFT.BITMAP.DOWN (NEW.BITMAP) SEDIT::REUSE-LINEAR-FORM (SEDIT::CURRENT-X SEDIT::TEMP +SEDIT::CURRENT-LINE) CREATETEXTUREFROMBITMAP (TEXTURE Y X) UNION (ELT TAIL HEAD) BRKDWN1 (Y LEN I) +\SLOWTIMES2 (X Y) MOUSECONFIRM (PROMPTSTRING WINDOW PWINDOW DON'TCLEAR/MAINW LEFTDOWN) DIRECTORY ( +COMMANDS COM PFLG PRINTFLG COMTAIL DESIREDPROPS VALUES-WANTED VALUE HEADINGS PROMPTFLG NAMEFLG COLUMNS + OUTFILE DELETEDONLY TEM FILEGROUP SEENP PREVTAIL X I) METASHIFT (OLDSETTING) CLISPATOMIS1 (EXP) +\SLOWQUOTIENT (X Y) \CHARWIDTH.PRESS (CHARCODE) /DREMOVE (Z Y) RESHAPEALLWINDOWS (TOTALNOWSIZE +ATWINSINFO EXPANSIONWIDTH FIXEDVAR NEWEXPANDABLEWIDTH EXPANSIONHEIGHT NEWEXPANDABLEHEIGHT ATWINFO +EXCESS NOW MWYOFF MWXOFF) \TEDIT.FIND.WC1 (RESULT RESULT1) \SLOWIPLUS2 (HX LX X HY LY Y SIGNX) +GETPROMPTWINDOW (FONT PAGEFULLFN %#LINES PWINDOW HEIGHT) EDITF (EDITFX FNTYPE) \SLOWIDIFFERENCE (HX LX + X HY LY Y SIGNX) CLISPIFY2A (TEM) ATTACHEDWINDOWS (ATTW) SAVESET (OLDVAL PTR FLG TEM NEWFLG) +MB.NB.SIZEFN (WIDTH HEIGHT BUTTONX ITEM CURX BUTTONY CURY BUTTONINFO LINE BOX) \SLOWITIMES2 (HX LX X +HY LY Y SIGN LR CARRY HR) OLD.FIND.SYMBOL (I HASH FIRSTBYTE FIRSTCHAR HASHENT CHAR# PNBASE ATM# B1 B2 +REPROBE) UNTRACE (CL::FNS) GETDEF.I.S.OPR (TEM BODY EVALFLG) \SLOWIQUOTIENT (HX LX X HY LY Y +SIGNQUOTIENT SIGNREMAINDER LZ CNT HZ) MSPATHS2 (Y) DIRECTORYNAMEP (FDEV) DOWINDOWCOM ($$VAR) +TEDIT.DELETE (SEL) EDITDEF (TYPE) CH.LIST.ALIASES (OBJECTNAMEPATTERN) IREMAINDER (HX LX X HY LY Y +SIGNQUOTIENT SIGNREMAINDER LZ CNT HZ) OPT.FRAMEMERGE (VARS P P2 VAR CD N V) HOSTNAMEP (N D) +\TEDIT.MARK.LINES.DIRTY (WW LL) BMOBJ.DISPLAYFN (FACTOR SHRUNK.BITMAP) SHIFT.BITMAP.LEFT (NEW.BITMAP) +\MAIKO.10MBWATCHER (MESSAGE-LENGTH PACKET CNTR) XIPAPPEND.WORD (XIP WHERE LENGTH) MEMB (Y) \FIRSTNODE +(CHILD) APPENDTOVAR (TYPE VAL ADDED-NONLIST? OP) \VFMGetInterval (BTreePageNum level) \SLOWLLSH1 (HI +LO X) TWODINSPECT.ROWPROPWIDTH (ROWPROP) SUBATOM (BASE OFFST FATP LEN N1 M1) \FTP.ADD.USERINFO (PLIST) + UNSAVEBLOCK? (ENTRIES) MARKASCHANGED (REASON TYPE FN L) \SLOWLLSH8 (HI LO X) \SPP.HANDLE.INPUT (XIP +SPPBASE ADDRESSEDID PKTSEQNO ACTIVE? ATTN ACKED NEWALLOCNO MAXALLOCNO ALLOCINCREASED ACKRECEIVED) +CL:SUBSEQ (END) UnixPrint (NAME F) \SLOWLRSH1 (HI LO X) SHIFT.BITMAP.RIGHT (NEW.BITMAP) +UNPACKFILENAME.STRING (FILE TEM VAL POS OSTYPE HOSTP END TYPE START SRCPOS CODE NEXTPOS DSTPOS +FIRSTDOT SECONDDOT CH I BEYONDEXT BEYONDNAME) MENUWINDOW (MENU WINDOW) CH.DELETE.ALIAS (ALIAS) +MSNEEDUNSAVE (FNS FN) FB.MAYBE.INSERT.FILE (N NEWDATA FILEINFO FULLNAME FILE-UNCERTAIN VERSION CRDATE +CRDATE2 NEWNAME NEWITEM TAIL SPEC) CLISPATOM2D (X Y) \SLOWLRSH8 (HI LO X) PRINTBINDINGS (FL POS VAL +EPOS) DECODE-NS-STRING (BYTEINC I FATLENGTH CH CSET FATBASE) LDIFFERENCE (Z) EDITH (X LINE COMS TEM Y) + \VFMKillBuffer (PREV CURRENT) \SLOWLOGOR2 (XH XL X YH YL Y) BURYW (WINDOW) RECORDACCESS (FIELD DEF +RECS TEM TYPE) \MAP.ROUTING.TABLE (I BASE) PUPNET.DISTANCE (ROUTE) \ONQUEUE (X) EDIT* (TEM) +\SLOWLOGAND2 (XH XL X YH YL Y) \LEAF.DIRECTORYNAMEP (INFO) SEDIT::RECOMPUTE-FORMAT-VALUES (SEDIT::CHANGED? +) \BSP.PREPARE.INPUT (SOCKET TIMEOUT ERRCODE PUP) EDITDEFAULT (EDITY EDITX EDITZ) \SLOWLOGXOR2 (XH XL +X YH YL Y) \BINS (STREAM) \SMASHBSPSTREAM (OLDSTREAM OPENSTREAM) CL::%%SQRT-FLOAT (CL::X CL::V) EDLOC +(EDL) ONEDINSPECT.PROPWIDTH (PROP) LSH (X) \SPP.INFO.HOOK (WINDOW) \BSP.CLEANUP.INPUT (NEWLO) +\CURVESLOPE (PARAMS DX DY) EDOR (COMS) SHRINKW (WINDOW) DSUBST (B EXPR) SYMBOL.PNAME (BUFFER ADDR LEN +I) \BOUTS (STREAM) WRITE-UNICODE-INCLUDED (ICSETS C KNOWN N POS I IMAPPING M CSI CSETINFO RANGES CTAIL + START END R LAST STR) DWIM-SYMBOL-PACKAGE (OTHERS X CHOICE) EDITRAN (DEF WORDS C1 TEM) ADDTOCOMS ( +TYPE TAIL) DEFLIST (L) XIPAPPEND.CELL (XIP WHERE LENGTH) BCOMPL1A (TEM COMPCOPYFLG0 X FIRSTFLG0 +COMPEVALFLG0 DFNFLG COMPCOPYFLG) GETHASHKEY (HASHKEY DELETED? PROBE) ONEDINSPECT.REPAINTFN ( +WINDOWREGION PROP MARK STARTPROP STARTVERTMARKS LASTPROP XCL:*PROFILE* VMARK) REMWINDOWPROP (WINDOW +DATA TAIL PREV) \QUEUELENGTH (X CNT) EDITELT (Y L) ARCTAN2 (Y X ANGLE) COMPILE.FILE.DEFINEQ (DEF) +COPYBYTES (NBYTES) BRKDWNFORM (I) CHANGEPROP (Z) \COURIER.PUTDEF (OLDINFO NAME) FIND.START.OF.WORD ( +END BUF) \UNBOXFLOAT2 (NEXT Y X) CL:ADJUST-ARRAY (DIMENSIONS ELEMENT-TYPE FILL-POINTER) \PAPERSIZE.IP +(MEDIUM) CREATEMENUEDWINDOW (LOCATION MENU MENUW MINTOTALWIDTH MENUWIDTH MINTOTALHEIGHT MENUHEIGHT +WHOLEREGION WINDOW) MBUTTON.FIND.NEXT.FIELD (PC START-OF-PIECE CH1 LEN) UNSAVEFNS (FNS FN FNTYPE FNREC + FL) EDRPT (EDRL EDRPTCNT) CLISPCAR/CDR1 (TEM) \UNBOXFLOAT1 (NEXT X) \BUFFERED.COPYBYTES (BUF NB END +STARTOFFSET NBYTES) INSPECT/AS/RECORD (RECORD RECDEC) SEDIT::COMPUTE-POINT-POSITION-COMMENT (SEDIT::SUBNODE +) EDUP (C-EXP L1 X) \NSFILING.PARSE.FILENAME (LASTHOST CH I START SEMI DOTSEEN DIRS END NAME VERSION) +GETLIS (Z) LISTFILES (FILES FILE OPTIONS FULLNAME) CURSOR.INIT (DESTBPL) FB.PRINTFN (OLDFONT OFF C +NEXTPOS SPEC INFO XPOS FORMAT ACTUALNEXT) %%ASET2 (BOUND0 BOUND1 OFFSET) CLISPLOOKUP (CLASS CLASSDEF +TEM) %%ALTER-AS-DISPLACED-ARRAY (DISPLACED-INDEX-OFFSET BASE NEED-INDIRECTION-P OFFSET) +SEDIT::COMMENT-LENGTH (SEDIT::SUBNODE SEDIT::I) %%AREF2 (BOUND0 BOUND1 OFFSET) EDIT!UNDO (FLG LST) +ATTACHWINDOW (MAINW ATTACHW EDGE POSITIONONEDGE) \SLOWIGREATERP (HX LX X HY LY Y) ARCTAN (FLIPPED XX +X2 SSUM) ATTACHMENU (MENUWINDOW) MB.NB.WHENOPERATEDFN (BUTTON SIDEFN) EDITCOMA (TEM LST TEM1 C L) +CLISPATOM2C (TAIL0) \SLOWFGREATERP (SIGNX X HX LX EXPX Y HY LY SIGNY EXPY) COPYCHARS (SRCEOLC DSTEOLC +SAMEEXTFORM RAP EOF ACTUALSTART ACTUALEND CH I) EDITCOML (C2 C3 TEM C COPYFLG L) \RTP.HANDLE.INPUT ( +PUP TIMER) \LEAF.BREAKCONNECTION (DEVINFO CONNECTION FILES) EDITCOM1 (TEM LISPXHIST) +RECORD.FIELD.VALUE (TMP) EQUAL (X Y) \SPP.RETRANSMIT.NEXT (XIP SEQNO) WRITE-UNICODE-MAPPING-FILENAME ( +RTAIL R) INTERSECTION (S X) PUTCURSORPROP (OLDDATA OLDVALUE TAIL) \BOXIPLUS (HY LY Y HX) EDITMAC (X Y +LST) EDITSAVE (X) UNDOEDITCOM (C) \BOXIDIFFERENCE (HY LY Y HX) XIPAPPEND.BYTE (XIP) +\TEDIT.REOPEN.STREAM (PC) CLEAR.LEAF.CACHE (HOST DEVINFO CONNECTION) TEDIT.PROMPTPRINT (MAINTEXTOBJ +WINDOW) \FM.CHANGELABEL (REGIONS BITMAPS) LISTPUT1 (X) \COPYOPENFILE (X PROPS TYPE OUTSTREAM) +SEDIT::UNDO-LIST-REPLACE (SEDIT::SUBNODE) CL:REPLACE (END1 END2) EDITSMASH1 (L0 X) LISTGET1 (LST) +OPENSTREAM (REC PARAMETERS STREAM FILE OLDSTREAM) OPT.FRAMEOPT (ANY) MEMBER (Y) EDITNCONC (X) +HRULE.IMAGEBOXFN (THICKNESS) ONEDINSPECT.BUTTONEVENTFN (XCL:*PROFILE*) \COMPUTE.ARC.POINTS (ANGLEINCR +ANGLE) PFI.SORT.INDICES (X PRIORITY RESULT INDICES) RETDWIM2 (N M) EDITSAVE1 (TEM) \CURVEEND ( +SOFTCURSORUP DISPINTERRUPT X Y I) SEDIT::OUTPUT-STRING (SEDIT::THIS-ITEM SEDIT::WIDTH STRING SEDIT::FONT +) \CREATEPIECEORSTREAM (PC STRING) BMOBJ.IMAGEBOXFN (WIDTH HEIGHT FACTOR) IDLE.BITMAP (BITMAP BOX DSP) + \TEDIT.WINDOW.OPS (Y OPERATION) IPLUS (R J) \PFFindPageAddr (PAGEGROUP) EDIT2F (X TEM CL) TCONC (XX) +PROGN (*TAIL*) LCONC (XX) EDIT4F1 (L XX TAIL X TEM LVL) MAP2C (MAPX MAPY) FB.COPY/RENAME.MANY (PREFIX +FIELDS HOST DIR DEVICE FIRSTDATA ITEM SUBDIR RETAIN FILELIST OLDNAME) \HCPYMODEDSPPRINTCHAR (CC +TABWIDTH) PLUS (J R) CL::%%LOG-FLOAT (CL::X CL:EXP CL::R CL::ANSWER) \MAIKO.10MBSENDPACKET (PAIR) +MSRESPELL (SPLST) SPYOBJ.IMAGEBOX (FONTSOURCE) FB.REMOVE.FILE (PREVITEM NEXTITEM NEXTNEXTITEM N) +EDIT1F (TEM) COMP.BOOL (P A) MAPC (MAPX) SEDIT::NORMALIZE-SELECTION (SEDIT::FIRST-LINE) +\PUPNET.CLOSERP (ROUTEY) EDITFPAT1 (VAL N) TWODINSPECT.SETELT (XCL:*PROFILE* NEWVALUE) MAP2CAR (MAPE +CL:MAPL MAPY MAPX) COPYFILE (TOFILE FROMFILE) SEDIT::OUTPUT-SPACE (SEDIT::I) \CLEAR.ROUTING.TABLE (I +BASE) SAMECLOOKS (F) EDITBELOW (DEPTH L1 L0) DEBUGGER (LASTPOS BRKPOS XCL::DEBUGGER-WINDOW BRKFN) +MAPCON (MAPY CL:MAPL MAPE MAPX) BCOMPL.BODY (UNPACKFILE FILEROOT SCRATCHFILE) TEDIT.OBJECT.CHANGED ( +PCINFO CHANGEDCH#) LOGAND (R J) EDIT4F2 (FORMAT) MAPCAR (MAPE CL:MAPL MAPX) HISTORYFIND1 (PAT1 PAT2 +TEM) \INIT.RTPPROCESS (NAME) TEDIT.PUT.PCTB (PC OLDLOOKS TRUEFILE OFILE CURCH# OLDCH# FONTFILE PCCOUNT + PARAHASH PARALOOKSSEEN LOOKSHASH PREVFATP PFILE PSTR CH I CH#S PREVPREVPC PREVPC) EDIT4F3 (FORMAT LST + MATCH) PRETTYFILEINDEX (*STANDARD-INPUT* WASOPEN FILENAME ENV FILECREATED *PFI-TITLE* +*STANDARD-OUTPUT* PRINTOPTIONS *PFI-MAX-WASTED-LINES* *PFI-TYPES* *PFI-LOCATIONS* *PFI-FILEVARS* +CRDATE *PFI-PAGE-COUNT* FIRSTPAGE PART# *PFI-PAGE-PREFIX*) MAPLIST (MAPE CL:MAPL MAPX) FW-FORGET-CMD ( +CURRENT-OFDS OFD FORGET-OFD) LOGOR (R J) BPNT (Y Z N) EVERY (EVERYX) MAPCONC (MAPY CL:MAPL MAPE MAPX) +LDIFF (V Z X) BRKDWNFBOXES (BDZ BDY BDN) \MAIKO.INPUT.INTERRUPT (LENGTH PAIR) MSPATHS (FIRST NAMED TEM + UNDONE) CURSORCREATE (HOTSPOTY HOTSPOTX MASK CURSOR) EDIT.RI (A B) COPYDEF (TYPE DEF X TEM) +\UFStoOtherCopyMess (PAIR) LOGXOR (R J) EDITBF1 (XX X Y TAIL LVL) CLISPBROADSCOPE (BRACKETCNT L0 L) +NLEFT (X N Y) \TFBRAVO.PARSE.PROFILE.VALUE (VALUE) STKPOS (FLAG I FX) MAKEFILE1 (GROUP X) \VECFONTINIT + (FMLY FD CSINFO) EDITNTH (X N TEM) CHANGERECORD (FNLIST) UNCOPYATOM (ATOM.NAME PACKAGE.NAME) +\INFER.FILE.TYPE (TYPE) FB.OPERATE.ON.FILES (LDFLG FN FORMS) ITIMES (R J) \NSFILING.CONFLICTP (S) +EDIT.LO (X) CLISPBROADSCOPE1 (TEM) TEDIT.UNDO.PARALOOKS (OLDLOOKS NEWLOOKSLIST PC) PRINTCONSTANT (X) +\VFMGetBufferFor (BUFFER FLUSH LAST) EDIT.BI (N B A X) SEDIT::FIND-SELECTION-BACKWARDS (SEDIT::END) +CL::%%RANDOM (CL::RV CL::I CL::J) \TEDIT.FLUSH.UNUSED.LOOKS (FIRSTPC LOOKS) TIMES (J R) EDIT.RO (X N) +TEDIT.SUBLOOKS (CHANGEMADE CH# PC) \TAN-FLOAT (R SIGN RECIPFLG ANSWER R2) TEDIT.LOOKS (TSEL +CHANGERESULT) \TEDIT.CARET (CARET) EDIT.LI (X) COMP.PICOUNT (N ND VARS ARGS) RATOMS (X L) +RESETOPENFILES (FILES F) CONVERT-AFM-FILES (FL AFM-FILE WEIGHT SLOPE FONT FILENAME) \CHTOPCNO (CHNUM +INDEX TREE) MSSEEK-WORD (FND) PUTASSOC (X) LISPXFIND0 (LINE0 TEM L1 THRUFLG L2) \RTP.ACTION (NEWSTATE +STREAM STATE TIMEOUT) \SETUPGETCH (PC CHOFFSET CHARSLEFT PS PF SUBSTREAM) CENTERPRINTINREGION (REGION) + EXEC-EVAL (VALUES) MAKEHARDCOPYMODESTREAM (IMAGETYPE) TEDIT.SELECTED.PIECES (PCLST PC NODE NPCCH PCCH + NPC I) \LOCATE.PUPNET (DATA) FIND.LINE (LINE) \TELERAIDBREAK (USERFRAME FRAME NXT NXTEND NEWFRAME +FREE) PFI.COMPUTE.INDEX.SHAPE (WIDTH PAIR NCOLUMNS NROWS) \CURSORPOSITION (YPOS XPOS) EDITSMASH (TEM L +) COMPILER::ALPHA-COMPILER-LET (COMPILER::VARS COMPILER::VALS) HRULE.DISPLAYFN (THICKNESS Y RULING) +WRITE-UNICODE-MAPPING (CSI F IMAPPING CSETINFO RANGES) FORCEOUTPUT (STREAM) \PUTBASEFIXP.UFN (LO HI +VAL) CLIPBOARD-PASTE-STREAM (STRM) \FM.EDIT-GETPOINTERINFO (MOUSEX WIDTH PTR N) CHAT.BIN (FIRSTTIME) +RPT (RPTV RPTN) \FLUSH.OPEN.STREAMS (STREAM) EQDEFP (CA1 CA2 I) ONEDINSPECT.COPYBUTTONFN (XCL:*PROFILE* + SELECTION) UNBREAK (XCL::FNS) EDIT.BO (X) FRPTQ (RPTV RPTN) COPYATOM (X I) RPTQ (RPTV RPTN) MSSPLST ( +Y) \BIGNUM.LSH (X N) CURSORPOSITION (DD OLDPOSITION) SET-READTABLE-INTERACTIVELY (READTABLES) +GTHASHFILE (HASHFILE) \RSH (XHI XLO X N) GETLOCALDEC (X TL Y) CURSORSCREEN (XCOORD YCOORD DESTINATION) + SAVEDEF1 (X) SEDIT::NEXT-LINEAR-ITEM (SEDIT::LINEAR) \TEDIT.CENTER.SEL (LOOKS OLDQUAD NEWQUAD PARASEL + NEWQUADS) FROM.SCREEN.BITMAP (SCREENREGION SCREEN REGION NEW.BITMAP) CL:BIT-NOT (RESULT-BIT-ARRAY) +SORT.PUPHOSTS.BY.DISTANCE (PAIR) POSTSCRIPT.GETFONTID (FONTID) FIND1STPRIME (I P) CLOSERTPSOCKET ( +SUCCESS) EDIT.BITMAP.REAL (NEW.BITMAP COMMAND.MENU COMMAND DONE PREVIOUS.BITMAP) SEDIT::FIND-SELECTION + (SEDIT::START) FB.GET.NEW.FILE.SPEC (NEWNAME NAMEFIELD FIELDS TAIL PREVTAIL DIR) CH.CREATE.ALIAS ( +OBJECTNAME) EDITGETD (DEF) \FILLINXIP (EPKT LENGTH) COPY-ARRAY (TO-ARRAY) \TEDIT.INSERT.PIECES (INSPC +PREVPC FIRSTPIECE UNDOCHAIN SRCPFILE NPC OBJ AFTERFN CURCH# LEN PC) \TEDIT.CLOSEUPLINES (DY NYBOT +LOWESTY LINE) TWODINSPECT.SELECTCOLUMNPROP (SELECTEDCOLUMNPROP CPROP SELECTEDELTBOTTOM +SELECTEDELTWIDTH XCL:*PROFILE* SELECTEDELTLEFT HMARK) SELECT1 (C L A) \CHANGECHARSET.HDCPYDISPLAY ( +OLDWIDTH W SCALE I) \TYPE.FROM.FILETYPE (PAIR) \LEAF.LOOKUPCACHE (CACHE PREV I) CLISPIFYFNS (TEM CLK) +COPY-VECTOR (END1 END2) SELECTC (C L TL) CH.DELETE.OBJECT (OBJECTNAME) CLISPATOM2A (TEM CLISPCONTEXT) +TEDIT.UNDO.LOOKS (OLDLOOKS NEWLOOKSLIST PC) \VFMLower (word) CURSOREXIT (SCREEN XCOORD YCOORD SCREEN2 +XCOORD2 YCOORD2) \ROUTE.PUP (NDB ROUTE PDH) SOME (SOMEX) DEFAULTMAKENEWCOM (LISTNAME) +TB.MAP.DELETED.ITEMS (ITEM) \NSRANDOM.CREATE.STREAM (ERROR S EOF) SETTERMCHARS (NEXTCHAR LASTCHAR +2CHAR BKCHAR UNQUOTECHAR PPCHAR) CONTINUEDIT (STREAM FILE ENV FC FL TEM) FW-CREATE-OFD-WINDOWS (OFD +OFDWINDOW OFDSTREAM) SEDIT::STRINGIFY-LIST (SEDIT::SUBNODE SEDIT::STRINGS SEDIT::DOT) CH.CREATE.OBJECT + (OBJECTNAME) \NSFILING.OPEN.HANDLE (HANDLE) /ECHOCONTROL (TTBL) CLISPATOM1B (L LST) STRMEMB (Y N C) +LISPXSTATE (X Y) SET-PACKAGE-INTERACTIVELY (PACKAGE PACKAGE-NAME) /SETSYNTAX (TABLE OLDCLASS OLDCH) +\TEDIT.SUBST.FN1 (RESULT) SUBSET (RESULT TAIL MAPX) SIMPLE-COMPARE (END1 END2) +\TFBRAVO.PARSE.PROFILE.PARA (TOKENS TOKEN) ANALYZE-REST (REST-ARG) \SIN-FLOAT (R SIGN R2 ANSWER) DINFO + (GRAPH MONITORLOCK) \GENERIC.BINS (OFF) COMPILEFILES (FILES) OPT.RETMERGE (LEV FEQ VEQ G L1 L2) +\GENERIC.BOUTS (OFF) TEDIT.SCANSEL (SEL) HASHFILEP (HASHFILE) TAILP (Y) \ROUTE.XIP (NDB ROUTE PDH) +%%MAKE-DISPLACED-ARRAY (BASE NEED-INDIRECTION-P OFFSET) \OPENLEAFCONNECTION (PROTOCOLS IFSPORT +NAME/PASS CONN OPUP DATA RESULT) \HDCPYBLTCHAR (CURX MICARIGHT RIGHT LOCAL1 LEFT SOFTCURSORUP +DISPINTERRUPT) CL::%%MAKE-RANDOM-ARRAY (CL::RANDOM-CONST-A CL::RANDOM-CONST-B) +\TEDIT.ORIGINAL.WINDOW.TITLE (TITLE) \FM.EDIT-DELETE (OLDPOINTER POINTER MOVEDOFF END) +CHAT.SCREENPARAMS (TITLEMIDDLE EMACSMODE) MERGEINSERT (LST1 TEM PLACE N LST) MSVERB (ROOT) COMP.CPI (F +) \TTW1 (SCREEN SOFTCURSORUP DISPINTERRUPT ISECT) \NSFILING.CHECK.ACCESS (A) ARCSIN (NEGP XX REDUCED Z + Q1 Q2 SSUM) SEDIT::LINE-FINISHED (CL:BLOCK) COURIER.READ.STRING (I) \NSPRINT.ENQUIRE (PRINTER) +\PUPGATELISTENER (EVENT PUP) SHOWBITMAP1.IP (ROTATION Y) MSMARKCHANGED (ATYPEREC MSMCFN) CLISPATOM2 ( +TEM ENDTAIL-1 Z UNARYFLG LISPFN NEGFLG VAR2 VAR1) CHANGESLICE (L) CL:CHAR-NAME (X CSET CODE) +WITHOUT-INTERRUPTS (VAL) \FTP.OPEN.CONNECTION (INSTREAM) COPY.SEGMENT (TAIL) \FTP.FIX.BROKEN.INPUT ( +NEWSTREAM PAIR CONN) \FM.EDIT-WORDDELETE (END ENDTAILPTR) CHAT.LOGIN (INSTREAM COM NAME/PASS LOGINFO +OUTSTREAM) CONVEXP (PT ORIGX0 ORIGY0 TANGX0 TANGY0 ORIGDX ORIGDY LASTX LASTY TANGDX TANGDY CURRX0 +CURRY0 CURRDX CURRDY NEGSGN PATH RESULT X Y TSGN CSGN OSGN) BIT.IN.ROW (X) ETHERHOSTNAME (NETHOST +SOCKET# BUF IPUP RESULT C) DASSEM.ASMAJ (Y S D P) OPT.RETTEST (F1 F2 L1 L2 ONLYIFSAMEFRAME) \ATMIN (I) + RANDSET (RS1 RS2 RS X I) WALK-FORM-INTERNAL (XCL::NEWFORM XCL::WALK-NO-MORE-P XCL::TEMPLATE XCL::FN +XCL::NEWNEWFORM XCL::MACROP) SCAVENGEDSKDIRECTORY (LISPDIRECTORY LISPFILES) FNTH (N X) +\TEDIT.HISTORYADD (REALEVENT) SEDIT::FIND-NODE-SUBSTRUCTURE-BACKWARDS (SEDIT::END) \SLOWHDCPYBLTCHAR ( +ROTATION NEWX CURX LEFT RIGHT PILOTBBT DESTBIT WIDTH SOURCEBIT SOFTCURSORUP DISPINTERRUPT YPOS +HEIGHTMOVED CSINFO) TWODINSPECT.SELECTROWPROP (SELECTEDROWPROP RPROP SELECTEDELTBOTTOM VMARK +SELECTEDELTWIDTH XCL:*PROFILE* SELECTEDELTLEFT) OPT.RETOPT1 (Y1 END) IDATE (N1 *POS* N2 YEAR DAY MONTH + CH SECONDS MINUTES DEFAULTTIME HOUR TIMEZONE ZONE DST) \LFFileSpec (DIRSTREAM versionList version +dirPtr) MAKEFN (ARGLIST A ACTUAL DEF) \LEAF.REQUESTPAGE (DATA OPUP) EDIT.BITMAP (BM NEW.OBJECT) +\PROCESS.RESET.TIMERS (TIMER UNITS PROC) SEDIT::FIND-NODE-SUBSTRUCTURE (SEDIT::START) \CLEARXIPHEADER +(XIP) \TEDIT.FIND.WC (RESULT RESULT1) \FTP.RECOGNIZEFILE (HOST DESIREDPLIST V DEVICEWANTED CONNECTION +INS OUTS CODE RESULT REMOTEPLIST BESTVERSION BESTPLIST) CL:VECTOR-POP (FILL-POINTER) +COMPILER::COPY-NODE-LABELS (COMPILER::FUN COMPILER::NEW-VAR) TEDIT.COPY.PARALOOKS (LOOKS LEN) +RESETVARS (V) RAND (I J UPPER LOWER) \OUTCHARFN.PRESS (XPOS CHARCODE NEWXPOS CLIPPINGREGION) MAKECOM ( +ARGNAMES VAR I ARG FORM LST) \BSP.HANDLE.INPUT (EVENT PUP TIMER) INITUFNTABLE (I X) IMOD (X) +\TEDIT.CHANGE.LOOKS (PCTB \INPC FONT NEWLOOKS FAMILY FACE SIZE PROT SELHERE ULINE OLINE INVERSEVIDEO +STRIKE INVISIBLE SUPER SUB WEIGHT SLOPE EXPANSION SIZEINC OFFSETINC STYLE STYLESET USERINFO UISET +FOOLOOKS CHLIM PC1 PCN OLDLOOKSLIST NEWPCLOOKS NEWFONT PC) SMARTARGLIST (TEM DEF OTHERDEF FN) +\SETDAYTIME0 (BOX) \INTERNALTOTOPW (W1 SCREEN SCREENTOPW) EXPT (V N A) NONSYSPROPNAMES (PROP) +SEDIT::LAST-LINE-LINEAR (SEDIT::NODE) CH.LIST.OBJECTS (OBJECTPATTERN) HLSTORGB (Max Min) +\NSFILING.FULLNAME (INFO FULLNAME HANDLE DIRECTORYFLG VERSION PATHNAME CH VERS I DIRLST START DOTSEEN +PREVDOT FUNNYCHAR FILENAME QUOTEDDIRS ALREADYQUOTED) \LEAF.ADD.QUOTES (I PIECES N) +\HCPYMODEDISPLAYINIT (WINDOWFN) PATH.LESSP (PT1 PT2 Y1 Y2 X1 X2 U1 U2) MODERN-MENUBUTTONFN (MENU) +\PUTFIXP (HI LO NUM) BREAKCONNECTION (DEV BREAKFN DEVICE HOST) REGIONONSCREEN (LEFT BOTTOM) +\PUTSWAPPEDFIXP (HI LO NUM) WORD.MATCHES.BUFFER (BUFCH BTAIL CHAR I) PRINTXIPROUTE (CSECS) +\TEDIT.WINDOW.TITLE (W) SEDIT:SEDIT (CL:STRUCTURE) \STRINGWIDTH.HCPYDISPLAYAUX (C CSET WIDTHSBASE +TOTAL ESC ESCWIDTH TOTALWIDTH) PRINTPUPROUTE (CSECS) CL:GRAPHIC-CHAR-P (CSET CODE) \GENERIC.OPENP ( +STREAM S) CL:MOD (CL:REM) \GENERIC.RENAMEFILE (OLDFILE NEWFILE) \HANDLE.PUP.ROUTING.INFO (HOST HOPS +NET BUCKET ENTRY OLDHOPS NEWTIMER LENGTH BASE) CL::SIMPLE-STRING-EQUAL (END1 END2) CLISPATOM1A (ISFLG +BRACKETCNT BRACKET ENDTAIL CLTYP0 CLTYP BROADSCOPE OPRFLAG TYP) SAMEPARALOOKS (F) +COMPLEX-COMPARE-FORWARD (END1 END2) FMAX (J Y X) \VECPUT (XPOS YPOS) \TOTALFIXEDHEIGHT (ATW +THISMINHEIGHT) GETSCREENPOSITION (WINDOW) CH.RETRIEVE.DOMAIN.ACL (DOMAIN) \VAMUpdateVAM (VAMPage +VAMWord VAMBit result) SCALE/TONODES (NODEID prop val) FILEGETDEF.VARS (X) \GS.INITBUF (N NUMLEN) +COPY-CIRCLE (SCANBUF VAL REST BODY NEW ID AUX) EDITTOGGLELABEL (NODE) PASTEFROMCLIPBOARD (C) FMIN (J Y + X) LOAD? (FULL FILE) \COURIER.ATTENTIONFN (CON STREAM) GETHASH (BITS INDEX ABASE SLOT VALUE SKEY EQFN + FIRSTINDEX REPROBE LIMIT) PARSE-FORMAT-OPERATION (PARMS) PFI.CENTER.PRINT (GAP X) RECLISPLOOKUP ( +CLASSDEF LISPFN) MAKE-NETWORK-TRACE-WINDOW (W DS) TEDIT.SELECT (SEL PREVLINE) TEDIT.SUBPARALOOKS ( +CHANGEMADE CH# PC) LOADCOMP (ROOT) \INSPECTW.REDISPLAYPROP (XCL:*PROFILE* ITEMSELECTED? NEWVALUEREGION +) \TEDIT.WORD.BOUND (SYN1 SYN2) PREVWORD (START NEW %#HITS X N) \CIRCSHADE.XSCAN.IP (Y X U V E X0 Y0) +SEDIT::FIRST-LINE-LINEAR (SEDIT::NODE) CHAT.CLOSE (FILE PROC KEEP ICON) \FM.MENUHANDLER (BUTTONS +LASTITEM ITEM REGION PROMPTFLG) \3MBRAWTRANSMIT (PACKET) IMLTLIST (NLIST X Y U V) CHECKIMPORTS (FILES +FILE FULLFILENAME DATE) ADD.BORDER.TO.BITMAP (NEW.BITMAP) IMAX (J X) FILL/GRAPHNODE/LABEL (NS) +OPT.RETPOP (RET VAL TAGS ANY) \MAP-OPEN-STREAMS (DEVICE) \TEDIT.PUT.CHARLOOKS.LIST2 (LOOKS I) +SEDIT::SHIFT-LINEAR-FORM (SEDIT::X) \INSERT.FIRST.PIECE (PC) IMIN (J X) COMPLEX-COMPARE-BACKWARD ( +START1 START2) \TOTALFIXEDWIDTH (ATW THISMINWIDTH) PRINT-LOADED-FILE-INFORMATION (X) READATABASE (NAME + FN TAB NEWREL) MSCOMMAND (TEM SET) SETYREL.IP (DY) FILEGETDEF.FNS (ENV MAP PAIR MAPLOC SOURCE) +OPT.JSIZE (Z) MENUBUTTONFN (MENU SELECTION) \SETUPTIMERmacrofn (TimerUnits IntervalUnits CLOCKFNNAME +INTERVALFORM TIMERFORM) NORMSECT (D X0 DX DDX DDY XL XR) STKARGS (I) MAX (J Y X) ADJUSTLINE (LINE ROW +NEXTLINE OVFL %#BITS USECR BREAK START NEWENDLINE OLDENDLINE JUSTIFYING LASTCOL) XYPT.LESSP (V1 V2) +BRKDWNRESULTS (CL:VALUES I) \UPDATE.PBT.RASTERWIDTHS (PBT) \TEDIT.GET.SINGLE.PARALOOKS2 (TABSPEC +TABFLG DEFAULTTAB TABCOUNT TABS TAB#) MIN (J Y X) \CanonicalizeTimerUnits (Y CONVERTEDP) OPT.RETFIND ( +L1 R) APPENDNUMBER.IP (I R) \PAGED.INCFILEPTR (NEWPAGE NEWOFF) \TEDIT.FIND (W SEL CH) FIND.NEXT.WORD ( +BUFTAIL BACKUPFLG N) BIT.IN.COLUMN (X) \LEAF.DEVICEP (I NAME DEVICE SEQUIN CONN) \PRESSFAMILYCODELST ( +TYPE NEXT PAIRS I) OPT.RETOPT (TESTL TARGL) DMPHASH (AP) FTIMES (R J) INTCHECK (CHR NCHR) +TEDIT.SEL.AS.STRING (STREAM TSEL LEN RESULT I) \BUFFERED.BIN (OFF X) FPLUS (R J) \DECODEPRESSFACEBYTE +(EXP FACECODE WEIGHT SLOPE) \CIRCSHADE.DISPLAY (table Y X U V E X0 Y0) FIND.CHAT.PROTOCOL (PAIR RESULT +) \FM.RIGHTBUTTONFN (ITEM REGION) SEDIT::REPLACE-CHARS (STRING) DIRECTORY.MATCH1 (PATTERN OKCHARS +PATCHAR PAT FIRSTCHAR TESTCHAR) MSTRYSPELL (PTR) \BUFFERED.PEEKBIN (OFF X) FW-FILTERED-FILE? (FILTER) +\LFPurgeDirectory (file) CLRPLNODE (L) \BUFFERED.BOUT (OFF) BREAKDOWN (FNS N I) FILEGETDEF.PROPS (X +TAIL) CHNGNM (FN OLD DEF NEW Z Y X) UNSET (X TEM NAME) WRITE (STREAM *PRINT-CIRCLE-HASHTABLE*) +\PS.SCALEHACK (FACTOR) FB.UNDELETE.FILE (SIZE) SEDIT::INSERT (SEDIT::WHERE SEDIT::PENDING-DELETE? +SEDIT::NODE) \BOXFPLUSDIF (Y HY LY SIGNY EXPY X HX LX SIGNX EXPX EXPDIFF CARRY PLEASENORMALIZE) +FW-CREATE-OFD-LIST (FILESTREAM FULLNAME) SELECTQ1 (C L) TTYIN.BALANCE (X) \BUFFERED.BINS (IBASE START +CNT END OFFSET BYTESLEFT X) \BOXFTIMES2 (X HX LX SIGNX EXPX Y HY LY SIGNY EXPY SAVEHY SAVELY CARRY LZ +HZ HHZ HHY) SI::ADVICE-PUTDEF (SI::ENTRY) PFI.PRINT.INDICES (ITEM INDICES FREECHOICE X LINESREMAINING) + TTLASTLINE (L LINE) \CIRCSHADE.IP (Y X U V E X0 Y0) \MOVEBYTES (SBN DBN DB SB NBYTES NWORDS) +\BOXFQUOTIENT (X HX LX SIGNX EXPX Y HY LY SIGNY EXPY HZ LZ) USERLISPXPRINT (FN) \LEAF.DELETEFILE (DATA + IPUP) \LFOpenOldFile (SIZE LASTPAGE OFFSET) NS.AUTHENTICATE (SIMPLE.CREDENTIALS RESULT) +\TEDIT.PUT.SINGLE.PARALOOKS2 (DEFAULTTAB TABSPECS) PFI.CONDENSE.INDEX (INDEX *PFI-INDEX-ALIST* OLDNAME + TYPEPAIR FILTERS FILTER PAIR F) \LFDirectoryP (directoryID stream) CCCSCAN (CODELOC NAME NAMELOCS NT1 + B TAG DEFLOCS CONSTLOCS PTRLOCS) \BUFFERED.BOUTS (DBASE START CNT END NBYTES OFFSET) +MSTYPEMATCHRATING (X Y) ADDPROP (NEW X X0) VALUOF (Y) \FLOAT (HI LO SIGN) TEDIT.INCLUDE (STREAM NFILE +WASOPEN NNFILE START END TEXTLEN NSTREAM PCTB INSERTCH# INSPC PCLST LEN) \TEDIT.FIND.PROTECTED.START ( +PC START-OF-PIECE) /REMPROP (VAL X X0) NEGC (X) \SCROLL.HANDLER.DOIT (LFT TOP) \LEAF.GETFILE (HOST +REMOTENAME CONNECTION OUTCOME CACHEDSTREAM NAME/PASS OPUP DATA IPUP FILELENGTH LEAFHANDLE OLDSTREAM +CONNECTNAME/PASS) TEDIT.EXTEND.SEL (NPOINT SETOSELFLG FIXUPNEEDED) \MAKEFLOAT (BOX HI LO EXP +ROUNDINGBITS) EMBEDPROG (X LE LL) SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (SEDIT::DELTA) FW-OFD-EXISTS? +(OFD) LAYOUTSEXPR1 (R) COMPILER::META-CALL-LAMBDA-SUBSTITUTE (COMPILER::TAIL COMPILER::VAR) +FILEGETDEF.MACROS (TAIL) CLISPIF0 (L Y PRED X L-1 L0 $SIDES CLAUSE TEM LF LY FIRSTP) +\CANONICALIZE.PUP.HOSTNAME (OFFICIALNAME) CIRCLAR-COPYER (SCANBUF VAL REST BODY NEW ID CIRCLAR-FLAG +AUX) \ItemNumber (SOMEITEM ITEMNUM) FIXSPELL (REL TLST Z X FIXSPELLTEM APPROVALFLG L NDBLS) +TEDIT.GET.LOOKS (LOOKS NLOOKS) SETUPTIMER (INTERVAL OldTimer? timerUnits intervalUnits) \LOAD-STREAM ( +DFNFLG ADDSPELLFLG BUILDMAPFLG FILEPKGFLG LISPXHIST LOADA TEM ROOTNAME MAYBEWANTFILEMAP) +\TEDIT.REFRESH.SHOWSEL (NOSEL OLDSEL) \TOTALPROPOSEDSIZE (THISMINWIDTH THISMINHEIGHT THISWID +THISHEIGHT) CLISPATOM0 (UNDOSIDE UNDOSIDE0 LISPXHIST UNDOTEM TEM CHARLST CURRTAIL) HEXSTRING (LEFT I +CHAR N) FW-LOOP (OPENFILES) \CANONICAL.HOSTNAME (NAME) SETXYREL.IP (DX DY) ONEDINSPECT.VALUEWIDTH ( +PROP) COMPILER::FRAME-ANNOTATE-TAGBODY (COMPILER::REQUESTS COMPILER::OUTER-REFERENCES) TTNTH (BUF N) +\CIRCSHADE.BLT (OPERATION Y X U V E X0 Y0) EDITTOGGLEBORDER (NODE) TTNLEFT (START X N B) +TEDIT.ADD.MENUITEM (OLDITM) \INFINITY (BOX) AT.END.OF.TEXT (X) FIXFIELDORDER (UNUSEDFIELDS TEM +FIELD.USAGE X REVFIELDS TL LASTFIELDTAIL USE1 USE2 PLACE2 PLACE1) APPENDLARGEVECTOR.IP (INTSIZE I) +SETCORNER (NEWCURSOR OLDCURSOR) POSSIBILITYFN (COMVAR##) LAYOUTLATTICE (R FONT FAMILYD MOTHERD +PERSONALD) DUMPDATABASE (DUMPTABLE DUMPEDFLG) LOAD (TEM LDFLG PACKAGE STREAM) NARGS (DEF) +\TEDIT.FORMAT.FOOTNOTE (LINES LINE THISLINE FMTSPEC CHNO PREVLINE) HASDEF (TYPE TY SOURCE) +\TEDIT.GET.CHARLOOKS.LIST2 (I) PRINT-ARGLIST (LEFT ARGS ACTUALS MODE) \TFBRAVO.GETPARAMS (TEST REST +ALIST L) FIXEDITDATE (E) SCALEPAGEUNITS (TVAL) \ARGPTR (DEF P BFLINK NARGS FRAME) IMAGESTREAMP (STYPE +X) OPT.FINDEND (C) \UPDATE.EXTENT.IMAGE (SCROLLWIDTH SCROLLHEIGHT WINHEIGHT GRAYHEIGHT GRAYBOTTOM +WINWIDTH GRAYWIDTH GRAYLEFT) DELDEF (TYPE TEM) EQUALN (DEPTH) IMAGESTREAMTYPEP (X) \GETSPP (EPKT) +\CH.GUESS.NEW.PROPERTIES (PATTERN MINPROPERTYID MAXPROPERTYID OBJECTS ID) \MATMULT441 (PRODUCT I J K) +STKNTH (CFLAG I FRAME) OPT.DELTAGREF (X) \TEXTBIN (PO SUBSTREAM OPC PC NPC PS PF) COMPILER::CONSTRUCT-LIST + (COMPILER::NODE) TEDITCHAT.MENUFN (COMMAND) \MATMULT144 (PRODUCT I J K) EDITV (EDITVX VAR) +\LFCreateFile (stream DIRINDEX) \FM.WINDOWENTRYFN (ITEM REGION) \MATMULT331 (PRODUCT I J K) SETSTKNAME + (FNH) U/L-CASE (OLDLENGTH CHAR CAPFLG BUF NEEDADJUST) \MATMULT133 (PRODUCT I J K) \COPYFNHEADER ( +HEADWORDS NEWFNHD) \MATMULT444 (PRODUCT I J K BSTART ASTART) LISPXEVAL (LISPXID LISPXHIST) +PFI.PREVIEW.DECLARE (NEXT STARTOFLINE) TEDIT.HARDCOPY-COLUMN-END (ORIGINAL-LINES LINE FINAL-CHNO +LASTLINE LINES REMOVED-LINES YBOT) PRINTPACKETDATA (OFFSET MACRO DATATYPE TMP TILOFFSET REPEATMACRO +SEPR FINALPRINT CHAR) \MATMULT333 (PRODUCT I J K BSTART ASTART) IMAGEOBJPROP (IMAGEFNS) STKSCAN (FX) +OPENIMAGESTREAM (FILE LPTP POS LPTNAME IMAGETYPE P) /TCONC (XX) \AddShade (SHADEDITEM SHADEDITEMS) +\FRAMESCAN (NAME TMP OFFSET) FNTYP1 (X) COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS (COMPILER::TAIL +) \TEDIT.NEUTRALIZE.PARALOOKS.MENU (SCRATCHSEL) \LFGetStreamForFile (DIRPTR volNum) LCSKIP (LA LEN) +PRINTERPROP (X) CL:GET-MACRO-CHARACTER (NON-TERMINATING-P TABENTRY) \LFMakeVolumeDirectory (file) +RUNION (X L2) MOVEBOX (SOFTCURSORUP DISPINTERRUPT) SHRIEKER (CARTEST LOOKAT RESULTP) OPT.COMMONBACK ( +BDEF FLG LEVEL FRAME BREF G) APPENDINT.IP (I) DO-DISPATCH-MACRO (NEXTCHAR INDEX) PRINTERTYPE (HOST X +TYPE FN PRINTER) FILEGETDEF.LISPXMACROS (X) MSSEEKPHRASE (THIS OLDS C TEM X) PUTPUPSTRING (PUP) +UNIX-STREAM-IN (CH) GETDEFFROMFILE (FILE SOURCE DEF TEM2) PRINTANDBOX (PREVRM PREVLM YSTART YEND HGHT) + FLOATP.TO.BCPL (FLONUM EXP FRAC RESULT) OPT.JUMPREV (R PR BD ABD BR ABR OABR OAR TMP ANY END FLG CD +LB DR) DRAWGRAYBOX (SOFTCURSORUP DISPINTERRUPT) \MAXWIDTHOFGROUP (WHEREONEDGE ATW) HPRINTEND (X I) +PRINTFILETYPE.FROM.EXTENSION (TYPE) FILEGETDEF.ALISTS (X) \DO-DEFINE-FILE-INFO (VALUE PACKAGE +READTABLE BASE FORMAT) EXEC-READ-LINE (LINE SPACEFLG CHRCODE) GETDEFSAVED (X) EDITP (EDITPX ATM) +BCPL.TO.FLOATP (BCPLNUM SIGN EXP FRAC) XCL::GET-UNDOABLE-SETF-METHOD (XCL::TEMP) ADDFILE (VAL FCLST +LOADTYPE X FLST TYPE CHANGED) RESET/NODE/BORDER (TRANS GRAPH) COMPILER::META-CALL-LAMBDA (COMPILER::PARAM + COMPILER::ARG COMPILER::NEW-PARAMS COMPILER::NEW-ARGS COMPILER::CURRENT-PROG1-TAIL COMPILER::*MADE-CHANGES* + COMPILER::CURRENT-PROGN COMPILER::NODE) CHAT.BUTTONFN (CHAT.STATE CHAT.PROC) \TEDIT.SET.WINDOW.EXTENT + (WINDOW) SEDIT::OPEN-LITATOM (SEDIT::SUB-STRING) \LFUpdateLeaderPage (createDate) UPDATEFILEMAP (TEM +FILEMAPADR FILEMAPLOCADR FILEMAPLOCLEN FULLNAME STREAM) \TEDIT.FIND.LAST.LINE (LINES OLINE LINE) +\TEDIT.LOOKS.UPDATE (PARALOOKS TLOOKS PREVPC ORIGPC NEWPC) SETXREL.IP (DX) MSVERBTYPE (OBJECT SUBJECT +TYPE) \SPREADFRAMEP (BFLINK NARGS) READPLIST (TAB2 CH) DINFO.UPDATE.MENU.DISPLAY (ID WINDOW) TRYNEXT1 +(PL1## PLST##) COPIEDFROMSPEC (FROMSPEC I CAN) CENTERPRINTINAREA (STREAM XPOS) SMASHFILECOMS (X) +CL:SET-DISPATCH-MACRO-CHARACTER (SUB-CHAR DISP-CONS) SHOWSHADEDITEMS (ANYSUBITEMS ITEM ITEMDESCR SHADE + ITEMREGION) IL-MACRO-WRAPPED-P (FORM) MENUITEMREGION (ITEMNUMBER ITEMTAIL) SETSTKARG (NT INDEX NTSIZE + NARGS BLINK) SKIP/ZAP (CHAR CMD N) \FILLPOLYGON.IP (NUMPATHS) \TEXTBOUT (TEXTLEN WINDOW PS PC OFFST) +CREATEWFROMIMAGE (WINDOW) STKARGNAME (NT NTENTRY NARGS NM NT1 NT2) BUILDTESTRELQ (FORM) MAPRINT (PFN +SEP LST) ENUM-STRING (POINTPLACE EXPOFFSET INTEXP MANTSTR DIGITS) SI::INSERT-ADVICE-FORM (SI::ENTRY-LIST +) SETSTKARGNAME (NT NTENTRY NARGS NM NT1 NT2) MB.DEFAULTBUTTON.ACTIONFN (OFILE CH PRINTHOST %#COPIES +PRINTOPTIONS %#SIDES MSG) PROMPTCHAR (PROMPTSTR N MOD) CH.DELETE.MEMBER (OLDMEMBER GROUPNAME) +%%PRINT-ARRAY-CONTENTS (ELIDED FINAL.INDEX) DINFO.UPDATE.TEXT.DISPLAY (FULLFILENAME TEXTSTREAM) +HASH-LEFTPAREN (CONTENTS I) \POSTSCRIPT.ACCENTPAIR (CH ACCENT) LISPXPUT (LST Y) \CONVERTNUMBER (SIGN +COMMONLISPY END DIDQ POS X) PRETTYDEF (ROOTNAME SOURCEFILE DESTINATIONENV SOURCEFILENV OLDFILEMAP +SOURCEFC REPRINTFNS PRTTYFILE FCLOCATION) STKNARGS (NA INTERPNT) OPT.LABELNTHPR (CD CNT G) NLIST (V I) + FILEPKGCHANGES (X TEM Y Z) HPRINT1 (TYPE LASTSEEN HERE CN TYP INDEX I SIZ VALS PROP) PRINTCOPYRIGHT1 +(PRIVATE DATES Y START END NEXT) FORMAT-PRINT-RADIX (PARMS) TTECHO.TO.FILE (X FIRSTIME END CH LINE) +LISPXREADBUF (RDBUF TEM XX) \CML-LOAD (EXPR) %%DEFPRINT-VECTOR (END.INDEX) \POSTSCRIPT.ACCENTFN (CH) +ITEM.WINDOW.SET.STACK.ARG (NEWVALUE) FB.HARDCOPY.MAXWIDTH (DATEP ITEM INFO WIDTH MAXWIDTH) GREET (FILE +) FNUM-STRING (PLACESOUT) \TEDIT.FIND.PROTECTED.END (PC START-OF-PIECE) MB.SIZEFN (FONT BOX) +\GOOD.DASHLST (DASHLST NDASH NOWOFF) SEDIT::INSERT-STRING (SEDIT::START SEDIT::END STRING TYPE) +\APPEND2 (TAIL L1) FB.NAMES.INCREASING.VERSION (X Y) CHECKDEFS (D R FOUND DEFS) FIXR (X HI LO SIGN EXP + ROUNDINGBITS) %%DEFPRINT-BITVECTOR (END.INDEX) SAVECOPYRIGHT (X) PRINTCOPYRIGHT (OWNER) +\LEAF.CLOSEFILE (CONNECTION STREAM LEAFHANDLE OPUP DATA) DECLAREDATATYPE (FIELDSPECS DLIST LENGTH P) +READFROMBUF (BUF FIXUP CH START) \TEDIT.GET.PARALOOKS.LIST2 (I) FLTSTR (outstring F FHI FLO SIGNF FEXP + FLOG10 EXP MANT TLO THI TEXP ROUNDINGBITS LOCALK MANTSTRING ENDPOINTER) EDITBMTEXTURE (COLOR SHADE) +GREET0 (DIGIT TEM HOUR) \TRACKWITHBOX (MLMASK DESTINATION ORGLEFTMIDDLE NOERROR OLDCURSOR) DWMFY2 ( +CARPARENT CLISPCHANGE 89CHANGE NEXTAIL X FNFLG TEM NOTOKFLG) \VAMFindFreePages (volPage# filePage#) +TIMESPOW10 (CURPOWER TABENTRY EXP HI LO POWER) TRANSLATE.DATATYPE (DLIST N S FD X Y BIT OFFSET LEN +REUSE) GETPUPSTREAM (PUP OFFSET) GETDEFERR (TEM O) INTTOEXT (HI LO N EXP) FILEDATE (STREAM OLDPTR +VALUE) \TEDIT.TRY.ABBREV (EXPANSION CH) EXTTOINT (EXP LO HI ROUNDFLAG) COURIER.BROADCAST.CALL (PROCDEF + SKT EPKT RESULT NET NEARBYNETS TAIL PAIR) REFLECT/GRAPH/DIAGONALLY (N) FLTINTLOG (FEXP FHI FLO +TABENTRY I) \FM.COLLECTNWAYS (NWAYPROPS ITEMPTR GROUPID ITEMID) \RESHAPEATTACHEDWINDOWSAROUNDMAINW (TL + TC TR RT RC RB BR BC BL LB LC LT ATWINFO EXTENT ATW ATWHGHT ATWDTH ATWHERE TEMP) /PUT (TEM X X0) +FW-CLOSEFN (OFD) \TEDIT.PUT.SINGLE.PARALOOKS (DEFAULTTAB TABSPECS LEN) RPLCHARCODE (N) \REUSETO (N) +MAXSTRINGWIDTH (I M) PUTPUPBYTE (PUP) DO-EVENT (INPUT TODO STR COM VALUES) %%REDUCE-INTEGER (LOW HIGH) + FB.DECREASING.VERSION (Y X) \MAXHEIGHTOFGROUP (WHEREONEDGE ATW) \UPDATEXYANDBOX (TEMPX TEMPY) +READLINE (SPACEFLG CHRCODE TEM LINE START) FW-INTERACT (MENUCMD) FLONUM-TO-STRING (MANTSTR INTEXP +DIGITS DECPNT) OPT.LBDEL (B) COPY.TEXT.TO.IMAGE (C FC DEFAULTTAB) REFLECT/GRAPH/VERTICALLY (N) +BOOTSTRAP-NAMEFIELD (POS START END) CL:CHARACTER (OBJECT) SEE* (LINE) DIGITSBDP (F FHI FLO SIGNF FEXP) + EDITLOADFNS? (LST FILE DATES FD) DECLARE%:1 (EVALFLG X) DO.EDIT.PP (LEFTOVER EXPRS) +%%NUMERIC-STRING-P (CHAR) TEMPLATE (OLD) TTYINSTRING (TAIL FATP NC X RESULT I) MMLTLIST (NLIST X Y U V +) READHOTSPOT (NOWCURSOR XPIXEL YPIXEL CURSORBM DOWNYET?) MSMSGPRINT (MSG) GETFILEDEF (FILE) +EDITMOVENODE (NODELST NEAR OLDPOS NOW) \FM.WINDOWEXTENT (ITEM REGION) \FM.MAKELINKS (LINKTAIL ITEMPTR +GROUPID ITEMID) \NSRANDOM.WRITE.SEGMENT (BUF BYTESLEFT CNT OFFSET) TTDELETECHAR (DODELETE) \EXTFTIMES +(HX HY LX LY HHZ HZ LZ) PFI.HANDLE./DECLAREDATATYPE (EXPR) APPENDIDENTIFIER.IP (C) DWMFY1 (TEM CARFORM + CARISOKFLG CLISPCHANGE 89CHANGE X) MSVBTABLES (MOD VERB) COPYINSERT (INSERTFN IMOBJ) PRETTYPRINT3 ( +TEM DEF) REMPROPLIST (LST1 LST TEM) NODELST/AS/MENU (N T1 T2) GETDEFCURRENT (DEF X) \STRINGIN (STR I) +PRINTHISTORY2 (TEM) \TEDIT.HCPYLOOKS.UPDATE (PARALOOKS TLOOKS PREVPC PC NEWPC OFFSET NEWKERN) +COMPARENCHARS (COMPARECNT) SETFONT.IP (X) TTNEXTLINE (L LINE N) MSBLOCK (TYPES FNS FILES) GETPUPSTRING + (PUP OFFSET) \FM.UPDATEGROUPEXTENT (GROUPLIST GROUP REGION DAUGHTERS BOXOFFSET) COMPILEDFETCHFIELD ( +TYPENAME DATUM) CLOSE-AND-MAYBE-DELETE (STREAM) PARSE-NAMESTRING1 (FILE TEM POS HOSTP END TYPE CODE +TEM2 SUBDIREND) SEDIT::SELECT-NEXT-GAP (SEDIT::NODE) \LISP.TO.NSFILING.ATTRIBUTE (ATTRIBUTE VALUE X +COERCEDVALUE ENTRY ACCESS TL) ALLPATHS (DEFS DEC TRAN ANY TL) UNSAVED1 (DEF PROP FN) DRAWDASHEDLINE ( +LINELENGTH DASHLST NDASH DASHTAIL SINE COSINE DASHCNT LENGTHDRAWN NEWX NEWY DASHON X1 Y1) GENERATEFN ( +COMVAR##) BUILDGETRELQ (F1 FORM) SET/LABEL/SIZE (WIDTH HEIGHT NBW FONT) PRETTYPRINT (LST CLK FN DEF +TEM) TERM.PRINTCHAR (IMAGEWIDTH CHARWIDTH) DRAWLINE (STREAM) REFLECT/GRAPH/HORIZONTALLY (N) GETDEFCOM0 + (TEM) \SEARCHPRESSFONTS (F WSTRM FONTSFOUND) COMPILEDREPLACEFIELD (DATUM) DINFO.UPDATE.HISTORY (ITEM +I) MOVETO (STREAM) CH.ADD.MEMBER (NEWMEMBER GROUPNAME) \EXTNORMALIZE (EXP HI LO ROUNDINGBITS) MSFINDP +(STRUC) SEND.FILE.TO.PRINTER (FULLFILE PFILE FILETYPE HOST X PRINTERTYPE) FB.SORT.VERSIONS (THISNAME +NEXTTAIL NEWTAIL TAIL ITEMS PREVTAIL) SQRT (V) COPYALLBYTES (INF OUTF) \EXTFQUOTIENT (LX HX LY HY HZ +LZ) CLISPEXPANSION (COP) MSJOINSET (C TYPE) CL::SXHASH-PATHNAME (CL::HASH) CL::ENSURE-CONSISTENT-PS ( +CL::EXPORTNAMES) INIT-CML-READTABLES (I) SEDIT::HASFAT (SEDIT::C) GRAYBOXAREA (OUTLINESIZE) +DSPBACKCOLOR (STREAM) \CONVERT.FLOATING.NUMBER (FORMAT F) COMP.LOOKUPCONST (X) OPENIPSTREAM (OPTION +POS) \TEDIT.PARSE.CHARLOOKS.LIST (FONT FAMILY FACE SIZE PROT SELHERE ULINE OLINE INVERSEVIDEO STRIKE +INVISIBLE SUPER SUB WEIGHT SLOPE EXPANSION OFFSETINC SIZEINC STYLE STYLESET USERINFO UISET NLOOKS +NEWLOOKS NEWPCLOOKS NEWFONT) \VFMMarkBufferDirty (BUF) FW-OPENP (!SCRATCHTAIL FD OPENPFN S) WBOX (THCK +) FW-UPDATE-OFD-WINDOW (NEWCURPOS NEWEOFPOS NEWPCTPOS X Y) MB.SETIMAGE (BOX BITMAP DS) PUTPUPWORD (PUP +) XCL::SETF-GET-PROCESS-PROFILE (XCL::PROFILE) FB.DELVER.FILES (FILE THISNAME %#SEENSOFAR %#DELETED +LASTNAME) TEDIT.HARDCOPY.PAGEHEADING (NPC PIECES PC LEN) COMPAREPRINTN (SPACE) DSPBOTTOMMARGIN (STREAM +) SHORTLST (N) CL:MAKE-ARRAY (DIMENSIONS FILL-POINTER ARRAY) SKOR (XC TC XWORD TWORD NCX NCT X-1 N +NTRANS T2 T1 X2 X1) \FM.TRANSPOSEVERT (ITEM REGION) PARSE.NSNAME (NAME I FIRSTPART SECONDPART J +THIRDPART) SHEDSCAN (TAIL EDGE X0 Y0 DX DY BRES YDIR) EDITNUMBERP (CHAR) MSFAIL (POS) DSPCOLOR (STREAM +) \FM.MAKEBITMAP (CLIPPINGREGION) \FM.TRANSPOSEHORZ (ITEM REGION) MERGLIST (CURR1 CURR2 Y1 Y2 IMAP +PATH1 PATH2) GLOBAL-MACRO-FUNCTION (PROP MD) TB.FINISH.CLOSE (WINDOW) READ-AFM-FILE (TOKEN WEIGHT +SLOPE FBBOX HEIGHT CMCOUNT CCODE FCHAR LCHAR CC) \CHECKSUM (CHECKSUM ADDR CNT) \PFReplaceString ( +newString CHAR POS) PRETTYCOM (PRTTYTEM PRTTYCOM LST X) SPY.ADD.ENTRY (NAME) +\UNVISIBLE.FLUSH.OPEN.STREAMS (STREAM) \MAIKO.PUNTBLTCHAR (CHAR8CODE CURX RIGHT LOCAL1 LEFT +SOFTCURSORUP DISPINTERRUPT) GET-ENVIRONMENT-AND-FILEMAP (MAPENTRY MAP STREAM OLDPOS) DSPCLIPPINGREGION + (STREAM) SEE (LINE) \GETPRESSFONTNAMES (TYPE NEXT XFAMILY XFACE SPEC XFIELD XSIZE XROTATION +FONTSFOUND) MINIMUMWINDOWSIZE (EXT) EQLENGTH (X) \SHADEBITS (BITSPERPIXEL OTHERCOLOR SHADE OTHERSHADE +XPIXEL X YPIXEL Y USECOLOR USESHADE COORDWIN) \FLOATINGSCALE (INTMANT SIGN) PRINTFNS (FNADRLST) +\BULK.DATA.CLOSE (ABORTFLG) \UNVISIBLE.PAGED.REVALIDATEFILELST (STREAM REASON PAGES) +GETEXPRESSIONFROMEVENTSPEC (LL NEXT INPUTLINES) \INIT.POWERS.OF.TEN (POWTEN I POW10 ENOW EEXP EHI ELO) + SUBPAIR (OLD NEW) GET-FILEMAP-FROM-FILECREATED (MAPADDR) \SETGROUPMIN (ATW THISMAX TMAX CMAX BMAX +LMAX RMAX) DSPRESET (STREAM) \TEDIT.PARSE.PARALOOKS.LIST (1STLEFT LEFT RIGHT LEADB LEADA LLEAD TYPESET + TYPE SUBTYPESET SUBTYPE NEWBEFORESET NEWBEFORE NEWAFTERSET NEWAFTER HEADINGKEEP KEEP KEEPSET BASETOBASE BASESET REVISED REVISEDSET QUADD COLUMN COLUMNSET USERINFO USERINFOSET SPECIALX SPECXSET -SPECIALY SPECYSET STYLE STYLESET CHARSTYLES CHARSTYLESSET TABSPECC NEWLOOKS) |\\UFSTruncateFile| ( -PAGE# OFFSET) |\\LFRemoveDirEntry| (NEWENTRYSIZE) ARCTAN (FLIPPED XX X2 SSUM) SCALEBM (SRCEWIDTH -SRCEHEIGHT DESTWIDTH DESTHEIGHT TEMPBM) TTDELETECHAR (DODELETE) MSCHECKEMPTY (CF Q) -\\PARSE.PORTCONSTANT (STR CH VAL NET HOST) TEDIT.INCLUDE (STREAM NFILE WASOPEN NNFILE START END -TEXTLEN NSTREAM PCTB INSERTCH# INSPC PCLST LEN) D-ASSEM::TYPE-NAME-FROM-SIZE (D-ASSEM::HUNK-SIZE) -TEDIT.PARSE.PAGEFRAMES1 (FRAMETYPE PAGELIST PAGEFRAME) BLTPATTERN (SW SH OPER TW TH SRCE SX SY) -TTDELETEWORD (PREVL START) MSOUTPUT (FILE) \\FIXLOCALNET (NET) CLISPLOOKUP (CLASS CLASSDEF TEM) -TEDIT.GET (OFILE WINDOW PCTB LINES FIRSTLINE LINE TITLE MENUSTREAM FILENAME) |\\UFSCloseFile| (CDATE) -FILEPKG.MERGECHANGES (E1 E2 TEMP X VAL) FM.HIGHLIGHTITEM (ITEM GROUPID ITEMID) EDITDELETENODE (NODE -NODELABEL) PRINTDEF1 (STARTPOS ENDPOS) |\\LFEventFn| (|vol|) \\COMPUTE.ARC.POINTS (ANGLEINCR ANGLE) -CLISPATOM2D (X Y) \\NSRANDOM.FETCH.CACHE (TAIL PREV PAIR) CLISPATOM2C (TAIL0) \\FM.EDIT-DELETE ( -OLDPOINTER POINTER MOVEDOFF END) DSPLINEFEED (STREAM) \\BN.COMPAREN (SU SV S ST V U) \\TAN-FLOAT (R -SIGN RECIPFLG ANSWER R2) \\10MB.OUTPUT.INTERRUPT (IOCB STATUS) CREATESCREEN (TITLEDS SCREEN) -FM.GETITEM (ITEM) \\TEDIT.APPLY.PARALOOKS (CH# SCRATCHSEL NEWLOOKS NEXTB BUTTON QUAD LINELEAD PARALEAD - SPECIALX SPECIALY DEFAULTTAB BUTTONDATA L1 LN R) POSTEDITPROPS (NEWPROP OLDPROP OV FOUNDCHANGE) -NLAMBDAFNP (FN) PRETTYVAR (VAL VAR TEM) DSPFONT (STREAM) MB.THREESTATEBUTTON.FN (NEWSTATE) -\\FTP.OPENFILE.FROM.PLIST (CONNECTION INS OUTS REMOTEPLIST FULLNAME) ASKUSERCHAR (C1 C2) -\\LEAF.DIRECTORYNAMEONLY (N) DECLSUBFIELD (SUBTRAN SUBNAME) |\\UFSReadPages| (|lastStreamPage| ERRNO -|buffer| |offset| |streamPageNumber|) \\MEDW.CARET.SHOW (DS DD CARETWIN CBMX CBMY CURSOR CARETBM CWX -CWY CARETBMWIDTH CARETBMHEIGHT CLIPREG CLIPVAR) PRETTYVAR1 (TEM OP E) \\PS.BOUTFIXP (N \i) \\CURVEEND -(SOFTCURSORUP DISPINTERRUPT X Y I) |\\UFSError| (PATHNAME) CRITSECT (IX1 TX1) WHO-LINE-WHAT-IS-RUNNING - (POS) |\\LFDirectoryNameP| (PARSED DIR SUBDIREND) \\FM.EDIT-GETPOINTERINFO (MOUSEX WIDTH PTR N) -\\UFS.OPENP (S) TRANSLATE.LOCF (FORM OFFSET SPEC NEWFORM) \\NSFILING.EVENTFN (S) |\\UFSGetFileInfo| ( -BUFFER NAMESIZE) \\FLOATINGSCALE (INTMANT SIGN) TB.MAP.SELECTED.ITEMS (ITEM# ITEM) -\\UFS.ADD.HOST.FIELD (NAME) \\BN.LOGANDC2 (B B1) \\DL.FAULTINIT (TMP) LVLPRIN0 (X CDRLVL) -\\FM.EDIT-WORDDELETE (END ENDTAILPTR) MAKEDEFLIST (Z TEM) MSINIT (X) XCL::%DEFINE-TYPE-SAVE-DEFN (TYPE -) \\INIT.POWERS.OF.TEN (POWTEN I POW10 ENOW EEXP EHI ELO) FM.CHANGESTATE (NEWSTATE GROUPID ITEMID X) -DIRPRINTNAME (THISCHAR DIRECTORYEND LASTCHAR DIFFERENT I) LISTFILES (FILES FILE OPTIONS FULLNAME) -\\MAIKO.PUNTBLTCHAR (CHAR8CODE CURX RIGHT LOCAL1 LEFT SOFTCURSORUP DISPINTERRUPT) GETSYNTAX (CH TEM -CHARTBL RESULT LST) PRINTPARA (LMARG RMARG) \\UFS.REMOVE.HOST.FIELD (VERSION DEVICE PACKED-NAME) -SEDIT::ASSIGN-FORMAT-LIST (SEDIT::P SEDIT::LAST-SUBNODE SEDIT::FORMATS SEDIT::SUBNODES) -\\GETREADSYNTAX (KEY) \\UFS.FULLNAME (NAME) |\\LFReturnInfo| (ATTRIB INFOVAL) TEDIT.BUILD.PCTB ( +SPECIALY SPECYSET STYLE STYLESET CHARSTYLES CHARSTYLESSET TABSPECC NEWLOOKS) CL:COMPILE-FILE ( +COMPILER::*INPUT-FILENAME* COMPILER::*INPUT-STREAM* COMPILER::FASL-PATHNAME COMPILER::*FASL-HANDLE* +*ERROR-OUTPUT* COMPILER::FILE-MANAGER-FORMAT COMPILER::PROCESS-ENTIRE-FILE) MB.DISPLAY (BITMAP Y +OLOOKS) PRETTYDEF1 (PRTTYTEM PRTTYCOM PRTTYNEW) GETPUPBYTE (PUP) \FILING.ATTRIBUTE.TYPE (X) +TTDELETEWORD (PREVL START) \BN.COMPAREN (SU SV S ST V U) TEDIT.SKIP.SPECIALCOND (NPC PIECES PC LEN) +LOOKUP-ENVIRONMENT-AND-FILEMAP (V MAPENTRY HIGHEST-VERSION) PSCFONT.WRITEFONT (C) LISPXREPRINT (FILE) +\TEDIT.GET.SINGLE.PARALOOKS (TABSPEC TABFLG QUAD DEFAULTTAB TABCOUNT TABS TABTYPE TAB#) RESTOREBUF ( +TAIL) DSPFONT (STREAM) SEDIT::REVIVE-NODE (SEDIT::DEPTH) FILECHANGES (STREAM OLDPTR CHANGES FNS) +SEDIT::MAP-COMMENT-INDEX (SEDIT::SUBNODES SEDIT::SUBNODE CL:LENGTH SEDIT::INDEX) DOERROR (MSG AT) +\UFSDirectoryNameP (NAMEAREA LEN) \GETREGIONTRACKWITHBOX (WIDTH HEIGHT DESTINATION MAXX MAXY NOERROR +THRUONCE OLDCURSOR OLDMOUSEX OLDMOUSEY XTEMP YTEMP) TRANSLATE.LOCF (FORM OFFSET SPEC NEWFORM) +\SENDLEAF (RESULT) CLEARPUP (PUP) \ARBIN (USERSTR) CL:MACROEXPAND-1 (CL::FORM) CL:MACROEXPAND (CL::FORM + CL::FLAG) DSPLEFTMARGIN (STREAM) \BN.LOGAND (B B1) TTADJUSTWORD (X) UNIQLIST (Y NEWLIST V) +\D01.FAULTINIT (N I) CH.ISMEMBER (GROUPNAME) \BN.LOGANDC2 (B B1) READ-UNICODE-MAPPING (FILE) +\UFSSetFileInfo (VALUE) \UFSOpenFile (CASE.CORRECT.NAME STRM OTHER CASE.CORRECT.FULLFILENAME CDATE +BYTESIZE FILEID EOF-FN CINFO) \TEDIT.UPDATE.SHOWSEL (CARET OSEL NSEL EXCHFLG NEWL1 OLDL1 LINES DS +OLDLN NEWLN TSEL L1 LN) \10MB.TURNONETHER (CSB) PRETTYDEFCOMS (%#RPARS) \DL.FAULTINIT (TMP) +\DSPFONT.HDCPYDISPLAY (W OLDWIDTH SCALE I) DSPLINEFEED (STREAM) PRINTDATE (CHANGES FILEDATES PREVPAIR) + \SEQUIN.HANDLE.ACK (PUP NEWACKSEQ) \FM.GETBITMAPS (BITMAP HLBITMAP HIGHLIGHT) TEDIT.BUILD.PCTB ( DEFAULTPARALOOKS DEFAULTLOOKS TEXT CACHE? CACHE START END PCCOUNT PCTB USERFILEFORMAT FILETYPE USERTEMP PC PIECEINFOCH# PCLEN TYPECODE PCN LOOKSHASH LOOKS I PARAHASH OLDPARALOOKS CURFILECH# CURCH# -OLDPC) CL::SIMPLE-STRING= (END1 END2) PRETTYCOM1 (PRTYX) WHO-LINE-TTY-STATE (FRAMENAME I) -\\REMOVE-DECLS (CL::FORM) WINDOWWORLD (SCREEN) \\TEDIT.COPYINSERTFN (INSERTION) ADDTO (PTR) -DSPRIGHTMARGIN (STREAM) \\BN.LOGAND (B B1) POSTSCRIPT.SHOWACCUM (KERN) DSPSCALE (STREAM) -DSPSPACEFACTOR (STREAM) ASKUSER1 (ENTRY TEM) \\10MBWATCHER (MESSAGE-LENGTH PACKET CNTR) \\INITBFS ( -BASE NWORDS DD CB CBSTART) \\BLTSHADE.GENERICPRINTER (FINALREGION BMWIDTH BMHEIGHT SCRATCHBM) -D-ASSEM::FETCH-HUNK (D-ASSEM::ENTRY) FB.UPDATE.COUNTERS (LABELS LAB PAIR HERE) DSPXPOSITION (STREAM) -\\LEAF.ERROR (ERRCODE MSG) FILLNGON.IP (NPOINTS BASEANGLE ANGLE X Y I) CENTERPRINTINREGION (REGION) -PRINTPARA1 (L CC POS OPENCOUNT LEN LIST) PRINTARRAY-TO-LIST (A N TYPE ORIG DOUBLEFLG M RESULT FLG) -DSPYPOSITION (STREAM) \\BN.2TH (L A B) READARRAY-FROM-LIST (M DELTA ELEMENTS) \\CHAIN.UP.RPT ( -FIRSTUSED RPTBASE LASTEMPTY LASTUSED I) \\GETFILINGCONNECTION (SESSION OLDSTREAM) START.OF.PARAGRAPH? -(LINE) NORMLOOP (LOOP LAST Y1 Y2 PREVSGN HEAD ANTISGN) \\LOOKUPPORT (IPUP LEN RESULT PTR) \\BN.DIVIDE -(BIP M N K SA U \i C ST D W A B L1 I L2 B2 B1 A3 A2 A1 QHAT IP R1 R2 V C1 E X Q) |\\UFSeol| (TYPE) -\\SPP.SENDPKT (SEQNO) D-ASSEM::DCODE-FROM-DLAMBDA (D-ASSEM::*BYTES*) \\TEDIT.CARETLOOKS.VERIFY (LOOKS) - D-ASSEM::DIGEST-FUNCTION (D-ASSEM::IVAR-COUNT) \\EXTFTIMES (HX HY LX LY HHZ HZ LZ) DSPROTATE (STREAM) - CLISPBROADSCOPE1 (TEM) \\NSRANDOM.READ.SEGMENT (SESSION BUF PAGE BYTES-TIL-EOF BYTESTOFETCH -TOTALBYTES PAGENO PAIR) \\DEVICEFILE.EOSERROR (BUF VMEMBUF DATASIZE) MAKEFILE1 (GROUP X) -SEDIT::SIMPLE-STRING-SCAN (CL:LENGTH SEDIT::INDEX SEDIT::CWIDTH SEDIT::OFFSET) |\\InitCurveBrushes| ( -BARRAY CREATIONMETHOD SIZE) \\M44ACTONVMEMFILE (ISFMAP WHICHPART CHUNK DISKRELATIVEPAGE BUF I RESULT -NPAGES PAGE) \\NSFILING.DISCARD.SESSION (PAIR KEPT) COMP.ARG (A) SKIP/ZAP (CHAR CMD N) SCROLL.HANDLER -(SCROLLREG SCROLLW DIRECTION SCROLLCURSOR LEFTCURSOR RIGHTCURSOR MIDDLECURSOR TIMEIN CONTINUOUSSCROLL? - BUTTON TIMEDOWN) \\AUTHENTICATION.FIND.SERVER (ADDR INFO) \\COERCEASCIITONSFONT (CHARSETDIR NSCODE CS - I CHARSETINFO) CH.LIST.PROPERTIES (OBJECTNAMEPATTERN) \\TRANSLATE-CL\:LAMBDA (BINDING VARTYP VRBLS -CNT MIN MAX SIMPLEP RESTFORM AUXLIST SVAR KEYVARS OPTVARS BODY DECLS) MOVETOFILE (TYPE) -\\ALLOCMINIMUMSIZES (RESTATWS WININFO THISMINHEIGHT NOWHEIGHT NOWWIDTH THISMINWIDTH WINDOWPILE -NEWWIDTH EXTSIZE NEWHEIGHT EXPANSIONWIDTH FIXEDVAR NEWEXPANDABLEWIDTH EXPANSIONHEIGHT -NEWEXPANDABLEHEIGHT) \\STRINGOUT (LEN CH I) UNDOLISPX3 (TEM L MARKER L1 L2) IMPORTFILE (FILE) -D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL (D-ASSEM::LEVEL) CLISPATOM2A (TEM CLISPCONTEXT) SHOWDEF (FL) - \\BN.TIMES2 (TAIL L W I W1 U1 W2 C AP BP V) \\CARET.FLASH.MULTIPLE (STR CARET) OPENNSOCKET (NSOC SOC -SKT# CLASHP) TYPESOF (TYPE X FOUND NOTFOUND FILE NEWTYPES) DSPDEFAULTSTATE (STREAM) MSINTERPRET (VAL -MT REL REP SHOWSET MSPRED SUBJECT TYPE UPDATEALL DONE X FROMFOUND TEM) DSPOPERATION (STREAM) -CONSTANTOK (DEPTH) HVFWDREAD (CH VAL) RECORDERROR (MESSAGE AT IN TEM) SETCOLOR16.IP (SCALE ANGLE -NBYTES SCRATCHBM BMBASE) TRIM.BITMAP (LEFT X RIGHT BOTTOM TOP NEW.BITMAP) RECORDECLBLOCK (SPEC FNAME -DEFAULTS Z I TMP RPT FIELDNAMES SPECS FI X Y) MAKE-UNICODE-FORMATS (EXTERNALEOL) \\SETREADSYNTAX ( -CLASS TEM) CHAT.TYPEOUT (TERM.STATE CH MSG TYPESCRIPTSTREAM CRPENDING CNT) |\\LFFindNextFile| ( -ANOTHERENTRY ENTRYSTART VERSION NAMELEN CHARS FILENAME) OPT.JFIXPASS (X) UNCOPYATOM (ATOM.NAME -PACKAGE.NAME) \\CIRCSHADE.XSCAN.IP (Y X U V E X0 Y0) SYNTAXP (D) D-ASSEM::GENERATE-EASY-ENTRY (D-ASSEM::DVAR - D-ASSEM::IVAR-COUNT) \\NSFILING.CLOSEFILE (SESSION NEWHANDLE HANDLE INFO) \\NSRANDOM.CHECK.CACHE (X -EMPTY) DSPTOPMARGIN (STREAM) D-ASSEM::GENERATE-HARD-ENTRY (D-ASSEM::DVAR D-ASSEM::IVAR-COUNT) -\\COURIER.EXPEDITED.ARGS (VALUE TYPE) EQLENGTH (X) \\TEDIT.GET.INSERT.CHARLOOKS (PIECE LOOKS) -\\NSFILING.LOGIN (SERVERNAME SERVERNSNAME ADDRESS CREDENTIALS NEEDLOGIN STREAM PROBLEM LOGINNAME -SESSIONHANDLE PROGRAM OLDPROBLEM SESSION RANDEVICE) \\MEDW.GETSCREENREGION (BASEPT OPPT MINWIDTH -MINHEIGHT NEWREGFNS SHADE NOTTIMEDOUT DESTINATION X BASEX BASEY OPPX OPPY INITLEFT INITRIGHT -INITBOTTOM INITTOP BEGCLOCK DOWNFLG OLDMOUSEX OLDMOUSEY) IRNDLIST (X Y) AS.DELETE.PASSWORDS (NAME) -MSPRGLAMBDA (ARG ARGS KEYS? KEYLIST EVALCOUNT EC OLDTEMP TEM CLISP) \\MAPCHARTABLE (I) \\BN.PLUS2 (L U - V) CLISPBROADSCOPE (BRACKETCNT L0 L) SETCOLORLV.IP (SCRATCHBM OPERATION SCALE X Y) -\\TEXTSTREAM.FILENAME (OFILE) FTP.BREAKCONNECTION (CONN HOSTS) \\NSFILING.UPDATE.ATTRIBUTES (X) -/SETTERMTABLE (TTBL) \\TRANSMIT.STRATEGY (MAKEA?) |\\LFParseFileName| (TAIL DIRECTORY NAME EXT VERSION - ENDVOLNAME STR) DSPPOPSTATE (STREAM) FIXDATUM (X TEM VAL) CONTROL (TTBL) TB.RECONSIDERRANGE (ITEM I) -OPT.JLENPASS (X DEC U DEF MIN SMAX SMIN ML INC U1 CU) COPYATOM (X I) ARCSIN (NEGP XX REDUCED Z Q1 Q2 -SSUM) CH.RETRIEVE.MEMBERS (OBJECTPATTERN) PFI.HANDLE./DECLAREDATATYPE (EXPR) \\FM.EDIT-FINDFIRST (I) -ONFILE (TYPES FILE TYPE X VAL) RECORDECLTAIL (TL) PRINTARRAY (A N TYPE ORIG DOUBLEFLG M FLG) \\BN.QRS -(B C1 C2 CP D) MAKEFILE (OPTIONS FILE ROOTNAME FILEPROP CHANGES FILEDATES FILETYPE SOURCEFILE -REPRINTFNS Z TAIL OPT) PRINENDLINE (FILE) \\LEAF.GETFILEDATES (INFOBLK START) DSPNEWPAGE (STREAM) -\\FM.EDIT-SETUPTTBL (CC) CHECKPATHS (PR VAL) NORMSECT (D X0 DX DDX DDY XL XR) SETSYNTAX (CHAR TBL -CLASS) HVREADEND (CHAR) \\TEDIT.PARABOUNDS (PC PIECE OPC OLDSTART START-OF-PIECE END BEGIN) -MAKEUSERMACROSCOMS (X VAR TEM Y LST) INVERT.BITMAP.VERTICALLY (Y X1) \\LEAF.HANDLE.INPUT (DONEPUP -OPCODE ERROR DONEPUPDATA STREAM) DELETECONTROL (VAL) SUPERPRINT (FILE) \\BN.IGNN (Y U) DSPRESET ( -STREAM) |\\LFHighestVersions| (FILES) CHAT.EMACS.MOVE (DROW CCOLUMN) FITP (FILE) \\CIRCSHADE.DISPLAY ( -|table| Y X U V E X0 Y0) \\SIN-FLOAT (R SIGN R2 ANSWER) \\DL.NEWFAULTINIT (VP I FPBASE FIRSTBUFFERRP -FIRSTUSEFULRP IOCBRP IFPAGERP NEXTBANK0 NDISPLAYPAGES FIRSTRP RPSIZE RPTPAGES FIRSTVP RPTBASE) -\\VALID.FILING.CONNECTIONP (PAIR) COMP.APPLY* (FN) GETBOXSCREENREGION (SCREENPOS) BESTPUPADDRESS (PORT - MSG NET BESTHOPS NOTLOOKEDUP BESTPORT ROUTE HOPS TRY) MSPRGTEMPLATE (TEM) FLENGTH (Y X N) -\\MEDW.GETBOXSCREENPOSITION (ORGX BOXWIDTH ORGY BOXHEIGHT SHADE MOUSEDOWNFLG) -MB.CREATE.THREESTATEBUTTON (X Y BITMAP DS) TEDITMENU.STREAM (MENUW W) \\TOTALFIXEDHEIGHT (ATW -THISMINHEIGHT) EDITCHANGELABEL (MSGW NODE NEWLABEL) \\BUILDATWSTRUCTURE (WHEREAT ATWIN EDGEBUCKET -ATWINFO WHEREONEDGE PLACEHOLDERATW) \\8859PEEKCCODEFN (PCODE SCSET CHAR COUNT) CENTRALWINDOW (MAINW -WINDOW) DSPSCALE2 (STREAM) TEDIT.INSERT.OBJECT (CH# TEXTLEN PC NEWPC SUBSTREAM INSERTFN PCTB PREVPC) -LOOKUP.NS.SERVER (NAME ENTRY NAME&VALUE ADDRESSES) CLISPATOM1B (L LST) \\MAIKO.ASSIGNBUFFERS (BASE -NPAGES) ASKUSER$ (ENTRY KEY0 NC0 I TEM) D-ASSEM::EASY-ENTRY-P (D-ASSEM::OPT-VAR) \\BUILD.EXPEDITED.XIP - (STREAM) SET-PROFILE-INTERACTIVELY (PROFILE) |\\PFVersionOK| (|vol|) \\INSPECTW.REDISPLAYPROP ( -XCL:*PROFILE* ITEMSELECTED? NEWVALUEREGION) SHEDSCAN (TAIL EDGE X0 Y0 DX DY BRES YDIR) PRINTLEAF (DATA - OP START MACRO HI LO NBYTES) UNIX.SETDISPLAYTYPE (OLDTYPE WINDOW) TB.CONSIDERRANGE (ITEM I) -|\\LFFindInfo| (FILE ENTRYSTART STREAM) D-ASSEM::RESOLVE-JUMPS (D-ASSEM::JUMP-OR-TAG) \\CIRCSHADE.IP ( -Y X U V E X0 Y0) |\\UFSGetFileType| (TYPE) PFI.HANDLE.PUTPROPS (TYPE PAIR) DISPLAY/NUMBER/READER/TOTAL - (NCHARS DECPOS NAFTERDEC STR I) MAKELISPXMACROSCOMS (TEM TEM2) GETFILEPKGTYPE (X NAME) -GETDELETECONTROL (TBL VAL) BIGNUM.DEFPRINT (NEWTH TH L ELS B CHARS RADIX) \\TEDIT.BASICFIND (CH1 -ANCHOR CH OANCHOR FOUND PCH#) INVERT.BITMAP.HORIZONTALLY (Y X1) \\BN.TH2D (RADIX AI DIGIT RESULT M) -D-ASSEM::STORE-DIGEST-INFO (D-ASSEM::PAIR D-ASSEM::SLOT) READARRAY (M DELTA) CLISP\ (CLISPTEM) -D-ASSEM::COMPUTE-JUMP-SIZE (D-ASSEM::PAIR) DELETELINE (PREVLINE OLDSTART NEWSTART LINE) CLISPATOM2 ( -TEM ENDTAIL-1 Z UNARYFLG LISPFN NEGFLG VAR2 VAR1) DRAWBETWEEN (STREAM) /SETREADTABLE (RDTBL) -\\TEST.PARAGRAPH.LOOKS (CHAR VALUE NONEMPTY PROPERTY) CONVEXP (PT ORIGX0 ORIGY0 TANGX0 TANGY0 ORIGDX -ORIGDY LASTX LASTY TANGDX TANGDY CURRX0 CURRY0 CURRDX CURRDY NEGSGN PATH RESULT X Y TSGN CSGN OSGN) -\\MEDW.GETSCREENPOSITION (WINDOW) RECORDECL1 (DECL FIELDINF TYPECHECK CREATEINFO CNT X CL TEM1 NAME -TAIL CREATETYPE DEFL FIELDNAMES TRANSLATION) MSPRGTEMPLATE1 (Y X KEYSUSED?) CH.NUMBER.TO.PROPERTY (M) -/PUT+1 (X) DRAWCIRCLE (STREAM) TEXTSTREAM.TITLE (TXTFILE) \\TOTALFIXEDWIDTH (ATW THISMINWIDTH) -GRAPHCHANGELABEL (CHANGEFN) /RAISE (FLG) \\8859INCCODEFN (SCSET CHAR COUNT) SEEFILE (FILE CH I) -DSPTRANSLATE (STREAM) CLISPATOM1A (ISFLG BRACKETCNT BRACKET ENDTAIL CLTYP0 CLTYP BROADSCOPE OPRFLAG -TYP) ECHOCONTROL (C) |\\UFStoOtherRenameMess| (PAIR) \\CARET.FLASH.AGAIN (STREAM OC) -|\\UFSSetFileType| (TYPE PAIR) \\TEDIT.FIND.FIRST.LINE (CHNO CH CH# LINE LINES) \\SEND.EXPEDITED.XIP ( -IXIP) SEDIT::SET-POINT-COMMENT (SEDIT::INDEX SEDIT::ITEM) ASKUSERSETUP (TEM) PATH.LESSP (PT1 PT2 Y1 Y2 - X1 X2 U1 U2) TEDIT.MINIMAL.WINDOW.SETUP (DS OLDWINDOWS PROP LINES LINE WINDOW) SEGMENT.BIT.LENGTH (N -START) \\IRND (N D) COLLECT.CHILD.NODES (|NodeID|) \\BN.ISUM0 (BP CARRY RES U V) ETHERPORT (VAL) -SHOW.MATCHING.PAREN (LINE ROW COL) MBUTTON.SET.FIELD (PCTB PCNO FIELD.SEL NEW-STRING) EDITCHANGEFONT ( -NODE) COMP.BLOCK (F) RECORDECL (TEM) \\BN.ISUM1 (C S RES U V) \\BSP.SENDBUFFER (NEWLO) COPYTERMTABLE ( -TTBL) RAISE (TTBL) DSPLEFTMARGIN (STREAM) NUMBERPAD.READER.HANDLE.CHAR (TOTAL POWER) ECHOCHAR (B) -DRAWARC (STREAM) \\EVAL-INVOKE-LAMBDA (N) INVERT.BITMAP.DIAGONALLY (NEW.BITMAP Y X) -\\LEAF.FIX.BROKEN.SEQUIN (UNANSWEREDPUPS AFFECTEDFILES STREAM NEWCONNECTION STRM) |\\VFMMerge1| ( -|xtraBufferUsed|) \\TEDIT.WINDOW.SETUP (W TEDITPROMPTWINDOW) \\DL.MARK.PAGES.UNAVAILABLE (I RPTBASE) -DRAWCURVE (VALIDBRUSH STREAM) \\ARBOUT (FPTR) \\INTERPRET-ARGUMENTS (\\VAR \\ARGLIST \\VAL \\INDEX I -\\ARGTYPE \\BODY) PRETTYPRINT2 (X TEM FROM TO) \\BN.D2TH (S U V BI M AI B) /RADIX (N) \\BN.NZEROS (I) -\\FTP.GENERATEFILES (TAIL HOST DIRECTORY NAME EXTENSION VERSION WANTDEVICE DEVICE OSTYPE FILTERNEEDED -DESIREDPLIST NAMEBODY INFO CONNECTION INS OUTS) \\NSPRINT.MEDIUM.CHECK (X) /DSUBST (B EXPR) /NCONC ( -TEM N X VAL) \\TEST.CHARACTER.LOOKS (CHAR VALUE VALFLAG PROPERTY TEM) DRAWELLIPSE (STREAM) -\\ORIGTERMTABLE (C) |\\PFPutMarkerPage| (|vol|) \\UFS.NEXTFILEFN (FILENAME NAMELEN NAME NEWNAME FILEID - SUBGEN) DIRECTORY.PARSE (FG TEMP) \\DL.UNMAPPAGES (FP FPBASE) SI::ADVICE-PUTDEF (SI::ENTRY) -\\CLEARWORDS (BASE NWORDS) \\FTP.ADD.QUOTES (I PIECES N) D-ASSEM::CONVERT-TO-BINARY (BYTE D-ASSEM::CODE-INDEX -) CHAT.SET.EMULATOR (INSTREAM TRIPLE) TB.CONTIGUOUS.SELP (ITEM I) DRAWPOLYGON (STREAM) CHAT.MENU ( -COMMAND) ECHOMODE (TTBL) ITEM.WINDOW.SET.STACK.ARG (NEWVALUE) DSPPUSHSTATE (STREAM) \\DSPXPOSITION.PSC - (OLDX) COMP.MLLFN (FN X) HVBAKREAD (HV READVAL HV1 HV2 HV3 I) TREEGRAPHNODE (THISNODE NEWDEPTH NODEID - LONODES HINODES BFNODE BFNODEID RANKNODE RANKNODEID) PARSE-FORMAT-OPERATION (PARMS) FB.SUBITEMP (I) -PRINTERS.WHENSELECTEDFN (PRINTERCHOICE) MENUBUTTONFN (MENU SELECTION) \\BSP.FLUSH.SOCKET.QUEUES ( -STREAM) AS.CREATE.PASSWORDS (NAME) MSPRGRECORD (Z X) CH.DELETE.MEMBER.FROM.PROPERTY.ACL (OLDMEMBER -OBJECT) ICMLARRAY.SETVALUE (PRTWINDOW XCL:*PROFILE* NEWVALUE) ROTATE.BITMAP.RIGHT (NEW.BITMAP Y X) -\\FTP.CLOSEFILE (C SUCCESS INS) |\\PFGetLVPage| (|vol|) \\BN.MADD (TT H IP IPP C TTT) COURIER.READ (X -DEF) COMP.GETBASE (A OFF) COPY-CIRCLE (SCANBUF VAL REST BODY NEW ID AUX) TB.DECONSIDERRANGE (I) -FILLPOLYGON (WINDNUMBER STREAM) COMP.MLLVAR (N) SEDIT::PARSE-STRING-INTO-WORDS (SEDIT::I SEDIT::OK? -SEDIT::RESULT SEDIT::END) MAKEFILESCOMS (FILE) IMLTLIST (NLIST X Y U V) \\DO.PROGV (NVARS NNILS NTSIZE -) GETSCREENPOSITION (WINDOW) RECURSIVE.COLLECTDESCENDENTS (|NodeId| |ChildNode| |ChildNodeID|) -WHILEDOUNTIL (FX PL FX1 CONDX TGO DO WHILE TEM) FILEGETDEF.VARS (X) RESETREADTABLE (RDTBL FROM) -DREVERSE (Y L Z) \\TOTALPROPOSEDSIZE (THISMINWIDTH THISMINHEIGHT THISWID THISHEIGHT) XYPT.LESSP (V1 V2 -) I.S.OPR (LC NEWFLG NEWPROP OLDPROP) SEGMENT.LENGTH (N START) /LISPXPUT (LST Y) EMBEDPROG (X LE LL) -|\\VFMClearIntervals| (|volume|) RESETUNDO (UNDOSIDE UNDOSIDE0) \\BN.ICANON (B CARRY U1 U) READ/NODE ( -NEAR OLDPOS NOW) \\TEDIT.APPLY.STYLES (STYLE NOSTYLE CHARSTYLES CHARSTYLE IN-PARA) /PUTASSOC (X) -PRINTLINE (CH CHNO) GENERATOR (COMVAR##) \\DOCOMPRESSVMEM (VP LASTFP EMPTYFP) \\SIMPLIFY.CL.ARGLIST (X -) \\PUPINIT (FN NEWFN) \\CIRCSHADE.BLT (OPERATION Y X U V E X0 Y0) |\\LFVersions| (FIXEDVERSION HMIN -PTR |version| RESULT) \\UFS.ABORT.DIRECTORY (GEN GFS) COMP.MLL (N NN) ANTILOG (YY FRAC IP SSUM) -POSTSCRIPT.BITMAPSCALE (HEIGHT WIDTH MINDIM OTHERDIM SF1 SF2) RECLISPLOOKUP (CLASSDEF LISPFN) LISPX ( -LISPXXMACROS LISPXXUSERFN LISPXLINE LISPXX LISPXTEM LISPXOP LISPXLISTFLG LISPY DONTSAVEFLG LISPXHIST -HELPFLAG LISPXVALUE LISPXVALUES LISPZ) \\TEDITMENU.SELSCREENER (MAINTEXT) ROTATE.BITMAP.LEFT ( -NEW.BITMAP X Y) \\LEAF.TIMEDOUT (PUP) COMPILE-FILE-EXPRESSION (FORM) \\LEAF.RECONNECT (SEQUIN) -|\\UFSMakeUnixFormatName| (I) \\PEEKREFILL (C) \\DSPYPOSITION.PSC (OLDY) \\PUT.SESSION.HANDLE (HANDLE) - LAYOUTGRAPH (R FONT MOTHERD PERSONALD FAMILYD G) \\SPP.SKIPBYTES (CONDITION BYTESLEFT NBYTES) -\\FILLPOLYGON.IP (NUMPATHS) \\SETTYPEMASK (PAGE) \\FTP.MAKEPLIST (PROP) -COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION (COMPILER::COMPILED-DEFN) ESCAPE (RDTBL) \\SUBREAD ( -EOF-POSSIBILITY J EXTRASEGMENTS INVALIDFLG ESCAPEFLG PACKAGE NCOLONS SHIFTEDCHARSET SNX CH SCSET CHAR -DOTLOC ESCFLG LASTC AT-EOF ELT END LST PNSTR) TERM.MODIFY.ATTRIBUTES (A) DIRECTORY.MATCH1 (PATTERN -OKCHARS PATCHAR PAT FIRSTCHAR TESTCHAR) LISPXREAD (X) LISTHARD (TYPE VAL) MSUSERVBTABLES (|modifier|) -BREAKDOWN (FNS N I) RATOM (RDTBL) UPPERCASEARRAY (I) LOWERCASE (FN TEM) \\BN.TH2B (AI U B) -\\DL.ASSIGNBUFFERS (BASE NPAGES) PEEKCCODE (SCSET CHAR) FILEGETDEF.FNS (ENV MAP PAIR MAPLOC SOURCE) -\\TEDIT.BRAVOFILE? (PLOOKS ENDCONDITION NAME DIRS) FB.COMMANDSELECTEDFN (ITEM I EXTRA FN) FILLCIRCLE ( -STREAM) CH.ADD.MEMBER.TO.PROPERTY.ACL (NEWMEMBER OBJECT) UNSET (X TEM NAME) \\SEND.ACK (DATA) -PFI.HANDLE.DEFDEFINER (OPTIONS DEFINER ENTRY) PARSE-NSADDRESS (STR CH VAL NET HOST NSHOST PREV10 ADDR) - READC (SCSET CHAR) \\FLUSHPAGE (VP FP NEWFP) INTERACT&SHIFT.BITMAP.LEFT (NBITS) \\LEAF.WHENCLOSED ( -PUP DEV) \\TRANSFERPAGE (NEWFLAGS) PRINTANDBOX (PREVRM PREVLM YSTART YEND HGHT) UNIX-WRITE ( -LENGTH-WRITTEN) \\PUTBASEFIXP (LO HI VAL) \\PUT.FILING.ATTRIBUTE (X ATTR VALUETYPE) RELDRAWTO (ORIGX -ORIGY) SETCORNER (NEWCURSOR OLDCURSOR) GETPUPWORD (PUP) SHRKFY2 (RESULTP) FILEGETDEF.MACROS (TAIL) -FILEPKGCOM (FIELD TEM COM TEM2 I) READMACROS (RDTBL) GRAPHADDNODE (NODE ADDFN) \\MAXWIDTHOFGROUP ( -WHEREONEDGE ATW) ADVISEWDS (R D WBORDERSIZE TWICEBORDER CLIPREG PROC) COURIER.SIGNAL.ERROR (ARGS) -CHDIR (HOST PATH) CIRCLAR-COPYER (SCANBUF VAL REST BODY NEW ID CIRCLAR-FLAG AUX) SEPRCASE (RDTBL I CA) - MODERNWINDOW.UNSETUP (RENAMEDORIG) CLISPIF0 (L Y PRED X L-1 L0 $SIDES CLAUSE TEM LF LY FIRSTP) -DWIMIFYFNS (TEM) DRAWPOINT (STREAM) \\GET.FILING.ATTRIBUTE (X) DRAWTO (STREAM) \\RTP.HANDLE.PUP (PUP) -EXCHANGEPUPS (INPUP) MAKEEPSFILE (STREAM) DECLARED-SPECIAL (DEC) TEDIT.FORMATTEDFILEP (OLDPARALOOKS -TENTATIVE PC OLDLOOKS FONTFILE PREVPC) \\TEDIT.PUT.SINGLE.CHARLOOKS (LEN) \\MAXHEIGHTOFGROUP ( -WHEREONEDGE ATW) ATTACHEDWINDOWREGION (REG) |\\UFSGetPrintFileType| (TYPE) SKREAD (STRM CH) -\\DSPFONT.PSC (NEWFONT FONTID) \\NSFILING.DESERIALIZE1 (EXPLICIT-RESULT BULKRESULT) COLLECTDESCENDENTS - (|Descendents|) CLISPATOM0 (UNDOSIDE UNDOSIDE0 LISPXHIST UNDOTEM TEM CHARLST CURRTAIL) -SI::INSERT-ADVICE-FORM (SI::ENTRY-LIST) SEDIT::LINEARIZE-COMMENT (SEDIT::SUBNODE FIRST) READCCODE ( -FILE) \\UPDATE-WHO-LINE-ACTIVE-FLAG (ENTRY) |\\PFGetMarkerPage| (|vol|) HISTORYSAVE (X TEM Y INDEX N L -) PFI.HANDLE.DECLARE (TAIL STARTOFLINE NEXT EXPR) MSGETBLOCKDEC (FILE BLOCK VAL Y) \\FM.COLLECTNWAYS ( -NWAYPROPS ITEMPTR GROUPID ITEMID) INIT.CURSOR (INITY) INTERACT&SHIFT.BITMAP.DOWN (NBITS) TRYNEXT1 ( -PL1## PLST##) \\LEAF.GETFILEINFO (SEQUIN DEVINFO RESULT STREAM) \\UPDATECHAIN (HEAD1 RPTR VP FLAGS -CHAIN1 CHAIN0 RPTINDEX) CL:MAKE-CONCATENATED-STREAM (STREAM?) UTF16BE.PEEKCCODEFN (BYTE1 BYTE2 CODE) -CHAT (HOST HOSTS PROC RESULT SUCCESS) TEDIT.WINDOW.SETUP (PROP) CLISPIFYLOOKUP (CLASS CLASSDEF TEM) -TERM.RESET.DISPLAY.PARMS (TERM.STATE) \\DRAWPOLYGON.GENERIC (PTAIL) LOG (EXP SX SSUM) -TEDIT.REMOVE.MENUITEM (X ITEM ITEMLIST) CLRPLNODE (L) COMP.MAP (DOF BINDVALS BOUNDVARS FROMFORM BYF -WHILEF VAL F NXT) COMP.PROGN (A) \\TEDIT.PIECE-CHNO (CHARCOUNT OFST PC PCNODE) -COURIER.EXECUTE.EXPEDITED.CALL (XIP RESULT STREAM) SCANFORWARD (N END BUF) \\NSFILING.DESERIALIZE ( -SESSION DIRHANDLE HANDLE) INTERSECTREGIONS (REG LFT RGHT BTTM TP I) SCANBACK (START \#HITS X) -ENCAPSULATEDOBJ.IMAGEBOXFN (HEIGHT WIDTH) AS.REPLACE.PASSWORDS (NAME) MSPRGE (CALLED TEM Y CLISP X) -NSMAP (I) CH.RETRIEVE.PROPERTY.ACL (NAME) SHRKFY (CARLOOKAT CAARLOOKAT CDARLOOKAT CDDARLOOKAT CARFLAG -CDRLOOKAT OPFLG STAGEFLAG FIRSTARGFLG RESULTR OP2FLG APPSINGFLG CARSAFEFLAG OP3FLG RESULTQ) -PUPSOCKETFROMNUMBER (SOCHI |SOC#orSOCLO| SOC) \\FTP.DELETEFILE (HOST DESIREDPLIST CONNECTION INS OUTS -REMOTEPLIST RESULT) \\TEDIT.PUT.PARALOOKS.LIST (LOOKS I) MOVEDESCENDENTS (|Child| |NewPos| -|MovedNodes|) \\BSP.SKIPBYTES (ERRCODE BYTESLEFT NBYTES) DISCARDPUPS (SOC) SKIPSEPRS (SHIFTEDCHARSET C - SCSET CHAR) CL:APPLY (CL::AV CL::I) CMLRDTBL (I) \\MKINTEGER (LOOPVAL I CH START VAL RADIX3 RADIX2) -LISPXFIND (LST INDEX VAL LINE0 TEM) SI::PARSE-CL-ARGLIST (SI::STATE) LISPXFIND1 (X) -\\CH.FIND.ORG.SERVER (ORGINFO KNOWNDOMAINS ALLSERVERS) PFI.HANDLE.EVAL-WHEN (EXPR) -CREATE.NUMBERPAD.READER (NUMBERPAD FONTHEIGHT WIN READERWIDTH PADLEFT TOTALWIDTH MSGLINES TOTALREGION) - MSINTERPA (Z) CLISPFORVARS (L1 LST0 LST TEM X OLDFLG IV VARLST) \\FM.MAKELINKS (LINKTAIL ITEMPTR -GROUPID ITEMID) REALSTKNTH (FX K) \\SPPCONNECTION (HOST) INTERACT&SHIFT.BITMAP.RIGHT (NBITS) -POSSIBILITYFN (COMVAR##) \\LEAF.IDLE (STREAM) DEFPRINT (TYPE) \\CH.LOCATE.SERVERS (STREAM CHNAMES -CHLIST CH INFO PAIR NOROUTE CHDOMAINS DOM) CL:PARSE-INTEGER (RADIX INDEX STOP MAXDIGITCODE -MAXALPHACODE ERR CHAR STARTINT SIGN ENDINT) MSINTERPRETSET (TYPE SET2VAL V R Z H TEM S1 S2 REP VAL -VALUE TABLES) MSADDTYPE (HOWUSED SYNONYMS TABLES |typeWord| |oldWordDef|) FIXFIELDORDER (UNUSEDFIELDS -TEM FIELD.USAGE X REVFIELDS TL LASTFIELDTAIL USE1 USE2 PLACE2 PLACE1) TTBIN (CHAR) \\LEAF.READPAGES ( -BUF LEN OPUP I NEWPAGE# IPUP DATA PAGE#) \\INTERNAL/GETPASSWORD (HOST OSTYPE NAME/PASS DIRECTORY) -MAPHASHFILE (HASHFILE HASHKEY KEY VALUE ADR) UTF16BE.OUTCHARFN (C) COMP.SELECTQ (A VAR THISLABEL TEST -CLAUSE NEXT) TB.DO.ITEM.SELECTION (SELECTIONREGION LAST# FIRST# FIRSTVISIBLE# LASTVISIBLE# LASTX LASTY - OLDSELECTION OLDSEL# I NEWSELECTION SELECTIONSTATE SEL# CTRLDOWN OLDLASTMOUSEBUTTONS) SHOWWFRAME ( -WINHGHT WINWDTH BLACKPART WHITEPART) SEE (LINE) PRIN2-LONG-STRING (FONT ESCWIDTH SPACEWIDTH CLOSEWIDTH - SEMIWIDTH SEMISTRING SEMICLOSE C LASTSPACE POS I HERE MAPX1 MAPY1 SINGLELEFT ESCAPESEPRS J NEXTC) -\\ATBLSET (TRDTBL NEW-IL-RDTBL I) |ShowIntervals| (|interval| I |level|) \\RTP.INFO.HOOK (WINDOW) -CLMAPS2 (WORD Y X TEM) FILEGETDEF.LISPXMACROS (X) TTSKREAD (END X BUF) CANONICAL.HOSTNAME (HOSTNAME) -\\RESHAPEATTACHEDWINDOWSAROUNDMAINW (TL TC TR RT RC RB BR BC BL LB LC LT ATWINFO EXTENT ATW ATWHGHT -ATWDTH ATWHERE TEMP) \\TEDIT.PUT.CHARLOOKS.LIST (LOOKS I) /TCONC (XX) SHOWWTITLE (TITLEDS FONT -BLACKPART TITLESHADE BOTTOM HEIGHT BMWIDTH LEFTMARGIN X) \\SMASHSTRING (NC POS C DESTCH# SRCH#) -SEDIT::PRINT-STRING (SEDIT::DISPLAY-DATA SEDIT::C) CHECKDEFS (D R FOUND DEFS) FILEGETDEF.PROPS (X TAIL -) \\RSTRING2 (EOLCHAR CH SCSET CHAR SHIFTEDCHARSET SNX SKIPPING LASTC J ANSTAIL ANSLIST FATSEEN) -COURIER.EXPEDITED.CALL (PGMDEF PROCDEF \#ARGS ARGTYPES TYPE NOERRORFLG ARGLIST I) OPENPUPSOCKET ( -PUPSOC SOC SOCHI SOCLO CLASHP) |\\PFCurrentVol| (|vol|) \\INTERNAL/SETPASSWORD (RESULT INFO -NEWNAME/PASS NAME/PASS OSTYPE PASSWORDADDR NSINFO DISKNAME INFOCHANGED DEFAULTNAME PWD NEWNAME) -CLOSEHASHFILE (HASHFILE) UTF16BE.INCCODEFN (BYTE1 BYTE2 COUNT CODE) LLSH (XHI XLO X N) TTYIN.FINISH ( -TAIL X ORIGBUFFER RESULT WORD RESPONSE TL) |\\LFDirectorySearch| (TARGETLENGTH PTR TYP ENTRYLENGTH -NEXT HMIN FILEID VERSION THISNAMELENGTH MATCH C) SHOWSHADEDITEMS (ANYSUBITEMS ITEM ITEMDESCR SHADE -ITEMREGION) |\\LFFindDirHole| (TYPE ENTRYLENGTH PTR) \\10MBSENDPACKET (PAIR) PFI.HANDLE.RPAQQ (PAIR -VARS VALUES FV) SI::CLEAN-UP-CL-ARGLIST (SI::PARAM SI::STATE) MASTERSCOPEXEC (MASTERSCOPECOMMAND) -TEDIT.REDO.REPLACE (OLDEVENT) TTYIN (\\TTYINSTATE SPLST OP \\NOFIXSPELL \\DONTCOMPLETE \\NOVALUE -\\STRINGVALUE \\COMMAND \\REPEAT \\RAISEINPUT \\AUTOFILL \\FIX \\READING TYPEAHEAD \\LISPXREADING -\\FILLINGBUFFER \\FIRSTTIME \\PROMPTFORWORD \\PFW.FIRSTTIME \\RDTBLSA RDTBL \\PROMPT1 \\PROMPT2 PROMPT - VALUE) TTWAITFORINPUT (X Y ABSY W FN NEWMARG REG) INTERACT&SHIFT.BITMAP.UP (NBITS) SEE* (LINE) -RENUMBER.LINES (ROW LINE) \\LEAF.OPENFILE (FILENAME OLDHANDLE X TYPE BYTESIZE CRDATE STREAM EOL PROPS -SEQUIN) \\TEDIT.CHARDELETE (TEXTOBJ TLEN INSCH# INSPC TLOOKS START-OF-PIECE) TTYIN1 (CHAR X RESULT TMP - WASEDITCHAR SNX STARTOFWORD MATCHED TAIL) TRACKCURSOR (ORIGPOS OLDPOS DOWNFLG) CREATEWFROMIMAGE ( -WINDOW) SKIPSEPRCODES (SHIFTEDCHARSET C SCSET CHAR PREVC) SHRIEKER (CARTEST LOOKAT RESULTP) -SEDIT::SCAN-FOR-BOUNDS (SEDIT::MAX-ASCENT SEDIT::MAX-DESCENT SEDIT::ITEM SEDIT::ITEM-NODE SEDIT::START - SEDIT::X) \\CARET.FLASH (CURSOR ANSWER) \\TEDIT.SET-TOTLEN (I ITEM#) SEDIT::INSERT-COMMENT-CHARS ( -SEDIT::CHARS STRING SEDIT::SUBNODES SEDIT::SUBNODE SEDIT::NEW-STRING SEDIT::N SEDIT::NEXT-SUBNODE) -TTYIN.READ (BUTLASTC LASTC TERM) REDISPLAYBITMAP (WREGION) DRAWGRAYBOX (SOFTCURSORUP DISPINTERRUPT) -MOVEBOX (SOFTCURSORUP DISPINTERRUPT) \\TEDIT.COMMAND.RESET.SETUP (OWINDOW OTTYEXITFN OTTYENTRYFN -TTYWINDOW OTTYWINDOW) ALLCALLS (X) CH.PROPERTY (PAIR) \\LET*-RECURSION ($$LET*-TAIL VAR VALUE) -INITIALIZEMASTER.IP (I) CLOSEPUPSOCKET (PUPSOC) \\SETMACROSYNTAX (LST CONTEXT WAKEUP ESCAPE A) -\\TEDIT-OPEN-FONT-FILE (EXISTING-FONTFILE-IF-ANY) CLISPIFYMATCHUP (TEM ALST PAT $LST) -\\ADJUST.USERNAME (NAME POS) \\FM.MAKEBITMAP (CLIPPINGREGION) DWMFY2 (CARPARENT CLISPCHANGE 89CHANGE -NEXTAIL X FNFLG TEM NOTOKFLG) SETTEMPLATE (VAL) \\DRAWELLIPSE.GENERIC (MAJORXOFFSET MAJORYOFFSET -MINORXOFFSET MINORYOFFSET) \\ENCRYPT.PWD (I) COMP.EQ (A C) \\TEDIT.FIND.OVERLAPPING.LINE (LINES) -READFROMBUF (BUF FIXUP CH START) \\CREATECHARSET.IP (WIDTHS WFILE WSTRM RELFLAG FAMCODE TYPE LENGTH -NEXT FILEFAM FILEFACE FIRSTCHAR LASTCHAR SIZE FBBOX CHARSETHEIGHT FIXEDFLAGS TEM I WIDTHSY) -READ-EXTENDED-TOKEN (RDTBL CH SCSET CHAR SHIFTEDCHARSET SNX ESCAPE-APPEARED ESCAPING J ANSTAIL ANSLIST - FATSEEN) ULREDISPLAYBITMAP (REGION) ICMLARRAY.INDICES (LEVEL FIRSTFLG) TTYINREAD (X) FONTCREATE ( -FONTX ROTATION DEV FONTFACE FAMILY) \\TEDIT1 (TEXT) \\SETGROUPMIN (ATW THISMAX TMAX CMAX BMAX LMAX -RMAX) GETPUP (PUPSOC PUP TIMER) SYSRECLOOK1 (D) SENDPUP (PUP PUPSOC NDB) EDITBMTEXTURE (COLOR SHADE) -EXEC-READ-LINE (LINE SPACEFLG CHRCODE) OPENHASHFILE (ACCESS ENTRY HASHFILE) COPYALLBYTES (INF OUTF) -CONCATLIST (STR X FATP I) FILEGETDEF.ALISTS (X) HPRINTEND (X I) GREET0 (DIGIT TEM HOUR) ALLPATHS (DEFS - DEC TRAN ANY TL) INTERACT&ADD.BORDER.TO.BITMAP (NBITS TEXTURE) GENERATEFN (COMVAR##) \\TRACKWITHBOX ( -MLMASK DESTINATION ORGLEFTMIDDLE NOERROR OLDCURSOR) \\LEAF.WRITEPAGES (BUF DATA LEN PAGE#) -SEDIT::INSERT-COMMENT (SEDIT::START) CH.IS.IN.DOMAIN.ACL (DOMAIN) RESTOREBUF (TAIL) -\\BSP.PREPARE.OUTPUT (PUP SOCKET TIMEOUT ERRCODE) \\DRAWLINE.PSC (WIDTH) DCODERD (FRAMENAME NAMETABLE -LOCALARGS NTSIZE NTWORDS STARTPC STARTLOCALS LOCALSIZE REALSIZE CA X FVAROFFSET NT1 NT) |\\LETtran| ( -BODY DECLS VAR VAL) \\SHIFT.DOCUMENT (PARALOOKS TSPEC LASTPARALOOKS PC) SCROLLBITMAP (REGION) RETFROM -(P) \\LOGIN.READ (PROMPT HELPFN NAME) \\SUBREADCONCAT (PBASE) BKBUFS (L S) MASTERSCOPE1 (X) -MSADDMODIFIER (TABLES MODIFIERS |adverb| |oldWordDef|) \\FM.GETBITMAPS (BITMAP HLBITMAP HIGHLIGHT) -UNADVISE (FNS) DCODESKIP (START CODELEN) CLBUFS (LBUF SBUF) PRIN4 (RDTBL) CHAT.TTYENTRYFN (STATE) -PROMPTFORWORD (CHAR ECHO.CHANNEL TTYD DONTECHOTYPEIN.FLG TERMINCHARS.LST C CONVERTIBLEP KEYBD.CHANNEL -TIMER X0Y0 BEGUNTYPING? RUBBING? CHARBUFFER SPACEP ?HELPMSGLIST ?HELPMSGTRIEDP) COMP.NUMBERTEST (A -EXIT) \\MAKESPACEFORLOCKEDPAGE (DESIREDFP FPBASE OLDVP) \\ITEM.WINDOW.SELECTION.HANDLER (BUTTON REG -NOW OLDPOS PREVIOUS) \\DRAWCURVE.PSC (WIDTH SHAPE COLOR PSPLINE N XA YA DXA DYA PREVX PREVY PREV-DX3 -PREV-DY3 C) \\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (PC OBJ COPYFN NEWOBJ) DINFO.READ.KOTO.GRAPH (FIELD N) -\\10MBGETPACKET (PACKET PAIR) GREET (FILE) \\MAIKO.10MBTURNONETHER (CSB) \\LEAF.TRUNCATEFILE (DATA) -FREEATTACHEDWINDOW (ATWIN) \\TEDIT.WORDDELETE (CH CHNO) RELMOVETO (STREAM) HPRINT1 (TYPE LASTSEEN HERE - CN TYP INDEX I SIZ VALS PROP) TERM.TAB (NEXT.STOP CX) RINGBELLS (N) SPP.SENDATTENTION (EPKT) -COMPARENCHARS (COMPARECNT) |\\LFFileName| (CHARLISTLENGTH NAME CHAR I) GC-FILING-DIRECTORY (DIRNAME -CANDIDATES TOPID HOST DIRINDEX ID PAIR PARENT ERROR NDELETED) MMLTLIST (NLIST X Y U V) READHOTSPOT ( -NOWCURSOR XPIXEL YPIXEL CURSORBM DOWNYET?) PREVLINE (X N L) CLISPIFYRPLAC (LFT RGHT TYP0 TEM CROPS -PARENT) \\FM.GETREGIONS (WIDTH HEIGHT) SI::DESCRIBE-INTERNAL (SI::DESCRIBERS SI::INSPECT-MACRO -SI::SUPER-DESCRIBERS DECL) \\FM.EDIT-PREPARETOEDIT (POINTER) \\UPDATEXYANDBOX (TEMPX TEMPY) -|\\PFTransferPage| (|runLength| DOB STATUS) WBOX (THCK) PREVWORD (START NEW \#HITS X N) STRINGWIDTH ( -TEMP) EDITMOVESUBTREE (NODELST NEAR OLDPOS NOW) \\FM.CREATEITEM (LEFT BOTTOM) \\FM.EDIT-ITEM (BUTTONS -MOUSEX MOUSEY ITEM REGION CHCODE) \\TEDIT.OBJECT.SHOWSEL (IMAGEBOX Y) FONTCLASS (FL FC F D) GETFILEDEF - (FILE) TERM.SMOOTHSCROLL (I) SUPERPRINT/COMMENT (BODY SEMIP RIGHTFLG COMMENT-LMARGIN COMMENT-RMARGIN -HALFLINE) GETCHATWINDOW (WINDOW STATE DSP) \\CARET.FLASH? (CARET STREAM) COMP.STFIX (TYPE) -\\NSGC.COLLECT.DIRECTORIES (HANDLE BULKSTREAM SCOPELIST GENERATOR ID INFO PAIR) PFI.ESTIMATE.SIZE1 ( -INITSUM TAIL) DO-EVENT (INPUT TODO STR COM VALUES) CLISPIFYMAPS (FN1 FN2 VAR TEM) -TEDIT.FORMAT.HARDCOPY (PAGEFRAMES THISLINE BREAKPAGETITLE BEFOREFN SCRATCHFILE AFTERFN WASOPEN -PRSTREAM IMAGETYPE REGION) SEARCHPDL (SRCHPOS SRCHX) CL:RETURN-FROM (CL::FRAME) -SEDIT::PARENTHESIZE-CURRENT-SELECTION (SEDIT::NODES SEDIT::SUBNODES SEDIT::I SEDIT::NEW-NODE SEDIT::N) - \\LEAF.SETFILEINFO (VALUE STREAM) RECORDACCESSFORM (EXP) IN/ITEM? (ITEM) FAKE-COMPILE-FILE (STREAM -ENV FORM INTERLISP-FORMAT PROCESS-ENTIRE-FILE LSTFIL FILENAME OUTPUT-FILE COMPILE.FILE.VALUE) -UTF8.PEEKCCODEFN (BYTE1 CODE BYTE4 BYTE3 BYTE2) |\\PFGetVols| (|volNum|) \\DONEWEPHEMERALPAGE (MAPBASE - RPTINDEX RPTR) FLONUM-TO-STRING (MANTSTR INTEXP DIGITS DECPNT) SETUPPUP (PUP DESTHOST SOC) DWMFY1 ( -TEM CARFORM CARISOKFLG CLISPCHANGE 89CHANGE X) TEDIT.PARALOOKS (TEXTOBJ CH# CHLIM PCTB PC OLDSTART PC1 - NLOOKSAVE D REPLACEALLFIELDS 1STLEFT LEFT RIGHT LEADB LEADA LLEAD BLEAD BLEADSET QUADD TYPESET TYPE -SUBTYPESET SUBTYPE SPECIALX SPECIALY NEWBEFORESET NEWBEFORE NEWAFTERSET NEWAFTER HEADINGKEEP KEEP -KEEPSET BASETOBASE BASESET HCPYMODE HCPYSET USERINFO USERSET REVISED REVISEDSET TABSPECC STYLE -STYLESET CHARSTYLES CHARSTYLESSET COLUMN COLUMNSET OLDLOOKSLIST LASTLOOKS NEWLOOKS NCHLIM -START-OF-PIECE NPC) COMP.EXPR (V M EXP X) DWIM (X) MAPDL (MAPDLPOS) |\\LFMakeDirEntry| (SIZE) -\\DRAWCIRCLE.PSC (WIDTH COLOR) RETVALUES (P) \\FM.EDIT-FINDNEXT (I) COMP.GETBASEBITS (OFF) -\\SELECTREALPAGE (PREVRPT RPTINDEX RPTBASE FLAGS FP CNTR DISTANCE PREVINDEX TRIES) INREADMACROP (TEM -\\READDEPTH) RGBP (TMP) READHASHMACRO (NEXTCHAR INDEX) \\DRAWELLIPSE.PSC (WIDTH COLOR) \\SETUFNENTRY ( -INDEX) SI::FINISH-ADVISING (SI::MIDDLE-MAN) COMPILE-FILE? (X UNKNOWN) COMP.FMEMB (A) -\\CCLOSURE.DEFPRINT (NAME) POSTSCRIPT.TEDIT (FILE) CH.DELETE.MEMBER.FROM.DOMAIN.ACL (OLDMEMBER DOMAIN) - \\RELEASEWORKINGSET (RPTR RPTINDEX) DASHINGP (X) GETCFILE (X STR CFILE) SKOR (XC TC XWORD TWORD NCX -NCT X-1 N NTRANS T2 T1 X2 X1) GETEXPRESSIONFROMEVENTSPEC (LL NEXT INPUTLINES) \\LEAF.GETFILENAME ( -SEQUIN RESULT) \\INSPECTW.COMMAND.HANDLER (XCL:*PROFILE* COMMANDFN INFO) \\GET-COMPILED-DEFINITION (X) - ESTIMATE-DIMENSIONALITY (D) \\MEDW.BLTCHAR (CHAR8CODE CURX RIGHT LOCAL1 LEFT SOFTCURSORUP -DISPINTERRUPT) SPP.OPENP (CON) COMPAREPRINTN (SPACE) MERGLIST (CURR1 CURR2 Y1 Y2 IMAP PATH1 PATH2) -\\SHADEBITS (BITSPERPIXEL OTHERCOLOR SHADE OTHERSHADE XPIXEL X YPIXEL Y USECOLOR USESHADE COORDWIN) -READNUMBERINBASE (CH SIGN BASE VAL NUMERATOR I) \\GETREGIONTRACKWITHBOX (WIDTH HEIGHT DESTINATION MAXX - MAXY NOERROR THRUONCE OLDCURSOR OLDMOUSEX OLDMOUSEY XTEMP YTEMP) CL:MAKE-SYMBOL (PRINT-NAME) -CLISPIFYCROPS1 (TEM Y X TAILSTATE N $LST) \\SUBFNDEF (C I) COMP.SPREAD (APPLYTOEACH N) EDITADDNODE ( -NODE ORIGPOS) RECORDWORD (NEWORD WORD) REMOVEPROMPTWINDOW (PWINDOW MAINWINDOW) \\COURIER.TRACE (X -FIRSTTIME) \\PROMPTFORWORDBS (C) MODERNWINDOW.BUTTONEVENTFN (TOPMARGIN CORNER ORIGFUNCTION) -\\PROMPTFORWORDBIN (TIMER READABLE CHAR TTYWAITLIMIT |WAITINTERVAL.secs|) CHARACTER.READ (CH) -EXPRCHECK (D X) UNIQLIST (Y NEWLIST V) EDITSHADEREPAINTFN (GRIDSPEC SHADE BMWIDTH BMHEIGHT) -\\NSFILING.GETFILE (SESSION ACCESS SERIALIZE SEQUENTIAL RANDEVICE HANDLE FILE.ID PARSE DIRPATH -EXPLICIT-VERSION ROOTNAME HAVELOCK OLDHANDLE VERSION FILESTREAM FULLNAME) ICMLARRAY.DISPLAYSLICE (I) -\\TEDIT.FILL.IN.CHARLOOKS.MENU (NEWLOOKS SCRATCHSEL NEXTB CH# BUTTON ITEM OFFSET) TEDIT.FLASHCARET ( -CARET FIRSTTIME) |\\VFMGetInterval| (|BTreePageNum| |level|) PROVIDE.PROMPTING.WINDOW (REGION PROC STR -) \\TEDIT.CONVERT.FOREIGN.FORMAT (WORKINGSTREAM TSTREAM) EDITAPPLYTOLINK (MSGW FROM TO) -DOMAINWINDOWCOMFN (MAINW) NSPRINT (PRINTER INSTREAM DOCUMENT.NAME JOBNAME OPTIONS PRINTRESULTS) -COURIER.WRITE (X NAMEANDTYPE VALUE NAMEANDVALUE) TEDIT.INSERT (STREAM TEXT CH#ORSEL OTEXTLEN CH# -XPOINT CHARS ACHAR CRSEEN BLANKSEEN NCH#) \\DSPMOVELR (X Y DS) \\TFBRAVO.WRITE.RUN (NAMEDTABNUMBER END - START) \\MATCHPCS (PC OFFSET I) TEDIT.PARSE.PAGEFRAMES (FRAMETYPE PAGELIST PAGEFRAME) \\CODEBLOCKP ( -TEM) COPYTEXTSTREAM (PCTB TSEL NEWSTREAM NEWTEXTOBJ PCLST) CH.LIST.DOMAINS (DOMAINPATTERN) FILL-VECTOR - (END) DSPCLEOL (DISPLAYSTREAM XPOS) UNSAVEFNS (FNS FN FNTYPE FNREC FL) MACROS.GETDEF (X) -MSPRINTHELPFILE (FL) MKACCESSFN (FN) POSSIBILITIES (COMVAR##) EXPANDOPENLAMBDA (A SUBSTPAIRS VAL TMP -ARGS VALS FORMALS ACTUALS OPENLAM) CHARWIDTHY (WY TEMP) CALLSCCODE (NTSIZE NAME NUMBER I TYPE BOUND -USEDFREE NT1 NT2 B CODELOC B1 LEN TAG B2 B3 B4 B5 FN IGNOREFNS GLOBALS CALLED LNCALLED) SET-SYMBOL ( -ENVIRONMENT) EXPANDMACRO (EXP MACRODEF) COMP.NUMBERCALL (TMP TYPE 2FN A N) COMPUTE-MACRO-ARGS ( -ARGUMENT-LIST SUPPLIED-P-VARIABLE KEYWORD-VARIABLE FM) POLYSHADE.SCAN.IP (XTOX XTOY POINTS ILIST LLIST - WINDNUMBER) \\CREATECHARSET (CSINFO) \\FILLCIRCLE.PSC (TEXTURE TEXTUREBM TEXTUREWIDTH) BRECOMPILE ( -FNS FILES TEM FILE FILE.COM CFILE DESTINATIONENV MSG AUXFILECOM SCRATCHFILE COREOK X FILEMAPLST FNLST -NOFIXFNSLST) \\BLTSHADE.PSC (RGN LEFT BOTTOM WIDTH HEIGHT TEXTURE TEXTUREBM TEXTUREWIDTH) -\\NSFILING.COPY/RENAME (SESSION HANDLE NEWSESSION NEWDIR VERSION DEST-UNIQUE-P NAME OLDDIR DIR -SAME-DIR-P NEWATTRS NEWPARENT OLDHANDLE RESULT SERIALSTREAM NEWHANDLE) \\CARET.SHOW (DS) READVISE (FNS -) \\LASTNODE (CHILD ITEM#) PRINTCOMSTRAN (ARG TYPE WIDTH POINT VARS FORMATLIST FILEFORM TAIL TEMP -RESETOUT) DWIMARKASCHANGED (L) TCOMPL (FILE) TEDIT.CURSORMOVEDFN (LINE LINES WINDOW LEFT) -\\IRM.WILD.MATCH (TAIL) OPENRTPSOCKET (FRNPORT SOCKET# PUPSOC SOCKET MODE INITSTATE) TEDIT.UNDO (EVENT - LEN CH# FIRSTPIECE) CLISPIFYCROPS (TEM1 OPR0 CLTYP0 CROPSLST TEM2 PARENT) COMP.COMPARENUM (V1) -NTH.RELATIVE.COLUMN.OF (WIDTH CH N BUF) FREEMENU (DESCRIPTION) \\FTP.CLEANUP (CONNS FAIL) GRAYBOXAREA -(OUTLINESIZE) DINFO.GET.GRAPH.WINDOW (W) COMP.NUMERIC (2FN TMP TYPE A N V) SUPERPRINT/COMMENT2 (FILE -TAIL THISITEM LASTITEM) LAYOUTSEXPR (BOXING) COMPILER::GENCODE-TAGBODY-INLINE (COMPILER::SEGMENT) -MSNEEDUNSAVE (FNS FN) \\FM.PUSHGROUP (GROUPID) ICONW (POSITION) \\NSFILING.GENERATEFILES (SESSION -FILING5 DIRPATH TAIL N DIR PATHREQUIRED FILTERNEEDED D NAME HANDLE RETURNPROPS PROP FILTERLIST VERSION - VERSIONFILTER SCOPELIST BULKSTREAM RESULT) SEDIT::START-COMMENT (SEDIT::NEW-NODE) \\LEAF.REOPENFILE ( -NEWSTREAM OLDINFO NEWINFO OLDDATES) SHOULD-BE-DWIMIFIED? (FORM) TEDIT.SUBSTITUTE (SEARCHSTRING -REPLACESTRING REPLACE-LEN PC CRSEEN CONFIRMFLG SEL BEGINCHAR# STARTCHAR# ENDCHAR# RANGE PENDING.SEL -CHOICE ABORTFLG REPLACEDFLG PC# ACHAR NCH#) PFI.DEFAULT.HANDLER (TEMPLATE ENTRY PAT TESTFN ITEMNAME -MAINITEM) TRYNEXT (PL1##) CHANGERECORD (FNLIST) FMAPRINT (SEP LST) \\MAIKO.INPUT.INTERRUPT (LENGTH -PAIR) COMPILER::META-EVALUATE (COMPILER::TREE) SYSOUT (NEWFILE) \\TEDIT.CENTER.SEL.REV (LOOKS OLDQUAD -NEWQUAD PARASEL NEWQUADS) \\LEAF.DIRECTORYNAMEP (INFO) DIGITBASEP (CODE) CHARCODE.DECODE (C X CH CSET -POS PAIR) TB.RESHAPEFN (ITEM#) TIMEALL (X NAME NUMBEROFTIMES) \\DSPPRINTCHAR (STR I TABWIDTH) -MENUTITLEFONT (SCREEN TITLEFONT) STRPOSL (A BASE LEN OFFST STRFAT STRING START NEG I LASTI) -POLYSHADE.BLT (ILIST LLIST WINDNUMBER) EDITSHADE (SHADEBM QUITREGION SHOWREGION SHADEREGION SEDW -BMWIDTH BMHEIGHT BOXSIZE GRIDSPEC X Y GRIDINTERIOR XPIXEL YPIXEL) MOVE.TO.LINE (RELATIVE.POSITION -BUFTAIL) \\FM.JUSTIFYGROUPS (GROUPID HJUST VJUST MOTHER MOTHEREXTENT EXTENT) TEDIT.REDO (EVENT SEL CH) - CALLS3 (FLG) EDITDATE? (I) TEDIT.BUILD.PCTB1 (DEFAULTLOOKS PCTB PIECEINFOCH# PC PCLEN TYPECODE PCN -OLDPARALOOKS CURFILECH# EXLOOK LOOK EXISTINGCHARLOOKS EXISTINGFMTSPECS CURCH# OLDPC I) \\ATWGROUPSIZE -(EXTREGION) \\BSP.PREPARE.INPUT (SOCKET TIMEOUT ERRCODE PUP) \\DRAWPOLYGON.DISPLAY (COLOR PTAIL) -\\STRINGWIDTH.GENERIC (C CSET WIDTHSBASE TOTAL ESC ESCWIDTH TOTALWIDTH) SEDIT::TRY-REUSING-BITS ( -SEDIT::SHIFTED-Y SEDIT::SHIFTED-X SEDIT::LEFT-CLIP SEDIT::START) \\SPLITTREE (NEW1 OFST UPPEROFST -COUNT NEW2) SHOWGRAPH (WINDOW GRAPH) COMPILER::TRANSFORM-GET/PUT-BASE (COMPILER::LITERAL-OFFSET-VALUE -COMPILER::COMPUTED-OFFSET-TREE COMPILER::REAL-BASE) CHANGECCODE (DEF OLDREF) PURGEDSKDIRECTORY (S) -\\PROMPTWINDOW.OPENFN (MAINW PWINDOWPROP) ITEMW.REPAINTFN (SELITEM SELECTABLEITEMREGION) FONTUNPARSE ( -SPEC FACE) CL::ENSURE-CONSISTENT-PS (CL::EXPORTNAMES) SETUPHASHARRAY (TEM) NUMBERPAD.READ (FINISHVAL) -MSDESCRIBE1 (LL P LST) \\FM.JUSTIFYITEMS (GROUPID ITEM THISGROUP EXTENT MOTHER EXTENTLEFT EXTENTBOTTOM - ITEMREGION ITEMMAXREGION ITEMWIDTH ITEMHEIGHT) MAKEACCESS1 (DAT) SHRIEKIFY (CARTEST RESULTP) -COMP.SHIFT (FNS N) ADVISE (FN WHEN WHERE) \\FTP.RENAMEFILE (OLDPLIST HOST NEWPLIST CONNECTION INS OUTS - CODE) \\LEAF.EVENTFN (CONNECTION SOC) PAINTW (WINDOW BRUSH DS BITSPERPIXEL MASKSHADE HOTX HOTY MASK -PREVX PREVY PREVBUT) CLISPACKUP (L-1 LL L1 TEM OPRFLG L2) COMPAREPRINT1 (TAILX TAILY X Y K N SPACE -DOTFLAG) \\SCALEDBITBLT.PSC (SCALE DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT DESTREGION TEMPBM) -PROG1.PRETTYPRINT (E EXPR HERE) \\BACKCOLOR.DISPLAY (DD BITSPERPIXEL) SEDIT::COPY-SELECTION-COMMENT ( -SEDIT::END SEDIT::COMMENT SEDIT::INSERT SEDIT::OBJ) BCOMPL (FILES) DINFO.FIND (PAIR) -\\BITMAPFROMTEXTURE (Y X) COMP.RPLACD (NEED-POP) \\RTP.HANDLE.INPUT (PUP TIMER) -\\TEDIT.PARSE.CHARLOOKS.MENU (SCRATCHSEL NEXTB NEWLOOKS CH# BUTTON TEXT NAME SIZE SUPER OFFSET) -COLLECTFNDATA (VAL) CH.ADD.MEMBER.TO.DOMAIN.ACL (NEWMEMBER DOMAIN) %COPY-ONED-ARRAY (NCELLS -REMOTE-ARRAY REMOTE-BASE I) TEDIT.BUILD.PCTB0 (PCTB PIECEINFOCH# PC PCLEN TYPECODE CURFILECH# OLDPC -CURCH# I PCN) \\BLTSHADE.DISPLAY (DESTDD DESTINATIONLEFT DESTINATIONBOTTOM |left| |bottom| |right| -|top| CRLEFT CRBOTTOM DESTINATIONBITMAP DESTINATIONNBITS TEXTURE SOFTCURSORUP DISPINTERRUPT HEIGHT) -XCL::SETF-GET-PROCESS-PROFILE (XCL::PROFILE) SETFONTCLASSCOMPONENT (DEVICE) \\BSP.CLEANUP.INPUT (NEWLO -) POSTSCRIPT.HARDCOPYW (REGION SCALE) TEDIT.NEXT (SEL TARGET FIELDSEL OPTION) \\AVGCHARWIDTH (W) -XYSECTLSEG (XT YT UT VT XMIN XMAX UMIN UMAX PT Y) \\NSFILING.NEXTFILE (INFO NAME) SETFONTDESCRIPTOR ( -DEVICE FONT FAMILY FACE ROTATION X) TEDIT.PROMPTFLASH (MAINTEXTOBJ WINDOW) CLISPNOEVAL (TEM FN) -SEDIT::COMPUTE-POINT-POSITION-COMMENT (SEDIT::SUBNODE) \\READBMDIMENSIONS (WIDTH HEIGHT) -POLYSHADE.DISPLAY (ILIST LLIST WINDNUMBER) ICMLARRAY.MENUW.SHOW (LEVEL LEVEL-ITEM I) |\\VFMKillBuffer| - (PREV CURRENT) DWIMIFY0 (FAULTFN VARS EXPR TEM FN) CASE.PRETTYPRINT (EXPR HERE TAIL INNERLEFT LEFT -CASE) TEDIT.BUILD.PCTB2 (DEFAULTLOOKS PCTB PIECEINFOCH# PC PCLEN TYPECODE PCN LOOKSHASH LOOKS I -PARAHASH OLDPARALOOKS CURFILECH# CURCH# OLDPC) EDITFNS (X) \\NSFILING.PARSE.FILENAME (LASTHOST CH I -START SEMI DOTSEEN DIRS END NAME VERSION) PROGV.PRETTYPRINT (EXPR) \\DRAWELLIPSE.DISPLAY (ORIENTATION -CX CY BOTTOM TOP RIGHTPLUS1 LEFT |DestinationBitMap| OPERATION NBITS BRUSHBM COLOR COLORBRUSHBASE -RASTERWIDTH DESTINATIONBASE BBT BRUSHBASE BRUSHRASTERWIDTH HEIGHTMINUS1 BRUSHWIDTH BRUSHHEIGHT -LEFTMINUSBRUSH BOTTOMMINUSBRUSH TOPMINUSBRUSH NBITSRIGHTPLUS1 A B G |yOffset| |CYPlusOffset| -|CYMinusOffset| U V K \x1 \y1 \y2 \k1 \k2 \k3 \b \a \d \x \y SOFTCURSORUP DISPINTERRUPT \w \x2) -UNICODE.UNMAPPED (INVERSE NEXTCODE) \\IFSERRORSTRING (START LEN RESULT I) %COPY-STRING-TO-ARRAY ( -REMOTE-BASE REMOTE-ARRAY I) FONTCLASSCOMPONENT (FONT) PRINTPROG (TAIL) PRINTCODENT (START2 I NAME TAG -NUMBER NT1 NT2) PFI.MAYBE.NEW.PAGE (REMAINING) \\FILLCIRCLE.DISPLAY (RADIUS DISPLAYDATA X Y D FCBBT -LEFT BOTTOM TOP RIGHT OPERATION |DestinationBitMap| NBITS TEXTUREBM TEXTURE GRAYBASE |pattern| -DESTINATIONBASE RASTERWIDTH GRAYWIDTH GRAYHEIGHT CX CY SOFTCURSORUP DISPINTERRUPT) \\DSPRESET.DISPLAY -(DISPLAYSTREAM CREG FONT FONTASCENT X) \\MAIKO.10MBWATCHER (MESSAGE-LENGTH PACKET CNTR) ACCESSDEF4 ( -TEM TL SUBDECS) CODEWRAPPER.PRETTYPRINT (FORM) \\READBINARYBITMAP (STREAM BITMAP) \\PARAS.IN.SEL (PCS -PARAENDED PARAS POS) LEAF.ASSURE.FINISHED (STREAM PUP) ENTRY# (X) SUBPRINT (OLDY CURRENT TEM CLISPWORD - FORMFLG TAIL NEXT DOCRFLG END LEFT LEFT0 CEND) \\FONT.COMPARESYMBOL (INPUTFIRSTC A1205 A1206 A1207 -CHAR1 CHAR2) CACHEMACRO (FN) \\MAKE.JIS.TO.XCCS.CONV.TABLE (ENTRY KU TABLE) ICMLARRAY.MENUW.GETLEVEL ( -LEVEL I NEWVALUE) SUPERPRINT0 (MACRO E) \\TEDIT.ABBREV.EXPAND (SEL CH# CH EXPANSION OLDLOOKS) -SUPERPRINT/COMMENT1 (MINLEFT DEFAULT LM) \\DRAWLINE.DISPLAY (BITMAP BIGBMLIST HEIGHT |ClippingTop| -|ClippingBottom| BM BOTTOM |CTop| |CBottom|) \\FONT.SYMBOLASSOC (FIRSTC X) SEQUENTIAL.PRETTYPRINT (TEM - TAIL) \\FONT.SYMBOLMEMB (X) SEDIT::REUSE-LINEAR-FORM (SEDIT::CURRENT-X SEDIT::TEMP SEDIT::CURRENT-LINE -) SI::RESETUNWIND (RESETZ OLDVALUE) SEDIT::CFV-CLISP (SEDIT::INDENT SEDIT::SUBNODE SEDIT::PWIDTH -SEDIT::FIRST-SUBNODE) \\DRAWCIRCLE.DISPLAY (RADIUS X Y D BBT DISPLAYDATA USERFN CX CY BOTTOM TOP -RIGHTPLUS1 LEFT |DestinationBitMap| OPERATION NBITS BRUSHBM COLOR COLORBRUSHBASE RASTERWIDTH -DESTINATIONBASE BRUSHBASE BRUSHRASTERWIDTH HEIGHTMINUS1 BRUSHWIDTH BRUSHHEIGHT LEFTMINUSBRUSH -BOTTOMMINUSBRUSH TOPMINUSBRUSH NBITSRIGHTPLUS1 SOFTCURSORUP DISPINTERRUPT) PRINTSQ (FOLD LEFT TAIL -REST) SUBPRINT1 (L TMP) \\POLYSHADE.YSCAN.IP (|fulllist| |currlist| |currcrit| |scany| |scan| -|fullcrit| |count| |ix| |tx| |ex| |clist| |ty| |crity|) MAKEKEYLST (TEM X KEYSTRING I) MSDESCRIBE ( -ARGS LINE VAR GLOBALS FREES D L) \\FM.LAYOUTGRID (PROPS FONT BOTTOM ROWSPACE COLUMNSPACE ID OLDCORNER -BOXOFFSET GRIDLEN TAIL ITEMNUM LEFT X GROUPREGION NEXTLEFT) \\DSPFONT.DISPLAY (DD OLDFONT XFONT) -COMPILER::ENSURE-EFFECT-CONTEXT (COMPILER::A COMPILER::CALL-ARGS COMPILER::LAMBDA-PARAMS COMPILER::LAMBDA-ARGS - COMPILER::N) ICMLARRAY.MENUW.APPLY (I LEVEL DISPLAYGROUP) \\SCALEDBITBLT.DISPLAY (SCALE REGION WIDTH -HEIGHT DESTINATIONBOTTOM DESTINATIONLEFT BITMAP) DSFIT1 (L M) PRIN1 (\\THISFILELINELENGTH) -\\DSPRIGHTMARGIN.DISPLAY (OLDRM) OPT.OPTCHECK (B P CD) DSFIT2 (N NC) DO.PRETTYPRINT (TAIL) READVARS ( -VAR) UTF8.OUTCHARFN (C) \\UNCOPY (STR I OFFST NCELLS LOCAL-ARRAY LOCAL-BASE) CONCAT (NM FATSEENP LEN J - S POS) PRINTNUM (WIDTH STR RAD TEMP PAD) \\INSERTTREE (NODE-COUNT ITEM# BB NEWLEN I) READPAGEMAP (I -VP J FP D) FILLRECTANGLE.IP (RIGHT LEFT TOP BOTTOM WIDTH HEIGHT) FB.PROMPTFORINPUT (PROMPT I RESULT) -DINFO.ADD.FMENU (FM.WINDOW) TAB (X) SHIFT.BITMAP.UP (NEW.BITMAP) \\TEDIT.APPLY.CHARLOOKS (CH# NEWLOOKS -) XCL::PUT-IMPLICIT-KEY-HASH (XCL::INDEX XCL::VALUE XCL::DELETED-SLOT-INDEX XCL::FIRST-INDEX XCL::REPROBE -) MB.THREESTATE.DISPLAY (OBJBOX X Y BITMAP DS) \\PRINTBINARYBITMAP (BMH) \\TELERAIDBREAK (USERFRAME -FRAME NXT NXTEND NEWFRAME FREE) /MAPCONC (MAPY CL:MAPL MAPE MAPX) \\MAP-CODE-LITERALS (NUMBER I NT1 -TAG CODELOC) \\FTP.ADD.USERINFO (PLIST) FONTPROP (FONT) CLISPELL (RESPELLTAIL TEM VAL) -|CreateCursorBitMap| (BASE I) COMP.LABELS (X) |\\PFFindPageAddr| (PAGEGROUP) MAKEALISTCOMS (ALISTNAME -ATNAME ENTRY) \\TEDIT.SUBST.FN2 (SUB-FIND-RESULT) GO.TO.RELATIVE (COL ROW) \\DRAWPOLYGON.IP (CLOSED -LEFT RIGHT BOTTOM TOP IPXPOS IPYPOS VISIBLEP PTS SEG# PREVX PREVY) \\FM.LAYOUTCOLUMN (PROPS FONT LEFT -BOTTOM ROWSPACE COLUMNSPACE ID OLDCORNER BOXOFFSET X) |\\LFFindDirectoryVol| (VOL |nextVolumes| |vols| - |vol|) PUPNET.DISTANCE (ROUTE) \\NSFILING.OPEN.HANDLE (HANDLE) CLISP3A (L) BROKENDEF (FIRSTBYTE -BEFORE AFTER SIZE NEWCA OP) \\FONTFACE (UNKNOWN WEIGHT SLOPE EXPANSION FACE) SHOW.CLEARINGHOUSE (SEXPR -) MSMARKCHANGED (ATYPEREC MSMCFN) \\HANDLE.RAW.PUP (DESTNET MYNET PUPSOC SOC CSUM) CLISPAND (TEM) -\\FM.LAYOUTROW (PROPS FONT LEFT BOTTOM ROWSPACE COLUMNSPACE ID OLDCORNER BOXOFFSET X) SEDIT::UNDO-EXTRACT - (SEDIT::SUBNODE SEDIT::INDEX) DRAWAREABOX (TEXTURE) \\MAP-CODE-POINTERS (TAG CODELOC) -\\BITBLT.DISPLAY (SOURCELEFT SOURCEBOTTOM CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM WIDTH HEIGHT SOURCEDD -SOURCE SOURCEBITMAP TEXTURE SOFTCURSORUP DISPINTERRUPT DESTSTRM SCRATCHBM DESTDD DESTBITMAP -DESTINATIONLEFT DESTINATIONBOTTOM |left| |bottom| |right| |top| CRLEFT CRBOTTOM DESTINATIONNBITS -SOURCENBITS |stodx| |stody| OPERATION MAXSHADE DTY DLX STY SLX) \\DO.PROGV.SETUP.FRAME.AND.EXECUTE ( -HEADER NT NILSTART VAR VALUES VAR# NT1 NT2 VALUEOFF) \\COURIER.RESULTS (RESULT MSGTYPE ERRORDEF OTHER -ERR) \\SMASHBSPSTREAM (OLDSTREAM OPENSTREAM) LLBREAK (DEF NUFN) DINFO.INVERT.NODE (NODE) EDITFB (FL) -SEDIT::COMMENT-LENGTH (SEDIT::SUBNODE SEDIT::I) ACCESSDEF (FIELD RECS TEM CHRLST V1 DOTTAIL FIELDLST R -) \\NSRANDOM.SESSION.WATCHER (SESSION S WRITING? TIMEOUT BASICTIMER CONTINUANCE) \\POSITION.MENU.IMAGE - (POSITION SCREEN MX MY IMAGE) DASSEM.CLEANFNTEST (FN) \\INIT.RTPPROCESS (NAME) \\TEDIT.SHOW.CHARLOOKS - (CH# PC NEWLOOKS) AS.MAKE.CONVERSATION (USERINFO ADDR STREAM CRED.PACK) POSTSCRIPT.PUTCOMMAND (S#S -STR#) \\MAIKO.10MBSENDPACKET (PAIR) \\TEXTMENU.TOGGLE.DISPLAY (OBJBOX X Y BITMAP DS) SEDIT::LINEARIZE-CLISP - (SEDIT::INDEX SEDIT::INDENT SEDIT::COMMENT-START-X SEDIT::COMMENT-INDENT SEDIT::SUBNODE SEDIT::COMMENT? - SEDIT::OK SEDIT::KEYWORD? SEDIT::PROGRAM-WORD? SEDIT::SECOND-SUBNODE) SPACES (\\THISFILELINELENGTH) -CHECKFPTOVP (FP FPBASE) ASKUSEREXPLAIN (TEM) INSERTLINE (OLDEND NEWLINE X) PRINTCODE (RADIX I NTSIZE -STARTPC TEMP PC LEVEL STK TAG CODELOC LEVADJ LEN B B1 B2 B3 B4 B5 OP# N X) \\TEDIT.UPDATETREE (I -PCNODE UPWARD) \\DSPBACKCOLOR.DISPLAY (DD COLORCELL DESTINATION BITSPERPIXEL COLOR) -INSTALL-PROTOTYPE-DEFN (PROTOTYPE-TYPE) SETCOLOR.IP (SHADE OPERATION) \\DSPSCALE.PSC (NSCALE) -GAINSPACE (RESPONSE) COMP.TAGBODY (F TAGS X) MAKEHASHKEY (CHARCODE INDEX) COROUTINE (CALLPTR## -COROUTPTR##) COMP.RETURN-FROM (DATA BLOCKFRAME CTX) \\DSPCOLOR.DISPLAY (DD COLORCELL DESTINATION -BITSPERPIXEL COLOR) |\\VFMGetBufferFor| (BUFFER FLUSH LAST) \\PROMPT.FOR.PUP.NUMBER (NEWNUMBER) -CLISPIFYNOT (TEM1 TEM2) GETCHARBITMAP (CHARCODE CSINFO CBM CWDTH CHGHT) \\FM.FORMATEXPLICIT (X) -COMPILER::EXPAND-OPENLAMBDA-CALL (COMPILER::SUBST-ALIST COMPILER::UNSUBBED-ARGS) SEDIT::OUTPUT-STRING -(SEDIT::THIS-ITEM SEDIT::WIDTH STRING SEDIT::FONT) SHAPEW (WINDOW NEWSIZE) WINDOWREGION (FN) -RESETGRID.NEW (XSCALE YSCALE ORIGX ORIGY XOFFSET YOFFSET MAXX MAXY TEMPBM GRIDSPEC) \\RTP.ACTION ( -NEWSTATE STREAM STATE TIMEOUT) COMPILER::COMPLETELY-EXPAND (COMPILER::NEW-FORM COMPILER::CHANGED-P) -CH.GETAUTHENTICATOR (INFO) NEGATE (Y) MB.MARGINBAR.DISPLAYFN (WASON BITMAP DS) SEDIT::SKIP-TO-GAP ( -SEDIT::NODE) SEDIT::RECOMPUTE-FORMAT-VALUES (SEDIT::CHANGED?) /MAPCON (MAPY CL:MAPL MAPE MAPX) -SETUPPAGEMAP (I) DWIMIFY (VAL) PUTCHARBITMAP (CHARCODE) SHIFT.BITMAP.DOWN (NEW.BITMAP) -\\CORE.DELETEFILE (NAMETAIL EXTTAIL VERSTAIL) SUBDECLARATIONS (Y) CLISPIFY (EXPR PARENT TEM TAIL -CLISPIFYFN VARS FORM DECLST) COERCETOBITMAP (BM CR) CLEAR.LEAF.CACHE (HOST DEVINFO CONNECTION) -\\LEAF.BREAKCONNECTION (DEVINFO CONNECTION FILES) MOVECHARBITMAP (CHARBITMAP SRCEASCENT DESTASCENT -SRCEDESCENT DESTDESCENT NEWASCENT NEWDESCENT TEMPBITMAP) PRINTDEF (LEFT) \\CORE.UPDATEOF (OFF) -UTF8.INCCODEFN (BYTE1) FONTMAPARRAY (F PRETTYFONT# MAXFONT MINFONT FA I) TYPENAME (N) -\\CORE.RELEASEPAGES (LP P) \\POLYSHADE.XSCAN.IP (|fulllist| |currlist| |currcrit| |scany| |scan| -|fullcrit| |count| |ix| |tx| |ex| |clist| |ty| |crity|) \\CORE.FINDPAGE (PAGETAIL PE PAGEPTR PREVTAIL) - MAPPAGES (VP) FIXAPPLY1 (N LST XTAIL) \\FIND.LOCALPUPHOSTNUMBER (NEWNUMBER) CLISPCOND (TEM1 TEM2) -\\CORE.GENERATEFILES (MATCHINGFILES EXT) \\LOCKFN (FN) CLISPCOND1 (TEM) \\TEDIT.GET.CHARLOOKS.LIST (I) - TEDIT.PUT (OFILE PUTFN CACHE FONTFILEUSED CH#S PC TITLE MENUSTREAM FILENAME) DECODEBUTTONS ( -BUTTONSTATE) DIRECTORY.MATCH (FIRSTCHAR) \\CHTOPC (TBASE-CH# FOUND BASE-CH# I OFST TREE) RECORD (NAM N -) READPAGEMAPBLOCK (P B) \\NSFILING.GENERATE.STARS (N NAME) \\PRINTFPTOVP (STREAM FIRSTPAGE NWORDS -NEXTFP NEXTVP BASE NEXTLOCKED NEXTTYPE FIRSTFP FIRSTVP LASTVP LOCKEDP TYPE) BKSYSBUF (C *READTABLE* -TTY *PACKAGE*) FONTFILEFORMAT (STRM) \\NSFILING.CONFLICTP (S) RPLSTRING (OLEN RBASE ROFFST RLEN RFAT -REP POS OBASE FIRSTNEW I J) BKSYSCHARCODE (C) TEDIT.GET.OBJECT0 (GETFN FILEPTRSAVE OBJ) \\IRM.WILDCARD - (ATOM) CLOSERTPSOCKET (SUCCESS) CHOOZ (XWORD NDBLS TEM ALTFLG TWORD SPLST TWORD1 TWORD2 NCTWORD -NCXWORD SC VAL REL) CLISP3C (TEM) CH.FINDSERVER (DOMAINPATTERN ORGANIZATION.INFO DOMAIN.INFO) -SPELLFILE (NAME VERSION EXTENSION DIRECTORY RELATIVEDIRECTORY SUBDIRECTORY HOST DIRS DEVICE FIELDS VAL - ROOTNAME FILEDATES SPELLVAL X DIR APPFLG) MB.NB.DISPLAYFN (BITMAP DS X Y IMAGE STATE BXVAL BYVAL -BUTTON) TEDIT.PUT.PCTB2 (PC OLDLOOKS TRUEFILE OFILE CURCH# OLDCH# FONTFILE PCCOUNT PARAHASH -PARALOOKSSEEN LOOKSHASH PREVFATP PFILE PSTR CH I CH#S PREVPREVPC PREVPC) /LISTPUT1 (X) NAMEFIELD ( -SUFFIXFLG) \\TEDIT.UNIQUIFY.PARALOOKS (LOOK) SEDIT::OUTPUT-SPACE (SEDIT::I) \\CURVE (OLDX OLDY -SOFTCURSORUP DISPINTERRUPT X Y DX DY DDX DDY DDDX DDDY OOLDX OOLDY DELTAX DELTAY DELTA TX TY I) -CLISPFOR (UNDOSIDE UNDOSIDE0 LISPXHIST UNDOTEM TEM) \\PUPNET.CLOSERP (ROUTEY) FONTPROFILE (SEEN FONTS -BASICCLASSES) \\PRINDATUM.TO.STRING (*PRINT-CIRCLE-HASHTABLE* FATSTRINGP STRINGLEN -*PRINT-CIRCLE-NUMBER* STRINGPTR STRINDEX) \\TEDIT.FIND.WC1 (RESULT RESULT1) FIND.NEXT.WORD (BUFTAIL -BACKUPFLG N) SHIFT.BITMAP.LEFT (NEW.BITMAP) SAVEPUT (TEM OLDFLG X X0) MSMARKCHANGE1 (FLG FN) -TEDIT.UNDO.MOVE (TOTEXTLEN) MAKEHASHLINKS (TEM2 RECORD.TRAN TEM DEF) FINDFN (POS NAME TOKEN TEM) -/ADDPROP (TEM NEW X X0) DIRECTORY.MATCH.SETUP (FILENAME TAIL) CL:MAKE-HASH-TABLE (CL::TEST) LOADFNS ( -DFNFLG TEM LDFLG ADDSPELLFLG BUILDMAPFLG FILEPKGFLG LISPXHIST FNLST FILE RESETSAVER INSTREAM ROOTNAME -FILENV FILEMAP FILECREATEDLOC FILECREATEDLST VARLST FILEMAPEND) CL::%DO-TRANSLATE (CL::SUBSEQUENT-VALUES -) FONTPROFILE.ADDDEVICE (NEWDEVICE OLDDEVICE FC) GENSYM (PREFIXLEN PREFIX CHARCODE BUFSIZE OSTRBUFFER -BUF NUMLEN CNT C I BEG.I ATOM) /PUTPROP (TEM X X0) COMP.RETURN (PROGFRAME) DUMPINITPAGES (I FILE) -\\NSFILING.CHECK.ACCESS (A) \\TEDIT.UNIQUIFY.CHARLOOKS (LOOK) FONTCOPY (OLDFONT I FAMILY SIZE FACE -ROTATION DEVICE VAL NOERROR ERROR) \\LOCATE.PUPNET (DATA) \\UNITWIDTHSVECTOR (I) \\LOOKUPFONTSINCORE ( -FAMBUCKET SIZEBUCKET FACEBUCKET ROTBUCKET DEVBUCKET) \\CONVERTTOFRACTION (RESULT BOX) EDITBM (BMSPEC -ORIGBM BM CR BPP ORIGBPP ORIGWIDTH WIDTH HEIGHT GRIDSQUARE BMWWIDTH BMWHEIGHT BMW) -\\COURIER.OUTPUT.ABORTED (CONTINUATION RESULT FILENAME) STREQUAL (LEN BNX BNY) \\IRM.WILD.REF (SAMEFLG -) FORWARD.DELETE.TO (L) ASSURE.PUP.READY (MYHOST# NDB) |\\VFMLower| (|word|) PROCESS.EVALV (ME) \\COPY - (V R) LENGTH (N X) MBUTTON.FIND.NEXT.BUTTON (PC OBJ START-OF-PIECE) \\TEDIT.GET.PARALOOKS.LIST (I) -\\NSRANDOM.CREATE.STREAM (ERROR S EOF) /LISTPUT (X X0) \\BSP.HANDLE.INPUT (EVENT PUP TIMER) -FONTSAVAILABLE (DEV FONTX FONTFACE FAMILY ROTATION) SHOW.IP (SHOWSTREAM LEN) COMPARE1 (X Y) L-CASE (C -FLG CHANGEFLG I NEWSTRING BASE) U-CASEP (C) MAKEINITLAST (GAG AL X A) CHAT.STARTUP (SLASH PROTOCOL -OPENFN RESULT HOST PAIR DISPLAYTYPE STREAMS WINDOW) COMP.GO (D) OPT.DS1 (A CD) BQUOTIFY (TAIL BQCAR TL -) SHIFT.BITMAP.RIGHT (NEW.BITMAP) \\FM.FORMATBYCOLUMN (GROUPS COLUMNLEFT GROUPLIST COLHEIGHT) -ALLFIELDS (Y) SEDIT::CFV-DOTLIST (SEDIT::PAREN-WIDTH SEDIT::SUBNODE MAX) SCAVENGEDSKDIRECTORY ( -LISPDIRECTORY LISPFILES) SORT.PUPHOSTS.BY.DISTANCE (PAIR) COMPILER::GENCODE-LET (COMPILER::ARG COMPILER::PARAM - COMPILER::NULL-PARAMS COMPILER::NON-NULL-PARAMS) EDITGETDEF (SEDIT::CONTEXT) MSSTOREDATA (TAB NEWREL) - \\FM.FORMATBYROW (GROUPS ROWBOTTOM) COPY.TEXT.TO.IMAGE (C SCSET CHAR SHIFTEDCHARSET FC DEFAULTTAB) -\\DURATIONTRAN (BODY Z L RESOURCENAME USINGTIMER TEMP TIMERUNITSLST FORDURATION SETUPFORM EXPANSION -OLDTIMER Y) BMOBJ.DISPLAYFN (FACTOR SHRUNK.BITMAP) \\TEDIT.CENTER.SEL (LOOKS OLDQUAD NEWQUAD PARASEL -NEWQUADS) \\LEAF.REQUESTPAGE (DATA OPUP) \\FTP.OPEN.CONNECTION (INSTREAM) \\CREATECHARSET.DISPLAY ( -TRANSL UFONT REALFONT NEWCSINFO) \\CREATE-REAL-CHARSET.DISPLAY (XFONT CSINFO TRANSL UFONT REALFONT -NEWCSINFO) \\BUILDSLUGCSINFO (SCALE WIDTHS I OFFSETS BITMAP) \\ITEM.WINDOW.COPY.HANDLER (NEWITEM -SMASHPOS CURRENTITEM) CLISP4 (N FLG POS) TB.MAP.DELETED.ITEMS (ITEM) SPP.FORCEOUTPUT (EPKT STREAM) -\\FM.FORMATBYGRID (GROUPS ROWBOTTOM GROUPLIST ROWIDS GRID ROWID ROWDESC ROWREGION ROWITEMS -ROWDAUGHTERS ITEMDESC GRIDPOS ALIGNREGION BOX) \\POLYSHADE.DISPLAY (|table| |fulllist| |currlist| -|currcrit| |scany| |scan| |fullcrit| |count| |ex| |clist| |ty| |crity| D X0 DX DDX DDY XL XR) -\\CORE.NAMESCAN (NEXTNAME NAMELST NEWSEG) ADDPME (PMP PX LOCKBASE) TEDIT.GET.CHARLOOKS0 (NAMELEN NAME -I SIZE SUPER SUB STYLESTR USERSTR PROPS) DO.EDIT.PP (LEFTOVER EXPRS) MOVETOP (Z Y) \\PUTBASESTRING (CH - OFFSET SOURCE) CLISP3 (L TEM FLG OPR) FILL.LINE (Y XL XR) \\HANDLE.PUP.ROUTING.INFO (HOST HOPS NET -BUCKET ENTRY OLDHOPS NEWTIMER LENGTH BASE) \\PUTBASESTRINGFAT (I DOFF) \\TEDIT.DIFFUSE.PARALOOKS (PC) -\\TEDIT.FOREIGN.COPY? (DEST.TEDIT? PROCW DEST.TEXTOBJ STREAM CH I) FONTSET (X SEEN FONTS BASICCLASSES) - SEDIT::NEXT-LINEAR-ITEM (SEDIT::LINEAR) \\CORE.NEXTFILEFN (FILE) COMP.PROG (F A TAGS X FLG) SEDIT::MUTATE - (SEDIT::MUTATOR-STRING SEDIT::MUTATOR) SET-CONNECTED-DIRECTORY-INTERACTIVELY (NEW-DIRECTORY) -\\READDISPLAYFONTFILE (EXT FONTFILE STRM CSINFO) GETHASHKEY (HASHKEY DELETED? PROBE) |GetBcplString| ( -S) XCL::WALK-DECLARATIONS (XCL::NEW-FORM XCL::MACROP) COMP.LAMBDA (VALS SUBOLD VARS SUBNEW V VAR EXPS -F) |\\LFFileSpec| (DIRSTREAM |versionList| |version| |dirPtr|) DIRECTORY.NEXTFILE (TEM) -MBUTTON.FIND.NEXT.FIELD (PC START-OF-PIECE CH1 LEN) MSEDITE (X FPNAME) \\FM.FORMAT (PROPS FORMAT FONT -LEFT BOTTOM ROWSPACE COLUMNSPACE ID OLDCORNER BOXOFFSET GROUPS EXTENT) TEXTTOIMAGEFILE (INPUT-STREAM -INPUT-FILENAME IMAGESTREAM) OR (*TAIL*) BMOBJ.IMAGEBOXFN (WIDTH HEIGHT FACTOR) PURGEHISTORY (TYPE) -\\LEAF.LOOKUPCACHE (CACHE PREV I) EDITBMRESHAPEFN (MINCOMMANDAREAWIDTH BITMAPWIDTH BITMAPHEIGHT -BMWINTERIORWIDTH BMWINTERIORHEIGHT GRIDSQUARE EDITAREABITWIDTH EDITAREABITHEIGHT BMDISPLAYBOTTOM -BMDISPLAYWIDTH GRIDINTERIOR BMDISPLAYHEIGHT EXTENTHEIGHT EXTENTWIDTH TEMPBM) \\OPENLEAFCONNECTION ( -PROTOCOLS IFSPORT NAME/PASS CONN OPUP DATA RESULT) OPT.DELCOPYFN (Z_P P X) TITLEW.BUTTONEVENTFN ( -TITLECOMMANDFN XCL:*PROFILE*) \\SEARCHFONTFILES (FAMILY DEVICE FACE E DIR FONTFILE THISFONT THISFACE -FONTSFOUND) CH.LIST.OBJECTS (OBJECTPATTERN) COMPILER::FIND-TAG-DUPLICATION (COMPILER::TAIL COMPILER::INST -) POSTINITARRAYS (VP) TEDIT.GET.PARALOOKS0 (TABSPEC TABFLG DEFAULTTAB TABCOUNT TABS TAB#) -GETFIELDFORCREATE (USINGEXPR VALUE TEM DEFFLG) FIND.LINE (LINE) HASH.PASSWORD (CHAR HASH) -\\CORE.UNPACKFILENAME (DOT SEMI) \\ROUTE.PUP (NDB ROUTE PDH) \\NSFILING.FULLNAME (INFO FULLNAME HANDLE - DIRECTORYFLG VERSION PATHNAME CH VERS I DIRLST START DOTSEEN PREVDOT FUNNYCHAR FILENAME QUOTEDDIRS -ALREADYQUOTED) /LCONC (XX) TEDIT.HARDCOPY (IMAGETYPE) \\CORE.OPENFILE (INFOBLK STREAM EOL) -\\FONTINFOFROMFILENAME (NAME SIZEBEG CH CH# FAMILY SIZEND SIZE FACE EXT) \\NSRANDOM.REESTABLISH ( -HANDLE) \\GETINTEGERPART (HIPART) \\DECUSECOUNT (ALINK BLINK CLINK SIZE FRAME) SPELLFILE.SPELL ( -VERSION) IMAPLIST (CURR1 CURR2 NEXT1 NEXT2 Y1 V1 ADVANCE U1 X0 Y0 X1 DX DY U0 V0 DU DV PT IMAP PATH2 -PATH1) DO.EDIT.COMMAND (EDITARG EDITMINUS CHAR X LASTSKIP L) UNDONLSETQ (UNDOSIDE UNDOSIDE0 LISPXHIST -UNDOTEM) CLISPIFY2D (TEM) CONSTANTEXPRESSIONP (FORM VALUE X) \\PUPGATELISTENER (EVENT PUP) -\\CORE.GETNEXTBUFFER (COFF CPAGE# EPAGE# COREBUF) COURIER.CALL (PGMDEF PROCDEF NARGS ARGTYPES -NOERRORFLG ARGLIST I) SUBFIELDCREATE (HL DEC TEM SUBDECL SUBTRAN VAL) \\FINDFONTFILE (EXT FONTFILE) -INSPECTW.REPAINTFN (XCL:*PROFILE* LINEBASE SELITEMS SELECTABLEITEMREGION PROPPRINTFN) -LISPFORM.SIMPLIFY (Y X) \\INCUSECOUNT (SCANPTR) \\COREFILE.SETPARAMETERS (PAIR TYPEFLG) COMPSETREAD (X -) \\GATHER-CLEANUP-FORMS (PROC FRAME) SPELLFILE1 (FL NAME1 EXT1 VERS#1) MAKECREATELST1 (TEMPLATE) -FILL.INITTBLE (FCBBT TOPP BOTTOM LEFT RIGHT OPERATION |DestinationBitMap| NBITS TEXTUREBM TEXTURE -GRAYBASE |pattern| DESTINATIONBASE RASTERWIDTH GRAYWIDTH GRAYHEIGHT CX CY FILLTBLE) PURGEHISTORY2 (TEM -) \\SFMAKEITALIC (HEIGHT NEWBITMAP UNKNOWNOFFSET UNKNOWNWIDTH N M OFFSET WIDTH R XN XX YN YX J I) -\\INIT-MISCN-TABLE (BASE) MOUSESTATE-EXPR (NAMEMASK MOUSEONLYFLG) CREATEARRAYSLICE (DIM RESULT PROD -LEVEL SCANDIM SELECTIONDIMS OFFSETS OFFSETCONSTANT) CH.RETRIEVE.DOMAIN.ACL (DOMAIN) -MBUTTON.FIND.BUTTON (PC OBJ START-OF-PIECE) \\FONTFACE.COLOR (DEV ANSWER FACE POS BWFACE OLDPOS -BITSPERPIXEL BACKCOLOR FORECOLOR) \\EXTENDSTACK (SCANPTR) /ECHOMODE (FLG) \\PARSE.NUMBER (RDTBL RADIX -MAXALPHADIGIT MAXDIGIT COMMONLISPY ENDFRAC NEGFRAC EXP10 STATE C SIGN DECPT SEENBOGUSDIGITS J -SIGDIGITS START EXPSTART SEENALPHADIGITS I) GETNSPRINTER (INFO NAME) SEDIT::LINE-FINISHED (CL:BLOCK) -SPELLFILEDIR (H) \\TEDIT.PRESS.HARDCOPY (FILE) \\MOVEFRAME (NEW FREESIZE AT-EOS OLDSIZE -NAMETABLE-ON-STACK) \\PAGEDEOFP (CUROFFSET) GET.MENU.LIST (DIM) FINDATOM (XTAIL NAME REALPOS TEM) -MSEDITF (X FPTYPE FPNAME) ED (CL::NAME CL::OPTIONS X TYPE) GETDUMMYVAR (VAR) FIXSPELL1 (MESSFLG TEM -APPROVALFLG BUFS VAL X) \\FONTFILENAME (FACE TAIL) SPELLFILE.MATCHINGDIRS (DIR UDIR DHOST) -\\GCSCANSTACK (SCANBASE Q NEXT NTEND SCANPTR) \\CORE.GETFILENAME (ROOT SCR EXT VERS) FIND1STPRIME (I P -) ARGS.COMMUTABLEP (X Y FN) CHAT.PROMPT.FOR.INPUT (WINDOW) \\FTP.FIX.BROKEN.INPUT (NEWSTREAM PAIR CONN -) OPT.EQVALUE (CD) \\NODIRCORE.OPENFILE (NAME) INSPECT/ATOM (ASPECTS TYPETOINSPECT) \\ALLOCBLOCK ( -NCELLS GCTYPE ALIGN ABLOCK) %MAKE-STRING-ARRAY-FAT (OFFSET LIMIT NEW-BASE) UNIX-STREAM-IN (CH) -\\LEAF.ABORT.FROMMENU (SEQUIN) SETA (A N0) \\TFBRAVO.PARSE.PROFILE.VALUE (VALUE) TB.COLLECT.ITEMS ( -PREDFN ITEM) \\DOHARDRETURN1 (HRFRAME RETURNEE AX NEW SIZE NAMETABLE-ON-STACK RETBF) ARRAY (SIZE TYP -NCELLS GCTYPE INITVAL AP LASTWORD2BASE P) \\PS.SCALEHACK (FACTOR) EDIT.BITMAP.REAL (NEW.BITMAP -COMMAND.MENU COMMAND DONE PREVIOUS.BITMAP) \\POSTSCRIPT.OUTCHARFN (CHARWID NEWXPOS MAPPING CHAR) -HELPSYS (MACRO.TYPE) \\CORE.GETINFOBLOCK (SCR ROOT EXT INFOBLOCK I VERS) EVALUABLE.CONSTANTP (X Z VALS -) /DREVERSE (Y X Z) \\LEAF.DEVICEP (I NAME DEVICE SEQUIN CONN) \\FONTFILENAME.OLD (FACE) -\\TEDIT.EXPANDED.MENU (CHARMENUTEXTSTREAM) MAPATOMS (A LASTPAGE LIMIT FIRSTPAGE DISP FREE ATOM# -DATUMBASE N MDSPAGE#) \\CORE.SETFILEINFO (VALUE) TEDITWINDOWP (WINDOW) COMP.SETQ (VAR DECL) -\\WALKOVER.FUNCTION (FN) \\NOTENEWICONPOSITION (ICONW) RECORDFIELD? (TEM X) |\\LFScavFileName| (C -A0417) TEDIT.GET.OBJECT1 (GETFN FILEPTRSAVE OBJ) SCALE/TONODES (NODEID |prop| |val|) CLISPIFY2 (POS) -|\\VAMUpdateVAM| (|VAMPage| |VAMWord| |VAMBit| |result|) \\CREATE.SYMBOL (ATM I J) -MAXIMUMMAINWINDOWSIZE (EXT) \\WALKOVER.SPECIALFORMS (LL FORM) \\ALLOCHEIGHTTOGROUPEDWINDOW (ATW -HEIGHTS MAXHEIGHT ATWS HEIGHT XTRA SHARE NOWSIZE MAXSIZE NEWSIZE) SEDIT::LAST-LINE-LINEAR (SEDIT::NODE -) \\CH.UPDATE.CACHE (NAME.AND.ADDRESS DOMAIN ORGANIZATION DOMAINSTRING ORGANIZATION.INFO X DOMAIN.INFO -) \\TEDIT.GET.PARALOOKS1 (TABSPEC TABFLG DEFAULTTAB TABCOUNT TABS TAB#) CLISPIFY2C (X) UNSAVEDEF (DEF -TYPE) MINIMUMMAINWINDOWSIZE (EXT) SEDIT::MENU-PACKAGE-SELECTEDFN (PACKAGE) \\ALLOCWIDTHTOGROUPEDWINDOW - (ATW WIDTHS MAXWIDTH ATWS WIDTH XTRA SHARE NOWSIZE MAXSIZE NEWSIZE) |\\LFPurgeDirectory| (|file|) -TEDIT.HCPYFILE (FILENM TEXTOBJ TXTFILE) MISCN-COLLECT (I) \\TEDIT.MARK.LINES.DIRTY (WW LL) -VAR.NOT.USED (VAR) |\\LFUnpackName| (VOL |charList| |char| A0417 |version|) \\COURIER.ATTENTIONFN (CON - STREAM) OPT.JUMPCOPYTEST (CDFROM) |\\LFFindDirectory| (VOL) DOICONWINDOWCOM (COM) CL:REMOVE (END) -FROM.SCREEN.BITMAP (SCREENREGION SCREEN REGION NEW.BITMAP) DEFAULT.INSPECTW.PROPCOMMANDFN (NEWVALUE) -ATOMHASH#PROBES (BASE OFFST LEN FATP FATCHARSEENP DESIREDATOM# STRING C FIRSTCHAR FIRSTBYTE HASH CHAR# - HASHENT PNBASE B1 B2 REPROBE PROBES) CL:FIND (END) \\3MBRAWTRANSMIT (PACKET) INSPECTW.CREATE ( -XCL:*PROFILE* VALUEMARGIN MAXVALUEWIDTH PROP WINDOW) \\LEAF.ADD.QUOTES (I PIECES N) /DELETECONTROL ( -TTBL) \\CLIPANDDRAWLINE1 (HALFDX X1 X2 Y1 Y2 DX HALFDY DY YMOVEUP SOFTCURSORUP DISPINTERRUPT CX1 CY1 -CA1 CX2 CY2 CA2) \\HCPYMODEDISPLAYINIT (WINDOWFN) CL:SYMBOL-FUNCTION (CL::DEF) SI::NON-LOCAL-RETURN (I -) DECLARERECORD (TEM TRANSLATION DEC RECNAME OLDTRAN OLDFLG Y) ELT (N0 BASE) \\INITATOMPAGE (VALBASE I - OFF) \\SPP.GETNEXTBUFFER (ERRCODE CON) DELETETO1 (CH) FB.PROMPTWPRINT (THING ITEM) CLOSEALL (STREAM) -\\READSTRIKEFONTFILE (CSINFO FIRSTCHAR LASTCHAR RW HEIGHT BITMAP NUMBCODES OFFSETS I J WIDTHS) PUTD ( -DEF) XCL::WALK-ARGLIST (XCL::ARG) TB.UNSELECT.ALL.ITEMS (ITEM I) \\READACFONTFILE (STRM STARTCHAR -ENDCHAR BBOXLIST FBBLIST CHARWIDTHLIST CHARIMAGEWIDTHLIST DUMMYWIDTH LEFTKERNS BOX I IMAGEWIDTHS -WIDTHS Y X CHARBITMAP DUMMYCHAROFFSET OFFSETS STARTWORDLIST BBLIST STARTWORD CHARWIDTH DESTLEFT -RASTERINFO BBOX BBBITMAP BBBMBASE NTHCHAR) |\\LFOpenOldFile| (SIZE LASTPAGE OFFSET) \\TEDIT.SUBST.FN1 -(RESULT) \\FM.3STATE-SETUPOFFBITMAP (ID OFFREGION OFFBITMAP) \\FONTINFOFROMFILENAME.OLD (NAME SIZEBEG -CH# FAMILY SIZEND SIZE) PF (FN OTHERARGS IFILES OUT FILE) ICONPOSITION.FROM.WINDOW (SCREEN) -\\DELETETREE (NODE-COUNT ITEM# BB I NEWLEN) RECLOOK (TEM X) COMP.NOT (TMP) \\FONTRESETCHARWIDTHS ( -|dummycharoffset| |dummycharwidth| |left| |right| |charcode|) \\DRAWPOLYGON.PSC (WIDTH SHAPE COLOR) -\\SFLHASHLOOKUP (PROBE HASHENT) FASL::DO-OP (FASL::VAL) SI::PVAR-VALUE-IN-FRAME (NAME TMP OFFSET) -LOOKUPHASHFILE (HASHFILE Z KEYVAL RETFLG RETVAL) \\FONTFILENAME.NEW (FACE SIZEPATT) -\\DECL.COMNT.PROCESS (L Y COMNTS DECLS) CL:FIND-SYMBOL (NAME PACKAGE) \\STKMIN (LEVADJ I CODE MAX OP -STKE DEPTH PC) MIDDX (Y) \\BSP.CLOSE.OPEN.SOCKETS (S) \\PUTD (CODEBASE DVAL) MAKE-NETWORK-TRACE-WINDOW - (W DS) UNDOLISPX (DWIMCHANGES LINE UNDONEFLG) HISTORYFIND (Z L ALLFLG EVENTADDRESS =FLG _FLG TEM -PREDFLG VAL) LIST (L J) \\SFROTATECSINFOOFFSETS (NEWOFFSETS CHARCODE) \\DISCARDFRAME (NEWCLINK -OLDUSECOUNT) FINDFNDEF (FULL MAP GROUP VALUE) ROTATE-BITMAP (I) \\INSPECT.COMPUTE.TITLE (VALUE) -SEDIT::FIRST-LINE-LINEAR (SEDIT::NODE) \\SPP.SETFILEPTR (SKIPBYTES) /CONTROL (FLG) -SI::VARIABLE-NAME-IN-FRAME (NAME NTBASE NT2BASE) \\TEDIT.GET.CHARLOOKS1 (NAME SIZE SUPER SUB PROPS) -CLISPIFY1 (SUBPARENT PREVEXP NOVALFLG LST TEM TAIL0 TAIL SEG) PFCOPYBYTES (FONTARRAY MAXFONT \#CHARS -CHARCODE SCSET CHAR) SUBRNUMBER (NUMBER) ROTATE-BITMAP-LEFT (I) MAXIMUMWINDOWSIZE (EXT) -\\BASEBYTES.READP (\#LEFT) PROCESSPROP (P OLDVALUE OLDDATA NEWVALUE TAIL) WTFIX1 (TYPE-IN? FIXCLK -FAULTEM1 SIDES HISTENTRY FAULTXX CHARLST NOSPELLFLG0) CLISPFUNCTION? (CHRLST TEM) PRINTCURSOR (CUR -IMAGE MASK) \\GETSPP (EPKT) |\\LFDirectoryP| (|directoryID| |stream|) UNIONREGIONS (REG LFT RGHT BTTM -TP I) RECORDFIELDNAMES (VAL) \\BASEBYTES.BOUT (CO) STRIKECSINFO (WIDTHS IMWIDTHS OFFSETS OLDBM -DUMMYOFFSET BMHEIGHT BMWIDTH I NEWOFFSETS NEWBM NEWOFFSET OLDOFFSET NEWWIDTH) MENUWRESHAPEFN (BORDER -USABLEWIDTH INTREGION USABLEHEIGHT XTRWIDTH NCOLUMNS XTRHEIGHT NROWS) CLDISABLE (OP1 BRACKET TEM FLG) -SETINITIALS (POS USER TRIPLE) \\CANONICAL.HOSTNAME (NAME) SI::UNWIND-TO-BLIP (UNWINDER TARGET PC) -\\SFMAKECOLOR (BACKCOLOR FORECOLOR BITSPERPIXEL CHARACTERBITMAP COLORCSINFO) BSPREADP (SOCKET) -\\TEXTMENU.START (WW MENUW WREG MENUTEXT) \\FILLPOLYGON.PSC (WINDNUMBER TEXTURE TEXTUREBM TEXTUREWIDTH -) INFILECOMS? (TYPE COMS VAL) \\BASEBYTES.SETFILEPTR (I\') \\TEDIT.RESHAPEFN (WHEIGHT LINES LINE -FIRSTCH#) \\TEDIT.FIND.WC (RESULT RESULT1) PRINTHISTORY (NOVALUES LST) COMPERRM (FL) -\\TEDIT.CUMULATE.EVENTS (CHCOUNT PC) TEDIT.SCANSEL (SEL) \\LEAF.SETCREATIONDATE (DATA) -\\LEAF.DELETEFILE (DATA IPUP) CLEARSTK (FX LST I PTR) INSPECTW.REDISPLAY (XCL:*PROFILE* -PROPERTY-PNAMES VALUEMARGIN SELITEMS PROP PROPNAME VALUE) SEDIT::INSERT (SEDIT::WHERE -SEDIT::PENDING-DELETE? SEDIT::NODE) TB.DESELECTRANGE (FIRST# LAST# I) FILL.XPER (OPER TBLE -SOFTCURSORUP DISPINTERRUPT I) \\FINDOP (I) |\\LFCreateFile| (|stream| DIRINDEX) -SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (SEDIT::DELTA) WRITESTRIKEFONTFILE (MAXCODE DUMMYINDEX CHARSET -CSINFO WIDTHS OFFSETS IMWIDTHS DUMMYOFFSET FIRSTCHAR I LASTCHAR DUMMYCHAR STREAM MAXWIDTH RASTERWIDTH -LENGTH CODE OFFSET WIDTH) \\LINEWITHBRUSH (BOTTOM TOP RIGHTPLUS1 LEFT |DestinationBitMap| OPERATION -NBITS BRUSHBM COLOR COLORBRUSHBASE RASTERWIDTH DESTINATIONBASE BBT BRUSHBASE BRUSHRASTERWIDTH -HEIGHTMINUS1 BRUSHWIDTH BRUSHHEIGHT LEFTMINUSBRUSH BOTTOMMINUSBRUSH TOPMINUSBRUSH NBITSRIGHTPLUS1 X1 -HALFBRUSHWIDTH X2 Y1 HALFBRUSHHEIGHT Y2 DX DY YINC CDL DASHCNT DASHON DASHTAIL SOFTCURSORUP -DISPINTERRUPT) \\TEDIT.CLOSEUPLINES (DY NYBOT LOWESTY LINE) \\MBS.OUTCHARFN (STREAM) \\SETUPSTACK1 ( -ARGSLENGTH SP ARGS STKP) TEDIT.OBJECT.CHANGED (PCINFO CHANGEDCH#) MAKENEWCOM (TYPE NAME TEM) -\\TFBRAVO.PARSE.PROFILE.PARA (TOKENS TOKEN) \\CLIPANDDRAWLINE (COLOR SOFTCURSORUP DISPINTERRUPT X1 X2 -MIN MAX Y1 Y2 HALFWIDTH I J) FB.UPDATEBROWSERITEMS (PATTERN INFOWANTED SPEC PROTO W INDEX -FILEGENERATOR CONDITION NOW FILENAME NEWFILEDATA OTHERFILES PREVGROUPDATA LASTFILEDATA WIDENED) -EDITBMSCROLLFN (GRIDSPEC REG WHEIGHT WWIDTH GRIDINTERIOR EBMXOFFSET EBMYOFFSET BM BITMAPWIDTH -BITMAPHEIGHT BITSWIDE BITSHIGH DXOFFSET DYOFFSET EBMXLIMIT EBMYLIMIT GILEFT GIBOTTOM GIHEIGHT GWIDTH -GHEIGHT EXTENT EXTENTWIDTH EXTENTHEIGHT DXGRID DYGRID) \\MAKEBASEBYTESTREAM (LEN ACCESS OSTREAM) -MENUWMINSIZEFN (BORDERSIZE OUTLINESIZE MINWIDTH TITLERELATEDVAR) \\CANONICALIZE.PUP.HOSTNAME ( -OFFICIALNAME) TEDIT.RAW.INCLUDE (INFILE WASOPEN HOLDSTART HOLDLEN START END TEXTLEN PCTB INSERTCH# -INSPC INSPC# PCLST LEN) BSPEOFP (STREAM) |\\LFMakeVolumeDirectory| (|file|) PRINTFNDEF (TEM DSTFIL -SRCFIL) HASHFILEP (HASHFILE) \\RESETSTACK0 (TMP I BASE) FILL.CONT (OPER TBLE I) CHAT.BIN (FIRSTTIME) -ICMLARRAY.GETMENUWGROUP (SWINDOW DIM PWINDOW) OPT.SKIPPUSH (N) \\UPCASEBASE (I) MAXMENUITEMWIDTH (I -LABEL SUBITEMS ANSWER) \\BASEBYTES.BLOCKIO (SBASE CO EO OFFST N BASE) EDIT.BITMAP (BM NEW.OBJECT) -PRINTWORDS (I) RETURN (FRAME) COURIER.EXECUTE.CALL (VALUE TYPE SOURCEFLG BULKDATAFN SINKFLG DATASTREAM -) UNDONLSETQ1 (TEM LST1) \\LEAF.GETFILE (HOST REMOTENAME CONNECTION OUTCOME CACHEDSTREAM NAME/PASS -OPUP DATA IPUP FILELENGTH LEAFHANDLE OLDSTREAM CONNECTNAME/PASS) SET-READTABLE-INTERACTIVELY ( -READTABLES) \\CH.CHECK.CLEARINGHOUSE (DOMAINS DEFAULT) PRINTERDEVICE (POS POS2) WHENCLOSE (FN I) -TOPW.BUTTONEVENTFN (XCL:*PROFILE*) SEDIT::JOIN (TYPE SEDIT::SUBNODES SEDIT::NEW-STRUCTURE SEDIT::SUBNODE - SEDIT::INDEX SEDIT::COMMENT-LEVEL SEDIT::NEW-NODE) FASL:OPCODE-SEQUENCE (FASL::ENTRY) -INTERPRET.REM.CM (FILE COM I) COMP.CALL (N A) \\SETUPUSERSTACK (BASE) TB.SELECTRANGE (ITEM I) -CURRENT.WORD (SNX NEW X) COMP.DECLARE1 (VAR VTAG) BIT.IN.ROW (X) |\\LFUpdateLeaderPage| (|createDate|) - |\\LFGetStreamForFile| (DIRPTR |volNum|) COMP.LAM1 (X) OPT.DELCODE (X LB FLG CD) -IRM.CREF.BUTTONEVENTFN (N) ICMLARRAY.GETREGIONFN (WINDOWREGION) \\CAUSEINTERRUPT (NXT FRAME) -POSTSCRIPT.OUTSTR (\c X) UNDOLISPX2 (TEM VAL Y) BITBLT (DESTINATIONLEFT DESTINATIONBOTTOM SOURCELEFT +OLDPC) TRYNEXT (PL1##) \UFSWritePages (REALPAGE REALOFFSET buffer size PageNumber) PFI.HANDLE.PUTPROPS + (TYPE PAIR) DO.DELETE.LINES (DELHEIGHT) CH.ADD.GROUP.PROPERTY (MEMBERS OBJECTNAME) DSPOPERATION ( +STREAM) \TEDIT.PAPERWIDTH (CANONICAL-PAPERSIZE) \BN.PLUS2 (L U V) FILEPKG.MERGECHANGES (E1 E2 TEMP X +VAL) SNAPW (SCREENREGION SCREEN REGION NEWWINDOW) \UFSTruncateFile (PAGE# OFFSET) \BN.TIMES2 (TAIL L W + I W1 U1 W2 C AP BP V) \10MB.LOADINPUTQ (PACKETS CNT) \SPP.CHECK.INPUT.QUEUE (CURRENT N1 NEXT N2) +DSPRIGHTMARGIN (STREAM) \BN.DIVIDE (BIP M N K SA U i C ST D W A B L1 I L2 B2 B1 A3 A2 A1 QHAT IP R1 R2 + V C1 E X Q) OPT.JUMPTHRU (APD PD ALST INFO REF BR Y PDN N B ANY DR) \VFMSaveBuffer (whichBuffers BUF) + D-ASSEM::TYPE-NAME-FROM-SIZE (D-ASSEM::HUNK-SIZE) \FILEMAP-HASHOVERFLOW (TEM ENTRIES GROUP ONFILELST +NFLUSH TAIL PAIR DATES NUMENTRIES I) SEDIT:REPLACE-SELECTION (SEDIT::NEW-NODES) MB.CREATE.NWAYBUTTON ( +FONT HEIGHT DESCENT WIDTHS IMAGES WIDTH BUTTON SPACING SIDEEFFECTFNS DS IMAGE TWIDTHS I) DSPTOPMARGIN +(STREAM) FB.DELVERCOMMAND (NVERSIONS FILES TBROWSER NDELETED) SIZE/GRAPH/WINDOW (WINDOW TITLE) +\VFMSmartBLT (i) \LFRenameFile (NEW-NAME OLD-NAME) \FM.GETREGIONS (WIDTH HEIGHT) \UFSCloseFile (CDATE) + \BN.2TH (L A B) \INIT.ETHER.BUFFER.POOL (ZONELENGTH ZONE) TRACKW (WINDOW) DSPSCALE (STREAM) +\UFSGetFileInfo (BUFFER NAMESIZE) \BN.QRS (B C1 C2 CP D) GETSYNTAX (CH TEM CHARTBL RESULT LST) +EDITSHADE (SHADEBM QUITREGION SHOWREGION SHADEREGION SEDW BMWIDTH BMHEIGHT BOXSIZE GRIDSPEC X Y +GRIDINTERIOR XPIXEL YPIXEL) IN/ITEM? (ITEM) ENTRY# (X) SI::FINISH-ADVISING (SI::MIDDLE-MAN) PRINTDEF1 +(STARTPOS ENDPOS) MAKEACCESS1 (DAT) \TEDIT.CARETLOOKS.VERIFY (LOOKS) \UFSeol (TYPE) LISPSOURCEFILEP ( +FILE) \INSPECTW.COMMAND.HANDLER (XCL:*PROFILE* COMMANDFN INFO) DSPSPACEFACTOR (STREAM) +\SEQUIN.FLUSH.RETRANSMIT (REPUP) \DOFORMATTING.HARDCOPY (LINELEAD EXTRASP OPREVSP PREVSP %#BLANKS SP +EXISTINGSPACE) EDITSHADEREPAINTFN (GRIDSPEC SHADE BMWIDTH BMHEIGHT) \D01.ASSIGNBUFFERS (EMLEN EMBUF +EXTRALEN NPAGES) MSSETSETTYPE (REP SET) \UFSError (PATHNAME) PRETTYVAR (VAL VAR TEM) \LFTruncateFile ( +PAGE# OFFSET) \CHAIN.UP.RPT (FIRSTUSED RPTBASE LASTEMPTY LASTUSED I) SI::DESCRIBE-INTERNAL ( +SI::DESCRIBERS SI::INSPECT-MACRO SI::SUPER-DESCRIBERS DECL) DSPXPOSITION (STREAM) FB.CLOSE&EXPUNGE (W +MENU ITEM) \GETREADSYNTAX (KEY) \UFS.ADD.HOST.FIELD (NAME) SETCOLORLV.IP (SCRATCHBM OPERATION SCALE X +Y) PRETTYVAR1 (TEM OP E) D-ASSEM::COPY-LAP-CODE (D-ASSEM::INST) DSPYPOSITION (STREAM) \UFSReadPages ( +lastStreamPage ERRNO buffer offset streamPageNumber) MAKEDEFLIST (Z TEM) OPT.XVARSCAN1 (FR) +\DEVICEFILE.EOSERROR (BUF VMEMBUF DATASIZE) \FM.CREATEITEM (LEFT BOTTOM) CL::SIMPLE-STRING= (END1 END2 +) \UFS.FULLNAME (NAME) \UFS.OPENP (S) COMPILER::FRAME-ANNOTATE-LAMBDA (COMPILER::OUTER-REQUESTS +COMPILER::OUTER-REFERENCES) DSPROTATE (STREAM) SEDIT::ATOM-CHAR-ESCAPED (SEDIT::READ-TABLE) EDITGRAPH2 + (VAL) \LFGetFileInfo (stream) SETCOLOR16.IP (SCALE ANGLE NBYTES SCRATCHBM BMBASE) \TEDIT.NSCHAR.RUN ( +PC OFFSET PLEN CH PS PF PFPOS NEXTCH NEWPLEN CHARSET TFILE I) D-ASSEM::FETCH-HUNK (D-ASSEM::ENTRY) +XCL::%%DEFINE-TYPE-SAVE-DEFN (TYPE) COMP.VAR (VAR) \MAKERECODEMAP (M) MKACCESSFN (FN) +\M44ACTONVMEMFILE (ISFMAP WHICHPART CHUNK DISKRELATIVEPAGE BUF I RESULT NPAGES PAGE) DSPPUSHSTATE ( +STREAM) POSSIBILITIES (COMVAR##) \SHOWSEL.HILIGHT (RIGHT LL LEFT) NESTED.SUBMENU (SUBMENU) +COURIER.READ.BULKDATA (LASTSEGMENT?) \ITEM.WINDOW.SELECTION.HANDLER (BUTTON REG NOW OLDPOS PREVIOUS) +\UFS.REMOVE.HOST.FIELD (VERSION DEVICE PACKED-NAME) MENUTITLEFONT (SCREEN TITLEFONT) PRETTYCOM1 (PRTYX +) COMPAREPRINT1 (TAILX TAILY X Y K N SPACE DOTFLAG) \RESHOWBORDER1 (DELTA NUWIDTH NUHEIGHT NUSAV +SOFTCURSORUP DISPINTERRUPT) RENUMBER.LINES (ROW LINE) DSPPOPSTATE (STREAM) ACCEPT-UNIX-SOCKET-STREAM ( +NEWCHAN) \TELERAIDSERVER (RECEIVER VP PTR FILEPAGE BODY) XYSECTLSEG (XT YT UT VT XMIN XMAX UMIN UMAX +PT Y) \REMOVE-DECLS (CL::FORM CL::SPECIALS) COMPILER::META-EVAL-PROGN (COMPILER::TAIL COMPILER::NODE) +\TEDIT.FORMATTABS (TABWIDTH CURTX DEFAULTTAB NEXTTAB TAB NEXTTABTYPE NEXTTABX) DSPDEFAULTSTATE (STREAM +) SEDIT::COLLECT-UNDO-BLOCK (SEDIT::BLOCK-END) \INITBFS (BASE NWORDS DD CB CBSTART) SEDIT::RECOMPUTE-WIDTH + (SEDIT::WIDTH SEDIT::LINE) \PFFetchString (POS) OPT.XVARSCAN (A CD) READVARS (VAR) PRINTARRAY-TO-LIST + (A N TYPE ORIG DOUBLEFLG M RESULT FLG) \NSFILING.ADDQUOTES (NAME CH QUOTED LASTCH NAMECHARS) +SEDIT::COPY-STRUCTURE-STRING (CL:STRUCTURE) READARRAY-FROM-LIST (M DELTA ELEMENTS) DSPSCALE2 (STREAM) +FLENGTH (Y X N) LVLPRIN0 (X CDRLVL) PPSPP (FILE N I STR) PRINTPARA1 (L CC POS OPENCOUNT LEN LIST) +READVISE (FNS) SETSYNTAX (CHAR TBL CLASS) \TRANSLATE-CL%:LAMBDA (BINDING VARTYP VRBLS CNT MIN MAX +SIMPLEP RESTFORM AUXLIST SVAR KEYVARS OPTVARS BODY DECLS) \BN.IGNN (Y U) \TEDIT.GET.INSERT.CHARLOOKS ( +PIECE LOOKS) D-ASSEM::DCODE-FROM-DLAMBDA (D-ASSEM::*BYTES*) SCALEPAGEYUNITS (OTHEREDGE TVAL) +TB.MAP.SELECTED.ITEMS (ITEM# ITEM) \SETREADSYNTAX (CLASS TEM) FINDRECDECL (DECL TYPENAME) DSPTRANSLATE + (STREAM) SYNTAXP (D) COMPILER::GENCODE-CALL (COMPILER::IL-LAMBDA COMPILER::ARG) PRINT3TO10 (FILE) +DSPNEWPAGE (STREAM) SPY.BUFFER.ENTRY (N) SHOWDEF (FL) SEDIT::RELINEARIZE-WHERE-NECESSARY (SEDIT::NODE +SEDIT::SUPER-NODE SEDIT::CHANGED-NODES SEDIT::NODES-TO-RELINEARIZE) \READBMDIMENSIONS (WIDTH HEIGHT) +KILL.LINES (FIRSTLINE) SCALEPAGEXUNITS (OTHEREDGE TVAL) \MAPCHARTABLE (I) PRINTPARA (LMARG RMARG) +SEDIT::BACKSPACE-QUOTE (SEDIT::NODE) \VFMFind (word) D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL ( +D-ASSEM::LEVEL) \VAMRecomputeFreePageCount (firstFree page) SEditicide (W) DWIMIFY0 (FAULTFN VARS EXPR + TEM FN) CLISPNOEVAL (TEM FN) BIGNUM.DEFPRINT (NEWTH TH L ELS B CHARS RADIX) CONTROL (TTBL) CONSTANTOK + (DEPTH) \UFStoOtherRenameMess (PAIR) MSCHECKVARS1 (CALLERS VAL) \BN.TH2D (RADIX AI DIGIT RESULT M) +\TEDIT.PURGE.SPACES (OPREVSP PREVSP) COPYTERMTABLE (TTBL) \NSRANDOM.HANDLE.ERROR (S) FW-CLOSE-CMD (OFD + OPEN-STREAMS STREAM-TO-CLOSE) D-ASSEM::DIGEST-FUNCTION (D-ASSEM::IVAR-COUNT) \BITMAPFROMTEXTURE (Y X) + \TEDIT.WINDOW.SETUP (W TEDITPROMPTWINDOW) \ATWGROUPSIZE (EXTREGION) DRAWBETWEEN (STREAM) +\VFMDeletePageGroup (word) \BN.ISUM1 (C S RES U V) DELETECONTROL (VAL) \MAIKO.ASSIGNBUFFERS (BASE +NPAGES) TYPESOF (TYPE X FOUND NOTFOUND FILE NEWTYPES) DELFROMCOM (TEM VAR NEW X PROP) /MAPCONC (MAPY +CL:MAPL MAPE MAPX) \BN.ISUM0 (BP CARRY RES U V) NESTED.SUBMENU.POS (ITEMNUMBER ITEMTAIL) +COMPILER::FRAME-ANNOTATE-CATCH (COMPILER::OUTER-REFERENCES) \SHAPEW2 (WINDOW SCREEN NUSAV) +EDITDELETENODE (NODE NODELABEL) D-ASSEM::STORE-DIGEST-INFO (D-ASSEM::PAIR D-ASSEM::SLOT) \BN.NZEROS (I +) EDITGRAPH1 (GRAPH WINDOW) PRINTSPP (SEPR SYSTEMP DS LENGTH) FB.DELETE.FILE (SIZE) \STRINGOUT (LEN CH + I) TEDIT.PARSE.PAGEFRAMES1 (FRAMETYPE PAGELIST PAGEFRAME) PFI.HANDLE.DEFDEFINER (OPTIONS DEFINER +ENTRY) INSPECTABLEFIELDNAMES (FIELDNAME) GETCFILE (X STR CFILE) PRINENDLINE (FILE) PORTSTRING (SOCKET +NETHOST) PRINTFILEPROP (X) \DOCOMPRESSVMEM (VP LASTFP EMPTYFP) D-ASSEM::EASY-ENTRY-P (D-ASSEM::OPT-VAR +) \TEXTSTREAM.FILENAME (OFILE) ITEMW.REPAINTFN (SELITEM SELECTABLEITEMREGION) POLYSHADE.SCAN.IP (XTOX +XTOY POINTS ILIST LLIST WINDNUMBER) DRAWCIRCLE (STREAM) \TEDIT.APPLY.PARALOOKS (CH# SCRATCHSEL +NEWLOOKS NEXTB BUTTON QUAD LINELEAD PARALEAD SPECIALX SPECIALY DEFAULTTAB BUTTONDATA L1 LN R) +OPT.SCANOPT (B A X P CD) PRINTARRAY (A N TYPE ORIG DOUBLEFLG M FLG) \LFReadPages (lastStreamPage +buffer offset streamPageNumber backingFilePageNumber) \FM.PUSHGROUP (GROUPID) DELETELINE (PREVLINE +OLDSTART NEWSTART LINE) BITMAPOBJ.SNAPW (BM) SEDIT::PROPAGATE-WIDTH-CHANGE (SEDIT::SUPER-WIDTH +SEDIT::NEW-WIDTH) FB.UPDATE.COUNTERS (LABELS LAB PAIR HERE) SHAPEW1 (WINDOW SCREEN NUSAV NOWOPEN?) +PRINTERROR (MSG X PRL PR ERR NEWPRS POS POS2 POS3) FITP (FILE) \TEDIT.LINE.LIST (WW LINES) LISPXUSE1 ( +L TEM V VFLG A AFLG E EFLG) SUPERPRINT (FILE) PFI.HANDLE.EVAL-WHEN (EXPR) DECODEBUTTONS (BUTTONSTATE) +D-ASSEM::GENERATE-EASY-ENTRY (D-ASSEM::DVAR D-ASSEM::IVAR-COUNT) COMPILER::META-EVALUATE (COMPILER::TREE +) Inspecticide (w) \DOFORMATTING (LINELEAD EXTRASP OPREVSP PREVSP %#BLANKS EXISTINGSPACE SPACEOFLOW) +D-ASSEM::GENERATE-HARD-ENTRY (D-ASSEM::DVAR D-ASSEM::IVAR-COUNT) GETDELETECONTROL (TBL VAL) BUFTAILP ( +START) DRAWARC (STREAM) CHAT.SET.EMULATOR (INSTREAM TRIPLE) \BN.D2TH (S U V BI M AI B) RESETGRID.NEW ( +XSCALE YSCALE ORIGX ORIGY XOFFSET YOFFSET MAXX MAXY TEMPBM GRIDSPEC) ECHOCHAR (B) \LFSetFileInfo ( +stream) \FM.JUSTIFYGROUPS (GROUPID HJUST VJUST MOTHER MOTHEREXTENT EXTENT) READARRAY (M DELTA) +COMP.TRYUSERFN (M) ACCESSDEF4 (TEM TL SUBDECS) MARGINBAR (L1 LN R FLOATINGRIGHT SCALEDR EXTENDEDRIGHT +UNSETL1 SCALEDL1 UNSETLN SCALEDLN) FINDSYSRECDECL (TYPENAME DECL) \FM.REDISPLAYMENU (GROUP BOX REGION +BACKGROUND) \TEDIT.FIXSELS (SELN) OPT.SETUPOPT (B P C) \UFSGetFileType (TYPE) \HDCPYDSPPRINTCHAR (CC +TABWIDTH) \BN.ICANON (B CARRY U1 U) \POSITION.MENU.IMAGE (POSITION SCREEN MX MY IMAGE) SUBDECLARATIONS + (Y) READ-UNICODE-MAPPING-FILENAMES (F CSI N) GETXIP (EPKT TIMER) \IDLE.IS.PREVIOUS (OLDPWD +PREVIOUS.USERNAME NAME) SEDIT::SHIFT-STRING (STRING SEDIT::FROM SEDIT::TO) \10MB.INPUT.INTERRUPT ( +STATUS IOCB ACCEPTPACKET PACKET) IOCBQLENGTH (FIRSTIOCB) PRETTYPRINT2 (X TEM FROM TO) +\HANDLE.RAW.PACKET (FILTER) DREVERSE (Y L Z) ECHOCONTROL (C) \TEXTMENU.DOC.CREATE (MENUTEXT DESC CH# +OBJ CH#1) \DL.NEWFAULTINIT (VP I FPBASE FIRSTBUFFERRP FIRSTUSEFULRP IOCBRP IFPAGERP NEXTBANK0 +NDISPLAYPAGES FIRSTRP RPSIZE RPTPAGES FIRSTVP RPTBASE) POLYSHADE.BLT (ILIST LLIST WINDNUMBER) +DRAWCURVE (VALIDBRUSH STREAM) SEDIT::BUILD-PRELINEARIZED-NODE (SEDIT::SUBNODES SEDIT::TAIL) ECHOMODE ( +TTBL) \LFWritePages (buffer backingFilePageNumber) \FM.JUSTIFYITEMS (GROUPID ITEM THISGROUP EXTENT +MOTHER EXTENTLEFT EXTENTBOTTOM ITEMREGION ITEMMAXREGION ITEMWIDTH ITEMHEIGHT) SEDIT::CONS-ATOM ( +SEDIT::RESULT) COMP.PROGLST (VAL LST N) FW-CHANGE-POSITION (OFD R BOX NEWPOS) \UFSSetFileType (TYPE +PAIR) GETFILEPKGTYPE (X NAME) TEDIT.GET (OFILE WINDOW PCTB LINES FIRSTLINE LINE TITLE MENUSTREAM +FILENAME) FIXAPPLY1 (N LST XTAIL) ADDTOCOM (TEM PROP) /MAPCON (MAPY CL:MAPL MAPE MAPX) \BN.MADD (TT H +IP IPP C TTT) \TEDIT.HARDCOPY.MODIFYLOOKS (YOFFSET) COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::REQUESTS + COMPILER::OUTER-REFERENCES) RELMOVEW (WINDOW) MSCHECKBLOCKBASIC (FN Y) ALISTP (ELT) RAISE (TTBL) +DELFROMCOM1 (TEM VAL) DRAWELLIPSE (STREAM) MB.THREESTATEBUTTON.FN (NEWSTATE) \TEDIT.PARABOUNDS (PC +PIECE OPC OLDSTART START-OF-PIECE END BEGIN) \BN.TH2B (AI U B) \IDLE.ISMEMBER (X) \LFOpenFile (DATE +OTHERINFO IDATE FILE STREAM) \FM.LAYOUTGRID (PROPS FONT BOTTOM ROWSPACE COLUMNSPACE ID OLDCORNER +BOXOFFSET GRIDLEN TAIL ITEMNUM LEFT X GROUPREGION NEXTLEFT) PFI.HANDLE.DECLARE (TAIL STARTOFLINE NEXT +EXPR) PROMPTFOREVALED (WIN NEWVALUE) ACCESSDEF (FIELD RECS TEM CHRLST V1 DOTTAIL FIELDLST R) SENDXIP ( +XIP NDB) TEXTMENU.CLOSEFN (TEXTOBJ) \TEDIT.BASICFIND (CH1 ANCHOR CH OANCHOR FOUND PCH#) HASHLINKS (DEC + DEC1) DRAWPOLYGON (STREAM) TIMEALL (X NAME NUMBEROFTIMES) \EVAL-INVOKE-LAMBDA (N) \UFS.NEXTFILEFN ( +FILENAME NAMELEN NAME NEWNAME FILEID SUBGEN) MSCHECKBOUNDFREE (LF1 X) \SETTYPEMASK (PAGE) COMP.EQ (A C +) \ORIGTERMTABLE (C) CHOOZ (XWORD NDBLS TEM ALTFLG TWORD SPLST TWORD1 TWORD2 NCTWORD NCXWORD SC VAL +REL) DRAWPOINT (STREAM) \IDLE.AUTHENTICATE (GV UNIX NS CODE) PFI.HANDLE.RPAQQ (PAIR VARS VALUES FV) +\INTERPRET-ARGUMENTS (\VAR \ARGLIST \VAL \INDEX I \ARGTYPE \BODY) D-ASSEM::COMPUTE-JUMP-SIZE (D-ASSEM::PAIR +) \VAMFreePageGroup (volumePageNumber) SMASH.THE.DAMNED.CONST.IN.ATTACHWINDOW (MAINWINDOW) +\FIXLOCALNET (NET) INTERPRET/MARK/FORMAT (PL) ADDNEWCOM (NEWCOM TAIL OLDCOM) /LISTPUT1 (X) +MSCHECKFNINBLOCK (MACRODEF ISCALLEDP INDIRECTCALLERS OTHERBLOCK) \NSRANDOM.FETCH.CACHE (TAIL PREV PAIR +) D-ASSEM::CONVERT-TO-BINARY (BYTE D-ASSEM::CODE-INDEX) FILLPOLYGON (WINDNUMBER STREAM) FINDFN (POS +NAME TOKEN TEM) FW-CHANGE-JUSTIFICATION (NEWJUST?) \PEEKREFILL (C) CLISP% (CLISPTEM) TEXTSTREAM.TITLE + (TXTFILE) \LOOKUPPORT (IPUP LEN RESULT PTR) WHATIS (TEM UCASE) BRKDWNINIT (I) \CHECKEOLC.CRLF (CH) +OPT.POSTOPT (C CODE VAL ANY PASS) /DSUBST (B EXPR) \POLYSHADE.YSCAN.IP (fulllist currlist currcrit +scany scan fullcrit count ix tx ex clist ty crity) \PARSE.PORTCONSTANT (STR CH VAL NET HOST) +POSTSCRIPT.PUTBITMAPBYTES (POS BYTE B BYTEOFFSET R ROWOFFSET REPC BB BO PO PRVO) PARSERELATION1 (TAIL) + TEDIT.MINIMAL.WINDOW.SETUP (DS OLDWINDOWS PROP LINES LINE WINDOW) /NCONC (TEM N X VAL) DRAWTO (STREAM +) ALLFIELDS (Y) RATOM (RDTBL) PROPLISTP (LSTPTR) FORWARD.DELETE.TO (L) \DL.ASSIGNBUFFERS (BASE NPAGES) + LATTICE/BREAK/CYCLES (DTAIL GN D) FILLCIRCLE (STREAM) \BLTSHADE.GENERICPRINTER (FINALREGION BMWIDTH +BMHEIGHT SCRATCHBM) \SUBREAD (EOF-POSSIBILITY J EXTRASEGMENTS INVALIDFLG ESCAPEFLG PACKAGE NCOLONS SNX + CH DOTLOC ESCFLG LASTC AT-EOF ELT END LST PNSTR) RESETREADTABLE (RDTBL FROM) +\DL.MARK.PAGES.UNAVAILABLE (I RPTBASE) VKBD.FIX.FONT (NEWFONT) CONVERT.FILE.TO.TYPE.FOR.PRINTER ( +FILETYPE CANPRINT CONVERTER) DIRECTORY.PARSE (FG TEMP) \CLEARWORDS (BASE NWORDS) TREEGRAPHNODE ( +THISNODE NEWDEPTH NODEID LONODES HINODES BFNODE BFNODEID RANKNODE RANKNODEID) /LISTPUT (X X0) +UPPERCASEARRAY (I) \DL.UNMAPPAGES (FP FPBASE) \TEDIT.APPLY.STYLES (STYLE NOSTYLE CHARSTYLES CHARSTYLE +IN-PARA) \10MBWATCHER (MESSAGE-LENGTH PACKET CNTR) \TEDIT.FIND.FIRST.LINE (CHNO CH CH# LINE LINES) +DETACHWINDOW (OLDFN) COMP.UBFLOAT2 (A N) HARDCOPYGRAPH (BOTTOM-CENTERING-OFFSET TRAN X-PAGE-NUMBER +Y-PAGE-NUMBER) ESCAPE (RDTBL) D-ASSEM::RESOLVE-JUMPS (D-ASSEM::JUMP-OR-TAG) SEDIT::CLOSE-NODE-LITATOM +(SEDIT::NEW-STRING) READC (FILE) \LFGenerateFiles (PARSED DIRECTORYSTREAM SEARCHSTATE C A0493 +GENFILTER STR HOST&DIRNAME NEXTFILE FILELIST) \DO.PROGV (NVARS NNILS NTSIZE) DIRECTORY.NEXTFILE (TEM) +COMP.BIND.VARS (VAR X VAL VALS DECLS VLV VLN NNILS NVALS) \CREATEW1 (WINDOW) FIND.MATCHING.QUOTE (BUF) + \PS.BOUTFIXP (N i) RELDRAWTO (ORIGX ORIGY) READCCODE (STREAM) \ARBOUT (FPTR) SEDIT::PARSE ( +SEDIT::THIS-NODE) EDITBMRESHAPEFN (MINCOMMANDAREAWIDTH BITMAPWIDTH BITMAPHEIGHT BMWINTERIORWIDTH +BMWINTERIORHEIGHT GRIDSQUARE EDITAREABITWIDTH EDITAREABITHEIGHT BMDISPLAYBOTTOM BMDISPLAYWIDTH +GRIDINTERIOR BMDISPLAYHEIGHT EXTENTHEIGHT EXTENTWIDTH TEMPBM) MOVETOP (Z Y) GRAPHOBJ.PUTALIGN (N I) +SHOWSTACKBLOCKS (SCANPTR IVAR) READMACROS (RDTBL) SUBFIELDCREATE (HL DEC TEM SUBDECL SUBTRAN VAL) +\SEQUIN.HANDLE.INPUT (ALLOC NEWACKSEQ) PURGEHISTORY (TYPE) \FM.LAYOUTCOLUMN (PROPS FONT LEFT BOTTOM +ROWSPACE COLUMNSPACE ID OLDCORNER BOXOFFSET X) FIND-EDIT-LOCATION (EXPRS FOUND) \TEXTOPENF (PCTB) +GENERATOR (COMVAR##) POSTSCRIPT.SHOWACCUM (KERN) SKIPSEPRCODES (C PREVC) COMPARE1 (X Y) /PUTASSOC (X) +MSCHECKBLOCKS (FILES BLOCKS TEM FNS NOBLOCKFNS FN BLOCK) SKIPSEPRS (C) \NSFILING.REMOVEQUOTES (CH I) +\SIMPLIFY.CL.ARGLIST (X) \FM.LAYOUTROW (PROPS FONT LEFT BOTTOM ROWSPACE COLUMNSPACE ID OLDCORNER +BOXOFFSET X) FILLRECTANGLE.IP (RIGHT LEFT TOP BOTTOM WIDTH HEIGHT) XCL::WALK-DECLARATIONS (XCL::NEW-FORM + XCL::MACROP) COMP.FLOATUNBOX (NUM) \VAMAllocPageGroup (RUNLENGTH) LAYOUTGRAPH (R FONT MOTHERD +PERSONALD FAMILYD G) INSPECT/TOP/LEVEL/LIST (X I) \UFS.ABORT.DIRECTORY (GEN GFS) +TERM.MODIFY.ATTRIBUTES (A) \UFSMakeUnixFormatName (I) SKREAD (STRM CH) \10MB.OUTPUT.INTERRUPT (IOCB +STATUS) \LFEventFn (vol) INFILEPAIRS (X Y) INFILECOMSMACRO (AT) CL:MAKE-CONCATENATED-STREAM (STREAM?) +I.S.OPR (LC NEWFLG NEWPROP OLDPROP) MSCHECKBLOCK (BLKNAME LOCALVARS SPECVARS TEM TEM2 BLKFNS +BLKLIBRARY BOUNDFREE FREEVARS VAR FN DEC X ERRORS) MB.CREATE.THREESTATEBUTTON (X Y BITMAP DS) +\LFDirectoryNameP (PARSED DIR SUBDIREND) SEDIT::NEXT-NODE (SEDIT::INDEX SEDIT::NODE) MAKEHASHLINKS ( +TEM2 RECORD.TRAN TEM DEF) LISPXREAD (X) SHOULD-BE-DWIMIFIED? (FORM) \NSRANDOM.READ.SEGMENT (SESSION +BUF PAGE BYTES-TIL-EOF BYTESTOFETCH TOTALBYTES PAGENO PAIR) RESETUNDO (UNDOSIDE UNDOSIDE0) +TEDITMENU.STREAM (MENUW W) MIN/LEFT (NODE) /LCONC (XX) FB.SUBITEMP (I) \TEDIT.HARDCOPY.DISPLAYLINE ( +OLOOKS FIRST-SCALED-CHAR CURRENTY OFONT KERN LOOKSTARTX LINELEN CH DX LOOKNO TTX TX I) CREATEW1 ( +REGION SCREEN REG WINDOW) SETCOLOR.IP (SHADE OPERATION) MIN/BOTTOM (NODE) LISPX (LISPXXMACROS +LISPXXUSERFN LISPXLINE LISPXX LISPXTEM LISPXOP LISPXLISTFLG LISPY DONTSAVEFLG LISPXHIST HELPFLAG +LISPXVALUE LISPXVALUES LISPZ) FOREST/BREAK/CYCLES (DTAIL DN) DUMPGRAPH (N IDS %#IDS TEMP SHADES +%#SHADES FONTS %#FONTS BORDERS %#BORDERS X POS) CL:PARSE-INTEGER (RADIX INDEX STOP MAXDIGITCODE +MAXALPHACODE ERR CHAR STARTINT SIGN ENDINT) PFI.ESTIMATE.SIZE1 (INITSUM TAIL) COMPILER::META-EVAL-CALL + (COMPILER::NODE COMPILER::ARGS COMPILER::ARG COMPILER::LIST-OF-VALUES COMPILER::TRANSFORM) \MKINTEGER + (LOOPVAL I CH START VAL RADIX3 RADIX2) PRIN2-LONG-STRING (FONT ESCWIDTH SPACEWIDTH CLOSEWIDTH +SEMIWIDTH SEMISTRING SEMICLOSE C LASTSPACE POS I HERE MAPX1 MAPY1 SINGLELEFT ESCAPESEPRS J NEXTC) +\FM.FORMATEXPLICIT (X) \FM.FORMATBYGRID (GROUPS ROWBOTTOM GROUPLIST ROWIDS GRID ROWID ROWDESC +ROWREGION ROWITEMS ROWDAUGHTERS ITEMDESC GRIDPOS ALIGNREGION BOX) COMP.TOPLEVEL.COMPILE (COMTYPE ARGS +DEF PIFN FRAME TOPFRAME ARGVARS ALLVARS TOPLAB CI X ALAMS1) GRAPHCHANGELABEL (CHANGEFN) +COMP.LOOKFORDECLARE (EXPS Y DECLS) \DRAWPOLYGON.GENERIC (PTAIL) CMLRDTBL (I) \TEXTBACKFILEPTR (PC PS +PF REALFILE) FINDATOM (XTAIL NAME REALPOS TEM) CLOSE.WINDOWS.IN.REGION (R) RIGHTW.REPAINTFN ( +WINDOWREGION ROWPROP MARK STARTROWPROPS STARTVERTMARKS LASTROWPROP XCL:*PROFILE* VERTMARK) +DECLARED-SPECIAL (DEC) \AUTHENTICATION.FIND.SERVER (ADDR INFO) \NSRANDOM.PREPARE.CACHE (CACHE I +FREETAIL PREV NAVAIL MORETAIL PREVFREE NCREATED NNEEDED) \TEDIT.CREATE.LINECACHE (I) FILEPKGCOM (FIELD + TEM COM TEM2 I) CHDIR (HOST PATH) /ECHOMODE (FLG) GETFIELDFORCREATE (USINGEXPR VALUE TEM DEFFLG) +CL:APPLY (CL::AV CL::I) \COURIER.EXPEDITED.ARGS (VALUE TYPE) CH.LIST.PROPERTIES (OBJECTNAMEPATTERN) +\FLUSHPAGE (VP FP NEWFP) LISPXTYPEAHEAD (X L) \RSTRING2 (CH SNX SKIPPING LASTC J ANSTAIL ANSLIST +FATSEEN) \TRANSFERPAGE (NEWFLAGS) \POLYSHADE.XSCAN.IP (fulllist currlist currcrit scany scan fullcrit +count ix tx ex clist ty crity) LOWERCASE (FN TEM) \PUTBASEFIXP (LO HI VAL) \UFSGetPrintFileType (TYPE) + READOCT (STR CHAR N) READ-EXTENDED-TOKEN (RDTBL CH SNX ESCAPE-APPEARED ESCAPING J ANSTAIL ANSLIST +FATSEEN) \SETMACROSYNTAX (LST CONTEXT WAKEUP ESCAPE A) MOUSESTATE-EXPR (NAMEMASK MOUSEONLYFLG) +FW-CHANGE-ANCHOR (NEWANCHOR) \VFMInsertPageGroup (word) \SMASHSTRING (NC POS C DESTCH# SRCH#) +IFCDECLARE (TAIL) BRKDWNCLEAR (I) CONCATLIST (STR X FATP I) ADVISEWDS (R D WBORDERSIZE TWICEBORDER +CLIPREG PROC) COMP.PROGN (A) \ATBLSET (TRDTBL NEW-IL-RDTBL I) \NSRANDOM.CHECK.CACHE (X EMPTY) DEFPRINT + (TYPE) MSINIT (X) AS.DELETE.PASSWORDS (NAME) Filebrowsericide (W) IMAPLIST (CURR1 CURR2 NEXT1 NEXT2 +Y1 V1 ADVANCE U1 X0 Y0 X1 DX DY U0 V0 DU DV PT IMAP PATH2 PATH1) PRINTLEAF (DATA OP START MACRO HI LO +NBYTES) ETHERPORT (VAL) IFCEXPRTYPE (SUBCOM) /DREVERSE (Y X Z) FB.COMMANDSELECTEDFN (ITEM I EXTRA FN) +READ/NODE (NEAR OLDPOS NOW) \CLIPANDDRAWLINE1 (HALFDX X1 X2 Y1 Y2 DX HALFDY DY YMOVEUP SOFTCURSORUP +DISPINTERRUPT CX1 CY1 CA1 CX2 CY2 CA2) TWODINSPECT.ARRANGEWINDOWS (TITLEHEIGHT ROWPROPWIDTH TWHEIGHT +RWWIDTH DWHEIGHT TOTALHEIGHT DWWIDTH TOTALWIDTH TOTALRIGHT TOTALTOP DWLEFT DWBOTTOM) \TEXTPEEKBIN (PC +PS PO PF) \TEDIT.PUT.SINGLE.CHARLOOKS (LEN) TEDIT.WINDOW.SETUP (PROP) RETFROM (P) MBUTTON.SET.FIELD ( +PCTB PCNO FIELD.SEL NEW-STRING) INSPECT/AS/FUNCTION (FRAME CODEBASE) INTERSECTREGIONS (REG LFT RGHT +BTTM TP I) SI::CLEAN-UP-CL-ARGLIST (SI::PARAM SI::STATE) BRKDWNBOXES (BDZ BDY BDN) +\NSFILING.LOOKUP.CACHE (ENTRY NAME X) \SELECTREALPAGE (PREVRPT RPTINDEX RPTBASE FLAGS FP CNTR DISTANCE + PREVINDEX TRIES) GRAPHREGION (LEFTOFFSET BOTTOMOFFSET) NLAMBDAFNP (FN) \UPDATECHAIN (HEAD1 RPTR VP +FLAGS CHAIN1 CHAIN0 RPTINDEX) FILL.LINE (Y XL XR) SEDIT::ATOM-POINT-TYPE (SEDIT::I SEDIT::C SEDIT::ESCAPED + SEDIT::RESULT) \MAIKO.DISPLAYLINE (LHEIGHT SCALE CACHE DISPLAYDATA DDPILOTBBT XOFFSET CLIPLEFT +CLIPRIGHT OFONT OLOOKS DDWIDTHCACHE DDOFFSETCACHE LOOKSTARTX CH DX LOOKNO TTX CURY TX I) +\LFParseFileName (TAIL DIRECTORY NAME EXT VERSION ENDVOLNAME STR) \FM.FORMATBYCOLUMN (GROUPS +COLUMNLEFT GROUPLIST COLHEIGHT) SCALED.BITMAP.GETFN (BITMAP FACTOR) EDITCHANGELABEL (MSGW NODE +NEWLABEL) DOUSERFNS (USERFN) EDITCHANGEFONT (NODE) \NSFILING.ADD.TO.CACHE (ID OLDHANDLE H CACHE) +ONEDINSPECT.ARRANGEWINDOWS (TITLEHEIGHT ROWPROPWIDTH RWWIDTH DWHEIGHT TOTALHEIGHT DWWIDTH TOTALWIDTH +TOTALRIGHT TOTALTOP DWLEFT DWBOTTOM) \DRAWELLIPSE.GENERIC (MAJORXOFFSET MAJORYOFFSET MINORXOFFSET +MINORYOFFSET) REALSTKNTH (FX K) COMPILER::FIND-TAG-DUPLICATION (COMPILER::TAIL COMPILER::INST) +LISPXFIND1 (X) CANONICAL.HOSTNAME (HOSTNAME) SI::PARSE-CL-ARGLIST (SI::STATE) INITIALIZEMASTER.IP (I) +UNSAVEDEF (DEF TYPE) HISTORYSAVE (X TEM Y INDEX N L) BESTPUPADDRESS (PORT MSG NET BESTHOPS NOTLOOKEDUP + BESTPORT ROUTE HOPS TRY) IFCPROPSCAN (AT PROP) /DELETECONTROL (TTBL) ADDTO (PTR) BACKSKREAD (X B +INNERMOSTLIST BRACKETFLG ESCAPED) DECLARERECORD (TEM TRANSLATION DEC RECNAME OLDTRAN OLDFLG Y) +SEDIT::ASSIGN-FORMAT-LITATOM (CL:ATOM) CHAT.TTYENTRYFN (STATE) CH.RETRIEVE.MEMBERS (OBJECTPATTERN) +MIDDX (Y) SHOWWFRAME (WINHGHT WINWDTH BLACKPART WHITEPART) GRAPHOBJ.GETALIGN (ALIGN) SEDIT::INSERT-CHANGED + (SEDIT::NEXT LIST) MAKECREATELST1 (TEMPLATE) PURGEHISTORY2 (TEM) \NSFILING.MAYBE.CREATE (CREATE? +OLDHANDLE TAIL NEW.DIR) COMP.ASET (DECL) OPENNSOCKET (NSOC SOC SKT# CLASHP) FONTCREATE (FONTX ROTATION + DEV FONTFACE FAMILY) \TEDIT.CHARDELETE (TEXTOBJ TLEN INSCH# INSPC TLOOKS START-OF-PIECE) +\TEDIT.PIECE-CHNO (CHARCOUNT OFST PC PCNODE) COMP.AREF (DECL) MAX/RIGHT (NODE) \SEND.EXPEDITED.XIP ( +IXIP) OPT.DREV (Y L Z) \INTERNAL/GETPASSWORD (HOST OSTYPE NAME/PASS DIRECTORY) \INTERNAL/SETPASSWORD ( +RESULT INFO NEWNAME/PASS NAME/PASS OSTYPE PASSWORDADDR NSINFO DISKNAME INFOCHANGED DEFAULTNAME PWD +NEWNAME) UNDOLISPX2 (TEM VAL Y) INSPECTW.REPAINTFN (XCL:*PROFILE* LINEBASE SELITEMS +SELECTABLEITEMREGION PROPPRINTFN) READGRAPH (TEMP NUM IDS I BORDERS FONTS SHADES) LLSH (XHI XLO X N) +\POLYSHADE.DISPLAY (table fulllist currlist currcrit scany scan fullcrit count ex clist ty crity D X0 +DX DDX DDY XL XR) \SUBREADCONCAT (PBASE) \TEDITMENU.SELSCREENER (MAINTEXT) INIT.CURSOR (INITY) +\PFVersionOK (vol) EDITBMSCROLLFN (GRIDSPEC REG WHEIGHT WWIDTH GRIDINTERIOR EBMXOFFSET EBMYOFFSET BM +BITMAPWIDTH BITMAPHEIGHT BITSWIDE BITSHIGH DXOFFSET DYOFFSET EBMXLIMIT EBMYLIMIT GILEFT GIBOTTOM +GIHEIGHT GWIDTH GHEIGHT EXTENT EXTENTWIDTH EXTENTHEIGHT DXGRID DYGRID) SHOWWTITLE (TITLEDS FONT +BLACKPART TITLESHADE BOTTOM HEIGHT BMWIDTH LEFTMARGIN X) TTBIN (CHAR) ESPATTERN (X) +MINIMUMMAINWINDOWSIZE (EXT) \LET*-RECURSION ($$LET*-TAIL VAR VALUE) \ALLOCWIDTHTOGROUPEDWINDOW (ATW +WIDTHS MAXWIDTH ATWS WIDTH XTRA SHARE NOWSIZE MAXSIZE NEWSIZE) TEDIT.REDO.REPLACE (OLDEVENT) +COMP.BLOCK (F) LISPXFIND (LST INDEX VAL LINE0 TEM) OPT.RESOLVEJUMPS (Z CU NEW JL) TTYIN (\TTYINSTATE +SPLST OP \NOFIXSPELL \DONTCOMPLETE \NOVALUE \STRINGVALUE \COMMAND \REPEAT \RAISEINPUT \AUTOFILL \FIX +\READING TYPEAHEAD \LISPXREADING \FILLINGBUFFER \FIRSTTIME \PROMPTFORWORD \PFW.FIRSTTIME \RDTBLSA +RDTBL \PROMPT1 \PROMPT2 PROMPT VALUE) INFILECOMSPROP (X) /CONTROL (FLG) \TEDIT.HARDCOPY.FORMATLINE ( +ORIGCHLIST CHLIST ORIGWLIST WLIST LOOKS TEXTSTREAM TERMSA CLOOKS LOOKNO PC INVISIBLERUNS TLEN CHNO +ASCENTB DESCENTB FONT FMTSPEC 1STLN TX WIDTH TXB1 CH DX BOX ASCENT DESCENT GATHERBLANK CH#B NEWASCENT +PREVSP PREVHYPH PREVDHYPH T1SPACE TXB DXB LOOK#B INVISIBLERUNSB %#BLANKS FORCEEND CTRL\L\SEEN +TABPENDING TEXTLEN) MAX/TOP (NODE) MAKEINITBFS (PREV I) \ENCRYPT.PWD (I) TTSKREAD (END X BUF) +\FM.FORMAT (PROPS FORMAT FONT LEFT BOTTOM ROWSPACE COLUMNSPACE ID OLDCORNER BOXOFFSET GROUPS EXTENT) +\TEDIT.PUT.CHARLOOKS.LIST (LOOKS I) COMPILER::FIND-SEGMENT (COMPILER::SEGMENT) \TEDIT.TABTYPE.SET ( +STATE DOTTEDBUTTON) TTYIN.READ (BUTLASTC LASTC TERM) SEDIT::CREATE-SIMPLE-NODE (SEDIT::NEW-NODE) +\LOGIN.READ (PROMPT HELPFN NAME) GETCHATWINDOW (WINDOW STATE DSP) SEDIT::COPY-SELECTION-DEFAULT (SEDIT::X + SEDIT::BLANK-BEFORE SEDIT::I) \FM.FORMATBYROW (GROUPS ROWBOTTOM) \TEDIT.PUT.PARALOOKS.LIST (LOOKS I) +\ADJUST.USERNAME (NAME POS) PRINTADDRS (I NB) HISTORYFIND (Z L ALLFLG EVENTADDRESS =FLG _FLG TEM +PREDFLG VAL) COMP.ATTEMPT.COMPILE (FLG) TEDIT.REMOVE.MENUITEM (X ITEM ITEMLIST) \BUILD.EXPEDITED.XIP ( +STREAM) FW-REPAINTFN (OFD) PRINTFILETYPE (FILE TYPE) TTYIN.FINISH (TAIL X ORIGBUFFER RESULT WORD +RESPONSE TL) \PUPINIT (FN NEWFN) PRINTHISTORY1 (TEM Y INPUT) CH.NUMBER.TO.PROPERTY (M) UNDOLISPX ( +DWIMCHANGES LINE UNDONEFLG) \ITEM.WINDOW.COPY.HANDLER (NEWITEM SMASHPOS CURRENTITEM) DCODERD ( +FRAMENAME NAMETABLE LOCALARGS NTSIZE NTWORDS STARTPC STARTLOCALS LOCALSIZE REALSIZE CA X FVAROFFSET +NT1 NT) TTYINREAD (X) \SEQUIN.CONTROL (PUP) \MEDW.BLTCHAR (CHAR8CODE CURX RIGHT LOCAL1 LEFT +SOFTCURSORUP DISPINTERRUPT) TERM.TAB (NEXT.STOP CX) \TEXTGETFILEPTR (PLEN) \TEDIT-OPEN-FONT-FILE ( +EXISTING-FONTFILE-IF-ANY) \DSPXPOSITION.PSC (OLDX) XCL::WALK-ARGLIST (XCL::ARG) TTYIN1 (CHAR X RESULT +TMP WASEDITCHAR SNX STARTOFWORD MATCHED TAIL) WTFIX1 (TYPE-IN? FIXCLK FAULTEM1 SIDES HISTENTRY FAULTXX + CHARLST NOSPELLFLG0) DCODESKIP (START CODELEN) MSPRGLAMBDA (ARG ARGS KEYS? KEYLIST EVALCOUNT EC +OLDTEMP TEM CLISP) SETINITIALS (POS USER TRIPLE) IFCPROPS (ATNAME) MAXMENUITEMWIDTH (I LABEL SUBITEMS +ANSWER) PRIN4 (RDTBL) \LETtran (BODY DECLS VAR VAL) \TEDIT.LINECACHE (CW CH) +\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (PC OBJ COPYFN NEWOBJ) \LINEWITHBRUSH (BOTTOM TOP RIGHTPLUS1 LEFT +DestinationBitMap OPERATION NBITS BRUSHBM COLOR COLORBRUSHBASE RASTERWIDTH DESTINATIONBASE BBT +BRUSHBASE BRUSHRASTERWIDTH HEIGHTMINUS1 BRUSHWIDTH BRUSHHEIGHT LEFTMINUSBRUSH BOTTOMMINUSBRUSH +TOPMINUSBRUSH NBITSRIGHTPLUS1 X1 HALFBRUSHWIDTH X2 Y1 HALFBRUSHHEIGHT Y2 DX DY YINC CDL DASHCNT DASHON + DASHTAIL SOFTCURSORUP DISPINTERRUPT) \TFBRAVO.READ.PARALOOKS (CHAR VALUE LMFLAG FLLMFLAG TEM TABINDEX + PROPERTY) \TEDIT.FIND.OVERLAPPING.LINE (LINES) TB.REMOVE.ITEM (TAIL N) MAXIMUMMAINWINDOWSIZE (EXT) +\TEDIT.SET-TOTLEN (I ITEM#) \ALLOCHEIGHTTOGROUPEDWINDOW (ATW HEIGHTS MAXHEIGHT ATWS HEIGHT XTRA SHARE +NOWSIZE MAXSIZE NEWSIZE) TTWAITFORINPUT (X Y ABSY W FN NEWMARG REG) \PFFindRootDirEntryNum (entryNum) +GETPUPWORD (PUP) FONTCLASS (FL FC F D) \NSFILING.CONNECT (NEW.HANDLE NSPATHNAME) BRKDWNCONSES (BDZ BDY + BDN) PROMPTFORWORD (CHAR ECHO.CHANNEL TTYD DONTECHOTYPEIN.FLG TERMINCHARS.LST C CONVERTIBLEP +KEYBD.CHANNEL TIMER X0Y0 BEGUNTYPING? RUBBING? CHARBUFFER SPACEP ?HELPMSGLIST ?HELPMSGTRIEDP) +TEDIT.FORMATTEDFILEP (OLDPARALOOKS TENTATIVE PC OLDLOOKS FONTFILE PREVPC) \TEXTEOFP (PC) BKBUFS (L S) +RAIDSTACKCMD (FRAME) PROVIDE.PROMPTING.WINDOW (REGION PROC STR) FILL.INITTBLE (FCBBT TOPP BOTTOM LEFT +RIGHT OPERATION DestinationBitMap NBITS TEXTUREBM TEXTURE GRAYBASE pattern DESTINATIONBASE RASTERWIDTH + GRAYWIDTH GRAYHEIGHT CX CY FILLTBLE) BROWSE/LAYOUT/LATTICE (N Y) CLBUFS (LBUF SBUF) TEXTTOIMAGEFILE ( +INPUT-STREAM INPUT-FILENAME IMAGESTREAM) INREADMACROP (TEM \READDEPTH) GRAPHER/CENTERPRINTINAREA ( +STREAM XPOS) AS.CREATE.PASSWORDS (NAME) BRV/OFFSET (ABSX P) MAPDL (MAPDLPOS) \CCLOSURE.DEFPRINT (NAME) + \TFBRAVO.READ.CHARLOOKS (CHAR VALUE VALFLAG PROPERTY TEM) CH.DELETE.MEMBER.FROM.PROPERTY.ACL ( +OLDMEMBER OBJECT) HELPSYS (MACRO.TYPE) POSTSCRIPT.BITMAPSCALE (HEIGHT WIDTH MINDIM OTHERDIM SF1 SF2) +\GET-COMPILED-DEFINITION (X) RINGBELLS (N) UNADVISE (FNS) \SPP.SKIPBYTES (CONDITION BYTESLEFT NBYTES) +\DSPYPOSITION.PSC (OLDY) \TEDIT.FIXCHANGEDLINE (CHARLIM OCHLIM OLHEIGHT NEWLINE YBOT LINES OFLOWFN) +PFI.DEFAULT.HANDLER (TEMPLATE ENTRY PAT TESTFN ITEMNAME MAINITEM) PRINTHISTORY (NOVALUES LST) +STRINGWIDTH (TEMP) \TEDIT.OBJECT.SHOWSEL (IMAGEBOX Y) READHASHMACRO (NEXTCHAR INDEX) FW-AFTERMOVEFN ( +OFD OLDPOS REGION DELTAX NEWX DELTAY NEWY) RELMOVETO (STREAM) SEGMENT.LENGTH (N START) +TERM.SMOOTHSCROLL (I) MSPRGTEMPLATE (TEM) SEDIT::STRING-OFFSET (SEDIT::K SEDIT::OFFSET SEDIT::J) +\PFGetLVPage (vol) FB.SHAPECOMMAND (WWIDTH EXCESSHEIGHT MENUW) RGBP (TMP) \MAKESPACEFORLOCKEDPAGE ( +DESIREDFP FPBASE OLDVP) \TEDIT.BLTCHAR (IMAGEWIDTH NEWX LEFT RIGHT) DASHINGP (X) SEARCHPDL (SRCHPOS +SRCHX) SUPERPRINT/COMMENT (BODY SEMIP RIGHTFLG COMMENT-LMARGIN COMMENT-RMARGIN HALFLINE) YMAPLIST (Y +PATH1 PATH2 CURRPT NEXTPT X0 Y0 DX DY X YMAP) \SW2BM (PL PB PH PW QL QB QW QH CW CH) RAIDCOMMAND (CMD) + SETUPPAGEMAP (I) CHAT (HOST HOSTS PROC RESULT SUCCESS) INSPECT/ARRAY (I) CL:RETURN-FROM (CL::FRAME) +COMPSETREAD (X) ESTIMATE-DIMENSIONALITY (D) \MAKE.ITEMS.VERT.ORDER (I C ITEM.POINTER) +MAXMENUITEMHEIGHT (FONTHEIGHT ANSWER LABEL) READNUMBERINBASE (CH SIGN BASE VAL NUMERATOR I) +\INSPECT.COMPUTE.TITLE (VALUE) MSPRGTEMPLATE1 (Y X KEYSUSED?) LISPXUSEC (LISPXIN LINE LISPY LISPZ +LISPX1 LISPX2 LISPXTEM) SYSOUT (NEWFILE) CL:MAKE-SYMBOL (PRINT-NAME) \SETUFNENTRY (INDEX) +COURIER.SIGNAL.ERROR (ARGS) CLOSEHASHFILE (HASHFILE) FILL-VECTOR (END) UNIX.SETDISPLAYTYPE (OLDTYPE +WINDOW) \DONEWEPHEMERALPAGE (MAPBASE RPTINDEX RPTR) INFILECOM (CFN TEM TAIL X) CHARACTER.READ (CH) +SEARCH-FOR-EVENT-NUMBER (EVENTS) MAXIMUMWINDOWSIZE (EXT) GRID (TOTALHEIGHT TWICEBORDER X LINELENGTH Y +TEMPBM GRIDBM MAXIMUMCOLOR) \VFMClearIntervals (volume) PFI.MAYBE.NEW.PAGE (REMAINING) DISCARDPUPS ( +SOC) INFILECOMSVALS (Y) BYTEBLOCKCOMPILE2 (X) GRAPHADDNODE (NODE ADDFN) UNIONREGIONS (REG LFT RGHT +BTTM TP I) SEDIT::NOTE-CHANGE-IN-SIMPLE (SEDIT::NEW-WIDTH) CALLSCCODE (NTSIZE NAME NUMBER I TYPE BOUND + USEDFREE NT1 NT2 B CODELOC B1 LEN TAG B2 B3 B4 B5 FN IGNOREFNS GLOBALS CALLED LNCALLED) RETVALUES (P) + COPIEDFILEMATCH (FRPAT X CHARS) COURIER.READ (X DEF) BREAK.NSFILING.CONNECTION (DEV) +\APPLYINSPECTMACRO (ARGS) COPYTEXTSTREAM (PCTB TSEL NEWSTREAM NEWTEXTOBJ PCLST) FB.DEPTHCOMMAND ( +NEWDEPTH) \SUBFNDEF (C I) CH.ADD.MEMBER.TO.PROPERTY.ACL (NEWMEMBER OBJECT) INSPECT/ATOM (ASPECTS +TYPETOINSPECT) PURGENSFONTS (ENTRY BADTYPES SIZES TMP FACE ROT DEV) MAKEEPSFILE (STREAM) MAPHASHFILE ( +HASHFILE HASHKEY KEY VALUE ADR) \CODEBLOCKP (TEM) \NSFILING.OPENFILE (STREAM SEQUENTIAL ATVAL OTHER +ATTRIBUTES) TTPROMPTCHAR (CRLFS) \DSPFONT.PSC (NEWFONT FONTID) EXCHANGEPUPS (INPUP) RAIDSHOWFRAME ( +FRAME) READPAGEMAPBLOCK (P B) MSPRGRECORD (Z X) RECORDWORD (NEWORD WORD) DODIR (CONJ FILE TAIL) +COMP.SPREAD (APPLYTOEACH N) DIGITBASEP (CODE) FILECODEBLOCK (PREFIXLEN) DWIM (X) DOBACKGROUNDCOM (FORM +) FB.INFOMENU.WHENSELECTEDFN (CHOSEN) \PROMPTFORWORDBIN (TIMER READABLE CHAR TTYWAITLIMIT +WAITINTERVAL.secs) FM.CHANGELABEL (ITEM GROUPID ITEMID) \DSPMOVELR (X Y DS) READPAGEMAP (I VP J FP D) +DELETEMENU (OTHERMENUS) TEDIT.FORMATFOLIO (PARALOOKS CHARLOOKS NOFIRSTPAGE INFOLIST FOLIOFORMAT +PRETEXT POSTTEXT PAGE# FOLIOTEXTOBJ FOLIOSTREAM THISLINE FORCENEXTPAGE LINE CHNO YBOT) COPIEDFILENAME +(FILENAME) \RELEASEWORKINGSET (RPTR RPTINDEX) \PROMPTFORWORDBS (C) UPDATE/MENU/IMAGE (SCREEN MENUITEMS + CENTER? FONT TITLE TITLEFONT TITLEHEIGHT TITLEWIDTH NITEMS NUMCOLS NUMROWS BORDER OUTLINE +ANYSUBITEMS? I COLWIDTH ROWHEIGHT WIDTH HEIGHT NITEMSTOFIT BITSPERPIXEL BLK DSP ITEMREGION MAJOR# +WINDOW) OPENHASHFILE (ACCESS ENTRY HASHFILE) \NSFILING.DESERIALIZE (SESSION DIRHANDLE HANDLE) +COURIER.EXECUTE.EXPEDITED.CALL (XIP RESULT STREAM) \TEDIT.SELECT.CHARACTER (SELRES) \10MBSENDPACKET ( +PAIR) FILL.CONT (OPER TBLE I) TEDIT.FORMATTEXTBOX (LINE FOOTNOTELINES PAGEFOOTNOTES FOOTNOTE-REMNANTS +KEPT-ONE-LINE COLUMNBOTTOM LINES THISLINE FORCENEXTPAGE CHNO REST FINAL-CHNO FMTSPEC SPECIALYPOS YBOT +LHEIGHT ORPHAN NEWPAGETYPE BREAKAFTERLASTPARA PRIOR-COLUMN-YBOT COLUMN-YBASE FIRSTLINE PREVLINE) +CHARCODE.DECODE (C X CH CSET POS PAIR) GRAPHOBJ.CHECKALIGN (ALIGNSPEC) STRPOSL (A BASE LEN OFFST +STRFAT STRING START NEG I LASTI) \MATCHPCS (PC OFFSET I) SET-SYMBOL (ENVIRONMENT) \CREATECHARSET ( +CSINFO) \PFRemoveRootDirEntry (entryNum) COMPUTE-MACRO-ARGS (ARGUMENT-LIST SUPPLIED-P-VARIABLE +KEYWORD-VARIABLE FM) CHANGECCODE (DEF OLDREF) SENDPUP (PUP PUPSOC NDB) DSPCLEOL (DISPLAYSTREAM XPOS) +MACROS.GETDEF (X) PROCESS-EXEC-ID (ID) TRACKCURSOR (ORIGPOS OLDPOS DOWNFLG) EXPANDMACRO (EXP MACRODEF) + CHARWIDTHY (WY TEMP) \DSPPRINTCHAR (STR I TABWIDTH) TEDIT.FORMATHEADING (PRECONDITIONS FORM HEADING +HEADINGTEXTOBJ HEADINGSTREAM LINES THISLINE FORCENEXTPAGE LINE YBOT CHNO) \DRAWPOLYGON.DISPLAY (COLOR +PTAIL) MSUSERVBTABLES (modifier) AS.REPLACE.PASSWORDS (NAME) SUPERPRINT/COMMENT2 (FILE TAIL THISITEM +LASTITEM) CH.RETRIEVE.PROPERTY.ACL (NAME) \STRINGWIDTH.GENERIC (C CSET WIDTHSBASE TOTAL ESC ESCWIDTH +TOTALWIDTH) PRINT-EVENT (TEM Y INPUT) SUPERPRINT/COMMENT1 (MINLEFT DEFAULT LM) EXPANDOPENLAMBDA (A +SUBSTPAIRS VAL TMP ARGS VALS FORMALS ACTUALS OPENLAM) NSPRINT (PRINTER INSTREAM DOCUMENT.NAME JOBNAME +OPTIONS PRINTRESULTS) \LASTNODE (CHILD ITEM#) MAPPAGES (VP) \NSFILING.CLOSE.CONNECTIONS (SESSION PAIR) + INSPECT/TYPELESS (HDR TRLR) \CLIPANDDRAWLINE (COLOR SOFTCURSORUP DISPINTERRUPT X1 X2 MIN MAX Y1 Y2 +HALFWIDTH I J) \CH.FIND.ORG.SERVER (ORGINFO KNOWNDOMAINS ALLSERVERS) COMPILER::CLOSURE-ANNOTATE-TAGBODY + (COMPILER::NON-LOCALS COMPILER::SEGMENT COMPILER::STMT COMPILER::OUTER-NEED-STORAGE) PRINTERDEVICE ( +POS POS2) START.OF.PARAGRAPH? (LINE) \BACKCOLOR.DISPLAY (DD BITSPERPIXEL) \IRM.WILD.MATCH (TAIL) +PRINTCOMSTRAN (ARG TYPE WIDTH POINT VARS FORMATLIST FILEFORM TAIL TEMP RESETOUT) PREVLINE (X N L) +\UNCOPY (STR I OFFST NCELLS LOCAL-ARRAY LOCAL-BASE) \DSPRESET.DISPLAY (DISPLAYSTREAM CREG FONT +FONTASCENT X) COMP.GETBASE (A OFF) \BLTSHADE.DISPLAY (DESTDD DESTINATIONLEFT DESTINATIONBOTTOM left +bottom right top CRLEFT CRBOTTOM DESTINATIONBITMAP DESTINATIONNBITS TEXTURE SOFTCURSORUP DISPINTERRUPT + HEIGHT) UNIX-WRITE (LENGTH-WRITTEN) PRINTCODE (RADIX I NTSIZE STARTPC TEMP PC LEVEL STK TAG CODELOC +LEVADJ LEN B B1 B2 B3 B4 B5 OP# N X) ICONW (POSITION) SETFONTCLASSCOMPONENT (DEVICE) \IDLE.TIME (GONE) + COMPILER::PEEPHOLE-OPTIMIZE-CODE (COMPILER::TAIL COMPILER::INST) SETUPHASHARRAY (TEM) +TEDIT.FORMATPAGE (TEXTLEN THISLINE NEWPARALOOKS PC TPAGE PAGE# STARTING-FILEPTR LINE CHNO SUBREGION +END-OF-PAGE-MARKER) EDITBMBUTTONFN (GRIDSPEC GRIDINTERIOR BM BITSWIDE BITSHIGH WREGION XOFFSET YOFFSET + DXOFFSET DYOFFSET DISPLAYREGION EXTENT GRIDX0 GRIDY0 BITMAPWIDTH BITMAPHEIGHT BITSPERPIXEL POS +CURSORBM ORIGBM COORDWIN NEWGRIDSIZE PAINTW) \BITBLT.DISPLAY (SOURCELEFT SOURCEBOTTOM +CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM WIDTH HEIGHT SOURCEDD SOURCE SOURCEBITMAP TEXTURE SOFTCURSORUP +DISPINTERRUPT DESTSTRM SCRATCHBM DESTDD DESTBITMAP DESTINATIONLEFT DESTINATIONBOTTOM left bottom right + top CRLEFT CRBOTTOM DESTINATIONNBITS SOURCENBITS stodx stody OPERATION MAXSHADE DTY DLX STY SLX) +PRINTCODENT (START2 I NAME TAG NUMBER NT1 NT2) GETPUP (PUPSOC PUP TIMER) DELETETO1 (CH) +POLYSHADE.DISPLAY (ILIST LLIST WINDNUMBER) \SPLITTREE (NEW1 OFST UPPEROFST COUNT NEW2) EDITDATE? (I) +FONTUNPARSE (SPEC FACE) LISPXUSE0 (EXPR VARS ARGS VAL) CODEWRAPPER.PRETTYPRINT (FORM) +\DRAWELLIPSE.DISPLAY (ORIENTATION CX CY BOTTOM TOP RIGHTPLUS1 LEFT DestinationBitMap OPERATION NBITS +BRUSHBM COLOR COLORBRUSHBASE RASTERWIDTH DESTINATIONBASE BBT BRUSHBASE BRUSHRASTERWIDTH HEIGHTMINUS1 +BRUSHWIDTH BRUSHHEIGHT LEFTMINUSBRUSH BOTTOMMINUSBRUSH TOPMINUSBRUSH NBITSRIGHTPLUS1 A B G yOffset +CYPlusOffset CYMinusOffset U V K x1 y1 y2 k1 k2 k3 b a d x y SOFTCURSORUP DISPINTERRUPT w x2) NOHOST ( +UP) \XCCSINCCODE (CSET CHAR NUMBYTES) SEQUENTIAL.PRETTYPRINT (TEM TAIL) CSUBST (TEM TEM2 X) FREEMENU ( +DESCRIPTION) FONTPROP (FONT) SEDIT::PARENTHESIZE-CURRENT-SELECTION (SEDIT::NODES SEDIT::SUBNODES SEDIT::I + SEDIT::NEW-NODE SEDIT::N) \TEDIT.APPLY.PAGEFORMATTING (SCRATCHSEL CH# NEXTB PAGEID STARTINGPAGE# +PAPERSIZE LANDSCAPE? PAGENOS PX PY BUTTON FOLIOFORMAT ALIGNMENT FOLIOPRETEXT FOLIOPOSTTEXT LEFT RIGHT +TOP BOTTOM COLS COLWIDTH INTERCOL HEADINGS HEADINGTYPE HEADINGX HEADINGY HEADINGINVALID HEADING# PFONT + PAGEOPTIONS NPAGEFORMAT OPAGEFRAMES NFPAGEFORMAT) \CH.LOCATE.SERVERS (STREAM CHNAMES CHLIST CH INFO +PAIR NOROUTE CHDOMAINS DOM) FONTCLASSCOMPONENT (FONT) \FILLCIRCLE.DISPLAY (RADIUS DISPLAYDATA X Y D +FCBBT LEFT BOTTOM TOP RIGHT OPERATION DestinationBitMap NBITS TEXTUREBM TEXTURE GRAYBASE pattern +DESTINATIONBASE RASTERWIDTH GRAYWIDTH GRAYHEIGHT CX CY SOFTCURSORUP DISPINTERRUPT) INSPECTW.REDISPLAY +(XCL:*PROFILE* PROPERTY-PNAMES VALUEMARGIN SELITEMS PROP PROPNAME VALUE) MAKECREATE1 (NEEDACELL DEF +SMASHFIELDS FIELD VAL CKVALFLG X TEM TEM3) ADVISE (FN WHEN WHERE) FILL.XPER (OPER TBLE SOFTCURSORUP +DISPINTERRUPT I) FIND-STACK-FRAME (POS) CASE.PRETTYPRINT (EXPR HERE TAIL INNERLEFT LEFT CASE) +\10MBGETPACKET (PACKET PAIR) FILL.TEST (OPER TBLE I) TEDIT.CURSORMOVEDFN (LINE LINES WINDOW LEFT) +FIND.LINE.BREAK (START) \TEDIT.FILL.IN.CHARLOOKS.MENU (NEWLOOKS SCRATCHSEL NEXTB CH# BUTTON ITEM +OFFSET) \DRAWCIRCLE.DISPLAY (RADIUS X Y D BBT DISPLAYDATA USERFN CX CY BOTTOM TOP RIGHTPLUS1 LEFT +DestinationBitMap OPERATION NBITS BRUSHBM COLOR COLORBRUSHBASE RASTERWIDTH DESTINATIONBASE BRUSHBASE +BRUSHRASTERWIDTH HEIGHTMINUS1 BRUSHWIDTH BRUSHHEIGHT LEFTMINUSBRUSH BOTTOMMINUSBRUSH TOPMINUSBRUSH +NBITSRIGHTPLUS1 SOFTCURSORUP DISPINTERRUPT) ENDREAD? (X ESCAPED) PREPLOOP (PathOrPathList NLIST TLIST +ILIST) MAKEINITLAST (GAG AL X A) COPIEDFILEPATTERN (FRPAT CHARS TOPAT X) COMP.LOOKUPVAR (X VAR) +PROG1.PRETTYPRINT (E EXPR HERE) \GETREGION.CHECKOPPT (OPPX OPPY USERPT) \AVGCHARWIDTH (W) +DODIRCOMMANDS (I COM COMTAIL DT ATTRVALUE) \TEDIT.CONVERT.FOREIGN.FORMAT (WORKINGSTREAM TSTREAM) +SETFONTDESCRIPTOR (DEVICE FONT FAMILY FACE ROTATION X) TEDIT.PARSE.PAGEFRAMES (FRAMETYPE PAGELIST +PAGEFRAME) \SCALEDBITBLT.DISPLAY (SCALE REGION WIDTH HEIGHT DESTINATIONBOTTOM DESTINATIONLEFT BITMAP) +SUPERPRINT0 (MACRO E) CONCAT (NM FATSEENP LEN J S POS) \DSPFONT.DISPLAY (DD OLDFONT XFONT) +\MAKEBRUSH.ROUND (RADIUS BITMAP BASE) PROGV.PRETTYPRINT (EXPR) BROWSE/LAYOUT/HORIZ/COMPACTLY (TOPNODE +N GN) \DRAWLINE.PSC (WIDTH) INSPECT/DATATYPE (DEC SYSREC I) \DSPRIGHTMARGIN.DISPLAY (OLDRM) +DUMPINITPAGES (I FILE) DO.PRETTYPRINT (TAIL) MSPRGE (CALLED TEM Y CLISP X) NTH.RELATIVE.COLUMN.OF ( +WIDTH CH N BUF) PRINTPROG (TAIL) \COPY (V R) DIRPRINTNAME (THISCHAR DIRECTORYEND LASTCHAR DIFFERENT I) + CH.PROPERTY (PAIR) CREATEFIELDS (X) \SEQUIN.PROCESS (SOCEVENT PUP REASON TIMEOUT CNT +RETRANSMITINCREMENT) \FONT.SYMBOLMEMB (X) COURIER.EXPEDITED.CALL (PGMDEF PROCDEF %#ARGS ARGTYPES TYPE +NOERRORFLG ARGLIST I) SUBPRINT (OLDY CURRENT TEM CLISPWORD FORMFLG TAIL NEXT DOCRFLG END LEFT LEFT0 +CEND) CLISPLOOKUP1 (TEM VAL LST) FB.NEWINFOCOMMAND (INFOMENUW REG W) \NSFILING.AFTER.LOGIN (SESSION) +ADDFILE0 (COMS FILEPROP ROOTNAME FULLNAME FLG) \MAP-CODE-POINTERS (TAG CODELOC) SI::RESETUNWIND ( +RESETZ OLDVALUE) \NSFILING.DESERIALIZE1 (EXPLICIT-RESULT BULKRESULT) \FONT.SYMBOLASSOC (FIRSTC X) +MOVE.TO.LINE (RELATIVE.POSITION BUFTAIL) \MAP-CODE-LITERALS (NUMBER I NT1 TAG CODELOC) \DRAWCURVE.PSC +(WIDTH SHAPE COLOR PSPLINE N XA YA DXA DYA PREVX PREVY PREV-DX3 PREV-DY3 C) \FONT.COMPARESYMBOL ( +INPUTFIRSTC A0494 A0495 A0496 CHAR1 CHAR2) \IDLE.EXIT? (PWD WATCHER NAME) DSFIT1 (L M) +GETGRIDBOXREGION (NEWREGION) LISPXUSE (STATE VARS TEM LST ARGS GENLST LINE EXPR USE-ARGS) +\PFPutRootDirectory (where) UTF16BE.PEEKCCODEFN (BYTE1 BYTE2 CODE) PRINTSQ (FOLD LEFT TAIL REST) +SETUPPUP (PUP DESTHOST SOC) INSPECT/HUNK (ELTSPEC BLOCKRECS I) \FONTFACE (UNKNOWN WEIGHT SLOPE +EXPANSION FACE) FIND-HISTORY-EVENTS (*EVENTS* X EVENT-SPEC VAL VALUE-P PRED-P) CH.IS.IN.DOMAIN.ACL ( +DOMAIN) \AREAVISIBLE? (WPTR) UTF16BE.INCCODEFN (BYTE1 BYTE2 COUNT CODE) SUBPRINT1 (L TMP) +\MAKEBRUSH.SQUARE (BM) EDITADDNODE (NODE ORIGPOS) CACHEMACRO (FN) /PUT-1 (X X0) FB.NEWPATTERNCOMMAND ( +PATTERN) \PFGetRootDirectory (where) DSFIT2 (N NC) GETSEQUIN (PACKET) MSADDTYPE (HOWUSED SYNONYMS +TABLES typeWord oldWordDef) PAINTW (WINDOW BRUSH DS BITSPERPIXEL MASKSHADE HOTX HOTY MASK PREVX PREVY +PREVBUT) HISTORY-NTH (EVENT N LST) SEGMENT.BIT.LENGTH (N START) \DSPBACKCOLOR.DISPLAY (DD COLORCELL +DESTINATION BITSPERPIXEL COLOR) \PFCurrentVol (vol) SHOW.MATCHING.PAREN (LINE ROW COL) +\DSPCOLOR.DISPLAY (DD COLORCELL DESTINATION BITSPERPIXEL COLOR) LLBREAK (DEF NUFN) TEDIT.BUILD.PCTB0 ( +PCTB PIECEINFOCH# PC PCLEN TYPECODE CURFILECH# OLDPC CURCH# I PCN) \NSGC.COLLECT.DIRECTORIES (HANDLE +BULKSTREAM SCOPELIST GENERATOR ID INFO PAIR) TEDIT.SCAN.LINE (X OTX TXB TX CHB CLOOKS PREVCH PCLOOKS +CH CHNO LOOKNO I L L1 LN WW CHOBJB DX) BRHL/MOVE/RIGHT (D) TEDIT.PROMPTFLASH (MAINTEXTOBJ WINDOW) +\PRINDATUM.TO.STRING (*PRINT-CIRCLE-HASHTABLE* FATSTRINGP STRINGLEN *PRINT-CIRCLE-NUMBER* STRINGPTR +STRINDEX) BROKENDEF (FIRSTBYTE BEFORE AFTER SIZE NEWCA OP) RENAME (TYPE) /PUTPROP (TEM X X0) +UTF16BE.OUTCHARFN (C) BRKDWNTIME (BDZ BDY BDN) \INSERTTREE (NODE-COUNT ITEM# BB NEWLEN I) UNDOLISPX1 ( +TEM X Y) /ADDPROP (TEM NEW X X0) \DRAWCIRCLE.PSC (WIDTH COLOR) TTLOADBUF (BUF CHAR NEXTCH START END) +ADDPME (PMP PX LOCKBASE) BROWSE/LAYOUT/HORIZ (N Y) TEDIT.FORMAT.HARDCOPY (PAGEFRAMES THISLINE +BREAKPAGETITLE BEFOREFN SCRATCHFILE AFTERFN WASOPEN PRSTREAM IMAGETYPE REGION) SAVEPUT (TEM OLDFLG X +X0) XCL::PUT-IMPLICIT-KEY-HASH (XCL::INDEX XCL::VALUE XCL::DELETED-SLOT-INDEX XCL::FIRST-INDEX +XCL::REPROBE) COMPILER::META-EVAL-LABELS (COMPILER::NODE) PRIN1 (\THISFILELINELENGTH) FM.WHICHITEM ( +WINDOW ITEM REGION) FONTSET (X SEEN FONTS BASICCLASSES) SPACES (\THISFILELINELENGTH) +FIND.MATCHING.WORD (BUFTAIL TAIL) PRINTNUM (WIDTH STR RAD TEMP PAD) \DRAWELLIPSE.PSC (WIDTH COLOR) +\FAST4BIT (AW I J) SIMPLEP (N X) TAB (X) GETCHARBITMAP (CHARCODE CSINFO CBM CWDTH CHGHT) MAPFILES ( +FILESPEC) BRHL/LAYOUT (YHEIGHT) MakeMenuOfImageTypes (IMAGETYPE IMAGETYPENAME) +\DO.PROGV.SETUP.FRAME.AND.EXECUTE (HEADER NT NILSTART VAR VALUES VAR# NT1 NT2 VALUEOFF) +MAKEWITHINREGION (X) \TEDIT.UPDATETREE (I PCNODE UPWARD) \TRANSLATE.3TO10 (PACKET) ALLCALLS (X) +POSTSCRIPT.TEDIT (FILE) \TEDIT.PARSE.CHARLOOKS.MENU (SCRATCHSEL NEXTB NEWLOOKS CH# BUTTON TEXT NAME +SIZE SUPER OFFSET) \MAKEBRUSH.HORIZONTAL (BM) \CORE.RELEASEPAGES (LP P) \PFGetVols (volNum) +\COURIER.TRACE (X FIRSTTIME) FB.INSERT.SUBDIRECTORIES (TAIL LASTDATA) \CORE.UPDATEOF (OFF) +\GETREGION.CHECKBASEPT (FN USERPT) MSADDMODIFIER (TABLES MODIFIERS adverb oldWordDef) PUTCHARBITMAP ( +CHARCODE) SHOW.IP (SHOWSTREAM LEN) TEDIT.BUILD.PCTB2 (DEFAULTLOOKS PCTB PIECEINFOCH# PC PCLEN TYPECODE + PCN LOOKSHASH LOOKS I PARAHASH OLDPARALOOKS CURFILECH# CURCH# OLDPC) \TEDIT.ADJUST.LINES (OYBOT +OFLOWFN OFLOW PREVLINE LL) VARSBOUNDINFORM (TEM INVAR TAIL ELT VAL) TTYINPROMPTFORWORD (TYPE C +ECHO.CHANNEL) SEDIT::START-COMMENT (SEDIT::NEW-NODE) CL:MAKE-HASH-TABLE (CL::TEST) +GET-NEXT-HISTORY-EVENT (EVENT) RPLSTRING (OLEN RBASE ROFFST RLEN RFAT REP POS OBASE FIRSTNEW I J) +\CORE.DELETEFILE (NAMETAIL EXTTAIL VERSTAIL) \SHOWTEXT (WINDOW LINES) \CORE.GETINFOBLOCK (SCR ROOT EXT + INFOBLOCK I VERS) MB.MARGINBAR.TABTRACK (X OLDX) EDITAPPLYTOLINK (MSGW FROM TO) CHAT.STARTUP (SLASH +PROTOCOL OPENFN RESULT HOST PAIR DISPLAYTYPE STREAMS WINDOW) BKSYSCHARCODE (C) FM.EDITITEM (ITEM +GROUPID ITEMID CLEARFLG) MAPFILES1 (ATTRIBUTES NAME LEN) BKSYSBUF (C *READTABLE* TTY *PACKAGE*) +\CORE.FINDPAGE (PAGETAIL PE PAGEPTR PREVTAIL) \CHTOPC (TBASE-CH# FOUND BASE-CH# I OFST TREE) NEGATE (Y +) MOVECHARBITMAP (CHARBITMAP SRCEASCENT DESTASCENT SRCEDESCENT DESTDESCENT NEWASCENT NEWDESCENT +TEMPBITMAP) \MAKEBRUSH.VERTICAL (BM) TEDIT.SELECT.LINE.SCANNER (L TL1 TLN WW L1 LN PARABOUNDS +PARASTART PARAEND LL PREVLINE LINE) \TEDIT.UNIQUIFY.CHARLOOKS (LOOK) \CORE.GENERATEFILES ( +MATCHINGFILES EXT) \TFBRAVO.EOLS (I) CH.DELETE.MEMBER.FROM.DOMAIN.ACL (OLDMEMBER DOMAIN) +COMPILER::CLOSURE-ANNOTATE-PROGN (COMPILER::STMT) PROCESS.EVALV (ME) DIRECTORY.MATCH (FIRSTCHAR) +\BITMAPTOSCREEN (SCREEN) CHECKFPTOVP (FP FPBASE) FB.SORTCOMMAND (SORTATTR REVERSED SORTFN DATETYPE +BYNAME ALLFILES SORT# ITEM DATA VALUE) FONTCOPY (OLDFONT I FAMILY SIZE FACE ROTATION DEVICE VAL +NOERROR ERROR) DIRECTORY.MATCH.SETUP (FILENAME TAIL) \FILLCIRCLE.PSC (TEXTURE TEXTUREBM TEXTUREWIDTH) +TRAPMAKE (UNFINISHED CURRY PTR ALIST LIST1 LIST2 PT1 PT2 PT4 PT3 TRAP TRAPLIST EDGELIST) TYPE.BUFFER ( +WIDTH CH START) TEDIT.BUILD.PCTB1 (DEFAULTLOOKS PCTB PIECEINFOCH# PC PCLEN TYPECODE PCN OLDPARALOOKS +CURFILECH# EXLOOK LOOK EXISTINGCHARLOOKS EXISTINGFMTSPECS CURCH# OLDPC I) FONTSAVAILABLE (DEV FONTX +FONTFACE FAMILY ROTATION) FONTMAPARRAY (F PRETTYFONT# MAXFONT MINFONT FA I) SEDIT::STRINGWIDTH (SEDIT::C + CL:LENGTH) \CORE.NEXTFILEFN (FILE) MB.THREESTATE.DISPLAY (OBJBOX X Y BITMAP DS) NAMEFIELD (SUFFIXFLG) + GAINSPACE (RESPONSE) COROUTINE (CALLPTR## COROUTPTR##) \LOOKUPFONTSINCORE (FAMBUCKET SIZEBUCKET +FACEBUCKET ROTBUCKET DEVBUCKET) GC-FILING-DIRECTORY (DIRNAME CANDIDATES TOPID HOST DIRINDEX ID PAIR +PARENT ERROR NDELETED) \TEDIT.APPLY.CHARLOOKS (CH# NEWLOOKS) CREATESCREEN (TITLEDS SCREEN) +FONTPROFILE.ADDDEVICE (NEWDEVICE OLDDEVICE FC) SPP.SENDATTENTION (EPKT) CURRENT.WORD (SNX NEW X) +EQUALHASH (UNMATCHED) \BLTSHADE.PSC (RGN LEFT BOTTOM WIDTH HEIGHT TEXTURE TEXTUREBM TEXTUREWIDTH) +FONTFILEFORMAT (STRM) GO.TO.RELATIVE (COL ROW) UTF8.PEEKCCODEFN (BYTE1 CODE BYTE4 BYTE3 BYTE2) +\IRM.WILDCARD (ATOM) \TFBRAVO.READ.USER.CM (FILE LINE ALIST) CH.LIST.DOMAINS (DOMAINPATTERN) +\TEDIT.UNIQUIFY.PARALOOKS (LOOK) CL::%%DO-TRANSLATE (CL::SUBSEQUENT-VALUES) EQUALALL (TEM J I TY FIELD +) SEDIT::TTYEXITFN (SEDIT::NEWPROC) \TFBRAVO.LCASER (Z) LISPX/1 (TEM1 TEM2 TEM3) SHAPEW (WINDOW +NEWSIZE) \PRINTFPTOVP (STREAM FIRSTPAGE NWORDS NEXTFP NEXTVP BASE NEXTLOCKED NEXTTYPE FIRSTFP FIRSTVP +LASTVP LOCKEDP TYPE) STREQUAL (LEN BNX BNY) TTDOTABS (TB SPACES) TYPENAME (N) OR (*TAIL*) DWIMIFY (VAL +) SHRINKBITMAP (Y X) CLISPIFY (EXPR PARENT TEM TAIL CLISPIFYFN VARS FORM DECLST) L-CASE (C FLG +CHANGEFLG I NEWSTRING BASE) FILEPKGCOMS.PUTDEF (COM TYP) \LOCKFN (FN) GATHEREXPORTS (TOFILE ENV) +U-CASEP (C) \UNITWIDTHSVECTOR (I) \MAKEBRUSH.DIAGONAL (BM X) BRHL/LAYOUT/DAUGHTERS (DTAIL GN D NP +FLOOR) \NSFILING.COPY/RENAME (SESSION HANDLE NEWSESSION NEWDIR VERSION DEST-UNIQUE-P NAME OLDDIR DIR +SAME-DIR-P NEWATTRS NEWPARENT OLDHANDLE RESULT SERIALSTREAM NEWHANDLE) RECORD (NAM N) WINDOWREGION (FN +) LOADFNS (DFNFLG TEM LDFLG ADDSPELLFLG BUILDMAPFLG FILEPKGFLG LISPXHIST FNLST FILE RESETSAVER +INSTREAM ROOTNAME FILENV FILEMAP FILECREATEDLOC FILECREATEDLST VARLST FILEMAPEND) EDITBM (BMSPEC +ORIGBM BM CR BPP ORIGBPP ORIGWIDTH WIDTH HEIGHT GRIDSQUARE BMWWIDTH BMWHEIGHT BMW) TEDIT.PUT (OFILE +PUTFN CACHE FONTFILEUSED CH#S PC TITLE MENUSTREAM FILENAME) %%MAKE-STRING-ARRAY-FAT (OFFSET LIMIT +NEW-BASE) POSTEDITALISTS (X FOUNDCHANGE OV) \TFBRAVO.INIT.PARALOOKS (LM 1LM VALUE) +LIST-ALL-BLOCKRECORDS (RECDEC) NEW/FN (FN1 FN) \TFBRAVO.PARAMNAMEP (L) \CORE.GETFILENAME (ROOT SCR EXT + VERS) FONTPROFILE (SEEN FONTS BASICCLASSES) FB.PROMPTFORINPUT (PROMPT I RESULT) +\ROUTINGTABLE.INFOHOOK (NUMENTRIES TABLE I BASE WINDOW STREAM) SPELLFILE (NAME VERSION EXTENSION +DIRECTORY RELATIVEDIRECTORY SUBDIRECTORY HOST DIRS DEVICE FIELDS VAL ROOTNAME FILEDATES SPELLVAL X DIR + APPFLG) TEDIT.GET.OBJECT0 (GETFN FILEPTRSAVE OBJ) DRAWAREABOX (TEXTURE) \TEDIT.DIFFUSE.PARALOOKS (PC) + FW-ADJUST-REGION (NAMEWIDTH MAXNAMEWIDTH) \TEDIT.TEXTBIN.STRINGSETUP (OFFST) +\CREATE-REAL-CHARSET.DISPLAY (XFONT CSINFO TRANSL UFONT REALFONT NEWCSINFO) TEDIT (TEXT +TEDITCREATEDWINDOW WINDOW PROC) \CORE.NAMESCAN (NEXTNAME NAMELST NEWSEG) \TEDIT.FIXINSSEL (CH# CHLIM) +CONSTANTEXPRESSIONP (FORM VALUE X) \PUTBASESTRING (CH OFFSET SOURCE) \CORE.UNPACKFILENAME (DOT SEMI) +INSERTLINE (OLDEND NEWLINE X) \SFMAKEITALIC (HEIGHT NEWBITMAP UNKNOWNOFFSET UNKNOWNWIDTH N M OFFSET +WIDTH R XN XX YN YX J I) \TEDIT.SHOW.CHARLOOKS (CH# PC NEWLOOKS) \PUTBASESTRINGFAT (I DOFF) SLITLOOP ( +KLST LAST PREV CURR PREVSGN CURRLIST SECTLIST CURRSGN) GENSYM (PREFIXLEN PREFIX CHARCODE BUFSIZE +OSTRBUFFER BUF NUMLEN CNT C I BEG.I ATOM) ALIGNMENTNODE (N) \TEDIT.GET.CHARLOOKS.LIST (I) FM.SHADE ( +GROUPID ITEMID) HCOPYALL1 (TYPE NEW ORIG SEEN) TILE (X Y W H DSTW DSTH) \CREATECHARSET.DISPLAY (TRANSL + UFONT REALFONT NEWCSINFO) \BUILDSLUGCSINFO (SCALE WIDTHS I OFFSETS BITMAP) BLTPATTERN.GENERIC (SW SH +H RW RX W DH DY) SHOWCHARS (C) \IFSERRORSTRING (START LEN RESULT I) COURIER.WRITE (X NAMEANDTYPE VALUE + NAMEANDVALUE) SEDIT::CFV-CLISP (SEDIT::INDENT SEDIT::SUBNODE SEDIT::PWIDTH SEDIT::FIRST-SUBNODE) +GetBcplString (S) \CORE.OPENFILE (INFOBLK STREAM EOL) \READDISPLAYFONTFILE (EXT FONTFILE STRM CSINFO) +\TEDIT.TEXTBIN.FILESETUP (PF FPOS CH) CLISPATOM1 (CLTYP1 ATMS TEM OPRFLAG NOTFLG BRACKETCNT BRACKET +ENDTAIL L TAIL CURRTAIL-1 LST0 TENTATIVE CLTYP TYP BROADSCOPE ISFLG BACKUPFLG) LENGTH (N X) +\NSRANDOM.OPENFILE (FILENAME) POSTSCRIPT.HARDCOPYW (REGION SCALE) \TEXTMENU.TOGGLE.DISPLAY (OBJBOX X Y + BITMAP DS) BQUOTIFY (TAIL BQCAR TL) \COREFILE.SETPARAMETERS (PAIR TYPEFLG) TEDIT.UNDO.MOVE (TOTEXTLEN +) TEDIT.PUT.PCTB2 (PC OLDLOOKS TRUEFILE OFILE CURCH# OLDCH# FONTFILE PCCOUNT PARAHASH PARALOOKSSEEN +LOOKSHASH PREVFATP PFILE PSTR CH I CH#S PREVPREVPC PREVPC) CHAT.PROMPT.FOR.INPUT (WINDOW) +MB.MARGINBAR.DISPLAYFN (WASON BITMAP DS) \DOHARDRETURN1 (HRFRAME RETURNEE AX NEW SIZE +NAMETABLE-ON-STACK RETBF) EXPANDBM (SRCEX SRCEY SRCEW SRCEH DESTW DESTH I POWER J) GETSETQ (TL) +\MKATOM (I HASH FIRSTBYTE FIRSTCHAR HASHENT CHAR# PNBASE ATM# B1 B2 REPROBE) BRHC/OFFSET (ABSY) +RAISE/TRANSITION/CHAIN (P) SHOWGRAPH (WINDOW GRAPH) \CREATE.SYMBOL (ATM I J) \GCSCANSTACK (SCANBASE Q +NEXT NTEND SCANPTR) SEDIT::COPY-NODE (SEDIT::SUBNODE) BKSYSBUF.GENERAL (SEPR OBJECT) \SCALEDBITBLT.PSC + (SCALE DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT DESTREGION TEMPBM) COMPILER::CLOSURE-ANNOTATE-MV-CALL + (COMPILER::ARG) \PARSE.NUMBER (RDTBL RADIX MAXALPHADIGIT MAXDIGIT COMMONLISPY ENDFRAC NEGFRAC EXP10 +STATE C SIGN DECPT SEENBOGUSDIGITS J SIGDIGITS START EXPSTART SEENALPHADIGITS I) SPP.OPENP (CON) +\IRM.WILD.REF (SAMEFLG) COMPILER::CLOSURE-ANNOTATE-LABELS (COMPILER::NON-LOCALS COMPILER::FUN +COMPILER::OUTER-NEED-STORAGE) APPENDINTEGER.IP (I) LAYOUTSEXPR (BOXING) \SEARCHFONTFILES (FAMILY +DEVICE FACE E DIR FONTFILE THISFONT THISFACE FONTSFOUND) \DECUSECOUNT (ALINK BLINK CLINK SIZE FRAME) +\CORE.SETFILEINFO (VALUE) PURGEDSKDIRECTORY (S) FM.REDISPLAYITEM (ITEM GROUPID ITEMID) \INCUSECOUNT ( +SCANPTR) SCANEXP (EXP) BLTPATTERN (SW SH OPER TW TH SRCE SX SY) COMP.STJUMP (TAG JT OP NV) DO?CMD ( +SAVE) \INITATOMPAGE (VALBASE I OFF) GETSELECTEDITEMS (ITEM) \CORE.GETNEXTBUFFER (COFF CPAGE# EPAGE# +COREBUF) \PROMPT.FOR.PUP.NUMBER (NEWNUMBER) SIMPLETEXTEDIT (INSTREAM MAINOUTPUT) +INSPECT/AS/BLOCKRECORD (CHOICES RECNAME) MB.NB.DISPLAYFN (BITMAP DS X Y IMAGE STATE BXVAL BYVAL BUTTON +) \MOVEFRAME (NEW FREESIZE AT-EOS OLDSIZE NAMETABLE-ON-STACK) SPELLFILE1 (FL NAME1 EXT1 VERS#1) +WINDOWWORLD (SCREEN) \ALLOCBLOCK (NCELLS GCTYPE ALIGN ABLOCK) \SETUPUSERSTACK (BASE) SLICESET (OFFSET +I) \NSFILING.NEXTFILE (INFO NAME) TEDIT.GET.CHARLOOKS0 (NAMELEN NAME I SIZE SUPER SUB STYLESTR USERSTR + PROPS) \GATHER-CLEANUP-FORMS (PROC FRAME) SEDIT::CONTAINS? (SEDIT::START-1 SEDIT::END-1 SEDIT::NODE-1 + SEDIT::START-2 SEDIT::END-2 SEDIT::NODE-2) SEDIT::LINEARIZE-CLISP (SEDIT::INDEX SEDIT::INDENT +SEDIT::COMMENT-START-X SEDIT::COMMENT-INDENT SEDIT::SUBNODE SEDIT::COMMENT? SEDIT::OK SEDIT::KEYWORD? +SEDIT::PROGRAM-WORD? SEDIT::SECOND-SUBNODE) \FONTINFOFROMFILENAME (NAME SIZEBEG CH CH# FAMILY SIZEND +SIZE FACE EXT) \FONTFILENAME.OLD (FACE) TTYIN.SHOW.?ALTERNATIVES (STARTOFWORD X MATCHED DOWNCASE) +MBUTTON.FIND.NEXT.BUTTON (PC OBJ START-OF-PIECE) \FONTFILENAME (FACE TAIL) SCANDEFINEQ (TAIL FNAME) +SPELLFILEDIR (H) \AGE.ROUTING.TABLE (BUCKET ENTRY PURGED TAIL TABLE I) MAPATOMS (A LASTPAGE LIMIT +FIRSTPAGE DISP FREE ATOM# DATUMBASE N MDSPAGE#) \EXTENDSTACK (SCANPTR) EXTEND/TRANSITION/CHAIN (LX RX +LTAIL RTAIL) COMPILER::CLOSURE-ANNOTATE-LAMBDA (COMPILER::NON-LOCALS COMPILER::OPT-VAR COMPILER::KEY-VAR + COMPILER::*NEED-STORAGE* COMPILER::VAR COMPILER::OUTER-NEED-STORAGE) SPELLFILE.SPELL (VERSION) +COMPILER::CLOSURE-ANNOTATE-MV-PROG1 (COMPILER::STMT) \NSFILING.SETFILEINFO (RESULT) ATOMHASH#PROBES ( +BASE OFFST LEN FATP FATCHARSEENP DESIREDATOM# STRING C FIRSTCHAR FIRSTBYTE HASH CHAR# HASHENT PNBASE +B1 B2 REPROBE PROBES) ONEDINSPECTW.CREATE (XCL:*PROFILE* PROPS DISPLAYWINDOW RIGHTWINDOW TITLEWINDOW +GLEFT GBOTTOM GWIDTH GHEIGHT WINDOWGROUP) CH.ADD.MEMBER.TO.DOMAIN.ACL (NEWMEMBER DOMAIN) +TEDIT.GET.PARALOOKS0 (TABSPEC TABFLG DEFAULTTAB TABCOUNT TABS TAB#) LISPFORM.SIMPLIFY (Y X) +MAXATTACHEDWINDOWEXTENT (EXTENT TL TC TR RT RC RB BR BC BL LB LC LT ATW ATWDTH ATWHGHT WHERECODE +ATWHERE) SEDIT::UNDO-EXTRACT (SEDIT::SUBNODE SEDIT::INDEX) MSPRINTHELPFILE (FL) +\TEDIT.GET.PARALOOKS.LIST (I) SEDIT::SKIP-TO-GAP (SEDIT::NODE) \HANDLE.RAW.PUP (DESTNET MYNET PUPSOC +SOC CSUM) \FONTFACE.COLOR (DEV ANSWER FACE POS BWFACE OLDPOS BITSPERPIXEL BACKCOLOR FORECOLOR) UNDOSET + (TEM) DO-HISTORY-SEARCH (PAT2) DBG::MAKE-FRAME-INSPECT-WINDOW (DBG::BTWINDOW DBG::ATW DBG::TTYREGION) + SCANDECLARECOLON (TEM EVALFLG) \DSPSCALE.PSC (NSCALE) \FINDFONTFILE (EXT FONTFILE) INSTALLBRUSH ( +OLDENTRY BRUSHARRAY X) SPELLFILE.MATCHINGDIRS (DIR UDIR DHOST) \COURIER.RESULTS (RESULT MSGTYPE +ERRORDEF OTHER ERR) \PAGEDEOFP (CUROFFSET) SEDIT::TRANSLATE-CHARS (SEDIT::C SEDIT::R) FMAPRINT (SEP +LST) \PFInitializeVols (volNum) POSTEDITPROPS (NEWPROP OLDPROP OV FOUNDCHANGE) +\FIND.LOCALPUPHOSTNUMBER (NEWNUMBER) \SFLHASHLOOKUP (PROBE HASHENT) \TEDIT.APPLY.PARASTYLES (NOSTYLE +STYLE) ED (CL::NAME CL::OPTIONS X TYPE) FIXSPELL1 (MESSFLG TEM APPROVALFLG BUFS VAL X) \POLYSHADE.BLT +(fulllist currlist currcrit scany scan fullcrit count ex clist ty crity) \NSRANDOM.READPAGES (CACHE +NMORE I EXTRABUFFERS) PUTD (DEF) VAR.NOT.USED (VAR) \NODIRCORE.OPENFILE (NAME) DECLSUBFIELD (SUBTRAN +SUBNAME) \PUTD (CODEBASE DVAL) FIXDATUM (X TEM VAL) BLTPATTERN.REPLACEDISPLAY (W H RX RW SW RY RH SH) +PRINTERS.WHENSELECTEDFN (PRINTERCHOICE) COPYGRAPH (N) SI::UNWIND-TO-BLIP (UNWINDER TARGET PC) +TEDIT.HARDCOPY (IMAGETYPE) \INIT-MISCN-TABLE (BASE) SCALEBM (SRCEWIDTH SRCEHEIGHT DESTWIDTH DESTHEIGHT + TEMPBM) EVALUABLE.CONSTANTP (X Z VALS) BLOCKCOMPILE (BLKFNS BLKNAME) \NSFILING.GETFILEINFO ( +DESIREDPROPS INFO HANDLE) POSTSCRIPT.PUTCOMMAND (S#S STR#) CLOSEALL (STREAM) REMOVETONODES (Z) +SI::NON-LOCAL-RETURN (I) ARGS.COMMUTABLEP (X Y FN) PFI.AFTER.NEW.PAGE (RIGHT LEFT) +SEDIT::COMPUTE-SELECTION-POSITION-DEFAULT (SEDIT::END) COMPILER::FIND-TOP-ENVIRONMENT (COMPILER:ENV) +\WALKOVER.SPECIALFORMS (LL FORM) TEDITFROMBRAVO (TEXTOBJ USER.CM.ALIST OLDPLOOKS USER.CM.PARALOOKS +USER.CM.CHARLOOKS START CURRENT.PARAGRAPH NEXTPARAPTR SMALLEST.MARGIN) MISCN-COLLECT (I) +MINATTACHEDWINDOWEXTENT (TL TC TR RT RC RB BR BC BL LB LC LT ATW EXTENT ATWDTH ATWHGHT WHERECODE +ATWHERE) \STKMIN (LEVADJ I CODE MAX OP STKE DEPTH PC) MB.MARGINBAR.SELFN (OL1 OLN OR L1 LN R TAB TABX +TABS) \FINDOP (I) \LFFindDirectoryVol (VOL nextVolumes vols vol) \GET-COMPILED-CODE-BASE (X) +\DECL.COMNT.PROCESS (L Y COMNTS DECLS) UTF8.INCCODEFN (BYTE1) ROMANNUMERALS (CHARS NUMBER) +\FONTFILENAME.NEW (FACE SIZEPATT) TWODINSPECTW.CREATE (ROWPROPS COLUMNPROPS XCL:*PROFILE* +DISPLAYWINDOW TOPWINDOW RIGHTWINDOW CORNERWINDOW TITLEWINDOW GLEFT GBOTTOM GWIDTH GHEIGHT WINDOWGROUP) + IRNDLIST (X Y) SETA (A N0) CALLS3 (FLG) GRAPHOBJ.IMAGEBOXFN (GRAPH HALIGN VALIGN REGION ALNODE) +WHENCLOSE (FN I) ARRAY (SIZE TYP NCELLS GCTYPE INITVAL AP LASTWORD2BASE P) AS.MAKE.CONVERSATION ( +USERINFO ADDR STREAM CRED.PACK) \WALKOVER.FUNCTION (FN) BRHC/LAYOUT/DAUGHTERS (D GN LST/DCENTER +1ST/DCENTER TTC BTC OFFSET) COPY.WINDOW.TO.BITMAP (REGION SCREEN LEFT BOTTOM WIDTH HEIGHT BITMAP +SOFTCURSORUP DISPINTERRUPT) \10MB.GETPACKETSTATUS (STATUS) \SELITEM.FROM.PROPERTY (SELITEM) +\FONTINFOFROMFILENAME.OLD (NAME SIZEBEG CH# FAMILY SIZEND SIZE) ASKUSERCHAR (C1 C2) MOVE.FORWARD.TO ( +BUFTAIL) \MEDW.CARET.SHOW (DS DD CARETWIN CBMX CBMY CURSOR CARETBM CWX CWY CARETBMWIDTH CARETBMHEIGHT +CLIPREG CLIPVAR) \TEDIT.EXPANDED.MENU (CHARMENUTEXTSTREAM) \DELETETREE (NODE-COUNT ITEM# BB I NEWLEN) +\NSFILING.GENERATE.STARS (N NAME) TEDIT.GET.OBJECT1 (GETFN FILEPTRSAVE OBJ) MSDESCRIBE (ARGS LINE VAR +GLOBALS FREES D L) \READSTRIKEFONTFILE (CSINFO FIRSTCHAR LASTCHAR RW HEIGHT BITMAP NUMBCODES OFFSETS I + J WIDTHS) SI::PVAR-VALUE-IN-FRAME (NAME TMP OFFSET) MAKEUSERMACROSCOMS (X VAR TEM Y LST) +SHOW.CLEARINGHOUSE (SEXPR) \READACFONTFILE (STRM STARTCHAR ENDCHAR BBOXLIST FBBLIST CHARWIDTHLIST +CHARIMAGEWIDTHLIST DUMMYWIDTH LEFTKERNS BOX I IMAGEWIDTHS WIDTHS Y X CHARBITMAP DUMMYCHAROFFSET +OFFSETS STARTWORDLIST BBLIST STARTWORD CHARWIDTH DESTLEFT RASTERINFO BBOX BBBITMAP BBBMBASE NTHCHAR) +SI::VARIABLE-NAME-IN-FRAME (NAME NTBASE NT2BASE) COLLECTFNDATA (VAL) PFCOPYBYTES (FONTARRAY MAXFONT +%#CHARS START CHARCODE) MSDESCRIBE1 (LL P LST) MOVETOFILE (TYPE) ASSURE.PUP.READY (MYHOST# NDB) +IMPORTFILE (FILE) \MEDW.GETSCREENREGION (BASEPT OPPT MINWIDTH MINHEIGHT NEWREGFNS SHADE NOTTIMEDOUT +DESTINATION X BASEX BASEY OPPX OPPY INITLEFT INITRIGHT INITBOTTOM INITTOP BEGCLOCK DOWNFLG OLDMOUSEX +OLDMOUSEY) RETURN (FRAME) LOOKUPHASHFILE (HASHFILE Z KEYVAL RETFLG RETVAL) \DISCARDFRAME (NEWCLINK +OLDUSECOUNT) MBUTTON.FIND.BUTTON (PC OBJ START-OF-PIECE) FM.RESETSTATE (GROUPID ITEMID) +\TEDIT.GET.PARALOOKS1 (TABSPEC TABFLG DEFAULTTAB TABCOUNT TABS TAB#) \TEDIT.NEXT.LINE.BOTTOM ( +BASETOBASE PARALOOKS NEWYBOT PARALEADING) FB.CANONICALIZE.PATTERN (SAMPLEHOSTEND LASTPATDIR) PF (FN +OTHERARGS IFILES OUT FILE) LISTRECORDEFS (CROPS TL) CL:FIND-SYMBOL (NAME PACKAGE) NUTF8STRINGBYTES (C +I) CHANGETRAN1 (ARGS VAR1 FORM TEM ELT EXP) TEDITWINDOWP (WINDOW) MakeMenuOfPrinters (P) CL:FIND (END) + TB.COLLECT.ITEMS (PREDFN ITEM) FINDFNDEF (FULL MAP GROUP VALUE) TRAPLOOP (PT.LESSP PLIST PATH KNOTS +LEN CLIST IPATH JPATH XPATH KPATH TEMP K J I) CL:SYMBOL-FUNCTION (CL::DEF) \NSRANDOM.WRITEPAGES (BUF P + SESSION BYTESTOSTORE LASTPAGE BYTES-TIL-EOF CURRENTEOF ERROR ATTRS) \BASEBYTES.BLOCKIO (SBASE CO EO +OFFST N BASE) SCROLL.HANDLER (SCROLLREG SCROLLW DIRECTION SCROLLCURSOR LEFTCURSOR RIGHTCURSOR +MIDDLECURSOR TIMEIN CONTINUOUSSCROLL? BUTTON TIMEDOWN) ELT (N0 BASE) UNDOLISPX3 (TEM L MARKER L1 L2) +\SFROTATECSINFOOFFSETS (NEWOFFSETS CHARCODE) PROCESSPROP (P OLDVALUE OLDDATA NEWVALUE TAIL) PRINTFNDEF + (TEM DSTFIL SRCFIL) \FONTRESETCHARWIDTHS (dummycharoffset dummycharwidth left right charcode) +ROTATE-BITMAP (I) \NSRANDOM.TRUNCATEFILE (CURRENTEOF NEWEOF SESSION ERROR ATTRS) NORMLOOP (LOOP LAST +Y1 Y2 PREVSGN HEAD ANTISGN) FM.CHANGESTATE (NEWSTATE GROUPID ITEMID X) GRAPHOBJ.DISPLAYFN (BOX REG) +SEDIT::BUILD-NODE (SEDIT::SUBNODES SEDIT::TAIL) SEDIT::CFV-DOTLIST (SEDIT::PAREN-WIDTH SEDIT::SUBNODE +MAX) DBG::STACK-FRAME-STOREFN (DBG::FN) CLEARSTK (FX LST I PTR) \BASEBYTES.SETFILEPTR (I') +CHAT.CHOOSE.PHONE.NUMBER (NUMBER NEWNUMBER CHAR) ROTATE-BITMAP-LEFT (I) \NSRANDOM.SESSION.WATCHER ( +SESSION S WRITING? TIMEOUT BASICTIMER CONTINUANCE) \BASEBYTES.READP (%#LEFT) ASKUSER1 (ENTRY TEM) +HVFWDREAD (CH VAL) \SFMAKECOLOR (BACKCOLOR FORECOLOR BITSPERPIXEL CHARACTERBITMAP COLORCSINFO) +ICMLARRAY.VALUECOMMANDFN (INDEX SLICE DISPLAYWINDOW ROW COLUMN SLICERANK) /SETTERMTABLE (TTBL) +CH.GETAUTHENTICATOR (INFO) \BASEBYTES.BOUT (CO) STRIKECSINFO (WIDTHS IMWIDTHS OFFSETS OLDBM +DUMMYOFFSET BMHEIGHT BMWIDTH I NEWOFFSETS NEWBM NEWOFFSET OLDOFFSET NEWWIDTH) %#BITSON (NBITS MASK I) +CH.FINDSERVER (DOMAINPATTERN ORGANIZATION.INFO DOMAIN.INFO) INITIALEVALQT (FL RL L) +\TEDIT.PRESS.HARDCOPY (FILE) FB.PROMPTWPRINT (THING ITEM) ASKUSER$ (ENTRY KEY0 NC0 I TEM) +WRITESTRIKEFONTFILE (MAXCODE DUMMYINDEX CHARSET CSINFO WIDTHS OFFSETS IMWIDTHS DUMMYOFFSET FIRSTCHAR I + LASTCHAR DUMMYCHAR STREAM MAXWIDTH RASTERWIDTH LENGTH CODE OFFSET WIDTH) DBG::STACK-FRAME-FETCHFN ( +DBG::FN) INTERPRET.REM.CM (FILE COM I) BRECOMPILE2 (N) UNICODE.UNMAPPED (INVERSE NEXTCODE) +UTF8.OUTCHARFN (C) LIST (L J) COMPILER::CLOSURE-ANNOTATE-CALL (COMPILER::ARG) \SETUPSTACK1 (ARGSLENGTH + SP ARGS STKP) TTMAKECOMPLEXCHAR (WIDTH NC) SIMPLEPRINT (I N X) \MEDW.GETBOXSCREENPOSITION (ORGX +BOXWIDTH ORGY BOXHEIGHT SHADE MOUSEDOWNFLG) FASL::DO-OP (FASL::VAL) GRAPHOBJ.PUTFN (GRAPH) CL:REMOVE ( +END) PRESSFILEP (FILE) SEDIT::MUTATE (SEDIT::MUTATOR-STRING SEDIT::MUTATOR) MULTIFILEINDEX (FILES F) +\PFCreateVols (vol volNum) \RESETSTACK0 (TMP I BASE) \MAKEBASEBYTESTREAM (LEN ACCESS OSTREAM) +SUBRNUMBER (NUMBER) COMPERRM (FL) \MBS.OUTCHARFN (STREAM) SLICEREF (OFFSET I) \BASEBYTES.TRUNCATEFN ( +I') \TEDIT.GET.CHARLOOKS1 (NAME SIZE SUPER SUB PROPS) OPENSTRINGSTREAM (FATP STREAM) +\BUILDATWSTRUCTURE (WHEREAT ATWIN EDGEBUCKET ATWINFO WHEREONEDGE PLACEHOLDERATW) +\PFInitFileDescriptors (volNum) MAKELISPXMACROSCOMS (TEM TEM2) TTYINEDIT (PRINTFN \PROMPT1) +INITBITMASKS (MASK I) SEDIT::MARKASCHANGEDFN (SEDIT::CONTEXT) SCANFILE1 (LST X FNAME TEM Y DEFUNFLG +DICTTAIL) \UPCASEBASE (I) /SETREADTABLE (RDTBL) \CLEARCELLS (BASE NCELLS) EVALQT (LISPXID) +COURIER.CALL (PGMDEF PROCDEF NARGS ARGTYPES NOERRORFLG ARGLIST I) RECORDECL1 (DECL FIELDINF TYPECHECK +CREATEINFO CNT X CL TEM1 NAME TAIL CREATETYPE DEFL FIELDNAMES TRANSLATION) STRING.EQUAL (LEN BASEX +OFFSETX FATPX X BASEY OFFSETY FATPY Y CABASE I C1 C2 BNX BNY) UNDONLSETQ1 (TEM LST1) BRHC/LAYOUT (H/2 +X/SW YCENTER) GetImageFile (FILE FILETYPEMENU PRINTFILETYPE) FM.GETITEM (ITEM) \CAUSEINTERRUPT (NXT +FRAME) \TEXTMENU.START (WW MENUW WREG MENUTEXT) CRITSECT (IX1 TX1) TEDIT.HCPYFILE (FILENM TEXTOBJ +TXTFILE) SCANFILE0 (FNADRLST DICT0 NXT1 NXT2 NXT) FM.HIGHLIGHTITEM (ITEM GROUPID ITEMID) +\COURIER.OUTPUT.ABORTED (CONTINUATION RESULT FILENAME) LAST (XX X) TB.NTH.ITEM (TAIL TAILN) +RECORDECLTAIL (TL) HVREADEND (CHAR) CH.LOOKUP.OBJECT (OBJECTPATTERN) CREATEPAGES (I) TTUNREADBUF (X) +\InitCurveBrushes (BARRAY CREATIONMETHOD SIZE) TEDIT.RAW.INCLUDE (INFILE WASOPEN HOLDSTART HOLDLEN +START END TEXTLEN PCTB INSERTCH# INSPC INSPC# PCLST LEN) /RAISE (FLG) INTERRUPTED (MP) +PFI.SETUP.TRANSLATIONS (FONT PAIR) \TEDIT.CUMULATE.EVENTS (CHCOUNT PC) XCL:COMPILE-FORM (COMPILER::VALUE +) \TEDIT.RESHAPEFN (WHEIGHT LINES LINE FIRSTCH#) DEFAULTSUBITEMFN (ITEM) MAKE-UNICODE-FORMATS ( +EXTERNALEOL) \ZEROWORDS (BASE) /PUT+1 (X) COMP.CALL (N A) GETBOXSCREENREGION (SCREENPOS) +FASL:OPCODE-SEQUENCE (FASL::ENTRY) DSPDESTINATION (DD DISPLAYSTREAM) IRM.CREF.BUTTONEVENTFN (N) +\GATHER-CLEANUP-FORMS1 (NT IVAR B BINDINGS FOUND-UNWIND R FRAME) DO.EDIT.COMMAND (EDITARG EDITMINUS +CHAR X LASTSKIP L) \MEDW.GETSCREENPOSITION (WINDOW) UPDATEPCNODES (PC UPWARD I ITEM) \DISABLEGC1 ( +TYPEBASE) \GATHER-SPECIAL-BINDINGS (NAME CODE TMP BINDINGS OFFSET) RECORDECLBLOCK (SPEC FNAME DEFAULTS + Z I TMP RPT FIELDNAMES SPECS FI X Y) RECORDERROR (MESSAGE AT IN TEM) \GC.MODIFY.BIGREFCNT (PTR TMP +OVENTRY) \MAKE.PROCESS0 (*STANDARD-OUTPUT* \TERM.OFD *STANDARD-INPUT* \INTERRUPTABLE TMP RESULT +%#FORM#) CHECKSAMEDIR (FILE OKHOST/DIRS HOST/DIR OLDFILE NEWV) TMPSUBFN (NX C I N) CHAT.TYPESCRIPT1 ( +FILE) COMPILER::CLOSURE-ANNOTATE-BLOCK (COMPILER::NON-LOCALS COMPILER::OUTER-NEED-STORAGE) FILLNGON.IP + (NPOINTS BASEANGLE ANGLE X Y I) COMP.ARG (A) BITBLT (DESTINATIONLEFT DESTINATIONBOTTOM SOURCELEFT SOURCEBOTTOM SOURCEBM CLIPPEDSOURCELEFT CLIPPEDSOURCEBOTTOM WIDTH HEIGHT SOURCEDD TEXTURE SOFTCURSORUP - DISPINTERRUPT STREAM SCRATCHBM) FILECODEBLOCK (PREFIXLEN) OPENSTRINGSTREAM (FATP STREAM) -DSPDESTINATION (DD DISPLAYSTREAM) CLOSENSOCKET (NSOC) \\BASEBYTES.TRUNCATEFN (I\') UPDATEPCNODES (PC -UPWARD I ITEM) CHAT.SCREENPARAMS (TITLEMIDDLE EMACSMODE) INITIALEVALQT (FL RL L) EVALQT (LISPXID) -\\BITBLT.BITMAP (|top| DESTINATIONNBITS |left| |bottom| SOURCENBITS |right| |stodx| |stody| TEXTURE -HEIGHT WIDTH DTY DLX STY SLX DBOT DLFT) INTERRUPTED (MP) \\LEAF.STREAM.IN.QUEUE (FIRSTTIME PUP X -DEFAULT) TOPW.ADJUSTSELECTION (SELBOTTOM SELWIDTH XCL:*PROFILE* SELLEFT COLPROP HMARK) -CHAT.CHOOSE.PHONE.NUMBER (NUMBER NEWNUMBER CHAR) MAXMENUITEMHEIGHT (FONTHEIGHT ANSWER LABEL) -BIT.IN.COLUMN (X) \\GET-COMPILED-CODE-BASE (X) BREAKCONNECTION (DEV BREAKFN DEVICE HOST) INITBITMASKS -(MASK I) \\TEDIT.FIND (W SEL CH) \\GATHER-CLEANUP-FORMS1 (NT IVAR B BINDINGS FOUND-UNWIND R FRAME) -MSFINDP (STRUC) \\SEARCHOPENFILES (STREAM) MOVEATTACHEDWINDOWTOPLACE (EDGE POSONEDGE ATMINHEIGHT -ATMINWIDTH MAINWEXTENT TL TC TR RT RC RB BR BC BL LB LC LT ATW ATWREG ATWHGHT ATWDTH ATPOSONEDGE -ATWHERE EXTENT) \\GATHER-SPECIAL-BINDINGS (NAME CODE TMP BINDINGS OFFSET) \\ATMIN (I) ADDTOCOM1 (COM -NEAR) \\MAKE.PROCESS0 (*STANDARD-OUTPUT* \\TERM.OFD *STANDARD-INPUT* \\INTERRUPTABLE TMP RESULT -\#FORM#) FILES?1 (STR LST) \\TEDIT.PUT.PARALOOKS.LIST2 (LOOKS I) GRID (TOTALHEIGHT TWICEBORDER X -LINELENGTH Y TEMPBM GRIDBM MAXIMUMCOLOR) SI::BQUOTE-CONS (SI::CONSTA SI::CONSTD) \\MKATOM (I HASH -FIRSTBYTE FIRSTCHAR HASHENT CHAR# PNBASE ATM# B1 B2 REPROBE) SCANFILE1 (LST X FNAME TEM Y DEFUNFLG -DICTTAIL) NIL -SMASHFREE \\INTERPRETER (|\\InterfacePage|) OPT.LBDEL (CL:LABELS) XCL:UNBREAK-FUNCTION (BROKENFNS -XCL::*TRACED-FNS*) \\RESETLINE (\\LINEBUF.OFD) TEDIT.NEW.FONT (TEDIT.KNOWN.FONTS) \\WRITEDISKPAGES ( -|\\InterfacePage|) \\MKATOM.FULL (\\INTERRUPTSTATE) \\SETUP-ENVIRONMENT-CALL (|\\InterfacePage|) -\\DOVE.FAULTINIT (\\RCLKSECOND) TTDELETELINE (\\ARROW) SCANEXP (FILECREATEDLST) \\SELECTREALPAGE ( -\\RPTLAST) \\CHAIN.UP.RPT (\\REALPAGETABLE) WINDOW.MOUSE.HANDLER (|\\LastCursorPosition|) \\DOFLUSHVM -(|\\InterfacePage|) EDIT4F1 (FF) TTY.PROCESS (\\CURRENTKEYACTION) \\CH.UPDATE.CACHE (\\CH.CACHE) -DELETE.TO.END (\\ARROW) |\\VFMSplit1| (|\\VFMhigh| |\\VFMxtraBuffer| |\\VFMbuffer|) \\RETCALL ( -|\\InterfacePage|) \\DL.ASSIGNBUFFERS (|\\InterfacePage|) \\CHECKFORSTORAGEFULL (\\INTERRUPTSTATE) -\\TEMPLOCKPAGES (|\\InterfacePage|) COMPAREFAIL (DIFFERENCES) \\FM.EDIT-DELETE (EDITITEM) -\\DEFINEDISPLAYINFO (\\DISPLAYINFOALIST) FIXATOM (TAIL) TEDIT.GET (TEDIT.SELECTION -TEDIT.SHIFTEDSELECTION) BREAK-FUNCTION (XCL::*UNBROKEN-FNS*) TTYIN.FINISH (\\TTYINSTATE) -\\EXTENDISFMAP (\\ISFMAP) BKSYSCHARCODE (\\SYSBUFFER) \\TEXTMENU.TOGGLE.WHENOPERATEDFN ( -TEDIT.SELECTION) RESET.INTERRUPTS (\\CURRENTKEYACTION) PFI.HANDLE.RPAQQ (*PFI-FILEVARS*) -\\GETREGION.PACKPTS (BASEPT OPPT) MASTERSCOPEXEC (LISPXHIST) CLISPATOM2D (CLISPLASTSUB) HPRINTEND ( -BACKREFS) COMP.COMPARENUM (CODE) \\FTP.WHENCLOSED (\\FTPCONNECTIONS) TTYIN1 (\\LINEBUF.OFD \\ARROW) -\\INITSPP (\\SPPDEVICE) CLEARFILEPKG (SYSFILES) DISPLAYAFTERENTRY (|CursorBitMap|) SCANDEFINEQ ( -FNADRLST DICT FNLST) |\\VFMReadNext| (|\\VFMhigh|) SYSOUT (\\MISCSTATS) CL:MAKE-ECHO-STREAM ( -%ECHO-STREAM-DEVICE) TTYIN1RESTART (\\ARROW) DEFEVAL (\\DEFEVALFNS) \\DORETCALL (|\\InterfacePage|) -RESTOREBUF (\\ENDBUFFER \\TTYINSTATE) \\DOSTACKFULLINTERRUPT (\\INTERRUPTSTATE) EDITBF1 (FF) -FILECREATED (FILECREATEDLST) CLOSEPUPSOCKET (\\PUPSOCKETS) RAND (RANDSTATE) SCANCOMPILEDFN (DICT FNLST -) DWMFY2 (TAIL) SETUPSTACK (|\\InterfacePage|) \\GETMAPBUFFER (MAPEMPTYBUFFERLIST) PRINTDEF1 ( -NEWFILEMAP) \\GCMAPSCAN (\\HTCOLL) BROWSE/LAYOUT/HORIZ/COMPACTLY (NODELST) \\FM.EDIT-WORDDELETE ( -EDITITEM) \\GCMAPUNSCAN (\\HTCOLL) XCL:UNADVISE-FUNCTION (ADVISEDFNS) BLOCK\: (BLOCKS) EMBEDPROG ( -BINDINGS) TTYIN.SETUP (\\TTYINSTATE) FILL.INCY (FBBT) \\FREELISTCELL (\\LISTPDTD) \\INITBFS ( -\\SWAPREQUESTBLOCK) |\\VFMFind| (|\\VFMhigh|) OPT.DELTAGREF (CL:LABELS) COMPILER::FRAME-ANNOTATE-CATCH - (COMPILER::*REFERENCES*) CL:MAKE-SYNONYM-STREAM (%SYNONYM-STREAM-DEVICE) SCRATCHCONS (\\TTYINSTATE -\\ENDBUFFER) \\KEYBOARDINIT (\\SYSBUFFER \\KEYBOARDEVENTQUEUE) CL:MAKE-TWO-WAY-STREAM ( -%TWO-WAY-STREAM-DEVICE) PACKAGE-ENABLE (*OLD-INTERLISP-READ-ENVIRONMENT*) \\TEDIT.COMMAND.LOOP ( -TEDIT.SHIFTEDSELECTION TEDIT.COPYLOOKSSELECTION TEDIT.MOVESELECTION TEDIT.DELETESELECTION) -DUMPINITPAGES (|\\InterfacePage|) COMPILER::FRAME-ANNOTATE-TAGBODY (COMPILER::*REFERENCES*) CHAT.CLOSE - (CHATWINDOWLST) PFI.HANDLE.* (*PFI-PENDING-COMMENTS*) \\DOSTORAGEFULLINTERRUPT (\\INTERRUPTSTATE) -COMPILE-FILE-SCAN-FIRST (FIRSTFORMS) \\DECPARENCOUNT (\\LINEBUF.OFD) \\GETSYSBUF (\\SYSBUFFER) -TTYIN.SHOW.?ALTERNATIVES (\\ENDBUFFER) \\CLEARSYSBUF (\\SYSBUFFER) FORWARD.DELETE.TO (\\ARROW) -CHANGEBACKGROUNDBORDER (\\IOPAGE) \\DECODETRANSITION (\\INTERRUPTSTATE) SI::FINISH-UNBREAKING ( -BROKENFNS XCL::*TRACED-FNS*) I.S.OPR (CLISPFORWORDSPLST) HASHBEFORECLOSE (SYSHASHFILELST) -\\DEFINEDEVICE (\\DEVICENAMETODEVICE \\FILEDEVICENAMES \\FILEDEVICES) \\MEDW.DSPCREATE (IMAGEDATA) -\\DOVMEMFULLINTERRUPT (\\INTERRUPTSTATE) \\ADVANCE.STORAGE.STATE (|\\InterfacePage| \\SYSTEMCACHEVARS) - XCL:TRACE-FUNCTION (XCL::*UNBROKEN-FNS*) \\NSPRINT.WATCHDOG (*PRINT-JOBS-IN-PROGRESS*) PAINTW ( -PAINTCOMMANDBRUSH) BCOMPL2 (DEFS) BCOMPL1A (FIRST OTHERS) \\KEYHANDLER1 (\\KEYBOARDEVENTQUEUE) -\\FILLBUFFER (\\LINEBUF.OFD) LISPX (ARCHIVELST) \\FM.EDIT-INSERT (EDITITEM) BRECOMPILE1 (ADRLST) -\\PUTSYSBUF (\\SYSBUFFER) \\CURSORPOSITION (\\IOPAGE) MSCHECKBLOCKBASIC (BLKFNS) \\DISABLEGC1 ( -\\INTERRUPTSTATE) \\PUNT.BLTSHADE.BITMAP (\\SYSPILOTBBT) \\PEEKREFILL (\\LINEBUF.OFD) WTFIX1 (FAULTX) -\\BLTSHADE.DISPLAY (\\SYSPILOTBBT) \\BITBLT.BITMAP.SLOW (\\SYSPILOTBBT) \\NSFILING.DISCARD.SESSION ( -\\NSFILING.ACTIVE.SESSIONS) BREAKLINE (\\ARROW) \\ALLOCVIRTUALPAGEBLOCK (|\\InterfacePage|) -\\MAIKO.ASSIGNBUFFERS (|\\InterfacePage|) \\BITBLT.DISPLAY (\\SYSPILOTBBT) \\PUNT.BITBLT.BITMAP ( -\\SYSPILOTBBT) PAINTW.CACHE.SHADE (PAINTW.SHADES) PACKAGE-DISABLE (*OLD-INTERLISP-READ-ENVIRONMENT*) -KILLSEGMENT (\\TTYINSTATE \\ENDBUFFER) \\STARTDISPLAY (\\MAINSCREEN) BREAKDOWN (BRKDWNLST) VIDEOCOLOR -(\\IOPAGE) SKIP/ZAP (\\TTYINSTATE) \\HTFIND (\\HTCOLL) \\M-VMEMSAVE (|\\InterfacePage|) DO.EDIT.PP ( -\\ARROW) HVFWDREAD (BACKREFS) NEW/FN (/FNS LISPXFNS) \\DOCOMPRESSVMEM (|\\InterfacePage|) -%SYNONYM-STREAM-DEVICE-CLOSEFILE (%SYNONYM-STREAM-DEVICE) COMP.LOOKUPCONST (CONSTS) \\ETHEREVENTFN ( -\\LOCALNDBS) \\NEWEPHEMERALPAGE (|\\InterfacePage|) \\REMOVEDEVICE (\\FILEDEVICENAMES -\\DEVICENAMETODEVICE \\FILEDEVICES) SCANFILE0 (DICT) \\HANDLE.RAW.XIP (\\MY.NSADDRESS) CLISPFORINITVAR - (INITVARS) MSDOES (LASTPARSED) \\REMOVEDEVICE.NAMES (\\DEVICENAMETODEVICE \\FILEDEVICENAMES) -SCANFILE2 (FNLST) ADDCHAR (\\CURSOR \\ARROW) \\ENVCALL.UFN (|\\InterfacePage|) \\DOGCDISABLEDINTERRUPT - (\\INTERRUPTSTATE) |\\VFMPutNext| (|\\VFMlow|) \\LOAD-STREAM (SYSFILES) \\FM.EDIT-BACKUP (EDITITEM) -\\RESETSTACK0 (|\\InterfacePage|) \\CANONICALIZE.NSADDRESS (\\NSADDRESS.CACHE) |\\CreateScreenBitMap| -(|ScreenBitMap|) \\RESETKEYBOARD (\\KEYBOARDEVENTQUEUE \\SYSBUFFER) CLISPATOM1 (CURRTAIL) -WHO-LINE-CURRENT-DIRECTORY (*WHO-LINE-LAST-DIRECTORY* *WHO-LINE-DIRECTORIES*) SETMAINTPANEL (\\IOPAGE) - \\CARET.DOWN (\\CARET.UP) SPLITKEY (HASHSCRATCHCONSCELL) |\\PFTransferPage| (|\\InterfacePage|) -SI::FINISH-UNADVISING (ADVISEDFNS) \\RESETTERMINAL (\\LINEBUF.OFD) ERASEPROPS (SMASHPROPSLST1) -EDITDEFAULT (EDITHISTORY) \\PROCESS.MAKEFRAME (|\\InterfacePage|) \\FAULTINIT (|\\InterfacePage|) -|\\VFMInsert1| (|\\VFMbuffer|) \\FLUSHPAGE (|\\InterfacePage|) COMP.EXPR (FRAME) PROCESSWORLD ( -\#SCHEDULER#) \\TRACKCURSOR (\\IOPAGE) PRETTYDEF1 (PRETTYCOMSLST) \\DL.NEWFAULTINIT (\\IOPAGE) -\\RELEASE.PROCESS (\\PROCESSES) DO.EDIT.COMMAND (USERWORDS) \\SET.VMEM.FULL.STATE (\\INTERRUPTSTATE) -COMP.CALL (FRAME) PRINSHUT (MAKEMAP) DELETETO (\\ARROW) \\TELERAIDBREAK (|\\InterfacePage|) -\\SETUP-COMPILED-CLOSURE-CALL (|\\InterfacePage|) \\DOSTACKOVERFLOW (|\\InterfacePage|) HISTORYSAVE ( -ARCHIVELST) COMP.APPLY* (FRAME) TEDIT.FORMATPAGE (*TEDIT-PAGE-BREAKS*) DODIRCOMMANDS (VALUE) -|\\VFMMerge1| (|\\VFMxtraBuffer| |\\VFMbuffer| |rightInterval|) \\DOBUFFEREDTRANSITIONS ( -\\LASTKEYSTATE \\KEYBOARDEVENTQUEUE \\SHIFTSTATE) \\VANILLAHOSTNAMEP (\\PSEUDODSK) -\\MAKE.COURIER.REP.STREAM (\\COURIER.REP.DEVICE) SI::FINISH-ADVISING (SI::*UNADVISED-FNS* ADVISEDFNS) -\\SETUPUSERSTACK (|\\InterfacePage|) \\SPP.CLEANUP (\\SPPDEVICE) \\MAIKO.CONSOLE-LOG-PRINT ( -\\INTERRUPTSTATE) \\TEDIT.LOOKS.UPDATE (LINE) \\HARDCURSORPOSITION (\\IOPAGE) CLOSENSOCKET (\\NSOCKETS -) \\DELETEOFD (\\OPENFILES) \\MAIKO.IO-INTERRUPT (\\INTERRUPTSTATE) \\DL.FAULTINIT (\\IOPAGE -|\\InterfacePage|) \\SOFTCURSORUPCURRENT (\\SOFTCURSORBBT1 \\SOFTCURSORBBT5 \\SOFTCURSORBBT6) -\\ADD.PACKET.FILTER (\\PACKET.FILTERS) PRINTFNS (NEWFILEMAP) |\\VFMDelete1| (|\\VFMbuffer|) -\\REMOVE.EXTERNALFORMAT (*SUPPORTED-EXTERNALFORMATS* *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT*) -\\BITBLT.BITMAP (\\SYSPILOTBBT) \\SOFTCURSORUP (\\SOFTCURSORBBT1 \\SOFTCURSORBBT2 \\SOFTCURSORBBT3 -\\SOFTCURSORBBT4 \\SOFTCURSORBBT5 \\SOFTCURSORBBT6) INTERRUPTED (\\INTERRUPTSTATE) BEEPOFF (\\IOPAGE) -|\\VFMDelete2| (|\\VFMhigh| |\\VFMbuffer|) \\NEXTCONSPAGE (\\LISTPDTD) MB.THREESTATE.WHENOPERATEDFN ( -TEDIT.SELECTION) \\MAIKO.ETHER-INTERRUPT (\\INTERRUPTSTATE) \\EXTENDSTACK (\\INTERRUPTSTATE -|\\InterfacePage|) COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::*REFERENCES*) BEEPON (\\IOPAGE) -\\RTP.CLEANUP (\\BSPSOCKETS) \\CURSORDESTINATION (\\IOPAGE \\SOFTCURSORBBT1 \\SOFTCURSORBBT5 -\\SOFTCURSORBBT6) EDITCOMA (EDITHIST) SHRKFY (RESULTP) \\FLUSHVM (|\\InterfacePage|) \\BLTSHADE.BITMAP - (\\SYSPILOTBBT) RETDWIM (HISTENTRY TAIL) EDITCOML (EDITCOMSA EDITCOMSL) \\DOMISCAPPLY1 ( -|\\InterfacePage|) \\ACTONDISKPAGES (|\\InterfacePage|) \\GETREGIONTRACKWITHBOX (BASEPT) -\\D01.FAULTINIT (\\RCLKSECOND |\\InterfacePage|) MSPATHS1 (NAMED) GETDUMMYVAR (DUMMYVARS) PFI.ENQUEUE -(\\PFI.PROCESS.COMMANDS) INITGC (\\HTCOLL) DWIM-SYMBOL-PACKAGE (FAULTX) \\MAKE.PROCESS0 ( -|\\InterfacePage|) PFI.SETUP.TRANSLATIONS (*STANDARD-OUTPUT*) \\CLOSELINE (\\LINEBUF.OFD) -\\CH.FIND.ORG.SERVER (\\CH.CACHE) \\PROCESS.MOVEFRAME (|\\InterfacePage|) \\DEL.PACKET.FILTER ( -\\PACKET.FILTERS) COMPILER::FRAME-ANNOTATE-LAMBDA (COMPILER::*REFERENCES*) MAKEINITBFS (\\MAINDISK) -SUPERPRINT/WRAPPER (MAKEMAP) \\INCPARENCOUNT (\\LINEBUF.OFD) DEFPRINT (\\DEFPRINTFNS) SEDIT:RESET-COMMANDS - (SEDIT::LISP-EDIT-ENVIRONMENT) \\SETDAYTIME0 (\\IOPAGE) WHO-LINE-VMEM (*WHO-LINE-LAST-VMEM*) NIL -SMASH MSJOINSET (SET1) TEDIT.SELECT (SEL) \\MAKE.EXPEDITED.STREAM (STREAM) SEDIT::SET-SELECTION ( -SEDIT::SELECTION) PUP.ECHOSERVER (PUP) RESET/NODE/BORDER (NODE) \\HARDRESET-CLEANUP (PROCESS OLDVAL -VARTAIL) SEDIT::CREATE-QUOTED-GAP (SEDIT::GAP-NODE SEDIT::QUOTE-NODE) \\HARDRESET-CLEANUP1 (NT CALLER -INFO SLOT) SEDIT::PRETTY-PRINT (SEDIT::CONTEXT) DOERROR (L AT) FB.THINCOMMAND (FILES) NS.ECHOUSER ( -OXIP) SWAPXIPADDRESSES (XIP) DELETEMENU (OTHERMENUS MENU) TEDIT.SUBPARALOOKS (PC) SPY.DUMP.BUFFER ( -TREE) \\OUTCHARFN.PRESS (PRSTREAM PRDATA) \\LEAF.SETFILETYPE (DATA) \\DSPROTATE.PSC (IMAGEDATA) CSUBST - (VAL) COMP.DECLARE (V) CHAT.TYPESCRIPT1 (CHAT.STATE) \\TEXTSTREAMBOUT (SEL TEXTOBJ STREAM) -CHARLOOKS.FROM.FONT (LOOKS) \\GC.MODIFY.BIGREFCNT (OVENTRY ENTRY) |\\VAMFindFreePages| (|groupPtr|) -\\NSRANDOM.UPDATE.VALIDATION (STREAM) \\COURIER.REP.BIN (STREAM) \\TEDIT.GET.SINGLE.PARALOOKS2 (LOOKS -TABSPEC) COURIER.BROADCAST.CALL (TAIL NEARBYNETS) \\SWITCHFONTS.PSC (POSTSCRIPTDATA) -TEDIT.SET.SEL.LOOKS (SEL) \\COURIER.BROADCAST.ON.NET (XIP) TTYINBUFFERSTREAM (STRM) -\\GC.ENTER.BIGREFCNT (OVENTRY ENTRY) \\HCPYMODEBLTCHAR (DISPLAYDATA LOCAL1) ALLOCSTRING (OLD STRING) -ADJUSTLINE (OLDENDLINE LINE NEXTLINE BREAK) SEDIT::OPEN-LITATOM (SEDIT::CONTEXT SEDIT::STRING-ITEM -SEDIT::OPEN-STRING SEDIT::SUB-STRING STRING) UPDATE/MENU/IMAGE (MNU ITEMREGION WINDOW) -\\LEAF.TIMEDOUT.EXCESSIVE (SEQUIN ENTRY) \\NSGATELISTENER (XIP BASE) \\FM.TOGGLE-SETUP (ITEM) \\VECPUT - (PRDATA) PFI.SORT.INDICES (RESULT INDICES) BREAK.MSG.INTO.LINES (STRLST) \\SENDLEAF (PUP RESULT) -SUBSTRING (OLDPTR STRING) \\HDCPYDISPLAY.FIX.XPOS (DD) \\DISABLEGC1 (TYPEBASE) \\SLOWHCPYMODEBLTCHAR ( -DD PILOTBBT) RAND (I) \\TELERAIDGET (PACKET) SEDIT::INSERT-MULTI-ESCAPE (SEDIT::POINT) -\\COURIER.REP.BOUT (STREAM TAIL) \\GCMAPSCAN (PREV ENTRY LINK) \\GCMAPUNSCAN (PREV ENTRY LNK) -OPT.FRAMEVAR (V CD FR) \\DSPRIGHTMARGIN.IP (IPDATA) \\FREELISTCELL (X BASE) \\PUTFIXP (PTR) -\\INSERT.FIRST.PIECE (TEXTOBJ PC) \\IMAGEUSERPROP (IMAGEOBJ) SETY.IP (IPDATA) NEAREST/PT/ON/GRID (PT) -\\FTP.HANDLE.NO (BADPLIST) OPENBSPSTREAM (SOCKET INSTREAM OUTSTREAM) \\BULK.DATA.CLOSE (CON STREAM -STRM COURIERSTREAM) \\TEDIT.FORMAT.FOOTNOTE (LINE LINES) FILEPKGTYPE (TEM2 TYPE) \\TEDIT.COMMAND.LOOP -(TEXTOBJ ISCRSTRING STRING) \\TEDIT.CONVERT.TO.FORMATTED (PC TEXTOBJ) REFLECT/GRAPH/DIAGONALLY (GRAPH -N) \\DSPTRANSLATE.PSC (IMAGEDATA) SEDIT::SET-DEPTH (SEDIT::NODE) SEDIT::OUTPUT-CR (SEDIT::CURRENT-NODE - SEDIT::THIS-LINE SEDIT::CONTEXT SEDIT::LAST-LINE CL:BLOCK) OPT.FRAMEDEL (CD PARENT) -\\FM.MOMENTARY-SETUP (ITEM) \\XIPERROR (XIP) LISPXUSE (VARS ARGS LST) \\STARTPAGE.PRESS (PRDATA) -BCOMPL2 (LST) TEDIT.GET.OBJECT (PIECE) TEDIT.HARDCOPY-COLUMN-END (ORIGINAL-LINES LINES LINE) -\\NSRANDOM.WROTE.HANDLE (HANDLE) TEDIT.DEFAULT.MENUFN (TEXTOBJ SEL) \\LEAF.CLOSEFILE (STREAM -CONNECTION DATA) \\PUTSWAPPEDFIXP (PTR) \\TFBRAVO.GETPARAMS (WORDL) \\FIXILINES (LINE TEXTOBJ) -TB.DELETE.ITEM (ITEM) MSSETSETTYPE (SET) TEDIT.EXTEND.SEL (NSEL) \\DSPSPACEFACTOR.IP (IPDATA) -SETYREL.IP (IPDATA) EDITBMBUTTONFN (EXTENT) \\GENERIC.CHARSET (STREAM) \\BSP.HANDLE.DATA (INQUEUE -PREVPUP PUP) LOADPOLY (POLY POLYPRIME) \\BUFFERED.BIN (STREAM) RIGHTW.ADJUSTSELECTION (SELECTION) -FIND-HISTORY-EVENTS (VAL) \\EDIT.UPCARET (CARET) |UnixShellQuote| (CT) REFLECT/GRAPH/HORIZONTALLY (N) -/PUT-1 (X0) \\TEDIT.REFRESH.SHOWSEL (OLDSEL) MOVD (TOCELL) \\DSPLINEFEED.IP (IPDATA) -SETF-SYMBOL-PACKAGE (OBJ) U/L-CASE (BUF) SETXYREL.IP (IPDATA) GETGRIDBOXREGION (NEWREGION) MAKECREATE1 - (TEM DECLST) \\PAGED.INCFILEPTR (STREAM) MAKEWITHINREGION (REGION) TEDIT.ADD.MENUITEM (OLDITM MENU) -ASKUSER (ANSWER PRINTLST BUFS) NSNETDAYTIME0 (OXIP) \\HANDLE.RAW.XIP (XIP NDB ENTRY) \\BUFFERED.BINS ( -STREAM) POSTSCRIPT.SET-FAKE-LANDSCAPE (C IMAGEDATA) SPY.SUM (TREE) \\IFS.LOOKUPFILE (DEVINFO) -\\BUFFERED.BOUT (STREAM) POSTSCRIPT.STARTPAGE (IMAGEDATA) DELDEF (NAME) SEDIT::OUTPUT-CONSTANT-STRING -(SEDIT::CONTEXT) \\BUFFERED.BOUTS (STREAM) \\CHANGECHARSET.DISPLAY (DISPLAYDATA PBT) \\BSP.HANDLE.ACK -(SOCKET OUTQUEUE INTERRUPTPUP OLDPUP) FIXSPELL (TAIL) |\\SFFixY| (DISPLAYDATA PBT) READ-AFM-FILE ( -PSCFONT) CLISPFOR0 (I.S. LASTPTR I.S.TYPE OPR I.S.PTRS RETPREDS TERM ITER TEM INITVARS DECLARELST X) -\\SLOWBLTCHAR (DD PILOTBBT) SEDIT::DOT-THIS-LIST (SEDIT::TAIL SEDIT::NODE) BSPGETMARK (STREAM) -TB.EXPANDFN (BROWSER) \\FLUSHNDBS (NDB) TTCOMPLETEWORD (BUF) MSKNOWN (SET) \\10MB.TURNONETHER (NDB CSB -) MB.DEFAULTBUTTON.ACTIONFN (MAINTEXT MAINSEL TEXTOBJ SEL) ADDSPELL2 (TEM) PSCFONT.READFONT (PF) -INITDATATYPENAMES (DTD) SEDIT::LINEARIZE (SEDIT::CONTEXT SEDIT::NODE SEDIT::SUPER-NODE) \\SPP.SYSPKT ( -CON BASE) SPY.MERGETREE (OLDCOPY) \\BSP.HANDLE.INTERRUPT (SOCKET) |\\LFRenameFile| (|stream|) -FIXEDITDATE (E) \\TEDIT.LOOKS.UPDATE (STREAM) \\MAKE.COURIER.REP.STREAM (STREAM) UPDATEFILES (TYPE -FILEPROP TYPEDPROP) \\SHOWSEL (SEL) |\\PFTransferFilePage| (|label|) \\FIXLINELENGTH.IP (IPSTREAM) -BOXCOUNT (DTD) SETX.IP (IPDATA) \\FILEOUTCHARFN (ST) \\TELERAIDSERVER (PACKET) SET/LABEL/SIZE (NODE) -PRINTERROR (ERR PR) ADDFILE0 (FILEPROP ROOTNAME) BRH/LAYOUT (GN) SUBHASH (OV) OPT.FRAMELOCAL (X) -SETXY.IP (IPDATA) \\GETREGION.CHECKOPPT (OPPT) \\LEAF.READFILEPROP (DATA) |\\LFTruncateFile| (STREAM) -SEDIT::REVIVE-NODE (SEDIT::NODE) COURIER.OPEN (STREAM) TEDITCHAT.MENUFN (STATE) TB.FLUSH.WINDOW ( -BROWSER) \\MAKEFLOAT (BOX) \\EDIT.DOWNCARET (CARET) REFLECT/GRAPH/VERTICALLY (N) -\\INIT.ETHER.BUFFER.POOL (ZONE) DINFO.UPDATE.GRAPH.DISPLAY (DINFO.GRAPH) TB.RENUMBER.TAIL (ITEM -BROWSER) PUTDEFN (DCELL) |\\VFMSaveBuffer| (BUF) \\DSPFONT.HDCPYDISPLAY (DD) \\PNC (STR STRING) -TERM.MOVETO (CHAT.STATE) \\ACTONDISKPAGES (REQUEST LASTNUMCHARSCONS) \\BSP.HANDLE.INTERRUPTREPLY ( -SOCKET) \\DSPPOPSTATE.PSC (IMAGEDATA) \\IDLERKEYACTION (TABLE) TEDIT.UNDO.DELETION (TEXTOBJ EVENT SEL) - MB.SELFN (SEL) \\TEDIT.HCPYLOOKS.UPDATE (STREAM) \\DOACTONDISKPAGES (DSK REQUEST CB) -OPENPOSTSCRIPTSTREAM (FP IMAGEDATA) SETSTKNAME (FRAME FNH) \\TEXTBIN (STREAM) \\WRITEOUTBUFFERS (BUF -STREAM BUFFER) PUTFILEMAP (NEWENTRY) DBG::COLLECT-ACTIVE-ESCAPES (DBG::ESCAPES) SHRINK-VECTOR (VECTOR) - \\INFINITY (BOX) SEDIT::REPLACE-ROOT (SEDIT::TOP-NODE SEDIT::POINT) \\CLEARMAP (STREAM PREVBUFFER) -\\COPYFNHEADER (NEWFNHD) TEDIT.REDO.INSERTION (EVENT TEXTOBJ FIRSTPIECE SEL) \\WRITEDISKPAGES (REQUEST -) ADDHASH (OV) TRAPMAKE (EDGELIST) SEDIT::MAP-COMMENT-INDEX (SEDIT::CONTEXT) ADDFILE (TYPE) -\\DOWRITEDISKPAGES (REQUEST DSK LAB CB) \\NSFILING.RELEASE.BULKSTREAM (CONNECTION STREAMS PAIR) -\\RELEASEBUFFER (BUFFER) TEDIT.HARDCOPY.PAGEHEADING (LINE) \\COPYHARRAYP (TARGET) -CL:SET-DISPATCH-MACRO-CHARACTER (DISP-TABLE) \\TEXTBOUT (STREAM) DINFO.UPDATE.MENU.DISPLAY (GRAPH) -\\FILLRTPPUP (PUP) TB.UPDATE.DISPLAY (EXTENT) \\SETXFORM.PSC (IMAGEDATA) RESUME (FROMPTR TOPTR) -\\TEDIT.MARKINACTIVE (TEXTOBJ) \\BSP.DECLARE.FILEPTR (STREAM) \\BSP.HANDLE.ERROR (BSPSOCKET) -D-ASSEM:INTERN-DCODE (D-ASSEM::RAW-CODE) \\SEQUIN.HANDLE.ACK (SEQUIN) UNDOSAVE (Y) PRINTCOPYRIGHT ( -OWNER) \\LEAF.SETVALIDATION (STREAM) \\GETMAPBUFFER (PREV BUF) \\ACTONVMEMPAGES (REQUEST) LISPXPUT (Y) - \\WRITEVMEMPAGES (REQUEST) \\NSFILING.ERRORHANDLER (CON STREAM) \\NSFILING.ADDQUOTES (NAMECHARS) -ADD-SYMBOL (VEC HASH) CLEARPUP (PUP) SETXREL.IP (IPDATA) MAKEFLOATNUMBER (VAL) CLEARFILEPKG (FILE) -SETSTKARGNAME (FRAME) \\TEDIT2 (TEXT) TEDIT.QUIT (STREAM) DINFO.UPDATE.TEXT.DISPLAY (GRAPH) READLINE ( -LINE) \\TEDIT.MARKACTIVE (TEXTOBJ) \\DSPCLIPPINGREGION.IP (IPDATA) CREATEMENUEDWINDOW (MENU -WHOLEREGION) \\BSP.TIMERFN (PUP SOCKET) FB.ANALYZE.PATTERN (BROWSER) CLISPATOMARE1 (TEM) -TEDIT.SKIP.SPECIALCOND (LINE) FIND.SYMBOL (A0347 A0349 A0351) DINFO.UPDATE (GRAPH) \\FM.CHANGELABEL ( -ITEM) TEDIT.UNDO.INSERTION (TEXTOBJ EVENT) PFI.PRINT.INDICES (INDICES) |\\VAMRecomputeFreePageCount| ( -|vol|) \\ENDVECRUN (PRDATA) SLICESET (LINEARIZEDARRAY) \\DODISKCOMMAND (SHORTCB LA CB DSK) \\SETEOF ( -STREAM) \\GETDISKCB (DSK) REOPENTEXTSTREAM (STREAM) \\LEAF.REPAIR.BROKEN.PUP (DATA PUP) GETSETQ (TL) -\\CLEANUPDISKQUEUE (SHORTCB DSK) CLRHASH (SLOT HA) CHECKBUFFERREFVAL (BUFF) SEDIT::REPLACE-NODE ( -SEDIT::SELECTION) COMP.STTAG (TAG) SEDIT::COPY-STRUCTURE-QUOTE (SEDIT::NODE) \\POLYSHADE.BLT ( -|fulllist| |currlist|) OPT.FRAMEMERGE (P FR) DMCHAT.HANDLE.WRAP (DM2500.STATE) \\MAPPAGE (BUF -PREVAVAIL PREV STREAM) FB.CHECK.NAME.LENGTH (BROWSER PREVTAIL) SEDIT::COPY-STRUCTURE-LIST (SEDIT::NODE -) \\NSRANDOM.HANDLE.ERROR (S) \\TEDIT.INTEGER.IMAGEBOX (OLDBOX) \\SEQUIN.FLUSH.RETRANSMIT (SEQUIN) -FB.SORT.VERSIONS (PREVTAIL) \\TEDIT.MOVE.PIECEMAPFN (PC) \\NSFILING.WHENCLOSED (SESSION STREAMPAIRS) -DINFO.UPDATE.HISTORY (GRAPH) TB.ITEM.UPDATABLE? (BROWSER) UNMARKASCHANGED (TAIL TYPEDPROP PROP) -\\GETREGION.CHECKBASEPT (BASEPT) SETUPFONTS.IP (IPDATA) BSP.PUTINTERRUPT (SOCKET) REMPROPLIST (LST1) -SEDIT::RELINEARIZE-WHERE-NECESSARY (SEDIT::NODES-TO-RELINEARIZE SEDIT::SUPER-NODE) COMP.STJUMP (TAG) -\\TFBRAVO.INSTALL.PAGEFORMAT (TEXTOBJ PAGEFRAMES) TERM.HOME (CHAT.STATE) SET-FILL-POINTER (VECTOR) -\\QUEUE.INPUT.IOCB (IOCB CSB) PFI.CONDENSE.INDEX (OLDNAME INDEX TYPEPAIR) PARSE-NAMESTRING1 (VAL) -UNMAKEHARDCOPYSTREAM (DS) \\FILLINSPP (EPKT BASE) SPY.MERGE (VAL) |\\VFMDeletePageGroup| (|groupPtr| -|key|) \\APPEND2 (TAIL) PFI.PRINT.MULTI.INDEX (TEM MASTERENTRY TYPEPAIR) \\HDCPYDSPPRINTCHAR (STREAM) -CL:VECTOR-PUSH-EXTEND (VECTOR) FILES.PUTDEF (NAME) \\ADDLEAFSTRING (PUPBASE) |\\LFSetFileInfo| ( -|infoPage|) LINELENGTH (STREAM) SEDIT::RECOMPUTE-WIDTH (SEDIT::NODE) HARRAYPROP (HARRAY HA) -\\HASHACCESS (SLOT) CHAT.SWITCH.EMACS (CHATSTATE) DMCHAT.ADDRESS (DM2500.STATE) \\PAGEDSETFILEPTR ( -STREAM) \\TTY.CREATING.DISPLAYSTREAM (DS) \\PAGED.GETNEXTBUFFER (STREAM) SLITLOOP (CURRLIST) \\CLEARCB - (CB) SEDIT::COPY-STRUCTURE-STRING (SEDIT::NODE) FLTSTR (MANTSTRING) SEDIT::COLLECT-UNDO-BLOCK ( -SEDIT::CONTEXT SEDIT::BLOCK-END) \\FILLBSPPUP (PUP) TEDIT.EDIT.OBJECT (SEL LINE TEXTOBJ) -\\PAGED.FORCEOUTPUT (STREAM B) SEDIT::COMPUTE-POINT-POSITION-LIST (SEDIT::POINT) -\\DOFORMATTING.HARDCOPY (LINE THISLINE) DSPSOURCETYPE (DD BBT) SENDXIP (XIP) SEDIT::UNDO-COMMENT-CHANGE - (SEDIT::SUBNODES) \\SETIODIRTY (BUF) |\\LFWritePages| (|stream|) SEDIT::PROPAGATE-WIDTH-CHANGE ( -SEDIT::SUPER) GET-ENVIRONMENT-AND-FILEMAP (MAPENTRY) \\3MBENCAPSULATE (PACKET) TERM.PRINTCHAR ( -CHAT.STATE) MSCHECKBLOCK (ERRORS) ADDSPELL1 (L2 L3 L1) |\\VAMFreePageGroup| (|vol|) MSSOLVE (SET REP -QT) \\10MB.STARTDRIVER (NDB) INITDATATYPES (DTD) \\HASHRECLAIM (SLOT HA) \\PARTEND.PRESS (PRDATA) -|\\SFFixDestination| (PBT DISPLAYDATA) SEDIT::CFV-QUOTE (SEDIT::X) CLISPATOM1 (ATMS L TEM) -\\LEAF.USE.NEW.CONNECTION (PUP AFFECTEDFILES) FB.DELVERCOMMAND (FILES) \\NSFILING.GET.STREAM ( -STREAMPAIR CONNECTION PAIR) SETFONT.IP (IPDATA) \\NSFILING.DELETEFILE (SESSION) MENUWINDOW (MENU) -\\UFS.UNREGISTER.GFS (GENFILESTATE) \\TEDIT.UPDATE.SHOWSEL (NSEL) CLISPCAR/CDR1 (X) -BULKDATA.GENERATE.NEXT (GENSTATE) |\\SFFixFont| (DISPLAYDATA) CLISPTRAN (X) TRANSLATE.DATATYPE (FD) -|\\SFFixClippingRegion| (DISPLAYDATA) \\TEDIT.GET.SINGLE.PARALOOKS (LOOKS TABSPEC) CHCON ( -\\CHCONLSTAIL) UNCLISPTRAN (EXPRESSION) \\UNVISIBLE.PAGED.REVALIDATEFILELST (STREAM) -\\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (X Y) \\3MBGETPACKET (PACKET) UNPACK (\\CHCONLSTAIL) -PRINTDATE (ROOTNAME) \\10MB.INPUT.INTERRUPT (PACKET) \\MAIKO.PUNTBLTCHAR (DISPLAYDATA) -MAKEHARDCOPYSTREAM (DS) PRINTFNS (FNADRLST) PRETTYPRINT (NEWADRLST LST TEM) -MB.THREESTATE.WHENOPERATEDFN (SEL) PRETTYDEF1 (PRTTYTEM) LOOKUP-ENVIRONMENT-AND-FILEMAP (MAPENTRY) -SEDIT::CFV-LIST (SEDIT::NODE) \\FILEMAP-HASHOVERFLOW (TEM) \\SFFIXLINELENGTH (DISPLAYSTREAM) -POSTSCRIPT.FONTSAVAILABLE (RAWFD) \\TEDIT.PARSE.CHARLOOKS.LIST (NEWPCLOOKS) \\MAIKO.ALLOCBLOCK (ABLOCK -) DUNPACK (!SCRATCHTAIL !SCRATCHLIST) |\\LFOpenFile| (STREAM) MSSHOWUSE (X) SEDIT::SEDITE (SEDIT::EXPR -) SEDIT::PARSE-NEW (SEDIT::CONTEXT) CHAT.ENDOFSTREAMOP (STREAM) |\\UFSOpenFile| (STRM) -FB.HANDLE.ABORT.BUTTON (BROWSER) \\LINKBLOCK (BASE FREEBLOCK) SEDIT::BACKSPACE-LIST (SEDIT::POINT) -MB.BUTTONEVENTINFN (SEL) REMWINDOWPROP (TAIL WINDOW) DCHCON (!SCRATCHTAIL !SCRATCHLIST) CRITSECT (SELF -) \\TEDIT.PARSE.PARALOOKS.LIST (NEWLOOKS) DINFO.SETUP.WINDOW (GRAPH) \\TEDIT.NSCHAR.RUN (TEXTOBJ) -\\SEQUIN.RETRANSMITNEXT (NEXTPUP SEQUIN) \\TEXTTTYBOUT (STREAM) \\SPPWATCHER (SPPCON) + DISPINTERRUPT STREAM SCRATCHBM) PFI.MAKE.LPT.STREAM (TEMPS SCALE REG PRINTOPTIONS S) +\GC.ENTER.BIGREFCNT (PTR TMP OVENTRY) TEDIT.UNPARSE.PAGEFORMAT (PAGENOS PX PY SPECS PFONT PQUAD +HEADINGS COLS COLWIDTH RIGHT INTERCOL OLDRIGHT LEFT TOP BOTTOM SCALEFACTOR) TTCOMPLETEWORD (START +FIRSTMATCH NEXTCHAR TAIL LASTCHAR MUST.BE.UNIQUE UNIQUE WORD SUFFIXCHARS FIRSTMATCHCHARS I REFERENCE +CH RETYPELENGTH RETYPEBUF RETYPETARGET ESCAPED BUF J OLDLENGTH NEEDADJUST) \BLTSHADE.BITMAP (left +bottom top right DESTINATIONNBITS DESTINATIONLEFT DESTINATIONBOTTOM TEXTURE HEIGHT) \BITBLT.BITMAP ( +top DESTINATIONNBITS left bottom SOURCENBITS right stodx stody TEXTURE HEIGHT WIDTH DTY DLX STY SLX +DBOT DLFT) \SEARCHOPENFILES (STREAM) \FORMATLINE (CH#1 ORIGCHLIST CHLIST ORIGWLIST WLIST LOOKS +TEXTSTREAM TERMSA CLOOKS LOOKNO PC INVISIBLERUNS TLEN CHNO ORIGFMTSPEC FMTSPEC HARDCOPYMODE DEVICE +SCALE DEFAULTTAB LEFTEDGE TABSPEC FONT ASCENTB NEWASCENT DESCENTB NEWDESCENT 1STLN TX WIDTH TXB1 CH DX + BOX GATHERBLANK CH#B PREVSP T1SPACE PREVDHYPH PREVHYPH TXB DXB LOOK#B ASCENT DESCENT INVISIBLERUNSB +%#BLANKS FORCEEND TABPENDING TEXTLEN) CHAT.TYPEOUT (TERM.STATE CH MSG TYPESCRIPTSTREAM CRPENDING CNT) +SEDIT::SCAN-STRING (SEDIT::INDEX SEDIT::CWIDTH SEDIT::C SEDIT::OFFSET SEDIT::X SEDIT::IN-MULTI-ESC) +COMP.LAM1 (X) \HARDRESET-CLEANUP1 (HEADER NT NILSTART VAR0CODE PVARBASE VAR VAR# NT1 NT2 OP +ERRORS-SEEN INFO SLOT NEXT) HVBAKREAD (HV READVAL HV1 HV2 HV3 I) \HARDRESET-CLEANUP (TABLE VARTAIL +MASTERLIST LINEARBINDINGS VALUE OLDVAL VAR INDEX NVARS NNILS NTSIZE) SEDIT::SELECT-SEGMENT-DEFAULT ( +SEDIT::START SEDIT::END SEDIT::INDEX SEDIT::LINEAR-ITEM SEDIT::LINEAR-INDEX) HASH.PASSWORD (CHAR HASH) + GETBLOCKDEC (FILE BLOCK) GRAPHOBJ.GETFN (IMAGEOBJ) /LISPXPUT (LST Y) VARIABLES (N L) ASKUSERSETUP ( +TEM) \GC.LOOKUP.BIGREFCNT (PTR TMP OVENTRY) SPP.FORCEOUTPUT (EPKT STREAM) /RADIX (N) \GCMAPSCAN (ENTRY + PROBE PREV LINK PTR) SI::BQUOTE-CONS (SI::CONSTA SI::CONSTD) LOADBLOCK (FILE TEM) \BACKFORMAT (CH1 +CHNO CH NLINE LINES) \GCMAPUNSCAN (ENTRY PROBE LNK PREV) FIND.NON.SPACE (END BUF) \IRND (N D) +GRAPHOBJ.BUTTONEVENTINFN (W) FB.COUNT.FILE.CHANGE (SIZE) STACK.FULL.WARNING (FLG) RENAMEFILE (OLDFILE +NEWFILE) FW-FORGET-STREAM (STREAM OFD) \DISPLAYLINE (LHEIGHT SCALE CACHE DISPLAYDATA DDPILOTBBT +XOFFSET CLIPLEFT CLIPRIGHT OFONT OLOOKS DDWIDTHCACHE DDOFFSETCACHE LOOKSTARTX CH DX LOOKNO TTX CURY TX + I) TEDIT.FORMATBOX (LINES LAST-CHNO SUBREGION SUBREGIONSPEC LINE CHNO) FB.UPDATEBROWSERITEMS (PATTERN + INFOWANTED SPEC PROTO W INDEX FILEGENERATOR CONDITION NOW FILENAME NEWFILEDATA OTHERFILES +PREVGROUPDATA LASTFILEDATA WIDENED) \CARET.FLASH.MULTIPLE (STR CARET) SIMPLE.FINDFILE (DIR) \REFCNT ( +ENTRY CNT LINK) \ALLOCMINIMUMSIZES (RESTATWS WININFO THISMINHEIGHT NOWHEIGHT NOWWIDTH THISMINWIDTH +WINDOWPILE NEWWIDTH EXTSIZE NEWHEIGHT EXPANSIONWIDTH FIXEDVAR NEWEXPANDABLEWIDTH EXPANSIONHEIGHT +NEWEXPANDABLEHEIGHT) \EQREFCNT1 (ENTRY LINK) \PFCreateFileDescriptors (volNum) RESET (FX) OPT.JFIXPASS + (X) \COPYSYS (FILE HOST FULLNAME VAL) NIL +SMASHFREE \GETMAPBUFFER (MAPEMPTYBUFFERLIST) COMPILE-FILE-SCAN-FIRST (FIRSTFORMS) COMP.APPLY* (FRAME) +\INTERPRETER (\InterfacePage) \RTP.CLEANUP (\BSPSOCKETS) WHO-LINE-VMEM (*WHO-LINE-LAST-VMEM*) +RESET.INTERRUPTS (\CURRENTKEYACTION) SI::FINISH-ADVISING (SI::*UNADVISED-FNS* ADVISEDFNS) PRINTDEF1 ( +NEWFILEMAP) TEDIT.NEW.FONT (TEDIT.KNOWN.FONTS) \WRITEDISKPAGES (\InterfacePage) PFI.SETUP.TRANSLATIONS + (*STANDARD-OUTPUT*) \PEEKREFILL (\LINEBUF.OFD) \TEDIT.COMMAND.LOOP (TEDIT.SHIFTEDSELECTION +TEDIT.COPYLOOKSSELECTION TEDIT.MOVESELECTION TEDIT.DELETESELECTION) \ALLOCVIRTUALPAGEBLOCK ( +\InterfacePage) XCL:TRACE-FUNCTION (XCL::*UNBROKEN-FNS*) FORWARD.DELETE.TO (\ARROW) \MEDW.DSPCREATE ( +IMAGEDATA) COMP.EXPR (FRAME) FILECREATED (FILECREATEDLST) MAKEINITBFS (\MAINDISK) PACKAGE-ENABLE ( +*OLD-INTERLISP-READ-ENVIRONMENT*) CHAT.CLOSE (CHATWINDOWLST) EDITBF1 (FF) \RETCALL (\InterfacePage) +\DL.ASSIGNBUFFERS (\InterfacePage) \CH.FIND.ORG.SERVER (\CH.CACHE) \VFMReadNext (\VFMhigh) +\DECODETRANSITION (\INTERRUPTSTATE) TEDIT.GET (TEDIT.SELECTION TEDIT.SHIFTEDSELECTION) \VFMDelete2 ( +\VFMhigh \VFMbuffer) \BLTSHADE.DISPLAY (\SYSPILOTBBT) \ADVANCE.STORAGE.STATE (\InterfacePage +\SYSTEMCACHEVARS) TTYIN.SETUP (\TTYINSTATE) \EXTENDISFMAP (\ISFMAP) \DOSTORAGEFULLINTERRUPT ( +\INTERRUPTSTATE) COMPILER::FRAME-ANNOTATE-LAMBDA (COMPILER::*REFERENCES*) TEDIT.FORMATPAGE ( +*TEDIT-PAGE-BREAKS*) KILLSEGMENT (\TTYINSTATE \ENDBUFFER) MSDOES (LASTPARSED) \KEYBOARDINIT ( +\SYSBUFFER \KEYBOARDEVENTQUEUE) \ETHEREVENTFN (\LOCALNDBS) BLOCK%: (BLOCKS) BREAK-FUNCTION ( +XCL::*UNBROKEN-FNS*) TTYIN.FINISH (\TTYINSTATE) TTDELETELINE (\ARROW) \VFMInsert1 (\VFMbuffer) +HVFWDREAD (BACKREFS) \MAKE.COURIER.REP.STREAM (\COURIER.REP.DEVICE) DWMFY2 (TAIL) \SPP.CLEANUP ( +\SPPDEVICE) CHANGEBACKGROUNDBORDER (\IOPAGE) MB.THREESTATE.WHENOPERATEDFN (TEDIT.SELECTION) +\CHAIN.UP.RPT (\REALPAGETABLE) DODIRCOMMANDS (VALUE) \KEYHANDLER1 (\KEYBOARDEVENTQUEUE) TTYIN1 ( +\LINEBUF.OFD \ARROW) \DEFINEDEVICE (\DEVICENAMETODEVICE \FILEDEVICENAMES \FILEDEVICES) \TELERAIDBREAK +(\InterfacePage) \CURSORPOSITION (\IOPAGE) BROWSE/LAYOUT/HORIZ/COMPACTLY (NODELST) CL:MAKE-ECHO-STREAM + (%%ECHO-STREAM-DEVICE) TTYIN1RESTART (\ARROW) BREAKDOWN (BRKDWNLST) \BITBLT.DISPLAY (\SYSPILOTBBT) +INITGC (\HTCOLL) CL:MAKE-SYNONYM-STREAM (%%SYNONYM-STREAM-DEVICE) \DOGCDISABLEDINTERRUPT ( +\INTERRUPTSTATE) \DOSTACKFULLINTERRUPT (\INTERRUPTSTATE) CLISPFORINITVAR (INITVARS) +CL:MAKE-TWO-WAY-STREAM (%%TWO-WAY-STREAM-DEVICE) \INITBFS (\SWAPREQUESTBLOCK) \BITBLT.BITMAP.SLOW ( +\SYSPILOTBBT) NEW/FN (/FNS LISPXFNS) \VFMMerge1 (\VFMxtraBuffer \VFMbuffer rightInterval) +\PUNT.BITBLT.BITMAP (\SYSPILOTBBT) \PUTSYSBUF (\SYSBUFFER) \FILLBUFFER (\LINEBUF.OFD) SHRKFY (RESULTP) + \STARTDISPLAY (\MAINSCREEN) WTFIX1 (FAULTX) PFI.HANDLE.* (*PFI-PENDING-COMMENTS*) OPT.LBDEL (CL:LABELS +) FW-CREATE-OFD-LIST (FW-OFDList) \CH.UPDATE.CACHE (\CH.CACHE) RETDWIM (HISTENTRY TAIL) MSPATHS1 ( +NAMED) \RESETTERMINAL (\LINEBUF.OFD) DO.EDIT.PP (\ARROW) ERASEPROPS (SMASHPROPSLST1) \DECPARENCOUNT ( +\LINEBUF.OFD) COMP.COMPARENUM (CODE) \HTFIND (\HTCOLL) \PUNT.BLTSHADE.BITMAP (\SYSPILOTBBT) +DUMPINITPAGES (\InterfacePage) \CreateScreenBitMap (ScreenBitMap) VIDEOCOLOR (\IOPAGE) \REMOVEDEVICE ( +\FILEDEVICENAMES \DEVICENAMETODEVICE \FILEDEVICES) \SETUP-COMPILED-CLOSURE-CALL (\InterfacePage) +\VFMSplit1 (\VFMhigh \VFMxtraBuffer \VFMbuffer) \INITSPP (\SPPDEVICE) EMBEDPROG (BINDINGS) I.S.OPR ( +CLISPFORWORDSPLST) DELETE.TO.END (\ARROW) CLISPATOM1 (CURRTAIL) \DOVMEMFULLINTERRUPT (\INTERRUPTSTATE) + PACKAGE-DISABLE (*OLD-INTERLISP-READ-ENVIRONMENT*) \CURSORDESTINATION (\IOPAGE \SOFTCURSORBBT1 +\SOFTCURSORBBT5 \SOFTCURSORBBT6) \TEXTMENU.TOGGLE.WHENOPERATEDFN (TEDIT.SELECTION) SCRATCHCONS ( +\TTYINSTATE \ENDBUFFER) \RESETSTACK0 (\InterfacePage) \RESETKEYBOARD (\KEYBOARDEVENTQUEUE \SYSBUFFER) +PAINTW (PAINTCOMMANDBRUSH) HASHBEFORECLOSE (SYSHASHFILELST) LISPX (ARCHIVELST) SCANFILE2 (FNLST) +BCOMPL1A (FIRST OTHERS) %%SYNONYM-STREAM-DEVICE-CLOSEFILE (%%SYNONYM-STREAM-DEVICE) +\MAIKO.ASSIGNBUFFERS (\InterfacePage) SI::FINISH-UNBREAKING (BROKENFNS XCL::*TRACED-FNS*) PFI.ENQUEUE +(\PFI.PROCESS.COMMANDS) \REMOVEDEVICE.NAMES (\DEVICENAMETODEVICE \FILEDEVICENAMES) GETDUMMYVAR ( +DUMMYVARS) \VFMPutNext (\VFMlow) DISPLAYAFTERENTRY (CursorBitMap) SPLITKEY (HASHSCRATCHCONSCELL) +RESTOREBUF (\ENDBUFFER \TTYINSTATE) \TRACKCURSOR (\IOPAGE) \VFMFind (\VFMhigh) \SETUP-ENVIRONMENT-CALL + (\InterfacePage) SCANEXP (FILECREATEDLST) COMP.LOOKUPCONST (CONSTS) COMPILER::FRAME-ANNOTATE-TAGBODY +(COMPILER::*REFERENCES*) \M-VMEMSAVE (\InterfacePage) \LOAD-STREAM (SYSFILES) SYSOUT (\MISCSTATS) +\DOSTACKOVERFLOW (\InterfacePage) CLISPATOM2D (CLISPLASTSUB) \DOCOMPRESSVMEM (\InterfacePage) +\DOBUFFEREDTRANSITIONS (\LASTKEYSTATE \KEYBOARDEVENTQUEUE \SHIFTSTATE) \PROCESS.MAKEFRAME ( +\InterfacePage) \NEWEPHEMERALPAGE (\InterfacePage) \ADD.PACKET.FILTER (\PACKET.FILTERS) \SOFTCURSORUP +(\SOFTCURSORBBT1 \SOFTCURSORBBT2 \SOFTCURSORBBT3 \SOFTCURSORBBT4 \SOFTCURSORBBT5 \SOFTCURSORBBT6) +\FM.EDIT-DELETE (EDITITEM) SCANFILE0 (DICT) \NSPRINT.WATCHDOG (*PRINT-JOBS-IN-PROGRESS*) +\CANONICALIZE.NSADDRESS (\NSADDRESS.CACHE) PROCESSWORLD (%#SCHEDULER#) \HANDLE.RAW.XIP (\MY.NSADDRESS) + BEEPON (\IOPAGE) \MKATOM.FULL (\INTERRUPTSTATE) TTYIN.SHOW.?ALTERNATIVES (\ENDBUFFER) \FLUSHPAGE ( +\InterfacePage) COMPILER::FRAME-ANNOTATE-CATCH (COMPILER::*REFERENCES*) INTERRUPTED (\INTERRUPTSTATE) +BEEPOFF (\IOPAGE) PRINSHUT (MAKEMAP) \ENVCALL.UFN (\InterfacePage) EDITDEFAULT (EDITHISTORY) +CLOSENSOCKET (\NSOCKETS) \GETREGION.PACKPTS (BASEPT OPPT) \SOFTCURSORUPCURRENT (\SOFTCURSORBBT1 +\SOFTCURSORBBT5 \SOFTCURSORBBT6) \CARET.DOWN (\CARET.UP) \VANILLAHOSTNAMEP (\PSEUDODSK) ADDCHAR ( +\CURSOR \ARROW) \RELEASE.PROCESS (\PROCESSES) COMP.CALL (FRAME) \EXTENDSTACK (\INTERRUPTSTATE +\InterfacePage) \DOMISCAPPLY1 (\InterfacePage) \DEL.PACKET.FILTER (\PACKET.FILTERS) +\FM.EDIT-WORDDELETE (EDITITEM) DO.EDIT.COMMAND (USERWORDS) \MAIKO.IO-INTERRUPT (\INTERRUPTSTATE) +DELETETO (\ARROW) \DISABLEGC1 (\INTERRUPTSTATE) \CHECKFORSTORAGEFULL (\INTERRUPTSTATE) +DWIM-SYMBOL-PACKAGE (FAULTX) SCANDEFINEQ (FNADRLST DICT FNLST) SETMAINTPANEL (\IOPAGE) \BITBLT.BITMAP +(\SYSPILOTBBT) \MAKE.PROCESS0 (\InterfacePage) FIXATOM (TAIL) PRETTYDEF1 (PRETTYCOMSLST) +\MAIKO.ETHER-INTERRUPT (\INTERRUPTSTATE) PRINTFNS (NEWFILEMAP) DEFPRINT (\DEFPRINTFNS) \DELETEOFD ( +\OPENFILES) \FAULTINIT (\InterfacePage) OPT.DELTAGREF (CL:LABELS) \FM.EDIT-INSERT (EDITITEM) +XCL:UNBREAK-FUNCTION (BROKENFNS XCL::*TRACED-FNS*) \SETDAYTIME0 (\IOPAGE) \SETUPUSERSTACK ( +\InterfacePage) \BLTSHADE.BITMAP (\SYSPILOTBBT) \DL.NEWFAULTINIT (\IOPAGE) \NEXTCONSPAGE (\LISTPDTD) +\VFMDelete1 (\VFMbuffer) \HARDCURSORPOSITION (\IOPAGE) EDITCOMA (EDITHIST) \SET.VMEM.FULL.STATE ( +\INTERRUPTSTATE) \TEMPLOCKPAGES (\InterfacePage) DEFEVAL (\DEFEVALFNS) EDITCOML (EDITCOMSA EDITCOMSL) +\CLOSELINE (\LINEBUF.OFD) SEDIT:RESET-COMMANDS (SEDIT::LISP-EDIT-ENVIRONMENT) RAND (RANDSTATE) +XCL:UNADVISE-FUNCTION (ADVISEDFNS) BREAKLINE (\ARROW) \INCPARENCOUNT (\LINEBUF.OFD) \SELECTREALPAGE ( +\RPTLAST) COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::*REFERENCES*) HISTORYSAVE (ARCHIVELST) +WHO-LINE-CURRENT-DIRECTORY (*WHO-LINE-LAST-DIRECTORY* *WHO-LINE-DIRECTORIES*) MSCHECKBLOCKBASIC ( +BLKFNS) \MAIKO.CONSOLE-LOG-PRINT (\INTERRUPTSTATE) \GETREGIONTRACKWITHBOX (BASEPT) \RESETLINE ( +\LINEBUF.OFD) \DL.FAULTINIT (\IOPAGE \InterfacePage) \PROCESS.MOVEFRAME (\InterfacePage) \GCMAPSCAN ( +\HTCOLL) \FLUSHVM (\InterfacePage) \GCMAPUNSCAN (\HTCOLL) HPRINTEND (BACKREFS) SUPERPRINT/WRAPPER ( +MAKEMAP) \REMOVE.EXTERNALFORMAT (*EXTERNALFORMATS*) CLEARFILEPKG (SYSFILES) \PFTransferPage ( +\InterfacePage) \DORETCALL (\InterfacePage) BRECOMPILE1 (ADRLST) WINDOW.MOUSE.HANDLER ( +\LastCursorPosition) \FREELISTCELL (\LISTPDTD) \DOVE.FAULTINIT (\RCLKSECOND) BKSYSCHARCODE (\SYSBUFFER +) \TEDIT.LOOKS.UPDATE (LINE) \FTP.WHENCLOSED (\FTPCONNECTIONS) \DOFLUSHVM (\InterfacePage) +\NSFILING.DISCARD.SESSION (\NSFILING.ACTIVE.SESSIONS) SETUPSTACK (\InterfacePage) \CLEARSYSBUF ( +\SYSBUFFER) TTY.PROCESS (\CURRENTKEYACTION) \FM.EDIT-BACKUP (EDITITEM) \ACTONDISKPAGES (\InterfacePage +) \D01.FAULTINIT (\RCLKSECOND \InterfacePage) \DEFINEDISPLAYINFO (\DISPLAYINFOALIST) +SI::FINISH-UNADVISING (ADVISEDFNS) BCOMPL2 (DEFS) PAINTW.CACHE.SHADE (PAINTW.SHADES) EDIT4F1 (FF) +PFI.HANDLE.RPAQQ (*PFI-FILEVARS*) SKIP/ZAP (\TTYINSTATE) MASTERSCOPEXEC (LISPXHIST) CLOSEPUPSOCKET ( +\PUPSOCKETS) SCANCOMPILEDFN (DICT FNLST) \GETSYSBUF (\SYSBUFFER) COMPAREFAIL (DIFFERENCES) NIL +SMASH SETY.IP (IPDATA) \INSERT.FIRST.PIECE (TEXTOBJ PC) RPLNODE (X) \GETFTPCONNECTION (CONN) +\COURIER.CHECK.ERRORS (ERRDEF) \TEDIT.COMMAND.LOOP (TEXTOBJ ISCRSTRING) \TEDIT.GET.SINGLE.PARALOOKS2 ( +LOOKS TABSPEC) \COURIER.ATTENTIONFN (CON) TEDIT.SELECT (SEL) \DSPSPACEFACTOR.IP (IPDATA) OPT.RETPOP (X +) HVFWDCDREAD (TCONCPTR) \NSRANDOM.RELEASE.LOCK (HANDLE) TEDIT.SUBPARALOOKS (PC) CLISPRECORD (E) +\TEDIT.CONVERT.TO.FORMATTED (PC TEXTOBJ) DISCARDXIPS (NSOC) \INSPECTW.REDISPLAYPROP (OLDVALUEITEM) +\GENERIC.CHARSET (STREAM) TB.UNSELECT.ALL.ITEMS (ITEM BROWSER) FB.COUNT.FILE.CHANGE (FBROWSER) +\DSPRESET.PSC (STREAM) SEDIT::SHIFT-LINEAR-FORM (SEDIT::NODE) OPT.JLENPASS (J) COPY-CIRCLE (VAL NEW) +SUBSTRING (OLDPTR) SEDIT::SET-POINT-LIST (SEDIT::POINT) \UPDATE.PBT.RASTERWIDTHS (PBT) +PFI.CONDENSE.INDEX (OLDNAME INDEX TYPEPAIR) CLBINARYMINUS? (MINUSTAIL) \VAMAdjustGroup (group) +SETYREL.IP (IPDATA) ALLOCSTRING (OLD) BRKDWNRESULTS (X) BREAK.MSG.INTO.LINES (STRLST) +SEDIT::GENERATE-LINEAR-FORM (SEDIT::NODE SEDIT::CONTEXT) \SPP.CLEANUP (CON) \LEAF.ABORT.FROMMENU ( +SEQUIN) ADJUSTLINE (OLDENDLINE LINE NEXTLINE BREAK) \COURIER.CHECK.PROCEDURES (FNDEF) TB.DESELECTRANGE + (BROWSER) NORMSECT (GEOM SELF) \PAGED.INCFILEPTR (STREAM) \STARTPAGE.PRESS (PRDATA) \TEDIT.FIND (SEL +TEXTOBJ) MAKETITLEBARICON (REG) \FIXILINES (LINE TEXTOBJ) \SETXIPCHECKSUM (XIP) FINDFIELDUSAGE ( +EXPRESSION) TEDIT.SET.SEL.LOOKS (SEL) \LFScavFileName (A0493) \LFUnpackName (A0493) \BUFFERED.BIN ( +STREAM) \HDCPYDISPLAY.FIX.YPOS (DD) \LEAF.DELETEFILE (DATA STREAM) MAKESCAN (EDGELIST) MOVD (TOCELL) +MSTRYSPELL (PTR) TEDIT.GET.OBJECT (PIECE) \DSPCLIPPINGREGION.PSC (IMAGEDATA) SEDIT::REPLACE-CHARS ( +SEDIT::OPEN-STRING SEDIT::CONTEXT) IDLE.BOUNCING.BOX (TAIL) TB.INSERT.ITEM (BROWSER TAIL) +\3MBRAWRECEIVE (PACKET) \LFPurgeDirectory (file) \LEAF.SETCREATIONDATE (DATA INFOBLK) +SETF-SYMBOL-PACKAGE (OBJ) \BUFFERED.BOUT (STREAM) SETXY.IP (IPDATA) TEDIT.INCLUDE (STREAM SEL) MSPARSE + (CONJUNCTIONS RESPELL) \NSFILING.SET.CONTINUANCE (SESSION) ASKUSER (ANSWER PRINTLST BUFS) \BBTCURVEPT + (BBT BBTA0619 BBTA0621) \BUFFERED.BINS (STREAM) CLISPDEC (LST) \DSPLINEFEED.IP (IPDATA) +SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (SEDIT::FOLLOWING-LINE SEDIT::EXTENT) \TERMINATESPP (CON) +TB.SELECTRANGE (ITEM BROWSER) \LFOpenOldFile (fileDesc STREAM) \LFDirectoryP (stream) \CENTICLOCK (CLK +) \BUFFERED.BOUTS (STREAM) CLRPLNODE (X) SEDIT::REPLACE-QUOTE (SEDIT::SUBNODE) MARK/GRAPH/NODE (NODE) +TEDIT.ADD.MENUITEM (OLDITM MENU) \LEAF.GETFILE (CACHEDSTREAM CONNECTION DATA OLDSTREAM) +RESET/NODE/LABELSHADE (NODE) \SLOWBLTCHAR (DD PILOTBBT) \PS.SCALEHACK (REG IMAGEDATA) D-ASSEM:INTERN-DCODE + (D-ASSEM::RAW-CODE) SEDIT::REPLACE-LIST (SEDIT::X SEDIT::INSERT-AFTER SEDIT::NODE SEDIT::CARET +SEDIT::SELECTION) \CARET.FLASH.AGAIN (CARET) \MAKEFLOAT (BOX) TEDIT.DEFAULT.MENUFN (TEXTOBJ SEL) +\DSPRIGHTMARGIN.IP (IPDATA) FW-OFD-EXISTS? (OFD) SETXYREL.IP (IPDATA) CLISPIF0 (Y X FORM CLAUSE L) +CIRCLAR-COPYER (VAL NEW) PFI.PRINT.INDICES (INDICES) \CHANGECHARSET.DISPLAY (DISPLAYDATA PBT) +SEDIT::SELECT-SEGMENT (SEDIT::SELECTION) FIXSPELL (TAIL) \SFFixY (DISPLAYDATA PBT) +\TEDIT.REFRESH.SHOWSEL (OLDSEL) SEDIT::CREATE-QUOTED-GAP (SEDIT::GAP-NODE SEDIT::QUOTE-NODE) +\BRUSHBITMAP (BRUSHES&METHOD) SETX.IP (IPDATA) \TEXTSTREAMBOUT (SEL TEXTOBJ STREAM) +COMPILER::FRAME-ANNOTATE-TAGBODY (COMPILER::OUTER-REFERENCES) SEDIT::CLEAR-LINEAR-FORM (SEDIT::NODE) +TTYINBUFFERSTREAM (STRM) TEDIT.EXTEND.SEL (NSEL) PFI.PRINT.MULTI.INDEX (TEM MASTERENTRY TYPEPAIR) +\INFINITY (BOX) FIXFIELDORDER (X LASTFIELDTAIL USE1 USE2) \EDIT.UPCARET (CARET) \SHOWSEL (SEL) +BOXCOUNT (DTD) \TEDIT.FORMAT.FOOTNOTE (LINE LINES) \TEXTBIN (STREAM) \POSTSCRIPT.OUTCHARFN (IMAGEDATA) + \TFBRAVO.GETPARAMS (WORDL) FIXEDITDATE (E) TB.DELETE.ITEM (ITEM) \MEDW.PUTWINDOWPROP (WINDOW TAIL) +MAKEFLOATNUMBER (VAL) DELDEF (NAME) \COPYHARRAYP (TARGET) OPT.DELTAGREF (X) CLOSENSOCKET (NSOC) +TERM.MOVETO (CHAT.STATE) MSSEEKPHRASE (THIS X) TEDITCHAT.MENUFN (STATE) SEDIT::THROW-AWAY-CHANGES ( +SEDIT::CONTEXT) \LFCreateFile (stream) LOG (SX) SEDIT::SETUP-NEW-CONTEXT (SEDIT::CONTEXT) SETSTKNAME ( +FRAME FNH) \LEAF.SETFILETYPE (DATA) U/L-CASE (BUF) CL::INSERT-INCLUDED-SLOT (CL::TAIL) FB.THINCOMMAND +(FILES) \LEAF.TIMEDOUT.EXCESSIVE (SEQUIN ENTRY) \COPYFNHEADER (NEWFNHD) \NSGATELISTENER (XIP BASE) +\SENDSPP (CON EPKT) TEDIT.HARDCOPY-COLUMN-END (ORIGINAL-LINES LINES LINE) DASSEM.COUNTVARS (VAR) +SEDIT::PRETTY-PRINT (SEDIT::CONTEXT) IMAGEOBJPROP (IMAGEOBJ IMAGEFNS) CHECKBUFFERREFVAL (BUFF) +\FTP.HANDLE.NO (BADPLIST) /TCONC (PTR) \TELERAIDSEND (PACKET) \AddShade (SHADEDITEM MENU) +\HCPYMODEBLTCHAR (DISPLAYDATA LOCAL1) COMPAREDEFS (DEFS) DINFO.UPDATE.GRAPH.DISPLAY (DINFO.GRAPH) \PNC + (STR) SEDIT::SET-SELECTION (SEDIT::SELECTION) \SETWINFOXSIZE (WINFO) PUTFILEMAP (NEWENTRY) \TEXTBOUT +(STREAM) \CLEARMAP (STREAM PREVBUFFER) \ENDVECRUN (PRDATA) FILING.CALL (SESSION STREAM) CLISPFORVARS ( +LST0 VARLST TEM PTRS) RESUME (FROMPTR TOPTR) OPT.JUMPREV (BD BR D PR END ABR R ABD DR) SETXREL.IP ( +IPDATA) EXEC-READ-LINE (LINE) SHRINK-VECTOR (VECTOR) CL:SET-DISPATCH-MACRO-CHARACTER (DISP-TABLE) +UNDOSAVE (Y) ADDFILE (TYPE) RESET/NODE/BORDER (NODE) COMPILER::META-CALL-LAMBDA (COMPILER::CURRENT-PROG1-TAIL +) HARRAYPROP (HARRAY HA) MSVERBTYPE (MSVERB) SEDIT::OPEN-LITATOM (SEDIT::CONTEXT SEDIT::STRING-ITEM +SEDIT::OPEN-STRING SEDIT::SUB-STRING) \TEDIT2 (TEXT) \RELEASEBUFFER (BUFFER) \TEDIT.LOOKS.UPDATE ( +STREAM) \TEDIT.MOVE.PIECEMAPFN (PC) PUP.ECHOSERVER (PUP) COMP.STBIND (F) \FIXLINELENGTH.IP (IPSTREAM) +\WRITEOUTBUFFERS (BUF STREAM BUFFER) \ACTONDISKPAGES (REQUEST LASTNUMCHARSCONS) DASSEM.MATCHVARS (TAIL +) CLRHASH (SLOT HA) DMCHAT.HANDLE.WRAP (DM2500.STATE) \TEDIT.MARKINACTIVE (TEXTOBJ) FILEBROWSER ( +BROWSER) \EDIT.DOWNCARET (CARET) SHOWSHADEDITEMS (ITEMREGION) TEDIT.QUIT (STREAM) PRINTCOPYRIGHT ( +OWNER) REOPENTEXTSTREAM (STREAM) DINFO.UPDATE.MENU.DISPLAY (GRAPH) SPY.DUMP.BUFFER (TREE) +CLISPIFYMATCHUP (ALST) \DOACTONDISKPAGES (DSK REQUEST CB) \POSTSCRIPT.ACCENTFN (IMAGEDATA) +SETSTKARGNAME (FRAME) \GETMAPBUFFER (PREV BUF) \LFUpdateLeaderPage (leaderPage stream) +DINFO.UPDATE.TEXT.DISPLAY (GRAPH) CL:VECTOR-PUSH-EXTEND (VECTOR) OPENBSPSTREAM (SOCKET INSTREAM +OUTSTREAM) \FM.COLLECTNWAYS (NWAYIDS NWAYS) /RPLNODE2 (X) TERM.HOME (CHAT.STATE) OPT.LABELNTHPR (G) +\WRITEDISKPAGES (REQUEST) MB.DEFAULTBUTTON.ACTIONFN (MAINTEXT MAINSEL TEXTOBJ SEL) SET-FILL-POINTER ( +VECTOR) \HASHACCESS (SLOT) \SLOWHCPYMODEBLTCHAR (DD PILOTBBT) \DOWRITEDISKPAGES (REQUEST DSK LAB CB) +HPRINT1 (LASTSEEN) LISPXPUT (Y) \HDCPYDISPLAY.FIX.XPOS (DD) ADD-SYMBOL (VEC HASH) +\TFBRAVO.INSTALL.PAGEFORMAT (TEXTOBJ PAGEFRAMES) \SWITCHFONTS.PSC (POSTSCRIPTDATA) \TEDIT.MARKACTIVE ( +TEXTOBJ) \APPEND2 (TAIL) TEDIT.UNDO.DELETION (TEXTOBJ EVENT SEL) \COURIER.REP.BIN (STREAM) +COURIER.BROADCAST.CALL (TAIL NEARBYNETS) REFLECT/GRAPH/DIAGONALLY (GRAPH N) \HASHRECLAIM (SLOT HA) +\LEAF.CLOSEFILE (STREAM CONNECTION DATA) \MAPPAGE (BUF PREVAVAIL PREV STREAM) FILLTRIANGLE (PT1 PT2 +PT3) DINFO.UPDATE (GRAPH) FLTSTR (MANTSTRING) \TELERAIDGET (PACKET) \SETEOF (STREAM) \WRITEVMEMPAGES ( +REQUEST) \SETWINFOYSIZE (WINFO) DWMFY2 (TAIL0) \VAMFindFreePages (groupPtr) TRANSLATE.DATATYPE (FD) +TEDIT.REDO.INSERTION (EVENT TEXTOBJ FIRSTPIECE SEL) LINELENGTH (STREAM) SEDIT::INSERT-MULTI-ESCAPE ( +SEDIT::POINT) \NSRANDOM.UPDATE.VALIDATION (STREAM) SETUPFONTS.IP (IPDATA) SEDIT::DOT-THIS-LIST (SEDIT::TAIL + SEDIT::NODE) \ACTONVMEMPAGES (REQUEST) MB.SELFN (SEL) \COURIER.BROADCAST.ON.NET (XIP) \SETIODIRTY ( +BUF) READLINE (LINE) WHO-LINE-WHAT-IS-RUNNING (POS-HOLDER) \FM.NUMBER-CHANGESTATE (ITEM) +TEDIT.EDIT.OBJECT (SEL LINE TEXTOBJ) \DODISKCOMMAND (SHORTCB LA CB DSK) DSPSOURCETYPE (DD BBT) +\DSPROTATE.PSC (IMAGEDATA) SEDIT::OUTPUT-CONSTANT-STRING (SEDIT::CONTEXT) REFLECT/GRAPH/VERTICALLY (N) + BRH/LAYOUT (GN) \GETDISKCB (DSK) SET/LABEL/SIZE (NODE) \XIPERROR (XIP) TB.EXPANDFN (BROWSER) +\IFS.LOOKUPFILE (DEVINFO) \CLEANUPDISKQUEUE (SHORTCB DSK) DINFO.UPDATE.HISTORY (GRAPH) +\FM.WINDOWEXTENT (REGION) \IDLERKEYACTION (TABLE) \FM.MAKELINKS (LINKTAIL) COPY.TEXT.TO.IMAGE (INSTRM) + PARSE-NAMESTRING1 (VAL) \PAGED.GETNEXTBUFFER (STREAM) \NSRANDOM.WROTE.HANDLE (HANDLE) +POSTSCRIPT.SET-FAKE-LANDSCAPE (C IMAGEDATA) \PAGED.FORCEOUTPUT (STREAM B) \CARET.FLASH (CARET) +\DSPCLIPPINGREGION.IP (IPDATA) \PAGEDSETFILEPTR (STREAM) DASSEM.DSTOREFNDEF (CA) POSTSCRIPT.STARTPAGE +(IMAGEDATA) SETFONT.IP (IPDATA) \GR.PUTDEFFN (TYPE) REMPROPLIST (LST1) SEDIT::SET-DEPTH (SEDIT::NODE) +FB.SORT.VERSIONS (PREVTAIL) TEDIT.UNDO.INSERTION (TEXTOBJ EVENT) \SENDLEAF (PUP RESULT) DMCHAT.ADDRESS + (DM2500.STATE) \FM.UPDATEGROUPEXTENT (REGION) SPY.SUM (TREE) DELFROMCOMS (COMS) +\MAKE.EXPEDITED.STREAM (STREAM) \FM.EDIT-SETUP (ITEM) \COURIER.REP.BOUT (STREAM TAIL) GENERATEFN ( +COMVAR##) \PARTEND.PRESS (PRDATA) SEDIT::OUTPUT-CR (SEDIT::CURRENT-NODE SEDIT::THIS-LINE SEDIT::CONTEXT + SEDIT::LAST-LINE CL:BLOCK) PRETTYPRINT (NEWADRLST LST TEM) NS.ECHOUSER (OXIP) TERM.PRINTCHAR ( +CHAT.STATE) REFLECT/GRAPH/HORIZONTALLY (N) SWAPXIPADDRESSES (XIP) OPT.PRDEL (B P X) NSNETDAYTIME0 ( +OXIP) \10MB.TURNONETHER (NDB CSB) \SFFixDestination (PBT DISPLAYDATA) \HANDLE.RAW.XIP (XIP NDB ENTRY) +TB.FLUSH.WINDOW (BROWSER) \LEAF.READFILEPROP (DATA) MSJOINSET (SET1) \DSPTRANSLATE.PSC (IMAGEDATA) +\MAIKO.ALLOCBLOCK (ABLOCK) \FM.TRANSPOSEVERT (REGION) \BSP.HANDLE.DATA (INQUEUE PREVPUP PUP) +\DSPPOPSTATE.PSC (IMAGEDATA) CLISPIFYCROPS (TEM1 TEM2) OPENIPSTREAM (IPSTREAM IPDATA PAPERSIZE) +CHAT.SWITCH.EMACS (CHATSTATE) \FM.NUMBER-SETUP (ITEM) \MAKEFREEARRAYBLOCK (BLOCK) FW-UPDATE-OFD-WINDOW + (OFD PCTREGION) CHCON (\CHCONLSTAIL) \CLEARCB (CB) \BSP.DECLARE.FILEPTR (STREAM) \SFFixFont ( +DISPLAYDATA) TEDIT.HARDCOPY.PAGEHEADING (LINE) SEDIT::LINEARIZE (SEDIT::CONTEXT SEDIT::NODE +SEDIT::SUPER-NODE) EXTENDREGIONTOP (REG) \LINKBLOCK (BASE FREEBLOCK) UNPACK (\CHCONLSTAIL) +\TEDIT.HCPYLOOKS.UPDATE (STREAM) CHAT.ENDOFSTREAMOP (STREAM) \CARET.FLASH? (CARET) SHEDSCAN (SELF) +BSPGETMARK (STREAM) \DELETEBLOCK? (F B) \FM.TRANSPOSEHORZ (REGION) \BSP.HANDLE.ACK (SOCKET OUTQUEUE +INTERRUPTPUP OLDPUP) \TEDIT.PARSE.CHARLOOKS.LIST (NEWPCLOOKS) SPY.MERGETREE (OLDCOPY) +\UFS.UNREGISTER.GFS (GENFILESTATE) \UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (X Y) SEDIT::REVIVE-NODE ( +SEDIT::NODE) OPT.LBMERGE (TO) CLISPIFYCROPS1 (X) \MAIKO.PUNTBLTCHAR (DISPLAYDATA) FW-OPENP ( +!SCRATCHTAIL !SCRATCHLIST) GET-ENVIRONMENT-AND-FILEMAP (MAPENTRY) TERM.DOWN (CHAT.STATE) +\INIT.ETHER.BUFFER.POOL (ZONE) \DSPFONT.HDCPYDISPLAY (DD) DCHCON (!SCRATCHTAIL !SCRATCHLIST) DOERROR ( +L AT) \FLUSHNDBS (NDB) PRINTFNS (FNADRLST) \BULK.DATA.CLOSE (CON STREAM STRM COURIERSTREAM) +\UNVISIBLE.PAGED.REVALIDATEFILELST (STREAM) DASSEM.DWRITEFN (CD NAMETABLE) \SFFixClippingRegion ( +DISPLAYDATA) \TEDIT.PARSE.PARALOOKS.LIST (NEWLOOKS) DUNPACK (!SCRATCHTAIL !SCRATCHLIST) PRETTYDEF1 ( +PRTTYTEM) FW-CLOSEFN (OFD) TEDIT.SKIP.SPECIALCOND (LINE) TB.RENUMBER.TAIL (ITEM BROWSER) +LOOKUP-ENVIRONMENT-AND-FILEMAP (MAPENTRY) COURIER.OPEN (STREAM) BLOCK (PROC PQUEUE OLDPROC) +TB.UPDATE.DISPLAY (EXTENT) SEDIT::MAP-COMMENT-INDEX (SEDIT::CONTEXT) \SETGROUPMIN (GROUPATWINFO) +\VFMSaveBuffer (BUF) FW-RESIZE-OFD (OFD) PRINTDATE (ROOTNAME) CLEARPUP (PUP) TEDIT.MOVE (FROM TOOBJ +FROMOBJ TO) \NSFILING.RELEASE.BULKSTREAM (CONNECTION STREAMS PAIR) \LEAF.SETVALIDATION (STREAM) +\SFFIXLINELENGTH (DISPLAYSTREAM) \UFSOpenFile (STRM) SPY.MERGE (VAL) \FILEMAP-HASHOVERFLOW (TEM) +CLISPDSUBST (X) \COPYSEL (TO) \TEDIT.UPDATE.SHOWSEL (NSEL) \SEQUIN.HANDLE.ACK (SEQUIN) DASSEM.DASSEM ( +ARGS LL VAR FREELST X) OPENPOSTSCRIPTSTREAM (STREAM IMAGEDATA) \TEDIT.GET.SINGLE.PARALOOKS (LOOKS +TABSPEC) COPYALL (TAIL) FB.DELVERCOMMAND (FILES) \TEDIT.INTEGER.IMAGEBOX (OLDBOX) FILEPKG.MERGECHANGES + (VAL) \UFSTruncateFile (STREAM) WXOFFSET (CR) \BN.TIMES2 (W2 TAIL) \UFSGetFileInfo (ALIST) \BN.DIVIDE + (U X) OPT.JUMPTHRU (REF DR) \FM.EDIT-PREPARETOEDIT (EDITITEM) \TEXTTTYBOUT (STREAM) +\PFTransferFilePage (label) DMCHAT.NEWLINE (CHAT.STATE DM2500.STATE) \FM.EDITSTART-SELECTEDFN (ITEM) +\BSP.HANDLE.INTERRUPT (SOCKET) \LFRenameFile (stream) FB.ANALYZE.PATTERN (BROWSER) \UFSCloseFile ( +STREAMFILE) SEDIT::REPLACE-ROOT (SEDIT::TOP-NODE SEDIT::POINT) \LITATOM.EATCHARS (PNBASE) TTY.PROCESS +(NEWTTY OLDTTY) \LEAF.REPAIR.BROKEN.PUP (DATA PUP) CLISPACKUP (LL) SEDIT::COPY-STRUCTURE-QUOTE (SEDIT::NODE +) UnixShellQuote (CT) TEDIT.SETFUNCTION (RTBL) DINFO.SETUP.WINDOW (GRAPH) TEDIT.SETSEL (SEL TEXTOBJ) +\SEQUIN.FLUSH.RETRANSMIT (SEQUIN) \SMASHMENUIMAGEONRESET (MENU) EXTENDREGIONRIGHT (REG) MSSETSETTYPE ( +SET) \TEDIT.NSCHAR.RUN (TEXTOBJ) \BSP.HANDLE.INTERRUPTREPLY (SOCKET) TEDIT.BUILD.PCTB (TEXTOBJ CACHE +TEXT PC OLDPC) \LFTruncateFile (STREAM) \CHAIN.UP.RPT (LASTEMPTY RPTBASE LASTUSED) TEDIT.FIND (TEXTOBJ +) TB.ITEM.UPDATABLE? (BROWSER) SEDIT::REPLACE-NODE (SEDIT::SELECTION) \SETFATSYNCODE (TABLE) CLISPFOR3 + (LST) FB.CHECK.NAME.LENGTH (BROWSER PREVTAIL) \NSFILING.ADDQUOTES (NAMECHARS) \NSFILING.ERRORHANDLER +(CON STREAM) EDITDATE (OLDATE) \DEVICEFILE.EOSERROR (STREAM BUF) SHOW.PRESS (PRDATA) +\DOFORMATTING.HARDCOPY (LINE THISLINE) SHRIEKIFY (RESULTP) COMPILER::FRAME-ANNOTATE-LAMBDA ( +COMPILER::OUTER-REFERENCES) COMPILER::META-EVAL-PROGN (A0658 A0660) \FM.EDITSTART-SETUP (ITEM) +\BSP.HANDLE.ERROR (BSPSOCKET) MB.THREESTATE.WHENOPERATEDFN (SEL) SEDIT::RELINEARIZE-WHERE-NECESSARY ( +SEDIT::NODES-TO-RELINEARIZE SEDIT::SUPER-NODE) \MAKE.COURIER.REP.STREAM (STREAM) PSCFONT.READFONT (PF) + TERM.LEFT (CHAT.STATE) \FILLRTPPUP (PUP) \QUEUE.INPUT.IOCB (IOCB CSB) UNMAKEHARDCOPYSTREAM (DS) +\RESHOWBORDER1 (WINDOW) RENUMBER.LINES (LINE) \INITIALIZESWAPDISK (DISK) \SPP.SYSPKT (CON BASE) +OPT.XVARSCAN1 (FR) \TELERAIDSERVER (PACKET) SEDIT::COPY-STRUCTURE-LIST (SEDIT::NODE) MSKNOWN (SET) +SEDIT::COPY-STRUCTURE-STRING (SEDIT::NODE) \INTERPRETER1 (NT INTERPFRAME) SEDIT::COLLECT-UNDO-BLOCK ( +SEDIT::CONTEXT SEDIT::BLOCK-END) \BSP.TIMERFN (PUP SOCKET) \INITBFS (CB DSK) TEDIT.PAGEFORMAT (TEXTOBJ +) \SMASHLINK (CALLER) SEDIT::RECOMPUTE-WIDTH (SEDIT::NODE) \MEDW.MOVEW (WINDOW) \OFFSETCLIPPINGREGION +(OLDREGION) \FM.DISPLAY-SETUP (ITEM) FB.HANDLE.ABORT.BUTTON (BROWSER) UPDATE/SCROLL/REG (WINDOW) +SEDIT::COMPUTE-POINT-POSITION-LIST (SEDIT::POINT) MB.BUTTONEVENTINFN (SEL) COMP.COMPARENUM (V1) +DSUBLIS (EXPR) \3MBENCAPSULATE (PACKET) \10MB.STARTDRIVER (NDB) \SETUP-COMPILED-CLOSURE-CALL (INTERPBF + NEWFX) \COPYSYNTAX (B) \FILLINSPP (EPKT BASE) \LEAF.USE.NEW.CONNECTION (PUP AFFECTEDFILES) KILL.LINES + (FIRSTLINE) \VAMRecomputeFreePageCount (vol) CLISPFOR2 (LST X) \DSPSPACEFACTOR.PRESS (PRDATA) +\NSFILING.WHENCLOSED (SESSION STREAMPAIRS) BIGNUM.DEFPRINT (CHARS) CONTROL (TTBL) \DSCCOUT (STREAM) +\MAIKO.DO.MOVDS (TOCELL) \DSPFONT.IP (IPDATA) \TEDIT.WINDOW.SETUP (TEXTOBJ) ADDHASH (OV) +\MAKEFREEBLOCK (STK) \BN.ISUM1 (RES) \NSRANDOM.HANDLE.ERROR (S) DELETECONTROL (TBL) \DSPLINEFEED.PRESS + (PRDATA) DELFROMCOM (TEM BLOCK X) /MAPCONC (MAPE) COMPILER::FRAME-ANNOTATE-CATCH (COMPILER::OUTER-REFERENCES +) \SHAPEW2 (WINDOW) EXTENDREGIONLEFT (REG) \MEDW.CLOSEW (SCREEN WINDOW) \NSFILING.DELETEFILE (SESSION) + CLISPELL (RESPELLTAIL) TEDIT.PARSE.PAGEFRAMES1 (PAGEFRAME) SEDIT::CFV-QUOTE (SEDIT::X) +\SETUP-ENVIRONMENT-CALL (CALLER NEWSTACK) OPT.SCANOPT (CD A B) \M-VMEMSAVE (SCRATCHBUF) +\ENTITYSTART.PRESS (PRDATA) TEDIT.INSERT.OBJECT (TEXTOBJ NEWPC SEL) DMCHAT.CLEAR (CHAT.STATE) +LISPXUSE1 (E) MAKEHARDCOPYSTREAM (DS) \START.PROCESSES (PROC OLDPROC) COMPILER::META-EVAL-MV-PROG1 ( +A0654 A0656) \VFMDeletePageGroup (groupPtr key) BSP.PUTINTERRUPT (SOCKET) DELETELINE (LINE NEXTLINE) +DRIBBLE (OLD-DRIBBLE-STREAM NEW-DRIBBLE-STREAM) RESETGRID.NEW (GRIDSPEC) PROCESSWORLD (PQ P) +INSURE.BRUSH (SYSTEMBRUSH) SEDIT::PROPAGATE-WIDTH-CHANGE (SEDIT::SUPER) \SETUP.DEFAULT.LINEBUF (DEV +STREAM) \COERCEASCIITONSFONT (FD) ADD.PROCESS (PROC) \MEDW.OPENW (WINDOW SCREEN) CHANGEBACKGROUND ( +WINDOWS) TEDIT.HARDCOPYFN (TEXTOBJ) \RUN.PROCESS (PQUEUE PROC NEXT PREV) SEDIT::CFV-LIST (SEDIT::NODE) + NEWPAGE.IP (IPDATA) \ICONW.SHOW.TITLE (TITLESPEC) \3MBGETPACKET (PACKET) SUBHASH (OV) SEDIT::SEDITE ( +SEDIT::EXPR) CLISPFOR1 (BODYTAIL Z PTRS LST1) \RELEASE.PROCESS (PROC OTHER) DELFROMCOM1 (COM) +\NSFILING.GET.STREAM (STREAMPAIR CONNECTION PAIR) \ADDLEAFSTRING (PUPBASE) CHAT.SET.EMULATOR ( +CHAT.STATE) MB.THREESTATEBUTTON.FN (SEL) \FILLBSPPUP (PUP) CHAT.HOLD (STATE) \LFSetFileInfo (infoPage) + \10MB.INPUT.INTERRUPT (PACKET) OPENWINDOWS (WINDOWS) SEDIT::PARSE-NEW (SEDIT::CONTEXT) OPT.SETUPOPT ( +B C) SHAPEW1 (WINDOW) SEDIT::UNDO-COMMENT-CHANGE (SEDIT::SUBNODES) \FTP.OPENFILE.FROM.PLIST (INS OUTS) + \HDCPYDSPPRINTCHAR (STREAM) \BN.ICANON (U U1) SEDIT::INPUT-NORMAL-CHAR (SEDIT::CONTEXT) OPT.POSTOPT ( +CODE) BLOCKCOMPILE1 (CALLTAGS) SETXY.PRESS (PRDATA) \CREATELINEBUFFER (STREAM DEV) FIXAPPLY1 (XTAIL) +DREVERSE (Y) SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::POINT) \DL.NEWFAULTINIT (RPTBASE) SEDIT::COMPUTE-SELECTION-POSITION-LITATOM (SEDIT::SELECTION) SEDIT::BUILD-PRELINEARIZED-NODE ( -SEDIT::CONTEXT) |\\LFGenerateFiles| (A0417) \\COPYSEL (TO) \\DELETEBLOCK? (F B) CLISPATOM2C (TAIL0) -\\NSRANDOM.PREPARE.CACHE (STREAM PREV PREVFREE CACHE HEAD) \\CHAIN.UP.RPT (LASTEMPTY RPTBASE LASTUSED) - |\\UFSTruncateFile| (STREAM) OPT.CHECKTAG (TAG) TERM.DOWN (CHAT.STATE) \\FM.PUTITEMPROP (ITEM) -|\\UFSCloseFile| (STREAMFILE) TEDIT.INCLUDE (STREAM SEL) SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::POINT -) TEDIT.PARSE.PAGEFRAMES1 (PAGEFRAME) GRAPHDELETENODE (GRAPH) \\DEQUEUE (Q ITEM) \\FIXLOCALNET (PORT) -TEDIT.GET (TEXTOBJ FIRSTLINE SEL) SEDIT::INPUT-NORMAL-CHAR (SEDIT::CONTEXT) SPP.DSTYPE (EPKT CON) -WXOFFSET (CR) \\NSFILING.EVENTFN (RANDEVICE) \\REQUEUE.ETHERPACKET (PACKET) |\\LFEventFn| (|Dev|) -SEDIT::PARSE--GAP (SEDIT::NEW-NODE) \\NSRANDOM.FETCH.CACHE (PREV TAIL CACHE PAIR) |\\LFReturnNextFile| - (GENERATED) BLOCK (PROC PQUEUE OLDPROC) OPT.RETMERGE (G L1) DMCHAT.NEWLINE (CHAT.STATE DM2500.STATE) -TEDIT.MOVE (FROM TOOBJ FROMOBJ TO) \\10MB.OUTPUT.INTERRUPT (NEXTPACKET) \\MAKEFREEARRAYBLOCK (BLOCK) -TTY.PROCESS (NEWTTY OLDTTY) TEDIT.SETFUNCTION (RTBL) \\FTP.OPENFILE.FROM.PLIST (INS OUTS) -\\CLOSELEAFCONNECTION (DEVICE) DECLSUBFIELD (TRANSLATION) \\INITIALIZESWAPDISK (DISK) -SEDIT::COMPUTE-POINT-POSITION-LITATOM (SEDIT::POINT) \\ICONW.SHOW.TITLE (TITLESPEC) SEDIT::SET-PROPS ( -SEDIT::CONTEXT) SPP.OPEN (CON) WHO-LINE-WHAT-IS-RUNNING (POS-HOLDER) FILEPKG.MERGECHANGES (VAL) -SEDIT::PARSE (SEDIT::CONTEXT) \\DOFORMATTING (LINE THISLINE) MB.THREESTATEBUTTON.FN (SEL) -|\\VAMAllocPageGroup| (|vol| |groupPtr|) \\LITATOM.EATCHARS (PNBASE) FM.GETSTATE (STATELIST) COPYALL ( -TAIL) SEDIT::SELECT-NODE-SEGMENT (SEDIT::SELECTION) TRAPLOOP (KNOTS) SEDIT::ASSIGN-FORMAT-LIST (SEDIT::NODE -) \\TEDIT.HARDCOPY.FORMATLINE (TEXTSTREAM LINE THISLINE) TEDIT.BUILD.PCTB (TEXTOBJ CACHE TEXT PC OLDPC -) \\SETFATSYNCODE (TABLE) |\\UFSGetFileInfo| (ALIST) WINDOWWORLD (SCREEN) \\SEND.ANSWERING.RFC (SOCKET - OPUP) TB.DISPLAY.LINES (BROWSER) \\BN.TIMES2 (W2 TAIL) ADDTO (PTR) POSTSCRIPT.SHOWACCUM (IMAGEDATA) -SEDIT::CLOSE-NODE-LITATOM (SEDIT::CONTEXT SEDIT::NODE SEDIT::STRING-ITEM) SEDIT::FIND-NODE (SEDIT::CONTEXT -) \\LOADNSHOSTNUMBER (OLDBOX) \\INITBFS (CB DSK) \\SEQUIN.HANDLE.INPUT (PUP SEQUIN) -\\DEVICEFILE.EOSERROR (STREAM BUF) \\DSPYPOSITION.HCPYMODE (DD) SEDIT::SET-OPTIONS (SEDIT::CONTEXT) -DSUBLIS (EXPR) NORMLOOP (LAST LOOP) \\BN.DIVIDE (U X) GRAPHDELETELINK (FROM TO) OPENIPSTREAM (IPSTREAM - IPDATA PAPERSIZE) COPYDEF (X DEF) CLISPBROADSCOPE1 (X) \\NSRANDOM.READ.SEGMENT (PAIR HANDLE) -\\MAIKO.DO.MOVDS (TOCELL) TEDIT.HARDCOPYFN (TEXTOBJ) SCROLL.HANDLER (WINDOW) \\COERCEASCIITONSFONT (FD -) \\DSPFONT.IP (IPDATA) UNDOLISPX3 (L) DUMPGRAPH (IDS FONTS BORDERS SHADES) \\OFFSETCLIPPINGREGION ( -OLDREGION) FSETVAL (ATM) OPENNSOCKET (NSOC) SEDIT::SET-SELECTION-COMMENT-WORD (SEDIT::SELECTION) -INIT/NODES/FOR/LAYOUT (GN) TEDIT.PAGEFORMAT (TEXTOBJ) \\M-VMEMSAVE (SCRATCHBUF) |\\VFMInsertPageGroup| - (|key|) MSINTERPRET (REL VAL) UPDATEWFROMIMAGE (REGION) \\SPP.SENDPKT (BASE CON) SHOW.PRESS (PRDATA) -RECORDECLBLOCK (FIELDNAMES SPECS) \\FLUSHNSOCQUEUE (NSOC) \\NSFILING.DISCARD.SESSION (SESSION) -CHAT.TYPEOUT (CHAT.STATE) POSTSCRIPT.CLOSESTRING (IMAGEDATA) OPT.JFIXPASS (J) SETSYNONYM (KEYLST) -TERM.LEFT (CHAT.STATE) DIRFILENAME (FILEGROUP) TB.REPLACE.ITEMS (BROWSER) CONTINUEDIT (FL) MAKEFILE ( -FILEPROP) \\DSCCOUT (STREAM) \\GETBRUSHBBT (BBT) LATTICE/BREAK/CYCLES (NODE DTAIL) -\\NSRANDOM.RELEASE.HANDLE (STREAM HANDLE) \\NSFILING.LOOKUP.CACHE (CONNECTION CACHE) -\\MEDW.GETSCREENREGION (OPPT) \\INTERPRETER1 (NT INTERPFRAME) DASSEM.ASMAJ (P) \\BUILDATWSTRUCTURE ( -EDGEBUCKET) \\NSFILING.UPDATE.ATTRIBUTES (HANDLE) \\TRANSMIT.STRATEGY (SOCKET PUP) \\SEQUIN.RETRANSMIT - (SEQUIN QUEUE) CONTROL (TTBL) |\\PFTrimHelper| (|filePtr| |group|) |\\LFSortFiles| (FILES) -OPT.JLENPASS (J) OPT.RETPOP (X) \\DSPSPACEFACTOR.PRESS (PRDATA) PROCESSWORLD (PQ P) -|\\PFPutRootDirectoryType| (|vol| |markerPage|) \\SEQUIN.FLUSH.CONNECTION (SEQUIN) \\SMASHLINK (CALLER -) \\NSFILING.LOGIN (DEVINFO RANDEVICE) \\FTP.NEXTFILE (GENSTATE) \\LEAF.GETFILEDATES (STREAM) -CHANGESLICE (L) TEDIT.SHOWSEL (SEL) \\RUN.PROCESS (PQUEUE PROC NEXT PREV) LOOKUP.NS.SERVER (ADDR) -NORMSECT (GEOM SELF) DRIBBLE (OLD-DRIBBLE-STREAM NEW-DRIBBLE-STREAM) \\START.PROCESSES (PROC OLDPROC) -\\ENTITYSTART.PRESS (PRDATA) SEDIT::FINALIZE-MOUSE-SELECTION (SEDIT::CONTEXT) POSTSCRIPT.INIT ( -OLDPSCFD FP) \\DL.NEWFAULTINIT (RPTBASE) \\RELEASE.PROCESS (PROC OTHER) FB.AFTERCLOSEFN (FBROWSER) -MERGEINSERT (LST) TEDIT.DELETELINE (PREV NEXT) SHEDSCAN (SELF) DMCHAT.CLEAR (CHAT.STATE) DELETECONTROL - (TBL) DINFO.READ.GRAPH (GRAPH) \\SETUP.DEFAULT.LINEBUF (DEV STREAM) \\LEAF.HANDLE.INPUT (PUP STREAM -DONEPUP) \\MAIKO.CONS.UFN (CELL PAGE .MK.NEWCELL CNS.PAGE) \\NSRANDOM.ENSURE.WATCHER (DEVINFO) -\\SETBSPTIMEOUT (SOCKET) TEDIT.INSERT.OBJECT (TEXTOBJ NEWPC SEL) TB.SET.FONT (BROWSER EXTENT) -\\SETUP-COMPILED-CLOSURE-CALL (INTERPBF NEWFX) SPP.CLEAREOM (STREAM) INSERT.NODE (BUF) -\\BUILD.EXPEDITED.XIP (XIP) SEDIT::SET-POINT-COMMENT-WORD (SEDIT::POINT) \\TEDIT.WINDOW.SETUP (TEXTOBJ -) RECORDECL1 (CL) \\INSPECTW.REDISPLAYPROP (OLDVALUEITEM) SEDIT::KILL-NODE (SEDIT::NODE) -UNIX.SETDISPLAYTYPE (WINDOW) READGRAPH (GRAPH) \\TFBRAVO.INIT.CHARLOOKS (LOOKS) CHAT.HOLD (STATE) -\\DSPLINEFEED.PRESS (PRDATA) \\MAKEFREEBLOCK (STK) BIGNUM.DEFPRINT (CHARS) \\CREATELINEBUFFER (STREAM -DEV) \\TEDIT.BASICFIND (TEXTOBJ) \\SPP.CREATE.STREAMS (CON INSTREAM OUTSTREAM) ETHERHOSTNAME (BUF) -OPENWINDOWS (WINDOWS) SETXY.PRESS (PRDATA) \\COPYSYNTAX (B) CLISP\ (CLISPTEM) DOCOLLECT (LST) -FB.SET.DEFAULT.NAME.WIDTH (BROWSER) DELETELINE (LINE NEXTLINE) EDITCHANGELABEL (NODE) -\\NSRANDOM.STREAM.CHANGED (OLDSTREAM) |\\LFFindInfo| (FILE STREAM) ENDCOLLECT (X) -CREATE.PACKET.EXCHANGE.XIP (XIP) MAKETITLEBARICON (REG) FOREST/BREAK/CYCLES (NODE DTAIL) -\\NSFILING.ADD.TO.CACHE (CACHE SESSION) \\SEND.RFC (PUP SOCKET) CLISPDEC0 (X) \\TTW1 (WS WINDOW SCREEN -) /PUT+1 (X) \\DSPSPACEFACTOR.HCPYMODE (DDATA) NEWPAGE.IP (IPDATA) \\BSP.SENDBUFFER (PUP STREAM) -\\CARET.FLASH.AGAIN (CARET) \\SPP.PREPARE.INPUT (STREAM CON) \\TEDIT.FIND.FIRST.LINE (LINES LINE) -SEDIT::SET-POINT-COMMENT (SEDIT::POINT) TEDIT.DEACTIVATE.WINDOW (TEXTOBJ) TEDIT.MINIMAL.WINDOW.SETUP ( -TEXTOBJ OLDWINDOWS) LASTN (Y) COMP.BLOCK (F) CHANGEBACKGROUND (WINDOWS) ADD.PROCESS (PROC) -\\INITCONSPAGE (BASE CELL) \\SPP.ESTABLISH (CON) \\BN.ISUM1 (RES) /ATTACH (LST) \\TFBRAVO.PARSE.PARA ( -RUNS) MAKESCAN (EDGELIST) RAISE (TTBL) \\10MBENCAPSULATE (PACKET) INSURE.BRUSH (SYSTEMBRUSH) -\\UFS.NEXTFILEFN (GENFILESTATE SUBGEN) \\LEAF.FIX.BROKEN.SEQUIN (ACKEDQ SEQUIN UNANSWEREDPUPS RETRANSQ -) \\SETUP-ENVIRONMENT-CALL (CALLER NEWSTACK) \\FTP.GENERATEFILES (CONNECTION) DINFO.FMW.CLOSEFN (GRAPH -) \\DL.MARK.PAGES.UNAVAILABLE (RPTBASE) /LISPXPUT (Y) /RPLACA (LST) SEDIT::ADJUST-WIDTH (SEDIT::STRING-ITEM - SEDIT::NODE) \\TEXTMENU.TOGGLE.WHENOPERATEDFN (SEL) /DSUBST (EXPR) \\GET.PRIORITY.QUEUE (PREV) -\\SET.PROCESS.NAME (PROC) RESETTERMTABLE (TT) \\BN.ICANON (U U1) HVBAKREAD (BKRF) -SEDIT::CONVERT-COMMENT-TAIL (STREAM) /RPLACD (LST) \\FTP.ADD.QUOTES (PIECES) DREVERSE (Y) -SEDIT::INSERT-CHANGED (LIST) CHAT.SET.EMULATOR (CHAT.STATE) \\TEDIT.INSERTLINE (NEWLINE BEFORELINE -PREVLINE) DMCHAT.RIGHT (CHAT.STATE) \\SPP.RELEASE.ACKED.PACKETS (CON) \\STRING-STREAM-OUTCHARFN ( -STREAM) CLISPRECORD (E) CHAT.MENU (STATE) RELSTK (POS) \\ADJUSTABLE-STRING-STREAM-OUTCHARFN (STREAM) -\\BSP.FLUSH.SOCKET.QUEUES (STREAM) \\BN.MADD (TT TTT) MSPRGRECORD (X) RPLNODE (X) PUTTEXTPROP (TEXTOBJ -) \\DSPFONT.HCPYMODE (DD) \\FTP.CLOSEFILE (STREAM) \\LEAF.TIMEDIN (SEQUIN) SEDIT::CREATE-SIMPLE-NODE ( -SEDIT::NEW-NODE) \\BBTCURVEPT (BBT BBTA1694 BBTA1696) COPY-CIRCLE (VAL NEW) OPT.DELTAGREF (X) -\\BRUSHBITMAP (BRUSHES&METHOD) \\SETSPACE.PRESS (PRDATA) DEL.PROCESS (P) HVFWDCDREAD (TCONCPTR) -RESETREADTABLE (RDTBL) ECHOMODE (TTBL) \\FLUSHPUPSOCQUEUE (PUPSOC) COMPILER::FRAME-ANNOTATE-TAGBODY ( -COMPILER::OUTER-REFERENCES) \\FIXLINELENGTH.PRESS (PRSTREAM) \\EXTERNALFORMAT (STREAM) \\PROG0 (NT -PROGFRAME) PUTSTREAMPROP (STREAM TAIL) RESETUNDO (UNDOSIDE X) /PUTASSOC (X) -MAKE-FILL-POINTER-OUTPUT-STREAM (STREAM) GENERATOR (COMVAR##) %BROADCAST-STREAM-DEVICE-OUTCHARFN ( -STREAM) CLBINARYMINUS? (MINUSTAIL) |\\LFVersions| (RESULT) %BROADCAST-STREAM-DEVICE-CLOSEFILE (STREAM) - TERM.UP (CHAT.STATE) ESCAPE (RDTBL) \\RTP.HANDLE.RFC (DATA PUP) \\SEQUIN.CONTROL (PUP) LISTPUT (LST) -LISPX (LISPXHIST) \\LEAF.TIMEDOUT (SEQUIN) \\LEAF.RECONNECT (INFO) RESTART.PROCESS (P) -FB.HARDCOPY.DIRECTORY (PAIR) \\UNWIND.PROCESS (P) ESPATTERN (Y) LAYOUTGRAPH (G) \\SPP.SKIPBYTES ( -STREAM) WAKE.PROCESS (P) \\EVALA (NT CALLER) READMACROS (RDTBL) OPT.JUMPREV (BD BR D PR END ABR R ABD -DR) READTABLEPROP (RDTBL) CL:FLOAT-SIGN (CL::OLD-BOX) SEDIT::CHANGE-QUOTE (SEDIT::QUOTE-NODE) -RECORDPRIORITY (DECL) %SYNONYM-STREAM-DEVICE-OUTCHARFN (STREAM) \\MOVETO.PSC (IMAGEDATA) \\SUBREAD ( -STREAM END DOTLOC) FILEPKGCOM (TEM2 COM) \\SUSPEND.PROCESS (PROC PREV PQHEAD) -%SYNONYM-STREAM-DEVICE-CLOSEFILE (STREAM) POSTSCRIPT.FONTCREATE (PSCFD FD) \\RTP.FILTER (SOCKET) -CLISPDEC (LST) EDITL1 (EDITHIST) \\TEXTBACKFILEPTR (STREAM REALFILE) PROCESS.RESULT (PROCESS) -\\TOP-LEVEL-READ (STREAM) TB.REMOVE.ITEM (BROWSER) \\TEXTMENU.TOGGLEFN (SEL) DASSEM.COUNTVARS (VAR) -PARSE-NSADDRESS (ADDR) PUTSEQUIN (OPUP SEQUIN) FINDFIELDUSAGE (EXPRESSION) \\FLUSHPAGE (RPTR) -\\SPP.CREATE.WATCHER (CON) \\LEAF.WHENCLOSED (SEQUIN PUP DEV) \\SPP.HANDLE.DATA (XIP INQ CURRENT CON -OUTSTREAM) CL:GET-OUTPUT-STREAM-STRING (STRING-OUTPUT-STREAM) FILLTRIANGLE (PT1 PT2 PT3) GRAPHERPROP ( -GRAPH) \\DSPCOLOR.IP (IPDATA) \\LET0 (NT PROGFRAME) SKIPSEPRCODES (STREAM) \\SEND.ACK (SOCKET DATA) -GRAPHADDNODE (GRAPH) %CONCATENATED-STREAM-DEVICE-CLOSEFILE (|stream|) \\LET* (NT PROGFRAME) -CIRCLAR-COPYER (VAL NEW) SEDIT::STRING-OFFSET (SEDIT::POINT-OR-SELECTION) NOTIFY.EVENT (EVENT TAIL -PROC) CLISPIF0 (Y X FORM CLAUSE L) TEDIT.COPY (FROM TOOBJ TO FROMOBJ) BRV/OFFSET (P) TEDIT.KILL ( -STREAM) \\FIXLINELENGTH.PSC (STREAM) \\SETWINFOYSIZE (WINFO) FB.SHAPECOMMAND (WREG) FB.FASTSEECOMMAND -(BROWSER) FB.MAYBE.WIDEN.NAMES (BROWSER) \\DSPFONT.PSC (IMAGEDATA) \\MOVEREALPAGE (DESTRPT) -DASSEM.MATCHVARS (TAIL) \\INSERTCR (INPC TEXTOBJ) \\QUEUE.OUTPUT.IOCB (IOCB CSB) -\\INSTALL.EXTERNALFORMAT (EXTERNALFORMAT ENTRY) \\FM.COLLECTNWAYS (NWAYIDS NWAYS) -\\DSPCLIPPINGREGION.PRESS (PRDATA) \\SELECTREALPAGE (RPTBASE PREVRPT) \\UPDATECHAIN (CHAIN0 CHAIN1) -PFI.PRINT.BITMAP (STREAM) %TWO-WAY-STREAM-DEVICE-OUTCHARFN (STREAM) COMPILER::META-CALL-LAMBDA ( -COMPILER::CURRENT-PROG1-TAIL) %TWO-WAY-STREAM-DEVICE-CLOSEFILE (|stream| STREAMDEVICE) OPT.LABELNTHPR -(G) DMCHAT.HANDLECHARACTER (DM2500.STATE CHAT.STATE) LOG (SX) MAKE-UNICODE-TRANSLATION-TABLES (PREV) -TEDIT.REMOVE.MENUITEM (MENU) FB.HARDCOPY.TOFILE (HCOPYTAIL) FB.ADJUST.DATE.WIDTH (SPEC) -\\DSPLEFTMARGIN.PSC (IMAGEDATA) TERM.RESET.DISPLAY.PARMS (CHAT.STATE) \\GC.HANDLEOVERFLOW (CELL PTR) -DREMOVE (L) \\TFBRAVO.READ.PARALOOKS (TEDITPARALOOKS) TEDIT.CARETLOOKS (TEXTOBJ) \\SPP.PREPARE.OUTPUT -(CON STREAM) \\RTP.CLEANUP (SOCKET) DISCARDPUPS (SOC) SEDIT::SET-POINT-NOWHERE (SEDIT::POINT) -HISTORYSAVE (TEM X HISTORY L Y) INITIALIZECOLOR.IP (IPDATA) \\SETWINFOXSIZE (WINFO) -SEDIT::NOTE-CHANGE-IN-SIMPLE (SEDIT::TEMP SEDIT::NODE) \\BSP.SKIPBYTES (STREAM) \\FUNCT1 (NT -FUNCTFRAME) \\MEDW.PUTWINDOWPROP (WINDOW TAIL) SEDIT::DETACH-NODE (SEDIT::NODE) -\\NSFILING.CLOSE.CONNECTIONS (STREAM) CLRPLNODE (X) \\TEDIT.LINECACHE (CACHE) \\MAKESTACKP (ED) -DMCHAT.CLEARMODES (DM2500.STATE CHAT.STATE) \\FM.WINDOWEXTENT (REGION) PROCESS.WINDOW (P) -SORT.NSADDRESSES.BY.DISTANCE (HOSTLIST) %FILL-POINTER-STREAM-DEVICE-CLOSEFILE (STREAM) CLISPFORVARS ( -LST0 VARLST TEM PTRS) \\FM.MAKELINKS (LINKTAIL) FIXFIELDORDER (X LASTFIELDTAIL USE1 USE2) -\\SPPCONNECTION (CON) \\FM.NUMBER-CHANGESTATE (ITEM) \\SETACCESS (STREAM) \\LEAF.IDLE (SEQUIN) -\\FM.UPDATEGROUPEXTENT (REGION) SHOWSHADEDITEMS (ITEMREGION) |\\PFAddRootDirEntry| (|rootDir|) -MSINTERPRETSET (SET REP) SEDIT::RELINEARIZE (SEDIT::CONTEXT CL:BLOCK SEDIT::FIRST-LINE SEDIT::SUPER-NODE - SEDIT::EXTENT) \\FM.EDIT-SETUP (ITEM) CHANGE.NODEFONT.SIZE (NODE) \\TEXTPEEKBIN (PS STREAM) -TB.DO.ITEM.SELECTION (OLDSELECTION BROWSER) \\TFBRAVO.HANDLE.HEADING (PARALOOKS) -\\TEDIT.FIXCHANGEDLINE (THISLINE NEWLINE LINES) MSNEGATESET (X) PRIN2-LONG-STRING (ENTRY) \\RSTRING2 ( -ANSTAIL STREAM) RENUMBER.LINES (LINE) MSINITFNDATA (Y) \\SEQUIN.PUT (PUP SEQUIN) IMAGEOBJPROP ( -IMAGEOBJ IMAGEFNS) \\TEDIT.PEEKBIN.NEW.PAGE (FILE STREAM) OPENPUPSOCKET (PUPSOC) \\TEDIT.BLTCHAR ( -DDPILOTBBT) FB.DEPTHCOMMAND (FBROWSER) \\ENQUEUE (Q TAILEND THISITEM ITEM) \\DSPRIGHTMARGIN.PSC ( -IMAGEDATA) \\GCMAPTABLE (CELL DTD) CL::INSERT-INCLUDED-SLOT (CL::TAIL) \\TFBRAVO.FONT.FROM.CHARLOOKS ( -CHARLOOKS) TB.USERDATA (BROWSER) SPP.CLEARATTENTION (STREAM) \\INTERNAL/SETPASSWORD (NAME/PASS INFO) -TTYIN.FINISH (TL) |\\LFDirectorySearch| (DIRSTREAM TLIST) CHAT.TYPEOUT.CLOSE (CHAT.STATE) OPT.PRDEL (B - P X) DMCHAT.STATE (CHAT.STATE) \\FM.TRANSPOSEVERT (REGION) \\10MBSENDPACKET (COPYPACKET PACKET) -PFI.HANDLE.RPAQQ (COMSINFO) \\DEFINEFONT.PRESS (PRDATA) /RPLNODE2 (X) TEDIT.REDO.REPLACE (SEL EVENT -OLDEVENT) TTYIN (\\TTYINSTATE \\ENDBUFFER) \\SHIFTJISFILEOUTCHARFN (OUTSTREAM) \\FM.NUMBER-SETUP (ITEM -) \\SETFVAR.UFN (VCELL) \\LEAF.OPENFILE (SEQUIN STREAM) \\TEDIT.CHARDELETE (SCRATCHSTRING STRING SEL) -READ-EXTENDED-TOKEN (ANSTAIL) TB.REDISPLAY.ITEMS (BROWSER) /TCONC (PTR) SEDIT::SCAN-FOR-BOUNDS ( -SEDIT::ITEM-NODE SEDIT::ITEM SEDIT::LINE-START SEDIT::START) \\COURIER.RECORDTRAN (REST) -\\TEDIT.NEWREGIONFN (MOVINGPOINT) \\CARET.FLASH (CARET) \\TFBRAVO.READ.CHARLOOKS (TEDITCHARLOOKS) -SEDIT::INSERT-COMMENT-CHARS (SEDIT::SUBNODE SEDIT::SUBNODES) \\INSERTCH (\\INPC TEXTOBJ NEWPC) SORT1 ( -TM L A) TEDIT.CURSOROUTFN (TEXTOBJ) DASSEM.DSTOREFNDEF (CA) \\TEDIT.COMMAND.RESET.SETUP (TEXTOBJ) -TEDIT.INSERT.UPDATESCREEN (SEL TEXTOBJ) CLOSEPUPSOCKET (PUPSOC) \\SETMACROSYNTAX (TBL) -\\TEDIT-OPEN-FONT-FILE (EXISTING-FONTFILE-IF-ANY) FB.INFOMENU.WHENSELECTEDFN (BROWSER) -\\JISFILEOUTCHARFN (OUTSTREAM) EXEC-READ-LINE (LINE) DWMFY2 (TAIL0) \\RELEASE.ETHERPACKET (EPKT) -\\DSPFONT.PRESS (PRDATA) \\TEDIT.RESTARTFN (TEXT) COMPAREDEFS (DEFS) \\NSFILING.AFTER.LOGIN (SESSION) -|\\AddShade| (SHADEDITEM MENU) \\CREATECHARSET.IP (CSINFO) MERGE (ATAIL B) TTYIN.READ (STREAM) -FONTCREATE (FONTX) \\TEDIT.SET-TOTLEN (PCNODE) SENDPUP (PUP) \\SETGROUPMIN (GROUPATWINFO) POSITION ( -STRM) \\PROCESS.EVAL1 (..PEV-PROC..) SPP.FLUSH.TO.EOF (INSTREAM) \\EUCFILEOUTCHARFN (OUTSTREAM) -RELEASINGVMEMPAGE (PTR) \\SEQUIN.PROCESS (SEQUIN) \\DECODETRANSITION (KEYSTATE) |\\SFFixY.HCPYMODE| ( -PBT DISPLAYDATA) GENERATEFN (COMVAR##) \\LEAF.WRITEPAGES (STREAM DATA) SEDIT::INSERT-COMMENT ( -SEDIT::CONTEXT) PROCESS.EVAL (ME) CLISPIFYMATCHUP (ALST) \\BSP.PREPARE.OUTPUT (STREAM PUP) -\\HANDLE.RAW.10TO3 (PACKET) PROCESS.APPLY (ME) TEDIT.FORMATTEXTBOX (PAGEFOOTNOTES FORMATTINGSTATE LINE - LINES) \\DRAWLINE.PSC (IMAGEDATA) DCODERD (CA) \\SHIFT.DOCUMENT (PC PARALOOKS) \\FM.TRANSPOSEHORZ ( -REGION) HPRINT1 (LASTSEEN) COMP.STBIND (F) \\PROCESS.APPLY1 (..PEV-PROC..) CHAT.TTYENTRYFN (STATE) -PROMPTFORWORD (CHARBUFFER) OPT.LBMERGE (TO) |\\PFNewPages| (|currentGroup| |file|) -SEDIT::PARENTHESIZE-CURRENT-SELECTION (SEDIT::POINT) TEDIT.FORMATFOLIO (LINE) FB.DISPLAY.COUNTERS (LAB - FBROWSER) \\MEDW.BLTCHAR (DISPLAYDATA LOCAL1) \\TRANSLATE.10TO3 (PACKET) DASSEM.DWRITEFN (CD -NAMETABLE) \\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (PC) DINFO.READ.KOTO.GRAPH (GRAPH) \\10MBGETPACKET ( -PACKET) \\MEDW.XOFFSET (DD) \\MAIKO.10MBTURNONETHER (NDB CSB) \\TEDITOUTCHARFN (STREAM) TEDIT.SETSEL ( -SEL TEXTOBJ) FB.NEWINFOCOMMAND (BROWSER W) \\LEAF.TRUNCATEFILE (DATA) \\TEDIT.WORDDELETE (SEL) -\\NOIMAGE.DSPFONT (STREAM) TERM.TAB (CHAT.STATE) \\TEDIT.COPY.LINEDESCRIPTOR (TOLINE) OPT.JUMPTHRU ( -REF DR) \\CHANGECHARSET.HCPYMODE (DISPLAYDATA PBT) GC-FILING-DIRECTORY (SESSION) \\SEQUIN.CLOSE ( -SEQUIN) \\ENQUEUE.EVENT/LOCK (PROC TAIL EVLOCK) \\FM.EDITSTART-SELECTEDFN (ITEM) \\PUPERROR (PUP) -MSADDANALYZE (|oldEntry|) TEDIT.REDO.MOVE (MOVESEL) \\UNQUEUE.EVENT (EVENT TAIL PROC) -\\DONEWEPHEMERALPAGE (RPTR) \\FM.EDIT-PREPARETOEDIT (EDITITEM) \\LOOKUPPUPNUMBER (OXIP) RPLNODE2 (X) -SPP.SENDATTENTION (EPKT) \\REMOVEDEVICE.NAMES (TAIL) SETUPPUP (PUP) INTERPRESS.OUTCHARFN (IPDATA) -DELFROMCOMS (COMS) \\CLOSEFILE (STREAM) \\CURSORBITSPERPIXEL (CURSOR) \\CARET.FLASH? (CARET) -SEDIT::DELETE-COMMENT (SEDIT::CONTEXT) |\\LFMakeLeaderPage| (|leader| |LeaderPage|) EXTENDREGIONTOP ( -REG) \\MEDW.YOFFSET (DD) \\CANONICALIZE.NSADDRESS (PREVTAIL TAIL) INITSEQUIN (SEQUIN) -TEDIT.FORMAT.HARDCOPY (FORMATTINGSTATE) \\TEXTINIT (STREAM) OBTAIN.MONITORLOCK (LOCK PROC) TEDIT.FIND -(TEXTOBJ) SEDIT::CHECK-SELECTION (SEDIT::POINT) SEDIT::SET-SELECTION-NOWHERE (SEDIT::SELECTION) -RELEASE.MONITORLOCK (LOCK OWNER PREV TAIL NEXTPROC) TB.MAKE.BROWSER (BROWSER TAIL OLDP) -TEDIT.PARALOOKS (OLDLOOKSLIST NPC NEWLOOKS TEXTOBJ) DASSEM.DASSEM (ARGS LL VAR FREELST X) -\\DEVICEEVENT (STREAM) TERM.SETMARGINS (CHAT.STATE) CHAT.INIT (STATE INSTREAM) -\\TEDIT.APPLY.PAGEFORMATTING (OPAGEFRAMES MAINTEXT) OPT.XVARSCAN1 (FR) TEDIT.FORMATHEADING (LINE) -\\FM.EDITSTART-SETUP (ITEM) SEDIT::CREATE-PRELINEARIZED-NODE (SEDIT::NEW-NODE) WRITE-UNICODE-INCLUDED -(CSETINFO) TEDIT.FORMATPAGE (FORMATTINGSTATE) |\\LFMakeDirEntry| (|stream|) SI::MONITOR-UNWIND (LOCK -OWNER PREV TAIL NEXTPROC) \\GR.PUTDEFFN (TYPE) \\RELEASEWORKINGSET (RPTR) \\TEDIT.TEXTBIN.NEW.PAGE ( -FILE STREAM) SEDIT::SET-SELECTION-ME (SEDIT::SELECTION) \\HANDLE.NS.ROUTING.INFO (ENTRY) -FB.SETNEWPATTERN (FBROWSER) \\EP.PUT.AUX (A) KILL.LINES (FIRSTLINE) \\MAKE.PROCESS1 (PROC MP0) -MSPATHS1 (TEM) CLISPIFYCROPS1 (X) CLISPDSUBST (X) \\NSFILING.GETFILE (HANDLE FILESTREAM) -COMPILER::FRAME-ANNOTATE-LAMBDA (COMPILER::OUTER-REFERENCES) RECORDWORD (TL) \\PROCESS.MOVEFRAME (NEW) - \\TEDIT.SELECT.CHARACTER (SEL) MAKEINITBFS (FIRSTCB) \\ABORT.BULK.DATA (STREAM) SEDIT::CREATE-NEW-COMMENT - (SEDIT::COMMENT) \\TEDIT.FILL.IN.CHARLOOKS.MENU (SCRATCHSEL) \\DSPOPERATION.IP (IPDATA) -\\TEDIT.CONVERT.FOREIGN.FORMAT (TEXTOBJ) FB.GET.SORT.MENU (BROWSER) WRITE-UNICODE-MAPPING-FILENAME (R) - FB.CREATE.FILEBUCKET (NEWFILEDATA) \\TEDIT.FORMAT.FOUNDBOX? (FORMATTINGSTATE) \\GENERIC.READCCODE ( -STREAM) \\MATCHPCS (PC) TEDIT.PARSE.PAGEFRAMES (PAGEFRAME) BRKDWNRESULTS1 (TOT LST) -BRHL/LAYOUT/DAUGHTERS (DTAIL) COPYTEXTSTREAM (TSEL NEWTEXTOBJ) \\FM.DISPLAY-SETUP (ITEM) OPENPRSTREAM -(PRSTREAM PRDATA) \\TRANSLATE.3TO10 (PACKET) TERM.SET.TAB (CHAT.STATE) SET-SYMBOL (ENVIRONMENT) -\\CREATECHARSET (FONT) \\NSFILING.COPY/RENAME (NEWSESSION HANDLE) \\ENQUEUE.TIMER (PROC PREV) -TTNEXTNODE (BUF) SEDIT::COPY-STRUCTURE-COMMENT-WORD (SEDIT::NODE) BRHL/MOVE/RIGHT (NP) -EXTENDREGIONRIGHT (REG) TEDIT.CURSORMOVEDFN (CURSORREG TEXTOBJ) COMP.COMPARENUM (V1) OPENRTPSOCKET ( -SOCKET) |\\VFMGet1| (|interval|) \\TEXTSETEOF (STREAM) FB.INSERT.SUBDIRECTORIES (TAIL) -\\TEDIT.GET.CHARLOOKS (PC) CLISPIFYCROPS (TEM1 TEM2) CL:VALUES (CALLER) SEDIT::CREATE-GAP-NODE ( -SEDIT::GAP-NODE) DINFO.GET.GRAPH.WINDOW (GRAPH) SEDIT::COPY-STRUCTURE-COMMENT (SEDIT::NODE) -\\SIMULATE.UNBIND (FRAME) MSRESPELL (TAIL) \\OPENFILE (STREAM) SEDIT::CREATE-NODE (SEDIT::NEW-NODE) -OPT.SCANOPT (CD A B) \\NSFILING.GENERATEFILES (TAIL SCOPELIST) \\LEAF.REOPENFILE (STREAM) -TEDIT.SUBSTITUTE (TEXTOBJ SEL) XIPAPPEND.CELL (XIP) PRETTY-TYPE-NAME (TYPES) \\MAIKO.INPUT.INTERRUPT ( -PACKET) \\DO.PARAMS.AT.OPEN (STREAM) \\TEDIT.CENTER.SEL.REV (NEWQUADS) \\PAGEDBACKFILEPTR (STREAM) -TERM.RIGHT (CHAT.STATE) COMPILER::META-EVAL-MV-PROG1 (A1647 A1649) \\DSPPRINTCHAR (STREAM) -PRINTROUTINGTABLE (ENTRIES) OPT.SETUPOPT (B C) COMPILER::META-EVAL-PROGN (A1651 A1653) -\\CREATECHARSET.PSC (CSINFO) CL::VALUES-LIST-UFN (IMMEDIATE-CALLER CALLER) TEDIT.REDO (SEL TEXTOBJ) -CALLS3 (X LST) TEDIT.BUILD.PCTB1 (TEXTOBJ OLDPC PC) FB.SORTCOMMAND (DATA ALLFILES BROWSER) -\\BSP.PREPARE.INPUT (STREAM) COMPILER::FRAME-ANNOTATE-CATCH (COMPILER::OUTER-REFERENCES) SETFILEINFO ( -FILE) \\HTFIND (ENTRY PREV LINK) \\SPLITTREE (NEW1 PCNODE NEW2) SETFONTCLASSCOMPONENT (FONTCLASS) -BRKDWNFORM (LST1 LST2) \\UNWIND.UFN (CALLER) EXTENDREGIONLEFT (REG) \\PROC.AFTER.WINDOWWORLD (EXECPROC -) SEDIT::COMPUTE-SELECTION-POSITION-COMMENT (SEDIT::SELECTION) SEDIT::CREATE-CONSTANT-STRINGS (SEDIT::ENV -) SEDIT::UNDO (SEDIT::CONTEXT) CL::VALUES-UFN (IMMEDIATE-CALLER CALLER) \\DSPCLIPPINGREGION.DISPLAY ( -DD) CLISPFOR3 (LST) OPT.POSTOPT (CODE) SEDIT::BUILD-WINDOW (SEDIT::CONTEXT) \\CLEARSYSBUF (PROC) -\\SETGLOBALVAL.UFN (A) BLOCKCOMPILE1 (CALLTAGS) \\SMASHMENUIMAGEONRESET (MENU) \\FM.JUSTIFYITEMS ( -ITEMREGION ITEMMAXREGION) \\RPLACD.UFN (X RP.PAGE .MK.NEWCELL PAGE) TEDIT.STYLESHEET (TEXTOBJ) -SHRIEKIFY (RESULTP) \\LEAF.EVENTFN (DEVINFO) CLISPACKUP (LL) \\SETPUPCHECKSUM (PUP) SEDIT::SHIFT-BLOCK - (SEDIT::CONTEXT) \\RESHOWBORDER1 (WINDOW) BRHL/LAYOUT (GN) DINFO.FIND (GRAPH) \\NSRANDOM.CLOSEFILE ( -STREAM) EDITDATE (OLDATE) TEDIT.NEXT (SEL TEXTOBJ) POSTSCRIPT.HARDCOPYW (REGION) \\REVALIDATEFILE ( -STREAM) TEDIT.BUILD.PCTB0 (OLDPC PC TEXTOBJ) SETFONTDESCRIPTOR (X) \\HANDLE.RAW.3TO10 (PACKET) -MB.NB.PACKITEMS (LINES CURLINE) TEDIT.SCAN.LINE (L L1 LN) \\RPLACA.UFN (X) \\NSFILING.NEXTFILE ( -GENFILESTATE) \\TURN.ON.PROCESSES (P) BRKDWN1 (FNS) KILLSEGMENT (START END) \\DSPOPERATION.DISPLAY (DD - BBTA1719) |\\VFMKillBuffer| (PREV) \\PAGED.REVALIDATEFILELST (STREAM) TEDIT.BUILD.PCTB2 (TEXTOBJ -OLDPC PC) \\NSFILING.PARSE.FILENAME (DIRS) \\BACKCOLOR.DISPLAY (DD) \\SPP.HANDLE.INPUT (CON) -\\BSP.CLEANUP.INPUT (STREAM) \\UNQUEUE (QUEUE PREV ITEM) \\DRAWLINE.DISPLAY (BRUSH DD) TTRACKMOUSE ( -OLDROW/COL) FORGETPAGES (PREVBUFFER STREAM) \\POLYSHADE.YSCAN.IP (|fulllist| |currlist|) -\\UNQUEUE.TIMER (PREV PROC) \\MISCN.UFN (MY-BF CALLER) CL:VALUES-LIST (CALLER) RESTOREMAP (PREVBUFFER -STRM) \\FILLCIRCLE.DISPLAY (FCBBT) \\CONS.UFN (CELL CNS.PAGE .MK.NEWCELL PGA1821 PGA1822) \\RPLCONS ( -CPAGE .MK.NEWCELL LST) \\PAGED.REVALIDATEFILE (STREAM) SEDIT::CFV-CLISP (SEDIT::X) \\PARAS.IN.SEL (SEL - PARAS) CLISPFOR2 (LST X) DINFO.LOOKUP (GRAPH) UPDATE/SCROLL/REG (WINDOW) MB.MARGINBAR.TABTRACK (TAB) -SEDIT::COMPUTE-POINT-POSITION-COMMENT (SEDIT::POINT) \\TEDIT.ABBREV.EXPAND (TEXTOBJ) -\\PAGED.REVALIDATEFILES (STREAM NEWLIST) \\DSPXPOSITION.DISPLAY (DD DISPLAYSTREAM) -%SET-ARRAY-TYPE-NUMBER (ARRAY) SEDIT::UNDO-ATOM-CHANGE (SEDIT::NODE) /RPLNODE (X) TWOD.TRACKCURSOR ( -SELECTION) \\DSPLINEFEED.DISPLAY (DD) SEDIT::REUSE-LINEAR-FORM (SEDIT::NODE CL:BLOCK SEDIT::CONTEXT -SEDIT::TEMP) \\BUFFERED.REVALIDATEFILE (STREAM) \\MEDW.MOVEW (WINDOW) \\BUFFERED.REVALIDATEFILELST ( -STREAM) \\DSPLEFTMARGIN.DISPLAY (DD) %SET-ARRAY-OFFSET (ARRAY) \\FM.LAYOUTGRID (ROW GRID TAIL -SUBGROUPIDS ITEMLIST GROUPLIST EXTENT) \\ASSIGNDATATYPE1 (DTD NEWDTD) \\DSPFONT.DISPLAY (DD) -XIPAPPEND.WORD (XIP) SEDIT::COPY-NODE (SEDIT::NEW-NODE SEDIT::SUBNODE) \\TEDIT.ADJUST.LINES (LL) -SEDIT::COMPUTE-COMMENT-COLUMN (SEDIT::CONTEXT) \\PROCESS.MAKEFRAME (PROC) \\SPP.NOT.RESPONDING (CON) -UTF8.OUTCHARFN (STREAM) \\SHAPEW2 (WINDOW) \\INSERTTREE (NEW PCNODE) \\MEDW.CLOSEW (SCREEN WINDOW) -DINFO.ADD.FMENU (GRAPH) POSTSCRIPT.ENDPAGE (IMAGEDATA) ACCESSDEF (TL R) \\UPDATE.PBT.RASTERWIDTHS (PBT -) \\LEAF.FLUSH.CACHE (SEQUIN) /MAPCONC (MAPE) SETINTERRUPT (TEM) \\NOFILESNEXTFILEFN (GENFILESTATE -TYPE) TERM.NEWLINE (CHAT.STATE) CLISPELL (RESPELLTAIL) LISPXUSE1 (E) SEDIT::CLOSE-NODE-COMMENT ( -SEDIT::CONTEXT) |\\PFFindPageAddr| (|file|) \\FIXDLINES (LINE TEXTOBJ PL NL) RESETGRID.NEW (GRIDSPEC) -\\NSRANDOM.WRITEPAGES (STREAM) EXTEND/TRANSITION/CHAIN (LTAIL) \\DSPYPOSITION.DISPLAY (DD) -|\\VFMGetBufferFor| (LAST) \\FM.LAYOUTCOLUMN (COLUMN SUBGROUPIDS ITEMLIST GROUPLIST EXTENT) DELFROMCOM - (TEM BLOCK X) SEDIT::UNDO-EXTRACT (SEDIT::SUBNODE) \\DSPRIGHTMARGIN.DISPLAY (DD) \\NSRANDOM.READPAGES - (STREAM) \\DSPSCALE.PSC (IMAGEDATA) \\PROMPTWINDOW.EXPAND (PWINDOWPROP) \\HANDLE.RAW.PUP (PACKET NDB -ENTRY) \\FM.LAYOUTROW (ROW SUBGROUPIDS ITEMLIST GROUPLIST EXTENT) \\MAIKO.ETHER-INTERRUPT (PACKET) -DELFROMCOM1 (COM) \\DRAWLINE.UFN (FIRSTADDR) CLISPFOR1 (BODYTAIL Z PTRS LST1) UNMAKEHARDCOPYMODESTREAM - (DS) \\DO.PROGV.SETUP.FRAME.AND.EXECUTE (NT CALLER) SEDIT::REDO (SEDIT::CONTEXT) \\SMASHBSPSTREAM ( -OLDSTREAM OUTSTREAM SOCKET) SEDIT::COMPUTE-SELECTION-POSITION-DEFAULT (SEDIT::SELECTION) -DINFO.INVERT.NODE (DINFO.GRAPH NODE LAST.NODE) COMP.BIND.VARS (VAR) \\AGE.ROUTING.TABLE (ENTRY TAIL -BUCKET) BRKDWNSETUP (TEM) RAISE/TRANSITION/CHAIN (P) \\DELETECH (TEXTOBJ PC1 HIPC) \\RELEASE.IOCB ( -IOCB) \\INIT.RTPPROCESS (SOCKET) \\TEDIT.SHOW.CHARLOOKS (SEL) POSTSCRIPT.PUTCOMMAND (IMAGEDATA) -\\MAIKO.10MBSENDPACKET (COPYPACKET PACKET) \\NSRANDOM.SESSION.WATCHER (DEVINFO) \\DSPCOLOR.DISPLAY ( -COLORCELL DD) EXTENDREGIONBOTTOM (REG) PRETTYFILEINDEX (STREAM) \\SPP.RETRANSMIT.NEXT (XIP CON) -COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::OUTER-REFERENCES) INSERTLINE (OLDEND OLDLINE) RESETKEYACTION - (TABLE) \\TFBRAVO.LCASER (L) \\MEDW.OPENW (WINDOW SCREEN) \\DSPBACKCOLOR.DISPLAY (COLORCELL DD) COPY -(TAIL) ADDMENU (ADDEDMENU) SEDIT::VERIFY-STRUCTURE (SEDIT::CONTEXT SEDIT::ROOT) DINFO.LAYOUTGRAPH ( -DINFO.GRAPH) \\SELECTPROCESS (PROCNAMES) \\TEDIT.FIXINSSEL (SELTOFIX) SPAWN.MOUSE (MOUSEPROC) -\\UNBOXFLOAT3 (AL) TEDIT.SELECT.LINE.SCANNER (L L1 LN LL) \\FM.FORMATEXPLICIT (SUBGROUPIDS ITEMLIST -GROUPLIST) \\GCRECLAIMCELL (PTR DTD) CHECK/MENU/IMAGE (MENU) DINFO.DEFAULT.MENU (GRAPH) COMP.LABELS (X -) \\MAPPNAME.INTERNAL (\\MAPPNAMESTREAM) SEDIT::OUTPUT-STRING (SEDIT::THIS-ITEM SEDIT::CONTEXT) -\\CORE.RELEASEPAGES (P) COMP.TAGBODY (X F) \\MEDW.CREATEW (WINDOW DISPLAYDATA) \\CORE.UPDATEOF (STREAM -) SHADEITEM (ITEMREGION) SHAPEW1 (WINDOW) \\RTP.ACTION (SOCKET) \\TEDIT.NEUTRALIZE.CHARLOOKS (SEL) -\\PROCESS.GO.TO.SLEEP (EVLOCK PROC HEAD PREV OLDPROC) \\CORE.CLOSEFILE (STREAM) PUTMENUPROP (MENU) -\\MAIKO.10MBSTARTDRIVER (NDB) \\HCPYMODEDSPPRINTCHAR (STREAM) \\POP.N.UFN (AL) INTPOWERS (AR) -\\POLYSHADE.XSCAN.IP (|fulllist| |currlist|) \\CORE.FINDPAGE (PE PREVTAIL STREAM) /MAPCON (MAPE) -\\NSRANDOM.TRUNCATEFILE (STREAM) ADDNEWCOM (TAIL) TEDIT.PUT (TEXTOBJ PC) DIRECTORY.MATCH.SETUP (TAIL) -SEDIT::CFV-COMMENT (SEDIT::NODE) TEDIT.GET.OBJECT0 (PIECE) \\SETPOS.PSC (IMAGEDATA) CLOSERTPSOCKET ( -SOCKET) CHOOZ (VAL) CLISP3C (L2 L1) \\CORE.NEXTFILEFN (GENFILESTATE) HEADINGOP.IP (IPDATA) -SEDIT::SET-SELECTION-STRING (SEDIT::SELECTION) FB.MAYBE.INSERT.FILE (TAIL NEWITEM) \\TERPRI.PSC ( -STREAM) IDLE.BITMAP (BOX) \\TFBRAVO.INIT.PARALOOKS (INITPARALOOKS) FIXAPPLY1 (XTAIL) -\\NSRANDOM.DESTROY.STREAM (STREAM) ENDPREAMBLE.IP (IPDATA) |\\PFCreateVols| (|lv|) TEDIT.UNDO.MOVE ( -EVENT) LOADFNS (DONELST) /LISTPUT1 (X) \\CORE.GETINFOBLOCK (I SCR) SEDIT::COMPUTE-ALL-FORMATS ( -SEDIT::CONTEXT) |\\PFRemoveDirectoryID| (|rootDir|) \\TEDIT.FIXDELSEL (SELTOFIX) \\CORE.DELETEFILE ( -VERSTAIL EXTTAIL NAMETAIL INFOBLOCK) TEDIT.PUT.PCTB2 (PC TEXTOBJ) SEDIT::OUTPUT-SPACE (SEDIT::CONTEXT) - \\CORE.GETFILEHANDLE (INFOBLOCK) GLCCODE (X) SEDIT::OUTPUT-BITMAP (SEDIT::CONTEXT) EDITBM (BM) -POSTSCRIPT.GETFONTID (FONTID) \\TEDIT.DELETE (SEL) \\RTP.SHOW.FAILURE (SOCKET) ASSURE.PUP.READY (NDB) -RECORDTRAN (UNUSED) SHOW.IP (IPDATA) SORT.PUPHOSTS.BY.DISTANCE (HOSTLIST) \\NSRANDOM.CREATE.STREAM ( -HANDLE S) SEDIT::SET-SELECTION-LITATOM (SEDIT::SELECTION) MB.NB.WHENOPERATEDFN (SEL) DINFO (GRAPH) -/LISTPUT (LST) \\BSP.HANDLE.INPUT (BSPSOCKET) FB.FINISH.COMMAND (BROWSER) MAKEINITLAST (V) -CHAT.STARTUP (TEM) |\\PFFindDirectoryID| (|rootDir|) SEDIT::CREATE-NULL-LIST (SEDIT::NODE) ADDTOVAR ( -VAL) FORWARD.DELETE.TO (L) CLISPIF2 (TEM2 TEM1) \\FILLINXIP (EPKT) TEDIT.UNDO.REPLACE (OLDEVENT EVENT -SEL) \\10MBRAWENCAPSULATE (PACKET) SEDIT::CFV-DOTLIST (SEDIT::X) %MAKE-STRING-ARRAY-FAT (BASE-ARRAY) -SEDIT::BACKSPACE-COMMENT (SEDIT::POINT) GNCCODE (X STRING) EXTENDREGION (REGION) CL:UNION ( -CL::LIST1-EXTRAS-TAIL) \\FM.FORMATBYROW (DESCRIPTION ROWIDS ITEMLIST GROUPLIST) COPY.TEXT.TO.IMAGE ( -INSTRM) \\10MBRAWRECEIVE (PACKET) \\SLOWHDCPYBLTCHAR (DD PILOTBBT) \\TEDIT.CENTER.SEL (NEWQUADS) -\\LEAF.REQUESTPAGE (STREAM DATA CACHE) /DREMOVE (Y) DSPSCROLL (DD) \\BUILDSLUGCSINFO (CSINFO) -TERM.GODOWN (CHAT.STATE) UNION (TAIL) SPP.FORCEOUTPUT (STREAM CON EPKT) \\FM.FORMATBYGRID (ROWIDS -ITEMLIST GROUPLIST ALIGNREGION) \\POLYSHADE.DISPLAY (|fulllist| |currlist| GEOM |scan|) -\\CORE.NAMESCAN (NAMELST) TEDIT.GET.CHARLOOKS0 (PC LOOKS) \\FM.FORMATBYCOLUMN (COLUMNIDS ITEMLIST -GROUPLIST) MB.MARGINBAR.SELFN (OBJDATUM TAB) MOVETOP (Z Y L) AS.NEXT.VERIFIER (L) MENUDESELECT (MENU) -\\TEDIT.TEXTBIN.STRINGSETUP (STREAM) \\MAKEPCTB (PCTB PC1) \\HANDLE.PUP.ROUTING.INFO (ENTRY) -CL:NINTERSECTION (CL::RESULT-TAIL) \\NSFILING.FILLIN.ATTRIBUTES (HANDLE) SEDIT::SET-POINT-STRING ( -SEDIT::POINT) \\TEDIT.DIFFUSE.PARALOOKS (PC) SEDIT::BUILD-NODE (SEDIT::CONTEXT) -|\\PFCreatePhysicalVolume| (|physicalVol|) /DWIMCHECKTRAN (X) \\DURATIONTRAN (X) ONED.TRACKCURSOR ( -SELECTION) CL:NSET-DIFFERENCE (CL::RESULT-TAIL) PURGEHISTORY1 (LST) CL:NUNION (CL::LIST1-EXTRAS-TAIL) -\\TEDIT.COPY.PIECEMAPFN (PC) SEDIT::BUILD-LINEAR-FORM (SEDIT::CONTEXT SEDIT::ROOT) \\CORE.OPENFILE ( -INFOBLK NAME STREAM) |\\PFInsertDirectoryID| (|rootDir|) DELETE.LONG.SEGMENT1 (STARTLINE ENDLINE) -MSTRYSPELL (PTR) CL:NSET-EXCLUSIVE-OR (CL::RESULT-TAIL) DIRECTORY.NEXTFILE (FG) |\\VFMGenerateFileIDs| - (|currentKey|) MBUTTON.FIND.NEXT.FIELD (SCRATCHSEL) \\ROUTE.XIP (XIP) FILL.INITTBLE (FCBBT) -UNSAVEBLOCK? (ENTRIES) \\FM.FORMAT (DESCRIPTION EXTENT) \\CHANGECHARSET.HDCPYDISPLAY (DISPLAYDATA) -\\LEAF.LOOKUPCACHE (PREV STREAM) COMP.PROG (X F) \\OPENLEAFCONNECTION (CONN DATA OPUP) |\\LFFileSpec| -(UNPACKEDNAME) FB.COPY/RENAME.MANY (FBROWSER FILELIST) \\DOHARDRETURN1 (RETURNER NEW RETURNEE) -\\DSPSPACEFACTOR.PSC (IMAGEDATA) MAKEHARDCOPYMODESTREAM (DS) SETPROPLIST (ATM) APPENDTOVAR (VAL) -\\UNBOXFLOAT2 (AL) TEDIT.GET.PARALOOKS0 (PC LOOKS TABSPEC) MARKASCHANGED (L) OPT.DREV (Y) MENUSELECT ( -MENU) \\CORE.SETFILEPTR (STREAM) \\TEDIT.TEXTBIN.FILESETUP (STREAM) DIRECTORY (COMTAIL PREVTAIL SEENP) - \\ROUTE.PUP (PUP) DSPEOLFN (DD) \\NSFILING.FULLNAME (HANDLE) SEDIT::SET-POINT-LITATOM (SEDIT::POINT) -\\CORE.BACKFILEPTR (STREAM) \\FM.STATE-SETUP (ITEM) SEDIT::NEW-BLOCK (CL:BLOCK) -\\COREFILE.SETPARAMETERS (STREAM INFOBLK) \\SETUP.TYPENUM.TABLE (DTD) \\COURIER.CHECK.PROCEDURES ( -FNDEF) CHANGEPROP (Z) \\CORE.SETFILEINFO (INFOBLOCK) EDITDEFAULT (EDITX) %EXTEND-ARRAY ( -EXTENDABLE-ARRAY) DO.EDIT.COMMAND (L) \\INCUSECOUNT (SCANPTR) \\FONTFILENAME (TAIL) \\FM.NWAY-SETUP ( -ITEM) MSPARSE (CONJUNCTIONS RESPELL) \\SPP.CLEANUP (CON) SEDIT::CLOSE-NODE (SEDIT::CONTEXT) -\\MOVEFRAME (NXT NEW) DO.SHIFTED.SELECTION (NEWSTART) ATTACH (L) \\FM.STATE-CHANGESTATE (ITEM) -SETTOPVAL (ATM) \\SETXIPCHECKSUM (XIP) \\CORE.SETACCESSTIME (STREAM) CALLS (X) \\HDCPYBLTCHAR ( -DISPLAYDATA LOCAL1) \\RELEASE.FTPCONNECTION (CONN) %ALTER-AS-DISPLACED-ARRAY (ADJUSTABLE-ARRAY) -OPT.RESOLVEJUMPS (X) /LCONC (PTR) %ALTER-AS-DISPLACED-TO-BASE-ARRAY (ADJUSTABLE-ARRAY) -\\FONTFACE.COLOR (ANSWER) DSUBST (EXPR) TB.NTH.ITEM (BROWSER) \\GENERIC-UNREGISTER-STREAM (DEVICE -OPENFILELST) FB.GET.NEW.FILE.SPEC (BROWSER) SEDIT::LINE-FINISHED (SEDIT::CONTEXT) EDITCOML (TEM) TCONC - (PTR) \\3MBRAWRECEIVE (PACKET) CREATEARRAYSLICE (SELECTIONDIMS OFFSETS) \\FM.3STATE-CHANGESTATE (ITEM -) \\CORE.GETNEXTBUFFER (STREAM) FIXSPELL1 (TEM) |\\VAMAdjustGroup| (|group|) EDITSAVE (X) -UNPACKFILENAME.STRING (VAL) TEDIT.SUBLOOKS (PC) SEDIT::BUILD-INTERNAL-STRUCTURE (SEDIT::CONTEXT) -\\FTP.FIX.BROKEN.INPUT (CONN) SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::SELECTION) \\NODIRCORE.OPENFILE ( -NAME) LDIFF (V) \\TERMINATESPP (CON) \\CREATE.SYMBOL (ATM PNBASE) \\ALLOCBLOCK (ABLOCK) -\\SETUPGUARDBLOCK (STKP) \\DSPCLIPPINGREGION.PSC (IMAGEDATA) \\LEAF.ABORT.FROMMENU (SEQUIN) LCONC (PTR -) \\TFBRAVO.PARSE.PROFILE.VALUE (TOKENLIST) ICONTITLE (TITLESPEC) INTERSECTION (R) \\NODIRCOREFDEV ( -FDEV) LISTPUT1 (X) \\PS.SCALEHACK (REG IMAGEDATA) \\POSTSCRIPT.OUTCHARFN (IMAGEDATA) \\UNBOXFLOAT1 (AL - VAL) \\POSTSCRIPT.ACCENTFN (IMAGEDATA) FB.COUNT.FILE.CHANGE (FBROWSER) /DREVERSE (Y) -\\TEDIT.CHANGE.LOOKS (TEXTOBJ OLDLOOKSLIST PC NEWPCLOOKS) SEDIT::ATOM-CHANGE-RELINEARIZE (SEDIT::NODE) - \\TEDIT.CARET (CARET) \\DISPLAYLINE (DISPLAYDATA) MSSEEKPHRASE (THIS X) SEDIT::SCAN-STRING ( -SEDIT::POINT-OR-SEL) \\TEDIT.REOPEN.STREAM (PC TEXTOBJ) TEDIT.GET.OBJECT1 (PIECE) \\BUFFERED.COPYBYTES - (SRC) SI::UNWIND-TO-BLIP (TARGET) \\LINEBLT (BBT) TEDIT.UNDO.PARALOOKS (NEWLOOKSLIST PC EVENT) -\\CHANGE-VISIBLE-REGION.IP (IPDATA) \\ALLOCHEIGHTTOGROUPEDWINDOW (ATW) |\\LFScavFileName| (A0417) -\\TEDIT.GET.PARALOOKS1 (LOOKS TABSPEC) EDITFPAT1 (VAL) PUTCURSORPROP (CURSOR TAIL) -\\NSRANDOM.RELEASE.LOCK (HANDLE) \\ALLOCWIDTHTOGROUPEDWINDOW (ATW) EDITSMASH (OLD) BRKDWNRESULTS (X) -TTYINBUFFERBACKPTR (STRM) \\TEDIT.FLUSH.UNUSED.LOOKS (LOOKS TEXTOBJ) \\TEDIT.MARK.LINES.DIRTY (LL -TEXTOBJ) \\COURIER.CHECK.ERRORS (ERRDEF) SEDIT::SHIFT-LINEAR-FORM (SEDIT::NODE) \\GATHER-CLEANUP-FORMS - (PROC) |\\LFUnpackName| (A0417) \\COURIER.ATTENTIONFN (CON) BRHC/LAYOUT (GN) MAPCON (MAPE) -DISCARDXIPS (NSOC) \\TEDIT.SET.SEL.LOOKS (SEL) SEDIT:SEDIT (SEDIT::CONTEXT) \\CREATEPIECEORSTREAM (PC) - \\SFLHASHLOOKUP (HASHENT) \\LEAF.ADD.QUOTES (PIECES) EDITBELOW (L0 L1) MAPLIST (MAPE) -\\CORE.SETEOFPTR (STREAM) \\DSPRESET.PSC (STREAM) DECLARERECORD (TEM) \\DELETETREE (PCNODE) -|\\LFPurgeDirectory| (|file|) |\\LFDirectoryP| (|stream|) \\READSTRIKEFONTFILE (CSINFO) MAP2CAR (MAPE) - \\FORMATLINE (TEXTSTREAM LINE TEXTOBJ THISLINE) TB.UNSELECT.ALL.ITEMS (ITEM BROWSER) \\READACFONTFILE - (CSINFO) MSVERBTYPE (MSVERB) |\\LFOpenOldFile| (|leader| |fileDesc| STREAM) EDIT4F3 (LST) -SEDIT::GENERATE-LINEAR-FORM (SEDIT::NODE SEDIT::CONTEXT) \\FM.3STATE-SETUPOFFBITMAP (ITEM) -TEDIT.UNDO.LOOKS (NEWLOOKSLIST PC TEXTOBJ EVENT) OPT.PRATTACH (NEW BEFORE AFTER) SEDIT::SET-POINT-LIST - (SEDIT::POINT) MAPCONC (MAPE) RATOMS (L) MAPCAR (MAPE) PUTASSOC (X) SEDIT::REPLACE-CHARS ( -SEDIT::OPEN-STRING STRING SEDIT::CONTEXT) \\PUTD (DCELL) FASL::STORE-VALUE (FASL::TABLE) -SI::NON-LOCAL-GO (TARGET) HISTORYFIND (VAL) %DO-LOGICAL-OP (GBBT) \\DISCARDFRAME (CHILD OLDCLINK) -ROTATE-BITMAP (ROTATE-BBT) \\BASEBYTES.IO.INIT (STREAM) \\TEDIT.GET.CHARLOOKS1 (PC LOOKS) -\\NSFILING.SET.CONTINUANCE (SESSION) CLISPIFY1 (LST) PFCOPYBYTES (STREAM SSTRM) ROTATE-BITMAP-LEFT ( -ROTATE-BBT) \\INFER.FILE.TYPE (STREAM) EDITCALLERS (FNS) PROCESSPROP (P TAIL) WTFIX1 (HISTENTRY) -CLISPFUNCTION? (TL) \\SETUPGETCH (STREAM) TEDIT.SELECTED.PIECES (TEXTOBJ PCLST) RESET/NODE/LABELSHADE -(NODE) \\BASEBYTES.BOUT (STREAM) SETFILEPTR (STREAM) MENUWRESHAPEFN (MENU) \\DELETEPIECE (NEXT PREV) -\\GETFTPCONNECTION (CONN) CLISPATOM (TAIL) MARK/GRAPH/NODE (NODE) TEDIT.FORMATBOX (LINE -FORMATTINGSTATE) SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (SEDIT::FOLLOWING-LINE SEDIT::EXTENT) -INFILECOMS? (VAL) SEDIT::REPLACE-QUOTE (SEDIT::SUBNODE) %FAST-COPY-BASE (PBBT) \\TEDIT.RESHAPEFN ( -TEXTOBJ LINE LINES) \\TEDIT.INSERT.PIECES (TEXTOBJ PC) CLEARSTK (PTR) \\FM.3STATE-SETUP (ITEM) -\\TEDIT.CUMULATE.EVENTS (PC NEWPC1) \\HDCPYDISPLAY.FIX.YPOS (DD) \\LEAF.SETCREATIONDATE (DATA INFOBLK) - \\LEAF.DELETEFILE (DATA STREAM) FILEBROWSER (BROWSER) \\BASEBYTES.SETFILEPTR (STREAM) -\\MAKEBASEBYTESTREAM (OSTREAM) TB.DESELECTRANGE (BROWSER) |\\LFCreateFile| (|stream|) \\MBS.OUTCHARFN -(STREAM) TB.UNDELETE.ITEM (ITEM) \\SETUPSTACK1 (SP STKP) TEDIT.OBJECT.CHANGED (TEXTOBJ) -\\BASEBYTES.TRUNCATEFN (STREAM) CLISPRPLNODE (X) SEDIT::REPLACE-LIST (SEDIT::X SEDIT::INSERT-AFTER -SEDIT::NODE SEDIT::CARET SEDIT::SELECTION) TEDIT.PUT.PCTB (OFILE PC TEXTOBJ) FB.UPDATEBROWSERITEMS ( -BROWSER SPEC) TEDIT.DO.BLUEPENDINGDELETE (SEL) EDITBMSCROLLFN (EXTENT) COPYIMAGEOBJ (TO) -SEDIT::SELECT-SEGMENT (SEDIT::SELECTION) TEDIT.RAW.INCLUDE (TEXTOBJ SEL) TB.INSERT.ITEM (BROWSER TAIL) - \\TEDIT.CLOSEUPLINES (LINE) SUBSET (TAIL) \\BACKFORMAT (NLINE LINES LINE1) TEDIT.UNPARSE.PAGEFORMAT ( -HEADINGS) \\CENTICLOCK (CLK) \\BASEBYTES.BLOCKIO (STREAM) \\FM.TOGGLE-CHANGESTATE (ITEM) PRINTERDEVICE - (DEV STREAM) UNDONLSETQ1 (LST) \\LEAF.GETFILE (CACHEDSTREAM CONNECTION DATA OLDSTREAM) -SET-READTABLE-INTERACTIVELY (READTABLES) CURSORPOSITION (OLDPOSITION) SEDIT::THROW-AWAY-CHANGES ( -SEDIT::CONTEXT) \\STRINGSTREAM.INIT (STREAM) SEDIT::SETUP-NEW-CONTEXT (SEDIT::CONTEXT) TB.SELECTRANGE -(ITEM BROWSER) UNDOLISPX2 (TEM Y) COMP.LAM1 (X) |\\LFUpdateLeaderPage| (|leaderPage| |stream|) -ICMLARRAY.GETREGIONFN (INFO MOVINGPOINT) OPENSTRINGSTREAM (STREAM) DSPDESTINATION (DISPLAYSTREAM DD) -IDLE.BOUNCING.BOX (TAIL) CLOSENSOCKET (NSOC) SEDIT::CLEAR-LINEAR-FORM (SEDIT::NODE) \\SENDSPP (CON -EPKT) TTYINBUFFERBIN (STRM) \\MAIKO.DISPLAYLINE (DISPLAYDATA) CL:VECTOR-POP (VECTOR) -\\MAKE.ITEMS.VERT.ORDER (R) \\TELERAIDSEND (PACKET) TEDIT.MAKESEL (SEL) \\TEDIT.FIND (SEL TEXTOBJ) -COMP.DECLARE1 (V) MAKECOM (LST) ADDTOCOM1 (NEAR COM) \\MAKE.PROCESS0 (HANDLE) \\TEDIT.HISTORYADD ( -TEXTOBJ) FILING.CALL (SESSION STREAM) \\PUSHSTATE.IP (|State|) NIL -PROP \\FM.UPDATEGROUPEXTENT (REGION ITEMS DAUGHTERS BOX BOXSPACE) LOAD? (FILEDATES FILE) -MSINTERPRETSET (CLISPWORD) \\FM.WINDOWEXTENT (REGION INFINITEWIDTH) READVISE1 (READVICE) -\\FM.EDIT-SETUP (BOX MAXWIDTH BOXOFFSET LABELMAXWIDTH INFINITEWIDTH) \\TEDIT.PARSE.PARALOOKS.LIST ( +SEDIT::CONTEXT) ECHOMODE (TTBL) \LFWritePages (stream) \FM.JUSTIFYITEMS (ITEMREGION ITEMMAXREGION) +RECORDTRAN (UNUSED) FW-RECALL-CMD (RECALL-OFD) \PROMPTWINDOW.EXPAND (PWINDOWPROP) +BULKDATA.GENERATE.NEXT (GENSTATE) CLISPIF2 (TEM2 TEM1) PUTMENUPROP (MENU) DMCHAT.RIGHT (CHAT.STATE) +\MAIKO.CONS.UFN (CELL PAGE .MK.NEWCELL CNS.PAGE) /MAPCON (MAPE) \BN.MADD (TT TTT) +COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::OUTER-REFERENCES) POSTSCRIPT.FONTSAVAILABLE (RAWFD) \DEQUEUE + (Q ITEM) \MEDW.CREATEW (WINDOW DISPLAYDATA) RELSTK (POS) \SETSPACE.PRESS (PRDATA) RAISE (TTBL) +SEDIT::BACKSPACE-LIST (SEDIT::POINT) CHAT.MENU (STATE) GRAPHDELETELINK (FROM TO) +\SEQUIN.RETRANSMITNEXT (NEXTPUP SEQUIN) SEDIT::COMPUTE-POINT-POSITION-LITATOM (SEDIT::POINT) +TEDIT.DELETELINE (PREV NEXT) \CLOSELEAFCONNECTION (DEVICE) RESETTERMTABLE (TT) \LFOpenFile (STREAM) +\FM.LAYOUTGRID (ROW GRID TAIL SUBGROUPIDS ITEMLIST GROUPLIST EXTENT) SEDIT::PARSE--GAP (SEDIT::NEW-NODE +) COMP.LABELS (X) ACCESSDEF (TL R) SENDXIP (XIP) \TEDIT.BASICFIND (TEXTOBJ) \TFBRAVO.INIT.CHARLOOKS ( +LOOKS) TWOD.TRACKCURSOR (SELECTION) \10MB.OUTPUT.INTERRUPT (NEXTPACKET) TEDIT.DEACTIVATE.WINDOW ( +TEXTOBJ) GRAPHDELETENODE (GRAPH) DOCOLLECT (LST) \UFS.NEXTFILEFN (GENFILESTATE SUBGEN) FB.AFTERCLOSEFN + (FBROWSER) \REQUEUE.ETHERPACKET (PACKET) ENDCOLLECT (X) \PROG0 (NT PROGFRAME) PFI.HANDLE.RPAQQ ( +COMSINFO) CLISP% (CLISPTEM) SEDIT::SET-PROPS (SEDIT::CONTEXT) \VAMFreePageGroup (vol) \DOFORMATTING ( +LINE THISLINE) DINFO.READ.GRAPH (GRAPH) \FIXLOCALNET (PORT) \INITCONSPAGE (BASE CELL) ADDNEWCOM (TAIL) + /LISTPUT1 (X) TEDIT.SHOWSEL (SEL) EXTENDREGIONBOTTOM (REG) \SET.PROCESS.NAME (PROC) \NSFILING.EVENTFN + (RANDEVICE) PRINTERROR (ERR PR) SPP.OPEN (CON) TEDIT.MINIMAL.WINDOW.SETUP (TEXTOBJ OLDWINDOWS) +TB.DISPLAY.LINES (BROWSER) TEDIT.GET (TEXTOBJ FIRSTLINE SEL) SEDIT::SELECT-NODE-SEGMENT (SEDIT::SELECTION +) LASTN (Y) \FIXLINELENGTH.PRESS (PRSTREAM) \GET.PRIORITY.QUEUE (PREV) /DSUBST (EXPR) +\POLYSHADE.YSCAN.IP (fulllist currlist) \SPP.SENDPKT (BASE CON) VKBD.FIX.FONT (X) CHOOZ (VAL) CLISP3C +(L2 L1) \EVALA (NT CALLER) LATTICE/BREAK/CYCLES (NODE DTAIL) FORWARD.DELETE.TO (L) /ATTACH (LST) +\SUBREAD (STRM END DOTLOC) RESETREADTABLE (RDTBL) \DL.MARK.PAGES.UNAVAILABLE (RPTBASE) SEDIT::SET-OPTIONS + (SEDIT::CONTEXT) PUTTEXTPROP (TEXTOBJ) \TEDIT.FIND.FIRST.LINE (LINES LINE) /LISTPUT (LST) /RPLACD ( +LST) /RPLACA (LST) SEDIT::ASSIGN-FORMAT-LIST (SEDIT::NODE) DINFO.FMW.CLOSEFN (GRAPH) +\ADJUSTABLE-STRING-STREAM-OUTCHARFN (STREAM) ESCAPE (RDTBL) \SEQUIN.HANDLE.INPUT (PUP SEQUIN) TERM.UP +(CHAT.STATE) \TOP-LEVEL-READ (STREAM) \UNWIND.PROCESS (P) SEDIT::CLOSE-NODE-LITATOM (SEDIT::CONTEXT +SEDIT::NODE SEDIT::STRING-ITEM) MAKE-FILL-POINTER-OUTPUT-STREAM (STREAM) SEDIT::FIND-NODE (SEDIT::CONTEXT +) \LFGenerateFiles (A0493) \FM.LAYOUTCOLUMN (COLUMN SUBGROUPIDS ITEMLIST GROUPLIST EXTENT) DEL.PROCESS + (P) \STRING-STREAM-OUTCHARFN (STREAM) SEDIT::PARSE (SEDIT::CONTEXT) COMP.BIND.VARS (VAR) COMP.TAGBODY + (X F) FB.HARDCOPY.DIRECTORY (PAIR) \NSRANDOM.FETCH.CACHE (PREV TAIL CACHE PAIR) MOVETOP (Z Y L) \LET0 + (NT PROGFRAME) /DWIMCHECKTRAN (X) READMACROS (RDTBL) TTRACKMOUSE (OLDROW/COL) READTABLEPROP (RDTBL) +GENERATOR (COMVAR##) \LET* (NT PROGFRAME) SKIPSEPRCODES (STRM) /PUTASSOC (X) +%%BROADCAST-STREAM-DEVICE-OUTCHARFN (STREAM) \NSRANDOM.RELEASE.HANDLE (STREAM HANDLE) +SEDIT::SET-SELECTION-COMMENT-WORD (SEDIT::SELECTION) DIRECTORY.NEXTFILE (FG) \FM.LAYOUTROW (ROW +SUBGROUPIDS ITEMLIST GROUPLIST EXTENT) TB.REPLACE.ITEMS (BROWSER) RECORDPRIORITY (DECL) \DSPCOLOR.IP ( +IPDATA) \DSPYPOSITION.HCPYMODE (DD) PUTSTREAMPROP (STREAM TAIL) \DURATIONTRAN (X) MAKEFILE (FILEPROP) +LAYOUTGRAPH (G) INITIALIZECOLOR.IP (IPDATA) \VAMAllocPageGroup (vol groupPtr) DSPEOLFN (DD) +\DSPCLIPPINGREGION.PRESS (PRDATA) RESTART.PROCESS (P) POSTSCRIPT.SHOWACCUM (IMAGEDATA) +\SEQUIN.RETRANSMIT (SEQUIN QUEUE) MSSHOWUSE (X) MSSOLVE (SET REP QT) \LOADNSHOSTNUMBER (OLDBOX) +\LFEventFn (Dev) \LFReturnNextFile (GENERATED) WAKE.PROCESS (P) EDITL1 (EDITHIST) \SUSPEND.PROCESS ( +PROC PREV PQHEAD) %%CONCATENATED-STREAM-DEVICE-CLOSEFILE (stream) SEDIT::FINALIZE-MOUSE-SELECTION ( +SEDIT::CONTEXT) EXTENDREGION (REGION) RESETUNDO (UNDOSIDE X) TB.SET.FONT (BROWSER EXTENT) +\TEXTMENU.TOGGLE.WHENOPERATEDFN (SEL) CL:FLOAT-SIGN (CL::OLD-BOX) PROCESS.RESULT (PROCESS) +\TEDIT.INSERTLINE (NEWLINE BEFORELINE PREVLINE) \TEXTBACKFILEPTR (STREAM REALFILE) \FTP.NEXTFILE ( +GENSTATE) \SEND.ANSWERING.RFC (SOCKET OPUP) TEDIT.COPY (FROM TOOBJ TO FROMOBJ) /LCONC (PTR) +\SEQUIN.FLUSH.CONNECTION (SEQUIN) \LEAF.GETFILEDATES (STREAM) LISTPUT (LST) \SPPWATCHER (SPPCON) +MSCHECKBLOCK (ERRORS) TEDIT.KILL (STREAM) LISPX (LISPXHIST) FOREST/BREAK/CYCLES (NODE DTAIL) DUMPGRAPH + (IDS FONTS BORDERS SHADES) MENUSELECT (MENU) MENUDESELECT (MENU) %%SYNONYM-STREAM-DEVICE-CLOSEFILE ( +STREAM) \NSRANDOM.READ.SEGMENT (PAIR HANDLE) PRIN2-LONG-STRING (ENTRY) \FM.FORMATEXPLICIT (SUBGROUPIDS + ITEMLIST GROUPLIST) \FM.FORMATBYGRID (ROWIDS ITEMLIST GROUPLIST ALIGNREGION) TERM.RESET.DISPLAY.PARMS + (CHAT.STATE) \FUNCT1 (NT FUNCTFRAME) TEDIT.CARETLOOKS (TEXTOBJ) \MAKESTACKP (ED) \PFTrimHelper ( +filePtr group) SPP.DSTYPE (EPKT CON) %%BROADCAST-STREAM-DEVICE-CLOSEFILE (STREAM) +%%SYNONYM-STREAM-DEVICE-OUTCHARFN (STREAM) DMCHAT.HANDLECHARACTER (DM2500.STATE CHAT.STATE) +NOTIFY.EVENT (EVENT TAIL PROC) \FM.NWAY-SETUP (ITEM) CL:GET-OUTPUT-STREAM-STRING (STRING-OUTPUT-STREAM +) INIT/NODES/FOR/LAYOUT (GN) DMCHAT.CLEARMODES (DM2500.STATE CHAT.STATE) \NSRANDOM.PREPARE.CACHE ( +STREAM PREV PREVFREE CACHE HEAD) FILEPKGCOM (TEM2 COM) PURGEHISTORY1 (LST) \FLUSHPAGE (RPTR) \RSTRING2 + (ANSTAIL STRM) \DSPSPACEFACTOR.HCPYMODE (DDATA) \POLYSHADE.XSCAN.IP (fulllist currlist) CALLS (X) +POSTSCRIPT.INIT (OLDPSCFD FP) READGRAPH (GRAPH) READ-EXTENDED-TOKEN (ANSTAIL) \SETMACROSYNTAX (TBL) +POSTSCRIPT.CLOSESTRING (IMAGEDATA) \VFMInsertPageGroup (key) \NSFILING.LOOKUP.CACHE (CONNECTION CACHE) + %%TWO-WAY-STREAM-DEVICE-OUTCHARFN (STREAM) EDITCHANGELABEL (NODE) \NSFILING.UPDATE.ATTRIBUTES (HANDLE +) \NSFILING.LOGIN (DEVINFO RANDEVICE) \INSERTCR (INPC TEXTOBJ) \TEDIT.PEEKBIN.NEW.PAGE (FILE STREAM) +\TEXTPEEKBIN (PS STREAM) \DSPFONT.PRESS (PRDATA) \FTP.CLOSEFILE (STREAM) /DREVERSE (Y) +FB.SET.DEFAULT.NAME.WIDTH (BROWSER) %%TWO-WAY-STREAM-DEVICE-CLOSEFILE (stream STREAMDEVICE) +\NSRANDOM.STREAM.CHANGED (OLDSTREAM) \LFSortFiles (FILES) \SETUP.TYPENUM.TABLE (DTD) +SEDIT::SET-POINT-COMMENT (SEDIT::POINT) \MOVEREALPAGE (DESTRPT) \SELECTREALPAGE (RPTBASE PREVRPT) +\SETACCESS (STREAM) \10MBENCAPSULATE (PACKET) %%FILL-POINTER-STREAM-DEVICE-CLOSEFILE (STREAM) +TEDIT.INSERT.UPDATESCREEN (SEL TEXTOBJ) \FTP.GENERATEFILES (CONNECTION) \UPDATECHAIN (CHAIN0 CHAIN1) +POSITION (STRM) \FM.STATE-CHANGESTATE (ITEM) \MAIKO.DISPLAYLINE (DISPLAYDATA) \LEAF.FIX.BROKEN.SEQUIN +(ACKEDQ SEQUIN UNANSWEREDPUPS RETRANSQ) CREATE.PACKET.EXCHANGE.XIP (XIP) \FM.FORMATBYCOLUMN (COLUMNIDS + ITEMLIST GROUPLIST) PROCESS.WINDOW (P) SEDIT::KILL-NODE (SEDIT::NODE) COMP.PROG (X F) +ONED.TRACKCURSOR (SELECTION) \INSTALL.EXTERNALFORMAT (EXTERNALFORMAT) \NSFILING.ADD.TO.CACHE (CACHE +SESSION) \GC.HANDLEOVERFLOW (CELL PTR) \TFBRAVO.HANDLE.HEADING (PARALOOKS) \PFPutRootDirectoryType ( +vol markerPage) \SPP.PREPARE.INPUT (STREAM CON) \DEFINEFONT.PRESS (PRDATA) \NSFILING.DISCARD.SESSION ( +SESSION) ADDTO (PTR) DECLARERECORD (TEM) \FTP.ADD.QUOTES (PIECES) CHAT.TTYENTRYFN (STATE) +SEDIT::ADJUST-WIDTH (SEDIT::STRING-ITEM SEDIT::NODE) \SETBSPTIMEOUT (SOCKET) CHAT.TYPEOUT.CLOSE ( +CHAT.STATE) \LEAF.HANDLE.INPUT (PUP STREAM DONEPUP) \FM.FORMATBYROW (DESCRIPTION ROWIDS ITEMLIST +GROUPLIST) DREMOVE (L) SEDIT::INSERT-CHANGED (LIST) \TEXTMENU.TOGGLEFN (SEL) \TEDIT.CHARDELETE ( +SCRATCHSTRING SEL) OPENNSOCKET (NSOC) SEDIT::SET-POINT-COMMENT-WORD (SEDIT::POINT) \GCMAPTABLE (CELL +DTD) DMCHAT.STATE (CHAT.STATE) FONTCREATE (FONTX) \INSERTCH (\INPC TEXTOBJ NEWPC) +SEDIT::CONVERT-COMMENT-TAIL (STREAM) TEDIT.REMOVE.MENUITEM (MENU) \LFFindInfo (FILE STREAM) OPT.DREV ( +Y) SETSYNONYM (KEYLST) \INTERNAL/SETPASSWORD (NAME/PASS INFO) UNDOLISPX2 (TEM Y) \DSPFONT.HCPYMODE (DD +) \POLYSHADE.DISPLAY (fulllist currlist GEOM scan) \FM.STATE-SETUP (ITEM) SEDIT::CREATE-SIMPLE-NODE ( +SEDIT::NEW-NODE) \LEAF.TIMEDIN (SEQUIN) FILL.INITTBLE (FCBBT) \TRANSMIT.STRATEGY (SOCKET PUP) +EDITBMSCROLLFN (EXTENT) PROCESS.EVAL (ME) ESPATTERN (Y) \SPP.CREATE.STREAMS (CON INSTREAM OUTSTREAM) +\TEDIT.COMMAND.RESET.SETUP (TEXTOBJ) \ALLOCWIDTHTOGROUPEDWINDOW (ATW) TEDIT.REDO.REPLACE (SEL EVENT +OLDEVENT) COMP.BLOCK (F) HISTORYSAVE (TEM X HISTORY L Y) \SETFVAR.UFN (VCELL) OPT.RESOLVEJUMPS (X) +TTYIN (\TTYINSTATE \ENDBUFFER) \SEND.RFC (PUP SOCKET) \TEDIT.SET-TOTLEN (PCNODE) \FLUSHPUPSOCQUEUE ( +PUPSOC) MAKEINITBFS (FIRSTCB) EDITCALLERS (FNS) \FLUSHNSOCQUEUE (NSOC) \BSP.SENDBUFFER (PUP STREAM) +SORT1 (TM L A) CLISPRPLNODE (X) \FM.FORMAT (DESCRIPTION EXTENT) INTERPRESS.OUTCHARFN (IPDATA) +\DECODETRANSITION (KEYSTATE) MERGE (ATAIL B) TTYIN.READ (STREAM) \FM.3STATE-CHANGESTATE (ITEM) +\TEDIT.HARDCOPY.FORMATLINE (TEXTSTREAM LINE THISLINE) \LEAF.TIMEDOUT (SEQUIN) \LEAF.RECONNECT (INFO) +\SETXFORM.PSC (IMAGEDATA) CLISPIFY1 (LST) HISTORYFIND (VAL) \PROCESS.EVAL1 (..PEV-PROC..) +FB.FASTSEECOMMAND (BROWSER) \BUILD.EXPEDITED.XIP (XIP) TTYINBUFFERBIN (STRM) DO.SHIFTED.SELECTION ( +NEWSTART) TTYIN.FINISH (TL) GRAPHADDNODE (GRAPH) \TEDIT.RESTARTFN (TEXT) \SEQUIN.CONTROL (PUP) +TERM.TAB (CHAT.STATE) DCODERD (CA) RELEASINGVMEMPAGE (PTR) TB.REMOVE.ITEM (BROWSER) \MEDW.BLTCHAR ( +DISPLAYDATA LOCAL1) \NSRANDOM.ENSURE.WATCHER (DEVINFO) CLISPFUNCTION? (TL) SPP.CLEAREOM (STREAM) +\MEDW.XOFFSET (DD) \TEDIT.COPYTEXTSTREAM.PIECEMAPFN (PC) WTFIX1 (HISTENTRY) \MEDW.YOFFSET (DD) +CREATEARRAYSLICE (SELECTIONDIMS OFFSETS) MSINTERPRET (REL VAL) FB.HARDCOPY.TOFILE (HCOPYTAIL) +CLISPATOM (TAIL) \LINEBLT (BBT) \TEDIT.FIXCHANGEDLINE (THISLINE NEWLINE LINES) \NOIMAGE.DSPFONT ( +STREAM) \CREATECHARSET.IP (CSINFO) TB.USERDATA (BROWSER) \TEDIT.NEWREGIONFN (MOVINGPOINT) +\TEDIT.LINECACHE (CACHE) BRV/OFFSET (P) \TFBRAVO.READ.PARALOOKS (TEDITPARALOOKS) \TEDIT-OPEN-FONT-FILE + (EXISTING-FONTFILE-IF-ANY) CHANGE.NODEFONT.SIZE (NODE) \PROCESS.APPLY1 (..PEV-PROC..) +\TFBRAVO.FONT.FROM.CHARLOOKS (CHARLOOKS) PROCESS.APPLY (ME) \ALLOCHEIGHTTOGROUPEDWINDOW (ATW) +TEDIT.CURSOROUTFN (TEXTOBJ) PROMPTFORWORD (CHARBUFFER) GRAPHERPROP (GRAPH) \LEAF.WHENCLOSED (SEQUIN +PUP DEV) \SPP.ESTABLISH (CON) \TEDIT.WORDDELETE (SEL) PUTSEQUIN (OPUP SEQUIN) \CURSORBITSPERPIXEL ( +CURSOR) COPYIMAGEOBJ (TO) LOOKUP.NS.SERVER (ADDR) \TFBRAVO.READ.CHARLOOKS (TEDITCHARLOOKS) +\BSP.FLUSH.SOCKET.QUEUES (STREAM) INITDATATYPENAMES (DTD) \SHIFT.DOCUMENT (PC PARALOOKS) +\SPP.SKIPBYTES (STREAM) \REMOVEDEVICE.NAMES (TAIL) \TFBRAVO.PARSE.PARA (RUNS) \TEDITOUTCHARFN (STREAM) + \CLOSEFILE (STREAM) \UNQUEUE.EVENT (EVENT TAIL PROC) SEDIT::CHANGE-QUOTE (SEDIT::QUOTE-NODE) +DINFO.READ.KOTO.GRAPH (GRAPH) CHAT.INIT (STATE INSTREAM) SEDIT::STRING-OFFSET (SEDIT::POINT-OR-SELECTION +) INFILECOMS? (VAL) \ENQUEUE.EVENT/LOCK (PROC TAIL EVLOCK) FB.SHAPECOMMAND (WREG) \TEDIT.BLTCHAR ( +DDPILOTBBT) \SPP.CREATE.WATCHER (CON) TB.MAKE.BROWSER (BROWSER TAIL OLDP) \SPP.HANDLE.DATA (XIP INQ +CURRENT CON OUTSTREAM) \MOVETO.PSC (IMAGEDATA) FB.MAYBE.WIDEN.NAMES (BROWSER) OBTAIN.MONITORLOCK (LOCK + PROC) POSTSCRIPT.FONTCREATE (PSCFD FD) \TEDIT.TEXTBIN.NEW.PAGE (FILE STREAM) \MAKE.ITEMS.VERT.ORDER ( +R) \DEVICEEVENT (STREAM) \QUEUE.OUTPUT.IOCB (IOCB CSB) PARSE-NSADDRESS (ADDR) ADDTOCOM1 (NEAR COM) +FB.ADJUST.DATE.WIDTH (SPEC) SEDIT::SET-POINT-NOWHERE (SEDIT::POINT) \RTP.HANDLE.RFC (DATA PUP) +UNIX.SETDISPLAYTYPE (WINDOW) \LFVersions (RESULT) \DONEWEPHEMERALPAGE (RPTR) RELEASE.MONITORLOCK (LOCK + OWNER PREV TAIL NEXTPROC) TERM.SETMARGINS (CHAT.STATE) OPT.PRATTACH (NEW BEFORE AFTER) +TEDIT.REDO.MOVE (MOVESEL) OPENPRSTREAM (PRSTREAM PRDATA) DISCARDPUPS (SOC) TERM.SET.TAB (CHAT.STATE) +SI::MONITOR-UNWIND (LOCK OWNER PREV TAIL NEXTPROC) \FM.3STATE-SETUPOFFBITMAP (ITEM) +SEDIT::NOTE-CHANGE-IN-SIMPLE (SEDIT::TEMP SEDIT::NODE) \SEND.ACK (SOCKET DATA) SEDIT::RELINEARIZE ( +SEDIT::CONTEXT CL:BLOCK SEDIT::FIRST-LINE SEDIT::SUPER-NODE SEDIT::EXTENT) SEDIT::DETACH-NODE (SEDIT::NODE +) TEDIT.FORMATTEXTBOX (PAGEFOOTNOTES FORMATTINGSTATE LINE LINES) COPYTEXTSTREAM (TSEL NEWTEXTOBJ) +FB.DEPTHCOMMAND (FBROWSER) TTYINBUFFERBACKPTR (STRM) \RTP.FILTER (SOCKET) \SEQUIN.PUT (PUP SEQUIN) +TB.DO.ITEM.SELECTION (OLDSELECTION BROWSER) \LEAF.IDLE (SEQUIN) \SPP.RELEASE.ACKED.PACKETS (CON) +\DSPFONT.PSC (IMAGEDATA) MSPRGRECORD (X) \FM.3STATE-SETUP (ITEM) RECORDWORD (TL) TB.REDISPLAY.ITEMS ( +BROWSER) CL:VALUES (CALLER) \RELEASE.ETHERPACKET (EPKT) \SIMULATE.UNBIND (FRAME) CL:VALUES-LIST ( +CALLER) FB.INFOMENU.WHENSELECTEDFN (BROWSER) FB.SETNEWPATTERN (FBROWSER) \MAKE.PROCESS1 (PROC MP0) +\TEDIT.COPY.LINEDESCRIPTOR (TOLINE) DELETEMENU (OTHERMENUS MENU) TEDIT.FORMATFOLIO (LINE) \TEXTSETEOF +(STREAM) \RELEASEWORKINGSET (RPTR) \PROCESS.MOVEFRAME (NEW) \MATCHPCS (PC) UPDATE/MENU/IMAGE (MNU +ITEMREGION WINDOW) \DSPLEFTMARGIN.PSC (IMAGEDATA) CL::VALUES-UFN (IMMEDIATE-CALLER CALLER) +\TEDIT.SELECT.CHARACTER (SEL) SEDIT::INSERT-COMMENT-CHARS (SEDIT::SUBNODE SEDIT::SUBNODES) +SORT.NSADDRESSES.BY.DISTANCE (HOSTLIST) \10MBSENDPACKET (COPYPACKET PACKET) CL::VALUES-LIST-UFN ( +IMMEDIATE-CALLER CALLER) \LEAF.OPENFILE (SEQUIN STREAM) \OPENFILE (STREAM) \SPPCONNECTION (CON) +\UNQUEUE.TIMER (PREV PROC) \PAGEDBACKFILEPTR (STREAM) \CLEARSYSBUF (PROC) SET-SYMBOL (ENVIRONMENT) +PRETTY-TYPE-NAME (TYPES) \DSPPRINTCHAR (STREAM) SENDPUP (PUP) \NSFILING.CLOSE.CONNECTIONS (STREAM) +CLOSEPUPSOCKET (PUPSOC) \ENQUEUE.TIMER (PROC PREV) \CREATECHARSET (FONT) TEDIT.FORMATHEADING (LINE) +NEAREST/PT/ON/GRID (PT) SETFILEINFO (FILE) \PFAddRootDirEntry (rootDir) \RTP.CLEANUP (SOCKET) +INITDATATYPES (DTD) MENUWRESHAPEFN (MENU) \DSPCLIPPINGREGION.DISPLAY (DD) \SPP.PREPARE.OUTPUT (CON +STREAM) \COURIER.RECORDTRAN (REST) \DSPRIGHTMARGIN.PSC (IMAGEDATA) SEDIT::SCAN-FOR-BOUNDS (SEDIT::ITEM-NODE + SEDIT::ITEM SEDIT::LINE-START SEDIT::START) FILEPKGTYPE (TEM2 TYPE) \ASSIGNDATATYPE1 (DTD NEWDTD) +SEDIT::INSERT-COMMENT (SEDIT::CONTEXT) \DSPOPERATION.DISPLAY (DD BBTA0500) PRINTERDEVICE (DEV STREAM) +\FORMATBYTESTREAM (BYTESTREAM) TERM.RIGHT (CHAT.STATE) \SFFixY.HCPYMODE (PBT DISPLAYDATA) +\LEAF.WRITEPAGES (STREAM DATA) DINFO.GET.GRAPH.WINDOW (GRAPH) \BACKCOLOR.DISPLAY (DD) +\FM.TOGGLE-CHANGESTATE (ITEM) \BSP.SKIPBYTES (STREAM) SEDIT::PARENTHESIZE-CURRENT-SELECTION (SEDIT::POINT +) COMP.DECLARE1 (V) \DO.PARAMS.AT.OPEN (STREAM) \DSPOPERATION.IP (IPDATA) \ENQUEUE (Q TAILEND THISITEM + ITEM) \HANDLE.RAW.10TO3 (PACKET) SETFONTCLASSCOMPONENT (FONTCLASS) \FIXLINELENGTH.PSC (STREAM) +EDITBMBUTTONFN (EXTENT) \REVALIDATEFILE (STREAM) ICMLARRAY.GETREGIONFN (INFO MOVINGPOINT) +\IMAGEUSERPROP (IMAGEOBJ) \SPLITTREE (NEW1 PCNODE NEW2) TEDIT.CURSORMOVEDFN (CURSORREG TEXTOBJ) +OPENPUPSOCKET (PUPSOC) DELETE.LONG.SEGMENT1 (STARTLINE ENDLINE) \SEQUIN.PROCESS (SEQUIN) +TEDIT.FORMATPAGE (FORMATTINGSTATE) FB.DISPLAY.COUNTERS (LAB FBROWSER) FB.NEWINFOCOMMAND (BROWSER W) +TEDIT.REDO (SEL TEXTOBJ) COMP.DECLARE (V) CSUBST (VAL) \PAGED.REVALIDATEFILELST (STREAM) +\DRAWLINE.DISPLAY (BRUSH) SEDIT::CHECK-SELECTION (SEDIT::POINT) \TEDIT.APPLY.PAGEFORMATTING ( +OPAGEFRAMES MAINTEXT) \TEDIT.GET.CHARLOOKS (PC) \FILLCIRCLE.DISPLAY (FCBBT) \TEXTINIT (STREAM) +LISPXUSE (VARS ARGS LST) MAKECREATE1 (TEM DECLST) \LFDirectorySearch (DIRSTREAM TLIST) FORGETPAGES ( +PREVBUFFER STREAM) \XCCSOUTCHAR (STREAM) RESTOREMAP (PREVBUFFER STRM) \DSPYPOSITION.DISPLAY (DD) +\SEQUIN.CLOSE (SEQUIN) \CHANGECHARSET.HCPYMODE (DISPLAYDATA PBT) \LEAF.TRUNCATEFILE (DATA) +\PAGED.REVALIDATEFILE (STREAM) \DSPXPOSITION.DISPLAY (DD DISPLAYSTREAM) \TEDIT.FILL.IN.CHARLOOKS.MENU +(SCRATCHSEL) /RPLNODE (X) \UNWIND.UFN (CALLER) MAKEINITLAST (V) \XCCSFORMATBYTESTREAM (BYTESTREAM) +TEDIT.NEXT (SEL TEXTOBJ) \TEDIT.FORMAT.FOUNDBOX? (FORMATTINGSTATE) \GETREGION.CHECKOPPT (OPPT) +\PAGED.REVALIDATEFILES (STREAM NEWLIST) \DSPRIGHTMARGIN.DISPLAY (DD) FB.CREATE.FILEBUCKET (NEWFILEDATA +) \TEDIT.CONVERT.FOREIGN.FORMAT (TEXTOBJ) TEDIT.STYLESHEET (TEXTOBJ) \PUPERROR (PUP) COPY (TAIL) +LOADPOLY (POLY POLYPRIME) TEDIT.PARSE.PAGEFRAMES (PAGEFRAME) \BUFFERED.REVALIDATEFILE (STREAM) +\DSPFONT.DISPLAY (DD) \DELETECH (TEXTOBJ PC1 HIPC) SPP.CLEARATTENTION (STREAM) \HTFIND (ENTRY PREV +LINK) \BUFFERED.REVALIDATEFILELST (STREAM) \DRAWLINE.PSC (IMAGEDATA) SETFONTDESCRIPTOR (X) +DINFO.LOOKUP (GRAPH) \FM.TOGGLE-SETUP (ITEM) SEDIT::SET-SELECTION-NOWHERE (SEDIT::SELECTION) +\BSP.PREPARE.OUTPUT (STREAM PUP) \SETGLOBALVAL.UFN (A) \LOOKUPPUPNUMBER (OXIP) \PROC.AFTER.WINDOWWORLD + (EXECPROC) \DSPLEFTMARGIN.DISPLAY (DD) \TEDIT.ABBREV.EXPAND (TEXTOBJ) INTPOWERS (AR) \RPLACA.UFN (X) +\TURN.ON.PROCESSES (P) %%SET-ARRAY-TYPE-NUMBER (ARRAY) SEDIT::DELETE-COMMENT (SEDIT::CONTEXT) +\RPLACD.UFN (X RP.PAGE .MK.NEWCELL PAGE) \NSFILING.AFTER.LOGIN (SESSION) \DSPLINEFEED.DISPLAY (DD) +TERM.NEWLINE (CHAT.STATE) \CONS.UFN (CELL CNS.PAGE .MK.NEWCELL PGA0282 PGA0283) \TRANSLATE.10TO3 ( +PACKET) %%SET-ARRAY-OFFSET (ARRAY) SPP.FLUSH.TO.EOF (INSTREAM) CLISPFOR0 (I.S. LASTPTR I.S.TYPE OPR +I.S.PTRS RETPREDS TERM ITER TEM INITVARS DECLARELST X) INITSEQUIN (SEQUIN) TEDIT.PARALOOKS ( +OLDLOOKSLIST NPC NEWLOOKS TEXTOBJ) ADDSPELL2 (TEM) ADDFILE0 (FILEPROP ROOTNAME) GETGRIDBOXREGION ( +NEWREGION) /PUT-1 (X0) SETUPPUP (PUP) \NOFILESNEXTFILEFN (GENFILESTATE TYPE) PFI.PRINT.BITMAP (STREAM) + FIND-HISTORY-EVENTS (VAL) DBG::COLLECT-ACTIVE-ESCAPES (DBG::ESCAPES) SETINTERRUPT (TEM) DINFO.FIND ( +GRAPH) \PFNewPages (currentGroup file) MSINTERPRETSET (SET REP) TEDIT.BUILD.PCTB0 (OLDPC PC TEXTOBJ) +\10MBGETPACKET (PACKET) \DSPBACKCOLOR.DISPLAY (COLORCELL DD) \DSPCOLOR.DISPLAY (COLORCELL DD) +\MISCN.UFN (MY-BF CALLER) TEDIT.SUBSTITUTE (TEXTOBJ SEL) TEDIT.SCAN.LINE (L L1 LN) +SEDIT::CREATE-NEW-COMMENT (SEDIT::COMMENT) BRHL/MOVE/RIGHT (NP) \RPLCONS (CPAGE .MK.NEWCELL LST) +\CANONICALIZE.NSADDRESS (PREVTAIL TAIL) \FIXDLINES (LINE TEXTOBJ PL NL) +MAKE-UNICODE-TRANSLATION-TABLES (PREV) \INSERTTREE (NEW PCNODE) TEDIT.FORMAT.HARDCOPY (FORMATTINGSTATE +) \EP.PUT.AUX (A) PUTDEFN (DCELL) MSNEGATESET (X) \PROCESS.MAKEFRAME (PROC) OPT.FRAMEVAR (V CD FR) +MSINITFNDATA (Y) DINFO.ADD.FMENU (GRAPH) SEDIT::SET-SELECTION-ME (SEDIT::SELECTION) \UNBOXFLOAT3 (AL) +SEDIT::CREATE-PRELINEARIZED-NODE (SEDIT::NEW-NODE) RESETKEYACTION (TABLE) \PARAS.IN.SEL (SEL PARAS) +\SELECTPROCESS (PROCNAMES) \TRANSLATE.3TO10 (PACKET) \ABORT.BULK.DATA (STREAM) +SEDIT::COPY-STRUCTURE-COMMENT (SEDIT::NODE) BRHL/LAYOUT (GN) \DO.PROGV.SETUP.FRAME.AND.EXECUTE (NT +CALLER) MAKEWITHINREGION (REGION) \TEDIT.DELETE (SEL) \CORE.CLOSEFILE (STREAM) \DRAWLINE.UFN ( +FIRSTADDR) DINFO.INVERT.NODE (DINFO.GRAPH NODE LAST.NODE) DINFO.DEFAULT.MENU (GRAPH) +\FM.MOMENTARY-SETUP (ITEM) \CORE.RELEASEPAGES (P) UPDATEFILES (TYPE FILEPROP TYPEDPROP) BRKDWNRESULTS1 + (TOT LST) \MAPPNAME.INTERNAL (\MAPPNAMESTREAM) \CORE.UPDATEOF (STREAM) RIGHTW.ADJUSTSELECTION ( +SELECTION) OPT.FRAMEDEL (CD PARENT) SHADEITEM (ITEMREGION) \NSFILING.GETFILE (HANDLE FILESTREAM) +MB.NB.PACKITEMS (LINES CURLINE) \LFMakeLeaderPage (LeaderPage) SHOW.IP (IPDATA) FILES.PUTDEF (NAME) +SPAWN.MOUSE (MOUSEPROC) \TEDIT.ADJUST.LINES (LL) FIND.SYMBOL (A0347 A0349 A0351) CHECK/MENU/IMAGE ( +MENU) RPLNODE2 (X) \LFMakeDirEntry (stream) ENDPREAMBLE.IP (IPDATA) \CORE.DELETEFILE (VERSTAIL EXTTAIL + NAMETAIL INFOBLOCK) ADDMENU (ADDEDMENU) CLEARFILEPKG (FILE) \HANDLE.NS.ROUTING.INFO (ENTRY) +\CORE.GETINFOBLOCK (I SCR) MB.MARGINBAR.TABTRACK (TAB) DINFO.LAYOUTGRAPH (DINFO.GRAPH) CHAT.STARTUP ( +TEM) SEDIT::CREATE-NODE (SEDIT::NEW-NODE) \GETREGION.CHECKBASEPT (BASEPT) SEDIT::CREATE-GAP-NODE ( +SEDIT::GAP-NODE) \MAIKO.ETHER-INTERRUPT (PACKET) \CORE.FINDPAGE (PE PREVTAIL STREAM) BCOMPL2 (LST) +GC-FILING-DIRECTORY (SESSION) TEDIT.BUILD.PCTB1 (TEXTOBJ OLDPC PC) TEDIT.SELECT.LINE.SCANNER (L L1 LN +LL) SEDIT::COPY-STRUCTURE-COMMENT-WORD (SEDIT::NODE) BRHL/LAYOUT/DAUGHTERS (DTAIL) +\PROCESS.GO.TO.SLEEP (EVLOCK PROC HEAD PREV OLDPROC) \MAIKO.10MBTURNONETHER (NDB CSB) TRAPMAKE ( +EDGELIST) FB.SORTCOMMAND (DATA ALLFILES BROWSER) \TEDIT.CENTER.SEL.REV (NEWQUADS) +DIRECTORY.MATCH.SETUP (TAIL) SPP.SENDATTENTION (EPKT) \CORE.NEXTFILEFN (GENFILESTATE) OPT.FRAMELOCAL ( +X) \GCRECLAIMCELL (PTR DTD) FB.GET.SORT.MENU (BROWSER) FB.INSERT.SUBDIRECTORIES (TAIL) +\CORE.GETFILEHANDLE (INFOBLOCK) \LEAF.REOPENFILE (STREAM) TEDIT.BUILD.PCTB2 (TEXTOBJ OLDPC PC) +\TFBRAVO.LCASER (L) GNCCODE (X) GLCCODE (X) \POP.N.UFN (AL) KILLSEGMENT (START END) TTNEXTNODE (BUF) +FW-RE-INIT (OFD) MSADDANALYZE (oldEntry) CLISPATOMARE1 (TEM) \NSFILING.GENERATEFILES (TAIL SCOPELIST) +\LEAF.EVENTFN (DEVINFO) \VFMGet1 (interval) \HANDLE.RAW.3TO10 (PACKET) \NSFILING.COPY/RENAME ( +NEWSESSION HANDLE) EDITBM (BM) HEADINGOP.IP (IPDATA) UNMARKASCHANGED (TAIL TYPEDPROP PROP) LOADFNS ( +DONELST) SETTOPVAL (ATM) %%MAKE-STRING-ARRAY-FAT (BASE-ARRAY) \MAKEPCTB (PCTB PC1) +\TEDIT.TEXTBIN.STRINGSETUP (STREAM) TEDIT.PUT (TEXTOBJ PC) OPENRTPSOCKET (SOCKET) \NSRANDOM.CLOSEFILE +(STREAM) PRINTROUTINGTABLE (ENTRIES) FB.FINISH.COMMAND (BROWSER) TEDIT.PUT.PCTB2 (PC TEXTOBJ) +SETPROPLIST (ATM) ADDSPELL1 (L2 L3 L1) ADDTOVAR (VAL) BRKDWN1 (FNS) TEDIT.GET.OBJECT0 (PIECE) CL:NUNION + (CL::LIST1-EXTRAS-TAIL) SEDIT::BUILD-WINDOW (SEDIT::CONTEXT) SEDIT::COMPUTE-POINT-POSITION-COMMENT ( +SEDIT::POINT) \CORE.NAMESCAN (NAMELST) \TEDIT.FIXINSSEL (SELTOFIX) CL:UNION (CL::LIST1-EXTRAS-TAIL) +\TEDIT.COPY.PIECEMAPFN (PC) TERM.GODOWN (CHAT.STATE) UNMAKEHARDCOPYMODESTREAM (DS) INSERTLINE (OLDEND +OLDLINE) \TFBRAVO.INIT.PARALOOKS (INITPARALOOKS) MSPATHS1 (TEM) CL:NINTERSECTION (CL::RESULT-TAIL) +SLITLOOP (CURRLIST) SEDIT::CREATE-CONSTANT-STRINGS (SEDIT::ENV) SEDIT::CFV-CLISP (SEDIT::X) /DREMOVE ( +Y) TEDIT.UNDO.REPLACE (OLDEVENT EVENT SEL) RAISE/TRANSITION/CHAIN (P) \BUILDSLUGCSINFO (CSINFO) +CL:NSET-DIFFERENCE (CL::RESULT-TAIL) \UNQUEUE (QUEUE PREV ITEM) UNION (TAIL) SEDIT::REUSE-LINEAR-FORM +(SEDIT::NODE CL:BLOCK SEDIT::CONTEXT SEDIT::TEMP) SEDIT::UNDO (SEDIT::CONTEXT) \CORE.OPENFILE (INFOBLK + NAME STREAM) FW-RESET (OFD) DIRECTORY (COMTAIL PREVTAIL SEENP) TEDIT.UNDO.MOVE (EVENT) +CL:NSET-EXCLUSIVE-OR (CL::RESULT-TAIL) \CORE.SETACCESSTIME (STREAM) MARKASCHANGED (L) \SETPUPCHECKSUM +(PUP) \TEDIT.DIFFUSE.PARALOOKS (PC) POSTSCRIPT.HARDCOPYW (REGION) \TEDIT.SHOW.CHARLOOKS (SEL) +\COREFILE.SETPARAMETERS (STREAM INFOBLK) \TEDIT.TEXTBIN.FILESETUP (STREAM) \TEDIT.NEUTRALIZE.CHARLOOKS + (SEL) SEDIT::UNDO-ATOM-CHANGE (SEDIT::NODE) \BSP.PREPARE.INPUT (STREAM) \DOHARDRETURN1 (RETURNER NEW +RETURNEE) COMP.STTAG (TAG) GETSETQ (TL) BRKDWNFORM (LST1 LST2) SEDIT::COMPUTE-COMMENT-COLUMN ( +SEDIT::CONTEXT) SEDIT::COMPUTE-SELECTION-POSITION-COMMENT (SEDIT::SELECTION) \TEDIT.FIXDELSEL ( +SELTOFIX) \CREATE.SYMBOL (ATM PNBASE) CLISPATOM1 (ATMS L TEM) SEDIT::COPY-NODE (SEDIT::NEW-NODE +SEDIT::SUBNODE) \CORE.SETFILEPTR (STREAM) APPENDTOVAR (VAL) OPT.FRAMEMERGE (P FR) +\TEDIT.MARK.LINES.DIRTY (LL TEXTOBJ) SEDIT::REDO (SEDIT::CONTEXT) SEDIT::CLOSE-NODE-COMMENT (SEDIT::CONTEXT +) \CORE.BACKFILEPTR (STREAM) SEDIT::SHIFT-BLOCK (SEDIT::CONTEXT) \CORE.SETEOFPTR (STREAM) DSPSCROLL ( +DD) \FM.CHANGELABEL (ITEM) UNSAVEBLOCK? (ENTRIES) \CORE.SETFILEINFO (INFOBLOCK) \SPP.HANDLE.INPUT (CON +) \INCUSECOUNT (SCANPTR) COMP.STJUMP (TAG) WRITE-UNICODE-INCLUDED (CSETINFO) UNPACKFILENAME.STRING ( +VAL) MENUWINDOW (MENU) FB.MAYBE.INSERT.FILE (TAIL NEWITEM) \CORE.GETNEXTBUFFER (STREAM) ATTACH (L) +\VFMKillBuffer (PREV) MBUTTON.FIND.NEXT.FIELD (SCRATCHSEL) CHANGEPROP (Z) \BSP.CLEANUP.INPUT (STREAM) +\ALLOCBLOCK (ABLOCK) \NSFILING.PARSE.FILENAME (DIRS) SLICESET (LINEARIZEDARRAY) \NSFILING.NEXTFILE ( +GENFILESTATE) TEDIT.GET.CHARLOOKS0 (PC LOOKS) \GATHER-CLEANUP-FORMS (PROC) EDITDEFAULT (EDITX) +\CREATECHARSET.PSC (CSINFO) FW-MOVEW (OFD) \SMASHBSPSTREAM (OLDSTREAM OUTSTREAM SOCKET) WINDOWWORLD ( +SCREEN) \FONTFILENAME (TAIL) SEDIT::COMPUTE-SELECTION-POSITION-DEFAULT (SEDIT::SELECTION) +MB.NB.WHENOPERATEDFN (SEL) DSUBST (EXPR) BRKDWNSETUP (TEM) XIPAPPEND.WORD (XIP) +EXTEND/TRANSITION/CHAIN (LTAIL) \MAIKO.INPUT.INTERRUPT (PACKET) \RELEASE.IOCB (IOCB) %%EXTEND-ARRAY ( +EXTENDABLE-ARRAY) \MOVEFRAME (NXT NEW) REMWINDOWPROP (TAIL WINDOW) \AGE.ROUTING.TABLE (ENTRY TAIL +BUCKET) \UNBOXFLOAT2 (AL) SEDIT::UNDO-EXTRACT (SEDIT::SUBNODE) %%ALTER-AS-DISPLACED-TO-BASE-ARRAY ( +ADJUSTABLE-ARRAY) CREATEMENUEDWINDOW (MENU WHOLEREGION) CLISPTRAN (X) \UNBOXFLOAT1 (AL VAL) +\HANDLE.RAW.PUP (PACKET NDB ENTRY) \BUFFERED.COPYBYTES (SRC) \FONTFACE.COLOR (ANSWER) +POSTSCRIPT.ENDPAGE (IMAGEDATA) \GENERIC-UNREGISTER-STREAM (DEVICE OPENFILELST) \DSPSCALE.PSC ( +IMAGEDATA) FW-SHAPEW (OFD) %%ALTER-AS-DISPLACED-ARRAY (ADJUSTABLE-ARRAY) \LEAF.FLUSH.CACHE (SEQUIN) +\SETUPGUARDBLOCK (STKP) XIPAPPEND.CELL (XIP) TCONC (PTR) CLISPATOM2C (TAIL0) INTERSECTION (R) +\SFLHASHLOOKUP (HASHENT) EDITCOML (TEM) FIXSPELL1 (TEM) \POLYSHADE.BLT (fulllist currlist) +\NSRANDOM.READPAGES (STREAM) WRITE-UNICODE-MAPPING-FILENAME (R) SET-READTABLE-INTERACTIVELY ( +READTABLES) PUTCURSORPROP (CURSOR TAIL) \NODIRCORE.OPENFILE (NAME) LDIFF (V) EDITSAVE (X) +CLISPCAR/CDR1 (X) \PUTD (DCELL) SI::NON-LOCAL-GO (TARGET) SEDIT::CFV-COMMENT (SEDIT::NODE) UNCLISPTRAN + (EXPRESSION) LCONC (PTR) \TEDIT.REOPEN.STREAM (PC TEXTOBJ) SI::UNWIND-TO-BLIP (TARGET) \NODIRCOREFDEV + (FDEV) LISTPUT1 (X) \SPP.RETRANSMIT.NEXT (XIP CON) MSRESPELL (TAIL) \CREATEPIECEORSTREAM (PC) +DECLSUBFIELD (TRANSLATION) POSTSCRIPT.PUTCOMMAND (IMAGEDATA) \MAIKO.10MBSENDPACKET (COPYPACKET PACKET) + \CHANGE-VISIBLE-REGION.IP (IPDATA) PRETTYFILEINDEX (STREAM) PFI.SORT.INDICES (RESULT INDICES) +\TFBRAVO.PARSE.PROFILE.VALUE (TOKENLIST) TEDIT.GET.PARALOOKS0 (PC LOOKS TABSPEC) SEDIT::OUTPUT-STRING +(SEDIT::THIS-ITEM SEDIT::CONTEXT) EDITSMASH (OLD) \NSRANDOM.SESSION.WATCHER (DEVINFO) \PFFindPageAddr +(file) TEDIT.SUBLOOKS (PC) MB.MARGINBAR.SELFN (OBJDATUM TAB) IDLE.BITMAP (BOX) \HCPYMODEDSPPRINTCHAR ( +STREAM) DIRFILENAME (FILEGROUP) SEDIT::VERIFY-STRUCTURE (SEDIT::CONTEXT SEDIT::ROOT) CALLS3 (X LST) +\TTY.CREATING.DISPLAYSTREAM (DS) EDITFPAT1 (VAL) MAP2CAR (MAPE) \MEDW.GETSCREENREGION (OPPT) +SEDIT::OUTPUT-SPACE (SEDIT::CONTEXT) EDITBELOW (L0 L1) MAPCON (MAPE) \TEDIT.CLOSEUPLINES (LINE) +TEDIT.OBJECT.CHANGED (TEXTOBJ) FB.GET.NEW.FILE.SPEC (BROWSER) MAPCAR (MAPE) %%DO-LOGICAL-OP (GBBT) +\DELETETREE (PCNODE) FB.COPY/RENAME.MANY (FBROWSER FILELIST) TEDIT.DO.BLUEPENDINGDELETE (SEL) EDIT4F3 +(LST) MAPLIST (MAPE) \TEDIT.CARET (CARET) SEDIT::SET-SELECTION-STRING (SEDIT::SELECTION) MAPCONC (MAPE +) TEDIT.GET.OBJECT1 (PIECE) SEDIT::COMPUTE-ALL-FORMATS (SEDIT::CONTEXT) COPYDEF (X DEF) +\INIT.RTPPROCESS (SOCKET) TEDIT.PUT.PCTB (OFILE PC TEXTOBJ) \READSTRIKEFONTFILE (CSINFO) +\TEDIT.CHANGE.LOOKS (TEXTOBJ OLDLOOKSLIST PC NEWPCLOOKS) \READACFONTFILE (CSINFO) \INFER.FILE.TYPE ( +STREAM) FW-ADJUST-PLACEMENT (OFD) SEDIT::CREATE-NULL-LIST (SEDIT::NODE) CLISPBROADSCOPE1 (X) +TEDIT.UNDO.PARALOOKS (NEWLOOKSLIST PC EVENT) ASSURE.PUP.READY (NDB) \NSRANDOM.WRITEPAGES (STREAM) +\VFMGetBufferFor (LAST) SORT.PUPHOSTS.BY.DISTANCE (HOSTLIST) \MAIKO.10MBSTARTDRIVER (NDB) +\TEDIT.FLUSH.UNUSED.LOOKS (LOOKS TEXTOBJ) \DISCARDFRAME (CHILD OLDCLINK) \TEDIT.GET.PARALOOKS1 (LOOKS +TABSPEC) RATOMS (L) SETFILEPTR (STREAM) SEDIT::BACKSPACE-COMMENT (SEDIT::POINT) \DELETEPIECE (NEXT +PREV) PUTASSOC (X) \RTP.ACTION (SOCKET) \SETUPGETCH (STREAM) TEDIT.SELECTED.PIECES (TEXTOBJ PCLST) +MAKEHARDCOPYMODESTREAM (DS) TRAPLOOP (KNOTS) SEDIT::CFV-DOTLIST (SEDIT::X) \TEDIT.CENTER.SEL (NEWQUADS +) \BASEBYTES.BLOCKIO (STREAM) SCROLL.HANDLER (WINDOW) \SPP.NOT.RESPONDING (CON) \TERPRI.PSC (STREAM) +SEDIT::OUTPUT-BITMAP (SEDIT::CONTEXT) PROCESSPROP (P TAIL) NORMLOOP (LAST LOOP) +SEDIT::SET-SELECTION-LITATOM (SEDIT::SELECTION) ROTATE-BITMAP (ROTATE-BBT) \FM.PUTITEMPROP (ITEM) +\NSRANDOM.TRUNCATEFILE (STREAM) \BASEBYTES.IO.INIT (STREAM) SEDIT::BUILD-NODE (SEDIT::CONTEXT) +OPT.CHECKTAG (TAG) \TEDIT.SET.SEL.LOOKS (SEL) CLEARSTK (PTR) \BASEBYTES.SETFILEPTR (STREAM) +ROTATE-BITMAP-LEFT (ROTATE-BBT) CURSORPOSITION (OLDPOSITION) UNDOLISPX3 (L) FASL::STORE-VALUE (FASL::TABLE +) FW-CREATEW (OFD) \BASEBYTES.BOUT (STREAM) POSTSCRIPT.GETFONTID (FONTID) UPDATEWFROMIMAGE (REGION) +UTF8.OUTCHARFN (STREAM) CLOSERTPSOCKET (SOCKET) SEDIT::SET-POINT-STRING (SEDIT::POINT) +%%FAST-COPY-BASE (PBBT) \FILLINXIP (EPKT) \SETUPSTACK1 (SP STKP) \CHANGECHARSET.HDCPYDISPLAY ( +DISPLAYDATA) \OPENLEAFCONNECTION (CONN DATA OPUP) \10MBRAWENCAPSULATE (PACKET) \LEAF.LOOKUPCACHE (PREV + STREAM) DINFO (GRAPH) \MAKEBASEBYTESTREAM (OSTREAM) TEDIT.UNDO.LOOKS (NEWLOOKSLIST PC TEXTOBJ EVENT) +\ROUTE.PUP (PUP) \MBS.OUTCHARFN (STREAM) \TEDIT.INSERT.PIECES (TEXTOBJ PC) \NSRANDOM.CREATE.STREAM ( +HANDLE S) \BASEBYTES.TRUNCATEFN (STREAM) \TEDIT.GET.CHARLOOKS1 (PC LOOKS) CONTINUEDIT (FL) +OPENSTRINGSTREAM (STREAM) FW-CREATE-OFD-WINDOWS (OFD) \BUILDATWSTRUCTURE (EDGEBUCKET) \OUTCHARFN.PRESS + (PRSTREAM PRDATA) \RTP.SHOW.FAILURE (SOCKET) SUBSET (TAIL) \PUSHSTATE.IP (State) \NSFILING.FULLNAME ( +HANDLE) SEDIT::NEW-BLOCK (CL:BLOCK) RECORDECL1 (CL) FSETVAL (ATM) CHARLOOKS.FROM.FONT (LOOKS) +UNDONLSETQ1 (LST) BRHC/LAYOUT (GN) \ROUTE.XIP (XIP) \HDCPYBLTCHAR (DISPLAYDATA LOCAL1) OPT.RETMERGE (G + L1) CRITSECT (SELF) SEDIT::SET-POINT-LITATOM (SEDIT::POINT) \SETPOS.PSC (IMAGEDATA) TTCOMPLETEWORD ( +BUF) MERGEINSERT (LST) SEDIT::BUILD-LINEAR-FORM (SEDIT::CONTEXT SEDIT::ROOT) \TEDIT.RESHAPEFN (TEXTOBJ + LINE LINES) \TTW1 (WS WINDOW SCREEN) CLISPDEC0 (X) \STRINGSTREAM.INIT (STREAM) TEDIT.RAW.INCLUDE ( +TEXTOBJ SEL) \DSPSPACEFACTOR.PSC (IMAGEDATA) SEDIT::LINE-FINISHED (SEDIT::CONTEXT) SEDIT::CLOSE-NODE ( +SEDIT::CONTEXT) AS.NEXT.VERIFIER (L) DASSEM.ASMAJ (P) CHANGESLICE (L) /PUT+1 (X) +\HANDLE.PUP.ROUTING.INFO (ENTRY) COMP.LAM1 (X) DSPDESTINATION (DISPLAYSTREAM DD) \LEAF.REQUESTPAGE ( +STREAM DATA CACHE) DO.EDIT.COMMAND (L) FM.GETSTATE (STATELIST) \DISABLEGC1 (TYPEBASE) +SEDIT::BUILD-INTERNAL-STRUCTURE (SEDIT::CONTEXT) ETHERHOSTNAME (BUF) RECORDECLBLOCK (FIELDNAMES SPECS) + \GC.MODIFY.BIGREFCNT (OVENTRY ENTRY) \MAKE.PROCESS0 (HANDLE) CHAT.TYPESCRIPT1 (CHAT.STATE) +\TEDIT.HISTORYADD (TEXTOBJ) \SLOWHDCPYBLTCHAR (DD PILOTBBT) OPT.JFIXPASS (J) \GC.ENTER.BIGREFCNT ( +OVENTRY ENTRY) \LFFileSpec (UNPACKEDNAME) \TEDIT.CUMULATE.EVENTS (PC NEWPC1) TEDIT.UNPARSE.PAGEFORMAT +(HEADINGS) \BACKFORMAT (NLINE LINES LINE1) SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::SELECTION) +\FTP.FIX.BROKEN.INPUT (CONN) \FORMATLINE (TEXTSTREAM LINE TEXTOBJ THISLINE) CHAT.TYPEOUT (CHAT.STATE) +\HARDRESET-CLEANUP (PROCESS OLDVAL VARTAIL) CL:VECTOR-POP (VECTOR) \HARDRESET-CLEANUP1 (NT CALLER INFO + SLOT) HVBAKREAD (BKRF) \NSRANDOM.DESTROY.STREAM (STREAM) ICONTITLE (TITLESPEC) RAND (I) MAKECOM (LST) + \BSP.HANDLE.INPUT (BSPSOCKET) /LISPXPUT (Y) FB.UPDATEBROWSERITEMS (BROWSER SPEC) +\RELEASE.FTPCONNECTION (CONN) TB.UNDELETE.ITEM (ITEM) \VFMGenerateFileIDs (currentKey) SPP.FORCEOUTPUT + (STREAM CON EPKT) \GCMAPSCAN (PREV ENTRY LINK) SEDIT::ATOM-CHANGE-RELINEARIZE (SEDIT::NODE) +INSERT.NODE (BUF) \GCMAPUNSCAN (PREV ENTRY LNK) \LEAF.ADD.QUOTES (PIECES) TB.NTH.ITEM (BROWSER) +\PUTFIXP (PTR) \10MBRAWRECEIVE (PACKET) \FREELISTCELL (X BASE) \PUTSWAPPEDFIXP (PTR) TEDIT.MAKESEL ( +SEL) FW-FORGET-STREAM (OFD) \DISPLAYLINE (DISPLAYDATA) SEDIT:SEDIT (SEDIT::CONTEXT) TEDIT.FORMATBOX ( +LINE FORMATTINGSTATE) \NSFILING.FILLIN.ATTRIBUTES (HANDLE) \GETBRUSHBBT (BBT) SEDIT::SCAN-STRING ( +SEDIT::POINT-OR-SEL) \VECPUT (PRDATA) NIL +PROP CLISPACKUP (CLISPBRACKET UNARYOP CLISPTYPE) CLISPIFYNOT (CLISPINFIX CLISPTYPE) SI::FINISH-ADVISING + (ADVISED) VIRGINFN (BROKEN ADVISED NAMESCHANGED EXPR) LOAD? (FILEDATES FILE) RECLISPLOOKUP (LISPFN +CLISPCLASSDEF CLISPCLASS) \LET*-RECURSION (GLOBALLY-SPECIAL) CL::STRUCTURE-CONSTRUCTOR ( +STRUCTURE-CONSTRUCTOR) COMP.EXPR (MACRO-FN) FIXCONTINUE1 (CROPS CLISPCLASS CLISPCLASSDEF) +SI::RESTORE-CALLS (NAMESCHANGED) LOADCOMP (LOADCOMP) VALUOF-EVENT (*GROUP* LISPXVALUES) +SEDIT::MENU-PACKAGE-SELECTEDFN (EDIT) \FM.EDIT-ITEM (INFINITEWIDTH) MSCOMMAND (CLISPWORD) +\FM.MENUHANDLER (INFINITEWIDTH) CHECKIMPORTS (IMPORTDATE) \FM.FORMAT (FORMAT FONT LEFT BOTTOM ROWSPACE + COLUMNSPACE ID MOTHER BOX BOXSHADE BOXSPACE REGION) CL::SET-SETF-METHOD-EXPANDER (SETF-INVERSE +:SETF-INVERSE :SHARED-SETF-INVERSE :SETF-METHOD-EXPANDER) SHRIEKIFY (CLISPTYPE CLISPWORD) +\FM.3STATE-CHANGESTATE (OFFREGION ONREGION UNHIGHLIGHT NEUTRALREGION) \FM.CREATEITEM (LEFT BOTTOM TYPE + LABEL FONT ID INITSTATE MESSAGE LINKS DOWNFN HELDFN MOVEDFN SELECTEDFN) LISPX/1 (INFO) CLISPIFY1 ( +UNARYOP) PRINT-LOADED-FILE-INFORMATION (FILEDATES) LOADCOMP? (LOADCOMP) COMPILE-FILE-EXPRESSION ( +COMPILE-FILE-EXPRESSION COMPILE.FILE.EXPRESSION) \FM.CHECKPROPS (FORMAT) PRINTHISTORY1 (*FIRSTPRINT* +*HISTORY* *REDOCNT* *LISPXPRINT* *PRINT* LISPXVALUES) TEDIT (LEAVETTY) MKACCESSFN (STANDARD UNDOABLE +FAST) SEDIT::PROP-CHANGED (EXPR) SI::GET-DESCRIBERS (SI::DESCRIBERS) FILEPKGCOMS.PUTDEF (CONTENTS +CONTAIN) GETHOSTINFO (OSTYPE) CLISPFUNCTION? (CLISPWORD) \UFS.REMOVE.HOST.FIELD (DIRECTORY VERSION +HOST DEVICE NAME) CL::SET-SETF-INVERSE (SETF-METHOD-EXPANDER :SETF-METHOD-EXPANDER :SETF-INVERSE) +DINFO.EXPANDFN (GRAPH) FW-INIT-PROPS (ALL-FILES? ANCHOR FILTERS FONT INTERVAL JUSTIFIED? POSITION +SHADE SORTFN) WTFIX1 (SIDE CLISPTYPE UNARYOP CLISPWORD EXPR CODE FILEDEF) FB.HARDCOPY.TOFILE (NAME) +CLISPATOM (CLISPTYPE) EDITL (Definition-for-EDITL) \FM.CHECKDESCRIPTION (LABEL TYPE HJUSTIFY VJUSTIFY +HIGHLIGHT BOX BOXSHADE BOXOFFSET BOXSPACE OFF CHANGESTATE MENUITEMS COLLECTION) \FM.STATE-SETUP ( +MENUITEMS MENUFONT CHANGESTATE MENUTITLE) COMPILER::CONSTANT-EXPRESSION-P (COMPILER::SIDE-EFFECTS-DATA +) \FM.RIGHTBUTTONFN (INFINITEWIDTH) SPELLFILE (DIRECTORIES FILEDATES HOST FILE) SEDIT::MENU-FIND-SELECTEDFN + (EDIT) EDITDEF.FNS (ADVISED BROKEN EXPR) ADDTOVAR (VALUE VARTYPE ALIST) CLISPATOM1A (CLISPCLASS +CLISPBRACKET CLISPTYPE BROADSCOPE CLISPWORD) XCL::%%DELETE-DEFINER (:DEFINER-FOR DEFINER-FOR +:DEFINITION-NAME DEFINITION-NAME :DEFINITION-EXPANDER) PREEDITFN (VARTYPE) CHNGNM (ADVISED BROKEN +NAMESCHANGED ALIAS) CLDISABLE (CLISPBRACKET I.S.OPR SEPARATOR) ASKUSER (CLASS) SAVESET (VALUE SIDE) +SEDIT::FN-CHANGED (EXPR) IDLE.SET.OPTION (AUTHENTICATE) FM.SHADE (REGION) CLISPDEC (LISPFN CLISPINFIX +CLISPCLASSDEF CLISPCLASS) DISPLAYLINK/BT (DRAWLINKFN LINEWIDTH COLOR DASHING) XCL::%%REMOVE-SPECIAL-FORM + (SPECIAL-FORM) COURIER.WRITE (COURIERDEF) PROPS.WHENCHANGED (PROPTYPE) CLISPATOM1 (CLISPTYPE +CLISPBRACKET SEPARATOR BROADSCOPE LISPFN CLISPCLASS UNARYOP CLISPWORD) FNCHECK (EXPR FILEGROUP) +TYPESOF (FILE) MAKEKEYLST (KEYSTRING) SEDIT::ASSIGN-FORMAT-CLISP (CLISPWORD) READHASHMACRO ( +HASHREADMACRO) DWIMIFY0 (SIDE) CLISPNOEVAL (MACRO-FN INFO) NEW/EDITDATE (Definition-for-EDITDATE) +DISPLAYLINK/RL (DRAWLINKFN LINEWIDTH COLOR DASHING) STOPSCAN? (UNARYOP) GETDEF.I.S.OPR (CLISPWORD +I.S.OPR) CLISPIF0 (SIDE) DWIMIFYFNS (FILE) ARGLIST (EXPR) HELPSYS (CLISPWORD) APPENDTOVAR (VALUE +VARTYPE ALIST) FIXSPELL (RESPELLS) COMPILER::RESOLVE-VARIABLE-BINDING (GLOBALVAR GLOBALLY-SPECIAL) +DWIMLOADFNS? (SIDE) FB.EDITLISPFILE (FILEDATES FILE) \LOAD-STREAM (FILEDATES) DELFROMCOM (PROPTYPE) +DISPLAYLINK/TB (DRAWLINKFN LINEWIDTH COLOR DASHING) COURIER.SKIP (COURIERDEF) CL:PARSE-NAMESTRING ( +HOST DEVICE DIRECTORY SUBDIRECTORY RELATIVEDIRECTORY VERSION) COMPILER::SIDE-EFFECTS ( +COMPILER::SIDE-EFFECTS-DATA) \FM.CHANGELABEL (UNHIGHLIGHT) CLISPATOM0 (SIDE) UNSAVEBLOCK? (BROKEN +ADVISED) FM.REDISPLAYITEM (BACKGROUND) CLISP-SIMPLE-FUNCTION-P (EXPR CLISPWORD) DWIMDEF (FILETYPE) +UnixPrint (%#COPIES DOCUMENT.NAME %#SIDES) RECOMP? (ADVISED BROKEN) \FM.3STATE-DOWNFN (BACKGROUND +UNHIGHLIGHT) MSNEEDUNSAVE (BROKEN ADVISED) CLISPIFYLOOKUP (CLISPCLASS CLISPCLASSDEF LISPFN) +\FONTINFOFROMFILENAME (NAME EXTENSION) GLOBALVARP (GLOBALVAR) \TEDIT.WINDOW.SETUP (TITLEMENUFN +PROMPTWINDOW READONLY PROMPTWINDOWHEIGHT) FIXATOM (GLOBALVAR) CLISP3A (INFO) INFILECOM (VARTYPE) +HASDEF (CLISPWORD I.S.OPR EXPR) \FM.HIGHLIGHTITEM (BACKGROUND) OPENPRSTREAM (REGION DOCUMENT.NAME +HEADING FONTS) \FM.PUSHGROUP (ITEMS REGION) PFI.PRINT.MULTI.INDEX (MULTIFILEINDEX) +POSTSCRIPT.FONTCREATE (PSCFONT) CL::TYPE-EXPANDER (:TYPE-EXPANDER TYPE-EXPANDER) CLISPELL (RESPELLS +CLISPWORD) CLISPFOR1 (CLISPWORD I.S.OPR) DELDEF (EXPR) COURIER.READ (COURIERDEF) FAULTEVAL (MACRO-FN) +COMP.CARCDR (CROPS) TEDIT.FORMATTEXTBOX (FOOTNOTE) DINFO.READ.GRAPH (TOPNODEID TEXTPROPS LOOKUPFN +MENUFN FREEMENUITEMS NODELST USERDATA) \FM.REDISPLAYMENU (BOX REGION BOXSHADE BACKGROUND) +\FM.JUSTIFYGROUPS (HJUSTIFY VJUSTIFY MOTHER REGION DAUGHTERS) ED (EDITDEF PROPTYPE) \FM.WINDOWENTRYFN +(INFINITEWIDTH) \DSPFONT.PSC (PSCFONT) DO-HISTORY-SEARCH (LISPXVALUES) MSPRGRECORD (CLISPWORD) +\FM.3STATE-SETUP (UNHIGHLIGHT NEUTRALREGION ONREGION) RECORDWORD (CLISPWORD) CLISPLOOKUP (CLISPCLASS +CLISPCLASSDEF LISPFN) XCL::UNDOABLY-MAKUNBOUND (GLOBALLY-SPECIAL GLOBALVAR) UNSAVEFNS (BROKEN ADVISED +FILE) \FM.3STATE-SETUPOFFBITMAP (OFF BOX HIGHLIGHT NEUTRALREGION OFFREGION) \FM.NWAY-CHANGESTATE ( +STATE) NO.SIDEEFFECTS.FNP (CROPS) EDITCOMA (EDIT-SAVE LASTVALUE) CLISPATOM2C (UNARYOP) +\FM.JUSTIFYITEMS (ITEMS HJUSTIFY VJUSTIFY CL:FORMAT REGION MOTHER) CLISP4 (INFO CLISPTYPE) EDITFNS ( +FILE) \UFSSetFileType (EXTENSION) MULTIFILEINDEX1 (%#SIDES) EDITCOM1 (SIDE) FM.CHANGELABEL ( +CHANGELABELUPDATE BACKGROUND) \FM.CREATEW (REGION ITEMS) PRETTYFILEINDEX (%#SIDES DOCUMENT.NAME) +COMP.MLL (MLSYM) TEDIT.FORMATFOLIO (PARALOOKS CHARLOOKS NOFIRSTPAGE FORMATINFO) PRINTERTYPE ( +PRINTERTYPE) MSCHECKBLOCKBASIC (BLKLIBRARYDEF) GETDEFFROMFILE (DEFINERS) FIXDATUM (SETFN CROPS) +SPELLFILE.MATCHINGDIRS (HOST DIRECTORY) \FM.NWAY-SELECTEDFN (COLLECTION DESELECT) FB.COPY/RENAME.MANY +(HOST DIRECTORY DEVICE NAME EXTENSION VERSION RELATIVEDIRECTORY) \FM.LAYOUTGRID (FORMAT FONT LEFT +BOTTOM ROWSPACE COLUMNSPACE ID MOTHER BOX BOXSHADE BOXSPACE ITEMS REGION DAUGHTERS) GETDEFSAVED (EXPR) + XCL::GET-UNDOABLE-SETF-METHOD (:UNDOABLE-SETF-INVERSE) ACCESSDEF (ACCESSFN SETFN) +INTERPRET/MARK/FORMAT (BORDER LABELSHADE) \FM.SETATTACHPOINT (ATTACHPOINT) NSPRINT (DOCUMENT.NAME +DOCUMENT.CREATION.DATE NO.WATCHER) LCSKIP (CODEREADER) COMPILEUSERFN (CLISPWORD) FIXAPPLY (EXPR CODE +FILEDEF) PRINTCOPYRIGHT (COPYRIGHT) POLYSHADE.IP (PRINTERMODE P.SCAN.DIRECTION) \FINDOP (DOPCODE) +\FM.DISPLAYITEM (BACKGROUND) COMP.UNBOX (BOX) \IDLER (FORGET TIMEOUT SAVEVM DISPLAYFN DISPLAY.DATA) +SEDIT::LINEARIZE-CLISP (CLISPWORD) CLISPIFYMATCHUP (CLISPCLASS CLISPISPROP) PRETTYDEF ( +MAKEFILE-ENVIRONMENT) EXEC-VALUE-OF (LISPXVALUES) MSCHECKFNINBLOCK (MACRO) TTY/EDITL (LASTVALUE +EDIT-SAVE) CLISPFOR (SIDE) TEDIT.MINIMAL.WINDOW.SETUP (REGION) PRINT-EVENT (*HISTORY* *LISPXPRINT* +LISPXVALUES) EDITFB (EXPR) FINDFN (BROKEN ALIAS) FB.GET.NEW.FILE.SPEC (NAME EXTENSION) HISTORYFIND1 ( +*HISTORY*) \FONTINFOFROMFILENAME.OLD (NAME EXTENSION) \TYPEGLOBALVARIABLE (GLOBALVAR) +COURIER.WRITE.SEQUENCE.UNSPECIFIED (COURIERDEF) MAKEFILE1 (FILEGROUP) FILECREATED (FILEDATES) +\SFFixY.HCPYMODE (ASCENT DESCENT) MSDESCRIBE (GLOBALVAR) \SWITCHFONTS.PSC (PSCFONT) +\FM.TOGGLE-CHANGESTATE (ONREGION UNHIGHLIGHT OFFREGION) TEDIT.FORMATHEADING (PRECONDITIONS HEADINGTYPE +) CLISPBROADSCOPE (CLISPTYPE) CONVERT.FILE.TO.TYPE.FOR.PRINTER (FONTS) \TEDIT.CHANGE.LOOKS (FONT +FAMILY FACE SIZE PROTECTED SELECTPOINT UNDERLINE OVERLINE INVERTED STRIKEOUT INVISIBLE SUPERSCRIPT +SUBSCRIPT WEIGHT SLOPE EXPANSION SIZEINCREMENT OFFSETINCREMENT STYLE USERINFO) HARDCOPYGRAPH (MODE +PAGENUMBERS RIGHTMARGIN UPPERMARGIN TRANS) COMP.ARGTYPE (BLKLIBRARYDEF BROKEN EXPR) +CL::ESTABLISH-SETFS-AND-OPTIMIZERS (COMPILER:OPTIMIZER-LIST) PRINTCODE (CODE) DASSEM.CLEANFNTEST ( +CROPS) UNDONLSETQ (SIDE) DINFO.UPDATE (GRAPH MENU TEXT HISTORY) IDLE (DISPLAYFN) BREAK-FUNCTION ( +BROKEN) FM.RESETSTATE (INITSTATE) TEDIT.FORMATPAGE (NEWPAGELAYOUT STARTINGPAGE# LANDSCAPE? PRINTERMODE +) SETF-MACRO-FUNCTION (MACRO-FN) CL:FMAKUNBOUND (SPECIAL-FORM CODE EXPR) READVISE1 (READVICE) DWMFY2 ( +INFO CLISPWORD CLISPTYPE) CHANGETRAN1 (CHANGEWORD) SPP.OPEN (SERVER.FUNCTION) \GR.DELDEFFN (GET) +LISPXFIND0 (*HISTORY*) GETDEFERR (SPELL) SEQUENTIAL.PRETTYPRINT (PRETTYWRAPPER) CSUBST (CLISPWORD) +\TEDIT.CENTER.SEL (QUAD) \FM.NWAY-MOVEDFN (COLLECTION STATE BACKGROUND DESELECT) +\TEDIT.APPLY.PAGEFORMATTING (STARTINGPAGE#) \FM.LAYOUTCOLUMN (FORMAT FONT LEFT BOTTOM ROWSPACE +COLUMNSPACE ID MOTHER BOX BOXSHADE BOXSPACE ITEMS REGION DAUGHTERS) MAKEFILE (FILETYPE) DOFILESLOAD ( +FILEDATES) \FM.COLLECTNWAYS (COLLECTION NWAYPROPS STATE INITSTATE) FM.CHANGESTATE (STATE BACKGROUND) +DBG::FIND-ORIGINAL-NAME-AND-DEFINITION (ADVISED BROKEN) CLISP3 (BROADSCOPE CLISPIFYISPROP CLISPNEG +UNARYOP LISPFN CLISPWORD) \TEDIT.CREATEW.FROM.REGION (PROMPTWINDOW PROMPTWINDOWHEIGHT) EDITE ( +Definition-for-EDITE) CL::SET-SHARED-SETF-INVERSE (SETF-METHOD-EXPANDER :SETF-METHOD-EXPANDER +:SETF-INVERSE :SHARED-SETF-INVERSE) PURGEHISTORY (*HISTORY*) CL::ESTABLISH-PREDICATE (COMPILER:OPTIMIZER-LIST +) DISPLAYLINK/LR (DRAWLINKFN LINEWIDTH COLOR DASHING) UNDOLISPX3 (*LISPXPRINT*) COURIER.REP.LENGTH ( +COURIERDEF) \FM.NWAY-DOWNFN (COLLECTION STATE BACKGROUND UNHIGHLIGHT DESELECT) RETDWIM (SIDE) +\FM.LAYOUTROW (FORMAT FONT LEFT BOTTOM ROWSPACE COLUMNSPACE ID MOTHER BOX BOXSHADE BOXSPACE ITEMS +REGION DAUGHTERS) CLISPCAR/CDR (ACCESSFN) READIMAGEOBJ (FILE) SUPERPRINT0 (PRETTYWRAPPER) +SAVECOPYRIGHT (COPYRIGHT) \DURATIONTRAN (NEW CLISPWORD) \FM.WINDOWEXTENT (REGION INFINITEWIDTH) +MSCHECKBLOCKS (FILEGROUP) \GET.COURIER.DEFINITION (INHERITS) CLISPIFYRPLAC (CLISPTYPE NARGS CROPS) +MSPRGE (BROKEN CLISPWORD) MSSHOWUSE (EXPR) \FM.TOGGLE-SETUP (UNHIGHLIGHT OFFREGION ONREGION) EDITGETD +(EDITGETD MACRO-FN CLISPWORD) CLISPIF (SIDE) EDITLOADFNS? (FILEDATES FILE) COMPILE-FILE? (FILETYPE) +I.S.OPR (CLISPWORD I.S.OPR) DWMFY1 (INFO) \UFSParse-Directory (DIRECTORY) \FM.NWAY-MESSAGE (COLLECTION + DESELECT) SUBPRINT (PRETTYWRAPPER CLISPWORD) \GR.PUTDEFFN (NEW) CLISPIFYFNS (FILE) CLISPLOOKUP1 ( +CLISPCLASS) TEDIT.CREATEW (PROMPTWINDOW PROMPTWINDOWHEIGHT) WHO-LINE-TTY-STATE (WHO-LINE-STATE) +\TEDIT.HCPYLOOKS.UPDATE (KERN) SUBPRINT1 (CLISPWORD) ALISTS.WHENCHANGED (VARTYPE) +\FM.UPDATEGROUPEXTENT (REGION ITEMS DAUGHTERS BOX BOXSPACE) CLISPATOM2A (GLOBALVAR CLISPTYPE) +RESETUNDO (SIDE) NEWDEFC (CODE) TEDIT.PARALOOKS (1STLEFTMARGIN LEFTMARGIN RIGHTMARGIN PARALEADING +POSTPARALEADING LINELEADING BASETOBASE QUAD TYPE SUBTYPE SPECIALX SPECIALY NEWPAGEBEFORE NEWPAGEAFTER +HEADINGKEEP KEEP HARDCOPY USERINFO REVISED TABS STYLE CHARSTYLES COLUMN) CLISPFOR0 (CLISPWORD I.S.OPR +\DURATIONTRAN BIND SIDE) \IDLE.EXIT? (ALLOWED.LOGINS AUTHENTICATE LOGIN.TIMEOUT FORGET) +FILEPKGCOMPROPS (PROPTYPE) \FM.EDIT-SETUP (BOX MAXWIDTH BOXOFFSET LABELMAXWIDTH INFINITEWIDTH) +PRETTYPRINT (EXPR) LISPX (*HISTORY* EXPR FILEDEF CLISPWORD STATE ...ARGS USE-ARGS) OPENDISPLAYSTREAM ( +REGION) \UFS.PARSE.BODY (NAME EXTENSION VERSION) \IDLE.OUT (TIMEOUT) \FM.NUMBER-SETUP (BOX MAXWIDTH +BOXOFFSET LABELMAXWIDTH INFINITEWIDTH NUMBERTYPE SYSLIMITCHARS) COMPILER::META-EVAL-CALL (COMPILER::TRANSFORM +) \FM.NWAY-SETUP (UNHIGHLIGHT OFFREGION ONREGION) XCL::UNDOABLY-FMAKUNBOUND (MACRO-FN SPECIAL-FORM +CODE EXPR) SEND.FILE.TO.PRINTER (HEADING) LISPX/ (INFO) COMP.TOPLEVEL.COMPILE (GLOBALLY-SPECIAL) +CLISPEXPANSION (CLISPWORD) \FM.TOGGLE-DOWNFN (BACKGROUND UNHIGHLIGHT) MSINTERPRETSET (CLISPWORD) +SCANFILE1 (CODEREADER) MSCHECKBLOCK (GLOBALVAR GLOBALLY-SPECIAL) CLISPIFYCROPS (CLISPTYPE) +XCL::SET-GLOBALLY-NOTINLINE-P (SI::GLOBALLY-NOTINLINE) RECORDECL1 (USERRECORDTYPE) +\TEDIT.PARSE.CHARLOOKS.LIST (FONT FAMILY FACE SIZE PROTECTED SELECTPOINT UNDERLINE OVERLINE INVERTED +STRIKEOUT INVISIBLE SUPERSCRIPT SUBSCRIPT WEIGHT SLOPE EXPANSION OFFSETINCREMENT SIZEINCREMENT STYLE +USERINFO) CLISPIFY2B (CLISPWORD CLISPTYPE INFO CROPS CLISPCLASS CLISPCLASSDEF LISPFN CLISPINFIX +CLISPFORM CLISPBRACKET CLISPIFY UNARYOP SEPARATOR SETFN ACCESSFN CLMAPS) DWIMARKASCHANGED (SIDE +*LISPXPRINT*) LLBREAK (BROKEN) LISPXSTATE (STATE *HISTORY*) LOWERCASE (CLMAPS CLISPINFIX) FM.GETITEM ( +ITEMS) OPENIPSTREAM (REGION LANDSCAPE DOCUMENT.NAME CLIP.INCLUSIVE MEDIUM HEADING FONTS COLOR SERVER) +\FM.EDIT-DELETE (INFINITEWIDTH) \FM.FORMATEXPLICIT (COORDINATES ITEMS REGION DAUGHTERS) CALLS ( +GLOBALVAR BROKEN EXPR) CLISPLOOKUP0 (CLISPCLASSDEF LISPFN) PFI.MAKE.LPT.STREAM (SERVER HOST LANDSCAPE +REGION) CL:SPECIAL-FORM-P (SPECIAL-FORM) \FM.MAKEBITMAP (BOX BOXOFFSET BOXSHADE) RECREDECLARE2 ( +CLISPWORD) \FM.FORMATBYGRID (ITEMS REGION DAUGHTERS BOX BOXSPACE) GLOBAL-MACRO-FUNCTION (MACRO-FN +CLISPWORD) TEDIT.FORMAT.HARDCOPY (DOCUMENT.NAME) CL:GET-SETF-METHOD (:SETF-INVERSE SETF-INVERSE SETFN +:SHARED-SETF-INVERSE :SETF-METHOD-EXPANDER SETF-METHOD-EXPANDER) SEDIT::MENU-SUBSTITUTE-SELECTEDFN ( +SEDIT::FINDITEM EDIT) \TEDIT.HARDCOPY.DISPLAYLINE (KERN) CL:TYPE-OF (CL::CMLTYPE +CL::CMLSUBTYPE-DESCRIMINATOR) CHECKSAMEDIR (FILEDATES) XCL:UNBREAK-FUNCTION (BROKEN) +CL:GET-SETF-METHOD-MULTIPLE-VALUE (:SETF-INVERSE SETF-INVERSE SETFN :SHARED-SETF-INVERSE +:SETF-METHOD-EXPANDER SETF-METHOD-EXPANDER) XCL::DECL-SPECIFIER-P (SI::DECLARATION-SPECIFIER) +CLISPIFY2D (CLISPTYPE UNARYOP GLOBALVAR) XCL::SET-DECL-SPECIFIER-P (SI::DECLARATION-SPECIFIER) +CLEARCLISPARRAY (CLISPWORD) CLISPNOTVARP (GLOBALVAR) \TFBRAVO.SPREAD.LOOKS (WEIGHT SIZE FAMILY SLOPE +UNDERLINE SUBSCRIPT SUPERSCRIPT) CLISPATOM2 (UNARYOP LISPFN CLISPCLASS CLISPBRACKET CLISPTYPE DWIMIFY +SEPARATOR SETFN) XCL::GLOBALLY-NOTINLINE-P (SI::GLOBALLY-NOTINLINE) \TEDIT.PARSE.PARALOOKS.LIST ( 1STLEFTMARGIN LEFTMARGIN RIGHTMARGIN PARALEADING POSTPARALEADING LINELEADING TYPE SUBTYPE NEWPAGEBEFORE NEWPAGEAFTER HEADINGKEEP KEEP BASETOBASE REVISED QUAD COLUMN USERINFO SPECIALY STYLE -CHARSTYLES TABS) \\FM.NWAY-MESSAGE (COLLECTION DESELECT) SI::HAS-CALLS (ADVISED BROKEN) FIXAPPLY (EXPR - CODE FILEDEF) \\FM.FORMATEXPLICIT (COORDINATES ITEMS REGION DAUGHTERS) CHANGETRAN1 (CHANGEWORD) -GETDEF (NULLDEF) SI::CHANGE-CALLS (ADVISED BROKEN) OPENDISPLAYSTREAM (REGION) \\FM.TOGGLE-DOWNFN ( -BACKGROUND UNHIGHLIGHT) MSNOTICEFILE (FILEDATES FILE) DEFAULTMAKENEWCOM (GETDEF) SI::RESTORE-CALLS ( -NAMESCHANGED) CLISPATOM2C (UNARYOP) LOADCOMP? (LOADCOMP) GETDEFFROMFILE (FILEGETDEF DEFINERS) CL:TYPE-OF - (CL::CMLTYPE CL::CMLSUBTYPE-DESCRIMINATOR) INTERPRET/MARK/FORMAT (BORDER LABELSHADE) \\IDLER (FORGET -TIMEOUT SAVEVM DISPLAYFN DISPLAY.DATA) CSUBST (CLISPWORD) PUTDEF (PUTDEF) FM.CHANGESTATE (STATE -BACKGROUND) \\FM.EDIT-DELETE (INFINITEWIDTH) FILES? (FILE) CLISPLOOKUP (CLISPCLASS CLISPCLASSDEF -LISPFN) LAPRD (CODEREADER) \\SWITCHFONTS.PSC (PSCFONT) VIRGINFN (BROKEN ADVISED NAMESCHANGED EXPR) -LOADCOMP (LOADCOMP) CHECKIMPORTS (IMPORTDATE) INFILECOM (FILEPKGCONTENTS PRETTYTYPE VARTYPE) -SEND.FILE.TO.PRINTER (HEADING) SPP.OPEN (SERVER.FUNCTION) DISPLAYLINK/TB (DRAWLINKFN LINEWIDTH COLOR -DASHING) \\FM.NUMBER-SETUP (BOX MAXWIDTH BOXOFFSET LABELMAXWIDTH INFINITEWIDTH NUMBERTYPE -SYSLIMITCHARS) FIXATOM (GLOBALVAR) FM.GETITEM (ITEMS) COMPAREDEFS (FILE NULLDEF) -XCL::GET-UNDOABLE-SETF-METHOD (:UNDOABLE-SETF-INVERSE) \\FM.MAKEBITMAP (BOX BOXOFFSET BOXSHADE) -COURIER.WRITE.SEQUENCE.UNSPECIFIED (COURIERDEF) FIXDATUM (SETFN CROPS) \\FM.TOGGLE-SETUP (UNHIGHLIGHT -OFFREGION ONREGION) FB.EDITLISPFILE (FILEDATES FILE) \\LET*-RECURSION (GLOBALLY-SPECIAL) GETDEFSAVED ( -EXPR) CLISPIFYMATCHUP (CLISPCLASS CLISPISPROP) SPECVARP (GLOBALVAR) FONTCOPY (DEVICE) DWMFY2 (INFO -CLISPWORD CLISPTYPE) \\GET.COURIER.DEFINITION (INHERITS) SPELLFILE (DIRECTORIES FILEDATES HOST FILE) -SPY.MAKE.TREE (PACKAGE READTABLE PRINT-CASE THRESHOLD) IDLE (DISPLAYFN) COMPILEUSERFN (CLISPWORD) -FINDFN (BROKEN ALIAS) CLISPFOR (SIDE) NLAMBDAFNP (INFO BROKEN EXPR CODE) GETDEFERR (NULLDEF SPELL) -FM.GETSTATE (STATE) ADDTOFILES? (WHENFILED) \\FM.NWAY-SETUP (UNHIGHLIGHT OFFREGION ONREGION) -\\FM.FORMATBYGRID (ITEMS REGION DAUGHTERS BOX BOXSPACE) WHO-LINE-TTY-STATE (WHO-LINE-STATE) -COMP.ARGTYPE (BLKLIBRARYDEF BROKEN EXPR) \\GR.DELDEFFN (GET) PRINT-EVENT (*HISTORY* *LISPXPRINT* -LISPXVALUES) ALISTS.WHENCHANGED (VARTYPE) GETHOSTINFO (OSTYPE) \\UFS.REMOVE.HOST.FIELD (DIRECTORY -VERSION HOST DEVICE NAME) |\\SFFixY.HCPYMODE| (ASCENT DESCENT) ASKUSER1 (KEYLST) DINFO.EXPANDFN (GRAPH -) FM.WHICHITEM (INFINITEWIDTH) HISTORYFIND1 (*HISTORY*) EDITL (|Definition-for-EDITL|) FM.RESETSTATE ( -INITSTATE) TEDIT.FORMATTEXTBOX (FOOTNOTE) CLISP4 (INFO CLISPTYPE) CHNGNM (ADVISED BROKEN NAMESCHANGED -ALIAS) ADDTOCOM (ADDTOPRETTYCOM) PREEDITFN (VARTYPE) \\FM.GETBITMAPS (BOX BOXSHADE HIGHLIGHT LABEL) -COMPILER::META-EVAL-CALL (COMPILER::TRANSFORM) COURIER.REP.LENGTH (COURIERDEF) COMP.TOPLEVEL.COMPILE ( -GLOBALLY-SPECIAL) MSCOMMAND (CLISPWORD) COMP.BOX (BOX) READIMAGEOBJ (FILE) ADDTOVAR (VALUE VARTYPE -ALIST) \\FM.STATE-CHANGESTATE (DISPLAY) OPENIPSTREAM (REGION LANDSCAPE DOCUMENT.NAME CLIP.INCLUSIVE -MEDIUM HEADING FONTS COLOR SERVER) \\FM.FORMATBYCOLUMN (ITEMS REGION DAUGHTERS) MAKEFILE1 (FILEGROUP -FILE) CL::STRUCTURE-CONSTRUCTOR (STRUCTURE-CONSTRUCTOR) XCL::%DELETE-DEFINER (:DEFINER-FOR DEFINER-FOR - :DEFINITION-NAME DEFINITION-NAME :DEFINITION-EXPANDER) SAVESET (VALUE SIDE) TEDIT.FORMATFOLIO ( -PARALOOKS CHARLOOKS NOFIRSTPAGE FORMATINFO) FILEPKGCOMPROPS (PROPTYPE) \\FM.FORMATBYROW (ITEMS REGION -DAUGHTERS) \\DURATIONTRAN (NEW CLISPWORD) CLISPIFYFNS (FILE) \\TEDIT.CENTER.SEL (QUAD) UNDOLISPX3 ( -*LISPXPRINT*) CL::SET-SETF-METHOD-EXPANDER (SETF-INVERSE :SETF-INVERSE :SHARED-SETF-INVERSE -:SETF-METHOD-EXPANDER) CLISPATOM2A (GLOBALVAR CLISPTYPE) DASSEM.ASMAJ (MOPVAL) TYPESOF (FILE) -\\FM.STATE-SELECTEDFN (CHANGESTATE) CLEARCLISPARRAY (CLISPWORD) ASKUSER (EXPLAINSTRING KEYSTRING CLASS -) MARKASCHANGED (WHENCHANGED) XCL::%REMOVE-SPECIAL-FORM (SPECIAL-FORM) CL:PARSE-NAMESTRING (HOST -DEVICE DIRECTORY SUBDIRECTORY RELATIVEDIRECTORY VERSION) \\FM.EDITSTART-SELECTEDFN (EDIT) -CLISPIFYRPLAC (CLISPTYPE NARGS CROPS) PFI.MAKE.LPT.STREAM (SERVER HOST LANDSCAPE REGION) RECREDECLARE2 - (CLISPWORD) \\FM.EDIT-PREPARETOEDIT (BOXOFFSET MAXWIDTH LIMITCHARS SYSLIMITCHARS ECHOCHAR) EDITDEF ( -EDITDEF) CONTINUEDIT (FILE FILECHANGES FILEDATES) CLISPBROADSCOPE (CLISPTYPE) \\FM.CREATEITEM (LEFT -BOTTOM TYPE LABEL FONT ID INITSTATE MESSAGE LINKS DOWNFN HELDFN MOVEDFN SELECTEDFN) DELDEF (DELDEF -EXPR FILE FILECHANGES FILEDATES) GETDEFCURRENT (GETDEF NULLDEF FILE FILEDATES) COMP.TRANSFORM ( -MACRO-FN) CL::SET-SETF-INVERSE (SETF-METHOD-EXPANDER :SETF-METHOD-EXPANDER :SETF-INVERSE) -HARDCOPYGRAPH (MODE PAGENUMBERS RIGHTMARGIN UPPERMARGIN TRANS) TEDIT (LEAVETTY) FIXSPELL (RESPELLS) -\\FM.STATE-SETUP (MENUITEMS MENUFONT CHANGESTATE MENUTITLE) \\FM.FORMAT (FORMAT FONT LEFT BOTTOM -ROWSPACE COLUMNSPACE ID MOTHER BOX BOXSHADE BOXSPACE REGION) \\LOAD-STREAM (FILEDATES) PURGEHISTORY ( -*HISTORY*) SEDIT::MENU-SUBSTITUTE-SELECTEDFN (SEDIT::FINDITEM EDIT) \\FM.EDIT-ITEM (INFINITEWIDTH) -COMPILE-FILE? (FILETYPE) \\FM.CLEARITEM (INFINITEWIDTH BACKGROUND) DBG::FIND-ORIGINAL-NAME-AND-DEFINITION - (ADVISED BROKEN) FB.COPY/RENAME.MANY (HOST DIRECTORY DEVICE NAME EXTENSION VERSION RELATIVEDIRECTORY) - XCL::UNDOABLY-FMAKUNBOUND (MACRO-FN SPECIAL-FORM CODE EXPR) TEDIT.FORMAT.HARDCOPY (DOCUMENT.NAME) -|UnixPrint| (\#COPIES DOCUMENT.NAME \#SIDES) COMP.ANONP (GLOBALLY-SPECIAL) APPENDTOVAR (VALUE VARTYPE -ALIST) \\FM.MENUHANDLER (INFINITEWIDTH) HASDEF (NULLDEF HASDEF CLISPWORD I.S.OPR EXPR) -TEDIT.FORMATHEADING (PRECONDITIONS HEADINGTYPE) DWMFY1 (INFO) TEDIT.PARALOOKS (1STLEFTMARGIN -LEFTMARGIN RIGHTMARGIN PARALEADING POSTPARALEADING LINELEADING BASETOBASE QUAD TYPE SUBTYPE SPECIALX -SPECIALY NEWPAGEBEFORE NEWPAGEAFTER HEADINGKEEP KEEP HARDCOPY USERINFO REVISED TABS STYLE CHARSTYLES -COLUMN) MAKEFILE (FILEDATES FILETYPE FILECHANGES) CLISPIF (SIDE) ADDTOFILE (WHENFILED) DASSEM.DASSEM ( -DOPVAL AJSIZES) CLISPLOOKUP1 (CLISPCLASS) \\FONTINFOFROMFILENAME (NAME EXTENSION) COMP.EXPR (MACRO-FN) - \\TEDIT.APPLY.PAGEFORMATTING (STARTINGPAGE#) EDITFROMFILE (EDITDEF) UNSAVEBLOCK? (BROKEN ADVISED) -\\FM.GETREGIONS (LABEL HIGHLIGHT MAXWIDTH MAXHEIGHT BOXOFFSET) CLISPIFY2D (CLISPTYPE UNARYOP GLOBALVAR -) \\FM.CHECKPROPS (FORMAT) CLISP3 (BROADSCOPE CLISPIFYISPROP CLISPNEG UNARYOP LISPFN CLISPWORD) -CLISPFOR0 (CLISPWORD I.S.OPR \\DURATIONTRAN BIND SIDE) NEWDEFC (CODE) DINFO.READ.GRAPH (TOPNODEID -TEXTPROPS LOOKUPFN MENUFN FREEMENUITEMS NODELST USERDATA) TEDIT.FORMATPAGE (NEWPAGELAYOUT -STARTINGPAGE# LANDSCAPE? PRINTERMODE) \\IDLE.EXIT? (ALLOWED.LOGINS AUTHENTICATE LOGIN.TIMEOUT FORGET) -LISPXFIND0 (*HISTORY*) UNDONLSETQ (SIDE) SI::FINISH-ADVISING (ADVISED) UPDATEFILES (FILEDATES FILE) -NO.SIDEEFFECTS.FNP (CROPS) \\IDLE.OUT (TIMEOUT) CLISPLOOKUP0 (CLISPCLASSDEF LISPFN) CALLS (GLOBALVAR -BROKEN EXPR) CLISPIFY2B (CLISPWORD CLISPTYPE INFO CROPS CLISPCLASS CLISPCLASSDEF LISPFN CLISPINFIX -CLISPFORM CLISPBRACKET CLISPIFY UNARYOP SEPARATOR SETFN ACCESSFN CLMAPS) PURGEHISTORY2 (*GROUP* -*HISTORY*) \\TEDIT.WINDOW.SETUP (TITLEMENUFN PROMPTWINDOW READONLY PROMPTWINDOWHEIGHT) RECORDECL1 ( -USERRECORDTYPE) ADDFILE0 (FILE FILEDATES) COMPILER::CONSTANT-EXPRESSION-P (COMPILER::SIDE-EFFECTS-DATA -) DISPLAYLINK/LR (DRAWLINKFN LINEWIDTH COLOR DASHING) FM.SHADE (REGION) ARGLIST (EXPR) -\\FM.RIGHTBUTTONFN (INFINITEWIDTH) FB.GET.NEW.FILE.SPEC (NAME EXTENSION) \\GR.PUTDEFFN (NEW) RETDWIM ( -SIDE) LCSKIP (CODEREADER) CLISPCAR/CDR (ACCESSFN) READHASHMACRO (HASHREADMACRO) -\\FM.3STATE-CHANGESTATE (OFFREGION ONREGION UNHIGHLIGHT NEUTRALREGION) ED (EDITDEF PROPTYPE) -CLISPATOM2 (UNARYOP LISPFN CLISPCLASS CLISPBRACKET CLISPTYPE DWIMIFY SEPARATOR SETFN) -XCL::UNDOABLY-MAKUNBOUND (GLOBALLY-SPECIAL GLOBALVAR) CLISPDSUBST (CLISPWORD) SPELLFILE.MATCHINGDIRS ( -HOST DIRECTORY) EDITCOM1 (SIDE) SI::GET-DESCRIBERS (SI::DESCRIBERS) CLISPNOTVARP (GLOBALVAR) -\\TEDIT.HCPYLOOKS.UPDATE (KERN) LISPXSTATE (STATE *HISTORY*) |\\UFSSetFileType| (EXTENSION) -OPENPOSTSCRIPTSTREAM (BOUNDINGBOX DOCUMENT.NAME PAGETYPE PAPERTYPE IMAGESIZEFACTOR REGION FONTS -HEADING HEADINGFONT LANDSCAPE ROTATION) CLISPATOM1A (CLISPCLASS CLISPBRACKET CLISPTYPE BROADSCOPE -CLISPWORD) XCL::VARIABLE-GLOBALLY-SPECIAL-P (GLOBALLY-SPECIAL) GLOBALVARP (GLOBALVAR) COURIER.WRITE ( -COURIERDEF) HELPSYS (CLISPWORD) NSPRINT (DOCUMENT.NAME DOCUMENT.CREATION.DATE NO.WATCHER) RECOMP? ( -ADVISED BROKEN) DWIMUNSAVEDEF (*LISPXPRINT*) BRECOMPILE (FILEDATES FILE) \\TEDIT.CHANGE.LOOKS (FONT -FAMILY FACE SIZE PROTECTED SELECTPOINT UNDERLINE OVERLINE INVERTED STRIKEOUT INVISIBLE SUPERSCRIPT -SUBSCRIPT WEIGHT SLOPE EXPANSION SIZEINCREMENT OFFSETINCREMENT STYLE USERINFO) VARSBOUNDINFORM (INFO -CLISPWORD) UNSAVEFNS (BROKEN ADVISED FILE) \\FM.CHECKDESCRIPTION (LABEL TYPE HJUSTIFY VJUSTIFY -HIGHLIGHT BOX BOXSHADE BOXOFFSET BOXSPACE OFF CHANGESTATE MENUITEMS COLLECTION) MKACCESSFN (STANDARD -UNDOABLE FAST) CL::TYPE-EXPANDER (:TYPE-EXPANDER TYPE-EXPANDER) OPENPRSTREAM (REGION DOCUMENT.NAME -HEADING FONTS) FNCHECK (EXPR FILEGROUP) PRINTCOPYRIGHT (COPYRIGHT) EXEC-VALUE-OF (LISPXVALUES) -RECORDWORD (CLISPWORD) TEDIT.MINIMAL.WINDOW.SETUP (REGION) SEDIT::MENU-PRINTBASE-SELECTEDFN (EDIT) -COPYCHARS (EXTERNALFORMAT) \\FM.3STATE-DOWNFN (BACKGROUND UNHIGHLIGHT) CLISPIFY2C (INFO) -BREAK-FUNCTION (BROKEN) EDITCOMA (EDIT-SAVE LASTVALUE) SEDIT::MENU-PACKAGE-SELECTEDFN (EDIT) -DWIMARKASCHANGED (SIDE *LISPXPRINT*) SIMPLEP (CROPS) PRINTERTYPE (PRINTERTYPE) CLISPIFYCROPS ( -CLISPTYPE) FAULTEVAL (MACRO-FN) NEW/EDITDATE (|Definition-for-EDITDATE|) CLEARFILEPKG (FILE -FILECHANGES) TTY/EDITL (LASTVALUE EDIT-SAVE) \\FONTINFOFROMFILENAME.OLD (NAME EXTENSION) MSNEEDUNSAVE -(BROKEN ADVISED) \\FM.PUSHGROUP (ITEMS REGION) CL:FMAKUNBOUND (SPECIAL-FORM CODE EXPR) -\\FM.REDISPLAYMENU (BOX REGION BOXSHADE BACKGROUND) EDITE (|Definition-for-EDITE|) -CONVERT.FILE.TO.TYPE.FOR.PRINTER (FONTS) \\FM.JUSTIFYGROUPS (HJUSTIFY VJUSTIFY MOTHER REGION DAUGHTERS -) \\TEDIT.HARDCOPY.DISPLAYLINE (KERN) SEDIT::ASSIGN-FORMAT-CLISP (CLISPWORD) \\TEDIT.CENTER.SEL.REV ( -QUAD) VALUOF-EVENT (*GROUP* LISPXVALUES) \\FM.3STATE-SETUPOFFBITMAP (OFF BOX HIGHLIGHT NEUTRALREGION -OFFREGION) MSPRGRECORD (CLISPWORD) DINFO.UPDATE (GRAPH MENU TEXT HISTORY) \\FM.CHANGELABEL ( -UNHIGHLIGHT) COURIER.READ (COURIERDEF) LISPX/1 (INFO) IDLE.SET.OPTION (AUTHENTICATE) CLISPIFYNOT ( -CLISPINFIX CLISPTYPE) FM.REDISPLAYITEM (BACKGROUND) CLISPACKUP (CLISPBRACKET UNARYOP CLISPTYPE) -\\FM.WINDOWENTRYFN (INFINITEWIDTH) MAKEFILES (FILE) PRINT-LOADED-FILE-INFORMATION (FILEDATES) -PRINTHISTORY1 (*FIRSTPRINT* *HISTORY* *REDOCNT* *LISPXPRINT* *PRINT* LISPXVALUES) I.S.OPR (CLISPWORD -I.S.OPR) COMPILER::RESOLVE-VARIABLE-BINDING (GLOBALVAR GLOBALLY-SPECIAL) \\FINDOP (DOPCODE) -UNMARKASCHANGED (FILE) FILECOMS (FILE) SEDIT::PROP-CHANGED (EXPR) FILEPKGCOMS.PUTDEF (CONTENTS CONTAIN -) POLYSHADE.IP (PRINTERMODE P.SCAN.DIRECTION) FILES.PUTDEF (FILE FILEDATES) \\FM.NWAY-CHANGESTATE ( -STATE) \\FM.JUSTIFYITEMS (ITEMS HJUSTIFY VJUSTIFY CL:FORMAT REGION MOTHER) SCALE/GRAPH (FORMAT) -SHRIEKIFY (CLISPTYPE CLISPWORD) COMP.MLL (MLSYM) XCL:TRACE-FUNCTION (BROKEN) CLISPIFY1 (UNARYOP) -EDITLOADFNS? (FILEDATES FILE) RECLISPLOOKUP (LISPFN CLISPCLASSDEF CLISPCLASS) \\FM.CREATEW (REGION -ITEMS) \\TFBRAVO.SPREAD.LOOKS (WEIGHT SIZE FAMILY SLOPE UNDERLINE SUBSCRIPT SUPERSCRIPT) DOFILESLOAD ( -FILEDATES) COMPILE-FILE-EXPRESSION (COMPILE-FILE-EXPRESSION COMPILE.FILE.EXPRESSION) -\\FM.HIGHLIGHTITEM (BACKGROUND) MSCHECKBLOCKBASIC (BLKLIBRARYDEF) \\TYPEGLOBALVARIABLE (GLOBALVAR) -WTFIX1 (SIDE CLISPTYPE UNARYOP CLISPWORD EXPR CODE FILEDEF) SEQUENTIAL.PRETTYPRINT (PRETTYWRAPPER) -CLISPFUNCTION? (CLISPWORD) SAVECOPYRIGHT (COPYRIGHT) FILECREATED (FILEDATES) SPY.MERGE (DELETED DEPTH) - \\FM.DISPLAYITEM (BACKGROUND) MSCHECKFNINBLOCK (MACRO) PRINTCODE (CODE) CLDISABLE (CLISPBRACKET -I.S.OPR SEPARATOR) PFI.PRINT.MULTI.INDEX (MULTIFILEINDEX) XCL:UNADVISE-FUNCTION (ADVISED) -SPY.MERGEINFO (MERGEINFO) CLISPNOEVAL (MACRO-FN INFO) DISPLAYLINK/RL (DRAWLINKFN LINEWIDTH COLOR -DASHING) PRETTYPRINT (EXPR) CLISPATOM (CLISPTYPE) MAKEKEYLST (KEYSTRING) \\FM.SETATTACHPOINT ( -ATTACHPOINT) FM.CHANGELABEL (CHANGELABELUPDATE BACKGROUND) EDITFNS (FILE) LOWERCASE (CLMAPS CLISPINFIX -) FB.BROWSECOMMAND (DIRECTORY HOST) COMPILER::SIDE-EFFECTS (COMPILER::SIDE-EFFECTS-DATA) RESETUNDO ( -SIDE) SUBPRINT1 (CLISPWORD) LISPX (*HISTORY* EXPR FILEDEF CLISPWORD STATE ...ARGS USE-ARGS) FILEPKGCOM - (ADDTOPRETTYCOM DELFROMPRETTYCOM FILEPKGCONTENTS PRETTYTYPE) |\\UFSParse-Directory| (DIRECTORY) -SEDIT::MENU-FIND-SELECTEDFN (EDIT) EDITGETD (EDITGETD MACRO-FN CLISPWORD) \\UFS.PARSE.BODY (NAME -EXTENSION VERSION) TEDIT.CREATEW (PROMPTWINDOW PROMPTWINDOWHEIGHT) CLISPDEC (LISPFN CLISPINFIX -CLISPCLASSDEF CLISPCLASS) SUPERPRINT0 (PRETTYWRAPPER) SEDIT::FN-CHANGED (EXPR) COMP.CARCDR (CROPS) -COMP.GLOBALVARP (GLOBALVAR) SUBPRINT (PRETTYWRAPPER CLISPWORD) CL:GET-SETF-METHOD (:SETF-INVERSE -SETF-INVERSE SETFN :SHARED-SETF-INVERSE :SETF-METHOD-EXPANDER SETF-METHOD-EXPANDER) DWIMIFY0 (SIDE) -MAKENEWCOM (NEWCOM) CL:GET-SETF-METHOD-MULTIPLE-VALUE (:SETF-INVERSE SETF-INVERSE SETFN -:SHARED-SETF-INVERSE :SETF-METHOD-EXPANDER SETF-METHOD-EXPANDER) ASKUSEREXPLAIN (EXPLAINSTRING) -MSCHECKBLOCK (GLOBALVAR GLOBALLY-SPECIAL) \\EXTERNALFORMAT (EXTERNALFORMAT.NAME EXTERNALFORMAT) -POSTSCRIPT.FONTCREATE (PSCFONT) GETDEF.I.S.OPR (CLISPWORD I.S.OPR) SPY.MAKEGRAPHNODES (CUMULATIVE) -\\FM.3STATE-SETUP (UNHIGHLIGHT NEUTRALREGION ONREGION) XCL::SET-DECL-SPECIFIER-P ( -SI::DECLARATION-SPECIFIER) \\FM.NWAY-SELECTEDFN (COLLECTION DESELECT) EDITDEF.FNS (ADVISED BROKEN EXPR -) MSDESCRIBE (GLOBALVAR) \\FM.LAYOUTGRID (FORMAT FONT LEFT BOTTOM ROWSPACE COLUMNSPACE ID MOTHER BOX -BOXSHADE BOXSPACE ITEMS REGION DAUGHTERS) CLISPATOM1 (CLISPTYPE CLISPBRACKET SEPARATOR BROADSCOPE -LISPFN CLISPCLASS UNARYOP CLISPWORD) XCL::SET-GLOBALLY-NOTINLINE-P (SI::GLOBALLY-NOTINLINE) -PROPS.WHENCHANGED (PROPTYPE) TEDIT.UNPARSE.PAGEFORMAT (CHARLOOKS PARALOOKS HEADINGTYPE) -\\FM.TOGGLE-CHANGESTATE (ONREGION UNHIGHLIGHT OFFREGION) CL::ESTABLISH-PREDICATE (COMPILER:OPTIMIZER-LIST -) STOPSCAN? (UNARYOP) COURIER.SKIP (COURIERDEF) CLISPIF0 (SIDE) COMP.UNBOX (BOX) DWIMIFYFNS (FILE) -TEDIT.WINDOW.SETUP (MENU) MULTIFILEINDEX1 (\#SIDES) FIXCONTINUE1 (CROPS CLISPCLASS CLISPCLASSDEF) -DO-HISTORY-SEARCH (LISPXVALUES) PRETTYCOM (GETDEF) DWIMDEF (FILETYPE) XCL::DECL-SPECIFIER-P ( -SI::DECLARATION-SPECIFIER) \\TEDIT.FONTCOPY (FAMILY SIZE FACE) \\DSPFONT.PSC (PSCFONT) CLISPATOM0 ( -SIDE) ACCESSDEF (ACCESSFN SETFN) CL:SPECIAL-FORM-P (SPECIAL-FORM) HISTORYSAVE (*ARCHIVE*) -CLISPEXPANSION (CLISPWORD) \\FM.COLLECTNWAYS (COLLECTION NWAYPROPS STATE INITSTATE) CLISPIFYLOOKUP ( -CLISPCLASS CLISPCLASSDEF LISPFN) CL::SET-SHARED-SETF-INVERSE (SETF-METHOD-EXPANDER -:SETF-METHOD-EXPANDER :SETF-INVERSE :SHARED-SETF-INVERSE) CLISP-SIMPLE-FUNCTION-P (EXPR CLISPWORD) -PRINTDATE (FILECHANGES FILEDATES) DWIMLOADFNS? (SIDE) SETF-MACRO-FUNCTION (MACRO-FN) \\FM.NWAY-MOVEDFN - (COLLECTION STATE BACKGROUND DESELECT) \\FM.LAYOUTCOLUMN (FORMAT FONT LEFT BOTTOM ROWSPACE -COLUMNSPACE ID MOTHER BOX BOXSHADE BOXSPACE ITEMS REGION DAUGHTERS) CLISPELL (RESPELLS CLISPWORD) -CLISP3A (INFO) FB.HARDCOPY.TOFILE (NAME) \\FM.NWAY-DOWNFN (COLLECTION STATE BACKGROUND UNHIGHLIGHT -DESELECT) LLBREAK (BROKEN) LISPX/ (INFO) \\FM.LAYOUTROW (FORMAT FONT LEFT BOTTOM ROWSPACE COLUMNSPACE -ID MOTHER BOX BOXSHADE BOXSPACE ITEMS REGION DAUGHTERS) XCL::GLOBALLY-NOTINLINE-P ( -SI::GLOBALLY-NOTINLINE) CLISPFOR1 (CLISPWORD I.S.OPR) GLOBAL-MACRO-FUNCTION (MACRO-FN CLISPWORD) -PRETTYDEF (MAKEFILE-ENVIRONMENT FILECHANGES) \\COURIER.RESULTS (ERRORS INHERITS) MSPRGE (BROKEN -CLISPWORD) XCL:UNBREAK-FUNCTION (BROKEN) EDITFB (EXPR) \\TEDIT.CREATEW.FROM.REGION (PROMPTWINDOW -PROMPTWINDOWHEIGHT) \\TEDIT.PARSE.CHARLOOKS.LIST (FONT FAMILY FACE SIZE PROTECTED SELECTPOINT -UNDERLINE OVERLINE INVERTED STRIKEOUT INVISIBLE SUPERSCRIPT SUBSCRIPT WEIGHT SLOPE EXPANSION -OFFSETINCREMENT SIZEINCREMENT STYLE USERINFO) MSCHECKBLOCKS (FILEGROUP) DASSEM.CLEANFNTEST (CROPS) -DELFROMFILES (WHENUNFILED) SI::GET-STORED-ARGLIST (ARGNAMES) LISPXFIND (*HISTORY*) SEDIT::LINEARIZE-CLISP - (CLISPWORD) DELFROMCOM (DELFROMPRETTYCOM PROPTYPE) SMARTARGLIST (BROKEN ARGNAMES ADVISED EXPR CODE) -\\FILEMAP-HASHOVERFLOW (FILEDATES) PRETTYFILEINDEX (\#SIDES DOCUMENT.NAME) MSSHOWUSE (EXPR) -DISPLAYLINK/BT (DRAWLINKFN LINEWIDTH COLOR DASHING) SCANFILE1 (CODEREADER) NIL -TEST \\BLTSHADE.BITMAP (CLIPPINGREGION WIDTH HEIGHT DESTINATIONNBITS TEXTURE) \\DSPTOPMARGIN.IP ( -YPOSITION) TEDIT.COPYTOCLIPBOARD (TEXTSTREAM) SEDIT::COMPLETE (SEDIT::COMPILE-SUCCEEDED?) -\\FTP.ERRORHANDLER (INSTREAM) \\HARDRESET-CLEANUP1 (INFO ERRORS-SEEN) \\COURIER.REP.BOUT (X) -TWODINSPECT.REPAINTFN (WINDOWREGION STARTROWPROPS STARTCOLUMNPROPS) HARDCOPYREGION.TOPRINTER ( -PRINTERCHOICE) PRINTPACKETDATA (MACRO SEPR FINALPRINT) \\TEDIT.WINDOW.TITLE (NEW.TITLE) DOERROR ( -QUESTIONABLE ARG) FB.THINCOMMAND (LASTTIMESTAMP TIMESTAMP) CL::%ASIN-FLOAT (CL::REDUCED CL::NEGATIVE -CL::ACOS-FLG) RENAMEFILE (OLDFILE NEWFILE) SEDIT::INSPECT-SELECTION (CL:STRUCTURE) \\HCPYMODEBLTCHAR ( -SOFTCURSORUP SI::*OR-GENTEMP*) \\DSPROTATE.PSC (ROTATION) CLEARHASHFILES (CLOSE) \\DISABLEGC1 (NOERROR -) \\HARDRESET-CLEANUP (LINEARBINDINGS OLDVAL) \\TEXTSTREAMBOUT (WINDOW L1 LN) \\COPYSYS (UNIXVAR VAL) -COMPSET (FILE FLG) FILES? (PRINTED TB FLG) MB.SHOWSELFN (ON) \\TEDIT.REPAINTFN (LINE) SCALEPAGEUNITS ( -VALUE) TWODINSPECT.BUTTONEVENTFN (SELECTION) HARDCOPYREGION.TOFILE (FILE&TYPE) \\GCERROR (FLG REASON) -\\TEDIT.ORIGINAL.WINDOW.TITLE (FILE DIRTY?) STACK.FULL.WARNING (FLG) CL:POSITION (END) -\\GC.MODIFY.BIGREFCNT (TMP) PASTEFROMCLIPBOARD (WINDOW) ALLOCSTRING (INITCHAR FATP) -FB.HARDCOPY.MAXWIDTH (DATEP) \\FTP.WHENCLOSED (CONN) OPT.DELETEFRAMECHECK (CD VARS) SHORTLST (X) -\\COURIER.REP.BIN (X) \\SENDLEAF (NOERROR NOREPLY) SUBSTRING (END FATP) \\SHOWMENULABEL (CENTER?) -PFI.AFTER.NEW.PAGE (LEFT RIGHT) \\LOGOUT0 (FAST) NTHCHARCODE (FLG FATP) \\SLOWHCPYMODEBLTCHAR ( -SOFTCURSORUP SI::*OR-GENTEMP*) FIND-STACK-FRAME (FRAME-SPEC) FB.THINP (OLDESTVERSION?) -\\GC.LOOKUP.BIGREFCNT (TMP) COMPILER::COPY-VARIABLE (COMPILER::VAR) TTYINPROMPTFORWORD ( -DONTECHOTYPEIN.FLG KEYBD.CHANNEL TERMINCHARS.LST ECHO.CHANNEL PROMPT.STR) SETUPFONTS.PRESS (FLG) -\\ALLOCPAGEBLOCK (RESULT) \\SPPGETERROR (MOREMSG) UNIX-GETPARM (LEN) SET-PACKAGE-INTERACTIVELY ( -PACKAGE) \\GCMAPUNSCAN (PREV) \\GCMAPSCAN (PREV) \\ICONW.FORMAT.TITLE1 (DONE LASTBREAKPOS MINWIDTH) -ADDTOFILES? (NOASKSTR BUFS NAME FILE) COMPILER::CLOSURE-ANNOTATE-TAGBODY (COMPILER::IN-LOOP-P) -\\DSPRIGHTMARGIN.IP (XPOSITION) MKSTRING (FLG) \\INSERT.FIRST.PIECE (TEXTOBJ) \\IMAGEUSERPROP (SET? -PLIST) OPENBSPSTREAM (SOCKET) \\TEDIT.FORMAT.FOOTNOTE (PREVLINE) FB.ADD.FILE (SIZE) GETHOSTINFO (INFO) - SEDIT::LOCATE-NODE-FROM-EDITCHAIN (SEDIT::CHAIN) TWODINSPECT.COPYBUTTONFN (SI::*OR-GENTEMP* SELECTION -) HARDCOPYW (PRINTERTYPE PRINTHOST FILE SCALEFACTOR REGION HOST) |UnixTempFile| (|DontOpen|) DODIR ( -EXTRACOMS) WORD.MATCHES.BUFFER (CHAR) COMP.COND (X MORE ENDF) TEDIT.GET.LOOKS (CH#ORCHARLOOKS) -OPT.FRAMEDEL (VARS TRYXVAR DOXVAR FLV) UNPACKPATHNAME.STRING (ONEFIELDFLG ATOMFLG) \\LEAF.CLOSEFILE ( -STREAM FORCE CACHE) STRPOS (START BACKWARDSFLG TAIL SKIP CASEARRAY ANCHOR PATFAT STRFAT) -\\SET.FINALIZATION.FUNCTION (TYPENO) \\TEDIT.CONVERT.TO.FORMATTED (NEXTCR) \\TYPENUMBERFROMNAME (TYPE) - BCOMPL2 (BLKNAME FILEMAPLST COREOK LST) RIGHTW.ADJUSTSELECTION (SELECTION) TEDIT.HARDCOPY-COLUMN-END -(LINES FINAL-CHNO ORPHAN LASTLINE FOOTNOTELINES ORIGINAL-LINES DONT-KEEP-SINGLE-LINE REMOVED-LINES) -BITMAPBIT (NEWVALUE TX TY SOFTCURSORUP SI::*OR-GENTEMP*) COPIEDFROMSPEC (DIREND) TEDIT.DEFAULT.MENUFN -(OFILE CH) COURIER.REP.LENGTH (N) \\TFBRAVO.GETPARAMS (L) |UnixPrintCommand| (PRINTER) -\\LISP.TO.NSFILING.ATTRIBUTE (VALUE TL) \\DSPSPACEFACTOR.IP (FACTOR) TEDIT.EXTRACTTOCLIPBOARD ( -TEXTSTREAM) \\FIXILINES (LINE) ORDERFROMBOTTOMTOTOP (WLST WPTR) SEDIT::INSERT-LITATOM (CL:CHAR) FNTYP -(DEF) |UnixShellQuote| (FLG) \\DSPLINEFEED.IP (DELTAY) SETF-SYMBOL-PACKAGE (VALUE) OPT.FRAMEVAR (CD -ANY) D-ASSEM:INTERN-DCODE (D-ASSEM::COPY-P) SHOWBITMAP.IP (REGION SCALE) FILEPKGTYPE (TEM) RECLAIMMIN -(N) ASKUSER (KEYLST FILE TYPEAHEAD MESS DEFAULT TEM NOECHOFLG PROMPTSTRING KEYLST1 ANSWER ORIGMESS -CONFIRMFLG LISPXPRNTFLG BUFS) TEDIT (TEXT WINDOW TEDITCREATEDWINDOW DONTSPAWN) BACKSKREAD (NOTIFQUOTED - ESCAPED X) \\PROCESS.BEFORE.LOGOUT (W) FIND-LEXICAL-ENVIRONMENT (POS) \\SLOWBLTCHAR (SOFTCURSORUP -SI::*OR-GENTEMP*) PFI.MAKE.LPT.STREAM (PRINTER) TEDIT.UPDATE.SCREEN (NLINE) \\DSPPRINTCR/LF ( -SOFTCURSORUP SI::*OR-GENTEMP*) \\RESOLVE.TYPENUMBER (TYPENAME) HERALD (STR) SI::EXPAND-PROCEED-CASE ( -SI::OPTIMIZE? SI::CTX) FB.SEEFULLFN (BUTTONS EVENT) SI::EXPAND-CONDITION-CASE (SI::CLAUSES -SI::NO-ERROR-CLAUSE SI::OPTIMIZE? SI::CTX) OVERLAPPINGWINDOWS (WPTR) -TWODINSPECT.DEFAULT.VALUECOMMANDFN (VALUE) FLASHWINDOW (WHOLEP) CREATEW (REGION TITLE) CL::%TAN-FLOAT -(CL::RECIPFLG) CONDITIONS::EXPAND-RESTART-CASE (CONDITIONS::OPTIMIZE? CONDITIONS::CTX) -POSTSCRIPT.SET-FAKE-LANDSCAPE (ROTATION LAND) SEDIT::SELECT-NEXT-GAP (SEDIT::NODE) ADDTOFILE (FILE) -CONDITIONS::CONVERT-RESTART-CASES (CONDITIONS::ALL-CONSTANT?) CLISPLOOKUP1 (LST) RIGHTW.BUTTONEVENTFN -(ROWPROPCOMMANDFN SELECTION) SEDIT::COMPLETION (SEDIT::CHANGED? SEDIT::IFCHANGEDFN) -COMPILER:COPY-ENV-WITH-VARIABLE (COMPILER:ENV) USERNAME (FLG NAME) MB.DEFAULTBUTTON.ACTIONFN (OFILE CH - PRINTHOST \#COPIES \#SIDES MSG) TB.FIND.PREVIOUS.TAIL (TAIL) PFI.LINES.REMAINING (BOTTOM) COMPILER:ENV-BOUNDP - (COMPILER::LOOKUP) \\TELERAIDSERVER (RECEIVER METADEBUGGING) SETUSERNAME (NAME) DODIRCOMMANDS ( -COMTAIL TYPE) \\TEDIT.LOOKS.UPDATE (PC ORIGPC) PRINT-BITMAPS-NICELY (STREAM) UPDATEFILES (PCHANGES) -\\SHOWSEL (ON L1 LN) REPLACEFIELD (TN NEWVALUE) TEDIT.STRINGWIDTH (TERMSA) COMPILER:COPY-ENV-WITH-FUNCTION - (COMPILER:ENV) |\\VFMSaveBuffer| (|evenIfNotDirty|) CL:MAKE-PACKAGE (CL::EXTERNAL-ONLY) BOXCOUNT ( -TYPE) CLISPIFY2B (TEM1) SET/LABEL/SIZE (RESET/FLG FONT) PRINTERROR (VALS NEWPRS) \\DSPLEFTMARGIN.IP ( -XPOSITION) SEDIT::INPUT-QUOTE (SEDIT::SUPER-NODE) INITPUPLEVEL1 (FLG) \\COERCEFONTDESC (STREAM FONT -NOERRORFLG SPEC) COURIER.OPEN (NOERRORFLG) \\TEDIT.TRY.ABBREV (EXPANSION) STKNTHNAME (POS CFLAG) -TEDIT.\\INSERT (SEL) DBG::COLLECT-ACTIVE-ESCAPES (DBG::ALL) \\ACTONDISKPAGES (CA\s BUF SI::*OR-GENTEMP* - BUFFERS LASTACTION LASTNUMCHARSCONS) WTFIXLOADEF (FAULTEM3) TRAPMAKE (UNFINISHED) -PFI.SETUP.TRANSLATIONS (CHARPAIRS FONT) INTERPRESSBITMAP (REGION TITLE SCALEFACTOR) PARSE.NSNAME (NAME - DEFAULTDOMAIN THIRDPART) IMPORT (CL::CSET) MB.SELFN (BUTTONFN) \\TEDIT.HCPYLOOKS.UPDATE (PC NLOOKS -NEWKERN) \\DOACTONDISKPAGES (HINTLASTPAGE RETURNONCHECKERROR) HARDCOPYIMAGEW.TOPRINTER (PRINTERCHOICE) - ASSURE.ETHER.ON (USENS) \\DISKERROR (STREAM) RAISE-SIGNAL (*CONDITION-HANDLER-BINDINGS* BINDING) -SEDIT::REPLACE-ROOT (SEDIT::POINT) \\CLEARMAP (PAGES BUFFER USERFLG PREVBUFFER) NSNAME.TO.STRING (OBJ -FULLNAMEFLG) CL:Y-OR-N-P (FORMAT-STRING) CL:IN-PACKAGE (PACKAGE) CH.ISMEMBER (SECONDARYPROPERTY) -VARSBOUNDINFORM (INVAR) TEDIT.HARDCOPY.PAGEHEADING (PC NPC) HARDCOPYIMAGEW.TOFILE (FILE&TYPE) -HASHARRAY (REHASH-THRESHOLD) \\MEDW.BITBLT (SI::*OR-GENTEMP*) EXCHANGEXIPS (IDFILTER) -M44.SIGNAL.DISK.ERROR (ERRCODE) UNDOSAVE (HISTENTRY UNDOFORM) FINDPTRSBUFFER (B NOERRORFLG) CL:READ-CHAR - (EOF-ERRORP RECURSIVE-P) GETSUPERTYPE (NX) \\ACTONVMEMPAGES (CA\s LASTACTION) \\3MBFLUSH (ASPROC) -DATATYPES (USERSFLG) \\NSFILING.ADDQUOTES (QUOTED ALREADYQUOTED) CL:STRING= (START1 END1 START2 END2) -INSURE.B&W.TEXTURE (TEXTURE NOERRORFLG) SUBARRAY (M1) BLOCKCOMPILE (BLKFNS ENTRIES FLG) MAPBUFFERCOUNT - (B AVAILFLG) \\DSPCLIPPINGREGION.IP (REGION) COMPILER::CLOSURE-ANNOTATE-LAMBDA (COMPILER::NEW-FRAME-P - COMPILER::IN-LOOP-P) \\WRITEVMEMPAGES (CA\s) FB.ANALYZE.PATTERN (LASTPATDIR) TEDIT.SKIP.SPECIALCOND ( -PC NPC) RESHAPEALLWINDOWS (ATWINS MAINONLYFLG) DINFO.UPDATE (FMENU.WINDOW) \\MAPPAGE (BUF USERFLG -PREVAVAIL STREAM) MSCHECKBOUNDFREE (SFLG BLKNAME) CL:DELETE (END COUNT) |\\VAMRecomputeFreePageCount| -(|free| |firstFree|) \\ENDVECRUN (WASDISPLAYING) CL::%SIN-FLOAT (CL::COS-FLG) \\DODISKCOMMAND (NEXTCB) - SEDIT::INPUT-DOT (SEDIT::NODE) MSCOLLECTDATA (FLG) \\CLEANUPDISKQUEUE (FREE) SEDIT::REPLACE-NODE ( -SEDIT::SELECT-NODE) \\3MBSENDPACKET (PBI) OPT.FRAMEMERGE (V) SEDIT:GET-SELECTION (SEDIT::NODE SEDIT::START - SEDIT::NOT-ALL-SELECTED) BCOMPL1A (FIRSTFLG COMPEVALFLG) FB.CHECK.NAME.LENGTH (OVERFLOW) -ONEDINSPECT.REPAINTFN (WINDOWREGION STARTPROP) \\SEQUIN.FLUSH.RETRANSMIT (REPUP) UNMARKASCHANGED ( -ANYFLG) \\DSPBOTTOMMARGIN.IP (YPOSITION) TB.ITEM.UPDATABLE? (ONLYIFVISIBLE OLDN) SPLIT89 (POS Y) -\\WRITEDISKPAGES (CA\s BUF SI::*OR-GENTEMP* BUFFERS) SCALE/GRAPH (LAYOUT-IS-VERTICAL) STORAGE (TYPES -HFLG DOBLOCKSFLG) TEXTUREOFCOLOR (RGB) SEDIT::RELINEARIZE-WHERE-NECESSARY (SEDIT::CHANGED-NODES) -DBG::INVOKE-ESCAPE-FROM-MENU (DBG::MENU) \\NSINIT (MINI PROC) \\TFBRAVO.INSTALL.PAGEFORMAT ( -PAGENUMBERS PAGENUMBER.NOTONFIRSTPAGE HEADINGDESC HEADING.NOTONFIRSTPAGE ODDHEADINGDESC -ODDHEADING.NOTONFIRSTPAGE EVENHEADINGDESC EVENHEADING.NOTONFIRSTPAGE) \\HASHACCESS (EQFN DELSLOT -REMOVE) OPT.FRAMEOPT (TRYLOCAL TRYMERGE) DBG::ESCAPE-FROM-DEBUGGER (DBG::SHADOW? DBG::ESCAPES) -HARRAYPROP (NEWVALP HARRAY) \\COLLECTDIRTYBUFS (B STREAM) \\PUNT.BLTSHADE.BITMAP (CLIPPINGREGION WIDTH - HEIGHT DESTINATIONNBITS TEXTURE) \\STORAGE.TYPE (LSTPAG PTR IN-USE-THRESHOLD) PFI.PROCESS.FILE ( -DONTINDEX) COMPILER::COPY-NODE-RETURN (CL:BLOCK) INSPECT/AS/BLOCKRECORD (CHOICES) SIMPLETEXTEDIT (FILE - INSTREAM) \\STORAGE.HUNKTYPE (PAGE-THRESHOLD IN-USE-THRESHOLD) \\NOTE.3TO10 (A) MSCHECKFNINBLOCK ( -ISCALLEDP) DBG::PRINT-BACKTRACE (DBG::TEST DBG::PRINT-VARIABLES DBG::PRINT-JUNK) PFI.PRINT.MULTI.INDEX - (ENV CONSECUTIVE TAB1 TAB2 TAB3) STORAGE.LEFT (FREE) SEDIT::EDIT-HELP (SEDIT::FNAME) PUTHASH (VAL) -\\PUNT.BITBLT.BITMAP (CLIPPINGREGION WIDTH HEIGHT TEXTURE SOURCETYPE) COURIER.ABORT.BULKDATA (ERROR) -\\PAGED.GETNEXTBUFFER (NOERRORFLG) MSUPDATE (EACHTIME ERS PRFLG) \\SETIODIRTY (BUF) -COMPILER::NULL-EFFECTS-INTERSECTION-EXCEPT-CONS (COMPILER::EFFECTS-1 COMPILER::EFFECTS-2) -SETUPFONTS.IP (IPDATA) INVERTED/GRAPHNODE/BORDER (BORDER) SEDIT::ICON-COPYFN (SEDIT::NAME) -SEDIT::COLLECT-UNDO-BLOCK (SEDIT::BLOCK-START) \\PAGED.FORCEOUTPUT (B BUFFERS) DEFAULT.EDITDEF (SOURCE - FILES) ICONW.PRINT-JUSTIFIED (NEWFLG) \\DOFORMATTING.HARDCOPY (1STLN) DSPSOURCETYPE (SOURCETYPE) -IRM.LOAD-GRAPH (FILE) SORT (DATA) MSUPDATEFN1 (DOSUBFNS) SEDIT::PROPAGATE-WIDTH-CHANGE (SEDIT::SUPER) -COMP.BOOL (A FLAG) ADDTOCOMS (COMS) PRINT3TO10 (DOFILTER PRE.NOTE) MSCHECKBLOCK (BLKNAME BLKAPPLYFNS -ERRORS) COMPILER::NULL-EFFECTS-INTERSECTION (COMPILER::EFFECTS-1 COMPILER::EFFECTS-2) -COURIER.WRITE.BULKDATA (TAIL) GETDEF.I.S.OPR (EVALFLG) SETTTBLPROP (NEWVALUE) DSPCREATE (DESTINATION) -ICONW.TITLE (TITLESPEC TITLE) SEDIT::SEDITL (SEDIT::EDITCOMS) ONEDINSPECT.BUTTONEVENTFN (SELECTION) -INVERTED/SHADE/FOR/GRAPHER (SHADE) COMPILE1A (COREFLG) ONEDINSPECT.COPYBUTTONFN (SI::*OR-GENTEMP* -SELECTION) FIND.LINE.BREAK (USELAST) \\TEDIT.INTERRUPT.SETUP (FORCEOFF TEXTOBJ) CLISPIFY2A (SEG FLG) -SEDIT::COPY-SELECTION-LITATOM (SEDIT::DESTINATION SEDIT::NOT-ALL-SELECTED SEDIT::START) -COMPILER::CLOSURE-ANNOTATE-LABELS (COMPILER::IN-LOOP-P) \\STRINGWIDTH.PRESS (RDTBL) \\CLIPCURVELINE.IP - (SWAPPED) PPBUFS (B) CHCON (FLG FATP \\CHCONLSTAIL) FIND-DEBUGGER-ENTRY-FRAME (SKIP-FAKE? INBRK) -\\TEDIT.UPDATE.SHOWSEL (EXCHFLG L1 LN) \\3MBGETPACKET (PBI) \\PAGEDREADP (FLG CHAR) CL:APROPOS ( -PACKAGE EXTERNAL-ONLY) PRINTERSTATUS (STATUSFN) \\BITBLT.BITMAP.SLOW (CLIPPINGREGION WIDTH HEIGHT -TEXTURE SOURCETYPE) UNPACK (FLG FATP \\CHCONLSTAIL) \\CHECKARRAYBLOCK (FREE ONFREELIST) \\LOOKUPFMAP ( -ISFMAP) \\ALLOCBLOCK.OLD (ALIGN INITONPAGE) RETDWIM3 ($TAIL) CL:APROPOS-LIST (PACKAGE EXTERNAL-ONLY) -SEDIT::CONS-ATOM (SEDIT::ATOM? SEDIT::CHARS) RECORDACCESS (DEC DEF) DCHCON (FLG FATP) SEDIT::SEDITE ( -CL:ATOM TYPE SEDIT::COMS SEDIT::ROOT-CHANGED-FN) \\ALLOCBLOCK.NEW (INITONPAGE ALIGN) FLAST (Y) -MSCHECKBLOCKS (FILES BLOCKS) \\MAIKO.ALLOCBLOCK (ALIGN INITONPAGE) \\ALLOCHUNK (ALIGN INITONPAGE -STRADDLERS) DUNPACK (FLG FATP) MSSHOWUSE (FILE ANYFOUND INCLISP EDITCOMS) SCANDECLARECOLON (DONTCOPIES - EVALFLG) \\TEDIT.NSCHAR.RUN (NEXTCH) COPYHASHFILE (LEAVEOPEN) CHECK-SYMBOL-NAMESTRING (CL:PACKAGE-NAME -) \\MERGEFORWARD (BASE NBINUSE) ALPHORDER (AFATP BFATP) FB.HANDLE.ABORT.BUTTON (BROWSER) -\\IDLE.IS.PREVIOUS (OLDPWD) \\LINKBLOCK (FREEBLOCK) CASEARRAY (OLDAR) \\ICONW.FORMAT.TITLE (MAXLINES) -SEDIT::START-PROCESS (SEDIT::NAME) \\NEW.READ.SYMBOL (NONNUMERICP PACKAGE EXTERNALP) \\MERGEBACKWARD ( -BASE) IOCBQLENGTH (FIRSTIOCB) RESOLVE-READER-CONFLICT (ILPREFERRED CLPREFERRED) WINDOWADDFNPROP ( -CURRENT) TTYINEDIT (PRINTFN WINDOW) LINBUF (FLG) MSNOTICEFILE (FULL) \\NEW.MKATOM (FATP) -DEFAULTMAKENEWCOM (LISTNAME FILE) CLEARBUF (FLG LINBUF SYSBUF) PACKC (HASFAT) SPP.DSTYPE (DSTYPE -NOBLOCK SI::*OR-GENTEMP*) \\TEDIT.FORMATTABS (PRIORTAB NEXTTAB CLEANINGUP) COPYHASHITEM (USERFN) -COMP.PICOUNT (VARS) SEDIT::COMPOSE-PSEUDO-SELECTION (SEDIT::START SEDIT::END) TTY.PROCESS (PROC OLDTTY - INTERRUPTLIST NEWINTERRUPTS) COMPILER::NULL-INTERSECTION (COMPILER::LIST-1 COMPILER::LIST-2) -ONEDINSPECT.DEFAULT.VALUECOMMANDFN (VALUE) REMWINDOWPROP (PREV) SEDIT::EXTRACT-CURRENT-SELECTION ( -SEDIT::NODE) \\CHECKFORSTORAGEFULL (NPAGES) \\DEQUEUE (ITEM) SETDISPLAYHEIGHT (NSCANLINES) -\\M44DOEXTENDVMEMFILE (LASTPAGE EXTENDED) \\SETBRUSH.IP (COLOR) SCANEXP (EXP EVALFLG) SEDIT::EXPAND ( -SEDIT::NODE) \\SHOWSEL.HILIGHT (L1 LN LL) COMPILER::EFFECTLESS-EXCEPT-CONS (COMPILER::EFFECTS) -SPP.OPEN (HOST SERVERFN PROBEP) COMPILER::EFFECTLESS (COMPILER::EFFECTS) PACK (X) COMP.CPI1 (VARS) -BLOCK (MSECSWAIT TIMER OLDPROC) OPT.RETMERGE (FEQ VEQ) TEDIT.MOVE (FROM TO REPLACING) \\PEEKNS (HOST -FILE) RETDWIM2 (N M) \\PREFIXALIGNMENT? (ALIGN INITONPAGE) TEDIT.SETFUNCTION (FN) -SEDIT::GET-DESTINATION-CONTEXT (SEDIT::DESTINATION) TB.FIND.ITEM (FIRST# LAST# BACKWARDSFLG) -SCANDEFINEQ (CONTINUEFLG) \\ICONW.SHOW.TITLE (MASK) INSURE.WINDOW (NOERRORFLG) CL:INTERN (PACKAGE) -PACKAGE-HIERARCHY-INIT (CONVERT?) \\TEDIT.UNPARSE.PARALOOKS.LIST (PROP) SEDIT::PARSE (SEDIT::SUPER-NODE -) \\DOFORMATTING (1STLN) MSSETUP (INITFLG) MAKEBITTABLE (NEG) SYSBUF (FLG) SEDIT::EVAL-SELECTION ( -CL:STRUCTURE SEDIT::VALUE) COPYALL (X) \\IDLE.AUTHENTICATE (UNIX NS GV) CONVERT-LITATOM (CL:PACKAGE-NAME -) \\TEDIT.HARDCOPY.FORMATLINE (PC 1STLN DOINGHEADING? KERN GATHERBLANK NEWASCENT TABPENDING PREVDHYPH -PREVHYPH T1SPACE FORCEEND) COMPILEMODE (MODE) TB.DISPLAY.LINES (EXTENTCHANGED) OPT.RETTEST ( -ONLYIFSAMEFRAME) \\TEXTDSPXPOSITION (WINDOW) TEDIT.GETFUNCTION (TABLE) \\LOADNSHOSTNUMBER (OLDBOX) -HISTORYFIND1 (PAT2 PAT1) FILEPOS (SKIP CASEARRAY START END TAIL) \\DSPYPOSITION.HCPYMODE (YPOSITION) -SELECT.LIST.INSPECTOR (RECDEC) FFILEPOS (SKIP START END CASEARRAY TAIL) CL::%RATIO-PRINT (CL::PR) -FB.PRINTFN (FATP INFO OLDFONT) \\ETHEREVENTFN (DB TURNOFFNS) GRAPHDELETELINK (DELFN) -\\MAYBEPRINTPACKET (NDB) CARETRATE (ONRATE OFFRATE) \\CHDEL1 (CHAR) COMPILER::CLOSURE-ANNOTATE-BLOCK ( -COMPILER::IN-LOOP-P) TEDIT.MAPPIECES (PC) CL:ADJOIN (CL::KEY) \\TEXTMENU.DOC.CREATE (CH#1) -PROMPTINWINDOW (POSITION READSTR) SEDIT::BACKSPACE-UNKNOWN (SEDIT::INDEX) \\DSPFONT.IP (FONT) -COMPILER::CLOSURE-ANNOTATE (COMPILER::NODE) DUMPGRAPH (BORDERS SHADES) \\OFFSETCLIPPINGREGION ( -OLDREGION) \\STARTDISPLAY (OLDWINDOWS) MARGINBAR (UNSETL1 UNSETLN FLOATINGRIGHT EXTENDEDRIGHT) -SEDIT::EDIT-SELECTION (CL:STRUCTURE) \\SHOW.ARRAY.FREELISTS (SIZESLST X) \\10MB.PRINT.ENCAPSULATION ( -CALLER) \\DSPTOPMARGIN.PRESS (YPOSITION) SEDIT::PARSE-INDENT-GROUPS (SEDIT::GROUPS) SPP.CLOSE (STREAM -ABORT?) BITMAPOBJ.SNAPW (SAVE) WFROMDS (DONTCREATE) \\TEXTDSPYPOSITION (WINDOW) \\UNPACKDATE (FRAC -CHECKDLS) SETSYNONYM (NEWPHRASE KEYLST) \\FILLBUFFER (CONTROLTON CHAR PEEKEDECHOED) \\STOPSCROLL? (W) -SPP.SENDEOM (SI::*OR-GENTEMP*) TITLEDICONW (BREAKCHARS ICON) HARDCOPYGRAPH (FILE LANDSCAPE-FLAG) -\\NSFILING.LOOKUP.CACHE (FILENAME) \\INTERPRETER1 (ARGLIST) CL:ATAN (CL::X) CL::%COMPARISON-OPTIMIZER -(CL::SECOND-NUMBER CL::THIRD-NUMBER) SEDIT::BACKSPACE-LITATOM (SEDIT::INDEX) \\TEXTMENU.SET.TOGGLE ( -PCNO) \\STACKARGPTR (POS) SEDIT::NEXT-NODE (SEDIT::INDEX SEDIT::NODE) COLLECTKEYS (DOUBLE MKSTRING?) -MERGEINSERT (ONEFLG LST1 PLACE) OPT.RETPOP (VAL) \\IDATESCANTOKEN (CH) \\PACKDATE (YR MONTH DAY HR MIN - SEC) \\FM.MENUHANDLER (ITEM LASTITEM PROMPTFLG SAMEPROCESS) \\DSPSPACEFACTOR.PRESS (FACTOR) -PROCESSWORLD (FIRSTTIME PQ EXECPROC) \\SEQUIN.FLUSH.CONNECTION (PROC) \\FTP.NEXTFILE (FTPCONNECTION -NAMEONLY FILTER) \\DSPXPOSITION.HCPYMODE (XPOSITION) \\PARSEARRAYSPACE1 (FN) CHANGESLICE (HISTORY L) -\\DSPRIGHTMARGIN.PRESS (XPOSITION) \\RUN.PROCESS (BRUTALLY EVENT PREV) DBG::BACKTRACE-ITEM-SELECTED ( -DBG::LP) DRIBBLE (OLD-DRIBBLE-STREAM FILE APPENDFLG) \\START.PROCESSES (OLDPROC) -\\DSPRIGHTMARGIN.HCPYMODE (XPOSITION) CH.CHANGE.ITEM (INTERPRETATION) \\SMASHLINK (ALINK CLINK) -\\RELEASE.PROCESS (EVENT KILLIT RESTARTFLG) FAULTAPPLY (%LEXICAL-ENVIRONMENT%) SEDIT::LINEARIZE-ROOT ( -SEDIT::INDEX) TTGIVEHELP2 (MIXED) TEDIT.DELETELINE (PREV NEXT) \\SETUP-COMPILED-CLOSURE-CALL (SLOWP) -CL:CLOSE (ABORT ABORTABLE) XCL::SCEILING (CL::DIVISOR) LISPXFIND0 (L1 THRUFLG L2 HISTORYFLG) -\\OUTDATE-STRING (SHORTP) \\TEXTDSPFONT (NEWFONT) XCL::SROUND (CL::DIVISOR) SEDIT::BACKSPACE-GAP ( -SEDIT::INDEX) XCL::STRUNCATE (CL::DIVISOR) TB.SET.FONT (FONTGIVEN) SPP.CLEAREOM (NOERRORFLG) -\\TEDIT.SHRINK.ICONCREATE (ICONTITLE ICON) XCL::SFLOOR (CL::DIVISOR) TEDIT.MAPLINES (LINE) -CL:COPY-READTABLE (FROM-READTABLE TO-READTABLE) CL::%LOGICAL-OPTIMIZER (CL::FIRST-INTEGER -CL::SECOND-INTEGER CL::MORE-INTEGERS) TTGIVEHELP1 (NO.OTHER) ARGLIST (DEF) MSSETPHRASE (NOTYP NEG) -\\DSPLINEFEED.PRESS (DELTAY) \\MAIKO.CONS.UFN (Y) \\CREATELINEBUFFER (TERMINAL.STREAM) COMPILER::COPY-NODE-GO - (CL:TAGBODY) \\IRM.SMART.REF (POS CORRECTED) ETHERHOSTNAME (PORT IPUP USE.OCTAL.DEFAULT) -PROMPTFOREVALED (WHERE) INSPECT/PROPLIST (ALLPROPSFLG PROPS) CL:COUNT-IF (END) CHANGEBACKGROUND (SHADE -) \\SPP.PREPARE.INPUT (EPKT TIMEOUT) CL:COUNT-IF-NOT (END) \\TTW1 (SOFTCURSORUP SI::*OR-GENTEMP* ISECT -) ENDCOLLECT (X) \\SETUP-ENVIRONMENT-CALL (SLOWP ENV) MAKETITLEBARICON (TEXT) EVENP (CL::MODULUS) -\\IRM.GET.REF (REFS TYPE REF) \\NSFILING.ADD.TO.CACHE (ID OLDHANDLE) CHECK-PARAMETER-NAME (NAME) -SEDIT::GET-CONTEXT (SEDIT::NAME CL:STRUCTURE SEDIT::SEARCH-ONLY?) CL:COUNT (END) \\MOUSE.PROCESS ( -OTHERMOUSE) SEDIT::ATOM-POINT-TYPE (SEDIT::ESCAPED) SEDIT::EXPANDREGIONFN (SEDIT::REGION) -XCL::MAKE-PROTOTYPE (XCL::PROTOTYPE-FN) CL:DELETE-DUPLICATES (END) \\ALLOCMDSPAGE (NXT) CL:DELETE-FILE - (TN) \\EVALVAR (VAR) OPENWINDOWS (WINDOW) TEDIT.DEACTIVATE.WINDOW (TEXTOBJ FORCEFLG DISCONNECTONLYFLG -) XCL::ADD-PROTOTYPE-FN (XCL::TYPE-ALIST XCL::DEFINER-ALIST) CL:DECODE-UNIVERSAL-TIME (CHECKDLS) EXEC -(XCL::WINDOW) \\SPP.ESTABLISH (NAME) COURIERPROGRAM.PRETTYPRINT (EXPR) EDITCOMS (COMS) -\\FREESTACKBLOCK (START ALIGN) \\NSADDRESS.PRINT.DECIMAL (PIECES) \\TFBRAVO.PARSE.PARA (LEN) -MAINWINDOW (RECURSEFLG) CROPMARK.CREATE (HEIGHT) CL:DELETE-IF (END COUNT) \\LINEBUF.READP (KEYSTREAM) -CL:DELETE-IF-NOT (END COUNT) \\MAPMDS (TYPE) \\DSPLINEFEED.HCPYMODE (DELTAY) \\CHECKCONSPAGE ( -SI::*OR-GENTEMP*) \\DEFINEDISPLAYINFO (BUCKET) TTY/EDITL (ATM COMS UNDOLST1 EDITIME0) CHECKCONSPAGES ( -CPAGE) IMAGEFNSCREATE (GETFN) GETLOCALDEC (TL) SEDIT::ASSIGN-FORMAT-LITATOM (SEDIT::BROKEN?) -\\FAX.PARSE.NAME (HOST) TWODINSPECT.SELECTITEM (ROWPROP COLUMNPROP) APPLY (DEF) -CL::MAYBE-MAKE-BINDING-FORM (CL::DUMMIES) ADD.PROCESS (CREATENOW WINDOW) CL::%INTEGER-COERCE-OPTIMIZER - (CL::FLOAT-RESULT) \\INTERNALTOTOPW (SCREENTOPW RPT) \\SET.PROCESS.NAME (INTERNAL NEWNAME OLDNAME) -EDITL0 (COMS) IRM.DISPLAY.REF (NODE) \\DSPLEFTMARGIN.PRESS (XPOSITION) FINDFILE-WITH-EXTENSIONS (FILE -HASDIRECTORY HASEXTENSION DIRLST) PRINTLEVEL (CARVAL CDRVAL) CL:EVERY (MORE-SEQUENCES) -SEDIT::CONVERT-COMMENT-TAIL (SEDIT::TAIL) CH.ADD.ITEM.PROPERTY (INTERPRETATION) PRINTTIMER (TIMEOUT) -COMPILER::META-CALL-LABELS (COMPILER::*MADE-CHANGES*) \\TEDIT.INSERTLINE (PREVLINE) -\\NSADDRESS.DEFPRINT (HOST) DBG::ATTACH-BACKTRACE-MENU (SKIP) \\DSPFONT.HCPYMODE (FONT) TTYINFIX (COMS -) \\TEXTMENU.TOGGLE.SHOWSELFN (ON) BSPPRINTPUP (VERBOSE) \\BBTCURVEPT (COLORBRUSHBASE) UNDOEDITL ( -UNDOLST1) GRAPHNODE/BORDER/WIDTH (BORDER) DEL.PROCESS (P) ENSURE.RGB (NOERRORFLG?) CL::%EXP-FLOAT ( -CL::RECIPFLG) SEDIT::CONVERT-COMMENT-STRUCTURE (SEDIT::2-STARS) PREDICT-NAME (PATH) -COMPILER::FRAME-ANNOTATE-TAGBODY (COMPILER::REQUESTS) GRAPHREGION (NODELST) \\NSFILING.CONNECT ( -NEW.HANDLE NSPATHNAME) \\PROG0 (VARLST) CURSOR (NEWCURSOR) CL:FIND-IF (END) CL:FIND-IF-NOT (END) -SEDIT::CONVERT-COMMENT (SEDIT::NODE SEDIT::START) CH.RETRIEVE.ITEM (ADDRESS INTERPRETATION) -INTERPRESSFILEP (NOOPEN) \\TEDIT.PUT.CHARLOOKS (EDITSTENTATIVE OLDPC) SET (VAR VALUE) LOADFNS-MAKELIST - (LST FNSFLG) CL:FILL (END) HASHBEFORECLOSE (ENTRY) PUTSTREAMPROP (VALUE OLDDATA OLDVALUE) -OPT.COMMONBACK (FLG) LISTPUT (X) TB.COPYBUTTONEVENTFN (CURRENTITEM SI::*OR-GENTEMP*) CL:FILE-AUTHOR ( -CL::AUTHOR) SEDIT::PARSE-INDENT-BODY (SEDIT::TAGBODY?) FILECOMS (FILE X) \\DSPLEFTMARGIN.HCPYMODE ( -XPOSITION) %CONCATENATED-STREAM-DEVICE-PEEKBIN (|noErrorFlg?|) MAKE-CONCATENATED-STRING-INPUT-STREAM ( -STRINGS) SEDIT::COPY-SELECTION-DEFAULT (SEDIT::DESTINATION SEDIT::START SEDIT::BLANK-BEFORE) -\\GET.PRIORITY.QUEUE (HEAD PREV) RESTART.PROCESS (P) FB.HARDCOPY.DIRECTORY (MAINFONT COLUMNSPECS INFO) - CL::STRUCTURES.EDITDEF (CL::STRUCTURE-NAME) CL:ENCODE-UNIVERSAL-TIME (TIME-ZONE) SMASHFILECOMSLST ( -NAME) FORMAT-EXP-AUX (W D) PRINTPUPQUEUE (PUP VERBOSE) WAKE.PROCESS (P) SEDIT::GET-SELECTED-STRUCTURE -(SEDIT::NODE) \\SEQUIN.CONTROL (PUP) COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS (COMPILER::ARGS) -\\DEFPRINT.BY.NAME (NAME) COMP.STUNBIND (D) \\EXTERNALFORMAT (NEWVALUE PROPS) OPT.JUMPREV (FLG) EDITL1 - (UNDOLST1 EDITHIST) CL:FLOAT-SIGN (CL::FLOAT2) SUSPEND.PROCESS (PROC) DOFILESLOAD (FORCEDEXT? -NOERRORFLG) GREETFILENAME (POS) %CONCATENATED-STREAM-DEVICE-CHARSETFN (STREAMS) \\LITPRIN.INTERNAL ( -CHECKLENGTH PKGNAME PKGSEPR USEMULTESCAPE FIRSTESCAPE CHECKESCAPE CASEBASE FIRSTFLG DOWNCASE WAS-ALPHA -) FB.BROWSECOMMAND (INTERESTING MAINDIR) FB.ADD.FILEGROUP (PREVDATA OTHERDATA) \\SUSPEND.PROCESS ( -EVENT) \\GENERIC.CURSOR (NEWCURSOR) \\LITPRIN (PKG DOWNCASE WAS-ALPHA) POSTSCRIPT.FONTCREATE (PSCFD -FACECHANGED SCALEFONTP FULLNAME UNITFONT TMP) \\SETVAR (VAR VALUE) CCCSUBFN? (BASE) PROCESS-STATUS ( -POS) ERRORSET (FLAG) CLISPDEC (DECLST LST) FRESHLINE (SI::*OR-GENTEMP*) \\TEXTBACKFILEPTR (PC) -PROCESS.RESULT (WAITFORRESULT) \\PRINT-USING-DEFPRINT (FN) SEDIT::STRING-OFFSET (SEDIT::STRING? -SEDIT::START) \\TEXTMENU.TOGGLEFN (STATECHANGEFN) BAKTRACE1 (LST) \\SMASHRETURN (STKP) \\NSNET.CLOSERP - (ROUTEX) PUTSEQUIN (DONTWAIT) |\\DelShade| (LIST) VALUOF (LINE BACKUP) MENU.HANDLER (MOUSEDOWN +CHARSTYLES TABS) CLISPDSUBST (CLISPWORD) FM.WHICHITEM (INFINITEWIDTH) MSNOTICEFILE (FILEDATES FILE) +FM.GETSTATE (STATE) SPECVARP (GLOBALVAR) TEDIT.UNPARSE.PAGEFORMAT (CHARLOOKS PARALOOKS HEADINGTYPE) +DASSEM.ASMAJ (MOPVAL) SCALE/GRAPH (FORMAT) \TEDIT.FONTCOPY (FAMILY SIZE FACE) SIMPLEP (CROPS) +COMP.GLOBALVARP (GLOBALVAR) TEDIT.WINDOW.SETUP (MENU) COMP.ANONP (GLOBALLY-SPECIAL) COMP.BOX (BOX) +XCL:UNADVISE-FUNCTION (ADVISED) LISPXFIND (*HISTORY*) SI::GET-STORED-ARGLIST (ARGNAMES) SMARTARGLIST ( +BROKEN ARGNAMES ADVISED EXPR CODE) NLAMBDAFNP (INFO BROKEN EXPR CODE) HISTORYSAVE (*ARCHIVE*) +DWIMUNSAVEDEF (*LISPXPRINT*) \FM.FORMATBYCOLUMN (ITEMS REGION DAUGHTERS) VARSBOUNDINFORM (INFO +CLISPWORD) BRECOMPILE (FILEDATES FILE) \FM.GETBITMAPS (BOX BOXSHADE HIGHLIGHT LABEL) DASSEM.DASSEM ( +DOPVAL AJSIZES) OPENPOSTSCRIPTSTREAM (BOUNDINGBOX DOCUMENT.NAME PAGETYPE PAPERTYPE IMAGESIZEFACTOR +REGION FONTS HEADING HEADINGFONT LANDSCAPE ROTATION) SI::CHANGE-CALLS (ADVISED BROKEN) +\FM.STATE-CHANGESTATE (DISPLAY) \FM.CLEARITEM (INFINITEWIDTH BACKGROUND) FB.BROWSECOMMAND (DIRECTORY +HOST) XCL::VARIABLE-GLOBALLY-SPECIAL-P (GLOBALLY-SPECIAL) \FM.EDIT-PREPARETOEDIT (BOXOFFSET MAXWIDTH +LIMITCHARS SYSLIMITCHARS ECHOCHAR) \FILEMAP-HASHOVERFLOW (FILEDATES) \FM.STATE-SELECTEDFN (CHANGESTATE +) LAPRD (CODEREADER) \FM.FORMATBYROW (ITEMS REGION DAUGHTERS) CLISPIFY2C (INFO) XCL:TRACE-FUNCTION ( +BROKEN) COMP.TRANSFORM (MACRO-FN) SEDIT::MENU-PRINTBASE-SELECTEDFN (EDIT) \TEDIT.CENTER.SEL.REV (QUAD) + \FM.EDITSTART-SELECTEDFN (EDIT) PURGEHISTORY2 (*GROUP* *HISTORY*) \FM.GETREGIONS (LABEL HIGHLIGHT +MAXWIDTH MAXHEIGHT BOXOFFSET) FONTCOPY (DEVICE) SI::HAS-CALLS (ADVISED BROKEN) NIL +TEST \GCMAPUNSCAN (PREV) COMPILE-FILE-SCAN-FIRST (FORCE-OUTPUT-P) FNTYP (DEF) \GETFTPCONNECTION ( +TRYHARD UNWINDSAVE) \TYPENUMBERFROMNAME (TYPE) GETNSPRINTER (NAME) SI::BQUOTE-NCONC (SI::HEAD SI::TAIL +) \COURIER.CHECK.ERRORS (X) \ALLOCPAGEBLOCK (RESULT) \TEDIT.COMMAND.LOOP (LOOPFN CHARFN CH TERMSA) +SEDIT::SET-POINT-QUOTE (SEDIT::INDEX SEDIT::OFFSET) TEDIT.DISPLAYTEXT (TERMSA) \DSPSPACEFACTOR.IP ( +FACTOR) FASL:PROCESS-SEGMENT (FASL::TEXT-FN) \ATMOUT (ATOM) SETUPFONTS.PRESS (FLG) SI::BQUOTE-CONS ( +SI::BCDR) \LOGOUT0 (FAST) \TEDIT.CONVERT.TO.FORMATTED (NEXTCR) CL::MAYBE-MAKE-BINDING-FORM (CL::DUMMIES +) COPYFILES (COPYFILESASK COPYFILESOUTPUT DONTCOPY COPYFILESALWAYS DT2 COPYFILESPURGESOURCE +COPYFILESREPLACE NF COPYFILESTERSE COPYFILESVERSIONS COPYFILESPURGE) VRULE.CREATE (WIDTH HEIGHT) +TB.UNSELECT.ALL.ITEMS (UPDATABLE) \SPP.GETNEXTBUFFER (NOERRORFLG) WHILEDOUNTIL (FX DO) +SEDIT::SET-POINT-UNKNOWN (SEDIT::INDEX) CL::%%EXP-FLOAT (CL::RECIPFLG) \NSRANDOM.REESTABLISH (ID) +\HANDLE.RAW.OTHER (RAWTYPE) SUBSTRING (END FATP) SEDIT::SET-POINT-LIST (SEDIT::OFFSET SEDIT::DOTTED?) +MAKETITLEBARICON (TEXT) \DSPTOPMARGIN.IP (YPOSITION) BRHC/INTERTREE/SPACE (BTC TTC) CL:POSITION (END) +COMPILE-FILE-EXPRESSION (LOAD.SPECIFIED COMPILE.SPECIFIED COMPILE.TIME.TOO EVAL.SPECIFIED PROP) +RECLAIMMIN (N) SI::BQUOTE-APPEND (SI::HEAD SI::TAIL) ALLOCSTRING (INITCHAR FATP) \FTP.PRINTPLIST ( +ISPASSWORD) PRINTPUP (DOFILTER PRE.NOTE) BREAK.MSG.INTO.LINES (LASTSPACE) \LEAF.ABORT.FROMMENU (WINDOW +) RECORDECL (ALLOCATIONS) GETHOSTINFO (INFO) \SPP.BOUTS (CON) \COURIER.CHECK.PROCEDURES (X INFO) +WHILEDO1 (X) \LFScavFileName (A0493 NAME) \LFFindDirectory (VOL) UNPACKPATHNAME.STRING (ONEFIELDFLG +ATOMFLG) NTHCHARCODE (FLG FATP) \FIXILINES (LINE) OPT.JLENPASS (X) MKSTRING (FLG) \LFUnpackName (A0493 +) FLASHWINDOW (WHOLEP) TEDIT.\INSERT (SEL) \TEDIT.REPAINTFN (LINE) CL::STRUCTURES.EDITDEF ( +CL::STRUCTURE-NAME) UNIX-GETPARM (LEN) EDITGETDEF (NAME) BITMAPBIT (NEWVALUE TX TY SOFTCURSORUP +SI::*OR-GENTEMP*) DBG::ATTACH-BACKTRACE-MENU (SKIP) \SEARCH.OUTPUTQ (PUP LOOKFORINTERRUPT LASTPUP) +SPY.MERGE.CALLEES (DEPTH) STRPOS (START BACKWARDSFLG TAIL SKIP CASEARRAY ANCHOR PATFAT STRFAT) SHRKFY +(STAGEFLAG CDRLOOKAT CARLOOKAT FIRSTARGFLG CDARLOOKAT CDDARLOOKAT RESULTQ CARSAFEFLAG APPSINGFLG +RESULTR) PFI.PROCESS.FILE (DONTINDEX) CREATEW (REGION TITLE) BAKTRACE1 (LST) \FTP.PACKFILENAME ( +DEVICEWANTED NAMEBODY VERSION DIR DEVICE SERVERNAME PRESERVECASE) ASKUSER (KEYLST FILE TYPEAHEAD MESS +DEFAULT TEM NOECHOFLG PROMPTSTRING KEYLST1 ANSWER ORIGMESS CONFIRMFLG LISPXPRNTFLG BUFS) +\NSPRINT.INTERNAL (COURIERSTREAM) \GENERIC.CURSOR (NEWCURSOR) \FILLPOLYGON.PSC (TEXTURE TEXTUREBM) +COERCETEXTOBJ (PC OUTPUTSTREAM) \BBTCURVEPT (COLORBRUSHBASE) CLISPDEC (DECLST LST) \DSPLINEFEED.IP ( +DELTAY) \DSPCLIPPINGREGION.PSC (REGION) MSPARSE (LASTADVERB CONJUNCTIONS POSS SPELLING OUTPUTFILE) +\RESOLVE.TYPENUMBER (TYPENAME) \DRAWPOLYGON.PSC (CLOSED) TB.INSERT.ITEM (BEFOREITEM) TTYIN.LASTINPUT ( +BUF) TWODINSPECT.SELECTITEM (ROWPROP COLUMNPROP) TEDIT.UPDATE.SCREEN (NLINE) IDLE.SET.OPTION (MINS +GROUP OLD.OPTION) \PROCESS.BEFORE.LOGOUT (W) \MEDW.CURSOR (NEWCURSOR) \SLOWBLTCHAR (SOFTCURSORUP +SI::*OR-GENTEMP*) \TEXTCLOSEF (PC) TEDIT.DEFAULT.MENUFN (OFILE CH) D-ASSEM:INTERN-DCODE (D-ASSEM::COPY-P +) SEDIT::REPLACE-LIST (SEDIT::SUBNODES SEDIT::DOT-LIST? SEDIT::TRAILING-SUBNODES SEDIT::REDOT? +SEDIT::CONVERTED?) \DSPPRINTCR/LF (SOFTCURSORUP SI::*OR-GENTEMP*) TB.SELECTRANGE (EVENIFDELETED) +\DSPRIGHTMARGIN.IP (XPOSITION) SEPRCASE (CLFLG) SHOWBITMAP.IP (REGION SCALE) HERALD (STR) +COURIER.EXECUTE.CALL (SOURCEFLG SINKFLG BULKDATAFN) \DSPLEFTMARGIN.IP (XPOSITION) FB.THINCOMMAND ( +LASTTIMESTAMP TIMESTAMP) \GR.MAKEPRETTYCOMSL (NAME) \CARET.FLASH.AGAIN (OCARET CARET OC) +SI::EXPAND-CONDITION-CASE (SI::CLAUSES SI::NO-ERROR-CLAUSE SI::OPTIMIZE? SI::CTX) +CONDITIONS::CONVERT-RESTART-CASES (CONDITIONS::ALL-CONSTANT?) CLISPIFYLOOKUP (CLASS) +\LEAF.STREAM.IN.QUEUE (PUP FIRSTTIME IMPORTANT) CONDITIONS::EXPAND-RESTART-CASE (CONDITIONS::OPTIMIZE? + CONDITIONS::CTX) CL:MAKE-PACKAGE (CL::EXTERNAL-ONLY) REPLACEFIELD (TN NEWVALUE) \SHOWSEL (ON L1 LN) +TEDIT.STRINGWIDTH (TERMSA) BOXCOUNT (TYPE) USERNAME (FLG NAME) PFI.PRINT.MULTI.INDEX (ENV CONSECUTIVE +TAB1 TAB2 TAB3) \TEXTSTREAMBOUT (WINDOW L1 LN) SI::EXPAND-PROCEED-CASE (SI::OPTIMIZE? SI::CTX) +SETUSERNAME (NAME) \MEDW.PUTWINDOWPROP (VALUE OLDDATA OLDVALUE) \PEEKPUP (HOST NETHOST FILE) +\COERCEFONTDESC (STREAM FONT NOERRORFLG SPEC) HASHARRAY (REHASH-THRESHOLD) STKNTHNAME (POS CFLAG) +COMPILER:ENV-BOUNDP (COMPILER::LOOKUP) SEDIT::JOIN (SEDIT::NODE SEDIT::START SEDIT::END) IMPORT ( +CL::CSET) DO.CHAT.OPTION (MENU) CLOSENSOCKET (NOERRORFLG) INFILECOMTAIL (FLG) CLISPFORVARS (IV TEM +OLDFLG) COMPILER:COPY-ENV-WITH-FUNCTION (COMPILER:ENV) \SENDSPP (IGNOREALLOC) DWIMERRORRETURN (ARG) +\LEAF.TIMEDOUT.EXCESSIVE (PUP FIRSTTIME FULLNAME) CLMAPS2 (DEF) SUBARRAY (M1) GETSUPERTYPE (NX) +TEDIT.FIND.OBJECT.SUBTREE (PCTB) TTYINFIX (COMS) COMPILER:COPY-ENV-WITH-VARIABLE (COMPILER:ENV) +\FTP.HANDLE.NO (LEAVEMARK DESTPLIST CPASS NOERRORFLG) \HCPYMODEBLTCHAR (SOFTCURSORUP SI::*OR-GENTEMP*) + COMPAREDEFS (SOURCES SRCS) \FTP.ERRORHANDLER (INSTREAM) FB.THINP (OLDESTVERSION?) \CLEARMAP (PAGES +BUFFER USERFLG PREVBUFFER) \ENDVECRUN (WASDISPLAYING) FILING.CALL (ABSOLUTELY-NO-ERROR KEEPSTREAM) +PUP.ECHOSERVER (ECHOWINDOW ISGOOD) \CH.CHECK.CLEARINGHOUSE (ADDR) \MEDW.BITBLT (SI::*OR-GENTEMP*) +CL:IN-PACKAGE (PACKAGE) UNDOSAVE (HISTENTRY UNDOFORM) HARRAYPROP (NEWVALP HARRAY) \FTP.WHENCLOSED ( +CONN) CL:Y-OR-N-P (FORMAT-STRING) COMP.MAP (CARFLG BYF WHILEF COLLECT PRED NEG) \ACTONDISKPAGES (CAs +BUF SI::*OR-GENTEMP* BUFFERS LASTACTION LASTNUMCHARSCONS) DATATYPES (USERSFLG) FILEBROWSER (ATTRIBUTES + REGION FILESPEC) CL:READ-CHAR (EOF-ERRORP RECURSIVE-P) \DISKERROR (STREAM) FB.SEEFULLFN (BUTTONS +EVENT) CHAT.TAKE.INPUT1 (FILE) \SLOWHCPYMODEBLTCHAR (SOFTCURSORUP SI::*OR-GENTEMP*) \GR.CONTENTS (COM +NAME) \GENERIC.DSPCREATE (DESTINATION SCREEN) CLISPFORERR (TYPE X Y) \IDLER (FROMTIMEOUT IDLE.PROCESS +SAVEVM.TIMER NO.ERROR EXIT? INTERRUPTED.STRING) FINDPTRSBUFFER (B NOERRORFLG) \DOACTONDISKPAGES ( +HINTLASTPAGE RETURNONCHECKERROR) CLSTOPSCAN? (CLTYPX CLTYP) SEDIT::INSPECT-SELECTION (CL:STRUCTURE) +\ICONW.FORMAT.TITLE1 (DONE LASTBREAKPOS MINWIDTH) \TEDIT2 (UNSPAWNED) OPENBSPSTREAM (SOCKET) /RPLNODE2 + (Y) \WRITEDISKPAGES (CAs BUF SI::*OR-GENTEMP* BUFFERS) PUTHASH (VAL) \HASHACCESS (EQFN DELSLOT REMOVE +) PRINTXIP (DOFILTER PRE.NOTE) \SPP.SEND.ENDREPLY (NOACK) M44.SIGNAL.DISK.ERROR (ERRCODE) +SEDIT::LINEARIZE-QUOTE (SEDIT::INDEX) MAPBUFFERCOUNT (B AVAILFLG) SEDIT::LOCATE-NODE-FROM-EDITCHAIN ( +SEDIT::CHAIN) INSURE.B&W.TEXTURE (TEXTURE NOERRORFLG) TEDIT.UNDO.DELETION (NPC) +\TFBRAVO.INSTALL.PAGEFORMAT (PAGENUMBERS PAGENUMBER.NOTONFIRSTPAGE HEADINGDESC HEADING.NOTONFIRSTPAGE +ODDHEADINGDESC ODDHEADING.NOTONFIRSTPAGE EVENHEADINGDESC EVENHEADING.NOTONFIRSTPAGE) \COURIER.REP.BIN +(X) RAISE-SIGNAL (*CONDITION-HANDLER-BINDINGS* BINDING) PRINTDEF (LEFT TAILFLG) \MAPPAGE (BUF USERFLG +PREVAVAIL STREAM) \ACTONVMEMPAGES (CAs LASTACTION) DINFO.UPDATE (FMENU.WINDOW) \WRITEVMEMPAGES (CAs) +UNDONLSETQ (LISPXHIST UNDOTEM) TEDIT.FIND.OBJECT (PC) STORAGE (TYPES HFLG DOBLOCKSFLG) \GR.DELDEFFN ( +NAME DEF) CL:DELETE (END COUNT) DWIMIFY1A (FN TAIL) TEDIT.REDO.INSERTION (OBJ NPC) \DSPROTATE.PSC ( +ROTATION) CL:STRING= (START1 END1 START2 END2) \COURIER.BROADCAST.ON.NET (MESSAGE RESULT RESULTFN) +STORAGE.LEFT (FREE) SETUPFONTS.IP (IPDATA) \STORAGE.TYPE (LSTPAG PTR IN-USE-THRESHOLD) +\DSPBOTTOMMARGIN.IP (YPOSITION) POSTSCRIPT.SET-FAKE-LANDSCAPE (ROTATION LAND) \BITBLT.BITMAP.SLOW ( +CLIPPINGREGION WIDTH HEIGHT TEXTURE SOURCETYPE) \STORAGE.HUNKTYPE (PAGE-THRESHOLD IN-USE-THRESHOLD) +\COLLECTDIRTYBUFS (B STREAM) \STRINGWIDTH.PRESS (RDTBL) BSPOPENP (SOCKET TYPE) TEXTUREOFCOLOR (RGB) +\PUNT.BITBLT.BITMAP (CLIPPINGREGION WIDTH HEIGHT TEXTURE SOURCETYPE) \SETIODIRTY (BUF) +SEDIT::LINEARIZE-LIST (SEDIT::INLINE? SEDIT::SUBNODES SEDIT::INDEX SEDIT::ALREADY-INDENTED? SEDIT::INFO + CL:FIRST SEDIT::PREV-TYPE SEDIT::PREV-INLINE SEDIT::SET-INDENT? SEDIT::BREAK?) \PUNT.BLTSHADE.BITMAP +(CLIPPINGREGION WIDTH HEIGHT DESTINATIONNBITS TEXTURE) FAKE-COMPILE-FILE (SAVE-EXPRS REDEFINE ENV LAP +OUTPUT-FILE) COURIER.REP.LENGTH (N) \DODISKCOMMAND (NEXTCB) DSPSOURCETYPE (SOURCETYPE) SETREADFN (FLG) + TEDIT.EDIT.OBJECT (OBJ CH# EDITFN) BRH/LAYOUT (DS) WHO-LINE-WHAT-IS-RUNNING (POS) \FTPERROR (ERRMSG) +TB.EXPANDFN (FIRSTCHANGEDITEM#) \IFS.LOOKUPFILE (DIREND SEMI DOT IPUP) COMP.SELECTQ (THISLABEL VAR) +\CLEANUPDISKQUEUE (FREE) RECORDACCESSFORM (TYPE) \NSFILING.GDATE (DATE) CLISPIFYRPLAC (CLTYP0 %:FLG +CLTYP00) \PAGED.GETNEXTBUFFER (NOERRORFLG) FB.ADD.FILE (SIZE) \PAGED.FORCEOUTPUT (B BUFFERS) +\DSPCLIPPINGREGION.IP (REGION) COMPILE-FILE? (UNKNOWN) DASSEM.DSTOREFNDEF (NAMETABLE LOCALARGS) +ICMLARRAY.INDICES (FIRSTFLG) \CLISPKEYWORDPROCESS (FORM TMP) \GR.PUTDEFFN (NAME DEF) IRM.LOAD-GRAPH ( +FILE) WHO-LINE-TTY-STATE (PROC) COMPARELISTS (DIFFERENCES) DSPCREATE (DESTINATION) \LEAF.RESENDPUPS ( +PUPS) \PAGEDREADP (FLG) CLISPIFYMAPS (FN2 VAR) \CHECKARRAYBLOCK (FREE ONFREELIST) SORT (DATA) +\COURIER.REP.BOUT (X) \ALLOCBLOCK.OLD (ALIGN INITONPAGE) TB.FIND.PREVIOUS.TAIL (TAIL) +TWODINSPECT.REDISPLAY (ELTROWPROPS ELTCOLUMNPROPS ELTS) \ALLOCBLOCK.NEW (INITONPAGE ALIGN) +FILENAMEFROMID (name) \ALLOCHUNK (ALIGN INITONPAGE STRADDLERS) TOPW.REPAINTFN (WINDOWREGION +STARTCOLUMNPROPS) TEDIT.MOVE (FROM TO REPLACING) TB.FLUSH.WINDOW (FN) BSPPUTMARK (PUP) +\MAIKO.ALLOCBLOCK (ALIGN INITONPAGE) \BSP.HANDLE.DATA (PREVPUP PUP) CHAT.TYPESCRIPT (PROC) +CLISPIFYCROPS (Y CROPFN) FILEWATCH (FW-PROC COMMAND) SEDIT::COMPLETION (SEDIT::CHANGED? SEDIT::IFCHANGEDFN +) CHCON (FLG FATP \CHCONLSTAIL) INSURE.RGB.COLOR (NOERRFLG) DBG::FIND-DEBUGGER-STACK-FRAME (DBG::PLACE +) DWIMARKASCHANGED (L) \MERGEFORWARD (BASE NBINUSE) \MEDW.REDISPLAYW (ALWAYSFLG REGION) \LINKBLOCK ( +FREEBLOCK) UNPACK (FLG FATP \CHCONLSTAIL) \MERGEBACKWARD (BASE) CLISPLOOKUP0 (DECLST CLASS) +\CLIPCURVELINE.IP (SWAPPED) \LEAF.GETFILEINFO.OPEN (BASE) \TEDIT.STRIKEOUT.CARET.ON (LOOKS) +\TEDIT.STRIKEOUT.CARET.OFF (LOOKS) \BSP.HANDLE.ACK (INTERRUPTPUP OLDPUP ADATACOUNT) PPBUFS (B) +\SPPGETERROR (MOREMSG) EDITFROMFILE (ONLYTYPES SEEN DEF) CLISPIFYCROPS1 ($LST Y TAILSTATE TEM) +\PREFIXALIGNMENT? (ALIGN INITONPAGE) \BSP.GETNEXTBUFFER (NOERRORFLG) NEARTOP (TITLEPROPORTION) +\LOCATE.NSNET (DONTPROBE) DCHCON (FLG FATP) INITPUPLEVEL1 (FLG) \MEDW.SHAPEW (NEWREGION) +ASSURE.ETHER.ON (USENS) FLAST (Y) SPY.MERGETREE (RECURSIVE) SEDIT::DELETE-QUOTE (SEDIT::END) +\CHECKFORSTORAGEFULL (NPAGES) XCL:SET-EXEC-TYPE (XCL::EXECA-FRAME) \TEDIT.INTERRUPT.SETUP (FORCEOFF +TEXTOBJ) DASSEM.DWRITEFN (FREEVARS LOCALVARINFO) CL:APROPOS-LIST (PACKAGE EXTERNAL-ONLY) +ICMLARRAY.DOWINDOWCOMFN (COM) DUNPACK (FLG FATP) \NSFILING.GETFILEINFO.FROM.PLIST (PLIST LENGTH CHNAME + PROT) CL:APROPOS (PACKAGE EXTERNAL-ONLY) \CARET.FLASH? (CARET) COPYHASHFILE (LEAVEOPEN) ALPHORDER ( +AFATP BFATP) COURIER.OPEN (NOERRORFLG) BLOCK (MSECSWAIT TIMER OLDPROC) CASEARRAY (OLDAR) \SETBRUSH.IP +(COLOR) SEDIT::INPUT-QUOTE (SEDIT::SUPER-NODE) DWIMUNSAVEDEF (FLG) \NSFILING.RELEASE.BULKSTREAM ( +ABORT?) CHECK-SYMBOL-NAMESTRING (CL:PACKAGE-NAME) \TEDIT.UNDERLINE.CARET.ON (LOOKS) PACKC (HASFAT) +UnixPrintCommand (PRINTER) \LOOKUPFMAP (ISFMAP) BSPFORCEOUTPUT (PUP) FIND-DEBUGGER-ENTRY-FRAME ( +SKIP-FAKE? INBRK) BRECOMPILE (CFILE FNS NOBLOCKSFLG) CLEARBUF (FLG LINBUF SYSBUF) DASSEM.DASSEM (ARGS +LL LOCALS A) \NEW.READ.SYMBOL (NONNUMERICP PACKAGE EXTERNALP) PACK (X) COMP.GETBASEBITS (STFLG) +COPYALL (X) LINBUF (FLG) \MEDW.EXPANDW (MAINWINDOW) COMPILER::PRINT-NODE (CL:NUMBER) +SET-PROFILE-INTERACTIVELY (PROFILE) TTY.PROCESS (PROC OLDTTY INTERRUPTLIST NEWINTERRUPTS) +\FM.EDIT-PREPARETOEDIT (STARTFLG) \3MBFLUSH (ASPROC) SCALE/GRAPH (LAYOUT-IS-VERTICAL) \NEW.MKATOM ( +FATP) COPYHASHITEM (USERFN) SETDISPLAYHEIGHT (NSCANLINES) CONVERT-LITATOM (CL:PACKAGE-NAME) +FB.ANALYZE.PATTERN (LASTPATDIR) TEDIT.FIND (TARGETSTRING WILDCARDS? START# REAL-END# RESULT) +ONEDINSPECT.SELECTITEM (PROP) \MEDW.SHRINKW (EXPANDFN ICONISBITMAP) \LEAF.STRIP.QUOTES (TAIL) CL:INTERN + (PACKAGE) INTERPRESSBITMAP (REGION TITLE SCALEFACTOR) CLISPACKUP (OPRFLG L1 L-1 LL) OLDFAULT1 ( +FAULTAPPLYFLG) UnixShellQuote (FLG) RESOLVE-READER-CONFLICT (ILPREFERRED CLPREFERRED) MAKEBITTABLE ( +NEG) CL::DEFINE-COPIERS (CL::COPIER) EXCHANGEXIPS (IDFILTER) TEDIT.SETSEL (PENDINGDELFLG +LEAVECARETLOOKS) \NSFILING.HOSTNAMEP (SERVER) TB.ITEM.UPDATABLE? (ONLYIFVISIBLE OLDN) +\LEAF.REPAIR.BROKEN.PUP (STREAM) \TEDIT.SUPERSCRIPT.CARET (LOOKS) \FM.EDIT-ITEM (DONEFN ITEM) SYSBUF ( +FLG) \DSPTOPMARGIN.PRESS (YPOSITION) \SHOW.ARRAY.FREELISTS (SIZESLST X) FILEPOS (SKIP CASEARRAY START +END TAIL) XCL::SHOW-CLOSURE-CACHE (XCL::LONG-P) \M44DOEXTENDVMEMFILE (LASTPAGE EXTENDED) CLISPFORVARS1 + ($TAIL) FB.CHECK.NAME.LENGTH (OVERFLOW) \BSP.HANDLE.INTERRUPTREPLY (INTPUP) PACKAGE-HIERARCHY-INIT ( +CONVERT?) \NSFILING.CLOSE.BULKSTREAM (STREAM) \TEDIT.UNPARSE.PARALOOKS.LIST (PROP) TEDIT.SETFUNCTION ( +FN) NSNAME.TO.STRING (OBJ FULLNAMEFLG) FTPPRINTCODE (NOCODEP) \NSFILING.ERRORHANDLER (PRINTFLG ID) +FFILEPOS (SKIP START END CASEARRAY TAIL) \PARSEARRAYSPACE1 (FN) COMP.NUMBERCALL (A) UnixTempFile ( +DontOpen) TEDIT.GETFUNCTION (TABLE) \NSINIT (MINI PROC) TEDIT.MAPPIECES (PC) +\TEDIT.UNDERLINE.CARET.OFF (LOOKS) COURIERPROGRAM.PRETTYPRINT (EXPR) SPY.MAX (COUNTP) SEDIT::INPUT-DOT + (SEDIT::NODE) ICONW.TITLE (TITLESPEC TITLE) \INTERPRETER1 (ARGLIST) CARETRATE (ONRATE OFFRATE) +SEDIT::ICON-COPYFN (SEDIT::NAME) SEARCHPRETTYTYPELST (FLG) \SMASHLINK (ALINK CLINK) COMP.NUMERIC (A V) + FM.SKIPNEXT (EDITITEM) \STACKARGPTR (POS) \FILLBUFFER (CONTROLTON CHAR PEEKEDECHOED) \STARTDISPLAY ( +OLDWINDOWS) SEDIT::EDIT-HELP (SEDIT::FNAME) CL::%%RATIO-PRINT (CL::PR) \MEDW.MOVEW (POSorX OPEN? +USERMOVEFN SOFTCURSORUP SI::*OR-GENTEMP* OLDCLIPREGION) FB.HANDLE.ABORT.BUTTON (BROWSER) NEWFAULT1 ( +FAULTAPPLYFLG FAULTZ) CL:ADJOIN (CL::KEY) FAULTAPPLY (%%LEXICAL-ENVIRONMENT%%) COMP.COMPARENUM (OFN V1 +) \UNPACKDATE (FRAC CHECKDLS) BRECOMPILE3 (COREOK) \OFFSETCLIPPINGREGION (OLDREGION) +\SETUP-COMPILED-CLOSURE-CALL (SLOWP) \STOPSCROLL? (W) \FILLINSPP (CCONTROL DSTYPE) +\LEAF.USE.NEW.CONNECTION (UNSENTPUPS AFFECTEDFILES RESENDPUPS) TB.PROCESS (ALLOWLOGOUT) MAKEKEYLST ( +LCASFLG DEFAULTKEY) \3MBSENDPACKET (PBI) \PARSE.REMOTE.FILENAME (QUOTEP NOERROR HOST DEV DIR EXT +VERSION) CLISPFOR2 (FLG) \DSPSPACEFACTOR.PRESS (FACTOR) \PACKDATE (YR MONTH DAY HR MIN SEC) MAKEFILES +(FILES FLG) \NSFILING.DIRECTORYNAMEP (CREATE?) \IDATESCANTOKEN (CH) ARGLIST (DEF) \DSPFONT.IP (FONT) +SEDIT::SEDITL (SEDIT::EDITCOMS) WFROMDS (DONTCREATE) ASKUSEREXPLAIN (NOECHOFLG PROMPTSTRING) +\DSPLINEFEED.PRESS (DELTAY) \TEDIT.SUBSCRIPT.CARET (LOOKS) \FTP.UNPACKFILENAME (HOST EXT DIR DEVICE +NOLOGIN) \FREESTACKBLOCK (START ALIGN) ONEDINSPECT.REDISPLAY (ELTPROPS ELTS) EVENP (CL::MODULUS) +\MEDW.CLOSEW (SOFTCURSORUP SI::*OR-GENTEMP* NEXTW) COMPILER::TRANSFORM-GET/PUT-BASE ( +COMPILER::COMPUTED-OFFSET-TREE COMPILER::ADDBASE-CALL) CLISPELL (TYPE) \SETUP-ENVIRONMENT-CALL (SLOWP +ENV) \ICONW.FORMAT.TITLE (MAXLINES) TEDIT.INSERT.OBJECT (CH# PREVPC) SEDIT::CREATE-COMMENT-WORD-NODES +(SEDIT::OK?) CL::BUILD-CONSTRUCTOR-SLOT-SETFS (CL::INITIAL-VALUE-FORM) CL::%%COMPARISON-OPTIMIZER ( +CL::SECOND-NUMBER CL::THIRD-NUMBER) TEDIT.MAPLINES (LINE) \OUTDATE-STRING (SHORTP) \LEAF.READFILENAME +(NAMEBASE REMOTENAME) DINFO.GET.FILENAME (FILE) \START.PROCESSES (OLDPROC) \NSFILING.GET.STREAM ( +STREAMPAIR KEEPSTREAM) BSP.PUTINTERRUPT (TIMEOUT) DRIBBLE (OLD-DRIBBLE-STREAM FILE APPENDFLG) +PROCESSWORLD (FIRSTTIME PQ EXECPROC) CLISPCOND1 (CPYFLG) \EVALVAR (VAR) ADD.PROCESS (CREATENOW WINDOW) + \MEDW.OPENW (SOFTCURSORUP SI::*OR-GENTEMP*) CHANGEBACKGROUND (SHADE) COMPILEUSERFN1 (FLG) +PUTPROPS.PRETTYPRINT (EXPR) CLEANUP (FILES) \RUN.PROCESS (BRUTALLY EVENT PREV) SEDIT::CFV-LIST ( +SEDIT::SUBNODES FIRST SEDIT::BREAK? SEDIT::SUB-IWIDTH SEDIT::IWIDTH) \ICONW.SHOW.TITLE (MASK) +\SPP.SYSPKT (XIP) EDITPROP (PROP) \3MBGETPACKET (PBI) \PROMPTWINDOW.PAGEFULLFN (%#LINES) +ICMLARRAY.MENUW.SHOW (LEVEL-ITEM) COLLECTKEYS (DOUBLE MKSTRING?) CLISPFOR1 (FLG NXTOPRTAIL LSTFLG) +CL:ATAN (CL::X) \DSPRIGHTMARGIN.PRESS (XPOSITION) \RELEASE.PROCESS (EVENT KILLIT RESTARTFLG) +\IRM.SMART.REF (POS CORRECTED) \ADDLEAFSTRING (STRING DECODE) OPT.CALLP (N FN) \TEDIT.ITALIC.CARET.ON +(LOOKS) \LINEBUF.READP (KEYSTREAM) COMP.RPLACD (NEED-POP) XCL::ADD-PROTOTYPE-FN (XCL::TYPE-ALIST +XCL::DEFINER-ALIST) COMPEM (FL ERRORFLG Y) BLOCKCOMPILE1 (ENTRIES) XCL::STRUNCATE (CL::DIVISOR) APPLY +(DEF) XCL::MAKE-PROTOTYPE (XCL::PROTOTYPE-FN) COURIER.ABORT.BULKDATA (ERROR) \CREATELINEBUFFER ( +TERMINAL.STREAM) SEDIT::SEDITE (CL:ATOM TYPE SEDIT::COMS SEDIT::ROOT-CHANGED-FN) +SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::NODE) TRIM.BITMAP (LEFT RIGHT BOTTOM) DINFO.SHOWSEL (CHAR#) +TTGIVEHELP1 (NO.OTHER) \FM.NWAY-CHANGESTATE (STATE NEWSTATE) OPENWINDOWS (WINDOW) CHAT.MENU (STATE) +TB.FIND.ITEM (FIRST# LAST# BACKWARDSFLG) CLISP4 (FLG) DEFEVAL (F FN) RECORDTRAN (TL USING USINGTYPE +BINDINGS NOTRANFLG) FW-RECALL-CMD (FORGOTTEN-OFDS RECALL-OFD MANY?) \MOUSE.PROCESS (OTHERMOUSE) +SEDIT::START-PROCESS (SEDIT::NAME) MSCOLLECTDATA (FLG) EXEC (XCL::WINDOW) \MAIKO.CONS.UFN (Y) +DINFO.OPENTEXTSTREAM (TEXTSTREAM) EVALV (POS RELFLG) CL:CLOSE (ABORT ABORTABLE) XCL::SCEILING ( +CL::DIVISOR) \MEDW.CREATEW (OLDWINDOW NOOPENFLG) \TEDIT.SHRINK.ICONCREATE (ICONTITLE ICON) +\TEDIT.INSPECTCODE (PC) CL::%%INTEGER-COERCE-OPTIMIZER (CL::FLOAT-RESULT) XCL::SROUND (CL::DIVISOR) +SEDIT::BACKSPACE-LIST (SEDIT::INDEX) MAINWINDOW (RECURSEFLG) INTERPRESSFILEP (NOOPEN) GRAPHDELETELINK +(DELFN) DISPLAY/NUMBER/READER/TOTAL (DECIMALPLACES STR) SPY.UPDATE.TITLE (NODE) DINFO.FMW.CLOSEFN ( +GRAPH) TB.DISPLAY.LINES (EXTENTCHANGED) SEDIT::GET-DESTINATION-CONTEXT (SEDIT::DESTINATION) +DBG::CREATE-DEBUGGER-WINDOW (POS) \DEQUEUE (ITEM) CLISPCOND (VAL) \SETVAR (VAR VALUE) +\TEXTMENU.SET.TOGGLE (PCNO) CL:COPY-READTABLE (FROM-READTABLE TO-READTABLE) BRECOMPILE1 (NOBLOCKSFLG X +) CL::%%LOGICAL-OPTIMIZER (CL::FIRST-INTEGER CL::SECOND-INTEGER CL::MORE-INTEGERS) \DEFINEDISPLAYINFO +(BUCKET) CL:COUNT (END) CL::BUILD-CONSTRUCTOR-ARGLIST (CL::INIT-FORM) TWOD.TRACKCURSOR (SELECTION +NEWROWPROP NEWCOLUMNPROP SELECTEDROWPROP SELECTEDCOLUMNPROP) TEDIT.DEACTIVATE.WINDOW (TEXTOBJ FORCEFLG + DISCONNECTONLYFLG) SEDIT::EXPAND (SEDIT::NODE) \TEST.PARAGRAPH.LOOKS (NONEMPTY) EDITCOMS (COMS) +\IRM.GET.REF (REFS TYPE REF) XCL::SFLOOR (CL::DIVISOR) ENDCOLLECT (X) \PROG0 (VARLST) CL:COUNT-IF (END +) FINDFILE-WITH-EXTENSIONS (FILE HASDIRECTORY HASEXTENSION DIRLST) CLISPIF3 (FIRSTCLAUSEFLG) +PRINTLEVEL (CARVAL CDRVAL) \DSPLEFTMARGIN.PRESS (XPOSITION) IRM.DISPLAY.REF (NODE) GREETFILENAME (POS) + TEDIT.SHOWSEL (SEL) CL:DELETE-IF (END COUNT) \ALLOCMDSPAGE (NXT) \NSFILING.EVENTFN (RANDEVICE) +TTY/EDITL (ATM COMS UNDOLST1 EDITIME0) CL:DELETE-IF-NOT (END COUNT) CLISPFOR (LISPXHIST) +CL:DELETE-DUPLICATES (END) \SMASHRETURN (STKP) CL:DECODE-UNIVERSAL-TIME (CHECKDLS) CLISPIF1 (PRED) +CL:DELETE-FILE (TN) \GET.PRIORITY.QUEUE (HEAD PREV) EDITL0 (COMS) TTGIVEHELP2 (MIXED) \SPP.SENDPKT ( +RETRANSMITP) \SET.PROCESS.NAME (INTERNAL NEWNAME OLDNAME) CLISP3C (L1) CHECKCONSPAGES (CPAGE) +CL:COUNT-IF-NOT (END) SEDIT::SIMPLE-STRING-SCAN (SEDIT::POINT?) \PEEKNS (HOST FILE) \MAPMDS (TYPE) +COURIER.WRITE.BULKDATA (TAIL) \DSPYPOSITION.HCPYMODE (YPOSITION) \CHECKCONSPAGE (SI::*OR-GENTEMP*) +MAKE-CONCATENATED-STRING-INPUT-STREAM (STRINGS) FASL::DUMP-SYMBOL (PACKAGE) CL:ENCODE-UNIVERSAL-TIME ( +TIME-ZONE) FTP.BREAKCONNECTION (IDLEONLY) SMASHFILECOMSLST (NAME) CURSOR (NEWCURSOR) \ETHEREVENTFN (DB + TURNOFFNS) COMPILER::EXPAND-OPENLAMBDA-CALL (COMPILER::EXTRA-ARGS COMPILER::UNSUBBED-ARGS) +SEDIT::ASSIGN-FORMAT-LIST (SEDIT::SUBNODES) ERRORSET (FLAG) TITLEDICONW (BREAKCHARS ICON) OPT.OPTCHECK + (CD) UNDOEDITL (UNDOLST1) SPP.OPEN (HOST SERVERFN PROBEP) \PRINT-USING-DEFPRINT (FN) SEDIT::EVAL-SELECTION + (CL:STRUCTURE SEDIT::VALUE) MSUPDATE (EACHTIME ERS PRFLG) \MAYBEPRINTPACKET (NDB) \FM.NWAY-MOVEDFN ( +STATE) CL:EVERY (MORE-SEQUENCES) DEL.PROCESS (P) \TEST.CHARACTER.LOOKS (PROPERTY VALFLAG) DOFILESLOAD +(FORCEDEXT? NOERRORFLG) CL:FILE-AUTHOR (CL::AUTHOR) FB.HARDCOPY.DIRECTORY (MAINFONT COLUMNSPECS INFO) +CLISP3 (CLTYP FLG BROADSCOPE) \LET0 (VARLST) \AB.BACK (ABLO) MAKEFILE (FILEDATES SOURCEFILE) \LITPRIN +(PKG DOWNCASE WAS-ALPHA) \LET* (VARLST) SEDIT::PARSE-INDENT-GROUPS (SEDIT::GROUPS) COND (*TAIL*) +PREDICT-NAME (PATH) CL:FILL (END) \FM.NWAY-DOWNFN (STATE) READIMAGEOBJ (GETFN ENTRY SUPPORTFILE +NOERROR DATANBYTES) \NSRANDOM.RELEASE.HANDLE (HANDLE SESSION) \DSPCOLOR.IP (COLOR) MSUPDATEFN1 ( +DOSUBFNS) PUTSTREAMPROP (VALUE OLDDATA OLDVALUE) \DURATIONTRAN (USINGBOX RESOURCENAME TIMERUNITS +UNTILDATE FORDURATION) CHECKFORCHANGED (NOTTHISONE UPDATEALL) \DSPXPOSITION.IP (XPOSITION) +\DSPCLIPPINGREGION.PRESS (REGION) RESTART.PROCESS (P) \GETFILINGCONNECTION (OLDSTREAM SESSION NOLOCK) +HASHBEFORECLOSE (ENTRY) INSTALL-PROTOTYPE-DEFN (REQUESTED-TYPES NEW-DEFN-FLG TYPES-WITH-PROTOTYPES +DEFINER) MSSHOWUSE (FILE ANYFOUND INCLISP EDITCOMS) %%CONCATENATED-STREAM-DEVICE-PEEKBIN (noErrorFlg?) + CLISPIF (LISPXHIST) WAKE.PROCESS (P) EDITL1 (UNDOLST1 EDITHIST) \SUSPEND.PROCESS (EVENT) +CL::BOA-ARG-LIST-WITH-INITIAL-VALUES (CL::INTIAL-VALUE-FORM) CL:FIND-IF-NOT (END) SPP.DSTYPE (DSTYPE +NOBLOCK) SUSPEND.PROCESS (PROC) PROMPTINWINDOW (POSITION READSTR) ENSURE.RGB (NOERRORFLG?) CL:FLOAT-SIGN + (CL::FLOAT2) PROCESS.RESULT (WAITFORRESULT) ENVEVAL (APOS CPOS AFLG CFLG) CL:FIND-IF (END) +\LITPRIN.INTERNAL (CHECKLENGTH PKGNAME PKGSEPR USEMULTESCAPE FIRSTESCAPE CHECKESCAPE CASEBASE FIRSTFLG + DOWNCASE WAS-ALPHA) TEDIT.COPY (FROM TO REPLACING) \DSPXPOSITION.HCPYMODE (XPOSITION) +\LEAF.GETFILEDATES (INFOBLK FLG) \TEDIT.PUT.CHARLOOKS (EDITSTENTATIVE OLDPC) LISTPUT (X) \SPPWATCHER ( +ACTIVITY) %%CONCATENATED-STREAM-DEVICE-CHARSETFN (STREAMS) \CURVE (USERFN SOFTCURSORUP SI::*OR-GENTEMP* + BBT DISPLAYSTREAM ENDING) \FTP.NEXTFILE (FTPCONNECTION NAMEONLY FILTER) PROCESS-STATUS (POS) +CROPMARK.CREATE (HEIGHT) FUNCTION (ENV) TERM.RESET.DISPLAY.PARMS (CLEARMODEFN) GETDUMMYVAR (BINDITFLG) + \LFFindNextFile (ANOTHERENTRY FILTER) TB.SET.FONT (FONTGIVEN) \DEFPRINT.BY.NAME (NAME) +TB.CONSIDERRANGE (EVENIFDELETED) \SYMBOL.ESCAPE.COUNT (CASEBASE FIRSTFLG MULTESCAPE INEXACTOK) NCHARS +(FLG) FB.GET.NEWPATTERN (OLDPATTERN PATTERN) ENVAPPLY (APOS CPOS AFLG CFLG DEF) NOTIFY.EVENT (SUCCESS +TAIL ONCEONLY) \DOBUFFEREDTRANSITIONS (PENDINGINTERRUPT) \NUMERIC.PNAMEP (SEENALPHADIGITS +SEENTIGHTLETTERS SEENDECPT SEENEXPONENT SEEN-ILLEGAL-SYNTAX SEENDIGITS) PROCESS.TTY (PROC) +SEDIT::GET-CONTEXT (SEDIT::NAME CL:STRUCTURE SEDIT::SEARCH-ONLY?) STKAPPLY (FLG DEF) DSPEOLFN (EOLFN) +TWODINSPECT.MAKEREGIONS (COLUMNWIDTHS) \TEXTMENU.TOGGLE.SHOWSELFN (ON) CALLS (USEDATABASE VARSFLG +FNDEF) \CARET.DOWN (STREAM) SI::UNWIND (USECNTARGET CLEANUPFN) EDITL2 (FLG) FRESHLINE (SI::*OR-GENTEMP* +) \AB.NEXT (ABLO) BRACKET.CURRENT.WORD (FIRSTCOL) RETEVAL (FLG) MSNOTICEFILE (FULL) TEDIT.CHARWIDTH ( +TERMSA) RETAPPLY (FLG DEF) \INSERTCR (INPC) STKEVAL (FLG) ALISTS.GETDEF (ASSOCIATION) BLIPVAL (IPOS) +MSCHECKEMPTY (CF) FIX89 (POS SPLIT89FLG) \DSPBOTTOMMARGIN.PRESS (YPOSITION) GIVE.TTY.PROCESS (PROC) +\NSFILING.LOGIN (STREAM NEEDLOGIN SESSIONHANDLE PROBLEM OLDPROBLEM) \CHECKFLTFMT (X) MASTERSCOPE ( +MASTERSCOPECOMMAND TOPFLG) SETBLIPVAL (IPOS N) SPP.SENDEOM (SI::*OR-GENTEMP*) BLIPSCAN (IPOS) +PAINTW.READ.AND.SAVE.SHADE (16X16FLG) FLTFMT (FORMAT) CH.CHANGE.ITEM (INTERPRETATION) FASL::LOOKUP-VALUE + (CL:HASH-TABLE) EDITBF (N) \TEDIT.PEEKBIN.NEW.PAGE (NOERRORFLG) \DSPFONT.PRESS (FONT) \FTP.CLOSEFILE +(SUCCESS CONN) INSPECT (ASTYPE ITEM) UPDATEFN (FN EVENIFVALID) MENU.HANDLER (MOUSEDOWN KEEPCONTROLIFOUTFLG OLDBOXX SUBMENUWINDOW SUBMENU HELDSTATE HELDFN NESTEDFLG BOXX CHANGEOFFSETFLG) -FB.GET.NEWPATTERN (OLDPATTERN PATTERN) GRAPHERPROP (NEWVALUE) BREAK.NSFILING.CONNECTION (DEV) -\\DSPCOLOR.IP (COLOR) \\LET0 (VARLST) EVALV (POS RELFLG) DEFEVAL (F FN) \\CARET.DOWN (STREAM) \\LET* ( -VARLST) \\SYMBOL.ESCAPE.COUNT (CASEBASE FIRSTFLG MULTESCAPE INEXACTOK) NOTIFY.EVENT (SUCCESS TAIL -ONCEONLY) NCHARS (FLG) TEDIT.COPY (FROM TO REPLACING) EDITL2 (FLG) INSPECT (ASTYPE ITEM) INPUT (FILE) -\\DRAWLINE.IP (DASHING) PUTPROPS.PRETTYPRINT (EXPR) DWIMDEF (FN) FB.SHAPECOMMAND (EXCESSHEIGHT) -\\FTP.FLUSH.TO.MARK (ECHOSTREAM STREAM) FB.FASTSEECOMMAND (BUTTONS) FB.MAYBE.WIDEN.NAMES (OVERFLOW) -CALL.MOVENODEFN (MOVEFN) \\MEDW.CURSOR (NEWCURSOR) TEDIT.CHARWIDTH (TERMSA) \\INSERTCR (INPC) -\\DSPCLIPPINGREGION.PRESS (REGION) GIVE.TTY.PROCESS (PROC) |\\PFRemoveRootDirEntry| (|nuke|) -\\NUMERIC.PNAMEP (SEENALPHADIGITS SEENTIGHTLETTERS SEENDECPT SEENEXPONENT SEEN-ILLEGAL-SYNTAX -SEENDIGITS) \\DOBUFFEREDTRANSITIONS (PENDINGINTERRUPT) SEDIT::SETF-OF-GET-FORMAT (SEDIT::SPEC) -COMPILER::COPY-NODES (COMPILER::TREE) SEDIT::CHANGE-PRINTBASE (SEDIT::NEW-PRINTBASE) SETREADFN (FLG) -PFI.PRINT.BITMAP (CURX CURY UNITS LINEHEIGHT BMARG POS) \\GR.MAKEPRETTYCOMSL (NAME) PROCESS.TTY (PROC) - COMPILER::META-CALL-LAMBDA (COMPILER::NEW-ARGS COMPILER::CURRENT-PROG1-TAIL) PRINTPACKETQUEUE (PACKET -) MSPRED (FLG) MAKE-UNICODE-TRANSLATION-TABLES (RCOMBINERS PREV) FB.HARDCOPY.TOFILE (HCOPYFILE HOST -HAVEDIRECTORY) EDITBF (N) \\CHECKFLTFMT (X) COURIER.WRITE.FAT.STRING (UNSPECIFIED) -\\MEDW.PUTWINDOWPROP (VALUE OLDDATA OLDVALUE) ENVAPPLY (APOS CPOS AFLG CFLG DEF) FORMAT-FIXED-AUX (W D - K) FLTFMT (FORMAT) COMPERROR (X) \\TEXTPEEKBIN (PC NOERRORFLG SUBSTREAM) \\DSPXPOSITION.IP (XPOSITION -) \\TEDIT.MAKEFILENAME (FIRSTNONSPACE LASTNONSPACE) \\SPP.HANDLE.ATTN (ATTENTIONFN) -CL::%PRINT-TIMING-ITEM (CL::ALWAYS-P CL::TIME-P) PPSOC (VERBOSE) SEDIT::RELINEARIZE (SEDIT::SUPER-NODE - SEDIT::FROM-TOP) SPY.TREE (INDIVIDUALP) \\DSPBOTTOMMARGIN.PRESS (YPOSITION) PROCESS.WINDOW (P WINDOW) - ALLATTACHEDWINDOWS (ATWS) \\SEQUIN.PUT (ISDATA) TTPRIN1 (DOWNCASE INITP) CL:LISTP (X) -SEDIT::CHANGE-PACKAGE (SEDIT::NEW-PACKAGE SEDIT::NEW-PACKAGE-NAME) \\DTEST.UFN (OBJ) \\INTERPRETER ( -ARGLIST) NSNET.DISTANCE (ROUTE) CENTERPRINTINAREA (PRIN2FLG) SEDIT::BACKSPACE (SEDIT::NODE) STKAPPLY ( -FLG DEF) \\PERIODIC.INTERRUPTFRAME (FN) TEDIT.NEW.FONT (NAME) STKEVAL (FLG) FUNCTION (ENV) SI::UNWIND -(USECNTARGET CLEANUPFN) SEDIT::DEFAULT-PACKAGE (SEDIT::NAME) PRINTNUM-TO-STRING (NUMBER FLOATFLAG RAD -WIDTH) DISMISS (MSECSWAIT TIMER) \\TEDIT.FIXCHANGEDLINE (NEXTCARETCH#) \\PROC.RESUME (OLDFX) -\\DRAWCURVE.IP (DASHING) RETAPPLY (FLG DEF) \\TFBRAVO.READ.PARALOOKS (LMFLAG FLLMFLAG) USERLISPXPRINT -(NODOFLG) IMAGEOBJPROP (SET?) \\TEDIT.PEEKBIN.NEW.PAGE (NOERRORFLG) VIDEORATE (TYPE) COPIEDFILEMATCH ( -FRPAT CHARS) FB.DEPTHCOMMAND (NEWDEPTH) WINDOW.MOUSE.HANDLER (\\MHWINDOW SI::*OR-GENTEMP*) PRINT10TO3 -(DOFILTER PRE.NOTE) GRAPHOBJ.CHECKALIGN (ALIGNSPEC) \\JISPEEK (CH1 COUNTP CH2 CH3 IN16BITFLG -SI::*OR-GENTEMP*) \\ENQUEUE (THISITEM JUNK) EDIT\: (LC X) ICONW.SHADE (SHADE) BLIPVAL (IPOS) -TEDIT.INSERT.UPDATESCREEN (INCREMENTAL WINDOW DONTSCROLL L1 LN SELINE) RETEVAL (FLG) DWIMERRORRETURN ( -ARG) PRINTPACKET (PRE.NOTE CALLER) MSJOINDETS (X Y) \\BACKJISCHAR (COUNTP) VIRGINFN (MAKE-VIRGIN? -BROKEN-DEFN ADVISED-DEFN CHANGED-NAMES EXPR-DEFN) \\DSPFONT.PRESS (FONT) BESTNSADDRESS (ERRORSTREAM -BESTADDR NOTLOOKEDUP ADDRESSES) CHANGE.NODEFONT.SIZE (NEWFONT CHNGFN) /RPLNODE2 (Y) SAVEDEF (TYPE -DEFINITION) \\SHIFTJISFILEOUTCHARFN (SI::*OR-GENTEMP*) SETBLIPVAL (IPOS N) CLISPFORERR (TYPE X Y) -TOPW.REPAINTFN (WINDOWREGION STARTCOLUMNPROPS) TB.REDISPLAY.ITEMS (FIRSTITEM LASTITEM) -\\COURIER.RECORDTRAN (TYPEDEF TAIL) \\TEDIT.NEWREGIONFN (MOVINGPOINT) -COURIER.WRITE.SEQUENCE.UNSPECIFIED (ITEM LENGTH) \\SHIFTJISPEEK (CH1 COUNTP SI::*OR-GENTEMP*) -\\TFBRAVO.READ.CHARLOOKS (PROPERTY VALFLAG) DASSEM.DSTOREFNDEF (NAMETABLE LOCALARGS) \\INSERTCH ( -INSERTMARK \\INPC PLOOKS NLOOKS REPLACING) BLIPSCAN (IPOS) OPT.PRDEL (B P) \\IPCURVE2 (VISIBLEP -DUPLICATEKNOT) DOTABS (LST) \\TEXTGETFILEPTR (PC) \\STKARG (NT) SEDIT::CHECK-SELECTION-SHIFT (SEDIT::LET-GO - SEDIT::NEW-SHIFT) \\JISFILEOUTCHARFN (SI::*OR-GENTEMP*) TTYDISPLAYSTREAM (DISPLAYSTREAM WIN) -FB.HARDCOPYCOMMAND (FILES) COMPARELISTS (DIFFERENCES) COURIER.WRITE.SEQUENCE (ITEMLIST) -\\EUCFILEOUTCHARFN (SI::*OR-GENTEMP*) PROCESS.EVAL (WAITFORRESULT) \\GENERIC.DSPCREATE (DESTINATION -SCREEN) CL:MAKE-PATHNAME (DEFAULTS DIRECTORY) COMPAREDEFS (SOURCES SRCS) \\NSFILING.AFTER.LOGIN (HOST) - \\GR.CONTENTS (COM NAME) MSPATHS4 (TOP) MERGE (B A) \\BACKSHIFTJISCHAR (COUNTP) GETDEFERR (MSG) -WAITFORINPUT (N) CL:MAP (RESULT-TYPE MORE-SEQUENCES) \\EUCIN (CH1 COUNTP SI::*OR-GENTEMP*) COND ( -*TAIL*) \\GR.DELDEFFN (NAME DEF) PROPERTAILP (X) \\PROCESS.EVAL1 (..PEV-PROC..) TTADJUSTWORD (WORD) -VRULE.DISPLAYFN (RULING) \\SEQUIN.PROCESS (SOC TIMEOUT) \\DECODETRANSITION (DOWNFLG SHIFTED) -FORMAT-PRINT-RADIX-AUX (ATSIGN COLON) \\JISIN (COUNTP IN16BITFLG SI::*OR-GENTEMP*) CL:MISMATCH (END1 -END2 FROM-END) \\BACKTHROUGHCHAR (COUNTP) \\SHIFTJISIN (CH1 SI::*OR-GENTEMP* COUNTP) \\TEXTEOFP (PC) -ESUBST (ERRORFLG) CL:NOTANY (MORE-SEQUENCES) REQUIREVERSION (LISP MICROCODE BCPL) PROCESS.READ (WINDOW - CLEAR? PROMPT OLDW) SEND.FILE.TO.PRINTER (HOST FILETYPE) MAP (MAPFN2) PROCESS.APPLY (WAITFORRESULT) -TEDIT.FORMATTEXTBOX (KEPT-ONE-LINE FORCENEXTPAGE FIRSTLINE COLUMN-YBASE YBOT SPECIALYPOS -PRIOR-COLUMN-YBOT) FB.SET.BROWSER.TITLE (TIME) COPIEDFILENAME (PRESERVEVERSION) CL:MERGE-PATHNAMES ( -DIR DEFAULT-DIR NAME) \\DEFINEDEVICE (DEV TEMP NAME) FORMAT-PRINT-RADIX (PARMS) U-CASE (FATP CHANGEFLG -) TWODINSPECT.REDISPLAY (ELTROWPROPS ELTCOLUMNPROPS ELTS) CL:NSUBSTITUTE (END COUNT) CHANGENAME1A (MAP - Y) SEDIT::COMMENT-OUT-SELECTION (SEDIT::NODE SEDIT::START) \\PROCESS.APPLY1 (..PEV-PROC..) RADIX (N) -COMP.LOOKUPCONST (X) \\PRINTFRAME (VARSONLY FAST INCALL VALIDNAMETABLE NOPUSH SLOWP) SEDIT::CHECK-SELECTION - (SEDIT::NODE) \\EUCPEEK (CH1 COUNTP SI::*OR-GENTEMP*) TEDIT.FORMATFOLIO (PRETEXT POSTTEXT NOFIRSTPAGE - FORCENEXTPAGE YBOT) \\ICONW.REPAINTFN (ERASEBM SHADEBM) \\GETDEVICEFROMNAME (NOERROR) FASSOC (ALST) -APROPOS (ALLFLG QUIETFLG CASEXACT FILTERFN) DASSEM.DWRITEFN (FREEVARS LOCALVARINFO) CL:NSUBSTITUTE-IF -(END COUNT) \\PRINTBF (VARSONLY) \\GETDEVICEFROMHOSTNAME (DONTCREATE) |\\AddShade| (INDEX) -CL:NSUBSTITUTE-IF-NOT (END COUNT) TEDIT.SETSEL (PENDINGDELFLG LEAVECARETLOOKS) SEDIT::DELETE-NODES ( -SEDIT::START) \\UNQUEUE.EVENT (TAIL) \\TEDIT.LOOKS (FONT FACE SIZE NEWLOOKS) \\HARDCURSORUP (INVERTFLG -) COMP.VARTYPE (VAR) OPT.JUMPTHRU (Y) \\BACKTRACE (CNT JUNK VARS LOCALS NAMES ALINKS) -CL:PARSE-NAMESTRING (CL:DIRECTORY CL::SUBDIRECTORY CL::RELATIVEDIRECTORY) \\THROUGHPEEK (COUNTP) PRIN2 - (OBEY-PRINT-LEVEL) MSPATHS2 (FLG) EDITFPAT (FLG) SEDIT::STRUCTURE-FROM-STRING (SEDIT::STR) -\\LOOKUPPUPNUMBER (RESULT) \\REMOVEDEVICE.NAMES (CHANGED NAMES) |\\PFFindRootDirEntry| (|entryNum|) -MSONPATH (FROM) EDITXTR (TOFLG) GRAPHBUTTONEVENTFN (NOW NEAR) CL:POSITION-IF (END) -SEDIT::STRUCTURE-FROM-SELECTION (SEDIT::START) \\CLISPKEYWORDPROCESS (FORM TMP) EDITMBD (LC TOFLG) -CL:PEEK-CHAR (CHAR EOF-ERRORP CL:CHAR) GETBLOCKDEC (FNSONLY) EDITMV (LC X TOFLG) \\TEDIT.MAINW ( -WINDOWS) INFILECOMTAIL (FLG) CL:PROBE-FILE (NAMESTRING-IF-EXISTS INFILEP) \\DELETEFILE (DEV) EMPRESS ( -HEADING \#COPIES \#SIDES) |UnixPrint| (NAME) OBTAIN.MONITORLOCK (DONTWAIT) TEDIT.FIND (TARGETSTRING -WILDCARDS? START# REAL-END# RESULT) COPIEDFILEPATTERN (FRPAT CHARS TOPAT) -\\NSPRINT.FULL.REQUEST.STATUS (STREAM) RELEASE.MONITORLOCK (OWNER EVENIFNOTMINE PREV) TB.MAKE.BROWSER -(ITEMHEIGHT OLDP) \\GR.PUTDEFFN (NAME DEF) ONEDINSPECT.SELECTITEM (PROP) TEMPLATE (FLG OLD) -DASSEM.DASSEM (ARGS LL LOCALS A) \\BACKEUCCHAR (COUNTP) \\TEDIT.UNPARSE.CHARLOOKS.LIST (VAL) -CREATE.MONITORLOCK (EXCLUSIVE) \\THROUGHIN (COUNTP) \\TEDIT.APPLY.PAGEFORMATTING (PAGENOS PX HEADINGX -HEADINGINVALID STARTINGPAGE# LANDSCAPE?) EDITFROMFILE (ONLYTYPES SEEN DEF) MSSIMPLESET (X) -TEDIT.FORMATHEADING (FORCENEXTPAGE YBOT) GETDEFCURRENT (COM TYP) ENVEVAL (APOS CPOS AFLG CFLG) -FULLPRESSBITMAP (SCALEFACTOR CLIPPINGREGION) WRITE-UNICODE-INCLUDED (CTAIL) TEDIT.FORMATPAGE (PAGE# -END-OF-PAGE-FN) \\IDLE.EXIT? (NAME TIMEOUT WATCHER PWD AUTHTYPE) CL:READ-FROM-STRING (END START -PRESERVE-WHITESPACE) CL:POSITION-IF-NOT (END) SI::MONITOR-UNWIND (LOCK OWNER PREV) \\MEDW.REDISPLAYW ( -ALWAYSFLG REGION) \\DEVICEEVENT (BEFOREP) IRM.LOOKUP (SMARTFLG REF) FNCHECK (PROPFLG NOERRORFLG) -CLISPLOOKUP0 (DECLST CLASS) EDIT4F (C3 CHANGEFLG CHARFLG TOPLVL NEWFLG) CL:READ-BYTE (EOF-ERRORP) -\\TEDIT.TEXTBIN.NEW.PAGE (SPLITCHAR) \\CCODEARGLIST (SMARTP) CL:REDUCE (END FROM-END) -DBG::FIND-DEBUGGER-STACK-FRAME (DBG::PLACE) \\HANDLE.NS.ROUTING.INFO (NDB NEWTIMER) CL:READ-CHAR-NO-HANG - (EOF-ERRORP) COMPILER::GENCODE-CALL (COMPILER::IL-LAMBDA COMPILER::CLOSED-OVER) PACK* (CLAUSE) -KILL.LINES (FIRSTLINE) CL:REMOVE-IF-NOT (END COUNT) \\BLTSHADE.IP (DESTREGION CLIPPINGREGION) MSPATHS1 - (FIRST LAST XT TEM) CL:RENAME-FILE (CL::NEW-FULLNAME) CL:READ-LINE (EOF-ERRORP RECURSIVE-P) -COMPILER::FRAME-ANNOTATE-LAMBDA (COMPILER::FUNCTIONAL-POSITION-P) CL:REMOVE-DUPLICATES (END) -\\PROCESS.MOVEFRAME (RESIDUAL) \\TEDIT.SELECT.CHARACTER (PREVCH EXTENDING SELRES) CL:REMOVE-IF (END -COUNT) BRECOMPILE3 (COREOK) \\GETFILENAME (FDEV) CL:SEARCH (END1 END2 FROM-END) BSPINPUTSTREAM (SOC) -FB.CREATE.FILEBUCKET (LASTFILEDATA LASTDIR LASTNAMECHAR ATTR) MINIMUMWINDOWSIZE (EXT) -\\GENERIC.READCCODE (CHAR) \\MEDW.SHAPEW (NEWREGION) MACROEXPANSION (COMPFLG) \\GETSTREAM (X NOERROR -ACCESS) FB.COPY/RENAME.COMMAND (FILELIST NEWNAME) COMPILER:OPTIMIZE-AND-MACROEXPAND (COMPILER::CHANGED-P -) SEDIT::CREATE-NODE (SEDIT::SUPER-NODE) COMPILER::META-EVAL-PROGN (COMPILER::NEW-STMTS) MSJOIN (Y X) -FB.INSERT.FILE (NEXTITEM NOSUBDIRS) INSURE.RGB.COLOR (NOERRFLG) ONEDINSPECT.REDISPLAY (ELTPROPS ELTS) -\\MEDW.EXPANDW (MAINWINDOW) VARIABLESMSGETDEF (BODY) CL:SOME (MORE-SEQUENCES) BRKDWNRESULTS2 (TERP) -MSPATHS (INVERTED NOTRACE NAMED UNDONE) \\CLEARSYSBUF (ALLFLG) GRAPHADDLINK (ADDFN) -\\TEDIT.GET.CHARLOOKS (PREVPC) PFI.MERGE.INDICES (NEWINDEX MASTER) \\RECLAIMARRAYBLOCK (RECLAIM-P) -CREATEHASHFILE (\#ENTRIES) COMP.CONST (X) MSRESPELL (WORD) \\DRAWELLIPSE.PRESS (ORIENTATION) -OPT.SCANOPT (P B) \\CAR.UFN (X) SEDIT::SUBSTITUTE-OBJ (SEDIT::REMOVE?) \\WRITEPRESSBITMAP ( -CLIPPINGREGION SCALEFACTOR) WAIT.FOR.TTY (NEEDWINDOW MSECS TIMER) \\CDR.UFN (X) \\DRAWCURVE.PRESS ( -DASHING) \\IOMODEP (ACCESS) XIPAPPEND.CELL (OFFSET) \\UNQUEUE.TIMER (NOERROR) \\TEDIT.INSPECTCODE (PC) - \\ENQUEUE.TIMER (NEXT) \\SPP.INFO.HOOK (WINDOW) CL::DEFINE-COPIERS (CL::COPIER) \\UNWIND.UFN (PUSHP) -CHARSET (NEWVALUE) COMPEM (FL ERRORFLG Y) PRINTROUTINGTABLE (SORTFLG DECP) OPT.SETUPOPT (C) -\\NSFILING.GETFILEINFO (LEN) OLDFAULT1 (FAULTAPPLYFLG) PACKFILENAME (RELATIVEDIRECTORY DIRECTORY VAL -HOST DEVICE SUBDIRECTORY NAME EXTENSION VERSION) FB.SORTCOMMAND (REVERSED BYNAME HADNOSUBDIRS VALUE -DATETYPE NAMESTART SORT#) MAKEFILES (FILES FLG) MAPFILES (ENUMERATE-FIRST) \\HTFIND (PREV) -\\MEDW.SHRINKW (EXPANDFN ICONISBITMAP) CL::%COMPLEX-TREE-EQUAL (CL::TEST-NOT-P) \\TEDIT.ACTIVE.WINDOWP - (TEXTOBJ) \\PROC.AFTER.WINDOWWORLD (EXECPROC) CL::%PRINT-TIMING-INFO (CL::DATA-TYPE-INFO) SEDIT::UNDO - (SEDIT::UNDO-LIST) SEARCHPRETTYTYPELST (FLG) OPT.POSTOPT (CODE ANY) KEYACTIONTABLE (OLD) \\RPLACA.UFN - (X Y) \\DRAWLINE.PRESS (DASHING) XIPAPPEND.STRING (IFSP OFFST) BLOCKCOMPILE1 (ENTRIES) \\RPLACD.UFN ( -X Y) TEDIT.STYLESHEET (TEXTSTREAM TEXTOBJ) INSPECTABLEFIELDNAMES (TOPONLYFLG FIELDNAME) -WRITE-UNICODE-MAPPING (FILE MAPPING IMAPPING EMPTYOK) \\GENERIC.OUTFILEP (V) \\RESHOWBORDER1 ( -SOFTCURSORUP SI::*OR-GENTEMP*) \\ROUTINGTABLE.INFOHOOK (WINDOW TEDITP) FUNCTIONSMSGETDEF (BODY) -BRHL/LAYOUT (DS) FMEMB (Y) \\NSRANDOM.CLOSEFILE (SESSION) CL:TREE-EQUAL (CL::TEST CL::TEST-NOT) -BRECOMPILE1 (NOBLOCKSFLG X) DEFAULT.INSPECTW.VALUECOMMANDFN (VALUE) SEDIT::STRINGWIDTH (SEDIT::PRIN-2? -) \\TEXTOPENF-SUBTREE (PCTREE) CLISPFORVARS1 ($TAIL) MAPFILES1 (INCLUDE-DIRECTORIES) -\\HANDLE.RAW.3TO10 (NDB) MB.NB.PACKITEMS (ITEMWIDTHS CURLINE MAXITEMS/LINE) CL:SUBSTITUTE-IF-NOT (END -COUNT) CLRPROMPT (P) TEDIT.SCAN.LINE (WORDSELFLG L) KEYACTION (ACTIONS) TTYIN.LASTINPUT (BUF) MENU ( -RELEASECONTROLFLG NESTEDFLG SELVAL) CL:SUBSTITUTE (END COUNT) \\NSFILING.SETFILEINFO (ATTR/VAL) -\\SCALEDBITBLT.IP (CLIPPINGREGION DESTINATION-REGION) CL:SUBSTITUTE-IF (END COUNT) REMOVEITEM (FLG) -CLISPFOR2 (FLG) \\REVALIDATEFILE (NEWSTREAM) \\CLEAR.ROUTING.TABLE (OLDTABLE) \\SPP.HANDLE.INPUT (XIP -ACKRECEIVED ALLOCINCREASED ATTN) CL::%VALID-TYPE-P (TYPE) REMPROP (X0) \\UNQUEUE (NEXT PREV NOERRORFLG -) FORGETPAGES (TOPAGE FROMPAGE BUFFER PREVBUFFER) PUTPROP (X X0) \\COURIER.PUTDEF (OLDINFO) -\\CHECK.PQUEUE (PREV NEXT THISP X) XIPAPPEND.WORD (OFFSET) \\CONS.UFN (Y PRIOR PRIORPRIOR) -\\PAGED.REVALIDATEFILE (NEWSTREAM) \\RENAMEFILE (OLD-DEVICE) NEWFAULT1 (FAULTAPPLYFLG FAULTZ) PPROC ( -PROC) SETINTERRUPT (CHAR CLASS) TWOD.TRACKCURSOR (SELECTION NEWROWPROP NEWCOLUMNPROP SELECTEDROWPROP -SELECTEDCOLUMNPROP) CL::%TYPEP-PRED (CL::EXPANDER) FLUSHRIGHT (CENTERFLAG P2FLAG) \\MEDW.MOVEW ( -|POSorX| OPEN? USERMOVEFN SOFTCURSORUP SI::*OR-GENTEMP* OLDCLIPREGION) RESTOREMAP (BUFFER PAGES -PREVBUFFER) \\ASSIGNDATATYPE1 (SUPERTYPE NTYPX SIZE REDECLARED FOUNDSOME) CL:USER-HOMEDIR-PATHNAME ( -HOST) \\RESTLIST.UFN (TAIL) \\TYPEGLOBALVARIABLE (VARFLG) \\GENERATENOFILES (STAR ESC) COMP.PROGLST ( -LST) \\TEDIT.ADJUST.LINES (FIRSTLINE LL OFLOW PREVLINE) COMP.UNBOX (BOXER) INTCHAR (CHAR TYP/FORM -OLDINT SYSDEF) \\PROCESS.MAKEFRAME (FLG) NUTF8STRINGBYTES (RAWFLG) MULTIFILEINDEX1 (CONSECUTIVE -INDICES NOTPRINTED) FB.EXPUNGECOMMAND (FAILED CMD) CONDITIONS:INVOKE-RESTART (CONDITIONS::R) -SCROLLBYREPAINTFN (EXTENT CONTINUOUSFLG) \\MEDW.CLOSEW (SOFTCURSORUP SI::*OR-GENTEMP* NEXTW) -CONDITIONS:INVOKE-RESTART-INTERACTIVELY (CONDITIONS::R CONDITIONS::I-FN) WHICHW (WINDOW) -PPROCREPAINTFN (REGION) SEDIT::TRANSLATE-CHARS (SEDIT::UPCASE?) FIND.PROCESS (ERRORFLG) -\\NOFILESNEXTFILEFN (FILE) CL::USEFUL-TYPE-EXPANSION-P (CL::EXPANDED) SEDIT::CONTAINS? (SEDIT::START-1 - SEDIT::END-1 SEDIT::START-2 SEDIT::END-2) FB.GREATEST.PREFIX (DIR FILENAME LASTDIR) COMP.UBFLOAT2 (A) - SEDIT::REDO (SEDIT::UNDO-UNDO-LIST) \\FIXDLINES (LINE PL NL) \\NSRANDOM.WRITEPAGES (ERROR) -CL::BUILD-CONSTRUCTOR-SLOT-SETFS (CL::INITIAL-VALUE-FORM) \\BUFFERED.REVALIDATEFILE (NEWSTREAM) -\\FILE-CONFLICT (STREAMS-FOR-THIS-FILE) \\DSPYPOSITION.IP (YPOSITION) COPY (X) LISPXUSE1 (A V EFLG -VFLG AFLG) CLISPFOR1 (FLG NXTOPRTAIL LSTFLG) \\PRESSCURVE2 (DUPLICATEKNOT) FONTNAME.IP (FACE) -COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::REQUESTS) TEDIT.SELECT.LINE.SCANNER (LINE WORDSELFLG) -RESHAPEBYREPAINTFN (OLDSCREENREGION EXTENT) COMP.BIND.VARS (VAL) \\AGE.ROUTING.TABLE (TAIL PURGED) -MSVERB (ROOT) \\DELETECH (DONTDIRTY PC1 PC HIPC) \\RELEASE.IOCB (IOCB) CL::GET-PS-FROM-ACCESSOR ( -CL::NO-ERROR-P) XIPAPPEND.BYTE (OFFSET) PACKFILENAME.STRING (RELATIVEDIRECTORY DIRECTORY VAL HOST -DEVICE SUBDIRECTORY NAME EXTENSION VERSION) XCL::%DEFINE-TYPE-FILE-DEFINITIONS (XCL::DEF) -COMP.UNBIND.VARS (TOPFLG) PRETTYFILEINDEX (FILECREATED WASOPEN OUTSTREAM NOPRINT DONTINDEX -*PFI-TWO-SIDED*) COMPILEUSERFN1 (FLG) FB.MERGE.DIRECTORIES (PREFIX RETAIN) CLEANUP (FILES) PROPLISTP ( -LST LSTPTR) RESETKEYACTION (RESETINTERRUPTS) \\ONQUEUE (X) SHAPEW1 (NOWOPEN?) \\FILE.NOT.OPEN (NOERROR -) \\MEDW.OPENW (SOFTCURSORUP SI::*OR-GENTEMP*) CL::GET-SLOT-DESCRIPTOR-FROM-PS (CL::NO-ERROR-P) -\\SETPRINTLEVEL (CARN) ADDMENU (W) XCL::%DEFINE-TYPE-GETDEF (CL:HASH-TABLE) EDIT4E1 (PAT LST PAT1 LST1 - CHANGEFLG LST2) SEDIT::VERIFY-STRUCTURE (SEDIT::CLEAR-LINEAR-FORMS? SEDIT::REDISPLAY-ALWAYS?) -SHADEITEM (DS/W) COMP.CHECK.VAR (BIND) XCL::%DEFINE-TYPE-DELDEF (XCL::HT) CL::%COMPLEX-SUBST (CL::KEY -CL::TEST-NOT-P CL::TEST-RESULT) \\KEYACTION1 (ALTGRCODE) SPAWN.MOUSE (INTERNAL MOUSEPROC) -CL::%SUBST-IF-NOT (CL::KEY) \\GCRECLAIMCELL (INDEX PTRFIELDS VAL DONEXT) CL::%SUBST-IF (CL::KEY) -PRESSBITMAP (SCALEFACTOR CLIPPINGREGION) AWAIT.EVENT (TIMEOUT TIMERP) FB.REMOVE.FILE (NEXTITEM) -GETFILEINFO (LEN) MONITOR.AWAIT.EVENT (TIMEOUT TIMERP) SEDIT::UNDO-LIST-REPLACE (SEDIT::OLD-SUBNODES) -\\TFBRAVO.READ.USER.CM (LINE) CL:TYPE-OF (CL::D) \\DOHELPINTERRUPT1 (OLDTTY) PUTDEF (PUTDEF.METHOD) -\\PROCESS.GO.TO.SLEEP (EVLOCK TIMEOUT TIMERP OLDPROC DELETEFLG) \\TEXTCLOSEF-SUBTREE (PCTREE) -XCL::%DEFINE-TYPE-PUTDEF (XCL::DEFINITION) MB.NB.SIZEFN (MAXITEMS/LINE OLDBOX) HEIGHTIFWINDOW ( -TITLEFLG) DBG::CREATE-DEBUGGER-WINDOW (POS) PUTMENUPROP (NOWDATA) PFI.NEW.LISTFILES1 (FULL) -CL::%COMPLEX-NSUBST (CL::KEY CL::TEST-NOT-P CL::TEST-RESULT) CL::%NSUBST-IF (CL::KEY) RESET.INTERRUPTS - (|PermittedInterrupts| |SaveCurrent?|) CHECK/MENU/IMAGE (IMAGE MAKEWINDOWFLG) \\MEDW.CREATEW ( -OLDWINDOW NOOPENFLG) FB.MAKE.BROWSER.BUSY (ITEM) CL::BUILD-CONSTRUCTOR-ARGLIST (CL::INIT-FORM) -BRACKET.CURRENT.WORD (FIRSTCOL) CL::GET-PS-FROM-PREDICATE (CL::NO-ERROR-P) \\NSRANDOM.TRUNCATEFILE (LP - ERROR) \\PROC.FINDREALFRAME (POS) CLISPIF3 (FIRSTCLAUSEFLG) \\ELIDE.PRINT.TAIL (NOSPACEP) -CL::%NSUBST-IF-NOT (CL::KEY) COMPILER::FRAME-ANNOTATE (COMPILER::NODE) \\CONTROL-T.PRINTRATIO (NEWLINE -) CL::%SIMPLE-SUBLIS (CL::PAIR) \\CANONICAL.NSHOSTNAME (INFO) TEDIT.RESET.EXTEND.PENDING.DELETE (SEL) -PROCESS.NAME (P NAME) IN/SCROLL/BAR? (EXTENT EXTENTUSE) CL::%COMPLEX-ASSOC (CL::TEST-NOT-P CL::KEY) -WHATIS (USERINPUT ONLY) CLISPIF1 (PRED) CL::%COMPLEX-SUBLIS (CL::KEY CL::PAIR) HEADINGOP.IP (HEADING) -PRINTCONSTANT (PREFIX) \\FTP.FLUSH.TO.EOC (ECHOSTREAM STREAM) FB.MAYBE.INSERT.FILE (OLDITEM -FILE-UNCERTAIN) CL::STRUCTURE-SLOT-NAMES (CL::DONT-COPY) RIGHTW.REPAINTFN (WINDOWREGION STARTROWPROPS) - PAINTW.READ.AND.SAVE.SHADE (16X16FLG) PRINTFILETYPE (TYPE DONTOPEN) TRACE (CL::FNS) -CL::%COMPLEX-NSUBLIS (CL::KEY) INSPECT/TOP/LEVEL/LIST (X) TWODINSPECT.MAKEREGIONS (COLUMNWIDTHS) -TMPSUBFN (N) EDITFINDP (FLG) SEDIT::UPDATE (SEDIT::RELINEARIZE) \\PRINT-USING-ADDRESS (TYPE) -FORMAT-WRITE-FIELD (PADLEFT) \\NSPRINT.ENQUIRE (STREAM) GRAPHEROBJ (LEFTBUTTONFN MIDDLEBUTTONFN -COPYBUTTONEVENTFN) FB.COMPILECOMMAND (FILES) TWODINSPECT.ARRANGEWINDOWS (TOTALHEIGHT TOTALWIDTH -TOTALLEFT TOTALBOTTOM) PRIN3 (OBEY-PRINT-LEVEL) \\TEDIT.DELETE (WINDOW LINES OLINE1 OLINEN) -TWODINSPECT.ADJUSTSELECTION (SELECTION) MOUSECONFIRM (HELPSTRING PROMPTSTRING HELPSTR PWINDOW -DON\'TCLEAR/MAINW) RECORDTRAN (TL USING USINGTYPE BINDINGS NOTRANFLG) UNTRACE (CL::FNS) -SHOWSTACKBLOCKS (WAITFLG) ADDTOCOM (NEAR LISTNAME) FETCHFIELD (TN) MB.NB.WHENOPERATEDFN (SIDEFN) -PROCESS.BACKTRACE (STKP) FB.FINISH.COMMAND (ITEM) COMPILER::META-EVAL-CALL (COMPILER::EVAL-WHEN-LOAD?) - COMP.TOPLEVEL.COMPILE (ARGS) MSCOMMAND (TEM KNOWN TYPE) COMP.BOX (BOXER) ADDTOVAR (OLDENTRY -ADDED-NONLIST? VAL) TTYINFOSTREAM (STREAM) \\FILLINXIP (EPKT SOURCENSOCKET DESTNET DESTSOCKET#) -\\SLOWIQUOTIENT (SIGNQUOTIENT SIGNREMAINDER) SEDIT::FIND-SELECTION-BACKWARDS (SEDIT::END SEDIT::WRAP?) - MAKEHARDCOPYMODESTREAM (DISPLAYSTREAM) CL::%COMPLEX-MEMBER (CL::TEST-NOT-P CL::KEY) DUMPDATABASE1 (FN -) PRINTXIPROUTE (CALLER) CL:UNION (CL::LIST1-EXTRAS) TTY/EDITE (ATM TEM TYPE) SEDIT::FIND-SELECTION ( -SEDIT::START SEDIT::WRAP?) \\SLOWHDCPYBLTCHAR (SOFTCURSORUP SI::*OR-GENTEMP*) SAVESET (NAME VALUE -TOPFLG PTR) DSPSCROLL (SWITCHSETTING) SEDIT::UNDO-EVENT (SEDIT::EVENT) PUTHASHFILE (KEY2 VALUE) -BAKTRACE (SKIPFNS) CL:NUNION (CL::LIST1-EXTRAS) EDITF2 (CHANGES TYPE IFCHANGEDFN) ATTACHEDWINDOWS (COM -) MB.MARGINBAR.SELFN (TAB) EDITF (EDITFX) IREMAINDER (SIGNQUOTIENT SIGNREMAINDER) READOCT (PROMPT) -\\MAKEPCTB (PC1) CL:NINTERSECTION (CL::RESULT) UNION (TAIL) FB.CANONICALIZE.PATTERN (CANONICAL) -\\SLOWIDIFFERENCE (SIGNX) MASTERSCOPE (MASTERSCOPECOMMAND TOPFLG) ROMANNUMERALS (UCFLG) -ONEDINSPECT.ARRANGEWINDOWS (TOTALHEIGHT TOTALWIDTH TOTALLEFT TOTALBOTTOM) \\CREATEW1 (NOOPENFLG) -ONED.TRACKCURSOR (SELECTION HORIZONTAL-P PROP SELECTEDPROP NEWPROP) CL:NSET-DIFFERENCE (CL::RESULT) -FORMAT-PRINT-NAMED-CHARACTER (NAME) EDITDEF (SOURCE) \\TEDIT.COPY.PIECEMAPFN (NEWOBJ OBJ) -DIRECTORYNAME (STRPTR) GETHASHFILE (KEY2) COMP.TRANSFORM (MACROPROP EXPN-FN) CL:NSET-EXCLUSIVE-OR ( -CL::RESULT) MSTRYSPELL (TAIL) APPENDTOVAR (OLDENTRY ADDED-NONLIST? VAL) DUMPDATABASE (FNLST DUMPEDFLG) - \\ROUTE.XIP (ROUTE READONLY) UNSAVEBLOCK? (ENTRIES) SEDIT::FIND-OBJ (SEDIT::FIND-STRING SEDIT::BACKWARDS? -) FB.COPY/RENAME.MANY (RETAIN) EDIT-IN-FUNCTION (LOC) DSPEOLFN (EOLFN) SEDIT::STRINGIFY-LIST (SEDIT::DOT -) \\SLOWITIMES2 (SIGN) BRHC/LAYOUT/DAUGHTERS (TTC) EDITDEFAULT1 (Y) \\BITBLT.IP (CLIPPINGREGION -DESTINATIONREGION) SEDIT::SET-POINT-STRING (SEDIT::INDEX) \\AB.NEXT (ABLO) EDITH (X) -\\TEDIT.TEXTBIN.FILESETUP (FATP) DIRECTORY (PRINTFLG OUTFILE PROMPTFLG PFLG SEENP HEADINGS -VALUES-WANTED) CLISPIF (LISPXHIST) MAKE-SEQUENCE-OF-TYPE (ELEMENT-TYPE EXPANDER) CREATEW1 (REGION -TITLE NOOPENFLG) EDITDEFAULT (EDITY) SCREENBITMAP (SCREEN) \\COURIER.CHECK.PROCEDURES (X INFO) CNDIR ( -HOST/DIR) \\COURIER.UNKNOWN.TYPE (PROGRAM) MODIFY.KEYACTIONS (|SaveCurrent?|) EDOR (COMS) DEFINE ( -TYPE-IN) EDITRAN (DEF TEM) IFCDECLARE (WANTDECLARE) FIX89 (POS SPLIT89FLG) EDITTO (LC1) MSPARSE ( -LASTADVERB CONJUNCTIONS POSS SPELLING OUTPUTFILE) DIRECTORYNAMEP (HOSTNAME) FIND-EDIT-LOCATION (EXPRS) - DO.SHIFTED.SELECTION (START INITMODE EXTENDING) ATTACH (L) EDITCOM (TYPEIN) HRULE.DISPLAYFN (RULING) -SEDIT::SET-POINT-LITATOM (SEDIT::INDEX SEDIT::OFFSET) EDRPT (QUIET) CALLS (USEDATABASE VARSFLG FNDEF) -\\HDCPYBLTCHAR (SOFTCURSORUP SI::*OR-GENTEMP*) TTYIN.PRINTARGS (ARGS ACTUALS ALLOW-OTHER-KEYS DOSPACE) - EVERY (EVERYFN2) %ALTER-AS-DISPLACED-ARRAY (DISPLACED-INDEX-OFFSET DISPLACED-TO-READ-ONLY-P) -OPT.RESOLVEJUMPS (NEW) EDITMAC (LST FLG) UNPACKFILENAME.STRING (FILE ONEFIELDFLG PACKFLG CLFLG HOSTP -OLDDIR FATP NEWDIR TEM BEYONDNAME FIRSTDOT SECONDDOT OSTYPE BEYONDEXT CODE) CL::%LIST-MAP-OPTIMIZER ( -CL::INC-FN CL::CONSTANT-FN CL::CONSTANT-INC-FN CL::RESULT-P CL::NIL-RESULT-P) EDIT!UNDO (LST !UNDOFLG -FLG) CL:ADJUST-ARRAY (FILL-POINTER EXTENDABLE-P) FB.GET.NEW.FILE.SPEC (FIELDS) FB.LOADCOMMAND (FILES) -EDITCOMA (LST TEM) EDLOC (FLG) FORMAT-PRIN1 (PARMS ARG COLON) EDITCOML (COPYFLG) TCONC (PTR) -\\SCALEDBITBLT.PRESS (CLIPPINGREGION) EDITCOM1 (FLG) SUBATOM (M1) EDIT-IN-FNS (LOC) KWOTE (X) -TEDIT.SUBLOOKS (PC CHANGEMADE) UNDOEDITCOM (FLG C) DSUBST (OLD) MSTYPEMATCHRATING (X Y) -SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::SUBNODE SEDIT::INDEX) EXEC-EVAL (*CURRENT-EVENT*) -CL::DEFINE-CONSTRUCTORS (CL::ALL-BOAS?) EDITSMASH1 (L0) ADD-EXEC (XCL::TTY) DOUSERFNS2 (FNLST) -ICONTITLE (TITLESPEC REG FONT JUST) CH.LOOKUP.OBJECT (ADDRESS) EDITNCONC (X) LCONC (X PTR) -FORMAT-PRINC (PARMS ARG COLON) INSPECT/AS/FUNCTION (EDITOR WINDOW PROC) PRINTADDRS (SI::*OR-GENTEMP*) -COPYBYTES (END NBYTES) \\APPLYINSPECTMACRO (ARGS) FB.COUNT.FILE.CHANGE (DELETEDP SIZE) -\\TEDIT.CHANGE.LOOKS (FAMILY FONT WEIGHT SLOPE EXPANSION FACE SIZE SIZEINC NEWLOOKS PC PROT SELHERE -ULINE OLINE STRIKE INVISIBLE SUPER SUB STYLESET UISET OFFSETINC INVERSEVIDEO) GRAPHOBJ.BUTTONEVENTINFN - (LEFT MIDDLE) \\AB.BACK (ABLO) CL::TYPE-EXPAND (CL::EXPANDER) LSUBST (EXPR) \\DISPLAYLINE ( -HARDCOPYMODE TERMSA) COMP.ATTEMPT.COMPILE (EMFLAG FLG) CL::TYPE-EXPANDER (CL::EXPANDER) MSSEEKPHRASE ( -FORCONJUNCTION) EDIT4F1 (TAIL X LVL XX) TEDIT.PROMPTPRINT (TEXTSTREAM TEXTOBJ MAINTEXTOBJ WINDOW -CLEAR?) \\TEDIT.REOPEN.STREAM (PC) \\BLTSHADE.PRESS (CLIPPINGREGION) CL:MAPCAR (CL::MORE-LISTS) EDIT2F - (X) \\BUFFERED.COPYBYTES (NBYTES) LDIFF (Y Z X) PRINTPUP (DOFILTER PRE.NOTE) SEDIT::SCAN-STRING ( -SEDIT::STRING? SEDIT::IN-MULTI-ESC SEDIT::POINT?) \\DSPXPOSITION.PRESS (XPOSITION) COPYCHARS (END -START RAP CHAR SAMEEXTFORM) BREAK-FUNCTION (XCL::TRACE? XCL::IN-FN) -SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE-BACKWARDS (SEDIT::TARGET SEDIT::WRAP? SEDIT::END) PRINTPUPROUTE ( -CALLER) UNBREAK (XCL::FNS) BRKDWNRESULTS (RETURNVALUESFLG) PUTCURSORPROP (OLDDATA VALUE OLDVALUE) -UPDATEFN (FN EVENIFVALID) EDIT4F2 (CDRFLG FLG) \\COURIER.CHECK.ERRORS (X) MAP2CAR (CL:MAPL MAPFN2) -GTHASHFILE (HASHFILE) MSSETREP (LISTOKFLG NEG) BRHC/LAYOUT (DS) MAPCON (MAPE MAPFN2) CL:SUBSEQ (END) -SEDIT:SEDIT (SEDIT::WINDOW) \\CREATEPIECEORSTREAM (STRING) \\STRINGWIDTH.HCPYDISPLAYAUX (RDTBL) MAP2C -(MAPFN2) EDIT.RI (A B) SEDIT::SET-POINT-UNKNOWN (SEDIT::INDEX) COPYFILES (COPYFILESASK COPYFILESOUTPUT - DONTCOPY COPYFILESALWAYS DT2 COPYFILESPURGESOURCE COPYFILESREPLACE NF COPYFILESTERSE -COPYFILESVERSIONS COPYFILESPURGE) IDLE.SHOW.OPTION (STRING SEPR) EDITBF1 (LVL ...PAT PAT XX TAIL) -MAPCONC (MAPE MAPFN2) SEDIT::SET-POINT-QUOTE (SEDIT::INDEX SEDIT::OFFSET) ONEDINSPECT.MAKEREGIONS ( -VALUEWIDTH) TTPROMPTCHAR (PROMPT) \\MACPEEKCCODEFN (COUNTP CHAR PCODE) EDITSMASH (L) CL::%ATAN-FLOAT ( -CL::X CL::CONSTANT-FLAG CL::ADD-FLAG CL::NEGATE-FLAG) OPENSTREAM (PARAMETERS FILE) EDIT.LO (X) -\\FORMATLINE (PC HARDCOPYMODE 1STLN GATHERBLANK NEWASCENT TABPENDING PREVDHYPH PREVHYPH T1SPACE -FORCEEND) CL:MAPLIST (CL::MORE-LISTS) \\TEDIT.FLUSH.UNUSED.LOOKS (FIRSTPC) XCL:COMPILE-FORM ( -COMPILER::*OUTSTANDING-LOOSE-FORMS*) \\DSPYPOSITION.PRESS (YPOSITION) CL:MAPL (CL::MORE-LISTS) -XCL:UNADVISE-FUNCTION (XCL::IN-FN XCL::ORIGINAL XCL::MIDDLE-MAN) SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE -(SEDIT::TARGET SEDIT::WRAP? SEDIT::START) CL:REPLACE (END1 END2) EDIT.LI (X) -CL::BOA-ARG-LIST-WITH-INITIAL-VALUES (CL::INTIAL-VALUE-FORM) IDLE.SET.OPTION (MINS GROUP OLD.OPTION) -DEBUGGER (BRKPOS XCL::DEBUGGER-WINDOW) DOUSERFNS (CHECKFORDON\'TFLG FNLST) SEDIT::SET-POINT-LIST ( -SEDIT::OFFSET SEDIT::DOTTED?) ONEDINSPECT.ADJUSTSELECTION (SELECTION) MAPC (MAPFN2) XCL:ADVISE-FUNCTION - (XCL::FORM XCL::IN-FN) EDITBELOW (DEPTH L0) CL:MAPCAN (CL::MORE-LISTS) SELECT.ATOM.ASPECT (ASPECTS -ALWAYSASKFLG OFFER-INSPECT-CODE?) MAPCAR (CL:MAPL MAPFN2) CURSORCREATE (MASK) -\\POSTSCRIPT.SPECIALOUTCHARFN (FAMILY) \\FTP.RECOGNIZEFILE (BESTVERSION) PRINTHISTORY1 (INPUT Y) -EDITSAVE1 (REPLACEFLG) CL:BIT-NOT (RESULT-BIT-ARRAY) \\CURSOR-VALID-P (SOFT?) TEDIT.LOOKS (SELORCH#) -EDIT.RO (X) CL:MAPCON (CL::MORE-LISTS) XCL:REBREAK-FUNCTION (XCL::IN-FN XCL::INFO) STKPOS (IPOS FLAG) -\\HANDLE.RAW.OTHER (RAWTYPE) TTYIN.PPTOFILE (PRINTFN) FILL/GRAPHNODE/LABEL (SHADE) -CL::%EVERY-MAP-OPTIMIZER (CL::INC-FN CL::CONSTANT-FN CL::CONSTANT-INC-FN) CL:MAPC (CL::MORE-LISTS) -CLISPATOM (TAIL NOFIX89) XCL:CREATE-TRACE-WINDOW (XCL::OPEN?) EDIT.BI (A) GRAPHOBJ.COPYBUTTONEVENTFN ( -CBEFN) EDITCALLERS (FILES ENV I PRINTFLG FNS OTHERSFILES) SAVEDEF1 (DF) DELFILE (FILE) -TEDIT.SELECTED.PIECES (PC PIECEMAPFN) RESET/NODE/LABELSHADE (STREAM) COPY-ARRAY (TO-ARRAY) -\\DELETEPIECE (NEXT PREV) \\CHTOPCNO (TREE) \\SEARCH.OUTPUTQ (PUP LOOKFORINTERRUPT LASTPUP) -\\GETFTPCONNECTION (TRYHARD UNWINDSAVE) COPY-VECTOR (END1 END2) TEDIT.FORMATBOX (LINE LAST-CHNO CHNO) -GETRELATION (INVERTED) CURSORPOSITION (NEWPOSITION) FM.CHANGELABEL (UPDATEFLG) CURSORSCREEN (XCOORD -YCOORD) \\MACINCCODEFN (COUNTP CHAR) LISPXSUBST (CHARFLG) BUILDGETRELQ (FORM) PRINTXIP (DOFILTER -PRE.NOTE) SEDIT::FIND-AND-DISPLAY-STRUCTURE-BACKWARDS (SEDIT::TARGET SEDIT::WRAP? SEDIT::END) MAPLIST -(CL:MAPL MAPFN2) INFILECOMSVAL (FLG) FILEBROWSER (ATTRIBUTES REGION FILESPEC) \\SPP.SEND.ENDREPLY ( -NOACK) TEDIT.DISPLAYTEXT (TERMSA) CL::%MAKE-FIXP-ACCESSOR (TYPE) TEDIT.UNPARSE.PAGEFORMAT (OLDRIGHT -SCALEFACTOR PX PY LEFT RIGHT TOP BOTTOM COLWIDTH INTERCOL) TTYINBUFFERPEEK (NOERRORFLG) ENDREAD? ( -ESCAPED) \\BITBLT.PRESS (CLIPPINGREGION) XCL:TRACE-FUNCTION (XCL::IN-FN) \\TEDIT.INSERT.PIECES ( -DONTDIRTY PC \#CHARS CROSSCOPY FIRSTPIECE COPYING) /ECHOCONTROL (MODE) NS.AUTHENTICATE (ADDR) -SEDIT::REPLACE-LIST (SEDIT::SUBNODES SEDIT::DOT-LIST? SEDIT::TRAILING-SUBNODES SEDIT::REDOT? -SEDIT::CONVERTED?) CL::%MAKE-FLOAT-ACCESSOR (TYPE) TEDIT.PUT.PCTB (PARALOOKSSEEN FORMATTINGLEVEL PC -FONTFILE PREVPC UNFORMATTED? FN EDITSTENTATIVE PREVFATP CACHE TRUEFILE SEPARATEFORMAT) -BRHC/INTERTREE/SPACE (BTC TTC) SOME (SOMEFN2) FORMAT-PLURAL (ATSIGN) RAIDCOMMAND (T4) TB.INSERT.ITEM ( -BEFOREITEM) \\FTP.PRINTPLIST (ISPASSWORD) SUBSET (RESULT MAPFN2) %MAKE-DISPLACED-ARRAY ( -DISPLACE-TO-READ-ONLY-P NEED-INDIRECTION-P ADJUSTABLE) CL::%MAKE-SMALL-FIXP-ACCESSOR (TYPE) BUFTAILP ( -START) \\BACKFORMAT (LINE1) MSPATHOPTIONS (FLG) HRULE.CREATE (WIDTH) CLISPERROR (FLG IN) -|PopUpWindowAndGetAtom| (CANDIDATE RESPONSE) TAILP (X) \\TYPE.FROM.FILETYPE (FILETYPE) INSPECT/HARRAYP - (PROPS) WALK-FORM-INTERNAL (XCL::WALK-NO-MORE-P XCL::MACROP) /SETSYNTAX (TABLE) \\TEDIT.FONTCOPY ( -NEWSPECS) \\MAIKO.DISPLAYLINE (HARDCOPYMODE TERMSA) SCANFILE0 (NXT) \\FTP.PACKFILENAME (DEVICEWANTED -NAMEBODY VERSION DIR DEVICE SERVERNAME PRESERVECASE) TB.MAP.ITEMS (ITEMS NULLFN) -INSPECT.INVERTSELECTION (SELECTION) FORMAT-NEWLINE (COLON ATSIGN) \\SENDSPP (IGNOREALLOC) -CL::%MAKE-WORD-ACCESSOR (TYPE) MAKEFN (ARGLIST) \\TAN.OLD (RADIANSFLG FLIPPED) VRULE.CREATE (WIDTH -HEIGHT) SPY.MERGE.CALLEES (DEPTH) \\DSPYPOSITION.HDCPYDISPLAY (YPOSITION) SEDIT::FIND-AND-DISPLAY-STRUCTURE - (SEDIT::TARGET SEDIT::WRAP? SEDIT::START) MAKECOM (VALS) BCOMPL3 (SCRATCHFILE CFILE) SMARTARGLIST ( -EXPLAINFLG DEF) \\TEDIT.HISTORYADD (OLDEVENT) FILING.CALL (ABSOLUTELY-NO-ERROR KEEPSTREAM) MSMSGPRINT -(MSG) EDITGETD-LAMBDA (ARGS DONE VALS) CL:ERROR (PRINTMSG) \\PEEKPUP (HOST NETHOST FILE) LOAD? (DATES -FILEPROP) DEFAULT.BACKGROUND.COPYFN (FORM) PUP.ECHOSERVER (ECHOWINDOW ISGOOD) RESET/NODE/BORDER ( -STREAM) SWAPPEDCOND (CTAIL) CHARACTER.PRINT (PNAME) FORMAT-EAT-WHITESPACE (NEXT-NON-WHITE) -CHECKIMPORTS (NOASKFLG) DELETEMENU (CLOSEFLG) TEDIT.SUBPARALOOKS (PC CHANGEMADE) -\\LEAF.TIMEDOUT.EXCESSIVE (PUP FIRSTTIME FULLNAME) \\IDLER (FROMTIMEOUT IDLE.PROCESS SAVEVM.TIMER -NO.ERROR EXIT? INTERRUPTED.STRING) CL::%MAKE-BIT-ACCESSOR (TYPE) INSPECT/DATATYPE (TYPE DEC SYSREC) -CHAT.LOGIN (NAME/PASS) NLAMBDA.ARGS (X) CHAT.TYPESCRIPT1 (FILE) XCL::WALK-TEMPLATE-HANDLE-REPEAT-1 ( -XCL::FORM XCL::REPEAT-TEMPLATE) \\COS.OLD (RADIANSFLG) SEARCH-FOR-EVENT-NUMBER (EVENTS) -\\NSRANDOM.UPDATE.VALIDATION (ERROR) COURIER.BROADCAST.CALL (MESSAGE NETHINT RESULT) RANDSET (X) -\\COURIER.BROADCAST.ON.NET (MESSAGE RESULT RESULTFN) \\SW2BM (PR QR) REBREAK (FNS) CL:NAME-CHAR (CODE) - FNTH (X) ADJUSTLINE (JUSTIFYING OVFL BREAK USECR NEXTLINE LINE) \\NSFILING.GDATE (DATE) -CL::%MAKE-FLAG-ACCESSOR (TYPE) UPDATE/MENU/IMAGE (SCREEN ANYSUBITEMS? TITLE MENUITEMS) UNIX-READ (CONN - NO-ERROR) IDATE (STR DEFAULTTIME CH SECONDS) TTDOTABS (TABS) ICMLARRAY (DISPLAYGROUP) -PFI.SORT.INDICES (RESULT) BREAK.MSG.INTO.LINES (LASTSPACE) FIXATOM (TAIL0) LISPXUSEC (LISPY LISPZ LINE -) YMAPLIST (PATH1) \\GENERIC.OPENP (FILENAME OPENFILES ACCESS) RAND (UPPER LOWER) COMP.LOOKUPVAR ( -FORVALUE) \\LOCATE.NSNET (DONTPROBE) LISPXUSE0 (VARS) \\DSPRIGHTMARGIN.HDCPYDISPLAY (XPOSITION) -FM.WHICHITEM (|POSorX|) \\LEAF.RESENDPUPS (PUPS) \\GENERIC.READP (FLG CHAR SHIFTEDCHARSET) CHAT.CLOSE -(CHATSTATE ACTIVE? CLOSING PROC) INFILECOM (X CFN) LOADCOMP? (LOADED FOUND) DO?CMD (SPTAIL) -MS-SMASH-PACKAGE (THING) \\TEDIT.SEL.CHANGED? (NEWSEL) DINFO.SPECIAL.UPDATE (NEW.NODE) -\\GENERIC.CHARSET (NEWVALUE) \\FTP.HANDLE.NO (LEAVEMARK DESTPLIST CPASS NOERRORFLG) -\\TEDIT.PUT.SINGLE.PARALOOKS2 (DEFAULTTAB TABSPECS) \\ATMOUT (ATOM) SEDIT::LINEARIZE-QUOTE (SEDIT::INDEX -) CLOSEF? (FL) REBINDP (EXP) CL::%MAKE-POINTER-ACCESSOR (TYPE) BSPPUTMARK (PUP) GETHASH (RETURNMVS -EQFN) INTCHECK (CHR) /REMPROP (X0) \\NSFILING.GETFILEINFO.FROM.PLIST (PLIST LENGTH CHNAME PROT) -PRINT-EVENT (INPUT Y RNT NOVALUES) \\SIN.OLD (RADIANSFLG) PFI.COMPUTE.INDEX.SHAPE (MAXINDEXNO) -\\BULK.DATA.CLOSE (SI::*OR-GENTEMP* ABORTFLG) LISPXUSE (LINE LST ARGS EXPR USE-ARGS) |\\VFMSmartBLT| ( -SI::*OR-GENTEMP*) CHNGNM (FLG DEF) FIX89TYPEIN (APPLYFLG) SUBST (EXPR) \\TEDIT.FIND.PROTECTED.START ( -PC) \\TEDIT.COMMAND.LOOP (LOOPFN CHARFN CH TERMSA) SEDIT::LINEARIZE-LIST (SEDIT::INLINE? SEDIT::SUBNODES - SEDIT::INDEX SEDIT::ALREADY-INDENTED? SEDIT::INFO CL:FIRST SEDIT::PREV-TYPE SEDIT::PREV-INLINE -SEDIT::SET-INDENT? SEDIT::BREAK?) CHANGECALLERS (REL FILES) CL:DIGIT-CHAR-P (VAL) MSSETSETTYPE (SET -TYPE) TEDIT.EXTEND.SEL (NSEL FIXUPNEEDED SETOSELFLG) \\BSP.GETNEXTBUFFER (NOERRORFLG) FIXSPELL2 (FLG) -ERRORX (ERXM) EDITBMBUTTONFN (COORDWIN) |\\SETUPTIMERmacrofn| (|TimerUnits| |IntervalUnits| -NOERRORCHKS) \\IBMPEEKCCODEFN (COUNTP CHAR PCODE) FILENAMEFROMID (|name|) \\DSPXPOSITION.HDCPYDISPLAY -(XPOSITION) FIND-HISTORY-EVENTS (AND-SPEC *EVENTS* ALL-P) \\TEXTCLOSEF (PC) /PUT-1 (X0) -\\TEDIT.REFRESH.SHOWSEL (EXTENDING) MOVD (DONTCOPY COPYFLG) U/L-CASE (CAPFLG NEEDADJUST) -|\\CanonicalizeTimerUnits| (CONVERTEDP) ODDP (CL::MODULUS) GETGRIDBOXREGION (OPPT) EDITMOVENODE (GRAPH - NOW NEAR) \\NSRANDOM.WROTE.HANDLE (NEWINFO ATTR) MAKECREATE1 (CKVALFLG USINGTYPE TEM NEEDACELL -SMASHFIELDS) WRITE (*PRINT-CIRCLE* THERE-ARE-CIRCLES) MAKEWITHINREGION (LIMITREGION) NEGC (X) -FNS.PUTDEF (DEFINITION) \\BSP.HANDLE.DATA (PREVPUP PUP) LISPXPRINTDEF (NODOFLG) %MAP-FOR-EFFECT ( -MORE-SEQUENCES) \\IFS.LOOKUPFILE (DIREND SEMI DOT IPUP) XCL::UNDOABLY-SETF-SYMBOL-FUNCTION ( -XCL::DEFINITION) BSPFORCEOUTPUT (PUP) LOADFROM (FNS) \\FTPERROR (ERRMSG) \\BSP.HANDLE.ACK ( -INTERRUPTPUP OLDPUP ADATACOUNT) FIXSPELL (FROMDWIM REL XWORD FN X GENFN GENERATOR L TIEFLG TAIL -DONTMOVETOPFLG) MOVD? (COPYFLG) READ-AFM-FILE (CCODE) \\LOAD-STREAM (LOAD-VERBOSE-STREAM FILE -LISPXHIST MANAGED-FILE-P FILEPKGFLG BUILDMAPFLG) ADDPROP (ATM X X0 FLG) %MAP-TO-SIMPLE (MORE-SEQUENCES -) CLISPFOR0 (LASTPTR I.S.OPR I.S.TYPE FOR FROM IN ON TO AS I.S. I.S.PTRS I.V. RETPREDS AFTERPREDS -TERMINATEFLG INITVARS MAKEPROGFLG FINALLY FIRST EACHTIME EXCEPTPREDS BY I.S.TYPE1 IVINITFLG DECLARELST -) FM.EDITITEM (CLEARFLG) HASDEF (SOURCE TM SYMBOL TEM SPELLFLG) TB.EXPANDFN (FIRSTCHANGEDITEM#) -%MAP-TO-LIST (MORE-SEQUENCES) SETUPTIMER (|intervalUnits|) CL::CACHE-SLOT-INFO (CL::FAST-ACCESSORS) -\\NULLDEVICE (NOERRORFLG) PRINT-ARGLIST (ARGS ACTUALS) LOAD (PACKAGE) PPSPPSTREAM (STREAM) -\\BOXFPLUSDIF (SUBTRACT) TEDIT.STREAMCHANGEDP (RESET?) \\10MB.TURNONETHER (NSHOSTNUMBER OUTINTERRUPT -ININTERRUPT) EQUALN (DEPTH) INITDATATYPENAMES (FINAL) \\SPP.SYSPKT (XIP) SPY.MERGETREE (RECURSIVE) -BSPOPENP (SOCKET TYPE) \\IBMINCCODEFN (COUNTP CHAR) |\\LFRenameFile| (|newPtr|) \\TEDIT.FIND.LAST.LINE - (LINE) HISTORY-NTH (LST) PACKAGE.NAME (RMPKG) TTCOMPLETEWORD (START CAUTIOUS FIRSTMATCH -MUST.BE.UNIQUE CH RETYPEBUF ESCAPED NEEDADJUST UNIQUE FIRSTMATCHCHARS) \\NSFILING.CLOSE.BULKSTREAM ( -STREAM) EDITV (VAR FRAME) TEDIT.UNDO.DELETION (NPC) ADDFILE0 (LOADTYPE FLG DAT) BRH/LAYOUT (DS) -SUBHASH (OV) %CML-TYPE-TO-TYPENUMBER (FATP) COMPILER::COMPILE-AND-DUMP (COMPILER::BD-LIST) FM.SHADE ( -REGION) TOPATTACHEDWINDOWS (RECURSIVE) \\TEDIT.FIND.PROTECTED.END (PC) PARAMETRICSPLINE (CLOSEDFLG) -PRINT-HISTORY (EVENT-SPECS) TEDITCHAT.MENUFN (STATE) TB.FLUSH.WINDOW (FN) COERCETEXTOBJ (PC -OUTPUTSTREAM) DO.CHAT.OPTION (MENU) RETDWIM (POS X APPLYFLG) |NewPrinter| (MEMBER? NEW-DEFAULT?) -DINFO.UPDATE.GRAPH.DISPLAY (FORCE?) STKNTH (IPOS CFLAG) \\DSPFONT.HDCPYDISPLAY (FONT FD) MAPRINT (PFN -SEP LEFT RIGHT) \\BSP.HANDLE.INTERRUPTREPLY (INTPUP) IMAGESTREAMP (STYPE) SEDIT::DELETE-QUOTE (SEDIT::END -) CREATE-UNIX-SOCKET-STREAM (CHAN) \\SPP.CHECK.INPUT.QUEUE (CURRENT) \\TEXTBIN (OPC PC NPC SUBSTREAM) -UNDOLISPX1 (FLG TEM DWIMCHANGES) FTPPRINTCODE (NOCODEP) CHAT.RESHAPEWINDOW (CHAT.STATE) ADDSPELL ( -SPLST) \\LEAF.GETFILEINFO.OPEN (BASE) STKSCAN (IPOS) TEDIT.REDO.INSERTION (OBJ NPC) /SETTOPVAL (ATM -VAL) DO-DISPATCH-MACRO (DISP-TABLE DISP-FUNCTION) ADDHASH (OV) MKLIST (X) \\MAKEFLOAT (NORMALIZE) -RETTO (FLG) COMPILER::ALPHA-IL-FUNCTION (COMPILER::CLOSE-P-FORM) COMPILER::CHECK-GLOBAL-CONSTANT ( -COMPILER::LOOKUP) \\NSFILING.RELEASE.BULKSTREAM (ABORT?) PSCFONTFROMCACHE.SPELLFILE (CACHE) NLIST (V) -\\TEXTBOUT (WINDOW) PROMPTCHAR (FLG HISTORY PROMPTSTR ID) DINFO.UPDATE.MENU.DISPLAY (WINDOW CHILDREN -SCROLLABLE) \\SETXFORM.PSC (NORESTORE) PUTFILEMAP (FILEMAP OLDENTRY ENV FCLOCATION FILCREATEDLST) -OPENIMAGESTREAM (FILE IMAGETYPE LPTNAME LPTP) \\FRAMESCAN (INTERPNT) PRINTCOPYRIGHT1 (SEMICOLON -PRIVATE) \\10MB.LOADINPUTQ (PACKETS) PFI.CENTER.PRINT (BOLDFLG) PRINTERNAME (PRINTER-SPEC) \\CML-LOAD -(PRINTFLG LOAD-VERBOSE-STREAM) PRINTCOPYRIGHT (OWNER) PRINTERTYPE (HOST) LISPXTERPRI (X NODOFLG) -UTOXCODE (X) LISPXPUT (LST ADDFLG) %PRINT-ARRAY-CONTENTS (ELIDED) XCL:SET-EXEC-TYPE (XCL::EXECA-FRAME) - \\NSFILING.ERRORHANDLER (PRINTFLG ID) CLISPCAR/CDR (LST SETQFLG TAILFLG) HASH-LEFTPAREN (INDEX) -SETSTKARG (NT) LISPXPRIN1 (Z Y X NODOFLG) \\TEDIT.PUT.SINGLE.PARALOOKS (DEFAULTTAB TABSPECS) -STKARGNAME (NT) \\CURVE2 (USERFN BBT SI::*OR-GENTEMP* SOFTCURSORUP) COURIER.READ.BULKDATA ( -LASTSEGMENT?) ROOTFILENAME (COMPFLG) FILECREATED (FILE) \\TEDIT2 (UNSPAWNED) SETSTKARGNAME (NT) EDITE -(EXPR) DINFO.UPDATE.TEXT.DISPLAY (OFF? FILENAME) HARDCOPYSTREAMTYPE (STREAM) ADDFILE (FCLST LOADTYPE) -READLINE (LINE SPACEFLG LISPXFLG START) \\NSFILING.HOSTNAMEP (SERVER) CREATEMENUEDWINDOW (LOCATION -WINDOWTITLE VERTFLG WINDOWSPEC) MAXATTACHEDWINDOWEXTENT (ATWS EXTENT) TEDIT.FIND.OBJECT (PC) TTNLEFT ( -X) FIND.SYMBOL (INDEX DONE TABLE) FB.SORT.VERSIONS (NEXTTAIL PREVTAIL) PFI.PRINT.INDICES (INDICES -FREECHOICE) LISPX/1 (X TAILFLG TEM3) TESTRELATION (ITEM2 INVERTED) SPY.MAX (COUNTP) -\\TEDIT.STRIKEOUT.CARET.OFF (LOOKS) \\LEAF.REPAIR.BROKEN.PUP (STREAM) \\LEAF.STRIP.QUOTES (TAIL) -|\\LFGetFileName| (|fileSpec|) BKSYSBUF.GENERAL (OBJECT) GETSETQ (TL VARSPLST OKFNS) GATHEREXPORTS ( -ENV) XTOUCODE (X) /DECLAREDATATYPE (TYPENAME) COMP.STTAG (NLV NF) CHAT.TAKE.INPUT1 (FILE) -TTYIN.BALANCE (ERRORFLG) FILEDATE (FILE OLDPTR) TEDIT.FIND.OBJECT.SUBTREE (PCTB) -GET-NEXT-HISTORY-EVENT (FIRST-ONLY HISTORY) DECLAREDATATYPE (SUPERTYPE FIELDSPECS DLIST LENGTH -TYPENAME) \\POLYSHADE.BLT (|currlist| |fulllist|) LISPXPRINT (Z Y X NODOFLG) /PUT (ATM X X0) -DINFO.UPDATE.HISTORY (SEL NODE NEWITEM OLDWINDOW DISPLAY? ITEMS) ONEDINSPECTW.CREATE (REGION) -ENUM-STRING (DECPLACES EXPWIDTH) MB.CREATE.NWAYBUTTON (MAXITEMS/LINE) CLISPATOMARE2 (Z X1) -SIZE/GRAPH/WINDOW (WINDOW CENTERFLG TOPJUSTIFYFLG) COMPILE.FILE.RESET (COMPILED.FILE SOURCEFILE) -\\COMMONBACKCHARFN (COUNTP COUNT) RECEVAL (FORM) \\CONVERTNUMBER (RDTBL SIGN DIDQ COMMONLISPY) -EDITLOADFNS? (FN DATES ASKFLG STR) COMP.STJUMP (TAG F NV V) BSP.PUTINTERRUPT (TIMEOUT) PRETTYPRINT3 ( -PRETTYDEFLG) COPY.WINDOW.TO.BITMAP (SOFTCURSORUP SI::*OR-GENTEMP*) RESETBUFS ($$BUFS) -XCL::SHOW-CLOSURE-CACHE (XCL::LONG-P) PARSE-NAMESTRING1 (FILE HOSTP BEYONDNAME SUBDIREND CODE DIRFLG) -BOOTSTRAP-NAMEFIELD (SUFFIXFLG) \\FILLINSPP (CCONTROL DSTYPE) CL:VECTOR-PUSH-EXTEND (NEW-INDEX) -\\TEDIT.STRIKEOUT.CARET.ON (LOOKS) \\REUSETO (FLG) |GetImageFile| (PRINTFILETYPE) DECLARE\:1 (EVALFLG) - INSURE.DASHING (DASHING NOERRORFLG) FNUM-STRING (DECPLACES) PARSERELATION1 (TAIL) COMPILE-IN-CORE ( -PRINTLAP NOREDEFINE NOSAVE) PPSPP (DETAILS) \\TEDIT.UNDERLINE.CARET.OFF (LOOKS) SEDIT::BACKSPACE-QUOTE - (SEDIT::INDEX) \\ADDLEAFSTRING (STRING DECODE) |\\LFSetFileInfo| (|value|) LINELENGTH (N) UNSAVED1 ( -TYP) HASH-R (PARAM) ATAN (Y.NEGP X.NEGP RADIANSFLG) BLTPATTERN.GENERIC (SW SH) FM.RESETSHAPE ( -ALWAYSFLG) HASH-STAR (PARAM) STKNARGS (INCLUDEPVARS) HASH-BACKSLASH (PARAM) FLTSTR (K) -COMPILE.FILE.APPLY (FORCE-OUTPUT-P DEFER) MINATTACHEDWINDOWEXTENT (ATWS) TEDIT.EDIT.OBJECT (OBJ CH# -EDITFN) COMPILER::RESOLVE-VARIABLE-REFERENCE (COMPILER::SETQ-P) GLC (CODE) CLISPCAR/CDR2 (NODE) -TYPE-VARIABLE-FROM-TYPE-NAME (CLAUSE) TRANSLATE.DATATYPE (TYPENAME) SI::CANONICALIZE-ADVICE-WHEN-SPEC -(SI::SPEC) \\NSFILING.DIRECTORYNAMEP (CREATE?) \\TEDIT.PAPERWIDTH (LANDSCAPE?) FORMAT-DO-ITERATION ( -ATSIGN) INSTALLBRUSH (OLDENTRY BRUSHARRAY BRUSHFN) ALLOCHASH (SIZE FLAG HASHTABLENAME) DOWINDOWCOM ( -WINDOW) TB.PROCESS (ALLOWLOGOUT) POSTEDITALISTS (FOUNDCHANGE) FM.RESETGROUPS (REDISPLAYFLG) -TERM.PRINTCHAR (WRAPFN) ARCTAN2 (RADIANSFLG) ADDSPELL1 (SPLST L2 L3 N M) \\GOOD.DASHLST (DASHLST -NOWOFF) \\TEDIT.UNDERLINE.CARET.ON (LOOKS) \\LEAF.USE.NEW.CONNECTION (UNSENTPUPS AFFECTEDFILES -RESENDPUPS) \\PARSE.REMOTE.FILENAME (QUOTEP NOERROR HOST DEV DIR EXT VERSION) GETPROMPTWINDOW ( -DONTCREATE FONT \#LINES PWINDOWPROP PAGEFULLFN) EVENTS-INPUT (TAIL) OLD.FIND.SYMBOL (FATP NONNUMERICP -FATCHARSEENP) CLISPATOM1 (L TYP LST0 BRACKET OPRFLAG BROADSCOPE TAIL Y NOTFLG BACKUPFLG TENTATIVE) -SI::CANONICALIZE-ADVICE-SYMBOL (SI::IN-POS) \\TEDIT.PAPERHEIGHT (LANDSCAPE?) FB.DELVERCOMMAND ( -NVERSIONS) \\NSFILING.GET.STREAM (STREAMPAIR KEEPSTREAM) TWODINSPECTW.CREATE (REGION) -COMPILEDREPLACEFIELD (FASTFLG TYPENAME) DISPLAYP (STRM) RPLCHARCODE (FATPA1773) EDITGRAPH2 (VAL) -MENUWINDOW (VERTFLG) GET-ENVIRONMENT-AND-FILEMAP (MAPENTRY MAP) \\UFS.UNREGISTER.GFS (NOTICETOCP) -DO-HISTORY-SEARCH (PRED-P PAT1 VALUE-P) \\CURVESLOPE (ENDFLG) PRETTYPRINT (FILEFLG NEWADRLST -PRETTYDEFLG DEF FN) HASH-EQUAL (PARAM) GETXIP (EPKT WAIT TIMER) SEDIT::CREATE-COMMENT-WORD-NODES ( -SEDIT::OK?) CLISPTRAN (TRAN) TTECHO.TO.FILE (DRIBBLING FIRSTIME LINE) PORTSTRING (SOCKET) -CLISPCAR/CDR1 (SETQFLG TAILFLG) PROPS.WHENCHANGED (PROPTYPE) EXTTOINT (ROUNDFLAG) \\CHECKSUM (INITSUM) - PRINTDATE (ROOTNAME) \\10MB.INPUT.INTERRUPT (PACKET) PFI.PREVIEW.DECLARE (STARTOFLINE) DRAWDASHEDLINE - (DASHON DASHTAIL) \\MAIKO.PUNTBLTCHAR (SOFTCURSORUP SI::*OR-GENTEMP*) MAKEHARDCOPYSTREAM ( -DISPLAYSTREAM) COMPILEDFETCHFIELD (FASTFLG) SPY.UPDATE.TITLE (NODE) \\TEDIT.SUPERSCRIPT.CARET (LOOKS) -\\LEAF.READFILENAME (NAMEBASE REMOTENAME) LOCAL-SYMBOL-FUNCTION (ENV) FILECHANGES (FILE TYPE FNS) -PRINTFNS (X PRETTYDEFLG FNADRLST) PRETTYDEF (REPRINTFNS SOURCEFILE SOURCEFILENV OLDFILEMAP -DESTINATIONENV) CLISPATOMIS1 (NEGATE) LOOKUP-ENVIRONMENT-AND-FILEMAP (ROOTNAMEP MAPENTRY) SEDIT::CFV-LIST - (SEDIT::SUBNODES FIRST SEDIT::BREAK? SEDIT::SUB-IWIDTH SEDIT::IWIDTH) \\FILEMAP-HASHOVERFLOW ( -ONFILELST) SCALEPAGEXUNITS (VALUE) FORMAT-CONDITION (COLON ATSIGN) \\TEDIT.PARSE.CHARLOOKS.LIST ( -FAMILY FONT WEIGHT SLOPE EXPANSION FACE SIZE OLOOKS SIZEINC PROT SELHERE ULINE OLINE STRIKE INVISIBLE -INVERSEVIDEO SUPER SUB STYLESET UISET OFFSETINC) \\CH.PRINT.BLURB (DOMAIN) CHECKFORCHANGED (NOTTHISONE - UPDATEALL) \\COPYDATATYPE (PTRS) |\\UFSDirectoryNameP| (DIRECTORY) |\\LFOpenFile| (OLDSTREAM IDATE -STREAM) PRETTYCOM (PRTTYCOM PRTTYFLG PRETTYCOMSTAIL PRTTYSPELLFLG) LOCAL-MACRO-FUNCTION (ENV) -CL:MACROEXPAND (CL::FLAG) |\\UFSOpenFile| (CASE.CORRECT.NAME OLDSTREAM STRM) CHAT.TYPESCRIPT (PROC) -LISTRECORDEFS (FORMAT) DSPCLIPPINGREGION (REGION STREAM) CL:COMPILE-FILE (COMPILER::*FASL-HANDLE* -COMPILER::PATH COMPILER::OUTPUT-FILE COMPILER::ERRORS-TO-TERMINAL COMPILER::ERROR-FILE-STREAM) -SEDIT::BACKSPACE-LIST (SEDIT::INDEX) PRINTDATE1 (CHANGES PREVDATE PREVERS) READVISE1 (OLD-ADVICE) -|\\UFSSetFileInfo| (FILENAME) SCALEPAGEYUNITS (VALUE) CL:LOG (CL::BASE) \\TEDIT.PARSE.PARALOOKS.LIST ( -TABSPECC OLDLOOKS 1STLEFT LEFT RIGHT LEADB LEADA LLEAD QUADD TYPESET SUBTYPESET NEWBEFORESET -NEWAFTERSET HEADINGKEEP KEEPSET BASESET REVISEDSET COLUMNSET SPECXSET SPECYSET STYLESET CHARSTYLESSET -USERINFOSET) HARDCOPY.SOMEHOW (HARDCOPYFN) DINFO.SETUP.WINDOW (NO.FREEMENU?) ICMLARRAY.VALUECOMMANDFN -(VALUE) CL:MAKE-ARRAY (FILL-POINTER ADJUSTABLE EXTENDABLE READ-ONLY-P DISPLACED-TO-BASE) -POSTSCRIPT.PUTBITMAPBYTES (DELIMFLG) CL:MACROEXPAND-1 (CL::DEF) UNDOSET (PTR) WALK-FORM (XCL::*WALK-COPY* -) MB.THREESTATE.SHOWSELFN (ON) \\TEDIT.ITALIC.CARET.ON (LOOKS) |\\LFGenerateFiles| (A0417 STR) -|\\UFSRenameFile| (FILE OLDUNIXNAME) \\GETPRESSFONTNAMES (XFACECODE) \\NSRANDOM.PREPARE.CACHE (CACHE -FREETAIL) \\SPPWATCHER (ACTIVITY) ADDNAKEDCHAR (NOAUTOFILL) OPT.CHECKTAG (TAGFLAG) ARCTAN (FLIPPED -RADIANSFLG) SCALEBM (TEMPBM) |\\UFSCloseFile| (UNIXNAME) MSCHECKEMPTY (CF) \\PARSE.PORTCONSTANT (VAL -NET HOST) TEDIT.INCLUDE (NFILE SAFE) |\\UFSGetFileInfo| (FILENAME) FM.CHANGESTATE (NEWSTATE OLDSTATE) -GRAPHDELETENODE (DELFN) BLTPATTERN (SW SH OPER TEMPBM) \\FM.EDIT-DELETE (INFINITEWIDTH MOVEDOFF) -\\FTP.UNPACKFILENAME (HOST EXT DIR DEVICE NOLOGIN) CLISPLOOKUP (CLASSDEF) TEDIT.GET (OFILE GETFN -MENUSTREAM) POSTEDITPROPS (FOUNDCHANGE) \\NSFILING.EVENTFN (RANDEVICE) PRINTDEF1 (FORMFLG STARTPOS) -SUBPAIR (FLG OLD) CLISPATOM2D (X) \\NSRANDOM.FETCH.CACHE (CACHE KEEP) \\MEDW.CARET.SHOW ( -UNLESSOCCLUDED) TTDELETECHAR (DODELETE) \\BN.COMPAREN (U V) DMCHAT.NEWLINE (EXPLICIT) \\TAN-FLOAT ( -RECIPFLG) \\10MB.OUTPUT.INTERRUPT (NEXTPACKET IOCB) FM.GETITEM (GROUP) FIXPRINTIN (FN FLG) -DIRPRINTNAME (DIFFERENT DIRECTORYEND FLG) PRETTYVAR (VAL) |\\UFSDeleteFile| (NAME) LVLPRIN (TAIL) -MB.THREESTATEBUTTON.FN (STATECHANGEFN) \\TEDIT.SUBSCRIPT.CARET (LOOKS) ASKUSERCHAR (C2) -COMPILE.CHECK.ARGTYPE (VAL) \\ITEMW.SELECTITEM (ITEM) PRETTYVAR1 (TAILFLG) SI::ADVICE-ADDTOCOM (SI::NEAR -) |\\UFSError| (DEV) \\BN.INTEGERLENGTH (X) WHO-LINE-WHAT-IS-RUNNING (POS) SUPERPRINTEQ (Y) -TRANSLATE.LOCF (INDEXONLY) \\GTREADTABLE1 (FLG) \\INITBFS (AFTER) TB.MAP.SELECTED.ITEMS (NULLFN) -\\UFS.ADD.HOST.FIELD (NAME) \\BN.LOGANDC2 (B1 B2 B) TAN (RADIANSFLG) LVLPRIN0 (CDRLVL0 CARLVL CDRLVL) -MAKEDEFLIST (FLG) \\CURVEEND (SOFTCURSORUP SI::*OR-GENTEMP*) GETSYNTAX (A) PRINTPARA (LMARG PARENFLAG) - \\UFS.REMOVE.HOST.FIELD (RELATIVEDIRECTORY DIRECTORY DEVICE) \\BN.LOGXOR (B1 B2) SEDIT::ASSIGN-FORMAT-LIST - (SEDIT::SUBNODES) \\BN.LOGAND (B1 B2 B) \\FM.EDIT-GETPOINTERINFO (PTR) \\SPP.SENDPKT (RETRANSMITP) -TEDIT.BUILD.PCTB (TEXTOBJ START END CACHE? PCCOUNT CLEARGET? PC OLDPC DEFAULTLOOKS TEXT) -D-ASSEM::DCODE-FROM-DLAMBDA (D-ASSEM::EASY-ENTRY) PRETTYCOM1 (PRTYFLG REMOVECOMMENTS) -WHO-LINE-TTY-STATE (PROC) PTON10GRID (MOVINGPT) WINDOWWORLD (ONOFF MAINFLG) \\BN.TIMES2 (U V U1) ADDTO - (FLG) \\BN.LOGOR (B1 B2) POSTSCRIPT.SHOWACCUM (KERN) DSPSPACEFACTOR (FACTOR) ASKUSER1 (TEM) -\\RECODECCODE (CSMAP) LISTFILES (FILES FULLNAME) \\10MBWATCHER (PACKET) PFI.HANDLE.* (NSEMIS) -\\BN.FLOAT (X) \\BN.FROM.FIXP (U) \\BLTSHADE.GENERICPRINTER (CLIPPINGREGION) FB.UPDATE.COUNTERS (LAB) -\\M44ACTONVMEMFILE (WRITEFLG) CHECKRECORDNAME (OKSTRUCDIFF NEEDSNAME 3MUSTLISTP) -CL::PS-NAME-SLOT-POSITION (CL::INCLUDE) INSPECTW.SELECTITEM (PREVIOUS PROPERTY VALUEFLG) -\\REMOVE-DECLS (CL::BODY CL::SPECIALS) PRINTARRAY-TO-LIST (DOUBLEFLG FLG) \\BN.2TH (A) TTYINENTRYFN ( -STATE) \\GETFILINGCONNECTION (OLDSTREAM SESSION NOLOCK) \\LOOKUPPORT (NAME IPUP) \\BN.DIVIDE (A B V Q -L1) FIXDATUM (TEM) SI::ADVISE-CONTENTS (SI::NAME) \\TEDIT.CARETLOOKS.VERIFY (CARETFN LOOKS) -D-ASSEM::DIGEST-FUNCTION (D-ASSEM::EASY-ENTRY) \\NSRANDOM.RELEASE.HANDLE (HANDLE SESSION) \\BN.MINUS ( -U) CLISPBROADSCOPE1 (FLG) \\NSRANDOM.READ.SEGMENT (EXTRABUFFERS ERROR ATTR) SUBLIS (FLG Y) MAKEFILE1 ( -REDEFINE? FORGET-EXPRS? GROUP RECOMPFLG) SEDIT::SIMPLE-STRING-SCAN (SEDIT::POINT?) MOVETOFILE ( -FROMFILE) \\NSFILING.DISCARD.SESSION (KEEPSTREAM KEPT) SKIP/ZAP (MINUS) SCROLL.HANDLER (TIMEIN BUTTON -CONTINUOUSSCROLL?) MKCONS (CDRPART) \\TRANSLATE-CL\:LAMBDA (SVAR MAX SIMPLEP) \\ALLOCMINIMUMSIZES ( -ATWSINFO) \\NSFILING.CLOSEFILE (ABORTFLG HANDLE NEWHANDLE) UNDOLISPX3 (L) SHOWDEF (FILE) \\BN.TO.FIXP -(X) CLISPATOM2A (TAIL DWIMIFYING) \\UFS.FULLNAME (NAME ATOMP) OPENNSOCKET (ID#EXPLICIT? CLASHP) -TYPESOF (FILTER NOTFOUND) D-ASSEM::INSTALL-VAR (D-ASSEM::VAR) MSINTERPRET (SETTYPE MSPRED UPDATEALL -FROMFOUND INVERTED) RECORDERROR (IN AT CDRFLG) \\DOCOMPRESSVMEM (OLDVIW) TRIM.BITMAP (LEFT RIGHT -BOTTOM) UNIX.SENDSCREENPARAMS (CONN ASK) |\\LFFindNextFile| (ANOTHERENTRY FILTER) D-ASSEM::INSTALL-LOCAL - (D-ASSEM::VAR) ARCCOS (RADIANSFLG) \\GTTERMTABLE (TTBL FLG) CHAT.TYPEOUT (TERM.STATE CRPENDING) -CLISPBROADSCOPE (L) \\NSRANDOM.CHECK.CACHE (CACHE CHECKORDER EMPTY) D-ASSEM::INTERN-VAR (D-ASSEM::DVAR -) \\TEDIT.GET.INSERT.CHARLOOKS (PIECE) \\NSFILING.LOGIN (STREAM NEEDLOGIN SESSIONHANDLE PROBLEM -OLDPROBLEM) \\MEDW.GETSCREENREGION (INITCORNERS INITREGION NOTTIMEDOUT DOWNFLG) MSPRGLAMBDA (ARGS -KEYS? KEYLIST OLDTEMP) \\BN.PLUS2 (U V) FTP.BREAKCONNECTION (IDLEONLY) \\TRANSMIT.STRATEGY (MAKEA?) -|\\LFParseFileName| (DIRECTORY ENDVOLNAME STR) CHANGEFONT (FONTCLASS) CONTROL (MODE) -CHAT.SETDISPLAYTYPE (FN) DINFO.GET.FILENAME (FILE) OPT.JLENPASS (X) COPYATOM (PKG) ARCSIN (REDUCED -NEGP RADIANSFLG) CH.RETRIEVE.MEMBERS (PROPERTY) D-ASSEM::GENERATE-ARG-CHECK (D-ASSEM::MAX-ARGS) ONFILE - (FNSONLY FINDITEMS VAL FILES) RECORDECLTAIL (NAME TL RUNTIMEDECL) PRINTARRAY (DOUBLEFLG) DWIMIFYREC ( -DWIMTAIL INDECL) MAKEFILE (FILEDATES SOURCEFILE) \\LEAF.GETFILEDATES (INFOBLK FLG) TEDIT.SHOWSEL (SEL) - \\UFS.HANDLE.RELATIVEDIRECTORY (DIR) LOOKUP.NS.SERVER (TYPE FULLFLG) SUPERPRINT (MACRO) -\\TEDIT.PARABOUNDS (PIECE) MAKEUSERMACROSCOMS (X) \\LEAF.HANDLE.INPUT (DONEPUP ERROR) -|\\PFEnsureInitialized| (FORCEINITIALIZATION) DELETECONTROL (MESSAGE) FLENGTH (Y) \\BN.IGNN (U) -DINFO.OPENTEXTSTREAM (TEXTSTREAM) SHEDSCAN (TAIL) FITP (TAILFLG) DMCHAT.CLEAR (SETROLL) \\SIN-FLOAT ( -COS-FLAG) \\BN.SIGN (U) SETTAIL? (EVEN.IF.NOT.THERE) BESTPUPADDRESS (ERRORSTREAM BESTPORT NOTLOOKEDUP) - \\MEDW.GETBOXSCREENPOSITION (PROMPTMSG MOUSEDOWNFLG WINDOW) \\BN.QRS (B D) TEDITMENU.STREAM (MENUW) -\\8859PEEKCCODEFN (COUNTP CHAR PCODE) TEDIT.INSERT.OBJECT (CH# PREVPC) ASKUSER$ (KEY0 NC0 TEM) -\\BUILD.EXPEDITED.XIP (ARGLIST) SET-PROFILE-INTERACTIVELY (PROFILE) RECORDECL1 (CL TAIL) -CL::PROCESS-TYPE (CL::PREDICATE) \\ITEMW.CLEARSELECTION (CURRENTITEM) \\INSPECTW.REDISPLAYPROP ( -ITEMSELECTED?) UNIX.SETDISPLAYTYPE (NAME ASK OLDTYPE WINDOW) TB.CONSIDERRANGE (EVENIFDELETED) -DELETELINE (NEXTLINE EMPTYLINE?) DISPLAY/NUMBER/READER/TOTAL (DECIMALPLACES STR) BIGNUM.DEFPRINT (ELS) - GETFILEPKGTYPE (NAME NOERROR) |\\VFMDelete| (|firstFlag| |lastFlag|) \\TEDIT.BASICFIND (CH# FOUND) -INSURE.BRUSH (BRUSH NOERRORFLG) \\BN.TH2D (A RESULT) ECHOCHAR (MODE) \\TEDIT.WINDOW.SETUP (AFTERWINDOW -) CONVEXP (PATH) \\MEDW.GETSCREENPOSITION (WINDOW) \\BN.ISUM0 (V) MSPRGTEMPLATE1 (X ALLOW-OTHER-KEYS -KEYSUSED?) IMPORTEVAL (RETURNFLG) \\8859INCCODEFN (COUNTP CHAR) CLISPATOM1A (ENDTAIL BRACKET OPRFLAG -BROADSCOPE) DINFO.SHOWSEL (CHAR#) \\TEDIT.FIND.FIRST.LINE (WINDOW) SEDIT::SET-POINT-COMMENT (SEDIT::INDEX - SEDIT::OFFSET) ECHOMODE (FLG) TEDIT.MINIMAL.WINDOW.SETUP (AFTERWINDOW WINDOW LINES) ETHERPORT ( -ERRORFLG MULTFLG) CLISPATOM2 (UNARYFLG TEM PARENT NEGFLG LISPFN Z VAR2) MBUTTON.SET.FIELD (PCNO -FIELD.SEL) \\ARBOUT (ITEM) RECORDECL (ALLOCATIONS) \\BN.ISUM1 (V) \\TEST.PARAGRAPH.LOOKS (NONEMPTY) -/ATTACH (LST) \\BSP.SENDBUFFER (DEMANDINGLY) \\CIRCSHADE.BLT (OPERATION) RAISE (FLG) -\\COERCE.NS.SOCKET (ADDR DEFAULTSOCKET) \\SPP.DEFAULT.ERRORHANDLER (CON) \\LEAF.FIX.BROKEN.SEQUIN (PUP - UNANSWEREDPUPS AFFECTEDFILES) \\FTP.GENERATEFILES (EXTENSION VERSION DIRECTORY WANTDEVICE DEVICE -FILTERNEEDED RESULT) DINFO.FMW.CLOSEFN (GRAPH) \\INSURESCREEN (SCREEN) \\CARET.FLASH.AGAIN (OCARET -CARET OC) /LISPXPUT (LST ADDFLG) /RPLACA (LST Y) \\BN.D2TH (U) /RADIX (N) /DSUBST (OLD) -\\UFS.NEXTFILEFN (SUBGEN FILENAME NAME ATOMP NAMEONLY) \\TEST.CHARACTER.LOOKS (PROPERTY VALFLAG) -WINDOWADDPROP (CURRENT FIRSTFLG) LISPXTAB (Z Y X NODOFLG) HVBAKREAD (BKRF) |\\VFMInsert| (|splitFlag|) - /RPLACD (LST Y) \\FTP.ADD.QUOTES (PIECES) CHAT.SET.EMULATOR (NEWEMULATOR) CHAT.MENU (STATE) -\\ITEMW.DESELECTITEM (ITEM) \\DSPXPOSITION.PSC (XPOSITION) \\INTERPRET-ARGUMENTS (\\ARGLIST) -SI::ADVICE-GETDEF (SI::ADVICE) XCL::WHERE-IS-FILES (PATHNAME) FB.SUBITEMP (SUB) \\BN.MADD (TT) -MSPRGRECORD (Z OF?) CLISPRECORD (SETQFLG FIELD DECLST) \\FTP.CLOSEFILE (SUCCESS CONN) INTERLISPMODE ( -OLD?) COMPILE-FILE-SCAN-FIRST (FORCE-OUTPUT-P) COMP.GETBASE (STFLG) COPY-CIRCLE (BODY) TREEGRAPHNODE ( -PARENT) SEDIT::PARSE-STRING-INTO-WORDS (SEDIT::OK?) GETSCREENPOSITION (WINDOW) MSLISTSET (TRYHARD) -WHILEDOUNTIL (FX DO) RESETREADTABLE (RDEFS FDEFS) \\TOTALPROPOSEDSIZE (ATWSINFO) I.S.OPR (FORM OTHERS -EVALFLG NEWFLG) ETHERHOSTNUMBER (NAME) WHILEDO1 (X) FILEGETDEF.FNS (MAP) RESETUNDO (X STOPFLG) -READ/NODE (NOW NEAR) \\TEDIT.APPLY.STYLES (STYLE IN-PARA) GENERATOR (COMVAR##) CLBINARYMINUS? ( -MINUSTAIL) CLUNARYMINUS? (OPRFLAG) |\\LFVersions| (FIXEDVERSION HMIN) CL:LOAD (IF-DOES-NOT-EXIST -*LOAD-VERBOSE*) MSBINDVAR (VAR) RECLISPLOOKUP (DECS) LISPX (LISPXXMACROS LISPXXUSERFN LISPXX -LISPXLISTFLG LISPXLINE DONTSAVEFLG LISPY LISPXVALUES LISPXHIST LISPZ LISPXTEM LISPXFLG) -\\LEAF.TIMEDOUT (TRIES) COMPILE-FILE-EXPRESSION (LOAD.SPECIFIED COMPILE.SPECIFIED COMPILE.TIME.TOO -EVAL.SPECIFIED PROP) \\LEAF.RECONNECT (OLDONLY) INSPECTW.PROPERTIES (PROPERTIES) \\DSPYPOSITION.PSC ( -YPOSITION) POSTSCRIPT.BITMAPSCALE (PPL) CREATE-SHELL-STREAM (CHAN) COMPILE (FLG) LISPXUNREAD (EVENT) -\\SUBREAD (TOPLEVELP EOF-SUPPRESS CHAR ESCFLG CASEBASE EOF-POSSIBILITY INVALIDFLG EXTRASEGMENTS -PACKAGE ESCAPEFLG NCOLONS AT-EOF LST PRESERVE-WHITESPACE SHIFTEDCHARSET DOTLOC ELT) DIRECTORY.MATCH1 ( -PATTERN) CHECK-KEYWORDS (BADKEYWORD) BREAKDOWN (DEF FNS) LOWERCASE (FLG) \\BN.TH2B (U) PEEKCCODE (CHAR -) FILEPKGCOM (TEM) |\\UFSParse-Directory| (DIRECTORY) \\RTP.FILTER (CHECKFRNPORT CHECKID) -\\UFS.PARSE.BODY (TYPE VERSION) LISPX/ (FN) \\TOP-LEVEL-READ (EOF-SUPPRESS CHAR *CIRCLE-READ-LIST*) -\\ALLOCATE.ETHERPACKET (PACKET) PARSE-NSADDRESS (VAL NET NSHOST PREV10 HOST) READC (CHAR) -READTABLEPROP (NEWVALUEP OLDNAME NEWVALUE) ADDCHAR (ENDP) \\TEDIT.SMALLER.CARET (LOOKS) \\TRANSFERPAGE - (WRITE? NEWPAGE?) UNIX-WRITE (LENGTH-WRITTEN) \\PUT.FILING.ATTRIBUTE (VALUETYPE) SEPRCASE (CLFLG) -SKIPSEPRCODES (CHAR PREVC) \\FLUSHPAGE (FROMFLUSHVM) SKIPSEPRS (CHAR) ADVISEWDS (OLDREG MOVEONLYFLG) -CHDIR (PATH) CIRCLAR-COPYER (BODY) TEDIT.WINDOW.SETUP (PROP) \\RTP.HANDLE.PUP (PUP) EXCHANGEPUPS ( -IDFILTER) CLISPIFYLOOKUP (CLASS) DECLARED-SPECIAL (DECLS) TEDIT.FORMATTEDFILEP (PC PREVPC TENTATIVE) -CLEAR.LINE? (FLG) SKREAD (REREADSTRING \\RBFLG) \\DSPFONT.PSC (FONT) \\NSFILING.DESERIALIZE1 (CLOSEFN) - CLISPATOM0 (LISPXHIST 89FLG TEM) SI::INSERT-ADVICE-FORM (SI::ENTRY-LIST) SCALEDBITBLT (CLIPPINGREGION -) SEDIT::LINEARIZE-COMMENT (SEDIT::INDEX FIRST) BLTMENUIMAGE (DONTOPEN) PFI.HANDLE.DECLARE (TAIL -STARTOFLINE) MSGETBLOCKDEC (FNSET) SI::NAMED-FUNCTION-WRAPPER-INFO (SI::NAME) RPTPUT (FLAG) -\\SELECTREALPAGE (LOCK? SI::*OR-GENTEMP* NEWFP) TRYNEXT1 (PLST##) \\DRAWPOLYGON.GENERIC (POINTS CLOSED -) CL:READ (RECURSIVE-P EOF-ERROR-P) UTF16BE.PEEKCCODEFN (BYTE1 BYTE2 COUNTP RAW X NOERROR) CHAT (HOST -FROMMENU HOSTS WINDOW SUCCESS) SETFONT (FONT) ERRORMESS1 (MESS1 MESS2) TERM.RESET.DISPLAY.PARMS ( -CLEARMODEFN) CL:READ-PRESERVING-WHITESPACE (RECURSIVEP EOF-ERRORP) CL:READ-DELIMITED-LIST (RECURSIVE-P - ENDCODE) \\DSPLEFTMARGIN.PSC (XPOSITION) COMP.MAP (CARFLG BYF WHILEF COLLECT PRED NEG) COMP.PROGN ( -FLG) \\TEDIT.PIECE-CHNO (PCNODE) \\NSFILING.DESERIALIZE (PARSE) \\RTP.CLEANUP (FN) \\MKINTEGER (FATP -NEG) MSPRGE (EXPR CLISP TEM) SHRKFY (STAGEFLAG CDRLOOKAT CARLOOKAT FIRSTARGFLG CDARLOOKAT CDDARLOOKAT -RESULTQ CARSAFEFLAG APPSINGFLG RESULTR) SCANBACK (N) STOPSCAN? (CLTYP2 CLTYP1 OPRFLAG) -PUPSOCKETFROMNUMBER (SOCHI) SI::COMPILED-FUNCTION-ARGLIST (SI::DEBUGGING-INFO SI::INTERLISP?) -\\READTABLEP.DEFPRINT (NAME) |\\PFFreeDiskPages| (|recompute|) SI::GET-STORED-ARGLIST (SI::ARGNAMES) -\\UTF16.BACKCHARFN (COUNTP) UNIX-KILL (CONN) XCL::WHERE-IS-NOTICE (XCL::TEMP-FILE XCL::NEW) DMATCH ( -PAT) \\CH.FIND.ORG.SERVER (DONTPROBEFLG NOERRORFLG) CREATE.NUMBERPAD.READER (FLOATINGPTFLG -POSITIVEONLYFLG INCLUDEABORTFLG MSG) MSINTERPA (VAL) SI::FUNCTION-WRAPPER-INFO (SI::NAME) CLISPFORVARS - (IV TEM OLDFLG) DEFPRINT (F FN) FIXFIELDORDER (FIELD.USAGE REVFIELDS) \\SPPCONNECTION (HOST) -\\CH.LOCATE.SERVERS (DOMAIN NOROUTE) SI::COMPILED-FUNCTION-INTERLISP? (SI::DEBUGGING-INFO) -MSINTERPRETSET (REP INVERTED ARG) MSADDTYPE (|oldWordDef|) MOVETOUPPERLEFT (REGION) CHECKDEFS (RECS -FOUND MUST DEFS) TTBIN (NOMETA) CL:MAKE-STRING-INPUT-STREAM (CL::END) HISTORYSAVE (INPUT1 INPUT2) -\\INTERNAL/GETPASSWORD (HOST OSTYPE ALWAYSASK DIRECTORY) \\FTP.DIRECTORYNAMEONLY (N) MAPHASHFILE ( -DOUBLE BOTH) UTF16BE.OUTCHARFN (RAW X) COMP.SELECTQ (THISLABEL VAR) TB.DO.ITEM.SELECTION (OLDSELECTION -) SHOWWFRAME (TITLE) PRINSHUT (PAREN) SPP.CLEARATTENTION (NOERRORFLG) \\RSTRING2 (CHAR SHIFTEDCHARSET -SKIPPING ANSLIST FATSEEN LASTC) CL:PARSE-INTEGER (START END FATP JUNK-ALLOWED SIGN STARTINT -MAXALPHACODE) PRIN2-LONG-STRING (P2FLG USE-SEMI-COLONS SEMISTRING SEMICLOSE LASTSPACE COMMENTP -ESCAPESEPRS C SINGLELEFT) CL:NOTEVERY (MORE-SEQUENCES) \\RTP.INFO.HOOK (WINDOW) LISPXFIND (HISTORY -BACKUP LINE VAL) GETPUP (PUP WAIT TIMER) CLMAPS2 (DEF) TTSKREAD (PARENCOUNT) CANONICAL.HOSTNAME (DEV) -TRACKCURSOR (DOWNFLG) \\LIMITBYMAX (MAX) SHOWWTITLE (CENTERFLG) \\DSPRIGHTMARGIN.PSC (XPOSITION) -CL::INSERT-INCLUDED-SLOT (CL::TAIL) SIN (RADIANSFLG) OPENPUPSOCKET (ID#EXPLICIT? CLASHP) -MAKE-READER-ENVIRONMENT (PACKAGE READTABLE BASE) TTYIN.CLEANUP (WINDOW) \\INTERNAL/SETPASSWORD ( -DIRECTORY INFO NEWNAME/PASS ALWAYSASK HOST NSINFO DEFAULTNAME DISKNAME PASSWORDADDR INFOCHANGED -NEWNAME) CLOSEHASHFILE (REOPEN) UTF16BE.INCCODEFN (COUNTP) TTYIN.FINISH (DRIBFL RESULT WORD X) -|\\LFDirectorySearch| (HMIN MATCH) SETPASSWORD (HOST DIRECTORY USER) CHAT.TYPEOUT.CLOSE (CHATPROC) -TTWAITFORINPUT (MSECS RETKEYFLG TIMER) PFI.HANDLE.RPAQQ (COMSINFO) POSITION (FILE N) MASTERSCOPEXEC ( -LINE) \\FM.MAKEBITMAP (BOX) JOINDEF (DEF DEFLST) TTYIN (SPLST \\READING RDTBL PROMPT \\LISPXREADING -\\PROMPTFORWORD \\REPEAT TYPEAHEAD VALUE \\CURSORCOL) \\SETMACROSYNTAX (CONTEXT WAKEUP ESCAPE A) -\\TEDIT.LARGER.CARET (LOOKS) RENUMBER.LINES (LINE) \\LEAF.OPENFILE (CRDATE TYPE) \\TEDIT.CHARDELETE ( -INSPC) TTYIN1 (CHAR MATCHED WASEDITCHAR DRIBFL) \\TEDIT1 (UNSPAWNED) SEDIT::PRINT-STRING (SEDIT::PRIN-2? -) \\DRAWELLIPSE.GENERIC (ORIENTATION) /TCONC (PTR) \\DSPLINEFEED.PSC (LINELEADING) TTYIN1RESTART ( -MORELINES) COS (RADIANSFLG) SEDIT::INSERT-COMMENT-CHARS (SEDIT::SUBNODE SEDIT::INDEX SEDIT::SUBNODES) -TTYIN.READ (DONTREAD BUTLASTC) DRAWGRAYBOX (SOFTCURSORUP) MOVEBOX (SOFTCURSORUP) -\\TEDIT.COMMAND.RESET.SETUP (STARTING) ALLCALLS (LAMFLG INTERNALFLG) TTYIN.SETUP (WINDOW) -MBUTTON.SET.NEXT.FIELD (NEWVALUE) CLOSEPUPSOCKET (NOERRORFLG) \\TEDIT-OPEN-FONT-FILE ( -EXISTING-FONTFILE-IF-ANY) \\LIMITBYMIN (MIN) NOTE (LSTFLG) \\ADJUST.USERNAME (NAME) SEDIT::SCAN-FOR-BOUNDS - (SEDIT::INITIALIZE) PRINT-DOCUMENTATION (DOC) SEDIT::INSERT-COMMENT (SEDIT::CHARS) DWIMIFY1A (FN TAIL -) \\TEDIT.FIND.OVERLAPPING.LINE (LINES) READFROMBUF (FIXUP) STRING-EQUAL (START1 END1 START2 END2) -NOT.TRACKCURSOR (|Node|) \\CREATECHARSET.IP (NOSLUG? RELFLAG) SHOWSHADEDITEMS (ANYSUBITEMS) -ICMLARRAY.INDICES (FIRSTFLG) FONTCREATE (FAMILY SIZE FACE ROTATION DEVICE NOERRORFLG) CL::RESOLVE-SLOTS - (CL::INCLUDES CL::INCLUDED-SLOTS) SENDPUP (PUPSOC) EXEC-READ-LINE (SPACEFLG) OPENHASHFILE (ITEMLENGTH - \#ENTRIES HASHFILE) \\UTF8.BACKCHARFN (COUNTP) FORK-SHELL (COMMAND) COPYALLBYTES (FROMFILE TOFILE -BYTESIZE) GREET (NAME) ALLPATHS (DECLS ANY TL) \\TRACKWITHBOX (NOERROR) DINFO.EXPANDFN (FMENU) -ICMLARRAY.DOWINDOWCOMFN (COM) RPTPRINT (FLAG) READ-EXTENDED-TOKEN (CHAR ESCAPE-ALLOWED-P ESCAPING -SHIFTEDCHARSET CASEBASE ANSLIST FATSEEN ESCAPE-APPEARED) \\BSP.PREPARE.OUTPUT (TIMEOUT) CLSTOPSCAN? ( -CLTYPX CLTYP) DCODERD (NAMETABLE LOCALARGS) |\\LETtran| (SEQUENTIALP) \\SHIFT.DOCUMENT (PC) -SI::ADD-ADVICE (SI::OLD-ADVICE) RETFROM (FLG) \\LOGIN.READ (HOST CONNECTFLG MSG) \\SUBREADCONCAT ( -EXTRASEGMENTS) BKBUFS (S L ID) \\INVALID.SYMBOL (PACKAGE) MSADDMODIFIER (|oldWordDef|) \\FM.GETBITMAPS - (HIGHLIGHT) SEDIT::PARENTHESIZE-CURRENT-SELECTION (SEDIT::NODE SEDIT::START SEDIT::POINT-AFTER?) -DCODESKIP (FLG) SHRIEKER (LOOKAT RESULTP) CLBUFS (NOCLEARFLG NOTYPEFLG SBUF LBUF) PRIN4 ( -OBEY-PRINT-LEVEL) CHAT.TTYENTRYFN (WINDOW) PROMPTFORWORD (CANDIDATE.STR DONTECHOTYPEIN.FLG -TERMINCHARS.LST CONVERTIBLEP KEYBD.CHANNEL URGENCY.OPTION PROMPT.STR TTYD CHARBUFFER SPACEP RUBBING? -GENERATE?LIST.FN ?HELPMSGTRIEDP BEGUNTYPING? TIMELIMITEXPIRED?) \\ITEM.WINDOW.SELECTION.HANDLER ( -SELECTABLEITEMS NOW) \\IMAGEIOINIT (POS N DY) HPRINT1 (CDRFLG X NOSPFLG NOMACROSFLG VALS) -\\MEDW.BLTCHAR (SOFTCURSORUP SI::*OR-GENTEMP*) \\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (NEWOBJ OBJ) -PFI.ESTIMATE.SIZE (TEMPLATE) \\MAIKO.10MBTURNONETHER (NSHOSTNUMBER OUTINTERRUPT ININTERRUPT) -\\MEDW.YOFFSET (DISPLAYSTREAM YOFFSET) \\LEAF.TRUNCATEFILE (LASTPAGE) DWMFY2 (NOTOKFLG FNFLG 89CHANGE -ATTEMPTFLG NEXTAIL) UNADVISE (FNS) \\NOIMAGE.DSPFONT (FONTN) DO-EVENT (ADD-TO-SPELLING-LIST) -XCL::WALK-TAGBODY-1 (XCL::FORM) GC-FILING-DIRECTORY (DIRNAME CANDIDATES CONFIRM?) READHOTSPOT ( -DOWNYET?) PREVLINE (X) MSADDANALYZE (|oldDef| FILETYPE |oldEntry|) \\FM.GETREGIONS (HIGHLIGHT -BOXOFFSET) \\DONEWEPHEMERALPAGE (NOERROR) \\FM.EDIT-PREPARETOEDIT (STARTFLG) \\ORIG-READ.SYMBOL ( -PACKAGE EXTERNALP NONNUMERICP) STRINGWIDTH (FLG FONT) RPLNODE2 (Y) |\\PFTransferPage| (|runLength| -|noBreak|) PREVWORD (NEW N) EDITMOVESUBTREE (GRAPH NOW NEAR) FAKE-COMPILE-FILE (SAVE-EXPRS REDEFINE -ENV LAP OUTPUT-FILE) \\UPDATEXYANDBOX (BASEPTCHANGE?) \\FM.EDIT-ITEM (DONEFN ITEM) -\\ORIG-INVALID.SYMBOL (PACKAGE) \\TEDIT.OBJECT.SHOWSEL (FIRSTLINE IMAGEFN ON) SUPERPRINT/COMMENT ( -SEMIP RIGHTFLG HALFLINE) \\CARET.FLASH? (CARET) \\NSGC.COLLECT.DIRECTORIES (SESSION NOCHILDREN) -EXTENDEXTENT (EXTENT) SEARCHPDL (SRCHPOS) DWMFY1 (CLISPCHANGE 89CHANGE ATTEMPTFLG CARISOKFLG) -TEDIT.FORMAT.HARDCOPY (BEFOREFN AFTERFN FILE WASOPEN) \\MEDW.XOFFSET (DISPLAYSTREAM XOFFSET) -\\TEDIT.ITALIC.CARET.OFF (LOOKS) \\LEAF.SETFILEINFO (WASOPEN) RECORDACCESSFORM (TYPE) HASHFILEPROP ( -VALUE) UTF8.PEEKCCODEFN (BYTE4 BYTE3 BYTE2 COUNTP) FLONUM-TO-STRING (DECPLACES FMIN REALDP WIDTH SCALE -) SETUPPUP (REQUEUE) CLISPIFYMAPS (FN2 VAR) TEDIT.PARALOOKS (TABSPECC REPLACEALLFIELDS NPC 1STLEFT -LEFT RIGHT LEADB LEADA BLEADSET LLEAD QUADD TYPESET SUBTYPESET SPECIALX SPECIALY NEWBEFORESET -NEWAFTERSET HEADINGKEEP KEEPSET BASESET HCPYSET USERSET REVISEDSET STYLESET CHARSTYLESSET COLUMNSET) -COMPILE-FILE? (UNKNOWN) DWIM (X) \\GETBASESTRING (FATP) MAPDL (MAPDLPOS) CLISPIFYRPLAC (CLTYP0 \:FLG -CLTYP00) RETVALUES (FLG) COMP.GETBASEBITS (STFLG) COMPILER::PRINT-NODE (CL:NUMBER) READHASHMACRO ( -INDEX) COMPAREPRINTN (SPACE FLG) SI::FINISH-ADVISING (SI::IN-FN SI::ALREADY-ADVISED?) SKOR (XWORD -TWORD SI::*OR-GENTEMP* T2 T1 X2 X1) \\CCLOSURE.DEFPRINT (NAME) CHARCODE.UNDECODE (NAME) GETCFILE (X) -CL:RETURN-FROM (CL::FRAME CL::RETFROM-TAG) \\INSPECTW.COMMAND.HANDLER (SELITEM) -ESTIMATE-DIMENSIONALITY (RANK) CALLSCCODE (RESULT) SPP.OPENP (STREAM) READNUMBERINBASE (NUMERATOR VAL -SIGN) MERGLIST (PATH1 PATH2) \\GETREGIONTRACKWITHBOX (THRUONCE NOERROR) CLISPIFYCROPS1 ($LST Y -TAILSTATE TEM) EDITADDNODE (NODELABELFN) RECORDWORD (TL NEWORD) \\COURIER.TRACE (ARGUMENTS FIRSTTIME) -MODERNWINDOW.BUTTONEVENTFN (CORNER ANYWHERE ORIGFUNCTION) \\PROMPTFORWORDBIN (URGENCY.OPTION -BROADURGENCY? INSTREAM DISPLAYECHOSTREAM TIMER READABLE) \\DSPMOVELR (X Y WIDTH RIGHTWARDSFLG ERASEFLG - DEFAULTPOS?) \\NSFILING.GETFILE (SEQUENTIAL OPTION DIRPATH DIROK HANDLE FILE.ID RANDEVICE -EXPLICIT-VERSION OLDHANDLE OLDSTREAM HAVELOCK) \\TEDIT.FILL.IN.CHARLOOKS.MENU (PROP OFFSET) -TEDIT.FLASHCARET (FIRSTTIME) \\DSPOPERATION.IP (OPERATION) \\TEDIT.CONVERT.FOREIGN.FORMAT (TEXTOBJ) -EDITAPPLYTOLINK (NODELABELFN) NSPRINT (INSTREAM PRINTRESULTS) COURIER.WRITE (ITEM) TEDIT.INSERT ( -CH#ORSEL LOOKS DONTSCROLL) EDITPROP (PROP) DWIMUNSAVEDEF (FLG) BRECOMPILE (CFILE FNS NOBLOCKSFLG) -FILL-VECTOR (END) UNSAVEFNS (FN FNS) \\FM.CHECKDESCRIPTION (LABEL) MKACCESSFN (FN) XCL::SET-CONSTANTP -(XCL::FLAG) EXPANDOPENLAMBDA (VALS SUBSTPAIRS ARGS) LISPDIRECTORYP (|vol|) CHARWIDTHY (WY) -TERM.SET.TAB (TERM.TAB.STOPS) CREATE-PROCESS-STREAM (CHAN) SET-SYMBOL (ENVIRONMENT) -\\TFBRAVO.WRITE.RUN (NAMEDTABNUMBER) CHAT.OPTIONMENU (MENU) COMPUTE-MACRO-ARGS (ARGUMENT-LIST -SUPPLIED-P-VARIABLE FOUND-VALUE) SPPOUTPUTSTREAM (CON) \\FILLCIRCLE.PSC (TEXTURE TEXTUREBM) CSELECT ( -CLAUSES) \\BLTSHADE.PSC (CLIPPINGREGION RGN TEXTURE TEXTUREBM) \\NSFILING.COPY/RENAME (OLDPARSE -COPYFLG NEWPARSE VERSION SAME-DIR-P DEST-UNIQUE-P OLDHANDLE) COMP.NUMBERCALL (A) DEFAULTFONT (FONT -NOERRORFLG) PRINTCOMSTRAN (FROMDWIM FILEFORM TAIL RESETOUT) DWIMARKASCHANGED (L) TEDIT.CURSORMOVEDFN ( -LINE) \\IRM.WILD.MATCH (WILDLIST LIST) OPENRTPSOCKET (FRNPORT PUPSOC MODE FAILURESTRING) |\\VFMGet1| ( -|interval|) COMP.COMPARENUM (OFN V1) FM.SKIPNEXT (EDITITEM) CL::ENSURE-CONSISTENT-PS ( -CL::INCLUDED-PSTRUCTURE CL::INCLUDE CL::EXPORTNAMES) CLISPIFYCROPS (Y CROPFN) GRAYBOXAREA (OUTLINESIZE -) EXPANDMACRO (ALLFLG QUIETFLG) READVISE (FNS) SUPERPRINT/COMMENT2 (TAIL) LAYOUTSEXPR (TREE) -MSNEEDUNSAVE (MARKCHANGEFLG) RECFIELDLOOK (VAR EDITRECFLG) \\NSFILING.GENERATEFILES (PARSE SESSION -FILING5 PATHREQUIRED NAME DIRPATH FILTERLIST VERSIONFILTER VERSION FILTERNEEDED RESULT) -SEDIT::START-COMMENT (SEDIT::POINT-NODE) \\LEAF.REOPENFILE (OLDDATES) SHOWGRAPH (GRAPH ALLOWEDITFLG) -PFI.DEFAULT.HANDLER (TESTFN TEMPLATE ITEMNAME) TRYNEXT (PL1##) CHANGERECORD (OLDFLG) FMAPRINT (LEFT -LST RIGHT) \\FM.JUSTIFYGROUPS (HJUST VJUST) MAKEACCESS (ACCESS) CHARCODE.DECODE (C NOERROR POS) -TIMEALL (TIMEWHAT) MENUTITLEFONT (SCREEN) STRPOSL (START BACKWARDSFLG NEG STRFAT) EDITSHADE (SHADE) -MOVE.TO.LINE (BUFTAIL) TEDIT.REDO (CH) CALLS3 (FLG) HPRINT (UNCIRCULAR) TEDIT.BUILD.PCTB1 (TEXTOBJ -OLDPC PC) \\ATWGROUPSIZE (ATWS) \\BSP.PREPARE.INPUT (TIMEOUT) COMP.NUMERIC (A V) \\DRAWPOLYGON.DISPLAY - (CLOSED) \\STRINGWIDTH.GENERIC (RDTBL) FIX-FORM (CIRCLE-FLAG) \\SPLITTREE (UPWARD) TEDIT.SUBSTITUTE ( -REPLACESTRING PATTERN ABORTFLG CONFIRMFLG CRSEEN) COMPILER::TRANSFORM-GET/PUT-BASE ( -COMPILER::COMPUTED-OFFSET-TREE COMPILER::ADDBASE-CALL) PURGEDSKDIRECTORY (|dontDeleteFiles|) -\\DSPRESET.DISPLAY (X) FONTUNPARSE (FACE) OPT.CALLP (N FN) %SORT-SUBLIST (KEY) NUMBERPAD.READ ( -ACCEPTTYPEINFLG) MSDESCRIBE1 (LST) MAKEACCESS1 (SPEC) ICMLARRAY.MENUW.SHOW (LEVEL-ITEM) -\\FTP.RENAMEFILE (NEWFILE) TYPEP (CL::FN) \\DSPOPERATION.DISPLAY (OPERATION) COMPAREPRINT1 (DOTFLAG -SPACE K) \\FM.NWAY-CHANGESTATE (STATE NEWSTATE) \\SCALEDBITBLT.PSC (DESTINATIONLEFT DESTINATIONBOTTOM -WIDTH HEIGHT DESTREGION CLIPPINGREGION) \\BACKCOLOR.DISPLAY (TEXTURE) SEDIT::COPY-SELECTION-COMMENT ( -SEDIT::START SEDIT::DESTINATION SEDIT::INSERT) FB.YES-OR-NO-P (ANSWER) DINFO.FIND (STRING) -SUPERPRINT/COMMENT1 (EDITDATEP) COMP.RPLACD (NEED-POP) \\RTP.HANDLE.INPUT (TIMER) -\\TEDIT.PARSE.CHARLOOKS.MENU (BUTTON SIZE) POSTSCRIPT.HARDCOPYW (REGION) SEQUENTIAL.PRETTYPRINT (TAIL) - TEDIT.BUILD.PCTB0 (TEXTOBJ OLDPC) \\BLTSHADE.DISPLAY (SI::*OR-GENTEMP* CLIPPINGREGION WIDTH HEIGHT -TEXTURE SOFTCURSORUP) SETFONTDESCRIPTOR (FONT) \\PROMPTWINDOW.PAGEFULLFN (\#LINES) CASE.PRETTYPRINT ( -TAIL) \\NSFILING.NEXTFILE (IGNOREDIRS FILTER NAMEONLY) TEDIT.PROMPTFLASH (TEXTOBJ MAINTEXTOBJ) -CLISPNOEVAL (DEFAULT) SEDIT::COMPUTE-POINT-POSITION-COMMENT (SEDIT::SUBNODE) TEDIT.NEXT (TARGET -FIELDSEL SEL) DWIMIFY0 (Y EXPR DWIMIFY0CHANGE) CLISPACKUP (OPRFLG L1 L-1 LL) TEDIT.BUILD.PCTB2 ( -TEXTOBJ OLDPC PC) \\NSFILING.PARSE.FILENAME (CH SEMI PATTERNP NAME) CL::RECORD-DOCUMENTATION ( -CL::PARSED-DOCSTRING) \\DRAWELLIPSE.DISPLAY (ORIENTATION DASHING USERFN BBT SI::*OR-GENTEMP* -SOFTCURSORUP) \\IFSERRORSTRING (FILENAME CONNECTION ERR-MSG-STREAM) \\DRAWLINE.DISPLAY (DASHING COLOR -BM SI::*OR-GENTEMP* WIDTH) \\DSPCLIPPINGREGION.DISPLAY (REGION) \\POLYSHADE.YSCAN.IP (|currlist| -|fulllist|) PRINTPROG (TAIL) CL:ENDP (CL::OBJECT) \\FILLCIRCLE.DISPLAY (TEXTURE SI::*OR-GENTEMP* -SOFTCURSORUP) \\MAIKO.10MBWATCHER (PACKET) ACCESSDEF4 (TL TEM) SEDIT::CFV-CLISP (SEDIT::IWIDTH) -\\PARAS.IN.SEL (PARAENDED) LEAF.ASSURE.FINISHED (PUP) \\FONT.COMPARESYMBOL (INPUTFIRSTC A1207) -SUBPRINT (TAIL FORMFLG0 END FORMFLG CLISPWORD DOCRFLG) DINFO.LOOKUP (LOOKUPFN OLD.STRING STRING) -CACHEMACRO (ENV) \\MAKE.JIS.TO.XCCS.CONV.TABLE (TABLE) \\DSPYPOSITION.DISPLAY (YPOSITION) SUPERPRINT0 -(BRFLG NEWBR) \\TEDIT.ABBREV.EXPAND (EXPANSION) \\DSPXPOSITION.DISPLAY (XPOSITION) ASKUSEREXPLAIN ( -NOECHOFLG PROMPTSTRING) /MOVD (FLG) \\DSPLINEFEED.DISPLAY (DELTAY) SEDIT::REUSE-LINEAR-FORM (SEDIT::BELOW? -) \\DSPRIGHTMARGIN.DISPLAY (XPOSITION) \\DRAWCIRCLE.DISPLAY (DASHING USERFN BBT SI::*OR-GENTEMP* -SOFTCURSORUP) FONTCLASSCOMPONENT (FONT) SUBPRINT1 (X) \\DSPLEFTMARGIN.DISPLAY (XPOSITION) MAKEKEYLST ( -LCASFLG DEFAULTKEY) \\FM.LAYOUTGRID (BOXOFFSET) \\DSPFONT.DISPLAY (FONT) \\BITBLT.DISPLAY (WIDTH -HEIGHT SOFTCURSORUP SOURCE SI::*OR-GENTEMP* CLIPPINGREGION TEXTURE) SPLITKEY (PTR) -\\SCALEDBITBLT.DISPLAY (SCALE WIDTH HEIGHT) DSFIT1 (M) PRIN1 (OBEY-PRINT-LEVEL) OPT.OPTCHECK (CD) -SPACES (\\THISFILELINELENGTH) UTF8.OUTCHARFN (RAW X) \\UNCOPY (CARLVL CDRLVL) PRINTNUM (NUMBER -FLOATFLAG RAD WIDTH) \\INSERTTREE (NEW-PREVLEN NEW-OLDLEN) FB.PROMPTFORINPUT (DONTCLEAR RESULT -ABORTFLG) XCL::PUT-IMPLICIT-KEY-HASH (XCL::VALUE XCL::DELETED-SLOT-INDEX XCL::NEW-VALUE) -\\TELERAIDBREAK (USERFRAME) \\LEAF.FLUSH.CACHE (CACHE) /MAPCONC (MAPE MAPFN2) CLISPELL (TYPE) -DINFO.UPDATE.FROM.GRAPH (GRAPHER.NODE) CHAT.SENDSCREENPARAMS (FN) |\\PFFindPageAddr| (PAGEGROUP) -\\TEDIT.SUBST.FN2 (TARGETLIST) GO.TO.RELATIVE (COL ROW) \\PRINDATUM.TO.STRING (THERE-ARE-CIRCLES -*PRINT-CIRCLE-HASHTABLE*) \\DRAWPOLYGON.IP (DASHING CLOSED VISIBLEP) \\FM.LAYOUTCOLUMN (BOXOFFSET) -PUPNET.DISTANCE (ROUTE) \\NSFILING.OPEN.HANDLE (PARENT CONTROLS) BROKENDEF (BEFORE AFTER) \\FONTFACE ( -FACE NOERRORFLG) \\TEDIT.PACK.TARGETLIST (TARGETLIST) INSERTLINE (USECR) MSMARKCHANGED (TYPE) -\\HANDLE.RAW.PUP (NDB) \\FM.LAYOUTROW (BOXOFFSET) \\NSFILING.COMPOSE.PATHNAME (NAME VERSION) -/SETATOMVAL (ATM VAL) \\DO.PROGV.SETUP.FRAME.AND.EXECUTE (VALUES) \\COURIER.RESULTS (RESULTTYPES -EXPEDITEDFLG) |\\LFFindDirectoryVol| (VOL) XCL:UNBREAK-FUNCTION (XCL::IN-FN XCL::ORIGINAL XCL::ENTRY) -\\DEVICESYMBOL (STRM X) INSTALL-PROTOTYPE-DEFN (REQUESTED-TYPES NEW-DEFN-FLG TYPES-WITH-PROTOTYPES -DEFINER) ACCESSDEF (CFLG TEM) \\NSRANDOM.SESSION.WATCHER (WRITING? TIMEOUT REALTIMER) -DINFO.DEFAULT.MENU (TYPE) |\\VFMGetBufferFor| (BUFFER) AS.MAKE.CONVERSATION (KEEPSTREAM) -SI::PRINT-TRACED-ARGUMENT (SI::PRIN1-THE-NAME?) FASL::DUMP-SYMBOL (PACKAGE) SEDIT::LINEARIZE-CLISP ( -SEDIT::INDEX SEDIT::OK SEDIT::COULD-INLINE? SEDIT::IF?) \\FM.NWAY-DOWNFN (STATE) \\DSPSCALE2.PSC ( -X-SCALE) PRINTCODE (FN.IS.CODEBASE LVFLG LEVEL PC FIRSTBYTE TEMP SI::*OR-GENTEMP* LEVADJ) -\\TEDIT.UPDATETREE (UPWARD) SHOW.CLEARINGHOUSE (ENTIRE.CLEARINGHOUSE? DONT.GRAPH) SETCOLOR.IP ( -OPERATION) WHO-LINE-VMEM (VMEM-CONSISTENT?) /PUTPROP (ATM X X0) \\FM.NWAY-MOVEDFN (STATE) CHAT.LOGINFO - (FN) \\DSPCOLOR.DISPLAY (COLOR COLORCELL) PRINTOPCODES (SINGLE) CLISPCOND1 (CPYFLG) -\\DSPBACKCOLOR.DISPLAY (COLOR COLORCELL) \\FM.FORMATEXPLICIT (LOCAL) COMPARE (SOURCE1 SOURCE2) -\\INVALID.INTEGER (FATP) COMPILER::EXPAND-OPENLAMBDA-CALL (COMPILER::EXTRA-ARGS COMPILER::UNSUBBED-ARGS -) \\DSPCOLOR.PSC (COLOR) SHAPEW (NEWREGION) DINFO.SELECT.GRAPH (GRAPH) \\FONTSYMBOL (|ElseReturnXFlg|) - RESETGRID.NEW (ORIGX ORIGY DOCLEARFLG) \\RTP.ACTION (NEWSTATE) CH.GETAUTHENTICATOR (NONTRIVIAL INFO) -NEGATE (X) RPLSTRING (RFAT) /MAPCON (MAPE MAPFN2) COMPAREFAIL (OLD) SEDIT::OUTPUT-STRING (SEDIT::PRIN-2? -) MOVECHARBITMAP (CLIP) FONTCOPY (NOERROR ERROR) CLISPIFY (EDITCHAIN CLISPIFYFN FORM) CLEAR.LEAF.CACHE - (HOST DEVICE) \\LEAF.BREAKCONNECTION (FAST) \\PRINTFPTOVP (TYPEFLG NEXTTYPE FIRSTFP VPRAWFLG LOCKEDP -TYPE) PRINTDEF (LEFT TAILFLG) BKSYSBUF (FLG RDTBL) UTF8.INCCODEFN (COUNTP) FONTMAPARRAY (FONTCLASSES) -%STABLE-SORT-VECTOR (KEY) \\MAPPNAME (FLG) \\POLYSHADE.XSCAN.IP (|currlist| |fulllist|) -\\CORE.FINDPAGE (CACHE) SI::ARGUMENT-ERROR (SI::MAX-ARGS) \\FIND.LOCALPUPHOSTNUMBER (QUIET) CLISPCOND -(VAL) \\CORE.GENERATEFILES (DESIREDVERSION) \\PUPNET.CLOSERP (ROUTEX) TEDIT.PUT (FILE FORCENEW OFILE -PUTFN UNFORMATTED? OLDFORMAT? CACHE PC CH#S MENUSTREAM) \\CHTOPC (TELL-PC-START?) RECORD (NAM) DWIMIFY - (L QUIETFLG) \\NSFILING.CONFLICTP (OPENFILES) FONTPROFILE (NAME BASICCLASSES) FONTSAVAILABLE (FAMILY -ROTATION CHECKFILESTOO?) FIND.NEXT.WORD (BACKUPFLG N) CHOOZ (NDBLS GENFN GENERATOR SPLST ALTFLG FN -TAIL VAL TIEFLG) LISPXSPACES (Y X NODOFLG) |\\VFMMerge| (|mergeFlag|) CH.FINDSERVER (DONTPROBEFLG -NOERRORFLG) OUTPUT (FILE) SPELLFILE (FIELDS DEVICE DIRECTORY HOST NSFLG RELATIVEDIRECTORY SUBDIRECTORY - VERSION DIRLST NOPRINTFLG) MISSPELLED? (XWORD FN) NAMEFIELD (SUFFIXFLG DIRFLG) \\SMASHABLESTRING ( -FATP) FINDFN (POS FLG) \\CURVE (USERFN SOFTCURSORUP SI::*OR-GENTEMP* BBT DISPLAYSTREAM ENDING) -CLISPFOR (LISPXHIST) CL::%DO-TRANSLATE (CL::SUBSEQUENT-VALUES CL::SEQUENTIALP) LISPXPRIN2 (Z Y X -NODOFLG) PROCESS.EVALV (ME) \\CORE.GETFILEHANDLE (INFOBLOCK) \\RPLCHARCODE (FATPA1776) -\\TEDIT.FIND.WC1 (TARGETLIST RESULT1) SAVEPUT (X X0 OLDFLG) MAKEHASHLINKS (TRANS) /ADDPROP (ATM X X0 -FLG) LOADFNS (LISPXHIST FILE FILEMAP BUILDMAPFLG) \\LOCKWORDS (NWORDS) \\CORE.GETINFOBLOCK (VERS -CREATEFLG) GENSYM (PREFIX NUMSUFFIX OSTRBUFFER CHARCODE) FONTSET (NAME BASICCLASSES) CHAT.FLUSH&WAIT ( -FN) \\CORE.DELETEFILE (EVENIFOPEN INFOBLOCK) \\LOCATE.PUPNET (DONTPROBE) \\DSPTOPMARGIN.PSC (YPOSITION -) EDITBM (ORIGBM BMSPEC) SEDIT::BACKSPACE-COMMENT (SEDIT::INDEX) \\IRM.WILD.REF (MATCHES CHOICE) -\\RTP.SHOW.FAILURE (PUP FAILURESTRING) ASSURE.PUP.READY (NDB PROC MYHOST#) CLISP4 (FLG) CLISP3C (L1) -MBUTTON.FIND.NEXT.BUTTON (PC OBJ) GETNODEFROMID (NODEHASHTABLE) /LISTPUT (X) \\BSP.HANDLE.INPUT (TIMER -) CREATEDSKDIRECTORY (|smashDirectory|) SHOW.IP (MOVING?) L-CASE (FLG FATP CHANGEFLG) HASHFILESPLST1 ( -XWORD) MAKEINITLAST (SI::*OR-GENTEMP*) CHAT.STARTUP (FROMMENU OPENFN PROTOCOL TEM WINDOW) %SORT-VECTOR - (KEY) \\CORE.GETFILEINFO.FROM.INFOBLOCK (INFOBLOCK) FILL.INITTBLE (OPERATION TEXTURE SI::*OR-GENTEMP* -) TEDIT.PUT.PCTB2 (PARALOOKSSEEN FORMATTINGLEVEL PC FONTFILE PREVPC EDITSTENTATIVE PREVFATP CACHE -TRUEFILE UNFORMATTED? SEPARATEFORMAT) BQUOTIFY (BQCAR TL FORM) \\CREATE-REAL-CHARSET.DISPLAY (CHARSET -NOSLUG?) CARET (NEWCARET) \\NSRANDOM.CREATE.STREAM (GOTCONTROLS CHECKACCESS ERROR OLDSTREAM) -DUMPINITPAGES (VERSIONS) SCAVENGEDSKDIRECTORY (LISPDIRECTORY LISPFILES SILENT) READIMAGEOBJ (GETFN -ENTRY SUPPORTFILE NOERROR DATANBYTES) \\FM.STATE-SELECTEDFN (NEWSTATE) EDITGETDEF (NAME) -\\CORE.GETFILENAME (VERS) COPY.TEXT.TO.IMAGE (CHAR RIGHTMAR TABS) CL:COMPILE (COMPILER::NAME) -\\DURATIONTRAN (USINGBOX RESOURCENAME TIMERUNITS UNTILDATE FORDURATION) PURGEHISTORY1 (FLG) -\\LEAF.REQUESTPAGE (IMMEDIATE CACHE) \\FTP.OPEN.CONNECTION (PORT) STREQUAL (FATPX FATPY) -\\ITEM.WINDOW.COPY.HANDLER (SELECTABLEITEMS CURRENTITEM SI::*OR-GENTEMP*) NTHCHAR (CODE) -TB.MAP.DELETED.ITEMS (NULLFN) DINFO.HISTORIC.UPDATE (NODE) COMP.PROG (TAGS FLG) \\POLYSHADE.DISPLAY ( -|currlist| |fulllist| |count|) \\CORE.NAMESCAN (CREATEFLG) TEDIT.GET.CHARLOOKS0 (NAME) -\\FM.STATE-CHANGESTATE (DISPLAYITEM) MOUSESTATE-NAME (MOUSEONLYFLG) CLOSEMAINWINDOW (MAINWIN) -\\PUTBASESTRING (FATP) CLISP3 (CLTYP FLG BROADSCOPE) \\CORE.UNPACKFILENAME (DOT) FASL::LOOKUP-VALUE ( -CL:HASH-TABLE) \\HANDLE.PUP.ROUTING.INFO (NEWTIMER) \\NSFILING.FILLIN.ATTRIBUTES (NOERRORFLG) -\\CORE.DIRECTORYNAMEP (DIRNAME DIR) \\TEDIT.DIFFUSE.PARALOOKS (PRIORPC PC SUCCEEDINGPC) -\\TEDIT.FOREIGN.COPY? (DEST.TEDIT? PROCW DEST.TEXTOBJ) \\DSPBOTTOMMARGIN.PSC (YPOSITION) -\\CORE.NEXTFILEFN (NAMEONLY) MOVETOP (Y) SEDIT::MUTATE (SEDIT::NODE SEDIT::MUTATOR) -SET-CONNECTED-DIRECTORY-INTERACTIVELY (NEW-DIRECTORY) GETHASHKEY (DELOK? DELETED? PROBE) -|GetBcplString| (ATOMFLG) XCL::WALK-DECLARATIONS (XCL::DOC-STRING-P XCL::DECLARATIONS XCL::FORM -XCL::MACROP) CHAT.RECONNECT (STATE) ERROR (NOBREAK) COMP.LAMBDA (VARS V) \\MAKEWRITABLESTRING (NEWFATP -) MBUTTON.FIND.NEXT.FIELD (PC DON\'TFIX) SETTOPVAL (VAL) COURIERTRACE (FLG) SPY.BUTTON (POS) -\\FM.FORMAT (BOXOFFSET) SUBFIELDCREATE (SUBDECL DFLT SUBTRAN HL) GNC (CODE) SEDIT::SET-LIST-FORMAT ( -CL:FORMAT) PURGEHISTORY (TYPE) \\LEAF.LOOKUPCACHE (CACHE DELETE PREV) EDITBMRESHAPEFN (TEMPBM) \## ( -COMS) TITLEW.BUTTONEVENTFN (TITLECOMMANDFN) \\DOHARDRETURN1 (NAMETABLE-ON-STACK) EDITBMREPAINTFN ( -ZEROBM) GETFIELDFORCREATE (USETYPE COMPOSEWITHUSING NOPOSTPROCESSING) \\ROUTE.PUP (ROUTE READONLY) -ERASE/GRAPHNODE (TRANS) \\NSFILING.FULLNAME (VERS DIRECTORYFLG DOTSEEN FUNNYCHAR HANDLE ATOMFLG) -TEDIT.HARDCOPY (SERVER) \\CORE.OPENFILE (OLDSTREAM) \\FONTINFOFROMFILENAME (CH DEVICE) -\\NSRANDOM.REESTABLISH (ID) CONSTANTEXPRESSIONP (FORM VALUE MAC) SPELLFILE.SPELL (VERSION EXTENSION) -DO.EDIT.COMMAND (EDITARG EDITMINUS) UNDONLSETQ (LISPXHIST UNDOTEM) POP-IP-STACK (STACK) \\FONTFILENAME - (CHARSET) \\NSFILING.HANDLE.ERROR (ERROR) \\GCSCANSTACK (NTEND) \\CORE.GETNEXTBUFFER (NOERRORFLG) -COURIER.CALL (STREAM) INSPECTW.REPAINTFN (REGION SELITEMS) LISPFORM.SIMPLIFY (EVALFLG CE) -START.CLEARINGHOUSE (RESTARTFLG) \\SPP.BOUTS (CON) NO.SIDEEFFECTS.FNP (X) COMPSETREAD (MESS) -SPELLFILE1 (VERS#1) MAKECREATELST1 (TEMPLATE NEEDACELL CARFLG USING) \\3MBRAWRECEIVE (PBI) FINDFILE ( -DIRLST) \\TEDIT.BOLD.CARET.ON (LOOKS) \\CREATECOREDEVICE (NODIRFLG) \\PUTBASESTRINGFAT (FATP) -MOUSESTATE-EXPR (MOUSEONLYFLG) \\MKATOM (FATP NONNUMERICP FATCHARSEENP) /LCONC (X PTR) -MBUTTON.FIND.BUTTON (PC OBJ) \\FONTFACE.COLOR (POS NOERRORFLG) \\PARSE.NUMBER (RDTBL RADIX COMMONLISP -START SEENBOGUSDIGITS SIGDIGITS ENDFRAC EXPSTART FATP SIGN SEENALPHADIGITS COMMONLISPY MAXALPHADIGIT -DECPT) GETNSPRINTER (NAME) SEDIT::LINE-FINISHED (SEDIT::LINEAR) \\MOVEFRAME (AT-EOS NAMETABLE-ON-STACK -) DO.EDIT.PP (EXPRS LEFTOVER) FINDATOM (BLIP) ED (CL::NAME CL::GIVEN-TYPES CL::FROM-DISPLAY -CL::POSSIBLE-TYPES) GETDUMMYVAR (BINDITFLG) FIXSPELL1 (FROMDWIM MESSFLG FLG BUFS LISPXHIST) -\\VARNOTUSED (SETQONLY?) SPELLFILE.MATCHINGDIRS (HOST) |\\LFEntryPoint| (|noVolName| |volName| -|dontDefault| |vol|) CL:FORMAT (CL::DESTINATION) ARGS.COMMUTABLEP (X) CHAT.PROMPT.FOR.INPUT (WINDOW) -CLOSEICONWINDOW (ICONW) INSPECT/ATOM (ASPECTS) \\ALLOCBLOCK (INITONPAGE ALIGN) \\DSPCLIPPINGREGION.PSC - (REGION) \\LEAF.ABORT.FROMMENU (WINDOW) CHANGE-TTY-PROCESS-INTERACTIVELY (NEW-PROC) ARRAY (INITVAL) -EDIT.BITMAP.REAL (DONE PREVIOUS.BITMAP) \\TEDIT.BOLD.CARET.OFF (LOOKS) EVALUABLE.CONSTANTP (X VALS) -\\LEAF.DEVICEP (LEAFDEV) ALISTS.GETDEF (ASSOCIATION) MAPATOMS (FREE) BSPFRNADDRESS (SOC) -XCL::WALK-BINDINGS-2 (XCL::BINDINGS) \\CORE.SETFILEINFO (INFOBLOCK) |\\LFFindDirectory| (VOL) -TEDITWINDOWP (CHECKED-WINDOW) SI::NON-LOCAL-GO (TARGET) |\\LFScavFileName| (A0417 NAME) -ATOMHASH#PROBES (FATP DESIREDATOM# FATCHARSEENP) SI::UNWIND-TO-BLIP (THROWP PC) IP-TOS (STACK) -\\CREATE.SYMBOL (FATCHARSEENP FATP) MAXIMUMMAINWINDOWSIZE (EXT) SEDIT::MENU-PRINTBASE-SELECTEDFN ( -SEDIT::PRINT-BASE) \\ALLOCHEIGHTTOGROUPEDWINDOW (ATWS MAXSIZE) TB.COLLECT.ITEMS (PREDFN) -\\TEDIT.PARSE.SEARCHSTRING (LST RESULT) \\FONTFILENAME.NEW (CHARSET) MINIMUMMAINWINDOWSIZE (EXT) -\\ALLOCWIDTHTOGROUPEDWINDOW (ATWS MAXSIZE) OPENP (FILE) |\\LFPurgeDirectory| (|directoryID|) -\\CLIPANDDRAWLINE1 (YMOVEUP SOFTCURSORUP SI::*OR-GENTEMP*) \\TEDIT.MARK.LINES.DIRTY (LL) -XCL::WALK-BINDINGS-1 (XCL::BINDINGS XCL::SEQUENTIALP) |\\LFUnpackName| (A0417) \\COURIER.ATTENTIONFN ( -SI::*OR-GENTEMP*) RECLOOK (RECNAME ERROR TL) CL:REMOVE (END COUNT) COMPILER::GENCODE-LABELS ( -COMPILER::CLOSED-OVER) SI::NON-LOCAL-RETURN-VALUES (VALUES) SMASHPAT1 (EFF) CL:FIND (END) -SEDIT::COPY-SELECTION (SEDIT::DESTINATION-CONTEXT SEDIT::DELETE?) \\LEAF.ADD.QUOTES (PIECES) -/DELETECONTROL (MESSAGE) \\HCPYMODEDISPLAYINIT (WINDOW) SETF-SYMBOL-FUNCTION (CL::DEFINITION) -\\NSPRINT.INTERNAL (COURIERSTREAM) SEDIT::GENERATE-LINEAR-FORM (SEDIT::LINEARIZE) \\SPP.GETNEXTBUFFER -(NOERRORFLG) ERRORMESS (U) FASL::ADD-OP-TRANSLATION (FASL::PAIR) CLOSEALL (ALLFLG) PUTD (DEF FLG) -XCL::WALK-ARGLIST (XCL:ARGLIST XCL::DESTRUCTURINGP) CLISPIFY2 (FORM) TB.UNSELECT.ALL.ITEMS (UPDATABLE) - \\READACFONTFILE (PAD.LEFT DONT.PAD.RIGHT STARTWORD) OPT.PRATTACH (AFTER) \\TEDIT.SUBST.FN1 (RESULT) -\\FM.3STATE-SETUPOFFBITMAP (OFF) SI::INTERNAL-THROW-VALUES (VALUES) INSPECTW.CREATE (PROPERTIES -PROPPRINTFN PROPERTIESLST) PF (FN) WHENCLOSE (FN) \\NODIRCOREFDEV (READPFN) \\DRAWPOLYGON.PSC (CLOSED) - \\SFLHASHLOOKUP (INSERT) FB.SELECTEDFILES (NOERRORFLG) LOOKUPHASHFILE (KEY2 RETFLG KEYVAL) \\STKMIN ( -CODEISBLOCK PRINT) UNDOLISPX (LINE UNDONEFLG DWIMCHANGES) HISTORYFIND (LISPXFINDFLG _FLG =FLG L ALLFLG -) \\TELERAIDEXIT (NDB) \\INSPECT.COMPUTE.TITLE (TITLE) DECODE/WINDOW/OR/DISPLAYSTREAM (TITLE BORDER -DSORW) \\TEDIT.GET.CHARLOOKS1 (NAME) SCALE/GRAPHNODE/BORDER (BORDER) CLISPIFY1 (SUBPARENT TAIL LST -TAIL0 OPR0 NOVALFLG SEG) PFCOPYBYTES (END START CHAR) MAXIMUMWINDOWSIZE (EXT) DOATTACHEDWINDOWCOM ( -ATTACHEDW) FASL::COLLECT-LIST (FASL::DOTTED) PROCESSPROP (NEWVALUE OLDDATA) WTFIX1 (TYPE-IN? CHARLST X - NOSPELLFLG0 CLISPCHANGES CLISPERTYPE) \\BASEBYTES.PEEKBIN (NOERRORFLG) CLISPFUNCTION? (FN1 TEM) -\\GETSPP (PEEKFLG TIMEOUT) RECORDFIELDNAMES (FLG) FASL::CONVERT-FASL-DATE (CFLG) BREAKLINE (STAY) -CLDISABLE (BRACKET FLG) SETINITIALS (POS) MAKEMAINWINDOW (OLDMINSIZE OLDMAXSIZE) \\TEXTMENU.START ( -MAINWINDOW) \\FILLPOLYGON.PSC (TEXTURE TEXTUREBM) \\TEDIT.RESHAPEFN (LINE FIRSTCH#) STRING.EQUAL ( -FATPX FATPY) PRINTHISTORY (LINE SKIPFN NOVALUES) COMPERRM (FL X) CSUBSTLST (X) TOPW.ADJUSTSELECTION ( -SELECTION) \\LEAF.DELETEFILE (STREAM) INSPECTW.REDISPLAY (PROPS PROPPRINTFN PROPNAME SELITEMS) -FILL.XPER (SOFTCURSORUP SI::*OR-GENTEMP*) \\FINDOP (FLG) \\CLIPANDDRAWLINE (SOFTCURSORUP -SI::*OR-GENTEMP*) SEDIT::CLEAN-UP-AFTER-RELINEARIZATION (SEDIT::FOLLOWING-LINE) WRITESTRIKEFONTFILE ( -CHARSET CSINFO) \\LINEWITHBRUSH (USERFN BBT SI::*OR-GENTEMP* DASHON DASHTAIL SOFTCURSORUP) -\\TEDIT.CLOSEUPLINES (PREVLINE NEXTLINE LINE DONTFILLFLG) \\SETUPSTACK1 (INITFLG ARGSLENGTH ARGS) -MAKENEWCOM (LISTNAME) \\TFBRAVO.PARSE.PROFILE.PARA (TOKENS) FB.UPDATEBROWSERITEMS (INDEX CONDITION -LASTFILEDATA WIDENED) EDITBMSCROLLFN (GRIDSPEC) ICMLARRAY.GETMENUWGROUP (TOPLEFT PWINDOW) -MENUWMINSIZEFN (TITLERELATEDVAR) \\CANONICALIZE.PUP.HOSTNAME (PORT) TEDIT.RAW.INCLUDE (END WASOPEN -START) COURIER.EXECUTE.CALL (SOURCEFLG SINKFLG BULKDATAFN) |\\LFMakeVolumeDirectory| (DONTOPEN) -\\RESETSTACK0 (RPROC) HASHFILEP (HASHFILE WRITE) UNIX-STREAM-EOFP (CONN) CHAT.BIN (FIRSTTIME) -OPT.SKIPPUSH (LEVOPFLG VL) \\UPCASEBASE (FATP) MAXMENUITEMWIDTH (NOSUBITEMMARK SUBITEMS) EDIT.BITMAP ( -OBJECT) \\TELERAIDENTRY (NDB) \\LEAF.GETFILE (OLDSTREAM REALLYOPEN NOERROR) UNDOLISPX2 (FORGETFLG -DWIMCHANGES) \\CH.CHECK.CLEARINGHOUSE (ADDR) TOPW.BUTTONEVENTFN (COLUMNPROPCOMMANDFN SELECTION) SEDIT::JOIN - (SEDIT::NODE SEDIT::START SEDIT::END) FASL:OPCODE-SEQUENCE (FASL::TABLE) INTERPRET.REM.CM (RETFLG COM -) COMP.CALL (A) \\STRINGSTREAM.INIT (NOERRORFLG) TB.SELECTRANGE (EVENIFDELETED) CURRENT.WORD (NEW) -CHAT.SCREENPARAMS (INSTREAM TITLEMIDDLE EMACSMODE) |\\LFUpdateLeaderPage| (|access|) -|\\LFGetStreamForFile| (FILESPEC OLDSTREAM CREATEFLG) \\CENTICLOCK (PACKET) IRM.CREF.BUTTONEVENTFN ( -TYPE) ICMLARRAY.GETREGIONFN (MOVINGPOINT) BITBLT (WIDTH HEIGHT SOFTCURSORUP) OPENSTRINGSTREAM (FATP) -DSPDESTINATION (DESTINATION) CLOSENSOCKET (NOERRORFLG) UPDATEPCNODES (UPWARD) EVALQT (LISPXID) -\\BITBLT.BITMAP (CLIPPINGREGION WIDTH HEIGHT TEXTURE SOURCETYPE) INTERRUPTED (INTERRUPT THISPROC W -INTERRUPTED.PROC) \\LEAF.STREAM.IN.QUEUE (PUP FIRSTTIME IMPORTANT) \\FM.TOGGLE-CHANGESTATE (NEWSTATE) -LISPXSTOREVALUE (EVENT) \\TEDIT.FIND (TARGET CH) \\GATHER-CLEANUP-FORMS1 (FOUND-UNWIND) -\\SEARCHOPENFILES (ACCESS) MOVEATTACHEDWINDOWTOPLACE (EDGE) FASL:PROCESS-SEGMENT (FASL::TEXT-FN) -SI::BQUOTE-NCONC (SI::HEAD SI::TAIL) ADDTOCOM1 (LISTNAME NEAR) \\MAKE.PROCESS0 (|TtyDisplayStream| -SI::*RESETFORMS* EVENT) FILES?1 (FIRST) GRID (BORDER GRIDBM) SI::BQUOTE-CONS (SI::BCDR) -SI::BQUOTE-APPEND (SI::HEAD SI::TAIL) SCANFILE1 (LST DEFUNFLG) NIL -TESTFREE DEFAULT.BACKGROUND.COPYFN (|BackgroundCopyMenuCommands|) CL:RASSOC (CL::TEST-P CL::TEST-NOT-P - CL::KEY-P) TTBIN (\\CARET.UP) CL:READ-PRESERVING-WHITESPACE (\\\\PNAMESTRING.GLOBALRESOURCE) RSTRING -(\\\\PNAMESTRING.GLOBALRESOURCE) FIXAPPLY (FILEPKGFLG TYPE-IN? CLISPFLG DWIMUSERFORMS FAULTAPPLYFLG) -COMP.SELECTQ (SELECTQFMEMB) DISMISS (\\\\DISMISSTIMER.GLOBALRESOURCE) CHARACTER.PRINT (*PRINT-ESCAPE* -\\THISFILELINELENGTH) PRIN2-LONG-STRING (MAKEMAP) \\MAKE.PROCESS0 (HELPFLAG) TTDELETELINE ( -DISPLAYTERMFLG) \\RSTRING2 (*READ-SUPPRESS*) MOVEBOX (\\SOFTCURSORP) GETPUP (PUPTRACEFLG) CLMAPS2 ( -LCASEFLG) SPY.TREE (SPY.TREE) WINDOW.MOUSE.HANDLER (\\INTERRUPTABLE |\\LastInWindow| -BACKGROUNDCURSOROUTFN BACKGROUNDCURSORINFN BACKGROUNDCOPYRIGHTBUTTONEVENTFN -BACKGROUNDCOPYBUTTONEVENTFN BACKGROUNDBUTTONEVENTFN BACKGROUNDCURSORMOVEDFN BACKGROUNDCURSOREXITFN) -CANONICAL.HOSTNAME (\\IP.READY) READ-EXTENDED-TOKEN (\\\\PNAMESTRING.GLOBALRESOURCE) READBQUOTECOMMA ( -\\INBQUOTE) \\IDLER (\\VMEM.INHIBIT.WRITE \\IDLE.PASSWORD.SET) INSPECT/DATATYPE (INSPECTALLFIELDSFLG) -\\JISPEEK (*REPLACE-NO-FONT-CODE*) SHRIEKER (WORKFLAG) CLEARHASHFILES (SYSHASHFILELST) \\DISABLEGC1 ( -\\GCDISABLED) TB.USERDATA (NEWP) COMPSET (LAPFLG) UNIX-USERNAME (\\UNIXSTRING.GLOBALRESOURCE) -PFI.MAYBE.PP.DEFINITION (*PRINT-PRETTY-FROM-FILES*) \\SOFTCURSORPOSITION (\\SOFTCURSORUPP) FIXATOM ( -TAIL DWIMUSERFORMS NOSPELLFLG TYPE-IN? VARS DWIMIFYFLG NOFIXVARSLST0 CLISPFLG CLISPCHANGES CLISPERTYPE - NEWTAIL) DF (*LAST-DF*) SEDIT::SMART-TTYFN (TTYEDITFN) CL:MACHINE-INSTANCE (\\PUP.READY) OCTALSTRING -(\\\\NUMSTR.GLOBALRESOURCE \\\\NUMSTR1.GLOBALRESOURCE) CHARACTER (\\\\PNAMESTRING.GLOBALRESOURCE) -\\10MBSENDPACKET (\\RAWTRACING) DOBACKGROUNDCOM (|BackgroundMenu| |BackgroundMenuCommands|) INFILECOM -(ONFILETYPE ORIGFLG) REBREAK (XCL::*UNBROKEN-FNS*) SEND.FILE.TO.PRINTER (DEFAULTPRINTINGHOST) -\\HCPYMODEBLTCHAR (\\SOFTCURSORP \\SOFTCURSORUPP) LOADCOMP (RESETSTATE) TTYIN (TTYINERRORSETFLG -CTRLUFLG TTYINMAILFLG) TTYIN.FINISH (\\PROMPTFORWORD HELP \\NOVALUE \\REPEAT \\READING \\FILLINGBUFFER - \\STRINGVALUE \\COMMAND SPLST \\FIX TTYINUSERFN) ADJUSTLINE (\\AUTOFILL) FTPGETMARK (FTPDEBUGFLG) -\\LEAF.OPENERRORHANDLER (\\FTPAVAILABLE) \\FTP.WHENCLOSED (FTPDEBUGFLG) TTYIN1 (\\PROMPT1 \\FIRSTTIME -UNREADBUF \\TTSCRATCHFILE.GLOBALRESOURCE \\FILLINGBUFFER \\PFW.FIRSTTIME \\DONTCOMPLETE SHOWPARENFLG -SPLST TTYINCOMPLETEFLG \\LISPXREADING \\REPEAT \\READING \\PROMPT2 \\COMMAND TTYINMAILFLG \\RAISEINPUT -) TTWAITFORINPUT (\\WINDOWWORLD) EXEC-READ-LINE (CTRLUFLG) \\COURIER.RECORDTRAN (LCASEFLG) -COMP.LOOKUPVAR (GLOBALVARFLG) CLISPFORERR (DWIMESSGAG) DASSEM.DSTOREFNDEF (SVFLG) AUTOCR? (\\AUTOFILL) - \\SHIFTJISPEEK (*REPLACE-NO-FONT-CODE*) \\SHIFTJISIN (*REPLACE-NO-FONT-CODE*) RESTOREBUF (\\LASTAIL -\\LAST.DELETION) \\FORWARD.XIP (\\GATEWAYFLG \\PEEKNSNUMBER XIPTRACEFLG) SENDPUP (PUPTRACEFLG) -\\TIMER.INTERRUPTFRAME (\\PERIODIC.INTERRUPT) PFI.AFTER.NEW.PAGE (*PFI-TITLE* *PFI-TWO-SIDED* -*PFI-ITEM*) TTYIN.SETUP (\\READING) SEDIT::TRACK-SELECT (SEDIT::PENDING-SHIFT) CLOSEPUPSOCKET ( -\\PUPSOCKETS) \\NSRANDOM.RELEASE.IF.ERROR (RESETSTATE) DRAWGRAYBOX (\\SOFTCURSORP) CL:MAKE-STRING ( -INITIAL-ELEMENT-P) TTYDISPLAYSTREAM (\\TERM.OFD \\CARET.UP) \\ADJUST.USERNAME (DEFAULTREGISTRY -CH.DEFAULT.DOMAIN CH.DEFAULT.ORGANIZATION) LISPXUSEC (EDITQUIETFLG) \\LEAF.OPENFILE (\\FTPAVAILABLE -UNIXFTPFLG) MULTIFILEINDEX (*PFI-DONT-SPAWN*) UNIX-FULLNAME (\\UNIXSTRING.GLOBALRESOURCE) -TTYINPROMPTFORWORD (TTYIN.USE.EXACT.CHARS) COMP.EQ (OPTIMIZATIONSOFF) DWIMIFY1A (DWIMESSGAG DWIMIFYFLG - DWIMIFYING) IDLE (\\IDLING) \\SPPGETERROR (XIPTRACEFLG) UNIX-GETPARM (\\UNIXSTRING.GLOBALRESOURCE) -\\TRACKWITHBOX (BACKGROUNDCURSOREXITFN) MSPATHS4 (INVERTED) CHAT.CLOSE (\\CARET.UP CLOSECHATWINDOWFLG) - TTYINREAD (TTYINDEBUGFLG \\INSIDE.TTYIN) \\LOGIN.READ (DEFAULTREGISTRY) XCL::PPRINT-DEFINER (FORMFLG) - WAITFORINPUT (\\\\DISMISSTIMER.GLOBALRESOURCE) CHANGENAME (FILEPKGFLG) LOADFROM (DWIMFLG) -FLIPCURSORBAR (\\SOFTCURSORP \\CURRENTCURSOR) DWMFY2 (TAIL FORMSFLG DWIMCHECKPROGLABELSFLG NOSPELLFLG -ONLYSPELLFLG TYPE-IN? CLISPFLG ONEFLG) UNIX-GETENV (\\UNIXSTRING.GLOBALRESOURCE) \\FTP.HANDLE.NO ( -FTPDEBUGFLG) \\EUCIN (*REPLACE-NO-FONT-CODE*) COMPILE1 (BYTECOMPFLG) \\BULK.DATA.CLOSE ( -COURIERTRACEFLG RESETSTATE) \\WAITFORSYSBUFP (\\\\DISMISSTIMER.GLOBALRESOURCE) OVERFLOW? (\\AUTOFILL -DISPLAYTERMFLG) FIX89TYPEIN (FAULTARGS) GREET0 (GREETDATES FIRSTNAME) GETHOSTINFO (\\IPFLG -DEFAULT.OSTYPE) \\JISIN (*REPLACE-NO-FONT-CODE*) \\TEDIT.COMMAND.LOOP (TEDIT.SELPENDING -TEDIT.COPY.PENDING TEDIT.COPYLOOKS.PENDING TEDIT.MOVE.PENDING TEDIT.DEL.PENDING) HARDCOPYW ( -DEFAULTPRINTINGHOST) CL:MISMATCH (TEST-P TEST-NOT-P KEY-P) SETTEMPLATE (LISPXHIST) ESUBST (LISPXHIST) -/REMPROP (LISPXHIST) \\EUCPEEK (*REPLACE-NO-FONT-CODE*) TTYIN.SHOW.?ALTERNATIVES (?ACTIVATEFLG) CL:MERGE - (KEY-P) NECCSPEC (SFLG) TTADJUSTWORD (SPLST \\NOFIXSPELL \\FIX HELP) CL:MERGE-PATHNAMES ( -CL::VERSION-SPECIFIED-P) DEFC (DFNFLG) MOVD (FILEPKGFLG) U-CASE (\\\\PNAMESTRING.GLOBALRESOURCE) -CLISPRESPELL (NOSPELLFLG TYPE-IN?) HPRINT1 (U) CL:NSUBSTITUTE (TEST-P TEST-NOT-P FROM-END-P KEY-P) -\\FM.EDIT-INSERT (LIMITCHARS SYSLIMITCHARS MAXWIDTH) UNADVISE (ADVISEDFNS) \\SLOWHCPYMODEBLTCHAR ( -\\SOFTCURSORP \\SOFTCURSORUPP) FLIPCURSOR (\\SOFTCURSORP \\CURRENTCURSOR) \\HANDLE.RAW.10TO3 ( -XIPTRACEFLG) PROMPTFORWORD (\\PROMPTFORWORD.CURSOR) PRINT-EVENT-PROMPT (LISPXHISTORY) CHANGECALLERS ( -MSDATABASELST) \\IMAGEIOINIT (\\#DISPLAYLINES) RETDWIM1 (TREATASCLISPFLG DWIMIFYFLG DWIMIFYING -TYPE-IN? CLISPHELPFLG LCASEFLG) BITMAPBIT (\\SOFTCURSORP \\SOFTCURSORUPP) \\MEDW.BLTCHAR ( -\\SOFTCURSORP \\SOFTCURSORUPP) \\TRANSLATE.10TO3 (XIPTRACEFLG) DASSEM.DWRITEFN (LCFIL STRF) MKSTRING ( -PRXFLG) CL:NSUBSTITUTE-IF (FROM-END-P KEY-P) \\10MBGETPACKET (\\RAWTRACING) MOVD? (FILEPKGFLG) -CL:NSUBSTITUTE-IF-NOT (FROM-END-P KEY-P) CL:POSITION (TEST-P TEST-NOT-P FROM-END-P KEY-P) WRITE ( -*PRINT-CIRCLE-HASHTABLE*) CLEARCLISPARRAY (CLISPARRAY) CL::TIME-CALL (CL::TIMED-FORM-P) -WORDSPERNAMEENTRY (CROSSCOMPILING) TEDIT (TEDIT.DEFAULT.WINDOW) PRINTHISTORY2 (\#RPARS) -DBG::FIND-NAMED-STACK-POSITION (DWIMFLG) DWIMIFY2? (DWIMIFYFLG) OPT.JUMPTHRU (NEWOPTFLG) -FAKE-COMPILE-FILE (PEFP) \\FILINGSESSION.DEFPRINT (COURIERTRACEFILE) LISPXPRINTDEF (LISPXPRINTFLG -LISPXHIST) \\HANDLE.RAW.XIP (\\NS.READY XIPTRACEFLG \\NS.CHECKSUMFLG) MSPATHS2 (AVOIDING NOTRACE TO -INVERTED) CLISPIFYRPLAC (CLISPFLG CL\:FLG) PFI.MAKE.LPT.STREAM (*PFI-TWO-SIDED*) CHAT.CHOOSE.EMULATOR -(CHAT.EMULATORTYPE) \\DSPPRINTCR/LF (\\CARET.UP \\SOFTCURSORP \\SOFTCURSORUPP) \\LOOKUPPUPNUMBER ( -XIPTRACEFLG) \\IFS.LOOKUPFILE (*UPPER-CASE-FILE-NAMES* PUPTRACEFLG) MAKECREATE1 (HASHLINKS USINGEXPR) -CLISPIFYMAPS (LCASEFLG) CL:POSITION-IF (FROM-END-P KEY-P) DELDEF (MSDATABASELST) \\FTPERROR ( -FTPDEBUGFLG) SI::EXPAND-PROCEED-CASE (*BYTECOMPILER-IS-EXPANDING*) FIXSPELL (NOSPELLFLG TYPE-IN? -FIXSPELL.UPPERCASE.QUIET) DWMFY1 (CLISPRETRANFLG DWIMCHECK#ARGSFLG FORMSFLG) SUPERPRINT/COMMENT ( -**COMMENT**FLG FILEFLG MAKEMAP *PRINT-SEMICOLON-COMMENTS*) GETCHATWINDOW (CHATWINDOWLST) -\\CARET.FLASH? (\\CARET.UP) SEARCHPDL (SPAGHETTIFLG) \\PUPERROR (\\PEEKPUPNUMBER PUPTRACEFLG) -|\\VAMBufferSave| (|\\VAMbufferDirty|) DWMFY0 (DWIMIFYFLG FORMSFLG) CLISPFOR0 (DWIMIFYFLG LCASEFLG -DWIMESSGAG) \\TEXTINIT (*TEDIT-OLD-STREAM-ERROR-HANDLER*) \\SLOWBLTCHAR (\\SOFTCURSORP \\SOFTCURSORUPP -) \\LOAD-STREAM (FILEPKGFLG) CONDITIONS::EXPAND-RESTART-CASE (*BYTECOMPILER-IS-EXPANDING*) /SETSEPR ( -LISPXHIST) CL:POSITION-IF-NOT (FROM-END-P KEY-P) PROVIDE.PROMPTING.WINDOW (\\PROC.READY \\WINDOWWORLD) - PFI.MAYBE.SEE.PRETTY (*PRINT-PRETTY-FROM-FILES*) PRINT-BITMAPS-NICELY (*PRINT-ARRAY*) FIXEDITDATE ( -INITIALS) TEMPLATE (FILEPKGFLG MSDATABASELST) DASSEM.DASSEM (OPTIMIZATIONSOFF IPLUSNFLG) CLISPLOOKUP1 -(CLISPTRANFLG) \\CCLOSURE.DEFPRINT (\\THISFILELINELENGTH) COMP.EXPR (FRAME) EDITFROMFILE ( -EDITLOADFNSFLG) SI::EXPAND-CONDITION-CASE (*BYTECOMPILER-IS-EXPANDING*) RECLAIMMIN (\\GCDISABLED) -SPY.ADD.ENTRY (SPY.POINTERS) FNS.PUTDEF (DFNFLG ADDSPELLFLG FILEPKGFLG) \\DONEWEPHEMERALPAGE ( -\\NEWVMEMPAGEADDED) NEWDEFC (DFNFLG) \\SELECTREALPAGE (\\VMEM.PURE.LIMIT DOLOCKCHECKS -\\VMEM.INHIBIT.WRITE) MAPDL (SPAGHETTIFLG) TEDIT.FORMATPAGE (*TEDIT-PAGE-BREAKS*) DODIRCOMMANDS ( -COLUMNS NAMEFLG) WTFIX0 (DWIMIFYFLG DWIMIFYING) \\COURIER.WHENCLOSED (COURIERTRACEFLG) -SI::MONITOR-UNWIND (SI::*RESETFORMS*) EDITP (DWIMFLG) |\\PFTransferFilePage| (|\\label.GLOBALRESOURCE| -) MSCHECKVARS1 (LF1) SKOR (ALTFLG FASTYPEFLG) EDIT4F (UPFINDFLG) |\\VFMDelete1| (|firstFlag| -|lastFlag|) CLISPIFY2B (LCASEFLG CL\:FLG NOVALFLG CLISPFLG NEGFLG OPR0 CLTYP0 CLISPIFYUSERFN) /SETD ( -LISPXHIST) CL:REDUCE (INITIAL-VALUE-P) ADDFILE0 (DWIMFLG) COMPILER::COMPILE-AND-DUMP ( -COMPILER::*BLOCK-HASH-TABLE*) DISPLAYAFTERENTRY (|\\DisplayStoppedForLogout|) COMPILER::GENCODE-CALL ( -COMPILER::*TAIL-RECURSION-POLICY* COMPILER::*SPECIAL-LOCALS-BOUND* COMPILER::*AVAILABLE-LEXICAL-NAMES* -) FNTYP1 (CLISPARRAY) \\PROMPTFORWORDERASE (TTYD) LOAD (DWIMFLG PRETTYHEADER) BITMAPCREATE (WINDFLG) -RETDWIM (FIXCLK HELPCLOCK DWIMIFYFLG DWIMIFYING TYPE-IN? HISTENTRY CLISPFLG FORMSFLG NOSPELLFLG -CLISPCHANGES CLISPERTYPE) COURIER.OPEN (COURIERTRACEFLG) TEDITCHAT.MENUFN (\\CARET.UP) CLISPCAR/CDR ( -VAR2) READNUMBERINBASE (*READ-SUPPRESS*) CL:REMOVE-IF-NOT (FROM-END-P KEY-P) %PRINT-CONDITION ( -*PRINT-ESCAPE*) \\GETREGIONTRACKWITHBOX (BACKGROUNDCURSOREXITFN) MSPATHS1 (TABS INVERTED SEPARATE) -WTFIXLOADEF (DWIMIFYFLG) \\NSFILING.GETFILE (*NSFILING-RANDOM-ACCESS* *UPPER-CASE-FILE-NAMES*) -RECORDWORD (LCASEFLG) CL:REMOVE-DUPLICATES (TEST-P TEST-NOT-P FROM-END-P KEY-P) FNCHECK (DWIMFLG -ADDSPELLFLG) \\PROMPTFORWORDBS (TTYD RUBBING?) \\TEDIT.SELECT.CHARACTER (WORDSELFLG) CL:REMOVE-IF ( -FROM-END-P KEY-P) CLISPNOTVARP (DWIMIFYFLG DWIMIFYING SHALLOWFLG) \\PROMPTFORWORDBIN (BELLBEENHEARD?) -ASSURE.ETHER.ON (\\LOCALNDBS \\NSFLG) OPENPOSTSCRIPTSTREAM (POSTSCRIPT.PREFER.LANDSCAPE) -NEW/INSTANCE/OF/GRAPHNODE (BOX.LEAVES.FLG BOX.BOTH.FLG) PUTFILEMAP (BUILDMAPFLG) FTPPRINTCODE ( -FTPDEBUGFLG) CL:SEARCH (TEST-P TEST-NOT-P KEY-P) /SETBRK (LISPXHIST) NSPRINT (NSPRINT.WATCHERFLG) -/SETTOPVAL (LISPXHIST) DO-DISPATCH-MACRO (*READ-SUPPRESS*) CL:ROOM (CL::SP) \\DSPMOVELR (\\CARET.UP) -\\WRITEDIRTYPAGE1 (\\NEWVMEMPAGEADDED) \\TRANSLATE.3TO10 (XIPTRACEFLG) DWIMUNSAVEDEF (TYPE-IN?) -ADDFILE (ADDSPELLFLG) CHARACTER.READ (*READ-SUPPRESS*) EXPRCHECK (DWIMFLG ADDSPELLFLG) LISPXREADP ( -READBUF) \\MAYBEBLOCK (\\INTERRUPTABLE) \\RECLAIMCODEBLOCK (SI::*CLOSURE-CACHE-ENABLED*) -\\NSIN.24BITENCODING.ERROR (*SIGNAL-24BIT-NSENCODING-ERROR*) \\LEAF.GENERATEFILES (\\FTPAVAILABLE) -PROMPTCHAR (READBUF PROMPT#FLG PROMPTCHARFORMS) \\GETSTREAM (\\DEFAULTTTYDISPLAYSTREAM) -COMP.NUMBERCALL (OPTIMIZATIONSOFF) /REPLACEFIELD (LISPXHIST) PRINTCOPYRIGHT1 (COPYRIGHTSRESERVED) -FASL:PROCESS-FILE (*LOAD-VERBOSE*) %DEFPRINT-ARRAY (*PRINT-ARRAY* *PRINT-LEVEL*) \\EXPECTED.FILE.TYPE -(|FileTypeConfirmFlg|) UNDOSAVE (\#UNDOSAVES DWIMFLG) READVISE (SI::*UNADVISED-FNS*) PRINTCOPYRIGHT ( -COPYRIGHTFLG) SIMPLEP (CLISPARRAY) \\NSFILING.GENERATEFILES (FILING.ENUMERATION.DEPTH) CL:MEMBER ( -CL::TEST-P CL::TEST-NOT-P CL::KEY-P) WHO-LINE-HOST-NAME (*WHO-LINE-HOST-NAME*) LISPXTERPRI ( -LISPXPRINTFLG LISPXHIST) MSPATHS (MSCRATCHASH) CLISPIFYCROPS (CLISPFLG CL\:FLG SEG OPR0) -%PRINT-ARRAY-CONTENTS (*PRINT-LENGTH* *PRINT-LEVEL*) /SETA (LISPXHIST) \\GETMAPBUFFER ( -MAPEMPTYBUFFERLIST) HASH-LEFTPAREN (*READ-SUPPRESS* \\INBQUOTE) LISPXPRIN1 (LISPXPRINTFLG LISPXHIST) -COMP.CONST (OPTIMIZATIONSOFF) COMP.NUMERIC (OPTIMIZATIONSOFF) OPT.SCANOPT ( -COMPILE.DUNBIND.POP.MERGE.FLG NEWOPTFLG) DSPCLEOL (\\CARET.UP) \\CURVE2 (\\SOFTCURSORP \\SOFTCURSORUPP -) MSNEEDUNSAVE (CHECKUNSAVEFLG) \\GETSYSBUF (\\LONGSYSBUF) \\PFI.DO.HARDCOPY (\\PFI.PROCESS.COMMANDS) -MAPAFTERCLOSE (DEFAULTMAPFILE) FILECREATED (LOAD-VERBOSE-STREAM) %DEFPRINT-VECTOR (*PRINT-ARRAY* -*PRINT-LEVEL*) BLOCKCOMPILE (LCFIL LSTFIL) WAIT.FOR.TTY (\\WINDOWWORLD) PACK* (*PACKAGE* -\\\\PNAMESTRING.GLOBALRESOURCE) CHANGERECORD (MSDATABASELST) HASH-A (*READ-SUPPRESS*) -\\MAIKO.INPUT.INTERRUPT (\\RAWTRACING) READLINE (CTRLUFLG READBUF) \\TEDIT.CENTER.SEL.REV ( -TEDIT.FNKEY.VERBOSE) COMPILE-IN-CORE (BYTECOMPFLG) \\BSP.TIMERFN (\\BSP.NO.INACTIVITY.TIMEOUT) -\\GETKEY (\\\\KEYBOARDWAITBOX.GLOBALRESOURCE) COMP.ST (LEVEL) COMP.USERFN (COMPVARMACROHASH) -PRINTROUTINGTABLE (\\10MBLOCALNDB) HASH-B (*READ-SUPPRESS*) MSCHECKBOUNDFREE (MSCRATCHASH) CL:DELETE ( -TEST-P TEST-NOT-P FROM-END-P KEY-P) LISPX/1 (CLISPARRAY) STRPOSL (\\\\STRPOSLARRAY.GLOBALRESOURCE) -\\SETPUPCHECKSUM (\\PUP.CHECKSUMFLG) CLISPIFYNOT (NEGFLG CLISPFLG) PFI.PRINT.INDEX (*PFI-TWO-SIDED*) -DC (*LAST-DC*) \\SPP.CLOSE.IF.ERROR (RESETSTATE) HASH-BACKSLASH (*READ-SUPPRESS*) CLISPACKUP ( -FUNNYATOMLST) CL::PROCESS-ACCESSORS (COMPILER::*NEW-COMPILER-IS-EXPANDING*) FIX-FORM ( -*EDIT-INPUT-WITH-TTYIN*) /DECLAREDATATYPE (LISPXHIST) COMP.STTAG (LEVEL FRAME) COMP.PUNT (MACEXP) -\\3MBSENDPACKET (\\RAWTRACING \\ETHERLIGHTNING PUPTRACEFLG XIPTRACEFLG) BLOCKCOMPILE1 (BLKAPPLYFNS -BYTECOMPFLG STRF) DMCHAT.HANDLE.WRAP (CHAT.AUTOCRLF) LISPXPRINT (LISPXPRINTFLG LISPXHIST) BCOMPL1A ( -DESTINATIONENV) \\PROC.AFTER.WINDOWWORLD (\\WINDOWWORLD) \\CLEANUPDISKQUEUE (\\DISKDEBUG) EDITDATE? ( -*REPLACE-OLD-EDIT-DATES*) CLISPATOMARE2 (DEST) \\PEEKSYSBUF (\\LONGSYSBUF) COMP.TRYUSERFN ( -COMPILEUSERFN) OPT.POSTOPT (OPTIMIZATIONSOFF XVARFLG MERGEFRAMEFLG) POLYSHADE.IP (*) VMEM.PURE.STATE ( -\\VMEM.PURE.LIMIT) /PUT (LISPXHIST) CHANGEI.S. (MSDATABASELST) HASH-DOT (*READ-SUPPRESS*) /RPLNODE ( -LISPXHIST) \\DOVMEMFULLINTERRUPT (\\EXTENDINGVMEMFILE) CHAT.TAKE.INPUT1 (STREAM) OPT.FRAMEMERGE ( -MERGEFRAMEFLG) \\FTP.RENAMEFILE (FTPDEBUGFLG) COMPILE.FILE.RESET (RESETSTATE) \\CONS.UFN ( -\\RECLAIM.COUNTDOWN) UNSAVED1 (ADDSPELLFLG) ENUM-STRING (\\\\NUMSTR.GLOBALRESOURCE -\\\\NUMSTR1.GLOBALRESOURCE) FTPPRINTMARK (FTPDEBUGFLG) EDITLOADFNS? (FILEPKGFLG) \\NSINIT ( -\\3MBLOCALNDB \\GATEWAYFLG) PRINTSPP (PRINTSPPDATAFLG) \\HTFIND (\\GCDISABLED) \\ROUTINGTABLE.INFOHOOK - (\\10MBLOCALNDB) BRECOMPILE1 (BYTECOMPFLG) \\RESHOWBORDER1 (\\SOFTCURSORP \\SOFTCURSORUPP) -COPY.WINDOW.TO.BITMAP (\\SOFTCURSORP \\SOFTCURSORUPP) MSCHECKBLOCKBASIC (ENTRIES BLKAPPLYFNS) -HASH-MINUS (*READ-SUPPRESS*) CLREMPARS (CLREMPARSFLG) PFI.PROCESS.FILE (*PFI-PENDING-COMMENTS*) -\\COURIER.EXPEDITED.OVERFLOW (NSWIZARDFLG) SPY.MERGE (SPY.HASH) SIMPLETEXTEDIT ( -\\TTSCRATCHFILE.GLOBALRESOURCE) \\BLTSHADE.DISPLAY (\\SOFTCURSORP \\SOFTCURSORUPP) \\HANDLE.RAW.3TO10 -(XIPTRACEFLG) \\REUSETO (TYPENAME) CL:SUBSTITUTE-IF-NOT (FROM-END-P KEY-P) COMP.STJUMP (LEVEL) -HASH-PLUS (*READ-SUPPRESS*) PFI.PRINT.MULTI.INDEX (*PFI-TWO-SIDED*) \\HDCPYDSPPRINTCHAR (\\CARET.UP) -HASH-COMMA (*READ-SUPPRESS* COMPILER::*COMPILER-IS-READING*) CLISPNOEVAL (DWIMINMACROSFLG) -PAINTW.CACHE.SHADE (PAINTW.SHADES) PRETTYPRINT (ADDSPELLFLG SOURCEFILE SOURCEFILENV DWIMFLG -LISPXHISTORY) CL:SUBSTITUTE (TEST-P TEST-NOT-P FROM-END-P KEY-P) MSUPDATE (ANYFOUND) MOUSECHORDWAIT ( -\\MOUSECHORDTICKS) HASH-C (*READ-SUPPRESS*) \\FORWARD.PUP (\\PEEKPUPNUMBER \\GATEWAYFLG PUPTRACEFLG) -CL:SUBSTITUTE-IF (FROM-END-P KEY-P) CLOSE-AND-MAYBE-DELETE (RESETSTATE) DWIMIFY1? (DWIMIFYFLG) EDITFNS - (DWIMFLG) DP (*LAST-DP*) HASH-QUOTE (*READ-SUPPRESS*) \\DSPPRINTCHAR (\\CARET.UP) -SI::INSTALL-CLOSURE-CACHE (SI::*CLOSURE-CACHE-ENABLED*) ADDSPELL1 (LISPXHIST) HASH-STAR ( -*READ-SUPPRESS*) PRETTYPRINT3 (LAMBDAFONT FONTCHANGEFLG) HASH-R (*READ-SUPPRESS*) \\DRAWLINE.DISPLAY ( -\\\\BRUSHBBT.GLOBALRESOURCE) HASH-DOUBLEQUOTE (*READ-SUPPRESS*) HASH-S (*READ-SUPPRESS*) \\MISCN.UFN ( -\\MISCN-TABLE) BCOMPL.BODY (LCFIL) \\FILLCIRCLE.DISPLAY (\\SOFTCURSORP \\SOFTCURSORUPP -\\\\BRUSHBBT.GLOBALRESOURCE) HASH-X (*READ-SUPPRESS*) SUPERPRINT0 (MAKEMAP) \\RPLCONS ( -\\RECLAIM.COUNTDOWN) \\DRAWCURVE.DISPLAY (\\\\BRUSHBBT.GLOBALRESOURCE) SENDXIP (\\NS.READY XIPTRACEFLG -) \\LEAF.RENAMEFILE (\\FTPAVAILABLE UNIXFTPFLG) CACHEMACRO (*IN-COMPILER-LET*) SUBPRINT (MAKEMAP -CLISPFLG CLISPIFYPACKFLG) DOWINDOWCOM (\\CARET.UP) TYPE-VARIABLE-FROM-TYPE-NAME (*PACKAGE*) -GET-ENVIRONMENT-AND-FILEMAP (USEMAPFLG) HASH-COLON (*READ-SUPPRESS*) HASH-O (*READ-SUPPRESS*) -POSTEDITALISTS (CLISPARRAY) HASH-EQUAL (*READ-SUPPRESS*) /MOVD (ADDSPELLFLG) \\GETMISCNSOCKET ( -\\MISC.NSOCKET) MSSOLVE (MSTHOSE) \\DRAWELLIPSE.DISPLAY (\\SOFTCURSORP \\SOFTCURSORUPP -\\\\BRUSHBBT.GLOBALRESOURCE) /SETWORDCONTENTS (LISPXHIST) \\MEDW.MOVEW (\\SOFTCURSORP \\SOFTCURSORUPP) - HASH-NUMBER-SIGN (*READ-SUPPRESS*) \\DRAWCIRCLE.DISPLAY (\\SOFTCURSORP \\SOFTCURSORUPP -\\\\BRUSHBBT.GLOBALRESOURCE) PRETTYCOMPRINT (LOAD-VERBOSE-STREAM) CHANGEVAR (MSDATABASELST) -OLD.FIND.SYMBOL (|\\OneCharAtomBase|) CLISPATOM1 (89FLG CURRTAIL TYPE-IN? NOSPELLFLG DWIMIFYFLG ONEFLG - CLISPCONTEXT FORMSFLG PARENT) \\ASSIGNDATATYPE1 (CROSSCOMPILING) FLTSTR (\\\\NUMSTR.GLOBALRESOURCE -\\\\NUMSTR1.GLOBALRESOURCE) \\BITBLT.DISPLAY (\\SOFTCURSORP \\SOFTCURSORUPP) INTERRUPTCHAR (LISPXHIST) - \\NSFILING.GET.STREAM (RESETSTATE) SI::DISABLE-CLOSURE-CACHE (SI::*CLOSURE-CACHE-ENABLED*) -|\\VAMFreePageGroup| (|\\\\DFSVAMjunkPage.GLOBALRESOURCE| |\\\\DFSVAMpage.GLOBALRESOURCE|) -GETCLEARINGHOUSE (CH.DEFAULT.DOMAIN CH.DEFAULT.ORGANIZATION) REHASHFILE (REHASHGAG) CL::PUTHASH ( -EXTRA-P) DSFIT1 (TAILFLG) CLISPCAR/CDR1 (DWIMIFYFLG CHECKCARATOMFLG VAR2) PRETTYCOM (LISPXPRINTFLG -DWIMFLG ORIGFLG FILEFLG FONTCHANGEFLG LAMBDAFONT) \\HASHTABLE.DEFPRINT (\\THISFILELINELENGTH) PRINTNUM - (\\\\NUMSTR.GLOBALRESOURCE \\\\NUMSTR1.GLOBALRESOURCE) \\MEDW.CLOSEW (\\SOFTCURSORP \\SOFTCURSORUPP) -GETXIP (XIPTRACEFLG) CLISPTRAN (CLISPARRAY \#CLISPARRAY) LISPXUSE1 (GENLST) \\SET.VMEM.FULL.STATE ( -\\VMEM.FULL.STATE) COMPILER::GENCODE-PROGN (COMPILER::*POP-SUPPRESSION-POLICY*) TTECHO.TO.FILE ( -\\PROMPT1 \\PROMPTFORWORD) CHECKTRAN (CLISPARRAY CLISPTRANFLG) \\TURN.ON.PROCESSES (AUTOPROCESSFLG) -UNCLISPTRAN (CLISPARRAY) WHO-LINE-USERNAME (*WHO-LINE-CURRENT-USER*) COMPILE1A (DWIMIFYCOMPFLG -FILEPKGFLG CLISPTRANFLG CLISPARRAY) \\DOINTERRUPTHERE (\\INTERRUPTABLE) \\3MBGETPACKET (\\RAWTRACING) -COMP.UBFLOAT2 (OPTIMIZATIONSOFF) PRINTDATE (FILEPKGFLG) \\10MB.INPUT.INTERRUPT (\\10MB.COLLECTSTATS) -CHANGEMACRO (MSDATABASELST) SPY.BUFFER.ENTRY (SPY.POINTERS) /PUTD (LISPXHIST) DO-HISTORY-SEARCH ( -*EVENTS*) \\CHECKARRAYBLOCK (ARRAYBLOCKCHECKING) \\LEAF.READFILENAME (*UPPER-CASE-FILE-NAMES*) -FIXLISPX/ (TYPE-IN?) \\NSRANDOM.READPAGES (\\NSRANDOM.CHECK.CACHE) MSMARKCHANGED (MSDATABASELST) -\\HANDLE.RAW.PUP (\\PUP.READY PUPTRACEFLG \\PUP.CHECKSUMFLG) MSDWIMTRAN (DWIMFLG CLISPARRAY -CLISPTRANFLG) /PUTPROP (LISPXHIST) \\MAIKO.ETHER-INTERRUPT (\\RAWTRACING) EDITFB (EDITLOADFNSFLG) -PRETTYDEF1 (NLAMALST NLAMLST LAMALST) CLISPFOR1 (I.S.TYPE) /SETATOMVAL (LISPXHIST) \\COURIER.RESULTS ( -COURIERTRACEFLG) \\VANILLAHOSTNAMEP (\\PSEUDODSK) \\ALLOCHUNK (\\IN.MAKEINIT) COMP.STFN (BLKFLG) -SEDIT::SEDITE (FILEPKGFLG) \\AGE.ROUTING.TABLE (\\RT.PURGEFLG) MSVERB (LASTADVERB) \\ALLOCBLOCK.OLD ( -\\HUNKING?) DWIM-SYMBOL-PACKAGE (FAULTAPPLYFLG) \\PRINDATUM.TO.STRING (*PRINT-RADIX* -\\\\NUMSTR.GLOBALRESOURCE \\\\NUMSTR1.GLOBALRESOURCE *PRINT-CIRCLE*) PRINTFNS (NEWFILEMAP) -\\MAIKO.10MBSENDPACKET (\\RAWTRACING) SEDIT:RESET-FORMATS (SEDIT::*FSPEC-TABLE-COPY*) CONTROL-T ( -LAST^TSWAPTIME) COMPILEUSERFN1 (FILEPKGFLG) BRKDWNSETUP (BRKDWNCOMPFLG) PRINTDEF (\#RPARS -FONTCHANGEFLG PRETTYFLG) PROCESS.STATUS.WINDOW (SELECTEDPROC) \\MEDW.OPENW (\\SOFTCURSORP -\\SOFTCURSORUPP) \\MERGEFORWARD (\\ARRAYMERGING) \\CONVERT.FLOATING.NUMBER ( -\\\\CFNSTRING.GLOBALRESOURCE) COMPILER::COMPILE-FILE-PROCESS-FUNCTION (COMPILER::*COMPILING-DEFINER*) -GAINSPACE (SMASHPROPSLST1) \\MAIKO.PUNTBLTCHAR (\\SOFTCURSORP \\SOFTCURSORUPP) \\LINKBLOCK ( -\\FREEBLOCKBUCKETS) CL:COMPILE-FILE (COMPILER::F-M-F-GIVEN COMPILER::P-E-F-GIVEN) PRINTDATE1 ( -BUILDMAPFLG FILEPKGFLG) \\NEW.READ.SYMBOL (LITATOM-PACKAGE-CONVERSION-ENABLED) \\DOHELPINTERRUPT1 ( -\\INTERRUPTABLE) CRITSECT (\\FILL.DEBUG) PFI.ENQUEUE (\\PFI.PROCESS) \\HANDLE.RAW.PACKET ( -\\ETHERLIGHTNING) CL:MAKE-ARRAY (DISPLACED-TO-P INITIAL-ELEMENT-P INITIAL-CONTENTS-P -DISPLACED-TO-BASE-P DISPLACED-INDEX-OFFSET-P) MSPRGDWIM (DWIMFLG) UNDOSET (LISPXHIST SPAGHETTIFLG) -CL:GENSYM (CL::X-P) TTYINEDIT (TTYINAUTOCLOSEFLG \\TTSCRATCHFILE.GLOBALRESOURCE) \\MERGEBACKWARD ( -\\ARRAYMERGING) LINBUF (\\LINBUF) MSNOTICEFILE (MSHASHFILE) \\NEW.MKATOM (|\\OneCharAtomBase|) -|\\UFSRenameFile| (|FileTypeConfirmFlg|) DEFAULTMAKENEWCOM (DEFAULTCOMHASFILEFLG) \\MAPPNAME.INTERNAL -(\\\\MAPPNAMESTREAM.GLOBALRESOURCE) FIXAPPLY1 (TYPE-IN?) \\NSRANDOM.PREPARE.CACHE ( -\\NSRANDOM.CHECK.CACHE) PACKC (\\\\PNAMESTRING.GLOBALRESOURCE) OPT.CHECKTAG (LEVEL) POSTEDITPROPS ( -CLISPARRAY) DINFO.SELECT.GRAPH (DINFO.GRAPHS) GETFILEMAP (USEMAPFLG) OUTPUT ( -MULTIPLE.STREAMS.PER.FILE.ALLOWED) TRAPLOOP (TRAP.DEBUG) MSCHECKEMPTY (MSDBEMPTY FILELST) -XCL::%DEFINE-TYPE-PUTDEF (LISPXHIST) PACK (\\\\PNAMESTRING.GLOBALRESOURCE) COMPAREFAIL (LOOSEMATCH) -SETDISPLAYHEIGHT (\\EM.DISPLAYHEAD) DWIMIFY (DWIMFLG) \\FIXLOCALNET (\\LOCALNDBS) PFI.NEW.LISTFILES1 ( -*PFI-DONT-SPAWN*) PRETTYDEF (BUILDMAPFLG) DIRPRINTNAME (NAMEPRINTED) \\HCPYMODEDSPPRINTCHAR ( -\\CARET.UP) CL:SUBST (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) PRINTDEF1 (NEWFILEMAP) SCANDEFINEQ (DICT0 -BUILDMAPFLG FNADRLST FNLST VARLST DICT) CLISPATOM2D (ENDTAIL FORMSFLG PARENT) \\CURVEEND (DASHON -\\SOFTCURSORP \\SOFTCURSORUPP BBT DASHTAIL) \\MAIKO.ALLOCBLOCK (\\HUNKING? \\RECLAIM.COUNTDOWN) -OPT.CHLEV (LEVEL) \\MAPPNAME (PRXFLG) \\10MB.OUTPUT.INTERRUPT (\\10MB.COLLECTSTATS) \\UFS.FULLNAME ( -*DSK-UPPER-CASE-FILE-NAMES*) SCROLLW (\\CARET.UP) \\FIND.LOCALPUPHOSTNUMBER (PUPTRACEFLG) CLISPCOND ( -LCASEFLG SEG) LVLPRIN (PRIN2FLG) \\PSWOP.SELECTED (SELECTEDPROC) CLISPIF3 (LCASEFLG) ASKUSERCHAR ( -NOCASEFLG) CLISPIFY (FILEPKGFLG) \\IDLE.ISMEMBER (DEFAULTREGISTRY CH.DEFAULT.DOMAIN) FIXPRINTIN ( -DWIMIFYFLG DWIMIFYING FAULTAPPLYFLG LCASEFLG) PRETTYVAR1 (FONTCHANGEFLG PRETTYCOMFONT) \\PSW.SELECTED -(SELECTEDPROC) FONTMAPARRAY (\\FONTMAPCACHE) CHOOZ (DWIM.GIVE.UP.TIME RUNONFLG) SCANCOMPILEDFN (DICT0 -BUILDMAPFLG FNLST FNADRLST VARLST DICT) CLISP3C (CLISPIFYPACKFLG SEG) SYSBUF (\\SYSBUF) SPELLFILE ( -DWIMFLG) BLOCK (\\WINDOWWORLD) CL::DEFAULT-STRUCTURE-PRINTER (XCL:*PRINT-STRUCTURE*) COMPILEUSERFN ( -DWIMFLG CLISPARRAY CLISPTRANFLG DWIMESSGAG) |\\VAMAllocPageGroup| (|\\\\DFSVAMjunkPage.GLOBALRESOURCE| - |\\\\DFSVAMpage.GLOBALRESOURCE|) MSINIT (MSDATABASELST) \\CURVE (DASHON \\SOFTCURSORP \\SOFTCURSORUPP - DASHTAIL) CLISPFOR (DWIMIFYFLG) TTY.PROCESS (\\CARET.UP) LVLPRIN0 (PRIN2FLG **COMMENT**FLG) CL:SUBLIS - (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) LISPXPRIN2 (LISPXPRINTFLG LISPXHIST) LISPXSPACES (LISPXPRINTFLG - LISPXHIST) CL:NSUBST (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) \\IDLE.AUTHENTICATE (DEFAULTREGISTRY) -SAVEPUT (LISPXHIST ADDSPELLFLG) \\ARRAYBLOCKMERGER (\\HUNKING?) DEFMACRO-ARG-TEST ( -%UNBOUNDED-ARG-COUNT) \\#BLOCKDATACELLS (\\HUNKING?) TTYIN.READ?=ARGS (\\TTSCRATCHFILE.GLOBALRESOURCE) - /ADDPROP (LISPXHIST) \\CHECKFORSTORAGEFULL (\\STORAGEFULL) COMP.ARGTYPE (BLKFLG) COMP.SETARG ( -COMPILE.ARG.FAST.FLG) ADDTO (ONLYRELS EACHTIME) \\PRINT-USING-ADDRESS (\\THISFILELINELENGTH) -HISTORYFIND1 (_FLG PREDFLG =FLG REREADFLG L) PRINTPARA1 (P2FLAG) PFI.HANDLE.* (*PFI-PENDING-COMMENTS*) - \\M44ACTONVMEMFILE (|\\XVmem|) COLORDISPLAYP (|ColorScreenBitMap|) CL:NSUBLIS (CL::TEST-P -CL::TEST-NOT-P CL::KEY-P) FFILEPOS (\\\\FFDELTA1.GLOBALRESOURCE \\\\FFDELTA2.GLOBALRESOURCE -\\\\FFPATCHAR.GLOBALRESOURCE) CHECKRECORDNAME (NAME) CL::%RATIO-PRINT (*PRINT-RADIX* -\\THISFILELINELENGTH) FB.PRINTFN (FB.BROWSER.DIRECTORY.FONT) ASSURE.PUP.READY (\\PUP.READY \\10MBFLG -\\GATEWAYFLG) CLISP4 (CLISPFLG) \\ETHEREVENTFN (\\3MBFLG \\10MBFLG \\LOCALNDBS \\NSFLG \\GATEWAYFLG) -L-CASE (\\\\PNAMESTRING.GLOBALRESOURCE) LOADFNS (FILEPKGFLG DWIMFLG) FB.FINISH.COMMAND (RESETSTATE) -\\LOOKUPPORT (PUPTRACEFLG) PREEDITFN (FILEPKGFLG CLISPARRAY) CHAT.STARTUP (CHAT.TTY.PROCESS) -BRKDWNINIT (BDPTR) PFI.HANDLE.EXPR (*PFI-PENDING-COMMENTS*) CARET (\\CARET.DEFAULT \\CARET.UP) -CLISPBROADSCOPE1 (DWIMIFYFLG) /CNDIR (LISPXHIST) DUMPDATABASE1 (DUMPEDFLG) COMP.ARG ( -COMPILE.ARG.FAST.FLG) PRINTXIPROUTE (XIPTRACETIME) CL:UNION (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) -\\AUTHENTICATION.FIND.SERVER (\\AUTHENTICATION.SERVER.CACHE) TTY/EDITE (ADDSPELLFLG) -\\TEXTDSPYPOSITION (\\#DISPLAYLINES) CL::%COMPLEX-PRINT (\\THISFILELINELENGTH) \\10MBRAWRECEIVE ( -\\10MB.GETGARBAGE) BMOBJ.DISPLAYFN (*SMALLSCREEN* *SMALLSCREENFACTOR*) \\TEDIT.CENTER.SEL ( -TEDIT.FNKEY.VERBOSE) \\DSPFONT.IP (*INTERPRESS-PRINTER-DSPFONT-PATCH*) \\CORE.PACKFILENAME ( -*UPPER-CASE-FILE-NAMES*) \\SLOWHDCPYBLTCHAR (\\SOFTCURSORP \\SOFTCURSORUPP) CL:INTERSECTION (CL::TEST-P - CL::TEST-NOT-P CL::KEY-P) DSPBACKUP (\\CARET.UP) CLISPATOM2A (BROADSCOPE DWIMIFYFLG NOSPELLFLG -TYPE-IN? VARS TENTATIVE) VIDEOCOLOR (|\\VideoColor|) SAVESET (ADDSPELLFLG LISPXHIST) COMP.PROG ( -OPTIMIZATIONSOFF) EDITF2 (RESETSTATE) \\PRINDATUM (*PRINT-RADIX* *PRINT-ESCAPE* -\\\\NUMSTR.GLOBALRESOURCE \\\\NUMSTR1.GLOBALRESOURCE PRXFLG) DV (*LAST-DV*) \\DURATIONTRAN (LCASEFLG) -DO.EDIT.PP (\\READING \\TTSCRATCHFILE.GLOBALRESOURCE) CL:SET-DIFFERENCE (CL::TEST-P CL::TEST-NOT-P -CL::KEY-P) /DWIMCHECKTRAN (CLISPARRAY CLISPTRANFLG \#CLISPARRAY) CLISP3 (CLISPFLG NEGFLG -CLISPIFYENGLSHFLG PARENT OPR0 CLTYP0 CLISPIFYPACKFLG) \\STARTDISPLAY (\\WINDOWWORLD \\MAINSCREEN) -MARKASCHANGED (FILEPKGFLG LISPXHIST) CLISPIFYFNS (DWIMFLG) FIX89A (TYPE-IN? DWIMIFYFLG) CL:NINTERSECTION - (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) CL:NUNION (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) -CL:SET-EXCLUSIVE-OR (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) CHAT.TYPEOUT (\\CARET.UP CHATDEBUGFLG -\\LONGSYSBUF) COMP.TOPLEVEL.COMPILE (COMPILEUSERFN LAMBDANOBIND) CL:NSET-DIFFERENCE (CL::TEST-P -CL::TEST-NOT-P CL::KEY-P) |\\PFTrimHelper| (|\\PFDebugFlag|) DIRFILENAME (*UPPER-CASE-FILE-NAMES*) -\\TRANSLATE-CL\:LAMBDA (*CHECK-ARGUMENT-COUNTS*) CL:SUBSETP (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) -\\STOPSCROLL? (\\WINDOWWORLD) ASKUSER$ (NOECHOFLG) MAKEFILE (MAKEFILEREMAKEFLG) CL:NSET-EXCLUSIVE-OR ( -CL::TEST-P CL::TEST-NOT-P CL::KEY-P) OPT.DELCOPYFN (Z) CL:ADJOIN (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) - \\NSFILING.LOGIN (RESETSTATE) \\RTP.ERROR (PUPTRACEFLG) MSPRGLAMBDA (INCLISP EACHTIME DWIMFLG) -BMOBJ.IMAGEBOXFN (*SMALLSCREEN* *SMALLSCREENFACTOR*) DO?CMD.ERRORHANDLER (\\STARTED) -SEDIT::FINALIZE-MOUSE-SELECTION (SEDIT::PENDING-SHIFT) /SETTERMTABLE (LISPXHIST) \\TRANSMIT.STRATEGY ( -\\BSP.OVERLAP.DATA.WITH.ACK) CHANGEFONT (FONTCHANGEFLG) \\PACKDATE (|\\DayLightSavings|) COMP.ANONP ( -BLKFLG) FAULTAPPLY (CLISPARRAY DWIMFLG) OPT.RETPOP (XVARFLG) EDITH (READBUF EDITHISTORY) \\FILLBUFFER -(*READ-NEWLINE-SUPPRESS*) PROCESSWORLD (\#SCHEDULER# \\RUNNING.PROCESS \\WINDOWWORLD) ONFILE ( -MSHASHFILE) SUBPRINT/ENDLINE (FORMFLG) CLISP3B (OPR0 LST) END.DELETE.MODE (\\DELETING) \\FTP.NEXTFILE -(FTPDEBUGFLG) CLISPIF (DWIMIFYFLG) \\NSFILING.FULLNAME (*UPPER-CASE-FILE-NAMES*) START.CLEARINGHOUSE ( -LOCAL.CLEARINGHOUSE) CHANGESLICE (LISPXHISTORY EDITHISTORY) TEDIT.HARDCOPY (DEFAULTPRINTINGHOST) -\\OPENLEAFCONNECTION (RESETSTATE) LOOKUP.NS.SERVER (*ASSUME-ZERO-NSSOCKETS*) SUPERPRINT (MAKEMAP -FORMFLG PRETTYTRANFLG) ASKUSERPRIN1 (LISPXPRNTFLG) \\M-VMEMSAVE (\\VMEM.PURE.LIMIT VMEM.COMPRESS.FLG) -CL:ASSOC-IF (CL::KEY-P) \\LEAF.HANDLE.INPUT (LEAFDEBUGFLG) |\\PFEnsureInitialized| (|\\PFInitialized|) - EDITDEFAULT (LCFLG EDITHISTORY TYPEIN EDITUSERFN REREADFLG EDITHIST DWIMFLG) DO.EDIT.COMMAND ( -\\REPEAT \\READING TTYINCOMPLETEFLG) EDITRAN (TYPEIN) CONSTANTEXPRESSIONP (COMPVARMACROHASH) -CL:ADJUST-ARRAY (ELEMENT-TYPE-P FILL-POINTER-P DISPLACED-TO-P INITIAL-ELEMENT-P INITIAL-CONTENTS-P -DISPLACED-TO-BASE-P DISPLACED-INDEX-OFFSET-P) COMP.LINKCALLP (BLKFLG) MAKE-VECTOR (INITIAL-ELEMENT-P) -\\DOSTACKOVERFLOW (\\NEED.HARDRESET.CLEANUP) PURGEHISTORY (ARCHIVEFLG) PRETTYPRINT2 (SOURCEFILENV) -MSPARSE (NOSPELLFLG) \\MEDW.GETSCREENREGION (BACKGROUNDCURSOREXITFN) SETTAIL? (\\DELETING \\LASTAIL) -\\MOVEFRAME (\\STACKOVERFLOW) PRINENDLINE (MAKEMAP) CL:ASSOC-IF-NOT (CL::KEY-P) \\RUN.PROCESS ( -\\PROC.RUN.NEXT.FLG) \\MAIKO.CONS.UFN (\\RECLAIM.COUNTDOWN) DO.SHIFTED.SELECTION (\\CARET.UP) -\\SETUPUSERSTACK (\\DOFAULTINIT) /SETREADTABLE (LISPXHIST) DELETELINE (DISPLAYTERMFLG) COMPSETREAD ( -DWIMFLG READBUF REREADFLG LISPXHISTORY) EDITCOM (FINDFLAG) FIX89 (TAIL DWIMIFYFLG) \\SETXIPCHECKSUM ( -\\NS.CHECKSUMFLG) \\IDLE.OUT (\\IDLING) RECORDECL0 (CLISPARRAY) EDRPT (MAXLOOP) SPELLFILE1 (VERSION) -SEDIT:RESET (SEDIT::CONTEXTS) CALLS (COMPILEUSERFN) \\HDCPYBLTCHAR (\\SOFTCURSORP \\SOFTCURSORUPP) -CL:RASSOC-IF (CL::KEY-P) \\IRM.SMART.REF (\\IRM.KEYWORDS) \\FONTFILENAME (*USEOLDFONTDIRECTORIES*) -\\MKATOM (|\\OneCharAtomBase|) TTGIVEHELP1 (SPLST) \\CREATE.SYMBOL (\\IN.MAKEINIT) CL:MAKE-SEQUENCE ( -INITIAL-ELEMENT-P) \\EXTENDSTACK (\\STACKOVERFLOW) /ECHOMODE (LISPXHIST) \\GENERIC-UNREGISTER-STREAM ( -*ISSUE-CLOSE-WARNINGS*) \\SPY.INTERRUPT (SPY.POINTERS \\INTERRUPTABLE) MSHASHLIST1 (OTHERSET) -BIGNUM.DEFPRINT (*PRINT-RADIX* \\THISFILELINELENGTH) FINDATOM (PARENT) SPELLFILEDIR (HOST) -ETHERHOSTNAME (PUPTRACEFLG) EDITCOML (LCFLG ORIGFLG TYPEIN) CL:COUNT-IF (KEY-P) CLISP\ (CLISPARRAY -\#CLISPARRAY) ED (*ED-OFFERS-PROPERTY-LIST*) CLISPATOM2 (ENDTAIL FORMSFLG DWIMIFYFLG BROADSCOPE -CLISPCHANGE TENTATIVE TYPE-IN?) FIXSPELL1 (LISPXHIST REREADFLG TYPE-IN? APPROVEFLG CLISPCHANGES -DWIMWAIT) CL:COUNT-IF-NOT (KEY-P) \\TTW1 (\\SOFTCURSORP \\SOFTCURSORUPP) CL::STEP-COMMAND ( -CL::*STEP-STATE*) \\WRITE1 (*PRINT-PRETTY* *PRINT-CIRCLE* *PRINT-CIRCLE-HASHTABLE* *PRINT-ESCAPE*) -CL:RASSOC-IF-NOT (CL::KEY-P) WBREAK (ONP) EDITSAVE (EDITLISPFLG) SHOW.MATCHING.PAREN (\\CARET.UP) -/PUT+1 (LISPXHIST) CONDITIONS::%RESTART-PRINTER (*PRINT-ESCAPE*) \\MEDW.GETSCREENPOSITION ( -BACKGROUNDCURSOREXITFN) EDITCOM1 (TYPEIN) ASKUSERSETUP (ECHOEDFLG) /RAISE (LISPXHIST) -CL:DELETE-DUPLICATES (TEST-P TEST-NOT-P FROM-END-P KEY-P) \\ALLOCBLOCK (\\HUNKING? \\RECLAIM.COUNTDOWN -) CLISPATOM1A (DWIMIFYFLG CLISPCONTEXT ONEFLG TENTATIVE) \\CORE.GETNEXTBUFFER (\\INTERRUPTABLE) -EDITNCONC (CHANGESARRAY) EDITCOMA (ORIGFLG UNDOLST1 EDITHIST EDITCHANGES EDITLFLG LISPXHIST ATM TYPEIN - LCFLG EDITHISTORY MARKLST UNFIND LASTP1 LASTP2 COMS) \\MKATOM.FULL (\\STORAGEFULL) EDIT!UNDO ( -EDITHISTORY) EDITSAVE1 (EDITHIST EDITHISTORY REREADFLG) HELPSYS (IRM.HOST&DIR) CL:DECODE-UNIVERSAL-TIME - (TIME-ZONE-SUPPLIEDP) \\MOUSE.PROCESS (\\WINDOWWORLD) EDITSMASH (EDITSMASHUSERFN EDITCHANGES -EDITHISTORY CLISPARRAY) \\LEAF.DEVICEP (\\FTPAVAILABLE) CL:EVAL (*EVALHOOK* CL::*SKIP-EVALHOOK*) -\\UFS.FILEINFOFN (RESETSTATE) EDIT2F (COPYFLG CHANGESARRAY) COMP.ATTEMPT.COMPILE (BLKFLG) FAULTEVAL ( -CLISPARRAY DWIMFLG) EDITSMASH1 (CHANGESARRAY) CL:DELETE-IF (FROM-END-P KEY-P) \\CH.UPDATE.CACHE ( -CLEARINGHOUSE.STRUCTURE.WINDOW) EDIT4F1 (CHANGEFLG UPFINDFLG TOPLVL FF) DELETE.TO.END (DISPLAYTERMFLG) - CL:COUNT (TEST-P TEST-NOT-P KEY-P) CLISPIFY2 (OPR0 CLTYP0) DEBUGGER (WBREAK XCL::BRKFUN-PROVIDED) -\\UFS.NEXTFILEFN (RESETSTATE *DSK-UPPER-CASE-FILE-NAMES*) \\LEAF.FIX.BROKEN.SEQUIN (\\WINDOWWORLD) -PRINTPUP (PUPONLYTYPES PUPIGNORETYPES) \\FTP.GENERATEFILES (RESETSTATE) D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL - (CROSSCOMPILING) TTY/EDITL (EDITHISTORY LISPXHIST) /RPLACA (LISPXHIST) IFCPROPSCAN (NAME) -PRINTPUPROUTE (PUPTRACETIME) ENTER-DEBUGGER-P (HELPFLAG) \\CLIPANDDRAWLINE1 (\\SOFTCURSORP -\\SOFTCURSORUPP) UPDATEFN (DEF) \\COURIER.ATTENTIONFN (NSWIZARDFLG) MSSETREP (S SETDET SETTYPE) -ADD-USER-SUBR (\\USER-SUBR-TABLE) CL:REMOVE (TEST-P TEST-NOT-P FROM-END-P KEY-P) \\COPYOPENFILE ( -|FileTypeConfirmFlg|) FINDFILE-WITH-EXTENSIONS (DIRECTORIES) /RADIX (LISPXHIST) CL:FIND (TEST-P -TEST-NOT-P FROM-END-P KEY-P) OPENSTREAM (MULTIPLE.STREAMS.PER.FILE.ALLOWED) GREETFILENAME ( -DEFAULTREGISTRY) /DELETECONTROL (LISPXHIST) \\HCPYMODEDISPLAYINIT (\\WINDOWWORLD) /RPLACD (LISPXHIST) -EDITBF1 (UPFINDFLG) CL:DELETE-IF-NOT (FROM-END-P KEY-P) CL:ENCODE-UNIVERSAL-TIME (|\\DayLightSavings|) - /SETPROPLIST (LISPXHIST) CHAT.MENU (\\CARET.UP) ERRORMESS (LISPXHISTORY) \\SPP.RELEASE.ACKED.PACKETS -(XIPTRACEFLG) CLOSEALL (MULTIPLE.STREAMS.PER.FILE.ALLOWED) MAYBE.PRETTYPRINT.BOLD (FONTCHANGEFLG -PRETTYCOMFONT) \\IDLE.WAIT (\\IDLING) DECLARERECORD (FILEPKGFLG) \\NSADDRESS.DEFPRINT ( -\\THISFILELINELENGTH) \\CHANGE.ETHER.TRACING (\\RAWTRACING) DO.MOUSE (\\CARET.UP) SHOWPRIN2 ( -SYSPRETTYFLG) GETD (SI::*CLOSURE-CACHE-ENABLED*) MSPRGRECORD (EACHTIME) CLISPRECORD (LCASEFLG) -LISPXTAB (LISPXPRINTFLG LISPXHIST) /PUTHASH (LISPXHIST) \\FTP.CLOSEFILE (FTPDEBUGFLG) -\\PRINT-USING-DEFPRINT (*PRINT-LEVEL*) IDLE.SET.OPTION (CH.DEFAULT.DOMAIN DEFAULTREGISTRY) -HASH-TABLE-FOR-DOC-TYPE (FILEPKGFLG) UNDOEDITL (LISPXHIST) SHOWPRINT (SYSPRETTYFLG) CLOSEF ( -MULTIPLE.STREAMS.PER.FILE.ALLOWED) \\PRINSTRING (*PRINT-ESCAPE* \\THISFILELINELENGTH) -\\INVALIDATE.PROCESS.WINDOW (PROCESS.STATUS.WINDOW) \\NSFILING.OPENFILE (DEFAULTFILETYPE) -\\FAULTHANDLER (\\DOFAULTINIT) \\STKMIN (\\OPSTACKEFFECT) /CONTROL (LISPXHIST) \\FTP.RECOGNIZEFILE ( -FTPDEBUGFLG) CL:FIND-IF (FROM-END-P KEY-P) I.S.OPR (CLISPARRAY FILEPKGFLG) EMBEDPROG (BINDINGS) -RESETUNDO (LISPXHIST) \\GETMISCSOCKET (\\MISC.SOCKET) \\CKPOSSOUT (\\THISFILELINELENGTH) \\CURSORDOWN -(\\SOFTCURSORP) \\LITPRIN (*PRINT-ESCAPE* *PACKAGE* *PRINT-GENSYM* \\THISFILELINELENGTH) CL:FIND-IF-NOT - (FROM-END-P KEY-P) CLBINARYMINUS? (TYPE-IN? CLISPHELPFLG) \\HANDLE.RAW.OTHER (XIPTRACEFLG) -\\USER-SUBR-UFN (\\USER-SUBR-TABLE) CURRENT.WORD (\\COMMAND) \\PRINSTACKP (\\THISFILELINELENGTH) -\\KEYHANDLER1 (\\PERIODIC.INTERRUPT \\KEYBUFFERING \\PENDINGINTERRUPT \\TIMER.INTERRUPT.PENDING) LISPX - (LISPXUSERFN REREADFLG ARCHIVELST ADDSPELLFLG DWIMFLG) SET-DOCUMENTATION (LISPXHIST) CLISPATOM ( -ONLYSPELLFLG CLISPCHANGES TYPE-IN? NOSPELLFLG) \\LEAF.TIMEDOUT (PUPTRACEFLG) \\CURSORPOSITION ( -\\SOFTCURSORP) TTYIN.PPTOFILE (\\PROMPT1) FAX.SEND.FILE (FAX.NO.WATCHER) \\SPPSENDERROR (XIPTRACEFLG -NSWIZARDFLG) BREAKDOWN (BRKDWNTYPE) RECREDECLARE (RECORDCHANGEFN CLISPARRAY) CLISPFUNCTION? ( -DWIMIFYFLG NOSPELLFLG TYPE-IN? CLISPHELPFLG) COMPILE (LCFIL LAPFLG LSTFIL) HISTORYFIND (DWIMFLG) -\\CURSOR.DEFPRINT (*PRINT-ARRAY*) RATOM (\\\\PNAMESTRING.GLOBALRESOURCE) CL:FILE-POSITION (CL::POSITIONP -) CLUNARYMINUS? (TYP CLISPHELPFLG) RAIDSHOWFRAME (ALINKS?) INFILECOMSVAL (NAME) FIXCONTINUE ( -CLISPARRAY) \\SUBREAD (*READ-SUPPRESS* \\\\PNAMESTRING.GLOBALRESOURCE) \\MAYBEPEEKPUP (\\PEEKPUPNUMBER - PUPTRACEFLG) \\GETFTPCONNECTION (*FTP-IGNORE-SERVER-FULL* FTPDEBUGFLG) \\CLIPANDDRAWLINE ( -\\SOFTCURSORP \\SOFTCURSORUPP) \\CKPOSBOUT (\\THISFILELINELENGTH) LISPXREAD (READBUF CTRLUFLG) CL:ASSOC - (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) \\PRINTADDR (\\\\NUMSTR.GLOBALRESOURCE -\\\\NUMSTR1.GLOBALRESOURCE) WTFIX1 (DWIMFLG DWIMIFYFLG FAULTAPPLYFLG CLISPFLG LCASEFLG FILEPKGFLG -CLISPARRAY NOFIXFNSLST0) LOWERCASE (CHCONLST) PRINTXIP (XIPONLYTYPES XIPIGNORETYPES) COMPERRM (EMFLAG) - SCANFILE0 (DICT BUILDMAPFLG FNLST VARLST) MSPRGCALL (TOPVARS) EDITL1 (EDITHISTORY EDITHIST0 COM) -UNSET (DWIMFLG) LISPX/ (LISPXFNS LISPXHISTORY) FILL.XPER (\\SOFTCURSORP \\SOFTCURSORUPP) -\\TOP-LEVEL-READ (\\\\PNAMESTRING.GLOBALRESOURCE) SETINITIALS (DEFAULTREGISTRY DEFAULTINITIALS) -\\LINEWITHBRUSH (\\SOFTCURSORP \\SOFTCURSORUPP) PFI.HANDLE.DEFDEFINER (*PFI-TYPES*) PUTSEQUIN ( -LEAFDEBUGFLG) /ECHOCONTROL (LISPXHIST) SI::NLSETQHANDLER (SI::*NLSETQFLAG* NLSETQGAG) CLISPRPLNODE ( -LISPXHIST) ADDCHAR (\\AUTOFILL) /SETSYNTAX (LISPXHIST) PRINOPEN (MAKEMAP) PERIODICALLYRECLAIM ( -\\RECLAIM.COUNTDOWN) RAIDCOMMAND (FRAME#) INFILECOMSPROP (NAME) \\CANONICALIZE.PUP.HOSTNAME ( -\\HOSTNAMES) \\RESETSTACK0 (\\RUNNING.PROCESS \\NEED.HARDRESET.CLEANUP) \\FTP.PRINTPLIST (FTPDEBUGFLG) - SEPRCASE (*PACKAGE*) \\DEFPRINT.BY.NAME (\\THISFILELINELENGTH) \\FLUSHPAGE (\\VMEM.PURE.LIMIT) -OPT.SKIPPUSH (NEWOPTFLG) CLISPERROR (DWIMESSGAG TYPE-IN?) \\CARET.DOWN (\\CARET.UP) \\MAYBEPEEKNS ( -\\PEEKNSNUMBER XIPTRACEFLG) STOPSCAN? (BROADSCOPE) TTYIN.SCRATCHFILE (TTYINEDIT.SCRATCH) PRINTERDEVICE - (RESETSTATE) \\TELERAIDENTRY (\\PUP.READY) COURIER.EXECUTE.CALL (COURIERTRACEFLG) DWIMIFYFNS (DWIMFLG -) \\CH.CHECK.CLEARINGHOUSE (CH.DEFAULT.DOMAIN CH.DEFAULT.ORGANIZATION) INPUT ( -MULTIPLE.STREAMS.PER.FILE.ALLOWED) MSPRGMACRO (INCLISP EACHTIME) CLISPIF0 (CLISPIFTRANFLG) -\\TRACKCURSOR (\\SOFTCURSORUPP) \\LITPRIN.INTERNAL (\\THISFILELINELENGTH) CLISPATOM0 (SUBPARENT -DWIMIFYFLG) PRINSHUT (MAKEMAP) DELETETO (DISPLAYTERMFLG \\DELETING TTYINBSFLG) PRIN1S (MAKEMAP) -XCL::RELIST* (XCL::*WALK-COPY*) HISTORYSAVE (REREADFLG ARCHIVELST ARCHIVEFN HISTORYSAVEFORMS) -\\DOBUFFEREDTRANSITIONS (\\PENDINGINTERRUPT) \\DOMOUSECHORDING (\\MOUSECHORDTICKS) XCL::RECONS ( -XCL::*WALK-COPY*) BITBLT (\\SOFTCURSORP \\SOFTCURSORUPP) SETREADFN (TTYINBSFLG) \\FTP.PACKFILENAME ( -*UPPER-CASE-FILE-NAMES*) DWIMLOADFNS? (FAULTAPPLYFLG DWIMLOADFNSFLG DWIMIFYFLG DWIMIFYING TYPE-IN?) -PFI.PRINT.BITMAP (*PRINT-ARRAY* *PRINT-PRETTY-BITMAPS* *PFI-FUNNY-CHARS* *PFI-BITMAP-BASELINE*) -\\INTERRUPTFRAME (WINDFLG) CLOSENSOCKET (\\NSOCKETS) CHAT (CHAT.HOSTMENU DEFAULTCHATHOST) SETFONT ( -MAKEMAP SPACEWIDTH) CLISPIFYLOOKUP (DECLST) \\INTERRUPTED (\\INTERRUPTABLE) \\CREATE.TTYDISPLAYSTREAM -(\\WINDOWWORLD) \\EVALFORM (CLISPARRAY) \\COURIER.HANDLE.ERROR (NSWIZARDFLG) INTERRUPTED ( -\\INTERRUPTABLE \\MOUSEBUSY) CLRPLNODE (NOSAVEFLG) PRINDOTP (MAKEMAP) COMP.PROGN (OPTIMIZATIONSOFF) -COURIER.EXECUTE.EXPEDITED.CALL (COURIERTRACEFLG) \\DTEST.UFN (SYSHASHARRAY) \\NET.SETTIME (\\LOCALNDBS - \\PUP.READY) MSPATHSPRINTFN (MARKING) MSPRGE (DWIMFLG INCLISP EACHTIME MSMACROPROPS) -\\SAVEVMBACKGROUND (SAVINGCURSOR) CL:READ (\\\\PNAMESTRING.GLOBALRESOURCE) LISPXFIND (REREADFLG -ARCHIVEFLG) EDITQF (UPFINDFLG) \\READTABLEP.DEFPRINT (\\THISFILELINELENGTH) \\SPP.HANDLE.ATTN ( -NSWIZARDFLG) CMLRDTBL (*PACKAGE*) \\GC.HANDLEOVERFLOW (\\RECLAIM.COUNTDOWN) PRINTNUM-TO-STRING ( -\\\\NUMSTR.GLOBALRESOURCE \\\\NUMSTR1.GLOBALRESOURCE) PRIN2S (MAKEMAP) CL:READ-DELIMITED-LIST ( -\\\\PNAMESTRING.GLOBALRESOURCE) MSNEXTWORD (LASTADVERB) OPENFILE (MULTIPLE.STREAMS.PER.FILE.ALLOWED) -USERLISPXPRINT (LISPXPRINTFLG LISPXHIST) \\GET.IOCB (\\IOCBFREELIST) BCOMPL3 (RESETSTATE LCFIL LSTFIL -LSTFIL1) CLISPFORVARS (CLISPFLG I.S.TYPE I.V.) SUPERPRINT/WRAPPER (MAKEMAP) \\GCMAPTABLE ( -\\RECLAIM.COUNTDOWN) FIXATOM1 (TYPE-IN?) TTYINREADP (READBUF) \\UPDATECHAIN (DOLOCKCHECKS) NIL -PREDICATE \\BLTSHADE.BITMAP (ILEQ FIXP) BQUOTE.WRAPPER (MEMB) TEDIT.COPY.PARALOOKS (TYPENAMEP) -SEDIT::COMPLETE (CL:MEMBER) \\FTP.ERRORHANDLER (BSPOPENP) RCOMP3 (MEMB) \\CLEARCELLS (ILESSP IGREATERP -) \\HARDRESET-CLEANUP1 (\\HARDRESET-CLEANUP-RUN) SIMPLEPRINT (LITATOM STRINGP GREATERP SMALLPOSP -SMALLP) TWODINSPECT.REPAINTFN (ILESSP IGREATERP) PRINTPACKETDATA (IGEQ ILESSP FIXP IGREATERP) -\\TEDIT.WINDOW.TITLE (TEXTPROP) MOVEATTACHEDWINDOWTOPLACE (OPENWP) \\FM.TOGGLE-DOWNFN (OPENWP) DOERROR - (FMEMB) FB.THINCOMMAND (STRING-EQUAL ILESSP FB.THINP FB.DELETE.FILE) NS.ECHOUSER (SELECTC = PRIN1 -TIMEREXPIRED? >) APPENDOP.IP (ILESSP IGREATERP ILEQ) VARIABLES (ZEROP) \\HCPYMODEBLTCHAR (IEQP -IGREATERP ILESSP FMEMB) \\ZEROWORDS (ILEQ IGEQ) \\OUTCHARFN.PRESS (IGEQ ILEQ) \\TELERAIDCOMMAND ( -XKEYDOWNP) SIMPLE.FINDFILE (MEMB) COMP.DECLARE (FMEMB) \\HARDRESET-CLEANUP (MEMB) \\TEXTSTREAMBOUT ( -IEQP IGREATERP ILEQ IGEQ) \\COPYSYS (SMALLP IGREATERP) FILES? (FILES?1) |\\VAMFindFreePages| (IGEQ -ZEROP EQL) \\TEDIT.REPAINTFN (ILESSP) SCALEPAGEUNITS (ILESSP) TWODINSPECT.BUTTONEVENTFN (MOUSESTATE) -\\GCERROR (\\GCDISABLED RAID) \\TEDIT.ORIGINAL.WINDOW.TITLE (STRINGP ZEROP WINDOWP) LAYOUTLATTICE ( -FASSOC) SEDIT::SMART-TTYFN (BOUNDP) \\GC.MODIFY.BIGREFCNT (ODDP ILESSP IGEQ) TB.SELECT.ITEM ( -TB.ITEM.UPDATABLE?) \\CLEANUP.STACKFULL (SELECTQ) PASTEFROMCLIPBOARD (WINDOWPROP) \\UFS.RECOGNIZE.FILE - (FIXP) TEDIT.COPY.LOOKS (TYPENAMEP) \\GATHER-SPECIAL-BINDINGS (NULL-NTENTRY EQP FMEMB FIXP SMALLP -ASSOC) SEDIT::OPEN-LITATOM (%GENERAL-ARRAY-P) SEDIT::TRACK-SELECT (LASTMOUSESTATE MOUSESTATE) -FB.HARDCOPY.MAXWIDTH (>) \\DRAWARC.PSC (NUMBERP ZEROP FLOATP) \\GC.ENTER.BIGREFCNT (ODDP EVENP) -\\NSGATELISTENER (> TIMEREXPIRED?) RESET (SELECTQ) CL::%ASIN-FLOAT (< > UFGREATERP) \\FM.TOGGLE-SETUP -(EQUAL) SHORTLST (IGREATERP ZEROP) UNIX-GETENV (FMEMB) \\SENDLEAF (TYPENAMEP PUTSEQUIN) SUBSTRING ( -ILESSP IGREATERP ILEQ %GENERAL-ARRAY-P) \\SHOWMENULABEL (\\MENUSUBITEMS BITMAPP) PFI.AFTER.NEW.PAGE ( -EVENP) SEDIT::INSERT-SPECIAL-CHARACTER (TYPENAMEP) \\SLOWHCPYMODEBLTCHAR (IGREATERP ILESSP FMEMB) -\\GETPILOTBBTSCRATCHBM (TYPENAMEP ILEQ) \\TELERAIDGET (CL:FUNCALL) \\VECENCODE (ILESSP) FB.THINP ( -FMEMB ILESSP) \\GC.LOOKUP.BIGREFCNT (ODDP) APPENDNUMBER.IP (FIXP ILEQ LESSP) MULTIFILEINDEX (STRPOS) -SEDIT::INSERT-MULTI-ESCAPE (TYPENAMEP) TTYINPROMPTFORWORD (DISPLAYSTREAMP TTY.PROCESSP FIXP) -\\ALLOCPAGEBLOCK (GREATERP) \\DRAWPOINT.PSC (BITMAPP) UNIX-GETPARM (SMALLP >) -SET-PACKAGE-INTERACTIVELY (SHIFTDOWNP) ALLOCSTRING (ILESSP SMALLP STRINGP FFETCHFIELD %GENERAL-ARRAY-P - GREATERP) \\ICONW.FORMAT.TITLE1 (>= IGREATERP FMEMB) TEDIT.SEL.AS.STRING (ZEROP GREATERP) -OPT.FRAMEVAR (LESSP ZEROP NOTANY APPLY*) \\SET.STORAGE.STATE (SELECTC) LASTCHPOS (EQMEMB) \\VECPUT ( -ILESSP IGEQ) MKSTRING (STRINGP LITATOM CL:CHARACTERP SMALLP ILESSP IGREATERP) ADJUSTLINE.AND.RESTORE ( -IGREATERP) SEDIT::INSERT-STRING (TYPENAMEP) SEDIT::TRACK-EXTEND (MOUSESTATE) OPENBSPSTREAM (TYPENAMEP) - \\TEDIT.FORMAT.FOOTNOTE (IGREATERP) FILEPKGTYPE (GREATERP) GETHOSTINFO (BOUNDP LITATOM) -TURN.OFF.ETHER (GETD) TWODINSPECT.COPYBUTTONFN (.COPYKEYDOWNP.) HARDCOPYW (WINDOWP BITMAPP EQLENGTH -EVERY) \\REFCNT (ILESSP) |UnixTempFile| (BOUNDP STRING-EQUAL GREATERP INFILEP) \\DSPTRANSLATE.PSC ( -ZEROP) WORD.MATCHES.BUFFER (SELECTC IGREATERP COMPLEXCHARP IGEQ ILEQ) \\FREELISTCELL (IGREATERP) -\\EXTENDEDVMEMINIT (FFETCHFIELD) COMP.COND (COMP.PREDP EVERY) TEDIT.GET.LOOKS (TYPENAMEP ZEROP FIXP) -OPT.FRAMEDEL (SOME OASSOC OPT.DELETEFRAMECHECK ZEROP) FIND.MATCHING.QUOTE (IGREATERP COMPLEXCHARP) -NECCSPEC (SPECVARP) \\DSKDISPLAY.UPDATE (WINDOWP) \\LEAF.CLOSEFILE (WITH.MONITOR DIRTYABLE) -MAKE-PACKAGE-HASHTABLE (EQL) ADDTOFILES? (LITATOM SOME UNDONLSETQ) \\SET.FINALIZATION.FUNCTION (<= -FNTYP) \\TEDIT.CONVERT.TO.FORMATTED (IGREATERP IEQP) COMPILER::CLOSURE-ANNOTATE-TAGBODY ( -COMPILER::SEGMENT-TAGS COMPILER::TAGBODY-CLOSED-OVER-P COMPILER::TAGBODY-NEW-FRAME-P) ARGINFO-MUNG ( -CL:CONSP) BCOMPL2 (RECOMP? NOTANY EXPRP MEMB) CLISPDEC1 (FMEMB FIXSPELL) TEDIT.HARDCOPY-COLUMN-END ( -ILESSP ILEQ) EQUAL.CH.NAMES (TYPENAMEP) \\INITMDSPAGE (ILESSP GREATERP IGREATERP) COPIEDFROMSPEC ( -LESSP FMEMB) COURIER.REP.LENGTH (LITATOM) %DESTRUCTIVE-RESULT-VECTOR (CL:ARRAY-HAS-FILL-POINTER-P) -\\TFBRAVO.GETPARAMS (LITATOM) UNPACKPATHNAME.STRING (CL:CONSP) |UnixPrintCommand| (FIXP) MB.SIZEFN ( -DISPLAYSTREAMP) \\LISP.TO.NSFILING.ATTRIBUTE (MEMB) XCL::PPRINT-DEFINER (CL:ATOM CL:CONSP CL:LISTP -SEMI-COLON-COMMENT-P) \\DSPCLIPTRANSFORMX (IGREATERP) SEDIT::INPUT-TOKENDELIM (SEDIT::EQ-POINT-TYPE -TYPENAMEP) \\TYPENUMBERFROMNAME (GREATERP) \\FIXILINES (IGEQ IGREATERP IEQP) ORDERFROMBOTTOMTOTOP ( -FMEMB) SEDIT::INSERT-LITATOM (TYPENAMEP) SEDIT::SHRINKFN (EQMEMB OBTAIN.MONITORLOCK) FNTYP (LITATOM -TYPEP) NTHCHARCODE (STRINGP LITATOM ILESSP IGREATERP) \\ALLOCVIRTUALPAGEBLOCK (ILEQ ILESSP) -\\TEDIT.PROMPT.PAGEFULLFN (>=) BITMAPBIT (TYPENAMEP IGREATERP IGEQ ILEQ FMEMB) D-ASSEM:FIXUP-PTR ( -FMEMB) |UnixShellQuote| (<= FMEMB) STRPOS (LITATOM IGEQ ILESSP IGREATERP ILEQ ARRAYP GREATERP) -\\UPF.NEXTPOS (EQMEMB) \\DSPLINEFEED.IP (NUMBERP) D-ASSEM:INTERN-DCODE (CL:ZEROP) BLTCHAR (\\CHARCODEP - SMALLP) SHOWBITMAP.IP (IGREATERP ZEROP ILEQ) ASKUSER (NUMBERP WAITFORINPUT STRINGP ASKUSERCHAR -ASKUSER1 MEMB SYNTAXP SELECTC APPLY* ILESSP IGREATERP) TEDIT (ATOM \\TEDIT.ACTIVE.WINDOWP LISTGET) -BACKSKREAD (IGREATERP COMPLEXCHARP READTABLEPROP) D-ASSEM:FIXUP-PTR-NO-REF (FMEMB) NSNETDAYTIME0 ( -GREATERP) \\SLOWBLTCHAR (IGREATERP ILESSP FMEMB) POSTSCRIPT.SET-FAKE-LANDSCAPE (ZEROP) \\OPENLINEBUF ( -TYPENAMEP) \\DSPCLIPTRANSFORMY (IGREATERP) D-ASSEM:FIXUP-SYMBOL (CL:SYMBOLP FMEMB) \\DSPPRINTCR/LF ( -IGREATERP SHOULDNT FMEMB) COLLECT-CASE-SELECTORS (CL:CONSP FMEMB) TB.NORMALIZE.ITEM (> <) -SI::SPLIT-PROCEED-CLAUSES (EQL CL:EVERY) FB.SEEFULLFN (GREATERP) COPIEDTOSPEC (STRPOS -UNPACKFILENAME.STRING) OVERLAPPINGWINDOWS (MEMB SOME) TWODINSPECT.DEFAULT.VALUECOMMANDFN (NUMBERP) -FLASHWINDOW (WINDOWP DISPLAYSTREAMP GREATERP) STRIP-KEYWORDS (CL:KEYWORDP) \\FM.CLEARITEM (OPENWP) -|\\VAMBufferSave| (FIXP) CREATEW (EQLENGTH EVERY TYPENAMEP DISPLAYSTREAMP) CL::%TAN-FLOAT (UFGEQ -UFGREATERP UFLESSP) CONDITIONS::PARSE-RESTART-CASE (CL:KEYWORDP) SAVEVM (\\FLUSHVM) ADDTOFILE (FMEMB) -OPT.CLEANFRAME (OPT.CLEANFRAME) CONDITIONS::CONVERT-RESTART-CASES (CL:REST) COMPILER::MAKE-LAP-VAR ( -COMPILER::VARIABLE-P) CLISPLOOKUP1 (FMEMB ATOM) FB.FASTSEE.ONEFILE (DIRECTORYNAMEP) -RIGHTW.BUTTONEVENTFN (MOUSESTATE) TWODINSPECT.DEFAULT.TITLECOMMANDFN (MOUSESTATE) AIN (STRINGP ARRAYP -IGREATERP ILESSP) USERNAME (STRINGP) MB.DEFAULTBUTTON.ACTIONFN (ZEROP \\TEDIT.QUIT) -TB.FIND.PREVIOUS.TAIL (<) COMPILER:ENV-BOUNDP (COMPILER::VARIABLE-P CL:MEMBER COMPILER::ENV-P) -\\RESOLVE.TYPENUMBER (LITATOM) SEDIT::HASFAT (IGREATERP) \\TELERAIDSERVER (\\TELERAIDGET EVENP -GREATERP XKEYDOWNP IGEQ ILESSP) MSCLOSEFILES (OPENP) DODIRCOMMANDS (ILESSP EVAL STRPOS DELFILE -STRING.EQUAL FIXP) \\TEDIT.LOOKS.UPDATE (ZEROP EQCLOOKS TYPENAMEP) AOUT (STRINGP ARRAYP IGREATERP -ILESSP) UPDATEFILES (FMEMB MEMBER) \\SHOWSEL (IGEQ) REPLACEFIELD (IGREATERP ILEQ TYPENAMEP CL:INTEGERP -) TEDIT.STRINGWIDTH (IGREATERP) \\FM.INSUREVISIBLE (SUBREGIONP) MSCHECKVARS1 (FMEMB) CL:SHADOWING-IMPORT - (CL::%PACKAGE-EXTERNAL-ONLY) \\FIXLINELENGTH.IP (IGREATERP) FEQP (FLOATP IGREATERP SMALLPOSP SMALLP -ILEQ) CL:MAKE-PACKAGE (STREQUAL) BOXCOUNT (NUMBERP) CLIPBOARD-PASTE-STREAM (STRPOS) -INTERNAL-SYMBOL-COUNT (CL::%PACKAGE-EXTERNAL-ONLY) \\INDICATESTRING (IGREATERP ILESSP) OPT.FRAMELOCAL -(OASSOC OPT.CLEANFRAME FMEMB) CLISPIFY2B (NUMBERP EQLENGTH FMEMB EQMEMB CLISPIFY2D MEMB LITATOM FGETD -CLISPNOEVAL GETHASH) TEXTUREP (TYPENAMEP) SET/LABEL/SIZE (BITMAPP IMAGEOBJP) PRINTERROR (EQUAL ILESSP -IGREATERP) INVERT.TEXTURE.BITMAP (TYPENAMEP IGREATERP) APPENDLARGEVECTOR.IP (GREATERP) SEDIT::INPUT-QUOTE - (FMEMB TYPENAMEP) INVERT.TEXTURE (FIXP) = (CL::%< CL:NUMBERP) REMOVE-COMMENTS (CL:CONSP CL:MEMBER) -COMPILER:OPTIMIZE-AND-MACROEXPAND-1 (CL:ATOM CL:SYMBOLP) \\COERCEFONTDESC (TYPENAMEP IMAGESTREAMP -LITATOM FMEMB EQUAL) COURIER.OPEN (ILEQ) CL:SHADOW (CL::%PACKAGE-EXTERNAL-ONLY) COMP.GENFN (IGEQ) -\\TEDIT.TRY.ABBREV (STRINGP SMALLP LITATOM GETD) |InstallUnixPrinter| (EQMEMB) STKNTHNAME (ILESSP) -TEDIT.\\INSERT (TYPENAMEP) \\FM.ENDEDIT (FM.EDITP PROCESSPROP) \\ACTONDISKPAGES (TYPENAMEP EMADDRESSP -DISKWRITEACTION? PTRGTP IGEQ DISKREADACTION?) WTFIXLOADEF (ATOM STRINGP FIXSPELL1) TRAPMAKE (ILESSP -IGREATERP) IMAGEFNSP (TYPENAMEP) \\PNC (ZEROP %GENERAL-ARRAY-P) SEDIT::GROW-SELECTION-LITATOM ( -FFETCHFIELD) TERMTABLEP (TYPENAMEP) \\TELERAIDINIT (TYPENAMEP) TWODINSPECT.COLUMNWIDTH (GREATERP) -PARSE.NSNAME (TYPENAMEP STRINGP LITATOM) \\SETETHERFLAGS (>=) \\TEDIT.HCPYLOOKS.UPDATE (ZEROP EQCLOOKS - TYPENAMEP) \\DOACTONDISKPAGES (ILESSP IGREATERP GREATERP ILEQ) OPENPOSTSCRIPTSTREAM (CL:PLUSP -FREPLACEFIELD EQL MENU) \\WRITEOUTBUFFERS (CPBUFFERP) CREATETEXTUREFROMBITMAP (GREATERP ILESSP ZEROP -MINUSP LESSP) \\CLEARBYTES (IGREATERP ODDP) SEDIT::REPLACE-ROOT (CL:REST) NSNAME.TO.STRING ( -STRING-EQUAL) DEFPACKAGE (CL:PACKAGEP CL:KEYWORDP CL::%PACKAGE-EXTERNAL-ONLY LITATOM STRINGP MEMB) -COPYARRAY (HARRAYP) OPT.NONILVAR (SELECTQ COMP.CLEANFNOP) \\TYPENAMEFROMNUMBER (ILESSP) -\\FM.CHANGESTATE (ASSOC) ONEDINSPECT.PROPWIDTH (GREATERP) \\INBETWEENP (GEQ) |\\PFRoomForFile| (EQL) -SETD (IGREATERP IGEQ) GETFIELDSPECS (LITATOM) ELTD (IGREATERP IGEQ) SETY.PRESS (IGEQ ILEQ IEQP) -\\CLEARMAP (DIRTYABLE FMEMB) INTERPRESS.BITMAPSCALE (GEQ) VARSBOUNDINFORM (LITATOM FMEMB EQMEMB EQUAL) - TEST-PROCEED-CASE (CONDITIONS:RESTART-NAME) \\DOWRITEDISKPAGES (ILESSP ILEQ GREATERP IGREATERP) -TEDIT.HARDCOPY.PAGEHEADING (TYPENAMEP) TB.UPDATE.DISPLAY (>= <= TB.ITEM.UPDATABLE? >) \\MEDW.BITBLT ( -BITMAPP FMEMB) SEDIT::PLACE-CARET-AND-SELECTION (INSIDEP TYPENAMEP) \\LISPERROR (SMALLP) EXCHANGEXIPS -(TIMEREXPIRED? IEQP) \\SEQUIN.HANDLE.ACK (UNINTERRUPTABLY) \\EXPECTED.FILE.TYPE (STRING-EQUAL) -UNDOSAVE (IGREATERP MINUSP) PFI.COLLECT.DEFINERS (LITATOM EQMEMB) IMPORT (CL::%PACKAGE-EXTERNAL-ONLY) -CL:READ-CHAR (\\EOFP) SI::INVOKE-ACTUAL-RESTART (CONDITIONS::RESTART-FUNCTION) OPT.MERGEFRAMEP (FMEMB -OASSOC OPT.CLEANFRAME) HARRAYP (TYPENAMEP) LRSH (IGREATERP ILEQ TYPENAMEP CL:INTEGERP) \\3MBFLUSH ( -\\READRAWPBI) DATATYPES (GREATERP) \\NSFILING.ADDQUOTES (IGREATERP) ADD-SYMBOL (<= >=) -CLIPBOARD-COPY-STREAM (STRPOS) HASHARRAY (FIXP ILESSP ZEROP MINUSP LESSP GREATERP IGREATERP) DATATYPEP - (SMALLP LITATOM FMEMB GREATERP) \\WRITEDISKPAGES (TYPENAMEP ILESSP EMADDRESSP DISKWRITEACTION? PTRGTP -) SUBARRAY (IGREATERP IGEQ ILEQ) RESHAPEALLWINDOWS (EQP) TEDIT.QUIT (TYPENAMEP PROCESS.FINISHEDP) -\\CLIPLINE (GREATERP) FB.CLOSE&EXPUNGE (FB.EXPUNGECOMMAND) MAPPAGE (ILEQ) FB.ANALYZE.PATTERN (STREQUAL -) TWODINSPECT.ROWPROPWIDTH (GREATERP) DINFO.UPDATE (OBTAIN.MONITORLOCK) \\MAPPAGE (ILEQ DIRTYABLE -DIRTYP CPBUFFERP) MSCHECKBOUNDFREE (SPECVARP) |\\VAMRecomputeFreePageCount| (GREATERP) \\ENDVECRUN ( -IGEQ) APPENDINT.IP (LESSP) PFI.PRINT.INDEX (ODDP) \\SETEOF (IGEQ IGREATERP) SETX.PRESS (IGEQ ILEQ IEQP -) \\CLEANUPDISKQUEUE (IGREATERP) \\GETDISKCB (\\CLEANUPDISKQUEUE) SEDIT::REPLACE-NODE (SEDIT::DEAD-NODE? -) COMPILER::CLOSURE-ANNOTATE-LAMBDA (COMPILER::VARIABLE-CLOSED-OVER) INSPECT/AS/RECORD (FMEMB) -OPT.FRAMEMERGE (OPT.MERGEFRAMEP IGREATERP ZEROP MINUSP) WARNUSER (EDITFINDP) FB.CHECK.NAME.LENGTH (>= -> <) ONEDINSPECT.REPAINTFN (ILESSP) CL::%SIN-FLOAT (UFGREATERP UFGEQ UFLESSP) SEDIT::INPUT-DOT ( -TYPENAMEP) TB.ITEM.UPDATABLE? (TB.ITEM.VISIBLE? <) \\COLLECTDIRTYBUFS (DIRTYP CPBUFFERP) -SEDIT::ATOM-CHAR-ESCAPED (IGEQ ILEQ IGREATERP) \\FTP.GETFILEINFO.FROM.PROPS (FIXP) MSNLAMBDACHECK ( -TEMPLATE NLAMBDAFNP FMEMB) TEXTUREOFCOLOR (IGREATERP) SEDIT::RELINEARIZE-WHERE-NECESSARY (SEDIT::DEAD-NODE? -) SEDIT::LINEAR-ITEM-WIDTH (FIXP TYPENAMEP) \\3MBWATCHER (ILESSP) OPT.FRAMEOPT (OPT.FRAMELOCAL -OPT.FRAMEVAR OPT.FRAMEMERGE OPT.FRAMEDEL) \\FM.HIGHLIGHTITEM (OPENWP) MSCHECKBLOCKBASIC (FMEMB GETPROP -) \\SEQUIN.COMPARE (IGEQ ILEQ) APPENDSEQUENCEDESCRIPTOR.IP (ILESSP IGREATERP) \\STORAGE.TYPE (< >=) -PFI.PROCESS.FILE (SYNTAXP LITATOM) CL::\\OPENSTREAM-WITH-DEFAULT (CL:PATHNAMEP CL:PATHNAME-HOST -FILENAMEFIELD) SIMPLETEXTEDIT (CL:Y-OR-N-P NLSETQ) \\STORAGE.HUNKTYPE (>=) \\FM.DISPLAYITEM (OPENWP) -MSCHECKFNINBLOCK (MSFIND MEMB) |\\VFMDeletePageGroup| (ZEROP EQL MESAEQUAL GREATERP) -APPENDIDENTIFIER.IP (IGREATERP) PFI.PRINT.MULTI.INDEX (ODDP < TYPENAMEP CL:PACKAGEP READTABLEP) -\\TEDIT.SEARCH.CODETABLE (GREATERP) \\PUNT.BITBLT.BITMAP (ILEQ FIXP TYPENAMEP) \\PAGED.GETNEXTBUFFER ( -OPENED ILESSP IGEQ IEQP) MSUPDATE (FIXP IGREATERP) WHO-LINE-CHANGE-USER (MENU) TTPRINSPACE (>=) -COMP.APPLYFNP (FMEMB) SEDIT::EDIT-HELP (ILEQ) \\STMDSTYPE (>= < >) INVERTED/GRAPHNODE/BORDER (FIXP) -NTH (IGREATERP) \\PAGED.SETEOFPTR (OVERWRITEABLE APPENDABLE) \\PUNT.BLTSHADE.BITMAP (ILEQ FIXP) -SEDIT::COPY-STRUCTURE-STRING (TYPENAMEP STRINGP) \\UPDATEOF (IGREATERP) \\IDLE.EXIT.ABORT (RELSTK) -\\HLSVALUEFN (ILESSP) ICONW.PRINT-JUSTIFIED (EQMEMB IGREATERP GREATERP FMEMB) \\DOFORMATTING.HARDCOPY -(ILESSP ZEROP IGEQ IEQP ILEQ IGREATERP) \\3MBSENDPACKET (> UNINTERRUPTABLY) \\BITBLT.BITMAP.SLOW (ILEQ - FIXP TYPENAMEP) COMPILER::PASSABLE (COMPILER::NULL-EFFECTS-INTERSECTION) \\PAGEDSETFILEPTR (>) CL:AREF - (<) SEDIT::PROPAGATE-WIDTH-CHANGE (IGEQ) SEDIT::PARSE--LIST (LITATOM) COMP.BOOL (COMP.PREDP) -ADDTOCOMS (LITATOM ADDTOCOM) \\PAGED.FORCEOUTPUT (DIRTYABLE DIRTYP CPBUFFERP) PRINT3TO10 (MEMB) -MSCHECKBLOCK (MEMB SPECVARP GETPROP CL:CONSTANTP GET BOUNDP) \\GETMISCNSOCKET (FMEMB) -COURIER.WRITE.BULKDATA (IGREATERP GREATERP) PFI.PRINT.FILECREATED (FIXP) \\HASHRECLAIM (\\EQREFCNT1) -SETTTBLPROP (NUMBERP FMEMB) |\\VAMFreePageGroup| (IGEQ GREATERP) ICONW.TITLE (OPENWP) SEDIT::SEDITL ( -BOUNDP) \\HASHTABLE.DEFPRINT (IGREATERP) DEFAULT.EDITDEF (CL:ENDP CL:Y-OR-N-P) \\STRINGHASHBITS-UFN ( -STRINGP LITATOM IGREATERP) BRECOMPILE2 (STRPOS GREATERP DIGITCHARP IGEQ) ONEDINSPECT.BUTTONEVENTFN ( -MOUSESTATE) INVERTED/SHADE/FOR/GRAPHER (FIXP BITMAPP) COMPILE1A (EXPRP SHOULD-BE-DWIMIFIED? TAILP) -HASHOVERFLOW (FLOATP FIXP FNTYP NUMBERP) ONEDINSPECT.COPYBUTTONFN (.COPYKEYDOWNP.) -TB.FIND.SELECTED.ITEM (GREATERP) \\TEDIT.INTERRUPT.SETUP (WINDOWPROP) \\TEDIT.UPDATE.SHOWSEL (ILESSP) -EDITDEF.FNS (EXPRP LITATOM EDITFB) INTERSECT/REGIONP/LBWH (IGREATERP ILESSP) \\NSFILING.REMOVEQUOTES ( -STRPOS) \\CLIPCURVELINE.IP (> GREATERP) STORAGE (GREATERP FIXP < > ERROR FFETCHFIELD =) DISPLAYGRAPH ( -DISPLAYSTREAMP IGREATERP) \\CODEARRAY (IGREATERP) CHCON (LITATOM STRINGP GREATERP) \\VANILLADISKINIT ( -GREATERP) \\VANILLAHOSTNAMEP (GETD) FIND-DEBUGGER-ENTRY-FRAME (FMEMB GENSYM?) RECORDACCESS (RECDEC?) -\\3MBGETPACKET (UNINTERRUPTABLY) \\PAGEDREADP (\\PAGEDEOFP IGREATERP \\XCCSP \\BACKFILEPTR \\RUNCODED) - SEDIT::FN-CHANGED (CCODEP) DBG::%RELEASE-STACK-DATUM (STACKP CL:LISTP) \\LOOKUPFMAP (IGEQ ILEQ) -BRIEFLY-DESCRIBE-SYMBOL (CL:FBOUNDP) \\STRINGWIDTH.PRESS (LITATOM IGREATERP STRINGP) \\WHICHPART (ILEQ -) UNPACK (LITATOM STRINGP GREATERP) \\CHECKARRAYBLOCK (UNLESSRDSYS ILESSP EQPTR) \\NEWLENGTHIS (ILESSP -) PRINTBINDINGS (REALFRAMEP) |\\LFOpenDevice| (|\\PFVersionOK| |\\LFDirectoryP|) -TB.REV.FIND.SELECTED.ITEM (LESSP) RETDWIM3 (ILESSP IGREATERP) \\CREATESTARFONT (\\GETCHARSETINFO) -\\ALLOCBLOCK.OLD (GREATERP ILESSP IGREATERP) SEDIT::CONS-ATOM (SEDIT::HASFAT) SEDIT::SHIFT-STRING ( -ILESSP IGREATERP GREATERP) \\IDLE.PROMPT.WATCHER (\\SECONDSCLOCKGREATERP) DCHCON (LITATOM STRINGP -GREATERP) SEDIT::SEDITE (CL:CONSP) \\SFFIXLINELENGTH (BOUNDP) POSTSCRIPT.FONTSAVAILABLE (EQUAL MEMBER -GREATERP) BKLINBUF (STRINGP IGREATERP) MSCHECKBLOCKS (MEMB) \\STRING-EQUAL-HASHBITS-UFN (STRINGP -LITATOM IGREATERP) \\MAIKO.ALLOCBLOCK (ILESSP IGREATERP ILEQ) GET-TWOD-DISPLAYW (WINDOWP) \\GETFBB ( -IEQP IGREATERP ILESSP) \\ALLOCHUNK (IGREATERP FMEMB ILEQ POWEROFTWOP ILESSP) \\ACCHARPOSLIST (GREATERP - IEQP) MSSHOWUSE (CL:MULTIPLE-VALUE-SETQ) \\TEDIT.NSCHAR.RUN (IEQP ZEROP GREATERP) \\ALLOCBLOCK.NEW ( -IGREATERP) \\READACFONTBOXES (GREATERP IGREATERP) \\MERGEFORWARD (\\CHECKARRAYBLOCK) -SEDIT::DECOMPOSE-PSEUDO-SELECTION (CL:LISTP) \\IDLE.IS.PREVIOUS (ZEROP >) PAGEHEIGHT (NUMBERP) -CASEARRAY (GREATERP) MB.BUTTONEVENTINFN (IGEQ ILEQ) \\ICONW.FORMAT.TITLE (GEQ LEQ LESSP) -TWODINSPECT.SELECTCOLUMNPROP (EQUAL) \\NEW.READ.SYMBOL (STRINGP) \\LINKBLOCK (ILESSP) \\FAMILYCODE ( -GREATERP) DBG::STACK-FRAME-PROPERTY (CL:CONSP) SEDIT::INPUT-NORMAL-CHAR (IGREATERP ILESSP TYPENAMEP) -WINDOWADDFNPROP (FMEMB) DUNPACK (LITATOM STRINGP GREATERP) \\TEXTTTYBOUT (IGREATERP) \\ACCHARWIDTHLIST - (ZEROP) TEXTSTREAMP (STREAMP TYPENAMEP) MSNOTICEFILE (FMEMB) \\NEW.MKATOM (ILEQ IGREATERP IGEQ) -DEFAULTMAKENEWCOM (FMEMB GETPROP SAVESET) \\DELETEBLOCK? (IGEQ) PACKC (IGREATERP ILEQ LESSP) -SPP.DSTYPE (READABLE) \\TEDIT.FORMATTABS (ILEQ) COMP.PICOUNT (LITATOM COMP.CLEANEXPP) -INTERPRET/MARK/FORMAT (EQMEMB FMEMB) TTY.PROCESS (TYPENAMEP OPENWP HASTTYWINDOWP) WYOFFSET (NUMBERP) -SEDIT::CREATE-COMMAND-TABLE (CL:CONSP) REMWINDOWPROP (DISPLAYSTREAMP) ALPHORDER (LITATOM STRINGP -NUMBERP GREATERP IGEQ ILEQ ILESSP) SEDIT::EXTRACT-CURRENT-SELECTION (NLSETQ) \\CHECKFORSTORAGEFULL ( -ILESSP ILEQ IGREATERP IGEQ) \\DEQUEUE (FREPLACEFIELD) SETDISPLAYHEIGHT (SMALLP IGREATERP) -\\SETBRUSH.IP (NUMBERP <=) CL::%LOG-FLOAT (<=) WXOFFSET (NUMBERP) \\PAGEPAD.PRESS (IGREATERP) -\\REQUEUE.ETHERPACKET (TYPENAMEP) \\TEDIT.GET.TERMSA.WIDTHS (GREATERP) MSGETDEF (CL:MULTIPLE-VALUE-SETQ -) \\SHOWSEL.HILIGHT (IGEQ ILESSP) TTYINEDIT (STRINGP) SPP.OPEN (TIMEREXPIRED? FNTYP) -\\TEDIT.PURGE.SPACES (ILEQ) SEDIT::COMPOSE-PSEUDO-SELECTION (CL:LISTP) \\LITATOM.EATCHARS (GREATERP) -COMP.CPI1 (IGREATERP LITATOM) BLOCK (TYPENAMEP FIXP) TEDIT.MOVE (ZEROP) PAGEFULLFN (DISPLAYSTREAMP -TTY.PROCESSP) ONEDINSPECT.DEFAULT.VALUECOMMANDFN (NUMBERP) \\ARRAYBLOCKMERGER (IGREATERP ILESSP) -SCANDEFINEQ (IEQP MEMB FMEMB) SCANEXP (FMEMB FNTYP SOME) \\PREFIXALIGNMENT? (IGREATERP) CONCOCT-SYMBOL - (CL:MEMBER CL:FIND-SYMBOL) TEDIT.SETFUNCTION (TYPENAMEP ILEQ LITATOM STRINGP) GETTTBLPROP (NUMBERP -FMEMB) PLAYTUNE (TIMEREXPIRED?) SEDIT::GET-DESTINATION-CONTEXT (PROCESS.EVAL) FB.EDITLISPFILE ( -STRING-EQUAL GET BOUNDP MOUSECONFIRM) INSTALL-WHO-LINE-OPTIONS (BOUNDP WINDOWP) TB.FIND.ITEM (<= -CL:FUNCALL) DISPLAYSTREAMP (TYPENAMEP SOME) INSURE.WINDOW (TYPENAMEP DISPLAYSTREAMP) CL:INTERN ( -STRINGP CL:STRINGP) IRM.RESET (TYPENAMEP) \\SAVELINEBUF (\\PAGEDEOFP >) \\IDLE.ISMEMBER (STRING-EQUAL -STRPOS EQUAL.CH.NAMES SELECTQ) SCANCOMPILEDFN (EQP MEMB) INTEGERLENGTH (NBITS.OR.LESS IGREATERP -TYPENAMEP) \\DOFORMATTING (ILESSP ZEROP IGEQ IEQP ILEQ IGREATERP) COMP.CPI (SELECTQ OASSOC) -\\COPYARRAYBLOCK (IEQ) OPT.RETTEST (OPT.EQOP EQUAL) MAKEBITTABLE (TYPENAMEP ILEQ GREATERP IGREATERP) -PACK (STRINGP LITATOM IGREATERP) TERMINAL-INPUT (IGEQ) |\\VAMAllocPageGroup| (|\\VAMEnoughSpace|) -COMPILER::SUBSTITUTABLE-P (COMPILER::VARIABLE-WRITE-REFS COMPILER::VARIABLE-READ-REFS COMPILER::LITERAL-P - COMPILER::EVAL-WHEN-LOAD-P) CL::%SQRT-FLOAT (<=) \\STREAMCHARWIDTH (DISPLAYSTREAMP IGREATERP IGEQ -ILESSP) SEDIT::EVAL-SELECTION (NUMBERP ATOM) COPYALL (LITATOM SMALLP CL:CHARACTERP FMEMB) -\\BCPLSOUT.PRESS (GREATERP) TERMINAL-OUTPUT (IGEQ) TRAPLOOP (NUMBERP IGREATERP GREATERP) -\\IDLE.AUTHENTICATE (STRPOS) \\SETFATSYNCODE (ILEQ) ONEDINSPECT.DEFAULT.TITLECOMMANDFN (MOUSESTATE) -\\TEDIT.HARDCOPY.FORMATLINE (ILEQ ZEROP TYPENAMEP ODDP EVENP GREATERP IGREATERP SMALLP FIXP MEMBER -IGEQ ILESSP) \\ADVANCE.ARRAY.SEGMENTS (IGEQ) COMP.ARGTYPE (LITATOM FMEMB GETD) TB.DISPLAY.LINES ( -GREATERP <) DEFMACRO-ARG-TEST (ZEROP =) LITATOM.EXISTS (ATOMHASH#PROBES) \\M44DOEXTENDVMEMFILE ( -GREATERP ILESSP ILEQ) \\CHDEL1 (\\BACKNSCHAR \\XCCSP \\BACKFILEPTR) TEDIT.GETFUNCTION (TYPENAMEP -LITATOM IEQP IGREATERP) SEDIT::CLOSE-NODE-LITATOM (STRINGP) SEDIT::FIND-NODE (IGREATERP) XTOUSTRING ( -ILESSP) HISTORYFIND1 (ATOM APPLY* EDIT4E HISTORYMATCH FMEMB) DBG::STACK-FRAME-VALUE-COMMAND (CL:LISTP -CL:SYMBOLP CL:CONSP) \\SEQUIN.HANDLE.INPUT (ILESSP IGREATERP) \\ECHOCHAR (IGEQ ILEQ) FILEPOS (ARRAYP -LITATOM FIXP IGEQ IGREATERP SMALLP) CL::%RATIO-TIMES (MINUSP) \\DSPYPOSITION.HCPYMODE (NUMBERP) -SELECT.LIST.INSPECTOR (ALISTP PROPLISTP) FFILEPOS (LITATOM IGREATERP ILESSP FIXP IGEQ ARRAYP SMALLP) -COMPILER::CLOSURE-ANNOTATE-CATCH (COMPILER::BLIPPER-NEW-FRAME-P) CL::%RATIO-PRINT (IGREATERP) -FB.PRINTFN (< FIXP) CHANGEBACKGROUNDBORDER (SMALLP) SEDIT::SET-OPTIONS (CL:LISTP) FB.COUNTER.STRING ( -FFETCHFIELD) CL::%NOT-NONCOMPLEX-NUMBER-ERROR (CL:NUMBERP) CCODEP (LITATOM) \\GETCHAR (IGEQ ILEQ) -CL::%COMPLEX-- (=) \\FILLBUFFER (IGEQ ILEQ IGREATERP \\XCCSP \\FILLBUFFER.WORDSEPRP BITTEST SELECTC -\\INCPARENCOUNT) \\FIXP.FROM.FLOATP (FLOATP IGREATERP SMALLPOSP SMALLP ILEQ ILESSP) CL::%COMPLEX-* (=) - BRKDWNINIT (GREATERP) OPENIPSTREAM (EQLENGTH EVERY BOUNDP) \\MAYBEPRINTPACKET (BROADCASTP) -\\FILLBUFFER.WORDSEPRP (IGREATERP) CL::%COMPLEX-PRINT (IGREATERP) COPYDEF (LITATOM) SPP.DESTADDRESS ( -TYPENAMEP) COMPILER::CLOSURE-ANNOTATE-BLOCK (COMPILER::BLOCK-NEW-FRAME-P COMPILER::BLOCK-CLOSED-OVER-P -) CL::%COMPLEX-+ (=) MIN/LEFT (LESSP) BYTE (<) \\TEXTMENU.DOC.CREATE (IMAGEOBJP) CHARWIDTH (SMALLP -TYPENAMEP) PROMPTINWINDOW (MEMB) \\SETUP.FFILEPOS (GREATERP LESSP IGEQ) \\TEDIT.READTABLE (ILEQ) -CLISPIFYFNS (GETPROP IGREATERP) \\STARTDISPLAY (LESSP) SEDIT::FIND-LINE-START (IGEQ) DRAWMARGINSCALE ( -GREATERP ZEROP) FAX.HOSTNAMEP (STRPOS) DUMPGRAPH (TYPENAMEP FONTP) DSPBACKUP (DISPLAYSTREAMP IGREATERP -) MARGINBAR (ILESSP ILEQ IGREATERP) VIDEOCOLOR (ARG) SEDIT::QUERY-THROW-AWAY-CHANGES (EQMEMB) -PROMPTPRINT (GREATERP) SEDIT::EDIT-SELECTION (CL:FUNCALL) INIT/NODES/FOR/LAYOUT (FMEMB EQMEMB) -DINFOGRAPH (TYPENAMEP WINDOWP) |\\VFMInsertPageGroup| (MESAEQUAL GREATERP EQL) \#BITSON (ZEROP) -\\SHOW.ARRAY.FREELISTS (\\BLOCKDATAP IGEQ GREATERP IGREATERP) TWODINSPECT.SELECTROWPROP (EQUAL) -SPP.CLOSE (OPENED) \\PARSEARRAYSPACE1 (EQPTR) SHOW.PRESS (IGREATERP ILESSP ILEQ) WFROMDS (WINDOWP -IMAGESTREAMP IMAGESTREAMTYPEP) FB.CLOSEFN (OBTAIN.MONITORLOCK) |\\CreateScreenBitMap| (IGREATERP -GREATERP BITMAPP) \\DSPFONT.IP (>=) \\PUTBASE (SMALLPOSP SMALLP) END.DELETE.MODE (IGREATERP) CL:ASINH -(CL:COMPLEXP) CONTINUEDIT (GETPROP) |\\CoerceToDisplayDevice| (TYPENAMEP) SPP.SENDEOM (APPENDABLE) -TITLEDICONW (GREATERP) CL::%COMPLEX-/ (=) DASSEM.DSTOREFN (FMEMB) LATTICE/BREAK/CYCLES (FMEMB) -HARDCOPYGRAPH (OPENP WINDOWP NUMBERP GREATERP) \\NSFILING.LOOKUP.CACHE (EQUAL STRING-EQUAL) -\\INTERPRETER1 (<) CL:ATAN (CL:COMPLEXP CL:ZEROP =) DASSEM.ASMAJ (ILESSP IGREATERP) -DELETE/AND/DISPLAY/LINK (MEMBTONODES) NEWPAGE?.IP (LESSP) FB.COUNTERW.REDISPLAYFN (FFETCHFIELD) -\\FTP.NEXTFILE (\\EOFP BSPOPENP DIRECTORY.MATCH) \\DSCCOUT (IGREATERP ILESSP) \\STACKARGPTR (STACKP -TYPENAMEP NUMBERP IGREATERP EQMEMB IGEQ) CL:/= (CL::%<) \\PACKDATE (> < \\ISDST?) CL::%GCD (EQL) -COMP.ANONP (VARIABLE-GLOBALLY-SPECIAL-P) MERGEINSERT (MEMBER IGREATERP ALPHORDER) OPT.RETPOP (SELECTQ -FMEMB) \\IDATESCANTOKEN (DIGITCHARP IGEQ ALPHACHARP) \\UNPACKDATE (FIXP >) \\FM.MENUHANDLER ( -\\FM.ONITEM IGEQ TIMEREXPIRED? STRINGP MOUSESTATE) PROCESSWORLD (TYPENAMEP MEMB) CL:ADJOIN ( -CL::%COMPLEX-MEMBER CL::%SIMPLE-MEMBER) SEDIT::SCALE-INDENT (CL:NUMBERP = CL:CONSP EQL) -\\ENTITYEND.PRESS (ODDP) SPY.END (OPENWP) CL:ACOSH (CL:COMPLEXP <) GETLOCALDEC (FMEMB) -SEDIT::PARSE-INDENT-GROUP-BODY (CL:NUMBERP CL:LISTP) \\LONUM (ILEQ TYPENAMEP CL:INTEGERP) CHANGESLICE -(ILESSP) \\STOPSCROLL? (SMALLP) POSTSCRIPT.INIT (BOUNDP TYPEP GREATERP FMEMB) NU\\TOTOPWDS (FMEMB) -EQFMTSPEC (EQP EQUAL) CL:CIS (TYPEP) NONSYSPROPNAMES (FMEMB) CL::%BUILD-RATIO (MINUSP) TTGIVEHELP2 ( -LITATOM STRINGP STRPOS DISPLAYHELP) CL::%RECIPROCOL (CL:FLOATP) ADD.PROCESS (GREATERP FMEMB) -COMP.LINKCALLP (FMEMB FASSOC) \\SETUP-COMPILED-CLOSURE-CALL (ILESSP IEQ GREATERP) \\RPLRIGHT ( -IGREATERP IGEQ) MAX/RIGHT (GREATERP) PUTWINDOWPROP (DISPLAYSTREAMP) CL:ATANH (CL:COMPLEXP > CL:ZEROP = -) \\OUTDATE-STRING (GREATERP) XCL::SCEILING (= <) XCL::SROUND (CL:FLOATP) \\PRINTFMAP (SMALLP GREATERP -) READGRAPH (GREATERP) \\IDLE.OUT (SMALLP GREATERP \\SECONDSCLOCKGREATERP) DISPLAYSTREAMINIT (NUMBERP -IGREATERP) SPP.CLEAREOM (\\SPP.PREPARE.INPUT) \\TEDIT.SHRINK.ICONCREATE (IGREATERP FMEMB EQUAL) -SEDIT::GET-CONTEXT (CL:EQUAL TYPENAMEP) SIMPLE-COMPARE (>) DASSEM.DASMBIND (IGREATERP) FAULTAPPLY ( -CCODEP CL:SYMBOLP TYPEP) TEDIT.MAPLINES (ILESSP) \\MOVE.WINDOWS.ONTO.SCREEN (GREATERP) CL:CLOSE ( -STREAMP OPENP DIRTYABLE APPENDONLY) ARGLIST (LITATOM TYPEP) OPT.RETOPT (OPT.RETPOP OPT.RETTEST) -CONDITIONS::%RESTART-PRINTER (CL:STRINGP) ANALYZE-REST (CL:ATOM CL:CONSP >) \\SPY.INTERRUPT (IGEQ) -\\DSPLINEFEED.PRESS (NUMBERP) |\\VFMGetPageGroup| (EQL) MOST/VISIBLE/OPERATION (IGREATERP) -CL::%EXPT-FLOAT-INTEGER (MINUSP) XCL::SFLOOR (= <) \\DSPSPACEFACTOR.HCPYMODE (NUMBERP) PROMPTFOREVALED - (REGIONP) SETXY.PRESS (IGEQ ILEQ) GRAPHOBJ.PUTALIGN (MEMB) CHANGEBACKGROUND (TEXTUREP BITMAPP) -HLSTORGB (FGREATERP) \\SPP.PREPARE.INPUT (ILESSP) \\TTW1 (FMEMB TYPENAMEP) \\SETUP-ENVIRONMENT-CALL (> - >= IEQ) MIN/BOTTOM (LESSP) \\NSFILING.ADD.TO.CACHE (EQUAL GREATERP) OPT.JSIZE (ILESSP) TB.SCROLLFN ( -OBTAIN.MONITORLOCK) CHECK-PARAMETER-NAME (CL:KEYWORDP MEMBER) \\TIMER.PROCESS (TIMEREXPIRED?) -\\MOUSE.PROCESS (PROCESS.EVALV TTY.PROCESSP) DBG::STACK-FRAME-PROPERTIES (CL:SYMBOLP GETD) -SEDIT::ATOM-POINT-TYPE (IGREATERP GREATERP) NEWPAGE.IP (ZEROP EQP) GRAPHOBJ.GETALIGN (MEMB) -\\MAIKO.CONS.UFN (ZEROP IGREATERP) \\FM.RIGHTBUTTONFN (INSIDEP \\FM.CHECKREGION \\FM.ONITEM IGEQ) -COURIER.SKIP.SEQUENCE (GREATERP) COMPLEX-COMPARE-FORWARD (>) \\FREESTACKBLOCK (ILESSP IEQ SELECTC IGEQ -) TEDIT.DEACTIVATE.WINDOW (PROCESSP OPENWP \\TEDIT.WINDOW.TITLE TYPENAMEP) MAX/TOP (GREATERP) MAKEBRES - (IGREATERP ILESSP IGEQ) \\HINUM (ILEQ TYPENAMEP CL:INTEGERP) DEFAULT.ADDNODEFN (FASSOC) -\\INITCONSPAGE (ZEROP IGREATERP) ETHERHOSTNAME (GREATERP IGREATERP ILESSP IGEQ) \\SPP.ESTABLISH ( -\\SPP.DUPLICATE.REQUEST) CL::%CONSTANT-BYTESPEC-P (TYPEP CL:CONSP CL:INTEGERP) \\LINEBUF.EOFP ( -\\PAGEDEOFP) CL:COSH (CL:COMPLEXP) CL:DECODE-FLOAT (=) \\NSADDRESS.PRINT.DECIMAL (> <) -LINEBUFFER-SKIPSEPRS (\\PAGEDEOFP SYNTAXP) CROPMARK.CREATE (EVERY) SPY.START (OPENWP) CHECKCONSPAGES ( -ZEROP) \\DTSCAN (IGREATERP) CL:DECODE-UNIVERSAL-TIME (>) \\MAPMDS (GREATERP) \\DSPLINEFEED.HCPYMODE ( -NUMBERP) BMOBJ.GETFN4 (IEQP) \\ISDST? (\\CHECKDSTCHANGE) CL:DISASSEMBLE (CCODEP CL:SYMBOLP) -\\INVALIDATE.PROCESS.WINDOW (ACTIVEWP) TB.REPAINTFN (OBTAIN.MONITORLOCK) TTY/EDITL (SOME NLSETQ) -CL::COUNT-OCCURRENCES (CL:CONSP) \\FAX.PARSE.NAME (IGREATERP DIGITCHARP IGEQ) TWODINSPECT.SELECTITEM ( -EQUAL) APPLY (LITATOM) CL::MAYBE-MAKE-BINDING-FORM (>) FAULTEVAL (LITATOM EQUAL FMEMB) -ONEDINSPECT.VALUEWIDTH (GREATERP) \\SET.PROCESS.NAME (FIND.PROCESS) APPLY* (IGREATERP LITATOM CCODEP -GREATERP) CL::OPTIMIZE-BYTE (TYPEP) CL::%EXPT-INTEGER (MINUSP CL:INTEGERP < EVENP >) CL:ARRAY-RANK ( -%ONED-ARRAY-P %TWOD-ARRAY-P %GENERAL-ARRAY-P) SEDIT::CONVERT-COMMENT-TAIL (STRINGP) -MAKE-CONCATENATED-STRING-INPUT-STREAM (CL:REST) PRINTTIMER (ILESSP) \\ALLOCMDSPAGE (SMALLP) -SEDIT::INSERT-CHANGED (ILEQ) LISPXFIND0 (TAILP) COMP.CLEANFNP (LITATOM) MSTRYSPELLTYPE (LITATOM -MSWORD?) CL:DIRECTORY (EQL) \\SPP.RELEASE.ACKED.PACKETS (SEQ.GREATERP) TB.NUMBER.OF.ITEMS (GREATERP) -PRINTCCODE (\\CHARCODEP SMALLP) \\NSADDRESS.DEFPRINT (IGREATERP <) \\TEDIT.HARDCOPY.DISPLAYLINE (ILEQ -ZEROP GREATERP IEQP IGREATERP SMALLP IGEQ) \\STRING-STREAM-OUTCHARFN (IEQP) \\CHANGE.ETHER.TRACING ( -LASTMOUSESTATE) RELSTK (STACKP) DBG::ATTACH-BACKTRACE-MENU (CL:FUNCALL IGREATERP) CL::%RATIONAL-FLOAT -(= <) PRINT-CIRCLE-LABEL-P (CL:INTEGERP) ANALYZE-PARAMETER (CL:SYMBOLP CL:ATOM) OPT.FINDEND ( -OPT.JUMPCHECK) CL::%RATIONALIZE-FLOAT (= <) TTYINFIX (>=) PRINTLEVEL (IGEQ) -\\TEXTMENU.TOGGLE.SHOWSELFN (FFETCHFIELD) \\ADJUSTABLE-STRING-STREAM-OUTCHARFN (IEQP) -\\TEDIT.GET.PARALOOKS (IGREATERP ZEROP) SEDIT::INITIALIZE (FMEMB) STREAMPROP (IGREATERP) SEDIT::REPAINT - (FIXP TYPENAMEP STRINGP) COMP.CLEANEXPP (COMP.CLEANFNP) \\EVALV1 (\\DTEST) GRAPHNODE/BORDER/WIDTH ( -FIXP IGEQ) \\SETSPACE.PRESS (ILEQ) \\NSFILING.OPENFILE (TYPENAMEP OPENED EQUAL) ENSURE.RGB (LITATOM -HLSP RGBP) \\SETFVARSLOT (NULL-NTENTRY EQP) CL:FILE-LENGTH (STREAMP OPENP) SEDIT::CONVERT-COMMENT-STRUCTURE - (FMEMB STRINGP IGEQ) PRINT-LOADED-FILE-INFORMATION (STRPOS) SMASHFILECOMSLST (LITATOM) -COMPILER::FRAME-ANNOTATE-TAGBODY (COMPILER::BLIPPER-CLOSED-OVER-P) \\FIXLINELENGTH.PRESS (IGREATERP) -\\NSFILING.CONNECT (FFETCHFIELD) CURSOR (\\CURSOR-VALID-P) \\BBTCURVEPT (ILEQ ILESSP) NEXTSIZEFONT ( -IGEQ ILESSP LESSP) INTERPRESSFILEP (GREATERP EOFP) \\CKPOSSOUT (IGREATERP) \\LITPRIN ( -FIND-EXACT-SYMBOL IGREATERP >=) MAKE-FILL-POINTER-OUTPUT-STREAM (CL:ARRAY-HAS-FILL-POINTER-P -EXTENDABLE-ARRAY-P) LOADFNS-MAKELIST (LITATOM) COMPILER::META-CALL-LAMBDA-SUBSTITUTE ( -COMPILER::SUBSTITUTABLE-P) \\TEDIT.CREATE.LINECACHE (GREATERP) DEL.PROCESS (TYPENAMEP FFETCHFIELD) -OPT.COMMONBACK (OPT.EQOP) \\FM.WINDOWENTRYFN (LASTMOUSESTATE INSIDEP \\FM.CHECKREGION \\FM.ONITEM IGEQ -) CL:FLOAT-PRECISION (CL:FLOATP = <) TB.COPYBUTTONEVENTFN (INSIDEP .COPYKEYDOWNP. MOUSESTATE) -\\PRINSTRING (IGREATERP) |\\PFFindRootDirEntryNum| (GREATERP EQL) \\KEYHANDLER1 (IGREATERP -\\CAUSEINTERRUPT IGEQ ILEQ \\UPDATETIMERS ILESSP) PROCESSP (TYPENAMEP DEADPROCP) BMOBJ.GETFN3 (IEQP) -ESPATTERN (FMEMB) SEDIT::COPY-SELECTION-DEFAULT (GREATERP) CCCSCAN (LITATOM FIXP SMALLP EQP) -\\ELIDE.TAIL.STRING (FFETCHFIELD) \\GET.PRIORITY.QUEUE (IGREATERP) RESTART.PROCESS (TYPENAMEP -FFETCHFIELD) FB.GETALLFILEINFO (FFETCHFIELD FMEMB) \\PRINSTACKP (IGREATERP RELSTKP LITATOM) -CL:ENCODE-UNIVERSAL-TIME (< > GREATERP = \\ISDST?) COMPLEX-COMPARE-BACKWARD (>) GET-ONED-DISPLAYW ( -WINDOWP) ONEDINSPECT.SETELT (ILESSP) \\CHECKCONSPAGE (IGREATERP) DASSEM.CANSHAREBINDING (EQUAL PARENTP -) WAKE.PROCESS (TYPENAMEP) ENDLOADUP (ASSOC) CL:FILE-POSITION (RANDACCESSP) FB.HARDCOPY.DIRECTORY (< > -) \\DEFPRINT.BY.NAME (IGREATERP) \\EXTERNALFORMAT (LITATOM FMEMB \\DTEST) CHECKSYNONYM (EQUAL MSWORD?) - EDITL1 (CL:CATCH) CL:FLOAT-SIGN (CL:FLOATP) STREAMP (TYPENAMEP) SUSPEND.PROCESS (TYPENAMEP -FFETCHFIELD) DEFINEDP (LITATOM FFETCHFIELD) \\CKPOSBOUT (IGREATERP) CL:FLOATP (FLOATP) -\\LITPRIN.INTERNAL (< IGREATERP IGEQ ILEQ BITTEST >=) FB.BROWSECOMMAND (FB.DIRECTORYP STRPOS) -FB.ADD.FILEGROUP (EQ.DIRECTORYP NULL.DIRECTORYP) %CONCATENATED-STREAM-DEVICE-BIN (EOFP) -\\CHECKDSTCHANGE (ILESSP) %CONCATENATED-STREAM-DEVICE-EOFP (EOFP) FGETD (SMALLP) POSTSCRIPT.FONTCREATE - (GREATERP) \\SOUT (FMEMB IGREATERP) PROCESS-STATUS (LITATOM STRINGP) RELPROCESSP (TYPENAMEP) CLISPDEC - (ATOM FMEMB) CL:FLOAT-DIGITS (CL:FLOATP) \\TEXTBACKFILEPTR (IEQP ZEROP) PROCESS.RESULT (DEADPROCP) -PUTDQ? (GETD) TB.REMOVE.ITEM (>=) CL:GET-SETF-METHOD (CL:SYMBOLP CL:CONSP) BAKTRACE1 (DUMMYFRAMEP -CL:SOME) %CONCATENATED-STREAM-DEVICE-PEEKBIN (EOFP) GREETFILENAME (STREQUAL MEMB) PUTSEQUIN (SELECTC -ILESSP ILEQ) READTABLEP (TYPENAMEP) SEDIT::PARSE-INDENT (CL:KEYWORDP CL:LISTP) \\SPP.HANDLE.DATA ( -SEQ.GREATERP) MENU.HANDLER (STRICTLY/BETWEEN MOUSESTATE INSIDE? IGEQ TIMEREXPIRED? IGREATERP ILESSP) -PUTPROPS.PRETTYPRINT (FITP) PERIODICALLYRECLAIM (\\SECONDSCLOCKGREATERP) -CL:GET-SETF-METHOD-MULTIPLE-VALUE (CL:SYMBOLP CL:CONSP) FORMAT-EXPONENT-MARKER (TYPEP) LET (\\DTEST) -TTYIN.SCRATCHFILE (OPENP) CCCSUBFN? (FMEMB) \\DSPCOLOR.IP (STREAMPROP) PROCESS.FINISHEDP (DEADPROCP) -FRESHLINE (TYPENAMEP WRITEABLE APPENDABLE) LET* (\\DTEST) DOFILESLOAD (BOUNDP LITATOM STRINGP GETPROP -SELCHARQ FMEMB) MAP.PROCESSES (DEADPROCP) \\CARET.DOWN (TYPENAMEP UNINTERRUPTABLY \\CARET.SHOW) -SEDIT::STRING-OFFSET (GREATERP ILESSP) \\SYMBOL.ESCAPE.COUNT (IGREATERP ILEQ BITTEST > -\\NUMERIC.PNAMEP) COURIER.SKIP (LITATOM GREATERP IEQP) APPEND (ILEQ) NCHARS (LITATOM STRINGP IGREATERP -) TEDIT.COPY (ZEROP) LOOKIN (EVERY LITATOM STRPOS) TEDIT.KILL (TYPENAMEP WINDOWP PROCESSP DEL.PROCESS) - INSPECT (ERROR) \\SCROLL.HANDLER.DOIT (IGREATERP) \\DRAWLINE.IP (NUMBERP < BRUSHP \\CLIPCURVELINE.IP) - BELOWMARKER (ILESSP) \\TEXTSETFILEPTR (IEQP ILESSP IGREATERP) DWIMDEF (SELECTQ LITATOM EQMEMB) -FB.SHAPECOMMAND (>) FB.FASTSEECOMMAND (WINDOWP UNPACKFILENAME) FB.MAYBE.WIDEN.NAMES (ILEQ LESSP) -CL:GET-OUTPUT-STREAM-STRING (STREAMPROP) CL:INTEGER-DECODE-FLOAT (=) CL:INPUT-STREAM-P (\\IOMODEP) -\\MEDW.CURSOR (\\CURSOR-VALID-P) TEDIT.CHARWIDTH (IGREATERP ILESSP) \\INSERTCR (IEQP) -\\FM.UPDATEWINDOWEXTENT (IGREATERP) \\DSPCLIPPINGREGION.PRESS (EQLENGTH) |\\PFRemoveRootDirEntry| ( -GREATERP) \\NUMERIC.PNAMEP (STRINGP LITATOM IGREATERP < <= > >= FMEMB) GIVE.TTY.PROCESS (DEADPROCP -LASTMOUSESTATE) \\DOBUFFEREDTRANSITIONS (IGEQ \\GETBASEPTR) SETREADFN (DISPLAYTERMP FGETD -DISPLAYSTARTEDP) \\INSTALL.EXTERNALFORMAT (TYPENAMEP LITATOM FMEMB) FB.INFO.ITEM.NAMED (STRING-EQUAL) -PROCESS.TTY (TYPENAMEP FFETCHFIELD) NEWLINE.IP (LESSP) OPT.JUMPREV (OPT.EQOP OPT.DELCODE FMEMB -OPT.CALLP OPT.JUMPCHECK OPT.EQVALUE) WINDOWP (TYPENAMEP) COMP.STBIND (EVERY) PRINTPACKETQUEUE ( -TYPENAMEP) TTYINSTRING (\\FATCHARCODEP SMALLP COMPLEXCHARP) MAKE-UNICODE-TRANSLATION-TABLES (IGEQ -GREATERP ILEQ IGREATERP) FB.HARDCOPY.TOFILE (FMEMB) FB.ADJUST.DATE.WIDTH (TB.FIND.ITEM) EDITBF ( -EDITBF1) PFI.PRINT.BITMAP (IMAGESTREAMP DISPLAYSTREAMP < > GREATERP PNAMESTREAMP) -COURIER.WRITE.FAT.STRING (ODDP) ONEDINSPECT.SELECTPROP (EQUAL) \\TFBRAVO.READ.PARALOOKS (NUMBERP -IGREATERP IEQP) ENVAPPLY (LITATOM) FORMAT-FIXED-AUX (>= <=) \\CHECKFLTFMT (EVERY) RUNION (FMEMB) -FLTFMT (\\CHECKFLTFMT) MKATOM (STRINGP IGREATERP LITATOM NUMBERP) \\NSFILING.CLOSE.CONNECTIONS ( -SELECTQ \\SECONDSCLOCKGREATERP) \\DRAWPOINT.IP (BITMAPP) MSPATHSPRINTFN (MSMEMBSET) -\\MEDW.PUTWINDOWPROP (DISPLAYSTREAMP NUMBERP) IMAGEOBJP (TYPENAMEP) DELFROMLIST (FMEMB) -\\DSPXPOSITION.IP (EQP) \\RELEASE.ETHERPACKET (FFETCHFIELD) MB.NWAYBUTTON.ADDITEM (GREATERP) -\\TRACKCURSOR (IGEQ IGREATERP ILESSP) \\SPP.HANDLE.ATTN (MEMB APPLY*) \\EVALFORM (LITATOM) -CL::%PRINT-TIMING-ITEM (>) \\GC.HANDLEOVERFLOW (IGREATERP ILEQ TYPENAMEP CL:INTEGERP) CL:INTEGER-LENGTH - (< CL::BITS-OR-LESS-P) SEDIT::RELINEARIZE (FREPLACEFIELD) \\TEDIT.LINECACHE (IGEQ) \\MAKESTACKP ( -STACKP TYPENAMEP) MSNEXTWORD (SOME CHECKSYNONYM FMEMB) CL:ISQRT (CL:INTEGERP >= ODDP) -\\FM.WINDOWEXTENT (WINDOWP BITMAPP) PROCESS.WINDOW (TYPENAMEP) OPT.LABELNTHPR (IGREATERP) OPENW ( -OPENWP \\USERFNISDON\'T) SEDIT::CHANGE-PACKAGE (CL:MEMBER) TTYINREADP (LINEBUFFER-EOFP) BPNT0 (NLSETQ) - \\SAVEVMBACKGROUND (ILESSP FIXP \\SECONDSCLOCKGREATERP \\FLUSHVMOK? GETD) NSNET.DISTANCE (TYPENAMEP -GREATERP) CENTERPRINTINAREA (IGREATERP) TTPRIN1 (U-CASEP >= >) \\MAKENUMBER (SMALLPOSP SMALLP) -\\INTERPRETER (LITATOM TYPEP \\DTEST IGREATERP GREATERP) SEDIT::BACKSPACE (TYPENAMEP) STKAPPLY ( -LITATOM) OPT.LBDEL (OPT.JUMPCHECK) DASSEM.MATCHVARS (EQUAL DASSEM.CANSHAREBINDING) -CL::STRUCTURE-OBJECT-INSPECT-STOREFN (CL::PSLOT-ACCESSOR) PNAMESTREAMP (TYPENAMEP) SEDIT::DEFAULT-PACKAGE - (CL:SYMBOLP CL:KEYWORDP) \\TEXTPEEKBIN (ILESSP \\EOFP ZEROP) CL:LOGCOUNT (MINUSP TYPENAMEP) -\\TEDIT.BLTCHAR (ILESSP) PRINT10TO3 (MEMB) PROG (\\DTEST) LAPRD (LITATOM) \\PROC.RESUME (FFETCHFIELD) -DASSEM.EQCONSTANTP (FIXP IGEQ) RETAPPLY (LITATOM) USERLISPXPRINT (STRPOS) IMAGEOBJPROP (IGREATERP -IMAGEOBJP) \\TEDIT.PEEKBIN.NEW.PAGE (IEQP \\EOFP) \\DTEST.UFN (TYPENAMEP ILEQ CL:INTEGERP) -COPIEDFILEMATCH (COPIEDFILEMATCH) \\ENQUEUE (GREATERP) WINDOW.MOUSE.HANDLER (LISPWINDOWP +\PERIODIC.INTERRUPTFRAME (FN) PRINTNUM-TO-STRING (NUMBER FLOATFLAG RAD WIDTH) \SPP.PREPARE.INPUT (EPKT + TIMEOUT) INPUT (FILE) \IPCURVE2 (VISIBLEP DUPLICATEKNOT) \STKARG (NT) SEDIT::SET-POINT-COMMENT ( +SEDIT::INDEX SEDIT::OFFSET) CL::DEFINE-CONSTRUCTORS (CL::ALL-BOAS?) INSPECTW.CREATE (PROPERTIES +PROPPRINTFN PROPERTIESLST) MODERNWINDOW.BUTTONEVENTFN (CORNER ANYWHERE ORIGFUNCTION) +TEDIT.INSERT.UPDATESCREEN (INCREMENTAL WINDOW DONTSCROLL L1 LN SELINE) \DSPLINEFEED.HCPYMODE (DELTAY) +\FTP.GENERATEFILES (EXTENSION VERSION DIRECTORY WANTDEVICE DEVICE FILTERNEEDED RESULT) +\TEDIT.SMALLER.CARET (LOOKS) \FM.STATE-CHANGESTATE (DISPLAYITEM) CLOSEMAINWINDOW (MAINWIN) +\LEAF.FIX.BROKEN.SEQUIN (PUP UNANSWEREDPUPS AFFECTEDFILES) SEDIT::EXPANDREGIONFN (SEDIT::REGION) +PROCESS.WINDOW (P WINDOW) CLISPIFY2 (FORM) VIDEORATE (TYPE) COMP.PROG (TAGS FLG) +\INSTALL.EXTERNALFORMAT (EXTERNALFORMAT) \NSFILING.CLOSEFILE (ABORTFLG HANDLE NEWHANDLE) +\NSADDRESS.PRINT.DECIMAL (PIECES) PFI.MERGE.INDICES (NEWINDEX MASTER) CL:LISTP (X) SPP.CLOSE (STREAM +ABORT?) RECLOOK (RECNAME ERROR TL) \DRAWLINE.IP (DASHING) \DTEST.UFN (OBJ) WINDOW.MOUSE.HANDLER ( +\MHWINDOW SI::*OR-GENTEMP*) FB.BROWSECOMMAND (INTERESTING MAINDIR) TWODINSPECT.ADJUSTSELECTION ( +SELECTION) SCREENBITMAP (SCREEN) \BACKTRACE (CNT JUNK VARS LOCALS NAMES ALINKS) +CREATE.NUMBERPAD.READER (FLOATINGPTFLG POSITIVEONLYFLG INCLUDEABORTFLG MSG) XCL::WHERE-IS-FILES ( +PATHNAME) \FTP.ADD.QUOTES (PIECES) \FM.STATE-SELECTEDFN (NEWSTATE) \LEAF.HANDLE.INPUT (DONEPUP ERROR) +DISMISS (MSECSWAIT TIMER) \PROC.RESUME (OLDFX) COMP.LAMBDA (VARS V) \TEDIT1 (UNSPAWNED) EDIT%: (LC X) +\TEXTMENU.TOGGLEFN (STATECHANGEFN) MSSETUP (INITFLG) WAITFORINPUT (N) RADIX (N) \INSERTCH (INSERTMARK +\INPC PLOOKS NLOOKS REPLACING) SEDIT::CONVERT-COMMENT-TAIL (SEDIT::TAIL) \DSPRIGHTMARGIN.HCPYMODE ( +XPOSITION) \INTERPRETER (ARGLIST) TTYINBUFFERPEEK (NOERRORFLG) CL::%%MAKE-SMALL-FIXP-ACCESSOR (TYPE) +SAVEDEF (TYPE DEFINITION) TEDIT.NEW.FONT (NAME) \COERCE.NS.SOCKET (ADDR DEFAULTSOCKET) +SEDIT::CONVERT-COMMENT-STRUCTURE (SEDIT::2-STARS) \DSPFONT.HCPYMODE (FONT) \SPP.DEFAULT.ERRORHANDLER ( +CON) SEDIT::PARSE-STRING-INTO-WORDS (SEDIT::OK?) \BSP.SENDBUFFER (DEMANDINGLY) +\NSFILING.DISCARD.SESSION (KEEPSTREAM KEPT) VIRGINFN (MAKE-VIRGIN? BROKEN-DEFN ADVISED-DEFN +CHANGED-NAMES EXPR-DEFN) \SPP.ESTABLISH (NAME) PROCESS.EVAL (WAITFORRESULT) \TEDIT.COMMAND.RESET.SETUP + (STARTING) \PRINTFRAME (VARSONLY FAST INCALL VALIDNAMETABLE NOPUSH SLOWP) ONFILE (FNSONLY FINDITEMS +VAL FILES) FB.FASTSEECOMMAND (BUTTONS) DO.SHIFTED.SELECTION (START INITMODE EXTENDING) +TITLEW.BUTTONEVENTFN (TITLECOMMANDFN) \PRINTBF (VARSONLY) CH.ADD.ITEM.PROPERTY (INTERPRETATION) +EDITCALLERS (FILES ENV I PRINTFLG FNS OTHERSFILES) ONED.TRACKCURSOR (SELECTION HORIZONTAL-P PROP +SELECTEDPROP NEWPROP) \TEDIT.MAKEFILENAME (FIRSTNONSPACE LASTNONSPACE) \DECODETRANSITION (DOWNFLG +SHIFTED) MERGE (B A) PROCESS.READ (WINDOW CLEAR? PROMPT OLDW) DINFO.EXPANDFN (FMENU) \LEAF.TIMEDOUT ( +TRIES) MAKENEWCOM (LISTNAME) DECODE/WINDOW/OR/DISPLAYSTREAM (TITLE BORDER DSORW) TTYDISPLAYSTREAM ( +DISPLAYSTREAM WIN) CLISPIFY1 (SUBPARENT TAIL LST TAIL0 OPR0 NOVALFLG SEG) \SETXFORM.PSC (NORESTORE) +PRINTTIMER (TIMEOUT) CL::%%ATAN-FLOAT (CL::X CL::CONSTANT-FLAG CL::ADD-FLAG CL::NEGATE-FLAG) FASSOC ( +ALST) \PROCESS.EVAL1 (..PEV-PROC..) TB.COPYBUTTONEVENTFN (CURRENTITEM SI::*OR-GENTEMP*) +CL::%%MAKE-FLOAT-ACCESSOR (TYPE) \LEAF.RECONNECT (OLDONLY) PRIN2 (OBEY-PRINT-LEVEL) LOOKUP.NS.SERVER ( +TYPE FULLFLG) SEDIT::CONVERT-COMMENT (SEDIT::NODE SEDIT::START) \DSPLEFTMARGIN.HCPYMODE (XPOSITION) +CL:MAKE-PATHNAME (DEFAULTS DIRECTORY) SET (VAR VALUE) TTPRIN1 (DOWNCASE INITP) \TEDIT.NEWREGIONFN ( +MOVINGPOINT) \NSADDRESS.DEFPRINT (HOST) \FAX.PARSE.NAME (HOST) CLISPFUNCTION? (FN1 TEM) SPP.CLEAREOM ( +NOERRORFLG) CHAT.TYPEOUT.CLOSE (CHATPROC) SETSYNONYM (NEWPHRASE KEYLST) FB.ADD.FILEGROUP (PREVDATA +OTHERDATA) %## (COMS) \DRAWCURVE.IP (DASHING) ESUBST (ERRORFLG) REQUIREVERSION (LISP MICROCODE BCPL) +\DEFINEDEVICE (DEV TEMP NAME) RECORDFIELDNAMES (FLG) FB.HARDCOPY.TOFILE (HCOPYFILE HOST HAVEDIRECTORY) + CLISPATOM (TAIL NOFIX89) U-CASE (FATP CHANGEFLG) \CREATECHARSET.IP (NOSLUG? RELFLAG) CHANGENAME1A ( +MAP Y) SEDIT::PARSE-INDENT-BODY (SEDIT::TAGBODY?) COMPILER::GENCODE-LABELS (COMPILER::CLOSED-OVER) +CLOSEICONWINDOW (ICONW) \PROCESS.APPLY1 (..PEV-PROC..) XCL::WHERE-IS-NOTICE (XCL::TEMP-FILE XCL::NEW) +MAP (MAPFN2) PROCESS.APPLY (WAITFORRESULT) APROPOS (ALLFLG QUIETFLG CASEXACT FILTERFN) SPY.TREE ( +INDIVIDUALP) \GETDEVICEFROMNAME (NOERROR) \TEDIT.LARGER.CARET (LOOKS) CL:MERGE-PATHNAMES (DIR +DEFAULT-DIR NAME) \GETDEVICEFROMHOSTNAME (DONTCREATE) CLDISABLE (BRACKET FLG) \HARDCURSORUP (INVERTFLG +) MSINTERPRET (SETTYPE MSPRED UPDATEALL FROMFOUND INVERTED) CL:MAP (RESULT-TYPE MORE-SEQUENCES) +CHANGE.NODEFONT.SIZE (NEWFONT CHNGFN) CL::%%MAKE-FIXP-ACCESSOR (TYPE) MODERNWINDOW (ANYWHERE +TITLEPROPORTION) FB.HARDCOPYCOMMAND (FILES) INITDATATYPENAMES (FINAL) CL:MISMATCH (END1 END2 FROM-END) + CLISPERROR (FLG IN) CL:NOTANY (MORE-SEQUENCES) \REMOVEDEVICE.NAMES (CHANGED NAMES) +\TFBRAVO.PARSE.PARA (LEN) FNCHECK (PROPFLG NOERRORFLG) CL:NSUBSTITUTE-IF (END COUNT) \CCODEARGLIST ( +SMARTP) CL:NSUBSTITUTE-IF-NOT (END COUNT) \UNQUEUE.EVENT (TAIL) SELECT.ATOM.ASPECT (ASPECTS +ALWAYSASKFLG OFFER-INSPECT-CODE?) \SHIFT.DOCUMENT (PC) EDITFPAT (FLG) CL:NSUBSTITUTE (END COUNT) +\DELETEFILE (DEV) PACK* (CLAUSE) BSPPRINTPUP (VERBOSE) CL:PARSE-NAMESTRING (CL:DIRECTORY +CL::SUBDIRECTORY CL::RELATIVEDIRECTORY) EDITXTR (TOFLG) \TRANSMIT.STRATEGY (MAKEA?) EDITMBD (LC TOFLG) + OBTAIN.MONITORLOCK (DONTWAIT) POSTSCRIPT.FONTCREATE (PSCFD FACECHANGED SCALEFONTP FULLNAME UNITFONT +TMP) ICONW.SHADE (SHADE) EDITMV (LC X TOFLG) CL::%%MAKE-FLAG-ACCESSOR (TYPE) \NSNET.CLOSERP (ROUTEX) +\DEVICEEVENT (BEFOREP) PARSE-NSADDRESS (VAL NET NSHOST PREV10 HOST) SEDIT::SETF-OF-GET-FORMAT (SEDIT::SPEC +) CL:PEEK-CHAR (EOF-ERRORP CL:CHAR) ADDTOCOM1 (LISTNAME NEAR) ONEDINSPECT.MAKEREGIONS (VALUEWIDTH) +FILES? (PRINTED TB FLG) \BLTSHADE.IP (DESTREGION CLIPPINGREGION) \LFVersions (FIXEDVERSION HMIN) +MENUWMINSIZEFN (TITLERELATEDVAR) SEDIT::LINEARIZE-COMMENT (SEDIT::INDEX FIRST) FIXATOM (TAIL0) +MSSETPHRASE (NOTYP NEG) RELEASE.MONITORLOCK (OWNER EVENIFNOTMINE PREV) \PUT.FILING.ATTRIBUTE ( +VALUETYPE) SEDIT::CHANGE-PRINTBASE (SEDIT::NEW-PRINTBASE) CL:POSITION-IF-NOT (END) OPT.PRATTACH (AFTER +) CH.RETRIEVE.ITEM (ADDRESS INTERPRETATION) FB.MAYBE.WIDEN.NAMES (OVERFLOW) \TAN.OLD (RADIANSFLG +FLIPPED) CREATE.MONITORLOCK (EXCLUSIVE) MACROEXPANSION (COMPFLG) DOATTACHEDWINDOWCOM (ATTACHEDW) +SEDIT::CHANGE-PACKAGE (SEDIT::NEW-PACKAGE SEDIT::NEW-PACKAGE-NAME) SI::MONITOR-UNWIND (LOCK OWNER PREV +) \FM.3STATE-SETUPOFFBITMAP (OFF) CL::%%ASIN-FLOAT (CL::REDUCED CL::NEGATIVE CL::ACOS-FLG) +CHAT.OPTIONMENU (MENU) CL:POSITION-IF (END) COMPILER:OPTIMIZE-AND-MACROEXPAND (COMPILER::CHANGED-P) +CL::%%PRINT-TIMING-ITEM (CL::ALWAYS-P CL::TIME-P) FILES?1 (FIRST) TB.MAKE.BROWSER (ITEMHEIGHT OLDP) +CL::%%MAKE-WORD-ACCESSOR (TYPE) \RTP.FILTER (CHECKFRNPORT CHECKID) IRM.LOOKUP (SMARTFLG REF) +FULLPRESSBITMAP (SCALEFACTOR CLIPPINGREGION) CL:PROBE-FILE (NAMESTRING-IF-EXISTS INFILEP) SCANBACK (N) + PRINTPACKETQUEUE (PACKET) PRINTPUPQUEUE (PUP VERBOSE) EDIT4F (C3 CHANGEFLG CHARFLG TOPLVL NEWFLG) +\TFBRAVO.WRITE.RUN (NAMEDTABNUMBER) VRULE.DISPLAYFN (RULING) \FTP.DIRECTORYNAMEONLY (N) CL:READ-BYTE ( +EOF-ERRORP) ONEDINSPECT.ADJUSTSELECTION (SELECTION) TB.REDISPLAY.ITEMS (FIRSTITEM LASTITEM) +GETRELATION (INVERTED) TEDIT.FLASHCARET (FIRSTTIME) TOPW.ADJUSTSELECTION (SELECTION) SEDIT::RELINEARIZE + (SEDIT::SUPER-NODE SEDIT::FROM-TOP) \TEDIT.TEXTBIN.NEW.PAGE (SPLITCHAR) CALL.MOVENODEFN (MOVEFN) +HARDCOPYREGION.TOPRINTER (PRINTERCHOICE) \GETFILENAME (FDEV) PUPSOCKETFROMNUMBER (SOCHI) +HARDCOPYREGION.TOFILE (FILE&TYPE) SEDIT::BACKSPACE (SEDIT::NODE) CL:READ-LINE (EOF-ERRORP RECURSIVE-P) + \GENERIC.OUTFILEP (V) PRINTPACKET (PRE.NOTE CALLER) MULTIFILEINDEX1 (CONSECUTIVE INDICES NOTPRINTED) +PACKFILENAME (RELATIVEDIRECTORY DIRECTORY VAL HOST DEVICE SUBDIRECTORY NAME EXTENSION VERSION) +SEDIT::PRINT-STRING (SEDIT::PRIN-2?) \TEDIT.LOOKS (FONT FACE SIZE NEWLOOKS) REBREAK (FNS) +CL:READ-CHAR-NO-HANG (EOF-ERRORP) CL:READ-FROM-STRING (END START PRESERVE-WHITESPACE) +\PROCESS.MOVEFRAME (RESIDUAL) CL:REMOVE-DUPLICATES (END) COURIER.WRITE.FAT.STRING (UNSPECIFIED) +TB.DO.ITEM.SELECTION (OLDSELECTION) SEDIT::INSERT-COMMENT-CHARS (SEDIT::SUBNODE SEDIT::INDEX +SEDIT::SUBNODES) CL:REMOVE-IF (END COUNT) \TEDIT.MAINW (WINDOWS) CL:REDUCE (END FROM-END) +\WRITEPRESSBITMAP (CLIPPINGREGION SCALEFACTOR) \SPPCONNECTION (HOST) \SPP.HANDLE.ATTN (ATTENTIONFN) +\UNQUEUE.TIMER (NOERROR) \CLEARSYSBUF (ALLFLG) \IOMODEP (ACCESS) MSLISTSET (TRYHARD) +\TEDIT.UNPARSE.CHARLOOKS.LIST (VAL) CL::%%MAKE-BIT-ACCESSOR (TYPE) MAKEMAINWINDOW (OLDMINSIZE +OLDMAXSIZE) CLOSEPUPSOCKET (NOERRORFLG) CL:REMOVE-IF-NOT (END COUNT) \ENQUEUE.TIMER (NEXT) +\DRAWELLIPSE.PRESS (ORIENTATION) CL:RENAME-FILE (CL::NEW-FULLNAME) CHARSET (NEWVALUE) \IMAGEUSERPROP ( +SET? PLIST) \LEAF.OPENFILE (CRDATE TYPE) ICMLARRAY.GETMENUWGROUP (TOPLEFT PWINDOW) WAIT.FOR.TTY ( +NEEDWINDOW MSECS TIMER) FIX89TYPEIN (APPLYFLG) \DRAWLINE.PRESS (DASHING) \RTP.CLEANUP (FN) +WHO-LINE-VMEM (VMEM-CONSISTENT?) \TEDIT.ITALIC.CARET.OFF (LOOKS) CHANGECALLERS (REL FILES) PRINT10TO3 +(DOFILTER PRE.NOTE) CL:SEARCH (END1 END2 FROM-END) \COURIER.RECORDTRAN (TYPEDEF TAIL) +SEDIT::SCAN-FOR-BOUNDS (SEDIT::INITIALIZE) \TYPEGLOBALVARIABLE (VARFLG) FILEPKGTYPE (TEM) +\RTP.HANDLE.PUP (PUP) OPT.SKIPPUSH (LEVOPFLG VL) \ASSIGNDATATYPE1 (SUPERTYPE NTYPX SIZE REDECLARED +FOUNDSOME) SEDIT::INSERT-COMMENT (SEDIT::CHARS) EDITMOVESUBTREE (GRAPH NOW NEAR) \COS.OLD (RADIANSFLG) + \TEDIT.ACTIVE.WINDOWP (TEXTOBJ) BESTNSADDRESS (ERRORSTREAM BESTADDR NOTLOOKEDUP ADDRESSES) HARDCOPYW +(PRINTERTYPE PRINTHOST FILE SCALEFACTOR REGION HOST) PROPERTAILP (X) \ICONW.REPAINTFN (ERASEBM SHADEBM +) \FM.TOGGLE-CHANGESTATE (NEWSTATE) COURIER.WRITE.SEQUENCE.UNSPECIFIED (ITEM LENGTH) ADDTOFILES? ( +NOASKSTR BUFS NAME FILE) FB.SET.BROWSER.TITLE (TIME) PPSOC (VERBOSE) INSPECT.INVERTSELECTION ( +SELECTION) \DSPOPERATION.IP (OPERATION) \ENQUEUE (THISITEM JUNK) ORDERFROMBOTTOMTOTOP (WLST WPTR) +CL::ESTABLISH-SETFS-AND-OPTIMIZERS (CL::ACCESSOR) FB.COPY/RENAME.COMMAND (FILELIST NEWNAME) +\RENAMEFILE (OLD-DEVICE) REMPROP (X0) FIXSPELL2 (FLG) \REVALIDATEFILE (NEWSTREAM) +CL::%%COMPLEX-TREE-EQUAL (CL::TEST-NOT-P) PUTPROP (X X0) KEYACTIONTABLE (OLD) CL:SOME (MORE-SEQUENCES) + \DRAWCURVE.PRESS (DASHING) \RTP.INFO.HOOK (WINDOW) MOVEATTACHEDWINDOWTOPLACE (EDGE) OPENPUPSOCKET ( +ID#EXPLICIT? CLASHP) CL:TREE-EQUAL (CL::TEST CL::TEST-NOT) \RECLAIMARRAYBLOCK (RECLAIM-P) +PFI.NEW.LISTFILES1 (FULL) TEDIT.REDO (CH) TOPW.BUTTONEVENTFN (COLUMNPROPCOMMANDFN SELECTION) +SEDIT::CHECK-SELECTION-SHIFT (SEDIT::LET-GO SEDIT::NEW-SHIFT) \TEXTOPENF-SUBTREE (PCTREE) \CAR.UFN (X) + \TEDIT.GET.CHARLOOKS (PREVPC) CREATEHASHFILE (%#ENTRIES) SEDIT::COMMENT-OUT-SELECTION (SEDIT::NODE +SEDIT::START) \CDR.UFN (X) COMPSET (FILE FLG) FORGETPAGES (TOPAGE FROMPAGE BUFFER PREVBUFFER) +GRAPHBUTTONEVENTFN (NOW NEAR) MSPRED (FLG) RESTOREMAP (BUFFER PAGES PREVBUFFER) TWODINSPECT.REPAINTFN +(WINDOWREGION STARTROWPROPS STARTCOLUMNPROPS) \DELETECH (DONTDIRTY PC1 PC HIPC) KEYACTION (ACTIONS) +\LEAF.TRUNCATEFILE (LASTPAGE) \PAGED.REVALIDATEFILE (NEWSTREAM) SEDIT::STRUCTURE-FROM-STRING (SEDIT::STR +) CL::%%TAN-FLOAT (CL::RECIPFLG) \UNWIND.UFN (PUSHP) PFI.PRINT.BITMAP (CURX CURY UNITS LINEHEIGHT +BMARG POS) CL::%%MAKE-POINTER-ACCESSOR (TYPE) ICMLARRAY (DISPLAYGROUP) MSINTERPA (VAL) +FB.CREATE.FILEBUCKET (LASTFILEDATA LASTDIR LASTNAMECHAR ATTR) RETDWIM (POS X APPLYFLG) +TEDIT.STYLESHEET (TEXTSTREAM TEXTOBJ) COPY (X) \PROC.AFTER.WINDOWWORLD (EXECPROC) \LFDirectorySearch ( +HMIN MATCH) CL:ENDP (CL::OBJECT) \BUFFERED.REVALIDATEFILE (NEWSTREAM) OVERLAPPINGWINDOWS (WPTR) +\HTFIND (PREV) MENU (RELEASECONTROLFLG NESTEDFLG SELVAL) FONTNAME.IP (FACE) \SCALEDBITBLT.IP ( +CLIPPINGREGION DESTINATION-REGION) \LEAF.SETFILEINFO (WASOPEN) DINFO.LOOKUP (LOOKUPFN OLD.STRING +STRING) \BSP.PREPARE.OUTPUT (TIMEOUT) CHAT.SENDSCREENPARAMS (FN) ADDTOFILE (FILE) \FILE-CONFLICT ( +STREAMS-FOR-THIS-FILE) \LOOKUPPUPNUMBER (RESULT) CL::%%VALID-TYPE-P (TYPE) COMPILER::COPY-VARIABLE ( +COMPILER::VAR) \TEDIT.ABBREV.EXPAND (EXPANSION) \RPLACA.UFN (X Y) OPT.DELETEFRAMECHECK (CD VARS) +\GENERATENOFILES (STAR ESC) COURIER.WRITE.SEQUENCE (ITEMLIST) \RPLACD.UFN (X Y) NSNET.DISTANCE (ROUTE) + TWODINSPECT.BUTTONEVENTFN (SELECTION) TEDIT.NEXT (TARGET FIELDSEL SEL) SEDIT::STRUCTURE-FROM-SELECTION + (SEDIT::START) \CONS.UFN (Y PRIOR PRIORPRIOR) CL:SUBSTITUTE-IF (END COUNT) CLISPFOR0 (LASTPTR I.S.OPR + I.S.TYPE FOR FROM IN ON TO AS I.S. I.S.PTRS I.V. RETPREDS AFTERPREDS TERMINATEFLG INITVARS +MAKEPROGFLG FINALLY FIRST EACHTIME EXCEPTPREDS BY I.S.TYPE1 IVINITFLG DECLARELST) TEDIT.PARALOOKS ( +TABSPECC REPLACEALLFIELDS NPC 1STLEFT LEFT RIGHT LEADB LEADA BLEADSET LLEAD QUADD TYPESET SUBTYPESET +SPECIALX SPECIALY NEWBEFORESET NEWAFTERSET HEADINGKEEP KEEPSET BASESET HCPYSET USERSET REVISEDSET +STYLESET CHARSTYLESSET COLUMNSET) CLISPCAR/CDR (LST SETQFLG TAILFLG) FMEMB (Y) PPROC (PROC) +CL::GET-PS-FROM-ACCESSOR (CL::NO-ERROR-P) MSGETBLOCKDEC (FNSET) FB.INSERT.FILE (NEXTITEM NOSUBDIRS) +\NOFILESNEXTFILEFN (FILE) TEDIT.SUBSTITUTE (REPLACESTRING PATTERN ABORTFLG CONFIRMFLG CRSEEN) +SETINTERRUPT (CHAR CLASS) FLUSHRIGHT (CENTERFLAG P2FLAG) DINFO.FIND (STRING) INTCHAR (CHAR TYP/FORM +OLDINT SYSDEF) \CHECK.PQUEUE (PREV NEXT THISP X) CLRPROMPT (P) GRAPHADDLINK (ADDFN) \DSPYPOSITION.IP ( +YPOSITION) CL:SUBSTITUTE-IF-NOT (END COUNT) ICMLARRAY.GETREGIONFN (MOVINGPOINT) +CL::GET-PS-FROM-PREDICATE (CL::NO-ERROR-P) MSINTERPRETSET (REP INVERTED ARG) NUMBERPAD.READ ( +ACCEPTTYPEINFLG) CL::%%TYPEP-PRED (CL::EXPANDER) \PRESSCURVE2 (DUPLICATEKNOT) \KEYACTION1 (ALTGRCODE) +PACKFILENAME.STRING (RELATIVEDIRECTORY DIRECTORY VAL HOST DEVICE SUBDIRECTORY NAME EXTENSION VERSION) +CL::GET-SLOT-DESCRIPTOR-FROM-PS (CL::NO-ERROR-P) \RESTLIST.UFN (TAIL) CLISPIFY2B (TEM1) +CL::CACHE-SETF-INFO (CL::ACCESSOR) \SIN.OLD (RADIANSFLG) \PROCESS.MAKEFRAME (FLG) SCROLLBYREPAINTFN ( +EXTENT CONTINUOUSFLG) CL:SUBSTITUTE (END COUNT) CL::CACHE-SLOT-INFO (CL::FAST-ACCESSORS) DOTABS (LST) +\FIXDLINES (LINE PL NL) WHICHW (WINDOW) PPROCREPAINTFN (REGION) NOT.TRACKCURSOR (Node) BCOMPL3 ( +SCRATCHFILE CFILE) GETFILEINFO (LEN) CL:USER-HOMEDIR-PATHNAME (HOST) \FTP.FLUSH.TO.MARK (ECHOSTREAM +STREAM) FIND.PROCESS (ERRORFLG) SPLITKEY (PTR) \FILE.NOT.OPEN (NOERROR) +SET-CONNECTED-DIRECTORY-INTERACTIVELY (NEW-DIRECTORY) CL:TYPE-OF (CL::D) WTFIXLOADEF (FAULTEM3) +ICONW.PRINT-JUSTIFIED (NEWFLG) OPT.FRAMEVAR (CD ANY) TWODINSPECT.COPYBUTTONFN (SI::*OR-GENTEMP* +SELECTION) MAKE-UNICODE-TRANSLATION-TABLES (RCOMBINERS PREV) CL::USEFUL-TYPE-EXPANSION-P (CL::EXPANDED +) HARDCOPYIMAGEW.TOPRINTER (PRINTERCHOICE) DINFO.UPDATE.FROM.GRAPH (GRAPHER.NODE) BSPINPUTSTREAM (SOC) + UPDATEFILES (PCHANGES) RESETKEYACTION (RESETINTERRUPTS) COMP.COND (X MORE ENDF) RESHAPEBYREPAINTFN ( +OLDSCREENREGION EXTENT) COMPILER::COMPILE-AND-DUMP (COMPILER::BD-LIST) \NSPRINT.FULL.REQUEST.STATUS ( +STREAM) TEDIT.INSERT (CH#ORSEL LOOKS DONTSCROLL) \ELIDE.PRINT.TAIL (NOSPACEP) \TEXTCLOSEF-SUBTREE ( +PCTREE) \DOHELPINTERRUPT1 (OLDTTY) \HANDLE.NS.ROUTING.INFO (NDB NEWTIMER) \FTP.FLUSH.TO.EOC ( +ECHOSTREAM STREAM) \TEDIT.DELETE (WINDOW LINES OLINE1 OLINEN) \PROC.FINDREALFRAME (POS) +DINFO.DEFAULT.MENU (TYPE) CL::%%SUBST-IF (CL::KEY) CHAT.LOGINFO (FN) CL::%%COMPLEX-SUBST (CL::KEY +CL::TEST-NOT-P CL::TEST-RESULT) MB.NB.PACKITEMS (ITEMWIDTHS CURLINE MAXITEMS/LINE) \SETPRINTLEVEL ( +CARN) PACKAGE.NAME (RMPKG) SHADEITEM (DS/W) \NSFILING.GETFILE (SEQUENTIAL OPTION DIRPATH DIROK HANDLE +FILE.ID RANDEVICE EXPLICIT-VERSION OLDHANDLE OLDSTREAM HAVELOCK) PRESSBITMAP (SCALEFACTOR +CLIPPINGREGION) CLISPATOMARE2 (Z X1) SPAWN.MOUSE (INTERNAL MOUSEPROC) \PFTransferPage (runLength +noBreak) \CURVE2 (USERFN BBT SI::*OR-GENTEMP* SOFTCURSORUP) CL::%%SUBST-IF-NOT (CL::KEY) +HARDCOPYIMAGEW.TOFILE (FILE&TYPE) \TEDIT.PACK.TARGETLIST (TARGETLIST) FIND.SYMBOL (INDEX DONE TABLE) +CHECK/MENU/IMAGE (IMAGE MAKEWINDOWFLG) MASTERSCOPEXEC (LINE) EDIT4E1 (PAT LST PAT1 LST1 CHANGEFLG LST2 +) PARAMETRICSPLINE (CLOSEDFLG) TWODINSPECT.DEFAULT.VALUECOMMANDFN (VALUE) XCL::%%DEFINE-TYPE-GETDEF ( +CL:HASH-TABLE) SEDIT::SUBSTITUTE-OBJ (SEDIT::REMOVE?) AWAIT.EVENT (TIMEOUT TIMERP) \DRAWPOLYGON.IP ( +DASHING CLOSED VISIBLEP) FETCHFIELD (TN) CL::%%COMPLEX-NSUBST (CL::KEY CL::TEST-NOT-P CL::TEST-RESULT) + CL::%%SIN-FLOAT (CL::COS-FLG) CHAT.FLUSH&WAIT (FN) MONITOR.AWAIT.EVENT (TIMEOUT TIMERP) +PRINT-BITMAPS-NICELY (STREAM) \TEDIT.SUBST.FN2 (TARGETLIST) MSJOINDETS (X Y) BRKDWNRESULTS2 (TERP) +\PRINT-USING-ADDRESS (TYPE) RIGHTW.ADJUSTSELECTION (SELECTION) OPT.FRAMEDEL (VARS TRYXVAR DOXVAR FLV) +\PROCESS.GO.TO.SLEEP (EVLOCK TIMEOUT TIMERP OLDPROC DELETEFLG) HEIGHTIFWINDOW (TITLEFLG) ADDMENU (W) +BCOMPL2 (BLKNAME FILEMAPLST COREOK LST) TEDIT.RESET.EXTEND.PENDING.DELETE (SEL) \MAIKO.10MBTURNONETHER + (NSHOSTNUMBER OUTINTERRUPT ININTERRUPT) \LEAF.REOPENFILE (OLDDATES) PRIN3 (OBEY-PRINT-LEVEL) +XCL::%%DEFINE-TYPE-DELDEF (XCL::HT) COMPILE-IN-CORE (PRINTLAP NOREDEFINE NOSAVE) COMPILER::ALPHA-IL-FUNCTION + (COMPILER::CLOSE-P-FORM) PUTDEF (PUTDEF.METHOD) \PARAS.IN.SEL (PARAENDED) MSPATHS4 (TOP) +RESET.INTERRUPTS (PermittedInterrupts SaveCurrent?) DINFO.SELECT.GRAPH (GRAPH) RIGHTW.BUTTONEVENTFN ( +ROWPROPCOMMANDFN SELECTION) XCL::%%DEFINE-TYPE-FILE-DEFINITIONS (XCL::DEF) CL::%%NSUBST-IF-NOT (CL::KEY +) CL::%%COMPLEX-SUBLIS (CL::KEY CL::PAIR) \GCRECLAIMCELL (INDEX PTRFIELDS VAL DONEXT) +CL::%%SIMPLE-SUBLIS (CL::PAIR) \CONTROL-T.PRINTRATIO (NEWLINE) SPLIT89 (POS Y) FB.MAKE.BROWSER.BUSY ( +ITEM) COMPILE.FILE.RESET (COMPILED.FILE SOURCEFILE) CL::STRUCTURE-SLOT-NAMES (CL::DONT-COPY) +CL::%%COMPLEX-ASSOC (CL::TEST-NOT-P CL::KEY) PROCESS.NAME (P NAME) CL::%%COMPLEX-NSUBLIS (CL::KEY) +FB.GREATEST.PREFIX (DIR FILENAME LASTDIR) CL::%%NSUBST-IF (CL::KEY) CHANGE-TTY-PROCESS-INTERACTIVELY ( +NEW-PROC) XCL::%%DEFINE-TYPE-PUTDEF (XCL::DEFINITION) SEDIT::COPY-SELECTION-COMMENT (SEDIT::START +SEDIT::DESTINATION SEDIT::INSERT) MSONPATH (FROM) \FTP.RENAMEFILE (NEWFILE) CL::%%COMPLEX-MEMBER ( +CL::TEST-NOT-P CL::KEY) \NSFILING.GENERATEFILES (PARSE SESSION FILING5 PATHREQUIRED NAME DIRPATH +FILTERLIST VERSIONFILTER VERSION FILTERNEEDED RESULT) \VFMGet1 (interval) CNDIR (HOST/DIR) EDITFINDP ( +FLG) HEADINGOP.IP (HEADING) UNMARKASCHANGED (ANYFLG) \MAKEPCTB (PC1) CLISPCAR/CDR2 (NODE) +OPENRTPSOCKET (FRNPORT PUPSOC MODE FAILURESTRING) \HANDLE.RAW.3TO10 (NDB) \CLEAR.ROUTING.TABLE ( +OLDTABLE) PRINTROUTINGTABLE (SORTFLG DECP) FB.FINISH.COMMAND (ITEM) ATAN (Y.NEGP X.NEGP RADIANSFLG) +COMPILE.FILE.APPLY (FORCE-OUTPUT-P DEFER) DIRECTORYNAME (STRPTR) ADDSPELL1 (SPLST L2 L3 N M) +\BITBLT.IP (CLIPPINGREGION DESTINATIONREGION) ADDTOVAR (OLDENTRY ADDED-NONLIST? VAL) +\TEDIT.FOREIGN.COPY? (DEST.TEDIT? PROCW DEST.TEXTOBJ) MAKE-SEQUENCE-OF-TYPE (ELEMENT-TYPE EXPANDER) +TTYIN.PRINTARGS (ARGS ACTUALS ALLOW-OTHER-KEYS DOSPACE) HASHFILESPLST1 (XWORD) UNTRACE (CL::FNS) +XIPAPPEND.STRING (IFSP OFFST) PROCESS.BACKTRACE (STKP) CL:UNION (CL::LIST1-EXTRAS) +\TEDIT.COPY.PIECEMAPFN (NEWOBJ OBJ) TTYINFOSTREAM (STREAM) SAVESET (NAME VALUE TOPFLG PTR) +FB.MERGE.DIRECTORIES (PREFIX RETAIN) MSPATHS1 (FIRST LAST XT TEM) CL:NINTERSECTION (CL::RESULT) +LEAF.ASSURE.FINISHED (PUP) TRACE (CL::FNS) FB.EXPUNGECOMMAND (FAILED CMD) CL::%%PRINT-TIMING-INFO ( +CL::DATA-TYPE-INFO) BAKTRACE (SKIPFNS) CL:NSET-DIFFERENCE (CL::RESULT) \UNQUEUE (NEXT PREV NOERRORFLG) + MODIFY.KEYACTIONS (SaveCurrent?) UNION (TAIL) SEDIT::REUSE-LINEAR-FORM (SEDIT::BELOW?) SEDIT::UNDO ( +SEDIT::UNDO-LIST) MOUSECONFIRM (HELPSTRING PROMPTSTRING HELPSTR PWINDOW DON'TCLEAR/MAINW) DIRECTORY ( +PRINTFLG OUTFILE PROMPTFLG PFLG SEENP HEADINGS VALUES-WANTED) CL:NSET-EXCLUSIVE-OR (CL::RESULT) +FB.REMOVE.FILE (NEXTITEM) CLISPATOMIS1 (NEGATE) DSPSCROLL (SWITCHSETTING) RESHAPEALLWINDOWS (ATWINS +MAINONLYFLG) \TEDIT.FIND.WC1 (TARGETLIST RESULT1) DINFO.HISTORIC.UPDATE (NODE) GETPROMPTWINDOW ( +DONTCREATE FONT %#LINES PWINDOWPROP PAGEFULLFN) EDITF (EDITFX) \SLOWIDIFFERENCE (SIGNX) CLISPIFY2A ( +SEG FLG) ATTACHEDWINDOWS (COM) MB.NB.SIZEFN (MAXITEMS/LINE OLDBOX) \SLOWITIMES2 (SIGN) OLD.FIND.SYMBOL + (FATP NONNUMERICP FATCHARSEENP) GETDEF.I.S.OPR (EVALFLG) CL:NUNION (CL::LIST1-EXTRAS) \SLOWIQUOTIENT +(SIGNQUOTIENT SIGNREMAINDER) MSSIMPLESET (X) DIRECTORYNAMEP (HOSTNAME) DOWINDOWCOM (WINDOW) +PUTHASHFILE (KEY2 VALUE) EDITDEF (SOURCE) IREMAINDER (SIGNQUOTIENT SIGNREMAINDER) OPT.FRAMEMERGE (V) +\TEDIT.MARK.LINES.DIRTY (LL) GETHASHKEY (DELOK? DELETED? PROBE) \MAIKO.10MBWATCHER (PACKET) +XIPAPPEND.WORD (OFFSET) APPENDTOVAR (OLDENTRY ADDED-NONLIST? VAL) MSPATHS2 (FLG) GETHASHFILE (KEY2) +EDITF2 (CHANGES TYPE IFCHANGEDFN) SUBATOM (M1) UNSAVEBLOCK? (ENTRIES) RECORDACCESS (DEC DEF) ADDTOCOMS + (COMS) \SPP.HANDLE.INPUT (XIP ACKRECEIVED ALLOCINCREASED ATTN) CL:SUBSEQ (END) COMPILER::COPY-NODE-RETURN + (CL:BLOCK) WRITE-UNICODE-INCLUDED (CTAIL) UNPACKFILENAME.STRING (FILE ONEFIELDFLG PACKFLG CLFLG HOSTP + OLDDIR FATP NEWDIR TEM BEYONDNAME FIRSTDOT SECONDDOT OSTYPE BEYONDEXT CODE) MENUWINDOW (VERTFLG) +MSNEEDUNSAVE (MARKCHANGEFLG) EDITDEFAULT1 (Y) CLISPATOM2D (X) ATTACH (L) \BLTSHADE.PRESS ( +CLIPPINGREGION) \RTP.HANDLE.INPUT (TIMER) EDITH (X) PUPNET.DISTANCE (ROUTE) WINDOWADDFNPROP (CURRENT) +\NSFILING.PARSE.FILENAME (CH SEMI PATTERNP NAME) RETDWIM3 ($TAIL) \BSP.PREPARE.INPUT (TIMEOUT) +EDITDEFAULT (EDITY) UnixPrint (NAME) DEFINE (TYPE-IN) CL:ADJUST-ARRAY (FILL-POINTER EXTENDABLE-P) +EDLOC (FLG) FB.MAYBE.INSERT.FILE (OLDITEM FILE-UNCERTAIN) \SPP.INFO.HOOK (WINDOW) CL::TYPE-EXPAND ( +CL::EXPANDER) \CURVESLOPE (ENDFLG) EDOR (COMS) MB.NB.WHENOPERATEDFN (SIDEFN) DSUBST (OLD) OPT.FRAMEOPT + (TRYLOCAL TRYMERGE) SEDIT::COMPUTE-POINT-POSITION-COMMENT (SEDIT::SUBNODE) MSJOIN (Y X) +CL::TYPE-EXPANDER (CL::EXPANDER) EDITRAN (DEF TEM) MSPATHS (INVERTED NOTRACE NAMED UNDONE) BCOMPL1A ( +FIRSTFLG COMPEVALFLG) EDITTO (LC1) ONEDINSPECT.REPAINTFN (WINDOWREGION STARTPROP) REMWINDOWPROP (PREV) + FB.PRINTFN (FATP INFO OLDFONT) \ONQUEUE (X) ARCTAN2 (RADIANSFLG) \COURIER.PUTDEF (OLDINFO) COPYBYTES +(END NBYTES) POP-IP-STACK (STACK) CL::%%LIST-MAP-OPTIMIZER (CL::INC-FN CL::CONSTANT-FN +CL::CONSTANT-INC-FN CL::RESULT-P CL::NIL-RESULT-P) EDITCOM (TYPEIN) EVERY (EVERYFN2) DEFAULT.EDITDEF ( +SOURCE FILES) TTY/EDITE (ATM TEM TYPE) CREATEMENUEDWINDOW (LOCATION WINDOWTITLE VERTFLG WINDOWSPEC) +MBUTTON.FIND.NEXT.FIELD (PC DON'TFIX) UNSAVEFNS (FN FNS) EDRPT (QUIET) CLISPCAR/CDR1 (SETQFLG TAILFLG) + \SCALEDBITBLT.PRESS (CLIPPINGREGION) \BUFFERED.COPYBYTES (NBYTES) \NSFILING.COMPOSE.PATHNAME (NAME +VERSION) EDITMAC (LST FLG) ARCTAN (FLIPPED RADIANSFLG) CLISPLOOKUP (CLASSDEF) +%%ALTER-AS-DISPLACED-ARRAY (DISPLACED-INDEX-OFFSET DISPLACED-TO-READ-ONLY-P) \LEAF.FLUSH.CACHE (CACHE) + EDIT!UNDO (LST !UNDOFLG FLG) TCONC (PTR) \GETSTREAM (X NOERROR ACCESS) CHANGERECORD (OLDFLG) EDITCOMA + (LST TEM) \CURVEEND (SOFTCURSORUP SI::*OR-GENTEMP*) \DSPXPOSITION.PRESS (XPOSITION) COPYCHARS (END +START RAP SAMEEXTFORM) EDITCOML (COPYFLG) KWOTE (X) EDITCOM1 (FLG) PRETTYFILEINDEX (FILECREATED +WASOPEN OUTSTREAM NOPRINT DONTINDEX *PFI-TWO-SIDED*) SI::CANONICALIZE-ADVICE-WHEN-SPEC (SI::SPEC) +FW-FORGET-CMD (W MANY? CURRENT-OFDS FORGET-OFD) PUTCURSORPROP (OLDDATA VALUE OLDVALUE) LDIFF (Y Z X) +UNDOEDITCOM (FLG C) LCONC (X PTR) XIPAPPEND.BYTE (OFFSET) \TEDIT.REOPEN.STREAM (PC) CLEAR.LEAF.CACHE ( +HOST DEVICE) TEDIT.PROMPTPRINT (TEXTSTREAM TEXTOBJ MAINTEXTOBJ WINDOW CLEAR?) +SI::CANONICALIZE-ADVICE-SYMBOL (SI::IN-POS) SEDIT::UNDO-LIST-REPLACE (SEDIT::OLD-SUBNODES) CL:REPLACE +(END1 END2) EDITSMASH1 (L0) OPENSTREAM (PARAMETERS FILE) VARIABLESMSGETDEF (BODY) +\LEAF.BREAKCONNECTION (FAST) EDITNCONC (X) ONEDINSPECT.BUTTONEVENTFN (SELECTION) INSURE.WINDOW ( +NOERRORFLG) CL:MAPCAR (CL::MORE-LISTS) RETDWIM2 (N M) EDITSAVE1 (REPLACEFLG) LSUBST (EXPR) +COMPILE.CHECK.ARGTYPE (VAL) SEDIT::OUTPUT-STRING (SEDIT::PRIN-2?) \CREATEPIECEORSTREAM (STRING) +FIXPRINTIN (FN FLG) EDITSMASH (L) LISTFILES (FILES FULLNAME) \PFFindPageAddr (PAGEGROUP) EDIT2F (X) +FUNCTIONSMSGETDEF (BODY) PFI.SORT.INDICES (RESULT) EDIT4F1 (TAIL X LVL XX) MAP2C (MAPFN2) +FB.COPY/RENAME.MANY (RETAIN) CL:MAPLIST (CL::MORE-LISTS) XIPAPPEND.CELL (OFFSET) FB.COMPILECOMMAND ( +FILES) SEDIT::VERIFY-STRUCTURE (SEDIT::CLEAR-LINEAR-FORMS? SEDIT::REDISPLAY-ALWAYS?) COMP.BOOL (A FLAG +) MAPC (MAPFN2) \TEDIT.BOLD.CARET.ON (LOOKS) \PUPNET.CLOSERP (ROUTEX) MAP2CAR (CL:MAPL MAPFN2) +EDITBELOW (DEPTH L0) DEBUGGER (BRKPOS XCL::DEBUGGER-WINDOW) MAPCON (MAPE MAPFN2) \TEDIT.CLOSEUPLINES ( +PREVLINE NEXTLINE LINE DONTFILLFLG) CL:MAPC (CL::MORE-LISTS) EDIT4F2 (CDRFLG FLG) MAPCAR (CL:MAPL +MAPFN2) HISTORYFIND1 (PAT2 PAT1) TEDIT.PUT.PCTB (PARALOOKSSEEN FORMATTINGLEVEL PC FONTFILE PREVPC +UNFORMATTED? FN EDITSTENTATIVE PREVFATP CACHE TRUEFILE SEPARATEFORMAT) MAPLIST (CL:MAPL MAPFN2) +\NSFILING.CONFLICTP (OPENFILES) MAPCONC (MAPE MAPFN2) SEDIT::UPDATE (SEDIT::RELINEARIZE) MSRESPELL ( +WORD) CURSORCREATE (MASK) EDIT.RI (A B) CL:MAPL (CL::MORE-LISTS) EDITBF1 (LVL ...PAT PAT XX TAIL) +CLISPBROADSCOPE (L) \BITBLT.PRESS (CLIPPINGREGION) STKPOS (IPOS FLAG) MAKEFILE1 (REDEFINE? +FORGET-EXPRS? GROUP RECOMPFLG) GTHASHFILE (HASHFILE) \LOCATE.PUPNET (DONTPROBE) EDIT.LO (X) +CLISPBROADSCOPE1 (FLG) PRINTCONSTANT (PREFIX) \VFMGetBufferFor (BUFFER) \CURSOR-VALID-P (SOFT?) +SEDIT::FIND-SELECTION-BACKWARDS (SEDIT::END SEDIT::WRAP?) \TEDIT.FLUSH.UNUSED.LOOKS (FIRSTPC) CL:MAPCAN + (CL::MORE-LISTS) EDIT.RO (X) TEDIT.SUBLOOKS (PC CHANGEMADE) \TAN-FLOAT (RECIPFLG) TEDIT.LOOKS ( +SELORCH#) DELFILE (FILE) ADD-EXEC (XCL::TTY) EDIT.LI (X) COMP.PICOUNT (VARS) WRITE-UNICODE-MAPPING ( +FILE MAPPING IMAPPING EMPTYOK) READVISE1 (OLD-ADVICE) SEDIT::BACKSPACE-COMMENT (SEDIT::INDEX) +CL::PS-NAME-SLOT-POSITION (CL::INCLUDE) LISPXFIND0 (L1 THRUFLG L2 HISTORYFLG) \RTP.ACTION (NEWSTATE) +EXEC-EVAL (*CURRENT-EVENT*) EDIT.BI (A) TEDIT.SELECTED.PIECES (PC PIECEMAPFN) \TELERAIDBREAK ( +USERFRAME) CL:MAPCON (CL::MORE-LISTS) TAN (RADIANSFLG) HRULE.DISPLAYFN (RULING) +CL::%%EVERY-MAP-OPTIMIZER (CL::INC-FN CL::CONSTANT-FN CL::CONSTANT-INC-FN) \FM.EDIT-GETPOINTERINFO ( +PTR) CHAT.BIN (FIRSTTIME) FB.GET.NEW.FILE.SPEC (FIELDS) CL:BIT-NOT (RESULT-BIT-ARRAY) SEDIT::UNDO-EVENT + (SEDIT::EVENT) ONEDINSPECT.COPYBUTTONFN (SI::*OR-GENTEMP* SELECTION) COMP.CPI1 (VARS) COPYATOM (PKG) +\DSPYPOSITION.PRESS (YPOSITION) BREAK-FUNCTION (XCL::TRACE? XCL::IN-FN) CURSORPOSITION (NEWPOSITION) +ONEDINSPECT.DEFAULT.VALUECOMMANDFN (VALUE) \TEDIT.CHANGE.LOOKS (FAMILY FONT WEIGHT SLOPE EXPANSION +FACE SIZE SIZEINC NEWLOOKS PC PROT SELHERE ULINE OLINE STRIKE INVISIBLE SUPER SUB STYLESET UISET +OFFSETINC INVERSEVIDEO) GETLOCALDEC (TL) CURSORSCREEN (XCOORD YCOORD) SAVEDEF1 (DF) UNBREAK (XCL::FNS) + SEDIT::FIND-SELECTION (SEDIT::START SEDIT::WRAP?) SI::ADVICE-ADDTOCOM (SI::NEAR) \CHTOPCNO (TREE) +EDIT.BITMAP.REAL (DONE PREVIOUS.BITMAP) DEFAULTMAKENEWCOM (LISTNAME FILE) \FILLINXIP (EPKT +SOURCENSOCKET DESTNET DESTSOCKET#) COPY-ARRAY (TO-ARRAY) \TEDIT.INSERT.PIECES (DONTDIRTY PC %#CHARS +CROSSCOPY FIRSTPIECE COPYING) IP-TOS (STACK) \TEDIT.PARSE.SEARCHSTRING (LST RESULT) +\TYPE.FROM.FILETYPE (FILETYPE) FB.LOADCOMMAND (FILES) \LEAF.LOOKUPCACHE (CACHE DELETE PREV) +COPY-VECTOR (END1 END2) CLISPATOM2A (TAIL DWIMIFYING) PFI.COMPUTE.INDEX.SHAPE (MAXINDEXNO) \ROUTE.PUP +(ROUTE READONLY) SOME (SOMEFN2) MAKEHARDCOPYMODESTREAM (DISPLAYSTREAM) \NSRANDOM.CREATE.STREAM ( +GOTCONTROLS CHECKACCESS ERROR OLDSTREAM) ARCCOS (RADIANSFLG) SI::ADVISE-CONTENTS (SI::NAME) +SEDIT::STRINGIFY-LIST (SEDIT::DOT) \NSFILING.OPEN.HANDLE (PARENT CONTROLS) /ECHOCONTROL (MODE) +COMPILEMODE (MODE) SET-PACKAGE-INTERACTIVELY (PACKAGE) /SETSYNTAX (TABLE) \RTP.SHOW.FAILURE (PUP +FAILURESTRING) SUBSET (RESULT MAPFN2) \NSFILING.FULLNAME (VERS DIRECTORYFLG DOTSEEN FUNNYCHAR HANDLE +ATOMFLG) \TFBRAVO.PARSE.PROFILE.PARA (TOKENS) \SIN-FLOAT (COS-FLAG) OPT.RETMERGE (FEQ VEQ) HASHFILEP ( +HASHFILE WRITE) TAILP (X) \ROUTE.XIP (ROUTE READONLY) %%MAKE-DISPLACED-ARRAY (DISPLACE-TO-READ-ONLY-P +NEED-INDIRECTION-P ADJUSTABLE) COURIERTRACE (FLG) SEDIT::FIND-OBJ (SEDIT::FIND-STRING SEDIT::BACKWARDS? +) \HDCPYBLTCHAR (SOFTCURSORUP SI::*OR-GENTEMP*) \TEDIT.ORIGINAL.WINDOW.TITLE (FILE DIRTY?) +TB.MAP.DELETED.ITEMS (NULLFN) \FM.EDIT-DELETE (INFINITEWIDTH MOVEDOFF) MSVERB (ROOT) MERGEINSERT ( +ONEFLG LST1 PLACE) \TTW1 (SOFTCURSORUP SI::*OR-GENTEMP* ISECT) ARCSIN (REDUCED NEGP RADIANSFLG) +SEDIT::LINE-FINISHED (SEDIT::LINEAR) \NSPRINT.ENQUIRE (STREAM) \TEDIT.SUBST.FN1 (RESULT) MSMARKCHANGED + (TYPE) CLISPATOM2 (UNARYFLG TEM PARENT NEGFLG LISPFN Z VAR2) CHANGESLICE (HISTORY L) +SELECT.LIST.INSPECTOR (RECDEC) \VFMMerge (mergeFlag) \HANDLE.PUP.ROUTING.INFO (NEWTIMER) EDIT.BITMAP ( +OBJECT) \TEDIT.BOLD.CARET.OFF (LOOKS) \LEAF.REQUESTPAGE (IMMEDIATE CACHE) CHAT.LOGIN (NAME/PASS) +CONVEXP (PATH) CL:ERROR (PRINTMSG) ETHERHOSTNAME (PORT IPUP USE.OCTAL.DEFAULT) CHAT.SCREENPARAMS ( +INSTREAM TITLEMIDDLE EMACSMODE) OPT.RETTEST (ONLYIFSAMEFRAME) RANDSET (X) WALK-FORM-INTERNAL ( +XCL::WALK-NO-MORE-P XCL::MACROP) SCAVENGEDSKDIRECTORY (LISPDIRECTORY LISPFILES SILENT) FNTH (X) +\TEDIT.HISTORYADD (OLDEVENT) \SLOWHDCPYBLTCHAR (SOFTCURSORUP SI::*OR-GENTEMP*) IDATE (STR DEFAULTTIME +CH SECONDS) MAKEFN (ARGLIST) CLEARHASHFILES (CLOSE) \TEDIT.FONTCOPY (NEWSPECS) CL::PROCESS-TYPE ( +CL::PREDICATE) WINDOWADDPROP (CURRENT FIRSTFLG) BSPFRNADDRESS (SOC) \FTP.RECOGNIZEFILE (BESTVERSION) +IMAGEFNSCREATE (GETFN) RAND (UPPER LOWER) MAKECOM (VALS) \BSP.HANDLE.INPUT (TIMER) SMARTARGLIST ( +EXPLAINFLG DEF) \INTERNALTOTOPW (SCREENTOPW RPT) CHECK-PARAMETER-NAME (NAME) HRULE.CREATE (WIDTH) +\FTP.OPEN.CONNECTION (PORT) CLOSEF? (FL) \LEAF.ADD.QUOTES (PIECES) \HCPYMODEDISPLAYINIT (WINDOW) +EDITGETD-LAMBDA (ARGS DONE VALS) SWAPPEDCOND (CTAIL) PRINTXIPROUTE (CALLER) \TEDIT.WINDOW.TITLE ( +NEW.TITLE) SEDIT:SEDIT (SEDIT::WINDOW) \STRINGWIDTH.HCPYDISPLAYAUX (RDTBL) PRINTPUPROUTE (CALLER) ODDP + (CL::MODULUS) \GENERIC.OPENP (FILENAME OPENFILES ACCESS) CHARACTER.PRINT (PNAME) CL:NAME-CHAR (CODE) +CLISPATOM1A (ENDTAIL BRACKET OPRFLAG BROADSCOPE) \NSFILING.FILLIN.ATTRIBUTES (NOERRORFLG) +GETSCREENPOSITION (WINDOW) CLUNARYMINUS? (OPRFLAG) ERRORX (ERXM) \INSERT.FIRST.PIECE (TEXTOBJ) +WORD.MATCHES.BUFFER (CHAR) COPY-CIRCLE (BODY) \BACKCCODE (BYTECOUNTVAR) TB.MAP.ITEMS (ITEMS NULLFN) +SEDIT::COPY-SELECTION (SEDIT::DESTINATION-CONTEXT SEDIT::DELETE?) \INCCODE (BYTECOUNTVAR) +PASTEFROMCLIPBOARD (WINDOW) DUMPDATABASE1 (FN) LOAD? (DATES FILEPROP) \COURIER.ATTENTIONFN ( +SI::*OR-GENTEMP*) GETHASH (RETURNMVS EQFN) PFI.CENTER.PRINT (BOLDFLG) RECLISPLOOKUP (DECS) LOADCOMP? ( +LOADED FOUND) HARDCOPY.SOMEHOW (HARDCOPYFN) SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE-BACKWARDS (SEDIT::TARGET + SEDIT::WRAP? SEDIT::END) TEDIT.SUBPARALOOKS (PC CHANGEMADE) CLISPRECORD (SETQFLG FIELD DECLST) +\INSPECTW.REDISPLAYPROP (ITEMSELECTED?) NLAMBDA.ARGS (X) PREVWORD (NEW N) \GENERIC.CHARSET (NEWVALUE) +CHAT.CLOSE (CHATSTATE ACTIVE? CLOSING PROC) \FM.MENUHANDLER (ITEM LASTITEM PROMPTFLG SAMEPROCESS) +CHECKIMPORTS (NOASKFLG) DIRECTORY.MATCH1 (PATTERN) \LFEntryPoint (noVolName volName dontDefault vol) +FILL/GRAPHNODE/LABEL (SHADE) INSPECT/PROPLIST (ALLPROPSFLG PROPS) LOADFROM (FNS) CLBINARYMINUS? ( +MINUSTAIL) OPT.RETPOP (VAL) MSCOMMAND (TEM KNOWN TYPE) FILEGETDEF.FNS (MAP) \NSFILING.HANDLE.ERROR ( +ERROR) BRKDWNRESULTS (RETURNVALUESFLG) CL:DIGIT-CHAR-P (VAL) \SETUPTIMERmacrofn (TimerUnits +IntervalUnits NOERRORCHKS) DINFO.SPECIAL.UPDATE (NEW.NODE) \ITEMW.CLEARSELECTION (CURRENTITEM) +\3MBRAWRECEIVE (PBI) SUBST (EXPR) COMPILER::COPY-NODE-GO (CL:TAGBODY) \CanonicalizeTimerUnits ( +CONVERTEDP) SEDIT::GENERATE-LINEAR-FORM (SEDIT::LINEARIZE) \COURIER.UNKNOWN.TYPE (PROGRAM) +SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE (SEDIT::TARGET SEDIT::WRAP? SEDIT::START) +GRAPHOBJ.COPYBUTTONEVENTFN (CBEFN) \TEDIT.FIND (TARGET CH) FIND.NEXT.WORD (BACKUPFLG N) +SCALE/GRAPHNODE/BORDER (BORDER) FORMAT-EXP-AUX (W D) \LEAF.DEVICEP (LEAFDEV) +SEDIT::FIND-AND-DISPLAY-STRUCTURE-BACKWARDS (SEDIT::TARGET SEDIT::WRAP? SEDIT::END) INTCHECK (CHR) +USERLISPXPRINT (NODOFLG) \LEAF.DELETEFILE (STREAM) MOVD (DONTCOPY COPYFLG) MSTRYSPELL (TAIL) +COMPILER::META-CALL-LABELS (COMPILER::*MADE-CHANGES*) TTYIN.BALANCE (ERRORFLG) \TELERAIDEXIT (NDB) +DMATCH (PAT) ADJUSTLINE (JUSTIFYING OVFL BREAK USECR NEXTLINE LINE) MOVD? (COPYFLG) BREAKDOWN (DEF FNS +) TEDIT.INCLUDE (NFILE SAFE) CHNGNM (FLG DEF) WRITE (*PRINT-CIRCLE* THERE-ARE-CIRCLES) +\LFPurgeDirectory (directoryID) \DelShade (LIST) TEDIT.EXTRACTTOCLIPBOARD (TEXTSTREAM) \BOXFPLUSDIF ( +SUBTRACT) \TEDIT.PUT.SINGLE.PARALOOKS2 (DEFAULTTAB TABSPECS) \GETSPP (PEEKFLG TIMEOUT) +\TEDIT.SEL.CHANGED? (NEWSEL) PFI.PRINT.INDICES (INDICES FREECHOICE) SEDIT::CLEAN-UP-AFTER-RELINEARIZATION + (SEDIT::FOLLOWING-LINE) MSTYPEMATCHRATING (X Y) %%CML-TYPE-TO-TYPENUMBER (FATP) NS.AUTHENTICATE (ADDR +) \CENTICLOCK (PACKET) RPTPUT (FLAG) ADDPROP (ATM X X0 FLG) VALUOF (LINE BACKUP) \LEAF.GETFILE ( +OLDSTREAM REALLYOPEN NOERROR) \TEDIT.FIND.PROTECTED.START (PC) RESET/NODE/LABELSHADE (STREAM) /REMPROP + (X0) TEDIT.COPYTOCLIPBOARD (TEXTSTREAM) NEGC (X) TEDIT.EXTEND.SEL (NSEL FIXUPNEEDED SETOSELFLG) +\MAKEFLOAT (NORMALIZE) SI::ADVICE-GETDEF (SI::ADVICE) TEDIT.STREAMCHANGEDP (RESET?) STOPSCAN? (CLTYP2 +CLTYP1 OPRFLAG) \NULLDEVICE (NOERRORFLG) MB.SHOWSELFN (ON) \CANONICALIZE.PUP.HOSTNAME (PORT) +CIRCLAR-COPYER (BODY) %%MAP-FOR-EFFECT (MORE-SEQUENCES) FIXSPELL (FROMDWIM REL XWORD FN X GENFN +GENERATOR L TIEFLG TAIL DONTMOVETOPFLG) TEDIT.GET.LOOKS (CH#ORCHARLOOKS) SETUPTIMER (intervalUnits) +\LOAD-STREAM (LOAD-VERBOSE-STREAM FILE LISPXHIST MANAGED-FILE-P FILEPKGFLG BUILDMAPFLG) +\TEDIT.REFRESH.SHOWSEL (EXTENDING) \TOTALPROPOSEDSIZE (ATWSINFO) CLISPATOM0 (LISPXHIST 89FLG TEM) +DWIMDEF (FN) COMPILER::FRAME-ANNOTATE-TAGBODY (COMPILER::REQUESTS) \CIRCSHADE.BLT (OPERATION) +%%MAP-TO-LIST (MORE-SEQUENCES) \TELERAIDENTRY (NDB) TTNLEFT (X) %%MAP-TO-SIMPLE (MORE-SEQUENCES) +FIXFIELDORDER (FIELD.USAGE REVFIELDS) DUMPDATABASE (FILE FNLST DUMPEDFLG) LOAD (PACKAGE) +\DSPYPOSITION.HDCPYDISPLAY (YPOSITION) INSPECTW.PROPERTIES (PROPERTIES) \TEDIT.FORMAT.FOOTNOTE ( +PREVLINE) HASDEF (SOURCE TM SYMBOL TEM SPELLFLG) SEDIT::FIND-AND-DISPLAY-STRUCTURE (SEDIT::TARGET +SEDIT::WRAP? SEDIT::START) PRINT-ARGLIST (ARGS ACTUALS) \TFBRAVO.GETPARAMS (L) BLTMENUIMAGE (DONTOPEN) + SCALEPAGEUNITS (VALUE) XCL::UNDOABLY-SETF-SYMBOL-FUNCTION (XCL::DEFINITION) IMAGESTREAMP (STYPE) +CCCSUBFN? (BASE) EQUALN (DEPTH) FNS.PUTDEF (DEFINITION) FORMAT-FIXED-AUX (W D K) STKNTH (IPOS CFLAG) +MSSEEKPHRASE (FORCONJUNCTION) TEDITCHAT.MENUFN (STATE) EDITV (VAR FRAME) U/L-CASE (CAPFLG NEEDADJUST) +CL::INSERT-INCLUDED-SLOT (CL::TAIL) SETTAIL? (EVEN.IF.NOT.THERE) PFI.PREVIEW.DECLARE (STARTOFLINE) +JOINDEF (DEF DEFLST) PRINTPACKETDATA (MACRO SEPR FINALPRINT) TEDIT.HARDCOPY-COLUMN-END (LINES +FINAL-CHNO ORPHAN LASTLINE FOOTNOTELINES ORIGINAL-LINES DONT-KEEP-SINGLE-LINE REMOVED-LINES) NOTE ( +LSTFLG) IMAGEOBJPROP (SET?) STKSCAN (IPOS) OPENIMAGESTREAM (FILE IMAGETYPE LPTNAME LPTP) /TCONC (PTR) +\AddShade (INDEX) \FRAMESCAN (INTERPNT) MSSETREP (LISTOKFLG NEG) +COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS (COMPILER::ARGS) CHAT.RESHAPEWINDOW (CHAT.STATE) +SEDIT::COMPLETE (SEDIT::COMPILE-SUCCEEDED?) RETTO (FLG) \LFGetStreamForFile (FILESPEC OLDSTREAM +CREATEFLG) FB.HARDCOPY.MAXWIDTH (DATEP) COMP.STUNBIND (D) OPT.COMMONBACK (FLG) PUTFILEMAP (FILEMAP +OLDENTRY ENV FCLOCATION FILCREATEDLST) SHRIEKER (LOOKAT RESULTP) PRINTERTYPE (HOST) DO-DISPATCH-MACRO +(DISP-TABLE DISP-FUNCTION) PRINTERNAME (PRINTER-SPEC) ADDSPELL (SPLST) OPT.JUMPREV (FLG) /SETTOPVAL ( +ATM VAL) \TEDIT.TRY.ABBREV (EXPANSION) EXEC-READ-LINE (SPACEFLG) FORMAT-PRINT-RADIX-AUX (ATSIGN COLON) + ADDFILE (FCLST LOADTYPE) DRAWGRAYBOX (SOFTCURSORUP) COMPILER::META-CALL-LAMBDA (COMPILER::NEW-ARGS +COMPILER::CURRENT-PROG1-TAIL) RESET/NODE/BORDER (STREAM) \TEDIT.LOOKS.UPDATE (PC ORIGPC) +\LFUpdateLeaderPage (access) DINFO.UPDATE.MENU.DISPLAY (WINDOW CHILDREN SCROLLABLE) RPTPRINT (FLAG) +\TEDIT.FIND.LAST.LINE (LINE) COMPILER::COPY-NODES (COMPILER::TREE) ALLATTACHEDWINDOWS (ATWS) +ROOTFILENAME (COMPFLG) TRYNEXT1 (PLST##) COPIEDFROMSPEC (DIREND) CENTERPRINTINAREA (PRIN2FLG) +SHOWSHADEDITEMS (ANYSUBITEMS) \SENDLEAF (NOERROR NOREPLY) \ITEMW.DESELECTITEM (ITEM) SETSTKARG (NT) +SKIP/ZAP (MINUS) MOVEBOX (SOFTCURSORUP) \TEXTBOUT (WINDOW) STKARGNAME (NT) MAPRINT (PFN SEP LEFT RIGHT +) ENUM-STRING (DECPLACES EXPWIDTH) SI::INSERT-ADVICE-FORM (SI::ENTRY-LIST) SETSTKARGNAME (NT) +MB.DEFAULTBUTTON.ACTIONFN (OFILE CH PRINTHOST %#COPIES %#SIDES MSG) PROMPTCHAR (FLG HISTORY PROMPTSTR +ID) %%PRINT-ARRAY-CONTENTS (ELIDED) DINFO.UPDATE.TEXT.DISPLAY (OFF? FILENAME) CL:VECTOR-PUSH-EXTEND ( +NEW-INDEX) LISPXPUT (LST ADDFLG) \CONVERTNUMBER (RDTBL SIGN DIDQ COMMONLISPY) PRETTYDEF (REPRINTFNS +SOURCEFILE SOURCEFILENV OLDFILEMAP DESTINATIONENV FORMAT) STKNARGS (INCLUDEPVARS) NLIST (V) MKLIST (X) + LISPXTERPRI (X NODOFLG) PRINTCOPYRIGHT1 (SEMICOLON PRIVATE) LISPXPRIN1 (Z Y X NODOFLG) HPRINT1 ( +CDRFLG X NOSPFLG NOMACROSFLG VALS) TTECHO.TO.FILE (DRIBBLING FIRSTIME LINE) \CML-LOAD (PRINTFLG +LOAD-VERBOSE-STREAM) UNIX-STREAM-EOFP (CONN) FILECREATED (FILE) GREET (NAME) FORMAT-PRINT-RADIX (PARMS +) \LFMakeVolumeDirectory (DONTOPEN) FNUM-STRING (DECPLACES) \TEDIT.FIND.PROTECTED.END (PC) +\GOOD.DASHLST (DASHLST NOWOFF) \TEXTBIN (OPC PC NPC SUBSTREAM) COMPERROR (X) /DECLAREDATATYPE ( +TYPENAME) CHECKDEFS (RECS FOUND MUST DEFS) DINFO.UPDATE.GRAPH.DISPLAY (FORCE?) COURIER.BROADCAST.CALL +(MESSAGE NETHINT RESULT) LISPXPRINT (Z Y X NODOFLG) HASH-LEFTPAREN (INDEX) PRINTCOPYRIGHT (OWNER) +HASH-BACKSLASH (PARAM) DECLAREDATATYPE (SUPERTYPE FIELDSPECS DLIST LENGTH TYPENAME) READFROMBUF (FIXUP +) CL::RESOLVE-SLOTS (CL::INCLUDES CL::INCLUDED-SLOTS) FLTSTR (K) INSURE.DASHING (DASHING NOERRORFLG) +GLC (CODE) \TRACKWITHBOX (NOERROR) DWMFY2 (NOTOKFLG FNFLG 89CHANGE ATTEMPTFLG NEXTAIL) +TRANSLATE.DATATYPE (TYPENAME) PRINT-DOCUMENTATION (DOC) GETDEFERR (MSG) \LEAF.CLOSEFILE (STREAM FORCE +CACHE) FILEDATE (FILE OLDPTR) LINELENGTH (N) EXTTOINT (ROUNDFLAG) /PUT (ATM X X0) \LIMITBYMAX (MAX) +\NSRANDOM.UPDATE.VALIDATION (ERROR) RPLCHARCODE (FATPA0357) MB.SELFN (BUTTONFN) \REUSETO (FLG) +DO-EVENT (ADD-TO-SPELLING-LIST) \DSPXPOSITION.HDCPYDISPLAY (XPOSITION) EXTENDEXTENT (EXTENT) +\TEDIT.PUT.SINGLE.PARALOOKS (DEFAULTTAB TABSPECS) EDITE (EXPR) BUILDGETRELQ (FORM) \UPDATEXYANDBOX ( +BASEPTCHANGE?) READLINE (LINE SPACEFLG LISPXFLG START) FLONUM-TO-STRING (DECPLACES FMIN REALDP WIDTH +SCALE) PFI.HANDLE.* (NSEMIS) \LISP.TO.NSFILING.ATTRIBUTE (VALUE TL) BOOTSTRAP-NAMEFIELD (SUFFIXFLG) +SET/LABEL/SIZE (RESET/FLG FONT) EDITLOADFNS? (FN DATES ASKFLG STR) DECLARE%:1 (EVALFLG) MSPATHOPTIONS +(FLG) SEDIT::INSERT-LITATOM (CL:CHAR) DO.EDIT.PP (EXPRS LEFTOVER) HASH-R (PARAM) +\POSTSCRIPT.SPECIALOUTCHARFN (FAMILY) READHOTSPOT (DOWNYET?) MSMSGPRINT (MSG) TTDELETECHAR (DODELETE) +TYPE-VARIABLE-FROM-TYPE-NAME (CLAUSE) RESETBUFS ($$BUFS) \NSRANDOM.WROTE.HANDLE (NEWINFO ATTR) +HASH-STAR (PARAM) DISPLAYP (STRM) XCL::WALK-TAGBODY-1 (XCL::FORM) DWMFY1 (CLISPCHANGE 89CHANGE +ATTEMPTFLG CARISOKFLG) \LIMITBYMIN (MIN) EDITMOVENODE (GRAPH NOW NEAR) PRETTYPRINT3 (PRETTYDEFLG) +GETDEFCURRENT (COM TYP) FB.SORT.VERSIONS (NEXTTAIL PREVTAIL) \TEDIT.HCPYLOOKS.UPDATE (PC NLOOKS +NEWKERN) COMPILEDFETCHFIELD (FASTFLG) COPY.TEXT.TO.IMAGE (RIGHTMAR TABS) PARSE-NAMESTRING1 (FILE HOSTP + BEYONDNAME SUBDIREND CODE DIRFLG) HASH-EQUAL (PARAM) ALLPATHS (DECLS ANY TL) UNSAVED1 (TYP) +DRAWDASHEDLINE (DASHON DASHTAIL) PRETTYPRINT (FILEFLG NEWADRLST PRETTYDEFLG DEF FN) TERM.PRINTCHAR ( +WRAPFN) \DSPRIGHTMARGIN.HDCPYDISPLAY (XPOSITION) COMPILEDREPLACEFIELD (FASTFLG TYPENAME) OPT.PRDEL (B +P) DINFO.UPDATE.HISTORY (SEL NODE NEWITEM OLDWINDOW DISPLAY? ITEMS) SEND.FILE.TO.PRINTER (HOST +FILETYPE) \10MB.TURNONETHER (NSHOSTNUMBER OUTINTERRUPT ININTERRUPT) COPYALLBYTES (FROMFILE TOFILE +BYTESIZE) CL::ENSURE-CONSISTENT-PS (CL::INCLUDED-PSTRUCTURE CL::INCLUDE CL::EXPORTNAMES) GRAYBOXAREA ( +OUTLINESIZE) COMP.LOOKUPCONST (X) \TEDIT.PARSE.CHARLOOKS.LIST (FAMILY FONT WEIGHT SLOPE EXPANSION FACE + SIZE OLOOKS SIZEINC PROT SELHERE ULINE OLINE STRIKE INVISIBLE INVERSEVIDEO SUPER SUB STYLESET UISET +OFFSETINC) TEMPLATE (FLG OLD) SEDIT::SELECT-NEXT-GAP (SEDIT::NODE) CL:LOG (CL::BASE) +TEDIT.HARDCOPY.PAGEHEADING (PC NPC) COMPAREPRINTN (SPACE FLG) SHORTLST (X) CL:MAKE-ARRAY (FILL-POINTER + ADJUSTABLE EXTENDABLE READ-ONLY-P DISPLACED-TO-BASE) SKOR (XWORD TWORD SI::*OR-GENTEMP* T2 T1 X2 X1) +UNIX-READ (CONN NO-ERROR) PARSE.NSNAME (NAME DEFAULTDOMAIN THIRDPART) SI::ADD-ADVICE (SI::OLD-ADVICE) +SHEDSCAN (TAIL) READ-AFM-FILE (CCODE) \FM.MAKEBITMAP (BOX) MERGLIST (PATH1 PATH2) \FM.GETBITMAPS ( +HIGHLIGHT) \UFS.UNREGISTER.GFS (NOTICETOCP) \CHECKSUM (INITSUM) COMP.VARTYPE (VAR) PRETTYCOM (PRTTYCOM + PRTTYFLG PRETTYCOMSTAIL PRTTYSPELLFLG) \MAIKO.PUNTBLTCHAR (SOFTCURSORUP SI::*OR-GENTEMP*) +GET-ENVIRONMENT-AND-FILEMAP (MAPENTRY MAP) DSPCLIPPINGREGION (REGION STREAM) \DSPFONT.HDCPYDISPLAY ( +FONT FD) \GETPRESSFONTNAMES (XFACECODE) MINIMUMWINDOWSIZE (EXT) MB.CREATE.NWAYBUTTON (MAXITEMS/LINE) +DOERROR (QUESTIONABLE ARG) PRINTFNS (X PRETTYDEFLG FNADRLST) \BULK.DATA.CLOSE (SI::*OR-GENTEMP* +ABORTFLG) CH.ISMEMBER (SECONDARYPROPERTY) SUBPAIR (FLG OLD) \GETREGIONTRACKWITHBOX (THRUONCE NOERROR) +\VFMSmartBLT (SI::*OR-GENTEMP*) \TEDIT.PARSE.PARALOOKS.LIST (TABSPECC OLDLOOKS 1STLEFT LEFT RIGHT +LEADB LEADA LLEAD QUADD TYPESET SUBTYPESET NEWBEFORESET NEWAFTERSET HEADINGKEEP KEEPSET BASESET +REVISEDSET COLUMNSET SPECXSET SPECYSET STYLESET CHARSTYLESSET USERINFOSET) CL:COMPILE-FILE ( +COMPILER::*FASL-HANDLE* COMPILER::PATH COMPILER::OUTPUT-FILE COMPILER::ERRORS-TO-TERMINAL +COMPILER::ERROR-FILE-STREAM) LOCAL-MACRO-FUNCTION (ENV) \BN.COMPAREN (U V) TEDIT.SKIP.SPECIALCOND (PC +NPC) LOOKUP-ENVIRONMENT-AND-FILEMAP (ROOTNAMEP MAPENTRY) \BN.FROM.FIXP (U) LOCAL-SYMBOL-FUNCTION (ENV) + \BN.TO.FIXP (X) FILECHANGES (FILE TYPE FNS) \UFSDirectoryNameP (DIRECTORY) \VFMSaveBuffer ( +evenIfNotDirty) TRANSLATE.LOCF (INDEXONLY) \BN.INTEGERLENGTH (X) CL:MACROEXPAND-1 (CL::DEF) +CL:MACROEXPAND (CL::FLAG) \UFSOpenFile (CASE.CORRECT.NAME OLDSTREAM STRM) \BN.LOGAND (B1 B2 B) +TTADJUSTWORD (WORD) \FILEMAP-HASHOVERFLOW (ONFILELST) \BN.LOGANDC2 (B1 B2 B) RECFIELDLOOK (VAR +EDITRECFLG) \UFSSetFileInfo (FILENAME) TRYNEXT (PL1##) \TEDIT.UPDATE.SHOWSEL (EXCHFLG L1 LN) +SIZE/GRAPH/WINDOW (WINDOW CENTERFLG TOPJUSTIFYFLG) \10MB.LOADINPUTQ (PACKETS) PRINTDATE (ROOTNAME) +\BN.LOGOR (B1 B2) WALK-FORM (XCL::*WALK-COPY*) \BN.LOGXOR (B1 B2) PRINTDATE1 (CHANGES PREVDATE PREVERS +) FW-UPDATE-OFD-WINDOW (NEW? R W) HARDCOPYSTREAMTYPE (STREAM) \TEDIT.PAPERWIDTH (LANDSCAPE?) \BN.PLUS2 + (U V) \BN.TIMES2 (U V U1) \SPP.CHECK.INPUT.QUEUE (CURRENT) \UFSGetFileInfo (FILENAME) \BN.DIVIDE (A B + V Q L1) OPT.JUMPTHRU (Y) \UFSDeleteFile (NAME) \BN.FLOAT (X) DMCHAT.NEWLINE (EXPLICIT) \UFSRenameFile + (FILE OLDUNIXNAME) FB.DELVERCOMMAND (NVERSIONS) MS-SMASH-PACKAGE (THING) TEDIT.BUILD.PCTB (TEXTOBJ +START END CACHE? PCCOUNT CLEARGET? PC OLDPC DEFAULTLOOKS TEXT) \LFRenameFile (newPtr) \FM.GETREGIONS ( +HIGHLIGHT BOXOFFSET) \UFSCloseFile (UNIXNAME) \BN.2TH (A) \BN.QRS (B D) GETSYNTAX (A) EDITSHADE (SHADE +) PSCFONTFROMCACHE.SPELLFILE (CACHE) SEDIT::REPLACE-ROOT (SEDIT::POINT) SI::FINISH-ADVISING (SI::IN-FN + SI::ALREADY-ADVISED?) \GTREADTABLE1 (FLG) MAKEACCESS1 (SPEC) \TEDIT.CARETLOOKS.VERIFY (CARETFN LOOKS) + \BN.MINUS (U) \GTTERMTABLE (TTBL FLG) EMPRESS (HEADING %#COPIES %#SIDES) \INSPECTW.COMMAND.HANDLER ( +SELITEM) DSPSPACEFACTOR (FACTOR) \TEDIT.PAPERHEIGHT (LANDSCAPE?) \BN.SIGN (U) \DOFORMATTING.HARDCOPY ( +1STLN) \TEXTDSPXPOSITION (WINDOW) EDITGRAPH2 (VAL) MSSETSETTYPE (SET TYPE) \UFSError (DEV) +\SEQUIN.FLUSH.RETRANSMIT (REPUP) PRETTYVAR (VAL) COURIER.READ.BULKDATA (LASTSEGMENT?) \UFS.FULLNAME ( +NAME ATOMP) SEDIT::REPLACE-NODE (SEDIT::SELECT-NODE) \UFS.ADD.HOST.FIELD (NAME) SEDIT:GET-SELECTION ( +SEDIT::NODE SEDIT::START SEDIT::NOT-ALL-SELECTED) TTYINENTRYFN (STATE) PRETTYVAR1 (TAILFLG) +ENABLEWHEELSCROLL (ON EXCLUDEHORIZONTAL) FIX-FORM (CIRCLE-FLAG) \NSFILING.ADDQUOTES (QUOTED +ALREADYQUOTED) MAKEDEFLIST (FLG) PPSPPSTREAM (STREAM) DINFO.SETUP.WINDOW (NO.FREEMENU?) %%SORT-SUBLIST + (KEY) INVERTED/SHADE/FOR/GRAPHER (SHADE) COMPILER::FRAME-ANNOTATE-LAMBDA (COMPILER::FUNCTIONAL-POSITION-P +) COMPILER::META-EVAL-PROGN (COMPILER::NEW-STMTS) CHAT.SETDISPLAYTYPE (FN) \TEDIT.NSCHAR.RUN (NEXTCH) +SEDIT::RELINEARIZE-WHERE-NECESSARY (SEDIT::CHANGED-NODES) MKACCESSFN (FN) \M44ACTONVMEMFILE (WRITEFLG) + \SHOWSEL.HILIGHT (L1 LN LL) \TEXTDSPYPOSITION (WINDOW) \TEDIT.FORMATTABS (PRIORTAB NEXTTAB CLEANINGUP +) SUPERPRINTEQ (Y) \ITEM.WINDOW.SELECTION.HANDLER (SELECTABLEITEMS NOW) \UFS.REMOVE.HOST.FIELD ( +RELATIVEDIRECTORY DIRECTORY DEVICE) MENUTITLEFONT (SCREEN) PRETTYCOM1 (PRTYFLG REMOVECOMMENTS) +COMPAREPRINT1 (DOTFLAG SPACE K) \RESHOWBORDER1 (SOFTCURSORUP SI::*OR-GENTEMP*) LVLPRIN (TAIL) +ADDNAKEDCHAR (NOAUTOFILL) RENUMBER.LINES (LINE) \REMOVE-DECLS (CL::BODY CL::SPECIALS) +DEFAULT.INSPECTW.VALUECOMMANDFN (VALUE) PRINTDEF1 (FORMFLG STARTPOS) \LFGetFileName (fileSpec) +\INITBFS (AFTER) COMPILER::GENCODE-CALL (COMPILER::IL-LAMBDA COMPILER::CLOSED-OVER) COMP.CONST (X) +PRINTARRAY-TO-LIST (DOUBLEFLG FLG) \TELERAIDSERVER (RECEIVER METADEBUGGING) FLENGTH (Y) PRINTPARA ( +LMARG PARENFLAG) PPSPP (DETAILS) READVISE (FNS) \TRANSLATE-CL%:LAMBDA (SVAR MAX SIMPLEP) \BN.IGNN (U) +\TEDIT.GET.INSERT.CHARLOOKS (PIECE) D-ASSEM::DCODE-FROM-DLAMBDA (D-ASSEM::EASY-ENTRY) /MOVD (FLG) +TB.MAP.SELECTED.ITEMS (NULLFN) MAKEACCESS (ACCESS) SUBLIS (FLG Y) MB.THREESTATE.SHOWSELFN (ON) +\FM.CHECKDESCRIPTION (LABEL) CREATE-UNIX-SOCKET-STREAM (CHAN) PRINT3TO10 (DOFILTER PRE.NOTE) +INVERTED/GRAPHNODE/BORDER (BORDER) LVLPRIN0 (CDRLVL0 CARLVL CDRLVL) SHOWDEF (FILE) +CL::RECORD-DOCUMENTATION (CL::PARSED-DOCSTRING) KILL.LINES (FIRSTLINE) SCALEPAGEXUNITS (VALUE) TYPESOF + (FILTER NOTFOUND) SEDIT::BACKSPACE-QUOTE (SEDIT::INDEX) FW-CLOSE-CMD (W MANY? OPEN-STREAMS +STREAM-TO-CLOSE) \VAMRecomputeFreePageCount (free firstFree) SCALEPAGEYUNITS (VALUE) DWIMIFY0 (Y EXPR +DWIMIFY0CHANGE) CLISPNOEVAL (DEFAULT) REMOVEITEM (FLG) BIGNUM.DEFPRINT (ELS) CONTROL (MODE) \BN.TH2D ( +A RESULT) D-ASSEM::DIGEST-FUNCTION (D-ASSEM::EASY-ENTRY) \TEDIT.WINDOW.SETUP (AFTERWINDOW) +\ATWGROUPSIZE (ATWS) \BN.ISUM1 (V) DELETECONTROL (MESSAGE) PORTSTRING (SOCKET) D-ASSEM::INSTALL-LOCAL +(D-ASSEM::VAR) /MAPCONC (MAPE MAPFN2) \BN.ISUM0 (V) SEDIT::COLLECT-UNDO-BLOCK (SEDIT::BLOCK-START) +ADDHASH (OV) INSPECTABLEFIELDNAMES (TOPONLYFLG FIELDNAME) GETCFILE (X) FB.UPDATE.COUNTERS (LAB) +\DOCOMPRESSVMEM (OLDVIW) DMCHAT.CLEAR (SETROLL) LISPXUSE1 (A V EFLG VFLG AFLG) MAKEHARDCOPYSTREAM ( +DISPLAYSTREAM) CHANGEFONT (FONTCLASS) D-ASSEM::INSTALL-VAR (D-ASSEM::VAR) OPT.SCANOPT (P B) PRINTARRAY + (DOUBLEFLG) MB.THREESTATEBUTTON.FN (STATECHANGEFN) RESETGRID.NEW (ORIGX ORIGY DOCLEARFLG) DELETELINE +(NEXTLINE EMPTYLINE?) INSURE.BRUSH (BRUSH NOERRORFLG) SEDIT::PROPAGATE-WIDTH-CHANGE (SEDIT::SUPER) +SHAPEW1 (NOWOPEN?) D-ASSEM::GENERATE-ARG-CHECK (D-ASSEM::MAX-ARGS) PRINTERROR (VALS NEWPRS) FITP ( +TAILFLG) D-ASSEM::INTERN-VAR (D-ASSEM::DVAR) \UFS.HANDLE.RELATIVEDIRECTORY (DIR) SUPERPRINT (MACRO) +SUBHASH (OV) FW-CHANGE-POSITION (BOX) \TEXTDSPFONT (NEWFONT) UTOXCODE (X) SEDIT::COPY-SELECTION-LITATOM + (SEDIT::DESTINATION SEDIT::NOT-ALL-SELECTED SEDIT::START) BUFTAILP (START) SEDIT::CONS-ATOM (SEDIT::ATOM? + SEDIT::CHARS) CHAT.SET.EMULATOR (NEWEMULATOR) \BN.D2TH (U) ECHOCHAR (MODE) \FM.JUSTIFYGROUPS (HJUST +VJUST) BITMAPOBJ.SNAPW (SAVE) GETFILEPKGTYPE (NAME NOERROR) ACCESSDEF4 (TL TEM) MARGINBAR (UNSETL1 +UNSETLN FLOATINGRIGHT EXTENDEDRIGHT) OPT.SETUPOPT (C) \NOTE.3TO10 (A) OPT.POSTOPT (CODE ANY) +\DOFORMATTING (1STLN) GETXIP (EPKT WAIT TIMER) SEDIT::COMPOSE-PSEUDO-SELECTION (SEDIT::START SEDIT::END +) \IDLE.IS.PREVIOUS (OLDPWD) \TEDIT.PARABOUNDS (PIECE) \10MB.INPUT.INTERRUPT (PACKET) IOCBQLENGTH ( +FIRSTIOCB) \TEXTMENU.DOC.CREATE (CH#1) ECHOMODE (FLG) COMP.PROGLST (LST) %%SORT-VECTOR (KEY) TEDIT.GET + (OFILE GETFN MENUSTREAM) PUTMENUPROP (NOWDATA) \PARSE.PORTCONSTANT (VAL NET HOST) ADDTOCOM (NEAR +LISTNAME) /MAPCON (MAPE MAPFN2) \BN.MADD (TT) COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::REQUESTS) +\TEDIT.APPLY.STYLES (STYLE IN-PARA) RAISE (FLG) PFI.HANDLE.DECLARE (TAIL STARTOFLINE) \BN.TH2B (U) +\LFOpenFile (OLDSTREAM IDATE STREAM) \FM.LAYOUTGRID (BOXOFFSET) PROMPTFOREVALED (WHERE) +COMP.UNBIND.VARS (TOPFLG) ACCESSDEF (CFLG TEM) \TEDIT.BASICFIND (CH# FOUND) \CH.PRINT.BLURB (DOMAIN) +\10MB.OUTPUT.INTERRUPT (NEXTPACKET IOCB) FORMAT-WRITE-FIELD (PADLEFT) \UFS.NEXTFILEFN (SUBGEN FILENAME + NAME ATOMP NAMEONLY) MSCHECKBOUNDFREE (SFLG BLKNAME) IN/SCROLL/BAR? (EXTENT EXTENTUSE) CHOOZ (NDBLS +GENFN GENERATOR SPLST ALTFLG FN TAIL VAL TIEFLG) \IDLE.AUTHENTICATE (UNIX NS GV) PFI.HANDLE.RPAQQ ( +COMSINFO) \INTERPRET-ARGUMENTS (\ARGLIST) TESTRELATION (ITEM2 INVERTED) %%STABLE-SORT-VECTOR (KEY) +TEDIT.DELETELINE (PREV NEXT) XTOUCODE (X) SI::PRINT-TRACED-ARGUMENT (SI::PRIN1-THE-NAME?) +POSTSCRIPT.PUTBITMAPBYTES (DELIMFLG) COMPAREFAIL (OLD) MSCHECKFNINBLOCK (ISCALLEDP) TIMEALL (TIMEWHAT) + \NSRANDOM.FETCH.CACHE (CACHE KEEP) TEDIT.MINIMAL.WINDOW.SETUP (AFTERWINDOW WINDOW LINES) FINDFN (POS +FLG) GRAPHDELETENODE (DELFN) PARSERELATION1 (TAIL) \LOOKUPPORT (NAME IPUP) COMP.UNBOX (BOXER) WHATIS ( +USERINPUT ONLY) \CHECKEOLC.CRLF (PEEKBINFLG) /DSUBST (OLD) \POLYSHADE.YSCAN.IP (currlist fulllist) +PROPLISTP (LST LSTPTR) /ATTACH (LST) \10MBWATCHER (PACKET) \BLTSHADE.GENERICPRINTER (CLIPPINGREGION) +\SUBREAD (TOPLEVELP EOF-SUPPRESS ESCFLG CASEBASE EOF-POSSIBILITY INVALIDFLG EXTRASEGMENTS PACKAGE +ESCAPEFLG NCOLONS AT-EOF LST PRESERVE-WHITESPACE DOTLOC CHAR ELT) RESETREADTABLE (RDEFS FDEFS) /RPLACD + (LST Y) \TEDIT.FIND.FIRST.LINE (WINDOW) TREEGRAPHNODE (PARENT) /LISTPUT (X) HARDCOPYGRAPH (FILE +LANDSCAPE-FLAG) /RPLACA (LST Y) COMP.UBFLOAT2 (A) \LOADNSHOSTNUMBER (OLDBOX) \TOP-LEVEL-READ ( +EOF-SUPPRESS CHAR *CIRCLE-READ-LIST*) LISPXTAB (Z Y X NODOFLG) \LFGenerateFiles (A0493 STR) +\FM.LAYOUTCOLUMN (BOXOFFSET) SEDIT::PARSE (SEDIT::SUPER-NODE) COMP.BIND.VARS (VAL) \CREATEW1 ( +NOOPENFLG) FIND-EDIT-LOCATION (EXPRS) \ARBOUT (ITEM) EDITBMRESHAPEFN (TEMPBM) MOVETOP (Y) +SHOWSTACKBLOCKS (WAITFLG) SUBFIELDCREATE (SUBDECL DFLT SUBTRAN HL) SEDIT::EDIT-SELECTION (CL:STRUCTURE +) PURGEHISTORY (TYPE) READTABLEPROP (NEWVALUEP OLDNAME NEWVALUE) \10MB.PRINT.ENCAPSULATION (CALLER) +GENERATOR (COMVAR##) POSTSCRIPT.SHOWACCUM (KERN) SKIPSEPRCODES (PREVC) SEDIT::BACKSPACE-UNKNOWN ( +SEDIT::INDEX) MSCHECKBLOCKS (FILES BLOCKS) \FM.LAYOUTROW (BOXOFFSET) XCL::WALK-DECLARATIONS ( +XCL::DOC-STRING-P XCL::DECLARATIONS XCL::FORM XCL::MACROP) COMP.CHECK.VAR (BIND) MOUSESTATE-NAME ( +MOUSEONLYFLG) INSPECT/TOP/LEVEL/LIST (X) \TEDIT.INSERTLINE (PREVLINE) FORMAT-PRINT-NAMED-CHARACTER ( +NAME) SKREAD (REREADSTRING \RBFLG) TEDITMENU.STREAM (MENUW) \NSRANDOM.READ.SEGMENT (EXTRABUFFERS ERROR + ATTR) COMPILER::FRAME-ANNOTATE (COMPILER::NODE) I.S.OPR (FORM OTHERS EVALFLG NEWFLG) +\UFSParse-Directory (DIRECTORY) MSCHECKBLOCK (BLKNAME BLKAPPLYFNS ERRORS) CL:MAKE-STRING-INPUT-STREAM +(CL::END) SEDIT::BACKSPACE-LITATOM (SEDIT::INDEX) CHECK-KEYWORDS (BADKEYWORD) SEDIT::NEXT-NODE ( +SEDIT::INDEX SEDIT::NODE) MAKEHASHLINKS (TRANS) CL:READ (RECURSIVE-P EOF-ERROR-P) \TEXTBACKFILEPTR (PC +) RESETUNDO (X STOPFLG) /LCONC (X PTR) CL:READ-PRESERVING-WHITESPACE (RECURSIVEP EOF-ERRORP) CREATEW1 +(REGION TITLE NOOPENFLG) SETCOLOR.IP (OPERATION) CL:READ-DELIMITED-LIST (RECURSIVE-P ENDCODE) LISPX ( +LISPXXMACROS LISPXXUSERFN LISPXX LISPXLISTFLG LISPXLINE DONTSAVEFLG LISPY LISPXVALUES LISPXHIST LISPZ +LISPXTEM LISPXFLG) SCALEDBITBLT (CLIPPINGREGION) CL:PARSE-INTEGER (START END FATP JUNK-ALLOWED SIGN +STARTINT MAXALPHACODE) COMPILER::META-EVAL-CALL (COMPILER::EVAL-WHEN-LOAD?) \MKINTEGER (FATP NEG) +PRIN2-LONG-STRING (P2FLG USE-SEMI-COLONS SEMISTRING SEMICLOSE LASTSPACE COMMENTP ESCAPESEPRS C +SINGLELEFT) \UFS.PARSE.BODY (TYPE VERSION) LISPX/ (FN) SEDIT::LINEARIZE-ROOT (SEDIT::INDEX) +COMP.TOPLEVEL.COMPILE (ARGS) \DRAWPOLYGON.GENERIC (POINTS CLOSED) DUMPGRAPH (BORDERS SHADES) +EDIT-IN-FUNCTION (LOC) LISPXUNREAD (EVENT) FINDATOM (BLIP) FORMAT-PRIN1 (PARMS ARG COLON) EDIT-IN-FNS +(LOC) RIGHTW.REPAINTFN (WINDOWREGION STARTROWPROPS) EDITBMREPAINTFN (ZEROBM) SEDIT::BACKSPACE-GAP ( +SEDIT::INDEX) PFI.ESTIMATE.SIZE (TEMPLATE) DECLARED-SPECIAL (DECLS) \FM.FORMATEXPLICIT (LOCAL) +FILEPKGCOM (TEM) CHDIR (PATH) GETFIELDFORCREATE (USETYPE COMPOSEWITHUSING NOPOSTPROCESSING) ADVISEWDS +(OLDREG MOVEONLYFLG) PURGEHISTORY1 (FLG) \FLUSHPAGE (FROMFLUSHVM) \RSTRING2 (SKIPPING ANSLIST FATSEEN +LASTC) PRINSHUT (PAREN) \TRANSFERPAGE (WRITE? NEWPAGE?) \POLYSHADE.XSCAN.IP (currlist fulllist) +LOWERCASE (FLG) ADDCHAR (ENDP) READOCT (PROMPT) READ-EXTENDED-TOKEN (ESCAPE-ALLOWED-P ESCAPING +CASEBASE ANSLIST FATSEEN ESCAPE-APPEARED) \SETMACROSYNTAX (CONTEXT WAKEUP ESCAPE A) MOUSESTATE-EXPR ( +MOUSEONLYFLG) \SEQUIN.FLUSH.CONNECTION (PROC) \NSRANDOM.PREPARE.CACHE (CACHE FREETAIL) +\READTABLEP.DEFPRINT (NAME) IFCDECLARE (WANTDECLARE) SI::NAMED-FUNCTION-WRAPPER-INFO (SI::NAME) +SETFONT (FONT) COMP.PROGN (FLG) FW-CHANGE-ANCHOR (NEWANCHOR) \NSRANDOM.CHECK.CACHE (CACHE CHECKORDER +EMPTY) MBUTTON.SET.FIELD (PCNO FIELD.SEL) DEFPRINT (F FN) SI::COMPILED-FUNCTION-ARGLIST ( +SI::DEBUGGING-INFO SI::INTERLISP?) \TEXTPEEKBIN (PC NOERRORFLG SUBSTREAM) ERRORMESS1 (MESS1 MESS2) +\DRAWELLIPSE.GENERIC (ORIENTATION) DOUSERFNS2 (FNLST) READ/NODE (NOW NEAR) COS (RADIANSFLG) +\CLIPANDDRAWLINE1 (YMOVEUP SOFTCURSORUP SI::*OR-GENTEMP*) TWODINSPECT.ARRANGEWINDOWS (TOTALHEIGHT +TOTALWIDTH TOTALLEFT TOTALBOTTOM) CLEAR.LINE? (FLG) SIN (RADIANSFLG) XCL::WALK-BINDINGS-1 (XCL::BINDINGS + XCL::SEQUENTIALP) FB.SUBITEMP (SUB) INSPECT/AS/FUNCTION (EDITOR WINDOW PROC) SMASHPAT1 (EFF) +STRING-EQUAL (START1 END1 START2 END2) RETFROM (FLG) \SELECTREALPAGE (LOCK? SI::*OR-GENTEMP* NEWFP) +GRAPHREGION (NODELST) FORMAT-PRINC (PARMS ARG COLON) SI::GET-STORED-ARGLIST (SI::ARGNAMES) HISTORYSAVE + (INPUT1 INPUT2) POSITION (FILE N) SI::COMPILED-FUNCTION-INTERLISP? (SI::DEBUGGING-INFO) COMP.BOX ( +BOXER) \LFParseFileName (DIRECTORY ENDVOLNAME STR) \MAIKO.DISPLAYLINE (HARDCOPYMODE TERMSA) +SI::FUNCTION-WRAPPER-INFO (SI::NAME) \RECODECCODE (CSMAP) DOUSERFNS (CHECKFORDON'TFLG FNLST) +TEDIT.WINDOW.SETUP (PROP) \NSFILING.ADD.TO.CACHE (ID OLDHANDLE) MAKE-READER-ENVIRONMENT (PACKAGE +READTABLE BASE) CH.RETRIEVE.MEMBERS (PROPERTY) XCL::WALK-BINDINGS-2 (XCL::BINDINGS) CANONICAL.HOSTNAME + (DEV) SEDIT::ATOM-POINT-TYPE (SEDIT::ESCAPED) MOVETOUPPERLEFT (REGION) \INTERNAL/GETPASSWORD (HOST +OSTYPE ALWAYSASK DIRECTORY) /DELETECONTROL (MESSAGE) ADDTO (FLG) BACKSKREAD (NOTIFQUOTED ESCAPED X) +FILL.INITTBLE (OPERATION TEXTURE SI::*OR-GENTEMP*) SEDIT::ASSIGN-FORMAT-LITATOM (SEDIT::BROKEN?) +CHAT.TTYENTRYFN (WINDOW) \NSFILING.LOOKUP.CACHE (FILENAME) ETHERPORT (ERRORFLG MULTFLG) LISPXFIND ( +HISTORY BACKUP LINE VAL) CL:NOTEVERY (MORE-SEQUENCES) COMP.TRANSFORM (MACROPROP EXPN-FN) +MAKECREATELST1 (TEMPLATE NEEDACELL CARFLG USING) SETPASSWORD (HOST DIRECTORY USER) OPENNSOCKET ( +ID#EXPLICIT? CLASHP) \TEDIT.CHARDELETE (INSPC) FW-MOVE-OFD-WINDOWS (WHAT) ONEDINSPECT.ARRANGEWINDOWS ( +TOTALHEIGHT TOTALWIDTH TOTALLEFT TOTALBOTTOM) FONTCREATE (FAMILY SIZE FACE ROTATION DEVICE NOERRORFLG) + \TEDIT.PIECE-CHNO (PCNODE) \TEDIT.OBJECT.SHOWSEL (FIRSTLINE IMAGEFN ON) BESTPUPADDRESS (ERRORSTREAM +BESTPORT NOTLOOKEDUP) \PFEnsureInitialized (FORCEINITIALIZATION) \INTERNAL/SETPASSWORD (DIRECTORY INFO + NEWNAME/PASS ALWAYSASK HOST NSINFO DEFAULTNAME DISKNAME PASSWORDADDR INFOCHANGED NEWNAME) UNDOLISPX2 +(FORGETFLG DWIMCHANGES) INSPECTW.REPAINTFN (REGION SELITEMS) SHOWWTITLE (CENTERFLG) \POLYSHADE.DISPLAY + (currlist fulllist count) \SUBREADCONCAT (EXTRASEGMENTS) EDITBMSCROLLFN (GRIDSPEC) TTBIN (NOMETA) +\INVALID.SYMBOL (PACKAGE) MINIMUMMAINWINDOWSIZE (EXT) TTWAITFORINPUT (MSECS RETKEYFLG TIMER) +\ALLOCWIDTHTOGROUPEDWINDOW (ATWS MAXSIZE) \GETBASESTRING (FATP) \TEXTGETFILEPTR (PC) SHOWWFRAME (TITLE +) TTYIN (SPLST \READING RDTBL PROMPT \LISPXREADING \PROMPTFORWORD \REPEAT TYPEAHEAD VALUE \CURSORCOL) +\TEDIT.HARDCOPY.FORMATLINE (PC 1STLN DOINGHEADING? KERN GATHERBLANK NEWASCENT TABPENDING PREVDHYPH +PREVHYPH T1SPACE FORCEEND) TTSKREAD (PARENCOUNT) \FM.FORMAT (BOXOFFSET) GRAPHERPROP (NEWVALUE) +MSPRGLAMBDA (ARGS KEYS? KEYLIST OLDTEMP) TTYIN.READ (DONTREAD BUTLASTC) \LOGIN.READ (HOST CONNECTFLG +MSG) SEDIT::COPY-SELECTION-DEFAULT (SEDIT::DESTINATION SEDIT::START SEDIT::BLANK-BEFORE) TTYIN.SETUP ( +WINDOW) OPT.RESOLVEJUMPS (NEW) \ADJUST.USERNAME (NAME) PRINTADDRS (SI::*OR-GENTEMP*) HISTORYFIND ( +LISPXFINDFLG _FLG =FLG L ALLFLG) COMP.ATTEMPT.COMPILE (EMFLAG FLG) TTYIN.CLEANUP (WINDOW) +\BUILD.EXPEDITED.XIP (ARGLIST) PRINTFILETYPE (TYPE DONTOPEN) TTYIN.FINISH (DRIBFL RESULT WORD X) +\IMAGEIOINIT (POS N DY) UNDOLISPX (LINE UNDONEFLG DWIMCHANGES) \ITEM.WINDOW.COPY.HANDLER ( +SELECTABLEITEMS CURRENTITEM SI::*OR-GENTEMP*) DCODERD (NAMETABLE LOCALARGS) \SEQUIN.CONTROL (PUP) +\MEDW.BLTCHAR (SOFTCURSORUP SI::*OR-GENTEMP*) UNIX.SENDSCREENPARAMS (CONN ASK) TEDIT.FORMATTEDFILEP ( +PC PREVPC TENTATIVE) \TEDIT-OPEN-FONT-FILE (EXISTING-FONTFILE-IF-ANY) \DSPXPOSITION.PSC (XPOSITION) +\MEDW.XOFFSET (DISPLAYSTREAM XOFFSET) XCL::WALK-ARGLIST (XCL:ARGLIST XCL::DESTRUCTURINGP) +\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (NEWOBJ OBJ) WTFIX1 (TYPE-IN? CHARLST X NOSPELLFLG0 CLISPCHANGES +CLISPERTYPE) \MEDW.YOFFSET (DISPLAYSTREAM YOFFSET) \ORIG-READ.SYMBOL (PACKAGE EXTERNALP NONNUMERICP) +DCODESKIP (FLG) TTYIN1RESTART (MORELINES) \TEDIT.FIXCHANGEDLINE (NEXTCARETCH#) \NOIMAGE.DSPFONT (FONTN +) MAXMENUITEMWIDTH (NOSUBITEMMARK SUBITEMS) PRINTHISTORY1 (INPUT Y) PRIN4 (OBEY-PRINT-LEVEL) \LETtran +(SEQUENTIALP) \ORIG-INVALID.SYMBOL (PACKAGE) \TFBRAVO.READ.PARALOOKS (LMFLAG FLLMFLAG) +\TEDIT.FIND.OVERLAPPING.LINE (LINES) MAXIMUMMAINWINDOWSIZE (EXT) \ALLOCHEIGHTTOGROUPEDWINDOW (ATWS +MAXSIZE) \VFMInsert (splitFlag) TTYIN1 (CHAR MATCHED WASEDITCHAR DRIBFL) INFILECOMSVAL (FLG) +SETINITIALS (POS) \NSFILING.CONNECT (NEW.HANDLE NSPATHNAME) GRAPHNODE/BORDER/WIDTH (BORDER) +\LINEWITHBRUSH (USERFN BBT SI::*OR-GENTEMP* DASHON DASHTAIL SOFTCURSORUP) PROMPTFORWORD (CANDIDATE.STR + DONTECHOTYPEIN.FLG TERMINCHARS.LST CONVERTIBLEP KEYBD.CHANNEL URGENCY.OPTION PROMPT.STR TTYD +CHARBUFFER SPACEP RUBBING? GENERATE?LIST.FN ?HELPMSGTRIEDP BEGUNTYPING? TIMELIMITEXPIRED?) \TEXTEOFP ( +PC) BKBUFS (S L ID) CLBUFS (NOCLEARFLG NOTYPEFLG SBUF LBUF) PRINTHISTORY (LINE SKIPFN NOVALUES) +LISPXSUBST (CHARFLG) \ALLOCATE.ETHERPACKET (PACKET) MAPDL (MAPDLPOS) \CCLOSURE.DEFPRINT (NAME) +\VFMDelete (firstFlag lastFlag) POSTSCRIPT.BITMAPSCALE (PPL) SUPERPRINT/COMMENT (SEMIP RIGHTFLG +HALFLINE) UNADVISE (FNS) \TFBRAVO.READ.CHARLOOKS (PROPERTY VALFLAG) \DSPYPOSITION.PSC (YPOSITION) +ETHERHOSTNUMBER (NAME) PFI.DEFAULT.HANDLER (TESTFN TEMPLATE ITEMNAME) PUTSEQUIN (DONTWAIT) STRINGWIDTH + (FLG FONT) READHASHMACRO (INDEX) FORMAT-PLURAL (ATSIGN) SEDIT::STRING-OFFSET (SEDIT::STRING? SEDIT::START +) CHARCODE.UNDECODE (NAME) SEDIT::GET-SELECTED-STRUCTURE (SEDIT::NODE) SEARCHPDL (SRCHPOS) YMAPLIST ( +PATH1) \SW2BM (PR QR) RAIDCOMMAND (T5) CHAT (HOST FROMMENU HOSTS WINDOW SUCCESS) CL:RETURN-FROM ( +CL::FRAME CL::RETFROM-TAG) COMPSETREAD (MESS) ESTIMATE-DIMENSIONALITY (RANK) READNUMBERINBASE ( +NUMERATOR VAL SIGN) \INSPECT.COMPUTE.TITLE (TITLE) MSPRGTEMPLATE1 (X ALLOW-OTHER-KEYS KEYSUSED?) +LISPXUSEC (LISPY LISPZ LINE) CLOSEHASHFILE (REOPEN) MBUTTON.SET.NEXT.FIELD (NEWVALUE) FILL-VECTOR (END +) UNIX.SETDISPLAYTYPE (NAME ASK OLDTYPE WINDOW) \DONEWEPHEMERALPAGE (NOERROR) INFILECOM (X CFN) +FORMAT-NEWLINE (COLON ATSIGN) SEARCH-FOR-EVENT-NUMBER (EVENTS) MAXIMUMWINDOWSIZE (EXT) GRID (BORDER +GRIDBM) XCL::WALK-TEMPLATE-HANDLE-REPEAT-1 (XCL::FORM XCL::REPEAT-TEMPLATE) FB.SHAPECOMMAND ( +EXCESSHEIGHT) PURGENSFONTS (TYPES) FORMAT-EAT-WHITESPACE (NEXT-NON-WHITE) TERM.SET.TAB (TERM.TAB.STOPS +) CALLSCCODE (RESULT) RETVALUES (FLG) COPIEDFILEMATCH (FRPAT CHARS) FB.DEPTHCOMMAND (NEWDEPTH) +BREAK.NSFILING.CONNECTION (DEV) CSUBSTLST (X) \SHOWMENULABEL (CENTER?) INSPECT/ATOM (ASPECTS) +LISPXSTOREVALUE (EVENT) MAPHASHFILE (DOUBLE BOTH) DEFAULT.BACKGROUND.COPYFN (FORM) TTPROMPTCHAR ( +PROMPT) \APPLYINSPECTMACRO (ARGS) \DSPFONT.PSC (FONT) EXCHANGEPUPS (IDFILTER) MSPRGRECORD (Z OF?) +RECORDWORD (TL NEWORD) DODIR (EXTRACOMS) DWIM (X) \SEQUIN.PUT (ISDATA) \PROMPTFORWORDBIN ( +URGENCY.OPTION BROADURGENCY? INSTREAM DISPLAYECHOSTREAM TIMER READABLE) CREATE-SHELL-STREAM (CHAN) +FM.CHANGELABEL (UPDATEFLG) \DSPLEFTMARGIN.PSC (XPOSITION) \DSPMOVELR (X Y WIDTH RIGHTWARDSFLG ERASEFLG + DEFAULTPOS?) DELETEMENU (CLOSEFLG) TEDIT.FORMATFOLIO (PRETEXT POSTTEXT NOFIRSTPAGE FORCENEXTPAGE YBOT +) COPIEDFILENAME (PRESERVEVERSION) UPDATE/MENU/IMAGE (SCREEN ANYSUBITEMS? TITLE MENUITEMS) +OPENHASHFILE (ITEMLENGTH %#ENTRIES HASHFILE) INSPECT/HARRAYP (PROPS) SEDIT::DEFAULT-PACKAGE (SEDIT::NAME +) \NSFILING.DESERIALIZE (PARSE) \TEDIT.SELECT.CHARACTER (PREVCH EXTENDING SELRES) XCL::SET-CONSTANTP ( +XCL::FLAG) TEDIT.FORMATTEXTBOX (KEPT-ONE-LINE FORCENEXTPAGE FIRSTLINE COLUMN-YBASE YBOT SPECIALYPOS +PRIOR-COLUMN-YBOT) CHARCODE.DECODE (C NOERROR POS) TTYIN.PPTOFILE (PRINTFN) GRAPHOBJ.CHECKALIGN ( +ALIGNSPEC) STRPOSL (START BACKWARDSFLG NEG STRFAT) SET-SYMBOL (ENVIRONMENT) \PFRemoveRootDirEntry ( +nuke) COMPUTE-MACRO-ARGS (ARGUMENT-LIST SUPPLIED-P-VARIABLE FOUND-VALUE) SENDPUP (PUPSOC) TRACKCURSOR +(DOWNFLG) DEFAULTFONT (FONT NOERRORFLG) EXPANDMACRO (ALLFLG QUIETFLG) CHARWIDTHY (WY) +\DRAWPOLYGON.DISPLAY (CLOSED) TEDIT.FORMATHEADING (FORCENEXTPAGE YBOT) +SEDIT::PARENTHESIZE-CURRENT-SELECTION (SEDIT::NODE SEDIT::START SEDIT::POINT-AFTER?) +SUPERPRINT/COMMENT2 (TAIL) \STRINGWIDTH.GENERIC (RDTBL) CSELECT (CLAUSES) PRINT-EVENT (INPUT Y RNT +NOVALUES) SUPERPRINT/COMMENT1 (EDITDATEP) \DSPCLIPPINGREGION.DISPLAY (REGION) EXPANDOPENLAMBDA (VALS +SUBSTPAIRS ARGS) \DSPRIGHTMARGIN.PSC (XPOSITION) REBINDP (EXP) \CLIPANDDRAWLINE (SOFTCURSORUP +SI::*OR-GENTEMP*) HASHFILEPROP (VALUE) COMP.GETBASE (STFLG) PopUpWindowAndGetAtom (CANDIDATE RESPONSE) + \CH.FIND.ORG.SERVER (DONTPROBEFLG NOERRORFLG) \DSPOPERATION.DISPLAY (OPERATION) LISPXUSE0 (VARS) +MSBINDVAR (VAR) \DEVICESYMBOL (STRM X) \IRM.WILD.MATCH (WILDLIST LIST) PRINTCOMSTRAN (FROMDWIM +FILEFORM TAIL RESETOUT) PREVLINE (X) \PFFreeDiskPages (recompute) \UNCOPY (CARLVL CDRLVL) +\BACKCOLOR.DISPLAY (TEXTURE) \BLTSHADE.DISPLAY (SI::*OR-GENTEMP* CLIPPINGREGION WIDTH HEIGHT TEXTURE +SOFTCURSORUP) UNIX-WRITE (LENGTH-WRITTEN) PRINTCODE (FN.IS.CODEBASE LVFLG LEVEL PC FIRSTBYTE TEMP +SI::*OR-GENTEMP* LEVADJ) \NSFILING.DESERIALIZE1 (CLOSEFN) \DSPLINEFEED.PSC (LINELEADING) +\SCALEDBITBLT.DISPLAY (SCALE WIDTH HEIGHT) COMPILER::CLOSURE-ANNOTATE-TAGBODY (COMPILER::IN-LOOP-P) +TEDIT.FORMATPAGE (PAGE# END-OF-PAGE-FN) EDITBMBUTTONFN (COORDWIN) \BITBLT.DISPLAY (WIDTH HEIGHT +SOFTCURSORUP SOURCE SI::*OR-GENTEMP* CLIPPINGREGION TEXTURE) GETPUP (PUP WAIT TIMER) \SPLITTREE ( +UPWARD) TEDIT.CURSORMOVEDFN (LINE) TYPEP (CL::FN) FONTUNPARSE (FACE) \SEQUIN.PROCESS (SOC TIMEOUT) +\DRAWELLIPSE.DISPLAY (ORIENTATION DASHING USERFN BBT SI::*OR-GENTEMP* SOFTCURSORUP) \DSPRESET.DISPLAY +(X) SEQUENTIAL.PRETTYPRINT (TAIL) \DRAWLINE.DISPLAY (SI::*OR-GENTEMP* DASHING COLOR WIDTH) +SEDIT::CHECK-SELECTION (SEDIT::NODE) \TEDIT.APPLY.PAGEFORMATTING (PAGENOS PX HEADINGX HEADINGINVALID +STARTINGPAGE# LANDSCAPE?) \CH.LOCATE.SERVERS (DOMAIN NOROUTE) FONTCLASSCOMPONENT (FONT) +\FILLCIRCLE.DISPLAY (TEXTURE SI::*OR-GENTEMP* SOFTCURSORUP) INSPECTW.REDISPLAY (PROPS PROPPRINTFN +PROPNAME SELITEMS) MAKECREATE1 (CKVALFLG USINGTYPE TEM NEEDACELL SMASHFIELDS) FILL.XPER (SOFTCURSORUP +SI::*OR-GENTEMP*) FIND-STACK-FRAME (FRAME-SPEC) CASE.PRETTYPRINT (TAIL) \DSPYPOSITION.DISPLAY ( +YPOSITION) NSPRINT (INSTREAM PRINTRESULTS) FIND.LINE.BREAK (USELAST) \DSPXPOSITION.DISPLAY (XPOSITION) + \TEDIT.FILL.IN.CHARLOOKS.MENU (PROP OFFSET) ENDREAD? (ESCAPED) MAKEINITLAST (SI::*OR-GENTEMP*) +COPIEDFILEPATTERN (FRPAT CHARS TOPAT) COMP.LOOKUPVAR (FORVALUE) \UTF16.BACKCHARFN (BYTECOUNTVAR) +\DSPRIGHTMARGIN.DISPLAY (XPOSITION) \XCCSINCCODE (BYTECOUNTVAR) COMPILE! (PRINTLAP NOREDEFINE NOSAVE) +\TEDIT.CONVERT.FOREIGN.FORMAT (TEXTOBJ) UTF16BE.PEEKCCODEFN (BYTE1 BYTE2 RAW X NOERROR) +SETFONTDESCRIPTOR (FONT) PRINT-HISTORY (EVENT-SPECS) SUPERPRINT0 (BRFLG NEWBR) EDITADDNODE ( +NODELABELFN) \DSPFONT.DISPLAY (FONT) UNIX-KILL (CONN) SPP.CLEARATTENTION (NOERRORFLG) HPRINT ( +UNCIRCULAR) \FONTSYMBOL (ElseReturnXFlg) \DSPLEFTMARGIN.DISPLAY (XPOSITION) DUMPINITPAGES (VERSIONS) +MSPRGE (EXPR CLISP TEM) FIND-LEXICAL-ENVIRONMENT (POS) PRINTPROG (TAIL) \FONTFACE (FACE NOERRORFLG) +ADDFILE0 (LOADTYPE FLG DAT) SUBPRINT (TAIL FORMFLG0 END FORMFLG CLISPWORD DOCRFLG) CLISPLOOKUP1 (LST) +DODIRCOMMANDS (COMTAIL TYPE) \NSFILING.AFTER.LOGIN (HOST) \DSPLINEFEED.DISPLAY (DELTAY) SUBPRINT1 (X) +\DRAWCIRCLE.DISPLAY (DASHING USERFN BBT SI::*OR-GENTEMP* SOFTCURSORUP) DIRPRINTNAME (DIFFERENT +DIRECTORYEND FLG) \FONT.COMPARESYMBOL (INPUTFIRSTC A0496) \INVALID.INTEGER (FATP) DSFIT1 (M) +GETGRIDBOXREGION (OPPT) LISPXUSE (LINE LST ARGS EXPR USE-ARGS) SEDIT::DELETE-NODES (SEDIT::START) +INSPECT/DATATYPE (TYPE DEC SYSREC) /PUT-1 (X0) SETUPPUP (REQUEUE) LISPXPRINTDEF (NODOFLG) +FIND-HISTORY-EVENTS (AND-SPEC *EVENTS* ALL-P) DBG::COLLECT-ACTIVE-ESCAPES (DBG::ALL) MOVE.TO.LINE ( +BUFTAIL) UTF16BE.INCCODEFN (BYTECOUNTVAR) \IDLE.EXIT? (NAME TIMEOUT WATCHER PWD AUTHTYPE) CACHEMACRO ( +ENV) MSADDTYPE (oldWordDef) XCL::PUT-IMPLICIT-KEY-HASH (XCL::VALUE XCL::DELETED-SLOT-INDEX XCL::NEW-VALUE +) HISTORY-NTH (LST) \DSPBACKCOLOR.DISPLAY (COLOR COLORCELL) TEDIT.BUILD.PCTB0 (TEXTOBJ OLDPC) +\DSPCOLOR.DISPLAY (COLOR COLORCELL) \NSGC.COLLECT.DIRECTORIES (SESSION NOCHILDREN) TEDIT.SCAN.LINE ( +WORDSELFLG L) MISSPELLED? (XWORD FN) TEDIT.PROMPTFLASH (TEXTOBJ MAINTEXTOBJ) \PRINDATUM.TO.STRING ( +THERE-ARE-CIRCLES *PRINT-CIRCLE-HASHTABLE*) BROKENDEF (BEFORE AFTER) LISPXPRIN2 (Z Y X NODOFLG) +UTF16BE.OUTCHARFN (RAW X) \INSERTTREE (NEW-PREVLEN NEW-OLDLEN) UNDOLISPX1 (FLG TEM DWIMCHANGES) +FB.YES-OR-NO-P (ANSWER) LISPXSPACES (Y X NODOFLG) /ADDPROP (ATM X X0 FLG) TEDIT.FORMAT.HARDCOPY ( +BEFOREFN AFTERFN FILE WASOPEN) SAVEPUT (X X0 OLDFLG) PRIN1 (OBEY-PRINT-LEVEL) FM.WHICHITEM (POSorX) +FONTSET (NAME BASICCLASSES) SPACES (\THISFILELINELENGTH) /SETATOMVAL (ATM VAL) PRINTNUM (NUMBER +FLOATFLAG RAD WIDTH) PRINTOPCODES (SINGLE) MAPFILES (ENUMERATE-FIRST) BRHL/LAYOUT (DS) +\DO.PROGV.SETUP.FRAME.AND.EXECUTE (VALUES) MAKEWITHINREGION (LIMITREGION) \TEDIT.UPDATETREE (UPWARD) +ALLCALLS (LAMFLG INTERNALFLG) \TEDIT.PARSE.CHARLOOKS.MENU (BUTTON SIZE) COMPILE (FLG) RPLNODE2 (Y) +\COURIER.TRACE (ARGUMENTS FIRSTTIME) CL:LOAD (IF-DOES-NOT-EXIST *LOAD-VERBOSE*) TOPATTACHEDWINDOWS ( +RECURSIVE) OUTPUT (FILE) MSADDMODIFIER (oldWordDef) SHOW.IP (MOVING?) TEDIT.BUILD.PCTB2 (TEXTOBJ OLDPC + PC) \TEDIT.ADJUST.LINES (FIRSTLINE LL OFLOW PREVLINE) VARSBOUNDINFORM (INVAR) TTYINPROMPTFORWORD ( +DONTECHOTYPEIN.FLG KEYBD.CHANNEL TERMINCHARS.LST ECHO.CHANNEL PROMPT.STR) SEDIT::START-COMMENT ( +SEDIT::POINT-NODE) GET-NEXT-HISTORY-EVENT (FIRST-ONLY HISTORY) /PUTPROP (ATM X X0) SEDIT::CREATE-NODE +(SEDIT::SUPER-NODE) RPLSTRING (RFAT) \CORE.DELETEFILE (EVENIFOPEN INFOBLOCK) \CORE.GETINFOBLOCK (VERS +CREATEFLG) EDITAPPLYTOLINK (NODELABELFN) CHAT.STARTUP (FROMMENU OPENFN PROTOCOL TEM WINDOW) +\CORE.DIRECTORYNAMEP (DIRNAME DIR) FM.EDITITEM (CLEARFLG) MAPFILES1 (INCLUDE-DIRECTORIES) BKSYSBUF ( +FLG RDTBL) XCL:UNBREAK-FUNCTION (XCL::IN-FN XCL::ORIGINAL XCL::ENTRY) \CORE.FINDPAGE (CACHE) \CHTOPC ( +TELL-PC-START?) NEGATE (X) MOVECHARBITMAP (CLIP) FB.SORTCOMMAND (REVERSED BYNAME HADNOSUBDIRS VALUE +DATETYPE NAMESTART SORT#) \MAPPNAME (FLG) \CORE.GENERATEFILES (DESIREDVERSION) UTF8.PEEKCCODEFN (BYTE4 + BYTE3 BYTE2) PROCESS.EVALV (ME) DBG::ESCAPE-FROM-DEBUGGER (DBG::SHADOW? DBG::ESCAPES) TRAPMAKE ( +UNFINISHED) FONTCOPY (NOERROR ERROR) FORK-SHELL (COMMAND) CURRENT.WORD (NEW) \FILLCIRCLE.PSC (TEXTURE +TEXTUREBM) TEDIT.BUILD.PCTB1 (TEXTOBJ OLDPC PC) FONTSAVAILABLE (FAMILY ROTATION CHECKFILESTOO?) +FONTMAPARRAY (FONTCLASSES) SEDIT::STRINGWIDTH (SEDIT::PRIN-2?) \CORE.NEXTFILEFN (NAMEONLY) +LISPDIRECTORYP (vol) NAMEFIELD (SUFFIXFLG DIRFLG) \CORE.GETFILEINFO.FROM.INFOBLOCK (INFOBLOCK) +GC-FILING-DIRECTORY (DIRNAME CANDIDATES CONFIRM?) \SMASHABLESTRING (FATP) \CORE.GETFILEHANDLE ( +INFOBLOCK) TEDIT.SELECT.LINE.SCANNER (LINE WORDSELFLG) SPP.OPENP (STREAM) \RPLCHARCODE (FATPA0360) +SHAPEW (NEWREGION) \BLTSHADE.PSC (CLIPPINGREGION RGN TEXTURE TEXTUREBM) NTHCHAR (CODE) COMPARE ( +SOURCE1 SOURCE2) GO.TO.RELATIVE (COL ROW) \TFBRAVO.READ.USER.CM (LINE) GNC (CODE) +DBG::INVOKE-ESCAPE-FROM-MENU (DBG::MENU) RECEVAL (FORM) CL::%%DO-TRANSLATE (CL::SUBSEQUENT-VALUES +CL::SEQUENTIALP) \PFFindRootDirEntry (entryNum) LISPX/1 (X TAILFLG TEM3) \PRINTFPTOVP (TYPEFLG +NEXTTYPE FIRSTFP VPRAWFLG LOCKEDP TYPE) STREQUAL (FATPX FATPY) TTDOTABS (TABS) CLISPIFY (EDITCHAIN +CLISPIFYFN FORM) FB.PROMPTFORINPUT (DONTCLEAR RESULT ABORTFLG) DWIMIFY (L QUIETFLG) TEDIT (TEXT WINDOW + TEDITCREATEDWINDOW DONTSPAWN) MSADDANALYZE (oldDef FILETYPE oldEntry) L-CASE (FLG FATP CHANGEFLG) +GATHEREXPORTS (ENV) SI::ARGUMENT-ERROR (SI::MAX-ARGS) \MAKEWRITABLESTRING (NEWFATP) +\NSFILING.COPY/RENAME (OLDPARSE COPYFLG NEWPARSE VERSION SAME-DIR-P DEST-UNIQUE-P OLDHANDLE) +SPPOUTPUTSTREAM (CON) RECORD (NAM) TEDIT.PUT (FILE FORCENEW OFILE PUTFN UNFORMATTED? OLDFORMAT? CACHE +PC CH#S MENUSTREAM) LOADFNS (LISPXHIST FILE FILEMAP BUILDMAPFLG) EDITBM (ORIGBM BMSPEC) SETTOPVAL (VAL +) POSTEDITALISTS (FOUNDCHANGE) \LOCKWORDS (NWORDS) \NSRANDOM.CLOSEFILE (SESSION) \CORE.GETFILENAME ( +VERS) FONTPROFILE (NAME BASICCLASSES) \ROUTINGTABLE.INFOHOOK (WINDOW TEDITP) SPELLFILE (FIELDS DEVICE +DIRECTORY HOST NSFLG RELATIVEDIRECTORY SUBDIRECTORY VERSION DIRLST NOPRINTFLG) ALLOCHASH (SIZE FLAG +HASHTABLENAME) COMPILER::CHECK-GLOBAL-CONSTANT (COMPILER::LOOKUP) \CREATE-REAL-CHARSET.DISPLAY ( +CHARSET NOSLUG?) \CORE.NAMESCAN (CREATEFLG) LAYOUTSEXPR (TREE) CONSTANTEXPRESSIONP (FORM VALUE MAC) +FORMAT-DO-ITERATION (ATSIGN) \PUTBASESTRING (FATP) \CORE.UNPACKFILENAME (DOT) INSERTLINE (USECR) +CHAT.RECONNECT (STATE) \PUTBASESTRINGFAT (FATP) GENSYM (PREFIX NUMSUFFIX OSTRBUFFER CHARCODE) +\TEDIT.DIFFUSE.PARALOOKS (PRIORPC PC SUCCEEDINGPC) FM.SHADE (REGION) BLTPATTERN.GENERIC (SW SH) +\IFSERRORSTRING (FILENAME CONNECTION ERR-MSG-STREAM) COURIER.WRITE (ITEM) SEDIT::CFV-CLISP (SEDIT::IWIDTH +) GetBcplString (ATOMFLG) COMPILE1A (COREFLG) \CORE.OPENFILE (OLDSTREAM) PROPS.WHENCHANGED (PROPTYPE) +CLISPATOM1 (L TYP LST0 BRACKET OPRFLAG BROADSCOPE TAIL Y NOTFLG BACKUPFLG TENTATIVE) +POSTSCRIPT.HARDCOPYW (REGION) \IRM.WILD.REF (MATCHES CHOICE) EVENTS-INPUT (TAIL) DBG::PRINT-BACKTRACE +(DBG::TEST DBG::PRINT-VARIABLES DBG::PRINT-JUNK) \TEDIT.TEXTBIN.FILESETUP (FATP) TEDIT.PUT.PCTB2 ( +PARALOOKSSEEN FORMATTINGLEVEL PC FONTFILE PREVPC EDITSTENTATIVE PREVFATP CACHE TRUEFILE UNFORMATTED? +SEPARATEFORMAT) CHAT.PROMPT.FOR.INPUT (WINDOW) \DOHARDRETURN1 (NAMETABLE-ON-STACK) COMP.STTAG (NLV NF) + GETSETQ (TL VARSPLST OKFNS) \MKATOM (FATP NONNUMERICP FATCHARSEENP) SHOWGRAPH (GRAPH ALLOWEDITFLG) +\CREATE.SYMBOL (FATCHARSEENP FATP) \GCSCANSTACK (NTEND) BKSYSBUF.GENERAL (OBJECT) \SCALEDBITBLT.PSC ( +DESTINATIONLEFT DESTINATIONBOTTOM WIDTH HEIGHT DESTREGION CLIPPINGREGION) \PARSE.NUMBER (RDTBL RADIX +COMMONLISP START SEENBOGUSDIGITS SIGDIGITS ENDFRAC EXPSTART FATP SIGN SEENALPHADIGITS COMMONLISPY +MAXALPHADIGIT DECPT) SEDIT::REDO (SEDIT::UNDO-UNDO-LIST) CL:COMPILE (COMPILER::NAME) +COMPILER::CLOSURE-ANNOTATE-LABELS (COMPILER::IN-LOOP-P) FORMAT-CONDITION (COLON ATSIGN) +SEDIT::TRANSLATE-CHARS (SEDIT::UPCASE?) \CORE.SETFILEINFO (INFOBLOCK) PURGEDSKDIRECTORY ( +dontDeleteFiles) PTON10GRID (MOVINGPT) SCANEXP (EXP EVALFLG) SCANDECLARECOLON (DONTCOPIES EVALFLG) +\COPYDATATYPE (PTRS) COMP.STJUMP (TAG F NV V) DO?CMD (SPTAIL) \CORE.GETNEXTBUFFER (NOERRORFLG) +BQUOTIFY (BQCAR TL FORM) SIMPLETEXTEDIT (FILE INSTREAM) INSPECT/AS/BLOCKRECORD (CHOICES) \MOVEFRAME ( +AT-EOS NAMETABLE-ON-STACK) SPELLFILE1 (VERS#1) WINDOWWORLD (ONOFF MAINFLG) \ALLOCBLOCK (INITONPAGE +ALIGN) CONDITIONS:INVOKE-RESTART-INTERACTIVELY (CONDITIONS::R CONDITIONS::I-FN) \NSFILING.NEXTFILE ( +IGNOREDIRS FILTER NAMEONLY) TEDIT.GET.CHARLOOKS0 (NAME) SEDIT::CONTAINS? (SEDIT::START-1 SEDIT::END-1 +SEDIT::START-2 SEDIT::END-2) COMPILER::NULL-EFFECTS-INTERSECTION-EXCEPT-CONS (COMPILER::EFFECTS-1 +COMPILER::EFFECTS-2) SEDIT::LINEARIZE-CLISP (SEDIT::INDEX SEDIT::OK SEDIT::COULD-INLINE? SEDIT::IF?) +\FONTINFOFROMFILENAME (CH DEVICE) \CREATECOREDEVICE (NODIRFLG) MBUTTON.FIND.NEXT.BUTTON (PC OBJ) ERROR + (NOBREAK) \FONTFILENAME (CHARSET) CONDITIONS:INVOKE-RESTART (CONDITIONS::R) \AGE.ROUTING.TABLE (TAIL +PURGED) COMPILER::RESOLVE-VARIABLE-REFERENCE (COMPILER::SETQ-P) MAPATOMS (FREE) NewPrinter (MEMBER? +NEW-DEFAULT?) \RELEASE.IOCB (IOCB) COMPILER::CLOSURE-ANNOTATE-LAMBDA (COMPILER::NEW-FRAME-P +COMPILER::IN-LOOP-P) SPELLFILE.SPELL (VERSION EXTENSION) SCANDEFINEQ (CONTINUEFLG) +\NSFILING.SETFILEINFO (ATTR/VAL) ATOMHASH#PROBES (FATP DESIREDATOM# FATCHARSEENP) BLTPATTERN (SW SH +OPER TEMPBM) ONEDINSPECTW.CREATE (REGION) FINDFILE (DIRLST) LISPFORM.SIMPLIFY (EVALFLG CE) +MAXATTACHEDWINDOWEXTENT (ATWS EXTENT) CLISPTRAN (TRAN) \HANDLE.RAW.PUP (NDB) \FONTFACE.COLOR (POS +NOERRORFLG) UNDOSET (PTR) DO-HISTORY-SEARCH (PRED-P PAT1 VALUE-P) GETNODEFROMID (NODEHASHTABLE) +INSTALLBRUSH (OLDENTRY BRUSHARRAY BRUSHFN) SPELLFILE.MATCHINGDIRS (HOST) \COURIER.RESULTS (RESULTTYPES + EXPEDITEDFLG) COMPILER::NULL-EFFECTS-INTERSECTION (COMPILER::EFFECTS-1 COMPILER::EFFECTS-2) +MINATTACHEDWINDOWEXTENT (ATWS) FMAPRINT (LEFT LST RIGHT) NO.SIDEEFFECTS.FNP (X) POSTEDITPROPS ( +FOUNDCHANGE) \FIND.LOCALPUPHOSTNUMBER (QUIET) \SFLHASHLOOKUP (INSERT) ED (CL::NAME CL::GIVEN-TYPES +CL::FROM-DISPLAY CL::POSSIBLE-TYPES) FIXSPELL1 (FROMDWIM MESSFLG FLG BUFS LISPXHIST) +\NSFILING.GETFILEINFO (LEN) BREAKLINE (STAY) PUTD (DEF FLG) SCALEBM (TEMPBM) CREATE-PROCESS-STREAM ( +CHAN) \CANONICAL.NSHOSTNAME (INFO) FM.RESETGROUPS (REDISPLAYFLG) FIXDATUM (TEM) SI::NON-LOCAL-GO ( +TARGET) SI::UNWIND-TO-BLIP (THROWP PC) \NODIRCOREFDEV (READPFN) GRAPHEROBJ (LEFTBUTTONFN +MIDDLEBUTTONFN COPYBUTTONEVENTFN) EVALUABLE.CONSTANTP (X VALS) BLOCKCOMPILE (BLKFNS ENTRIES FLG) +SETTTBLPROP (NEWVALUE) CLOSEALL (ALLFLG) \VARNOTUSED (SETQONLY?) \DSPSCALE2.PSC (X-SCALE) +ARGS.COMMUTABLEP (X) PFI.AFTER.NEW.PAGE (LEFT RIGHT) \POLYSHADE.BLT (currlist fulllist) TEDIT.HARDCOPY + (SERVER) \STKMIN (CODEISBLOCK PRINT) SI::NON-LOCAL-RETURN-VALUES (VALUES) CALLS3 (FLG) CL:FORMAT ( +CL::DESTINATION) \FINDOP (FLG) \LFFindDirectoryVol (VOL) FM.RESETSHAPE (ALWAYSFLG) \FONTFILENAME.NEW ( +CHARSET) OPENP (FILE) ROMANNUMERALS (UCFLG) SPY.BUTTON (POS) TWODINSPECTW.CREATE (REGION) +\MEDW.GETSCREENREGION (INITCORNERS INITREGION NOTTIMEDOUT DOWNFLG) \DSPCOLOR.PSC (COLOR) WHENCLOSE (FN +) CHECKRECORDNAME (OKSTRUCDIFF NEEDSNAME 3MUSTLISTP) ARRAY (INITVAL) MKCONS (CDRPART) +AS.MAKE.CONVERSATION (KEEPSTREAM) ERRORMESS (U) COPY.WINDOW.TO.BITMAP (SOFTCURSORUP SI::*OR-GENTEMP*) +TEDITWINDOWP (CHECKED-WINDOW) SI::INTERNAL-THROW-VALUES (VALUES) ASKUSERCHAR (C2) \MEDW.CARET.SHOW ( +UNLESSOCCLUDED) COMPILER::EFFECTLESS-EXCEPT-CONS (COMPILER::EFFECTS) MAKEUSERMACROSCOMS (X) +SETF-SYMBOL-FUNCTION (CL::DEFINITION) \READACFONTFILE (PAD.LEFT DONT.PAD.RIGHT STARTWORD) PFCOPYBYTES +(END) MSDESCRIBE1 (LST) FASL::ADD-OP-TRANSLATION (FASL::PAIR) MOVETOFILE (FROMFILE) ASSURE.PUP.READY ( +NDB PROC MYHOST#) MB.MARGINBAR.SELFN (TAB) \NSRANDOM.WRITEPAGES (ERROR) SHOW.CLEARINGHOUSE ( +ENTIRE.CLEARINGHOUSE? DONT.GRAPH) LOOKUPHASHFILE (KEY2 RETFLG KEYVAL) MBUTTON.FIND.BUTTON (PC OBJ) +FB.CANONICALIZE.PATTERN (CANONICAL) PF (FN) LISTRECORDEFS (FORMAT) CL:REMOVE (END COUNT) +NUTF8STRINGBYTES (RAWFLG) \DELETEPIECE (NEXT PREV) BRHC/LAYOUT/DAUGHTERS (TTC) TB.COLLECT.ITEMS ( +PREDFN) ASKUSER1 (TEM) SCROLL.HANDLER (TIMEIN BUTTON CONTINUOUSSCROLL?) UNDOLISPX3 (L) PROCESSPROP ( +NEWVALUE OLDDATA) CH.GETAUTHENTICATOR (NONTRIVIAL INFO) SEDIT::SET-POINT-STRING (SEDIT::INDEX) +FM.CHANGESTATE (NEWSTATE OLDSTATE) OPT.CHECKTAG (TAGFLAG) \NSRANDOM.SESSION.WATCHER (WRITING? TIMEOUT +REALTIMER) ERASE/GRAPHNODE (TRANS) CL:FIND (END) COMPILER::NULL-INTERSECTION (COMPILER::LIST-1 +COMPILER::LIST-2) \BASEBYTES.PEEKBIN (NOERRORFLG) \NSRANDOM.TRUNCATEFILE (LP ERROR) CH.FINDSERVER ( +DONTPROBEFLG NOERRORFLG) WRITESTRIKEFONTFILE (CHARSET CSINFO) FW-ADJUST-PLACEMENT (OFDLIST) ASKUSER$ ( +KEY0 NC0 TEM) RECORDECLTAIL (NAME TL RUNTIMEDECL) DWIMIFYREC (DWIMTAIL INDECL) INTERPRET.REM.CM ( +RETFLG COM) UTF8.OUTCHARFN (RAW X) \ITEMW.SELECTITEM (ITEM) \SETUPSTACK1 (INITFLG ARGSLENGTH ARGS) +SEDIT::SET-LIST-FORMAT (CL:FORMAT) \DSPTOPMARGIN.PSC (YPOSITION) \MEDW.GETBOXSCREENPOSITION (PROMPTMSG + MOUSEDOWNFLG WINDOW) FASL::COLLECT-LIST (FASL::DOTTED) ICMLARRAY.VALUECOMMANDFN (VALUE) SEDIT::MUTATE + (SEDIT::NODE SEDIT::MUTATOR) \RESETSTACK0 (RPROC) COMPERRM (FL X) FASL::CONVERT-FASL-DATE (CFLG) +\TEDIT.GET.CHARLOOKS1 (NAME) CARET (NEWCARET) OPENSTRINGSTREAM (FATP) COMPILER::EFFECTLESS (COMPILER::EFFECTS +) TTYINEDIT (PRINTFN WINDOW) FB.SELECTEDFILES (NOERRORFLG) SCANFILE1 (LST DEFUNFLG) \UPCASEBASE (FATP) + COURIER.CALL (STREAM) EVALQT (LISPXID) PFI.MAKE.LPT.STREAM (PRINTER) RECORDECL1 (CL TAIL) +STRING.EQUAL (FATPX FATPY) BRHC/LAYOUT (DS) GetImageFile (PRINTFILETYPE) FM.GETITEM (GROUP) +INSPECTW.SELECTITEM (PREVIOUS PROPERTY VALUEFLG) \TEXTMENU.START (MAINWINDOW) SEDIT::SET-POINT-LITATOM + (SEDIT::INDEX SEDIT::OFFSET) SCANFILE0 (NXT) CREATEDSKDIRECTORY (smashDirectory) \DSPBOTTOMMARGIN.PSC + (YPOSITION) CH.LOOKUP.OBJECT (ADDRESS) \STRINGSTREAM.INIT (NOERRORFLG) TEDIT.RAW.INCLUDE (END WASOPEN + START) INTERRUPTED (INTERRUPT THISPROC W INTERRUPTED.PROC) PFI.SETUP.TRANSLATIONS (CHARPAIRS FONT) +XCL:COMPILE-FORM (COMPILER::*OUTSTANDING-LOOSE-FORMS*) \TEDIT.RESHAPEFN (LINE FIRSTCH#) BITBLT (WIDTH +HEIGHT SOFTCURSORUP) COMP.CALL (A) DBG::BACKTRACE-ITEM-SELECTED (DBG::LP) TTCOMPLETEWORD (START +CAUTIOUS FIRSTMATCH MUST.BE.UNIQUE CH RETYPEBUF ESCAPED NEEDADJUST UNIQUE FIRSTMATCHCHARS) +FASL:OPCODE-SEQUENCE (FASL::TABLE) DSPDESTINATION (DESTINATION) IRM.CREF.BUTTONEVENTFN (TYPE) +\GATHER-CLEANUP-FORMS1 (FOUND-UNWIND) DO.EDIT.COMMAND (EDITARG EDITMINUS) \MEDW.GETSCREENPOSITION ( +WINDOW) UPDATEPCNODES (UPWARD) \DISABLEGC1 (NOERROR) FB.COUNT.FILE.CHANGE (DELETEDP SIZE) RECORDERROR +(IN AT CDRFLG) \GC.MODIFY.BIGREFCNT (TMP) \MAKE.PROCESS0 (TtyDisplayStream SI::*RESETFORMS* EVENT) +TMPSUBFN (N) CHAT.TYPESCRIPT1 (FILE) \GCERROR (FLG REASON) PRINTERSTATUS (STATUSFN) \BITBLT.BITMAP ( +CLIPPINGREGION WIDTH HEIGHT TEXTURE SOURCETYPE) COMPILER::CLOSURE-ANNOTATE-BLOCK (COMPILER::IN-LOOP-P) + TEDIT.UNPARSE.PAGEFORMAT (OLDRIGHT SCALEFACTOR PX PY LEFT RIGHT TOP BOTTOM COLWIDTH INTERCOL) +\BACKFORMAT (LINE1) \BLTSHADE.BITMAP (CLIPPINGREGION WIDTH HEIGHT DESTINATIONNBITS TEXTURE) +\SEARCHOPENFILES (ACCESS) \FORMATLINE (PC HARDCOPYMODE 1STLN GATHERBLANK NEWASCENT TABPENDING +PREVDHYPH PREVHYPH T1SPACE FORCEEND) CHAT.TYPEOUT (TERM.STATE CRPENDING) \HARDRESET-CLEANUP ( +LINEARBINDINGS OLDVAL) SEDIT::SELECT-SEGMENT-DEFAULT (SEDIT::SUBNODE SEDIT::INDEX) \HARDRESET-CLEANUP1 + (INFO ERRORS-SEEN) HVBAKREAD (BKRF) TEDIT.FORMATBOX (LINE LAST-CHNO CHNO) FILECOMS (FILE X) +XCL:UNADVISE-FUNCTION (XCL::IN-FN XCL::ORIGINAL XCL::MIDDLE-MAN) GETBLOCKDEC (FNSONLY) /LISPXPUT (LST +ADDFLG) FB.UPDATEBROWSERITEMS (INDEX CONDITION LASTFILEDATA WIDENED) \INSURESCREEN (SCREEN) +\GC.LOOKUP.BIGREFCNT (TMP) /RADIX (N) \GCMAPSCAN (PREV) XCL:ADVISE-FUNCTION (XCL::FORM XCL::IN-FN) +PFI.LINES.REMAINING (BOTTOM) START.CLEARINGHOUSE (RESTARTFLG) IDLE.SHOW.OPTION (STRING SEPR) +IMPORTEVAL (RETURNFLG) GRAPHOBJ.BUTTONEVENTINFN (LEFT MIDDLE) STACK.FULL.WARNING (FLG) RENAMEFILE ( +OLDFILE NEWFILE) COMPILER::CLOSURE-ANNOTATE (COMPILER::NODE) \DISPLAYLINE (HARDCOPYMODE TERMSA) +ICONTITLE (TITLESPEC REG FONT JUST) XCL:REBREAK-FUNCTION (XCL::IN-FN XCL::INFO) LOADFNS-MAKELIST (LST +FNSFLG) SEDIT::SCAN-STRING (SEDIT::STRING? SEDIT::IN-MULTI-ESC SEDIT::POINT?) XCL:TRACE-FUNCTION ( +XCL::IN-FN) SEDIT::MENU-PRINTBASE-SELECTEDFN (SEDIT::PRINT-BASE) \ALLOCMINIMUMSIZES (ATWSINFO) +\SET.FINALIZATION.FUNCTION (TYPENO) XCL:CREATE-TRACE-WINDOW (XCL::OPEN?) \COPYSYS (UNIXVAR VAL) NIL +TESTFREE OPT.DELCOPYFN (Z) CLUNARYMINUS? (TYP CLISPHELPFLG) \PFEnsureInitialized (\PFInitialized) +\GETFTPCONNECTION (*FTP-IGNORE-SERVER-FULL* FTPDEBUGFLG) CHAT.CHOOSE.EMULATOR (CHAT.EMULATORTYPE) +DUMPDATABASE1 (DUMPEDFLG) \TEDIT.COMMAND.LOOP (TEDIT.SELPENDING TEDIT.COPY.PENDING +TEDIT.COPYLOOKS.PENDING TEDIT.MOVE.PENDING TEDIT.DEL.PENDING) \TRANSMIT.STRATEGY ( +\BSP.OVERLAP.DATA.WITH.ACK) TTBIN (\CARET.UP) \COURIER.ATTENTIONFN (NSWIZARDFLG) OPT.RETPOP (XVARFLG) +TTWAITFORINPUT (\WINDOWWORLD) FLIPCURSOR (\SOFTCURSORP \CURRENTCURSOR) ONFILE (MSHASHFILE) LOADCOMP ( +RESETSTATE) CLISPRECORD (LCASEFLG) INFILECOMSPROP (NAME) /CONTROL (LISPXHIST) TTDELETELINE ( +DISPLAYTERMFLG) CHAT.CLOSE (\CARET.UP CLOSECHATWINDOWFLG) RECREDECLARE (RECORDCHANGEFN CLISPARRAY) +CLISPRPLNODE (LISPXHIST) HASH-TABLE-FOR-DOC-TYPE (FILEPKGFLG) PFI.PROCESS.FILE (*PFI-PENDING-COMMENTS* +) COMP.LINKCALLP (BLKFLG) MSPRGLAMBDA (INCLISP EACHTIME DWIMFLG) UNIX-USERNAME ( +\UNIXSTRING.GLOBALRESOURCE) \LOGIN.READ (DEFAULTREGISTRY) GETCHATWINDOW (CHATWINDOWLST) +\HANDLE.RAW.OTHER (XIPTRACEFLG) \LEAF.TIMEDOUT (PUPTRACEFLG) LOADFROM (DWIMFLG) TTYDISPLAYSTREAM ( +\TERM.OFD \CARET.UP) \ADJUST.USERNAME (DEFAULTREGISTRY CH.DEFAULT.DOMAIN CH.DEFAULT.ORGANIZATION) +HISTORYFIND (DWIMFLG) COMP.ATTEMPT.COMPILE (BLKFLG) CHARACTER (\\PNAMESTRING.GLOBALRESOURCE) +CLBINARYMINUS? (TYPE-IN? CLISPHELPFLG) WHO-LINE-HOST-NAME (*WHO-LINE-HOST-NAME*) RECLAIMMIN ( +\GCDISABLED) CL:MACHINE-INSTANCE (\PUP.READY) TTYIN.FINISH (\PROMPTFORWORD HELP \NOVALUE \REPEAT +\READING \FILLINGBUFFER \STRINGVALUE \COMMAND SPLST \FIX TTYINUSERFN) TTYIN (TTYINERRORSETFLG CTRLUFLG + TTYINMAILFLG) \IMAGEIOINIT (\#DISPLAYLINES) LOOKUP.NS.SERVER (*ASSUME-ZERO-NSSOCKETS*) PRINTPUP ( +PUPONLYTYPES PUPIGNORETYPES) TTYINREAD (TTYINDEBUGFLG \INSIDE.TTYIN) \MEDW.BLTCHAR (\SOFTCURSORP +\SOFTCURSORUPP) \NSADDRESS.DEFPRINT (\THISFILELINELENGTH) DEFC (DFNFLG) GETHOSTINFO (\IPFLG +DEFAULT.OSTYPE) CLISPFUNCTION? (DWIMIFYFLG NOSPELLFLG TYPE-IN? CLISPHELPFLG) UNIX-FULLNAME ( +\UNIXSTRING.GLOBALRESOURCE) TTYIN.SETUP (\READING) XCL::PPRINT-DEFINER (FORMFLG) ESUBST (LISPXHIST) +TTYIN1 (\PROMPT1 \FIRSTTIME UNREADBUF \TTSCRATCHFILE.GLOBALRESOURCE \FILLINGBUFFER \PFW.FIRSTTIME +\DONTCOMPLETE SHOWPARENFLG SPLST TTYINCOMPLETEFLG \LISPXREADING \REPEAT \READING \PROMPT2 \COMMAND +TTYINMAILFLG \RAISEINPUT) UNIX-GETENV (\UNIXSTRING.GLOBALRESOURCE) \FTP.PRINTPLIST (FTPDEBUGFLG) +CLISPATOM (ONLYSPELLFLG CLISPCHANGES TYPE-IN? NOSPELLFLG) MSPARSE (NOSPELLFLG) U-CASE ( +\\PNAMESTRING.GLOBALRESOURCE) \LEAF.DEVICEP (\FTPAVAILABLE) \GETMISCSOCKET (\MISC.SOCKET) MKSTRING ( +PRXFLG) CL:POSITION (TEST-P TEST-NOT-P FROM-END-P KEY-P) USERLISPXPRINT (LISPXPRINTFLG LISPXHIST) +XCL::RELIST* (XCL::*WALK-COPY*) IDLE.SET.OPTION (CH.DEFAULT.DOMAIN DEFAULTREGISTRY) CL:MAKE-STRING ( +INITIAL-ELEMENT-P) MOVD (FILEPKGFLG) UNIX-GETPARM (\UNIXSTRING.GLOBALRESOURCE) BITMAPBIT (\SOFTCURSORP + \SOFTCURSORUPP) FIXCONTINUE (CLISPARRAY) FLIPCURSORBAR (\SOFTCURSORP \CURRENTCURSOR) INFILECOMSVAL ( +NAME) SETINITIALS (DEFAULTREGISTRY DEFAULTINITIALS) ADJUSTLINE (\AUTOFILL) CL:MERGE (KEY-P) MOVD? ( +FILEPKGFLG) \LINEWITHBRUSH (\SOFTCURSORP \SOFTCURSORUPP) PROMPTFORWORD (\PROMPTFORWORD.CURSOR) +BREAKDOWN (BRKDWNTYPE) CL:MERGE-PATHNAMES (CL::VERSION-SPECIFIED-P) \SPPSENDERROR (XIPTRACEFLG +NSWIZARDFLG) UNSET (DWIMFLG) WRITE (*PRINT-CIRCLE-HASHTABLE*) \MAYBEPEEKPUP (\PEEKPUPNUMBER +PUPTRACEFLG) CHANGENAME (FILEPKGFLG) PROVIDE.PROMPTING.WINDOW (\PROC.READY \WINDOWWORLD) +FW-CREATE-OFD-LIST (FW-OFDList FW-SortFn) \SETXIPCHECKSUM (\NS.CHECKSUMFLG) \CHANGE.ETHER.TRACING ( +\RAWTRACING) PUTSEQUIN (LEAFDEBUGFLG) MAPDL (SPAGHETTIFLG) \CCLOSURE.DEFPRINT (\THISFILELINELENGTH) +WTFIX1 (DWIMFLG DWIMIFYFLG FAULTAPPLYFLG CLISPFLG LCASEFLG FILEPKGFLG CLISPARRAY NOFIXFNSLST0) +SPY.TREE (SPY.TREE) HELPSYS (IRM.HOST&DIR) PFI.PRINT.INDEX (*PFI-TWO-SIDED*) SUPERPRINT/COMMENT ( +**COMMENT**FLG FILEFLG MAKEMAP *PRINT-SEMICOLON-COMMENTS*) CL:MISMATCH (TEST-P TEST-NOT-P KEY-P) +CLISPERROR (DWIMESSGAG TYPE-IN?) \FTP.PACKFILENAME (*UPPER-CASE-FILE-NAMES*) \CH.UPDATE.CACHE ( +CLEARINGHOUSE.STRUCTURE.WINDOW) /REMPROP (LISPXHIST) FNCHECK (DWIMFLG ADDSPELLFLG) CL:NSUBSTITUTE-IF ( +FROM-END-P KEY-P) UNADVISE (ADVISEDFNS) \SLOWBLTCHAR (\SOFTCURSORP \SOFTCURSORUPP) CL:NSUBSTITUTE-IF-NOT + (FROM-END-P KEY-P) \DSPPRINTCR/LF (\CARET.UP \SOFTCURSORP \SOFTCURSORUPP) SEPRCASE (*PACKAGE*) +EMBEDPROG (BINDINGS) STOPSCAN? (BROADSCOPE) FW-OFD-EXISTS? (FW-ReInit?) CLISPIF0 (CLISPIFTRANFLG) +\CANONICALIZE.PUP.HOSTNAME (\HOSTNAMES) DWIMIFYFNS (DWIMFLG) PACK* (*PACKAGE* +\\PNAMESTRING.GLOBALRESOURCE) FIXSPELL (NOSPELLFLG TYPE-IN? FIXSPELL.UPPERCASE.QUIET) SEARCHPDL ( +SPAGHETTIFLG) CLRPLNODE (NOSAVEFLG) \LOAD-STREAM (FILEPKGFLG) PFI.ENQUEUE (\PFI.PROCESS) RAIDCOMMAND ( +FRAME#) WORDSPERNAMEENTRY (CROSSCOMPILING) TB.USERDATA (NEWP) CLISPATOM0 (SUBPARENT DWIMIFYFLG) +DISPLAYAFTERENTRY (\DisplayStoppedForLogout) COMPSETREAD (DWIMFLG READBUF REREADFLG LISPXHISTORY) +FW-LOOP (FW-Running? FW-Dormant? FW-Reset? FW-ReInit?) READNUMBERINBASE (*READ-SUPPRESS*) +SI::EXPAND-CONDITION-CASE (*BYTECOMPILER-IS-EXPANDING*) LISPXUSEC (EDITQUIETFLG) \TELERAIDENTRY ( +\PUP.READY) CL:NSUBSTITUTE (TEST-P TEST-NOT-P FROM-END-P KEY-P) CLISPIFYLOOKUP (DECLST) +CONDITIONS::EXPAND-RESTART-CASE (*BYTECOMPILER-IS-EXPANDING*) DWIMLOADFNS? (FAULTAPPLYFLG +DWIMLOADFNSFLG DWIMIFYFLG DWIMIFYING TYPE-IN?) SI::EXPAND-PROCEED-CASE (*BYTECOMPILER-IS-EXPANDING*) +FIXATOM (TAIL DWIMUSERFORMS NOSPELLFLG TYPE-IN? VARS DWIMIFYFLG NOFIXVARSLST0 CLISPFLG CLISPCHANGES +CLISPERTYPE NEWTAIL) FNS.PUTDEF (DFNFLG ADDSPELLFLG FILEPKGFLG) INFILECOM (ONFILETYPE ORIGFLG) +CHARACTER.READ (*READ-SUPPRESS*) BITMAPCREATE (WINDFLG) CL:POSITION-IF-NOT (FROM-END-P KEY-P) +PFI.PRINT.MULTI.INDEX (*PFI-TWO-SIDED*) MSHASHLIST1 (OTHERSET) CHAT (CHAT.HOSTMENU DEFAULTCHATHOST) +FIXATOM1 (TYPE-IN?) FIXEDITDATE (INITIALS) FAX.SEND.FILE (FAX.NO.WATCHER) FTPGETMARK (FTPDEBUGFLG) +SI::MONITOR-UNWIND (SI::*RESETFORMS*) CLOSENSOCKET (\NSOCKETS) CL:POSITION-IF (FROM-END-P KEY-P) +DELDEF (MSDATABASELST) \DONEWEPHEMERALPAGE (\NEWVMEMPAGEADDED) COURIER.EXECUTE.CALL (COURIERTRACEFLG) +XCL::RECONS (XCL::*WALK-COPY*) \NSFILING.OPENFILE (DEFAULTFILETYPE) LOAD (DWIMFLG PRETTYHEADER) +\GET.IOCB (\IOCBFREELIST) EDITP (DWIMFLG) DEFAULT.BACKGROUND.COPYFN (BackgroundCopyMenuCommands) +TEDITCHAT.MENUFN (\CARET.UP) EDIT4F (UPFINDFLG) \MAYBEPEEKNS (\PEEKNSNUMBER XIPTRACEFLG) +\SPP.RELEASE.ACKED.PACKETS (XIPTRACEFLG) NSDISPLAYSIZE (*SMALLSCREEN*) RAIDSHOWFRAME (ALINKS?) +CLISPFORVARS (CLISPFLG I.S.TYPE I.V.) MSPRGRECORD (EACHTIME) SETTAIL? (\DELETING \LASTAIL) +TTYIN.SCRATCHFILE (TTYINEDIT.SCRATCH) CLMAPS2 (LCASEFLG) \PROMPTFORWORDERASE (TTYD) \HCPYMODEBLTCHAR ( +\SOFTCURSORP \SOFTCURSORUPP) DOBACKGROUNDCOM (BackgroundMenu BackgroundMenuCommands) FNTYP1 ( +CLISPARRAY) MSSETREP (S SETDET SETTYPE) \PROMPTFORWORDBIN (BELLBEENHEARD?) \DSPMOVELR (\CARET.UP) +REBREAK (XCL::*UNBROKEN-FNS*) PUTFILEMAP (BUILDMAPFLG) SHRIEKER (WORKFLAG) DO-DISPATCH-MACRO ( +*READ-SUPPRESS*) \FTP.HANDLE.NO (FTPDEBUGFLG) \PROMPTFORWORDBS (TTYD RUBBING?) CL:REMOVE-DUPLICATES ( +TEST-P TEST-NOT-P FROM-END-P KEY-P) /SETTOPVAL (LISPXHIST) CLISPRESPELL (NOSPELLFLG TYPE-IN?) +COURIER.EXECUTE.EXPEDITED.CALL (COURIERTRACEFLG) \CH.CHECK.CLEARINGHOUSE (CH.DEFAULT.DOMAIN +CH.DEFAULT.ORGANIZATION) /REPLACEFIELD (LISPXHIST) CL:REMOVE-IF (FROM-END-P KEY-P) EXEC-READ-LINE ( +CTRLUFLG) \10MBSENDPACKET (\RAWTRACING) UNDOSAVE (%#UNDOSAVES DWIMFLG) CL:REDUCE (INITIAL-VALUE-P) +ADDFILE (ADDSPELLFLG) \MAYBEBLOCK (\INTERRUPTABLE) \LEAF.OPENERRORHANDLER (\FTPAVAILABLE) +TTYIN.PPTOFILE (\PROMPT1) \SPP.HANDLE.ATTN (NSWIZARDFLG) STRPOSL (\\STRPOSLARRAY.GLOBALRESOURCE) +NSPRINT (NSPRINT.WATCHERFLG) \DSPPRINTCHAR (\CARET.UP) DMCHAT.HANDLE.WRAP (CHAT.AUTOCRLF) \GETKEY ( +\\KEYBOARDWAITBOX.GLOBALRESOURCE) FIXAPPLY (FILEPKGFLG TYPE-IN? CLISPFLG DWIMUSERFORMS FAULTAPPLYFLG) +CL:ROOM (CL::SP) SEDIT::SMART-TTYFN (TTYEDITFN) DSPCLEOL (\CARET.UP) PRINTXIP (XIPONLYTYPES +XIPIGNORETYPES) CLOSEPUPSOCKET (\PUPSOCKETS) PRINTCOPYRIGHT (COPYRIGHTFLG) CL:REMOVE-IF-NOT ( +FROM-END-P KEY-P) FASL:PROCESS-FILE (*LOAD-VERBOSE*) %%PRINT-CONDITION (*PRINT-ESCAPE*) MOVEBOX ( +\SOFTCURSORP) DRAWGRAYBOX (\SOFTCURSORP) CLISPFORERR (DWIMESSGAG) TTECHO.TO.FILE (\PROMPT1 +\PROMPTFORWORD) \COURIER.HANDLE.ERROR (NSWIZARDFLG) ENUM-STRING (\\NUMSTR.GLOBALRESOURCE +\\NUMSTR1.GLOBALRESOURCE) \GETSYSBUF (\LONGSYSBUF) PRETTYDEF (BUILDMAPFLG) \GETMAPBUFFER ( +MAPEMPTYBUFFERLIST) PROMPTCHAR (READBUF PROMPT#FLG PROMPTCHARFORMS) \LEAF.OPENFILE (\FTPAVAILABLE +UNIXFTPFLG) %%PRINT-ARRAY-CONTENTS (*PRINT-LENGTH* *PRINT-LEVEL*) HASH-LEFTPAREN (*READ-SUPPRESS* +\INBQUOTE) WAIT.FOR.TTY (\WINDOWWORLD) FIX89TYPEIN (FAULTARGS) SETTEMPLATE (LISPXHIST) +%%DEFPRINT-ARRAY (*PRINT-ARRAY* *PRINT-LEVEL*) SEDIT::TRACK-SELECT (SEDIT::PENDING-SHIFT) +CHANGECALLERS (MSDATABASELST) LISPXTERPRI (LISPXPRINTFLG LISPXHIST) HPRINT1 (U) PRINTCOPYRIGHT1 ( +COPYRIGHTSRESERVED) \RECLAIMCODEBLOCK (SI::*CLOSURE-CACHE-ENABLED*) LISPXPRIN1 (LISPXPRINTFLG +LISPXHIST) CL:MEMBER (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) \FTP.WHENCLOSED (FTPDEBUGFLG) +\SLOWHCPYMODEBLTCHAR (\SOFTCURSORP \SOFTCURSORUPP) OPT.SKIPPUSH (NEWOPTFLG) \CLIPANDDRAWLINE ( +\SOFTCURSORP \SOFTCURSORUPP) %%DEFPRINT-VECTOR (*PRINT-ARRAY* *PRINT-LEVEL*) \ASSIGNDATATYPE1 ( +CROSSCOMPILING) HASH-A (*READ-SUPPRESS*) MAPAFTERCLOSE (DEFAULTMAPFILE) FILECREATED ( +LOAD-VERBOSE-STREAM) CL::PUTHASH (EXTRA-P) HARDCOPYW (DEFAULTPRINTINGHOST) \IDLER (\VMEM.INHIBIT.WRITE + \IDLE.PASSWORD.SET) \PEEKSYSBUF (\LONGSYSBUF) LISPXREADP (READBUF) HASH-B (*READ-SUPPRESS*) CL:SEARCH + (TEST-P TEST-NOT-P KEY-P) /DECLAREDATATYPE (LISPXHIST) \BLTSHADE.DISPLAY (\SOFTCURSORP \SOFTCURSORUPP +) RECORDWORD (LCASEFLG) HASH-C (*READ-SUPPRESS*) MOUSECHORDWAIT (\MOUSECHORDTICKS) LISPXPRINT ( +LISPXPRINTFLG LISPXHIST) PRINTDEF (%#RPARS FONTCHANGEFLG PRETTYFLG) CHAT.TAKE.INPUT1 (STREAM) SENDPUP +(PUPTRACEFLG) \HANDLE.RAW.10TO3 (XIPTRACEFLG) HASH-BACKSLASH (*READ-SUPPRESS*) PFI.HANDLE.EXPR ( +*PFI-PENDING-COMMENTS*) TEDIT.FORMATPAGE (*TEDIT-PAGE-BREAKS*) \TEXTINIT ( +*TEDIT-OLD-STREAM-ERROR-HANDLER*) DO.MOUSE (\CARET.UP) \BITBLT.DISPLAY (\SOFTCURSORP \SOFTCURSORUPP) +FLTSTR (\\NUMSTR.GLOBALRESOURCE \\NUMSTR1.GLOBALRESOURCE) IDLE (\IDLING) GETPUP (PUPTRACEFLG) +PRINTERDEVICE (RESETSTATE) HASH-COLON (*READ-SUPPRESS*) PRINT-EVENT-PROMPT (LISPXHISTORY) EDITDATE? ( +*REPLACE-OLD-EDIT-DATES*) MSPRGCALL (TOPVARS) \TRACKWITHBOX (BACKGROUNDCURSOREXITFN) DWMFY2 (TAIL +FORMSFLG DWIMCHECKPROGLABELSFLG NOSPELLFLG ONLYSPELLFLG TYPE-IN? CLISPFLG ONEFLG) \DRAWCIRCLE.DISPLAY +(\SOFTCURSORP \SOFTCURSORUPP \\BRUSHBBT.GLOBALRESOURCE) VMEM.PURE.STATE (\VMEM.PURE.LIMIT) CL:DELETE ( +TEST-P TEST-NOT-P FROM-END-P KEY-P) DWIMIFY1A (DWIMESSGAG DWIMIFYFLG DWIMIFYING) GREET0 (GREETDATES +FIRSTNAME) HASH-COMMA (*READ-SUPPRESS* COMPILER::*COMPILER-IS-READING*) PFI.NEW.LISTFILES1 ( +*PFI-DONT-SPAWN*) \DRAWLINE.DISPLAY (\\BRUSHBBT.GLOBALRESOURCE) \FTPERROR (FTPDEBUGFLG) HASH-DOT ( +*READ-SUPPRESS*) \FILLCIRCLE.DISPLAY (\SOFTCURSORP \SOFTCURSORUPP \\BRUSHBBT.GLOBALRESOURCE) +\HASHTABLE.DEFPRINT (\THISFILELINELENGTH) \COURIER.RECORDTRAN (LCASEFLG) MAKECREATE1 (HASHLINKS +USINGEXPR) /PUT (LISPXHIST) \TURN.ON.PROCESSES (AUTOPROCESSFLG) FILL.XPER (\SOFTCURSORP \SOFTCURSORUPP +) \REUSETO (TYPENAME) DWIMIFY2? (DWIMIFYFLG) \PROC.AFTER.WINDOWWORLD (\WINDOWWORLD) \10MBGETPACKET ( +\RAWTRACING) HASH-DOUBLEQUOTE (*READ-SUPPRESS*) MSPRGMACRO (INCLISP EACHTIME) +\NSRANDOM.RELEASE.IF.ERROR (RESETSTATE) DWMFY0 (DWIMIFYFLG FORMSFLG) HASH-MINUS (*READ-SUPPRESS*) +/RPLNODE (LISPXHIST) PRETTYCOMPRINT (LOAD-VERBOSE-STREAM) PFI.PRINT.BITMAP (*PRINT-ARRAY* +*PRINT-PRETTY-BITMAPS* *PFI-FUNNY-CHARS* *PFI-BITMAP-BASELINE*) CL::TIME-CALL (CL::TIMED-FORM-P) +FAKE-COMPILE-FILE (PEFP) PFI.HANDLE.* (*PFI-PENDING-COMMENTS*) /SETWORDCONTENTS (LISPXHIST) +COMP.LOOKUPVAR (GLOBALVARFLG) READLINE (CTRLUFLG READBUF) HASH-PLUS (*READ-SUPPRESS*) SETREADFN ( +TTYINBSFLG) RETDWIM (FIXCLK HELPCLOCK DWIMIFYFLG DWIMIFYING TYPE-IN? HISTENTRY CLISPFLG FORMSFLG +NOSPELLFLG CLISPCHANGES CLISPERTYPE) \PUPERROR (\PEEKPUPNUMBER PUPTRACEFLG) ADDFILE0 (DWIMFLG) COMPSET + (LAPFLG) HASH-O (*READ-SUPPRESS*) SUPERPRINT0 (MAKEMAP) \IFS.LOOKUPFILE (*UPPER-CASE-FILE-NAMES* +PUPTRACEFLG) DO.EDIT.PP (\READING \TTSCRATCHFILE.GLOBALRESOURCE) \CLEANUPDISKQUEUE (\DISKDEBUG) HASH-R + (*READ-SUPPRESS*) TEMPLATE (FILEPKGFLG MSDATABASELST) \HTFIND (\GCDISABLED) \TEDIT.SELECT.CHARACTER ( +WORDSELFLG) CLISPIFYRPLAC (CLISPFLG CL%:FLG) \DRAWCURVE.DISPLAY (\\BRUSHBBT.GLOBALRESOURCE) HASH-QUOTE + (*READ-SUPPRESS*) \WRITEDIRTYPAGE1 (\NEWVMEMPAGEADDED) TYPE-VARIABLE-FROM-TYPE-NAME (*PACKAGE*) +\DRAWELLIPSE.DISPLAY (\SOFTCURSORP \SOFTCURSORUPP \\BRUSHBBT.GLOBALRESOURCE) PRINTHISTORY2 (%#RPARS) +HASH-STAR (*READ-SUPPRESS*) WHO-LINE-USERNAME (*WHO-LINE-CURRENT-USER*) \LOOKUPPUPNUMBER (XIPTRACEFLG) + CLISPCAR/CDR (VAR2) HASH-S (*READ-SUPPRESS*) DASSEM.DSTOREFNDEF (SVFLG) DWMFY1 (CLISPRETRANFLG +DWIMCHECK#ARGSFLG FORMSFLG) HASH-X (*READ-SUPPRESS*) SUBPRINT (MAKEMAP CLISPFLG CLISPIFYPACKFLG) +\DOVMEMFULLINTERRUPT (\EXTENDINGVMEMFILE) CLISPLOOKUP1 (CLISPTRANFLG) DODIRCOMMANDS (COLUMNS NAMEFLG) +/SETSEPR (LISPXHIST) REHASHFILE (REHASHGAG) \CONS.UFN (\RECLAIM.COUNTDOWN) \TRANSLATE.10TO3 ( +XIPTRACEFLG) DIRPRINTNAME (NAMEPRINTED) HASH-NUMBER-SIGN (*READ-SUPPRESS*) CL:SUBSTITUTE-IF ( +FROM-END-P KEY-P) CLOSE-AND-MAYBE-DELETE (RESETSTATE) COMP.SELECTQ (SELECTQFMEMB) CLISPIFYMAPS ( +LCASEFLG) \CHECKARRAYBLOCK (ARRAYBLOCKCHECKING) HASH-EQUAL (*READ-SUPPRESS*) DSFIT1 (TAILFLG) UNSAVED1 + (ADDSPELLFLG) CLISPFOR0 (DWIMIFYFLG LCASEFLG DWIMESSGAG) \ALLOCBLOCK.OLD (\HUNKING?) TTYINREADP ( +READBUF) PRETTYPRINT (ADDSPELLFLG SOURCEFILE SOURCEFILENV DWIMFLG LISPXHISTORY) MSPRGE (DWIMFLG +INCLISP EACHTIME MSMACROPROPS) PRETTYPRINT3 (LAMBDAFONT FONTCHANGEFLG) NEW/INSTANCE/OF/GRAPHNODE ( +BOX.LEAVES.FLG BOX.BOTH.FLG) SPY.ADD.ENTRY (SPY.POINTERS) \ALLOCHUNK (\IN.MAKEINIT) EDITLOADFNS? ( +FILEPKGFLG) SEND.FILE.TO.PRINTER (DEFAULTPRINTINGHOST) CACHEMACRO (*IN-COMPILER-LET*) CL:SUBSTITUTE ( +TEST-P TEST-NOT-P FROM-END-P KEY-P) NEWDEFC (DFNFLG) \HANDLE.RAW.XIP (\NS.READY XIPTRACEFLG +\NS.CHECKSUMFLG) CL:SUBSTITUTE-IF-NOT (FROM-END-P KEY-P) DBG::FIND-NAMED-STACK-POSITION (DWIMFLG) +\MAIKO.ALLOCBLOCK (\HUNKING? \RECLAIM.COUNTDOWN) RESTOREBUF (\LASTAIL \LAST.DELETION) WTFIX0 ( +DWIMIFYFLG DWIMIFYING) CLISPIFYCROPS (CLISPFLG CL%:FLG SEG OPR0) \CONVERT.FLOATING.NUMBER ( +\\CFNSTRING.GLOBALRESOURCE) INTERRUPTCHAR (LISPXHIST) COMPILE! (BYTECOMPFLG) \VAMBufferSave ( +\VAMbufferDirty) SHOW.MATCHING.PAREN (\CARET.UP) CLISPIFY2B (LCASEFLG CL%:FLG NOVALFLG CLISPFLG NEGFLG + OPR0 CLTYP0 CLISPIFYUSERFN) \MERGEFORWARD (\ARRAYMERGING) \MISCN.UFN (\MISCN-TABLE) INSPECT/DATATYPE +(INSPECTALLFIELDSFLG) ASSURE.ETHER.ON (\LOCALNDBS \NSFLG) \LINKBLOCK (\FREEBLOCKBUCKETS) CL:MAKE-ARRAY + (DISPLACED-TO-P INITIAL-ELEMENT-P INITIAL-CONTENTS-P DISPLACED-TO-BASE-P DISPLACED-INDEX-OFFSET-P) +/PUTD (LISPXHIST) \RPLCONS (\RECLAIM.COUNTDOWN) SKOR (ALTFLG FASTYPEFLG) \CARET.FLASH? (\CARET.UP) +\PRINDATUM.TO.STRING (*PRINT-RADIX* \\NUMSTR.GLOBALRESOURCE \\NUMSTR1.GLOBALRESOURCE *PRINT-CIRCLE*) +LISPXPRINTDEF (LISPXPRINTFLG LISPXHIST) MSNEXTWORD (LASTADVERB) FW-OPENP (FW-AllFiles?) LISPXPRIN2 ( +LISPXPRINTFLG LISPXHIST) \SPPGETERROR (XIPTRACEFLG) EDITFROMFILE (EDITLOADFNSFLG) /SETD (LISPXHIST) +PRETTYCOM (LISPXPRINTFLG DWIMFLG ORIGFLG FILEFLG FONTCHANGEFLG LAMBDAFONT) \FM.EDIT-INSERT (LIMITCHARS + SYSLIMITCHARS MAXWIDTH) \MAIKO.PUNTBLTCHAR (\SOFTCURSORP \SOFTCURSORUPP) /ADDPROP (LISPXHIST) +\VANILLAHOSTNAMEP (\PSEUDODSK) GET-ENVIRONMENT-AND-FILEMAP (USEMAPFLG) CLEARCLISPARRAY (CLISPARRAY) +PRINTFNS (NEWFILEMAP) CLISPNOTVARP (DWIMIFYFLG DWIMIFYING SHALLOWFLG) \BULK.DATA.CLOSE ( +COURIERTRACEFLG RESETSTATE) \DOINTERRUPTHERE (\INTERRUPTABLE) \CHECKFORSTORAGEFULL (\STORAGEFULL) +SAVEPUT (LISPXHIST ADDSPELLFLG) RETDWIM1 (TREATASCLISPFLG DWIMIFYFLG DWIMIFYING TYPE-IN? CLISPHELPFLG +LCASEFLG) MSPATHSPRINTFN (MARKING) CL:COMPILE-FILE (COMPILER::F-M-F-GIVEN COMPILER::P-E-F-GIVEN) +PRETTYDEF1 (NLAMALST NLAMLST LAMALST) \MAIKO.ETHER-INTERRUPT (\RAWTRACING) \MERGEBACKWARD ( +\ARRAYMERGING) /SETBRK (LISPXHIST) \LEAF.GENERATEFILES (\FTPAVAILABLE) BCOMPL3 (RESETSTATE LCFIL +LSTFIL LSTFIL1) COMPILER::COMPILE-AND-DUMP (COMPILER::*BLOCK-HASH-TABLE*) /PUTPROP (LISPXHIST) +CONTROL-T (LAST^TSWAPTIME) PRINTNUM (\\NUMSTR.GLOBALRESOURCE \\NUMSTR1.GLOBALRESOURCE) BLOCK ( +\WINDOWWORLD) SIMPLEP (CLISPARRAY) COMPILE1 (BYTECOMPFLG) \VFMDelete1 (firstFlag lastFlag) +CL::DEFAULT-STRUCTURE-PRINTER (XCL:*PRINT-STRUCTURE*) \SET.VMEM.FULL.STATE (\VMEM.FULL.STATE) +TTYIN.READ?=ARGS (\TTSCRATCHFILE.GLOBALRESOURCE) PRINTDATE (FILEPKGFLG) \DOHELPINTERRUPT1 ( +\INTERRUPTABLE) MSPATHS4 (INVERTED) TTYINPROMPTFORWORD (TTYIN.USE.EXACT.CHARS) DWIMUNSAVEDEF (TYPE-IN? +) \PRINDATUM (*PRINT-RADIX* *PRINT-ESCAPE* \\NUMSTR.GLOBALRESOURCE \\NUMSTR1.GLOBALRESOURCE PRXFLG) +PROCESS.STATUS.WINDOW (SELECTEDPROC) \NSFILING.GETFILE (*NSFILING-RANDOM-ACCESS* +*UPPER-CASE-FILE-NAMES*) COMPILE (LCFIL LAPFLG LSTFIL) TTADJUSTWORD (SPLST \NOFIXSPELL \FIX HELP) +SPY.MERGE (SPY.HASH) DASSEM.DWRITEFN (LCFIL STRF) \ARRAYBLOCKMERGER (\HUNKING?) \MAPPNAME.INTERNAL ( +\\MAPPNAMESTREAM.GLOBALRESOURCE) PACKC (\\PNAMESTRING.GLOBALRESOURCE) OUTPUT ( +MULTIPLE.STREAMS.PER.FILE.ALLOWED) \NEW.READ.SYMBOL (LITATOM-PACKAGE-CONVERSION-ENABLED) EXPRCHECK ( +DWIMFLG ADDSPELLFLG) \GETREGIONTRACKWITHBOX (BACKGROUNDCURSOREXITFN) LISPXSPACES (LISPXPRINTFLG +LISPXHIST) \CURVE2 (\SOFTCURSORP \SOFTCURSORUPP) \TRANSLATE.3TO10 (XIPTRACEFLG) DASSEM.DASSEM ( +OPTIMIZATIONSOFF IPLUSNFLG) OPENPOSTSCRIPTSTREAM (POSTSCRIPT.PREFER.LANDSCAPE) \FORWARD.XIP ( +\GATEWAYFLG \PEEKNSNUMBER XIPTRACEFLG) PACK (\\PNAMESTRING.GLOBALRESOURCE) PRINTDATE1 (BUILDMAPFLG +FILEPKGFLG) /SETA (LISPXHIST) FONTMAPARRAY (\FONTMAPCACHE) LINBUF (\LINBUF) WTFIXLOADEF (DWIMIFYFLG) +CHAT.STARTUP (CHAT.TTY.PROCESS) CL:GENSYM (CL::X-P) COURIER.OPEN (COURIERTRACEFLG) OPT.JUMPTHRU ( +NEWOPTFLG) \PRINT-USING-ADDRESS (\THISFILELINELENGTH) \MAPPNAME (PRXFLG) \PFTransferFilePage ( +\label.GLOBALRESOURCE) \NEW.MKATOM (\OneCharAtomBase) \UFSRenameFile (FileTypeConfirmFlg) /SETATOMVAL +(LISPXHIST) SETDISPLAYHEIGHT (\EM.DISPLAYHEAD) CL:SUBST (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) +CLISPATOMARE2 (DEST) CURRENT.WORD (\COMMAND) COMPILE-IN-CORE (BYTECOMPFLG) CL:NSUBST (CL::TEST-P +CL::TEST-NOT-P CL::KEY-P) GETFILEMAP (USEMAPFLG) TTY.PROCESS (\CARET.UP) \NSINIT (\3MBLOCALNDB +\GATEWAYFLG) CLISPACKUP (FUNNYATOMLST) PRINT-BITMAPS-NICELY (*PRINT-ARRAY*) CLISPIFYNOT (NEGFLG +CLISPFLG) \TEDIT.CENTER.SEL.REV (TEDIT.FNKEY.VERBOSE) PRINTDEF1 (NEWFILEMAP) GAINSPACE (SMASHPROPSLST1 +) \PSWOP.SELECTED (SELECTEDPROC) XCL::%%DEFINE-TYPE-PUTDEF (LISPXHIST) \FILINGSESSION.DEFPRINT ( +COURIERTRACEFILE) COMP.EXPR (FRAME) \PSW.SELECTED (SELECTEDPROC) CL:SUBLIS (CL::TEST-P CL::TEST-NOT-P +CL::KEY-P) COMPILE.FILE.RESET (RESETSTATE) \UFS.FULLNAME (*DSK-UPPER-CASE-FILE-NAMES*) +\SPP.CLOSE.IF.ERROR (RESETSTATE) PRETTYVAR1 (FONTCHANGEFLG PRETTYCOMFONT) SYSBUF (\SYSBUF) FIX-FORM ( +*EDIT-INPUT-WITH-TTYIN*) \ROUTINGTABLE.INFOHOOK (\10MBLOCALNDB) DINFO.SELECT.GRAPH (DINFO.GRAPHS) +DO?CMD.ERRORHANDLER (\STARTED) DWIMIFY1? (DWIMIFYFLG) LISPX/1 (CLISPARRAY) CL:NSUBLIS (CL::TEST-P +CL::TEST-NOT-P CL::KEY-P) DWIMIFY (DWIMFLG) FTPPRINTCODE (FTPDEBUGFLG) COLORDISPLAYP ( +ColorScreenBitMap) FFILEPOS (\\FFDELTA1.GLOBALRESOURCE \\FFDELTA2.GLOBALRESOURCE +\\FFPATCHAR.GLOBALRESOURCE) CLISPIFY (FILEPKGFLG) COMP.NUMBERCALL (OPTIMIZATIONSOFF) \M44ACTONVMEMFILE + (\XVmem) FW-ADJUST-REGION (FW-Justified?) L-CASE (\\PNAMESTRING.GLOBALRESOURCE) \TEXTDSPYPOSITION ( +\#DISPLAYLINES) COMPILER::GENCODE-CALL (COMPILER::*TAIL-RECURSION-POLICY* COMPILER::*SPECIAL-LOCALS-BOUND* + COMPILER::*AVAILABLE-LEXICAL-NAMES*) \NSFILING.GENERATEFILES (FILING.ENUMERATION.DEPTH) +CL::PROCESS-ACCESSORS (COMPILER::*NEW-COMPILER-IS-EXPANDING*) \RESHOWBORDER1 (\SOFTCURSORP +\SOFTCURSORUPP) LVLPRIN (PRIN2FLG) \HANDLE.RAW.3TO10 (XIPTRACEFLG) \3MBSENDPACKET (\RAWTRACING +\ETHERLIGHTNING PUPTRACEFLG XIPTRACEFLG) NECCSPEC (SFLG) LVLPRIN0 (PRIN2FLG **COMMENT**FLG) CLREMPARS +(CLREMPARSFLG) LOADFNS (FILEPKGFLG DWIMFLG) TEDIT (TEDIT.DEFAULT.WINDOW) \BSP.TIMERFN ( +\BSP.NO.INACTIVITY.TIMEOUT) POSTEDITALISTS (CLISPARRAY) \FORWARD.PUP (\PEEKPUPNUMBER \GATEWAYFLG +PUPTRACEFLG) COMP.CONST (OPTIMIZATIONSOFF) COMP.NUMERIC (OPTIMIZATIONSOFF) \#BLOCKDATACELLS (\HUNKING? +) PRINTROUTINGTABLE (\10MBLOCALNDB) \COURIER.WHENCLOSED (COURIERTRACEFLG) \CORE.PACKFILENAME ( +*UPPER-CASE-FILE-NAMES*) \FILLBUFFER (*READ-NEWLINE-SUPPRESS*) SPELLFILE (DWIMFLG) \STARTDISPLAY ( +\WINDOWWORLD \MAINSCREEN) ADDSPELL1 (LISPXHIST) CL::%%RATIO-PRINT (*PRINT-RADIX* \THISFILELINELENGTH) +\MEDW.MOVEW (\SOFTCURSORP \SOFTCURSORUPP) CL:NUNION (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) PREEDITFN ( +FILEPKGFLG CLISPARRAY) PRINTPARA1 (P2FLAG) CONSTANTEXPRESSIONP (COMPVARMACROHASH) CL:UNION (CL::TEST-P + CL::TEST-NOT-P CL::KEY-P) READVISE (SI::*UNADVISED-FNS*) SAVESET (ADDSPELLFLG LISPXHIST) +\TRANSLATE-CL%:LAMBDA (*CHECK-ARGUMENT-COUNTS*) CL:ADJOIN (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) +MSPATHS1 (TABS INVERTED SEPARATE) CL:NINTERSECTION (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) FAULTAPPLY ( +CLISPARRAY DWIMFLG) AUTOCR? (\AUTOFILL) DSPBACKUP (\CARET.UP) CL:INTERSECTION (CL::TEST-P CL::TEST-NOT-P + CL::KEY-P) CL::%%COMPLEX-PRINT (\THISFILELINELENGTH) MAKE-VECTOR (INITIAL-ELEMENT-P) /MOVD ( +ADDSPELLFLG) TTY/EDITE (ADDSPELLFLG) VIDEOCOLOR (\VideoColor) CL:SET-DIFFERENCE (CL::TEST-P +CL::TEST-NOT-P CL::KEY-P) CL:NSET-DIFFERENCE (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) COMPILE1A ( +DWIMIFYCOMPFLG FILEPKGFLG CLISPTRANFLG CLISPARRAY) \STOPSCROLL? (\WINDOWWORLD) FB.FINISH.COMMAND ( +RESETSTATE) CL:NSET-EXCLUSIVE-OR (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) SPY.BUFFER.ENTRY (SPY.POINTERS) + MARKASCHANGED (FILEPKGFLG LISPXHIST) \SETPUPCHECKSUM (\PUP.CHECKSUMFLG) CL:SET-EXCLUSIVE-OR (CL::TEST-P + CL::TEST-NOT-P CL::KEY-P) EDITF2 (RESETSTATE) SI::DISABLE-CLOSURE-CACHE (SI::*CLOSURE-CACHE-ENABLED*) + CLISPNOEVAL (DWIMINMACROSFLG) CL:SUBSETP (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) BIGNUM.DEFPRINT ( +*PRINT-RADIX* \THISFILELINELENGTH) \PACKDATE (\DayLightSavings) COMP.PUNT (MACEXP) OLD.FIND.SYMBOL ( +\OneCharAtomBase) \MKATOM (\OneCharAtomBase) CL:MAKE-SEQUENCE (INITIAL-ELEMENT-P) MSCHECKVARS1 (LF1) +MSPATHS2 (AVOIDING NOTRACE TO INVERTED) \CREATE.SYMBOL (\IN.MAKEINIT) DOWINDOWCOM (\CARET.UP) +CLISPATOM1 (89FLG CURRTAIL TYPE-IN? NOSPELLFLG DWIMIFYFLG ONEFLG CLISPCONTEXT FORMSFLG PARENT) +UNCLISPTRAN (CLISPARRAY) OPT.FRAMEMERGE (MERGEFRAMEFLG) BMOBJ.DISPLAYFN (*SMALLSCREEN* +*SMALLSCREENFACTOR*) \FTP.RENAMEFILE (FTPDEBUGFLG) \EXPECTED.FILE.TYPE (FileTypeConfirmFlg) +\MEDW.CLOSEW (\SOFTCURSORP \SOFTCURSORUPP) CL:ASSOC-IF (CL::KEY-P) \CURSOR.DEFPRINT (*PRINT-ARRAY*) +\DSPFONT.IP (*INTERPRESS-PRINTER-DSPFONT-PATCH*) PRINTSPP (PRINTSPPDATAFLG) CHECKTRAN (CLISPARRAY +CLISPTRANFLG) COMP.STJUMP (LEVEL) PFI.HANDLE.DEFDEFINER (*PFI-TYPES*) OPT.SCANOPT ( +COMPILE.DUNBIND.POP.MERGE.FLG NEWOPTFLG) \M-VMEMSAVE (\VMEM.PURE.LIMIT VMEM.COMPRESS.FLG) +\DOSTACKOVERFLOW (\NEED.HARDRESET.CLEANUP) \CORE.GETNEXTBUFFER (\INTERRUPTABLE) \GETMISCNSOCKET ( +\MISC.NSOCKET) FIXLISPX/ (TYPE-IN?) LISPXUSE1 (GENLST) CL:ASSOC-IF-NOT (CL::KEY-P) \MOVEFRAME ( +\STACKOVERFLOW) EDITH (READBUF EDITHISTORY) SPELLFILE1 (VERSION) \LEAF.READFILENAME ( +*UPPER-CASE-FILE-NAMES*) COMP.ST (LEVEL) \ALLOCBLOCK (\HUNKING? \RECLAIM.COUNTDOWN) \SETUPUSERSTACK ( +\DOFAULTINIT) MAYBE.PRETTYPRINT.BOLD (FONTCHANGEFLG PRETTYCOMFONT) DELETELINE (DISPLAYTERMFLG) +PROCESSWORLD (%#SCHEDULER# \RUNNING.PROCESS \WINDOWWORLD) SUBPRINT/ENDLINE (FORMFLG) EDITDEFAULT ( +LCFLG EDITHISTORY TYPEIN EDITUSERFN REREADFLG EDITHIST DWIMFLG) MSNEEDUNSAVE (CHECKUNSAVEFLG) +SIMPLETEXTEDIT (\TTSCRATCHFILE.GLOBALRESOURCE) CL:ADJUST-ARRAY (ELEMENT-TYPE-P FILL-POINTER-P +DISPLACED-TO-P INITIAL-ELEMENT-P INITIAL-CONTENTS-P DISPLACED-TO-BASE-P DISPLACED-INDEX-OFFSET-P) +\MKATOM.FULL (\STORAGEFULL) CL:RASSOC (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) COMPILEUSERFN1 (FILEPKGFLG +) TTYIN.SHOW.?ALTERNATIVES (?ACTIVATEFLG) \RUN.PROCESS (\PROC.RUN.NEXT.FLG) \FONTFILENAME ( +*USEOLDFONTDIRECTORIES*) SUPERPRINT (MAKEMAP FORMFLG PRETTYTRANFLG) SPELLFILEDIR (HOST) +SI::INSTALL-CLOSURE-CACHE (SI::*CLOSURE-CACHE-ENABLED*) \MEDW.OPENW (\SOFTCURSORP \SOFTCURSORUPP) +CLISPATOM2D (ENDTAIL FORMSFLG PARENT) SEDIT::SEDITE (FILEPKGFLG) CL:RASSOC-IF-NOT (CL::KEY-P) +\EXTENDSTACK (\STACKOVERFLOW) EDITRAN (TYPEIN) \3MBGETPACKET (\RAWTRACING) MSPATHS (MSCRATCHASH) +BCOMPL1A (DESTINATIONENV) CL:RASSOC-IF (CL::KEY-P) SCANDEFINEQ (DICT0 BUILDMAPFLG FNADRLST FNLST +VARLST DICT) PRETTYPRINT2 (SOURCEFILENV) CHANGEFONT (FONTCHANGEFLG) \LEAF.RENAMEFILE (\FTPAVAILABLE +UNIXFTPFLG) COMP.USERFN (COMPVARMACROHASH) CLISPFOR1 (I.S.TYPE) \AGE.ROUTING.TABLE (\RT.PURGEFLG) ED ( +*ED-OFFERS-PROPERTY-LIST*) EDITCOM (FINDFLAG) DP (*LAST-DP*) SEDIT:RESET-FORMATS (SEDIT::*FSPEC-TABLE-COPY* +) \COURIER.EXPEDITED.OVERFLOW (NSWIZARDFLG) FAULTEVAL (CLISPARRAY DWIMFLG) EDRPT (MAXLOOP) CLISPTRAN ( +CLISPARRAY %#CLISPARRAY) \HANDLE.RAW.PUP (\PUP.READY PUPTRACEFLG \PUP.CHECKSUMFLG) UNDOSET (LISPXHIST +SPAGHETTIFLG) DO-HISTORY-SEARCH (*EVENTS*) \GENERIC-UNREGISTER-STREAM (*ISSUE-CLOSE-WARNINGS*) +OPT.POSTOPT (OPTIMIZATIONSOFF XVARFLG MERGEFRAMEFLG) BLOCKCOMPILE1 (BLKAPPLYFNS BYTECOMPFLG STRF) +GETXIP (XIPTRACEFLG) \HDCPYDSPPRINTCHAR (\CARET.UP) PRINENDLINE (MAKEMAP) \10MB.INPUT.INTERRUPT ( +\10MB.COLLECTSTATS) FIXAPPLY1 (TYPE-IN?) BRKDWNSETUP (BRKDWNCOMPFLG) BMOBJ.IMAGEBOXFN (*SMALLSCREEN* +*SMALLSCREENFACTOR*) /CNDIR (LISPXHIST) EDIT!UNDO (EDITHISTORY) \GETSTREAM (\DEFAULTTTYDISPLAYSTREAM) +COMPILER::COMPILE-FILE-PROCESS-FUNCTION (COMPILER::*COMPILING-DEFINER*) CHANGERECORD (MSDATABASELST) +EDITCOMA (ORIGFLG UNDOLST1 EDITHIST EDITCHANGES EDITLFLG LISPXHIST ATM TYPEIN LCFLG EDITHISTORY +MARKLST UNFIND LASTP1 LASTP2 COMS) POSTEDITPROPS (CLISPARRAY) \CURVEEND (DASHON \SOFTCURSORP +\SOFTCURSORUPP BBT DASHTAIL) \FIND.LOCALPUPHOSTNUMBER (PUPTRACEFLG) \IRM.SMART.REF (\IRM.KEYWORDS) +CLISP4 (CLISPFLG) FB.PRINTFN (FB.BROWSER.DIRECTORY.FONT) EDITCOML (LCFLG ORIGFLG TYPEIN) FIXSPELL1 ( +LISPXHIST REREADFLG TYPE-IN? APPROVEFLG CLISPCHANGES DWIMWAIT) EDITFNS (DWIMFLG) FTPPRINTMARK ( +FTPDEBUGFLG) \MOUSE.PROCESS (\WINDOWWORLD) EDITCOM1 (TYPEIN) TTGIVEHELP1 (SPLST) \MAIKO.CONS.UFN ( +\RECLAIM.COUNTDOWN) COMP.EQ (OPTIMIZATIONSOFF) EDITSAVE (EDITLISPFLG) \NSFILING.GET.STREAM (RESETSTATE +) CLISPCAR/CDR1 (DWIMIFYFLG CHECKCARATOMFLG VAR2) BLOCKCOMPILE (LCFIL LSTFIL) MSCHECKBLOCKBASIC ( +ENTRIES BLKAPPLYFNS) \NSRANDOM.READPAGES (\NSRANDOM.CHECK.CACHE) \COURIER.RESULTS (COURIERTRACEFLG) +DWIM-SYMBOL-PACKAGE (FAULTAPPLYFLG) COMP.STTAG (LEVEL FRAME) \IDLE.ISMEMBER (DEFAULTREGISTRY +CH.DEFAULT.DOMAIN) \HCPYMODEDSPPRINTCHAR (\CARET.UP) \COPYOPENFILE (FileTypeConfirmFlg) GETD ( +SI::*CLOSURE-CACHE-ENABLED*) \WRITE1 (*PRINT-PRETTY* *PRINT-CIRCLE* *PRINT-CIRCLE-HASHTABLE* +*PRINT-ESCAPE*) EDITSMASH1 (CHANGESARRAY) CL:COUNT (TEST-P TEST-NOT-P KEY-P) OPENSTREAM ( +MULTIPLE.STREAMS.PER.FILE.ALLOWED) CLISPCOND (LCASEFLG SEG) \MAIKO.10MBSENDPACKET (\RAWTRACING) +EDITNCONC (CHANGESARRAY) CLOSEALL (MULTIPLE.STREAMS.PER.FILE.ALLOWED) CHAT.MENU (\CARET.UP) +BRECOMPILE1 (BYTECOMPFLG) SENDXIP (\NS.READY XIPTRACEFLG) EDITSAVE1 (EDITHIST EDITHISTORY REREADFLG) +SCROLLW (\CARET.UP) POLYSHADE.IP (*) \10MB.OUTPUT.INTERRUPT (\10MB.COLLECTSTATS) FIXPRINTIN ( +DWIMIFYFLG DWIMIFYING FAULTAPPLYFLG LCASEFLG) EDITSMASH (EDITSMASHUSERFN EDITCHANGES EDITHISTORY +CLISPARRAY) PFI.AFTER.NEW.PAGE (*PFI-TITLE* *PFI-TWO-SIDED* *PFI-ITEM*) CLOSEF ( +MULTIPLE.STREAMS.PER.FILE.ALLOWED) \UFS.NEXTFILEFN (RESETSTATE *DSK-UPPER-CASE-FILE-NAMES*) +COMP.TRYUSERFN (COMPILEUSERFN) COMPILEUSERFN (DWIMFLG CLISPARRAY CLISPTRANFLG DWIMESSGAG) EDIT2F ( +COPYFLG CHANGESARRAY) CL:DECODE-UNIVERSAL-TIME (TIME-ZONE-SUPPLIEDP) CL:EVAL (*EVALHOOK* +CL::*SKIP-EVALHOOK*) CHOOZ (DWIM.GIVE.UP.TIME RUNONFLG) \STKMIN (\OPSTACKEFFECT) PAINTW.CACHE.SHADE ( +PAINTW.SHADES) EDIT4F1 (CHANGEFLG UPFINDFLG TOPLVL FF) CL:COUNT-IF (KEY-P) CLISP% (CLISPARRAY +%#CLISPARRAY) FINDFILE-WITH-EXTENSIONS (DIRECTORIES) \VAMFreePageGroup ( +\\DFSVAMjunkPage.GLOBALRESOURCE \\DFSVAMpage.GLOBALRESOURCE) CLISPIF3 (LCASEFLG) CL:COUNT-IF-NOT ( +KEY-P) \FIXLOCALNET (\LOCALNDBS) DIRFILENAME (*UPPER-CASE-FILE-NAMES*) GREETFILENAME (DEFAULTREGISTRY) + SCANCOMPILEDFN (DICT0 BUILDMAPFLG FNLST FNADRLST VARLST DICT) COMPAREFAIL (LOOSEMATCH) CL:DELETE-IF ( +FROM-END-P KEY-P) D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL (CROSSCOMPILING) DC (*LAST-DC*) TTY/EDITL ( +EDITHISTORY LISPXHIST) CL:DELETE-IF-NOT (FROM-END-P KEY-P) CLISPFOR (DWIMIFYFLG) +\INVALIDATE.PROCESS.WINDOW (PROCESS.STATUS.WINDOW) COMP.ARGTYPE (BLKFLG) DEBUGGER (WBREAK +XCL::BRKFUN-PROVIDED) CHECKRECORDNAME (NAME) BCOMPL.BODY (LCFIL) ERRORMESS (LISPXHISTORY) +COPY.WINDOW.TO.BITMAP (\SOFTCURSORP \SOFTCURSORUPP) HISTORYFIND1 (_FLG PREDFLG =FLG REREADFLG L) +BRKDWNINIT (BDPTR) GETCLEARINGHOUSE (CH.DEFAULT.DOMAIN CH.DEFAULT.ORGANIZATION) ASKUSERCHAR (NOCASEFLG +) \MEDW.GETSCREENREGION (BACKGROUNDCURSOREXITFN) \NSIN.24BITENCODING.ERROR ( +*SIGNAL-24BIT-NSENCODING-ERROR*) PFI.MAYBE.PP.DEFINITION (*PRINT-PRETTY-FROM-FILES*) +CL:DELETE-DUPLICATES (TEST-P TEST-NOT-P FROM-END-P KEY-P) \LOOKUPPORT (PUPTRACEFLG) \UFS.FILEINFOFN ( +RESETSTATE) CLISP3C (CLISPIFYPACKFLG SEG) \MAIKO.INPUT.INTERRUPT (\RAWTRACING) SET-DOCUMENTATION ( +LISPXHIST) RATOM (\\PNAMESTRING.GLOBALRESOURCE) EDITBF1 (UPFINDFLG) \IDLE.AUTHENTICATE ( +DEFAULTREGISTRY) MSCHECKBOUNDFREE (MSCRATCHASH) \SUBREAD (*READ-SUPPRESS* \\PNAMESTRING.GLOBALRESOURCE +) /RPLACD (LISPXHIST) CHANGEI.S. (MSDATABASELST) \CURSORDOWN (\SOFTCURSORP) CLISPBROADSCOPE1 ( +DWIMIFYFLG) CL:ENCODE-UNIVERSAL-TIME (\DayLightSavings) /SETPROPLIST (LISPXHIST) TEDIT.HARDCOPY ( +DEFAULTPRINTINGHOST) ENTER-DEBUGGER-P (HELPFLAG) CHANGEVAR (MSDATABASELST) ADD-USER-SUBR ( +\USER-SUBR-TABLE) COMPILER::GENCODE-PROGN (COMPILER::*POP-SUPPRESSION-POLICY*) \ETHEREVENTFN (\3MBFLG +\10MBFLG \LOCALNDBS \NSFLG \GATEWAYFLG) /RPLACA (LISPXHIST) DEFAULTMAKENEWCOM (DEFAULTCOMHASFILEFLG) +COMP.UBFLOAT2 (OPTIMIZATIONSOFF) SHOWPRIN2 (SYSPRETTYFLG) UNDOEDITL (LISPXHIST) \PRINT-USING-DEFPRINT +(*PRINT-LEVEL*) /PUTHASH (LISPXHIST) SI::NLSETQHANDLER (SI::*NLSETQFLAG* NLSETQGAG) \TOP-LEVEL-READ ( +\\PNAMESTRING.GLOBALRESOURCE) \KEYHANDLER1 (\PERIODIC.INTERRUPT \KEYBUFFERING \PENDINGINTERRUPT +\TIMER.INTERRUPT.PENDING) MSUPDATE (ANYFOUND) \PRINSTACKP (\THISFILELINELENGTH) LISPXTAB ( +LISPXPRINTFLG LISPXHIST) \TEDIT.CENTER.SEL (TEDIT.FNKEY.VERBOSE) \CURSORPOSITION (\SOFTCURSORP) +ASSURE.PUP.READY (\PUP.READY \10MBFLG \GATEWAYFLG) \PRINSTRING (*PRINT-ESCAPE* \THISFILELINELENGTH) +SHOWPRINT (SYSPRETTYFLG) MAKEFILE (MAKEFILEREMAKEFLG) EDITFB (EDITLOADFNSFLG) TRAPLOOP (TRAP.DEBUG) +\CKPOSBOUT (\THISFILELINELENGTH) \HANDLE.RAW.PACKET (\ETHERLIGHTNING) \CKPOSSOUT (\THISFILELINELENGTH) + CLISP3 (CLISPFLG NEGFLG CLISPIFYENGLSHFLG PARENT OPR0 CLTYP0 CLISPIFYPACKFLG) /DWIMCHECKTRAN ( +CLISPARRAY CLISPTRANFLG %#CLISPARRAY) \SPY.INTERRUPT (SPY.POINTERS \INTERRUPTABLE) OPT.CHECKTAG (LEVEL +) PURGEHISTORY (ARCHIVEFLG) \LITPRIN (*PRINT-ESCAPE* *PACKAGE* *PRINT-GENSYM* \THISFILELINELENGTH) +COMP.STFN (BLKFLG) CL:REMOVE (TEST-P TEST-NOT-P FROM-END-P KEY-P) /SETTERMTABLE (LISPXHIST) +DEFMACRO-ARG-TEST (%%UNBOUNDED-ARG-COUNT) \DURATIONTRAN (LCASEFLG) \VAMAllocPageGroup ( +\\DFSVAMjunkPage.GLOBALRESOURCE \\DFSVAMpage.GLOBALRESOURCE) FIX89A (TYPE-IN? DWIMIFYFLG) +CL:FILE-POSITION (CL::POSITIONP) \FAULTHANDLER (\DOFAULTINIT) ASKUSER$ (NOECHOFLG) MULTIFILEINDEX ( +*PFI-DONT-SPAWN*) \USER-SUBR-UFN (\USER-SUBR-TABLE) MSSOLVE (MSTHOSE) CLISPIF (DWIMIFYFLG) \CURVE ( +DASHON \SOFTCURSORP \SOFTCURSORUPP DASHTAIL) EDITL1 (EDITHISTORY EDITHIST0 COM) CL:FIND-IF (FROM-END-P + KEY-P) I.S.OPR (CLISPARRAY FILEPKGFLG) DELETE.TO.END (DISPLAYTERMFLG) CL:FIND-IF-NOT (FROM-END-P +KEY-P) RESETUNDO (LISPXHIST) LISPXREAD (READBUF CTRLUFLG) PERIODICALLYRECLAIM (\RECLAIM.COUNTDOWN) +CL:READ (\\PNAMESTRING.GLOBALRESOURCE) CONDITIONS::%%RESTART-PRINTER (*PRINT-ESCAPE*) +\LITPRIN.INTERNAL (\THISFILELINELENGTH) CL:READ-PRESERVING-WHITESPACE (\\PNAMESTRING.GLOBALRESOURCE) +\OPENLEAFCONNECTION (RESETSTATE) CHANGEMACRO (MSDATABASELST) PFI.MAYBE.SEE.PRETTY ( +*PRINT-PRETTY-FROM-FILES*) CL:READ-DELIMITED-LIST (\\PNAMESTRING.GLOBALRESOURCE) MSDWIMTRAN (DWIMFLG +CLISPARRAY CLISPTRANFLG) LISPX (LISPXUSERFN REREADFLG ARCHIVELST ADDSPELLFLG DWIMFLG) CLISP3B (OPR0 +LST) CARET (\CARET.DEFAULT \CARET.UP) MSPRGDWIM (DWIMFLG) /ECHOCONTROL (LISPXHIST) PRIN2-LONG-STRING ( +MAKEMAP) COMP.SETARG (COMPILE.ARG.FAST.FLG) LISPX/ (LISPXFNS LISPXHISTORY) TTYINEDIT ( +TTYINAUTOCLOSEFLG \TTSCRATCHFILE.GLOBALRESOURCE) \DOMOUSECHORDING (\MOUSECHORDTICKS) ASKUSERPRIN1 ( +LISPXPRNTFLG) CLISPATOM2A (BROADSCOPE DWIMIFYFLG NOSPELLFLG TYPE-IN? VARS TENTATIVE) MSNOTICEFILE ( +MSHASHFILE) \IDLE.OUT (\IDLING) \NSFILING.FULLNAME (*UPPER-CASE-FILE-NAMES*) CMLRDTBL (*PACKAGE*) +\TRACKCURSOR (\SOFTCURSORUPP) CL:ASSOC (CL::TEST-P CL::TEST-NOT-P CL::KEY-P) \DEFPRINT.BY.NAME ( +\THISFILELINELENGTH) \FTP.NEXTFILE (FTPDEBUGFLG) /SETREADTABLE (LISPXHIST) OPT.CHLEV (LEVEL) PRINOPEN +(MAKEMAP) MSVERB (LASTADVERB) \DOBUFFEREDTRANSITIONS (\PENDINGINTERRUPT) /SETSYNTAX (LISPXHIST) +LOWERCASE (CHCONLST) CRITSECT (\FILL.DEBUG) \AUTHENTICATION.FIND.SERVER (\AUTHENTICATION.SERVER.CACHE) + FINDATOM (PARENT) SCANFILE0 (DICT BUILDMAPFLG FNLST VARLST) SEDIT::FINALIZE-MOUSE-SELECTION ( +SEDIT::PENDING-SHIFT) WBREAK (ONP) /ECHOMODE (LISPXHIST) \INTERRUPTFRAME (WINDFLG) +COMP.TOPLEVEL.COMPILE (COMPILEUSERFN LAMBDANOBIND) \TTW1 (\SOFTCURSORP \SOFTCURSORUPP) \INTERRUPTED ( +\INTERRUPTABLE) \PRINTADDR (\\NUMSTR.GLOBALRESOURCE \\NUMSTR1.GLOBALRESOURCE) \PFTrimHelper ( +\PFDebugFlag) \FLUSHPAGE (\VMEM.PURE.LIMIT) CL::STEP-COMMAND (CL::*STEP-STATE*) \RSTRING2 ( +*READ-SUPPRESS*) PRINSHUT (MAKEMAP) \HDCPYBLTCHAR (\SOFTCURSORP \SOFTCURSORUPP) COMPERRM (EMFLAG) +MSMARKCHANGED (MSDATABASELST) CLISPATOM2 (ENDTAIL FORMSFLG DWIMIFYFLG BROADSCOPE CLISPCHANGE TENTATIVE + TYPE-IN?) RSTRING (\\PNAMESTRING.GLOBALRESOURCE) ADDCHAR (\AUTOFILL) \RESETSTACK0 (\RUNNING.PROCESS +\NEED.HARDRESET.CLEANUP) /PUT+1 (LISPXHIST) READ-EXTENDED-TOKEN (\\PNAMESTRING.GLOBALRESOURCE) /RAISE +(LISPXHIST) INTERRUPTED (\INTERRUPTABLE \MOUSEBUSY) END.DELETE.MODE (\DELETING) \NET.SETTIME ( +\LOCALNDBS \PUP.READY) MSCHECKEMPTY (MSDBEMPTY FILELST) \NSRANDOM.PREPARE.CACHE (\NSRANDOM.CHECK.CACHE +) DO.EDIT.COMMAND (\REPEAT \READING TTYINCOMPLETEFLG) \MEDW.GETSCREENPOSITION (BACKGROUNDCURSOREXITFN) + \DISABLEGC1 (\GCDISABLED) \NSFILING.LOGIN (RESETSTATE) SETFONT (MAKEMAP SPACEWIDTH) SEDIT:RESET ( +SEDIT::CONTEXTS) COMP.PROGN (OPTIMIZATIONSOFF) ETHERHOSTNAME (PUPTRACEFLG) \CARET.DOWN (\CARET.UP) +\MAKE.PROCESS0 (HELPFLAG) \SAVEVMBACKGROUND (SAVINGCURSOR) \READTABLEP.DEFPRINT (\THISFILELINELENGTH) +PRIN1S (MAKEMAP) CL:FIND (TEST-P TEST-NOT-P FROM-END-P KEY-P) CLISPIFYFNS (DWIMFLG) PRIN2S (MAKEMAP) +BITBLT (\SOFTCURSORP \SOFTCURSORUPP) MSINIT (MSDATABASELST) DV (*LAST-DV*) CLEARHASHFILES ( +SYSHASHFILELST) FIX89 (TAIL DWIMIFYFLG) START.CLEARINGHOUSE (LOCAL.CLEARINGHOUSE) \RTP.ERROR ( +PUPTRACEFLG) \FTP.CLOSEFILE (FTPDEBUGFLG) CHANGESLICE (LISPXHISTORY EDITHISTORY) +\CREATE.TTYDISPLAYSTREAM (\WINDOWWORLD) UPDATEFN (DEF) CHAT.TYPEOUT (\CARET.UP CHATDEBUGFLG +\LONGSYSBUF) \CLIPANDDRAWLINE1 (\SOFTCURSORP \SOFTCURSORUPP) CALLS (COMPILEUSERFN) PRINDOTP (MAKEMAP) +PRINTNUM-TO-STRING (\\NUMSTR.GLOBALRESOURCE \\NUMSTR1.GLOBALRESOURCE) INPUT ( +MULTIPLE.STREAMS.PER.FILE.ALLOWED) EDITQF (UPFINDFLG) OPENFILE (MULTIPLE.STREAMS.PER.FILE.ALLOWED) +PFI.MAKE.LPT.STREAM (*PFI-TWO-SIDED*) COMP.ARG (COMPILE.ARG.FAST.FLG) DELETETO (DISPLAYTERMFLG +\DELETING TTYINBSFLG) \SELECTREALPAGE (\VMEM.PURE.LIMIT DOLOCKCHECKS \VMEM.INHIBIT.WRITE) +\SOFTCURSORPOSITION (\SOFTCURSORUPP) ASKUSERSETUP (ECHOEDFLG) COMP.ANONP (BLKFLG) \UPDATECHAIN ( +DOLOCKCHECKS) \LEAF.FIX.BROKEN.SEQUIN (\WINDOWWORLD) READBQUOTECOMMA (\INBQUOTE) /RADIX (LISPXHIST) +CLISPIFY2 (OPR0 CLTYP0) CHARACTER.PRINT (*PRINT-ESCAPE* \THISFILELINELENGTH) COMP.PROG ( +OPTIMIZATIONSOFF) \EVALFORM (CLISPARRAY) OVERFLOW? (\AUTOFILL DISPLAYTERMFLG) DISMISS ( +\\DISMISSTIMER.GLOBALRESOURCE) \10MBRAWRECEIVE (\10MB.GETGARBAGE) \HCPYMODEDISPLAYINIT (\WINDOWWORLD) +SUPERPRINT/WRAPPER (MAKEMAP) \FTP.RECOGNIZEFILE (FTPDEBUGFLG) \IDLE.WAIT (\IDLING) \DTEST.UFN ( +SYSHASHARRAY) WINDOW.MOUSE.HANDLER (\INTERRUPTABLE \LastInWindow BACKGROUNDCURSOROUTFN +BACKGROUNDCURSORINFN BACKGROUNDCOPYRIGHTBUTTONEVENTFN BACKGROUNDCOPYBUTTONEVENTFN +BACKGROUNDBUTTONEVENTFN BACKGROUNDCURSORMOVEDFN BACKGROUNDCURSOREXITFN) CANONICAL.HOSTNAME (\IP.READY) + \GC.HANDLEOVERFLOW (\RECLAIM.COUNTDOWN) HISTORYSAVE (REREADFLG ARCHIVELST ARCHIVEFN HISTORYSAVEFORMS) + PRINTXIPROUTE (XIPTRACETIME) IFCPROPSCAN (NAME) /DELETECONTROL (LISPXHIST) ADDTO (ONLYRELS EACHTIME) +\SLOWHDCPYBLTCHAR (\SOFTCURSORP \SOFTCURSORUPP) DECLARERECORD (FILEPKGFLG) \LEAF.HANDLE.INPUT ( +LEAFDEBUGFLG) \FTP.GENERATEFILES (RESETSTATE) LISPXFIND (REREADFLG ARCHIVEFLG) OCTALSTRING ( +\\NUMSTR.GLOBALRESOURCE \\NUMSTR1.GLOBALRESOURCE) PRINTPUPROUTE (PUPTRACETIME) DF (*LAST-DF*) +\WAITFORSYSBUFP (\\DISMISSTIMER.GLOBALRESOURCE) \PFI.DO.HARDCOPY (\PFI.PROCESS.COMMANDS) +DO.SHIFTED.SELECTION (\CARET.UP) CLISPATOM1A (DWIMIFYFLG CLISPCONTEXT ONEFLG TENTATIVE) \GCMAPTABLE ( +\RECLAIM.COUNTDOWN) WAITFORINPUT (\\DISMISSTIMER.GLOBALRESOURCE) \TIMER.INTERRUPTFRAME ( +\PERIODIC.INTERRUPT) RECORDECL0 (CLISPARRAY) NIL +PREDICATE SIMPLE.FINDFILE (MEMB) DASSEM.DASMBIND (IGREATERP) SI::BQUOTE-CONS (CL:LISTP) FNTYP (LITATOM + TYPEP) MSSTOREDATA (FMEMB) \UFS.RECOGNIZE.FILE (FIXP) \GETFTPCONNECTION (LITATOM BSPOPENP STRINGP +STRPOS) \TYPENUMBERFROMNAME (GREATERP) GETNSPRINTER (TYPENAMEP) VARIABLES (ZEROP) +\COURIER.CHECK.ERRORS (FIXP NULLORLISTP) \ALLOCPAGEBLOCK (GREATERP) \TEDIT.COMMAND.LOOP (TTY.PROCESSP +\SYSBUFP IGREATERP) ANALYZE-PARAMETER (CL:SYMBOLP CL:ATOM) XCL::CLEAR-IMPLICIT-KEY-HASH (TYPEP) +\ALLOCVIRTUALPAGEBLOCK (ILEQ ILESSP) \ATMOUT (IGREATERP) \SET.STORAGE.STATE (SELECTC) +BRHC/INTERTREE/SPACE (IGREATERP IEQP ILESSP) \TEDIT.CONVERT.TO.FORMATTED (IGREATERP IEQP) +\GETPILOTBBTSCRATCHBM (ILEQ) CL::MAYBE-MAKE-BINDING-FORM (>) SEDIT::MENU-PACKAGE-SELECTEDFN (EQUAL) +VRULE.CREATE (EVERY) SI::BQUOTE-PROCESS-LIST (CL:ATOM) MAKEBRES (IGREATERP ILESSP IGEQ) WHILEDOUNTIL ( +ATOM EDITFINDP) OPT.JLENPASS (IGREATERP ILESSP) \TEDIT.REPAINTFN (ILESSP) \COURIER.CHECK.PROCEDURES ( +LITATOM) SI::BQUOTE-NCONC (CL:ZEROP) SUBSTRING (ILESSP IGREATERP ILEQ) SEDIT::SET-POINT-LIST (STREQUAL + ILEQ) XCL::IMPLICIT-KEY-MAP-HASH (TYPEP) TB.UNSELECT.ALL.ITEMS (<= GREATERP) LASTCHPOS (EQMEMB) +\SPP.GETNEXTBUFFER (\SPP.PREPARE.OUTPUT) COMPILE-FILE-EXPRESSION (CL:SPECIAL-FORM-P +INTERLISP-NLAMBDA-FUNCTION-P EQUAL) TEDIT.DISPLAYTEXT (STRINGP IGREATERP) \DISPLAYLINE (ZEROP ILEQ +IGEQ GREATERP IEQP IGREATERP SMALLP) \VECENCODE (ILESSP) ALLOCSTRING (ILESSP SMALLP STRINGP GREATERP) +\FTP.PRINTPLIST (STRINGP LITATOM IGREATERP ILEQ) PRINTPUP (FMEMB IGREATERP) \UPF.NEXTPOS (EQMEMB) +BREAK.MSG.INTO.LINES (GREATERP) MAKE-PACKAGE-HASHTABLE (EQL) \FM.EDIT-SETUPTTBL (GREATERP) +TB.DESELECTRANGE (< > <= GREATERP) IDLE.SET.OPTION (FGETD SMALLP GREATERP STREQUAL STRPOS +CH.LOOKUP.OBJECT) GETHOSTINFO (BOUNDP LITATOM) PFI.COLLECT.DEFINERS (LITATOM EQMEMB) XCL::PPRINT-DEFINER + (CL:ATOM CL:CONSP CL:LISTP SEMI-COLON-COMMENT-P) \INITMDSPAGE (ILESSP GREATERP IGREATERP) FM.ITEMPROP + (ILESSP) \LFScavFileName (IGREATERP EQL ZEROP) UNIX-GETENV (FMEMB) TEXTPROP (IGREATERP) +FB.MAKE.SUBDIRECTORY.ITEM (<=) UNPACKPATHNAME.STRING (CL:CONSP) FB.UPDATEBROWSERITEMS (MEMB STRPOS +FB.ADJUST.DATE.WIDTH) NTHCHARCODE (STRINGP LITATOM ILESSP IGREATERP) \FIXILINES (IGEQ IGREATERP IEQP) +MSEDITE (GREATERP) MKSTRING (STRINGP LITATOM CL:CHARACTERP SMALLP ILESSP IGREATERP) \LFUnpackName ( +IGREATERP FMEMB) FLASHWINDOW (WINDOWP DISPLAYSTREAMP GREATERP) SEDIT::MENU-FIND-SELECTEDFN (EQUAL) +MSPARSE (MSNEXTWORD) UNIX-GETPARM (SMALLP >) TEDIT.GET.OBJECT (IMAGEOBJPROP) BITMAPBIT (IGREATERP IGEQ + ILEQ FMEMB) DBG::ATTACH-BACKTRACE-MENU (CL:FUNCALL IGREATERP) TB.UNSELECT.ITEM (TB.ITEM.UPDATABLE?) +IDLE.BOUNCING.BOX (WINDOWP) SPY.MERGE.CALLEES (ILEQ) \SPP.SETFILEPTR (IGEQ) STRPOS (LITATOM IGEQ +ILESSP IGREATERP ILEQ ARRAYP GREATERP) SHRKFY (LITATOM FNTYP BOUNDP) ANTILOG (GREATERP LESSP FGREATERP +) \DSPCLIPTRANSFORMX (IGREATERP) \CH.UPDATE.CACHE (STRING-EQUAL MEMB) PFI.PROCESS.FILE (SYNTAXP +LITATOM) CREATEW (DISPLAYSTREAMP) BAKTRACE1 (DUMMYFRAMEP CL:SOME) \FTP.PACKFILENAME (STREQUAL) +\DSPCLIPTRANSFORMY (IGREATERP) ASKUSER (NUMBERP WAITFORINPUT STRINGP ASKUSERCHAR ASKUSER1 MEMB SYNTAXP + SELECTC APPLY* ILESSP IGREATERP) \FILLPOLYGON.PSC (ZEROP EQL FIXP FLOATP TEXTUREP BITMAPP) +COERCETEXTOBJ (ILEQ ATOM GREATERP) \BBTCURVEPT (ILEQ ILESSP) \NSFILING.SET.CONTINUANCE (FIXP) AIN ( +STRINGP ARRAYP IGREATERP ILESSP) CLISPDEC (ATOM FMEMB) \DSPLINEFEED.IP (NUMBERP) +\DSPCLIPPINGREGION.PSC (EQP) \TERMINATESPP (TIMEREXPIRED?) AOUT (STRINGP ARRAYP IGREATERP ILESSP) +\RESOLVE.TYPENUMBER (LITATOM) \DRAWPOLYGON.PSC (NUMBERP ZEROP FLOATP) PFI.PRINT.INDEX (ODDP) BLTCHAR ( +\CHARCODEP SMALLP) COMP.MLLFN (LITATOM ZEROP) MSEDITF (GREATERP HASDEF) TB.INSERT.ITEM (> < >=) +PFI.PRINT.FILECREATED (FIXP) EDITGETDEF (CL:EQUAL) TWODINSPECT.SELECTITEM (EQUAL) \MEDW.CURSOR ( +\CURSOR-VALID-P) FEQP (FLOATP IGREATERP SMALLPOSP SMALLP ILEQ) \COURIER.CHECKDEF (FIXP) +COLLECT-CASE-SELECTORS (CL:CONSP FMEMB) D-ASSEM:INTERN-DCODE (CL:ZEROP) SEDIT::REPLACE-LIST ( +SEDIT::DEAD-NODE? IGEQ IGREATERP <= ILESSP) \DSPPRINTCR/LF (IGREATERP SHOULDNT FMEMB) STRIP-KEYWORDS ( +CL:KEYWORDP) SEPRCASE (GREATERP) SHOWBITMAP.IP (IGREATERP ZEROP ILEQ) \BSP.CLOSE.OPEN.SOCKETS (SELECTC +) DWIMIFYFNS (GETPROP) D-ASSEM:FIXUP-PTR-NO-REF (FMEMB) \TEDIT.PROMPT.PAGEFULLFN (>=) PRINTWORDS ( +GREATERP) \SLOWBLTCHAR (IGREATERP ILESSP FMEMB) D-ASSEM:FIXUP-SYMBOL (CL:SYMBOLP FMEMB) +SI::SPLIT-PROCEED-CLAUSES (EQL CL:EVERY) MAKELINE (ILESSP) TB.SELECTRANGE (GREATERP > <) +FB.THINCOMMAND (STRING-EQUAL ILESSP FB.THINP FB.DELETE.FILE) \CARET.FLASH.AGAIN (DISPLAYSTREAMP +\CARET.FLASH) INTERNAL-SYMBOL-COUNT (CL::%%PACKAGE-EXTERNAL-ONLY) CONDITIONS::CONVERT-RESTART-CASES ( +CL:REST) SAVEVM (\FLUSHVM) CLISPIFYLOOKUP (FLOATP) \INDICATESTRING (IGREATERP ILESSP) +\LEAF.STREAM.IN.QUEUE (SELECTC DIRTYABLE) TEDIT.PUT.OBJECT (RANDACCESSP) CL:MAKE-PACKAGE (STREQUAL) +REPLACEFIELD (IGREATERP ILEQ TYPENAMEP CL:INTEGERP) \SHOWSEL (IGEQ) COPYARRAY (HARRAYP) \MAYBEPEEKNS ( +EQNSHOSTNUMBER) BOXCOUNT (NUMBERP) USERNAME (STRINGP) DASSEM.CANSHAREBINDING (EQUAL PARENTP) +\POSTSCRIPT.OUTCHARFN (ILEQ CL:AREF IGREATERP ILESSP IGEQ) SETD (IGREATERP IGEQ) COMPILER::SCAN-ONE-FORM + (CL:ATOM) BSPREADP (ILESSP IGREATERP) ELTD (IGREATERP IGEQ) \MEDW.PUTWINDOWPROP (DISPLAYSTREAMP +NUMBERP) D-ASSEM:FIXUP-PTR (FMEMB) MODERN-ADD-EXEC (GREATERP) PFI.PRINT.MULTI.INDEX (ODDP < TYPENAMEP +CL:PACKAGEP READTABLEP) TEDIT.STRINGWIDTH (IGREATERP) CONDITIONS::PARSE-RESTART-CASE (CL:KEYWORDP) +\COERCEFONTDESC (IMAGESTREAMP LITATOM FMEMB EQUAL) DEFPACKAGE (CL:PACKAGEP CL:KEYWORDP +CL::%%PACKAGE-EXTERNAL-ONLY LITATOM STRINGP MEMB) HASHARRAY (FIXP ILESSP ZEROP MINUSP LESSP GREATERP +IGREATERP) STKNTHNAME (ILESSP) ICMLARRAY.SETVALUE (EQL) COMPILER:ENV-BOUNDP (COMPILER::VARIABLE-P +CL:MEMBER COMPILER::ENV-P) SEDIT::JOIN (FMEMB GREATERP) IMPORT (CL::%%PACKAGE-EXTERNAL-ONLY) +\TEXTSTREAMBOUT (IEQP IGREATERP ILEQ IGEQ) INVERT.TEXTURE.BITMAP (IGREATERP) CLOSENSOCKET (FMEMB) +CL:SHADOWING-IMPORT (CL::%%PACKAGE-EXTERNAL-ONLY) LRSH (IGREATERP ILEQ TYPENAMEP CL:INTEGERP) +CLISPFORVARS (LITATOM STRPOSL FMEMB SELECTQ) ONEDINSPECT.SETELT (ILESSP) CL:SHADOW ( +CL::%%PACKAGE-EXTERNAL-ONLY) \MEDW.GETWINDOWPROP (DISPLAYSTREAMP) WHO-LINE-CHANGE-USER (MENU) +\NAMEDTABSIZE (STKPOS) \LEAF.TIMEDOUT.EXCESSIVE (WINDOWWORLDP SELECTC IGREATERP DIRTYABLE FMEMB) +SPY.DELETE (EQMEMB) \NSGATELISTENER (> TIMEREXPIRED?) COMPILER:OPTIMIZE-AND-MACROEXPAND-1 (CL:ATOM +CL:SYMBOLP) CLMAPS2 (FNTYP FMEMB CLREMPARS) SUBARRAY (IGREATERP IGEQ ILEQ) \SENDSPP (SEQ.GEQ) +TEDIT.FIND.OBJECT.SUBTREE (ATOM) POSTSCRIPT.OUTSTR (FIXP STRINGP IGREATERP LITATOM ZEROP TYPEP) +INFILECOMTAIL (LITATOM) \TYPENAMEFROMNUMBER (ILESSP) CL::STRUCTURE-OBJECT-INSPECT-STOREFN ( +CL::PSLOT-ACCESSOR) SEDIT::SHIFT-DOWN (KEYDOWNP SHIFTDOWNP) \FTP.HANDLE.NO (STRING-EQUAL APPLY*) +%%COPY-STRING-TO-ARRAY (GREATERP) GETFIELDSPECS (LITATOM) \HCPYMODEBLTCHAR (IEQP IGREATERP ILESSP +FMEMB) \DRAWARC.PSC (NUMBERP ZEROP FLOATP) COMPAREDEFS (PRIN1) TB.SELECT.ITEM (TB.ITEM.UPDATABLE?) +\FTP.ERRORHANDLER (BSPOPENP) = (CL::%%< CL:NUMBERP) TTYINFIX (>=) COMP.MLL (ZEROP ILESSP IGREATERP) +\WRITEOUTBUFFERS (CPBUFFERP) BSPEOFP (ILESSP) SEDIT::OUTPUT-CR-OR-SPACE (IGREATERP) \CLEARMAP ( +DIRTYABLE FMEMB) INVERT.TEXTURE (FIXP) FILING.CALL (< GREATERP TYPENAMEP) TEDIT.UNDO.DELETION ( +IGREATERP IGEQ) \CH.CHECK.CLEARINGHOUSE (STREQUAL) \MEDW.BITBLT (BITMAPP FMEMB) SETX.PRESS (IGEQ ILEQ +IEQP) SETY.PRESS (IGEQ ILEQ IEQP) FB.THINP (FMEMB ILESSP) UNDOSAVE (IGREATERP MINUSP) \ENDVECRUN (IGEQ +) DINFO.TOGGLE.GRAPH (FM.ITEMPROP) CL:READ-CHAR (\EOFP) REMOVE-COMMENTS (CL:CONSP CL:MEMBER) +SEDIT::TRACK-SELECT (LASTMOUSESTATE MOUSESTATE) \PNC (ZEROP) TEDIT.WORDSET (ILEQ) COMP.MAP ( +COMP.APPLYFNP COMP.CLEANFNP) DASSEM.MATCHVARS (EQUAL DASSEM.CANSHAREBINDING) \ACTONDISKPAGES ( +EMADDRESSP DISKWRITEACTION? PTRGTP IGEQ DISKREADACTION?) SEDIT::SMART-TTYFN (BOUNDP) DATATYPES ( +GREATERP) CL::STRUCTURE-OBJECT-PROPCOMMANDFN (TYPEP CL::PSLOT-READ-ONLY) CLOSEBSPSTREAM (SELECTC +TIMEREXPIRED?) %%COPY-ONED-ARRAY (GREATERP) CHAT.TAKE.INPUT1 (NLSETQ) \SLOWHCPYMODEBLTCHAR (IGREATERP +ILESSP FMEMB) \FTP.OPENFILE (SELECTQ) \GR.CONTENTS (LITATOM) \CLEARBYTES (IGREATERP ODDP) FB.SEEFULLFN + (GREATERP) CLISPFORERR (FIXPRINTIN LISPXPRINT TAILP) DATATYPEP (SMALLP LITATOM FMEMB GREATERP) \IDLER + (\OK.TO.IDLE? SMALLP \SECONDSCLOCKGREATERP VIDEOCOLOR \FLUSHVMOK? READP \SAVEVMBACKGROUND KEYDOWNP +PROCESSP TIMEREXPIRED?) SPY.DUMP.BUFFER (IGEQ ILEQ) CLISPIFYMATCHUP (FMEMB EQUAL) \DOACTONDISKPAGES ( +ILESSP IGREATERP GREATERP ILEQ) CLSTOPSCAN? (ILESSP ATOM) PUP.ECHOUSER (SELECTC PRIN1 IEQP +TIMEREXPIRED? IGREATERP) \ICONW.FORMAT.TITLE1 (>= IGREATERP FMEMB) FILEBROWSER (SMALLP EQLENGTH EVERY +CL:KEYWORDP STRING-EQUAL TTY.PROCESSP) \TEDIT2 (STRINGP) SEDIT::TRACK-EXTEND (MOUSESTATE) +TEDIT.WORDGET (IGREATERP) \WRITEDISKPAGES (ILESSP EMADDRESSP DISKWRITEACTION? PTRGTP) PRINTXIP (FMEMB +IGREATERP) \FIXLINELENGTH.IP (IGREATERP) TEDIT.QUIT (PROCESS.FINISHEDP) \DOWRITEDISKPAGES (ILESSP ILEQ + GREATERP IGREATERP) SI::INVOKE-ACTUAL-RESTART (CONDITIONS::RESTART-FUNCTION) DINFO.TOGGLE.MENU ( +FM.ITEMPROP) TTADJUSTWIDTH (ILESSP) ADD-SYMBOL (<= >=) DASSEM.EQCONSTANTP (FIXP IGEQ) +TEST-PROCEED-CASE (CONDITIONS:RESTART-NAME) LOG (FGREATERP FLESSP) FB.FASTSEE.ONEFILE (DIRECTORYNAMEP) + \BSP.SETFILEPTR (IGEQ) DINFO.UPDATE (OBTAIN.MONITORLOCK) MAPPAGE (ILEQ) TEDIT.FIND.OBJECT (ATOM) +\LISPERROR (SMALLP) PRINTDEF (SYNTAXP IMAGESTREAMP NUMBERP GREATERP) INSTALL-WHO-LINE-OPTIONS (BOUNDP +WINDOWP) \HASHRECLAIM (\EQREFCNT1) \MAPPAGE (ILEQ DIRTYABLE DIRTYP CPBUFFERP) DO.MOUSE (KEYDOWNP +LASTMOUSESTATE >) HASHOVERFLOW (FLOATP FIXP FNTYP NUMBERP) \SETEOF (IGEQ IGREATERP) CLMAPS1 (FGETD +EVERY) STORAGE (GREATERP FIXP < > ERROR =) \GR.DELDEFFN (LITATOM LISTGET) DWIMIFY1A (FIXPRINTIN +NUMBERP) TEDIT.REDO.INSERTION (IEQP IGEQ) SPY.MAKE.TREE (WINDOWP) \NSFILING.GDATE (EQUAL) +\HASHTABLE.DEFPRINT (IGREATERP) \STORAGE.TYPE (< >=) POSTSCRIPT.SET-FAKE-LANDSCAPE (ZEROP) +\BITBLT.BITMAP.SLOW (ILEQ FIXP) \STORAGE.HUNKTYPE (>=) \COLLECTDIRTYBUFS (DIRTYP CPBUFFERP) +\STRINGWIDTH.PRESS (LITATOM IGREATERP STRINGP) DBG::FIND-ORIGINAL-NAME-AND-DEFINITION (CL:SYMBOLP +CL:ATOM CL:MEMBER) TEXTUREOFCOLOR (IGREATERP) \VFMBlankInterval (GREATERP) ONEDINSPECT.SELECTPROP ( +EQUAL) \LEVELTEXTURE (ILESSP) \PUNT.BITBLT.BITMAP (ILEQ FIXP) SEDIT::LINEARIZE-LIST (IGREATERP FMEMB) +\STRINGHASHBITS-UFN (STRINGP LITATOM IGREATERP) XCL:PROFILE-P (CL:CONSP CL:SYMBOLP EVENP) +\FM.NUMBER-CHANGESTATE (EQUAL) COURIER.REP.LENGTH (LITATOM) CL:AREF (<) \STRING-EQUAL-HASHBITS-UFN ( +STRINGP LITATOM IGREATERP) \BSPBACKFILEPTR (IGREATERP) \STMDSTYPE (>= < >) TEDIT.EDIT.OBJECT ( +IMAGEOBJP APPLY*) BRH/LAYOUT (IGREATERP) \GETDISKCB (\CLEANUPDISKQUEUE) INCORNER.REGION (ILEQ IGEQ +NEARTOP) \XIPERROR (EQNSHOSTNUMBER) NTH (IGREATERP) \IFS.LOOKUPFILE (GREATERP >) COMP.SELECTQ (FMEMB +COMP.PREDP) \CLEANUPDISKQUEUE (IGREATERP) DINFO.TOGGLE.TEXT (OBTAIN.MONITORLOCK FM.ITEMPROP) +\CODEARRAY (IGREATERP) \MEDW.TOTOPW (OPENWP OPENW) TB.NORMALIZE.ITEM (> <) SEDIT::SHRINKFN (EQMEMB +OBTAIN.MONITORLOCK) WHO-LINE-WHAT-IS-RUNNING (MEMB) \DRAWPOINT.PSC (BITMAPP) \PUNT.BLTSHADE.BITMAP ( +ILEQ FIXP) TEDIT.SETSYNTAX (LITATOM STRINGP ILEQ) \PAGED.GETNEXTBUFFER (OPENED ILESSP IGEQ IEQP) +\CREATEINTERPRESSFONT (LITATOM) TURN.OFF.ETHER (GETD) \PAGED.FORCEOUTPUT (DIRTYABLE DIRTYP CPBUFFERP) +SETREADFN (DISPLAYTERMP FGETD DISPLAYSTARTEDP) \CARET.FLASH (\CARET.SHOW) \CLIPLINE (GREATERP) +\PAGEDSETFILEPTR (>) DASSEM.DSTOREFNDEF (FIXP IGEQ ILEQ) FASL::DUMP-INTEGER (<= <) FILEWATCH (LITATOM +STRINGP) \PAGED.SETEOFPTR (OVERWRITEABLE APPENDABLE) ARGINFO-MUNG (CL:CONSP) SEDIT::INPUT-TOKENDELIM ( +SEDIT::EQ-POINT-TYPE) \UPDATEOF (IGREATERP) COMPARELISTS (COMPARELST) DINFO.TOGGLE.HISTORY ( +FM.ITEMPROP) TB.FIND.PREVIOUS.TAIL (<) \PAGEDREADP (\PAGEDEOFP IGREATERP) DELFROMCOMS (LITATOM) +CLISPIFYMAPS (EDITFINDP CLREMPARS) \CHECKARRAYBLOCK (UNLESSRDSYS ILESSP EQPTR) XCL:OPEN-STREAM-P ( +STREAMP) SEDIT::OUTPUT-CONSTANT-STRING (SEDIT::NEXT-LINEAR) \GR.PUTDEFFN (LITATOM LISTGET EQUAL) +\ALLOCBLOCK.OLD (GREATERP ILESSP IGREATERP) XCL:ECHO-STREAM-INPUT-STREAM (XCL:ECHO-STREAM-P) +NS.ECHOUSER (SELECTC = PRIN1 TIMEREXPIRED? >) TWODINSPECT.REDISPLAY (EQUAL IGREATERP) +WHO-LINE-TTY-STATE (PROCESS.FINISHEDP MEMB) \ALLOCBLOCK.NEW (IGREATERP) XCL:ECHO-STREAM-OUTPUT-STREAM +(XCL:ECHO-STREAM-P) \FM.NUMBER-SETUP (FMEMB) FILENAMEFROMID (EOFP EQL GREATERP) \ALLOCHUNK (IGREATERP +FMEMB ILEQ POWEROFTWOP ILESSP) XCL:TWO-WAY-STREAM-OUTPUT-STREAM (XCL:TWO-WAY-STREAM-P) NSNETDAYTIME0 ( +GREATERP) TOPW.REPAINTFN (IGREATERP) NEARESTCORNER (ILESSP) \HANDLE.RAW.XIP (SMALLP IGEQ) TTPRINSPACE +(>=) \DSPTRANSLATE.PSC (ZEROP) \MAIKO.ALLOCBLOCK (ILESSP IGREATERP ILEQ) \BSP.HANDLE.DATA (\RTP.FILTER + ILEQ IGREATERP ILESSP IEQP) \NEWLENGTHIS (ILESSP) CLISPIFYCROPS (LITATOM FMEMB SOME APPLY* +CLISPNOEVAL CLISP3B) XCL:TWO-WAY-STREAM-INPUT-STREAM (XCL:TWO-WAY-STREAM-P) COMP.NUMBERTEST ( +COMP.PREDP FMEMB) CHCON (LITATOM STRINGP GREATERP) INSURE.RGB.COLOR (FIXP LITATOM HLSP RGBP) +TTYINREADP (LINEBUFFER-EOFP) \MERGEFORWARD (\CHECKARRAYBLOCK) CLISPIFYRPLAC (SUBRP) +XCL:CONCATENATED-STREAM-STREAMS (XCL:CONCATENATED-STREAM-P) \MEDW.REDISPLAYW (SUBREGIONP) \LINKBLOCK ( +ILESSP) \SETETHERFLAGS (>=) UNPACK (LITATOM STRINGP GREATERP) TEXTOBJ (PROCESSP WINDOWP DISPLAYSTREAMP +) \TEDIT.WORDBOUND.READTABLE (GREATERP ILEQ) \CARET.FLASH? (TIMEREXPIRED? DISPLAYSTREAMP +IMAGESTREAMTYPEP \CARET.FLASH) XCL:BROADCAST-STREAM-STREAMS (XCL:BROADCAST-STREAM-P) \CLIPCURVELINE.IP + (> GREATERP) \VANILLADISKINIT (GREATERP) \DELETEBLOCK? (IGEQ) XCL:SYNONYM-STREAM-SYMBOL ( +XCL:SYNONYM-STREAM-P) TEDIT.GETSYNTAX (IGREATERP LITATOM STRINGP) EDITFROMFILE (FMEMB LITATOM MEMBER +LOOKIN ERSETQ) CLISPIFYCROPS1 (MINUSP NUMBERP IGREATERP) \PREFIXALIGNMENT? (IGREATERP) +XCL:FOLLOW-SYNONYM-STREAMS (XCL:SYNONYM-STREAM-P) \FM.EDIT-INSERT (FMEMB ATOM APPLY* ILEQ IGREATERP) +BRIEFLY-DESCRIBE-SYMBOL (CL:FBOUNDP) INTEGERLENGTH (NBITS.OR.LESS IGREATERP TYPENAMEP) \BSP.HANDLE.ACK + (\RTP.FILTER ILESSP IGEQ IGREATERP ILEQ) \VANILLAHOSTNAMEP (GETD) \VFMCreateIntervals (BOUNDP ZEROP +EQL) \LOCATE.NSNET (= <) DCHCON (LITATOM STRINGP GREATERP) \NSFILING.GETEOFPTR (DIRTYABLE) +\MEDW.SHAPEW (\USERFNISDON'T LESSP EQUAL) \NSFILING.GETFILEINFO.FROM.PLIST (SMALLP) CLISPNOTVARP ( +BOUNDP FMEMB RELSTK GETPROP) \SFFIXLINELENGTH (BOUNDP) \CHECKFORSTORAGEFULL (ILESSP ILEQ IGREATERP +IGEQ) \LFOpenDevice (\PFVersionOK \LFDirectoryP) DASSEM.DWRITEFN (DASSEM.SAVELOCALVARS FIXP IGEQ ILEQ) + SCALE.FONT (GREATERP) ICMLARRAY.DOWINDOWCOMFN (MEMB) DUNPACK (LITATOM STRINGP GREATERP) +\TEDIT.SEARCH.CODETABLE (GREATERP) EXPRCHECK (LITATOM GETD) DWIMARKASCHANGED (LITATOM FASSOC) +ALPHORDER (LITATOM STRINGP NUMBERP GREATERP IGEQ ILEQ ILESSP) COURIER.OPEN (ILEQ) BLOCK (FIXP) +CASEARRAY (GREATERP) \SETBRUSH.IP (NUMBERP <=) BKLINBUF (STRINGP IGREATERP) \ARRAYBLOCKMERGER ( +IGREATERP ILESSP) \TEDIT.INTERRUPT.SETUP (WINDOWPROP) SEDIT::INPUT-QUOTE (FMEMB) TEDIT.MOVE (ZEROP) +FREEATTACHEDWINDOW (ILEQ IGEQ) TEXTSTREAMP (STREAMP) \ACCHARWIDTHLIST (ZEROP) PAGEHEIGHT (NUMBERP) +PACKC (IGREATERP ILEQ LESSP) UnixPrintCommand (FIXP) \LOOKUPFMAP (IGEQ ILEQ) TB.UPDATE.DISPLAY (>= <= +TB.ITEM.UPDATABLE? >) \READACFONTBOXES (GREATERP IGREATERP) CL::BUILD-COPIER-TYPE-CHECK ( +CL::PS-PREDICATE) \WHICHPART (ILEQ) \GETFBB (IEQP IGREATERP ILESSP) \COPYARRAYBLOCK (IEQ) +DASSEM.DASSEM (IGEQ ILEQ FIXP ILESSP IGREATERP FMEMB LITATOM) \NEW.READ.SYMBOL (STRINGP) PACK (STRINGP + LITATOM IGREATERP) COMP.GETBASEBITS (OPT.CALLP ILESSP IGREATERP) COPYALL (LITATOM SMALLP CL:CHARACTERP + FMEMB) \MEDW.EXPANDW (OPENWP \USERFNISDON'T) WXOFFSET (NUMBERP) OPEN (CL:MEMBER) \SAVELINEBUF ( +\PAGEDEOFP >) COMPILER::PRINT-NODE (COMPILER::LITERAL-P) \ADVANCE.ARRAY.SEGMENTS (IGEQ) TTY.PROCESS ( +OPENWP HASTTYWINDOWP) \LFINITCASEARRAY (GREATERP) LITATOM.EXISTS (ATOMHASH#PROBES) \3MBFLUSH ( +\READRAWPBI) \PAGEPAD.PRESS (IGREATERP) \CREATESTARFONT (\GETCHARSETINFO) \PFTransferFilePage (FIXP) +\NEW.MKATOM (ILEQ IGREATERP IGEQ) FIND-DEBUGGER-ENTRY-FRAME (FMEMB GENSYM?) SETDISPLAYHEIGHT (SMALLP +IGREATERP) COMP.DELFIX (OPT.CALLP) \FAMILYCODE (GREATERP) SEDIT::PLACE-CARET-AND-SELECTION (INSIDEP) +FB.ANALYZE.PATTERN (STREQUAL) WYOFFSET (NUMBERP) PLAYTUNE (TIMEREXPIRED?) \TEDIT.PROCEXITFN ( +WINDOWPROP) COMP.STFIX (NUMBERP) ONEDINSPECT.SELECTITEM (EQUAL) \LITATOM.EATCHARS (GREATERP) +\MEDW.SHRINKW (OPENWP WINDOWP STRINGP) OPENPOSTSCRIPTSTREAM (CL:PLUSP EQL MENU) CL:INTERN (STRINGP +CL:STRINGP) SPY.MAKEGRAPHNODES (ZEROP ILESSP) CLISPACKUP (ATOM FMEMB LITATOM STRPOSL FRPLACA NUMBERP +MINUSP) \3MBWATCHER (ILESSP) \ACCHARPOSLIST (GREATERP IEQP) CCODEP (LITATOM) PAGEFULLFN ( +DISPLAYSTREAMP TTY.PROCESSP) UnixShellQuote (<= FMEMB) BRECOMPILE (RANDACCESSP NLSETQ) MAKEBITTABLE ( +ILEQ GREATERP IGREATERP) TTNTHLINE (ILEQ) CL::DEFINE-COPIERS (CL::PS-TEMPLATE) EXCHANGEXIPS ( +TIMEREXPIRED? IEQP) DBG::DEBUGGER-BUTTON-EVENT (LASTMOUSESTATE) TEDIT.SETSEL (IGREATERP) COMP.EXPR ( +COMP.PREDP COMP.NOSIDEEFFECTP LITATOM NUMBERP GET) \NSFILING.HOSTNAMEP (STRPOS) +\BSP.HANDLE.INTERRUPTREPLY (\RTP.FILTER IEQP) DISPLAYSTREAMP (SOME) \LEAF.REPAIR.BROKEN.PUP (SELECTC) +CONCOCT-SYMBOL (CL:MEMBER CL:FIND-SYMBOL) \BSP.HANDLE.INTERRUPT (\RTP.FILTER) TB.ITEM.UPDATABLE? ( +TB.ITEM.VISIBLE? <) NEWPAGE?.IP (LESSP) \SETFATSYNCODE (ILEQ) \FM.EDIT-ITEM (MOUSESTATE ZEROP READP +TIMEREXPIRED? TTY.PROCESSP LASTMOUSESTATE \FM.ONITEM IGEQ) \BCPLSOUT.PRESS (GREATERP) SCANX (IGREATERP + ILESSP) FB.CHECK.NAME.LENGTH (>= > <) \SHOW.ARRAY.FREELISTS (\BLOCKDATAP IGEQ GREATERP IGREATERP) +COMP.FMEMB (COMP.PREDP FMEMB) FILEPOS (ARRAYP LITATOM FIXP IGEQ IGREATERP SMALLP) TERMINAL-INPUT (IGEQ +) \LFCreateDirectories (BOUNDP ZEROP EQL) \M44DOEXTENDVMEMFILE (GREATERP ILESSP ILEQ) SHRIEKIFY ( +LITATOM FNTYP BOUNDP EDITFINDP) EDITDATE (EQMEMB) XTOUSTRING (ILESSP) CLISPFORVARS1 (STRPOSL LITATOM) +\STREAMCHARWIDTH (DISPLAYSTREAMP IGREATERP IGEQ ILESSP) NSNAME.TO.STRING (STRING-EQUAL) +\TEDIT.GET.TERMSA.WIDTHS (GREATERP) \NSFILING.CLOSE.BULKSTREAM (OPENP) TEDIT.SETFUNCTION (ILEQ LITATOM + STRINGP) TERMINAL-OUTPUT (IGEQ) \NSFILING.ERRORHANDLER (NLSETQ GREATERP) FFILEPOS (LITATOM IGREATERP +ILESSP FIXP IGEQ ARRAYP SMALLP) \FTP.GETFILEINFO.FROM.PROPS (FIXP) \PARSEARRAYSPACE1 (EQPTR) +\SETUP.FFILEPOS (GREATERP LESSP IGEQ) COMP.NUMBERCALL (FMEMB) UnixTempFile (BOUNDP STRING-EQUAL +GREATERP INFILEP) CHANGEBACKGROUNDBORDER (SMALLP) FASL::DUMP-ARRAY (DISPLACED-ARRAY-P +CL:ADJUSTABLE-ARRAY-P TYPEP) SHOW.PRESS (IGREATERP ILESSP ILEQ) COMP.GETD (COMP.PREDP) \CHDEL1 ( +\BACKCCODE) \BSP.HANDLE.ERROR (IGREATERP) POSTINITARRAYS (IGREATERP IGEQ ZEROP MINUSP LESSP GREATERP) +\ECHOCHAR (IGEQ ILEQ) COMPILER::GENCODE-TAGBODY-INLINE (COMPILER::TAGBODY-CLOSED-OVER-P +COMPILER::SEGMENT-CLOSED-OVER-P) TB.CLOSE/SHRINK (OBTAIN.MONITORLOCK) PSCFONT.READFONT (GREATERP) +INTERPRESS.BITMAPSCALE (GEQ) \TEDIT.COPYINSERTFN (STRINGP IMAGEOBJP) CLREMPARS (ATOM FGETD STRPOSL) +ICONW.TITLE (OPENWP) DINFO.TITLEMENUFN (OBTAIN.MONITORLOCK FGETD) \INTERPRETER1 (<) \BSP.TIMERFN ( +SELECTC TIMEREXPIRED?) TEDIT.FIND (STRINGP LEQ LITATOM GREATERP) TEDIT.GETFUNCTION (LITATOM IEQP +IGREATERP) SEARCHPRETTYTYPELST (LITATOM) COMP.NUMERIC (FMEMB OPT.CALLP NUMBERP IGREATERP EQL MINUSP) +\GETCHAR (IGEQ ILEQ) MSCLOSEFILES (OPENP) \STACKARGPTR (STACKP TYPENAMEP NUMBERP IGREATERP EQMEMB IGEQ +) SEDIT::LINEAR-ITEM-WIDTH (FIXP) \FILLBUFFER (IGEQ ILEQ IGREATERP \FILLBUFFER.WORDSEPRP SELECTC +\INCPARENCOUNT) FW-PERCENTAGE (IGEQ IGREATERP) \STARTDISPLAY (LESSP) SEDIT::EDIT-HELP (ILEQ) +\FILLBUFFER.WORDSEPRP (IGREATERP) CL::%%RATIO-PRINT (IGREATERP) \MEDW.MOVEW (FMEMB SUBREGIONP +POSITIONP NUMBERP REGIONP ILESSP IGREATERP) TB.FIND.SELECTED.ITEM (GREATERP) +SEDIT::COMPUTE-POINT-POSITION-LIST (SMALLP) NEWFAULT1 (LITATOM) CHARWIDTH (SMALLP) CL:ADJOIN ( +CL::%%COMPLEX-MEMBER CL::%%SIMPLE-MEMBER) SEDIT::FN-CHANGED (CCODEP) ICMLARRAY.DISPLAYSLICE (GREATERP) + FAULTAPPLY (CCODEP CL:SYMBOLP TYPEP) COMP.COMPARENUM (SELECTQ FMEMB) DSPBACKUP (DISPLAYSTREAMP +IGREATERP) CL::%%BUILD-RATIO (MINUSP) DBG::RELEASE-DEBUGGER-WINDOW (WINDOWP) DINFOGRAPH (WINDOWP) +\UNPACKDATE (FIXP >) BRECOMPILE3 (EXPRP) CL::%%COMPLEX-PRINT (IGREATERP) \CreateScreenBitMap ( +IGREATERP GREATERP BITMAPP) FM.SKIPNEXT (FM.EDITP PROCESSPROP) \ENTITYEND.PRESS (ODDP) VIDEOCOLOR (ARG +) CL::%%COMPLEX-+ (=) \SETUP-COMPILED-CLOSURE-CALL (ILESSP GREATERP) \TEDIT.FORMATTEDP1 (ILEQ +IGREATERP IEQP) \STOPSCROLL? (SMALLP) \PRINTFMAP (SMALLP GREATERP) \LEAF.USE.NEW.CONNECTION (FMEMB +DIRTYABLE) RECREDECLARE1 (RECREDECLARE2) SPY.MERGEINFO (FMEMB STRPOS) TERMX (IGREATERP ILESSP) +CL::%%NOT-NONCOMPLEX-NUMBER-ERROR (CL:NUMBERP) CLISPAND1 (LITATOM) MAKEKEYLST (EQUAL) \3MBSENDPACKET ( +> UNINTERRUPTABLY) \FIXP.FROM.FLOATP (FLOATP IGREATERP SMALLPOSP SMALLP ILEQ ILESSP) COMPILER::TEST-ALPHA-2 + (CL:CONSP) CL::%%COMPLEX-/ (=) \PACKDATE (> < \ISDST?) COMPILER::GENCODE-TAGBODY ( +COMPILER::TAGBODY-NEW-FRAME-P COMPILER::TAGBODY-CLOSED-OVER-VARS) \PUTBASE (SMALLPOSP SMALLP) +\IDATESCANTOKEN (DIGITCHARP IGEQ ALPHACHARP) \DSCCOUT (IGREATERP ILESSP) CL::%%COMPLEX-* (=) ARGLIST ( +LITATOM TYPEP) \DSPFONT.IP (>=) CL:/= (CL::%%<) BYTE (<) \PROMPTWINDOW.SET.HEIGHT (ILESSP) WFROMDS ( +WINDOWP IMAGESTREAMP IMAGESTREAMTYPEP) FB.EDITLISPFILE (STRING-EQUAL GET BOUNDP MOUSECONFIRM) +COMP.SHIFT (IGREATERP) CL::%%COMPLEX-- (=) DBG::CLOSE-DEBUGGER-WINDOW (PROCESSP PROCESS.EVALV) +CLISP-SIMPLE-FUNCTION-P (FGETD GET CL:MACRO-FUNCTION GETLIS) \FREESTACKBLOCK (ILESSP SELECTC IGEQ) +PROMPTPRINT (GREATERP) \MEDW.CLOSEW (FMEMB) COMPILER::TRANSFORM-GET/PUT-BASE (COMPILER::LITERAL-P +CL:INTEGERP) CL::%%RATIO-TIMES (MINUSP) \SETUP-ENVIRONMENT-CALL (> >=) \ICONW.FORMAT.TITLE (GEQ LEQ +LESSP) MAKEFILES (FILES?1) TEDIT.INSERT.OBJECT (ILEQ IGREATERP IEQP) DISPLAYSTREAMINIT (NUMBERP +IGREATERP) \RPLRIGHT (IGREATERP IGEQ) \FTP.UNPACKFILENAME (> U-CASEP) SEDIT::SEDITL (BOUNDP) +TEDIT.MAPLINES (ILESSP) \OUTDATE-STRING (GREATERP) InstallUnixPrinter (EQMEMB) COMP.ST (FIXP) +\GETMISCNSOCKET (FMEMB) CHAT.EMACS.MOVE (IGEQ ILESSP IGREATERP) CL:ACOSH (CL:COMPLEXP <) CLISP3A ( +SELECTQ EQMEMB) PROCESSWORLD (TYPENAMEP MEMB) CLISPCOND1 (CLREMPARS) SEDIT::PARSE--LIST (LITATOM) +CL:ATANH (CL:COMPLEXP > CL:ZEROP =) \COERCEASCIITONSFONT (GREATERP) ADD.PROCESS (GREATERP FMEMB) +\MEDW.OPENW (FMEMB) CHANGEBACKGROUND (TEXTUREP BITMAPP) COMPILEUSERFN1 (TAILP) FB.CLOSEFN ( +OBTAIN.MONITORLOCK) PUTPROPS.PRETTYPRINT (FITP) TRIM.BITMAP (GREATERP BIT.IN.COLUMN LESSP BIT.IN.ROW) +CL::%%RECIPROCOL (CL:FLOATP) SEDIT::CFV-LIST (FMEMB ILESSP) NEWPAGE.IP (ZEROP EQP) DISPLAYGRAPH ( +DISPLAYSTREAMP IGREATERP) \TEDIT.READTABLE (ILEQ) CL:ASINH (CL:COMPLEXP) \3MBGETPACKET ( +UNINTERRUPTABLY) SEDIT::SEDITE (CL:CONSP) \MOVE.WINDOWS.ONTO.SCREEN (GREATERP) CLISPFOR1 (FNTYP FMEMB +EVERY) CL:ATAN (CL:COMPLEXP CL:ZEROP =) \FTP.OPENFILE.FROM.PLIST (\FTP.HANDLE.NO BSPOPENP) FAULTEVAL ( +LITATOM EQUAL FMEMB) \ADDLEAFSTRING (LITATOM IGREATERP GREATERP) DINFO.OPENTEXTSTREAM (EQUAL) +\DSPLINEFEED.PRESS (NUMBERP) CHAT.HOLD (MOUSESTATE) SPY.UPDATE.TITLE (INSIDE? MOUSESTATE) +PUTWINDOWPROP (DISPLAYSTREAMP) SEDIT::INPUT-NORMAL-CHAR (IGREATERP ILESSP) TB.REV.FIND.SELECTED.ITEM ( +LESSP) \LONUM (ILEQ TYPENAMEP CL:INTEGERP) SETXY.PRESS (IGEQ ILEQ) INITX (IGREATERP ILESSP) \HINUM ( +ILEQ TYPENAMEP CL:INTEGERP) COMP.RPLACD (OPT.CALLP) \LINEBUF.EOFP (\PAGEDEOFP) BLOCKCOMPILE1 (MEMB +ASSOC EXPRP FMEMB) APPLY (LITATOM) ICMLARRAY.MENUW.SHOW (GREATERP) INVERT.BITMAP.VERTICALLY (GREATERP) + XCL::SFLOOR (= <) APPLY* (IGREATERP LITATOM CCODEP GREATERP) SEDIT::EXTRACT-CURRENT-SELECTION (NLSETQ +) LINEBUFFER-SKIPSEPRS (\PAGEDEOFP SYNTAXP) DINFO.SHOWSEL (STRINGP) CHAT.MENU (LASTMOUSESTATE) CL:CIS +(TYPEP) CL::%%GCD (EQL) TB.FIND.ITEM (<= CL:FUNCALL) CLISP4 (EQMEMB GETHASH SOME LITATOM BOUNDP FMEMB +FGETD) SEDIT::CREATE-COMMAND-TABLE (CL:CONSP) RECORDTRAN (GETSETQ FMEMB) EDITFNS (GETPROP) +\MOUSE.PROCESS (PROCESS.EVALV TTY.PROCESSP) POSTSCRIPT.FONTSAVAILABLE (EQUAL MEMBER GREATERP) +ICMLARRAY.MENUW.APPLY (GREATERP IGREATERP) PRINTLINE (IGEQ ILEQ GREATERP SMALLP) +\PERIODICALLY-WHO-LINE-SHOW-ACTIVE (TIMEREXPIRED? OPENWP TOPWP) \SETSPACE.PRESS (ILEQ) \MAIKO.CONS.UFN + (ZEROP IGREATERP) \TEDIT.INSPECTCODE (LITATOM CCODEP DEFINEDP) ONEDINSPECT.REDISPLAY (EQUAL IGREATERP +) CL:CLOSE (STREAMP OPENP DIRTYABLE APPENDONLY) XCL::SCEILING (= <) COMPILER::GENCODE-RETURN ( +COMPILER::BLOCK-NEW-FRAME-P) RELSTK (STACKP) COMPILER::IS-CALL-TO (COMPILER::CALL-P COMPILER::VAR-REF-P +) \TIMER.PROCESS (TIMEREXPIRED?) XCL::SROUND (CL:FLOATP) \EVALV1 (\DTEST) INTERPRESSFILEP (GREATERP +EOFP) \DTSCAN (IGREATERP) CL:COSH (CL:COMPLEXP) \FM.NWAY-SELECTEDFN (\FM.NWAYPROP) EQFMTSPEC (EQP +EQUAL) \ISDST? (\CHECKDSTCHANGE) SEDIT::GET-DESTINATION-CONTEXT (PROCESS.EVAL) +DBG::CREATE-DEBUGGER-WINDOW (HASTTYWINDOWP) CLISPCOND (CLREMPARS) COMP.LABELS (FMEMB) \PRINTCCODE ( +\CHARCODEP SMALLP) BRECOMPILE1 (LITATOM MEMB ATOM BRECOMPILE2) \GR.METHODEXPANDER (FNTYP) +\TEDIT.SHRINK.ICONCREATE (IGREATERP FMEMB EQUAL) PRINTCCODE (\CHARCODEP SMALLP) TWOD.TRACKCURSOR ( +MOUSESTATE ILESSP IGREATERP) \SETFVARSLOT (NULL-NTENTRY EQP) TEDIT.DEACTIVATE.WINDOW (PROCESSP OPENWP +\TEDIT.WINDOW.TITLE) CL:DECODE-FLOAT (=) PROG (\DTEST) COMPILEUSERFN (FMEMB) CL:DECODE-UNIVERSAL-TIME +(>) \CLOSELEAFCONNECTION (CLOSESEQUIN) FW-RECALL-CMD (OPENP) PAINTW.CACHE.SHADE (EQUAL) +ICMLARRAY.MENUW.GETLEVEL (ILESSP GREATERP STRINGP STREQUAL FIXP GEQ LESSP) PRINTLEVEL (IGEQ) +\INITCONSPAGE (ZEROP IGREATERP) GREETFILENAME (STREQUAL MEMB) PRINT-CIRCLE-LABEL-P (CL:INTEGERP) +\ALLOCMDSPAGE (SMALLP) \NSFILING.EVENTFN (DIRTYABLE) PFI.MAYBE.PP.DEFINITION (DISPLAYP) TTY/EDITL ( +SOME NLSETQ) CLISPFOR (CLISPELL) \INVALIDATE.PROCESS.WINDOW (ACTIVEWP) CreateCursorBitMap (GREATERP) +DELETE/AND/DISPLAY/LINK (MEMBTONODES) INVERT.BITMAP.HORIZONTALLY (GREATERP) CL:ARRAY-RANK ( +%%ONED-ARRAY-P %%TWOD-ARRAY-P %%GENERAL-ARRAY-P) COMPILER::ENSURE-EFFECT-CONTEXT (EQL CL:MEMBER) +DSPRUBOUTCHAR (DISPLAYSTREAMP) \FIXLINELENGTH.PRESS (IGREATERP) \GET.PRIORITY.QUEUE (IGREATERP) +\CHECKDSTCHANGE (ILESSP) TTGIVEHELP2 (LITATOM STRINGP STRPOS DISPLAYHELP) \SET.PROCESS.NAME ( +FIND.PROCESS) CLISP3C (BOUNDP FNTYP FMEMB NUMBERP) NUMBERPAD.READER.HANDLE.CHAR (NUMBERP GEQ) +DISPLAY/NUMBER/READER/TOTAL (GEQ GREATERP) CHECKCONSPAGES (ZEROP) BSP.PUTINTERRUPT (BSPOPENP +TIMEREXPIRED?) INVERT.LONG.SEGMENT (EQPOS) \LFExtendFileIfNecessary (WITH.MONITOR GREATERP) SPP.OPEN ( +TIMEREXPIRED? FNTYP) \MAPMDS (GREATERP) COURIER.WRITE.BULKDATA (IGREATERP GREATERP) +\DSPYPOSITION.HCPYMODE (NUMBERP) \CHECKCONSPAGE (IGREATERP) SEDIT::SET-OPTIONS (CL:LISTP) +MAKE-CONCATENATED-STRING-INPUT-STREAM (CL:REST) CL::%%CONSTANT-BYTESPEC-P (TYPEP CL:CONSP CL:INTEGERP) + DASSEM.CLEANFNTEST (LITATOM) FTP.BREAKCONNECTION (FMEMB) SMASHFILECOMSLST (LITATOM) CURSOR ( +\CURSOR-VALID-P) CL:DISASSEMBLE (CCODEP CL:SYMBOLP) TB.DISPLAY.LINES (GREATERP <) +\TEST.CHARACTER.LOOKS (NUMBERP) CL::OPTIMIZE-BYTE (TYPEP) COMPILER::EXPAND-OPENLAMBDA-CALL (CL:NOTEVERY + CL:SYMBOLP CL:MEMBER) TITLEDICONW (GREATERP) MSUPDATE (FIXP IGREATERP) CL::%%RATIONAL-FLOAT (= <) +\ADJUSTABLE-STRING-STREAM-OUTCHARFN (IEQP) \LFRemoveDirEntry (\EOFP CL:ZEROP ILESSP) +CL:ENCODE-UNIVERSAL-TIME (< > GREATERP = \ISDST?) SEDIT::SIMPLE-STRING-SCAN (IGREATERP ILESSP) +\TEST.PARAGRAPH.LOOKS (NUMBERP SELECTQ IGREATERP) CL::%%RATIONALIZE-FLOAT (= <) \KEYHANDLER1 ( +IGREATERP \CAUSEINTERRUPT IGEQ ILEQ \UPDATETIMERS ILESSP) \PRINSTACKP (IGREATERP RELSTKP LITATOM) +COMP.STFN (LITATOM) MAKE-FILL-POINTER-OUTPUT-STREAM (CL:ARRAY-HAS-FILL-POINTER-P EXTENDABLE-ARRAY-P) +SEDIT::FIND-NODE (IGREATERP) \PRINSTRING (IGREATERP) MAKEFILE (EQMEMB EQUAL STRING-EQUAL INFILECOMS? +FMEMB FIXSPELL) DOFILESLOAD (BOUNDP LITATOM STRINGP GETPROP SELCHARQ FMEMB) EDITFB (GETPROP) +COMP.TAGBODY (LITATOM OPT.JUMPCHECK) \CKPOSBOUT (IGREATERP) LET (\DTEST) FB.HARDCOPY.DIRECTORY (< >) +\FM.NWAY-MOVEDFN (OPENWP) \CKPOSSOUT (IGREATERP) XYSECT (IGEQ) COMPILER::COMPLETELY-EXPAND (CL:ATOM +CL:MEMBER) CLISP3 (NUMBERP MINUSP SOME CLISPNOEVAL LITATOM FGETD CLISP3B) \SPY.INTERRUPT (IGEQ) +PROCESSP (DEADPROCP) SEDIT::QUERY-THROW-AWAY-CHANGES (EQMEMB) \AB.BACK (FIXP SELECTQ IGREATERP ODDP) +CL:DIRECTORY (EQL) TTRACKMOUSE (MOUSESTATE >= < COMPLEXCHARP) CL:FILE-LENGTH (STREAMP OPENP) \LITPRIN +(FIND-EXACT-SYMBOL IGREATERP >=) MAP.PROCESSES (DEADPROCP) STREAMPROP (IGREATERP) DEFINEDP (LITATOM) +\DSKDISPLAY.REPAINTFN (\LFDirectoryP) LET* (\DTEST) FASL::DUMP-CHARACTER (<) SEDIT::FIND-LINE-START ( +IGEQ) \FM.NWAY-DOWNFN (OPENWP) %%CONCATENATED-STREAM-DEVICE-BIN (EOFP) \DSPXPOSITION.IP (EQP) +COMP.RETURN-FROM (OPT.JUMPCHECK) \DURATIONTRAN (LITATOM \TIMER.TIMERP) \STRING-STREAM-OUTCHARFN (IEQP) + CL:FILE-POSITION (RANDACCESSP) ENDLOADUP (ASSOC) \MAYBEPRINTPACKET (BROADCASTP) FGETD (SMALLP) +\TEDIT.GET.PARALOOKS (IGREATERP ZEROP) SEDIT::EVAL-SELECTION (NUMBERP ATOM) MSSHOWUSE ( +CL:MULTIPLE-VALUE-SETQ) %%CONCATENATED-STREAM-DEVICE-PEEKBIN (EOFP) DRAWMARGINSCALE (GREATERP ZEROP) +CLISPIF (CLISPELL) CL:FLOAT-DIGITS (CL:FLOATP) INVERT.BITMAP.DIAGONALLY (GREATERP) \CURVE (IGEQ +IGREATERP FMEMB ILEQ GREATERP) PUTDQ? (GETD) \VFMSplit1 (IGREATERP) EDITL1 (CL:CATCH) \FM.NWAY-MESSAGE + (\FM.NWAYPROP) CL::BOA-ARG-LIST-WITH-INITIAL-VALUES (CL:SYMBOLP CL:CONSP) \DSPCOLOR.IP (STREAMPROP) +SPP.DSTYPE (READABLE) ROTATE.BITMAP.RIGHT (GREATERP) %%CONCATENATED-STREAM-DEVICE-EOFP (EOFP) +PROMPTINWINDOW (MEMB) COMP.RETURN (OPT.JUMPCHECK) CL:FLOAT-SIGN (CL:FLOATP) PROCESS.RESULT (DEADPROCP) + \LEAF.ERROR (IGREATERP) PERIODICALLYRECLAIM (\SECONDSCLOCKGREATERP) SEDIT::SIMPLE-STRING-OFFSET ( +IGREATERP) \LITPRIN.INTERNAL (< IGREATERP IGEQ ILEQ >=) TEDIT.COPY (ZEROP) SELECT.FNS.EDITOR (CCODEP) +TEDIT.KILL (WINDOWP PROCESSP DEL.PROCESS) SEDIT::SCALE-INDENT (CL:NUMBERP = CL:CONSP EQL) +CL:FLOAT-PRECISION (CL:FLOATP = <) \SPPWATCHER (\CLOCKGREATERP TIMEREXPIRED? SEQ.GREATERP) ENVAPPLY ( +LITATOM) DSPEOLFN (LITATOM) ENSURE.RGB (LITATOM HLSP RGBP) \FTP.NEXTFILE (\EOFP BSPOPENP +DIRECTORY.MATCH) PROCESS-STATUS (LITATOM STRINGP) CLISP3B (ATOM) CROPMARK.CREATE (EVERY) +\CONVERTTOFRACTION (SMALLP) \FM.NWAY-SETUP (EQUAL) TB.SCROLLFN (OBTAIN.MONITORLOCK) ROTATE.BITMAP.LEFT + (GREATERP) TB.RECONSIDERRANGE (GREATERP) COMP.GO (OPT.JUMPCHECK ZEROP) \LFFindNextFile (GREATERP +DIRECTORY.MATCH) PROCESS.FINISHEDP (DEADPROCP) \MAKESTACKP (STACKP TYPENAMEP) \PFTrimHelper (EQL +IGREATERP ZEROP) \TRACKCURSOR (IGEQ IGREATERP ILESSP) CL:FLOATP (FLOATP) FIX89A (FIXSPELL1) +\DEFPRINT.BY.NAME (IGREATERP) TB.CONSIDERRANGE (GREATERP) \SYMBOL.ESCAPE.COUNT (IGREATERP ILEQ > +\NUMERIC.PNAMEP) NCHARS (LITATOM STRINGP IGREATERP) COMPILER::GENCODE-MV-CALL (COMPILER::GLOBAL-FUNCTION-P +) \MAKEFUNARGFRAME (\DTEST) \TEDIT.BRAVOFILE? (\TFBRAVO.FIND.LAST.TRAILER \TEST.CHARACTER.LOOKS +LITATOM) CL:GET-OUTPUT-STREAM-STRING (STREAMPROP) READIMAGEOBJ (GETD MOUSECONFIRM) +\DOBUFFEREDTRANSITIONS (IGEQ \GETBASEPTR) XCL::WHERE-IS-NAMESTRING (CL:EQUAL) \NUMERIC.PNAMEP (STRINGP + LITATOM IGREATERP < <= > >= FMEMB) SEDIT::GET-CONTEXT (CL:EQUAL) STKAPPLY (LITATOM) +TWODINSPECT.MAKEREGIONS (GREATERP) CALLS (LITATOM FMEMB SUBRP CCODEP EXPRP) \SOUT (FMEMB IGREATERP) +\SAVEVMBACKGROUND (ILESSP FIXP \SECONDSCLOCKGREATERP \FLUSHVMOK? GETD) FRESHLINE (WRITEABLE APPENDABLE +) \AB.NEXT (FIXP SELECTQ IGREATERP ODDP) BRACKET.CURRENT.WORD (IGREATERP COMPLEXCHARP) MSNOTICEFILE ( +FMEMB) TEDIT.CHARWIDTH (IGREATERP ILESSP) RETAPPLY (LITATOM) \INSERTCR (IEQP) \DSPSPACEFACTOR.HCPYMODE + (NUMBERP) PNAMESTREAMP (TYPENAMEP) TTRUBOUT (AT.START.OF.LINE AT.START.OF.BUF) FAX.HOSTNAMEP (STRPOS) + \CARET.DOWN (UNINTERRUPTABLY \CARET.SHOW) CL:GET-SETF-METHOD-MULTIPLE-VALUE (CL:SYMBOLP CL:CONSP) +YSECT (IGEQ) POSTSCRIPT.INIT (BOUNDP TYPEP GREATERP FMEMB) CLISPIFY2D (LITATOM GETPROP MEMB BOUNDP) +BLIPVAL (IGREATERP ILESSP) MSCHECKEMPTY (FIXP) CL:GET-SETF-METHOD (CL:SYMBOLP CL:CONSP) +CL:INPUT-STREAM-P (\IOMODEP) GIVE.TTY.PROCESS (DEADPROCP LASTMOUSESTATE) \VAROFFSET (NULL-NTENTRY) +\CHECKFLTFMT (EVERY) NSMAP (GREATERP) SETBLIPVAL (ILESSP IGREATERP) \DSKDISPLAY.BUTTONEVENTFN ( +MOUSESTATE) WHO-LINE-SET-TIME (SHIFTDOWNP MENU) SPP.SENDEOM (APPENDABLE) BLIPSCAN (GETBASEPTR) +NEWLINE.IP (LESSP) SPY.END (OPENWP) \DRAWPOINT.IP (BITMAPP) FLTFMT (\CHECKFLTFMT) EDITBF (EDITBF1) +CL:INTEGER-LENGTH (< CL::BITS-OR-LESS-P) GETVARS (LITATOM) \TEDIT.PEEKBIN.NEW.PAGE (IEQP \EOFP) +\FTP.CLOSEFILE (BSPOPENP \EOFP) WHO-LINE-TIME (TIMEREXPIRED?) INSPECT (ERROR) APPEND (ILEQ) +\REALFRAMEP (CL:SYMBOLP LITATOM FMEMB) CL:INTEGERP (FIXP) PRINTNUM-TO-STRING (IGEQ) \SPP.PREPARE.INPUT + (ILESSP) \NSFILING.UPDATE.ATTRIBUTES (MEMB ASSOC) EXPRP (LITATOM) RECORDFIELD? (RECLOOK FMEMB) +\IPCURVE2 (NUMBERP IGEQ GREATERP IEQP GEQ FGREATERP FLESSP FGTP IGREATERP \CLIPCURVELINE.IP ILESSP) +LISPERROR (STRINGP CL:EQUAL) OPT.DS1 (COMP.CLEANFNOP FMEMB ZEROP) \SETUP.TYPENUM.TABLE (GREATERP +IGREATERP) %%TWO-WAY-STREAM-DEVICE-CLOSEFILE (XCL:TWO-WAY-STREAM-P) CL::DEFINE-CONSTRUCTORS ( +CL::PS-TEMPLATE CL:MEMBER) FIX89 (ATOM FIX89A) INSPECTW.CREATE (GREATERP) MODERNWINDOW.BUTTONEVENTFN ( +MOUSESTATE MEMB NEARTOP) TEDIT.INSERT.UPDATESCREEN (\SYSBUFP TEXTPROP ILEQ IGEQ ILESSP) ALISTS.GETDEF +(CL:SYMBOLP) \DSPLINEFEED.HCPYMODE (NUMBERP) CL:ISQRT (CL:INTEGERP >= ODDP) CLOSEMAINWINDOW ( +\OKTOCLOSEW OPENWP) \LEAF.FIX.BROKEN.SEQUIN (\CLOCKGREATERP HASTTYWINDOWP TIMEREXPIRED?) +CL:INTEGER-DECODE-FLOAT (=) XSECT (IGEQ) CLISPIFY2 (LITATOM FMEMB) MSGETDEF (CL:MULTIPLE-VALUE-SETQ) +BPNT0 (NLSETQ) COMP.PROG (LITATOM OPT.JUMPCHECK) \EVALFORM (LITATOM) DISMISS (THIS.PROCESS +TIMEREXPIRED?) COMPILER::GENCODE-LET (COMPILER::LITERAL-P COMPILER::VARIABLE-CLOSED-OVER) +\NSFILING.CLOSEFILE (DIRTYABLE) \NSADDRESS.PRINT.DECIMAL (> <) FB.INFO.ITEM.NAMED (STRING-EQUAL) +\STKARG (LITATOM ILESSP \SPREADFRAMEP IGREATERP IGEQ NULL-NTENTRY) \GC.HANDLEOVERFLOW (IGREATERP ILEQ +TYPENAMEP CL:INTEGERP) SPP.CLOSE (OPENED) RECLOOK (RECDEC?) \DRAWLINE.IP (NUMBERP < BRUSHP +\CLIPCURVELINE.IP) \DTEST.UFN (TYPENAMEP ILEQ CL:INTEGERP) MENU.HANDLER (STRICTLY/BETWEEN MOUSESTATE +INSIDE? IGEQ TIMEREXPIRED? IGREATERP ILESSP) MKATOM (STRINGP IGREATERP LITATOM NUMBERP) GET.MENU.LIST +(IGREATERP) MSOUTPUT (OPENP) FB.BROWSECOMMAND (FB.DIRECTORYP STRPOS) NEXTSIZEFONT (IGEQ ILESSP LESSP) +SCREENBITMAP (WINDOWP) TB.CONTIGUOUS.SELP (GREATERP) \MAKENUMBER (SMALLPOSP SMALLP) XCL::WHERE-IS-FILES + (CL:LISTP) \FTP.ADD.QUOTES (<=) ICONBUTTONEVENTFN (LASTMOUSESTATE) \SETBSPTIMEOUT (IGREATERP ILEQ) +ONED.TRACKCURSOR (MOUSESTATE ILESSP IGREATERP) CL:LOGCOUNT (MINUSP TYPENAMEP) TB.REPAINTFN ( +OBTAIN.MONITORLOCK) TB.NUMBER.OF.ITEMS (GREATERP) CLISPIFY2C (EQMEMB) CREATE.NUMBERPAD.READER ( +IGREATERP ILESSP) \LFHighestVersions (STREQUAL) \WAITFORSYSBUFP (FIXP \SYSBUFP TTY.PROCESSP +\CLOCKGREATERP) EDIT%: (MEMB) DEFAULT.ADDNODEFN (FASSOC) \GCMAPTABLE (ILEQ TYPENAMEP CL:INTEGERP +IGREATERP GREATERP) WAITFORINPUT (FIXP READP \CLOCKGREATERP) RADIX (SMALLP ILESSP IGREATERP) \INSERTCH + (ZEROP IGEQ) SEDIT::CONVERT-COMMENT-TAIL (STRINGP) \INTERPRETER (LITATOM TYPEP \DTEST IGREATERP +GREATERP) OPT.DELCOPYFN (OPT.CALLP OPT.EQOP COMP.CLEANFNOP SELECTQ) EVAL.IN.TTY.PROCESS (TTY.PROCESSP) + FILEPATCHBLOCK (IGREATERP) TTYINBUFFERPEEK (COMPLEXCHARP) WINDOW.MOUSE.HANDLER (LISPWINDOWP IN/SCROLL/BAR? SCROLL.HANDLER GETD LASTMOUSESTATE .COPYKEYDOWNP. ZEROP TTY.PROCESSP) -GRAPHOBJ.CHECKALIGN (SELECTQ GETNODEFROMID) GETDEFFROMFILE (LITATOM) FB.HEADINGW.DISPLAY (< >) -COMPILER::META-CALL-LAMBDA (COMPILER::VARIABLE-READ-REFS COMPILER::VARIABLE-WRITE-REFS COMPILER::NODE-SUBST-P -) \\MAKEFUNARGFRAME (\\DTEST) ICONW.SHADE (WINDOWP OPENWP) COURIER.WRITE.STRING (ODDP) -\\MEDW.GETWINDOWPROP (DISPLAYSTREAMP) \\JISPEEK (\\NOT.EQUIVALENT.TO.XCCS \\INVALID.TENP \\HANKAKUP) -TEDIT.INSERT.UPDATESCREEN (\\SYSBUFP TEXTPROP ILEQ IGEQ ILESSP) EVAL.AS.PROCESS (THIS.PROCESS) -PFI.MAYBE.PP.DEFINITION (DISPLAYP) CL::STRUCTURE-OBJECT-PROPCOMMANDFN (TYPEP CL::PSLOT-READ-ONLY) -PRINTNUM-TO-STRING (IGEQ) \\LOADNSADDRESS (TYPENAMEP) \\WAITFORSYSBUFP (FIXP \\SYSBUFP TTY.PROCESSP -\\CLOCKGREATERP) SETBLIPVAL (ILESSP IGREATERP) FB.HARDCOPYCOMMAND (SELECTQ) TTREADLIST (SKIPSEPRS) -VIRGINFN (EXPRP) \\TEDIT.FIXCHANGEDLINE (IEQP ILESSP IGEQ ILEQ APPLY* IGREATERP) BESTNSADDRESS ( -GREATERP IGEQ ILESSP ILEQ IGREATERP) BLIPSCAN (GETBASEPTR) SEND.FILE.TO.PRINTER (MEMB -CAN.PRINT.DIRECTLY) SAVEDEF (SUBRP EXPRP CCODEP) \\BACKJISCHAR (\\BACKFILEPTR \\KIMODEP) SEDIT::ADD-MENU - (WINDOWPROP) CL:MAKE-BROADCAST-STREAM (STREAMP) CLISPFORERR (FIXPRINTIN LISPXPRINT TAILP) -TOPW.REPAINTFN (IGREATERP) TB.REDISPLAY.ITEMS (>= TB.ITEM.UPDATABLE?) XCL::GET-UNDOABLE-SETF-METHOD ( -CL:SYMBOLP CL:CONSP) \\COURIER.RECORDTRAN (\\COURIER.QUALIFIED.NAMEP) \\TEDIT.NEWREGIONFN (IGEQ) -COURIER.WRITE.SEQUENCE.UNSPECIFIED (LITATOM FIXP) \\SHIFTJISPEEK (\\SJIS.KANJI.FIRST.BYTEP > -\\NOT.EQUIVALENT.TO.XCCS \\INVALID.TENP \\HANKAKUP) \\TFBRAVO.READ.CHARLOOKS (NUMBERP IGREATERP -FREPLACEFIELD) \\REALFRAMEP (CL:SYMBOLP LITATOM FMEMB) DASSEM.DSTOREFNDEF (FIXP IGEQ ILEQ) \\INSERTCH -(CL:STRINGP ZEROP IGEQ) GRAPHEDITEVENTFN (INSIDE? SHIFTDOWNP) BLIPVAL (IGREATERP ILESSP) \\IPCURVE2 ( -NUMBERP IGEQ GREATERP IEQP GEQ FGREATERP FLESSP FGTP IGREATERP \\CLIPCURVELINE.IP ILESSP) EDIT\: (MEMB -) CL:INTEGERP (FIXP) \\GCMAPTABLE (ILEQ TYPENAMEP CL:INTEGERP IGREATERP GREATERP) \\VAROFFSET ( -NULL-NTENTRY) \\STKARG (LITATOM ILESSP \\SPREADFRAMEP IGREATERP IGEQ NULL-NTENTRY) -FB.INFOMENU.WHENSELECTEDFN (FMEMB) DISMISS (THIS.PROCESS TIMEREXPIRED?) TTYDISPLAYSTREAM (GETD FMEMB -IGEQ) WAITFORINPUT (FIXP READP \\CLOCKGREATERP) COMPARELISTS (COMPARELST) \\LEVELTEXTURE (ILESSP) -\\GET.COURIER.DEFINITION (\\COURIER.QUALIFIED.NAMEP) \\EUCFILEOUTCHARFN (\\ASCIIP -\\NOT.EQUIVALENT.TO.JIS \\CONV.HANKAKU.TO.ZENKAKUP > \\NOTGAIJIP \\HANKAKUP) EVAL.IN.TTY.PROCESS ( -TTY.PROCESSP) XCL::SETF-PACKAGE-PREFIX (CL:SYMBOLP CL:STRINGP) CL:MAKE-PATHNAME (STRINGP) COMPAREDEFS -(PRIN1) \\NSFILING.AFTER.LOGIN (STRING-EQUAL) \\GR.CONTENTS (LITATOM) MSPATHS4 (MSPATHS2) -CL:MAKE-RANDOM-STATE (CL:RANDOM-STATE-P) \\BACKSHIFTJISCHAR (\\BACKFILEPTR \\SJIS.KANJI.FIRST.BYTEP) -GETDEFERR (EQMEMB STRINGP) CHARACTER (SMALLP IGREATERP) \\JISIN (\\NOT.EQUIVALENT.TO.XCCS -\\INVALID.TENP \\HANKAKUP) LIST* (ILEQ) \\EUCIN (\\EUC.KANJI.FIRST.BYTEP \\NOT.EQUIVALENT.TO.XCCS -\\INVALID.TENP \\EUC.HANKAKUP \\GAIJIP) \\GR.DELDEFFN (LITATOM LISTGET) TWODINSPECT.REDISPLAY (EQUAL -IGREATERP) SORT1 (SELECTQ ALPHORDER APPLY*) \\TFBRAVO.FIND.LAST.TRAILER (IGREATERP ILEQ FMEMB) -\\HANDLE.RAW.10TO3 (EQNSADDRESS.HOST >= MEMB) TTADJUSTWORD (FMEMB LITATOM) VRULE.DISPLAYFN (>=) -\\GENERIC.DSPCREATE (TYPENAMEP) \\SEQUIN.PROCESS (\\SEQUIN.HANDLE.INPUT \\CLOCKGREATERP ILESSP) -\\DOTRANSITIONS (GREATERP) RESHADEITEM (FONTP) FORMAT-PRINT-RADIX-AUX (TYPEP) \\THROUGHFILEOUTCHARFN ( ->) CL:MISMATCH (EQL) \\BACKTHROUGHCHAR (\\BACKFILEPTR) \\SHIFTJISIN (\\SJIS.KANJI.FIRST.BYTEP > -\\NOT.EQUIVALENT.TO.XCCS \\INVALID.TENP \\HANKAKUP) \\TEXTEOFP (IEQP ZEROP) ESUBST (NLSETQ) CGETD ( -LITATOM) REQUIREVERSION (LESSP) \\EUCPEEK (\\EUC.KANJI.FIRST.BYTEP \\NOT.EQUIVALENT.TO.XCCS -\\INVALID.TENP \\EUC.HANKAKUP \\GAIJIP) \\GET.EXTERNALFORMAT.FROM.NAME (LITATOM) CL:MERGE (CL:LISTP -CL:VECTORP) PROCESS.APPLY (TYPENAMEP) TEDIT.FORMATTEXTBOX (IGREATERP LISTGET ZEROP ILESSP) RADIX ( -SMALLP ILESSP IGREATERP) \\DECODETRANSITION (IGREATERP ILESSP ASSOC) \\DEFINEDEVICE (TYPENAMEP FMEMB -LITATOM) CHANGENAME1 (EXPRP CCODEP LITATOM) U-CASE (LITATOM IGREATERP IGEQ ILEQ STRINGP) INFILECOMTAIL - (LITATOM) APROPRINT (IMAGESTREAMP) \\JISFILEOUTCHARFN (\\KIMODEP \\ASCIIP \\NOT.EQUIVALENT.TO.JIS -\\CONV.HANKAKU.TO.ZENKAKUP >) EXPRP (LITATOM) \\SHIFTJISFILEOUTCHARFN (\\ASCIIP -\\NOT.EQUIVALENT.TO.JIS \\CONV.HANKAKU.TO.ZENKAKUP > ODDP >=) \\PRINTFRAME (IGEQ ILESSP EVENP) -CL:NUMBERP (NUMBERP) SHOWCHARS (GREATERP IGEQ ILEQ) TEDIT.FORMATFOLIO (IGREATERP ILESSP) -FB.DISPLAY.COUNTERS (IGREATERP) CL:OUTPUT-STREAM-P (\\IOMODEP) \\GETDEVICEFROMNAME (LITATOM STRINGP) -\\MEDW.TOTOPW (OPENWP OPENW) \\TRANSLATE.10TO3 (EQNSADDRESS.HOST) DASSEM.DWRITEFN ( -DASSEM.SAVELOCALVARS FIXP IGEQ ILEQ FFETCHFIELD) EDIT4E (NUMBERP STRINGP STREQUAL LITATOM SKOR0 PRIN1 -NLSETQ) \\GETDEVICEFROMHOSTNAME (TYPENAMEP) APROPOS (FNTYP) TEDIT.SETSEL (TYPENAMEP IGREATERP) -\\SCANFORNTENTRY (NULL-NTENTRY IEQP FIXP SMALLP) FB.NEWINFOCOMMAND (OPENWP LESSP) \\TEDIT.LOOKS ( -IGREATERP) PRINTHISTORY2 (ATOM) COMP.VARTYPE (COMP.ANONP) DELFROMCOMS (LITATOM) MSVERBED (EQUAL) -CL:PARSE-NAMESTRING (CL:EQUAL) \\IDLE.TIME (ILESSP GREATERP) OPT.JUMPTHRU (OPT.EQVALUE OPT.CALLP -COMP.CLEANFNOP OPT.EQOP) \\FLOATTOBYTE.UFN (GREATERP) MSPATHS2 (MSMEMBSET MSPATHS2 GETD) EDITFPAT ( -STRPOS) \\PRINTBF (GREATERP IGEQ) SEDIT::STRUCTURE-FROM-STRING (CL:STRINGP) \\LOOKUPPUPNUMBER ( -GREATERP IEQP EQUAL TIMEREXPIRED?) NEWLINE.PRESS (ILESSP) \\REMOVEDEVICE.NAMES (EQMEMB) \\BACKEUCCHAR -(\\BACKFILEPTR BITTEST \\EUC.HANKAKUP \\GAIJIP) \\BLKFABSMAX.UFN (GREATERP) EDITXTR (TAILP) -GRAPHBUTTONEVENTFN (LASTMOUSESTATE INSIDE?) \\BLKFABSMIN.UFN (GREATERP LESSP) INTERPRESS.OUTCHARFN ( -\\FATCHARCODEP SMALLP <= > < >=) EDITMBD (FEDITFINDP TAILP) CL:PEEK-CHAR (\\XCCSP \\BACKFILEPTR -CL:CHARACTERP) \\CLOSEFILE (READONLY) GETBLOCKDEC (MEMB) EDITMV (MEMB TAILP) -%TWO-WAY-STREAM-DEVICE-CLOSEFILE (XCL:TWO-WAY-STREAM-P) CL:COMPILED-FUNCTION-P (ARRAYP) \\BLKFMIN.UFN -(GREATERP LESSP) MSMATCHRATING (EQUAL MSSIMPLESET) CL:PROBE-FILE (STREAMP OPENP) -DBG::FIND-ORIGINAL-NAME-AND-DEFINITION (CL:SYMBOLP CL:ATOM CL:MEMBER) \\CANONICALIZE.NSADDRESS ( -EQNSADDRESS.HOST) \\BLKSMALLP2FLOAT.UFN (GREATERP) CL:PROVIDE (CL:SYMBOLP) |UnixPrint| (STRPOS) -COPYINSERT (IMAGEOBJP) TEDIT.FIND (STRINGP LEQ LITATOM GREATERP) \\BLKFLOATP2COMP.UFN (GREATERP) -COPIEDFILEPATTERN (EQUAL) \\NSPRINT.FULL.REQUEST.STATUS (STREQUAL) \\BLKFMAX.UFN (GREATERP) -XCL::UNDOABLY-SETF-MACRO-FUNCTION (GETD) TB.MAKE.BROWSER (STRPOS) \\BLKEXPONENT.UFN (GREATERP) -\\GR.PUTDEFFN (LITATOM LISTGET EQUAL) MOVE.TO.START.OF.WORD (AT.END.OF.LINE SELCHARQ) PROCESS.EVAL ( -TYPENAMEP) ONEDINSPECT.SELECTITEM (EQUAL) TEMPLATE (EQUAL) \\NOTE.10TO3 (EQNSADDRESS.HOST) -DASSEM.DASSEM (IGEQ ILEQ FIXP ILESSP IGREATERP FMEMB LITATOM) \\ADD.CONNECTED.DIR (LITATOM STRINGP -UNPACKFILENAME.STRING) \\TEDIT.UNPARSE.CHARLOOKS.LIST (IGEQ IGREATERP ILESSP) \\EVENTKEYS (KEYDOWNP) -LOADBLOCK (EXPRP) SEDIT::CREATE-PRELINEARIZED-NODE (FREPLACEFIELD) \\TEDIT.APPLY.PAGEFORMATTING ( -GREATERP) CL:PHASE (= CL:COMPLEXP MINUSP) EDITFROMFILE (FMEMB LITATOM MEMBER LOOKIN ERSETQ) EQCLOOKS ( -TYPENAMEP) TEDIT.FORMATHEADING (EVAL IGEQ) CL:RANDOM (>) OPT.JUMPOPT (OPT.JUMPTHRU OPT.JUMPREV) -\\BLKFDIFF.UFN (GREATERP) \\CURSORDESTINATION (ILESSP) \\BLKSEP.UFN (GREATERP) FULLPRESSBITMAP (ILESSP -) WRITE-UNICODE-INCLUDED (GREATERP) TEDIT.FORMATPAGE (ILEQ IGREATERP IGEQ ILESSP) \\IDLE.EXIT? (MEMB -\\IDLE.IS.PREVIOUS \\IDLE.ISMEMBER \\IDLE.AUTHENTICATE) \\SOFTCURSORUP (TYPENAMEP) \\MEDW.REDISPLAYW ( -SUBREGIONP) \\BLKFPLUS.UFN (GREATERP) \\SOFTCURSORUPCURRENT (IGREATERP ILESSP) IRM.LOOKUP (TYPENAMEP -OBTAIN.MONITORLOCK) \\BLKMAG.UFN (GREATERP) OPT.XVARSCAN1 (FMEMB) GETDEFCURRENT (LITATOM EXPRP EQMEMB -FMEMB WHEREIS) FNCHECK (LITATOM MEMB RELSTK) \\HARDCURSORPOSITION (ILESSP IGEQ IGREATERP) EDIT4F ( -NUMBERP TAILP EDIT4E ZEROP EDIT4F1) CL:READ-BYTE (\\EOFP) \\TEDIT.TEXTBIN.NEW.PAGE (IEQP) -\\BLKFTIMES.UFN (GREATERP) FB.NEWPATTERNCOMMAND (FB.MAYBE.EXPUNGE) \\BSP.FLUSHINPUT ( -\\BSP.PREPARE.INPUT) LISPXREPRINT (STRINGP CL:STRINGP) \\HANDLE.NS.ROUTING.INFO (>= TYPENAMEP <= <) -GETPROP (LITATOM) CL:REM (CL:INTEGERP CL:FLOATP) CL:READ-CHAR-NO-HANG (READP EOFP) -\\BRUSHCONVERT.HCPYMODE (NUMBERP) COMPILER::GENCODE-CALL (COMPILER::CALLER-NOT-INLINE COMPILER::VAR-REF-P - CL:EQUAL <= COMPILER::LAMBDA-REST = COMPILER::LAMBDA-KEYWORD COMPILER::GLOBAL-FUNCTION-P CL:MEMBER -COMPILER::LITERAL-P COMPILER::LAMBDA-P COMPILER::LAMBDA-NEW-FRAME-P COMPILER::OPCODES-P COMPILER::PASSABLE -) \\BLKPERM.UFN (GREATERP) PACK* (IGREATERP LITATOM STRINGP) BITMAPCREATE (IGEQ IGREATERP) EDITCONT ( -EDIT4F NLSETQ EDIT4E) \\CCODEIVARSCAN (FIXP SMALLP GREATERP FFETCHFIELD EQP) \\BLTSHADE.IP (>) -MSPATHS1 (NUMBERP MINUSP MSPATHS2 SOME) CL:RENAME-FILE (STREAMP OPENP) CL:READ-LINE (\\EOFP) -\\CCODEARGLIST (< > LISTGET STRINGP GREATERP) \\PROCESS.MOVEFRAME (IEQ EVENP) \\TEDIT.SELECT.CHARACTER - (SMALLP FMEMB) MAKEINITBFS (GREATERP) IBLT2 (LESSP GREATERP) BRECOMPILE3 (EXPRP) CL:SCALE-FLOAT (=) -\\NSRANDOM.OPENFILE (TYPENAMEP OPENED) SCANX (IGREATERP ILESSP) DISPLAYLINK (IGREATERP) LISPERROR ( -STRINGP CL:EQUAL) FB.CREATE.FILEBUCKET (STRINGP DIGITCHARP IGEQ STRING-EQUAL) \\TEDIT.FORMAT.FOUNDBOX? - (IEQP) DECODE-NS-STRING (<) \\GENERIC.READCCODE (\\XCCSP \\BACKFILEPTR) \\MEDW.SHAPEW ( -\\USERFNISDON\'T LESSP EQUAL) COMPILER::EFFECTS-ANALYZE-LITERAL (COMPILER::EVAL-WHEN-LOAD-P) -MACROEXPANSION (LITATOM FMEMB) CL:SINH (CL:COMPLEXP) ERRM-TO-CONDITION (TYPEP) OPENPRSTREAM (EQLENGTH -EVERY) IBLT1 (LESSP GREATERP) \\GETSTREAM (TYPENAMEP LITATOM) FINDSYSRECDECL (TYPENAMEP) -COMPILER::META-EVAL-PROGN (COMPILER::LITERAL-P) \\TEDIT.FORMATTEDP1 (ILEQ IGREATERP IEQP) OPT.XVARSCAN - (FMEMB) INSURE.RGB.COLOR (FIXP LITATOM HLSP RGBP) ONEDINSPECT.REDISPLAY (EQUAL IGREATERP) -\\MEDW.EXPANDW (OPENWP \\USERFNISDON\'T) MINIMUMWINDOWSIZE (LITATOM) BRHL/MOVE/RIGHT (FMEMB ILESSP) -CL::BUILD-COPIER-TYPE-CHECK (CL::PS-PREDICATE) MSPATHS (MSMEMBSET) \\CLEARSYSBUF (TTY.PROCESSP) -FB.INSERT.SUBDIRECTORIES (EQ.DIRECTORYP) \\TEDIT.GET.CHARLOOKS (ZEROP IGREATERP) CL:VALUES (FIXP -SMALLP GREATERP >= IGREATERP <= IGEQ) \\WAIT.FOR.TTY (TTY.PROCESSP) \\RECLAIMARRAYBLOCK (< IEQ -\\RECLAIMCODEBLOCK) CREATEHASHFILE (NUMBERP GREATERP ARRAYP) FB.INSERT.FILE (EQ.DIRECTORYP -NULL.DIRECTORYP) \\SIMULATE.UNBIND (GREATERP) MSRESPELL (LITATOM) SEDIT::TTYEXITFN (FFETCHFIELD) -\\FM.RESHAPEFN (IGEQ IGREATERP ILEQ ILESSP) \\PROCESS.INIT (CCODEP) OPT.SCANOPT (FMEMB SOME -OPT.DEADSETQP COMP.CLEANFNOP EQUAL SELECTQ RPLACA OPT.EQVALUE) PRINTFILEPROP (EQMEMB) CL:SQRT (=) -FINDRECDECL (TYPENAMEP) WAIT.FOR.TTY (TIMEREXPIRED?) \\FM.REDISPLAYMENU (OPENWP) \\DRAWCURVE.PRESS ( -EVERY \\DRAWCURVE.PRESS.LINE) \\PROCESS.EVENTFN (ALIVEPROCP DEADPROCP TYPENAMEP) XIPAPPEND.CELL ( -IGREATERP) PRETTY-TYPE-NAME (SOME EQUAL CL:SYMBOLP) \\TEDIT.INSPECTCODE (LITATOM CCODEP DEFINEDP) -COMP.CONST (COMP.PREDP SELECTQ SHOULDNT) \\NSYSBUFCHARS (IGREATERP) CONVHANKAKU (>) \\PUTBASEBITS ( -GREATERP) CL:STRING-GREATERP (> CL:CHAR-GREATERP) CHARSET (>= <) COMP.USERFN (CL:KEYWORDP INTERSECTION - LITATOM) PRINTROUTINGTABLE (GREATERP FIXP TIMEREXPIRED?) CL:SIGNUM (CL:ZEROP) CL:STRING-NOT-GREATERP -(CL:CHAR-NOT-GREATERP) \\CDR.UFN (ZEROP IGREATERP LITATOM STRINGP) \\NSFILING.GETFILEINFO (TYPENAMEP -DIRTYABLE MEMB) INITX (IGREATERP ILESSP) CL::VALUES-LIST-UFN (FIXP SMALLP >= IGREATERP <=) \\SYSBUFP ( -TTY.PROCESSP) CL:STRING-NOT-LESSP (CL:CHAR-NOT-LESSP) CLOSEW (OPENWP \\OKTOCLOSEW) \\ENQUEUE.TIMER ( -ILEQ) SEDIT::STRINGWIDTH (STRINGP IGREATERP ILESSP) MB.NWAYBUTTON.SELFN (INSIDE?) CL:STRING-LESSP (< -CL:CHAR-LESSP) MAKEFILES (FILES?1) MAPFILES (STRPOS FMEMB) OPEN (CL:MEMBER) TRACKW (MOUSESTATE) -\\MEDW.SHRINKW (OPENWP TYPENAMEP WINDOWP STRINGP) CL::%COMPLEX-TREE-EQUAL (CL:CONSP) -\\TEDIT.ACTIVE.WINDOWP (FFETCHFIELD) MOUSECHORDWAIT (IGREATERP) \\PROC.AFTER.WINDOWWORLD (TYPENAMEP) -SETFILEINFO (TYPENAMEP FIXP IGEQ ILEQ) \\PEEKSYSBUF (\\SYSBUFP TTY.PROCESSP) CL::VALUES-UFN (FIXP -SMALLP GREATERP >= IGREATERP <= IGEQ) FIND.START.OF.WORD (WORDSEPRP IGREATERP COMPLEXCHARP) -SEARCHPRETTYTYPELST (LITATOM) MSSEEK-WORD (MSWORD?) PACKFILENAME (<= STREQUAL EQMEMB FIXP) \\FM.OPENFN - (WINDOWP WINDOWPROP STKPOS) DBG::DEBUGGER-BUTTON-EVENT (LASTMOUSESTATE) XIPAPPEND.STRING (ILESSP) -BLOCKCOMPILE1 (MEMB ASSOC EXPRP FMEMB) \\SMASHMENUIMAGEONRESET (FMEMB) \\SETGLOBALVAL.UFN (FIXP ILESSP -) \\CAR.UFN (ZEROP LITATOM STRINGP) \\UNWIND.UFN (GREATERP) CL:STRING>= (CL:CHAR>=) \\RESHOWBORDER1 ( -FMEMB) BREAK.PROCESS (TYPENAMEP FFETCHFIELD) \\TFBRAVO.SPREAD.LOOKS (IGREATERP) -\\ROUTINGTABLE.INFOHOOK (GREATERP) BRECOMPILE1 (LITATOM MEMB ATOM BRECOMPILE2) \\OPENFILE (TYPENAMEP -\\IOMODEP) CL:STRING< (< CL:CHAR<) \\NSRANDOM.CLOSEFILE (\\GETACCESS DIRTYABLE) TERMX (IGREATERP -ILESSP) \\COURIER.PUTDEF (EQUAL) CL:STRING<= (CL:CHAR<=) CL::%SIMPLE-TREE-EQUAL (CL:CONSP) -CLISPFORVARS1 (STRPOSL LITATOM) MAPFILES1 (>= STRING-EQUAL FMEMB) \\HANDLE.RAW.3TO10 (>= MEMB) -MB.NB.PACKITEMS (ILESSP IGEQ) CLRPROMPT (TYPENAMEP) TEDIT.SCAN.LINE (GREATERP ILESSP SMALLP -\\TEDIT.WORD.BOUND IGEQ) CL:SUBTYPEP (CL:EQUAL) CL:STRING> (> CL:CHAR>) BRKDWN1 (IGREATERP GREATERP) -\\KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS (EQUAL) \\RPLACD.UFN (ZEROP ILEQ IGREATERP) -\\NSFILING.SETFILEINFO (TYPENAMEP) DEFAULT.INSPECTW.VALUECOMMANDFN (MOUSESTATE TYPENAMEP) -\\FINDKEY.UFN (GREATERP) ADD/AND/DISPLAY/LINK (MEMBTONODES) REMOVEITEM (MEMBER SOME) OPT.POSTOPT ( -FMEMB OPT.FRAMEOPT) \\REVALIDATEFILE (EQUAL) \\CLEAR.ROUTING.TABLE (GREATERP) \\SPP.HANDLE.INPUT ( -SEQ.GREATERP IGREATERP SEQ.GEQ) CL::%VALID-TYPE-P (CL:CONSP CL::TYPE-EXPANDER) CL::SYMBOL-TYPE ( -CL:KEYWORDP) \\IOMODEP (FMEMB) \\UNQUEUE (FREPLACEFIELD) FORGETPAGES (IGEQ ILEQ BUFFERINUSEP) -TTRACKMOUSE (MOUSESTATE >= < COMPLEXCHARP) CL::%SIMPLE-ASSOC (CL:SYMBOLP TYPEP CL:CHARACTERP) -DBG::RELEASE-DEBUGGER-WINDOW (WINDOWP) \\CHECK.PQUEUE (TYPENAMEP) XIPAPPEND.WORD (IGREATERP) -PAINTW.CACHE.SHADE (EQUAL) \\CONS.UFN (ZEROP ILEQ IGEQ) MAYBE.PRETTYFILEINDEX (PRETTYFILEINDEX -PFI.ORIGINAL.LISTFILES1) CL:TANH (CL:COMPLEXP) SI::%STRUCTURE-DECLARE-DATATYPE (CL:SYMBOLP SMALLPOSP -SMALLP) UNMAKEHARDCOPYMODESTREAM (WINDOWP FMEMB) CL::ARRAY-TYPE (SIMPLE-ARRAY-P CL:SIMPLE-STRING-P -CL:SIMPLE-BIT-VECTOR-P CL:STRINGP CL:BIT-VECTOR-P) KEYACTIONTABLE (IGEQ) \\BOUT (NUMBERP GREATERP) -PPROC1 (DEADPROCP IGEQ TYPENAMEP) MB.MARGINBAR.TABTRACK (MOUSESTATE INSIDE? IEQP) NEWFAULT1 (LITATOM) -\\EVAL (LITATOM NUMBERP) PPROC (FMEMB) CL:TRUENAME (STREAMP XCL:SYNONYM-STREAM-P FFETCHFIELD) -\\SAVESYSBUF (TTY.PROCESSP IGREATERP GREATERP) CL:UNREAD-CHAR (\\XCCSP \\BACKFILEPTR) CL::DEFINE-COPIERS - (CL::PS-TEMPLATE) TWOD.TRACKCURSOR (MOUSESTATE ILESSP IGREATERP) COMPILER::FRAME-ANNOTATE-CALL ( -COMPILER::LAMBDA-P) CL::%TYPEP-PRED (CL:CONSP) \\RPLACA.UFN (ZEROP) FLUSHRIGHT (MINUSP ZEROP) -\\MEDW.MOVEW (FMEMB SUBREGIONP POSITIONP NUMBERP REGIONP ILESSP IGREATERP) \\PAGED.REVALIDATEFILE ( -EQUAL) CL::%SIMPLE-MEMBER (CL:SYMBOLP TYPEP CL:CHARACTERP) KEYACTION (IGEQ) \\ENDPAGE.PRESS (ODDP) -\\DRAWCURVE.PRESS.LINE (EQP ILESSP) SI::DATATYPE-P (\\TYPENUMBERFROMNAME) GETINTERRUPT ( -\\SYSTEMINTERRUPTP NUMBERP) GETWINDOWPROP (DISPLAYSTREAMP) CL:USER-HOMEDIR-PATHNAME (MACHINETYPE -CL:STRING-NOT-EQUAL) \\RESTLIST.UFN (LESSP) CL:VALUES-LIST (FIXP SMALLP >= IGREATERP <=) -\\TYPEGLOBALVARIABLE (FMEMB GETPROP) SETF-MACRO-FUNCTION (GETD) \\CHECKAPPLY* (LITATOM TYPEP) -\\UNBOXFLOAT3 (GREATERP) COMP.PROGLST (ILEQ) \\TEDIT.ADJUST.LINES (ZEROP ILESSP APPLY* IGREATERP IGEQ) - MSWORD? (LITATOM) INTCHAR (FIXP \\SYSTEMINTERRUPTP LITATOM) \\PROCESS.MAKEFRAME (ILESSP) -\\SPP.NOT.RESPONDING (>= \\CLOCKGREATERP) FB.GREATEST.PREFIX (STRPOS) FB.EDITCOMMAND (DIRECTORYNAMEP -GETD) FB.EXPUNGECOMMAND (DELFILE) SETINTERRUPT (\\SYSTEMINTERRUPTP) ONEDINSPECT.SCROLLFN (EQP FLOATP) -\\SHAPEW2 (OPENWP) SCROLLBYREPAINTFN (FLOATP IGREATERP SUBREGIONP) \\MEDW.CLOSEW (FMEMB) HASHLINKS ( -SELECTQ) FORMAT-PRINT-CARDINAL (MINUSP ZEROP) WHICHW (POSITIONP INSIDE?) MDESCALE (IEQP) COMP.UNBOX ( -LITATOM OPT.CALLP) RESTOREMAP (BUFFERINUSEP) \\INSUREWINDOW (TYPENAMEP DISPLAYSTREAMP) CL::RANGE<= ( -CL:CONSP <= <) SEDIT::TRANSLATE-CHARS (IGREATERP SEDIT::ATOM-CHAR-ESCAPED ILESSP) \\DRAWLINE.UFN (IGEQ - GREATERP IGREATERP) PUTPROP (LITATOM) CL::USEFUL-TYPE-EXPANSION-P (CL:CONSP) SEDIT::CONTAINS? (ILESSP - ILEQ) \\DOINTERRUPTHERE (LITATOM) COMP.UNBIND.VARS (OPT.JUMPCHECK) CL::%APPEND (CL:ATOM) -EXTEND/TRANSITION/CHAIN (IEQP ILESSP) \\FIXDLINES (ILESSP IGEQ ILEQ IEQP) -CL::COMPLETE-META-EXPRESSION-DEFAULTS (CL:LISTP) \\NSRANDOM.WRITEPAGES (<) |\\PFInitializeVols| ( -GREATERP) CL::BASE-SUBTYPEP (CL:CONSP CL:EQUAL CL:MEMBER) KEYBOARDTYPE (STREQUAL) \\HTFIND (.MODENTRY. - IGEQ) \\MAIKO.IO-INTERRUPT (ZEROP) DELFROMCOM (LITATOM MEMB EQMEMB) CL:COPY-TREE (CL:CONSP) -\\PROCESS.MAKEFRAME0 (IEQ) \\ARG0 (IGREATERP) \\NSRANDOM.READPAGES (> >= DIRTYABLE GREATERP) -\\PRESSCURVE2 (IGREATERP GREATERP IEQP FGTP FLESSP ILESSP) CL:BUTLAST (< <=) LISPXUSE1 (STRPOS) -DELFROMCOM1 (LITATOM) CLISPFOR1 (FNTYP FMEMB EVERY) CL:NRECONC (CL:CONSP) FONTNAME.IP (MEMB) -\\DEL.PACKET.FILTER (FMEMB) \\NOFILESNEXTFILEFN (IGREATERP) EQL (CL:NUMBERP TYPEP CL:FLOATP CL:INTEGERP -) ALIGNMENTNODE (GREATERP LESSP) TEDIT.SELECT.LINE.SCANNER (ILESSP ILEQ IGEQ IGREATERP IEQP ZEROP) -\\FILE-CONFLICT (TYPENAMEP) RESHAPEBYREPAINTFN (IGREATERP \\INBETWEENP ILESSP) COMP.BIND.VARS ( -IGREATERP) \\AGE.ROUTING.TABLE (GREATERP TIMEREXPIRED?) MSVERB (FMEMB) \\DELETECH (IEQP IGEQ ZEROP -ILEQ IGREATERP ATOM ILESSP) \\RELEASE.IOCB (EMADDRESSP) DBG::CLOSE-DEBUGGER-WINDOW (PROCESSP -PROCESS.EVALV) XIPAPPEND.BYTE (IGEQ) PFI.ENQUEUE (FIND.PROCESS) SASSOC (EQUAL) CL::SUBTYPEP-TYPE-EXPAND - (CL:MEMBER CL:CONSP) CONTROL-T (HASTTYWINDOWP OPENWP STACKP XCL::INTERESTING-FRAME-P) -DWIM-SYMBOL-PACKAGE (LITATOM CL:KEYWORDP BOUNDP CL:FBOUNDP FIXSPELL1) PROPLISTP (LITATOM) -PRETTYFILEINDEX (TYPENAMEP DISPLAYSTREAMP FIXP) COMPILEUSERFN1 (TAILP) NUTF8CODEBYTES (ILESSP) -COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::BLOCK-CLOSED-OVER-P) FIND.PROCESS (TYPENAMEP FFETCHFIELD -LITATOM STRINGP) SHAPEW1 (OPENWP) PROCESS.STATUS.WINDOW (WINDOWP > FMEMB) \\TFBRAVO.EOLS (GREATERP) -\\MAP.ROUTING.TABLE (GREATERP) ADDMENU (WINDOWP SUBREGIONP) RETRYSCAN (GETHASH) SPAWN.MOUSE (GREATERP) - SHADEITEM (\\MENUSUBITEMS) COMP.CHECK.VAR (COMP.GLOBALVARP LITATOM) \\TEDIT.FIXINSSEL (IGEQ IGREATERP -) MSOBJTYPE (FMEMB) REMPROP (LITATOM) CL::EQUAL-DIMENSIONS (CL:EQUAL) \\IS.NOT.RANDACCESSP (TYPENAMEP) - RESETKEYACTION (IGEQ) COMP.FLOATUNBOX (OPT.CALLP NUMBERP EQUAL) \\GCRECLAIMCELL (ILEQ CL:FUNCALL) -\\FILE.NOT.OPEN (TYPENAMEP) PRESSBITMAP (EQUAL ILESSP) SKOR0 (ILESSP NUMBERP) AWAIT.EVENT (TYPENAMEP) -CL:NBUTLAST (<) UTF8HEXSTRING (ILESSP) FB.UPDATECOMMAND (FB.MAYBE.EXPUNGE) TWODINSPECT.SCROLLFN (EQP -FLOATP) \\TFBRAVO.PARAMNAMEP (EVERY) \\TFBRAVO.READ.USER.CM (FILEPOS NLSETQ NUMBERP) \\TFBRAVO.LCASER -(IGREATERP ILESSP) PPROCREPAINTFN (LASTMOUSESTATE ZEROP) FB.REMOVE.FILE (NULL.DIRECTORYP EQ.DIRECTORYP -) CL:REVAPPEND (CL:CONSP) \\SELECTPROCESS (FMEMB) \\STKSCAN (FIXP ILESSP EQP GREATERP EVENP) -\\PROCESS.GO.TO.SLEEP (TYPENAMEP) \\TEXTCLOSEF-SUBTREE (ATOM) \\KEYNAMETONUMBER (EQMEMB) MB.NB.SIZEFN -(IGEQ ILEQ GREATERP IEQP) %AREF1 (>= <) DBG::CREATE-DEBUGGER-WINDOW (HASTTYWINDOWP) FULLNAME ( -TYPENAMEP) \\ASSIGNDATATYPE1 (EQUAL IGREATERP IGEQ) %ASET1 (>= <) \\HCPYMODEDSPPRINTCHAR (IGREATERP -ILESSP) INSPECT/TOP/LEVEL/LIST (GREATERP) SEDIT::UNDO-LIST-REPLACE (SEDIT::DEAD-NODE?) -\\BUFFERED.REVALIDATEFILE (EQUAL) RESET.INTERRUPTS (CHARCODEP) \\GETCHARCODE (NUMBERP \\CHARCODEP -SMALLP LITATOM) SELECT.FNS.EDITOR (CCODEP) FB.MAKE.BROWSER.BUSY (OBTAIN.MONITORLOCK) GETFILEINFO ( -TYPENAMEP OPENED RANDACCESSP) \\MISCN.UFN (BOUNDP) \\ATOMCELL (FIXP) BRACKET.CURRENT.WORD (IGREATERP -COMPLEXCHARP) \\MEDW.OPENW (FMEMB) CL:COPY-ALIST (CL:CONSP) \\NSRANDOM.TRUNCATEFILE (=) CHARCODEP ( -SMALLP IGEQ) ADDNEWCOM (SELECTQ FMEMB) PACKFILENAME.STRING (<= STREQUAL EQMEMB FIXP) -\\CONTROL-T.PRINTRATIO (IGREATERP ILESSP) \\PSWOP.SELECTED (FMEMB MOUSECONFIRM TIMEREXPIRED?) -GRAPHOBJ.FINDGRAPH (INSIDE? LASTMOUSESTATE) CL::%SIMPLE-SUBLIS (CL:ATOM) \\GCSCAN1 (ILEQ) FETCHFIELD ( -IGREATERP) \\ILLEGAL.DEVICEOP (GREATERP) PROCESS.NAME (TYPENAMEP) IN/SCROLL/BAR? (INSIDE?) -CL::%COMPLEX-ASSOC (CL::%EQCODEP) XCL::INTERESTING-FRAME-P (STACKP CL:SYMBOLP) \\PSC.SYMBOLS (EQUAL) -WHATIS (FMEMB) CL::%COMPLEX-SUBLIS (CL:ATOM) GETDESCRIPTORS (LITATOM) PRINTCONSTANT (STRPOS) -SI::INTERNAL-THROW (SI::UNWIND-TO-BLIP GREATERP) COMPILEUSERFN (FMEMB) FB.MAYBE.INSERT.FILE ( -DIRECTORY.MATCH GEQ STRING-EQUAL NULL.VERSIONP = SELECTQ) XCL::UNDOHOOK (CL:ATOM) MONITOR.AWAIT.EVENT -(TYPENAMEP) IDLE.BITMAP (WINDOWP STRINGP LITATOM) \\PUTBASEBYTE (SMALLPOSP SMALLP ILESSP EVENP) -|\\PFCreateVols| (BOUNDP TYPENAMEP ZEROP EQL HASHARRAYP GREATERP) PRINTFILETYPE (IMAGESTREAMP STRINGP -OPENP RANDACCESSP) PFI.PASS.COMMENT (MEMB) TRACE (CL:CONSP) \\ADDBASE (ILEQ TYPENAMEP CL:INTEGERP -IGREATERP) TWODINSPECT.MAKEREGIONS (GREATERP) TMPSUBFN (GREATERP IGEQ ILEQ) TTSKIPSEPR (SPACEP -COMPLEXCHARP) \\GETBASEBYTE (EVENP) \\TEDIT.FIXDELSEL (IGEQ IGREATERP IEQP) MSSUBJTYPE (FMEMB) -\\FILE.WONT.OPEN (TYPENAMEP) \\SLOWPLUS2 (FLOATP FIXP) OPENWP (TYPENAMEP) FIND-EDIT-LOCATION-TAIL ( -EQUAL) DSPRUBOUTCHAR (DISPLAYSTREAMP) \\KEYACTION1 (IEQP \\CHARCODEP SMALLP SELECTQ \\PUTBASEBYTE) -TWODINSPECT.ARRANGEWINDOWS (POSITIONP ILESSP LESSP) CL::%EQCODEP (TYPEP) \\TEDIT.DELETE (IGREATERP -IGEQ ZEROP ILESSP) \\SLOWTIMES2 (FLOATP FIXP) GRAPHOBJ.DISPLAYFN (EQP) \\NSRANDOM.SETEOFPTR ( -OVERWRITEABLE APPENDABLE) DETACHWINDOW (ATTACHEDWINDOWS) RECORDTRAN (GETSETQ FMEMB) UNTRACE (CL:EQUAL -CL:CONSP) SHOWSTACKBLOCKS (GREATERP IGREATERP) ADDTOCOM (INFILECOMS? LITATOM EQMEMB) CL:COPY-LIST ( -CL:CONSP) INVERT.LONG.SEGMENT (EQPOS) DINFO (REGIONP TYPENAMEP) \\SLOWDIFFERENCE (FLOATP FIXP) -PROCESS.BACKTRACE (WINDOWP ILESSP) PFI.VARNAME (LITATOM FMEMB) SEDIT::COMPILE-STRUCTURE (ERSETQ) -WFROMMENU (MEMB) COMP.TOPLEVEL.COMPILE (GETPROP VARIABLE-GLOBALLY-SPECIAL-P FMEMB) \\PUTBASE.UFN ( -SMALLPOSP SMALLP) SAMECLOOKS (SELECTQ EQUAL ERROR) COMP.BOX (LITATOM OPT.CALLP) ADDTOVAR (EQUAL) -\\GR.METHODEXPANDER (FNTYP) FB.FINISH.COMMAND (OPENWP) \\FILLINXIP (TYPENAMEP) \\SLOWIQUOTIENT (ILEQ -TYPENAMEP CL:INTEGERP IGREATERP ILESSP IGEQ) MAKEHARDCOPYMODESTREAM (WINDOWP) PREEDITFN (EQMEMB) -CL::%COMPLEX-MEMBER (CL::%EQCODEP) RIGHTW.REPAINTFN (ILESSP) |\\PFInitFileDescriptors| (GREATERP) -\\AB.BACK (FIXP SELECTQ IGREATERP ODDP) \\SLOWHDCPYBLTCHAR (IGREATERP ILESSP FMEMB) COMPILER::META-EVAL-CALL - (COMPILER::LAMBDA-P COMPILER::CALLER-NOT-INLINE COMPILER::GLOBAL-FUNCTION-P CL:EQUAL CL:LISTP -COMPILER::LITERAL-P) EDITFERROR (HASDEF BOUNDP STRINGP \\DEFINEDP GETD) \\SLOWLLSH1 (ILEQ TYPENAMEP -CL:INTEGERP IGREATERP) MOUSECONFIRM (WINDOWP MOUSESTATE) CL::BOA-ARG-LIST-WITH-INITIAL-VALUES ( -CL:SYMBOLP CL:CONSP) \\SLOWQUOTIENT (FLOATP FIXP) UNION (LITATOM FMEMB MEMBER) SAVESET (LITATOM TAILP) - COMP.ASET (LITATOM EQUAL FMEMB) SEDIT::MARKASCHANGEDFN (TYPENAMEP SEDIT::GET-CONTEXT) \\PRINDATUM ( -SMALLP ILESSP IGREATERP FFETCHFIELD PNAMESTREAMP STRINGP TYPENAMEP) EXEC-FORMAT (CL:STRINGP) -ATTACHEDWINDOWS (FMEMB) MB.MARGINBAR.SELFN (INSIDE? MOUSESTATE \\TEDIT.MOUSESTATE EQUAL ZEROP IGEQ -LESSP ILEQ EQP) EDITF (HASDEF) IREMAINDER (ILEQ TYPENAMEP CL:INTEGERP IGREATERP ILESSP IGEQ) -MARKASCHANGED (EQUAL) READOCT (READP EQUAL IGEQ ILEQ) ATTACHWINDOW (MEMB OPENWP) FIX89A (FIXSPELL1) -\\SLOWLOGOR2 (ILEQ TYPENAMEP CL:INTEGERP) |\\PFCreatePhysicalVolume| (BOUNDP TYPENAMEP) \\RPLCONS ( -IGREATERP) ROMANNUMERALS (ZEROP IGEQ) \\TEDIT.WINDOW.OPS (MOUSESTATE INSIDE?) COURIER.READ.SEQUENCE ( -GREATERP) ONED.TRACKCURSOR (MOUSESTATE ILESSP IGREATERP) FORMAT-PRINT-NAMED-CHARACTER (<=) -\\SLOWLOGXOR2 (ILEQ TYPENAMEP CL:INTEGERP) \\SLOWLLSH8 (ILEQ TYPENAMEP CL:INTEGERP) LSH (ILEQ -IGREATERP) COMP.TRANSFORM (COMP.PREDP) DELETE.LONG.SEGMENT1 (ILESSP) COMP.AREF (LITATOM EQUAL FMEMB) -\\CREATEW1 (NUMBERP IGREATERP) APPENDTOVAR (EQUAL) DUMPDATABASE (MEMB) OPT.INITHASH (HARRAYP) -\\ROUTE.XIP (EQNSHOSTNUMBER) UNSAVEBLOCK? (FMEMB EXPRP) \\SLOWIDIFFERENCE (ILEQ TYPENAMEP CL:INTEGERP -ZEROP) \\CHANGECHARSET.HDCPYDISPLAY (EQP GREATERP) HEXSTRING (ILESSP) \\PUTBITS.UFN (SMALLPOSP SMALLP) - GRAPHOBJ.IMAGEBOXFN (NUMBERP) \\AB.NEXT (FIXP SELECTQ IGREATERP ODDP) DSPEOLFN (LITATOM) \\SLOWIPLUS2 - (ILEQ TYPENAMEP CL:INTEGERP) LDIFFERENCE (MEMBER) COURIER.READ.STRING (ODDP GREATERP) \\SLOWITIMES2 ( -ILEQ TYPENAMEP CL:INTEGERP IGREATERP EQUAL ODDP ZEROP IGEQ) NSPRINTER.HOSTNAMEP (STRPOS) CREATEW1 ( -EQLENGTH EVERY TYPENAMEP DISPLAYSTREAMP IGREATERP) TEDIT.DELETE (FIXP) FB.COPY/RENAME.MANY (STRPOS -EQ.DIRECTORYP) |\\PFCreateFileDescriptors| (BOUNDP GREATERP) XYSECT (IGEQ) CL:PAIRLIS (CL:ENDP EQL) -\\GCSCAN2 (ILEQ) EDIT* (MINUSP) ONEDINSPECT.ARRANGEWINDOWS (POSITIONP ILESSP LESSP) -\\TEDIT.TEXTBIN.FILESETUP (IEQP ZEROP ILESSP) INFILECOMSMACRO (EVERY FMEMB SOME) CLISPIF (CLISPELL) -EDITDEFAULT1 (STRINGP) EDITDEFAULT (FMEMB U-CASEP FNTYP GLC SELECTQ NUMBERP EDITSMASH ATOM) %AREF2 ( -%TWOD-ARRAY-P <) YSECT (IGEQ) SCREENBITMAP (TYPENAMEP WINDOWP) \\COURIER.CHECK.PROCEDURES (LITATOM) -BAKTRACE (EQP) EDOR (ERSETQ) \\SLOWIGREATERP (ILEQ TYPENAMEP CL:INTEGERP) DIRECTORY (FNTYP FMEMB -NUMBERP STRINGP FIXSPELL EQL DIRECTORY.NEXTFILE) %ASET2 (%TWOD-ARRAY-P <) METASHIFT (IGREATERP EQUAL) -EDITRAN (ATOM MEMB TAILP) \\SLOWLRSH8 (ILEQ TYPENAMEP CL:INTEGERP) \\SLOWFGREATERP (FLOATP SMALLPOSP -SMALLP ILEQ) IFCDECLARE (\\STKSCAN FMEMB) FIX89 (ATOM FIX89A) MAKE-VECTOR (< >=) EDITTO (NUMBERP -IGREATERP) MSPARSE (MSNEXTWORD) \\BLT (GREATERP LESSP) \\SLOWLOGAND2 (ILEQ TYPENAMEP CL:INTEGERP) -CHANGEPROP (LITATOM) EDITNUMBERP (MINUSP IGREATERP) DO.SHIFTED.SELECTION (KEYDOWNP LASTMOUSESTATE -ZEROP BEFOREBUF NEQPOS EQPOS TTBEFOREPOS) \\SETUP.TYPENUM.TABLE (GREATERP IGREATERP) EDITCOM (NUMBERP -ATOM) LISPXTYPEAHEAD (READP) EDLOC (NLSETQ EQUAL) EDRPT (IGREATERP NLSETQ) KEYNUMBERP (SMALLP IGEQ -ILESSP) \\BOXIDIFFERENCE (ILEQ TYPENAMEP CL:INTEGERP IGREATERP) CALLS (LITATOM FMEMB SUBRP CCODEP -EXPRP) \\HDCPYBLTCHAR (IGREATERP ILESSP FMEMB) TTYIN.PRINTARGS (READTABLEPROP CL:CHARACTERP CL:KEYWORDP -) EDUP (TAILP) HOSTNAMEP (LITATOM STRINGP MEMB FDEVOP) DIRECTORYNAMEP (FDEVOP) \\VAG2 (SMALLPOSP -SMALLP ILESSP) EDITFA (EXPRP SUBRP) \\TEDIT.APPLY.PARASTYLES (LITATOM DEFINEDP) UNPACKFILENAME.STRING -(TYPEP STREAMP EQMEMB STREQUAL > GREATERP DIGITCHARP IGEQ) CL::%LIST-MAP-OPTIMIZER (CL:CONSTANTP -CL:CONSP) TB.NTH.ITEM (> >= <) GETLIS (LITATOM FMEMB) %ARRAY-CONTENT-INITIALIZE ( -%CHECK-SEQUENCE-DIMENSIONS) CL:MAKE-LIST (<) EDITCOMA (LITATOM EVALV TAILP LISPXREADP) -SEDIT::SET-SELECTION-QUOTE (TYPENAMEP) CL:FILL-POINTER (%ONED-ARRAY-P %GENERAL-ARRAY-P) EDITCOML ( -NUMBERP ATOM EDIT4E) \\PRINT-USING-ADDRESS (IGREATERP) INTERSECTION (LITATOM FMEMB MEMBER) EDITSAVE ( -FMEMB NUMBERP) KWOTE (NUMBERP) CHCON1 (STRINGP LITATOM) EQUAL (LITATOM NUMBERP GREATERP LESSP ILESSP -STRINGP) TEDIT.SUBLOOKS (SAMECLOOKS) EXTENDABLE-ARRAY-P (STRINGP) CL:NTHCDR (<) -SEDIT::SELECT-SEGMENT-DEFAULT (TYPENAMEP ILESSP IGREATERP) SUBATOM (LITATOM IGREATERP ILEQ) \\BACKBIN -(\\BACKFILEPTR) \\TERMINATESPP (TIMEREXPIRED?) CL::DEFINE-CONSTRUCTORS (CL::PS-TEMPLATE CL:MEMBER) -EDITSMASH1 (FMEMB) DO.DELETE.LINES (>) SEDIT::SET-SELECTION-LIST (TYPENAMEP) %EXTEND-ARRAY ( -%TWOD-ARRAY-P) UNDOEDITCOM (PRIN1 NUMBERP) %SETELT (<) INSPECT/AS/FUNCTION (STACKP) -\\POSTSCRIPT.ACCENTFN (IGREATERP) CL:ARRAY-DIMENSION (%ONED-ARRAY-P %TWOD-ARRAY-P %GENERAL-ARRAY-P <) -CL::%SET-NTH (<) SEDIT::SCAN-STRING (IGREATERP ILESSP) \\TEDIT.CHANGE.LOOKS (IGREATERP ZEROP TYPENAMEP - FONTP IEQP) GRAPHOBJ.BUTTONEVENTINFN (MENU) FILEPATCHBLOCK (IGREATERP) \\LINEBLT (ILESSP IGREATERP) -\\COURIER.CHECKDEF (FIXP) LSUBST (EQUAL) \\DISPLAYLINE (ZEROP ILEQ IGEQ GREATERP IEQP IGREATERP SMALLP -) COMP.ATTEMPT.COMPILE (GETD) CL::TYPE-EXPANDER (CL:SYMBOLP SI::DATATYPE-P CL:FBOUNDP) MSSEEKPHRASE ( -FMEMB) EDIT4F1 (IGREATERP ZEROP EDIT4F1) TEDIT.PROMPTPRINT (TEXTPROP WINDOWP) DOUSERFNS2 (FMEMB) -\\BUFFERED.COPYBYTES (IGREATERP FDEVOP) DEBUGGER (IMAGESTREAMP TYPEP FMEMB) GETVARS (LITATOM) -ARRAY-NEEDS-INDIRECTION-P (%ONED-ARRAY-P %TWOD-ARRAY-P %GENERAL-ARRAY-P) \\CHANGE-VISIBLE-REGION.IP ( ->=) PRINTPUP (FMEMB IGREATERP) CL:ADJUST-ARRAY (EXTENDABLE-ARRAY-P CL:LISTP CL:ADJUSTABLE-ARRAY-P >= -EQUAL CL:ARRAY-HAS-FILL-POINTER-P > <= <) UNBREAK (CL:EQUAL CL:CONSP) EDIT2F (IGREATERP TAILP) -COPYCHARS (FIXP \\EOFP \\XCCSP \\BACKFILEPTR LESSP) XSECT (IGEQ) EDITFPAT1 (LITATOM STRINGP IGREATERP) - BREAK-FUNCTION (CL:CONSP UNSAFE.TO.MODIFY SI::HAS-CALLS) IFCPROPSCAN (LITATOM ASSOC FMEMB) EDITBELOW -(MINUSP ZEROP TAILP) EDITSMASH (GETHASH) TEDIT.LOOKS (TYPENAMEP) UPDATEFN (GETHASH) BOUT (NUMBERP -GREATERP) \\COURIER.CHECK.ERRORS (FIXP NULLORLISTP) SEDIT::SHIFT-LINEAR-FORM (TYPENAMEP) GTHASHFILE ( -HASHFILEP ARRAYP LITATOM) BYTEBLOCKCOMPILE2 (FMEMB) DIRECTORYNAME (CL:PATHNAMEP) MSSETREP (NOTANY) -BITSPERPIXEL (TYPENAMEP ARRAYP) CL:ELT (<) EDIT1F (IGREATERP) MEMBER (LITATOM EQUAL) BPNT (ZEROP -NUMBERP MINUSP) \\BOXIPLUS (ILEQ TYPENAMEP CL:INTEGERP IGREATERP) SEDIT:SEDIT (OPENWP PROCESSP) -\\POSTSCRIPT.ACCENTPAIR (IGREATERP ILESSP) \\CREATEPIECEORSTREAM (STRINGP ATOM STREAMP TYPENAMEP) -\\STRINGWIDTH.HCPYDISPLAYAUX (LITATOM IGREATERP STRINGP) ENTER-DEBUGGER-P (TYPEP FIXP IGREATERP) -COMPILER::FIND-SEGMENT (CL:MEMBER) IDLE.SHOW.OPTION (SMALLP GREATERP) EDITBF1 (IGREATERP EDIT4E -EDITBF1) RAIDROOTFRAME (ALLOCAL) SEDIT::SET-POINT-QUOTE (TYPENAMEP) ONEDINSPECT.MAKEREGIONS (GREATERP) - DO.MOUSE (KEYDOWNP LASTMOUSESTATE >) EDITNTH (NUMBERP ZEROP MINUSP) \\BACKPEEKBIN (\\BACKFILEPTR) -CL::%ATAN-FLOAT (= > UFGEQ UFGREATERP UFLESSP) CLOSEF (\\OUTTERMP FFETCHFIELD) EQUAL-DIMENSIONS-P ( -%ONED-ARRAY-P %TWOD-ARRAY-P %GENERAL-ARRAY-P) COPYBYTES (EQUAL FIXP IGEQ ILEQ RANDACCESSP ILESSP -\\EOFP) PRINTADDRS (GREATERP EVENP PTRGTP) \\FORMATLINE (ILEQ ZEROP TYPENAMEP GREATERP IGREATERP -SMALLP IGEQ FIXP MEMBER ILESSP) \\COPYOPENFILE (STKPOS) MSVERBTYPE (FMEMB EQMEMB) EDIT.BI (TAILP) -COMPILER::EXPAND-NESTED-PROGNS (COMPILER::PROGN-P) \\FIRSTNODE (TYPENAMEP) BUILDTESTRELQ (LITATOM) -OPENSTREAM (TYPEP) XCL:UNADVISE-FUNCTION (CL:CONSP) CL:REPLACE (<) XCL:READVISE-FUNCTION (CL:CONSP) -NOTEVERY (EVERY) IDLE.SET.OPTION (FGETD SMALLP GREATERP STREQUAL STRPOS CH.LOOKUP.OBJECT) CURSORCREATE - (POSITIONP IGREATERP) DOUSERFNS (FMEMB) NOTANY (SOME) SEDIT::SET-POINT-LIST (TYPENAMEP STREQUAL ILEQ) - COPYFILE (DIRECTORYNAMEP) XCL:ADVISE-FUNCTION (CL:CONSP UNSAFE.TO.MODIFY SI::HAS-CALLS GETD) -\\INTERACTIVE.CLOSEW (FMEMB) \\SLOWLRSH1 (ILEQ TYPENAMEP CL:INTEGERP) \\CURSORUP (ILEQ) -\\POSTSCRIPT.SPECIALOUTCHARFN (ILESSP IGEQ) SEDIT::REPLACE-CHARS (ILEQ %GENERAL-ARRAY-P) -\\FTP.RECOGNIZEFILE (\\FTP.HANDLE.NO BSPOPENP < >) EDIT4F3 (STRINGP) CURSORPROP (IGREATERP) CL:BIT-NOT - (BIT-ARRAY-P EQUAL-DIMENSIONS-P) \\CURSOR-VALID-P (CURSORP >= <=) \\COMPUTE.HUNK.TYPEDECLS (> -GREATERP) PLUS (FIXP FLOATP) INSPECT/ARRAY (ARRAYP GREATERP) RAIDSTACKCMD (ILESSP IEQ) -|\\UFStoOtherCopyMess| (EQUAL) XCL:REBREAK-FUNCTION (CL:CONSP) RPT (IGREATERP) STKPOS (IGREATERP ILEQ) - DSUBST (EQUAL) XCL:TRACE-FUNCTION (CL:CONSP UNSAFE.TO.MODIFY SI::HAS-CALLS) FRPTQ (IGREATERP) -\\NSFILING.SET.CONTINUANCE (FIXP) CL::%EVERY-MAP-OPTIMIZER (CL:CONSTANTP CL:CONSP) -ADJUSTCURSORPOSITION (POSITIONP IGREATERP) RPTQ (IGREATERP) CLISPATOM (GETPROP FIX89 ATOM) LOGAND ( -ILEQ) \\CURSORPOSITION (IGEQ IGREATERP ILESSP) IPLUS (ILEQ) EDITCALLERS (ILESSP IGREATERP) SAVEDEF1 ( -EXPRP) LOGOR (ILEQ) \\SETUPGETCH (ATOM IGREATERP) TEDIT.SELECTED.PIECES (ZEROP IGEQ ILEQ ILESSP) -COPY-ARRAY (EQUAL-DIMENSIONS-P) SHOWBITMAP1.IP (GREATERP) \\BIGNUM.LOGOR (INFINITEP GREATERP) EDITGETD - (LITATOM GETPROP) GREATERP (FIXP) \\INFER.FILE.TYPE (RANDACCESSP IGREATERP) \\CHTOPCNO (IEQP -IGREATERP ILESSP) FIXCONTINUE (FIXCONTINUE1) LOGXOR (ILEQ) FB.MAKE.SUBDIRECTORY.ITEM (<=) -\\GETFTPCONNECTION (LITATOM BSPOPENP STRINGP STRPOS) COPY-VECTOR (<= FFETCHFIELD) TEDIT.FORMATBOX ( -\\TEDIT.FORMAT.FOUNDBOX? IGREATERP IGEQ) GETRELATION (LITATOM) CURSORPOSITION (IGREATERP TYPENAMEP) -FM.CHANGELABEL (WINDOWP TYPENAMEP OPENWP) ITIMES (ILEQ) MAKELINE (ILESSP) \\TEDIT.INSERT.PIECES ( -IGREATERP IEQP ZEROP IGEQ OPENP) BUILDGETRELQ (LITATOM) PRINTXIP (FMEMB IGREATERP) -\\FLUSH.OPEN.STREAMS (DIRTYABLE) \\CH.GUESS.NEW.PROPERTIES (GREATERP) INSPECTCODE (GETD CCODEP) -INFILECOMSVAL (MEMBER LITATOM EQUAL) FILEBROWSER (SMALLP EQLENGTH EVERY CL:KEYWORDP STRING-EQUAL -TTY.PROCESSP) TEDIT.DISPLAYTEXT (STRINGP IGREATERP) SCANFILE0 (SYNTAXP LITATOM) TTYINBUFFERPEEK ( -COMPLEXCHARP) ENDREAD? (AT.END.OF.TEXT SELCHARQ IGREATERP COMPLEXCHARP) CLISPERROR (ATOM) -TB.UNDELETE.ITEM (TB.ITEM.UPDATABLE?) QUOTIENT (FIXP FLOATP) SEDIT::REPLACE-LIST (TYPENAMEP -SEDIT::DEAD-NODE? IGEQ IGREATERP <= ILESSP) \\BIGNUM.LOGXOR (INFINITEP LESSP) TEDIT.PUT.PCTB ( -TYPENAMEP IGREATERP EQFMTSPEC ZEROP EQCLOOKS IEQP GREATERP RANDACCESSP) /SETSYNTAX (NUMBERP) -TEDIT.DO.BLUEPENDINGDELETE (ZEROP) FORMAT-PLURAL (EQL) STRMEMB (GNC) RAIDCOMMAND (ILEQ FIXP GETD -RECLOOK) FIXCONTINUE1 (FMEMB EDITFINDP FIXCONTINUE1) \\PUTBASEFIXP.UFN (IGEQ) TB.INSERT.ITEM (> < >=) -\\FTP.PRINTPLIST (STRINGP LITATOM IGREATERP ILEQ) %MAKE-DISPLACED-ARRAY (>) EQDEFP (TYPEP GREATERP) -WALK-FORM-INTERNAL (CL:CONSP CL:SYMBOLP CL:FBOUNDP CL:SPECIAL-FORM-P) \\BIGNUM.LOGAND (INFINITEP LESSP -) \\BACKFORMAT (ILEQ LESSP IGREATERP) MSPATHOPTIONS (MSSEEKTYPE) TTLOADBUF (< >=) BRHC/INTERTREE/SPACE - (IGREATERP IEQP ILESSP) HRULE.CREATE (EVERY) TIMES (FIXP FLOATP) \\MAYBEPEEKNS (EQNSHOSTNUMBER) -\\BIGNUM.LSH (INFINITEP IGREATERP IGEQ >= <= TYPENAMEP) PRESSFILEP (ZEROP EVENP RESETLST) -%GET-CANONICAL-CML-TYPE (CL:CONSP) \\RSH (IGREATERP ILEQ TYPENAMEP CL:INTEGERP) PAINTW.READCOMMAND ( -TYPENAMEP) SETFILEPTR (FIXP IGEQ ILEQ \\RUNCODED) SAMEPARALOOKS (SELECTQ EQUAL IEQP ERROR) -CURSORHOTSPOT (POSITIONP) \\BIGNUM.REMAINDER (INFINITEP) WALK-TEMPLATE (CL:ATOM) \\TAN.OLD (FGREATERP -FLESSP) GETMOUSESTATE (IGREATERP) \\MAIKO.DISPLAYLINE (ZEROP ILEQ IGEQ GREATERP IEQP IGREATERP SMALLP) - \\BIGNUM.QUOTIENT (INFINITEP IGREATERP) ZEROP (FLOATP) SELECTC (FMEMB) \\FTP.PACKFILENAME (STREQUAL) -DWIMLOADFNS? (LITATOM FGETD) CL:SIMPLE-BIT-VECTOR-P (%ONED-ARRAY-P) IDLE.BOUNCING.BOX (WINDOWP) BEEPON - (ILESSP) \\WWCHANGESCREENSIZE (\\ONSCREENW) CL:CHAR-NAME (CL:GRAPHIC-CHAR-P <=) \\MACOUTCHARFN ( -IGREATERP) \\SENDSPP (SEQ.GEQ) GCD (MINUSP) RECORDECLARATIONS (LITATOM FMEMB) REGIONONSCREEN ( -POSITIONP IGREATERP) TTYINBUFFERBIN (COMPLEXCHARP) FIND.MATCHING.WORD (WORD.MATCHES.BUFFER) -VRULE.CREATE (EVERY) SPY.MERGE.CALLEES (ILEQ) CL:VECTOR-POP (%ONED-ARRAY-P %GENERAL-ARRAY-P <=) -\\MAKE.ITEMS.VERT.ORDER (GREATERP) RESETSAVE (LITATOM) INSPECT/TYPELESS (IGEQ \\VALIDADDRESSP) -DELFROMFILES (DELFROMCOMS INFILECOMS?) SMARTARGLIST (LITATOM EXPRP CCODEP) \\TEDIT.HISTORYADD (IEQP) -FILING.CALL (< GREATERP TYPENAMEP) MSMSGPRINT (STRINGP CL:CONSP) EDITGETD-LAMBDA (CL:CONSP) CL:ERROR ( -ENTER-DEBUGGER-P) FIXATOM1 (ATOM ZEROP) \\SETDAYTIME0 (ILESSP) MSJOINSET (LITATOM) TEDIT.SELECT ( -TYPENAMEP IGREATERP) DEFAULT.BACKGROUND.COPYFN (MOUSESTATE ZEROP TYPENAMEP) \\BSP.SETFILEPTR ( -FFETCHFIELD IGEQ) SEDIT::SHIFT-DOWN (KEYDOWNP SHIFTDOWNP) TTADDTAB (GREATERP) RESET/NODE/BORDER ( -WINDOWP) CL:ARRAY-IN-BOUNDS-P (<) \\TEDIT.WORD.BOUND (FIXP IGREATERP) LOAD? (FMEMB EQUAL) -XCL:ROW-MAJOR-AREF (>= <) CL:SIMPLE-VECTOR-P (%ONED-ARRAY-P) TEXTPROP (IGREATERP) MAKEFN (FNTYP FMEMB) - \\REGIONOVERLAPAREAP (IGREATERP) FIXAPPLY (LITATOM DWIMUNSAVEDEF WTFIXLOADEF STRPOSL SOME) -|MakeMenuOfImageTypes| (ASSOC FMEMB) CHECKIMPORTS (IEQP SELECTQ) CL:CHAR-BITS (CL:CHARACTERP) -TEDIT.SUBPARALOOKS (SAMEPARALOOKS) CL::%/ (SMALLP) SPY.DUMP.BUFFER (IGEQ ILEQ) -\\LEAF.TIMEDOUT.EXCESSIVE (WINDOWWORLDP TYPENAMEP SELECTC IGREATERP DIRTYABLE FMEMB) \\IDLER ( -\\OK.TO.IDLE? SMALLP \\SECONDSCLOCKGREATERP VIDEOCOLOR \\FLUSHVMOK? READP \\SAVEVMBACKGROUND KEYDOWNP -PROCESSP TIMEREXPIRED?) CSUBST (SIMPLEP FMEMB RECORDWORD) INSPECT/DATATYPE (GREATERP) CL:CHAR-FONT ( -CL:CHARACTERP) ASET (<) CHARACTER.PRINT (IGREATERP) CHAT.LOGIN (FMEMB CHAT.FLUSH&WAIT) PAINTW.READMODE - (TYPENAMEP) CHAT.TYPESCRIPT1 (STRING-EQUAL NLSETQ) SEDIT::OUTPUT-CR-OR-SPACE (IGREATERP) FILL.TEST ( -GREATERP) AUTOCR? (IGREATERP AT.END.OF.LINE) BEEPOFF (ILESSP) CL:GRAPHIC-CHAR-P (>) -\\TEDIT.GET.SINGLE.PARALOOKS2 (IGREATERP GREATERP) COURIER.BROADCAST.CALL (FIXP) RANDSET (EVERY -GREATERP) \\COS.OLD (FGEQ FLESSP FLEQ FGREATERP) TTADJUSTWIDTH (ILESSP) DOBACKGROUNDCOM (TYPENAMEP) -\\BSPBACKFILEPTR (IGREATERP) REBREAK (EQUAL) FNTH (IGREATERP) REMAINDER (FIXP) PUP.ECHOUSER (SELECTC -PRIN1 IEQP TIMEREXPIRED? IGREATERP) \\NSFILING.GDATE (EQUAL) CL::ROW-MAJOR-ASET (>= <) INSPECT/HUNK ( -GREATERP) PROCESS-EXEC-ID (STRPOS) CL:DIGIT-CHAR (<) ADJUSTLINE (> < EMPTY.LINE START.OF.PARAGRAPH? -SMALLP) COMP.LOOKUPVAR (COMP.GLOBALVARP) PAINTW.READBRUSHSHAPE (TYPENAMEP) \\GS.INITBUF (ILESSP) -TTDOTABS (AT.END.OF.BUF SMALLP ILEQ GREATERP) ICMLARRAY (GREATERP ILESSP IGREATERP) -BREAK.MSG.INTO.LINES (GREATERP) FIXATOM (LITATOM FMEMB GETPROP CL:THROW NUMBERP FIXSPELL1) -\\PROCESS.RESET.TIMERS (LITATOM) LISPXUSEC (NUMBERP STRPOS PRIN2 PRIN1 LITATOM STRINGP NLSETQ -EDITFINDP) YMAPLIST (ILESSP) FM.TOPGROUPID (WINDOWP) \\GENERIC.RENAMEFILE (FDEVOP \\DELETEFILE) -\\LEAF.NOT.RESPONDING (TYPENAMEP) \\FTP.OPENFILE (SELECTQ) CL:ARRAY-ROW-MAJOR-INDEX (<) \\LOCATE.NSNET - (= <) IMOD (IGEQ) \\GENERIC.OPENP (STRING-EQUAL \\IOMODEP) GENSYM? (LITATOM FIXP) SPY.MAKE.TREE ( -WINDOWP) EXPT (FIXP IGREATERP ODDP FEQP ILESSP) CREATEFIELDS (ASSOC FMEMB) STKARGS (GREATERP) FEXPT ( -EQP) INFILECOM (CL:SYMBOLP LITATOM FMEMB EQMEMB) PAINTW.READBRUSHSIZE (TYPENAMEP) UPDATE/MENU/IMAGE ( -TYPENAMEP \\MENUSUBITEMS IGREATERP ILESSP) IDATE (< > EVENP FMEMB ALPHACHARP IGEQ STRING-EQUAL) -MS-SMASH-PACKAGE (CL:CONSP CL:SYMBOLP) \\TEDIT.SEL.CHANGED? (EQUAL IEQP) DINFO.SPECIAL.UPDATE ( -OBTAIN.MONITORLOCK) LESSP (FIXP) GETPUPSTRING (IGREATERP) FM.WHICHITEM (WINDOWP POSITIONP \\FM.ONITEM -IGEQ) SETY.IP (NUMBERP >=) \\FTP.HANDLE.NO (STRING-EQUAL APPLY*) NODELST/AS/MENU (ILESSP) \\ATMOUT ( -IGREATERP) SEARCH-FOR-EVENT-NUMBER (EQL) POWEROFTWOP (SMALLP FIXP IGREATERP) \\AREAVISIBLE? ( -\\AREAINREGIONP \\REGIONOVERLAPAREAP) \\TEDIT.COMMAND.LOOP (TYPENAMEP TTY.PROCESSP %GENERAL-ARRAY-P -\\SYSBUFP IGREATERP) \\SETCARET (ILESSP IGEQ FFETCHFIELD) CLOSEF? (OPENP) SEDIT::OUTPUT-CR (TYPENAMEP) - INITUFNTABLE (GREATERP) MINUS (FLOATP) CL:MOD (CL:FLOATP UFEQP UFGREATERP CL:ZEROP MINUSP CL:PLUSP) -\\PRESSFAMILYCODELST (GREATERP) INTCHECK (IGREATERP GETINTERRUPT) /REMPROP (LITATOM) -\\NSFILING.GETFILEINFO.FROM.PLIST (SMALLP) LOADFROM (ATOM) TTYIN.SHOW.?ALTERNATIVES (SELECTC IGREATERP - READTABLEPROP) CH.NAME.TO.STRING (TYPENAMEP) PFI.COMPUTE.INDEX.SHAPE (< STRINGP GREATERP) \\XIPERROR -(EQNSHOSTNUMBER) \\BULK.DATA.CLOSE (WRITEABLE APPENDABLE) LISPXUSE (SELECTQ MEMBER) |\\VFMSmartBLT| ( -PTRGTP GREATERP) CHNGNM (STKPOS MEMB) CL:ALPHANUMERICP (CL:DIGIT-CHAR-P) SPY.DELETE (EQMEMB) SUBST ( -EQUAL) \\TEDIT.FIND.PROTECTED.START (LITATOM ILEQ) TEDIT.GET.OBJECT (IMAGEOBJPROP) FMAX (FGREATERP) -FILENAMEFROMID (EOFP EQL GREATERP) SEDIT::LINEARIZE-LIST (IGREATERP FMEMB) CHANGECALLERS (EQMEMB FMEMB - ADDTOFILE DELFROMFILES) CL:STANDARD-CHAR-P (CL:MEMBER) TEDIT.ADD.MENUITEM (MEMBER) FMIN (FGREATERP) -TB.DELETE.ITEM (TB.ITEM.UPDATABLE?) TEDIT.EXTEND.SEL (ZEROP IGEQ ILEQ IGREATERP) CL:CHAR-LESSP (<) -|\\VFMBlankInterval| (GREATERP) ERRORX (TYPEP) FIXSPELL2 (STRINGP) SETYREL.IP (>=) EDITBMBUTTONFN ( -INSIDE? TYPENAMEP ILESSP IGREATERP LASTMOUSESTATE MOUSESTATE COLORDISPLAYP SELECTQ REGIONP) -CLOSEBSPSTREAM (SELECTC TIMEREXPIRED?) \\TEDIT.PUT.SINGLE.CHARLOOKS2 (TYPENAMEP ZEROP) -\\BSP.HANDLE.DATA (\\RTP.FILTER ILEQ IGREATERP ILESSP IEQP) CHANGENAME (CHANGENAME1 EXPRP) CL:MAKE-CHAR - (EQL) CL:CHAR-NOT-GREATERP (<) FIND-HISTORY-EVENTS (FMEMB) FM.ENDEDIT (WINDOWP WINDOWPROP) SELECTQ1 ( -FMEMB) LOADCOMP? (STRING-EQUAL) \\SIN.OLD (FGEQ FLESSP FLEQ FGREATERP) \\PUTFIXP (ILEQ TYPENAMEP -CL:INTEGERP) MOVD (EXPRP) U/L-CASE (AT.END.OF.LINE COMPLEXCHARP >=) PRINT-EVENT-PROMPT (CL:CONSP) -CL:CHAR/= (<) |\\VFMCreateIntervals| (BOUNDP TYPENAMEP ZEROP EQL) \\NSFILING.GET/SETINFO (TYPENAMEP) -SETXYREL.IP (>=) \\BUFFERED.BOUT (ILESSP) PRINTBITMAP (LITATOM) EDITMOVENODE (LASTMOUSESTATE ZEROP) -\\PAGED.INCFILEPTR (>= < <=) MAKEWITHINREGION (ILESSP IGREATERP) \\TEXTCLOSEF (TYPENAMEP) -WORDSPERNAMEENTRY (FMEMB) FNS.PUTDEF (FMEMB UNSAFE.TO.MODIFY HASDEF GETD) CL:CHAR-GREATERP (<) IMAX ( -ILESSP) TTUNREADBUF (COMPLEXCHARP) RAND (ZEROP FIXP) MOVD? (EXPRP) \\HANDLE.RAW.XIP (SMALLP IGEQ) -CL:CHAR> (<) \\BUFFERED.BIN (IGEQ) CL:CHAR-NOT-LESSP (<) \\BUFFERED.BINS (IGREATERP) \\MOVEBYTES ( -IGREATERP) \\IFS.LOOKUPFILE (GREATERP >) XCL::UNDOABLY-SETF-SYMBOL-FUNCTION (CL:CONSP CL:SYMBOLP) -\\GENERIC.READP (\\EOFP IGREATERP \\XCCSP \\BACKFILEPTR) SETSPELLCASE (GREATERP) CL:CHAR-NOT-EQUAL (<) - DELDEF (EXPRP) \\TEDIT.GET.CHARLOOKS.LIST2 (IGREATERP GREATERP) RETDWIM1 (TAILP FMEMB FIXSPELL1) -\\FTPERROR (TYPENAMEP) CL:CHAR>= (<) \\BSP.HANDLE.ACK (\\RTP.FILTER ILESSP IGEQ IGREATERP ILEQ) -FIXSPELL (ARRAYP LITATOM STRINGP STACKP U-CASEP CL:FUNCALL CL:FBOUNDP BOUNDP FMEMB SOME EDIT4E1 -IGREATERP) FIXLAMBDA (LITATOM FMEMB) READ-AFM-FILE (STRING-EQUAL BOUNDP TYPENAMEP IGEQ GREATERP CL:PLUSP - ILESSP IGREATERP) GEQ (LESSP) \\LOAD-STREAM (MEMB RANDACCESSP) UNSAFE.TO.MODIFY (FMEMB GETD) ADDPROP -(LITATOM) \\PUTSWAPPEDFIXP (ILEQ TYPENAMEP CL:INTEGERP) CLISPFOR0 (LITATOM EQUAL CLISPFOR4 EDITFINDP -NUMBERP MINUSP FIXP ILESSP) |\\VFMMarkBufferDirty| (EQL) EQMEMB (FMEMB) CL:CHAR< (<) FM.EDITITEM ( -WINDOWP WINDOWPROP TYPENAMEP OPENWP) SEDIT::DOT-THIS-LIST (IGREATERP IGEQ) IGEQ (ILESSP) MIN (GREATERP -) |\\LFDeleteFile| (TYPENAMEP FDEVOP) HASDEF (MEMBER APPLY* LITATOM BOUNDP GETTEMPLATE GETLIS FASSOC -CL:KEYWORDP RECLOOK EXPRP GET RECORDFIELD? FMEMB) CREATEPAGES (GREATERP) \\DECODEPRESSFACEBYTE (ILESSP - IGEQ) \\NSFILING.GETEOFPTR (DIRTYABLE) FIXEDITDATE (FMEMB EDITDATE?) \\BUFFERED.PEEKBIN (IGEQ) -SEDIT::INSERT-LIST (TYPENAMEP) SETUPTIMER (\\TIMER.TIMERP) RECORDBINDVAL (SIMPLEP) ILEQ (IGREATERP) -CL:CHAR-EQUAL (<) PSCFONT.WRITEFONT (GREATERP) SEDIT::OUTPUT-CONSTANT-STRING (SEDIT::NEXT-LINEAR) LOAD - (CL:PACKAGEP) \\NAMEDTABSIZE (STKPOS) PPSPPSTREAM (SELECTC) FB.IS.NOT.SUBDIRECTORY.ITEM (FFETCHFIELD) - EQUALN (NUMBERP STRINGP STACKP ILESSP) SPY.ADD.ENTRY (IGEQ) PSCFONT.READFONT (GREATERP) -|\\PFReplaceString| (IGREATERP GREATERP) NEWDEFC (GETD ARRAYP) \\BSP.HANDLE.INTERRUPT (\\RTP.FILTER) -|\\LFRenameFile| (TYPENAMEP EQUAL) \\TEDIT.FIND.LAST.LINE (ILESSP) TEDIT.PUT.OBJECT (RANDACCESSP) -XCL::VARIABLE-SPECIAL-P (BOUNDP) HISTORY-NTH (<= EXEC-EVENT-INPUT STRINGP) TIMEREXPIRED? ( -\\TIMER.TIMERP) \\LFINITCASEARRAY (GREATERP) XCL::VARIABLE-LEXICALLY-BOUNDP (BOUNDP) TTCOMPLETEWORD ( -AT.START.OF.BUF IGREATERP COMPLEXCHARP GREATERP IGEQ ILEQ LITATOM MEMB >) \\MAKEBRUSH.DIAGONAL ( -GREATERP) |\\PFTransferFilePage| (FIXP) \\NSFILING.CLOSE.BULKSTREAM (OPENP) TTRUBOUT (AT.START.OF.LINE - AT.START.OF.BUF) SCALE.FONT (GREATERP) \\BOXFTIMES2 (FLOATP IGREATERP SMALLPOSP SMALLP ILEQ) SETX.IP -(NUMBERP >=) FM.EDITP (WINDOWP) GRAPHEDITCOMMANDFN (TYPENAMEP) TIME.UNTIL (\\TIMER.TIMERP) -TEDIT.UNDO.DELETION (IGREATERP IGEQ) TYPE.BUFFER (COMPLEXCHARP) PREPLOOP (NUMBERP) BRH/LAYOUT ( -IGREATERP) \\FILEOUTCHARFN (\\RUNCODED) \\ARGPTR (> <=) LEQ (GREATERP) FM.SHADE (WINDOWP TYPENAMEP -OPENWP) \\TEDIT.GET.PARALOOKS.LIST2 (IGREATERP GREATERP) RENAME (HASDEF) |\\LFTruncateFile| (IGREATERP - GREATERP) \\TEDIT.FIND.PROTECTED.END (IGREATERP) PARAMETRICSPLINE (GREATERP IGEQ LESSP) RETDWIM ( -NCONC1 EXPRP ATOM STRPOSL DWIMIFY2A RETDWIM1) TEDITCHAT.MENUFN (LASTMOUSESTATE) COERCETEXTOBJ (ILEQ -ATOM GREATERP) COMPILER::CONSTANT-EXPRESSION-P (CL:CONSP) CLISPCAR/CDR (NUMBERP ILESSP IGREATERP) -XCL::VARIABLE-LEXICAL-P (BOUNDP) \\BOXFQUOTIENT (FLOATP IGREATERP SMALLPOSP SMALLP ILEQ) -XCL:OPEN-STREAM-P (STREAMP) \\INIT.ETHER.BUFFER.POOL (GREATERP) DINFO.UPDATE.GRAPH.DISPLAY (EQUAL) -\\BOXFPLUSDIF (FLOATP IGREATERP SMALLPOSP SMALLP ILEQ ILESSP) SETXY.IP (>=) \\DSPFONT.HDCPYDISPLAY ( -EQP GREATERP) PUTDEFN (FMEMB) \\BSP.HANDLE.INTERRUPTREPLY (\\RTP.FILTER IEQP) TOPATTACHEDWINDOWS ( -WINDOWPROP) IMAGESTREAMP (IGREATERP EQMEMB) XCL:TWO-WAY-STREAM-OUTPUT-STREAM (XCL:TWO-WAY-STREAM-P) -CL:DIGIT-CHAR-P (<= <) CL:CHAR<= (<) \\SPP.CHECK.INPUT.QUEUE (SEQ.GREATERP) FORMAT-ROUND-COLUMNS (>) -\\TEXTBIN (ILESSP ZEROP EQCLOOKS) |\\LFGetFileInfo| (TYPENAMEP) UNDOLISPX1 (PRIN1) SHRINK-VECTOR (< >) - COMPILER::COMPILE-AND-DUMP (CL:SYMBOLP) \\GETREGION.CHECKOPPT (IGREATERP ILESSP POSITIONP) -CHAT.RESHAPEWINDOW (PROCESSP RELPROCESSP) ADDSPELL (LITATOM) |\\LFCreateDirectories| (BOUNDP TYPENAMEP - ZEROP EQL) XCL:PROFILE-P (CL:CONSP CL:SYMBOLP EVENP) XCL:ECHO-STREAM-OUTPUT-STREAM (XCL:ECHO-STREAM-P -) XCL:TWO-WAY-STREAM-INPUT-STREAM (XCL:TWO-WAY-STREAM-P) TEDIT.REDO.INSERTION (IEQP IGEQ) /SETTOPVAL ( -LITATOM) XCL:ECHO-STREAM-INPUT-STREAM (XCL:ECHO-STREAM-P) \\FRAMESCAN (NULL-NTENTRY) -\\DO-DEFINE-FILE-INFO (TYPEP SMALLP ILESSP IGREATERP) HASH-LEFT-PAD-INITIAL-CONTENTS (>) -FM.REDISPLAYMENU (WINDOWP WINDOWPROP) DO-DISPATCH-MACRO (DIGITCHARP IGEQ) SEDIT::MAP-COMMENT-INDEX ( -IGREATERP) CL:CHAR= (<) XCL:CONCATENATED-STREAM-STREAMS (XCL:CONCATENATED-STREAM-P) -COMPILER::ALPHA-IL-FUNCTION (CL:SYMBOLP COMPILER:ENV-FBOUNDP) COMPILER::CHECK-GLOBAL-CONSTANT (BOUNDP -CL:ATOM) ODDP (CL:ZEROP) LISPXREADP (READP) CL:GET-MACRO-CHARACTER (CL:CONSP FMEMB) -CL:SET-DISPATCH-MACRO-CHARACTER (CL:DIGIT-CHAR-P) PRINTCOPYRIGHT (/PUTPROP) DINFO.TOGGLE.GRAPH ( -FM.ITEMPROP) PROMPTCHAR (LISPXREADP IGREATERP) DINFO.UPDATE.MENU.DISPLAY (ILESSP) FIND-MACRO-FUNCTION -(CL-MACRO-WRAPPED-P CL:FUNCTIONP) IMAGESTREAMTYPEP (TYPENAMEP EQMEMB) TEDIT.WORDSET (ILEQ) -\\SETXFORM.PSC (EQP ZEROP) XCL:SYNONYM-STREAM-SYMBOL (XCL:SYNONYM-STREAM-P) SMASHFILECOMS (LITATOM) -\\IBMOUTCHARFN (IGREATERP) FASL:PROCESS-FILE (<) %DEFPRINT-ARRAY (<=) \\MATMULT441 (GREATERP) -INITATOMS (GREATERP IGEQ ILEQ) RAISEP (RAISE) PRINTCOPYRIGHT1 (READTABLEPROP) IL-MACRO-WRAPPED-P ( -CL:CONSP EQUAL) SIMPLEP (CONSTANTEXPRESSIONP MINUSP EVERY) LISPXREADBUF (NUMBERP IGREATERP EVAL) -PRINTERTYPE (EQMEMB APPLY* STRING-EQUAL) ADDFILE (LITATOM) CL-MACRO-WRAPPED-P (CL:CONSP CL:EQUAL) -\\MAKEFLOAT (IGREATERP ILEQ ILESSP IGEQ) XCL:FOLLOW-SYNONYM-STREAMS (XCL:SYNONYM-STREAM-P) STKNTH ( -ILESSP) PRINTFILETYPE.FROM.EXTENSION (FMEMB) \\MATMULT331 (GREATERP) \\MATMULT133 (GREATERP) -FIND.NON.SPACE (SPACEP COMPLEXCHARP) \\NSFILING.ERRORHANDLER (NLSETQ GREATERP) TTNTHLINE (ILEQ) -UPDATEFILEMAP (SYNTAXP FIXP ILEQ) HASH-LEFTPAREN (<= >=) \\RESUME (FFETCHFIELD) SETSTKARG (LITATOM -ILESSP IGEQ NULL-NTENTRY ILEQ) LISPXPRIN1 (STRINGP) SETXREL.IP (>=) \\STRINGIN (IGREATERP GREATERP) -\\BSP.HANDLE.ERROR (IGREATERP) \\TEDIT.PUT.SINGLE.PARALOOKS (IGREATERP) \\FLOAT (IGREATERP IGEQ -TYPENAMEP TYPEP) STKARGNAME (LITATOM \\SPREADFRAMEP IGREATERP ILESSP FIXP SMALLP ILEQ NULL-NTENTRY EQP -) \\CURVE2 (LITATOM FMEMB GREATERP IGEQ ZEROP ILEQ) COURIER.READ.BULKDATA (TYPENAMEP) COMP.FLOATBOX ( -OPT.CALLP) HISTORY-ADD-TO-SPELLING-LISTS (LITATOM FGETD CL:CONSP CL:FBOUNDP CL:SPECIAL-FORM-P CL:SYMBOLP - BOUNDP) ROOTFILENAME (TYPEP) MAX (GREATERP) \\TEDIT2 (STRINGP) %DEFPRINT-VECTOR (CL:STRINGP <= -CL:BIT-VECTOR-P) SETSTKARGNAME (LITATOM IGREATERP ILESSP FIXP SMALLP ILEQ NULL-NTENTRY EQP) COERCE ( -TYPEP CL:MEMBER CL:CONSP CL:COMPLEXP) DINFO.TOGGLE.MENU (FM.ITEMPROP) EDITE (SELECTQ STRINGP) -TEDIT.WORDGET (IGREATERP) \\CREATEINTERPRESSFONT (LITATOM) STKNARGS (\\SPREADFRAMEP IGREATERP -NULL-NTENTRY) READLINE (READP SYNTAXP IMAGESTREAMTYPEP NLSETQ) \\ARBIN (IGREATERP ZEROP) -\\NSFILING.HOSTNAMEP (STRPOS) CREATEMENUEDWINDOW (FMEMB REGIONP) \\BSP.TIMERFN (SELECTC TIMEREXPIRED?) - MAXATTACHEDWINDOWEXTENT (GREATERP) TEDIT.FIND.OBJECT (ATOM) SHRINKBITMAP (EQP GREATERP) -FLOATP.TO.BCPL (FEQP IGREATERP) CLEARFILEPKG (SELECTQ ASKUSER) LOOKUP-SYMBOL (EQL LOCAL) IMIN ( -IGREATERP) MODERN-ADD-EXEC (GREATERP) \\MATMULT444 (GREATERP) FB.SORT.VERSIONS (STRING-EQUAL) -PFI.PRINT.INDICES (<= >) LISPX/1 (ATOM FMEMB FGETD) SLICESET (ILESSP) TESTRELATION (SOME) |\\VFMFind| -(|\\VFMLower| ILEQ MESAEQUAL GREATERP) \\MATMULT144 (GREATERP) FM.REDISPLAYITEM (WINDOWP WINDOWPROP -TYPENAMEP OPENWP) \\MATMULT333 (GREATERP) \\LEAF.REPAIR.BROKEN.PUP (TYPENAMEP SELECTC) GETSETQ ( -LITATOM STRPOSL DWIMIFYREC) BKSYSBUF.GENERAL (NUMBERP) |\\PFFetchString| (GREATERP) -UNIX-STREAM-EOFP-NEW (< UNIX-GET-NEXT-BUFFER) CHAT.TAKE.INPUT1 (NLSETQ) PRINTERPROP (EQMEMB) LINETO.IP - (FLOATP) TTYIN.BALANCE (IGREATERP COMPLEXCHARP FIXP) MOVEATTACHEDWINDOWS (OPENWP) FILEDATE ( -RANDACCESSP) TEDIT.FIND.OBJECT.SUBTREE (ATOM) CHAT.BUTTONFN (LASTMOUSESTATE) FILE-NAME (STREAMP) -\\NSRANDOM.HANDLE.ERROR (\\NSFILING.GET.NEW.SESSION) REMPROPLIST (FMEMB) \\POLYSHADE.BLT (IEQP ODDP -ILEQ IGEQ) FRAMESCAN (LITATOM) FB.DELVER.FILES (STRING-EQUAL GREATERP FB.DELETE.FILE) -DINFO.TOGGLE.TEXT (OBTAIN.MONITORLOCK FM.ITEMPROP) /PUT (LITATOM) DINFO.UPDATE.HISTORY (EQUAL GREATERP -) ONEDINSPECTW.CREATE (LITATOM POSITIONP WINDOWP REGIONP) TEDIT.SETSYNTAX (LITATOM STRINGP ILEQ -TYPENAMEP) %PRINT-ARRAY-CONTENTS (>) FILECREATED1 (STRINGP) MB.CREATE.NWAYBUTTON (GREATERP) -\\GETREGION.CHECKBASEPT (POSITIONP) HASH-DOT (FFETCHFIELD) SIZE/GRAPH/WINDOW (WINDOWP) -COMPILE.FILE.RESET (OPENP) \\COMMONBACKCHARFN (\\BACKFILEPTR) |\\LFReadPages| (CL:ZEROP ILEQ EQL) -UNSAVED1 (LITATOM GETD GETPROPLIST) COMPILER::ALPHA-FUNCTION (CL:SYMBOLP) %DIRECTORY-COMPONENT-EQUAL ( -%DIRECTORY-COMPONENT-P) FIND.SYMBOL (EQL) EDITLOADFNS? (FMEMB EQUAL) COMP.STJUMP (OPT.JUMPCHECK) -TB.CLOSE/SHRINK (OBTAIN.MONITORLOCK) ENUM-STRING (MINUSP) BITMAPWIDTH (TYPENAMEP) BSP.PUTINTERRUPT ( -BSPOPENP TIMEREXPIRED?) %INITIALIZE-DEFAULT-PATHNAME (BOUNDP) APPENDINTEGER.IP (ILEQ LESSP) -AT.END.OF.TEXT (SPACEP COMPLEXCHARP) COPY.WINDOW.TO.BITMAP (OPENWP FMEMB) FIND.PACKAGE (STREQUAL) -PFI.CONDENSE.INDEX (PFI.LOOKUP.NAME CL:FUNCALL) COMPILER::RESOLVE-VARIABLE-BINDING (COMPILER::LOCAL-CONSTANT-P - CL:CONSTANTP CL:MEMBER COMPILER::ENV-PROCLAIMED-GLOBAL-P VARIABLE-GLOBAL-P COMPILER::ENV-PROCLAIMED-SPECIAL-P - VARIABLE-GLOBALLY-SPECIAL-P) BITMAPHEIGHT (TYPENAMEP) PARSE-NAMESTRING1 (TYPENAMEP FIXP) EQUALALL ( -GREATERP CL:ARRAY-HAS-FILL-POINTER-P) UNMAKEHARDCOPYSTREAM (WINDOWP) FILEPKGCHANGES (LITATOM FMEMB -CL:EQUAL) FM.RESETGROUPS (WINDOWP) DECLAREDATATYPE (SELECTQ) STKSCAN (LITATOM \\FRAMESCAN) -%GET-ENCLOSING-UNSIGNED-BYTE (CL:INTEGERP <=) HCOPYALL1 (LITATOM SMALLP FMEMB) \\HDCPYDSPPRINTCHAR ( -IGREATERP ILESSP) SPY.MERGEINFO (FMEMB STRPOS) PRETTYPRINT3 (SELECTQ EXPRP MEMB SUPERPRINTEQ) -SEDIT::BACKSPACE-QUOTE (FMEMB) \\ADDLEAFSTRING (LITATOM IGREATERP GREATERP) |\\LFSetFileInfo| ( -TYPENAMEP FREPLACEFIELD) LINELENGTH (NUMBERP ILESSP) %GET-ENCLOSING-SIGNED-BYTE (CL:INTEGERP <=) -CL:CHARACTER (TYPEP EQL) XCL:BROADCAST-STREAM-STREAMS (XCL:BROADCAST-STREAM-P) CLOSE-AND-MAYBE-DELETE -(OPENP) CHAT.SWITCH.EMACS (FFETCHFIELD) DMCHAT.ADDRESS (<) ATAN (FGEQ) DINFO.TOGGLE.HISTORY ( -FM.ITEMPROP) BLTPATTERN.GENERIC (>) COMPILER::ALPHA-EVAL-WHEN (CL:MEMBER) FM.RESETSHAPE (WINDOWP -ILESSP) TEDIT.GETSYNTAX (IGREATERP TYPENAMEP LITATOM STRINGP) FIXR (FLOATP IGREATERP SMALLPOSP SMALLP -ILEQ ILESSP ODDP) CL:VECTOR-PUSH-EXTEND (>) PPSPP (SEQ.GREATERP) HASH-BACKSLASH (TYPEP >= <) -SET-FILL-POINTER (%ONED-ARRAY-P %GENERAL-ARRAY-P <=) %REDUCE-MOD (CL:INTEGERP <=) ATTACHMENU (OPENWP) -MINATTACHEDWINDOWEXTENT (GREATERP) TEDIT.EDIT.OBJECT (TYPENAMEP IMAGEOBJP APPLY*) -COMPILER::RESOLVE-VARIABLE-REFERENCE (COMPILER::VARIABLE-P) SEDIT::COMPUTE-POINT-POSITION-LIST (SMALLP - TYPENAMEP) TRANSLATE.DATATYPE (LITATOM FMEMB IGEQ IGREATERP ODDP ILEQ) SLITLOOP (IGREATERP ILESSP) -SENDXIP (FFETCHFIELD) TIMESPOW10 (> < IGEQ) INSTALLBRUSH (ARRAYP GREATERP) CHAT.ICONFN (TTY.PROCESSP -FNTYP) DOWINDOWCOM (TYPENAMEP) UNIX-BACKFILEPTR-NEW (>) GETPROMPTWINDOW (STRINGP OPENWP IGREATERP) -BCPL.TO.FLOATP (ILESSP IEQP SMALLP) |\\DSKCreateDevice| (BOUNDP TYPENAMEP) POSTEDITALISTS (FASSOC) -HASH-EQUAL (CL:ASSOC) TERM.PRINTCHAR (>=) ARCTAN2 (FLESSP) ADDSPELL1 (IGREATERP) CL::%SXHASH (CL:SYMBOLP - CL:LISTP CL:NUMBERP CL:STRINGP CL:BIT-VECTOR-P CL:PATHNAMEP) FASL-FILEDATE (EQL) -HASH-STRUCTURE-LOOKUP (CL:CONSP) %REDUCE-INTEGER (CL:CONSP CL:INTEGERP >= < <=) HCOPYALL (HARRAYP) -SPY.MAKEGRAPHNODES (LISTGET ZEROP ILESSP) HASH-STAR (>) \\LEAF.USE.NEW.CONNECTION (FMEMB DIRTYABLE) -NARGS (LITATOM ILESSP TYPEP) GET-FILEMAP-FROM-FILECREATED (FIXP LESSP) COMPILER::FIND-TOP-ENVIRONMENT -(COMPILER::ENV-P) FLTINTLOG (> LESSP >=) FM.RESETMENU (WINDOWP) CMLREADSEMI (FMEMB) OLD.FIND.SYMBOL ( -GREATERP IGREATERP ILEQ IGEQ FIXP ILESSP) CLISPATOM1 (FIX89A FIX89 CLUNARYMINUS? ZEROP LITATOM NUMBERP - MINUSP CLBINARYMINUS? CLISPNOTVARP CLISPFUNCTION? STOPSCAN? FLOATP) CLISPEXPANSION (GETPROP CL:EQUAL) - NODECREATE (IMAGEOBJP) RPLCHARCODE (STRINGP SMALLP ILESSP) FB.DELVERCOMMAND (FIXP) \\SEARCHPRESSFONTS - (INFILEP) EXPANDBM (LESSP <= MINUSP GREATERP) TILE (IGEQ) TWODINSPECTW.CREATE (LITATOM POSITIONP -WINDOWP REGIONP) \\TEDIT.WORDBOUND.READTABLE (GREATERP ILEQ) FNUM-STRING (CL:PLUSP MINUSP) -COMPILER::ALPHA-FUNCTIONAL-FORM (CL:CONSP CL:SYMBOLP) EDITGRAPH2 (MOUSESTATE LASTMOUSESTATE) -MENUWINDOW (TYPENAMEP NUMBERP) GET-ENVIRONMENT-AND-FILEMAP (STREAMP RANDACCESSP) CLISPCAR/CDR2 (ZEROP) - \\DRAWARC.GENERIC (GREATERP LESSP) COMPILE-IN-CORE (BOUNDP STREAMP OPENP) DIGITSBDP (FLOATP IGREATERP - SMALLPOSP SMALLP ILEQ) DO-HISTORY-SEARCH (APPLY* EDIT4E EDITFINDP) PRETTYCOM (LITATOM BOUNDP MEMB -ASSOC GETPROP) PRETTYPRINT (DISPLAYP ATOM IGREATERP BOUNDP EXPRP SELECTQ FMEMB PRETTYPRINT1 GETPROP) -\\CONVERTNUMBER (>= > <) EXTTOINT (<) GETXIP (TIMEREXPIRED?) PRETTYDEF1 (SOME EQUAL) -BLTPATTERN.REPLACEDISPLAY (>) TTECHO.TO.FILE (EQMEMB COMPLEXCHARP) GLOBAL-MACRO-FUNCTION (TYPEP -CL:SPECIAL-FORM-P FMEMB LITATOM GETD) \\SET.VMEM.FULL.STATE (ILESSP .VMEM.CONSISTENTP.) \\GOOD.DASHLST - (LITATOM BITMAPP NUMBERP GREATERP ODDP) CLISPCAR/CDR1 (ZEROP IGREATERP) INIT-CML-READTABLES (GREATERP -) \\TEDIT.GET.SINGLE.PARALOOKS (IGREATERP GREATERP ILESSP) INTTOEXT (ILEQ TYPENAMEP CL:INTEGERP -IGREATERP) \\MAKEFRAME (ILESSP) ALLOCHASH (NUMBERP LITATOM) \\FAULTINIT (SELECTC IGREATERP) -CL:VECTOR-PUSH (%ONED-ARRAY-P %GENERAL-ARRAY-P) \\D01.FAULTINIT (IGREATERP ILEQ GREATERP BITTEST) -\\UNVISIBLE.FLUSH.OPEN.STREAMS (DIRTYABLE) \\CHECKSUM (ILEQ IGREATERP) \\10MB.INPUT.INTERRUPT ( -IGREATERP TIMEREXPIRED?) NEAREST/MULTIPLE (IGREATERP) SPY.BUFFER.ENTRY (ILEQ) MAKEHARDCOPYSTREAM ( -WINDOWP) \\DL.FAULTINIT (.VMEM.CONSISTENTP. ILESSP) SPY.UPDATE.TITLE (INSIDE? MOUSESTATE) SLICEREF ( -ILESSP) SQRT (FLESSP FGREATERP) SYMBOL.PNAME (GREATERP) |\\UFSCreateDevice| (BOUNDP TYPENAMEP) -COMPILE-FILE-SETF-SYMBOL-FUNCTION (FMEMB CL:CONSP) PRETTYDEF (\\DTEST NLSETQ RANDACCESSP -EQUAL-READER-ENVIRONMENT) D-ASSEM::EMIT-BYTE (CL:CONSP) \\BUFFERED.BOUTS (IGREATERP ILEQ) -DRAWDASHEDLINE (IGEQ) SEDIT::CFV-LIST (FMEMB ILESSP) PRETTYDEF0 (OPENP) \\FILEMAP-HASHOVERFLOW (> <= -STRING.EQUAL) D-ASSEM::FIXUP-NTENTRY (CL:SYMBOLP FMEMB) SCALEPAGEXUNITS (ILESSP) \\EXTNORMALIZE ( -IGREATERP) \\TEDIT.PARSE.CHARLOOKS.LIST (TYPENAMEP FONTP) COMPILER::ALPHA-COMPILER-LET (CL:CONSP) -%NUMERIC-STRING-P (CL:STRINGP IGREATERP ILESSP) \\EXTFQUOTIENT (IGREATERP IGEQ ILEQ) CL:MACRO-FUNCTION - (CL:SYMBOLP LOCAL-SYMBOL-FUNCTION) FLTSTR (= FLOATP IGREATERP SMALLPOSP SMALLP ILEQ > <) -FM.RESETSTATE (WINDOWP TYPENAMEP) CREATEMDSTYPETABLE (ZEROP MINUSP LESSP GREATERP) |\\LFOpenFile| ( -TYPENAMEP FMEMB TYPEP) |\\UFSWritePages| (IGREATERP) PRETTYDEFCOMS (SYNTAXP LITATOM) |\\UFSOpenFile| ( -TYPENAMEP DIRTYABLE DSKP DIRECTORYNAMEP =) \\CONVERT.FLOATING.NUMBER (CL:CONSP MINUSP) -|\\LFExtendFileIfNecessary| (WITH.MONITOR GREATERP) LISTRECORDEFS (SMALLP GREATERP) -|\\UFSDirectoryNameP| (FIXP) CL:COMPILE-FILE (STREAMP) PRINTDATE1 (DISPLAYP) LISPSOURCEFILEP (STREAMP -RANDACCESSP) |\\UFSSetFileInfo| (TYPENAMEP STRINGP FIXP) SCALEPAGEYUNITS (ILESSP) -\\TEDIT.PARSE.PARALOOKS.LIST (TYPENAMEP BOUNDP) \\HANDLE.RAW.PACKET (APPLY*) ICMLARRAY.VALUECOMMANDFN -(EQL NUMBERP) \\TEDIT.PROCEXITFN (WINDOWPROP) MSPRGDWIM (LITATOM) CL:MAKE-ARRAY (CL:LISTP >= EQUAL > -<=) MB.THREESTATE.SHOWSELFN (FFETCHFIELD) \\FTP.UNPACKFILENAME (> U-CASEP) COMPILE.FILE.DEFINEQ (FMEMB -) DSPCLIPPINGREGION (EQLENGTH EVERY) |\\LFGenerateFiles| (IGREATERP SELCHARQ CL:ZEROP) -\\D01.ASSIGNBUFFERS (ILESSP) HASH-COMMA (FFETCHFIELD) |\\UFSRenameFile| (\\UFS.OPENP -|\\UFSRenameFile-C| EQL) DIRECTORY.FILL.PATTERN (FILENAMEFIELD) \\GETPRESSFONTNAMES (MEMB ILESSP EQUAL -) \\NSRANDOM.PREPARE.CACHE (GREATERP <= <) \\SPPWATCHER (\\CLOCKGREATERP TIMEREXPIRED? SEQ.GREATERP) -INCORNER.REGION (ILEQ IGEQ NEARTOP) |\\UFSTruncateFile| (> GREATERP |\\UFSGetFileInfo-C|) TERM.DOWN (> -) ARCTAN (FLESSP FGREATERP) TTDELETECHAR (AT.START.OF.BUF AT.END.OF.LINE AT.START.OF.LINE) -MSCHECKEMPTY (FIXP) \\PARSE.PORTCONSTANT (IGREATERP IGEQ ILEQ) STORETABLE (FMEMB) TEDIT.INCLUDE ( -INFILEP OPENP \\TEDIT.FORMATTEDP1 IGREATERP) POSTSCRIPT.PUTBITMAPBYTES (LESSP GREATERP IGEQ IGREATERP -CL:PLUSP FMEMB) D-ASSEM::TYPE-NAME-FROM-SIZE (<=) TEDIT.PARSE.PAGEFRAMES1 (TYPENAMEP) \\DOVE.FAULTINIT - (.VMEM.CONSISTENTP.) BLTPATTERN (<= >= BITMAPP WINDOWP) TTDELETEWORD (AT.START.OF.BUF) MSOUTPUT ( -OPENP) \\FIXLOCALNET (ILESSP) CLISPLOOKUP (FLOATP) TEDIT.GET (MOUSECONFIRM INFILEP STREAMP LITATOM) -|\\UFSCloseFile| (DIRTYABLE |\\UFSCloseFile-C|) DIRPRINTNAME (> <= GREATERP) FM.HIGHLIGHTITEM (WINDOWP - WINDOWPROP TYPENAMEP) \\NSFILING.EVENTFN (DIRTYABLE) |\\LFEventFn| (DEFINEDP |\\LFDirectoryP|) -\\COMPUTE.ARC.POINTS (GREATERP ZEROP MINUSP LESSP FGTP) CLISPATOM2D (NUMBERP) \\CURVEEND (GREATERP -IGEQ IGREATERP FMEMB ILEQ) |\\VFMSplit1| (IGREATERP) \\FM.EDIT-GETPOINTERINFO (GREATERP IGREATERP) -PRINT-READER-ENVIRONMENT (EQUAL-READER-ENVIRONMENT) CL:MACROEXPAND-1 (CL:CONSP CL:SYMBOLP) \\TAN-FLOAT - (< >) ADDNAKEDCHAR (IGREATERP AT.END.OF.BUF) |\\UFSGetFileInfo| (TYPENAMEP) FM.GETITEM (WINDOWP EQUAL -) \\TEDIT.APPLY.PARALOOKS (IMAGEOBJP IGEQ) \\BN.FROM.FIXP (TYPENAMEP ILESSP EQUAL) NLAMBDAFNP (EQMEMB -FGETD) PRETTYVAR (LITATOM NUMBERP) COMPILER::ALPHA-COMBINATION (CL:CONSP CL:SYMBOLP COMPILER:ENV-FBOUNDP - CL:MEMBER) |\\LFRemoveDirEntry| (\\EOFP CL:ZEROP ILESSP) FM.CHANGESTATE (WINDOWP TYPENAMEP OPENWP -FMEMB) \\FTP.OPENFILE.FROM.PLIST (\\FTP.HANDLE.NO BSPOPENP) \\CLOSELEAFCONNECTION (CLOSESEQUIN) -\\BN.COMPAREN (IGREATERP ILESSP) \\FM.EDIT-DELETE (MOUSESTATE ZEROP \\FM.ONITEM IGEQ EQUAL IGREATERP) -\\MEDW.CARET.SHOW (IGREATERP ILESSP OPENWP) SEDIT::ASSIGN-FORMAT-QUOTE (TYPENAMEP) PRETTYVAR1 (MEMB -ASSOC FITP) \\PS.BOUTFIXP (MINUSP LESSP) PRETTYCOM1 (LITATOM ERSETQ) XCL::PPRINT-DEFINER-FITP (CL:CONSP -) FILLNGON.IP (IGREATERP GREATERP) WHO-LINE-WHAT-IS-RUNNING (MEMB) D-ASSEM::REF-VAR (D-ASSEM::DVAR-P -CL:CONSP) \\UFS.OPENP (CL:FUNCALL) FILEPKG.MERGECHANGES (MEMBER) ASKUSERCHAR (IGEQ ILEQ) -\\GTREADTABLE1 (TYPENAMEP) \\FLOATINGSCALE (MINUSP) TB.MAP.SELECTED.ITEMS (< >) CLISPATOM2C (LITATOM -GETPROP CLISPFUNCTION?) \\GTTERMTABLE (TYPENAMEP) LVLPRIN0 (SUPERPRINTEQ MINUSP) \\FM.EDIT-WORDDELETE -(FMEMB ILESSP) VERBNOTICELIST (FMEMB) MAKEDEFLIST (LITATOM) MSINIT (FMEMB FIXP) HPINITRDTBL ( -READTABLEP) FM.GETSTATE (WINDOWP) DO-APPLY-EVENT (CL:MACRO-FUNCTION) LISTFILES (LISTFILES1) -\\MAIKO.PUNTBLTCHAR (IGREATERP ILESSP FMEMB) GETSYNTAX (FIXP TYPENAMEP FMEMB) PRINTPARA (MINUSP ILEQ) -\\UFS.REMOVE.HOST.FIELD (DSKP STREQUAL) |\\UFSDeleteFile| (\\UFS.OPENP |\\UFSDeleteFile-C|) -\\GETREADSYNTAX (IGREATERP) |\\UFSReadPages| (LEQ) FIXDATUM (LITATOM STRPOSL CLISPNOTVARP FIXP EQUAL -CONSTANTEXPRESSIONP) TEDIT.BUILD.PCTB (STREAMP RANDACCESSP TYPENAMEP GREATERP IGREATERP ZEROP FMEMB) -D-ASSEM::DCODE-FROM-DLAMBDA (>) \\BN.PLUS2 (ILESSP IGREATERP) WHO-LINE-TTY-STATE (PROCESS.FINISHEDP -MEMB) D-ASSEM::CHOOSE-OP (<=) \\UPDATE.PSC (FFETCHFIELD) \\TEDIT.COPYINSERTFN (STRINGP IMAGEOBJP) -ADDTO (EQMEMB) POSTSCRIPT.SHOWACCUM (EQP) %PATHNAME-EQUAL (%DIRECTORY-COMPONENT-EQUAL) ASKUSER1 ( -ASKUSER1) \\UFS.FULLNAME (DSKP) TRANSLATE.LOCF (FIXP SELECTQ) \\10MBWATCHER (ILESSP) PFI.HANDLE.* (<) -\\BLTSHADE.GENERICPRINTER (ZEROP) D-ASSEM::FETCH-HUNK (CL:ZEROP <=) \\GETTERMSYNTAX (IGREATERP) -\\M44ACTONVMEMFILE (ILEQ IGREATERP GREATERP ILESSP IGEQ) \\LEAF.ERROR (IGREATERP) CHECKRECORDNAME ( -LITATOM) CENTERPRINTINREGION (EQLENGTH) PRINTPARA1 (ILESSP IGREATERP) PRINTARRAY-TO-LIST (ARRAYP -IGREATERP) COMP.SETARG (FIXP IGREATERP ILEQ) CIRCSHADE.DISPLAY (NUMBERP STREAMP TEXTUREP) TTYINENTRYFN - (LASTMOUSESTATE) \\CHAIN.UP.RPT (GREATERP) \\DSKDISPLAY.REPAINTFN (|\\LFDirectoryP|) -START.OF.PARAGRAPH? (COMPLEXCHARP) NORMLOOP (IGREATERP ILESSP) \\LOOKUPPORT (GREATERP >) -CL:ARRAY-DIMENSIONS (%ONED-ARRAY-P %TWOD-ARRAY-P %GENERAL-ARRAY-P) D-ASSEM::PUSH-INTEGER (CL:ZEROP = -<=) SI::ADVISE-CONTENTS (CL:SYMBOLP = CL:MEMBER) SETCOLOR16.IP (NUMBERP) \\BN.ABS (ILESSP) -\\NSRANDOM.READ.SEGMENT (< DIRTYABLE >) \\BN.INTEGERLENGTH (INFINITEP) MAKEFILE1 (FILEFNSLST MEMB) -\\UFS.DIRECTORY.NAME (STREQUAL) \\INIT.POWERS.OF.TEN (GREATERP) SEDIT::SIMPLE-STRING-SCAN (IGREATERP -ILESSP) |\\InitCurveBrushes| (GREATERP) COMP.ARG (FIXP IGREATERP ILEQ) SKIP/ZAP (AT.END.OF.LINE) -SCROLL.HANDLER (INSIDE? TIMEREXPIRED? LASTMOUSESTATE \\CLOCKGREATERP) \\AUTHENTICATION.FIND.SERVER ( -SELECTQ) \\COERCEASCIITONSFONT (GREATERP) READARRAY-FROM-LIST (IGREATERP NUMBERP) \\ALLOCMINIMUMSIZES -(FMEMB) \\STRINGOUT (IGREATERP GREATERP) UNDOLISPX3 (NLSETQ TAILP) BREAK (LITATOM STRING.EQUAL) -D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL (CL:MEMBER) \\SETNEWTIME0 (IGREATERP IGEQ) \\BN.TIMES2 ( -GREATERP) CLISPATOM2A (FMEMB BOUNDP STKSCAN GETPROP LITATOM DWIMIFY2) OPENNSOCKET (TYPENAMEP) -TEDIT.PAGEFORMAT (TYPENAMEP) LVLPRIN (MEMB TAILP) \\M-VMEMSAVE (.VMEM.CONSISTENTP.) \\FM.EDIT-BACKUP ( -IGREATERP ILESSP) MSINTERPRET (GETHASH FMEMB) \\CARET.FLASH.MULTIPLE (\\CARET.FLASH?) SETSYNTAX ( -\\TERMCLASSTOCODE SELECTQ) \\DOCOMPRESSVMEM (IGEQ) TRIM.BITMAP (GREATERP BIT.IN.COLUMN LESSP -BIT.IN.ROW) \\SETTERMSYNTAX (ILEQ IGREATERP) RECORDECLBLOCK (ZEROP FIXP FIXSPELL) \\SETREADSYNTAX ( -IGREATERP BITTEST ILEQ) UNIX.SENDSCREENPARAMS (UNIX.PARAMS.CONFIRM STREAMPROP) DINFO.TITLEMENUFN ( -OBTAIN.MONITORLOCK FGETD) UNCOPYATOM (READSYS.HAS.PACKAGES) TERM.LEFT (>) DIRFILENAME (U-CASEP) -D-ASSEM::GENERATE-EASY-ENTRY (=) CHAT.TYPEOUT (ILESSP SELCHARQ IGREATERP TTY.PROCESSP OPENWP) -\\NSFILING.CLOSEFILE (DIRTYABLE) MAKEFILE (EQMEMB EQUAL STRING-EQUAL INFILECOMS? FMEMB FIXSPELL) -NEARESTCORNER (ILESSP) SEDIT::SIMPLE-STRING-OFFSET (IGREATERP) \\TEDIT.GET.INSERT.CHARLOOKS (ATOM -ZEROP) \\DSKDISPLAY.BUTTONEVENTFN (MOUSESTATE) \\MEDW.GETSCREENREGION (ILESSP IGEQ LASTMOUSESTATE -ERSETQ \\CLOCKGREATERP MOUSESTATE) IRNDLIST (FIXP) SYNTAXP (IGREATERP FMEMB) MSPRGLAMBDA (CL:SYMBOLP -FMEMB CL:CONSP CL:ZEROP CL:SET-DIFFERENCE CL:PLUSP MSFINDP) \\MAPCHARTABLE (GREATERP) CLISPBROADSCOPE -(GETP ZEROP) SETCOLORLV.IP (BITMAPP LESSP GREATERP) \\TEXTSTREAM.FILENAME (TYPENAMEP) -FTP.BREAKCONNECTION (FMEMB) \\NSFILING.UPDATE.ATTRIBUTES (MEMB ASSOC) INTERLISP-NLAMBDA-FUNCTION-P ( -LITATOM FMEMB CL:SPECIAL-FORM-P) |\\LFParseFileName| (CL:ZEROP) \\BN.DIVIDE (ILESSP GREATERP IGEQ -IGREATERP) TB.RECONSIDERRANGE (GREATERP FFETCHFIELD) \\REMOVE-DECLS (CL:ATOM CL:SYMBOLP -CL:SPECIAL-FORM-P CL:CONSP) OPT.JLENPASS (IGREATERP ILESSP) COPYATOM (CL:STRING= GREATERP) -CIRCSHADE.BLT (NUMBERP STREAMP TEXTUREP) ARCSIN (FLESSP FGREATERP) \\MEDW.GETBOXSCREENPOSITION (FIXP -IGREATERP LASTMOUSESTATE) D-ASSEM::GENERATE-ARG-CHECK (D-ASSEM::DLAMBDA-REST D-ASSEM::DLAMBDA-KEY -D-ASSEM::DLAMBDA-ALLOW-OTHER-KEYS) ONFILE (MEMB INFILECOMS? TESTRELATION) RECORDECLTAIL (RECDEC? -GETSETQ) HVRPTREAD (IGREATERP) COMPILER::ALPHA-ATOM (CL:SYMBOLP) READARRAY (IGREATERP NUMBERP) -PRINENDLINE (SELECTQ DRIBBLEFILE) ASKUSER$ (GREATERP ILESSP MEMB) PRINTARRAY (LITATOM ARRAYP IGREATERP - PRINT) \\FM.EDIT-SETUPTTBL (GREATERP) CHECKPATHS (FMEMB MSINTERPRETSET FASSOC) NORMSECT (IGEQ ILEQ -ILESSP) \\LITCHECK (LITATOM STRINGP) D-ASSEM::INTERN-VAR (CL:CONSP) \\TEDIT.PARABOUNDS (ZEROP ATOM) -D-ASSEM::EASY-ENTRY-P (D-ASSEM::DLAMBDA-KEY CL:EQUAL CL:THIRD) INVERT.BITMAP.VERTICALLY (GREATERP) -\\LEAF.HANDLE.INPUT (TYPENAMEP) |\\PFEnsureInitialized| (|\\PFVersionOK|) \\DL.NEWFAULTINIT (GREATERP -\\LOCKEDPAGEP > < <=) |\\PFTrimHelper| (EQL IGREATERP ZEROP) DELETECONTROL (STRINGP) SUPERPRINT (ATOM -STRINGP ILESSP IGREATERP SUPERPRINTEQ SEMI-COLON-COMMENT-P ARGTYPE) \\BN.IGNN (ILESSP) -|\\LFFindNextFile| (GREATERP DIRECTORY.MATCH) DINFO.OPENTEXTSTREAM (EQUAL) CHAT.EMACS.MOVE (IGEQ -ILESSP IGREATERP) FITP (>) \\CIRCSHADE.DISPLAY (IGEQ MINUSP EQUAL IGREATERP) \\SIN-FLOAT (> <) TYPESOF - (FMEMB LITATOM EQMEMB CL:FUNCALL HASDEF GETD) \\VALID.FILING.CONNECTIONP (STRING-EQUAL -\\SECONDSCLOCKGREATERP \\NSFILING.SET.CONTINUANCE) \\DSKDISPLAY.CREATE.WINDOW (WINDOWP) SETTAIL? ( -EMPTY.BUFFER ILESSP ILEQ) BESTPUPADDRESS (FIXP GREATERP IGEQ ILESSP ILEQ IGREATERP) |\\VFMMerge1| (EQL - IGEQ) |\\LFHighestVersions| (STREQUAL) FM.ITEMPROP (ILESSP TYPENAMEP) TEDITMENU.STREAM (EQUAL) -\\TOTALFIXEDHEIGHT (FMEMB) \\SETBSPTIMEOUT (IGREATERP ILEQ) TEDIT.INSERT.OBJECT (TYPENAMEP ILEQ -IGREATERP IEQP) LOOKUP.NS.SERVER (EQUAL.CH.NAMES) SUBPRINT/ENDLINE (SUPERPRINTEQ) SI::ADVICE-HASDEF ( -CL:GETHASH) EQLENGTH (ILESSP) \\TEDIT.WINDOW.SETUP (FREPLACEFIELD) RECORDECL1 (FMEMB SMALLP RECDEC? -NUMBERP LITATOM FIXSPELL ASSOC) CL::PROCESS-TYPE (CL::PS-TEMPLATE CL:MEMBER) PRINTLEAF (IGREATERP -EVENP IGEQ) UNIX.SETDISPLAYTYPE (UNIX.PARAMS.CONFIRM READP TIMEREXPIRED?) TB.CONSIDERRANGE (GREATERP -FFETCHFIELD) DINFO.SHOWSEL (STRINGP) D-ASSEM::RESOLVE-JUMPS (D-ASSEM::REDUCE-UNCERTAINTY D-ASSEM::DTAG-P -) CHAT.HOLD (FFETCHFIELD MOUSESTATE) \\CIRCSHADE.IP (IGEQ MINUSP EQUAL IGREATERP) PFI.HANDLE.PUTPROPS -(LITATOM MEMB) DISPLAY/NUMBER/READER/TOTAL (GEQ GREATERP) MSHASHLIST1 (EQMEMB FMEMB MSMEMBSET) -BIGNUM.DEFPRINT (INFINITEP SMALLP ILESSP IGREATERP LEQ IGEQ) HVREADCHECKGETFN (BOUNDP MEMB ASSOC GETD -MOUSECONFIRM) \\TEDIT.BASICFIND (IGREATERP GREATERP) XCL::GET-WALKER-TEMPLATE (CL:SYMBOLP CL:LISTP) -INVERT.BITMAP.HORIZONTALLY (GREATERP) CONSTANTOK (SMALLP STRINGP FLOATP FIXP LITATOM IGREATERP) -ECHOCHAR (IGREATERP ILEQ) D-ASSEM::COMPUTE-JUMP-SIZE (<) DELETELINE (ON.FIRST.LINE) CLISPATOM2 (MINUSP - CLISPRESPELL ATOM NUMBERP CLISPNOEVAL FMEMB LITATOM EQUAL) \\NSRANDOM.STREAM.CHANGED (DIRTYABLE) -POSITIONP (NUMBERP) \\TEST.PARAGRAPH.LOOKS (NUMBERP SELECTQ IGREATERP) SEDIT::SET-SELECTION-COMMENT ( -TYPENAMEP) \\GETBRUSH (TYPENAMEP) CONVEXP (ILEQ IGREATERP ILESSP) \\UFS.HANDLE.RELATIVEDIRECTORY ( -SELCHARQ NCHARS EQMEMB) \\SEND.RFC (\\ROUTE.PUP) MSPRGTEMPLATE1 (APPLY* CL:KEYWORDP) \\BN.TH2D (GEQ -IGREATERP) \\MEDW.GETSCREENPOSITION (MOUSESTATE) \\TOTALFIXEDWIDTH (FMEMB) ASKUSERSETUP (STRINGP READP -) \\BSP.SENDBUFFER (IGREATERP) D-ASSEM::REDUCE-UNCERTAINTY (CL:ZEROP) SEEFILE (GREATERP ILEQ) -CLISPATOM1A (STOPSCAN? ZEROP) GETFILEPKGTYPE (LITATOM <= STRPOS) |\\UFStoOtherRenameMess| (EQUAL) -\\CARET.FLASH.AGAIN (DISPLAYSTREAMP \\CARET.FLASH) D-ASSEM::SPLICE-IN-JUMPS (D-ASSEM::DTAG-P) -\\TEDIT.FIND.FIRST.LINE (ZEROP IGREATERP LESSP ILEQ IEQP) \\SEND.EXPEDITED.XIP (GREATERP TIMEREXPIRED? - IEQP ILEQ IGEQ SELECTC EQNSHOSTNUMBER) SEDIT::SET-POINT-COMMENT (TYPENAMEP) EQP (FIXP FLOATP NUMBERP) - \\DSKDISPLAY.DESTROY.WINDOW (WINDOWP WINDOWPROP) SEGMENT.BIT.LENGTH (COMPLEXCHARP) \\IRND (MINUSP) -ETHERPORT (FIXP) |\\UFSSetFileType| (EQUAL) SHOW.MATCHING.PAREN (< TYPEAHEAD? FIXP) MBUTTON.SET.FIELD -(ZEROP) XCL::%DELETE-DEFINER (CL:SYMBOLP) GETDELETECONTROL (STRINGP) CL::%STRUCTURE-TYPE-TO-FIELDSPEC -(CL:CONSP) \\UFS.FILEINFOFN (>) RECORDECL0 (FMEMB) CL::STEP-COMMAND (CL:CONSP CL:MEMBER CL:SYMBOLP -CL:CONSTANTP) \\BN.ISUM1 (ILESSP) XCL::WHERE-IS-NAMESTRING (CL:EQUAL) \\CIRCSHADE.BLT (IGEQ MINUSP -EQUAL IGREATERP) NUMBERPAD.READER.HANDLE.CHAR (NUMBERP GEQ) D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL ( -FMEMB CL:ZEROP) INSURE.BRUSH (NUMBERP) WINDOWADDPROP (FMEMB) INVERT.BITMAP.DIAGONALLY (GREATERP) -\\LEAF.FIX.BROKEN.SEQUIN (\\CLOCKGREATERP HASTTYWINDOWP TIMEREXPIRED? TYPENAMEP) \\FTP.GENERATEFILES ( -IGREATERP U-CASEP \\FTP.HANDLE.NO BSPOPENP EQMEMB) \\CIRCSHADE.XSCAN.IP (IGEQ MINUSP EQUAL IGREATERP) -\\DL.MARK.PAGES.UNAVAILABLE (GREATERP) \\INSURESCREEN (TYPENAMEP) \\BN.SIGN (ATOM IGREATERP ILESSP) -DRAWCURVE (BRUSHP) /RPLACA (LITATOM) \\BN.D2TH (IGEQ) \\8859OUTCHARFN (IGREATERP) /DSUBST (LITATOM -EQUAL) COMPILER::ENV-INLINE-DISALLOWED (CL:MEMBER COMPILER::ENV-P) \\NSPRINT.MEDIUM.CHECK (EQUAL -STRPOS) \\DL.UNMAPPAGES (GREATERP) \\TEST.CHARACTER.LOOKS (NUMBERP) \\UFS.VALID.PROPP (SOME) -\\ORIGTERMTABLE (GREATERP) \\UFS.NEXTFILEFN (> < DSKP = ILESSP IEQP DIRECTORY.PARSE) EDITMODE ( -DISPLAYSTREAMP) SI::ADVICE-PUTDEF (CL:CONSP) \\INTERPRET-ARGUMENTS (< >= CL:CONSP) ECHOCONTROL ( -\\THINCHARCODEP SMALLP IGEQ) \\UFS.REGISTER.GFS (>) DRAWCIRCLE (LESSP EQP) |\\LFNormalizeVolumeName| ( -STRPOS) /RPLACD (LITATOM) \\FTP.ADD.QUOTES (<=) HVBAKREAD (FIXP IEQP GREATERP SMALLP) -TB.CONTIGUOUS.SELP (GREATERP FFETCHFIELD) CHAT.MENU (LASTMOUSESTATE) DMCHAT.RIGHT (<) -COMPILER::ENV-INLINE-ALLOWED (CL:MEMBER COMPILER::ENV-P) D-ASSEM::START-PC-FROM-NT-COUNT (CL:ZEROP) -\\DSPXPOSITION.PSC (EQUAL) COMP.MLLFN (LITATOM ZEROP) BRUSHP (LITATOM \\DEFINEDP MEMB NUMBERP -\\POSSIBLECOLOR) XCL::WHERE-IS-FILES (CL:LISTP) PARSE-FORMAT-OPERATION (CL:DIGIT-CHAR-P CL:MEMBER) -FB.SUBITEMP (FB.SUBITEMP) SI::A-OR-AN (SI::VOWEL-P) MENUBUTTONFN (LASTMOUSESTATE) ICMLARRAY.SETVALUE ( -EQL) MSPRGRECORD (FMEMB) ITEM.WINDOW.SET.STACK.ARG (TYPENAMEP) ROTATE.BITMAP.RIGHT (GREATERP) -\\FTP.CLOSEFILE (BSPOPENP \\EOFP) |\\PFGetLVPage| (STRING-EQUAL) \\TEDIT.MENU.WHENHELDFN (ATOM) -COURIER.READ (LITATOM IGREATERP IEQP GREATERP) COMP.GETBASE (OPT.CALLP FIXP ILESSP IGREATERP) -CLUNARYMINUS? (FNTYP CLISPNOTVARP) TREEGRAPHNODE (ATOM NUMBERP >=) TB.DECONSIDERRANGE (GREATERP) -FILLPOLYGON (EQUAL) \\BRUSHBITMAP (GREATERP ILESSP) RECURSIVE.COLLECTDESCENDENTS ( -|NC.GraphNodeIDGetProp|) WHILEDOUNTIL (ATOM EDITFINDP) CLISPRECORD (RECORDFIELD?) COMPILER::SCAN-ONE-FORM - (CL:ATOM) I.S.OPR (ATOM EQUAL) SEGMENT.LENGTH (COMPLEXCHARP) \\CLEARWORDS (ILEQ IGREATERP) -FILEGETDEF.FNS (EQMEMB) |\\VFMClearIntervals| (GREATERP) \\BN.NZEROS (GREATERP) \\GETMISCSOCKET (FMEMB -) READ/NODE (MOUSESTATE INSIDEP) \\TEDIT.APPLY.STYLES (LITATOM DEFINEDP) PRINTLINE (IGEQ ILEQ GREATERP - SMALLP) GENERATOR (STACKP) CLBINARYMINUS? (NUMBERP LITATOM CLISPNOTVARP CLISPFUNCTION? FIXSPELL1) -|\\LFVersions| (|\\LFDirectorySearch|) \\UFS.ABORT.DIRECTORY (TYPENAMEP >) COMP.MLL (ZEROP ILESSP -IGREATERP) TERM.UP (<) ANTILOG (GREATERP LESSP FGREATERP) \\RTP.HANDLE.RFC (SELECTC \\RTP.FILTER) -MSBINDVAR (LITATOM FMEMB) COMPILER::CHECK-ARG (CL:SYMBOLP CL:KEYWORDP) LISPX (FGETD SYNTAXP LITATOM -BOUNDP GETLIS CL:FUNCALL HISTORYMATCH GETD SOME FNCHECK) ROTATE.BITMAP.LEFT (GREATERP) \\LEAF.TIMEDOUT - (>=) COMPILE-FILE-EXPRESSION (CL:SPECIAL-FORM-P INTERLISP-NLAMBDA-FUNCTION-P EQUAL) \\LEAF.RECONNECT -(TYPENAMEP) CL::COERCE-TYPE (CL:CONSP) |\\UFSMakeUnixFormatName| (GREATERP) \\PEEKREFILL (IGREATERP -IGEQ ILEQ) \\DSPYPOSITION.PSC (EQUAL) POSTSCRIPT.BITMAPSCALE (GREATERP LESSP) LAYOUTGRAPH (FASSOC) -\\SPP.SKIPBYTES (IGREATERP) \\UFS.ABORT.CL-DIRECTORY (TYPENAMEP >) LASTC (IEQP) \\SUBREAD (\\INTERMP -SKIPSEPRCODES IGREATERP \\XCCSP BITTEST \\BACKFILEPTR ILEQ PROPRB RBCONTEXT) DIRECTORY.MATCH1 ( -IGREATERP MEMB STRPOS DIRECTORY.MATCH1 LEQ SELCHARQ) LISPXREAD (IMAGESTREAMTYPEP NLSETQ) -MSUSERVBTABLES (BOUNDP HASHARRAYP EQMEMB) BREAKDOWN (EXPRP EQP MEMB NUMBERP GREATERP) UPPERCASEARRAY ( -GREATERP) RELDRAWTO (ZEROP) EMBEDPROG (REBINDP) \\MOVETO.PSC (EQP) PEEKCCODE (\\XCCSP \\BACKFILEPTR) -FILEPKGCOM (GREATERP) \\TEDIT.BRAVOFILE? (\\TFBRAVO.FIND.LAST.TRAILER \\TEST.CHARACTER.LOOKS LITATOM) -|\\UFSParse-Directory| (>) \\PERIODICALLY-WHO-LINE-SHOW-ACTIVE (TIMEREXPIRED? OPENWP TOPWP) CL:KEYWORDP - (CL:SYMBOLP) \\UFS.PARSE.BODY (>) LISPX/ (SELECTQ EQMEMB) \\ALLOCATE.ETHERPACKET (ILESSP) -PFI.HANDLE.DEFDEFINER (LITATOM EQMEMB GET) PARSE-NSADDRESS (STRINGP STRPOS IGREATERP >= <=) -RECLISPLOOKUP (MEMB) FB.COMMANDSELECTEDFN (MEMBER FB.SUBITEMP FB.MAKE.BROWSER.BUSY OPENWP) ADDCHAR ( -COMPLEXCHARP IGREATERP) \\TRANSFERPAGE (FFETCHFIELD) PRINTANDBOX (FIXP IGREATERP) UNIX-WRITE (IEQP) -\\PUTBASEFIXP (IGEQ) \\PUT.FILING.ATTRIBUTE (FIXP) SETCORNER (IGREATERP) \\BN.ICANON (IGREATERP ILESSP -) SKIPSEPRCODES (IGREATERP \\XCCSP) \\FLUSHPAGE (ILESSP ILEQ IGREATERP .VMEM.CONSISTENTP.) READC ( -\\XCCSP \\BACKFILEPTR) SKIPSEPRS (IGREATERP \\XCCSP) \\MAXWIDTHOFGROUP (GREATERP) ADVISEWDS (ILESSP -IGREATERP) CHDIR (\\UFSCHDIR-C) STOPSCAN? (GETPROP ILESSP ATOM) FILEGETDEF.MACROS (FMEMB) CLISPIF0 ( -FNTYP EQUAL) DWIMIFYFNS (GETPROP) TEDIT.WINDOW.SETUP (TYPENAMEP) \\FIXLINELENGTH.PSC (GREATERP) -\\RTP.HANDLE.PUP (\\RTP.FILTER) EXCHANGEPUPS (IEQP TIMEREXPIRED?) MSPRGMACRO (EQUAL MSFINDP) -FINDFIELDUSAGE (FMEMB) DECLARED-SPECIAL (FMEMB) TEDIT.FORMATTEDFILEP (ATOM EQFMTSPEC EQCLOOKS) -\\FTP.GETFILEINFO (TYPENAMEP) \\TEDIT.PUT.SINGLE.CHARLOOKS (TYPENAMEP ZEROP) \\MAXHEIGHTOFGROUP ( -GREATERP) COMPILER::ENV-DECL-P (COMPILER::ENV-P) SKREAD (IGREATERP) \\DSPFONT.PSC (TYPENAMEP MEMB) -\\NSFILING.DESERIALIZE1 (TYPENAMEP) CLISPATOM0 (CLISPELL LITATOM) TEXTOBJ (TYPENAMEP PROCESSP WINDOWP -DISPLAYSTREAMP) SEDIT::LINEARIZE-COMMENT (ILEQ) BLTMENUIMAGE (WINDOWP OPENWP) SEPRCASE (GREATERP) -MSGETBLOCKDEC (SOME LITATOM FMEMB EQMEMB) CL:MAKE-STRING-INPUT-STREAM (CL:ZEROP) \\ASSURE.FPTOVP.PAGE -(IGREATERP) \\FM.COLLECTNWAYS (FMEMB) |\\VFMInsert1| (ILESSP) \\SELECTREALPAGE (ILESSP .LOCKABLERP. -SELECTQ ILEQ IGREATERP IGEQ) TRYNEXT1 (STACKP) \\LEAF.GETFILEINFO (TYPENAMEP FMEMB) -ERASE.TO.END.OF.PAGE (>) CL:MAKE-CONCATENATED-STREAM (STREAMP) CHAT (CL:MEMBER PROCESSP PROCESSPROP -WINDOWPROP) RPTPUT (ILESSP LITATOM SMALLP) CLISPIFYLOOKUP (FLOATP) READTABLEPROP (LESSP GREATERP) -\\SPP.PREPARE.OUTPUT (FFETCHFIELD) DMCHAT.HANDLECHARACTER (DMCHAT.ADDRESS >= <) LOG (FGREATERP FLESSP) - TEDIT.REMOVE.MENUITEM (LITATOM STRINGP EQUAL MEMBER) SI::COMPILED-FUNCTION-DEBUGGING-INFO (CL:ZEROP = -) COMP.MAP (COMP.APPLYFNP COMP.CLEANFNP) PRINDOTP (> >=) MOVETOUPPERLEFT (EQLENGTH EVERY \\ILLEGAL.ARG -) WHO-LINE-SHOW-ACTIVE (TIMEREXPIRED?) INTERSECTREGIONS (GREATERP IGREATERP ILESSP IGEQ) SCANBACK ( -COMPLEXCHARP) MOVEDESCENDENTS (MEMBER) MSPRGE (LITATOM FMEMB SOME FGETD MSFINDP EQUAL NLAMBDAFNP -MSPRGMACRO) NSMAP (GREATERP) SHRKFY (LITATOM FNTYP BOUNDP) \\MKINTEGER (IGEQ) \\FTP.DELETEFILE ( -\\FTP.HANDLE.NO BSPOPENP) MOVENODE (EQUAL) \\BSP.SKIPBYTES (IGREATERP) REGIONP (EQLENGTH EVERY) CL:APPLY - (LESSP) SI::GET-STORED-ARGLIST (CL:ATOM) \\UTF16.BACKCHARFN (\\BACKFILEPTR) COUNTDOWN (IGREATERP) -BLTHLINE (IGEQ) COMP.COMPILER-LET (CL:CONSP) SI::DESCRIBE-USING-INSPECT-MACRO (CL:CONSP) \\GET.IOCB ( -IGREATERP) CREATE.NUMBERPAD.READER (IGREATERP ILESSP) MSINTERPA (FMEMB MSINTERPRETSET) -SI::FUNCTION-WRAPPER-INFO (CL:SYMBOLP) CLISPFORVARS (LITATOM STRPOSL FMEMB SELECTQ) SUPERPRINT/WRAPPER - (>) \\CH.FIND.ORG.SERVER (STRING-EQUAL) REALSTKNTH (ILESSP IGREATERP \\REALFRAMEP ILEQ) DEFPRINT ( -FIXP) \\FM.NUMBER-CHANGESTATE (EQUAL) \\TEDIT.SMALLERSEL (SHIFTDOWNP) SI::CLEAN-UP-CL-ARGLIST (CL:MEMBER - CL:CONSP) SI::COMPILED-FUNCTION-ARGLIST (CL:STRINGP) \\CH.LOCATE.SERVERS (\\LOCATE.NSNET STRING-EQUAL -) SCANFORWARD (COMPLEXCHARP) CL:PARSE-INTEGER (CL:STRINGP SMALLP ILESSP IGREATERP < > >= <=) -MSINTERPRETSET (EQMEMB GETD GETP) NOTOKSWAP (ARGS.COMMUTABLEP) \\FM.READUSERDATA (FMEMB) INSIDE? (IGEQ -) TTBIN (METACHARP) \\TEDIT.LARGERSEL (SHIFTDOWNP) \\LEAF.READPAGES (.PAGE.IS.AFTER.EOF. IGEQ IEQP -GREATERP READABLE <) \\INTERNAL/GETPASSWORD (LITATOM STRPOS STRINGP) MAPHASHFILE (GREATERP READSTBYTE) - FIXFIELDORDER (CONSTANTEXPRESSIONP NOTOKSWAP MEMB) COMP.SELECTQ (FMEMB COMP.PREDP) -TB.DO.ITEM.SELECTION (INSIDEP LASTMOUSESTATE GREATERP > < >= <= TB.CONTIGUOUS.SELP) SHOWWTITLE (ZEROP) - LOGIN (STRPOS) TEXTSTREAM (TYPENAMEP PROCESSP WINDOWP DISPLAYSTREAMP \\ILLEGAL.ARG) BLTVLINE (IGEQ) -PRIN2-LONG-STRING (TYPENAMEP < IGREATERP > >=) DINFO.CLOSEFN (TYPENAMEP) TTDELETELINE (EMPTY.BUFFER -EMPTY.LINE AT.END.OF.BUF AT.END.OF.LINE) |ShowIntervals| (GREATERP) LLSH (IGREATERP ILEQ TYPENAMEP -CL:INTEGERP) GETPUP (TIMEREXPIRED?) CLMAPS2 (FNTYP FMEMB CLREMPARS) SI::PARSE-CL-ARGLIST (CL:MEMBER) -TTSKREAD (IGREATERP COMPLEXCHARP FIXP READTABLEPROP) CANONICAL.HOSTNAME (STRPOS NUMBERP SMALLP < -LITATOM) TRACKCURSOR (EQUAL) READBQUOTECOMMA (FFETCHFIELD SYNTAXP) CL:EVAL-WHEN (FMEMB) -SHOWSHADEDITEMS (\\MENUSUBITEMS) SI::ADD-CHANGED-CALL (CL:REST CL:MEMBER) SEDIT::PRINT-STRING ( -IGREATERP ILESSP) CHECKDEFS (SOME EQUAL) CL::INSERT-INCLUDED-SLOT (CL::PSLOT-READ-ONLY) \\RSTRING2 ( -\\XCCSP IGREATERP BITTEST \\BACKFILEPTR \\EOFP) COURIER.EXPEDITED.CALL (GREATERP) BREAK0 (STRING.EQUAL -) OPENPUPSOCKET (TYPENAMEP) OVERFLOW? (ILESSP AT.END.OF.LINE) |\\PFCurrentVol| (EQL) -SPP.CLEARATTENTION (\\SPP.PREPARE.INPUT) \\INTERNAL/SETPASSWORD (IGREATERP GETD) UTF16BE.INCCODEFN ( -SMALLP) TB.DO.UNLESS.BUSY (OBTAIN.MONITORLOCK) |\\LFDirectorySearch| (\\EOFP CL:ZEROP ILEQ EQL IGEQ) -CHAT.TYPEOUT.CLOSE (OPENWP TTY.PROCESSP) PRIN2STRING (SELECTQ IMAGESTREAMP ILESSP IGREATERP) -|\\LFFindDirHole| (\\EOFP CL:ZEROP ILEQ IGEQ) \\10MBSENDPACKET (EQNSADDRESS.HOST) PFI.HANDLE.RPAQQ ( -BOUNDP) POSITION (IGREATERP) MASTERSCOPEXEC (LITATOM STRPOSL FGETD) \\FM.MAKEBITMAP (BITMAPP) TTYIN ( -STRINGP LITATOM < > GUESTUSER?) TTWAITFORINPUT (\\SYSBUFP LASTMOUSESTATE >= < EMPTY.BUFFER > -TIMEREXPIRED?) \\FM.NUMBER-SETUP (FMEMB) \\MOVEREALPAGE (ILESSP) \\LEAF.OPENFILE (TYPENAMEP -\\GETACCESS IGREATERP) \\TEDIT.CHARDELETE (ZEROP %GENERAL-ARRAY-P ILEQ) TTYIN1 (>= < SMALLP > FIXP -EQMEMB EMPTY.BUFFER METACHARP SELECTC IGREATERP ON.FIRST.LINE EMPTY.LINE BITTEST ENDREAD? TYPEAHEAD? -DEFINEDP BREAK.OR.SEPRP COMPLEXCHARP DO?CMD AT.END.OF.BUF ON.LAST.LINE TTSKREAD TTYIN.BALANCE -GUESTUSER? MEMB) \\TEDIT1 (STRINGP) SHRIEKER (ATOM) SEDIT::SCAN-FOR-BOUNDS (TYPENAMEP FIXP) -\\CARET.FLASH (\\CARET.SHOW) TTYIN.FINISH (IGREATERP COMPLEXCHARP EMPTY.BUFFER FIND.MATCHING.WORD -EQMEMB LITATOM) \\ATBLSET (BOUNDP GREATERP) INSIDEP (WINDOWP NUMBERP POSITIONP) -MAKE-READER-ENVIRONMENT (SMALLP ILESSP IGREATERP) TTYIN.READ (COMPLEXCHARP SELCHARQ SELECTC IGREATERP -\\RUNCODED SKIPSEPRS) RESTOREBUF (AT.END.OF.BUF IGEQ IGREATERP) \\TEDIT.COMMAND.RESET.SETUP ( -WINDOWPROP) CLEANPOSLST (STACKP) CH.PROPERTY (LITATOM) FASL::DUMP-INTEGER (<= <) TTYIN.SETUP ( -IMAGESTREAMTYPEP FMEMB) CLOSEPUPSOCKET (FMEMB) \\SETMACROSYNTAX (FMEMB ILEQ) HISTORYSAVE (ILESSP -IGREATERP ARCHIVEFN LISTGET1) CLISPIFYMATCHUP (FMEMB EQUAL) \\READTABLEP.DEFPRINT (IGREATERP) -FILEGETDEF.LISPXMACROS (SELECTQ MEMB) HPRINTEND (MINUSP) CONCATLIST (STRINGP LITATOM) REMOVE (EQUAL) -SEDIT::INSERT-COMMENT (TYPENAMEP) DWIMIFY1A (FIXPRINTIN NUMBERP) \\SMASHSTRING (IGREATERP GREATERP) -\\TEDIT.FIND.OVERLAPPING.LINE (ILEQ) READFROMBUF (AT.END.OF.LINE COMPLEXCHARP AT.END.OF.TEXT) -\\CREATECHARSET.IP (RANDACCESSP IEQP LESSP IGREATERP GREATERP ILESSP) READ-EXTENDED-TOKEN (\\EOFP -\\XCCSP IGREATERP \\BACKFILEPTR BITTEST ILEQ) TTYINREAD (DISPLAYSTREAMP LINEBUFFER-SKIPSEPRS) -FONTCREATE (TYPENAMEP IMAGESTREAMP FIXP STRINGP) \\TEDIT.SET-TOTLEN (GREATERP) SI::RESTORE-CALLS ( -REMPROP) COMP.EQ (LITATOM) ERRORMESS1 (ATOM STRINGP) OPENHASHFILE (MEMB ARRAYP) COPYALLBYTES (DISPLAYP -) SPP.FLUSH.TO.EOF (\\SPP.PREPARE.INPUT) CMLRDTBL (GREATERP) \\SETGROUPMIN (GREATERP) CLMAPS1 (FGETD -EVERY) GREET (GETD) GREET0 (FIXP EVENP ILESSP) ALLPATHS (FMEMB) INTERACT&ADD.BORDER.TO.BITMAP ( -GREATERP) GENERATEFN (STACKP) \\TRACKWITHBOX (LASTMOUSESTATE MOUSESTATE IGREATERP IEQP) DINFO.EXPANDFN - (LISTGET) SCROLLBITMAP (TYPENAMEP) ICMLARRAY.DOWINDOWCOMFN (MEMB) RPTPRINT (EQP) \\FTP.UNREGISTER ( -FMEMB) \\BSP.PREPARE.OUTPUT (BSPOPENP IGREATERP TIMEREXPIRED? IGEQ) CLSTOPSCAN? (ILESSP ATOM) -\\DRAWLINE.PSC (NUMBERP ZEROP LESSP) \\LET*-RECURSION (CL:CONSP FMEMB VARIABLE-GLOBALLY-SPECIAL-P) -DEFC (GETD) \\LOGIN.READ (SELECTQ STRPOS) EXEC-READ-LINE (READP SYNTAXP READ) DWMFY2 (LITATOM EQMEMB -FMEMB STRPOSL FIXPRINTIN CLISPNOTVARP DWIMIFY2A WTFIX0 FGETD EXPRP FIXSPELL1) CLISPRESPELL (LITATOM -CLISP-SIMPLE-FUNCTION-P CLISPNOTVARP) \\INVALID.SYMBOL (CL:STRINGP) \\FM.GETBITMAPS (ATOM TEXTUREP -STRINGP BITMAPP) \\FM.EDIT-INSERT (FMEMB ATOM APPLY* ILEQ IGREATERP) SEDIT::PARENTHESIZE-CURRENT-SELECTION - (GREATERP SEDIT::DEAD-NODE?) CLBUFS (READP STREQUAL) PROMPTFORWORD (TERMTABLEP GREATERP EQMEMB -CHARCODEP LITATOM FMEMB DSPRUBOUTCHAR) COMP.NUMBERTEST (COMP.PREDP FMEMB) |\\PFNewPages| (EQL -|\\VAMAllocPageGroup|) \\ITEM.WINDOW.SELECTION.HANDLER (LASTMOUSESTATE INSIDE?) \\DRAWCURVE.PSC ( -NUMBERP ZEROP FLOATP GREATERP) FLONUM-TO-STRING (ZEROP CL:PLUSP CL:CHAR= MINUSP) WHO-LINE-SET-TIME ( -SHIFTDOWNP MENU) DINFO.READ.KOTO.GRAPH (GREATERP) PFI.ESTIMATE.SIZE (LITATOM MEMB) RECLOOK1 (FMEMB) -BKBUFS (READP) \\MAKESPACEFORLOCKEDPAGE (ILEQ IGREATERP) \\MEDW.YOFFSET (NUMBERP) \\FTPINIT (TYPENAMEP -) FREEATTACHEDWINDOW (ILEQ IGEQ) \\TEDIT.WORDDELETE (IGREATERP LESSP SELECTC FIXP ILESSP) -\\NOIMAGE.DSPFONT (TYPENAMEP) HPRINT1 (ILEQ FIXP EQP GREATERP ILESSP EQUAL GETCONTROL GETECHOMODE) -TERM.TAB (IGEQ) XCL::WALK-TAGBODY-1 (CL:SYMBOLP) CHAT.CHOOSE.EMULATOR (FIXP) |\\LFMakeDirHole| (ILEQ -|\\LFExtendFile| GREATERP) RINGBELLS (GREATERP) GC-FILING-DIRECTORY (EQUAL) \\FILINGSESSION.DEFPRINT ( -TYPENAMEP) \\FM.EDITSTART-SELECTEDFN (TYPENAMEP) CLISPIFYRPLAC (SUBRP) \\FM.GETREGIONS (ATOM TEXTUREP) - SI::DESCRIBE-INTERNAL (< CL:CONSP SI::INSPECT-MACRO-USABLE-BY-DESCRIBE?) STRINGWIDTH (TYPENAMEP) -WINDOWPROP (IGREATERP) ADIEU (ZEROP) PREVWORD (WORDSEPRP IGREATERP COMPLEXCHARP ILESSP) -EDITMOVESUBTREE (LASTMOUSESTATE ZEROP) ADDTEMPLATEWORD (ASSOC) |\\VAMGetVAMPageFor| (FIXP EQL) -\\UPDATEXYANDBOX (IEQP) \\FM.EDIT-ITEM (MOUSESTATE ZEROP READP TIMEREXPIRED? TTY.PROCESSP -LASTMOUSESTATE \\FM.ONITEM IGEQ) \\ORIG-INVALID.SYMBOL (STRINGP) \\TEDIT.OBJECT.SHOWSEL (INSIDE?) -FONTCLASS (ATOM) GETFILEDEF (FMEMB STRPOS) TERM.SMOOTHSCROLL (GREATERP) UNADVISE (EQUAL) GETCHATWINDOW - (WINDOWP FFETCHFIELD) \\CARET.FLASH? (TIMEREXPIRED? DISPLAYSTREAMP IMAGESTREAMTYPEP \\CARET.FLASH) -COMP.STFIX (NUMBERP) \\NSGC.COLLECT.DIRECTORIES (EQUAL STREAMP SELECTQ) PFI.ESTIMATE.SIZE1 (>) -DO-EVENT (STRINGP CL:SYMBOLP SOME) COMPILER::PRINT-NODE (COMPILER::LITERAL-P) TEDIT.FORMAT.HARDCOPY ( -CL:STRINGP TYPENAMEP OPENP IMAGESTREAMTYPE IGREATERP) SUPERPRINT/SPACE (<) COMPILER::ALPHA-FORM (CL:ATOM -) \\MEDW.XOFFSET (NUMBERP) MBUTTON.NEXT.FIELD.AS.ATOM (ZEROP) SEARCHPDL (APPLY*) COMPAREPRINTN (ILESSP -) IN/ITEM? (INSIDE?) DWMFY1 (CHECKTRAN LITATOM CLISP-SIMPLE-FUNCTION-P EQMEMB CLISPNOEVAL) -UTF8.PEEKCCODEFN (ILESSP IGEQ) |\\PFGetVols| (GREATERP) \\POSSIBLECOLOR (IGEQ ILEQ) WHO-LINE-TIME ( -TIMEREXPIRED?) READHOTSPOT (MOUSESTATE INSIDE?) CLISPIFYMAPS (EDITFINDP CLREMPARS) TEDIT.PARALOOKS ( -TYPENAMEP FIXP IGREATERP ZEROP IGEQ) EXTENDREGIONTOP (ILESSP) COMP.EXPR (COMP.PREDP COMP.NOSIDEEFFECTP - LITATOM NUMBERP GET) TB.ITEM.FROM.YCOORD (<=) SUBPRINT/WRAPPERTAIL (< FITP) CL:COMPILER-LET (CL:CONSP -) \\DRAWCIRCLE.PSC (NUMBERP ZEROP FLOATP) \\FM.CHECKPROPS (FMEMB FIXP TEXTUREP) COMP.DELFIX (OPT.CALLP -) HLSP (NUMBERP IGREATERP FLOATP) SETUPPUP (IGEQ) COMP.GETBASEBITS (OPT.CALLP ILESSP IGREATERP) -CL:FUNCTION (CL:SYMBOLP) RGBP (SMALLP IGREATERP) READHASHMACRO (FFETCHFIELD DIGITCHARP IGEQ MEMQ -CMLREAD.FEATURE.PARSER) \\DRAWELLIPSE.PSC (NUMBERP ZEROP FLOATP) \\GET-COMPILED-DEFINITION (LITATOM -TYPENAMEP) \\GETUFNENTRY (LITATOM) COMP.FMEMB (COMP.PREDP FMEMB) NEGSHADE (NUMBERP <) -SUPERPRINT/COMMENT (> STRINGP SUPERPRINTEQ IMAGESTREAMP <) POSTSCRIPT.TEDIT (STRINGP) -\\RELEASEWORKINGSET (\\FLUSHVM GREATERP ILESSP) DASHINGP (NUMBERP) \\DONEWEPHEMERALPAGE (IGREATERP) -\\DEFINEDP (LITATOM FFETCHFIELD) GETCFILE (NLSETQ RANDACCESSP) SKOR (SPELLEQ < IGREATERP) DSKDISPLAY ( -|\\PFEnsureInitialized|) DISPLAYAFTERENTRY (GETD) AU-REVOIR (ZEROP) CMLREAD.FEATURE.PARSER (CL:CONSP -FMEMB) \\INSPECTW.COMMAND.HANDLER (INSIDEP STRINGP MOUSESTATE) DISPLAYBEFOREEXIT (DISPLAYSTARTEDP) -ESTIMATE-DIMENSIONALITY (GREATERP) \\MEDW.BLTCHAR (IGREATERP ILESSP FMEMB) CL:FUNCTIONP (CL:SYMBOLP -CL:COMPILED-FUNCTION-P CL:CONSP CLOSURE-P) SPP.OPENP (SPPSTREAMP) MERGLIST (ILEQ) \\SHADEBITS ( -MOUSESTATE INSIDE? LASTMOUSESTATE) \\GETREGIONTRACKWITHBOX (MOUSESTATE LASTMOUSESTATE IGREATERP IEQP) -\\CCLOSURE.DEFPRINT (IGREATERP STRINGP) CL:MAKE-SYMBOL (CL:STRINGP) CLISPIFYCROPS1 (MINUSP NUMBERP -IGREATERP) \\SUBFNDEF (LITATOM GREATERP ILESSP IGREATERP) COMP.SPREAD (FMEMB LITATOM CL:SYMBOLP) -EDITADDNODE (POSITIONP) \\CODEBLOCKP (>= \\VALIDADDRESSP) \\PROMPTFORWORDBS (DSPRUBOUTCHAR) -CLISPNOTVARP (BOUNDP FMEMB RELSTK GETPROP) MODERNWINDOW.BUTTONEVENTFN (MOUSESTATE MEMB NEARTOP) -\\PROMPTFORWORDBIN (FIXP READP \\EOFP TIMEREXPIRED? TTY.PROCESSP) \\ABORT.BULK.DATA ( -\\SPP.PREPARE.INPUT SELECTC) CHARACTER.READ (IGREATERP BITTEST) EXPRCHECK (LITATOM GETD) -\\NSFILING.GETFILE (\\NSFILING.CONFLICTP TYPENAMEP EQUAL) ICMLARRAY.DISPLAYSLICE (GREATERP) -\\TEDIT.FILL.IN.CHARLOOKS.MENU (STRING-EQUAL TYPENAMEP FONTP ZEROP ILESSP IGREATERP IGEQ) -\\DSPOPERATION.IP (FMEMB) FASL::DUMP-ARRAY (DISPLACED-ARRAY-P CL:ADJUSTABLE-ARRAY-P TYPEP) -PROVIDE.PROMPTING.WINDOW (TTY.PROCESSP DISPLAYSTREAMP HASTTYWINDOWP OPENWP WAIT.FOR.TTY) COURIER.WRITE - (LITATOM STREQUAL IEQP) TEDIT.INSERT (FIXP LITATOM STRINGP ZEROP CL:STRINGP IGREATERP) \\DSPMOVELR ( -CHARCODEP IGREATERP ILESSP) \\TFBRAVO.WRITE.RUN (ILEQ EQUAL) \\MATCHPCS (GREATERP TYPENAMEP) -TEDIT.PARSE.PAGEFRAMES (TYPENAMEP) DEFMACRO-LAMBDA-LIST-KEYWORD-P (FMEMB) FILL-VECTOR (<=) -|\\VFMGetInterval| (LESSP) UNSAVEFNS (HASDEF FGETD FMEMB) MACROS.GETDEF (FMEMB) \\FM.CHECKDESCRIPTION -(FMEMB ATOM STRINGP BITMAPP FIXP TEXTUREP) MKACCESSFN (FMEMB) \\PROMPTFORWORDERASE (IEQP) -EXPANDOPENLAMBDA (ATOM) LISPDIRECTORYP (|\\LFDirectoryP|) CL::DEFSTRUCT-PARSE-OPTIONS (CL:LISTP) -CHARWIDTHY (SMALLP TYPENAMEP) COMP.GETD (COMP.PREDP) CALLSCCODE (FIXP SMALLP GREATERP FMEMB ILESSP -TYPENAMEP) DINFO.CREATE.GRAPH.WINDOW (GEQ) CHAT.OPTIONMENU (FNTYP TYPENAMEP) COMPUTE-MACRO-ARGS (CL:ATOM - CL:CONSP) POLYSHADE.SCAN.IP (NUMBERP) \\CREATECHARSET (IGREATERP FMEMB) \\FILLCIRCLE.PSC (FIXP ZEROP -EQL FLOATP TEXTUREP BITMAPP) BRECOMPILE (RANDACCESSP NLSETQ) \\BLTSHADE.PSC (FIXP FLOATP <= TEXTUREP -BITMAPP) \\NSFILING.COPY/RENAME (\\NSFILING.CONFLICTP STRING-EQUAL \\NSFILING.CHILDLESS-P TYPENAMEP) -COMP.NUMBERCALL (FMEMB) \\LASTNODE (LESSP TYPENAMEP) PRINTCOMSTRAN (LITATOM SELCHARQ FIXP MINUSP) -DWIMARKASCHANGED (LITATOM FASSOC) TEDIT.CURSORMOVEDFN (INSIDE? IGEQ ILESSP) COMP.COMPARENUM (SELECTQ -FMEMB) OPENRTPSOCKET (FIXP EQMEMB) COMPILER::GENCODE-TAGBODY (COMPILER::TAGBODY-NEW-FRAME-P -COMPILER::TAGBODY-CLOSED-OVER-VARS) CLISPIFYCROPS (LITATOM FMEMB SOME APPLY* CLISPNOEVAL CLISP3B) -CH.CANONICAL.NAME (STRPOS) READVISE (EQUAL) NTH.RELATIVE.COLUMN.OF (IGREATERP ILESSP COMPLEXCHARP) -CL::ENSURE-CONSISTENT-PS (CL::PS-TEMPLATE CL:LISTP) \\FTP.CLEANUP (TIMEREXPIRED? FIXP) VMEM.PURE.STATE - (IGREATERP ARG) COMP.NUMERIC (FMEMB OPT.CALLP NUMBERP IGREATERP EQL MINUSP) SUPERPRINT/COMMENT2 (IGEQ - LITATOM SELCHARQ SELECTQ STRINGP) XCL::SAVE-CURRENT-EXEC-PROFILE (XCL:PROFILE-P) -COMPILER::GENCODE-TAGBODY-INLINE (COMPILER::TAGBODY-CLOSED-OVER-P COMPILER::SEGMENT-CLOSED-OVER-P) -MSNEEDUNSAVE (EXPRP FMEMB) RECFIELDLOOK (FMEMB) ICONW (NUMBERP) \\NSFILING.GENERATEFILES (STREQUAL -EQUAL STREAMP EQMEMB) \\LEAF.REOPENFILE (IEQP) TEDIT.SUBSTITUTE (STRINGP EQUAL IGREATERP ZEROP) -PFI.DEFAULT.HANDLER (MEMB LITATOM STRINGP) FB.ALLOW.ABORT (OPENWP) ENTRY# (IGREATERP) -\\SET.LASTVMEMFILEPAGE (IGREATERP) %COPY-ONED-ARRAY (GREATERP) \\LEAF.DIRECTORYNAMEP ( -UNPACKFILENAME.STRING CL:MEMBER \\LEAF.GETFILE) RECREDECLARE1 (RECREDECLARE2) COMPILER::TEST-ALPHA-2 ( -CL:CONSP) \\PAGEDBACKFILEPTR (APPENDONLY) CHARCODE.DECODE (ATOM STRINGP STRING.EQUAL < >= FIXP) -TERM.RIGHT (<) COMP.ST (FIXP) TB.RESHAPEFN (OBTAIN.MONITORLOCK) \\DSPPRINTCHAR (IGREATERP) -MENUTITLEFONT (TYPENAMEP) STRPOSL (LITATOM ILESSP IGREATERP) DIGITBASEP (GEQ LESSP GREATERP LEQ) -EDITSHADE (BITMAPP FIXP MOUSESTATE LASTMOUSESTATE INSIDE? STRICTLY/BETWEEN NUMBERP) COMP.SHIFT ( -IGREATERP) ICMLARRAY.MENUW.SHOW (GREATERP) \\PROMPTWINDOW.SET.HEIGHT (ILESSP) CALLS3 (FMEMB) EDITDATE? - (EQMEMB STRINGP LITATOM GREATERP STRPOS) HPRINT (HARRAYP RANDACCESSP) TEDIT.BUILD.PCTB1 (GREATERP -IGREATERP ZEROP EQCLOOKS EQFMTSPEC) CLISPACKUP (ATOM FMEMB LITATOM STRPOSL FRPLACA NUMBERP MINUSP) -\\BSP.PREPARE.INPUT (IGREATERP BSPOPENP TIMEREXPIRED? IGEQ) ADVISE (STRING.EQUAL) FONTUNPARSE ( -TYPENAMEP EQUAL LITATOM) \\STRINGWIDTH.GENERIC (LITATOM IGREATERP STRINGP) EXTENDREGIONRIGHT (ILESSP) -\\SPLITTREE (GREATERP ZEROP MINUSP LESSP) COMPILER::TRANSFORM-GET/PUT-BASE (COMPILER::LITERAL-P -CL:INTEGERP) CL:ENDP (CL:CONSP) FM.SKIPNEXT (FM.EDITP PROCESSPROP) \\TEXTRIGHTMARGIN (ZEROP) -PURGEDSKDIRECTORY (|\\PFPilotVolumeP| TYPENAMEP) CL::PARSE-SLOT (CL:CONSP) FIX-FORM (IMAGESTREAMP -EQUAL CL:CONSP =) ITEMW.REPAINTFN (REGIONSINTERSECTP) EXTENDREGIONLEFT (IGREATERP) -\\DSPCLIPPINGREGION.DISPLAY (EQLENGTH) NUMBERPAD.READ (HASTTYWINDOWP READP MEMBER) CHANGEI.S. (GETD -U-CASEP) MSDESCRIBE1 (IGREATERP) PRINTCODENT (ILESSP IGEQ GREATERP FFETCHFIELD FIXP SMALLP) -|\\VAMCheckEndOfVol| (IGEQ) \\DOVMEMFULLINTERRUPT (>=) SHRIEKIFY (LITATOM FNTYP BOUNDP EDITFINDP) -\\GREATESTPTAT (IGREATERP) \\FTP.RENAMEFILE (STRING-EQUAL SELECTC \\FTP.HANDLE.NO BSPOPENP -\\FTP.FLUSH.TO.EOC \\FTPERROR) \\LEAF.EVENTFN (FDEVOP) PAINTW (IEQP LASTMOUSESTATE INSIDE?) -COMPAREPRINT1 (LITATOM) \\SCALEDBITBLT.PSC (GREATERP REGIONSINTERSECTP EQP) PROG1.PRETTYPRINT (>= FITP -) \\BACKCOLOR.DISPLAY (BITMAPP ILEQ FIXP) FB.YES-OR-NO-P (STRING-EQUAL) DINFO.FIND (OBTAIN.MONITORLOCK - FMEMB) \\BITMAPFROMTEXTURE (GREATERP) COMP.RPLACD (OPT.CALLP) \\RTP.HANDLE.INPUT (TIMEREXPIRED?) -\\TEDIT.PARSE.CHARLOOKS.MENU (FMEMB) EDITMOVEREGION (WINDOWP) POSTSCRIPT.HARDCOPYW (<) -SEQUENTIAL.PRETTYPRINT (<= FMEMB) TEDIT.BUILD.PCTB0 (GREATERP IGREATERP) \\BLTSHADE.DISPLAY (FMEMB -ILEQ) SETFONTDESCRIPTOR (FIXP) \\BSP.CLEANUP.INPUT (IGREATERP) \\CLIPCODE (LESSP GREATERP) TEDIT.NEXT -(IGREATERP) EDITDATE (EQMEMB) XYSECTLSEG (MINUSP ILEQ) \\NSFILING.NEXTFILE (DIRECTORY.MATCH) -COMPILER::ENSURE-EFFECT-CONTEXT (EQL CL:MEMBER) CLISPNOEVAL (SELECTQ FMEMB GETLIS) \\READBMDIMENSIONS -(NUMBERP ILESSP) MAKEKEYLST (EQUAL) |\\VFMKillBuffer| (|\\VFMCorrectBufferP|) DWIMIFY0 (TAILP FGETD -EXPRP) CASE.PRETTYPRINT (>= FITP SEMI-COLON-COMMENT-P FMEMB <= <) TEDIT.BUILD.PCTB2 (GREATERP -IGREATERP ZEROP) EDITFNS (GETPROP) \\NSFILING.PARSE.FILENAME (<= GEQ >) MAKEACCESS1 (FMEMB) -PROGV.PRETTYPRINT (FITP) CLISPAND1 (LITATOM) UNICODE.UNMAPPED (ILEQ IGEQ) \\IFSERRORSTRING ( -STRING.EQUAL GREATERP) TYPEP (CL:CONSP) %COPY-STRING-TO-ARRAY (GREATERP) SETUPPAGEMAP (GREATERP) -\\POLYSHADE.YSCAN.IP (IEQP ODDP ILEQ IGEQ) PRINTPROG (LITATOM ILEQ ILESSP) WINDOWDELPROP (FMEMB) -PFI.MAYBE.NEW.PAGE (DISPLAYSTREAMP > >=) COMPILER::GENCODE-RETURN (COMPILER::BLOCK-NEW-FRAME-P) -SUPERPRINT0 (CL:SYMBOLP FIXP ILESSP) ACCESSDEF4 (FMEMB) SEDIT::CFV-CLISP (ILESSP) \\PARAS.IN.SEL ( -ZEROP) LEAF.ASSURE.FINISHED (TYPENAMEP) \\FONT.COMPARESYMBOL (LITATOM IGEQ ILEQ IGREATERP) SUBPRINT ( -LITATOM FMEMB SUPERPRINTEQ FGETD ATOM BOUNDP BACKARROWP FITP) DINFO.LOOKUP (OBTAIN.MONITORLOCK FMEMB) -CACHEMACRO (TYPEP) ICMLARRAY.MENUW.GETLEVEL (ILESSP GREATERP STRINGP STREQUAL FIXP GEQ LESSP) -SUBPRINT1 (LITATOM) \\TEDIT.ABBREV.EXPAND (ZEROP) BACKARROWP (STRPOS) \\DSPXPOSITION.DISPLAY (NUMBERP) - \\DRAWLINE.DISPLAY (BRUSHP ILEQ IGREATERP IGEQ ILESSP FMEMB) \\FILLCIRCLE.DISPLAY (NUMBERP ILESSP -FIXP FMEMB IGREATERP) CLREMPARS (ATOM FGETD STRPOSL) \\DSPLINEFEED.DISPLAY (NUMBERP) -\\DRAWELLIPSE.DISPLAY (ILESSP NUMBERP < LITATOM FMEMB ILEQ IGEQ) \\LEASTPTAT (IGREATERP) -\\DSPRIGHTMARGIN.DISPLAY (NUMBERP) \\DRAWCIRCLE.DISPLAY (NUMBERP ILESSP LITATOM FMEMB ILEQ IGEQ -IGREATERP) PRINTSQ (IGEQ EQMEMB) |\\VFMGet| (GREATERP EQL |\\VFMLower|) /MOVD (EXPRP) CHANGEVAR (FMEMB -) MSDESCRIBE (GETD HARRAYP SMALLP EQMEMB FMEMB GETPROP) \\FM.LAYOUTGRID (IGREATERP) \\FONT.SYMBOLASSOC - (IGEQ ILEQ \\FONT.COMPARESYMBOL) \\BITBLT.DISPLAY (TYPENAMEP IGEQ WINDOWP FMEMB WFROMDS WOVERLAPP -ILEQ FIXP) ICMLARRAY.MENUW.APPLY (GREATERP IGREATERP) \\SCALEDBITBLT.DISPLAY (WINDOWP BITMAPP) -COMPILER::META-SUBST-VAR-REF (CL:MEMBER) %SET-ARRAY-TYPE-NUMBER (%ONED-ARRAY-P %TWOD-ARRAY-P -%GENERAL-ARRAY-P) \\DSPLEFTMARGIN.DISPLAY (NUMBERP) \\FONTFACE (\\FONT.COMPARESYMBOL LITATOM STRINGP -STRPOS) DSFIT2 (SUPERPRINTEQ ILESSP DSFIT2 ILEQ) SPACES (IGREATERP) %SET-ARRAY-OFFSET (%ONED-ARRAY-P -%TWOD-ARRAY-P %GENERAL-ARRAY-P) READVARS (LITATOM) UTF8.OUTCHARFN (ILESSP) \\FONT.SYMBOLMEMB ( -\\FONT.COMPARESYMBOL) CONCAT (STRINGP LITATOM) PRINTNUM (IGEQ) \\INSERTTREE (GREATERP ZEROP TYPENAMEP -IEQP) READPAGEMAP (GREATERP) FILLRECTANGLE.IP (>) FB.PROMPTFORINPUT (> LESSP) DINFO.ADD.FMENU (FMEMB) -\\MAIKO.10MBWATCHER (ILESSP) XCL::PUT-IMPLICIT-KEY-HASH (TYPEP) \\TELERAIDBREAK (ILESSP IGREATERP -SELECTC XKEYDOWNP \\TELEKBDWAIT IEQ) \\FM.NWAY-SELECTEDFN (\\FM.NWAYPROP) DSFIT1 (ILESSP DSFIT2) -XCL::GET-IMPLICIT-KEY-HASH (TYPEP) \\MAP-CODE-LITERALS (FIXP SMALLP GREATERP) XCL::EXEC-SHRINKFN ( -TTY.PROCESSP) |CreateCursorBitMap| (GREATERP) COMP.LABELS (FMEMB) |\\PFFindPageAddr| (FIXP ILESSP IGEQ - ZEROP) EXTENDREGIONBOTTOM (IGREATERP) \\TEDIT.SUBST.FN2 (IGREATERP LITATOM) TAB (IGREATERP) -\\FM.NWAY-MOVEDFN (OPENWP) \\DRAWPOLYGON.IP (NUMBERP IGEQ IGREATERP \\CLIPCURVELINE.IP) -MAKEHVPRETTYCOMS (LITATOM) PUPNET.DISTANCE (GREATERP) DRAW/GRAPHNODE/BORDER (FIXP) CLISP3A (SELECTQ -EQMEMB) \\TEDIT.PACK.TARGETLIST (MEMBER STRINGP) \\FM.NWAY-DOWNFN (OPENWP) MSMARKCHANGED (APPLY*) -\\HANDLE.RAW.PUP (IGEQ) /PUTPROP (LITATOM) \\NSFILING.OPEN.HANDLE (TYPENAMEP) /SETATOMVAL (LITATOM) -|\\LFCloseDevice| (|\\PFVersionOK|) \\COURIER.RESULTS (IEQP) |\\LFFindDirectoryVol| (TYPENAMEP FIXP -ATOM STRINGP |\\LFDirectoryP|) COMP.STFN (LITATOM) LLBREAK (GETPROP) COMPILER::IS-CALL-TO (COMPILER::CALL-P - COMPILER::VAR-REF-P) COMP.TAGBODY (LITATOM OPT.JUMPCHECK) SEDIT::COMMENT-LENGTH (GREATERP) -\\NSRANDOM.SESSION.WATCHER (DIRTYABLE \\SECONDSCLOCKGREATERP FILING.CALL) \\POSITION.MENU.IMAGE ( -TYPENAMEP NUMBERP) DASSEM.CLEANFNTEST (LITATOM) CLISPCOND1 (CLREMPARS) \\TEDIT.SHOW.CHARLOOKS (<=) -AS.MAKE.CONVERSATION (NLSETQ IEQP) POSTSCRIPT.PUTCOMMAND (GREATERP) \\MAIKO.10MBSENDPACKET ( -EQNSADDRESS.HOST) CHECKFPTOVP1 (UNLESSRDSYS) \\TEXTMENU.TOGGLE.DISPLAY (TYPENAMEP) SEDIT::LINEARIZE-CLISP - (IGEQ TYPENAMEP ATOM IGREATERP) \\DSPYPOSITION.DISPLAY (NUMBERP) COMPAREPRINT (EQUAL) -CL::REMOVE-DOCUMENTATION (CL:STRINGP) PRINTDEF (SYNTAXP IMAGESTREAMP NUMBERP GREATERP) \\DSPSCALE2.PSC - (NUMBERP CL:PLUSP) PRINTCODE (LITATOM IGREATERP IGEQ GREATERP IEQP EQUAL NUMBERP FIXP SMALLP) -WHO-LINE-SAVE-VMEM (MENU) \\TEDIT.UPDATETREE (GREATERP) GETCHARBITMAP (CHARCODEP STRINGP LITATOM TYPEP -) SETCOLOR.IP (STREAMPROP RGBP LITATOM EQUAL) WHO-LINE-VMEM (EQP) \\DSPSCALE.PSC (NUMBERP CL:PLUSP) -\\UNCOPY (GREATERP) PUTCHARBITMAP (STRINGP LITATOM) XCL:UNBREAK-FUNCTION (CL:CONSP) COMP.RETURN-FROM ( -OPT.JUMPCHECK) EDITFB (GETPROP) \\PROMPT.FOR.PUP.NUMBER (FIXP ILEQ IGEQ) COMPARE (COMPARELST) -\\FM.NWAY-MESSAGE (\\FM.NWAYPROP) COMPILER::EXPAND-OPENLAMBDA-CALL (CL:NOTEVERY CL:SYMBOLP CL:MEMBER) -\\DSPCOLOR.PSC (NUMBERP <=) SHAPEW (\\USERFNISDON\'T LESSP EQUAL) \\CORE.UPDATEOF (IGREATERP IGEQ) -\\FONTSYMBOL (LITATOM STRINGP) RESETGRID.NEW (= NUMBERP) \\RTP.ACTION (ILESSP IGREATERP TIMEREXPIRED?) - COMPILER::COMPLETELY-EXPAND (CL:ATOM CL:MEMBER) FASL::DUMP-CHARACTER (<) NEGATE (NUMBERP STRINGP) -COMPAREFAIL (NUMBERP EVERY) \\INSPECT.STORE.FATCHAR (CONFIRM-SET) SEDIT::OUTPUT-STRING (TYPENAMEP) -FONTCOPY (TYPENAMEP GREATERP) CLISPIFY (TAILP GETD) COERCETOBITMAP (LITATOM REGIONP WINDOWP) -CLEAR.LEAF.CACHE (TYPENAMEP) \\LEAF.BREAKCONNECTION (TYPENAMEP) \\PRINTFPTOVP (ILESSP IGEQ) -FONTSAVAILABLE (TYPENAMEP IMAGESTREAMP FIXP) BKSYSBUF (LITATOM IGREATERP STRINGP) FONTMAPARRAY (EQUAL -IGREATERP ILESSP GREATERP) \\MAPPNAME (FFETCHFIELD) \\POLYSHADE.XSCAN.IP (IEQP ODDP ILEQ IGEQ) -\\TEDIT.PROCIDLEFN (INSIDE? SHIFTDOWNP KEYDOWNP PROCESSP FFETCHFIELD) MAPPAGES (IGREATERP IEQ) -FIXAPPLY1 (ZEROP SOME) SI::ARGUMENT-ERROR (< >) PROCESS.EVALV (TYPENAMEP \\DTEST) |\\VFMReadNext| ( -ILESSP) \\CORE.GENERATEFILES (FIXP DIRECTORY.MATCH) \\TEDIT.GET.CHARLOOKS.LIST (IGREATERP GREATERP) -TEDIT.PUT (TEDIT.FORMATTEDFILEP EQL IGREATERP RANDACCESSP LITATOM) \\CHTOPC (TYPENAMEP GREATERP -IGREATERP) RECORD (FMEMB) CHECKFPTOVP (GREATERP) XCL::EXEC-CLOSEFN (PROCESSP TTY.PROCESSP) -DIRECTORY.MATCH.SETUP (LEQ) \\CORE.RELEASEPAGES (IGEQ) \\NSFILING.CONFLICTP (STRING-EQUAL) RPLSTRING ( -LITATOM > GREATERP) FONTPROFILE (MEMB LITATOM) \\IRM.WILDCARD (\\IRM.WILD.MATCH) FIND.NEXT.WORD ( -WORDSEPRP IGREATERP COMPLEXCHARP) CHOOZ (ARRAYP STACKP TIMEREXPIRED? IGREATERP ILESSP CL:FUNCALL -STRINGP ZEROP) CLISP3C (BOUNDP FNTYP FMEMB NUMBERP) CH.FINDSERVER (STRING-EQUAL) SPELLFILE (STREQUAL -DIRECTORYNAMEP FMEMB LITATOM FIXSPELL1) TEDIT.PUT.PCTB2 (TYPENAMEP IGREATERP EQFMTSPEC ZEROP EQCLOOKS -IEQP GREATERP RANDACCESSP) NAMEFIELD (>) \\TEDIT.UNIQUIFY.PARALOOKS (EQFMTSPEC) \\#BLOCKDATACELLS ( -IGEQ) \\TERPRI.PSC (LESSP) \\CURVE (IGEQ IGREATERP FMEMB ILEQ GREATERP) CLISPFOR (CLISPELL) -\\LOOKUPFONTSINCORE (EQUAL TYPENAMEP) LISPXPRIN2 (STRINGP) \\CORE.GETFILEHANDLE (\\FILE-CONFLICT) -\\INSPECT.STORE.32 (CONFIRM-SET) \\TEDIT.FIND.WC1 (STRINGP LITATOM MEMBER EQUAL) \\RPLCHARCODE ( -STRINGP ILEQ IGREATERP \\CHARCODEP SMALLP) COMPILER::GENCODE-MV-CALL (COMPILER::GLOBAL-FUNCTION-P) -SAVEPUT (LITATOM) FINDFN (LITATOM EXPRP EVALV) /ADDPROP (LITATOM) MISSPELLED? (FMEMB APPLY*) -CL:MAKE-HASH-TABLE (CL:SYMBOLP CL::%EQCODEP) LOADFNS (MEMB RANDACCESSP) INSERTHASHKEY (GREATERP) -FONTPROFILE.ADDDEVICE (LITATOM) BITMAPP (TYPENAMEP) GENSYM (IGREATERP ILESSP IEQP IGEQ GREATERP ILEQ -NUMBERP) DINFO.SHOWGRAPH (GEQ) FONTSET (CL:SYMBOLP MEMB LITATOM) SPP.READP (READABLE ILESSP -\\SPP.PREPARE.INPUT) COMP.RETURN (OPT.JUMPCHECK) \\COERCETODS (TYPENAMEP) \\TEDIT.UNIQUIFY.CHARLOOKS ( -EQCLOOKS) SEDIT::OUTPUT-SPACE (SMALLP GREATERP) \\LOCATE.PUPNET (EQL <) \\UNITWIDTHSVECTOR (GREATERP) -GLCCODE (STRINGP) \\CORE.FINDPAGE (LEQ LESSP IGREATERP) \\CONVERTTOFRACTION (SMALLP) EDITBM (BITMAPP -LITATOM REGIONP WINDOWP) \\COURIER.OUTPUT.ABORTED (DIRTYABLE) SEDIT::BACKSPACE-COMMENT (IGREATERP) -UPDATE/BM/DISPLAY/SELECTED/REGION (IGREATERP) FORWARD.DELETE.TO (OVERFLOWLINE?) |\\VFMLower| (GEQ EQL) - \\CORE.GETFILEINFO (TYPENAMEP OPENED SELECTQ) MBUTTON.FIND.NEXT.BUTTON (ATOM IMAGEOBJP) -\\TEDIT.GET.PARALOOKS.LIST (IGREATERP GREATERP) CLISPCOND (CLREMPARS) UNIX.HOST.FILTER (STRING.EQUAL) -GNCCODE (STRINGP %GENERAL-ARRAY-P) \\BSP.HANDLE.INPUT (TIMEREXPIRED?) CREATEDSKDIRECTORY ( -|\\PFPilotVolumeP| |\\LFDirectoryP| TYPENAMEP) SHOW.IP (IGREATERP IEQP) COMPARE1 (COMPARE1) L-CASE ( -LITATOM IGREATERP IGEQ ILEQ STRINGP) U-CASEP (LITATOM IGREATERP IGEQ ILEQ STRINGP) \\GETLEAFSTRING ( -IGREATERP) CHAT.STARTUP (CL:MEMBER <=) |\\PFFindDirectoryID| (|\\PFGetRootDirectory|) SPP.EOFP ( -READABLE ILESSP) MAKEROOMFORPME (IEQ EVENP) OPT.DS1 (COMP.CLEANFNOP FMEMB ZEROP) READIMAGEOBJ (GETD -MOUSECONFIRM) \\INSPECT.STORE.CHAR (CONFIRM-SET) BQUOTIFY (NUMBERP STRINGP) PFI.HANDLE.EXPR (LITATOM) -CARET (CURSORP) CLISP4 (EQMEMB GETHASH SOME LITATOM BOUNDP FMEMB FGETD) \\CORE.DELETEFILE (TYPENAMEP -\\GETACCESS FDEVOP) SEDIT::CFV-DOTLIST (ATOM) COMP.GO (OPT.JUMPCHECK ZEROP) \\NSRANDOM.CREATE.STREAM ( -SHOULDNT EQUAL) DUMPINITPAGES (GREATERP RANDACCESSP) SCAVENGEDSKDIRECTORY (|\\PFPilotVolumeP| -TYPENAMEP) FONTP (TYPENAMEP) EXTENDREGION (IGREATERP) COMPILER::GENCODE-LET (COMPILER::LITERAL-P -COMPILER::VARIABLE-CLOSED-OVER) EDITGETDEF (CL:EQUAL) %MAKE-ARRAY-WRITEABLE (FFETCHFIELD) MSSTOREDATA -(FMEMB) \\CORE.GETFILENAME (FASSOC) |\\PFRemoveDirectoryID| (|\\PFGetRootDirectory| ILEQ) -\\DURATIONTRAN (LITATOM \\TIMER.TIMERP) BMOBJ.DISPLAYFN (GREATERP LEQ) POSTINITARRAYS (IGREATERP IGEQ -ZEROP MINUSP LESSP GREATERP) \\LEAF.REQUESTPAGE (ILESSP \\SENDLEAF) \\FTP.OPEN.CONNECTION (TYPENAMEP -LITATOM \\FTP.SENDVERSION) \\CREATE-REAL-CHARSET.DISPLAY (EQL) DEFAULT.INSPECTW.TITLECOMMANDFN ( -TYPENAMEP) \\BUILDSLUGCSINFO (GREATERP) \\ITEM.WINDOW.COPY.HANDLER (.COPYKEYDOWNP. MOUSESTATE) -TERM.GODOWN (>) \\LEAF.MAYBE.FLUSH.CACHE (OBTAIN.MONITORLOCK) DINFO.HISTORIC.UPDATE ( -OBTAIN.MONITORLOCK) SPP.FORCEOUTPUT (ILESSP \\SENDSPP) MAKEINITLAST (FIXP IGEQ GETHASH) -\\POLYSHADE.DISPLAY (IEQP ILEQ IGEQ ILESSP) \\CORE.NAMESCAN (STRING-EQUAL UALPHORDER) ADDPME (IEQ -EVENP LOCKEDPAGEP) TEDIT.GET.CHARLOOKS0 (IGREATERP GREATERP FFETCHFIELD) DO.EDIT.PP (TTYIN.BALANCE) -CLOSEMAINWINDOW (\\OKTOCLOSEW OPENWP) \\PUTBASESTRING (STRINGP IGREATERP ILEQ LITATOM) CLISP3 (NUMBERP - MINUSP SOME CLISPNOEVAL LITATOM FGETD CLISP3B) \\CORE.UNPACKFILENAME (<) \\CREATEDISPLAYFONT ( -\\GETCHARSETINFO) \\HANDLE.PUP.ROUTING.INFO (>= <= <) \\PRINDATUM.TO.STRING (FLOATP) -\\TEDIT.FOREIGN.COPY? (TEXTPROP ZEROP IGREATERP GREATERP FIXP) STREQUAL (STRINGP) SEDIT::NEXT-LINEAR-ITEM - (TYPENAMEP) WHO-LINE-REDISPLAY-INTERRUPT (BOUNDP) COPY.TEXT.TO.IMAGE (\\XCCSP EOFP > \\EOFP >=) -SEDIT::MUTATE (STRINGP SEDIT::DO-MUTATION) SET-CONNECTED-DIRECTORY-INTERACTIVELY (SHIFTDOWNP -STRING-EQUAL) GETHASHKEY (SELCHARQ EQUAL) |GetBcplString| (ILEQ) XCL::WALK-DECLARATIONS (CL:STRINGP -CL:LISTP XCL::GET-WALKER-TEMPLATE) CHAT.RECONNECT (LASTMOUSESTATE MENU) |\\PFInsertDirectoryID| ( -|\\PFGetRootDirectory|) CHAT.CLOSE.CONNECTION (OPENP) |SetBcplString| (IGREATERP) OPT.DELCOPYFN ( -OPT.CALLP OPT.EQOP COMP.CLEANFNOP SELECTQ) DIRECTORY.NEXTFILE (STRINGP LITATOM U-CASEP) -|\\VFMGenerateFileIDs| (EQL) MBUTTON.FIND.NEXT.FIELD (IGREATERP) MSEDITE (GREATERP) \\SETARG0 ( -IGREATERP) CLISP-SIMPLE-FUNCTION-P (FGETD GET CL:MACRO-FUNCTION GETLIS) SUBFIELDCREATE (SOME) -BMOBJ.IMAGEBOXFN (GREATERP LEQ) PURGEHISTORY (LITATOM) \\LEAF.LOOKUPCACHE (IEQP IGREATERP) COMP.PROG ( -LITATOM OPT.JUMPCHECK) \\OPENLEAFCONNECTION (MEMB SELECTC) ICONBUTTONEVENTFN (LASTMOUSESTATE) -COURIER.CALL (GREATERP TYPENAMEP) \\SEARCHFONTFILES (FMEMB MEMBER EQUAL) \\DOHARDRETURN1 (IEQ ILEQ) -\\DSPSPACEFACTOR.PSC (NUMBERP EQUAL) WHO-LINE-COPY-INSERT (IMAGEOBJP WINDOWP WINDOWPROP) -WHO-LINE-CURRENT-DIRECTORY (CL:MEMBER) TEDIT.GET.PARALOOKS0 (IGREATERP GREATERP) FIND.LINE ( -OVERFLOWLINE? BUFTAILP) HASH.PASSWORD (IGREATERP) CLISP3B (ATOM) \\CORE.SETFILEPTR (APPENDONLY ILESSP) - \\INSPECT.STORE.8 (CONFIRM-SET) ERASE/GRAPHNODE (WINDOWP IMAGESTREAMTYPEP) \\NSFILING.FULLNAME ( -TYPENAMEP <=) \\FM.STATE-SELECTEDFN (TYPENAMEP) \\SFMAKEITALIC (GREATERP IGREATERP) -\\FONTINFOFROMFILENAME (NUMBERP STRPOS STREAMP LITATOM) \\CORE.BACKFILEPTR (APPENDONLY) FILL.INITTBLE -(FIXP FMEMB) \\GETINTEGERPART (IGREATERP) SPELLFILE.SPELL (FIXP IGREATERP) IMAPLIST (ILEQ) -\\EDITBMHOWMUCH (IGREATERP) DO.EDIT.COMMAND (MINUSP EMPTY.BUFFER ON.LAST.LINE AT.END.OF.BUF -AT.END.OF.SCREEN AT.START.OF.BUF AT.START.OF.LINE ON.FIRST.LINE AT.END.OF.LINE WORDSEPRP IGREATERP -COMPLEXCHARP SPACEP LITATOM) \\INCUSECOUNT (IGREATERP IEQ) CLISPIFY2D (LITATOM GETPROP MEMB BOUNDP) -CONSTANTEXPRESSIONP (LITATOM FMEMB GETD EQUAL NUMBERP) \\PUPGATELISTENER (> TIMEREXPIRED?) -\\NSFILING.HANDLE.ERROR (STRPOS) SEDIT::MENU-SUBSTITUTE-SELECTEDFN (EQUAL) GET.MENU.LIST (IGREATERP) -CHECKIFPAGE (EQUAL) \\FINDFONTFILE (FMEMB) INSPECTW.REPAINTFN (IGREATERP REGIONSINTERSECTP) -LISPFORM.SIMPLIFY (LITATOM GETD DWIMIFY0?) COURIERTRACE (ACTIVEWP) BLTSHADE (TYPENAMEP) -\\INSPECT.STORE.16 (CONFIRM-SET) NO.SIDEEFFECTS.FNP (NNLITATOM) COMPILER::COMPILE-FILE-PROCLAMATION ( -CL:ATOM) \\CORE.GETINFOBLOCK (TYPENAMEP ILEQ) MAKECREATELST1 (SMALLP GREATERP) \\3MBRAWRECEIVE ( -UNINTERRUPTABLY) FINDFILE (UNPACKFILENAME.STRING) \\CORE.OPENFILE (TYPENAMEP \\GETACCESS \\IOMODEP) -\\PUTBASESTRINGFAT (GREATERP) MOUSESTATE-EXPR (EVERY ATOM) \\MKATOM (GREATERP IGREATERP ILEQ IGEQ FIXP - ILESSP) \\GCSCANSTACK (IGEQ IEQ) BOUNDP (CL:SYMBOLP) MBUTTON.FIND.BUTTON (ATOM) \\FONTFACE.COLOR ( -LITATOM FMEMB) \\EXTENDSTACK (ILESSP IGREATERP) \\GENERIC-UNREGISTER-STREAM (STREAMP FMEMB) -\\PARSE.NUMBER (GREATERP IGREATERP ILESSP IGEQ ILEQ > FMEMB) GETNSPRINTER (TYPENAMEP) SEDIT::LINE-FINISHED - (ILESSP) \\ADD-OPEN-STREAM (STREAMP FMEMB) EDITBMRESHAPEFN (<) \\TEDIT.PRESS.HARDCOPY (STRINGP) -\\FM.NWAY-SETUP (EQUAL) \\PAGEDEOFP (IEQP IGREATERP ILESSP IGEQ) FINDATOM (EXPRP LITATOM) MSEDITF ( -GREATERP HASDEF) ED (CL:SYMBOLP GET) FIXSPELL1 (STRPOS STREQUAL ILESSP IGREATERP) |\\VAMAdjustGroup| ( -ZEROP) \\FONTFILENAME (FIXP <) \\VARNOTUSED (\\WALKABLE.SPECIALFORMP NO.SIDEEFFECTS.FNP) -SPELLFILE.MATCHINGDIRS (MEMB) |\\LFEntryPoint| (|\\PFVersionOK|) CL:FORMAT (CL:STRINGP) \\INITATOMPAGE - (GREATERP) FIND1STPRIME (ILESSP ZEROP) ARGS.COMMUTABLEP (NNLITATOM \\VARNOTUSED -\\WALKABLE.SPECIALFORMP NO.SIDEEFFECTS.FNP) \\MAKEMDSENTRY (\\GCDISABLED) \\FTP.FIX.BROKEN.INPUT ( -FMEMB) \\NODIRCORE.OPENFILE (TYPENAMEP \\GETACCESS) CL:SYMBOL-NAME (CL:SYMBOLP) INSPECT/ATOM ( -NONSYSPROPNAMES GETPROPLIST MEMB LITATOM EQUAL TYPENAMEP) \\ALLOCBLOCK (ILESSP IGREATERP ILEQ) -\\DSPCLIPPINGREGION.PSC (EQP) \\CORE.GETNEXTBUFFER (OPENED ILESSP IGEQ) CL:MAKUNBOUND (CL:CONSTANTP) -TB.COLLECT.ITEMS (CL:FUNCALL) ARRAY (IGREATERP) \\PS.SCALEHACK (NUMBERP EQP) INSPECTW.CREATE (GREATERP -) \\POSTSCRIPT.OUTCHARFN (ILEQ CL:AREF IGREATERP ILESSP IGEQ) HELPSYS (FGETD) SMASHPATTERN (LITATOM) -EVALUABLE.CONSTANTP (FMEMB NNLITATOM \\WALKABLE.SPECIALFORMP \\WALKOVER.SPECIALFORMS -NO.SIDEEFFECTS.FNP) VAR.NOT.USED (LITATOM MEMB) \\LEAF.DEVICEP (STRPOS GREATERP SMALLP EQL TYPENAMEP) -ATTACHEDWINDOWTOTOPFN (WINDOWP) \\TEDIT.EXPANDED.MENU (TEXTPROP) MAPATOMS (GREATERP IGREATERP -.ALLOCATED.PER.PAGE. IGEQ <= IEQP) TEDITWINDOWP (DISPLAYSTREAMP TYPENAMEP MEMBER) \\WALKOVER.FUNCTION -(MEMB) REGIONSINTERSECTP (IGREATERP) |\\LFScavFileName| (IGREATERP EQL ZEROP) \\CH.UPDATE.CACHE ( -STRING-EQUAL MEMB) XCL::CLEAR-IMPLICIT-KEY-HASH (TYPEP) SI::UNWIND-TO-BLIP (SELECTQ) CLISPIFY2 ( -LITATOM FMEMB) |\\VAMUpdateVAM| (BITTEST) \\CREATE.SYMBOL (IGEQ FIXP ILESSP EVENP GREATERP) -%ARRAY-BASE (%ONED-ARRAY-P %TWOD-ARRAY-P %GENERAL-ARRAY-P) MAXIMUMMAINWINDOWSIZE (LITATOM) -SEDIT::MENU-PRINTBASE-SELECTEDFN (IGREATERP ILEQ) \\ALLOCHEIGHTTOGROUPEDWINDOW (LESSP) MIDDX ( -IGREATERP ILESSP) \\TEDIT.GET.PARALOOKS1 (IGREATERP GREATERP) XCL::IMPLICIT-KEY-REHASH (TYPEP <) -CLISPIFY2C (EQMEMB) MINIMUMMAINWINDOWSIZE (LITATOM) SEDIT::MENU-PACKAGE-SELECTEDFN (EQUAL) -\\ALLOCWIDTHTOGROUPEDWINDOW (LESSP) ALISTS.GETDEF (CL:SYMBOLP) \\MOVEFRAME (IEQ > \\EXTENDSTACK) -TEDIT.HCPYFILE (TYPENAMEP) MISCN-COLLECT (GREATERP) \\TEDIT.MARK.LINES.DIRTY (IEQP ILEQ IGEQ) -XCL::WALK-BINDINGS-1 (CL:SYMBOLP) |\\LFUnpackName| (IGREATERP FMEMB) \\COURIER.ATTENTIONFN (WRITEABLE -APPENDABLE) OPT.JUMPCOPYTEST (OPT.EQVALUE OPT.CALLP COMP.CLEANFNP) DOICONWINDOWCOM (TYPENAMEP) -DELETETO1 (COMPLEXCHARP) RECORDFIELD? (RECLOOK FMEMB) FASL::FASL-END-OF-BLOCK (CL:ZEROP) -DEFAULT.INSPECTW.PROPCOMMANDFN (TYPENAMEP) ATOMHASH#PROBES (LITATOM IGREATERP GREATERP FIXP ILESSP) -SEDIT::COPY-SELECTION (TYPENAMEP SEDIT::CONTAINS?) \\LEAF.ADD.QUOTES (<=) \\CLIPANDDRAWLINE1 ( -IGREATERP IGEQ FMEMB) SETF-SYMBOL-FUNCTION (CL:CONSP CL:SYMBOLP) \\CORE.SETEOFPTR (OVERWRITEABLE -ILESSP) SEDIT::GENERATE-LINEAR-FORM (ILEQ IGEQ) DECLARERECORD (FMEMB) ELT (IGREATERP IGEQ) -\\SPP.GETNEXTBUFFER (\\SPP.PREPARE.OUTPUT) \\FM.3STATE-DOWNFN (OPENWP) \\FONTFILENAME.OLD (FIXP <) -FB.PROMPTWPRINT (< GREATERP) \\TEDIT.PARSE.SEARCHSTRING (MEMBER EQUAL) ERRORMESS (TYPEP) CLOSEALL ( -FFETCHFIELD \\IOMODEP STREAMPROP) \\READSTRIKEFONTFILE (IGREATERP GREATERP) PUTD (LITATOM TYPEP ARRAYP -) SI::NON-LOCAL-RETURN (SI::UNWIND-TO-BLIP GREATERP) XCL::WALK-ARGLIST (CL:SYMBOLP CL:CONSP) -TB.UNSELECT.ALL.ITEMS (<= GREATERP) \\READACFONTFILE (RANDACCESSP EVERY REMOVE GREATERP) ADD-USER-SUBR - (BOUNDP CL:CERROR SETA CL:FIND) |\\LFOpenOldFile| (EQL) \\TEDIT.SUBST.FN1 (IGEQ) -\\FM.3STATE-SETUPOFFBITMAP (ATOM TEXTUREP STRINGP BITMAPP EQUAL) \\FONTINFOFROMFILENAME.OLD (NUMBERP -STRPOS) PF (MEMB) XCL::WALK-BINDINGS-2 (CL:SYMBOLP) ICONPOSITION.FROM.WINDOW (ILESSP) \\DELETETREE ( -GREATERP IEQP) RECLOOK (RECDEC?) COMP.NOT (COMP.PREDP) \\FONTRESETCHARWIDTHS (GREATERP ILESSP -IGREATERP) \\DRAWPOLYGON.PSC (NUMBERP ZEROP FLOATP) SETA (ILESSP IGEQ) SI::INTERNAL-THROW-VALUES ( -SI::UNWIND-TO-BLIP) SI::PVAR-VALUE-IN-FRAME (NULL-NTENTRY EQP) OPENP (TYPENAMEP) LOOKUPHASHFILE ( -MINUSP) \\FONTFILENAME.NEW (FIXP < EQUAL) \\STKMIN (GREATERP) %ARRAY-OFFSET (%ONED-ARRAY-P -%TWOD-ARRAY-P %GENERAL-ARRAY-P) \\BSP.CLOSE.OPEN.SOCKETS (SELECTC) \\PUTD (TYPEP ARRAYP) -MAKE-NETWORK-TRACE-WINDOW (WINDOWP DISPLAYSTREAMP) HISTORYFIND (EQUAL NUMBERP ILESSP IGREATERP SOME -FMEMB) \\SFROTATECSINFOOFFSETS (GREATERP) INSPECT/BITMAP (TYPENAMEP) ROTATE-BITMAP (GREATERP) -\\INSPECT.COMPUTE.TITLE (LITATOM) DECODE/WINDOW/OR/DISPLAYSTREAM (WINDOWP EQUAL) -SI::NON-LOCAL-RETURN-VALUES (SI::UNWIND-TO-BLIP) \\SPP.SETFILEPTR (IGEQ) PRINTFNDEF (DISPLAYP) -\\TEDIT.GET.CHARLOOKS1 (IGREATERP FFETCHFIELD) XCL::IMPLICIT-KEY-MAP-HASH (TYPEP) -SCALE/GRAPHNODE/BORDER (FIXP) CLISPIFY1 (GETPROP LITATOM) PFCOPYBYTES (IMAGESTREAMP ILEQ \\XCCSP IGEQ) - \\SFLHASHLOOKUP (IEQP) %ARRAY-TYPE-NUMBER (%ONED-ARRAY-P %TWOD-ARRAY-P %GENERAL-ARRAY-P) -ROTATE-BITMAP-LEFT (GREATERP) MAXIMUMWINDOWSIZE (LITATOM) GETD (LITATOM) DOATTACHEDWINDOWCOM (WINDOWP -TYPENAMEP) FASL::COLLECT-LIST (EQL GREATERP) PROCESSPROP (TYPENAMEP >) WTFIX1 (EQUAL STRPOSL -CLISPNOTVARP EVERY MEMB CLISPFUNCTION? FIXLAMBDA DWIMUNSAVEDEF WTFIXLOADEF NUMBERP MINUSP -CLBINARYMINUS? GETHASH SOME FGETD) \\BASEBYTES.PEEKBIN (IGEQ) CLISPFUNCTION? (LITATOM CLISPNOTVARP -CLISP-SIMPLE-FUNCTION-P FMEMB STRPOSL FIXSPELL1) PRINTCURSOR (TYPENAMEP) \\GETSPP (SEQ.GREATERP -TIMEREXPIRED?) |\\LFDirectoryP| (TYPENAMEP |\\PFPilotVolumeP| EQL) UNIONREGIONS (GREATERP LESSP) -\\SFMAKECOLOR (IMAGESTREAMP NUMBERP) \\BASEBYTES.BOUT (IGEQ) BREAKLINE (OVERFLOWLINE?) WHENCLOSE ( -IGREATERP GREATERP) COMPILER::ALPHA-MV-PROG1 (CL:NUMBERP <) CLDISABLE (/REMPROP MEMB) FASL::FAT-STRING-P - (STRINGP) \\CANONICAL.HOSTNAME (NUMBERP SMALLP < LITATOM) BSPREADP (ILESSP IGREATERP) -\\TEXTMENU.START (EQUAL) \\FILLPOLYGON.PSC (ZEROP EQL FIXP FLOATP TEXTUREP BITMAPP) INFILECOMS? ( -LITATOM) \\BASEBYTES.SETFILEPTR (IGREATERP) CL:SYMBOL-VALUE (CL:SYMBOLP) CL:FBOUNDP (CL:SYMBOLP -ARGTYPE CL:MACRO-FUNCTION CL:SPECIAL-FORM-P) \\TEDIT.RESHAPEFN (ILESSP) STRING.EQUAL (LITATOM STRINGP -GREATERP IGREATERP) BIT.IN.ROW (GREATERP) RELSTKP (STACKP) \\TEDIT.CUMULATE.EVENTS (<) -SEDIT::MENU-FIND-SELECTEDFN (EQUAL) \\CLIPANDDRAWLINE (IGREATERP FMEMB IGEQ GREATERP) -|\\LFCreateDevice| (BOUNDP TYPENAMEP) INSPECTW.REDISPLAY (NLSETQ) SEDIT::INSERT (TYPENAMEP) -SI::VARIABLE-NAME-IN-FRAME (NULL-NTENTRY EQP FIXP SMALLP) TB.DESELECTRANGE (< > <= GREATERP) FILL.XPER - (GREATERP FMEMB) \\FINDOP (GREATERP LITATOM FIXP) |\\LFCreateFile| (|\\PFNewPages|) COMPILER::GENCODE-BLOCK - (COMPILER::BLOCK-NEW-FRAME-P COMPILER::BLOCK-CLOSED-OVER-P COMPILER::BLOCK-CLOSED-OVER-VARS) -\\TEDIT.CLOSEUPLINES (ILEQ ILESSP IGEQ) \\SETUPSTACK1 (IGREATERP ODDP) \\BASEBYTES.TRUNCATEFN (ILESSP -IGREATERP) \\TFBRAVO.PARSE.PROFILE.PARA (IGEQ) \\FBITMAPBIT.UFN (ZEROP) FB.UPDATEBROWSERITEMS (MEMB -STRPOS FB.ADJUST.DATE.WIDTH) EDITBMSCROLLFN (FLOATP ILESSP IGREATERP) \\MAKEBASEBYTESTREAM (TYPENAMEP) - SUBRNUMBER (FIXP) \\CANONICALIZE.PUP.HOSTNAME (LITATOM) \\USER-SUBR-UFN (BOUNDP) TEDIT.RAW.INCLUDE ( -OPENP IGREATERP) \\INSPECT.STORE.PTR (CONFIRM-SET) BSPEOFP (ILESSP) INITBITMASKS (GREATERP) HASHFILEP -(ARRAYP LITATOM ELT) \\RESETSTACK0 (GREATERP < IEQ) TB.UNSELECT.ITEM (TB.ITEM.UPDATABLE?) FILL.CONT ( -GREATERP) CHAT.BIN (\\SYSBUFP) ICMLARRAY.GETMENUWGROUP (GREATERP) OPT.SKIPPUSH (ILESSP ZEROP IGEQ -COMP.CLEANFNOP) \\UPCASEBASE (GREATERP) MAXMENUITEMWIDTH (BITMAPP) \\BASEBYTES.BLOCKIO (ILEQ IGREATERP -) COMPILER::GENCODE-CATCH (COMPILER::BLIPPER-NEW-FRAME-P) WRITESTRIKEFONTFILE (FONTP IGEQ ILESSP -GREATERP LESSP IEQP) SETINITIALS (STRING-EQUAL) PRINTWORDS (GREATERP) GRIDXCOORD (IGEQ) ERASEPROPS ( -SOME LITATOM MEMB) SET-READTABLE-INTERACTIVELY (READTABLEP) \\CH.CHECK.CLEARINGHOUSE (STREQUAL) -\\FM.TOGGLE-SELECTEDFN (\\FM.ITEMPROP) TOPW.BUTTONEVENTFN (MOUSESTATE) SEDIT::JOIN (FMEMB GREATERP) -|\\PFDsplyVolumes| (DEFINEDP) INTERPRET.REM.CM (IGREATERP GREATERP FMEMB) COMP.CALL (FMEMB) -TB.SELECTRANGE (GREATERP > <) UNDOLISPX2 (MAPC) CHAT.SCREENPARAMS (IGEQ FIXP) COMP.LAM1 (FMEMB) -\\LINEWITHBRUSH (LITATOM FMEMB IGREATERP IGEQ ILESSP ILEQ) |\\LFGetStreamForFile| (\\FILE-CONFLICT -IGREATERP) EDIT.BITMAP (LITATOM BITMAPP CURSORP) IRM.CREF.BUTTONEVENTFN (MOUSESTATE INSIDEP) -ICMLARRAY.GETREGIONFN (IGREATERP) \\CAUSEINTERRUPT (ILESSP) POSTSCRIPT.OUTSTR (FIXP STRINGP IGREATERP -LITATOM ZEROP TYPEP) BITBLT (TYPENAMEP IGEQ WINDOWP FMEMB WOVERLAPP) GRIDYCOORD (IGEQ) -DECODE.WINDOW.ARG (WINDOWP REGIONP NUMBERP POSITIONP) CLOSENSOCKET (FMEMB) UPDATEPCNODES (GREATERP) -\\CREATE.TTYDISPLAYSTREAM (HASTTYWINDOWP) \\ADDOFD (FFETCHFIELD) EVALQT (ERSETQ) \\BITBLT.BITMAP (ILEQ - FIXP TYPENAMEP) SI::BQUOTE-EXPANDER (CL:ATOM) \\LEAF.STREAM.IN.QUEUE (TYPENAMEP SELECTC DIRTYABLE) -\\SETUPUSERSTACK (IGREATERP) SI::BQUOTE-PROCESS-LIST (CL:ATOM) COMPILER::COMPILE-FILE-SETF-SYMBOL-FUNCTION - (CL:CONSTANTP CL:SYMBOLP COMPILER::FUNCTION-P) CHAT.CHOOSE.PHONE.NUMBER (ILESSP IGREATERP) -MAXMENUITEMHEIGHT (BITMAPP) \\GET-COMPILED-CODE-BASE (LITATOM) BREAKCONNECTION (CL:FUNCALL) -CURRENT.WORD (AT.START.OF.LINE IGREATERP COMPLEXCHARP SELECTC BITTEST) \\FM.3STATE-SETUP (EQUAL) -\\GATHER-CLEANUP-FORMS1 (< > IEQ \\VALIDADDRESSP >=) BIT.IN.COLUMN (GREATERP) SI::BQUOTE-NCONC (CL:ZEROP -) \\ATMIN (IGREATERP ZEROP GREATERP) ADDTOCOM1 (LITATOM) FILES?1 (LITATOM) GRID (ZEROP NUMBERP MINUSP -LESSP GREATERP WINDOWP) SI::BQUOTE-CONS (CL:LISTP) STRIKECSINFO (GREATERP IEQP) ARCTO.IP (FLOATP) -INTERRUPTED (PROCESS.EVALV GETD \\PROCESS.MAKEFRAME) SI::BQUOTE-APPEND (CL:ZEROP) SCANFILE1 (MEMB SOME - GETPROP FMEMB) NIL -EFFECT SCANFILE1 (SETFILEPTR RETRYSCAN LAPRD SCANFILE2 ERROR PUTDEF EVAL DEFINE) \\DSPTOPMARGIN.IP ( -FREPLACEFIELD) \\DOMISCAPPLY1 (FREPLACEFIELD \\CONTEXTSWITCH) \\CODEFORTFRAME (\\CALLME CLEARSTK -INITIALEVALQT \\REPEATEDLYEVALQT) TEDIT.COPY.PARALOOKS (\\LISPERROR TEDIT.PARALOOKS) LAST (DECLARE) -FB.HARDCOPY.PRINT.TITLE (DSPXPOSITION PRIN1) RCOMP3 (SELECTQ HELP /SET PRIN1 PRIN2 PRINT) \\CLEARCELLS - (\\PUTBASE \\BLT) \\DUMMYTELERAID (\\CONTEXTSWITCH) SIMPLEPRINT (DSPBOUT) ONEDINSPECT.PRINTELEMENT ( -MOVETO) SEDIT::PRETTY-PRINT (SEDIT::CREATE-PRETTY-PRINT-ENV FREPLACEFIELD SEDIT::PARSE -SEDIT::COMPUTE-ALL-FORMATS) TWODINSPECT.REPAINTFN (WITH-INSPECTOR-ENV TWODINSPECT.PRINTELEMENT -INSPECT.INVERTSELECTION) HARDCOPYREGION.TOPRINTER (SPAWN.MOUSE PROMPTPRINT CLRPROMPT HARDCOPYW) -PRINTPACKETDATA (SELECTQ |printout| PRIN2 \\OUTCHAR) ARCTO.IP (APPENDNUMBER.IP) \\FM.TOGGLE-DOWNFN ( -BLTSHADE) DOERROR (NCONC1 FRPLACD) FB.THINCOMMAND (FB.UPDATE.COUNTERS) NS.ECHOUSER (RESETSAVE -\\PUTBASE FREPLACEFIELD |printout| SENDXIP PRINTERRORXIP RELEASE.XIP AWAIT.EVENT) APPENDOP.IP (ERROR) -SEDIT::INSPECT-SELECTION (SEDIT::SET-SELECTION-NOWHERE SEDIT::SET-POINT-NOWHERE |printout| DECLARE -TERPRI) \\HCPYMODEBLTCHAR (DECLARE \\CHANGECHARSET.HCPYMODE \\DSPPRINTCR/LF FREPLACEFIELD -.WHILE.TOP.DS. \\PUTBASE \\SOFTCURSORDOWN \\INSURETOPWDS \\PILOTBITBLT \\SOFTCURSORUPCURRENT) -ADD.BORDER.TO.BITMAP (BITBLT) \\OUTCHARFN.PRESS (NEWLINE.PRESS SHOW.PRESS SETXY.PRESS \\BOUT) -\\TELERAIDCOMMAND (DECLARE SETMAINTPANEL RAID \\FLUSHVM) \\DSPROTATE.PSC (POSTSCRIPT.SHOWACCUM -FREPLACEFIELD \\DSPRESET.PSC) SEDIT::COMPLETE (SEDIT::CLOSE-OPEN-NODE SEDIT::HANDLE-COMPLETION CLOSEW -SEDIT::DISINTEGRATE-CONTEXT DEL.PROCESS SHRINKW TTY.PROCESS) RESTART.ETHER (SUSPEND.PROCESS) -\\HARDRESET-CLEANUP (FREPLACEFIELD) BACKWARD.DELETE.TO (MOVE.BACK.TO) \\TEXTSTREAMBOUT ( -\\TEDIT.MARK.LINES.DIRTY \\INSERTCR \\INSERTCH DSPFONT TEDIT.UPDATE.SCREEN \\FIXSEL SCROLLW -TEDIT.DISPLAYTEXT) \\COPYSYS (SELECTQ \\DAYTIME0 LISPERROR \\CLEARSYSBUF \\RESETKEYBOARD) COMPSET ( -SELECTQ PRIN1) UNIX-USERNAME (FREERESOURCE DECLARE) FILES? (UPDATEFILES LISPXPRIN1 LISPXPRIN2 LISPXTAB - FILES?PRINTLST LISPXSPACES LISPXTERPRI ADDTOFILES?) |\\VAMFindFreePages| (|DiskError| LISPERROR -FREPLACEFIELD) MB.SHOWSELFN (MB.DISPLAY) \\TEDIT.REPAINTFN (\\SHOWSEL \\DISPLAYLINE \\FILLWINDOW -\\FIXSEL) \\COURIER.REP.BIN (FREPLACEFIELD) TWODINSPECT.BUTTONEVENTFN (TOTOPW WITH-INSPECTOR-ENV -GETMOUSESTATE) HARDCOPYREGION.TOFILE (SPAWN.MOUSE PROMPTPRINT CLRPROMPT HARDCOPYW) \\GCERROR (DECLARE -DISABLEGC) \\SWITCHFONTS.PSC (POSTSCRIPT.PUTCOMMAND) LAYOUTLATTICE (DECLARE ERROR -INIT/NODES/FOR/LAYOUT) CL:POSITION (CL:ERROR) \\DSPROTATE.IP (ROTATE.IP) TB.SELECT.ITEM ( -TB.SELECTRANGE) FASL:OPEN-FASL-HANDLE (BOUT BOUT16) \\CAUSEINTERRUPT (CHECK \\PUTBASE) -PASTEFROMCLIPBOARD (BKSYSCHARCODE) \\UFS.RECOGNIZE.FILE (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND -) \\ZEROWORDS (\\CLEARWORDS \\PUTBASE) TEDIT.COPY.LOOKS (\\LISPERROR TEDIT.LOOKS) SEDIT::OPEN-LITATOM -(SEDIT::CLOSE-OPEN-NODE RPLSTRING) SEDIT::TRACK-SELECT (SEDIT::SMASH-USING SEDIT::PLACE-CARET-AND-SELECTION - SEDIT::TRACK-BAR-IN-TRACK-SELECT SEDIT::CHECK-SELECTION-SHIFT BLOCK GETMOUSESTATE) \\FTP.WHENCLOSED ( -|printout| PRIN1) \\DRAWARC.PSC (|printout| PRIN1 POSTSCRIPT.OUTSTR MAPC) \\INITSPP (FREPLACEFIELD) -\\GC.MODIFY.BIGREFCNT (\\GC.BIGREFCNT.MISSING SELECTC FREPLACEFIELD) SEDIT::SETUP-CONTEXT ( -SEDIT::SETUP-PROFILE SEDIT::SETUP-NEW-CONTEXT SEDIT::VERIFY-STRUCTURE SEDIT::THROW-AWAY-CHANGES) -\\GC.ENTER.BIGREFCNT (SELECTQ \\NEWPAGE \\MP.ERROR FREPLACEFIELD) UNIX-FULLNAME (FREERESOURCE DECLARE) - COMP.COMMENT (COMPERRM) \\NSGATELISTENER (PROCESSPROP \\HANDLE.NS.ROUTING.INFO BLOCK -\\AGE.ROUTING.TABLE FREPLACEFIELD SENDXIP) \\DORETCALL (CHECK \\INCUSECOUNT \\DECUSECOUNT) -MOVE.BACK.TO (GO.TO.RELATIVE) CL::%ASIN-FLOAT (DECLARE) \\FM.TOGGLE-SETUP (DECLARE FREPLACEFIELD -LISTPUT) SHORTLST (SPACES PRIN2 PRIN1) UNIX-GETENV (FREERESOURCE DECLARE) \\SENDLEAF (ERROR -FREPLACEFIELD AWAIT.EVENT RELEASE.PUP) APPENDRATIONAL.IP (APPENDSEQUENCEDESCRIPTOR.IP APPENDINT.IP) -\\SHOWMENULABEL (DECLARE DSPXPOSITION DSPYPOSITION) PFI.AFTER.NEW.PAGE (DECLARE CHANGEFONT PRIN3 -|printout| PRIN2 DSPXPOSITION TERPRI) \\DISABLEGC1 (FRPTQ) SEDIT::INSERT-SPECIAL-CHARACTER ( -SEDIT::INSERT-STRING SEDIT::SET-SELECTION-NOWHERE SEDIT::INSERT) \\SLOWHCPYMODEBLTCHAR ( -\\DSPPRINTCR/LF FREPLACEFIELD SELECTQ SHOULDNT .WHILE.TOP.DS. \\PUTBASE \\SOFTCURSORDOWN -\\INSURETOPWDS DECLARE \\PILOTBITBLT \\SOFTCURSORUPCURRENT \\DSPYPOSITION.DISPLAY BITBLT ERROR) -\\GETPILOTBBTSCRATCHBM (DECLARE) RESET (\\SMASHRETURN TAB) \\TELERAIDGET (FLIPCURSOR -\\BLTLOCALHOSTNUMBER FREPLACEFIELD \\10MBRAWENCAPSULATE \\10MBRAWTRANSMIT) \\VECPUT (\\ENDVECRUN -FREPLACEFIELD SHOW.PRESS SETXY.PRESS \\BOUT) \\PRESSINIT (DECLARE) FIND-STACK-FRAME (RELSTK) -APPENDNUMBER.IP (DECLARE APPENDBYTE.IP APPENDSEQUENCEDESCRIPTOR.IP APPENDINT.IP) \\MAKE.PROCESS0 ( -DECLARE \\MISCAPPLY* FREPLACEFIELD \\CONTEXTSWITCH \\SETFVARSLOT \\MAKE.PROCESS1 |printout| SELECTQ -SI::RESETUNWIND \\PROCESS.RELEASE.LOCKS DRIBBLE NOTIFY.EVENT \\PROCESS.GO.TO.SLEEP) MULTIFILEINDEX ( -PFI.ENQUEUE) BITMAPCOPY (BITBLT) SEDIT::INSERT-MULTI-ESCAPE (SEDIT::INSERT SEDIT::SET-SELECTION-NOWHERE -) TTYINPROMPTFORWORD (SELCHARQ) SETUPFONTS.PRESS (\\DEFINEFONT.PRESS \\DSPFONT.PRESS \\ENTITYEND.PRESS - FREPLACEFIELD) \\ALLOCPAGEBLOCK (\\NEWPAGE) \\DOSTACKFULLINTERRUPT (FREPLACEFIELD) \\SPPGETERROR ( -|printout| PRINTPACKET TAB) UNIX-GETPARM (FREERESOURCE DECLARE) SET-PACKAGE-INTERACTIVELY (FRPLACD) -\\BLTSHADE.BITMAP (DECLARE UNINTERRUPTABLY FREPLACEFIELD \\BITBLTSUB) ALLOCSTRING (LISPERROR -UNINTERRUPTABLY FREPLACEFIELD %SET-ARRAY-TYPE-NUMBER %SET-ARRAY-OFFSET \\PUTBASEFAT \\PUTBASETHIN) -\\GC.LOOKUP.BIGREFCNT (\\GC.BIGREFCNT.MISSING) \\GCMAPSCAN (CHECK .DELLINK. \\PUTBASEFIXP -.GCRECLAIMLP. \\ADDREF) COMP.QUOTE (COMPERRM) TEDIT.SEL.AS.STRING (\\SETUPGETCH RPLCHARCODE) -OPT.FRAMEVAR (OPT.PRATTACH OPT.PRDEL RPLACA) SUBSTRING (UNINTERRUPTABLY FREPLACEFIELD -%SET-ARRAY-TYPE-NUMBER %SET-ARRAY-OFFSET) \\FILING.ATTRIBUTE.TYPE (ERROR) \\DSPRIGHTMARGIN.IP ( -FREPLACEFIELD \\FIXLINELENGTH.IP) \\FREELISTCELL (CHECK) MKSTRING (DECLARE) \\INSERT.FIRST.PIECE ( -\\INSERTPIECE) \\IMAGEUSERPROP (LISTPUT FREPLACEFIELD) SEDIT::INSERT-STRING (SEDIT::REPLACE-STRING) +CHAT.TYPEOUT.CLOSE (OPENWP TTY.PROCESSP) SAVEDEF (SUBRP EXPRP CCODEP) EVAL.AS.PROCESS (THIS.PROCESS) +\DOTRANSITIONS (GREATERP) CGETD (LITATOM) CL::%%ATAN-FLOAT (= > UFGEQ UFGREATERP UFLESSP) +\BSP.SENDBUFFER (IGREATERP) LAPRD (LITATOM) VIRGINFN (EXPRP) \SPP.ESTABLISH (\SPP.DUPLICATE.REQUEST) +FB.GETALLFILEINFO (FMEMB) SEDIT::CONVERT-COMMENT-STRUCTURE (FMEMB STRINGP IGEQ) \FTP.GENERATEFILES ( +IGREATERP U-CASEP \FTP.HANDLE.NO BSPOPENP EQMEMB) \TEDIT1 (STRINGP) \THROUGHOUTCHARFN (>) \PRINTFRAME +(IGEQ ILESSP) ONFILE (MEMB INFILECOMS? TESTRELATION) FB.FASTSEECOMMAND (WINDOWP UNPACKFILENAME) +FIXCONTINUE1 (FMEMB EDITFINDP FIXCONTINUE1) \PRINTBF (GREATERP IGEQ) SPY.START (OPENWP) +TB.DECONSIDERRANGE (GREATERP) OPENW (OPENWP \USERFNISDON'T) EDITCALLERS (ILESSP IGREATERP) +\DSKDISPLAY.DESTROY.WINDOW (WINDOWP WINDOWPROP) WHO-LINE-SHOW-ACTIVE (TIMEREXPIRED?) +SEDIT::PARSE-INDENT-GROUP-BODY (CL:NUMBERP CL:LISTP) \TFBRAVO.FIND.LAST.TRAILER (IGREATERP ILEQ FMEMB) + INTERPRESS.OUTCHARFN (\FATCHARCODEP SMALLP <= > < >=) \DECODETRANSITION (IGREATERP ILESSP ASSOC) +TTPRIN1 (U-CASEP >= >) COMPILER::COMPILE-FILE-PROCLAMATION (CL:ATOM) \SCANFORNTENTRY (NULL-NTENTRY +IEQP FIXP SMALLP) \LEAF.TIMEDOUT (>=) DECODE/WINDOW/OR/DISPLAYSTREAM (WINDOWP EQUAL) TTYDISPLAYSTREAM +(GETD FMEMB IGEQ) CLISPIFY1 (GETPROP LITATOM) \TEDIT.COMMAND.RESET.SETUP (WINDOWPROP) \SEND.RFC ( +\ROUTE.PUP) PRINTTIMER (ILESSP) MB.NWAYBUTTON.ADDITEM (GREATERP) CHARACTER (SMALLP IGREATERP) +SEDIT::REPAINT (FIXP STRINGP) COURIER.SKIP.SEQUENCE (GREATERP) \COMPUTE.HUNK.TYPEDECLS (> GREATERP) +TB.COPYBUTTONEVENTFN (INSIDEP .COPYKEYDOWNP. MOUSESTATE) TTYINBUFFERBIN (COMPLEXCHARP) +DO.SHIFTED.SELECTION (KEYDOWNP LASTMOUSESTATE ZEROP BEFOREBUF NEQPOS EQPOS TTBEFOREPOS) \SETXFORM.PSC +(EQP ZEROP) REQUIREVERSION (LESSP) LOOKUP.NS.SERVER (EQUAL.CH.NAMES) CL:MAKE-PATHNAME (STRINGP) +\CHANGE.ETHER.TRACING (LASTMOUSESTATE) \TEDIT.NEWREGIONFN (IGEQ) \NSADDRESS.DEFPRINT (IGREATERP <) +UPDATEFN (GETHASH) LIST* (ILEQ) SORT1 (SELECTQ ALPHORDER APPLY*) CLISPFUNCTION? (LITATOM CLISPNOTVARP +CLISP-SIMPLE-FUNCTION-P FMEMB STRPOSL FIXSPELL1) SPP.CLEAREOM (\SPP.PREPARE.INPUT) \GETINTEGERPART ( +IGREATERP) \FAX.PARSE.NAME (IGREATERP DIGITCHARP IGEQ) \TEDIT.SMALLERSEL (SHIFTDOWNP) +CL:MAKE-BROADCAST-STREAM (STREAMP) \NSPRINT.MEDIUM.CHECK (EQUAL STRPOS) \DEFINEDEVICE (FMEMB LITATOM) +CL:COMPILED-FUNCTION-P (ARRAYP) MSINTERPRET (GETHASH FMEMB) FB.HARDCOPY.TOFILE (FMEMB) CLISPATOM ( +GETPROP FIX89 ATOM) \LINEBLT (ILESSP IGREATERP) U-CASE (LITATOM IGREATERP IGEQ ILEQ STRINGP) +TEXTSTREAM (PROCESSP WINDOWP DISPLAYSTREAMP \ILLEGAL.ARG) \VALID.FILING.CONNECTIONP (STRING-EQUAL +\SECONDSCLOCKGREATERP \NSFILING.SET.CONTINUANCE) \VFMMerge1 (EQL IGEQ) \GETMISCSOCKET (FMEMB) +\DSKDISPLAY.CREATE.WINDOW (WINDOWP) SEEFILE (GREATERP ILEQ) CHANGENAME1 (EXPRP CCODEP LITATOM) +CL:MAKE-RANDOM-STATE (CL:RANDOM-STATE-P) RECURSIVE.COLLECTDESCENDENTS (NC.GraphNodeIDGetProp) +FB.ADD.FILEGROUP (EQ.DIRECTORYP NULL.DIRECTORYP) \CREATECHARSET.IP (RANDACCESSP IEQP LESSP IGREATERP +GREATERP ILESSP) \EVENTKEYS (KEYDOWNP) FIXCONTINUE (FIXCONTINUE1) NEWLINE.PRESS (ILESSP) APROPOS ( +FNTYP) ATTACHEDWINDOWTOTOPFN (WINDOWP) CL:MERGE (CL:LISTP CL:VECTORP) \GETDEVICEFROMNAME (LITATOM +STRINGP) ESUBST (NLSETQ) CLDISABLE (/REMPROP MEMB) APROPRINT (IMAGESTREAMP) +INTERACT&ADD.BORDER.TO.BITMAP (GREATERP) MSNLAMBDACHECK (TEMPLATE NLAMBDAFNP FMEMB) MOVEDESCENDENTS ( +MEMBER) SEDIT::PARSE-INDENT (CL:KEYWORDP CL:LISTP) \FLOATTOBYTE.UFN (GREATERP) FB.HARDCOPYCOMMAND ( +SELECTQ) \TEDIT.WORDDELETE (IGREATERP LESSP SELECTC FIXP ILESSP) \FTP.DELETEFILE (\FTP.HANDLE.NO +BSPOPENP) SCANFORWARD (COMPLEXCHARP) EDIT4E (NUMBERP STRINGP STREQUAL LITATOM SKOR0 PRIN1 NLSETQ) +CL:MISMATCH (EQL) CHECKPATHS (FMEMB MSINTERPRETSET FASSOC) \BLKFABSMAX.UFN (GREATERP) CLISPERROR (ATOM +) \REMOVEDEVICE.NAMES (EQMEMB) \BLKFABSMIN.UFN (GREATERP LESSP) \CURSORDESTINATION (ILESSP) +FW-INIT-PROPS (STRINGP LITATOM IGEQ ILEQ GETD) \CCODEARGLIST (< > LISTGET STRINGP GREATERP) \CLOSEFILE + (READONLY) GETPROP (LITATOM) DINFO.EXPANDFN (LISTGET) FNCHECK (LITATOM MEMB RELSTK) +DINFO.READ.KOTO.GRAPH (GREATERP) \BLKSMALLP2FLOAT.UFN (GREATERP) DOICONWINDOWCOM (TYPENAMEP) EDITFPAT +(STRPOS) INFILECOMS? (LITATOM) PACK* (IGREATERP LITATOM STRINGP) COMP.NOT (COMP.PREDP) +CL:PARSE-NAMESTRING (CL:EQUAL) \ADD.CONNECTED.DIR (LITATOM STRINGP UNPACKFILENAME.STRING) +\WWCHANGESCREENSIZE (\ONSCREENW) \CCODEIVARSCAN (FIXP SMALLP GREATERP EQP) DWIMLOADFNS? (LITATOM FGETD +) EDITXTR (TAILP) \LEAF.GETFILEINFO (FMEMB) PFI.ENQUEUE (FIND.PROCESS) \BLKMAG.UFN (GREATERP) +FB.MAYBE.WIDEN.NAMES (ILEQ LESSP) EDITMBD (FEDITFINDP TAILP) CL:NUMBERP (NUMBERP) \BLKEXPONENT.UFN ( +GREATERP) POSTSCRIPT.FONTCREATE (GREATERP) ICONW.SHADE (WINDOWP OPENWP) \HARDCURSORPOSITION (ILESSP +IGEQ IGREATERP) CL:OUTPUT-STREAM-P (\IOMODEP) \RTP.HANDLE.RFC (SELECTC \RTP.FILTER) INITATOMS ( +GREATERP IGEQ ILEQ) CL:PEEK-CHAR (CL:CHARACTERP) DELFROMFILES (DELFROMCOMS INFILECOMS?) \BLKFDIFF.UFN +(GREATERP) ICONPOSITION.FROM.WINDOW (ILESSP) CL:PHASE (= CL:COMPLEXP MINUSP) ONEDINSPECT.MAKEREGIONS ( +GREATERP) \SPP.HANDLE.DATA (SEQ.GREATERP) \BLKSEP.UFN (GREATERP) FB.ADJUST.DATE.WIDTH (TB.FIND.ITEM) +FILES? (FILES?1) \BLTSHADE.IP (>) \BLKFLOATP2COMP.UFN (GREATERP) \BLKPERM.UFN (GREATERP) +SEDIT::LINEARIZE-COMMENT (ILEQ) \SOFTCURSORUPCURRENT (IGREATERP ILESSP) FIXATOM (LITATOM FMEMB GETPROP + CL:THROW NUMBERP FIXSPELL1) \BLKFPLUS.UFN (GREATERP) \BLKFMAX.UFN (GREATERP) MSHASHLIST1 (EQMEMB +FMEMB MSMEMBSET) FIXATOM1 (ATOM ZEROP) RECORDECLARATIONS (LITATOM FMEMB) ADDTOCOM1 (LITATOM) +OPT.JUMPCOPYTEST (OPT.EQVALUE OPT.CALLP COMP.CLEANFNP) \FM.3STATE-DOWNFN (OPENWP) \BLKFTIMES.UFN ( +GREATERP) DOATTACHEDWINDOWCOM (WINDOWP) SEDIT::CHANGE-PACKAGE (CL:MEMBER) MACROEXPANSION (LITATOM +FMEMB) PARSE-NSADDRESS (STRINGP STRPOS IGREATERP >= <=) \FM.3STATE-SETUPOFFBITMAP (ATOM TEXTUREP +STRINGP BITMAPP EQUAL) BITMAPCREATE (IGEQ IGREATERP) CHAT.OPTIONMENU (FNTYP) FB.HEADINGW.DISPLAY (< >) + \BLKFMIN.UFN (GREATERP LESSP) CL::%%PRINT-TIMING-ITEM (>) FILES?1 (LITATOM) CL:RANDOM (>) \LFVersions + (\LFDirectorySearch) TB.MAKE.BROWSER (STRPOS) FASL::FAT-STRING-P (STRINGP) \PUT.FILING.ATTRIBUTE ( +FIXP) \TAN.OLD (FGREATERP FLESSP) IRM.LOOKUP (OBTAIN.MONITORLOCK) FULLPRESSBITMAP (ILESSP) CL:PROBE-FILE + (STREAMP OPENP) CL::%%ASIN-FLOAT (< > UFGREATERP) COMPILER::GENCODE-CATCH (COMPILER::BLIPPER-NEW-FRAME-P +) \TEDIT.LOOKS (IGREATERP) EDIT4F (NUMBERP TAILP EDIT4E ZEROP EDIT4F1) CL:PROVIDE (CL:SYMBOLP) +\SPP.RELEASE.ACKED.PACKETS (SEQ.GREATERP) COMPILER::ALPHA-MV-PROG1 (CL:NUMBERP <) \TFBRAVO.WRITE.RUN ( +ILEQ EQUAL) VRULE.DISPLAYFN (>=) DINFO.CREATE.GRAPH.WINDOW (GEQ) COURIER.SKIP (LITATOM GREATERP IEQP) +IBLT1 (LESSP GREATERP) CL:READ-BYTE (\EOFP) TB.REDISPLAY.ITEMS (>= TB.ITEM.UPDATABLE?) MSTRYSPELLTYPE +(LITATOM MSWORD?) CL:VALUES (FIXP SMALLP GREATERP >= IGREATERP <= IGEQ) GETRELATION (LITATOM) +\TEDIT.LARGERSEL (SHIFTDOWNP) IBLT2 (LESSP GREATERP) \TEDIT.TEXTBIN.NEW.PAGE (IEQP) \SIMULATE.UNBIND ( +GREATERP) EDITCONT (EDIT4F NLSETQ EDIT4E) CL:VALUES-LIST (FIXP SMALLP >= IGREATERP <=) +TB.DO.UNLESS.BUSY (OBTAIN.MONITORLOCK) ERRM-TO-CONDITION (TYPEP) MAYBE.PRETTYFILEINDEX ( +PRETTYFILEINDEX PFI.ORIGINAL.LISTFILES1) COMPILER::GENCODE-BLOCK (COMPILER::BLOCK-NEW-FRAME-P +COMPILER::BLOCK-CLOSED-OVER-P COMPILER::BLOCK-CLOSED-OVER-VARS) PACKFILENAME (<= STREQUAL EQMEMB FIXP) + SEDIT::PRINT-STRING (IGREATERP ILESSP) REBREAK (EQUAL) CL:READ-CHAR-NO-HANG (READP EOFP) +\FM.3STATE-SETUP (EQUAL) \PROCESS.MOVEFRAME (EVENP) \FTP.UNREGISTER (FMEMB) WHO-LINE-SAVE-VMEM (MENU) +COURIER.WRITE.FAT.STRING (ODDP) TB.DO.ITEM.SELECTION (INSIDEP LASTMOUSESTATE GREATERP > < >= <= +TB.CONTIGUOUS.SELP) CL::VALUES-UFN (FIXP SMALLP GREATERP >= IGREATERP <= IGEQ) XCL::SETF-PACKAGE-PREFIX + (CL:SYMBOLP CL:STRINGP) CL:READ-LINE (\EOFP) CL::VALUES-LIST-UFN (FIXP SMALLP >= IGREATERP <=) +\LEAF.OPENFILE (IGREATERP) \OPENFILE (\IOMODEP) EDITMV (MEMB TAILP) CL:REM (CL:INTEGERP CL:FLOATP) +\SPP.HANDLE.ATTN (MEMB APPLY*) \CLEARSYSBUF (TTY.PROCESSP) \IOMODEP (FMEMB) +\TEDIT.UNPARSE.CHARLOOKS.LIST (IGEQ IGREATERP ILESSP) FIXAPPLY (LITATOM DWIMUNSAVEDEF WTFIXLOADEF +STRPOSL SOME) SCANBACK (COMPLEXCHARP) PRETTY-TYPE-NAME (SOME EQUAL CL:SYMBOLP) \WAIT.FOR.TTY ( +TTY.PROCESSP) \ENQUEUE.TIMER (ILEQ) CLOSEPUPSOCKET (FMEMB) CL:RENAME-FILE (STREAMP OPENP) CHARSET (>= +<) ICMLARRAY.GETMENUWGROUP (GREATERP) WAIT.FOR.TTY (TIMEREXPIRED?) CL:SIGNUM (CL:ZEROP) WHO-LINE-VMEM +(EQP) CL:SCALE-FLOAT (=) CHANGECALLERS (EQMEMB FMEMB ADDTOFILE DELFROMFILES) PRINT10TO3 (MEMB) +SI::%%STRUCTURE-DECLARE-DATATYPE (CL:SYMBOLP SMALLPOSP SMALLP) \NSYSBUFCHARS (IGREATERP) +\COURIER.RECORDTRAN (\COURIER.QUALIFIED.NAMEP) SEDIT::SCAN-FOR-BOUNDS (FIXP) \TYPEGLOBALVARIABLE ( +FMEMB GETPROP) \SAVESYSBUF (TTY.PROCESSP IGREATERP GREATERP) \RTP.HANDLE.PUP (\RTP.FILTER) +OPT.SKIPPUSH (ILESSP ZEROP IGEQ COMP.CLEANFNOP) \ASSIGNDATATYPE1 (EQUAL IGREATERP IGEQ) +EDITMOVESUBTREE (LASTMOUSESTATE ZEROP) \COS.OLD (FGEQ FLESSP FLEQ FGREATERP) +COURIER.WRITE.SEQUENCE.UNSPECIFIED (LITATOM FIXP) HARDCOPYW (WINDOWP BITMAPP) \SYSBUFP (TTY.PROCESSP) +BESTNSADDRESS (GREATERP IGEQ ILESSP ILEQ IGREATERP) \PEEKSYSBUF (\SYSBUFP TTY.PROCESSP) ADDTOFILES? ( +LITATOM SOME UNDONLSETQ) \PROCESS.INIT (CCODEP) CL::%%SIMPLE-TREE-EQUAL (CL:CONSP) \DSPOPERATION.IP ( +FMEMB) \ENQUEUE (GREATERP) ORDERFROMBOTTOMTOTOP (FMEMB) %%DESTRUCTIVE-RESULT-VECTOR ( +CL:ARRAY-HAS-FILL-POINTER-P) MOUSECHORDWAIT (IGREATERP) CL:SQRT (=) \PROCESS.EVENTFN (ALIVEPROCP +DEADPROCP) REMPROP (LITATOM) FIXSPELL2 (STRINGP) \REVALIDATEFILE (EQUAL) CL::%%COMPLEX-TREE-EQUAL ( +CL:CONSP) PUTPROP (LITATOM) \HANDLE.RAW.10TO3 (EQNSADDRESS.HOST >= MEMB) FIXLAMBDA (LITATOM FMEMB) +\DRAWCURVE.PRESS (EVERY \DRAWCURVE.PRESS.LINE) SETF-MACRO-FUNCTION (GETD) MOVEATTACHEDWINDOWTOPLACE ( +OPENWP) \LEAF.READPAGES (.PAGE.IS.AFTER.EOF. IGEQ IEQP GREATERP READABLE <) DELETE.LONG.SEGMENT1 ( +ILESSP) COMPILER::COMPILE-FILE-SETF-SYMBOL-FUNCTION (CL:CONSTANTP CL:SYMBOLP COMPILER::FUNCTION-P) +\FM.TOGGLE-SELECTEDFN (\FM.ITEMPROP) \RECLAIMARRAYBLOCK (< IEQ \RECLAIMCODEBLOCK) FB.DISPLAY.COUNTERS +(IGREATERP) CL:SINH (CL:COMPLEXP) PRINTBITMAP (LITATOM) COMP.DECLARE (FMEMB) TOPW.BUTTONEVENTFN ( +MOUSESTATE) PFI.VARNAME (LITATOM FMEMB) CL:ENDP (CL:CONSP) \CAR.UFN (ZEROP LITATOM STRINGP) +CHECKSYNONYM (EQUAL MSWORD?) \TEDIT.GET.CHARLOOKS (ZEROP IGREATERP) CREATEHASHFILE (NUMBERP GREATERP) +\CDR.UFN (ZEROP IGREATERP LITATOM STRINGP) \LFDirectorySearch (\EOFP CL:ZEROP ILEQ EQL IGEQ) +FORGETPAGES (IGEQ ILEQ BUFFERINUSEP) \LFFindDirHole (\EOFP CL:ZEROP ILEQ IGEQ) FILEPKGTYPE (GREATERP) +RESTOREMAP (BUFFERINUSEP) CL:STRING-LESSP (< CL:CHAR-LESSP) TWODINSPECT.REPAINTFN (ILESSP IGREATERP) +\DELETECH (IEQP IGEQ ZEROP ILEQ IGREATERP ATOM ILESSP) SEDIT::STRUCTURE-FROM-STRING (CL:STRINGP) +CL:STRING-GREATERP (> CL:CHAR-GREATERP) \PAGED.REVALIDATEFILE (EQUAL) ICMLARRAY.GETREGIONFN (IGREATERP +) \FM.TOGGLE-DOWNFN (OPENWP) CL::%%TAN-FLOAT (UFGEQ UFGREATERP UFLESSP) +\KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS (EQUAL) \UNWIND.UFN (GREATERP) PFI.PRINT.BITMAP (IMAGESTREAMP +DISPLAYSTREAMP < > GREATERP PNAMESTREAMP) SEDIT::ADD-MENU (WINDOWPROP) TEDIT.NEXT (IGREATERP) +\CHECKAPPLY* (LITATOM TYPEP) ICMLARRAY (GREATERP ILESSP IGREATERP) MSINTERPA (FMEMB MSINTERPRETSET) +FB.CREATE.FILEBUCKET (STRINGP DIGITCHARP IGEQ STRING-EQUAL) RETDWIM (NCONC1 EXPRP ATOM STRPOSL +DWIMIFY2A RETDWIM1) \PROC.AFTER.WINDOWWORLD (TYPENAMEP) BELOWMARKER (ILESSP) CREATEMDSTYPETABLE (ZEROP + MINUSP LESSP GREATERP) CL:STRING-NOT-GREATERP (CL:CHAR-NOT-GREATERP) \PUTBASEBITS (GREATERP) +\BUFFERED.REVALIDATEFILE (EQUAL) OVERLAPPINGWINDOWS (MEMB SOME) \HTFIND (.MODENTRY. IGEQ) +\GET.COURIER.DEFINITION (\COURIER.QUALIFIED.NAMEP) SETSPELLCASE (GREATERP) CL:STRING< (< CL:CHAR<) +MOVE.TO.START.OF.WORD (AT.END.OF.LINE SELCHARQ) DINFO.LOOKUP (OBTAIN.MONITORLOCK FMEMB) +\FM.TOGGLE-SETUP (EQUAL) \BSP.PREPARE.OUTPUT (BSPOPENP IGREATERP TIMEREXPIRED? IGEQ) \BSP.FLUSHINPUT ( +\BSP.PREPARE.INPUT) CL:STRING<= (CL:CHAR<=) ADDTOFILE (FMEMB) SI::INTERNAL-THROW (SI::UNWIND-TO-BLIP +GREATERP) \TEDIT.ABBREV.EXPAND (ZEROP) \RPLACA.UFN (ZEROP) COURIER.WRITE.STRING (ODDP) +CL::%%VALID-TYPE-P (CL:CONSP CL::TYPE-EXPANDER) FONTNAME.IP (MEMB) \PFNewPages (EQL \VAMAllocPageGroup +) \RPLACD.UFN (ZEROP ILEQ IGREATERP) NSNET.DISTANCE (GREATERP) TWODINSPECT.BUTTONEVENTFN (MOUSESTATE) +TB.ITEM.FROM.YCOORD (<=) \CONS.UFN (ZEROP ILEQ IGEQ) \TRANSLATE.10TO3 (EQNSADDRESS.HOST) CL::ARRAY-TYPE + (SIMPLE-ARRAY-P CL:SIMPLE-STRING-P CL:SIMPLE-BIT-VECTOR-P CL:STRINGP CL:BIT-VECTOR-P) ShowIntervals ( +GREATERP) CL::%%SIMPLE-ASSOC (CL:SYMBOLP TYPEP CL:CHARACTERP) CLISPFOR0 (LITATOM EQUAL CLISPFOR4 +EDITFINDP NUMBERP MINUSP FIXP ILESSP) CL:STRING-NOT-LESSP (CL:CHAR-NOT-LESSP) CL::SYMBOL-TYPE ( +CL:KEYWORDP) CLISPCAR/CDR (NUMBERP ILESSP IGREATERP) TEDIT.PARALOOKS (FIXP IGREATERP ZEROP IGEQ) +CL:STRING> (> CL:CHAR>) PPROC (FMEMB) MSGETBLOCKDEC (SOME LITATOM FMEMB EQMEMB) FB.INSERT.FILE ( +EQ.DIRECTORYP NULL.DIRECTORYP) RETDWIM1 (TAILP FMEMB FIXSPELL1) CL::%%SIMPLE-MEMBER (CL:SYMBOLP TYPEP +CL:CHARACTERP) \ENDPAGE.PRESS (ODDP) \NOFILESNEXTFILEFN (IGREATERP) CLOSEW (OPENWP \OKTOCLOSEW) +TEDIT.SUBSTITUTE (STRINGP EQUAL IGREATERP ZEROP) \FINDKEY.UFN (GREATERP) FLUSHRIGHT (MINUSP ZEROP) +DINFO.FIND (OBTAIN.MONITORLOCK FMEMB) INTCHAR (FIXP \SYSTEMINTERRUPTP LITATOM) PPROC1 (DEADPROCP IGEQ) + SETINTERRUPT (\SYSTEMINTERRUPTP) NEWDEFC (GETD ARRAYP) CL:TANH (CL:COMPLEXP) GETWINDOWPROP ( +DISPLAYSTREAMP) MSINTERPRETSET (EQMEMB GETD GETP) \LOOKUPPUPNUMBER (GREATERP IEQP EQUAL TIMEREXPIRED?) + \BOUT (NUMBERP GREATERP) CL::%%TYPEP-PRED (CL:CONSP) \PRESSCURVE2 (IGREATERP GREATERP IEQP FGTP +FLESSP ILESSP) \KEYACTION1 (IEQP \CHARCODEP SMALLP SELECTQ \PUTBASEBYTE) PACKFILENAME.STRING (<= +STREQUAL EQMEMB FIXP) CL::SUBTYPEP-TYPE-EXPAND (CL:MEMBER CL:CONSP) \NOTE.10TO3 (EQNSADDRESS.HOST) +\KEYNAMETONUMBER (EQMEMB) GRAPHBUTTONEVENTFN (LASTMOUSESTATE INSIDE?) \RESTLIST.UFN (LESSP) CLISPIFY2B + (NUMBERP EQLENGTH FMEMB EQMEMB CLISPIFY2D MEMB LITATOM FGETD CLISPNOEVAL GETHASH) \BSP.SKIPBYTES ( +IGREATERP) GETINTERRUPT (\SYSTEMINTERRUPTP NUMBERP) SI::DATATYPE-P (\TYPENUMBERFROMNAME) +PFI.PASS.COMMENT (MEMB) \SIN.OLD (FGEQ FLESSP FLEQ FGREATERP) \MISCN.UFN (BOUNDP) RCOMP3 (MEMB) +SCROLLBYREPAINTFN (FLOATP IGREATERP SUBREGIONP) CL::%%APPEND (CL:ATOM) \RPLCONS (IGREATERP) +\VFMInsert1 (ILESSP) \FIXDLINES (ILESSP IGEQ ILEQ IEQP) KEYBOARDTYPE (STREQUAL) \BRUSHCONVERT.HCPYMODE + (NUMBERP) WHICHW (POSITIONP INSIDE?) NUMBERPAD.READ (HASTTYWINDOWP READP MEMBER) PPROCREPAINTFN ( +LASTMOUSESTATE ZEROP) CL:COPY-TREE (CL:CONSP) SASSOC (EQUAL) \EVAL (LITATOM NUMBERP) GETFILEINFO ( +OPENED RANDACCESSP) CL:USER-HOMEDIR-PATHNAME (MACHINETYPE CL:STRING-NOT-EQUAL) CL:COPY-ALIST (CL:CONSP +) \INSUREWINDOW (DISPLAYSTREAMP) FIND.PROCESS (LITATOM STRINGP) CL:SUBTYPEP (CL:EQUAL) +CL::COMPLETE-META-EXPRESSION-DEFAULTS (CL:LISTP) CL:NRECONC (CL:CONSP) WTFIXLOADEF (ATOM STRINGP +FIXSPELL1) WHO-LINE-REDISPLAY-INTERRUPT (BOUNDP) \DOINTERRUPTHERE (LITATOM) \DRAWCURVE.PRESS.LINE (EQP + ILESSP) SET-CONNECTED-DIRECTORY-INTERACTIVELY (SHIFTDOWNP STRING-EQUAL) CL:REVAPPEND (CL:CONSP) +CL:STRING>= (CL:CHAR>=) \CANONICALIZE.NSADDRESS (EQNSADDRESS.HOST) \STKSCAN (EQP GREATERP) PUTDEFN ( +FMEMB) \ILLEGAL.DEVICEOP (GREATERP) CL:NBUTLAST (<) \MAIKO.IO-INTERRUPT (ZEROP) +TWODINSPECT.COPYBUTTONFN (.COPYKEYDOWNP.) CL:TRUENAME (STREAMP XCL:SYNONYM-STREAM-P) CL:BUTLAST (< <=) + MSNEXTWORD (SOME CHECKSYNONYM FMEMB) CL::EQUAL-DIMENSIONS (CL:EQUAL) CL::RANGE<= (CL:CONSP <= <) +OPT.FRAMEVAR (LESSP ZEROP NOTANY APPLY*) \UNBOXFLOAT3 (GREATERP) CL::BASE-SUBTYPEP (CL:CONSP CL:EQUAL +CL:MEMBER) COMP.COND (COMP.PREDP EVERY) RESHAPEBYREPAINTFN (IGREATERP \INBETWEENP ILESSP) +COMPILER::COMPILE-AND-DUMP (CL:SYMBOLP) \INBETWEENP (GEQ) CONTROL-T (HASTTYWINDOWP OPENWP STACKP +XCL::INTERESTING-FRAME-P) TEDIT.INSERT (FIXP LITATOM STRINGP ZEROP IGREATERP) DINFO.ADD.FMENU (FMEMB) +\LFMakeDirHole (ILEQ \LFExtendFile GREATERP) \SELECTPROCESS (FMEMB) CL::USEFUL-TYPE-EXPANSION-P ( +CL:CONSP) MB.NWAYBUTTON.SELFN (INSIDE?) \TEXTCLOSEF-SUBTREE (ATOM) EQL (CL:NUMBERP TYPEP CL:FLOATP +CL:INTEGERP) \HANDLE.NS.ROUTING.INFO (>= TYPENAMEP <= <) \PRINDATUM (SMALLP ILESSP IGREATERP +PNAMESTREAMP STRINGP TYPENAMEP) ICONW.PRINT-JUSTIFIED (EQMEMB IGREATERP GREATERP FMEMB) \DRAWLINE.UFN +(IGEQ GREATERP IGREATERP) PROCESS.STATUS.WINDOW (WINDOWP > FMEMB) FETCHFIELD (IGREATERP) +MSPATHSPRINTFN (MSMEMBSET) \PROCESS.MAKEFRAME (ILESSP) UPDATEFILES (FMEMB MEMBER) \PARAS.IN.SEL (ZEROP +) MB.NB.PACKITEMS (ILESSP IGEQ) OPT.FRAMEDEL (SOME OASSOC OPT.DELETEFRAMECHECK ZEROP) SHADEITEM ( +\MENUSUBITEMS) \NSFILING.GETFILE (\NSFILING.CONFLICTP EQUAL) GETDESCRIPTORS (LITATOM) PRESSBITMAP ( +EQUAL ILESSP) SPAWN.MOUSE (GREATERP) \CURVE2 (LITATOM FMEMB GREATERP IGEQ ZEROP ILEQ) \GETCHARCODE ( +NUMBERP \CHARCODEP SMALLP LITATOM) \ARG0 (IGREATERP) FIND.SYMBOL (EQL) MASTERSCOPEXEC (LITATOM STRPOSL + FGETD) PARAMETRICSPLINE (GREATERP IGEQ LESSP) TWODINSPECT.DEFAULT.VALUECOMMANDFN (NUMBERP) +\FILINGSESSION.DEFPRINT (TYPENAMEP) \NSPRINT.FULL.REQUEST.STATUS (STREQUAL) AWAIT.EVENT (TYPENAMEP) +\DRAWPOLYGON.IP (NUMBERP IGEQ IGREATERP \CLIPCURVELINE.IP) \FTP.CLEANUP (TIMEREXPIRED? FIXP) +\FM.CLEARITEM (OPENWP) CL::%%SIN-FLOAT (UFGREATERP UFGEQ UFLESSP) MONITOR.AWAIT.EVENT (TYPENAMEP) +\TEDIT.SUBST.FN2 (IGREATERP LITATOM) SKOR0 (ILESSP NUMBERP) BCOMPL2 (RECOMP? NOTANY EXPRP MEMB) +\PRINT-USING-ADDRESS (IGREATERP) ADDMENU (WINDOWP SUBREGIONP) OPT.CLEANFRAME (OPT.CLEANFRAME) +\LEAF.REOPENFILE (IEQP) \TEDIT.PACK.TARGETLIST (MEMBER STRINGP) FB.EDITCOMMAND (DIRECTORYNAMEP GETD) +EDITMOVEREGION (WINDOWP) WHO-LINE-CURRENT-DIRECTORY (CL:MEMBER) COMPILE-IN-CORE (BOUNDP STREAMP OPENP) + COMPILER::ALPHA-IL-FUNCTION (CL:SYMBOLP COMPILER:ENV-FBOUNDP) MSPATHS4 (MSPATHS2) RESET.INTERRUPTS ( +CHARCODEP) DINFO.SHOWGRAPH (GEQ) CL:COPY-LIST (CL:CONSP) WHO-LINE-COPY-INSERT (IMAGEOBJP WINDOWP +WINDOWPROP) \TEDIT.DELETE (IGREATERP IGEQ ZEROP ILESSP) COMP.GENFN (IGEQ) RIGHTW.BUTTONEVENTFN ( +MOUSESTATE) FIND.PACKAGE (STREQUAL) \PSWOP.SELECTED (FMEMB MOUSECONFIRM TIMEREXPIRED?) DISPLAYLINK ( +IGREATERP) CL::%%COMPLEX-SUBLIS (CL:ATOM) MAKE-UNICODE-TRANSLATION-TABLES (IGEQ GREATERP ILEQ +IGREATERP) \GCRECLAIMCELL (ILEQ CL:FUNCALL) MSVERBED (EQUAL) TWODINSPECT.DEFAULT.TITLECOMMANDFN ( +MOUSESTATE) CL::%%SIMPLE-SUBLIS (CL:ATOM) \GCSCAN1 (ILEQ) COMPILER::MAKE-LAP-VAR (COMPILER::VARIABLE-P +) FB.MAKE.BROWSER.BUSY (OBTAIN.MONITORLOCK) \GCSCAN2 (ILEQ) COMPILE.FILE.RESET (OPENP) +CL::%%COMPLEX-ASSOC (CL::%%EQCODEP) CHARCODEP (SMALLP IGEQ) CL::\OPENSTREAM-WITH-DEFAULT (CL:PATHNAMEP + CL:PATHNAME-HOST FILENAMEFIELD) FB.GREATEST.PREFIX (STRPOS) XCL::INTERESTING-FRAME-P (STACKP CL:SYMBOLP +) TB.RESHAPEFN (OBTAIN.MONITORLOCK) %%AREF1 (>= <) COERCETOBITMAP (LITATOM REGIONP WINDOWP) %%ASET1 ( +>= <) \CONTROL-T.PRINTRATIO (IGREATERP ILESSP) OPT.FRAMELOCAL (OASSOC OPT.CLEANFRAME FMEMB) +\LEAF.EVENTFN (FDEVOP) INSERTHASHKEY (GREATERP) COMPILER::CONSTANT-EXPRESSION-P (CL:CONSP) CL::%%EQCODEP + (TYPEP) \FM.INSUREVISIBLE (SUBREGIONP) \ATOMCELL (FIXP) \GETBASEBYTE (EVENP) CL::%%COMPLEX-MEMBER ( +CL::%%EQCODEP) \NSFILING.GENERATEFILES (STREQUAL EQUAL STREAMP EQMEMB) \BLT (GREATERP LESSP) +CLISPCAR/CDR2 (ZEROP) \PUTBASEBYTE (SMALLPOSP SMALLP ILESSP EVENP) OPENRTPSOCKET (FIXP EQMEMB) +\HLSVALUEFN (ILESSP) \HANDLE.RAW.3TO10 (>= MEMB) WFROMMENU (MEMB) PRINTROUTINGTABLE (GREATERP FIXP +TIMEREXPIRED?) EDITFA (EXPRP SUBRP) \PUTBASE.UFN (SMALLPOSP SMALLP) DIRECTORYNAME (CL:PATHNAMEP) +ADDSPELL1 (IGREATERP) EDITDEF.FNS (EXPRP LITATOM EDITFB) ADDTOVAR (EQUAL) LOOKUP-SYMBOL (EQL LOCAL) +KEYNUMBERP (SMALLP IGEQ ILESSP) \PUTBITS.UFN (SMALLPOSP SMALLP) XIPAPPEND.STRING (ILESSP) +PROCESS.BACKTRACE (WINDOWP ILESSP) CLIPBOARD-COPY-STREAM (STRPOS) TWODINSPECT.COLUMNWIDTH (GREATERP) +OPT.MERGEFRAMEP (FMEMB OASSOC OPT.CLEANFRAME) UNMAKEHARDCOPYMODESTREAM (WINDOWP FMEMB) \ADDBASE (ILEQ +TYPENAMEP CL:INTEGERP IGREATERP) PREEDITFN (EQMEMB) MSMATCHRATING (EQUAL MSSIMPLESET) \FM.ENDEDIT ( +FM.EDITP PROCESSPROP) \VAG2 (SMALLPOSP SMALLP ILESSP) FB.EXPUNGECOMMAND (DELFILE) \TEDIT.FOREIGN.COPY? + (TEXTPROP ZEROP IGREATERP GREATERP FIXP) MSPATHS1 (NUMBERP MINUSP MSPATHS2 SOME) \SLOWPLUS2 (FLOATP +FIXP) BAKTRACE (EQP) MAKE-VECTOR (< >=) \SLOWDIFFERENCE (FLOATP FIXP) COMPILER::ALPHA-FUNCTIONAL-FORM +(CL:CONSP CL:SYMBOLP) CREATETEXTUREFROMBITMAP (GREATERP ILESSP ZEROP MINUSP LESSP) EDITFERROR (HASDEF +BOUNDP STRINGP \DEFINEDP GETD) \SLOWTIMES2 (FLOATP FIXP) MOUSECONFIRM (WINDOWP MOUSESTATE) UNION ( +LITATOM FMEMB MEMBER) METASHIFT (IGREATERP EQUAL) ATAN (FGEQ) \SLOWQUOTIENT (FLOATP FIXP) CL:ELT (<) +RESHAPEALLWINDOWS (EQP) \TEDIT.FIND.WC1 (STRINGP LITATOM MEMBER EQUAL) \SLOWIPLUS2 (ILEQ TYPENAMEP +CL:INTEGERP) DINFO.HISTORIC.UPDATE (OBTAIN.MONITORLOCK) GETPROMPTWINDOW (STRINGP OPENWP IGREATERP) +EDITF (HASDEF) CHAT.CLOSE.CONNECTION (OPENP) \SLOWIDIFFERENCE (ILEQ TYPENAMEP CL:INTEGERP ZEROP) +ATTACHEDWINDOWS (FMEMB) \FM.CHANGESTATE (ASSOC) MB.NB.SIZEFN (IGEQ ILEQ GREATERP IEQP) \SLOWITIMES2 ( +ILEQ TYPENAMEP CL:INTEGERP IGREATERP EQUAL ODDP ZEROP IGEQ) OLD.FIND.SYMBOL (GREATERP IGREATERP ILEQ +IGEQ) UNTRACE (CL:EQUAL CL:CONSP) \SLOWIQUOTIENT (ILEQ TYPENAMEP CL:INTEGERP IGREATERP ILESSP IGEQ) +MSPATHS2 (MSMEMBSET MSPATHS2 GETD) DIRECTORYNAMEP (FDEVOP) BRKDWN1 (IGREATERP GREATERP) CL:MAKE-LIST ( +<) TEDIT.DELETE (FIXP) IREMAINDER (ILEQ TYPENAMEP CL:INTEGERP IGREATERP ILESSP IGEQ) OPT.FRAMEMERGE ( +OPT.MERGEFRAMEP IGREATERP ZEROP MINUSP) HOSTNAMEP (LITATOM STRINGP MEMB FDEVOP) +\TEDIT.MARK.LINES.DIRTY (IEQP ILEQ IGEQ) BMOBJ.DISPLAYFN (GREATERP LEQ) \FTP.RENAMEFILE (STRING-EQUAL +SELECTC \FTP.HANDLE.NO BSPOPENP \FTP.FLUSH.TO.EOC \FTPERROR) \MAIKO.10MBWATCHER (ILESSP) +XIPAPPEND.WORD (IGREATERP) TWODINSPECT.ROWPROPWIDTH (GREATERP) APPENDTOVAR (EQUAL) OPT.NONILVAR ( +SELECTQ COMP.CLEANFNOP) \SLOWLLSH1 (ILEQ TYPENAMEP CL:INTEGERP IGREATERP) DIRECTORY (FNTYP FMEMB +NUMBERP STRINGP FIXSPELL EQL DIRECTORY.NEXTFILE) SUBATOM (LITATOM IGREATERP ILEQ) UNSAVEBLOCK? (FMEMB +EXPRP) MARKASCHANGED (EQUAL) \SLOWLLSH8 (ILEQ TYPENAMEP CL:INTEGERP) \SPP.HANDLE.INPUT (SEQ.GREATERP +IGREATERP SEQ.GEQ) CHCON1 (STRINGP LITATOM) UnixPrint (STRPOS) \SLOWLRSH1 (ILEQ TYPENAMEP CL:INTEGERP) + UNPACKFILENAME.STRING (TYPEP STREAMP EQMEMB STREQUAL > GREATERP DIGITCHARP IGEQ) MENUWINDOW (NUMBERP) + CL:NTHCDR (<) MSNEEDUNSAVE (EXPRP FMEMB) EDITDEFAULT1 (STRINGP) CLISPATOM2D (NUMBERP) \SLOWLRSH8 ( +ILEQ TYPENAMEP CL:INTEGERP) \BACKPEEKBIN (\BACKFILEPTR) DECODE-NS-STRING (<) CL:PAIRLIS (CL:ENDP EQL) +\VFMKillBuffer (\VFMCorrectBufferP) \SLOWLOGOR2 (ILEQ TYPENAMEP CL:INTEGERP) PRINTBINDINGS (REALFRAMEP +) \BACKBIN (\BACKFILEPTR) WINDOWADDFNPROP (FMEMB) PUPNET.DISTANCE (GREATERP) RETDWIM3 (ILESSP +IGREATERP) EDIT* (MINUSP) ADD/AND/DISPLAY/LINK (MEMBTONODES) \SLOWLOGAND2 (ILEQ TYPENAMEP CL:INTEGERP) + COMPILE-FILE-SETF-SYMBOL-FUNCTION (FMEMB CL:CONSP) COMPILER::ALPHA-FUNCTION (CL:SYMBOLP) %%SETELT (<) + EDITDEFAULT (FMEMB U-CASEP FNTYP GLC SELECTQ NUMBERP EDITSMASH ATOM) \DRAWARC.GENERIC (GREATERP LESSP +) \SLOWLOGXOR2 (ILEQ TYPENAMEP CL:INTEGERP) LDIFFERENCE (MEMBER) CL::%%SET-NTH (<) CL::%%SQRT-FLOAT ( +<=) EDLOC (NLSETQ EQUAL) ONEDINSPECT.PROPWIDTH (GREATERP) LSH (ILEQ IGREATERP) BOUT (NUMBERP GREATERP) + \BSP.CLEANUP.INPUT (IGREATERP) EDOR (ERSETQ) COMP.APPLYFNP (FMEMB) DSUBST (EQUAL) SYMBOL.PNAME ( +GREATERP) TTYIN.PRINTARGS (READTABLEPROP CL:CHARACTERP CL:KEYWORDP) CL::TYPE-EXPANDER (CL:SYMBOLP +SI::DATATYPE-P CL:FBOUNDP) DWIM-SYMBOL-PACKAGE (LITATOM CL:KEYWORDP BOUNDP CL:FBOUNDP FIXSPELL1) +EDITRAN (ATOM MEMB TAILP) ADDTOCOMS (LITATOM ADDTOCOM) \VFMGet (GREATERP EQL \VFMLower) %%EXTEND-ARRAY + (%%TWOD-ARRAY-P) FB.MAYBE.INSERT.FILE (DIRECTORY.MATCH GEQ STRING-EQUAL NULL.VERSIONP = SELECTQ) +EDITTO (NUMBERP IGREATERP) ONEDINSPECT.REPAINTFN (ILESSP) EXEC-FORMAT (CL:STRINGP) +%%ARRAY-CONTENT-INITIALIZE (%%CHECK-SEQUENCE-DIMENSIONS) REMWINDOWPROP (DISPLAYSTREAMP) +\NSFILING.PARSE.FILENAME (<= GEQ >) SAVESET (LITATOM TAILP) RECORDACCESS (RECDEC?) +COMPILE.FILE.DEFINEQ (FMEMB) COPYBYTES (EQUAL RANDACCESSP ILESSP \EOFP) CL::%%LIST-MAP-OPTIMIZER ( +CL:CONSTANTP CL:CONSP) CHANGEPROP (LITATOM) EDITCOM (NUMBERP ATOM) FIND.START.OF.WORD (WORDSEPRP +IGREATERP COMPLEXCHARP) \VFMGetInterval (LESSP) CL:ADJUST-ARRAY (EXTENDABLE-ARRAY-P CL:LISTP +CL:ADJUSTABLE-ARRAY-P >= EQUAL CL:ARRAY-HAS-FILL-POINTER-P > <= <) \MAP.ROUTING.TABLE (GREATERP) +\COURIER.PUTDEF (EQUAL) DEFAULT.EDITDEF (CL:ENDP CL:Y-OR-N-P) UNSAVEFNS (HASDEF FGETD FMEMB) EDRPT ( +IGREATERP NLSETQ) CLISPCAR/CDR1 (ZEROP IGREATERP) \RTP.HANDLE.INPUT (TIMEREXPIRED?) +\BUFFERED.COPYBYTES (IGREATERP FDEVOP) WRITE-UNICODE-INCLUDED (GREATERP) INSPECT/AS/RECORD (FMEMB) +EDUP (TAILP) \TEDIT.WINDOW.OPS (MOUSESTATE INSIDE?) GETLIS (LITATOM FMEMB) CL:FILL-POINTER ( +%%ONED-ARRAY-P %%GENERAL-ARRAY-P) FB.PRINTFN (< FIXP) %%ASET2 (%%TWOD-ARRAY-P <) CLISPLOOKUP (FLOATP) +TRACE (CL:CONSP) %%AREF2 (%%TWOD-ARRAY-P <) OPT.FRAMEOPT (OPT.FRAMELOCAL OPT.FRAMEVAR OPT.FRAMEMERGE +OPT.FRAMEDEL) \DEL.PACKET.FILTER (FMEMB) \SLOWIGREATERP (ILEQ TYPENAMEP CL:INTEGERP) \GETSTREAM ( +LITATOM) ATTACHMENU (OPENWP) \LEAF.DIRECTORYNAMEP (UNPACKFILENAME.STRING CL:MEMBER \LEAF.GETFILE) +EDITCOMA (LITATOM EVALV TAILP LISPXREADP) CLISPATOM2C (LITATOM GETPROP CLISPFUNCTION?) \SLOWFGREATERP +(FLOATP SMALLPOSP SMALLP ILEQ) COPYCHARS (\EOFP LESSP ILEQ) ARCTAN (FLESSP FGREATERP) CURSORPROP ( +IGREATERP) SAMECLOOKS (SELECTQ EQUAL ERROR) GREATERP (FIXP) EXTENDABLE-ARRAY-P (STRINGP) EQUAL ( +LITATOM NUMBERP GREATERP LESSP ILESSP STRINGP) PRETTYFILEINDEX (TYPENAMEP DISPLAYSTREAMP FIXP) +INTERSECTION (LITATOM FMEMB MEMBER) EDITSAVE (FMEMB NUMBERP) \BOXIPLUS (ILEQ TYPENAMEP CL:INTEGERP +IGREATERP) LISTFILES (LISTFILES1) ARCTAN2 (FLESSP) GETHASHKEY (SELCHARQ EQUAL) UNDOEDITCOM (PRIN1 +NUMBERP) \BOXIDIFFERENCE (ILEQ TYPENAMEP CL:INTEGERP IGREATERP) XIPAPPEND.BYTE (IGEQ) +MBUTTON.FIND.NEXT.FIELD (IGREATERP) \BSP.PREPARE.INPUT (IGREATERP BSPOPENP TIMEREXPIRED? IGEQ) +\FM.HIGHLIGHTITEM (OPENWP) \COPYOPENFILE (STKPOS) SEDIT::UNDO-LIST-REPLACE (SEDIT::DEAD-NODE?) +CL:REPLACE (<) EDITSMASH1 (FMEMB) OPENSTREAM (TYPEP) KWOTE (NUMBERP) ATTACHWINDOW (MEMB OPENWP) +\CHANGE-VISIBLE-REGION.IP (>=) ONEDINSPECT.BUTTONEVENTFN (MOUSESTATE) INSURE.WINDOW (DISPLAYSTREAMP) +\CURVEEND (GREATERP IGEQ IGREATERP FMEMB ILEQ) LSUBST (EQUAL) COMPILER::ALPHA-EVAL-WHEN (CL:MEMBER) +\CREATEPIECEORSTREAM (STRINGP ATOM STREAMP) SEDIT::COMMENT-LENGTH (GREATERP) IDLE.BITMAP (WINDOWP +STRINGP LITATOM) TEDIT.PROMPTPRINT (TEXTPROP WINDOWP) CLOSEF (\OUTTERMP) IPLUS (ILEQ) \PFFindPageAddr +(FIXP ILESSP IGEQ ZEROP) EDIT2F (IGREATERP TAILP) ARRAY-NEEDS-INDIRECTION-P (%%ONED-ARRAY-P +%%TWOD-ARRAY-P %%GENERAL-ARRAY-P) EDIT4F1 (IGREATERP ZEROP EDIT4F1) CL:ARRAY-DIMENSION (%%ONED-ARRAY-P + %%TWOD-ARRAY-P %%GENERAL-ARRAY-P <) MEMBER (LITATOM EQUAL) PLUS (FIXP FLOATP) CL::%%LOG-FLOAT (<=) +FB.UPDATECOMMAND (FB.MAYBE.EXPUNGE) \MAIKO.10MBSENDPACKET (EQNSADDRESS.HOST) XIPAPPEND.CELL (IGREATERP +) DIRFILENAME (U-CASEP) BITSPERPIXEL (ARRAYP) FB.REMOVE.FILE (NULL.DIRECTORYP EQ.DIRECTORYP) EDIT1F ( +IGREATERP) COMP.BOOL (COMP.PREDP) ONEDINSPECT.COPYBUTTONFN (.COPYKEYDOWNP.) EDITCOML (NUMBERP ATOM +EDIT4E) EDITFPAT1 (LITATOM STRINGP IGREATERP) COPYFILE (DIRECTORYNAMEP) SEDIT::OUTPUT-SPACE (SMALLP +GREATERP) \CLEAR.ROUTING.TABLE (GREATERP) \FM.DISPLAYITEM (OPENWP) EDITBELOW (MINUSP ZEROP TAILP) +DEBUGGER (IMAGESTREAMP TYPEP FMEMB) GET-TWOD-DISPLAYW (WINDOWP) EQUAL-DIMENSIONS-P (%%ONED-ARRAY-P +%%TWOD-ARRAY-P %%GENERAL-ARRAY-P) BMOBJ.IMAGEBOXFN (GREATERP LEQ) LOGAND (ILEQ) HISTORYFIND1 (ATOM +APPLY* EDIT4E HISTORYMATCH FMEMB) TEDIT.PUT.PCTB (IGREATERP EQFMTSPEC ZEROP EQCLOOKS IEQP GREATERP +RANDACCESSP) \BIGNUM.LOGAND (INFINITEP LESSP) TEDIT.DO.BLUEPENDINGDELETE (ZEROP) EDIT4F3 (STRINGP) +ENTER-DEBUGGER-P (TYPEP FIXP IGREATERP) LOGOR (ILEQ) \HCPYMODEDSPPRINTCHAR (IGREATERP ILESSP) BPNT ( +ZEROP NUMBERP MINUSP) \BIGNUM.LOGOR (INFINITEP GREATERP) MSRESPELL (LITATOM) CURSORCREATE (POSITIONP +IGREATERP) COPYDEF (LITATOM) CREATEMENUEDWINDOW (FMEMB REGIONP) \UFStoOtherCopyMess (EQUAL) +FB.FINISH.COMMAND (OPENWP) LOGXOR (ILEQ) CHANGEVAR (FMEMB) EDITBF1 (IGREATERP EDIT4E EDITBF1) +CLISPBROADSCOPE (GETP ZEROP) MSSEEK-WORD (MSWORD?) STKPOS (IGREATERP ILEQ) \BIGNUM.LOGXOR (INFINITEP +LESSP) \VFMReadNext (ILESSP) \CURSORUP (ILEQ) \COMPUTE.ARC.POINTS (GREATERP ZEROP MINUSP LESSP FGTP) +SET-READTABLE-INTERACTIVELY (READTABLEP) UNCOPYATOM (READSYS.HAS.PACKAGES) \INFER.FILE.TYPE ( +RANDACCESSP IGREATERP) FIND1STPRIME (ILESSP ZEROP) ITIMES (ILEQ) \NSFILING.CONFLICTP (STRING-EQUAL) +FB.COPY/RENAME.MANY (STRPOS EQ.DIRECTORYP) MAKEFILE1 (FILEFNSLST MEMB) \CURSOR-VALID-P (CURSORP >= <=) + NOTEVERY (EVERY) TIMES (FIXP FLOATP) PRINTCONSTANT (STRPOS) TEDIT.SUBLOOKS (SAMECLOOKS) NOTANY (SOME) + DEFAULTMAKENEWCOM (FMEMB SAVESET) COMP.PICOUNT (LITATOM COMP.CLEANEXPP) EDITNTH (NUMBERP ZEROP MINUSP +) \BIGNUM.QUOTIENT (INFINITEP IGREATERP) SEDIT::BACKSPACE-COMMENT (IGREATERP) LISPXFIND0 (TAILP) +\RTP.ACTION (ILESSP IGREATERP TIMEREXPIRED?) \SETUPGETCH (ATOM IGREATERP) QUOTIENT (FIXP FLOATP) +TEDIT.SELECTED.PIECES (ZEROP IGEQ ILEQ ILESSP) ADJUSTCURSORPOSITION (POSITIONP IGREATERP) EDIT.BI ( +TAILP) MSWORD? (LITATOM) \LOCATE.PUPNET (EQL <) FIND.LINE (OVERFLOWLINE? BUFTAILP) NU\TOTOPWDS (FMEMB) + PFI.COMPUTE.INDEX.SHAPE (< STRINGP GREATERP) \CURSORPOSITION (IGEQ IGREATERP ILESSP) EDITSMASH ( +GETHASH) COMPILER::ALPHA-COMPILER-LET (CL:CONSP) COMPILER::ALPHA-COMBINATION (CL:CONSP CL:SYMBOLP +COMPILER:ENV-FBOUNDP CL:MEMBER) \PUTBASEFIXP.UFN (IGEQ) CLIPBOARD-PASTE-STREAM (STRPOS) \TAN-FLOAT (< +>) CHAT.BIN (\SYSBUFP) RPT (IGREATERP) \FLUSH.OPEN.STREAMS (DIRTYABLE) EQDEFP (TYPEP GREATERP) UNBREAK + (CL:EQUAL CL:CONSP) CL::%%EVERY-MAP-OPTIMIZER (CL:CONSTANTP CL:CONSP) FRPTQ (IGREATERP) +\PFRemoveDirectoryID (\PFGetRootDirectory ILEQ) COMP.CPI1 (IGREATERP LITATOM) \BIGNUM.REMAINDER ( +INFINITEP) MSPATHS (MSMEMBSET) RPTQ (IGREATERP) CHANGEI.S. (GETD U-CASEP) \BIGNUM.LSH (INFINITEP +IGREATERP IGEQ >= <=) BREAK-FUNCTION (CL:CONSP UNSAFE.TO.MODIFY SI::HAS-CALLS) CURSORPOSITION ( +IGREATERP) ONEDINSPECT.DEFAULT.VALUECOMMANDFN (NUMBERP) \FM.EDIT-GETPOINTERINFO (GREATERP IGREATERP) +GTHASHFILE (HASHFILEP LITATOM) \RSH (IGREATERP ILEQ TYPENAMEP CL:INTEGERP) GETLOCALDEC (FMEMB) +\SPP.NOT.RESPONDING (>= \CLOCKGREATERP) SAVEDEF1 (EXPRP) INTERLISP-NLAMBDA-FUNCTION-P (LITATOM FMEMB +CL:SPECIAL-FORM-P) DEFMACRO-ARG-TEST (ZEROP =) COPYATOM (CL:STRING= GREATERP) MAKEHARDCOPYMODESTREAM ( +WINDOWP) \CHTOPCNO (IEQP IGREATERP ILESSP) EDITGETD (LITATOM GETPROP) COPY-ARRAY (EQUAL-DIMENSIONS-P) +\TEDIT.INSERT.PIECES (IGREATERP IEQP ZEROP IGEQ OPENP) \TEDIT.CLOSEUPLINES (ILEQ ILESSP IGEQ) +TWODINSPECT.SELECTCOLUMNPROP (EQUAL) \CHANGECHARSET.HDCPYDISPLAY (EQP GREATERP) +\TEDIT.PARSE.SEARCHSTRING (MEMBER EQUAL) ZEROP (FLOATP) \LEAF.LOOKUPCACHE (IEQP IGREATERP) CLISPIFYFNS + (GETPROP IGREATERP) COPY-VECTOR (<=) SELECTC (FMEMB) CLISPATOM2A (FMEMB BOUNDP STKSCAN GETPROP +LITATOM DWIMIFY2) GCD (MINUSP) \VFMLower (GEQ EQL) \TEDIT.SUBST.FN1 (IGEQ) \OPENLEAFCONNECTION (MEMB +SELECTC) \NSRANDOM.CREATE.STREAM (SHOULDNT EQUAL) CL:BIT-NOT (BIT-ARRAY-P EQUAL-DIMENSIONS-P) +SI::ADVISE-CONTENTS (CL:SYMBOLP = CL:MEMBER) DINFO (REGIONP) \NSFILING.OPEN.HANDLE (TYPENAMEP) STRMEMB + (GNC) \OUTCHARFN.PRESS (IGEQ ILEQ) /SETSYNTAX (NUMBERP) SET-PACKAGE-INTERACTIVELY (SHIFTDOWNP) +SIMPLE-COMPARE (>) \TFBRAVO.PARSE.PROFILE.PARA (IGEQ) CURSORHOTSPOT (POSITIONP) \SIN-FLOAT (> <) +GETMOUSESTATE (IGREATERP) \PFFindDirectoryID (\PFGetRootDirectory) %%GET-CANONICAL-CML-TYPE (CL:CONSP) + HASHFILEP (LITATOM) \ROUTE.XIP (EQNSHOSTNUMBER) %%MAKE-DISPLACED-ARRAY (>) COURIERTRACE (ACTIVEWP) +ANALYZE-REST (CL:ATOM CL:CONSP >) COURIER.READ.STRING (ODDP GREATERP) TTSKIPSEPR (SPACEP COMPLEXCHARP) + \TEDIT.ORIGINAL.WINDOW.TITLE (STRINGP ZEROP WINDOWP) \FM.EDIT-DELETE (MOUSESTATE ZEROP \FM.ONITEM +IGEQ EQUAL IGREATERP) CHAT.SCREENPARAMS (IGEQ FIXP) MERGEINSERT (MEMBER IGREATERP ALPHORDER) BEEPON ( +ILESSP) COMP.CPI (SELECTQ OASSOC) ONEDINSPECT.DEFAULT.TITLECOMMANDFN (MOUSESTATE) \TTW1 (FMEMB) CL::%%/ + (SMALLP) MSVERB (FMEMB) ARCSIN (FLESSP FGREATERP) SEDIT::LINE-FINISHED (ILESSP) REMAINDER (FIXP) +BEEPOFF (ILESSP) CL::STEP-COMMAND (CL:CONSP CL:MEMBER CL:SYMBOLP CL:CONSTANTP) \HDCPYBLTCHAR ( +IGREATERP ILESSP FMEMB) SHOWBITMAP1.IP (GREATERP) MSMARKCHANGED (APPLY*) CLISPATOM2 (MINUSP +CLISPRESPELL ATOM NUMBERP CLISPNOEVAL FMEMB LITATOM EQUAL) CHANGESLICE (ILESSP) SELECT.LIST.INSPECTOR +(ALISTP PROPLISTP) \HANDLE.PUP.ROUTING.INFO (>= <= <) WALK-TEMPLATE (CL:ATOM) \FTP.FIX.BROKEN.INPUT ( +FMEMB) MINUS (FLOATP) CL::%%EXPT-FLOAT-INTEGER (MINUSP) \FM.EDIT-WORDDELETE (FMEMB ILESSP) +\TELERAIDBREAK (ILESSP IGREATERP SELECTC XKEYDOWNP \TELEKBDWAIT) CONVEXP (ILEQ IGREATERP ILESSP) +CL:ERROR (ENTER-DEBUGGER-P) BIT.IN.ROW (GREATERP) LESSP (FIXP) ETHERHOSTNAME (GREATERP IGREATERP +ILESSP IGEQ) OPT.RETTEST (OPT.EQOP EQUAL) CL:SIMPLE-VECTOR-P (%%ONED-ARRAY-P) \ATMIN (IGREATERP ZEROP +GREATERP) RANDSET (EVERY GREATERP) WALK-FORM-INTERNAL (CL:CONSP CL:SYMBOLP CL:FBOUNDP CL:SPECIAL-FORM-P +) SCAVENGEDSKDIRECTORY (\PFPilotVolumeP) CL:SIMPLE-BIT-VECTOR-P (%%ONED-ARRAY-P) FNTH (IGREATERP) +\TEDIT.HISTORYADD (IEQP) EDIT.BITMAP (LITATOM BITMAPP CURSORP) \SLOWHDCPYBLTCHAR (IGREATERP ILESSP +FMEMB) TWODINSPECT.SELECTROWPROP (EQUAL) \PFInsertDirectoryID (\PFGetRootDirectory) CL:CHAR-NAME ( +CL:GRAPHIC-CHAR-P <=) IDATE (< > EVENP FMEMB ALPHACHARP IGEQ STRING-EQUAL) MAKEFN (FNTYP FMEMB) +RESETSAVE (LITATOM) DASSEM.ASMAJ (ILESSP IGREATERP) \LEAF.REQUESTPAGE (ILESSP \SENDLEAF) +\PROCESS.RESET.TIMERS (LITATOM) HLSTORGB (FGREATERP) WINDOWADDPROP (FMEMB) \PUPGATELISTENER (> +TIMEREXPIRED?) COMPILER::ALPHA-ATOM (CL:SYMBOLP) CL::%%EXPT-INTEGER (MINUSP CL:INTEGERP < EVENP >) +\FM.EDIT-BACKUP (IGREATERP ILESSP) \FTP.RECOGNIZEFILE (\FTP.HANDLE.NO BSPOPENP < >) CL:VECTOR-POP ( +%%ONED-ARRAY-P %%GENERAL-ARRAY-P <=) COMP.ANONP (VARIABLE-GLOBALLY-SPECIAL-P) RAND (ZEROP FIXP) +CL::PROCESS-TYPE (CL::PS-TEMPLATE CL:MEMBER) DASSEM.DSTOREFN (FMEMB) \BSP.HANDLE.INPUT (TIMEREXPIRED?) + INITUFNTABLE (GREATERP) IMOD (IGEQ) \TEDIT.CHANGE.LOOKS (IGREATERP ZEROP FONTP IEQP) SMARTARGLIST ( +LITATOM EXPRP CCODEP) \SETDAYTIME0 (ILESSP) \VFMGenerateFileIDs (EQL) CL:ARRAY-ROW-MAJOR-INDEX (<) +EXPT (FIXP IGREATERP ODDP FEQP ILESSP) NONSYSPROPNAMES (FMEMB) CHECK-PARAMETER-NAME (CL:KEYWORDP +MEMBER) NSPRINTER.HOSTNAMEP (STRPOS) CHAT.LOGIN (FMEMB CHAT.FLUSH&WAIT) CL:ARRAY-IN-BOUNDS-P (<) +REGIONONSCREEN (POSITIONP IGREATERP) FEXPT (EQP) \FTP.OPEN.CONNECTION (TYPENAMEP LITATOM +\FTP.SENDVERSION) BIT.IN.COLUMN (GREATERP) TB.UNDELETE.ITEM (TB.ITEM.UPDATABLE?) CL:CHAR-BITS ( +CL:CHARACTERP) \NSFILING.FULLNAME (<=) \LEAF.ADD.QUOTES (<=) ASET (<) MODERN-MENUBUTTONFN (MOUSESTATE +NEARTOP) \PUTFIXP (ILEQ TYPENAMEP CL:INTEGERP) BREAKCONNECTION (CL:FUNCALL) EDITGETD-LAMBDA (CL:CONSP) + COURIER.READ.SEQUENCE (GREATERP) CL::ROW-MAJOR-ASET (>= <) \PUTSWAPPEDFIXP (ILEQ TYPENAMEP CL:INTEGERP +) WORD.MATCHES.BUFFER (SELECTC IGREATERP COMPLEXCHARP IGEQ ILEQ) CL::%%STRUCTURE-TYPE-TO-FIELDSPEC ( +CL:CONSP) XCL:ROW-MAJOR-AREF (>= <) POWEROFTWOP (SMALLP FIXP IGREATERP) \TEDIT.WINDOW.TITLE (TEXTPROP) + SEDIT:SEDIT (OPENWP PROCESSP) \STRINGWIDTH.HCPYDISPLAYAUX (LITATOM IGREATERP STRINGP) +\GENERIC.RENAMEFILE (FDEVOP \DELETEFILE) ODDP (CL:ZEROP) \GENERIC.OPENP (STRING-EQUAL \IOMODEP) CL:MOD + (CL:FLOATP UFEQP UFGREATERP CL:ZEROP MINUSP CL:PLUSP) CHARACTER.PRINT (IGREATERP) +XCL::IMPLICIT-KEY-REHASH (TYPEP <) CLISPATOM1A (STOPSCAN? ZEROP) SAMEPARALOOKS (SELECTQ EQUAL IEQP +ERROR) COMPLEX-COMPARE-FORWARD (>) \VECPUT (ILESSP IGEQ) \TOTALFIXEDHEIGHT (FMEMB) CLUNARYMINUS? ( +FNTYP CLISPNOTVARP) \VAMUpdateVAM (BITTEST) ERRORX (TYPEP) PRINT-READER-ENVIRONMENT ( +EQUAL-READER-ENVIRONMENT) \GS.INITBUF (ILESSP) CL:CHAR-FONT (CL:CHARACTERP) SEDIT::COPY-SELECTION ( +SEDIT::CONTAINS?) PASTEFROMCLIPBOARD (WINDOWPROP) FMIN (FGREATERP) LOAD? (FMEMB EQUAL) CL:DIGIT-CHAR ( +<) TEDIT.SELECT (IGREATERP) CLOSEF? (OPENP) CL:MAKE-CHAR (EQL) SI::ADVICE-HASDEF (CL:GETHASH) +RECLISPLOOKUP (MEMB) LOADCOMP? (STRING-EQUAL) HRULE.CREATE (EVERY) GEQ (LESSP) TEDIT.SUBPARALOOKS ( +SAMEPARALOOKS) CLISPRECORD (RECORDFIELD?) IGEQ (ILESSP) FMAX (FGREATERP) \COURIER.ATTENTIONFN ( +WRITEABLE APPENDABLE) PREVWORD (WORDSEPRP IGREATERP COMPLEXCHARP ILESSP) \CIRCSHADE.XSCAN.IP (IGEQ +MINUSP EQUAL IGREATERP) SETY.IP (NUMBERP >=) ILEQ (IGREATERP) FW-FILTERED-FILE? (DIRECTORY.MATCH) +GENSYM? (LITATOM FIXP) \FM.MENUHANDLER (\FM.ONITEM IGEQ TIMEREXPIRED? STRINGP MOUSESTATE) IMAX (ILESSP +) COMP.LINKCALLP (FMEMB FASSOC) OPT.RETPOP (SELECTQ FMEMB) CL:ALPHANUMERICP (CL:DIGIT-CHAR-P) LOADFROM + (ATOM) IMIN (IGREATERP) COMPLEX-COMPARE-BACKWARD (>) \TOTALFIXEDWIDTH (FMEMB) +PRINT-LOADED-FILE-INFORMATION (STRPOS) CLBINARYMINUS? (NUMBERP LITATOM CLISPNOTVARP CLISPFUNCTION? +FIXSPELL1) \VAMAdjustGroup (ZEROP) SETYREL.IP (>=) FILEGETDEF.FNS (EQMEMB) OPT.JSIZE (ILESSP) LOOKIN ( +EVERY LITATOM STRPOS) MENUBUTTONFN (LASTMOUSESTATE) LEQ (GREATERP) NORMSECT (IGEQ ILEQ ILESSP) +CHECKIMPORTS (IEQP SELECTQ) STKARGS (GREATERP) DINFO.SPECIAL.UPDATE (OBTAIN.MONITORLOCK) MAX (GREATERP +) \3MBRAWRECEIVE (UNINTERRUPTABLY) SUBST (EQUAL) CL:DIGIT-CHAR-P (<= <) \TEDIT.GET.SINGLE.PARALOOKS2 ( +IGREATERP GREATERP) MIN (GREATERP) \TEDIT.WORD.BOUND (FIXP IGREATERP) \MACOUTCHARFN (IGREATERP) +\NSFILING.HANDLE.ERROR (STRPOS) SEDIT::GENERATE-LINEAR-FORM (ILEQ IGEQ) \PAGED.INCFILEPTR (>= < <=) +FIND.NEXT.WORD (WORDSEPRP IGREATERP COMPLEXCHARP) SCALE/GRAPHNODE/BORDER (FIXP) PARSE-FORMAT-OPERATION + (CL:DIGIT-CHAR-P CL:MEMBER) CL:STANDARD-CHAR-P (CL:MEMBER) \PRESSFAMILYCODELST (GREATERP) +FINDFIELDUSAGE (FMEMB) MAKE-NETWORK-TRACE-WINDOW (WINDOWP DISPLAYSTREAMP) CL:CHAR-EQUAL (<) INTCHECK ( +IGREATERP GETINTERRUPT) \SETCARET (ILESSP IGEQ) \BUFFERED.BIN (IGEQ) FORMAT-EXPONENT-MARKER (TYPEP) +\DECODEPRESSFACEBYTE (ILESSP IGEQ) CL:GRAPHIC-CHAR-P (>) MOVD (EXPRP) \CIRCSHADE.DISPLAY (IGEQ MINUSP +EQUAL IGREATERP) \PSC.SYMBOLS (EQUAL) CL:CHAR-LESSP (<) CL::COERCE-TYPE (CL:CONSP) DIRECTORY.MATCH1 ( +IGREATERP MEMB STRPOS DIRECTORY.MATCH1 LEQ SELCHARQ) \BUFFERED.PEEKBIN (IGEQ) \LFEntryPoint ( +\PFVersionOK) CL:CHAR-GREATERP (<) ADJUSTLINE (> < EMPTY.LINE START.OF.PARAGRAPH? SMALLP) MOVD? (EXPRP +) COMPILER::CHECK-ARG (CL:SYMBOLP CL:KEYWORDP) \BUFFERED.BOUT (ILESSP) CL:CHAR-NOT-GREATERP (<) +SETXY.IP (>=) TEDIT.INCLUDE (INFILEP OPENP \TEDIT.FORMATTEDP1 IGREATERP) CHNGNM (STKPOS MEMB) +\LEAF.DEVICEP (STRPOS GREATERP SMALLP EQL) DELFROMLIST (FMEMB) \PS.SCALEHACK (NUMBERP EQP) +CL:CHAR-NOT-EQUAL (<) CHANGENAME (CHANGENAME1 EXPRP) APPENDNUMBER.IP (FIXP ILEQ LESSP) \BOXFPLUSDIF ( +FLOATP IGREATERP SMALLPOSP SMALLP ILEQ ILESSP) FW-CREATE-OFD-LIST (FW-FILTERED-FILE? FW-OFD-EXISTS?) +SELECTQ1 (FMEMB) \FM.RIGHTBUTTONFN (INSIDEP \FM.CHECKREGION \FM.ONITEM IGEQ) \BUFFERED.BINS (IGREATERP +) COMP.CLEANFNP (LITATOM) \BOXFTIMES2 (FLOATP IGREATERP SMALLPOSP SMALLP ILEQ) SI::ADVICE-PUTDEF ( +CL:CONSP) PFI.PRINT.INDICES (<= >) \CIRCSHADE.IP (IGEQ MINUSP EQUAL IGREATERP) \MOVEBYTES (IGREATERP) +\BOXFQUOTIENT (FLOATP IGREATERP SMALLPOSP SMALLP ILEQ) USERLISPXPRINT (STRPOS) CIRCSHADE.BLT (NUMBERP +STREAMP TEXTUREP) SEDIT::REPLACE-CHARS (ILEQ) CL:CHAR< (<) COMP.CLEANEXPP (COMP.CLEANFNP) CCCSCAN ( +LITATOM FIXP SMALLP EQP) BLTVLINE (IGEQ) \BUFFERED.BOUTS (IGREATERP ILEQ) CL:CHAR> (<) ADDPROP ( +LITATOM) CL:CHAR<= (<) \FLOAT (IGREATERP IGEQ TYPENAMEP TYPEP) RPTPUT (ILESSP LITATOM SMALLP) /REMPROP + (LITATOM) \TEDIT.SEL.CHANGED? (EQUAL IEQP) ONEDINSPECT.VALUEWIDTH (GREATERP) \SCROLL.HANDLER.DOIT ( +IGREATERP) COMPILER::ENV-INLINE-DISALLOWED (CL:MEMBER COMPILER::ENV-P) CL:CHAR= (<) TEDIT.EXTEND.SEL ( +ZEROP IGEQ ILEQ IGREATERP) COMPILER::ENV-INLINE-ALLOWED (CL:MEMBER COMPILER::ENV-P) \MAKEFLOAT ( +IGREATERP ILEQ ILESSP IGEQ) \TEDIT.FIND.PROTECTED.START (LITATOM ILEQ) EMBEDPROG (REBINDP) STOPSCAN? ( +GETPROP ILESSP ATOM) FW-OFD-EXISTS? (OPENP) COMPILER::META-CALL-LAMBDA-SUBSTITUTE (COMPILER::SUBSTITUTABLE-P +) FILEGETDEF.MACROS (FMEMB) CLISPIF0 (FNTYP EQUAL) \CANONICALIZE.PUP.HOSTNAME (LITATOM) AT.END.OF.TEXT + (SPACEP COMPLEXCHARP) BREAKDOWN (EXPRP EQP MEMB NUMBERP GREATERP) CL:CHAR/= (<) FIXSPELL (ARRAYP +LITATOM STRINGP STACKP U-CASEP CL:FUNCALL CL:FBOUNDP BOUNDP FMEMB SOME EDIT4E1 IGREATERP) +TEDIT.GET.LOOKS (ZEROP FIXP) TTYIN.BALANCE (IGREATERP COMPLEXCHARP FIXP) SETUPTIMER (\TIMER.TIMERP) +\LOAD-STREAM (MEMB RANDACCESSP) HEXSTRING (ILESSP) \LFDirectoryP (\PFPilotVolumeP EQL) FILEWATCHPROP ( +EQUAL) \GETSPP (SEQ.GREATERP TIMEREXPIRED?) BLTHLINE (IGEQ) CLISPATOM0 (CLISPELL LITATOM) OPT.RETOPT ( +OPT.RETPOP OPT.RETTEST) SETX.IP (NUMBERP >=) CL:CHAR-NOT-LESSP (<) FW-LOOP (EQUAL) DWIMDEF (SELECTQ +LITATOM EQMEMB) SETXYREL.IP (>=) COMPILER::FRAME-ANNOTATE-TAGBODY (COMPILER::BLIPPER-CLOSED-OVER-P) +\CIRCSHADE.BLT (IGEQ MINUSP EQUAL IGREATERP) \BRUSHBITMAP (GREATERP ILESSP) CL:CHAR>= (<) +TEDIT.ADD.MENUITEM (MEMBER) TIMEREXPIRED? (\TIMER.TIMERP) FIXFIELDORDER (CONSTANTEXPRESSIONP NOTOKSWAP + MEMB) APPENDLARGEVECTOR.IP (GREATERP) SETCORNER (IGREATERP) \TEDIT.PUT.SINGLE.CHARLOOKS2 (ZEROP) +LAYOUTLATTICE (FASSOC) DUMPDATABASE (MEMB) LOAD (CL:PACKAGEP) \LFOpenOldFile (EQL) NARGS (LITATOM +ILESSP TYPEP) \TEDIT.FORMAT.FOOTNOTE (IGREATERP) HASDEF (MEMBER APPLY* LITATOM BOUNDP GETTEMPLATE +GETLIS FASSOC CL:KEYWORDP RECLOOK EXPRP GET RECORDFIELD? FMEMB) \TEDIT.GET.CHARLOOKS.LIST2 (IGREATERP +GREATERP) TIME.UNTIL (\TIMER.TIMERP) \TFBRAVO.GETPARAMS (LITATOM) FIXEDITDATE (FMEMB EDITDATE?) +PFI.CONDENSE.INDEX (PFI.LOOKUP.NAME CL:FUNCALL) BLTMENUIMAGE (WINDOWP OPENWP) TB.DELETE.ITEM ( +TB.ITEM.UPDATABLE?) SCALEPAGEUNITS (ILESSP) \ARGPTR (> <=) XCL::UNDOABLY-SETF-SYMBOL-FUNCTION (CL:CONSP + CL:SYMBOLP) IMAGESTREAMP (IGREATERP EQMEMB) OPT.FINDEND (OPT.JUMPCHECK) DELDEF (EXPRP) CCCSUBFN? ( +FMEMB) EQUALN (NUMBERP STRINGP STACKP ILESSP) FNS.PUTDEF (FMEMB UNSAFE.TO.MODIFY HASDEF GETD) +IMAGESTREAMTYPEP (EQMEMB) \CH.GUESS.NEW.PROPERTIES (GREATERP) FORMAT-FIXED-AUX (>= <=) \MATMULT441 ( +GREATERP) STKNTH (ILESSP) UNSAFE.TO.MODIFY (FMEMB GETD) \TEXTBIN (ILESSP ZEROP EQCLOOKS) +TEDITCHAT.MENUFN (LASTMOUSESTATE) \MATMULT144 (GREATERP) \LFCreateFile (\PFNewPages) EQMEMB (FMEMB) +\FM.WINDOWENTRYFN (LASTMOUSESTATE INSIDEP \FM.CHECKREGION \FM.ONITEM IGEQ) \MATMULT331 (GREATERP) +\LFCreateDevice (BOUNDP) U/L-CASE (AT.END.OF.LINE COMPLEXCHARP >=) CL::INSERT-INCLUDED-SLOT ( +CL::PSLOT-READ-ONLY) \MATMULT133 (GREATERP) GET-ONED-DISPLAYW (WINDOWP) \MATMULT444 (GREATERP) +TEDIT.HARDCOPY-COLUMN-END (ILESSP ILEQ) PRINTPACKETDATA (IGEQ ILESSP FIXP IGREATERP) \MATMULT333 ( +GREATERP) IMAGEOBJPROP (IGREATERP IMAGEOBJP) STKSCAN (LITATOM \FRAMESCAN) +HASH-LEFT-PAD-INITIAL-CONTENTS (>) PRINTANDBOX (FIXP IGREATERP) \FRAMESCAN (NULL-NTENTRY) INSIDE? ( +IGEQ) MSSETREP (NOTANY) CHAT.RESHAPEWINDOW (PROCESSP RELPROCESSP) FIND-MACRO-FUNCTION ( +CL-MACRO-WRAPPED-P CL:FUNCTIONP) SI::A-OR-AN (SI::VOWEL-P) \LFGetStreamForFile (\FILE-CONFLICT +IGREATERP) PRINTERPROP (EQMEMB) CL:GET-MACRO-CHARACTER (CL:CONSP FMEMB) COUNTDOWN (IGREATERP) +OPT.COMMONBACK (OPT.EQOP) APPENDINT.IP (LESSP) SHRIEKER (ATOM) PRINTERTYPE (EQMEMB APPLY* STRING-EQUAL +) DO-DISPATCH-MACRO (DIGITCHARP IGEQ) FW-CREATE-OFD (RANDACCESSP OPENP) FILEGETDEF.LISPXMACROS ( +SELECTQ MEMB) MSSEEKPHRASE (FMEMB) ADDSPELL (LITATOM) SETTAIL? (EMPTY.BUFFER ILESSP ILEQ) +GETDEFFROMFILE (LITATOM) FLOATP.TO.BCPL (FEQP IGREATERP) OPT.JUMPREV (OPT.EQOP OPT.DELCODE FMEMB +OPT.CALLP OPT.JUMPCHECK OPT.EQVALUE) /SETTOPVAL (LITATOM) CLISPRESPELL (LITATOM +CLISP-SIMPLE-FUNCTION-P CLISPNOTVARP) PRINTFILETYPE.FROM.EXTENSION (FMEMB) \DO-DEFINE-FILE-INFO (TYPEP + SMALLP ILESSP IGREATERP) EXEC-READ-LINE (READP SYNTAXP READ) SHRINK-VECTOR (< >) +FORMAT-PRINT-RADIX-AUX (TYPEP) BCPL.TO.FLOATP (ILESSP IEQP SMALLP) XCL::GET-UNDOABLE-SETF-METHOD ( +CL:SYMBOLP CL:CONSP) SEDIT::COMPLETE (CL:MEMBER) RUNION (FMEMB) ADDFILE (LITATOM) COMPILER::META-CALL-LAMBDA + (COMPILER::VARIABLE-READ-REFS COMPILER::VARIABLE-WRITE-REFS COMPILER::NODE-SUBST-P) CHAT.BUTTONFN ( +LASTMOUSESTATE) \MAXWIDTHOFGROUP (GREATERP) \POSTSCRIPT.ACCENTFN (IGREATERP) RESET/NODE/BORDER ( +WINDOWP) MSVERBTYPE (EQMEMB) UPDATEFILEMAP (SYNTAXP FIXP ILEQ) HPRINTEND (MINUSP) +\TEDIT.FIND.LAST.LINE (ILESSP) \TEDIT.LOOKS.UPDATE (ZEROP EQCLOOKS) SETXREL.IP (>=) COMP.STBIND (EVERY +) TEDIT.SEL.AS.STRING (ZEROP GREATERP) NOTOKSWAP (ARGS.COMMUTABLEP) ROOTFILENAME (TYPEP) +TTYIN.SCRATCHFILE (OPENP) TRYNEXT1 (STACKP) COPIEDFROMSPEC (LESSP FMEMB) CENTERPRINTINAREA (IGREATERP) + SMASHFILECOMS (LITATOM) CL:SET-DISPATCH-MACRO-CHARACTER (CL:DIGIT-CHAR-P) SHOWSHADEDITEMS ( +\MENUSUBITEMS) \PFDsplyVolumes (DEFINEDP) SETSTKARG (LITATOM ILESSP IGEQ NULL-NTENTRY ILEQ) +FASL:PROCESS-FILE (<) SKIP/ZAP (AT.END.OF.LINE) CL-MACRO-WRAPPED-P (CL:CONSP CL:EQUAL) STKARGNAME ( +LITATOM \SPREADFRAMEP IGREATERP ILESSP FIXP SMALLP ILEQ NULL-NTENTRY EQP) BUILDTESTRELQ (LITATOM) +COMPILER::ENV-DECL-P (COMPILER::ENV-P) ENUM-STRING (MINUSP) SETSTKARGNAME (LITATOM IGREATERP ILESSP +FIXP SMALLP ILEQ NULL-NTENTRY EQP) MB.DEFAULTBUTTON.ACTIONFN (ZEROP \TEDIT.QUIT) PROMPTCHAR ( +LISPXREADP IGREATERP) \TEDIT.TRY.ABBREV (STRINGP SMALLP LITATOM GETD) %%PRINT-ARRAY-CONTENTS (>) +CL:VECTOR-PUSH-EXTEND (>) \POSTSCRIPT.ACCENTPAIR (IGREATERP ILESSP) \FM.COLLECTNWAYS (FMEMB) +%%DEFPRINT-ARRAY (<=) \CONVERTNUMBER (>= > <) PRINTCOPYRIGHT (/PUTPROP) STKNARGS (\SPREADFRAMEP +IGREATERP NULL-NTENTRY) OPT.LABELNTHPR (IGREATERP) FILEPKGCHANGES (LITATOM FMEMB CL:EQUAL) +SET-FILL-POINTER (%%ONED-ARRAY-P %%GENERAL-ARRAY-P <=) FRAMESCAN (LITATOM) LISPXPRIN1 (STRINGP) +DINFO.UPDATE.MENU.DISPLAY (ILESSP) HPRINT1 (ILEQ FIXP EQP GREATERP ILESSP EQUAL GETCONTROL GETECHOMODE +) COERCE (TYPEP CL:MEMBER CL:CONSP CL:COMPLEXP) TTECHO.TO.FILE (EQMEMB COMPLEXCHARP) LISPXREADBUF ( +NUMBERP IGREATERP EVAL) %%DEFPRINT-VECTOR (CL:STRINGP <= CL:BIT-VECTOR-P) RPTPRINT (EQP) +FB.HARDCOPY.MAXWIDTH (>) GREET (GETD) \TEDIT.GET.PARALOOKS.LIST2 (IGREATERP GREATERP) PRETTYDEF ( +\DTEST NLSETQ RANDACCESSP EQUAL-READER-ENVIRONMENT) FNUM-STRING (CL:PLUSP MINUSP) +\TEDIT.FIND.PROTECTED.END (IGREATERP) MB.SIZEFN (DISPLAYSTREAMP) \GOOD.DASHLST (LITATOM BITMAPP +NUMBERP GREATERP ODDP) CL:VECTOR-PUSH (%%ONED-ARRAY-P %%GENERAL-ARRAY-P) COPIEDTOSPEC (STRPOS +UNPACKFILENAME.STRING) \CANONICAL.HOSTNAME (NUMBERP SMALLP < LITATOM) LISPXREADP (READP) +SI::DESCRIBE-USING-INSPECT-MACRO (CL:CONSP) PRINTCOPYRIGHT1 (READTABLEPROP) RESHADEITEM (FONTP) +CHECKDEFS (SOME EQUAL) FIXR (FLOATP IGREATERP SMALLPOSP SMALLP ILEQ ILESSP ODDP) CLEANPOSLST (STACKP) +HASH-LEFTPAREN (<= >=) HASH-BACKSLASH (TYPEP >= <) DECLAREDATATYPE (SELECTQ) READFROMBUF ( +AT.END.OF.LINE COMPLEXCHARP AT.END.OF.TEXT) FLTSTR (= FLOATP IGREATERP SMALLPOSP SMALLP ILEQ > <) +\TELERAIDGET (CL:FUNCALL) RAISEP (RAISE) GREET0 (FIXP EVENP ILESSP) APPENDSEQUENCEDESCRIPTOR.IP ( +ILESSP IGREATERP) \TRACKWITHBOX (LASTMOUSESTATE MOUSESTATE IGREATERP IEQP) DWMFY2 (LITATOM EQMEMB +FMEMB STRPOSL FIXPRINTIN CLISPNOTVARP DWIMIFY2A WTFIX0 FGETD EXPRP FIXSPELL1) \VAMFindFreePages (IGEQ +ZEROP EQL) TIMESPOW10 (> < IGEQ) TRANSLATE.DATATYPE (LITATOM FMEMB IGEQ IGREATERP ODDP ILEQ) +\LEAF.CLOSEFILE (WITH.MONITOR DIRTYABLE) INTTOEXT (ILEQ TYPENAMEP CL:INTEGERP IGREATERP) FILEDATE ( +RANDACCESSP) LINELENGTH (NUMBERP ILESSP) EXTTOINT (<) DINFO.UPDATE.GRAPH.DISPLAY (EQUAL) +\TEDIT.PUT.SINGLE.PARALOOKS (IGREATERP) COURIER.BROADCAST.CALL (FIXP) FLTINTLOG (> LESSP >=) /PUT ( +LITATOM) %%REDUCE-MOD (CL:INTEGERP <=) GETDEFERR (EQMEMB STRINGP) RPLCHARCODE (STRINGP SMALLP ILESSP) +GETFILEDEF (FMEMB STRPOS) FILECREATED1 (STRINGP) DO-EVENT (STRINGP CL:SYMBOLP SOME) %%REDUCE-INTEGER ( +CL:CONSP CL:INTEGERP >= < <=) FILE-NAME (STREAMP) EDITE (SELECTQ STRINGP) +%%GET-ENCLOSING-UNSIGNED-BYTE (CL:INTEGERP <=) \UPDATEXYANDBOX (IEQP) READLINE (READP SYNTAXP +IMAGESTREAMTYPEP NLSETQ) %%GET-ENCLOSING-SIGNED-BYTE (CL:INTEGERP <=) FLONUM-TO-STRING (ZEROP CL:PLUSP + CL:CHAR= MINUSP) PFI.HANDLE.* (<) OPT.LBDEL (OPT.JUMPCHECK) IL-MACRO-WRAPPED-P (CL:CONSP EQUAL) +\FM.UPDATEWINDOWEXTENT (IGREATERP) CL:CHARACTER (TYPEP EQL) DIGITSBDP (FLOATP IGREATERP SMALLPOSP +SMALLP ILEQ) EDITLOADFNS? (FMEMB EQUAL) DO.EDIT.PP (TTYIN.BALANCE) MSPATHOPTIONS (MSSEEKTYPE) +SEDIT::DOT-THIS-LIST (IGREATERP IGEQ) %%NUMERIC-STRING-P (CL:STRINGP IGREATERP ILESSP) +\POSTSCRIPT.SPECIALOUTCHARFN (ILESSP IGEQ) TTYINSTRING (\FATCHARCODEP SMALLP COMPLEXCHARP) READHOTSPOT + (MOUSESTATE INSIDE?) COPY.TEXT.TO.IMAGE (EOFP > \EOFP >=) \FM.WINDOWEXTENT (WINDOWP BITMAPP) INSIDEP +(WINDOWP NUMBERP POSITIONP) CHAT.ICONFN (TTY.PROCESSP FNTYP) TTDELETECHAR (AT.START.OF.BUF +AT.END.OF.LINE AT.START.OF.LINE) PRINTHISTORY2 (ATOM) HASH-STAR (>) APPENDIDENTIFIER.IP (IGREATERP) +DWMFY1 (CHECKTRAN LITATOM CLISP-SIMPLE-FUNCTION-P EQMEMB CLISPNOEVAL) EDITMOVENODE (LASTMOUSESTATE +ZEROP) %%INITIALIZE-DEFAULT-PATHNAME (BOUNDP) COPYINSERT (IMAGEOBJP) PRETTYPRINT3 (SELECTQ EXPRP MEMB +SUPERPRINTEQ) REMPROPLIST (FMEMB) NODELST/AS/MENU (ILESSP) GETDEFCURRENT (LITATOM EXPRP EQMEMB FMEMB +WHEREIS) \STRINGIN (IGREATERP GREATERP) FB.SORT.VERSIONS (STRING-EQUAL) XCL::UNDOABLY-SETF-MACRO-FUNCTION + (GETD) \SENDLEAF (PUTSEQUIN) DMCHAT.ADDRESS (<) GETPUPSTRING (IGREATERP) \TELERAIDCOMMAND (XKEYDOWNP) + CLOSE-AND-MAYBE-DELETE (OPENP) PARSE-NAMESTRING1 (FIXP) HASH-EQUAL (CL:ASSOC) +\LISP.TO.NSFILING.ATTRIBUTE (MEMB) ALLPATHS (FMEMB) UNSAVED1 (LITATOM GETD GETPROPLIST) DRAWDASHEDLINE + (IGEQ) \DSKCreateDevice (BOUNDP) HASH-STRUCTURE-LOOKUP (CL:CONSP) SET/LABEL/SIZE (BITMAPP IMAGEOBJP) +PRETTYPRINT (DISPLAYP ATOM IGREATERP BOUNDP EXPRP SELECTQ FMEMB PRETTYPRINT1 GETPROP) TERM.PRINTCHAR ( +>=) GENERATEFN (STACKP) \SEARCHPRESSFONTS (INFILEP) COMPILER::ALPHA-FORM (CL:ATOM) +DINFO.UPDATE.HISTORY (EQUAL GREATERP) SPY.ADD.ENTRY (IGEQ) \FM.READUSERDATA (FMEMB) \EXTNORMALIZE ( +IGREATERP) SEND.FILE.TO.PRINTER (MEMB CAN.PRINT.DIRECTLY) MSMSGPRINT (STRINGP CL:CONSP) SQRT (FLESSP +FGREATERP) XCL::WALK-TAGBODY-1 (CL:SYMBOLP) \EXTFQUOTIENT (IGREATERP IGEQ ILEQ) CLISPEXPANSION ( +GETPROP CL:EQUAL) MSJOINSET (LITATOM) CL::ENSURE-CONSISTENT-PS (CL::PS-TEMPLATE CL:LISTP) SEDIT::HASFAT + (IGREATERP) INIT-CML-READTABLES (GREATERP) \FM.MAKEBITMAP (BITMAPP) CMLREADSEMI (FMEMB) +\CONVERT.FLOATING.NUMBER (CL:CONSP MINUSP) OPENIPSTREAM (BOUNDP) \TEDIT.PARSE.CHARLOOKS.LIST (FONTP) +\VFMMarkBufferDirty (EQL) CL::%%SXHASH (CL:SYMBOLP CL:LISTP CL:NUMBERP CL:STRINGP CL:BIT-VECTOR-P +CL:PATHNAMEP) \VAMBufferSave (FIXP) TEMPLATE (EQUAL) \MAXHEIGHTOFGROUP (GREATERP) +%%DIRECTORY-COMPONENT-EQUAL (%%DIRECTORY-COMPONENT-P) FB.DELVER.FILES (STRING-EQUAL GREATERP +FB.DELETE.FILE) COMPAREPRINTN (ILESSP) FASL-FILEDATE (EQL) SHORTLST (IGREATERP ZEROP) CL:MAKE-ARRAY ( +CL:LISTP >= EQUAL > <=) \TEDIT.HCPYLOOKS.UPDATE (ZEROP EQCLOOKS) SKOR (SPELLEQ < IGREATERP) AU-REVOIR +(ZEROP) RESTOREBUF (AT.END.OF.BUF IGEQ IGREATERP) PARSE.NSNAME (STRINGP LITATOM) EDITNUMBERP (MINUSP +IGREATERP) READ-AFM-FILE (STRING-EQUAL BOUNDP IGEQ GREATERP CL:PLUSP ILESSP IGREATERP) TTDELETEWORD ( +AT.START.OF.BUF) TTREADLIST (SKIPSEPRS) MERGLIST (ILEQ) GLOBAL-MACRO-FUNCTION (TYPEP CL:SPECIAL-FORM-P + FMEMB LITATOM GETD) COPYALLBYTES (DISPLAYP) \CHECKSUM (ILEQ IGREATERP) COMP.VARTYPE (COMP.ANONP) +PRETTYCOM (LITATOM BOUNDP MEMB ASSOC) RECLOOK1 (FMEMB) \UNVISIBLE.FLUSH.OPEN.STREAMS (DIRTYABLE) ADIEU + (ZEROP) \MAIKO.PUNTBLTCHAR (IGREATERP ILESSP FMEMB) BUILDGETRELQ (LITATOM) +GET-ENVIRONMENT-AND-FILEMAP (STREAMP RANDACCESSP) TERM.DOWN (>) LISPXREPRINT (STRINGP CL:STRINGP) +\DSPFONT.HDCPYDISPLAY (EQP GREATERP) \GETPRESSFONTNAMES (MEMB ILESSP EQUAL) MINIMUMWINDOWSIZE (LITATOM +) EQLENGTH (ILESSP) \SHADEBITS (MOUSESTATE INSIDE? LASTMOUSESTATE) \FLOATINGSCALE (MINUSP) +\BULK.DATA.CLOSE (WRITEABLE APPENDABLE) \PFReplaceString (IGREATERP GREATERP) \IBMOUTCHARFN (IGREATERP +) \INIT.POWERS.OF.TEN (GREATERP) PFI.HANDLE.PUTPROPS (LITATOM MEMB) GET-FILEMAP-FROM-FILECREATED (FIXP + LESSP) \SETGROUPMIN (GREATERP) \UFSCreateDevice (BOUNDP) \DSKDISPLAY.UPDATE (WINDOWP) CL:COMPILE-FILE + (STREAMP) PRETTYDEF1 (SOME EQUAL) \TEDIT.PARSE.PARALOOKS.LIST (BOUNDP) DOERROR (FMEMB) \BN.COMPAREN ( +IGREATERP ILESSP) MB.CREATE.NWAYBUTTON (GREATERP) \FAULTINIT (SELECTC IGREATERP) \LFDeleteFile (FDEVOP +) \INIT.ETHER.BUFFER.POOL (GREATERP) \BN.FROM.FIXP (ILESSP EQUAL) \SET.VMEM.FULL.STATE (ILESSP +.VMEM.CONSISTENTP.) \UFSDirectoryNameP (FIXP) CL:MACRO-FUNCTION (CL:SYMBOLP LOCAL-SYMBOL-FUNCTION) +TRANSLATE.LOCF (FIXP SELECTQ) EXTENDREGIONTOP (ILESSP) PSCFONT.WRITEFONT (GREATERP) \BN.INTEGERLENGTH +(INFINITEP) CL:MACROEXPAND-1 (CL:CONSP CL:SYMBOLP) DO.DELETE.LINES (>) \UFSOpenFile (DIRTYABLE DSKP +DIRECTORYNAMEP =) \TELERAIDINIT (TYPENAMEP) TTADJUSTWORD (FMEMB LITATOM) \D01.FAULTINIT (IGREATERP +ILEQ GREATERP BITTEST) D-ASSEM::FIXUP-NTENTRY (CL:SYMBOLP FMEMB) RECFIELDLOOK (FMEMB) \DOVE.FAULTINIT +(.VMEM.CONSISTENTP.) \UFSSetFileInfo (STRINGP FIXP) D-ASSEM::EMIT-BYTE (CL:CONSP) +\TEDIT.UPDATE.SHOWSEL (ILESSP) PRETTYDEFCOMS (SYNTAXP LITATOM) \DL.FAULTINIT (.VMEM.CONSISTENTP. +ILESSP) IN/ITEM? (INSIDE?) \UFSWritePages (IGREATERP) \SEQUIN.HANDLE.ACK (UNINTERRUPTABLY) +\FM.GETBITMAPS (ATOM TEXTUREP STRINGP BITMAPP) \TEXTTTYBOUT (IGREATERP) XCL::SAVE-CURRENT-EXEC-PROFILE + (XCL:PROFILE-P) \TEDIT.GET.SINGLE.PARALOOKS (IGREATERP GREATERP ILESSP) PRINTDATE1 (DISPLAYP) +FW-UPDATE-OFD-WINDOW (OPENP FIXP ILESSP EQUAL) \UFSReadPages (LEQ) PRETTYDEF0 (OPENP) \BN.PLUS2 ( +ILESSP IGREATERP) FILEPKG.MERGECHANGES (MEMBER) \UFSTruncateFile (> GREATERP \UFSGetFileInfo-C) +CL::DEFSTRUCT-PARSE-OPTIONS (CL:LISTP) \BN.TIMES2 (GREATERP) NODECREATE (IMAGEOBJP) +SEDIT::MAP-COMMENT-INDEX (IGREATERP) \GETREGIONTRACKWITHBOX (MOUSESTATE LASTMOUSESTATE IGREATERP IEQP) + \SPP.CHECK.INPUT.QUEUE (SEQ.GREATERP) \BN.DIVIDE (ILESSP GREATERP IGEQ IGREATERP) OPT.JUMPTHRU ( +OPT.EQVALUE OPT.CALLP COMP.CLEANFNOP OPT.EQOP) \UFSDeleteFile (\UFS.OPENP \UFSDeleteFile-C) +\FILEMAP-HASHOVERFLOW (> <= STRING.EQUAL) \ARBIN (IGREATERP ZEROP) \UFSRenameFile (\UFS.OPENP +\UFSRenameFile-C EQL) FB.DELVERCOMMAND (FIXP) DIRECTORY.FILL.PATTERN (FILENAMEFIELD) MS-SMASH-PACKAGE +(CL:CONSP CL:SYMBOLP) SIZE/GRAPH/WINDOW (WINDOWP) D-ASSEM::TYPE-NAME-FROM-SIZE (<=) \VFMSmartBLT ( +PTRGTP GREATERP) \LFRenameFile (EQUAL) \FM.GETREGIONS (ATOM TEXTUREP) \UFSCloseFile (DIRTYABLE +\UFSCloseFile-C) SEDIT::REPLACE-ROOT (CL:REST) TRACKW (MOUSESTATE) TTYINENTRYFN (LASTMOUSESTATE) +GETSYNTAX (FIXP FMEMB) EDITSHADE (BITMAPP FIXP MOUSESTATE LASTMOUSESTATE INSIDE? STRICTLY/BETWEEN +NUMBERP) \BN.ABS (ILESSP) MAKEACCESS1 (FMEMB) LISPSOURCEFILEP (STREAMP RANDACCESSP) +\INSPECTW.COMMAND.HANDLER (INSIDEP STRINGP MOUSESTATE) SI::DESCRIBE-INTERNAL (< CL:CONSP +SI::INSPECT-MACRO-USABLE-BY-DESCRIBE?) \BN.SIGN (ATOM IGREATERP ILESSP) \SMASHMENUIMAGEONRESET (FMEMB) + WINDOWDELPROP (FMEMB) \D01.ASSIGNBUFFERS (ILESSP) \TEDIT.NSCHAR.RUN (IEQP ZEROP GREATERP) +XCL::PPRINT-DEFINER-FITP (CL:CONSP) ENTRY# (IGREATERP) PRETTYVAR (LITATOM NUMBERP) \LFTruncateFile ( +IGREATERP GREATERP) \CHAIN.UP.RPT (GREATERP) \UFS.FULLNAME (DSKP) FB.CLOSE&EXPUNGE (FB.EXPUNGECOMMAND) + SEDIT::REPLACE-NODE (SEDIT::DEAD-NODE?) \GETREADSYNTAX (IGREATERP) OPT.JUMPOPT (OPT.JUMPTHRU +OPT.JUMPREV) \PFRoomForFile (EQL) SETCOLORLV.IP (BITMAPP LESSP GREATERP) \GETTERMSYNTAX (IGREATERP) +%%PATHNAME-EQUAL (%%DIRECTORY-COMPONENT-EQUAL) PRETTYVAR1 (MEMB ASSOC FITP) \NSFILING.ADDQUOTES ( +IGREATERP) MAKEDEFLIST (LITATOM) OPT.XVARSCAN1 (FMEMB) D-ASSEM::REF-VAR (D-ASSEM::DVAR-P CL:CONSP) +SETCOLOR16.IP (NUMBERP) FIX-FORM (IMAGESTREAMP EQUAL CL:CONSP =) TERM.LEFT (>) \UFS.OPENP (CL:FUNCALL) + CL:ARRAY-DIMENSIONS (%%ONED-ARRAY-P %%TWOD-ARRAY-P %%GENERAL-ARRAY-P) D-ASSEM::CHOOSE-OP (<=) +NECCSPEC (SPECVARP) COMPILER::EFFECTS-ANALYZE-LITERAL (COMPILER::EVAL-WHEN-LOAD-P) \LEASTPTAT ( +IGREATERP) \FM.CHECKPROPS (FMEMB FIXP TEXTUREP) \TEDIT.FORMATTABS (ILEQ) D-ASSEM::FETCH-HUNK (CL:ZEROP + <=) SEDIT::RELINEARIZE-WHERE-NECESSARY (SEDIT::DEAD-NODE?) MKACCESSFN (FMEMB) \M44ACTONVMEMFILE (ILEQ + IGREATERP GREATERP ILESSP IGEQ) \SHOWSEL.HILIGHT (IGEQ ILESSP) \ITEM.WINDOW.SELECTION.HANDLER ( +LASTMOUSESTATE INSIDE?) \UFS.REMOVE.HOST.FIELD (DSKP STREQUAL) UNMAKEHARDCOPYSTREAM (WINDOWP) +PRETTYCOM1 (LITATOM ERSETQ) COMPAREPRINT1 (LITATOM) \RESHOWBORDER1 (FMEMB) LVLPRIN (MEMB TAILP) +CL::PARSE-SLOT (CL:CONSP) \DOFORMATTING.HARDCOPY (ILESSP ZEROP IGEQ IEQP ILEQ IGREATERP) ADDNAKEDCHAR +(IGREATERP AT.END.OF.BUF) SEDIT::ATOM-CHAR-ESCAPED (IGEQ ILEQ IGREATERP) XYSECTLSEG (MINUSP ILEQ) +\REMOVE-DECLS (CL:ATOM CL:SYMBOLP CL:SPECIAL-FORM-P CL:CONSP) COMPILER::META-EVAL-PROGN (COMPILER::LITERAL-P +) D-ASSEM::PUSH-INTEGER (CL:ZEROP = <=) \IDLE.EXIT.ABORT (RELSTK) DEFAULT.INSPECTW.VALUECOMMANDFN ( +MOUSESTATE) SEDIT::COPY-STRUCTURE-STRING (STRINGP) PRINTPARA (MINUSP ILEQ) EXTENDREGIONRIGHT (ILESSP) +TEDIT.BUILD.PCTB (STREAMP RANDACCESSP GREATERP IGREATERP ZEROP FMEMB) COMP.CONST (COMP.PREDP SELECTQ +SHOULDNT) OPT.XVARSCAN (FMEMB) READVARS (LITATOM) PRINTARRAY-TO-LIST (ARRAYP IGREATERP) +\TELERAIDSERVER (\TELERAIDGET EVENP GREATERP XKEYDOWNP IGEQ ILESSP) \TEDIT.PURGE.SPACES (ILEQ) +READARRAY-FROM-LIST (IGREATERP NUMBERP) \UFS.DIRECTORY.NAME (STREQUAL) XCL::%%DELETE-DEFINER (CL:SYMBOLP +) LVLPRIN0 (SUPERPRINTEQ MINUSP) PPSPP (SEQ.GREATERP) INVERTED/SHADE/FOR/GRAPHER (FIXP BITMAPP) +PRINTPARA1 (ILESSP IGREATERP) READVISE (EQUAL) SETSYNTAX (\TERMCLASSTOCODE SELECTQ) +\TEDIT.GET.INSERT.CHARLOOKS (ATOM ZEROP) \BN.IGNN (ILESSP) MB.BUTTONEVENTINFN (IGEQ ILEQ) +\SETTERMSYNTAX (ILEQ IGREATERP) BREAK (LITATOM STRING.EQUAL) D-ASSEM::DCODE-FROM-DLAMBDA (>) /MOVD ( +EXPRP) TB.MAP.SELECTED.ITEMS (< >) \SETREADSYNTAX (IGREATERP ILEQ) FINDRECDECL (TYPENAMEP) +\PFFetchString (GREATERP) \FM.CHECKDESCRIPTION (FMEMB ATOM STRINGP BITMAPP FIXP TEXTUREP) SYNTAXP ( +IGREATERP FMEMB) COMPILER::GENCODE-CALL (COMPILER::CALLER-NOT-INLINE COMPILER::VAR-REF-P CL:EQUAL <= +COMPILER::LAMBDA-REST = COMPILER::LAMBDA-KEYWORD COMPILER::GLOBAL-FUNCTION-P CL:MEMBER COMPILER::LITERAL-P + COMPILER::LAMBDA-P COMPILER::LAMBDA-NEW-FRAME-P COMPILER::OPCODES-P COMPILER::PASSABLE) PRINT3TO10 ( +MEMB) INVERTED/GRAPHNODE/BORDER (FIXP) \BITMAPFROMTEXTURE (GREATERP) SPY.BUFFER.ENTRY (ILEQ) +\READBMDIMENSIONS (NUMBERP ILESSP) SCALEPAGEXUNITS (ILESSP) \MAPCHARTABLE (GREATERP) SEDIT::BACKSPACE-QUOTE + (FMEMB) \VFMFind (\VFMLower ILEQ MESAEQUAL GREATERP) D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL ( +CL:MEMBER) \VAMRecomputeFreePageCount (GREATERP) SCALEPAGEYUNITS (ILESSP) DWIMIFY0 (TAILP FGETD EXPRP) + CLISPNOEVAL (SELECTQ FMEMB GETLIS) REMOVEITEM (MEMBER SOME) BIGNUM.DEFPRINT (INFINITEP SMALLP ILESSP +IGREATERP LEQ IGEQ) CONSTANTOK (SMALLP STRINGP FLOATP FIXP LITATOM IGREATERP) \UFStoOtherRenameMess ( +EQUAL) MSCHECKVARS1 (FMEMB) \BN.TH2D (GEQ IGREATERP) \NSRANDOM.HANDLE.ERROR (\NSFILING.GET.NEW.SESSION +) FW-CLOSE-CMD (MOUSECONFIRM) \VFMDeletePageGroup (ZEROP EQL MESAEQUAL GREATERP) \BN.ISUM1 (ILESSP) +DELETECONTROL (STRINGP) TYPESOF (FMEMB LITATOM EQMEMB CL:FUNCALL HASDEF GETD) POSITIONP (NUMBERP) +\LITCHECK (LITATOM STRINGP) \SHAPEW2 (OPENWP) EXTENDREGIONLEFT (IGREATERP) \BN.NZEROS (GREATERP) +\GREATESTPTAT (IGREATERP) \SEQUIN.COMPARE (IGEQ ILEQ) \STRINGOUT (IGREATERP GREATERP) \TEXTRIGHTMARGIN + (ZEROP) \IDLE.PROMPT.WATCHER (\SECONDSCLOCKGREATERP) PFI.HANDLE.DEFDEFINER (LITATOM EQMEMB GET) +OPT.SCANOPT (FMEMB SOME OPT.DEADSETQP COMP.CLEANFNOP EQUAL SELECTQ RPLACA OPT.EQVALUE) \M-VMEMSAVE ( +.VMEM.CONSISTENTP.) GETCFILE (NLSETQ RANDACCESSP) PRINENDLINE (SELECTQ DRIBBLEFILE) PRINTFILEPROP ( +EQMEMB) \DOCOMPRESSVMEM (IGEQ) EDITGRAPH2 (MOUSESTATE LASTMOUSESTATE) D-ASSEM::EASY-ENTRY-P ( +D-ASSEM::DLAMBDA-KEY CL:EQUAL CL:THIRD) FORMAT-PRINT-CARDINAL (MINUSP ZEROP) ITEMW.REPAINTFN ( +REGIONSINTERSECTP) POLYSHADE.SCAN.IP (NUMBERP) DRAWCIRCLE (LESSP EQP) \TEDIT.APPLY.PARALOOKS (IGEQ) +\FM.RESHAPEFN (IGEQ IGREATERP ILEQ ILESSP) PRINTARRAY (LITATOM ARRAYP IGREATERP PRINT) \LFReadPages ( +CL:ZEROP ILEQ EQL) RESETGRID.NEW (= NUMBERP) INSURE.BRUSH (NUMBERP) SUBPRINT/ENDLINE (SUPERPRINTEQ) +COMP.USERFN (CL:KEYWORDP INTERSECTION LITATOM) DELETELINE (ON.FIRST.LINE) EQP (FIXP FLOATP NUMBERP) +PRINTERROR (EQUAL ILESSP IGREATERP) FITP (>) SEDIT::PROPAGATE-WIDTH-CHANGE (IGEQ) SEditicide (STRPOS) +XCL::EXEC-SHRINKFN (TTY.PROCESSP) D-ASSEM::INTERN-VAR (CL:CONSP) \UFS.HANDLE.RELATIVEDIRECTORY ( +SELCHARQ NCHARS EQMEMB) SUPERPRINT (ATOM STRINGP ILESSP IGREATERP SUPERPRINTEQ SEMI-COLON-COMMENT-P +ARGTYPE) D-ASSEM::GENERATE-EASY-ENTRY (=) Inspecticide (STRPOS) MAKEHVPRETTYCOMS (LITATOM) +\DOFORMATTING (ILESSP ZEROP IGEQ IEQP ILEQ IGREATERP) DELFROMCOM1 (LITATOM) MAKEHARDCOPYSTREAM ( +WINDOWP) GETDELETECONTROL (STRINGP) CL::REMOVE-DOCUMENTATION (CL:STRINGP) \BN.D2TH (IGEQ) ECHOCHAR ( +IGREATERP ILEQ) \LFSetFileInfo (SELECTQ) LISPXUSE1 (STRPOS) READARRAY (IGREATERP NUMBERP) ACCESSDEF4 ( +FMEMB) MARGINBAR (ILESSP ILEQ IGREATERP) SEDIT::DECOMPOSE-PSEUDO-SELECTION (CL:LISTP) +\FM.REDISPLAYMENU (OPENWP) \CLIPCODE (LESSP GREATERP) FINDSYSRECDECL (TYPENAMEP) +INTERSECT/REGIONP/LBWH (IGREATERP ILESSP) \HDCPYDSPPRINTCHAR (IGREATERP ILESSP) \BN.ICANON (IGREATERP +ILESSP) OPT.POSTOPT (FMEMB OPT.FRAMEOPT) GETXIP (TIMEREXPIRED?) SEDIT::COMPOSE-PSEUDO-SELECTION ( +CL:LISTP) \IDLE.IS.PREVIOUS (ZEROP >) SEDIT::SHIFT-STRING (ILESSP IGREATERP GREATERP) +\10MB.INPUT.INTERRUPT (IGREATERP TIMEREXPIRED?) DELFROMCOM (LITATOM MEMB EQMEMB) FIXAPPLY1 (ZEROP SOME +) \HANDLE.RAW.PACKET (APPLY*) ECHOCONTROL (\THINCHARCODEP SMALLP IGEQ) \TEXTMENU.DOC.CREATE (IMAGEOBJP +) \DL.NEWFAULTINIT (GREATERP \LOCKEDPAGEP > < <=) DRAWCURVE (BRUSHP) \FM.OPENFN (WINDOWP WINDOWPROP +STKPOS) UPDATE/BM/DISPLAY/SELECTED/REGION (IGREATERP) SEDIT::CONS-ATOM (SEDIT::HASFAT) BRUSHP (LITATOM + \DEFINEDP MEMB NUMBERP \POSSIBLECOLOR) COMP.PROGLST (ILEQ) FW-CHANGE-POSITION (EQUAL) \UFSSetFileType + (EQUAL) GETFILEPKGTYPE (LITATOM <= STRPOS) TEDIT.GET (MOUSECONFIRM INFILEP STREAMP) +\PARSE.PORTCONSTANT (IGREATERP IGEQ ILEQ) SHAPEW1 (OPENWP) ADDTOCOM (INFILECOMS? LITATOM EQMEMB +GETPROP) COMP.EQ (LITATOM) COMPAREPRINT (EQUAL) D-ASSEM::GENERATE-ARG-CHECK (D-ASSEM::DLAMBDA-REST +D-ASSEM::DLAMBDA-KEY D-ASSEM::DLAMBDA-ALLOW-OTHER-KEYS) MSCHECKBLOCKBASIC (FMEMB GETPROP) +\TEDIT.APPLY.STYLES (LITATOM DEFINEDP) \IDLE.ISMEMBER (STRING-EQUAL STRPOS EQUAL.CH.NAMES SELECTQ) +\TEDIT.PARABOUNDS (ZEROP ATOM) D-ASSEM::REDUCE-UNCERTAINTY (CL:ZEROP) HASHLINKS (SELECTQ) \LFOpenFile +(FMEMB TYPEP) \FM.LAYOUTGRID (IGREATERP) COMPILER::FRAME-ANNOTATE-BLOCK (COMPILER::BLOCK-CLOSED-OVER-P +) \UFS.REGISTER.GFS (>) COMP.UNBIND.VARS (OPT.JUMPCHECK) COMP.UNBOX (LITATOM OPT.CALLP) +\TEDIT.BASICFIND (IGREATERP GREATERP) \UFS.VALID.PROPP (SOME) \UFS.NEXTFILEFN (> < DSKP = ILESSP IEQP +DIRECTORY.PARSE) MSCHECKBOUNDFREE (SPECVARP) UNIX-STREAM-EOFP-NEW (< UNIX-GET-NEXT-BUFFER) +\ORIGTERMTABLE (GREATERP) IN/SCROLL/BAR? (INSIDE?) CHOOZ (ARRAYP STACKP TIMEREXPIRED? IGREATERP ILESSP + CL:FUNCALL STRINGP ZEROP) \UFS.FILEINFOFN (>) \IDLE.AUTHENTICATE (STRPOS) COMPILER::META-SUBST-VAR-REF + (CL:MEMBER) \INTERPRET-ARGUMENTS (< >= CL:CONSP) TESTRELATION (SOME) D-ASSEM::COMPUTE-JUMP-SIZE (<) +\VAMFreePageGroup (IGEQ GREATERP) LASTC (IEQP) \FIXLOCALNET (ILESSP) XCL::EXEC-CLOSEFN (PROCESSP +TTY.PROCESSP) POSTSCRIPT.PUTBITMAPBYTES (LESSP GREATERP IGEQ IGREATERP CL:PLUSP FMEMB) COMPAREFAIL ( +NUMBERP EVERY) EXTENDREGIONBOTTOM (IGREATERP) D-ASSEM::START-PC-FROM-NT-COUNT-LOCAL (FMEMB CL:ZEROP) +MSCHECKFNINBLOCK (MSFIND MEMB) DMCHAT.RIGHT (<) PROMPTFOREVALED (REGIONP) ADDNEWCOM (SELECTQ FMEMB) +FILLPOLYGON (EQUAL) FINDFN (LITATOM EXPRP EVALV) \PEEKREFILL (IGREATERP IGEQ ILEQ) \LOOKUPPORT ( +GREATERP >) D-ASSEM::START-PC-FROM-NT-COUNT (CL:ZEROP) BRKDWNINIT (GREATERP) INTERPRET/MARK/FORMAT ( +EQMEMB FMEMB) XCL::UNDOHOOK (CL:ATOM) COMPILER::FRAME-ANNOTATE-CALL (COMPILER::LAMBDA-P) /DSUBST ( +LITATOM EQUAL) \POLYSHADE.YSCAN.IP (IEQP ODDP ILEQ IGEQ) PFI.HANDLE.RPAQQ (BOUNDP) BMOBJ.GETFN4 (IEQP) + EDITMODE (DISPLAYSTREAMP) PROPLISTP (LITATOM) LATTICE/BREAK/CYCLES (FMEMB) FORWARD.DELETE.TO ( +OVERFLOWLINE?) D-ASSEM::RESOLVE-JUMPS (D-ASSEM::REDUCE-UNCERTAINTY D-ASSEM::DTAG-P) \10MBWATCHER ( +ILESSP) \BLTSHADE.GENERICPRINTER (ZEROP) \SUBREAD (\INTERMP SKIPSEPRCODES IGREATERP ILEQ PROPRB +RBCONTEXT) \DL.MARK.PAGES.UNAVAILABLE (GREATERP) WHATIS (FMEMB) \CLEARWORDS (ILEQ IGREATERP) +TREEGRAPHNODE (ATOM NUMBERP >=) \PS.BOUTFIXP (MINUSP LESSP) UPPERCASEARRAY (GREATERP) \DL.UNMAPPAGES ( +GREATERP) FIND-EDIT-LOCATION-TAIL (EQUAL) ONEDINSPECT.SCROLLFN (EQP FLOATP) /RPLACD (LITATOM) /RPLACA +(LITATOM) DETACHWINDOW (ATTACHEDWINDOWS) HARDCOPYGRAPH (OPENP WINDOWP GREATERP) \TEDIT.FIND.FIRST.LINE + (ZEROP IGREATERP LESSP ILEQ IEQP) \SEQUIN.HANDLE.INPUT (ILESSP IGREATERP) TERM.UP (<) +SEDIT::CLOSE-NODE-LITATOM (STRINGP) \LFGenerateFiles (IGREATERP SELCHARQ CL:ZEROP) DIRECTORY.NEXTFILE +(STRINGP LITATOM U-CASEP) COMP.BIND.VARS (IGREATERP) \CREATEW1 (NUMBERP IGREATERP) FIND.MATCHING.QUOTE + (IGREATERP COMPLEXCHARP) FILLRECTANGLE.IP (>) RELDRAWTO (ZEROP) D-ASSEM::SPLICE-IN-JUMPS (D-ASSEM::DTAG-P +) EDITBMRESHAPEFN (<) GRAPHOBJ.PUTALIGN (MEMB) SHOWSTACKBLOCKS (IGREATERP) SUBFIELDCREATE (SOME) +\UFS.ABORT.CL-DIRECTORY (>) PURGEHISTORY (LITATOM) READTABLEPROP (LESSP GREATERP) SEDIT::EDIT-SELECTION + (CL:FUNCALL) GENERATOR (STACKP) POSTSCRIPT.SHOWACCUM (EQP) SKIPSEPRCODES (IGREATERP) COMPARE1 ( +COMPARE1) EXTENDREGION (IGREATERP) MSCHECKBLOCKS (MEMB) \NSFILING.REMOVEQUOTES (STRPOS) \LFEventFn ( +DEFINEDP \LFDirectoryP) \NSRANDOM.READ.SEGMENT (< DIRTYABLE >) XCL::WALK-DECLARATIONS (CL:STRINGP +CL:LISTP XCL::GET-WALKER-TEMPLATE) COMP.CHECK.VAR (COMP.GLOBALVARP LITATOM) COMP.FLOATUNBOX (OPT.CALLP + NUMBERP EQUAL) \TEDIT.MENU.WHENHELDFN (ATOM) \VAMAllocPageGroup (\VAMEnoughSpace) LAYOUTGRAPH (FASSOC +) INSPECT/TOP/LEVEL/LIST (GREATERP) \UFS.ABORT.DIRECTORY (>) \SETNEWTIME0 (IGREATERP IGEQ) +\UFSMakeUnixFormatName (GREATERP) FORMAT-PRINT-NAMED-CHARACTER (<=) UNIX-BACKFILEPTR-NEW (>) SKREAD ( +IGREATERP) TEDITMENU.STREAM (EQUAL) MIN/BOTTOM (LESSP) DMCHAT.HANDLECHARACTER (DMCHAT.ADDRESS >= <) +INFILECOMSMACRO (EVERY FMEMB SOME) CL:MAKE-CONCATENATED-STREAM (STREAMP) I.S.OPR (ATOM EQUAL) +\UFSParse-Directory (>) MSCHECKBLOCK (MEMB SPECVARP GETPROP CL:CONSTANTP GET BOUNDP) +CL:MAKE-STRING-INPUT-STREAM (CL:ZEROP) MBUTTON.SET.FIELD (ZEROP) LISPXREAD (IMAGESTREAMTYPEP NLSETQ) +CONDITIONS::%%RESTART-PRINTER (CL:STRINGP) \ASSURE.FPTOVP.PAGE (IGREATERP) \INSPECT.STORE.FATCHAR ( +CONFIRM-SET) FB.SUBITEMP (FB.SUBITEMP) \TEDIT.HARDCOPY.DISPLAYLINE (ILEQ ZEROP GREATERP IEQP IGREATERP + SMALLP IGEQ) CREATEW1 (NUMBERP DISPLAYSTREAMP IGREATERP) SETCOLOR.IP (STREAMPROP RGBP LITATOM EQUAL) +TWODINSPECT.SCROLLFN (EQP FLOATP) INIT/NODES/FOR/LAYOUT (FMEMB EQMEMB) CL:KEYWORDP (CL:SYMBOLP) +\UFS.PARSE.BODY (>) CL:PARSE-INTEGER (CL:STRINGP SMALLP ILESSP IGREATERP < > >= <=) PFI.ESTIMATE.SIZE1 + (>) MSPRGDWIM (LITATOM) COMPILER::META-EVAL-CALL (COMPILER::LAMBDA-P COMPILER::CALLER-NOT-INLINE +COMPILER::GLOBAL-FUNCTION-P CL:EQUAL CL:LISTP COMPILER::LITERAL-P) \MKINTEGER (IGEQ) PRIN2-LONG-STRING + (< IGREATERP > >=) \IDLE.OUT (SMALLP GREATERP \SECONDSCLOCKGREATERP) LISPX/ (SELECTQ EQMEMB) +COMP.TOPLEVEL.COMPILE (GETPROP VARIABLE-GLOBALLY-SPECIAL-P FMEMB) CMLRDTBL (GREATERP) \TEXTBACKFILEPTR + (IEQP ZEROP) FINDATOM (EXPRP LITATOM) CLOSE.WINDOWS.IN.REGION (INTERSECTREGIONS) DUMPGRAPH (FONTP) +MIN/LEFT (LESSP) RIGHTW.REPAINTFN (ILESSP) LISPX (FGETD SYNTAXP LITATOM BOUNDP GETLIS CL:FUNCALL +HISTORYMATCH GETD SOME FNCHECK) PFI.ESTIMATE.SIZE (LITATOM MEMB) DECLARED-SPECIAL (FMEMB) +\AUTHENTICATION.FIND.SERVER (SELECTQ) \NSRANDOM.PREPARE.CACHE (GREATERP <= <) \TEDIT.CREATE.LINECACHE +(GREATERP) FILEPKGCOM (GREATERP) CHDIR (\UFSCHDIR-C) CL:APPLY (LESSP) \FLUSHPAGE (ILEQ IGREATERP +.VMEM.CONSISTENTP.) LISPXTYPEAHEAD (READP) \RSTRING2 (IGREATERP \EOFP) \POLYSHADE.XSCAN.IP (IEQP ODDP +ILEQ IGEQ) BMOBJ.GETFN3 (IEQP) ADVISEWDS (ILESSP IGREATERP) \PUTBASEFIXP (IGEQ) READGRAPH (GREATERP) +READOCT (READP EQUAL IGEQ ILEQ) READ-EXTENDED-TOKEN (\EOFP IGREATERP ILEQ) \SETMACROSYNTAX (FMEMB ILEQ +) MOUSESTATE-EXPR (EVERY ATOM) STORETABLE (FMEMB) \VFMInsertPageGroup (MESAEQUAL GREATERP EQL) +\SMASHSTRING (IGREATERP GREATERP) \READTABLEP.DEFPRINT (IGREATERP) \EDITBMHOWMUCH (IGREATERP) +CL:COMPILER-LET (CL:CONSP) IFCDECLARE (\STKSCAN FMEMB) CONCATLIST (STRINGP LITATOM) BREAK0 ( +STRING.EQUAL) \ATBLSET (BOUNDP GREATERP) \TEXTSETFILEPTR (IEQP ILESSP IGREATERP) DEFPRINT (FIXP) +ERASE.TO.END.OF.PAGE (>) MSINIT (FMEMB FIXP) FW-REPAINTFN (OPENP) SI::COMPILED-FUNCTION-ARGLIST ( +CL:STRINGP) ADDCHAR (COMPLEXCHARP IGREATERP) IMAPLIST (ILEQ) PRINTLEAF (IGREATERP EVENP IGEQ) +COMP.COMPILER-LET (CL:CONSP) \INSPECT.STORE.32 (CONFIRM-SET) SI::COMPILED-FUNCTION-DEBUGGING-INFO ( +CL:ZEROP =) DOUSERFNS2 (FMEMB) READ/NODE (MOUSESTATE INSIDEP) \CLIPANDDRAWLINE1 (IGREATERP IGEQ FMEMB) + PRINDOTP (> >=) TWODINSPECT.ARRANGEWINDOWS (POSITIONP ILESSP LESSP) \NSRANDOM.STREAM.CHANGED ( +DIRTYABLE) XCL::WALK-BINDINGS-1 (CL:SYMBOLP) INSPECT/AS/FUNCTION (STACKP) COMP.BOX (LITATOM OPT.CALLP) + INTERSECTREGIONS (GREATERP IGREATERP ILESSP IGEQ) SI::CLEAN-UP-CL-ARGLIST (CL:MEMBER CL:CONSP) +ERRORMESS1 (ATOM STRINGP) \SELECTREALPAGE (.LOCKABLERP. SELECTQ ILEQ IGREATERP ILESSP IGEQ) +SI::GET-STORED-ARGLIST (CL:ATOM) SUPERPRINT/WRAPPER (>) NLAMBDAFNP (EQMEMB FGETD) HISTORYSAVE (ILESSP +IGREATERP ARCHIVEFN LISTGET1) POSITION (IGREATERP) \MAIKO.DISPLAYLINE (ZEROP ILEQ IGEQ GREATERP IEQP +IGREATERP SMALLP) READBQUOTECOMMA (SYNTAXP) \LFParseFileName (CL:ZEROP) \TEXTPEEKBIN (ILESSP \EOFP +ZEROP) SI::FUNCTION-WRAPPER-INFO (CL:SYMBOLP) DOUSERFNS (FMEMB) OVERFLOW? (ILESSP AT.END.OF.LINE) +\INSPECT.STORE.CHAR (CONFIRM-SET) LOGIN (STRPOS) MAKE-READER-ENVIRONMENT (SMALLP ILESSP IGREATERP) +\TEDIT.PUT.SINGLE.CHARLOOKS (ZEROP) REALSTKNTH (ILESSP IGREATERP \REALFRAMEP ILEQ) XCL::WALK-BINDINGS-2 + (CL:SYMBOLP) CANONICAL.HOSTNAME (STRPOS NUMBERP SMALLP < LITATOM) SI::PARSE-CL-ARGLIST (CL:MEMBER) +ONEDINSPECT.ARRANGEWINDOWS (POSITIONP ILESSP LESSP) MOVETOUPPERLEFT (\ILLEGAL.ARG) +\INTERNAL/GETPASSWORD (LITATOM STRPOS STRINGP) FB.COMMANDSELECTEDFN (MEMBER FB.SUBITEMP +FB.MAKE.BROWSER.BUSY OPENWP) PRIN2STRING (SELECTQ IMAGESTREAMP ILESSP IGREATERP) ADDTO (EQMEMB) +BACKSKREAD (IGREATERP COMPLEXCHARP READTABLEPROP) DECLARERECORD (FMEMB) \NSFILING.LOOKUP.CACHE (EQUAL +STRING-EQUAL) ETHERPORT (FIXP) \INSPECT.STORE.16 (CONFIRM-SET) GRAPHOBJ.GETALIGN (MEMB) +SI::RESTORE-CALLS (REMPROP) COMP.TRANSFORM (COMP.PREDP) \8859OUTCHARFN (IGREATERP) MAKECREATELST1 ( +SMALLP GREATERP) COMP.ASET (LITATOM EQUAL FMEMB) CL:EVAL-WHEN (FMEMB) FONTCREATE (IMAGESTREAMP FIXP +STRINGP) SI::ADD-CHANGED-CALL (CL:REST CL:MEMBER) \TEDIT.CHARDELETE (ZEROP ILEQ) +\NSFILING.ADD.TO.CACHE (EQUAL GREATERP) COMP.AREF (LITATOM EQUAL FMEMB) MAX/RIGHT (GREATERP) +\SEND.EXPEDITED.XIP (GREATERP TIMEREXPIRED? IEQP ILEQ IGEQ SELECTC EQNSHOSTNUMBER) BESTPUPADDRESS ( +FIXP GREATERP IGEQ ILESSP ILEQ IGREATERP) MIDDX (IGREATERP ILESSP) IFCPROPSCAN (LITATOM ASSOC FMEMB) +\INTERNAL/SETPASSWORD (IGREATERP GETD) UNDOLISPX2 (MAPC) INSPECTW.REPAINTFN (IGREATERP +REGIONSINTERSECTP) LLSH (IGREATERP ILEQ TYPENAMEP CL:INTEGERP) \POLYSHADE.DISPLAY (IEQP ILEQ IGEQ +ILESSP) CHAT.CHOOSE.EMULATOR (FIXP) MAX/TOP (GREATERP) FILL.INITTBLE (FIXP FMEMB) EDITBMSCROLLFN ( +FLOATP ILESSP IGREATERP) SHOWWTITLE (ZEROP) TTBIN (METACHARP) RAIDROOTFRAME (ALLOCAL) SEDIT::INITIALIZE + (FMEMB) MINIMUMMAINWINDOWSIZE (LITATOM) \LET*-RECURSION (CL:CONSP FMEMB VARIABLE-GLOBALLY-SPECIAL-P) +\INVALID.SYMBOL (CL:STRINGP) SEDIT::INSERT-CHANGED (ILEQ) \PFEnsureInitialized (\PFVersionOK) +TEDIT.FORMATTEDFILEP (ATOM EQFMTSPEC EQCLOOKS) TEDIT.REMOVE.MENUITEM (LITATOM STRINGP EQUAL MEMBER) +TTYIN (STRINGP LITATOM < > GUESTUSER?) \INSPECT.STORE.8 (CONFIRM-SET) \TEDIT.HARDCOPY.FORMATLINE (ILEQ + ZEROP ODDP EVENP GREATERP IGREATERP SMALLP FIXP MEMBER IGEQ ILESSP) \INTERACTIVE.CLOSEW (FMEMB) +MAKEINITBFS (GREATERP) TTSKREAD (IGREATERP COMPLEXCHARP FIXP READTABLEPROP) COMPILER::FIND-SEGMENT ( +CL:MEMBER) MSPRGLAMBDA (CL:SYMBOLP FMEMB CL:CONSP CL:ZEROP CL:SET-DIFFERENCE CL:PLUSP MSFINDP) REMOVE +(EQUAL) \LOGIN.READ (SELECTQ STRPOS) GETCHATWINDOW (WINDOWP) OPT.INITHASH (HARRAYP) SEDIT::ATOM-POINT-TYPE + (IGREATERP GREATERP) \LFNormalizeVolumeName (STRPOS) TTYIN.SETUP (IMAGESTREAMTYPEP FMEMB) PRINTADDRS +(GREATERP EVENP PTRGTP) HISTORYFIND (EQUAL NUMBERP ILESSP IGREATERP SOME FMEMB) COMP.ATTEMPT.COMPILE ( +GETD) SMASHPATTERN (LITATOM) PRINTFILETYPE (IMAGESTREAMP STRINGP OPENP RANDACCESSP) TTYIN.FINISH ( +IGREATERP COMPLEXCHARP EMPTY.BUFFER FIND.MATCHING.WORD EQMEMB LITATOM) GRIDYCOORD (IGEQ) +GRAPHNODE/BORDER/WIDTH (FIXP IGEQ) \ALLOCWIDTHTOGROUPEDWINDOW (LESSP) \ITEM.WINDOW.COPY.HANDLER ( +.COPYKEYDOWNP. MOUSESTATE) TTYINREAD (DISPLAYSTREAMP LINEBUFFER-SKIPSEPRS) TB.REMOVE.ITEM (>=) +\MEDW.BLTCHAR (IGREATERP ILESSP FMEMB) TERM.TAB (IGEQ) ESPATTERN (FMEMB) DEFC (GETD) \DSPXPOSITION.PSC + (EQUAL) \MEDW.XOFFSET (NUMBERP) XCL::WALK-ARGLIST (CL:SYMBOLP CL:CONSP) TTYIN1 (>= < SMALLP > FIXP +EQMEMB EMPTY.BUFFER METACHARP SELECTC IGREATERP ON.FIRST.LINE EMPTY.LINE ENDREAD? TYPEAHEAD? DEFINEDP +BREAK.OR.SEPRP COMPLEXCHARP DO?CMD AT.END.OF.BUF ON.LAST.LINE TTSKREAD TTYIN.BALANCE GUESTUSER? MEMB) +WTFIX1 (EQUAL STRPOSL CLISPNOTVARP EVERY MEMB CLISPFUNCTION? FIXLAMBDA DWIMUNSAVEDEF WTFIXLOADEF +NUMBERP MINUSP CLBINARYMINUS? GETHASH SOME FGETD) \MEDW.YOFFSET (NUMBERP) \VFMGetPageGroup (EQL) +\TEXTEOFP (IEQP ZEROP) SETINITIALS (STRING-EQUAL) MAXMENUITEMWIDTH (BITMAPP) FW-BUTTONEVENTFN ( +MOUSESTATE) REGIONSINTERSECTP (IGREATERP) SEDIT::COPY-SELECTION-DEFAULT (GREATERP) TTDELETELINE ( +EMPTY.BUFFER EMPTY.LINE AT.END.OF.BUF AT.END.OF.LINE) \ORIG-INVALID.SYMBOL (STRINGP) +\TFBRAVO.READ.PARALOOKS (NUMBERP IGREATERP IEQP) \TEDIT.FIND.OVERLAPPING.LINE (ILEQ) TTYIN.READ ( +COMPLEXCHARP SELCHARQ SELECTC IGREATERP \RUNCODED SKIPSEPRS) MAXIMUMMAINWINDOWSIZE (LITATOM) +GRIDXCOORD (IGEQ) \ALLOCHEIGHTTOGROUPEDWINDOW (LESSP) TTWAITFORINPUT (\SYSBUFP LASTMOUSESTATE >= < +EMPTY.BUFFER > TIMEREXPIRED?) \PFFindRootDirEntryNum (GREATERP EQL) MOVENODE (EQUAL) FONTCLASS (ATOM) +UNIX.SENDSCREENPARAMS (UNIX.PARAMS.CONFIRM STREAMPROP) \LINEWITHBRUSH (LITATOM FMEMB IGREATERP IGEQ +ILESSP ILEQ) PROMPTFORWORD (TERMTABLEP GREATERP EQMEMB CHARCODEP LITATOM FMEMB DSPRUBOUTCHAR) BKBUFS ( +READP) RAIDSTACKCMD (ILESSP) PROVIDE.PROMPTING.WINDOW (TTY.PROCESSP DISPLAYSTREAMP HASTTYWINDOWP +OPENWP WAIT.FOR.TTY) ERASEPROPS (SOME LITATOM MEMB) CLBUFS (READP STREQUAL) \TEDIT.FIXCHANGEDLINE ( +IEQP ILESSP IGEQ ILEQ APPLY* IGREATERP) PUTSEQUIN (SELECTC ILESSP ILEQ) INFILECOMSVAL (MEMBER LITATOM +EQUAL) \TEDIT.LINECACHE (IGEQ) \ALLOCATE.ETHERPACKET (ILESSP) \POSSIBLECOLOR (IGEQ ILEQ) +\TEDIT.SET-TOTLEN (GREATERP) \CCLOSURE.DEFPRINT (IGREATERP STRINGP) \TFBRAVO.READ.CHARLOOKS (NUMBERP +IGREATERP) HELPSYS (FGETD) \DEFINEDP (LITATOM) POSTSCRIPT.BITMAPSCALE (GREATERP LESSP) +\GET-COMPILED-DEFINITION (LITATOM) RINGBELLS (GREATERP) UNADVISE (EQUAL) \SPP.SKIPBYTES (IGREATERP) +\DSPYPOSITION.PSC (EQUAL) PFI.DEFAULT.HANDLER (MEMB LITATOM STRINGP) HLSP (NUMBERP IGREATERP FLOATP) +\TEDIT.OBJECT.SHOWSEL (INSIDE?) READHASHMACRO (DIGITCHARP IGEQ MEMQ CMLREAD.FEATURE.PARSER) +FW-AFTERMOVEFN (ILESSP IGREATERP) RGBP (SMALLP IGREATERP) FORMAT-PLURAL (EQL) TERM.SMOOTHSCROLL ( +GREATERP) SEDIT::STRING-OFFSET (GREATERP ILESSP) \PFGetLVPage (STRING-EQUAL) NEGSHADE (NUMBERP <) +FB.SHAPECOMMAND (>) WINDOWPROP (IGREATERP) \MAKESPACEFORLOCKEDPAGE (ILEQ IGREATERP) \TEDIT.BLTCHAR ( +ILESSP) DASHINGP (NUMBERP) SEARCHPDL (APPLY*) SUPERPRINT/COMMENT (> STRINGP SUPERPRINTEQ IMAGESTREAMP +<) YMAPLIST (ILESSP) \MOVETO.PSC (EQP) RAIDCOMMAND (ILEQ FIXP GETD RECLOOK) SETUPPAGEMAP (GREATERP) +WORDSPERNAMEENTRY (FMEMB) INSPECT/ARRAY (ARRAYP GREATERP) DISPLAYAFTERENTRY (GETD) +ESTIMATE-DIMENSIONALITY (GREATERP) \MAKE.ITEMS.VERT.ORDER (GREATERP) DISPLAYBEFOREEXIT ( +DISPLAYSTARTEDP) MAXMENUITEMHEIGHT (BITMAPP) LISPXUSEC (NUMBERP STRPOS PRIN2 PRIN1 LITATOM STRINGP +NLSETQ EDITFINDP) \INSPECT.COMPUTE.TITLE (LITATOM) SUPERPRINT/SPACE (<) MSPRGTEMPLATE1 (APPLY* +CL:KEYWORDP) CMLREAD.FEATURE.PARSER (CL:CONSP FMEMB) COMPILER::EXPAND-NESTED-PROGNS (COMPILER::PROGN-P +) CL:MAKE-SYMBOL (CL:STRINGP) SUBPRINT/WRAPPERTAIL (< FITP) FILL-VECTOR (<=) \GETUFNENTRY (LITATOM) +\DONEWEPHEMERALPAGE (IGREATERP) INFILECOM (CL:SYMBOLP LITATOM FMEMB EQMEMB) CHARACTER.READ (IGREATERP) + SEARCH-FOR-EVENT-NUMBER (EQL) MAXIMUMWINDOWSIZE (LITATOM) GRID (ZEROP NUMBERP MINUSP LESSP GREATERP +WINDOWP) \VFMClearIntervals (GREATERP) CHAT (CL:MEMBER PROCESSP PROCESSPROP WINDOWPROP) PURGENSFONTS ( +MEMB EQMEMB >) \NSFILING.OPENFILE (OPENED EQUAL) BYTEBLOCKCOMPILE2 (FMEMB) UNIONREGIONS (GREATERP +LESSP) CALLSCCODE (FIXP SMALLP GREATERP FMEMB ILESSP) EXCHANGEPUPS (IEQP TIMEREXPIRED?) +COPIEDFILEMATCH (COPIEDFILEMATCH) DEFMACRO-LAMBDA-LIST-KEYWORD-P (FMEMB) SEGMENT.LENGTH (COMPLEXCHARP) + COURIER.READ (LITATOM IGREATERP IEQP GREATERP) GRAPHEDITEVENTFN (INSIDE? SHIFTDOWNP) \SUBFNDEF ( +LITATOM GREATERP ILESSP IGREATERP) \SHOWMENULABEL (\MENUSUBITEMS BITMAPP) CL:FUNCTION (CL:SYMBOLP) +INSPECT/ATOM (NONSYSPROPNAMES GETPROPLIST MEMB LITATOM EQUAL) \GET.IOCB (IGREATERP) MAPHASHFILE ( +GREATERP READSTBYTE) \CODEBLOCKP (>= \VALIDADDRESSP) DEFAULT.BACKGROUND.COPYFN (MOUSESTATE ZEROP) +CL:FUNCTIONP (CL:SYMBOLP CL:COMPILED-FUNCTION-P CL:CONSP CLOSURE-P) ADJUSTLINE.AND.RESTORE (IGREATERP) + NSDISPLAYSIZE (CL:MEMBER STRING-EQUAL) \DSPFONT.PSC (MEMB) MSPRGRECORD (FMEMB) UNIX.SETDISPLAYTYPE ( +UNIX.PARAMS.CONFIRM READP TIMEREXPIRED?) SEDIT::DEFAULT-PACKAGE (CL:SYMBOLP CL:KEYWORDP) COMP.SPREAD ( +FMEMB LITATOM CL:SYMBOLP) DIGITBASEP (GEQ LESSP GREATERP LEQ) TEDIT.FORMATTEXTBOX (IGREATERP LISTGET +ZEROP ILESSP) \PROMPTFORWORDERASE (IEQP) FB.INFOMENU.WHENSELECTEDFN (FMEMB) \PROMPTFORWORDBIN (FIXP +READP \EOFP TIMEREXPIRED? TTY.PROCESSP) FM.CHANGELABEL (WINDOWP OPENWP) \DSPMOVELR (CHARCODEP +IGREATERP ILESSP) READPAGEMAP (GREATERP) TEDIT.FORMATFOLIO (IGREATERP ILESSP) PFI.MAYBE.NEW.PAGE ( +DISPLAYSTREAMP > >=) \RELEASEWORKINGSET (\FLUSHVM GREATERP) \PROMPTFORWORDBS (DSPRUBOUTCHAR) +UPDATE/MENU/IMAGE (\MENUSUBITEMS IGREATERP ILESSP) OPENHASHFILE (MEMB) \TEDIT.SELECT.CHARACTER (SMALLP + FMEMB) \10MBSENDPACKET (EQNSADDRESS.HOST) FILL.CONT (GREATERP) DECODE.WINDOW.ARG (WINDOWP REGIONP +NUMBERP POSITIONP) CHARCODE.DECODE (ATOM STRINGP STRING.EQUAL < >= FIXP) DSKDISPLAY ( +\PFEnsureInitialized) \PAGEDBACKFILEPTR (APPENDONLY) STRPOSL (LITATOM ILESSP IGREATERP) \MATCHPCS ( +GREATERP) \CREATECHARSET (IGREATERP FMEMB) \PFRemoveRootDirEntry (GREATERP) COMPUTE-MACRO-ARGS (CL:ATOM + CL:CONSP) \NSFILING.CLOSE.CONNECTIONS (SELECTQ \SECONDSCLOCKGREATERP) MACROS.GETDEF (FMEMB) +PROCESS-EXEC-ID (STRPOS) TRACKCURSOR (EQUAL) \CLIPANDDRAWLINE (IGREATERP FMEMB IGEQ GREATERP) +CHARWIDTHY (SMALLP) \DSPPRINTCHAR (IGREATERP) TEDIT.FORMATHEADING (EVAL IGEQ) +SEDIT::PARENTHESIZE-CURRENT-SELECTION (GREATERP SEDIT::DEAD-NODE?) MSUSERVBTABLES (BOUNDP HASHARRAYP +EQMEMB) SUPERPRINT/COMMENT2 (IGEQ LITATOM SELCHARQ SELECTQ STRINGP) \STRINGWIDTH.GENERIC (LITATOM +IGREATERP STRINGP) EXPANDOPENLAMBDA (ATOM) \INSPECT.STORE.PTR (CONFIRM-SET) MAPPAGES (IGREATERP IEQ) +INSPECT/TYPELESS (\VALIDADDRESSP) GRAPHOBJ.CHECKALIGN (SELECTQ GETNODEFROMID) COMP.GETBASE (OPT.CALLP +FIXP ILESSP IGREATERP) \CH.FIND.ORG.SERVER (STRING-EQUAL) COMPILER::CLOSURE-ANNOTATE-TAGBODY ( +COMPILER::SEGMENT-TAGS COMPILER::TAGBODY-CLOSED-OVER-P COMPILER::TAGBODY-NEW-FRAME-P) TERM.RIGHT (<) +MSBINDVAR (LITATOM FMEMB) START.OF.PARAGRAPH? (COMPLEXCHARP) \BACKCOLOR.DISPLAY (BITMAPP ILEQ FIXP) +PRINTCOMSTRAN (LITATOM SELCHARQ FIXP MINUSP) \FIXLINELENGTH.PSC (GREATERP) MBUTTON.NEXT.FIELD.AS.ATOM +(ZEROP) \UNCOPY (GREATERP) \LASTNODE (LESSP) \BLTSHADE.DISPLAY (FMEMB ILEQ) UNIX-WRITE (IEQP) +PRINTCODE (LITATOM IGREATERP IGEQ GREATERP IEQP EQUAL NUMBERP FIXP SMALLP) \NSFILING.DESERIALIZE1 ( +TYPENAMEP) \SCALEDBITBLT.DISPLAY (WINDOWP BITMAPP) MAKEROOMFORPME (IEQ EVENP) PFI.HANDLE.EXPR (LITATOM +) TEDIT.FORMATPAGE (ILEQ IGREATERP IGEQ ILESSP) EDITBMBUTTONFN (INSIDE? ILESSP IGREATERP +LASTMOUSESTATE MOUSESTATE COLORDISPLAYP SELECTQ REGIONP TYPENAMEP) \BITBLT.DISPLAY (IGEQ WINDOWP FMEMB + WFROMDS WOVERLAPP ILEQ FIXP) PRINTCODENT (ILESSP IGEQ GREATERP FIXP SMALLP) GETPUP (TIMEREXPIRED?) +DELETETO1 (COMPLEXCHARP) \SPLITTREE (GREATERP ZEROP MINUSP LESSP) TEDIT.CURSORMOVEDFN (INSIDE? IGEQ +ILESSP) PRINT-EVENT-PROMPT (CL:CONSP) TYPEP (CL:CONSP) FONTUNPARSE (EQUAL LITATOM) \SEQUIN.PROCESS ( +\SEQUIN.HANDLE.INPUT \CLOCKGREATERP ILESSP) TTLOADBUF (< >=) VMEM.PURE.STATE (IGREATERP ARG) +\DRAWELLIPSE.DISPLAY (ILESSP NUMBERP < LITATOM FMEMB ILEQ IGEQ) DODIRCOMMANDS (ILESSP EVAL STRPOS +DELFILE STRING.EQUAL FIXP) SEQUENTIAL.PRETTYPRINT (<= FMEMB) CSUBST (SIMPLEP FMEMB RECORDWORD) +\DRAWLINE.DISPLAY (FMEMB BRUSHP BIGBITMAPP) \TEDIT.APPLY.PAGEFORMATTING (GREATERP) \CH.LOCATE.SERVERS +(\LOCATE.NSNET STRING-EQUAL) CLISPDEC1 (FMEMB FIXSPELL) \FILLCIRCLE.DISPLAY (NUMBERP ILESSP FIXP FMEMB + IGREATERP) FILL.XPER (GREATERP FMEMB) LISPXUSE (SELECTQ MEMBER) INSPECTW.REDISPLAY (NLSETQ) +INSPECT/DATATYPE (GREATERP) ADVISE (STRING.EQUAL) EDITDATE? (EQMEMB STRINGP LITATOM GREATERP STRPOS) +\XCCSOUTCHAR (\RUNCODED) INSPECTCODE (GETD CCODEP) CASE.PRETTYPRINT (>= FITP SEMI-COLON-COMMENT-P +FMEMB <= <) \SET.LASTVMEMFILEPAGE (IGREATERP) \DSPYPOSITION.DISPLAY (NUMBERP) FILL.TEST (GREATERP) +MSPRGMACRO (EQUAL MSFINDP) \DSPXPOSITION.DISPLAY (NUMBERP) \TEDIT.FILL.IN.CHARLOOKS.MENU (STRING-EQUAL + FONTP ZEROP ILESSP IGREATERP IGEQ) ENDREAD? (AT.END.OF.TEXT SELCHARQ IGREATERP COMPLEXCHARP) PREPLOOP + (NUMBERP) MAKEINITLAST (FIXP IGEQ GETHASH) COPIEDFILEPATTERN (EQUAL) COMP.LOOKUPVAR (COMP.GLOBALVARP) + PROG1.PRETTYPRINT (>= FITP) \TEDIT.FORMAT.FOUNDBOX? (IEQP) \GETREGION.CHECKOPPT (IGREATERP ILESSP +POSITIONP) \DSPRIGHTMARGIN.DISPLAY (NUMBERP) FB.NEWINFOCOMMAND (OPENWP LESSP) COMPILE! (LITATOM +ARGTYPE) CH.PROPERTY (LITATOM) SETFONTDESCRIPTOR (FIXP) FB.ALLOW.ABORT (OPENWP) \DRAWCIRCLE.DISPLAY ( +NUMBERP ILESSP LITATOM FMEMB ILEQ IGEQ IGREATERP) SUPERPRINT0 (CL:SYMBOLP FIXP ILESSP) CONCAT (STRINGP + LITATOM) PROGV.PRETTYPRINT (FITP) HPRINT (HARRAYP RANDACCESSP) \DRAWLINE.PSC (NUMBERP ZEROP LESSP) +\FONTSYMBOL (LITATOM STRINGP) \DSPLEFTMARGIN.DISPLAY (NUMBERP) DUMPINITPAGES (GREATERP RANDACCESSP) +MSPRGE (LITATOM FMEMB SOME FGETD MSFINDP EQUAL NLAMBDAFNP MSPRGMACRO) NTH.RELATIVE.COLUMN.OF ( +IGREATERP ILESSP COMPLEXCHARP) \UTF16.BACKCHARFN (\BACKFILEPTR) XCL::VARIABLE-LEXICALLY-BOUNDP (BOUNDP +) PRINTPROG (LITATOM ILEQ ILESSP) FM.TOPGROUPID (WINDOWP) \FONTFACE (\FONT.COMPARESYMBOL LITATOM +STRINGP STRPOS) %%SET-ARRAY-OFFSET (%%ONED-ARRAY-P %%TWOD-ARRAY-P %%GENERAL-ARRAY-P) CREATEFIELDS ( +ASSOC FMEMB) \FONT.SYMBOLMEMB (\FONT.COMPARESYMBOL) COURIER.EXPEDITED.CALL (GREATERP) +%%SET-ARRAY-TYPE-NUMBER (%%ONED-ARRAY-P %%TWOD-ARRAY-P %%GENERAL-ARRAY-P) SUBPRINT (LITATOM FMEMB +SUPERPRINTEQ FGETD ATOM BOUNDP BACKARROWP FITP) \DOVMEMFULLINTERRUPT (>=) CLISPLOOKUP1 (FMEMB ATOM) +\NSFILING.AFTER.LOGIN (STRING-EQUAL) \DSPLINEFEED.DISPLAY (NUMBERP) \PFCurrentVol (EQL) SUBPRINT1 ( +LITATOM) \REGIONOVERLAPAREAP (IGREATERP) \FONT.SYMBOLASSOC (IGEQ ILEQ \FONT.COMPARESYMBOL) +DIRPRINTNAME (> <= GREATERP) \MAP-CODE-LITERALS (FIXP SMALLP GREATERP) \DRAWCURVE.PSC (NUMBERP ZEROP +FLOATP GREATERP) \FONT.COMPARESYMBOL (LITATOM IGEQ ILEQ IGREATERP) CHECKIFPAGE (EQUAL) DSFIT1 (ILESSP +DSFIT2) PAINTW (IEQP LASTMOUSESTATE INSIDE?) \IDLE.TIME (ILESSP GREATERP) PRINTSQ (IGEQ EQMEMB) +SETUPPUP (IGEQ) INSPECT/HUNK (GREATERP) UTF16BE.INCCODEFN (SMALLP) FIND-HISTORY-EVENTS (FMEMB) +BACKARROWP (STRPOS) \AREAVISIBLE? (\AREAINREGIONP \REGIONOVERLAPAREAP) UNIX.HOST.FILTER (STRING.EQUAL) + XCL::VARIABLE-SPECIAL-P (BOUNDP) EDITADDNODE (POSITIONP) CACHEMACRO (TYPEP) XCL::VARIABLE-LEXICAL-P ( +BOUNDP) SPP.CLEARATTENTION (\SPP.PREPARE.INPUT) FB.NEWPATTERNCOMMAND (FB.MAYBE.EXPUNGE) DSFIT2 ( +SUPERPRINTEQ ILESSP DSFIT2 ILEQ) \IDLE.EXIT? (MEMB \IDLE.IS.PREVIOUS \IDLE.ISMEMBER \IDLE.AUTHENTICATE +) HISTORY-NTH (<= EXEC-EVENT-INPUT STRINGP) XCL::GET-IMPLICIT-KEY-HASH (TYPEP) SEGMENT.BIT.LENGTH ( +COMPLEXCHARP) SPP.FLUSH.TO.EOF (\SPP.PREPARE.INPUT) SHOW.MATCHING.PAREN (< TYPEAHEAD? FIXP) LLBREAK ( +GETPROP) TEDIT.BUILD.PCTB0 (GREATERP IGREATERP) \NSGC.COLLECT.DIRECTORIES (EQUAL STREAMP SELECTQ) +TEDIT.SCAN.LINE (GREATERP ILESSP SMALLP \TEDIT.WORD.BOUND IGEQ) MISSPELLED? (FMEMB APPLY*) +\PRINDATUM.TO.STRING (FLOATP) RENAME (HASDEF) LISPXPRIN2 (STRINGP) \TFBRAVO.SPREAD.LOOKS (IGREATERP) +\INSERTTREE (GREATERP ZEROP IEQP) UNDOLISPX1 (PRIN1) FB.YES-OR-NO-P (STRING-EQUAL) /SETATOMVAL ( +LITATOM) BRHL/MOVE/RIGHT (FMEMB ILESSP) /ADDPROP (LITATOM) \DRAWCIRCLE.PSC (NUMBERP ZEROP FLOATP) +ADDPME (IEQ EVENP LOCKEDPAGEP) TEDIT.FORMAT.HARDCOPY (OPENP IMAGESTREAMTYPE IGREATERP) +FORMAT-ROUND-COLUMNS (>) SAVEPUT (LITATOM) XCL::PUT-IMPLICIT-KEY-HASH (TYPEP) FM.WHICHITEM (WINDOWP +POSITIONP \FM.ONITEM IGEQ) FONTSET (CL:SYMBOLP MEMB LITATOM) SPACES (IGREATERP) /PUTPROP (LITATOM) +FIND.MATCHING.WORD (WORD.MATCHES.BUFFER) PRINTNUM (IGEQ) \DRAWELLIPSE.PSC (NUMBERP ZEROP FLOATP) +SIMPLEP (CONSTANTEXPRESSIONP MINUSP EVERY) TAB (IGREATERP) GETCHARBITMAP (CHARCODEP STRINGP LITATOM +TYPEP) \ABORT.BULK.DATA (\SPP.PREPARE.INPUT) MAPFILES (STRPOS FMEMB) MakeMenuOfImageTypes (ASSOC FMEMB +) MAKEWITHINREGION (ILESSP IGREATERP) \TEDIT.UPDATETREE (GREATERP) POSTSCRIPT.TEDIT (STRINGP) +\TEDIT.PARSE.CHARLOOKS.MENU (FMEMB) \CORE.RELEASEPAGES (IGEQ) \PFGetVols (GREATERP) FM.ENDEDIT ( +WINDOWP WINDOWPROP) FB.INSERT.SUBDIRECTORIES (EQ.DIRECTORYP) \CORE.UPDATEOF (IGREATERP IGEQ) +TOPATTACHEDWINDOWS (WINDOWPROP) \GETREGION.CHECKBASEPT (POSITIONP) PUTCHARBITMAP (STRINGP LITATOM) +SHOW.IP (IGREATERP IEQP) TEDIT.BUILD.PCTB2 (GREATERP IGREATERP ZEROP) \TEDIT.ADJUST.LINES (ZEROP +ILESSP APPLY* IGREATERP IGEQ) VARSBOUNDINFORM (LITATOM FMEMB EQMEMB EQUAL) TTYINPROMPTFORWORD ( +DISPLAYSTREAMP TTY.PROCESSP FIXP) CL:MAKE-HASH-TABLE (CL:SYMBOLP CL::%%EQCODEP) \VAMGetVAMPageFor ( +FIXP EQL) RPLSTRING (LITATOM > GREATERP) \CORE.DELETEFILE (FDEVOP) CLEARFILEPKG (SELECTQ ASKUSER) +HISTORY-ADD-TO-SPELLING-LISTS (LITATOM FGETD CL:CONSP CL:FBOUNDP CL:SPECIAL-FORM-P CL:SYMBOLP BOUNDP) +\CORE.GETINFOBLOCK (ILEQ) MB.MARGINBAR.TABTRACK (MOUSESTATE INSIDE? IEQP) CHAT.STARTUP (CL:MEMBER <=) +FM.EDITITEM (WINDOWP WINDOWPROP OPENWP) MAPFILES1 (>= STRING-EQUAL FMEMB) BKSYSBUF (LITATOM IGREATERP +STRINGP) XCL:UNBREAK-FUNCTION (CL:CONSP) \CORE.FINDPAGE (LEQ LESSP IGREATERP) RECORDBINDVAL (SIMPLEP) +NEGATE (NUMBERP STRINGP) GC-FILING-DIRECTORY (EQUAL) TEDIT.BUILD.PCTB1 (GREATERP IGREATERP ZEROP +EQCLOOKS EQFMTSPEC) TEDIT.SELECT.LINE.SCANNER (ILESSP ILEQ IGEQ IGREATERP IEQP ZEROP) +\TEDIT.UNIQUIFY.CHARLOOKS (EQCLOOKS) \CORE.GENERATEFILES (FIXP DIRECTORY.MATCH) \TFBRAVO.EOLS ( +GREATERP) CHECKFPTOVP1 (UNLESSRDSYS) PROCESS.EVALV (\DTEST) TRAPMAKE (ILESSP IGREATERP) CHECKFPTOVP ( +GREATERP) FONTCOPY (GREATERP) DIRECTORY.MATCH.SETUP (LEQ) \FILLCIRCLE.PSC (FIXP ZEROP EQL FLOATP +TEXTUREP BITMAPP) \CHTOPC (GREATERP IGREATERP) TYPE.BUFFER (COMPLEXCHARP) MDESCALE (IEQP) +FONTSAVAILABLE (IMAGESTREAMP FIXP) FONTPROFILE.ADDDEVICE (LITATOM) SEDIT::STRINGWIDTH (STRINGP +IGREATERP ILESSP) LISPDIRECTORYP (\LFDirectoryP) FM.EDITP (WINDOWP) NAMEFIELD (>) \TEDIT.PROCIDLEFN ( +INSIDE? SHIFTDOWNP KEYDOWNP PROCESSP) WARNUSER (EDITFINDP) \LOOKUPFONTSINCORE (EQUAL) SHOWCHARS ( +GREATERP IGEQ ILEQ) \IRM.WILDCARD (\IRM.WILD.MATCH) \CORE.GETFILEHANDLE (\FILE-CONFLICT) +UTF8.PEEKCCODEFN (ILESSP IGEQ) CURRENT.WORD (AT.START.OF.LINE IGREATERP COMPLEXCHARP SELECTC) +\RPLCHARCODE (STRINGP ILEQ IGREATERP \CHARCODEP SMALLP) SHAPEW (\USERFNISDON'T LESSP EQUAL) +\BLTSHADE.PSC (FIXP FLOATP <= TEXTUREP BITMAPP) COMPARE (COMPARELST) \TFBRAVO.READ.USER.CM (FILEPOS +NLSETQ NUMBERP) FONTMAPARRAY (EQUAL IGREATERP ILESSP GREATERP) \TFBRAVO.LCASER (IGREATERP ILESSP) +\CORE.GETFILEINFO (OPENED SELECTQ) \TEDIT.UNIQUIFY.PARALOOKS (EQFMTSPEC) RECORD (FMEMB) EQUALALL ( +GREATERP CL:ARRAY-HAS-FILL-POINTER-P) GNCCODE (STRINGP) LISPX/1 (ATOM FMEMB FGETD) GLCCODE (STRINGP) +\PRINTFPTOVP (ILESSP IGEQ) STREQUAL (STRINGP) TTDOTABS (AT.END.OF.BUF SMALLP ILEQ GREATERP) +FB.PROMPTFORINPUT (> LESSP) CLISPIFY (TAILP GETD) SHRINKBITMAP (EQP GREATERP) FW-ADJUST-REGION ( +IGREATERP) L-CASE (LITATOM IGREATERP IGEQ ILEQ STRINGP) U-CASEP (LITATOM IGREATERP IGEQ ILEQ STRINGP) +\UNITWIDTHSVECTOR (GREATERP) \MAKEBRUSH.DIAGONAL (GREATERP) \NSFILING.COPY/RENAME (\NSFILING.CONFLICTP + STRING-EQUAL \NSFILING.CHILDLESS-P TYPENAMEP) EDITBM (BITMAPP LITATOM REGIONP WINDOWP) SPP.OPENP ( +SPPSTREAMP) MOVEATTACHEDWINDOWS (OPENWP) LOADFNS (MEMB RANDACCESSP) SI::ARGUMENT-ERROR (< >) TEDIT.PUT + (TEDIT.FORMATTEDFILEP EQL IGREATERP RANDACCESSP) POSTEDITALISTS (FASSOC) COMP.FLOATBOX (OPT.CALLP) +CH.CANONICAL.NAME (STRPOS) \CREATEDISPLAYFONT (\GETCHARSETINFO) \TFBRAVO.PARAMNAMEP (EVERY) +\CORE.GETFILENAME (FASSOC) FONTPROFILE (MEMB LITATOM) \ROUTINGTABLE.INFOHOOK (GREATERP) SPELLFILE ( +STREQUAL DIRECTORYNAMEP FMEMB LITATOM FIXSPELL1) ALLOCHASH (NUMBERP LITATOM) COMPILER::CHECK-GLOBAL-CONSTANT + (BOUNDP CL:ATOM) \CREATE-REAL-CHARSET.DISPLAY (EQL) TEDIT (ATOM \TEDIT.ACTIVE.WINDOWP LISTGET) +\CORE.NAMESCAN (STRING-EQUAL UALPHORDER) \TEDIT.FIXINSSEL (IGEQ IGREATERP) CONSTANTEXPRESSIONP ( +LITATOM FMEMB GETD EQUAL NUMBERP) \PUTBASESTRING (STRINGP IGREATERP ILEQ LITATOM) TERM.GODOWN (>) +\CORE.UNPACKFILENAME (<) SEDIT::CFV-CLISP (ILESSP) \SFMAKEITALIC (GREATERP IGREATERP) CHAT.RECONNECT ( +LASTMOUSESTATE MENU) \PUTBASESTRINGFAT (GREATERP) AUTOCR? (IGREATERP AT.END.OF.LINE) SLITLOOP ( +IGREATERP ILESSP) GENSYM (IGREATERP ILESSP IEQP IGEQ GREATERP ILEQ NUMBERP) ALIGNMENTNODE (GREATERP +LESSP) \TEDIT.GET.CHARLOOKS.LIST (IGREATERP GREATERP) FM.SHADE (WINDOWP OPENWP) HCOPYALL1 (LITATOM +SMALLP FMEMB) TILE (IGEQ) BLTPATTERN.GENERIC (>) \BUILDSLUGCSINFO (GREATERP) \IFSERRORSTRING ( +STRING.EQUAL GREATERP) COURIER.WRITE (LITATOM STREQUAL IEQP) GetBcplString (ILEQ) COMPILE1A (EXPRP +SHOULD-BE-DWIMIFIED? TAILP) \CORE.OPENFILE (\IOMODEP) \NSRANDOM.CLOSEFILE (DIRTYABLE) ADDTEMPLATEWORD +(ASSOC) SetBcplString (IGREATERP) \TEDIT.TEXTBIN.FILESETUP (IEQP ZEROP ILESSP) CLISPATOM1 (FIX89A +FIX89 CLUNARYMINUS? ZEROP LITATOM NUMBERP MINUSP CLBINARYMINUS? CLISPNOTVARP CLISPFUNCTION? STOPSCAN? +FLOATP) \NSRANDOM.OPENFILE (OPENED) POSTSCRIPT.HARDCOPYW (<) \SETARG0 (IGREATERP) BQUOTIFY (NUMBERP +STRINGP) TEDIT.PUT.PCTB2 (IGREATERP EQFMTSPEC ZEROP EQCLOOKS IEQP GREATERP RANDACCESSP) TTADDTAB ( +GREATERP) FM.REDISPLAYMENU (WINDOWP WINDOWPROP) \DOHARDRETURN1 (ILEQ) HCOPYALL (HARRAYP) GETSETQ ( +LITATOM STRPOSL DWIMIFYREC) \MKATOM (GREATERP IGREATERP ILEQ IGEQ) \TEDIT.FIXDELSEL (IGEQ IGREATERP +IEQP) \CREATE.SYMBOL (IGEQ EVENP GREATERP FIXP) \GCSCANSTACK (IGEQ) \CORE.SETFILEPTR (APPENDONLY +ILESSP) BKSYSBUF.GENERAL (NUMBERP) \SCALEDBITBLT.PSC (GREATERP REGIONSINTERSECTP EQP) EXPANDBM (LESSP +<= MINUSP GREATERP) \PARSE.NUMBER (GREATERP IGREATERP ILESSP IGEQ ILEQ > FMEMB) \TEDIT.SHOW.CHARLOOKS +(<=) \CORE.BACKFILEPTR (APPENDONLY) \EXPECTED.FILE.TYPE (STRING-EQUAL) \CORE.SETEOFPTR (OVERWRITEABLE +ILESSP) \SEARCHFONTFILES (FMEMB MEMBER EQUAL) SEDIT::TRANSLATE-CHARS (IGREATERP SEDIT::ATOM-CHAR-ESCAPED + ILESSP) PURGEDSKDIRECTORY (\PFPilotVolumeP) FM.REDISPLAYITEM (WINDOWP WINDOWPROP OPENWP) +GRAPHOBJ.FINDGRAPH (INSIDE? LASTMOUSESTATE) \INCUSECOUNT (IGREATERP) SCANEXP (FMEMB FNTYP SOME) +BLTPATTERN (<= >= BITMAPP WINDOWP) COMP.STJUMP (OPT.JUMPCHECK) \INITATOMPAGE (GREATERP) +\CORE.GETNEXTBUFFER (OPENED ILESSP IGEQ) \PROMPT.FOR.PUP.NUMBER (FIXP ILEQ IGEQ) SIMPLETEXTEDIT ( +CL:Y-OR-N-P NLSETQ) \MAKEMDSENTRY (\GCDISABLED) \MOVEFRAME (> \EXTENDSTACK) DO-APPLY-EVENT ( +CL:MACRO-FUNCTION) DBG::%%RELEASE-STACK-DATUM (STACKP CL:LISTP) \ALLOCBLOCK (ILESSP IGREATERP ILEQ) +\SETUPUSERSTACK (IGREATERP) SLICESET (ILESSP) \NSFILING.NEXTFILE (DIRECTORY.MATCH) +TEDIT.GET.CHARLOOKS0 (IGREATERP GREATERP) APPENDINTEGER.IP (ILEQ LESSP) SEDIT::CONTAINS? (ILESSP ILEQ) + COMPILER::RESOLVE-VARIABLE-BINDING (COMPILER::LOCAL-CONSTANT-P CL:CONSTANTP CL:MEMBER +COMPILER::ENV-PROCLAIMED-GLOBAL-P VARIABLE-GLOBAL-P COMPILER::ENV-PROCLAIMED-SPECIAL-P +VARIABLE-GLOBALLY-SPECIAL-P) SPELLFILE.SPELL (FIXP IGREATERP) \FONTFILENAME.OLD (FIXP <) +TTYIN.SHOW.?ALTERNATIVES (SELECTC IGREATERP READTABLEPROP) MBUTTON.FIND.NEXT.BUTTON (ATOM) +NEAREST/MULTIPLE (IGREATERP) \FONTFILENAME (FIXP <) SCANDEFINEQ (IEQP MEMB FMEMB) +BLTPATTERN.REPLACEDISPLAY (>) \FONTINFOFROMFILENAME (NUMBERP STRPOS STREAMP LITATOM) +COMPILER::RESOLVE-VARIABLE-REFERENCE (COMPILER::VARIABLE-P) MAPATOMS (GREATERP IGREATERP +.ALLOCATED.PER.PAGE. IGEQ <= IEQP) \EXTENDSTACK (ILESSP IGREATERP) EXTEND/TRANSITION/CHAIN (IEQP +ILESSP) \RELEASE.IOCB (EMADDRESSP) COMPILER::CLOSURE-ANNOTATE-LAMBDA (COMPILER::VARIABLE-CLOSED-OVER) +\AGE.ROUTING.TABLE (GREATERP TIMEREXPIRED?) DRAW/GRAPHNODE/BORDER (FIXP) \TEDIT.APPLY.PARASTYLES ( +LITATOM DEFINEDP) ATOMHASH#PROBES (LITATOM IGREATERP GREATERP) ONEDINSPECTW.CREATE (LITATOM POSITIONP +WINDOWP REGIONP) %%ARRAY-BASE (%%ONED-ARRAY-P %%TWOD-ARRAY-P %%GENERAL-ARRAY-P) LISPFORM.SIMPLIFY ( +LITATOM GETD DWIMIFY0?) COMPILER::PASSABLE (COMPILER::NULL-EFFECTS-INTERSECTION) +MAXATTACHEDWINDOWEXTENT (GREATERP) \VAMCheckEndOfVol (IGEQ) %%ARRAY-OFFSET (%%ONED-ARRAY-P +%%TWOD-ARRAY-P %%GENERAL-ARRAY-P) \TEDIT.GET.PARALOOKS.LIST (IGREATERP GREATERP) \HANDLE.RAW.PUP (IGEQ +) %%ARRAY-TYPE-NUMBER (%%ONED-ARRAY-P %%TWOD-ARRAY-P %%GENERAL-ARRAY-P) DO-HISTORY-SEARCH (APPLY* +EDIT4E EDITFINDP) \GENERIC-UNREGISTER-STREAM (STREAMP FMEMB) \DSPSCALE.PSC (NUMBERP CL:PLUSP) +\FONTFACE.COLOR (LITATOM FMEMB) INSTALLBRUSH (ARRAYP GREATERP) \ADD-OPEN-STREAM (STREAMP FMEMB) +\COURIER.RESULTS (IEQP) \PAGEDEOFP (IEQP IGREATERP ILESSP IGEQ) MINATTACHEDWINDOWEXTENT (GREATERP) +\PFInitializeVols (GREATERP) NO.SIDEEFFECTS.FNP (NNLITATOM) FINDFILE (UNPACKFILENAME.STRING) +\SFLHASHLOOKUP (IEQP) ED (CL:SYMBOLP GET) FIXSPELL1 (STRPOS STREQUAL ILESSP IGREATERP) \POLYSHADE.BLT +(IEQP ODDP ILEQ IGEQ) BREAKLINE (OVERFLOWLINE?) \NSRANDOM.READPAGES (> >= DIRTYABLE GREATERP) PUTD ( +LITATOM TYPEP ARRAYP) VAR.NOT.USED (LITATOM MEMB) CL:MAKUNBOUND (CL:CONSTANTP) \PUTD (TYPEP ARRAYP) +FIXDATUM (LITATOM STRPOSL CLISPNOTVARP FIXP EQUAL CONSTANTEXPRESSIONP) SEDIT::LINEARIZE-CLISP (IGEQ +ATOM IGREATERP) LINETO.IP (FLOATP) SI::UNWIND-TO-BLIP (SELECTQ) SPELLFILE.MATCHINGDIRS (MEMB) GETD ( +LITATOM) EVALUABLE.CONSTANTP (FMEMB NNLITATOM \WALKABLE.SPECIALFORMP \WALKOVER.SPECIALFORMS +NO.SIDEEFFECTS.FNP) ROMANNUMERALS (ZEROP IGEQ) BOUNDP (CL:SYMBOLP) SETTTBLPROP (NUMBERP FMEMB) +POSTSCRIPT.PUTCOMMAND (GREATERP) CLOSEALL (\IOMODEP STREAMPROP) SI::NON-LOCAL-RETURN (SI::UNWIND-TO-BLIP + GREATERP) TEDIT.GET.PARALOOKS0 (IGREATERP GREATERP) \DSPSCALE2.PSC (NUMBERP CL:PLUSP) CL:SYMBOL-NAME +(CL:SYMBOLP) PFI.AFTER.NEW.PAGE (EVENP) \FINDFONTFILE (FMEMB) COMPILER::FIND-TOP-ENVIRONMENT (COMPILER::ENV-P +) \VARNOTUSED (\WALKABLE.SPECIALFORMP NO.SIDEEFFECTS.FNP) FM.RESETGROUPS (WINDOWP) MISCN-COLLECT ( +GREATERP) \STKMIN (GREATERP) SI::NON-LOCAL-RETURN-VALUES (SI::UNWIND-TO-BLIP) \NSFILING.GETFILEINFO ( +DIRTYABLE MEMB) CL:FORMAT (CL:STRINGP) \FINDOP (GREATERP LITATOM FIXP) \LFFindDirectoryVol (FIXP ATOM +STRINGP \LFDirectoryP) FM.RESETSHAPE (WINDOWP ILESSP) \GET-COMPILED-CODE-BASE (LITATOM) SCANCOMPILEDFN + (EQP MEMB) ARGS.COMMUTABLEP (NNLITATOM \VARNOTUSED \WALKABLE.SPECIALFORMP NO.SIDEEFFECTS.FNP) +\FONTFILENAME.NEW (FIXP < EQUAL) TWODINSPECTW.CREATE (LITATOM POSITIONP WINDOWP REGIONP) IRNDLIST ( +FIXP) SETA (ILESSP IGEQ) \DSPCOLOR.PSC (NUMBERP <=) GRAPHOBJ.IMAGEBOXFN (NUMBERP) COMP.ARGTYPE ( +LITATOM FMEMB GETD) WHENCLOSE (IGREATERP GREATERP) CHECKRECORDNAME (LITATOM) ARRAY (IGREATERP) +AS.MAKE.CONVERSATION (NLSETQ IEQP) \WALKOVER.FUNCTION (MEMB) ERRORMESS (TYPEP) COPY.WINDOW.TO.BITMAP ( +OPENWP FMEMB) TEDITWINDOWP (DISPLAYSTREAMP MEMBER) \FONTINFOFROMFILENAME.OLD (NUMBERP STRPOS) +SI::INTERNAL-THROW-VALUES (SI::UNWIND-TO-BLIP) CL:SYMBOL-VALUE (CL:SYMBOLP) ASKUSERCHAR (IGEQ ILEQ) +\MEDW.GETSCREENREGION (ILESSP IGEQ LASTMOUSESTATE ERSETQ \CLOCKGREATERP MOUSESTATE) \MEDW.CARET.SHOW ( +IGREATERP ILESSP OPENWP) \TEDIT.EXPANDED.MENU (TEXTPROP) CALLS3 (FMEMB) \DELETETREE (GREATERP IEQP) +\LFCloseDevice (\PFVersionOK) CL:FBOUNDP (CL:SYMBOLP ARGTYPE CL:MACRO-FUNCTION CL:SPECIAL-FORM-P) +HPINITRDTBL (READTABLEP) MSDESCRIBE (GETD HARRAYP SMALLP EQMEMB FMEMB GETPROP) \READSTRIKEFONTFILE ( +IGREATERP GREATERP) SI::PVAR-VALUE-IN-FRAME (NULL-NTENTRY EQP) SETF-SYMBOL-FUNCTION (CL:CONSP CL:SYMBOLP +) \READACFONTFILE (RANDACCESSP EVERY REMOVE GREATERP) SI::VARIABLE-NAME-IN-FRAME (NULL-NTENTRY EQP +FIXP SMALLP) FM.RESETMENU (WINDOWP) MSDESCRIBE1 (IGREATERP) MB.MARGINBAR.SELFN (INSIDE? MOUSESTATE +\TEDIT.MOUSESTATE EQUAL ZEROP IGEQ LESSP ILEQ EQP) FASL::FASL-END-OF-BLOCK (CL:ZEROP) ADD-USER-SUBR ( +BOUNDP CL:CERROR SETA CL:FIND) \FONTRESETCHARWIDTHS (GREATERP ILESSP IGREATERP) LOOKUPHASHFILE (MINUSP +) MBUTTON.FIND.BUTTON (ATOM) FM.RESETSTATE (WINDOWP) \TEDIT.GET.PARALOOKS1 (IGREATERP GREATERP) +SEDIT::COMPILE-STRUCTURE (ERSETQ) PF (MEMB) LISTRECORDEFS (SMALLP GREATERP) +DBG::STACK-FRAME-VALUE-COMMAND (CL:LISTP CL:SYMBOLP CL:CONSP) COMPILER::CLOSURE-ANNOTATE-CATCH ( +COMPILER::BLIPPER-NEW-FRAME-P) DBG::STACK-FRAME-PROPERTY (CL:CONSP) UNICODE.UNMAPPED (ILEQ IGEQ) +TB.COLLECT.ITEMS (CL:FUNCALL) ASKUSER1 (ASKUSER1) TRAPLOOP (NUMBERP IGREATERP GREATERP) PFCOPYBYTES ( +IMAGESTREAMP ILEQ) \NSRANDOM.WRITEPAGES (<) \BASEBYTES.BLOCKIO (ILEQ IGREATERP) SCROLL.HANDLER ( +INSIDE? TIMEREXPIRED? LASTMOUSESTATE \CLOCKGREATERP) ELT (IGREATERP IGEQ) UNDOLISPX3 (NLSETQ TAILP) +\SFROTATECSINFOOFFSETS (GREATERP) PROCESSPROP (>) PRINTFNDEF (DISPLAYP) \GETLEAFSTRING (IGREATERP) +ROTATE-BITMAP (GREATERP) \TERPRI.PSC (LESSP) \NSRANDOM.TRUNCATEFILE (=) NORMLOOP (IGREATERP ILESSP) +FM.CHANGESTATE (WINDOWP OPENWP FMEMB) GRAPHOBJ.DISPLAYFN (EQP) HVRPTREAD (IGREATERP) SEDIT::MARKASCHANGEDFN + (SEDIT::GET-CONTEXT) \BASEBYTES.SETFILEPTR (IGREATERP) CHAT.CHOOSE.PHONE.NUMBER (ILESSP IGREATERP) +ROTATE-BITMAP-LEFT (GREATERP) SEDIT::CFV-DOTLIST (ATOM) ERASE/GRAPHNODE (WINDOWP IMAGESTREAMTYPEP) +SLICEREF (ILESSP) \SFMAKECOLOR (IMAGESTREAMP NUMBERP) RELSTKP (STACKP) \BASEBYTES.PEEKBIN (IGEQ) +\BASEBYTES.BOUT (IGEQ) STRIKECSINFO (GREATERP IEQP) %#BITSON (ZEROP) CH.FINDSERVER (STRING-EQUAL) +WRITESTRIKEFONTFILE (FONTP IGEQ ILESSP GREATERP LESSP IEQP) \TEDIT.PRESS.HARDCOPY (STRINGP) +FB.PROMPTWPRINT (< GREATERP) ASKUSER$ (GREATERP ILESSP MEMB) RECORDECLTAIL (RECDEC? GETSETQ) +\USER-SUBR-UFN (BOUNDP) INTERPRET.REM.CM (IGREATERP GREATERP FMEMB) BRECOMPILE2 (STRPOS GREATERP +DIGITCHARP IGEQ) UTF8.OUTCHARFN (ILESSP) TTUNREADBUF (COMPLEXCHARP) \SETUPSTACK1 (IGREATERP ODDP) +MULTIFILEINDEX (STRPOS) SIMPLEPRINT (LITATOM STRINGP GREATERP SMALLPOSP SMALLP) +\MEDW.GETBOXSCREENPOSITION (FIXP IGREATERP LASTMOUSESTATE) FASL::COLLECT-LIST (EQL GREATERP) +GETTTBLPROP (NUMBERP FMEMB) SEDIT::MUTATE (STRINGP SEDIT::DO-MUTATION) \PFCreateVols (BOUNDP ZEROP EQL + HASHARRAYP GREATERP) \RESETSTACK0 (GREATERP <) SUBRNUMBER (FIXP) \BASEBYTES.TRUNCATEFN (ILESSP +IGREATERP) \FBITMAPBIT.UFN (ZEROP) \NSRANDOM.SESSION.WATCHER (DIRTYABLE \SECONDSCLOCKGREATERP +FILING.CALL) CARET (CURSORP) \COURIER.OUTPUT.ABORTED (DIRTYABLE) UTF8HEXSTRING (ILESSP) +\PFInitFileDescriptors (GREATERP) MOST/VISIBLE/OPERATION (IGREATERP) COMP.SETARG (FIXP IGREATERP ILEQ) + TTYINEDIT (STRINGP) NUTF8CODEBYTES (ILESSP) DBG::STACK-FRAME-PROPERTIES (CL:SYMBOLP GETD) +INITBITMASKS (GREATERP) SCANFILE1 (MEMB SOME GETPROP FMEMB) \UPCASEBASE (GREATERP) COURIER.CALL ( +GREATERP) \CLEARCELLS (ILESSP IGREATERP) EVALQT (ERSETQ) PRESSFILEP (ZEROP EVENP RESETLST) +XCL::GET-WALKER-TEMPLATE (CL:SYMBOLP CL:LISTP) RECORDECL1 (FMEMB SMALLP RECDEC? NUMBERP LITATOM +FIXSPELL ASSOC) STRING.EQUAL (LITATOM STRINGP GREATERP IGREATERP) FM.GETITEM (WINDOWP EQUAL) +\CAUSEINTERRUPT (ILESSP) \TEXTMENU.START (EQUAL) SPP.READP (READABLE ILESSP \SPP.PREPARE.INPUT) +SCANFILE0 (SYNTAXP LITATOM) CREATEDSKDIRECTORY (\PFPilotVolumeP \LFDirectoryP) FM.HIGHLIGHTITEM ( +WINDOWP WINDOWPROP) TB.NTH.ITEM (> >= <) \TEDIT.RESHAPEFN (ILESSP) CREATEPAGES (GREATERP) COMP.LAM1 ( +FMEMB) TEDIT.RAW.INCLUDE (OPENP IGREATERP) \DSPSPACEFACTOR.PSC (NUMBERP EQUAL) INTERRUPTED ( +PROCESS.EVALV GETD \PROCESS.MAKEFRAME) COMPILER::SUBSTITUTABLE-P (COMPILER::VARIABLE-WRITE-REFS +COMPILER::VARIABLE-READ-REFS COMPILER::LITERAL-P COMPILER::EVAL-WHEN-LOAD-P) +SEDIT::MENU-SUBSTITUTE-SELECTEDFN (EQUAL) ICMLARRAY.VALUECOMMANDFN (EQL NUMBERP) +\TEDIT.CUMULATE.EVENTS (<) \PFCreatePhysicalVolume (BOUNDP) \NSRANDOM.SETEOFPTR (OVERWRITEABLE +APPENDABLE) ARCTO.IP (FLOATP) COMP.ARG (FIXP IGREATERP ILEQ) \ZEROWORDS (ILEQ IGEQ) COMP.CALL (FMEMB) +\InitCurveBrushes (GREATERP) END.DELETE.MODE (IGREATERP) IRM.CREF.BUTTONEVENTFN (MOUSESTATE INSIDEP) +\GATHER-CLEANUP-FORMS1 (< > \VALIDADDRESSP >=) DO.EDIT.COMMAND (MINUSP EMPTY.BUFFER ON.LAST.LINE +AT.END.OF.BUF AT.END.OF.SCREEN AT.START.OF.BUF AT.START.OF.LINE ON.FIRST.LINE AT.END.OF.LINE WORDSEPRP + IGREATERP COMPLEXCHARP SPACEP LITATOM) \MEDW.GETSCREENPOSITION (MOUSESTATE) APPENDOP.IP (ILESSP +IGREATERP ILEQ) CHECKSAMEDIR (CL:MEMBER STRING-EQUAL) \GATHER-SPECIAL-BINDINGS (NULL-NTENTRY EQP FMEMB + FIXP SMALLP ASSOC) HVREADCHECKGETFN (BOUNDP MEMB ASSOC GETD MOUSECONFIRM) RECORDECLBLOCK (ZEROP FIXP +FIXSPELL) \GC.MODIFY.BIGREFCNT (ODDP ILESSP IGEQ) UPDATEPCNODES (GREATERP) SEDIT::SELECT-SEGMENT-DEFAULT + (ILESSP IGREATERP) TMPSUBFN (GREATERP IGEQ ILEQ) CHAT.TYPESCRIPT1 (STRING-EQUAL NLSETQ) \GCERROR ( +\GCDISABLED RAID) FILLNGON.IP (IGREATERP GREATERP) RETRYSCAN (GETHASH) \BITBLT.BITMAP (ILEQ FIXP) +\GC.ENTER.BIGREFCNT (ODDP EVENP) COMPILER::CLOSURE-ANNOTATE-BLOCK (COMPILER::BLOCK-NEW-FRAME-P +COMPILER::BLOCK-CLOSED-OVER-P) TTCOMPLETEWORD (AT.START.OF.BUF IGREATERP COMPLEXCHARP GREATERP IGEQ +ILEQ LITATOM MEMB >) \BLTSHADE.BITMAP (ILEQ FIXP) SI::BQUOTE-EXPANDER (CL:ATOM) \TEDIT.GET.CHARLOOKS1 +(IGREATERP) \CREATE.TTYDISPLAYSTREAM (HASTTYWINDOWP) \FORMATLINE (ILEQ ZEROP GREATERP IGREATERP SMALLP + IGEQ FIXP MEMBER ILESSP) CHAT.TYPEOUT (ILESSP SELCHARQ IGREATERP TTY.PROCESSP OPENWP) SEDIT::SCAN-STRING + (IGREATERP ILESSP) FM.GETSTATE (WINDOWP) \HARDRESET-CLEANUP1 (\HARDRESET-CLEANUP-RUN) HVBAKREAD (FIXP + IEQP GREATERP SMALLP) \HARDRESET-CLEANUP (MEMB) \LEAF.MAYBE.FLUSH.CACHE (OBTAIN.MONITORLOCK) +HASH.PASSWORD (IGREATERP) XCL:UNADVISE-FUNCTION (CL:CONSP) GETBLOCKDEC (MEMB) XCL:READVISE-FUNCTION ( +CL:CONSP) ASKUSERSETUP (STRINGP READP) \GC.LOOKUP.BIGREFCNT (ODDP) CL::COUNT-OCCURRENCES (CL:CONSP) +SPP.FORCEOUTPUT (ILESSP \SENDSPP) XCL:ADVISE-FUNCTION (CL:CONSP UNSAFE.TO.MODIFY SI::HAS-CALLS GETD) +LOADBLOCK (EXPRP) IDLE.SHOW.OPTION (SMALLP GREATERP) SPP.EOFP (READABLE ILESSP) FIND.NON.SPACE (SPACEP + COMPLEXCHARP) \IRND (MINUSP) BITBLT (IGEQ WINDOWP FMEMB WOVERLAPP) GRAPHOBJ.BUTTONEVENTINFN (MENU) +BQUOTE.WRAPPER (MEMB) RECORDECL0 (FMEMB) \FREELISTCELL (IGREATERP) CIRCSHADE.DISPLAY (NUMBERP STREAMP +TEXTUREP) \CLEANUP.STACKFULL (SELECTQ) TEDIT.FORMATBOX (\TEDIT.FORMAT.FOUNDBOX? IGREATERP IGEQ) +SI::BQUOTE-APPEND (CL:ZEROP) \CARET.FLASH.MULTIPLE (\CARET.FLASH?) XCL:REBREAK-FUNCTION (CL:CONSP) +LOADFNS-MAKELIST (LITATOM) \REFCNT (ILESSP) XCL:TRACE-FUNCTION (CL:CONSP UNSAFE.TO.MODIFY SI::HAS-CALLS +) SEDIT::MENU-PRINTBASE-SELECTEDFN (IGREATERP ILEQ) \ALLOCMINIMUMSIZES (FMEMB) +\PFCreateFileDescriptors (BOUNDP GREATERP) RESET (SELECTQ) \BACKFORMAT (ILEQ LESSP IGREATERP) +\SET.FINALIZATION.FUNCTION (<= FNTYP) \COPYSYS (SMALLP IGREATERP) NIL +EFFECT HVBAKREAD (FRPLACA FRPTQ HVREADEND SETA SETD ERROR MAPC CONTROL ECHOMODE ECHOCHAR DELETECONTROL + RAISE FRPLACD) COMPILE-FILE-SCAN-FIRST (SELECTQ PRINT) FNTYP (DECLARE) MSSTOREDATA (PUTHASH +STORETABLE PUTTABLE) TEDIT.COPY.LOOKS (\LISPERROR TEDIT.LOOKS) COMP.APPLY* (SELECTQ) +\UFS.RECOGNIZE.FILE (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) FASL:OPEN-FASL-HANDLE (BOUT BOUT16 +) \GETFTPCONNECTION (RESETSAVE BLOCK CL:FORMAT) GETNSPRINTER (printout TAB) FB.UPDATEBROWSERITEMS ( +FB.ALLOW.ABORT FB.SETNEWPATTERN RPLACA FRPLACD FB.SET.BROWSER.TITLE CLEARW TB.REPLACE.ITEMS +TB.SET.FONT FB.SET.DEFAULT.NAME.WIDTH CL:MULTIPLE-VALUE-SETQ FB.PROMPTW.FORMAT FB.HEADINGW.DISPLAY +FB.ADD.FILEGROUP FB.PROMPTWPRINT TB.REDISPLAY.ITEMS FB.DISPLAY.COUNTERS) RECLAIM (\DORECLAIM) +\COURIER.CHECK.ERRORS (DECLARE /RPLACD ERROR) \ALLOCPAGEBLOCK (\NEWPAGE) \TEDIT.COMMAND.LOOP ( +WINDOWPROP DISMISS RESETLST ERSETQ \WAITFORSYSBUFP TEDIT.FLASHCARET BLOCK \SHOWSEL TEDIT.UPDATE.SCREEN + \FIXSEL \COPYSEL TEDIT.DO.BLUEPENDINGDELETE \TEDIT.SET.SEL.LOOKS \TEDIT.DELETE UNINTERRUPTABLY +SELECTC CHECK \TEDIT.CHARDELETE TEDIT.RESET.EXTEND.PENDING.DELETE \TEDIT.WORDDELETE TEDIT.UNDO +TEDIT.REDO TEDIT.NEXT \TEDIT.ABBREV.EXPAND TEDIT.\INSERT) ANALYZE-PARAMETER (CHECK-PARAMETER-NAME) +XCL::CLEAR-IMPLICIT-KEY-HASH (UNINTERRUPTABLY) \ALLOCVIRTUALPAGEBLOCK (\PUTBASEFIXP) +\DSPSPACEFACTOR.IP (SHOW.IP APPENDNUMBER.IP ISET.IP) \GETBRUSHBBT (\SETPBTFUNCTION DECLARE) \ATMOUT ( +\SMALLPOUT DECLARE) FLIPCURSOR (FRPTQ SELECTC \DoveDisplay.SetCursorShape) SETUPFONTS.PRESS ( +\DEFINEFONT.PRESS \DSPFONT.PRESS \ENTITYEND.PRESS) COPYFILES (DECLARE ERROR MAPFILES printout PRIN1 +COPYFILES TAB) \TEDIT.CONVERT.TO.FORMATTED (\SPLITPIECE \TEDIT.MARK.LINES.DIRTY) \GETPILOTBBTSCRATCHBM + (DECLARE) DISCARDXIPS (\FLUSH.PACKET.QUEUE) SEDIT::MENU-PACKAGE-SELECTEDFN (printout DECLARE TERPRI) +\READNUMBER.OUTLINEREGION (BITBLT) VRULE.CREATE (IMAGEOBJPROP TEDIT.PROMPTPRINT) BITMAPCOPY (BITBLT) +TB.UNSELECT.ALL.ITEMS (TB.SHOW.SELECTION) RECREDECLARE (DECLARE APPLY*) TEDIT.DISPLAYTEXT (MOVETO +RESETLST DECLARE BLTCHAR) PFI.PROCESS.FILE (PFI.PASS.COMMENT READCCODE PFI.PRINT.COMMENTS CL:FUNCALL +PFI.HANDLE.EXPR BLOCK) CL::%%EXP-FLOAT (DECLARE CL::%%UFTRUNCATE) MODERN-SNAPW (WINDOWPROP) +UNIX-USERNAME (FREERESOURCE DECLARE) \NSRANDOM.REESTABLISH (\NSRANDOM.PROCEEDABLE.ERROR) +\HANDLE.RAW.OTHER (printout PRINTNUM) WHO-LINE-HOST-NAME (DECLARE) SUBSTRING (UNINTERRUPTABLY) +SEDIT::SET-POINT-LIST (SEDIT::SET-POINT SEDIT::SET-POINT-NOWHERE) TEDITCHAT.CHARFN (\CARET.DOWN +\TEDIT.CHARDELETE) \DOSTORAGEFULLINTERRUPT (LISPERROR) CL:POSITION (CL:ERROR) COMPILE-FILE-EXPRESSION +(DECLARE CL:EVAL PRINT) \TFBRAVO.APPLY.PARALOOKS (TEDIT.PARALOOKS TEDIT.SETSEL) +\TEDIT.PUT.PARALOOKS.LIST2 (\DWOUT \SMALLPOUT DECLARE \TEDIT.PUT.SINGLE.PARALOOKS2 PUTHASH) +COMP.PUSHCALL (COMP.VAL COMP.STJUMP COMP.STTAG COMP.STCONST COMP.STFN COMP.STCOPY COMP.STPOP) +ALLOCSTRING (LISPERROR UNINTERRUPTABLY \PUTBASEFAT \PUTBASETHIN) \FTP.PRINTPLIST (MAPC DECLARE +SELCHARQ SELECTQ PRIN2) MAKEFILESCOMS (SELECTQ PRINT) PRINTPUP (\DTEST PRINTPUPROUTE printout PRIN2 +PRINTCONSTANT PRINTPACKETDATA) \DFSCurrentVolume (\LFEntryPoint) MAKE-PACKAGE-HASHTABLE (DECLARE) +\SPP.CLEANUP (DECLARE OBTAIN.MONITORLOCK NOTIFY.EVENT MAPC CLOSENSOCKET SI::MONITOR-UNWIND) GCGAG ( +DECLARE) \BACKFORMAT (\SETUPGETCH) \LEAF.ABORT.FROMMENU (SHADEITEM NOTIFY.EVENT) RECORDECL ( +SET.RECORD.ALLOCATIONS) \FM.EDIT-SETUPTTBL (ECHOMODE ECHOCONTROL) UNIX-FULLNAME (FREERESOURCE DECLARE) + PFI.COLLECT.DEFINERS (FRPLACD) XCL::PPRINT-DEFINER (PRIN1 PRIN2 SUBPRINT/ENDLINE SPACES) \INITMDSPAGE + (\PUTBASEPTR) \LFScavFileName (DECLARE FRPLACD) UNIX-GETENV (FREERESOURCE DECLARE) \STARTPAGE.PRESS ( +\ENTITYSTART.PRESS \DSPFONT.PRESS SETXY.PRESS PRIN3 SHOW.PRESS SETX.PRESS NEWLINE.PRESS) +SET.TTYINEDIT.WINDOW (CLEARW RELMOVETO RESETSAVE) MSPARSE (MSFIXUPTYPES MAPC FRPLACD MSFAIL printout +LISPXPRIN2 LISPXPRIN1 LISPXSPACES LISPXPRINT FRPLNODE FRPLACA) MSMARKCHANGE1 (PUTHASH) NTHCHARCODE ( +\MAPPNAME) \FIXILINES (\DTEST) OPT.JLENPASS (MAPC OPT.COMPILERERROR) MSEDITE (FRPLACD APPLY EDITE) +MKSTRING (DECLARE) \DOGCDISABLEDINTERRUPT (printout TERPRI FLASHWINDOW) \LFUnpackName (DECLARE FRPLACD +) BRH/LAYOUT/DAUGHTERS (DECLARE) FLASHWINDOW (UNINTERRUPTABLY DISMISS BLOCK) TEDIT.\INSERT (DECLARE +TEDIT.PROMPTPRINT TEDIT.NORMALIZECARET \SHOWSEL SELCHARQ \INSERTCR \INSERTCH \FIXILINES +TEDIT.INSERT.UPDATESCREEN) IDLE.SET.OPTION (CLEARW LISTPUT PRINTOUT) \COURIER.CHECK.PROCEDURES ( +DECLARE SELECTQ /RPLACD ERROR) \LEAF.SETCREATIONDATE (\SENDLEAF \LEAF.SETVALIDATION) UNIX-GETPARM ( +FREERESOURCE DECLARE) TEDIT.GET.OBJECT (SETFILEPTR TEDIT.PROMPTPRINT) BITMAPBIT (\ILLEGAL.ARG \PUTBASE + \PUTBASE24 .WHILE.TOP.DS. \SOFTCURSORDOWN \INSURETOPWDS DECLARE \SOFTCURSORUPCURRENT) +DBG::ATTACH-BACKTRACE-MENU (FRPLACD DELETEMENU CLEARW ATTACHWINDOW ADDMENU) TB.UNSELECT.ITEM ( +TB.DESELECTRANGE) IDLE.BOUNCING.BOX (RPLACA BITBLT BLOCK) SPY.MERGE.CALLEES (SPY.MERGE1) STRPOS ( +DECLARE \ILLEGAL.ARG ERROR) SHRKFY (SELECTQ NCONC DWIMIFY1A) ANTILOG (DECLARE ERROR) +SEDIT::MENU-FIND-SELECTEDFN (SEDIT::MENU-SELECTEDFN) LINE.LESSP (\GETLINEORIGY \GETLINEDIFFY) +TWODINSPECT.REPLACE (APPLY* TWODINSPECT.REDISPLAY) \CH.UPDATE.CACHE (printout TAB SHOW.CLEARINGHOUSE) +COMP.EVALFORM (SHOULDNT COMP.STCONST COMP.STTAG COMP.VAL COMP.STJUMP COMP.EFFECT COMP.STFN) CREATEW ( +PROMPTPRINT HELP ERROR) \FTP.PACKFILENAME (MAPC) ASKUSER (DECLARE RESETSAVE LINBUF SYSBUF DOBE +PRINTBELLS CLEARBUF MAPRINT ASKUSERSETUP FRPLACD TERPRI MAPC ERROR! BKBUFS NOTCHECKED RPLACD) +\NSPRINT.INTERNAL (SPP.CLOSE) \GENERIC.CURSOR (MAPC) \FLUSH.NDB.QUEUE (\RELEASE.IOCB +\RELEASE.ETHERPACKET) IRM.GET.CREF (DECLARE IMAGEOBJPROP) COERCETEXTOBJ (\ILLEGAL.ARG RPLSTRING +SETFILEPTR RPLCHARCODE ERROR \SETUPGETCH CLOSEF) \BBTCURVEPT (\SETPBTFUNCTION DECLARE) SEDIT::REPLACE-QUOTE + (SEDIT::UNDO-BY SEDIT::KILL-NODE RPLACA SEDIT::SET-DEPTH SEDIT::NOTE-CHANGE) AIN (\BINS) CLISPDEC ( +EVAL MAPC /REMPROP /RPLNODE ERROR) \DSPLINEFEED.IP (\ILLEGAL.ARG) \DSPCLIPPINGREGION.PSC ( +POSTSCRIPT.SHOWACCUM \FIXLINELENGTH.PSC) \TERMINATESPP (DECLARE OBTAIN.MONITORLOCK SELECTC \SENDSPP +MONITOR.AWAIT.EVENT DEL.PROCESS SI::MONITOR-UNWIND) AOUT (\BOUTS) STRIP-KEYWORDS (FRPLACD) +\EXTENDEDVMEMINIT (\INITIALIZESWAPDISK \PUTBASEPTR \M44DOEXTENDVMEMFILE) SHRKFY2 (SHRKFY) +\MAYBEPEEKPUP (PRINTPUP) COMP.MLLFN (SPACES) \PROCESS.AFTER.EXIT (NOTIFY.EVENT) MSEDITF (FRPLACD APPLY + EDITE) \DRAWPOLYGON.PSC (printout PRIN1 POSTSCRIPT.OUTSTR MAPC) PFI.PRINT.FILECREATED (CHANGEFONT +PFI.PRINT.TO.TAB PRINTOUT PRIN1 PRINTDEF FRPLACD) CLOSEATTACHEDWINDOWS (CLOSEW) \USEREVENT (DECLARE) +TWODINSPECT.SELECTITEM (INSPECT.INVERTSELECTION INSPECT.INVERTREGION) TEDIT.UPDATE.SCREEN (\FILLWINDOW +) \PROCESS.BEFORE.LOGOUT (ALLOW.BUTTON.EVENTS RESETSAVE printout PRIN1 PROCESS.RESULT) +D-ASSEM:ASSEMBLE-FUNCTION (CL:MAPHASH) \MEDW.CURSOR (DECLARE \CURSORDOWN \CURSORUP \ILLEGAL.ARG) FEQP +(.FLOATUNBOX. SELECTC .NEGATE. .LLSH8. .LLSH1. .LRSH8.) \TEXTCLOSEF (CLOSEF?) \OPENLINEBUF (DECLARE +\RESETTERMINAL) TEDIT.DEFAULT.MENUFN (TEDIT.PROMPTPRINT ERSETQ \SHOWSEL +TEDIT.RESET.EXTEND.PENDING.DELETE \FIXSEL TEDIT.NORMALIZECARET) D-ASSEM:INTERN-DCODE (UNINTERRUPTABLY +\ADDREF D-ASSEM:FIXUP-PTR D-ASSEM::PERFORM-LOCAL-FN-FIXUPS) SEDIT::REPLACE-LIST (MAPC RPLACA +SEDIT::KILL-NODE SEDIT::SET-DEPTH FRPLACD RPLACD SEDIT::SUBNODE-CHANGED RPLNODE2 +SEDIT::SET-SELECTION-NOWHERE SEDIT::NOTE-CHANGE SEDIT::UNDO-BY) \DSPPRINTCR/LF (\STOPSCROLL? +\CHECKCARET APPLY* DSPYPOSITION .WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN \INSURETOPWDS DECLARE BITBLT +\SOFTCURSORUPCURRENT DSPXPOSITION) \DSPRIGHTMARGIN.IP (\FIXLINELENGTH.IP) CL:MULTIPLE-VALUE-CALL ( +DECLARE) ONEDINSPECT.REPLACE (APPLY* ONEDINSPECT.REDISPLAY) PFI.PRINT.INDEX (DSPNEWPAGE +PFI.CENTER.PRINT PFI.PRINT.INDICES) COMP.PUSHNILS (COMP.EXPR COMP.STJUMP COMP.STTAG COMP.STCONST +COMP.STFN COMP.STCOPY COMP.STPOP COMP.VAL) \BSP.CLOSE.OPEN.SOCKETS (FRPLACD WAKE.PROCESS +CLOSERTPSOCKET) \TEDIT.REPAINTFN (\SHOWSEL \DISPLAYLINE \FILLWINDOW \FIXSEL) D-ASSEM:FIXUP-PTR-NO-REF +(UNINTERRUPTABLY) \TEDIT.PROMPT.PAGEFULLFN (GETPROMPTWINDOW RELMOVEW) PRINTWORDS (printout PRIN2 PRIN1 +) \SLOWBLTCHAR (\DSPPRINTCR/LF SELECTQ SHOULDNT .WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN \INSURETOPWDS +DECLARE \PILOTBITBLT \SOFTCURSORUPCURRENT \DSPYPOSITION.DISPLAY BITBLT ERROR) D-ASSEM:FIXUP-SYMBOL ( +UNINTERRUPTABLY) \DSPLEFTMARGIN.IP (\FIXLINELENGTH.IP) TB.INSERT.ITEM (\ILLEGAL.ARG RPLACD +TB.RENUMBER.TAIL FREPLACEFIELD) \PRESSINIT (DECLARE) FB.THINCOMMAND (FB.UPDATE.COUNTERS) +\GR.MAKEPRETTYCOMSL (ERROR FRPLACD) \CARET.FLASH.AGAIN (SHOULDNT) D-ASSEM:FIXUP-PTR (UNINTERRUPTABLY +\ADDREF) SI::EXPAND-CONDITION-CASE (DECLARE) SEPRCASE (MAPC) SAVEVM (\DEVICEEVENT \RESETKEYBOARD +\PROCESS.AFTER.EXIT) PFI.PRINT.MULTI.INDEX (STREAMPROP DSPNEWPAGE PFI.CENTER.PRINT TERPRI CHANGEFONT +MAPC DSPXPOSITION PRIN3 RELMOVETO) CONDITIONS::EXPAND-RESTART-CASE (DECLARE) SHOWBITMAP.IP (SHOW.IP +ERROR SHOWBITMAP1.IP) CL:MAKE-PACKAGE (CL:USE-PACKAGE ENTER-NEW-NICKNAMES PUTHASH) REPLACEFIELD ( +\PUTFIXP \PUTSWAPPEDFIXP .UNBOX. SELECTC \ILLEGAL.ARG CL::%%NOT-NONCOMPLEX-NUMBER-ERROR +UNINTERRUPTABLY) BRH/OFFSET (DECLARE) \CHANGECHARSET.DISPLAY (UNINTERRUPTABLY) SEDIT::MENU-INIT-STATE +(FM.CHANGESTATE FM.CHANGELABEL) COPYARRAY (\COPYHARRAYP FRPTQ SELECTQ) \MAYBEPEEKNS (DECLARE PRINTXIP) + TEDIT.PUT.OBJECT (\DWOUT \SMALLPOUT \ATMOUT APPLY* SETFILEPTR) \POSTSCRIPT.OUTCHARFN (DECLARE +\TERPRI.PSC BOUT SELECTQ \POSTSCRIPT.SPECIALOUTCHARFN \POSTSCRIPT.ACCENTFN \POSTSCRIPT.ACCENTPAIR +POSTSCRIPT.SHOWACCUM \UPDATE.PSC APPLY* POSTSCRIPT.OUTSTR \ILLEGAL.ARG DSPNEWPAGE \MOVETO.PSC +\POSTSCRIPT.PRINTSLUG) SETD (\DTEST LISPERROR \RPLPTR DECLARE) \TEXTSTREAMBOUT ( +\TEDIT.MARK.LINES.DIRTY \INSERTCR \INSERTCH FREPLACEFIELD DSPFONT TEDIT.UPDATE.SCREEN \FIXSEL SCROLLW +TEDIT.DISPLAYTEXT) FTPGETMARK (\FTP.FLUSH.TO.MARK) ELTD (\DTEST LISPERROR DECLARE) +SI::EXPAND-PROCEED-CASE (DECLARE) SETUSERNAME (SetBcplString) \MEDW.PUTWINDOWPROP (\ILLEGAL.ARG +UPDATE/SCROLL/REG MOVEW SHAPEW RESHOWTITLE RESHOWBORDER LISTPUT FRPLACD) REHASH (CLRHASH DECLARE +PUTHASH) CLISPFORERR1 (LISPXPRIN1 LISPXPRIN2 LISPXSPACES) \FILLPOLYGON.PSC (DECLARE BLTSHADE BITBLT +MAPC POSTSCRIPT.PUTBITMAPBYTES) TEDIT.STRINGWIDTH (DECLARE) COURIER.EXECUTE.CALL (\COURIER.TRACE +PUTWORD PUTLONG DECLARE SELECTQ COURIER.WRITE CHECK) \PEEKPUP (SELECTQ \PUTBASE RPTQ BLOCK FRPLACD) +\COERCEFONTDESC (DECLARE) DEFPACKAGE (MAPC) CLOSENSOCKET (\FLUSHNSOCQUEUE) ICMLARRAY.SETVALUE ( +WITH-INSPECTOR-ENV TERPRI TWODINSPECT.REPLACE ONEDINSPECT.REPLACE) CHARMACRO? (DECLARE) SEDIT::JOIN ( +SEDIT::CLOSE-OPEN-NODE printout TERPRI SEDIT::PENDING-DELETE SEDIT::START-UNDO-BLOCK SELECTQ FRPLACD +SEDIT::SET-POINT SEDIT::DELETE-NODES SEDIT::INSERT SEDIT::END-UNDO-BLOCK) MODERN-ADD-EXEC (FRPLACD +DISMISS MODERNWINDOW) INVERT.TEXTURE.BITMAP (\ILLEGAL.ARG \PUTBASE) \SHOWSEL (\TEDIT.OBJECT.SHOWSEL +\SHOWSEL.HILIGHT \SETCARET MOVETO SELECTQ \EDIT.UPCARET) DO.CHAT.OPTION (MENU printout) INFILECOMTAIL +(DECLARE NLSETQ SI::RESETUNWIND) LRSH (.UNBOX. SELECTC \ILLEGAL.ARG CL::%%NOT-NONCOMPLEX-NUMBER-ERROR +FRPTQ) CLISPFORVARS (RPLACA RPLACD FRPLACA CLISPFORVARS1 CLISPFORERR FRPLACD SHOULDNT /RPLNODE) +ONEDINSPECT.SETELT (WITH-INSPECTOR-ENV REMOVEPROMPTWINDOW ONEDINSPECT.REPLACE) \LEAF.SETFILETYPE ( +\SENDLEAF) COMPILER:COPY-ENV-WITH-FUNCTION (COMPILER::ENV-BIND-FUNCTION) \MEDW.GETWINDOWPROP ( +\ILLEGAL.ARG) READBITMAP (ERROR) \LEAF.TIMEDOUT.EXCESSIVE (MAPC MAPRINT ADDMENU) SPY.DELETE (FRPLACD) +ULREDISPLAYBITMAP (ERROR) \DRAWARC.PSC (printout PRIN1 POSTSCRIPT.OUTSTR MAPC) SUBARRAY (\DTEST) +\NSGATELISTENER (PROCESSPROP \HANDLE.NS.ROUTING.INFO BLOCK \AGE.ROUTING.TABLE SENDXIP) +DASSEM.COUNTVARS (ADD1VAR) \SENDSPP (CHECK DECLARE OBTAIN.MONITORLOCK \BLT UNINTERRUPTABLY +\SPP.SENDPKT MONITOR.AWAIT.EVENT SI::MONITOR-UNWIND) SEDIT::PRETTY-PRINT (SEDIT::CREATE-PRETTY-PRINT-ENV + SEDIT::PARSE SEDIT::COMPUTE-ALL-FORMATS) \PNC (ERROR UNINTERRUPTABLY \PUTBASEBYTE) CHECKBUFFERREFVAL +(\DELREF) REMOVE-COMMENTS (CL:WARN) \FTP.HANDLE.NO (SELECTC RPLACA NCONC1 printout DECLARE TERPRI MAPC + \FTPERROR) %%COPY-STRING-TO-ARRAY (\PUTBASEBYTE) MARGINBAR.CREATE (IMAGEOBJPROP DSPXOFFSET DSPYOFFSET + MARGINBAR) \HCPYMODEBLTCHAR (DECLARE \CHANGECHARSET.HCPYMODE \DSPPRINTCR/LF .WHILE.TOP.DS. \PUTBASE +\SOFTCURSORDOWN \INSURETOPWDS \PILOTBITBLT \SOFTCURSORUPCURRENT) CLEARMAP (ERROR) COMPAREDEFS ( +PRINTOUT FRPLACD PRIN2) TB.SELECT.ITEM (TB.SELECTRANGE) = (CL:ERROR CL::%%NOT-NUMBER-ERROR) COMP.MLL ( +MAPC PRIN2 SPACES SELECTQ COMP.MLLFN) \WRITEOUTBUFFERS (\WRITEPAGES) READATOM (DECLARE READC) +COMPILER::START-COMPILATION (PRINTOUT DECLARE PRIN1 PRIN3 SI::RESETUNWIND FASL:BEGIN-BLOCK) SETY.PRESS + (\WOUT) REPLACEFIELDVAL (REPLACEFIELD) \CLEARMAP (FDEVOP UNINTERRUPTABLY \RELEASEBUFFER) LOG (DECLARE + ERROR) PRINTPROPS (PRIN2 PRIN1) FILING.CALL (FRPLACD DECLARE OBTAIN.MONITORLOCK PRINTOUT TERPRI \BLT +\DAYTIME0 RPLACD SI::MONITOR-UNWIND) PUTBASEPTRX (PUTBASE) \CH.CHECK.CLEARINGHOUSE (printout TERPRI +\CH.UPDATE.CACHE) \MEDW.BITBLT (SHOULDNT WINDOWOP \INSURETOPWDS DECLARE) SETX.PRESS (\WOUT) +/REPLACEFIELD (UNDOSAVE) \WRITEPAGES (\UPDATEOF) CL:IN-PACKAGE (CL:USE-PACKAGE ENTER-NEW-NICKNAMES) +HASHFILESPLST (DECLARE) UNDOSAVE (LISPXWATCH NCONC FRPLACA FRPLACD) \SEARCHINTERPRESSFONTS (DECLARE) +\ENDVECRUN (SHOW.PRESS SETXY.PRESS MAPC \BOUT) DINFO.TOGGLE.GRAPH (DINFO.UPDATE.GRAPH.DISPLAY CLOSEW) +HARRAYPROP (RPLACD LISTPUT ERROR) COMPILER:COPY-ENV-WITH-VARIABLE (COMPILER::ENV-BIND-VARIABLE) +SEDIT::TRACK-SELECT (SEDIT::SMASH-USING SEDIT::PLACE-CARET-AND-SELECTION SEDIT::TRACK-BAR-IN-TRACK-SELECT + SEDIT::CHECK-SELECTION-SHIFT BLOCK GETMOUSESTATE) CL:Y-OR-N-P (CL:FRESH-LINE) +SEDIT::INSERT-SPECIAL-CHARACTER (SEDIT::INSERT-STRING SEDIT::SET-SELECTION-NOWHERE SEDIT::INSERT) +TEDIT.WORDSET (CHECK) COMP.MAP (COMP.PROGLST COMP.STBIND COMP.EFFECT COMP.VAL OPT.CCHECK COMP.STJUMP +COMP.STTAG COMP.STCOPY COMP.EXPR SHOULDNT COMP.STPOP) DASSEM.MATCHVARS (DASSEM.COUNTVARS) +\ACTONDISKPAGES (UNINTERRUPTABLY .SETUPDISKBUFFERS. \BLT \PUTBASE \CLEARWORDS DECLARE ERROR +\CONTEXTSWITCH \CLEARBYTES \BOXIPLUS \DISKERROR RPLACA) COURIER.READ.NSADDRESS (\BINS) CLRHASH ( +UNINTERRUPTABLY DECLARE) DATATYPES (FRPLACD) DOPMAP (\READPAGES) \DISKERROR (SELECTC RAID) +CLOSEBSPSTREAM (WITH.MONITOR DECLARE OBTAIN.MONITORLOCK BSPFORCEOUTPUT \BSP.FLUSHINPUT +MONITOR.AWAIT.EVENT SI::MONITOR-UNWIND BLOCK) %%COPY-ONED-ARRAY (ERROR \PUTBASE) \FTP.WHENCLOSED ( +printout PRIN1) \SLOWHCPYMODEBLTCHAR (\DSPPRINTCR/LF SELECTQ SHOULDNT .WHILE.TOP.DS. \PUTBASE +\SOFTCURSORDOWN \INSURETOPWDS DECLARE \PILOTBITBLT \SOFTCURSORUPCURRENT \DSPYPOSITION.DISPLAY BITBLT +ERROR) FILEBROWSER (MAP SELECTQ FRPLACD PROMPTPRINT CLRPROMPT TTY.PROCESS ALLOW.BUTTON.EVENTS +FB.MAKECOUNTERWINDOW ATTACHWINDOW TOTOPW FB.SETNEWPATTERN ADD.PROCESS) \CLEARBYTES (\PUTBASEBYTE) +\GENERIC.DSPCREATE (\DTEST DSPFONT DSPDESTINATION DSPRIGHTMARGIN DSPSOURCETYPE DSPOPERATION) MAPHASH ( +DECLARE APPLY*) CL:RENAME-PACKAGE (REMHASH PUTHASH ENTER-NEW-NICKNAMES) \LEAF.NOT.RESPONDING (TERPRI +SELECTQ) \IDLER (RESETLST \USEREVENT \DEVICEEVENT PROCESS.EVAL SETPASSWORD CLEARW OPENW DSPOPERATION +DSPTEXTURE BLOCK \DIRTYBACKGROUND SUSPEND.PROCESS PRINTOUT WAKE.PROCESS RESETFORM CLEARBUF CLOSEW +FRESHLINE) SPY.DUMP.BUFFER (FREPLACEFIELD) REDISPLAYBITMAP (ERROR) \DOACTONDISKPAGES (\DODISKCOMMAND +RAID SELECTQ) FB.SEEFULLFN (ATTACHWINDOW TOTOPW AWAIT.EVENT) PUP.ECHOSERVER (RESETSAVE SELECTQ PRIN1 +PRINTPUP SWAPPUPPORTS SENDPUP RELEASE.PUP BLOCK AWAIT.EVENT) COMP.MLLVAR (PRIN1) \ICONW.FORMAT.TITLE1 +(FRPLACD) IRM.DISPLAY.CREF (DSPFONT CENTERPRINTINREGION) DINFO.TOGGLE.MENU (DETACHWINDOW) SEDIT::TRACK-EXTEND (SEDIT::SET-POINT-NOWHERE SEDIT::SMASH-USING UNTILMOUSESTATE GETMOUSESTATE -\\BACKGROUND SEDIT::EXTEND-SELECTION SEDIT::CHECK-SELECTION-SHIFT BLOCK) MARGINBAR.CREATE ( -IMAGEOBJPROP DSPXOFFSET DSPYOFFSET MARGINBAR) CLSMARTEN (DECLARE) \\TEDIT.FORMAT.FOOTNOTE (BLOCK -\\TEDIT.HARDCOPY.FORMATLINE FREPLACEFIELD FRPLACD) FB.ADD.FILE (FREPLACEFIELD) TURN.OFF.ETHER ( -BREAKCONNECTION DEL.PROCESS CLOSEPUPSOCKET CLOSENSOCKET) TWODINSPECT.COPYBUTTONFN (TOTOPW DECLARE -INSPECT.FLIPSELECTION BKSYSBUF.GENERAL BLOCK) HARDCOPYW (ERROR ADD.PROCESS) \\REFCNT (CHECK) -\\TEDIT.CONVERT.TO.FORMATTED (\\SPLITPIECE FREPLACEFIELD \\TEDIT.MARK.LINES.DIRTY) -REFLECT/GRAPH/DIAGONALLY (MAPC) \\DSPTRANSLATE.PSC (POSTSCRIPT.SHOWACCUM MAPC) \\ICONW.FORMAT.TITLE1 ( -FRPLACD) \\EQREFCNT1 (CHECK) SEDIT::SET-DEPTH (FREPLACEFIELD) WORD.MATCHES.BUFFER (DECLARE CHECK) -\\EXTENDEDVMEMINIT (\\INITIALIZESWAPDISK \\PUTBASEPTR \\M44DOEXTENDVMEMFILE) COMP.COND (COMP.STJUMP -COMP.STTAG) OPT.FRAMEDEL (OPT.PRDEL MAPC PUTHASH) FIND.MATCHING.QUOTE (SELECTC DECLARE CHECK) -\\FM.MOMENTARY-SETUP (DECLARE FREPLACEFIELD) \\GCMAPUNSCAN (.DELLINK. \\PUTBASEFIXP) \\LEAF.CLOSEFILE -(\\CLEARMAP LISPERROR DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND \\SENDLEAF) MAKE-PACKAGE-HASHTABLE - (DECLARE) ADDTOFILES? (PRIN1 SELECTQ LINBUF SYSBUF |printout| PRIN2 SPACES SELCHARQ SHOWDEF PRINT -ADDNEWCOM SAVESET ADDFILE BKBUFS UPDATEFILES) SEDIT::INPUT-TOKENDELIM (SELECTQ SEDIT::INSERT -SEDIT::SET-SELECTION-NOWHERE SHOULDNT) STACK.FULL.WARNING (DECLARE LISPERROR) \\STARTPAGE.PRESS ( -\\ENTITYSTART.PRESS \\DSPFONT.PRESS SETXY.PRESS PRIN3 SHOW.PRESS SETX.PRESS NEWLINE.PRESS) -OPENBSPSTREAM (SELECTC \\BSP.FLUSH.SOCKET.QUEUES DECLARE \\SETACCESS SETUPTIMER BLOCK WAKE.PROCESS) -BCOMPL2 (DECLARE SPECVARS LOCALVARS SELECTQ SET COMPEM COMPILE1 BRECOMPILE1 BLOCKCOMPILE1) -TEDIT.HARDCOPY-COLUMN-END (TEDIT.PROMPTPRINT FREPLACEFIELD) BITMAPBIT (\\ILLEGAL.ARG \\PUTBASE -\\PUTBASE24 .WHILE.TOP.DS. \\SOFTCURSORDOWN \\INSURETOPWDS DECLARE \\SOFTCURSORUPCURRENT) -\\INITMDSPAGE (\\PUTBASEPTR) TEDIT.DEFAULT.MENUFN (TEDIT.PROMPTPRINT ERSETQ \\SHOWSEL -TEDIT.RESET.EXTEND.PENDING.DELETE \\FIXSEL TEDIT.NORMALIZECARET) SEDIT::TTYFN (DECLARE WITH.MONITOR -OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) TWODINSPECT.CLOSEFN (DETACHALLWINDOWS) \\TFBRAVO.GETPARAMS (MAP -) \\FIXILINES (\\DTEST FREPLACEFIELD) IRM.GET.CREF (DECLARE IMAGEOBJPROP) \\LISP.TO.NSFILING.ATTRIBUTE - (FRPLACD) \\DSPSPACEFACTOR.IP (FREPLACEFIELD SHOW.IP APPENDNUMBER.IP ISET.IP) FLIPCURSOR (FRPTQ -SELECTC |\\DoveDisplay.SetCursorShape|) TEDIT.EXTRACTTOCLIPBOARD (PUTCLIPBOARD) -POSTSCRIPT.SET-FAKE-LANDSCAPE (POSTSCRIPT.SHOWACCUM \\DSPTRANSLATE.PSC FREPLACEFIELD \\DSPRESET.PSC) -\\ADVANCE.STORAGE.STATE (FREPLACEFIELD) SEDIT::SHRINKFN (|printout| DECLARE TERPRI RELEASE.MONITORLOCK - SEDIT::AWAKE-COMMAND-PROCESS SEDIT:SAVE-WINDOW-REGION) FNTYP (DECLARE) ADJUSTLINE.AND.RESTORE ( -SAVE.CURSOR ADJUSTLINE) \\ALLOCVIRTUALPAGEBLOCK (\\PUTBASEFIXP FREPLACEFIELD) -\\TEDIT.PROMPT.PAGEFULLFN (GETPROMPTWINDOW RELMOVEW) RECLAIM (\\DORECLAIM) D-ASSEM:FIXUP-PTR ( -UNINTERRUPTABLY \\ADDREF) |UnixShellQuote| (DECLARE RPLNODE) XCL::PPRINT-DEFINER (PRIN1 PRIN2 -SUBPRINT/ENDLINE SPACES) D-ASSEM:ASSEMBLE-FUNCTION (CL:MAPHASH) \\DSPLINEFEED.IP (FREPLACEFIELD -\\ILLEGAL.ARG) \\DOSTORAGEFULLINTERRUPT (FREPLACEFIELD LISPERROR) INSTALL-CLIPBOARD (INTERRUPTCHAR) -POSTSCRIPT.STARTPAGE (FREPLACEFIELD POSTSCRIPT.PUTCOMMAND \\SETXFORM.PSC PRIN3 RELMOVETO \\TERPRI.PSC) - NTHCHARCODE (\\MAPPNAME) SHOWBITMAP.IP (SHOW.IP ERROR SHOWBITMAP1.IP) FILEPKGTYPE (/SETTOPVAL /RPLACD - /PUTPROP /REMPROP) \\PROCESS.AFTER.EXIT (NOTIFY.EVENT) ASKUSER (DECLARE RESETSAVE LINBUF SYSBUF DOBE -PRINTBELLS CLEARBUF MAPRINT ASKUSERSETUP TERPRI MAPC ERROR! BKBUFS NOTCHECKED RPLACD) TEDIT (RESETLST -DECLARE OBTAIN.MONITORLOCK \\TEDIT.CREATEW.FROM.REGION SI::MONITOR-UNWIND FREPLACEFIELD TEXTPROP -PROCESSPROP TTY.PROCESS) \\HARDRESET-CLEANUP1 (UNINTERRUPTABLY \\PUTBASEPTR SETSTKNAME-RAW -SETSTKNTOFFSET-RAW MAPC RPLACD REMHASH) BACKSKREAD (SELECTC DECLARE CHECK) \\PROCESS.BEFORE.LOGOUT ( -ALLOW.BUTTON.EVENTS RESETSAVE |printout| PRIN1 PROCESS.RESULT) FIND-LEXICAL-ENVIRONMENT (RELSTK) -D-ASSEM:FIXUP-PTR-NO-REF (UNINTERRUPTABLY) NSNETDAYTIME0 (FREPLACEFIELD SELECTC) \\SLOWBLTCHAR ( -\\DSPPRINTCR/LF FREPLACEFIELD SELECTQ SHOULDNT .WHILE.TOP.DS. \\PUTBASE \\SOFTCURSORDOWN -\\INSURETOPWDS DECLARE \\PILOTBITBLT \\SOFTCURSORUPCURRENT \\DSPYPOSITION.DISPLAY BITBLT ERROR) -PFI.MAKE.LPT.STREAM (CLOSEF LISTPUT) \\OPENLINEBUF (DECLARE \\RESETTERMINAL) TEDIT.UPDATE.SCREEN ( -\\FILLWINDOW) \\DSPPRINTCR/LF (\\STOPSCROLL? \\CHECKCARET APPLY* DSPYPOSITION .WHILE.TOP.DS. \\PUTBASE - \\SOFTCURSORDOWN \\INSURETOPWDS DECLARE BITBLT \\SOFTCURSORUPCURRENT DSPXPOSITION) -\\TEDITMENU.RECORD.UNFORMATTED (TEXTPROP) STRPOS (DECLARE \\ILLEGAL.ARG ERROR) \\CHANGECHARSET.DISPLAY - (UNINTERRUPTABLY) SEDIT::RESHAPEFN (WYOFFSET SEDIT::COMPUTE-COMMENT-COLUMN DECLARE OBTAIN.MONITORLOCK - BITBLT SI::MONITOR-UNWIND) TB.FINISH.CLOSE (DECLARE OBTAIN.MONITORLOCK WINDOWADDPROP WINDOWDELPROP -SI::MONITOR-UNWIND) MB.MARGINBAR.SHOWTAB (SELECTQ BITBLT) \\USEREVENT (DECLARE) FB.SEEFULLFN ( -ATTACHWINDOW TOTOPW AWAIT.EVENT) \\DOGCDISABLEDINTERRUPT (|printout| TERPRI FREPLACEFIELD FLASHWINDOW) - D-ASSEM:FIXUP-SYMBOL (UNINTERRUPTABLY) SI::EXPAND-CONDITION-CASE (DECLARE) -TWODINSPECT.DEFAULT.VALUECOMMANDFN (SELECTQ INSPECT PROMPTPRINT TWODINSPECT.SETELT) FLASHWINDOW ( -UNINTERRUPTABLY DISMISS BLOCK) STRIP-KEYWORDS (FRPLACD) \\FTP.SENDVERSION (BOUT PRIN3 .EOC.) -|\\VAMBufferSave| (|\\PFPutAllocationMapPage|) CREATEW (PROMPTPRINT HELP ERROR) CL::%TAN-FLOAT ( -DECLARE) CONDITIONS::EXPAND-RESTART-CASE (DECLARE) GCGAG (DECLARE) SEDIT::INPUT-STRINGDELIM (SEDIT::INSERT -) PRINT-BITMAPS-NICELY (PRINTOUT CL:MACROLET) SEDIT::SELECT-NEXT-GAP (SEDIT::SET-SELECTION-NOWHERE) -SAVEVM (\\DEVICEEVENT \\RESETKEYBOARD \\PROCESS.AFTER.EXIT) ADDTOFILE (ADDNEWCOM MAPC ADDFILE) -SI::EXPAND-PROCEED-CASE (DECLARE) FB.FASTSEE.ONEFILE (CLEARW WINDOWPROP) RIGHTW.BUTTONEVENTFN (TOTOPW -GETMOUSESTATE) \\FLUSHNDBS (CL:FUNCALL DEL.PROCESS \\FLUSH.NDB.QUEUE) SEDIT::COMPLETION (FIXEDITDATE -PUTDEF CL:FUNCALL MARKASCHANGED) COMPILER:COPY-ENV-WITH-VARIABLE (COMPILER::ENV-BIND-VARIABLE) AIN ( -\\BINS) D-ASSEM:INTERN-DCODE (UNINTERRUPTABLY \\ADDREF D-ASSEM:FIXUP-PTR D-ASSEM::PERFORM-LOCAL-FN-FIXUPS -) MB.DEFAULTBUTTON.ACTIONFN (TEDIT.RESET.EXTEND.PENDING.DELETE \\FIXSEL TEDIT.NORMALIZECARET) -TB.FIND.PREVIOUS.TAIL (HELP) TWODINSPECT.DEFAULT.TITLECOMMANDFN (GETMOUSESTATE SELECTQ -TWODINSPECT.REDISPLAY PROMPTPRINT) IMAGEOBJCREATE (\\ILLEGAL.ARG) LIST-ALL-BLOCKRECORDS (FRPLACD) -SEDIT::HASFAT (DECLARE) \\TELERAIDSERVER (DECLARE SELECTC \\BLT \\ACTONVMEMFILE FREPLACEFIELD -\\TELERAIDSEND \\PUTBASE \\TELERAIDRELEASE \\TELERAIDEXIT \\TELEBLTCURSOR HARDRESET \\CONTEXTSWITCH -\\UPDATETIMERS \\BOXIPLUS) SETUSERNAME (|SetBcplString|) MSCLOSEFILES (CLOSEF) \\WRITEBITMAP (FRPTQ) -\\COURIER.WHENCLOSED (TAB PRIN1) \\TEDIT.LOOKS.UPDATE (DECLARE FREPLACEFIELD \\EDITSETA RETFROM) -\\MAKE.COURIER.REP.STREAM (FREPLACEFIELD) UPDATEFILES (/SETTOPVAL /NCONC1) \\SHOWSEL ( -\\TEDIT.OBJECT.SHOWSEL \\SHOWSEL.HILIGHT \\SETCARET MOVETO SELECTQ \\EDIT.UPCARET FREPLACEFIELD) -REPLACEFIELD (\\PUTFIXP \\PUTSWAPPEDFIXP .UNBOX. SELECTC \\ILLEGAL.ARG CL::%NOT-NONCOMPLEX-NUMBER-ERROR - UNINTERRUPTABLY) TEDIT.STRINGWIDTH (DECLARE) MSCHECKVARS1 (DOERROR MAPC NECCSPEC) -COMPILER:COPY-ENV-WITH-FUNCTION (COMPILER::ENV-BIND-FUNCTION) \\FIXLINELENGTH.IP (FREPLACEFIELD) FEQP -(.FLOATUNBOX. SELECTC .NEGATE. .LLSH8. .LLSH1. .LRSH8.) CL:MAKE-PACKAGE (CL:USE-PACKAGE -ENTER-NEW-NICKNAMES PUTHASH) BOXCOUNT (UNINTERRUPTABLY) CLIPBOARD-PASTE-STREAM (\\EXTERNALFORMAT -SETFILEINFO) CLISPIFY2B (CLISP4 PUTHASH) AOUT (\\BOUTS) \\FM.ENDEDIT (\\CARET.DOWN SETUPTIMER) -PRINTERROR (SELECTQ PRIN2 SPACES TERPRI FRPLACA TAB SHORTLST MAPC) \\DSPLEFTMARGIN.IP (FREPLACEFIELD -\\FIXLINELENGTH.IP) INVERT.TEXTURE.BITMAP (\\ILLEGAL.ARG \\PUTBASE) APPENDLARGEVECTOR.IP ( -APPENDSEQUENCEDESCRIPTOR.IP APPENDINT.IP) DODIRCOMMANDS (DECLARE SELECTQ DIRPRINTNAME READC DTAB PRIN1 - DPRIN1 ERROR PRINTNUM PRINTDEF SHOULDNT) SEDIT::INPUT-QUOTE (SEDIT::CLOSE-OPEN-NODE -SEDIT::INSERT-QUOTED-GAP SEDIT::SET-SELECTION-ME SEDIT::QUOTE-CURRENT-SELECTION -SEDIT::SET-SELECTION-NOWHERE SEDIT::SET-POINT SEDIT::PENDING-DELETE SEDIT::START-UNDO-BLOCK -SEDIT::REPLACE-STRING SEDIT::END-UNDO-BLOCK) INITPUPLEVEL1 (TURN.OFF.ETHER DEL.PROCESS SELECTC -\\PUPLEVEL1STATE ASSURE.ETHER.ON) = (CL:ERROR CL::%NOT-NUMBER-ERROR) REMOVE-COMMENTS (CL:WARN) -READBITMAP (ERROR) SEDIT::REVIVE-NODE (FREPLACEFIELD) COURIER.OPEN (RESETSAVE FREPLACEFIELD SPP.DSTYPE - |printout| TERPRI PUTWORD DECLARE SPP.SENDEOM SPP.CLOSE SPP.CLEAREOM) COURIER.WRITE.REP ( -COURIER.WRITE \\BOUT) TEDIT.\\INSERT (DECLARE TEDIT.PROMPTPRINT TEDIT.NORMALIZECARET \\SHOWSEL -SELCHARQ \\INSERTCR \\INSERTCH \\FIXILINES TEDIT.INSERT.UPDATESCREEN) \\ACTONDISKPAGES ( -UNINTERRUPTABLY .SETUPDISKBUFFERS. \\BLT \\PUTBASE \\CLEARWORDS DECLARE ERROR \\CONTEXTSWITCH -\\CLEARBYTES \\BOXIPLUS \\DISKERROR RPLACA) WTFIXLOADEF (LOAD LOADFNS) |\\VFMSaveBuffer| ( -|\\PFPutFileMapPage| FREPLACEFIELD) CHECKBUFFERREFVAL (\\DELREF FREPLACEFIELD) \\PNC (ERROR -UNINTERRUPTABLY \\PUTBASEBYTE FREPLACEFIELD %SET-ARRAY-OFFSET) \\TELERAIDINIT (MAPC \\LOCKPAGES) -INTERPRESSBITMAP (RELMOVETO PRIN1 SELECTQ ERROR \\MOVETO.IP SHOWBITMAP.IP) \\CLEARBYTES (\\PUTBASEBYTE -) PARSE.NSNAME (GETCLEARINGHOUSE) MB.SELFN (\\COPYSEL FREPLACEFIELD \\FIXSEL \\SHOWSEL) -\\TEDIT.HCPYLOOKS.UPDATE (DECLARE FREPLACEFIELD \\EDITSETA RETFROM) \\DOACTONDISKPAGES ( -\\DODISKCOMMAND RAID SELECTQ) ASSURE.ETHER.ON (ERROR) OPENPOSTSCRIPTSTREAM (|printout| DECLARE PRIN1 -PRINTOUT SI::RESETUNWIND MAPC POSTSCRIPT.OUTSTR \\DSPFONT.PSC \\SWITCHFONTS.PSC -POSTSCRIPT.SET-FAKE-LANDSCAPE POSTSCRIPT.STARTPAGE) \\WRITEOUTBUFFERS (\\WRITEPAGES) UPDATECHANGED1 ( -|printout| PRIN1) RAISE-SIGNAL (CL:FLET DEFAULT-HANDLE-CONDITION TRY-TO-HANDLE) -CREATETEXTUREFROMBITMAP (\\ILLEGAL.ARG BITBLT) SEDIT::REPLACE-ROOT (SEDIT::UNDO-BY SEDIT::KILL-NODE -RPLACA SEDIT::SET-DEPTH SEDIT::NOTE-CHANGE SEDIT::SUBNODE-CHANGED-ROOT SEDIT::SET-POINT-NOWHERE) -HASHFILESPLST (DECLARE) DEFPACKAGE (MAPC) COPYARRAY (\\COPYHARRAYP FRPTQ SELECTQ) \\COERCEFONTDESC ( -DECLARE) SEDIT:REPLACE-SELECTION (CL:ERROR SEDIT::PENDING-DELETE SEDIT::INSERT) CL:Y-OR-N-P ( -CL:FRESH-LINE) \\CLEARMAP (FDEVOP UNINTERRUPTABLY \\RELEASEBUFFER) SETD (\\DTEST LISPERROR \\RPLPTR -DECLARE) \\DISKERROR (SELECTC RAID) \\WRITEPAGES (\\UPDATEOF) TRAPMAKE (SORT |printout| PRIN1 DV) -|InstallUnixPrinter| (DECLARE PUTASSOC) ELTD (\\DTEST LISPERROR DECLARE) SETY.PRESS (\\WOUT -FREPLACEFIELD) CL:RENAME-PACKAGE (REMHASH PUTHASH ENTER-NEW-NICKNAMES) CL:IN-PACKAGE (CL:USE-PACKAGE -ENTER-NEW-NICKNAMES) VARSBOUNDINFORM (DECLARE) \\DOWRITEDISKPAGES (\\M44MARKPAGEFREE \\PUTBASE -\\DODISKCOMMAND SELECTQ) \\RELEASEBUFFER (FREPLACEFIELD) TEDIT.HARDCOPY.PAGEHEADING (FRPLACD -FREPLACEFIELD LISTPUT) REPLACEFIELDVAL (REPLACEFIELD) IRM.DISPLAY.CREF (DSPFONT CENTERPRINTINREGION) -TB.UPDATE.DISPLAY (FREPLACEFIELD BITBLT TB.DISPLAY.LINES BLTSHADE) PUTBASEPTRX (PUTBASE) DOPMAP ( -\\READPAGES) \\TEDIT.MARKINACTIVE (FREPLACEFIELD) \\MEDW.BITBLT (SHOULDNT WINDOWOP \\INSURETOPWDS -DECLARE) SEDIT::PLACE-CARET-AND-SELECTION (SEDIT::SET-SELECTION) /REPLACEFIELD (UNDOSAVE) \\LISPERROR -(DECLARE SELECTQ \\MP.ERROR) EXCHANGEXIPS (DISCARDXIPS SENDXIP \\BACKGROUND) \\SEQUIN.HANDLE.ACK ( -\\SEQUIN.RETRANSMITNEXT BLOCK \\DEQUEUE FREPLACEFIELD SEQUINOP) M44.SIGNAL.DISK.ERROR (SELECTC -LISPERROR ERROR) UNDOSAVE (LISPXWATCH NCONC FRPLACA FRPLACD) PFI.COLLECT.DEFINERS (FRPLACD) LRSH ( -.UNBOX. SELECTC \\ILLEGAL.ARG CL::%NOT-NONCOMPLEX-NUMBER-ERROR FRPTQ) COMPILER::COLLECT-CODE ( -COMPILER::GENCODE) CLEARMAP (ERROR) WHO-LINE-HOST-NAME (DECLARE) \\3MBFLUSH (BLOCK) DATATYPES (FRPLACD -) \\NSFILING.ADDQUOTES (DECLARE SELCHARQ RPLACD) ADD-SYMBOL (DECLARE MAKE-PACKAGE-HASHTABLE) -CLIPBOARD-COPY-STREAM (\\EXTERNALFORMAT) \\FLUSH.PACKET.QUEUE (\\RELEASE.ETHERPACKET) -RESOLVE-EXPORT-MISSING (MAKE-CONDITION) \\WRITEDISKPAGES (\\OPENDISKDESCRIPTOR UNINTERRUPTABLY -.SETUPDISKBUFFERS. \\BLT \\PUTBASE \\CLEARWORDS DECLARE ERROR \\CONTEXTSWITCH \\BOXIPLUS \\DISKERROR) -\\GETMAPBUFFER (FREPLACEFIELD) MAPAFTERCLOSE (\\CLEARMAP) SUBARRAY (\\DTEST) BLOCKCOMPILE (DECLARE -ERROR COMPSET PRINT CLOSEF) TEDIT.QUIT (\\ILLEGAL.ARG FREPLACEFIELD DISMISS) \\ACTONVMEMPAGES ( -FREPLACEFIELD) TB.PRINT.LINE (MOVETO POSITION CL:FUNCALL TB.SHOW.SELECTION) DISPLAYNODELINKS ( -DISPLAYLINK) \\TEDIT.MARKACTIVE (FREPLACEFIELD) SEDIT::OUTLINE-SELECTION (CL:FUNCALL) FB.CLOSE&EXPUNGE - (FB.FINISH.COMMAND) MAPPAGE (\\SETEOF) \\WRITEVMEMPAGES (CHECK FREPLACEFIELD \\BLT) -FB.ANALYZE.PATTERN (SELCHARQ FB.SETNEWPATTERN FB.SET.BROWSER.TITLE FREPLACEFIELD) MB.SETIMAGE ( -DSPXOFFSET DSPYOFFSET DSPFONT MOVETO PRIN1) TEDIT.SKIP.SPECIALCOND (FRPLACD FREPLACEFIELD) -RESHAPEALLWINDOWS (\\ALLOCMINIMUMSIZES MAPC \\ALLOCSPACETOGROUPEDWINDOWS) DINFO.UPDATE (OPENW -WINDOWPROP ERROR RESETLST FLASHWINDOW FREPLACEFIELD DINFO.UPDATE.FMENU DINFO.UPDATE.GRAPH.DISPLAY -DINFO.UPDATE.MENU.DISPLAY) \\FM.CHANGELABEL (ERROR DECLARE FREPLACEFIELD LISTPUT) MSCHECKBOUNDFREE ( -CLRHASH NECCSPEC SELECTQ UNECCSPEC) CL:DELETE (CL:ERROR) |\\VAMRecomputeFreePageCount| (DECLARE -OBTAIN.MONITORLOCK FREPLACEFIELD |\\PFPutLogicalVolumePage| SI::MONITOR-UNWIND) \\ENDVECRUN ( -SHOW.PRESS SETXY.PRESS MAPC \\BOUT FREPLACEFIELD) APPENDINT.IP (APPENDBYTE.IP) \\DODISKCOMMAND ( -FREPLACEFIELD \\BLT EMPUTBASE \\BOXIPLUS) PFI.PRINT.INDEX (DSPNEWPAGE PFI.CENTER.PRINT -PFI.PRINT.INDICES) \\SETEOF (\\RELEASECPAGE \\SETIODIRTY) SEDIT::INPUT-DOT (SEDIT::DOT-THIS-LIST) -SETX.PRESS (\\WOUT FREPLACEFIELD) \\POSTSCRIPT.NSHASH (PUTHASH) \\CLEANUPDISKQUEUE (EMPUTBASE -\\DODISKCOMMAND APPLY*) CLRHASH (UNINTERRUPTABLY DECLARE) SEDIT::REPLACE-NODE (SEDIT::SET-SELECTION-ME - SEDIT::PENDING-DELETE SEDIT::INSERT) COMP.PUNT (COMPERROR) \\DSPCLIPPINGREGION.IP (UNINTERRUPTABLY -FREPLACEFIELD \\CHANGE-VISIBLE-REGION.IP) REHASH (CLRHASH DECLARE PUTHASH) BCOMPL1A (SELECTQ BCOMPL1A -CL:FORMAT) TWODINSPECT.SETELT (WITH-INSPECTOR-ENV REMOVEPROMPTWINDOW TWODINSPECT.REPLACE) \\MAPPAGE ( -CHECKBUFFERREF \\DELREF \\WRITEOUTBUFFERS) FB.CHECK.NAME.LENGTH (RPLACD) \\GETDISKCB (FREPLACEFIELD -\\CLEARCB) MB.DISPLAY (MB.SETIMAGE BITBLT PRIN1) ONEDINSPECT.REPAINTFN (WITH-INSPECTOR-ENV -ONEDINSPECT.PRINTELEMENT INSPECT.INVERTSELECTION) CL:LIST-ALL-PACKAGES (CL:MAPHASH) -\\SEQUIN.FLUSH.RETRANSMIT (FREPLACEFIELD \\ENQUEUE) CL::%SIN-FLOAT (DECLARE) \\TEDIT.MOVE.PIECEMAPFN ( -APPLY* FREPLACEFIELD) UNMARKASCHANGED (/RPLACA) \\DSPBOTTOMMARGIN.IP (FREPLACEFIELD) -TB.ITEM.UPDATABLE? (FREPLACEFIELD) SCALE/GRAPH (SET/LABEL/SIZE) MAPHASH (DECLARE APPLY*) -INSPECT/AS/RECORD (FRPLACD) SEDIT::DELETE-LITATOM (SEDIT::REPLACE-STRING) SEDIT::ATOM-CHAR-ESCAPED ( -DECLARE CHECK) WORDCONTENTS (CHECK) TEXTUREOFCOLOR (BITBLT) SEDIT::RELINEARIZE-WHERE-NECESSARY ( -SEDIT::RELINEARIZE FREPLACEFIELD CL:FUNCALL) \\NSINIT (MAPC \\ADD.PACKET.FILTER \\DEL.PACKET.FILTER -DEL.PROCESS RESTART.PROCESS ADD.PROCESS) \\TFBRAVO.INSTALL.PAGEFORMAT (MAPC) COMP.AC (COMP.PUNT) -\\3MBWATCHER (\\HANDLE.RAW.PACKET BLOCK) OPT.FRAMEOPT (MAPC) \\FM.HIGHLIGHTITEM (BLTSHADE) -MSCHECKBLOCKBASIC (MAPC FRPLACD) HARRAYPROP (RPLACD FREPLACEFIELD LISTPUT ERROR) \\COLLECTDIRTYBUFS ( -FRPLACD) \\PUNT.BLTSHADE.BITMAP (DECLARE UNINTERRUPTABLY FREPLACEFIELD \\BITBLTSUB) -APPENDSEQUENCEDESCRIPTOR.IP (ERROR) \\STORAGE.TYPE (DECLARE CHECK \\MAPMDS \\BOXIPLUS \\PUTBASEFIXP -\\STMDSTYPE) PFI.PROCESS.FILE (PFI.PASS.COMMENT READCCODE PFI.PRINT.COMMENTS CL:FUNCALL -PFI.HANDLE.EXPR BLOCK) SETWORDCONTENTS (ERROR) CL:AREF (CL:ERROR) \\3MBSENDPACKET (\\MAYBEPRINTPACKET -CL:CERROR \\BLT \\WRITERAWPBI PRIN1 \\REQUEUE.ETHERPACKET) SIMPLETEXTEDIT (SET.TTYINEDIT.WINDOW -RESETSAVE COPYBYTES SETFILEPTR FREERESOURCE DECLARE) \\STORAGE.HUNKTYPE (DECLARE MAPC \\BOXIPLUS) -\\STLINP (PRIN1 TAB PRINTNUM) \\NOTE.3TO10 (RPLACA FREPLACEFIELD) MSCHECKFNINBLOCK (MAPC) -|\\VFMDeletePageGroup| (DECLARE OBTAIN.MONITORLOCK |\\VFMContextSet| MESASETQ |DiskError| LISPERROR -|\\VFMDelete| |\\VFMInsert| SI::MONITOR-UNWIND) SHOWRECTANGLE.PRESS (\\WOUT) APPENDIDENTIFIER.IP ( -APPENDSEQUENCEDESCRIPTOR.IP DECLARE \\BOUT) \\MAKE.PMAP.DEVICE (FREPLACEFIELD) PFI.PRINT.MULTI.INDEX ( -STREAMPROP DSPNEWPAGE PFI.CENTER.PRINT TERPRI CHANGEFONT MAPC DSPXPOSITION PRIN3 RELMOVETO) WORDOFFSET - (CHECK) \\TEDIT.SEARCH.CODETABLE (MAPC) EXPANDBITMAP (EXPANDBM) \\PUNT.BITBLT.BITMAP (DECLARE SELECTQ - UNINTERRUPTABLY FREPLACEFIELD \\BITBLT.MERGE \\BITBLTSUB ERROR \\BWTOCOLORBLT SHOULDNT) -\\PAGED.GETNEXTBUFFER (LISPERROR UNINTERRUPTABLY \\RELEASECPAGE \\SETIODIRTY SHOULDNT) MSUPDATE ( -MSNLAMBDACHECK DECLARE MSPRGDWIM PRIN1 MAPC SELECTQ MSSTOREDATA) SEDIT::EDIT-HELP (SEDIT::CLOSE-OPEN-NODE - |printout| TERPRI) \\CHECKFREEPAGE (FRPTQ \\PUTBASE) COMPILER::CLOSURE-ANNOTATE-LAMBDA (FRPLACD) -SEDIT::RECOMPUTE-WIDTH (FREPLACEFIELD) STOPNS (\\DEL.PACKET.FILTER DEL.PROCESS CLOSENSOCKET) STORAGE ( -FRPLACD DECLARE |printout| PRIN1 TAB \\STORAGE.TYPE \\STORAGE.HUNKTYPE PRINTNUM \\STLINP -\\SHOW.ARRAY.FREELISTS) SETUPFONTS.IP (DEFINEFONT.IP FREPLACEFIELD) INSERT.TEXT (TTINSERTSECTION) -\\PAGEDSETFILEPTR (\\UPDATEOF UNINTERRUPTABLY \\RELEASECPAGE \\SETIODIRTY) \\FM.DISPLAYITEM (BLTSHADE) - \\PAGED.SETEOFPTR (FORGETPAGES \\SETEOF \\CLEARBYTES \\SETIODIRTY \\TRUNCATEFILE) -SEDIT::COPY-STRUCTURE-STRING (FREPLACEFIELD RPLACA) SEDIT::COLLECT-UNDO-BLOCK (RPLACD RPLACA) -BCOMPL.BODY (DECLARE COMPSET MAPC) PUTHASH (\\HASHACCESS) INSPECT/AS/BLOCKRECORD (TERPRI) -ICONW.PRINT-JUSTIFIED (DSPFONT DSPOPERATION LINELENGTH DSPLEFTMARGIN DSPRIGHTMARGIN DSPFILL MOVETO -RELMOVETO \\OUTCHAR TERPRI) \\DOFORMATTING.HARDCOPY (FREPLACEFIELD SELECTQ DECLARE \\EDITSETA -\\TEDIT.PURGE.SPACES) GET-TWOD-DISPLAYW (WINDOWPROP DSPRIGHTMARGIN DSPFONT) \\BITBLT.BITMAP.SLOW ( -DECLARE SELECTQ UNINTERRUPTABLY FREPLACEFIELD \\BITBLT.MERGE \\BITBLTSUB ERROR \\BWTOCOLORBLT SHOULDNT -) \\CLEARCB (\\CLEARWORDS FREPLACEFIELD) \\SETIODIRTY (FREPLACEFIELD SHOULDNT) IRM.LOAD-GRAPH (CL:WARN -) SORT (DECLARE FRPLACD) MSUPDATEFN1 (MSUPDATE MSUPDATEFN1) SEDIT::PROPAGATE-WIDTH-CHANGE ( -FREPLACEFIELD SEDIT::RECOMPUTE-WIDTH) \\TIME.NOT.SET (TERPRI) \\HASHACCESS (DECLARE UNINTERRUPTABLY -\\HASHRECLAIM) COMP.BOOL (COMP.STTAG) \\3MBENCAPSULATE (FREPLACEFIELD) WARNUSER (SOME LISPXPRIN1 -LISPXPRIN2 CLISPFORERR1 LISPXTERPRI) PRINT3TO10 (FRESHLINE SELECTC |printout| PRINTNSHOSTNUMBER) -MSCHECKBLOCK (DECLARE MAPC SET MSCHECKBLOCKBASIC MSCHECKFNINBLOCK UNECCSPEC MSCHECKBOUNDFREE FRPLACD -TERPRI MSMSGPRINT) |\\VAMFreePageGroup| (DECLARE OBTAIN.MONITORLOCK WITH-RESOURCE FREERESOURCE -|\\VAMUpdateVAM| FREPLACEFIELD SI::MONITOR-UNWIND) COURIER.WRITE.BULKDATA (PUTWORD DECLARE -COURIER.WRITE) /SETWORDCONTENTS (UNDOSAVE) PFI.PRINT.FILECREATED (CHANGEFONT PFI.PRINT.TO.TAB PRINTOUT - PRIN1 PRINTDEF FRPLACD) GETDEF.I.S.OPR (SHOULDNT) SEDIT::GET-MENU (FM.RESETMENU WINDOWADDPROP -WINDOWPROP SEDIT::MENU-INIT-STATE) ADDTOCOMS (SELECTQ) DSPCREATE (\\DTEST FREPLACEFIELD DECLARE -\\SETACCESS DSPFONT DSPDESTINATION DSPRIGHTMARGIN DSPSOURCETYPE DSPOPERATION) \\PARTEND.PRESS (\\WOUT -DECLARE SETFILEPTR) RESETOPENFILES (RESETSAVE FRPLACD) EDITDEF.FNS (EDITE CL:FORMAT ERROR) ICONW.TITLE - (\\ICONW.SHOW.TITLE \\ICONW.REPAINTFN) SEDIT::SEDITL (DECLARE SEDIT:SEDIT) GET-TOPW (DSPRIGHTMARGIN -DSPFONT) DEFAULT.EDITDEF (DECLARE) \\STRINGHASHBITS-UFN (DECLARE) ONEDINSPECT.BUTTONEVENTFN (TOTOPW -GETMOUSESTATE) INVERTED/SHADE/FOR/GRAPHER (BLTSHADE) COMPILE1A (CL:FORMAT DWIMIFY0 TERPRI) -HASHOVERFLOW (ERRORX HASHOVERFLOW.UPDATEARRAY) TTPRIN1COMMENT (TTPRIN1) CWINDOWPROP (|printout| PRIN1) - DSPSOURCETYPE (LISPERROR UNINTERRUPTABLY DECLARE) \\TEDIT.INTERRUPT.SETUP (UNINTERRUPTABLY) -\\STMDS.APPROX (SPACES PRIN1) SEDIT::COPY-SELECTION-LITATOM (BKSYSBUF) ONEDINSPECT.COPYBUTTONFN ( -TOTOPW DECLARE INSPECT.FLIPSELECTION BKSYSBUF.GENERAL BLOCK) \\TEDIT.UPDATE.SHOWSEL (FREPLACEFIELD -\\EDIT.UPCARET \\SHOWSEL.HILIGHT \\SETCARET) \\HASHTABLE.DEFPRINT (.SPACECHECK. \\OUTCHAR \\SOUT -\\PRINTADDR) |\\SFFixDestination| (|\\SFFixClippingRegion| \\INVALIDATEDISPLAYCACHE |\\SFFixFont|) -TTPRINSPACE (RPTQ TTBOUT) \\VANILLADISKINIT (SETCASEARRAY) \\NSFILING.REMOVEQUOTES (FRPLACD) -\\CLIPCURVELINE.IP (MOVETO.IP LINETO.IP) \\FIXCODENUM (DECLARE \\PUTBASEBYTE) DISPLAYGRAPH ( -DSPRIGHTMARGIN MAPC) |\\SFFixFont| (\\INVALIDATEDISPLAYCACHE) |\\SFFixClippingRegion| (FREPLACEFIELD) -CHCON (FRPLACD \\MAPPNAME) \\PAGED.FORCEOUTPUT (\\UPDATEOF UNINTERRUPTABLY \\SETIODIRTY FRPLACD -\\WRITEOUTBUFFERS RPLACD \\TRUNCATEFILE) \\CODEARRAY (LISPERROR) WHO-LINE-USERNAME (DECLARE) -\\VANILLAHOSTNAMEP (COREDEVICE FREPLACEFIELD \\DEFINEDEVICE) \\SWAPDISKERROR (SELECTC RAID) -RECORDACCESS (DECLARE UNCLISPTRAN) \\3MBGETPACKET (\\BLT HELP \\BOXIPLUS \\RCLK FREPLACEFIELD -\\MAYBEPRINTPACKET) \\PAGEDREADP (DECLARE CHECK \\NSIN \\BACKNSCHAR) |\\DSKOpenDevice| (DECLARE -OBTAIN.MONITORLOCK \\DEFINEDEVICE SI::MONITOR-UNWIND) CL:APROPOS (\\UPCASEBASE) PPBUFS (TERPRI -|printout|) \\SEQUIN.CLEANUP (\\SEQUIN.CONTROL) \\STRINGWIDTH.PRESS (DECLARE \\MAPPNAME) -\\CHECKARRAYBLOCK (DECLARE \\CHECKARRAYBLOCK) \\NEWLENGTHIS (\\UPDATEOF) PRINTBINDINGS (|printout| -PRIN1 PRIN2 SHOWPRINT RELSTK) |\\LFOpenDevice| (DECLARE OBTAIN.MONITORLOCK |\\PFEnsureInitialized| -|\\LFCloseDirectory| SI::MONITOR-UNWIND) BYTECOMPILE2 (COMP.ATTEMPT.COMPILE) CL:FIND-ALL-SYMBOLS ( -DECLARE CL:MAPHASH) \\ALLOCBLOCK.OLD (DECLARE \\CHECKARRAYBLOCK \\DELETEBLOCK? \\MERGEBACKWARD -\\MERGEFORWARD \\CLEARCELLS) \\CREATESTARFONT (DECLARE) |\\UFSOpenDevice| (DECLARE OBTAIN.MONITORLOCK -\\DEFINEDEVICE SI::MONITOR-UNWIND) CL:APROPOS-LIST (\\UPCASEBASE) \\ALLOCBLOCK.NEW (DECLARE -\\MERGEBACKWARD SELECTQ \\MAKEMDSENTRY \\NEW2PAGE UNLESSINEW SETQ.NOREF) SEDIT::SHIFT-STRING (\\BLT -\\PUTBASE) \\IDLE.PROMPT.WATCHER (DISMISS PROCESS.EVAL) UNPACK (FRPLACD \\MAPPNAME) DCHCON (DECLARE -ADDTOSCRATCHLIST RPLACD) ONEDINSPECT.CLOSEFN (DETACHALLWINDOWS) SEDIT::SEDITE (SEDIT:SEDIT) -GET-CORNERW (DSPFONT) \\SFFIXLINELENGTH (FREPLACEFIELD \\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD) -POSTSCRIPT.FONTSAVAILABLE (FRPLACD) BKLINBUF (\\RESETLINE \\OUTCHAR \\INCPARENCOUNT CHECK \\CLOSELINE) - MSCHECKBLOCKS (MAPC MSNOTICEFILE UPDATECHANGED TAB FRPLACD) \\STRING-EQUAL-HASHBITS-UFN (DECLARE) -\\MAIKO.ALLOCBLOCK (DECLARE \\ILLEGAL.ARG \\LISPERROR SELECTQ ERROR UNINTERRUPTABLY FRPTQ -FREPLACEFIELD \\CHECKARRAYBLOCK .CHECK.ALLOCATION.COUNT. \\DELREF LISPERROR) CL::%SQRT-COMPLEX ( -DECLARE) \\GETFBB (MAPC) DUMPI.S.OPRS (LISPXPRINT) GETSELECTEDITEMS (FRPLACD) \\ACCHARPOSLIST ( -SETFILEPTR FRPLACD) \\CLOSELINE (\\SETFILEPTR) MSSHOWUSE (LOADFNS MSUPDATEFN1 |printout| PRIN1 MAPC -PRINT) SCANDECLARECOLON (SELECTQ SCANDEFINEQ SETFILEPTR SCANDECLARECOLON SCANEXP SKREAD) \\HASHRECLAIM - (UNINTERRUPTABLY DECLARE FREPLACEFIELD) SEDIT::PARSE-NEW (FREPLACEFIELD) \\TEDIT.NSCHAR.RUN (HELP -FREPLACEFIELD \\DELETECH \\TEDIT.INSERT.PIECES SETFILEPTR BOUT) COPYHASHFILE (DECLARE MAPHASHFILE) -COMP.EVQ (DECLARE SI::RESETUNWIND) \\MERGEFORWARD (DECLARE \\DELETEBLOCK? \\ARRAYBLOCKMERGER) -\\ACCHARWIDTHLIST (FRPLACD) FB.HANDLE.ABORT.BUTTON (SHADEITEM FREPLACEFIELD) \\LINKBLOCK ( -\\CHECKARRAYBLOCK DECLARE FREPLACEFIELD \\PUTBASEPTR) CASEARRAY (SETA) MB.BUTTONEVENTINFN ( -FREPLACEFIELD) ONEDINSPECT.DEFAULT.VALUECOMMANDFN (SELECTQ INSPECT PROMPTPRINT ONEDINSPECT.SETELT) -SEDIT::START-PROCESS (ADD.PROCESS) TWODINSPECT.RESHAPEFN (CLEARW TWODINSPECT.MAKEREGIONS -TWODINSPECT.ADJUSTSELECTION TWODINSPECT.REPAINTFN) \\MERGEBACKWARD (DECLARE \\CHECKARRAYBLOCK -\\DELETEBLOCK?) \\FAMILYCODE (SETFILEPTR SELECTQ) TWODINSPECT.SELECTCOLUMNPROP ( -INSPECT.INVERTSELECTION INSPECT.INVERTREGION) \\STMDSTYPE (PRIN2 SPACES \\STMDS.APPROX) -SEDIT::INPUT-NORMAL-CHAR (|printout| DECLARE TERPRI SELECTQ FREPLACEFIELD SEDIT::INSERT -SEDIT::INSERT-STRING SHOULDNT) \\SEQUIN.RETRANSMITNEXT (SENDPUP) \\RESETLINE (UNINTERRUPTABLY -FREPLACEFIELD \\SETFILEPTR) \\TEXTTTYBOUT (\\TEDIT.CHARDELETE DECLARE CHECK SELCHARQ \\TEXTBOUT -FREPLACEFIELD) \\ALLOCHUNK (FRPLACD ERROR HELP \\ADDREF) ALPHORDER (DECLARE) -SEDIT::COMPUTE-SELECTION-POSITION-LITATOM (SEDIT::STRING-OFFSET) FB.HEADINGW.RESHAPEFN (CLEARW) -MSNOTICEFILE (DECLARE ERROR LOADFROM SI::RESETUNWIND ERROR! LOADVARS /RPLACD) \\NEW.MKATOM (DECLARE) -SCANEXP (DECLARE SETFILEPTR RATOM SCANDECLARECOLON SELECTQ FILECREATED1 SKREAD EVAL) -BUTTONPANEL/SELECTION/FN (SHADEITEM) PACKC (LISPERROR \\PUTBASEFAT \\PUTBASETHIN FREERESOURCE DECLARE) - SPP.DSTYPE (DECLARE) \\TEDIT.FORMATTABS (SELECTQ \\RPLPTR SHOULDNT) COPYHASHITEM (LOOKUPHASHFILE) -\\MAKEFREEARRAYBLOCK (FREPLACEFIELD DECLARE) OPT.CODELEV (OPT.CCHECK) INTERPRET/MARK/FORMAT (DECLARE) -DUNPACK (DECLARE ADDTOSCRATCHLIST RPLACD) \\FM.PUTITEMPROP (LISTPUT) REMWINDOWPROP (LISPERROR RPLACD -FRPLNODE2 FREPLACEFIELD) \\FIXCODEPTR (DECLARE UNINTERRUPTABLY \\ADDREF) SEDIT::EXTRACT-CURRENT-SELECTION - (SEDIT::CLOSE-OPEN-NODE |printout| TERPRI SEDIT::PENDING-DELETE SEDIT::INSERT CL:FORMAT RPLACD -SEDIT::START-UNDO-BLOCK SEDIT::UNDO-BY SEDIT::END-UNDO-BLOCK) \\CHECKFORSTORAGEFULL (DECLARE -\\MP.ERROR FREPLACEFIELD \\DORECLAIM \\PUTBASEFIXP \\ADVANCE.STORAGE.STATE) PACK (\\ILLEGAL.ARG -DECLARE RPLSTRING LISPERROR \\PACK.ITEM FREERESOURCE) SETDISPLAYHEIGHT (DECLARE HELP \\ILLEGAL.ARG -\\PUTBASE) \\M44DOEXTENDVMEMFILE (SHOULDNT \\PUTBASE \\DISKERROR \\EXTENDISFMAP) \\SETBRUSH.IP ( -APPENDNUMBER.IP ISET.IP SETCOLOR.IP) CL::%LOG-FLOAT (DECLARE CL::%FLOAT-UNBOX) \\PACK.ITEM (DECLARE) -\\DELETEBLOCK? (DECLARE \\PUTBASEPTR \\MP.ERROR FREPLACEFIELD) INVERTW (DSPFILL) SEDIT::EXPAND ( -|printout| TERPRI) \\PAGEPAD.PRESS (SETFILEPTR \\BOUT) \\REQUEUE.ETHERPACKET (SELECTQ -\\RELEASE.ETHERPACKET UNINTERRUPTABLY \\ENQUEUE) CLEARBUF (\\CLEARSYSBUF \\RESETTERMINAL) -\\TEDIT.GET.TERMSA.WIDTHS (\\WORDSETA DECLARE CHECK) MSGETDEF (PUTTABLE) \\SHOWSEL.HILIGHT (BITBLT) -TTYINEDIT (CLOSEW SETFILEPTR FREERESOURCE DECLARE) SEDIT::PARSE--GAP (SEDIT::BUILD-NODE) SPP.OPEN ( -OBTAIN.MONITORLOCK RESETSAVE MONITOR.AWAIT.EVENT \\SPP.PROBE RELEASE.MONITORLOCK WAKE.PROCESS BLOCK -MAP) \\TEDIT.PURGE.SPACES (DECLARE \\EDITSETA) \\READFONTWDFILE (DECLARE) \\LITATOM.EATCHARS (ERROR -\\PUTBASETHIN) COMP.CPI1 (COMP.EFFECT COMP.VAL COMP.STSETQ) BLOCK (\\MP.ERROR FREPLACEFIELD -\\PROC.RESUME \\DECUSECOUNT DISMISS WINDOW.MOUSE.HANDLER MAPC) OPT.RETMERGE (SELECTQ PUTHASH -OPT.SETDEFREFS DREMOVE NCONC1 OPT.COMPILERERROR RPLACA OPT.PRDEL OPT.UBDEL) TEDIT.MOVE (\\DELETECH -\\FIXDLINES FREPLACEFIELD \\TEDIT.INSERT.PIECES \\TEDIT.HISTORYADD \\TEDIT.WINDOW.TITLE \\FIXILINES -\\TEDIT.CONVERT.TO.FORMATTED TEDIT.UPDATE.SCREEN \\FIXSEL) PAGEFULLFN (PRIN1 FRPTQ) -DBG::MAKE-FRAME-INSPECT-WINDOW (DBG::%RELEASE-STACK-DATUM WINDOWADDPROP) \\PEEKNS (\\PROMISCUOUS.OFF -RPTQ BLOCK \\PROMISCUOUS.ON) SCANDEFINEQ (SETFILEPTR NCONC1 SELECTQ RPLACA SCANFILEHELP SKREAD RPLACD -RETFROM) CL::%SQRT-FLOAT (DECLARE CL::%FLOAT-UNBOX) \\FIXCODESYM (DECLARE) TEDIT.SETFUNCTION ( -\\SETSYNCODE CHECK FREPLACEFIELD) \\MOVETO.HCPYMODE (\\DSPXPOSITION.HCPYMODE) -SEDIT::COMPUTE-POINT-POSITION-LITATOM (SEDIT::STRING-OFFSET) FB.EDITLISPFILE (FB.PROMPTW.FORMAT -EXEC-EVAL RESETFORM) INSTALL-WHO-LINE-OPTIONS (WINDOWPROP) TB.FIND.ITEM (\\DTEST SELECTQ) -\\ICONW.SHOW.TITLE (ICONW.PRINT-JUSTIFIED BITBLT) COMPILER::CLOSURE-ANNOTATE-CATCH (MAPC) -TOPW.RESHAPEFN (CLEARW TOPW.ADJUSTSELECTION) IRM.RESET (OPENW CLOSEW CLOSEHASHFILE) \\READACFONTBOXES -(SETFILEPTR FRPLACD) SCANCOMPILEDFN (RETRYSCAN SETFILEPTR NCONC1 LAPRD RPLACA RETFROM LCSKIP) -\\TEDIT.UNPARSE.PARALOOKS.LIST (SELECTQ SHOULDNT) SEDIT::PARSE (CL:FUNCALL) INTEGERLENGTH (.NEGATE.) -\\DOFORMATTING (FREPLACEFIELD SELECTQ DECLARE \\EDITSETA \\TEDIT.PURGE.SPACES) \\INITIALIZESWAPDISK ( -\\BLT \\PUTBASEPTR) COMP.CPI (COMP.CPI1 COMP.STUNBIND COMP.STPOP COMP.STJUMP COMP.CALL -OPT.COMPILERERROR) \\COPYARRAYBLOCK (SELECTC FRPTQ \\COPYCODEBLOCK \\BLT) OPT.RETTEST (SELECTQ) -MAKEBITTABLE (\\ZEROBYTES CLRHASH MAPC CHECK) |\\VAMAllocPageGroup| (DECLARE OBTAIN.MONITORLOCK -|\\VAMFindFreePages| FREPLACEFIELD WITH-RESOURCE FREERESOURCE SI::MONITOR-UNWIND) \\COPYCODEBLOCK ( -\\BLT \\MAP-CODE-POINTERS \\ADDREF) PLAYTUNE (CL:UNWIND-PROTECT BEEPON BEEPOFF BLOCK) \\IDLE.ISMEMBER -(PRINTOUT) \\STREAMCHARWIDTH (DECLARE CHECK) SEDIT::EVAL-SELECTION (TERPRI |printout|) COPYALL (RPLACD - DECLARE MAPHASH FRPTQ) \\BCPLSOUT.PRESS (\\BOUT) TRAPLOOP (MAPC DV FRPLACD SORT) \\IDLE.AUTHENTICATE -(|printout|) ONEDINSPECT.DEFAULT.TITLECOMMANDFN (GETMOUSESTATE SELECTQ ONEDINSPECT.REDISPLAY -PROMPTPRINT) \\TEDIT.HARDCOPY.FORMATLINE (DECLARE \\SETUPGETCH \\EDITSETA \\TEDIT.HCPYLOOKS.UPDATE -SELECTQ TEDIT.HARDCOPY.PAGEHEADING TEDIT.SKIP.SPECIALCOND SELCHARQ \\TEDIT.PURGE.SPACES -\\TEDIT.NSCHAR.RUN TEDIT.PROMPTPRINT \\DOFORMATTING.HARDCOPY) DESCRIBE-VIRTUAL-MEMORY (|printout| -CL:FORMAT) \\ADVANCE.ARRAY.SEGMENTS (\\MERGEBACKWARD) COMPILEMODE (MAPC) \\SAVELINEBUF (SELECTC -\\CLOSELINE \\SETFILEPTR \\BINS) TB.DISPLAY.LINES (TB.PRINT.LINE FREPLACEFIELD) FILEPOS (LISPERROR -\\SETFILEPTR) \\CHDEL1 (\\SETEOFPTR) TEDIT.GETFUNCTION (DECLARE CHECK) SEDIT::CLOSE-NODE-LITATOM ( -SEDIT::UNDO-BY SEDIT::RELEASE-OPEN-STRING SEDIT::SUBNODE-CHANGED SEDIT::NOTE-CHANGE-IN-SIMPLE) -SEDIT::FIND-NODE (FREPLACEFIELD) XTOUSTRING (RPLCHARCODE SHOULDNT) \\ECHOCHAR (\\OUTCHAR) -\\SEQUIN.HANDLE.INPUT (RELEASE.PUP SEQUINOP SELECTC \\SEQUIN.CONTROL \\SEQUIN.HANDLE.ACK -UNINTERRUPTABLY INCLEAFSTAT \\SEQUIN.RETRANSMIT \\SEQUIN.FLUSH.CONNECTION) \\BYTESETA (LISPERROR) -\\DSPYPOSITION.HCPYMODE (UNINTERRUPTABLY \\INVALIDATEDISPLAYCACHE \\ILLEGAL.ARG) \\WORDELT (LISPERROR) - FFILEPOS (LISPERROR \\SETFILEPTR \\SETUP.FFILEPOS \\DECFILEPTR FREERESOURCE DECLARE) TTY.PROCESS ( -FREPLACEFIELD \\CHECKCARET FRPLACD UNINTERRUPTABLY CL:FUNCALL) CL::%RATIO-PRINT (PRIN1 .SPACECHECK. -DECLARE \\SOUT) FB.PRINTFN (PRIN3 \\OUTCHAR TB.CLEAR.LINE) CHANGEBACKGROUNDBORDER (SELECTC -FREPLACEFIELD |\\DoveDisplay.SetBorderPattern|) \\SETUP.FFILEPOS (PUTBASE PUTBASEBYTE) CONVERT-LITATOM - (\\LITATOM.EATCHARS INTERN-LITATOM) \\ETHEREVENTFN (\\SETETHERFLAGS \\SETLOCALNSNUMBERS \\FLUSHNDBS -FREPLACEFIELD \\LOCKWORDS \\NSINIT \\STARTPUP \\TIME.NOT.SET STOPNS \\INIT.GATEWAY MAPC -\\STASH.PASSWORDS) \\GETCHAR (\\ECHOCHAR) \\FIXP.FROM.FLOATP (.FLOATUNBOX. SELECTC .NEGATE. .LLSH8. -.LLSH1. .LRSH8. FRPTQ) GRAPHDELETELINK (APPLY*) BRKDWNINIT (SETA) OPENIPSTREAM (DECLARE ERROR -FREPLACEFIELD STREAMPROP INITIALIZEMASTER.IP BEGINMASTER.IP BEGINPREAMBLE.IP SELECTQ HEADINGOP.IP -GETFRAMEVAR.IP SETUPFONTS.IP \\DSPCLIPPINGREGION.IP INITIALIZECOLOR.IP PUSH-IP-STACK NEWPAGE.IP) -\\MAYBEPRINTPACKET (PRIN1 PRINTPACKET BLOCK) \\FILLBUFFER.WORDSEPRP (CHECK) CL::%COMPLEX-PRINT ( -.SPACECHECK. \\OUTCHAR \\PRINDATUM) CARETRATE (SETUPTIMER) \\BYTELT (LISPERROR) SPP.DESTADDRESS (\\BLT -) COMPILER::CLOSURE-ANNOTATE-BLOCK (MAPC) CHARWIDTH (\\ILLEGAL.ARG DECLARE) \\NSFILING.MAYBE.CREATE ( -FRPLACD CL:ERROR) \\TEXTMENU.DOC.CREATE (SELECTQ TEDIT.INSERT.OBJECT TEDIT.LOOKS TEDIT.INSERT -\\ILLEGAL.ARG FREPLACEFIELD) \\EXTENDISFMAP (FREPLACEFIELD \\PUTBASE) PROMPTINWINDOW (DSPLEFTMARGIN -MOVETOUPPERLEFT CLOSEW) \\PRINTFMAP (CL:FORMAT) \\TEDIT.READTABLE (\\SETSYNCODE CHECK -TEDIT.SETFUNCTION) CLISPIFYFNS (PRIN2 PRIN1) SEDIT::BACKSPACE-UNKNOWN (SEDIT::SET-POINT) -DRAWMARGINSCALE (DSPFILL SELECTQ BITBLT MOVETO PRIN1 RELDRAWTO) DUMPGRAPH (TAB HPRINT MAPC) DSPBACKUP -(\\CHECKCARET DSPXPOSITION BITBLT) MARGINBAR (DRAWMARGINSCALE DSPFONT BITBLT MOVETO PRIN1 DSPFILL MAPC -) VIDEOCOLOR (DECLARE SELECTC FREPLACEFIELD DOVE.XOR.CURSOR SETSCREENCOLOR) -\\TEDIT.HARDCOPY.MODIFYLOOKS (DRAWLINE) PROMPTPRINT (CLRPROMPT PRIN1) SEDIT::EDIT-SELECTION ( -SEDIT::SET-SELECTION-NOWHERE SEDIT::SET-POINT-NOWHERE CL:FORMAT) \\STARTDISPLAY ( -UPDATESCREENDIMENSIONS \\MOVE.WINDOWS.ONTO.SCREEN MAPC \\UPDATE.PBT.RASTERWIDTHS UNINTERRUPTABLY -SHOWDISPLAY FREPLACEFIELD CHANGEBACKGROUND) \\10MB.PRINT.ENCAPSULATION (FRESHLINE |printout| -PRINTNSHOSTNUMBER TERPRI) \\DSPTOPMARGIN.PRESS (FREPLACEFIELD) \\PUTBASEPTR (\\PUTBASE) -|\\VFMInsertPageGroup| (DECLARE OBTAIN.MONITORLOCK FREPLACEFIELD |\\VFMContextSet| MESASETQ -|\\VFMDelete| |\\VFMInsert| SI::MONITOR-UNWIND) \\SEQUIN.RETRANSMIT (BLOCK UNINTERRUPTABLY) COPYDEF ( -SELECTQ MAPC SAVESET DSUBST PUTDEF) \\SHOW.ARRAY.FREELISTS (\\CLEARCELLS FREPLACEFIELD |printout| TAB -PRINTNUM) SEDIT::PARSE-INDENT-GROUPS (CL:CERROR) TWODINSPECT.SELECTROWPROP (INSPECT.INVERTSELECTION -INSPECT.INVERTREGION) BITMAPOBJ.SNAPW (BITBLT COPYINSERT) SHOW.PRESS (FREPLACEFIELD \\BOUT) WFROMDS ( -DECLARE \\CREATE.TTYDISPLAYSTREAM) FB.CLOSEFN (PROMPTPRINT) |\\CreateScreenBitMap| (DECLARE \\NEWPAGE -FREPLACEFIELD) SET.TTYINEDIT.WINDOW (CLEARW RELMOVETO RESETSAVE) \\DSPFONT.IP (SHOW.IP -APPENDINTEGER.IP APPENDOP.IP FREPLACEFIELD \\CHANGECHARSET.IP \\FIXLINELENGTH.IP \\MOVETO.IP) -SETSYNONYM (ERRORX MSSETWORDTYPE SHOULDNT FRPLACA FRPLACD) END.DELETE.MODE (SELECTQ TTBOUT DO.LF) -CL:ASINH (DECLARE) \\FILLBUFFER (DECLARE \\RESETLINE \\ECHOCHAR \\LINEBUFBOUT CHECK \\OUTCHAR -\\SETEOFPTR UNINTERRUPTABLY \\SETFILEPTR ACCESS-CHARSET \\FILLBUFFER.BACKUP \\CLOSELINE SHOULDNT) -TB.REPLACE.ITEMS (MAPC TB.SET.FONT) CONTINUEDIT (RESETLST LOADFROM /PUTPROP) |\\CoerceToDisplayDevice| - (DECLARE) SPP.SENDEOM (DECLARE FREPLACEFIELD SPP.FORCEOUTPUT) TITLEDICONW (SELECTQ \\ILLEGAL.ARG -BLTSHADE WINDOWPROP \\ICONW.SHOW.TITLE OPENW) \\UNPACKDATE (CL:MULTIPLE-VALUE-SETQ) \\INITBCPLDISPLAY -(DECLARE \\SETACCESS) LATTICE/BREAK/CYCLES (RPLACA LATTICE/BREAK/CYCLES) HARDCOPYGRAPH (DSPLEFTMARGIN -DSPBOTTOMMARGIN DSPTOPMARGIN DSPRIGHTMARGIN MAPC) \\NSFILING.LOOKUP.CACHE (FREPLACEFIELD) -TEXTMENU.CLOSEFN (FREEATTACHEDWINDOW TEDIT.KILL) \\INTERPRETER1 (UNINTERRUPTABLY SETSTKNAME-RAW -SETSTKNTOFFSET-RAW \\PUTBASEPTR) CL:ACOSH (DECLARE) OPT.RETOPT1 (OPT.RETMERGE) DELETE/AND/DISPLAY/LINK - (|printout| PRIN1 GRAPHDELETELINK DISPLAYLINK) CL::%COMPLEX-ABS (DECLARE) SEDIT::BACKSPACE-LITATOM ( -SEDIT::SET-POINT-LITATOM SEDIT::DELETE-LITATOM) SEDIT::FINALIZE-MOUSE-SELECTION (FREPLACEFIELD -SEDIT::SMASH-USING) FB.COUNTERW.REDISPLAYFN (CLEARW) \\TEXTMENU.SET.TOGGLE (ERROR IMAGEOBJPROP -\\TEDIT.REPAINTFN) \\DSCCOUT (CHECK RPTQ) SPP.CLOSE (\\BULK.DATA.CLOSE SPP.FORCEOUTPUT) -\\TEDIT.FIXSELS (\\FIXSEL) \\ETHERINIT (MOVD) COLLECTKEYS (DECLARE MAPHASHFILE) FAULTAPPLY (DECLARE -PUTD PUTHASH) OPT.RETPOP (OPT.UBDEL OPT.PRDEL MAPC) TTMAKECOMPLEXCHAR (MAPC) PRINTNSHOSTNUMBER (PRIN1) - \\DSPSPACEFACTOR.PRESS (SHOW.PRESS FREPLACEFIELD \\SETSPACE.PRESS) PROCESSWORLD (MAPC WINDOWPROP -CURSOR FRPLACD \\MAKE.PROCESS0 RETFROM RAID) PRINTERRORXIP (|printout| TERPRI) -\\SEQUIN.FLUSH.CONNECTION (\\SEQUIN.FLUSH.RETRANSMIT FREPLACEFIELD NOTIFY.EVENT CLOSEPUPSOCKET -SEQUINOP DEL.PROCESS) ANALYZE-REST (ANALYZE-PARAMETER CL:ERROR) COMPILER::COPY-NODE-LABELS (FRPLACD) -\\FTP.NEXTFILE (DECLARE SETUPTIMER SELECTC \\RELEASE.FTPCONNECTION) \\DSPXPOSITION.HCPYMODE ( -\\DSPXPOSITION.DISPLAY FREPLACEFIELD) \\ENTITYEND.PRESS (\\FIXPOUT \\WOUT DECLARE) \\PARSEARRAYSPACE1 -(\\CHECKARRAYBLOCK APPLY* DECLARE) SPY.END (SPY.DUMP.BUFFER) \\DSPRIGHTMARGIN.PRESS (FREPLACEFIELD -\\FIXLINELENGTH.PRESS) \\RUN.PROCESS (ERROR UNINTERRUPTABLY \\UNQUEUE.EVENT \\UNQUEUE.TIMER) -\\IDATESCANTOKEN (DECLARE FRPLACD) \\FM.MENUHANDLER (PRINTOUT DECLARE TERPRI GETMOUSESTATE -\\FM.DOSELECTION ADD.PROCESS) DBG::BACKTRACE-ITEM-SELECTED (MENUSELECT PROCESS.EVAL) DRIBBLE ( -FREPLACEFIELD CLOSEF UNINTERRUPTABLY) \\LONUM (.UNBOX. SELECTC \\ILLEGAL.ARG -CL::%NOT-NONCOMPLEX-NUMBER-ERROR) SEDIT::DELETE-SELECTION (SEDIT::DELETE-NODES) -\\DSPRIGHTMARGIN.HCPYMODE (\\DSPRIGHTMARGIN.DISPLAY FREPLACEFIELD) \\ENTITYSTART.PRESS (FREPLACEFIELD -DECLARE SETXY.PRESS) \\SMASHLINK (\\INCUSECOUNT FREPLACEFIELD \\DECUSECOUNT) DASSEM.ASMAJ (FRPLACA -FRPLNODE OPT.COMPILERERROR FRPLACD) POSTSCRIPT.INIT (DECLARE FONTPROFILE.ADDDEVICE) \\RELEASE.PROCESS -(CHECK \\DECUSECOUNT \\UNQUEUE.EVENT \\UNQUEUE.TIMER REMHASH \\INVALIDATE.PROCESS.WINDOW WINDOWPROP) -FB.AFTERCLOSEFN (FREPLACEFIELD) CHANGESLICE (ERROR CHANGESLICE NCONC UNDOSAVE FRPLACA FRPLACD) -NONSYSPROPNAMES (FRPLACD) TEDIT.DELETELINE (FREPLACEFIELD \\TEDIT.CLOSEUPLINES) \\RPLRIGHT ( -RPLCHARCODE) CL:CLOSE (CLOSEF) PUTWINDOWPROP (\\ILLEGAL.ARG) COMPILER::TEST-ANALYSIS (COMPILER::RELEASE-TREE -) \\OUTDATE-STRING (RPLCHARCODE) \\TEXTDSPFONT (TEDIT.CARETLOOKS MAPC) |\\PFPutRootDirectoryType| ( -FREPLACEFIELD |\\PFPutLogicalVolumePage| |\\PFGetMarkerPage| |\\PFPutMarkerPage|) SEDIT::BACKSPACE-GAP - (SEDIT::SET-SELECTION-ME) TOTOPW.MODERNIZE (TOTOPW) READGRAPH (READC MAP SETA) TB.SET.FONT (CLEARW -DSPRIGHTMARGIN LINELENGTH) \\SETUP-COMPILED-CLOSURE-CALL (\\BLT \\MAKEFREEBLOCK FRPTQ \\PUTBASE CHECK -RPTQ) DISPLAYSTREAMINIT (DECLARE \\STARTDISPLAY DSPDESTINATION TERMINAL-OUTPUT DSPYOFFSET DSPYPOSITION - DSPXOFFSET DSPCLIPPINGREGION DSPRIGHTMARGIN) SPP.CLEAREOM (FREPLACEFIELD) \\TEDIT.SHRINK.ICONCREATE ( -ICONTITLE) SEDIT::DELETE-WORD (SEDIT::CLOSE-OPEN-NODE) RDTBL\\NONOTHERCODES (DECLARE \\MAPCHARTABLE) -CONCATCODES (RPLCHARCODE) \\IRM.SMART.REF (FRPLACD PRINTOUT TERPRI) CL:COPY-READTABLE (RESETREADTABLE) - \\MOVE.WINDOWS.ONTO.SCREEN (MOVEW) SEDIT::KILL-NODE (FREPLACEFIELD) TTGIVEHELP1 (PRIN1 DECLARE) -\\NEXTCONSPAGE (CHECK FREPLACEFIELD) \\TFBRAVO.INIT.CHARLOOKS (FREPLACEFIELD) ARGLIST (ERROR) -MSSETPHRASE (MSCANT MSNEGATESET) CL:/= (CL:ERROR) \\SPY.INTERRUPT (SPY.DUMP.BUFFER SPY.START.ENTRY -SPY.ADD.ENTRY SPY.END.ENTRY) \\DSPLINEFEED.PRESS (FREPLACEFIELD \\ILLEGAL.ARG) |\\VFMGetPageGroup| ( -DECLARE OBTAIN.MONITORLOCK FREPLACEFIELD |\\VFMContextSet| MESASETQ SI::MONITOR-UNWIND) -CL::%EXPT-FLOAT-INTEGER (DECLARE) \\CREATEDISPLAY (\\DEFINEDEVICE) \\HINUM (.UNBOX. SELECTC -\\ILLEGAL.ARG CL::%NOT-NONCOMPLEX-NUMBER-ERROR) \\CREATELINEBUFFER (FREPLACEFIELD) ADD.PROCESS ( -\\SET.PROCESS.NAME UNINTERRUPTABLY \\INVALIDATE.PROCESS.WINDOW \\MAKE.PROCESS0 WINDOWPROP) -ETHERHOSTNAME (SETUPPUP FREPLACEFIELD SELECTC DECLARE |printout| PRIN1 RELEASE.PUP) PROMPTFOREVALED ( -RESETFORM CLOSEW) SETXY.PRESS (\\WOUT) \\TIMER.PROCESS (\\RUN.PROCESS BLOCK) \\SETUP.DEFAULT.LINEBUF ( -FREPLACEFIELD) \\SPP.PREPARE.INPUT (UNINTERRUPTABLY \\SPPINCFILEPTR DECLARE RELEASE.XIP CL:FUNCALL) -\\TTW1 (.WHILE.TOP.DS. \\PUTBASE \\SOFTCURSORDOWN \\INSURETOPWDS DECLARE \\SW2BM FREPLACEFIELD \\TTW1 -\\SOFTCURSORUPCURRENT) ENDCOLLECT (RPLACD) \\WRITE1 (DECLARE) FOREST/BREAK/CYCLES (DECLARE RPLACA -FOREST/BREAK/CYCLES) \\IRM.GET.REF (\\IRM.GET.HASHFILE CLEARW PRINTOUT) CL:COSH (DECLARE) -\\NSFILING.ADD.TO.CACHE (\\NSFILING.CLOSE.HANDLE FREPLACEFIELD) TB.SCROLLFN (SCROLLBYREPAINTFN) -OPT.RETOPT (MAPC MAP) \\RPLPTR (\\ADDREF \\DELREF \\PUTBASEBYTE \\PUTBASE) CL:COUNT (CL:ERROR) -\\DSPSPACEFACTOR.HCPYMODE (FREPLACEFIELD \\ILLEGAL.ARG) BRKDWNCLEAR (SUB1VAR BRKDWNSETA) -SEDIT::ATOM-POINT-TYPE (DECLARE) NEWPAGE.IP (SELECTQ ENDPAGE.IP ENDPREAMBLE.IP BEGINPAGE.IP SCALE.IP -CONCATT.IP ROTATE.IP TRANSLATE.IP \\DSPFONT.IP PRIN3 FGET.IP APPENDOP.IP SETXY.IP DSPFONT RELMOVETO -NEWLINE.IP SHOULDNT SETYREL.IP APPENDINTEGER.IP APPENDNUMBER.IP ISET.IP) \\STOPSCROLL? (DECLARE) -CL:DELETE-DUPLICATES (CL:ERROR) \\ALLOCMDSPAGE (\\MP.ERROR \\CHECKFORSTORAGEFULL UNLESSINEW -\\MAKEMDSENTRY) \\MAIKO.CONS.UFN (RAID FREPLACEFIELD \\ADDREF |\\StatsAdd1| DECLARE \\PUTBASE -.CHECK.ALLOCATION.COUNT. CHECK \\PUTBASEPTR \\DELREF) \\FM.RIGHTBUTTONFN (TOTOPW) CLISPDEC0 (/RPLNODE) - \\INTERPRETER-LAMBDA (DECLARE) COURIER.SKIP.SEQUENCE (COURIER.SKIP) \\BACKGROUND.PROCESS (MAPC BLOCK) - \\FREESTACKBLOCK (CHECK \\MP.ERROR \\MAKEFREEBLOCK) TEDIT.DEACTIVATE.WINDOW (TEDIT.PROMPTPRINT CLEARW - \\SHOWSEL MAPC FREPLACEFIELD CLOSEF? WINDOWDELPROP \\TEDIT.INTERRUPT.SETUP GIVE.TTY.PROCESS DISMISS) -CL:DECODE-FLOAT (CL::%FLOAT-UNBOX) LASTN (DECLARE) MAKEBRES (FREPLACEFIELD) \\SETUP-ENVIRONMENT-CALL ( -\\MAKEFREEBLOCK \\BLT RPTQ \\PUTBASEPTR \\PUTBASE CHECK) INSPECT/PROPLIST (PROMPTPRINT) -\\START.PROCESSES (\\MP.ERROR FREPLACEFIELD \\PROC.RESUME \\DECUSECOUNT) CL:DECODE-UNIVERSAL-TIME ( -CL:MULTIPLE-VALUE-SETQ) GETLOCALDEC (SELECTQ) BRKDWNBOXES (DECLARE BRKDWNINCA BRKDWNSETA BRKDWNADDTOA -SUB1VAR) \\SPP.ESTABLISH (\\BLT FREPLACEFIELD \\SPP.CREATE.WATCHER WITH.MONITOR DECLARE -OBTAIN.MONITORLOCK SI::MONITOR-UNWIND ADD.PROCESS NOTIFY.EVENT) COURIERPROGRAM.PRETTYPRINT (PRIN1 -PRIN2 SPACES MAYBE.PRETTYPRINT.BOLD PRINENDLINE PRINTDEF) LISPXSTATE (ERROR MAPC /PUT) EDITCOMS ( -EDITCOM) \\NSADDRESS.PRINT.DECIMAL (CL:MULTIPLE-VALUE-SETQ PRIN3) \\TFBRAVO.PARSE.PARA (BIN) FAULTEVAL - (DECLARE PUTHASH) CROPMARK.CREATE (IMAGEOBJPROP TEDIT.PROMPTPRINT) SPY.START (BITBLT SPY.INIT) -CHECKCONSPAGES (HELP) PRINTER.BITMAPFILE (DECLARE) \\LINEBUF.EOFP (DECLARE) \\MAPMDS (CHECK -SPREADAPPLY*) \\DSPLINEFEED.HCPYMODE (FREPLACEFIELD \\ILLEGAL.ARG) BMOBJ.GETFN4 (BIN) -\\INVALIDATE.PROCESS.WINDOW (DSPFILL) TB.REPAINTFN (RESETLST) TTY/EDITL (LISPXWATCH UNDOSAVE -SETATOMVAL ERROR!) CHANGEBACKGROUND (\\ILLEGAL.ARG MAPC BLTSHADE TILE) \\DEFINEDISPLAYINFO (DREMOVE) -SEDIT::ADJUST-WIDTH (FREPLACEFIELD) \\TEXTMENU.TOGGLE.WHENOPERATEDFN (\\TEXTMENU.TOGGLEFN) -\\FAX.PARSE.NAME (DECLARE ERROR) TWODINSPECT.SELECTITEM (INSPECT.INVERTSELECTION INSPECT.INVERTREGION) - \\EVALFORMASLAMBDA (DECLARE) APPLY (DECLARE SELECTQ) CHARMACRO? (DECLARE) ANALYZE-PARAMETER ( -CHECK-PARAMETER-NAME) \\INTERNALTOTOPW (OPENW UNINTERRUPTABLY \\TTW1) \\SET.PROCESS.NAME (SELECTQ -REMHASH PUTHASH FREPLACEFIELD) APPLY* (DECLARE FRPLACD) EDITL0 (EDITCOMS TERPRI PRIN1 EDITL1) -IRM.DISPLAY.REF (DECLARE TERPRI) \\DSPLEFTMARGIN.PRESS (FREPLACEFIELD \\FIXLINELENGTH.PRESS) -|\\PFPatchRootDirEntries| (|\\PFRemoveRootDirEntry|) FINDFILE-WITH-EXTENSIONS (MAP) -SEDIT::CONVERT-COMMENT-TAIL (TCONC LCONC SEDIT::CONVERT-COMMENT-TAIL SELECTQ SELCHARQ) GREETFILENAME ( -DECLARE) PRINTTIMER (PRIN1 |printout|) LINEBUFFER-SKIPSEPRS (READCCODE) SEDIT::INSERT-CHANGED (RPLACD) - \\PROC.REPEATEDLYEVALQT (DECLARE \\CALLME INITIALEVALQT TTYDISPLAYSTREAM OUTPUT INPUT -\\RESETSYSTEMSTATE EVALQT) CL:ATANH (DECLARE) SETQ (DECLARE) \\TEDIT.INSERTLINE (FREPLACEFIELD) -MSTRYSPELLTYPE (DECLARE MAPHASH) CL:DIRECTORY (DECLARE FRPLACD) \\SPP.RELEASE.ACKED.PACKETS (CHECK -UNINTERRUPTABLY SETA RELEASE.XIP) \\IDLE.WAIT (AWAIT.EVENT BLOCK) CL:DESCRIBE (SI::DESCRIBE-INTERNAL) -\\NSADDRESS.DEFPRINT (.SPACECHECK. PRIN3 \\NSADDRESS.PRINT.DECIMAL) \\TEDIT.HARDCOPY.DISPLAYLINE ( -\\TEDIT.HARDCOPY.FORMATLINE DECLARE DSPSPACEFACTOR MOVETO DSPFONT STREAMPROP SELECTC -\\TEDIT.HARDCOPY.MODIFYLOOKS \\OUTCHAR APPLY* \\TEDIT.MARK.REVISION) RELSTK (UNINTERRUPTABLY -\\DECUSECOUNT) \\CHANGE.ETHER.TRACING (TAB SET) \\STOPDISPLAY (DECLARE UNINTERRUPTABLY SHOWDISPLAY -\\UNLOCKPAGES) DBG::ATTACH-BACKTRACE-MENU (FRPLACD DELETEMENU CLEARW ATTACHWINDOW ADDMENU) -CL::%RATIONAL-FLOAT (CL::%FLOAT-UNBOX) \\MOUSE.PROCESS (DECLARE PROCESS.RETURN \\SET.PROCESS.NAME -DEL.PROCESS FREPLACEFIELD WINDOW.MOUSE.HANDLER TTY.PROCESS BLOCK) PUTTEXTPROP (FREPLACEFIELD LISTPUT) -\\DSPFONT.HCPYMODE (UNINTERRUPTABLY FREPLACEFIELD DECLARE |\\SFFixFont|) -MAKE-FILL-POINTER-OUTPUT-STREAM (\\SETACCESS FREPLACEFIELD) SETNTHTOPLEVELELT (PROMPTPRINT) -SEDIT::CREATE-SIMPLE-NODE (FREPLACEFIELD) \\TEXTMENU.TOGGLE.SHOWSELFN (SELECTQ BITBLT) -\\ADJUSTABLE-STRING-STREAM-OUTCHARFN (FREPLACEFIELD) \\BBTCURVEPT (\\SETPBTFUNCTION DECLARE) -SEDIT::INITIALIZE (CHANGENAME SEDIT::CREATE-ENVIRONMENTS SEDIT::INITIALIZE-ATOMIC SEDIT::INITIALIZE-LISTS - SEDIT::INITIALIZE-COMMENTS ECHOMODE CONTROL) UNDOEDITL (MAP PRINT EDITSMASH UNDOSAVE) SEDIT::REPAINT -(MOVETO RELMOVETO SEDIT::PRINT-STRING PRIN2 PRIN1 BITBLT SHOULDNT) \\CKAPPLYARGS (CHECK FRPTQ) -%BROADCAST-STREAM-DEVICE-BOUT (MAPC) OPT.DELTAGREF (OPT.COMPILERERROR) LISPXFIND0 (SELECTQ ERROR) -\\PRINSTRING (.SPACECHECK. DECLARE) \\SETSPACE.PRESS (\\WOUT DECLARE FREPLACEFIELD) -\\NSFILING.OPENFILE (MAPC FREPLACEFIELD) ENSURE.RGB (HLSTORGB) \\SETFVARSLOT (ERROR FREPLACEFIELD) -CL::%EXP-FLOAT (DECLARE CL::%UFTRUNCATE) CL:MULTIPLE-VALUE-CALL (DECLARE) MEASUREGRAPHNODE ( -SET/LABEL/SIZE) PRINT-LOADED-FILE-INFORMATION (PRINTOUT PRIN1) SMASHFILECOMSLST (SELECTQ -SMASHFILECOMSLST SET) GRAPHREGION (MAPC) \\FIXLINELENGTH.PRESS (FREPLACEFIELD) \\NSFILING.CONNECT ( -SELECTQ) \\PROG0 (DECLARE PUTBASEPTR UNINTERRUPTABLY SETSTKNAME-RAW SETSTKNTOFFSET-RAW \\EVAL) CURSOR -(DECLARE \\CURSORDOWN \\CURSORUP \\ILLEGAL.ARG) SEDIT::CONVERT-COMMENT (SEDIT::START-UNDO-BLOCK -SEDIT::END-UNDO-BLOCK |printout| TERPRI) BRKDWNCONSES (DECLARE BRKDWNINCA BRKDWNSETA BRKDWNADDTOA -SUB1VAR) CH.RETRIEVE.ITEM (RPLACA) INTERPRESSFILEP (RESETSAVE SETFILEPTR) \\CKPOSSOUT (.SPACECHECK. -DECLARE \\OUTCHAR) \\TEDIT.PUT.CHARLOOKS (\\DWOUT \\SMALLPOUT DECLARE) MAP.PROCESSES (APPLY*) -\\INITCONSPAGE (FREPLACEFIELD \\PUTBASEPTR) LOADFNS-MAKELIST (LISPXPRIN1 FRPLACD) SEDIT::HANDLE-COMPLETION - (SEDIT::THROW-AWAY-CHANGES) COMPILER::CONSTRUCT-LIST (MAPC) \\TEDIT.CREATE.LINECACHE (FRPLACD MAP) -%BROADCAST-STREAM-DEVICE-CLOSEFILE (\\SETACCESS FREPLACEFIELD) OPT.COMMONBACK (OPT.CHECKTAG SELECTQ -OPT.CHLEV OPT.DELTAGREF OPT.UBDEL OPT.COMPILERERROR OPT.PRDEL NCONC1) SPY.TOGGLE (SPY.END) LISTPUT ( -FRPLACA FRPLACD FRPLNODE) TB.COPYBUTTONEVENTFN (TB.SHOW.COPY.SELECTION BLOCK DECLARE CL:FUNCALL -GETMOUSESTATE) %BROADCAST-STREAM-DEVICE-OUTCHARFN (MAPC FREPLACEFIELD) \\TEXTOPENF ( -\\TEXTOPENF-SUBTREE) \\KEYHANDLER1 (FREPLACEFIELD \\CONTEXTSWITCH \\TRACKCURSOR \\KEYBOARDOFF -\\BOXIPLUS) \\SETVAR (\\PUTBASEPTR \\RPLPTR) BMOBJ.GETFN3 (BIN) ESPATTERN (MAP) -SEDIT::COPY-SELECTION-DEFAULT (BKSYSBUF) CCCSCAN (DECLARE SELECTQ CCCSUBFN?) CL:FINISH-OUTPUT ( -FORCEOUTPUT) \\SPPSENDERROR (|printout| PRIN1 PRINTPACKET) RESTART.PROCESS (FREPLACEFIELD -\\PROCESS.MAKEFRAME) FB.GETALLFILEINFO (FRPLACD) \\PRINSTACKP (.SPACECHECK. \\SOUT \\PRINTADDR -\\LITPRIN) GET-ONED-DISPLAYW (WINDOWPROP DSPRIGHTMARGIN DSPFONT) \\TFBRAVO.WRITE.PARAGRAPH ( -FREPLACEFIELD \\TFBRAVO.PARSE.PROFILE.PARA \\TFBRAVO.EOLS) \\CHECKCONSPAGE (!CHECK DECLARE) -%CONCATENATED-STREAM-DEVICE-CLOSEFILE (\\SETACCESS MAPC FREPLACEFIELD) \\LITPRIN (DECLARE RPLCHARCODE -.SPACECHECK. \\OUTCHAR) PRINTPUPQUEUE (BSPPRINTPUP |printout| TERPRI) WAKE.PROCESS (DECLARE -UNINTERRUPTABLY) \\CURSOR.DEFPRINT (PRIN4) SEDIT::GET-SELECTED-STRUCTURE (SEDIT::CLOSE-OPEN-NODE) -PPSOC.CURRENT (PRIN1) FB.HARDCOPY.DIRECTORY (ALLOW.BUTTON.EVENTS FB.MAKE.BROWSER.BUSY FB.ALLOW.ABORT -FB.PROMPTWPRINT FB.HARDCOPY.PRINT.TITLE FRPLACD MAPC PRIN3 TERPRI BLOCK) %ECHO-STREAM-DEVICE-BIN ( -\\BOUT) COMP.STUNBIND (COMP.ST) \\EXTERNALFORMAT (LISTPUT) CHECKSYNONYM (MAPC) EDITL1 (FRESHLINE -PROMPTCHAR EDITSAVE FRPLACA LISPXPUT TERPRI PRIN1 PRIN2) CL:FLOAT-SIGN (\\PUTBASEFLOATP FREPLACEFIELD) - AND (DECLARE) SUSPEND.PROCESS (\\PROCESS.GO.TO.SLEEP \\SUSPEND.PROCESS) |\\PFPurgeRootDirectory| ( -|\\PFPutRootDirectoryType| |\\PFTrimHelper|) CL::%RATIONALIZE-FLOAT (CL::%FLOAT-UNBOX .LLSH8.) -CL:FORCE-OUTPUT (FORCEOUTPUT) ENDLOADUP (MAPC MEDLEY-INIT-VARS SETTOPVAL PRIN1) -COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS (CL:CERROR MAPC COMPILER::CLOSE-LAMBDA) \\EVALA ( -UNINTERRUPTABLY PUTBASEPTR SETSTKNAME-RAW DECLARE SETSTKNTOFFSET-RAW) SEDIT::CHANGE-QUOTE (RPLACA -FREPLACEFIELD) DEL.PROCESS (FREPLACEFIELD \\PROCESS.MAKEFRAME \\UNWIND.PROCESS) RECORDPRIORITY ( -/DREMOVE SET.RECORD.PRIORITY /NCONC1) |\\PFFindRootDirEntryNum| (ERROR) LOADUP (PRINTOUT PRIN1 -DOFILESLOAD) FB.BROWSECOMMAND (FB.ALLOW.ABORT RPLACA LISTPUT ADD.PROCESS FB.PROMPTW.FORMAT) SET ( -\\PUTBASEPTR \\RPLPTR) FB.ADD.FILEGROUP (FB.INSERT.DIRECTORY) PRINT-LISP-INFORMATION (DECLARE PRIN1 -TERPRI SI::RESETUNWIND) \\GET.PRIORITY.QUEUE (FREPLACEFIELD) ROT (DECLARE) GET-TITLEW (DSPFONT -DSPOPERATION) \\SEQUIN.CONTROL (\\CLEARBYTES FREPLACEFIELD) \\GENERIC.CURSOR (MAPC) -%SYNONYM-STREAM-DEVICE-CLOSEFILE (FREPLACEFIELD) POSTSCRIPT.FONTCREATE (\\FSETWIDTH FREPLACEFIELD -MAPHASH) CL:FLOAT-PRECISION (CL::%FLOAT-UNBOX) PUTSTREAMPROP (LISTPUT FREPLACEFIELD FRPLACD) \\SOUT ( -DECLARE \\OUTCHAR) PROCESS-STATUS (SELECTQ) ERRORSET (DECLARE) CLISPDEC (EVAL MAPC /REMPROP /RPLNODE -ERROR) ONEDINSPECT.SETELT (WITH-INSPECTOR-ENV REMOVEPROMPTWINDOW ONEDINSPECT.REPLACE) -\\TEXTBACKFILEPTR (\\TEDIT.TEXTBIN.STRINGSETUP \\TEDIT.TEXTBIN.FILESETUP ERROR \\BACKFILEPTR \\PEEKBIN - \\PAGEDBACKFILEPTR) CTEXTPROP (|printout| PRIN1 SELECTQ) \\PRINT-USING-DEFPRINT (DECLARE) -TB.REMOVE.ITEM (FREPLACEFIELD RPLACD TB.RENUMBER.TAIL) \\TEXTMENU.TOGGLEFN (APPLY* FREPLACEFIELD) -%CONCATENATED-STREAM-DEVICE-PEEKBIN (CLOSEF FREPLACEFIELD \\EOF.ACTION) DASSEM.COUNTVARS (ADD1VAR) -PUTSEQUIN (DECLARE OBTAIN.MONITORLOCK FREPLACEFIELD HELP MONITOR.AWAIT.EVENT \\SEQUIN.PUT -SI::MONITOR-UNWIND BLOCK) VALUOF (DECLARE) SEDIT::PARSE-INDENT (CL:CERROR) -%CONCATENATED-STREAM-DEVICE-EOFP (CLOSEF FREPLACEFIELD) \\SPP.HANDLE.DATA (CHECK RELEASE.XIP \\ENQUEUE - FREPLACEFIELD SELECTC \\SETACCESS \\SPP.SEND.ENDREPLY \\SPPSENDERROR NOTIFY.EVENT) MENU.HANDLER ( -DECLARE GETMOUSESTATE DOWINDOWCOM \\BOXITEM OPENW \\MENU.ITEM.DESELECT MENU.HELDSTATE.RESET APPLY* -SELECTQ) PUTPROPS.PRETTYPRINT (PRIN2 PRIN1 SPACES MAYBE.PRETTYPRINT.BOLD TERPRI) PROCESS.RESULT ( -AWAIT.EVENT) \\PRINTNSADDRESS (DECLARE \\NSADDRESS.DEFPRINT) %CONCATENATED-STREAM-DEVICE-BIN (CLOSEF -FREPLACEFIELD \\EOF.ACTION) BACKSPACEDEL (DELETECONTROL) TTYIN.SCRATCHFILE (DECLARE SETFILEPTR) -CCCSUBFN? (DECLARE) GRAPHERPROP (SETPROPLIST) BREAK.NSFILING.CONNECTION (\\NSFILING.CLOSE.CONNECTIONS -FRPLACD) \\DSPCOLOR.IP (FREPLACEFIELD) CL:FILE-POSITION (SETFILEPTR) %SYNONYM-STREAM-DEVICE-EOFP ( -DECLARE) DISPLAYNODE (DISPLAYNODELINKS) %SYNONYM-STREAM-DEVICE-OUTCHARFN (\\OUTCHAR) \\SUSPEND.PROCESS - (\\MP.ERROR \\UNQUEUE.TIMER \\UNQUEUE.EVENT \\ENQUEUE.EVENT/LOCK) LET* (DECLARE MAPC LISPERROR) -DOFILESLOAD (DECLARE CHECKIMPORTS) \\LITPRIN.INTERNAL (.SPACECHECK. DECLARE \\LITPRIN.INTERNAL \\SOUT -CHECK) \\EVPROG1 (DECLARE) EVALA (MAPC LISPERROR) \\CKPOSBOUT (.SPACECHECK.) \\LET* (DECLARE -UNINTERRUPTABLY SETSTKNAME-RAW SETSTKNTOFFSET-RAW PUTBASE PUTBASEPTR) SEDIT::STRING-OFFSET ( -FREPLACEFIELD) FRESHLINE (DECLARE \\OUTCHAR) PERIODICALLYRECLAIM (DECLARE RECLAIM) NCHARS (DECLARE -\\MAPPNAME) TEDIT.COPY (FREPLACEFIELD \\TEDIT.CONVERT.TO.FORMATTED APPLY* \\TEDIT.HISTORYADD -\\TEDIT.WINDOW.TITLE \\FIXILINES TEDIT.UPDATE.SCREEN \\FIXSEL) BRV/OFFSET (DECLARE MAPC) TEDIT.KILL ( -\\ILLEGAL.ARG FREPLACEFIELD TEDIT.DEACTIVATE.WINDOW) INSPECT (DECLARE |printout| TERPRI) \\DRAWLINE.IP - (SHOW.IP APPENDOP.IP MOVETO.IP LINETO.IP \\IMAGEPATH.IP \\SETBRUSH.IP) \\EVPROGN (DECLARE) -\\DOMOUSECHORDING (SELECTC \\BOXIPLUS \\PUTBASE) \\LET0 (DECLARE PUTBASEPTR UNINTERRUPTABLY -SETSTKNAME-RAW SETSTKNTOFFSET-RAW) CALL.MOVENODEFN (APPLY*) DWIMDEF (DECLARE) PROG1 (DECLARE) -FB.SHAPECOMMAND (RESHAPEALLWINDOWS) \\TEXTMENU.TOGGLE.CREATE (DSPXOFFSET DSPYOFFSET DSPFONT MOVETO -PRIN1) \\DEFPRINT.BY.NAME (.SPACECHECK. \\OUTCHAR \\SOUT \\PRINTADDR) FB.FASTSEECOMMAND ( -FB.ALLOW.ABORT DSPSCROLL FREPLACEFIELD WINDOWPROP WINDOWADDPROP RESETSAVE TTYDISPLAYSTREAM MAP) -FB.MAYBE.WIDEN.NAMES (FREPLACEFIELD) CL:GET-OUTPUT-STREAM-STRING (FREPLACEFIELD) CL:INTEGER-DECODE-FLOAT - (CL::%FLOAT-UNBOX) \\FTP.FLUSH.TO.MARK (\\OUTCHAR) \\MEDW.CURSOR (DECLARE \\CURSORDOWN \\CURSORUP -\\ILLEGAL.ARG) TEDIT.CHARWIDTH (CHECK) \\INSERTCR (\\TEDIT.CONVERT.TO.FORMATTED \\INSERTCH -FREPLACEFIELD) \\DSPCLIPPINGREGION.PRESS (ERROR UNINTERRUPTABLY) GIVE.TTY.PROCESS (\\ILLEGAL.ARG -TTY.PROCESS APPLY*) |\\PFRemoveRootDirEntry| (MESASETA ERROR FREPLACEFIELD) -%TWO-WAY-STREAM-DEVICE-EOFP (DECLARE) \\NUMERIC.PNAMEP (DECLARE SELECTQ) \\DOBUFFEREDTRANSITIONS ( -DECLARE \\DOTRANSITIONS \\PUTBASEBYTE) PROG (MAPC LISPERROR) SEDIT::CHANGE-PRINTBASE ( -SEDIT::CLOSE-OPEN-NODE XCL:SAVE-PROFILE SEDIT::VERIFY-STRUCTURE |printout| TERPRI) \\UNWIND.PROCESS ( -FREPLACEFIELD) \\INSTALL.EXTERNALFORMAT (DECLARE FREPLACEFIELD RPLACD) LET (DECLARE MAPC LISPERROR) -PFI.PRINT.BITMAP (TERPRI DSPNEWPAGE SCALEDBITBLT MOVETO FREPLACEFIELD RPTQ \\OUTCHAR) -%TWO-WAY-STREAM-DEVICE-OUTCHARFN (\\OUTCHAR) SEDIT::FORMAT-VALUES-CHANGED (CL:FUNCALL) -\\TEXTSETFILEPTR (\\SETUPGETCH \\BIN \\ILLEGAL.ARG) NEWLINE.IP (SHOW.IP DSPNEWPAGE SETXY.IP) -OPT.JUMPREV (OPT.PRDEL PUTHASH NCONC1 OPT.PRATTACH) COMP.STBIND (PUTHASH OPT.CCHECK COMP.ST) -PRINTPACKETQUEUE (PRINTPACKET) FB.GET.NEWPATTERN (FB.ALLOW.ABORT) TTYINSTRING (DECLARE RPLCHARCODE) -MAKE-UNICODE-TRANSLATION-TABLES (MAPC RPLACD) CLISPFORERR1 (LISPXPRIN1 LISPXPRIN2 LISPXSPACES) -FB.HARDCOPY.TOFILE (SELECTQ FB.PROMPTWPRINT FB.PROMPTW.FORMAT RPLACA FB.MAYBE.INSERT.FILE) -\\SMASHRETURN (\\SMASHLINK) EDITBF (ERROR!) USEREXEC (DECLARE PROMPTCHAR ERSETQ SI::RESETUNWIND) -RIGHTW.RESHAPEFN (CLEARW RIGHTW.ADJUSTSELECTION) COURIER.WRITE.FAT.STRING (PRIN3 PUTWORD DECLARE -COPYBYTES) ONEDINSPECT.SELECTPROP (INSPECT.INVERTSELECTION INSPECT.INVERTREGION) -\\TFBRAVO.READ.PARALOOKS (RPLACA HELP RPLACD) COPYVM (DECLARE SI::RESETUNWIND) BROWSE/LAYOUT/LATTICE ( -DECLARE) TEDIT.CARETLOOKS (FREPLACEFIELD) GRAPHER/CENTERPRINTINAREA (MOVETO PRIN3) -\\UPDATE.EXTENT.IMAGE (CLEARW BITBLT) \\NSFILING.CLOSE.CONNECTIONS (DEL.PROCESS SPP.CLOSE BLOCK -\\NSFILING.LOGOUT \\NSFILING.DISCARD.SESSION) \\TEDIT.TABTYPE.SET (TEDIT.MAPPIECES) MSPATHSPRINTFN ( -PRIN1 PRIN2) ONEDINSPECT.RESHAPEFN (CLEARW ONEDINSPECT.MAKEREGIONS ONEDINSPECT.ADJUSTSELECTION -ONEDINSPECT.REPAINTFN) \\TEXTPEEKBIN (\\PAGEDBACKFILEPTR \\SETUPGETCH \\TEDIT.TEXTBIN.STRINGSETUP) -SI::ERRORSET-PRINT-FUNCTION (DECLARE) \\GET.EXTERNALFORMAT.FROM.NAME (DECLARE) SETTIME ( -\\PROCESS.RESET.TIMERS) \\DSPXPOSITION.IP (SHOW.IP SETXY.IP) \\RELEASE.ETHERPACKET (\\DTEST \\ENQUEUE) - MB.NWAYBUTTON.ADDITEM (FRPLACD DSPXOFFSET DSPYOFFSET DSPFONT DSPRIGHTMARGIN DSPDESTINATION MOVETO -PRIN1) PPSOC (|printout| PRINTCONSTANT PRINTNUM PRINTTIMER PPSOC.CURRENT TAB BSPPRINTPUP PRINTPUPQUEUE -) \\SPP.HANDLE.ATTN (|printout| TAB) EDITL2 (LISPXPRIN2) \\EVALFORM (DECLARE SELECTQ) \\FUNCT1 ( -\\PUTBASEPTR UNINTERRUPTABLY SETSTKNAME-RAW SETSTKNTOFFSET-RAW) \\MEDW.PUTWINDOWPROP (\\ILLEGAL.ARG -FREPLACEFIELD UPDATE/SCROLL/REG MOVEW SHAPEW RESHOWTITLE RESHOWBORDER LISTPUT FRPLACD) \\MAPCHARS ( -DECLARE) \\DTEST.UFN (DECLARE .UNBOX. SELECTC \\ILLEGAL.ARG CL::%NOT-NONCOMPLEX-NUMBER-ERROR) -\\DRAWPOINT.IP (SHOW.IP BITBLT \\DRAWLINE.IP) \\GR.MAKEPRETTYCOMSL (ERROR FRPLACD) OPENW (\\OPENW1 -DOUSERFNS) TIME.SINCE.PACKET (\\BLT) MSNEXTWORD (SELECTQ MSSETWORDTYPE) TTGIVEHELP (TERPRI TTGIVEHELP1 - PRIN1 TTGIVEHELP2) SPY.TREE (SPY.MAKE.TREE) \\DSPBOTTOMMARGIN.PRESS (FREPLACEFIELD) PROCESS.WINDOW ( -FREPLACEFIELD WINDOWPROP) SORT.NSADDRESSES.BY.DISTANCE (MAPC BLOCK) \\SEQUIN.PUT (FREPLACEFIELD -SENDPUP \\CLOCK0 WAKE.PROCESS) \\GC.HANDLEOVERFLOW (\\HTFIND \\PUTBASEPTR .INCREMENT.ALLOCATION.COUNT. - DECLARE .BOXIPLUS. .UNBOX. SELECTC \\ILLEGAL.ARG CL::%NOT-NONCOMPLEX-NUMBER-ERROR \\PUTBASE -FREPLACEFIELD) PUTDQ (PUTD) CHANGE.NODEFONT.SIZE (DISPLAYNODE APPLY* MEASUREGRAPHNODE) OPT.LBDEL ( -OPT.PRDEL OPT.SETDEFREFS OPT.DELCODE) SEDIT::CHANGE-PACKAGE (SEDIT::CLOSE-OPEN-NODE CL:FORMAT -XCL:SAVE-PROFILE SEDIT::VERIFY-STRUCTURE |printout| TERPRI) HARRAYKEYS (MAPHASH) \\MAKEFUNARGFRAME ( -\\CALLME MAPC LISPERROR \\SMASHLINK) COMPERROR (COMPERRM) \\FM.UPDATEGROUPEXTENT ( -\\FM.UPDATEGROUPEXTENT) NSNET.DISTANCE (BLOCK) GETSEQUIN (BLOCK) SEDIT::RELINEARIZE (BLTSHADE -SEDIT::COMPUTE-ALL-FORMATS SEDIT::GENERATE-LINEAR-FORM CL:FUNCALL SELECTQ SEDIT::LINE-FINISHED -SEDIT::REPAINT-NEW-LINE DECLARE SHOULDNT SEDIT::CLEAN-UP-AFTER-RELINEARIZATION) \\FM.WINDOWEXTENT ( -EXTENDREGION) DUMMYDEF (PUTD) SEDIT::BACKSPACE (CL:FUNCALL) NOTIFY.EVENT (UNINTERRUPTABLY -\\RUN.PROCESS) STKAPPLY (\\CALLME \\SMASHLINK RELSTK SELECTQ DECLARE) WINDOW.BITMAP (CLOSEW BITBLT -OPENW) |\\PFAddRootDirEntry| (MESASETA ERROR FREPLACEFIELD) PRINTPROPS (PRIN2 PRIN1) -SEDIT::NOTE-CHANGE-IN-SIMPLE (FREPLACEFIELD) CENTERPRINTINAREA (MOVETO RESETLST) \\INTERPRETER (CHECK -FREPLACEFIELD \\CONTEXTSWITCH MAPC \\SMASHLINK DECLARE FRPLACD) FB.MAKECOUNTERWINDOW ( -FB.MAKERIGIDWINDOW DSPFONT ATTACHWINDOW FREPLACEFIELD) \\KEYBOARDOFF (\\PUTBASE) TTPRIN1 (TTCRLF -TTBOUT) \\STORENSADDRESS (\\MOVENSADDRESSES) EVALV (\\SMASHLINK RELSTK) \\TFBRAVO.HANDLE.HEADING ( -DECLARE\: SETFILEPTR FREPLACEFIELD \\TFBRAVO.WRITE.PARAGRAPH) COMP.STSETQ (OPT.CCHECK) -\\TEDIT.FIXCHANGEDLINE (\\TEDIT.INSERTLINE \\TEDIT.COPY.LINEDESCRIPTOR \\TEDIT.ADJUST.LINES -\\DISPLAYLINE RETFROM \\TEDIT.CLEAR.SCREEN.BELOW.LINE) STKEVAL (\\SMASHLINK RELSTK) \\PROC.RESUME ( -FREPLACEFIELD) \\DRAWCURVE.IP (\\DRAWLINE.IP SHOW.IP APPENDOP.IP \\IPCURVE2 SETXY.IP) DREMOVE (FRPLACA - FRPLACD DECLARE) DASHES (TERPRI FRPTQ) \\SOFTCURSORPOSITION (\\PUTBASE \\SOFTCURSORDOWN -\\SOFTCURSORUPCURRENT) USERLISPXPRINT (RELSTK LISPXPUT) |\\PFCreateRootDirectory| (|DiskError| -LISPERROR |\\PFPutRootDirectory| |\\PFPutRootDirectoryType|) OPT.LABELNTHPR (OPT.CHLEV SUB1VAR -OPT.CHECKTAG PUTHASH OPT.SETDEFREFS) \\TEDIT.PEEKBIN.NEW.PAGE (FREPLACEFIELD \\PAGEDBACKFILEPTR) -IMAGEOBJPROP (FREPLACEFIELD) VIDEORATE (DECLARE \\DSPRATE \\DEVICE.OUTPUT) \\TEDIT.BLTCHAR (DECLARE -\\CHANGECHARSET.DISPLAY UNINTERRUPTABLY FREPLACEFIELD) FB.DEPTHCOMMAND (FB.ALLOW.ABORT) ENVAPPLY ( -\\CALLME \\SMASHLINK RELSTK SELECTQ DECLARE) WINDOW.MOUSE.HANDLER (GETMOUSESTATE DECLARE -\\PROTECTED.APPLY ERSETQ DOWINDOWCOM) PRINT10TO3 (FRESHLINE PRINTNSHOSTNUMBER) GRAPHOBJ.CHECKALIGN ( -ERROR) GETDEFFROMFILE (DECLARE CL:FORMAT) FB.HEADINGW.DISPLAY (DSPFILL DSPRIGHTMARGIN DSPXPOSITION -PRIN3 CL:FORMAT) \\ENQUEUE (UNINTERRUPTABLY FRPLACD ERROR) COMPILER::META-CALL-LAMBDA ( -COMPILER::META-CALL-LAMBDA-SUBSTITUTE COMPILER::RELEASE-TREE RPLNODE) \\GCMAPTABLE (DECLARE \\HTFIND -\\PUTBASEPTR .BOXIPLUS. .UNBOX. SELECTC \\ILLEGAL.ARG CL::%NOT-NONCOMPLEX-NUMBER-ERROR \\PUTBASE -FREPLACEFIELD .INCREMENT.ALLOCATION.COUNT.) ICONW.SHADE (BLTSHADE BITBLT \\ICONW.REPAINTFN) -COURIER.WRITE.STRING (PUTWORD \\BOUTS) \\TFBRAVO.FONT.FROM.CHARLOOKS (FREPLACEFIELD) \\JISPEEK (\\BIN -\\BACKFILEPTR \\CHNAGE.KI.MODE DECLARE) DASSEM.DPRINTLAP (PRIN2 PRIN1 MAPRINT) -TEDIT.INSERT.UPDATESCREEN (FREPLACEFIELD TEDIT.UPDATE.SCREEN \\FIXSEL \\SHOWSEL \\COPYSEL -\\TEDIT.SET.WINDOW.EXTENT SCROLLW) \\MAKESTACKP (UNINTERRUPTABLY \\INCUSECOUNT \\DECUSECOUNT) -\\VAROFFSET (SELECTC RAID) SEDIT::DEFAULT-GETDEF-FN (CL:CERROR) \\LOADNSADDRESS (\\MOVENSADDRESSES) -TITLEW.REPAINTFN (BITBLT MOVETOUPPERLEFT) TEDIT.MODIFYLOOKS (MOVETO RELDRAWTO BITBLT) \\PRINTADDR ( -\\CKPOSBOUT FREERESOURCE DECLARE) PRINTPACKET (|printout|) FB.HARDCOPYCOMMAND (FB.ALLOW.ABORT -FB.HARDCOPY.TOFILE) TTREADLIST (FRPLACD) \\RECLAIMSTACKP (\\DECUSECOUNT) EDITQF (EDIT4F) -\\DSPFONT.PRESS (SHOW.PRESS \\ENTITYEND.PRESS \\ENTITYSTART.PRESS FREPLACEFIELD \\BOUT -\\SETSPACE.PRESS \\FIXLINELENGTH.PRESS) BESTNSADDRESS (MAPC BLOCK ERROR |printout| TERPRI) -|\\AddShade| (RPLACD FREPLACEFIELD) GO (STACKPUTBASEPTR \\SMASHRETURN LISPERROR) SEDIT::ADD-MENU ( -|printout| TERPRI ATTACHWINDOW WINDOWADDPROP) \\TRACKCURSOR (DECLARE .NOTELASTUSERACTION \\SETMOUSEXY -SELECTC |\\DoveMisc.SetMousePosition| FREPLACEFIELD \\SOFTCURSORPOSITION -|\\DoveDisplay.SetCursorPosition|) \\PERIODIC.INTERRUPTFRAME (DECLARE) CL:MAKE-BROADCAST-STREAM ( -DECLARE \\SETACCESS STREAMPROP) CLISPFORERR (SPACES LISPXPRIN1 LISPXPRIN2 CLISPFORERR1 LISPXSPACES -TERPRI) TOPW.REPAINTFN (WITH-INSPECTOR-ENV MOVETO PRIN2 INSPECT.INVERTSELECTION) TB.REDISPLAY.ITEMS ( -FREPLACEFIELD CLEARW) SETBLIPVAL (SELECTQ \\ILLEGAL.ARG CHECK) \\SETACCESS (UNINTERRUPTABLY SELECTQ -RAID) \\COURIER.RECORDTRAN (/RPLACA FRPLACD ERROR) CL:MAKE-ECHO-STREAM (DECLARE \\SETACCESS STREAMPROP - FREPLACEFIELD) COURIER.WRITE.SEQUENCE.UNSPECIFIED (SELECTQ PUTWORD DECLARE PUTLONG -COURIER.WRITE.FAT.STRING COURIER.WRITE.STRING COURIER.WRITE.SEQUENCE.UNSPECIFIED \\CWSU.DEFAULT -COURIER.WRITE \\COURIER.UNKNOWN.TYPE) \\SHIFTJISPEEK (DECLARE \\BIN \\BACKFILEPTR \\CONV.SJIS.TO.JIS) -\\TFBRAVO.READ.CHARLOOKS (HELP SETFILEPTR) \\REALFRAMEP (\\SMASHLINK) DASSEM.DSTOREFNDEF (MAP -\\FIXCODESYM DECLARE \\FIXCODEPTR SETSTKNTOFFSET CODESETA2 DPUTCODE SI::RESETUNWIND) -FB.MAKEHEADINGWINDOW (DSPFONT FB.MAKERIGIDWINDOW ATTACHWINDOW WINDOWPROP DSPTEXTURE DSPOPERATION -DSPFILL) \\INSERTCH (DECLARE \\INSERT.FIRST.PIECE RPLSTRING RPLCHARCODE \\TEDIT.HISTORYADD -UPDATEPCNODES \\TEDIT.WINDOW.TITLE) SORT1 (DECLARE FRPLACA FRPLACD FRPLNODE2) COMPARELST (DECLARE) -OPT.PRDEL (PUTHASH) \\IPCURVE2 (MOVETO.IP LOADPOLY \\IMAGEPATH.IP \\SETBRUSH.IP LINETO.IP) EDIT\: ( -EDLOC EDUP SELECTQ EDIT2F EDITCOML ERROR!) DOTABS (DOTABS TAB) \\TIMER.INTERRUPTFRAME (APPLY* -SETUPTIMER) \\BACKSHIFTJISCHAR (DECLARE \\BIN) SAVEDEF (SELECTQ /PUT /PUTASSOC) -\\REMOVE.EXTERNALFORMAT (DECLARE UNINTERRUPTABLY) \\MAKENUMBER (FREPLACEFIELD) -FB.INFOMENU.WHENSELECTEDFN (SHADEITEM) CL:MAKE-STRING (FILL-ARRAY) VIRGINFN (XCL:UNBREAK-FUNCTION -CL:FORMAT APPLY SI::RESTORE-CALLS MAPC) WAITFORINPUT (\\TTYBACKGROUND FREERESOURCE DECLARE) -COMPARELISTS (DECLARE COMPAREPRINT MAP CL:FORMAT TERPRI) RETEVAL (\\CALLME LISPERROR \\SMASHRETURN -RELSTK SI::UNWIND) \\DOTRANSITIONS (\\DECODETRANSITION) SI::UNWIND (DECLARE CL:FUNCALL) -COURIER.WRITE.SEQUENCE (\\COURIER.TYPE.ERROR COURIER.WRITE.SEQUENCE.UNSPECIFIED PUTWORD DECLARE MAPC) -\\EUCFILEOUTCHARFN (\\BOUT DECLARE) \\TEDIT.RESTARTFN (FREPLACEFIELD \\TEDIT.WINDOW.TITLE -\\TEDIT.COMMAND.LOOP CLOSEW \\TEXTCLOSEF APPLY*) BROWSE/LAYOUT/HORIZ/COMPACTLY (DECLARE BRHC/LAYOUT -BRHC/OFFSET) \\WAITFORSYSBUFP (\\WAIT.FOR.TTY BLOCK FREERESOURCE DECLARE) COMPAREDEFS (PRINTOUT -FRPLACD PRIN2) \\NSFILING.AFTER.LOGIN (FREPLACEFIELD) MENUITEMREGION (CHECK/MENU/IMAGE) MSPATHS4 ( -PUTHASH MAPC) MERGE (ERRORX) GETDEFERR (DECLARE ERROR) CHARACTER (\\PNAMESTRINGPUTCHAR DECLARE -FREERESOURCE) \\JISIN (\\CHNAGE.KI.MODE \\BACKFILEPTR DECLARE) \\MEDW.GETWINDOWPROP (\\ILLEGAL.ARG) -\\EUCIN (DECLARE) COND (DECLARE) |\\PFPutRootDirectory| (|DiskError| LISPERROR |\\PFPutPage|) -\\GR.DELDEFFN (ERRORX MARKASCHANGED /SETTOPVAL) TWODINSPECT.REDISPLAY (WITH-INSPECTOR-ENV BITBLT +\BACKGROUND SEDIT::EXTEND-SELECTION SEDIT::CHECK-SELECTION-SHIFT BLOCK) SETTEMPLATE (UNDOSAVE) +CLISPFORERR (SPACES LISPXPRIN1 LISPXPRIN2 CLISPFORERR1 LISPXSPACES TERPRI) OPENBSPSTREAM (SELECTC +\BSP.FLUSH.SOCKET.QUEUES SETUPTIMER BLOCK WAKE.PROCESS) TEDIT.WORDGET (DECLARE CHECK) TERM.HOME ( +\DTEST) \WRITEDISKPAGES (\OPENDISKDESCRIPTOR UNINTERRUPTABLY .SETUPDISKBUFFERS. \BLT \PUTBASE +\CLEARWORDS DECLARE ERROR \CONTEXTSWITCH \BOXIPLUS \DISKERROR) PUTHASH (\HASHACCESS) FB.ADD.FILE ( +FREPLACEFIELD) \TEDIT.MOVE.PIECEMAPFN (APPLY*) \HASHACCESS (DECLARE UNINTERRUPTABLY \HASHRECLAIM) +SEDIT::INSERT-MULTI-ESCAPE (SEDIT::INSERT FREPLACEFIELD SEDIT::SET-SELECTION-NOWHERE) PRINTXIP ( +printout TERPRI PRINTXIPROUTE PRIN2 PRINTCONSTANT PRINTXIPDATA) \DOWRITEDISKPAGES (\M44MARKPAGEFREE +\PUTBASE \DODISKCOMMAND SELECTQ) \MEDW.DSPCREATE (DSPFONT DSPDESTINATION DSPRIGHTMARGIN DSPSOURCETYPE +DSPOPERATION) INSTALL-WHO-LINE-OPTIONS (WINDOWPROP) TTADJUSTWIDTH (TTDELSECTION TTINSERTSECTION) +RESTART.ETHER (SUSPEND.PROCESS) MAPAFTERCLOSE (\CLEARMAP) SCROLLBITMAP (WYOFFSET WXOFFSET BITBLT) +M44.SIGNAL.DISK.ERROR (SELECTC LISPERROR ERROR) SEDIT::LINEARIZE-QUOTE (SEDIT::OUTPUT-CONSTANT-STRING) + TEDIT.QUIT (\ILLEGAL.ARG DISMISS) ADD-SYMBOL (DECLARE MAKE-PACKAGE-HASHTABLE) +\TFBRAVO.INSTALL.PAGEFORMAT (MAPC) FASL::DUMP-DCODE (CL:MACROLET) FB.FASTSEE.ONEFILE (CLEARW +WINDOWPROP) RESOLVE-EXPORT-MISSING (MAKE-CONDITION) \FTPERROR (printout PRIN1 HELP CLOSEBSPSTREAM) +HARRAYKEYS (MAPHASH) MAPPAGE (\SETEOF) \LISPERROR (DECLARE SELECTQ \MP.ERROR) RAISE-SIGNAL (CL:FLET +DEFAULT-HANDLE-CONDITION TRY-TO-HANDLE) \SWITCHFONTS.PSC (POSTSCRIPT.PUTCOMMAND) PRINTDEF (DECLARE +RESETLST TERPRI) CHAT.TAKE.INPUT1 (DECLARE CLEARW printout) \HASHRECLAIM (UNINTERRUPTABLY DECLARE) +\FORWARD.XIP (PRINTXIP) \MAPPAGE (CHECKBUFFERREF \DELREF \WRITEOUTBUFFERS) DO.MOUSE (\CHECKCARET +MOVE.TO.LINE) HASHOVERFLOW (ERRORX HASHOVERFLOW.UPDATEARRAY) RECORDINIT (MAPC) \SETEOF (\RELEASECPAGE +\SETIODIRTY) \WRITEVMEMPAGES (CHECK \BLT) CLSMARTEN (DECLARE) MB.MARGINBAR.SHOWTAB (SELECTQ BITBLT) +WHO-LINE-USERNAME (DECLARE) POSTSCRIPT.OUTSTR (DECLARE) \TEDIT2 (\TEDIT.COMMAND.LOOP CLOSEW +\TEXTCLOSEF APPLY*) UNDONLSETQ (LISTPUT1 DECLARE SI::RESETUNWIND UNDOSAVE UNDONLSETQ1) STORAGE ( +FRPLACD DECLARE printout PRIN1 TAB \STORAGE.TYPE \STORAGE.HUNKTYPE PRINTNUM \STLINP +\SHOW.ARRAY.FREELISTS) \GR.DELDEFFN (ERRORX MARKASCHANGED /SETTOPVAL) SHOWRECTANGLE.PRESS (\WOUT) +CL:DELETE (CL:ERROR) DWIMIFY1A (LISPXSPACES) IDLE (LISTPUT \CARET.DOWN) ATTACHEDWINDOWREGION (MAPC) +\STLINP (PRIN1 TAB PRINTNUM) \CHARWIDTH.PSC (DECLARE) CL:LIST-ALL-PACKAGES (CL:MAPHASH) \DSPROTATE.PSC + (POSTSCRIPT.SHOWACCUM \DSPRESET.PSC) \COURIER.BROADCAST.ON.NET (printout SPACES PRINTNUM) +SEDIT::INSPECT-SELECTION (SEDIT::SET-SELECTION-NOWHERE SEDIT::SET-POINT-NOWHERE printout DECLARE +TERPRI) \HASHTABLE.DEFPRINT (.SPACECHECK. \OUTCHAR \SOUT \PRINTADDR) SETUPFONTS.IP (DEFINEFONT.IP) +\STORAGE.TYPE (DECLARE CHECK \MAPMDS \BOXIPLUS \PUTBASEFIXP \STMDSTYPE) DASSEM.DPRINTLAP (PRIN2 PRIN1 +MAPRINT) COMPARELST (DECLARE) \BITBLT.BITMAP.SLOW (DECLARE SELECTQ UNINTERRUPTABLY \BITBLT.MERGE +\BITBLTSUB ERROR \BWTOCOLORBLT SHOULDNT) \STORAGE.HUNKTYPE (DECLARE MAPC \BOXIPLUS) \COLLECTDIRTYBUFS +(FRPLACD) \STRINGWIDTH.PRESS (DECLARE \MAPPNAME) PUP.ECHOUSER (RESETSAVE SETUPPUP PUTPUPWORD +FREPLACEFIELD PUTPUPSTRING SENDPUP PRINTERRORPUP RELEASE.PUP AWAIT.EVENT) TEXTUREOFCOLOR (BITBLT) +REMOVEWINDOW (CLOSEW) XCL:LIST-ALL-PROFILES (CL:MAPHASH) WORDCONTENTS (CHECK) \MEDW.TOTOPW (DOUSERFNS +\INTERNALTOTOPW ERROR) \PUNT.BITBLT.BITMAP (DECLARE SELECTQ UNINTERRUPTABLY \BITBLT.MERGE \BITBLTSUB +ERROR \BWTOCOLORBLT SHOULDNT) \SETIODIRTY (SHOULDNT) SEDIT::LINEARIZE-LIST (SEDIT::OUTPUT-CR-OR-SPACE +SEDIT::OUTPUT-CR SEDIT::OUTPUT-SPACE) \STRINGHASHBITS-UFN (DECLARE) FAKE-COMPILE-FILE (DECLARE +RESETLST CL:MULTIPLE-VALUE-SETQ PRINT-COMPILE-HEADER MAPC) DINFO.UPDATE (OPENW WINDOWPROP ERROR +RESETLST FLASHWINDOW DINFO.UPDATE.FMENU DINFO.UPDATE.GRAPH.DISPLAY DINFO.UPDATE.MENU.DISPLAY) +/SETWORDCONTENTS (UNDOSAVE) TEDIT.EDIT.OBJECT (\FIXSEL TEDIT.PROMPTPRINT TEDIT.UPDATE.SCREEN) +\DODISKCOMMAND (\BLT EMPUTBASE \BOXIPLUS) CL:AREF (CL:ERROR) \STRING-EQUAL-HASHBITS-UFN (DECLARE) +\STMDSTYPE (PRIN2 SPACES \STMDS.APPROX) SETWORDCONTENTS (ERROR) \FM.NUMBER-CHANGESTATE (DECLARE) +\GETDISKCB (\CLEARCB) INCORNER.REGION (DECLARE) EXPANDBITMAP (EXPANDBM) \XIPERROR (DECLARE \BLT +SWAPXIPADDRESSES SENDXIP) SEDIT::INPUT-TOKENDELIM (SELECTQ SEDIT::INSERT SEDIT::SET-SELECTION-NOWHERE +SHOULDNT) \IFS.LOOKUPFILE (WITH.MONITOR DECLARE OBTAIN.MONITORLOCK SETUPPUP \PUTPUPSTRING SELECTC +PRINTERRORPUP CLOSEPUPSOCKET RELEASE.PUP SI::MONITOR-UNWIND) COMP.SELECTQ (COMP.VAL COMP.DELPUSH +COMP.STPOP COMP.STTAG COMP.STVAR COMP.STCOPY COMP.STCONST COMP.STFN MAP) \CLEANUPDISKQUEUE (EMPUTBASE +\DODISKCOMMAND APPLY*) DINFO.TOGGLE.TEXT (FLASHWINDOW DINFO.UPDATE.TEXT.DISPLAY) \CODEARRAY (LISPERROR +) TURN.OFF.ETHER (BREAKCONNECTION DEL.PROCESS CLOSEPUPSOCKET CLOSENSOCKET) \IDLERKEYACTION (KEYACTION) + WORDOFFSET (CHECK) WHO-LINE-WHAT-IS-RUNNING (DECLARE RELSTK) TEDIT.UNDO.DELETION (\INSERTPIECE APPLY* + \FIXILINES TEDIT.UPDATE.SCREEN \TEDIT.SET.SEL.LOOKS \FIXSEL) \PUNT.BLTSHADE.BITMAP (DECLARE +UNINTERRUPTABLY \BITBLTSUB) TEDIT.SETSYNTAX (\SETSYNCODE CHECK) \PAGED.GETNEXTBUFFER (LISPERROR +UNINTERRUPTABLY \RELEASECPAGE \SETIODIRTY SHOULDNT) \CREATEINTERPRESSFONT (DECLARE) \MEDW.BURYW (MAPC) + \FIXCODENUM (DECLARE \PUTBASEBYTE) SEDIT::TTYFN (DECLARE WITH.MONITOR OBTAIN.MONITORLOCK +SI::MONITOR-UNWIND) \PAGED.FORCEOUTPUT (\UPDATEOF UNINTERRUPTABLY \SETIODIRTY FRPLACD \WRITEOUTBUFFERS + RPLACD \TRUNCATEFILE) DSPSOURCETYPE (LISPERROR UNINTERRUPTABLY DECLARE) \FIXCODEPTR (DECLARE +UNINTERRUPTABLY \ADDREF) \DSPCLIPPINGREGION.IP (UNINTERRUPTABLY \CHANGE-VISIBLE-REGION.IP) +COMPILE-FILE? (SELECTQ CL:FORMAT) \PAGEDSETFILEPTR (\UPDATEOF UNINTERRUPTABLY \RELEASECPAGE +\SETIODIRTY) DASSEM.DSTOREFNDEF (MAP CODESETA \FIXCODESYM DECLARE \FIXCODEPTR SETSTKNTOFFSET DPUTCODE +SI::RESETUNWIND) POSTSCRIPT.STARTPAGE (POSTSCRIPT.PUTCOMMAND \SETXFORM.PSC POSTSCRIPT.OUTSTR RELMOVETO + \TERPRI.PSC) ICMLARRAY.INDICES (PRINTOUT TERPRI) FASL::DUMP-INTEGER (FASL::WRITE-OP FASL:DUMP-VALUE) +\STMDS.APPROX (SPACES PRIN1) \CLISPKEYWORDPROCESS (SET) \PAGED.SETEOFPTR (FORGETPAGES \SETEOF +\CLEARBYTES \SETIODIRTY \TRUNCATEFILE) DBG::FIND-NAMED-STACK-POSITION (RELSTK PRIN1 PRINT) +\CARET.FLASH (UNINTERRUPTABLY) \FIXCODESYM (DECLARE) REPOSITIONATTACHEDWINDOWS ( +MOVEATTACHEDWINDOWTOPLACE) TEDIT.UNDO.INSERTION (\DELETECH \FIXDLINES TEDIT.UPDATE.SCREEN \FIXSEL) +SPY.MAKE.TREE (WINDOWPROP) SEDIT::SHRINKFN (printout DECLARE TERPRI RELEASE.MONITORLOCK +SEDIT::AWAKE-COMMAND-PROCESS SEDIT:SAVE-WINDOW-REGION) TB.EXPANDFN (DECLARE OBTAIN.MONITORLOCK +WINDOWADDPROP TB.DISPLAY.LINES SI::MONITOR-UNWIND) COMPARELISTS (DECLARE COMPAREPRINT MAP CL:FORMAT +TERPRI) DSPCREATE (\DTEST DSPFONT DSPDESTINATION DSPRIGHTMARGIN DSPSOURCETYPE DSPOPERATION) +DINFO.TOGGLE.HISTORY (DETACHWINDOW) \LEAF.RESENDPUPS (PUTSEQUIN) SYSRECLOOK1 (DECLARE) \PAGEDREADP ( +DECLARE CHECK \INCHAR \BACKCCODE) DELFROMCOMS (DECLARE SELECTQ /RPLNODE2) \NSFILING.GET.ATTRIBUTES ( +DECLARE) \CHECKARRAYBLOCK (DECLARE \CHECKARRAYBLOCK) TEDIT.GETSYNTAX (DECLARE CHECK) SORT (DECLARE +FRPLACD) SEDIT::RESHAPEFN (WYOFFSET SEDIT::COMPUTE-COMMENT-COLUMN DECLARE OBTAIN.MONITORLOCK BITBLT +SI::MONITOR-UNWIND) \CHECKFREEPAGE (FRPTQ \PUTBASE) \GR.PUTDEFFN (ERRORX ERROR \GR.DELDEFFN +MARKASCHANGED EVAL /RPLACD /SETTOPVAL) \ALLOCBLOCK.OLD (\CHECKARRAYBLOCK \DELETEBLOCK? \MERGEBACKWARD +\MERGEFORWARD \CLEARCELLS) \PARTEND.PRESS (\WOUT DECLARE SETFILEPTR) ONEDINSPECT.SELECTPROP ( +INSPECT.INVERTSELECTION INSPECT.INVERTREGION) NS.ECHOUSER (RESETSAVE \PUTBASE printout SENDXIP +PRINTERRORXIP RELEASE.XIP AWAIT.EVENT) TWODINSPECT.REDISPLAY (WITH-INSPECTOR-ENV BITBLT TWODINSPECT.PRINTELEMENT TWODINSPECT.ADJUSTSELECTION TWODINSPECT.MAKEREGIONS DSPRESET -TWODINSPECT.REPAINTFN TOPW.REPAINTFN) \\TFBRAVO.FIND.LAST.TRAILER (SETFILEPTR) RETAPPLY (\\CALLME -LISPERROR \\SMASHRETURN RELSTK SELECTQ DECLARE SI::UNWIND) \\ADD.ROUTING.TABLE.ENTRY ( -\\CHECK.ROUTING.TABLE \\RPLPTR) TTYDISPLAYSTREAM (DECLARE \\ILLEGAL.ARG UNINTERRUPTABLY \\CHECKCARET -DSPSCROLL PAGEHEIGHT) TTADJUSTWORD (TTPRIN1 TTGIVEHELP TTCRLF) VRULE.DISPLAYFN (SELECTQ BITBLT -DRAWLINE) CL:MAKE-SYNONYM-STREAM (DECLARE \\SETACCESS STREAMPROP FREPLACEFIELD) \\GENERIC.DSPCREATE ( -\\DTEST FREPLACEFIELD DECLARE \\SETACCESS DSPFONT DSPDESTINATION DSPRIGHTMARGIN DSPSOURCETYPE -DSPOPERATION) NCONC (FRPLACD) DISMISS (DECLARE \\PROCESS.GO.TO.SLEEP FREERESOURCE) \\SEQUIN.PROCESS ( -DECLARE OBTAIN.MONITORLOCK RESETSAVE PROCESSPROP SELECTC PRINTPUP RELEASE.PUP \\SEQUIN.RETRANSMITNEXT -INCLEAFSTAT SETUPTIMER \\SEQUIN.CONTROL \\SEQUIN.RETRANSMIT BLOCK SI::MONITOR-UNWIND) PP (DECLARE -CL:FORMAT) RESHADEITEM (DSPFILL) CL:MAKE-TWO-WAY-STREAM (DECLARE \\SETACCESS STREAMPROP FREPLACEFIELD) - \\PROCESS.EVAL1 (FREPLACEFIELD \\RUN.PROCESS) CL:MISMATCH (CL:ERROR) \\SHIFTJISIN (DECLARE -\\CONV.SJIS.TO.JIS) DASSEM.MATCHVARS (PUTHASH DASSEM.COUNTVARS) ESUBST (UNDOSAVE ERROR ERROR!) -REQUIREVERSION (ERROR) PROCESS.READ (CLEARW PRIN1) SEND.FILE.TO.PRINTER (RESETSAVE LISPXPRIN1 -LISPXTERPRI) \\HANDLE.RAW.10TO3 (\\MAYBEPRINTPACKET SELECTC DECLARE \\NOTE.10TO3 FREPLACEFIELD -ENCAPSULATE.ETHERPACKET PRINT10TO3 TRANSMIT.ETHERPACKET |printout| PRIN1 \\RELEASE.ETHERPACKET) -PROCESS.APPLY (DECLARE FREPLACEFIELD \\PROCESS.MAKEFRAME \\PROCESS.GO.TO.SLEEP) TEDIT.FORMATTEXTBOX ( -CL:MULTIPLE-VALUE-SETQ BLOCK FREPLACEFIELD HELP FRPLACD) \\DECODETRANSITION (.NOTELASTUSERACTION -SELECTC FREPLACEFIELD SHOULDNT \\PUTSYSBUF) COPIEDFILENAME (RPLACD) CHANGENAME1A (CHANGECCODE UNDOSAVE -) \\DEFINEDEVICE (DECLARE UNINTERRUPTABLY) \\MEDW.DSPCREATE (DECLARE \\SETACCESS DSPFONT -DSPDESTINATION DSPRIGHTMARGIN DSPSOURCETYPE DSPOPERATION) NEWPAGE.PRESS (\\ENDPAGE.PRESS) U-CASE ( -DECLARE \\PUTBASECHAR FREERESOURCE) INFILECOMTAIL (DECLARE NLSETQ SI::RESETUNWIND) APROPRINT ( -|printout| TAB PRIN1 RESETLST) \\JISFILEOUTCHARFN (\\OUTKO \\CHNAGE.KI.MODE DECLARE \\OUTKI) -CL:NSUBSTITUTE (CL:ERROR) PRESSWINDOW (DSPXPOSITION DSPYPOSITION \\WRITEPRESSBITMAP) \\PUTSYSBUF ( -\\PUTBASEFAT FREPLACEFIELD) \\PROCESS.APPLY1 (FREPLACEFIELD \\RUN.PROCESS) CENTEREDPRIN1 (MOVETO) -\\SYMBOL.ESCAPE.COUNT (DECLARE CHECK) \\SHIFTJISFILEOUTCHARFN (\\BOUT DECLARE \\CONV.JIS.TO.SJIS) -PRINTFN (PRINTFNDEF |printout| PRIN1) \\PRINTFRAME (\\PRINTSTK DECLARE SELECTQ |printout| SPACES PSTK -PRINTSTKFIELDS PRIN2 APPLY*) OPT.LBMERGE (MAPC NCONC PUTHASH) SEDIT::CHECK-SELECTION (FREPLACEFIELD -SHOULDNT) \\EUCPEEK (\\BIN \\BACKFILEPTR DECLARE) SHOWCHARS (PRINTOUT PRIN2 TAB PRIN1) -TEDIT.FORMATFOLIO (FREPLACEFIELD FRPLACD) FB.DISPLAY.COUNTERS (DSPRIGHTMARGIN LINELENGTH MAPC PRIN3 -BLTSHADE FRPLACD) \\ICONW.REPAINTFN (TOTOPW BITBLT) \\MEDW.TOTOPW (DOUSERFNS \\INTERNALTOTOPW ERROR) -\\TRANSLATE.10TO3 (DECLARE FREPLACEFIELD \\BLT ENCAPSULATE.ETHERPACKET \\MAYBEPRINTPACKET -TRANSMIT.ETHERPACKET) DASSEM.DWRITEFN (DASSEM.DPRINTLAP PRIN3 TERPRI \\BOUT MAPC SPACES BOUT -DASSEM.DSTOREFNDEF) EDIT4E (PRINT EDLOCL) DBG::FIND-NAMED-STACK-POSITION (RELSTK PRIN1 PRINT) -\\GETDEVICEFROMHOSTNAME (DECLARE \\DEFINEDEVICE) \\SEQUIN.CLOSE (DECLARE OBTAIN.MONITORLOCK -FREPLACEFIELD \\SEQUIN.CONTROL SI::MONITOR-UNWIND) APROPOS (DECLARE RESETFORM) \\TEDITOUTCHARFN ( -\\BOUT) TEDIT.SETSEL (\\SHOWSEL \\COPYSEL FREPLACEFIELD \\TEDIT.SET.SEL.LOOKS -TEDIT.RESET.EXTEND.PENDING.DELETE \\FIXSEL) NOHOST (SELECTQ) FB.NEWINFOCOMMAND (ATTACHWINDOW MOVEW -FB.INFOMENU.SHADEINITIALSELECTIONS FREPLACEFIELD WINDOWADDPROP) \\UNQUEUE.EVENT (\\MP.ERROR -FREPLACEFIELD) \\TEDIT.LOOKS (CURSORPOSITION) CL::TIME-CALL (CL::%GET-TIMING-INFO -CL::%STATS-OBJECT-DIFFERENCE CL::TIME-FORMAT CL::%PRINT-TIMING-ITEM CL::%PRINT-TIMING-INFO) -\\HARDCURSORUP (\\CURSORBITSPERPIXEL BITBLT SELECTC |\\DoveDisplay.SetCursorShape|) COMP.VARTYPE ( -OPT.CCHECK) DELFROMCOMS (DECLARE SELECTQ /RPLNODE2) OPT.JUMPTHRU (OPT.LBMERGE COMPERRM OPT.PRATTACH -OPT.PRDEL NCONC1 FRPLACD) BROWSE/LAYOUT/HORIZ (DECLARE) COMPILER::META-EVAL-VAR-REF (COMPILER::RELEASE-VAR-REF - COMPILER::ANALYZE-TREE) \\ENQUEUE.EVENT/LOCK (FREPLACEFIELD) \\CHARWIDTH.IP (DECLARE) -\\FLOATTOBYTE.UFN (\\PUTBASE) MSPATHS2 (UPDATEFN) EDITFPAT (FRPLACD MAPC) \\PRINTBF (\\PRINTSTK PRIN2 -APPLY* |printout| PRIN1) SHOWPRESSBITMAPREGION (SHOWREGION) \\LOOKUPPUPNUMBER (FREPLACEFIELD -\\STORENSHOSTNUMBER DISCARDXIPS SENDXIP BLOCK SELECTC |printout| PRIN1 RELEASE.XIP) NEWLINE.PRESS ( -NEWPAGE.PRESS SHOW.PRESS SETXY.PRESS) PRINTHISTORY2 (PRIN1 MAPRINT SHOWPRIN2 SPACES TERPRI) -\\CLOSEIPSTREAM (SELECTQ ENDPAGE.IP ENDPREAMBLE.IP) MSONPATH (MAPC) EDITXTR (EDLOC EDUP EDIT2F) -GRAPHBUTTONEVENTFN (TOTOPW FLIPNODE GETMOUSESTATE) GETDEFCURRENT (GETDEFERR UPDATEFILES) BRKDWNTIME ( -DECLARE BRKDWNINCA BRKDWNSETA BRKDWNADDTOA SUB1VAR) INTERPRESS.OUTCHARFN (\\CHANGECHARSET.IP -FREPLACEFIELD \\BOUT SHOW.IP SETX.IP) |\\PFFindRootDirEntry| (|\\PFPatchRootDirEntries| ERROR) -CL:PEEK-CHAR (\\NSIN \\BACKNSCHAR READCCODE) \\CLISPKEYWORDPROCESS (SET) \\CLOSEFILE (IMAGEOP -\\SETACCESS) \\CHANGECHARSET.HCPYMODE (UNINTERRUPTABLY) CL::%GET-TIMING-INFO (CL::%CAPTURE-BEFORE-STATS - CL::%CAPTURE-AFTER-STATS CL::%STATS-OBJECT-DIFFERENCE) EDITMV (EDLOC EDUP PRIN1 ERROR! EDITCOML -EDITCOMA) %TWO-WAY-STREAM-DEVICE-CLOSEFILE (\\SETACCESS CLOSEF? FREPLACEFIELD) COMP.MACRO (DECLARE) -PRINTNUM-TO-STRING (DECLARE \\ILLEGAL.ARG FREERESOURCE) \\CANONICALIZE.NSADDRESS (RPLACD \\BLT) -\\BLKSMALLP2FLOAT.UFN (\\PUTBASEFLOATP) \\TEXTINIT (DECLARE \\SETACCESS) COPYINSERT (BKSYSBUF) -TEDIT.FIND (\\TEDIT.HISTORYADD FREPLACEFIELD FRPLACD) EDLOCL (EDLOC) COPIEDFILEPATTERN (FRPLACD) -|\\PFGetRootDirectory| (|\\PFGetPage|) \\NSPRINT.FULL.REQUEST.STATUS (RESETSAVE) PRIN2 (DECLARE -\\PRINDATUM) PFI.MAYBE.SEE.PRETTY (RESETSAVE) \\BLKEXPONENT.UFN (\\PUTBASE) EDITMBD (EDLOC EDUP EDIT2F -) \\GR.PUTDEFFN (ERRORX ERROR \\GR.DELDEFFN MARKASCHANGED EVAL /RPLACD /SETTOPVAL) -MOVE.TO.START.OF.WORD (MOVE.BACK.TO) PROCESS.EVAL (DECLARE FREPLACEFIELD \\PROCESS.MAKEFRAME -\\PROCESS.GO.TO.SLEEP) ONEDINSPECT.SELECTITEM (INSPECT.INVERTSELECTION INSPECT.INVERTREGION) TEMPLATE -(MARKASCHANGED MSMARKCHANGED PUTHASH) \\NOTE.10TO3 (DECLARE \\BLT FREPLACEFIELD) DASSEM.DASSEM ( -DECLARE OPT.INITHASH DASSEM.COUNTVARS RPLACA RPLNODE2 RPLACD DASSEM.MATCHVARS RPLNODE PUTHASH -CHECKRANGE OPT.RESOLVEJUMPS OPT.COMPILERERROR FRPTQ DASSEM.DSTOREFN DASSEM.DASMBIND SHOULDNT HELP -DASSEM.DWRITEFN) CLEARCLISPARRAY (DECLARE) OBTAIN.MONITORLOCK (SELECTQ RESETSAVE FREPLACEFIELD -\\PROCESS.GO.TO.SLEEP) \\TEDIT.UNPARSE.CHARLOOKS.LIST (DECLARE) \\DEVICEEVENT (DECLARE FREPLACEFIELD) -\\REMOVEDEVICE (DECLARE UNINTERRUPTABLY) SEDIT::CREATE-PRELINEARIZED-NODE (RPLACA NCONC1) -\\TEDIT.APPLY.PAGEFORMATTING (TEDIT.PROMPTPRINT TEDIT.PROMPTFLASH FRPLACD LISTPUT RPLACA -TEDIT.PAGEFORMAT \\TEDIT.WINDOW.TITLE FREPLACEFIELD TTY.PROCESS) REVERSE (DECLARE) COMP.PROG1 (MAPC) -EDITFROMFILE (DECLARE LOADFROM FRPLACD LISPXPRIN1 LISPXSPACES LISPXPRIN2 LISPXTERPRI SI::RESETUNWIND) -OPT.XVARSCAN1 (OPT.COMPILERERROR) TB.MAKE.BROWSER (DECLARE MAP FREPLACEFIELD DSPLEFTMARGIN -TB.REPLACE.ITEMS NCONC1) \\BLKFLOATP2COMP.UFN (\\PUTBASEFLOATP) \\CURSORBITSPERPIXEL (FREPLACEFIELD) -\\BLKFDIFF.UFN (\\PUTBASEFLOATP) \\CURSORDESTINATION (UNINTERRUPTABLY \\CURSORBITSPERPIXEL -\\SETMOUSEXY SELECTC |\\DoveMisc.SetMousePosition| FREPLACEFIELD SETQ.NOREF) \\REMOVEDEVICE.NAMES ( -DECLARE RPLACA) \\GET-NEXT-RUN (CL:ERROR) \\BLKSEP.UFN (\\PUTBASEFLOATP) FULLPRESSBITMAP (|printout| -PRIN1 ERROR \\WRITEPRESSBITMAP) WRITE-UNICODE-INCLUDED (FRPLACD) TEDIT.FORMATPAGE (LISTPUT NCONC -DSPPUSHSTATE DSPROTATE DSPTRANSLATE DSPCLIPPINGREGION DSPRIGHTMARGIN \\TEDIT.HARDCOPY.FORMATLINE -TEDIT.FORMATBOX SHOW.IP DSPPOPSTATE DSPNEWPAGE) \\IDLE.EXIT? (SETPASSWORD OBTAIN.MONITORLOCK CLEARW -DEL.PROCESS DISMISS PRINTOUT PRIN1) \\SOFTCURSORUP (\\TEMPLOCKPAGES FREPLACEFIELD -\\SOFTCURSORUPCURRENT) CL:READ-FROM-STRING (SETFILEPTR) TEDIT.FORMATHEADING (\\TEDIT.INSERT.PIECES -MAPC FRPLACD) SI::MONITOR-UNWIND (SI::RESETUNWIND \\RUN.PROCESS) \\MEDW.REDISPLAYW (PROMPTPRINT) -\\BLKFPLUS.UFN (\\PUTBASEFLOATP) \\MEDW.BURYW (MAPC) IRM.LOOKUP (OPENW) \\BLKMAG.UFN (DECLARE -\\PUTBASEFLOATP) FNCHECK (ADDSPELL) CLISPLOOKUP0 (SHOULDNT) EDIT4F (PRIN1 ERROR!) \\BACKEUCCHAR (\\BIN -) \\TEDIT.TEXTBIN.NEW.PAGE (FREPLACEFIELD) \\BLKFTIMES.UFN (\\PUTBASEFLOATP) FB.NEWPATTERNCOMMAND ( -FB.SETNEWPATTERN) \\BSP.FLUSHINPUT (\\BSP.CLEANUP.INPUT) DBG::FIND-DEBUGGER-STACK-FRAME (ERROR STKNTH -RELSTK) \\HANDLE.NS.ROUTING.INFO (\\ADD.ROUTING.TABLE.ENTRY \\BLT) CLOSESEQUIN (\\SEQUIN.CLOSE -AWAIT.EVENT SELECTC) CL:REM (DECLARE) \\SOFTCURSORUPCURRENT (\\PUTBASE SETQ.NOREF FREPLACEFIELD -\\PILOTBITBLT \\SOFTCURSORPILOTBITBLT) ENVEVAL (\\CALLME \\SMASHLINK RELSTK) COMPILER::GENCODE-CALL ( -MAPC COMPILER::GENCODE-LET COMPILER::GENCODE-LAMBDA) \\BLKPERM.UFN (\\PUTBASE) FB.SETNEWPATTERN ( -FREPLACEFIELD ICONW.TITLE) PACK* (DECLARE RPLSTRING LISPERROR \\PACK.ITEM FREERESOURCE) BITMAPCREATE ( -\\ILLEGAL.ARG) EDITCONT (ERROR!) \\EP.PUT.AUX (|PutUnboxed| FREPLACEFIELD RPLACD) \\HARDCURSORPOSITION - (DECLARE \\SETMOUSEXY SELECTC |\\DoveMisc.SetMousePosition| FREPLACEFIELD) RELEASE.MONITORLOCK ( -\\RUN.PROCESS) \\BLTSHADE.IP (SHOWSHADE.IP \\BLTSHADE.GENERICPRINTER) BLIPVAL (SELECTQ CHECK) MSPATHS1 - (TERPRI PRIN1 DOTABS TAB SHOULDNT FRPLACA FRPLACD MAP MSPATHS1) CL:READ-LINE (READCCODE) -\\PROCESS.RELEASE.LOCKS (RELEASE.MONITORLOCK) CLISPDSUBST (MAP PUTHASH DWIMIFY1) \\MAKE.PROCESS1 ( -\\DECUSECOUNT FREPLACEFIELD \\INCUSECOUNT \\RESUME) COMPILER::FRAME-ANNOTATE-LAMBDA (MAPC) -CL:REMOVE-DUPLICATES (CL:ERROR) \\CCODEARGLIST (FRPLACD) \\PROCESS.MOVEFRAME (FLIPCURSORBAR -\\MAKEFREEBLOCK \\BLT FREPLACEFIELD CHECK) \\TEDIT.SELECT.CHARACTER (DECLARE RESETLST -TEDIT.OBJECT.CHANGED) MAKEINITBFS (\\LOCKWORDS FREPLACEFIELD \\PUTBASE) EDITSW (EDITSMASH EDITSMASH1) -%STRING-DOWNCASE (%ADJUST-FOR-OFFSET) BRECOMPILE3 (SETFILEPTR ERROR) NEW/INSTANCE/OF/GRAPHNODE ( -DECLARE MARK/GRAPH/NODE) TOGGLE/DIRECTEDFLG (DSPFILL) CONSTANTS (MAPC) LOADFNS-FINDFILE (DECLARE) -\\CCODEIVARSCAN (DECLARE) CL:SEARCH (CL:ERROR) CL:SCALE-FLOAT (CL::%FLOAT-UNBOX) -WRITE-UNICODE-MAPPING-FILENAME (NCONC1) FB.CREATE.FILEBUCKET (FB.ANALYZE.PATTERN SELCHARQ -FREPLACEFIELD FB.CHECK.NAME.LENGTH) \\PRIMARYTEXTURE (BITBLT) \\DUMP.COURIERPROGRAMS (TERPRI -|printout| PRIN1 SPACES CHANGEFONT MAP TAB CL:FORMAT) DECODE-NS-STRING (\\PUTBASE) \\GENERIC.READCCODE - (DECLARE \\BACKNSCHAR) \\MEDW.SHAPEW (PROMPTPRINT) \\TRANSLATE.3TO10 (FREPLACEFIELD \\BLT -ENCAPSULATE.ETHERPACKET \\MAYBEPRINTPACKET TRANSMIT.ETHERPACKET) FUNCTIONSMSMC (CHANGEMACRO) -BRHL/LAYOUT/DAUGHTERS (DECLARE RPLACA BRHL/MOVE/RIGHT) \\FM.UNSCROLLWINDOW (DSPXOFFSET DSPYOFFSET) -DBG::DEBUGGER-MENU-HELP (TERPRI) \\BACKTRACE (DECLARE |printout| PRINTNUM TERPRI \\PRINTBF APPLY* -\\PRINTFRAME) |\\VAMInit| (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) MACROEXPANSION (DECLARE -CL:WARN) CL:SINH (DECLARE) \\NSIN.24BITENCODING.ERROR (DECLARE ERROR) OPENPRSTREAM (DECLARE -FREPLACEFIELD ERROR SETUPFONTS.PRESS \\STARTPAGE.PRESS) %STRING-UPCASE (%ADJUST-FOR-OFFSET) -\\GETSTREAM (DECLARE \\CREATE.TTYDISPLAYSTREAM) FB.COPY/RENAME.COMMAND (FB.ALLOW.ABORT) BRKDWNRESULTS1 - (RPLACA RPLACD ADD1VAR) SEDIT::CREATE-NODE (FREPLACEFIELD NCONC1 RPLACA) COMPILER::META-EVAL-PROGN ( -FRPLACD) \\READCREFILL (DECLARE APPLY* \\FILLBUFFER) \\TEDIT.FORMATTEDP1 (SETFILEPTR) OPT.XVARSCAN ( -MAPC SELECTQ OPT.XVARSCAN1) CL:ROOM (CL:FORMAT) TWODINSPECT.DOWINDOWCOMFN (SELECTQ SHAPEW APPLY*) -SNAPW (BITBLT WINDOWPROP OPENW MOVEW) ONEDINSPECT.REDISPLAY (WITH-INSPECTOR-ENV BITBLT +TWODINSPECT.REPAINTFN TOPW.REPAINTFN) \ALLOCBLOCK.NEW (DECLARE \MERGEBACKWARD SELECTQ \MAKEMDSENTRY +\NEW2PAGE UNLESSINEW SETQ.NOREF) SWAPXIPADDRESSES (\BLT) SEDIT::INPUT-STRINGDELIM (SEDIT::INSERT) +TB.FIND.PREVIOUS.TAIL (HELP) \FM.NUMBER-SETUP (\FM.EDIT-SETUPTTBL DECLARE LISTPUT) FILENAMEFROMID ( +SETFILEPTR \LFCheckBang FRPLACD) \NSFILING.GET/SETINFO (\NSRANDOM.REESTABLISH) \FM.EDIT-SETUP ( +\FM.EDIT-SETUPTTBL DECLARE LISTPUT) \ALLOCHUNK (FRPLACD ERROR HELP \ADDREF) +POSTSCRIPT.SET-FAKE-LANDSCAPE (POSTSCRIPT.SHOWACCUM \DSPTRANSLATE.PSC \DSPRESET.PSC) NSNETDAYTIME0 ( +FREPLACEFIELD SELECTC) TOPW.REPAINTFN (WITH-INSPECTOR-ENV MOVETO PRIN2 INSPECT.INVERTSELECTION) +\SFFixDestination (\SFFixClippingRegion \INVALIDATEDISPLAYCACHE \SFFixFont) \HANDLE.RAW.XIP (DECLARE +PRIN1 \XIPERROR \PUTBASE SWAPXIPADDRESSES SENDXIP UNINTERRUPTABLY \ENQUEUE FREPLACEFIELD) +TB.FLUSH.WINDOW (WINDOWDELPROP ERSETQ) TTPRINSPACE (RPTQ TTBOUT) BSPPUTMARK (DECLARE +OBTAIN.MONITORLOCK \BSP.SENDBUFFER \PUTBASEBYTE FREPLACEFIELD SI::MONITOR-UNWIND) \MAIKO.ALLOCBLOCK ( +DECLARE \ILLEGAL.ARG \LISPERROR SELECTQ ERROR UNINTERRUPTABLY FRPTQ \CHECKARRAYBLOCK +.CHECK.ALLOCATION.COUNT. \DELREF LISPERROR) SEDIT::OUTPUT-CONSTANT-STRING (SEDIT::STEP-LINEAR RPLACD +SEDIT::ADVANCE TEDIT.INSERT) \BSP.HANDLE.DATA (RELEASE.PUP \ENQUEUE FREPLACEFIELD NOTIFY.EVENT +SETUPTIMER) CHAT.TYPESCRIPT (PROCESS.APPLY) \NEWLENGTHIS (\UPDATEOF) \DSPPOPSTATE.PSC (FREPLACEFIELD) +CLISPIFYCROPS (RETEVAL FRPLACD SHOULDNT) \VFMAtLoad (\VFMCreateIntervals) \TEDIT.WORDBOUND.READTABLE ( +CHECK MAPC) COMP.NUMBERTEST (COMP.STVAR COMP.STJUMP COMP.STCOPY COMP.STPOP COMP.STCONST) +ENCAPSULATEDOBJ.DISPLAYFN (RELMOVETO MOVETO printout RELDRAWTO) TEDIT.REDO.INSERTION ( +TEDIT.PROMPTPRINT RETFROM \INSERTPIECE \TEDIT.DIFFUSE.PARALOOKS \FIXILINES TEDIT.UPDATE.SCREEN +\TEDIT.SET.SEL.LOOKS \FIXSEL) SEDIT::COMPLETION (FIXEDITDATE PUTDEF CL:FUNCALL MARKASCHANGED) +ICMLARRAY.DETACHDISPLAY (DETACHWINDOW CLOSEW) CHCON (FRPLACD \MAPPNAME) BRH/LAYOUT (DECLARE BRH/OFFSET +) \CLEARCB (\CLEARWORDS) DWIMARKASCHANGED (SELECTQ) \MERGEFORWARD (DECLARE \DELETEBLOCK? +\ARRAYBLOCKMERGER) CLISPIFYRPLAC (CLISP4) SPY.NEXT.TREE (FREPLACEFIELD) \FTP.SENDVERSION (BOUT PRIN3 +.EOC.) DBG::FIND-DEBUGGER-STACK-FRAME (ERROR STKNTH RELSTK) \LINKBLOCK (\CHECKARRAYBLOCK DECLARE +\PUTBASEPTR) UNPACK (FRPLACD \MAPPNAME) \MERGEBACKWARD (DECLARE \CHECKARRAYBLOCK \DELETEBLOCK?) +CLISPLOOKUP0 (SHOULDNT) TCOMPL (COMPSET FRPLACD) \CLIPCURVELINE.IP (MOVETO.IP LINETO.IP) +\VANILLADISKINIT (SETCASEARRAY) COMP.VAL (OPT.CCHECK) TTPRIN1COMMENT (TTPRIN1) \LEAF.GETFILEINFO.OPEN +(RELEASE.PUP) \DELETEBLOCK? (DECLARE \PUTBASEPTR \MP.ERROR) BSPGETMARK (\BSP.CLEANUP.INPUT) +\BSP.HANDLE.ACK (RELEASE.PUP UNINTERRUPTABLY SENDPUP \ENQUEUE FREPLACEFIELD \TRANSMIT.STRATEGY +NOTIFY.EVENT \SETBSPTIMEOUT SETUPTIMER) CHAT.CLEAR.FROM.MENU (CLEARW TERM.RESET.DISPLAY.PARMS) PPBUFS +(TERPRI printout) \SPPGETERROR (printout PRINTPACKET TAB) EDITFROMFILE (DECLARE LOADFROM FRPLACD +LISPXPRIN1 LISPXSPACES LISPXPRIN2 LISPXTERPRI SI::RESETUNWIND) CLISPIFYCROPS1 (SELECTQ) IRM.LOAD-GRAPH + (CL:WARN) FILEWATCH (DECLARE FILEWATCH BLOCK FW-INTERACT) \FM.EDIT-INSERT (RELMOVETO SCROLLW DECLARE +BITBLT DSPDESTINATION PRIN1 \CARET.DOWN) \BSP.GETNEXTBUFFER (BSP.OUTPUT.ERROR) INTEGERLENGTH (.NEGATE. +) \VANILLAHOSTNAMEP (COREDEVICE \DEFINEDEVICE) CL:FIND-ALL-SYMBOLS (DECLARE CL:MAPHASH) \SFFixFont ( +\INVALIDATEDISPLAYCACHE) \LOCATE.NSNET (\RPLPTR WAKE.PROCESS BLOCK) DCHCON (DECLARE ADDTOSCRATCHLIST +RPLACD) \DSKOpenDevice (DECLARE OBTAIN.MONITORLOCK \DEFINEDEVICE SI::MONITOR-UNWIND) CLEARCLISPARRAY ( +DECLARE) \MEDW.SHAPEW (PROMPTPRINT) \MEDW.REDISPLAYW (PROMPTPRINT) \FLUSHNDBS (CL:FUNCALL DEL.PROCESS +\FLUSH.NDB.QUEUE) INITPUPLEVEL1 (TURN.OFF.ETHER DEL.PROCESS SELECTC \PUPLEVEL1STATE ASSURE.ETHER.ON) +SPY.MERGETREE (FREPLACEFIELD SPY.MERGE.CALLEES) \SFFIXLINELENGTH ( +\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD) \CHECKFORSTORAGEFULL (DECLARE \MP.ERROR \DORECLAIM +\PUTBASEFIXP \ADVANCE.STORAGE.STATE) \LFOpenDevice (DECLARE OBTAIN.MONITORLOCK \PFEnsureInitialized +\LFCloseDirectory SI::MONITOR-UNWIND) DASSEM.DWRITEFN (DASSEM.DPRINTLAP PRIN3 TERPRI \BOUT MAPC SPACES + BOUT DASSEM.DSTOREFNDEF) CL:APROPOS-LIST (\UPCASEBASE) ICMLARRAY.DOWINDOWCOMFN (SHAPEW APPLY*) +\TEDIT.STRIKEOUT.CARET.OFF (TEDIT.CARETLOOKS \TEDIT.SHOWCARETLOOKS) DUNPACK (DECLARE ADDTOSCRATCHLIST +RPLACD) CLISPDSUBST (MAP PUTHASH DWIMIFY1) \UFSOpenDevice (DECLARE OBTAIN.MONITORLOCK \DEFINEDEVICE +SI::MONITOR-UNWIND) CL:APROPOS (\UPCASEBASE) EXPRCHECK (ERROR ADDSPELL) COPYHASHFILE (DECLARE +MAPHASHFILE) SEDIT::DELETE-QUOTE (SEDIT::REPLACE-NODE) \FLUSH.PACKET.QUEUE (\RELEASE.ETHERPACKET) +\TEDIT.STRIKEOUT.CARET.ON (TEDIT.CARETLOOKS \TEDIT.SHOWCARETLOOKS) ALPHORDER (DECLARE) COURIER.OPEN ( +RESETSAVE SPP.DSTYPE printout TERPRI PUTWORD DECLARE SPP.SENDEOM SPP.CLOSE SPP.CLEAREOM) BLOCK ( +\MP.ERROR \PROC.RESUME \DECUSECOUNT DISMISS WINDOW.MOUSE.HANDLER MAPC) CASEARRAY (SETA) \SETBRUSH.IP ( +APPENDNUMBER.IP ISET.IP SETCOLOR.IP) BKLINBUF (\RESETLINE \OUTCHAR \INCPARENCOUNT CHECK \CLOSELINE) +\TEDIT.SEARCH.CODETABLE (MAPC) SPY.SUM (SORT) SEDIT::OUTPUT-CR (SEDIT::SET-LINEAR DECLARE SELECTQ +SEDIT::LINE-FINISHED SEDIT::REPAINT-NEW-LINE TEDIT.INSERT TEDIT.PARALOOKS) \PRIMARYTEXTURE (BITBLT) +TEDIT.MOVE (\DELETECH \FIXDLINES \TEDIT.INSERT.PIECES \TEDIT.HISTORYADD \FIXILINES +\TEDIT.CONVERT.TO.FORMATTED TEDIT.UPDATE.SCREEN \FIXSEL) DWIMUNSAVEDEF (LISPXPRIN2 LISPXPRIN1 +LISPXTERPRI) \NSFILING.RELEASE.BULKSTREAM (SPP.CLOSE RPLACD) FREEATTACHEDWINDOW (DETACHWINDOW RELMOVEW +) \CLOSELINE (\SETFILEPTR) \TEDIT.UNDERLINE.CARET.ON (TEDIT.CARETLOOKS \TEDIT.SHOWCARETLOOKS) +CONCATCODES (RPLCHARCODE) SPY.MERGE (CLRHASH MAPC) \SWAPDISKERROR (SELECTC RAID) \ACCHARWIDTHLIST ( +FRPLACD) PACKC (LISPERROR \PUTBASEFAT \PUTBASETHIN FREERESOURCE DECLARE) COURIER.WRITE.REP ( +COURIER.WRITE \BOUT) BSPFORCEOUTPUT (DECLARE OBTAIN.MONITORLOCK \BSP.SENDBUFFER SI::MONITOR-UNWIND) +SEDIT::INPUT-QUOTE (SEDIT::CLOSE-OPEN-NODE SEDIT::INSERT-QUOTED-GAP SEDIT::SET-SELECTION-ME +SEDIT::QUOTE-CURRENT-SELECTION SEDIT::SET-SELECTION-NOWHERE SEDIT::SET-POINT SEDIT::PENDING-DELETE +SEDIT::START-UNDO-BLOCK SEDIT::REPLACE-STRING SEDIT::END-UNDO-BLOCK) \READACFONTBOXES (SETFILEPTR +FRPLACD) \DSPTRANSLATE.PSC (POSTSCRIPT.SHOWACCUM MAPC) \RESETLINE (UNINTERRUPTABLY \SETFILEPTR) +\CARET.FLASH? (\CARET.DOWN SETUPTIMER) \GETFBB (MAPC) \COPYARRAYBLOCK (SELECTC FRPTQ \COPYCODEBLOCK +\BLT) CLEARBUF (\CLEARSYSBUF \RESETTERMINAL) DASSEM.DASSEM (DECLARE DASSEM.COUNTVARS RPLACA RPLNODE2 +RPLACD DASSEM.MATCHVARS RPLNODE FRPLACA CHECKRANGE OPT.RESOLVEJUMPS OPT.COMPILERERROR FRPTQ +DASSEM.DSTOREFN DASSEM.DASMBIND SHOULDNT HELP DASSEM.DWRITEFN) OPENPOSTSCRIPTSTREAM (printout DECLARE +PRIN1 PRINTOUT SI::RESETUNWIND MAPC POSTSCRIPT.OUTSTR \DSPFONT.PSC \SWITCHFONTS.PSC +POSTSCRIPT.SET-FAKE-LANDSCAPE \EXTERNALFORMAT POSTSCRIPT.STARTPAGE) \COPYCODEBLOCK (\BLT +\MAP-CODE-POINTERS \ADDREF) PACK (\ILLEGAL.ARG DECLARE RPLSTRING LISPERROR \PACK.ITEM FREERESOURCE) +COMP.GETBASEBITS (COMP.DELFN COMP.DELPUSH COMP.STCONST) DBG::DEBUGGER-MENU-HELP (TERPRI) COPYALL ( +RPLACD DECLARE MAPHASH FRPTQ) \PACK.ITEM (DECLARE) \MEDW.EXPANDW (\SHAPEW2 \OPENW1 \CLOSEW1 +WINDOWDELPROP DOUSERFNS) CLISPIFYCROPS0 (CLISP4) OPEN (STREAMPROP) \SAVELINEBUF (SELECTC \CLOSELINE +\SETFILEPTR \BINS) TB.UPDATE.DISPLAY (FREPLACEFIELD BITBLT TB.DISPLAY.LINES BLTSHADE) SEDIT::DELETE-LIST + (SEDIT::REPLACE-LIST) \ADVANCE.ARRAY.SEGMENTS (\MERGEBACKWARD) \TEDIT.INTERRUPT.SETUP ( +UNINTERRUPTABLY) TTY.PROCESS (\CHECKCARET FRPLACD UNINTERRUPTABLY CL:FUNCALL) \LFINITCASEARRAY ( +\PUTBASEBYTE) \FM.EDIT-PREPARETOEDIT (DECLARE WINDOWPROP DSPXPOSITION DSPYPOSITION) \3MBFLUSH (BLOCK) +\BSPINIT (DECLARE) \CREATESTARFONT (DECLARE) \PFTransferFilePage (WITH-RESOURCE MESASETQ ERROR +FREERESOURCE DECLARE \CLEARWORDS) \NEW.MKATOM (DECLARE) \READFONTWDFILE (DECLARE) \BYTELT (LISPERROR) +COPYHASHITEM (LOOKUPHASHFILE) SETDISPLAYHEIGHT (DECLARE HELP \ILLEGAL.ARG \PUTBASE) COMP.DELFIX ( +COMP.DELFN) CONVERT-LITATOM (\LITATOM.EATCHARS INTERN-LITATOM) \PAGEPAD.PRESS (SETFILEPTR \BOUT) +\BYTESETA (LISPERROR) \FAMILYCODE (SETFILEPTR SELECTQ) SEDIT::PLACE-CARET-AND-SELECTION ( +SEDIT::SET-SELECTION) INVERTW (DSPFILL) SET-PROFILE-INTERACTIVELY (FRPLACD) FB.ANALYZE.PATTERN ( +SELCHARQ FB.SETNEWPATTERN FB.SET.BROWSER.TITLE) TEDIT.FIND (\TEDIT.HISTORYADD FRPLACD) \WORDELT ( +LISPERROR) COMP.STFIX (COMP.DELPUSH) ONEDINSPECT.SELECTITEM (INSPECT.INVERTSELECTION +INSPECT.INVERTREGION) \LITATOM.EATCHARS (ERROR \PUTBASETHIN) \MEDW.SHRINKW (WINDOWADDFNPROP MOVEW +TOTOPW \CLOSEW1 OPENW) \LEAF.STRIP.QUOTES (FRPLACD) \LEAF.REPAIR.BROKEN.PUP (ERROR) INTERPRESSBITMAP ( +RELMOVETO PRIN1 SELECTQ ERROR \MOVETO.IP SHOWBITMAP.IP) CLISPACKUP (FRPLACD) \3MBWATCHER ( +\HANDLE.RAW.PACKET BLOCK) \FM.EDITSTART-SELECTEDFN (\FM.DISPLAYITEM DECLARE \FM.INSUREVISIBLE) +OLDFAULT1 (CL:CERROR) PAGEFULLFN (PRIN1 FRPTQ) UnixShellQuote (DECLARE RPLNODE) BRECOMPILE (DECLARE +RESETSAVE FRPLACD SELECTQ RETFROM PRIN1 COMPSET SETFILEPTR printout) MAKEBITTABLE (\ZEROBYTES CLRHASH +MAPC CHECK) TTNTHLINE (DECLARE) EXCHANGEXIPS (DISCARDXIPS SENDXIP \BACKGROUND) IRM.RESET (OPENW CLOSEW + CLOSEHASHFILE) TEDIT.SETSEL (\SHOWSEL \COPYSEL \TEDIT.SET.SEL.LOOKS TEDIT.RESET.EXTEND.PENDING.DELETE + \FIXSEL) INVERT.SEGMENT (DECLARE BLTSHADE) COMP.EXPR (DECLARE OPT.COMPILERERROR COMP.VAL COMP.STPOP +COMP.STRETURN COMP.STJUMP COMP.UNBOX) \NSFILING.HOSTNAMEP (\DEFINEDEVICE) \DSKDISPLAY.RESHAPEFN ( +\DSKDISPLAY.REPAINTFN) \NSINIT (MAPC \ADD.PACKET.FILTER \DEL.PACKET.FILTER DEL.PROCESS RESTART.PROCESS + ADD.PROCESS) SEDIT::OUTLINE-SELECTION (CL:FUNCALL) ASSURE.ETHER.ON (ERROR) TEDIT.SETFUNCTION ( +\SETSYNCODE CHECK) COMP.FMEMB (COMP.EXPR COMP.VAL1 COMP.DELPUSH) \BSP.HANDLE.INTERRUPT (FREPLACEFIELD +BSP.OTHERFN DECLARE SENDPUP) COMP.FIX (COMP.VAL1) \FM.EDIT-ITEM (DECLARE FM.CHANGELABEL GETMOUSESTATE +\TTYBACKGROUND SELECTQ \FM.EDIT-MOVECARET \FM.EDIT-DELETE \CARET.DOWN \FM.MENUHANDLER BLOCK +FM.SKIPNEXT \FM.EDIT-BACKUP \FM.EDIT-WORDDELETE \FM.EDIT-INSERT) \BCPLSOUT.PRESS (\BOUT) +FB.CHECK.NAME.LENGTH (RPLACD) PLAYTUNE (CL:UNWIND-PROTECT BEEPON BEEPOFF BLOCK) \SHOW.ARRAY.FREELISTS +(\CLEARCELLS FREPLACEFIELD printout TAB PRINTNUM) DETACHALLWINDOWS (REMOVEPROMPTWINDOW DETACHWINDOW) +FILEPOS (LISPERROR \SETFILEPTR) \ACCHARPOSLIST (SETFILEPTR FRPLACD) \M44DOEXTENDVMEMFILE (SHOULDNT +\PUTBASE \DISKERROR \EXTENDISFMAP) SHRIEKIFY (SELECTQ CLISP4 SHRKFY) SHOW.PRESS (\BOUT) XTOUSTRING ( +RPLCHARCODE SHOULDNT) CLISPFORVARS1 (CLISPFORVARS1) \STREAMCHARWIDTH (DECLARE CHECK) +\BSP.HANDLE.INTERRUPTREPLY (FREPLACEFIELD NOTIFY.EVENT BSPHELP) \EXTENDISFMAP (\PUTBASE) +\NSFILING.CLOSE.BULKSTREAM (CLOSEF) REMOVEPROMPTWINDOW (WINDOWDELPROP DETACHWINDOW) +\TEDIT.UNPARSE.PARALOOKS.LIST (SELECTQ SHOULDNT) \TEDIT.SUPERSCRIPT.CARET (TEDIT.CARETLOOKS +\TEDIT.SHOWCARETLOOKS) FTPPRINTCODE (PRIN1 PRINTCONSTANT PRINTNUM) \FM.EDITSTART-SETUP (DECLARE) +\NSFILING.ERRORHANDLER (BLOCK RETFROM printout TERPRI UNINTERRUPTABLY) FFILEPOS (LISPERROR \SETFILEPTR + \SETUP.FFILEPOS \DECFILEPTR FREERESOURCE DECLARE) \COURIER.WHENCLOSED (TAB PRIN1) \PARSEARRAYSPACE1 ( +\CHECKARRAYBLOCK APPLY* DECLARE) \SETUP.FFILEPOS (PUTBASE PUTBASEBYTE) COMP.NUMBERCALL (COMP.EXPR +FRPTQ COMP.VAL COMP.DELFIX COMP.STCONST COMP.DELPUSH) C.FLOATBOX (COMP.VAL1) CHANGEBACKGROUNDBORDER ( +SELECTC \DoveDisplay.SetBorderPattern) SI::CLEAR-CLOSURE-CACHE (XCL::IMPLICIT-KEY-MAP-HASH) +TEDIT.GETFUNCTION (DECLARE CHECK) COMP.GETD (COMP.VAL1 COMP.STPOP) \CHDEL1 (\SETEOFPTR) +\BSP.HANDLE.ERROR (SELECTC FREPLACEFIELD \RTP.ACTION DECLARE) \FILLRTPPUP (\SETRTPPORTS) +POSTINITARRAYS (printout PRIN1 TAB HELP \LINKBLOCK SETQ.NOREF \MAKEMDSENTRY) SCALE/GRAPH ( +SET/LABEL/SIZE) \ECHOCHAR (\OUTCHAR) \INITIALIZESWAPDISK (\BLT \PUTBASEPTR) +COMPILER::COMPILE-SCAN-DEFINE-FILE-INFO (DECLARE) TB.PRINT.LINE (MOVETO POSITION CL:FUNCALL +TB.SHOW.SELECTION) PSCFONT.READFONT (SETA CLOSEF) EXPANDING-PAGEFULLFN (SHAPEW) +\TEDIT.GET.TERMSA.WIDTHS (\WORDSETA DECLARE CHECK) SPY.MAX (MAPC) SEDIT::INPUT-DOT (SEDIT::DOT-THIS-LIST +) ICONW.TITLE (\ICONW.SHOW.TITLE \ICONW.REPAINTFN) COMP.STCOPY (OPT.CCHECK) \INTERPRETER1 ( +UNINTERRUPTABLY SETSTKNAME-RAW SETSTKNTOFFSET-RAW \PUTBASEPTR) CARETRATE (SETUPTIMER) \BSP.TIMERFN ( +\SEND.ACK SENDPUP SETUPTIMER FREPLACEFIELD) SEARCHPRETTYTYPELST (/SETTOPVAL) DINFO.TITLEMENUFN ( +DINFO.ADD.FMENU FLASHWINDOW) \SMASHLINK (\INCUSECOUNT \DECUSECOUNT) COMP.NUMERIC (SELECTQ COMP.EXPR +FRPTQ COMP.DELFIX COMP.DELFN COMP.DELPUSH COMP.STFIX) \GETCHAR (\ECHOCHAR) MSCLOSEFILES (CLOSEF) +\TEDIT.COPYINSERTFN (TEDIT.INSERT TEDIT.INSERT.OBJECT) \ENTITYEND.PRESS (\FIXPOUT \WOUT DECLARE) +\FILLBUFFER (DECLARE \RESETLINE \ECHOCHAR \LINEBUFBOUT CHECK \OUTCHAR \SETEOFPTR UNINTERRUPTABLY +\SETFILEPTR \FILLBUFFER.BACKUP \CLOSELINE SHOULDNT) BCOMPL (DECLARE) TWODINSPECT.DOWINDOWCOMFN ( +SELECTQ SHAPEW APPLY*) \STARTDISPLAY (UPDATESCREENDIMENSIONS \MOVE.WINDOWS.ONTO.SCREEN MAPC +\UPDATE.PBT.RASTERWIDTHS UNINTERRUPTABLY SHOWDISPLAY CHANGEBACKGROUND) SEDIT::EDIT-HELP ( +SEDIT::CLOSE-OPEN-NODE printout TERPRI) \FILLBUFFER.WORDSEPRP (CHECK) \TEDIT.UNDERLINE.CARET.OFF ( +TEDIT.CARETLOOKS \TEDIT.SHOWCARETLOOKS) CL::%%RATIO-PRINT (PRIN1 .SPACECHECK. DECLARE \SOUT) +\MEDW.MOVEW (PROMPTPRINT TOTOPW UNINTERRUPTABLY .WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN \INSURETOPWDS +DECLARE \SW2BM \SOFTCURSORUPCURRENT REDISPLAYW DOUSERFNS) \INTERPRETER-LAMBDA (DECLARE) +\FM.DISPLAY-SETUP (DECLARE) \TIME.NOT.SET (TERPRI) UPDATE/SCROLL/REG (CLOSEW) DESCRIBE-VIRTUAL-MEMORY +(printout CL:FORMAT) FB.HANDLE.ABORT.BUTTON (SHADEITEM) NEWFAULT1 (RETAPPLY RETEVAL) CHARWIDTH ( +\ILLEGAL.ARG DECLARE) ICMLARRAY.DISPLAYSLICE (FRPLACD) FAULTAPPLY (DECLARE PUTD PUTHASH) +COMP.COMPARENUM (COMP.EXPR COMP.DELFIX COMP.DELPUSH COMP.VAL1 COMP.VAL) DSPBACKUP (\CHECKCARET +DSPXPOSITION BITBLT) COMPILER::TEST-ALPHA-2 (DECLARE) DBG::RELEASE-DEBUGGER-WINDOW (RELSTK \CARET.DOWN + WINDOWDELPROP) \UNPACKDATE (CL:MULTIPLE-VALUE-SETQ) BRECOMPILE3 (SETFILEPTR ERROR) CL::%%COMPLEX-PRINT + (.SPACECHECK. \OUTCHAR \PRINDATUM) \CreateScreenBitMap (DECLARE \NEWPAGE) TB.CLOSE/SHRINK (TB.PROCESS + TB.FINISH.CLOSE printout TERPRI) VIDEOCOLOR (DECLARE SELECTC DOVE.XOR.CURSOR SETSCREENCOLOR) +\SETUP-COMPILED-CLOSURE-CALL (\BLT FREPLACEFIELD \MAKEFREEBLOCK FRPTQ \PUTBASE CHECK RPTQ) +\TEDIT.FORMATTEDP1 (SETFILEPTR) \STOPSCROLL? (DECLARE) \PRINTFMAP (CL:FORMAT) \FILLINSPP (\BLT) +\CoerceToDisplayDevice (DECLARE) \LEAF.USE.NEW.CONNECTION (SELECTC printout PRIN1 MAPC ADD.PROCESS) +\POSTSCRIPT.NSHASH (PUTHASH) MAKEKEYLST (FRPLACD) \MEDW.RELMOVEW (MOVEW) \FIXP.FROM.FLOATP ( +.FLOATUNBOX. SELECTC .NEGATE. .LLSH8. .LLSH1. .LRSH8. FRPTQ) FASL::DUMP-GENERAL-ARRAY (FASL::WRITE-OP +FASL::DUMP-ARRAY-DESCRIPTOR FASL:DUMP-VALUE) CLISPFOR2 (MAP) \CURSOR.DEFPRINT (PRIN4) PROMPTPRINT ( +CLRPROMPT PRIN1) CL::%%COMPLEX-ABS (DECLARE) \NSFILING.WHENCLOSED (\NSRANDOM.ENSURE.WATCHER) MAKEFILES + (DECLARE UPDATEFILES ADDTOFILES? LISPXPRIN2 LISPXPRIN1 LISPXTERPRI FRPLACD SI::RESETUNWIND) +\IDATESCANTOKEN (DECLARE FRPLACD) \DSCCOUT (CHECK RPTQ) ARGLIST (ERROR) \DSPFONT.IP (SHOW.IP +APPENDINTEGER.IP APPENDOP.IP \CHANGECHARSET.IP \FIXLINELENGTH.IP \MOVETO.IP) CL:/= (CL:ERROR) +\PROMPTWINDOW.SET.HEIGHT (RELMOVEW) \CREATEDISPLAY (\DEFINEDEVICE) WFROMDS (DECLARE +\CREATE.TTYDISPLAYSTREAM) FB.EDITLISPFILE (FB.PROMPTW.FORMAT EXEC-EVAL RESETFORM) CLISPFOR0A (DECLARE) + ASKUSEREXPLAIN (ASKUSERSETUP ASKUSEREXPLAIN) \DSPLINEFEED.PRESS (\ILLEGAL.ARG) COMP.SHIFT (COMP.VAL +COMP.DELFIX COMPERROR COMP.DELPUSH) \FTP.UNPACKFILENAME (MAP) \FREESTACKBLOCK (CHECK \MP.ERROR +\MAKEFREEBLOCK) DISPLAYNODELINKS (DISPLAYLINK) ONEDINSPECT.REDISPLAY (WITH-INSPECTOR-ENV BITBLT ONEDINSPECT.PRINTELEMENT ONEDINSPECT.ADJUSTSELECTION ONEDINSPECT.MAKEREGIONS DSPRESET -ONEDINSPECT.REPAINTFN) \\MEDW.EXPANDW (\\SHAPEW2 \\OPENW1 \\CLOSEW1 WINDOWDELPROP DOUSERFNS) -RELEASINGVMEMPAGE (FREPLACEFIELD) BRKDWNRESULTS2 (LISPXPRIN2 LISPXTAB LISPXTERPRI) BRHL/MOVE/RIGHT ( -DECLARE ERROR BRHL/MOVE/RIGHT) \\RECLAIMCODEBLOCK (\\DELREF \\MAP-CODE-POINTERS) \\SOFTCURSORDOWN ( -\\PUTBASE \\SOFTCURSORPILOTBITBLT) C.FLOATBOX (COMP.VAL1) MSPATHS (PRINTOUT PRIN1 MAPC TAB DECLARE -DASHES MSPATHS1 SI::RESETUNWIND CLRHASH) \\CLEARSYSBUF (DECLARE) GRAPHADDLINK (APPLY*) -FB.INSERT.SUBDIRECTORIES (DECLARE ATTACH) MB.NWAYMENU.NEWBUTTON (TEDIT.INSERT.OBJECT TEDIT.INSERT -TEDIT.LOOKS) \\TEDIT.GET.CHARLOOKS (FREPLACEFIELD) PFI.MERGE.INDICES (RPLACA FRPLACD) CL:VALUES ( -SELECTC SELECTQ DECLARE UNINTERRUPTABLY \\SIMULATE.UNBIND FRPLACD) SEDIT::CREATE-GAP-NODE ( -FREPLACEFIELD) \\RECLAIMARRAYBLOCK (\\MP.ERROR SELECTC DECLARE \\RPLPTR \\MERGEFORWARD) CREATEHASHFILE - (PRINTPTR) FB.INSERT.FILE (DECLARE TB.INSERT.ITEM FB.INSERT.DIRECTORY) COMP.VAR (COMP.STVAR) -OPT.SCANOPT (OPT.CCHECK OPT.PRDEL MAPC RPTQ) IBLT1 (\\PUTBASEBITS) COMPILER::EFFECTS-ANALYZE-LAMBDA ( -COMPILER::EFFECTS-ANALYZE) \\PROCESS.INIT (\\DEFINEDEVICE \\LOCKFN /PUTD MOVD) \\DRAWELLIPSE.PRESS ( -\\DRAWCURVE.PRESS MOVETO) COMPEM (PRIN1 SPACES TERPRI) \\PFI.DO.HARDCOPY (DECLARE OBTAIN.MONITORLOCK -RELEASE.MONITORLOCK APPLY SI::MONITOR-UNWIND) \\TTYBACKGROUND (WAIT.FOR.TTY MAPC) \\WRITEPRESSBITMAP ( -SHOW.PRESS \\ENTITYEND.PRESS \\ENTITYSTART.PRESS SETXY.PRESS \\WOUT DECLARE \\BOUTS \\FIXPOUT) -WAIT.FOR.TTY (SPAWN.MOUSE \\GETSTREAM OPENW AWAIT.EVENT) SPYOBJ.DISPLAY (DSPFONT RELMOVETO) -\\DRAWCURVE.PRESS (SHOW.PRESS \\PRESSCURVE2 SETXY.PRESS) \\PROCESS.EVENTFN (DEL.PROCESS -SUSPEND.PROCESS \\SUSPEND.PROCESS) XIPAPPEND.CELL (ERROR FREPLACEFIELD \\PUTBASE) NESTED.SUBMENU ( -PUTMENUPROP) CONVERT.FILE.TO.TYPE.FOR.PRINTER (APPLY* RESETSAVE) \\TEDIT.INSPECTCODE (APPLY* -TEDIT.SETSEL TEDIT.NORMALIZECARET WINDOWPROP) COMP.CONST (COMP.STJUMP) \\WAIT.FOR.TTY (AWAIT.EVENT) -\\SPP.INFO.HOOK (DECLARE DSPFONT CLEARW PPSPP) \\GETKEY (DECLARE FREPLACEFIELD WAIT.FOR.TTY \\CLOCK0 -\\BOXIPLUS \\TTYBACKGROUND \\WAIT.FOR.TTY FREERESOURCE) \\PUTBASEBITS (DECLARE) COMPILER::META-EVAL-MV-PROG1 - (COMPILER::MEVAL COMPILER::REMOVE-NESTED-PROGNS) CHARSET (\\ILLEGAL.ARG IMAGEOP) COMP.USERFN (DECLARE -) PRINTROUTINGTABLE (SELECTQ \\CHECK.ROUTING.TABLE PRIN1 FLUSHRIGHT TAB MAPC SPACES -\\NSADDRESS.PRINT.DECIMAL PRIN3) OPT.SETUPOPT (SELECTQ FRPLACA NCONC1 RPLACA PUTHASH) \\CHECKAPPLY* ( -\\PUTD) \\CDR.UFN (\\CALLME) \\NSFILING.GETFILEINFO (DECLARE) CL::VALUES-LIST-UFN (SELECTC SELECTQ -DECLARE UNINTERRUPTABLY \\SIMULATE.UNBIND SI::UNWIND) OLDFAULT1 (CL:CERROR) \\FM.RESHAPEFN ( -\\FM.ENDEDIT \\FM.TRANSPOSEHORZ \\FM.TRANSPOSEVERT \\FM.UPDATEGROUPEXTENT \\FM.UNSCROLLWINDOW) -\\HARDRETURN (\\CONTEXTSWITCH) CLOSEW (WINDOWOP) \\FM.REDISPLAYMENU (\\FM.RESETCLIPPINGREGION -\\FM.FILLWINDOW) |\\VFMInit| (DECLARE OBTAIN.MONITORLOCK |\\VFMClearIntervals| SI::MONITOR-UNWIND) -\\ENQUEUE.TIMER (\\BOXIPLUS FREPLACEFIELD) FB.SORTCOMMAND (FB.PROMPTW.FORMAT FREPLACEFIELD -FB.SET.DEFAULT.NAME.WIDTH MAPC FB.MAYBE.WIDEN.NAMES FB.INSERT.SUBDIRECTORIES FB.HEADINGW.DISPLAY -TB.REPLACE.ITEMS FB.PROMPTWPRINT) MB.NWAYBUTTON.SELFN (BITBLT) \\RPLPTR.UFN (\\ADDREF \\DELREF -\\PUTBASEBYTE \\PUTBASE) COMPILER:OPTIMIZE-AND-MACROEXPAND (CL:MULTIPLE-VALUE-SETQ) MAKEFILES (DECLARE - UPDATEFILES ADDTOFILES? LISPXPRIN2 LISPXPRIN1 LISPXTERPRI FRPLACD SI::RESETUNWIND) \\KEYBOARDINIT ( -DECLARE FREPLACEFIELD MOUSECHORDWAIT) \\COURIER.PUTDEF (MARKASCHANGED EXEC-FORMAT /PUTHASH) OPEN ( -STREAMPROP) TRACKW (GETMOUSESTATE MOVEW) \\SIMULATE.UNBIND (\\PUTBASE \\MAKEFREEBLOCK CHECK) -\\MEDW.SHRINKW (WINDOWADDFNPROP MOVEW TOTOPW \\CLOSEW1 OPENW) BRKDWNFORM (MAPC HELP TCONC ADD1VAR) -MOUSECHORDWAIT (DECLARE) \\PROC.AFTER.WINDOWWORLD (FREPLACEFIELD WINDOWPROP ADD.PROCESS) -CL::%PRINT-TIMING-INFO (CL::%PRINT-TIMING-ITEM) \\ALLOCLOCKED (\\LOCKCELL) \\PEEKSYSBUF (BLOCK) SEDIT::UNDO - (SEDIT::CLOSE-OPEN-NODE FREPLACEFIELD SEDIT::SET-SELECTION-NOWHERE SEDIT::SET-POINT-NOWHERE -SEDIT::UNDO-EVENT |printout| TERPRI) CL::VALUES-UFN (SELECTC SELECTQ DECLARE FRPLACD UNINTERRUPTABLY -\\SIMULATE.UNBIND SI::UNWIND) COMP.TRYUSERFN (COMPERRM) SEARCHPRETTYTYPELST (/SETTOPVAL) OPT.POSTOPT ( -MAPC OPT.SETUPOPT OPT.SCANOPT OPT.JUMPOPT OPT.RETOPT OPT.CCHECK OPT.XVARSCAN BLOCK) SEDIT::BUILD-WINDOW - (GETPROMPTWINDOW FREPLACEFIELD WYOFFSET DSPLINEFEED) \\DO.PARAMS.AT.OPEN (DECLARE SETFILEINFO CHARSET - \\EXTERNALFORMAT CONVHANKAKU FREPLACEFIELD) \\FM.OPENFN (\\FM.INSUREWINDOW) \\DRAWLINE.PRESS ( -DRAWDASHEDLINE \\DRAWCURVE.PRESS) XIPAPPEND.STRING (\\PUTBASE FREPLACEFIELD) BLOCKCOMPILE1 (COMPEM -TERPRI MAPC SAVEDEF /PUTD) /RPLNODE (UNDOSAVE FRPLACA) \\SETGLOBALVAL.UFN (DECLARE) SETFILEINFO ( -\\EXTERNALFORMAT) \\INSPECT/CODE/REPAINTFN (MOVETO PRINTCODE) INSPECTABLEFIELDNAMES (FRPLACD) -\\CAR.UFN (\\CALLME) WRITE-UNICODE-MAPPING (FRPLACD PRINTOUT CL:MULTIPLE-VALUE-SETQ) \\UNWIND.UFN ( -\\PUTBASE FREPLACEFIELD \\MAKEFREEBLOCK \\SLOWRETURN) \\PRINTSTK (PRINTNUM PRIN1) \\RESHOWBORDER1 ( -.WHILE.TOP.DS. \\PUTBASE \\SOFTCURSORDOWN \\INSURETOPWDS DECLARE \\SW2BM FREPLACEFIELD -UPDATE/SCROLL/REG SHOWWFRAME BITBLT \\SOFTCURSORUPCURRENT) BREAK.PROCESS (\\DOHELPINTERRUPT1 -\\PROCESS.MAKEFRAME) \\TFBRAVO.SPREAD.LOOKS (DECLARE MAPC) \\ROUTINGTABLE.INFOHOOK ( -\\CHECK.ROUTING.TABLE WINDOWADDPROP CLEARW PRINTROUTINGTABLE DSPFONT) FUNCTIONSMSGETDEF (SETTEMPLATE) -BRHL/LAYOUT (DECLARE) PACKFILENAME (DECLARE \\ILLEGAL.ARG MAP) TOGGLE/SIDESFLG (DSPFILL) -\\NSRANDOM.CLOSEFILE (RESETLST OBTAIN.MONITORLOCK \\CLEARMAP \\NSRANDOM.TRUNCATEFILE -\\NSRANDOM.RELEASE.HANDLE \\GENERIC-UNREGISTER-STREAM \\SETACCESS) MB.MARGINBAR.SIZEFN (IMAGEOBJPROP) -BRECOMPILE1 (BRECOMPILE1 PRIN2 PRIN1 OUTPUT COMPEM COMPILE1) \\NSPRINT.WATCHDOG (BLOCK MAP) -SEDIT::STRINGWIDTH (DECLARE) \\TEXTOPENF-SUBTREE (\\TEDIT.REOPEN.STREAM) CLISPFORVARS1 (CLISPFORVARS1) - MAPFILES1 (CL:FUNCALL CL:APPLY) \\HANDLE.RAW.3TO10 (\\MAYBEPRINTPACKET SELECTC \\BLT \\NOTE.3TO10 -FREPLACEFIELD ENCAPSULATE.ETHERPACKET PRINT3TO10 TRANSMIT.ETHERPACKET \\RELEASE.ETHERPACKET) -PAINTW.SHADE.LABEL (BLTSHADE) TEDIT.SCAN.LINE (\\FORMATLINE DECLARE \\TEDIT.CHECK FREPLACEFIELD -\\TEDIT.SELECT.CHARACTER RPLACA) IBLT2 (\\PUTBASEBITS) KEYACTION (\\ILLEGAL.ARG) MENU (DECLARE \\DTEST - TOTOPW GETMOUSESTATE) \\MEDW.RELMOVEW (MOVEW) TEDIT.CREATEW (CLRPROMPT |printout| PRIN1 -GETPROMPTWINDOW) BRHC/OFFSET (DECLARE MAPC) CL:SUBSTITUTE (CL:ERROR) \\CREATECELL (RAID) -\\NSFILING.SETFILEINFO (DECLARE |printout| TERPRI) DEFAULT.INSPECTW.VALUECOMMANDFN (|printout| TERPRI -GETMOUSESTATE) BRKDWN1 (BRKDWNCOMPILE2 MAPC SETA RPLACD RPLACA) ADD/AND/DISPLAY/LINK (|printout| PRIN1 - GRAPHADDLINK DISPLAYLINK) \\PAGED.REVALIDATEFILELST (SELECTQ MAPC \\SETACCESS SHOULDNT -\\PRINT-REVALIDATION-RESULT) CLISPFOR2 (MAP) \\REVALIDATEFILE (FREPLACEFIELD) \\CLEAR.ROUTING.TABLE ( -\\RPLPTR) \\SPP.HANDLE.INPUT (FREPLACEFIELD SELECTC \\RELEASE.ETHERPACKET APPLY* \\SPPSENDERROR -\\SPP.ESTABLISH \\SPP.RELEASE.ACKED.PACKETS NOTIFY.EVENT RELEASE.XIP \\SPP.HANDLE.DATA -\\SPP.HANDLE.ATTN) COMPILEFILES0 (MAKEFILE1) REMPROP (ERRORX FRPLACD SETPROPLIST) FORGETPAGES ( -FREPLACEFIELD \\RELEASEBUFFER) TTRACKMOUSE (DECLARE GETMOUSESTATE \\TTYBACKGROUND) \\UNQUEUE.TIMER ( -FREPLACEFIELD ERROR) \\MISCN.UFN (DECLARE \\INIT-MISCN-TABLE FREPLACEFIELD) FIND.START.OF.WORD ( -DECLARE CHECK) \\CHECK.PQUEUE (|printout| PRIN1 DECLARE SI::RESETUNWIND) XIPAPPEND.WORD (ERROR -FREPLACEFIELD \\PUTBASE) SETF-MACRO-FUNCTION (SELECTQ PUTD) \\CONS.UFN (RAID FREPLACEFIELD \\ADDREF -|\\StatsAdd1| DECLARE \\PUTBASE .INCREMENT.ALLOCATION.COUNT. CHECK \\PUTBASEPTR \\DELREF) \\RPLACD.UFN - (FREPLACEFIELD \\DELREF \\ADDREF CHECK \\PUTBASEPTR DECLARE) CL:TANH (DECLARE) \\OPENFILE ( -\\DO.PARAMS.AT.OPEN \\SETACCESS FREPLACEFIELD) UNMAKEHARDCOPYMODESTREAM (DECLARE FREPLACEFIELD -DSPXPOSITION DSPYPOSITION DSPRIGHTMARGIN) BITBLT.INSERT (BITBLT) \\KEYBOARDEVENTFN (DECLARE MAPC) -PPROC1 (|printout| TAB TERPRI) MB.MARGINBAR.TABTRACK (GETMOUSESTATE MB.MARGINBAR.SHOWTAB) -\\SCALEDBITBLT.IP (\\MOVETO.IP SHOWBITMAP.IP) CL:WRITE-LINE (CL:TERPRI) PPROC (|printout| PRIN1 -FLUSHRIGHT TAB) \\PROCESS.MAKEFRAME0 (CHECK) \\SAVESYSBUF (DECLARE FREPLACEFIELD MAPC) -SEDIT::UNDO-ATOM-CHANGE (SEDIT::UNDO-BY SEDIT::SUBNODE-CHANGED) CL:UNREAD-CHAR (DECLARE) -FB.CANONICAL.DIRECTORY (WINDOWPROP) PUTPROP (ERRORX FRPLACD FRPLACA SETPROPLIST) \\RPLACA.UFN ( -FREPLACEFIELD \\DELREF \\ADDREF) FLUSHRIGHT (TAB) \\MEDW.MOVEW (PROMPTPRINT TOTOPW UNINTERRUPTABLY -.WHILE.TOP.DS. \\PUTBASE \\SOFTCURSORDOWN \\INSURETOPWDS DECLARE \\SW2BM \\SOFTCURSORUPCURRENT -FREPLACEFIELD REDISPLAYW DOUSERFNS) \\PAGED.REVALIDATEFILE (FREPLACEFIELD) LINE.LESSP (\\GETLINEORIGY -\\GETLINEDIFFY) \\STKSCAN (DECLARE SELECTC) \\ENDPAGE.PRESS (SHOW.PRESS \\ENTITYEND.PRESS \\WOUT -COPYBYTES \\PARTEND.PRESS) BRKDWNCOMPILE2 (DECLARE SI::RESETUNWIND) \\DRAWCURVE.PRESS.LINE (SELECTQ -SETXY.PRESS SHOWRECTANGLE.PRESS) RESTOREMAP (DOPMAP \\RELEASEBUFFER FREPLACEFIELD) \\RESETKEYBOARD ( -\\SETIOPOINTERS \\PUTBASE DECLARE FREPLACEFIELD \\DAYTIME0) GETINTERRUPT (FRPLACD) SEDIT::GET-USER-STRING - (TERPRI) TWOD.TRACKCURSOR (TOTOPW GETMOUSESTATE) GETWINDOWPROP (\\ILLEGAL.ARG) \\TURN.ON.PROCESSES ( -MAPC RESETRESTORE PROCESSWORLD) \\RESTLIST.UFN (\\GC.HANDLEOVERFLOW) INTERRUPTCHAR (UNDOSAVE) -\\PROC.CODEFORTFRAME (\\CALLME CLEARSTK \\KEYBOARDON \\MP.ERROR INITIALEVALQT \\REPEATEDLYEVALQT) -\\TYPEGLOBALVARIABLE (PUTPROP) NEWFAULT1 (RETAPPLY RETEVAL) SEDIT::COPY-NODE (FREPLACEFIELD CL:FUNCALL -) \\BOUT (\\ILLEGAL.ARG) REHASHFILE (SPACES CLOSEHASHFILE) PPROCRESHAPEFN (DSPRIGHTMARGIN) -COMP.PROGLST (COMPERRM SELECTQ MAPC) \\TEDIT.ADJUST.LINES (BITBLT \\FILLWINDOW) COMP.UNBOX (COMP.DELFN - COMP.FLOATUNBOX HELP COMP.DELFIX COMP.STFN) INTCHAR (SELECTQ UNINTERRUPTABLY MAPC SETINTERRUPT) -WRITE-UNICODE-MAPPING-HEADER (MAPC) \\SPP.NOT.RESPONDING (\\SPP.PROBE TERPRI) FB.GREATEST.PREFIX ( -SELCHARQ) MULTIFILEINDEX1 (RPLACA CLOSEF) FB.EXPUNGECOMMAND (FB.PROMPTWPRINT FB.ALLOW.ABORT MAPC -FB.REMOVE.FILE FB.UPDATE.COUNTERS FB.PROMPTW.FORMAT) \\ENVCALL.UFN (FREPLACEFIELD \\CONTEXTSWITCH) -KEYACTIONTABLE (\\ILLEGAL.ARG FREPLACEFIELD MAPC) ONEDINSPECT.SCROLLFN (APPLY* SCROLLBYREPAINTFN) -\\SHAPEW2 (DECLARE \\ILLEGAL.ARG UNINTERRUPTABLY \\CLOSEW1 FREPLACEFIELD ADVISEWDS SHOWWFRAME -DOUSERFNS2) SCROLLBYREPAINTFN (BITBLT REDISPLAYW) \\TFBRAVO.WRITE.RUNS (DECLARE \\TFBRAVO.WRITE.RUN) -\\MEDW.CLOSEW (\\PUTBASE \\SOFTCURSORDOWN \\INSURETOPWDS DECLARE \\SW2BM FREPLACEFIELD -\\SOFTCURSORUPCURRENT) HASHLINKS (FRPLACD) \\BUFFERED.REVALIDATEFILELST (SELECTQ MAPC \\SETACCESS -\\PRINT-REVALIDATION-RESULT SHOULDNT) LISPXUSE1 (ERROR RPLACA) |ExtensionForPrintFileType| (DECLARE) -\\MENU.ITEM.SELECT (DECLARE) PPROCREPAINTFN (MOVETO DSPFILL PPROC CLEARW) SEDIT::NORMALIZE-SELECTION ( -SEDIT::COMPUTE-SELECTION-POSITION) SEDIT::TRANSLATE-CHARS (DECLARE) \\DRAWLINE.UFN (DECLARE -.DRAWLINEX. FREPLACEFIELD .DRAWLINEY.) \\PROCESS.MAKEFRAME (FREPLACEFIELD \\CONTEXTSWITCH -\\RUN.PROCESS) COPYGRAPH (FRPLACD) DBG::RELEASE-DEBUGGER-WINDOW (RELSTK \\CARET.DOWN WINDOWDELPROP) -COMP.UNBIND.VARS (OPT.CCHECK COMP.STUNBIND PUTHASH) FB.EDITCOMMAND (FB.ALLOW.ABORT FB.BROWSECOMMAND -FB.EDITCOMMAND.ONEFILE FB.FASTSEECOMMAND) MSSPLST (MAPHASH) EXTEND/TRANSITION/CHAIN (RPLACD) -\\FIXDLINES (FREPLACEFIELD \\TEDIT.FIXDELSEL) REMOVETONODES (FRPLACD) \\NSRANDOM.WRITEPAGES ( -\\NSRANDOM.FETCH.CACHE \\NSRANDOM.REESTABLISH \\NSRANDOM.TRUNCATEFILE \\NSRANDOM.HANDLE.ERROR -\\NSRANDOM.WROTE.HANDLE FREPLACEFIELD) \\SHOWTEXT (DSPFILL) COMP.UBFLOAT2 (COMP.VAL COMP.FLOATUNBOX -FRPTQ COMP.FLOATBOX) \\HTFIND (CHECK DECLARE \\GC.ENTER.BIGREFCNT \\MP.ERROR \\GC.MODIFY.BIGREFCNT -\\PUTBASEFIXP .GETLINK. \\DISABLEGC1 .DELLINK.) \\MAIKO.IO-INTERRUPT (FREPLACEFIELD CL:FUNCALL) -DELFROMCOM (MARKASCHANGED SAVESET /RPLACD /DREMOVE /RPLACA) CLISPFOR0A (DECLARE) -\\BUFFERED.REVALIDATEFILE (FREPLACEFIELD) \\NOFILESNEXTFILEFN (SELECTQ RPLACA) \\ARG0 (CHECK) -\\NSRANDOM.READPAGES (\\NSRANDOM.REESTABLISH \\CLEARBYTES \\BLT \\NSRANDOM.CHECK.CACHE) -\\DSPYPOSITION.IP (SHOW.IP SETY.IP) \\MAIKO.ETHER-INTERRUPT (FREPLACEFIELD UNINTERRUPTABLY DECLARE -OBTAIN.MONITORLOCK \\RCLK \\MAYBEPRINTPACKET \\HANDLE.RAW.PACKET SI::MONITOR-UNWIND) DELFROMCOM1 ( -SAVESET /RPLACD MARKASCHANGED) CLISPFOR1 (SELECTQ CLISPFORERR /RPLNODE DWIMIFY2 DWIMIFY1 CLISPRPLNODE -RPLACD CLISPFOR4 FRPLACA CLISPDSUBST) \\PRESSCURVE2 (\\ENTITYEND.PRESS \\ENTITYSTART.PRESS SETXY.PRESS - FREPLACEFIELD LOADPOLY \\VECPUT \\ENDVECRUN) FONTNAME.IP (DECLARE) \\INSPECT/CODE/RESHAPEFN ( -\\INSPECT/CODE/REPAINTFN) \\DOHELPINTERRUPT (FLASHWINDOW \\DOHELPINTERRUPT1) \\RPLCONS (\\ADDREF -\\DELREF CHECK FREPLACEFIELD \\PUTBASEPTR |\\StatsAdd1| DECLARE \\PUTBASE .INCREMENT.ALLOCATION.COUNT. - RPLACD) FULLNAME (SELECTQ \\ILLEGAL.ARG) SEDIT::REDO (SEDIT::SET-SELECTION-NOWHERE -SEDIT::SET-POINT-NOWHERE SEDIT::UNDO-EVENT FREPLACEFIELD |printout| TERPRI) TEDIT.SELECT.LINE.SCANNER -(SELECTQ RPLACA \\BACKFORMAT \\FIXSEL SHOULDNT) KNOTLOOP (MAPC) RESHAPEBYREPAINTFN (WXOFFSET WYOFFSET -REDISPLAYW BITBLT) COMP.BIND.VARS (MAPC COMP.EXPR COMP.VAL COMP.DELPUSH COMPERROR PUTHASH) -\\AGE.ROUTING.TABLE (\\CHECK.ROUTING.TABLE SETUPTIMER RPLACA \\RPLPTR) \\TEDIT.CREATEW.FROM.REGION ( -WINDOWPROP GETPROMPTWINDOW) SEDIT::GETKEY (DECLARE FREPLACEFIELD WAIT.FOR.TTY \\BACKGROUND) \\DELETECH - (\\TEDIT.CHECK \\DELETEPIECE UPDATEPCNODES HELP FRPLACD \\TEDIT.HISTORYADD MAPC APPLY* -\\TEDIT.DIFFUSE.PARALOOKS \\TEDIT.WINDOW.TITLE) \\RELEASE.IOCB (SELECTQ \\ILLEGAL.ARG FREPLACEFIELD) -DBG::CLOSE-DEBUGGER-WINDOW (\\CARET.DOWN PROCESS.APPLY) DWIM-SYMBOL-PACKAGE (FRPLACD) PFI.ENQUEUE ( -DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) \\DOHELPINTERRUPT1 (SPAWN.MOUSE CLEARBUF INTERRUPT) -NOSUCHATOM (|printout| PRIN1) \\MAIKO.CONSOLE-LOG-PRINT (FREPLACEFIELD FRESHLINE PRIN1) \\MOVETO.IP ( -SHOW.IP) \\DOINTERRUPTHERE (DECLARE SETERRORN FLASHWINDOW) \\PAGED.REVALIDATEFILES (SELECTQ MAPC -\\SETACCESS FDEVOP SHOULDNT \\PRINT-REVALIDATION-RESULT) PRETTYFILEINDEX (RESETSAVE -CL:MULTIPLE-VALUE-SETQ PRINTDEF PFCOPYBYTES PRINT-READER-ENVIRONMENT COPYBYTES PFI.SETUP.TRANSLATIONS -STREAMPROP) \\SPP.RETRANSMIT.NEXT (CHECK FREPLACEFIELD \\SPP.SENDPKT) CL::ESTABLISH-PREDICATE (REMHASH -) BITBLT.DELETE (BITBLT BITBLT.ERASE) FB.MAYBE.EXPUNGE (FB.PROMPTWPRINT) RESETKEYACTION (DECLARE -\\ILLEGAL.ARG \\BLT FREPLACEFIELD) GET-RIGHTW (DSPFONT) \\TFBRAVO.LCASER (MAP) \\TFBRAVO.EOLS ( -TEDIT.INSERT) \\MAP.ROUTING.TABLE (\\CHECK.ROUTING.TABLE MAPC) PPROCWINDOW (DSPRIGHTMARGIN) -\\SETPRINTLEVEL (DECLARE \\BOUT CLEARBUF PRIN3 SELCHARQ PRINTLEVEL BKSYSBUF) ADDMENU (\\ILLEGAL.ARG -BLTMENUIMAGE MOVEW SHOWSHADEDITEMS OPENW WINDOWADDPROP FREPLACEFIELD EXTENDEXTENT) RETRYSCAN (REMHASH -PRIN1 PRINT) SEDIT::COMPUTE-FORMATS-AND-FORMAT-VALUES (MAPC) SEDIT::VERIFY-STRUCTURE (DECLARE -OBTAIN.MONITORLOCK SEDIT::CLOSE-OPEN-NODE FREPLACEFIELD SEDIT::PARSE SEDIT::COMPUTE-ALL-FORMATS +ONEDINSPECT.REPAINTFN) CLEANUP (COMPILEFILES0) \MEDW.CLOSEW (\PUTBASE \SOFTCURSORDOWN \INSURETOPWDS +DECLARE \SW2BM \SOFTCURSORUPCURRENT) FW-UPDATE-OFD-WINDOWS (DECLARE) STOPNS (\DEL.PACKET.FILTER +DEL.PROCESS CLOSENSOCKET) COMPILER::GENCODE-TAGBODY-INLINE (COMPILER::SET-UP-RETURN-TO MAPC +COMPILER::TAKE-DOWN-RETURN-TO) CLISPELL (MAPC /RPLNODE) COMPILER::TEST-ALPHA (COMPILER::RELEASE-TREE) +\SETUP-ENVIRONMENT-CALL (\MAKEFREEBLOCK \BLT RPTQ \PUTBASEPTR \PUTBASE CHECK) CHECKTRAN (DECLARE) +MAKEALISTCOMS (LISPXPRINT FRPLACD) TEDIT.INSERT.OBJECT (TEDIT.DO.BLUEPENDINGDELETE \SHOWSEL +\INSERTPIECE APPLY* \TEDIT.HISTORYADD \FIXILINES TEDIT.UPDATE.SCREEN \FIXSEL \COPYSEL) \PUTBASEPTR ( +\PUTBASE) DISPLAYSTREAMINIT (DECLARE \STARTDISPLAY DSPDESTINATION TERMINAL-OUTPUT DSPYOFFSET +DSPYPOSITION DSPXOFFSET DSPCLIPPINGREGION DSPRIGHTMARGIN) ICMLARRAY.ATTACHDISPLAY (ATTACHWINDOW MAPC) +\RPLRIGHT (RPLCHARCODE) \LFExtendFile (UNINTERRUPTABLY \UPDATEOF) \ENTITYSTART.PRESS (DECLARE +SETXY.PRESS) SEDIT::SEDITL (DECLARE SEDIT:SEDIT) COLLECTKEYS (DECLARE MAPHASHFILE) \OUTDATE-STRING ( +RPLCHARCODE) \LEAF.READFILENAME (RELEASE.PUP) COMP.ST (OPT.CCHECK) \START.PROCESSES (\MP.ERROR +\PROC.RESUME \DECUSECOUNT) FTPPRINTMARK (printout TERPRI) COMPILER::TRANSFORM-GET/PUT-BASE ( +COMPILER::RELEASE-TREE) BSP.PUTINTERRUPT (DECLARE OBTAIN.MONITORLOCK \FILLBSPPUP \PUTBASE PUTPUPSTRING + SENDPUP \SETBSPTIMEOUT MONITOR.AWAIT.EVENT SI::MONITOR-UNWIND) CHAT.EMACS.MOVE (BOUT PRIN3 +FORCEOUTPUT) DRIBBLE (CLOSEF UNINTERRUPTABLY) DBG::CLOSE-DEBUGGER-WINDOW (\CARET.DOWN PROCESS.APPLY) +PROCESSWORLD (MAPC WINDOWPROP CURSOR FRPLACD \MAKE.PROCESS0 RETFROM RAID) CL:ATANH (DECLARE) +\COERCEASCIITONSFONT (FRESHLINE printout PRINTNUM SPACES \FSETWIDTH) ADD.PROCESS (\SET.PROCESS.NAME +UNINTERRUPTABLY \INVALIDATE.PROCESS.WINDOW \MAKE.PROCESS0 WINDOWPROP) \MEDW.OPENW (\PUTBASE +\SOFTCURSORDOWN \INSURETOPWDS DECLARE \SW2BM \SOFTCURSORUPCURRENT) CHANGEBACKGROUND (\ILLEGAL.ARG MAPC + BLTSHADE TILE) COMPILEUSERFN1 (DWIMIFY0) FB.CLOSEFN (PROMPTPRINT) PUTPROPS.PRETTYPRINT (PRIN2 PRIN1 +SPACES MAYBE.PRETTYPRINT.BOLD TERPRI) TRIM.BITMAP (HELP BITBLT) \RUN.PROCESS (ERROR UNINTERRUPTABLY +\UNQUEUE.EVENT \UNQUEUE.TIMER) NEWPAGE.IP (SELECTQ ENDPAGE.IP ENDPREAMBLE.IP BEGINPAGE.IP SCALE.IP +CONCATT.IP ROTATE.IP TRANSLATE.IP \DSPFONT.IP PRIN3 FGET.IP APPENDOP.IP SETXY.IP DSPFONT RELMOVETO +NEWLINE.IP SHOULDNT SETYREL.IP APPENDINTEGER.IP APPENDNUMBER.IP ISET.IP) \ICONW.SHOW.TITLE ( +ICONW.PRINT-JUSTIFIED BITBLT) SI::DISABLE-CLOSURE-CACHE (SI::CLEAR-CLOSURE-CACHE) CL:ASINH (DECLARE) +\3MBGETPACKET (\BLT HELP \BOXIPLUS \RCLK \MAYBEPRINTPACKET) \RPLPTR (\ADDREF \DELREF \PUTBASEBYTE +\PUTBASE) SEDIT::SEDITE (SEDIT:SEDIT) \MOVE.WINDOWS.ONTO.SCREEN (MOVEW) InstallUnixPrinter (DECLARE +PUTASSOC) KNOTLOOP (MAPC) CLISPFOR1 (SELECTQ CLISPFORERR /RPLNODE DWIMIFY2 DWIMIFY1 CLISPRPLNODE +RPLACD CLISPFOR4 FRPLACA CLISPDSUBST) SEDIT::GET-MENU (FM.RESETMENU WINDOWADDPROP WINDOWPROP +SEDIT::MENU-INIT-STATE) \RELEASE.PROCESS (CHECK \DECUSECOUNT \UNQUEUE.EVENT \UNQUEUE.TIMER REMHASH +\INVALIDATE.PROCESS.WINDOW WINDOWPROP) \FTP.OPENFILE.FROM.PLIST (\FTP.PRINTPLIST .EOC. SELECTC +\RELEASE.FTPCONNECTION FTPPUTCODE CLOSEBSPSTREAM \BSP.DECLARE.FILEPTR) FAULTEVAL (DECLARE PUTHASH) +UNMAKEMAINWINDOW (WINDOWDELPROP) \NSFILING.GET.STREAM (RPLACD FREPLACEFIELD RESETSAVE) \ADDLEAFSTRING +(ERROR \PUTBASE \PUTBASEBYTE \MOVEBYTES) DINFO.OPENTEXTSTREAM (TEDIT.KILL CLEARW RESETSAVE PRINTOUT) +FTPDEBUG (DSPFONT DSPSCROLL) \FILLBSPPUP (\SETRTPPORTS) CHAT.HOLD (TOTOPW UNINTERRUPTABLY +GETMOUSESTATE \BACKGROUND) SPY.UPDATE.TITLE (TOTOPW GETMOUSESTATE \BACKGROUND) COMPILEFILES0 ( +MAKEFILE1) PUTWINDOWPROP (\ILLEGAL.ARG) CLISPAND (CLISP4) SEDIT::INPUT-NORMAL-CHAR (printout DECLARE +TERPRI SELECTQ SEDIT::INSERT SEDIT::INSERT-STRING SHOULDNT) COMPEM (PRIN1 SPACES TERPRI) \LONUM ( +.UNBOX. SELECTC \ILLEGAL.ARG CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) \EVALFORMASLAMBDA (DECLARE) CL:ACOSH ( +DECLARE) SEDIT::UNDO-COMMENT-CHANGE (SEDIT::UNDO-BY RPLACA SEDIT::NOTE-CHANGE-IN-SIMPLE NCONC1 RPLACD) + \DSPSPACEFACTOR.PRESS (SHOW.PRESS \SETSPACE.PRESS) DISPLAYGRAPH (DSPRIGHTMARGIN MAPC) \HINUM (.UNBOX. + SELECTC \ILLEGAL.ARG CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) COMP.RPLACD (COMP.EXPR FRPTQ COMP.DELFN +COMP.STCONST COMP.VAL1 COMP.STCOPY COMP.ST) \TEDIT.ITALIC.CARET.ON (TEDIT.CARETLOOKS +\TEDIT.SHOWCARETLOOKS) \LINEBUF.EOFP (DECLARE) BLOCKCOMPILE1 (COMPEM TERPRI MAPC SAVEDEF /PUTD) APPLY +(DECLARE SELECTQ) ICMLARRAY.MENUW.SHOW (FM.CHANGELABEL) \3MBSENDPACKET (\MAYBEPRINTPACKET CL:CERROR +\BLT \WRITERAWPBI PRIN1 \REQUEUE.ETHERPACKET) APPLY* (DECLARE FRPLACD) /CNDIR (UNDOSAVE /SET) +SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::CLOSE-OPEN-NODE printout TERPRI SEDIT::PENDING-DELETE +SEDIT::INSERT CL:FORMAT RPLACD SEDIT::START-UNDO-BLOCK SEDIT::UNDO-BY SEDIT::END-UNDO-BLOCK) +PAINTW.SHADE.LABEL (BLTSHADE) LINEBUFFER-SKIPSEPRS (READCCODE) \NEXTCONSPAGE (CHECK) \CKAPPLYARGS ( +CHECK FRPTQ) \INSPECT/CODE/REPAINTFN (MOVETO PRINTCODE) \DSPRIGHTMARGIN.PRESS (\FIXLINELENGTH.PRESS) +CHAT.MENU (DECLARE \CHECKCARET SELECTQ APPLY*) TB.FIND.ITEM (\DTEST SELECTQ) CLISP4 (RETFROM RETEVAL) +RECORDTRAN (DWIMIFYREC DWIMIFY0? DECLARE CLISPTRAN) EDITFNS (SPACES) \MOUSE.PROCESS (DECLARE +PROCESS.RETURN \SET.PROCESS.NAME DEL.PROCESS WINDOW.MOUSE.HANDLER TTY.PROCESS BLOCK) +\PROMPTWINDOW.EXPAND (SHAPEW RPLACD) ICMLARRAY.MENUW.APPLY (FRPLACD DECLARE TERPRI +ICMLARRAY.DETACHDISPLAY) PRINTLINE (printout \SETUPGETCH PRINT) CLISPIF2 (/RPLNODE) SETXY.PRESS (\WOUT +) TTGIVEHELP1 (PRIN1 DECLARE) \MAIKO.CONS.UFN (RAID \ADDREF \StatsAdd1 DECLARE \PUTBASE +.CHECK.ALLOCATION.COUNT. CHECK FREPLACEFIELD \DELREF) \IRM.GET.REF (\IRM.GET.HASHFILE CLEARW PRINTOUT) + EVALV (\SMASHLINK RELSTK) \TEDIT.SUBSCRIPT.CARET (TEDIT.CARETLOOKS \TEDIT.SHOWCARETLOOKS) CL:CLOSE ( +CLOSEF) SEDIT::START-PROCESS (ADD.PROCESS) \BACKGROUND.PROCESS (MAPC BLOCK) \MEDW.CREATEW (DSPXOFFSET +DSPYOFFSET DSPCLIPPINGREGION ADVISEWDS MOVETOUPPERLEFT SHOWWFRAME OPENW) RELSTK (UNINTERRUPTABLY +\DECUSECOUNT) \TEDIT.INSPECTCODE (APPLY* TEDIT.SETSEL TEDIT.NORMALIZECARET WINDOWPROP) \SETSPACE.PRESS + (\WOUT DECLARE) POSTSCRIPT.FONTSAVAILABLE (FRPLACD) \TIMER.PROCESS (\RUN.PROCESS BLOCK) \SPP.SYSPKT ( +BLOCK) GRAPHDELETELINK (APPLY*) CL:COSH (DECLARE) COMP.DELPUSH (SUB1VAR) DINFO.FMW.CLOSEFN ( +DETACHWINDOW CLOSEW) \WRITE1 (DECLARE) \FM.NWAY-CHANGESTATE (\FM.TOGGLE-CHANGESTATE LISTPUT) +TB.DISPLAY.LINES (TB.PRINT.LINE) CL:COUNT (CL:ERROR) COURIERPROGRAM.PRETTYPRINT (PRIN1 PRIN2 SPACES +MAYBE.PRETTYPRINT.BOLD PRINENDLINE PRINTDEF) \SETVAR (\PUTBASEPTR \RPLPTR) COMP.LABELS (MAPC) +CL:COPY-READTABLE (RESETREADTABLE) BRECOMPILE1 (BRECOMPILE1 PRIN2 PRIN1 OUTPUT COMPEM COMPILE1) +\DEFINEDISPLAYINFO (DREMOVE) \LFExtendFileIfNecessary (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND +LISPERROR) INTERPRESSFILEP (RESETSAVE SETFILEPTR) DBG::CREATE-DEBUGGER-WINDOW (RELSTK) \IRM.SMART.REF +(FRPLACD PRINTOUT TERPRI) TWOD.TRACKCURSOR (TOTOPW GETMOUSESTATE) \SETFVARSLOT (ERROR) +TEDIT.DEACTIVATE.WINDOW (TEDIT.PROMPTPRINT CLEARW \SHOWSEL MAPC CLOSEF? WINDOWDELPROP +\TEDIT.INTERRUPT.SETUP GIVE.TTY.PROCESS DISMISS) SEDIT::EXPAND (printout TERPRI) \MOVETO.HCPYMODE ( +\DSPXPOSITION.HCPYMODE) CL:DECODE-FLOAT (CL::%%FLOAT-UNBOX) \REQUEUE.ETHERPACKET (SELECTQ +\RELEASE.ETHERPACKET UNINTERRUPTABLY \ENQUEUE) PROG (MAPC LISPERROR) COMPILEUSERFN (COMPILEUSERFN1 +PRIN1 PRINT) EDITCOMS (EDITCOM) \TEDIT.SHRINK.ICONCREATE (ICONTITLE) CL:DECODE-UNIVERSAL-TIME ( +CL:MULTIPLE-VALUE-SETQ) ENDCOLLECT (RPLACD) \TFBRAVO.WRITE.PARAGRAPH (\TFBRAVO.PARSE.PROFILE.PARA +\TFBRAVO.EOLS) \PROG0 (DECLARE PUTBASEPTR UNINTERRUPTABLY SETSTKNAME-RAW SETSTKNTOFFSET-RAW \EVAL) +UPDATECHANGED1 (printout PRIN1) \PROC.REPEATEDLYEVALQT (DECLARE \CALLME INITIALEVALQT TTYDISPLAYSTREAM + OUTPUT INPUT \RESETSYSTEMSTATE EVALQT) REATTACHPROMPTWINDOW (ATTACHWINDOW) FINDFILE-WITH-EXTENSIONS ( +MAP) \DSPLEFTMARGIN.PRESS (\FIXLINELENGTH.PRESS) DBG::REUSE-CURRENT-WINDOW (TERPRI) IRM.DISPLAY.REF ( +DECLARE TERPRI) GREETFILENAME (DECLARE) TEDIT.SHOWSEL (\FIXSEL \SHOWSEL) \ALLOCMDSPAGE (\MP.ERROR +\CHECKFORSTORAGEFULL UNLESSINEW \MAKEMDSENTRY) \NSFILING.EVENTFN (\CLEARMAP MAPC PRINTOUT PRIN1) +ICMLARRAY.MENUW.GETLEVEL (FRPLACD PRINTOUT RESETFORM DECLARE) TTY/EDITL (LISPXWATCH UNDOSAVE +SETATOMVAL ERROR!) CLISPFOR (SELECTQ DECLARE LISTPUT1 SI::RESETUNWIND UNDOSAVE UNDONLSETQ1) +\INVALIDATE.PROCESS.WINDOW (DSPFILL) \PERIODICALLY-WHO-LINE-SHOW-ACTIVE (DECLARE +\UPDATE-WHO-LINE-ACTIVE-FLAG) \EVPROG1 (DECLARE) DELETE/AND/DISPLAY/LINK (printout PRIN1 +GRAPHDELETELINK DISPLAYLINK) FW-RECALL-CMD (DECLARE FRPLACD PROMPTPRINT FW-UPDATE-OFD-WINDOW) +CL:DELETE-DUPLICATES (CL:ERROR) LASTN (DECLARE) \SMASHRETURN (\SMASHLINK) \INSPECT/CODE/RESHAPEFN ( +\INSPECT/CODE/REPAINTFN) \STOPDISPLAY (DECLARE UNINTERRUPTABLY SHOWDISPLAY \UNLOCKPAGES) +CreateCursorBitMap (\PUTBASE) DSPRUBOUTCHAR (\GETDISPLAYDATA) \TEDIT.READTABLE (\SETSYNCODE CHECK +TEDIT.SETFUNCTION) GO (STACKPUTBASEPTR \SMASHRETURN LISPERROR) EDITL0 (EDITCOMS TERPRI PRIN1 EDITL1) +CL:DIRECTORY (DECLARE FRPLACD) COMPILER::GENCODE-RETURN (COMPILER::GENCODE) \SPP.SENDPKT (HELP SENDXIP +) EVALA (MAPC LISPERROR) \TEXTMENU.SET.TOGGLE (ERROR IMAGEOBJPROP \TEDIT.REPAINTFN) \SET.PROCESS.NAME +(SELECTQ REMHASH PUTHASH) CLISP3C (DECLARE SI::RESETUNWIND FRPLACA) \EVALA (UNINTERRUPTABLY PUTBASEPTR + SETSTKNAME-RAW DECLARE SETSTKNTOFFSET-RAW) NUMBERPAD.READER.HANDLE.CHAR (\READNUMBER.FLASHAREA +DISPLAY/NUMBER/READER/TOTAL) DISPLAY/NUMBER/READER/TOTAL (DSPFILL RESETFORM) CHECKCONSPAGES (HELP) +WHO-LINE-SHOW-ACTIVE (DECLARE \UPDATE-WHO-LINE-ACTIVE-FLAG) INVERT.LONG.SEGMENT (INVERT.SEGMENT) +\PEEKNS (\PROMISCUOUS.OFF RPTQ BLOCK \PROMISCUOUS.ON) \MAPMDS (CHECK SPREADAPPLY*) +COURIER.WRITE.BULKDATA (PUTWORD DECLARE COURIER.WRITE) \DSPYPOSITION.HCPYMODE (UNINTERRUPTABLY +\INVALIDATEDISPLAYCACHE \ILLEGAL.ARG) \CHECKCONSPAGE (!CHECK DECLARE) PUTTEXTPROP (LISTPUT) EDITFB ( +LOADFNS LOADFROM PRINTOUT PRIN1) DASSEM.CLEANFNTEST (DECLARE) FTP.BREAKCONNECTION (MAPC FRPLACD) +SMASHFILECOMSLST (SELECTQ SMASHFILECOMSLST SET) CURSOR (DECLARE \CURSORDOWN \CURSORUP \ILLEGAL.ARG) +DRAWMARGINSCALE (DSPFILL SELECTQ BITBLT MOVETO PRIN1 RELDRAWTO) \ETHEREVENTFN (\SETETHERFLAGS +\SETLOCALNSNUMBERS \FLUSHNDBS \LOCKWORDS \NSINIT \STARTPUP \TIME.NOT.SET STOPNS \INIT.GATEWAY MAPC +\STASH.PASSWORDS) SEDIT::ASSIGN-FORMAT-LIST (SEDIT::SET-FORMAT) ERRORSET (DECLARE) TITLEDICONW ( +SELECTQ \ILLEGAL.ARG BLTSHADE WINDOWPROP \ICONW.SHOW.TITLE OPENW) OPT.OPTCHECK (MAPC SELECTQ) +CL::%%RATIONAL-FLOAT (CL::%%FLOAT-UNBOX) LOADUP (PRINTOUT PRIN1 DOFILESLOAD) \LFRemoveDirEntry ( +UNINTERRUPTABLY \SETFILEPTR \LFCheckBang) UNDOEDITL (MAP PRINT EDITSMASH UNDOSAVE) SPP.OPEN ( +OBTAIN.MONITORLOCK RESETSAVE MONITOR.AWAIT.EVENT \SPP.PROBE RELEASE.MONITORLOCK WAKE.PROCESS BLOCK MAP +) \PRINT-USING-DEFPRINT (DECLARE) CL::%%RATIONALIZE-FLOAT (CL::%%FLOAT-UNBOX .LLSH8.) \KEYHANDLER1 ( +\CONTEXTSWITCH \TRACKCURSOR FREPLACEFIELD \KEYBOARDOFF \BOXIPLUS) MSUPDATE (MSNLAMBDACHECK DECLARE +MSPRGDWIM PRIN1 MAPC SELECTQ MSSTOREDATA) \PRINSTACKP (.SPACECHECK. \SOUT \PRINTADDR \LITPRIN) +\MAYBEPRINTPACKET (PRIN1 PRINTPACKET BLOCK) DINFO.CREATE.FMENU (WINDOWPROP) \FM.NWAY-MOVEDFN (BLTSHADE +) CL:DESCRIBE (SI::DESCRIBE-INTERNAL) \PRINSTRING (.SPACECHECK. DECLARE) SETQ (DECLARE) +\TEST.CHARACTER.LOOKS (SETFILEPTR) SI::ERRORSET-PRINT-FUNCTION (DECLARE) COMP.TAGBODY (COMP.STBIND +MAPC COMP.EXPR) \CKPOSBOUT (.SPACECHECK.) \TEDIT.UCASE.SEL (TEDIT.DELETE TEDIT.INSERT TEDIT.SETSEL +TEDIT.NORMALIZECARET) LET (DECLARE MAPC LISPERROR) \ETHERINIT (MOVD) FB.HARDCOPY.DIRECTORY ( +ALLOW.BUTTON.EVENTS FB.MAKE.BROWSER.BUSY FB.ALLOW.ABORT FB.PROMPTWPRINT FB.HARDCOPY.PRINT.TITLE +FRPLACD MAPC PRIN3 TERPRI BLOCK) %%BROADCAST-STREAM-DEVICE-BOUT (MAPC) \CKPOSSOUT (.SPACECHECK. +DECLARE \OUTCHAR) AND (DECLARE) CLISP3 (CLISP4) \LET0 (DECLARE PUTBASEPTR UNINTERRUPTABLY +SETSTKNAME-RAW SETSTKNTOFFSET-RAW) /DWIMCHECKTRAN (DECLARE CLISPTRAN /RPLNODE) \SPY.INTERRUPT ( +SPY.DUMP.BUFFER SPY.START.ENTRY SPY.ADD.ENTRY SPY.END.ENTRY) WRITEIMAGEOBJ (HELP PRIN2 APPLY*) +\AB.BACK (ERROR) FASL::DUMP-CHARACTER (FASL::WRITE-OP) TTRACKMOUSE (DECLARE GETMOUSESTATE +\TTYBACKGROUND) %%BROADCAST-STREAM-DEVICE-OUTCHARFN (MAPC) \LITPRIN (DECLARE RPLCHARCODE .SPACECHECK. +\OUTCHAR) MAP.PROCESSES (APPLY*) \LET* (DECLARE UNINTERRUPTABLY SETSTKNAME-RAW SETSTKNTOFFSET-RAW +PUTBASE PUTBASEPTR) SEDIT::PARSE-INDENT-GROUPS (CL:CERROR) COND (DECLARE) \DSKDISPLAY.REPAINTFN ( +CLEARW CHANGEFONT PRIN1 FLUSHRIGHT) LET* (DECLARE MAPC LISPERROR) SPP.DESTADDRESS (\BLT) +\ADJUSTABLE-STRING-STREAM-OUTCHARFN (FREPLACEFIELD) \EVPROGN (DECLARE) \FM.NWAY-DOWNFN (BLTSHADE) +COMP.RETURN-FROM (SELECTQ COMPERROR COMP.STPOP COMP.PROGLST COMP.STUNBIND OPT.COMPILERERROR +COMP.STJUMP) MSUPDATEFN1 (MSUPDATE MSUPDATEFN1) PUTSTREAMPROP (LISTPUT FRPLACD) \DURATIONTRAN (DECLARE + SETERRORN ERRORX ERROR MAP /RPLACA) PROG1 (DECLARE) CHECKFORCHANGED (MAPC UPDATECHANGED MSCHECKEMPTY) + DOFILESLOAD (DECLARE CHECKIMPORTS) CL:FILE-POSITION (SETFILEPTR) \DSPCLIPPINGREGION.PRESS (ERROR +UNINTERRUPTABLY) RESTART.PROCESS (\PROCESS.MAKEFRAME) \LEAF.ERROR (printout PRIN1) TB.RECONSIDERRANGE +(DECLARE TB.SHOW.SELECTION) CL:FINISH-OUTPUT (FORCEOUTPUT) MSSHOWUSE (LOADFNS MSUPDATEFN1 printout +PRIN1 MAPC PRINT) \EXTERNALFORMAT (\DTEST) \DSPXPOSITION.IP (SHOW.IP SETXY.IP) +%%CONCATENATED-STREAM-DEVICE-PEEKBIN (CLOSEF FREPLACEFIELD \EOF.ACTION) MSSOLVE (MAPC PRIN2 PRIN1 +FRPLACA) CLISPIF (SELECTQ DECLARE LISTPUT1 SI::RESETUNWIND UNDOSAVE UNDONLSETQ1 RETDWIM) WAKE.PROCESS +(DECLARE UNINTERRUPTABLY) ENDLOADUP (MAPC MEDLEY-INIT-VARS SETTOPVAL PRIN1) EDITL1 (FRESHLINE +PROMPTCHAR EDITSAVE FRPLACA LISPXPUT TERPRI PRIN1 PRIN2) DEL.PROCESS (\PROCESS.MAKEFRAME +\UNWIND.PROCESS) \SUSPEND.PROCESS (\MP.ERROR \UNQUEUE.TIMER \UNQUEUE.EVENT \ENQUEUE.EVENT/LOCK) +%%CONCATENATED-STREAM-DEVICE-CLOSEFILE (MAPC) %%CONCATENATED-STREAM-DEVICE-BIN (CLOSEF FREPLACEFIELD +\EOF.ACTION) SUSPEND.PROCESS (\PROCESS.GO.TO.SLEEP \SUSPEND.PROCESS) %%CONCATENATED-STREAM-DEVICE-EOFP + (CLOSEF FREPLACEFIELD) TB.REPLACE.ITEMS (MAPC TB.SET.FONT) COMP.RETURN (COMP.STPOP SELECTQ COMPERROR +COMP.PROGLST OPT.CCHECK COMP.STUNBIND OPT.COMPILERERROR COMP.STJUMP) CL:FLOAT-SIGN (\PUTBASEFLOATP) +PLCHAIN (PRINTLINE) PROCESS.RESULT (AWAIT.EVENT) ENVEVAL (\CALLME \SMASHLINK RELSTK) CTEXTPROP ( +printout PRIN1 SELECTQ) PUTDQ (PUTD) \LITPRIN.INTERNAL (.SPACECHECK. DECLARE \LITPRIN.INTERNAL \SOUT +CHECK) SEDIT::DELETE-WORD (SEDIT::CLOSE-OPEN-NODE) \SEND.ANSWERING.RFC (\BLT \FILLRTPPUP SENDPUP) +TEDIT.COPY (\TEDIT.CONVERT.TO.FORMATTED APPLY* \TEDIT.HISTORYADD \FIXILINES TEDIT.UPDATE.SCREEN +\FIXSEL) BACKSPACEDEL (DELETECONTROL) TEDIT.KILL (\ILLEGAL.ARG TEDIT.DEACTIVATE.WINDOW) MAKEFILE ( +DECLARE UPDATEFILES LISPXPRIN2 LISPXPRIN1 LOADFROM LOADVARS RESETLST MAKEFILE1 APPLY ERROR) +\DSPXPOSITION.HCPYMODE (\DSPXPOSITION.DISPLAY) CL:FLOAT-PRECISION (CL::%%FLOAT-UNBOX) +\TEDIT.PUT.CHARLOOKS (\DWOUT \SMALLPOUT DECLARE) LISTPUT (FRPLACA FRPLACD FRPLNODE) \SPPWATCHER ( +DECLARE RESETSAVE PROCESSPROP OBTAIN.MONITORLOCK MONITOR.AWAIT.EVENT \SPP.RETRANSMIT.NEXT \SPP.SENDPKT + \SPP.NOT.RESPONDING \SPP.PROBE SI::MONITOR-UNWIND) ENVAPPLY (\CALLME \SMASHLINK RELSTK SELECTQ +DECLARE) DSPEOLFN (\ILLEGAL.ARG) \VFMSplit1 (\VFMReadNext MESASETQ \VFMMarkBufferDirty) KNOTLINE (MAPC +) PROCESS-STATUS (SELECTQ) %%ECHO-STREAM-DEVICE-BIN (\BOUT) RECORDPRIORITY (/DREMOVE +SET.RECORD.PRIORITY /NCONC1) \FM.NWAY-SETUP (DECLARE LISTPUT) \KEYBOARDOFF (\PUTBASE) +PERIODICALLYRECLAIM (DECLARE RECLAIM) SEDIT::FINALIZE-MOUSE-SELECTION (SEDIT::SMASH-USING) +CHAT.DID.RESHAPE (DECLARE) \FTP.NEXTFILE (DECLARE SETUPTIMER SELECTC \RELEASE.FTPCONNECTION) \FUNCT1 ( +\PUTBASEPTR UNINTERRUPTABLY SETSTKNAME-RAW SETSTKNTOFFSET-RAW) \GETFILINGCONNECTION (DECLARE +OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) \DOMOUSECHORDING (SELECTC \BOXIPLUS \PUTBASE) COMP.GO (SELECTQ +COMP.STPOP COMP.STJUMP COMPERROR COMP.STUNBIND) CL:FORCE-OUTPUT (FORCEOUTPUT) COMPILER::COMPLETELY-EXPAND + (CL:MULTIPLE-VALUE-SETQ) SEDIT::EVAL-SELECTION (TERPRI printout) \MAKESTACKP (UNINTERRUPTABLY +\INCUSECOUNT \DECUSECOUNT) \PFTrimHelper (HELP \VFMDeletePageGroup \VAMFreePageGroup BLOCK) +\TRACKCURSOR (DECLARE .NOTELASTUSERACTION \SETMOUSEXY SELECTC \DoveMisc.SetMousePosition +\SOFTCURSORPOSITION \DoveDisplay.SetCursorPosition) %%SYNONYM-STREAM-DEVICE-EOFP (DECLARE) +\TEXTMENU.TOGGLE.WHENOPERATEDFN (\TEXTMENU.TOGGLEFN) \DEFPRINT.BY.NAME (.SPACECHECK. \OUTCHAR \SOUT +\PRINTADDR) %%SYNONYM-STREAM-DEVICE-OUTCHARFN (\OUTCHAR) SEDIT::DELETE-SELECTION (SEDIT::DELETE-NODES) + \SYMBOL.ESCAPE.COUNT (DECLARE CHECK) NCHARS (DECLARE \MAPPNAME) COMPILER::GENCODE-MV-CALL ( +COMPILER::GENERATE-VALUES COMPILER::GENCODE) \MAKEFUNARGFRAME (\CALLME MAPC LISPERROR \SMASHLINK) +\TEDIT.BRAVOFILE? (SETFILEPTR BIN) FB.GET.NEWPATTERN (FB.ALLOW.ABORT) NOTIFY.EVENT (UNINTERRUPTABLY +\RUN.PROCESS) ENSURE.RGB (HLSTORGB) STKEVAL (\SMASHLINK RELSTK) \CONVERTTOFRACTION (PutUnboxed) +\DOBUFFEREDTRANSITIONS (DECLARE \DOTRANSITIONS) \NUMERIC.PNAMEP (DECLARE SELECTQ) \PRINTADDR ( +\CKPOSBOUT FREERESOURCE DECLARE) STKAPPLY (\CALLME \SMASHLINK RELSTK SELECTQ DECLARE) +INSTALL-PROTOTYPE-DEFN (MAKE-AND-INSTALL) TWODINSPECT.MAKEREGIONS (FRPLACD) \TEXTMENU.TOGGLE.SHOWSELFN + (SELECTQ BITBLT) CALLS (UPDATEFN MAP CALLS3 DECLARE MSPRGDWIM SELECTQ SI::RESETUNWIND) \SOUT (DECLARE + \OUTCHAR) SI::UNWIND (DECLARE CL:FUNCALL) EDITL2 (LISPXPRIN2) FRESHLINE (DECLARE \OUTCHAR) \AB.NEXT ( +ERROR) BRACKET.CURRENT.WORD (DECLARE CHECK HELP) RETEVAL (\CALLME LISPERROR \SMASHRETURN RELSTK +SI::UNWIND) \LFFindNextFile (\LFCheckBang \LFDirectoryScrambled \LFDWIN FRPLACD) PRINTERRORXIP ( +printout TERPRI) TEDIT.CHARWIDTH (CHECK) RETAPPLY (\CALLME LISPERROR \SMASHRETURN RELSTK SELECTQ +DECLARE SI::UNWIND) \INSERTCR (\TEDIT.CONVERT.TO.FORMATTED \INSERTCH) \DSPSPACEFACTOR.HCPYMODE ( +\ILLEGAL.ARG) PROMPTINWINDOW (DSPLEFTMARGIN MOVETOUPPERLEFT CLOSEW) \CURVE (DECLARE \CURVESMOOTH +APPLY* .WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN \INSURETOPWDS \CURVEPT \SOFTCURSORUPCURRENT \BOXIPLUS +MOVETO) TTRUBOUT (DELETE.LONG.SEGMENT1) TB.SET.FONT (CLEARW DSPRIGHTMARGIN LINELENGTH) \LEAF.ACKED ( +\ENQUEUE) MENU.HANDLER (DECLARE GETMOUSESTATE DOWINDOWCOM \BOXITEM OPENW \MENU.ITEM.DESELECT +MENU.HELDSTATE.RESET APPLY* SELECTQ) READIMAGEOBJ (DECLARE DOFILESLOAD IMAGEOBJPROP SETFILEPTR) +POSTSCRIPT.INIT (DECLARE FONTPROFILE.ADDDEVICE) COPYVM (DECLARE SI::RESETUNWIND) \LEAF.GETFILEDATES ( +\BLT RELEASE.PUP \CLEARBYTES \LEAF.SETVALIDATION) BLIPVAL (SELECTQ CHECK) MSCHECKEMPTY (printout PRIN1 + UPDATEFILES MASTERSCOPE ERROR!) FIX89 (EDITE EXEC-FORMAT) TB.SCROLLFN (SCROLLBYREPAINTFN) +GIVE.TTY.PROCESS (\ILLEGAL.ARG TTY.PROCESS APPLY*) \VAROFFSET (SELECTC RAID) NSMAP (MAPC) +CROPMARK.CREATE (IMAGEOBJPROP TEDIT.PROMPTPRINT) SETBLIPVAL (SELECTQ \ILLEGAL.ARG CHECK) +\DSKDISPLAY.BUTTONEVENTFN (GETMOUSESTATE) \NSFILING.LOGIN (SPP.CLOSE CL:CERROR PRINTOUT TERPRI DISMISS + \NSFILING.SET.CONTINUANCE) \MAPCHARS (DECLARE) SPP.SENDEOM (DECLARE SPP.FORCEOUTPUT) +PAINTW.READ.AND.SAVE.SHADE (PAINTW.CACHE.SHADE) SPY.END (SPY.DUMP.BUFFER) \DRAWPOINT.IP (SHOW.IP +BITBLT \DRAWLINE.IP) VERBNOTICELIST (printout PRIN1 SPACES) EDITBF (ERROR!) GETVARS (RELSTK) +\TEDIT.PEEKBIN.NEW.PAGE (\PAGEDBACKFILEPTR) \DSPFONT.PRESS (SHOW.PRESS \ENTITYEND.PRESS +\ENTITYSTART.PRESS \BOUT \SETSPACE.PRESS \FIXLINELENGTH.PRESS) \RTP.ERROR (PRINTCONSTANT) +\FTP.CLOSEFILE (SELECTQ \BSP.FLUSHINPUT ERROR FTPPUTCODE .EOC. CL:FORMAT \RELEASE.FTPCONNECTION +CLOSEBSPSTREAM) WHO-LINE-TIME (DECLARE) PFI.MAYBE.SEE.PRETTY (RESETSAVE) INSPECT (DECLARE printout +TERPRI) \INTERPRESSINIT (DECLARE) OPENW (\OPENW1 DOUSERFNS) \REALFRAMEP (\SMASHLINK) +\PERIODIC.INTERRUPTFRAME (DECLARE) SETTIME (\PROCESS.RESET.TIMERS) PRINTNUM-TO-STRING (DECLARE +\ILLEGAL.ARG FREERESOURCE) \SPP.PREPARE.INPUT (UNINTERRUPTABLY \SPPINCFILEPTR DECLARE RELEASE.XIP +SELECTC CL:FUNCALL) \NSFILING.UPDATE.ATTRIBUTES (FRPLACD) TB.UNDOSELECTION (DECLARE TB.RECONSIDERRANGE +) %%TWO-WAY-STREAM-DEVICE-EOFP (DECLARE) EDITQF (EDIT4F) \IPCURVE2 (MOVETO.IP LOADPOLY \IMAGEPATH.IP +\SETBRUSH.IP LINETO.IP) OPT.DS1 (SELECTQ OPT.COMPILERERROR) \SETUP.TYPENUM.TABLE (HELP \PUTBASEBYTE) +\PFSaveBuffers (\PFPutLogicalVolumePage \VAMBufferSave) %%TWO-WAY-STREAM-DEVICE-CLOSEFILE (CLOSEF?) +CL::DEFINE-CONSTRUCTORS (EXPORT) \SETACCESS (UNINTERRUPTABLY SELECTQ RAID) WINDOW.BITMAP (CLOSEW +BITBLT OPENW) TEDIT.INSERT.UPDATESCREEN (TEDIT.UPDATE.SCREEN \FIXSEL \SHOWSEL \COPYSEL +\TEDIT.SET.WINDOW.EXTENT SCROLLW) \SOFTCURSORPOSITION (\PUTBASE \SOFTCURSORDOWN \SOFTCURSORUPCURRENT) +\DSPLINEFEED.HCPYMODE (\ILLEGAL.ARG) \FTP.GENERATEFILES (SELECTQ \FTP.PRINTPLIST .EOC. SELECTC +\RELEASE.FTPCONNECTION \FTPERROR RESETSAVE \FTP.ASSURE.CLEANUP) MASTERSCOPE (PRIN1) +\SPP.CREATE.STREAMS (FREPLACEFIELD) \FM.STATE-CHANGESTATE (DECLARE) CLOSEMAINWINDOW (\CLOSEW1) +\LEAF.FIX.BROKEN.SEQUIN (\SEQUIN.FLUSH.RETRANSMIT SELECTC CLOSEPUPSOCKET \SEQUIN.FLUSH.CONNECTION +printout FRPLACD WINDOWPROP \PAGED.REVALIDATEFILELST DECLARE AWAIT.EVENT ERROR) CL:INTEGER-DECODE-FLOAT + (CL::%%FLOAT-UNBOX) MODERNWINDOW.BUTTONEVENTFN (GETMOUSESTATE TOTOPW SHAPEW NEARESTCORNER MOVEW) +PROCESS.WINDOW (WINDOWPROP) CLISPIFY2 (RETEVAL) VIDEORATE (DECLARE \DSPRATE \DEVICE.OUTPUT) +\LFSortFiles (SORT) COMP.PROG (COMP.STBIND MAPC COMP.EFFECT COMP.DELPOP COMP.EXPR) \EVALFORM (DECLARE +SELECTQ) \INSTALL.EXTERNALFORMAT (\REMOVE.EXTERNALFORMAT) COMPILER::GENCODE-LET (COMPILER::GENCODE) +\NSFILING.CLOSEFILE (\GENERIC-UNREGISTER-STREAM \NSFILING.RELEASE.BULKSTREAM \NSRANDOM.RELEASE.HANDLE +ERROR \NSFILING.UPDATE.ATTRIBUTES FILING.CALL) \NSADDRESS.PRINT.DECIMAL (CL:MULTIPLE-VALUE-SETQ PRIN3) + TB.REPAINTFN (RESETLST) \GC.HANDLEOVERFLOW (\HTFIND .INCREMENT.ALLOCATION.COUNT. DECLARE .BOXIPLUS. +.UNBOX. SELECTC \ILLEGAL.ARG CL::%%NOT-NONCOMPLEX-NUMBER-ERROR \PUTBASE) SPP.CLOSE (\BULK.DATA.CLOSE +SPP.FORCEOUTPUT) COMPILER::ALPHA-TAGBODY (MAPC) \TFBRAVO.HANDLE.HEADING (DECLARE%: SETFILEPTR +\TFBRAVO.WRITE.PARAGRAPH) PAINTW.READBRUSHSHADE (SELECTQ) RECLOOK (RECORDERROR) \DRAWLINE.IP (SHOW.IP +APPENDOP.IP MOVETO.IP LINETO.IP \IMAGEPATH.IP \SETBRUSH.IP) \DTEST.UFN (DECLARE .UNBOX. SELECTC +\ILLEGAL.ARG CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) WINDOW.MOUSE.HANDLER (GETMOUSESTATE DECLARE +\PROTECTED.APPLY ERSETQ DOWINDOWCOM) PFI.MERGE.INDICES (RPLACA FRPLACD) PRINTFN (PRINTFNDEF printout +PRIN1) MSOUTPUT (OUTFILE RESETSAVE) FB.BROWSECOMMAND (FB.ALLOW.ABORT RPLACA LISTPUT ADD.PROCESS +FB.PROMPTW.FORMAT) DUMMYDEF (PUTD) \PFI.DO.HARDCOPY (DECLARE OBTAIN.MONITORLOCK RELEASE.MONITORLOCK +APPLY SI::MONITOR-UNWIND) MSGETDEF (PUTTABLE) DBG::PRINT-ENTRY-MESSAGE (CL:PRIN1 CL:TERPRI) \BACKTRACE + (DECLARE printout PRINTNUM TERPRI \PRINTBF APPLY* \PRINTFRAME) SETUPSTACK (CREATEPAGES) +CREATE.NUMBERPAD.READER (DSPFONT MOVETOUPPERLEFT MAPC PRIN3 OPENW ADDMENU WINDOWPROP +\READNUMBER.OUTLINEREGION DISPLAY/NUMBER/READER/TOTAL CLOSEW) SEEFILE (SETFILEPTR printout PRIN1 TAB) +\FM.STATE-SELECTEDFN (RESETSAVE) ICONBUTTONEVENTFN (EXPANDW) \LEAF.HANDLE.INPUT (FREPLACEFIELD HELP +ADD.PROCESS) DISMISS (DECLARE \PROCESS.GO.TO.SLEEP FREERESOURCE) DINFO.CLOSEFN (CLOSEW) NEWLINE.IP ( +SHOW.IP DSPNEWPAGE SETXY.IP) DREMOVE (FRPLACA FRPLACD DECLARE) %%TWO-WAY-STREAM-DEVICE-OUTCHARFN ( +\OUTCHAR) COMP.LAMBDA (COMP.VAL COMP.DELPUSH MAPC COMP.STPOP COMPERROR COMP.STBIND COMP.VALN) +OPT.DEADSETQP (DECLARE) \WAITFORSYSBUFP (\WAIT.FOR.TTY BLOCK FREERESOURCE DECLARE) \HUNKFIT? (printout + PRIN1 TAB) EDIT%: (EDLOC EDUP SELECTQ EDIT2F EDITCOML ERROR!) \SEND.ABORT (\FILLRTPPUP \PUTBASE +PUTPUPSTRING SENDPUP) \GCMAPTABLE (DECLARE \HTFIND .BOXIPLUS. .UNBOX. SELECTC \ILLEGAL.ARG +CL::%%NOT-NONCOMPLEX-NUMBER-ERROR \PUTBASE .INCREMENT.ALLOCATION.COUNT.) WAITFORINPUT (\TTYBACKGROUND +FREERESOURCE DECLARE) UPDATEFN (MSINIT ERROR printout PRIN1 PRIN2 MSERASE PUTHASH MSUPDATEFN1) +\FLUSHNSOCQUEUE (\FLUSH.PACKET.QUEUE) \TIMER.INTERRUPTFRAME (APPLY* SETUPTIMER) +\DSPRIGHTMARGIN.HCPYMODE (\DSPRIGHTMARGIN.DISPLAY) \INTERPRETER (CHECK \CONTEXTSWITCH MAPC \SMASHLINK +DECLARE FRPLACD) OPT.DELCOPYFN (OPT.PRDEL) TB.CONSIDERRANGE (DECLARE TB.SHOW.SELECTION) FILEPATCHBLOCK + (LOCAL) \LFWriteLeaderPage (\PFPutPage) TTYINBUFFERPEEK (DECLARE) \SETBSPTIMEOUT (WAKE.PROCESS) +\LFHighestVersions (FRPLACD) SAVEDEF (SELECTQ /PUT /PUTASSOC) TWODINSPECT.PRINTELEMENT (MOVETO) +\COERCE.NS.SOCKET (\BLT) \DOTRANSITIONS (\DECODETRANSITION) \DSPFONT.HCPYMODE (UNINTERRUPTABLY DECLARE + \SFFixFont) \TEXTMENU.TOGGLEFN (APPLY*) \FM.STATE-SETUP (DECLARE LISTPUT) CL::%%ATAN-FLOAT (DECLARE +CL:ERROR) \LEAF.TIMEDIN (CLOSEW) \NSFILING.DISCARD.SESSION (CLOSEF RELEASE.MONITORLOCK) VIRGINFN ( +XCL:UNBREAK-FUNCTION CL:FORMAT APPLY SI::RESTORE-CALLS MAPC) \SPP.ESTABLISH (\BLT \SPP.CREATE.WATCHER +WITH.MONITOR DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND ADD.PROCESS NOTIFY.EVENT) PROCESS.EVAL ( +DECLARE \PROCESS.MAKEFRAME \PROCESS.GO.TO.SLEEP) SEDIT::REPAINT (MOVETO RELMOVETO SEDIT::PRINT-STRING +PRIN2 PRIN1 BITBLT SHOULDNT) \TEDIT.COMMAND.RESET.SETUP (\TEDIT.INTERRUPT.SETUP CLOSEF?) COMP.SETN ( +COMPERRM) \PRINTFRAME (\PRINTSTK DECLARE SELECTQ printout SPACES PSTK PRINTSTKFIELDS PRIN2 APPLY*) +ONFILE (MSNOTICEFILE MAPC) FB.FASTSEECOMMAND (FB.ALLOW.ABORT DSPSCROLL WINDOWPROP WINDOWADDPROP +RESETSAVE TTYDISPLAYSTREAM MAP) DO.SHIFTED.SELECTION (\CHECKCARET INVERT.LONG.SEGMENT READFROMBUF +MOVE.TO.LINE DELETE.LONG.SEGMENT MOVE.TO.WHEREVER \TTYBACKGROUND) NCONC (FRPLACD) TITLEW.BUTTONEVENTFN + (WITH-INSPECTOR-ENV) \PRINTBF (\PRINTSTK PRIN2 APPLY* printout PRIN1) \FLUSHPUPSOCQUEUE ( +\FLUSH.PACKET.QUEUE) TB.DECONSIDERRANGE (DECLARE TB.SHOW.SELECTION) INSPECTW.CREATE (DSPFONT +DSPRIGHTMARGIN WINDOWPROP) EDITCALLERS (MAPC RESETSAVE CL:FORMAT CL:MULTIPLE-VALUE-SETQ SETFILEPTR +LISPXPRIN1 LISPXSPACES LISPXTERPRI TERPRI EDITFROMFILE) \INSERTCH (DECLARE \INSERT.FIRST.PIECE +RPLSTRING RPLCHARCODE \TEDIT.HISTORYADD UPDATEPCNODES) ONED.TRACKCURSOR (GETMOUSESTATE) \TEDIT1 ( +\TEDIT.COMMAND.LOOP CLOSEW APPLY*) DEFAULT.INSPECTW.PROPCOMMANDFN (RESETLST REMOVEPROMPTWINDOW) SORT1 +(DECLARE FRPLACA FRPLACD FRPLNODE2) CLISPRPLNODE (UNDOSAVE FRPLACA) \TFBRAVO.FIND.LAST.TRAILER ( +SETFILEPTR) INTERPRESS.OUTCHARFN (\CHANGECHARSET.IP \BOUT SHOW.IP SETX.IP) \DECODETRANSITION ( +.NOTELASTUSERACTION SELECTC SHOULDNT \PUTSYSBUF) MERGE (ERRORX) PROCESS.READ (CLEARW PRIN1) +DINFO.EXPANDFN (OPENW TOTOPW) \FM.3STATE-CHANGESTATE (DECLARE) \LEAF.TIMEDOUT (\SEQUIN.CONTROL SELECTC + \LEAF.NOT.RESPONDING TERPRI printout \LEAF.TIMEDOUT.EXCESSIVE) \RECLAIMSTACKP (\DECUSECOUNT) +SAVEONSYSRECLST (MAPRINT CL:FORMAT PRETTYVAR1 FRPLACD PRINTDEF) TTYDISPLAYSTREAM (DECLARE \ILLEGAL.ARG + UNINTERRUPTABLY \CHECKCARET DSPSCROLL PAGEHEIGHT) DECODE/WINDOW/OR/DISPLAYSTREAM (OPENW WINDOWPROP) +\PRINTSTK (PRINTNUM PRIN1) TTPRIN1 (TTCRLF TTBOUT) PP (DECLARE CL:FORMAT) COMP.SETQ (COMP.PROGLST +COMP.STSETQ COMP.BOX) CHARACTER (\PNAMESTRINGPUTCHAR DECLARE FREERESOURCE) CLISPIFY1 (FRPLACD) +\PROCESS.EVAL1 (\RUN.PROCESS) \LFFindInfo (MAPC) \COMPUTE.HUNK.TYPEDECLS (FRPLACD) PRINTTIMER (PRIN1 +printout) TTYINBUFFERBIN (DECLARE) RECURSIVE.COLLECTDESCENDENTS (NC.GraphNodeIDPutProp) +\PFPutMarkerPage (ERROR) \LEAF.RECONNECT (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) PRIN2 ( +DECLARE \PRINDATUM) LOOKUP.NS.SERVER (MAPC) SEDIT::CONVERT-COMMENT (SEDIT::START-UNDO-BLOCK +SEDIT::END-UNDO-BLOCK printout TERPRI) \SETXFORM.PSC (POSTSCRIPT.OUTSTR POSTSCRIPT.PUTCOMMAND) +INVERT.BITMAP.B/W (BITBLT) SET (\PUTBASEPTR \RPLPTR) \CHANGE.ETHER.TRACING (TAB SET) +\NSADDRESS.DEFPRINT (.SPACECHECK. PRIN3 \NSADDRESS.PRINT.DECIMAL) FB.MAKECOUNTERWINDOW ( +FB.MAKERIGIDWINDOW DSPFONT ATTACHWINDOW) \FAX.PARSE.NAME (DECLARE ERROR) CLISPFUNCTION? (/RPLNODE) +CHAT.TYPEOUT.CLOSE (printout PRIN1) \NSPRINT.MEDIUM.CHECK (\NSPRINT.UNSUPPORTED) FB.ADD.FILEGROUP ( +FB.INSERT.DIRECTORY) RECORDFIELDNAMES (MAPC MAPCAR) \DSKDISPLAY.DESTROY.WINDOW (CLOSEW) +CL:MAKE-BROADCAST-STREAM (STREAMPROP) REQUIREVERSION (ERROR) \DEFINEDEVICE (DECLARE UNINTERRUPTABLY) +\BSP.SENDBUFFER (\SETRTPPORTS UNINTERRUPTABLY FREPLACEFIELD \BSPINCFILEPTR \TRANSMIT.STRATEGY +\SETBSPTIMEOUT) APROPRINT (printout TAB PRIN1 RESETLST) MEASUREGRAPHNODE (SET/LABEL/SIZE) \PUTSYSBUF ( +\PUTBASEFAT) CLISPATOM (/RPLNODE RETDWIM FIX89TYPEIN) CL:MAKE-ECHO-STREAM (STREAMPROP) NEWPAGE.PRESS ( +\ENDPAGE.PRESS) U-CASE (DECLARE \PUTBASECHAR FREERESOURCE) COURIER.SKIP.SEQUENCE (COURIER.SKIP) INITGC + (CREATEPAGES) CHANGENAME1A (CHANGECCODE UNDOSAVE) \TEDIT.RESTARTFN (\TEDIT.COMMAND.LOOP CLOSEW +\TEXTCLOSEF APPLY*) UPDATECHANGED (MSINIT MAPHASH) DISPLAYNODE (DISPLAYNODELINKS) \TEDIT.SMALLER.CARET + (TEDIT.CARETLOOKS \TEDIT.SHOWCARETLOOKS) CL:MAKE-TWO-WAY-STREAM (STREAMPROP) CL:MAKE-SYNONYM-STREAM ( +STREAMPROP) PRESSWINDOW (DSPXPOSITION DSPYPOSITION \WRITEPRESSBITMAP) \TEXTMENU.TOGGLE.CREATE ( +DSPXOFFSET DSPYOFFSET DSPFONT MOVETO PRIN1) CHANGE.NODEFONT.SIZE (DISPLAYNODE APPLY* MEASUREGRAPHNODE) + CLOSEICONWINDOW (WINDOWDELPROP CLOSEW DOUSERFNS) CL:MAKE-STRING (FILL-ARRAY) +\VALID.FILING.CONNECTIONP (\NSFILING.LOGOUT BLOCK) \PROCESS.APPLY1 (\RUN.PROCESS) \SEND.RFC (\BLT +SENDPUP) TB.COPYBUTTONEVENTFN (TB.SHOW.COPY.SELECTION BLOCK DECLARE CL:FUNCALL GETMOUSESTATE) +\CREATECHARSET.IP (DECLARE RESETSAVE SETFILEPTR COPYBYTES SELECTQ \FSETWIDTH \BINS) \CLOSEIPSTREAM ( +SELECTQ ENDPAGE.IP ENDPREAMBLE.IP) FIXCONTINUE (FIXPRINTIN) NEWLINE.PRESS (NEWPAGE.PRESS SHOW.PRESS +SETXY.PRESS) PROCESS.APPLY (DECLARE \PROCESS.MAKEFRAME \PROCESS.GO.TO.SLEEP) APROPOS (DECLARE +RESETFORM) MB.NWAYBUTTON.ADDITEM (FRPLACD DSPXOFFSET DSPYOFFSET DSPFONT DSPRIGHTMARGIN DSPDESTINATION +MOVETO PRIN1) SPY.TREE (SPY.MAKE.TREE) SCANFORWARD (DECLARE) COMPILER::COMPILE-FILE-DEFINE-FILE-INFO ( +DECLARE) PARSERELATION (MSINIT) \LEAF.WHENCLOSED (CLOSEW) \VFMMerge1 (MESASETQ \VFMSmartBLT +\VFMReadNext \VFMMarkBufferDirty) ESUBST (UNDOSAVE ERROR ERROR!) \GETDEVICEFROMHOSTNAME (DECLARE +\DEFINEDEVICE) CLDISABLE (DECLARE DWIMIFY0 SI::RESETUNWIND MAPC CLDISABLE) \SPPSENDERROR (printout +PRIN1 PRINTPACKET) \HARDCURSORUP (\CURSORBITSPERPIXEL BITBLT SELECTC \DoveDisplay.SetCursorShape) +MSINTERPRET (MSOUTPUT MAPRINT MSERASE MSINIT PRINTOUT PRIN1 CHECKFORCHANGED DECLARE PRIN2 MAPHASH +MSCHECKEMPTY TAB FRPLACD UPDATECHANGED RESETSAVE FRPLACA) \TEDIT.WORDDELETE (\SETUPGETCH CHECK +\SHOWSEL \FIXSEL) FB.MAKEHEADINGWINDOW (DSPFONT FB.MAKERIGIDWINDOW ATTACHWINDOW WINDOWPROP DSPTEXTURE +DSPOPERATION DSPFILL) FB.GETALLFILEINFO (FRPLACD) FB.HARDCOPY.TOFILE (SELECTQ FB.PROMPTWPRINT +FB.PROMPTW.FORMAT RPLACA FB.MAYBE.INSERT.FILE) COLLECT.CHILD.NODES (FRPLACD) +INTERACT&ADD.BORDER.TO.BITMAP (PROMPTPRINT) MOVEDESCENDENTS (MOVENODE EXTENDEXTENT CALL.MOVENODEFN) +\TEDIT.LARGER.CARET (TEDIT.CARETLOOKS \TEDIT.SHOWCARETLOOKS) \GET-NEXT-RUN (CL:ERROR) \DRAWCURVE.IP ( +\DRAWLINE.IP SHOW.IP APPENDOP.IP \IPCURVE2 SETXY.IP) SEDIT::PARSE-INDENT (CL:CERROR) SPY.TOGGLE ( +SPY.END) \FLOATTOBYTE.UFN (\PUTBASE) FB.HARDCOPYCOMMAND (FB.ALLOW.ABORT FB.HARDCOPY.TOFILE) +MSNOTICEFILE (DECLARE ERROR LOADFROM SI::RESETUNWIND ERROR! LOADVARS /RPLACD) \REMOVEDEVICE (DECLARE +UNINTERRUPTABLY) \FTP.DELETEFILE (MAPC CLEAR.LEAF.CACHE \FTP.PRINTPLIST .EOC. SELECTC +\RELEASE.FTPCONNECTION FTPPUTCODE CLOSEBSPSTREAM FTPGETCODE \FTP.FLUSH.TO.MARK) INITDATATYPENAMES ( +DECLARE) EDIT4E (PRINT EDLOCL) SHOWPRESSBITMAPREGION (SHOWREGION) CL:MISMATCH (CL:ERROR) +\PUT.SESSION.HANDLE (COURIER.WRITE) COMPILER::GENCODE-IF (COMPILER::GENCODE) CLISPERROR (EVQ +FIXPRINTIN LISPXSPACES LISPXPRIN1 LISPXPRIN2 LISPXTERPRI LISPXPRINT MAPRINT) \BSP.FLUSH.SOCKET.QUEUES +(\FLUSH.PACKET.QUEUE RELEASE.PUP) \REMOVEDEVICE.NAMES (DECLARE RPLACA) \TFBRAVO.PARSE.PARA (BIN) +FNCHECK (ADDSPELL) \CURSORDESTINATION (UNINTERRUPTABLY \CURSORBITSPERPIXEL \SETMOUSEXY SELECTC +\DoveMisc.SetMousePosition SETQ.NOREF) OPT.EQOP (OPT.CCHECK) SEDIT::CONVERT-COMMENT-TAIL (TCONC LCONC +SEDIT::CONVERT-COMMENT-TAIL SELECTQ SELCHARQ) \CCODEARGLIST (FRPLACD) \CLOSEFILE (IMAGEOP) +\UNQUEUE.EVENT (\MP.ERROR) SEDIT::CHANGE-QUOTE (RPLACA) SETSYNONYM (ERRORX MSSETWORDTYPE SHOULDNT +FRPLACA FRPLACD) SPY.START (BITBLT SPY.INIT) \SHIFT.DOCUMENT (DECLARE IMAGEOBJPROP) \FTP.MAKEPLIST ( +FRPLACD) \BLKSMALLP2FLOAT.UFN (\PUTBASEFLOATP) DOICONWINDOWCOM (TOTOPW APPLY*) EDITFPAT (FRPLACD MAPC) + INFILECOMS? (SELECTQ INFILECOMSVAL INFILECOMS) PACK* (DECLARE RPLSTRING LISPERROR \PACK.ITEM +FREERESOURCE) EDLOCL (EDLOC) ONEDINSPECT.MAKEREGIONS (WITH-INSPECTOR-ENV FRPLACD) \WWCHANGESCREENSIZE +(MAPC \STARTDISPLAY \CLEARBM \PUTONSCREENW) \CCODEIVARSCAN (DECLARE) \STORENSADDRESS (\MOVENSADDRESSES +) EDITXTR (EDLOC EDUP EDIT2F) \LEAF.GETFILEINFO (\LEAF.CLOSEFILE) \LINEBLT (SELECTQ SHOULDNT +\PILOTBITBLT) \BLKMAG.UFN (DECLARE \PUTBASEFLOATP) \TRANSMIT.STRATEGY (SETUPTIMER FREPLACEFIELD) +EDITMBD (EDLOC EDUP EDIT2F) \BLKEXPONENT.UFN (\PUTBASE) OBTAIN.MONITORLOCK (SELECTQ RESETSAVE +\PROCESS.GO.TO.SLEEP) POSTSCRIPT.FONTCREATE (\FSETWIDTH MAPHASH) ICONW.SHADE (BLTSHADE BITBLT +\ICONW.REPAINTFN) \HARDCURSORPOSITION (DECLARE \SETMOUSEXY SELECTC \DoveMisc.SetMousePosition) +TIME.SINCE.PACKET (\BLT) \DEVICEEVENT (DECLARE) \FTPEVENTFN (SELECTQ FTP.BREAKCONNECTION) INITATOMS ( +CREATEPAGES COPYATOM) \TFBRAVO.ADD.NAMEDTAB (BIN TEDIT.INSERT.OBJECT) CL:PEEK-CHAR (READCCODE) REVERSE + (DECLARE) \BLKFDIFF.UFN (\PUTBASEFLOATP) ADDTOCOM1 (/RPLACD MARKASCHANGED) CL:NSUBSTITUTE (CL:ERROR) +\SPP.HANDLE.DATA (CHECK RELEASE.XIP \ENQUEUE SELECTC \SPP.SEND.ENDREPLY \SPPSENDERROR NOTIFY.EVENT) +CONSTANTS (MAPC) DELFROMFILES (printout PRIN1 MAPC FRPLACD) \SOFTCURSORUP (\TEMPLOCKPAGES +\SOFTCURSORUPCURRENT) \BLTSHADE.IP (SHOWSHADE.IP \BLTSHADE.GENERICPRINTER) \FM.3STATE-DOWNFN (BLTSHADE +) XCL::WHERE-IS-NOTICE (CL:UNWIND-PROTECT HASH-FILE:CLOSE-HASH-FILE) \BLKPERM.UFN (\PUTBASE) FILES? ( +UPDATEFILES LISPXPRIN1 LISPXPRIN2 LISPXTAB FILES?PRINTLST LISPXSPACES LISPXTERPRI ADDTOFILES?) +\SOFTCURSORUPCURRENT (\PUTBASE SETQ.NOREF \PILOTBITBLT \SOFTCURSORPILOTBITBLT) FIXATOM (RELSTK RETDWIM + /RPLNODE) MSSETPHRASE (MSCANT MSNEGATESET) RELEASE.MONITORLOCK (\RUN.PROCESS) \BLKFPLUS.UFN ( +\PUTBASEFLOATP) BITMAPCREATE (\ILLEGAL.ARG) \RTP.HANDLE.RFC (SWAPPUPPORTS \PUTBASE PUTPUPSTRING) +OPT.PRATTACH (FRPLACA) CH.RETRIEVE.ITEM (RPLACA) OPENPRSTREAM (DECLARE ERROR SETUPFONTS.PRESS +\STARTPAGE.PRESS) FIXATOM1 (SETBLIPVAL FIXCONTINUE RELSTK ERROR) RECORDECLARATIONS (PRIN1 MAPRINT MAPC + PRINTDEF) \TAN.OLD (DECLARE) HPRINT.IMAGEOBJ (PRIN2 APPLY*) \BLKFTIMES.UFN (\PUTBASEFLOATP) +DOATTACHEDWINDOWCOM (TOTOPW) SEDIT::CHANGE-PACKAGE (SEDIT::CLOSE-OPEN-NODE CL:FORMAT XCL:SAVE-PROFILE +SEDIT::VERIFY-STRUCTURE printout TERPRI) \PRINTNSADDRESS (DECLARE \NSADDRESS.DEFPRINT) MACROEXPANSION +(DECLARE CL:WARN) SI::MONITOR-UNWIND (SI::RESETUNWIND \RUN.PROCESS) \FM.3STATE-SETUPOFFBITMAP (LISTPUT + DECLARE BLTSHADE DRAWLINE) EDITMV (EDLOC EDUP PRIN1 ERROR! EDITCOML EDITCOMA) \SEND.ACK (\FILLBSPPUP +SENDPUP) FB.HEADINGW.DISPLAY (DSPFILL DSPRIGHTMARGIN DSPXPOSITION PRIN3 CL:FORMAT) PRINTCURSOR ( +printout PRIN1 \CURSORBITSPERPIXEL PRINT) FILES?1 (LISPXPRIN1 FILES?PRINTLST LISPXTERPRI) +\CHARWIDTH.IP (DECLARE) \LFVersions (\LFCheckBang \LFDirectoryScrambled \LFDWIN) TB.MAKE.BROWSER ( +DECLARE MAP DSPLEFTMARGIN TB.REPLACE.ITEMS NCONC1) \BLKFLOATP2COMP.UFN (\PUTBASEFLOATP) MSTRYSPELLTYPE + (DECLARE MAPHASH) IRM.LOOKUP (OPENW) FULLPRESSBITMAP (printout PRIN1 ERROR \WRITEPRESSBITMAP) +COMPILER:OPTIMIZE-AND-MACROEXPAND (CL:MULTIPLE-VALUE-SETQ) CL::%%ASIN-FLOAT (DECLARE) COMPILER::GENCODE-CATCH + (COMPILER::GENCODE COMPILER::SET-UP-RETURN-TO) \TFBRAVO.WRITE.RUNS (DECLARE \TFBRAVO.WRITE.RUN) +SEDIT::CHANGE-PRINTBASE (SEDIT::CLOSE-OPEN-NODE XCL:SAVE-PROFILE SEDIT::VERIFY-STRUCTURE printout +TERPRI) EDIT4F (PRIN1 ERROR!) \SPP.RELEASE.ACKED.PACKETS (CHECK UNINTERRUPTABLY SETA RELEASE.XIP) +DINFO.READ.KOTO.GRAPH (printout TERPRI SELECTQ SHOULDNT) \PUT.FILING.ATTRIBUTE (ERROR COURIER.WRITE +COURIER.WRITE.SEQUENCE.UNSPECIFIED COURIER.WRITE.SEQUENCE) PPSOC.CURRENT (PRIN1) EDITSW (EDITSMASH +EDITSMASH1) IBLT1 (\PUTBASEBITS) PARSE-NSADDRESS (DECLARE) TB.REDISPLAY.ITEMS (CLEARW) CL:VALUES ( +SELECTC SELECTQ DECLARE UNINTERRUPTABLY \SIMULATE.UNBIND FRPLACD) \RELEASE.ETHERPACKET (\DTEST +\ENQUEUE) TEDIT.FLASHCARET (\CARET.FLASH? \CARET.FLASH.AGAIN) IBLT2 (\PUTBASEBITS) +\PROCESS.RELEASE.LOCKS (RELEASE.MONITORLOCK) \SIMULATE.UNBIND (\PUTBASE \MAKEFREEBLOCK) +\WRITEPRESSBITMAP (SHOW.PRESS \ENTITYEND.PRESS \ENTITYSTART.PRESS SETXY.PRESS \WOUT DECLARE \BOUTS +\FIXPOUT) EDITCONT (ERROR!) HARDCOPYREGION.TOPRINTER (SPAWN.MOUSE PROMPTPRINT CLRPROMPT HARDCOPYW) +\PFGetMarkerPage (ERROR) \TEDIT.UNPARSE.CHARLOOKS.LIST (DECLARE) \BLKSEP.UFN (\PUTBASEFLOATP) +CL:VALUES-LIST (SELECTC SELECTQ DECLARE UNINTERRUPTABLY \SIMULATE.UNBIND) HARDCOPYREGION.TOFILE ( +SPAWN.MOUSE PROMPTPRINT CLRPROMPT HARDCOPYW) SEDIT::BACKSPACE (CL:FUNCALL) CL:READ-LINE (READCCODE) +\TFBRAVO.WRITE.RUN (\TFBRAVO.ADD.NAMEDTAB TEDIT.RAW.INCLUDE TEDIT.LOOKS) COMPILER::GENCODE-BLOCK ( +COMPILER::GENCODE) %%STRING-DOWNCASE (%%ADJUST-FOR-OFFSET) \LOADNSADDRESS (\MOVENSADDRESSES) +FB.SETNEWPATTERN (ICONW.TITLE) MSHASHLIST (MAPTABLE) PACKFILENAME (DECLARE \ILLEGAL.ARG MAP) +SEDIT::PRINT-STRING (DECLARE \BLTCHAR) \TEDIT.LOOKS (CURSORPOSITION) \MAKE.PROCESS1 (\DECUSECOUNT +\INCUSECOUNT \RESUME) PRINTPACKETQUEUE (PRINTPACKET) \FM.3STATE-SETUP (DECLARE LISTPUT) +CL:READ-FROM-STRING (SETFILEPTR) \PROCESS.MOVEFRAME (FLIPCURSORBAR \MAKEFREEBLOCK \BLT CHECK +FREPLACEFIELD) %%STRING-UPCASE (%%ADJUST-FOR-OFFSET) PREINITARRAYS (DECLARE) \SOFTCURSORDOWN (\PUTBASE + \SOFTCURSORPILOTBITBLT) CL:REMOVE-DUPLICATES (CL:ERROR) COURIER.WRITE.FAT.STRING (PRIN3 PUTWORD +DECLARE COPYBYTES) TB.DO.ITEM.SELECTION (DECLARE GETMOUSESTATE TB.UNDOSELECTION BLOCK SELECTC +TB.SELECTRANGE TB.DESELECTRANGE TB.SHOW.SELECTION TB.DECONSIDERRANGE TB.CONSIDERRANGE +TB.RECONSIDERRANGE) CL::VALUES-UFN (SELECTC SELECTQ DECLARE FRPLACD UNINTERRUPTABLY \SIMULATE.UNBIND +SI::UNWIND) SEDIT::INSERT-COMMENT-CHARS (RPLACD RPLACA) GETRELATION (MAPC ERROR) +SORT.NSADDRESSES.BY.DISTANCE (MAPC BLOCK) OPT.DELCODE (SELECTQ RPLACA MAPC DREMOVE OPT.DELTAGREF) +CL::VALUES-LIST-UFN (SELECTC SELECTQ DECLARE UNINTERRUPTABLY \SIMULATE.UNBIND SI::UNWIND) PRINTPACKET +(printout) SEDIT::LINEARIZE-COMMENT (SEDIT::OUTPUT-CONSTANT-STRING SEDIT::LINEARIZE SEDIT::OUTPUT-CR) +PRINTPUPQUEUE (BSPPRINTPUP printout TERPRI) \OPENFILE (\DO.PARAMS.AT.OPEN) \SPPCONNECTION (\BLT +\SPP.CREATE.WATCHER) \LEAF.OPENERRORHANDLER (printout TERPRI) CL:REM (DECLARE) \SPP.HANDLE.ATTN ( +printout TAB) \DO.PARAMS.AT.OPEN (DECLARE \EXTERNALFORMAT SETFILEINFO CHARSET CONVHANKAKU) PFI.ENQUEUE + (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) \CLEARSYSBUF (DECLARE) MENUWRESHAPEFN (DELETEMENU +UPDATE/MENU/IMAGE DSPFILL ADDMENU SHOWSHADEDITEMS) \GETKEY (DECLARE FREPLACEFIELD WAIT.FOR.TTY \CLOCK0 + \BOXIPLUS \TTYBACKGROUND \WAIT.FOR.TTY FREERESOURCE) FIXAPPLY (MARKASCHANGED RETDWIM FIX89TYPEIN +FIXAPPLY1) CL:ROOM (CL:FORMAT) \LEAF.OPENFILE (\LEAF.CLOSEFILE \LEAF.SETCREATIONDATE +\LEAF.GETFILEDATES \LEAF.SETFILETYPE) MAKEMAINWINDOW (WINDOWADDPROP) \WAIT.FOR.TTY (AWAIT.EVENT) +\ENQUEUE.TIMER (\BOXIPLUS) CLOSEPUPSOCKET (\FLUSHPUPSOCQUEUE) \TTYBACKGROUND (WAIT.FOR.TTY MAPC) +\DRAWELLIPSE.PRESS (\DRAWCURVE.PRESS MOVETO) \COS.OLD (DECLARE) CHARSET (\ILLEGAL.ARG IMAGEOP) +SEDIT::RELINEARIZE (BLTSHADE SEDIT::COMPUTE-ALL-FORMATS SEDIT::GENERATE-LINEAR-FORM CL:FUNCALL SELECTQ + SEDIT::LINE-FINISHED SEDIT::REPAINT-NEW-LINE DECLARE SHOULDNT FREPLACEFIELD +SEDIT::CLEAN-UP-AFTER-RELINEARIZATION) MULTIFILEINDEX1 (RPLACA CLOSEF) FW-INIT-PROPS (DECLARE printout + PRIN1 SELECTQ SHOULDNT) \IMAGEUSERPROP (LISTPUT) SETFILEINFO (\EXTERNALFORMAT) CALL.MOVENODEFN ( +APPLY*) ICMLARRAY.GETMENUWGROUP (DSPSCROLL DSPFONT MOVEW REDISPLAYW ATTACHWINDOW) LISTHARD (MAPC) +WAIT.FOR.TTY (SPAWN.MOUSE \GETSTREAM OPENW AWAIT.EVENT) FIX89TYPEIN (PRIN1 RETDWIM) \DRAWLINE.PRESS ( +DRAWDASHEDLINE \DRAWCURVE.PRESS) \RTP.CLEANUP (\RTP.ACTION CLOSEPUPSOCKET APPLY* +\BSP.FLUSH.SOCKET.QUEUES) WHO-LINE-VMEM (DECLARE) INITDATATYPES (CREATEPAGES SETQ.NOREF) +\TEDIT.ITALIC.CARET.OFF (TEDIT.CARETLOOKS \TEDIT.SHOWCARETLOOKS) CL:SCALE-FLOAT (CL::%%FLOAT-UNBOX) +CHANGECALLERS (MAPC UPDATEFILES FRPLACD ERROR EDITFROMFILE UPDATECHANGED) PRINT10TO3 (FRESHLINE +PRINTNSHOSTNUMBER) \RECLAIMCODEBLOCK (\DELREF \MAP-CODE-POINTERS) \COURIER.RECORDTRAN (/RPLACA FRPLACD + ERROR) COMPILER::ALPHA-MACROLET (MAPC) VRULE.DISPLAYFN (SELECTQ BITBLT DRAWLINE) \TYPEGLOBALVARIABLE +(PUTPROP) \SAVESYSBUF (DECLARE MAPC) \RTP.HANDLE.PUP (SELECTC \RTP.HANDLE.RFC \RTP.ACTION +\RTP.SHOW.FAILURE BSP.OTHERFN DECLARE) COURIER.WRITE.SEQUENCE.UNSPECIFIED (SELECTQ PUTWORD DECLARE +PUTLONG COURIER.WRITE.FAT.STRING COURIER.WRITE.STRING COURIER.WRITE.SEQUENCE.UNSPECIFIED \CWSU.DEFAULT + COURIER.WRITE \COURIER.UNKNOWN.TYPE) SCANBACK (DECLARE ADD1VAR) \ASSIGNDATATYPE1 (LISPERROR +UNINTERRUPTABLY \NEWPAGE \MAPMDS \BLT \ADDREF) BITBLT.INSERT (BITBLT) \ADD.ROUTING.TABLE.ENTRY ( +\CHECK.ROUTING.TABLE \RPLPTR) BESTNSADDRESS (MAPC BLOCK ERROR printout TERPRI) CL:SEARCH (CL:ERROR) +HARDCOPYW (ERROR ADD.PROCESS) SEDIT::ADD-MENU (printout TERPRI ATTACHWINDOW WINDOWADDPROP) +\LEAF.WRITEPAGES (\LEAF.SETCREATIONDATE \LEAF.LOOKUPCACHE \BLT \SENDLEAF) DINFO.GET.GRAPH.WINDOW ( +WINDOWPROP) \PROC.CODEFORTFRAME (\CALLME CLEARSTK \KEYBOARDON \MP.ERROR INITIALEVALQT +\REPEATEDLYEVALQT) \ICONW.REPAINTFN (TOTOPW BITBLT) \FM.TOGGLE-CHANGESTATE (DECLARE) \PEEKSYSBUF ( +BLOCK) ADDTOFILES? (PRIN1 SELECTQ LINBUF SYSBUF printout PRIN2 SPACES SELCHARQ SHOWDEF PRINT ADDNEWCOM + SAVESET ADDFILE BKBUFS UPDATEFILES) \PROCESS.INIT (\DEFINEDEVICE \LOCKFN /PUTD MOVD) \KEYBOARDINIT ( +DECLARE MOUSECHORDWAIT) COMP.DECLARE1 (SET) \UNQUEUE.TIMER (ERROR) \DSPOPERATION.IP (\ILLEGAL.ARG) +\ENQUEUE (UNINTERRUPTABLY FRPLACD ERROR) \HANDLE.RAW.10TO3 (\MAYBEPRINTPACKET SELECTC DECLARE +\NOTE.10TO3 ENCAPSULATE.ETHERPACKET PRINT10TO3 TRANSMIT.ETHERPACKET printout PRIN1 +\RELEASE.ETHERPACKET) MOUSECHORDWAIT (DECLARE) \PROCESS.EVENTFN (DEL.PROCESS SUSPEND.PROCESS +\SUSPEND.PROCESS) EDITMOVESUBTREE (printout TERPRI FLIPNODE GETMOUSESTATE NOT.TRACKCURSOR) REMPROP ( +ERRORX FRPLACD SETPROPLIST) FIXSPELL2 (MAPRINT LISPXPRIN1 LISPXPRIN2) \ALLOCLOCKED (\LOCKCELL) CLOSEW +(WINDOWOP) FILEPKGTYPE (/SETTOPVAL /RPLACD /PUTPROP /REMPROP) PUTPROP (ERRORX FRPLACD FRPLACA +SETPROPLIST) KEYACTIONTABLE (\ILLEGAL.ARG MAPC) \DRAWCURVE.PRESS (SHOW.PRESS \PRESSCURVE2 SETXY.PRESS) + \RTP.INFO.HOOK (DECLARE DSPFONT CLEARW PPSOC) \VFMSplit (DECLARE \VFMFind \VFMInsert) +SETF-MACRO-FUNCTION (SELECTQ PUTD) MOVEATTACHEDWINDOWTOPLACE (SHOULDNT SHAPEW MOVEW) OPENPUPSOCKET ( +\FLUSHPUPSOCQUEUE DECLARE ERROR UNINTERRUPTABLY SELECTQ) \SPP.CREATE.CON (\BLT) \LEAF.READPAGES ( +AWAIT.EVENT RELEASE.PUP \BLT \LEAF.ERROR HELP \CLEARBYTES) DELETE.LONG.SEGMENT1 (MOVE.TO.LINE +FORWARD.DELETE.TO DO.DELETE.LINES RENUMBER.LINES KILLSEGMENT KILL.LINES ERASE.TO.END.OF.LINE +TYPE.BUFFER ADJUSTLINE) \TEDIT.ITALIC.SEL.OFF (\TEDIT.ITALIC.CARET.OFF) \RECLAIMARRAYBLOCK (\MP.ERROR +SELECTC \RPLPTR \MERGEFORWARD) FB.DISPLAY.COUNTERS (DSPRIGHTMARGIN LINELENGTH MAPC PRIN3 BLTSHADE +FRPLACD) CL:SINH (DECLARE) PRINTBITMAP (DECLARE printout PRIN1 SPACES \WRITEBITMAP) PFI.NEW.LISTFILES1 + (PFI.ENQUEUE) TEDIT.REDO (RESETLST \FIXSEL TEDIT.NORMALIZECARET) TOPW.BUTTONEVENTFN (TOTOPW +GETMOUSESTATE) \PAGED.REVALIDATEFILELST (SELECTQ MAPC SHOULDNT \PRINT-REVALIDATION-RESULT) +\BSP.SKIPBYTES (\BSP.CLEANUP.INPUT FREPLACEFIELD) SEDIT::SPLIT-COMMENT (SEDIT::CLOSE-OPEN-NODE +SEDIT::SET-POINT) \CAR.UFN (\CALLME) CHECKSYNONYM (MAPC) \TEDIT.GET.CHARLOOKS (FREPLACEFIELD) +\READNUMBER.FLASHAREA (DISMISS) \CDR.UFN (\CALLME) COMPSET (SELECTQ PRIN1) FORGETPAGES (\RELEASEBUFFER +) \LFFindDirHole (\SETFILEPTR \LFCheckBang UNINTERRUPTABLY) \KEYBOARDEVENTFN (DECLARE MAPC) +GRAPHBUTTONEVENTFN (TOTOPW FLIPNODE GETMOUSESTATE) RESTOREMAP (DOPMAP \RELEASEBUFFER) +TWODINSPECT.REPAINTFN (WITH-INSPECTOR-ENV TWODINSPECT.PRINTELEMENT INSPECT.INVERTSELECTION) +\TEDIT.CREATEW.FROM.REGION (WINDOWPROP GETPROMPTWINDOW) \DELETECH (\TEDIT.CHECK \DELETEPIECE +UPDATEPCNODES HELP FRPLACD \TEDIT.HISTORYADD MAPC APPLY* \TEDIT.DIFFUSE.PARALOOKS) KEYACTION ( +\ILLEGAL.ARG) \CHANGECHARSET.HCPYMODE (UNINTERRUPTABLY) \LEAF.TRUNCATEFILE (\SENDLEAF) BREAK.PROCESS ( +\DOHELPINTERRUPT1 \PROCESS.MAKEFRAME) ICMLARRAY.GETREGIONFN (RPLACD) \FM.TOGGLE-DOWNFN (BLTSHADE) +CL::%%TAN-FLOAT (DECLARE) /RPLNODE (UNDOSAVE FRPLACA) \UNWIND.UFN (\PUTBASE \MAKEFREEBLOCK \SLOWRETURN +) PFI.PRINT.BITMAP (TERPRI DSPNEWPAGE SCALEDBITBLT MOVETO RPTQ \OUTCHAR) CL::ESTABLISH-PREDICATE ( +REMHASH) CL::TIME-CALL (CL::%%GET-TIMING-INFO CL::%%STATS-OBJECT-DIFFERENCE CL::TIME-FORMAT +CL::%%PRINT-TIMING-ITEM CL::%%PRINT-TIMING-INFO) TEDIT.NEXT (SELECTQ \SHOWSEL \TEDIT.SET.SEL.LOOKS +\FIXSEL TEDIT.NORMALIZECARET TEDIT.PROMPTPRINT SHOULDNT) COMP.COMMENT (COMPERRM) \CHECKAPPLY* (\PUTD) +\PAGED.REVALIDATEFILES (SELECTQ MAPC FDEVOP SHOULDNT \PRINT-REVALIDATION-RESULT) ICMLARRAY (FRPLACD +ICMLARRAY.ATTACHDISPLAY) FB.CREATE.FILEBUCKET (FB.ANALYZE.PATTERN SELCHARQ FB.CHECK.NAME.LENGTH) +RETDWIM (LISPXPUT DWIMARKASCHANGED CL:THROW RETEVAL RETAPPLY RELSTK ERROR! MAPC CLISPERROR) +\HARDRETURN (\CONTEXTSWITCH) COPY (FRPLACD) \TURN.ON.PROCESSES (MAPC RESETRESTORE PROCESSWORLD) +\LFDirectorySearch (\SETFILEPTR \LFCheckBang) CREATEMDSTYPETABLE (CREATEPAGES FRPTQ MAPC) \RPLPTR.UFN +(\ADDREF \DELREF \PUTBASEBYTE \PUTBASE) \PUTBASEBITS (DECLARE) \LOOKUPPUPNUMBER (FREPLACEFIELD +\STORENSHOSTNUMBER DISCARDXIPS SENDXIP BLOCK SELECTC printout PRIN1 RELEASE.XIP) \NOTE.10TO3 (DECLARE +\BLT FREPLACEFIELD) \GETBRUSHFONT.PRESS (\VECFONTINIT) \HTFIND (CHECK DECLARE \GC.ENTER.BIGREFCNT +\MP.ERROR \GC.MODIFY.BIGREFCNT .GETLINK. \DISABLEGC1 .DELLINK.) \BUFFERED.REVALIDATEFILELST (SELECTQ +MAPC \PRINT-REVALIDATION-RESULT SHOULDNT) FONTNAME.IP (DECLARE) \SCALEDBITBLT.IP (\MOVETO.IP +SHOWBITMAP.IP) \LEAF.SETFILEINFO (\LEAF.CLOSEFILE) INSPECT.INVERTSELECTION (INSPECT.INVERTREGION) +MOVE.TO.START.OF.WORD (MOVE.BACK.TO) DINFO.LOOKUP (CLEARW TERPRI FLASHWINDOW) \FM.TOGGLE-SETUP ( +DECLARE LISTPUT) \BSP.PREPARE.OUTPUT (DECLARE OBTAIN.MONITORLOCK MONITOR.AWAIT.EVENT \BSP.SENDBUFFER +SI::MONITOR-UNWIND) SEDIT::DEGRADE-COMMENT (RPLACA SEDIT::NOTE-CHANGE) ADDTOFILE (ADDNEWCOM MAPC +ADDFILE) CREATEHASHFILE (PRINTPTR) \TEXTOPENF-SUBTREE (\TEDIT.REOPEN.STREAM) ONEDINSPECT.PRINTELEMENT +(MOVETO) SI::INTERNAL-THROW (FRPLACD) CL::%%GET-TIMING-INFO (CL::%%CAPTURE-BEFORE-STATS +CL::%%CAPTURE-AFTER-STATS CL::%%STATS-OBJECT-DIFFERENCE) \TEDIT.ABBREV.EXPAND (\SETUPGETCH +TEDIT.SETSEL TEDIT.DELETE TEDIT.INSERT) COMP.QUOTE (COMPERRM) \RPLACA.UFN (\DELREF \ADDREF) BCOMPL3 ( +COPYBYTES CLOSEF? DELFILE /SETATOMVAL) \BSP.FLUSHINPUT (\BSP.CLEANUP.INPUT) \PFNewPages (\PFTrimHelper + \VFMInsertPageGroup BLOCK \PFDsplyVolumes) BITBLT.DELETE (BITBLT BITBLT.ERASE) COURIER.WRITE.SEQUENCE + (\COURIER.TYPE.ERROR COURIER.WRITE.SEQUENCE.UNSPECIFIED PUTWORD DECLARE MAPC) \RPLACD.UFN (\DELREF +\ADDREF CHECK FREPLACEFIELD DECLARE) NSNET.DISTANCE (BLOCK) \PROCESS.MAKEFRAME0 (CHECK) TEDIT.CREATEW +(CLRPROMPT printout PRIN1 FREPLACEFIELD GETPROMPTWINDOW) MENU (DECLARE \DTEST TOTOPW GETMOUSESTATE) +PPSOC (printout PRINTCONSTANT PRINTNUM PRINTTIMER PPSOC.CURRENT TAB BSPPRINTPUP PRINTPUPQUEUE) +\CONS.UFN (RAID \ADDREF \StatsAdd1 DECLARE \PUTBASE .INCREMENT.ALLOCATION.COUNT. CHECK FREPLACEFIELD +\PUTBASEPTR \DELREF) ALISTS.WHENCHANGED (RETFROM) \TRANSLATE.10TO3 (DECLARE \BLT +ENCAPSULATE.ETHERPACKET \MAYBEPRINTPACKET TRANSMIT.ETHERPACKET) ShowIntervals (\VFMContextSet printout + DISPLAYWORDS) \SIN.OLD (DECLARE) CLISPFOR0 (DECLARE /RPLNODE CLISPFORERR FRPLACD PRIN1 PEEKC +ERRORMESS ERROR! ERRORMESS1 MAP PRINT RPLACA MAPC CLISPTRAN) TWODINSPECT.BUTTONEVENTFN (TOTOPW +WITH-INSPECTOR-ENV GETMOUSESTATE) TEDIT.PARALOOKS (\TEDIT.CONVERT.TO.FORMATTED \SHOWSEL +\TEDIT.MARK.LINES.DIRTY \TEDIT.HISTORYADD TEDIT.RESET.EXTEND.PENDING.DELETE TEDIT.UPDATE.SCREEN +\FIXSEL) ADDSPELL2 (/RPLACA) \RESETKEYBOARD (\SETIOPOINTERS \PUTBASE DECLARE \DAYTIME0) IMAGEOBJCREATE + (\ILLEGAL.ARG) PPROC (printout PRIN1 FLUSHRIGHT TAB) SEDIT::DELETE-COMMENT (SEDIT::MAP-COMMENT-INDEX) + MB.NWAYMENU.NEWBUTTON (TEDIT.INSERT.OBJECT TEDIT.INSERT TEDIT.LOOKS) FB.INSERT.FILE (DECLARE +TB.INSERT.ITEM FB.INSERT.DIRECTORY) \ENDPAGE.PRESS (SHOW.PRESS \ENTITYEND.PRESS \WOUT COPYBYTES +\PARTEND.PRESS) \NOFILESNEXTFILEFN (SELECTQ RPLACA) \DRAWCURVE.PRESS.LINE (SELECTQ SETXY.PRESS +SHOWRECTANGLE.PRESS) TEDIT.SUBSTITUTE (TEDIT.PROMPTPRINT \SHOWSEL TEDIT.RESET.EXTEND.PENDING.DELETE +TEDIT.NORMALIZECARET TEDIT.SHOWSEL TEDIT.DELETE \TEDIT.INSERT.PIECES FREPLACEFIELD TEDIT.INSERT +\FIXDLINES \FIXILINES DECLARE SELCHARQ \INSERTCR \INSERTCH \TEDIT.MARK.LINES.DIRTY TEDIT.UPDATE.SCREEN + \FIXSEL) FLUSHRIGHT (TAB) \TEDIT.SHOWCARETLOOKS (TEDIT.PROMPTPRINT) SEDIT::INSERT-COMMENT ( +SEDIT::DELETE-COMMENT SEDIT::MAP-COMMENT-INDEX SEDIT::INSERT-COMMENT-CHARS SEDIT::NOTE-CHANGE) +\CREATECELL (RAID) PPROC1 (printout TAB TERPRI) INTCHAR (SELECTQ UNINTERRUPTABLY MAPC SETINTERRUPT) +NEWDEFC (VIRGINFN CL:FORMAT SAVEDEF /PUTD /PUTPROP) \PROC.AFTER.WINDOWWORLD (WINDOWPROP ADD.PROCESS) +\DSPYPOSITION.IP (SHOW.IP SETY.IP) CL:TANH (DECLARE) GETWINDOWPROP (\ILLEGAL.ARG) MSINTERPRETSET ( +printout PRIN1) NUMBERPAD.READ (SPAWN.MOUSE WINDOWADDPROP TOTOPW NUMBERPAD.READER.HANDLE.CHAR DISMISS +WINDOWDELPROP) \BOUT (\ILLEGAL.ARG) PPROCWINDOW (DSPRIGHTMARGIN) \CHECK.PQUEUE (printout PRIN1 DECLARE + SI::RESETUNWIND) \PRESSCURVE2 (\ENTITYEND.PRESS \ENTITYSTART.PRESS SETXY.PRESS LOADPOLY \VECPUT +\ENDVECRUN) \KEYACTION1 (DECLARE \PUTBASE \RPLPTR \ILLEGAL.ARG) INTERRUPTCHAR (UNDOSAVE) SHOWREGION ( +MOVETO RELDRAWTO) PACKFILENAME.STRING (DECLARE \ILLEGAL.ARG MAP) COMPILER::COMPILE-ONE-LAMBDA ( +CL:UNWIND-PROTECT COMPILER::RELEASE-TREE) \KEYNAMETONUMBER (DECLARE) FB.COPY/RENAME.COMMAND ( +FB.ALLOW.ABORT) \RESTLIST.UFN (\GC.HANDLEOVERFLOW) CLISPIFY2B (CLISP4 PUTHASH) FULLNAME (SELECTQ +\ILLEGAL.ARG) PPROCRESHAPEFN (DSPRIGHTMARGIN) \TEDIT.DEFAULTS.CARET (TEDIT.CARETLOOKS) +PFI.PASS.COMMENT (TERPRI \OUTCHAR) CLISPCAR/CDR (NCONC DWIMIFY2? CLISPTRAN DWIMERRORRETURN) \MISCN.UFN + (DECLARE \INIT-MISCN-TABLE) RCOMP3 (SELECTQ HELP /SET PRIN1 PRIN2 PRINT) SCROLLBYREPAINTFN (BITBLT +REDISPLAYW) GRAPHADDLINK (APPLY*) CL:SUBSTITUTE (CL:ERROR) \RPLCONS (\ADDREF \DELREF CHECK +FREPLACEFIELD \StatsAdd1 DECLARE \PUTBASE .INCREMENT.ALLOCATION.COUNT. RPLACD) \VFMInsert1 ( +\VFMSmartBLT \VFMPutNext \VFMMarkBufferDirty) \FIXDLINES (\TEDIT.FIXDELSEL) GETINTERRUPT (FRPLACD) +MSNEXTWORD (SELECTQ MSSETWORDTYPE) MAKE-UNICODE-TRANSLATION-TABLES (MAPC RPLACD) PPROCREPAINTFN ( +MOVETO DSPFILL PPROC CLEARW) COURIER.WRITE.STRING (PUTWORD \BOUTS) GETFILEINFO (DECLARE) +\FTP.FLUSH.TO.MARK (\OUTCHAR) \CANONICALIZE.NSADDRESS (RPLACD \BLT) \RTP.SOCKET.PROCESS (DECLARE +OBTAIN.MONITORLOCK RESETSAVE PROCESSPROP SPREADAPPLY*) \ENVCALL.UFN (\CONTEXTSWITCH) +SET-CONNECTED-DIRECTORY-INTERACTIVELY (DECLARE CLEARW ALLOW.BUTTON.EVENTS) WTFIXLOADEF (LOAD LOADFNS) +\DOINTERRUPTHERE (DECLARE SETERRORN FLASHWINDOW) ICONW.PRINT-JUSTIFIED (DSPFONT DSPOPERATION +LINELENGTH DSPLEFTMARGIN DSPRIGHTMARGIN DSPFILL MOVETO RELMOVETO \OUTCHAR TERPRI) DOTABS (DOTABS TAB) +\STKSCAN (DECLARE SELECTC) PUTDEFN (\LOCKCELL AOUT BOUTZEROS FILEBLOCKTRAILER) \ILLEGAL.DEVICEOP ( +FRPLACD) CL:NBUTLAST (RPLACD) \LFFileName (RPLCHARCODE) REHASHFILE (SPACES CLOSEHASHFILE) +\MAIKO.IO-INTERRUPT (CL:FUNCALL) TWODINSPECT.COPYBUTTONFN (TOTOPW DECLARE INSPECT.FLIPSELECTION +BKSYSBUF.GENERAL BLOCK) CL:WRITE-LINE (CL:TERPRI) OPT.FRAMEVAR (OPT.PRATTACH OPT.PRDEL RPLACA FRPLACA) + MSPATHSPRINTFN (PRIN1 PRIN2) \READBINARYBITMAP (\BINS) \LFMakeDirHole (UNINTERRUPTABLY \SETFILEPTR +\BOUT FORCEOUTPUT) \UNBOXFLOAT3 (\SLOWRETURN DECLARE \MAKEFREEBLOCK) TEDIT.UNDO (RESETLST +TEDIT.UNDO.MOVE) RESETKEYACTION (DECLARE \ILLEGAL.ARG \BLT) COMP.COND (COMP.STJUMP COMP.STTAG) +\DOHELPINTERRUPT (FLASHWINDOW \DOHELPINTERRUPT1) RESHAPEBYREPAINTFN (WXOFFSET WYOFFSET REDISPLAYW +BITBLT) \PARAS.IN.SEL (\FIXSEL MAPC) CONTROL-T (FLASHWINDOW PRINTOUT printout SELECTQ PRIN2 +\CONTROL-T.PRINTRATIO TERPRI) \MAIKO.CONSOLE-LOG-PRINT (FRESHLINE PRIN1) DINFO.ADD.FMENU ( +REMOVEPROMPTWINDOW ATTACHWINDOW WINDOWDELPROP WINDOWADDPROP) \SELECTPROCESS (FRPLACD NCONC RPLACA +SPAWN.MOUSE) BRKDWNRESULTS1 (RPLACA RPLACD ADD1VAR) PFI.INDEX.BREAK (DRAWLINE) \ELIDE.PRINT.TAIL ( +\OUTCHAR) TTYIN.READ?=ARGS (FREERESOURCE DECLARE) \DOHELPINTERRUPT1 (SPAWN.MOUSE CLEARBUF INTERRUPT) +\HANDLE.NS.ROUTING.INFO (\ADD.ROUTING.TABLE.ENTRY \BLT) \FTP.FLUSH.TO.EOC (\OUTCHAR) \PRINDATUM ( +DECLARE FREERESOURCE) \TEDIT.DELETE (TEDIT.NORMALIZECARET \FIXDLINES \DELETECH TEDIT.UPDATE.SCREEN +\FIXSEL) \PROC.FINDREALFRAME (SELECTQ) PROCESS.STATUS.WINDOW (CLOSEW ADDMENU SHADEITEM) +DINFO.DEFAULT.MENU (CLEARW PROCESSPROP DINFO.ADD.FMENU) \FM.MOMENTARY-SETUP (DECLARE) +\PROCESS.MAKEFRAME (\CONTEXTSWITCH \RUN.PROCESS) MB.NWAYBUTTON.SELFN (BITBLT) UPDATEFILES (/SETTOPVAL +/NCONC1) \WRITEBITMAP (FRPTQ) \SETPRINTLEVEL (DECLARE \BOUT CLEARBUF PRIN3 SELCHARQ PRINTLEVEL +BKSYSBUF) OPT.FRAMEDEL (OPT.PRDEL MAPC) SHADEITEM (\AddShade RESHADEITEM) \NSFILING.GETFILE ( +\ILLEGAL.ARG FREPLACEFIELD \NSRANDOM.RELEASE.LOCK DECLARE RELEASE.MONITORLOCK OBTAIN.MONITORLOCK) +\LFMakeLeaderPage (DECLARE \PFPutPage) CLISPATOMARE2 (DWIMERRORRETURN FRPLACA FRPLACD) \RETURN ( +DECLARE RAID \SMASHLINK) \PFTransferPage (SwapIn&Dirty UNINTERRUPTABLY \MISCAPPLY* \CONTEXTSWITCH +DiskError LISPERROR) \CURVE2 (DECLARE \CURVESTART .SETUP.FOR.\BBTCURVEPT. \INSURETOPWDS \CURVE +.WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN \SOFTCURSORUPCURRENT LOADPOLY) \GETCHARCODE (DECLARE) \ARG0 ( +CHECK) FIND.SYMBOL (PRINT CL:FORMAT) CHECK/MENU/IMAGE (\ILLEGAL.ARG UPDATE/MENU/IMAGE UPDATEWFROMIMAGE + DSPXOFFSET DSPYOFFSET) GETDEF (DECLARE SELECTQ DWIMDEF) \LFMakeDirEntry (\SETFILEPTR \LFCheckBang +\LFDirectoryScrambled UNINTERRUPTABLY \LFDWOUT \WOUT DECLARE MAPC FORCEOUTPUT) EDIT4E1 (PRIN2 PRIN1 +PRINT) CLISPATOMIS2 (CLRPLNODE CLISPATOMIS2) \SETRECLAIMMIN (\BOUT CLEARBUF PRIN3 SELCHARQ RECLAIMMIN +BKSYSBUF) PARAMETRICSPLINE (ERROR) ERROR! (SELECTQ \SMASHLINK ABORT) +TWODINSPECT.DEFAULT.VALUECOMMANDFN (SELECTQ INSPECT PROMPTPRINT TWODINSPECT.SETELT) TEDIT.INSERT ( +TEDIT.SETSEL TEDIT.DO.BLUEPENDINGDELETE TEDIT.CARETLOOKS TEDIT.NORMALIZECARET \SHOWSEL DECLARE +SELCHARQ \INSERTCR \INSERTCH \FIXILINES TEDIT.INSERT.UPDATESCREEN) \NSPRINT.FULL.REQUEST.STATUS ( +RESETSAVE) \TEXTCLOSEF-SUBTREE (CLOSEF?) \DRAWPOLYGON.IP (SHOW.IP APPENDOP.IP MOVETO.IP \IMAGEPATH.IP +\SETBRUSH.IP LINETO.IP SETXY.IP) \EP.PUT.AUX (PutUnboxed FREPLACEFIELD RPLACD) PRIN3 (DECLARE +\PRINDATUM) CL::%%SIN-FLOAT (DECLARE) SHIFT.BITMAP.UP (BITBLT) MONITOR.AWAIT.EVENT ( +RELEASE.MONITORLOCK OBTAIN.MONITORLOCK) PRINT-BITMAPS-NICELY (PRINTOUT CL:MACROLET) DEFINEFONT.IP ( +APPENDIDENTIFIER.IP APPENDINTEGER.IP APPENDOP.IP SCALE.IP FSET.IP) \MAIKO.ETHER-INTERRUPT ( +UNINTERRUPTABLY DECLARE OBTAIN.MONITORLOCK \RCLK \MAYBEPRINTPACKET \HANDLE.RAW.PACKET SI::MONITOR-UNWIND +) \CLOSEF.PRESS (\ENDPAGE.PRESS \WOUT \BCPLSOUT.PRESS DECLARE \PARTEND.PRESS COPYBYTES \PAGEPAD.PRESS +\SIGNEDWOUT \FIXPOUT SETFILEPTR) BCOMPL2 (DECLARE SPECVARS LOCALVARS SELECTQ SET COMPEM COMPILE1 +BRECOMPILE1 BLOCKCOMPILE1) \PRINT-USING-ADDRESS (.SPACECHECK. \OUTCHAR \LITPRIN \CKPOSSOUT) +FB.CANONICAL.DIRECTORY (WINDOWPROP) \PROCESS.GO.TO.SLEEP (\ENQUEUE.EVENT/LOCK \ENQUEUE.TIMER +\PROC.RESUME \DECUSECOUNT \RELEASE.PROCESS) DASHES (TERPRI FRPTQ) SPAWN.MOUSE (\SET.PROCESS.NAME +ADD.PROCESS) \FTP.CLEANUP (DECLARE BLOCK MAP.PROCESSES CLOSEBSPSTREAM) +TEDIT.RESET.EXTEND.PENDING.DELETE (\TEDIT.SET.SEL.LOOKS) \MAIKO.10MBTURNONETHER (\MAIKO.ETHERSUSPEND +\BLT \STORENSHOSTNUMBER) \LEAF.REOPENFILE (\LEAF.CLOSEFILE \LEAF.SETCREATIONDATE) DO.INSERT.LINE ( +MOVETO BITBLT BITBLT.ERASE) COMPILER::COMPILE-AND-DUMP-1 (CL:PRINC BLOCK) XCL::%%DEFINE-TYPE-DELDEF ( +/PUTHASH) \DRAWLINE.UFN (DECLARE .DRAWLINEX. .DRAWLINEY.) EDITMOVEREGION (PROMPTPRINT) +WHO-LINE-CURRENT-DIRECTORY (DECLARE MERGEINSERT) COMPILE-IN-CORE (DECLARE SI::RESETUNWIND) +COMPILER::ALPHA-IL-FUNCTION (COMPILER::CHECK-FOR-UNKNOWN-FUNCTION) PUTDEF (SELECTQ FNS.PUTDEF +VARS.PUTDEF FILES.PUTDEF FILEPKGCOMS.PUTDEF EVAL) MSPATHS4 (PUTHASH MAPC) RESET.INTERRUPTS (DECLARE) +DINFO.SHOWGRAPH (SHAPEW) FW-INIT-MENUS (DECLARE MAPC) \MOVETO.IP (SHOW.IP) \PRINTBINARYBITMAP ( +\ILLEGAL.ARG \WOUT DECLARE \BOUTS) ADDMENU (\ILLEGAL.ARG BLTMENUIMAGE MOVEW SHOWSHADEDITEMS OPENW +WINDOWADDPROP EXTENDEXTENT) RIGHTW.BUTTONEVENTFN (TOTOPW GETMOUSESTATE) FIND.PACKAGE (DECLARE SHOULDNT +) \PSWOP.SELECTED (PROCESS.BACKTRACE PROCESS.EVAL PROCESS.APPLY DEL.PROCESS DECLARE BLOCK +PROCESS.STATUS.WINDOW ERROR! RESTART.PROCESS WAKE.PROCESS BREAK.PROCESS \SUSPEND.PROCESS) +FB.EDITCOMMAND (FB.ALLOW.ABORT FB.BROWSECOMMAND FB.EDITCOMMAND.ONEFILE FB.FASTSEECOMMAND) +\GCRECLAIMCELL (CHECK SELECTC \FREELISTCELL \PUTBASEPTR \ADDREF) TWODINSPECT.DEFAULT.TITLECOMMANDFN ( +GETMOUSESTATE SELECTQ TWODINSPECT.REDISPLAY PROMPTPRINT) TWODINSPECT.CLOSEFN (DETACHALLWINDOWS) +\CONTROL-T.PRINTRATIO (TERPRI) \PSW.SELECTED (SHADEITEM) \CREATECHARSET.PRESS (DECLARE ERROR) +\TEDIT.CENTER.SEL.REV (MAPC LISTPUT TEDIT.PARALOOKS TEDIT.PROMPTPRINT) FB.MAKE.BROWSER.BUSY (RESETSAVE + SHADEITEM PUTMENUPROP) COMPILE.FILE.RESET (CLOSE-AND-MAYBE-DELETE CLOSEF? /SETATOMVAL) +SEDIT::TRY-REUSING-BITS (SEDIT::SHIFT-BLOCK) PROCESS.NAME (\SET.PROCESS.NAME) PRESSBITMAP (ERROR +printout PRIN1 \WRITEPRESSBITMAP) FB.GREATEST.PREFIX (SELCHARQ) BRKDWNRESULTS2 (LISPXPRIN2 LISPXTAB +LISPXTERPRI) \RETCALL (\CONTEXTSWITCH) CHANGE-TTY-PROCESS-INTERACTIVELY (DECLARE) TB.RESHAPEFN ( +ALLOW.BUTTON.EVENTS TB.SET.FONT WYOFFSET TB.DISPLAY.LINES) BRKDWNCOMPILE2 (DECLARE SI::RESETUNWIND) +DINFO.SELECT.GRAPH (DECLARE ALLOW.BUTTON.EVENTS) DO?CMD.ERRORHANDLER (SAVE.CURSOR GO.TO.FREELINE +TTPRIN1COMMENT RESTORE.CURSOR BACKWARD.DELETE.TO) MSONPATH (MAPC) \POP.N.UFN (\SLOWRETURN +\MAKEFREEBLOCK) SEDIT::COPY-SELECTION-COMMENT (FRPLACD TERPRI) NCREATE2 (UNINTERRUPTABLY \BLT) +\FTP.RENAMEFILE (CLEAR.LEAF.CACHE \FTP.PRINTPLIST .EOC. \RELEASE.FTPCONNECTION) DINFO.FIND ( +FLASHWINDOW PRINTOUT printout) COERCETOBITMAP (BITBLT TOTOPW) FW-RE-INIT (DECLARE FW-INIT-PROPS +DSPFONT) FW-WIPE (DECLARE MAPC) \NSFILING.GENERATEFILES (RESETLST RPLACA FRPLACD PRINTOUT TERPRI +MAPRINT RESETSAVE) \LEAF.EVENTFN (SELECTQ \FLUSH.OPEN.STREAMS \CLOSELEAFCONNECTION +\SEQUIN.FLUSH.CONNECTION \REMOVEDEVICE CLOSEPUPSOCKET \PAGED.REVALIDATEFILELST) \DRAWCIRCLE.PRESS ( +DRAWCURVE) MASTERSCOPE1 (printout PRIN1 ERSETQ PROMPTCHAR) \BLT (\PUTBASE) CNDIR (DECLARE) +HEADINGOP.IP (APPENDOP.IP SETXY.IP SETFONT.IP PRIN3 SHOW.IP RELMOVETO TERPRI FSET.IP) UNMARKASCHANGED +(/RPLACA /RPLACD) FW-INIT (DECLARE FW-WIPE FW-RE-INIT FW-RESET) MASTERSCOPEXEC (SELECTQ RETFROM +FRPLACA) CLISPCAR/CDR2 (DWIMERRORRETURN) \PUTBASEBYTE (\PUTBASE) OPENRTPSOCKET (\INIT.RTPPROCESS +OBTAIN.MONITORLOCK RESETSAVE ERROR \RTP.ACTION \ILLEGAL.ARG MONITOR.AWAIT.EVENT CLOSERTPSOCKET +\RTP.SHOW.FAILURE) SHIFT.BITMAP.DOWN (BITBLT) \HANDLE.RAW.3TO10 (\MAYBEPRINTPACKET SELECTC \BLT +\NOTE.3TO10 ENCAPSULATE.ETHERPACKET PRINT3TO10 TRANSMIT.ETHERPACKET \RELEASE.ETHERPACKET) +\CLEAR.ROUTING.TABLE (\RPLPTR) COMPILER::COLLECT-CODE (COMPILER::GENCODE) EDITFA (PRIN1 SPACES PRIN2) +ATAN (DECLARE) DIRECTORYNAME (DECLARE) SEDIT::SHIFT-BLOCK (BLTSHADE SEDIT::REPAINT) ADDSPELL1 (FRPLACD + ADD1VAR NCONC1 RPLNODE UNDOSAVE) KEYDOWNP (DECLARE) \BITBLT.IP (\MOVETO.IP SHOWBITMAP.IP) +\PUTBASEPTR.UFN (\PUTBASE) LOOKUP-SYMBOL (DECLARE CL:FORMAT) CL:NUNION (RPLACD) PREEDITFN (CLISPTRAN +MAPC) SPYOBJ.DISPLAY (DSPFONT RELMOVETO) \PUTBITS.UFN (\PUTBASE) XIPAPPEND.STRING (\PUTBASE +FREPLACEFIELD) PROCESS.BACKTRACE (ATTACHWINDOW DSPSCROLL DSPFONT DSPRESET BAKTRACE RELSTK) +CLIPBOARD-COPY-STREAM (\EXTERNALFORMAT) CL:UNION (RPLACD) \TEDIT.COPY.PIECEMAPFN (TEDIT.PROMPTPRINT +RETFROM) TTYINFOSTREAM (DECLARE) UNMAKEHARDCOPYMODESTREAM (DECLARE DSPXPOSITION DSPYPOSITION +DSPRIGHTMARGIN) \ADDBASE (.UNBOX. SELECTC \ILLEGAL.ARG CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) +\UPDATE.PROCESS.WINDOW (PROCESS.STATUS.WINDOW DSPFILL APPLY*) MSPATHS1 (TERPRI PRIN1 DOTABS TAB +SHOULDNT FRPLACA FRPLACD MAP MSPATHS1) CL:NINTERSECTION (RPLACD) LEAF.ASSURE.FINISHED (WITH.MONITOR +DECLARE OBTAIN.MONITORLOCK MONITOR.AWAIT.EVENT SI::MONITOR-UNWIND ERROR) FB.EXPUNGECOMMAND ( +FB.PROMPTWPRINT FB.ALLOW.ABORT MAPC FB.REMOVE.FILE FB.UPDATE.COUNTERS FB.PROMPTW.FORMAT) +\TEDIT.FOREIGN.COPY? (\SETUPGETCH BKSYSBUF COPYINSERT \SHOWSEL) CL::%%PRINT-TIMING-INFO ( +CL::%%PRINT-TIMING-ITEM) \SLOWPLUS2 (\CALLME) \DSPSCALE2.IP (SCALE2.IP) BAKTRACE (BACKTRACE PRIN2 +PRIN1 RELSTK TERPRI) CWINDOWPROP (printout PRIN1) MAKE-VECTOR (FILL-ARRAY) TTY/EDITE (ERROR RESETSAVE +PREEDITFN ERSETQ ERROR! PUTDEF SAVESET /SETPROPLIST PRIN1 ADDSPELL) \SLOWDIFFERENCE (\CALLME) +COMPILE-FILE-EX/IMPORT (PRINT) SEDIT::REUSE-LINEAR-FORM (FREPLACEFIELD) ADDTOVAR (EXEC-FORMAT +MARKASCHANGED SAVESET /SET DECLARE) EDITFERROR (PRINTOUT PRIN1 EDITDEF ERROR PUTDEF) +CREATETEXTUREFROMBITMAP (\ILLEGAL.ARG BITBLT) \SLOWTIMES2 (\CALLME) EDITDEF.FNS (EDITE CL:FORMAT ERROR +) UNION (DECLARE RPLACD) HASHFILESPLST1 (DECLARE) CL:NSET-EXCLUSIVE-OR (RPLACD) CL:NSET-DIFFERENCE ( +RPLACD) \SLOWQUOTIENT (\CALLME) \CHARWIDTH.PRESS (DECLARE) /DREMOVE (/RPLNODE /RPLACD) +RESHAPEALLWINDOWS (\ALLOCMINIMUMSIZES MAPC \ALLOCSPACETOGROUPEDWINDOWS) EDITF2 (FIXEDITDATE APPLY* +MARKASCHANGED) \SLOWIPLUS2 (\CALLME .UNBOX. SELECTC CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) +DINFO.HISTORIC.UPDATE (FLASHWINDOW DECLARE TERPRI) SCRATCHCONS (FRPLACD) GETPROMPTWINDOW (\ILLEGAL.ARG + REATTACHPROMPTWINDOW \PROMPTWINDOW.EXPAND DSPSCROLL \PROMPTWINDOW.SET.HEIGHT OPENW) \FM.ENDEDIT ( +\CARET.DOWN SETUPTIMER) \SLOWIDIFFERENCE (\CALLME .UNBOX. SELECTC CL::%%NOT-NONCOMPLEX-NUMBER-ERROR +.NEGATE.) ATTACHEDWINDOWS (DECLARE FRPLACD) MARKASCHANGED (MAPC /RPLACA DELFROMFILES UNDOSAVE) +\DUMP.COURIERPROGRAMS (TERPRI printout PRIN1 SPACES CHANGEFONT MAP TAB CL:FORMAT) COMP.PUNT (COMPERROR +) \SLOWITIMES2 (\CALLME .UNBOX. SELECTC CL::%%NOT-NONCOMPLEX-NUMBER-ERROR .NEGATE. .LLSH1.) +OLD.FIND.SYMBOL (COMPUTE.ATOM.HASH) MB.NB.SIZEFN (FRPLACD) GETDEF.I.S.OPR (SHOULDNT) +SEDIT::COMPUTE-SELECTION-POSITION-COMMENT (SEDIT::MAP-COMMENT-INDEX) \SLOWIQUOTIENT (\CALLME \IQUOTREM + .UNBOX. SELECTC CL::%%NOT-NONCOMPLEX-NUMBER-ERROR .NEGATE. .LLSH1. .LRSH1. SELECTQ ERROR) MSPATHS2 ( +UPDATEFN) SHIFT.BITMAP.RIGHT (BITBLT) BRKDWN1 (BRKDWNCOMPILE2 MAPC SETA RPLACD RPLACA) DOWINDOWCOM ( +\CHECKCARET TOTOPW) TEDIT.DELETE (TEDIT.SETSEL \TEDIT.DELETE) EDITDEF (DECLARE EDITDEF.FNS +DEFAULT.EDITDEF) FB.MAYBE.EXPUNGE (FB.PROMPTWPRINT) IREMAINDER (\IQUOTREM .UNBOX. SELECTC +CL::%%NOT-NONCOMPLEX-NUMBER-ERROR .NEGATE. .LLSH1. .LRSH1. SELECTQ ERROR) BCOMPL1A (SELECTQ BCOMPL1A +CL:FORMAT) HOSTNAMEP (DECLARE) DUMPI.S.OPRS (LISPXPRINT) EDITF1 (PRIN1) EDITF (PRIN1) MOUSECONFIRM ( +DECLARE FRESHLINE printout SPACES GETMOUSESTATE CLOSEW CLEARW) XIPAPPEND.WORD (ERROR \PUTBASE) +FW-RESET (DECLARE) \DSPTRANSLATE.IP (TRANSLATE.IP) APPENDTOVAR (MAPC EXEC-FORMAT MARKASCHANGED SAVESET + /SET DECLARE) DECODE-NS-STRING (\PUTBASE) PRINTROUTINGTABLE (SELECTQ \CHECK.ROUTING.TABLE PRIN1 +FLUSHRIGHT TAB MAPC SPACES \NSADDRESS.PRINT.DECIMAL PRIN3) \SLOWLLSH1 (.UNBOX. SELECTC \ILLEGAL.ARG +CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) DIRECTORY (DECLARE SELECTQ RPLACD RPLACA RPLNODE ERROR FRPLNODE2 +RESETLST TERPRI PRIN1 DODIRCOMMANDS) \FM.CHANGELABEL (ERROR DECLARE LISTPUT) CL::%%SQRT-COMPLEX ( +DECLARE) UNSAVEBLOCK? (MAPRINT) RECORDACCESS (DECLARE UNCLISPTRAN) \SLOWLLSH8 (.UNBOX. SELECTC +\ILLEGAL.ARG CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) \SPP.HANDLE.INPUT (SELECTC \RELEASE.ETHERPACKET APPLY* + \SPPSENDERROR \SPP.ESTABLISH \SPP.RELEASE.ACKED.PACKETS NOTIFY.EVENT RELEASE.XIP \SPP.HANDLE.DATA +\SPP.HANDLE.ATTN) DREAD (TAB PRIN1 SELECTQ) COMP.AC (COMP.PUNT) \SLOWLRSH1 (.UNBOX. SELECTC +\ILLEGAL.ARG CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) UNPACKFILENAME.STRING (\ILLEGAL.ARG UNPACKFILE1 +DECLARE UNPACKFILE1.DIRECTORY \PUTBASETHIN \PUTBASEFAT) MENUWINDOW (ERROR UPDATE/MENU/IMAGE WINDOWPROP + WINDOWADDPROP) SEDIT::SELECT-NODE (SEDIT::SET-SELECTION-ME) MSNEEDUNSAVE (MSMARKCHANGE1 FRPLACD +printout PRIN1 PRINTPARA) EDITDEFAULT1 (PRIN1 PRIN2 SPACES TERPRI) CLISPATOM2D (CLRPLNODE CLISPTRAN +FRPLACA) \SLOWLRSH8 (.UNBOX. SELECTC \ILLEGAL.ARG CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) SAVESET ( +LISPERROR /PUT ADDSPELL EXEC-FORMAT MARKASCHANGED SET RELSTK UNDOSAVE SETTOPVAL SETATOMVAL) +LDIFFERENCE (FRPLACD) EDITH (HISTORYSAVE LISPXWATCH NCONC MAPC PRIN1 RESETLST DECLARE SI::RESETUNWIND +EDITSAVE EDITCOM) \VFMKillBuffer (RPLACD) \SLOWLOGOR2 (\CALLME .UNBOX. SELECTC +CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) PRINTBINDINGS (printout PRIN1 PRIN2 SHOWPRINT RELSTK) +SEDIT::CLOSE-NODE-COMMENT (SEDIT::UNDO-BY RPLACA) SEDIT::UNDO (SEDIT::CLOSE-OPEN-NODE +SEDIT::SET-SELECTION-NOWHERE SEDIT::SET-POINT-NOWHERE SEDIT::UNDO-EVENT printout TERPRI) +PUPNET.DISTANCE (BLOCK) EDIT* (EDUP EDITCOM ERROR!) ADD/AND/DISPLAY/LINK (printout PRIN1 GRAPHADDLINK +DISPLAYLINK) \SLOWLOGAND2 (\CALLME .UNBOX. SELECTC CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) +\LEAF.DIRECTORYNAMEP (FREPLACEFIELD) SEDIT::RECOMPUTE-FORMAT-VALUES (MAPC SEDIT::RECOMPUTE-FORMAT-VALUES + CL:FUNCALL) \BSP.PREPARE.INPUT (DECLARE OBTAIN.MONITORLOCK BLOCK MONITOR.AWAIT.EVENT +\BSP.CLEANUP.INPUT SI::MONITOR-UNWIND) BMOBJ.DISPLAYFN (DECLARE RELMOVETO SELECTQ BITBLT SCALEDBITBLT) + EDITDEFAULT (DECLARE ERROR! EDITSAVE1 EDITDEFAULT1 GNC FRPLACA EDITSAVE) \SLOWLOGXOR2 (\CALLME +.UNBOX. SELECTC CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) SHIFT.BITMAP.LEFT (BITBLT) CL:ADJUST-ARRAY ( +%%ALTER-AS-DISPLACED-ARRAY %%ALTER-AS-DISPLACED-TO-BASE-ARRAY SET-FILL-POINTER +%%ARRAY-CONTENT-INITIALIZE %%ARRAY-ELEMENT-INITIALIZE %%COPY-TO-NEW-ARRAY %%EXTEND-ARRAY) +\SMASHBSPSTREAM (UNINTERRUPTABLY) \FM.HIGHLIGHTITEM (BLTSHADE) CL::%%SQRT-FLOAT (DECLARE +CL::%%FLOAT-UNBOX) EDLOC (EDITCOM ERROR!) FB.FINISH.COMMAND (DETACHWINDOW SHADEITEM CLOSEW PUTMENUPROP +) LSH (FRPTQ) \SPP.INFO.HOOK (DECLARE DSPFONT CLEARW PPSPP) BOUT (\ILLEGAL.ARG) \BSP.CLEANUP.INPUT ( +\BSPINCFILEPTR RELEASE.PUP FREPLACEFIELD \SEND.ACK) DEFINE (ERROR) EDOR (ERROR! EDITCOMS) +MB.NB.WHENOPERATEDFN (MB.SELFN) \SLOWFPLUS2 (\CALLME) SYMBOL.PNAME (ALLOCAL) TTYIN.PRINTARGS ( +\CARET.DOWN TTPRIN1 TTPRIN2 TTCRLF TTPRINSPACE) CL::TYPE-EXPANDER (XCL:COMPILE-FORM CL:EVAL) +DWIM-SYMBOL-PACKAGE (FRPLACD) EDITRAN (ERROR! EDITSMASH) ADDTOCOMS (SELECTQ) \SLOWFDIFFERENCE (\CALLME +) \VFMGet (DECLARE DiskError LISPERROR MESASETQ \VFMFind) %%EXTEND-ARRAY (UNINTERRUPTABLY) +FUNCTIONSMSMC (CHANGEMACRO) \FM.EDIT-UPDATEAFTERDELETE (\CARET.DOWN BLTSHADE) FB.MAYBE.INSERT.FILE ( +RPLACA FB.INSERT.FILE) EDITTO (EDLOC EDUP EDIT.BI EDIT.RI EDITCOM) PUTHASHFILE (LOOKUPHASHFILE) +\SLOWFTIMES2 (\CALLME) \DEFAULTSTATE.IP (SCALE.IP) \NSPRINT.WATCHDOG (BLOCK MAP) REMWINDOWPROP ( +LISPERROR RPLACD FRPLNODE2) SEDIT::GET-USER-STRING (TERPRI) \INIT.KEYBOARD.STREAM (DECLARE +\DEFINEDEVICE) \LEAF.FORCEOUTPUT (\PAGED.FORCEOUTPUT) \SLOWFQUOTIENT (\CALLME) COMPILE.FILE.DEFINEQ ( +COMPILE.CHECK.ARGTYPE BYTECOMPILE2) COPYBYTES (\SETFILEPTR ERROR \BUFFERED.COPYBYTES FRPTQ) +SEDIT::PAINT-TO-END-OF-LINE (BLTSHADE) CHANGEPROP (FRPLACA) EDITCOM (SELECTQ PRIN1 BPNT0 APPLY TERPRI +EDITRACEFN EDITBF EDITQF EDITCOMA EDITCOML EDITDEFAULT) FIND.START.OF.WORD (DECLARE CHECK) +\UNBOXFLOAT2 (\SLOWRETURN DECLARE \MAKEFREEBLOCK) EDITELT (EDLOC) %%ALTER-AS-DISPLACED-TO-BASE-ARRAY ( +UNINTERRUPTABLY) CREATEMENUEDWINDOW (SELECTQ PROMPTPRINT CLRPROMPT ATTACHWINDOW OPENW) DEFAULT.EDITDEF + (DECLARE) UNSAVEFNS (VIRGINFN SAVEDEF SELECTQ DECLARE MARKASCHANGED SI::RESETUNWIND /SETATOMVAL +PRINTOUT PRIN1 UNSAVEDEF LOADDEF) EDRPT (PRIN1 DECLARE EDITCOMS SI::RESETUNWIND) CLISPCAR/CDR1 ( +CLISPCAR/CDR2) \UNBOXFLOAT1 (\SLOWRETURN DECLARE \MAKEFREEBLOCK) \SCALEDBITBLT.PRESS ( +\WRITEPRESSBITMAP) \BUFFERED.COPYBYTES (\BOUTS) WRITE-UNICODE-INCLUDED (FRPLACD) INSPECT/AS/RECORD ( +FRPLACD) SEDIT::COMPUTE-POINT-POSITION-COMMENT (SEDIT::MAP-COMMENT-INDEX) EDUP (ERROR! PRIN2 PRIN1) +\NSFILING.PARSE.FILENAME (CL:MULTIPLE-VALUE-SETQ) \POPSTATE.IP (SHOW.IP POP-IP-STACK FGET.IP) DEFLIST +(PUTPROP) CURSOR.INIT (\LOCKCELL) ONEDINSPECT.REPAINTFN (WITH-INSPECTOR-ENV ONEDINSPECT.PRINTELEMENT +INSPECT.INVERTSELECTION) DSUBST (FRPLACA DSUBST FRPLACD) BRKDWNSETUP (PUTD BRKDWNCOMPILE2 NCONC1 +RPLACD) \LEAF.FLUSH.CACHE (DECLARE OBTAIN.MONITORLOCK \LEAF.CLOSEFILE SI::MONITOR-UNWIND) ARCTAN ( +DECLARE) EDIT!UNDO (LISPXWATCH SELECTQ UNDOEDITCOM PRIN1) ATTACHWINDOW (ERROR SELECTQ \ILLEGAL.ARG +MAKEMAINWINDOW WINDOWADDPROP WINDOWPROP MOVEATTACHEDWINDOWTOPLACE OPENW) \SLOWIGREATERP (\CALLME +.UNBOX. SELECTC CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) \COURIER.PUTDEF (MARKASCHANGED EXEC-FORMAT /PUTHASH +) \GETSTREAM (DECLARE \CREATE.TTYDISPLAYSTREAM) ATTACHMENU (ATTACHWINDOW OPENW) CHANGERECORD (MAPC) +EDITCOMA (FRPLACA REMPROP NCONC LISPXPUT ERROR RELSTK LISPXWATCH DECLARE PRINTDEF EDITSAVE1 EDITCOM) +CLISPATOM2C (/RPLNODE) \SLOWFGREATERP (.FLOATUNBOX. SELECTC .NEGATE. .LLSH8. .LLSH1. .LRSH8.) +\DSPXPOSITION.PRESS (SHOW.PRESS SETX.PRESS) COPYCHARS (ERROR LISPERROR \SETFILEPTR \OUTCHAR SELECTC +FRPTQ SHOULDNT DECLARE) \MAIKO.10MBWATCHER (PROMPTPRINT UNINTERRUPTABLY \HANDLE.RAW.PACKET BLOCK) +FB.PRINTFN (PRIN3 \OUTCHAR TB.CLEAR.LINE) EDITCOML (EDIT2F EDITCONT PRINT LISPXWATCH RPLACD NCONC1 +RPLACA) \RTP.HANDLE.INPUT (\RTP.HANDLE.PUP MONITOR.AWAIT.EVENT) \LEAF.BREAKCONNECTION (MAPC) \INCHAR ( +DECLARE) EDITCOM1 (MAPC) SIGNAL (RAISE-SIGNAL) BRKDWNFORM (MAPC HELP TCONC ADD1VAR) +\SPP.RETRANSMIT.NEXT (CHECK \SPP.SENDPKT) WRITE-UNICODE-MAPPING-FILENAME (NCONC1) INTERSECTION ( +DECLARE TCONC) PUTCURSORPROP (LISTPUT FRPLACD) \BOXIPLUS (.UNBOX. SELECTC \ILLEGAL.ARG +CL::%%NOT-NONCOMPLEX-NUMBER-ERROR \PUTBASE) EDITSAVE (NCONC1) GETHASHKEY (SETFILEPTR) SHOWSHADE.IP ( +SHOW.IP SETCOLOR.IP APPENDINTEGER.IP) UNDOEDITCOM (ERROR! UNDOEDITCOM1 EDITSMASH) \BOXIDIFFERENCE ( +.UNBOX. SELECTC \ILLEGAL.ARG CL::%%NOT-NONCOMPLEX-NUMBER-ERROR .NEGATE. \PUTBASE) XIPAPPEND.BYTE ( +FREPLACEFIELD \PUTBASEBYTE) MBUTTON.FIND.NEXT.FIELD (\FIXSEL) PERIODICALLY-UPDATE-WHO-LINE (DECLARE) +TEDIT.PROMPTPRINT (CLEARW FRESHLINE printout) UNDOEDITCOM1 (EDITSMASH) \HCPYMODEDSPPRINTCHAR ( +\CHECKCARET CHECK \HCPYMODEBLTCHAR \DSPPRINTCR/LF DSPBACKUP) LISTPUT1 (FRPLACA FRPLACD) \COPYOPENFILE +(RESETSAVE COPYCHARS COPYBYTES \UFStoOtherCopyMess) SEDIT::UNDO-LIST-REPLACE (SHOULDNT SEDIT::REPLACE-LIST +) EDITSMASH1 (PUTHASH) SEDIT::NORMALIZE-SELECTION (SEDIT::COMPUTE-SELECTION-POSITION) OPENSTREAM ( +\DO.PARAMS.AT.OPEN \CLOSEFILE LISPERROR \ADDOFD) OPT.FRAMEOPT (MAPC) \MAIKO.10MBSENDPACKET ( +\MAYBEPRINTPACKET DECLARE \BLT \HANDLE.RAW.PACKET UNINTERRUPTABLY) EDITNCONC (EDITSMASH MAPC) +ONEDINSPECT.BUTTONEVENTFN (TOTOPW GETMOUSESTATE) PFI.SORT.INDICES (FRPLACD) +\TFBRAVO.PARSE.PROFILE.VALUE (RPLNODE2) EDITSAVE1 (FRPLACA NCONC1) \CURVEEND (\CURVESMOOTH DECLARE +APPLY* .WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN \INSURETOPWDS \CURVEPT \SOFTCURSORUPCURRENT) +%%ALTER-AS-DISPLACED-ARRAY (UNINTERRUPTABLY) COMPILE.CHECK.ARGTYPE (PRINTOUT) SEDIT::OUTPUT-STRING ( +SEDIT::SET-LINEAR DECLARE SEDIT::STEP-LINEAR TEDIT.INSERT) FIXPRINTIN (LISPXSPACES LISPXPRIN1 +LISPXPRIN2) EDITSMASH (ERROR! APPLY* FRPLACA LISPXWATCH FRPLACD /RPLNODE /RPLACA /PUTHASH) CLOSEF ( +MAPC \CLEAROFD \DELETEOFD \CLOSEFILE) \TEDIT.WINDOW.OPS (GETMOUSESTATE BLOCK CURSOR SELECTQ +\TEDIT.SPLITW \TEDIT.UNSPLITW TEDIT.PROMPTPRINT SHOULDNT) \PFFindPageAddr (DiskError LISPERROR) EDIT2F + (ERROR! EDITSMASH MAPC) TCONC (DECLARE FRPLACA) PROGN (DECLARE) FUNCTIONSMSGETDEF (SETTEMPLATE) LCONC + (DECLARE ERROR) EDIT4F1 (PRIN1 TCONC) SEDIT::UNDO-REPLACE-QUOTE (SEDIT::REPLACE-QUOTE) +\MAP.ROUTING.TABLE (\CHECK.ROUTING.TABLE MAPC) IDLE.BITMAP (TOTOPW BITBLT DSPFONT MOVETO PRIN3) +\FM.DISPLAYITEM (BLTSHADE) CL::%%LOG-FLOAT (DECLARE CL::%%FLOAT-UNBOX) \MAIKO.INPUT.INTERRUPT (\RCLK +\MAYBEPRINTPACKET) XIPAPPEND.CELL (ERROR \PUTBASE) DIRFILENAME (DECLARE) SEDIT::VERIFY-STRUCTURE ( +DECLARE OBTAIN.MONITORLOCK SEDIT::CLOSE-OPEN-NODE SEDIT::PARSE SEDIT::COMPUTE-ALL-FORMATS SEDIT::SELECTION-DOWN SEDIT::RELINEARIZE SEDIT::SET-SELECTION-NOWHERE SEDIT::SET-POINT-NOWHERE -SEDIT::UPDATE REDISPLAYW SI::MONITOR-UNWIND) SHADEITEM (|\\AddShade| RESHADEITEM) COMP.CHECK.VAR ( -COMPERRM) \\TEDIT.FIXINSSEL (FREPLACEFIELD) XCL::%DEFINE-TYPE-DELDEF (/PUTHASH) \\ASSIGNDATATYPE1 ( -FREPLACEFIELD LISPERROR UNINTERRUPTABLY \\NEWPAGE \\MAPMDS \\BLT \\ADDREF) CONDITIONS:COMPUTE-RESTARTS - (WALK-PROCEED-CASES) CONTROL-T (FLASHWINDOW PRINTOUT |printout| SELECTQ PRIN2 \\CONTROL-T.PRINTRATIO -TERPRI) CLEANUP (COMPILEFILES0) IDLE.SHOW.OPTIONS (FRESHLINE) COMP.FLOATUNBOX (COMP.DELFIX -COMP.DELPUSH COMP.STCONST COMP.EXPR) SPAWN.MOUSE (\\SET.PROCESS.NAME FREPLACEFIELD ADD.PROCESS) -\\SETRECLAIMMIN (\\BOUT CLEARBUF PRIN3 SELCHARQ RECLAIMMIN BKSYSBUF) GETDEF (DECLARE SELECTQ DWIMDEF) -PRESSBITMAP (ERROR |printout| PRIN1 \\WRITEPRESSBITMAP) \\RETURN (DECLARE RAID \\SMASHLINK) SHAPEW1 ( -DECLARE \\ILLEGAL.ARG UNINTERRUPTABLY \\CLOSEW1 FREPLACEFIELD ADVISEWDS SHOWWFRAME DOUSERFNS2) -CL:NBUTLAST (RPLACD) FB.REMOVE.FILE (TB.REMOVE.ITEM DECLARE) GETFILEINFO (DECLARE) -\\GETBRUSHFONT.PRESS (\\VECFONTINIT) COMPILEUSERFN1 (DWIMIFY0) TWODINSPECT.SCROLLFN (APPLY* -SCROLLBYREPAINTFN) SEDIT::UNDO-LIST-REPLACE (SHOULDNT SEDIT::REPLACE-LIST) \\TFBRAVO.READ.USER.CM ( -SETBRK SETSEPR SELECTQ NCONC1) SEDIT::UNDO-REPLACE-QUOTE (SEDIT::REPLACE-QUOTE) ERROR! (SELECTQ -\\SMASHLINK ABORT) PUTDEF (SELECTQ FNS.PUTDEF VARS.PUTDEF FILES.PUTDEF FILEPKGCOMS.PUTDEF EVAL) -XIPAPPEND.BYTE (FREPLACEFIELD \\PUTBASEBYTE) \\SELECTPROCESS (FRPLACD NCONC RPLACA SPAWN.MOUSE) -\\PROCESS.GO.TO.SLEEP (\\ENQUEUE.EVENT/LOCK \\ENQUEUE.TIMER \\PROC.RESUME \\DECUSECOUNT -\\RELEASE.PROCESS) BRKDWNSETUP (PUTD BRKDWNCOMPILE2 NCONC1 RPLACD) \\TEXTCLOSEF-SUBTREE (CLOSEF?) -\\KEYNAMETONUMBER (DECLARE) SEDIT::SPLIT-LITATOM (SEDIT::CLOSE-OPEN-NODE SEDIT::PUNT-SET-POINT) -MB.NB.SIZEFN (FRPLACD) DBG::CREATE-DEBUGGER-WINDOW (RELSTK) \\GCRECLAIMCELL (CHECK SELECTC -\\FREELISTCELL FREPLACEFIELD \\PUTBASEPTR \\ADDREF) PUTMENUPROP (LISTPUT FREPLACEFIELD) -\\MENU.ITEM.DESELECT (DECLARE) PFI.NEW.LISTFILES1 (PFI.ENQUEUE) \\HCPYMODEDSPPRINTCHAR (\\CHECKCARET -CHECK \\HCPYMODEBLTCHAR \\DSPPRINTCR/LF DSPBACKUP) INSPECT/TOP/LEVEL/LIST (FRPLACD NCONC1 |printout| -TERPRI) PACKFILENAME.STRING (DECLARE \\ILLEGAL.ARG MAP) PROCESS.STATUS.WINDOW (CLOSEW ADDMENU -SHADEITEM) RESET.INTERRUPTS (DECLARE FREPLACEFIELD) CHECK/MENU/IMAGE (\\ILLEGAL.ARG UPDATE/MENU/IMAGE -UPDATEWFROMIMAGE FREPLACEFIELD DSPXOFFSET DSPYOFFSET) \\MEDW.CREATEW (FREPLACEFIELD DSPXOFFSET -DSPYOFFSET DSPCLIPPINGREGION ADVISEWDS MOVETOUPPERLEFT SHOWWFRAME OPENW) FB.MAKE.BROWSER.BUSY ( -RESETSAVE SHADEITEM PUTMENUPROP) \\ILLEGAL.DEVICEOP (FRPLACD) BRACKET.CURRENT.WORD (DECLARE CHECK HELP -) \\MEDW.OPENW (FREPLACEFIELD \\PUTBASE \\SOFTCURSORDOWN \\INSURETOPWDS DECLARE \\SW2BM -\\SOFTCURSORUPCURRENT) |\\PFInitializeVols| (|\\PFGetLogicalVolumePage|) SI::INTERNAL-THROW (FRPLACD) -\\NSRANDOM.TRUNCATEFILE (\\NSRANDOM.REESTABLISH \\NSRANDOM.HANDLE.ERROR FREPLACEFIELD -\\NSRANDOM.WROTE.HANDLE) \\PROC.FINDREALFRAME (SELECTQ) ADDNEWCOM (/ATTACH /RPLACD MARKASCHANGED) -\\ELIDE.PRINT.TAIL (\\OUTCHAR) DEFINEFONT.IP (APPENDIDENTIFIER.IP APPENDINTEGER.IP APPENDOP.IP -SCALE.IP FSET.IP) COPY (FRPLACD) \\CONTROL-T.PRINTRATIO (TERPRI) \\PSWOP.SELECTED (PROCESS.BACKTRACE -PROCESS.EVAL PROCESS.APPLY DEL.PROCESS DECLARE BLOCK PROCESS.STATUS.WINDOW ERROR! RESTART.PROCESS -WAKE.PROCESS BREAK.PROCESS \\SUSPEND.PROCESS) GRAPHOBJ.FINDGRAPH (DSPFILL GETMOUSESTATE) \\PRINDATUM ( -DECLARE FREERESOURCE) \\UNBOXFLOAT3 (\\SLOWRETURN DECLARE \\MAKEFREEBLOCK FREPLACEFIELD) -\\PSW.SELECTED (SHADEITEM) BRKDWNFBOXES (DECLARE BRKDWNINCA BRKDWNSETA BRKDWNADDTOA SUB1VAR) -TEDIT.RESET.EXTEND.PENDING.DELETE (\\TEDIT.SET.SEL.LOOKS) PROCESS.NAME (\\SET.PROCESS.NAME) KNOTLINE ( -MAPC) EDIT4E1 (PRIN2 PRIN1 PRINT) \\PUTBASEBYTE (\\PUTBASE) \\PSC.SYMBOLS (POSTSCRIPT.SHOWACCUM -\\UPDATE.PSC POSTSCRIPT.OUTSTR) \\KEYACTION1 (DECLARE \\PUTBASE \\RPLPTR \\ILLEGAL.ARG) HEADINGOP.IP ( -APPENDOP.IP SETXY.IP SETFONT.IP PRIN3 SHOW.IP RELMOVETO TERPRI FSET.IP) PRINTCONSTANT (PRIN2) -\\FTP.FLUSH.TO.EOC (\\OUTCHAR) SEDIT::SET-SELECTION-STRING (FREPLACEFIELD) GRAPHOBJ.DISPLAYFN ( -DISPLAYGRAPH) MONITOR.AWAIT.EVENT (RELEASE.MONITORLOCK OBTAIN.MONITORLOCK) IDLE.BITMAP (TOTOPW BITBLT -DSPFONT MOVETO PRIN3) \\TFBRAVO.INIT.PARALOOKS (FREPLACEFIELD) CONVERT-AFM-FILES (PSCFONT.WRITEFONT) -BRHC/LAYOUT/TERMINAL (DECLARE) \\PUTBASEPTR.UFN (\\PUTBASE) \\CLOSEF.PRESS (\\ENDPAGE.PRESS \\WOUT -\\BCPLSOUT.PRESS DECLARE \\PARTEND.PRESS COPYBYTES \\PAGEPAD.PRESS \\SIGNEDWOUT \\FIXPOUT SETFILEPTR) -\\GETCHARCODE (DECLARE) |\\PFCreateVols| (FREPLACEFIELD SETA PUTHASH) \\NS.SETTIME ( -\\PROCESS.RESET.TIMERS) PFI.PASS.COMMENT (TERPRI \\OUTCHAR) \\PUTBITS.UFN (\\PUTBASE) -\\HDCPYDISPLAYINIT (DECLARE) TTYIN.READ?=ARGS (FREERESOURCE DECLARE) \\CREATECHARSET.PRESS (DECLARE -ERROR) \\PUP.SETTIME (\\PROCESS.RESET.TIMERS) \\ADDBASE (.UNBOX. SELECTC \\ILLEGAL.ARG -CL::%NOT-NONCOMPLEX-NUMBER-ERROR) TWODINSPECT.MAKEREGIONS (FRPLACD) SEDIT::COMPUTE-ALL-FORMATS ( -SEDIT::COMPUTE-FORMATS-AND-FORMAT-VALUES) SEDIT::UPDATE (SEDIT::RELINEARIZE CL:FORMAT -SEDIT::RELINEARIZE-WHERE-NECESSARY SEDIT::CHECK-SELECTION SEDIT::COMPUTE-SELECTION-POSITION -SEDIT::SELECTION-UP SEDIT::UPDATE-TITLE) INVERT.LONG.SEGMENT (INVERT.SEGMENT) COMP.LOOKFORDECLARE ( -SELECTQ MAPC) \\SLOWPLUS2 (\\CALLME) GRAPHEROBJ (IMAGEOBJPROP) \\POP.N.UFN (\\SLOWRETURN -\\MAKEFREEBLOCK) DSPRUBOUTCHAR (\\GETDISPLAYDATA) TWODINSPECT.ARRANGEWINDOWS (SHAPEW ATTACHWINDOW) -SEDIT::SUBNODE-CHANGED-LIST (RPLACD RPLACA) RIGHTW.REPAINTFN (WITH-INSPECTOR-ENV MOVETO PRIN2) -PAINTW.READ.AND.SAVE.SHADE (PAINTW.CACHE.SHADE) \\TEDIT.DELETE (TEDIT.NORMALIZECARET \\FIXDLINES -\\DELETECH FREPLACEFIELD TEDIT.UPDATE.SCREEN \\FIXSEL) CHECKTRAN (DECLARE) FB.MAYBE.INSERT.FILE ( -RPLACA FREPLACEFIELD FB.INSERT.FILE) \\NSRANDOM.SETEOFPTR (FORGETPAGES \\SETEOF -\\NSRANDOM.TRUNCATEFILE) SHOWSTACKBLOCK1 (PRINTNUM SPACES) DETACHWINDOW (WINDOWDELPROP -UNMAKEMAINWINDOW SELECTQ) RECORDTRAN (DWIMIFYREC DWIMIFY0? DECLARE CLISPTRAN) \\SLOWQUOTIENT (\\CALLME -) SHOWSTACKBLOCKS (SELECTC SHOWSTACKBLOCK1 PRIN2 PRIN1 PRINTNUM TERPRI READC) ADDTOCOM (MARKASCHANGED -/RPLACA) CLISPIF2 (/RPLNODE) SEDIT::SET-SELECTION-LITATOM (FREPLACEFIELD) MB.NB.WHENOPERATEDFN ( -MB.SELFN) DINFO (OPENW RESETSAVE OBTAIN.MONITORLOCK DINFO.SETUP.WINDOW DINFO.UPDATE) \\SLOWDIFFERENCE -(\\CALLME) TTSKIPSEPR (DECLARE) FB.FINISH.COMMAND (FREPLACEFIELD DETACHWINDOW SHADEITEM CLOSEW -PUTMENUPROP) SEDIT::COMPILE-STRUCTURE (CL:FORMAT) CL:VALUES-LIST (SELECTC SELECTQ DECLARE -UNINTERRUPTABLY \\SIMULATE.UNBIND) COMP.TOPLEVEL.COMPILE (COMPERROR COMP.STTAG COMP.VALN -COMP.UNBIND.VARS FRPLACD COMPPRINT RESETFORM) INVERT.SEGMENT (DECLARE BLTSHADE) MSCOMMAND (MSKNOWN -MSSETSETTYPE) SEDIT::CREATE-NULL-LIST (FREPLACEFIELD) COMP.BOX (COMP.DELFN COMP.STFIX COMP.STFN) -ADDTOVAR (EXEC-FORMAT MARKASCHANGED SAVESET /SET DECLARE) READATABASE (SELECTQ HELP MSINIT TEMPLATE -PUTHASH STORETABLE LISPXPRINT) COPY.SEGMENT (FRPLACD) \\DRAWCIRCLE.PRESS (DRAWCURVE) TTYINFOSTREAM ( -DECLARE) \\SLOWIQUOTIENT (\\CALLME \\IQUOTREM .UNBOX. SELECTC CL::%NOT-NONCOMPLEX-NUMBER-ERROR -.NEGATE. .LLSH1. .LRSH1. SELECTQ ERROR) NCREATE2 (UNINTERRUPTABLY \\BLT) MAKEHARDCOPYMODESTREAM ( -DECLARE SELECTQ FREPLACEFIELD STREAMPROP DSPXPOSITION DSPYPOSITION DSPSPACEFACTOR) PREEDITFN ( -CLISPTRAN MAPC) /CNDIR (UNDOSAVE /SET) SAVESET (LISPERROR /PUT ADDSPELL EXEC-FORMAT MARKASCHANGED SET -RELSTK UNDOSAVE SETTOPVAL SETATOMVAL) \\CHARWIDTH.PRESS (DECLARE) PRINTXIPROUTE (FRESHLINE |printout| -PRINTNUM TERPRI) CL:UNION (RPLACD) TTY/EDITE (ERROR RESETSAVE PREEDITFN ERSETQ ERROR! PUTDEF SAVESET -/SETPROPLIST PRIN1 ADDSPELL) \\UPDATE.PROCESS.WINDOW (PROCESS.STATUS.WINDOW DSPFILL APPLY*) -\\SLOWHDCPYBLTCHAR (\\DSPPRINTCR/LF FREPLACEFIELD SELECTQ SHOULDNT .WHILE.TOP.DS. \\PUTBASE -\\SOFTCURSORDOWN \\INSURETOPWDS DECLARE \\PILOTBITBLT \\SOFTCURSORUPCURRENT \\DSPYPOSITION.DISPLAY -BITBLT ERROR) BMOBJ.PUTFN (\\PRINTBINARYBITMAP PRIN2) COMPILER::META-EVAL-CALL (COMPILER::RELEASE-TREE - FRPLACD) EDITFERROR (PRINTOUT PRIN1 EDITDEF ERROR PUTDEF) /DREMOVE (/RPLNODE /RPLACD) MOUSECONFIRM ( -DECLARE FRESHLINE |printout| SPACES GETMOUSESTATE CLOSEW CLEARW) |\\PFInitFileDescriptors| (ERROR -FREPLACEFIELD) SEDIT::UNDO-EVENT (SEDIT::START-UNDO-BLOCK MAPC) PUTHASHFILE (LOOKUPHASHFILE) BAKTRACE -(BACKTRACE PRIN2 PRIN1 RELSTK TERPRI) CL:NUNION (RPLACD) COMP.ASET (HELP MAPC COMP.STFN) EDITF2 ( -FIXEDITDATE APPLY* MARKASCHANGED) \\SLOWLRSH1 (.UNBOX. SELECTC \\ILLEGAL.ARG -CL::%NOT-NONCOMPLEX-NUMBER-ERROR) ADJUSTOFFSETS (WYOFFSET WXOFFSET) ATTACHEDWINDOWS (DECLARE FRPLACD) -MB.MARGINBAR.SELFN (GETMOUSESTATE MARGINBAR DECLARE MB.MARGINBAR.TABTRACK DSPFILL MB.MARGINBAR.SHOWTAB -) /DWIMCHECKTRAN (DECLARE CLISPTRAN /RPLNODE) EDITF (PRIN1) \\SLOWTIMES2 (\\CALLME) -\\TEDIT.TEXTBIN.STRINGSETUP (FREPLACEFIELD) READOCT (DECLARE |printout| READC) \\MAKEPCTB ( -FREPLACEFIELD) CL:NINTERSECTION (RPLACD) PROCESS.BACKTRACE (ATTACHWINDOW DSPSCROLL DSPFONT DSPRESET -BAKTRACE RELSTK) PRINTERRORPUP (PRIN1 PRIN2) PRIN3 (DECLARE \\PRINDATUM) MENUDESELECT (SHADEITEM) -GRAPHOBJ.PUTFN (PRIN1 DUMPGRAPH GRAPHOBJ.PUTALIGN SPACES HPRINT |printout|) MASTERSCOPE (PRIN1) -\\TEDIT.WINDOW.OPS (GETMOUSESTATE BLOCK CURSOR SELECTQ \\TEDIT.SPLITW \\TEDIT.UNSPLITW -TEDIT.PROMPTPRINT SHOULDNT) COURIER.READ.SEQUENCE (FRPLACD) ONED.TRACKCURSOR (GETMOUSESTATE) -CL:NSET-DIFFERENCE (RPLACD) EDITDEF (DECLARE EDITDEF.FNS DEFAULT.EDITDEF) \\TEDIT.COPY.PIECEMAPFN ( -TEDIT.PROMPTPRINT RETFROM FREPLACEFIELD) \\SLOWLOGXOR2 (\\CALLME .UNBOX. SELECTC -CL::%NOT-NONCOMPLEX-NUMBER-ERROR) \\RETCALL (FREPLACEFIELD \\CONTEXTSWITCH) UNION (DECLARE RPLACD) -SEDIT::BUILD-LINEAR-FORM (FREPLACEFIELD SEDIT::LINEARIZE) COMPILEUSERFN (COMPILEUSERFN1 PRIN1 PRINT) -\\SLOWLLSH1 (.UNBOX. SELECTC \\ILLEGAL.ARG CL::%NOT-NONCOMPLEX-NUMBER-ERROR) COMP.TRANSFORM (DECLARE) -DELETE.LONG.SEGMENT1 (MOVE.TO.LINE FORWARD.DELETE.TO DO.DELETE.LINES RENUMBER.LINES KILLSEGMENT -KILL.LINES ERASE.TO.END.OF.LINE TYPE.BUFFER ADJUSTLINE) MSTRYSPELL (FRPLACD) \\CREATEW1 (ERROR OPENW) -CL:NSET-EXCLUSIVE-OR (RPLACD) APPENDTOVAR (MAPC EXEC-FORMAT MARKASCHANGED SAVESET /SET DECLARE) -DUMPDATABASE (DECLARE MAPC UPDATECHANGED PRINT PRIN1 TERPRI MAPTABLE) SHOWSHADE.IP (SHOW.IP -SETCOLOR.IP APPENDINTEGER.IP) \\ROUTE.XIP (DECLARE FREPLACEFIELD ENCAPSULATE.ETHERPACKET) ATTACHWINDOW - (ERROR SELECTQ \\ILLEGAL.ARG MAKEMAINWINDOW WINDOWADDPROP WINDOWPROP MOVEATTACHEDWINDOWTOPLACE OPENW) - UNSAVEBLOCK? (MAPRINT) \\SLOWIDIFFERENCE (\\CALLME .UNBOX. SELECTC CL::%NOT-NONCOMPLEX-NUMBER-ERROR -.NEGATE.) \\SLOWFDIFFERENCE (\\CALLME) \\CHANGECHARSET.HDCPYDISPLAY (\\CHANGECHARSET.DISPLAY -\\FSETWIDTH FREPLACEFIELD) DO?CMD.ERRORHANDLER (SAVE.CURSOR GO.TO.FREELINE TTPRIN1COMMENT -RESTORE.CURSOR BACKWARD.DELETE.TO) HEXSTRING (RPLCHARCODE) LSH (FRPTQ) FB.COPY/RENAME.MANY ( -FB.PROMPTWPRINT FREPLACEFIELD DECLARE SORT MAPC) EDIT-IN-FUNCTION (EDITDEF) DSPEOLFN (FREPLACEFIELD -\\ILLEGAL.ARG) SIGNAL (RAISE-SIGNAL) LDIFFERENCE (FRPLACD) COURIER.READ.STRING (\\BINS BIN) -\\SLOWITIMES2 (\\CALLME .UNBOX. SELECTC CL::%NOT-NONCOMPLEX-NUMBER-ERROR .NEGATE. .LLSH1.) -TEDITFROMBRAVO (INFILE DECLARE CLOSEF? SETFILEPTR \\TFBRAVO.INIT.PAGEFORMAT ERSETQ CLOSEF -\\TFBRAVO.INSTALL.PAGEFORMAT) \\SLOWLLSH8 (.UNBOX. SELECTC \\ILLEGAL.ARG -CL::%NOT-NONCOMPLEX-NUMBER-ERROR) FB.OPERATE.ON.FILES (SELECTQ EXEC-EVAL) BRHC/LAYOUT/DAUGHTERS ( -DECLARE RPLACA) PAINTW.READBRUSHSHADE (SELECTQ) INFILEPAIRS (INFILECOMSVAL) \\FILLINXIP (FREPLACEFIELD - \\CLEARXIPHEADER \\STORENSADDRESS \\STORENSHOSTNUMBER) |\\PFCreateFileDescriptors| (SETA) \\BITBLT.IP - (\\MOVETO.IP SHOWBITMAP.IP) SEDIT::SET-POINT-STRING (FREPLACEFIELD) IREMAINDER (\\IQUOTREM .UNBOX. -SELECTC CL::%NOT-NONCOMPLEX-NUMBER-ERROR .NEGATE. .LLSH1. .LRSH1. SELECTQ ERROR) MENUSELECT (SHADEITEM -) ONEDINSPECT.ARRANGEWINDOWS (SHAPEW ATTACHWINDOW) \\TEDIT.TEXTBIN.FILESETUP (FREPLACEFIELD SETFILEPTR - \\PAGEDBACKFILEPTR) INFILECOMSMACRO (INFILECOMSVAL) CLISPIF (SELECTQ DECLARE LISTPUT1 SI::RESETUNWIND - UNDOSAVE UNDONLSETQ1 RETDWIM) EDITDEFAULT1 (PRIN1 PRIN2 SPACES TERPRI) CREATEW1 (PROMPTPRINT HELP -ERROR OPENW) EDITDEFAULT (DECLARE ERROR! EDITSAVE1 EDITDEFAULT1 GNC FRPLACA EDITSAVE) \\HUNKFIT? ( -|printout| PRIN1 TAB) EDITH (HISTORYSAVE LISPXWATCH NCONC MAPC PRIN1 RESETLST DECLARE SI::RESETUNWIND -EDITSAVE EDITCOM) OPT.INITHASH (DECLARE) GRAPHOBJ.GETFN (ERROR READCCODE IMAGEOBJPROP RATOM) -\\SETUP.TYPENUM.TABLE (FREPLACEFIELD HELP \\PUTBASEBYTE) EDLOC (EDITCOM ERROR!) -\\COURIER.CHECK.PROCEDURES (DECLARE SELECTQ /RPLACD ERROR) \\AB.NEXT (ERROR) \\SLOWFPLUS2 (\\CALLME) -CHANGEPROP (FRPLACA) EDOR (ERROR! EDITCOMS) COMP.AREF (HELP MAPC COMP.STFN) DEFINE (ERROR) -TWODINSPECT.PRINTELEMENT (MOVETO) TEDIT.DELETE (TEDIT.SETSEL \\TEDIT.DELETE) \\SLOWIPLUS2 (\\CALLME -.UNBOX. SELECTC CL::%NOT-NONCOMPLEX-NUMBER-ERROR) EDITRAN (ERROR! EDITSMASH) MARKASCHANGED (MAPC -/RPLACA DELFROMFILES UNDOSAVE) \\SLOWFGREATERP (.FLOATUNBOX. SELECTC .NEGATE. .LLSH8. .LLSH1. .LRSH8.) - IFCDECLARE (SELECTQ INFILECOMSVAL INFILECOM) FIX89 (EDITE EXEC-FORMAT) EDITF1 (PRIN1) EDITTO (EDLOC -EDUP EDIT.BI EDIT.RI EDITCOM) MSPARSE (MSFIXUPTYPES MAPC MSFAIL |printout| LISPXPRIN2 LISPXPRIN1 -LISPXSPACES LISPXPRINT FRPLNODE FRPLACA) \\SPP.CLEANUP (DECLARE OBTAIN.MONITORLOCK NOTIFY.EVENT MAPC -CLOSENSOCKET SI::MONITOR-UNWIND) \\SLOWLOGAND2 (\\CALLME .UNBOX. SELECTC -CL::%NOT-NONCOMPLEX-NUMBER-ERROR) PFI.INDEX.BREAK (DRAWLINE) EDITELT (EDLOC) DBG::REUSE-CURRENT-WINDOW - (TERPRI) DO.SHIFTED.SELECTION (\\CHECKCARET INVERT.LONG.SEGMENT READFROMBUF MOVE.TO.LINE -DELETE.LONG.SEGMENT MOVE.TO.WHEREVER \\TTYBACKGROUND) MAKE-VECTOR (FILL-ARRAY) GO.TO.ADDRESSING ( -TTSETCURSOR) HRULE.DISPLAYFN (SELECTQ BITBLT DRAWLINE) |\\PFCreatePhysicalVolume| (FREPLACEFIELD) -EDITCOM (SELECTQ PRIN1 BPNT0 APPLY TERPRI EDITRACEFN EDITBF EDITQF EDITCOMA EDITCOML EDITDEFAULT) -\\SLOWFQUOTIENT (\\CALLME) \\SETXIPCHECKSUM (FREPLACEFIELD) EDRPT (PRIN1 DECLARE EDITCOMS -SI::RESETUNWIND) SEDIT:RESET (SEDIT::CREATE-ENVIRONMENTS SEDIT:RESET-FORMATS) CALLS (UPDATEFN MAP -CALLS3 DECLARE MSPRGDWIM SELECTQ SI::RESETUNWIND) \\HDCPYBLTCHAR (DECLARE \\CHANGECHARSET.HDCPYDISPLAY - \\DSPPRINTCR/LF FREPLACEFIELD .WHILE.TOP.DS. \\PUTBASE \\SOFTCURSORDOWN \\INSURETOPWDS \\PILOTBITBLT -\\SOFTCURSORUPCURRENT) TTYIN.PRINTARGS (\\CARET.DOWN TTPRIN1 TTPRIN2 TTCRLF TTPRINSPACE) EDUP (ERROR! -PRIN2 PRIN1) DIRECTORY (DECLARE SELECTQ RPLACD RPLACA RPLNODE ERROR FRPLNODE2 RESETLST TERPRI PRIN1 -DODIRCOMMANDS) EDITFA (PRIN1 SPACES PRIN2) OPT.RESOLVEJUMPS (MAPC OPT.JFIXPASS) HOSTNAMEP (DECLARE) -EDIT* (EDUP EDITCOM ERROR!) \\TEDIT.APPLY.PARASTYLES (\\TEDIT.CHECK) PRINTVA (PRINTNUM) -%ALTER-AS-DISPLACED-TO-BASE-ARRAY (UNINTERRUPTABLY) DEFLIST (PUTPROP) TB.NTH.ITEM (\\DTEST -FREPLACEFIELD) DSPSCROLL (FREPLACEFIELD) %EXTEND-ARRAY (UNINTERRUPTABLY) FB.GET.NEW.FILE.SPEC ( -FREPLACEFIELD FB.PROMPTWPRINT) EDIT-IN-FNS (EDITDEF) EDITCOMA (FRPLACA REMPROP NCONC LISPXPUT ERROR -RELSTK LISPXWATCH DECLARE PRINTDEF EDITSAVE1 EDITCOM) EDITCOML (EDIT2F EDITCONT PRINT LISPXWATCH -RPLACD NCONC1 RPLACA) TCONC (DECLARE FRPLACA) MSERASE (DECLARE) \\PRINT-USING-ADDRESS (.SPACECHECK. -\\OUTCHAR \\LITPRIN \\CKPOSSOUT) SEDIT::SET-POINT-LITATOM (FREPLACEFIELD) EDITCOM1 (MAPC) -\\SLOWFTIMES2 (\\CALLME) INTERSECTION (DECLARE TCONC) LISPXTYPEAHEAD (PRIN1 NLSETQ PRINT) -\\SCALEDBITBLT.PRESS (\\WRITEPRESSBITMAP) EDIT!UNDO (LISPXWATCH SELECTQ UNDOEDITCOM PRIN1) -TEDIT.SUBLOOKS (\\SHOWSEL \\TEDIT.WINDOW.TITLE FREPLACEFIELD \\TEDIT.MARK.LINES.DIRTY -TEDIT.UPDATE.SCREEN \\FIXSEL) SEDIT::BUILD-INTERNAL-STRUCTURE (FREPLACEFIELD SEDIT::PARSE -SEDIT::COMPUTE-ALL-FORMATS) EDITSAVE (NCONC1) DSUBST (FRPLACA DSUBST FRPLACD) COMP.RETFROM.POINT ( -OPT.INITHASH) UNDOEDITCOM1 (EDITSMASH) EXEC-EVAL (DECLARE) \\TERMINATESPP (DECLARE OBTAIN.MONITORLOCK -SELECTC FREPLACEFIELD \\SENDSPP MONITOR.AWAIT.EVENT DEL.PROCESS SI::MONITOR-UNWIND) FB.SEEBUTTONFN ( -DETACHWINDOW CLOSEW) EDITSMASH1 (PUTHASH) DO.DELETE.LINES (BITBLT BITBLT.ERASE) DOUSERFNS2 (DECLARE) -EDITNCONC (EDITSMASH MAPC) ADD-EXEC (TTY.PROCESS) LISTPUT1 (FRPLACA FRPLACD) DBG::PRINT-ENTRY-MESSAGE -(CL:PRIN1 CL:TERPRI) OPT.COMPILERERROR (LISPXPRIN1) EDITSAVE1 (FRPLACA NCONC1) \\UNBOXFLOAT1 ( -\\SLOWRETURN DECLARE \\MAKEFREEBLOCK FREPLACEFIELD) UNPACKFILENAME.STRING (\\ILLEGAL.ARG UNPACKFILE1 -DECLARE UNPACKFILE1.DIRECTORY \\PUTBASETHIN \\PUTBASEFAT) \\POSTSCRIPT.ACCENTFN (DECLARE \\UPDATE.PSC -BOUT FREPLACEFIELD) COPYBYTES (\\SETFILEPTR ERROR \\BUFFERED.COPYBYTES FRPTQ) \\BLT (\\PUTBASE) LCONC -(DECLARE ERROR) \\TEDIT.CHANGE.LOOKS (TEDIT.CARETLOOKS TEDIT.PROMPTPRINT \\TEDIT.WINDOW.TITLE -FREPLACEFIELD LISTPUT \\TEDIT.MARK.LINES.DIRTY \\SHOWSEL TEDIT.RESET.EXTEND.PENDING.DELETE -TEDIT.UPDATE.SCREEN \\FIXSEL) \\SLOWIGREATERP (\\CALLME .UNBOX. SELECTC CL::%NOT-NONCOMPLEX-NUMBER-ERROR -) GRAPHOBJ.BUTTONEVENTINFN (CLOSEW) \\AB.BACK (ERROR) PARSERELATION (MSINIT) SEDIT::ATOM-CHANGE-RELINEARIZE - (SEDIT::CLOSE-OPEN-NODE SEDIT::SET-POINT-NOWHERE SEDIT::SET-SELECTION-NOWHERE SEDIT::WALK-UP-TREE) -\\UNBOXFLOAT2 (\\SLOWRETURN DECLARE \\MAKEFREEBLOCK FREPLACEFIELD) \\TEDIT.CARET (FREPLACEFIELD) -\\DISPLAYLINE (DSPDESTINATION DSPCLIPPINGREGION BITBLT \\FORMATLINE MOVETO DECLARE RELMOVETO SELECTC -FREPLACEFIELD TEDIT.MODIFYLOOKS \\TEDIT.BLTCHAR \\DSPPRINTCHAR BLTSHADE APPLY* \\TEDIT.MARK.REVISION -SELECTQ) COMP.ATTEMPT.COMPILE (LISPXPRIN1 LISPXPRINT EVAL) UNDOEDITCOM (ERROR! UNDOEDITCOM1 EDITSMASH) - \\TEDIT.REOPEN.STREAM (FREPLACEFIELD) EDIT4F1 (PRIN1 TCONC) TEDIT.PROMPTPRINT (CLEARW FRESHLINE -|printout|) \\BUFFERED.COPYBYTES (\\BOUTS FREPLACEFIELD) CURSOR.INIT (FREPLACEFIELD \\LOCKCELL) -\\LINEBLT (SELECTQ SHOULDNT \\PILOTBITBLT) TEDIT.UNDO.PARALOOKS (FREPLACEFIELD -\\TEDIT.MARK.LINES.DIRTY TEDIT.UPDATE.SCREEN \\TEDIT.SET.SEL.LOOKS \\FIXSEL \\SHOWSEL) GETVARS (RELSTK -) KEYDOWNP (DECLARE) PRINTPUP (\\DTEST PRINTPUPROUTE |printout| PRIN2 PRINTCONSTANT PRINTPACKETDATA) -CL:ADJUST-ARRAY (%ALTER-AS-DISPLACED-ARRAY %ALTER-AS-DISPLACED-TO-BASE-ARRAY SET-FILL-POINTER -%ARRAY-CONTENT-INITIALIZE %ARRAY-ELEMENT-INITIALIZE %COPY-TO-NEW-ARRAY %EXTEND-ARRAY) -\\DSPXPOSITION.PRESS (SHOW.PRESS SETX.PRESS) COPYCHARS (ERROR LISPERROR \\SETFILEPTR \\OUTCHAR DECLARE - \\BACKNSCHAR FRPTQ SHOULDNT) \\INIT.KEYBOARD.STREAM (DECLARE \\DEFINEDEVICE \\SETACCESS) -FILEPATCHBLOCK (LOCAL) XCL:COMPILE-DEFINER (XCL:COMPILE-FORM) BREAK-FUNCTION (XCL:UNBREAK-FUNCTION -PUTD XCL:UNADVISE-FUNCTION SI::CHANGE-CALLS) SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE-BACKWARDS ( -SEDIT::SELECT-PSEUDO-SEGMENT) PRINTPUPROUTE (TAB |printout| PRINTNUM TERPRI) IFCEXPRTYPE ( -INFILECOMSVAL) TEDIT.LOOKS (\\TEDIT.HISTORYADD) %DO-LOGICAL-OP (FREPLACEFIELD \\PILOTBITBLT) EDIT2F ( -ERROR! EDITSMASH MAPC) UPDATEFN (MSINIT ERROR |printout| PRIN1 PRIN2 MSERASE PUTHASH MSUPDATEFN1) -EDIT4F2 (PRIN2 PRIN1 PRINT EDITSMASH EDITSMASH1) \\COURIER.CHECK.ERRORS (DECLARE /RPLACD ERROR) -SEDIT::SHIFT-LINEAR-FORM (FREPLACEFIELD SEDIT::SHIFT-LINEAR-FORM) CL::DEFINE-CONSTRUCTORS (EXPORT) -BYTEBLOCKCOMPILE2 (DECLARE SI::RESETUNWIND FRPLACD FRPLACA) PUTCURSORPROP (LISTPUT FREPLACEFIELD -FRPLACD) MSSETREP (MSTRYSPELL) BRHC/LAYOUT (DECLARE RPLACD) MAPCON (FRPLACD) \\SLOWLOGOR2 (\\CALLME -.UNBOX. SELECTC CL::%NOT-NONCOMPLEX-NUMBER-ERROR) \\COPYOPENFILE (RESETSAVE COPYCHARS COPYBYTES -|\\UFStoOtherCopyMess|) DISCARDXIPS (\\FLUSH.PACKET.QUEUE) BPNT (ERROR!) \\BOXIPLUS (.UNBOX. SELECTC -\\ILLEGAL.ARG CL::%NOT-NONCOMPLEX-NUMBER-ERROR \\PUTBASE) SEDIT:SEDIT (SEDIT::SET-PROPS SEDIT::SET-OPTIONS - SEDIT::START-PROCESS TOTOPW FREPLACEFIELD EXPANDW SEDIT::DISINTEGRATE-CONTEXT) -\\POSTSCRIPT.ACCENTPAIR (DECLARE POSTSCRIPT.SHOWACCUM \\UPDATE.PSC BOUT POSTSCRIPT.PUTCOMMAND) -\\CREATEPIECEORSTREAM (FREPLACEFIELD) \\STRINGWIDTH.HCPYDISPLAYAUX (DECLARE \\MAPPNAME) BOUT ( -\\ILLEGAL.ARG) SEDIT::REPLACE-STRING (SEDIT::OPEN-LITATOM) COPYFILES (DECLARE ERROR MAPFILES -|printout| PRIN1 COPYFILES TAB) EDIT.RI (ERROR! MAPC EDITSMASH) CL::TYPE-EXPANDER (XCL:COMPILE-FORM -CL:EVAL) BRKDWNRESULTS (CONSCOUNT MAP RESETFORM LISPXTERPRI LISPXPRIN1 LISPXTAB) IDLE.SHOW.OPTION ( -FRESHLINE) \\SLOWLRSH8 (.UNBOX. SELECTC \\ILLEGAL.ARG CL::%NOT-NONCOMPLEX-NUMBER-ERROR) EDITBF1 (PRIN1 -) RAIDROOTFRAME (PRIN1 TERPRI) MAPCONC (FRPLACD) DOUSERFNS (DECLARE) ONEDINSPECT.MAKEREGIONS ( -WITH-INSPECTOR-ENV FRPLACD) DO.MOUSE (\\CHECKCARET MOVE.TO.LINE) TTPROMPTCHAR (CLEAR.LINE?) -\\MACPEEKCCODEFN (\\BACKFILEPTR) EDITSMASH (ERROR! APPLY* FRPLACA LISPXWATCH FRPLACD /RPLNODE /RPLACA -/PUTHASH) CL::%ATAN-FLOAT (DECLARE CL:ERROR) CLOSEF (MAPC \\CLEAROFD \\DELETEOFD \\CLOSEFILE) -OPENSTREAM (\\DO.PARAMS.AT.OPEN \\CLOSEFILE LISPERROR \\ADDOFD) EDIT.LO (ERROR! EDITSMASH) PRINTADDRS -(PRINTVA TERPRI SPACES PRINTNUM TAB DECLARE) \\FORMATLINE (DECLARE \\SETUPGETCH \\EDITSETA SELCHARQ -\\TEDIT.PURGE.SPACES \\TEDIT.NSCHAR.RUN TEDIT.PROMPTPRINT \\DOFORMATTING) PROGN (DECLARE) -DIRECTORYNAME (DECLARE) \\BOXIDIFFERENCE (.UNBOX. SELECTC \\ILLEGAL.ARG CL::%NOT-NONCOMPLEX-NUMBER-ERROR - .NEGATE. \\PUTBASE) MSVERBTYPE (SELECTQ MSSETSETTYPE MSKNOWN) \\TEDIT.FLUSH.UNUSED.LOOKS (MAPC -FRPLACD) XCL:COMPILE-FORM (DECLARE COMPILER::WARN-ABOUT-UNKNOWN-FUNCTIONS) \\DSPYPOSITION.PRESS ( -SHOW.PRESS SETY.PRESS) IFCPROPSCAN (FRPLACD) XCL:UNADVISE-FUNCTION (XCL:UNBREAK-FUNCTION PUTD REMPROP -SI::CHANGE-CALLS SI::FINISH-UNADVISING) TEDIT.UNDO.LOOKS (FREPLACEFIELD \\TEDIT.MARK.LINES.DIRTY -TEDIT.UPDATE.SCREEN \\TEDIT.SET.SEL.LOOKS \\FIXSEL \\SHOWSEL) CNDIR (DECLARE) NLEFT (SUB1VAR) -XCL:READVISE-FUNCTION (XCL:UNADVISE-FUNCTION) IDLE.SET.OPTION (CLEARW LISTPUT PRINTOUT) DEBUGGER ( -OUTPUT INPUT SETTERMTABLE RESETLST) SEDIT::SET-POINT-LIST (SEDIT::SET-POINT SEDIT::SET-POINT-NOWHERE -FREPLACEFIELD) XCL:ADVISE-FUNCTION (CL:FORMAT CL:ERROR XCL:UNBREAK-FUNCTION SI::ADD-ADVICE) -SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE (SEDIT::SELECT-PSEUDO-SEGMENT) \\INTERACTIVE.CLOSEW (CLOSEW) -EDITBELOW (EDITCOM ERROR! FRPLACD) EDIT.BO (ERROR! EDITSMASH) PUTASSOC (DECLARE FRPLACD) -\\POSTSCRIPT.SPECIALOUTCHARFN (DECLARE BOUT SELCHARQ) SEDIT::REPLACE-CHARS (SEDIT::CLOSE-OPEN-NODE -RPLSTRING FREPLACEFIELD SEDIT::ADJUST-WIDTH) \\FTP.RECOGNIZEFILE (RPLACA MAPC \\FTP.PRINTPLIST .EOC. -SELECTC \\FTP.FLUSH.TO.EOC \\FTPERROR \\RELEASE.FTPCONNECTION) PRINTHISTORY1 (TAB APPLY MAPRINT TERPRI - MAPC PRIN1 PRINTHISTORY2 SPACES) CURSORCREATE (\\ILLEGAL.ARG) INSPECT/ARRAY (FRPLACD |printout| -TERPRI) EDIT.RO (ERROR! EDITSMASH) COMPILER::TEST-ANNOTATION (COMPILER::RELEASE-TREE) -|\\UFStoOtherCopyMess| (DECLARE) XCL:REBREAK-FUNCTION (CL:FORMAT) RPT (DECLARE) STKPOS (RELSTK) -\\HANDLE.RAW.OTHER (|printout| PRINTNUM) XCL:TRACE-FUNCTION (CL:ERROR XCL:UNBREAK-FUNCTION PUTD -SI::CHANGE-CALLS) FILL/GRAPHNODE/LABEL (BITBLT) \\NSFILING.SET.CONTINUANCE (FREPLACEFIELD) -RAIDSTACKCMD (DECLARE RAIDROOTFRAME PRINTNUM |printout| PRIN1 FRESHLINE \\BACKTRACE) RPTQ (DECLARE) -IFCPROPS (INFILECOMSVAL) CLISPATOM (/RPLNODE RETDWIM FIX89TYPEIN) TRANSLATE.IP (APPENDNUMBER.IP) -XCL:CREATE-TRACE-WINDOW (DSPSCROLL) TTYIN.PPTOFILE (DECLARE SETFILEPTR LINELENGTH CL:FUNCALL PRIN2 -SPACES PRINTDEF) \\CURSORPOSITION (DECLARE \\SETMOUSEXY SELECTC |\\DoveMisc.SetMousePosition| -FREPLACEFIELD \\SOFTCURSORPOSITION |\\DoveDisplay.SetCursorPosition|) EDIT.BI (EDITSMASH EDITSMASH1 -ERROR!) EDITCALLERS (MAPC RESETSAVE CL:FORMAT CL:MULTIPLE-VALUE-SETQ SETFILEPTR LISPXPRIN1 LISPXSPACES - LISPXTERPRI TERPRI EDITFROMFILE) SAVEDEF1 (PUTPROP) \\INFER.FILE.TYPE (SETFILEPTR FREPLACEFIELD) -\\SETUPGETCH (FREPLACEFIELD ERROR \\TEDIT.TEXTBIN.STRINGSETUP \\TEDIT.TEXTBIN.FILESETUP \\SETUPGETCH) -TEDIT.SELECTED.PIECES (FREPLACEFIELD) RESET/NODE/LABELSHADE (ERASE/GRAPHNODE PRINTDISPLAYNODE) -\\CURSORUP (\\CURSORBITSPERPIXEL \\HARDCURSORUP \\SOFTCURSORUP) SHOWBITMAP1.IP (APPENDOP.IP TRANS.IP -APPENDNUMBER.IP APPENDINTEGER.IP TRANSLATE.IP ROTATE.IP CONCAT.IP ERROR SCALE.IP -APPENDSEQUENCEDESCRIPTOR.IP APPENDINT.IP BITBLT \\BOUTS) \\COMPUTE.HUNK.TYPEDECLS (FRPLACD) EDITGETD ( -DWIMIFY) \\DELETEPIECE (\\DELETETREE FREPLACEFIELD) \\POSTSCRIPT.PRINTSLUG (DECLARE \\BLTSHADE.PSC) -\\CHTOPCNO (DECLARE) FIXCONTINUE (FIXPRINTIN) \\MAYBEPEEKPUP (PRINTPUP) \\GETFTPCONNECTION ( -\\SETACCESS RESETSAVE BLOCK CL:FORMAT) MARK/GRAPH/NODE (DECLARE) TEDIT.FORMATBOX (SELECTQ -CL:MULTIPLE-VALUE-SETQ TEDIT.FORMATPAGE TEDIT.FORMATBOX SHOULDNT BLOCK \\TEDIT.HARDCOPY.DISPLAYLINE -FREPLACEFIELD) GETRELATION (MAPC ERROR) CURSORPOSITION (\\CURSORPOSITION CURSORSCREEN \\ILLEGAL.ARG) -FM.CHANGELABEL (\\FM.INSUREWINDOW \\FM.CHANGELABEL SELECTQ \\FM.TOGGLE-CHANGESTATE -\\FM.3STATE-CHANGESTATE \\FM.UPDATEGROUPEXTENT \\FM.CLEARITEM BLTSHADE) SEDIT::REPLACE-QUOTE ( -SEDIT::UNDO-BY SEDIT::KILL-NODE RPLACA SEDIT::SET-DEPTH SEDIT::NOTE-CHANGE) %FAST-COPY-BASE ( -FREPLACEFIELD UNINTERRUPTABLY) CURSORSCREEN (\\CURSORDOWN \\CURSORDESTINATION \\CURSORUP -\\CURSORPOSITION) \\TEDIT.INSERT.PIECES (FREPLACEFIELD SETFILEPTR COPYCHARS \\INSERTPIECE APPLY* -\\TEDIT.DIFFUSE.PARALOOKS) \\10MB.CREATENDB (CL:PUSHNEW) BUILDGETRELQ (MAPC) PRINTXIP (|printout| -TERPRI PRINTXIPROUTE PRIN2 PRINTCONSTANT PRINTXIPDATA) SELECT (DECLARE) TEDIT.REDO.PARALOOKS ( -TEDIT.PARALOOKS TEDIT.PROMPTPRINT) \\HDCPYDISPLAY.FIX.YPOS (FREPLACEFIELD) \\CH.GUESS.NEW.PROPERTIES ( -FRPLACD) INSPECTCODE (ERROR WINDOWPROP) COPY-ARRAY (%FAST-COPY-BASE) FILEBROWSER (MAP SELECTQ FRPLACD -PROMPTPRINT CLRPROMPT TTY.PROCESS ALLOW.BUTTON.EVENTS FREPLACEFIELD FB.MAKECOUNTERWINDOW ATTACHWINDOW -TOTOPW FB.SETNEWPATTERN ADD.PROCESS) EDIT.LI (ERROR! EDITSMASH) TEDIT.DISPLAYTEXT (MOVETO RESETLST -DECLARE BLTCHAR) SCANFILE0 (SCANFILE1 SETFILEPTR SCANDEFINEQ READC SCANEXP RPLACA SCANCOMPILEDFN) -SEDIT::SETUP-WINDOW-AND-PROCESS (WINDOWPROP SEDIT::UPDATE-TITLE SETTERMTABLE PROCESSPROP SETINTERRUPT -TTY.PROCESS CLEARW) TEDIT.UNPARSE.PAGEFORMAT (MAPC \\ILLEGAL.ARG) %ALTER-AS-DISPLACED-ARRAY ( -UNINTERRUPTABLY) TTYINBUFFERPEEK (DECLARE) MSFIXUPTYPES (MSKNOWN) ENDREAD? (SELECTC DECLARE CHECK) -\\BITBLT.PRESS (\\WRITEPRESSBITMAP) CLISPERROR (EVQ FIXPRINTIN LISPXSPACES LISPXPRIN1 LISPXPRIN2 -LISPXTERPRI LISPXPRINT MAPRINT) GRAPHERIMAGEFNS (DECLARE) \\FLUSH.OPEN.STREAMS (FDEVOP) UPDATECHANGED -(MSINIT MAPHASH) /ECHOCONTROL (UNDOSAVE) SEDIT::REPLACE-LIST (MAPC RPLACA SEDIT::KILL-NODE SEDIT::SET-DEPTH - FRPLACD RPLACD SEDIT::SUBNODE-CHANGED RPLNODE2 SEDIT::SET-SELECTION-NOWHERE SEDIT::NOTE-CHANGE -SEDIT::UNDO-BY) TEDIT.PUT.PCTB (FREPLACEFIELD TEDIT.PUT.PAGEFRAMES \\TEDIT.FLUSH.UNUSED.LOOKS -\\TEDIT.PUT.CHARLOOKS \\TEDIT.PUT.PARALOOKS \\DWOUT \\SMALLPOUT PRIN1 CHARSET -\\TEDIT.PUT.SINGLE.CHARLOOKS BOUT COPYBYTES DECLARE MAPC COPYCHARS CLOSEF) /SETSYNTAX (SELECTQ -UNDOSAVE) TEDIT.DO.BLUEPENDINGDELETE (\\SHOWSEL \\DELETECH \\FIXDLINES -TEDIT.RESET.EXTEND.PENDING.DELETE FREPLACEFIELD \\FIXSEL) EDITTOGGLELABEL (PROMPTPRINT PRIN1 -RESET/NODE/LABELSHADE APPLY*) RAIDSHOWFRAME (FRPTQ PRIN1 \\BACKTRACE) STRMEMB (DECLARE) RAIDCOMMAND ( -DECLARE FRESHLINE SELECTQ PRINCOPY PRINTCODE PRINTADDRS PRINTNUM |printout| SETTOPVAL RAIDSTACKCMD -RAIDSHOWFRAME READC \\PRINTBF PRINTOUT SHOWSTACKBLOCKS \\PRINTFRAME USEREXEC PUTBASE SETVMPTR \\BINS -SHOWREMOTESCREEN HELP) \\PUTBASEFIXP.UFN (.XUNBOX. \\PUTBASE) TB.INSERT.ITEM (\\ILLEGAL.ARG -FREPLACEFIELD RPLACD TB.RENUMBER.TAIL) \\FTP.PRINTPLIST (MAPC DECLARE SELCHARQ SELECTQ PRIN2) SUBSET ( -DECLARE) SETTERMCHARS (/SETSYNTAX) \\BACKFORMAT (\\SETUPGETCH FREPLACEFIELD) MSPATHOPTIONS (|printout| - PRIN1 FRPLACD) TTLOADBUF (SETFILEPTR ADDNAKEDCHAR FRPLACD READFROMBUF) HRULE.CREATE (IMAGEOBJPROP -TEDIT.PROMPTPRINT) \\MAYBEPEEKNS (DECLARE PRINTXIP) SEDIT::FIND-AND-DISPLAY-STRUCTURE-BACKWARDS ( -SEDIT::SELECT-NODE) TEDIT.REDO.LOOKS (TEDIT.LOOKS TEDIT.PROMPTPRINT) \\STRINGWIDTH.HDCPYDISPLAY ( -DECLARE) \\RSH (.UNBOX. SELECTC CL::%NOT-NONCOMPLEX-NUMBER-ERROR FRPTQ) INSPECT/HARRAYP (PROMPTPRINT) -CHARMACRO (CFOBF TERPRI) SAVEONSYSRECLST (MAPRINT CL:FORMAT PRETTYVAR1 FRPLACD PRINTDEF) -\\SETCLOSEDFILELENGTH (\\SETEOFPTR \\CLOSEFILE) SETFILEPTR (FDEVOP ACCESS-CHARSET FREPLACEFIELD) -CURSOREXIT (DECLARE CURSORSCREEN) COPY-VECTOR (CL:ERROR %MAKE-ARRAY-WRITEABLE %FAST-COPY-BASE) -\\FLUSH.NDB.QUEUE (\\RELEASE.IOCB \\RELEASE.ETHERPACKET) \\TEDIT.FONTCOPY (TEDIT.PROMPTPRINT) -SEDIT::SETUP-NEW-CONTEXT (FREPLACEFIELD DECLARE OBTAIN.MONITORLOCK SEDIT::BUILD-WINDOW -SEDIT::SETUP-CONTEXT-WINDOW-DEPENDENCIES SEDIT::BUILD-INTERNAL-STRUCTURE SI::MONITOR-UNWIND) BOUT16 ( -BOUT) PP* (DECLARE) \\VECFONTINIT (DECLARE \\RPLPTR FRPLACD) SELECT1 (DECLARE) SELECTC (DECLARE) -\\FTP.PACKFILENAME (MAPC) IDLE.BOUNCING.BOX (RPLACA BITBLT BLOCK) BEEPON (SELECTC BLOCK FREPLACEFIELD -|\\DoveMisc.BeepOn|) INSPECT.INVERTSELECTION (INSPECT.INVERTREGION) \\WWCHANGESCREENSIZE (MAPC -\\STARTDISPLAY \\CLEARBM \\PUTONSCREENW) CL:CHAR-NAME (DECLARE) FORMAT-NEWLINE (TERPRI) \\SENDSPP ( -CHECK DECLARE OBTAIN.MONITORLOCK \\BLT UNINTERRUPTABLY FREPLACEFIELD \\SPP.SENDPKT MONITOR.AWAIT.EVENT - SI::MONITOR-UNWIND) TEDITCHAT.CHARFN (\\CARET.DOWN \\TEDIT.CHARDELETE) RECORDECLARATIONS (PRIN1 -MAPRINT MAPC PRINTDEF) TB.UNDELETE.ITEM (FREPLACEFIELD TB.SHOW.DELETION) REGIONONSCREEN (GETMOUSESTATE -) FRPTQ (DECLARE) TTYINBUFFERBIN (DECLARE FREPLACEFIELD) FIND.MATCHING.WORD (DECLARE) -\\MAIKO.DISPLAYLINE (DSPDESTINATION DSPCLIPPINGREGION BITBLT \\FORMATLINE MOVETO DECLARE RELMOVETO -SELECTC FREPLACEFIELD TEDIT.MODIFYLOOKS \\DSPPRINTCHAR BLTSHADE APPLY* \\TEDIT.MARK.REVISION SELECTQ) -SPY.MERGE.CALLEES (SPY.MERGE1) CL:VECTOR-POP (FREPLACEFIELD) \\MAKE.ITEMS.VERT.ORDER (FRPLACD MAPC) -WITHOUT-INTERRUPTS (\\KEYBOARDOFF \\KEYBOARDON) RESETSAVE (DECLARE SETTOPVAL) -\\DSPYPOSITION.HDCPYDISPLAY (\\HDCPYDISPLAY.FIX.YPOS) INSPECT/TYPELESS (DECLARE) RESETFORM (DECLARE -SI::RESETUNWIND) LAYOUTSEXPR1 (DECLARE) SEDIT::FIND-AND-DISPLAY-STRUCTURE (SEDIT::SELECT-NODE) -\\TAN.OLD (DECLARE) MAKECOM (ERROR!) BCOMPL3 (COPYBYTES CLOSEF? DELFILE /SETATOMVAL) -BRH/LAYOUT/DAUGHTERS (DECLARE) VRULE.CREATE (IMAGEOBJPROP TEDIT.PROMPTPRINT) FILING.CALL (FRPLACD -DECLARE OBTAIN.MONITORLOCK PRINTOUT TERPRI \\BLT \\DAYTIME0 RPLACD SI::MONITOR-UNWIND) MSMSGPRINT ( -MSMSGPRINT) FILL-ARRAY (%MAKE-ARRAY-WRITEABLE) \\GETINTERNALCLOCK (\\BLT \\BOXIDIFFERENCE) -INFILECOMSVALS (INFILECOMSVAL) FIXATOM1 (SETBLIPVAL FIXCONTINUE RELSTK ERROR) \\PEEKPUP (SELECTQ -\\PUTBASE RPTQ BLOCK FRPLACD) MSJOINSET (|printout| SPACES MSSETSETTYPE MSKNOWN) TEDIT.SELECT ( -\\TEDIT.SET.SEL.LOOKS FREPLACEFIELD \\FIXSEL) \\MAKE.EXPEDITED.STREAM (\\SETACCESS) TTADJUSTWIDTH ( -TTDELSECTION TTINSERTSECTION) |\\VFMAtLoad| (FREPLACEFIELD |\\VFMCreateIntervals|) -\\PROCESS.RESET.TIMERS (SETUPTIMER \\RUN.PROCESS) SEDIT::SET-SELECTION (FREPLACEFIELD) PUP.ECHOSERVER -(RESETSAVE SELECTQ PRIN1 PRINTPUP FREPLACEFIELD SWAPPUPPORTS SENDPUP RELEASE.PUP BLOCK AWAIT.EVENT) -RESET/NODE/BORDER (ERASE/GRAPHNODE DISPLAYNODELINKS SET/LABEL/SIZE DISPLAYNODE) DELFROMFILES ( -|printout| PRIN1 MAPC FRPLACD) \\PICK.EVALQT (INPUT OUTPUT TTYDISPLAYSTREAM \\RESETSYSTEMSTATE) -\\TEDIT.WORD.BOUND (CHECK) DEFAULT.BACKGROUND.COPYFN (GETMOUSESTATE) FIXAPPLY (MARKASCHANGED RETDWIM -FIX89TYPEIN FIXAPPLY1) SWAPPEDCOND (DWIMIFY) MAKEFN (ERROR ERSETQ) RESETVAR (DECLARE SETTOPVAL -SI::RESETUNWIND) \\TFBRAVO.APPLY.PARALOOKS (TEDIT.PARALOOKS TEDIT.SETSEL) LOADFNSCAN (SCANFILE0) -CHARACTER.PRINT (.SPACECHECK. \\OUTCHAR WRITE-STRING*) FB.UNDELETEALLCOMMAND (TB.MAP.ITEMS) -|MakeMenuOfImageTypes| (DECLARE FRPLACD) CHECKIMPORTS (FRPLACD) \\READNUMBER.OUTLINEREGION (BITBLT) -SWAPXIPADDRESSES (\\BLT FREPLACEFIELD \\STORENSHOSTNUMBER) TTADDTAB (FRPLACD) TEDIT.SUBPARALOOKS ( -\\SHOWSEL \\TEDIT.WINDOW.TITLE FREPLACEFIELD \\TEDIT.MARK.LINES.DIRTY TEDIT.UPDATE.SCREEN \\FIXSEL) -SPY.DUMP.BUFFER (FREPLACEFIELD) \\LEAF.TIMEDOUT.EXCESSIVE (FREPLACEFIELD MAPC MAPRINT ADDMENU) -WRITE-STRING* (DECLARE) \\LEAF.SETFILETYPE (FREPLACEFIELD \\SENDLEAF) \\IDLER (RESETLST \\USEREVENT -\\DEVICEEVENT PROCESS.EVAL SETPASSWORD CLEARW OPENW DSPOPERATION DSPTEXTURE BLOCK \\DIRTYBACKGROUND -SUSPEND.PROCESS PRINTOUT WAKE.PROCESS RESETFORM CLEARBUF CLOSEW FRESHLINE) CSUBST (FRPLACA FRPLNODE -NCONC NCONC1 DWIMIFYREC) INSPECT/DATATYPE (FRPLACD INSPECT/TOP/LEVEL/LIST |printout| TERPRI) -\\CREATEPRESSFONT (DECLARE \\GETCHARSETINFO) CHAT.LOGIN (|printout| TERPRI MAPC BOUT) CL:ERROR ( -RAISE-SIGNAL DECLARE RESETSAVE CL:PRINC ERROR!) DELETEMENU (\\ILLEGAL.ARG ERASEMENUIMAGE ERROR CLOSEW -FREPLACEFIELD) FILL.TEST (FILL.LINE) AUTOCR? (START.NEW.LINE BREAKLINE) BEEPOFF (SELECTC BLOCK -FREPLACEFIELD |\\DoveMisc.BeepOff|) CHARLOOKS.FROM.FONT (\\ILLEGAL.ARG SELECTQ FREPLACEFIELD) EOFP ( -DECLARE) FIXATOM (RELSTK RETDWIM /RPLNODE) \\NSRANDOM.UPDATE.VALIDATION (\\NSRANDOM.HANDLE.ERROR -FREPLACEFIELD) \\TEDIT.GET.SINGLE.PARALOOKS2 (FREPLACEFIELD FRPLACD RPLACA RPLACD) -COURIER.BROADCAST.CALL (DECLARE RESETSAVE |printout| TAB \\MAP.ROUTING.TABLE SPACES) OCTALSTRING ( -FREERESOURCE DECLARE) \\COS.OLD (DECLARE) FB.UNDELETE.FILE (TB.UNDELETE.ITEM) MSFAIL (RETFROM -|printout| PRIN1 ERROR!) TEDIT.SET.SEL.LOOKS (\\SHOWSEL SELECTQ FREPLACEFIELD) -\\COURIER.BROADCAST.ON.NET (FREPLACEFIELD |printout| SPACES PRINTNUM) TTYINBUFFERSTREAM (DECLARE -\\SETACCESS FREPLACEFIELD) YMAPLIST (MAPC) BRH/OFFSET (DECLARE) LOADCOMP (DECLARE RESETSAVE /PUTPROP) -DOBACKGROUNDCOM (ERSETQ) \\GS.INITBUF (RPLSTRING) READPLIST (SETSEPR SETSYNTAX SETBRK READTABLEPROP -FRPLACD ERROR) PUP.ECHOUSER (RESETSAVE SETUPPUP PUTPUPWORD FREPLACEFIELD PUTPUPSTRING SENDPUP -PRINTERRORPUP RELEASE.PUP AWAIT.EVENT) FTPGETMARK (\\FTP.FLUSH.TO.MARK) EDITTOGGLEBORDER (PROMPTPRINT -PRIN1 RESET/NODE/BORDER APPLY*) FNTH (DECLARE) INSPECT/HUNK (SELECTC INSPECTW.CREATE FRPLACD) -\\SETDAYTIME0 (UNINTERRUPTABLY \\RCLK \\BLT FREPLACEFIELD) ADJUSTLINE (GO.TO.RELATIVE KILLSEGMENT -TYPE.BUFFER DELETELINE TTDELSECTION ERASE.TO.END.OF.LINE INSERT.TEXT ADD1VAR) COMP.LOOKUPVAR (RETAPPLY - COMPERRM) READ-FILECREATED (SETFILEPTR) IDATE (DECLARE SELCHARQ) RESETVARS (DECLARE MAPC -SI::RESETUNWIND) TTDOTABS (ADDCHAR FRPLACD) ICMLARRAY (FRPLACD ICMLARRAY.ATTACHDISPLAY) -PFI.SORT.INDICES (FRPLACD) \\FORWARD.XIP (PRINTXIP) \\SW2BM (UNINTERRUPTABLY) LISPXUSEC (PRINTHISTORY1 - ERROR! SELECTQ ERROR PRINT) \\HDCPYDISPLAY.FIX.XPOS (FREPLACEFIELD) \\GENERIC.OPENP (FRPLACD) -\\LEAF.NOT.RESPONDING (TERPRI SELECTQ) CL::SIMPLE-STRING-EQUAL (%UNPACK-STRING) \\LOCATE.NSNET ( -\\RPLPTR WAKE.PROCESS BLOCK) \\NSFILING.GET.ATTRIBUTES (DECLARE) \\DSPRIGHTMARGIN.HDCPYDISPLAY ( -FREPLACEFIELD) \\TEDIT.PUT.CHARLOOKS.LIST2 (\\DWOUT \\SMALLPOUT DECLARE \\TEDIT.PUT.SINGLE.CHARLOOKS2 -PUTHASH) SPY.MAKE.TREE (WINDOWPROP) \\LEAF.RESENDPUPS (FREPLACEFIELD PUTSEQUIN) \\MAIKO.SETTIME ( -\\PROCESS.RESET.TIMERS) |\\LFCloseDirectory| (FORGETPAGES) STKARGS (FRPLACD) INITUFNTABLE (CREATEPAGES - \\SETUFNENTRY) CHAT.CLOSE (DECLARE DETACHALLWINDOWS DSPOPERATION DSPSCROLL DEL.PROCESS TERPRI PRIN1 -PRINT \\CHECKCARET FREPLACEFIELD ALLOW.BUTTON.EVENTS CHAT.CLOSE.CONNECTION CHAT.DEACTIVATE.WINDOW -CLOSEW ADD.PROCESS ICONW.SHADE) INFILECOM (RETFROM INFILECOMS INFILECOMSMACRO) PRINTBITMAP (DECLARE -|printout| PRIN1 SPACES \\WRITEBITMAP) ASET (CL:ERROR) DO?CMD (DECLARE \\CARET.DOWN SELECTQ TTRUBOUT -RESTORE.CURSOR BACKWARD.DELETE.TO MOVE.TO.WHEREVER READFROMBUF) DINFO.SPECIAL.UPDATE (PROCESSPROP -DECLARE TERPRI FLASHWINDOW) RANDSET (ERROR DECLARE FRPLACD) \\PUTFIXP (.UNBOX. SELECTC \\ILLEGAL.ARG -CL::%NOT-NONCOMPLEX-NUMBER-ERROR FREPLACEFIELD) SETY.IP (APPENDINTEGER.IP APPENDOP.IP APPENDNUMBER.IP) - NEAREST/PT/ON/GRID (RPLACA RPLACD) \\FTP.HANDLE.NO (SELECTC RPLACA NCONC1 |printout| DECLARE TERPRI -MAPC \\FTPERROR) \\TEDIT.PUT.SINGLE.PARALOOKS2 (\\SMALLPOUT DECLARE MAPC \\ARBOUT \\ATMOUT) IDLE ( -LISTPUT \\CARET.DOWN) \\ATMOUT (\\SMALLPOUT DECLARE) POWEROFTWOP (DECLARE) SEDIT::LINEARIZE-QUOTE ( -SEDIT::OUTPUT-CONSTANT-STRING) ALISTS.WHENCHANGED (RETFROM) \\TEDIT.COMMAND.LOOP (WINDOWPROP DISMISS -RESETLST ERSETQ \\WAITFORSYSBUFP TEDIT.FLASHCARET BLOCK \\SHOWSEL TEDIT.UPDATE.SCREEN \\FIXSEL -\\COPYSEL TEDIT.DO.BLUEPENDINGDELETE \\TEDIT.SET.SEL.LOOKS \\TEDIT.DELETE UNINTERRUPTABLY -%SET-ARRAY-OFFSET SELECTC CHECK \\TEDIT.CHARDELETE TEDIT.RESET.EXTEND.PENDING.DELETE -\\TEDIT.WORDDELETE TEDIT.UNDO TEDIT.REDO TEDIT.NEXT \\TEDIT.ABBREV.EXPAND TEDIT.\\INSERT) \\SETCARET ( -MOVETO \\EDIT.DOWNCARET) SEDIT::OUTPUT-CR (SEDIT::SET-LINEAR DECLARE SELECTQ SEDIT::LINE-FINISHED -SEDIT::REPAINT-NEW-LINE TEDIT.INSERT TEDIT.PARALOOKS) LISPXUSE0 (ERROR MAPC) FB.UNDELETECOMMAND ( -TB.MAP.SELECTED.ITEMS) SETUPSTACK (CREATEPAGES) \\NCONC2 (RPLACD) BSPPUTMARK (DECLARE -OBTAIN.MONITORLOCK \\BSP.SENDBUFFER \\PUTBASEBYTE FREPLACEFIELD SI::MONITOR-UNWIND) -COMPILER::COMPILE-ONE-LAMBDA (CL:UNWIND-PROTECT COMPILER::RELEASE-TREE) \\PRESSFAMILYCODELST ( -SETFILEPTR SELECTQ FRPLACD) INTCHECK (PRIN1 TERPRI) /REMPROP (ERRORX UNDOSAVE FRPLACD SETPROPLIST) -PRINT-EVENT (FRESHLINE CL:FORMAT PRINT-EVENT-PROMPT DSPFONT PRIN1 SPACES TERPRI MAPC) -\\MAKEBRUSH.SQUARE (BITBLT) TTYIN.SHOW.?ALTERNATIVES (CHECK FRPLACA BEEP SAVE.CURSOR GO.TO.FREELINE -TTPRIN1COMMENT TTPRIN1 DECLARE) PFI.COMPUTE.INDEX.SHAPE (RPLACD) \\XIPERROR (DECLARE \\BLT -FREPLACEFIELD SWAPXIPADDRESSES SENDXIP) \\BULK.DATA.CLOSE (FREPLACEFIELD \\COURIER.TRACE DECLARE -SPP.SENDATTENTION SPP.SENDEOM \\ABORT.BULK.DATA RESETSAVE) LISPXUSE (ERROR HELP NCONC) |\\VFMSmartBLT| - (DECLARE \\PUTBASE) CHNGNM (/PUTD /PUT /REMPROP DECLARE SI::RESETUNWIND PRINT /ADDPROP) CL:MOD ( -DECLARE) SPY.DELETE (FRPLACD) FMAX (ERRORX ADD1VAR) MOVD (FREPLACEFIELD PUTD MARKASCHANGED) -TEDIT.GET.OBJECT (SETFILEPTR TEDIT.PROMPTPRINT FREPLACEFIELD) FILENAMEFROMID (SETFILEPTR -|\\LFCheckBang| FRPLACD) SEDIT::LINEARIZE-LIST (SEDIT::OUTPUT-CR-OR-SPACE SEDIT::OUTPUT-CR -SEDIT::OUTPUT-SPACE) \\NSRANDOM.WROTE.HANDLE (\\NSFILING.UPDATE.ATTRIBUTES) ERRORX (DECLARE RESETSAVE) - TEDIT.ADD.MENUITEM (RPLACD FREPLACEFIELD UPDATE/MENU/IMAGE) FMIN (ERRORX ADD1VAR) TB.DELETE.ITEM ( -FREPLACEFIELD) MSSETSETTYPE (SELECTQ FIXVERBSETTYPE MSSETSETTYPE) TEDIT.EXTEND.SEL ( -\\TEDIT.SET.SEL.LOOKS DECLARE FREPLACEFIELD \\FIXSEL \\COPYSEL) \\BSP.GETNEXTBUFFER (BSP.OUTPUT.ERROR) - CL:CHAR-LESSP (CL:ERROR) FIXSPELL2 (MAPRINT LISPXPRIN1 LISPXPRIN2) SETYREL.IP (APPENDNUMBER.IP -APPENDOP.IP) EDITBMBUTTONFN (DECLARE \\SHADEBITS UPDATE/BM/DISPLAY RESETGRID.NEW -UPDATE/BM/DISPLAY/SELECTED/REGION RESETFORM GETMOUSESTATE DETACHWINDOW CLOSEW BLTSHADE -\\EDITBM/PUTUP/DISPLAY \\CLEARBM DSPFILL GRID ATTACHWINDOW EDITBMRESHAPEFN UPDATE/SHADE/DISPLAY OPENW -PAINTW READHOTSPOT) CLOSEBSPSTREAM (WITH.MONITOR DECLARE OBTAIN.MONITORLOCK BSPFORCEOUTPUT -\\BSP.FLUSHINPUT MONITOR.AWAIT.EVENT SI::MONITOR-UNWIND BLOCK) \\TEDIT.PUT.SINGLE.CHARLOOKS2 (\\ARBOUT - \\ATMOUT \\SMALLPOUT DECLARE) CHANGECALLERS (MAPC UPDATEFILES FRPLACD ERROR EDITFROMFILE -UPDATECHANGED) \\IBMPEEKCCODEFN (\\BACKFILEPTR) \\DSPXPOSITION.HDCPYDISPLAY (\\HDCPYDISPLAY.FIX.XPOS) -CHANGENAME (MARKASCHANGED) FIX89TYPEIN (PRIN1 RETDWIM) CL:CHAR-NOT-GREATERP (CL:ERROR) -FIND-HISTORY-EVENTS (DECLARE FRPLACD ERROR) FM.ENDEDIT (\\FM.INSUREWINDOW) \\PROTECTED.APPLY (DECLARE) - \\EDIT.UPCARET (\\CARET.DOWN) UPDATE/MENU/IMAGE (CLOSEW BITBLT DSPRIGHTMARGIN DSPXOFFSET DSPYOFFSET -GRID DSPOPERATION DSPFONT \\SHOWMENULABEL ADVISEWDS) \\MAKEBRUSH.ROUND (SELECTQ \\PUTBASE FILLCIRCLE) -\\MAKEBRUSH.VERTICAL (BITBLT) \\TEDIT.REFRESH.SHOWSEL (DECLARE \\TEDIT.UPDATE.SHOWSEL \\COPYSEL -FREPLACEFIELD \\SHOWSEL SELECTQ \\TEDIT.SET.SEL.LOOKS) MOVD? (PUTD MARKASCHANGED) U/L-CASE (DECLARE -MOVE.BACK.TO MOVE.TO.START.OF.WORD RPLACA TYPE.BUFFER ADJUSTLINE.AND.RESTORE) PRINT-EVENT-PROMPT ( -FRESHLINE DSPFONT) CL:CHAR/= (CL:ERROR) DO.INSERT.LINE (MOVETO BITBLT BITBLT.ERASE) -\\NSFILING.GET/SETINFO (\\NSRANDOM.REESTABLISH) SETXYREL.IP (APPENDNUMBER.IP APPENDOP.IP) -\\BUFFERED.BOUT (CHECK \\PUTBASEBYTE FREPLACEFIELD FDEVOP) GETHASH (DECLARE SHOULDNT) EDITMOVENODE ( -CLRPROMPT |printout| FLIPNODE GETMOUSESTATE TERPRI TRACKCURSOR) IMAX (ADD1VAR) MAKECREATE1 (FRPLACD -MAPC) \\PAGED.INCFILEPTR (\\UPDATEOF \\RELEASECPAGE \\SETIODIRTY) WRITE (PRINT-CIRCLE-SCAN) -MAKEWITHINREGION (DECLARE) \\TEXTCLOSEF (CLOSEF?) \\PUTSWAPPEDFIXP (.UNBOX. SELECTC \\ILLEGAL.ARG -CL::%NOT-NONCOMPLEX-NUMBER-ERROR FREPLACEFIELD) ACCEPT-UNIX-SOCKET-STREAM (DECLARE \\SETACCESS -FREPLACEFIELD) FNS.PUTDEF (ERROR SELECTQ FIXEDITDATE DELDEF VIRGINFN LISPXPRIN1 LISPXPRIN2 SAVEDEF -ADDSPELL MARKASCHANGED) CL:CHAR-GREATERP (CL:ERROR) \\BSP.HANDLE.DATA (RELEASE.PUP \\ENQUEUE -FREPLACEFIELD NOTIFY.EVENT SETUPTIMER) TTUNREADBUF (DECLARE BKSYSCHARCODE) RAND (RANDSET RPLNODE -RPLACA) \\GENERIC.CHARSET (FREPLACEFIELD) LISPXPRINTDEF (LISPXPUT) \\HANDLE.RAW.XIP (DECLARE PRIN1 -\\XIPERROR \\PUTBASE SWAPXIPADDRESSES FREPLACEFIELD SENDXIP UNINTERRUPTABLY \\ENQUEUE) CREATEFIELDS ( -FRPLACD) \\BUFFERED.BIN (FREPLACEFIELD) CL:CHAR-NOT-LESSP (CL:ERROR) \\SECONDSCLOCKGREATERP (\\BLT) -SPY.SUM (SORT) \\BUFFERED.BINS (\\MOVEBYTES FREPLACEFIELD \\PUTBASEBYTE) \\IFS.LOOKUPFILE ( -WITH.MONITOR DECLARE OBTAIN.MONITORLOCK SETUPPUP \\PUTPUPSTRING SELECTC PRINTERRORPUP CLOSEPUPSOCKET -RELEASE.PUP SI::MONITOR-UNWIND) \\GENERIC.READP (DECLARE CHECK \\NSIN \\BACKNSCHAR) BSPFORCEOUTPUT ( -DECLARE OBTAIN.MONITORLOCK \\BSP.SENDBUFFER SI::MONITOR-UNWIND) COMPILER::COMPILE-AND-DUMP-1 (CL:PRINC - BLOCK) LOADCOMP? (LOADCOMP) CL:CHAR-NOT-EQUAL (CL:ERROR) DELDEF (APPLY* SELECTQ /PUTD REMPROP -MASTERSCOPE MAPC /PUTPROP FLUSHFILEMAPS DELFROMLIST MAP PRIN1 MARKASCHANGED) -\\TEDIT.GET.CHARLOOKS.LIST2 (FRPLACD) \\BUFFERED.BOUTS (\\MOVEBYTES FREPLACEFIELD FDEVOP) \\FTPERROR ( -|printout| PRIN1 HELP CLOSEBSPSTREAM) \\SIN.OLD (DECLARE) /PUT-1 (UNDOSAVE FRPLACD SETPROPLIST) -\\BSP.HANDLE.ACK (RELEASE.PUP UNINTERRUPTABLY SENDPUP \\ENQUEUE \\TRANSMIT.STRATEGY NOTIFY.EVENT -\\SETBSPTIMEOUT SETUPTIMER) FIXSPELL (DECLARE RELSTK PRINT SI::RESETUNWIND /RPLNODE ADDSPELL MOVETOP) -READ-AFM-FILE (PRIN1 DECLARE RATOMS SETA CLOSEF) \\LOAD-STREAM (DECLARE LISPXTERPRI PRIN1 LISPXPRIN1 -FRPLACA LISPXPUT FASL:PROCESS-FILE SMASHFILECOMS ADDFILE) SHOWREGION (MOVETO RELDRAWTO) \\MOVEBYTES ( -\\BLT FRPTQ) UNSAFE.TO.MODIFY (PRINTOUT) ADDPROP (ERRORX FRPLACD FRPLACA SETPROPLIST) CLISPFOR0 ( -DECLARE /RPLNODE CLISPFORERR FRPLACD PRIN1 PEEKC ERRORMESS ERROR! ERRORMESS1 MAP PRINT RPLACA MAPC -CLISPTRAN) |\\VFMMarkBufferDirty| (FREPLACEFIELD) CL:CHAR< (CL:ERROR) FM.EDITITEM (\\FM.INSUREWINDOW -\\FM.ENDEDIT) SEDIT::DOT-THIS-LIST (RPLACD FREPLACEFIELD SEDIT::NOTE-CHANGE) MIN (ERRORX ADD1VAR) -|\\LFDeleteFile| (DECLARE OBTAIN.MONITORLOCK UNINTERRUPTABLY |\\LFRemoveDirEntry| |\\PFTrimHelper| -SI::MONITOR-UNWIND) HASDEF (DECLARE) CREATEPAGES (\\NEWPAGE) |\\SETUPTIMERmacrofn| (DECLARE) -BSPGETMARK (FREPLACEFIELD \\BSP.CLEANUP.INPUT) |\\PFReplaceString| (DECLARE \\PUTBASEBYTE \\PUTBASE) -DMPHASH (DECLARE PRINT MAPHASH) TB.EXPANDFN (DECLARE OBTAIN.MONITORLOCK WINDOWADDPROP TB.DISPLAY.LINES - SI::MONITOR-UNWIND) XCL:LIST-ALL-PROFILES (CL:MAPHASH) READ (DECLARE) CL:CHAR-EQUAL (CL:ERROR) -READ-UNICODE-MAPPING-FILENAMES (FRPLACD) SEDIT::OUTPUT-CONSTANT-STRING (SEDIT::STEP-LINEAR RPLACD -SEDIT::ADVANCE TEDIT.INSERT) LOAD (RESETSAVE) PPSPPSTREAM (|printout|) \\BOXFPLUSDIF (.FLOATUNBOX. -SELECTC .NEGATE. .LLSH8. .LLSH1. .LRSH8. FRPTQ) TEDIT.STREAMCHANGEDP (\\TEDIT.WINDOW.TITLE -FREPLACEFIELD) \\10MB.TURNONETHER (\\MAIKO.ETHERSUSPEND FREPLACEFIELD \\BLT \\STORENSHOSTNUMBER) -\\BSPINIT (DECLARE) ADDSPELL2 (/RPLACA) SPY.ADD.ENTRY (\\PUTBASEPTR \\PUTBASE) PSCFONT.READFONT (SETA -CLOSEF) \\CHARWIDTH.HDCPYDISPLAY (DECLARE) SEDIT::LINEARIZE (SEDIT::SET-LINEAR DECLARE -SEDIT::GENERATE-LINEAR-FORM CL:FUNCALL) \\SPP.SYSPKT (FREPLACEFIELD BLOCK) SPY.MERGETREE ( -FREPLACEFIELD SPY.MERGE.CALLEES) \\BOXFQUOTIENT (.FLOATUNBOX. SELECTC .NEGATE. .LLSH8. .LRSH8. .LRSH1. - FRPTQ) NEWDEFC (VIRGINFN CL:FORMAT SAVEDEF /PUTD /PUTPROP) \\BSP.HANDLE.INTERRUPT (FREPLACEFIELD -BSP.OTHERFN DECLARE SENDPUP) |\\LFRenameFile| (WITH.MONITOR DECLARE OBTAIN.MONITORLOCK -|\\LFMakeDirEntry| FREPLACEFIELD |\\LFRemoveDirEntry| |\\PFReplaceString| SI::MONITOR-UNWIND LISPERROR -) PARAMETRICSPLINE (ERROR) TEDIT.PUT.OBJECT (\\DWOUT \\SMALLPOUT \\ATMOUT APPLY* SETFILEPTR) -\\NULL.OPENFILE (DECLARE \\SETACCESS) CL:CHAR> (CL:ERROR) TIMEREXPIRED? (\\PUTBASEFIXP) COMP.STRETURN -(COMP.ST) \\BOXFTIMES2 (.FLOATUNBOX. SELECTC .NEGATE. .LLSH8. .LLSH1. .LRSH8.) MODERN-SNAPW ( -WINDOWPROP) TTCOMPLETEWORD (DECLARE CHECK END.DELETE.MODE HELP RPLACA GO.TO.RELATIVE TYPE.BUFFER -ADJUSTLINE.AND.RESTORE FORWARD.DELETE.TO MOVE.TO.WHEREVER ADDCHAR MOVETOP) EDITP (EDITE) -|\\PFTransferFilePage| (WITH-RESOURCE FREPLACEFIELD MESASETQ ERROR FREERESOURCE DECLARE \\CLEARWORDS) -\\NSFILING.CLOSE.BULKSTREAM (CLOSEF) TTRUBOUT (DELETE.LONG.SEGMENT1) \\FLOAT (.NEGATE.) -\\SEARCHINTERPRESSFONTS (DECLARE) EDITV (PRIN1) |\\VFMDelete1| (MESASETQ |\\VFMSmartBLT|) SETX.IP ( -APPENDINTEGER.IP APPENDOP.IP APPENDNUMBER.IP) \\FILEOUTCHARFN (\\BOUT) GRAPHEDITCOMMANDFN (DECLARE) -PRINT-ARGLIST (TAB PRIN1 PRIN2 SELECTQ TERPRI SPACES) TEDIT.UNDO.DELETION (FREPLACEFIELD \\INSERTPIECE - APPLY* \\FIXILINES TEDIT.UPDATE.SCREEN \\TEDIT.SET.SEL.LOOKS \\FIXSEL) OPENATTACHEDWINDOWS ( -WINDOWPROP MOVEATTACHEDWINDOWTOPLACE) TYPE.BUFFER (MAPC) PREPLOOP (MAPC) BRH/LAYOUT (DECLARE -BRH/OFFSET) SUBHASH (PUTHASH) |\\VFMDelete2| (FREPLACEFIELD MESASETQ |\\VFMSmartBLT| |\\VFMPutNext|) -FM.SHADE (\\FM.INSUREWINDOW) \\TEDIT.GET.PARALOOKS.LIST2 (FRPLACD) \\MAKEBRUSH.DIAGONAL (BITMAPBIT) -|\\LFTruncateFile| (\\UPDATEOF UNINTERRUPTABLY |\\LFExtendFile| \\SETFILEPTR \\BOUT FREPLACEFIELD -|\\LFUpdateLeaderPage| |\\PFSaveBuffers|) PRINT-HISTORY (MAPC PRINT-EVENT FRESHLINE) PUTDEFN ( -FREPLACEFIELD \\LOCKCELL AOUT BOUTZEROS FILEBLOCKTRAILER) TEDITCHAT.MENUFN (DECLARE FREPLACEFIELD -\\CHECKCARET SELECTQ APPLY*) TB.FLUSH.WINDOW (WINDOWDELPROP ERSETQ) COERCETEXTOBJ (\\ILLEGAL.ARG -RPLSTRING SETFILEPTR RPLCHARCODE ERROR FREPLACEFIELD \\SETUPGETCH CLOSEF) \\EDIT.DOWNCARET ( -FREPLACEFIELD) DO.CHAT.OPTION (MENU |printout|) RETDWIM (LISPXPUT DWIMARKASCHANGED CL:THROW RETEVAL -RETAPPLY RELSTK ERROR! MAPC CLISPERROR) CL:CHAR>= (CL:ERROR) \\MAKEBRUSH.HORIZONTAL (BITBLT) -|NewPrinter| (DECLARE RPLACD) \\INIT.ETHER.BUFFER.POOL (FREPLACEFIELD) DINFO.UPDATE.GRAPH.DISPLAY ( -DINFO.INVERT.NODE DINFO.SHOWGRAPH FREPLACEFIELD) SETXY.IP (APPENDNUMBER.IP APPENDOP.IP) STKNTH (RELSTK -) \\DSPFONT.HDCPYDISPLAY (FREPLACEFIELD \\FSETWIDTH) MAPRINT (DECLARE LISPXPRIN1 APPLY* SI::RESETUNWIND -) INITDATATYPENAMES (DECLARE FREPLACEFIELD) SPY.NEXT.TREE (FREPLACEFIELD) RENAME (COPYDEF -CHANGECALLERS DELDEF) \\BSP.HANDLE.INTERRUPTREPLY (FREPLACEFIELD NOTIFY.EVENT BSPHELP) -\\IDLERKEYACTION (KEYACTION FREPLACEFIELD) TOPATTACHEDWINDOWS (TOTOPW) PSCFONT.WRITEFONT (PRIN3 BOUT -\\WOUT DECLARE CLOSEF) SEDIT::DELETE-QUOTE (SEDIT::REPLACE-NODE) SETSTKNAME (UNINTERRUPTABLY CHECK -\\DELREF \\ADDREF) CREATE-UNIX-SOCKET-STREAM (DECLARE \\SETACCESS FREPLACEFIELD) -\\SPP.CHECK.INPUT.QUEUE (SHOULDNT) \\LEAF.READFILEPROP (FREPLACEFIELD) \\TEXTBIN (DECLARE \\SETUPGETCH - \\TEDIT.TEXTBIN.STRINGSETUP \\TEDIT.TEXTBIN.FILESETUP) |\\LFGetFileInfo| (DECLARE OBTAIN.MONITORLOCK -\\UPDATEOF SI::MONITOR-UNWIND) INITGC (CREATEPAGES) SHRINK-VECTOR (FREPLACEFIELD) FTPPRINTCODE (PRIN1 -PRINTCONSTANT PRINTNUM) \\GETREGION.CHECKOPPT (MAPC) CHAT.RESHAPEWINDOW (RESHAPEBYREPAINTFN) -CLISPCAR/CDR (NCONC DWIMIFY2? CLISPTRAN DWIMERRORRETURN) LISPXEVAL (FRPLACA) \\LEAF.GETFILEINFO.OPEN ( -RELEASE.PUP) LCSKIP (ERROR) TEDIT.REDO.INSERTION (FREPLACEFIELD TEDIT.PROMPTPRINT RETFROM -\\INSERTPIECE \\TEDIT.DIFFUSE.PARALOOKS \\FIXILINES TEDIT.UPDATE.SCREEN \\TEDIT.SET.SEL.LOOKS \\FIXSEL -) /SETTOPVAL (UNDOSAVE) DO-DISPATCH-MACRO (READ-EXTENDED-TOKEN) ADDHASH (NCONC1 PUTHASH) \\FRAMESCAN ( -SELECTC RAID) |\\VFMFreeVPage| (|\\VAMFreePageGroup|) \\DO-DEFINE-FILE-INFO (MAP) FM.REDISPLAYMENU ( -\\FM.INSUREWINDOW) \\INFINITY (FREPLACEFIELD) SEDIT::MAP-COMMENT-INDEX (FREPLACEFIELD) CL:CHAR= ( -CL:ERROR) RETTO (\\SMASHRETURN) \\LFINITCASEARRAY (\\PUTBASEBYTE) COMPILER::ALPHA-IL-FUNCTION ( -COMPILER::CHECK-FOR-UNKNOWN-FUNCTION) \\NSFILING.RELEASE.BULKSTREAM (SPP.CLOSE FREPLACEFIELD RPLACD) -SEDIT::DELETE-LIST (SEDIT::REPLACE-LIST) ADDFILE0 (/SETTOPVAL ERROR) FILEMAP (DECLARE) \\COPYFNHEADER -(UNINTERRUPTABLY \\BLT FREPLACEFIELD) CL:SET-DISPATCH-MACRO-CHARACTER (FREPLACEFIELD) MOVE.FORWARD.TO -(GO.TO.RELATIVE) \\TEXTBOUT (\\TEDIT.MARK.LINES.DIRTY \\INSERTCH TEDIT.UPDATE.SCREEN) -DINFO.TOGGLE.GRAPH (DINFO.UPDATE.GRAPH.DISPLAY CLOSEW) PROMPTCHAR (DECLARE MAPC PRIN2 PRIN1) -DINFO.UPDATE.MENU.DISPLAY (FRPLACD DETACHWINDOW CLOSEW UPDATE/MENU/IMAGE ADDMENU ATTACHWINDOW -REDISPLAYW FREPLACEFIELD) \\FILLRTPPUP (FREPLACEFIELD \\SETRTPPORTS) TEDIT.WORDSET (CHECK) -\\SETXFORM.PSC (POSTSCRIPT.OUTSTR POSTSCRIPT.PUTCOMMAND) RESUME (LISPERROR UNINTERRUPTABLY -\\DECUSECOUNT FREPLACEFIELD) SMASHFILECOMS (SETTOPVAL) OPENIMAGESTREAM (DECLARE STREAMPROP) -\\SLOWRETURN (CHECK) \\BSP.HANDLE.ERROR (SELECTC FREPLACEFIELD \\RTP.ACTION DECLARE) -|MakeMenuOfPrinters| (DECLARE FRPLACD) \\10MB.LOADINPUTQ (\\TEMPLOCKPAGES \\QUEUE.INPUT.IOCB) -PFI.CENTER.PRINT (CHANGEFONT DSPXPOSITION MAP PRIN3) %DEFPRINT-ARRAY (\\ELIDE.PRINT.ELEMENT) -\\MATMULT441 (DECLARE \\PUTBASEFLOATP) FIXEDITDATE (SELECTQ /RPLACA /ATTACH) \\CML-LOAD (PRINT CL:FORMAT -) PRINTCOPYRIGHT (NCONC1 PRINTCOPYRIGHT1) \\MATMULT144 (DECLARE \\PUTBASEFLOATP) LISPXREADBUF (FRPLACD - PRIN1) PRINTERTYPE (SELECTQ) LISPXTERPRI (LISPXPUT) \\MATMULT331 (DECLARE \\PUTBASEFLOATP) -\\MAKEFLOAT (.LLSH1. SELECTQ FRPTQ .LRSH8.) LISPXPUT (FRPLACA) %PRINT-ARRAY-CONTENTS ( -\\ELIDE.PRINT.TAIL) |PutFloat| (\\PUTBASEFLOATP) \\MATMULT133 (DECLARE \\PUTBASEFLOATP) MOVETO.IP ( -APPENDNUMBER.IP) FIND.NON.SPACE (DECLARE) \\NSFILING.ERRORHANDLER (BLOCK RETFROM |printout| TERPRI -UNINTERRUPTABLY) \\DSKDISPLAY.RESHAPEFN (\\DSKDISPLAY.REPAINTFN) TTNTHLINE (DECLARE) UPDATEFILEMAP ( -SKIPSEPRS READC SKREAD RESETLST) CLEARPUP (\\ZEROWORDS) PRINTCOPYRIGHT1 (PRIN1 |printout| PRIN3 MAPC) -FASL:PROCESS-FILE (DECLARE) LISPXPRIN1 (LISPXPUT) SETXREL.IP (APPENDNUMBER.IP APPENDOP.IP) \\STRINGIN -(RPLCHARCODE) MAKEFLOATNUMBER (FREPLACEFIELD) \\TEDIT.PUT.SINGLE.PARALOOKS (\\SMALLPOUT DECLARE MAPC -\\ARBOUT \\ATMOUT SETFILEPTR) STKARGNAME (DECLARE) \\CURVE2 (DECLARE \\CURVESTART -.SETUP.FOR.\\BBTCURVEPT. \\INSURETOPWDS \\CURVE .WHILE.TOP.DS. \\PUTBASE \\SOFTCURSORDOWN -\\SOFTCURSORUPCURRENT LOADPOLY) COURIER.READ.BULKDATA (CLOSEF) \\RESUME (FREPLACEFIELD) CLEARFILEPKG ( -TERPRI PRIN1 UPDATEFILES PRINT PUTPROP SMASHFILECOMS NCONC1 CLRHASH) CLISPATOMIS2 (CLRPLNODE -CLISPATOMIS2) SETSTKARGNAME (DECLARE SETSTKNAMEENTRY UNINTERRUPTABLY) MAX (ERRORX ADD1VAR) FILECREATED - (DECLARE PRIN1 LISPXPRIN1 LISPXTERPRI /PUT) \\TEDIT2 (\\TEDIT.COMMAND.LOOP CLOSEW \\TEXTCLOSEF -FREPLACEFIELD APPLY*) %DEFPRINT-VECTOR (\\ELIDE.PRINT.ELEMENT) DINFO.TOGGLE.MENU (DETACHWINDOW) -SHRINKBITMAP (BITBLT BLTSHADE) DINFO.UPDATE.TEXT.DISPLAY (OPENTEXTSTREAM FREPLACEFIELD DINFO.SHOWSEL -CLOSEF?) SI::CLEAR-CLOSURE-CACHE (XCL::IMPLICIT-KEY-MAP-HASH) TEDIT.WORDGET (DECLARE CHECK) -\\CREATEINTERPRESSFONT (DECLARE) ADDFILE (SELECTQ SHOULDNT UPDATEFILES /SETTOPVAL ADDSPELL) READLINE ( -DECLARE CLEARBUF READC PRIN1 SHOULDNT RPLACA SETFILEPTR) \\ARBIN (CLOSEF?) \\NSFILING.HOSTNAMEP ( -\\DEFINEDEVICE) REDISPLAYGRAPH (DSPFILL) CREATEMENUEDWINDOW (FREPLACEFIELD SELECTQ PROMPTPRINT -CLRPROMPT ATTACHWINDOW OPENW) \\BSP.TIMERFN (\\SEND.ACK FREPLACEFIELD SENDPUP SETUPTIMER) -MAXATTACHEDWINDOWEXTENT (SHOULDNT) TTNLEFT (SUB1VAR) FLOATP.TO.BCPL (FREPLACEFIELD) LOOKUP-SYMBOL ( -DECLARE CL:FORMAT) CL:CHAR<= (CL:ERROR) MODERN-ADD-EXEC (FRPLACD DISMISS MODERNWINDOW) -\\COURIER.EXPEDITED.OVERFLOW (|printout| TERPRI) REOPENTEXTSTREAM (\\SETACCESS FREPLACEFIELD) -TEDIT.UNDO.INSERTION (FREPLACEFIELD \\DELETECH \\FIXDLINES TEDIT.UPDATE.SCREEN \\FIXSEL) -PFI.PRINT.INDICES (TERPRI PFI.INDEX.BREAK DSPNEWPAGE) LISPX/1 (SELECTQ) DEFINE-FILE-INFO (DECLARE) -SLICESET (HELP) EQUALHASH (DECLARE MAPHASH) |\\VFMFind| (FREPLACEFIELD |\\VFMReadNext| APPLY) SPY.MAX -(MAPC) \\TEDIT.STRIKEOUT.CARET.OFF (TEDIT.CARETLOOKS \\TEDIT.SHOWCARETLOOKS) \\LEAF.REPAIR.BROKEN.PUP -(FREPLACEFIELD ERROR) \\LEAF.STRIP.QUOTES (FRPLACD) |\\LFGetFileName| (DECLARE OBTAIN.MONITORLOCK -SI::MONITOR-UNWIND) BKSYSBUF.GENERAL (BKSYSBUF.GENERAL DECLARE SI::RESETUNWIND) GETSETQ (SELECTQ -/RPLNODE RECORDERROR) %SLOW-ARRAY-WRITE (CL:ERROR) |\\PFFetchString| (RPLCHARCODE) /DECLAREDATATYPE ( -UNDOSAVE) CHAT.BUTTONFN (PROCESS.APPLY CHAT.HOLD) HASH-B (READ-EXTENDED-TOKEN HASH-NO-PARAMETER-ERROR) - CHAT.TAKE.INPUT1 (DECLARE CLEARW |printout|) HASH-COLON (HASH-NO-PARAMETER-ERROR) LINETO.IP ( -APPENDNUMBER.IP) TTYIN.BALANCE (DECLARE CHECK MOVE.TO.WHEREVER RPTQ ADDCHAR BEEP) MOVEATTACHEDWINDOWS -(MAPC MOVEW) FILEDATE (RESETSAVE SETFILEPTR) COMPILER::RESOLVE-VARIABLE-BINDING (CL:CERROR) COMP.STTAG - (OPT.COMPILERERROR COMP.ST) SEDIT::COPY-STRUCTURE-LIST (FREPLACEFIELD) \\NSRANDOM.HANDLE.ERROR ( -FREPLACEFIELD TERPRI) REMPROPLIST (RPLNODE2 RPLACD SETPROPLIST) PRINTSPP (|printout| SPACES -PRINTPACKETDATA) FB.SORT.VERSIONS (FRPLACD RPLACD) FILES.PUTDEF (PUTDEF ADDFILE) DINFO.TOGGLE.TEXT ( -FLASHWINDOW DINFO.UPDATE.TEXT.DISPLAY) \\NSFILING.WHENCLOSED (FREPLACEFIELD \\NSRANDOM.ENSURE.WATCHER) - DINFO.UPDATE.HISTORY (FRPLACD DETACHWINDOW CLOSEW) TTNTH (SUB1VAR) ONEDINSPECTW.CREATE ( -WITH-INSPECTOR-ENV ONEDINSPECT.RESHAPEFN RIGHTW.RESHAPEFN TITLEW.REPAINTFN) TEDIT.SETSYNTAX ( -\\SETSYNCODE CHECK) \\FAST4BIT (\\PUTBASE) LISPXPRINT (LISPXPUT) MB.CREATE.NWAYBUTTON (FRPLACD -DSPXOFFSET DSPYOFFSET DSPFONT DSPRIGHTMARGIN DSPDESTINATION MOVETO PRIN1 IMAGEOBJPROP) -\\GETREGION.CHECKBASEPT (ERROR) HASH-C (CL:READ HASH-NO-PARAMETER-ERROR) SIZE/GRAPH/WINDOW (CLEARW) -COMPILE.FILE.RESET (CLOSE-AND-MAYBE-DELETE CLOSEF? /SETATOMVAL) BSP.PUTINTERRUPT (DECLARE -OBTAIN.MONITORLOCK \\FILLBSPPUP \\PUTBASE PUTPUPSTRING SENDPUP FREPLACEFIELD \\SETBSPTIMEOUT -MONITOR.AWAIT.EVENT SI::MONITOR-UNWIND) |\\LFReadPages| (|\\LFExtendFileIfNecessary| \\UPDATEOF -|\\PFGetPage| \\CLEARBYTES \\CLEARWORDS) SETSPACE.IP (APPENDNUMBER.IP) FTPPRINTMARK (|printout| TERPRI -) \\CONVERTNUMBER (RPLCHARCODE SELECTQ) /PUT (ERRORX UNDOSAVE FRPLACD /RPLACA SETPROPLIST) -EDITLOADFNS? (PRIN2 MAPRINT /RPLACD CL:FORMAT EXEC-FORMAT) COMP.STJUMP (COMP.ST OPT.CCHECK PUTHASH) -TB.CLOSE/SHRINK (TB.PROCESS TB.FINISH.CLOSE |printout| TERPRI) HASH-DOT (HASH-NO-PARAMETER-ERROR) -\\MATMULT333 (DECLARE \\PUTBASEFLOATP) TERM.HOME (\\DTEST) HASH-DOUBLEQUOTE (CL:READ -HASH-NO-PARAMETER-ERROR) APPENDINTEGER.IP (DECLARE APPENDBYTE.IP APPENDSEQUENCEDESCRIPTOR.IP -APPENDINT.IP) AT.END.OF.TEXT (DECLARE) COPY.WINDOW.TO.BITMAP (.WHILE.TOP.DS. \\PUTBASE -\\SOFTCURSORDOWN \\INSURETOPWDS DECLARE BITBLT \\SOFTCURSORUPCURRENT) \\QUEUE.INPUT.IOCB (SELECTC -FREPLACEFIELD \\DEVICE.OUTPUT |\\DoveEther.QueueInput| \\NOMACHINETYPE) PFI.CONDENSE.INDEX (MAPC) -\\FM.EDIT-UPDATEAFTERDELETE (\\CARET.DOWN BLTSHADE) \\DUMPEXPORTS (PRIN1 PRIN2 MAP PRINT) -PARSE-NAMESTRING1 (\\ILLEGAL.ARG) MAPRELATION (DECLARE MAP) UNMAKEHARDCOPYSTREAM (DECLARE -FREPLACEFIELD STREAMPROP) FILEPKGCOMS.PUTDEF (MAPC) \\FILLINSPP (FREPLACEFIELD \\BLT) SPY.MERGE ( -CLRHASH MAPC) \\TEDIT.STRIKEOUT.CARET.ON (TEDIT.CARETLOOKS \\TEDIT.SHOWCARETLOOKS) -EXPANDING-PAGEFULLFN (SHAPEW) \\REUSETO (ERROR) DECLARE\:1 (DECLARE\:1 SELECTQ) PFI.PREVIEW.DEFINEQ ( -PRIN1 PRINT PFI.PRINT.LAMBDA READCCODE) STKSCAN (RELSTK) \\APPEND2 (FRPLACD) CLISPATOMARE2 ( -DWIMERRORRETURN FRPLACA FRPLACD) RECEVAL (DECLARE) \\POLYSHADE.BLT (|\\DrawScanList.Blt|) -\\HDCPYDSPPRINTCHAR (\\CHECKCARET CHECK \\HDCPYBLTCHAR \\DSPPRINTCR/LF DSPBACKUP) FM.RESETSHAPE ( -\\FM.INSUREWINDOW) \\TEDIT.UNDERLINE.CARET.OFF (TEDIT.CARETLOOKS \\TEDIT.SHOWCARETLOOKS) -SEDIT::BACKSPACE-QUOTE (SEDIT::SET-SELECTION-NOWHERE SEDIT::SET-SELECTION-ME -SEDIT::EXTRACT-CURRENT-SELECTION) \\ADDLEAFSTRING (ERROR \\PUTBASE \\PUTBASEBYTE \\MOVEBYTES -FREPLACEFIELD) |\\LFSetFileInfo| (DECLARE OBTAIN.MONITORLOCK |\\LFUpdateLeaderPage| SI::MONITOR-UNWIND -) ENDFILE (PRINT) LINELENGTH (\\ILLEGAL.ARG FREPLACEFIELD) FTPDEBUG (DSPFONT DSPSCROLL) HASH-R ( -READ-EXTENDED-TOKEN) FIXR (.FLOATUNBOX. SELECTC .NEGATE. .LLSH8. .LLSH1. .LRSH8. FRPTQ) -CL:VECTOR-PUSH-EXTEND (CL:ADJUST-ARRAY) ENUM-STRING (STRPUT FREERESOURCE DECLARE) CHAT.SWITCH.EMACS ( -FREPLACEFIELD) FM.REDISPLAYITEM (\\FM.INSUREWINDOW BLTSHADE) DMCHAT.ADDRESS (\\DTEST FREPLACEFIELD -TERM.MOVETO) ATAN (DECLARE) DINFO.TOGGLE.HISTORY (DETACHWINDOW) BLTPATTERN.GENERIC (BITBLT) -\\TTY.CREATING.DISPLAYSTREAM (FREPLACEFIELD) FM.RESETGROUPS (\\FM.INSUREWINDOW \\FM.UPDATEGROUPEXTENT) - TEDIT.GETSYNTAX (DECLARE CHECK) SAVECOPYRIGHT (PRINT) PRETTYPRINT3 (PRIN1 CHANGEFONT PRIN2 TERPRI -PRINT PRINTDEF) PPSPP (|printout| \\BLT PRINTNUM PPSPPSTREAM DECLARE PRINTSPP SI::RESETUNWIND) -|\\LFExtendFile| (UNINTERRUPTABLY \\UPDATEOF) HASH-O (READ-EXTENDED-TOKEN HASH-NO-PARAMETER-ERROR) -EDITGRAPH1 (WINDOWPROP DSPOPERATION REDISPLAYGRAPH EDITGRAPH2) ATTACHMENU (ATTACHWINDOW OPENW) -\\MAKERECODEMAP (DECLARE) MINATTACHEDWINDOWEXTENT (SHOULDNT) DECLAREDATATYPE (LISPERROR FRPLACD) -TEDIT.EDIT.OBJECT (FREPLACEFIELD \\FIXSEL TEDIT.PROMPTPRINT TEDIT.UPDATE.SCREEN) INITATOMS ( -CREATEPAGES COPYATOM) HASH-X (READ-EXTENDED-TOKEN HASH-NO-PARAMETER-ERROR) RESETBUFS (DECLARE LINBUF -SYSBUF BKBUFS) TRANSLATE.DATATYPE (DECLARE MAPC \\REUSETO RPLACA) SLITLOOP (MAPC ATTACH) SENDXIP ( -FREPLACEFIELD AWAIT.EVENT \\RCLK |printout| PRINTXIPROUTE \\REQUEUE.ETHERPACKET \\SETXIPCHECKSUM -\\MAYBEPRINTPACKET TRANSMIT.ETHERPACKET) SEDIT::UNDO-COMMENT-CHANGE (SEDIT::UNDO-BY RPLACA -SEDIT::NOTE-CHANGE-IN-SIMPLE NCONC1 RPLACD) INSTALLBRUSH (DECLARE SETA) |\\LFWritePages| ( -|\\LFUpdateLeaderPage| FREPLACEFIELD |\\LFExtendFileIfNecessary| |\\PFPutPage|) \\MATMULT444 (DECLARE -\\PUTBASEFLOATP) CHAT.ICONFN (DECLARE TTY.PROCESS) DOWINDOWCOM (\\CHECKCARET TOTOPW) -\\SEARCHPRESSFONTS (DECLARE RESETSAVE SETFILEPTR) UNSAVED1 (VIRGINFN /REMPROP SAVEDEF /PUTD ADDSPELL -ERROR) OPT.CFRPTQ (COMP.VAL COMP.STTAG COMP.STCOPY COMP.STFN COMP.STJUMP COMP.VALN) HASH-PLUS ( -HASH-NO-PARAMETER-ERROR) OPT.COMPINIT (MAPC) HASH-EQUAL (CL:ERROR) TERM.PRINTCHAR ( -\\CHANGECHARSET.DISPLAY \\BLTSHADE.DISPLAY \\BLTCHAR) \\10MB.STARTDRIVER (DECLARE ERROR FREPLACEFIELD -\\10MB.TURNONETHER) ADDSPELL1 (FRPLACD ADD1VAR NCONC1 RPLNODE UNDOSAVE) |\\DSKEventFn| (DECLARE -OBTAIN.MONITORLOCK |\\DSKCloseDevice| |\\DSKOpenDevice| \\UNVISIBLE.PAGED.REVALIDATEFILELST -\\PAGED.REVALIDATEFILELST MAPHASH \\UNVISIBLE.FLUSH.OPEN.STREAMS SI::MONITOR-UNWIND) MSSOLVE (MAPC -PRIN2 PRIN1) FLTINTLOG (TIMESPOW10) HCOPYALL (CLRHASH) INITDATATYPES (CREATEPAGES FREPLACEFIELD -SETQ.NOREF) FIND.PACKAGE (DECLARE SHOULDNT) FM.RESETMENU (\\FM.INSUREWINDOW \\FM.ENDEDIT MAPC) -\\TEDIT.UNDERLINE.CARET.ON (TEDIT.CARETLOOKS \\TEDIT.SHOWCARETLOOKS) \\LEAF.USE.NEW.CONNECTION ( -FREPLACEFIELD SELECTC |printout| PRIN1 MAPC ADD.PROCESS) PRETTYCOMPRINT (PRIN1) FILEPKGCHANGES ( -FRPLACD) DWIMIFY0? (SELECTQ) GETPROMPTWINDOW (\\ILLEGAL.ARG REATTACHPROMPTWINDOW \\PROMPTWINDOW.EXPAND - DSPSCROLL \\PROMPTWINDOW.SET.HEIGHT OPENW) POSTEDITALISTS (MARKASCHANGED MAPC PUTHASH RPLACA) -OLD.FIND.SYMBOL (COMPUTE.ATOM.HASH) CLISPATOM1 (FIX89TYPEIN SELECTQ FRPLACA DWIMERRORRETURN /RPLNODE -CLRPLNODE CLISPATOM2) SCANFILEHELP (PRIN1 TERPRI) HASH-MINUS (HASH-NO-PARAMETER-ERROR) -SET-FILL-POINTER (FREPLACEFIELD) \\FILLBSPPUP (FREPLACEFIELD \\SETRTPPORTS) FB.DELVERCOMMAND ( -FB.ALLOW.ABORT FB.UPDATE.COUNTERS) \\NSFILING.GET.STREAM (RPLACD FREPLACEFIELD RESETSAVE) TILE (BITBLT -) SI::DISABLE-CLOSURE-CACHE (SI::CLEAR-CLOSURE-CACHE) |\\DSKCloseDevice| (DECLARE OBTAIN.MONITORLOCK -\\REMOVEDEVICE SI::MONITOR-UNWIND) \\TEDIT.WORDBOUND.READTABLE (CHECK MAPC) GETCLEARINGHOUSE (DECLARE -OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) FNUM-STRING (STRPUT) SETFONT.IP (APPENDNUMBER.IP APPENDOP.IP -ERROR FREPLACEFIELD) RPLCHARCODE (\\SMASHABLESTRING LISPERROR \\PUTBASECHAR DECLARE) EDITGRAPH2 ( -|printout| GETMOUSESTATE TRACKNODE) MENUWINDOW (FREPLACEFIELD ERROR UPDATE/MENU/IMAGE WINDOWPROP -WINDOWADDPROP) GET-ENVIRONMENT-AND-FILEMAP (SETFILEPTR) CLISPCAR/CDR2 (DWIMERRORRETURN) BCPL.TO.FLOATP - (ERROR) COMPILE-IN-CORE (DECLARE SI::RESETUNWIND) \\UFS.UNREGISTER.GFS (DECLARE -|\\UFSFinishFileInfo-C| FREPLACEFIELD) DIGITSBDP (.FLOATUNBOX. SELECTC .NEGATE. .LLSH8. .LLSH1. -.LRSH8.) DO-HISTORY-SEARCH (DECLARE) PRETTYCOM (PRINT MAP SELECTQ PRINTFNS MAPC SPACES CL:FORMAT -CL:TERPRI MAPRINT TAB DECLARE PRIN3 RPTQ CHANGEFONT ERROR) PRETTYPRINT (PRIN2 PRIN1 TERPRI TCONC -PRINTDEF ADDSPELL PRETTYPRINT3 RPLACD LOADFNS PRINT /RPLACA FRPLACA EXEC-FORMAT LISPXPUT) INTTOEXT ( -.UNBOX. SELECTC \\ILLEGAL.ARG CL::%NOT-NONCOMPLEX-NUMBER-ERROR .LLSH1.) COMPILE-FILE-EX/IMPORT (PRINT) - GETXIP (UNINTERRUPTABLY LISPERROR AWAIT.EVENT \\MAYBEPRINTPACKET |printout| PRIN1) PRETTYDEF1 ( -/NCONC1 PRETTYCOM /RPLACA) BLTPATTERN.REPLACEDISPLAY (BLTSHADE BITBLT) TTECHO.TO.FILE (PRIN1 FRPTQ -DECLARE TERPRI) TTNEXTLINE (SUB1VAR) HASH-QUOTE (HASH-NO-PARAMETER-ERROR) \\SET.VMEM.FULL.STATE ( -FREPLACEFIELD) \\GOOD.DASHLST (FRPLACD) CLISPCAR/CDR1 (CLISPCAR/CDR2) INIT-CML-READTABLES (DECLARE -READTABLEPROP SETSYNTAX) \\TEDIT.GET.SINGLE.PARALOOKS (FREPLACEFIELD FRPLACD RPLACA RPLACD -TEDIT.PROMPTPRINT SETFILEPTR) FIND.SYMBOL (PRINT CL:FORMAT) UNCLISPTRAN (/RPLNODE2 /PUTHASH) -\\SETIOPOINTERS (\\PUTBASE RAID) \\UNVISIBLE.PAGED.REVALIDATEFILELST (SELECTQ MAPC \\SETACCESS FDEVOP -SHOULDNT \\PRINT-REVALIDATION-RESULT) CLISPEXPANSION (DECLARE DWIMIFY0? CL:CERROR) \\EXTFTIMES ( -.LLSH8.) HCOPYALL1 (FRPTQ DECLARE MAPHASH MAPC) \\FAULTINIT (\\MAIKO.FAULTINIT \\MP.ERROR -\\DL.FAULTINIT \\DOVE.FAULTINIT \\D01.FAULTINIT \\SETIOPOINTERS \\SET.VMEM.FULL.STATE FREPLACEFIELD) -PROPS.WHENCHANGED (RETFROM SELECTQ CLEARCLISPARRAY) EXTTOINT (.LRSH1.) HASH-S (HASH-NO-PARAMETER-ERROR -) PRINTDATE (/PUTPROP PRINTDATE1) \\10MB.INPUT.INTERRUPT (\\DEQUEUE \\10MB.NOTESTAT FREPLACEFIELD -\\RCLK \\PUTBASE \\TEMPUNLOCKPAGES \\ENQUEUE \\TEMPLOCKPAGES \\QUEUE.INPUT.IOCB SETUPTIMER -\\10MB.RESTART.ETHER) PFI.PREVIEW.DECLARE (TERPRI PRIN1 PRIN2 READCCODE SPACES PFI.HANDLE.EXPR) -DRAWDASHEDLINE (FRPLACD DRAWLINE) TWODINSPECTW.CREATE (WITH-INSPECTOR-ENV TWODINSPECT.RESHAPEFN -TOPW.RESHAPEFN RIGHTW.RESHAPEFN TITLEW.REPAINTFN) PREINITARRAYS (DECLARE) EXPANDBM (BLTSHADE BITBLT) -MAKEHARDCOPYSTREAM (DECLARE FREPLACEFIELD STREAMPROP DSPXPOSITION DSPYPOSITION) \\DL.FAULTINIT ( -\\MP.ERROR \\DL.NEWFAULTINIT \\RCLK \\PUTBASEPTR \\PUTBASE FREPLACEFIELD) FASL-FILEDATE (SETFILEPTR) -SPY.UPDATE.TITLE (TOTOPW GETMOUSESTATE \\BACKGROUND) \\TEDIT.SUPERSCRIPT.CARET (TEDIT.CARETLOOKS -\\TEDIT.SHOWCARETLOOKS) \\LEAF.READFILENAME (RELEASE.PUP) SLICEREF (HELP) -\\UNVISIBLE.FLUSH.OPEN.STREAMS (FDEVOP) MSDWIMTRAN (MSPRGDWIM) FILECHANGES (SETFILEPTR RESETSAVE) -\\MAIKO.FAULTINIT (\\MAIKO.DO.MOVDS \\MAIKO.NEWFAULTINIT \\RCLK \\PUTBASEPTR) -MB.THREESTATE.WHENOPERATEDFN (MB.THREESTATEBUTTON.FN) PRINTFNS (NCONC1 PRIN1 PRINT PRETTYPRINT RPLACA -TERPRI) CREATEMDSTYPETABLE (CREATEPAGES FRPTQ MAPC) PRETTYDEF (DECLARE \\ILLEGAL.ARG -CL:MULTIPLE-VALUE-SETQ PRIN1 SETFILEPTR HELP PRINT-READER-ENVIRONMENT) LOOKUP-ENVIRONMENT-AND-FILEMAP -(MAPHASH) ALLOCHASH (ERROR SETUPHASHARRAY) \\MAKEFRAME (CHECK) D-ASSEM::FIXUP-NTENTRY (UNINTERRUPTABLY -) \\MAIKO.PUNTBLTCHAR (DECLARE \\CHANGECHARSET.DISPLAY \\DSPPRINTCR/LF FREPLACEFIELD .WHILE.TOP.DS. -\\PUTBASE \\SOFTCURSORDOWN \\INSURETOPWDS \\SOFTCURSORUPCURRENT) SQRT (DECLARE ERROR FRPTQ) -\\TEDIT.PARSE.CHARLOOKS.LIST (LISTPUT FREPLACEFIELD) \\CH.PRINT.BLURB (TERPRI) COMPILER::ALPHA-COMPILER-LET - (MAPC) CHECKFORCHANGED (MAPC UPDATECHANGED MSCHECKEMPTY) \\EXTFQUOTIENT (.LRSH1. FRPTQ) -\\COPYDATATYPE (UNINTERRUPTABLY \\BLT) FLUSHFILEMAPS (CLRHASH MAPHASH) FLTSTR (WITH-RESOURCES -RPLCHARCODE FREERESOURCE DECLARE .FLOATUNBOX. SELECTC .NEGATE. .LLSH8. .LLSH1. .LRSH8. TIMESPOW10 -INTTOEXT .LRSH1. \\CONVERTNUMBER GLC FREPLACEFIELD CL:VECTOR-PUSH) FM.RESETSTATE (\\FM.INSUREWINDOW) -\\EXTNORMALIZE (.LLSH1.) \\FILEMAP-HASHOVERFLOW (MAPHASH REMHASH) |\\LFOpenFile| (DECLARE -OBTAIN.MONITORLOCK |\\LFUpdateLeaderPage| SI::MONITOR-UNWIND) \\MAIKO.BLTSHADE.BITMAP (DECLARE) -|\\UFSWritePages| (CL:ERROR) PRETTYDEFCOMS (DECLARE MAP) CHAT.ENDOFSTREAMOP (FREPLACEFIELD) HASH-VBAR -(SKIP.HASH.COMMENT) GET-FILEMAP-FROM-FILECREATED (SKREAD SETFILEPTR) |\\UFSOpenFile| (DECLARE -OBTAIN.MONITORLOCK CL:ERROR PROMPTPRINT FREPLACEFIELD SI::MONITOR-UNWIND) CHAT.TYPESCRIPT ( -PROCESS.APPLY) \\CONVERT.FLOATING.NUMBER (FREERESOURCE) TERM.ADDLINE (BITBLT) %NUMERIC-STRING-P ( -DECLARE) |\\UFSDirectoryNameP| (DECLARE) CL:COMPILE-FILE (DECLARE CL:ERROR CL:CLOSE FASL:CLOSE-FASL-HANDLE -) SEDIT::BACKSPACE-LIST (FREPLACEFIELD) PRINTDATE1 (|printout| SPACES PRIN3 TERPRI TAB) -LISPSOURCEFILEP (SETFILEPTR) READVISE1 (SI::ADD-OLD-STYLE-ADVICE REMPROP) |\\UFSSetFileInfo| (DECLARE -OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) CRITSECT (|printout| PRIN1 NORMSECT SHEDSCAN) FB.DELETE.FILE ( -TB.DELETE.ITEM FREPLACEFIELD) HARDCOPY.SOMEHOW (ALLOW.BUTTON.EVENTS) DINFO.SETUP.WINDOW (FREPLACEFIELD - WINDOWPROP DETACHALLWINDOWS DINFO.ADD.FMENU DINFO.UPDATE.TEXT.DISPLAY) ICMLARRAY.VALUECOMMANDFN ( -INSPECT ICMLARRAY.SETVALUE PROMPTPRINT ICMLARRAY.INDICES) \\FM.EDIT-MOVECARET (\\CARET.DOWN) -CL:MAKE-ARRAY (%ARRAY-CONTENT-INITIALIZE %ARRAY-ELEMENT-INITIALIZE) MSPRGDWIM (DECLARE DWIMIFY0 -SI::RESETUNWIND) UNDOSET (UNDOSAVE SETTOPVAL SETSTKARG) MB.THREESTATE.SHOWSELFN (SELECTQ BITBLT -DRAWLINE) \\TEDIT.ITALIC.CARET.ON (TEDIT.CARETLOOKS \\TEDIT.SHOWCARETLOOKS) COMPILE.FILE.DEFINEQ ( -COMPILE.CHECK.ARGTYPE BYTECOMPILE2) |\\LFGenerateFiles| (DECLARE OBTAIN.MONITORLOCK FRPLACD -|\\LFSortFiles| |\\LFFindInfo| SI::MONITOR-UNWIND) \\D01.ASSIGNBUFFERS (RAID \\INITBFS) HASH-COMMA ( -HASH-NO-PARAMETER-ERROR) |\\UFSRenameFile| (|\\UFStoOtherRenameMess| |\\UFSError|) CL:MACROEXPAND ( -CL:MULTIPLE-VALUE-SETQ) DIRECTORY.FILL.PATTERN (DECLARE) \\GETPRESSFONTNAMES (SETFILEPTR SELECTQ) -\\NSRANDOM.PREPARE.CACHE (FRPLACD FREPLACEFIELD \\NSRANDOM.CHECK.CACHE UNINTERRUPTABLY RPLACD RPTQ) -\\SPPWATCHER (DECLARE RESETSAVE PROCESSPROP FREPLACEFIELD OBTAIN.MONITORLOCK MONITOR.AWAIT.EVENT -\\SPP.RETRANSMIT.NEXT \\SPP.SENDPKT \\SPP.NOT.RESPONDING \\SPP.PROBE SI::MONITOR-UNWIND) -INCORNER.REGION (DECLARE) |\\LFExtendFileIfNecessary| (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND -LISPERROR) CHAT.CLEAR.FROM.MENU (CLEARW TERM.RESET.DISPLAY.PARMS) |\\UFSEventFn| (DECLARE -OBTAIN.MONITORLOCK |\\UFSCloseDevice| |\\UFSOpenDevice| \\UNVISIBLE.PAGED.REVALIDATEFILELST -\\PAGED.REVALIDATEFILELST MAPHASH \\UNVISIBLE.FLUSH.OPEN.STREAMS SI::MONITOR-UNWIND) -|\\LFRemoveDirEntry| (UNINTERRUPTABLY \\SETFILEPTR |\\LFCheckBang|) ARCTAN (DECLARE) SCALEBM (BLTSHADE - EXPANDBM) TTDELETECHAR (DELETELINE MOVE.TO.LINE) MSCHECKEMPTY (|printout| PRIN1 UPDATEFILES -MASTERSCOPE ERROR!) \\PARSE.PORTCONSTANT (DECLARE) STORETABLE (PUTTABLE MAPC) TEDIT.INCLUDE (DECLARE -TEDIT.PROMPTPRINT COPYBYTES COPYCHARS CLOSEF TEDIT.DO.BLUEPENDINGDELETE \\SHOWSEL -\\TEDIT.CONVERT.TO.FORMATTED \\TEDIT.INSERT.PIECES \\TEDIT.HISTORYADD \\FIXILINES TEDIT.UPDATE.SCREEN -\\FIXSEL \\TEDIT.WINDOW.TITLE \\SETUPGETCH) CHANGETRAN1 (DWIMIFYREC) POSTSCRIPT.PUTBITMAPBYTES ( -DECLARE BOUT \\MOVEBYTES) SETRGB.IP (SHOW.IP APPENDINTEGER.IP APPENDOP.IP FGET.IP ISET.IP) -TEDIT.PARSE.PAGEFRAMES1 (FREPLACEFIELD) GRAPHDELETENODE (APPLY*) HPRINSP (PRIN2) BLTPATTERN ( -BLTPATTERN.REPLACEDISPLAY BLTPATTERN.GENERIC) TTDELETEWORD (SETTAIL? DELETE.LONG.SEGMENT1) MSOUTPUT ( -OUTFILE RESETSAVE) \\TEDIT.PARSE.PARALOOKS.LIST (SELECTQ TEDIT.PROMPTPRINT FREPLACEFIELD) TEDIT.GET ( -FRESHLINE RESETLST WINDOWPROP \\FILLWINDOW TEDIT.PROMPTPRINT) |\\UFSCloseFile| (\\CLEARMAP FDEVOP -FREPLACEFIELD) |\\UFSGenerateFiles| (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) -FILEPKG.MERGECHANGES (FRPLACD NCONC) FM.HIGHLIGHTITEM (\\FM.INSUREWINDOW) EDITDELETENODE (PROMPTPRINT -PRIN1 FLIPNODE DISPLAYNODE MAPC GRAPHDELETENODE) PRINTDEF1 (PRINTDEF NCONC1) |\\LFEventFn| (DECLARE -OBTAIN.MONITORLOCK |\\LFCloseDevice| |\\PFEnsureInitialized| |\\LFOpenDevice| FREPLACEFIELD -\\REMOVEDEVICE \\FLUSH.OPEN.STREAMS |\\PFSaveBuffers| SI::MONITOR-UNWIND) \\COMPUTE.ARC.POINTS ( -FRPLACD) |\\UFSCloseDevice| (DECLARE OBTAIN.MONITORLOCK \\REMOVEDEVICE SI::MONITOR-UNWIND) -\\FIXLOCALNET (RPLACA) \\NSRANDOM.FETCH.CACHE (UNINTERRUPTABLY RPLACD RPLACA) |\\VFMSplit1| ( -|\\VFMReadNext| MESASETQ |\\VFMMarkBufferDirty|) \\FM.EDIT-DELETE (\\CARET.DOWN GETMOUSESTATE BITBLT -BLTSHADE DECLARE FREPLACEFIELD DSPXPOSITION \\FM.EDIT-UPDATEAFTERDELETE) OPT.CHLEV (OPT.CCHECK) -DMCHAT.NEWLINE (MOVETO) \\TAN-FLOAT (DECLARE) \\DOVE.FAULTINIT (DECLARE \\MP.ERROR SETMAINTPANEL -\\DL.NEWFAULTINIT SETQ.NOREF FREPLACEFIELD \\RCLK |\\DoveMisc.ReadGMT| |\\DoveMisc.ReadHostID| -|\\DoveDisk.Init|) \\10MB.OUTPUT.INTERRUPT (\\DEQUEUE FREPLACEFIELD \\REQUEUE.ETHERPACKET -\\RELEASE.IOCB \\TEMPUNLOCKPAGES \\10MB.NOTESTAT) PFI.HANDLE.PACKAGE (CL:EVAL TERPRI) FM.GETITEM ( -\\FM.INSUREWINDOW) \\TEDIT.APPLY.PARALOOKS (SELECTQ TEDIT.PARALOOKS \\SHOWSEL TTY.PROCESS) CLISPATOM2D - (CLRPLNODE CLISPTRAN FRPLACA) \\PS.BOUTFIXP (DECLARE \\PUTBASEBYTE) PRETTYVAR (|printout| PRIN1 PRIN2 - PRETTYVAR1 ERROR) |\\UFSDeleteFile| (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) LVLPRIN (LVLPRIN0 -) MB.THREESTATEBUTTON.FN (APPLY* FREPLACEFIELD) \\TEDIT.SUBSCRIPT.CARET (TEDIT.CARETLOOKS -\\TEDIT.SHOWCARETLOOKS) \\CLOSELEAFCONNECTION (FREPLACEFIELD) \\FTP.UNPACKFILENAME (MAP) DECLSUBFIELD -(RECORDERROR SET.RECORD.NAME SET.RECORD.FIELDNAMES) D-ASSEM::COPY-LAP-CODE (FRPLACD) \\MEDW.CARET.SHOW - (\\CURSORBITSPERPIXEL TOTOPW BITBLT) \\ITEMW.SELECTITEM (\\ITEMW.FLIPITEM) SCROLLW (\\CHECKCARET) -OPT.CHECKTAG (OPT.CCHECK) \\FLOATINGSCALE (DECLARE INTTOEXT TIMESPOW10) LVLPRIN1 (DECLARE LVLPRIN) -\\CURVEEND (\\CURVESMOOTH DECLARE APPLY* .WHILE.TOP.DS. \\PUTBASE \\SOFTCURSORDOWN \\INSURETOPWDS -\\CURVEPT \\SOFTCURSORUPCURRENT) |\\UFSError| (SELECTQ ERROR CL:ERROR) PRETTYVAR1 (|printout| PRIN1 -PRIN2 PRINTDEF CHANGEFONT MAPRINT) FILLNGON.IP (APPENDOP.IP SETCOLOR.IP MOVETO.IP LINETO.IP -APPENDINTEGER.IP) WHO-LINE-WHAT-IS-RUNNING (DECLARE RELSTK) |\\LFDirectoryNameP| (DECLARE -OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) CL::SIMPLE-STRING= (%UNPACK-STRING) SYMBOL.PNAME (ALLOCAL) -\\FTP.OPENFILE.FROM.PLIST (\\FTP.PRINTPLIST .EOC. SELECTC \\RELEASE.FTPCONNECTION FTPPUTCODE -CLOSEBSPSTREAM FREPLACEFIELD \\SETACCESS \\BSP.DECLARE.FILEPTR) \\NSFILING.EVENTFN (\\CLEARMAP MAPC -PRINTOUT PRIN1 FREPLACEFIELD) D-ASSEM::TYPE-NAME-FROM-SIZE (CL:ERROR) DREAD (TAB PRIN1 SELECTQ) -CLISPATOM2C (/RPLNODE) LVLPRINT (LVLPRIN2 TERPRI) TERM.DELCHAR (BITBLT) TAN (DECLARE) LVLPRIN0 (PRIN1 -PRIN2 SPACES LVLPRIN0) \\FM.EDIT-WORDDELETE (BITBLT DECLARE FREPLACEFIELD SCROLLW) VERBNOTICELIST ( -|printout| PRIN1 SPACES) MAKEDEFLIST (PRETTYVAR1 EXEC-FORMAT) MSINIT (FRPLACD) HPINITRDTBL (SETSYNTAX -/SETATOMVAL) |\\VFMCreateVPage| (|DiskError| LISPERROR) CREATESCREEN (DSPOPERATION DSPFONT -DSPRIGHTMARGIN CL:PUSHNEW) FM.GETSTATE (\\FM.INSUREWINDOW MAPC) SEDIT::SELECT-NODE-SEGMENT ( -FREPLACEFIELD SEDIT::SELECT-SEGMENT) GETSYNTAX (\\MAPCHARTABLE MAPHASH \\ILLEGAL.ARG) PRINTPARA ( -DECLARE) \\UFS.REMOVE.HOST.FIELD (LISTPUT CL:ERROR RPLACA DECLARE) COMPILE.CHECK.ARGTYPE (PRINTOUT) -SEDIT::ASSIGN-FORMAT-LIST (FREPLACEFIELD SEDIT::SET-FORMAT) |\\UFSTruncateFile| (\\UPDATEOF -\\SETFILEPTR \\BOUT FREPLACEFIELD) FIXPRINTIN (LISPXSPACES LISPXPRIN1 LISPXPRIN2) \\SPP.SENDPKT (HELP -FREPLACEFIELD SENDXIP) TEDIT.BUILD.PCTB (FREPLACEFIELD COPYBYTES CLOSEF COPYCHARS SELECTQ SHOULDNT -SETFILEPTR SELECTC SETA \\TEDIT.GET.CHARLOOKS TEDIT.GET.OBJECT TEDIT.PROMPTPRINT \\INSERTPIECE) +SEDIT::UPDATE REDISPLAYW SI::MONITOR-UNWIND) FB.REMOVE.FILE (TB.REMOVE.ITEM DECLARE) COMP.BOOL ( +COMP.STTAG) ONEDINSPECT.COPYBUTTONFN (TOTOPW DECLARE INSPECT.FLIPSELECTION BKSYSBUF.GENERAL BLOCK) +\TEDIT.BOLD.CARET.ON (TEDIT.CARETLOOKS \TEDIT.SHOWCARETLOOKS) FW-FORGET-CMD (DECLARE FRPLACD +PROMPTPRINT) TWODINSPECT.SETELT (WITH-INSPECTOR-ENV REMOVEPROMPTWINDOW TWODINSPECT.REPLACE) DEBUGGER ( +OUTPUT INPUT SETTERMTABLE RESETLST) ARGTYPE.STATE (PRIN1 SPACES) COMPILER::ALPHA-COMPILER-LET (MAPC) +SEDIT::OUTPUT-SPACE (RPLACA SEDIT::SET-LINEAR DECLARE SEDIT::STEP-LINEAR TEDIT.INSERT) DPRIN1 (DTAB) +EDITBELOW (EDITCOM ERROR! FRPLACD) LISTFILES (DECLARE printout PRIN1 FRPLACD) MAPCON (FRPLACD) +GET-TWOD-DISPLAYW (WINDOWPROP DSPRIGHTMARGIN DSPFONT) BMOBJ.IMAGEBOXFN (DECLARE) EDIT4F2 (PRIN2 PRIN1 +PRINT EDITSMASH EDITSMASH1) ADD-EXEC (TTY.PROCESS) %%DO-LOGICAL-OP (\PILOTBITBLT) TEDIT.PUT.PCTB ( +TEDIT.PUT.PAGEFRAMES \TEDIT.FLUSH.UNUSED.LOOKS \TEDIT.PUT.CHARLOOKS \TEDIT.PUT.PARALOOKS \DWOUT +\SMALLPOUT PRIN1 CHARSET \TEDIT.PUT.SINGLE.CHARLOOKS BOUT COPYBYTES DECLARE \OUTCHAR MAPC COPYCHARS +CLOSEF) FB.COPY/RENAME.MANY (FB.PROMPTWPRINT DECLARE SORT MAPC) TEDIT.DO.BLUEPENDINGDELETE (\SHOWSEL +\DELETECH \FIXDLINES TEDIT.RESET.EXTEND.PENDING.DELETE \FIXSEL) \HDCPYDISPLAYINIT (DECLARE) BPNT ( +ERROR!) MAPCONC (FRPLACD) BRKDWNFBOXES (DECLARE BRKDWNINCA BRKDWNSETA BRKDWNADDTOA SUB1VAR) SEDIT::UPDATE + (SEDIT::RELINEARIZE CL:FORMAT SEDIT::RELINEARIZE-WHERE-NECESSARY SEDIT::CHECK-SELECTION +SEDIT::COMPUTE-SELECTION-POSITION SEDIT::SELECTION-UP SEDIT::UPDATE-TITLE) MSPATHS (PRINTOUT PRIN1 +MAPC TAB DECLARE DASHES MSPATHS1 SI::RESETUNWIND CLRHASH) CURSORCREATE (\ILLEGAL.ARG) EDIT.RI (ERROR! +MAPC EDITSMASH) COPYDEF (SELECTQ MAPC SAVESET DSUBST PUTDEF) \UFStoOtherCopyMess (DECLARE) +TEDIT.SUBLOOKS (\SHOWSEL \TEDIT.MARK.LINES.DIRTY TEDIT.UPDATE.SCREEN \FIXSEL) CHANGEVAR (DECLARE) +EDITBF1 (PRIN1) CLISPBROADSCOPE (CLISPBROADSCOPE1 CLRPLNODE) NLEFT (SUB1VAR) \BITBLT.PRESS ( +\WRITEPRESSBITMAP) STKPOS (RELSTK) MAKEFILE1 (/SETTOPVAL LISPXPRIN1 LISPXPRINT LISPXUNREAD) +\VFMReadNext (DiskError LISPERROR MESASETQ) \CURSORUP (\CURSORBITSPERPIXEL \HARDCURSORUP \SOFTCURSORUP +) \COMPUTE.ARC.POINTS (FRPLACD) SET-READTABLE-INTERACTIVELY (DECLARE MAPHASH) \INFER.FILE.TYPE ( +SETFILEPTR) FB.OPERATE.ON.FILES (SELECTQ EXEC-EVAL) \LFDirectoryScrambled (printout TERPRI LISPERROR) +EDIT.LO (ERROR! EDITSMASH) TEDIT.UNDO.PARALOOKS (\TEDIT.MARK.LINES.DIRTY TEDIT.UPDATE.SCREEN +\TEDIT.SET.SEL.LOOKS \FIXSEL \SHOWSEL) PRINTCONSTANT (PRIN2) \VFMGetBufferFor (\PFGetFileMapPage +RPLACD \VFMSaveBuffer) EDIT.BI (EDITSMASH EDITSMASH1 ERROR!) COMP.EVQ (DECLARE SI::RESETUNWIND) +\TEDIT.FLUSH.UNUSED.LOOKS (MAPC FRPLACD) GET-CORNERW (DSPFONT) EDIT.RO (ERROR! EDITSMASH) \TAN-FLOAT ( +DECLARE) TEDIT.LOOKS (\TEDIT.HISTORYADD) TRANSLATE.IP (APPENDNUMBER.IP) EDIT.LI (ERROR! EDITSMASH) +\LOCATE.PUPNET (HELP ASSURE.PUP.READY \RPLPTR WAKE.PROCESS BLOCK) READVISE1 (SI::ADD-OLD-STYLE-ADVICE +REMPROP) SETFILEPTR (FDEVOP) SEDIT::SUBNODE-CHANGED-LIST (RPLACD RPLACA) SEDIT::BACKSPACE-COMMENT ( +SEDIT::CLOSE-OPEN-NODE SEDIT::DEGRADE-COMMENT SEDIT::DELETE-NODES SEDIT::DELETE-COMMENT) PUTASSOC ( +DECLARE FRPLACD) LISPXFIND0 (SELECTQ ERROR) \RTP.ACTION (\RTP.ERROR \SEND.RFC \SEND.ABORT \SEND.END +\SEND.ENDREPLY \BLT \SEND.ANSWERING.RFC ERROR NOTIFY.EVENT SETUPTIMER) \SETUPGETCH (ERROR +\TEDIT.TEXTBIN.STRINGSETUP \TEDIT.TEXTBIN.FILESETUP \SETUPGETCH) EXEC-EVAL (DECLARE) +ONEDINSPECT.CLOSEFN (DETACHALLWINDOWS) EOFP (DECLARE) \TELERAIDBREAK (\TELEBLTCURSOR FLIPCURSOR +DECLARE) PFI.COMPUTE.INDEX.SHAPE (RPLACD) \CURSORPOSITION (DECLARE \SETMOUSEXY SELECTC +\DoveMisc.SetMousePosition \SOFTCURSORPOSITION \DoveDisplay.SetCursorPosition) \SPP.NOT.RESPONDING ( +\SPP.PROBE TERPRI) SEDIT::OUTPUT-BITMAP (SEDIT::STEP-LINEAR) HRULE.DISPLAYFN (SELECTQ BITBLT DRAWLINE) + CONVERT-AFM-FILES (PSCFONT.WRITEFONT) WRITE-UNICODE-MAPPING (FRPLACD PRINTOUT CL:MULTIPLE-VALUE-SETQ) + RESETOPENFILES (RESETSAVE FRPLACD) \PUTBASEFIXP.UFN (.XUNBOX. \PUTBASE) CLIPBOARD-PASTE-STREAM ( +\EXTERNALFORMAT SETFILEINFO) BREAK-FUNCTION (XCL:UNBREAK-FUNCTION PUTD XCL:UNADVISE-FUNCTION +SI::CHANGE-CALLS) CHAT.BIN (FORCEOUTPUT \TTYBACKGROUND) RPT (DECLARE) \VECFONTINIT (DECLARE \RPLPTR +FRPLACD) \FLUSH.OPEN.STREAMS (FDEVOP) SEDIT::UNDO-EVENT (SEDIT::START-UNDO-BLOCK MAPC) +EDIT.BITMAP.REAL (CLEARW printout TERPRI) EDIT.BO (ERROR! EDITSMASH) FRPTQ (DECLARE) OPT.CODELEV ( +OPT.CCHECK) COMP.CPI1 (COMP.EFFECT COMP.VAL COMP.STSETQ) PRETTYFILEINDEX (RESETSAVE +CL:MULTIPLE-VALUE-SETQ PRINTDEF PFCOPYBYTES PRINT-READER-ENVIRONMENT COPYBYTES PFI.SETUP.TRANSLATIONS +STREAMPROP) \DSPYPOSITION.PRESS (SHOW.PRESS SETY.PRESS) RPTQ (DECLARE) MSSPLST (MAPHASH) TAN (DECLARE) + CURSORPOSITION (\CURSORPOSITION CURSORSCREEN \ILLEGAL.ARG) ONEDINSPECT.DEFAULT.VALUECOMMANDFN ( +SELECTQ INSPECT PROMPTPRINT ONEDINSPECT.SETELT) \FM.EDIT-MOVECARET (\CARET.DOWN) \RSH (.UNBOX. SELECTC + CL::%%NOT-NONCOMPLEX-NUMBER-ERROR FRPTQ) GETLOCALDEC (SELECTQ) CURSORSCREEN (\CURSORDOWN +\CURSORDESTINATION \CURSORUP \CURSORPOSITION) SAVEDEF1 (PUTPROP) \TEDIT.CENTER.SEL (MAPC LISTPUT +TEDIT.PARALOOKS TEDIT.PROMPTPRINT) FROM.SCREEN.BITMAP (printout TERPRI BITBLT) TWODINSPECT.RESHAPEFN ( +CLEARW TWODINSPECT.MAKEREGIONS TWODINSPECT.ADJUSTSELECTION TWODINSPECT.REPAINTFN) COPYATOM (ALLOCAL +MKI.DSET \PUTBASEBYTE DECLARE) MAKEHARDCOPYMODESTREAM (DECLARE SELECTQ STREAMPROP DSPXPOSITION +DSPYPOSITION DSPSPACEFACTOR) \CHTOPCNO (DECLARE) CLOSERTPSOCKET (WITH.MONITOR DECLARE +OBTAIN.MONITORLOCK MONITOR.AWAIT.EVENT SI::MONITOR-UNWIND DEL.PROCESS) \MAIKO.10MBSTARTDRIVER (ERROR +\10MB.TURNONETHER \MAIKO.ETHER-INTERRUPT) TEDIT.OBJECT.CHANGED (HELP \TEDIT.MARK.LINES.DIRTY \SHOWSEL +TEDIT.UPDATE.SCREEN \FIXSEL) %%FAST-COPY-BASE (UNINTERRUPTABLY) EDITGETD (DWIMIFY) \FILLINXIP ( +\CLEARXIPHEADER) COPY-ARRAY (%%FAST-COPY-BASE) \TEDIT.INSERT.PIECES (SETFILEPTR COPYCHARS \INSERTPIECE + APPLY* \TEDIT.DIFFUSE.PARALOOKS) BCOMPL.BODY (DECLARE COMPSET MAPC) CL::STEP-FORM ( +CL::STEP-PRINT-VALUES) SELECT1 (DECLARE) \CHANGECHARSET.HDCPYDISPLAY (\CHANGECHARSET.DISPLAY +\FSETWIDTH) SORT.PUPHOSTS.BY.DISTANCE (MAPC BLOCK) \TEDIT.BOLD.SEL.ON (\TEDIT.BOLD.CARET.ON) +\LEAF.LOOKUPCACHE (RPLACD) SELECT (DECLARE) CLISPIFYFNS (PRIN2 PRIN1) COPY-VECTOR (CL:ERROR +%%MAKE-ARRAY-WRITEABLE %%FAST-COPY-BASE) SELECTC (DECLARE) CLISPATOM2A (CLRPLNODE) TEDIT.UNDO.LOOKS ( +\TEDIT.MARK.LINES.DIRTY TEDIT.UPDATE.SCREEN \TEDIT.SET.SEL.LOOKS \FIXSEL \SHOWSEL) FIND.LINE (DECLARE +SHOULDNT) CURSOREXIT (DECLARE CURSORSCREEN) \ROUTE.PUP (ENCAPSULATE.ETHERPACKET) \SETCLOSEDFILELENGTH +(\SETEOFPTR \CLOSEFILE) \NSRANDOM.CREATE.STREAM (RESETSAVE \NSRANDOM.STREAM.CHANGED) SETTERMCHARS ( +/SETSYNTAX) FB.GET.NEW.FILE.SPEC (FB.PROMPTWPRINT) CONTINUEDIT (RESETLST LOADFROM) +WRITE-UNICODE-MAPPING-HEADER (MAPC) DINFO (OPENW RESETSAVE OBTAIN.MONITORLOCK DINFO.SETUP.WINDOW +DINFO.UPDATE) \FM.PUTITEMPROP (LISTPUT) /ECHOCONTROL (UNDOSAVE) COMPILEMODE (MAPC) STRMEMB (DECLARE) +LISPXSTATE (ERROR MAPC /PUT) BOUT16 (BOUT) SET-PACKAGE-INTERACTIVELY (FRPLACD) \TEDIT.CLOSEUPLINES ( +BITBLT \DISPLAYLINE) /SETSYNTAX (SELECTQ UNDOSAVE) \PFRemoveDirectoryID (\PFPurgeRootDirectory +\PFRemoveRootDirEntry \PFPutRootDirectory) SUBSET (DECLARE) \PUSHSTATE.IP (GETCP.IP FSET.IP SHOW.IP +PUSH-IP-STACK) \RTP.SHOW.FAILURE (printout TERPRI) \TFBRAVO.PARSE.PROFILE.PARA (DECLARE%: SELECTQ +\TFBRAVO.ASSERT) ANALYZE-REST (ANALYZE-PARAMETER CL:ERROR) \SIN-FLOAT (DECLARE) FW-CREATE-OFD-WINDOWS +(DECLARE FW-ADJUST-REGION DSPFONT) OPT.RETMERGE (SELECTQ OPT.SETDEFREFS FRPLACA DREMOVE NCONC1 +OPT.COMPILERERROR RPLACA OPT.PRDEL OPT.UBDEL) CHARLOOKS.FROM.FONT (\ILLEGAL.ARG SELECTQ) TEDIT.SCANSEL + (\SETUPGETCH) \ROUTE.XIP (DECLARE ENCAPSULATE.ETHERPACKET) TOPW.RESHAPEFN (CLEARW +TOPW.ADJUSTSELECTION) \OPENLEAFCONNECTION (DECLARE OBTAIN.MONITORLOCK INITSEQUIN RESETSAVE \CLEARBYTES + \ADDLEAFSTRING PUTSEQUIN AWAIT.EVENT RELEASE.PUP \SEQUIN.CLOSE SI::MONITOR-UNWIND) SEDIT:RESET ( +SEDIT::CREATE-ENVIRONMENTS SEDIT:RESET-FORMATS) FILL-ARRAY (%%MAKE-ARRAY-WRITEABLE) +COURIER.READ.STRING (\BINS BIN) TTSKIPSEPR (DECLARE) COURIERTRACE (CLOSEW WINDOWPROP DSPFONT DSPSCROLL + TOTOPW) \FM.EDIT-DELETE (\CARET.DOWN GETMOUSESTATE BITBLT BLTSHADE DECLARE DSPXPOSITION +\FM.EDIT-UPDATEAFTERDELETE) CHAT.SCREENPARAMS (DECLARE CHAT.SENDSCREENPARAMS) FB.SEEBUTTONFN ( +DETACHWINDOW CLOSEW) BEEPON (SELECTC BLOCK \DoveMisc.BeepOn) COMP.CPI (COMP.CPI1 COMP.STUNBIND +COMP.STPOP COMP.STJUMP COMP.CALL OPT.COMPILERERROR) ONEDINSPECT.DEFAULT.TITLECOMMANDFN (GETMOUSESTATE +SELECTQ ONEDINSPECT.REDISPLAY PROMPTPRINT) \TTW1 (.WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN +\INSURETOPWDS DECLARE \SW2BM \TTW1 \SOFTCURSORUPCURRENT) CL::STEP-EVAL (CL::STEP-PRINT-VALUES) +CLISPDEC0 (/RPLNODE) ARCSIN (ERROR) TWODINSPECT.SELECTCOLUMNPROP (INSPECT.INVERTSELECTION +INSPECT.INVERTREGION) BEEPOFF (SELECTC BLOCK \DoveMisc.BeepOff) CL::STEP-COMMAND (CL::STEP-PRINT +CL::STEP-PRINT-VALUES) \HDCPYBLTCHAR (DECLARE \CHANGECHARSET.HDCPYDISPLAY \DSPPRINTCR/LF +.WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN \INSURETOPWDS \PILOTBITBLT \SOFTCURSORUPCURRENT) +SHOWBITMAP1.IP (APPENDOP.IP TRANS.IP APPENDNUMBER.IP APPENDINTEGER.IP TRANSLATE.IP ROTATE.IP CONCAT.IP + ERROR SCALE.IP APPENDSEQUENCEDESCRIPTOR.IP APPENDINT.IP BITBLT \BOUTS) MSMARKCHANGED (MSERASE +MSMARKCHANGE1) TEDIT.REDO.LOOKS (TEDIT.LOOKS TEDIT.PROMPTPRINT) DASSEM.ASMAJ (FRPLACA FRPLNODE +OPT.COMPILERERROR FRPLACD) TEDIT.REDO.PARALOOKS (TEDIT.PARALOOKS TEDIT.PROMPTPRINT) CHANGESLICE (ERROR + CHANGESLICE NCONC UNDOSAVE FRPLACA FRPLACD) CL:CHAR-NAME (DECLARE) \VFMMerge (DECLARE MESASETQ +\VFMFind \VFMDelete \VFMFreeVPage \VFMInsert) WITHOUT-INTERRUPTS (\KEYBOARDOFF \KEYBOARDON) CHARMACRO +(CFOBF TERPRI) COPY.SEGMENT (FRPLACD) \FTP.FIX.BROKEN.INPUT (printout TERPRI PRIN2 FRPLACD +\SMASHBSPSTREAM \BSP.DECLARE.FILEPTR SETFILEPTR ERROR) CL::%%EXPT-FLOAT-INTEGER (DECLARE) +\FM.EDIT-WORDDELETE (BITBLT DECLARE SCROLLW) CHAT.LOGIN (printout TERPRI MAPC BOUT) +\TEDIT.BOLD.SEL.OFF (\TEDIT.BOLD.CARET.OFF) \GETINTERNALCLOCK (\BLT \BOXIDIFFERENCE) CL:ERROR ( +RAISE-SIGNAL DECLARE RESETSAVE CL:PRINC ERROR!) CLISPATOM2 (CL:THROW CLRPLNODE CLISPBROADSCOPE +CLISPBROADSCOPE1 CLISPATOM2A DWIMIFY1? PRIN1 CLISPATOM1A) OPT.RETTEST (SELECTQ) ETHERHOSTNAME ( +SETUPPUP FREPLACEFIELD SELECTC DECLARE printout PRIN1 RELEASE.PUP) \ATMIN (FRPLACD) RANDSET (ERROR +DECLARE FRPLACD) \CREATEPRESSFONT (DECLARE \GETCHARSETINFO) CL::PROCESS-TYPE (EXPORT) +SCAVENGEDSKDIRECTORY (DECLARE OBTAIN.MONITORLOCK ERROR UNINTERRUPTABLY \LFPurgeDirectory printout +PRIN1 \LFMakeVolumeDirectory \LFOpenDevice \PFDsplyVolumes SI::MONITOR-UNWIND) \NSFILING.OPEN.HANDLE ( +\NSFILING.CLOSE.HANDLE RESETSAVE) FNTH (DECLARE) \TEDIT.BOLD.CARET.OFF (TEDIT.CARETLOOKS +\TEDIT.SHOWCARETLOOKS) \OUTCHARFN.PRESS (NEWLINE.PRESS SHOW.PRESS SETXY.PRESS \BOUT) \SLOWHDCPYBLTCHAR + (\DSPPRINTCR/LF SELECTQ SHOULDNT .WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN \INSURETOPWDS DECLARE +\PILOTBITBLT \SOFTCURSORUPCURRENT \DSPYPOSITION.DISPLAY BITBLT ERROR) TWODINSPECT.SELECTROWPROP ( +INSPECT.INVERTSELECTION INSPECT.INVERTREGION) OPT.RETOPT1 (OPT.RETMERGE) IDATE (DECLARE SELCHARQ) +MAKEFN (ERROR ERSETQ) RESETSAVE (DECLARE SETTOPVAL) \VFMGenerateFileIDs (DECLARE OBTAIN.MONITORLOCK +\VFMContextSet MESASETQ FRPLACD SI::MONITOR-UNWIND) \LEAF.REQUESTPAGE (INCLEAFSTAT RPLACD) EDIT.BITMAP + (SET) \PROCESS.RESET.TIMERS (SETUPTIMER \RUN.PROCESS) PP* (DECLARE) RESETFORM (DECLARE SI::RESETUNWIND +) \TEDIT.FONTCOPY (TEDIT.PROMPTPRINT) \PUPGATELISTENER (PROCESSPROP \HANDLE.PUP.ROUTING.INFO BLOCK +\AGE.ROUTING.TABLE SETUPPUP SENDPUP) \FM.EDIT-BACKUP (RELMOVETO SCROLLW BITBLT DECLARE) +\FTP.RECOGNIZEFILE (RPLACA MAPC \FTP.PRINTPLIST .EOC. SELECTC \FTP.FLUSH.TO.EOC \FTPERROR +\RELEASE.FTPCONNECTION) PRINTERRORPUP (PRIN1 PRIN2) COMPILER::COPY-NODE-LABELS (FRPLACD) +TEDIT.COPY.PARALOOKS (\LISPERROR TEDIT.PARALOOKS) RESETVARS (DECLARE MAPC SI::RESETUNWIND) RAND ( +RANDSET RPLNODE RPLACA) \SECONDSCLOCKGREATERP (\BLT) \BSP.HANDLE.INPUT (SELECTC \BSP.HANDLE.DATA +\BSP.HANDLE.ACK \BSP.HANDLE.INTERRUPT \BSP.HANDLE.INTERRUPTREPLY \BSP.HANDLE.ERROR \RTP.HANDLE.PUP +\SEND.ACK MONITOR.AWAIT.EVENT \RTP.ACTION \BSP.TIMERFN) INITUFNTABLE (CREATEPAGES \SETUFNENTRY) +NONSYSPROPNAMES (FRPLACD) GET-TOPW (DSPRIGHTMARGIN DSPFONT) \SETDAYTIME0 (UNINTERRUPTABLY \RCLK \BLT) +\PFInsertDirectoryID (\PFCreateRootDirectory \PFAddRootDirEntry \PFPutRootDirectory) \INTERNALTOTOPW ( +OPENW UNINTERRUPTABLY \TTW1) WRITE-STRING* (DECLARE) MAKECOM (ERROR!) REGIONONSCREEN (GETMOUSESTATE) +CHARACTER.PRINT (.SPACECHECK. \OUTCHAR WRITE-STRING*) \TELERAIDRELEASE (SELECTQ \10MBSETUPRECEIVER +FLIPCURSOR) \HANDLE.PUP.ROUTING.INFO (\ADD.ROUTING.TABLE.ENTRY \BLT) TB.UNDELETE.ITEM (FREPLACEFIELD +TB.SHOW.DELETION) \10MBRAWRECEIVE (\10MBSETUPRECEIVER) \NSFILING.FULLNAME (MAPC SELCHARQ) +\HCPYMODEDISPLAYINIT (DECLARE) RESETVAR (DECLARE SETTOPVAL SI::RESETUNWIND) ASET (CL:ERROR) +MODERN-MENUBUTTONFN (GETMOUSESTATE) \PUTFIXP (.UNBOX. SELECTC \ILLEGAL.ARG +CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) BREAKCONNECTION (FRPLACD) COURIER.READ.SEQUENCE (FRPLACD) +\PUTSWAPPEDFIXP (.UNBOX. SELECTC \ILLEGAL.ARG CL::%%NOT-NONCOMPLEX-NUMBER-ERROR) SWAPPEDCOND (DWIMIFY) + SCALE/TONODES (LISTPUT) PRINTXIPROUTE (FRESHLINE printout PRINTNUM TERPRI) POWEROFTWOP (DECLARE) +SEDIT:SEDIT (SEDIT::SET-PROPS SEDIT::SET-OPTIONS SEDIT::START-PROCESS TOTOPW EXPANDW +SEDIT::DISINTEGRATE-CONTEXT) \STRINGWIDTH.HCPYDISPLAYAUX (DECLARE \MAPPNAME) +\BSP.DEFAULT.ERROR.HANDLER (DECLARE) \NSFILING.FILLIN.ATTRIBUTES (MAPC COURIER.SIGNAL.ERROR) +\GENERIC.OPENP (FRPLACD) CL:MOD (DECLARE) WORD.MATCHES.BUFFER (DECLARE CHECK) \DSPROTATE.IP (ROTATE.IP +) CL::SIMPLE-STRING-EQUAL (%%UNPACK-STRING) CLISPATOM1A (DWIMERRORRETURN CLISPATOM2) FMAX (ERRORX +ADD1VAR) \VECPUT (\ENDVECRUN SHOW.PRESS SETXY.PRESS \BOUT FREPLACEFIELD) \VAMUpdateVAM (DECLARE +SELECTQ \VAMMarkBufferDirty SHOULDNT \PUTBASE) ERRORX (DECLARE RESETSAVE) SETY.IP (APPENDINTEGER.IP +APPENDOP.IP APPENDNUMBER.IP) FILEGETDEF.VARS (SELECTQ) TEDIT.MAKESEL (\SHOWSEL \FIXSEL) \GS.INITBUF ( +RPLSTRING) RPLNODE (ERRORX RPLACA) \NSRANDOM.RELEASE.LOCK (FILING.CALL) SEDIT::COPY-SELECTION (DECLARE + TERPRI CL:FUNCALL) EDITTOGGLELABEL (PROMPTPRINT PRIN1 RESET/NODE/LABELSHADE APPLY*) +PASTEFROMCLIPBOARD (BKSYSCHARCODE) FMIN (ERRORX ADD1VAR) PRINTPUPROUTE (TAB printout PRINTNUM TERPRI) +\MAIKO.SETTIME (\PROCESS.RESET.TIMERS) \TEDIT.GET.SINGLE.PARALOOKS2 (FRPLACD RPLACA RPLACD) +\COURIER.ATTENTIONFN (DECLARE printout TAB) GETHASH (DECLARE SHOULDNT) \INSERT.FIRST.PIECE ( +\INSERTPIECE) PFI.CENTER.PRINT (CHANGEFONT DSPXPOSITION MAP PRIN3) PRINT-LOADED-FILE-INFORMATION ( +PRINTOUT PRIN1) LOADCOMP? (LOADCOMP) HRULE.CREATE (IMAGEOBJPROP TEDIT.PROMPTPRINT) \PEEKCCODE (DECLARE +) HARDCOPY.SOMEHOW (ALLOW.BUTTON.EVENTS) HVFWDCDREAD (TCONC FRPLACA) TEDIT.SELECT ( +\TEDIT.SET.SEL.LOOKS \FIXSEL) \10MBRAWTRANSMIT (\QUEUE.OUTPUT.IOCB) LOADCOMP (DECLARE RESETSAVE +/PUTPROP) \ITEMW.CLEARSELECTION (\ITEMW.DESELECTITEM) \INSPECTW.REDISPLAYPROP (ERROR +\ITEMW.DESELECTITEM DSPFILL EXTENDEXTENT \ITEMW.SELECTITEM) \TEDIT.WORD.BOUND (CHECK) INSPECT/PROPLIST + (PROMPTPRINT) \CIRCSHADE.XSCAN.IP (SETCOLOR.IP FILLRECTANGLE.IP) PREVWORD (DECLARE CHECK ADD1VAR) +CHAT.CLOSE (DECLARE DETACHALLWINDOWS DSPOPERATION DSPSCROLL DEL.PROCESS TERPRI PRIN1 PRINT \CHECKCARET + ALLOW.BUTTON.EVENTS CHAT.CLOSE.CONNECTION CHAT.DEACTIVATE.WINDOW CLOSEW ADD.PROCESS ICONW.SHADE) +\FM.MENUHANDLER (PRINTOUT DECLARE TERPRI GETMOUSESTATE \FM.DOSELECTION ADD.PROCESS) \3MBRAWTRANSMIT ( +\BLT \WRITERAWPBI) CHECKIMPORTS (FRPLACD) SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE-BACKWARDS ( +SEDIT::SELECT-PSEUDO-SEGMENT) ADD.BORDER.TO.BITMAP (BITBLT) IMAX (ADD1VAR) \LFEntryPoint (\ILLEGAL.ARG + SELECTQ ERROR \PFEnsureInitialized) FILL/GRAPHNODE/LABEL (BITBLT) OPT.RETPOP (OPT.UBDEL OPT.PRDEL +MAPC) COPY-CIRCLE (RPLACA RPLACD) \TEDIT.PUT.CHARLOOKS.LIST2 (\DWOUT \SMALLPOUT DECLARE +\TEDIT.PUT.SINGLE.CHARLOOKS2 PUTHASH) SEDIT::SHIFT-LINEAR-FORM (SEDIT::SHIFT-LINEAR-FORM) \NCONC2 ( +RPLACD) \TEDIT.CHANGE.LOOKS (TEDIT.CARETLOOKS TEDIT.PROMPTPRINT LISTPUT \TEDIT.MARK.LINES.DIRTY +\SHOWSEL TEDIT.RESET.EXTEND.PENDING.DELETE TEDIT.UPDATE.SCREEN \FIXSEL) IMIN (ADD1VAR) +PFI.CONDENSE.INDEX (MAPC) APPENDNUMBER.IP (DECLARE APPENDBYTE.IP APPENDSEQUENCEDESCRIPTOR.IP +APPENDINT.IP) MAKE-NETWORK-TRACE-WINDOW (TOTOPW DSPFONT DSPSCROLL) FW-SORT-FN (DECLARE) OCTALSTRING ( +FREERESOURCE DECLARE) SEDIT::REPLACE-STRING (SEDIT::OPEN-LITATOM) FILEGETDEF.FNS (CL:MULTIPLE-VALUE-SETQ + RESETSAVE SETFILEPTR) READATABASE (SELECTQ HELP MSINIT TEMPLATE PUTHASH STORETABLE LISPXPRINT) ROT ( +DECLARE) \NSFILING.HANDLE.ERROR (PRINTOUT TERPRI DECLARE RELEASE.MONITORLOCK OBTAIN.MONITORLOCK) +MENUBUTTONFN (TOTOPW DOSELECTEDITEM) SETYREL.IP (APPENDNUMBER.IP APPENDOP.IP) TEDIT.SUBPARALOOKS ( +\SHOWSEL \TEDIT.MARK.LINES.DIRTY TEDIT.UPDATE.SCREEN \FIXSEL) \SETUPTIMERmacrofn (DECLARE) NORMSECT ( +BRESSTEP) STKARGS (FRPLACD) DINFO.SPECIAL.UPDATE (PROCESSPROP DECLARE TERPRI FLASHWINDOW) MAX (ERRORX +ADD1VAR) \3MBRAWRECEIVE (\BLT) ADJUSTLINE (GO.TO.RELATIVE KILLSEGMENT TYPE.BUFFER DELETELINE +TTDELSECTION ERASE.TO.END.OF.LINE INSERT.TEXT ADD1VAR) BRKDWNRESULTS (CONSCOUNT MAP RESETFORM +LISPXTERPRI LISPXPRIN1 LISPXTAB) FB.UNDELETEALLCOMMAND (TB.MAP.ITEMS) GRAPHERIMAGEFNS (DECLARE) MIN ( +ERRORX ADD1VAR) PRINT-LISP-INFORMATION (DECLARE PRIN1 TERPRI SI::RESETUNWIND) MOVE.TO.NEXT.LINE ( +GO.TO.RELATIVE) \PAGED.INCFILEPTR (\UPDATEOF \RELEASECPAGE \SETIODIRTY) MB.GETFN (ERROR \STRINGOUT +\SMALLPOUT DECLARE MAPC) HPERR (PRIN1 SPACES PRINT) \TEDIT.FIND (\SHOWSEL TEDIT.PROMPTPRINT +TEDIT.RESET.EXTEND.PENDING.DELETE \FIXSEL TEDIT.NORMALIZECARET WINDOWPROP) READ-FILECREATED ( +SETFILEPTR) FIND.NEXT.WORD (DECLARE CHECK) \LEAF.DEVICEP (\DEFINEDEVICE \RELEASE.FTPCONNECTION) +INSPECTW.REPLACE (ERROR EXEC-EVAL) SEDIT::FIND-AND-DISPLAY-SUBSTRUCTURE (SEDIT::SELECT-PSEUDO-SEGMENT) + FINDFIELDUSAGE (FRPLACA) DMPHASH (DECLARE PRINT MAPHASH) SEDIT::GENERATE-LINEAR-FORM ( +SEDIT::REUSE-LINEAR-FORM CL:FUNCALL) CL:CHAR-EQUAL (CL:ERROR) INTCHECK (PRIN1 TERPRI) \SETCARET ( +MOVETO \EDIT.DOWNCARET) REPLACESTKARG (\ILLEGAL.ARG PROMPTPRINT) USERLISPXPRINT (RELSTK LISPXPUT) +\LEAF.DELETEFILE (RELEASE.PUP) MAKESCAN (SHEDSCAN) MOVD (PUTD MARKASCHANGED) \CIRCSHADE.DISPLAY ( +FILL.LINE) READ (DECLARE) \PSC.SYMBOLS (POSTSCRIPT.SHOWACCUM \UPDATE.PSC POSTSCRIPT.OUTSTR) +CL:CHAR-LESSP (CL:ERROR) SEDIT::REPLACE-CHARS (SEDIT::CLOSE-OPEN-NODE RPLSTRING SEDIT::ADJUST-WIDTH) +\LFReadFileID (\SETFILEPTR \LFCheckBang \LFDirectoryScrambled \BIN) HPRINTSP (HPRINT1) MSTRYSPELL ( +FRPLACD) TEDIT.SET.SEL.LOOKS (\SHOWSEL SELECTQ) CL:CHAR-GREATERP (CL:ERROR) \LFPurgeDirectory ( +\LFCloseDirectory \PFRemoveDirectoryID \PFTrimHelper) MOVD? (PUTD MARKASCHANGED) CLRPLNODE (/RPLNODE +FRPLACA FRPLACD) \BUFFERED.BOUT (CHECK \PUTBASEBYTE FDEVOP) \TELERAIDEXIT (SELECTQ \10MB.TURNONETHER +\TELEBLTCURSOR) CL:CHAR-NOT-GREATERP (CL:ERROR) SETXY.IP (APPENDNUMBER.IP APPENDOP.IP) TEDIT.INCLUDE ( +DECLARE TEDIT.PROMPTPRINT COPYBYTES COPYCHARS CLOSEF TEDIT.DO.BLUEPENDINGDELETE \SHOWSEL +\TEDIT.CONVERT.TO.FORMATTED \TEDIT.INSERT.PIECES \TEDIT.HISTORYADD \FIXILINES TEDIT.UPDATE.SCREEN +\FIXSEL \SETUPGETCH) CHNGNM (/PUTD /PUT /REMPROP DECLARE SI::RESETUNWIND PRINT /ADDPROP) UNSET ( +SAVESET) WRITE (PRINT-CIRCLE-SCAN) MENUREPAINTFN (MAPC) CL:CHAR-NOT-EQUAL (CL:ERROR) CHANGENAME ( +MARKASCHANGED) COMPILER::CHECK-ARG (CL:CERROR) TEDIT.EXTRACTTOCLIPBOARD (PUTCLIPBOARD) \BOXFPLUSDIF ( +.FLOATUNBOX. SELECTC .NEGATE. .LLSH8. .LLSH1. .LRSH8. FRPTQ) FW-CREATE-OFD-LIST (DECLARE CLOSEW) +\TEDIT.PUT.SINGLE.PARALOOKS2 (\SMALLPOUT DECLARE MAPC \ARBOUT \ATMOUT) \FM.RIGHTBUTTONFN (TOTOPW) +\BUFFERED.BINS (\MOVEBYTES \PUTBASEBYTE) \BOXFTIMES2 (.FLOATUNBOX. SELECTC .NEGATE. .LLSH8. .LLSH1. +.LRSH8.) SI::ADVICE-PUTDEF (FRPLACD) PFI.PRINT.INDICES (TERPRI PFI.INDEX.BREAK DSPNEWPAGE) +\CIRCSHADE.IP (SETCOLOR.IP FILLRECTANGLE.IP) \MOVEBYTES (\BLT FRPTQ) \BOXFQUOTIENT (.FLOATUNBOX. +SELECTC .NEGATE. .LLSH8. .LRSH8. .LRSH1. FRPTQ) \10MB.CREATENDB (CL:PUSHNEW) \LFOpenOldFile ( +\PFGetPage) DOSLINKER (PRIN1) SEDIT::SETUP-WINDOW-AND-PROCESS (WINDOWPROP SEDIT::UPDATE-TITLE +SETTERMTABLE PROCESSPROP SETINTERRUPT TTY.PROCESS CLEARW) CL:CHAR< (CL:ERROR) \LFDirectoryP (\OPENFILE +) FW-FILTERED-FILE? (DECLARE) CCCSCAN (DECLARE SELECTQ CCCSUBFN?) \CENTICLOCK (\BLT \RCLK) BLTVLINE ( +DECLARE) \BUFFERED.BOUTS (\MOVEBYTES FDEVOP) CL:CHAR> (CL:ERROR) MARK/GRAPH/NODE (DECLARE) ADDPROP ( +ERRORX FRPLACD FRPLACA SETPROPLIST) CL:CHAR<= (CL:ERROR) VALUOF (DECLARE) \STRINGWIDTH.HDCPYDISPLAY ( +DECLARE) \FLOAT (.NEGATE.) RPTPUT (PRIN2 HPRINTSTRING HPRINT1 HPRINTENDSTR) RESET/NODE/LABELSHADE ( +ERASE/GRAPHNODE PRINTDISPLAYNODE) /REMPROP (ERRORX UNDOSAVE FRPLACD SETPROPLIST) \GETSPP (DECLARE +OBTAIN.MONITORLOCK UNINTERRUPTABLY \DEQUEUE \SPP.SENDPKT MONITOR.AWAIT.EVENT SI::MONITOR-UNWIND) +\PS.SCALEHACK (POSTSCRIPT.SHOWACCUM MAPC FREPLACEFIELD) CL:CHAR= (CL:ERROR) TEDIT.EXTEND.SEL ( +\TEDIT.SET.SEL.LOOKS DECLARE \FIXSEL \COPYSEL) \MAKEFLOAT (.LLSH1. SELECTQ FRPTQ .LRSH8.) +SEDIT::FIND-AND-DISPLAY-STRUCTURE-BACKWARDS (SEDIT::SELECT-NODE) SETCORNER (DECLARE \CURSORPOSITION) +DUMPDATABASE (DECLARE MAPC UPDATECHANGED PRINT PRIN1 TERPRI MAPTABLE) FW-OFD-EXISTS? (DECLARE SELECTQ +SHOULDNT) \TELEBLTCURSOR (\BLT) LAYOUTSEXPR1 (DECLARE) SETXYREL.IP (APPENDNUMBER.IP APPENDOP.IP) +FILEGETDEF.MACROS (FRPLACD) CLISPIF0 (RPLACA RPLACD /RPLNODE DWIMIFY1 LISPXPRIN1 FRPLACD DWIMIFY2 +NCONC CLISPIF2 RPLNODE FRPLACA CLISPTRAN DWIMERRORRETURN) \CANONICALIZE.PUP.HOSTNAME (DECLARE) +CIRCLAR-COPYER (RPLACA RPLACD) BREAKDOWN (BRKDWNINIT BRKDWN1 CONSCOUNT SETA) MB.SHOWSELFN (MB.DISPLAY) + CL:CHAR/= (CL:ERROR) FIXSPELL (DECLARE RELSTK PRINT SI::RESETUNWIND /RPLNODE ADDSPELL MOVETOP) +\TEDIT.PUT.SINGLE.CHARLOOKS2 (\ARBOUT \ATMOUT \SMALLPOUT DECLARE) TTYIN.BALANCE (DECLARE CHECK +MOVE.TO.WHEREVER RPTQ ADDCHAR BEEP) MSERASE (DECLARE) \LOAD-STREAM (DECLARE LISPXTERPRI PRIN1 +LISPXPRIN1 FRPLACA LISPXPUT FASL:PROCESS-FILE SMASHFILECOMS ADDFILE) \PRESSFAMILYCODELST (SETFILEPTR +SELECTQ FRPLACD) FILEWATCHPROP (DECLARE LISTPUT) APPENDLARGEVECTOR.IP (APPENDSEQUENCEDESCRIPTOR.IP +APPENDINT.IP) BLTHLINE (DECLARE) CLISPATOM0 (SELECTQ DECLARE LISTPUT1 SI::RESETUNWIND UNDOSAVE +UNDONLSETQ1) OPT.RETOPT (MAPC MAP) HEXSTRING (RPLCHARCODE) \VFMPutNext (MESASETQ SETA) SETX.IP ( +APPENDINTEGER.IP APPENDOP.IP APPENDNUMBER.IP) CL:CHAR-NOT-LESSP (CL:ERROR) FW-LOOP (DECLARE FW-INIT +FW-WIPE FW-RE-INIT FW-RESET FW-CREATE-OFD-LIST FW-CREATE-OFD-WINDOWS FW-CLOSE-OLD-OFD-WINDOWS +FW-UPDATE-OFD-WINDOWS BLOCK) DWIMDEF (DECLARE) \LEAF.GETFILE (DECLARE OBTAIN.MONITORLOCK +\LEAF.GETFILEDATES \LEAF.CLOSEFILE SI::MONITOR-UNWIND \CLEARBYTES \ADDLEAFSTRING RELEASE.PUP) +SEDIT::FIND-AND-DISPLAY-STRUCTURE (SEDIT::SELECT-NODE) TTNTH (SUB1VAR) \CIRCSHADE.BLT (BLTSHADE) +\BRUSHBITMAP (DECLARE) \TELERAIDENTRY (\KEYBOARDOFF \BLT \TELEBLTCURSOR \10MB.TURNONETHER +\10MBSETUPRECEIVER) TTNLEFT (SUB1VAR) CL:CHAR>= (CL:ERROR) TEDIT.ADD.MENUITEM (RPLACD +UPDATE/MENU/IMAGE) TIMEREXPIRED? (\PUTBASEFIXP) FIXFIELDORDER (FINDFIELDUSAGE MAPC FRPLACD SHOULDNT) +SEDIT::CREATE-QUOTED-GAP (SEDIT::NOTE-CHANGE) POSSIBILITYFN (DECLARE PRODUCE APPLY*) LAYOUTLATTICE ( +DECLARE ERROR INIT/NODES/FOR/LAYOUT) LOAD (RESETSAVE) USEREXEC (DECLARE PROMPTCHAR ERSETQ +SI::RESETUNWIND) \DSPYPOSITION.HDCPYDISPLAY (\HDCPYDISPLAY.FIX.YPOS) \TEDIT.FORMAT.FOOTNOTE (BLOCK +\TEDIT.HARDCOPY.FORMATLINE FREPLACEFIELD FRPLACD) HASDEF (DECLARE) \TEDIT.GET.CHARLOOKS.LIST2 (FRPLACD +) EDITTOGGLEBORDER (PROMPTPRINT PRIN1 RESET/NODE/BORDER APPLY*) PRINT-ARGLIST (TAB PRIN1 PRIN2 SELECTQ + TERPRI SPACES) \TFBRAVO.GETPARAMS (MAP) FIXEDITDATE (SELECTQ /RPLACA /ATTACH) MSCOMMAND (MSKNOWN +MSSETSETTYPE) \EDIT.UPCARET (\CARET.DOWN) BLTMENUIMAGE (SHOWSHADEDITEMS) TB.DELETE.ITEM (FREPLACEFIELD +) LISPXEVAL (FRPLACA) FB.UNDELETECOMMAND (TB.MAP.SELECTED.ITEMS) \UPDATE.EXTENT.IMAGE (CLEARW BITBLT) +DELDEF (APPLY* SELECTQ /PUTD REMPROP MASTERSCOPE MAPC FLUSHFILEMAPS DELFROMLIST MAP PRIN1 +MARKASCHANGED) \TEDIT.REFRESH.SHOWSEL (DECLARE \TEDIT.UPDATE.SHOWSEL \COPYSEL \SHOWSEL SELECTQ +\TEDIT.SET.SEL.LOOKS) PutFloat (\PUTBASEFLOATP) PFI.PREVIEW.DEFINEQ (PRIN1 PRINT PFI.PRINT.LAMBDA +READCCODE) CCCSUBFN? (DECLARE) FNS.PUTDEF (ERROR SELECTQ FIXEDITDATE DELDEF VIRGINFN LISPXPRIN1 +LISPXPRIN2 SAVEDEF ADDSPELL MARKASCHANGED) AT.END.OF.TEXT (DECLARE) RPTEND (RPTPUT) +\CH.GUESS.NEW.PROPERTIES (FRPLACD) \MATMULT441 (DECLARE \PUTBASEFLOATP) STKNTH (RELSTK) +UNSAFE.TO.MODIFY (PRINTOUT) \TEXTBIN (DECLARE FREPLACEFIELD \SETUPGETCH \TEDIT.TEXTBIN.STRINGSETUP +\TEDIT.TEXTBIN.FILESETUP) COMPILER::CONSTRUCT-LIST (MAPC) TEDITCHAT.MENUFN (DECLARE \CHECKCARET +SELECTQ APPLY*) \MATMULT144 (DECLARE \PUTBASEFLOATP) EDITV (PRIN1) \LFCreateFile (\LFMakeDirEntry) +\MATMULT331 (DECLARE \PUTBASEFLOATP) SETSTKNAME (UNINTERRUPTABLY) U/L-CASE (DECLARE MOVE.BACK.TO +MOVE.TO.START.OF.WORD RPLACA TYPE.BUFFER ADJUSTLINE.AND.RESTORE) OPT.DELTAGREF (OPT.COMPILERERROR) +CL::INSERT-INCLUDED-SLOT (CL:ERROR) \MATMULT133 (DECLARE \PUTBASEFLOATP) \TELERAIDSEND (FREPLACEFIELD +SELECTQ \3MBRAWTRANSMIT \10MBRAWENCAPSULATE \10MBRAWTRANSMIT) \COPYFNHEADER (UNINTERRUPTABLY \BLT) +FILEMAP (DECLARE) SEDIT::SETUP-NEW-CONTEXT (DECLARE OBTAIN.MONITORLOCK SEDIT::BUILD-WINDOW +SEDIT::SETUP-CONTEXT-WINDOW-DEPENDENCIES SEDIT::BUILD-INTERNAL-STRUCTURE SI::MONITOR-UNWIND) +\MATMULT444 (DECLARE \PUTBASEFLOATP) EDITP (EDITE) PFI.PREVIEW.DECLARE (TERPRI PRIN1 PRIN2 READCCODE +SPACES PFI.HANDLE.EXPR) TEDIT.HARDCOPY-COLUMN-END (TEDIT.PROMPTPRINT) PRINTPACKETDATA (SELECTQ +printout PRIN2 \OUTCHAR) \MATMULT333 (DECLARE \PUTBASEFLOATP) STKSCAN (RELSTK) OPENIMAGESTREAM ( +DECLARE STREAMPROP) CREATEWFROMIMAGE (WINDOWPROP BITBLT) \AddShade (RPLACD) \FRAMESCAN (SELECTC RAID) +FB.UNDELETE.FILE (TB.UNDELETE.ITEM) MSSETREP (MSTRYSPELL) COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS + (CL:CERROR MAPC COMPILER::CLOSE-LAMBDA) CHAT.RESHAPEWINDOW (RESHAPEBYREPAINTFN) SEDIT::COMPLETE ( +SEDIT::CLOSE-OPEN-NODE SEDIT::HANDLE-COMPLETION CLOSEW SEDIT::DISINTEGRATE-CONTEXT DEL.PROCESS SHRINKW + TTY.PROCESS) TEDIT.SEL.AS.STRING (\SETUPGETCH RPLCHARCODE) RETTO (\SMASHRETURN) \LFGetStreamForFile ( +printout TERPRI) LCSKIP (ERROR) FB.HARDCOPY.PRINT.TITLE (DSPXPOSITION PRIN1) PRINTANDBOX (RELMOVETO +TERPRI CL:PRIN1) COMP.STUNBIND (COMP.ST) OPT.COMMONBACK (OPT.CHECKTAG SELECTQ OPT.CHLEV OPT.DELTAGREF +OPT.UBDEL OPT.COMPILERERROR OPT.PRDEL NCONC1) MOVEBOX (\PUTBASE \SOFTCURSORDOWN BLTHLINE BLTVLINE +\SOFTCURSORUPCURRENT) SHRIEKER (ATTACH) PRINTERTYPE (SELECTQ) APPENDINT.IP (APPENDBYTE.IP) +DO-DISPATCH-MACRO (READ-EXTENDED-TOKEN) SETSPACE.IP (APPENDNUMBER.IP) FILEGETDEF.LISPXMACROS (FRPLACD) + FW-CREATE-OFD (DECLARE) UNIX-STREAM-IN (BLOCK) GETDEFFROMFILE (DECLARE CL:FORMAT) RESUME (LISPERROR +UNINTERRUPTABLY \DECUSECOUNT) OPT.JUMPREV (OPT.PRDEL NCONC1 OPT.PRATTACH FRPLACA FRPLACD) /SETTOPVAL ( +UNDOSAVE) \FM.CREATEW (WINDOWPROP) HPRINTEND (SORT SETFILEPTR MAPC) SETXREL.IP (APPENDNUMBER.IP +APPENDOP.IP) FILEGETDEF.ALISTS (FRPLACD) \DO-DEFINE-FILE-INFO (MAP) EXEC-READ-LINE (READC SHOULDNT) +GET-ONED-DISPLAYW (WINDOWPROP DSPRIGHTMARGIN DSPFONT) BCPL.TO.FLOATP (ERROR) +\TEDITMENU.RECORD.UNFORMATTED (TEXTPROP) ADDFILE (SELECTQ SHOULDNT UPDATEFILES ADDSPELL) DRAWGRAYBOX ( +\PUTBASE \SOFTCURSORDOWN BLTHLINE BLTVLINE \SOFTCURSORUPCURRENT) COMPILER::META-CALL-LAMBDA ( +COMPILER::META-CALL-LAMBDA-SUBSTITUTE COMPILER::RELEASE-TREE RPLNODE) CHAT.BUTTONFN (PROCESS.APPLY +CHAT.HOLD) RESET/NODE/BORDER (ERASE/GRAPHNODE DISPLAYNODELINKS SET/LABEL/SIZE DISPLAYNODE) +SEDIT::OPEN-LITATOM (SEDIT::CLOSE-OPEN-NODE RPLSTRING) \LFUpdateLeaderPage (SELECTQ \LFWriteLeaderPage +) UPDATEFILEMAP (SKIPSEPRS READC SKREAD RESETLST) RPTPRINT (RPTPUT) MSVERBTYPE (SELECTQ MSSETSETTYPE +MSKNOWN) \TEDIT.LOOKS.UPDATE (DECLARE \EDITSETA RETFROM) SEDIT::SETUP-CONTEXT (SEDIT::SETUP-PROFILE +SEDIT::SETUP-NEW-CONTEXT SEDIT::VERIFY-STRUCTURE SEDIT::THROW-AWAY-CHANGES) COMP.STBIND (OPT.CCHECK +COMP.ST) SETNTHTOPLEVELELT (PROMPTPRINT) READPLIST (SETSEPR SETSYNTAX SETBRK READTABLEPROP FRPLACD +ERROR) TTYIN.SCRATCHFILE (DECLARE SETFILEPTR) CENTERPRINTINAREA (MOVETO RESETLST) SMASHFILECOMS ( +SETTOPVAL) CL:SET-DISPATCH-MACRO-CHARACTER (FREPLACEFIELD) SHOWSHADEDITEMS (RESHADEITEM) \SENDLEAF ( +ERROR AWAIT.EVENT RELEASE.PUP) MENUITEMREGION (CHECK/MENU/IMAGE) PRINTCOPYRIGHT (NCONC1 +PRINTCOPYRIGHT1) FASL:PROCESS-FILE (DECLARE) SKIP/ZAP (MOVE.FORWARD.TO FORWARD.DELETE.TO MOVE.BACK.TO +BEEP) \TEXTBOUT (\TEDIT.MARK.LINES.DIRTY \INSERTCH TEDIT.UPDATE.SCREEN) STKARGNAME (DECLARE) MAPRINT ( +DECLARE LISPXPRIN1 APPLY* SI::RESETUNWIND) DINFO.UPDATE.MENU.DISPLAY (FRPLACD DETACHWINDOW CLOSEW +UPDATE/MENU/IMAGE ADDMENU ATTACHWINDOW REDISPLAYW) ENUM-STRING (STRPUT FREERESOURCE DECLARE) +SETSTKARGNAME (DECLARE SETSTKNAMEENTRY UNINTERRUPTABLY) MB.DEFAULTBUTTON.ACTIONFN ( +TEDIT.RESET.EXTEND.PENDING.DELETE \FIXSEL TEDIT.NORMALIZECARET) PROMPTCHAR (DECLARE MAPC PRIN2 PRIN1) +\FM.SETATTACHPOINT (DECLARE LISTPUT) %%PRINT-ARRAY-CONTENTS (\ELIDE.PRINT.TAIL) +DINFO.UPDATE.TEXT.DISPLAY (OPENTEXTSTREAM DINFO.SHOWSEL CLOSEF?) CL:VECTOR-PUSH-EXTEND (CL:ADJUST-ARRAY +) \POSTSCRIPT.ACCENTPAIR (DECLARE POSTSCRIPT.SHOWACCUM \UPDATE.PSC BOUT POSTSCRIPT.PUTCOMMAND) +LISPXPUT (FRPLACA) %%DEFPRINT-ARRAY (\ELIDE.PRINT.ELEMENT) \CONVERTNUMBER (RPLCHARCODE SELECTQ) +PRETTYDEF (DECLARE \ILLEGAL.ARG CL:MULTIPLE-VALUE-SETQ PRIN1 SETFILEPTR HELP PRINT-READER-ENVIRONMENT) + OPT.LABELNTHPR (OPT.CHLEV SUB1VAR OPT.CHECKTAG OPT.SETDEFREFS) FILEPKGCHANGES (FRPLACD) MSFIXUPTYPES +(MSKNOWN) LISPXTERPRI (LISPXPUT) PRINTCOPYRIGHT1 (PRIN1 printout PRIN3 MAPC) LISPXPRIN1 (LISPXPUT) +PRINTER.BITMAPFILE (DECLARE) HPRINT1 (PRIN3 PUTHASH SPACES SETN HPRINTSTRING FRPTQ DECLARE RESETFORM +MAPHASH HPRINTSP MAPC PRINTBITMAP) PFI.HANDLE.PACKAGE (CL:EVAL TERPRI) GET-TITLEW (DSPFONT +DSPOPERATION) LISPXREADBUF (FRPLACD PRIN1) \CML-LOAD (PRINT CL:FORMAT) %%DEFPRINT-VECTOR ( +\ELIDE.PRINT.ELEMENT) \POSTSCRIPT.ACCENTFN (DECLARE \UPDATE.PSC BOUT) ITEM.WINDOW.SET.STACK.ARG ( +\ILLEGAL.ARG PROMPTPRINT RESETLST TERPRI) ONEDINSPECT.RESHAPEFN (CLEARW ONEDINSPECT.MAKEREGIONS +ONEDINSPECT.ADJUSTSELECTION ONEDINSPECT.REPAINTFN) FILECREATED (DECLARE PRIN1 LISPXPRIN1 LISPXTERPRI +/PUT) GREET (TAB SETUSERNAME MAPC LOAD GREET0 PRIN1) \LFMakeVolumeDirectory (DiskError LISPERROR +\PFSaveBuffers \LFMakeLeaderPage \PFInsertDirectoryID) FNUM-STRING (STRPUT) \GOOD.DASHLST (FRPLACD) +SEDIT::INSERT-STRING (SEDIT::REPLACE-STRING) CENTEREDPRIN1 (MOVETO) DEFINE-FILE-INFO (DECLARE) +\APPEND2 (FRPLACD) HASH-B (READ-EXTENDED-TOKEN HASH-NO-PARAMETER-ERROR) RESHADEITEM (DSPFILL) +/DECLAREDATATYPE (UNDOSAVE) CHECKDEFS (RECORDERROR) FIXR (.FLOATUNBOX. SELECTC .NEGATE. .LLSH8. +.LLSH1. .LRSH8. FRPTQ) HASH-C (CL:READ HASH-NO-PARAMETER-ERROR) SAVECOPYRIGHT (PRINT) +\DSPXPOSITION.HDCPYDISPLAY (\HDCPYDISPLAY.FIX.XPOS) \LEAF.CLOSEFILE (\CLEARMAP LISPERROR DECLARE +OBTAIN.MONITORLOCK SI::MONITOR-UNWIND \SENDLEAF) COMPERROR (COMPERRM) DECLAREDATATYPE (LISPERROR +FRPLACD) READFROMBUF (BREAKLINE ADDNAKEDCHAR START.NEW.LINE MOVE.TO.WHEREVER DELETE.LONG.SEGMENT1) +FILLTRIANGLE (RPLACA RPLACD) CL::RESOLVE-SLOTS (CL:ERROR) \TEDIT.GET.PARALOOKS.LIST2 (FRPLACD) FLTSTR +(WITH-RESOURCES RPLCHARCODE FREERESOURCE DECLARE .FLOATUNBOX. SELECTC .NEGATE. .LLSH8. .LLSH1. .LRSH8. + TIMESPOW10 INTTOEXT .LRSH1. \CONVERTNUMBER GLC CL:VECTOR-PUSH) \TELERAIDGET (FLIPCURSOR +\BLTLOCALHOSTNUMBER \10MBRAWENCAPSULATE \10MBRAWTRANSMIT) TTGIVEHELP (TERPRI TTGIVEHELP1 PRIN1 +TTGIVEHELP2) \FILLPOLYGON.IP (SETCOLOR.IP MAPC APPENDINTEGER.IP) HASH-COLON (HASH-NO-PARAMETER-ERROR) +APPENDSEQUENCEDESCRIPTOR.IP (ERROR) \TRACKWITHBOX (DECLARE DRAWGRAYBOX GETMOUSESTATE \CURSORPOSITION +APPLY* ERROR!) DWMFY2 (DWIMIFY1 /RPLNODE LISPXSPACES LISPXPRIN1 LISPXPRINT DWIMIFY1A) +\VAMFindFreePages (DiskError LISPERROR) TIMESPOW10 (\EXTFTIMES) TRANSLATE.DATATYPE (DECLARE MAPC +\REUSETO RPLACA) %%SLOW-ARRAY-WRITE (CL:ERROR) GREET0 (LISPXPRIN1) INTTOEXT (.UNBOX. SELECTC +\ILLEGAL.ARG CL::%%NOT-NONCOMPLEX-NUMBER-ERROR .LLSH1.) FILEDATE (RESETSAVE SETFILEPTR) LINELENGTH ( +\ILLEGAL.ARG) EXTTOINT (.LRSH1.) DINFO.UPDATE.GRAPH.DISPLAY (DINFO.INVERT.NODE DINFO.SHOWGRAPH) +COURIER.BROADCAST.CALL (DECLARE RESETSAVE printout TAB \MAP.ROUTING.TABLE SPACES) LISPXPRINT (LISPXPUT +) FLTINTLOG (TIMESPOW10) \FM.COLLECTNWAYS (MAPC TCONC LISTPUT) \RESHAPEATTACHEDWINDOWSAROUNDMAINW ( +SHAPEW) /PUT (ERRORX UNDOSAVE FRPLACD /RPLACA SETPROPLIST) DWMFY0 (DWIMIFY1 DWIMIFY2) FW-CLOSEFN ( +DECLARE) GETDEFERR (DECLARE ERROR) RPLCHARCODE (\SMASHABLESTRING LISPERROR \PUTBASECHAR DECLARE) +MB.SELFN (\COPYSEL \FIXSEL \SHOWSEL) \REUSETO (ERROR) DO-EVENT (DECLARE DSPFONT +HISTORY-ADD-TO-SPELLING-LISTS MAPC) \LISP.TO.NSFILING.ATTRIBUTE (FRPLACD) HASH-DOUBLEQUOTE (CL:READ +HASH-NO-PARAMETER-ERROR) \NSRANDOM.UPDATE.VALIDATION (\NSRANDOM.HANDLE.ERROR) TTECHO.TO.FILE (PRIN1 +FRPTQ DECLARE TERPRI) \UPDATEXYANDBOX (MOVEBOX SETCORNER DRAWGRAYBOX) HASH-MINUS ( +HASH-NO-PARAMETER-ERROR) COMPILER::META-EVAL-VAR-REF (COMPILER::RELEASE-VAR-REF COMPILER::ANALYZE-TREE +) RIGHTW.RESHAPEFN (CLEARW RIGHTW.ADJUSTSELECTION) PRETTYCOMPRINT (PRIN1) \TEDIT.PUT.SINGLE.PARALOOKS +(\SMALLPOUT DECLARE MAPC \ARBOUT \ATMOUT SETFILEPTR) HASH-DOT (HASH-NO-PARAMETER-ERROR) +FLONUM-TO-STRING (CL:MULTIPLE-VALUE-SETQ STRPUT) OPT.LBDEL (OPT.PRDEL OPT.SETDEFREFS OPT.DELCODE) +READLINE (DECLARE CLEARBUF READC PRIN1 SHOULDNT RPLACA SETFILEPTR) HASH-PLUS (HASH-NO-PARAMETER-ERROR) + DMCHAT.ADDRESS (\DTEST TERM.MOVETO) PRINTHISTORY2 (PRIN1 MAPRINT SHOWPRIN2 SPACES TERPRI) HASH-COMMA +(HASH-NO-PARAMETER-ERROR) DIGITSBDP (.FLOATUNBOX. SELECTC .NEGATE. .LLSH8. .LLSH1. .LRSH8.) +EDITLOADFNS? (PRIN2 MAPRINT /RPLACD CL:FORMAT EXEC-FORMAT) DECLARE%:1 (DECLARE%:1 SELECTQ) +MSPATHOPTIONS (printout PRIN1 FRPLACD) DO.EDIT.PP (MOVE.TO.LINE ERASE.TO.END.OF.PAGE TTYIN1RESTART +TTLOADBUF SETFILEPTR BREAKLINE READFROMBUF FREERESOURCE DECLARE) HASH-R (READ-EXTENDED-TOKEN) +\POSTSCRIPT.SPECIALOUTCHARFN (DECLARE BOUT SELCHARQ) TTYINSTRING (DECLARE RPLCHARCODE) READHOTSPOT ( +UNTILMOUSESTATE GETMOUSESTATE \BACKGROUND CURSORPOSITION BLOCK BITBLT) COPY.TEXT.TO.IMAGE (TERPRI +\OUTCHAR SELCHARQ DSPFONT BIN) \FM.WINDOWEXTENT (EXTENDREGION) HASH-QUOTE (HASH-NO-PARAMETER-ERROR) +COMP.STSETQ (OPT.CCHECK) RESETBUFS (DECLARE LINBUF SYSBUF BKBUFS) CHAT.ICONFN (DECLARE TTY.PROCESS) +TTDELETECHAR (DELETELINE MOVE.TO.LINE) \FM.MAKELINKS (RPLACA) TITLEW.REPAINTFN (BITBLT MOVETOUPPERLEFT +) \EXTFTIMES (.LLSH8.) PFI.HANDLE./DECLAREDATATYPE (PFI.MAYBE.NEW.PAGE) APPENDIDENTIFIER.IP ( +APPENDSEQUENCEDESCRIPTOR.IP DECLARE \BOUT) DWMFY1 (MAPC DWIMIFY1A DWIMIFY1) FW-INTERACT (DECLARE) +EDITMOVENODE (CLRPROMPT printout FLIPNODE GETMOUSESTATE TERPRI TRACKCURSOR) HASH-X ( +READ-EXTENDED-TOKEN HASH-NO-PARAMETER-ERROR) COPYINSERT (BKSYSBUF) PRETTYPRINT3 (PRIN1 CHANGEFONT +PRIN2 TERPRI PRINT PRINTDEF) REMPROPLIST (RPLNODE2 RPLACD SETPROPLIST) GETDEFCURRENT (GETDEFERR +UPDATEFILES) %%NUMERIC-STRING-P (DECLARE) HASH-VBAR (SKIP.HASH.COMMENT) \TEDIT.HCPYLOOKS.UPDATE ( +DECLARE \EDITSETA RETFROM) COMPARENCHARS (DECLARE \MAPPNAME.INTERNAL) SETFONT.IP (APPENDNUMBER.IP +APPENDOP.IP ERROR) ENDFILE (PRINT) SCALE.IP (APPENDNUMBER.IP) \FM.UPDATEGROUPEXTENT ( +\FM.UPDATEGROUPEXTENT) \TELERAIDCOMMAND (DECLARE SETMAINTPANEL RAID \FLUSHVM) SEDIT::DOT-THIS-LIST ( +RPLACD SEDIT::NOTE-CHANGE) \LFCloseDirectory (FORGETPAGES) \ITEMW.DESELECTITEM (\ITEMW.FLIPITEM) +\STRINGIN (RPLCHARCODE) HASH-O (READ-EXTENDED-TOKEN HASH-NO-PARAMETER-ERROR) HASH-EQUAL (CL:ERROR) +\NSRANDOM.WROTE.HANDLE (\NSFILING.UPDATE.ATTRIBUTES) UNSAVED1 (VIRGINFN /REMPROP SAVEDEF /PUTD +ADDSPELL ERROR) DRAWDASHEDLINE (FRPLACD DRAWLINE) GENERATEFN (DECLARE FRPLACA FRPLACD RESUME APPLY*) +BUILDGETRELQ (MAPC) PRETTYPRINT (PRIN2 PRIN1 TERPRI TCONC PRINTDEF ADDSPELL PRETTYPRINT3 RPLACD +LOADFNS PRINT /RPLACA FRPLACA EXEC-FORMAT LISPXPUT) TERM.PRINTCHAR (\CHANGECHARSET.DISPLAY +\BLTSHADE.DISPLAY \BLTCHAR) \POSTSCRIPT.PRINTSLUG (DECLARE \BLTSHADE.PSC) \SEARCHPRESSFONTS (DECLARE +RESETSAVE SETFILEPTR) TEMPLATE (MARKASCHANGED MSMARKCHANGED PUTHASH) DINFO.UPDATE.HISTORY (FRPLACD +DETACHWINDOW CLOSEW) SPY.ADD.ENTRY (\PUTBASEPTR \PUTBASE) AU-REVOIR (NOTE) \EXTNORMALIZE (.LLSH1.) +TTNEXTLINE (SUB1VAR) SEND.FILE.TO.PRINTER (RESETSAVE LISPXPRIN1 LISPXTERPRI) MSMSGPRINT (MSMSGPRINT) +TERM.ADDLINE (BITBLT) SQRT (DECLARE ERROR FRPTQ) SEDIT::SELECT-NEXT-GAP (SEDIT::SET-SELECTION-NOWHERE) + \EXTFQUOTIENT (.LRSH1. FRPTQ) CLISPEXPANSION (DECLARE DWIMIFY0? CL:CERROR) MSJOINSET (printout SPACES + MSSETSETTYPE MSKNOWN) INIT-CML-READTABLES (DECLARE READTABLEPROP SETSYNTAX) SEDIT::HASFAT (DECLARE) +SCANFILEHELP (PRIN1 TERPRI) GRAYBOXAREA (\ILLEGAL.ARG) \DSKEventFn (DECLARE OBTAIN.MONITORLOCK +\DSKCloseDevice \DSKOpenDevice \UNVISIBLE.PAGED.REVALIDATEFILELST \PAGED.REVALIDATEFILELST MAPHASH +\UNVISIBLE.FLUSH.OPEN.STREAMS SI::MONITOR-UNWIND) \CONVERT.FLOATING.NUMBER (FREERESOURCE) OPENIPSTREAM + (DECLARE ERROR \EXTERNALFORMAT STREAMPROP INITIALIZEMASTER.IP BEGINMASTER.IP BEGINPREAMBLE.IP SELECTQ + HEADINGOP.IP GETFRAMEVAR.IP SETUPFONTS.IP \DSPCLIPPINGREGION.IP INITIALIZECOLOR.IP PUSH-IP-STACK +NEWPAGE.IP) \TEDIT.PARSE.CHARLOOKS.LIST (LISTPUT) FW-OPENP (DECLARE MAPC RPLACD) \VAMBufferSave ( +\PFPutAllocationMapPage) FW-UPDATE-OFD-WINDOW (DECLARE DSPRESET printout GRAYBOXAREA DSPFILL) +MB.SETIMAGE (DSPXOFFSET DSPYOFFSET DSPFONT MOVETO PRIN1) FB.SORT.VERSIONS (FRPLACD RPLACD) DWIMIFY0? ( +SELECTQ) HASH-S (HASH-NO-PARAMETER-ERROR) /SETD (UNDOSAVE) TEDIT.HARDCOPY.PAGEHEADING (FRPLACD LISTPUT +) COMPAREPRINTN (SELECTQ PRIN1 TERPRI PRIN2) FASL-FILEDATE (SETFILEPTR) SHORTLST (SPACES PRIN2 PRIN1) +CL:MAKE-ARRAY (%%ARRAY-CONTENT-INITIALIZE %%ARRAY-ELEMENT-INITIALIZE) /SETSEPR (UNDOSAVE) +\DSKCloseDevice (DECLARE OBTAIN.MONITORLOCK \REMOVEDEVICE SI::MONITOR-UNWIND) RESTOREBUF ( +END.DELETE.MODE READFROMBUF FRPLNODE ADJUSTLINE.AND.RESTORE BEEP) PARSE.NSNAME (GETCLEARINGHOUSE) +SHEDSCAN (GETLINEORIG GETLINEDIFF) MSFAIL (RETFROM printout PRIN1 ERROR!) READ-AFM-FILE (PRIN1 DECLARE + RATOMS SETA CLOSEF) \FM.MAKEBITMAP (BLTSHADE BITBLT DSPFONT DSPXPOSITION DSPYPOSITION +DSPCLIPPINGREGION PRIN1) TTDELETEWORD (SETTAIL? DELETE.LONG.SEGMENT1) TTREADLIST (FRPLACD) +\LFDeleteFile (DECLARE OBTAIN.MONITORLOCK UNINTERRUPTABLY \LFRemoveDirEntry \PFTrimHelper +SI::MONITOR-UNWIND) \SHADEBITS (GETMOUSESTATE CLEARW MOVETO PRINTOUT BITMAPBIT UPDATE/BM/DISPLAY +SHADEGRIDBOX) PARSE-NAMESTRING1 (\ILLEGAL.ARG) \UFS.UNREGISTER.GFS (DECLARE \UFSFinishFileInfo-C) +INSTALL-CLIPBOARD (INTERRUPTCHAR) GETEXPRESSIONFROMEVENTSPEC (FRPLACD) COMP.VARTYPE (OPT.CCHECK) +PRETTYCOM (PRINT MAP SELECTQ PRINTFNS MAPC SPACES CL:FORMAT CL:TERPRI MAPRINT TAB DECLARE PRIN3 RPTQ +CHANGEFONT ERROR) OPT.LBMERGE (MAPC NCONC) \UNVISIBLE.FLUSH.OPEN.STREAMS (FDEVOP) ADIEU (NOTE) +\MAIKO.PUNTBLTCHAR (DECLARE \CHANGECHARSET.DISPLAY \DSPPRINTCR/LF .WHILE.TOP.DS. \PUTBASE +\SOFTCURSORDOWN \INSURETOPWDS \SOFTCURSORUPCURRENT) GET-ENVIRONMENT-AND-FILEMAP (SETFILEPTR) +\DSPFONT.HDCPYDISPLAY (\FSETWIDTH) \GETPRESSFONTNAMES (SETFILEPTR SELECTQ) GRAPHEDITCOMMANDFN (DECLARE +) SKOR (DECLARE SUB1VAR ADD1VAR) DOERROR (NCONC1 FRPLACD) \FLOATINGSCALE (DECLARE INTTOEXT TIMESPOW10) + PRINTFNS (NCONC1 PRIN1 PRINT PRETTYPRINT RPLACA TERPRI) \BULK.DATA.CLOSE (\COURIER.TRACE DECLARE +SPP.SENDATTENTION SPP.SENDEOM \ABORT.BULK.DATA RESETSAVE) \UNVISIBLE.PAGED.REVALIDATEFILELST (SELECTQ +MAPC FDEVOP SHOULDNT \PRINT-REVALIDATION-RESULT) SEDIT::LINEARIZE (SEDIT::SET-LINEAR DECLARE +SEDIT::GENERATE-LINEAR-FORM CL:FUNCALL) \INIT.POWERS.OF.TEN (SETA DECLARE INTTOEXT TIMESPOW10 +\EXTFQUOTIENT) PFI.HANDLE.PUTPROPS (PFI.MAYBE.NEW.PAGE PFI.ADD.TO.INDEX) GET-FILEMAP-FROM-FILECREATED +(SKREAD SETFILEPTR) \VFMSmartBLT (DECLARE \PUTBASE) FW-CLOSE-OLD-OFD-WINDOWS (DECLARE) +\TEDIT.PARSE.PARALOOKS.LIST (SELECTQ TEDIT.PROMPTPRINT) CL:COMPILE-FILE (DECLARE CL:ERROR CL:CLOSE +FASL:CLOSE-FASL-HANDLE) MB.DISPLAY (MB.SETIMAGE BITBLT PRIN1) PRETTYDEF1 (/NCONC1 PRETTYCOM /RPLACA) +TB.FINISH.CLOSE (DECLARE OBTAIN.MONITORLOCK WINDOWADDPROP WINDOWDELPROP SI::MONITOR-UNWIND) +\FILING.ATTRIBUTE.TYPE (ERROR) /SETBRK (UNDOSAVE) \10MB.TURNONETHER (\MAIKO.ETHERSUSPEND \BLT +\STORENSHOSTNUMBER) TEDIT.SKIP.SPECIALCOND (FRPLACD) \FAULTINIT (\MAIKO.FAULTINIT \MP.ERROR +\DL.FAULTINIT \DOVE.FAULTINIT \D01.FAULTINIT \SETIOPOINTERS \SET.VMEM.FULL.STATE) \UFSEventFn (DECLARE + OBTAIN.MONITORLOCK \UFSCloseDevice \UFSOpenDevice \UNVISIBLE.PAGED.REVALIDATEFILELST +\PAGED.REVALIDATEFILELST MAPHASH \UNVISIBLE.FLUSH.OPEN.STREAMS SI::MONITOR-UNWIND) \FM.GETBITMAPS ( +BLTSHADE BITBLT) REFLECT/GRAPH/DIAGONALLY (MAPC) \PFReplaceString (DECLARE \PUTBASEBYTE \PUTBASE) +\MAKEFRAME (CHECK) COPYALLBYTES (RESETSAVE SETFILEPTR PFCOPYBYTES COPYBYTES) FILECHANGES (SETFILEPTR +RESETSAVE) \VFMDelete1 (MESASETQ \VFMSmartBLT) \UFSDirectoryNameP (DECLARE) +LOOKUP-ENVIRONMENT-AND-FILEMAP (MAPHASH) FW-RESIZE-OFD (DECLARE) SETRGB.IP (SHOW.IP APPENDINTEGER.IP +APPENDOP.IP FGET.IP ISET.IP) TRANSLATE.LOCF (DECLARE ERROR) CLEARPUP (\ZEROWORDS) +\MAIKO.BLTSHADE.BITMAP (DECLARE) \SETIOPOINTERS (\PUTBASE RAID) \UFSOpenFile (DECLARE +OBTAIN.MONITORLOCK CL:ERROR PROMPTPRINT SI::MONITOR-UNWIND) \TELERAIDINIT (MAPC \LOCKPAGES) +TTADJUSTWORD (TTPRIN1 TTGIVEHELP TTCRLF) UNIQLIST (MAPC) \D01.FAULTINIT (\BLT SETQ.NOREF \CHAIN.UP.RPT +) \UFSGenerateFiles (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) ENTEREVALQT (RESETRESTORE) +\DOVE.FAULTINIT (DECLARE \MP.ERROR SETMAINTPANEL \DL.NEWFAULTINIT SETQ.NOREF \RCLK \DoveMisc.ReadGMT +\DoveMisc.ReadHostID \DoveDisk.Init) \UFSSetFileInfo (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) +TRYNEXT (SET RETEVAL) PSCFONT.WRITEFONT (PRIN3 BOUT \WOUT DECLARE CLOSEF) PRETTYDEFCOMS (DECLARE MAP) +\DL.FAULTINIT (\MP.ERROR \DL.NEWFAULTINIT \RCLK \PUTBASEPTR \PUTBASE) SIZE/GRAPH/WINDOW (CLEARW) +\UFSWritePages (CL:ERROR) PRINTDATE (PRINTDATE1) \SEQUIN.HANDLE.ACK (\SEQUIN.RETRANSMITNEXT BLOCK +\DEQUEUE FREPLACEFIELD SEQUINOP) \TEXTTTYBOUT (\TEDIT.CHARDELETE DECLARE CHECK SELCHARQ \TEXTBOUT +FREPLACEFIELD) \TEDIT.UPDATE.SHOWSEL (\EDIT.UPCARET \SHOWSEL.HILIGHT \SETCARET) D-ASSEM::FIXUP-NTENTRY + (UNINTERRUPTABLY) PRINTDATE1 (printout SPACES PRIN3 TERPRI TAB) \MAIKO.FAULTINIT (\MAIKO.DO.MOVDS +\MAIKO.NEWFAULTINIT \RCLK \PUTBASEPTR) \UFSReadPages (\UPDATEOF CL:ERROR \CLEARBYTES \CLEARWORDS) +/SETA (UNDOSAVE) \10MB.LOADINPUTQ (\TEMPLOCKPAGES \QUEUE.INPUT.IOCB) FILEPKG.MERGECHANGES (FRPLACD +NCONC) SNAPW (BITBLT WINDOWPROP OPENW MOVEW) \UFSTruncateFile (\UPDATEOF \SETFILEPTR \BOUT) +CL:MACROEXPAND (CL:MULTIPLE-VALUE-SETQ) \BN.TIMES2 (ERROR RPLACA RPLACD) \SPP.CHECK.INPUT.QUEUE ( +SHOULDNT) \GETREGIONTRACKWITHBOX (DECLARE DRAWGRAYBOX GETMOUSESTATE \CURSORPOSITION +\GETREGION.CHECKBASEPT APPLY* ERROR!) \UFSGetFileInfo (DECLARE OBTAIN.MONITORLOCK RPLACD +SI::MONITOR-UNWIND) \BN.DIVIDE (RPLACD RPLACA) PFI.HANDLE.PUTDEF (PFI.MAYBE.NEW.PAGE) OPT.JUMPTHRU ( +OPT.LBMERGE COMPERRM FRPLACA OPT.PRATTACH OPT.PRDEL NCONC1 FRPLACD) \VFMSaveBuffer (\PFPutFileMapPage) + \UFSDeleteFile (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) \FILEMAP-HASHOVERFLOW (MAPHASH REMHASH +) READVARS-FROM-STREAM (DECLARE CL:MAPC) \ARBIN (CLOSEF?) \DUMMYKEYHANDLER (\CONTEXTAPPLY +\CONTEXTSWITCH) DMCHAT.NEWLINE (MOVETO) \UFSRenameFile (\UFStoOtherRenameMess \UFSError) +FB.DELVERCOMMAND (FB.ALLOW.ABORT FB.UPDATE.COUNTERS) DIRECTORY.FILL.PATTERN (DECLARE) +D-ASSEM::TYPE-NAME-FROM-SIZE (CL:ERROR) \LFRenameFile (WITH.MONITOR DECLARE OBTAIN.MONITORLOCK +\LFMakeDirEntry \LFRemoveDirEntry SI::MONITOR-UNWIND LISPERROR) FLUSHFILEMAPS (CLRHASH MAPHASH) +\UFSCloseFile (\CLEARMAP FDEVOP) SEDIT:REPLACE-SELECTION (CL:ERROR SEDIT::PENDING-DELETE SEDIT::INSERT +) SEDIT::REPLACE-ROOT (SEDIT::UNDO-BY SEDIT::KILL-NODE RPLACA SEDIT::SET-DEPTH SEDIT::NOTE-CHANGE +SEDIT::SUBNODE-CHANGED-ROOT SEDIT::SET-POINT-NOWHERE) COMP.MACRO (DECLARE) \TEDIT.GET.SINGLE.PARALOOKS + (FRPLACD RPLACA RPLACD TEDIT.PROMPTPRINT SETFILEPTR) TRACKW (GETMOUSESTATE MOVEW) \BN.QRS (ERROR) +GETSYNTAX (\MAPCHARTABLE MAPHASH \ILLEGAL.ARG) \CHARWIDTH.HDCPYDISPLAY (DECLARE) EDITSHADE (WINDOWPROP + EDITSHADEREPAINTFN RESETLST DSPFILL GETMOUSESTATE TOTOPW BLOCK ERSETQ SHADEGRIDBOX BITMAPBIT PRINTOUT + DECLARE TERPRI) SI::FINISH-ADVISING (PUTD MARKASCHANGED) PRINTDEF1 (PRINTDEF NCONC1) \UFSeol ( +PRINTOUT TERPRI) LISPSOURCEFILEP (SETFILEPTR) \INSPECTW.COMMAND.HANDLER (GETMOUSESTATE) DSPSPACEFACTOR + (\ILLEGAL.ARG) /PUTDQ (/PUTD) \SEQUIN.FLUSH.RETRANSMIT (\ENQUEUE) \DOFORMATTING.HARDCOPY ( +FREPLACEFIELD SELECTQ DECLARE \EDITSETA \TEDIT.PURGE.SPACES) EDITSHADEREPAINTFN (SHOWBUTTON +GRAYBOXAREA RESETGRID.NEW DSPFILL) MB.CREATE.NWAYBUTTON (FRPLACD DSPXOFFSET DSPYOFFSET DSPFONT +DSPRIGHTMARGIN DSPDESTINATION MOVETO PRIN1 IMAGEOBJPROP) \D01.ASSIGNBUFFERS (RAID \INITBFS) +MSSETSETTYPE (SELECTQ FIXVERBSETTYPE MSSETSETTYPE) \UFSError (SELECTQ ERROR CL:ERROR) DO.DELETE.LINES +(BITBLT BITBLT.ERASE) PRETTYVAR (printout PRIN1 PRIN2 PRETTYVAR1 ERROR) \LFTruncateFile (\UPDATEOF +UNINTERRUPTABLY \LFExtendFile \SETFILEPTR \BOUT \LFUpdateLeaderPage \PFSaveBuffers) \FM.CREATEITEM ( +\FM.READUSERDATA) SI::DESCRIBE-INTERNAL (SI::DESCRIBE-NEW-LINE CL:FORMAT) \UFS.FULLNAME (DECLARE) +FB.CLOSE&EXPUNGE (FB.FINISH.COMMAND) SEDIT::REPLACE-NODE (SEDIT::SET-SELECTION-ME SEDIT::PENDING-DELETE + SEDIT::INSERT) COMP.PROG1 (MAPC) \GETREADSYNTAX (DECLARE CHECK) \VFMFreeVPage (\VAMFreePageGroup) +CL::DEFSTRUCT-PARSE-OPTIONS (CL::ENSURE-CONSISTENT-PS) \GETTERMSYNTAX (DECLARE CHECK) +ENABLEWHEELSCROLL (INTERRUPTCHAR) D-ASSEM::COPY-LAP-CODE (FRPLACD) \NSFILING.ADDQUOTES (DECLARE +SELCHARQ RPLACD) PRETTYVAR1 (printout PRIN1 PRIN2 PRINTDEF CHANGEFONT MAPRINT) MAKEDEFLIST (PRETTYVAR1 + EXEC-FORMAT) OPT.XVARSCAN1 (OPT.COMPILERERROR) LVLPRIN1 (DECLARE LVLPRIN) \VFMDelete2 (MESASETQ +\VFMSmartBLT \VFMPutNext) \DEVICEFILE.EOSERROR (BLOCK UNINTERRUPTABLY) %%SORT-SUBLIST (%%SORT-SUBLIST) + SETCOLOR16.IP (BITBLT APPENDNUMBER.IP APPENDINTEGER.IP SCALE.IP APPENDSEQUENCEDESCRIPTOR.IP +APPENDINT.IP \BOUTS APPENDOP.IP ROTATE.IP CONCAT.IP ISET.IP) CL::SIMPLE-STRING= (%%UNPACK-STRING) +\UFSCloseDevice (DECLARE OBTAIN.MONITORLOCK \REMOVEDEVICE SI::MONITOR-UNWIND) COMPILER::FRAME-ANNOTATE-LAMBDA + (MAPC) REDISPLAYGRAPH (DSPFILL) COMPILER::META-EVAL-PROGN (FRPLACD) SEDIT::ATOM-CHAR-ESCAPED (DECLARE + CHECK) HPRINT0 (ERROR) FIX-FORM (EDITE PRINT-EVENT-PROMPT DSPFONT CURSOR DECLARE) LVLPRIN2 (DECLARE +LVLPRIN) SEDIT::DELETE-LITATOM (SEDIT::REPLACE-STRING) SEDIT::RELINEARIZE-WHERE-NECESSARY ( +SEDIT::RELINEARIZE CL:FUNCALL) COMP.VAR (COMP.STVAR) \MAKERECODEMAP (DECLARE) MKACCESSFN (RECORDERROR) + \M44ACTONVMEMFILE (\PUTBASE \BLT \SWAPDISKERROR) POSSIBILITIES (PRODUCE EVAL ADIEU) \SHOWSEL.HILIGHT +(BITBLT) PPSPPSTREAM (printout) TTYINENTRYFN (APPLY*) NESTED.SUBMENU (PUTMENUPROP) +COURIER.READ.BULKDATA (CLOSEF) \ITEM.WINDOW.SELECTION.HANDLER (TOTOPW \ITEMW.DESELECTITEM +\ITEMW.SELECTITEM GETMOUSESTATE APPLY*) \UFS.REMOVE.HOST.FIELD (LISTPUT CL:ERROR RPLACA DECLARE) +/PRINTLEVEL (UNDOSAVE) PRETTYCOM1 (PRETTYCOM DECLARE SI::RESETUNWIND) COMPAREPRINT1 (CL:PRIN1 ADD1VAR +COMPAREPRINTN PRIN1 SPACES COMPAREPRINT1) \RESHOWBORDER1 (.WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN +\INSURETOPWDS DECLARE \SW2BM UPDATE/SCROLL/REG SHOWWFRAME BITBLT \SOFTCURSORUPCURRENT) LVLPRIN ( +LVLPRIN0) MB.THREESTATE.WHENOPERATEDFN (MB.THREESTATEBUTTON.FN) ACCEPT-UNIX-SOCKET-STREAM ( +FREPLACEFIELD) RENUMBER.LINES (ADD1VAR) \REMOVE-DECLS (CL:MAPC MAPC) SETCOLORLV.IP (BITBLT +APPENDNUMBER.IP APPENDINTEGER.IP SCALE.IP APPENDSEQUENCEDESCRIPTOR.IP APPENDBYTE.IP \BOUT APPENDOP.IP +ROTATE.IP CONCAT.IP ISET.IP) \TEDIT.FORMATTABS (SELECTQ \RPLPTR SHOULDNT) +SI::UNADVISE-FROM-RESTORE-CALLS (SI::FINISH-UNADVISING) DEFAULT.INSPECTW.VALUECOMMANDFN (printout +TERPRI GETMOUSESTATE) SEDIT::COPY-STRUCTURE-STRING (RPLACA) COMPILER::EFFECTS-ANALYZE-LAMBDA ( +COMPILER::EFFECTS-ANALYZE) \LFGetFileName (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) \INITBFS ( +RAID \BLT \EXTENDEDVMEMINIT) COMPILER::GENCODE-CALL (MAPC COMPILER::GENCODE-LET COMPILER::GENCODE-LAMBDA +) LVLPRINT (LVLPRIN2 TERPRI) TEDIT.BUILD.PCTB (COPYBYTES CLOSEF COPYCHARS SELECTQ SHOULDNT SETFILEPTR +SELECTC SETA \TEDIT.GET.CHARLOOKS TEDIT.GET.OBJECT TEDIT.PROMPTPRINT \INSERTPIECE) COMP.CONST ( +COMP.STJUMP) OPT.XVARSCAN (MAPC SELECTQ OPT.XVARSCAN1) \TEDIT.NSCHAR.RUN (HELP \DELETECH +\TEDIT.INSERT.PIECES FREPLACEFIELD SETFILEPTR BOUT) READVARS (HPINITRDTBL HVREADERR SAVESET) +TERM.DELCHAR (BITBLT) \TELERAIDSERVER (DECLARE SELECTC \BLT \ACTONVMEMFILE \TELERAIDSEND \PUTBASE +\TELERAIDRELEASE \TELERAIDEXIT \TELEBLTCURSOR HARDRESET \CONTEXTSWITCH \UPDATETIMERS \BOXIPLUS) +\TEDIT.PURGE.SPACES (DECLARE \EDITSETA) UNMAKEHARDCOPYSTREAM (DECLARE STREAMPROP) READARRAY-FROM-LIST +(SETA SETD) TEDIT.PAGEFORMAT (\ILLEGAL.ARG) \UFS.DIRECTORY.NAME (RPLSTRING DECLARE OBTAIN.MONITORLOCK +SI::MONITOR-UNWIND) XCL::%%DELETE-DEFINER (/REMPROP) LVLPRIN0 (PRIN1 PRIN2 SPACES LVLPRIN0) PPSPP ( +printout PRINTNUM PPSPPSTREAM DECLARE PRINTSPP SI::RESETUNWIND) INVERTED/SHADE/FOR/GRAPHER (BLTSHADE) +PRINTPARA1 (TERPRI RPTQ PRIN3 PRIN4) PFI.PRINT.LAMBDA (PFI.MAYBE.NEW.PAGE PFI.ADD.TO.INDEX +PFI.PRINT.LAMBDA.BODY) SETSYNTAX (\ILLEGAL.ARG \SETREADSYNTAX \SETTERMSYNTAX) \TRANSLATE-CL%:LAMBDA ( +SELECTQ ERROR SHOULDNT CL:MULTIPLE-VALUE-SETQ) \LFGetFileInfo (DECLARE OBTAIN.MONITORLOCK \UPDATEOF +SI::MONITOR-UNWIND) \FM.UNSCROLLWINDOW (DSPXOFFSET DSPYOFFSET) \SETTERMSYNTAX (CHECK DECLARE) D-ASSEM::DCODE-FROM-DLAMBDA (D-ASSEM::DIGEST-FUNCTION D-ASSEM::GENERATE-EASY-ENTRY D-ASSEM::GENERATE-HARD-ENTRY D-ASSEM::STACK-ANALYZE D-ASSEM::ASSEMBLE D-ASSEM::EMIT-BYTE -D-ASSEM::CONVERT-TO-BINARY D-ASSEM::COMPUTE-DEBUGGING-INFO) PRETTYCOM1 (PRETTYCOM DECLARE -SI::RESETUNWIND) FB.UPDATE.COUNTERS (PRIN3 BLTSHADE) \\REMOVE-DECLS (CL:MAPC MAPC) \\UPDATE.PSC ( -\\SETXFORM.PSC \\SWITCHFONTS.PSC) \\SEND.ANSWERING.RFC (FREPLACEFIELD \\BLT \\FILLRTPPUP SENDPUP) -\\TEDIT.COPYINSERTFN (TEDIT.INSERT TEDIT.INSERT.OBJECT) ADDTO (SHOULDNT APPLY* FRPLACD) -POSTSCRIPT.SHOWACCUM (POSTSCRIPT.OUTSTR \\FILEOUTCHARFN) \\GETREADSYNTAX (DECLARE CHECK) LVLPRIN2 ( -DECLARE LVLPRIN) \\BN.DIVIDE (RPLACD RPLACA) ARGTYPE.STATE (PRIN1 SPACES) \\UFS.FULLNAME (DECLARE) -LISTFILES (DECLARE |printout| PRIN1 FRPLACD) \\10MBWATCHER (PROMPTPRINT UNINTERRUPTABLY -\\HANDLE.RAW.PACKET BLOCK) \\INITBFS (RAID \\BLT \\EXTENDEDVMEMINIT) FM.CHANGESTATE (\\FM.INSUREWINDOW - \\FM.CHANGESTATE BLTSHADE) DPRIN1 (DTAB) \\M44ACTONVMEMFILE (\\PUTBASE \\BLT \\SWAPDISKERROR) -\\LEAF.ERROR (|printout| PRIN1) \\D01.FAULTINIT (\\BLT SETQ.NOREF FREPLACEFIELD \\CHAIN.UP.RPT) -INSPECTW.SELECTITEM (\\ITEMW.DESELECTITEM \\ITEMW.SELECTITEM) \\DUMMYKEYHANDLER (\\CONTEXTAPPLY -\\CONTEXTSWITCH) PRINTPARA1 (TERPRI RPTQ PRIN3 PRIN4) COMP.SETARG (COMP.VAL COMP.DELPUSH COMP.VAL1) -TTYINENTRYFN (APPLY*) \\CHAIN.UP.RPT (FREPLACEFIELD ERROR) \\GETFILINGCONNECTION (DECLARE -OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) \\DSKDISPLAY.REPAINTFN (CLEARW CHANGEFONT PRIN1 FLUSHRIGHT) -\\INIT.POWERS.OF.TEN (SETA DECLARE INTTOEXT TIMESPOW10 \\EXTFQUOTIENT) NORMLOOP (RPLACD) \\LOOKUPPORT -(SETUPPUP PUTPUPSTRING SELECTC |printout| PRIN1 FRPLACD RELEASE.PUP) |\\UFSeol| (PRINTOUT TERPRI) -FIXDATUM (MAPC) SETCOLOR16.IP (BITBLT APPENDNUMBER.IP APPENDINTEGER.IP SCALE.IP -APPENDSEQUENCEDESCRIPTOR.IP APPENDINT.IP \\BOUTS APPENDOP.IP ROTATE.IP CONCAT.IP ISET.IP) -D-ASSEM::DIGEST-FUNCTION (MAPC MAP D-ASSEM::DIGEST-CODE) POSTEDITPROPS (PUTHASH MARKASCHANGED RPLACA) -EXPANDATTACHEDWINDOWS (DOUSERFNS) \\MAIKO.NEWFAULTINIT (\\MAIKO.ASSIGNBUFFERS) \\NSRANDOM.READ.SEGMENT - (\\NSRANDOM.REESTABLISH \\NSRANDOM.HANDLE.ERROR FREPLACEFIELD \\CLEARBYTES) \\DEVICEFILE.EOSERROR ( -BLOCK UNINTERRUPTABLY) MAKEFILE1 (/SETTOPVAL LISPXPRIN1 LISPXPRINT LISPXUNREAD) \\UFS.DIRECTORY.NAME ( -RPLSTRING DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) |\\InitCurveBrushes| (DECLARE BITMAPBIT MAPC -SETA) WINDOWWORLD (DECLARE UNINTERRUPTABLY \\CLEARBM FREPLACEFIELD CHANGEBACKGROUNDBORDER CL:PUSHNEW -TTYDISPLAYSTREAM SETLINELENGTH DSPTEXTURE DSPOPERATION DSPSCROLL WINDOWPROP CLEARW) TEDIT.HARDCOPYFN ( -RESETLST) COMP.ARG (COMP.VAL1 COMP.DELPUSH) SKIP/ZAP (MOVE.FORWARD.TO FORWARD.DELETE.TO MOVE.BACK.TO -BEEP) SCROLL.HANDLER (GETMOUSESTATE DISMISS OPENW \\UPDATE.EXTENT.IMAGE CLOSEW TOTOPW -\\SCROLL.HANDLER.DOIT BLOCK) \\SETNEWTIME0 (\\SETDAYTIME0 DECLARE |printout| TERPRI) -\\COERCEASCIITONSFONT (FRESHLINE |printout| PRINTNUM SPACES \\FSETWIDTH FREPLACEFIELD) DIRPRINTNAME ( -DECLARE SELCHARQ TERPRI SPACES \\OUTCHAR DTAB) \\TRANSLATE-CL\:LAMBDA (SELECTQ ERROR SHOULDNT -CL:MULTIPLE-VALUE-SETQ) MOVETOFILE (PUTDEF MARKASCHANGED DELFROMFILES) \\ALLOCMINIMUMSIZES (SELECTQ -MAPC \\SETWINFOXSIZE) \\STRINGOUT (\\SMALLPOUT DECLARE) UNDOLISPX3 (DECLARE /RPLNODE APPLY LISPXWATCH -LISPXPRIN1 LISPXPUT LISPXREPRINT SI::RESETUNWIND) CL::STEP-FORM (CL::STEP-PRINT-VALUES) -D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL (MAPC) IMIN (ADD1VAR) DSPSPACEFACTOR (\\ILLEGAL.ARG) SHOWDEF - (DECLARE RESETSAVE OUTFILE PRETTYCOM) \\BN.TIMES2 (ERROR RPLACA RPLACD) \\CARET.FLASH.MULTIPLE ( -\\CARET.FLASH.AGAIN) OPENNSOCKET (DECLARE \\FLUSHNSOCQUEUE UNINTERRUPTABLY FREPLACEFIELD SELECTQ ERROR -) SEDIT::SET-SELECTION-COMMENT-WORD (FREPLACEFIELD) FB.DELETECOMMAND (TB.MAP.SELECTED.ITEMS) -\\M-VMEMSAVE (FREPLACEFIELD \\DOCOMPRESSVMEM \\BLT) CLISPATOM2A (CLRPLNODE) \\FM.EDIT-BACKUP ( -RELMOVETO SCROLLW BITBLT DECLARE FREPLACEFIELD) MSINTERPRET (MSOUTPUT MAPRINT MSERASE MSINIT PRINTOUT -PRIN1 CHECKFORCHANGED DECLARE PRIN2 MAPHASH MSCHECKEMPTY TAB FRPLACD UPDATECHANGED RESETSAVE) -XCL::%DELETE-DEFINER (/REMPROP) HVFWDREAD (SELECTQ READC HVREADERR) RECORDERROR (ERROR FIXPRINTIN -LISPXSPACES LISPXPRIN1 MAPRINT LISPXTERPRI LISPXPRIN2 LISPXPRINT DWIMERRORRETURN) \\DOCOMPRESSVMEM ( -\\MOVEVMEMFILEPAGE FREPLACEFIELD) TEDIT.PAGEFORMAT (FREPLACEFIELD \\TEDIT.WINDOW.TITLE \\ILLEGAL.ARG) -TRIM.BITMAP (HELP BITBLT) \\SETTERMSYNTAX (CHECK DECLARE) RECORDECLBLOCK (SELECTQ FRPLACD) -INSPECTW.REPLACE (ERROR EXEC-EVAL) \\FLUSHNSOCQUEUE (\\FLUSH.PACKET.QUEUE FREPLACEFIELD) -\\NSFILING.DISCARD.SESSION (CLOSEF FREPLACEFIELD RELEASE.MONITORLOCK) PPT (DECLARE SI::RESETUNWIND) -UNIX.SENDSCREENPARAMS (ADD.PROCESS) POSTSCRIPT.CLOSESTRING (POSTSCRIPT.OUTSTR FREPLACEFIELD) -DINFO.TITLEMENUFN (DINFO.ADD.FMENU FLASHWINDOW) OPT.JFIXPASS (MAPC) \\SETREADSYNTAX (DECLARE CHECK -\\SETMACROSYNTAX UNINTERRUPTABLY REMHASH \\ILLEGAL.ARG) |\\PFTrimHelper| (HELP |\\VFMDeletePageGroup| -|\\VAMFreePageGroup| FREPLACEFIELD BLOCK) DIRFILENAME (DECLARE) \\BLTSHADE.GENERICPRINTER ( -\\BLTSHADE.BITMAP BITBLT) \\MAIKO.ASSIGNBUFFERS (FREPLACEFIELD) CHAT.TYPEOUT (FREPLACEFIELD BLOCK -\\CHECKCARET PRIN1 PUTSTREAMPROP SPREADAPPLY* \\OUTCHAR \\BOUT SELECTQ CHAT.TYPEOUT.CLOSE DEL.PROCESS) - \\NSFILING.CLOSEFILE (\\GENERIC-UNREGISTER-STREAM \\NSFILING.RELEASE.BULKSTREAM -\\NSRANDOM.RELEASE.HANDLE ERROR \\NSFILING.UPDATE.ATTRIBUTES FILING.CALL) MAKEFILE (DECLARE -UPDATEFILES LISPXPRIN2 LISPXPRIN1 LOADFROM LOADVARS RESETLST MAKEFILE1 APPLY ERROR) \\GETBRUSHBBT ( -\\SETPBTFUNCTION DECLARE) D-ASSEM::GENERATE-HARD-ENTRY (D-ASSEM::GENERATE-OPT-AND-REST D-ASSEM::GENERATE-KEY -) \\COURIER.EXPEDITED.ARGS (COURIER.WRITE) |\\UFSReadPages| (\\UPDATEOF CL:ERROR \\CLEARBYTES -\\CLEARWORDS) MAKEUSERMACROSCOMS (MAPC FRPLACD) \\NSFILING.LOGIN (SPP.CLOSE CL:CERROR PRINTOUT TERPRI -DISMISS \\NSFILING.SET.CONTINUANCE FREPLACEFIELD) \\DSKDISPLAY.BUTTONEVENTFN (GETMOUSESTATE) -\\RTP.ERROR (PRINTCONSTANT) AS.DELETE.PASSWORDS (DECLARE) MSPRGLAMBDA (ADDTO MSBINDVAR SETTEMPLATE -UNMARKASCHANGED PUTHASH MSPRGLAMBDA MSPRGERR MSPRGE) \\MAPCHARTABLE (APPLY*) CLISPBROADSCOPE ( -CLISPBROADSCOPE1 CLRPLNODE) SETCOLORLV.IP (BITBLT APPENDNUMBER.IP APPENDINTEGER.IP SCALE.IP -APPENDSEQUENCEDESCRIPTOR.IP APPENDBYTE.IP \\BOUT APPENDOP.IP ROTATE.IP CONCAT.IP ISET.IP) -FTP.BREAKCONNECTION (MAPC FRPLACD) \\NSFILING.UPDATE.ATTRIBUTES (FRPLACD) /SETTERMTABLE (UNDOSAVE) -\\TRANSMIT.STRATEGY (SETUPTIMER) |\\LFParseFileName| (SELECTQ FRPLACD) CONTROL (FREPLACEFIELD) -COMP.EFFECT (OPT.CCHECK) \\CIRCSHADE.XSCAN.IP (SETCOLOR.IP FILLRECTANGLE.IP) |\\LFSortFiles| (SORT) -SYNTAXP (DECLARE CHECK) OPT.JLENPASS (MAPC OPT.COMPILERERROR) COPYATOM (ALLOCAL MKI.DSET \\PUTBASEBYTE - DECLARE) |\\PFSaveBuffers| (|\\PFPutLogicalVolumePage| |\\VAMBufferSave|) ARCSIN (ERROR) -\\MEDW.GETBOXSCREENPOSITION (GETMOUSESTATE \\CURSORPOSITION PROMPTPRINT \\TRACKWITHBOX CLRPROMPT) -PFI.HANDLE./DECLAREDATATYPE (PFI.MAYBE.NEW.PAGE) SETSYNTAX (\\ILLEGAL.ARG \\SETREADSYNTAX -\\SETTERMSYNTAX) ONFILE (MSNOTICEFILE) CL::STEP-EVAL (CL::STEP-PRINT-VALUES) HVRPTREAD (HVREADEND) -\\BN.QRS (ERROR) \\MEDW.GETSCREENREGION (\\ILLEGAL.ARG GETMOUSESTATE \\CURSORPOSITION -\\GETREGIONTRACKWITHBOX \\GETREGION.PACKPTS \\GETREGION.CHECKOPPT DRAWGRAYBOX SETCORNER DECLARE -\\GETREGION.CHECKBASEPT \\UPDATEXYANDBOX APPLY* ERROR!) PRINENDLINE (TERPRI RPTQ PRIN3) -\\LEAF.GETFILEDATES (FREPLACEFIELD \\BLT RELEASE.PUP \\CLEARBYTES \\LEAF.SETVALIDATION) PRINTARRAY ( -PRIN1 PRIN2 SPACES) TEDIT.SHOWSEL (FREPLACEFIELD \\FIXSEL \\SHOWSEL) PFI.HANDLE.PUTDEF ( -PFI.MAYBE.NEW.PAGE) \\FM.EDIT-SETUPTTBL (ECHOMODE ECHOCONTROL) LOOKUP.NS.SERVER (MAPC) -\\BUILDATWSTRUCTURE (\\SETGROUPMIN RPLACD NCONC1) ASKUSERPRIN1 (PRIN1 LISPXPRIN1) HVREADEND (HVREADERR -) RECORDECLTAIL (SELECTQ RPLACD RPLACA DECLSUBFIELD APPLY SET.RECORD.CREATEINFO SET.RECORD.TYPECHECK -SET.RECORD.DECL SET.RECORD.PRIORITY RECORDERROR SET.RECORD.DEFAULTFIELDS) READARRAY-FROM-LIST (SETA -SETD) \\LEAF.HANDLE.INPUT (FREPLACEFIELD HELP ADD.PROCESS) DSPNEWPAGE (IMAGEOP) -|\\PFEnsureInitialized| (|\\PFGetPhysicalVolumePage| |\\PFInitFileDescriptors| |\\PFInitializeVols| -|\\VAMInit| |\\VFMInit| |\\PFDsplyVolumes|) \\DL.NEWFAULTINIT (\\WRITEMAP \\MP.ERROR \\BLT -\\DL.UNMAPPAGES FREPLACEFIELD |\\DoveIO.InitializeIORegionPtrs| \\CLEARWORDS -\\DL.MARK.PAGES.UNAVAILABLE ERROR \\CHAIN.UP.RPT \\DL.ASSIGNBUFFERS) DELETECONTROL (FREPLACEFIELD) -SUPERPRINT (SUBPRINT/ENDLINE) |\\LFFindNextFile| (|\\LFCheckBang| |\\LFDirectoryScrambled| \\LFDWIN -FRPLACD) TB.UNDOSELECTION (DECLARE TB.RECONSIDERRANGE) DINFO.OPENTEXTSTREAM (TEDIT.KILL CLEARW -RESETSAVE PRINTOUT FREPLACEFIELD) CHAT.EMACS.MOVE (BOUT PRIN3 FORCEOUTPUT) FITP (DECLARE) DMCHAT.CLEAR - (CLEARW DMCHAT.CLEARMODES FREPLACEFIELD) \\SIN-FLOAT (DECLARE) TYPESOF (CL:FLET RSHADOW) -\\VALID.FILING.CONNECTIONP (\\NSFILING.LOGOUT BLOCK) DINFO.READ.GRAPH (|printout| TERPRI FREPLACEFIELD -) \\SEND.ABORT (\\FILLRTPPUP \\PUTBASE PUTPUPSTRING SENDPUP) BESTPUPADDRESS (MAPC BLOCK ERROR -|printout| TERPRI) MSPRGTEMPLATE (BLOCK MSPRGMACRO MSPRGTEMPLATE1) \\SPP.CREATE.STREAM (DECLARE -\\SETACCESS) |\\LFHighestVersions| (FRPLACD) MB.CREATE.THREESTATEBUTTON (DSPXOFFSET DSPYOFFSET DSPFONT - MOVETO PRIN1) TRANSLATE.LOCF (DECLARE ERROR) EDITCHANGELABEL (PROMPTPRINT CLRPROMPT CLEARW -DISPLAYNODE ERASE/GRAPHNODE MEASUREGRAPHNODE) /SETREADTABLE (UNDOSAVE) \\8859PEEKCCODEFN ( -\\BACKFILEPTR) TEDIT.INSERT.OBJECT (TEDIT.DO.BLUEPENDINGDELETE \\SHOWSEL \\INSERTPIECE APPLY* -\\TEDIT.HISTORYADD \\TEDIT.WINDOW.TITLE \\FIXILINES TEDIT.UPDATE.SCREEN \\FIXSEL \\COPYSEL) -\\CIRCSHADE.DISPLAY (FILL.LINE) RECORDECL0 (PUTHASH) NORMSECT (BRESSTEP) ASKUSER$ (ASKUSERSETUP PRIN1) - SEDIT::SET-POINT-COMMENT-WORD (FREPLACEFIELD) SET-PROFILE-INTERACTIVELY (FRPLACD) RECORDECL1 ( -CHECKRECORDNAME FRPLACD RECORDECLTAIL) CL::PROCESS-TYPE (EXPORT) \\ITEMW.CLEARSELECTION ( -\\ITEMW.DESELECTITEM) \\INSPECTW.REDISPLAYPROP (ERROR \\ITEMW.DESELECTITEM DSPFILL EXTENDEXTENT -\\ITEMW.SELECTITEM) SHEDSCAN (GETLINEORIG GETLINEDIFF) PRINTLEAF (|printout| PRINTCONSTANT -PRINTPACKETDATA) UNIX.SETDISPLAYTYPE (ADD.PROCESS FREPLACEFIELD BLOCK DISMISS CL:FORMAT) -TB.CONSIDERRANGE (DECLARE TB.SHOW.SELECTION) DELETELINE (MOVE.BACK.TO DO.DELETE.LINES RENUMBER.LINES -KILLSEGMENT KILL.LINES GO.TO.RELATIVE) CHAT.HOLD (TOTOPW FREPLACEFIELD UNINTERRUPTABLY GETMOUSESTATE -\\BACKGROUND) TERM.ADDCHAR (BITBLT) TIMESPOW10 (\\EXTFTIMES) \\STORENSHOSTNUMBER (\\PUTBASE ERROR) -PFI.HANDLE.PUTPROPS (PFI.MAYBE.NEW.PAGE PFI.ADD.TO.INDEX) DISPLAY/NUMBER/READER/TOTAL (DSPFILL -RESETFORM) BIGNUM.DEFPRINT (NCONC1 .SPACECHECK. MAPC) HVREADCHECKGETFN (\\LISPERROR ERROR!) -|\\VFMDelete| (DECLARE |\\VFMFind| |\\VFMDelete| |\\VFMFreeVPage| |\\VFMInsert|) \\TEDIT.BASICFIND ( -FREPLACEFIELD \\SETUPGETCH) \\SPP.CREATE.STREAMS (FREPLACEFIELD) \\LEAF.ACKED (\\ENQUEUE) -D-ASSEM::STORE-DIGEST-INFO (MAPC) CLOSEATTACHEDWINDOWS (CLOSEW) CLISP\ (RELSTK CLISPTRAN /RPLNODE) -TB.RECONSIDERRANGE (DECLARE TB.SHOW.SELECTION) KEYWORD-TEST (MAP) \\NSRANDOM.STREAM.CHANGED ( -\\NSRANDOM.PROCEEDABLE.ERROR) DRAWBETWEEN (ERROR) ROTATE.IP (APPENDNUMBER.IP) \\SETBSPTIMEOUT ( -WAKE.PROCESS) CREATE.PACKET.EXCHANGE.XIP (FREPLACEFIELD) SUB-FORMAT (DECLARE) -\\UFS.HANDLE.RELATIVEDIRECTORY (DECLARE) COMP.PUSHCALL (COMP.VAL COMP.STJUMP COMP.STTAG COMP.STCONST -COMP.STFN COMP.STCOPY COMP.STPOP) \\SEND.RFC (FREPLACEFIELD \\BLT SENDPUP) PRETTYPRINT2 (SETFILEPTR -RATOM LISPXPRINT ERROR COPYCHARS) MSPRGTEMPLATE1 (MSPRGDWIM MSPRGERR DECLARE FRPTQ) /PUT+1 (UNDOSAVE -FRPLACD SETPROPLIST) SUBPRINT/ENDLINE (SUPERPRINT PRINENDLINE) SCALE2.IP (APPENDNUMBER.IP) \\BN.NZEROS - (FRPLACD) /RAISE (UNDOSAVE) \\BSP.SENDBUFFER (\\SETRTPPORTS \\EP.PUT.AUX UNINTERRUPTABLY -\\BSPINCFILEPTR \\TRANSMIT.STRATEGY \\SETBSPTIMEOUT) \\MEDW.GETSCREENPOSITION (GETMOUSESTATE APPLY*) -SEEFILE (SETFILEPTR |printout| PRIN1 TAB) \\UFS.REGISTER.GFS (DECLARE) |\\LFWriteLeaderPage| ( -|\\PFPutPage|) CLISPATOM1A (DWIMERRORRETURN CLISPATOM2) GETFILEPKGTYPE (FRPLACD) |\\LFFindInfo| ( -\\SETACCESS MAPC) \\CARET.FLASH.AGAIN (SHOULDNT) ECHOCHAR (CHECK \\SETSYNCODE) \\TEDIT.FIND.FIRST.LINE - (FREPLACEFIELD \\SETUPGETCH) \\SEND.EXPEDITED.XIP (SENDXIP SELECTQ AWAIT.EVENT DECLARE RELEASE.XIP) -SEDIT::SET-POINT-COMMENT (FREPLACEFIELD) |\\UFSGetFileInfo| (DECLARE OBTAIN.MONITORLOCK RPLACD -SI::MONITOR-UNWIND) IMPORTEVAL (EVAL) COMP.APPLY* (SELECTQ) TEDIT.MINIMAL.WINDOW.SETUP (\\ILLEGAL.ARG -FREPLACEFIELD DSPRIGHTMARGIN RPLACD DSPOPERATION \\FIXSEL TEDIT.NORMALIZECARET \\SHOWSEL -\\TEDIT.SET.WINDOW.EXTENT \\COPYSEL) \\DSKDISPLAY.DESTROY.WINDOW (CLOSEW) READARRAY (SETA SETD) -COLLECT.CHILD.NODES (FRPLACD) D-ASSEM::REDUCE-UNCERTAINTY (MAPC) COMP.BLOCK (PUTHASH COMP.STBIND -COMP.RETURN-FROM COMP.STTAG) CLISPATOM2 (CL:THROW CLRPLNODE CLISPBROADSCOPE CLISPBROADSCOPE1 -CLISPATOM2A DWIMIFY1? PRIN1 CLISPATOM1A) SHOW.MATCHING.PAREN (SAVE.CURSOR GO.TO.ADDRESSING -TTWAITFORINPUT \\CHECKCARET RESTORE.CURSOR) MBUTTON.SET.FIELD (\\FIXSEL TEDIT.SETSEL TEDIT.DELETE -TEDIT.INSERT) EDITCHANGEFONT (PROMPTPRINT CLRPROMPT CHANGE.NODEFONT.SIZE) \\CIRCSHADE.IP (SETCOLOR.IP -FILLRECTANGLE.IP) RECORDECL (SET.RECORD.ALLOCATIONS) CL:EVAL (DECLARE) REPLACESTKARG (\\ILLEGAL.ARG -PROMPTPRINT) \\UFS.FILEINFOFN (BLOCK \\UFS.UNREGISTER.GFS) CL::STEP-COMMAND (CL::STEP-PRINT -CL::STEP-PRINT-VALUES) D-ASSEM::GATHER-ROOTS (D-ASSEM::REACH-TAGS) MAKESCAN (SHEDSCAN) \\CIRCSHADE.BLT - (BLTSHADE) RAISE (FREPLACEFIELD) \\10MBENCAPSULATE (\\STORENSHOSTNUMBER \\BLT FREPLACEFIELD) -PFI.PRINT.LAMBDA.BODY (CHANGEFONT PRIN2 TERPRI SPACES PRINTDEF) NUMBERPAD.READER.HANDLE.CHAR ( -\\READNUMBER.FLASHAREA DISPLAY/NUMBER/READER/TOTAL) \\COERCE.NS.SOCKET (\\BLT) ECHOCONTROL ( -\\ILLEGAL.ARG) \\EVAL-INVOKE-LAMBDA (DECLARE) \\UFS.NEXTFILEFN (DECLARE FREPLACEFIELD -\\UFS.UNREGISTER.GFS) \\TEDIT.UCASE.SEL (TEDIT.DELETE TEDIT.INSERT TEDIT.SETSEL TEDIT.NORMALIZECARET) -\\LEAF.FIX.BROKEN.SEQUIN (\\SEQUIN.FLUSH.RETRANSMIT SELECTC CLOSEPUPSOCKET \\SEQUIN.FLUSH.CONNECTION -|printout| FRPLACD WINDOWPROP \\PAGED.REVALIDATEFILELST DECLARE AWAIT.EVENT ERROR) |\\VFMMerge1| ( -MESASETQ FREPLACEFIELD |\\VFMSmartBLT| |\\VFMReadNext| |\\VFMMarkBufferDirty|) DINFO.FMW.CLOSEFN ( -DETACHWINDOW FREPLACEFIELD CLOSEW) TWODINSPECT.REPLACE (APPLY* TWODINSPECT.REDISPLAY) COMP.EVALFORM ( -SHOULDNT COMP.STCONST COMP.STTAG COMP.VAL COMP.STJUMP COMP.EFFECT COMP.STFN) ONEDINSPECT.REPLACE ( -APPLY* ONEDINSPECT.REDISPLAY) \\GETTERMSYNTAX (DECLARE CHECK) \\COPYSYNTAX (CHECK \\MOVEBYTES) -|\\UFStoOtherRenameMess| (DECLARE) \\ARBOUT (\\SMALLPOUT DECLARE PRIN2) /RPLACA (UNDOSAVE PRIN1) -DRAWCURVE (IMAGEOP) /RADIX (UNDOSAVE) \\8859OUTCHARFN (DECLARE) \\FTP.GENERATEFILES (SELECTQ -\\FTP.PRINTPLIST .EOC. SELECTC \\RELEASE.FTPCONNECTION \\FTPERROR RESETSAVE \\FTP.ASSURE.CLEANUP) -DSUBLIS (RPLACA RPLACD) \\NSPRINT.MEDIUM.CHECK (\\NSPRINT.UNSUPPORTED) CLOSEPOSTSCRIPTSTREAM ( -POSTSCRIPT.ENDPAGE POSTSCRIPT.PUTCOMMAND) /DSUBST (/RPLACA /DSUBST /RPLACD) /NCONC (/RPLACD) -\\TEST.CHARACTER.LOOKS (SETFILEPTR) DRAWELLIPSE (DECLARE) \\ORIGTERMTABLE (MAPC ECHOCHAR) -|\\PFPutMarkerPage| (ERROR) LISPXTAB (LISPXPUT) BRUSHP (DECLARE) DIRECTORY.PARSE (DECLARE) MSHASHLIST -(MAPTABLE) \\DL.UNMAPPAGES (\\WRITEMAP) SI::ADVICE-PUTDEF (FRPLACD) |\\VFMInsert| (DECLARE |\\VFMFind| - |\\VFMSplit|) SHOWPRINT (PRINTDEF TERPRI PRINT) \\TEDIT.WINDOW.SETUP (\\ILLEGAL.ARG -TEDIT.WINDOW.SETUP WINDOWADDPROP \\TEDIT.WINDOW.TITLE) RESETTERMTABLE (\\COPYSYNTAX FREPLACEFIELD) -\\DL.MARK.PAGES.UNAVAILABLE (FREPLACEFIELD ERROR) /RPLACD (UNDOSAVE PRIN1) D-ASSEM::CONVERT-TO-BINARY -(MAPC) CHAT.SET.EMULATOR (DEL.PROCESS CLEARW FREPLACEFIELD) /SETPROPLIST (UNDOSAVE) CHAT.MENU (DECLARE - FREPLACEFIELD \\CHECKCARET SELECTQ APPLY*) ITEM.WINDOW.SET.STACK.ARG (\\ILLEGAL.ARG PROMPTPRINT -RESETLST TERPRI) \\ITEMW.DESELECTITEM (\\ITEMW.FLIPITEM) CL:IF (DECLARE) \\DSPXPOSITION.PSC ( -\\MOVETO.PSC) COMP.MLLFN (SPACES) HVBAKREAD (FRPLACA FRPTQ HVREADEND SETA SETD ERROR MAPC CONTROL -ECHOMODE ECHOCHAR DELETECONTROL RAISE FRPLACD) DINFO.CREATE.FMENU (WINDOWPROP) MENUBUTTONFN (TOTOPW -DOSELECTEDITEM) PFI.HANDLE.DEFINEQ (PRIN1 PRINT MAPC) \\BSP.FLUSH.SOCKET.QUEUES (\\FLUSH.PACKET.QUEUE -RELEASE.PUP) AS.CREATE.PASSWORDS (DECLARE) MSPRGRECORD (MSPRGTEMPLATE MSPRGE FRPLACD MSPRGLST) -COMP.PUSHNILS (COMP.EXPR COMP.STJUMP COMP.STTAG COMP.STCONST COMP.STFN COMP.STCOPY COMP.STPOP COMP.VAL -) /PUTHASH (UNDOSAVE) \\SPP.CREATE.CON (\\BLT) \\BN.MADD (RPLACA RPLACD) \\FTP.CLOSEFILE ( -FREPLACEFIELD SELECTQ \\BSP.FLUSHINPUT ERROR FTPPUTCODE .EOC. CL:FORMAT \\RELEASE.FTPCONNECTION -CLOSEBSPSTREAM) INTERLISPMODE (PROCESSPROP XCL:SET-DEFAULT-EXEC-TYPE) COMPILE-FILE-SCAN-FIRST (SELECTQ - PRINT) SHOWPRIN2 (PRINTDEF PRIN2) \\TEDIT.MENU.WHENHELDFN (CLRPROMPT) COURIER.READ (FRPLACD) -COMP.GETBASE (COMP.DELFN COMP.DELPUSH COMP.EXPR COMP.STCONST MAPC) COPY-CIRCLE (RPLACA RPLACD) -ICMLARRAY.SETVALUE (WITH-INSPECTOR-ENV TERPRI TWODINSPECT.REPLACE ONEDINSPECT.REPLACE) \\LEAF.TIMEDIN -(CLOSEW) TB.DECONSIDERRANGE (DECLARE TB.SHOW.SELECTION) COMP.MLLVAR (PRIN1) TERM.DELETELINE (BITBLT) -\\BRUSHBITMAP (DECLARE) \\DO.PROGV (DECLARE MAPC CHECK-BINDABLE .CALLAFTERPUSHINGNILS.) SCRATCHCONS ( -FRPLACD) RECURSIVE.COLLECTDESCENDENTS (|NC.GraphNodeIDPutProp|) PRINTERS.WHENSELECTEDFN (DECLARE) -HVFWDCDREAD (TCONC FRPLACA) FILEGETDEF.VARS (SELECTQ) ISET.IP (APPENDINTEGER.IP) \\FLUSHPUPSOCQUEUE ( -\\FLUSH.PACKET.QUEUE FREPLACEFIELD) RESETREADTABLE (CLRHASH REHASH \\COPYSYNTAX) \\NSFILING.INIT ( -\\DEFINEDEVICE) ETHERHOSTNUMBER (ASSURE.PUP.READY) /LISPXPUT (/RPLACA) |\\VFMClearIntervals| (SETA) -RESETUNDO (FRPLACA FRPLACD) \\BN.ICANON (RPLACA RPLACD) READ/NODE (GETMOUSESTATE FLIPNODE) -\\TEDIT.APPLY.STYLES (\\TEDIT.CHECK) /PUTASSOC (/RPLACD) PRINTLINE (|printout| \\SETUPGETCH PRINT) -GENERATOR (FRPLACA FRPLACD RESUME) \\SIMPLIFY.CL.ARGLIST (FRPLACD) \\PUPINIT (PUTD) |\\LFVersions| ( -|\\LFCheckBang| |\\LFDirectoryScrambled| \\LFDWIN) \\UFS.ABORT.DIRECTORY (DECLARE) COMP.MLL (MAPC -PRIN2 SPACES SELECTQ COMP.MLLFN) DREVERSE (DECLARE) ANTILOG (DECLARE ERROR) MAKEFILESCOMS (SELECTQ -PRINT) PFI.PRINT.LAMBDA (PFI.MAYBE.NEW.PAGE PFI.ADD.TO.INDEX PFI.PRINT.LAMBDA.BODY) \\RTP.HANDLE.RFC ( -FREPLACEFIELD SWAPPUPPORTS \\PUTBASE PUTPUPSTRING) CL:LOAD (CL:CLOSE) MSBINDVAR (ADDTO) COMPILER::CHECK-ARG - (CL:CERROR) \\FM.CREATEW (WINDOWPROP) \\TEDITMENU.SELSCREENER (\\COPYSEL TEDIT.PROMPTPRINT) -\\UFS.ABORT.CL-DIRECTORY (DECLARE) \\LEAF.TIMEDOUT (\\SEQUIN.CONTROL SELECTC \\LEAF.NOT.RESPONDING -TERPRI FREPLACEFIELD |printout| \\LEAF.TIMEDOUT.EXCESSIVE) COMPILE-FILE-EXPRESSION (DECLARE CL:EVAL -PRINT) \\LEAF.RECONNECT (DECLARE OBTAIN.MONITORLOCK FREPLACEFIELD SI::MONITOR-UNWIND) RECREDECLARE ( -DECLARE APPLY*) |\\UFSMakeUnixFormatName| (DECLARE) \\PEEKREFILL (FREPLACEFIELD DECLARE \\RESETLINE) -\\DSPYPOSITION.PSC (\\MOVETO.PSC) CREATE-SHELL-STREAM (DECLARE \\SETACCESS FREPLACEFIELD STREAMPROP) -LAYOUTGRAPH (DECLARE INTERPRET/MARK/FORMAT INIT/NODES/FOR/LAYOUT SWITCH/NODE/HEIGHT/WIDTH MAPC -REFLECT/GRAPH/DIAGONALLY REFLECT/GRAPH/VERTICALLY REFLECT/GRAPH/HORIZONTALLY) \\SPP.SKIPBYTES ( -FREPLACEFIELD) COMPILE (DECLARE COMPSET PRINT-COMPILE-HEADER PRINT CLOSEF) \\FILLPOLYGON.IP ( -SETCOLOR.IP MAPC APPENDINTEGER.IP) |\\UFSParseNameString| (DECLARE) \\FTP.MAKEPLIST (FRPLACD) -D-ASSEM::STACK-ANALYZE (D-ASSEM::STACK-ANALYZE-CODE) I.S.OPR (/PUT /REMPROP ERROR LISPXPRINT MAPHASH -/NCONC1 /NCONC MARKASCHANGED) \\UFS.CLEANUP.GFS.TABLE (MAPHASH) \\SUBREAD (DECLARE CHECK FREPLACEFIELD - \\BACKNSCHAR \\PNAMESTRINGPUTCHAR \\INVALID.SYMBOL \\RDCONC FIXDOT CL:ERROR FREERESOURCE SHOULDNT) -READTABLEPROP (FREPLACEFIELD REMHASH PUTHASH \\SETREADSYNTAX) \\INITBIGNUMS (\\SETTYPEMASK) LISTHARD ( -MAPC) \\FM.SETATTACHPOINT (DECLARE LISTPUT) PEEKC (DECLARE) UPPERCASEARRAY (SETCASEARRAY) -\\SETTYPEMASK (FREPLACEFIELD \\MAPMDS) LOWERCASE (RPAQ MAPC) \\INTERPRET-ARGUMENTS (CL:ERROR FRPLACD -CHECK-KEYWORDS) \\DL.ASSIGNBUFFERS (\\CLEARWORDS FREPLACEFIELD) RPLNODE (ERRORX RPLACA) \\MOVETO.PSC ( -POSTSCRIPT.SHOWACCUM) LISPX (DECLARE FRPLACA ERROR! MAPC PRINTHISTORY ERROR ADDSPELL LISPXSTOREVALUE -LISPXPRIN1 SI::RESETUNWIND /PUT /REMPROP /SETATOMVAL LISPXUNREAD LISPX) HPERR (PRIN1 SPACES PRINT) -\\TEDIT.BRAVOFILE? (SETFILEPTR BIN) |\\UFSParse-Directory| (DECLARE) ECHOMODE (FREPLACEFIELD) -\\PERIODICALLY-WHO-LINE-SHOW-ACTIVE (DECLARE \\UPDATE-WHO-LINE-ACTIVE-FLAG) ESCAPE (FREPLACEFIELD) -\\RTP.FILTER (FREPLACEFIELD) BREAKDOWN (BRKDWNINIT BRKDWN1 CONSCOUNT SETA) \\TOP-LEVEL-READ (DECLARE -FREPLACEFIELD FREERESOURCE HASH-STRUCTURE-SMASH) RATOM (DECLARE FREERESOURCE) \\SEND.ACK ( -FREPLACEFIELD \\FILLBSPPUP SENDPUP) \\ALLOCATE.ETHERPACKET (DECLARE \\CLEARWORDS RECLAIM) -PFI.HANDLE.DEFDEFINER (PFI.MAYBE.NEW.PAGE PUT PFI.ADD.TO.INDEX) PARSE-NSADDRESS (DECLARE FREPLACEFIELD -) READC (DECLARE \\BACKNSCHAR) \\FAULTHANDLER (\\PAGEFAULT \\CONTEXTSWITCH) UNSET (SAVESET) -FB.COMMANDSELECTEDFN (CLEARW) ADDCHAR (DECLARE END.DELETE.MODE OVERFLOW? TTINSERTSECTION MAPC -INSERT.NODE ADJUSTLINE MOVE.TO.WHEREVER) \\TEDIT.SMALLER.CARET (TEDIT.CARETLOOKS -\\TEDIT.SHOWCARETLOOKS) \\LEAF.WHENCLOSED (FREPLACEFIELD CLOSEW) \\TRANSFERPAGE (FLIPCURSORBAR \\BLT -\\ACTONVMEMFILE \\WRITEMAP \\CLEARWORDS \\BOXIPLUS) PRINTANDBOX (RELMOVETO TERPRI CL:PRIN1) UNIX-WRITE - (BLOCK) HPRINTSP (HPRINT1) FILEGETDEF.FNS (CL:MULTIPLE-VALUE-SETQ RESETSAVE SETFILEPTR) FILLTRIANGLE -(RPLACA RPLACD) \\CLEARWORDS (.CLEARNWORDS. \\PUTBASE \\BLT) \\PUT.FILING.ATTRIBUTE (ERROR -COURIER.WRITE COURIER.WRITE.SEQUENCE.UNSPECIFIED COURIER.WRITE.SEQUENCE) SETCORNER (DECLARE -\\CURSORPOSITION) SKIPSEPRCODES (DECLARE CHECK \\BACKFILEPTR \\NSIN FREPLACEFIELD) -\\PUT.SESSION.HANDLE (COURIER.WRITE) FILEGETDEF.MACROS (FRPLACD) FILEPKGCOM (/RPLACD /PUTPROP /REMPROP - /PUTASSOC) BREAK1 (RELSTK) TEDIT.PUT.PAGEFRAMES (\\DWOUT \\SMALLPOUT PRIN2) MENUREPAINTFN (MAPC) -ADVISEWDS (DECLARE RELDSPXOFFSET RELDSPYOFFSET DSPXOFFSET DSPYOFFSET PROCESS.EVAL UPDATE/SCROLL/REG) -PLCHAIN (PRINTLINE) CHDIR (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) CIRCLAR-COPYER (RPLACA -RPLACD) \\PUTBASEFIXP (.XUNBOX. \\PUTBASE) SEPRCASE (MAPC) CLISPIF0 (RPLACA RPLACD /RPLNODE DWIMIFY1 -LISPXPRIN1 FRPLACD DWIMIFY2 NCONC CLISPIF2 RPLNODE FRPLACA CLISPTRAN DWIMERRORRETURN) -TEDIT.WINDOW.SETUP (\\ILLEGAL.ARG WINDOWPROP TEDIT.MINIMAL.WINDOW.SETUP) \\RTP.HANDLE.PUP (SELECTC -\\RTP.HANDLE.RFC \\RTP.ACTION \\RTP.SHOW.FAILURE BSP.OTHERFN DECLARE) EXCHANGEPUPS (DISCARDPUPS -SENDPUP AWAIT.EVENT) MAKEEPSFILE (MOVETO) FINDFIELDUSAGE (FRPLACA) \\RATOM/RSTRING-REFILL (DECLARE -APPLY* \\FILLBUFFER) \\TEDIT.PUT.SINGLE.CHARLOOKS (\\SMALLPOUT \\ARBOUT \\ATMOUT DECLARE SETFILEPTR) -ATTACHEDWINDOWREGION (MAPC) SKREAD (DECLARE CHECK \\TOP-LEVEL-READ) \\DSPFONT.PSC ( -POSTSCRIPT.SHOWACCUM \\POSTSCRIPT.CHANGECHARSET \\DSPLINEFEED.PSC \\FIXLINELENGTH.PSC) MSPRGMACRO ( -MSPRGCALL MSPRGE) \\NSFILING.DESERIALIZE1 (RELEASE.MONITORLOCK COPYBYTES OBTAIN.MONITORLOCK -\\NSFILING.RELEASE.BULKSTREAM) DELETETO (SETTAIL? TTBOUT DELETETO1 END.DELETE.MODE DSPBACKUP) -CLISPATOM0 (SELECTQ DECLARE LISTPUT1 SI::RESETUNWIND UNDOSAVE UNDONLSETQ1) SEDIT::LINEARIZE-COMMENT ( -SEDIT::OUTPUT-CONSTANT-STRING SEDIT::LINEARIZE SEDIT::OUTPUT-CR) PEEKCCODE (DECLARE \\NSIN -\\BACKNSCHAR) PRIN1S (MAKEMAPENTRY) |\\PFGetMarkerPage| (ERROR) \\QUEUE.OUTPUT.IOCB (SELECTC -FREPLACEFIELD \\DEVICE.OUTPUT |\\DoveEther.QueueOutput| \\NOMACHINETYPE) PFI.HANDLE.DECLARE (TERPRI -PRIN1 PRINTDEF SPACES PRIN2 PFI.HANDLE.EXPR) |\\UFSPrintTypeMenu| (DECLARE) \\FLUSHPAGE (\\MP.ERROR -\\SET.VMEM.FULL.STATE \\PUTBASE \\TRANSFERPAGE) \\FM.COLLECTNWAYS (MAPC TCONC LISTPUT) |\\VFMInsert1| -(|\\VFMSmartBLT| |\\VFMPutNext| FREPLACEFIELD |\\VFMMarkBufferDirty|) \\TEDIT.PUT.PARALOOKS (\\DWOUT -\\SMALLPOUT DECLARE) |\\UFSGetFileTypeConfirm| (DECLARE PROMPTPRINT |\\UFSPrintTypeMenu|) -\\LEAF.GETFILEINFO (\\LEAF.CLOSEFILE) |\\DFSFreeDiskPages| (DECLARE OBTAIN.MONITORLOCK -SI::MONITOR-UNWIND) ERASE.TO.END.OF.PAGE (ERASE.TO.END.OF.LINE) CL:MAKE-CONCATENATED-STREAM (DECLARE -\\SETACCESS STREAMPROP) CL:READ (FREERESOURCE DECLARE) UTF16BE.PEEKCCODEFN (\\BIN \\BACKFILEPTR) CHAT -(BLOCK REMOVEPROMPTWINDOW) BLTHLINE (DECLARE) ERRORMESS1 (PRINT PRIN1 SPACES TERPRI) -\\SPP.PREPARE.OUTPUT (SPP.FORCEOUTPUT FREPLACEFIELD) CL:READ-PRESERVING-WHITESPACE (FREERESOURCE -DECLARE) DMCHAT.HANDLECHARACTER (\\DTEST CL:FUNCALL TERM.DOWN TERM.ADDCHAR SELCHARQ TERM.ADDLINE -DMCHAT.NEWLINE TERM.DELCHAR TERM.LEFT TERM.ERASE.TO.EOL TERM.HOME DMCHAT.CLEARMODES DMCHAT.CLEAR -DMCHAT.RIGHT TERM.DELETELINE TERM.UP TERM.MODIFY.ATTRIBUTES) LOG (DECLARE ERROR FREPLACEFIELD) -TEDIT.REMOVE.MENUITEM (FREPLACEFIELD) \\COURIER.HANDLE.ERROR (TAB) \\DRAWCIRCLE.GENERIC (DRAWCURVE) -CL:READ-DELIMITED-LIST (FREERESOURCE DECLARE) \\DSPLEFTMARGIN.PSC (FREPLACEFIELD \\FIXLINELENGTH.PSC) -COMP.MAP (COMP.PROGLST COMP.STBIND COMP.EFFECT COMP.VAL OPT.CCHECK COMP.STJUMP COMP.STTAG COMP.STCOPY -COMP.EXPR SHOULDNT COMP.STPOP) SHRKFY2 (SHRKFY) COMP.PROGN (COMP.EFFECT COMP.DELPOP) READMACROS ( -FREPLACEFIELD) COURIER.EXECUTE.EXPEDITED.CALL (\\COURIER.TRACE RESETSAVE) WHO-LINE-SHOW-ACTIVE ( -DECLARE \\UPDATE-WHO-LINE-ACTIVE-FLAG) PRINDOTP (PRINENDLINE PRIN3) \\RTP.CLEANUP (\\RTP.ACTION -CLOSEPUPSOCKET APPLY* \\BSP.FLUSH.SOCKET.QUEUES) AS.REPLACE.PASSWORDS (DECLARE) MSPRGE (MSPRGERR -MSPRGLAMBDA DECLARE MSPRGCALL) NSMAP (MAPC) MOVEDESCENDENTS (MOVENODE EXTENDEXTENT CALL.MOVENODEFN) -SHRKFY (SELECTQ NCONC DWIMIFY1A) DISCARDPUPS (\\FLUSH.PACKET.QUEUE FREPLACEFIELD) \\FTP.DELETEFILE ( -MAPC CLEAR.LEAF.CACHE \\FTP.PRINTPLIST .EOC. SELECTC \\RELEASE.FTPCONNECTION FTPPUTCODE CLOSEBSPSTREAM - FTPGETCODE \\FTP.FLUSH.TO.MARK) MOVENODE (DISPLAYNODE SET/LAYOUT/POSITION) \\BSP.SKIPBYTES ( -FREPLACEFIELD \\BSP.CLEANUP.INPUT) |\\PFFreeDiskPages| (|\\VAMRecomputeFreePageCount| -|\\PFDsplyVolumes|) SCANBACK (DECLARE ADD1VAR) SKIPSEPRS (DECLARE CHECK \\BACKFILEPTR \\NSIN) CL:APPLY - (DECLARE) CMLRDTBL (SETSYNTAX SETSEPR READTABLEPROP SET-DEFAULT-HASHMACRO-SETTINGS) -INITIALIZECOLOR.IP (APPENDINTEGER.IP APPENDOP.IP APPENDIDENTIFIER.IP FSET.IP) MOVETOUPPERLEFT (MOVETO) - PRIN2S (MAKEMAPENTRY) \\DRAWPOLYGON.GENERIC (DRAWLINE DRAWPOINT) XCL::WHERE-IS-NOTICE ( -CL:UNWIND-PROTECT HASH-FILE:CLOSE-HASH-FILE) CHAT.DID.RESHAPE (DECLARE) SI::PARSE-CL-ARGLIST (MAPC) -SCALE.IP (APPENDNUMBER.IP) COMP.COMPILER-LET (DECLARE) \\CH.FIND.ORG.SERVER (\\CH.LOCATE.SERVERS) +D-ASSEM::CONVERT-TO-BINARY D-ASSEM::COMPUTE-DEBUGGING-INFO) /MOVD (LISPXPRIN1 LISPXPRIN2 /PUTD +MARKASCHANGED ADDSPELL) \SETREADSYNTAX (DECLARE CHECK \SETMACROSYNTAX UNINTERRUPTABLY REMHASH +\ILLEGAL.ARG) EDITGRAPH2 (printout GETMOUSESTATE TRACKNODE) MB.THREESTATE.SHOWSELFN (SELECTQ BITBLT +DRAWLINE) PRINTPARA (DECLARE) \PFFetchString (RPLCHARCODE) \FM.CHECKDESCRIPTION (MAPC LISTPUT) SYNTAXP + (DECLARE CHECK) \QUEUE.INPUT.IOCB (SELECTC \DEVICE.OUTPUT \DoveEther.QueueInput \NOMACHINETYPE) +DSUBLIS (RPLACA RPLACD) PFI.HANDLE.DEFINEQ (PRIN1 PRINT MAPC) \10MB.STARTDRIVER (DECLARE ERROR +\10MB.TURNONETHER) \COPYSYNTAX (CHECK \MOVEBYTES) DSPNEWPAGE (IMAGEOP) SHOWDEF (DECLARE RESETSAVE +OUTFILE PRETTYCOM) CREATE-UNIX-SOCKET-STREAM (FREPLACEFIELD) \READBMDIMENSIONS (PRIN1 TERPRI) +DINFO.SETUP.WINDOW (WINDOWPROP DETACHALLWINDOWS DINFO.ADD.FMENU DINFO.UPDATE.TEXT.DISPLAY) +\MAPCHARTABLE (APPLY*) SEDIT::BACKSPACE-QUOTE (SEDIT::SET-SELECTION-NOWHERE SEDIT::SET-SELECTION-ME +SEDIT::EXTRACT-CURRENT-SELECTION) \VFMFind (\VFMReadNext APPLY) D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL + (MAPC) \VAMRecomputeFreePageCount (DECLARE OBTAIN.MONITORLOCK \PFPutLogicalVolumePage +SI::MONITOR-UNWIND) SEditicide (CLOSEW) PRINT3TO10 (FRESHLINE SELECTC printout PRINTNSHOSTNUMBER) +DWIMIFY0 (LISPXPUT DWIMARKASCHANGED DWIMUNSAVEDEF) BIGNUM.DEFPRINT (NCONC1 .SPACECHECK. MAPC) +\MAIKO.NEWFAULTINIT (\MAIKO.ASSIGNBUFFERS) \UFStoOtherRenameMess (DECLARE) MSCHECKVARS1 (DOERROR MAPC +NECCSPEC) PPT (DECLARE SI::RESETUNWIND) \NSRANDOM.HANDLE.ERROR (TERPRI) FW-CLOSE-CMD (DECLARE CLOSEF? +PROMPTPRINT BLOCK) D-ASSEM::DIGEST-FUNCTION (MAPC MAP D-ASSEM::DIGEST-CODE) COMPILER::TEST-META-EVAL ( +COMPILER::RELEASE-TREE) \BITMAPFROMTEXTURE (BITMAPBIT) \TEDIT.WINDOW.SETUP (\ILLEGAL.ARG +TEDIT.WINDOW.SETUP WINDOWADDPROP \TEDIT.WINDOW.TITLE) \ATWGROUPSIZE (MAPC) DRAWBETWEEN (ERROR) +\VFMDeletePageGroup (DECLARE OBTAIN.MONITORLOCK \VFMContextSet MESASETQ DiskError LISPERROR \VFMDelete + \VFMInsert SI::MONITOR-UNWIND) ROTATE.IP (APPENDNUMBER.IP) READARRAY (SETA SETD) +READ-UNICODE-MAPPING-FILENAMES (FRPLACD) TYPESOF (CL:FLET RSHADOW) DELFROMCOM (MARKASCHANGED SAVESET +/RPLACD /DREMOVE /RPLACA) /MAPCONC (/RPLACD) FB.UPDATE.COUNTERS (PRIN3 BLTSHADE) \SHAPEW2 (DECLARE +\ILLEGAL.ARG UNINTERRUPTABLY \CLOSEW1 ADVISEWDS SHOWWFRAME DOUSERFNS2) EDITDELETENODE (PROMPTPRINT +PRIN1 FLIPNODE DISPLAYNODE MAPC GRAPHDELETENODE) D-ASSEM::STORE-DIGEST-INFO (MAPC) \BN.NZEROS (FRPLACD +) EDITGRAPH1 (WINDOWPROP DSPOPERATION REDISPLAYGRAPH EDITGRAPH2) PRINTSPP (printout SPACES +PRINTPACKETDATA) SEDIT::COLLECT-UNDO-BLOCK (RPLACD RPLACA) \STRINGOUT (\SMALLPOUT DECLARE) +TEDIT.HARDCOPYFN (RESETLST) \IDLE.PROMPT.WATCHER (DISMISS PROCESS.EVAL) PFI.HANDLE.DEFDEFINER ( +PFI.MAYBE.NEW.PAGE PUT PFI.ADD.TO.INDEX) INSPECTABLEFIELDNAMES (FRPLACD) \M-VMEMSAVE (\DOCOMPRESSVMEM +\BLT) GETCFILE (CLOSEF TERPRI ERROR! PRIN1) PRINENDLINE (TERPRI RPTQ PRIN3) \DOCOMPRESSVMEM ( +\MOVEVMEMFILEPAGE) DMCHAT.CLEAR (CLEARW DMCHAT.CLEARMODES) LISPXUSE1 (ERROR RPLACA) MAKEHARDCOPYSTREAM + (DECLARE STREAMPROP DSPXPOSITION DSPYPOSITION) \SEQUIN.CLEANUP (\SEQUIN.CONTROL) ITEMW.REPAINTFN ( +PRINTATBOX) ADDHASH (NCONC1 PUTHASH) POLYSHADE.SCAN.IP (SCALE.IP CONCATT.IP \POLYSHADE.XSCAN.IP +\POLYSHADE.YSCAN.IP) COMPILER::META-EVAL-MV-PROG1 (COMPILER::MEVAL COMPILER::REMOVE-NESTED-PROGNS) +\TEDIT.APPLY.PARALOOKS (SELECTQ TEDIT.PARALOOKS \SHOWSEL TTY.PROCESS) \FM.RESHAPEFN (\FM.ENDEDIT +\FM.TRANSPOSEHORZ \FM.TRANSPOSEVERT \FM.UPDATEGROUPEXTENT \FM.UNSCROLLWINDOW) PFI.PRINT.LAMBDA.BODY ( +CHANGEFONT PRIN2 TERPRI SPACES PRINTDEF) PRINTARRAY (PRIN1 PRIN2 SPACES) \LFReadPages ( +\LFExtendFileIfNecessary \UPDATEOF \PFGetPage \CLEARBYTES \CLEARWORDS) \FM.PUSHGROUP (MAPC) DELETELINE + (MOVE.BACK.TO DO.DELETE.LINES RENUMBER.LINES KILLSEGMENT KILL.LINES GO.TO.RELATIVE) BITMAPOBJ.SNAPW ( +BITBLT COPYINSERT) SUBPRINT/ENDLINE (SUPERPRINT PRINENDLINE) COMP.USERFN (DECLARE) SHAPEW1 (DECLARE +\ILLEGAL.ARG UNINTERRUPTABLY \CLOSEW1 ADVISEWDS SHOWWFRAME DOUSERFNS2) PRINTERROR (SELECTQ PRIN2 +SPACES TERPRI FRPLACA TAB SHORTLST MAPC) FITP (DECLARE) SEDIT::PROPAGATE-WIDTH-CHANGE ( +SEDIT::RECOMPUTE-WIDTH) XCL::EXEC-SHRINKFN (ADD.PROCESS TTY.PROCESS) OPT.SCANOPT (OPT.CCHECK OPT.PRDEL + MAPC RPTQ FRPLACA) \UFS.HANDLE.RELATIVEDIRECTORY (DECLARE) SUPERPRINT (SUBPRINT/ENDLINE) PFI.HANDLE.EVAL-WHEN (PFI.MAYBE.NEW.PAGE PRIN1 PRIN2 SPACES PRINT PFI.HANDLE.EXPR PRINTDEF) -CREATE.NUMBERPAD.READER (DSPFONT MOVETOUPPERLEFT MAPC PRIN3 OPENW ADDMENU WINDOWPROP -\\READNUMBER.OUTLINEREGION DISPLAY/NUMBER/READER/TOTAL CLOSEW) DO.CRLF (DSPLINEFEED) FASL::DUMP-DCODE -(CL:MACROLET) POSTSCRIPTFILEP (SETFILEPTR) RPTEND (RPTPUT) \\SPPCONNECTION (\\BLT FREPLACEFIELD -\\SPP.CREATE.WATCHER) \\FM.NUMBER-CHANGESTATE (DECLARE FREPLACEFIELD) RPTPUT (PRIN2 HPRINTSTRING -HPRINT1 HPRINTENDSTR) \\LEAF.IDLE (FREPLACEFIELD) SUPERPRINT/WRAPPER (PRINENDLINE PRINOPEN -FREPLACEFIELD MAKEMAPENTRY DECLARE PRINSHUT) SET-DEFAULT-HASHMACRO-SETTINGS (READTABLEPROP -CL:MAKE-DISPATCH-MACRO-CHARACTER CL:SET-DISPATCH-MACRO-CHARACTER) \\CH.LOCATE.SERVERS ( -\\CH.PRINT.BLURB RESETLST FRPLACD \\CH.UPDATE.CACHE) SCANFORWARD (DECLARE) CL:PARSE-INTEGER (DECLARE -CHECK SELCHARQ CL:ERROR) MSINTERPRETSET (|printout| PRIN1) MSADDTYPE (MSINIT PUTASSOC PUTHASH) -COMPILER::START-COMPILATION (PRINTOUT DECLARE PRIN1 PRIN3 SI::RESETUNWIND FASL:BEGIN-BLOCK) -\\TEDIT.PUT.PARALOOKS.LIST (\\DWOUT \\SMALLPOUT DECLARE \\TEDIT.PUT.SINGLE.PARALOOKS PUTHASH) TTBIN ( -\\CHECKCARET) CLRPLNODE (/RPLNODE FRPLACA FRPLACD) INVERT.BITMAP.B/W (BITBLT) \\LEAF.READPAGES ( -AWAIT.EVENT RELEASE.PUP \\BLT \\LEAF.ERROR HELP \\CLEARBYTES) RECORDINIT (MAPC) POSSIBILITYFN (DECLARE - PRODUCE APPLY*) MAPHASHFILE (SETFILEPTR) UTF16BE.OUTCHARFN (FREPLACEFIELD \\BOUT) CLISPFORVARS ( -RPLACA RPLACD FRPLACA CLISPFORVARS1 CLISPFORERR FRPLACD SHOULDNT /RPLNODE) COMP.SELECTQ (COMP.VAL -COMP.DELPUSH COMP.STPOP COMP.STTAG COMP.STVAR COMP.STCOPY COMP.STCONST COMP.STFN MAP) -TB.DO.ITEM.SELECTION (DECLARE GETMOUSESTATE TB.UNDOSELECTION BLOCK SELECTC TB.SELECTRANGE -TB.DESELECTRANGE TB.SHOW.SELECTION TB.DECONSIDERRANGE TB.CONSIDERRANGE TB.RECONSIDERRANGE) SHOWWFRAME -(BITBLT SHOWWTITLE) PRINSHUT (PRIN3 SHOULDNT FREPLACEFIELD) SPP.CLEARATTENTION (UNINTERRUPTABLY) -BLTVLINE (DECLARE) \\FM.EDIT-SETUP (\\FM.EDIT-SETUPTTBL DECLARE FREPLACEFIELD LISTPUT) -PRIN2-LONG-STRING (DECLARE PRIN1S PRINENDLINE \\OUTCHAR SELCHARQ SHOULDNT CHECK FREPLACEFIELD) -DINFO.CLOSEFN (CLOSEW) TTDELETELINE (MOVE.TO.LINE TTBOUT DO.CRLF SETTAIL? MOVE.BACK.TO) -|ShowIntervals| (|\\VFMContextSet| |printout| DISPLAYWORDS) \\RTP.INFO.HOOK (DECLARE DSPFONT CLEARW -PPSOC) LISPXFIND (ERROR DECLARE MAPC SI::RESETUNWIND) DMCHAT.CLEARMODES (\\DTEST DSPFONT) TTSKREAD ( -SELECTC DECLARE CHECK) OPENPUPSOCKET (\\FLUSHPUPSOCQUEUE DECLARE ERROR UNINTERRUPTABLY FREPLACEFIELD -SELECTQ) \\FTPEVENTFN (SELECTQ FTP.BREAKCONNECTION) TRACKCURSOR (FLIPNODE GETMOUSESTATE MOVENODE -EXTENDEXTENT CALL.MOVENODEFN) READBQUOTECOMMA (DECLARE READCCODE) REMOVEWINDOW (CLOSEW) SHOWWTITLE ( -DSPDESTINATION DSPCLIPPINGREGION MOVETO RESETFORM PRIN3 BITBLT) FIXFIELDORDER (FINDFIELDUSAGE MAPC -FRPLACD SHOULDNT) \\SMASHSTRING (\\BLT DECLARE \\PUTBASEFAT SHOULDNT \\PUTBASETHIN \\MOVEBYTES) -\\DSPRIGHTMARGIN.PSC (FREPLACEFIELD \\FIXLINELENGTH.PSC) CL::INSERT-INCLUDED-SLOT (CL:ERROR) SIN ( -DECLARE) COURIER.EXPEDITED.CALL (FRPLACD) SEDIT::SPLIT-COMMENT (SEDIT::CLOSE-OPEN-NODE SEDIT::SET-POINT -) MOVEBOX (\\PUTBASE \\SOFTCURSORDOWN BLTHLINE BLTVLINE \\SOFTCURSORUPCURRENT) TB.USERDATA ( -FREPLACEFIELD) |\\PFCurrentVol| (ERROR) TTYIN.CLEANUP (WINDOWPROP) \\TEDIT.PUT.CHARLOOKS.LIST (\\DWOUT - \\SMALLPOUT DECLARE \\TEDIT.PUT.SINGLE.CHARLOOKS PUTHASH) \\INTERNAL/SETPASSWORD (DECLARE -OBTAIN.MONITORLOCK FRPLACA |SetBcplString| SETUSERNAME CLRHASH SI::MONITOR-UNWIND MAPC) CLOSEHASHFILE -(SETA) LLSH (.UNBOX. SELECTC \\ILLEGAL.ARG CL::%NOT-NONCOMPLEX-NUMBER-ERROR FRPTQ) TTYIN.FINISH ( -TTCRLF CLEAR.LINE? DECLARE CHECK TTECHO.TO.FILE SETLASTC TTGIVEHELP RETFROM RPLACA) -|\\LFDirectorySearch| (FREPLACEFIELD \\SETFILEPTR |\\LFCheckBang|) CHAT.TYPEOUT.CLOSE (|printout| -PRIN1 FREPLACEFIELD) PRIN2STRING (PRINENDLINE) DMCHAT.STATE (TERM.RESET.DISPLAY.PARMS FREPLACEFIELD -TERM.HOME) \\RSTRING2 (DECLARE CHECK \\BACKNSCHAR \\PNAMESTRINGPUTCHAR SHOULDNT RPLACD FREPLACEFIELD) -\\10MBSENDPACKET (\\MAYBEPRINTPACKET DECLARE \\BLT FREPLACEFIELD \\HANDLE.RAW.PACKET UNINTERRUPTABLY) -PFI.HANDLE.RPAQQ (PFI.MAYBE.NEW.PAGE RPLACD CL:PROGV PFI.ADD.TO.INDEX) SI::CLEAN-UP-CL-ARGLIST ( -FRPLACD) MASTERSCOPEXEC (SELECTQ RETFROM FRPLACA) MSADDRELATION (MSSETUP MSADDMODIFIER) -TEDIT.REDO.REPLACE (\\SHOWSEL \\DELETECH \\FIXDLINES FREPLACEFIELD TEDIT.REDO.INSERTION -\\TEDIT.HISTORYADD) TTYIN (DECLARE SELECTQ TTYIN.SETUP CLEARBUF GO.TO.FREELINE RESTOREMOD ERROR! -FRPLACD POSITION MWNOTE) TTWAITFORINPUT (WAIT.FOR.TTY GETMOUSESTATE DO.MOUSE \\PROTECTED.APPLY -DO.EDIT.PP \\TTYBACKGROUND) \\FM.NUMBER-SETUP (\\FM.EDIT-SETUPTTBL DECLARE FREPLACEFIELD LISTPUT) -\\TEDIT.LARGER.CARET (TEDIT.CARETLOOKS \\TEDIT.SHOWCARETLOOKS) \\LEAF.OPENERRORHANDLER (|printout| -TERPRI) RENUMBER.LINES (ADD1VAR) \\LEAF.OPENFILE (\\LEAF.CLOSEFILE \\LEAF.SETCREATIONDATE -\\LEAF.GETFILEDATES \\LEAF.SETFILETYPE FREPLACEFIELD) \\TEDIT.CHARDELETE (%SET-ARRAY-OFFSET SELECTQ -\\SHOWSEL \\FIXSEL \\TEDIT.DELETE) TTYIN1 (DSPBACKUP FREPLACEFIELD TTYIN1RESTART GO.TO.ADDRESSING -INIT.CURSOR TTPROMPTCHAR WITH-RESOURCES SETFILEPTR FREERESOURCE DECLARE SELECTQ CHECK TTDELETECHAR -TTDELETELINE TTDELETEWORD RETYPE.BUFFER TTCRLF SELCHARQ MOVE.TO.LINE DELETE.TO.END ADDCHAR -SHOW.MATCHING.PAREN BEEP ADDNAKEDCHAR TTADDTAB TTYIN.SHOW.?ALTERNATIVES BREAKLINE TTUNREADBUF -MOVE.FORWARD.TO START.NEW.LINE MOVE.TO.WHEREVER TTBOUT SETTAIL? SAVE.CURSOR GO.TO.FREELINE PRIN1 PRINT - MWNOTE RESTOREMOD USEREXEC RESTOREBUF) \\TEDIT1 (\\TEDIT.COMMAND.LOOP CLOSEW FREPLACEFIELD APPLY*) -SEDIT::PRINT-STRING (DECLARE \\BLTCHAR) \\DRAWELLIPSE.GENERIC (DRAWCURVE MOVETO) |\\LFFindDirHole| ( -\\SETFILEPTR |\\LFCheckBang| UNINTERRUPTABLY) \\DSPLINEFEED.PSC (FREPLACEFIELD) TTYIN1RESTART ( -\\RESETLINE \\SETEOFPTR KILL.LINES) COS (DECLARE) \\RESHAPEATTACHEDWINDOWSAROUNDMAINW (SHAPEW) -CREATEWFROMIMAGE (WINDOWPROP BITBLT) SEDIT::INSERT-COMMENT-CHARS (FREPLACEFIELD RPLACD RPLACA) RSTRING - (DECLARE FREERESOURCE) TEDIT.CURSOROUTFN (CURSOR FREPLACEFIELD) REDISPLAYBITMAP (ERROR) DRAWGRAYBOX ( -\\PUTBASE \\SOFTCURSORDOWN BLTHLINE BLTVLINE \\SOFTCURSORUPCURRENT) \\TEDIT.COMMAND.RESET.SETUP ( -FREPLACEFIELD \\TEDIT.INTERRUPT.SETUP CLOSEF?) ALLCALLS (DECLARE MSINITFNDATA MSPRGLAMBDA MSPRGE -FRPLACD) FILEGETDEF.ALISTS (FRPLACD) FASL::DUMP-INTEGER (FASL::WRITE-OP FASL:DUMP-VALUE) -REPOSITIONATTACHEDWINDOWS (MOVEATTACHEDWINDOWTOPLACE) MBUTTON.SET.NEXT.FIELD (MBUTTON.FIND.NEXT.FIELD -\\FIXSEL \\TEDIT.DELETE TEDIT.\\INSERT) \\TEDIT.SET.WINDOW (FREPLACEFIELD) \\SETMACROSYNTAX ( -\\ILLEGAL.ARG PUTHASH FREPLACEFIELD UNINTERRUPTABLY CHECK) \\TEDIT-OPEN-FONT-FILE (FREPLACEFIELD) -CLOSEPUPSOCKET (\\FLUSHPUPSOCQUEUE FREPLACEFIELD) \\ADJUST.USERNAME (SELECTQ) \\FM.MAKEBITMAP ( -BLTSHADE BITBLT DSPFONT DSPXPOSITION DSPYPOSITION DSPCLIPPINGREGION PRIN1) SEDIT::SCAN-FOR-BOUNDS ( -FREPLACEFIELD) HPRINTEND (SORT SETFILEPTR MAPC) SETTEMPLATE (UNDOSAVE) \\MOVEREALPAGE (CHECK -FREPLACEFIELD \\WRITEMAP \\BLT) \\ENCRYPT.PWD (RPLCHARCODE) COMP.EQ (COMP.VAL COMP.PROGLST -COMP.DELPUSH) DWIMIFY1A (LISPXSPACES) FLIPCURSORBAR (\\PUTBASE) READFROMBUF (BREAKLINE ADDNAKEDCHAR -START.NEW.LINE MOVE.TO.WHEREVER DELETE.LONG.SEGMENT1) SHRIEKER (ATTACH) \\CREATECHARSET.IP (DECLARE -RESETSAVE SETFILEPTR COPYBYTES SELECTQ \\FSETWIDTH \\BINS) SHOWSHADEDITEMS (RESHADEITEM) -ULREDISPLAYBITMAP (ERROR) ICMLARRAY.INDICES (PRINTOUT TERPRI) GETFRAMEVAR.IP (FREPLACEFIELD) CHECKDEFS - (RECORDERROR) TTCRLF (DO.CRLF) RESTOREBUF (END.DELETE.MODE READFROMBUF FRPLNODE -ADJUSTLINE.AND.RESTORE BEEP) GETPUP (UNINTERRUPTABLY LISPERROR AWAIT.EVENT BLOCK \\MAYBEPRINTPACKET -|printout| PRIN1) SYSRECLOOK1 (DECLARE) CL::RESOLVE-SLOTS (CL:ERROR) SENDPUP (FREPLACEFIELD \\RCLK -\\REQUEUE.ETHERPACKET |printout| PRIN1 PRINTPUPROUTE \\SETPUPCHECKSUM \\MAYBEPRINTPACKET -TRANSMIT.ETHERPACKET BLOCK) FILEGETDEF.LISPXMACROS (FRPLACD) EXEC-READ-LINE (READC SHOULDNT) -\\INTERPRESSINIT (DECLARE) POSITION (FREPLACEFIELD) COPYALLBYTES (RESETSAVE SETFILEPTR PFCOPYBYTES -COPYBYTES) SPP.FLUSH.TO.EOF (FREPLACEFIELD SPP.CLEARATTENTION) \\READREFILL (DECLARE APPLY* -\\FILLBUFFER) \\GET.IOCB (DECLARE) GREET (TAB SETUSERNAME MAPC LOAD GREET0 PRIN1) GREET0 (LISPXPRIN1) -READATOM (DECLARE READC) INTERACT&ADD.BORDER.TO.BITMAP (PROMPTPRINT) \\FM.MAKELINKS (RPLACA) -\\TRACKWITHBOX (DECLARE DRAWGRAYBOX GETMOUSESTATE \\CURSORPOSITION APPLY* ERROR!) \\LEAF.WRITEPAGES ( -\\LEAF.SETCREATIONDATE FREPLACEFIELD \\LEAF.LOOKUPCACHE \\BLT \\SENDLEAF) DINFO.EXPANDFN (OPENW TOTOPW -) GENERATEFN (DECLARE FRPLACA FRPLACD RESUME APPLY*) SEDIT::INSERT-COMMENT (SEDIT::DELETE-COMMENT -SEDIT::MAP-COMMENT-INDEX FREPLACEFIELD SEDIT::INSERT-COMMENT-CHARS SEDIT::NOTE-CHANGE) -ICMLARRAY.DOWINDOWCOMFN (SHAPEW APPLY*) RPTPRINT (RPTPUT) ICMLARRAY.DETACHDISPLAY (DETACHWINDOW CLOSEW -) \\CARET.FLASH (UNINTERRUPTABLY) READ-EXTENDED-TOKEN (CHECK DECLARE \\BACKNSCHAR RPLACD -\\PNAMESTRINGPUTCHAR FREERESOURCE) \\APPLYREADMACRO (DECLARE) \\BSP.PREPARE.OUTPUT (DECLARE -OBTAIN.MONITORLOCK MONITOR.AWAIT.EVENT FREPLACEFIELD \\BSP.SENDBUFFER SI::MONITOR-UNWIND) \\ATBLSET ( -DECLARE /DECLAREDATATYPE READTABLEPROP SETSYNTAX SETTOPVAL SET-DEFAULT-HASHMACRO-SETTINGS DEFPRINT -PUTD) CONCATLIST (RPLSTRING) |\\VFMSplit| (DECLARE |\\VFMFind| |\\VFMInsert|) \\READTABLEP.DEFPRINT ( -.SPACECHECK. \\OUTCHAR \\SOUT \\PRINTADDR) \\DRAWLINE.PSC (\\DRAWLINE.PSC MAPC) DCODERD (READC MAP AIN - SETSTKNTOFFSET CODESETA2 DECLARE DPUTCODE) |\\LETtran| (CL:MULTIPLE-VALUE-SETQ) \\SHIFT.DOCUMENT ( -DECLARE IMAGEOBJPROP) OVERFLOW? (START.NEW.LINE ADJUSTLINE GO.TO.RELATIVE) TTYIN.SETUP (RESETSAVE) -DEFC (VIRGINFN PRINT SAVEDEF PUTD PUTPROP) FONTCREATE (DECLARE SELECTQ LISPERROR FREPLACEFIELD ERROR) -DWMFY2 (DWIMIFY1 /RPLNODE LISPXSPACES LISPXPRIN1 LISPXPRINT DWIMIFY1A) MASTERSCOPE1 (|printout| PRIN1 -ERSETQ PROMPTCHAR) MSADDMODIFIER (MSINIT PUTASSOC PUTHASH) \\TEDIT.LCASE.SEL (TEDIT.DELETE -TEDIT.INSERT TEDIT.SETSEL TEDIT.NORMALIZECARET) \\UPDATECHAIN (CHECK FREPLACEFIELD \\MP.ERROR -\\WRITEMAP) \\FM.EDIT-INSERT (RELMOVETO SCROLLW DECLARE FREPLACEFIELD BITBLT DSPDESTINATION PRIN1 -\\CARET.DOWN) TTYIN.READ (BOUTCCODE DECLARE CHECK \\SETFILEPTR \\SETEOFPTR FREPLACEFIELD FRPLACD) -SEDIT::PARENTHESIZE-CURRENT-SELECTION (SEDIT::START-UNDO-BLOCK FRPLACD SEDIT::INSERT SEDIT::SELECT-NODE - SEDIT::SET-POINT SEDIT::END-UNDO-BLOCK CL:FORMAT) DCODESKIP (READC SKREAD SETFILEPTR PRIN4 PRIN3 -TERPRI COPYBYTES) CLBUFS (PRINTBELLS DOBE CLEARBUF) PRIN4 (DECLARE \\PRINDATUM) CHAT.TTYENTRYFN ( -FREPLACEFIELD) PROMPTFORWORD (DECLARE SELCHARQ ECHOCHAR ECHOMODE CONTROL \\ILLEGAL.ARG -\\PROMPTFORWORDRETYPE \\PROMPTFORWORDBS \\PROMPTFORWORDERASE BOUT FRESHLINE MAPC PRIN1 \\CARET.DOWN) -COMP.NUMBERTEST (COMP.STVAR COMP.STJUMP COMP.STCOPY COMP.STPOP COMP.STCONST) \\LET*-RECURSION (DECLARE - CHECK-BINDABLE) |\\PFNewPages| (FREPLACEFIELD |\\PFTrimHelper| |\\VFMInsertPageGroup| BLOCK -|\\PFDsplyVolumes|) \\MAKESPACEFORLOCKEDPAGE (\\MOVEVMEMFILEPAGE) \\ITEM.WINDOW.SELECTION.HANDLER ( -TOTOPW \\ITEMW.DESELECTITEM \\ITEMW.SELECTITEM GETMOUSESTATE APPLY*) \\IMAGEIOINIT (DECLARE) -\\LOGIN.READ (PRIN1 TERPRI) \\DRAWCURVE.PSC (|printout| PRIN1 POSTSCRIPT.PUTCOMMAND POSTSCRIPT.OUTSTR -MAPC \\MOVETO.PSC) \\TFBRAVO.ADD.NAMEDTAB (BIN TEDIT.INSERT.OBJECT) \\TEDIT.COPYTEXTSTREAM.PIECEMAPFN -(TEDIT.PROMPTPRINT RETFROM FREPLACEFIELD) DINFO.READ.KOTO.GRAPH (|printout| TERPRI SELECTQ -FREPLACEFIELD SHOULDNT) \\10MBGETPACKET (FREPLACEFIELD \\MAYBEPRINTPACKET) \\RTP.SOCKET.PROCESS ( -DECLARE OBTAIN.MONITORLOCK RESETSAVE PROCESSPROP SPREADAPPLY*) \\MAIKO.10MBTURNONETHER ( -\\MAIKO.ETHERSUSPEND FREPLACEFIELD \\BLT \\STORENSHOSTNUMBER) BKBUFS (PRINTBELLS DOBE CLEARBUF -BKSYSBUF PRIN1 BKLINBUF) \\MEDW.YOFFSET (UNINTERRUPTABLY |\\SFFixClippingRegion|) -\\TEDIT.ITALIC.SEL.OFF (\\TEDIT.ITALIC.CARET.OFF) \\LEAF.TRUNCATEFILE (FREPLACEFIELD \\SENDLEAF) -FREEATTACHEDWINDOW (DETACHWINDOW RELMOVEW) \\TEDIT.WORDDELETE (\\SETUPGETCH CHECK \\SHOWSEL -FREPLACEFIELD \\FIXSEL) \\NOIMAGE.DSPFONT (\\OUTCHAR FREPLACEFIELD) HPRINT1 (PRIN3 PUTHASH SPACES SETN - HPRINTSTRING FRPTQ DECLARE RESETFORM MAPHASH HPRINTSP MAPC PRINTBITMAP) TTYINWORDRDTBL (SETSEPR -SETBRK SETSYNTAX READTABLEPROP) CHAT.CHOOSE.EMULATOR (ERROR) |\\LFMakeDirHole| (UNINTERRUPTABLY -\\SETFILEPTR \\BOUT FORCEOUTPUT) RINGBELLS (DECLARE PLAYTUNE) SPP.SENDATTENTION (FREPLACEFIELD) -SEDIT::DEGRADE-COMMENT (RPLACA SEDIT::NOTE-CHANGE) SCROLLBITMAP (WYOFFSET WXOFFSET BITBLT) -GC-FILING-DIRECTORY (PRINTOUT PRIN1) READHOTSPOT (UNTILMOUSESTATE GETMOUSESTATE \\BACKGROUND -CURSORPOSITION BLOCK BITBLT) \\UPDATEXYANDBOX (MOVEBOX SETCORNER DRAWGRAYBOX) COMPARENCHARS (DECLARE -\\MAPPNAME.INTERNAL) \\PUPERROR (|printout| PRIN1 PRINTPUP \\BLT FREPLACEFIELD SWAPPUPPORTS) -MSADDANALYZE (MAPC) TEDIT.REDO.MOVE (FREPLACEFIELD \\FIXSEL \\TEDIT.SET.SEL.LOOKS TEDIT.MOVE) COMP.VAL - (OPT.CCHECK) TRAJECTORY.IP (MOVETO.IP) \\FM.EDIT-PREPARETOEDIT (DECLARE FREPLACEFIELD WINDOWPROP -DSPXPOSITION DSPYPOSITION) |\\PFTransferPage| (|SwapIn&Dirty| UNINTERRUPTABLY \\DL.PUTDISKADDRESS -FREPLACEFIELD \\MISCAPPLY* \\CONTEXTSWITCH |DiskError| LISPERROR) \\FTPINIT (FREPLACEFIELD) PREVWORD ( -DECLARE CHECK ADD1VAR) STRINGWIDTH (DECLARE) EDITMOVESUBTREE (|printout| TERPRI FLIPNODE GETMOUSESTATE - NOT.TRACKCURSOR) ADDTEMPLATEWORD (MSINIT) \\FM.CREATEITEM (\\FM.READUSERDATA) |\\VAMGetVAMPageFor| ( -|\\VAMBufferSave| UNINTERRUPTABLY) FSET.IP (APPENDNUMBER.IP) \\FM.EDIT-ITEM (DECLARE FM.CHANGELABEL -GETMOUSESTATE \\TTYBACKGROUND SELECTQ \\FM.EDIT-MOVECARET \\FM.EDIT-DELETE \\CARET.DOWN -\\FM.MENUHANDLER BLOCK FM.SKIPNEXT \\FM.EDIT-BACKUP \\FM.EDIT-WORDDELETE \\FM.EDIT-INSERT) -|\\PFGetVols| (FRPLACD) FONTCLASS (ERROR) TERM.SMOOTHSCROLL (BITBLT) SUPERPRINT/COMMENT (DECLARE -PRINENDLINE TERPRI RELMOVETO PRIN2-LONG-STRING SUPERPRINT/COMMENT2) GETCHATWINDOW (CHAT.CLOSE -DSPSCROLL) BLTMENUIMAGE (SHOWSHADEDITEMS) \\CARET.FLASH? (\\CARET.DOWN SETUPTIMER) COMP.STFIX ( -COMP.DELPUSH) SEDIT::DELETE-COMMENT (FREPLACEFIELD SEDIT::MAP-COMMENT-INDEX) |\\LFMakeLeaderPage| ( -DECLARE FREPLACEFIELD |\\PFReplaceString| |\\PFPutPage|) \\NSGC.COLLECT.DIRECTORIES (RESETSAVE FRPLACD -) SETUPPUP (ASSURE.PUP.READY FREPLACEFIELD) DO-EVENT (DECLARE DSPFONT HISTORY-ADD-TO-SPELLING-LISTS -MAPC) |\\LFFileName| (RPLCHARCODE) TEDIT.FORMAT.HARDCOPY (TEDIT.FORMATBOX) SUPERPRINT/SPACE (DECLARE) -\\MEDW.XOFFSET (UNINTERRUPTABLY FREPLACEFIELD) MBUTTON.NEXT.FIELD.AS.ATOM (MBUTTON.FIND.NEXT.FIELD) -\\TEDIT.ITALIC.CARET.OFF (TEDIT.CARETLOOKS \\TEDIT.SHOWCARETLOOKS) /SETSEPR (UNDOSAVE) -\\LEAF.SETFILEINFO (\\LEAF.CLOSEFILE) RETVALUES (LISPERROR \\SMASHRETURN RELSTK) FAKE-COMPILE-FILE ( -DECLARE RESETLST CL:MULTIPLE-VALUE-SETQ PRINT-COMPILE-HEADER MAPC) HASHFILEPROP (SETA) -UTF8.PEEKCCODEFN (\\BIN \\BACKFILEPTR ERROR) COMP.DELFIX (COMP.DELFN) \\DONEWEPHEMERALPAGE ( -\\INVALIDVP \\MP.ERROR \\UPDATECHAIN FREPLACEFIELD FLIPCURSORBAR \\WRITEMAP \\CLEARWORDS \\BOXIPLUS -\\ASSURE.FPTOVP.PAGE) \\STREAM.FROM.PACKET (CHECK) WHO-LINE-TIME (DECLARE) VOLUMES (|\\LFEntryPoint|) -DWMFY1 (MAPC DWIMIFY1A DWIMIFY1) TEDIT.PARALOOKS (\\TEDIT.CONVERT.TO.FORMATTED FREPLACEFIELD \\SHOWSEL - \\TEDIT.MARK.LINES.DIRTY \\TEDIT.WINDOW.TITLE \\TEDIT.HISTORYADD TEDIT.RESET.EXTEND.PENDING.DELETE -TEDIT.UPDATE.SCREEN \\FIXSEL) CHAT.INIT (WINDOWADDPROP STREAMPROP) PREVLINE (SUB1VAR) -SI::DESCRIBE-INTERNAL (SI::DESCRIBE-NEW-LINE CL:FORMAT) COMP.FIX (COMP.VAL1) MAPDL (APPLY*) -|\\LFMakeDirEntry| (\\SETFILEPTR |\\LFCheckBang| |\\LFDirectoryScrambled| UNINTERRUPTABLY \\LFDWOUT -\\WOUT DECLARE MAPC FREPLACEFIELD FORCEOUTPUT) SUBPRINT/WRAPPERTAIL (PRINENDLINE PRIN3) HISTORYSAVE ( -FRPLACA NCONC ADD1VAR MAPC LISPXWATCH ERROR!) \\FM.EDITSTART-SETUP (DECLARE FREPLACEFIELD) -\\DRAWCIRCLE.PSC (|printout| PRIN1 POSTSCRIPT.OUTSTR MAPC) RETFROM (LISPERROR \\SMASHRETURN) DWIM ( -/PUTD MAPC) COMP.GETBASEBITS (COMP.DELFN COMP.DELPUSH COMP.STCONST) \\ASSURE.FPTOVP.PAGE (\\DONEWPAGE) - \\SELECTREALPAGE (\\MP.ERROR DECLARE \\FLUSHPAGE \\WRITEMAP FREPLACEFIELD ERROR \\UPDATECHAIN RAID) -READHASHMACRO (FRPLACD CL:READ SKIP.HASH.COMMENT) \\DRAWELLIPSE.PSC (|printout| PRIN1 -POSTSCRIPT.PUTCOMMAND POSTSCRIPT.OUTSTR MAPC) READVBAR (READCCODE) SI::FINISH-ADVISING (PUTD -MARKASCHANGED) \\NEWEPHEMERALPAGE (FREPLACEFIELD \\CONTEXTSWITCH) HREAD (HPINITRDTBL) \\GETUFNENTRY ( -DECLARE) ADIEU (NOTE) \\DOFLUSHVM (CHECK FREPLACEFIELD) COMP.FMEMB (COMP.EXPR COMP.VAL1 COMP.DELPUSH) -FLONUM-TO-STRING (CL:MULTIPLE-VALUE-SETQ STRPUT) ENCAPSULATEDOBJ.DISPLAYFN (RELMOVETO MOVETO -|printout| RELDRAWTO) READBQUOTE (DECLARE) POSTSCRIPT.TEDIT (TEDIT.FORMAT.HARDCOPY CLOSEF?) COMP.EXPR -(DECLARE OPT.COMPILERERROR COMP.VAL COMP.STPOP COMP.STRETURN COMP.STJUMP COMP.UNBOX) -MBUTTON.NEXT.FIELD.AS.TEXT (MBUTTON.FIND.NEXT.FIELD) /SETD (UNDOSAVE) INREADMACROP (DECLARE MAPDL -RELSTK) GETCFILE (CLOSEF TERPRI ERROR! PRIN1) SKOR (DECLARE SUB1VAR ADD1VAR) \\READNUMBER.FLASHAREA ( -DISMISS) SKIP.HASH.COMMENT (SELCHARQ SKIP.HASH.COMMENT) GETEXPRESSIONFROMEVENTSPEC (FRPLACD) -DSKDISPLAY (\\DSKDISPLAY.CREATE.WINDOW WINDOWPROP REDISPLAYW \\DSKDISPLAY.DESTROY.WINDOW) -DISPLAYAFTERENTRY (FREPLACEFIELD \\STARTDISPLAY VIDEOCOLOR CURSOR CHANGEBACKGROUNDBORDER) AU-REVOIR ( -NOTE) \\INSPECTW.COMMAND.HANDLER (GETMOUSESTATE) DISPLAYBEFOREEXIT (DSPRESET) COMPILE-FILE? (SELECTQ -CL:FORMAT) ESTIMATE-DIMENSIONALITY (FRPLACD) \\MEDW.BLTCHAR (DECLARE \\CHANGECHARSET.DISPLAY -\\DSPPRINTCR/LF FREPLACEFIELD .WHILE.TOP.DS. \\PUTBASE \\SOFTCURSORDOWN \\INSURETOPWDS \\PILOTBITBLT -\\SOFTCURSORUPCURRENT) \\FLUSHVM (SELECTQ FREPLACEFIELD \\CONTEXTSWITCH ERROR MAPC) SYSOUT (DECLARE -\\USEREVENT \\DEVICEEVENT \\SETTOTALTIME FREPLACEFIELD \\PROCESS.AFTER.EXIT INTERPRET.REM.CM) -COMPAREPRINTN (SELECTQ PRIN1 TERPRI PRIN2) COMPILER::COMPILE-SCAN-DEFINE-FILE-INFO (DECLARE) -\\FM.EDITSTART-SELECTEDFN (\\FM.DISPLAYITEM DECLARE FREPLACEFIELD \\FM.INSUREVISIBLE) \\SHADEBITS ( -GETMOUSESTATE CLEARW MOVETO PRINTOUT BITMAPBIT UPDATE/BM/DISPLAY SHADEGRIDBOX) READNUMBERINBASE ( -SELCHARQ) \\FM.GETBITMAPS (BLTSHADE BITBLT) \\CCLOSURE.DEFPRINT (.SPACECHECK. \\OUTCHAR \\SOUT -\\PRINDATUM \\PRINTADDR) CLISPIFYCROPS1 (SELECTQ) COMP.SPREAD (COMP.EXPR COMP.STJUMP COMP.STTAG MAPC -COMP.EFFECT COMP.VAL) FILLTRAJECTORY.IP (TRAJECTORY.IP APPENDINTEGER.IP) \\PROMPTFORWORDRETYPE ( -DECLARE) \\TEMPLOCKPAGES (FREPLACEFIELD \\CONTEXTSWITCH) EDITADDNODE (DECLARE MEASUREGRAPHNODE -MOVENODE FLIPNODE EXTENDEXTENT CALL.MOVENODEFN |printout| PRINTDISPLAYNODE TRACKCURSOR) RECORDWORD ( -/RPLACA) REMOVEPROMPTWINDOW (WINDOWDELPROP DETACHWINDOW) \\WRITEDIRTYPAGE1 (\\FLUSHPAGE) -\\COURIER.TRACE (TAB SPACES LVLPRIN2) \\PROMPTFORWORDBS (DECLARE \\PROMPTFORWORDERASE -\\PROMPTFORWORDRETYPE PRIN3 BOUT) MODERNWINDOW.BUTTONEVENTFN (GETMOUSESTATE TOTOPW SHAPEW -NEARESTCORNER MOVEW) \\PROMPTFORWORDBIN (DECLARE \\TTYBACKGROUND BLOCK SELECTQ RINGBELLS FLASHWINDOW) -\\ABORT.BULK.DATA (FREPLACEFIELD SPP.SENDATTENTION) SEDIT::CREATE-NEW-COMMENT (FREPLACEFIELD) -\\GETREGIONTRACKWITHBOX (DECLARE DRAWGRAYBOX GETMOUSESTATE \\CURSORPOSITION \\GETREGION.CHECKBASEPT -APPLY* ERROR!) UNIQLIST (MAPC) EDITSHADEREPAINTFN (SHOWBUTTON GRAYBOXAREA RESETGRID.NEW DSPFILL) -\\NSFILING.GETFILE (FREPLACEFIELD \\ILLEGAL.ARG \\NSRANDOM.RELEASE.LOCK DECLARE RELEASE.MONITORLOCK -OBTAIN.MONITORLOCK) ICMLARRAY.DISPLAYSLICE (FRPLACD) \\TEDIT.FILL.IN.CHARLOOKS.MENU (MAPC -MB.NWAYBUTTON.ADDITEM MBUTTON.SET.NEXT.FIELD \\SHOWSEL FREPLACEFIELD \\TEDIT.MARK.LINES.DIRTY) -TEDIT.FLASHCARET (\\CARET.FLASH? \\CARET.FLASH.AGAIN) \\DSPOPERATION.IP (FREPLACEFIELD \\ILLEGAL.ARG) -MAKESYS (DECLARE \\USEREVENT HERALD \\DEVICEEVENT \\PROCESS.AFTER.EXIT PRIN1 INTERPRET.REM.CM) -MBUTTON.NEXT.FIELD.AS.PIECES (MBUTTON.FIND.NEXT.FIELD) \\TEDIT.CONVERT.FOREIGN.FORMAT (RESETLST -FREPLACEFIELD) EDITAPPLYTOLINK (CLEARW CLRPROMPT PRIN1 FLIPNODE ERROR! SPACES) /SETBRK (UNDOSAVE) -NSPRINT (\\NSPRINT.WATCH.JOB CLOSEF?) COURIER.WRITE (SELECTQ PUTWORD DECLARE PUTLONG -COURIER.WRITE.STRING CL:FUNCALL \\COURIER.UNKNOWN.TYPE MAPC COURIER.WRITE.SEQUENCE) TEDIT.INSERT ( -TEDIT.SETSEL TEDIT.DO.BLUEPENDINGDELETE TEDIT.CARETLOOKS TEDIT.NORMALIZECARET \\SHOWSEL DECLARE -SELCHARQ \\INSERTCR \\INSERTCH \\FIXILINES TEDIT.INSERT.UPDATESCREEN) \\DSPMOVELR (SHOULDNT -\\CHECKCARET MOVETO BITBLT DSPXPOSITION) \\MATCHPCS (FREPLACEFIELD) TEDIT.PARSE.PAGEFRAMES ( -FREPLACEFIELD) SI::UNADVISE-FROM-RESTORE-CALLS (SI::FINISH-UNADVISING) COPYTEXTSTREAM (FREPLACEFIELD -\\TEDIT.INSERT.PIECES) CLISPIFYRPLAC (CLISP4) DWMFY0 (DWIMIFY1 DWIMIFY2) |\\VFMGetInterval| (\\BLT -FREPLACEFIELD) UNSAVEFNS (VIRGINFN SAVEDEF SELECTQ DECLARE MARKASCHANGED SI::RESETUNWIND /SETATOMVAL -PRINTOUT PRIN1 UNSAVEDEF LOADDEF) EXPRCHECK (ERROR ADDSPELL) MSPRINTHELPFILE (|printout| PRIN1 -RESETSAVE COPYBYTES) \\FM.CHECKDESCRIPTION (MAPC LISTPUT) MKACCESSFN (RECORDERROR) -\\PROMPTFORWORDERASE (DECLARE MOVETO DSPCLEOL) \\GETBASESTRING (\\MOVEBYTES) \\TEDIT.SHOWCARETLOOKS ( -TEDIT.PROMPTPRINT) DWIMUNSAVEDEF (LISPXPRIN2 LISPXPRIN1 LISPXTERPRI) LISPDIRECTORYP (DECLARE -OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) CL::DEFSTRUCT-PARSE-OPTIONS (CL::ENSURE-CONSISTENT-PS) -CHARWIDTHY (\\ILLEGAL.ARG) COMP.GETD (COMP.VAL1 COMP.STPOP) EXPAND-DEFMACRO (DECLARE -COMPUTE-MACRO-ARGS) CREATE-PROCESS-STREAM (DECLARE \\SETACCESS FREPLACEFIELD) SET-SYMBOL (RPLACA) -CHAT.TYPEIN (DECLARE) COMP.NUMBERCALL (COMP.EXPR FRPTQ COMP.VAL COMP.DELFIX COMP.STCONST COMP.DELPUSH) - COMPUTE-MACRO-ARGS (MAPC ERROR) POLYSHADE.SCAN.IP (SCALE.IP CONCATT.IP \\POLYSHADE.XSCAN.IP -\\POLYSHADE.YSCAN.IP) \\CREATECHARSET (DECLARE \\ILLEGAL.ARG FREPLACEFIELD) DETACHALLWINDOWS ( -REMOVEPROMPTWINDOW DETACHWINDOW) \\FILLCIRCLE.PSC (POSTSCRIPT.PUTCOMMAND BLTSHADE BITBLT -POSTSCRIPT.PUTBITMAPBYTES) BRECOMPILE (DECLARE RESETSAVE FRPLACD SELECTQ RETFROM PRIN1 COMPSET -SETFILEPTR |printout|) \\BLTSHADE.PSC (POSTSCRIPT.PUTCOMMAND BLTSHADE BITBLT POSTSCRIPT.PUTBITMAPBYTES - \\MOVETO.PSC) \\NSFILING.COPY/RENAME (CL:FORMAT RELEASE.MONITORLOCK OBTAIN.MONITORLOCK -\\BULK.DATA.CLOSE \\NSFILING.RELEASE.BULKSTREAM) \\CODEBLOCKP (DECLARE) SEDIT::COPY-STRUCTURE-COMMENT-WORD - (FREPLACEFIELD) DWIMARKASCHANGED (SELECTQ) TEDIT.CURSORMOVEDFN (SELECTQ CURSOR FREPLACEFIELD) -COMP.COMPARENUM (COMP.EXPR COMP.DELFIX COMP.DELPUSH COMP.VAL1 COMP.VAL) OPENRTPSOCKET ( -\\INIT.RTPPROCESS FREPLACEFIELD OBTAIN.MONITORLOCK RESETSAVE ERROR \\RTP.ACTION \\ILLEGAL.ARG -MONITOR.AWAIT.EVENT CLOSERTPSOCKET \\RTP.SHOW.FAILURE) COMPILER::TEST-ALPHA-2 (DECLARE) |\\VFMGet1| ( -\\BLT FREPLACEFIELD) FILL-VECTOR (%MAKE-ARRAY-WRITEABLE) FASL::DUMP-GENERAL-ARRAY (FASL::WRITE-OP -FASL::DUMP-ARRAY-DESCRIPTOR FASL:DUMP-VALUE) MBUTTON.NEXT.FIELD.AS.NUMBER (MBUTTON.FIND.NEXT.FIELD) -\\TFBRAVO.WRITE.RUN (\\TFBRAVO.ADD.NAMEDTAB TEDIT.RAW.INCLUDE TEDIT.LOOKS) CLISPIFYCROPS0 (CLISP4) -/SETA (UNDOSAVE) FREEMENU (\\FM.MAKELINKS \\FM.COLLECTNWAYS FM.RESETMENU) CLISPIFYCROPS (RETEVAL -FRPLACD SHOULDNT) \\FTP.CLEANUP (DECLARE BLOCK MAP.PROCESSES CLOSEBSPSTREAM) ICMLARRAY.ATTACHDISPLAY ( -ATTACHWINDOW MAPC) TERM.SCROLLDOWN (BITBLT) COMPILER::TEST-META-EVAL (COMPILER::RELEASE-TREE) -COMP.STCOPY (OPT.CCHECK) EXPANDMACRO (DECLARE RESETFORM) DINFO.GET.GRAPH.WINDOW (WINDOWPROP -FREPLACEFIELD) COMP.NUMERIC (SELECTQ COMP.EXPR FRPTQ COMP.DELFIX COMP.DELFN COMP.DELPUSH COMP.STFIX) +DECODEBUTTONS (DECLARE) SUBHASH (PUTHASH) FW-CHANGE-POSITION (DECLARE CLRPROMPT printout) Inspecticide + (CLOSEW) MAKEHVPRETTYCOMS (HPINITRDTBL MAPC) SCALE2.IP (APPENDNUMBER.IP) SI::UNBREAK-FROM-RESTORE-CALLS + (SI::FINISH-UNBREAKING) D-ASSEM::GENERATE-HARD-ENTRY (D-ASSEM::GENERATE-OPT-AND-REST D-ASSEM::GENERATE-KEY +) \TEXTDSPFONT (TEDIT.CARETLOOKS MAPC) \MENU.ITEM.SELECT (DECLARE) PRETTYPRINT2 (SETFILEPTR RATOM +LISPXPRINT ERROR COPYCHARS) CHAT.SET.EMULATOR (DEL.PROCESS CLEARW) \FM.REDISPLAYMENU ( +\FM.RESETCLIPPINGREGION \FM.FILLWINDOW) RESETGRID.NEW (BLTSHADE SCALEBM) ECHOCHAR (CHECK \SETSYNCODE) +\LFSetFileInfo (DECLARE OBTAIN.MONITORLOCK \LFUpdateLeaderPage SI::MONITOR-UNWIND) \FM.JUSTIFYGROUPS ( +SELECTQ \FM.PUSHGROUP) D-ASSEM::GATHER-ROOTS (D-ASSEM::REACH-TAGS) GETFILEPKGTYPE (FRPLACD) +COMP.TRYUSERFN (COMPERRM) FB.DELETECOMMAND (TB.MAP.SELECTED.ITEMS) OPT.SETUPOPT (SELECTQ FRPLACA +NCONC1 RPLACA) KEYWORD-TEST (MAP) \COURIER.EXPEDITED.OVERFLOW (printout TERPRI) \TEDIT.FIXSELS ( +\FIXSEL) SEDIT::SHIFT-STRING (\BLT \PUTBASE) MARGINBAR (DRAWMARGINSCALE DSPFONT BITBLT MOVETO PRIN1 +DSPFILL MAPC) \NOTE.3TO10 (RPLACA FREPLACEFIELD) TERM.ADDCHAR (BITBLT) \HDCPYDSPPRINTCHAR (\CHECKCARET + CHECK \HDCPYBLTCHAR \DSPPRINTCR/LF DSPBACKUP) \BN.ICANON (RPLACA RPLACD) \POSITION.MENU.IMAGE ( +GETMOUSESTATE CHECK/MENU/IMAGE MOVEW SHOWSHADEDITEMS) COMPILER::GENERATE-CODE (COMPILER::GENCODE-LAMBDA +) SEDIT::COPY-SELECTION-LITATOM (BKSYSBUF) GETXIP (UNINTERRUPTABLY LISPERROR AWAIT.EVENT +\MAYBEPRINTPACKET printout PRIN1) \10MB.INPUT.INTERRUPT (\DEQUEUE \10MB.NOTESTAT \RCLK \PUTBASE +\TEMPUNLOCKPAGES \ENQUEUE \TEMPLOCKPAGES \QUEUE.INPUT.IOCB SETUPTIMER \10MB.RESTART.ETHER) DREVERSE ( +DECLARE) ECHOCONTROL (\ILLEGAL.ARG) \TEXTMENU.DOC.CREATE (SELECTQ TEDIT.INSERT.OBJECT TEDIT.LOOKS +TEDIT.INSERT \ILLEGAL.ARG FREPLACEFIELD) \DL.NEWFAULTINIT (\WRITEMAP \MP.ERROR \BLT \DL.UNMAPPAGES +\DoveIO.InitializeIORegionPtrs \CLEARWORDS \DL.MARK.PAGES.UNAVAILABLE \CHAIN.UP.RPT \DL.ASSIGNBUFFERS) + MB.THREESTATEBUTTON.FN (APPLY*) DRAWCURVE (IMAGEOP) \FM.OPENFN (\FM.INSUREWINDOW) \LFWritePages ( +\LFUpdateLeaderPage \LFExtendFileIfNecessary \PFPutPage) SEDIT::COMPUTE-SELECTION-POSITION-LITATOM ( +SEDIT::STRING-OFFSET) BRUSHP (DECLARE) NOSUCHATOM (printout PRIN1) COMP.PROGLST (COMPERRM SELECTQ MAPC +) MAPRELATION (DECLARE MAP) %%SORT-VECTOR (%%VECTOR-QUICK-SORT %%VECTOR-INSERTION-SORT +%%SIMPLE-VECTOR-QUICK-SORT %%SIMPLE-VECTOR-INSERTION-SORT) \SEQUIN.RETRANSMITNEXT (SENDPUP +FREPLACEFIELD) TEDIT.GET (FRESHLINE RESETLST WINDOWPROP \FILLWINDOW TEDIT.PROMPTPRINT) PUTMENUPROP ( +LISTPUT) FIXAPPLY1 (SETSTKARG /RPLNODE RELSTK) ADDTOCOM (MARKASCHANGED /RPLACA) /MAPCON (/RPLACD) +\BN.MADD (RPLACA RPLACD) \MENU.ITEM.DESELECT (DECLARE) COMPAREPRINT (PRINT PRIN1 COMPAREPRINT1 TERPRI) + MSCHECKBLOCKBASIC (MAPC FRPLACD) OPT.POSTOPT (MAPC OPT.SETUPOPT OPT.SCANOPT OPT.JUMPOPT OPT.RETOPT +OPT.CCHECK OPT.XVARSCAN BLOCK) MOVE.BACK.TO (GO.TO.RELATIVE) CL:IF (DECLARE) DRAWELLIPSE (DECLARE) +\IDLE.ISMEMBER (PRINTOUT) PFI.HANDLE.DECLARE (TERPRI PRIN1 PRINTDEF SPACES PRIN2 PFI.HANDLE.EXPR) +TEXTMENU.CLOSEFN (FREEATTACHEDWINDOW TEDIT.KILL) POLYSHADE.IP (DECLARE) D-ASSEM::REDUCE-UNCERTAINTY ( +MAPC) TEDIT.DELETELINE (\TEDIT.CLOSEUPLINES) HASHLINKS (FRPLACD) RESETTERMTABLE (\COPYSYNTAX) +\LFOpenFile (DECLARE OBTAIN.MONITORLOCK \LFUpdateLeaderPage SI::MONITOR-UNWIND) SHOWBUTTON (WBOX +CENTERPRINTINREGION) D-ASSEM::STACK-ANALYZE (D-ASSEM::STACK-ANALYZE-CODE) \UFS.REGISTER.GFS (DECLARE) +SEDIT::PARSE--GAP (SEDIT::BUILD-NODE) COMP.UNBIND.VARS (OPT.CCHECK COMP.STUNBIND) \DOFORMATTING ( +FREPLACEFIELD SELECTQ DECLARE \EDITSETA \TEDIT.PURGE.SPACES) ACCESSDEF (/RPLNODE FRPLACA) PRINTATBOX ( +DSPFILL MOVETO) \TEDIT.BASICFIND (\SETUPGETCH) \CH.PRINT.BLURB (TERPRI) +SEDIT::COMPUTE-POINT-POSITION-LITATOM (SEDIT::STRING-OFFSET) \10MB.OUTPUT.INTERRUPT (\DEQUEUE +\REQUEUE.ETHERPACKET \RELEASE.IOCB \TEMPUNLOCKPAGES \10MB.NOTESTAT) TIMEALL (printout PRIN1 DECLARE +COMPILE1) \INITBIGNUMS (\SETTYPEMASK) FB.HEADINGW.RESHAPEFN (CLEARW) \EVAL-INVOKE-LAMBDA (DECLARE) +\UFS.NEXTFILEFN (DECLARE \UFS.UNREGISTER.GFS) \TEDIT.HARDCOPY.MODIFYLOOKS (DRAWLINE) \SETTYPEMASK ( +FREPLACEFIELD \MAPMDS) COMP.EQ (COMP.VAL COMP.PROGLST COMP.DELPUSH) \ORIGTERMTABLE (MAPC ECHOCHAR) +DELFROMCOM1 (SAVESET /RPLACD MARKASCHANGED) CL:EVAL (DECLARE) CHOOZ (MAPC RELSTK) \UFS.FILEINFOFN ( +BLOCK \UFS.UNREGISTER.GFS) \IDLE.AUTHENTICATE (printout) COMPILER::META-SUBST-VAR-REF (COMPILER::RELEASE-TREE +) \INTERPRET-ARGUMENTS (CL:ERROR FRPLACD CHECK-KEYWORDS) \VAMFreePageGroup (DECLARE OBTAIN.MONITORLOCK + WITH-RESOURCE FREERESOURCE \VAMUpdateVAM FREPLACEFIELD SI::MONITOR-UNWIND) COMP.UNBOX (COMP.DELFN +COMP.FLOATUNBOX HELP COMP.DELFIX COMP.STFN) \NS.SETTIME (\PROCESS.RESET.TIMERS) TERM.DELETELINE ( +BITBLT) \FIXLOCALNET (RPLACA) XCL::EXEC-CLOSEFN (ADD.PROCESS TTY.PROCESS) ADDNEWCOM (/ATTACH /RPLACD +MARKASCHANGED) /LISTPUT1 (/RPLACA /RPLACD) \PUP.SETTIME (\PROCESS.RESET.TIMERS) GETCLEARINGHOUSE ( +DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) MSCHECKFNINBLOCK (MAPC) PEEKC (DECLARE) \FM.LAYOUTGRID +(\FM.SETUPPROPS RPLNODE2 \FM.CHECKPROPS \FM.SETFORMATPROPS \FM.UPDATEGRID TCONC LCONC EXTENDREGION +\FM.CHECKDESCRIPTION \FM.UPDATEFORBOX) \NSRANDOM.FETCH.CACHE (UNINTERRUPTABLY RPLACD RPLACA) +D-ASSEM::CONVERT-TO-BINARY (MAPC) TEDIT.MINIMAL.WINDOW.SETUP (\ILLEGAL.ARG DSPRIGHTMARGIN RPLACD +DSPOPERATION \FIXSEL TEDIT.NORMALIZECARET \SHOWSEL \TEDIT.SET.WINDOW.EXTENT \COPYSEL) PEEKCCODE ( +DECLARE) SEDIT::SELECT-NODE-SEGMENT (SEDIT::SELECT-SEGMENT) FINDFN (RELSTK) FW-CHANGE-JUSTIFICATION ( +DECLARE CLRPROMPT printout PRIN1) \PEEKREFILL (DECLARE \RESETLINE) CLISP% (RELSTK CLISPTRAN /RPLNODE) + ISET.IP (APPENDINTEGER.IP) \LOOKUPPORT (SETUPPUP PUTPUPSTRING SELECTC printout PRIN1 FRPLACD +RELEASE.PUP) BRKDWNINIT (SETA) \CHECKEOLC.CRLF (\INCCODE \BACKCCODE) \TEDIT.APPLY.STYLES (\TEDIT.CHECK +) /DSUBST (/RPLACA /DSUBST /RPLACD) \POLYSHADE.YSCAN.IP (SETCOLOR.IP \DrawScanList.YScan.IP) +\PARSE.PORTCONSTANT (DECLARE) \NSIN.24BITENCODING.ERROR (DECLARE ERROR) PROMPTFOREVALED (RESETFORM +CLOSEW) /NCONC (/RPLACD) DIRECTORY.PARSE (DECLARE) COMPILER::PEEPHOLE-OPTIMIZE (DECLARE +COMPILER::FIND-REACHABLE-TAGS) RATOM (DECLARE FREERESOURCE) SENDXIP (AWAIT.EVENT \RCLK printout +PRINTXIPROUTE \REQUEUE.ETHERPACKET \SETXIPCHECKSUM \MAYBEPRINTPACKET TRANSMIT.ETHERPACKET) +FORWARD.DELETE.TO (ERASE.TO.END.OF.LINE TTDELSECTION KILLSEGMENT ADJUSTLINE.AND.RESTORE) +\DL.ASSIGNBUFFERS (\CLEARWORDS) LATTICE/BREAK/CYCLES (RPLACA LATTICE/BREAK/CYCLES) \10MBWATCHER ( +PROMPTPRINT UNINTERRUPTABLY \HANDLE.RAW.PACKET BLOCK) \BLTSHADE.GENERICPRINTER (\BLTSHADE.BITMAP +BITBLT) \SUBREAD (DECLARE CHECK \PNAMESTRINGPUTCHAR \INVALID.SYMBOL \RDCONC \BACKCCODE FIXDOT CL:ERROR + SELECTQ FREERESOURCE SHOULDNT) RESETREADTABLE (CLRHASH REHASH \COPYSYNTAX) INTERPRET/MARK/FORMAT ( +DECLARE) /RPLACD (UNDOSAVE PRIN1) CONVERT.FILE.TO.TYPE.FOR.PRINTER (APPLY* RESETSAVE) \ARBOUT ( +\SMALLPOUT DECLARE PRIN2) \CLEARWORDS (.CLEARNWORDS. \PUTBASE \BLT) MSCHECKBOUNDFREE (CLRHASH NECCSPEC + SELECTQ UNECCSPEC) GRAPHDELETENODE (APPLY*) /LISTPUT (/RPLACA /RPLACD /RPLNODE) UPPERCASEARRAY ( +SETCASEARRAY) POSTSCRIPT.PUTBITMAPBYTES (DECLARE BOUT \MOVEBYTES) \DL.UNMAPPAGES (\WRITEMAP) +\RATOM/RSTRING-REFILL (DECLARE APPLY* \FILLBUFFER) ONEDINSPECT.SCROLLFN (APPLY* SCROLLBYREPAINTFN) +SMASH.THE.DAMNED.CONST.IN.ATTACHWINDOW (ATTACHWINDOW RPLACD) /RPLACA (UNDOSAVE PRIN1) PFI.HANDLE.RPAQQ + (PFI.MAYBE.NEW.PAGE RPLACD CL:PROGV PFI.ADD.TO.INDEX) DETACHWINDOW (WINDOWDELPROP UNMAKEMAINWINDOW +SELECTQ) COMP.UBFLOAT2 (COMP.VAL COMP.FLOATUNBOX FRPTQ COMP.FLOATBOX) SHOWPRIN2 (PRINTDEF PRIN2) +HARDCOPYGRAPH (DSPLEFTMARGIN DSPBOTTOMMARGIN DSPTOPMARGIN DSPRIGHTMARGIN MAPC) \TEDIT.FIND.FIRST.LINE +(\SETUPGETCH) \PS.BOUTFIXP (DECLARE \PUTBASEBYTE) /SETPROPLIST (UNDOSAVE) /PUTHASH (UNDOSAVE) +\TOP-LEVEL-READ (DECLARE FREERESOURCE HASH-STRUCTURE-SMASH) FB.DELETE.FILE (TB.DELETE.ITEM +FREPLACEFIELD) SEDIT::CLOSE-NODE-LITATOM (SEDIT::UNDO-BY SEDIT::RELEASE-OPEN-STRING SEDIT::SUBNODE-CHANGED + SEDIT::NOTE-CHANGE-IN-SIMPLE) READC (DECLARE) \LFGenerateFiles (DECLARE OBTAIN.MONITORLOCK FRPLACD +\LFSortFiles \LFFindInfo SI::MONITOR-UNWIND) \DO.PROGV (DECLARE MAPC CHECK-BINDABLE +.CALLAFTERPUSHINGNILS.) \READCREFILL (DECLARE APPLY* \FILLBUFFER) COMP.BIND.VARS (MAPC COMP.EXPR +COMP.VAL COMP.DELPUSH COMPERROR) \CREATEW1 (ERROR OPENW) FIND.MATCHING.QUOTE (SELECTC DECLARE CHECK) +FILLRECTANGLE.IP (APPENDINTEGER.IP) \UFS.ABORT.DIRECTORY (DECLARE) READCCODE (DECLARE) GET-RIGHTW ( +DSPFONT) SEDIT::PARSE (CL:FUNCALL) EDITBMRESHAPEFN (EDITBMREPAINTFN) MOVETOP (FRPLACD FRPLACA) +SHOWSTACKBLOCKS (SELECTC SHOWSTACKBLOCK1 PRIN2 PRIN1 PRINTNUM TERPRI READC) MENUDESELECT (SHADEITEM) +SUBFIELDCREATE (FRPLACD) \UFS.ABORT.CL-DIRECTORY (DECLARE) PURGEHISTORY (DECLARE SELECTQ TERPRI HELP +PURGEHISTORY1 MAPC SI::RESETUNWIND) READTABLEPROP (REMHASH PUTHASH \SETREADSYNTAX) LISPXTAB (LISPXPUT) + \10MB.PRINT.ENCAPSULATION (FRESHLINE printout PRINTNSHOSTNUMBER TERPRI) \TEXTOPENF ( +\TEXTOPENF-SUBTREE) GENERATOR (FRPLACA FRPLACD RESUME) POSTSCRIPT.SHOWACCUM (POSTSCRIPT.OUTSTR +\BOUTEOL) SKIPSEPRCODES (DECLARE CHECK \INCCODE) \TEDIT.MENU.WHENHELDFN (CLRPROMPT) /PUTASSOC (/RPLACD +) SEDIT::EDIT-SELECTION (SEDIT::SET-SELECTION-NOWHERE SEDIT::SET-POINT-NOWHERE CL:FORMAT) +\UFS.CLEANUP.GFS.TABLE (MAPHASH) MSCHECKBLOCKS (MAPC MSNOTICEFILE UPDATECHANGED TAB FRPLACD) +BMOBJ.GETFN4 (BIN) \FM.LAYOUTCOLUMN (\FM.SETUPPROPS RPLNODE2 \FM.CHECKPROPS \FM.SETFORMATPROPS +\FM.CHECKFORBOX TCONC LCONC EXTENDREGION \FM.CHECKDESCRIPTION \FM.UPDATEFORBOX) UPDATE/SHADE/DISPLAY ( +TILEAREA) SHOWPRINT (PRINTDEF TERPRI PRINT) \FM.LAYOUTROW (\FM.SETUPPROPS RPLNODE2 \FM.CHECKPROPS +\FM.SETFORMATPROPS \FM.CHECKFORBOX TCONC LCONC EXTENDREGION \FM.CHECKDESCRIPTION \FM.UPDATEFORBOX) +XCL::WALK-DECLARATIONS (CL:MULTIPLE-VALUE-SETQ) COMP.CHECK.VAR (COMPERRM) COMP.FLOATUNBOX (COMP.DELFIX + COMP.DELPUSH COMP.STCONST COMP.EXPR) \VFMCreateVPage (DiskError LISPERROR) \SIMPLIFY.CL.ARGLIST ( +FRPLACD) \VAMAllocPageGroup (DECLARE OBTAIN.MONITORLOCK \VAMFindFreePages FREPLACEFIELD WITH-RESOURCE +FREERESOURCE SI::MONITOR-UNWIND) LAYOUTGRAPH (DECLARE INTERPRET/MARK/FORMAT INIT/NODES/FOR/LAYOUT +SWITCH/NODE/HEIGHT/WIDTH MAPC REFLECT/GRAPH/DIAGONALLY REFLECT/GRAPH/VERTICALLY +REFLECT/GRAPH/HORIZONTALLY) INITIALIZECOLOR.IP (APPENDINTEGER.IP APPENDOP.IP APPENDIDENTIFIER.IP +FSET.IP) INSPECT/TOP/LEVEL/LIST (FRPLACD NCONC1 printout TERPRI) FOREST/BREAK/CYCLES (DECLARE RPLACA +FOREST/BREAK/CYCLES) \FAULTHANDLER (\PAGEFAULT \CONTEXTSWITCH) \UFSMakeUnixFormatName (DECLARE) +\SEQUIN.HANDLE.INPUT (RELEASE.PUP SEQUINOP SELECTC \SEQUIN.CONTROL \SEQUIN.HANDLE.ACK UNINTERRUPTABLY +INCLEAFSTAT \SEQUIN.RETRANSMIT \SEQUIN.FLUSH.CONNECTION) SKREAD (DECLARE CHECK \TOP-LEVEL-READ) +ADJUSTOFFSETS (WYOFFSET WXOFFSET) INFILEPAIRS (INFILECOMSVAL) \SEQUIN.RETRANSMIT (BLOCK +UNINTERRUPTABLY) DMCHAT.HANDLECHARACTER (\DTEST CL:FUNCALL TERM.DOWN TERM.ADDCHAR SELCHARQ +TERM.ADDLINE DMCHAT.NEWLINE TERM.DELCHAR TERM.LEFT TERM.ERASE.TO.EOL TERM.HOME DMCHAT.CLEARMODES +DMCHAT.CLEAR DMCHAT.RIGHT TERM.DELETELINE TERM.UP TERM.MODIFY.ATTRIBUTES) \UFSParseNameString (DECLARE +) CL:MAKE-CONCATENATED-STREAM (STREAMPROP) MSDWIMTRAN (MSPRGDWIM) I.S.OPR (/PUT /REMPROP ERROR +LISPXPRINT MAPHASH /NCONC1 /NCONC MARKASCHANGED) \UFSParse-Directory (DECLARE) MSCHECKBLOCK (DECLARE +MAPC SET MSCHECKBLOCKBASIC MSCHECKFNINBLOCK UNECCSPEC MSCHECKBOUNDFREE FRPLACD TERPRI MSMSGPRINT) +MB.CREATE.THREESTATEBUTTON (DSPXOFFSET DSPYOFFSET DSPFONT MOVETO PRIN1) SEDIT::BACKSPACE-LITATOM ( +SEDIT::SET-POINT-LITATOM SEDIT::DELETE-LITATOM) TOTOPW.MODERNIZE (TOTOPW) MAKEHASHLINKS (FRPLACD) +CL:READ (FREERESOURCE DECLARE) \LFEventFn (DECLARE OBTAIN.MONITORLOCK \LFCloseDevice +\PFEnsureInitialized \LFOpenDevice \REMOVEDEVICE \FLUSH.OPEN.STREAMS \PFSaveBuffers SI::MONITOR-UNWIND +) \NSRANDOM.READ.SEGMENT (\NSRANDOM.REESTABLISH \NSRANDOM.HANDLE.ERROR \CLEARBYTES) RESETUNDO (FRPLACA + FRPLACD) \ASSURE.FPTOVP.PAGE (\DONEWPAGE) \INSPECT.STORE.FATCHAR (UNDOSAVE) /LCONC (ERROR) +CL:READ-PRESERVING-WHITESPACE (FREERESOURCE DECLARE) \TEDIT.HARDCOPY.DISPLAYLINE ( +\TEDIT.HARDCOPY.FORMATLINE DECLARE DSPSPACEFACTOR MOVETO DSPFONT STREAMPROP SELECTC +\TEDIT.HARDCOPY.MODIFYLOOKS \OUTCHAR APPLY* \TEDIT.MARK.REVISION) CREATEW1 (PROMPTPRINT HELP ERROR +OPENW) BACKWARD.DELETE.TO (MOVE.BACK.TO) SETCOLOR.IP (SETRGB.IP APPENDINTEGER.IP) CL:READ-DELIMITED-LIST + (FREERESOURCE DECLARE) TWODINSPECT.SCROLLFN (APPLY* SCROLLBYREPAINTFN) LISPX (DECLARE FRPLACA ERROR! +MAPC PRINTHISTORY ERROR ADDSPELL LISPXSTOREVALUE LISPXPRIN1 SI::RESETUNWIND /PUT /REMPROP /SETATOMVAL +LISPXUNREAD LISPX) BMOBJ.GETFN3 (BIN) SHOWSTACKBLOCK1 (PRINTNUM SPACES) CL:PARSE-INTEGER (DECLARE +CHECK SELCHARQ CL:ERROR) SHAPEW.AND.SAVE (WINDOWPROP) MENUSELECT (SHADEITEM) MSPRGDWIM (DECLARE +DWIMIFY0 SI::RESETUNWIND) COMPILER::META-EVAL-CALL (COMPILER::RELEASE-TREE FRPLACD) +\TEDIT.CREATE.LINECACHE (FRPLACD MAP) \UPDATE.PSC (\SETXFORM.PSC \SWITCHFONTS.PSC) PRIN2-LONG-STRING ( +DECLARE PRIN1S PRINENDLINE \OUTCHAR SELCHARQ SHOULDNT CHECK) INFILECOMSMACRO (INFILECOMSVAL) +\FM.FORMATBYGRID (MAPC LCONC EXTENDREGION \FM.PUSHGROUP LISTPUT) SEDIT::BACKSPACE-UNKNOWN (SEDIT::SET-POINT +) COMP.TOPLEVEL.COMPILE (COMPERROR COMP.STTAG COMP.VALN COMP.UNBIND.VARS FRPLACD COMPPRINT RESETFORM) +COMP.LOOKFORDECLARE (SELECTQ MAPC) \DRAWPOLYGON.GENERIC (DRAWLINE DRAWPOINT) CMLRDTBL (SETSYNTAX +SETSEPR READTABLEPROP SET-DEFAULT-HASHMACRO-SETTINGS) \SETNEWTIME0 (\SETDAYTIME0 DECLARE printout +TERPRI) EDIT-IN-FUNCTION (EDITDEF) FINDATOM (RELSTK) DINFO.READ.GRAPH (printout TERPRI) DUMPGRAPH (TAB + HPRINT MAPC) \DRAWCIRCLE.GENERIC (DRAWCURVE) EDIT-IN-FNS (EDITDEF) RIGHTW.REPAINTFN ( +WITH-INSPECTOR-ENV MOVETO PRIN2) EDITBMREPAINTFN (CLEARW BLTSHADE UPDATE/BM/DISPLAY GRID RESETGRID.NEW +) SEDIT::BACKSPACE-GAP (SEDIT::SET-SELECTION-ME) LOWERCASE (RPAQ MAPC) DMCHAT.CLEARMODES (\DTEST +DSPFONT) \LFDirectoryNameP (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) \FM.FORMATEXPLICIT (MAPC +TCONC \FM.CHECKDESCRIPTION LISTPUT) FILEPKGCOM (/SETTOPVAL /RPLACD) CHDIR (DECLARE OBTAIN.MONITORLOCK +SI::MONITOR-UNWIND) /ECHOMODE (UNDOSAVE) CL:APPLY (DECLARE) \COURIER.EXPEDITED.ARGS (COURIER.WRITE) +RSTRING (DECLARE FREERESOURCE) ExtensionForPrintFileType (DECLARE) \FLUSHPAGE (\MP.ERROR +\SET.VMEM.FULL.STATE \PUTBASE \TRANSFERPAGE) LISPXTYPEAHEAD (PRIN1 NLSETQ PRINT) \RSTRING2 (DECLARE +CHECK \BACKCCODE \BIN SELECTQ \PNAMESTRINGPUTCHAR SHOULDNT RPLACD) PRINSHUT (PRIN3 SHOULDNT) +\TRANSFERPAGE (FLIPCURSORBAR \BLT \ACTONVMEMFILE \WRITEMAP \CLEARWORDS \BOXIPLUS) \POLYSHADE.XSCAN.IP +(SETCOLOR.IP \DrawScanList.XScan.IP) \UFSGetFileTypeConfirm (DECLARE PROMPTPRINT \UFSPrintTypeMenu) +ADVISEWDS (DECLARE RELDSPXOFFSET RELDSPYOFFSET DSPXOFFSET DSPYOFFSET PROCESS.EVAL UPDATE/SCROLL/REG) +\PUTBASEFIXP (.XUNBOX. \PUTBASE) READGRAPH (READC MAP SETA FRPLACD) READOCT (DECLARE printout READC) +READ-EXTENDED-TOKEN (CHECK \BACKCCODE RPLACD \PNAMESTRINGPUTCHAR FREERESOURCE DECLARE) +FB.COUNTERW.REDISPLAYFN (CLEARW) \SETMACROSYNTAX (\ILLEGAL.ARG PUTHASH UNINTERRUPTABLY CHECK) +MOUSESTATE-EXPR (SHOULDNT) POSTSCRIPT.CLOSESTRING (POSTSCRIPT.OUTSTR) \SEQUIN.FLUSH.CONNECTION ( +\SEQUIN.FLUSH.RETRANSMIT NOTIFY.EVENT CLOSEPUPSOCKET SEQUINOP DEL.PROCESS) \VFMInsertPageGroup ( +DECLARE OBTAIN.MONITORLOCK \VFMContextSet MESASETQ \VFMDelete \VFMInsert SI::MONITOR-UNWIND) +\SMASHSTRING (\BLT DECLARE \PUTBASEFAT SHOULDNT \PUTBASETHIN \MOVEBYTES) \NSRANDOM.PREPARE.CACHE ( +FRPLACD \NSRANDOM.CHECK.CACHE UNINTERRUPTABLY RPLACD RPTQ) \READTABLEP.DEFPRINT (.SPACECHECK. \OUTCHAR + \SOUT \PRINTADDR) \INSPECT.STORE.CHAR (UNDOSAVE) DELETETO (SETTAIL? TTBOUT DELETETO1 END.DELETE.MODE +DSPBACKUP) \UFSPrintTypeMenu (DECLARE) BRKDWNCLEAR (SUB1VAR BRKDWNSETA) CONCATLIST (RPLSTRING) +COMP.PROGN (COMP.EFFECT COMP.DELPOP) \ATBLSET (DECLARE READTABLEPROP SETSYNTAX SETTOPVAL +SET-DEFAULT-HASHMACRO-SETTINGS DEFPRINT PUTD) PRIN1S (MAKEMAPENTRY) BREAK1 (RELSTK) \TEXTBACKFILEPTR ( +\TEDIT.TEXTBIN.STRINGSETUP \TEDIT.TEXTBIN.FILESETUP ERROR \BACKFILEPTR \PEEKBIN \PAGEDBACKFILEPTR) +PRIN2S (MAKEMAPENTRY) ERASE.TO.END.OF.PAGE (ERASE.TO.END.OF.LINE) MSINIT (FRPLACD) AS.DELETE.PASSWORDS + (DECLARE) Filebrowsericide (CLOSEW) ADDCHAR (DECLARE END.DELETE.MODE OVERFLOW? TTINSERTSECTION MAPC +INSERT.NODE ADJUSTLINE MOVE.TO.WHEREVER) SET-DEFAULT-HASHMACRO-SETTINGS (READTABLEPROP +CL:MAKE-DISPATCH-MACRO-CHARACTER CL:SET-DISPATCH-MACRO-CHARACTER) IFCDECLARE (SELECTQ INFILECOMSVAL +INFILECOM) COMP.COMPILER-LET (DECLARE) \DRAWELLIPSE.GENERIC (DRAWCURVE MOVETO) BRKDWNBOXES (DECLARE +BRKDWNINCA BRKDWNSETA BRKDWNADDTOA SUB1VAR) FB.COMMANDSELECTEDFN (CLEARW) DOUSERFNS2 (DECLARE) DO.CRLF + (DSPLINEFEED) COS (DECLARE) \CLIPANDDRAWLINE1 (\PUTBASE \SOFTCURSORDOWN \INSURETOPWDS DECLARE +\DRAWLINE1 \SOFTCURSORUPCURRENT SELECTQ \DRAWCOLORLINE1 SHOULDNT) TWODINSPECT.ARRANGEWINDOWS (SHAPEW +ATTACHWINDOW) \TEXTPEEKBIN (\PAGEDBACKFILEPTR \SETUPGETCH \TEDIT.TEXTBIN.STRINGSETUP) \MOVEREALPAGE ( +CHECK \WRITEMAP \BLT) \TEXTSETFILEPTR (\SETUPGETCH \BIN \ILLEGAL.ARG) SIN (DECLARE) RETFROM (LISPERROR + \SMASHRETURN) MBUTTON.SET.FIELD (\FIXSEL TEDIT.SETSEL TEDIT.DELETE TEDIT.INSERT) READ/NODE ( +GETMOUSESTATE FLIPNODE) COMP.BOX (COMP.DELFN COMP.STFIX COMP.STFN) FW-CHANGE-ANCHOR (DECLARE CLRPROMPT + printout) \NSFILING.REMOVEQUOTES (FRPLACD) SI::CLEAN-UP-CL-ARGLIST (FRPLACD) PRINTNSHOSTNUMBER (PRIN1 +) \TEDIT.PUT.PARALOOKS (\DWOUT \SMALLPOUT DECLARE) \INSPECT.STORE.32 (UNDOSAVE) \SELECTREALPAGE ( +\MP.ERROR DECLARE \FLUSHPAGE \WRITEMAP \UPDATECHAIN RAID) \10MBENCAPSULATE (\BLT) SUPERPRINT/WRAPPER ( +PRINENDLINE PRINOPEN MAKEMAPENTRY DECLARE PRINSHUT) \UPDATECHAIN (CHECK \MP.ERROR \WRITEMAP) +SEDIT::ATOM-POINT-TYPE (DECLARE) \MAIKO.DISPLAYLINE (DSPDESTINATION DSPCLIPPINGREGION BITBLT +\FORMATLINE MOVETO DECLARE RELMOVETO SELECTC TEDIT.MODIFYLOOKS \DSPPRINTCHAR BLTSHADE APPLY* +\TEDIT.MARK.REVISION SELECTQ) READBQUOTECOMMA (DECLARE READCCODE) PRINDOTP (PRINENDLINE PRIN3) +\FM.FORMATBYCOLUMN (MAPC TCONC LCONC EXTENDREGION LISTPUT) PRINTVA (PRINTNUM) EDITCHANGELABEL ( +PROMPTPRINT CLRPROMPT CLEARW DISPLAYNODE ERASE/GRAPHNODE MEASUREGRAPHNODE) DOUSERFNS (DECLARE) +OVERFLOW? (START.NEW.LINE ADJUSTLINE GO.TO.RELATIVE) TEDIT.WINDOW.SETUP (\ILLEGAL.ARG WINDOWPROP +TEDIT.MINIMAL.WINDOW.SETUP) TEDIT.PUT.PAGEFRAMES (\DWOUT \SMALLPOUT PRIN2) \STORENSHOSTNUMBER ( +\PUTBASE ERROR) ERRORMESS1 (PRINT PRIN1 SPACES TERPRI) \TEDIT.PUT.PARALOOKS.LIST (\DWOUT \SMALLPOUT +DECLARE \TEDIT.PUT.SINGLE.PARALOOKS PUTHASH) STORETABLE (PUTTABLE MAPC) \IDLE.WAIT (AWAIT.EVENT BLOCK) + SHADEGRIDBOX (BLTSHADE BITMAPBIT) FW-MOVE-OFD-WINDOWS (FW-CHANGE-ANCHOR FW-CHANGE-POSITION) +\PFPutRootDirectoryType (\PFPutLogicalVolumePage \PFGetMarkerPage \PFPutMarkerPage) SI::PARSE-CL-ARGLIST + (MAPC) \LFParseFileName (SELECTQ FRPLACD) UNSAVEDEF (SAVEDEF PUTDEF) HISTORYSAVE (FRPLACA NCONC +ADD1VAR MAPC LISPXWATCH ERROR!) MOVETOUPPERLEFT (MOVETO) PRINTLEAF (printout PRINTCONSTANT +PRINTPACKETDATA) IFCPROPSCAN (FRPLACD) /DELETECONTROL (UNDOSAVE) PRIN2STRING (PRINENDLINE) ADDTO ( +SHOULDNT APPLY* FRPLACD) BACKSKREAD (SELECTC DECLARE CHECK) DECLARERECORD (RECORDERROR PUTHASH +LISPXPRINT MAPC /RPLACA MARKASCHANGED RECREDECLARE) \READREFILL (DECLARE APPLY* \FILLBUFFER) +\TEDITMENU.SELSCREENER (\COPYSEL TEDIT.PROMPTPRINT) LISPXFIND (ERROR DECLARE MAPC SI::RESETUNWIND) +\EDITBM/PUTUP/DISPLAY (RESETGRID.NEW) COMP.TRANSFORM (DECLARE) EDITCHANGEFONT (PROMPTPRINT CLRPROMPT +CHANGE.NODEFONT.SIZE) MAKECREATELST1 (HELP FRPLACD) PURGEHISTORY2 (RPLACD MAPC) \INSPECT.STORE.16 ( +UNDOSAVE) COMP.ASET (HELP MAPC COMP.STFN) ONEDINSPECT.ARRANGEWINDOWS (SHAPEW ATTACHWINDOW) FONTCREATE +(DECLARE SELECTQ LISPERROR ERROR) OPENNSOCKET (DECLARE \FLUSHNSOCQUEUE UNINTERRUPTABLY SELECTQ ERROR) +\TEDIT.CHARDELETE (SELECTQ \SHOWSEL \FIXSEL \TEDIT.DELETE) \NSFILING.ADD.TO.CACHE ( +\NSFILING.CLOSE.HANDLE) COMP.AREF (HELP MAPC COMP.STFN) \NSFILING.MAYBE.CREATE (FRPLACD CL:ERROR) +\SEND.EXPEDITED.XIP (SENDXIP SELECTQ AWAIT.EVENT DECLARE RELEASE.XIP) \APPLYREADMACRO (DECLARE) +OPT.INITHASH (DECLARE) \PFEnsureInitialized (\PFGetPhysicalVolumePage \PFInitFileDescriptors +\PFInitializeVols \VAMInit \VFMInit \PFDsplyVolumes) \FM.FORMATBYROW (MAPC TCONC LCONC EXTENDREGION +LISTPUT) TTCRLF (DO.CRLF) \INTERNAL/SETPASSWORD (DECLARE OBTAIN.MONITORLOCK FRPLACA SetBcplString +SETUSERNAME CLRHASH SI::MONITOR-UNWIND MAPC) UNDOLISPX2 (/RPLNODE APPLY /ATTACH) INSPECTW.REPAINTFN ( +WITH-INSPECTOR-ENV PRINTATBOX) LLSH (.UNBOX. SELECTC \ILLEGAL.ARG CL::%%NOT-NONCOMPLEX-NUMBER-ERROR +FRPTQ) \POLYSHADE.DISPLAY (\DrawScanList.Display BRESSTEP) CHAT.CHOOSE.EMULATOR (ERROR) BESTPUPADDRESS + (MAPC BLOCK ERROR printout TERPRI) FILL.INITTBLE (\PUTBASE \SETPBTFUNCTION \INSURETOPWDS DECLARE) +EDITBMSCROLLFN (RESETGRID.NEW BLTSHADE UPDATE/BM/DISPLAY) TTBIN (\CHECKCARET) RAIDROOTFRAME (PRIN1 +TERPRI) SEDIT::INITIALIZE (CHANGENAME SEDIT::CREATE-ENVIRONMENTS SEDIT::INITIALIZE-ATOMIC +SEDIT::INITIALIZE-LISTS SEDIT::INITIALIZE-COMMENTS ECHOMODE CONTROL) GRAPHREGION (MAPC) +\LET*-RECURSION (DECLARE CHECK-BINDABLE) \ALLOCWIDTHTOGROUPEDWINDOW (FRPLACD \SETWINFOYSIZE MAPC) +SHOWWTITLE (DSPDESTINATION DSPCLIPPINGREGION MOVETO RESETFORM PRIN3 BITBLT) \PFPatchRootDirEntries ( +\PFRemoveRootDirEntry) \GETBASESTRING (\MOVEBYTES) \NSRANDOM.STREAM.CHANGED ( +\NSRANDOM.PROCEEDABLE.ERROR) DMCHAT.STATE (TERM.RESET.DISPLAY.PARMS TERM.HOME) OPT.RESOLVEJUMPS (MAPC +OPT.JFIXPASS) TTYIN (DECLARE SELECTQ TTYIN.SETUP CLEARBUF GO.TO.FREELINE RESTOREMOD ERROR! FRPLACD +POSITION MWNOTE) \INSPECT.STORE.8 (UNDOSAVE) /CONTROL (UNDOSAVE) \TEDIT.HARDCOPY.FORMATLINE (DECLARE +\SETUPGETCH \EDITSETA \TEDIT.HCPYLOOKS.UPDATE SELECTQ TEDIT.HARDCOPY.PAGEHEADING +TEDIT.SKIP.SPECIALCOND SELCHARQ \TEDIT.PURGE.SPACES \TEDIT.NSCHAR.RUN FREPLACEFIELD TEDIT.PROMPTPRINT +\DOFORMATTING.HARDCOPY) \INTERACTIVE.CLOSEW (CLOSEW) MAKEINITBFS (\LOCKWORDS \PUTBASE) \ENCRYPT.PWD ( +RPLCHARCODE) TTSKREAD (SELECTC DECLARE CHECK) \FM.FORMAT (\FM.SETUPPROPS RPLNODE2 \FM.CHECKPROPS +\FM.SETFORMATPROPS \FM.CHECKFORBOX \FM.JUSTIFYITEMS \FM.JUSTIFYGROUPS \FM.UPDATEFORBOX) +\TEDIT.PUT.CHARLOOKS.LIST (\DWOUT \SMALLPOUT DECLARE \TEDIT.PUT.SINGLE.CHARLOOKS PUTHASH) +CLOSEPOSTSCRIPTSTREAM (POSTSCRIPT.ENDPAGE POSTSCRIPT.PUTCOMMAND) SEDIT::INSERT-CHANGED (RPLACD) +\TEDIT.TABTYPE.SET (TEDIT.MAPPIECES) TTYIN.READ (BOUTCCODE DECLARE CHECK \SETFILEPTR \SETEOFPTR +FRPLACD) IFCEXPRTYPE (INFILECOMSVAL) \LOGIN.READ (PRIN1 TERPRI) GETCHATWINDOW (CHAT.CLOSE DSPSCROLL) +SEDIT::COPY-SELECTION-DEFAULT (BKSYSBUF) BRV/OFFSET (DECLARE MAPC) EDITBMCLOSEFN (DETACHWINDOW CLOSEW) + \ADJUST.USERNAME (SELECTQ) PRINTADDRS (PRINTVA TERPRI SPACES PRINTNUM TAB DECLARE) HISTORYFIND ( +SELECTQ ERROR HISTORYFIND1 RETFROM) COMP.ATTEMPT.COMPILE (LISPXPRIN1 LISPXPRINT EVAL) TTYIN.CLEANUP ( +WINDOWPROP) \NSFILING.INIT (\DEFINEDEVICE) \TEDIT.PUT.SINGLE.CHARLOOKS (\SMALLPOUT \ARBOUT \ATMOUT +DECLARE SETFILEPTR) FW-REPAINTFN (DECLARE FW-UPDATE-OFD-WINDOW) TTYIN.FINISH (TTCRLF CLEAR.LINE? +DECLARE CHECK TTECHO.TO.FILE SETLASTC TTGIVEHELP RETFROM RPLACA) TTDELETELINE (MOVE.TO.LINE TTBOUT +DO.CRLF SETTAIL? MOVE.BACK.TO) \IMAGEIOINIT (DECLARE) UNDOLISPX (MAPC SOME PRIN1) +\ITEM.WINDOW.COPY.HANDLER (TOTOPW \ITEMW.FLIPCOPY BLOCK DECLARE BKSYSBUF.GENERAL GETMOUSESTATE) +DCODERD (READC MAP AIN SETSTKNTOFFSET DPUTCODE) \8859OUTCHARFN (DECLARE) COMP.BLOCK (COMP.STBIND +COMP.RETURN-FROM COMP.STTAG) \MEDW.BLTCHAR (DECLARE \CHANGECHARSET.DISPLAY \DSPPRINTCR/LF +.WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN \INSURETOPWDS \PILOTBITBLT \SOFTCURSORUPCURRENT) +COMPILER::FIND-REACHABLE-TAGS (COMPILER::FIND-ALL-TAGS) ESPATTERN (MAP) DEFC (VIRGINFN PRINT SAVEDEF +PUTD PUTPROP) \DSPXPOSITION.PSC (\MOVETO.PSC) \MEDW.XOFFSET (UNINTERRUPTABLY) \SEQUIN.CONTROL ( +\CLEARBYTES) TTYIN1 (DSPBACKUP TTYIN1RESTART GO.TO.ADDRESSING INIT.CURSOR TTPROMPTCHAR WITH-RESOURCES +SETFILEPTR FREERESOURCE DECLARE SELECTQ CHECK TTDELETECHAR TTDELETELINE TTDELETEWORD RETYPE.BUFFER +TTCRLF SELCHARQ MOVE.TO.LINE DELETE.TO.END ADDCHAR SHOW.MATCHING.PAREN BEEP ADDNAKEDCHAR TTADDTAB +TTYIN.SHOW.?ALTERNATIVES BREAKLINE TTUNREADBUF MOVE.FORWARD.TO START.NEW.LINE MOVE.TO.WHEREVER TTBOUT +SETTAIL? SAVE.CURSOR GO.TO.FREELINE PRIN1 PRINT MWNOTE RESTOREMOD USEREXEC RESTOREBUF) WTFIX1 (FIXATOM + SHOULDNT FIXAPPLY FIX89TYPEIN /RPLNODE ERSETQ DECLARE CLISPTRAN DWIMIFY1? SI::RESETUNWIND CLISPELL +MARKASCHANGED) \MEDW.YOFFSET (UNINTERRUPTABLY \SFFixClippingRegion) \VFMGetPageGroup (DECLARE +OBTAIN.MONITORLOCK \VFMContextSet MESASETQ SI::MONITOR-UNWIND) DCODESKIP (READC SKREAD SETFILEPTR +PRIN4 PRIN3 TERPRI COPYBYTES) OPT.COMPILERERROR (LISPXPRIN1) TTYIN1RESTART (\RESETLINE \SETEOFPTR +KILL.LINES) \TEDIT.COPYTEXTSTREAM.PIECEMAPFN (TEDIT.PROMPTPRINT RETFROM) \NOIMAGE.DSPFONT (\OUTCHAR) +MAXMENUITEMWIDTH (DECLARE) IFCPROPS (INFILECOMSVAL) PRIN4 (DECLARE \PRINDATUM) \LETtran ( +CL:MULTIPLE-VALUE-SETQ) SEDIT::HANDLE-COMPLETION (SEDIT::THROW-AWAY-CHANGES) \LINEWITHBRUSH (DECLARE +.SETUP.FOR.\BBTCURVEPT. SELECTQ SHOULDNT \INSURETOPWDS APPLY* .WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN +\CURVEPT \SOFTCURSORUPCURRENT) FW-BUTTONEVENTFN (DECLARE GETMOUSESTATE FW-INTERACT FW-MOVE-OFD-WINDOWS + FW-REPAINTFN) \TFBRAVO.READ.PARALOOKS (RPLACA HELP RPLACD) \PUPINIT (PUTD) TB.REMOVE.ITEM (RPLACD +TB.RENUMBER.TAIL FREPLACEFIELD) TTYIN.SETUP (RESETSAVE) FLIPCURSORBAR (\PUTBASE) +\ALLOCHEIGHTTOGROUPEDWINDOW (FRPLACD \SETWINFOXSIZE MAPC) TTWAITFORINPUT (WAIT.FOR.TTY GETMOUSESTATE +DO.MOUSE \PROTECTED.APPLY DO.EDIT.PP \TTYBACKGROUND) \PFFindRootDirEntryNum (ERROR) TRAJECTORY.IP ( +MOVETO.IP) \VFMInsert (DECLARE \VFMFind \VFMSplit) TEDIT.REDO.REPLACE (\SHOWSEL \DELETECH \FIXDLINES +TEDIT.REDO.INSERTION \TEDIT.HISTORYADD) ETHERHOSTNUMBER (ASSURE.PUP.READY) FONTCLASS (ERROR) +\VFMDelete (DECLARE \VFMFind \VFMDelete \VFMFreeVPage \VFMInsert) \NSFILING.CONNECT (SELECTQ) +UNIX.SENDSCREENPARAMS (ADD.PROCESS) PRINTHISTORY1 (TAB APPLY MAPRINT TERPRI MAPC PRIN1 PRINTHISTORY2 +SPACES) PROMPTFORWORD (DECLARE SELCHARQ ECHOCHAR ECHOMODE CONTROL \ILLEGAL.ARG \PROMPTFORWORDRETYPE +\PROMPTFORWORDBS \PROMPTFORWORDERASE BOUT FRESHLINE MAPC PRIN1 \CARET.DOWN) FSET.IP (APPENDNUMBER.IP) +GO.TO.FREELINE (GO.TO.RELATIVE TTCRLF) SHOWWFRAME (BITBLT SHOWWTITLE) GO.TO.ADDRESSING (TTSETCURSOR) +\TEDIT.LCASE.SEL (TEDIT.DELETE TEDIT.INSERT TEDIT.SETSEL TEDIT.NORMALIZECARET) BKBUFS (PRINTBELLS DOBE + CLEARBUF BKSYSBUF PRIN1 BKLINBUF) RAIDSTACKCMD (DECLARE RAIDROOTFRAME PRINTNUM printout PRIN1 +FRESHLINE \BACKTRACE) MSPRGLAMBDA (ADDTO MSBINDVAR SETTEMPLATE UNMARKASCHANGED PUTHASH MSPRGLAMBDA +MSPRGERR MSPRGE) PROVIDE.PROMPTING.WINDOW (RESETSAVE WINDOWPROP RELMOVETO printout PRIN1 SELECTQ +RINGBELLS FLASHWINDOW) ERASEPROPS (TERPRI PRIN1) BROWSE/LAYOUT/LATTICE (DECLARE) CLBUFS (PRINTBELLS +DOBE CLEARBUF) TEXTTOIMAGEFILE (RESETSAVE COPY.TEXT.TO.IMAGE) INREADMACROP (DECLARE MAPDL RELSTK) +\ALLOCATE.ETHERPACKET (DECLARE \CLEARWORDS RECLAIM) GRAPHER/CENTERPRINTINAREA (MOVETO PRIN3) +AS.CREATE.PASSWORDS (DECLARE) MAPDL (APPLY*) BRKDWNCONSES (DECLARE BRKDWNINCA BRKDWNSETA BRKDWNADDTOA +SUB1VAR) \CCLOSURE.DEFPRINT (.SPACECHECK. \OUTCHAR \SOUT \PRINDATUM \PRINTADDR) +\TFBRAVO.READ.CHARLOOKS (HELP SETFILEPTR) HELPSYS (PROMPTPRINT) MOVENODE (DISPLAYNODE +SET/LAYOUT/POSITION) SUPERPRINT/COMMENT (DECLARE PRINENDLINE TERPRI RELMOVETO PRIN2-LONG-STRING +SUPERPRINT/COMMENT2) TEDIT.CURSOROUTFN (CURSOR) RINGBELLS (DECLARE PLAYTUNE) UNIX.SETDISPLAYTYPE ( +ADD.PROCESS BLOCK DISMISS CL:FORMAT) \SPP.SKIPBYTES (FREPLACEFIELD) \DSPYPOSITION.PSC (\MOVETO.PSC) +READVBAR (READCCODE) PFI.DEFAULT.HANDLER (TERPRI PFI.MAYBE.NEW.PAGE PFI.ADD.TO.INDEX) PRINTHISTORY ( +TERPRI MAPC PRIN2 PRIN1) STRINGWIDTH (DECLARE) READHASHMACRO (FRPLACD CL:READ SKIP.HASH.COMMENT) +\TEDITOUTCHARFN (\BOUT) FW-AFTERMOVEFN (DECLARE) HREAD (HPINITRDTBL) TERM.SMOOTHSCROLL (BITBLT) +MSPRGTEMPLATE (BLOCK MSPRGMACRO MSPRGTEMPLATE1) CHAT.INIT (WINDOWADDPROP STREAMPROP) READBQUOTE ( +DECLARE) SEDIT::GET-SELECTED-STRUCTURE (SEDIT::CLOSE-OPEN-NODE) BYTEBLOCKCOMPILE2 (DECLARE +SI::RESETUNWIND FRPLACD FRPLACA) \MAKESPACEFORLOCKEDPAGE (\MOVEVMEMFILEPAGE) \TEDIT.BLTCHAR (DECLARE +\CHANGECHARSET.DISPLAY UNINTERRUPTABLY) SKIP.HASH.COMMENT (SELCHARQ SKIP.HASH.COMMENT) PUTSEQUIN ( +DECLARE OBTAIN.MONITORLOCK HELP MONITOR.AWAIT.EVENT \SEQUIN.PUT SI::MONITOR-UNWIND BLOCK) YMAPLIST ( +MAPC) \SW2BM (UNINTERRUPTABLY) \MOVETO.PSC (POSTSCRIPT.SHOWACCUM) RAIDCOMMAND (DECLARE FRESHLINE +SELECTQ PRINCOPY PRINTCODE PRINTADDRS PRINTNUM printout SETTOPVAL RAIDSTACKCMD RAIDSHOWFRAME READC +\PRINTBF PRINTOUT SHOWSTACKBLOCKS \PRINTFRAME USEREXEC PUTBASE SETVMPTR \BINS SHOWREMOTESCREEN HELP) +SETUPPAGEMAP (\NEWPAGE CREATEPAGES \PUTBASE) CHAT (BLOCK REMOVEPROMPTWINDOW) INSPECT/ARRAY (FRPLACD +printout TERPRI) CL:RETURN-FROM (DECLARE CL:ERROR RETVALUES) DISPLAYAFTERENTRY (\STARTDISPLAY +VIDEOCOLOR CURSOR CHANGEBACKGROUNDBORDER) COMPSETREAD (PRIN1 READC NCONC) ESTIMATE-DIMENSIONALITY ( +FRPLACD) \MAKE.ITEMS.VERT.ORDER (FRPLACD MAPC) DISPLAYBEFOREEXIT (DSPRESET) MAXMENUITEMHEIGHT (MAPC) +READNUMBERINBASE (SELCHARQ) SUPERPRINT/SPACE (DECLARE) MSPRGTEMPLATE1 (MSPRGDWIM MSPRGERR DECLARE +FRPTQ) LISPXUSEC (PRINTHISTORY1 ERROR! SELECTQ ERROR PRINT) SYSOUT (DECLARE \USEREVENT \DEVICEEVENT +\SETTOTALTIME \PROCESS.AFTER.EXIT INTERPRET.REM.CM) CHAT.TYPEIN (DECLARE) TEDIT.MODIFYLOOKS (MOVETO +RELDRAWTO BITBLT) SUBPRINT/WRAPPERTAIL (PRINENDLINE PRIN3) MBUTTON.SET.NEXT.FIELD ( +MBUTTON.FIND.NEXT.FIELD \FIXSEL \TEDIT.DELETE TEDIT.\INSERT) FILL-VECTOR (%%MAKE-ARRAY-WRITEABLE) +\GETUFNENTRY (DECLARE) \NEWEPHEMERALPAGE (\CONTEXTSWITCH) \PFPurgeRootDirectory ( +\PFPutRootDirectoryType \PFTrimHelper) \DONEWEPHEMERALPAGE (\INVALIDVP \MP.ERROR \UPDATECHAIN +FLIPCURSORBAR \WRITEMAP \CLEARWORDS \BOXIPLUS \ASSURE.FPTOVP.PAGE) MAKESYS (DECLARE \USEREVENT HERALD +\DEVICEEVENT \PROCESS.AFTER.EXIT PRIN1 INTERPRET.REM.CM) FORMAT-NEWLINE (TERPRI) CHARACTER.READ ( +DECLARE CHECK) INFILECOM (RETFROM INFILECOMS INFILECOMSMACRO) \TEDIT.FIXCHANGEDLINE (\TEDIT.INSERTLINE + \TEDIT.COPY.LINEDESCRIPTOR \TEDIT.ADJUST.LINES \DISPLAYLINE RETFROM \TEDIT.CLEAR.SCREEN.BELOW.LINE) +GRID (BLTSHADE BLTPATTERN BITMAPBIT \ILLEGAL.ARG) TTYINWORDRDTBL (SETSEPR SETBRK SETSYNTAX +READTABLEPROP) TEDIT.REDO.MOVE (\FIXSEL \TEDIT.SET.SEL.LOOKS TEDIT.MOVE) FILLTRAJECTORY.IP ( +TRAJECTORY.IP APPENDINTEGER.IP) FB.SHAPECOMMAND (RESHAPEALLWINDOWS) DISCARDPUPS (\FLUSH.PACKET.QUEUE) +LOGOUT (\USEREVENT \FLUSHVMOK? \PROCESS.BEFORE.LOGOUT \DEVICEEVENT \SETTOTALTIME \LOGOUT0 +\RESETKEYBOARD \OPENLINEBUF \PROCESS.AFTER.EXIT INTERPRET.REM.CM) \PICK.EVALQT (INPUT OUTPUT +TTYDISPLAYSTREAM \RESETSYSTEMSTATE) CALLSCCODE (DECLARE CL:FUNCALL) RETVALUES (LISPERROR \SMASHRETURN +RELSTK) \VFMClearIntervals (SETA) BREAK.NSFILING.CONNECTION (\NSFILING.CLOSE.CONNECTIONS FRPLACD) +COURIER.READ (FRPLACD) \QUEUE.OUTPUT.IOCB (SELECTC \DEVICE.OUTPUT \DoveEther.QueueOutput +\NOMACHINETYPE) FB.DEPTHCOMMAND (FB.ALLOW.ABORT) \SHOWMENULABEL (DECLARE DSPXPOSITION DSPYPOSITION) +INSPECT/ATOM (PRINTOUT TERPRI) COMPILER::TEST-ANNOTATION (COMPILER::RELEASE-TREE) +SEDIT::FORMAT-VALUES-CHANGED (CL:FUNCALL) LISPXSTOREVALUE (FRPLACA) MAPHASHFILE (SETFILEPTR) +DEFAULT.BACKGROUND.COPYFN (GETMOUSESTATE) \TEMPLOCKPAGES (\CONTEXTSWITCH) TTPROMPTCHAR (CLEAR.LINE?) +ADJUSTLINE.AND.RESTORE (SAVE.CURSOR ADJUSTLINE) EXCHANGEPUPS (DISCARDPUPS SENDPUP AWAIT.EVENT) +RAIDSHOWFRAME (FRPTQ PRIN1 \BACKTRACE) READPAGEMAPBLOCK (FRPTQ) INFILECOMSVALS (INFILECOMSVAL) +PFI.PRETTYPRINT (PRINTDEF) \DSPFONT.PSC (POSTSCRIPT.SHOWACCUM \POSTSCRIPT.CHANGECHARSET +\DSPLINEFEED.PSC \FIXLINELENGTH.PSC) \NSFILING.OPENFILE (MAPC FREPLACEFIELD) RECORDWORD (/RPLACA) +\DFSFreeDiskPages (DECLARE OBTAIN.MONITORLOCK SI::MONITOR-UNWIND) FB.INFOMENU.WHENSELECTEDFN ( +SHADEITEM) COMP.SPREAD (COMP.EXPR COMP.STJUMP COMP.STTAG MAPC COMP.EFFECT COMP.VAL) +\PROMPTFORWORDRETYPE (DECLARE) FILECODEBLOCK (FILEPATCHBLOCK BOUT16) DWIM (/PUTD MAPC) +\PROMPTFORWORDERASE (DECLARE MOVETO DSPCLEOL) NSDISPLAYSIZE (DECLARE) TERM.SCROLLDOWN (BITBLT) +DOBACKGROUNDCOM (ERSETQ) MAKEEPSFILE (MOVETO) \SEQUIN.PUT (FREPLACEFIELD SENDPUP \CLOCK0 WAKE.PROCESS) + \DISPLAYINIT (DECLARE) \GET.IOCB (DECLARE) CREATE-SHELL-STREAM (FREPLACEFIELD STREAMPROP) +FM.CHANGELABEL (\FM.INSUREWINDOW \FM.CHANGELABEL SELECTQ \FM.TOGGLE-CHANGESTATE \FM.3STATE-CHANGESTATE + \FM.UPDATEGROUPEXTENT \FM.CLEARITEM BLTSHADE) \DSPLEFTMARGIN.PSC (\FIXLINELENGTH.PSC) \DSPMOVELR ( +SHOULDNT \CHECKCARET MOVETO BITBLT DSPXPOSITION) COPYTEXTSTREAM (\TEDIT.INSERT.PIECES) READPAGEMAP ( +LOCAL READPAGEMAPBLOCK) DELETEMENU (\ILLEGAL.ARG ERASEMENUIMAGE ERROR CLOSEW) TEDIT.FORMATFOLIO ( +FREPLACEFIELD FRPLACD) \DOFLUSHVM (CHECK) COPIEDFILENAME (RPLACD) \RELEASEWORKINGSET (\WRITEMAP) +\PROMPTFORWORDBS (DECLARE \PROMPTFORWORDERASE \PROMPTFORWORDRETYPE PRIN3 BOUT) UPDATE/MENU/IMAGE ( +CLOSEW BITBLT DSPRIGHTMARGIN DSPXOFFSET DSPYOFFSET GRID DSPOPERATION DSPFONT \SHOWMENULABEL ADVISEWDS) + \PROMPTFORWORDBIN (DECLARE \TTYBACKGROUND BLOCK SELECTQ RINGBELLS FLASHWINDOW) INSPECT/HARRAYP ( +PROMPTPRINT) \FLUSHVM (SELECTQ \CONTEXTSWITCH ERROR MAPC) COURIER.EXECUTE.EXPEDITED.CALL ( +\COURIER.TRACE RESETSAVE) \TEDIT.SELECT.CHARACTER (DECLARE RESETLST TEDIT.OBJECT.CHANGED) +\10MBSENDPACKET (\MAYBEPRINTPACKET DECLARE \BLT \HANDLE.RAW.PACKET UNINTERRUPTABLY) FILL.CONT ( +BLTSHADE) PURGENSFONTS (FRPLACD) TEDIT.FORMATTEXTBOX (CL:MULTIPLE-VALUE-SETQ BLOCK HELP FREPLACEFIELD +FRPLACD) CHARCODE.DECODE (DECLARE) GRAPHERPROP (SETPROPLIST) TTYIN.PPTOFILE (DECLARE SETFILEPTR +LINELENGTH CL:FUNCALL PRIN2 SPACES PRINTDEF) DSKDISPLAY (\DSKDISPLAY.CREATE.WINDOW WINDOWPROP +REDISPLAYW \DSKDISPLAY.DESTROY.WINDOW) \PAGEDBACKFILEPTR (LISPERROR \UPDATEOF \RELEASECPAGE +\SETIODIRTY FREPLACEFIELD) STRPOSL (DECLARE CHECK FREERESOURCE) SET-SYMBOL (RPLACA) \CREATECHARSET ( +DECLARE \ILLEGAL.ARG) \PFRemoveRootDirEntry (MESASETA ERROR FREPLACEFIELD) COMPUTE-MACRO-ARGS (MAPC +ERROR) CHANGECCODE (DECLARE ERROR \ADDREF) SENDPUP (\RCLK \REQUEUE.ETHERPACKET printout PRIN1 +PRINTPUPROUTE \SETPUPCHECKSUM \MAYBEPRINTPACKET TRANSMIT.ETHERPACKET BLOCK) DSPCLEOL (\CHECKCARET) +MACROS.GETDEF (FRPLACD) \WRITEDIRTYPAGE1 (\FLUSHPAGE) MSPRGRECORD (MSPRGTEMPLATE MSPRGE FRPLACD +MSPRGLST) EXPANDMACRO (DECLARE RESETFORM) \COURIER.HANDLE.ERROR (TAB) CHARWIDTHY (\ILLEGAL.ARG) +EXPAND-DEFMACRO (DECLARE COMPUTE-MACRO-ARGS) \DSPPRINTCHAR (\CHECKCARET SELECTC CHECK \BLTCHAR +FREPLACEFIELD \DSPPRINTCR/LF DSPBACKUP SELCHARQ PLAYTUNE FLASHWINDOW SHOULDNT) TEDIT.FORMATHEADING ( +\TEDIT.INSERT.PIECES MAPC FRPLACD) \DRAWPOLYGON.DISPLAY (\DRAWLINE.DISPLAY \DRAWPOINT.DISPLAY) +AS.REPLACE.PASSWORDS (DECLARE) \PFAddRootDirEntry (MESASETA ERROR) POSTSCRIPTFILEP (SETFILEPTR) SUPERPRINT/COMMENT2 (PRINOPEN PRINDOTP SUPERPRINT/SPACE PRINENDLINE SUPERPRINT/COMMENT2 PRIN2STRING -PRIN2S) PRINTATBOX (DSPFILL MOVETO) LAYOUTSEXPR (DECLARE LAYOUTSEXPR1) GRAYBOXAREA (\\ILLEGAL.ARG) -COMPILER::GENCODE-TAGBODY-INLINE (COMPILER::SET-UP-RETURN-TO MAPC COMPILER::TAKE-DOWN-RETURN-TO) -MSNEEDUNSAVE (MSMARKCHANGE1 FRPLACD |printout| PRIN1 PRINTPARA) LOGOUT (\\USEREVENT \\FLUSHVMOK? -\\PROCESS.BEFORE.LOGOUT \\DEVICEEVENT \\SETTOTALTIME \\LOGOUT0 \\RESETKEYBOARD \\OPENLINEBUF -\\PROCESS.AFTER.EXIT INTERPRET.REM.CM) \\FM.PUSHGROUP (MAPC) ICONW (WINDOWPROP OPENW) PRINTCOMSTRAN ( -DECLARE DWIMIFY0? FRPLACD) \\NSFILING.GENERATEFILES (RESETLST RPLACA FRPLACD PRINTOUT TERPRI MAPRINT -RESETSAVE) SEDIT::START-COMMENT (SEDIT::INSERT) \\LEAF.REOPENFILE (\\LEAF.CLOSEFILE -\\LEAF.SETCREATIONDATE FREPLACEFIELD) SHOWGRAPH (WINDOWPROP DSPOPERATION REDISPLAYGRAPH) -PFI.DEFAULT.HANDLER (TERPRI PFI.MAYBE.NEW.PAGE PFI.ADD.TO.INDEX) CHANGERECORD (MAPC) FMAPRINT (PRIN1 -PRIN2) \\MAIKO.INPUT.INTERRUPT (FREPLACEFIELD \\RCLK \\MAYBEPRINTPACKET) POSSIBILITIES (PRODUCE EVAL -ADIEU) \\SET.LASTVMEMFILEPAGE (\\SET.VMEM.FULL.STATE) TRYNEXT (SET RETEVAL) \\TEDIT.CENTER.SEL.REV ( -MAPC LISTPUT TEDIT.PARALOOKS TEDIT.PROMPTPRINT) \\LEAF.DIRECTORYNAMEP (FREPLACEFIELD) -READVARS-FROM-STREAM (DECLARE CL:MAPC) \\PAGEDBACKFILEPTR (LISPERROR \\UPDATEOF \\RELEASECPAGE -\\SETIODIRTY) \\FM.DISPLAY-SETUP (DECLARE FREPLACEFIELD) COMP.ST (OPT.CCHECK) TB.RESHAPEFN ( -ALLOW.BUTTON.EVENTS TB.SET.FONT WYOFFSET TB.DISPLAY.LINES) TIMEALL (|printout| PRIN1 DECLARE COMPILE1) - ENTEREVALQT (RESETRESTORE) STRPOSL (DECLARE CHECK FREERESOURCE) DSPCLEOL (\\CHECKCARET) EDITSHADE ( -WINDOWPROP EDITSHADEREPAINTFN RESETLST DSPFILL GETMOUSESTATE TOTOPW BLOCK ERSETQ SHADEGRIDBOX -BITMAPBIT PRINTOUT DECLARE TERPRI) \\CREATECHARSET.PSC (FREPLACEFIELD) MOVE.TO.LINE (GO.TO.RELATIVE) -SI::UNBREAK-FROM-RESTORE-CALLS (SI::FINISH-UNBREAKING) TEDIT.REDO (RESETLST FREPLACEFIELD \\FIXSEL -TEDIT.NORMALIZECARET) CALLS3 (MAP) EDITDATE? (DECLARE) HPRINT (RESETSAVE CLRHASH HPINITRDTBL HPRINT1 -HPRINTEND CL:UNWIND-PROTECT CL:CLOSE TERPRI) TEDIT.BUILD.PCTB1 (FREPLACEFIELD SETFILEPTR SELECTC -\\TEDIT.GET.CHARLOOKS1 TEDIT.GET.OBJECT1 \\WIN SHOULDNT INSERT-BRT) \\ATWGROUPSIZE (MAPC) -\\BSP.PREPARE.INPUT (DECLARE OBTAIN.MONITORLOCK BLOCK MONITOR.AWAIT.EVENT FREPLACEFIELD -\\BSP.CLEANUP.INPUT SI::MONITOR-UNWIND) TEDIT.UNDO (RESETLST TEDIT.UNDO.MOVE) \\STRINGWIDTH.GENERIC ( -DECLARE \\MAPPNAME) SEDIT::TRY-REUSING-BITS (SEDIT::SHIFT-BLOCK) FB.ALLOW.ABORT (FREPLACEFIELD -ATTACHWINDOW) \\SPLITTREE (\\RPLPTR \\PUTBASEFIXP \\TEDIT.SET-TOTLEN \\MATCHPCS \\PUTBASEPTR) -TEDIT.SUBSTITUTE (TEDIT.PROMPTPRINT \\SHOWSEL TEDIT.RESET.EXTEND.PENDING.DELETE TEDIT.NORMALIZECARET -TEDIT.SHOWSEL TEDIT.DELETE \\TEDIT.INSERT.PIECES FREPLACEFIELD TEDIT.INSERT \\FIXDLINES \\FIXILINES -DECLARE SELCHARQ \\INSERTCR \\INSERTCH \\TEDIT.MARK.LINES.DIRTY TEDIT.UPDATE.SCREEN \\FIXSEL) -COMPILER::TRANSFORM-GET/PUT-BASE (COMPILER::RELEASE-TREE) CHANGECCODE (DECLARE ERROR \\ADDREF) -PURGEDSKDIRECTORY (DECLARE OBTAIN.MONITORLOCK ERROR UNINTERRUPTABLY TERPRI MAPC |\\LFPurgeDirectory| -SI::MONITOR-UNWIND) \\FM.JUSTIFYGROUPS (SELECTQ \\FM.PUSHGROUP) CALLSCCODE (DECLARE CL:FUNCALL) -\\PROMPTWINDOW.SET.HEIGHT (RELMOVEW) AS.CHANGE.OWN.PASSWORDS (DECLARE) \\DRAWPOLYGON.DISPLAY ( -\\DRAWLINE.DISPLAY \\DRAWPOINT.DISPLAY) SEDIT::COMPUTE-SELECTION-POSITION-COMMENT (SEDIT::MAP-COMMENT-INDEX -) POLYSHADE.IP (DECLARE) SETUPHASHARRAY (SET) FIX-FORM (EDITE PRINT-EVENT-PROMPT DSPFONT CURSOR -DECLARE) CHARCODE.DECODE (DECLARE) EXPANDOPENLAMBDA (MAPC) NUMBERPAD.READ (SPAWN.MOUSE WINDOWADDPROP -TOTOPW NUMBERPAD.READER.HANDLE.CHAR DISMISS WINDOWDELPROP) MSDESCRIBE1 (SPACES PRIN1 PRIN2 TAB TERPRI) - HPRINT0 (ERROR) |\\VAMCheckEndOfVol| (|DiskError| LISPERROR) \\DOVMEMFULLINTERRUPT (DECLARE -FREPLACEFIELD CL:CERROR SI::RESETUNWIND) SHRIEKIFY (SELECTQ CLISP4 SHRKFY) COMP.SHIFT (COMP.VAL -COMP.DELFIX COMPERROR COMP.DELPUSH) \\TEDIT.DEFAULTS.CARET (TEDIT.CARETLOOKS) \\FTP.RENAMEFILE ( -CLEAR.LEAF.CACHE \\FTP.PRINTPLIST .EOC. \\RELEASE.FTPCONNECTION) \\LEAF.EVENTFN (SELECTQ -\\FLUSH.OPEN.STREAMS \\CLOSELEAFCONNECTION \\SEQUIN.FLUSH.CONNECTION \\REMOVEDEVICE CLOSEPUPSOCKET -FREPLACEFIELD \\PAGED.REVALIDATEFILELST) UNMAKEMAINWINDOW (WINDOWDELPROP) PAINTW (|printout| TOTOPW -CURSORCOLOR GETMOUSESTATE RPLACA DOWINDOWCOM BITBLT) MACROS.GETDEF (FRPLACD) CLISPACKUP (FRPLACD) -\\SETPUPCHECKSUM (FREPLACEFIELD) \\FM.NWAY-CHANGESTATE (\\FM.TOGGLE-CHANGESTATE LISTPUT) -\\SCALEDBITBLT.PSC (BITBLT POSTSCRIPT.PUTCOMMAND POSTSCRIPT.PUTBITMAPBYTES \\MOVETO.PSC) -PROG1.PRETTYPRINT (PRIN1 PRIN2 SPACES DECLARE SUPERPRINT SEQUENTIAL.PRETTYPRINT) \\BACKCOLOR.DISPLAY ( -FREPLACEFIELD \\ILLEGAL.ARG) SEDIT::COPY-SELECTION-COMMENT (FRPLACD TERPRI) TCOMPL (COMPSET FRPLACD) -FB.YES-OR-NO-P (FB.PROMPTWPRINT) DINFO.FIND (FLASHWINDOW FREPLACEFIELD PRINTOUT |printout|) -\\BITMAPFROMTEXTURE (BITMAPBIT) COMP.RPLACD (COMP.EXPR FRPTQ COMP.DELFN COMP.STCONST COMP.VAL1 -COMP.STCOPY COMP.ST) \\RTP.HANDLE.INPUT (\\RTP.HANDLE.PUP MONITOR.AWAIT.EVENT) -\\TEDIT.PARSE.CHARLOOKS.MENU (MAPC SELECTQ MB.NWAYBUTTON.ADDITEM TEDIT.DELETE TEDIT.OBJECT.CHANGED -TEDIT.PROMPTPRINT MBUTTON.FIND.NEXT.FIELD) EDITMOVEREGION (PROMPTPRINT) POSTSCRIPT.HARDCOPYW ( -ALLOW.BUTTON.EVENTS BITBLT CLOSEF) SEQUENTIAL.PRETTYPRINT (DECLARE SUBPRINT/ENDLINE SUPERPRINT) -\\DISPLAYINIT (DECLARE) %COPY-ONED-ARRAY (ERROR \\PUTBASE) TEDIT.BUILD.PCTB0 (SETFILEPTR FREPLACEFIELD - SELECTC TEDIT.GET.CHARLOOKS0 TEDIT.GET.OBJECT0 TEDIT.GET.PARALOOKS0 SHOULDNT INSERT-BRT) -\\BLTSHADE.DISPLAY (DECLARE \\INSURETOPWDS .WHILE.TOP.DS. \\PUTBASE \\SOFTCURSORDOWN FREPLACEFIELD -\\BITBLTSUB \\SOFTCURSORUPCURRENT) %SORT-SUBLIST (%SORT-SUBLIST) \\BSP.CLEANUP.INPUT (\\BSPINCFILEPTR -FREPLACEFIELD RELEASE.PUP \\SEND.ACK) \\COURIER.HANDLE.BULKDATA (\\BULK.DATA.CLOSE) SEDIT::SHIFT-BLOCK - (BLTSHADE SEDIT::REPAINT) TEDIT.NEXT (SELECTQ \\SHOWSEL FREPLACEFIELD \\TEDIT.SET.SEL.LOOKS \\FIXSEL -TEDIT.NORMALIZECARET TEDIT.PROMPTPRINT SHOULDNT) SETFONTDESCRIPTOR (DECLARE \\ILLEGAL.ARG RPLACD) -\\NSFILING.NEXTFILE (\\NSFILING.CLOSE.BULKSTREAM) PROVIDE.PROMPTING.WINDOW (RESETSAVE WINDOWPROP -RELMOVETO |printout| PRIN1 SELECTQ RINGBELLS FLASHWINDOW) TEDIT.PROMPTFLASH (FLASHWINDOW) -SEDIT::COMPUTE-POINT-POSITION-COMMENT (SEDIT::MAP-COMMENT-INDEX) \\READBMDIMENSIONS (PRIN1 TERPRI) -KILLSEGMENT (FRPLACD) REATTACHPROMPTWINDOW (ATTACHWINDOW) \\FORWARD.PUP (PRINTPUP) |\\VFMKillBuffer| ( -RPLACD) DWIMIFY0 (LISPXPUT DWIMARKASCHANGED DWIMUNSAVEDEF) /PUTDQ (/PUTD) BCOMPL (DECLARE) -TEDIT.BUILD.PCTB2 (FREPLACEFIELD SETFILEPTR SELECTC SETA \\TEDIT.GET.CHARLOOKS TEDIT.GET.OBJECT -SHOULDNT \\INSERTPIECE) EDITFNS (SPACES) \\NSFILING.PARSE.FILENAME (CL:MULTIPLE-VALUE-SETQ) -PROGV.PRETTYPRINT (PRIN1 PRIN2 SPACES DECLARE SUPERPRINT SEQUENTIAL.PRETTYPRINT) CL:RETURN-FROM ( -DECLARE CL:ERROR RETVALUES) COLLECTFNDATA (MAPC) \\RELEASEWORKINGSET (\\WRITEMAP FREPLACEFIELD ERROR) -\\CHARWIDTH.DISPLAY (DECLARE) UNICODE.UNMAPPED (PUTHASH) \\IFSERRORSTRING (SETFILEPTR RPLCHARCODE -CLOSEF) %COPY-STRING-TO-ARRAY (\\PUTBASEBYTE) \\DSPCLIPPINGREGION.DISPLAY (ERROR UNINTERRUPTABLY -|\\SFFixClippingRegion|) \\POLYSHADE.YSCAN.IP (SETCOLOR.IP |\\DrawScanList.YScan.IP|) PRINTPROG ( -SUPERPRINT SPACES PRINTPROGVARS SUBPRINT/ENDLINE PRINDOTP PRINENDLINE) PRINTCODENT (DECLARE |printout| - PRIN1 PRINTNUM SPACES ALLOCAL) CONCAT (SETARG RPLSTRING) COMPILER::GENCODE-RETURN (COMPILER::GENCODE) - \\DSPRESET.DISPLAY (DECLARE SELECTQ \\DSPXPOSITION.DISPLAY \\DSPYPOSITION.DISPLAY ERROR BITBLT -PROCESS.EVAL) \\MAIKO.10MBWATCHER (PROMPTPRINT UNINTERRUPTABLY \\HANDLE.RAW.PACKET BLOCK) -CODEWRAPPER.PRETTYPRINT (PRIN1 PRIN2 PRINTDEF SEQUENTIAL.PRETTYPRINT) \\READBINARYBITMAP (\\BINS) -\\PARAS.IN.SEL (FREPLACEFIELD \\FIXSEL MAPC) LEAF.ASSURE.FINISHED (WITH.MONITOR DECLARE -OBTAIN.MONITORLOCK MONITOR.AWAIT.EVENT SI::MONITOR-UNWIND ERROR) \\DRAWCURVE.DISPLAY (SELECTQ ERROR -\\DRAWPOINT.DISPLAY \\LINEWITHBRUSH \\CURVE2 FREERESOURCE DECLARE) SUBPRINT (SUBPRINT/WRAPPERTAIL -SUPERPRINT/SPACE) DINFO.LOOKUP (CLEARW FREPLACEFIELD TERPRI FLASHWINDOW) \\FONT.COMPARESYMBOL (DECLARE -) ITEMW.REPAINTFN (PRINTATBOX) ICMLARRAY.MENUW.GETLEVEL (FRPLACD PRINTOUT RESETFORM DECLARE) -SUPERPRINT0 (PRINOPEN SUBPRINT SUBPRINT/ENDLINE PRINSHUT) \\TEDIT.ABBREV.EXPAND (\\SETUPGETCH -TEDIT.SETSEL FREPLACEFIELD TEDIT.DELETE TEDIT.INSERT) \\DSPOPERATION.DISPLAY (LISPERROR -UNINTERRUPTABLY DECLARE) /PRINTLEVEL (UNDOSAVE) CHARACTER.READ (DECLARE CHECK) \\DSPXPOSITION.DISPLAY -(FREPLACEFIELD \\ILLEGAL.ARG) \\DRAWLINE.DISPLAY (DECLARE GLOBALRESOURCE FREPLACEFIELD FREERESOURCE -\\INSURETOPWDS \\CLIPANDDRAWLINE) ICMLARRAY.MENUW.SHOW (FM.CHANGELABEL) \\DSPLINEFEED.DISPLAY ( -FREPLACEFIELD \\ILLEGAL.ARG) \\DRAWELLIPSE.DISPLAY (DECLARE MOVETO \\ILLEGAL.ARG \\DRAWELLIPSE.GENERIC - GLOBALRESOURCE .SETUP.FOR.\\BBTCURVEPT. SELECTQ SHOULDNT \\INSURETOPWDS APPLY* .WHILE.TOP.DS. -\\PUTBASE \\SOFTCURSORDOWN \\CURVEPT \\SOFTCURSORUPCURRENT FREERESOURCE) \\NEWPAGE.PSC ( -POSTSCRIPT.ENDPAGE) \\FILLCIRCLE.DISPLAY (\\PUTBASE \\SETPBTFUNCTION \\INSURETOPWDS DECLARE -.WHILE.TOP.DS. \\SOFTCURSORDOWN \\SOFTCURSORUPCURRENT \\FILLCIRCLEBLT MOVETO FREERESOURCE) -CASE.PRETTYPRINT (PRIN1 PRIN2 SPACES DECLARE SUPERPRINT PRINENDLINE PRINTDEF SUPERPRINT/COMMENT -SEQUENTIAL.PRETTYPRINT) UPDATE/SCROLL/REG (CLOSEW FREPLACEFIELD) SEDIT::CFV-CLISP (FREPLACEFIELD) -\\DRAWCIRCLE.DISPLAY (DECLARE .SETUP.FOR.\\BBTCURVEPT. SELECTQ SHOULDNT \\INSURETOPWDS APPLY* -.WHILE.TOP.DS. \\PUTBASE \\SOFTCURSORDOWN \\SOFTCURSORUPCURRENT \\CIRCLEPTS MOVETO FREERESOURCE) -SEDIT::SELECT-NODE (SEDIT::SET-SELECTION-ME FREPLACEFIELD) PRINTSQ (SUPERPRINT/SPACE SUPERPRINT -PRINENDLINE PRINOPEN SUBPRINT PRINSHUT PRIN2S) |\\VFMGet| (DECLARE |DiskError| LISPERROR FREPLACEFIELD - MESASETQ |\\VFMFind|) \\DSPPRINTCHAR (\\CHECKCARET SELECTC CHECK \\BLTCHAR FREPLACEFIELD -\\DSPPRINTCR/LF DSPBACKUP SELCHARQ PLAYTUNE FLASHWINDOW SHOULDNT) COMPILER::TEST-ALPHA (COMPILER::RELEASE-TREE -) /MOVD (LISPXPRIN1 LISPXPRIN2 /PUTD MARKASCHANGED ADDSPELL) CHANGEVAR (DECLARE) MAKEKEYLST (FRPLACD) -MSDESCRIBE (DECLARE |printout| PRIN1 PRIN2 FMAPRINT TAB TERPRI MSDESCRIBE1 FRPLACD MAPC) -\\FM.LAYOUTGRID (\\FM.SETUPPROPS RPLNODE2 \\FM.CHECKPROPS \\FM.SETFORMATPROPS \\FM.UPDATEGRID TCONC -LCONC EXTENDREGION \\FM.CHECKDESCRIPTION \\FM.UPDATEFORBOX) \\DSPFONT.DISPLAY (UNINTERRUPTABLY -FREPLACEFIELD DECLARE) MOVE.TO.NEXT.LINE (GO.TO.RELATIVE) TERPRI (\\OUTCHAR) CL:UNWIND-PROTECT ( -\\EVPROGN) \\SCALEDBITBLT.DISPLAY (SHOULDNT) COMPILER::META-SUBST-VAR-REF (COMPILER::RELEASE-TREE) -PRIN1 (DECLARE \\PRINDATUM) |\\LFDirectoryScrambled| (|printout| TERPRI LISPERROR) -%SET-ARRAY-TYPE-NUMBER (FREPLACEFIELD CL:ERROR) \\DSPLEFTMARGIN.DISPLAY (UNINTERRUPTABLY FREPLACEFIELD - \\ILLEGAL.ARG) OPT.OPTCHECK (MAPC SELECTQ) DSFIT2 (DECLARE) \\INVALID.DOTTED.SYMBOL (CL:CERROR) -DO.PRETTYPRINT (PRIN1 PRIN2 SPACES DECLARE SUPERPRINT SELECTQ SUBPRINT/ENDLINE SEQUENTIAL.PRETTYPRINT) - SETFONTCLASSCOMPONENT (SELECTQ RPLACD) READVARS (HPINITRDTBL HVREADERR SAVESET) UTF8.OUTCHARFN ( -FREPLACEFIELD ERROR) \\UNCOPY (FRPTQ) PRINTNUM (DECLARE \\ILLEGAL.ARG FRPTQ SPACES FREERESOURCE) -\\INSERTTREE (HELP UPDATEPCNODES \\PUTBASEFIXP \\RPLPTR \\BLT \\PUTBASEPTR \\ILLEGAL.ARG \\SPLITTREE -\\TEDIT.UPDATETREE) READPAGEMAP (LOCAL READPAGEMAPBLOCK) FILLRECTANGLE.IP (APPENDINTEGER.IP) -FB.PROMPTFORINPUT (FRESHLINE CLEARW PRINTOUT TERPRI) DINFO.ADD.FMENU (REMOVEPROMPTWINDOW FREPLACEFIELD - ATTACHWINDOW WINDOWDELPROP WINDOWADDPROP) DSFIT1 (DECLARE) SI::RESETUNWIND (APPLY SETTOPVAL) -SHIFT.BITMAP.UP (BITBLT) \\TEDIT.APPLY.CHARLOOKS (TEDIT.LOOKS \\SHOWSEL TTY.PROCESS) -POSTSCRIPT.ENDPAGE (POSTSCRIPT.SHOWACCUM POSTSCRIPT.PUTCOMMAND) XCL::PUT-IMPLICIT-KEY-HASH ( -UNINTERRUPTABLY) COMPILER::PEEPHOLE-OPTIMIZE (DECLARE COMPILER::FIND-REACHABLE-TAGS) -MB.THREESTATE.DISPLAY (DSPXOFFSET DSPYOFFSET DSPFONT MOVETO PRIN1 BITBLT SELECTQ DRAWLINE) -\\PRINTBINARYBITMAP (\\ILLEGAL.ARG \\WOUT DECLARE \\BOUTS) \\TELERAIDBREAK (\\TELEBLTCURSOR FLIPCURSOR - DECLARE FREPLACEFIELD) \\LEAF.FLUSH.CACHE (DECLARE OBTAIN.MONITORLOCK FREPLACEFIELD \\LEAF.CLOSEFILE -SI::MONITOR-UNWIND) \\LEAF.FORCEOUTPUT (\\PAGED.FORCEOUTPUT) \\MAP-CODE-LITERALS (CL:FUNCALL DECLARE -SELECTQ) %SET-ARRAY-OFFSET (FREPLACEFIELD CL:ERROR) /MAPCONC (/RPLACD) SETHASHSTATUS (SETA) -TERM.NEWLINE (TERM.DOWN) TAB (SPACES TERPRI) COMP.DELPUSH (SUB1VAR) |CreateCursorBitMap| (\\PUTBASE) -COMP.LABELS (MAPC) SEDIT::CLOSE-NODE-COMMENT (SEDIT::UNDO-BY RPLACA) |\\PFFindPageAddr| (|DiskError| -LISPERROR FREPLACEFIELD) MAKEALISTCOMS (LISPXPRINT FRPLACD) RESETGRID.NEW (BLTSHADE SCALEBM) -GO.TO.RELATIVE (MOVETO) \\DRAWPOLYGON.IP (SHOW.IP APPENDOP.IP MOVETO.IP \\IMAGEPATH.IP \\SETBRUSH.IP -LINETO.IP SETXY.IP) \\FM.LAYOUTCOLUMN (\\FM.SETUPPROPS RPLNODE2 \\FM.CHECKPROPS \\FM.SETFORMATPROPS -\\FM.CHECKFORBOX TCONC LCONC EXTENDREGION \\FM.CHECKDESCRIPTION \\FM.UPDATEFORBOX) COMPAREPRINT1 ( -CL:PRIN1 ADD1VAR COMPAREPRINTN PRIN1 SPACES COMPAREPRINT1) |\\LFFindDirectoryVol| (SHOULDNT) -PUPNET.DISTANCE (BLOCK) \\NSFILING.OPEN.HANDLE (\\NSFILING.CLOSE.HANDLE RESETSAVE) -\\DSPRIGHTMARGIN.DISPLAY (UNINTERRUPTABLY FREPLACEFIELD \\ILLEGAL.ARG) BROKENDEF (UNLESSRDSYS -UNINTERRUPTABLY \\MOVEBYTES CODEBASESETA DECLARE \\ADDREF SELECTQ) ICMLARRAY.MENUW.APPLY (FRPLACD -DECLARE TERPRI ICMLARRAY.DETACHDISPLAY) SHOW.CLEARINGHOUSE (FILESLOAD WINDOWPROP) \\DSPSCALE.PSC ( -POSTSCRIPT.PUTCOMMAND FREPLACEFIELD) MSMARKCHANGED (MSERASE MSMARKCHANGE1) \\HANDLE.RAW.PUP ( -RELEASE.PUP DECLARE PRIN1 FREPLACEFIELD SWAPPUPPORTS SENDPUP \\PUPERROR UNINTERRUPTABLY \\ENQUEUE) -CLISPAND (CLISP4) \\FM.LAYOUTROW (\\FM.SETUPPROPS RPLNODE2 \\FM.CHECKPROPS \\FM.SETFORMATPROPS -\\FM.CHECKFORBOX TCONC LCONC EXTENDREGION \\FM.CHECKDESCRIPTION \\FM.UPDATEFORBOX) FGET.IP ( -APPENDNUMBER.IP) SEDIT::UNDO-EXTRACT (RPLACD FREPLACEFIELD SEDIT::DETACH-NODE SEDIT::REVIVE-NODE) -SEDIT::SKIP-TO-GAP (|printout| TERPRI) CLISPELL (MAPC /RPLNODE) /SETATOMVAL (UNDOSAVE) -|\\LFCloseDevice| (DECLARE OBTAIN.MONITORLOCK |\\PFEnsureInitialized| \\REMOVEDEVICE MAPC -SI::MONITOR-UNWIND) MAKEHVPRETTYCOMS (HPINITRDTBL MAPC) \\COURIER.RESULTS (\\COURIER.TRACE -\\COURIER.HANDLE.ERROR) \\SMASHBSPSTREAM (\\SETACCESS UNINTERRUPTABLY) XCL:UNBREAK-FUNCTION (PUTD -REMPROP SI::CHANGE-CALLS SI::FINISH-UNBREAKING) LLBREAK (DECLARE XCL:UNBREAK-FUNCTION ERROR -/SETATOMVAL /PUTD /PUTPROP) DINFO.INVERT.NODE (FREPLACEFIELD) INSERTLINE (INSERT.NODE FRPLACA TTCRLF -DO.INSERT.LINE TTPROMPTCHAR RENUMBER.LINES) ACCESSDEF (/RPLNODE FRPLACA) \\NSRANDOM.SESSION.WATCHER ( -RESETSAVE BLOCK) DINFO.DEFAULT.MENU (CLEARW PROCESSPROP DINFO.ADD.FMENU) \\POSITION.MENU.IMAGE ( -GETMOUSESTATE MOVEW SHOWSHADEDITEMS) PFI.PRETTYPRINT (PRINTDEF) \\INIT.RTPPROCESS (FREPLACEFIELD) -\\TEDIT.SHOW.CHARLOOKS (\\SHOWSEL FREPLACEFIELD) AS.MAKE.CONVERSATION (RESETSAVE) -POSTSCRIPT.PUTCOMMAND (FREPLACEFIELD POSTSCRIPT.SHOWACCUM \\SETXFORM.PSC \\FILEOUTCHARFN -POSTSCRIPT.OUTSTR) \\MAIKO.10MBSENDPACKET (\\MAYBEPRINTPACKET DECLARE \\BLT FREPLACEFIELD -\\HANDLE.RAW.PACKET UNINTERRUPTABLY) COMPILER::GENERATE-CODE (COMPILER::GENCODE-LAMBDA) CHECKFPTOVP1 ( -|printout| \\PRINTVP) \\TEXTMENU.TOGGLE.DISPLAY (DSPXOFFSET DSPYOFFSET DSPFONT MOVETO PRIN1 BITBLT -SELECTQ ERROR) SEDIT::LINEARIZE-CLISP (SEDIT::LINEARIZE SEDIT::SET-COMMENT-POSITIONS DECLARE -SEDIT::OUTPUT-CR SEDIT::OUTPUT-SPACE) EDITFB (LOADFNS LOADFROM PRINTOUT PRIN1) \\DSPYPOSITION.DISPLAY -(UNINTERRUPTABLY \\ILLEGAL.ARG) COMPAREPRINT (PRINT PRIN1 COMPAREPRINT1 TERPRI) FONTCLASSCOMPONENT ( -SETFONTCLASSCOMPONENT) \\MAP-CODE-POINTERS (SELECTQ CL:FUNCALL DECLARE) \\FM.NWAY-DOWNFN (BLTSHADE) -\\DSPSCALE2.PSC (POSTSCRIPT.SHOWACCUM \\UPDATE.PSC POSTSCRIPT.PUTCOMMAND) /PUTD (PUTD UNDOSAVE) -\\TEDIT.UPDATETREE (\\PUTBASEFIXP FREPLACEFIELD HELP) INSTALL-PROTOTYPE-DEFN (MAKE-AND-INSTALL) -SETCOLOR.IP (SETRGB.IP APPENDINTEGER.IP) WHO-LINE-VMEM (DECLARE) SEDIT::RECOMPUTE-FORMAT-VALUES (MAPC -SEDIT::RECOMPUTE-FORMAT-VALUES CL:FUNCALL) GAINSPACE (MAPC TERPRI ERSETQ PRIN1 MAPATOMS) \\FONTFACE ( -\\ILLEGAL.ARG) SEDIT::PAINT-TO-END-OF-LINE (BLTSHADE) /PUTPROP (ERRORX UNDOSAVE FRPLACD /RPLACA -SETPROPLIST) \\FM.NWAY-MOVEDFN (BLTSHADE) \\DO.PROGV.SETUP.FRAME.AND.EXECUTE (DECLARE PUTBASEPTR -SETSTKNAME-RAW SETSTKNTOFFSET-RAW UNINTERRUPTABLY CHECK \\DELREF \\ADDREF) COROUTINE (RESUME EVAL) -DINFO.LAYOUTGRAPH (FREPLACEFIELD) COMP.RETURN-FROM (SELECTQ COMPERROR COMP.STPOP COMP.PROGLST -COMP.STUNBIND OPT.COMPILERERROR COMP.STJUMP) \\DSPCOLOR.DISPLAY (RPLACA FREPLACEFIELD |\\SFFixFont|) -PRINTOPCODES (|printout| TAB) |\\VFMGetBufferFor| (|\\PFGetFileMapPage| RPLACD |\\VFMSaveBuffer|) -\\PROMPT.FOR.PUP.NUMBER (|printout| PRIN1 CLEARBUF FLASHWINDOW) \\DSPBACKCOLOR.DISPLAY (RPLACD -FREPLACEFIELD |\\SFFixFont|) \\FM.FORMATEXPLICIT (MAPC TCONC \\FM.CHECKDESCRIPTION LISTPUT) -XCL::EXEC-SHRINKFN (ADD.PROCESS TTY.PROCESS) DASSEM.CLEANFNTEST (DECLARE) CHECKFPTOVP (CHECKFPTOVP1) -SEDIT::SELECTED-FN-NAME (SEDIT::CLOSE-OPEN-NODE) \\CORE.CLOSEFILE (SELECTQ \\CORE.UPDATEOF -\\CORE.RELEASEPAGES UNINTERRUPTABLY) \\LOOKUPFONT (DECLARE) COMPARE (PRIN2 PRIN1 TERPRI COMPARELISTS) -SPACES (.SPACECHECK. FRPTQ) \\MAPPNAME.INTERNAL (FREPLACEFIELD DECLARE FREERESOURCE) \\DSPCOLOR.PSC ( -POSTSCRIPT.SHOWACCUM FREPLACEFIELD POSTSCRIPT.PUTCOMMAND \\ILLEGAL.ARG) SHAPEW (PROMPTPRINT) -ASKUSEREXPLAIN (ASKUSERSETUP ASKUSEREXPLAIN) COMP.TAGBODY (COMP.STBIND MAPC PUTHASH COMP.EXPR) -\\MAKE.JIS.TO.XCCS.CONV.TABLE (SETA MAPC) GETCHARBITMAP (\\ILLEGAL.ARG BITBLT) \\CORE.UPDATEOF ( -FREPLACEFIELD) DINFO.SELECT.GRAPH (DECLARE ALLOW.BUTTON.EVENTS) \\BITBLT.DISPLAY (DECLARE \\PUTBASE -\\SOFTCURSORDOWN \\INSURETOPWDS \\SOFTCURSORUPCURRENT TOTOPW SELECTQ FREPLACEFIELD \\BITBLT.MERGE -\\BITBLTSUB IMAGEOP) \\IRM.GET.KEYWORDS (PRINTOUT DECLARE) \\RTP.ACTION (\\RTP.ERROR \\SEND.RFC -\\SEND.ABORT \\SEND.END \\SEND.ENDREPLY \\BLT \\SEND.ANSWERING.RFC FREPLACEFIELD ERROR NOTIFY.EVENT -SETUPTIMER) \\TEDIT.NEUTRALIZE.CHARLOOKS (\\SHOWSEL FREPLACEFIELD \\TEDIT.NEUTRALIZE.CHARLOOKS.MENU -TEDIT.UPDATE.SCREEN) COMPILER::COMPLETELY-EXPAND (CL:MULTIPLE-VALUE-SETQ) FASL::DUMP-CHARACTER ( -FASL::WRITE-OP) MB.MARGINBAR.DISPLAYFN (DSPXOFFSET DSPYOFFSET MARGINBAR BITBLT) RPLSTRING (LISPERROR -\\SMASHABLESTRING \\BLT \\PUTBASEFAT \\MOVEBYTES) /MAPCON (/RPLACD) \\INSPECT.STORE.FATCHAR (UNDOSAVE) - SEDIT::OUTPUT-STRING (SEDIT::SET-LINEAR DECLARE SEDIT::STEP-LINEAR TEDIT.INSERT) PFI.PRINT.COMMENTS ( -TERPRI) SHIFT.BITMAP.DOWN (BITBLT) \\MAIKO.10MBSTARTDRIVER (ERROR FREPLACEFIELD \\10MB.TURNONETHER -\\MAIKO.ETHER-INTERRUPT) CLISPIFY (DWIMUNSAVEDEF /PUTD MARKASCHANGED) COERCETOBITMAP (BITBLT TOTOPW) -BKSYSCHARCODE (FRPLACD) \\LEAF.BREAKCONNECTION (MAPC) MOVECHARBITMAP (BITBLT PUTCHARBITMAP) PRINTDEF ( -DECLARE RESETLST TERPRI) BKSYSBUF (DECLARE BKSYSCHARCODE \\MAPPNAME) FONTMAPARRAY (ERROR MAPC) -INTPOWERS (ASET) \\POLYSHADE.XSCAN.IP (SETCOLOR.IP |\\DrawScanList.XScan.IP|) \\TEDIT.PROCIDLEFN ( -GETMOUSESTATE TTY.PROCESS) MAPPAGES (APPLY*) SHOWBUTTON (WBOX CENTERPRINTINREGION) GO.TO.FREELINE ( -GO.TO.RELATIVE TTCRLF) \\FIND.LOCALPUPHOSTNUMBER (|printout| PRIN1) |\\VFMReadNext| (|DiskError| -LISPERROR MESASETQ) \\LOCKFN (\\LOCKCELL) ENDPREAMBLE.IP (FREPLACEFIELD APPENDOP.IP) -\\TEDIT.GET.CHARLOOKS.LIST (FRPLACD) TEDIT.PUT (RESETLST \\TEDIT.WINDOW.TITLE UNINTERRUPTABLY -MBUTTON.SET.FIELD \\TEDIT.HISTORYADD) DECODEBUTTONS (DECLARE) DIRECTORY.MATCH (SELCHARQ) RECORD (HELP) - PRINTCODE (DECLARE PRINTNUM PRINTCODEHEADERDECODE PRINTCODENT SETUPHASHARRAY PRINTOUT TAB PCVAR -PRINJUMP SPACES) XCL::EXEC-CLOSEFN (ADD.PROCESS TTY.PROCESS) DIRECTORY.MATCH.SETUP (RPLACA) -\\PRINTFPTOVP (|printout| \\PRINTVP TERPRI) DWIMIFY (LISPXPRIN1 RESETFORM DECLARE PRINTDEF -SI::RESETUNWIND TERPRI) FONTSET (ERROR SETTOPVAL MAPC FONTMAPARRAY SET) TEDIT.GET.OBJECT0 (SETFILEPTR -FREPLACEFIELD) \\IRM.WILDCARD (FRPLACD) CLOSERTPSOCKET (WITH.MONITOR DECLARE OBTAIN.MONITORLOCK -FREPLACEFIELD MONITOR.AWAIT.EVENT SI::MONITOR-UNWIND DEL.PROCESS) CHOOZ (MAPC RELSTK) \\STARTPUP (MAPC -) \\DSPSCALE2.IP (SCALE2.IP) CH.FINDSERVER (\\CH.LOCATE.SERVERS) SPELLFILE (DECLARE SELECTQ) -MB.NB.DISPLAYFN (DSPXOFFSET DSPYOFFSET DSPFONT BITBLT) TEDIT.PUT.PCTB2 (DECLARE TEDIT.PUT.PAGEFRAMES -\\TEDIT.FLUSH.UNUSED.LOOKS \\TEDIT.PUT.CHARLOOKS \\TEDIT.PUT.PARALOOKS \\TEDIT.PUT.SINGLE.CHARLOOKS -BOUT FREPLACEFIELD COPYBYTES MAPC COPYCHARS \\DWOUT \\SMALLPOUT CLOSEF) /LISTPUT1 (/RPLACA /RPLACD) -\\TEDIT.UNIQUIFY.PARALOOKS (FREPLACEFIELD) \\SMASHABLESTRING (\\MAKEWRITABLESTRING \\FATTENSTRING) -\\TERPRI.PSC (DSPNEWPAGE FREPLACEFIELD \\MOVETO.PSC) \\CURVE (DECLARE \\CURVESMOOTH APPLY* -.WHILE.TOP.DS. \\PUTBASE \\SOFTCURSORDOWN \\INSURETOPWDS \\CURVEPT \\SOFTCURSORUPCURRENT \\BOXIPLUS -MOVETO) CLISPFOR (SELECTQ DECLARE LISTPUT1 SI::RESETUNWIND UNDOSAVE UNDONLSETQ1) \\LOOKUPFONTSINCORE ( -DECLARE FRPLACD) FIXAPPLY1 (SETSTKARG /RPLNODE RELSTK) LISPXPRIN2 (LISPXPUT) UPDATE/SHADE/DISPLAY ( -TILEAREA) \\NSRANDOM.DESTROY.STREAM (UNINTERRUPTABLY \\SETIODIRTY FORGETPAGES) \\INSPECT.STORE.32 ( -UNDOSAVE) ENDPAGE.IP (SHOW.IP APPENDOP.IP) FIND.NEXT.WORD (DECLARE CHECK) SHIFT.BITMAP.LEFT (BITBLT) -SAVEPUT (ERRORX UNDOSAVE FRPLACD /RPLACA LISPXPRINT SETPROPLIST MARKASCHANGED ADDSPELL) MSMARKCHANGE1 -(PUTHASH) TEDIT.UNDO.MOVE (\\SHOWSEL \\DELETECH \\FIXDLINES \\TEDIT.INSERT.PIECES \\FIXILINES -TEDIT.UPDATE.SCREEN \\FIXSEL \\COPYSEL) MAKEHASHLINKS (FRPLACD) \\RPLCHARCODE (LISPERROR -\\SMASHABLESTRING \\PUTBASECHAR DECLARE) \\TELERAIDRELEASE (SELECTQ \\10MBSETUPRECEIVER FLIPCURSOR) -FINDFN (RELSTK) /ADDPROP (ERRORX UNDOSAVE FRPLACD /RPLACA SETPROPLIST) SETUPPAGEMAP (\\NEWPAGE -CREATEPAGES \\PUTBASE) MISSPELLED? (LISPXWATCH PRIN1) LOADFNS (DECLARE FRPLACA LISPXPUT RESETSAVE -SETFILEPTR CL:MULTIPLE-VALUE-SETQ) FONTFILEFORMAT (FRPTQ CLOSEF) INSERTHASHKEY (SETA) -FONTPROFILE.ADDDEVICE (DECLARE MAPC) GENSYM (\\ILLEGAL.ARG ERROR HELP UNINTERRUPTABLY RPLCHARCODE -RPLSTRING) DINFO.SHOWGRAPH (SHAPEW) FONTPROFILE (MAPC ERROR /SETATOMVAL FONTMAPARRAY) |\\VFMMerge| ( -DECLARE MESASETQ |\\VFMFind| |\\VFMDelete| |\\VFMFreeVPage| |\\VFMInsert|) COMP.RETURN (COMP.STPOP -SELECTQ COMPERROR COMP.PROGLST OPT.CCHECK COMP.STUNBIND OPT.COMPILERERROR COMP.STJUMP) -\\TEDIT.UNIQUIFY.CHARLOOKS (FREPLACEFIELD) \\SETPOS.PSC (POSTSCRIPT.PUTCOMMAND) \\LOCATE.PUPNET (HELP -ASSURE.PUP.READY \\RPLPTR WAKE.PROCESS BLOCK) \\UNITWIDTHSVECTOR (\\PUTBASE) GLCCODE (UNINTERRUPTABLY) - \\DSPTOPMARGIN.PSC (FREPLACEFIELD) \\CORE.FINDPAGE (\\ILLEGAL.ARG RPLACD FREPLACEFIELD) -\\CONVERTTOFRACTION (|PutUnboxed|) EDITBM (DECLARE BITBLT TOTOPW ERROR FREPLACEFIELD EDITBMRESHAPEFN -SPAWN.MOUSE DISMISS CLOSEW MARKASCHANGED STKEVAL) SEDIT::BACKSPACE-COMMENT (SEDIT::CLOSE-OPEN-NODE -FREPLACEFIELD SEDIT::DEGRADE-COMMENT SEDIT::DELETE-NODES SEDIT::DELETE-COMMENT) LISPXSPACES (LISPXPUT) - \\IRM.WILD.REF (OPENW PRINTOUT DECLARE TERPRI) \\RTP.SHOW.FAILURE (|printout| TERPRI) -ASSURE.PUP.READY (DECLARE OBTAIN.MONITORLOCK CLRHASH DEL.PROCESS \\DEL.PACKET.FILTER FREPLACEFIELD -\\ADD.PACKET.FILTER RESTART.PROCESS ADD.PROCESS NOTIFY.EVENT BLOCK SI::MONITOR-UNWIND) CLISP4 (RETFROM - RETEVAL) CLISP3C (DECLARE SI::RESETUNWIND FRPLACA) MAKEINITFIRST (CREATEMDSTYPETABLE -\\SETUP.HUNK.TYPENUMBERS INITDATATYPES PREINITARRAYS \\TURN.ON.HUNKING INITATOMS INITDATATYPENAMES -INITUFNTABLE INITGC) LENGTH (DECLARE SETN) SHOW.IP (APPENDNUMBER.IP APPENDINTEGER.IP APPENDOP.IP -APPENDSEQUENCEDESCRIPTOR.IP COPYBYTES \\SETFILEPTR \\CHANGECHARSET.IP FREPLACEFIELD) -\\TEDIT.GET.PARALOOKS.LIST (FRPLACD) \\NSRANDOM.CREATE.STREAM (RESETSAVE FREPLACEFIELD -\\NSRANDOM.STREAM.CHANGED DECLARE) /LISTPUT (/RPLACA /RPLACD /RPLNODE) \\BSP.HANDLE.INPUT (SELECTC -\\BSP.HANDLE.DATA FREPLACEFIELD \\BSP.HANDLE.ACK \\BSP.HANDLE.INTERRUPT \\BSP.HANDLE.INTERRUPTREPLY -\\BSP.HANDLE.ERROR \\RTP.HANDLE.PUP \\SEND.ACK MONITOR.AWAIT.EVENT \\RTP.ACTION \\BSP.TIMERFN) -CREATEDSKDIRECTORY (DECLARE OBTAIN.MONITORLOCK ERROR |\\LFPurgeDirectory| UNINTERRUPTABLY -|\\LFCreateDevice| |\\PFDsplyVolumes| SI::MONITOR-UNWIND) |\\PFRemoveDirectoryID| (FREPLACEFIELD -|\\PFPurgeRootDirectory| |\\PFRemoveRootDirEntry| |\\PFPutRootDirectory|) FORWARD.DELETE.TO ( -ERASE.TO.END.OF.LINE TTDELSECTION KILLSEGMENT ADJUSTLINE.AND.RESTORE) L-CASE (DECLARE \\PUTBASECHAR -FREERESOURCE) HASHFILESPLST1 (DECLARE) \\CORE.GETFILEHANDLE (CL:ERROR FREPLACEFIELD DECLARE) -MAKEINITLAST (SETUPSTACK MAKEINITBFS SELECTQ RECLAIM DECLARE POSTINITARRAYS PRIN1 SETUPPAGEMAP) -CHAT.STARTUP (TTY.PROCESS RPLACD MAP CHAT.INIT PROCESSPROP CLEARW |printout| DECLARE TERPRI) -|\\PFFindDirectoryID| (FREPLACEFIELD) %SORT-VECTOR (%VECTOR-QUICK-SORT %VECTOR-INSERTION-SORT -%SIMPLE-VECTOR-QUICK-SORT %SIMPLE-VECTOR-INSERTION-SORT) SEDIT::OUTPUT-SPACE (RPLACA SEDIT::SET-LINEAR - DECLARE SEDIT::STEP-LINEAR TEDIT.INSERT) \\MAKEWRITABLESTRING (%MAKE-ARRAY-WRITEABLE -%MAKE-STRING-ARRAY-FAT) OPT.DS1 (SELECTQ OPT.COMPILERERROR) READIMAGEOBJ (DECLARE DOFILESLOAD -IMAGEOBJPROP SETFILEPTR) \\INSPECT.STORE.CHAR (UNDOSAVE) PFI.HANDLE.EXPR (PFI.PRINT.COMMENTS TERPRI -PFI.MAYBE.NEW.PAGE) SHIFT.BITMAP.RIGHT (BITBLT) CARET (\\CHECKCARET) TEDIT.UNDO.REPLACE (\\SHOWSEL -TEDIT.UNDO.INSERTION TEDIT.UNDO.DELETION \\TEDIT.HISTORYADD FREPLACEFIELD \\FIXSEL) \\CORE.DELETEFILE -(FREPLACEFIELD) \\10MBRAWENCAPSULATE (FREPLACEFIELD) \\CREATECHARSET.DISPLAY (DECLARE) -SEDIT::QUOTE-CURRENT-SELECTION (SEDIT::CLOSE-OPEN-NODE) \\PRINDATUM.TO.STRING (FREERESOURCE DECLARE -PRINT-CIRCLE-SCAN \\MAPPNAME.INTERNAL CL:MAPHASH) \\PROMPTWINDOW.EXPAND (SHAPEW RPLACD) -SCAVENGEDSKDIRECTORY (DECLARE OBTAIN.MONITORLOCK ERROR UNINTERRUPTABLY |\\LFPurgeDirectory| |printout| - PRIN1 |\\LFMakeVolumeDirectory| |\\LFOpenDevice| |\\PFDsplyVolumes| SI::MONITOR-UNWIND) -SEDIT::OUTPUT-BITMAP (SEDIT::STEP-LINEAR) PFI.PRINT.TO.TAB (DSPXPOSITION PRIN3 RELMOVETO) -COMPILER::GENCODE-LET (COMPILER::GENCODE) %MAKE-ARRAY-WRITEABLE (CL:ERROR UNINTERRUPTABLY) MSSTOREDATA - (PUTHASH STORETABLE PUTTABLE) \\FM.FORMATBYROW (MAPC TCONC LCONC EXTENDREGION LISTPUT) -COPY.TEXT.TO.IMAGE (FREPLACEFIELD TERPRI \\OUTCHAR SELCHARQ DSPFONT BIN) CL:COMPILE (DECLARE -COMPILER::WARN-ABOUT-UNKNOWN-FUNCTIONS) \\10MBRAWRECEIVE (\\10MBSETUPRECEIVER FREPLACEFIELD) -BMOBJ.DISPLAYFN (DECLARE RELMOVETO SELECTQ BITBLT SCALEDBITBLT) \\TEDIT.CENTER.SEL (MAPC LISTPUT -TEDIT.PARALOOKS TEDIT.PROMPTPRINT) \\LEAF.REQUESTPAGE (INCLEAFSTAT RPLACD) COMP.GO (SELECTQ COMP.STPOP - COMP.STJUMP COMPERROR COMP.STUNBIND) FONTSAVAILABLE (DECLARE LISPERROR \\ILLEGAL.ARG) PROCESS.EVALV ( -\\SMASHLINK) \\BUILDSLUGCSINFO (\\FSETWIDTH FREPLACEFIELD \\FSETOFFSET BLTSHADE) -\\ITEM.WINDOW.COPY.HANDLER (TOTOPW \\ITEMW.FLIPCOPY BLOCK DECLARE BKSYSBUF.GENERAL GETMOUSESTATE) -\\4DISPLAYINIT (DECLARE) DINFO.HISTORIC.UPDATE (FLASHWINDOW DECLARE TERPRI) SPP.FORCEOUTPUT ( -UNINTERRUPTABLY \\SPPINCFILEPTR DECLARE APPLY* \\SPP.STREAM.LOST) \\FM.FORMATBYGRID (MAPC LCONC -EXTENDREGION \\FM.PUSHGROUP LISTPUT) OPT.DEADSETQP (DECLARE) COMPILER::GENCODE-MV-CALL ( -COMPILER::GENERATE-VALUES COMPILER::GENCODE) \\CREATE-REAL-CHARSET.DISPLAY (ERROR) -TEDIT.GET.CHARLOOKS0 (FREPLACEFIELD FRPLACD) \\FM.STATE-SELECTEDFN (RESETSAVE) \\POLYSHADE.DISPLAY ( -|\\DrawScanList.Display| BRESSTEP) AS.NEXT.VERIFIER (RPLACA) \\DEFAULTSTATE.IP (SCALE.IP) -CLOSEMAINWINDOW (\\CLOSEW1) ADDPME (HELP \\NEWPAGE \\PUTBASE) SORT.PUPHOSTS.BY.DISTANCE (MAPC BLOCK) -\\HANDLE.PUP.ROUTING.INFO (\\ADD.ROUTING.TABLE.ENTRY \\BLT) \\NSFILING.FILLIN.ATTRIBUTES (MAPC -COURIER.SIGNAL.ERROR) \\COPY (\\PUTBASE MKI.IEEE) \\BSP.DEFAULT.ERROR.HANDLER (DECLARE) -\\TEDIT.DIFFUSE.PARALOOKS (FREPLACEFIELD) \\TEDIT.FOREIGN.COPY? (\\SETUPGETCH BKSYSBUF COPYINSERT -\\SHOWSEL) STREQUAL (DECLARE) READPAGEMAPBLOCK (FRPTQ) \\DSPBOTTOMMARGIN.PSC (FREPLACEFIELD) -\\DURATIONTRAN (DECLARE SETERRORN ERRORX ERROR MAP /RPLACA) COMP.PROG (PUTHASH COMP.STBIND MAPC -COMP.EFFECT COMP.DELPOP COMP.EXPR) SEDIT::MUTATE (TERPRI |printout|) -SET-CONNECTED-DIRECTORY-INTERACTIVELY (DECLARE CLEARW ALLOW.BUTTON.EVENTS) |\\LFCloseFile| (DECLARE -OBTAIN.MONITORLOCK \\CLEARMAP UNINTERRUPTABLY |\\LFTruncateFile| |\\PFTrimHelper| |\\PFSaveBuffers| -SI::MONITOR-UNWIND) \\READDISPLAYFONTFILE (DECLARE RESETLST RESETSAVE SHOULDNT) GETHASHKEY (SETFILEPTR -) XCL::WALK-DECLARATIONS (CL:MULTIPLE-VALUE-SETQ) ERROR (DECLARE SIGNAL ERRORMESS1 SETERRORN) -|\\PFInsertDirectoryID| (FREPLACEFIELD |\\PFCreateRootDirectory| |\\PFAddRootDirEntry| -|\\PFPutRootDirectory|) COMP.LAMBDA (COMP.VAL COMP.DELPUSH MAPC COMP.STPOP COMPERROR COMP.STBIND -COMP.VALN) \\FM.FORMATBYCOLUMN (MAPC TCONC LCONC EXTENDREGION LISTPUT) OPT.DELCOPYFN (OPT.PRDEL) -\\CORE.SETACCESSTIME (SELECTQ FREPLACEFIELD SHOULDNT) |\\VFMGenerateFileIDs| (DECLARE -OBTAIN.MONITORLOCK |\\VFMContextSet| FREPLACEFIELD MESASETQ FRPLACD SI::MONITOR-UNWIND) -MBUTTON.FIND.NEXT.FIELD (FREPLACEFIELD \\FIXSEL) \\FM.STATE-SETUP (DECLARE FREPLACEFIELD LISTPUT) -MSEDITE (FRPLACD APPLY EDITE) SPY.BUTTON (BITBLT WINDOWPROP) WRITEIMAGEOBJ (HELP PRIN2 APPLY*) -\\FM.FORMAT (\\FM.SETUPPROPS RPLNODE2 \\FM.CHECKPROPS \\FM.SETFORMATPROPS \\FM.CHECKFORBOX -\\FM.JUSTIFYITEMS \\FM.JUSTIFYGROUPS \\FM.UPDATEFORBOX) TEXTTOIMAGEFILE (RESETSAVE COPY.TEXT.TO.IMAGE) - OR (DECLARE) \\10MBRAWTRANSMIT (\\QUEUE.OUTPUT.IOCB) BMOBJ.IMAGEBOXFN (DECLARE) PURGEHISTORY (DECLARE - SELECTQ TERPRI HELP PURGEHISTORY1 MAPC SI::RESETUNWIND) \\LEAF.LOOKUPCACHE (RPLACD FREPLACEFIELD) -EDITBMRESHAPEFN (EDITBMREPAINTFN) \\OPENLEAFCONNECTION (DECLARE OBTAIN.MONITORLOCK INITSEQUIN -FREPLACEFIELD RESETSAVE \\CLEARBYTES \\ADDLEAFSTRING PUTSEQUIN AWAIT.EVENT RELEASE.PUP \\SEQUIN.CLOSE -SI::MONITOR-UNWIND) ICONBUTTONEVENTFN (EXPANDW) TITLEW.BUTTONEVENTFN (WITH-INSPECTOR-ENV) -\\DOHARDRETURN (\\DOHARDRETURN1 \\CONTEXTSWITCH) \\CORE.NAMESCAN (RPLACD) \\DSPSPACEFACTOR.PSC ( -DECLARE POSTSCRIPT.SHOWACCUM FREPLACEFIELD) \\SETARG0 (CHECK) TEDIT-BOOK (MAPC TEDIT.SETSEL -TEDIT.FORMAT.HARDCOPY) \\DOGC1 (\\GCSCANSTACK \\GCMAPSCAN \\GCMAPUNSCAN) WHO-LINE-CURRENT-DIRECTORY ( -DECLARE MERGEINSERT) TEDIT.GET.PARALOOKS0 (FREPLACEFIELD FRPLACD RPLACA RPLACD) FIND.LINE (DECLARE -SHOULDNT) HASH.PASSWORD (DECLARE) DOSLINKER (PRIN1) \\CORE.SETFILEPTR (\\CORE.UPDATEOF UNINTERRUPTABLY -) \\CORE.UNPACKFILENAME (DECLARE) \\INSPECT.STORE.8 (UNDOSAVE) \\ROUTE.PUP (FREPLACEFIELD -ENCAPSULATE.ETHERPACKET) \\NSFILING.FULLNAME (MAPC SELCHARQ FREPLACEFIELD) -SEDIT::MENU-SUBSTITUTE-SELECTEDFN (SEDIT::MENU-SELECTEDFN) \\CORE.BACKFILEPTR (LISPERROR -\\CORE.UPDATEOF) \\FM.STATE-CHANGESTATE (DECLARE FREPLACEFIELD) TEDIT.HARDCOPY (ERROR) BLTSHADE ( -DECLARE) GNCCODE (UNINTERRUPTABLY FREPLACEFIELD %SET-ARRAY-OFFSET) \\NSRANDOM.REESTABLISH ( -\\NSRANDOM.PROCEEDABLE.ERROR) MOVETOP (FRPLACD FRPLACA) XCL::ADD-WHERE-IS-DATABASE ( -XCL::DEL-WHERE-IS-DATABASE) \\DECUSECOUNT (CHECK FREPLACEFIELD \\MAKEFREEBLOCK \\DECUSECOUNT) -\\PUTBASESTRINGFAT (\\MOVEBYTES \\PUTBASETHIN) U-CASEP (DECLARE) CL:PRINT (SPACES) DO.EDIT.COMMAND ( -SELCHARQ RESTOREBUF MOVE.TO.LINE BEEP MOVE.TO.NEXT.LINE MOVE.FORWARD.TO MOVE.BACK.TO FORWARD.DELETE.TO - SKIP/ZAP U/L-CASE READFROMBUF MOVE.TO.WHEREVER TTDELETEWORD DECLARE CHECK DELETE.TO.END DELETELINE -TTUNREADBUF OVERFLOW? ADJUSTLINE.AND.RESTORE RETYPE.BUFFER GO.TO.RELATIVE FRPLACA TYPE.BUFFER -BREAKLINE DREMOVE ADDSPELL DO.EDIT.PP) UNDONLSETQ (LISTPUT1 DECLARE SI::RESETUNWIND UNDOSAVE -UNDONLSETQ1) \\PUTBASESTRING (DECLARE \\PUTBASEBYTE ERROR \\MOVEBYTES) \\SEARCHDISPLAYFONTFILES ( -DECLARE) CLIPRECTANGLE.IP (APPENDNUMBER.IP) \\PUPGATELISTENER (PROCESSPROP \\HANDLE.PUP.ROUTING.INFO -BLOCK \\AGE.ROUTING.TABLE SETUPPUP SENDPUP) \\NSFILING.HANDLE.ERROR (PRINTOUT TERPRI DECLARE -RELEASE.MONITORLOCK OBTAIN.MONITORLOCK) COMPILER::ALPHA-TAGBODY (MAPC) \\FM.NWAY-SETUP (DECLARE -FREPLACEFIELD LISTPUT) \\DOSTACKOVERFLOW (FREPLACEFIELD \\GATHER-CLEANUP-FORMS \\CONTEXTSWITCH) -\\DSPTRANSLATE.IP (TRANSLATE.IP) INSPECTW.REPAINTFN (WITH-INSPECTOR-ENV PRINTATBOX) \\MOVEFRAME ( -FLIPCURSORBAR FREPLACEFIELD CHECK \\BLT \\MAKEFREEBLOCK) COURIERTRACE (CLOSEW WINDOWPROP DSPFONT -DSPSCROLL TOTOPW) \\INCUSECOUNT (CHECK \\MP.ERROR SELECTC) \\CORE.PACKFILENAME (DECLARE) -\\INSPECT.STORE.16 (UNDOSAVE) START.CLEARINGHOUSE (GETCLEARINGHOUSE) CONSTANTEXPRESSIONP (FRPLACD) -\\SETUPUSERSTACK (\\UNLOCKPAGES FREPLACEFIELD \\SETUPGUARDBLOCK \\CONTEXTSWITCH) COMPSETREAD (PRIN1 -READC NCONC) MAKEROOMFORPME (\\NEWPAGE \\PUTBASE) PFI.PRINT.ENVIRONMENT (PRINTDEF PRIN3) -|SetBcplString| (LISPERROR \\PUTBASEBYTE \\PUTBASESTRING) \\GATHER-CLEANUP-FORMS (FREPLACEFIELD) -SPELLFILE1 (DECLARE MAP) MAKECREATELST1 (HELP FRPLACD) \\3MBRAWRECEIVE (\\BLT FREPLACEFIELD) -\\TEDIT.BOLD.CARET.ON (TEDIT.CARETLOOKS \\TEDIT.SHOWCARETLOOKS) PURGEHISTORY2 (RPLACD MAPC) \\DOGC ( -\\DOGC1 \\CONTEXTSWITCH) \\SFMAKEITALIC (BITBLT) \\INIT-MISCN-TABLE (DECLARE MAPC SETA) -MOUSESTATE-EXPR (SHOULDNT) %MAKE-STRING-ARRAY-FAT (CL:ERROR UNINTERRUPTABLY) /LCONC (ERROR) -SUBFIELDCREATE (FRPLACD) EDITBMREPAINTFN (CLEARW BLTSHADE UPDATE/BM/DISPLAY GRID RESETGRID.NEW) -\\8DISPLAYINIT (DECLARE) \\EXTENDSTACK (FREPLACEFIELD \\DOLOCKPAGES \\MAKEFREEBLOCK \\SETUPGUARDBLOCK) - /ECHOMODE (UNDOSAVE) \\GENERIC-UNREGISTER-STREAM (DECLARE \\ILLEGAL.ARG ERROR FREPLACEFIELD) -POSTINITARRAYS (|printout| PRIN1 TAB HELP \\LINKBLOCK SETQ.NOREF \\MAKEMDSENTRY) \\PARSE.NUMBER ( -DECLARE) GETNSPRINTER (|printout| TAB) CLISP3 (CLISP4) COMPILER::FIND-REACHABLE-TAGS (COMPILER::FIND-ALL-TAGS -) \\PAGEDEOFP (\\UPDATEOF) COURIER.CALL (FRPLACD RESETSAVE) FINDATOM (RELSTK) \\FM.3STATE-CHANGESTATE -(DECLARE FREPLACEFIELD) MSEDITF (FRPLACD APPLY EDITE) ED (FRPLACD TERPRI EDITE EDITDEF) CHECKIFPAGE ( -PRIN1) FIXSPELL1 (ERROR! LISPXTERPRI TERPRI NCONC1 PRIN2 PRIN1 FIXSPELL2 LINBUF SYSBUF FIXPRINTIN -LISPXPRIN1 BKBUFS SELECTQ LISPXWATCH LISPXPUT) |\\VAMAdjustGroup| (FREPLACEFIELD) \\FONTFILENAME ( -RPLACD) \\24DISPLAYINIT (DECLARE) FILL.INITTBLE (\\PUTBASE \\SETPBTFUNCTION \\INSURETOPWDS DECLARE) -SPELLFILE.MATCHINGDIRS (FRPLACD NCONC1) |\\LFEntryPoint| (\\ILLEGAL.ARG SELECTQ ERROR -|\\PFEnsureInitialized|) CL:FORMAT (CL::WITH-FORMAT-ESCAPES) \\CORE.GETFILENAME (DECLARE -\\CORE.UNPACKFILENAME) \\FTP.FIX.BROKEN.INPUT (|printout| TERPRI PRIN2 FRPLACD \\SMASHBSPSTREAM -\\BSP.DECLARE.FILEPTR SETFILEPTR ERROR) TERM.ERASE.IN.DISPLAY (\\DTEST TERM.ERASE.TO.EOL CLEARW) -CHAT.PROMPT.FOR.INPUT (CLEARW WINDOWPROP) PUTCHARBITMAP (\\ILLEGAL.ARG) COMP.SETN (COMPERRM) -\\CORE.SETEOFPTR (\\CORE.UPDATEOF UNINTERRUPTABLY FREPLACEFIELD \\ZEROBYTES \\CORE.RELEASEPAGES) -CLOSEICONWINDOW (WINDOWDELPROP CLOSEW DOUSERFNS) \\NODIRCORE.OPENFILE (\\FILE.WONT.OPEN DECLARE -FREPLACEFIELD SELECTQ \\COREFILE.SETPARAMETERS \\CORE.SETACCESSTIME) INSPECT/ATOM (PRINTOUT TERPRI) -\\ALLOCBLOCK (DECLARE \\ILLEGAL.ARG \\LISPERROR SELECTQ ERROR UNINTERRUPTABLY FRPTQ FREPLACEFIELD -\\CHECKARRAYBLOCK .INCREMENT.ALLOCATION.COUNT. \\CREATEREF LISPERROR) \\SETUPGUARDBLOCK (FREPLACEFIELD -) UNIX-STREAM-IN (BLOCK) \\LEAF.ABORT.FROMMENU (SHADEITEM FREPLACEFIELD NOTIFY.EVENT) -\\CORE.GETNEXTBUFFER (LISPERROR SHOULDNT UNINTERRUPTABLY \\ILLEGAL.ARG BLOCK) CL:MAKUNBOUND ( -XCL::SET-CONSTANTP) \\TFBRAVO.PARSE.PROFILE.VALUE (RPLNODE2) COMPILER::COMPILE-FILE-DEFINE-FILE-INFO ( -DECLARE) CHANGE-TTY-PROCESS-INTERACTIVELY (DECLARE) \\MAKEMDSENTRY (DECLARE) ARRAY (SELECTC \\PUTBASE -\\BLT \\PUTBASEFIXP FRPTQ \\PUTBASEFLOATP SHOULDNT) \\PS.SCALEHACK (POSTSCRIPT.SHOWACCUM MAPC -FREPLACEFIELD) EDIT.BITMAP.REAL (CLEARW |printout| TERPRI) \\POSTSCRIPT.OUTCHARFN (DECLARE -\\TERPRI.PSC BOUT SELECTQ \\POSTSCRIPT.SPECIALOUTCHARFN \\POSTSCRIPT.ACCENTFN \\POSTSCRIPT.ACCENTPAIR -POSTSCRIPT.SHOWACCUM \\UPDATE.PSC APPLY* FREPLACEFIELD POSTSCRIPT.OUTSTR \\ILLEGAL.ARG DSPNEWPAGE -\\MOVETO.PSC \\POSTSCRIPT.PRINTSLUG) HELPSYS (PROMPTPRINT) \\GCSCANSTACK (SELECTC CHECK FRPTQ -FREPLACEFIELD) MBUTTON.CHANGENAME (IMAGEOBJPROP MB.SETIMAGE TEDIT.OBJECT.CHANGED) -\\TEDIT.BOLD.CARET.OFF (TEDIT.CARETLOOKS \\TEDIT.SHOWCARETLOOKS) EVALUABLE.CONSTANTP (DECLARE FRPLACD) - VAR.NOT.USED (SETERRORN) \\TELEBLTCURSOR (\\BLT) \\INITATOMPAGE (\\NEW4PAGE FRPTQ \\NEWPAGE) -\\TEDIT.EXPANDED.MENU (\\TEXTMENU.START \\TEXTMENU.SET.TOGGLE) MAPATOMS (APPLY* HELP) DUMPINITPAGES ( -ADDPME MAPPAGES FREPLACEFIELD DECLARE ALLOCAL SETFILEPTR) \\ORIGREADTABLE (SETSEPR \\SETREADSYNTAX) -COMP.SETQ (COMP.PROGLST COMP.STSETQ COMP.BOX) SPELLFILEDIR (DECLARE) OPT.EQOP (OPT.CCHECK) -|\\LFScavFileName| (DECLARE FRPLACD) TEDIT.GET.OBJECT1 (SETFILEPTR FREPLACEFIELD) -XCL::CLEAR-IMPLICIT-KEY-HASH (UNINTERRUPTABLY) SCALE/TONODES (LISTPUT) CLISPIFY2 (RETEVAL) -|\\VAMUpdateVAM| (DECLARE SELECTQ |\\VAMMarkBufferDirty| SHOULDNT \\PUTBASE) \\FONTFACE.COLOR (DECLARE - FRPLACD FRPLACA \\ILLEGAL.ARG) BEGINPREAMBLE.IP (APPENDOP.IP) FONTCOPY (FRPLACD FRPLACA MAP) -SEDIT::MENU-PRINTBASE-SELECTEDFN (|printout| DECLARE TERPRI) \\ALLOCHEIGHTTOGROUPEDWINDOW ( -\\SETWINFOXSIZE MAPC) \\DSPCLIPPINGREGION.PSC (POSTSCRIPT.SHOWACCUM FREPLACEFIELD \\FIXLINELENGTH.PSC) - \\CH.UPDATE.CACHE (|printout| TAB SHOW.CLEARINGHOUSE) \\TEDIT.GET.PARALOOKS1 (FREPLACEFIELD FRPLACD -RPLACA RPLACD) \\POPSTATE.IP (SHOW.IP POP-IP-STACK FGET.IP) UNSAVEDEF (SAVEDEF PUTDEF) EOFCLOSEF ( -DECLARE APPLY*) \\NSRANDOM.RELEASE.LOCK (FILING.CALL) \\ALLOCWIDTHTOGROUPEDWINDOW (FRPLACD -\\SETWINFOYSIZE MAPC) OPENP (DECLARE) |\\LFPurgeDirectory| (|\\LFCloseDirectory| -|\\PFRemoveDirectoryID| FREPLACEFIELD |\\PFTrimHelper|) \\CLIPANDDRAWLINE1 (\\PUTBASE \\SOFTCURSORDOWN - \\INSURETOPWDS DECLARE \\DRAWLINE1 \\SOFTCURSORUPCURRENT SELECTQ \\DRAWCOLORLINE1 SHOULDNT) -\\PAGEDGETEOFPTR (\\UPDATEOF) \\TEDIT.MARK.LINES.DIRTY (FREPLACEFIELD) \\ADD-OPEN-STREAM ( -\\ILLEGAL.ARG FREPLACEFIELD) SPELLFILE.SPELL1 (DECLARE SETA) |\\LFUnpackName| (DECLARE FRPLACD) -\\UNDEFINED-MISCN-UFN (PRINTOUT PRIN1) \\COURIER.ATTENTIONFN (DECLARE FREPLACEFIELD |printout| TAB) -|\\LFReadFileID| (\\SETFILEPTR |\\LFCheckBang| |\\LFDirectoryScrambled| \\BIN) DOICONWINDOWCOM (TOTOPW - APPLY*) DELETETO1 (DELETETO1 SELECTQ TTBOUT ADD1VAR) \\LEAF.DEVICEP (\\DEFINEDEVICE -\\RELEASE.FTPCONNECTION) FROM.SCREEN.BITMAP (|printout| TERPRI BITBLT) DEFAULT.INSPECTW.PROPCOMMANDFN -(RESETLST REMOVEPROMPTWINDOW) ATOMHASH#PROBES (DECLARE COMPUTE.ATOM.HASH) CL:FIND (CL:ERROR) -\\3MBRAWTRANSMIT (\\BLT \\WRITERAWPBI) SEDIT::COPY-SELECTION (DECLARE TERPRI CL:FUNCALL) -\\TEDIT.BOLD.SEL.ON (\\TEDIT.BOLD.CARET.ON) COMPILER::GENCODE-IF (COMPILER::GENCODE) /DELETECONTROL ( -UNDOSAVE) \\HCPYMODEDISPLAYINIT (DECLARE) TB.COLLECT.ITEMS (SELECTQ FRPLACD) SI::NON-LOCAL-RETURN ( -FRPLACD) \\NSPRINT.INTERNAL (SPP.CLOSE) \\DSPRESET.PSC (FREPLACEFIELD) DECLARERECORD (RECORDERROR -PUTHASH LISPXPRINT MAPC /RPLACA MARKASCHANGED RECREDECLARE) ELT (\\DTEST) \\INIT-USER-SUBR-TABLE ( -DECLARE) \\FM.3STATE-DOWNFN (BLTSHADE) FB.PROMPTWPRINT (SELECTQ TERPRI CLEARW FRESHLINE PRIN1) -|\\LFDirectoryP| (\\SETACCESS FREPLACEFIELD \\OPENFILE) ERRORMESS (LISPXPUT) CLOSEALL (DECLARE FRPLACD -) \\READSTRIKEFONTFILE (SETFILEPTR FREPLACEFIELD \\BINS \\FSETOFFSET \\FSETWIDTH \\FONTRESETCHARWIDTHS -) CL:THROW (DECLARE) SEDIT::GENERATE-LINEAR-FORM (SEDIT::REUSE-LINEAR-FORM CL:FUNCALL) -TB.UNSELECT.ALL.ITEMS (TB.SHOW.SELECTION) PUTD (\\ILLEGAL.ARG \\PUTD) \\READACFONTFILE (RESETSAVE -COPYBYTES SETFILEPTR ERROR \\FSETIMAGEWIDTH \\FSETWIDTH FREPLACEFIELD \\FSETOFFSET \\BINS BITBLT) -DELETE.TO.END (SETTAIL? ERASE.TO.END.OF.PAGE KILL.LINES) |\\LFOpenOldFile| (FREPLACEFIELD DECLARE -|\\PFGetPage|) \\FM.3STATE-SETUPOFFBITMAP (LISTPUT DECLARE FREPLACEFIELD BLTSHADE DRAWLINE) -\\SFLHASHLOOKUP (FREPLACEFIELD) INSPECTW.CREATE (DSPFONT DSPRIGHTMARGIN WINDOWPROP) PF (RESETSAVE -PRINTFN) \\INVALID.INTEGER (CL:CERROR) \\MKATOM.FULL (DECLARE FREPLACEFIELD) SI::GET-CACHE-CLOSURE ( -UNINTERRUPTABLY FREPLACEFIELD) SEDIT::MENU-INIT-STATE (FM.CHANGESTATE FM.CHANGELABEL) -\\EDITBM/PUTUP/DISPLAY (RESETGRID.NEW) OPT.PRATTACH (PUTHASH FRPLACA) \\DELETETREE (HELP \\RPLPTR -\\PUTBASEPTR \\PUTBASEFIXP \\DELETETREE \\TEDIT.UPDATETREE) RECLOOK (RECORDERROR) \\NODIRCOREFDEV ( -FREPLACEFIELD \\DEFINEDEVICE) \\FONTRESETCHARWIDTHS (\\FSETOFFSET \\FSETWIDTH) \\DRAWPOLYGON.PSC ( -|printout| PRIN1 POSTSCRIPT.OUTSTR MAPC) \\CREATE.SYMBOL (FREPLACEFIELD DECLARE \\MKATOM.FULL -\\MAKEMDSENTRY \\INITATOMPAGE \\BLT \\PUTBASETHIN \\MOVEBYTES \\ADDREF) \\CORE.OPENFILE (FREPLACEFIELD - DECLARE \\FILE.WONT.OPEN \\COREFILE.SETPARAMETERS \\CORE.SETACCESSTIME) FB.SELECTEDFILES ( -FB.PROMPTWPRINT) LOOKUPHASHFILE (INSERTHASHKEY REPLACEHASHKEY DELETEHASHKEY) SEDIT::MENU-PACKAGE-SELECTEDFN - (|printout| DECLARE TERPRI) SI::UNWIND-TO-BLIP (ERROR SI::UNWIND FREPLACEFIELD) MBUTTON.CREATE ( -IMAGEOBJPROP MB.SETIMAGE) \\DOHARDRETURN1 (CHECK FREPLACEFIELD \\DECUSECOUNT FLIPCURSORBAR \\BLT -\\INCUSECOUNT \\SMASHLINK) SHADEGRIDBOX (BLTSHADE BITMAPBIT) /CONTROL (UNDOSAVE) -\\BSP.CLOSE.OPEN.SOCKETS (FRPLACD WAKE.PROCESS CLOSERTPSOCKET) PF* (DECLARE APPLY SI::RESETUNWIND) -MAKE-NETWORK-TRACE-WINDOW (TOTOPW DSPFONT DSPSCROLL) UNDOLISPX (MAPC SOME PRIN1) \\STKMIN (DECLARE -\\PUTBASEBYTE CL:FORMAT PRIN1) SI::NON-LOCAL-GO (FREPLACEFIELD) HISTORYFIND (SELECTQ ERROR -HISTORYFIND1 RETFROM) \\TELERAIDEXIT (SELECTQ \\10MB.TURNONETHER \\TELEBLTCURSOR) -\\SFROTATECSINFOOFFSETS (\\FSETOFFSET) \\TEDIT.BOLD.SEL.OFF (\\TEDIT.BOLD.CARET.OFF) -\\SFMAKEROTATEDFONT (HELP) ROTATE-BITMAP (FREPLACEFIELD \\PILOTBITBLT) PRINT (PRIN2 \\OUTCHAR) -DECODE/WINDOW/OR/DISPLAYSTREAM (OPENW WINDOWPROP) DO.EDIT.PP (MOVE.TO.LINE ERASE.TO.END.OF.PAGE -TTYIN1RESTART TTLOADBUF SETFILEPTR BREAKLINE READFROMBUF FREERESOURCE DECLARE) CL:REMOVE (CL:ERROR) -EDITBMCLOSEFN (DETACHWINDOW CLOSEW) CURRENT.WORD (DECLARE CHECK) CLISPIFY1 (FRPLACD) PFCOPYBYTES ( -DECLARE RESETSAVE SETFILEPTR FREPLACEFIELD SELCHARQ TERPRI \\OUTCHAR) ROTATE-BITMAP-LEFT ( -FREPLACEFIELD \\PILOTBITBLT) DOATTACHEDWINDOWCOM (TOTOPW) MISCN-COLLECT (FRPLACD) FASL::COLLECT-LIST ( -FRPLACD) PROCESSPROP (FREPLACEFIELD WINDOWPROP \\SET.PROCESS.NAME \\INVALIDATE.PROCESS.WINDOW RPLACD -LISTPUT) WTFIX1 (FIXATOM SHOULDNT FIXAPPLY FIX89TYPEIN /RPLNODE ERSETQ DECLARE CLISPTRAN DWIMIFY1? -SI::RESETUNWIND CLISPELL MARKASCHANGED) \\BASEBYTES.PEEKBIN (SELECTQ) CLISPFUNCTION? (/RPLNODE) -PRINTCURSOR (|printout| PRIN1 \\CURSORBITSPERPIXEL PRINT) \\GETSPP (DECLARE OBTAIN.MONITORLOCK -UNINTERRUPTABLY \\DEQUEUE \\SPP.SENDPKT MONITOR.AWAIT.EVENT SI::MONITOR-UNWIND) \\PUTD (FREPLACEFIELD) - \\MKATOM (COMPUTE.ATOM.HASH) \\TEDIT.GET.CHARLOOKS1 (FREPLACEFIELD) RECORDFIELDNAMES (MAPC MAPCAR) -\\BASEBYTES.BOUT (APPLY* ERROR FREPLACEFIELD) BREAKLINE (DECLARE ERASE.TO.END.OF.LINE SAVE.CURSOR -TYPE.BUFFER ADJUSTLINE RESTORE.CURSOR) MENUWRESHAPEFN (DELETEMENU UPDATE/MENU/IMAGE DSPFILL ADDMENU -SHOWSHADEDITEMS) CLDISABLE (DECLARE DWIMIFY0 SI::RESETUNWIND MAPC CLDISABLE) \\BASEBYTES.BIN ( -FREPLACEFIELD) MB.PUTFN (HELP \\STRINGOUT \\SMALLPOUT DECLARE MAPC) CLEARSTK (\\MAPMDS) MAKEMAINWINDOW - (WINDOWADDPROP) \\TEXTMENU.START (WINDOWADDPROP ATTACHWINDOW FREPLACEFIELD TEDIT TTY.PROCESS) -\\FILLPOLYGON.PSC (DECLARE BLTSHADE BITBLT MAPC POSTSCRIPT.PUTBITMAPBYTES) INFILECOMS? (SELECTQ -INFILECOMSVAL INFILECOMS) \\BASEBYTES.SETFILEPTR (ERROR FREPLACEFIELD) PERIODICALLY-UPDATE-WHO-LINE ( -DECLARE) \\SFFIXOFFSETSAFTERROTATION (HELP) \\USER-SUBR-UFN (DECLARE \\INIT-USER-SUBR-TABLE) -\\TEDIT.RESHAPEFN (\\SHOWSEL FREPLACEFIELD \\DISPLAYLINE \\FILLWINDOW \\FIXSEL) PRINTFNDEF (RESETSAVE -PRIN1 PRIN2) \\FM.3STATE-SETUP (DECLARE FREPLACEFIELD LISTPUT) COURIER.READ.NSADDRESS (\\BINS) -COMPERRM (LISPXTAB LISPXPRIN1 LISPXPRIN2 RESETFORM COMPERRM) \\TEDIT.CUMULATE.EVENTS (FREPLACEFIELD) -\\BASEBYTES.IO.INIT (DECLARE) \\RENAMEDFN (\\COPYCODEBLOCK) TEDIT.SCANSEL (\\SETUPGETCH) -\\DISCARDFRAME (\\DECUSECOUNT FREPLACEFIELD \\MAKEFREEBLOCK CHECK) \\LEAF.SETCREATIONDATE ( -FREPLACEFIELD \\SENDLEAF \\LEAF.SETVALIDATION) \\LEAF.DELETEFILE (FREPLACEFIELD RELEASE.PUP) -INSPECTW.REDISPLAY (\\ITEMW.DESELECTITEM CLEARW MOVETOUPPERLEFT) \\MAKEBASEBYTESTREAM (SHOULDNT -\\ILLEGAL.ARG \\SETACCESS CLOSEF DECLARE UNINTERRUPTABLY) FILL.XPER (.WHILE.TOP.DS. \\PUTBASE -\\SOFTCURSORDOWN \\INSURETOPWDS DECLARE FILL.LINE \\SOFTCURSORUPCURRENT) \\FINDOP (MAPC PUTPROP) -|\\LFCreateFile| (DECLARE FREPLACEFIELD |\\LFMakeDirEntry|) SEDIT::CLEAN-UP-AFTER-RELINEARIZATION ( -FREPLACEFIELD) SEDIT::MENU-FIND-SELECTEDFN (SEDIT::MENU-SELECTEDFN) \\LINEWITHBRUSH (DECLARE -.SETUP.FOR.\\BBTCURVEPT. SELECTQ SHOULDNT \\INSURETOPWDS APPLY* .WHILE.TOP.DS. \\PUTBASE -\\SOFTCURSORDOWN \\CURVEPT \\SOFTCURSORUPCURRENT) \\TEDIT.CLOSEUPLINES (BITBLT FREPLACEFIELD -\\DISPLAYLINE) \\MBS.OUTCHARFN (BOUT) \\SETUPSTACK1 (\\BLT FRPTQ FREPLACEFIELD RPTQ \\PUTBASE -\\MAKEFREEBLOCK) TEDIT.OBJECT.CHANGED (HELP \\TEDIT.MARK.LINES.DIRTY \\TEDIT.WINDOW.TITLE -FREPLACEFIELD \\SHOWSEL TEDIT.UPDATE.SCREEN \\FIXSEL) CLISPRPLNODE (UNDOSAVE FRPLACA) -\\TFBRAVO.PARSE.PROFILE.PARA (DECLARE\: SELECTQ \\TFBRAVO.ASSERT) \\CORE.GETINFOBLOCK (DECLARE -\\CORE.UNPACKFILENAME SELECTQ SHOULDNT) \\CLIPANDDRAWLINE (\\PUTBASE \\SOFTCURSORDOWN \\INSURETOPWDS -DECLARE \\DRAWPOINT.DISPLAY \\SOFTCURSORUPCURRENT BITBLT \\CLIPANDDRAWLINE1) -SET-READTABLE-INTERACTIVELY (DECLARE MAPHASH) EDITBMSCROLLFN (RESETGRID.NEW BLTSHADE UPDATE/BM/DISPLAY -) ICMLARRAY.GETMENUWGROUP (DSPSCROLL DSPFONT MOVEW REDISPLAYW ATTACHWINDOW) \\RESETSTACK ( -\\RESETSTACK0 \\CONTEXTSWITCH) |\\VFMPutNext| (MESASETQ FREPLACEFIELD SETA) MB.GETFN (ERROR -\\STRINGOUT \\SMALLPOUT DECLARE MAPC) \\CANONICALIZE.PUP.HOSTNAME (DECLARE) TEDIT.RAW.INCLUDE ( -\\SHOWSEL SETFILEPTR COPYBYTES CLOSEF \\TEDIT.INSERT.PIECES \\FIXILINES TEDIT.UPDATE.SCREEN \\FIXSEL -\\TEDIT.WINDOW.TITLE \\SETUPGETCH) \\INSPECT.STORE.PTR (UNDOSAVE) BEGINPAGE.IP (APPENDOP.IP) -|\\LFMakeVolumeDirectory| (|DiskError| LISPERROR |\\PFSaveBuffers| |\\LFMakeLeaderPage| -|\\PFInsertDirectoryID|) INITBITMASKS (SETA) SEDIT::SELECT-SEGMENT (FREPLACEFIELD) \\RESETSTACK0 ( -FREPLACEFIELD \\SETUPGUARDBLOCK) WHENCLOSE (DECLARE STREAMPROP STREAMADDPROP) TB.UNSELECT.ITEM ( -TB.DESELECTRANGE) FILL.CONT (BLTSHADE) CHAT.BIN (FORCEOUTPUT \\TTYBACKGROUND) \\DOTELERAID ( -\\TELERAIDSERVER \\CONTEXTSWITCH) |\\LFGetStreamForFile| (|printout| TERPRI) \\UPCASEBASE ( -\\PUTBASECHAR DECLARE) MAXMENUITEMWIDTH (DECLARE) \\BASEBYTES.BLOCKIO (STREAMOP BOUT FREPLACEFIELD -\\MOVEBYTES) COMPILER::GENCODE-CATCH (COMPILER::GENCODE COMPILER::SET-UP-RETURN-TO) -WRITESTRIKEFONTFILE (LISPERROR ERROR \\WOUT DECLARE \\BOUTS CLOSEF) PRINTWORDS (|printout| PRIN2 PRIN1 -) COMPILER::GENCODE-BLOCK (COMPILER::GENCODE) \\RESETTERMINAL (DECLARE FREPLACEFIELD \\RESETLINE) -COURIER.EXECUTE.CALL (\\COURIER.TRACE PUTWORD PUTLONG DECLARE SELECTQ COURIER.WRITE CHECK) UNDONLSETQ1 - (FRPLACD FRPLACA APPLY LISPXWATCH) \\LEAF.GETFILE (DECLARE OBTAIN.MONITORLOCK \\LEAF.GETFILEDATES -\\LEAF.CLOSEFILE SI::MONITOR-UNWIND \\CLEARBYTES \\ADDLEAFSTRING RELEASE.PUP) FB.UPDATEBROWSERITEMS ( -FB.ALLOW.ABORT FB.SETNEWPATTERN RPLACA FRPLACD FB.SET.BROWSER.TITLE CLEARW TB.REPLACE.ITEMS -TB.SET.FONT FB.SET.DEFAULT.NAME.WIDTH CL:MULTIPLE-VALUE-SETQ FB.PROMPTW.FORMAT FB.HEADINGW.DISPLAY -FB.ADD.FILEGROUP FB.PROMPTWPRINT TB.REDISPLAY.ITEMS FB.DISPLAY.COUNTERS) \\CH.CHECK.CLEARINGHOUSE ( -|printout| TERPRI \\CH.UPDATE.CACHE) ERASEPROPS (TERPRI PRIN1) \\KEYBOARDON (\\SETIOPOINTERS \\PUTBASE -) PRINTERDEVICE (FREPLACEFIELD \\DEFINEDEVICE) TOPW.BUTTONEVENTFN (TOTOPW GETMOUSESTATE) SEDIT::JOIN ( -SEDIT::CLOSE-OPEN-NODE |printout| TERPRI SEDIT::PENDING-DELETE SEDIT::START-UNDO-BLOCK SELECTQ FRPLACD - SEDIT::SET-POINT SEDIT::DELETE-NODES SEDIT::INSERT SEDIT::END-UNDO-BLOCK) INTERPRET.REM.CM (DECLARE -CLOSEF RPLCHARCODE BKSYSBUF) COMP.CALL (SELECTQ COMP.STCONST COMP.VAL COMPERROR) PRINTHISTORY (TERPRI -MAPC PRIN2 PRIN1) TB.SELECTRANGE (FREPLACEFIELD) UNDOLISPX2 (/RPLNODE APPLY /ATTACH) EVAL (DECLARE) -COMP.DECLARE1 (SET) COMP.LAM1 (COMP.TOPLEVEL.COMPILE) |\\LFUpdateLeaderPage| (FREPLACEFIELD SELECTQ -|\\LFWriteLeaderPage|) CHAT.CHOOSE.PHONE.NUMBER (DECLARE FRPLACD) \\CENTICLOCK (\\BLT \\RCLK -FREPLACEFIELD) OPT.DELCODE (SELECTQ RPLACA MAPC DREMOVE OPT.DELTAGREF) IRM.CREF.BUTTONEVENTFN ( -GETMOUSESTATE BLOCK |printout| TERPRI CLEARW ADD.PROCESS) ICMLARRAY.GETREGIONFN (RPLACD) -HPRINT.IMAGEOBJ (PRIN2 APPLY*) COMPILER::ALPHA-MACROLET (MAPC) POSTSCRIPT.OUTSTR (DECLARE) -\\RESETSYSTEMSTATE (\\KEYBOARDON) \\CONTEXTAPPLY (\\SMASHLINK) BITBLT (DECLARE \\PUTBASE -\\SOFTCURSORDOWN \\INSURETOPWDS \\SOFTCURSORUPCURRENT TOTOPW) FILECODEBLOCK (FILEPATCHBLOCK BOUT16) -OPENSTRINGSTREAM (FREPLACEFIELD) DSPDESTINATION (DECLARE UNINTERRUPTABLY FREPLACEFIELD) RETURN ( -DECLARE \\SMASHRETURN LISPERROR) \\FBITMAPBIT.UFN (FREPLACEFIELD DECLARE) CLOSENSOCKET ( -\\FLUSHNSOCQUEUE) UPDATEPCNODES (\\PUTBASEFIXP FREPLACEFIELD HELP) CHAT.SCREENPARAMS (DECLARE -CHAT.SENDSCREENPARAMS) \\ADDOFD (\\CLEAROFD) EVALQT (ENTEREVALQT FRESHLINE PROMPTCHAR TERPRI) -\\BITBLT.BITMAP (DECLARE SELECTQ UNINTERRUPTABLY FREPLACEFIELD \\BITBLT.MERGE \\BITBLTSUB ERROR -\\BWTOCOLORBLT SHOULDNT) \\TELERAIDENTRY (\\KEYBOARDOFF \\BLT \\TELEBLTCURSOR \\10MB.TURNONETHER -\\10MBSETUPRECEIVER) INTERRUPTED (DECLARE \\MAIKO.ETHER-INTERRUPT \\MAIKO.CONSOLE-LOG-PRINT -\\MAIKO.IO-INTERRUPT \\DOSTORAGEFULLINTERRUPT \\DOSTACKFULLINTERRUPT \\DOVMEMFULLINTERRUPT -\\DOGCDISABLEDINTERRUPT \\DOINTERRUPTHERE) \\REPEATEDLYEVALQT (\\RESETSYSTEMSTATE EVALQT) -\\CHARWIDTH.PSC (DECLARE) EDIT.BITMAP (SET) MAXMENUITEMHEIGHT (MAPC) LISPXSTOREVALUE (FRPLACA) -BREAKCONNECTION (FRPLACD) \\TELERAIDSEND (FREPLACEFIELD SELECTQ \\3MBRAWTRANSMIT \\10MBRAWENCAPSULATE -\\10MBRAWTRANSMIT) \\TEDIT.FIND (\\SHOWSEL TEDIT.PROMPTPRINT FREPLACEFIELD -TEDIT.RESET.EXTEND.PENDING.DELETE \\FIXSEL TEDIT.NORMALIZECARET WINDOWPROP) \\GATHER-CLEANUP-FORMS1 ( -SELECTQ) TEDIT.MAKESEL (\\SHOWSEL FREPLACEFIELD \\FIXSEL) |\\DFSCurrentVolume| (|\\LFEntryPoint|) -\\GATHER-SPECIAL-BINDINGS (SELECTC) \\ATMIN (FRPLACD) ADDTOCOM1 (/RPLACD MARKASCHANGED) -SEDIT::CREATE-QUOTED-GAP (FREPLACEFIELD SEDIT::NOTE-CHANGE) FILES?1 (LISPXPRIN1 FILES?PRINTLST -LISPXTERPRI) \\TEDIT.PUT.PARALOOKS.LIST2 (\\DWOUT \\SMALLPOUT DECLARE \\TEDIT.PUT.SINGLE.PARALOOKS2 -PUTHASH) GRID (BLTSHADE BLTPATTERN BITMAPBIT \\ILLEGAL.ARG) PAGEFAULTS (DECLARE) INITIALEVALQT ( -DECLARE \\SETIOPOINTERS SIMPLEPRINT DSPBOUT EVAL SETTOPVAL INTERPRET.REM.CM) \\PUSHSTATE.IP (GETCP.IP -FSET.IP SHOW.IP PUSH-IP-STACK) STRIKECSINFO (\\FSETOFFSET BITBLT \\FSETWIDTH) \\FM.TOGGLE-CHANGESTATE -(DECLARE FREPLACEFIELD) MOVEATTACHEDWINDOWTOPLACE (SHOULDNT SHAPEW MOVEW) NIL -CLISP \\CLEARCELLS (|while| |do|) TEDIT.SELECT (|type?|) DEFAULT.BACKGROUND.COPYFN (|type?|) -INFILECOMS (|for| |in| |do|) COND.TO.IF (|for| |in| |join|) TEDIT.COPY.PARALOOKS (|type?|) TTADDTAB ( -|from| |to| |collect|) \\TEDIT.GET.SINGLE.PARALOOKS2 (|for| |from| |to| |collect|) \\HARDRESET-CLEANUP - (|for| |in| |do|) \\SETDAYTIME0 (|repeatwhile|) LOAD? (|bind| |until| |do| |finally|) -\\HARDRESET-CLEANUP1 (|for| |in| |as| |from| |by| |do| |bind| |finally|) \\NSRANDOM.WRITE.SEGMENT ( -|for| |inside| |bind| |do| |repeatuntil|) TWODINSPECT.REPAINTFN (|for| |on| |as| |until| |finally| -|in| |repeatuntil| |do| |bind|) PRINTPACKETDATA (|bind| |while| |do| |finally|) |MakeMenuOfImageTypes| - (|for| |in| |bind| |collect| |when|) CHECKIMPORTS (|for| |inside| |bind| |when| |collect| |in| |do|) -FB.THINCOMMAND (|for| |on| |bind| |do| |finally|) NS.ECHOUSER (|do| |repeatuntil| |finally|) -DELETEMENU (|type?|) COMPILER::ENV-ANALYZE-MV-PROG1 (|for| |in| |do|) TEDIT.SUBPARALOOKS (|for| |on| -|by| |collect| |bind| |while| |do|) SPY.DUMP.BUFFER (|bind| |while| |do| |first| |finally| |for| -|from| |by|) \\ZEROWORDS (|while| |do|) \\LEAF.TIMEDOUT.EXCESSIVE (|for| |in| |do| |type?| |finally|) -RESETVARS (|for| |in| |collect| |do|) \\IDLER (|for| |in| |bind| |do| |until|) INSPECT/DATATYPE (|for| - |to| |collect|) CHAT.LOGIN (|for| |in| |do|) CLEARHASHFILES (|while| |do|) FILL.TEST (|for| |from| -|to| |do|) \\TEXTSTREAMBOUT (|while| |do|) FILES? (|for| |in| |when| |do| |bind| |finally|) -|\\VAMFindFreePages| (|until| |do| |repeatuntil|) \\TEDIT.REPAINTFN (|while| |do|) -COURIER.BROADCAST.CALL (|for| |in| |thereis| |while| |do| |finally| |find| |suchthat|) RANDSET (|for| -|in| |as| |from| |to| |collect|) LAYOUTLATTICE (|for| |in| |unless| |do|) DOBACKGROUNDCOM (|type?|) -INFILECOM (|for| |in| |do| |when|) REBREAK (|for| |in| |join|) BRH/OFFSET (|for| |in| |do|) -PASTEFROMCLIPBOARD (|bind| |while| |do|) \\GCERROR (|until|) TEDIT.COPY.LOOKS (|type?|) PUP.ECHOUSER ( -|do| |repeatuntil| |finally|) FTPGETMARK (|bind| |while| |do| |finally|) FB.HARDCOPY.MAXWIDTH (|for| -|in| |bind| |when| |do| |finally|) \\FTP.WHENCLOSED (|find| |in| |suchthat|) \\DRAWARC.PSC (|for| |in| - |do|) INSPECT/HUNK (|for| |from| |to| |collect|) READPLIST (|bind| |while| |collect| |finally|) -PAINTW.READMODE (|type?|) ADJUSTLINE (|while| |do|) COMP.LOOKUPVAR (|find| |in| |suchthat|) -PAINTW.READBRUSHSHAPE (|type?|) TTDOTABS (|for| |in| |bind| |when| |do| |to| |collect|) ICMLARRAY ( -|bind| |for| |from| |to| |collect| |in| |always|) \\ICONW.FORMAT.TITLE1 (|until| |collect| |bind| |do| -) PFI.SORT.INDICES (|for| |in| |bind| |when| |collect|) COMPILER::PEEPHOLE-OPTIMIZE-CODE (|for| |on| -|eachtime| |do|) \\SENDLEAF (|type?| |until| |do|) \\PROCESS.RESET.TIMERS (|for| |in| |bind| |do| -|when|) IDATE (|while| |do| |for| |in| |bind|) YMAPLIST (|while| |do| |for| |in|) SEDIT::TRACK-SELECT -(|bind| |first| |do| |repeatuntil| |finally|) SPY.ORIGINAL (|for| |in| |join|) \\GETPILOTBBTSCRATCHBM -(|type?|) \\LEAF.NOT.RESPONDING (|type?|) \\FTP.OPENFILE (|for| |in| |when| |do|) FIND-STACK-FRAME ( -|while| |do|) \\LOCATE.NSNET (|for| |in| |when| |do| |finally|) APPENDNUMBER.IP (|for| |from| |to| -|by| |do|) \\GENERIC.OPENP (|for| |in| |collect| |when|) MULTIFILEINDEX (|for| |inside| |join| |in| -|collect|) COMPILER::ENV-ANALYZE-MV-CALL (|for| |in| |do|) \\TEDIT.PUT.CHARLOOKS.LIST2 (|for| |from| -|as| |in| |do|) SPY.MAKE.TREE (|for| |in| |sum| |collect|) TTYINPROMPTFORWORD (|for| |in| |do|) -SETUPFONTS.PRESS (|for| |inside| |do|) \\ALLOCPAGEBLOCK (|to| |as| |by| |do|) CREATEFIELDS (|for| |in| - |when| |collect|) SET-PACKAGE-INTERACTIVELY (|for| |in| |bind| |collect|) SEDIT::INSERT-MULTI-ESCAPE -(|type?|) BREAK.MSG.INTO.LINES (|for| |from| |to| |do| |finally|) INITUFNTABLE (|for| |from| |to| |do| - |in| |when|) UNIX-GETENV (|for| |from| |do|) PAINTW.READBRUSHSIZE (|type?|) UPDATE/MENU/IMAGE ( -|type?| |for| |in| |when| |do|) TEDIT.SEL.AS.STRING (|for| |from| |to| |do|) OPT.FRAMEVAR (|for| |on| -|as| |from| |to| |by| |when| |do| |repeatwhile|) LASTCHPOS (|while| |do|) \\FILING.ATTRIBUTE.TYPE ( -|for| |in| |do| |finally|) \\LEAF.RESENDPUPS (|while| |do|) \\FTP.HANDLE.NO (|for| |in| |do|) -NODELST/AS/MENU (|for| |in| |bind| |thereis|) OPENBSPSTREAM (|type?|) \\UPF.NEXTPOS (|bind| |while| -|do|) \\ATMOUT (|for| |inatom| |do|) \\TEDIT.FORMAT.FOOTNOTE (|while| |collect|) -SEARCH-FOR-EVENT-NUMBER (|while| |do|) SEDIT::INSERT-SPECIAL-CHARACTER (|type?|) PRINT-EVENT (|for| -|in| |do|) SEDIT::LOCATE-NODE-FROM-EDITCHAIN (|for| |in| |thereis|) \\TEDIT.COMMAND.LOOP (|type?| -|for| |inside| |do| |while|) HARDCOPYW (|type?| |find| |inside| |suchthat|) |UnixTempFile| (|for| -|from| |to| |thereis|) REFLECT/GRAPH/DIAGONALLY (|for| |in| |do|) \\DSPTRANSLATE.PSC (|for| |in| |do|) - \\PRESSFAMILYCODELST (|bind| |do| |for| |from| |to| |collect|) WORD.MATCHES.BUFFER (|for| |as| |by| -|bind| |until| |always|) \\TEDIT.PUT.SINGLE.PARALOOKS2 (|for| |in| |do|) COMP.COND (|for| |by| |while| - |do|) TEDIT.GET.LOOKS (|type?|) SEDIT::SET-DEPTH (|for| |in| |do|) FIND.MATCHING.QUOTE (|while| |do|) - TTYIN.SHOW.?ALTERNATIVES (|do|) ALLOCSTRING (|for| |from| |to| |do|) CH.NAME.TO.STRING (|type?|) -PFI.COMPUTE.INDEX.SHAPE (|for| |in| |largest| |finally| |join|) SEDIT::INSERT-STRING (|type?|) STRPOS -(|for| |from| |to| |as| |always|) ADDTOFILES? (|for| |in| |do| |when|) SEDIT::OUTPUT-CR (|type?|) -|\\VFMSmartBLT| (|for| |from| |to| |do|) COMPILER::COPY-NODE-LIST (|for| |in| |collect|) -\\TEDIT.CONVERT.TO.FORMATTED (|while| |do|) SPY.DELETE (|for| |in| |when| |collect|) -COMPILER::CLOSURE-ANNOTATE-TAGBODY (|for| |in| COMPILER::UNIONING) ARGINFO-MUNG (|for| |in| |join|) -\\TEDIT.FIND.PROTECTED.START (|bind| |first| |while| |do|) RIGHTW.ADJUSTSELECTION (|for| |in| |as| -|on| |thereis|) TEDIT.HARDCOPY-COLUMN-END (|for| |in| |when| |do| |while| |finally| |bind|) -EQUAL.CH.NAMES (|type?|) FILENAMEFROMID (|bind| |until| |do| |to| |collect|) SEDIT::LINEARIZE-LIST ( -|for| |on| |when| |do| |while|) COPIEDFROMSPEC (|for| |from| |to| |by| |do|) COURIER.REP.LENGTH (|for| - |in| |bind| |sum| |finally| |as|) \\FIXILINES (|for| |inside| |as| |in| |do| |bind| |while|) -SWITCH/NODE/HEIGHT/WIDTH (|for| |in| |do|) PRINTBITMAP (|type?|) \\LISP.TO.NSFILING.ATTRIBUTE (|for| -|in| |collect| |finally| |always| |by| |while|) XCL::PPRINT-DEFINER (|while| |do|) SEDIT::INPUT-TOKENDELIM - (|type?|) |\\VFMBlankInterval| (|for| |from| |to| |do|) \\TYPENUMBERFROMNAME (|bind| |for| |from| -|to| |do|) OPT.FRAMEDEL (|for| |on| |do|) EDITBMBUTTONFN (|type?| |until|) CLOSEBSPSTREAM (|while| -|do|) \\TEDIT.PUT.SINGLE.CHARLOOKS2 (|type?|) CHANGECALLERS (|for| |inside| |do| |finally| |join| -|when| |collect| |in|) \\BSP.HANDLE.DATA (|while| |do| |finally|) \\INITMDSPAGE (|to| |do| |for| -|while|) \\NSFILING.GETFILEINFO.FROM.PLIST (|for| |in| |collect|) FIND-HISTORY-EVENTS (|for| |in| -|when| |collect|) SEDIT::TRACK-EXTEND (|first| |do| |repeatuntil|) \\TEDIT.PROMPT.PAGEFULLFN (|for| -|in| |when| |do|) BITMAPBIT (|type?|) \\NSFILING.GET/SETINFO (|type?|) \\GATHER-SPECIAL-BINDINGS ( -|for| |from| |by| |bind| |until| |unless| |do| |finally|) |UnixShellQuote| (|while| |do|) -REFLECT/GRAPH/HORIZONTALLY (|for| |in| |bind| |do|) SEDIT::TTYFN (|until|) U/L-CASE (|for| |until| -|do|) |\\VFMCreateIntervals| (|type?|) SEDIT::INSERT-LITATOM (|type?|) RECORDALLOCATIONS (|for| |in| -|join|) SIMPLE.FINDFILE (|for| |in| |when| |do|) \\TEDIT.GET.CHARLOOKS.LIST2 (|for| |from| |to| -|collect|) COMPILER::CLOSURE-ANNOTATE-PROGN (|for| |in| COMPILER::UNIONING) STKARGS (|for| |from| |to| - |collect|) MAKECREATE1 (|for| |in| |when| |collect| |do| |join|) \\TEXTCLOSEF (|type?| |while| |do|) -ASKUSER (|for| |in| |eachtime| |collect| |when| |find| |suchthat|) \\USEREVENT (|for| |in| |do|) -\\MAP-OPEN-STREAMS (|for| |in| |when| |join| |collect|) BACKSKREAD (|do|) TTUNREADBUF (|for| |by| -|until| |do|) TWODINSPECT.COPYBUTTONFN (|bind| |while| |do| |finally|) NSNETDAYTIME0 (|to| |when| |do| -) \\HANDLE.RAW.XIP (|for| |in| |when| |do|) \\BUFFERED.BINS (|bind| |do|) \\OPENLINEBUF (|type?|) -TEDIT.UPDATE.SCREEN (|bind| |for| |inside| |as| |do|) SPY.SUM (|for| |in| |sum|) \\IFS.LOOKUPFILE ( -|while| |do| |to| |when| |finally|) SETSPELLCASE (|for| |from| |to| |do| |in|) SI::SPLIT-PROCEED-CLAUSES - (|for| |in| |as| |from| |do|) DELDEF (|for| |in| |do| |on| |by|) \\BUFFERED.BOUTS (|bind| |do|) -\\FTPERROR (|type?|) \\BSP.HANDLE.ACK (|while| |do|) FIXSPELL (|for| |in| |when| |do|) FB.SEEFULLFN ( -|do| |repeatuntil|) FILEPKGTYPE (|for| |in| |when| |join| |from| |to| |by| |do|) READ-AFM-FILE ( -|repeatuntil| |do| |repeatwhile| |type?| |for| |from| |to|) SHOWBITMAP.IP (|bind| |while| |first| |do| -) FLASHWINDOW (|for| |to| |bind| |first| |do|) STRIP-KEYWORDS (|for| |old| |on| |by| |while| |collect| -) \\PROCESS.BEFORE.LOGOUT (|for| |in| |do|) CREATEW (|type?|) |\\VFMMarkBufferDirty| (|for| |in| -|thereis|) FM.EDITITEM (|type?|) |\\LFDeleteFile| (|type?|) HASDEF (|for| |in| |do|) CREATEPAGES ( -|for| |from| |to| |do|) |\\PFReplaceString| (|for| |from| |to| |as| |instring| |do|) -FIND.CHAT.PROTOCOL (|for| |in| |bind| |when| |do|) ADDTOFILE (|for| |in| |do|) SEDIT::INSERT-LIST ( -|type?|) READ-UNICODE-MAPPING-FILENAMES (|for| |inside| |collect| |find| |in| |suchthat|) -PRINT-ARGLIST (|bind| |while| |do|) \\FLUSHNDBS (|bind| |while| |do|) CONDITIONS::PARSE-RESTART-CASE ( -|while| |do|) TTCOMPLETEWORD (|for| |by| |until| |sum| |while| |do| |finally| |find| |old| |from| |to| - |as| |in| |suchthat|) COMPILER::ENV-ANALYZE-LAMBDA (|for| |in| |do|) OVERLAPPINGWINDOWS (|for| |old| -|in| |thereis|) TB.FIND.PREVIOUS.TAIL (|while| |do|) \\BOXFTIMES2 (|while| |do|) PSCFONT.READFONT ( -|for| |from| |to| |do|) INITDATATYPENAMES (|for| |in| |as| |from| |do|) \\SPP.SYSPKT (|while| |do|) -LIST-ALL-BLOCKRECORDS (|for| |in| |when| |collect|) SEDIT::HASFAT (|for| |instring| |thereis|) -\\BOXFQUOTIENT (|while| |do|) CH.ADD.GROUP.PROPERTY (|for| |in| |collect|) \\TELERAIDSERVER (|to| -|when| |do|) |\\LFRenameFile| (|type?|) MSCLOSEFILES (|for| |in| |when| |do|) \\WRITEBITMAP (|until| -|do|) HISTORY-NTH (|bind| |while| |do|) \\TEDIT.LOOKS.UPDATE (|while| |do| |type?|) -\\TEDIT.SET.WINDOW.EXTENT (|for| |inside| |do|) UPDATEFILES (|for| |in| |when| |do| |first| |finally| -|unless|) \\SHOWSEL (|for| |inside| |as| |in| |do|) TEDIT.STRINGWIDTH (|for| |instring| |sum|) -|\\PFTransferFilePage| (|for| |from| |by| |as| |while| |do|) MSCHECKVARS1 (|for| |in| |do|) -\\TEDIT.FIND.LAST.LINE (|bind| |while| |do| |finally|) |\\VFMSaveBuffer| (|for| |inside| |when| |do|) -FEQP (|while| |do|) SCALE.FONT (|for| |in| |when| |do| |finally|) OPT.CLEANFRAME (|for| |in| |when| -|always|) COMPILER::ENV-ANALYZE-LABELS (|for| |in| |do|) OPT.FRAMELOCAL (|for| |in| |when| |do|) -TEXTUREP (|type?|) GRAPHEDITCOMMANDFN (|type?|) COMPILER::CLOSURE-ANNOTATE-MV-PROG1 (|for| |in| -COMPILER::UNIONING) PRINTERROR (|for| |inside| |do| |on| |in|) \\FILING.ATTRIBUTE.TYPE.SEQUENCE (|for| - |in| |collect|) TYPE.BUFFER (|bind| |while| |do| |for| |in|) PREPLOOP (|for| |in| |do|) -APPENDLARGEVECTOR.IP (|for| |from| |to| |largest| |do|) \\BOXFPLUSDIF (|while| |do|) DODIRCOMMANDS ( -|while| |do|) SEDIT::INPUT-QUOTE (|type?|) FM.SHADE (|type?|) \\TEDIT.GET.PARALOOKS.LIST2 (|for| -|from| |to| |collect|) \\MAKEBRUSH.DIAGONAL (|for| |from| |to| |do|) |\\LFTruncateFile| (|to| |do|) -\\TEDIT.FIND.PROTECTED.END (|bind| |first| |while| |do| |finally|) PARAMETRICSPLINE (|for| |in| |as| -|from| |to| |do| |type?| |by|) OPENATTACHEDWINDOWS (|for| |in| |do|) DEFPACKAGE (|for| |in| |do| -|collect| |join|) SEDIT::REVIVE-NODE (|for| |in| |do|) INVERT.TEXTURE.BITMAP (|type?| |bind| |for| -|by| |until| |do|) COERCETEXTOBJ (|type?| |while| |do| |for| |from| |as| |to|) NARGS (|in| |sum|) -|InstallUnixPrinter| (|for| |inside| |do| |in| |when|) REFLECT/GRAPH/VERTICALLY (|for| |in| |bind| -|do|) TEDIT.\\INSERT (|type?|) \\INIT.ETHER.BUFFER.POOL (|to| |do| |finally|) \\ACTONDISKPAGES ( -|type?| |for| |in| |as| |from| |bind| |do| |by| |when|) TB.RENUMBER.TAIL (|for| |in| |as| |from| |do|) - \\LFINITCASEARRAY (|for| |from| |to| |do|) TRAPMAKE (|while| |do|) PFI.SETUP.TRANSLATIONS (|for| |in| - |collect|) \\DSPFONT.HDCPYDISPLAY (|for| |from| |to| |do|) IMAGEFNSP (|type?|) \\DISKERROR (|while| -|do|) SPY.NEXT.TREE (|for| |in| |do| |finally|) SEDIT::PUNT-SET-SELECTION (|for| |from| |as| |by| -|thereis|) TERMTABLEP (|type?|) \\TELERAIDINIT (|for| |in| |do|) CLEARMAP (|for| |in| |do|) -TOPATTACHEDWINDOWS (|for| |in| |do|) TEDIT.UNDO.DELETION (|bind| |while| |do|) IMAGESTREAMP (|type?| -|for| |inside| |always|) PARSE.NSNAME (|type?|) ONEDINSPECT.PROPWIDTH (|for| |in| |largest| |finally|) - \\TEDIT.HCPYLOOKS.UPDATE (|while| |do| |type?|) \\DOACTONDISKPAGES (|for| |from| |to| |until| |do| -|finally|) OPENPOSTSCRIPTSTREAM (|for| |in| |do|) \\TEXTBIN (|repeatwhile| |do|) |\\LFGetFileInfo| ( -|type?|) RAISE-SIGNAL (|while| |do| |finally|) \\WRITEOUTBUFFERS (|for| |in| |collect| |do|) -CREATETEXTUREFROMBITMAP (|for| |from| |to| |do| |by|) \\GETREGION.CHECKOPPT (|for| |in| |do|) -|\\LFCreateDirectories| (|type?|) XCL:SAVE-PROFILE (|for| |on| |by| |do|) \\COERCEFONTDESC (|type?|) -TEDIT.REDO.INSERTION (|bind| |while| |do|) \\WRITEDISKPAGES (|type?| |for| |in| |as| |from| |bind| -|do|) DO-DISPATCH-MACRO (|while| |do|) \\FRAMESCAN (|for| |from| |by| |bind| |until| |do|) -COMPILER::COPY-NODE-TAGBODY (|for| |in| |collect|) SEDIT::SELECT-NEXT-GAP (|while| |do| |finally|) -SEDIT::MAP-COMMENT-INDEX (|bind| |for| |on| |do| |finally|) ADDFILE (|for| |in| |when| |do|) -\\DOWRITEDISKPAGES (|do| |repeatuntil| |for| |from| |to| |when| |finally|) -\\NSFILING.RELEASE.BULKSTREAM (|for| |in| |when| |do|) PRINT-HISTORY (|for| |in| |do|) -TWODINSPECT.COLUMNWIDTH (|for| |in| |largest| |finally|) TEDIT.HARDCOPY.PAGEHEADING (|repeatuntil| -|collect| |type?|) M44.SIGNAL.DISK.ERROR (|bind| |while| |do|) PSCFONT.WRITEFONT (|for| |from| |to| -|do|) \\MAKEFLOAT (|while| |do|) \\DO-DEFINE-FILE-INFO (|for| |on| |by| |do|) -DINFO.UPDATE.MENU.DISPLAY (|for| |in| |bind| |collect|) HASHARRAY (|bind| |find| |from| |to| |by| -|suchthat| |for| |never|) SMASHFILECOMS (|for| |in| |when| |do|) OPENIMAGESTREAM (|for| |inside| -|when| |do| |finally|) SEDIT::PLACE-CARET-AND-SELECTION (|for| |from| |as| |by| |thereis| |type?|) -PRINTCOPYRIGHT1 (|for| |on| |do| |in| |while|) |MakeMenuOfPrinters| (|for| |inside| |collect|) -\\10MB.LOADINPUTQ (|bind| |while| |do| |finally|) PFI.CENTER.PRINT (|for| |in| |sum| |on| |do|) -EXCHANGEXIPS (|bind| |until| |do|) \\SEQUIN.HANDLE.ACK (|bind| |do|) \\MATMULT441 (|for| |from| |to| -|by| |do| |bind| |declare| |as| |finally|) PFI.COLLECT.DEFINERS (|for| |in| |bind| |when| |join| -|collect| |unless| |thereis|) FINDPTRSBUFFER (|bind| |while| |do|) \\CML-LOAD (|until| |do|) RENAME ( -|for| |inside| |when| |do|) \\MATMULT144 (|for| |from| |to| |by| |do| |bind| |declare| |as| |finally|) - \\SPP.DUPLICATE.REQUEST (|bind| |for| |in| |thereis|) HARRAYP (|type?|) PRINTERTYPE (|for| |in| -|thereis| |bind| |when| |do|) LISPXREADBUF (|for| |in| |until| |collect|) \\MATMULT331 (|for| |from| -|to| |by| |do| |bind| |declare| |as| |finally|) OPT.MERGEFRAMEP (|for| |in| |do| |when|) -PRINTFILETYPE.FROM.EXTENSION (|bind| |for| |in| |when| |do|) \\3MBFLUSH (|while| |sum|) \\MATMULT133 ( -|for| |from| |to| |by| |do| |bind| |declare| |as| |finally|) DATATYPES (|bind| |for| |from| |to| -|when| |collect|) FIND.NON.SPACE (|while| |do|) FILEPKGCHANGES (|for| |in| |when| |collect| |do| |on| -|thereis|) \\NSFILING.ADDQUOTES (|for| |instring| |bind| |do| |finally|) TTNTHLINE (|for| |do|) -UPDATEFILEMAP (|do|) DECREASING.FONT.LIST (|for| |in| |collect|) \\STRINGIN (|for| |from| |to| |do|) -\\TEDIT.PUT.SINGLE.PARALOOKS (|for| |in| |do|) \\FLUSH.PACKET.QUEUE (|bind| |while| |do|) STKARGNAME ( -|for| |from| |by| |as| |until| |do|) SHRINKATTACHEDWINDOWS (|for| |in| |do|) \\CURVE2 (|bind| |for| -|from| |to| |when| |do|) COURIER.READ.BULKDATA (|type?| |bind| |join| |repeatuntil|) SETSTKARGNAME ( -|for| |from| |by| |as| |until| |do|) COMPILER::CLOSURE-ANNOTATE-MV-CALL (|for| |in| COMPILER::UNIONING -) RESHAPEALLWINDOWS (|for| |in| |do| |when| |repeatuntil|) TEDIT.QUIT (|type?| |until| |do|) -MAPBUFFERCOUNT (|bind| |while| |count|) SHRINKBITMAP (|for| |from| |to| |do|) \\BITMAPTOSCREEN (|for| -|in| |thereis|) SLICESET (|for| |in| |as| |from| |sum|) \\CREATEINTERPRESSFONT (|for| |in| |bind| -|when| |do|) STKNARGS (|do| |repeatwhile|) DISPLAYNODELINKS (|for| |in| |do|) \\FTP.EOL.FROM.PLIST ( -|for| |in| |when| |do| |finally|) SEDIT::OUTLINE-SELECTION (|bind| |while| |do| |finally|) -FB.CLOSE&EXPUNGE (|find| |in| |suchthat|) MAXATTACHEDWINDOWEXTENT (|bind| |for| |in| |do|) -TEDIT.FIND.OBJECT (|while| |do|) FB.ANALYZE.PATTERN (|do| |for|) DATATYPEP (|for| |from| |to| -|thereis|) IMAGESTREAMTYPEP (|type?| |for| |inside| |always|) TEDIT.SKIP.SPECIALCOND (|repeatuntil| -|collect|) MODERN-ADD-EXEC (|for| |from| |to| |collect|) \\MATMULT444 (|bind| |for| |from| |to| |by| -|do| |declare| |as| |finally|) FB.SORT.VERSIONS (|while| |do| |until| |collect|) MSCHECKBOUNDFREE ( -|for| |in| |do| |when|) PFI.PRINT.INDICES (|find| |in| |suchthat|) |\\VAMRecomputeFreePageCount| ( -|bind| |for| |from| |to| |count|) \\ENDVECRUN (|for| |in| |do|) APPENDINT.IP (|for| |from| |to| |by| -|do|) \\DODISKCOMMAND (|while| |do|) |\\VFMFind| (|repeatuntil| |do|) SEDIT::INPUT-DOT (|type?|) -SPY.MAX (|for| |in| |do|) \\MATMULT333 (|bind| |for| |from| |to| |by| |do| |declare| |as| |finally|) -\\LEAF.REPAIR.BROKEN.PUP (|type?|) \\LEAF.STRIP.QUOTES (|for| |by| |while| |collect|) -\\POSTSCRIPT.NSHASH (|for| |in| |unless| |do|) BKSYSBUF.GENERAL (|bind| |do| |repeatuntil| |finally|) -TWODINSPECT.ROWPROPWIDTH (|for| |in| |largest| |finally|) CLRHASH (|bind| |do| |repeatuntil|) -|\\PFFetchString| (|for| |from| |to| |do|) COMPILER::CLOSURE-ANNOTATE-LAMBDA (|for| |in| COMPILER::UNIONING - |when| |collect| |join|) INSPECT/AS/RECORD (|for| |in| |when| |collect|) PRINTERPROP (|for| |in| -|when| |do|) MOVEATTACHEDWINDOWS (|for| |in| |do|) EXPRESSIONS.WHENCHANGED (|for| |in| |do|) -\\CLEANUPDISKQUEUE (|repeatuntil|) FB.CHECK.NAME.LENGTH (|for| |bind| |when| |do|) -SEDIT::COPY-STRUCTURE-LIST (|for| |in| |collect|) \\NSRANDOM.HANDLE.ERROR (|for| |in| |when| |do|) -CREATEMENUEDWINDOW (|type?|) TWODINSPECT.COLUMNWIDTHS (|for| |in| |collect|) \\SEQUIN.FLUSH.RETRANSMIT - (|while| |do|) FILEPKGCOMS.PUTDEF (|for| |in| |by| |do|) %NUMERIC-STRING-P (|for| |instring| |do| -|finally|) FB.DELVER.FILES (|for| |in| |bind| |do| |finally|) \\NSFILING.WHENCLOSED (|for| |in| |bind| - |thereis| |when| |do|) DINFO.UPDATE.HISTORY (|for| |in| |as| |from| |to| |collect|) TTNTH (|bind| -|while| |do| |finally|) \\FAST4BIT (|bind| |for| |from| |do|) TEDIT.SETSYNTAX (|type?|) SCALE/GRAPH ( -|for| |in| |collect|) UNMARKASCHANGED (|bind| |while| |do| |for| |in| |when|) MB.CREATE.NWAYBUTTON ( -|for| |in| |collect| |as| |do| |largest| |from| |to| |sum|) \\GETREGION.CHECKBASEPT (|bind| |for| |in| - |do|) STORAGE (|from| |to| |collect| |for| |inside| |when| |do| |finally|) BSP.PUTINTERRUPT (|bind| -|do|) |\\LFReadPages| (|for| |inside| |as| |from| |bind| |first| |sum|) FIXR (|while| |do|) -FM.REDISPLAYITEM (|type?|) \\CONVERTNUMBER (|repeatuntil| |do|) SEDIT::RELINEARIZE-WHERE-NECESSARY ( -|for| |in| |bind| |when| |do| |while| |old| |thereis| |until|) MAPHASH (|bind| |when| |do| -|repeatuntil| |finally|) \\NSINIT (|for| |in| |do|) \\POLYSHADE.BLT (|while| |do| |for| |in|) -\\TFBRAVO.INSTALL.PAGEFORMAT (|for| |in| |do|) BITMAPWIDTH (|type?|) PPSPP (|for| |by| |bind| |while| -|do|) APPENDINTEGER.IP (|for| |from| |to| |by| |do|) AT.END.OF.TEXT (|for| |by| |until| |always|) -MSCHECKBLOCKBASIC (|for| |in| |do| |when| |thereis| |join| |collect|) PFI.CONDENSE.INDEX (|for| |in| -|do| |bind| |when| |collect| |unless| |thereis|) SEDIT::LINEAR-ITEM-WIDTH (|type?|) BITMAPHEIGHT ( -|type?|) PARSE-NAMESTRING1 (|type?|) \\STORAGE.TYPE (|for| |by| |while| |do|) PFI.PROCESS.FILE (|bind| - |while| |do|) COMPILER::ENV-ANALYZE-CALL (|for| |in| |do|) BOOTSTRAP-NAMEFIELD (|while| |do|) -SPY.MERGE (|for| |in| |do| |bind| |finally| |when|) SIMPLETEXTEDIT (|repeatuntil| |finally|) -\\STORAGE.HUNKTYPE (|for| |in| |do|) MSCHECKFNINBLOCK (|for| |in| |do| |thereis|) PFI.PREVIEW.DEFINEQ -(|until| |do|) APPENDIDENTIFIER.IP (|for| |instring| |do|) EQUALALL (|for| |from| |as| |to| |always| -|in|) PFI.PRINT.MULTI.INDEX (|for| |in| |as| |from| |bind| |do| |unless|) STORAGE.LEFT (|for| |by| -|while| |sum|) \\TEDIT.SEARCH.CODETABLE (|for| |from| |to| |do| |in| |as|) SPY.MERGEINFO (|for| |in| -|when| |do|) \\PUNT.BITBLT.BITMAP (|type?|) \\COLLECTDIRTYBUFS (|bind| |while| |collect| |find| -|inbufs| |suchthat|) \\ADDLEAFSTRING (|for| |from| |to| |do|) |\\LFSetFileInfo| (|type?|) MSUPDATE ( -|for| |in| |do|) \\DUMPEXPORTS (|for| |on| |do|) \\PAGED.FORCEOUTPUT (|for| |inbufs| |when| |collect| -|while| |do| |bind| |finally|) SETUPFONTS.IP (|for| |inside| |do|) ONEDINSPECT.REPAINTFN (|for| |on| -|as| |until| |finally| |in| |bind| |repeatuntil| |do|) BLTPATTERN.GENERIC (|while| |do|) SLITLOOP ( -|for| |in| |do|) TEDIT.GETSYNTAX (|type?|) SEDIT::COPY-STRUCTURE-STRING (|type?|) FLTSTR (|while| |do| -) SEDIT::COLLECT-UNDO-BLOCK (|for| |by| |while| |eachtime| |finally|) \\MAKERECODEMAP (|for| |in| -|unless| |do| |finally|) MINATTACHEDWINDOWEXTENT (|bind| |for| |in| |do|) BCOMPL.BODY (|for| |in| |do| -) TEDIT.EDIT.OBJECT (|type?| |for| |inside| |do|) INITATOMS (|for| |from| |to| |when| |do|) -SEDIT::COMPUTE-POINT-POSITION-LIST (|type?|) ICONW.PRINT-JUSTIFIED (|bind| |to| |as| |in| |do| -|repeatuntil|) \\DOFORMATTING.HARDCOPY (|bind| |while| |do|) \\BITBLT.BITMAP.SLOW (|type?|) SENDXIP ( -|until| |do|) SEDIT::UNDO-COMMENT-CHANGE (|for| |in| |as| |from| |do| |finally|) \\SETIODIRTY (|for| -|inbufs| |when| |do| |finally|) INSTALLBRUSH (|for| |from| |to| |do|) |\\LFWritePages| (|for| |inside| - |as| |from| |bind| |do|) MSUPDATEFN1 (|for| |in| |when| |do|) DOWINDOWCOM (|type?|) -\\SEARCHPRESSFONTS (|bind| |for| |inside| |when| |do| |finally|) \\TEDIT.HCPYFMTSPEC (|for| |in| -|collect|) HASHOVERFLOW (|do|) ADDTOCOMS (|for| |on| |do|) EXTTOINT (|while| |do|) SPY.LEGEND (|for| -|in| |collect|) MSCHECKBLOCK (|for| |in| |do| |unless| |when| |collect| |thereis| |repeatuntil|) -|\\VAMFreePageGroup| (|to| |as| |from| |do|) COURIER.WRITE.BULKDATA (|do| |repeatwhile| |to|) -FLTINTLOG (|for| |from| |to| |bind| |do|) PFI.PRINT.FILECREATED (|for| |in| |collect| |while|) -INITDATATYPES (|for| |in| |bind| |as| |from| |do|) POSTEDITALISTS (|for| |in| |when| |do|) -\\HASHRECLAIM (|bind| |when| |do| |repeatuntil| |finally|) SPY.MAKEGRAPHNODES (|for| |in| |when| -|bind| |do| |finally|) INTTOEXT (|while| |do|) \\LEAF.USE.NEW.CONNECTION (|while| |do| |for| |in| -|when|) \\PARSE.REMOTE.FILENAME (|for| |on| |by| |do|) RESETOPENFILES (|for| |inside| |collect|) -COMPILER::FIND-TOP-ENVIRONMENT (|until| |do|) FM.RESETMENU (|for| |in| |do|) GET-NEXT-HISTORY-EVENT ( -|for| |in| |do| |finally|) EVENTS-INPUT (|for| |in| |collect|) OLD.FIND.SYMBOL (|for| |from| |to| -|suchthat| |do| |as| |always|) ONEDINSPECT.COPYBUTTONFN (|bind| |while| |do| |finally|) CLISPEXPANSION - (|do|) TIMESPOW10 (|while| |do|) BRECOMPILE2 (|from| |to| |always|) \\NSFILING.GET.STREAM (|find| -|in| |suchthat|) TILE (|while| |do|) TTNEXTLINE (|bind| |while| |do| |finally|) TB.FIND.SELECTED.ITEM -(|find| |from| |to| |suchthat|) \\TEDIT.WORDBOUND.READTABLE (|for| |from| |to| |do| |in|) -GETCLEARINGHOUSE (|repeatuntil|) \\GOOD.DASHLST (|bind| |for| |in| |collect|) SETFONT.IP (|for| |in| -|when| |do| |finally|) EDITGRAPH2 (|until| |do|) MENUWINDOW (|type?|) GLOBAL-MACRO-FUNCTION (|find| -|in| |suchthat|) \\STRINGWIDTH.PRESS (|for| |inatom| |sum| |instring| |do|) DIGITSBDP (|while| |do|) -PRETTYCOM (|for| |on| |do| |in| |by| |unless| |join|) SEDIT::CREATE-COMMENT-WORD-NODES (|bind| |first| - |while| |do| |finally|) \\VANILLADISKINIT (|for| |from| |to| |do|) BLTPATTERN.REPLACEDISPLAY (|while| - |do|) \\NSFILING.REMOVEQUOTES (|bind| |while| |collect|) TTECHO.TO.FILE (|for| |do| |repeatwhile| -|until|) EXPANDBM (|for| |from| |to| |by| |do| |while|) DISPLAYGRAPH (|type?| |for| |in| |do|) -COMPILER::CLOSURE-ANNOTATE-LABELS (|for| |in| COMPILER::UNIONING) INIT-CML-READTABLES (|for| |from| -|to| |do|) \\TEDIT.GET.SINGLE.PARALOOKS (|for| |from| |to| |collect|) CHCON (|for| |from| |to| -|collect|) \\UNVISIBLE.PAGED.REVALIDATEFILELST (|bind| |for| |in| |when| |do|) \\SELITEM.FROM.PROPERTY - (|for| |in| |when| |do|) HCOPYALL1 (|for| |in| |do|) \\D01.FAULTINIT (|for| |from| |to| |do| -|finally|) FIND-DEBUGGER-ENTRY-FRAME (|bind| |do| |repeatwhile| |finally|) \\TEDIT.UPDATE.SHOWSEL ( -|for| |inside| |do| |as| |in|) \\CHECKSUM (|while| |do|) UNPACK (|for| |from| |to| |collect|) -SYMBOL.PNAME (|for| |from| |to| |do|) PFI.PREVIEW.DECLARE (|bind| |until| |do| |finally|) PPBUFS ( -|for| |inbufs| |do| |finally|) GETSELECTEDITEMS (|for| |in| |when| |collect|) COMPILER::ALPHA-COMPILER-LET - (|for| |in| |do|) \\DL.FAULTINIT (|bind| |do| |repeatuntil| |repeatwhile|) \\CHECKARRAYBLOCK (|bind| -|first| |do| |repeatuntil|) |\\DSKCreateDevice| (|type?|) |\\LFOpenDevice| (|for| |in| |thereis|) -SLICEREF (|for| |in| |as| |from| |sum|) TB.REV.FIND.SELECTED.ITEM (|find| |from| |to| |by| |suchthat|) - \\SWAPDISKERROR (|while| |do|) \\STRINGHASHBITS-UFN (|for| |inpname| |bind| |do| |finally|) -|\\UFSCreateDevice| (|type?|) \\ALLOCBLOCK.NEW (|until| |do|) SEDIT::SHIFT-STRING (|to| |do|) -DECLAREDATATYPE (|for| |in| |when| |collect|) \\ALLOCBLOCK.OLD (|for| |from| |to| |bind| |when| |do| -|repeatuntil|) CMLREADSEMI (|until| |do|) \\IDLE.PROMPT.WATCHER (|do|) DRAWDASHEDLINE (|bind| |for| -|in| |collect| |while| |do| |finally|) SEDIT::CFV-LIST (|for| |on| |when| |do| |while|) -SI::ADD-OLD-STYLE-ADVICE (|for| |in| |do|) POSTSCRIPT.FONTSAVAILABLE (|for| |in| |collect| |when| -|join| |unless| |from| |to|) \\TEDIT.PARSE.CHARLOOKS.LIST (|type?|) BKLINBUF (|for| |from| |while| -|do|) MSCHECKBLOCKS (|for| |in| |do| |join| |unless| |collect| |thereis|) \\STRING-EQUAL-HASHBITS-UFN -(|for| |inpname| |bind| |do| |finally|) CHECKFORCHANGED (|for| |in| |do|) \\LOOKUPFMAP (|while| |do|) -\\GETFBB (|for| |in| |do|) \\COPYDATATYPE (|for| |in| |do|) DUMPI.S.OPRS (|for| |in| |collect|) -FM.RESETSTATE (|type?|) \\EXTNORMALIZE (|while| |do|) TRANSLATE.DATATYPE (|for| |in| |collect| |do| -|find| |suchthat| |while|) \\ACCHARPOSLIST (|bind| |first| |for| |from| |to| |collect|) -FIND.LINE.BREAK (|while| |do|) |\\LFOpenFile| (|type?|) |\\UFSWritePages| (|for| |inside| |as| |from| -|bind| |do|) \\ACCHARIMAGELIST (|for| |in| |collect|) PRETTYDEFCOMS (|for| |on| |do|) -\\TEDIT.NSCHAR.RUN (|for| |from| |to| |do|) \\FILEMAP-HASHOVERFLOW (|for| |in| |bind| |do| |on| |as| -|from|) \\READACFONTBOXES (|for| |from| |to| |collect|) RECORDACCESS (|for| |in| |join|) -|\\LFExtendFileIfNecessary| (|until| |do|) LISTRECORDEFS (|to| |do| |finally|) -TWODINSPECT.SELECTCOLUMNPROP (|for| |on| |thereis| |in| |as|) D-ASSEM::COPY-LAP-CODE (|for| |in| -|collect|) |\\UFSOpenFile| (|type?|) CREATEMDSTYPETABLE (|for| |in| |do| |from| |to| |by|) CASEARRAY ( -|for| |from| |to| |do|) \\ICONW.FORMAT.TITLE (|for| |from| |as| |in| |do|) SEDIT::START-PROCESS ( -|until|) |\\UFSSetFileInfo| (|type?|) CRITSECT (|while| |do|) DSPCLIPPINGREGION (|type?|) \\FAMILYCODE - (|bind| |do| |for| |from| |to| |always|) \\TEDIT.PARSE.PARALOOKS.LIST (|type?| |for| |in| |collect|) -IOCBQLENGTH (|while| |sum|) \\HANDLE.RAW.PACKET (|find| |in| |bind| |suchthat|) SEDIT::INPUT-NORMAL-CHAR - (|type?|) DUNPACK (|for| |from| |to| |do|) POSTSCRIPT.PUTBITMAPBYTES (|for| |from| |to| |by| |as| -|do| |while| |count|) \\ALLOCHUNK (|for| |in| |when| |collect| |do| |repeatuntil|) \\SPPWATCHER ( -|bind| |until| |do|) \\ACCHARWIDTHLIST (|for| |in| |bind| |collect|) TEXTSTREAMP (|type?|) -SEDIT::BUILD-PRELINEARIZED-NODE (|bind| |while| |do| |finally|) |\\LFGenerateFiles| (|for| |instring| -|until| |collect| |in| |when| |while| |do|) \\GETPRESSFONTNAMES (|bind| |do| |for| |in| |as| |always|) - \\NSRANDOM.PREPARE.CACHE (|for| |from| |to| |collect| |while| |when| |do| |finally| |bind|) -\\TEDIT.FORMATTABS (|for| |in| |when| |do|) COPYHASHITEM (|type?|) |\\UFSTruncateFile| (|to| |do|) -POSTEDITPROPS (|for| |on| |by| |when| |do| |finally|) TTY.PROCESS (|type?| |for| |in| |when| |do| -|bind| |while| |collect|) PACKC (|bind| |for| |from| |as| |in| |do| |finally| |to| |by|) -\\FM.EDIT-GETPOINTERINFO (|for| |from| |to| |do|) \\PARSE.PORTCONSTANT (|for| |instring| |bind| |do| -|finally|) STORETABLE (|for| |in| |do|) CHANGETRAN1 (|for| |in| |do| |finally|) D-ASSEM::TYPE-NAME-FROM-SIZE - (|for| |in| |when| |do| |finally|) TEDIT.PARSE.PAGEFRAMES1 (|type?| |for| |in| |collect|) -\\CHECKFORSTORAGEFULL (|while| |do|) COMPILER::CLOSURE-ANNOTATE-CALL (|for| |in| COMPILER::UNIONING) -DCHCON (|for| |from| |to| |do|) \\UNVISIBLE.FLUSH.OPEN.STREAMS (|for| |in| |bind| |when| |do|) -SEDIT::CREATE-COMMAND-TABLE (|for| |in| |do|) \\FM.EDIT-DELETE (|while| |bind| |eachtime| |do| -|finally|) \\FTP.UNPACKFILENAME (|for| |on| |by| |do|) GETVERBTABLES (|for| |in| |collect|) TEDIT.GET -(|for| |inside| |do| |in| |as| |type?|) COMPILE.FILE.DEFINEQ (|for| |in| |unless| |do|) -FILEPKG.MERGECHANGES (|for| |in| |do| |finally| |when| |collect| |unless|) FM.HIGHLIGHTITEM (|type?|) -EDITDELETENODE (|for| |in| |do|) \\REQUEUE.ETHERPACKET (|type?|) \\TEDIT.GET.TERMSA.WIDTHS (|for| -|from| |to| |do|) MSGETDEF (|for| |in| |bind| |when| |do| |finally|) D-ASSEM::EMIT-BYTE-LIST (|for| -|in| |do|) \\SHOWSEL.HILIGHT (|while| |until| |do|) ALPHORDER (|for| |from| |do|) \\COMPUTE.ARC.POINTS - (|for| |from| |to| |by| |collect|) \\NSRANDOM.FETCH.CACHE (|while| |when| |do|) \\TEDIT.PURGE.SPACES -(|bind| |while| |do|) |\\VFMSplit1| (|repeatuntil| |do|) \\LITATOM.EATCHARS (|for| |from| |to| |as| -|do|) BLOCK (|type?| |for| |in| |do|) OPT.RETMERGE (|type?|) DBG::MAKE-FRAME-INSPECT-WINDOW (|for| -|in| |when| |do|) FM.GETITEM (|for| |in| |thereis|) \\TEDIT.APPLY.PARALOOKS (|while| |do| |type?| -|for| |in| |collect|) DIRPRINTNAME (|for| |from| |bind| |do| |to|) \\PS.BOUTFIXP (|for| |old| |by| -|do| |repeatwhile| |in|) \\M44DOEXTENDVMEMFILE (|while| |do| |for| |from| |to|) TEDIT.SETFUNCTION ( -|type?|) PLAYTUNE (|for| |in| |do| |until|) COMPILE.CHECK.ARGTYPE (|for| |in| |do|) |\\UFSReadPages| ( -|for| |inside| |as| |from| |bind| |first| |sum|) TB.FIND.ITEM (|when| |do| |repeatuntil|) -|\\LFEventFn| (|for| |in| |when| |do|) SEDIT::ASSIGN-FORMAT-QUOTE (|type?|) COMPILER::CLOSURE-ANNOTATE-CATCH - (|for| |in| |do|) \\CURVEEND (|for| |from| |to| |do|) SPP.OPEN (|until| |do| |bind| |for| |on| |by|) -FILLNGON.IP (|for| |from| |to| |do|) IRM.RESET (|type?|) \\UFS.OPENP (|for| |in| |bind| |thereis|) -\\TEDIT.UNPARSE.PARALOOKS.LIST (|for| |in| |as| |do|) \\NSFILING.EVENTFN (|for| |in| |when| |do|) -SCANDEFINEQ (|find| |on| |suchthat|) \\DOFORMATTING (|bind| |while| |do|) \\INITBFS (|do| -|repeatuntil|) TB.MAP.SELECTED.ITEMS (|until| |when| |do|) COMP.CPI (|while| |do|) \\TEDIT.LINE.LIST ( -|for| |inside| |as| |when| |do|) OPT.RETTEST (|type?|) MAKEBITTABLE (|type?| |for| |in| |do| |from| -|to|) \\GTTERMTABLE (|type?|) REMWINDOWPROP (|type?| |for| |on| |by| |bind| |do|) \\FM.EDIT-WORDDELETE - (|while| |do|) VERBNOTICELIST (|type?|) MAKEDEFLIST (|for| |in| |bind| |do|) MSINIT (|for| |in| -|collect| |finally|) \\INIT.POWERS.OF.TEN (|for| |from| |to| |bind| |do|) FM.CHANGESTATE (|type?|) -FM.GETSTATE (|for| |in| |do|) \\BCPLSOUT.PRESS (|for| |from| |to| |do|) GETSYNTAX (|type?|) TRAPLOOP ( -|for| |in| |do| |collect| |from| |to|) \\CHAIN.UP.RPT (|for| |from| |to| |do|) SEDIT::ASSIGN-FORMAT-LIST - (|for| |on| |when| |do| |while|) \\IDLE.ISMEMBER (|for| |in| |thereis|) \\TEDIT.HARDCOPY.FORMATLINE ( -|while| |do| |type?| |for| |old| |from| |to| |as| |when|) TEDIT.BUILD.PCTB (|type?| |for| |in| |when| -|do| |bind| |while| |from| |to| |as| |finally| |by|) WHO-LINE-TTY-STATE (|for| |from| |by| |bind| -|while| |unless| |do|) \\REMOVE-DECLS (|for| |in| |do|) INSURE.WINDOW (|type?|) TB.DISPLAY.LINES ( -|for| |from| |to| |bind| |do| |finally|) \\TEDIT.COPYINSERTFN (|for| |inside| |do|) TEDIT.GETFUNCTION -(|type?|) SEDIT::FIND-NODE (|bind| |while| |do| |finally|) XTOUSTRING (|for| |from| |while| |do|) -\\LOADNSHOSTNUMBER (|type?|) ASKUSER1 (|thereis| |bind| |in| |eachtime| |suchthat|) \\BN.FROM.FIXP ( -|type?|) |\\LFReturnInfo| (|for| |in| |as| |do|) ARGTYPE.STATE (|for| |in| |do|) FB.UPDATE.COUNTERS ( -|for| |in| |as| |when| |do|) \\M44ACTONVMEMFILE (|while| |bind| |do| |for| |from| |to|) CONCATCODES ( -|for| |in| |as| |from| |do|) \\PRINTFMAP (|for| |from| |to| |by| |bind| |do|) FB.PRINTFN (|while| |do| - |for| |in| |as| |bind|) CENTERPRINTINREGION (|type?|) |\\UFSGetFileInfo| (|type?|) \\ETHEREVENTFN ( -|for| |by| |while| |do| |in|) \\BN.2TH (|while| |do|) \\GETFILINGCONNECTION (|bind| |while| |do| -|finally|) \\DSKDISPLAY.REPAINTFN (|for| |in| |do|) LISTFILES (|for| |in| |when| |collect|) NORMLOOP ( -|while| |do|) \\LOOKUPPORT (|to| |when| |do| |finally| |from| |as| |by| |collect|) \\BN.DIVIDE (|for| -|from| |to| |do|) FIXDATUM (|for| |in| |do|) \\FIXP.FROM.FLOATP (|while| |do|) BRKDWNINIT (|for| -|from| |to| |do|) \\BLOCKDATAP (|type?|) OPENIPSTREAM (|type?|) COMPILER::CLOSURE-ANNOTATE-BLOCK ( -|for| |in| |do|) EXPANDATTACHEDWINDOWS (|for| |in| |do|) DISPLAYSTREAMP (|type?|) COPYDEF (|for| |in| -|do|) \\NSRANDOM.READ.SEGMENT (|for| |inside| |as| |from| |sum| |do| |to| |in|) \\DEVICEFILE.EOSERROR -(|until| |do|) MAKEFILE1 (|find| |in| |suchthat|) TRANSLATE.LOCF (|repeatwhile|) SEDIT::SIMPLE-STRING-SCAN - (|bind| |first| |while| |do| |finally|) TEDIT.MAPPIECES (|for| |from| |while| |do|) MIN/LEFT (|for| -|in| |smallest| |finally|) \\NSFILING.DISCARD.SESSION (|for| |in| |bind| |do| |finally|) -\\NSFILING.MAYBE.CREATE (|for| |in| |join| |on| |collect| |while| |finally|) \\TEXTMENU.DOC.CREATE ( -|bind| |for| |in| |do|) \\AUTHENTICATION.FIND.SERVER (|find| |in| |suchthat|) MSPRGLST (|for| |in| -|do|) D-ASSEM::FETCH-HUNK (|find| |in| |suchthat|) \\TRANSLATE-CL\:LAMBDA (|for| |in| |do|) -\\TEDIT.READTABLE (|for| |in| |as| |do|) \\ALLOCMINIMUMSIZES (|for| |in| |until| |do| |sum|) -\\STRINGOUT (|for| |instring| |as| |from| |to| |do|) DRAWMARGINSCALE (|for| |from| |by| |to| |do| |as| -) DUMPGRAPH (|for| |in| |do| |type?|) D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL (|for| |in| |do|) -CHARWIDTH (|type?|) |\\InitCurveBrushes| (|for| |in| |do| |from| |to|) SEDIT::FIND-LINE-START (|bind| -|first| |do|) MARGINBAR (|for| |in| |do|) \\BN.TIMES2 (|for| |from| |to| |do|) \\COERCEASCIITONSFONT ( -|bind| |for| |from| |to| |unless| |do| |when|) D-ASSEM::DIGEST-CODE (|for| |on| |do|) OPENNSOCKET ( -|type?| |for| |in| |when| |do|) INIT/NODES/FOR/LAYOUT (|for| |in| |do|) DINFOGRAPH (|type?|) -\\GTREADTABLE1 (|type?|) MSINTERPRET (|for| |in| |thereis| |do| |on| |bind| |finally|) -\\CARET.FLASH.MULTIPLE (|for| |in| |as| |do|) \\STARTDISPLAY (|for| |in| |do|) -TWODINSPECT.SELECTROWPROP (|for| |on| |thereis| |in| |as|) TEDIT.PAGEFORMAT (|type?|) TRIM.BITMAP ( -|for| |from| |to| |thereis| |by|) \\PARSEARRAYSPACE1 (|for| |repeatuntil| |do|) SHOW.PRESS (|while| -|do| |finally|) WFROMDS (|for| |in| |thereis|) |\\CreateScreenBitMap| (|for| |from| |to| |do|) -RECORDECLBLOCK (|for| |in| |when| |do| |bind| |find| |from| |suchthat| |as| |collect|) CHAT.TYPEOUT ( -|bind| |first| |while| |do| |finally|) \\SHOW.ARRAY.FREELISTS (|for| |from| |to| |do| |repeatuntil| -|by| |as| |in| |when|) |\\LFFindNextFile| (|bind| |do| |repeatuntil| |finally| |to| |collect|) -OPT.JFIXPASS (|for| |in| |do|) |\\PFTrimHelper| (|bind| |until| |do|) \\FILLBUFFER (|until| |do| -|while|) D-ASSEM::GENERATE-EASY-ENTRY (|for| |in| |as| |from| |do|) TB.REPLACE.ITEMS (|for| |in| |do| -|count|) \\SEQUIN.RETRANSMIT (|while| |do|) ASKUSER$ (|for| |bind| |in| |eachtime| |when| |do| -|finally| |from| |to| |while|) \\NSRANDOM.CHECK.CACHE (|for| |in| |bind| |do|) TITLEDICONW (|for| |in| - |largest|) |\\CoerceToDisplayDevice| (|type?|) BREAK (|for| |in| |join|) D-ASSEM::GENERATE-HARD-ENTRY - (|for| |in| |as| |from| |do|) \\COURIER.EXPEDITED.ARGS (|for| |in| |as| |do|) SETSYNTAX (|type?|) -LATTICE/BREAK/CYCLES (|for| |on| |bind| |do|) MAKEUSERMACROSCOMS (|for| |in| |do| |when| |collect|) -HARDCOPYGRAPH (|type?| |for| |from| |to| |do| |in|) \\NSFILING.LOGIN (|when| |do|) -\\NSFILING.LOOKUP.CACHE (|find| |old| |in| |bind| |suchthat| |for| |always|) \\MEDW.GETSCREENREGION ( -|for| |in| |always| |until| |do|) IRNDLIST (|for| |in| |collect|) GETLOCALDEC (|for| |by| |while| -|bind| |when| |do| |in|) MSPRGLAMBDA (|bind| |while| |do| |finally|) \\MAPCHARTABLE (|for| |from| |to| - |do|) PROMPTPRINT (|for| |from| |to| |do|) SETCOLORLV.IP (|for| |from| |to| |by| |do|) -\\TEXTSTREAM.FILENAME (|type?|) FTP.BREAKCONNECTION (|for| |in| |do| |collect| |when|) -\\NSFILING.UPDATE.ATTRIBUTES (|for| |in| |collect| |unless|) \\TEXTMENU.SET.TOGGLE (|for| |inside| -|do|) |\\LFParseFileName| (|for| |on| |by| |do| |in| |when| |collect|) \\TEDIT.FIXSELS (|for| |in| -|when| |do|) SEDIT::NEXT-NODE (|first| |do| |repeatwhile|) D-ASSEM::DIGEST-FUNCTION (|for| |in| |do| -|on|) TB.RECONSIDERRANGE (|for| |from| |to| |bind| |do|) OPT.JLENPASS (|for| |in| |do|) COPYATOM ( -|for| |from| |to| |do|) TTMAKECOMPLEXCHAR (|for| |in| |do|) \\SETUP.FFILEPOS (|for| |from| |to| |do| -|by| |bind| |repeatuntil| |as| |always|) \\FM.MENUHANDLER (|repeatuntil| |bind| |do| |finally|) -D-ASSEM::STORE-DIGEST-INFO (|for| |in| |as| |from| |by| |do|) PROCESSWORLD (|for| |in| |do| |type?| -|by| |while| |when| |collect|) \\FM.EDIT-FINDFIRST (|for| |in| |thereis|) ONFILE (|for| |in| |collect| - |inside| |do| |find| |suchthat| |when|) MAKEPROPSCOMS (|for| |in| |collect|) \\INTERPRETER1 (|for| -|in| |as| |from| |by| |do|) COMPILER::COPY-NODE-LABELS (|for| |in| |as| |collect|) D-ASSEM::GENERATE-KEY - (|for| |on| |do|) NONSYSPROPNAMES (|for| |in| |when| |collect|) \\MAIKO.DO.MOVDS (|for| |in| |do|) -COMPILER::COPY-NODE-LAMBDA (|for| |in| |collect|) CHECKPATHS (|for| |in| |when| |do|) NORMSECT ( -|while| |do|) HVREADEND (|bind| |until| |do|) \\TEDIT.PARABOUNDS (|repeatwhile| |do| |bind|) -D-ASSEM::EASY-ENTRY-P (|for| |in| |always|) INVERT.BITMAP.VERTICALLY (|for| |from| |to| |do| |bind|) -\\LEAF.HANDLE.INPUT (|type?|) \\IDATESCANTOKEN (|while| |do| |collect|) POSTSCRIPT.INIT (|for| |in| -|join| |collect| |do| |from| |to| |unless|) \\DL.NEWFAULTINIT (|do| |for| |from| |to| |as| |by| -|until| |bind|) \\RELEASE.PROCESS (|for| |in| |when| |do|) \\CIRCSHADE.XSCAN.IP (|while| |do|) -SUBPRINT/ENDLINE (|while| |do|) |\\LFHighestVersions| (|for| |on| |when| |collect| |type?|) -\\SETUP-COMPILED-CLOSURE-CALL (|while| |do| |type?|) \\CIRCSHADE.DISPLAY (|while| |do|) PRETTYPRINT2 ( -|for| |in| |thereis|) MAX/RIGHT (|for| |in| |largest| |finally|) \\VALID.FILING.CONNECTIONP (|for| -|in| |thereis|) PUTWINDOWPROP (|type?|) \\DOCOMPRESSVMEM (|while| |do|) BESTPUPADDRESS (|for| |from| -|to| |bind| |do| |finally| |in|) |\\VFMMerge1| (|while| |do|) \\TEXTDSPFONT (|for| |in| |do|) -\\OUTDATE-STRING (|for| |from| |to| |do|) FM.ITEMPROP (|type?|) TEDITMENU.STREAM (|for| |in| |thereis| -) \\TOTALFIXEDHEIGHT (|bind| |for| |in| |when| |sum|) \\BUILDATWSTRUCTURE (|for| |in| |collect| |join| - |finally| |old| |do|) \\FM.EDIT-SETUPTTBL (|for| |from| |to| |do|) READGRAPH (|bind| |do| |for| |on| -|by| |to| |while| |collect| |in|) CHANGEBACKGROUND (|for| |in| |do|) LOOKUP.NS.SERVER (|find| |old| -|in| |suchthat| |for| |do|) SEDIT::GET-CONTEXT (|bind| |for| |in| |when| |do| |finally| |type?|) -\\IRM.SMART.REF (|while| |bind| |when| |do| |finally| |for| |on| |collect|) |\\PFVersionOK| (|for| -|in| |always|) SPP.DESTADDRESS (|type?|) \\MOVE.WINDOWS.ONTO.SCREEN (|for| |in| |thereis| |unless| -|do|) SEDIT::KILL-NODE (|for| |in| |do|) UNIX.SETDISPLAYTYPE (|until| |do|) TB.CONSIDERRANGE (|for| -|from| |to| |bind| |do|) SET-PROFILE-INTERACTIVELY (|for| |in| |bind| |collect|) TYPESOF (|for| -|inside| |when| |do| |find| |in| |suchthat| |while| |bind|) \\CIRCSHADE.IP (|while| |do|) -\\STORENSHOSTNUMBER (|type?|) PFI.HANDLE.PUTPROPS (|for| |in| |when| |do| |finally|) -DISPLAY/NUMBER/READER/TOTAL (|bind| |for| |from| |to| |do| |finally|) BIGNUM.DEFPRINT (|bind| |while| -|do| |finally| |for| |in|) BUTTONPANEL (|for| |in| |collect|) TEDIT.INSERT.OBJECT (|type?|) -INVERT.BITMAP.HORIZONTALLY (|for| |from| |to| |do| |bind|) OPENWINDOWS (|for| |in| |join| |while| |do| -) \\BN.TH2D (|for| |in| |bind| |do| |finally| |by| |repeatuntil|) ECHOCHAR (|for| |in| |do|) -CLOSEATTACHEDWINDOWS (|for| |in| |do|) GRAPHOBJ.PUTALIGN (|for| |from| |as| |in| |when| |do|) -D-ASSEM::COMPUTE-JUMP-SIZE (|find| |in| |suchthat| |finally|) |\\LFFindInfo| (|bind| |for| |in| |do|) -\\TEST.PARAGRAPH.LOOKS (|while| |do|) D-ASSEM::PRETTY-JUMPS (|for| |in| |collect|) -\\SETUP-ENVIRONMENT-CALL (|bind| |while| |do| |type?|) SEDIT::SET-SELECTION-COMMENT (|type?|) -FOREST/BREAK/CYCLES (|for| |on| |do|) \\IRM.GET.REF (|for| |in| |thereis| |join|) MIN/BOTTOM (|for| -|in| |smallest| |finally|) \\NSFILING.ADD.TO.CACHE (|find| |in| |suchthat| |while| |do| |for| |when|) -\\MEDW.GETSCREENPOSITION (|until| |do|) TTGIVEHELP1 (|for| |on| |unless| |do|) MSPRGTEMPLATE1 (|for| -|inside| |do| |while| |bind| |finally|) CH.NUMBER.TO.PROPERTY (|for| |in| |thereis|) TEDIT.MAPLINES ( -|bind| |while| |do|) D-ASSEM::SPLICE-IN-JUMPS (|for| |in| |do|) SEDIT::ATOM-POINT-TYPE (|for| -|instring| |as| |to| |bind| |do| |finally|) \\BN.NZEROS (|for| |from| |to| |collect|) CONVEXP (|while| - |do|) IMPORTEVAL (|for| |in| |join|) SEEFILE (|for| |from| |to| |do|) \\TTW1 (|type?|) -\\TOTALFIXEDWIDTH (|bind| |for| |in| |when| |sum|) \\TEDIT.BASICFIND (|for| |old| |from| |to| |do| -|as|) GETFILEPKGTYPE (|for| |in| |collect| |do| |bind|) D-ASSEM::REDUCE-UNCERTAINTY (|for| |in| |do|) -COURIER.SKIP.SEQUENCE (|to| |do|) \\GETBRUSH (|type?|) \\TEDIT.FIND.FIRST.LINE (|for| |old| |from| -|to| |by| |repeatwhile| |do|) \\SEND.EXPEDITED.XIP (|bind| |to| |do| |finally| |until| |when|) -SEDIT::SET-POINT-COMMENT (|type?|) \\FREESTACKBLOCK (|until| |do| |type?| |while|) -TEDIT.DEACTIVATE.WINDOW (|for| |in| |do| |type?| |when|) MAX/TOP (|for| |in| |largest| |finally|) -TEDIT.MINIMAL.WINDOW.SETUP (|for| |in| |as| |join|) MAKEFILE (|for| |in| |do| |on|) -COLLECT.CHILD.NODES (|bind| |for| |in| |collect|) ADD.PROCESS (|for| |from| |to| |by| |do|) -|\\UFSSetFileType| (|for| |in| |bind| |finally| |do|) ETHERHOSTNAME (|to| |when| |do| |finally| |for| -|instring| |always|) D-ASSEM::CONVERT-TO-BINARY (|for| |in| |as| |from| |do|) KEYWORD-TEST (|for| |on| - |by| |do|) COURIERPROGRAM.PRETTYPRINT (|while| |do|) \\NSADDRESS.PRINT.DECIMAL (|while| |bind| |do| -|finally|) \\TFBRAVO.PARSE.PARA (|while| |do|) \\CIRCSHADE.BLT (|while| |do|) \\10MBENCAPSULATE ( -|type?|) CHECKCONSPAGES (|for| |do|) \\BACKGROUND.PROCESS (|for| |in| |do|) \\MAPMDS (|for| |from| -|to| |bind| |do| |by|) INVERT.BITMAP.DIAGONALLY (|for| |from| |to| |do|) \\LEAF.FIX.BROKEN.SEQUIN ( -|for| |in| |collect| |when| |forDuration| |do| |until| |type?|) \\FTP.GENERATEFILES (|for| |on| |by| -|do| |in| |collect|) \\DL.MARK.PAGES.UNAVAILABLE (|for| |from| |to| |as| |by| |do|) \\INSURESCREEN ( -|type?|) \\CARET.FLASH.AGAIN (|for| |by| |do|) D-ASSEM::RESOLVE-JUMPS (|for| |in| |do| |while| |when|) - SEDIT::ASSIGN-FORMAT-LITATOM (|type?|) \\BN.D2TH (|while| |do|) LINEBUFFER-SKIPSEPRS (|until| |do|) -\\FAX.PARSE.NAME (|for| |instring| |always|) \\DL.UNMAPPAGES (|for| |from| |to| |as| |by| |when| |do|) - TWODINSPECT.SELECTITEM (|for| |on| |thereis| |in| |as|) \\NSPRINT.MEDIUM.CHECK (|for| |in| |when| -|do| |finally|) ONEDINSPECT.VALUEWIDTH (|for| |in| |largest| |finally|) \\TEST.CHARACTER.LOOKS ( -|while| |do|) APPLY* (|for| |from| |to| |collect|) RECORDECL1 (|for| |in| |collect| |join| |on| |when| -) FINDFILE-WITH-EXTENSIONS (|for| |on| |by| |do| |in| |when| |inside|) SI::ADVICE-PUTDEF (|for| |in| -|collect| |when|) \\INTERPRET-ARGUMENTS (|for| |from| |while| |collect|) SEDIT::CONVERT-COMMENT-TAIL ( -|while| |bind| |do|) GREETFILENAME (|while| |until| |finally| |for| |in| |when| |do|) \\FTP.ADD.QUOTES - (|bind| |while| |do| |finally|) SEDIT::INSERT-CHANGED (|bind| |while| |do| |finally|) -CHAT.SET.EMULATOR (|for| |in| |when| |do|) TB.CONTIGUOUS.SELP (|for| |from| |to| |bind| |always|) -CHAT.MENU (|for| |in| |collect|) CL:DIRECTORY (|while| |collect|) \\SPP.RELEASE.ACKED.PACKETS (|bind| -|while| |do|) ITEM.WINDOW.SET.STACK.ARG (|type?|) TB.NUMBER.OF.ITEMS (|for| |from| |to| |count|) -|\\UFStoOtherRenameMess| (|for| |in| |finally| |do|) \\CLEARWORDS (|while| |do|) -\\TEDIT.HARDCOPY.DISPLAYLINE (|while| |do| |bind| |for| |from| |to| |finally|) SI::ADVICE-GETDEF ( -|for| |in| |collect|) FB.SUBITEMP (|for| |in| |thereis|) VALUOF-EVENT (|for| |in| |collect|) -MENUBUTTONFN (|bind| |for| |in| |when| |do|) PFI.HANDLE.DEFINEQ (|for| |in| |do|) MSPRGRECORD (|while| - |do| |for| |in| |on| |when| |collect| |inside|) \\SET.PROCESS.NAME (|for| |from| |bind| |while|) -HVBAKREAD (|for| |from| |to| |do| |in| |while| |until| |collect| |finally|) ROTATE.BITMAP.RIGHT (|for| - |from| |to| |do| |bind|) \\FTP.CLOSEFILE (|find| |in| |suchthat|) SEDIT::DRAW-UNDERLINE (|until| |do| -) |\\PFGetLVPage| (|for| |in| |thereis|) COURIER.READ (|bind| |for| |in| |do| |finally| |to| |collect| -) SEDIT::INITIALIZE (|for| |in| |do|) \\IDLE.WAIT (|while| |do|) SEDIT::REPAINT (|bind| |first| -|while| |do| |type?|) TB.DECONSIDERRANGE (|for| |from| |to| |do|) %BROADCAST-STREAM-DEVICE-BOUT (|for| - |in| |do|) SEDIT::PARSE-STRING-INTO-WORDS (|bind| |first| |while| |do| |finally|) MAKEFILESCOMS ( -|for| |in| |do| |while|) IMLTLIST (|for| |in| |collect|) \\DO.PROGV (|for| |in| |do|) -\\NSFILING.OPENFILE (|type?| |for| |in| |do|) |\\PFFindRootDirEntryNum| (|bind| |for| |from| |to| -|thereis|) RECURSIVE.COLLECTDESCENDENTS (|for| |in| |bind| |when| |join|) CL:ENCODE-UNIVERSAL-TIME ( -|for| |from| |to| |by| |unless| |do|) OPT.DELTAGREF (|for| |on| |when| |do| |finally|) FILEGETDEF.VARS - (|for| |in| |do| |finally|) PRINT-LOADED-FILE-INFORMATION (|for| |in| |when| |do|) PROG (|for| |in| -|do|) COMPILER::FRAME-ANNOTATE-TAGBODY (|for| |in| |join| |do|) DBG::ATTACH-BACKTRACE-MENU (|for| -|from| |bind| |repeatwhile| |eachtime| |when| |collect| |in| |do|) GRAPHREGION (|for| |in| |do|) -\\NSFILING.CONNECT (|for| |in| |join|) %BROADCAST-STREAM-DEVICE-FORCEOUTPUT (|for| |in| |do|) -FILEGETDEF.FNS (|for| |in| |when| |do|) NEXTSIZEFONT (|for| |on| |when| |do| |in|) SEDIT::CONVERT-COMMENT - (|bind| |while| |do|) %BROADCAST-STREAM-DEVICE-CHARSETFN (|for| |in| |do|) READ/NODE (|bind| |until|) - \\CKPOSSOUT (|for| |instring| |do|) \\LITPRIN (|for| |inatom| |bind| |do|) PRINTLINE (|bind| |for| -|from| |to| |do|) \\PROG0 (|for| |in| |as| |from| |by| |do|) LOADFNS-MAKELIST (|for| |in| |collect| -|when|) \\SIMPLIFY.CL.ARGLIST (|bind| |for| |in| |collect|) COMPILER::META-CALL-LAMBDA-SUBSTITUTE ( -|for| |in| |as| |on| |when| |do|) \\PUPINIT (|for| |in| |bind| |unless| |do|) \\TEDIT.CREATE.LINECACHE - (|for| |from| |to| |collect| |on| |do|) \\UFS.ABORT.DIRECTORY (|bind| |for| |in| |do| |type?|) -COMP.MLL (|for| |in| |do| |type?|) CCCSCAN (|for| |from| |by| |do|) |\\LFVersions| (|bind| |first| -|do|) \\BN.TH2B (|while| |do|) LISPX (|for| |in| |do|) PROCESSP (|type?|) ROTATE.BITMAP.LEFT (|for| -|from| |to| |do| |bind|) %CONCATENATED-STREAM-DEVICE-PEEKBIN (|while| |do| |finally|) ESPATTERN (|for| - |on| |do|) SEDIT::COPY-SELECTION-DEFAULT (|bind| |for| |from| |to| |as| |on| |do|) \\LEAF.RECONNECT ( -|type?|) DEL.PROCESS (|type?|) RESTART.PROCESS (|type?|) FB.HARDCOPY.DIRECTORY (|for| |in| |unless| -|do| |as| |from| |bind| |collect| |sum|) FB.GETALLFILEINFO (|for| |in| |bind| |collect|) BREAKDOWN ( -|for| |in| |do| |from| |to|) STREAMP (|type?|) INTERPRESSFILEP (|for| |from| |to| |when| |do| -|finally|) %BROADCAST-STREAM-DEVICE-OUTCHARFN (|for| |in| |do|) LAYOUTGRAPH (|for| |in| |unless| |do| -|type?|) %CONCATENATED-STREAM-DEVICE-CLOSEFILE (|for| |in| |do|) DASSEM.CANSHAREBINDING (|for| |in| -|when| |do| |finally| |find| |suchthat|) \\FILLPOLYGON.IP (|for| |in| |do|) PRINTPUPQUEUE (|do| -|repeatwhile|) |\\UFSMakeUnixFormatName| (|for| |from| |to| |do|) \\ORIGTERMTABLE (|for| |in| |do| -|from| |to|) \\FTP.MAKEPLIST (|for| |inside| |collect|) PUTSTREAMPROP (|for| |on| |by| |when| |do|) -|\\VFMClearIntervals| (|for| |from| |to| |do|) COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS (|for| -|on| |do| |in|) ENDLOADUP (|for| |in| |do| |when|) OPT.JUMPREV (|type?|) TERM.MODIFY.ATTRIBUTES (|for| - |inside| |do|) DIRECTORY.MATCH1 (|bind| |do| |repeatuntil|) \\EVALA (|for| |in| |as| |from| |by| |do| -) TTYINFIX (|for| |in| |thereis|) LISTHARD (|for| |inside| |do| |in|) MSUSERVBTABLES (|for| |in| -|thereis|) \\FM.SETATTACHPOINT (|for| |in| |do|) UPPERCASEARRAY (|for| |from| |to| |do|) \\PRINSTRING -(|for| |instring| |count| |do|) COMPILE-FILE-EXPRESSION (|for| |in| |do|) FB.BROWSECOMMAND (|for| |in| - |bind| |do| |on| |by| |finally|) FB.ADD.FILEGROUP (|for| |in| |do| |collect|) -\\UFS.ABORT.CL-DIRECTORY (|type?|) %CONCATENATED-STREAM-DEVICE-BIN (|while| |do| |finally|) \\SUBREAD -(|repeatwhile| |bind| |do|) FILEPKGCOM (|for| |in| |when| |join| |from| |to| |by| |do|) -\\TEDIT.BRAVOFILE? (|repeatuntil|) \\GENERIC.CURSOR (|for| |in| |do|) \\SOUT (|for| |instring| |do|) -POSTSCRIPT.FONTCREATE (|for| |from| |to| |do|) FB.COMMANDSELECTEDFN (|for| |in| |thereis|) -PROCESS-STATUS (|do|) LOADUP (|for| |in| |do|) RELPROCESSP (|type?|) \\SUSPEND.PROCESS (|do|) -\\TEXTBACKFILEPTR (|while| |do|) PROCESS.RESULT (|bind| |until| |do| |finally|) MAP.PROCESSES (|for| -|in| |do| |unless|) SEDIT::STRING-OFFSET (|for| |from| |to| |bind| |first| |do| |finally|) -MENUREPAINTFN (|for| |in| |do|) PFI.HANDLE.DEFDEFINER (|for| |in| |thereis|) DASSEM.COUNTVARS (|for| -|in| |do|) PARSE-NSADDRESS (|for| |instring| |do| |finally|) PUTSEQUIN (|until| |do| |finally|) -ADDCHAR (|for| |in| |do|) WAKE.PROCESS (|type?|) \\LEAF.WHENCLOSED (|while| |do|) \\SPP.HANDLE.DATA ( -|do| |while|) MENU.HANDLER (|until| |do| |finally|) PUTPROPS.PRETTYPRINT (|while| |do|) READTABLEP ( -|type?|) FRESHLINE (|type?|) BREAK0 (|for| |in| |join|) BREAK.NSFILING.CONNECTION (|for| |in| |when| -|collect|) SCANFORWARD (|while| |do|) \\LET0 (|for| |in| |as| |from| |by| |do|) SKIPSEPRCODES (|bind| -|first| |declare| |while| |do| |finally|) FILEGETDEF.MACROS (|for| |in| |join| |on| |by| |when| -|collect|) LET* (|for| |in| |do|) DOFILESLOAD (|for| |inside| |bind| |first| |join| |while| |do|) -\\MAXWIDTHOFGROUP (|for| |in| |largest| |finally| |when| |sum|) %CONCATENATED-STREAM-DEVICE-EOFP ( -|while| |do| |finally|) \\CARET.DOWN (|type?| |while|) \\LET* (|for| |in| |as| |from| |by| |do|) LET ( -|for| |in| |do|) \\PUT.FILING.ATTRIBUTE (|for| |in| |when| |do| |finally|) COURIER.SKIP (|bind| |to| -|do| |for| |in|) APPEND (|bind| |while| |do| |finally|) SUSPEND.PROCESS (|type?|) TEDIT.COPY (|bind| -|for| |in| |when| |do|) BRV/OFFSET (|for| |in| |do|) TEDIT.KILL (|type?|) INSPECT (|for| |in| |when| -|do|) TEDIT.WINDOW.SETUP (|type?|) EXCHANGEPUPS (|bind| |do| |repeatuntil|) \\NUMERIC.PNAMEP (|for| -|inpname| |do| |finally| |always|) DECLARED-SPECIAL (|for| |in| |when| |do|) PROCESS.TTY (|type?|) -TEDIT.FORMATTEDFILEP (|while| |do|) \\FTP.GETFILEINFO (|type?|) \\TEDIT.PUT.SINGLE.CHARLOOKS (|type?|) - \\MAXHEIGHTOFGROUP (|for| |in| |largest| |finally| |when| |sum|) \\FTP.FLUSH.TO.MARK (|bind| |while| -|do|) ATTACHEDWINDOWREGION (|for| |in| |do|) FB.FASTSEECOMMAND (|for| |in| |thereis| |on| |do|) -FB.MAYBE.WIDEN.NAMES (|for| |in| |when| |do|) \\LITPRIN.INTERNAL (|for| |inatom| |do| |bind|) -\\DSPFONT.PSC (|type?|) \\SMASHRETURN (|for| |when| |do| |repeatuntil|) TEXTOBJ (|type?|) -SEDIT::LINEARIZE-COMMENT (|bind| |for| |in| |do|) \\UPDATE-WHO-LINE-ACTIVE-FLAG (|for| |in| |thereis| -|finally|) \\DSPCLIPPINGREGION.PRESS (|type?|) PFI.HANDLE.DECLARE (|do| |repeatwhile|) -|\\PFRemoveRootDirEntry| (|bind| |for| |from| |to| |do|) MSGETBLOCKDEC (|for| |inside| |do| |in| -|when|) \\DOBUFFEREDTRANSITIONS (|bind| |until| |do|) \\FM.COLLECTNWAYS (|for| |in| |do|) -CL:MAKE-CONCATENATED-STREAM (|for| |in| |always| |when| |do|) \\SELECTREALPAGE (|until| |do| |finally| -) \\DRAWCURVE.HCPYMODE (|for| |in| |collect|) \\INSTALL.EXTERNALFORMAT (|type?|) EVALA (|for| |in| -|do|) \\LEAF.GETFILEINFO (|type?|) NCHARS (|for| |instring| |bind| |count|) FB.INFO.ITEM.NAMED (|for| -|in| |when| |do|) \\GR.MAKEPRETTYCOMSL (|for| |in| |collect|) CHAT (|do|) COMPILER::META-CALL-LAMBDA ( -|for| |in| |as| |do|) PRETTYDEFMACROS (|for| |in| |collect|) WINDOWP (|type?|) PRINTPACKETQUEUE (|for| - |by| |while| |do| |type?|) OPT.LABELNTHPR (|type?|) TTYINSTRING (|for| |by| |until| |do| |as| |from|) - LOG (|while| |count|) MAKE-UNICODE-TRANSLATION-TABLES (|for| |in| |eachtime| |unless| |do| |from| -|to| |when|) TEDIT.REMOVE.MENUITEM (|for| |in| |do|) FB.HARDCOPY.TOFILE (|for| |on| |by| |bind| |do| -|finally| |in| |when|) FB.ADJUST.DATE.WIDTH (|for| |on| |as| |from| |while| |bind| |when| |do| -|finally|) CL:APPLY (|for| |from| |to| |by| |do|) \\DRAWPOLYGON.GENERIC (|bind| |for| |on| |while| -|do| |finally|) PFI.PRINT.BITMAP (|to| |do| |finally|) COMP.PROGN (|while| |do|) -ONEDINSPECT.SELECTPROP (|for| |on| |thereis| |in| |as|) \\TEDIT.PIECE-CHNO (|while| |do| |for| |from| -|by| |sum|) SEPRCASE (|for| |from| |to| |do| |in| |collect|) BROWSE/LAYOUT/LATTICE (|for| |in| |bind| -|do|) RUNION (|for| |in| |unless| |do|) INTERSECTREGIONS (|for| |from| |thru| |do|) -\\NSFILING.CLOSE.CONNECTIONS (|while| |do| |for| |in| |when|) \\TEDIT.TABTYPE.SET (|type?|) -MOVEDESCENDENTS (|bind| |for| |in| |eachtime| |unless| |do|) MSPRGE (|for| |in| |when| |do|) NSMAP ( -|for| |from| |to| |do| |in|) DASSEM.MATCHVARS (|for| |in| |as| |always|) IMAGEOBJP (|type?|) -\\MKINTEGER (|while| |do|) \\FTP.DELETEFILE (|for| |in| |do|) \\TEDIT.PUT.PARALOOKS.LIST (|for| |from| - |as| |in| |do|) MB.NWAYBUTTON.ADDITEM (|for| |in| |collect| |as| |do| |largest| |sum|) \\TRACKCURSOR -(|do| |repeatuntil|) \\SPP.HANDLE.ATTN (|for| |in| |thereis|) SCANBACK (|for| |by| |until| |do| -|finally|) SKIPSEPRS (|bind| |first| |declare| |while| |do| |finally|) \\FUNCT1 (|for| |in| |as| -|from| |by| |do|) \\MEDW.PUTWINDOWPROP (|type?| |for| |on| |by| |when| |do|) \\IGR.MAKEPRETTYCOMSL ( -|for| |in| |collect|) TTPRIN1 (|for| |from| |while| |sum| |do|) MSNEXTWORD (|for| |in| |when| |do|) -\\GET.FILING.ATTRIBUTE (|bind| |for| |in| |when| |do| |finally|) \\FM.WINDOWEXTENT (|for| |in| |when| -|do|) \\CH.FIND.ORG.SERVER (|find| |in| |suchthat| |for| |collect|) PFI.HANDLE.EVAL-WHEN (|while| |do| -) SORT.NSADDRESSES.BY.DISTANCE (|for| |in| |do| |always|) MSINTERPA (|find| |in| |suchthat|) -|\\ItemNumber| (|for| |in| |as| |from| |do| |finally|) \\FM.MAKELINKS (|for| |in| |do| |on| |by|) -\\TFBRAVO.READ.PARALOOKS (|while| |do|) \\MAKEFUNARGFRAME (|for| |in| |do|) \\LEAF.IDLE (|for| |in| -|thereis|) SI::COMPILED-FUNCTION-ARGLIST (|for| |in| |join|) \\UPDATECHAIN (|do| |repeatuntil|) -\\FM.UPDATEGROUPEXTENT (|for| |in| |do|) \\CH.LOCATE.SERVERS (|for| |in| |bind| |when| |collect| |do| -|old| |thereis|) NSNET.DISTANCE (|type?| |to| |do| |repeatuntil|) MSINTERPRETSET (|for| |inside| -|join| |in| |do| |find| |suchthat|) SI::CHANGE-CALLS-IN-CCODE (|for| |in| |do|) MSADDTYPE (|for| |in| -|bind| |do|) \\FM.READUSERDATA (|for| |on| |by| |do|) CHECKDEFS (|bind| |for| |on| |as| |in| |unless| -|do| |finally| |join|) DUMMYDEF (|for| |in| |when| |do|) SEDIT::BACKSPACE (|type?|) CLEANPOSLST (|for| - |in| |do|) \\LEAF.READPAGES (|for| |inside| |as| |from| |bind| |sum| |to| |until| |do|) \\INTERPRETER - (|for| |in| |do| |from| |to| |collect|) SI::UNWIND (|for| |until| |do|) MAPHASHFILE (|bind| |to| |as| - |from| |by| |when| |do|) UTF16BE.OUTCHARFN (|for| |inside| |do|) CREATE.NUMBERPAD.READER (|for| |in| -|do|) TB.DO.ITEM.SELECTION (|do| |for| |from| |to|) SHOWSHADEDITEMS (|for| |in| |thereis| |do|) -TEXTSTREAM (|type?|) COMP.COMPILER-LET (|for| |in| |collect|) CL:PARSE-INTEGER (|while| |do| -|repeatwhile|) PRIN2-LONG-STRING (|type?| |for| |instring| |as| |from| |bind| |do| |finally| |while|) -DINFO.CLOSEFN (|type?|) \\ATBLSET (|initrecord| |for| |from| |to| |do|) |ShowIntervals| (|bind| |for| -|from| |to| |do|) \\DRAWCURVE.IP (|type?|) SEDIT::RELINEARIZE (|while| |do| |bind| |for| |by| -|finally|) FIXFIELDORDER (|for| |in| |do| |when| |on|) MSINITFNDATA (|for| |in| |do|) -FILEGETDEF.LISPXMACROS (|for| |in| |when| |collect|) ALLATTACHEDWINDOWS (|for| |in| |join|) TTSKREAD ( -|bind| |while| |do| |finally|) GETDEFFROMFILE (|bind| |for| |inside| |when| |do| |finally|) -OPENPUPSOCKET (|type?| |for| |in| |when| |do|) \\RESHAPEATTACHEDWINDOWSAROUNDMAINW (|bind| |for| |in| -|do|) COPIEDFILEMATCH (|find| |on| |suchthat|) \\ENQUEUE (|to| |bind| |while| |collect| |finally|) -PROCESS.WINDOW (|type?|) FB.HARDCOPYCOMMAND (|for| |in| |do|) XCL::PROFILE-VALUES (|for| |in| |by| -|collect|) FB.HEADINGW.DISPLAY (|for| |in| |until| |do|) MENUITEMREGION (|for| |on| |when| |do|) -SEDIT::PRINT-STRING (|bind| |for| |instring| |first| |do| |finally|) \\GCMAPTABLE (|bind| |for| |from| - |to| |when| |do|) FILEGETDEF.PROPS (|for| |in| |join| |finally| |on| |by| |when|) -\\MEDW.GETWINDOWPROP (|type?|) COURIER.EXPEDITED.CALL (|for| |in| |thereis| |from| |to| |collect|) -CONCATLIST (|for| |in| |sum| |as| |from| |by| |do|) TEDIT.INSERT.UPDATESCREEN (|for| |inside| |as| -|on| |do| |while|) |\\PFCurrentVol| (|for| |in| |thereis|) \\TEDIT.PUT.CHARLOOKS.LIST (|for| |from| -|as| |in| |do|) \\INTERNAL/SETPASSWORD (|for| |in| |do|) \\VAROFFSET (|for| |from| |by| |bind| |until| - |do|) MOVETOUPPERLEFT (|type?|) CL:COMPILER-LET (|for| |in| |collect|) \\LOADNSADDRESS (|type?|) -TTYIN.FINISH (|bind| |while| |do| |for| |inside| |in| |when| |on| |finally|) |\\LFDirectorySearch| ( -|bind| |first| |until| |do| |finally| |for| |in| |always|) CMLRDTBL (|for| |from| |to| |do|) DISMISS ( -|do| |until|) |\\LFFindDirHole| (|bind| |do|) REGIONP (|type?|) SPY.FIND.TREE (|find| |in| |suchthat|) - \\10MBSENDPACKET (|for| |in| |bind| |when| |do| |finally|) PFI.HANDLE.RPAQQ (|for| |in| |unless| |do| -) BESTNSADDRESS (|for| |from| |to| |bind| |do| |finally| |in|) TTREADLIST (|while| |collect|) -|\\AddShade| (|for| |in| |do| |finally|) HPRINTEND (|for| |in| |as| |from| |do|) TTYIN (|for| |inside| - |do|) ULREDISPLAYBITMAP (|type?|) RENUMBER.LINES (|while| |do|) \\LEAF.OPENFILE (|type?| |for| |in| -|do|) \\TEDIT.CHARDELETE (|while| |do|) TRACKCURSOR (|until| |do|) XCL::PROFILE-VARIABLES (|for| |in| -|by| |collect|) COMPAREDEFS (|for| |in| |when| |collect| |on| |do|) SEDIT::SCAN-FOR-BOUNDS (|bind| -|first| |do| |finally| |type?|) \\COURIER.RECORDTRAN (|bind| |first| |while| |do| |finally| |collect|) - WAITFORINPUT (|bind| |until| |do|) VIRGINFN (|for| |in| |do|) \\TFBRAVO.READ.CHARLOOKS (|while| |do|) - SEDIT::INSERT-COMMENT-CHARS (|for| |old| |on| |bind| |do| |finally| |while|) \\INSERTCH (|type?| -|for| |instring| |thereis|) TTYIN.READ (|while| |do| |bind| |collect|) DASSEM.DSTOREFNDEF (|on| |by| -|do| |for| |in| |as| |from| |bind|) \\IPCURVE2 (|for| |from| |to| |do| |until|) \\SYMBOL.ESCAPE.COUNT -(|for| |inatom| |bind| |first| |do| |finally|) ALLCALLS (|for| |in| |when| |collect|) CH.PROPERTY ( -|for| |in| |when| |do|) REPOSITIONATTACHEDWINDOWS (|for| |in| |do|) INITIALIZEMASTER.IP (|for| |from| -|do|) CLOSEPUPSOCKET (|while| |do|) COMPILER::FRAME-ANNOTATE-PROGN (|for| |in| |join|) -\\BREAKAPARTATWSTRUCTURE (|for| |in| |join|) COMPARELISTS (|for| |on| |do|) GREET (|for| |in| |do|) -\\GET.COURIER.DEFINITION (|for| |in| |when| |do|) COURIER.WRITE.SEQUENCE (|for| |in| |do|) -\\ENCRYPT.PWD (|for| |from| |do|) TOPW.REPAINTFN (|for| |on| |as| |until| |finally| |in| |bind| -|repeatuntil| |do|) BROWSE/LAYOUT/HORIZ/COMPACTLY (|for| |in| |do|) \\SMASHSTRING (|bind| |for| -|inthinstring| |as| |from| |to| |do| |infatstring|) \\WAITFORSYSBUFP (|until| |do|) -\\TEDIT.FIND.OVERLAPPING.LINE (|while| |do|) \\NSFILING.AFTER.LOGIN (|for| |in| |when| |do|) -READFROMBUF (|for| |by| |until| |thereis| |do|) \\GR.CONTENTS (|find| |in| |suchthat|) MSPATHS4 (|for| - |in| |do|) \\CREATECHARSET.IP (|bind| |first| |do| |for| |from| |to| |when|) ICMLARRAY.INDICES ( -|bind| |for| |in| |do|) GETDEFERR (|for| |inside| |when| |do| |finally|) FONTCREATE (|type?|) -REDISPLAYBITMAP (|type?|) \\TEDIT.SET-TOTLEN (|for| |from| |to| |as| |by| |sum|) SI::RESTORE-CALLS ( -|for| |in| |do|) SYSRECLOOK1 (|for| |in| |when| |do|) FILEGETDEF.ALISTS (|for| |in| |when| |collect| -|finally|) OPENHASHFILE (|for| |in| |thereis| |finally| |type?|) \\UTF8.BACKCHARFN (|bind| |while| -|repeatuntil| |finally|) TWODINSPECT.REDISPLAY (|for| |in| |join| |collect| |as| |thereis| |never| -|bind| |do|) SI::CLEAN-UP-CL-ARGLIST (|bind| |for| |in| |collect|) \\TFBRAVO.FIND.LAST.TRAILER ( -|while| |do|) DOAROUNDEXITFORMS (|for| |in| |do|) SPP.FLUSH.TO.EOF (|while| |do| |finally|) -VRULE.DISPLAYFN (|bind| |for| |inside| |do|) \\GENERIC.DSPCREATE (|for| |in| |suchthat| |type?|) -CL:MAKE-BROADCAST-STREAM (|for| |in| |always| |when| |do|) \\SETGROUPMIN (|for| |in| |largest| -|finally| |do|) PP (|for| |in| |do|) ALLPATHS (|for| |in| |when| |join|) \\LET*-RECURSION (|bind| -|for| |on| |eachtime| |do| |finally|) \\TRACKWITHBOX (|until| |do|) \\LEAF.WRITEPAGES (|for| |inside| -|as| |from| |do|) SEDIT::INSERT-COMMENT (|type?|) GETDEFSAVED (|for| |on| |by| |when| |do| |finally|) -\\TEXTEOFP (|bind| |while| |do| |finally|) LIST* (|bind| |for| |from| |by| |until| |do| |finally|) -FB.INFOMENU.SHADEINITIALSELECTIONS (|for| |in| |do|) \\BSP.PREPARE.OUTPUT (|bind| |do|) PROCESS.APPLY -(|type?| |do| |until|) TEDIT.FORMATTEXTBOX (|for| |in| |collect| |while| |do| |as| |on|) -COMPILER::FRAME-ANNOTATE-MV-PROG1 (|for| |in| |join|) \\DRAWLINE.PSC (|for| |in| |do|) DCODERD (|on| -|by| |do| |for| |as| |from| |bind|) CHANGENAME1A (|find| |in| |suchthat|) SI::PARSE-CL-ARGLIST (|for| -|in| |do|) \\SHIFT.DOCUMENT (|while| |do| |for| |in| |collect|) |\\LETtran| (|for| |in| |as| |do|) -SCROLLBITMAP (|type?|) \\FM.TRANSPOSEHORZ (|for| |in| |do|) U-CASE (|for| |inatom| |as| |from| |do| -|finally| |instring| |first|) INFILECOMTAIL (|for| |in| |do| |finally|) \\DOTRANSITIONS (|for| |from| -|to| |do|) MSADDMODIFIER (|for| |in| |bind| |do|) HPRINT1 (|while| |do| |for| |from| |to| |in| |when| -|collect| |unless|) SEDIT::PARENTHESIZE-CURRENT-SELECTION (|for| |from| |to| |as| |on| |collect| |in| -|when|) COMPILER::META-EVAL-TAGBODY (|for| |in| |do|) \\FM.TRANSPOSEVERT (|for| |in| |do|) -\\PRINTFRAME (|for| |old| |from| |by| |while| |as| |do|) |\\PFNewPages| (|bind| |until| |do| |finally| -) PROMPTFORWORD (|bind| |for| |from| |to| |do| |finally| |in| |unless| |until|) SHOWCHARS (|for| -|from| |to| |unless| |do|) TEDIT.FORMATFOLIO (|for| |in| |collect| |while|) FB.DISPLAY.COUNTERS (|for| - |in| |do| |as| |from| |by| |collect|) \\DRAWCURVE.PSC (|for| |in| |do| |from| |to|) -PROVIDE.PROMPTING.WINDOW (|until| |do|) SPPSTREAMP (|type?|) DASSEM.DWRITEFN (|for| |in| |as| |from| -|do|) FLONUM-TO-STRING (|while| |do|) DINFO.READ.KOTO.GRAPH (|for| |in| |as| |from| |to| |do|) -\\TRANSLATE.10TO3 (|for| |in| |when| |do| |finally|) \\GETDEVICEFROMHOSTNAME (|for| |in| |when| |do| -|type?|) \\10MBGETPACKET (|for| |in| |bind| |when| |do| |finally|) TEDIT.SETSEL (|type?|) \\FTPINIT ( -|type?|) NOHOST (|do|) \\PRINTBF (|bind| |for| |from| |by| |as| |to| |do| |finally| |while|) -FREEATTACHEDWINDOW (|for| |in| |when| |do|) \\TEDIT.WORDDELETE (|for| |old| |from| |to| |by| |while| -|do|) \\NOIMAGE.DSPFONT (|type?|) TERM.TAB (|for| |in| |thereis|) |\\LFMakeDirHole| (|to| |do|) -RINGBELLS (|to| |do|) OPT.JUMPTHRU (|while| |do| |type?|) BROWSE/LAYOUT/HORIZ (|for| |in| |bind| |do|) - GC-FILING-DIRECTORY (|for| |in| |do| |while| |bind| |finally|) MMLTLIST (|for| |in| |collect|) -READHOTSPOT (|until| |when| |do| |finally|) \\REMOVEDEVICE (|while| |do| |find| |in| |suchthat|) -\\FM.EDITSTART-SELECTEDFN (|type?|) \\FLOATTOBYTE.UFN (|for| |from| |to| |do|) MSPATHS2 (|for| |in| -|when| |do| |finally|) MSADDANALYZE (|for| |in| |do|) GETFILEDEF (|for| |in| |when| |do|) -\\UNQUEUE.EVENT (|while| |do|) COMPILER::RELEASE-TAGBODY (|for| |in| |do|) TRAJECTORY.IP (|for| |in| -|do|) STRINGWIDTH (|type?|) \\LOOKUPPUPNUMBER (|to| |bind| |do| |repeatuntil|) \\DEFINEDEVICE (|type?| -) \\REMOVEDEVICE.NAMES (|for| |on| |bind| |when| |do| |finally|) PREVWORD (|for| |by| |until| |do| -|finally|) \\BLKFABSMAX.UFN (|for| |from| |to| |do|) DO-EVENT (|for| |in| |do|) SEND.FILE.TO.PRINTER ( -|for| |on| |by| |when| |do| |inside|) GETDEFCURRENT (|for| |on| |by| |when| |join|) \\FM.EDIT-ITEM ( -|do| |until|) \\BLKFABSMIN.UFN (|for| |from| |to| |do|) GETDEFCOM0 (|for| |in| |join| |collect|) -COMPILER::FRAME-ANNOTATE-MV-CALL (|for| |in| |join|) |\\PFGetVols| (|for| |from| |to| |collect|) -FONTCLASS (|for| |in| |collect| |inside| |do|) GETBLOCKDEC (|for| |in| |when| |do|) TERM.SMOOTHSCROLL -(|for| |from| |to| |do|) UNADVISE (|for| |in| |join|) \\SCANFORNTENTRY (|bind| |for| |from| |by| |as| -|do|) \\BLKFMIN.UFN (|for| |from| |to| |do|) \\NSGC.COLLECT.DIRECTORIES (|bind| |eachtime| |while| -|when| |collect| |for| |in| |always|) PFI.ESTIMATE.SIZE1 (|until| |do|) \\CANONICALIZE.NSADDRESS ( -|for| |while| |do| |finally|) MAXSTRINGWIDTH (|bind| |for| |in| |do| |finally|) |\\LFFileName| (|for| -|from| |as| |in| |do|) TEDIT.FORMAT.HARDCOPY (|type?| |while| |do| |for| |inside|) |UnixPrint| (|for| -|in| |when| |do|) EQCLOOKS (|type?|) TEDIT.FIND (|for| |in| |collect| |when|) COPIEDFILEPATTERN ( -|while| |do| |on| |old| |collect| |for| |when|) COPYINSERT (|for| |inside| |do|) \\LEAF.SETFILEINFO ( -|type?|) \\BLKFMAX.UFN (|for| |from| |to| |do|) IN/ITEM? (|for| |in| |when| |do|) TEDIT.FORMATHEADING -(|for| |in| |collect| |inside| |thereis| |do| |while|) \\BLKEXPONENT.UFN (|for| |from| |to| |do|) -TEDIT.PARALOOKS (|type?| |for| |in| |collect| |bind| |while| |do| |finally|) COMP.DELFIX (|while| |do| -) ONEDINSPECT.SELECTITEM (|for| |on| |thereis| |in| |as|) \\MEDW.BURYW (|for| |in| |do|) \\NOTE.10TO3 -(|for| |in| |bind| |when| |do| |finally|) DASSEM.DASSEM (|for| |in| |when| |do|) -\\TEDIT.UNPARSE.CHARLOOKS.LIST (|for| |in| |as| |do|) CL:PEEK-CHAR (|until| |do| |finally|) -\\DRAWCIRCLE.PSC (|for| |in| |do|) COMPILE-FILE? (|for| |inside| |do| |finally|) COMP.EXPR (|for| |in| - |sum|) \\TEDIT.APPLY.PAGEFORMATTING (|for| |from| |to| |when| |collect|) EDITFROMFILE (|for| |inside| - |when| |collect| |in| |do| |unless|) RELEASE.MONITORLOCK (|do|) TB.MAKE.BROWSER (|for| |on| |by| |do| - |in| |finally|) \\BLKFLOATP2COMP.UFN (|for| |from| |to| |do|) \\BLKFDIFF.UFN (|for| |from| |to| |by| -|do|) \\CURSORDESTINATION (|do| |repeatuntil|) \\FM.CHECKPROPS (|for| |in| |do|) CL:RETURN-FROM ( -|while| |do| |finally|) \\FM.EDIT-FINDNEXT (|for| |in| |thereis|) \\BLKSEP.UFN (|for| |from| |to| |by| - |bind| |do|) WRITE-UNICODE-INCLUDED (|for| |inside| |join| |in| |collect| |find| |suchthat| |from| -|to| |when| |on| |while|) TEDIT.FORMATPAGE (|while| |do| |for| |in|) |\\LFMakeDirEntry| (|for| |in| -|do|) \\DRAWELLIPSE.PSC (|for| |in| |do|) SI::MONITOR-UNWIND (|do|) TEDIT.UNPARSE.PAGEFRAMES (|for| -|in| |collect|) \\GET-COMPILED-DEFINITION (|type?|) \\SOFTCURSORUPCURRENT (|until| |do|) IRM.LOOKUP ( -|type?|) \\BLKMAG.UFN (|bind| |declare| |for| |from| |to| |do|) FNCHECK (|for| |in| |thereis| |inside| - |find| |suchthat|) \\HARDCURSORPOSITION (|do| |repeatuntil|) VOLUMES (|for| |in| |collect|) DASHINGP -(|for| |in| |always|) \\BLKFTIMES.UFN (|for| |from| |to| |by| |do|) \\BLKSMALLP2FLOAT.UFN (|for| -|from| |to| |do|) \\BSP.FLUSHINPUT (|while| |do|) DBG::FIND-DEBUGGER-STACK-FRAME (|bind| |while| |do| -|finally|) \\HANDLE.NS.ROUTING.INFO (|while| |do| |when| |repeatwhile|) \\SOFTCURSORUP (|type?|) -GETEXPRESSIONFROMEVENTSPEC (|while| |collect|) \\BRUSHCONVERT.HCPYMODE (|for| |in| |collect|) -COMPILER::GENCODE-CALL (|for| |in| |do| |always|) \\BLKFPLUS.UFN (|for| |from| |to| |by| |do|) -\\INSPECTW.COMMAND.HANDLER (|until|) ESTIMATE-DIMENSIONALITY (|to| |as| |by| |collect|) CALLSCCODE ( -|for| |from| |by| |as| |until| |do| |to| |type?|) \\DEVICEEVENT (|for| |in| |do| |unless|) \\FLUSHVM ( -|for| |in| |do|) \\CCODEIVARSCAN (|bind| |for| |from| |by| |while| |do| |finally| |to|) MERGLIST ( -|while| |do|) \\SHADEBITS (|until| |when| |do|) READHASHMACRO (|while| |do| |collect|) -\\GETREGIONTRACKWITHBOX (|until| |do|) MSPATHS1 (|for| |in| |when| |collect| |on| |do|) \\SUBFNDEF ( -|find| |from| |to| |suchthat|) MEMBTONODES (|for| |in| |do|) COMP.SPREAD (|while| |do| |for| |in|) -\\PROCESS.RELEASE.LOCKS (|while| |do|) \\PROMPTFORWORDRETYPE (|for| |in| |do|) \\NSFILING.GETFILE ( -|type?|) COMPILER::FRAME-ANNOTATE-LAMBDA (|for| |in| |join| |do|) PROCESS.EVAL (|type?| |do| |until|) -\\CCODEARGLIST (|for| |in| |unless| |collect| |from| |to|) \\COURIER.TRACE (|for| |in| |bind| |do|) -IBLT1 (|for| |from| |to| |by| |do|) MAKEINITBFS (|to| |bind| |first| |do| |finally| |for| |from|) -\\RELEASEWORKINGSET (|for| |from| |to| |bind| |when| |do|) \\ABORT.BULK.DATA (|do| |repeatwhile| -|while|) BRECOMPILE3 (|for| |in| |when| |do| |thereis|) \\BLKPERM.UFN (|for| |from| |to| |do|) -UNIQLIST (|for| |in| |do|) \\NSRANDOM.OPENFILE (|type?|) ICMLARRAY.DISPLAYSLICE (|for| |from| |to| -|collect|) \\TEDIT.FILL.IN.CHARLOOKS.MENU (|for| |in| |do| |finally| |type?|) TEDIT.FLASHCARET (|bind| - |for| |inside| |do|) |\\VFMGetInterval| (|bind| |for| |from| |to| |by| |do| |finally|) LISPERROR ( -|for| |in| |as| |from| |when| |do|) \\PROCESS.MOVEFRAME (|type?|) FB.GET.SORT.MENU (|for| |in| -|collect|) WRITE-UNICODE-MAPPING-FILENAME (|for| |on| |join|) FB.CREATE.FILEBUCKET (|bind| |while| -|do| |finally| |for|) CONSTANTS (|for| |in| |do|) TEDIT.INSERT (|type?| |for| |instring| |as| |from| -|by| |do|) \\DUMP.COURIERPROGRAMS (|for| |in| |bind| |do| |on| |by|) DECODE-NS-STRING (|bind| |while| -|do|) \\MATCHPCS (|bind| |for| |from| |to| |by| |as| |do| |type?|) TEDIT.PARSE.PAGEFRAMES (|type?| -|for| |in| |collect|) BRHL/LAYOUT/DAUGHTERS (|for| |on| |bind| |finally| |do|) BRECOMPILE (|for| |in| -|when| |collect| |always| |join| |do|) UNSAVEFNS (|for| |in| |when| |bind| |do| |unless|) -MACROS.GETDEF (|for| |on| |by| |when| |collect|) \\FM.CHECKDESCRIPTION (|for| |in| |do|) GETMACROPROP -(|for| |in| |bind| |do|) OPENPRSTREAM (|type?|) IBLT2 (|for| |from| |to| |by| |do|) \\GETSTREAM ( -|type?|) CHARWIDTHY (|type?|) COURIER.WRITE (|find| |in| |bind| |suchthat| |for| |do| |as|) SET-SYMBOL - (|while| |do|) CHAT.OPTIONMENU (|type?|) OPT.XVARSCAN (|for| |in| |do|) POLYSHADE.SCAN.IP (|for| |in| - |collect|) DETACHALLWINDOWS (|for| |in| |do|) COMP.NUMBERCALL (|while| |do|) \\NSFILING.COPY/RENAME ( -|for| |in| |always|) ONEDINSPECT.REDISPLAY (|for| |in| |collect| |as| |thereis| |never| |bind| |do|) -\\LASTNODE (|for| |from| |to| |by| |when| |do| |type?|) PRINTCOMSTRAN (|for| |in| |bind| |when| |do| -|while| |collect| |finally|) BRHL/MOVE/RIGHT (|for| |in| |bind| |do|) TCOMPL (|for| |inside| |collect| -) TEDIT.CURSORMOVEDFN (|for| |inside| |as| |when| |do|) \\IRM.WILD.MATCH (|for| |on| |thereis|) -OPENRTPSOCKET (|until| |do|) MSPATHS (|do|) \\CLEARSYSBUF (|for| |in| |do|) READVISE (|for| |in| -|join|) NTH.RELATIVE.COLUMN.OF (|for| |do|) FB.INSERT.SUBDIRECTORIES (|for| |on| |bind| |when| |do|) -PFI.MERGE.INDICES (|while| |collect|) \\FTP.CLEANUP (|do| |until|) ICMLARRAY.ATTACHDISPLAY (|for| |in| - |do|) \\WAIT.FOR.TTY (|until| |do|) CHANGECCODE (|for| |in| |do|) \\RECLAIMARRAYBLOCK (|for| |old| -|by| |until| |do|) CREATEHASHFILE (|to| |do| |type?|) COMPILER::META-EVAL-PROGN (|for| |on| |do| -|when| |collect|) COMP.NUMERIC (|while| |do|) \\TTYBACKGROUND (|for| |in| |do|) SUPERPRINT/COMMENT2 ( -|for| |on| |bind| |do| |finally|) \\OPENFILE (|type?|) COMPILER::GENCODE-TAGBODY-INLINE (|for| |in| -|do| |when|) MSNEEDUNSAVE (|for| |inside| |when| |collect|) PRINTFILEPROP (|for| |in| |when| |do|) -\\PFI.DO.HARDCOPY (|while| |bind| |do| |finally|) RECFIELDLOOK (|for| |in| |join|) ICONW (|type?|) -\\DO.PARAMS.AT.OPEN (|for| |in| |do| |finally|) \\NSFILING.GENERATEFILES (|for| |on| |when| |do| -|finally| |in| |collect| |until|) WAIT.FOR.TTY (|do|) SHOULD-BE-DWIMIFIED? (|for| |in| |while| |do| -|finally|) TEDIT.SUBSTITUTE (|for| |in| |sum| |while| |do| |collect| |instring| |as| |from| |by|) -PFI.DEFAULT.HANDLER (|for| |in| |when| |do|) CHANGERECORD (|for| |in| |do|) -CONVERT.FILE.TO.TYPE.FOR.PRINTER (|for| |in| |bind| |when| |do|) \\MAIKO.INPUT.INTERRUPT (|for| |in| -|bind| |when| |do| |finally|) COMPILER::META-EVALUATE (|until| |do|) \\PROC.CODEFORTFRAME (|while| -|do|) SEDIT::ASSIGN-FORMAT-CLISP (|for| |in| |do|) \\TEDIT.CENTER.SEL.REV (|for| |in| |do|) -INSPECT/ALIST (|for| |in| |collect|) COMPILER::FRAME-ANNOTATE-LABELS (|for| |in| |join|) -CHARCODE.DECODE (|for| |in| |when| |do| |finally| |first|) \\SAVESYSBUF (|for| |in| |do| |from| |to|) -FIND.START.OF.WORD (|while| |do|) TIMEALL (|for| |inside| |bind| |join|) COMP.USERFN (|for| |in| -|collect|) PRINTROUTINGTABLE (|for| |from| |to| |as| |by| |join| |in| |do|) STRPOSL (|type?|) -EDITSHADE (|do| |until| |bind| |finally|) \\NSFILING.GETFILEINFO (|type?|) ICMLARRAY.MENUW.SHOW ( -|bind| |for| |from| |to| |as| |in| |do|) \\FM.JUSTIFYGROUPS (|for| |in| |do|) TRANSGRAPH (|for| |in| -|collect|) CALLS3 (|for| |on| |do|) EDITDATE? (|for| |from| |to| |always|) TEDIT.BUILD.PCTB1 (|bind| -|for| |from| |to| |as| |by| |do| |finally| |in| |thereis|) \\DRAWCURVE.PRESS (|for| |in| |collect|) -DEFAULTFONT (|type?|) FB.SORTCOMMAND (|for| |in| |bind| |do|) MB.NWAYBUTTON.SELFN (|for| |in| |as| -|do|) ADVISE (|for| |in| |join|) COMPILER::FRAME-ANNOTATE-CATCH (|for| |in| |do|) MAKEFILES (|for| -|in| |when| |do| |finally| |inside| |collect|) \\STRINGWIDTH.GENERIC (|for| |inatom| |sum| |instring| -|do|) MAPFILES (|for| |in| |do|) \\PEEKSYSBUF (|until| |do|) TRACKW (|until| |bind| |do|) -\\SIMULATE.UNBIND (|to| |do| |repeatuntil| |finally|) \\SPLITTREE (|for| |from| |to| |by| |do| |as|) -\\DRAWPOLYGON.DISPLAY (|for| |on| |while| |do| |finally|) PRETTY-TYPE-NAME (|for| |in| |join|) -FONTCLASSUNPARSE (|for| |in| |collect|) PURGEDSKDIRECTORY (|for| |in| |when| |do| |type?|) -\\PROMPTWINDOW.OPENFN (|for| |in| |bind| |when| |do|) CL:VALUES (|for| |from| |to| |collect|) -ITEMW.REPAINTFN (|for| |in| |bind| |do|) FONTUNPARSE (|type?|) SEDIT::CREATE-CONSTANT-STRINGS (|for| -|in| |join|) PRINTCODE (|for| |from| |by| |while| |do| |to| |in| |when| |finally|) \\GETKEY (|bind| -|do|) CL::VALUES-UFN (|for| |from| |to| |by| |collect|) \\DSPCLIPPINGREGION.DISPLAY (|type?|) -SEARCHPRETTYTYPELST (|find| |in| |suchthat|) OPT.POSTOPT (|while| |bind| |do| |finally| |for| |in|) -\\ENQUEUE.TIMER (|bind| |first| |while| |do|) SETFILEINFO (|type?|) \\FM.PUSHGROUP (|for| |in| |do|) -MENUTITLEFONT (|type?|) NUMBERPAD.READ (|bind| |until| |do| |finally|) \\FM.REDISPLAYMENU (|for| |in| -|do|) HPRINT0 (|for| |in| |collect|) COMPUTE-MACRO-ARGS (|while| |do| |for| |on| |by| |in|) -\\TURN.ON.PROCESSES (|for| |in| |do|) \\DASHINGCONVERT.HCPYMODE (|for| |in| |collect|) -%COPY-STRING-TO-ARRAY (|for| |from| |to| |do|) INSPECTABLEFIELDNAMES (|for| |in| |when| |collect|) -WRITE-UNICODE-MAPPING (|for| |in| |when| |collect|) SI::RESETUNWIND (|while| |bind| |do|) -\\ATWGROUPSIZE (|for| |in| |do|) \\BSP.PREPARE.INPUT (|bind| |do|) PROG1.PRETTYPRINT (|for| |in| -|never|) BREAK.PROCESS (|type?|) \\TFBRAVO.SPREAD.LOOKS (|for| |in| |do|) \\ROUTINGTABLE.INFOHOOK ( -|for| |from| |to| |as| |by| |sum|) SEDIT::COPY-SELECTION-COMMENT (|bind| |while| |collect|) -CASE.PRETTYPRINT (|do|) \\BITMAPFROMTEXTURE (|for| |from| |to| |do|) ICMLARRAY.MENUW.APPLY (|for| -|from| |to| |collect| |in| |count|) \\TEDIT.PARSE.CHARLOOKS.MENU (|for| |in| |do| |suchthat|) -COLLECTFNDATA (|for| |in| |do|) GETDEFCOM (|for| |in| |join|) SEDIT::STRINGWIDTH (|for| |instring| -|bind| |do| |finally|) %COPY-ONED-ARRAY (|for| |from| |to| |do|) BRECOMPILE1 (|for| |in| |when| |do| -|thereis|) MAPFILES1 (|while| |unless| |do|) \\DSPPRINTCHAR (|for| |from| |do|) MB.NB.PACKITEMS ( -|while| |do|) \\FINDKEY.UFN (|for| |from| |to| |by| |as| |when| |do|) \\NSPRINT.WATCHDOG (|bind| |do| -|for| |on|) TEDIT.SCAN.LINE (|for| |from| |to| |as| |do| |on| |inside| |when|) KEYACTION (|type?|) -EXPANDOPENLAMBDA (|for| |in| |do| |while|) \\UNWIND.UFN (|while| |bind| |when| |do| |to|) -COMPILER::ENSURE-EFFECT-CONTEXT (|for| |in| |as| |from| |do|) BRKDWN1 (|for| |from| |to| |do|) -BRHC/OFFSET (|for| |in| |do|) PACKFILENAME (|for| |on| |by| |do|) \\NSFILING.SETFILEINFO (|type?|) -DEFAULT.INSPECTW.VALUECOMMANDFN (|until| |type?|) |\\VFMKillBuffer| (|bind| |for| |on| |do|) -KEYACTIONTABLE (|type?| |for| |in| |do|) \\PAGED.REVALIDATEFILELST (|bind| |for| |in| |do|) -TEDIT.BUILD.PCTB2 (|bind| |for| |from| |to| |as| |by| |do| |finally| |in|) TEDIT.BUILD.PCTB0 (|bind| -|for| |from| |to| |as| |by| |do| |finally|) \\NSFILING.PARSE.FILENAME (|bind| |first| |while| |do| -|finally| |until|) \\CLEAR.ROUTING.TABLE (|for| |from| |to| |as| |by| |do|) COMPILEFILES0 (|for| |on| -|first| |do|) \\PROCESS.EVENTFN (|for| |in| |when| |bind| |do| |type?|) \\IFSERRORSTRING (|for| |from| - |to| |do|) \\UNQUEUE (|bind| |while| |do|) CLRPROMPT (|type?|) TTRACKMOUSE (|bind| |while| |do| -|finally|) SETUPPAGEMAP (|for| |from| |to| |do| |bind|) \\POLYSHADE.YSCAN.IP (|while| |do| |for| |in|) - PRINTCODENT (|for| |from| |by| |while| |as| |do| |to|) \\FONT.SYMBOLASSOC (|for| |in| |first| |when| -|do|) PAINTW.CACHE.SHADE (|for| |in| |when| |do|) \\CONS.UFN (|while| |do|) ACCESSDEF4 (|for| |in| -|join|) SEDIT::CFV-CLISP (|bind| |first| |for| |in| |do| |finally|) \\PARAS.IN.SEL (|for| |in| |do|) -LEAF.ASSURE.FINISHED (|type?| |bind| |until| |do| |while| |never|) \\DRAWCURVE.DISPLAY (|type?|) -\\FONT.COMPARESYMBOL (|for| |inatom| |as| |always|) CACHEMACRO (|for| |in| |by| |thereis|) PPROC1 ( -|type?|) MB.MARGINBAR.TABTRACK (|while| |do|) SUBPRINT1 (|bind| |for| |on| |until| |finally|) PPROC ( -|for| |do| |repeatuntil| |while| |in| |unless|) \\PROCESS.MAKEFRAME0 (|while| |do| |type?|) -\\DRAWLINE.DISPLAY (|type?| |while| |do|) \\MEDW.SHRINKW (|type?|) TWOD.TRACKCURSOR (|bind| |while| -|do| |finally| |for| |on| |as| |in| |until|) COMPILER::FRAME-ANNOTATE-CALL (|for| |in| |join|) ALISTP -(|for| |in| |always|) \\FONT.SYMBOLMEMB (|for| |on| |when| |do|) SEDIT::REUSE-LINEAR-FORM (|bind| -|first| |do|) INTCHAR (|for| |in| |do| |while|) \\MEDW.MOVEW (|for| |in| |do|) -ICMLARRAY.MENUW.GETLEVEL (|for| |from| |to| |collect|) \\FONTFACE (|type?|) \\STKSCAN (|for| |from| -|to| |do|) \\BUFFERED.REVALIDATEFILELST (|bind| |for| |in| |do|) \\CHECK.PQUEUE (|type?|) MAKEKEYLST ( -|for| |in| |bind| |as| |from| |collect|) MSDESCRIBE (|for| |in| |when| |collect| |do|) \\FM.LAYOUTGRID - (|for| |on| |bind| |do| |in|) GETINTERRUPT (|for| |in| |unless| |collect| |when| |do|) GETWINDOWPROP -(|type?|) \\PAGED.REVALIDATEFILES (|bind| |for| |in| |do|) \\BITBLT.DISPLAY (|type?|) \\RESTLIST.UFN ( -|for| |from| |to| |by| |do| |finally|) \\MAKE.JIS.TO.XCCS.CONV.TABLE (|bind| |for| |in| |do| |join| -|collect|) \\TYPEGLOBALVARIABLE (|for| |in| |as| |from| |when| |do|) SEDIT::COPY-NODE (|for| |in| -|collect|) DSFIT1 (|bind| |for| |on| |until| |do| |finally|) \\UNBOXFLOAT3 (|bind| |declare| |for| -|from| |to| |by| |do| |finally|) COMP.PROGLST (|while| |do|) \\TEDIT.ADJUST.LINES (|bind| |while| |do| -) RESTOREMAP (|for| |inside| |thereis|) OPT.OPTCHECK (|for| |in| |do|) WRITE-UNICODE-MAPPING-HEADER ( -|for| |in| |do|) NUTF8STRINGBYTES (|for| |from| |while| |sum|) MULTIFILEINDEX1 (|for| |on| |as| |from| - |do|) FB.EXPUNGECOMMAND (|for| |in| |do|) UTF8.OUTCHARFN (|for| |inside| |do|) \\UNCOPY (|for| |from| - |to| |do|) \\TFBRAVO.WRITE.RUNS (|for| |in| |old| |do|) HASHLINKS (|for| |in| |bind| |when| |collect| -) READPAGEMAP (|for| |from| |to| |as| |by| |do|) FB.PROMPTFORINPUT (|for| |from| |to| |by| |bind| -|when| |do|) WHICHW (|for| |by| |while| |thereis|) \\KEYBOARDEVENTFN (|for| |in| |do|) COMPILER::GENCODE-PROGN - (|for| |on| |do|) \\KEYACTION1 (|for| |in| |collect|) SI::PRINT-TRACE-EXIT-INFO (|for| |in| |do|) -\\UPDATE.PBT.RASTERWIDTHS (|to| |bind| |do|) \\TELERAIDBREAK (|while| |do| |type?|) \\INSERTTREE ( -|for| |old| |from| |to| |by| |when| |do| |finally| |type?| |as| |sum|) INSPECT/PLIST (|for| |in| |by| -|collect|) SEDIT::TRANSLATE-CHARS (|bind| |first| |for| |instring| |do| |finally|) -|\\LFFindDirectoryVol| (|type?| |for| |on| |do| |in| |thereis|) READVARS (|for| |in| |when| |do|) -COPYGRAPH (|for| |in| |collect|) SI::INTERNAL-THROW (|for| |from| |to| |collect|) SEDIT::CONTAINS? ( -|while| |do|) |CreateCursorBitMap| (|for| |from| |to| |do|) FB.GREATEST.PREFIX (|for| |from| |bind| -|do|) FB.EDITCOMMAND (|for| |in| |bind| |do|) MSSPLST (|find| |in| |suchthat|) \\FIXDLINES (|for| -|inside| |do| |bind| |while|) \\MAIKO.CONSOLE-LOG-PRINT (|while| |do|) \\NSRANDOM.WRITEPAGES (|for| -|inside| |as| |from| |do| |old| |bind| |sum|) |\\PFInitializeVols| (|for| |from| |to| |do|) -COMP.UBFLOAT2 (|while| |do|) \\DRAWPOLYGON.IP (|for| |on| |do|) \\FM.LAYOUTCOLUMN (|for| |in| |do|) -\\MAIKO.IO-INTERRUPT (|for| |in| |when| |do|) DELFROMCOM (|for| |in| |do| |when| |inside| |always|) -PUPNET.DISTANCE (|to| |do| |repeatuntil|) SEDIT::UNDO-EXTRACT (|for| |in| |as| |from| |do|) -\\INSUREWINDOW (|type?|) BROKENDEF (|bind| |do|) SHOW.CLEARINGHOUSE (|for| |in| |collect|) -\\NSRANDOM.READPAGES (|for| |from| |to| |when| |do|) \\PRESSCURVE2 (|for| |from| |to| |do| |until|) -MAKEHVPRETTYCOMS (|for| |in| |do|) \\HANDLE.RAW.PUP (|for| |in| |when| |do|) \\FM.LAYOUTROW (|for| -|in| |do|) \\MAIKO.ETHER-INTERRUPT (|for| |in| |bind| |when| |do| |finally|) COMPILER::RELEASE-LAMBDA -(|for| |in| |do|) PACKFILENAME.STRING (|for| |on| |by| |do|) FIND.PROCESS (|type?|) KNOTLOOP (|for| -|in| |do|) \\NSFILING.COMPOSE.PATHNAME (|for| |in| |join|) COMPILER::FRAME-ANNOTATE-BLOCK (|for| |in| -|do|) |\\LFCloseDevice| (|for| |in| |do|) \\DO.PROGV.SETUP.FRAME.AND.EXECUTE (|for| |in| |as| |from| -|by| |do|) ALIGNMENTNODE (|for| |in| |largest| |smallest|) \\KEYNAMETONUMBER (|for| |in| |as| |from| -|when| |do| |finally|) TEDIT.SELECT.LINE.SCANNER (|bind| |while| |do| |for| |on| |as| |inside| |when| -|finally|) \\FILE-CONFLICT (|type?|) XCL:UNBREAK-FUNCTION (|for| |in| |join|) CONTROL-T (|do| |bind|) -DINFO.INVERT.NODE (|for| |in| |thereis|) \\COURIER.RESULTS (|for| |in| |collect| |find| |suchthat| -|when| |do|) \\AGE.ROUTING.TABLE (|for| |from| |to| |do| |by| |while| |bind| |when| |finally|) -SEDIT::COMMENT-LENGTH (|for| |from| |to| |as| |in| |sum|) RAISE/TRANSITION/CHAIN (|for| |in| |do| -|finally|) \\DELETECH (|bind| |while| |collect| |for| |in| |do|) \\SELECTPROCESS (|for| |in| |unless| -|collect|) \\POSITION.MENU.IMAGE (|type?|) DASSEM.CLEANFNTEST (|while| |do| |finally|) -DWIM-SYMBOL-PACKAGE (|for| |in| |collect| |when| |do|) \\NSRANDOM.SESSION.WATCHER (|do| |for| |in| -|when|) COMPILER::EXPAND-OPENLAMBDA-CALL (|while| |do|) POSTSCRIPT.PUTCOMMAND (|for| |from| |to| |do|) - \\MAIKO.10MBSENDPACKET (|for| |in| |bind| |when| |do| |finally|) \\TEXTMENU.TOGGLE.DISPLAY (|type?|) -REMOVETONODES (|for| |in| |unless| |collect|) COMP.BIND.VARS (|for| |in| |do|) MAKEALISTCOMS (|for| -|in| |join| |inside| |collect| |bind| |when|) \\PROC.FINDREALFRAME (|for| |from| |by| |do|) -COMP.LABELS (|for| |in| |do| |when|) GETFILEINFO (|type?|) SEDIT::GETKEY (|bind| |do|) -IDLE.SHOW.OPTIONS (|for| |on| |by| |do|) RESETKEYACTION (|type?|) \\ONQUEUE (|for| |by| |while| |do| -|when|) PROCESS.STATUS.WINDOW (|for| |in| |collect|) \\TEDIT.UPDATETREE (|while| |do| |for| |old| -|from| |by| |as| |to| |when| |finally|) \\MAP.ROUTING.TABLE (|for| |from| |to| |as| |by| |do| |in|) -INSTALL-PROTOTYPE-DEFN (|for| |in| |collect|) SEDIT::RECOMPUTE-FORMAT-VALUES (|for| |in| |do|) -ACCESSDEF (|for| |in| |join|) ADDMENU (|type?|) COMP.TAGBODY (|for| |in| |do|) MAKEHASHKEY (|for| |in| - |bind| |do| |finally|) SEDIT::COMPUTE-FORMATS-AND-FORMAT-VALUES (|for| |in| |do|) SPAWN.MOUSE (|for| -|from| |to| |unless| |do|) DINFO.LAYOUTGRAPH (|for| |in| |collect|) FULLNAME (|type?|) \\TFBRAVO.EOLS -(|for| |from| |to| |do|) MSOBJTYPE (|type?|) PRINTOPCODES (|for| |in| |do|) \\IS.NOT.RANDACCESSP ( -|type?|) \\MAP-CODE-LITERALS (|for| |from| |by| |do| |to|) \\FM.FORMATEXPLICIT (|for| |in| |do|) -\\GCRECLAIMCELL (|do| |repeatuntil| |while|) COMPILER::RELEASE-LABELS (|for| |in| |do|) -CHECK/MENU/IMAGE (|type?|) SEDIT::LINEARIZE-CLISP (|bind| |first| |for| |in| |do| |finally| |type?|) -SEDIT::OUTPUT-STRING (|type?|) NESTED.SUBMENU.POS (|for| |on| |when| |do|) SEDIT::UNDO-LIST-REPLACE ( -|for| |in| |unless| |do|) \\FILE.NOT.OPEN (|type?|) SHADEITEM (|for| |in| |thereis|) -COMPILER::COMPLETELY-EXPAND (|until| |do| |finally|) \\PROCESS.GO.TO.SLEEP (|type?|) NEGATE (|for| -|in| |do|) COMP.RETURN-FROM (|until| |do|) MB.NB.SIZEFN (|bind| |for| |in| |collect| |join| |largest|) - FONTSET (|for| |in| |when| |do|) FONTCOPY (|type?| |for| |from| |by| |to| |do| |on|) -\\CORE.DELETEFILE (|type?| |for| |on| |when| |do|) SUBDECLARATIONS (|for| |in| |collect|) -SEDIT::ASSIGN-FORMAT-DOTLIST (|for| |in| |do|) CLEAR.LEAF.CACHE (|type?|) \\LEAF.BREAKCONNECTION ( -|type?| |for| |in| |do|) RESET.INTERRUPTS (|for| |in| |collect|) \\PRINTFPTOVP (|while| |do|) -PFI.CONSTANTNAMES (|for| |in| |collect|) BKSYSBUF (|for| |inatom| |do| |instring|) FONTMAPARRAY (|for| - |in| |do| |from| |to| |unless|) \\ILLEGAL.DEVICEOP (|for| |from| |to| |collect|) BRACKET.CURRENT.WORD - (|for| |by| |until| |do| |finally|) \\CORE.RELEASEPAGES (|for| |in| |when| |do|) \\POLYSHADE.XSCAN.IP - (|for| |in| |collect| |while| |do|) \\FILE.WONT.OPEN (|type?|) PROCESS.EVALV (|type?|) -\\CORE.GENERATEFILES (|for| |in| |join| |when| |collect|) \\PSWOP.SELECTED (|forDuration| |until| |do| -) \\TEDIT.GET.CHARLOOKS.LIST (|for| |from| |to| |collect|) TEDIT.PUT (|while| |do| |type?|) -DEFINEFONT.IP (|for| |from| |as| |in| |do| |finally|) DIRECTORY.MATCH (|do|) \\CHTOPC (|while| |do| -|type?| |for| |from| |to| |as| |by|) GRAPHOBJ.FINDGRAPH (|bind| |first| |do|) -\\NSFILING.GENERATE.STARS (|bind| |while| |do| |finally|) \\NSFILING.CONFLICTP (|for| |in| |bind| -|when| |do|) RPLSTRING (|for| |from| |to| |as| |do|) PROCESS.NAME (|type?|) FONTPROFILE (|for| |in| -|do|) \\IRM.WILDCARD (|for| |in| |when| |collect|) CLOSERTPSOCKET (|until| |do|) \\STARTPUP (|for| -|in| |do|) CH.FINDSERVER (|type?| |for| |in| |when| |do|) SPELLFILE (|for| |in| |thereis| |when| |do|) - MB.NB.DISPLAYFN (|for| |in| |as| |do| |when|) \\LOCATE.PUPNET (|for| |in| |when| |do| |finally|) -TEDIT.PUT.PCTB2 (|type?| |while| |do| |finally| |for| |from| |to| |as| |instring| |in|) PRINTCONSTANT -(|for| |in| |when| |do|) \\FTP.FLUSH.TO.EOC (|while| |do|) \\TEDIT.UNIQUIFY.PARALOOKS (|for| |in| -|thereis|) BKSYSCHARCODE (|bind| |while| |collect|) FB.MAYBE.INSERT.FILE (|for| |in| |collect| |on| -|as| |unless| |do|) \\AB.BACK (|type?|) SEDIT::OUTPUT-SPACE (|for| |from| |to| |do|) \\CURVE (|for| -|from| |to| |do|) RIGHTW.REPAINTFN (|for| |on| |as| |until| |finally| |in| |bind| |repeatuntil| |do|) -\\LOOKUPFONTSINCORE (|for| |in| |when| |join| |collect| |type?|) CONVERT-AFM-FILES (|for| |in| |do| -|as|) \\#BLOCKDATACELLS (|type?|) \\CLOSEF.PRESS (|for| |in| |as| |from| |do|) FIND.NEXT.WORD (|while| - |do|) |\\PFCreateVols| (|type?| |bind| |for| |from| |to| |do|) PRINTFILETYPE (|for| |in| |when| |do|) - MSMARKCHANGE1 (|for| |inside| |do|) PFI.PASS.COMMENT (|bind| |do|) TRACE (|for| |in| |join|) -DIRECTORY.MATCH.SETUP (|do| |for| |on| |bind|) KNOTLINE (|for| |in| |do|) TWODINSPECT.MAKEREGIONS ( -|for| |from| |to| |as| |by| |collect| |bind| |in|) TMPSUBFN (|for| |from| |to| |always|) -FONTPROFILE.ADDDEVICE (|for| |in| |do| |unless|) BITMAPP (|type?|) TTSKIPSEPR (|while| |do|) GENSYM ( -|for| |to| |as| |from| |by| |do| |finally|) COMP.BINDLIST (|for| |in| |collect|) INVERT.LONG.SEGMENT ( -|while| |do|) MSSUBJTYPE (|type?|) \\NSFILING.CHECK.ACCESS (|for| |in| |thereis|) \\COERCETODS ( -|type?|) \\TEDIT.UNIQUIFY.CHARLOOKS (|for| |in| |thereis|) TWODINSPECT.ADJUSTSELECTION (|for| |in| -|as| |on| |thereis|) \\UNITWIDTHSVECTOR (|for| |from| |to| |do|) CHECKFPTOVP (|for| |from| |to| |as| -|by| |when| |do|) EDITBM (|while| |do|) \\CORE.GETFILEINFO (|type?|) COMP.LOOKFORDECLARE (|while| |do| - |for| |in| |bind| |finally|) INSPECT/TOP/LEVEL/LIST (|for| |from| |to| |as| |on| |collect| |finally|) - \\IRM.WILD.REF (|for| |in| |collect|) \\TEDIT.DELETE (|for| |inside| |as| |do|) OPENWP (|type?|) -UNTRACE (|for| |in| |join|) SHOWSTACKBLOCKS (|type?| |while| |do| |for| |from| |to| |by| |always|) -MBUTTON.FIND.NEXT.BUTTON (|bind| |first| |while| |do| |type?|) \\TEDIT.GET.PARALOOKS.LIST (|for| -|from| |to| |collect|) L-CASE (|for| |inatom| |as| |from| |do| |finally| |instring| |first|) -DUMPINITPAGES (|for| |from| |to| |do|) MB.NB.WHENOPERATEDFN (|for| |in| |as| |when| |do|) DINFO ( -|type?|) \\FM.FORMATBYGRID (|for| |in| |do| |as| |finally|) U-CASEP (|for| |inatom| |never| |instring| -) PREEDITFN (|for| |in| |do| |collect|) MAKEHASHLINKS (|for| |in| |when| |collect|) CHAT.STARTUP ( -|for| |in| |when| |do| |on| |by|) WFROMMENU (|for| |in| |thereis|) COMP.TOPLEVEL.COMPILE (|for| |in| -|when| |collect| |unless|) SAMECLOOKS (|for| |in| |always|) OPT.DS1 (|never| |repeatwhile|) -HRULE.IMAGEBOXFN (|for| |inside| |sum|) ADDTOVAR (|for| |in| |bind| |do| |finally| |find| |suchthat|) -READATABASE (|while| |do|) COPY.SEGMENT (|for| |by| |until| |collect|) \\FILLINXIP (|type?|) ALLFIELDS - (|for| |in| |when| |join|) NCREATE2 (|for| |in| |do|) SEDIT::CFV-DOTLIST (|for| |in| |always| |sum| -|bind| |do| |finally|) CREATEDSKDIRECTORY (|type?|) SCAVENGEDSKDIRECTORY (|type?| |for| |in| |do|) -FONTP (|type?|) SORT.PUPHOSTS.BY.DISTANCE (|for| |in| |do| |always|) |\\PFInitFileDescriptors| (|for| -|from| |to| |do|) EDITGETDEF (|bind| |for| |in| |when| |do|) MSSTOREDATA (|for| |in| |when| |do|) -\\FM.FORMATBYROW (|for| |in| |do|) COPY.TEXT.TO.IMAGE (|bind| |do|) \\CREATECHARSET.DISPLAY (|for| -|in| |bind| |when| |do|) \\UPDATE.PROCESS.WINDOW (|for| |in| |as| |thereis|) \\TEDIT.CENTER.SEL (|for| - |in| |do|) COMPILER::META-EVAL-CALL (|for| |in| |collect|) FONTSAVAILABLE (|type?| |for| |in| |join|) - DEFAULT.INSPECTW.TITLECOMMANDFN (|type?|) \\BUILDSLUGCSINFO (|for| |from| |to| |do|) -CL::BOA-ARG-LIST-WITH-INITIAL-VALUES (|for| |on| |do|) SEDIT::BUILD-NODE (|bind| |while| |do| -|finally|) SEDIT::UNDO-EVENT (|for| |in| |do|) TB.MAP.DELETED.ITEMS (|for| |in| |when| |do|) COMP.PROG - (|for| |in| |collect| |do| |while|) MAKEINITLAST (|for| |in| |as| |do|) \\POLYSHADE.DISPLAY (|for| -|in| |collect| |while| |do|) \\CORE.NAMESCAN (|bind| |while| |do| |finally|) -\\CREATE-REAL-CHARSET.DISPLAY (|for| |in| |bind| |when| |do|) TEDIT.GET.CHARLOOKS0 (|for| |from| |to| -|collect|) ATTACHEDWINDOWS (|for| |in| |thereis| |unless| |collect|) GET.MENU.LIST (|for| |in| -|always|) AS.NEXT.VERIFIER (|for| |in| |collect|) \\BLT (|for| |from| |by| |to| |do|) RECORDTRAN ( -|while| |do| |for| |in| |collect|) READOCT (|bind| |while| |do| |finally|) INFILEPAIRS (|for| |in| -|do| |inside|) \\HANDLE.PUP.ROUTING.INFO (|while| |do| |when| |repeatwhile|) -\\NSFILING.FILLIN.ATTRIBUTES (|for| |in| |do|) \\TEDIT.DIFFUSE.PARALOOKS (|bind| |while| |do|) -SEDIT::MARKASCHANGEDFN (|type?|) \\TEDIT.FOREIGN.COPY? (|for| |from| |to| |do|) FB.OPERATE.ON.FILES ( -|for| |in| |collect|) SEDIT::NEXT-LINEAR-ITEM (|do| |type?|) ROMANNUMERALS (|while| |do|) -\\TEDIT.WINDOW.OPS (|while| |do|) COURIER.READ.SEQUENCE (|to| |collect|) ONED.TRACKCURSOR (|bind| -|while| |do| |finally| |for| |on| |as| |in| |until|) POSTINITARRAYS (|for| |from| |to| |by| |do|) -MODIFY.KEYACTIONS (|for| |in| |collect| |do|) MB.MARGINBAR.SELFN (|for| |in| |collect| |while| |do| -|as| |smallest|) COMPILER::GENCODE-LET (|for| |in| |as| |do| |when|) GETHASHKEY (|bind| |first| -|until| |do| |finally|) \\CORE.OPENFILE (|type?|) ADDTOCOM (|for| |inside| |always| |in|) COMP.LAMBDA -(|while| |do| |for| |in|) \\FM.FORMATBYCOLUMN (|for| |in| |do|) OPT.DELCOPYFN (|while| |do| |for| |by| - |always|) |\\VFMGenerateFileIDs| (|bind| |until| |when| |collect|) MBUTTON.FIND.NEXT.FIELD (|while| -|do|) |\\PFCreateFileDescriptors| (|for| |from| |to| |do|) MSEDITE (|for| |from| |to| |collect|) UNION - (|for| |in| |bind| |unless| |do| |finally|) SUBFIELDCREATE (|for| |in| |when| |collect|) -\\10MBRAWTRANSMIT (|repeatuntil|) \\CHANGECHARSET.HDCPYDISPLAY (|for| |from| |to| |do|) -\\LEAF.LOOKUPCACHE (|for| |from| |bind| |while| |do| |finally|) \\PUTBASESTRING (|for| |infatstring| -|as| |from| |do| |infatatom|) \\OPENLEAFCONNECTION (|until| |do|) HEXSTRING (|for| |from| |until| |do| - |finally| |by|) \\READDISPLAYFONTFILE (|bind| |first| |for| |inside| |when| |do| |finally|) -FB.COPY/RENAME.MANY (|for| |in| |thereis| |repeatwhile| |finally| |do|) \\SEARCHFONTFILES (|bind| -|for| |inside| |do| |finally| |in| |when|) \\AB.NEXT (|type?|) \\DOHARDRETURN1 (|type?| |while| |do|) -LDIFFERENCE (|for| |in| |when| |collect|) COURIER.READ.STRING (|for| |from| |to| |thereis|) -COMPILER::FIND-TAG-DUPLICATION (|for| |on| |eachtime| |do|) TEDITFROMBRAVO (|first| |while| |do| -|finally|) TEDIT-BOOK (|for| |in| |do|) PAINTW.READBRUSHSHADE (|for| |in| |collect|) -BRHC/LAYOUT/DAUGHTERS (|for| |in| |bind| |do| |finally|) TEDIT.GET.PARALOOKS0 (|for| |from| |to| -|collect|) MARKASCHANGED (|for| |inside| |do| |in| |on| |when|) CREATEW1 (|type?|) HASH.PASSWORD ( -|bind| |for| |instring| |do| |finally|) DOSLINKER (|for| |in| |do|) BQUOTIFY (|for| |in| |join| |by| -|while| |never|) INFILECOMSMACRO (|for| |inside| |do|) CONSTANTEXPRESSIONP (|for| |in| |collect| -|finally|) \\NSFILING.FULLNAME (|type?| |for| |in| |do| |from| |while| |bind| |finally| |join|) -\\FM.STATE-SELECTEDFN (|type?|) TEDIT.HARDCOPY (|for| |in| |do| |finally|) BLTSHADE (|type?|) -\\FONTINFOFROMFILENAME (|for| |from| |when| |do| |find| |suchthat|) \\SETUP.TYPENUM.TABLE (|for| -|from| |to| |bind| |do| |finally| |old| |as| |in| |when|) SCREENBITMAP (|type?|) -\\COURIER.CHECK.PROCEDURES (|for| |in| |bind| |unless| |do| |while|) APPENDTOVAR (|for| |in| |do| -|find| |suchthat|) DUMPDATABASE (|for| |in| |when| |do|) MOUSECONFIRM (|until| |bind| |do| |finally|) -IMAPLIST (|while| |do|) DIRECTORY (|bind| |do| |for| |in| |thereis| |while|) \\INCUSECOUNT (|until| -|type?|) \\SLOWFGREATERP (|while| |do|) \\FONTFILENAME (|while| |do|) COMPILER::ALPHA-TAGBODY (|for| -|in| |do|) MSPARSE (|for| |in| |do| |when| |collect|) \\SPP.CLEANUP (|for| |in| |do|) FIND.LINE (|for| - |do|) \\FINDFONTFILE (|bind| |for| |inside| |when| |do|) \\MOVEFRAME (|type?| |do| |repeatwhile|) -FIND-EDIT-LOCATION (|while| |do|) HOSTNAMEP (|find| |in| |suchthat|) DO.SHIFTED.SELECTION (|bind| -|while| |do| |finally|) \\COREFILE.SETPARAMETERS (|for| |in| |bind| |do| |finally|) HRULE.DISPLAYFN ( -|bind| |for| |inside| |do|) |\\PFCreatePhysicalVolume| (|type?|) SEDIT::STRINGIFY-LIST (|bind| |for| -|in| |do| |finally|) \\CORE.GETINFOBLOCK (|type?| |for| |on| |when| |do|) \\GATHER-CLEANUP-FORMS ( -|for| |in| |bind| |do|) SPELLFILE1 (|for| |on| |by| |do|) MAKECREATELST1 (|to| |collect|) CALLS (|for| - |on| |do|) TTYIN.PRINTARGS (|while| |do| |bind|) \\SFMAKEITALIC (|for| |from| |to| |do|) -\\INIT-MISCN-TABLE (|for| |in| |do|) OPT.RESOLVEJUMPS (|for| |in| |do| |while|) COMPILER::ALPHA-SETQ ( -|for| |on| |by| |collect|) \\GCSCANSTACK (|while| |do| |type?| |until|) MBUTTON.FIND.BUTTON (|first| -|while| |do|) \\FONTFACE.COLOR (|type?|) TB.NTH.ITEM (|while| |do| |finally|) FB.GET.NEW.FILE.SPEC ( -|for| |on| |by| |bind| |do|) \\PARSE.NUMBER (|for| |from| |to| |always|) SEDIT::LINE-FINISHED (|for| -|by| |do| |repeatuntil| |finally|) SPELLFILEDIR (|for| |in| |when| |do|) SEDIT::SET-SELECTION-QUOTE ( -|type?|) COURIER.CALL (|for| |from| |to| |collect| |type?|) MSERASE (|for| |in| |do|) CREATEARRAYSLICE - (|bind| |for| |in| |do| |finally| |as|) MSEDITF (|for| |from| |to| |collect| |in| |bind| |when| |do|) - ED (|for| |inside| |when| |bind| |collect| |find| |on| |by| |suchthat|) MISCN-COLLECT (|for| |from| -|to| |collect|) SPELLFILE.MATCHINGDIRS (|for| |in| |when| |collect| |unless|) UNPACKFILENAME.STRING ( -|for| |from| |to| |bind| |first| |do| |finally| |while| |always|) \\INITATOMPAGE (|for| |from| |to| -|as| |by| |do|) FIND1STPRIME (|find| |from| |by| |suchthat| |for| |never| |repeatuntil|) -\\FTP.FIX.BROKEN.INPUT (|for| |in| |collect| |when| |do|) SEDIT::SELECT-SEGMENT-DEFAULT (|type?| |for| - |in| |as| |from| |bind| |do|) \\NODIRCORE.OPENFILE (|type?|) \\TERMINATESPP (|bind| |do| -|repeatuntil|) INSPECT/ATOM (|type?|) UNIX-STREAM-IN (|while| |do|) SEDIT::SET-SELECTION-LIST (|type?| -) TEDIT.SUBLOOKS (|for| |on| |by| |collect| |bind| |while| |do|) CHANGE-TTY-PROCESS-INTERACTIVELY ( -|for| |in| |collect|) \\PS.SCALEHACK (|for| |in| |do|) EDIT.BITMAP.REAL (|until| |do|) INSPECTW.CREATE - (|for| |in| |collect| |bind| |largest| |finally|) HELPSYS (|for| |in| |thereis|) -\\POSTSCRIPT.ACCENTFN (|for| |instring| |do|) COPYBYTES (|type?| |until| |do|) EVALUABLE.CONSTANTP ( -|for| |in| |collect| |do| |finally|) SEDIT::SCAN-STRING (|bind| |first| |while| |do| |finally| |type?| -) \\LEAF.DEVICEP (|for| |from| |to| |always| |type?|) \\TEDIT.CHANGE.LOOKS (|type?| |bind| |while| -|do| |finally|) \\PUTBASESTRINGFAT (|for| |from| |to| |as| |by| |do|) MAPATOMS (|for| |old| |from| -|to| |do| |by| |while| |when| |as| |never|) PARSERELATION (|for| |in| |collect|) -SEDIT::ATOM-CHANGE-RELINEARIZE (|type?|) \\COURIER.CHECKDEF (|for| |on| |by| |do|) \\TEDIT.CARET ( -|for| |inside| |do|) TEDITWINDOWP (|type?|) MSSEEKPHRASE (|for| |in| |when| |do| |while|) RECORDFIELD? - (|for| |in| |when| |do|) \\TEDIT.REOPEN.STREAM (|while| |do|) \\CH.UPDATE.CACHE (|for| |in| |do| -|find| |suchthat| |when| |finally|) ATOMHASH#PROBES (|for| |infatstring| |when| |do| |from| |to| -|until| |as| |always|) \\BUFFERED.COPYBYTES (|bind| |do| |repeatwhile|) SCALE/TONODES (|for| |in| -|collect| |do|) PUTCURSORPROP (|for| |on| |by| |when| |do|) \\CREATE.SYMBOL (|for| |from| |as| |to| -|do|) TEDIT.UNDO.PARALOOKS (|bind| |for| |in| |do|) \\WALKOVER.SPECIALFORMS (|for| |on| |until| |do| -|finally|) \\ALLOCHEIGHTTOGROUPEDWINDOW (|for| |in| |collect| |when| |sum| |as| |unless| |do| |until|) - |\\LFScavFileName| (|for| |instring| |until| |collect| |in| |thereis|) FIX/SCALE (|for| |in| -|collect|) \\TEDIT.GET.PARALOOKS1 (|for| |from| |to| |collect|) COPYCHARS (|type?| |until| |do| |for| -|from| |to| |by| |bind| |while|) DELETETO1 (|for| |inside| |do|) BREAK-FUNCTION (|for| |in| |join|) -IFCPROPSCAN (|for| |in| |when| |unless| |do| |by| |collect| |inside|) SI::NON-LOCAL-RETURN (|for| -|from| |to| |collect|) \\ALLOCWIDTHTOGROUPEDWINDOW (|for| |in| |collect| |when| |sum| |as| |unless| -|do| |until|) \\DISPLAYLINE (|bind| |for| |from| |to| |do| |finally| |while|) TEDIT.LOOKS (|type?|) -TEDIT.HCPYFILE (|type?|) \\TEDIT.FLUSH.UNUSED.LOOKS (|for| |in| |do| |while| |when| |collect|) -\\TEDIT.MARK.LINES.DIRTY (|bind| |for| |inside| |do| |finally| |while|) DOUSERFNS2 (|for| |in| |do|) -SEDIT::SHIFT-LINEAR-FORM (|for| |in| |when| |do| |type?|) GTHASHFILE (|type?|) |\\LFUnpackName| (|for| - |instring| |collect|) BYTEBLOCKCOMPILE2 (|for| |in| |when| |collect|) \\FIRSTNODE (|type?|) -COMPILER::ENV-ANALYZE-TAGBODY (|for| |in| |do|) DOICONWINDOWCOM (|type?|) \\DECL.COMNT.PROCESS (|for| -|on| |while| |do| |finally|) CLOSEALL (|for| |in| |when| |collect|) IFCEXPRTYPE (|for| |in| |when| -|do|) DEFAULT.INSPECTW.PROPCOMMANDFN (|type?|) \\INIT-USER-SUBR-TABLE (|for| |in| |do|) -\\POSTSCRIPT.ACCENTPAIR (|for| |instring| |do| |inside|) \\CREATEPIECEORSTREAM (|type?|) -SEDIT::COPY-SELECTION (|type?|) \\LEAF.ADD.QUOTES (|bind| |while| |do| |finally|) SEDIT::ASSIGN-FORMAT-NIL - (|for| |in| |do|) COPYFILES (|for| |inside| |do| |bind| |while|) TB.COLLECT.ITEMS (|for| |in| -|collect| |when|) DECLARERECORD (|for| |in| |do| |unless| |when|) SEDIT::SET-POINT-QUOTE (|type?|) -ONEDINSPECT.MAKEREGIONS (|for| |from| |to| |as| |by| |collect|) UNBREAK (|for| |in| |join|) -FB.PROMPTWPRINT (|for| |from| |to| |do|) |\\LFDirectoryP| (|type?|) \\READSTRIKEFONTFILE (|for| |from| - |to| |do| |as|) PRINTADDRS (|for| |from| |to| |do| |repeatwhile|) \\FORMATLINE (|while| |do| |type?| -|for| |old| |from| |to| |as| |when|) TB.UNSELECT.ALL.ITEMS (|for| |from| |to| |bind| |when| |do|) -\\READACFONTFILE (|for| |from| |to| |as| |in| |do| |sum| |bind|) MSVERBTYPE (|type?|) -COMPILER::EXPAND-NESTED-PROGNS (|for| |in| |join|) \\STRINGWIDTH.HCPYDISPLAYAUX (|for| |inatom| |sum| -|instring| |do|) BUILDTESTRELQ (|for| |in| |collect|) \\FONTINFOFROMFILENAME.OLD (|for| |from| |when| -|do|) XCL:UNADVISE-FUNCTION (|for| |in| |join|) PF (|for| |inside| |unless| |do|) TEDIT.UNDO.LOOKS ( -|bind| |for| |in| |do|) XCL:READVISE-FUNCTION (|for| |in| |join|) \\DELETETREE (|for| |old| |from| -|to| |by| |when| |do| |finally| |as| |sum|) WHENCLOSE (|for| |from| |to| |by| |do|) -\\COURIER.CHECK.ERRORS (|for| |in| |bind| |unless| |do|) \\FONTRESETCHARWIDTHS (|for| |from| |to| |do| -) \\DRAWPOLYGON.PSC (|for| |in| |do|) DOUSERFNS (|for| |in| |when| |do|) SEDIT::SET-POINT-LIST ( -|type?|) ONEDINSPECT.ADJUSTSELECTION (|for| |in| |as| |on| |thereis|) SI::PVAR-VALUE-IN-FRAME (|for| -|from| |by| |bind| |until| |do|) XCL:ADVISE-FUNCTION (|for| |in| |join|) XCL:REINSTALL-ADVICE (|for| -|in| |do|) OPENP (|type?|) LOOKUPHASHFILE (|for| |in| |thereis|) DO.MOUSE (|bind| |while| |when| |do|) - SI::UNWIND-TO-BLIP (|bind| |until| |when| |do|) RAIDSTACKCMD (|type?|) \\STKMIN (|for| |from| |to| -|do|) \\BSP.CLOSE.OPEN.SOCKETS (|for| |in| |do| |when| |collect|) BITSPERPIXEL (|type?|) \\FINDOP ( -|for| |in| |do| |from| |to| |by|) \\COMPUTE.HUNK.TYPEDECLS (|for| |from| |by| |to| |collect|) -\\SFROTATECSINFOOFFSETS (|for| |from| |to| |do|) INSPECT/ARRAY (|for| |from| |to| |collect|) -\\SEARCH.OUTPUTQ (|bind| |while| |do| |finally|) PRINTHISTORY1 (|for| |in| |do|) INSPECT/BITMAP ( -|type?|) ROTATE-BITMAP (|for| |from| |to| |do|) \\SFLHASHLOOKUP (|bind| |first| |do|) -XCL:REBREAK-FUNCTION (|for| |in| |join|) XCL:TRACE-FUNCTION (|for| |in| |join|) COMPILER::ALPHA-PROGN -(|for| |on| |collect|) \\INFER.FILE.TYPE (|do|) CURRENT.WORD (|for| |by| |until| |bind| |do| |finally| -) IFCPROPS (|for| |in| |do| |inside|) ROTATE-BITMAP-LEFT (|for| |from| |to| |do|) COMPILER::FIND-SEGMENT - (|for| |in| |when| |do|) \\CURSORPOSITION (|do| |repeatuntil|) \\FTP.RECOGNIZEFILE (|for| |in| |do|) -\\TEDIT.SHOWSELS (|for| |in| |do|) FASL::COLLECT-LIST (|to| |collect|) EDITCALLERS (|for| |in| |do| -|collect| |while| |thereis|) PROCESSPROP (|type?| |for| |on| |by| |when| |do|) PRINTCURSOR (|type?|) -\\GETSPP (|bind| |do|) \\MKATOM (|for| |from| |to| |suchthat| |do| |as| |always|) -TEDIT.SELECTED.PIECES (|first| |while| |for| |from| |do|) UNIONREGIONS (|for| |from| |thru| |do|) -RECORDFIELDNAMES (|for| |in| |do| |collect|) \\IRM.CHOOSE.REF (|for| |in| |collect|) SHOWBITMAP1.IP ( -|for| |from| |to| |do|) SETINITIALS (|find| |old| |in| |suchthat|) MB.PUTFN (|for| |in| |do|) SEDIT::INSERT - (|type?|) DOATTACHEDWINDOWCOM (|type?|) \\CHTOPCNO (|while| |do|) READ-UNICODE-MAPPING (|for| |in| -|join|) \\TEXTMENU.START (|for| |in| |thereis|) \\GETFTPCONNECTION (|for| |in| |when| |do| |type?|) -TEDIT.FORMATBOX (|bind| |for| |in| |while| |do| |when|) GETRELATION (|for| |in| |do|) -\\FILLPOLYGON.PSC (|for| |in| |do|) FM.CHANGELABEL (|type?|) \\TEDIT.RESHAPEFN (|while| |do|) -PAINTW.READCOMMAND (|type?|) \\TEDIT.INSERT.PIECES (|bind| |first| |while| |do|) \\CLIPANDDRAWLINE ( -|for| |from| |to| |as| |do|) BUILDGETRELQ (|for| |in| |do|) BIT.IN.ROW (|for| |from| |to| |when| |do|) - \\TEDIT.CUMULATE.EVENTS (|bind| |while| |do| |finally|) \\FLUSH.OPEN.STREAMS (|for| |in| |when| |do|) - TOPW.ADJUSTSELECTION (|for| |in| |as| |on| |thereis|) \\CH.GUESS.NEW.PROPERTIES (|for| |from| |to| -|when| |collect|) \\MAYBEPEEKPUP (|for| |inside| |thereis|) FILEBROWSER (|for| |on| |by| |do| |in| -|collect| |when| |bind|) FINDFNDEF (|for| |in| |thereis|) TEDIT.DISPLAYTEXT (|for| |instring| |do|) -GETHASHTEXT (|type?|) SI::VARIABLE-NAME-IN-FRAME (|for| |by| |as| |until| |when| |do|) -\\MAKEBASEBYTESTREAM (|type?|) TB.DESELECTRANGE (|for| |from| |to| |do|) FILL.XPER (|for| |from| |to| -|do|) MSFIXUPTYPES (|for| |in| |do| |type?|) OPT.DELCODE (|for| |in| |when| |do|) |\\LFCreateDevice| ( -|type?|) CURSORP (|type?|) \\LINEWITHBRUSH (|until| |do|) \\TEDIT.CLOSEUPLINES (|bind| |while| |do| -|until|) PRINTWORDS (|for| |from| |to| |do|) SEDIT::REPLACE-LIST (|for| |in| |do| |by| |bind| |while| -|as| |from| |collect| |type?|) \\TFBRAVO.PARSE.PROFILE.PARA (|while| |do|) |\\UFStoOtherCopyMess| ( -|for| |in| |finally| |do|) TEDIT.PUT.PCTB (|type?| |while| |do| |finally| |for| |from| |to| |as| -|instring| |in|) FB.UPDATEBROWSERITEMS (|for| |in| |bind| |when| |collect| |while| |do| |finally|) -\\VECFONTINIT (|bind| |for| |in| |collect|) \\UPCASEBASE (|for| |from| |to| |do|) -ICMLARRAY.GETMENUWGROUP (|for| |in| |largest| |always|) INSPECTW.REDISPLAY (|for| |in| |do| |collect| -|as| |join|) MB.GETFN (|for| |in| |do|) SETFILEPTR (|type?|) \\RESETSTACK0 (|for| |from| |to| |bind| -|when| |do| |finally| |type?|) COURIER.EXECUTE.CALL (|for| |in| |as| |do|) STRING.EQUAL (|for| |from| -|as| |to| |always|) \\TYPE.FROM.FILETYPE (|find| |in| |suchthat|) INITBITMASKS (|for| |from| |to| -|bind| |do|) HASHFILEP (|type?|) SAVEONSYSRECLST (|for| |in| |do| |collect| |unless|) BUFTAILP (|do|) -FILL.CONT (|for| |from| |to| |do|) \\FLUSH.NDB.QUEUE (|bind| |while| |do|) MSPATHOPTIONS (|while| -|collect|) CHAT.CHOOSE.PHONE.NUMBER (|for| |in| |collect| |when|) \\BACKFORMAT (|for| |old| |from| -|to| |by| |do| |while|) TEDIT.UNPARSE.PAGEFORMAT (|for| |in| |do| |collect|) MAXMENUITEMWIDTH (|for| -|in| |bind| |do| |finally|) \\MAYBEPEEKNS (|type?|) \\BIGNUM.LSH (|while| |do| |type?|) -WRITESTRIKEFONTFILE (|for| |from| |to| |thereis| |by| |do|) STRIKECSINFO (|for| |from| |to| |sum| |do| -) \\SPP.EVENTFN (|for| |in| |do|) COMPILER::ENV-ANALYZE-PROGN (|for| |in| |do|) \\FTP.PRINTPLIST ( -|for| |in| |do| |bind| |inpname|) CURSORPOSITION (|type?|) SAMEPARALOOKS (|for| |in| |always|) SEDIT::JOIN - (|for| |from| |to| |as| |in| |collect| |join| |thereis| |do|) TTLOADBUF (|bind| |while| |do|) -CHAT.BIN (|until| |bind| |do|) INTERPRET.REM.CM (|for| |from| |to| |when| |do|) \\MAIKO.DISPLAYLINE ( -|bind| |for| |from| |to| |do| |finally| |while|) TB.SELECTRANGE (|for| |from| |to| |do|) COMP.LAM1 ( -|for| |in| |when| |do|) ENDREAD? (|while| |bind| |do|) IRM.CREF.BUTTONEVENTFN (|bind| |until| |do| -|finally|) SIMPLEPRINT (|for| |from| |to| |do|) COMPILER::ALPHA-MACROLET (|for| |in| |do|) -POSTSCRIPT.OUTSTR (|for| |infatstring| |do| |inatom| |in|) BITBLT (|type?|) \\FTP.PACKFILENAME (|for| -|in| |do|) TB.MAP.ITEMS (|for| |in| |do|) IDLE.BOUNCING.BOX (|for| |on| |unless| |do| |while|) -CLOSENSOCKET (|while| |do|) UPDATEPCNODES (|while| |do| |for| |from| |by| |as| |to| |when| |finally|) -CL:CHAR-NAME (|for| |in| |when| |do| |finally|) \\CH.CHECK.CLEARINGHOUSE (|find| |old| |in| |suchthat| -) \\SENDSPP (|bind| |while| |do|) \\BITBLT.BITMAP (|type?|) INFILECOMSPROP (|find| |in| |suchthat|) -BEEPOFF (|while| |do|) \\LEAF.STREAM.IN.QUEUE (|type?|) FIND.MATCHING.WORD (|find| |on| |suchthat|) -BEEPON (|while| |do|) SPY.MERGE.CALLEES (|for| |in| |do| |when| |finally|) MAXMENUITEMHEIGHT (|for| -|in| |do|) BIT.IN.COLUMN (|for| |from| |to| |when| |do|) \\MAKE.ITEMS.VERT.ORDER (|for| |to| |collect| - |do| |in| |join|) BREAKCONNECTION (|for| |in| |when| |collect|) INSPECT/TYPELESS (|type?|) -\\SEARCHOPENFILES (|for| |in| |when| |do|) MOVEATTACHEDWINDOWTOPLACE (|bind| |for| |in| |until| |do|) -LAYOUTSEXPR1 (|for| |in| |thereis| |do|) \\GATHER-CLEANUP-FORMS1 (|bind| |until| |do| |finally| -|type?|) DELFROMFILES (|for| |inside| |when| |collect| |in| |do|) EQDEFP (|for| |from| |to| |always|) -\\ATMIN (|for| |from| |to| |collect|) BCOMPL3 (|for| |in| |unless| |do|) BRH/LAYOUT/DAUGHTERS (|for| -|in| |do| |finally|) TWODINSPECT.TOTALWIDTH (|for| |in| |sum|) \\WWCHANGESCREENSIZE (|for| |in| |do|) -\\TEDIT.PUT.PARALOOKS.LIST2 (|for| |from| |as| |in| |do|) FILING.CALL (|for| |from| |to| |collect|) -GRID (|for| |from| |to| |by| |do|) MSMSGPRINT (|while| |do|) INFILECOMSVALS (|for| |in| |when| |do|) -\\PEEKPUP (|for| |inside| |collect|) SCANFILE1 (|for| |in| |do| |while|) NIL -SPECVARS CL:COMPILE-FILE (SPECVARS LOCALVARS LOCALFREEVARS GLOBALVARS NLAMA NLAML LAMA DONTCOMPILEFNS) - SEDIT::VERIFY-STRUCTURE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\NEW.READ.SYMBOL ( -LITATOM-PACKAGE-CONVERSION-ENABLED *READTABLE* FILERDTBL CODERDTBL *PACKAGE* *LISP-PACKAGE* -*INTERLISP-PACKAGE*) |\\UFSSetFileInfo| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PARSE-DEFMACRO ( -%CTX-ARG-NAME %ENV-ARG-NAME *KEY-FINDER* *DEFAULT-DEFAULT*) RESOLVE-READER-CONFLICT ( -*PREFERRED-READING-SYMBOLS*) |\\UFSGetFileInfo| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) SI::UNWIND ( -RESETSTATE) WRITE-STRING* (\\THISFILELINELENGTH) MSPRGDWIM (NOSPELLFLG SI::*RESETFORMS*) -TB.DO.ITEM.SELECTION (SELECTIONSTATE BROWSER FIRSTVISIBLE# LASTVISIBLE#) \\SPPWATCHER (SPPCON -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) GETDEF (NOCOPY) |\\LFGenerateFiles| (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) MSNOTICEFILE (SI::*RESETFORMS*) \\NEW.MKATOM (*INTERLISP-PACKAGE*) -\\MAPPNAME.INTERNAL (\\THISFILELINELENGTH) COMPILER::PROCESS-IL-DECLARATIONS (SPECVARS LOCALVARS -GLOBALVARS) WINDOW.MOUSE.HANDLER (\\MOUSEBUSY) RESETVAR (SI::*RESETFORMS*) GETDEFFROMFILE (NAME -LOAD-VERBOSE-STREAM) RSTRING (*READTABLE* |\\RefillBufferFn| *READ-SUPPRESS*) COMPARELST (LOOSEMATCH) -TEDIT.INCLUDE (START-OF-PIECE) |\\UFSDeleteFile| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PACK ( -PACK.INDEX \\PNAMESTRING) DBG::CREATE-DEBUGGER-WINDOW (\\TERM.OFD DEFAULTTTYREGION) -\\INTERNAL/SETPASSWORD (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\FLOATINGSCALE (TEXP THI TLO) -SI::PRINT-TRACE-ENTRY-INFO (BOLDFONT DEFAULTFONT) SEDIT::SMART-TTYFN (L TTYEDITFN) -COURIER.BROADCAST.CALL (NEARBYNETS) \\INIT.POWERS.OF.TEN (TEXP THI TLO) LAYOUTLATTICE (NODELST MOTHERD - PERSONALD FAMILYD) \\CORE.GETINFOBLOCK (ROOT EXT VERS) |\\LFEventFn| (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) LOADCOMP (BLOCKS) |\\UFSCloseDevice| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -\\UFS.RECOGNIZE.FILE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) TTYIN (SPLST HELP OPTIONS ECHOTOFILE TABS - UNREADBUF RDTBL) TTYIN.FINISH (\\COMMAND \\BUFFER LINE) IDATE (*STR* *POS*) DWIMIFY (SI::*RESETFORMS* -) CONCOCT-SYMBOL (*LISP-PACKAGE* *INTERLISP-PACKAGE* CMLSYMBOLS.SHARED) XCL::PPRINT-DEFINER-RECURSE ( -TAIL) COMPILER::ALPHA-COMBINATION (NLAMA NLAML) RANDSET (\\OVERFLOW) DASSEM.DSTOREFNDEF ( -SI::*RESETFORMS*) LVLPRIN2 (FILE PRIN2FLG) ALLCALLS (NOSPELLFLG) LVLPRIN1 (FILE PRIN2FLG) PRETTYCOM1 ( -SI::*RESETFORMS*) STACK.FULL.WARNING (FLG) CL:INTERN (*PACKAGE*) |\\LFDirectoryNameP| ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PACKAGE-HIERARCHY-INIT (*INTERLISP-PACKAGE* *KEYWORD-PACKAGE* -CMLSYMBOLS.LAMBDA.LIST.KEYWORDS CMLSYMBOLS.SPECIALFORMS CMLSYMBOLS.MACROS CMLSYMBOLS.TYPENAMES -CMLSYMBOLS.FNNAMES CMLSYMBOLS.DECLARATORS CMLSYMBOLS.VARS) CLOSERTPSOCKET (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) COMPARELISTS (DIFFERENCES) |\\VFMMerge| (|mergeKey| |mergeLevel| |mergeFlag| -|leftInterval| |rightInterval|) SPELLFILE (NAME EXTENSION VERSION SPELLVAL DIRHOSTS HOST) -PACKAGE-ENABLE (*INTERLISP-PACKAGE* *PACKAGE* *OLD-INTERLISP-READ-ENVIRONMENT* *PER-EXEC-VARIABLES*) -BROWSE/LAYOUT/HORIZ/COMPACTLY (RETURNTTC RETURNBTC) PRINT-CIRCLE-SCAN (*PRINT-ARRAY*) PACKAGE-CLEAR ( -*PACKAGE-FROM-NAME* *PACKAGE-FROM-INDEX* *PACKAGE* *LISP-PACKAGE* *KEYWORD-PACKAGE* -*INTERLISP-PACKAGE*) |\\VAMAllocPageGroup| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CLISPFOR (LISPXHIST - SI::*RESETFORMS*) PACKAGE-MAKE (*LISP-PACKAGE* *KEYWORD-PACKAGE* *INTERLISP-PACKAGE* *PACKAGE* -HASHTABLE-SIZE-LIMIT) COPYALL (NH) DO?CMD (\\?TAIL \\?PARAMS \\BUFFER \\STARTED) CLISP3C ( -SI::*RESETFORMS*) NAMESTRING-CONVERSION-CLAUSE (LITATOM-PACKAGE-CONVERSION-TABLE) |\\VFMSplit| ( -|splitKey| |splitLevel| |keyStone| |page|) COMP.EVQ (SI::*RESETFORMS*) \\TEDIT.HARDCOPY.FORMATLINE ( -LOOKS ASCENT DESCENT FONTWIDTHS FONT INVISIBLERUNS CHNO TLEN LOOKNO CHLIST WLIST DEVICE NEWASCENT -NEWDESCENT IMAGESTREAM) PRIN3 (*PRINT-RADIX* *PRINT-ESCAPE* *PRINT-LEVEL* *PRINT-LENGTH* -\\THISFILELINELENGTH) CLSMARTEN (NOSPELLFLG) LOADFNS (FILE LDFLG VARS *PACKAGE* DFNFLG BUILDMAPFLG -FILEPKGFLG ADDSPELLFLG LISPXHIST FNLST VARLST DONELST FILECREATEDLST FILECREATEDLOC) \\SEQUIN.PROCESS -(SEQUIN SI::*LOCKED-MONITOR* SI::*RESETFORMS*) XCL::PPRINT-DEFINER (FORMFLG SPACEWIDTH TAIL LEFT) -GENERATEFN (COMVAR##) \\TRACKWITHBOX (ORGX ORGY BOXWIDTH BOXHEIGHT) BSPPUTMARK (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) \\BSP.PREPARE.OUTPUT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CL::%RATIO-PRINT ( -\\THISFILELINELENGTH) \\LEAF.CLOSEFILE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) ASSURE.PUP.READY ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PRINTPARA (LMARG RMARG P2FLAG FILE) RECORDTRAN (LISPXHIST -DWIMESSGAG NOSPELLFLG) CHNGNM (SI::*RESETFORMS*) ERRORX (ERRORPOS) CREATEDSKDIRECTORY ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\GETFILINGCONNECTION (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -BCOMPL2 (GLOBALVARS RETFNS BLKLIBRARY NOLINKFNS LINKFNS DONTCOMPILEFNS) HASHFILESPLST1 (XWORD) -\\INVALID.SYMBOL (\\FATPNAMESTRINGP) HPRINT1 (VALS) SEDIT::TTYFN (L EDITCHANGES SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) READIMAGEOBJ (UNDERREADIMAGEOBJ) ADDTOVAR (DFNFLG) \\BACKTRACE (.I7) DMPHASH ( -ARRAYNAME) MAKE-KEYWORD (*KEYWORD-PACKAGE*) PRIN4 (*PRINT-ESCAPE* *READTABLE* *PRINT-LEVEL* -*PRINT-LENGTH* *PACKAGE* \\THISFILELINELENGTH) PROMPTFORWORD (TERMINCHARS.LST ECHO.CHANNEL -DONTECHOTYPEIN.FLG TTYD X0Y0 TIMELIMITEXPIRED? BELLBEENHEARD? CHARBUFFER RUBBING?) CLOSEBSPSTREAM ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) SCAVENGEDSKDIRECTORY (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -FIND-HISTORY-EVENTS (*EVENTS*) \\CORE.GETFILENAME (ROOT EXT VERS) CL:COMPILE (SPECVARS LOCALVARS -LOCALFREEVARS GLOBALVARS) \\DURATIONTRAN (TIMERUNITS USINGTIMER USINGBOX FORDURATION RESOURCENAME -UNTILDATE) READ (*READTABLE* *READ-NEWLINE-SUPPRESS*) APROPOS (RESULT FILTERFN DISPLAYSTREAM) -UNDOLISPX3 (SI::*RESETFORMS*) \\RTP.SOCKET.PROCESS (BSPSOCKET) \\SEQUIN.CLOSE (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) \\FILLBUFFER (RTBLSA) SHOWDEF (T) \\UFS.DIRECTORY.NAME (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) OPT.DEADSETQP (ICNT) COMPARENCHARS (*READTABLE* *PRINT-ESCAPE*) -|\\VFMInsertPageGroup| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) LOADFNS-FINDFILE (DWIMFLG FILEPKGFLG) -DO-EVENT (RETRYFLAG HELPCLOCK) TEDIT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) OR (*TAIL*) DELFROMCOMS ( -COMS) ASKUSER (LISPXPRNTFLG OPTIONSLST FILE READBUF) \\BSP.DEFAULT.ERROR.HANDLER (\#MYHANDLE#) -FIND-LEXICAL-ENVIRONMENT (LASTPOS) PRIN2 (*PRINT-ESCAPE* *READTABLE* *PRINT-LEVEL* *PRINT-LENGTH* -*PACKAGE* \\THISFILELINELENGTH) MSINTERPRET (TYPE SHOWSET EDIT EDITCOMS DONE) WRITE (*PRINT-ESCAPE* -*PRINT-RADIX* *PRINT-BASE* *PRINT-LEVEL* *PRINT-LENGTH* *PRINT-CASE* *PRINT-GENSYM* *PRINT-ARRAY* -*PRINT-PRETTY* *PRINT-CIRCLE* *PRINT-CIRCLE-HASHTABLE* *PRINT-CIRCLE-NUMBER* THERE-ARE-CIRCLES) PPT ( -*STANDARD-OUTPUT* SI::*RESETFORMS*) EDITDEF (SOURCE) \\IFS.LOOKUPFILE (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) |\\LFCloseFile| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CL:FIND-PACKAGE ( -*PACKAGE-FROM-NAME*) BSPFORCEOUTPUT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) FAKE-COMPILE-FILE ( -COMPILE.FILE.AFTER COMPILE.FILE.VALUE NLAML NLAMA LAMS LAMA DFNFLG *PACKAGE* *READ-BASE* LOCALVARS -SPECVARS LSTFIL) MAKEFILE (PRETTYFLG) COMP.TRANSFORM (*BYTECOMPILER-IS-EXPANDING* -*BC-MACRO-ENVIRONMENT*) SEDIT::RESHAPEFN (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) TB.FINISH.CLOSE ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) |\\VFMGenerateFileIDs| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -FIXSPELL (SI::*RESETFORMS*) SI::EXPAND-CONDITION-CASE (*BYTECOMPILER-IS-EXPANDING*) \\LOAD-STREAM ( -LDFLG PRINTFLG LOAD-VERBOSE-STREAM DFNFLG BUILDMAPFLG FILEPKGFLG ADDSPELLFLG LISPXHIST FILECREATEDLST -FILECREATEDENV FILECREATEDLOC FILE) COMP.MACRO (*BYTECOMPILER-IS-EXPANDING*) PURGEHISTORY ( -SI::*RESETFORMS*) \\FM.EDIT-ITEM (DONEFN EDITITEM WINDOW) \\FTP.NEXTFILE (FTPCONNECTION) -CONDITIONS::EXPAND-RESTART-CASE (*BYTECOMPILER-IS-EXPANDING*) SUPERPRINT/SPACE (RMARGIN SPACEWIDTH -LEFT) CL:PROVIDE (*MODULES*) COLLECTKEYS (MKSTRING? KEYLST) TEDITFROMBRAVO (NOUT) APPENDTOVAR (DFNFLG) - EDITH (SI::*RESETFORMS*) |\\LFDeleteFile| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) HASDEF (TYPE) -TB.MAKE.BROWSER (FONT PRINTFN COPYFN CLOSEFN AFTERCLOSEFN TITLE COLUMNS USERDATA LINESPERITEM -ITEMHEIGHT BASELINE HEADINGWINDOW LINETHICKNESS) TB.EXPANDFN (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -DIRECTORY (COMMANDS DEFAULTEXT DEFAULTVERS VALUE COLUMNS NAMEFLG FILEGROUP DESIREDPROPS LASTHOST&DIR) -RDTBL\\NONOTHERCODES (RESULT) DASSEM.DASSEM (VARCOUNT FRAMES CD CODELOC FRAME) CLEARCLISPARRAY (NAME -TYPE REASON) DBG::BACKTRACE-ITEM-SELECTED (BRKENV) \\OPENLEAFCONNECTION (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) \\IDATESCANTOKEN (*STR* *POS*) SI::PRINT-TRACED-CL-ARGLIST (BOLDFONT DEFAULTFONT) -COMP.EXPR (*BC-MACRO-ENVIRONMENT*) CL:MAKE-PACKAGE (*PACKAGE-FROM-INDEX* *PACKAGE-FROM-NAME*) -EDITFROMFILE (SI::*RESETFORMS*) DUMPDATABASE (DUMPEDFLG DUMPTABLE) UNDONLSETQ (SI::*RESETFORMS*) FITP -(ENDTAIL SPACEWIDTH CAREFUL) |\\LFRenameFile| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\SPP.CLEANUP ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) INREADMACROP (\\READDEPTH) DODIRCOMMANDS (FILENAME FILE -NAMEPRINTED I) CL:USE-PACKAGE (*PACKAGE*) SI::EXPAND-PROCEED-CASE (*BYTECOMPILER-IS-EXPANDING*) -COMPILER::COMPILE-FILE-PROCLAMATION (GLOBALVARS SPECVARS LOCALVARS) ENTER-NEW-NICKNAMES ( -*PACKAGE-FROM-NAME*) CLISPIF (LISPXHIST SI::*RESETFORMS*) CL:PEEK-CHAR (|\\RefillBufferFn|) READBQUOTE - (\\INBQUOTE) EDRPT (SI::*RESETFORMS*) CALLS (SI::*RESETFORMS*) GRAPHEDITCOMMANDFN (GRAPHWINDOW) -DBG::FIND-DEBUGGER-STACK-FRAME (LASTPOS) EXPORT (*PACKAGE*) CL:SHADOWING-IMPORT (*PACKAGE*) IMPORT ( -*PACKAGE*) |\\VFMGetPageGroup| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CLISPFOR0 (EXP LASTPTR I.S.PTRS -) EDITCOMA (PRETTYFLG *READTABLE*) CALLSCCODE (IGNOREFNS) TEDITCHAT.MENUFN (WINDOW STATE) SYSOUT (FILE -) COMPILER::COMPILE-SCAN-DEFINE-FILE-INFO (*STANDARD-INPUT* FILECREATEDLOC) MSERASE (ERASESET) MAPRINT - (SI::*RESETFORMS*) \\WRITE1 (FONTCHANGEFLG \\THISFILELINELENGTH) SUB-FORMAT (*FORMAT-INDEX* -*FORMAT-LENGTH*) PACK* (PACK.INDEX \\PNAMESTRING) MAKESYS (FILE NAME) MSPRGTEMPLATE1 (EXPR) -\\MOUSE.PROCESS (\\OLDTTY \\MOUSEBUSY) OPENPOSTSCRIPTSTREAM (SI::*RESETFORMS*) |\\LFGetFileInfo| ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\TERMINATESPP (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -CL:IN-PACKAGE (*PACKAGE*) HASHFILESPLST (T) EXPANDMACRO (NCF PCF VCF EFF EXP COMPILE.CONTEXT) -COMPILER::COMPILE-FILE-DEFINE-FILE-INFO (*STANDARD-INPUT* FILECREATEDLOC) EXEC-EVAL (*CURRENT-EVENT* -LISPXHIST HELPCLOCK) CL:REQUIRE (*MODULES* *DEFAULT-PATHNAME-DEFAULTS* DIRECTORIES -*COMPILED-EXTENSIONS*) CL:SHADOW (*PACKAGE*) \\GENERIC.READCCODE (*READTABLE* |\\RefillBufferFn|) -BRECOMPILE (*PRINT-ARRAY* *PRINT-LENGTH* *PRINT-LEVEL* NLAMA NLAML LAMS LAMA DWIMIFYCOMPFLG EXPRSLST -NOFIXFNSLST NOFIXVARSLST BUILDMAPFLG SPECVARS LOCALVARS CHANGES OTHERS FIRST BLKFNS BLOCKS -DESTINATIONENV ADRLST FILEMAPLST CFILE FNS FILE LDFLG VARLST DONELST FNLST) \\SPP.ESTABLISH ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CL:RENAME-PACKAGE (*PACKAGE-FROM-NAME*) |\\VAMInit| ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) UNSAVEFNS (SI::*RESETFORMS*) SPELLFILE.SPELL1 (VERSION) -LISPDIRECTORYP (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PROMPTCHAR (ID HISTORY PROMPTSTR) -DELETE-PACKAGE (*PACKAGE-FROM-NAME*) PRINTER.BITMAPFILE (T) CHAT.TYPEIN (STREAM) \\UFS.NEXTFILEFN ( -FILEGROUP DEFAULTEXT DESIREDPROPS DEFAULTVERS) FASL:PROCESS-FILE (FILEPKGFLG DFNFLG LISPXHIST -ADDSPELLFLG) CL:UNUSE-PACKAGE (*PACKAGE*) \\STRINGWIDTH.GENERIC (TOTALWIDTH WIDTHSBASE CSET FONT -SPACEWIDTH) \\EVALFORMASLAMBDA (*ARGVAL* *FN* *TAIL*) PACKFILENAME (HOST DEVICE STRUCTURE DIRECTORY -SUBDIRECTORY NAME EXTENSION VERSION TEMPORARY PROTECTION ACCOUNT) PRINTCOMSTRAN (VARS) XCL:COMPILE-FORM - (SPECVARS LOCALVARS LOCALFREEVARS GLOBALVARS) CL:DIRECTORY (GENERATOR) MACROEXPANSION ( -COMPILE.CONTEXT NCF PCF VCF EFF EXPR EXP RETF PREDF) APPLY (\\INTERNAL) MSPATHS (SI::*RESETFORMS*) -PRINT-CIRCLE-LABEL-P (*PRINT-CIRCLE-HASHTABLE*) BYTEBLOCKCOMPILE2 (SI::*RESETFORMS*) |\\VFMDelete| ( -|deleteKey| |deleteLevel| |firstFlag| |lastFlag| |volumePage| |nextKey|) \\FTP.CLEANUP (CONNS FAIL) -CHANGECCODE (ALL-CODE-BASES) |\\VFMInsert| (|insertKey| |insertVolumePage| |insertLevel| |splitFlag|) -\\STRINGWIDTH.HCPYDISPLAYAUX (TOTALWIDTH WIDTHSBASE CSET FONT SPACEWIDTH) DEBUGGER (WBREAK -AUTOBACKTRACEFLG BRKEXP BRKCOND BRKENV BRKPOS BRKFN \\#DISPLAYLINES \\CURRENTDISPLAYLINE -\\INTERRUPTABLE \\INBQUOTE LASTPOS \\LINEBUF.OFD \\TERM.OFD *STANDARD-INPUT* *STANDARD-OUTPUT* -BRKVALUES !VALUE \\PRIMTERMTABLE \\PRIMTERMSA) COPYFILES (FROMSPEC TOSPEC T HELPFLAG) LAYOUTSEXPR ( -RESULT) COMPILER::TEST-ALPHA-2 (SPECVARS LOCALVARS LOCALFREEVARS GLOBALVARS) READVARS-FROM-STREAM ( -BACKREFS BACKREFCNT DATATYPESEEN RPTCNT RPTVAL) PRINT-CIRCLE-ENTER (*PRINT-CIRCLE-HASHTABLE* -THERE-ARE-CIRCLES) SETQ (*TAIL*) CHAT.MENU (WINDOW STATE) MSTRYSPELLTYPE (TYPE) \\FORMATLINE (LOOKS -CHLIST WLIST FONTWIDTHS CHNO ASCENT DESCENT LOOKNO LINE FONT INVISIBLERUNS DEVICE SCALE NEWASCENT -NEWDESCENT TLEN) READLINE (LINE LISPXFLG SPACEFLG) AND (*TAIL*) COMPILE-IN-CORE (LCFIL LAPFLG STRF -SVFLG LSTFIL SPECVARS LOCALVARS DONT-TRANSFER-PUTD SI::*RESETFORMS*) DBG::ATTACH-BACKTRACE-MENU ( -\\TERM.OFD BACKTRACEFONT) EXPAND-DEFMACRO (*MACRO-VARS* *MACRO-VALS* *MACRO-FORM* *MACRO-DEFAULT*) -\\CURVE2 (T) TIMEALL (STRF LCFIL) COMP.USERFN (FN OTHERVARS) BLOCKCOMPILE (NLAMA NLAML LAMS LAMA -NOFIXFNSLST NOFIXVARSLST EXPRSLST) \\NSFILING.GETFILEINFO (DESIREDPROPS) |\\VAMRecomputeFreePageCount| - (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) EQUALHASH (AR1 AR2) |\\VFMInit| (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) \\BSP.PREPARE.INPUT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) |\\LFGetFileName| ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\PFI.DO.HARDCOPY (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -BKSYSBUF.GENERAL (SI::*RESETFORMS*) MAKEFILES (SI::*RESETFORMS*) FIX-FORM (\#RPARS FONTCHANGEFLG) -CL:FIND-SYMBOL (*PACKAGE*) PURGEDSKDIRECTORY (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -COMPILER::RESOLVE-VARIABLE-BINDING (COMPILER::*NEW-GLOBALS* COMPILER::*NEW-SPECIALS* SPECVARS -LOCALVARS LOCALFREEVARS GLOBALVARS) \\PROG0 (*TAIL* *FIRSTTAIL*) CL:UNINTERN (*PACKAGE* *QUERY-IO*) -PRINTCODE (OUTF CODEBASE IVARS PVARS FVARS I4 I6) CL:LIST-ALL-PACKAGES (*PACKAGE-FROM-NAME*) -PRINT-LISP-INFORMATION (SI::*RESETFORMS*) PF* (SI::*RESETFORMS*) CL:UNEXPORT (*PACKAGE*) PROGN (*TAIL* -) RPT (RPTN) \\DOVMEMFULLINTERRUPT (SI::*RESETFORMS*) \\UFS.ABORT.DIRECTORY (FILEGROUP) TTYIN.PPTOFILE - (FONTCHANGEFLG) BSP.PUTINTERRUPT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CCCSCAN (SUBMAPS OLDREF) -\\EVPROG1 (*TAIL*) PEEKC (|\\RefillBufferFn|) PFCOPYBYTES (T) RPTQ (RPTN) LISPX (HELPFLAG LISPXVALUE -LISPXVALUES SI::*RESETFORMS*) \\UFS.ABORT.CL-DIRECTORY (GENERATOR) PPSPP (SI::*RESETFORMS*) -BRKDWNCOMPILE2 (LCFIL LAPFLG STRF SVFLG LSTFIL SPECVARS LOCALVARS SI::*RESETFORMS*) -COMPILE-FILE-EXPRESSION (COMPILED.FILE) BCOMPL (NLAML NLAMA LAMS LAMA DWIMIFYCOMPFLG EXPRSLST -NOFIXVARSLST NOFIXFNSLST *PRINT-ARRAY* *PRINT-LEVEL* *PRINT-LENGTH*) RECREDECLARE (RECNAME RECFIELDS) -RECEVAL (NEWVALUE DATUM FIELDNAME) MAPRELATION (MAPZ MAPW MAPFN2 MAPFN) SEQUENTIAL.PRETTYPRINT (TAIL -LEFT) LAYOUTGRAPH (NODELST MOTHERD PERSONALD FAMILYD BOX.BOTH.FLG BOX.LEAVES.FLG BORDER.FOR.MARKING -LABELSHADE.FOR.MARKING) \\GETSPP (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) COMPILE (NLAMA NLAML LAMS -LAMA NOFIXFNSLST NOFIXVARSLST SPECVARS LOCALVARS) |\\VFMDeletePageGroup| (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) PROG1.PRETTYPRINT (LEFT) RATOM (*READTABLE* *PACKAGE* |\\RefillBufferFn|) CLDISABLE -(SI::*RESETFORMS*) HCOPYALL1 (NH) \\LEAF.RECONNECT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -\\STORAGE.TYPE (ALLOCMDS) TRANSLATE.DATATYPE (TYPENAME UNUSED BIT OFFSET FD) \\SUBREAD (\\RBFLG) -|\\LFSetFileInfo| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) MSUPDATE (VARS) \\NSFILING.SETFILEINFO ( -NAME.OR.STREAM ATTR/VAL) CL::\\OPENSTREAM-WITH-DEFAULT (LOADPARAMATERS) \\FILLPOLYGON.PSC (FILL.WRULE) - CASE.PRETTYPRINT (LEFT TAIL FORMFLG) INTERN* (*KEYWORD-PACKAGE*) STORAGE (HUNKSTATS) WTFIX1 ( -SI::*RESETFORMS*) \\SOUT (*DRIBBLE-OUTPUT* \\PRIMTERMSA \\TERM.OFD) PEEKCCODE (|\\RefillBufferFn|) -FLTSTR (TEXP THI TLO) BCOMPL.BODY (CFILE SPECVARS LOCALVARS CHANGES OTHERS FIRST BLOCKS BLKFNS -DESTINATIONENV DEFS) COMPILER::RESOLVE-VARIABLE-REFERENCE (SPECVARS LOCALVARS LOCALFREEVARS GLOBALVARS -) DEFAULT.EDITDEF (RETRY) LEAF.ASSURE.FINISHED (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) VALUOF (LINE -BACKUP HISTORYFLG) PUTSEQUIN (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) READC (*READTABLE* -|\\RefillBufferFn|) COMPILER::UPDATE-ENVIRONMENT (COMPILER::*NEW-SPECIALS* COMPILER::*NEW-GLOBALS* -COMPILER::*NEW-INLINES* COMPILER::*NEW-NOTINLINES*) MSCHECKBLOCK (GLOBALVARS RETFNS BLKLIBRARY -NOLINKFNS LINKFNS DONTCOMPILEFNS) MENU.HANDLER (SUBMENU MOVEDLEFT) |\\VAMFreePageGroup| ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) FLTINTLOG (TEXP THI TLO) \\PRINTNSADDRESS (\\THISFILELINELENGTH -) |\\VFMGet| (|getKey| |getLevel|) \\CHECK.PQUEUE (SI::*RESETFORMS*) SKIPSEPRCODES (|\\RefillBufferFn| -) MSDESCRIBE (FN) ERRORSET (SI::*NLSETQFLAG*) \\TOP-LEVEL-READ (*PACKAGE* |\\RefillBufferFn| -*CIRCLE-READ-LIST* EOF-VALUE) SEDIT::SEDITL (TYPE TTYEDITFN) SKIPSEPRS (|\\RefillBufferFn|) -|\\DSKCloseDevice| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) |\\DSKEventFn| (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) GETCLEARINGHOUSE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CHDIR (SI::*LOCKED-MONITOR* - SI::*RESETFORMS*) PRIN1 (*PRINT-RADIX* *PRINT-ESCAPE* *PRINT-LEVEL* *PRINT-LENGTH* *PRINT-CASE* -\\THISFILELINELENGTH) COND (*TAIL*) \\LEAF.GETFILE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) INSPECT ( -WHERE) DO.PRETTYPRINT (LEFT TAIL) \\EVPROGN (*TAIL*) DO-HISTORY-SEARCH (*EVENTS*) PRETTYCOM (ORIGFLG) -DWIMDEF (NOSPELLFLG DWIMESSGAG FILEPKGFLG LISPXHIST) PROG1 (*TAIL*) PROGV.PRETTYPRINT (LEFT) -CL:FIND-ALL-SYMBOLS (*PACKAGE-FROM-NAME*) SKREAD (*READTABLE* *READ-SUPPRESS* \\RBFLG) CLISPATOM0 ( -LISPXHIST SI::*RESETFORMS*) SI::PRINT-TRACE-EXIT-INFO (BOLDFONT DEFAULTFONT) SEDIT::SETUP-NEW-CONTEXT -(SI::*LOCKED-MONITOR* SI::*RESETFORMS*) COMPILER::PEEPHOLE-OPTIMIZE (COMPILER::TAGS-USED) -\\LEAF.FLUSH.CACHE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PP* (**COMMENT**FLG *STANDARD-OUTPUT*) -USEREXEC (SI::*RESETFORMS*) CLISPEXPANSION (NOSPELLFLG VARS LISPXHIST) \\DOBUFFEREDTRANSITIONS ( -\\INTERRUPTABLE PENDINGINTERRUPT) \\LET* (*TAIL*) COMPILER::PROCESS-DECLARATIONS (COMPILER::*NEW-SPECIALS* - COMPILER::*NEW-GLOBALS* COMPILER::*NEW-INLINES* COMPILER::*NEW-NOTINLINES* SPECVARS LOCALVARS -GLOBALVARS) \\LET0 (*TAIL*) RECORDACCESS (DATUM) |\\DSKOpenDevice| (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) \\PRINDATUM.TO.STRING (*PRINT-CIRCLE-HASHTABLE* *PRINT-CIRCLE-NUMBER* -THERE-ARE-CIRCLES) |\\DFSFreeDiskPages| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CLISPFOR0A (LASTPTR) -INFILECOMTAIL (SI::*RESETFORMS*) |\\LFOpenDevice| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\SENDSPP ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \\EVALFORM (*FORM* *ARGVAL* *FN* *TAIL*) -\\MAIKO.ETHER-INTERRUPT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PACKFILENAME.STRING (HOST DEVICE -STRUCTURE DIRECTORY SUBDIRECTORY NAME EXTENSION VERSION TEMPORARY PROTECTION ACCOUNT) COPYVM ( -SI::*RESETFORMS*) PRETTYDEF (PRTTYFILE REPRINTFNS SOURCEFILE CHANGES *PRINT-ARRAY* XCL:*PRINT-STRUCTURE* - *PRINT-LEVEL* *PRINT-LENGTH* NEWFILEMAP ORIGFLG FILEFLG NLAMALST PRTTYSPELLFLG PRETTYCOMSLST -PRTTYCOMS LAM?LST FNSLST OLDFILEMAP LAMALST MAPADR NLAMLST DESTINATIONENV SOURCEFILENV \#RPARS) -|\\LFCloseDevice| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) |\\UFSOpenDevice| (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) DCHCON (!SCRATCHLIST !SCRATCHTAIL) \\MAPCHARS (RDTBL) LISPXFIND (SI::*RESETFORMS*) -COMPILER::START-COMPILATION (SI::*RESETFORMS*) |\\UFSEventFn| (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -RESETFORM (SI::*RESETFORMS*) LAYOUTSEXPR1 (RESULT) |\\UFSGenerateFiles| (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) EVAL (\\INTERNAL) PFI.ENQUEUE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) -DWIM-SYMBOL-PACKAGE (FAULTX FAULTAPPLYFLG) \\MAKE.PROCESS0 (\#FORM# HELPFLAG \\CURRENTDISPLAYLINE -\\#DISPLAYLINES \\LINEBUF.OFD *STANDARD-INPUT* *READTABLE* \\PRIMREADTABLE \\PRIMTERMTABLE -\\PRIMTERMSA |TtyDisplayStream| \\TERM.OFD \\TTYWINDOW *STANDARD-OUTPUT* \\INTERRUPTABLE READBUF -*CURRENT-PROCESS* SI::*RESETFORMS* *DRIBBLE-OUTPUT* RESETSTATE) DUNPACK (!SCRATCHLIST !SCRATCHTAIL) -RESETVARS (SI::*RESETFORMS*) FILING.CALL (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) |\\LFOpenFile| ( -SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PRINTDEF (MAKEMAP SPACEWIDTH \#RPARS RMARGIN FILEFLG FIRSTPOS) +PRIN2S) \STRINGWIDTH.GENERIC (DECLARE \MAPPNAME) PRINT-EVENT (FRESHLINE CL:FORMAT PRINT-EVENT-PROMPT +DSPFONT PRIN1 SPACES TERPRI MAPC) \PROTECTED.APPLY (DECLARE) \DSPCLIPPINGREGION.DISPLAY (ERROR +UNINTERRUPTABLY \SFFixClippingRegion) EXPANDOPENLAMBDA (MAPC) \SPP.PREPARE.OUTPUT (SPP.FORCEOUTPUT) +NSPRINT (\NSPRINT.WATCH.JOB CLOSEF?) \CHARWIDTH.DISPLAY (DECLARE) \INSPECT.STORE.PTR (UNDOSAVE) +MAPPAGES (APPLY*) \NSFILING.CLOSE.CONNECTIONS (DEL.PROCESS SPP.CLOSE BLOCK \NSFILING.LOGOUT +\NSFILING.DISCARD.SESSION) PFI.PRINT.COMMENTS (TERPRI) GRAPHOBJ.CHECKALIGN (ERROR) \CLIPANDDRAWLINE ( +\PUTBASE \SOFTCURSORDOWN \INSURETOPWDS DECLARE \DRAWPOINT.DISPLAY \SOFTCURSORUPCURRENT BITBLT +\CLIPANDDRAWLINE1) \INCCODE.EOLC (DECLARE) \CH.FIND.ORG.SERVER (\CH.LOCATE.SERVERS) +\DSPOPERATION.DISPLAY (LISPERROR UNINTERRUPTABLY DECLARE) PRINTERDEVICE (\DEFINEDEVICE) +\FORMATBYTESTREAM (\EXTERNALFORMAT SETFILEPTR SETFILEINFO) MSBINDVAR (ADDTO) \BACKCOLOR.DISPLAY ( +\ILLEGAL.ARG) PRINTCOMSTRAN (DECLARE DWIMIFY0? FRPLACD) PREVLINE (SUB1VAR) \PFFreeDiskPages ( +\VAMRecomputeFreePageCount \PFDsplyVolumes) \UNCOPY (FRPTQ) \DSPRESET.DISPLAY (DECLARE SELECTQ +\DSPXPOSITION.DISPLAY \DSPYPOSITION.DISPLAY ERROR BITBLT PROCESS.EVAL) SEDIT::DEFAULT-GETDEF-FN ( +CL:CERROR) COMP.GETBASE (COMP.DELFN COMP.DELPUSH COMP.EXPR COMP.STCONST MAPC) \BLTSHADE.DISPLAY ( +DECLARE \INSURETOPWDS .WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN \BITBLTSUB \SOFTCURSORUPCURRENT) +UNIX-WRITE (BLOCK) PRINTCODE (DECLARE PRINTNUM PRINTCODEHEADERDECODE PRINTCODENT SETUPHASHARRAY +PRINTOUT TAB PCVAR PRINJUMP SPACES) ICONW (WINDOWPROP OPENW) SETFONTCLASSCOMPONENT (SELECTQ RPLACD) +MAKEROOMFORPME (\NEWPAGE \PUTBASE) SETUPHASHARRAY (SET) TEDIT.FORMATPAGE (LISTPUT NCONC DSPPUSHSTATE +DSPROTATE DSPTRANSLATE DSPCLIPPINGREGION DSPRIGHTMARGIN \TEDIT.HARDCOPY.FORMATLINE TEDIT.FORMATBOX +SHOW.IP DSPPOPSTATE DSPNEWPAGE) EDITBMBUTTONFN (DECLARE \SHADEBITS UPDATE/BM/DISPLAY RESETGRID.NEW +UPDATE/BM/DISPLAY/SELECTED/REGION RESETFORM GETMOUSESTATE DETACHWINDOW CLOSEW BLTSHADE +\EDITBM/PUTUP/DISPLAY \CLEARBM DSPFILL GRID ATTACHWINDOW EDITBMRESHAPEFN UPDATE/SHADE/DISPLAY OPENW +PAINTW READHOTSPOT) \BITBLT.DISPLAY (DECLARE \PUTBASE \SOFTCURSORDOWN \INSURETOPWDS +\SOFTCURSORUPCURRENT TOTOPW SELECTQ \BITBLT.MERGE \BITBLTSUB IMAGEOP) \PFCreateRootDirectory ( +DiskError LISPERROR \PFPutRootDirectory \PFPutRootDirectoryType) PRINTCODENT (DECLARE printout PRIN1 +PRINTNUM SPACES ALLOCAL) GETPUP (UNINTERRUPTABLY LISPERROR AWAIT.EVENT BLOCK \MAYBEPRINTPACKET +printout PRIN1) DELETETO1 (DELETETO1 SELECTQ TTBOUT ADD1VAR) \SPLITTREE (\RPLPTR \PUTBASEFIXP +\TEDIT.SET-TOTLEN \MATCHPCS \PUTBASEPTR) \DSPRIGHTMARGIN.PSC (\FIXLINELENGTH.PSC) PRINT-EVENT-PROMPT ( +FRESHLINE DSPFONT) EDITDATE? (DECLARE) \DRAWCIRCLE.DISPLAY (DECLARE .SETUP.FOR.\BBTCURVEPT. SELECTQ +SHOULDNT \INSURETOPWDS APPLY* .WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN \SOFTCURSORUPCURRENT \CIRCLEPTS +MOVETO FREERESOURCE) LISPXUSE0 (ERROR MAPC) CODEWRAPPER.PRETTYPRINT (PRIN1 PRIN2 PRINTDEF +SEQUENTIAL.PRETTYPRINT) MBUTTON.NEXT.FIELD.AS.TEXT (MBUTTON.FIND.NEXT.FIELD) \DRAWELLIPSE.DISPLAY ( +DECLARE MOVETO \ILLEGAL.ARG \DRAWELLIPSE.GENERIC GLOBALRESOURCE .SETUP.FOR.\BBTCURVEPT. SELECTQ +SHOULDNT \INSURETOPWDS APPLY* .WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN \CURVEPT \SOFTCURSORUPCURRENT +FREERESOURCE) TRACKCURSOR (FLIPNODE GETMOUSESTATE MOVENODE EXTENDEXTENT CALL.MOVENODEFN) \XCCSINCCODE +(\NSIN.24BITENCODING.ERROR SET) SEQUENTIAL.PRETTYPRINT (DECLARE SUBPRINT/ENDLINE SUPERPRINT) CSUBST ( +FRPLACA FRPLNODE NCONC NCONC1 DWIMIFYREC) FREEMENU (\FM.MAKELINKS \FM.COLLECTNWAYS FM.RESETMENU) +\DRAWLINE.DISPLAY (DECLARE SELECTQ \ILLEGAL.ARG \INSURETOPWDS \DRAWLINE.BIGBM.DASH GLOBALRESOURCES +FREERESOURCE \DRAWLINE.BIGBM.NODASH \CLIPANDDRAWLINE) SEDIT::CHECK-SELECTION (SHOULDNT) +SEDIT::PARENTHESIZE-CURRENT-SELECTION (SEDIT::START-UNDO-BLOCK FRPLACD SEDIT::INSERT SEDIT::SELECT-NODE + SEDIT::SET-POINT SEDIT::END-UNDO-BLOCK CL:FORMAT) \TEDIT.APPLY.PAGEFORMATTING (TEDIT.PROMPTPRINT +TEDIT.PROMPTFLASH FRPLACD LISTPUT RPLACA TEDIT.PAGEFORMAT TTY.PROCESS) \CH.LOCATE.SERVERS ( +\CH.PRINT.BLURB RESETLST FRPLACD \CH.UPDATE.CACHE) FONTCLASSCOMPONENT (SETFONTCLASSCOMPONENT) +\FILLCIRCLE.DISPLAY (\PUTBASE \SETPBTFUNCTION \INSURETOPWDS DECLARE .WHILE.TOP.DS. \SOFTCURSORDOWN +\SOFTCURSORUPCURRENT \FILLCIRCLEBLT MOVETO FREERESOURCE) INSPECTW.REDISPLAY (\ITEMW.DESELECTITEM +CLEARW MOVETOUPPERLEFT) MAKECREATE1 (FRPLACD MAPC) \DRAWCURVE.DISPLAY (SELECTQ ERROR +\DRAWPOINT.DISPLAY \LINEWITHBRUSH \CURVE2 FREERESOURCE DECLARE) FIND-STACK-FRAME (RELSTK) \XCCSOUTCHAR + (\BOUT \BOUTEOL) INSPECTCODE (ERROR WINDOWPROP) CASE.PRETTYPRINT (PRIN1 PRIN2 SPACES DECLARE +SUPERPRINT PRINENDLINE PRINTDEF SUPERPRINT/COMMENT SEQUENTIAL.PRETTYPRINT) \SET.LASTVMEMFILEPAGE ( +\SET.VMEM.FULL.STATE) FILL.XPER (.WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN \INSURETOPWDS DECLARE +FILL.LINE \SOFTCURSORUPCURRENT) \DSPYPOSITION.DISPLAY (UNINTERRUPTABLY \ILLEGAL.ARG) FILL.TEST ( +FILL.LINE) \SEQUIN.CLOSE (DECLARE OBTAIN.MONITORLOCK \SEQUIN.CONTROL SI::MONITOR-UNWIND) +TEDIT.CURSORMOVEDFN (SELECTQ CURSOR) MSPRGMACRO (MSPRGCALL MSPRGE) BROWSE/LAYOUT/HORIZ/COMPACTLY ( +DECLARE BRHC/LAYOUT BRHC/OFFSET) \DSPXPOSITION.DISPLAY (\ILLEGAL.ARG) \TEDIT.FILL.IN.CHARLOOKS.MENU ( +MAPC MB.NWAYBUTTON.ADDITEM MBUTTON.SET.NEXT.FIELD \SHOWSEL \TEDIT.MARK.LINES.DIRTY) ENDREAD? (SELECTC +DECLARE CHECK) PREPLOOP (MAPC) NOHOST (SELECTQ) MAKEINITLAST (SETUPSTACK MAKEINITBFS SELECTQ RECLAIM +DECLARE POSTINITARRAYS PRIN1 SETUPPAGEMAP) COPIEDFILEPATTERN (FRPLACD) COMP.LOOKUPVAR (RETAPPLY +COMPERRM) PROG1.PRETTYPRINT (PRIN1 PRIN2 SPACES DECLARE SUPERPRINT SEQUENTIAL.PRETTYPRINT) +\GETREGION.CHECKOPPT (MAPC) \DSPRIGHTMARGIN.DISPLAY (UNINTERRUPTABLY \ILLEGAL.ARG) DODIRCOMMANDS ( +DECLARE SELECTQ DIRPRINTNAME READC DTAB PRIN1 DPRIN1 ERROR PRINTNUM PRINTDEF SHOULDNT) COMPILE! ( +DECLARE) FGET.IP (APPENDNUMBER.IP) \TEDIT.CONVERT.FOREIGN.FORMAT (RESETLST) \PUPERROR (printout PRIN1 +PRINTPUP \BLT SWAPPUPPORTS) MBUTTON.NEXT.FIELD.AS.PIECES (MBUTTON.FIND.NEXT.FIELD) SETFONTDESCRIPTOR ( +DECLARE \ILLEGAL.ARG RPLACD) \SCALEDBITBLT.DISPLAY (SHOULDNT) PRINT-HISTORY (MAPC PRINT-EVENT +FRESHLINE) SUPERPRINT0 (PRINOPEN SUBPRINT SUBPRINT/ENDLINE PRINSHUT) CONCAT (SETARG RPLSTRING) +\LOOKUPFONT (DECLARE) \MAKEBRUSH.ROUND (SELECTQ \PUTBASE FILLCIRCLE) PROGV.PRETTYPRINT (PRIN1 PRIN2 +SPACES DECLARE SUPERPRINT SEQUENTIAL.PRETTYPRINT) CL:UNWIND-PROTECT (\EVPROGN) \DRAWLINE.PSC ( +\DRAWLINE.PSC MAPC) INSPECT/DATATYPE (FRPLACD INSPECT/TOP/LEVEL/LIST printout TERPRI) \DSPFONT.DISPLAY + (UNINTERRUPTABLY DECLARE) DUMPINITPAGES (ADDPME MAPPAGES DECLARE ALLOCAL SETFILEPTR) DO.PRETTYPRINT ( +PRIN1 PRIN2 SPACES DECLARE SUPERPRINT SELECTQ SUBPRINT/ENDLINE SEQUENTIAL.PRETTYPRINT) MSPRGE ( +MSPRGERR MSPRGLAMBDA DECLARE MSPRGCALL) FIND-LEXICAL-ENVIRONMENT (RELSTK) PRINTPROG (SUPERPRINT SPACES + PRINTPROGVARS SUBPRINT/ENDLINE PRINDOTP PRINENDLINE) MBUTTON.NEXT.FIELD.AS.NUMBER ( +MBUTTON.FIND.NEXT.FIELD) \COPY (\PUTBASE MKI.IEEE) %%SET-ARRAY-OFFSET (CL:ERROR) INTPOWERS (ASET) +CREATEFIELDS (FRPLACD) \SEQUIN.PROCESS (DECLARE OBTAIN.MONITORLOCK RESETSAVE PROCESSPROP SELECTC +PRINTPUP RELEASE.PUP \SEQUIN.RETRANSMITNEXT INCLEAFSTAT SETUPTIMER \SEQUIN.CONTROL \SEQUIN.RETRANSMIT +BLOCK SI::MONITOR-UNWIND) COURIER.EXPEDITED.CALL (FRPLACD) %%SET-ARRAY-TYPE-NUMBER (CL:ERROR) SUBPRINT + (SUBPRINT/WRAPPERTAIL SUPERPRINT/SPACE) \DOVMEMFULLINTERRUPT (DECLARE CL:CERROR SI::RESETUNWIND) +LISPXPRINTDEF (LISPXPUT) HPRINT (RESETSAVE CLRHASH HPINITRDTBL HPRINT1 HPRINTEND CL:UNWIND-PROTECT +CL:CLOSE TERPRI) \DSPLINEFEED.DISPLAY (\ILLEGAL.ARG) \DSPLEFTMARGIN.DISPLAY (UNINTERRUPTABLY +\ILLEGAL.ARG) \MAP-CODE-POINTERS (SELECTQ CL:FUNCALL DECLARE) SI::RESETUNWIND (APPLY SETTOPVAL) +\NSFILING.DESERIALIZE1 (RELEASE.MONITORLOCK COPYBYTES OBTAIN.MONITORLOCK \NSFILING.RELEASE.BULKSTREAM) + TERM.NEWLINE (TERM.DOWN) DIRPRINTNAME (DECLARE SELCHARQ TERPRI SPACES \OUTCHAR DTAB) +\INVALID.DOTTED.SYMBOL (CL:CERROR) \MAP-CODE-LITERALS (CL:FUNCALL DECLARE SELECTQ) \DRAWCURVE.PSC ( +printout PRIN1 POSTSCRIPT.PUTCOMMAND POSTSCRIPT.OUTSTR MAPC \MOVETO.PSC) \FONT.COMPARESYMBOL (DECLARE) + CHECKIFPAGE (PRIN1) PFI.HANDLE.EXPR (PFI.PRINT.COMMENTS TERPRI PFI.MAYBE.NEW.PAGE) DSFIT1 (DECLARE) +PAINTW (printout TOTOPW CURSORCOLOR GETMOUSESTATE RPLACA DOWINDOWCOM BITBLT) LISPXUSE (ERROR HELP +NCONC) \PFPutRootDirectory (DiskError LISPERROR \PFPutPage) UTF16BE.PEEKCCODEFN (\BIN \BACKFILEPTR) +PRINTSQ (SUPERPRINT/SPACE SUPERPRINT PRINENDLINE PRINOPEN SUBPRINT PRINSHUT PRIN2S) SETUPPUP ( +ASSURE.PUP.READY) INSPECT/HUNK (SELECTC INSPECTW.CREATE FRPLACD) \FONTFACE (\ILLEGAL.ARG) +FIND-HISTORY-EVENTS (DECLARE FRPLACD ERROR) UTF16BE.INCCODEFN (SET) ADDFILE0 (/SETTOPVAL ERROR) +MOVE.TO.LINE (GO.TO.RELATIVE) \4DISPLAYINIT (DECLARE) /PUT-1 (UNDOSAVE FRPLACD SETPROPLIST) +\MAKEBRUSH.SQUARE (BITBLT) EDITADDNODE (DECLARE MEASUREGRAPHNODE MOVENODE FLIPNODE EXTENDEXTENT +CALL.MOVENODEFN printout PRINTDISPLAYNODE TRACKCURSOR) MBUTTON.NEXT.FIELD.AS.ATOM ( +MBUTTON.FIND.NEXT.FIELD) SPP.CLEARATTENTION (UNINTERRUPTABLY) FB.NEWPATTERNCOMMAND (FB.SETNEWPATTERN) +\PFGetRootDirectory (\PFGetPage) DSFIT2 (DECLARE) GETSEQUIN (BLOCK) \IDLE.EXIT? (SETPASSWORD +OBTAIN.MONITORLOCK CLEARW DEL.PROCESS DISMISS PRINTOUT PRIN1) TTLOADBUF (SETFILEPTR ADDNAKEDCHAR +FRPLACD READFROMBUF) \DSPBACKCOLOR.DISPLAY (RPLACD \SFFixFont) \INVALID.INTEGER (CL:CERROR) +SHOW.MATCHING.PAREN (SAVE.CURSOR GO.TO.ADDRESSING TTWAITFORINPUT \CHECKCARET RESTORE.CURSOR) +MAKEINITFIRST (CREATEMDSTYPETABLE \SETUP.HUNK.TYPENUMBERS INITDATATYPES PREINITARRAYS \TURN.ON.HUNKING + INITATOMS INITDATATYPENAMES INITUFNTABLE INITGC) MSADDTYPE (MSINIT PUTASSOC PUTHASH) LLBREAK (DECLARE + XCL:UNBREAK-FUNCTION ERROR /SETATOMVAL /PUTD /PUTPROP) TEDIT.BUILD.PCTB0 (SETFILEPTR SELECTC +TEDIT.GET.CHARLOOKS0 TEDIT.GET.OBJECT0 TEDIT.GET.PARALOOKS0 SHOULDNT INSERT-BRT) +\NSGC.COLLECT.DIRECTORIES (RESETSAVE FRPLACD) TEDIT.SCAN.LINE (\FORMATLINE DECLARE \TEDIT.CHECK +\TEDIT.SELECT.CHARACTER RPLACA) /PUTD (PUTD UNDOSAVE) TEDIT.PROMPTFLASH (FLASHWINDOW) +\DSPCOLOR.DISPLAY (RPLACA \SFFixFont) \PRINDATUM.TO.STRING (FREERESOURCE DECLARE PRINT-CIRCLE-SCAN +\MAPPNAME.INTERNAL CL:MAPHASH) NEW/INSTANCE/OF/GRAPHNODE (DECLARE MARK/GRAPH/NODE) BROKENDEF ( +UNLESSRDSYS UNINTERRUPTABLY \MOVEBYTES CODEBASESETA DECLARE \ADDREF SELECTQ) RENAME (COPYDEF +CHANGECALLERS DELDEF) LISPXPRIN2 (LISPXPUT) \TFBRAVO.SPREAD.LOOKS (DECLARE MAPC) FB.NEWINFOCOMMAND ( +ATTACHWINDOW MOVEW FB.INFOMENU.SHADEINITIALSELECTIONS WINDOWADDPROP) BRKDWNTIME (DECLARE BRKDWNINCA +BRKDWNSETA BRKDWNADDTOA SUB1VAR) \INSERTTREE (HELP UPDATEPCNODES \PUTBASEFIXP \RPLPTR \BLT \PUTBASEPTR + \ILLEGAL.ARG \SPLITTREE \TEDIT.UPDATETREE) TEDIT.FORMAT.HARDCOPY (TEDIT.FORMATBOX) FB.YES-OR-NO-P ( +FB.PROMPTWPRINT) LISPXSPACES (LISPXPUT) MISSPELLED? (LISPXWATCH PRIN1) FB.ALLOW.ABORT (ATTACHWINDOW) +/ADDPROP (ERRORX UNDOSAVE FRPLACD /RPLACA SETPROPLIST) \DRAWCIRCLE.PSC (printout PRIN1 +POSTSCRIPT.OUTSTR MAPC) ADDPME (HELP \NEWPAGE \PUTBASE) BRHL/MOVE/RIGHT (DECLARE ERROR BRHL/MOVE/RIGHT +) PFI.PRINT.TO.TAB (DSPXPOSITION PRIN3 RELMOVETO) SPP.FLUSH.TO.EOF (SPP.CLEARATTENTION) CLOSESEQUIN ( +\SEQUIN.CLOSE AWAIT.EVENT SELECTC) \PFCurrentVol (ERROR) SAVEPUT (ERRORX UNDOSAVE FRPLACD /RPLACA +LISPXPRINT SETPROPLIST MARKASCHANGED ADDSPELL) TERPRI (\OUTCHAR) PRIN1 (DECLARE \PRINDATUM) +UTF16BE.OUTCHARFN (FREPLACEFIELD \BOUT) SEDIT::CREATE-PRELINEARIZED-NODE (RPLACA NCONC1) +\STREAM.FROM.PACKET (CHECK) FONTSET (ERROR SETTOPVAL MAPC FONTMAPARRAY SET) \10MBGETPACKET ( +\MAYBEPRINTPACKET) SPACES (.SPACECHECK. FRPTQ) \8DISPLAYINIT (DECLARE) /SETATOMVAL (UNDOSAVE) +FIND.MATCHING.WORD (DECLARE) PRINTNUM (DECLARE \ILLEGAL.ARG FRPTQ SPACES FREERESOURCE) +\DRAWELLIPSE.PSC (printout PRIN1 POSTSCRIPT.PUTCOMMAND POSTSCRIPT.OUTSTR MAPC) BROWSE/LAYOUT/HORIZ ( +DECLARE) PRINTOPCODES (printout TAB) \TEDIT.UNIQUIFY.CHARLOOKS (FREPLACEFIELD) TAB (SPACES TERPRI) +GETCHARBITMAP (\ILLEGAL.ARG BITBLT) \ABORT.BULK.DATA (SPP.SENDATTENTION) BRHL/LAYOUT (DECLARE) +MakeMenuOfImageTypes (DECLARE FRPLACD) \DO.PROGV.SETUP.FRAME.AND.EXECUTE (DECLARE PUTBASEPTR +SETSTKNAME-RAW SETSTKNTOFFSET-RAW) MAKEWITHINREGION (DECLARE) \TEDIT.UPDATETREE (\PUTBASEFIXP +FREPLACEFIELD HELP) \TRANSLATE.3TO10 (\BLT ENCAPSULATE.ETHERPACKET \MAYBEPRINTPACKET +TRANSMIT.ETHERPACKET) XCL::PUT-IMPLICIT-KEY-HASH (UNINTERRUPTABLY) \CORE.CLOSEFILE (SELECTQ +\CORE.UPDATEOF \CORE.RELEASEPAGES UNINTERRUPTABLY) MB.MARGINBAR.SIZEFN (IMAGEOBJPROP) POSTSCRIPT.TEDIT + (TEDIT.FORMAT.HARDCOPY CLOSEF?) \TEDIT.PARSE.CHARLOOKS.MENU (MAPC SELECTQ MB.NWAYBUTTON.ADDITEM +TEDIT.DELETE TEDIT.OBJECT.CHANGED TEDIT.PROMPTPRINT MBUTTON.FIND.NEXT.FIELD) \MAKEBRUSH.HORIZONTAL ( +BITBLT) \PFGetVols (FRPLACD) FM.ENDEDIT (\FM.INSUREWINDOW) \COURIER.TRACE (TAB SPACES LVLPRIN2) +\MAPPNAME.INTERNAL (DECLARE FREERESOURCE) \CORE.UPDATEOF (FREPLACEFIELD) TOPATTACHEDWINDOWS (TOTOPW) +\GETREGION.CHECKBASEPT (ERROR) MSADDMODIFIER (MSINIT PUTASSOC PUTHASH) PUTCHARBITMAP (\ILLEGAL.ARG) +SHOW.IP (APPENDNUMBER.IP APPENDINTEGER.IP APPENDOP.IP APPENDSEQUENCEDESCRIPTOR.IP COPYBYTES +\SETFILEPTR \CHANGECHARSET.IP) FILES.PUTDEF (PUTDEF ADDFILE) \TEDIT.ADJUST.LINES (BITBLT FREPLACEFIELD + \FILLWINDOW) VARSBOUNDINFORM (DECLARE) \DUMPEXPORTS (PRIN1 PRIN2 MAP PRINT) GO.TO.RELATIVE (MOVETO) +/PUTPROP (ERRORX UNDOSAVE FRPLACD /RPLACA SETPROPLIST) \VAMGetVAMPageFor (\VAMBufferSave +UNINTERRUPTABLY) SEDIT::CREATE-NODE (NCONC1 RPLACA) RPLSTRING (LISPERROR \SMASHABLESTRING \BLT +\PUTBASEFAT \MOVEBYTES) ENDPREAMBLE.IP (APPENDOP.IP) SEDIT::START-COMMENT (SEDIT::INSERT) \SHOWTEXT ( +DSPFILL) CLEARFILEPKG (TERPRI PRIN1 UPDATEFILES PRINT SMASHFILECOMS NCONC1 CLRHASH) \CORE.GETINFOBLOCK + (DECLARE \CORE.UNPACKFILENAME SELECTQ SHOULDNT) MB.MARGINBAR.TABTRACK (GETMOUSESTATE +MB.MARGINBAR.SHOWTAB) EDITAPPLYTOLINK (CLEARW CLRPROMPT PRIN1 FLIPNODE ERROR! SPACES) CHAT.STARTUP ( +TTY.PROCESS RPLACD MAP CHAT.INIT PROCESSPROP CLEARW printout DECLARE TERPRI) BKSYSCHARCODE (FRPLACD) +ALLCALLS (DECLARE MSINITFNDATA MSPRGLAMBDA MSPRGE FRPLACD) VOLUMES (\LFEntryPoint) FM.EDITITEM ( +\FM.INSUREWINDOW \FM.ENDEDIT) MSADDRELATION (MSSETUP MSADDMODIFIER) TTYINPROMPTFORWORD (SELCHARQ) +BKSYSBUF (DECLARE BKSYSCHARCODE \MAPPNAME) XCL:UNBREAK-FUNCTION (PUTD REMPROP SI::CHANGE-CALLS +SI::FINISH-UNBREAKING) \CORE.FINDPAGE (\ILLEGAL.ARG RPLACD) MOVECHARBITMAP (BITBLT PUTCHARBITMAP) +\MAKEBRUSH.VERTICAL (BITBLT) TEDIT.SELECT.LINE.SCANNER (SELECTQ RPLACA \BACKFORMAT \FIXSEL SHOULDNT) +FONTPROFILE.ADDDEVICE (DECLARE MAPC) COMP.STRETURN (COMP.ST) CHECKFPTOVP1 (printout \PRINTVP) +FB.SORTCOMMAND (FB.PROMPTW.FORMAT FB.SET.DEFAULT.NAME.WIDTH MAPC FB.MAYBE.WIDEN.NAMES +FB.INSERT.SUBDIRECTORIES FB.HEADINGW.DISPLAY TB.REPLACE.ITEMS FB.PROMPTWPRINT) PROCESS.EVALV ( +\SMASHLINK) DIRECTORY.MATCH (SELCHARQ) TRAPMAKE (SORT printout PRIN1 DV) CHECKFPTOVP (CHECKFPTOVP1) +\IRM.GET.KEYWORDS (PRINTOUT DECLARE) FONTCOPY (MAP) DIRECTORY.MATCH.SETUP (RPLACA) \FAST4BIT (\PUTBASE +) \FILLCIRCLE.PSC (POSTSCRIPT.PUTCOMMAND BLTSHADE BITBLT POSTSCRIPT.PUTBITMAPBYTES) TYPE.BUFFER (MAPC) + TOGGLE/SIDESFLG (DSPFILL) TEDIT.BUILD.PCTB1 (SETFILEPTR SELECTC \TEDIT.GET.CHARLOOKS1 +TEDIT.GET.OBJECT1 \WIN SHOULDNT INSERT-BRT) FONTSAVAILABLE (DECLARE LISPERROR \ILLEGAL.ARG) +FONTMAPARRAY (ERROR MAPC) SEDIT::STRINGWIDTH (DECLARE) LISPDIRECTORYP (DECLARE OBTAIN.MONITORLOCK +SI::MONITOR-UNWIND) \24DISPLAYINIT (DECLARE) TOGGLE/DIRECTEDFLG (DSPFILL) UTF8.PEEKCCODEFN (\BIN +\BACKFILEPTR ERROR) GAINSPACE (MAPC TERPRI ERSETQ PRIN1 MAPATOMS) COROUTINE (RESUME EVAL) WARNUSER ( +SOME LISPXPRIN1 LISPXPRIN2 CLISPFORERR1 LISPXTERPRI) \LOOKUPFONTSINCORE (DECLARE FRPLACD) +GC-FILING-DIRECTORY (PRINTOUT PRIN1) \SMASHABLESTRING (\MAKEWRITABLESTRING \FATTENSTRING) +\TEDIT.PROCIDLEFN (GETMOUSESTATE TTY.PROCESS) \CORE.GETFILEHANDLE (CL:ERROR) CREATESCREEN ( +DSPOPERATION DSPFONT DSPRIGHTMARGIN CL:PUSHNEW) BRHL/LAYOUT/DAUGHTERS (DECLARE RPLACA BRHL/MOVE/RIGHT) + SPP.SENDATTENTION (FREPLACEFIELD) COMPILE (DECLARE COMPSET PRINT-COMPILE-HEADER PRINT CLOSEF) +CURRENT.WORD (DECLARE CHECK) \RPLCHARCODE (LISPERROR \SMASHABLESTRING \PUTBASECHAR DECLARE) EQUALHASH +(DECLARE MAPHASH) \BLTSHADE.PSC (POSTSCRIPT.PUTCOMMAND BLTSHADE BITBLT POSTSCRIPT.PUTBITMAPBYTES +\MOVETO.PSC) FONTFILEFORMAT (FRPTQ CLOSEF) PFI.PRINT.ENVIRONMENT (PRINTDEF PRIN3) COMPARE (PRIN2 PRIN1 + TERPRI COMPARELISTS) MB.THREESTATE.DISPLAY (DSPXOFFSET DSPYOFFSET DSPFONT MOVETO PRIN1 BITBLT SELECTQ + DRAWLINE) \TEDIT.APPLY.CHARLOOKS (TEDIT.LOOKS \SHOWSEL TTY.PROCESS) \TFBRAVO.READ.USER.CM (SETBRK +SETSEPR SELECTQ NCONC1) TEDIT.BUILD.PCTB2 (SETFILEPTR SELECTC SETA \TEDIT.GET.CHARLOOKS FREPLACEFIELD +TEDIT.GET.OBJECT SHOULDNT \INSERTPIECE) RECEVAL (DECLARE) RECORD (HELP) \PFFindRootDirEntry ( +\PFPatchRootDirEntries ERROR) \TFBRAVO.LCASER (MAP) GNCCODE (UNINTERRUPTABLY) LISPX/1 (SELECTQ) +GLCCODE (UNINTERRUPTABLY) SHAPEW (PROMPTPRINT) \IRM.WILDCARD (FRPLACD) \PRINTFPTOVP (printout \PRINTVP + TERPRI) CL:LOAD (CL:CLOSE) STREQUAL (DECLARE) TTDOTABS (ADDCHAR FRPLACD) CLISPIFY (DWIMUNSAVEDEF +/PUTD MARKASCHANGED) OR (DECLARE) DWIMIFY (LISPXPRIN1 RESETFORM DECLARE PRINTDEF SI::RESETUNWIND +TERPRI) SHRINKBITMAP (BITBLT BLTSHADE) OPENATTACHEDWINDOWS (WINDOWPROP MOVEATTACHEDWINDOWTOPLACE) +MSADDANALYZE (MAPC) FW-ADJUST-REGION (DECLARE MAPC) \VAMInit (DECLARE OBTAIN.MONITORLOCK +SI::MONITOR-UNWIND) L-CASE (DECLARE \PUTBASECHAR FREERESOURCE) ENDPAGE.IP (SHOW.IP APPENDOP.IP) +FILEPKGCOMS.PUTDEF (MAPC) \LOCKFN (\LOCKCELL) U-CASEP (DECLARE) \UNITWIDTHSVECTOR (\PUTBASE) +\MAKEWRITABLESTRING (%%MAKE-ARRAY-WRITEABLE %%MAKE-STRING-ARRAY-FAT) MAPFILES1 (CL:FUNCALL CL:APPLY) +\NSFILING.COPY/RENAME (CL:FORMAT FREPLACEFIELD RELEASE.MONITORLOCK OBTAIN.MONITORLOCK \BULK.DATA.CLOSE + \NSFILING.RELEASE.BULKSTREAM) EDITBM (DECLARE BITBLT TOTOPW ERROR EDITBMRESHAPEFN SPAWN.MOUSE DISMISS + CLOSEW MARKASCHANGED STKEVAL) \TEDIT.UNIQUIFY.PARALOOKS (FREPLACEFIELD) KILLSEGMENT (FRPLACD) +MOVEATTACHEDWINDOWS (MAPC MOVEW) LOADFNS (DECLARE FRPLACA LISPXPUT RESETSAVE SETFILEPTR +CL:MULTIPLE-VALUE-SETQ) TEDIT (RESETLST DECLARE OBTAIN.MONITORLOCK \TEDIT.CREATEW.FROM.REGION +SI::MONITOR-UNWIND TEXTPROP PROCESSPROP TTY.PROCESS) TEDIT.UNDO.REPLACE (\SHOWSEL TEDIT.UNDO.INSERTION + TEDIT.UNDO.DELETION \TEDIT.HISTORYADD \FIXSEL) %%MAKE-STRING-ARRAY-FAT (CL:ERROR UNINTERRUPTABLY) +POSTEDITALISTS (MARKASCHANGED MAPC PUTHASH RPLACA) TEDIT.PUT (RESETLST UNINTERRUPTABLY +\TEDIT.WINDOW.TITLE MBUTTON.SET.FIELD \TEDIT.HISTORYADD) \FORWARD.PUP (PRINTPUP) LIST-ALL-BLOCKRECORDS + (FRPLACD) %%MAKE-ARRAY-WRITEABLE (CL:ERROR UNINTERRUPTABLY) SHOWCHARS (PRINTOUT PRIN2 TAB PRIN1) +\CORE.GETFILENAME (DECLARE \CORE.UNPACKFILENAME) FONTPROFILE (MAPC ERROR /SETATOMVAL FONTMAPARRAY) +FB.PROMPTFORINPUT (FRESHLINE CLEARW PRINTOUT TERPRI) \CORE.PACKFILENAME (DECLARE) +\ROUTINGTABLE.INFOHOOK (\CHECK.ROUTING.TABLE WINDOWADDPROP CLEARW PRINTROUTINGTABLE DSPFONT) SPELLFILE + (DECLARE SELECTQ) TEDIT.GET.OBJECT0 (SETFILEPTR) \MAKEBRUSH.DIAGONAL (BITMAPBIT) ALLOCHASH (ERROR +SETUPHASHARRAY) \NSRANDOM.CLOSEFILE (RESETLST OBTAIN.MONITORLOCK \CLEARMAP \NSRANDOM.TRUNCATEFILE +\NSRANDOM.RELEASE.HANDLE \GENERIC-UNREGISTER-STREAM) \CREATE-REAL-CHARSET.DISPLAY (ERROR) +SEDIT::BUILD-WINDOW (GETPROMPTWINDOW WYOFFSET DSPLINEFEED) \CORE.NAMESCAN (RPLACD) LAYOUTSEXPR ( +DECLARE LAYOUTSEXPR1) CONSTANTEXPRESSIONP (FRPLACD) \PUTBASESTRING (DECLARE \PUTBASEBYTE ERROR +\MOVEBYTES) \CORE.UNPACKFILENAME (DECLARE) INSERTLINE (INSERT.NODE FRPLACA TTCRLF DO.INSERT.LINE +TTPROMPTCHAR RENUMBER.LINES) \SFMAKEITALIC (BITBLT) \TFBRAVO.EOLS (TEDIT.INSERT) \PUTBASESTRINGFAT ( +\MOVEBYTES \PUTBASETHIN) AUTOCR? (START.NEW.LINE BREAKLINE) SLITLOOP (MAPC ATTACH) GENSYM ( +\ILLEGAL.ARG ERROR HELP UNINTERRUPTABLY RPLCHARCODE RPLSTRING) \TEDIT.GET.CHARLOOKS.LIST (FRPLACD) +FM.SHADE (\FM.INSUREWINDOW) HCOPYALL1 (FRPTQ DECLARE MAPHASH MAPC) TILE (BITBLT) +\CREATECHARSET.DISPLAY (DECLARE) \BUILDSLUGCSINFO (\FSETWIDTH \FSETOFFSET BLTSHADE) BLTPATTERN.GENERIC + (BITBLT) \IFSERRORSTRING (SETFILEPTR RPLCHARCODE CLOSEF) COURIER.WRITE (SELECTQ PUTWORD DECLARE +PUTLONG COURIER.WRITE.STRING CL:FUNCALL \COURIER.UNKNOWN.TYPE MAPC COURIER.WRITE.SEQUENCE) COMPILE1A ( +CL:FORMAT DWIMIFY0 TERPRI) \CORE.OPENFILE (\FILE.WONT.OPEN \COREFILE.SETPARAMETERS \CORE.SETACCESSTIME +) ADDTEMPLATEWORD (MSINIT) \READDISPLAYFONTFILE (DECLARE RESETLST RESETSAVE SHOULDNT) \VFMInit ( +DECLARE OBTAIN.MONITORLOCK \VFMClearIntervals SI::MONITOR-UNWIND) SetBcplString (LISPERROR +\PUTBASEBYTE \PUTBASESTRING) \CORE.SETACCESSTIME (SELECTQ SHOULDNT) CLISPATOM1 (FIX89TYPEIN SELECTQ +FRPLACA DWIMERRORRETURN /RPLNODE CLRPLNODE CLISPATOM2) LENGTH (DECLARE SETN) POSTSCRIPT.HARDCOPYW ( +ALLOW.BUTTON.EVENTS BITBLT CLOSEF) \SETARG0 (CHECK) AS.CHANGE.OWN.PASSWORDS (DECLARE) TEDIT.PUT.PCTB2 +(DECLARE TEDIT.PUT.PAGEFRAMES \TEDIT.FLUSH.UNUSED.LOOKS \TEDIT.PUT.CHARLOOKS \TEDIT.PUT.PARALOOKS +\TEDIT.PUT.SINGLE.CHARLOOKS BOUT COPYBYTES MAPC COPYCHARS \DWOUT \SMALLPOUT CLOSEF) +CHAT.PROMPT.FOR.INPUT (CLEARW WINDOWPROP) \DOHARDRETURN (\DOHARDRETURN1 \CONTEXTSWITCH) TTADDTAB ( +FRPLACD) MB.MARGINBAR.DISPLAYFN (DSPXOFFSET DSPYOFFSET MARGINBAR BITBLT) FM.REDISPLAYMENU ( +\FM.INSUREWINDOW) \DOHARDRETURN1 (CHECK \DECUSECOUNT FREPLACEFIELD FLIPCURSORBAR \BLT \INCUSECOUNT +\SMASHLINK) COMP.STTAG (OPT.COMPILERERROR COMP.ST) HCOPYALL (CLRHASH) GETSETQ (SELECTQ /RPLNODE +RECORDERROR) TEDIT.UNDO.MOVE (\SHOWSEL \DELETECH \FIXDLINES \TEDIT.INSERT.PIECES \FIXILINES +FREPLACEFIELD TEDIT.UPDATE.SCREEN \FIXSEL \COPYSEL) \MKATOM (COMPUTE.ATOM.HASH) \DOGC1 (\GCSCANSTACK +\GCMAPSCAN \GCMAPUNSCAN) FB.INSERT.SUBDIRECTORIES (DECLARE ATTACH) \TEDIT.TEXTBIN.FILESETUP ( +SETFILEPTR \PAGEDBACKFILEPTR) SHOWGRAPH (WINDOWPROP DSPOPERATION REDISPLAYGRAPH) \CREATE.SYMBOL ( +\MKATOM.FULL \MAKEMDSENTRY \INITATOMPAGE \BLT \PUTBASETHIN \MOVEBYTES \ADDREF) \GCSCANSTACK (SELECTC +CHECK FRPTQ FREPLACEFIELD) SEDIT::COPY-NODE (CL:FUNCALL) \CORE.SETFILEPTR (\CORE.UPDATEOF +UNINTERRUPTABLY) UNCLISPTRAN (/RPLNODE2 /PUTHASH) \SCALEDBITBLT.PSC (BITBLT POSTSCRIPT.PUTCOMMAND +POSTSCRIPT.PUTBITMAPBYTES \MOVETO.PSC) EXPANDBM (BLTSHADE BITBLT) \PARSE.NUMBER (DECLARE) \DOGC ( +\DOGC1 \CONTEXTSWITCH) \TEDIT.SHOW.CHARLOOKS (\SHOWSEL) \CORE.BACKFILEPTR (LISPERROR \CORE.UPDATEOF +FREPLACEFIELD) CL:COMPILE (DECLARE COMPILER::WARN-ABOUT-UNKNOWN-FUNCTIONS) \ORIGREADTABLE (SETSEPR +\SETREADSYNTAX) APPENDINTEGER.IP (DECLARE APPENDBYTE.IP APPENDSEQUENCEDESCRIPTOR.IP APPENDINT.IP) +BRHC/OFFSET (DECLARE MAPC) TERM.ERASE.IN.DISPLAY (\DTEST TERM.ERASE.TO.EOL CLEARW) \CORE.SETEOFPTR ( +\CORE.UPDATEOF UNINTERRUPTABLY \ZEROBYTES \CORE.RELEASEPAGES) \DECUSECOUNT (CHECK FREPLACEFIELD +\MAKEFREEBLOCK \DECUSECOUNT) DO?CMD (DECLARE \CARET.DOWN SELECTQ TTRUBOUT RESTORE.CURSOR +BACKWARD.DELETE.TO MOVE.TO.WHEREVER READFROMBUF) PURGEDSKDIRECTORY (DECLARE OBTAIN.MONITORLOCK ERROR +UNINTERRUPTABLY TERPRI MAPC \LFPurgeDirectory SI::MONITOR-UNWIND) FM.REDISPLAYITEM (\FM.INSUREWINDOW +BLTSHADE) \SEARCHDISPLAYFONTFILES (DECLARE) \INCUSECOUNT (CHECK \MP.ERROR SELECTC) SCANEXP (DECLARE +SETFILEPTR RATOM SCANDECLARECOLON SELECTQ FILECREATED1 SKREAD EVAL) \COPYDATATYPE (UNINTERRUPTABLY +\BLT) COMP.STJUMP (COMP.ST OPT.CCHECK) BMOBJ.PUTFN (\PRINTBINARYBITMAP PRIN2) \INITATOMPAGE (\NEW4PAGE + FRPTQ \NEWPAGE) \DOSTACKOVERFLOW (\GATHER-CLEANUP-FORMS \CONTEXTSWITCH) GETSELECTEDITEMS (FRPLACD) +\CORE.GETNEXTBUFFER (LISPERROR SHOULDNT UNINTERRUPTABLY \ILLEGAL.ARG BLOCK) \PROMPT.FOR.PUP.NUMBER ( +printout PRIN1 CLEARBUF FLASHWINDOW) SIMPLETEXTEDIT (SET.TTYINEDIT.WINDOW RESETSAVE COPYBYTES +SETFILEPTR FREERESOURCE DECLARE) \MAKEMDSENTRY (DECLARE) MB.NB.DISPLAYFN (DSPXOFFSET DSPYOFFSET +DSPFONT BITBLT) \MOVEFRAME (FLIPCURSORBAR CHECK \BLT FREPLACEFIELD \MAKEFREEBLOCK) SPELLFILE1 (DECLARE + MAP) WINDOWWORLD (DECLARE UNINTERRUPTABLY \CLEARBM CHANGEBACKGROUNDBORDER CL:PUSHNEW TTYDISPLAYSTREAM + SETLINELENGTH DSPTEXTURE DSPOPERATION DSPSCROLL WINDOWPROP CLEARW) \ALLOCBLOCK (DECLARE \ILLEGAL.ARG +\LISPERROR SELECTQ ERROR UNINTERRUPTABLY FRPTQ \CHECKARRAYBLOCK .INCREMENT.ALLOCATION.COUNT. +\CREATEREF LISPERROR) \SETUPUSERSTACK (\UNLOCKPAGES \SETUPGUARDBLOCK \CONTEXTSWITCH) SLICESET (HELP) +\NSFILING.NEXTFILE (\NSFILING.CLOSE.BULKSTREAM) \COURIER.HANDLE.BULKDATA (\BULK.DATA.CLOSE) +TEDIT.GET.CHARLOOKS0 (FRPLACD) IDLE.SHOW.OPTIONS (FRESHLINE) BYTECOMPILE2 (COMP.ATTEMPT.COMPILE) +INSERT.TEXT (TTINSERTSECTION) BLTPATTERN (BLTPATTERN.REPLACEDISPLAY BLTPATTERN.GENERIC) \MKATOM.FULL ( +DECLARE) TTYIN.SHOW.?ALTERNATIVES (CHECK FRPLACA BEEP SAVE.CURSOR GO.TO.FREELINE TTPRIN1COMMENT +TTPRIN1 DECLARE) \NEWPAGE.PSC (POSTSCRIPT.ENDPAGE) ERROR (DECLARE SIGNAL ERRORMESS1 SETERRORN) +\FONTFILENAME (RPLACD) \TEXTMENU.TOGGLE.DISPLAY (DSPXOFFSET DSPYOFFSET DSPFONT MOVETO PRIN1 BITBLT +SELECTQ ERROR) SCANDEFINEQ (SETFILEPTR NCONC1 SELECTQ RPLACA SCANFILEHELP SKREAD RPLACD RETFROM) +SPELLFILEDIR (DECLARE) OPT.CFRPTQ (COMP.VAL COMP.STTAG COMP.STCOPY COMP.STFN COMP.STJUMP COMP.VALN) +\AGE.ROUTING.TABLE (\CHECK.ROUTING.TABLE SETUPTIMER RPLACA \RPLPTR) MAPATOMS (APPLY* HELP) +\EXTENDSTACK (\DOLOCKPAGES \MAKEFREEBLOCK \SETUPGUARDBLOCK) \TEDIT.NEUTRALIZE.CHARLOOKS (\SHOWSEL +\TEDIT.NEUTRALIZE.CHARLOOKS.MENU TEDIT.UPDATE.SCREEN) EXTEND/TRANSITION/CHAIN (RPLACD) +PROPS.WHENCHANGED (RETFROM SELECTQ CLEARCLISPARRAY) CL:PRINT (SPACES) COMPILER::CLOSURE-ANNOTATE-LAMBDA + (FRPLACD) MOVETO.IP (APPENDNUMBER.IP) CONDITIONS:COMPUTE-RESTARTS (WALK-PROCEED-CASES) \RELEASE.IOCB +(SELECTQ \ILLEGAL.ARG) INSPECT/AS/BLOCKRECORD (TERPRI) ATOMHASH#PROBES (DECLARE COMPUTE.ATOM.HASH) +CREATE-PROCESS-STREAM (FREPLACEFIELD) ONEDINSPECTW.CREATE (WITH-INSPECTOR-ENV ONEDINSPECT.RESHAPEFN +RIGHTW.RESHAPEFN TITLEW.REPAINTFN) GRAPHOBJ.FINDGRAPH (DSPFILL GETMOUSESTATE) TEDIT.GET.PARALOOKS0 ( +FRPLACD RPLACA RPLACD) ED (FRPLACD TERPRI EDITE EDITDEF) MAXATTACHEDWINDOWEXTENT (SHOULDNT) +SEDIT::UNDO-EXTRACT (RPLACD SEDIT::DETACH-NODE SEDIT::REVIVE-NODE) \VAMCheckEndOfVol (DiskError +LISPERROR) CLIPRECTANGLE.IP (APPENDNUMBER.IP) SEDIT::REDO (SEDIT::SET-SELECTION-NOWHERE +SEDIT::SET-POINT-NOWHERE SEDIT::UNDO-EVENT printout TERPRI) SEDIT::SKIP-TO-GAP (printout TERPRI) +BLTSHADE (DECLARE) BKSYSBUF.GENERAL (BKSYSBUF.GENERAL DECLARE SI::RESETUNWIND) \FONTFACE.COLOR ( +DECLARE \ILLEGAL.ARG) UNDOSET (UNDOSAVE SETTOPVAL SETSTKARG) NewPrinter (DECLARE RPLACD) +DO-HISTORY-SEARCH (DECLARE) \GENERIC-UNREGISTER-STREAM (DECLARE \ILLEGAL.ARG ERROR) +COMPILER::RESOLVE-VARIABLE-BINDING (CL:CERROR) \DSPSCALE.PSC (POSTSCRIPT.PUTCOMMAND) +DBG::MAKE-FRAME-INSPECT-WINDOW (DBG::%%RELEASE-STACK-DATUM WINDOWADDPROP) INSTALLBRUSH (DECLARE SETA) +\ADD-OPEN-STREAM (\ILLEGAL.ARG FREPLACEFIELD) \COURIER.RESULTS (\COURIER.TRACE \COURIER.HANDLE.ERROR) +\PAGEDEOFP (\UPDATEOF) SEDIT::TRANSLATE-CHARS (DECLARE) SEDIT::SELECTED-FN-NAME (SEDIT::CLOSE-OPEN-NODE +) FMAPRINT (PRIN1 PRIN2) SEDIT::UNDO-ATOM-CHANGE (SEDIT::UNDO-BY SEDIT::SUBNODE-CHANGED) +BEGINPREAMBLE.IP (APPENDOP.IP) \PAGEDGETEOFPTR (\UPDATEOF) \FIND.LOCALPUPHOSTNUMBER (printout PRIN1) +\NSRANDOM.READPAGES (\NSRANDOM.REESTABLISH \CLEARBYTES \BLT \NSRANDOM.CHECK.CACHE) POSTSCRIPT.ENDPAGE +(POSTSCRIPT.SHOWACCUM POSTSCRIPT.PUTCOMMAND) \HANDLE.RAW.PUP (RELEASE.PUP DECLARE PRIN1 SWAPPUPPORTS +SENDPUP \PUPERROR UNINTERRUPTABLY \ENQUEUE FREPLACEFIELD) FIXSPELL1 (ERROR! LISPXTERPRI TERPRI NCONC1 +PRIN2 PRIN1 FIXSPELL2 LINBUF SYSBUF FIXPRINTIN LISPXPRIN1 BKBUFS SELECTQ LISPXWATCH LISPXPUT) +MSPRINTHELPFILE (printout PRIN1 RESETSAVE COPYBYTES) \POLYSHADE.BLT (\DrawScanList.Blt) +XCL::ADD-WHERE-IS-DATABASE (XCL::DEL-WHERE-IS-DATABASE) BREAKLINE (DECLARE ERASE.TO.END.OF.LINE +SAVE.CURSOR TYPE.BUFFER ADJUSTLINE RESTORE.CURSOR) REMOVETONODES (FRPLACD) \IRM.WILD.REF (OPENW +PRINTOUT DECLARE TERPRI) PUTD (\ILLEGAL.ARG \PUTD) VAR.NOT.USED (SETERRORN) \NODIRCORE.OPENFILE ( +\FILE.WONT.OPEN SELECTQ \COREFILE.SETPARAMETERS \CORE.SETACCESSTIME) DECLSUBFIELD (RECORDERROR +SET.RECORD.NAME SET.RECORD.FIELDNAMES) CL:MAKUNBOUND (XCL::SET-CONSTANTP) FM.RESETGROUPS ( +\FM.INSUREWINDOW \FM.UPDATEGROUPEXTENT) FIXDATUM (MAPC) HPRINSP (PRIN2) PRINTERS.WHENSELECTEDFN ( +DECLARE) COPYGRAPH (FRPLACD) \RENAMEDFN (\COPYCODEBLOCK) LINETO.IP (APPENDNUMBER.IP) SI::UNWIND-TO-BLIP + (ERROR SI::UNWIND) \NODIRCOREFDEV (\DEFINEDEVICE) \INIT-MISCN-TABLE (DECLARE MAPC SETA) SCALEBM ( +BLTSHADE EXPANDBM) EVALUABLE.CONSTANTP (DECLARE FRPLACD) BLOCKCOMPILE (DECLARE ERROR COMPSET PRINT +CLOSEF) \NSFILING.GETFILEINFO (DECLARE) SI::GET-CACHE-CLOSURE (UNINTERRUPTABLY FREPLACEFIELD) +POSTSCRIPT.PUTCOMMAND (POSTSCRIPT.SHOWACCUM \SETXFORM.PSC \BOUTEOL POSTSCRIPT.OUTSTR) +\TEDIT.GET.PARALOOKS.LIST (FRPLACD) CLOSEALL (DECLARE FRPLACD) SEDIT::GETKEY (DECLARE FREPLACEFIELD +WAIT.FOR.TTY \BACKGROUND) SI::NON-LOCAL-RETURN (FRPLACD) SCROLLW (\CHECKCARET) GRAPHEROBJ ( +IMAGEOBJPROP) \DSPSCALE2.PSC (POSTSCRIPT.SHOWACCUM \UPDATE.PSC POSTSCRIPT.PUTCOMMAND) PRINT (PRIN2 +\OUTCHAR) SPELLFILE.SPELL1 (DECLARE SETA) \UNDEFINED-MISCN-UFN (PRINTOUT PRIN1) SCANDECLARECOLON ( +SELECTQ SCANDEFINEQ SETFILEPTR SCANDECLARECOLON SCANEXP SKREAD) \PFInitializeVols ( +\PFGetLogicalVolumePage) EOFCLOSEF (DECLARE APPLY*) BLTPATTERN.REPLACEDISPLAY (BLTSHADE BITBLT) +MISCN-COLLECT (FRPLACD) MINATTACHEDWINDOWEXTENT (SHOULDNT) \STKMIN (DECLARE \PUTBASEBYTE CL:FORMAT +PRIN1) POSTEDITPROPS (PUTHASH MARKASCHANGED RPLACA) MB.MARGINBAR.SELFN (GETMOUSESTATE MARGINBAR +DECLARE MB.MARGINBAR.TABTRACK DSPFILL MB.MARGINBAR.SHOWTAB) CL:FORMAT (CL::WITH-FORMAT-ESCAPES) +\FINDOP (MAPC PUTPROP) SEDIT::SPLIT-LITATOM (SEDIT::CLOSE-OPEN-NODE SEDIT::PUNT-SET-POINT) +SEDIT::LINEARIZE-CLISP (SEDIT::LINEARIZE SEDIT::SET-COMMENT-POSITIONS DECLARE SEDIT::OUTPUT-CR +SEDIT::OUTPUT-SPACE) FM.RESETSHAPE (\FM.INSUREWINDOW) BUTTONPANEL/SELECTION/FN (SHADEITEM) +SPELLFILE.MATCHINGDIRS (FRPLACD NCONC1) SEDIT::COMPUTE-FORMATS-AND-FORMAT-VALUES (MAPC) OPENP (DECLARE +) \LFFindDirectoryVol (SHOULDNT) TEDIT.HARDCOPY (ERROR) TWODINSPECTW.CREATE (WITH-INSPECTOR-ENV +TWODINSPECT.RESHAPEFN TOPW.RESHAPEFN RIGHTW.RESHAPEFN TITLEW.REPAINTFN) \MEDW.GETSCREENREGION ( +\ILLEGAL.ARG GETMOUSESTATE \CURSORPOSITION \GETREGIONTRACKWITHBOX \GETREGION.PACKPTS +\GETREGION.CHECKOPPT DRAWGRAYBOX SETCORNER DECLARE \GETREGION.CHECKBASEPT \UPDATEXYANDBOX APPLY* +ERROR!) \DSPCOLOR.PSC (POSTSCRIPT.SHOWACCUM POSTSCRIPT.PUTCOMMAND \ILLEGAL.ARG) TEDITFROMBRAVO (INFILE + DECLARE CLOSEF? SETFILEPTR \TFBRAVO.INIT.PAGEFORMAT ERSETQ CLOSEF \TFBRAVO.INSTALL.PAGEFORMAT) CL:THROW + (DECLARE) WHENCLOSE (DECLARE STREAMPROP STREAMADDPROP) ARRAY (SELECTC \PUTBASE \BLT \PUTBASEFIXP +FRPTQ \PUTBASEFLOATP SHOULDNT) AS.MAKE.CONVERSATION (RESETSAVE) ERRORMESS (LISPXPUT) +COPY.WINDOW.TO.BITMAP (.WHILE.TOP.DS. \PUTBASE \SOFTCURSORDOWN \INSURETOPWDS DECLARE BITBLT +\SOFTCURSORUPCURRENT) COMPILER::CLOSURE-ANNOTATE-CATCH (MAPC) SCANCOMPILEDFN (RETRYSCAN SETFILEPTR +NCONC1 LAPRD RPLACA RETFROM LCSKIP) \TEDIT.EXPANDED.MENU (\TEXTMENU.START \TEXTMENU.SET.TOGGLE) +MOVE.FORWARD.TO (GO.TO.RELATIVE) \MEDW.CARET.SHOW (\CURSORBITSPERPIXEL TOTOPW BITBLT) CALLS3 (MAP) +\DELETETREE (HELP \RPLPTR \PUTBASEPTR \PUTBASEFIXP \DELETETREE \TEDIT.UPDATETREE) \LFCloseDevice ( +DECLARE OBTAIN.MONITORLOCK \PFEnsureInitialized \REMOVEDEVICE MAPC SI::MONITOR-UNWIND) FM.RESETMENU ( +\FM.INSUREWINDOW \FM.ENDEDIT MAPC) TEDIT.GET.OBJECT1 (SETFILEPTR) SEDIT::COMPUTE-ALL-FORMATS ( +SEDIT::COMPUTE-FORMATS-AND-FORMAT-VALUES) HPINITRDTBL (SETSYNTAX /SETATOMVAL) OPT.COMPINIT (MAPC) +SEDIT::QUOTE-CURRENT-SELECTION (SEDIT::CLOSE-OPEN-NODE) MSDESCRIBE (DECLARE printout PRIN1 PRIN2 +FMAPRINT TAB TERPRI MSDESCRIBE1 FRPLACD MAPC) \READSTRIKEFONTFILE (SETFILEPTR \BINS \FSETOFFSET +\FSETWIDTH \FONTRESETCHARWIDTHS) BEGINPAGE.IP (APPENDOP.IP) MAKEUSERMACROSCOMS (MAPC FRPLACD) +\STARTPUP (MAPC) \READACFONTFILE (RESETSAVE COPYBYTES SETFILEPTR ERROR \FSETIMAGEWIDTH \FSETWIDTH +\FSETOFFSET \BINS BITBLT) \NSFILING.SETFILEINFO (DECLARE printout TERPRI) COLLECTFNDATA (MAPC) +PFCOPYBYTES (DECLARE RESETSAVE SETFILEPTR \OUTCHAR) MSDESCRIBE1 (SPACES PRIN1 PRIN2 TAB TERPRI) +FW-ADJUST-PLACEMENT (DECLARE FW-ADJUST-PLACEMENT SELECTQ FW-SHAPEW FW-MOVEW SHOULDNT) MOVETOFILE ( +PUTDEF MARKASCHANGED DELFROMFILES) PFI.AFTER.NEW.PAGE (DECLARE CHANGEFONT PRIN3 printout PRIN2 +DSPXPOSITION TERPRI) ASSURE.PUP.READY (DECLARE OBTAIN.MONITORLOCK CLRHASH DEL.PROCESS +\DEL.PACKET.FILTER \ADD.PACKET.FILTER RESTART.PROCESS ADD.PROCESS NOTIFY.EVENT BLOCK SI::MONITOR-UNWIND +) \NSRANDOM.WRITEPAGES (\NSRANDOM.FETCH.CACHE \NSRANDOM.REESTABLISH \NSRANDOM.TRUNCATEFILE +\NSRANDOM.HANDLE.ERROR \NSRANDOM.WROTE.HANDLE) SHOW.CLEARINGHOUSE (FILESLOAD WINDOWPROP) PF* (DECLARE +APPLY SI::RESETUNWIND) RETURN (DECLARE \SMASHRETURN LISPERROR) LOOKUPHASHFILE (INSERTHASHKEY +REPLACEHASHKEY DELETEHASHKEY) \DISCARDFRAME (\DECUSECOUNT \MAKEFREEBLOCK CHECK FREPLACEFIELD) +SPY.BUTTON (BITBLT WINDOWPROP) \INIT-USER-SUBR-TABLE (DECLARE) \TEDIT.GET.PARALOOKS1 (FRPLACD RPLACA +RPLACD) SEDIT::COMPILE-STRUCTURE (CL:FORMAT) PF (RESETSAVE PRINTFN) \NSRANDOM.TRUNCATEFILE ( +\NSRANDOM.REESTABLISH \NSRANDOM.HANDLE.ERROR \NSRANDOM.WROTE.HANDLE) CL:REMOVE (CL:ERROR) +\SFMAKEROTATEDFONT (HELP) CHANGETRAN1 (DWIMIFYREC) \DELETEPIECE (\DELETETREE) MakeMenuOfPrinters ( +DECLARE FRPLACD) CL:FIND (CL:ERROR) TEDIT-BOOK (MAPC TEDIT.SETSEL TEDIT.FORMAT.HARDCOPY) +TB.COLLECT.ITEMS (SELECTQ FRPLACD) \NSRANDOM.SESSION.WATCHER (RESETSAVE BLOCK) TRAPLOOP (MAPC DV +FRPLACD SORT) \BASEBYTES.BLOCKIO (STREAMOP BOUT \MOVEBYTES) SCROLL.HANDLER (GETMOUSESTATE DISMISS +OPENW \UPDATE.EXTENT.IMAGE CLOSEW TOTOPW \SCROLL.HANDLER.DOIT BLOCK) ELT (\DTEST) UNDOLISPX3 (DECLARE +/RPLNODE APPLY LISPXWATCH LISPXPRIN1 LISPXPUT LISPXREPRINT SI::RESETUNWIND) \SFROTATECSINFOOFFSETS ( +\FSETOFFSET) PROCESSPROP (WINDOWPROP \SET.PROCESS.NAME \INVALIDATE.PROCESS.WINDOW RPLACD LISTPUT) +PRINTFNDEF (RESETSAVE PRIN1 PRIN2) \FONTRESETCHARWIDTHS (\FSETOFFSET \FSETWIDTH) ROTATE-BITMAP ( +FREPLACEFIELD \PILOTBITBLT) \TERPRI.PSC (DSPNEWPAGE \MOVETO.PSC) GRAPHOBJ.DISPLAYFN (DISPLAYGRAPH) +NORMLOOP (RPLACD) \BASEBYTES.IO.INIT (DECLARE) MBUTTON.CHANGENAME (IMAGEOBJPROP MB.SETIMAGE +TEDIT.OBJECT.CHANGED) FM.CHANGESTATE (\FM.INSUREWINDOW \FM.CHANGESTATE BLTSHADE) HVRPTREAD (HVREADEND) + OPT.CHECKTAG (OPT.CCHECK) BRHC/LAYOUT/DAUGHTERS (DECLARE RPLACA) \SFFIXOFFSETSAFTERROTATION (HELP) +CLEARSTK (\MAPMDS) \BASEBYTES.SETFILEPTR (ERROR) BRHC/LAYOUT/TERMINAL (DECLARE) +CHAT.CHOOSE.PHONE.NUMBER (DECLARE FRPLACD) ROTATE-BITMAP-LEFT (FREPLACEFIELD \PILOTBITBLT) SLICEREF ( +HELP) HVFWDREAD (SELECTQ READC HVREADERR) \RESETSYSTEMSTATE (\KEYBOARDON) \BASEBYTES.PEEKBIN (SELECTQ) + /SETTERMTABLE (UNDOSAVE) \RESETTERMINAL (DECLARE \RESETLINE) UNICODE.UNMAPPED (PUTHASH) +\BASEBYTES.BOUT (APPLY* ERROR) \KEYBOARDON (\SETIOPOINTERS \PUTBASE) \BASEBYTES.BIN (FREPLACEFIELD) +CH.FINDSERVER (\CH.LOCATE.SERVERS) INITIALEVALQT (DECLARE \SETIOPOINTERS SIMPLEPRINT DSPBOUT EVAL +SETTOPVAL INTERPRET.REM.CM) FB.PROMPTWPRINT (SELECTQ TERPRI CLEARW FRESHLINE PRIN1) ASKUSER$ ( +ASKUSERSETUP PRIN1) WRITESTRIKEFONTFILE (LISPERROR ERROR \WOUT DECLARE \BOUTS CLOSEF) \USER-SUBR-UFN ( +DECLARE \INIT-USER-SUBR-TABLE) INTERPRET.REM.CM (DECLARE CLOSEF RPLCHARCODE BKSYSBUF) +\TEDIT.APPLY.PARASTYLES (\TEDIT.CHECK) UTF8.OUTCHARFN (FREPLACEFIELD ERROR) TTUNREADBUF (DECLARE +BKSYSCHARCODE) \ITEMW.SELECTITEM (\ITEMW.FLIPITEM) EVAL (DECLARE) \SETUPSTACK1 (\BLT FRPTQ RPTQ +\PUTBASE \MAKEFREEBLOCK) FM.RESETSTATE (\FM.INSUREWINDOW) TTMAKECOMPLEXCHAR (MAPC) SIMPLEPRINT ( +DSPBOUT) DELETE.TO.END (SETTAIL? ERASE.TO.END.OF.PAGE KILL.LINES) \MEDW.GETBOXSCREENPOSITION ( +GETMOUSESTATE \CURSORPOSITION PROMPTPRINT \TRACKWITHBOX CLRPROMPT) STRIKECSINFO (\FSETOFFSET BITBLT +\FSETWIDTH) FASL::COLLECT-LIST (FRPLACD) \RESETSTACK (\RESETSTACK0 \CONTEXTSWITCH) +ICMLARRAY.VALUECOMMANDFN (INSPECT ICMLARRAY.SETVALUE PROMPTPRINT ICMLARRAY.INDICES) SEDIT::MUTATE ( +TERPRI printout) MULTIFILEINDEX (PFI.ENQUEUE) PAGEFAULTS (DECLARE) \PFCreateVols (SETA PUTHASH) +\RESETSTACK0 (\SETUPGUARDBLOCK) \MAKEBASEBYTESTREAM (SHOULDNT \ILLEGAL.ARG CLOSEF UNINTERRUPTABLY) +\NSRANDOM.SETEOFPTR (FORGETPAGES \SETEOF \NSRANDOM.TRUNCATEFILE) \DUMMYTELERAID (\CONTEXTSWITCH) +\MBS.OUTCHARFN (BOUT) \DOTELERAID (\TELERAIDSERVER \CONTEXTSWITCH) \FBITMAPBIT.UFN (FREPLACEFIELD +DECLARE) CARET (\CHECKCARET) RECORDECLTAIL (SELECTQ RPLACD RPLACA DECLSUBFIELD APPLY +SET.RECORD.CREATEINFO SET.RECORD.TYPECHECK SET.RECORD.DECL SET.RECORD.PRIORITY RECORDERROR +SET.RECORD.DEFAULTFIELDS) GRAPHOBJ.PUTFN (PRIN1 DUMPGRAPH GRAPHOBJ.PUTALIGN SPACES HPRINT printout) +\BUILDATWSTRUCTURE (\SETGROUPMIN RPLACD NCONC1) \PFInitFileDescriptors (ERROR) \CODEFORTFRAME (\CALLME + CLEARSTK INITIALEVALQT \REPEATEDLYEVALQT) APPENDOP.IP (ERROR) LOADFNSCAN (SCANFILE0) COMP.SETARG ( +COMP.VAL COMP.DELPUSH COMP.VAL1) TTYINEDIT (CLOSEW SETFILEPTR FREERESOURCE DECLARE) FB.SELECTEDFILES ( +FB.PROMPTWPRINT) ASKUSERPRIN1 (PRIN1 LISPXPRIN1) INITBITMASKS (SETA) \REPEATEDLYEVALQT ( +\RESETSYSTEMSTATE EVALQT) SCANFILE1 (SETFILEPTR RETRYSCAN LAPRD SCANFILE2 ERROR PUTDEF EVAL DEFINE) +\UPCASEBASE (\PUTBASECHAR DECLARE) /SETREADTABLE (UNDOSAVE) \CLEARCELLS (\PUTBASE \BLT) EVALQT ( +ENTEREVALQT FRESHLINE PROMPTCHAR TERPRI) COURIER.CALL (FRPLACD RESETSAVE) RECORDECL1 (CHECKRECORDNAME +FRPLACD RECORDECLTAIL) \CONTEXTAPPLY (\SMASHLINK) BRHC/LAYOUT (DECLARE RPLACD) FM.GETITEM ( +\FM.INSUREWINDOW) INSPECTW.SELECTITEM (\ITEMW.DESELECTITEM \ITEMW.SELECTITEM) \CAUSEINTERRUPT (CHECK +\PUTBASE) \TEXTMENU.START (WINDOWADDPROP ATTACHWINDOW TEDIT TTY.PROCESS) CRITSECT (printout PRIN1 +NORMSECT SHEDSCAN) \SETPOS.PSC (POSTSCRIPT.PUTCOMMAND) SCANFILE0 (SCANFILE1 SETFILEPTR SCANDEFINEQ +READC SCANEXP RPLACA SCANCOMPILEDFN) CREATEDSKDIRECTORY (DECLARE OBTAIN.MONITORLOCK ERROR +\LFPurgeDirectory UNINTERRUPTABLY \LFCreateDevice \PFDsplyVolumes SI::MONITOR-UNWIND) FM.HIGHLIGHTITEM + (\FM.INSUREWINDOW) LAST (DECLARE) SEDIT::BUILD-LINEAR-FORM (SEDIT::LINEARIZE) HVREADEND (HVREADERR) +\TEDIT.RESHAPEFN (\SHOWSEL \DISPLAYLINE \FILLWINDOW \FIXSEL) CREATEPAGES (\NEWPAGE) \InitCurveBrushes +(DECLARE BITMAPBIT MAPC SETA) TEDIT.RAW.INCLUDE (\SHOWSEL SETFILEPTR COPYBYTES CLOSEF +\TEDIT.INSERT.PIECES \FIXILINES TEDIT.UPDATE.SCREEN \FIXSEL \SETUPGETCH) /RAISE (UNDOSAVE) INTERRUPTED + (DECLARE \MAIKO.ETHER-INTERRUPT \MAIKO.CONSOLE-LOG-PRINT \MAIKO.IO-INTERRUPT \DOSTORAGEFULLINTERRUPT +\DOSTACKFULLINTERRUPT \DOVMEMFULLINTERRUPT \DOGCDISABLEDINTERRUPT \DOINTERRUPTHERE) \ADDOFD (\CLEAROFD +) EXPANDATTACHEDWINDOWS (DOUSERFNS) SEDIT::MENU-SUBSTITUTE-SELECTEDFN (SEDIT::MENU-SELECTEDFN) +COMPERRM (LISPXTAB LISPXPRIN1 LISPXPRIN2 RESETFORM COMPERRM) \DOMISCAPPLY1 (\CONTEXTSWITCH) ARCTO.IP ( +APPENDNUMBER.IP) COMP.ARG (COMP.VAL1 COMP.DELPUSH) \ZEROWORDS (\CLEARWORDS \PUTBASE) /PUT+1 (UNDOSAVE +FRPLACD SETPROPLIST) COMP.CALL (SELECTQ COMP.STCONST COMP.VAL COMPERROR) OPT.CHLEV (OPT.CCHECK) +DBG::BACKTRACE-ITEM-SELECTED (MENUSELECT PROCESS.EVAL) XCL:COMPILE-FORM (DECLARE +COMPILER::WARN-ABOUT-UNKNOWN-FUNCTIONS) END.DELETE.MODE (SELECTQ TTBOUT DO.LF) DSPDESTINATION (DECLARE + UNINTERRUPTABLY) IRM.CREF.BUTTONEVENTFN (GETMOUSESTATE BLOCK printout TERPRI CLEARW ADD.PROCESS) +\GATHER-CLEANUP-FORMS1 (SELECTQ) DO.EDIT.COMMAND (SELCHARQ RESTOREBUF MOVE.TO.LINE BEEP +MOVE.TO.NEXT.LINE MOVE.FORWARD.TO MOVE.BACK.TO FORWARD.DELETE.TO SKIP/ZAP U/L-CASE READFROMBUF +MOVE.TO.WHEREVER TTDELETEWORD DECLARE CHECK DELETE.TO.END DELETELINE TTUNREADBUF OVERFLOW? +ADJUSTLINE.AND.RESTORE RETYPE.BUFFER GO.TO.RELATIVE FRPLACA TYPE.BUFFER BREAKLINE DREMOVE ADDSPELL +DO.EDIT.PP) MBUTTON.CREATE (IMAGEOBJPROP MB.SETIMAGE) \MEDW.GETSCREENPOSITION (GETMOUSESTATE APPLY*) +UPDATEPCNODES (\PUTBASEFIXP FREPLACEFIELD HELP) \DISABLEGC1 (FRPTQ) XCL:COMPILE-DEFINER (XCL:COMPILE-FORM +) HVREADCHECKGETFN (\LISPERROR ERROR!) RECORDECLBLOCK (SELECTQ FRPLACD) RECORDERROR (ERROR FIXPRINTIN +LISPXSPACES LISPXPRIN1 MAPRINT LISPXTERPRI LISPXPRIN2 LISPXPRINT DWIMERRORRETURN) \GC.MODIFY.BIGREFCNT + (\GC.BIGREFCNT.MISSING SELECTC FREPLACEFIELD) \MAKE.PROCESS0 (DECLARE \MISCAPPLY* \CONTEXTSWITCH +\SETFVARSLOT \MAKE.PROCESS1 printout SELECTQ SI::RESETUNWIND \PROCESS.RELEASE.LOCKS DRIBBLE +NOTIFY.EVENT \PROCESS.GO.TO.SLEEP) CHECKSAMEDIR (RESETSAVE SELECTQ ERROR! TERPRI SHOULDNT NLSETQ) +AS.NEXT.VERIFIER (RPLACA) \GCERROR (DECLARE DISABLEGC) FILLNGON.IP (APPENDOP.IP SETCOLOR.IP MOVETO.IP +LINETO.IP APPENDINTEGER.IP) RETRYSCAN (REMHASH PRIN1 PRINT) BITBLT (DECLARE \PUTBASE \SOFTCURSORDOWN +\INSURETOPWDS \SOFTCURSORUPCURRENT TOTOPW) PFI.MAKE.LPT.STREAM (CLOSEF LISTPUT) \GC.ENTER.BIGREFCNT ( +SELECTQ \NEWPAGE \MP.ERROR FREPLACEFIELD) COMPILER::CLOSURE-ANNOTATE-BLOCK (MAPC) +TEDIT.UNPARSE.PAGEFORMAT (MAPC \ILLEGAL.ARG) TTCOMPLETEWORD (DECLARE CHECK END.DELETE.MODE HELP RPLACA + GO.TO.RELATIVE TYPE.BUFFER ADJUSTLINE.AND.RESTORE FORWARD.DELETE.TO MOVE.TO.WHEREVER ADDCHAR MOVETOP) + \BLTSHADE.BITMAP (DECLARE UNINTERRUPTABLY \BITBLTSUB) \BITBLT.BITMAP (DECLARE SELECTQ UNINTERRUPTABLY + \BITBLT.MERGE \BITBLTSUB ERROR \BWTOCOLORBLT SHOULDNT) COMPILER::TEST-ANALYSIS (COMPILER::RELEASE-TREE +) CHAT.TYPEOUT (BLOCK \CHECKCARET PRIN1 PUTSTREAMPROP SPREADAPPLY* \OUTCHAR \BOUT SELECTQ +CHAT.TYPEOUT.CLOSE DEL.PROCESS) GRAPHOBJ.GETFN (ERROR READCCODE IMAGEOBJPROP RATOM) COMP.LAM1 ( +COMP.TOPLEVEL.COMPILE) FM.GETSTATE (\FM.INSUREWINDOW MAPC) \LFCloseFile (DECLARE OBTAIN.MONITORLOCK +\CLEARMAP UNINTERRUPTABLY \LFTruncateFile \PFTrimHelper \PFSaveBuffers SI::MONITOR-UNWIND) UNDONLSETQ1 + (FRPLACD FRPLACA APPLY LISPXWATCH) \HARDRESET-CLEANUP1 (UNINTERRUPTABLY \PUTBASEPTR SETSTKNAME-RAW +SETSTKNTOFFSET-RAW MAPC RPLACD REMHASH) COMP.EFFECT (OPT.CCHECK) SUB-FORMAT (DECLARE) +\GATHER-SPECIAL-BINDINGS (SELECTC) HASH.PASSWORD (DECLARE) XCL:UNADVISE-FUNCTION (XCL:UNBREAK-FUNCTION + PUTD REMPROP SI::CHANGE-CALLS SI::FINISH-UNADVISING) SEDIT::BUILD-INTERNAL-STRUCTURE (SEDIT::PARSE +SEDIT::COMPUTE-ALL-FORMATS) RDTBL\NONOTHERCODES (DECLARE \MAPCHARTABLE) /LISPXPUT (/RPLACA) +XCL:READVISE-FUNCTION (XCL:UNADVISE-FUNCTION) LOADFNS-FINDFILE (DECLARE) \GC.LOOKUP.BIGREFCNT ( +\GC.BIGREFCNT.MISSING) \DSPSPACEFACTOR.PSC (DECLARE POSTSCRIPT.SHOWACCUM) SPP.FORCEOUTPUT ( +UNINTERRUPTABLY FREPLACEFIELD \SPPINCFILEPTR DECLARE APPLY* \SPP.STREAM.LOST) /RADIX (UNDOSAVE) +\GCMAPSCAN (CHECK .DELLINK. .GCRECLAIMLP. \ADDREF) OPT.JFIXPASS (MAPC) IDLE.SHOW.OPTION (FRESHLINE) +MB.PUTFN (HELP \STRINGOUT \SMALLPOUT DECLARE MAPC) \GCMAPUNSCAN (.DELLINK.) FIND.NON.SPACE (DECLARE) +TB.NTH.ITEM (\DTEST) IMPORTEVAL (EVAL) GRAPHOBJ.BUTTONEVENTINFN (CLOSEW) \DORETCALL (CHECK +\INCUSECOUNT \DECUSECOUNT) RECORDECL0 (PUTHASH) \FREELISTCELL (CHECK) \FORMATLINE (DECLARE \SETUPGETCH + \EDITSETA SELCHARQ \TEDIT.PURGE.SPACES \TEDIT.NSCHAR.RUN FREPLACEFIELD TEDIT.PROMPTPRINT +\DOFORMATTING) STACK.FULL.WARNING (DECLARE LISPERROR) FW-FORGET-STREAM (CLOSEW) \DISPLAYLINE ( +DSPDESTINATION DSPCLIPPINGREGION BITBLT \FORMATLINE MOVETO DECLARE RELMOVETO SELECTC TEDIT.MODIFYLOOKS + \TEDIT.BLTCHAR \DSPPRINTCHAR BLTSHADE APPLY* \TEDIT.MARK.REVISION SELECTQ) TEDIT.FORMATBOX (SELECTQ +CL:MULTIPLE-VALUE-SETQ TEDIT.FORMATPAGE TEDIT.FORMATBOX SHOULDNT BLOCK \TEDIT.HARDCOPY.DISPLAYLINE) +XCL:ADVISE-FUNCTION (CL:FORMAT CL:ERROR XCL:UNBREAK-FUNCTION SI::ADD-ADVICE) \CARET.FLASH.MULTIPLE ( +\CARET.FLASH.AGAIN) SEDIT::ATOM-CHANGE-RELINEARIZE (SEDIT::CLOSE-OPEN-NODE SEDIT::SET-POINT-NOWHERE +SEDIT::SET-SELECTION-NOWHERE SEDIT::WALK-UP-TREE) XCL:REBREAK-FUNCTION (CL:FORMAT) LOADFNS-MAKELIST ( +LISPXPRIN1 FRPLACD) \REFCNT (CHECK) XCL:TRACE-FUNCTION (CL:ERROR XCL:UNBREAK-FUNCTION PUTD +SI::CHANGE-CALLS) SEDIT::MENU-PRINTBASE-SELECTEDFN (printout DECLARE TERPRI) \ALLOCMINIMUMSIZES ( +SELECTQ MAPC \SETWINFOXSIZE) \EQREFCNT1 (CHECK) \PFCreateFileDescriptors (SETA) RESET (\SMASHRETURN +TAB) APPENDRATIONAL.IP (APPENDSEQUENCEDESCRIPTOR.IP APPENDINT.IP) START.CLEARINGHOUSE ( +GETCLEARINGHOUSE) \NSRANDOM.DESTROY.STREAM (UNINTERRUPTABLY \SETIODIRTY FORGETPAGES) +XCL:CREATE-TRACE-WINDOW (DSPSCROLL) \COPYSYS (SELECTQ \DAYTIME0 LISPERROR \CLEARSYSBUF \RESETKEYBOARD) + NIL +CLISP \TOTALFIXEDHEIGHT (bind for in when sum) FW-FILTERED-FILE? (for in thereis) MSSTOREDATA (for in +when do) TEDIT.COPY.LOOKS (type?) FILEGETDEF.VARS (for in do finally) \GETFTPCONNECTION (for in when +do type?) \TYPENUMBERFROMNAME (bind for from to do) TB.MAP.ITEMS (for in do) SEDIT::COPY-SELECTION ( +type?) FB.UPDATEBROWSERITEMS (for in bind when collect while do finally) PASTEFROMCLIPBOARD (bind +while do) \COURIER.CHECK.ERRORS (for in bind unless do) \ALLOCPAGEBLOCK (to as by do) +\TEDIT.COMMAND.LOOP (type? for inside do while) LOAD? (bind until do finally) SEDIT::SET-POINT-QUOTE ( +type?) TEDIT.DISPLAYTEXT (for instring do) MAKEFILESCOMS (for in do while) MSMARKCHANGE1 (for inside +do) PRINT-LOADED-FILE-INFORMATION (for in when do) \ATMOUT (for inatom do) SETUPFONTS.PRESS (for +inside do) TEDIT.SELECT (type?) TEDIT.SUBPARALOOKS (for on by collect bind while do) COPYFILES (for +inside do bind while) \ATMIN (for from to collect) VALUOF-EVENT (for in collect) \GETPILOTBBTSCRATCHBM + (type?) PREVWORD (for by until do finally) \CIRCSHADE.XSCAN.IP (while do) \FM.EDIT-FINDFIRST (for in +thereis) \FM.MENUHANDLER (repeatuntil bind do finally) TB.UNSELECT.ALL.ITEMS (for from to bind when do +) IMLTLIST (for in collect) CHECKIMPORTS (for inside bind when collect in do) SEDIT::ASSIGN-FORMAT-NIL + (for in do) PFI.PROCESS.FILE (bind while do) DIRECTORY.MATCH1 (bind do repeatuntil) OPT.JLENPASS (for + in do) \GETBRUSH (type?) \TEDIT.GET.SINGLE.PARALOOKS2 (for from to collect) \MAP-OPEN-STREAMS (for in + when join collect) \TEDIT.REPAINTFN (while do) \COURIER.CHECK.PROCEDURES (for in bind unless do while +) \TEDIT.PUT.CHARLOOKS.LIST2 (for from as in do) SEDIT::SHIFT-LINEAR-FORM (for in when do type?) +SEDIT::SET-POINT-LIST (type?) \UPDATE.PBT.RASTERWIDTHS (to bind do) PFI.CENTER.PRINT (for in sum on do +) PFI.CONDENSE.INDEX (for in do bind when collect unless thereis) LASTCHPOS (while do) READATABASE ( +while do) COMPILE-FILE-EXPRESSION (for in do) \TEDIT.PUT.PARALOOKS.LIST2 (for from as in do) +\TEDIT.CONVERT.TO.FORMATTED (while do) FILEGETDEF.FNS (for in when do) ALLOCSTRING (for from to do) +\FTP.PRINTPLIST (for in do bind inpname) MENUBUTTONFN (bind for in when do) CLOSEATTACHEDWINDOWS (for +in do) \UPF.NEXTPOS (bind while do) BREAK.MSG.INTO.LINES (for from to do finally) STKARGS (for from to + collect) \FM.EDIT-SETUPTTBL (for from to do) FIND.NEXT.WORD (while do) TB.DESELECTRANGE (for from to +do) ADJUSTLINE (while do) PFI.COLLECT.DEFINERS (for in bind when join collect unless thereis) +XCL::PPRINT-DEFINER (while do) \INITMDSPAGE (to do for while) FM.ITEMPROP (type?) \TOTALFIXEDWIDTH ( +bind for in when sum) UNIX-GETENV (for from do) MB.GETFN (for in do) MSPARSE (for in do when collect) +BREAKDOWN (for in do from to) \FIXILINES (for inside as in do bind while) BIT.IN.COLUMN (for from to +when do) \LEAF.DEVICEP (for from to always type?) \PRESSFAMILYCODELST (bind do for from to collect) +MSEDITE (for from to collect) NORMSECT (while do) \LFUnpackName (for instring collect) \SPP.CLEANUP ( +for in do) LAYOUTSEXPR1 (for in thereis do) BRH/LAYOUT/DAUGHTERS (for in do finally) +TEDIT.SEL.AS.STRING (for from to do) FLASHWINDOW (for to bind first do) TEDIT.\INSERT (type?) +FW-FORGET-STREAM (for in when do) \CIRCSHADE.DISPLAY (while do) \LFScavFileName (for instring until +collect in thereis) BITMAPBIT (type?) DBG::ATTACH-BACKTRACE-MENU (for from bind repeatwhile eachtime +when collect in do) SIMPLE.FINDFILE (for in when do) IDLE.BOUNCING.BOX (for on unless do while) +SPY.MERGE.CALLEES (for in do when finally) STRPOS (for from to as always) PFI.PRINT.FILECREATED (for +in collect while) TEDIT.FORMATBOX (bind for in while do when) MSERASE (for in do) FW-CREATE-OFD-LIST ( +for in bind eachtime unless do join) EDITGETDEF (bind for in when do) \CH.UPDATE.CACHE (for in do find + suchthat when finally) FILEGETDEF.PROPS (for in join finally on by when) \IGR.MAKEPRETTYCOMSL (for in + collect) CREATEW (type?) \FTP.PACKFILENAME (for in do) MENUREPAINTFN (for in do) \SEARCH.OUTPUTQ ( +bind while do finally) ASKUSER (for in eachtime collect when find suchthat) SEDIT::INSERT (type?) +\GENERIC.CURSOR (for in do) \BOXFPLUSDIF (while do) COERCETEXTOBJ (type? while do for from as to) +FIND.CHAT.PROTOCOL (for in bind when do) \GETSPP (bind do) \BUFFERED.BINS (bind do) \BOXFTIMES2 (while + do) SI::ADVICE-PUTDEF (for in collect when) PFI.PRINT.INDICES (find in suchthat) \CIRCSHADE.IP (while + do) COMPILER::META-CALL-LAMBDA-SUBSTITUTE (for in as on when do) \BOXFQUOTIENT (while do) +STRIP-KEYWORDS (for old on by while collect) \TERMINATESPP (bind do repeatuntil) \FLUSH.NDB.QUEUE ( +bind while do) \TEDIT.PUT.SINGLE.PARALOOKS2 (for in do) \MAYBEPEEKPUP (for inside thereis) +\LFDirectoryP (type?) CCCSCAN (for from by do) MSEDITF (for from to collect in bind when do) +\BUFFERED.BOUTS (bind do) APPENDNUMBER.IP (for from to by do) \DRAWPOLYGON.PSC (for in do) \USEREVENT +(for in do) TEDIT.GET.LOOKS (type?) TWODINSPECT.SELECTITEM (for on thereis in as) TEDIT.UPDATE.SCREEN +(bind for inside as do) \TEDIT.FIND.PROTECTED.START (bind first while do) \PROCESS.BEFORE.LOGOUT (for +in do) PRINTWORDS (for from to do) FEQP (while do) \COURIER.CHECKDEF (for on by do) +ONEDINSPECT.VALUEWIDTH (for in largest finally) \OPENLINEBUF (type?) \PS.SCALEHACK (for in do) +SEDIT::REPLACE-LIST (for in do by bind while as from collect type?) \CARET.FLASH.AGAIN (for by do) +\MAKEFLOAT (while do) SI::ADVICE-GETDEF (for in collect) SEPRCASE (for from to do in collect) +DUMPDATABASE (for in when do) FW-OFD-EXISTS? (for in when do) DOSLINKER (for in do) FILEGETDEF.MACROS +(for in join on by when collect) HEXSTRING (for from until do finally by) AT.END.OF.TEXT (for by until + always) \ItemNumber (for in as from do finally) FIXSPELL (for in when do) +\TEDIT.PUT.SINGLE.CHARLOOKS2 (type?) \TEDIT.PROMPT.PAGEFULLFN (for in when do) \FILLPOLYGON.PSC (for +in do) COURIER.EXECUTE.CALL (for in as do) SI::SPLIT-PROCEED-CLAUSES (for in as from do) +APPENDLARGEVECTOR.IP (for from to largest do) SHOWBITMAP.IP (bind while first do) FW-LOOP (bind first +while do finally) FB.THINCOMMAND (for on bind do finally) \GR.MAKEPRETTYCOMSL (for in collect) +\TEXTSTREAMBOUT (while do) \PEEKPUP (for inside collect) COMPILER::FRAME-ANNOTATE-TAGBODY (for in join + do) TTNTH (bind while do finally) \CIRCSHADE.BLT (while do) \LEAF.STREAM.IN.QUEUE (type?) +SPY.ORIGINAL (for in join) \SPP.EVENTFN (for in do) PFI.PRINT.MULTI.INDEX (for in as from bind do +unless) FIXFIELDORDER (for in do when on) \BSP.CLOSE.OPEN.SOCKETS (for in do when collect) +LAYOUTLATTICE (for in unless do) BRH/OFFSET (for in do) NARGS (in sum) \MAYBEPEEKNS (type?) +CONDITIONS::PARSE-RESTART-CASE (while do) \TEDIT.FORMAT.FOOTNOTE (while collect) HASDEF (for in do) +\TEDIT.GET.CHARLOOKS.LIST2 (for from to collect) IMAGEOBJP (type?) PRINT-ARGLIST (bind while do) +FTPGETMARK (bind while do finally) IMAGESTREAMP (type? for inside always) MODERN-ADD-EXEC (for from to + collect) DELDEF (for in do on by) TEDIT.STRINGWIDTH (for instring sum) \TEXTCLOSEF (type? while do) +\COERCEFONTDESC (type?) PFI.PREVIEW.DEFINEQ (until do) OPT.DELTAGREF (for on when do finally) +DEFPACKAGE (for in do collect join) IMAGESTREAMTYPEP (type? for inside always) HASHARRAY (bind find +from to by suchthat for never) \MEDW.PUTWINDOWPROP (type? for on by when do) \CH.GUESS.NEW.PROPERTIES +(for from to when collect) TEXTUREP (type?) \MATMULT441 (for from to by do bind declare as finally) +SEDIT::JOIN (for from to as in collect join thereis do) \TEXTBIN (repeatwhile do) HARRAYP (type?) +\MATMULT144 (for from to by do bind declare as finally) TERMTABLEP (type?) CLOSENSOCKET (while do) +INFILECOMTAIL (for in do finally) LOG (while count) \MATMULT331 (for from to by do bind declare as +finally) \LFCreateDevice (type?) U/L-CASE (for until do) \MEDW.GETWINDOWPROP (type?) \MATMULT133 (for +from to by do bind declare as finally) \LEAF.TIMEDOUT.EXCESSIVE (for in do type? finally) SPY.DELETE ( +for in when collect) ULREDISPLAYBITMAP (type?) \DRAWARC.PSC (for in do) \SENDSPP (bind while do) +\MATMULT444 (bind for from to by do declare as finally) PFI.PREVIEW.DECLARE (bind until do finally) +TEDIT.HARDCOPY-COLUMN-END (for in when do while finally bind) DASSEM.COUNTVARS (for in do) +PRINTPACKETDATA (bind while do finally) POSTSCRIPT.OUTSTR (for infatstring do inatom in) \MATMULT333 ( +bind for from to by do declare as finally) TTYINFIX (for in thereis) SWITCH/NODE/HEIGHT/WIDTH (for in +do) OPENIMAGESTREAM (for inside when do finally) %%COPY-STRING-TO-ARRAY (for from to do) \AddShade ( +for in do finally) \FRAMESCAN (for from by bind until do) CLEARMAP (for in do) XCL::PROFILE-VALUES ( +for in by collect) COMPAREDEFS (for in when collect on do) COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS + (for on do in) DASSEM.CANSHAREBINDING (for in when do finally find suchthat) INVERT.TEXTURE.BITMAP ( +type? bind for by until do) PRINTERPROP (for in when do) FB.HARDCOPY.MAXWIDTH (for in bind when do +finally) \TEDIT.FIND.LAST.LINE (bind while do finally) COMP.MLL (for in do type?) RUNION (for in +unless do) APPENDINT.IP (for from to by do) BUILDTESTRELQ (for in collect) PRINTERTYPE (for in thereis + bind when do) DO-DISPATCH-MACRO (while do) \FTP.HANDLE.NO (for in do) FILEGETDEF.LISPXMACROS (for in +when collect) \GR.CONTENTS (find in suchthat) \ENDVECRUN (for in do) UNIX-STREAM-IN (while do) +GETDEFFROMFILE (bind for inside when do finally) FILING.CALL (for from to collect) TEDIT.UNDO.DELETION + (bind while do) OPT.JUMPREV (type?) \MAXWIDTHOFGROUP (for in largest finally when sum) HPRINTEND (for + in as from do) PRINTFILETYPE.FROM.EXTENSION (bind for in when do) FILEGETDEF.ALISTS (for in when +collect finally) \CH.CHECK.CLEARINGHOUSE (find old in suchthat) \DO-DEFINE-FILE-INFO (for on by do) +GETDEFSAVED (for on by when do finally) SEDIT::INSERT-SPECIAL-CHARACTER (type?) ADDFILE (for in when +do) MSVERBTYPE (type?) COMPILER::META-CALL-LAMBDA (for in as do) DINFO.UPDATE.MENU.DISPLAY (for in +bind collect) \TEDIT.SET.WINDOW.EXTENT (for inside do) \POSTSCRIPT.ACCENTFN (for instring do) +SEDIT::TRACK-SELECT (bind first do repeatuntil finally) UPDATEFILEMAP (do) MSSEEKPHRASE (for in when +do while) \TEDIT.LOOKS.UPDATE (while do type?) ALLATTACHEDWINDOWS (for in join) \WRITEOUTBUFFERS (for +in collect do) \ACTONDISKPAGES (type? for in as from bind do by when) DASSEM.MATCHVARS (for in as +always) CLRHASH (bind do repeatuntil) DATATYPES (bind for from to when collect) FILEBROWSER (for on by + do in collect when bind) SMASHFILECOMS (for in when do) \DISKERROR (while do) CLOSEBSPSTREAM (while +do) SHOWSHADEDITEMS (for in thereis do) %%COPY-ONED-ARRAY (for from to do) MENUITEMREGION (for on when + do) \TEDIT.FIND.PROTECTED.END (bind first while do finally) \FTP.OPENFILE (for in when do) +\FILLPOLYGON.IP (for in do) XCL::PROFILE-VARIABLES (for in by collect) MAPHASH (bind when do +repeatuntil finally) DATATYPEP (for from to thereis) STKARGNAME (for from by as until do) +FINDPTRSBUFFER (bind while do) \CML-LOAD (until do) \DOACTONDISKPAGES (for from to until do finally) +READPLIST (bind while collect finally) GREET (for in do) \ICONW.FORMAT.TITLE1 (until collect bind do) +SETSTKARGNAME (for from by as until do) \FM.SETATTACHPOINT (for in do) SEDIT::INSERT-STRING (type?) +\FTP.WHENCLOSED (find in suchthat) \POSTSCRIPT.ACCENTPAIR (for instring do inside) SEDIT::TRACK-EXTEND + (first do repeatuntil) \FM.COLLECTNWAYS (for in do) OPENBSPSTREAM (type?) \CONVERTNUMBER (repeatuntil + do) STKNARGS (do repeatwhile) OPT.LABELNTHPR (type?) FILEPKGCHANGES (for in when collect do on +thereis) \WRITEDISKPAGES (type? for in as from bind do) MSFIXUPTYPES (for in do type?) TEDIT.QUIT ( +type? until do) HPRINT1 (while do for from to in when collect unless) PRINTCOPYRIGHT1 (for on do in +while) COPIEDFROMSPEC (for from to by do) TTECHO.TO.FILE (for do repeatwhile until) LISPXREADBUF (for +in until collect) \DOWRITEDISKPAGES (do repeatuntil for from to when finally) \LEAF.NOT.RESPONDING ( +type?) ITEM.WINDOW.SET.STACK.ARG (type?) \GENERIC.DSPCREATE (for in suchthat type?) \SHOWSEL (for +inside as in do) SCROLLBITMAP (type?) M44.SIGNAL.DISK.ERROR (bind while do) REDISPLAYBITMAP (type?) +PUP.ECHOUSER (do repeatuntil finally) EQUAL.CH.NAMES (type?) \IDLER (for in bind do until) +MAPBUFFERCOUNT (bind while count) SPY.DUMP.BUFFER (bind while do first finally for from by) +\GOOD.DASHLST (bind for in collect) \TFBRAVO.INSTALL.PAGEFORMAT (for in do) FB.SEEFULLFN (do +repeatuntil) SEDIT::INSERT-MULTI-ESCAPE (type?) CHECKDEFS (bind for on as in unless do finally join) +TEDIT.FIND.OBJECT (while do) FIXR (while do) CLEANPOSLST (for in do) REFLECT/GRAPH/DIAGONALLY (for in +do) BITMAPWIDTH (type?) \HASHRECLAIM (bind when do repeatuntil finally) DECLAREDATATYPE (for in when +collect) READFROMBUF (for by until thereis do) DO.MOUSE (bind while when do) BITMAPHEIGHT (type?) +HASHOVERFLOW (do) FLTSTR (while do) SPY.MAKE.TREE (for in sum collect) \TRACKWITHBOX (until do) +\MAXHEIGHTOFGROUP (for in largest finally when sum) \VAMFindFreePages (until do repeatuntil) +TIMESPOW10 (while do) STORAGE (from to collect for inside when do finally) TRANSLATE.DATATYPE (for in +collect do find suchthat while) GETDEFERR (for inside when do finally) INTTOEXT (while do) +TEDIT.REDO.INSERTION (bind while do) NODELST/AS/MENU (for in bind thereis) TB.SELECTRANGE (for from to + do) RAISE-SIGNAL (while do finally) EXTTOINT (while do) STORAGE.LEFT (for by while sum) +SEDIT::LOCATE-NODE-FROM-EDITCHAIN (for in thereis) COURIER.BROADCAST.CALL (for in thereis while do +finally find suchthat) ATTACHEDWINDOWREGION (for in do) FLTINTLOG (for from to bind do) \STORAGE.TYPE +(for by while do) \RESHAPEATTACHEDWINDOWSAROUNDMAINW (bind for in do) SEDIT::TTYFN (until) +\BITBLT.BITMAP.SLOW (type?) \STORAGE.HUNKTYPE (for in do) GETFILEDEF (for in when do) +\COLLECTDIRTYBUFS (bind while collect find inbufs suchthat) \STRINGWIDTH.PRESS (for inatom sum +instring do) DO-EVENT (for in do) GETDEFCOM0 (for in join collect) \VFMBlankInterval (for from to do) +\TEDIT.PUT.SINGLE.PARALOOKS (for in do) ONEDINSPECT.SELECTPROP (for on thereis in as) BUILDGETRELQ ( +for in do) \PUNT.BITBLT.BITMAP (type?) \SETIODIRTY (for inbufs when do finally) SEDIT::LINEARIZE-LIST +(for on when do while) \STRINGHASHBITS-UFN (for inpname bind do finally) FLONUM-TO-STRING (while do) +COURIER.REP.LENGTH (for in bind sum finally as) \DODISKCOMMAND (while do) \STRING-EQUAL-HASHBITS-UFN ( +for inpname bind do finally) \TEDIT.GET.PARALOOKS.LIST2 (for from to collect) TEDIT.EDIT.OBJECT (type? + for inside do) BOOTSTRAP-NAMEFIELD (while do) DIGITSBDP (while do) SEDIT::INPUT-TOKENDELIM (type?) +\IFS.LOOKUPFILE (while do to when finally) \CLEANUPDISKQUEUE (repeatuntil) SEDIT::INSERT-LITATOM ( +type?) DINFO.UPDATE.HISTORY (for in as from to collect) %%NUMERIC-STRING-P (for instring do finally) +TTYINSTRING (for by until do as from) MMLTLIST (for in collect) READHOTSPOT (until when do finally) +ARGINFO-MUNG (for in join) \FM.WINDOWEXTENT (for in when do) SEDIT::SET-DEPTH (for in do) +XCL:SAVE-PROFILE (for on by do) \CREATEINTERPRESSFONT (for in bind when do) COMPARELISTS (for on do) +\MEDW.BURYW (for in do) \FM.MAKELINKS (for in do on by) \PAGED.FORCEOUTPUT (for inbufs when collect +while do bind finally) \NSRANDOM.WRITE.SEGMENT (for inside bind do repeatuntil) SEDIT::INSERT-LIST ( +type?) COMPILE-FILE? (for inside do finally) \BREAKAPARTATWSTRUCTURE (for in join) DASSEM.DSTOREFNDEF +(on by do for in as from bind) COPY.TEXT.TO.IMAGE (do) MSPATHOPTIONS (while collect) ICMLARRAY.INDICES + (bind for in do) COPYINSERT (for inside do) \STRINGIN (for from to do) SETUPFONTS.IP (for inside do) +GETDEFCURRENT (for on by when join) WHO-LINE-TTY-STATE (for from by bind while unless do) +REPOSITIONATTACHEDWINDOWS (for in do) \TEDIT.HCPYLOOKS.UPDATE (while do type?) COMPILER::FRAME-ANNOTATE-PROGN + (for in join) SETFONT.IP (for in when do finally) TTNEXTLINE (bind while do finally) MSMSGPRINT ( +while do) \FM.UPDATEGROUPEXTENT (for in do) \LEAF.RESENDPUPS (while do) SYSRECLOOK1 (for in when do) +SPY.SUM (for in sum) \FM.READUSERDATA (for on by do) \DSPTRANSLATE.PSC (for in do) +TB.FIND.PREVIOUS.TAIL (while do) \CHECKARRAYBLOCK (bind first do repeatuntil) SEDIT::SELECT-NEXT-GAP ( +while do finally) TEDIT.GETSYNTAX (type?) \LISP.TO.NSFILING.ATTRIBUTE (for in collect finally always +by while) ALLPATHS (for in when join) DRAWDASHEDLINE (bind for in collect while do finally) +\ALLOCBLOCK.OLD (for from to bind when do repeatuntil) \DSKCreateDevice (type?) SEDIT::OUTPUT-CR ( +type?) REFLECT/GRAPH/HORIZONTALLY (for in bind do) NS.ECHOUSER (do repeatuntil finally) +TWODINSPECT.REDISPLAY (for in join collect as thereis never bind do) TEDIT.SETSYNTAX (type?) +\ALLOCBLOCK.NEW (until do) MAXSTRINGWIDTH (bind for in do finally) READ-UNICODE-MAPPING (for in join) +FILENAMEFROMID (bind until do to collect) \NSFILING.GET/SETINFO (type?) \ALLOCHUNK (for in when +collect do repeatuntil) \EXTNORMALIZE (while do) SEND.FILE.TO.PRINTER (for on by when do inside) +NSNETDAYTIME0 (to when do) TOPW.REPAINTFN (for on as until finally in bind repeatuntil do) +\HANDLE.RAW.XIP (for in when do) REFLECT/GRAPH/VERTICALLY (for in bind do) CLISPEXPANSION (do) +SEDIT::HASFAT (for instring thereis) INIT-CML-READTABLES (for from to do) \BSP.HANDLE.DATA (while do +finally) FB.SORT.VERSIONS (while do until collect) PARSE-NAMESTRING1 (type?) CMLREADSEMI (until do) +\SENDLEAF (type? until do) \FTPERROR (type?) OPENIPSTREAM (type?) \TEDIT.PARSE.CHARLOOKS.LIST (type?) +\VFMMarkBufferDirty (for in thereis) FW-OPENP (for in bind do when) CHCON (for from to collect) +DECREASING.FONT.LIST (for in collect) DBG::FIND-DEBUGGER-STACK-FRAME (bind while do finally) +\SEARCHPRESSFONTS (bind for inside when do finally) \VFMCreateIntervals (type?) +TEDIT.HARDCOPY.PAGEHEADING (repeatuntil collect type?) COMPILER::FRAME-ANNOTATE-MV-CALL (for in join) +COMPILER::META-EVAL-TAGBODY (for in do) UNPACK (for from to collect) APPENDIDENTIFIER.IP (for instring + do) READ-AFM-FILE (repeatuntil do repeatwhile type? for from to) \TEDIT.WORDBOUND.READTABLE (for from + to do in) \FM.TRANSPOSEVERT (for in do) PARSE.NSNAME (type?) TCOMPL (for inside collect) +\VANILLADISKINIT (for from to do) CH.NAME.TO.STRING (type?) \FM.TRANSPOSEHORZ (for in do) +\BSP.HANDLE.ACK (while do) TTREADLIST (while collect) PPBUFS (for inbufs do finally) +GLOBAL-MACRO-FUNCTION (find in suchthat) EDITFROMFILE (for inside when collect in do unless) +TB.RENUMBER.TAIL (for in as from do) COMPILER::RELEASE-TAGBODY (for in do) \CHECKSUM (while do) +\PFReplaceString (for from to as instring do) PRETTYCOM (for on do in by unless join) +\UNVISIBLE.FLUSH.OPEN.STREAMS (for in bind when do) SCALE.FONT (for in when do finally) +DSPCLIPPINGREGION (type?) \DSPFONT.HDCPYDISPLAY (for from to do) \LOCATE.NSNET (for in when do finally +) DCHCON (for from to do) GRAPHEDITCOMMANDFN (type?) MB.CREATE.NWAYBUTTON (for in collect as do +largest from to sum) \SHADEBITS (until when do) \FLUSHNDBS (bind while do) SPY.NEXT.TREE (for in do +finally) PSCFONT.WRITEFONT (for from to do) \UNVISIBLE.PAGED.REVALIDATEFILELST (bind for in when do) +\CHECKFORSTORAGEFULL (while do) \INIT.POWERS.OF.TEN (for from to bind do) PFI.HANDLE.PUTPROPS (for in +when do finally) \LFOpenDevice (for in thereis) \GETREGIONTRACKWITHBOX (until do) \SETGROUPMIN (for in + largest finally do) \UFSCreateDevice (type?) \TEDIT.PARSE.PARALOOKS.LIST (type? for in collect) +FW-CLOSE-OLD-OFD-WINDOWS (for in do) DUNPACK (for from to do) \GETPRESSFONTNAMES (bind do for in as +always) \NSFILING.GETFILEINFO.FROM.PLIST (for in collect) SEDIT::INPUT-QUOTE (type?) +TEDIT.SKIP.SPECIALCOND (repeatuntil collect) COMPILER::FRAME-ANNOTATE-MV-PROG1 (for in join) +\FLUSH.PACKET.QUEUE (bind while do) MERGLIST (while do) DASSEM.DWRITEFN (for in as from do) +\BN.FROM.FIXP (type?) ALPHORDER (for from do) \TEDIT.GET.SINGLE.PARALOOKS (for from to collect) +GETEXPRESSIONFROMEVENTSPEC (while collect) BLOCK (type? for in do) CASEARRAY (for from to do) BKLINBUF + (for from while do) SEDIT::MAP-COMMENT-INDEX (bind for on do finally) \VFMSmartBLT (for from to do) +\VFMSaveBuffer (for inside when do) TRANSLATE.LOCF (repeatwhile) \FILING.ATTRIBUTE.TYPE.SEQUENCE (for +in collect) \NSFILING.RELEASE.BULKSTREAM (for in when do) FREEATTACHEDWINDOW (for in when do) +\UFSOpenFile (type?) \FILING.ATTRIBUTE.TYPE (for in do finally) CONCATCODES (for in as from do) +UNIQLIST (for in do) \FILEMAP-HASHOVERFLOW (for in bind do on as from) \SWAPDISKERROR (while do) +\ACCHARWIDTHLIST (for in bind collect) \INIT.ETHER.BUFFER.POOL (to do finally) PACKC (bind for from as + in do finally to by) RECFIELDLOOK (for in join) \LOOKUPFMAP (while do) \UFSSetFileInfo (type?) +\FTP.EOL.FROM.PLIST (for in when do finally) \TEDIT.UPDATE.SHOWSEL (for inside do as in) +\READACFONTBOXES (for from to collect) PRETTYDEFCOMS (for on do) \DL.FAULTINIT (bind do repeatuntil +repeatwhile) FIND-DEBUGGER-ENTRY-FRAME (bind do repeatwhile finally) \UFSWritePages (for inside as +from bind do) \SEQUIN.HANDLE.ACK (bind do) \ACCHARIMAGELIST (for in collect) DASSEM.DASSEM (for in +when do) OPENPOSTSCRIPTSTREAM (for in do) \10MB.LOADINPUTQ (bind while do finally) \GETFBB (for in do) + CH.ADD.GROUP.PROPERTY (for in collect) \UFSReadPages (for inside as from bind first sum) TEDIT.FIND ( +for in collect when) FILEPKG.MERGECHANGES (for in do finally when collect unless) \UFSTruncateFile (to + do) \BN.TIMES2 (for from to do) \ACCHARPOSLIST (bind first for from to collect) FW-CLOSEFN (for in +when do) \UFSGetFileInfo (type?) \BN.DIVIDE (for from to do) TTY.PROCESS (type? for in when do bind +while collect) \LFINITCASEARRAY (for from to do) D-ASSEM::TYPE-NAME-FROM-SIZE (for in when do finally) + \D01.FAULTINIT (for from to do finally) BRECOMPILE (for in when collect always join do) +\PFTransferFilePage (for from by as while do) FB.DELVER.FILES (for in bind do finally) COPYHASHITEM ( +type?) COMP.DELFIX (while do) TEXTSTREAMP (type?) OPT.JUMPTHRU (while do type?) +\FM.EDITSTART-SELECTEDFN (type?) \3MBFLUSH (while sum) \FAMILYCODE (bind do for from to always) +SEDIT::PLACE-CARET-AND-SELECTION (for from as by thereis type?) \LFRenameFile (type?) \LFDeleteFile ( +type?) FB.ANALYZE.PATTERN (do for) PLAYTUNE (for in do until) \BN.2TH (while do) SPY.MERGE (for in do +bind finally when) \TEDIT.SEARCH.CODETABLE (for from to do in as) \LEAF.STRIP.QUOTES (for by while +collect) \LITATOM.EATCHARS (for from to as do) \MEDW.SHRINKW (type?) \NSINIT (for in do) +\LEAF.REPAIR.BROKEN.PUP (type?) GETSYNTAX (type?) SPY.MAKEGRAPHNODES (for in when bind do finally) +EDITSHADE (do until bind finally) SEDIT::REVIVE-NODE (for in do) IN/ITEM? (for in when do) +\GTREADTABLE1 (type?) TTNTHLINE (for do) UnixShellQuote (while do) D-ASSEM::COPY-LAP-CODE (for in +collect) \TEDIT.HCPYFMTSPEC (for in collect) SCALE/GRAPH (for in collect) MAKEBITTABLE (type? for in +do from to) \GTTERMTABLE (type?) EXCHANGEXIPS (bind until do) \INSPECTW.COMMAND.HANDLER (until) +IRM.RESET (type?) \BLOCKDATAP (type?) \SEQUIN.FLUSH.RETRANSMIT (while do) \DOFORMATTING.HARDCOPY (bind + while do) COMP.EXPR (for in sum) D-ASSEM::EMIT-BYTE-LIST (for in do) ONEDINSPECT.SELECTITEM (for on +thereis in as) SET-PROFILE-INTERACTIVELY (for in bind collect) SEDIT::OUTLINE-SELECTION (bind while do + finally) DISPLAYSTREAMP (type?) \CHAIN.UP.RPT (for from to do) COURIER.READ.BULKDATA (type? bind join + repeatuntil) FB.CLOSE&EXPUNGE (find in suchthat) SPY.LEGEND (for in collect) \FM.EDIT-ITEM (do until) + TRACKW (until bind do) \SPP.DUPLICATE.REQUEST (bind for in thereis) FB.CHECK.NAME.LENGTH (for bind +when do) \NSFILING.ADDQUOTES (for instring bind do finally) \SHOW.ARRAY.FREELISTS (for from to do +repeatuntil by as in when) DETACHALLWINDOWS (for in do) SEDIT::INPUT-DOT (type?) MAKEDEFLIST (for in +bind do) \FM.EDIT-FINDNEXT (for in thereis) \M44DOEXTENDVMEMFILE (while do for from to) +\DEVICEFILE.EOSERROR (until do) HPRINT0 (for in collect) \BCPLSOUT.PRESS (for from to do) GETDEFCOM ( +for in join) COMPILER::FRAME-ANNOTATE-LABELS (for in join) \UFS.OPENP (for in bind thereis) +\TEDIT.UNPARSE.PARALOOKS.LIST (for in as do) COMPILER::FRAME-ANNOTATE-LAMBDA (for in join do) +COMPILER::META-EVAL-PROGN (for on do when collect) TEDIT.SETSEL (type?) EDITGRAPH2 (until do) +\LFGetFileInfo (type?) \FM.CHECKPROPS (for in do) \TEDIT.NSCHAR.RUN (for from to do) D-ASSEM::FETCH-HUNK + (find in suchthat) \PARSEARRAYSPACE1 (for repeatuntil do) SEDIT::RELINEARIZE-WHERE-NECESSARY (for in +bind when do while old thereis until) \SETUP.FFILEPOS (for from to do by bind repeatuntil as always) +COMP.NUMBERCALL (while do) \M44ACTONVMEMFILE (while bind do for from to) \LFTruncateFile (to do) +\SHOWSEL.HILIGHT (while until do) \LFCreateDirectories (type?) PSCFONT.READFONT (for from to do) +XTOUSTRING (for from while do) \MAKERECODEMAP (for in unless do finally) COMPILER::GENCODE-CALL (for +in do always) MENUTITLEFONT (type?) POSTINITARRAYS (for from to by do) SEDIT::PUNT-SET-SELECTION (for +from as by thereis) UnixTempFile (for from to thereis) RENUMBER.LINES (while do) +COMPILER::GENCODE-TAGBODY-INLINE (for in do when) TEXTOBJ (type?) TEDIT.SETFUNCTION (type?) +\TELERAIDSERVER (to when do) \TEDIT.GET.TERMSA.WIDTHS (for from to do) SPY.MAX (for in do) +\REMOVE-DECLS (for in do) \TELERAIDINIT (for in do) SEDIT::COPY-STRUCTURE-LIST (for in collect) +SETCOLORLV.IP (for from to by do) \TEDIT.FORMATTABS (for in when do) DEFAULT.INSPECTW.VALUECOMMANDFN ( +until type?) SEDIT::COPY-STRUCTURE-STRING (type?) \INTERPRETER1 (for in as from by do) +SEDIT::COLLECT-UNDO-BLOCK (for by while eachtime finally) TB.FIND.SELECTED.ITEM (find from to suchthat +) SHOW.PRESS (while do finally) TEDIT.MAPPIECES (for from while do) \INITBFS (do repeatuntil) +SEARCHPRETTYTYPELST (find in suchthat) TEDIT.PAGEFORMAT (type?) TEDIT.BUILD.PCTB (type? for in when do + bind while from to as finally by) \PFFetchString (for from to do) COMP.NUMERIC (while do) +OPT.XVARSCAN (for in do) MSCLOSEFILES (for in when do) ENABLEWHEELSCROLL (for in do) +\TEDIT.COPYINSERTFN (for inside do) READVARS (for in when do) BREAK (for in join) \FILLBUFFER (until +do while) DISPLAYNODELINKS (for in do) \TEDIT.PURGE.SPACES (bind while do) \STARTDISPLAY (for in do) +\MEDW.MOVEW (for in do) COURIERPROGRAM.PRETTYPRINT (while do) \BITMAPFROMTEXTURE (for from to do) +PPSPP (for by bind while do) SEDIT::COMPUTE-POINT-POSITION-LIST (type?) TEDIT.GETFUNCTION (type?) +READVISE (for in join) SETSYNTAX (type?) CHARWIDTH (type?) \TRANSLATE-CL%:LAMBDA (for in do) +ICMLARRAY.DISPLAYSLICE (for from to collect) DINFOGRAPH (type?) TB.MAP.SELECTED.ITEMS (until when do) +BRECOMPILE3 (for in when do thereis) PROMPTPRINT (for from to do) \CreateScreenBitMap (for from to do) + \FM.CHECKDESCRIPTION (for in do) PFI.HANDLE.DEFINEQ (for in do) \SETUP-COMPILED-CLOSURE-CALL (while +do type?) SEDIT::LINEAR-ITEM-WIDTH (type?) \PARSE.REMOTE.FILENAME (for on by do) \PRINTFMAP (for from +to by bind do) \CoerceToDisplayDevice (type?) \LEAF.USE.NEW.CONNECTION (while do for in when) +SPY.MERGEINFO (for in when do) \POSTSCRIPT.NSHASH (for in unless do) \MAPCHARTABLE (for from to do) +MAKEKEYLST (for in bind as from collect) \SPP.SYSPKT (while do) \FIXP.FROM.FLOATP (while do) +D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL (for in do) \VAMRecomputeFreePageCount (bind for from to +count) SEditicide (for in when do) InstallUnixPrinter (for inside do in when) TEDIT.PARSE.PAGEFRAMES1 +(type? for in collect) \TEDIT.READTABLE (for in as do) D-ASSEM::DIGEST-CODE (for on do) +\NSFILING.WHENCLOSED (for in bind thereis when do) BIGNUM.DEFPRINT (bind while do finally for in) +MAKEFILES (for in when do finally inside collect) \UFStoOtherRenameMess (for in finally do) +MSCHECKVARS1 (for in do) \BN.TH2D (for in bind do finally by repeatuntil) \IDATESCANTOKEN (while do +collect) \MAIKO.DO.MOVDS (for in do) FW-CLOSE-CMD (for in do) D-ASSEM::DIGEST-FUNCTION (for in do on) +FW-UPDATE-OFD-WINDOWS (for in do) \ATWGROUPSIZE (for in do) ICMLARRAY.ATTACHDISPLAY (for in do) +WFROMDS (for in thereis) \NSRANDOM.HANDLE.ERROR (for in when do) \TEXTSTREAM.FILENAME (type?) +READ-UNICODE-MAPPING-FILENAMES (for inside collect find in suchthat) \PROMPTWINDOW.OPENFN (for in bind + when do) DELFROMCOM (for in do when inside always) \FREESTACKBLOCK (until do type? while) +FB.UPDATE.COUNTERS (for in as when do) NESTED.SUBMENU.POS (for on when do) COMPILER::FRAME-ANNOTATE-CATCH + (for in do) ONEDINSPECT.REDISPLAY (for in collect as thereis never bind do) EDITDELETENODE (for in do +) D-ASSEM::STORE-DIGEST-INFO (for in as from by do) \BN.NZEROS (for from to collect) \VFMFind ( +repeatuntil do) \FTP.UNPACKFILENAME (for on by do) \SETUP-ENVIRONMENT-CALL (bind while do type?) +\IDLE.PROMPT.WATCHER (do) MAKEALISTCOMS (for in join inside collect bind when) PFI.HANDLE.DEFDEFINER ( +for in thereis) INSPECTABLEFIELDNAMES (for in when collect) TEDIT.INSERT.OBJECT (type?) +MAKEHVPRETTYCOMS (for in do) SEDIT::CREATE-COMMENT-WORD-NODES (bind first while do finally) +PRINTFILEPROP (for in when do) \DOCOMPRESSVMEM (while do) D-ASSEM::EASY-ENTRY-P (for in always) +TEDIT.MAPLINES (bind while do) \OUTDATE-STRING (for from to do) POLYSHADE.SCAN.IP (for in collect) +\DOFORMATTING (bind while do) \TEDIT.APPLY.PARALOOKS (while do type? for in collect) TYPESOF (for +inside when do find in suchthat while bind) BSP.PUTINTERRUPT (bind do) \LFReadPages (for inside as +from bind first sum) KNOTLOOP (for in do) PROCESSWORLD (for in do type? by while when collect) +SUBPRINT/ENDLINE (while do) COMP.USERFN (for in collect) \COERCEASCIITONSFONT (bind for from to unless + do when) ADD.PROCESS (for from to by do) CHANGEBACKGROUND (for in do) \POSITION.MENU.IMAGE (type?) +\FM.PUSHGROUP (for in do) PUTPROPS.PRETTYPRINT (while do) TRIM.BITMAP (for from to thereis by) +D-ASSEM::GENERATE-KEY (for on do) DISPLAYGRAPH (type? for in do) PFI.HANDLE.EVAL-WHEN (while do) +D-ASSEM::GENERATE-EASY-ENTRY (for in as from do) \MOVE.WINDOWS.ONTO.SCREEN (for in thereis unless do) +COMPILER::META-EVALUATE (until do) Inspecticide (for in when do) \TEXTDSPFONT (for in do) +\RELEASE.PROCESS (for in when do) D-ASSEM::GENERATE-HARD-ENTRY (for in as from do) +TB.REV.FIND.SELECTED.ITEM (find from to by suchthat) \NSFILING.GET.STREAM (find in suchthat) +PRETTYPRINT2 (for in thereis) \ADDLEAFSTRING (for from to do) BUFTAILP (do) \TEDIT.LINE.LIST (for +inside as when do) CHAT.SET.EMULATOR (for in when do) \BN.D2TH (while do) ECHOCHAR (for in do) +\LFSetFileInfo (type?) COMPILEFILES0 (for on first do) PUTWINDOWPROP (type?) OPENWINDOWS (for in join +while do) GETFILEPKGTYPE (for in collect do bind) \ICONW.FORMAT.TITLE (for from as in do) ACCESSDEF4 ( +for in join) KEYWORD-TEST (for on by do) \STRINGOUT (for instring as from to do) MARGINBAR (for in do) + SEDIT::INPUT-NORMAL-CHAR (type?) \FM.REDISPLAYMENU (for in do) \TEDIT.FIXSELS (for in when do) +SEDIT::CFV-LIST (for on when do while) SUBDECLARATIONS (for in collect) PRINTLINE (bind for from to do +) ICMLARRAY.MENUW.SHOW (bind for from to as in do) \FM.JUSTIFYGROUPS (for in do) SEDIT::SHIFT-STRING ( +to do) IOCBQLENGTH (while sum) \HANDLE.RAW.PACKET (find in bind suchthat) APPLY* (for from to collect) + INVERT.BITMAP.VERTICALLY (for from to do bind) LINEBUFFER-SKIPSEPRS (until do) \DL.NEWFAULTINIT (do +for from to as by until bind) TTGIVEHELP1 (for on unless do) SEDIT::BUILD-PRELINEARIZED-NODE (bind +while do finally) CHAT.MENU (for in collect) \LFWritePages (for inside as from bind do) +\TEDIT.PARABOUNDS (repeatwhile do bind) SEDIT::CREATE-COMMAND-TABLE (for in do) COMP.PROGLST (while do +) PRETTYDEFMACROS (for in collect) FW-RECALL-CMD (for in when collect) FW-CHANGE-POSITION (for in when + do) \UFSSetFileType (for in bind finally do) ITEMW.REPAINTFN (for in bind do) ICMLARRAY.MENUW.APPLY ( +for from to collect in count) PRINTERROR (for inside do on in) TEDIT.GET (for inside do in as type?) +SEDIT::UNDO-COMMENT-CHANGE (for in as from do finally) SEDIT::START-PROCESS (until) ADDTOCOM (for +inside always in) \UPDATE-WHO-LINE-ACTIVE-FLAG (for in thereis finally) \TEXTMENU.DOC.CREATE (bind for + in do) COMPILER::FRAME-ANNOTATE-BLOCK (for in do) POSTSCRIPT.FONTSAVAILABLE (for in collect when join + unless from to) \BACKGROUND.PROCESS (for in do) MSCHECKBLOCKBASIC (for in do when thereis join +collect) ALISTP (for in always) RECORDTRAN (while do for in collect) \IDLE.ISMEMBER (for in thereis) +PFI.HANDLE.DECLARE (do repeatwhile) DISPLAY/NUMBER/READER/TOTAL (bind for from to do finally) +D-ASSEM::REDUCE-UNCERTAINTY (for in do) \BN.TH2B (while do) HASHLINKS (for in bind when collect) +\LFOpenFile (type?) \FM.LAYOUTGRID (for on bind do in) D-ASSEM::SPLICE-IN-JUMPS (for in do) +COMP.LABELS (for in do when) ACCESSDEF (for in join) BRECOMPILE1 (for in when do thereis) SENDXIP ( +until do) \LFExtendFileIfNecessary (until do) INTERPRESSFILEP (for from to when do finally) +\TEDIT.BASICFIND (for old from to do as) \IRM.GET.REF (for in thereis join) TB.FIND.ITEM (when do +repeatuntil) TWOD.TRACKCURSOR (bind while do finally for on as in until) D-ASSEM::RESOLVE-JUMPS (for +in do while when) TIMEALL (for inside bind join) TEDIT.DEACTIVATE.WINDOW (for in do type? when) +\REQUEUE.ETHERPACKET (type?) GETCLEARINGHOUSE (repeatuntil) PROG (for in do) \TEST.PARAGRAPH.LOOKS ( +while do) \PARSE.PORTCONSTANT (for instring bind do finally) \ORIGTERMTABLE (for in do from to) +COMPILER::ENSURE-EFFECT-CONTEXT (for in as from do) OPT.POSTOPT (while bind do finally for in) +D-ASSEM::CONVERT-TO-BINARY (for in as from do) \PROG0 (for in as from by do) PAINTW.CACHE.SHADE (for +in when do) PFI.HANDLE.RPAQQ (for in unless do) \INTERPRET-ARGUMENTS (for from while collect) +D-ASSEM::COMPUTE-JUMP-SIZE (find in suchthat finally) FINDFILE-WITH-EXTENSIONS (for on by do in when +inside) INSPECT/ALIST (for in collect) \VAMFreePageGroup (to as from do) SEDIT::ASSIGN-FORMAT-QUOTE ( +type?) D-ASSEM::PRETTY-JUMPS (for in collect) GREETFILENAME (while until finally for in when do) +COMPILER::FRAME-ANNOTATE-CALL (for in join) \SET.PROCESS.NAME (for from bind while) \NSFILING.EVENTFN +(for in when do) ICMLARRAY.MENUW.GETLEVEL (for from to collect) COURIER.WRITE.BULKDATA (do repeatwhile + to) SPP.OPEN (until do bind for on by) TEDIT.MINIMAL.WINDOW.SETUP (for in as join) CreateCursorBitMap + (for from to do) INVERT.BITMAP.HORIZONTALLY (for from to do bind) \SMASHRETURN (for when do +repeatuntil) DRAWMARGINSCALE (for from by to do as) MSCHECKBOUNDFREE (for in do when) \IRM.SMART.REF ( +while bind when do finally for on collect) \LOOKUPPORT (to when do finally from as by collect) +BRKDWNINIT (for from to do) CL:DIRECTORY (while collect) \POLYSHADE.YSCAN.IP (while do for in) EVALA ( +for in do) POSTSCRIPT.PUTBITMAPBYTES (for from to by as do while count) VKBD.FIX.FONT (for in do) +\NSFILING.REMOVEQUOTES (bind while collect) \EVALA (for in as from by do) TB.DISPLAY.LINES (for from +to bind do finally) ALLFIELDS (for in when join) CHECKCONSPAGES (for do) INVERT.LONG.SEGMENT (while do +) LATTICE/BREAK/CYCLES (for on bind do) CONVERT.FILE.TO.TYPE.FOR.PRINTER (for in bind when do) +\LOADNSHOSTNUMBER (type?) \MAPMDS (for from to bind do by) SEEFILE (for from to do) \SUBREAD ( +repeatwhile bind do) \DL.MARK.PAGES.UNAVAILABLE (for from to as by do) DASSEM.CLEANFNTEST (while do +finally) CL:ENCODE-UNIVERSAL-TIME (for from to by unless do) \CLEARWORDS (while do) +SI::PRINT-TRACE-EXIT-INFO (for in do) FTP.BREAKCONNECTION (for in do collect when) \PS.BOUTFIXP (for +old by do repeatwhile in) UPPERCASEARRAY (for from to do) \TEXTMENU.SET.TOGGLE (for inside do) +\DL.UNMAPPAGES (for from to as by when do) COMPILER::GENCODE-PROGN (for on do) \ETHEREVENTFN (for by +while do in) \TEDIT.FIND.FIRST.LINE (for old from to by repeatwhile do) COMPILER::EXPAND-OPENLAMBDA-CALL + (while do) SEDIT::ASSIGN-FORMAT-LIST (for on when do while) TITLEDICONW (for in largest) +COMP.UBFLOAT2 (while do) OPT.OPTCHECK (for in do) HARDCOPYGRAPH (type? for from to do in) LOADUP (for +in do) SEDIT::SIMPLE-STRING-SCAN (bind first while do finally) \TEST.CHARACTER.LOOKS (while do) +MSCHECKFNINBLOCK (for in do thereis) MSUPDATE (for in do) SEDIT::FIND-NODE (bind while do finally) +\PRINSTRING (for instring count do) \DO.PROGV (for in do) DEL.PROCESS (type?) DOFILESLOAD (for inside +bind first join while do) COMP.BIND.VARS (for in do) COMP.TAGBODY (for in do) FIND.MATCHING.QUOTE ( +while do) \UFS.ABORT.DIRECTORY (bind for in do type?) LET (for in do) FIND-EDIT-LOCATION (while do) +FB.HARDCOPY.DIRECTORY (for in unless do as from bind collect sum) %%BROADCAST-STREAM-DEVICE-BOUT (for +in do) \CKPOSSOUT (for instring do) COMPILER::COMPLETELY-EXPAND (until do finally) GRAPHOBJ.PUTALIGN ( +for from as in when do) SHOWSTACKBLOCKS (while do type?) SUBFIELDCREATE (for in when collect) PROCESSP + (type?) \UFS.ABORT.CL-DIRECTORY (type?) \AB.BACK (type?) TTRACKMOUSE (bind while do finally) \LET0 ( +for in as from by do) \LITPRIN (for inatom bind do) MAP.PROCESSES (for in do unless) MIN/BOTTOM (for +in smallest finally) \LET* (for in as from by do) SKIPSEPRCODES (bind declare while do finally) +RELPROCESSP (type?) %%BROADCAST-STREAM-DEVICE-CHARSETFN (for in do) \LFGenerateFiles (for instring +until collect in when while do) \FM.LAYOUTCOLUMN (for in do) LET* (for in do) \SIMPLIFY.CL.ARGLIST ( +bind for in collect) \FM.LAYOUTROW (for in do) SEDIT::FIND-LINE-START (bind first do) +\DSKDISPLAY.REPAINTFN (for in do) %%CONCATENATED-STREAM-DEVICE-BIN (while do finally) +%%BROADCAST-STREAM-DEVICE-OUTCHARFN (for in do) COMP.RETURN-FROM (until do) MSUPDATEFN1 (for in when +do) PUTSTREAMPROP (for on by when do) \SEQUIN.RETRANSMIT (while do) MAKEFILE (for in do on) +LAYOUTGRAPH (for in unless do type?) INSPECT/TOP/LEVEL/LIST (for from to as on collect finally) +SPP.DESTADDRESS (type?) \DSPCLIPPINGREGION.PRESS (type?) RESTART.PROCESS (type?) +\UFSMakeUnixFormatName (for from to do) %%BROADCAST-STREAM-DEVICE-FORCEOUTPUT (for in do) +TB.RECONSIDERRANGE (for from to bind do) INSTALL-PROTOTYPE-DEFN (for in collect) \LFReturnInfo (for in + as do) %%CONCATENATED-STREAM-DEVICE-PEEKBIN (while do finally) \NSRANDOM.FETCH.CACHE (while when do) +\LFEventFn (for in when do) INFILEPAIRS (for in do inside) INVERT.BITMAP.DIAGONALLY (for from to do) +WAKE.PROCESS (type?) INFILECOMSMACRO (for inside do) CL:MAKE-CONCATENATED-STREAM (for in always when +do) TB.REPLACE.ITEMS (for in do count) \SUSPEND.PROCESS (do) %%CONCATENATED-STREAM-DEVICE-CLOSEFILE ( +for in do) CL::BOA-ARG-LIST-WITH-INITIAL-VALUES (for on do) TEDITMENU.STREAM (for in thereis) +\FM.FORMATEXPLICIT (for in do) SUSPEND.PROCESS (type?) CHECKFORCHANGED (for in do) +%%CONCATENATED-STREAM-DEVICE-EOFP (while do finally) SEDIT::NEXT-NODE (first do repeatwhile) +COMP.BINDLIST (for in collect) ENDLOADUP (for in do when) PROCESS.RESULT (bind until do finally) +SHOULD-BE-DWIMIFIED? (for in while do finally) ROTATE.BITMAP.LEFT (for from to do bind) +COMPILER::RELEASE-LABELS (for in do) \LITPRIN.INTERNAL (for inatom do bind) ROTATE.BITMAP.RIGHT (for +from to do bind) TEDIT.KILL (type?) \TEDIT.HARDCOPY.DISPLAYLINE (while do bind for from to finally) +CREATEW1 (type?) \GETFILINGCONNECTION (bind while do finally) \SPPWATCHER (bind until do) +MAKEHASHLINKS (for in when collect) \VFMSplit1 (repeatuntil do) LISPX (for in do) STREAMP (type?) +DUMPGRAPH (for in do type?) CL:PARSE-INTEGER (while do repeatwhile) PFI.ESTIMATE.SIZE1 (until do) +COMPILER::META-EVAL-CALL (for in collect) \MKINTEGER (while do) \NSRANDOM.READ.SEGMENT (for inside as +from sum do to in) PRIN2-LONG-STRING (type? for instring as from bind do finally while) +\NSRANDOM.PREPARE.CACHE (for from to collect while when do finally bind) \FM.FORMATBYGRID (for in do +as finally) \FUNCT1 (for in as from by do) INSPECT/PLIST (for in by collect) COMP.LOOKFORDECLARE ( +while do for in bind finally) \LFFindNextFile (bind do repeatuntil finally to collect) +\DRAWPOLYGON.GENERIC (bind for on while do finally) TERM.MODIFY.ATTRIBUTES (for inside do) CMLRDTBL ( +for from to do) \TRACKCURSOR (do repeatuntil) PROCESS-STATUS (do) KNOTLINE (for in do) MENU.HANDLER ( +until do finally) FOREST/BREAK/CYCLES (for on do) TB.CONSIDERRANGE (for from to bind do) +\SYMBOL.ESCAPE.COUNT (for inatom bind first do finally) NCHARS (for instring bind count) +\MAKEFUNARGFRAME (for in do) \TEDIT.BRAVOFILE? (repeatuntil) RIGHTW.REPAINTFN (for on as until finally + in bind repeatuntil do) COMPILER::RELEASE-LAMBDA (for in do) MSCHECKBLOCKS (for in do join unless +collect thereis) INIT/NODES/FOR/LAYOUT (for in do) \DOBUFFEREDTRANSITIONS (bind until do) +\NUMERIC.PNAMEP (for inpname do finally always) DECLARED-SPECIAL (for in when do) PROCESS.TTY (type?) +SEDIT::GET-CONTEXT (bind for in when do finally type?) TWODINSPECT.MAKEREGIONS (for from to as by +collect bind in) \TEDIT.CREATE.LINECACHE (for from to collect on do) FILEPKGCOM (for in when join from + to by do) \SOUT (for instring do) SI::UNWIND (for until do) MSCHECKBLOCK (for in do unless when +collect thereis repeatuntil) COMP.TOPLEVEL.COMPILE (for in when collect unless) CL:APPLY (for from to +by do) FRESHLINE (type?) \AB.NEXT (type?) TEDIT.COPY (bind for in when do) BRACKET.CURRENT.WORD (for +by until do finally) SEDIT::SET-SELECTION-COMMENT (type?) \PFTrimHelper (bind until do) +\TEXTBACKFILEPTR (while do) READTABLEP (type?) \STORENSHOSTNUMBER (type?) \CURVE (for from to do) +\POLYSHADE.XSCAN.IP (for in collect while do) \CARET.DOWN (type? while) IMAPLIST (while do) ADDCHAR ( +for in do) POSTSCRIPT.INIT (for in join collect do from to unless) READGRAPH (bind do for on by to +while collect in) READOCT (bind while do finally) MIN/LEFT (for in smallest finally) WINDOWP (type?) +FB.SUBITEMP (for in thereis) CLOSE.WINDOWS.IN.REGION (for in do) \SMASHSTRING (bind for inthinstring +as from to do infatstring) CL:COMPILER-LET (for in collect) \NSFILING.LOOKUP.CACHE (find old in bind +suchthat for always) \VAROFFSET (for from by bind until do) CONCATLIST (for in sum as from by do) +BREAK0 (for in join) \NSFILING.UPDATE.ATTRIBUTES (for in collect unless) \ATBLSET (initrecord for from + to do) \NSRANDOM.CHECK.CACHE (for in bind do) \AUTHENTICATION.FIND.SERVER (find in suchthat) +\NSFILING.LOGIN (when do) FW-REPAINTFN (for in when do) SI::COMPILED-FUNCTION-ARGLIST (for in join) +NSMAP (for from to do in) COMP.COMPILER-LET (for in collect) IFCEXPRTYPE (for in when do) +FB.COMMANDSELECTEDFN (for in thereis) DOUSERFNS2 (for in do) READ/NODE (bind until) APPEND (bind while + do finally) CALLS (for on do) MSINIT (for in collect finally) COMP.PROGN (while do) +\TEDIT.PUT.SINGLE.CHARLOOKS (type?) TEDIT.WINDOW.SETUP (type?) RECORDFIELD? (for in when do) \IPCURVE2 + (for from to do until) LISPERROR (for in as from when do) INTERSECTREGIONS (for from thru do) +\SETUP.TYPENUM.TABLE (for from to bind do finally old as in when) SI::CLEAN-UP-CL-ARGLIST (bind for in + collect) SEDIT::SET-POINT-COMMENT (type?) INSPECT (for in when do) OPT.DS1 (never repeatwhile) +\SELECTREALPAGE (until do finally) TWODINSPECT.ADJUSTSELECTION (for in as on thereis) \10MBENCAPSULATE + (type?) TEDIT.INSERT.UPDATESCREEN (for inside as on do while) TB.CONTIGUOUS.SELP (for from to bind +always) MSGETDEF (for in bind when do finally) \FTP.GENERATEFILES (for on by do in collect) +\UPDATECHAIN (do repeatuntil) \FTP.CLOSEFILE (find in suchthat) SEDIT::ATOM-POINT-TYPE (for instring +as to bind do finally) \MAIKO.DISPLAYLINE (bind for from to do finally while) \LEAF.FIX.BROKEN.SEQUIN +(for in collect when forDuration do until type?) TEXTSTREAM (type?) \LFParseFileName (for on by do in +when collect) \FM.FORMATBYCOLUMN (for in do) PROCESS.WINDOW (type?) \PFI.DO.HARDCOPY (while bind do +finally) SEDIT::KILL-NODE (for in do) Filebrowsericide (for in when do) COMP.PROG (for in collect do +while) ONED.TRACKCURSOR (bind while do finally for on as in until) \INSTALL.EXTERNALFORMAT (type?) +COMPILER::GENCODE-LET (for in as do when) PFI.MERGE.INDICES (while collect) \NSADDRESS.PRINT.DECIMAL ( +while bind do finally) FB.INFO.ITEM.NAMED (for in when do) DUMMYDEF (for in when do) +\TEDIT.PUT.PARALOOKS.LIST (for from as in do) COMPILER::ALPHA-TAGBODY (for in do) VERBNOTICELIST ( +type?) STORETABLE (for in do) \IDLE.WAIT (while do) COMPILER::FIND-TAG-DUPLICATION (for on eachtime do +) GETVERBTABLES (for in collect) GET.MENU.LIST (for in always) SI::PARSE-CL-ARGLIST (for in do) +INITIALIZEMASTER.IP (for from do) INSPECTW.CREATE (for in collect bind largest finally) SCREENBITMAP ( +type?) BESTPUPADDRESS (for from to bind do finally in) IFCPROPSCAN (for in when unless do by collect +inside) \NSFILING.DISCARD.SESSION (for in bind do finally) \COURIER.EXPEDITED.ARGS (for in as do) +CREATE.NUMBERPAD.READER (for in do) BACKSKREAD (do) DECLARERECORD (for in do unless when) +SEDIT::ASSIGN-FORMAT-LITATOM (type?) \FM.STATE-SELECTEDFN (type?) GRAPHREGION (for in do) +\LEAF.HANDLE.INPUT (type?) DISMISS (do until) SI::CHANGE-CALLS-IN-CCODE (for in do) \FM.FORMATBYROW ( +for in do) TB.NUMBER.OF.ITEMS (for from to count) SEDIT::INSERT-CHANGED (bind while do finally) +COMP.LAMBDA (while do for in) MAKECREATELST1 (to collect) REGIONP (type?) +\GET.EXTERNALFORMAT.FROM.NAME (find in suchthat) OPENNSOCKET (type? for in when do) +\NSFILING.MAYBE.CREATE (for in join on collect while finally) DO.SHIFTED.SELECTION (bind while do +finally) DOUSERFNS (for in when do) PAINTW.READBRUSHSHADE (for in collect) +DEFAULT.INSPECTW.PROPCOMMANDFN (type?) FONTCREATE (type?) DINFO.CLOSEFN (type?) \INSERTCH (type? for +instring thereis) SEDIT::CONVERT-COMMENT-TAIL (while bind do) \NSFILING.ADD.TO.CACHE (find in suchthat + while do for when) \INTERPRETER (for in do from to collect) OPT.DELCOPYFN (while do for by always) +MAX/RIGHT (for in largest finally) \SEND.EXPEDITED.XIP (bind to do finally until when) +\TEDIT.CHARDELETE (while do) SEDIT::PARSE-STRING-INTO-WORDS (bind first while do finally) +\WAITFORSYSBUFP (until do) \FTP.ADD.QUOTES (bind while do finally) \INTERNAL/SETPASSWORD (for in do) +\DOTRANSITIONS (for from to do) NEXTSIZEFONT (for on when do in) \POLYSHADE.DISPLAY (for in collect +while do) DOAROUNDEXITFORMS (for in do) MOVETOUPPERLEFT (type?) SEDIT::DRAW-UNDERLINE (until do) +VIRGINFN (for in do) PROCESS.EVAL (type? do until) SEDIT::REPAINT (bind first while do type?) +SEDIT::INITIALIZE (for in do) \LFHighestVersions (for on when collect type?) \LET*-RECURSION (bind for + on eachtime do finally) \ALLOCWIDTHTOGROUPEDWINDOW (for in collect when sum as unless do until) +\PRINTFRAME (for old from by while as do) ONFILE (for in collect inside do find suchthat finally) +FB.FASTSEECOMMAND (for in thereis on do) TEDIT.FORMATTEDFILEP (while do) SAVEONSYSRECLST (for in do +collect unless) TTYIN (for inside do) \LFFindInfo (bind for in do) INFILECOMSPROP (find in suchthat) +\PRINTBF (bind for from by as to do finally while) \TEDIT.HARDCOPY.FORMATLINE (while do type? for old +from to as when) MAX/TOP (for in largest finally) TB.DECONSIDERRANGE (for from to do) MAKEINITBFS (to +bind first do finally for from) EDITCALLERS (for in do collect while thereis) \ENCRYPT.PWD (for from +do) WAITFORINPUT (bind until do) \GCMAPTABLE (bind for from to when do) FB.BROWSECOMMAND (for in bind +do on by finally) OPT.RESOLVEJUMPS (for in do while) COMPILER::ALPHA-SETQ (for on by collect) +\TEDIT.PUT.CHARLOOKS.LIST (for from as in do) COMPILER::FIND-SEGMENT (for in when do) \LEAF.RECONNECT +(type?) TTYIN.READ (while do bind collect) TTPRIN1 (for from while sum do) \SCANFORNTENTRY (bind for +from by as do) SEDIT::COPY-SELECTION-DEFAULT (bind for from to as on do) BRV/OFFSET (for in do) +\CREATECHARSET.IP (bind first do for from to when) CH.NUMBER.TO.PROPERTY (for in thereis) PRINTADDRS ( +for from to do repeatwhile) FB.GETALLFILEINFO (for in bind collect) PP (for in do) +MB.NWAYBUTTON.ADDITEM (for in collect as do largest sum) \REMOVE.EXTERNALFORMAT (type? find in +suchthat) COURIER.SKIP.SEQUENCE (to do) \COMPUTE.HUNK.TYPEDECLS (for from by to collect) +\TEDIT.PIECE-CHNO (while do for from by sum) PRINTFILETYPE (for in when do) TTYIN.FINISH (bind while +do for inside in when on finally) DEFAULT.INSPECTW.TITLECOMMANDFN (type?) PRINTHISTORY1 (for in do) +LOOKUP.NS.SERVER (find old in suchthat for do) SEDIT::CONVERT-COMMENT (bind while do) DCODERD (on by +do for as from bind) \TFBRAVO.FIND.LAST.TRAILER (while do) MSPRGLST (for in do) SI::RESTORE-CALLS (for + in do) TERM.TAB (for in thereis) ESPATTERN (for on do) LIST* (bind for from by until do finally) +\FAX.PARSE.NAME (for instring always) \NSPRINT.MEDIUM.CHECK (for in when do finally) FB.ADD.FILEGROUP +(for in do collect) RECORDFIELDNAMES (for in do collect) \DRAWCURVE.IP (type?) CL:MAKE-BROADCAST-STREAM + (for in always when do) \DEFINEDEVICE (type?) CREATEARRAYSLICE (bind for in do finally as) +MSINTERPRET (for in thereis do on bind finally) FB.HARDCOPY.TOFILE (for on by bind do finally in when) + \TEXTEOFP (bind while do finally) PARSERELATION (for in collect) MSPRGLAMBDA (bind while do finally) +U-CASE (for inatom as from do finally instring first) \NOIMAGE.DSPFONT (type?) MAXMENUITEMWIDTH (for +in bind do finally) \VFMMerge1 (while do) IFCPROPS (for in do inside) CHANGENAME1A (find in suchthat) +\LETtran (for in as do) \LINEWITHBRUSH (until do) \TFBRAVO.READ.PARALOOKS (while do) \PUPINIT (for in +bind unless do) \VALID.FILING.CONNECTIONP (for in thereis) \ALLOCHEIGHTTOGROUPEDWINDOW (for in collect + when sum as unless do until) FW-AFTERMOVEFN (for in when bind do) \PFFindRootDirEntryNum (bind for +from to thereis) CHECKPATHS (for in when do) TRAJECTORY.IP (for in do) PROCESS.APPLY (type? do until) +FONTCLASS (for in collect inside do) TTSKREAD (bind while do finally) SETINITIALS (find old in +suchthat) \NSFILING.CONNECT (for in join) SCANFORWARD (while do) PROMPTFORWORD (bind for from to do +finally in unless until) \TEDIT.TABTYPE.SET (type?) \LEAF.WHENCLOSED (while do) FW-INIT-PROPS (for +inside join) \GETDEVICEFROMHOSTNAME (for in when do type?) RAIDSTACKCMD (type?) +RECURSIVE.COLLECTDESCENDENTS (for in bind when join) \FTP.GETFILEINFO (type?) +\TEDIT.FIND.OVERLAPPING.LINE (while do) PROVIDE.PROMPTING.WINDOW (until do) COLLECT.CHILD.NODES (bind +for in collect) BROWSE/LAYOUT/LATTICE (for in bind do) MOVEDESCENDENTS (bind for in eachtime unless do +) PUTSEQUIN (until do finally) \FLOATTOBYTE.UFN (for from to do) EQCLOOKS (type?) +\TFBRAVO.READ.CHARLOOKS (while do) \REMOVEDEVICE (while do find in suchthat) \FTP.DELETEFILE (for in +do) TEDIT.REMOVE.MENUITEM (for in do) INITDATATYPENAMES (for in as from do) \GET-COMPILED-DEFINITION ( +type?) RINGBELLS (to do) \BLKFABSMAX.UFN (for from to do) UNADVISE (for in join) \REMOVEDEVICE.NAMES ( +for on bind when do finally) \TFBRAVO.PARSE.PARA (while do) \BLKFABSMIN.UFN (for from to do) +\CURSORDESTINATION (do repeatuntil) PFI.DEFAULT.HANDLER (for in when do) STRINGWIDTH (type?) +\CCODEARGLIST (for in unless collect from to) READHASHMACRO (while do collect) \UNQUEUE.EVENT (while +do) \BLKFMIN.UFN (for from to do) TERM.SMOOTHSCROLL (for from to do) FNCHECK (for in thereis inside +find suchthat) \SHIFT.DOCUMENT (while do for in collect) \FTP.MAKEPLIST (for inside collect) +\BLKSMALLP2FLOAT.UFN (for from to do) SEDIT::STRING-OFFSET (for from to bind first do finally) +\TEDIT.SET-TOTLEN (for from to as by sum) \PFGetLVPage (for in thereis) FB.MAYBE.WIDEN.NAMES (for in +when do) \BLKFLOATP2COMP.UFN (for from to do) HELPSYS (for in thereis) BYTEBLOCKCOMPILE2 (for in when +collect) \PFVersionOK (for in always) \LEAF.GETFILEINFO (type?) UNIX.SETDISPLAYTYPE (until do) +DASHINGP (for in always) \CCODEIVARSCAN (bind for from by while do finally to) TB.MAKE.BROWSER (for on + by do in finally) YMAPLIST (while do for in) \SPP.HANDLE.DATA (do while) COMPILER::ALPHA-PROGN (for +on collect) \TFBRAVO.WRITE.RUNS (for in old do) \BLKMAG.UFN (bind declare for from to do) SETUPPAGEMAP + (for from to do bind) \WWCHANGESCREENSIZE (for in do) CHAT (do) INSPECT/ARRAY (for from to collect) +CL:RETURN-FROM (while do finally) DOICONWINDOWCOM (type?) POSTSCRIPT.FONTCREATE (for from to do) +ESTIMATE-DIMENSIONALITY (to as by collect) \HARDCURSORPOSITION (do repeatuntil) \MAKE.ITEMS.VERT.ORDER + (for to collect do in join) \DEVICEEVENT (for in do unless) SPY.FIND.TREE (find in suchthat) +MAXMENUITEMHEIGHT (for in do) INITATOMS (for from to when do) \BLKEXPONENT.UFN (for from to do) +\DRAWCURVE.HCPYMODE (for in collect) CL:PEEK-CHAR (until do finally) DELFROMFILES (for inside when +collect in do) INSPECT/BITMAP (type?) \BLKFDIFF.UFN (for from to by do) ONEDINSPECT.MAKEREGIONS (for +from to as by collect) FB.ADJUST.DATE.WIDTH (for on as from while bind when do finally) CONSTANTS (for + in do) \SOFTCURSORUP (type?) \LFVersions (bind first do) \BLKPERM.UFN (for from to do) FILES? (for in + when do bind finally) \SOFTCURSORUPCURRENT (until do) EXCHANGEPUPS (bind do repeatuntil) +RELEASE.MONITORLOCK (do) INFILECOM (for in do when) \BLKFPLUS.UFN (for from to by do) \BLKFMAX.UFN ( +for from to do) GRID (for from to by do) \VFMClearIntervals (for from to do) DINFO.READ.KOTO.GRAPH ( +for in as from to do) SEARCH-FOR-EVENT-NUMBER (while do) \TEDIT.WORDDELETE (for old from to by while +do) PURGENSFONTS (for in bind collect when unless) COURIER.SKIP (bind to do for in) INFILECOMSVALS ( +for in when do) \BLKFTIMES.UFN (for from to by do) DOATTACHEDWINDOWCOM (type?) TB.DO.ITEM.SELECTION ( +do for from to) COMPILER::ENV-ANALYZE-TAGBODY (for in do) \BLKSEP.UFN (for from to by bind do) +SI::MONITOR-UNWIND (do) FB.HARDCOPYCOMMAND (for in do) GETMACROPROP (for in bind do) CALLSCCODE (for +from by as until do to type?) COMPILER::EXPAND-NESTED-PROGNS (for in join) UNIONREGIONS (for from thru + do) PRINTCURSOR (type?) COURIER.READ (bind for in do finally to collect) PRINTPUPQUEUE (do +repeatwhile) TEDIT.FORMATTEXTBOX (for in collect while do as on) \PUT.FILING.ATTRIBUTE (for in when do + finally) \SUBFNDEF (find from to suchthat) INSPECT/ATOM (type?) MSPRGTEMPLATE1 (for inside do while +bind finally) MAPHASHFILE (bind to as from by when do) DEFAULT.BACKGROUND.COPYFN (type?) +\NSFILING.OPENFILE (type? for in do) SCANBACK (for by until do finally) SEDIT::LINEARIZE-COMMENT (bind + for in do) IRM.LOOKUP (type?) \LEAF.IDLE (for in thereis) \SPP.RELEASE.ACKED.PACKETS (bind while do) +\DSPFONT.PSC (type?) VRULE.DISPLAYFN (bind for inside do) MSPRGRECORD (while do for in on when collect + inside) BREAK.NSFILING.CONNECTION (for in when collect) IBLT1 (for from to by do) PARSE-NSADDRESS ( +for instring do finally) ONEDINSPECT.ADJUSTSELECTION (for in as on thereis) CL:VALUES (for from to +collect) FB.HEADINGW.DISPLAY (for in until do) TEDIT.FLASHCARET (bind for inside do) +TOPW.ADJUSTSELECTION (for in as on thereis) IBLT2 (for from to by do) \PROCESS.RELEASE.LOCKS (while do +) \PROMPTFORWORDRETYPE (for in do) \SIMULATE.UNBIND (to do repeatuntil finally) CHAT.OPTIONMENU (type? +) COMP.SPREAD (while do for in) SEDIT::BACKSPACE (type?) OPENPRSTREAM (type?) DOBACKGROUNDCOM (type?) +MULTIFILEINDEX1 (for on as from do) \LOADNSADDRESS (type?) COPIEDFILEMATCH (find on suchthat) +FM.CHANGELABEL (type?) PACKFILENAME (for on by do) SEDIT::PRINT-STRING (bind for instring first do +finally) READPAGEMAP (for from to as by do) PRINTPACKETQUEUE (for by while do type?) DELETEMENU (type? +) TEDIT.FORMATFOLIO (for in collect while) REBREAK (for in join) \RELEASEWORKINGSET (for from to bind +when do) \PROCESS.MOVEFRAME (type?) \MATCHPCS (bind for from to by as do type?) UPDATE/MENU/IMAGE ( +type? for in when do) OPENHASHFILE (for in thereis finally type?) \TEDIT.UNPARSE.CHARLOOKS.LIST (for +in as do) \FLUSHVM (for in do) CL::VALUES-UFN (for from to by collect) SEDIT::INSERT-COMMENT-CHARS ( +for old on bind do finally while) GETRELATION (for in do) SORT.NSADDRESSES.BY.DISTANCE (for in do +always) OPT.DELCODE (for in when do) \10MBSENDPACKET (for in bind when do finally) FILL.CONT (for from + to do) \LEAF.OPENFILE (type? for in do) \OPENFILE (type?) CHARCODE.DECODE (for in when do finally +first) \SPP.HANDLE.ATTN (for in thereis) \DO.PARAMS.AT.OPEN (for in do) STRPOSL (type?) \CLEARSYSBUF ( +for in do) SET-SYMBOL (while do) PRETTY-TYPE-NAME (for in join) \DSPPRINTCHAR (for from do) +\PFRemoveRootDirEntry (bind for from to do) COMPUTE-MACRO-ARGS (while do for on by in) \GETKEY (bind +do) CHANGECCODE (for in do) INFILECOMS (for in do) MACROS.GETDEF (for on by when collect) +\WAIT.FOR.TTY (until do) TRACKCURSOR (until do) \ENQUEUE.TIMER (bind first while do) DEFAULTFONT ( +type?) CLOSEPUPSOCKET (while do) \TTYBACKGROUND (for in do) CHARWIDTHY (type?) PAINTW.READCOMMAND ( +type?) \DRAWPOLYGON.DISPLAY (for on while do finally) TEDIT.FORMATHEADING (for in collect inside +thereis do while) SEDIT::PARENTHESIZE-CURRENT-SELECTION (for from to as on collect in when) +SETFILEINFO (type?) ICMLARRAY.GETMENUWGROUP (for in largest always) LISTHARD (for inside do in) +WAIT.FOR.TTY (do) SUPERPRINT/COMMENT2 (for on bind do finally) \STRINGWIDTH.GENERIC (for inatom sum +instring do) \FTPINIT (type?) INITDATATYPES (for in bind as from do) PRINT-EVENT (for in do) +CHANGECALLERS (for inside do finally join when collect in) \DSPCLIPPINGREGION.DISPLAY (type?) +PFI.CONSTANTNAMES (for in collect) EXPANDOPENLAMBDA (for in do while) \COURIER.RECORDTRAN (bind first +while do finally collect) COMPILER::ALPHA-MACROLET (for in do) SEDIT::SCAN-FOR-BOUNDS (bind first do +finally type?) \TYPEGLOBALVARIABLE (for in as from when do) PAINTW.READMODE (type?) \SAVESYSBUF (for +in do from to) INSPECT/TYPELESS (type?) \CLIPANDDRAWLINE (for from to as do) SEDIT::INSERT-COMMENT ( +type?) BESTNSADDRESS (for from to bind do finally in) COMPILER::CLOSURE-ANNOTATE-TAGBODY (for in +COMPILER::UNIONING) HARDCOPYW (type? find inside suchthat) SEDIT::RELINEARIZE (while do bind for by +finally) \PROC.CODEFORTFRAME (while do) MSUSERVBTABLES (for in thereis) PRINTCOMSTRAN (for in bind +when do while collect finally) \PEEKSYSBUF (until do) ADDTOFILES? (for in do when) \UNCOPY (for from +to do) \CH.FIND.ORG.SERVER (find in suchthat for collect) FB.INFOMENU.SHADEINITIALSELECTIONS (for in +do) \LASTNODE (for from to by when do type?) \ENQUEUE (to bind while collect finally) PRINTCODE (for +from by while do to in when finally) ICONW (type?) \PROCESS.EVENTFN (for in when bind do type?) +TEDIT.CURSORMOVEDFN (for inside as when do) COMPILER::PEEPHOLE-OPTIMIZE-CODE (for on eachtime do) +TEDIT.FORMATPAGE (while do for in) EDITBMBUTTONFN (type? until) \BITBLT.DISPLAY (type?) CREATEHASHFILE + (to do type?) KEYACTIONTABLE (type? for in do) PRINTCODENT (for from by while as do to) +\DRAWCURVE.PRESS (for in collect) DELETETO1 (for inside do) \SPLITTREE (for from to by do as) +\GET.FILING.ATTRIBUTE (bind for in when do finally) MOVEATTACHEDWINDOWTOPLACE (bind for in until do) +OPENPUPSOCKET (type? for in when do) EDITDATE? (for from to always) \LEAF.READPAGES (for inside as +from bind sum to until do) FONTUNPARSE (type?) COMPILER::ENV-ANALYZE-PROGN (for in do) +COMPILER::ENV-ANALYZE-MV-PROG1 (for in do) TTLOADBUF (bind while do) \RECLAIMARRAYBLOCK (for old by +until do) TEDIT.UNPARSE.PAGEFRAMES (for in collect) FONTCLASSUNPARSE (for in collect) PRINTBITMAP ( +type?) DODIRCOMMANDS (while do) FB.DISPLAY.COUNTERS (for in do as from by collect) +\PAGED.REVALIDATEFILELST (bind for in do) BROWSE/LAYOUT/HORIZ/COMPACTLY (for in do) +\TEDIT.APPLY.PAGEFORMATTING (for from to when collect) \CH.LOCATE.SERVERS (for in bind when collect do + old thereis) TWODINSPECT.TOTALWIDTH (for in sum) FILL.XPER (for from to do) INSPECTW.REDISPLAY (for +in do collect as join) MAKECREATE1 (for in when collect do join) ADVISE (for in join) +\TURN.ON.PROCESSES (for in do) \DRAWCURVE.DISPLAY (type?) FIND-STACK-FRAME (while do) \LFFindDirHole ( +bind do) \KEYBOARDEVENTFN (for in do) CASE.PRETTYPRINT (do) FILEPKGTYPE (for in when join from to by +do) RESTOREMAP (for inside thereis) TWODINSPECT.REPAINTFN (for on as until finally in repeatuntil do +bind) FILL.TEST (for from to do) \DELETECH (bind while collect for in do) KEYACTION (type?) +FIND.LINE.BREAK (while do) BREAK.PROCESS (type?) \TEDIT.FILL.IN.CHARLOOKS.MENU (for in do finally +type?) ENDREAD? (while bind do) \UNWIND.UFN (while bind when do to) NOHOST (do) MAKEINITLAST (for in +as do) COPIEDFILEPATTERN (while do on old collect for when) COMP.LOOKUPVAR (find in suchthat) +PROG1.PRETTYPRINT (for in never) \GETREGION.CHECKOPPT (for in do) \PAGED.REVALIDATEFILES (bind for in +do) ICMLARRAY (bind for from to collect in always) MSINTERPA (find in suchthat) \LEAF.WRITEPAGES (for +inside as from do) CH.PROPERTY (for in when do) \NSFILING.AFTER.LOGIN (for in when do) +\LFDirectorySearch (bind first until do finally for in always) CREATEMDSTYPETABLE (for in do from to +by) PRINT-HISTORY (for in do) \LOOKUPPUPNUMBER (to bind do repeatuntil) OVERLAPPINGWINDOWS (for old in + thereis) \NSFILING.CLOSE.CONNECTIONS (while do for in when) \GET.COURIER.DEFINITION (for in when do) +\BUFFERED.REVALIDATEFILELST (bind for in do) PREPLOOP (for in do) \10MBGETPACKET (for in bind when do +finally) DUMPINITPAGES (for from to do) \DRAWLINE.PSC (for in do) \LEAF.SETFILEINFO (type?) +NTH.RELATIVE.COLUMN.OF (for do) COMPILER::ENV-ANALYZE-MV-CALL (for in do) \BSP.PREPARE.OUTPUT (bind do +) \BSP.FLUSHINPUT (while do) ADDTOFILE (for in do) \FILE-CONFLICT (type?) \FONTFACE (type?) +SI::INTERNAL-THROW (for from to collect) DIRPRINTNAME (for from bind do to) CREATEFIELDS (for in when +collect) BCOMPL3 (for in unless do) \FONT.SYMBOLMEMB (for on when do) SETSPELLCASE (for from to do in) + \PFNewPages (bind until do finally) COURIER.WRITE.SEQUENCE (for in do) NSNET.DISTANCE (type? to do +repeatuntil) \PROCESS.MAKEFRAME0 (while do type?) \PFCurrentVol (for in thereis) SUBPRINT1 (bind for +on until finally) \CONS.UFN (while do) SI::RESETUNWIND (while bind do) \FONT.SYMBOLASSOC (for in first + when do) ShowIntervals (bind for from to do) \MAP-CODE-LITERALS (for from by do to) MEMBTONODES (for +in do) \DRAWCURVE.PSC (for in do from to) \FONT.COMPARESYMBOL (for inatom as always) \NOTE.10TO3 (for +in bind when do finally) PAINTW.READBRUSHSHAPE (type?) TEDIT.PARALOOKS (type? for in collect bind +while do finally) DSFIT1 (bind for on until do finally) \IRM.WILD.MATCH (for on thereis) PPROC (for do + repeatuntil while in unless) FB.CREATE.FILEBUCKET (bind while do finally for) MSGETBLOCKDEC (for +inside do in when) INSPECT/DATATYPE (for to collect) RECORDALLOCATIONS (for in join) \CHECK.PQUEUE ( +type?) INSPECT/HUNK (for from to collect) PFI.PRINT.BITMAP (to do finally) FIND-HISTORY-EVENTS (for in + when collect) \FINDKEY.UFN (for from to by as when do) PAINTW.READBRUSHSIZE (type?) +COURIER.EXPEDITED.CALL (for in thereis from to collect) BROWSE/LAYOUT/HORIZ (for in bind do) INTCHAR ( +for in do while) CACHEMACRO (for in by thereis) PPROC1 (type?) CLRPROMPT (type?) GETWINDOWPROP (type?) + MSINTERPRETSET (for inside join in do find suchthat) NUMBERPAD.READ (bind until do finally) RENAME ( +for inside when do) GETINTERRUPT (for in unless collect when do) TEDIT.PARSE.PAGEFRAMES (type? for in +collect) MSADDTYPE (for in bind do) \PRESSCURVE2 (for from to do until) \KEYACTION1 (for in collect) +PACKFILENAME.STRING (for on by do) SPP.FLUSH.TO.EOF (while do finally) \KEYNAMETONUMBER (for in as +from when do finally) \RESTLIST.UFN (for from to by do finally) FULLNAME (type?) PFI.PASS.COMMENT ( +bind do) TEDIT.BUILD.PCTB0 (bind for from to as by do finally) \NSGC.COLLECT.DIRECTORIES (bind +eachtime while when collect for in always) \TRANSLATE.10TO3 (for in when do finally) MSPRGE (for in +when do) BRHL/MOVE/RIGHT (for in bind do) \CANONICALIZE.NSADDRESS (for while do finally) \FIXDLINES ( +for inside do bind while) BROKENDEF (bind do) WHICHW (for by while thereis) IMAGEFNSP (type?) +HISTORY-NTH (bind while do) TEDIT.SCAN.LINE (for from to as do on inside when) \INSUREWINDOW (type?) +UTF16BE.OUTCHARFN (for inside do) GETFILEINFO (type?) \FTP.FLUSH.TO.MARK (bind while do) +TEDIT.FORMAT.HARDCOPY (type? while do for inside) FIND.PROCESS (type?) \FILE.NOT.OPEN (type?) +XCL:UNBREAK-FUNCTION (for in join) \FILE.WONT.OPEN (type?) \TFBRAVO.SPREAD.LOOKS (for in do) +\INSERTTREE (for old from to by when do finally type? as sum) ICONW.PRINT-JUSTIFIED (bind to as in do +repeatuntil) \STKSCAN (for from to do) OPT.FRAMEVAR (for on as from to by when do repeatwhile) +\ILLEGAL.DEVICEOP (for from to collect) \LFFileName (for from as in do) \MAIKO.IO-INTERRUPT (for in +when do) \IS.NOT.RANDACCESSP (type?) MAKE-UNICODE-TRANSLATION-TABLES (for in eachtime unless do from +to when) \LFMakeDirHole (to do) MSINITFNDATA (for in do) MSNEXTWORD (for in when do) +\BRUSHCONVERT.HCPYMODE (for in collect) UPDATEFILES (for in when do first finally unless) +\DRAWCIRCLE.PSC (for in do) COMPILER::COPY-NODE-LIST (for in collect) RESETKEYACTION (type?) FONTSET ( +for in when do) \PARAS.IN.SEL (for in do) FIND.MATCHING.WORD (find on suchthat) CONTROL-T (do bind) +\DRAWELLIPSE.PSC (for in do) TWODINSPECT.COPYBUTTONFN (bind while do finally) PRINTOPCODES (for in do) + \SELECTPROCESS (for in unless collect) \ABORT.BULK.DATA (do repeatwhile while) MAPFILES (for in do) +MakeMenuOfImageTypes (for in bind collect when) \DO.PROGV.SETUP.FRAME.AND.EXECUTE (for in as from by +do) TTYINPROMPTFORWORD (for in do) \FTP.FLUSH.TO.EOC (while do) \TEDIT.UPDATETREE (while do for old +from by as to when finally) TEDIT.SUBSTITUTE (for in sum while do collect instring as from by) +\PROC.FINDREALFRAME (for from by do) DINFO.INVERT.NODE (for in thereis) PROCESS.STATUS.WINDOW (for in +collect) SPPSTREAMP (type?) COMPILER::ENV-ANALYZE-LAMBDA (for in do) \CORE.RELEASEPAGES (for in when +do) \PFGetVols (for from to collect) MB.NWAYBUTTON.SELFN (for in as do) \COURIER.TRACE (for in bind do +) \UNBOXFLOAT3 (bind declare for from to by do finally) \WRITEBITMAP (until do) +FB.INSERT.SUBDIRECTORIES (for on bind when do) MB.NB.PACKITEMS (while do) TOPATTACHEDWINDOWS (for in +do) \GETREGION.CHECKBASEPT (bind for in do) SHADEITEM (for in thereis) \NSFILING.GETFILE (type?) +COMP.COND (for by while do) \MAIKO.CONSOLE-LOG-PRINT (while do) TEDIT.BUILD.PCTB2 (bind for from to as + by do finally in) SPAWN.MOUSE (for from to unless do) \CLOSEF.PRESS (for in as from do) \CURVE2 (bind + for from to when do) \DUMPEXPORTS (for on do) \TEDIT.ADJUST.LINES (bind while do) +GET-NEXT-HISTORY-EVENT (for in do finally) FW-INIT-MENUS (type? for in do) OPT.CLEANFRAME (for in when + always) CHECK/MENU/IMAGE (type?) \FAST4BIT (bind for from do) RPLSTRING (for from to as do) +\CORE.DELETEFILE (type? for on when do) PARAMETRICSPLINE (for in as from to do type? by) +RIGHTW.ADJUSTSELECTION (for in as on thereis) OPT.FRAMEDEL (for on do) TEDIT.INSERT (type? for +instring as from by do) FONTMAPARRAY (for in do from to unless) MB.MARGINBAR.TABTRACK (while do) +\DRAWPOLYGON.IP (for on do) \FTP.CLEANUP (do until) CHAT.STARTUP (for in when do on by) BKSYSCHARCODE +(bind while collect) ALLCALLS (for in when collect) VOLUMES (for in collect) FM.EDITITEM (type?) +MSADDMODIFIER (for in bind do) MAPFILES1 (while unless do) BKSYSBUF (for inatom do instring) +\MAIKO.ETHER-INTERRUPT (for in bind when do finally) \UTF8.BACKCHARFN (bind while repeatuntil finally) + \CHTOPC (while do type? for from to as by) NEGATE (for in do) GC-FILING-DIRECTORY (for in do while +bind finally) COMPILER::ENV-ANALYZE-LABELS (for in do) TEDIT.SELECT.LINE.SCANNER (bind while do for on + as inside when finally) \TEDIT.UNIQUIFY.CHARLOOKS (for in thereis) FONTPROFILE.ADDDEVICE (for in do +unless) \PROCESS.GO.TO.SLEEP (type?) COMPILER::CLOSURE-ANNOTATE-PROGN (for in COMPILER::UNIONING) +DINFO.LAYOUTGRAPH (for in collect) PROCESS.EVALV (type?) DIRECTORY.MATCH (do) \BITMAPTOSCREEN (for in +thereis) CHECKFPTOVP (for from to as by when do) FB.SORTCOMMAND (for in bind do) FONTCOPY (type? for +from by to do on) \LFMakeDirEntry (for in do) FB.EDITCOMMAND (for in bind do) DIRECTORY.MATCH.SETUP ( +do for on bind) TRAPMAKE (while do) TYPE.BUFFER (bind while do for in) \HANDLE.NS.ROUTING.INFO (while +do when repeatwhile) RESET.INTERRUPTS (for in collect) TEDIT.BUILD.PCTB1 (bind for from to as by do +finally in thereis) FONTSAVAILABLE (type? for in join) \CORE.GETINFOBLOCK (type? for on when do) +SEDIT::STRINGWIDTH (for instring bind do finally) \TEDIT.DELETE (for inside as do) ADDMENU (type?) +EQUALALL (for from as to always in) OPT.FRAMELOCAL (for in when do) \PSWOP.SELECTED (forDuration until + do) DEFINEFONT.IP (for from as in do finally) \GCRECLAIMCELL (do repeatuntil while) FB.GET.SORT.MENU +(for in collect) \LOOKUPFONTSINCORE (for in when join collect type?) SHOWCHARS (for from to unless do) + \IRM.WILDCARD (for in when collect) \CORE.GENERATEFILES (for in join when collect) +\TEDIT.PARSE.CHARLOOKS.MENU (for in do suchthat) CURRENT.WORD (for by until bind do finally) +\TEDIT.CENTER.SEL.REV (for in do) FW-WIPE (for in do) PROCESS.NAME (type?) MSPATHS4 (for in do) FONTP +(type?) FB.GREATEST.PREFIX (for from bind do) CHANGE-TTY-PROCESS-INTERACTIVELY (for in collect) +BRHL/LAYOUT/DAUGHTERS (for on bind finally do) \CORE.GETFILEINFO (type?) \TEDIT.UNIQUIFY.PARALOOKS ( +for in thereis) \ROUTINGTABLE.INFOHOOK (for from to as by sum) SEDIT::COPY-SELECTION-COMMENT (bind +while collect) OPENWP (type?) COMPILER::CLOSURE-ANNOTATE-MV-PROG1 (for in COMPILER::UNIONING) +TRANSGRAPH (for in collect) \TFBRAVO.EOLS (for from to do) \DASHINGCONVERT.HCPYMODE (for in collect) +\PRINTFPTOVP (while do) NCREATE2 (for in do) TTDOTABS (for in bind when do to collect) +FB.PROMPTFORINPUT (for from to by bind when do) SHRINKBITMAP (for from to do) OPENATTACHEDWINDOWS (for + in do) MSADDANALYZE (for in do) FW-ADJUST-REGION (for in do) L-CASE (for inatom as from do finally +instring first) FILEPKGCOMS.PUTDEF (for in by do) \NSFILING.GENERATEFILES (for on when do finally in +collect until) U-CASEP (for inatom never instring) \BLT (for from by to do) \UNITWIDTHSVECTOR (for +from to do) \MAKEBRUSH.DIAGONAL (for from to do) \NSFILING.COPY/RENAME (for in always) EDITBM (while +do) UNMARKASCHANGED (bind while do for in when) MOVEATTACHEDWINDOWS (for in do) TEDIT.PUT (while do +type?) POSTEDITALISTS (for in when do) OPENRTPSOCKET (until do) LIST-ALL-BLOCKRECORDS (for in when +collect) FW-RE-INIT (for in do) ONEDINSPECT.PROPWIDTH (for in largest finally) \#BLOCKDATACELLS (type? +) WFROMMENU (for in thereis) PRINTROUTINGTABLE (for from to as by join in do) SPELLFILE (for in +thereis when do) MOUSECONFIRM (until bind do finally) FONTPROFILE (for in do) ADDTOVAR (for in bind do + finally find suchthat) OPT.MERGEFRAMEP (for in do when) \TEDIT.GET.CHARLOOKS.LIST (for from to +collect) \CREATE-REAL-CHARSET.DISPLAY (for in bind when do) PREEDITFN (for in do collect) +\CORE.NAMESCAN (bind while do finally) UNTRACE (for in join) MSPATHS1 (for in when collect on do) +CONSTANTEXPRESSIONP (for in collect finally) \PUTBASESTRING (for infatstring as from do infatatom) +\TEDIT.FOREIGN.COPY? (for from to do) SEDIT::CFV-CLISP (bind first for in do finally) +\UPDATE.PROCESS.WINDOW (for in as thereis) \SFMAKEITALIC (for from to do) \IRM.WILD.REF (for in +collect) \PUTBASESTRINGFAT (for from to as by do) LEAF.ASSURE.FINISHED (type? bind until do while +never) SLITLOOP (for in do) GENSYM (for to as from by do finally) TWODINSPECT.COLUMNWIDTH (for in +largest finally) ALIGNMENTNODE (for in largest smallest) SEDIT::CREATE-CONSTANT-STRINGS (for in join) +FM.SHADE (type?) HCOPYALL1 (for in do) TILE (while do) \CREATECHARSET.DISPLAY (for in bind when do) +\BUILDSLUGCSINFO (for from to do) BLTPATTERN.GENERIC (while do) MODIFY.KEYACTIONS (for in collect do) +UNION (for in bind unless do finally) \DUMP.COURIERPROGRAMS (for in bind do on by) COURIER.WRITE (find + in bind suchthat for do as) SEDIT::REUSE-LINEAR-FORM (bind first do) CREATETEXTUREFROMBITMAP (for +from to do by) EXPRESSIONS.WHENCHANGED (for in do) \CORE.OPENFILE (type?) SHRINKATTACHEDWINDOWS (for +in do) TTYIN.PRINTARGS (while do bind) DIRECTORY (bind do for in thereis while) \READDISPLAYFONTFILE ( +bind first for inside when do finally) \IFSERRORSTRING (for from to do) MAKEHASHKEY (for in bind do +finally) MARKASCHANGED (for inside do in on when) \TEDIT.DIFFUSE.PARALOOKS (bind while do) +\NSRANDOM.OPENFILE (type?) RESHAPEALLWINDOWS (for in do when repeatuntil) BQUOTIFY (for in join by +while never) \COREFILE.SETPARAMETERS (for in bind do finally) SEDIT::ASSIGN-FORMAT-CLISP (for in do) +TEDIT.PUT.PCTB2 (type? while do finally for from to as instring in) \BSP.PREPARE.INPUT (bind do) +TTADDTAB (from to collect) FB.EXPUNGECOMMAND (for in do) ATTACHEDWINDOWS (for in thereis unless +collect) SEDIT::COPY-NODE (for in collect) COMPILER::COPY-NODE-TAGBODY (for in collect) EXPANDBM (for +from to by do while) OLD.FIND.SYMBOL (for from to suchthat do as always) MB.NB.SIZEFN (bind for in +collect join largest) \MKATOM (for from to suchthat do as always) BRHC/OFFSET (for in do) +RAISE/TRANSITION/CHAIN (for in do finally) MSPATHS2 (for in when do finally) SAMECLOOKS (for in always +) \CREATE.SYMBOL (for from as to do) DOWINDOWCOM (type?) \GCSCANSTACK (while do type? until) +APPENDTOVAR (for in do find suchthat) EVENTS-INPUT (for in collect) HOSTNAMEP (find in suchthat) +\PARSE.NUMBER (for from to always) GETHASHKEY (bind first until do finally) COMPILER::CLOSURE-ANNOTATE-MV-CALL + (for in COMPILER::UNIONING) TWODINSPECT.ROWPROPWIDTH (for in largest finally) BLTSHADE (type?) +APPENDINTEGER.IP (for from to by do) \VFMGetInterval (bind for from to by do finally) +\CLEAR.ROUTING.TABLE (for from to as by do) DUMPI.S.OPRS (for in collect) \SEARCHFONTFILES (bind for +inside do finally in when) COMPILER::ENV-ANALYZE-CALL (for in do) RECORDACCESS (for in join) +LDIFFERENCE (for in when collect) FM.REDISPLAYITEM (type?) GRAPHOBJ.FINDGRAPH (bind first do) +\INCUSECOUNT (until type?) \DOHARDRETURN1 (type? while do) \COPYDATATYPE (for in do) \FIRSTNODE (type? +) \TEDIT.MARK.LINES.DIRTY (bind for inside do finally while) UNPACKFILENAME.STRING (for from to bind +first do finally while always) \INITATOMPAGE (for from to as by do) MSNEEDUNSAVE (for inside when +collect) GETSELECTEDITEMS (for in when collect) MB.NB.DISPLAYFN (for in as do when) BRKDWN1 (for from +to do) SIMPLETEXTEDIT (repeatuntil finally) DECODE-NS-STRING (bind while do) \MOVEFRAME (type? do +repeatwhile) PUPNET.DISTANCE (to do repeatuntil) SPELLFILE1 (for on by do) \VFMKillBuffer (bind for on + do) FB.MAYBE.INSERT.FILE (for in collect on as unless do) \FONTINFOFROMFILENAME (for from when do +find suchthat) \NSFILING.PARSE.FILENAME (bind first while do finally until) \ONQUEUE (for by while do +when) SLICESET (for in as from sum) \NSPRINT.WATCHDOG (bind do for on) WRITE-UNICODE-INCLUDED (for +inside join in collect find suchthat from to when on while) SEDIT::RECOMPUTE-FORMAT-VALUES (for in do) + HRULE.IMAGEBOXFN (for inside sum) \GATHER-CLEANUP-FORMS (for in bind do) IDLE.SHOW.OPTIONS (for on by + do) UnixPrint (for in when do) \UNQUEUE (bind while do) SEDIT::LINEARIZE-CLISP (bind first for in do +finally type?) ADDTOCOMS (for on do) FW-RESET (for in do) TTYIN.SHOW.?ALTERNATIVES (do) +MBUTTON.FIND.NEXT.BUTTON (bind first while do type?) \FONTFILENAME (while do) \TEXTMENU.TOGGLE.DISPLAY + (type?) SCANDEFINEQ (find on suchthat) SPELLFILEDIR (for in when do) SYMBOL.PNAME (for from to do) +MENUWINDOW (type?) MAPATOMS (for old from to do by while when as never) DWIM-SYMBOL-PACKAGE (for in +collect when do) SEDIT::COMMENT-LENGTH (for from to as in sum) TRACE (for in join) +\MAIKO.INPUT.INTERRUPT (for in bind when do finally) MSPATHS (do) TWODINSPECT.COLUMNWIDTHS (for in +collect) COMPILER::CLOSURE-ANNOTATE-LAMBDA (for in COMPILER::UNIONING when collect join) +\AGE.ROUTING.TABLE (for from to do by while bind when finally) SEDIT::CONTAINS? (while do) +ONEDINSPECT.REPAINTFN (for on as until finally in bind repeatuntil do) PURGEDSKDIRECTORY (for in when +do type?) ATOMHASH#PROBES (for infatstring when do from to until as always) \COERCETODS (type?) +\TEDIT.WINDOW.OPS (while do) SEDIT::TRANSLATE-CHARS (bind first for instring do finally) +COMPILE.FILE.DEFINEQ (for in unless do) COPYBYTES (type? until do) TEDIT.GET.PARALOOKS0 (for from to +collect) ED (for inside when bind collect find on by suchthat) FIND.START.OF.WORD (while do) +MAXATTACHEDWINDOWEXTENT (bind for in do) SEDIT::UNDO-EXTRACT (for in as from do) \MAP.ROUTING.TABLE ( +for from to as by do in) CREATEMENUEDWINDOW (type?) MBUTTON.FIND.NEXT.FIELD (while do) UNSAVEFNS (for +in when bind do unless) \TEDIT.GET.PARALOOKS.LIST (for from to collect) TEDITFROMBRAVO (first while do + finally) COMPILER::CLOSURE-ANNOTATE-LABELS (for in COMPILER::UNIONING) \BUFFERED.COPYBYTES (bind do +repeatwhile) \FONTFACE.COLOR (type?) INSPECT/AS/RECORD (for in when collect) SEDIT::GETKEY (bind do) +DBG::MAKE-FRAME-INSPECT-WINDOW (for in when do) \FINDFONTFILE (bind for inside when do) +\NSFILING.COMPOSE.PATHNAME (for in join) INSTALLBRUSH (for from to do) SPELLFILE.MATCHINGDIRS (for in +when collect unless) TEDIT.GET.CHARLOOKS0 (for from to collect) \COURIER.RESULTS (for in collect find +suchthat when do) WRITE-UNICODE-MAPPING-FILENAME (for on join) MINATTACHEDWINDOWEXTENT (bind for in do +) \GETSTREAM (type?) \PFInitializeVols (for from to do) MB.NB.WHENOPERATEDFN (for in as when do) +POSTEDITPROPS (for on by when do finally) \SLOWFGREATERP (while do) \NSFILING.SETFILEINFO (type?) +COPYCHARS (type? until do for from to by bind declare while) \SFLHASHLOOKUP (bind first do) FB.PRINTFN + (while do for in as bind) \HANDLE.RAW.PUP (for in when do) \LEAF.BREAKCONNECTION (type? for in do) +SEDIT::ASSIGN-FORMAT-DOTLIST (for in do) \POLYSHADE.BLT (while do for in) CLEAR.LEAF.CACHE (type?) +\NSRANDOM.READPAGES (for from to when do) \CURVEEND (for from to do) PUTCURSORPROP (for on by when do) + \NODIRCORE.OPENFILE (type?) LISTFILES (for in when collect) \NSRANDOM.SESSION.WATCHER (do for in when +) FIXDATUM (for in do) BLTPATTERN.REPLACEDISPLAY (while do) BKSYSBUF.GENERAL (bind do repeatuntil +finally) \MAIKO.10MBSENDPACKET (for in bind when do finally) COPYGRAPH (for in collect) +\TEDIT.REOPEN.STREAM (while do) SI::UNWIND-TO-BLIP (bind until when do) TEDIT.HARDCOPY (for in do +finally) \INIT-MISCN-TABLE (for in do) BITMAPP (type?) EVALUABLE.CONSTANTP (for in collect do finally) + \CREATEPIECEORSTREAM (type?) \NSFILING.GETFILEINFO (type?) FW-FORGET-CMD (for in when collect) +POSTSCRIPT.PUTCOMMAND (for from to do) FIND1STPRIME (find from by suchthat for never repeatuntil) +CHANGERECORD (for in do) CLOSEALL (for in when collect) REMOVETONODES (for in unless collect) +\COMPUTE.ARC.POINTS (for from to by collect) INSURE.WINDOW (type?) PFI.SORT.INDICES (for in bind when +collect) SI::NON-LOCAL-RETURN (for from to collect) COMPILE.CHECK.ARGTYPE (for in do) SEDIT::OUTPUT-STRING + (type?) COMPILER::FIND-TOP-ENVIRONMENT (until do) \WALKOVER.SPECIALFORMS (for on until do finally) +BITSPERPIXEL (type?) MISCN-COLLECT (for from to collect) \STKMIN (for from to do) TEDIT.SUBLOOKS (for +on by collect bind while do) REMWINDOWPROP (type? for on by bind do) FB.COPY/RENAME.MANY (for in +thereis repeatwhile finally do) SEDIT::UNDO-LIST-REPLACE (for in unless do) \FINDOP (for in do from to + by) \LFFindDirectoryVol (type? for on do in thereis) \DECL.COMNT.PROCESS (for on while do finally) +SEDIT::COMPUTE-FORMATS-AND-FORMAT-VALUES (for in do) OPENP (type?) ONEDINSPECT.COPYBUTTONFN (bind +while do finally) ROMANNUMERALS (while do) IRNDLIST (for in collect) ARGTYPE.STATE (for in do) +COMPILER::ALPHA-COMPILER-LET (for in do) SEDIT::OUTPUT-SPACE (for from to do) WHENCLOSE (for from to +by do) SI::ADD-OLD-STYLE-ADVICE (for in do) FB.GET.NEW.FILE.SPEC (for on by bind do) +BRHC/LAYOUT/DAUGHTERS (for in bind do finally) TEDITWINDOWP (type?) \SELITEM.FROM.PROPERTY (for in +when do) \FONTINFOFROMFILENAME.OLD (for from when do) MB.MARGINBAR.SELFN (for in collect while do as +smallest) \MEDW.GETSCREENREGION (for in always until do) MAKEFILE1 (find in suchthat) +\NSFILING.CONFLICTP (for in bind when do) \DELETETREE (for old from to by when do finally as sum) +\LFCloseDevice (for in do) FM.RESETMENU (for in do) FB.OPERATE.ON.FILES (for in collect) COPYDEF (for +in do) PRINTCONSTANT (for in when do) TEDIT.PUT.PCTB (type? while do finally for from to as instring +in) CALLS3 (for on do) \UFStoOtherCopyMess (for in finally do) \READSTRIKEFONTFILE (for from to do as) + SI::PVAR-VALUE-IN-FRAME (for from by bind until do) MAKEUSERMACROSCOMS (for in do when collect) +\STARTPUP (for in do) \TEDIT.CHANGE.LOOKS (type? bind while do finally) \READACFONTFILE (for from to +as in do sum bind) SI::VARIABLE-NAME-IN-FRAME (for by as until when do) \LOCATE.PUPNET (for in when do + finally) COLLECTFNDATA (for in do) COMPILER::CLOSURE-ANNOTATE-CATCH (for in do) \INFER.FILE.TYPE (do) + \TEDIT.CARET (for inside do) SHOW.CLEARINGHOUSE (for in collect) TEDIT.UNDO.PARALOOKS (bind for in do +) TEDIT.LOOKS (type?) \NSRANDOM.WRITEPAGES (for inside as from do old bind sum) +SORT.PUPHOSTS.BY.DISTANCE (for in do always) \TEDIT.FLUSH.UNUSED.LOOKS (for in do while when collect) +UNBREAK (for in join) \FONTRESETCHARWIDTHS (for from to do) LOOKUPHASHFILE (for in thereis) +\NSFILING.GENERATE.STARS (bind while do finally) BREAK-FUNCTION (for in join) \INIT-USER-SUBR-TABLE ( +for in do) \TEDIT.GET.PARALOOKS1 (for from to collect) EDIT.BITMAP.REAL (until do) PF (for inside +unless do) LISTRECORDEFS (to do finally) RESETOPENFILES (for inside collect) SETFILEPTR (type?) +CONVERT-AFM-FILES (for in do as) CHANGETRAN1 (for in do finally) CURSORP (type?) MakeMenuOfPrinters ( +for inside collect) CENTERPRINTINREGION (type?) TEDIT.SELECTED.PIECES (first while for from do) +FINDFNDEF (for in thereis) TRAPLOOP (for in do collect from to) SEDIT::CFV-DOTLIST (for in always sum +bind do finally) FIND.LINE (for do) \TELERAIDBREAK (while do type?) MBUTTON.FIND.BUTTON (first while +do) \CURSORPOSITION (do repeatuntil) SLICEREF (for in as from sum) NORMLOOP (while do) +\SFROTATECSINFOOFFSETS (for from to do) HRULE.DISPLAYFN (bind for inside do) PROCESSPROP (type? for on + by when do) WRITE-UNICODE-MAPPING (for in when collect) \TEDIT.SHOWSELS (for in do) FM.RESETSTATE ( +type?) ROTATE-BITMAP (for from to do) \IRM.CHOOSE.REF (for in collect) \FM.EDIT-GETPOINTERINFO (for +from to do) CHAT.BIN (until bind do) FM.CHANGESTATE (type?) \FLUSH.OPEN.STREAMS (for in when do) +EQDEFP (for from to always) SEDIT::BUILD-NODE (bind while do finally) BCOMPL.BODY (for in do) +TWODINSPECT.SELECTCOLUMNPROP (for on thereis in as) COPYATOM (for from to do) SEDIT::MARKASCHANGEDFN ( +type?) GETHASHTEXT (type?) MSSPLST (find in suchthat) CHAT.CHOOSE.PHONE.NUMBER (for in collect when) +ROTATE-BITMAP-LEFT (for from to do) \BIGNUM.LSH (while do type?) CURSORPOSITION (type?) BUTTONPANEL ( +for in collect) ASKUSER1 (thereis bind in eachtime suchthat) GTHASHFILE (type?) GETLOCALDEC (for by +while bind when do in) SEDIT::NEXT-LINEAR-ITEM (do type?) \TEDIT.CENTER.SEL (for in do) SEDIT::UNDO-EVENT + (for in do) TB.MAP.DELETED.ITEMS (for in when do) STRIKECSINFO (for from to sum do) \CHTOPCNO (while +do) CH.FINDSERVER (type? for in when do) CLOSERTPSOCKET (until do) WRITESTRIKEFONTFILE (for from to +thereis by do) FB.PROMPTWPRINT (for from to do) ASKUSER$ (for bind in eachtime when do finally from to + while) UTF8.OUTCHARFN (for inside do) \VECFONTINIT (bind for in collect) INTERPRET.REM.CM (for from +to when do) BRECOMPILE2 (from to always) TTUNREADBUF (for by until do) COMPILER::CLOSURE-ANNOTATE-CALL + (for in COMPILER::UNIONING) \TEDIT.INSERT.PIECES (bind first while do) \TEDIT.CLOSEUPLINES (bind +while do until) \CHANGECHARSET.HDCPYDISPLAY (for from to do) \OPENLEAFCONNECTION (until do) +TTMAKECOMPLEXCHAR (for in do) \TYPE.FROM.FILETYPE (find in suchthat) SIMPLEPRINT (for from to do) +\LEAF.LOOKUPCACHE (for from bind while do finally) DINFO (type?) FASL::COLLECT-LIST (to collect) +NUTF8STRINGBYTES (for from while sum) MULTIFILEINDEX (for inside join in collect) \PFCreateVols (type? + bind for from to do) \RESETSTACK0 (for from to bind when do finally type?) MSDESCRIBE (for in when +collect do) \MAKEBASEBYTESTREAM (type?) TEDIT.UNDO.LOOKS (bind for in do) PFI.COMPUTE.INDEX.SHAPE (for + in largest finally join) \FILLINXIP (type?) MAKEPROPSCOMS (for in collect) \BUILDATWSTRUCTURE (for in + collect join finally old do) SEDIT::STRINGIFY-LIST (bind for in do finally) \PFInitFileDescriptors ( +for from to do) TEDIT-BOOK (for in do) TB.COLLECT.ITEMS (for in collect when) +SET-PACKAGE-INTERACTIVELY (for in bind collect) FW-CREATE-OFD-WINDOWS (for in bind unless do) +INITBITMASKS (for from to bind do) \NSFILING.FULLNAME (type? for in do from while bind finally join) +\TFBRAVO.PARSE.PROFILE.PARA (while do) SCANFILE1 (for in do while) \UPCASEBASE (for from to do) +COURIER.CALL (for from to collect type?) \CLEARCELLS (while do) FM.GETITEM (for in thereis) +STRING.EQUAL (for from as to always) HASHFILEP (type?) \TEDIT.RESHAPEFN (while do) FIX/SCALE (for in +collect) \TEXTMENU.START (for in thereis) OPT.RETMERGE (type?) TTSKIPSEPR (while do) \10MBRAWTRANSMIT +(repeatuntil) \FM.EDIT-DELETE (while bind eachtime do finally) TTCOMPLETEWORD (for by until sum while +do finally find old from to as in suchthat) CREATEDSKDIRECTORY (type?) FM.HIGHLIGHTITEM (type?) +TB.NTH.ITEM (while do finally) BEEPON (while do) COMP.CPI (while do) HVREADEND (bind until do) +CREATEPAGES (for from to do) \TTW1 (type?) \NSFILING.CHECK.ACCESS (for in thereis) \InitCurveBrushes ( +for in do from to) SEDIT::LINE-FINISHED (for by do repeatuntil finally) BEEPOFF (while do) +SHOWBITMAP1.IP (for from to do) EXPANDATTACHEDWINDOWS (for in do) SEDIT::SET-SELECTION-QUOTE (type?) +\PFCreatePhysicalVolume (type?) CHECKSAMEDIR (for in bind never) IMPORTEVAL (for in join) CL:CHAR-NAME + (for in when do finally) COURIER.READ.STRING (for from to thereis) RECORDECL1 (for in collect join on + when) CRITSECT (while do) COMP.LAM1 (for in when do) COPY.SEGMENT (for by until collect) +\FTP.FIX.BROKEN.INPUT (for in collect when do) TEDIT.HCPYFILE (type?) \GATHER-CLEANUP-FORMS1 (bind +until do finally type?) \FM.EDIT-WORDDELETE (while do) CHAT.LOGIN (for in do) CONVEXP (while do) +UPDATEPCNODES (while do for from by as to when finally) \GATHER-SPECIAL-BINDINGS (for from by bind +until unless do finally) BIT.IN.ROW (for from to when do) ETHERHOSTNAME (to when do finally for +instring always) RECORDECLBLOCK (for in when do bind find from suchthat as collect) OPT.RETTEST (type? +) \BITBLT.BITMAP (type?) RANDSET (for in as from to collect) SEDIT::SELECT-SEGMENT-DEFAULT (type? for +in as from bind do) TMPSUBFN (for from to always) SCAVENGEDSKDIRECTORY (type? for in do) +AS.NEXT.VERIFIER (for in collect) \GCERROR (until) FILLNGON.IP (for from to do) \ZEROWORDS (while do) +IDATE (while do for in bind) COMPILER::CLOSURE-ANNOTATE-BLOCK (for in do) \SETDAYTIME0 (repeatwhile) +\TEDIT.CUMULATE.EVENTS (bind while do finally) TEDIT.UNPARSE.PAGEFORMAT (for in do collect) +\VFMGenerateFileIDs (bind until when collect) WRITE-UNICODE-MAPPING-HEADER (for in do) +\PROCESS.RESET.TIMERS (for in bind do when) \HANDLE.PUP.ROUTING.INFO (while do when repeatwhile) +COMPILER::COPY-NODE-LAMBDA (for in collect) \FORMATLINE (while do type? for old from to as when) +CHAT.TYPEOUT (bind first while do finally) \HARDRESET-CLEANUP (for in do) FM.GETSTATE (for in do) +MB.PUTFN (for in do) SEDIT::ATOM-CHANGE-RELINEARIZE (type?) TEDIT.COPY.PARALOOKS (type?) HVBAKREAD ( +for from to do in while until collect finally) \HARDRESET-CLEANUP1 (for in as from by do bind finally) + SEDIT::SET-SELECTION-LIST (type?) XCL:UNADVISE-FUNCTION (for in join) GETBLOCKDEC (for in when do) +INITUFNTABLE (for from to do in when) NONSYSPROPNAMES (for in when collect) XCL:READVISE-FUNCTION (for + in join) TWODINSPECT.SELECTROWPROP (for on thereis in as) \INSURESCREEN (type?) +PFI.SETUP.TRANSLATIONS (for in collect) XCL:REINSTALL-ADVICE (for in do) XCL:ADVISE-FUNCTION (for in +join) MSOBJTYPE (type?) OPT.JFIXPASS (for in do) \SEARCHOPENFILES (for in when do) COMPILER::COPY-NODE-LABELS + (for in as collect) \LEAF.ADD.QUOTES (bind while do finally) FIND.NON.SPACE (while do) +\FTP.RECOGNIZEFILE (for in do) BITBLT (type?) MODERN-MENUBUTTONFN (type?) BREAKCONNECTION (for in when + collect) RESETVARS (for in collect do) COURIER.READ.SEQUENCE (to collect) WORD.MATCHES.BUFFER (for as + by bind until always) \MEDW.GETSCREENPOSITION (until do) SCALE/TONODES (for in collect do) +CLEARHASHFILES (while do) IRM.CREF.BUTTONEVENTFN (bind until do finally) \DISPLAYLINE (bind for from +to do finally while) \STRINGWIDTH.HCPYDISPLAYAUX (for inatom sum instring do) HASH.PASSWORD (bind for +instring do finally) \CARET.FLASH.MULTIPLE (for in as do) \NSFILING.FILLIN.ATTRIBUTES (for in do) +XCL:REBREAK-FUNCTION (for in join) LOADFNS-MAKELIST (for in collect when) \GENERIC.OPENP (for in +collect when) SEDIT::SCAN-STRING (bind first while do finally type?) XCL:TRACE-FUNCTION (for in join) +COND.TO.IF (for in join) \ALLOCMINIMUMSIZES (for in until do sum) \PFCreateFileDescriptors (for from +to do) \BACKFORMAT (for old from to by do while) SAMEPARALOOKS (for in always) MSSUBJTYPE (type?) NIL +SPECVARS ERRORX (ERRORPOS) CL:INTERN (*PACKAGE*) PRETTYCOM1 (SI::*RESETFORMS*) \UFS.RECOGNIZE.FILE ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \INTERNAL/SETPASSWORD (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +CL::\OPENSTREAM-WITH-DEFAULT (LOADPARAMATERS) COPYHASHFILE (HASHFILE FN NEWHASHFILE) \SPP.ESTABLISH ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \UFSCloseDevice (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +MAKE-KEYWORD (*KEYWORD-PACKAGE*) \INVALID.SYMBOL (\FATPNAMESTRINGP) COMP.EXPR (*BC-MACRO-ENVIRONMENT*) + \VFMInsert (insertKey insertVolumePage insertLevel splitFlag) COPYFILES (FROMSPEC TOSPEC T HELPFLAG) +LOADCOMP (BLOCKS) CONCOCT-SYMBOL (*LISP-PACKAGE* *INTERLISP-PACKAGE* CMLSYMBOLS.SHARED) +XCL::PPRINT-DEFINER-RECURSE (TAIL) \TEDIT.HARDCOPY.FORMATLINE (LOOKS ASCENT DESCENT FONTWIDTHS FONT +INVISIBLERUNS CHNO TLEN LOOKNO CHLIST WLIST DEVICE NEWASCENT NEWDESCENT IMAGESTREAM) \FM.EDIT-ITEM ( +DONEFN EDITITEM WINDOW) PACKAGE-ENABLE (*INTERLISP-PACKAGE* *PACKAGE* *OLD-INTERLISP-READ-ENVIRONMENT* + *PER-EXEC-VARIABLES*) RECREDECLARE (RECNAME RECFIELDS) FIX-FORM (%#RPARS FONTCHANGEFLG) +LISPDIRECTORYP (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) RECEVAL (NEWVALUE DATUM FIELDNAME) LVLPRIN1 ( +FILE PRIN2FLG) PACKAGE-MAKE (*LISP-PACKAGE* *KEYWORD-PACKAGE* *INTERLISP-PACKAGE* *PACKAGE* +HASHTABLE-SIZE-LIMIT) COMPILER::COMPILE-FILE-PROCLAMATION (GLOBALVARS SPECVARS LOCALVARS) +\LEAF.RECONNECT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PACKAGE-HIERARCHY-INIT (*INTERLISP-PACKAGE* +*KEYWORD-PACKAGE* CMLSYMBOLS.LAMBDA.LIST.KEYWORDS CMLSYMBOLS.SPECIALFORMS CMLSYMBOLS.MACROS +CMLSYMBOLS.TYPENAMES CMLSYMBOLS.FNNAMES CMLSYMBOLS.DECLARATORS CMLSYMBOLS.VARS) BRKDWNCOMPILE2 (LCFIL +LAPFLG STRF SVFLG LSTFIL SPECVARS LOCALVARS SI::*RESETFORMS*) DWIMIFY (SI::*RESETFORMS*) +COMPILE-FILE-EXPRESSION (COMPILED.FILE) \LFGetFileInfo (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +LVLPRIN2 (FILE PRIN2FLG) PACKAGE-CLEAR (*PACKAGE-FROM-NAME* *PACKAGE-FROM-INDEX* *PACKAGE* +*LISP-PACKAGE* *KEYWORD-PACKAGE* *INTERLISP-PACKAGE*) OR (*TAIL*) TTYIN.FINISH (\COMMAND \BUFFER LINE) + BCOMPL (NLAML NLAMA LAMS LAMA DWIMIFYCOMPFLG EXPRSLST NOFIXVARSLST NOFIXFNSLST *PRINT-ARRAY* +*PRINT-LEVEL* *PRINT-LENGTH*) TEDIT (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \SPP.CLEANUP ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \VAMInit (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +XCL::PPRINT-DEFINER (FORMFLG SPACEWIDTH TAIL LEFT) PRINT-LISP-INFORMATION (SI::*RESETFORMS*) PRIN2 ( +*PRINT-ESCAPE* *READTABLE* *PRINT-LEVEL* *PRINT-LENGTH* *PACKAGE* \THISFILELINELENGTH) WTFIX1 ( +SI::*RESETFORMS*) COMPILER::COMPILE-SCAN-DEFINE-FILE-INFO (*STANDARD-INPUT* FILECREATEDLOC) +\VFMGetPageGroup (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) MSINTERPRET (TYPE SHOWSET EDIT EDITCOMS DONE) + PRIN4 (*PRINT-ESCAPE* *READTABLE* *PRINT-LEVEL* *PRINT-LENGTH* *PACKAGE* \THISFILELINELENGTH) DMPHASH + (ARRAYNAME) LAYOUTSEXPR1 (RESULT) \LFGetFileName (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PRINTPARA ( +LMARG RMARG P2FLAG FILE) TTYIN (SPLST HELP OPTIONS ECHOTOFILE TABS UNREADBUF RDTBL) \CORE.GETFILENAME +(ROOT EXT VERS) READ (*READTABLE* *READ-NEWLINE-SUPPRESS*) DBG::ATTACH-BACKTRACE-MENU (\TERM.OFD +BACKTRACEFONT) \FILLBUFFER (RTBLSA) SPELLFILE (NAME EXTENSION VERSION SPELLVAL DIRHOSTS HOST) +\FILLPOLYGON.PSC (FILL.WRULE) APROPOS (RESULT FILTERFN DISPLAYSTREAM) \VFMDelete (deleteKey +deleteLevel firstFlag lastFlag volumePage nextKey) LOADFNS (FILE LDFLG VARS *PACKAGE* DFNFLG +BUILDMAPFLG FILEPKGFLG ADDSPELLFLG LISPXHIST FNLST VARLST DONELST FILECREATEDLST FILECREATEDLOC) +ADDTOVAR (DFNFLG) CL::%%RATIO-PRINT (\THISFILELINELENGTH) \UFS.DIRECTORY.NAME (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) PPSPP (SI::*RESETFORMS*) CHNGNM (SI::*RESETFORMS*) COMPILER::TEST-ALPHA-2 (SPECVARS +LOCALVARS LOCALFREEVARS GLOBALVARS) WRITE (*PRINT-ESCAPE* *PRINT-RADIX* *PRINT-BASE* *PRINT-LEVEL* +*PRINT-LENGTH* *PRINT-CASE* *PRINT-GENSYM* *PRINT-ARRAY* *PRINT-PRETTY* *PRINT-CIRCLE* +*PRINT-CIRCLE-HASHTABLE* *PRINT-CIRCLE-NUMBER* THERE-ARE-CIRCLES) ASKUSER (LISPXPRNTFLG OPTIONSLST +FILE READBUF) HASHFILESPLST1 (XWORD) LEAF.ASSURE.FINISHED (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +COMPILER::COMPILE-FILE-DEFINE-FILE-INFO (*STANDARD-INPUT* FILECREATEDLOC) \GETSPP (SI::*LOCKED-MONITOR* + SI::*RESETFORMS*) INREADMACROP (\READDEPTH) PROMPTFORWORD (TERMINCHARS.LST ECHO.CHANNEL +DONTECHOTYPEIN.FLG TTYD X0Y0 TIMELIMITEXPIRED? BELLBEENHEARD? CHARBUFFER RUBBING?) HCOPYALL1 (NH) +\TERMINATESPP (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CLDISABLE (SI::*RESETFORMS*) CCCSCAN (SUBMAPS +OLDREF) DIRECTORY (COMMANDS DEFAULTEXT DEFAULTVERS VALUE COLUMNS NAMEFLG FILEGROUP DESIREDPROPS +LASTHOST&DIR) LAYOUTSEXPR (RESULT) \VFMInit (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \PRINTNSADDRESS ( +\THISFILELINELENGTH) SHOWDEF (T) VALUOF (LINE BACKUP HISTORYFLG) \LEAF.GETFILE (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) TEDIT.INCLUDE (START-OF-PIECE) PUTSEQUIN (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +\VAMRecomputeFreePageCount (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \BSP.PREPARE.INPUT ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CL:FIND-PACKAGE (*PACKAGE-FROM-NAME*) MAKEFILES (SI::*RESETFORMS* +) READBQUOTE (\INBQUOTE) \IDATESCANTOKEN (*STR* *POS*) PPT (*STANDARD-OUTPUT* SI::*RESETFORMS*) PACK* +(PACK.INDEX \PNAMESTRING) EDITDEF (SOURCE) BKSYSBUF.GENERAL (SI::*RESETFORMS*) FIXSPELL ( +SI::*RESETFORMS*) COMPILER::RESOLVE-VARIABLE-BINDING (COMPILER::*NEW-GLOBALS* COMPILER::*NEW-SPECIALS* + SPECVARS LOCALVARS LOCALFREEVARS GLOBALVARS) SEDIT::SEDITL (TYPE TTYEDITFN) \VFMDeletePageGroup ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) TB.MAKE.BROWSER (FONT PRINTFN COPYFN CLOSEFN AFTERCLOSEFN TITLE + COLUMNS USERDATA LINESPERITEM ITEMHEIGHT BASELINE HEADINGWINDOW LINETHICKNESS) CLISPFOR0A (LASTPTR) +MSERASE (ERASESET) \LOAD-STREAM (LDFLG PRINTFLG LOAD-VERBOSE-STREAM DFNFLG BUILDMAPFLG FILEPKGFLG +ADDSPELLFLG LISPXHIST FILECREATEDLST FILECREATEDENV FILECREATEDLOC FILE) PFI.ENQUEUE ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) APPENDTOVAR (DFNFLG) CLISPATOM0 (LISPXHIST SI::*RESETFORMS*) +DUMPDATABASE (DUMPEDFLG DUMPTABLE) \LEAF.FLUSH.CACHE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +RECORDACCESS (DATUM) PURGEDSKDIRECTORY (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) DWIMDEF (NOSPELLFLG +DWIMESSGAG FILEPKGFLG LISPXHIST) SI::EXPAND-CONDITION-CASE (*BYTECOMPILER-IS-EXPANDING*) +SUPERPRINT/SPACE (RMARGIN SPACEWIDTH LEFT) CL:PEEK-CHAR (\RefillBufferFn) ENTER-NEW-NICKNAMES ( +*PACKAGE-FROM-NAME*) SYSOUT (FILE) CHAT.TYPEIN (STREAM) BYTEBLOCKCOMPILE2 (SI::*RESETFORMS*) +\NSFILING.SETFILEINFO (NAME.OR.STREAM ATTR/VAL) DO?CMD (\?TAIL \?PARAMS \BUFFER \STARTED) EDITH ( +SI::*RESETFORMS*) CL:MAKE-PACKAGE (*PACKAGE-FROM-INDEX* *PACKAGE-FROM-NAME*) CL:COMPILE (SPECVARS +LOCALVARS LOCALFREEVARS GLOBALVARS) POSSIBILITYFN (COMVAR## POSSLIST##) BSP.PUTINTERRUPT ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) LAYOUTLATTICE (NODELST MOTHERD PERSONALD FAMILYD) +MSPRGTEMPLATE1 (EXPR) MAKESYS (FILE NAME) CONDITIONS::EXPAND-RESTART-CASE (*BYTECOMPILER-IS-EXPANDING* +) COMP.USERFN (FN OTHERVARS) HASDEF (TYPE) FITP (ENDTAIL SPACEWIDTH CAREFUL) USEREXEC (SI::*RESETFORMS* +) MSTRYSPELLTYPE (TYPE) CL:USE-PACKAGE (*PACKAGE*) MACROEXPANSION (COMPILE.CONTEXT NCF PCF VCF EFF +EXPR EXP RETF PREDF) SI::EXPAND-PROCEED-CASE (*BYTECOMPILER-IS-EXPANDING*) TB.DO.ITEM.SELECTION ( +SELECTIONSTATE BROWSER FIRSTVISIBLE# LASTVISIBLE#) COMPILER::RESOLVE-VARIABLE-REFERENCE (SPECVARS +LOCALVARS LOCALFREEVARS GLOBALVARS) DWIM-SYMBOL-PACKAGE (FAULTX FAULTAPPLYFLG) COLLECTKEYS (MKSTRING? +KEYLST) CALLSCCODE (IGNOREFNS) \VFMGet (getKey getLevel) \LFSetFileInfo (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) DEFAULT.EDITDEF (RETRY) IMPORT (*PACKAGE*) \EVALFORMASLAMBDA (*ARGVAL* *FN* *TAIL*) +UNSAVEFNS (SI::*RESETFORMS*) EDRPT (SI::*RESETFORMS*) CL:PROVIDE (*MODULES*) TEDITCHAT.MENUFN (WINDOW +STATE) INFILECOMTAIL (SI::*RESETFORMS*) \NSFILING.GETFILEINFO (DESIREDPROPS) SEDIT::SETUP-NEW-CONTEXT +(SI::*LOCKED-MONITOR* SI::*RESETFORMS*) DO-HISTORY-SEARCH (*EVENTS*) CL:SHADOW (*PACKAGE*) \SENDSPP ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) APPLY (\INTERNAL) \DFSFreeDiskPages (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) EXPORT (*PACKAGE*) MSPATHS (SI::*RESETFORMS*) COMPILER::PROCESS-IL-DECLARATIONS ( +SPECVARS LOCALVARS GLOBALVARS) CL:SHADOWING-IMPORT (*PACKAGE*) EDITCOMA (PRETTYFLG *READTABLE*) +CHAT.MENU (WINDOW STATE) COPYCHARS (CNT) TEDITFROMBRAVO (NOUT) RECORDTRAN (LISPXHIST DWIMESSGAG +NOSPELLFLG) \MOUSE.PROCESS (\OLDTTY \MOUSEBUSY) GETCLEARINGHOUSE (SI::*LOCKED-MONITOR* SI::*RESETFORMS* +) PACKFILENAME (HOST DEVICE STRUCTURE DIRECTORY SUBDIRECTORY NAME EXTENSION VERSION TEMPORARY +PROTECTION ACCOUNT) COMPILER::START-COMPILATION (SI::*RESETFORMS*) BLOCKCOMPILE (NLAMA NLAML LAMS LAMA + NOFIXFNSLST NOFIXVARSLST EXPRSLST) DBG::CREATE-DEBUGGER-WINDOW (\TERM.OFD DEFAULTTTYREGION) +GETDEFFROMFILE (NAME LOAD-VERBOSE-STREAM) FILING.CALL (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \WRITE1 +(FONTCHANGEFLG \THISFILELINELENGTH) \LFOpenFile (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CL:IN-PACKAGE +(*PACKAGE*) HASHFILESPLST (T) \LFExtendFileIfNecessary (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +TTYIN.PPTOFILE (FONTCHANGEFLG) MAPRELATION (MAPZ MAPW MAPFN2 MAPFN) TIMEALL (STRF LCFIL) +SPELLFILE.SPELL1 (VERSION) COMPILER::UPDATE-ENVIRONMENT (COMPILER::*NEW-SPECIALS* COMPILER::*NEW-GLOBALS* + COMPILER::*NEW-INLINES* COMPILER::*NEW-NOTINLINES*) \UFS.NEXTFILEFN (FILEGROUP DEFAULTEXT +DESIREDPROPS DEFAULTVERS) SEDIT::SMART-TTYFN (L TTYEDITFN) CHANGECCODE (ALL-CODE-BASES) +PRINTER.BITMAPFILE (T) CL:RENAME-PACKAGE (*PACKAGE-FROM-NAME*) CLOSEBSPSTREAM (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) \PROG0 (*TAIL* *FIRSTTAIL*) FASL:PROCESS-FILE (FILEPKGFLG DFNFLG LISPXHIST +ADDSPELLFLG) CL:UNINTERN (*PACKAGE* *QUERY-IO*) \VAMFreePageGroup (SI::*LOCKED-MONITOR* SI::*RESETFORMS* +) EXPANDMACRO (NCF PCF VCF EFF EXP COMPILE.CONTEXT) PROGN (*TAIL*) MAPRINT (SI::*RESETFORMS*) +DELETE-PACKAGE (*PACKAGE-FROM-NAME*) SEDIT::VERIFY-STRUCTURE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +EXPAND-DEFMACRO (*MACRO-VARS* *MACRO-VALS* *MACRO-FORM* *MACRO-DEFAULT*) PRETTYDEF (PRTTYFILE +REPRINTFNS SOURCEFILE CHANGES *PRINT-ARRAY* XCL:*PRINT-STRUCTURE* *PRINT-LEVEL* *PRINT-LENGTH* +NEWFILEMAP ORIGFLG FILEFLG NLAMALST PRTTYSPELLFLG PRETTYCOMSLST PRTTYCOMS LAM?LST FNSLST OLDFILEMAP +LAMALST MAPADR NLAMLST DESTINATIONENV SOURCEFILENV %#RPARS) PRINT-CIRCLE-LABEL-P ( +*PRINT-CIRCLE-HASHTABLE*) PROMPTCHAR (ID HISTORY PROMPTSTR) PEEKC (\RefillBufferFn) DEBUGGER (WBREAK +AUTOBACKTRACEFLG BRKEXP BRKCOND BRKENV BRKPOS BRKFN \#DISPLAYLINES \CURRENTDISPLAYLINE \INTERRUPTABLE +\INBQUOTE LASTPOS \LINEBUF.OFD \TERM.OFD *STANDARD-INPUT* *STANDARD-OUTPUT* BRKVALUES !VALUE +\PRIMTERMTABLE \PRIMTERMSA) CLISPFOR (LISPXHIST SI::*RESETFORMS*) CL:UNUSE-PACKAGE (*PACKAGE*) +\STRINGWIDTH.GENERIC (TOTALWIDTH WIDTHSBASE CSET FONT SPACEWIDTH) \EVPROG1 (*TAIL*) PEEKCCODE ( +\RefillBufferFn) PFCOPYBYTES (T) EXEC-EVAL (*CURRENT-EVENT* LISPXHIST HELPCLOCK) BCOMPL.BODY (CFILE +SPECVARS LOCALVARS CHANGES OTHERS FIRST BLOCKS BLKFNS DESTINATIONENV DEFS) HPRINT1 (VALS) +PRINT-CIRCLE-ENTER (*PRINT-CIRCLE-HASHTABLE* THERE-ARE-CIRCLES) \LFCloseDevice (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) CLISP3C (SI::*RESETFORMS*) CLSMARTEN (NOSPELLFLG) \SEQUIN.PROCESS (SEQUIN +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) COMP.EVQ (SI::*RESETFORMS*) COMPILER::PEEPHOLE-OPTIMIZE ( +COMPILER::TAGS-USED) CL:REQUIRE (*MODULES* *DEFAULT-PATHNAME-DEFAULTS* DIRECTORIES +*COMPILED-EXTENSIONS*) \VFMSplit (splitKey splitLevel keyStone page) RATOM (*READTABLE* *PACKAGE* +\RefillBufferFn) \SUBREAD (\RBFLG) COMPILER::PROCESS-DECLARATIONS (COMPILER::*NEW-SPECIALS* +COMPILER::*NEW-GLOBALS* COMPILER::*NEW-INLINES* COMPILER::*NEW-NOTINLINES* SPECVARS LOCALVARS +GLOBALVARS) CL:UNEXPORT (*PACKAGE*) COURIER.BROADCAST.CALL (NEARBYNETS) PRINTCODE (OUTF CODEBASE IVARS + PVARS FVARS I4 I6) PRINTDEF (MAKEMAP SPACEWIDTH %#RPARS RMARGIN FILEFLG FIRSTPOS) ASSURE.PUP.READY ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) SI::PRINT-TRACE-EXIT-INFO (BOLDFONT DEFAULTFONT) +\LEAF.CLOSEFILE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PF* (SI::*RESETFORMS*) UNDONLSETQ ( +SI::*RESETFORMS*) FLTSTR (TEXP THI TLO) ERRORSET (SI::*NLSETQFLAG*) MSDESCRIBE (FN) CL:FIND-SYMBOL ( +*PACKAGE*) PRINTCOMSTRAN (VARS) STORAGE (HUNKSTATS) TRANSLATE.DATATYPE (TYPENAME UNUSED BIT OFFSET FD) + MSUPDATE (VARS) \TOP-LEVEL-READ (*PACKAGE* \RefillBufferFn *CIRCLE-READ-LIST* EOF-VALUE) CL:DIRECTORY + (GENERATOR) SEQUENTIAL.PRETTYPRINT (TAIL LEFT) CL:LIST-ALL-PACKAGES (*PACKAGE-FROM-NAME*) READC ( +*READTABLE* \RefillBufferFn) BROWSE/LAYOUT/HORIZ/COMPACTLY (RETURNTTC RETURNBTC) \LFGenerateFiles ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) MAKEFILE (PRETTYFLG) FLTINTLOG (TEXP THI TLO) \STORAGE.TYPE ( +ALLOCMDS) \UFS.ABORT.DIRECTORY (FILEGROUP) READCCODE (*READTABLE* \RefillBufferFn) CASE.PRETTYPRINT ( +LEFT TAIL FORMFLG) RPT (RPTN) AND (*TAIL*) \LET0 (*TAIL*) \SEQUIN.CLOSE (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) SI::PRINT-TRACED-CL-ARGLIST (BOLDFONT DEFAULTFONT) \UFS.ABORT.CL-DIRECTORY ( +GENERATOR) PURGEHISTORY (SI::*RESETFORMS*) SETQ (*TAIL*) RPTQ (RPTN) READLINE (LINE LISPXFLG SPACEFLG) + SI::PRINT-TRACE-ENTRY-INFO (BOLDFONT DEFAULTFONT) LAYOUTGRAPH (NODELST MOTHERD PERSONALD FAMILYD +BOX.BOTH.FLG BOX.LEAVES.FLG BORDER.FOR.MARKING LABELSHADE.FOR.MARKING) \LET* (*TAIL*) SKIPSEPRCODES ( +\RefillBufferFn) FAKE-COMPILE-FILE (COMPILE.FILE.AFTER COMPILE.FILE.VALUE NLAML NLAMA LAMS LAMA DFNFLG + *PACKAGE* *READ-BASE* LOCALVARS SPECVARS LSTFIL) PROG1.PRETTYPRINT (LEFT) COND (*TAIL*) COMPARELST ( +LOOSEMATCH) \LFEventFn (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \EVPROGN (*TAIL*) TB.EXPANDFN ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) FIND-LEXICAL-ENVIRONMENT (LASTPOS) \IFS.LOOKUPFILE ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \DURATIONTRAN (TIMERUNITS USINGTIMER USINGBOX FORDURATION +RESOURCENAME UNTILDATE) PROG1 (*TAIL*) PROGV.PRETTYPRINT (LEFT) COMPILER::ALPHA-COMBINATION (NLAMA +NLAML) \VAMAllocPageGroup (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \GETFILINGCONNECTION ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) TB.FINISH.CLOSE (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +DO.PRETTYPRINT (LEFT TAIL) INTERN* (*KEYWORD-PACKAGE*) DO-EVENT (RETRYFLAG HELPCLOCK) UNDOLISPX3 ( +SI::*RESETFORMS*) SKREAD (*READTABLE* *READ-SUPPRESS* \RBFLG) \BSP.PREPARE.OUTPUT (SI::*LOCKED-MONITOR* + SI::*RESETFORMS*) CLISPIF (LISPXHIST SI::*RESETFORMS*) EVAL (\INTERNAL) \OPENLEAFCONNECTION ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) DASSEM.DSTOREFNDEF (SI::*RESETFORMS*) MSCHECKBLOCK (GLOBALVARS +RETFNS BLKLIBRARY NOLINKFNS LINKFNS DONTCOMPILEFNS) READIMAGEOBJ (UNDERREADIMAGEOBJ) \LFDirectoryNameP + (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \DOVMEMFULLINTERRUPT (SI::*RESETFORMS*) DODIRCOMMANDS ( +FILENAME FILE NAMEPRINTED I) COMPARENCHARS (*READTABLE* *PRINT-ESCAPE*) COMPARELISTS (DIFFERENCES) +COMPILE! (LCFIL LAPFLG STRF SVFLG LSTFIL SPECVARS LOCALVARS NLAMA NLAML LAMS LAMA NOFIXFNSLST +NOFIXVARSLST) SEDIT::TTYFN (L EDITCHANGES SI::*LOCKED-MONITOR* SI::*RESETFORMS*) SEDIT::RESHAPEFN ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \FTP.NEXTFILE (FTPCONNECTION) CLISPFOR0 (EXP LASTPTR I.S.PTRS) +DELFROMCOMS (COMS) CLOSERTPSOCKET (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \SPPWATCHER (SPPCON +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) GENERATEFN (COMVAR##) LISPX (HELPFLAG LISPXVALUE LISPXVALUES +SI::*RESETFORMS*) \CHECK.PQUEUE (SI::*RESETFORMS*) FIND-HISTORY-EVENTS (*EVENTS*) MSPRGDWIM ( +NOSPELLFLG SI::*RESETFORMS*) CLISPEXPANSION (NOSPELLFLG VARS LISPXHIST) BSPPUTMARK (SI::*LOCKED-MONITOR* + SI::*RESETFORMS*) MENU.HANDLER (SUBMENU MOVEDLEFT) \DSKEventFn (SI::*LOCKED-MONITOR* SI::*RESETFORMS* +) PACKFILENAME.STRING (HOST DEVICE STRUCTURE DIRECTORY SUBDIRECTORY NAME EXTENSION VERSION TEMPORARY +PROTECTION ACCOUNT) FW-OPENP (!SCRATCHLIST !SCRATCHTAIL) DBG::FIND-DEBUGGER-STACK-FRAME (LASTPOS) +\TRACKWITHBOX (ORGX ORGY BOXWIDTH BOXHEIGHT) \DOBUFFEREDTRANSITIONS (\INTERRUPTABLE PENDINGINTERRUPT) +CREATEDSKDIRECTORY (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) CALLS (SI::*RESETFORMS*) \SOUT ( +*DRIBBLE-OUTPUT* \PRIMTERMSA \TERM.OFD) \DSKCloseDevice (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +SI::UNWIND (RESETSTATE) \PRINDATUM.TO.STRING (*PRINT-CIRCLE-HASHTABLE* *PRINT-CIRCLE-NUMBER* +THERE-ARE-CIRCLES) RSTRING (*READTABLE* \RefillBufferFn *READ-SUPPRESS*) CHDIR (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) \RTP.SOCKET.PROCESS (BSPSOCKET) PRETTYCOM (ORIGFLG) XCL:COMPILE-FORM (SPECVARS +LOCALVARS LOCALFREEVARS GLOBALVARS) CL:FIND-ALL-SYMBOLS (*PACKAGE-FROM-NAME*) COPYVM (SI::*RESETFORMS* +) \VFMMerge (mergeKey mergeLevel mergeFlag leftInterval rightInterval) PP* (**COMMENT**FLG +*STANDARD-OUTPUT*) DBG::BACKTRACE-ITEM-SELECTED (BRKENV) \DSKOpenDevice (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) GRAPHEDITCOMMANDFN (GRAPHWINDOW) CLEARCLISPARRAY (NAME TYPE REASON) +\VFMInsertPageGroup (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \FLOATINGSCALE (TEXP THI TLO) +\BSP.DEFAULT.ERROR.HANDLER (%#MYHANDLE#) CL:ERROR (PRINTMSG ERRORPOS) \INIT.POWERS.OF.TEN (TEXP THI +TLO) \LFOpenDevice (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) EDITFROMFILE (SI::*RESETFORMS*) RANDSET ( +\OVERFLOW) \MAKE.PROCESS0 (%#FORM# HELPFLAG \CURRENTDISPLAYLINE \#DISPLAYLINES \LINEBUF.OFD +*STANDARD-INPUT* *READTABLE* \PRIMREADTABLE \PRIMTERMTABLE \PRIMTERMSA TtyDisplayStream \TERM.OFD +\TTYWINDOW *STANDARD-OUTPUT* \INTERRUPTABLE READBUF *CURRENT-PROCESS* SI::*RESETFORMS* +*DRIBBLE-OUTPUT* RESETSTATE) DUNPACK (!SCRATCHLIST !SCRATCHTAIL) \MAPCHARS (RDTBL) +SCAVENGEDSKDIRECTORY (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) BSPFORCEOUTPUT (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) SUB-FORMAT (*FORMAT-INDEX* *FORMAT-LENGTH*) MSNOTICEFILE (SI::*RESETFORMS*) +\UFSEventFn (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) IDATE (*STR* *POS*) \VFMGenerateFileIDs ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) BRECOMPILE (*PRINT-ARRAY* *PRINT-LENGTH* *PRINT-LEVEL* NLAMA +NLAML LAMS LAMA DWIMIFYCOMPFLG EXPRSLST NOFIXFNSLST NOFIXVARSLST BUILDMAPFLG SPECVARS LOCALVARS +CHANGES OTHERS FIRST BLKFNS BLOCKS DESTINATIONENV ADRLST FILEMAPLST CFILE FNS FILE LDFLG VARLST +DONELST FNLST) RESETFORM (SI::*RESETFORMS*) \FORMATLINE (LOOKS CHLIST WLIST FONTWIDTHS CHNO ASCENT +DESCENT LOOKNO LINE FONT INVISIBLERUNS DEVICE SCALE NEWASCENT NEWDESCENT TLEN) \LFCloseFile ( +SI::*LOCKED-MONITOR* SI::*RESETFORMS*) DCHCON (!SCRATCHLIST !SCRATCHTAIL) PRIN1 (*PRINT-RADIX* +*PRINT-ESCAPE* *PRINT-LEVEL* *PRINT-LENGTH* *PRINT-CASE* \THISFILELINELENGTH) RESETVARS ( +SI::*RESETFORMS*) \UFSOpenFile (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) COMPILE (NLAMA NLAML LAMS LAMA +NOFIXFNSLST NOFIXVARSLST SPECVARS LOCALVARS) INSPECT (WHERE) LISPXFIND (SI::*RESETFORMS*) +RDTBL\NONOTHERCODES (RESULT) \MAPPNAME.INTERNAL (\THISFILELINELENGTH) SUPERPRINT/WRAPPER (LEFT) +\NEW.READ.SYMBOL (LITATOM-PACKAGE-CONVERSION-ENABLED *READTABLE* FILERDTBL CODERDTBL *PACKAGE* +*LISP-PACKAGE* *INTERLISP-PACKAGE*) \UFSOpenDevice (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +\UFSSetFileInfo (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PRINT-CIRCLE-SCAN (*PRINT-ARRAY*) PRETTYDEFCOMS (FNSLST *PRINT-ARRAY* XCL:*PRINT-STRUCTURE* *PRINT-LEVEL* *PRINT-LENGTH* BUILDMAPFLG -NEWFILEMAP ORIGFLG PRTTYSPELLFLG LAM?LST SOURCEFILE \#RPARS) SUPERPRINT/WRAPPER (LEFT) COPYHASHFILE ( -HASHFILE FN NEWHASHFILE) CL:ERROR (PRINTMSG ERRORPOS) |\\UFSOpenFile| (SI::*LOCKED-MONITOR* -SI::*RESETFORMS*) POSSIBILITYFN (COMVAR## POSSLIST##) |\\LFExtendFileIfNecessary| (SI::*LOCKED-MONITOR* - SI::*RESETFORMS*) NIL -LOCALVARS \\INTERPRETER (FN ARGLIST T) \\LINKBLOCK (BASE N) READATOM (SI::$PROG1-FIRST-EXPRESSION$) -\\FM.EDIT-SETUP (SI::$PROG1-FIRST-EXPRESSION$) LAST (XX) INSPECT/TYPELESS (BASE N) STKAPPLY (T) -|\\UFSGetFileInfo| (#:G851) \\DELETEBLOCK? (BASE N) \\MERGEBACKWARD (BASE N) POSTSCRIPT.PUTBITMAPBYTES - (T) \\TEXTTTYBOUT (TABLEA1582 TABLEA1583) \\TEDIT.BLTCHAR (T) SEDIT::LINEARIZE-CLISP (#:G844) -\\RSTRING2 (TABLE CHAR BASEA1789 OFFSETA1788) \\RETURN (T) PRIN2-LONG-STRING ($$TEM1 $$TEM2 $$TEM3 -$$TEM4 $$TEM5) |\\LFGenerateFiles| ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) FB.REMOVE.FILE (FD1 FD2) -RETAPPLY (T) SEDIT::OUTPUT-STRING (SEDIT::CONTEXT SEDIT::NEW-LPTR) SPP.DSTYPE (SI::*OR-GENTEMP*) -\\FM.NUMBER-CHANGESTATE (SI::$PROG1-FIRST-EXPRESSION$) TTSKREAD (TABLE CHAR CH) INCORNER.REGION (A) -OPENPUPSOCKET (SOCHI SOCLO) \\MEDW.OPENW (SI::*OR-GENTEMP*) \\TEDIT.PUT.CHARLOOKS.LIST (STREAM W) -\\TELERAIDCOMMAND (KEYNUMBER) WINDOW.MOUSE.HANDLER (SI::*OR-GENTEMP*) \\IRM.GET.KEYWORDS ($$OUTPUT) -\\JISPEEK (SI::*OR-GENTEMP*) \\PARSE.PORTCONSTANT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) SEDIT::PRINT-STRING - ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \\GCMAPTABLE (XA1810 XA1811) |\\UFSDeleteFile| (#:G849) -\\PACK.ITEM (BASEA1769 OFFSETA1768) TTYIN.FINISH (TABLE CHAR CH) |\\UFSSetFileInfo| (#:G852) -\\JISFILEOUTCHARFN (SI::*OR-GENTEMP*) \\TEDIT.GET.TERMSA.WIDTHS (A J V) \\10MBSENDPACKET (X Y) -PROCESS.EVAL (T) SEDIT::INSPECT-SELECTION ($$OUTPUT) \\HCPYMODEBLTCHAR (T SI::*OR-GENTEMP*) \\CURVEEND - (NEWXA1708 NEWYA1707 A SI::*OR-GENTEMP*) \\TEDIT.PURGE.SPACES (BASEA1565 BASEA1566) \\FM.EDIT-DELETE -(SI::$PROG1-FIRST-EXPRESSION$) \\FM.NUMBER-SETUP (SI::$PROG1-FIRST-EXPRESSION$) BRACKET.CURRENT.WORD ( -X CH) \\TEDIT.PUT.CHARLOOKS.LIST2 (STREAM W) BKSYSBUF ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) FNTH (X0) -TTYIN1 (TABLE CHAR CH) \\SMASHSTRING ($$TEM1 $$TEM2 $$TEM3 $$TEM4) \\PS.BOUTFIXP (T) \\JISIN ( -SI::*OR-GENTEMP* KU TEN) COURIER.WRITE.SEQUENCE.UNSPECIFIED (STREAM W FIXP) \\PSWOP.SELECTED ( -|\\DurationLimit|) \\GETCHARCODE (X) DASSEM.DSTOREFNDEF (X DEFA1622 VALUEA1621 DEFA1624 VALUEA1623 -DEFA1626 VALUEA1625) \\INSERTCH ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \\FM.TOGGLE-SETUP ( -SI::$PROG1-FIRST-EXPRESSION$) TTYIN.READ (STREAM CHAR CH TABLE) \\SHIFTJISIN (SI::*OR-GENTEMP* HI LO) -\\SHIFTJISPEEK (SI::*OR-GENTEMP*) IDATE (UCHAR) \\BACKSHIFTJISCHAR (CHAR) \\LET*-RECURSION (T) -\\MERGEFORWARD (BASE N) \\SLOWHCPYMODEBLTCHAR (SI::*OR-GENTEMP*) BRKDWNFBOXES (T PTRA1614 VALA1613 -PTRA1616 VALA1615) TTYDISPLAYSTREAM (A) FIND.NEXT.WORD (X CH) APPENDNUMBER.IP (STREAMA1587 NUMA1586) -\\STRINGHASHBITS-UFN ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \\DOFORMATTING (BASEA1567 BASEA1568 -BASEA1569 BASEA1570 BASEA1571 ARR N VAL BASEA1572 BASEA1573) COURIER.WRITE.SEQUENCE (STREAM W) -\\UFS.RECOGNIZE.FILE (#:G846) TEDIT.PUT.PCTB2 (ARR NO BASEA1551 $$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) PP - (T) \\FM.EDIT-WORDDELETE (SI::$PROG1-FIRST-EXPRESSION$) SEDIT::OUTPUT-SPACE (SEDIT::CONTEXT -SEDIT::NEW-LPTR) \\CURVE (T A SI::*OR-GENTEMP* NEWXA1700 NEWYA1699 NEWXA1702 NEWYA1701 NEWXA1704 -NEWYA1703 NEWXA1706 NEWYA1705) \\STREAMCHARWIDTH (TABLEA1723 TABLEA1724) STRPOS (CABASE CASIZE CAFAT -CHAR) PRINTBITMAP (T) \\RPLCHARCODE (FATPA1776 BASEA1775 OFFSETA1774) \\CLOSEF.PRESS (STREAM W) -DINFO.SPECIAL.UPDATE ($$OUTPUT) \\FM.NWAY-SETUP (SI::$PROG1-FIRST-EXPRESSION$) \\SELECTREALPAGE ( -SI::*OR-GENTEMP* A) \\GETREADSYNTAX (TABLEA1765) \\TEDIT.HARDCOPY.FORMATLINE (ARR N VAL BASEA1521 -BASEA1522 BASEA1523 BASEA1524 FONTDESC CHARCODE BASEA1525) \\FTP.HANDLE.NO ($$OUTPUT) -\\TEDIT.PUT.SINGLE.PARALOOKS2 (STREAM W) \\GETTERMSYNTAX (TABLEA1760 TABLEA1761) \\ATMOUT (STREAM W -$$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) CHARACTER (BASEA1770) POWEROFTWOP (T X) \\GENERIC.READP (TABLE -CHAR) TTSKIPSEPR (CH) TEDIT.GETFUNCTION (TABLEA1580) SEDIT::OUTPUT-CR (SEDIT::CONTEXT SEDIT::NEW-LPTR -SEDIT::LINE) \\SHIFTJISFILEOUTCHARFN (SI::*OR-GENTEMP*) \\EUCIN (KU TEN SI::*OR-GENTEMP*) -WORD.MATCHES.BUFFER (TABLE CHAR CH) READ-EXTENDED-TOKEN (CHA1787 EOLCA1786) STREQUAL (T) -FIND.MATCHING.QUOTE (TABLE CHAR CH) TTYIN.SHOW.?ALTERNATIVES (X) \\FM.MOMENTARY-SETUP ( -SI::$PROG1-FIRST-EXPRESSION$) \\HANDLE.RAW.10TO3 (XA1600) PROCESS.APPLY (T) \\XIPERROR (X) -\\BULK.DATA.CLOSE (SI::*OR-GENTEMP*) DCODERD (DEFA1738 VALUEA1737 DEFA1740 VALUEA1739 DEFA1742 -VALUEA1741) |\\VFMSmartBLT| (SI::*OR-GENTEMP* XA1599) LENGTH (N) \\SHIFT.DOCUMENT (ARR NO BASEA1543) -L-CASE ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) DUMPINITPAGES (VPAGE) SORT1 (T) BITMAPBIT (SI::*OR-GENTEMP* -) U-CASEP ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) MAKEINITLAST (PTR X SI::*OR-GENTEMP*) CHAT.STARTUP ( -$$OUTPUT) FNTYP (#:G858 #:G859) \\FM.EDIT-INSERT (SI::$PROG1-FIRST-EXPRESSION$) U-CASE ($$TEM1 $$TEM2 -$$TEM3 $$TEM4 $$TEM5 FATP BASE OFFSET CODE) FILL.INITTBLE (SI::*OR-GENTEMP*) TEDIT.EXTEND.SEL (A) -\\FM.STATE-CHANGESTATE (SI::$PROG1-FIRST-EXPRESSION$) TWODINSPECT.COPYBUTTONFN (SI::*OR-GENTEMP*) -\\UFS.DIRECTORY.NAME (#:G847 #:G848) \\PRINTFRAME (FAST INCALL VALIDNAMETABLE NOPUSH USECNT SLOWP -ALINK FNHEADER NEXTBLOCK NAMETABLE BLINK) SEDIT::SHRINKFN ($$OUTPUT) |\\SETUPTIMERmacrofn| (X) -\\UFS.REMOVE.HOST.FIELD (#:G856) CHARWIDTH (FONTDESCA1720) \\IRM.WILD.REF ($$OUTPUT) \\RPLCONS (A LO) -\\SETNEWTIME0 (A) \\PROTECTED.APPLY (T) \\TEDIT.PUT.SINGLE.CHARLOOKS2 (STREAM W) \\MEDW.BLTCHAR (T -SI::*OR-GENTEMP*) \\TRANSLATE.10TO3 (X Y) |UnixShellQuote| (T) \\SLOWHDCPYBLTCHAR (SI::*OR-GENTEMP*) -\\ITEM.WINDOW.COPY.HANDLER (SI::*OR-GENTEMP*) \\FILLBUFFER (STRM CHAR TABLE) \\EUCFILEOUTCHARFN ( -SI::*OR-GENTEMP*) UNION (T) DINFO.HISTORIC.UPDATE ($$OUTPUT) SPP.FORCEOUTPUT (STREAM NBYTES) -\\GETBRUSHBBT (BBT |SourceType| |Operation|) OPT.INITHASH (T) \\PUTBASESTRING ($$TEM1 $$TEM2 $$TEM3 -$$TEM4) \\PARSEARRAYSPACE1 (BASE N) \\CHARWIDTH.PRESS (FONTDESC CHARCODE) TTUNREADBUF (CH) -MB.MARGINBAR.SELFN (A) \\CHARWIDTH.IP (FONTDESCA1588) \\HANDLE.RAW.XIP (SOCNUM) PPT (T) -\\FM.EDIT-PREPARETOEDIT (SI::$PROG1-FIRST-EXPRESSION$) \\DSPPRINTCR/LF (SI::*OR-GENTEMP*) -\\SETREADSYNTAX (TABLEA1766) SYNTAXP (TABLEA1744 TABLEA1745 TABLEA1746 TABLEA1748 TABLEA1749 -TABLEA1751 TABLEA1752 TABLEA1754 TABLEA1755 TABLEA1757 TABLEA1758) STRINGWIDTH (FONTDESC CHARCODE) -PREVWORD (X CH) OPENNSOCKET (SOCNUM) \\STRINGOUT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) SPP.SENDEOM ( -SI::*OR-GENTEMP*) \\SETTERMSYNTAX (TABLEA1763 TABLEA1764) BRKDWNTIME (T PTRA1602 VALA1601 PTRA1604 -VALA1603) CL:PEEK-CHAR (STREAM NOERROR CHA1713 EOLCA1712 CHA1715 EOLCA1714) \\ROUTE.XIP (X) -READ-AFM-FILE (A) \\FM.EDIT-BACKUP (SI::$PROG1-FIRST-EXPRESSION$) BLTSHADE (T) BACKSKREAD (TABLE CHAR -CH) \\FM.EDITSTART-SELECTEDFN (SI::$PROG1-FIRST-EXPRESSION$) FB.COPY/RENAME.MANY (FD1 FD2) EDITDEF (T) - \\DSPSPACEFACTOR.PSC (T) CL:RETURN-FROM (T) \\BACKTRACE (SI::$PROG1-FIRST-EXPRESSION$) FAULTAPPLY ( -ARGLISTA1717 T) COPYATOM (X) \\IDATESCANTOKEN (UCHAR) \\FM.STATE-SETUP (SI::$PROG1-FIRST-EXPRESSION$) -GETHASH (BASEA1803 BASEA1804) \\INTERPRETER-LAMBDA (T) HASH.PASSWORD ($$TEM1 $$TEM2 $$TEM3 $$TEM4 -$$TEM5) |\\PFReplaceString| ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \\MEDW.GETSCREENREGION (A) -\\NOTE.10TO3 (X Y) \\ENTITYEND.PRESS (STREAM W) \\TEDIT.UNPARSE.CHARLOOKS.LIST (VAL A) -\\UFS.HANDLE.RELATIVEDIRECTORY (#:G857) \\FM.MENUHANDLER ($$OUTPUT) PSCFONT.WRITEFONT (STREAM W) -\\COURIER.CHECK.PROCEDURES (X) REVERSE (U) KEYDOWNP (BASE OFFST |\\ByteNo| |\\BitMask| POSITIONA1767) -\\ENTITYSTART.PRESS (STRM) |\\LFMakeDirEntry| (STREAM W) TTCOMPLETEWORD (TABLE CHAR CH X) -DO.EDIT.COMMAND (X CH) \\CHARWIDTH.HDCPYDISPLAY (FONTA1620) SEDIT::LINEARIZE (SEDIT::CONTEXT -SEDIT::NEW-LPTR) SEDIT::HASFAT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \\NSFILING.HANDLE.ERROR (LOCK) -\\SLOWBLTCHAR (SI::*OR-GENTEMP*) \\BSP.HANDLE.INTERRUPT (#:G843) \\TEDIT.LOOKS.UPDATE (ARR N VAL -BASEA1552 BASEA1553 BASEA1554 BASEA1555 BASEA1556 BASEA1557) \\FM.EDITSTART-SETUP ( -SI::$PROG1-FIRST-EXPRESSION$) \\MAIKO.CONS.UFN (A LO PAGE D) TEDIT.STRINGWIDTH ($$TEM1 $$TEM2 $$TEM3 -$$TEM4 $$TEM5) SKOR (SI::*OR-GENTEMP* X Y) \\HDCPYBLTCHAR (T SI::*OR-GENTEMP*) \\TELERAIDSERVER ( -KEYNUMBER) INITDATATYPENAMES (X) \\GETUFNENTRY (BASE N) TTGIVEHELP1 (X) UNPACKFILENAME.STRING (STA1730 - ENDA1729 STA1732 ENDA1731 NAM ST END STA1734 ENDA1733 STA1736 ENDA1735) \\CREATE.SYMBOL (BASE N) -\\EUCPEEK (KU TEN SI::*OR-GENTEMP*) \\LINEBUF.EOFP (STRM) COURIER.OPEN (STREAM W) ETHERHOSTNAME ( -$$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \\CCODEIVARSCAN (X CODEBASE OFFSET DEF LC) \\INIT-MISCN-TABLE ( -BASE N) TEDIT.\\INSERT (T) TCONC (XX) \\ACTONDISKPAGES (SI::*OR-GENTEMP*) \\FM.3STATE-CHANGESTATE ( -SI::$PROG1-FIRST-EXPRESSION$) \\SPP.PREPARE.INPUT (STREAM NBYTES) INTERSECTION (R S) \\TTW1 ( -SI::*OR-GENTEMP*) EDITADDNODE ($$OUTPUT) \\CODEBLOCKP (BASE N) CL:IF (T) \\TEDIT.HCPYLOOKS.UPDATE (ARR - N VAL BASEA1534 BASEA1535 BASEA1536 BASEA1537 BASEA1538 BASEA1539 BASEA1540 BASEA1541 BASEA1542) -SEDIT::ATOM-POINT-TYPE ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) CHARACTER.READ (TABLEA1795 TABLEA1796) -\\GETREGIONTRACKWITHBOX (T) \\TEXTBIN (T) \\ALLOCBLOCK (BASE N SI::$PROG1-FIRST-EXPRESSION$) -CALLSCCODE (X CODEBASE OFFSET) LCONC (XX) \\SEND.EXPEDITED.XIP (X) COURIER.WRITE (STREAM W FIXP) SETD -(BASEA1798 BASE N) \\POSTSCRIPT.OUTCHARFN (T) \\NSFILING.GETFILE (LOCK) \\POSTSCRIPT.ACCENTFN (T -$$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \\GENERIC.READCCODE (CHA1814 EOLCA1813 CHA1816 EOLCA1815) -BRKDWNBOXES (T PTRA1610 VALA1609 PTRA1612 VALA1611) ELTD (BASEA1797 BASE N) \\ARBOUT (STREAM W) -CLOSEALL (T) EVALUABLE.CONSTANTP (X) CL:EVAL (T) \\FM.DISPLAY-SETUP (SI::$PROG1-FIRST-EXPRESSION$) -REHASH (BASE N BASEA1809) \\DISPLAYLINE (BASEA1590 BASEA1591 BASEA1592 BASEA1593 BASEA1594 BASEA1595) -FAULTEVAL (T) |\\LFScavFileName| ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) ATOMHASH#PROBES ($$TEM1 $$TEM2 -$$TEM3 $$TEM4) EOFCLOSEF (T) |\\VAMUpdateVAM| (POSITIONA1598) \\EVAL-INVOKE-LAMBDA (T) \\MEDW.BITBLT ( -SI::*OR-GENTEMP*) \\LEAF.FIX.BROKEN.SEQUIN (|\\DurationLimit|) \\BSP.HANDLE.ERROR (#:G842) -SEDIT::MENU-PRINTBASE-SELECTEDFN ($$OUTPUT) FB.INSERT.FILE (FD1 FD2) TEDIT.INSERT ($$TEM1 $$TEM2 -$$TEM3 $$TEM4 $$TEM5) LASTN (X Y) SEDIT::MENU-PACKAGE-SELECTEDFN ($$OUTPUT) \\FAX.PARSE.NAME ($$TEM1 -$$TEM2 $$TEM3 $$TEM4 $$TEM5) \\CLIPANDDRAWLINE1 (SI::*OR-GENTEMP*) APPLY (T) \\COURIER.CHECK.ERRORS (X -) |\\LFUnpackName| ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) DRAWELLIPSE (T) \\COURIER.ATTENTIONFN ( -SI::*OR-GENTEMP*) FB.INSERT.SUBDIRECTORIES (FD1 FD2) IRM.DISPLAY.REF ($$OUTPUT) \\NSFILING.ADDQUOTES ( -$$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) CL:VALUES (X) \\CHECKCONSPAGE (SI::*OR-GENTEMP*) -\\RECLAIMARRAYBLOCK (BASE N) \\POSTSCRIPT.ACCENTPAIR (T $$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) -SEDIT::COPY-SELECTION ($$OUTPUT) FIND.NON.SPACE (CH) \\TEDIT.PUT.SINGLE.PARALOOKS (STREAM W) -STKARGNAME (X) \\CURVE2 (SI::*OR-GENTEMP* A) CL:VALUES-LIST (X) SETSTKARGNAME (X) -\\STRINGWIDTH.GENERIC ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5 FONTDESC CHARCODE) \\WRITEPRESSBITMAP ( -STREAM W) WHENCLOSE (T) TEDIT.SUBSTITUTE ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) TEDIT.WORDGET (TABLE -CHAR) PRINTADDRS (SI::*OR-GENTEMP*) \\FORMATLINE (ARR N VAL BASEA1558 BASEA1559 BASEA1560 BASEA1561 -BASEA1562 BASEA1563 FONTDESC CHARCODE BASEA1564) \\TEDIT.HARDCOPY.DISPLAYLINE (BASEA1514 BASEA1515 -BASEA1516 BASEA1517 BASEA1518 BASEA1519 ARR NO BASEA1520) \\STRINGWIDTH.HCPYDISPLAYAUX ($$TEM1 $$TEM2 -$$TEM3 $$TEM4 $$TEM5 FONT CHARCODE) APPLY* (FN ARGLIST T) \\FM.3STATE-SETUPOFFBITMAP ( -SI::$PROG1-FIRST-EXPRESSION$) \\PUTBASEBITS (NA1711 POSA1710) FIND.START.OF.WORD (X CH) -\\DSPFONT.HCPYMODE (FONTDESC CHARCODE) CL::VALUES-UFN (X) STRPOSL (TABLE CHAR) \\FM.CHANGELABEL ( -SI::$PROG1-FIRST-EXPRESSION$) EDITSHADE ($$OUTPUT) \\BBTCURVEPT (BBTA1694 |SourceTypeA1693| BBTA1696 -|SourceTypeA1695|) \\WRITEDISKPAGES (SI::*OR-GENTEMP*) EDITDATE? (T) SEDIT::STRINGWIDTH ($$TEM1 $$TEM2 - $$TEM3 $$TEM4 $$TEM5) \\PRINSTRING ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \\SETSPACE.PRESS (STREAM W) -CLRHASH (BASE N BASEA1799 BASEA1800) CL:MULTIPLE-VALUE-CALL (T) \\POSTSCRIPT.SPECIALOUTCHARFN (T) -CL:THROW (T) TTYIN.BALANCE (TABLE CHAR CH) \\CKPOSSOUT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \\PROG0 (X -) \\STKMIN (T) PRINTCODE (SI::$PROG1-FIRST-EXPRESSION$ CODEBASE OFFSET SI::*OR-GENTEMP* X) -\\SETGLOBALVAL.UFN (BASE N) COPYCHARS (CHA1818 EOLCA1817 CHA1820 EOLCA1819) BRKDWNCONSES (T PTRA1606 -VALA1605 PTRA1608 VALA1607) %NUMERIC-STRING-P ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) -\\TEDIT.PUT.CHARLOOKS (STREAM W) MAPHASH (T BASE N BASEA1801 BASEA1802) \\CHARWIDTH.DISPLAY ( -FONTDESCA1721) PRINTCODENT (CODEBASE OFFSET X) RPT (RPTF RPTV) FIND.PACKAGE (BASEA1812) -SEDIT::ATOM-CHAR-ESCAPED (TABLEA1618 TABLEA1619) FRPTQ (T) CURRENT.WORD (TABLE CHAR CH) -TB.COPYBUTTONEVENTFN (SI::*OR-GENTEMP*) \\LITPRIN ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) CCCSCAN (X DEF -LC CODEBASE OFFSET) \\RESHOWBORDER1 (SI::*OR-GENTEMP*) \\HTFIND (GCCNT) \\HASHACCESS (BASEA1807 -BASEA1808) PEEKCCODE (CHA1778 EOLCA1777) APPENDINTEGER.IP (STREAMA1585 NUMA1584) AT.END.OF.TEXT (CH) -COPY.WINDOW.TO.BITMAP (SI::*OR-GENTEMP*) RESETBUFS (T) MENU (T) ICMLARRAY.MENUW.APPLY ($$OUTPUT) -\\PUNT.BLTSHADE.BITMAP (T) \\PEEKREFILL (C) \\BLTSHADE.DISPLAY (T SI::*OR-GENTEMP*) -\\BITBLT.BITMAP.SLOW (T) \\RPLACD.UFN (PAGE A D) \\DO.PROGV (T) DREVERSE (Y Z) CL::VALUES-LIST-UFN (X) - TEDIT.SCAN.LINE (BASEA1544 BASEA1545 BASEA1546 BASEA1547 BASEA1548 BASEA1549 BASEA1550) -APPENDIDENTIFIER.IP ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \\EVALA (X) \\POSTSCRIPT.PRINTSLUG (T) -MB.PUTFN (STREAM W) WRITESTRIKEFONTFILE (STREAM W) \\PUNT.BITBLT.BITMAP (T) \\KEYBOARDINIT (KEYNUMBER) - \\CHTOPCNO (T) \\CLIPANDDRAWLINE (SI::*OR-GENTEMP* A) NCHARS ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) -\\DSPOPERATION.DISPLAY (BBTA1719 |SourceTypeA1718|) \\FM.SETATTACHPOINT (SI::$PROG1-FIRST-EXPRESSION$) - \\DRAWCIRCLE.DISPLAY (T SI::*OR-GENTEMP* X Y XA1697 XA1698) DSPSOURCETYPE (BBT |SourceType| -|Operation|) SELECT1 (T) \\SOUT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \\DRAWELLIPSE.DISPLAY (T -SI::*OR-GENTEMP* X Y) TEDIT.GETSYNTAX (TABLE CHAR) PUTASSOC (X) ROT (NA1709) SELECT (T) FRESHLINE ( -SI::*OR-GENTEMP*) \\DRAWLINE.DISPLAY (T SI::*OR-GENTEMP*) SELECTC (T) \\FILLCIRCLE.DISPLAY ( -SI::*OR-GENTEMP*) \\CONS.UFN (A LO PGA1821 PGA1822) \\PAGEDREADP (TABLE CHAR CHA1728 EOLCA1727) -\\DOFORMATTING.HARDCOPY (BASEA1526 BASEA1527 BASEA1528 BASEA1529 BASEA1530 BASEA1531 ARR N VAL -BASEA1532 BASEA1533) FILL.XPER (SI::*OR-GENTEMP*) \\FONT.COMPARESYMBOL ($$TEM1 $$TEM2 $$TEM3 $$TEM4 -$$TEM5 $$TEM6 A0417 A1205 A1206 A1207) TTYINBUFFERPEEK (CH) ENDREAD? (TABLE CHAR CH) SORT (T) -\\LINEWITHBRUSH (T SI::*OR-GENTEMP*) COURIER.EXECUTE.CALL (STREAM FIXP W) ICMLARRAY.MENUW.GETLEVEL ( -$$OUTPUT) PARSE-NSADDRESS ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) READC (STREAMA1779 CHA1781 EOLCA1780 -STREAMA1782 CHA1784 EOLCA1783) \\LITPRIN.INTERNAL (A $$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) -|\\UFSParse-Directory| (#:G854 #:G855) TEDIT.PUT.PCTB ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) -TEDIT.DISPLAYTEXT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \\STRINGWIDTH.PRESS ($$TEM1 $$TEM2 $$TEM3 -$$TEM4 $$TEM5) COURIER.WRITE.BULKDATA (STREAM W) STRMEMB (C N) RAIDCOMMAND (X) MB.GETFN (STREAM W) -\\MEDW.MOVEW (SI::*OR-GENTEMP*) LET (T) \\PARTEND.PRESS (STREAM W) \\SUBREAD (TABLE CHAR CHA1791 -EOLCA1790 CHA1793 EOLCA1792) \\FTP.PRINTPLIST ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) SCANFORWARD (CH) -\\LET0 (T X) SKIPSEPRCODES (TABLE CHAR) \\RESETKEYBOARD (KEYNUMBER) %SYNONYM-STREAM-DEVICE-EOFP (STRM) - ONEDINSPECT.COPYBUTTONFN (SI::*OR-GENTEMP*) CL:UNREAD-CHAR (STREAM) RPLCHARCODE (FATPA1773 BASEA1772 -OFFSETA1771) \\BITBLT.DISPLAY (T DS SI::*OR-GENTEMP*) \\UPCASEBASE (FATP BASE OFFSET CODE) ADVISEWDS ( -T) \\MAYBEPEEKNS (X XA1596 XA1597) \\LET* (T X) \\SYMBOL.ESCAPE.COUNT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 -$$TEM5) \\HASHRECLAIM (BASE N BASEA1805 BASEA1806) RETURN (T) \\STRINGWIDTH.HDCPYDISPLAY (FONT -CHARCODE) \\DSPFONT.DISPLAY (FONTDESC CHARCODE) \\RTP.HANDLE.PUP (#:G841) \\MAP-CODE-POINTERS ( -CODEBASE OFFSET) \\NUMERIC.PNAMEP ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \\SHAPEW2 (T) \\MEDW.CLOSEW ( -SI::*OR-GENTEMP*) EOFP (STRM) \\TEDIT.PUT.SINGLE.CHARLOOKS (STREAM W) SUBSET (T) TTECHO.TO.FILE ( -STREAM CHAR) SKREAD (TABLEA1785) \\KEYACTION1 (X) LET* (T) \\MAIKO.DISPLAYLINE (BASEA1574 BASEA1575 -BASEA1576 BASEA1577 BASEA1578 BASEA1579) CL:APPLY (FN ARGLIST T) \\TELERAIDBREAK (KEYNUMBER) -\\PRINTBINARYBITMAP (STREAM W) CHAT.SCREENPARAMS (A) \\FM.3STATE-SETUP (SI::$PROG1-FIRST-EXPRESSION$) -SEDIT::TRANSLATE-CHARS ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \\FM.TOGGLE-CHANGESTATE ( -SI::$PROG1-FIRST-EXPRESSION$) \\MAP-CODE-LITERALS (X CODEBASE OFFSET DEF LC) -%TWO-WAY-STREAM-DEVICE-EOFP (STRM) POSTSCRIPT.OUTSTR (T $$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) SKIPSEPRS -(TABLE CHAR) \\TEDIT.PUT.PARALOOKS (STREAM W) BITBLT (T DS) \\MAIKO.PUNTBLTCHAR (T SI::*OR-GENTEMP*) -\\CHARWIDTH.PSC (FONTDESCA1589) BLTHLINE (A) \\CHECKARRAYBLOCK (BASE N) TTYINSTRING (X CH) BROKENDEF ( -CODEBASE OFFSET NEWVALUE) \\EVALFORM (FN ARGLIST T) COMP.COMPILER-LET (T) \\BITBLT.BITMAP (T) -\\ALLOCBLOCK.OLD (BASE N) \\HANDLE.RAW.PUP (SOCHI SOCLO) \\GC.HANDLEOVERFLOW (X Y) -COURIER.WRITE.FAT.STRING (STREAM W) DREMOVE (Z) \\DRAWLINE.UFN (T) TTYINBUFFERBIN (CH) CL:PARSE-INTEGER - (TABLE CHAR) FIND.MATCHING.WORD (X) PP* (T) \\DO.PROGV.SETUP.FRAME.AND.EXECUTE (T) BLTVLINE (A) -MSPRGE (Y) ENVAPPLY (T) SCANBACK (CH) \\BLTSHADE.BITMAP (T) \\MAIKO.BLTSHADE.BITMAP (T) -\\TEDIT.PUT.PARALOOKS.LIST (STREAM W) \\STKSCAN (BASE N CODEBASE OFFSET) \\STRING-EQUAL-HASHBITS-UFN ( -$$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) |\\UFSGenerateFiles| (#:G853) \\MAIKO.ALLOCBLOCK (BASE N) -\\MAIKO.10MBSENDPACKET (X Y) SEDIT::RELINEARIZE (SEDIT::LINE) |\\UFSDirectoryNameP| (#:G850) -\\MAKE.PROCESS0 (T) RESETSAVE (T) RESETVARS (T) \\TEDIT.PUT.PARALOOKS.LIST2 (STREAM W) GETFILEINFO ( -LEN) \\MAKEFREEARRAYBLOCK (BASE N) SEDIT::INPUT-NORMAL-CHAR ($$OUTPUT) SHAPEW1 (T) |\\UFSOpenFile| ( -#:G845) POSSIBILITYFN (FN) ALPHORDER (CABASE CASIZE CAFAT CHAR) NIL -APPLY \\INTERPRETER (\\SETUP-COMPILED-CLOSURE-CALL) \\CH.LOCATE.SERVERS (\\SPP.RESETCLOSE) -\\MAKE.EXPEDITED.STREAM (\\COURIER.EOF \\COURIER.EXPEDITED.OVERFLOW) MSINTERPRETSET (MSINTERPA) -\\TEDIT.TABTYPE.SET (IGREATERP FFETCHFIELD IMAGEOBJP IMAGEOBJPROP FRPLACA) \\FM.EDIT-SETUP ( -\\FM.EDIT-MESSAGE \\FM.EDIT-ITEM) %INITIALIZE-CLSTREAM-TYPES (NILL %BROADCAST-STREAM-DEVICE-CLOSEFILE -\\GENERATENOFILES %BROADCAST-STREAM-DEVICE-BOUT TRUE \\GENERIC.BINS -%BROADCAST-STREAM-DEVICE-FORCEOUTPUT %BROADCAST-STREAM-DEVICE-CHARSETFN \\GENERIC.READCCODE -\\IS.NOT.RANDACCESSP \\ILLEGAL.DEVICEOP \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR -\\GENERIC.READCHAR %CONCATENATED-STREAM-DEVICE-CLOSEFILE %CONCATENATED-STREAM-DEVICE-BIN -%CONCATENATED-STREAM-DEVICE-PEEKBIN \\GENERIC.READP %CONCATENATED-STREAM-DEVICE-BACKFILEPTR -%CONCATENATED-STREAM-DEVICE-EOFP %CONCATENATED-STREAM-DEVICE-CHARSETFN -%TWO-WAY-STREAM-DEVICE-CLOSEFILE %TWO-WAY-STREAM-DEVICE-BIN %TWO-WAY-STREAM-DEVICE-BOUT -%TWO-WAY-STREAM-DEVICE-PEEKBIN %TWO-WAY-STREAM-DEVICE-READP %TWO-WAY-STREAM-DEVICE-BACKFILEPTR -%TWO-WAY-STREAM-DEVICE-EOFP \\GENERIC.BOUTS %TWO-WAY-STREAM-DEVICE-FORCEOUTPUT -%TWO-WAY-STREAM-DEVICE-CHARSETFN %TWO-WAY-STREAM-DEVICE-INPUTSTREAM -%TWO-WAY-STREAM-DEVICE-OUTPUTSTREAM %ECHO-STREAM-DEVICE-BIN %SYNONYM-STREAM-DEVICE-CLOSEFILE -%SYNONYM-STREAM-DEVICE-BIN %SYNONYM-STREAM-DEVICE-BOUT %SYNONYM-STREAM-DEVICE-PEEKBIN -%SYNONYM-STREAM-DEVICE-READP %SYNONYM-STREAM-DEVICE-BACKFILEPTR %SYNONYM-STREAM-DEVICE-EOFP -%SYNONYM-STREAM-DEVICE-FORCEOUTPUT %SYNONYM-STREAM-DEVICE-GETFILEINFO -%SYNONYM-STREAM-DEVICE-SETFILEINFO %SYNONYM-STREAM-DEVICE-GET-INDIRECT-STREAM -%SYNONYM-STREAM-DEVICE-CHARSETFN %FILL-POINTER-STREAM-DEVICE-CLOSEFILE -%FILL-POINTER-STREAM-DEVICE-GETFILEPTR \\GENERIC.CHARSET) CENTERPRINTINAREA (PRIN4 PRIN3) -FB.MAKECOUNTERWINDOW (FB.COUNTERW.REDISPLAYFN NILL TOTOPW.MODERNIZE) \\NSRANDOM.WRITE.SEGMENT (IMOD > -- \\BOUTS) RESETVAR (SI::RESETUNWIND) \\TEDIT.FIXCHANGEDLINE (\\TEDIT.FIXCHANGEDLINE) -FORMAT-EAT-WHITESPACE (WHITESPACE-CHAR-P) FB.UNDELETEALLCOMMAND (FB.UNDELETE.FILE) \\ATBLSET ( -STRING-EQUAL-HASHBITS STRING-EQUAL) FB.THINCOMMAND (FB.IS.NOT.SUBDIRECTORY.ITEM FB.DECREASING.VERSION -FB.NAMES.DECREASING.VERSION CAR) DELETEMENU (BACKGROUNDWHENSELECTEDFN) SORT.NSADDRESSES.BY.DISTANCE ( -\\NSNET.CLOSERP) \\LEAF.TIMEDOUT.EXCESSIVE (\\LEAF.ABORT.FROMMENU WINDOWPROP) RESETVARS (SI::RESETUNWIND - PROG) \\IDLER (NOTIFY.EVENT SETTOPVAL CLOSEW DEL.PROCESS) CL::%MAKE-BIT-ACCESSOR (\\INSTANCE-P CL:ERROR - LDB BYTE \\GETBASE) DASSEM.DPRINTLAP (PRIN2) \\CREATE.SHIFTJIS.EXTERNALFORMAT (\\SHIFTJISIN -\\SHIFTJISPEEK \\BACKSHIFTJISCHAR \\SHIFTJISFILEOUTCHARFN) FB.MAKEHEADINGWINDOW ( -FB.HEADINGW.REDISPLAYFN FB.HEADINGW.RESHAPEFN TOTOPW.MODERNIZE) TTYIN.FINISH (TTYIN.FINISH) -TWODINSPECT.BUTTONEVENTFN (CL:FUNCALL WINDOWPROP INSPECT.INVERTREGION) COURIER.BROADCAST.CALL (ILEQ -IGEQ FRPLACD CONS LIST) DMCHAT.STATE (DMCHAT.CLEARMODES) MSFAIL (MSTRYPARSE) TTWAITFORINPUT ( -DOWINDOWCOM) DOBACKGROUNDCOM (PPROMPT3 CLRPROMPT) TTYINBUFFERSTREAM (\\EOSERROR \\FILEOUTCHARFN -\\STREAM.NOT.OPEN) MASTERSCOPEXEC (MASTERSCOPE1) SEDIT::CLEAR-ALL-LINEAR-FORMS (SEDIT::CLEAR-LINEAR-FORM -) LOADCOMP (PUTPROP) HPRINTEND (ILESSP ABS) \\UFS.RECOGNIZE.FILE (SI::MONITOR-UNWIND -|\\DSKGetFileName-C| |\\UFSGetFileName-C| SHOULDNT) GO (\\PROG0) \\FM.NUMBER-SETUP ( -\\FM.NUMBER-MESSAGE \\FM.NUMBER-SELECTEDFN) CL:MAKE-BROADCAST-STREAM ( -%BROADCAST-STREAM-DEVICE-OUTCHARFN \\EOSERROR \\STREAM.NOT.OPEN) \\INITSPP (SPP.CLOSE \\SPP.EVENTFN -\\BULK.DATA.CLOSE) CL::INSERT-INCLUDED-SLOT (CL::SAME-SLOT) \\DOSTACKFULLINTERRUPT ( -\\CLEANUP.STACKFULL) COMP.LOOKUPVAR (COMP.VAL) VIRGINFN (UNADVISE) \\GENERIC.DSPCREATE (\\DSPPRINTCHAR - \\EOSERROR \\STREAM.NOT.OPEN) \\NSGATELISTENER (\\ROUTINGTABLE.INFOHOOK) DASSEM.DSTOREFNDEF ( -SI::RESETUNWIND) \\FM.TOGGLE-SETUP (\\FM.TOGGLE-DOWNFN \\FM.DISPLAYITEM \\FM.TOGGLE-SELECTEDFN) -PFI.SORT.INDICES (< - > LENGTH) \\CREATE.JIS.EXTERNALFORMAT (\\JISIN \\JISPEEK \\BACKJISCHAR -\\JISFILEOUTCHARFN) \\TEDIT.COMMAND.RESET.SETUP (WINDOWPROP \\TEDIT.COPYINSERTFN) \\INTERPRESSINIT ( -\\CLOSEIPSTREAM \\DSPXPOSITION.IP \\DSPYPOSITION.IP \\DSPFONT.IP \\DSPLEFTMARGIN.IP -\\DSPRIGHTMARGIN.IP \\DSPLINEFEED.IP \\DRAWLINE.IP \\DRAWCURVE.IP \\DRAWCIRCLE.GENERIC -\\DRAWELLIPSE.GENERIC CIRCSHADE.IP \\BLTSHADE.IP \\BITBLT.IP NEWPAGE.IP \\MOVETO.IP CONSTANT FQUOTIENT - NEWLINE.IP \\DSPBOTTOMMARGIN.IP \\DSPTOPMARGIN.IP \\DSPSPACEFACTOR.IP \\DSPCOLOR.IP \\STRINGWIDTH.IP -\\CHARWIDTH.IP \\SCALEDBITBLT.IP \\DSPCLIPPINGREGION.IP POLYSHADE.IP \\DRAWARC.IP \\PUSHSTATE.IP -\\POPSTATE.IP \\DSPROTATE.IP \\DSPSCALE2.IP \\DSPTRANSLATE.IP \\DEFAULTSTATE.IP \\DSPOPERATION.IP -\\BITMAPSIZE.IP \\DRAWPOLYGON.IP \\DRAWPOINT.IP \\MEDW.YOFFSET \\MEDW.XOFFSET \\MEDW.BLTCHAR NILL) -TTYIN.SETUP (TTYIN.CLEANUP) NTHCHARCODE (SUB1 RETFROM NTHCHARCODE) \\INTERNAL/SETPASSWORD ( -SI::MONITOR-UNWIND) \\PRESSINIT (\\CLOSEF.PRESS \\DSPXPOSITION.PRESS \\DSPYPOSITION.PRESS -\\DSPFONT.PRESS \\DSPLEFTMARGIN.PRESS \\DSPRIGHTMARGIN.PRESS \\DSPLINEFEED.PRESS \\DRAWLINE.PRESS -\\DRAWCURVE.PRESS \\DRAWCIRCLE.PRESS \\DRAWELLIPSE.PRESS \\UNIMPIMAGEOP \\BLTSHADE.PRESS -\\BITBLT.PRESS CONSTANT FQUOTIENT NEWLINE.PRESS \\DSPBOTTOMMARGIN.PRESS \\DSPTOPMARGIN.PRESS -NEWPAGE.PRESS \\DSPSPACEFACTOR.PRESS \\STRINGWIDTH.PRESS \\CHARWIDTH.PRESS \\BITMAPSIZE.PRESS -\\DSPCLIPPINGREGION.PRESS \\SCALEDBITBLT.PRESS \\DRAWARC.PRESS \\MEDW.YOFFSET \\MEDW.XOFFSET -\\MEDW.BLTCHAR \\DRAWPOINT.GENERIC NILL \\DRAWPOLYGON.GENERIC IMAGEOP SPREADAPPLY* FFETCHFIELD) -MULTIFILEINDEX (MULTIFILEINDEX1) CL:MAKE-ECHO-STREAM (%TWO-WAY-STREAM-DEVICE-OUTCHARFN \\EOSERROR -\\STREAM.NOT.OPEN) SPY.MAKE.TREE (SPY.COPYBUTTON SPY.GRAPH.EDITOR SPY.UPDATE.TITLE) \\SHOWMENULABEL ( -PRIN4 PRIN3) CL::%MAKE-ARRAY-ACCESSOR (CL:AREF) SET-PACKAGE-INTERACTIVELY (ALPHORDER) -CL::%MAKE-FLAG-ACCESSOR (\\INSTANCE-P CL:ERROR LDB BYTE \\GETBASE) SEE* (SEE) CHAT.CLOSE (CHAT -CHAT.RECONNECT) INFILECOM (INFILECOMS?) GETDEFERR (GETDEF) FONTCREATE (NILL) -\\CREATE.EUC.EXTERNALFORMAT (\\EUCIN \\EUCPEEK \\BACKEUCCHAR \\EUCFILEOUTCHARFN) CL::RESOLVE-SLOTS ( -CL::PARSE-SLOT CL::COPY-PARSED-SLOT CL::PSLOT-NAME) |\\VFMSplit| (|\\VFMSplit1|) COMPILER::COMPILE-ONE-LAMBDA - (COMPILER::RELEASE-TREE) XCL::DEL-WHERE-IS-DATABASE (XCL::SAME-WHERE-IS-DATABASE) \\FTP.HANDLE.NO ( -\\FTP.FLUSH.TO.MARK \\FTP.FLUSH.TO.EOC) MAKEIBMFORMAT (\\IBMINCCODEFN \\IBMPEEKCCODEFN -\\COMMONBACKCHARFN \\IBMOUTCHARFN) SI::DESCRIBE-USING-DESCRIBERS (CL:CONSP CL:STRINGP CL:FIRST -CL:FUNCALL) DMPHASH (PRINT LIST KWOTE) \\BULK.DATA.CLOSE (FUNCTION \\COURIER.EOF FREPLACEFIELD -SPP.CLOSE ERROR!) \\PROCESS.EVAL1 (FREPLACEFIELD FFETCHFIELD \\RUN.PROCESS) \\SEQUIN.PROCESS ( -SI::MONITOR-UNWIND \\SEQUIN.CLEANUP INSPECT) \\CREATE.THROUGH.EXTERNALFORMAT (\\THROUGHIN -\\THROUGHPEEK \\BACKTHROUGHCHAR \\THROUGHFILEOUTCHARFN) ALISTS.WHENCHANGED (MARKASCHANGED) -CL:MAKE-TWO-WAY-STREAM (%TWO-WAY-STREAM-DEVICE-OUTCHARFN \\EOSERROR \\STREAM.NOT.OPEN) -TWODINSPECT.COPYBUTTONFN (CL:FUNCALL WINDOWPROP INSPECT.FLIPSELECTION) FB.UNDELETECOMMAND ( -FB.UNDELETE.FILE) CL::%MAKE-POINTER-ACCESSOR (\\INSTANCE-P CL:ERROR \\GETBASEPTR) -ICMLARRAY.DOWINDOWCOMFN (ICMLARRAY.GETREGIONFN) BSPPUTMARK (SI::MONITOR-UNWIND) ESUBST (ESUBST1) -SEDIT::BUTTONEVENTFN (SEDIT::MODERN-ORIG-BUTTONEVENTFN) SELECTQ (PROGN) \\BSP.PREPARE.OUTPUT ( -SI::MONITOR-UNWIND) \\FM.MOMENTARY-SETUP (\\FM.MOMENTARY-SELECTEDFN) BACKTRACE (PRINT) -\\LEAF.CLOSEFILE (SI::MONITOR-UNWIND) CHNGNM (SI::RESETUNWIND) \\MEDW.DSPCREATE (\\EOSERROR -\\FILEOUTCHARFN \\STREAM.NOT.OPEN \\DSPPRINTCHAR) OPENBSPSTREAM (\\EOSERROR \\FILEOUTCHARFN -\\STREAM.NOT.OPEN \\BSP.OTHERBOUT \\BSP.HANDLE.INPUT RELEASE.PUP \\BSP.DEFAULT.ERROR.HANDLER) -MASTERSCOPE1 (MASTERSCOPEXEC MASTERSCOPE1) HPRINT1 (CONS) SEDIT::TTYFN (NOTIFY.EVENT SI::MONITOR-UNWIND -) \\PROCESS.APPLY1 (FREPLACEFIELD FFETCHFIELD \\RUN.PROCESS) FIXSPELL2 (STRINGP LISPXPRIN1 LISPXPRIN2) - CLOSEBSPSTREAM (SI::MONITOR-UNWIND) MSCANT (MSTRYPARSE) EV (EDITV) \\IMAGEIOINIT (POSITION SPACES -DIFFERENCE \\UNIMPIMAGEOP \\NOIMAGE.DSPFONT ZERO LINELENGTH ERROR NCHARS \\IOMODEP \\BOUT NILL -\\MEDW.YOFFSET \\MEDW.XOFFSET \\MEDW.BLTCHAR SELECTQ TIMES DSPSCALE BITMAPWIDTH BITMAPHEIGHT CONS -\\ILLEGAL.ARG \\OUTCHAR CHARCODE IMAGEOP SPREADAPPLY* FFETCHFIELD) RETDWIM1 (CONCAT) -PROVIDE.PROMPTING.WINDOW (WINDOWPROP PROCESSP PROCESS.APPLY FUNCTION ERROR!) APROPOS (DECLARE SUB1 -BLOCK STRPOS APPLY* GETD GETPROPLIST GETTOPVAL GENSYM? CHCON1 CHARCODE \\SUBFNDEF CONS FRESHLINE -PRINTOUT PRIN2 SPACES APROPRINT ARGLIST) \\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (TEDIT.COPY) PRINTHISTORY2 -(SHOWPRIN2) D-ASSEM:ASSEMBLE-FUNCTION (CL:MAPHASH CL:FUNCTION DECLARE D-ASSEM::DTAG-PTR) -\\RTP.SOCKET.PROCESS (\\RTP.CLEANUP \\RTP.INFO.HOOK) SEDIT::*FSPEC-TABLE* (CL:EQUAL) GETGRIDBOXREGION -(INSIDE? CREATEPOSITION \\RANGELIMIT IPLUS) \\FTPINIT (\\FTP.OPENFILE \\FTP.REOPENFILE \\FTP.CLOSEFILE - \\FTP.DIRECTORYNAMEP \\FTP.GETFILENAME \\FTP.GETFILEINFO \\FTP.RENAMEFILE \\FTP.DELETEFILE -\\FTP.GENERATEFILES \\FTPEVENTFN \\GENERIC.OPENP \\FTP.REGISTER \\FTP.UNREGISTER) FB.NEWINFOCOMMAND ( -FB.INFOMENU.WHENSELECTEDFN WINDOWPROP MAINWINDOW FREPLACEFIELD) COMPARENCHARS (PLUS) MAKECREATE1 ( -COPYALL APPEND) CL::%MAKE-LIST-ACCESSOR (CL:NTH) CL:MAKE-SYNONYM-STREAM ( -%SYNONYM-STREAM-DEVICE-OUTCHARFN \\EOSERROR \\STREAM.NOT.OPEN) \\TEDIT.LOOKS (TEDIT.NEW.FONT) DO-EVENT - (EVAL-INPUT) ACCEPT-UNIX-SOCKET-STREAM (\\EOSERROR \\FILEOUTCHARFN \\STREAM.NOT.OPEN) ASKUSER (CONCAT -) GC-FILING-DIRECTORY (\\NSFILING.OPENFILE FFETCHFIELD FILING.CALL \\FILING.ATTRIBUTE.TYPE.SEQUENCE -SELECTQ SHOULDNT PRINTOUT PRIN1 SUBSTRING \\NSFILING.FULLNAME SPACES ASKUSER TERPRI PLUS DREMOVE -FREPLACEFIELD) \\SEQUIN.CLOSE (SI::MONITOR-UNWIND) \\FM.EDITSTART-SELECTEDFN (NILL -\\FM.NUMBER-CHANGESTATE) COMPILER::ALPHA-LABELS (COMPILER::MAKE-VARIABLE CL:SYMBOL-NAME -COMPILER::ENV-BIND-FUNCTION) SPY.SUM (IGREATERP FFETCHFIELD) XCL::HASH-FILE-WHERE-IS (CL:ASSOC) -\\IFS.LOOKUPFILE (SI::MONITOR-UNWIND) |\\PFTransferPage| (\\DLDISK.EXECUTE) BSPFORCEOUTPUT ( -SI::MONITOR-UNWIND) FAKE-COMPILE-FILE (CLOSEF? COMPILE.FILE.RESET) \\FM.CREATEITEM (FONTCREATE NILL) -SEDIT::RESHAPEFN (SI::MONITOR-UNWIND) TB.FINISH.CLOSE (SI::MONITOR-UNWIND TB.EXPANDFN TB.SHRINKFN) -\\TEDIT.OBJECT.SHOWSEL (DSPXOFFSET DSPYOFFSET DSPCLIPPINGREGION) FIXSPELL (SI::RESETUNWIND) -FB.SEEFULLFN (FB.SEEBUTTONFN) NWAYBUTTON.INIT (MB.NB.DISPLAYFN MB.NB.SIZEFN MB.PUTFN MB.GETFN -MB.COPYFN MB.NWAYBUTTON.SELFN MB.NB.WHENOPERATEDFN) \\FM.EDIT-PREPARETOEDIT (NILL) -\\NSGC.COLLECT.DIRECTORIES (\\NSFILING.CLOSE.BULKSTREAM) GETDEFCOM0 (GETDEFCOM) \\TEXTINIT ( -\\TEXTDSPXPOSITION \\TEXTDSPYPOSITION \\TEXTLEFTMARGIN \\TEXTRIGHTMARGIN \\TEXTDSPFONT NILL -\\TEXTDSPLINEFEED \\TEXTDSPCHARWIDTH \\TEXTDSPSTRINGWIDTH \\MEDW.YOFFSET \\MEDW.XOFFSET \\MEDW.BLTCHAR - \\DRAWPOINT.GENERIC \\DRAWPOLYGON.GENERIC SELECTQ TIMES DSPSCALE BITMAPWIDTH BITMAPHEIGHT CONS -\\ILLEGAL.ARG \\OUTCHAR CHARCODE IMAGEOP SPREADAPPLY* FFETCHFIELD \\TEXTBIN \\TEXTBOUT \\TEXTCLOSEF -\\TEXTOPENF \\GENERATENOFILES \\SETACCESS \\TEXTBACKFILEPTR \\TEXTSETFILEPTR \\TEXTPEEKBIN -\\TEXTGETEOFPTR \\TEXTGETFILEPTR \\TEXTEOFP BIN \\GENERIC.CHARSET \\GENERIC.BOUTS \\GENERIC.BINS -\\GENERIC.READP \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR -\\GENERIC.RENAMEFILE \\TEDITOUTCHARFN \\EOSERROR \\STREAM.NOT.OPEN STREAM-ERROR-STREAM BOUNDP -TEXTSTREAMP REOPENTEXTSTREAM APPLY*) APROPRINT (DSPLEFTMARGIN) \\NSPRINT.FULL.REQUEST.STATUS ( -\\SPP.RESETCLOSE) |\\LFDeleteFile| (SI::MONITOR-UNWIND) TB.MAKE.BROWSER (TB.SCROLLFN TB.REPAINTFN -TB.BUTTONEVENTFN TB.COPYBUTTONEVENTFN) TB.EXPANDFN (SI::MONITOR-UNWIND TB.SHRINKFN) TEDIT ( -SI::MONITOR-UNWIND) XCL::ADD-WHERE-IS-DATABASES (XCL::ADD-WHERE-IS-DATABASE) CLEARCLISPARRAY (MEMB -PUTHASH GETPROP) XCL:LIST-ALL-PROFILES (CL:PUSHNEW CL:FUNCTION EQ XCL:PROFILE-NAME) \\NEWEPHEMERALPAGE - (\\DONEWEPHEMERALPAGE) RIGHTW.BUTTONEVENTFN (INSPECT.INVERTREGION) CHAT.INIT (TEDITCHAT.MENUFN -CHAT.RESHAPEWINDOW CHAT.BUTTONFN CHAT.CLOSEFN CHAT.ICONFN CHAT.ENDOFSTREAMOP) CL:PROVIDE (CL:STRING=) -EDITFROMFILE (SI::RESETUNWIND) DASSEM.DASSEM (IGREATERP DASSEM.ASMAJ) \\BSPINIT (BSP CLOSEBSPSTREAM -NILL \\IS.NOT.RANDACCESSP \\GENERATENOFILES \\BSPEVENTFN \\BUFFERED.BIN \\BUFFERED.BOUT BSPREADP -BSPEOFP \\BUFFERED.PEEKBIN \\BSP.GETFILEPTR \\BSP.SETFILEPTR \\BSPBACKFILEPTR \\BUFFERED.BINS -\\BSPWRITEBLOCK \\BSP.GETNEXTBUFFER BSPFORCEOUTPUT \\ILLEGAL.DEVICEOP \\GENERIC.READCCODE -\\GENERIC.CHARSET \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR -\\GENERIC.RENAMEFILE) CH.ADD.GROUP.PROPERTY (COURIER.WRITE.BULKDATA) \\FM.EDITSTART-SETUP ( -\\FM.EDITSTART-MESSAGE \\FM.EDITSTART-SELECTEDFN) CL::STEP-SLEEP (CL::STEP-COMMAND) |\\LFRenameFile| ( -SI::MONITOR-UNWIND) \\NULLDEVICE (NILL \\NULL.OPENFILE \\EOF.ACTION BIN TRUE \\NULLFILEGENERATOR ZERO -\\GENERIC.READCCODE \\GENERIC.CHARSET \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR -\\GENERIC.READCHAR) INREADMACROP (ADD1) \\NULL.OPENFILE (\\EOSERROR \\FILEOUTCHARFN \\STREAM.NOT.OPEN) - READHASHMACRO (CL:READ READ) XCL:RESTORE-PROFILE (SET) \\TEDIT.LOOKS.UPDATE (\\BIN) -\\MAKE.COURIER.REP.STREAM (\\NONPAGEDBINS \\NONPAGEDBOUTS \\COURIER.REP.BIN \\COURIER.REP.BOUT -\\COURIER.EOF) MODERN-SNAPW (TOTOPW MOVEW) \\MEDW.REDISPLAYW (NILL) CHAT.RECONNECT.OFF (TOTOPW) -XCL::VARIABLE-LEXICALLY-BOUNDP (EQ) EDITP (GETPROPLIST) TRAPMAKE (PATH.LESSP) FNCHECK (GETD) MAKEHASH -(MSREHASH) CLIPBOARD-PASTE-STREAM (RETFROM READCCODE) DEFPACKAGE (CL:MAKE-PACKAGE) -\\NSFILING.RENAMEFILE (\\NSFILING.OPENFILE) \\FLUSHVM (\\DOFLUSHVM) \\TEMPLOCKPAGES (\\DOTEMPLOCKPAGES -) NEWDEFC (NEWDEFC) COMPILER::GENCODE-CALL (COMPILER::VARIABLE-LAP-VAR) \\INSPECTW.COMMAND.HANDLER ( -DEFAULT.INSPECTW.TITLECOMMANDFN) COURIER.OPEN (\\SPP.CLOSE.IF.ERROR \\COURIER.EOF) TB.FLUSH.WINDOW ( -TB.CLOSEFN) XCL::VARIABLE-LEXICAL-P (EQ) PUTDEFN (\\RESETSTACK) DBG::COLLECT-ACTIVE-ESCAPES ( -CONDITIONS:RESTART-NAME) \\ACTONDISKPAGES (\\DOACTONDISKPAGES) PFI.SETUP.TRANSLATIONS (PFI.OUTCHARFN) -MAPRINT (SI::RESETUNWIND LISPXPRIN1) REMOVEPROMPTWINDOW (\\PROMPTWINDOW.OPENFN) -\\TEDIT.SELECT.CHARACTER (DSPXOFFSET DSPYOFFSET DSPCLIPPINGREGION) \\NSFILING.COPYFILE ( -\\NSFILING.OPENFILE) CREATE-UNIX-SOCKET-STREAM (\\EOSERROR \\FILEOUTCHARFN \\STREAM.NOT.OPEN) -\\TEDIT.HCPYLOOKS.UPDATE (\\BIN) OPENPOSTSCRIPTSTREAM (SI::RESETUNWIND STRING-EQUAL) EXPRCHECK (GETD) -|\\LFGetFileInfo| (SI::MONITOR-UNWIND) ICMLARRAY.DISPLAYSLICE (ZEROD.FETCHFN ZEROD.STOREFN -ICMLARRAY.VALUECOMMANDFN ICMLARRAY.TITLECOMMANDFN SLICEREF SLICESET) REMOVE-COMMENTS (EQ) -CHAT.RESHAPEWINDOW (CHAT.DID.RESHAPE) RESOLVE-USE-PACKAGE-CONFLICT (CL:STRING<) EDITPROP (EDITP) -SEDIT:REPLACE-SELECTION (SEDIT::PARSE-NEW) DOMAINWINDOWCOMFN (DOWINDOWCOM) TEDIT.REDO.INSERTION ( -TEDIT.COPY) TWODINSPECT.DOWINDOWCOMFN (ICMLARRAY.GETREGIONFN) \\RECLAIMCODEBLOCK (\\DELREF OPCODES) -SI::UNADVISE-FROM-RESTORE-CALLS (CL:CONSP CL:FIRST CL:THIRD) NSPRINT (CLOSEF? DECLARE GETFILEPTR -RANDACCESSP SETFILEPTR OPENSTREAM FULLNAME CLOSEF COPYBYTES) COPYTEXTSTREAM ( -\\TEDIT.COPYTEXTSTREAM.PIECEMAPFN) \\DOWRITEDISKPAGES (\\CHECKFREEPAGE) |\\VAMInit| (SI::MONITOR-UNWIND -) UNSAVEFNS (SI::RESETUNWIND MSMARKCHANGED) OPENPRSTREAM (\\OUTCHARFN.PRESS) LISPDIRECTORYP ( -SI::MONITOR-UNWIND) DINFO.UPDATE.MENU.DISPLAY (DINFO.UPDATE.FROM.MENU) PFI.CHOOSE.BEST (>) -CREATE-PROCESS-STREAM (\\EOSERROR \\FILEOUTCHARFN \\STREAM.NOT.OPEN) \\CREATECHARSET ( -\\CREATECHARSET.DISPLAY) POLYSHADE.SCAN.IP (KNOTLINE) |MakeMenuOfPrinters| (PRINTERS.WHENSELECTEDFN) -FB.INSERT.FILE (FFETCHFIELD CL:FUNCALL) \\STRINGWIDTH.GENERIC (PLUS CHARCODE \\CHARSET LRSH -\\FGETWIDTH \\GETBASE \\CHAR8CODE LOGAND \\GETCHARSETINFO \\GETBASEPTR FFETCHFIELD UNFOLD LLSH -\\CREATECHARSET) BRECOMPILE (BRECOMPILE) \\NSFILING.COPY/RENAME (FFETCHFIELD FREPLACEFIELD PLUS -\\BULK.DATA.CLOSE \\NSFILING.RELEASE.BULKSTREAM) INITATOMS (\\EVALFORM \\GC.HANDLEOVERFLOW \\DTEST.UFN - \\OVERFLOWMAKENUMBER \\MAKENUMBER \\SETGLOBAL.UFN \\SETFVAR.UFN \\GCMAPTABLE \\INTERPRETER) -\\GENERIC.READCCODE (\\READCREFILL) \\NSFILING.GENERATEFILES (\\NSFILING.NEXTFILE -\\NSFILING.FILEINFOFN \\NSFILING.CLOSE.BULKSTREAM) OPENRTPSOCKET (\\RTP.HANDLE.INPUT RELEASE.PUP) -FASL:PROCESS-FILE (CL:PRINC CL:TERPRI) MSPATHS (SI::RESETUNWIND MSREHASH) CLISPIFYCROPS (CLISPIFY2B) -\\3MB.CREATENDB (\\3MBSENDPACKET \\3MBENCAPSULATE \\3MB.BROADCASTP NILL) ICMLARRAY.ATTACHDISPLAY ( -ICMLARRAY.DOWINDOWCOMFN) \\NSFILING.ERRORHANDLER (COURIER.EXECUTE.CALL \\COURIER.RESULTS ERROR! -\\NSFILING.ERRORHANDLER) FB.COPYTEXTCOMMAND (COPYFILE) \\FTP.CLEANUP (PROCESS.EVALV) COMPILER::TEST-META-EVAL - (COMPILER::RELEASE-TREE) DINFO.GET.GRAPH.WINDOW (WINDOWPROP) PACKFILENAME (PACKFILENAME) COMP.NUMERIC - (FIX) \\NSFILING.HOSTNAMEP (\\NSFILING.OPENFILE NILL \\NSFILING.CLOSEFILE \\NSFILING.GETFILEINFO -\\NSFILING.SETFILEINFO \\NSFILING.GETEOFPTR \\NSFILING.DELETEFILE \\NSFILING.GETFILENAME -\\NSFILING.DIRECTORYNAMEP \\NSFILING.GENERATEFILES \\NSFILING.RENAMEFILE \\NSFILING.EVENTFN -\\GENERIC.OPENP BREAK.NSFILING.CONNECTION) RESOLVE-EXPORT-MISSING (CL:STRING<) |\\VFMInit| ( -SI::MONITOR-UNWIND) CL::DEFINE-ACCESSORS (CL::PSLOT-ACCESSOR CL::PS-EXPORT) \\PFI.DO.HARDCOPY ( -SI::MONITOR-UNWIND) ICONW (\\ICONW.REPAINTFN) COERCE (EQ) SHOWGRAPH (REDISPLAYGRAPH SCROLLBYREPAINTFN -HARDCOPYGRAPH GRAPHEDITEVENTFN GRAPHERCOPYBUTTONEVENTFN APPLYTOSELECTEDNODE) GATHEREXPORTS ( -CLOSE-AND-MAYBE-DELETE) CONVERT.FILE.TO.TYPE.FOR.PRINTER (CLOSEF? DELFILE) -SI::UNBREAK-FROM-RESTORE-CALLS (CL:CONSP CL:FIRST CL:SECOND) RESOLVE-EXPORT-CONFLICT (CL:STRING< -CL:PACKAGE-NAME) \\TEDIT.INSPECTCODE (PRINTCODE TEXTICON) SEDIT::OUTLINE-SELECTION (SEDIT::DRAW-OUTLINE -) COMPILE-IN-CORE (SI::RESETUNWIND) READVARS-FROM-STREAM (SAVESET) FB.COPYBINARYCOMMAND (COPYFILE) -\\DISPLAYINIT (\\DSPFONT.DISPLAY \\DSPLEFTMARGIN.DISPLAY \\DSPRIGHTMARGIN.DISPLAY -\\DSPLINEFEED.DISPLAY \\DSPXPOSITION.DISPLAY \\DSPYPOSITION.DISPLAY NILL \\DRAWCURVE.DISPLAY -\\DRAWLINE.DISPLAY \\DRAWELLIPSE.DISPLAY \\DRAWCIRCLE.DISPLAY POLYSHADE.DISPLAY \\BITBLT.DISPLAY -\\SCALEDBITBLT.DISPLAY \\BLTSHADE.DISPLAY \\NEWPAGE.DISPLAY \\BACKCOLOR.DISPLAY \\DSPOPERATION.DISPLAY - \\STRINGWIDTH.DISPLAY \\CHARWIDTH.DISPLAY \\DSPCLIPPINGREGION.DISPLAY \\DSPRESET.DISPLAY -\\DRAWARC.DISPLAY \\DRAWPOLYGON.DISPLAY \\DRAWPOINT.DISPLAY \\MEDW.BLTCHAR \\MEDW.XOFFSET -\\MEDW.YOFFSET SELECTQ TIMES DSPSCALE BITMAPWIDTH BITMAPHEIGHT CONS \\ILLEGAL.ARG \\OUTCHAR CHARCODE -IMAGEOP SPREADAPPLY* FFETCHFIELD \\ILLEGAL.DEVICEOP \\GENERATENOFILES |\\DisplayEventFn| -\\DSPPRINTCHAR \\PAGEDBACKFILEPTR \\NONPAGEDBOUTS \\GENERIC.READCCODE \\IS.NOT.RANDACCESSP -\\GENERIC.CHARSET \\GENERIC.READP \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR -\\GENERIC.READCHAR \\GENERIC.RENAMEFILE) SEDIT::CREATE-ENVIRONMENTS (SEDIT::INPUT-NORMAL-CHAR) TRYNEXT - (TRYNEXT) MODERN-ADD-EXEC (MODERN-ORIG-ADD-EXEC) \\COURIER.EXPEDITED.OVERFLOW ( -\\COURIER.EXPEDITED.ARGS) POLYSHADE.BLT (KNOTLINE) REOPENTEXTSTREAM (\\TEXTBIN \\TEXTBOUT) -MSCHECKBOUNDFREE (MSREHASH) \\NSFILING.GETFILEINFO (\\NSFILING.GET.ATTRIBUTES) -|\\VAMRecomputeFreePageCount| (SI::MONITOR-UNWIND) COMPILER::TEST-ALPHA (COMPILER::RELEASE-TREE) -EQUALHASH (LITATOM EQUALALL GETHASH RETFROM CONS SOME EQUALHASH) HPRINT (CL:CLOSE) -RESOLVE-IMPORT-CONFLICT (CL:STRING<) COMPILER::RELEASE-PROGN (COMPILER::RELEASE-TREE) -INSPECT/AS/RECORD (PROMPTPRINT) FB.SORTCOMMAND (FB.INCREASING.NUMERIC.ATTR FB.DECREASING.NUMERIC.ATTR -FB.NAMES.INCREASING.VERSION FB.NAMES.DECREASING.VERSION FB.ALPHABETIC.ATTR FB.IS.NOT.SUBDIRECTORY.ITEM - CAR) \\BSP.PREPARE.INPUT (SI::MONITOR-UNWIND) |\\LFGetFileName| (SI::MONITOR-UNWIND) -SI::CLEAR-CLOSURE-CACHE (\\ADDREF OPCODES) CHAT.BUTTONFN (CHAT.EMACS.MOVE) \\MEDW.SHRINKW ( -CLOSEMAINWINDOW ICONBUTTONEVENTFN CLOSEICONWINDOW \\NOTENEWICONPOSITION DOICONWINDOWCOM) -\\POLYSHADE.BLT (MAKESCAN CRIT.LESSP SCAN.LESSP) PURGEDSKDIRECTORY (SI::MONITOR-UNWIND) -PRINTROUTINGTABLE (<) SEDIT::BUILD-WINDOW (SEDIT::BUTTONEVENTFN SEDIT::EXPANDREGIONFN SEDIT::CLOSEFN -SEDIT::SHRINKFN SEDIT::EXPANDFN SEDIT::RESHAPEFN SEDIT::REPAINTFN SCROLLBYREPAINTFN) -DINFO.UPDATE.HISTORY (DINFO.HISTORIC.UPDATE) NUMBERPAD.READ (\\NUMBERPAD.READER.CLOSEFN) -ONEDINSPECTW.CREATE (ONEDINSPECT.RESHAPEFN RIGHTW.RESHAPEFN TITLEW.REPAINTFN) TEDIT.SETSYNTAX ( -CHARCODE) \\PROCESS.INIT (\\PROCESS.EVENTFN \\GENERIC.READCCODE \\IS.NOT.RANDACCESSP -\\ILLEGAL.DEVICEOP \\GENERIC.CHARSET NILL \\GENERIC.BOUTS \\GENERIC.BINS \\GENERIC.READP -\\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR \\GENERIC.RENAMEFILE) -COMPILER::RELEASE-MV-PROG1 (COMPILER::RELEASE-TREE) INSPECT/ALIST (ASSOCGET /ASSOCPUT) -TTYINBUFFERDEVICE (NILL \\NULL.OPENFILE TTYINBUFFERBIN TTYINBUFFERPEEK TTYINBUFFERREADP -TTYINBUFFERBACKPTR TTYINBUFFEREOFP \\EOF.ACTION \\NULLFILEGENERATOR ZERO \\GENERIC.READCCODE -\\GENERIC.CHARSET \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR) -BSP.PUTINTERRUPT (SI::MONITOR-UNWIND) CL::ESTABLISH-ACCESSORS (CL::PSLOT-ACCESSOR CL::PS-EXPORT) -\\DOVMEMFULLINTERRUPT (SI::RESETUNWIND) \\NSPRINT.WATCH.JOB (\\NSPRINT.WATCHDOG) -\\NSFILING.COURIER.OPEN (\\NSFILING.WHENCLOSED \\NSFILING.ERRORHANDLER) \\NSINIT (\\HANDLE.RAW.XIP -\\HANDLE.RAW.10TO3) BREAK.PROCESS (\\DOHELPINTERRUPT1) PPSPP (SI::RESETUNWIND) BRKDWNCOMPILE2 ( -SI::RESETUNWIND) \\FM.NUMBER-SELECTEDFN (\\FM.NUMBER-CHANGESTATE) /SETWORDCONTENTS (/SETWORDCONTENTS) -RESETBUFS (PROGN) PFI.CONDENSE.INDEX (ALPHORDER) MAKEFILES (SI::RESETUNWIND) XCL::SHOW-CLOSURE-CACHE ( -CL:FORMAT CL:TERPRI) MAPRELATION (SOME TESTTABLE APPLY* MAPC GETRELATION) UNMAKEHARDCOPYSTREAM ( -\\DSPPRINTCHAR) MBUTTON.INIT (MB.DISPLAY MB.SIZEFN MB.PUTFN MB.GETFN MB.BUTTONEVENTINFN -MB.WHENOPERATEDFN) UNMAKEMAINWINDOW (TOPATTACHEDWINDOWS CLOSEATTACHEDWINDOWS OPENATTACHEDWINDOWS -SHRINKATTACHEDWINDOWS EXPANDATTACHEDWINDOWS MOVEATTACHEDWINDOWS) \\ASSIGNDATATYPE1 (\\MAKEMDSENTRY) -EDITADDLINK (ADD/AND/DISPLAY/LINK) /PRINTLEVEL (/PRINTLEVEL) \\MAKE.PMAP.DEVICE (\\BUFFERED.BIN -\\BUFFERED.BOUT \\BUFFERED.PEEKBIN \\PAGEDREADP \\PAGEDBACKFILEPTR \\PAGEDSETFILEPTR \\PAGEDGETFILEPTR - \\PAGEDGETEOFPTR \\PAGED.SETEOFPTR \\PAGEDEOFP \\BUFFERED.BINS \\BUFFERED.BOUTS \\PAGED.GETNEXTBUFFER - NILL \\PAGED.FORCEOUTPUT) DBG::PRINT-BACKTRACE (CL:FUNCALL) \\COURIER.HANDLE.BULKDATA ( -\\BULK.DATA.CLOSE) |\\VFMDeletePageGroup| (SI::MONITOR-UNWIND) PARSERELATION1 (LDIFFERENCE -INTERSECTION UNION) HCOPYALL1 (PUTHASH HCOPYALL1) COMPILER::ALPHA-EVAL-WHEN (EQ) \\STORAGE.TYPE (PLUS) - SEDIT::CHARCODE (CHARCODE) PRETTYPRINT (DSPFONT) |\\LFSetFileInfo| (SI::MONITOR-UNWIND) -\\NSFILING.SETFILEINFO (DECLARE TYPENAMEP FFETCHFIELD \\NSFILING.CONFLICTP FILING.CALL LIST -\\NSFILING.UPDATE.ATTRIBUTES) \\ROUTINGTABLE.INFOHOOK (PROCESSPROP WINDOWPROP) FTPDEBUG (WINDOWPROP) -BKSYSBUF.GENERAL (SI::RESETUNWIND) STOPNS (\\HANDLE.RAW.XIP \\HANDLE.RAW.10TO3) EDITFNS (EDITF EDITFNS -) CL:LIST-ALL-PACKAGES (CL:PUSHNEW) \\SPP.HANDLE.INPUT (RELEASE.XIP) \\TTY.CREATING.DISPLAYSTREAM ( -\\CREATE.TTY.OUTCHARFN) TEDIT.GETSYNTAX (CHARCODE) RESOLVE-UNINTERN-CONFLICT (CL:STRING<) EDITGRAPH1 ( -REDISPLAYGRAPH SCROLLBYREPAINTFN) \\POLYSHADE.YSCAN.IP (MAKESCAN CRIT.LESSP SCAN.LESSP) \\MISCN.UFN ( -FREPLACEFIELD ADDSTACKBASE \\VAG2) \\CHECK.PQUEUE (SI::RESETUNWIND) \\PAGED.FORCEOUTPUT (IGREATERP -FFETCHFIELD) INSPECT/AS/BLOCKRECORD (PROMPTPRINT) ONEDINSPECT.BUTTONEVENTFN (CL:FUNCALL WINDOWPROP -INSPECT.INVERTREGION) GET-TWOD-DISPLAYW (TWODINSPECT.REPAINTFN CLEARW TWODINSPECT.SCROLLFN -TWODINSPECT.BUTTONEVENTFN TWODINSPECT.COPYBUTTONFN TWODINSPECT.CLOSEFN -TWODINSPECT.DEFAULT.VALUECOMMANDFN TWODINSPECT.DEFAULT.TITLECOMMANDFN) UNMAKEHARDCOPYMODESTREAM ( -\\DSPPRINTCHAR) POLYSHADE.DISPLAY (KNOTLINE) LEAF.ASSURE.FINISHED (SI::MONITOR-UNWIND) SORT (ALPHORDER -) \\UFS.CREATE.DEVICE (|\\UFSCloseFile| |\\UFSDeleteFile| |\\UFSRenameFile| |\\UFSTruncateFile| -|\\UFSGetFileInfo| |\\UFSGetFileName| |\\UFSOpenFile| |\\UFSReadPages| |\\UFSSetFileInfo| -|\\UFSWritePages| |\\UFSGenerateFiles| |\\UFSDirectoryNameP| NILL \\GENERIC.OPENP \\ADD-OPEN-STREAM -\\GENERIC-UNREGISTER-STREAM \\GENERIC.READCCODE \\IS.NOT.RANDACCESSP \\ILLEGAL.DEVICEOP -\\GENERIC.CHARSET \\GENERIC.BOUTS \\GENERIC.BINS \\GENERIC.READP \\GENERIC.UNREADCHAR -\\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR) DOWINDOWCOM (PPROMPT3 CLRPROMPT) -CL:UNWIND-PROTECT (\\EVPROGN) GETPROMPTWINDOW (\\PROMPTWINDOW.PAGEFULLFN \\PROMPTWINDOW.OPENFN) -CL::ESTABLISH-SETFS-AND-OPTIMIZERS (CL::PSLOT-ACCESSOR) |\\DSKCreateDevice| (|\\DSKEventFn|) -CHAT.TAKE.INPUT (CHAT.TAKE.INPUT1) EP (EDITPROP) \\STRINGWIDTH.PRESS (\\PRESS.CONVERT.NSCHARACTER PLUS - CHARCODE FFETCHFIELD \\FGETWIDTH \\GETBASE \\CHAR8CODE LOGAND) FB.CANONICAL.DIRECTORY (TTY.PROCESS -TTYDISPLAYSTREAM WINDOWPROP) |\\VAMFreePageGroup| (SI::MONITOR-UNWIND) FASL-FILEDATE (RETFROM -FASL:PROCESS-FILE) PFI.PRINT.FILECREATED (MAX) INTCHAR (CHARCODE) DSPCREATE (\\DSPPRINTCHAR \\EOSERROR - \\STREAM.NOT.OPEN) COMPILEDFETCHFIELD (\\DTEST) RESETOPENFILES (MAPC CLOSEF?) \\FM.LAYOUTGRID ( -FONTCREATE) ONEDINSPECT.COPYBUTTONFN (CL:FUNCALL WINDOWPROP INSPECT.FLIPSELECTION) SEDIT::SEDITL ( -SEDIT::TTYFN) GET-TOPW (TOPW.REPAINTFN CLEARW TOPW.BUTTONEVENTFN SCROLLBYREPAINTFN) FB.DELVERCOMMAND ( -FFETCHFIELD NULL.VERSIONP FB.DECREASING.VERSION FB.NAMES.DECREASING.VERSION) \\NSFILING.GET.STREAM ( -SPP.CLOSE DREMOVE FFETCHFIELD FREPLACEFIELD RPLACD) TWODINSPECTW.CREATE (TWODINSPECT.RESHAPEFN -TOPW.RESHAPEFN RIGHTW.RESHAPEFN TITLEW.REPAINTFN) NEWFAULT1 (FAULTAPPLY FAULTEVAL) |\\DSKCloseDevice| -(SI::MONITOR-UNWIND) GETCLEARINGHOUSE (SI::MONITOR-UNWIND \\CH.CHECK.CLEARINGHOUSE) THREESTATE.INIT ( -MB.THREESTATE.DISPLAY MB.SIZEFN MB.PUTFN MB.GETFN MB.COPYFN MB.BUTTONEVENTINFN -MB.THREESTATE.WHENOPERATEDFN) CL::SUBTYPEP-TYPE-EXPAND (EQ) \\NSFILING.DELETEFILE (FFETCHFIELD -\\NSFILING.CONFLICTP \\NSFILING.CHILDLESS-P FILING.CALL DREMOVE FREPLACEFIELD \\NSFILING.FULLNAME) -MENUWINDOW (MENUWMINSIZEFN MENUWRESHAPEFN) GLOBAL-MACRO-FUNCTION (CLISPEXPANSION -\\INTERLISP-NLAMBDA-MACRO) \\NULLFILEGENERATOR (NILL) MULTIFILEINDEX1 (CLOSEF) -CL::BUILD-CONSTRUCTOR-SLOT-SETFS (CL::PSLOT-ACCESSOR) COMPILEDREPLACEFIELD (\\DTEST \\RPLPTR -PUTBASEPTRX) PRETTYCOM (BOUNDP PRIN2) ONEDINSPECT.SCROLLFN (SCROLLBYREPAINTFN) \\SHAPEW2 ( -RESHAPEBYREPAINTFN) \\PROCESS.MAKEFRAME (\\PROCESS.MAKEFRAME0) PROPS.WHENCHANGED (MARKASCHANGED) -\\VANILLADISKINIT (NILL \\VANILLAHOSTNAMEP \\GENERIC.READCCODE \\IS.NOT.RANDACCESSP \\ILLEGAL.DEVICEOP - \\GENERIC.CHARSET \\GENERIC.BOUTS \\GENERIC.BINS \\GENERIC.READP \\GENERIC.UNREADCHAR -\\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR \\GENERIC.RENAMEFILE) |\\DSKEventFn| ( -SI::MONITOR-UNWIND \\UFS.UNREGISTER.GFS) \\UPDATE.PBT.RASTERWIDTHS (FOLDLO LRSH \\VAG2 LLSH LOGAND -GREATERP FFETCHFIELD FREPLACEFIELD \\ADDBASE PLUS) \\TELERAIDBREAK (\\DOHELPINTERRUPT1) -\\GENERATENOFILES (\\NOFILESNEXTFILEFN \\NOFILESINFOFN) \\LEAF.FLUSH.CACHE (SI::MONITOR-UNWIND) -CLISPATOM1 (CONCAT RETDWIM2 MKSTRING CONS) \\ENVCALL.UFN (\\SETUP-ENVIRONMENT-CALL) SETHASHSTATUS ( -HASHBEFORECLOSE) \\FAULTINIT (\\KEYHANDLER \\DOMISCAPPLY) INITIALIZE-NEW-SHELL-DEVICE (UNIX-PTY-NEW -\\BUFFERED.BIN UNIX-STREAM-OUT \\BUFFERED.PEEKBIN UNIX-STREAM-CLOSE NILL UNIX-STREAM-EOFP-NEW -UNIX-BACKFILEPTR-NEW UNIX-GET-NEXT-BUFFER \\BUFFERED.BINS \\GENERIC.READCCODE \\IS.NOT.RANDACCESSP -\\ILLEGAL.DEVICEOP \\GENERIC.CHARSET \\GENERIC.BOUTS \\GENERIC.READP \\GENERIC.UNREADCHAR -\\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR \\GENERIC.RENAMEFILE) \\D01.FAULTINIT ( -\\M44ACTONVMEMFILE) COMP.LABELS (TRANSFORM) MSSPLST (FMEMB CONS) UNPACK (FCHARACTER FRPLACD LIST) -COMPILER::RELEASE-MV-CALL (COMPILER::RELEASE-TREE) |\\DSKOpenDevice| (SI::MONITOR-UNWIND) -DBG::%RELEASE-STACK-DATUM (RELSTK) CL::BASE-SUBTYPEP (EQ) \\PRINDATUM.TO.STRING (GREATERP PLUS NUMBERP - CL:GETHASH FFETCHFIELD CONCAT %ARRAY-TYPE-NUMBER \\PUTBASEFAT \\PUTBASE %ARRAY-BASE IPLUS -%ARRAY-OFFSET ILEQ \\PUTBASETHIN \\PUTBASEBYTE \\FATTENSTRING) \\FM.LAYOUTCOLUMN (FONTCREATE) -MAKEHARDCOPYSTREAM (\\HDCPYDSPPRINTCHAR) \\DL.FAULTINIT (\\DL.ACTONVMEMFILE) SEDIT::HIGHLIGHT-SELECTION - (SEDIT::DRAW-HIGHLIGHT) \\NSFILING.OPEN.HANDLE (\\NSRANDOM.RELEASE.IF.ERROR) |\\LFOpenDevice| ( -SI::MONITOR-UNWIND) \\4DISPLAYINIT (\\DSPFONT.DISPLAY \\DSPLEFTMARGIN.DISPLAY \\DSPRIGHTMARGIN.DISPLAY - \\DSPLINEFEED.DISPLAY \\DSPXPOSITION.DISPLAY \\DSPYPOSITION.DISPLAY NILL \\DRAWCURVE.DISPLAY -\\DRAWLINE.DISPLAY \\DRAWELLIPSE.DISPLAY \\DRAWCIRCLE.DISPLAY \\BITBLT.DISPLAY \\BLTSHADE.DISPLAY -\\NEWPAGE.DISPLAY \\DSPSPACEFACTOR.DISPLAY \\DSPCOLOR.DISPLAY \\DSPBACKCOLOR.DISPLAY -\\DSPOPERATION.DISPLAY \\STRINGWIDTH.DISPLAY \\CHARWIDTH.DISPLAY \\DSPCLIPPINGREGION.DISPLAY -\\DSPRESET.DISPLAY \\DRAWARC.DISPLAY \\DRAWPOLYGON.DISPLAY \\DRAWPOINT.DISPLAY \\MEDW.BLTCHAR -\\MEDW.XOFFSET \\MEDW.YOFFSET SELECTQ TIMES DSPSCALE BITMAPWIDTH BITMAPHEIGHT CONS \\ILLEGAL.ARG -\\OUTCHAR CHARCODE IMAGEOP SPREADAPPLY* FFETCHFIELD \\ILLEGAL.DEVICEOP \\GENERATENOFILES -\\DSPPRINTCHAR \\PAGEDBACKFILEPTR \\NONPAGEDBOUTS \\GENERIC.READCCODE \\IS.NOT.RANDACCESSP -\\GENERIC.CHARSET \\GENERIC.READP \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR -\\GENERIC.READCHAR \\GENERIC.RENAMEFILE) \\FM.LAYOUTROW (FONTCREATE) \\MAIKO.ETHER-INTERRUPT ( -SI::MONITOR-UNWIND) \\MAIKO.FAULTINIT (NILL) PACKFILENAME.STRING (PACKFILENAME.STRING) -\\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (BOUNDP FFETCHFIELD CL:SYMBOL-VALUE FREPLACEFIELD CL:MAPC -CL:FUNCTION) COMPILE-FILE-SETF-SYMBOL-FUNCTION (COMPILE-FILE-WALK-FUNCTION) PRETTYDEF (PRETTYDEF0) -|\\LFCloseDevice| (SI::MONITOR-UNWIND) |\\UFSOpenDevice| (SI::MONITOR-UNWIND) CLEANUP (LISTFILES) -DCHCON (ADDTOSCRATCHLIST FRPLACA FRPLACD CONS) SEDIT::SEDITE (CL:FUNCALL CL:FUNCTION -SEDIT::PROPS-COMPLETION NOTIFY.EVENT SEDIT::COMPLETION SEDIT::PROPLST-CHANGED SEDIT::VAR-CHANGED -SEDIT::FN-CHANGED) GET-CORNERW (CLEARW) |\\UFSEventFn| (SI::MONITOR-UNWIND \\UFS.UNREGISTER.GFS) -\\NSRANDOM.SESSION.WATCHER (FRPLACA) MSCHECKBLOCKS (LOCALVARS SPECVARS ADDTOVAR) \\INIT.RTPPROCESS ( -\\RTP.SOCKET.PROCESS) COMPILER::EXPAND-OPENLAMBDA-CALL (CL:CONSTANTP CL:ATOM CL:SYMBOLP CL:CONSP -CL:MEMBER) PFI.ENQUEUE (SI::MONITOR-UNWIND \\PFI.DO.HARDCOPY) FLUSHFILEMAPS (STRING-EQUAL REMHASH) -\\DOHELPINTERRUPT (\\DOHELPINTERRUPT1) DUNPACK (ADDTOSCRATCHLIST FRPLACA FRPLACD CONS FCHARACTER) -\\FILEMAP-HASHOVERFLOW (FASSOC CONS LIST FRPLACD FILENAMEFIELD) PRETTYFILEINDEX (CLOSEF? -\\CORE.CLOSEFILE \\SETACCESS \\GENERIC-UNREGISTER-STREAM FFETCHFIELD \\CORE.DELETEFILE FULLNAME -PFI.AFTER.NEW.PAGE) MSSHOWUSE (MSMEMBSET TAB PRIN2 PRIN1 CONS MSFIND FASSOC SPACES LVLPRINT OUTPUT -LVLPRIN2 MSEDITE) |\\LFOpenFile| (SI::MONITOR-UNWIND) |\\UFSGenerateFiles| (SI::MONITOR-UNWIND) -PRINTDEF (DSPFONT PRIN2S) LOOKUP-ENVIRONMENT-AND-FILEMAP (STRPOS STRING-EQUAL ROOTFILENAME IGREATERP -FILENAMEFIELD) GET-RIGHTW (RIGHTW.REPAINTFN CLEARW RIGHTW.BUTTONEVENTFN) SHAPEW1 (RESHAPEBYREPAINTFN) -PROCESS.STATUS.WINDOW (\\PSW.SELECTED \\PSWOP.SELECTED) COMP.EVQ (SI::RESETUNWIND) CHAT.TYPESCRIPT ( -CHAT.TYPESCRIPT1) PPROCWINDOW (PPROCREPAINTFN SCROLLBYREPAINTFN PPROCRESHAPEFN) -|\\LFExtendFileIfNecessary| (SI::MONITOR-UNWIND) GAINSPACE (REMPROPLIST) CHAT.ENDOFSTREAMOP ( -\\EOSERROR) RETRYSCAN (LOADFNSCAN) CL:COMPILE-FILE (STREAMP CL:CLOSE FASL:CLOSE-FASL-HANDLE) -SEDIT::VERIFY-STRUCTURE (SI::MONITOR-UNWIND) INSPECT/PLIST (LISTGET /LISTPUT) -XCL::%DEFINE-TYPE-FILE-DEFINITIONS (XCL::%DEFINE-TYPE-GETDEF CL:ERROR) MSPRGDWIM (SI::RESETUNWIND) -CHCON (FRPLACD LIST) WALK-FORM (DECLARE) \\SPPWATCHER (\\SPP.CLEANUP \\SPP.INFO.HOOK SI::MONITOR-UNWIND -) |\\UFSOpenFile| (SI::MONITOR-UNWIND \\EOSERROR \\DEVICEFILE.EOSERROR \\FILEOUTCHARFN -\\STREAM.NOT.OPEN) |\\LFGenerateFiles| (SI::MONITOR-UNWIND |\\LFReturnNextFile| |\\LFReturnInfo|) -MSNOTICEFILE (SI::RESETUNWIND) AS.MAKE.CONVERSATION (\\SPP.RESETCLOSE) \\DUMMYKEYHANDLER ( -\\CAUSEINTERRUPT) \\MAPPNAME.INTERNAL (\\EOSERROR \\FILEOUTCHARFN \\STREAM.NOT.OPEN) CLISPATOM2C ( -CONCAT RETDWIM2 SUBSTRING CONS) TWODINSPECT.SCROLLFN (SCROLLBYREPAINTFN) \\VANILLAHOSTNAMEP ( -\\VANILLAEVENTFN) CL:MAPHASH (CL:FUNCALL) \\MEDW.CREATEW (GIVE.TTY.PROCESS TOTOPW) ERROR! ( -\\MAKE.PROCESS0) ADDMENU (MENUBUTTONFN MENUREPAINTFN BACKGROUNDWHENSELECTEDFN SCROLLBYREPAINTFN) -COPYHASHFILE (COPYHASHITEM) SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::PARSE-NEW) |\\UFSDeleteFile| ( -SI::MONITOR-UNWIND) |\\UFSCreateDevice| (|\\UFSEventFn|) DWIMIFY (SI::RESETUNWIND) CL::CACHE-SETF-INFO - (CL::PSLOT-ACCESSOR) \\PACK.ITEM (IGREATERP LISPERROR \\PNAMESTRINGPUTCHAR \\PUTBASECHAR DECLARE -\\PUTBASEFAT \\PUTBASE \\PUTBASETHIN \\PUTBASEBYTE FFETCHFIELD %ARRAY-BASE SUB1 PLUS) -PFI.NEW.LISTFILES1 (MAYBE.PRETTYFILEINDEX) |\\UFSSetFileInfo| (SI::MONITOR-UNWIND) \\8DISPLAYINIT ( -\\DSPFONT.DISPLAY \\DSPLEFTMARGIN.DISPLAY \\DSPRIGHTMARGIN.DISPLAY \\DSPLINEFEED.DISPLAY -\\DSPXPOSITION.DISPLAY \\DSPYPOSITION.DISPLAY NILL \\DRAWCURVE.BIGBM \\FILLCIRCLE.BIGBM -\\DRAWLINE.DISPLAY \\DRAWELLIPSE.BIGBM \\DRAWCIRCLE.BIGBM \\BITBLT.DISPLAY \\BLTSHADE.DISPLAY -\\NEWPAGE.DISPLAY \\DSPSPACEFACTOR.DISPLAY \\DSPCOLOR.DISPLAY \\DSPBACKCOLOR.DISPLAY -\\DSPOPERATION.DISPLAY \\STRINGWIDTH.DISPLAY \\CHARWIDTH.DISPLAY \\DSPCLIPPINGREGION.DISPLAY -\\DSPRESET.DISPLAY \\DRAWARC.DISPLAY \\DRAWPOLYGON.DISPLAY \\DRAWPOINT.DISPLAY \\MEDW.BLTCHAR -\\MEDW.XOFFSET \\MEDW.YOFFSET SELECTQ TIMES DSPSCALE BITMAPWIDTH BITMAPHEIGHT CONS \\ILLEGAL.ARG -\\OUTCHAR CHARCODE IMAGEOP SPREADAPPLY* FFETCHFIELD \\ILLEGAL.DEVICEOP \\GENERATENOFILES -\\DSPPRINTCHAR \\PAGEDBACKFILEPTR \\NONPAGEDBOUTS \\GENERIC.READCCODE \\IS.NOT.RANDACCESSP -\\GENERIC.CHARSET \\GENERIC.READP \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR -\\GENERIC.READCHAR \\GENERIC.RENAMEFILE) INSPECT/TOP/LEVEL/LIST (NTHTOPLEVELELT SETNTHTOPLEVELELT) -|\\LFEventFn| (SI::MONITOR-UNWIND NILL) FB.MAKE.BROWSER.BUSY (FB.FINISH.COMMAND) SCANDEFINEQ ( -SCANFILE0) BKSYSBUF (BKSYSCHARCODE) \\POLYSHADE.XSCAN.IP (CRIT.LESSP SCAN.LESSP) TEDIT.MOVE ( -\\TEDIT.MOVE.PIECEMAPFN) PAGEFULLFN (INVERTW) DBG::MAKE-FRAME-INSPECT-WINDOW (DBG::%RELEASE-STACK-DATUM - WINDOWPROP) CREATESCREEN (\\MEDW.CREATEW \\MEDW.OPENW \\MEDW.CLOSEW \\MEDW.MOVEW \\MEDW.RELMOVEW -\\MEDW.SHRINKW \\MEDW.EXPANDW \\MEDW.SHAPEW \\MEDW.REDISPLAYW \\MEDW.BURYW \\MEDW.TOTOPW -\\MEDW.DSPCREATE \\MEDW.GETWINDOWPROP \\MEDW.PUTWINDOWPROP \\MEDW.CURSOR \\MEDW.BBTTOWIN -\\MEDW.BBTFROMWIN \\MEDW.BBTWINWIN \\MEDW.CARET.SHOW \\MEDW.GETSCREENPOSITION -\\MEDW.GETBOXSCREENPOSITION \\MEDW.GETSCREENREGION) \\TEDIT.APPLY.PARALOOKS (ILEQ) -\\CORE.GENERATEFILES (\\CORE.NEXTFILEFN \\CORE.FILEINFOFN) APPLYTOSELECTEDNODE ( -MODERN-ORIG-APPLYTOSELECTEDNODE) TEDIT.SETFUNCTION (CHARCODE) PLAYTUNE (BEEPOFF) TB.FIND.ITEM ( -TB.ITEM.DELETED? TB.ITEM.SELECTED?) SCROLLW (SCROLLBYREPAINTFN) PRETTYVAR1 (PRIN2) SEDIT::SET-PROPS ( -NULL) PRETTYCOM1 (SI::RESETUNWIND) MAKEDEFLIST (CDDR) |\\LFDirectoryNameP| (SI::MONITOR-UNWIND) -FONTSAVAILABLE (NILL) CLOSERTPSOCKET (SI::MONITOR-UNWIND) SCANCOMPILEDFN (SCANFILE0) |\\VFMMerge| ( -|\\VFMMerge1|) |\\UFSGetFileInfo| (SI::MONITOR-UNWIND) SPELLFILE (SPELLFILEDIR RETFROM FIXSPELL) -GETSYNTAX (DECLARE CONS BITTEST LOGAND) XCL:UNBREAK-FUNCTION (CL:CONSP CL:FIRST CL:SECOND) -CL::BUILD-CONSTRUCTOR-ARGLIST (CL::PSLOT-INITIAL-VALUE CL::PSLOT-NAME CL::PSLOT-ACCESSOR) -\\WRITEDISKPAGES (\\DOWRITEDISKPAGES) |\\VAMAllocPageGroup| (SI::MONITOR-UNWIND) \\COPYCODEBLOCK ( -\\ADDREF OPCODES) HPINITRDTBL (HVFWDREAD HVFWDCDREAD HVBAKREAD) CLISPFOR (SI::RESETUNWIND) -CL::%DO-TRANSLATE (CL:CONSP LIST) COPYALL (PUTHASH COPYALL) \\CORE.GETFILEHANDLE (\\EOSERROR -\\FILEOUTCHARFN \\STREAM.NOT.OPEN) CLISP3C (SI::RESETUNWIND) \\FM.NWAY-SETUP (\\FM.NWAY-MESSAGE -\\FM.NWAY-DOWNFN \\FM.NWAY-MOVEDFN \\FM.NWAY-SELECTEDFN) COMPILER::ALPHA-COMBINATION ( -COMPILER::ALPHA-ARGUMENT-FORM COMPILER::ALPHA-LITERAL) MSMARKCHANGE1 (MSMARKCHANGE1) \\TEDIT.MENU.INIT - (\\TEDITMENU.RECORD.UNFORMATTED \\TEDIT.APPLY.PARALOOKS \\TEDIT.SHOW.PARALOOKS -\\TEDIT.NEUTRALIZE.PARALOOKS.MENU \\TEDIT.RECORD.TABLEADERS) \\TEDIT.HARDCOPY.FORMATLINE ( -\\TEDIT.HCPYLOOKS.UPDATE) \\HDCPYDISPLAYINIT (\\DSPFONT.HDCPYDISPLAY \\DSPRIGHTMARGIN.HDCPYDISPLAY -\\DSPXPOSITION.HDCPYDISPLAY \\DSPYPOSITION.HDCPYDISPLAY \\STRINGWIDTH.HDCPYDISPLAY -\\CHARWIDTH.HDCPYDISPLAY) CL::GET-PS-FROM-PREDICATE (CL::PS-PREDICATE CL:THROW) WINDOWWORLD (NILL) -DINFO.SHOWGRAPH (DINFO.UPDATE.FROM.GRAPH) DUMPINITPAGES (MAKEROOMFORPME ADDPME DUMPVP) -\\NSPRINT.ENQUIRE (\\SPP.RESETCLOSE COURIER.CALL) FB.COMPILECOMMAND (FB.OPERATE.ON.FILES) \\KEYACTION1 - (CHARCODE) SEDIT::COPY-HASH-TABLE (CL:GETHASH) \\DOVE.FAULTINIT (\\DOVE.ACTONVMEMFILE) EDITBM ( -EDITBMSCROLLFN EDITBMRESHAPEFN EDITBMREPAINTFN EDITBMBUTTONFN EDITBMCLOSEFN EDITBM) -PACKAGE-HIERARCHY-INIT (CONVERT-LITATOM INTERN-LITATOM) CREATESCROLLINGW (SCROLLBYREPAINTFN) -ASSURE.PUP.READY (SI::MONITOR-UNWIND \\HANDLE.RAW.PUP \\HANDLE.RAW.3TO10) CLISP4 (CLISPIFY) -ICMLARRAY.TITLECOMMANDFN (MODERN-ORIG-ICMLARRAY.TITLECOMMANDFN) SORT.PUPHOSTS.BY.DISTANCE ( -\\PUPNET.CLOSERP) \\NSRANDOM.CREATE.STREAM (\\NSRANDOM.RELEASE.IF.ERROR \\EOSERROR \\FILEOUTCHARFN -\\STREAM.NOT.OPEN) TTYINENTRYFN (DOWINDOWCOM) CREATEDSKDIRECTORY (SI::MONITOR-UNWIND |\\LFCloseFile| -NILL) \\GETFILINGCONNECTION (SI::MONITOR-UNWIND) HASHFILESPLST1 (STRPOS PRODUCE) PREEDITFN ( -POSTEDITPROPS POSTEDITALISTS) MAKEINITLAST (SETPROPLIST COPY SETTOPVAL LOCAL CONS RPLACA) CHAT.STARTUP - (UALPHORDER CHAT.TTYENTRYFN) OPENIPSTREAM (INTERPRESS.OUTCHARFN) |\\UFSCloseDevice| (SI::MONITOR-UNWIND -) \\UFS.OPENP (STRING-EQUAL STREQUAL) PFI.HANDLE.EXPR (PFI.DEFAULT.HANDLER) \\NSRANDOM.READ.SEGMENT ( ->= \\BINS - > \\CLEARBYTES PLUS GREATERP RPLACA HELP EOFP COURIER.ABORT.BULKDATA) TEDIT.GETFUNCTION ( -CHARCODE) MAKEHARDCOPYMODESTREAM (\\HCPYMODEDSPPRINTCHAR) SCAVENGEDSKDIRECTORY (SI::MONITOR-UNWIND -|\\LFCloseFile| NILL) \\24DISPLAYINIT (\\DSPFONT.DISPLAY \\DSPLEFTMARGIN.DISPLAY -\\DSPRIGHTMARGIN.DISPLAY \\DSPLINEFEED.DISPLAY \\DSPXPOSITION.DISPLAY \\DSPYPOSITION.DISPLAY NILL -\\DRAWCURVE.DISPLAY \\DRAWLINE.DISPLAY \\DRAWELLIPSE.DISPLAY \\DRAWCIRCLE.DISPLAY \\BITBLT.DISPLAY -\\BLTSHADE.DISPLAY \\NEWPAGE.DISPLAY \\DSPSPACEFACTOR.DISPLAY \\DSPCOLOR.DISPLAY -\\DSPBACKCOLOR.DISPLAY \\DSPOPERATION.DISPLAY \\STRINGWIDTH.DISPLAY \\CHARWIDTH.DISPLAY -\\DSPCLIPPINGREGION.DISPLAY \\DSPRESET.DISPLAY \\DRAWARC.DISPLAY \\DRAWPOLYGON.DISPLAY -\\DRAWPOINT.DISPLAY \\MEDW.BLTCHAR \\MEDW.XOFFSET \\MEDW.YOFFSET SELECTQ TIMES DSPSCALE BITMAPWIDTH -BITMAPHEIGHT CONS \\ILLEGAL.ARG \\OUTCHAR CHARCODE IMAGEOP SPREADAPPLY* FFETCHFIELD \\ILLEGAL.DEVICEOP - \\GENERATENOFILES \\DSPPRINTCHAR \\PAGEDBACKFILEPTR \\NONPAGEDBOUTS \\GENERIC.READCCODE -\\IS.NOT.RANDACCESSP \\GENERIC.CHARSET \\GENERIC.READP \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR -\\GENERIC.WRITECHAR \\GENERIC.READCHAR \\GENERIC.RENAMEFILE) COMPILER::GENCODE-LET (COMPILER::MAKE-LAP-VAR -) COPY.TEXT.TO.IMAGE (ZERO MAX) \\TEDIT.READTABLE (GET.OBJ.FROM.USER) CLISPIFYFNS (CLISPIFYFNS) -EDITDELETELINK (DELETE/AND/DISPLAY/LINK) UNDOLISPX3 (SI::RESETUNWIND) \\FTP.OPEN.CONNECTION ( -\\FTP.ERRORHANDLER \\FTP.WHENCLOSED) \\FDEVINSTANCE (FDEVOP SPREADAPPLY* FFETCHFIELD) SHOWDEF (CLOSEF? -) \\UFS.DIRECTORY.NAME (SI::MONITOR-UNWIND |\\DSKDirectoryNameP-C| |\\UFSDirectoryNameP-C| SHOULDNT) -BAKTRACE (CL:FUNCALL) \\POLYSHADE.DISPLAY (CRIT.LESSP SCAN.LESSP) FB.DELETECOMMAND (FB.DELETE.FILE) -|\\VFMInsertPageGroup| (SI::MONITOR-UNWIND) MSINTERPRET (MSEDITF TESTRELQ TESTTABLE FASSOC MSSHOWUSE -CONS) \\SPP.CREATE.STREAM (\\EOSERROR \\FILEOUTCHARFN \\STREAM.NOT.OPEN) ATTACHWINDOW ( -ATTACHEDWINDOWTOTOPFN DOATTACHEDWINDOWCOM DETACHWINDOW) FB.CLOSEFN (FB.CLOSE&EXPUNGE) -MAKE-UNICODE-FORMATS (UTF16BE.INCCODEFN UTF16BE.PEEKCCODEFN \\UTF16.BACKCHARFN UTF16BE.OUTCHARFN -UTF8.INCCODEFN UTF8.PEEKCCODEFN \\UTF8.BACKCHARFN UTF8.OUTCHARFN) PPT (SI::RESETUNWIND) -\\TEDIT.COPY.PIECEMAPFN (TEDIT.COPY) |\\LFCloseFile| (SI::MONITOR-UNWIND) \\READDISPLAYFONTFILE ( -CLOSEF) D-ASSEM::GENERATE-EASY-ENTRY (CL:FIRST) \\ITEM.WINDOW.BUTTON.HANDLER ( -MODERN-ORIG-\\ITEM.WINDOW.BUTTON.HANDLER) \\INITBCPLDISPLAY (\\DSCCOUT \\GENERIC.READCCODE -\\IS.NOT.RANDACCESSP \\ILLEGAL.DEVICEOP \\GENERIC.CHARSET NILL \\GENERIC.BOUTS \\GENERIC.BINS -\\GENERIC.READP \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR -\\GENERIC.RENAMEFILE \\EOSERROR \\STREAM.NOT.OPEN) MAKEFILE (LISTFILES) CHAT.RECONNECT (TOTOPW) BREAK -(BREAK0) WHITESPACE-CHAR-P (EQL) MAKEUSERMACROSCOMS (CAR) |\\VFMGenerateFileIDs| (SI::MONITOR-UNWIND) -DUMPDATABASE (DUMPDATABASE1) \\FM.STATE-SETUP (\\FM.STATE-SELECTEDFN FONTCREATE) MSEDITE (EDITF) -SPY.BUTTON (LASTMOUSESTATE ZEROP LOGAND SPY.TOGGLE) \\FM.FORMAT (FONTCREATE) COMPILER::RELEASE-CALL ( -COMPILER::RELEASE-TREE) BMOBJ.INIT (BMOBJ.DISPLAYFN BMOBJ.IMAGEBOXFN BMOBJ.PUTFN BMOBJ.GETFN5 -BMOBJ.COPYFN BMOBJ.BUTTONEVENTINFN NILL) MAKEISOFORMAT (\\8859INCCODEFN \\8859PEEKCCODEFN -\\COMMONBACKCHARFN \\8859OUTCHARFN) RECORDECLTAIL (PROGN) CL::%MAKE-RANDOM-ARRAY (LOGAND LOGXOR + CL:* -) FB.COPY/RENAME.MANY (FB.INCREASING.VERSION FB.NAMES.INCREASING.VERSION) \\ETHERINIT (\\ETHEREVENTFN -\\GENERIC.READCCODE \\IS.NOT.RANDACCESSP \\ILLEGAL.DEVICEOP \\GENERIC.CHARSET NILL \\GENERIC.BOUTS -\\GENERIC.BINS \\GENERIC.READP \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR -\\GENERIC.READCHAR \\GENERIC.RENAMEFILE) COLLECTKEYS (CONS MKSTRING) |\\LFSortFiles| (SELECTQ -UALPHORDER LESSP) EDITH (SI::RESETUNWIND) WHO-LINE-CURRENT-DIRECTORY (STRING-EQUAL UALPHORDER) -COMPILER::TEST-ANALYSIS (COMPILER::RELEASE-TREE) D-ASSEM::STORE-DIGEST-INFO (< CDR) PROCESSWORLD ( -\\BACKGROUND.PROCESS \\MOUSE.PROCESS \\TIMER.PROCESS PROCESSWORLD) BUTTONPANEL ( -BUTTONPANEL/SELECTION/FN PPROMPT2) TITLEDICONW (\\ICONW.COPYBUTTONEVENTFN) \\TEDIT.BUTTONEVENTFN ( -MODERN-ORIG-\\TEDIT.BUTTONEVENTFN) EDITFERROR (EDITF) CLISPIF (SI::RESETUNWIND) COURIERTRACE ( -LASTMOUSESTATE ZEROP LOGAND \\CHANGE.ETHER.TRACING WINDOWPROP) \\OPENLEAFCONNECTION (SI::MONITOR-UNWIND - \\LEAF.ACKED \\LEAF.HANDLE.INPUT \\LEAF.FIX.BROKEN.SEQUIN \\LEAF.TIMEDOUT \\LEAF.TIMEDIN -\\LEAF.WHENCLOSED \\LEAF.IDLE \\LEAF.IDLE? \\LEAF.OPENERRORHANDLER \\SEQUIN.CLOSE) \\LEAF.HANDLE.INPUT - (\\LEAF.ERROR) POSTSCRIPT.INIT (SETFONTDESCRIPTOR CLOSEPOSTSCRIPTSTREAM \\DSPXPOSITION.PSC -\\DSPYPOSITION.PSC \\MOVETO.PSC \\DSPFONT.PSC \\DSPLEFTMARGIN.PSC \\DSPRIGHTMARGIN.PSC -\\DSPLINEFEED.PSC \\DRAWLINE.PSC \\DRAWCURVE.PSC \\DRAWCIRCLE.PSC \\DRAWELLIPSE.PSC \\FILLCIRCLE.PSC -\\BLTSHADE.PSC \\BITBLT.PSC \\SCALEDBITBLT.PSC \\NEWPAGE.PSC \\DSPSCALE.PSC \\DSPSCALE2.PSC -\\DSPCOLOR.PSC \\TERPRI.PSC \\DSPTOPMARGIN.PSC \\DSPBOTTOMMARGIN.PSC \\DSPSPACEFACTOR.PSC -\\DSPCLIPPINGREGION.PSC \\DSPRESET.PSC \\DRAWPOLYGON.PSC \\FILLPOLYGON.PSC \\STRINGWIDTH.PSC -\\CHARWIDTH.PSC \\DRAWARC.PSC \\DSPROTATE.PSC \\DSPTRANSLATE.PSC \\DRAWPOINT.PSC \\DSPPUSHSTATE.PSC -\\DSPPOPSTATE.PSC \\MEDW.YOFFSET \\MEDW.XOFFSET \\MEDW.BLTCHAR NILL SELECTQ TIMES DSPSCALE BITMAPWIDTH - BITMAPHEIGHT CONS \\ILLEGAL.ARG) UNDONLSETQ (SI::RESETUNWIND) \\LEAFINIT (\\LEAF.DEVICEP NILL -\\ILLEGAL.DEVICEOP \\GENERIC.READCCODE \\IS.NOT.RANDACCESSP \\GENERIC.CHARSET \\GENERIC.BOUTS -\\GENERIC.BINS \\GENERIC.READP \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR -\\GENERIC.READCHAR) PURGEHISTORY (SI::RESETUNWIND) \\SPP.CLEANUP (SI::MONITOR-UNWIND) -\\DSKDISPLAY.CREATE.WINDOW (\\DSKDISPLAY.REPAINTFN WINDOWPROP CONS \\DSKDISPLAY.BUTTONEVENTFN -DSKDISPLAY) CL::ARGUMENT-NAMES (CL:CONSP LIST CL:MEMBER) \\CREATEDISPLAY (NILL \\ILLEGAL.DEVICEOP -\\GENERATENOFILES \\DSPPRINTCHAR \\PAGEDBACKFILEPTR \\NONPAGEDBOUTS \\GENERIC.READCCODE -\\IS.NOT.RANDACCESSP \\GENERIC.CHARSET \\GENERIC.READP \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR -\\GENERIC.WRITECHAR \\GENERIC.READCHAR \\GENERIC.RENAMEFILE) XCL::MAKE-PROTOTYPE (EQ) -\\NSRANDOM.ENSURE.WATCHER (\\NSRANDOM.SESSION.WATCHER) LISPXTYPEAHEAD (LISPXTYPEAHEAD) EDITCOM (BREAK1 -) XCL::ADD-PROTOTYPE-FN (EQ) EDRPT (SI::RESETUNWIND) CALLS (SI::RESETUNWIND) XCL::PROTOTYPE-DEFN-TYPES - (LIST) \\CORE.OPENFILE (\\EOSERROR \\FILEOUTCHARFN \\STREAM.NOT.OPEN) DO?CMD.ERRORHANDLER (DO?CMD) -\\NSFILING.INIT (\\NSFILING.HOSTNAMEP NILL \\GENERIC.READCCODE \\IS.NOT.RANDACCESSP \\ILLEGAL.DEVICEOP - \\GENERIC.CHARSET \\GENERIC.BOUTS \\GENERIC.BINS \\GENERIC.READP \\GENERIC.UNREADCHAR -\\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR \\GENERIC.RENAMEFILE -\\FILINGSESSION.DEFPRINT \\FILINGHANDLE.DEFPRINT) \\NSFILING.LOGIN (SPP.CLOSE \\NSRANDOM.OPENFILE NILL - \\NSRANDOM.CLOSEFILE \\NSFILING.GETFILEINFO \\NSFILING.SETFILEINFO \\NSRANDOM.READPAGES -\\NSRANDOM.WRITEPAGES \\NSRANDOM.TRUNCATEFILE \\GENERIC.READCCODE \\IS.NOT.RANDACCESSP -\\ILLEGAL.DEVICEOP \\GENERIC.CHARSET \\GENERIC.BOUTS \\GENERIC.BINS \\GENERIC.READP -\\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR \\GENERIC.RENAMEFILE -\\NSRANDOM.SETEOFPTR) \\PUPGATELISTENER (\\ROUTINGTABLE.INFOHOOK) XCL::PROTOTYPE-DEFINERS-FOR-TYPE ( -CAR EQ) \\CREATECOREDEVICE (\\CORE.CLOSEFILE NILL \\CORE.DELETEFILE \\CORE.GETFILEINFO -\\NODIRCORE.OPENFILE \\CORE.OPENFILE \\ILLEGAL.DEVICEOP \\CORE.SETFILEINFO \\CORE.RELEASEPAGES -\\CORE.GETFILENAME \\NULLFILEGENERATOR \\CORE.GENERATEFILES \\CORE.DIRECTORYNAMEP \\GENERIC.READP -\\BUFFERED.BIN \\BUFFERED.BOUT \\BUFFERED.PEEKBIN \\CORE.BACKFILEPTR \\CORE.SETFILEPTR -\\PAGEDGETFILEPTR \\PAGEDGETEOFPTR \\CORE.SETEOFPTR \\PAGEDEOFP \\BUFFERED.BINS \\BUFFERED.BOUTS -\\CORE.GETNEXTBUFFER \\GENERIC.OPENP \\ADD-OPEN-STREAM \\GENERIC-UNREGISTER-STREAM \\GENERIC.READCCODE - \\GENERIC.CHARSET \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR -\\GENERIC.RENAMEFILE) *DEFINITION-HASH-TABLE* (EQ) \\SETUP.DEFAULT.LINEBUF (\\LINEBUF.READP NILL -\\LINEBUF.PEEKBIN \\CREATE.TTYDISPLAYSTREAM STREAMOP SPREADAPPLY* FFETCHFIELD) |\\VFMGetPageGroup| ( -SI::MONITOR-UNWIND) FB.LOADCOMMAND (FB.OPERATE.ON.FILES LOAD) EDITCOMA (ERROR! EDITL0) |\\VFMDelete| ( -|\\VFMDelete1| |\\VFMDelete2|) \\SPP.CREATE.STREAMS (\\SPP.OTHER.BOUT) INSPECT/PROPLIST (PROPNAMES -NONSYSPROPNAMES GETPROP /PUTPROP) SAVESETQ (PROG1) MSEDITF (EDITF) ED (GET) \\TEDIT.WINDOW.SETUP ( -\\TEDIT.RESHAPEFN \\TEDIT.NEWREGIONFN \\TEDIT.SCROLLFN \\TEDIT.REPAINTFN TEDIT.DEFAULT.MENUFN -TEDIT.DEACTIVATE.WINDOW \\TEDIT.PROCIDLEFN \\TEDIT.SHRINK.ICONCREATE \\TEDIT.SHRINKFN \\TEDIT.EXPANDFN - TEXTOBJ FFETCHFIELD \\TEDIT.PROMPT.PAGEFULLFN) MAKETITLEBARICON (\\TITLEICONMINSIZE) -%MAKE-ARRAY-TYPE-TABLE (CL:MAPCAR CL:FUNCTION LIST %TYPE-SIZE-TO-TYPENUMBER) ARGS.COMMUTABLEP ( -ARGS.COMMUTABLEP) CHAT.PROMPT.FOR.INPUT (CLEARW NILL CLOSEW) CHAT.DEACTIVATE.WINDOW (CHAT.RECONNECT) -\\TEXTMENU.TOGGLE.INIT (\\TEXTMENU.TOGGLE.DISPLAY MB.SIZEFN MB.PUTFN MB.GETFN MB.COPYFN -MB.BUTTONEVENTINFN \\TEXTMENU.TOGGLE.WHENOPERATEDFN) \\TERMINATESPP (SI::MONITOR-UNWIND) -\\NODIRCORE.OPENFILE (\\EOSERROR \\FILEOUTCHARFN \\STREAM.NOT.OPEN) CL::DEFINE-CONSTRUCTORS ( -CL::BOA-CONSTRUCTOR-P CL::DEFINE-BOA-CONSTRUCTOR) %MAKE-CML-TYPE-TABLE (ARRAY-TABLE-ENTRY-CML-TYPE -LIST) \\MENUSUBITEMS (DEFAULTSUBITEMFN) \\CREATELINEBUFFER (CL:FUNCALL) INSPECTW.CREATE ( -\\ITEM.WINDOW.BUTTON.HANDLER \\ITEM.WINDOW.COPY.HANDLER INSPECTW.REPAINTFN SCROLLBYREPAINTFN) -EVALUABLE.CONSTANTP (EVALUABLE.CONSTANTP) \\LEAF.DEVICEP (\\LEAF.CLOSEFILE \\LEAF.DELETEFILE -\\LEAF.GETFILEINFO \\LEAF.OPENFILE \\LEAF.READPAGES \\LEAF.WRITEPAGES \\LEAF.SETFILEINFO -\\LEAF.TRUNCATEFILE \\LEAF.GETFILENAME \\LEAF.REOPENFILE \\LEAF.GENERATEFILES \\LEAF.EVENTFN -\\LEAF.DIRECTORYNAMEP NILL \\LEAF.RENAMEFILE \\LEAF.FORCEOUTPUT \\GENERIC.OPENP \\ADD-OPEN-STREAM -\\GENERIC-UNREGISTER-STREAM \\LEAF.BREAKCONNECTION \\GENERIC.READCCODE \\IS.NOT.RANDACCESSP -\\ILLEGAL.DEVICEOP \\GENERIC.CHARSET \\GENERIC.BOUTS \\GENERIC.BINS \\GENERIC.READP -\\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR) \\SPP.ESTABLISH ( -SI::MONITOR-UNWIND) \\UFS.FILEINFOFN (> FFETCHFIELD \\UFS.UNREGISTER.GFS) SEDIT::ATOM-CHANGE-RELINEARIZE - (FFETCHFIELD TYPENAMEP FREPLACEFIELD) SPELLFILE.SPELL1 (SPELLFILE1) MAKESCAN (LINE.LESSP) -MAKEMACFORMAT (\\MACINCCODEFN \\MACPEEKCCODEFN \\COMMONBACKCHARFN \\MACOUTCHARFN) CHECKCONSPAGES ( -\\CHECKCONSPAGE) TEDIT.MINIMAL.WINDOW.SETUP (TEDIT.CURSORMOVEDFN TEDIT.CURSOROUTFN) \\UFS.NEXTFILEFN ( -\\UFS.UNREGISTER.GFS) \\LEAF.FIX.BROKEN.SEQUIN (EXPANDING-PAGEFULLFN) \\ALLOCHEIGHTTOGROUPEDWINDOW ( -MAX) \\FTP.GENERATEFILES (\\FTP.NEXTFILE \\FTP.FILEINFOFN NILL CLOSEBSPSTREAM) -CHANGE-TTY-PROCESS-INTERACTIVELY (ALPHORDER) EDITCOML (RESETSAVE) \\ALLOCWIDTHTOGROUPEDWINDOW (MAX) -\\VARNOTUSED (\\VARNOTUSED) ADD-USER-SUBR (CL:SECOND) SI::ADVICE-PUTDEF (CL:REST) BYTEBLOCKCOMPILE2 ( -SI::RESETUNWIND) \\COURIER.ATTENTIONFN (\\COURIER.OUTPUT.ABORTED) DOICONWINDOWCOM (PPROMPT3 CLRPROMPT) - \\FM.BUTTONEVENTFN (MODERN-ORIG-\\FM.BUTTONEVENTFN) MSHASHLIST (MSHASHLIST1) HVBAKREAD (HASHARRAY) -FASL::ELEMENTS-IDENTICAL-P (EQL) \\STRINGWIDTH.HCPYDISPLAYAUX (PLUS CHARCODE \\CHARSET LRSH -\\FGETIMAGEWIDTH \\GETBASE \\CHAR8CODE LOGAND \\GETCHARSETINFO \\GETBASEPTR FFETCHFIELD UNFOLD LLSH -\\CREATECHARSET) DEBUGGER (EVAL-INPUT) COPYFILES (ILEQ NILL TRUE EQUAL ERSETQ INFILEP COPIEDFILENAME = - GETFILEINFO PRINTOUT PRIN1 TERPRI COPYFILE DELFILE DECLARE CL:MEMBER UNPACKFILENAME.STRING |printout| - TAB GDATE CL:FUNCALL ASKUSER SELECTQ STRPOS UPPERCASEARRAY SUBSTRING ADD1 NCHARS) TB.COLLECT.ITEMS ( -TB.ITEM.DELETED? TB.ITEM.SELECTED?) \\NSPRINT.INTERNAL (SPP.CLOSE) \\INIT.KEYBOARD.STREAM (NILL -\\KEYBOARDEVENTFN \\GETKEY \\PEEKSYSBUF \\SYSBUFP \\GENERIC.READCCODE \\IS.NOT.RANDACCESSP -\\ILLEGAL.DEVICEOP \\GENERIC.CHARSET \\GENERIC.BOUTS \\GENERIC.BINS \\GENERIC.UNREADCHAR -\\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR \\GENERIC.RENAMEFILE \\EOSERROR -\\FILEOUTCHARFN \\STREAM.NOT.OPEN) MSTRYSPELLTYPE (FASSOC MSTRYSPELL) \\HCPYMODEDISPLAYINIT ( -\\DSPFONT.HCPYMODE \\DSPRIGHTMARGIN.HCPYMODE \\DSPLEFTMARGIN.HCPYMODE \\DSPLINEFEED.HCPYMODE -\\DRAWLINE.HCPYMODE \\DRAWCURVE.HCPYMODE \\DRAWCIRCLE.HCPYMODE \\DRAWELLIPSE.HCPYMODE -\\FILLCIRCLE.HCPYMODE \\BLTSHADE.HCPYMODE \\BITBLT.HCPYMODE \\DSPXPOSITION.HCPYMODE -\\DSPYPOSITION.HCPYMODE \\MOVETO.HCPYMODE \\STRINGWIDTH.HCPYMODE \\CHARWIDTH.HCPYMODE PRESSDISPLAY -CONSTANT FQUOTIENT WFROMDS WINDOWPROP APPLY* PAGEFULLFN CLEARW \\DSPSPACEFACTOR.HCPYMODE -INTERPRESSDISPLAY) FASL::SETESCAPE (FASL::FASL-EXTENDED) XCL::WALK-ARGLIST (EQ) \\FORMATLINE ( -\\TEDIT.LOOKS.UPDATE) XCL::WHERE-IS-FILES (CL:PROBE-FILE LIST) |\\LFOpenOldFile| (\\EOSERROR -\\FILEOUTCHARFN \\STREAM.NOT.OPEN) TB.BUTTONEVENTFN (MODERN-ORIG-TB.BUTTONEVENTFN) -CL::STRUCTURE-POINTER-SLOTS (CL::PSLOT-FIELD-DESCRIPTOR) \\SPP.CREATE.CON (\\SPP.DEFAULT.ERRORHANDLER) - MAKE-FILL-POINTER-OUTPUT-STREAM (\\EOSERROR \\FILEOUTCHARFN \\STREAM.NOT.OPEN -\\ADJUSTABLE-STRING-STREAM-OUTCHARFN \\STRING-STREAM-OUTCHARFN \\OUTCHAR) FB.RENAMECOMMAND (RENAMEFILE -) SEDIT::INITIALIZE (SEDIT::MARKASCHANGEDFN) TYPEINMENU (UNREADITEM) PF* (SI::RESETUNWIND PF) OPENP ( -EVQ) DEL.PROCESS (\\UNWIND.PROCESS) ENCAPSULATEDIMAGEFNS (ENCAPSULATEDOBJ.DISPLAYFN -ENCAPSULATEDOBJ.IMAGEBOXFN ENCAPSULATEDOBJ.PUTFN NIL ENCAPSULATEDOBJ.BUTTONEVENTINFN NILL) -\\FM.STARTEDIT (\\FM.NUMBER-CHANGESTATE) RAIDSTACKCMD (PRINCOPY) PRINTHISTORY1 (PRIN2) -MAKE-NETWORK-TRACE-WINDOW (LASTMOUSESTATE ZEROP LOGAND \\CHANGE.ETHER.TRACING WINDOWPROP) -PROCESS.RETURN (\\MAKE.PROCESS0) HISTORYFIND (LISPXFIND) \\UNWIND.PROCESS (\\MAKE.PROCESS0) -PRINT-LISP-INFORMATION (SI::RESETUNWIND) INSPECT/ARRAY (ELT /SETA) COMPILER::TEST-ANNOTATION ( -COMPILER::RELEASE-TREE) \\SETUPUSERSTACK (\\CODEFORTFRAME) CL::%MAKE-FLOAT-ACCESSOR (\\INSTANCE-P -CL:ERROR \\GETBASEFLOATP) \\BASEBYTES.IO.INIT (NILL \\GENERATENOFILES \\BASEBYTES.NAME.FROM.STREAM -\\BASEBYTES.OPENFN \\ILLEGAL.DEVICEOP \\BASEBYTES.BIN \\BASEBYTES.BOUT \\BASEBYTES.PEEKBIN -\\BASEBYTES.READP FFETCHFIELD \\PAGEDBACKFILEPTR IDIFFERENCE FREPLACEFIELD \\BASEBYTES.SETFILEPTR IGEQ - \\BASEBYTES.BLOCKIO \\GENERIC.READCCODE \\GENERIC.CHARSET \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR -\\GENERIC.WRITECHAR \\GENERIC.READCHAR) I.S.OPR (MEMB /PUTHASH) |\\LFVersions| (LESSP) FRPTQ (PROGN) -\\INFER.FILE.TYPE (NILL) MARGINBAR.INIT (MB.MARGINBAR.DISPLAYFN MB.MARGINBAR.SIZEFN MB.MARGINBAR.PUTFN - MB.MARGINBAR.GETFN MB.COPYFN MB.MARGINBAR.SELFN) CL:LOAD (CL:CLOSE) \\KEYHANDLER1 ( -\\PERIODIC.INTERRUPTFRAME \\DOBUFFEREDTRANSITIONS \\INTERRUPTFRAME \\TIMER.INTERRUPTFRAME) PFCOPYBYTES - (DSPFONT FREPLACEFIELD NILL) RPTQ (PROGN) LISPX (SI::RESETUNWIND) PEEKCCODE (\\PEEKREFILL) -COMPILE-FILE-EXPRESSION (CL:CONSP CL:EVAL COMPILE-FILE-EXPRESSION COMPILE-FILE-WALK-FUNCTION PRINT) -\\LEAF.RECONNECT (SI::MONITOR-UNWIND) DOATTACHEDWINDOWCOM (PPROMPT3 CLRPROMPT) RESTART.PROCESS ( -RESTART.PROCESS \\MAKE.PROCESS0) EDITCALLERS (CLOSEF?) \\READACFONTFILE (CLOSEF?) WTFIX1 ( -SI::RESETUNWIND) RECREDECLARE (RECREDECLARE1) CREATE-SHELL-STREAM (\\EOSERROR \\FILEOUTCHARFN -\\STREAM.NOT.OPEN UNIX.SENDSCREENPARAMS UNIX.SETDISPLAYTYPE) SI::MAKE-AROUND-BODY (CL:SUBST) \\GETSPP -(SI::MONITOR-UNWIND) \\SETTYPEMASK (\\PUTBASE FOLDLO LRSH LOGOR \\GETBASE) COMPILER::ALPHA-MV-PROG1 ( -COMPILER::ALPHA-FORM) CLDISABLE (SI::RESETUNWIND) RAIDSHOWFRAME (PRINCOPY) INFILECOMSVAL (INFILECOMS?) - COMP.MLLIST (COMP.MLLVAR) CLEARSTK (\\VAG2 LRSH LLSH LOGAND FFETCHFIELD SELECTQ UNINTERRUPTABLY -FREPLACEFIELD \\DECUSECOUNT CONS IPLUS \\ADDBASE) MAKEMAINWINDOW (TOPATTACHEDWINDOWS -CLOSEATTACHEDWINDOWS OPENATTACHEDWINDOWS SHRINKATTACHEDWINDOWS EXPANDATTACHEDWINDOWS -ATTACHEDWINDOWREGION MINATTACHEDWINDOWEXTENT MAXATTACHEDWINDOWEXTENT MOVEATTACHEDWINDOWS -RESHAPEALLWINDOWS) FB.COPYCOMMAND (COPYFILE) \\UFS.CLEANUP.GFS.TABLE (\\UFS.UNREGISTER.GFS) -GET-ONED-DISPLAYW (ONEDINSPECT.REPAINTFN CLEARW ONEDINSPECT.SCROLLFN ONEDINSPECT.BUTTONEVENTFN -ONEDINSPECT.COPYBUTTONFN ONEDINSPECT.CLOSEFN ONEDINSPECT.DEFAULT.VALUECOMMANDFN -ONEDINSPECT.DEFAULT.TITLECOMMANDFN) PEEKC (\\PEEKREFILL) FILES?PRINTLST (> + POSITION NCHARS -LINELENGTH LISPXTERPRI LISPXPRIN1 LISPXPRIN2) \\10MB.CREATENDB (\\10MBSENDPACKET \\10MBENCAPSULATE -\\10MB.BROADCASTP \\10MB.TURNOFFETHER) \\FM.3STATE-SETUP (\\FM.3STATE-DOWNFN \\FM.DISPLAYITEM -\\FM.3STATE-SELECTEDFN) FB.ADD.FILEGROUP (FB.DECREASING.VERSION) CL::GET-SHARED-SETF-METHOD (CL:CONSP -CL:CONSTANTP GENSYM) GET-TITLEW (TITLEW.REPAINTFN CLEARW TITLEW.BUTTONEVENTFN) DISPTREE (INSPECT) -INSPECTCODE (\\INSPECT/CODE/REPAINTFN \\INSPECT/CODE/RESHAPEFN SCROLLBYREPAINTFN) FILEBROWSER ( -FB.MENU.WHENSELECTEDFN FB.NAMES.DECREASING.VERSION FB.HANDLE.ABORT.BUTTON FB.PRINTFN FB.COPYFN -FB.CLOSEFN FB.AFTERCLOSEFN FB.HARDCOPY.DIRECTORY FB.ICONFN FB.GET.NEWPATTERN) INSPECTW.REDISPLAY ( -DEFAULT.INSPECTW.PROPCOMMANDFN DEFAULT.INSPECTW.VALUECOMMANDFN) INITIALIZE-SHELL-DEVICE ( -\\GENERIC.READCCODE \\IS.NOT.RANDACCESSP \\ILLEGAL.DEVICEOP \\GENERIC.CHARSET NILL \\GENERIC.BOUTS -\\GENERIC.BINS \\GENERIC.READP \\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR -\\GENERIC.READCHAR \\GENERIC.RENAMEFILE) \\MAKEBASEBYTESTREAM (\\EOSERROR \\FILEOUTCHARFN -\\STREAM.NOT.OPEN \\MBS.OUTCHARFN) SEDIT::SETUP-WINDOW-AND-PROCESS (SEDIT::TTYEXITFN) -PARSE-FORMAT-OPERATION (CL:CHAR=) \\TOP-LEVEL-READ (\\READREFILL FREPLACEFIELD RETFROM -\\TOP-LEVEL-READ) |\\LFCreateFile| (\\EOSERROR \\FILEOUTCHARFN \\STREAM.NOT.OPEN) |\\LFCreateDevice| ( -|\\LFCloseFile| NILL |\\LFDeleteFile| |\\LFRenameFile| |\\LFTruncateFile| |\\LFGetFileInfo| -|\\LFGetFileName| |\\LFOpenFile| |\\LFReadPages| |\\LFSetFileInfo| |\\LFWritePages| -|\\LFGenerateFiles| |\\LFEventFn| |\\LFDirectoryNameP| \\GENERIC.OPENP \\ADD-OPEN-STREAM -\\GENERIC-UNREGISTER-STREAM \\GENERIC.READCCODE \\IS.NOT.RANDACCESSP \\ILLEGAL.DEVICEOP -\\GENERIC.CHARSET \\GENERIC.BOUTS \\GENERIC.BINS \\GENERIC.READP \\GENERIC.UNREADCHAR -\\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR) COMPILER::COMPILE-FILE-DEFINEQ (CL:SECOND -CONS) BAKTRACE1 (BAKTRACE1) GRAPHERIMAGEFNS (GRAPHOBJ.DISPLAYFN GRAPHOBJ.IMAGEBOXFN GRAPHOBJ.PUTFN -GRAPHOBJ.GETFN GRAPHOBJ.COPYFN GRAPHOBJ.BUTTONEVENTINFN GRAPHOBJ.COPYBUTTONEVENTFN NILL) UPDATECHANGED - (UPDATECHANGED1) READC (\\READCREFILL) TEDIT.OBJECT.CHANGED (FFETCHFIELD) PUTSEQUIN (SI::MONITOR-UNWIND -) \\SPP.CREATE.WATCHER (\\SPPWATCHER) \\SPP.HANDLE.DATA (\\SPP.STREAM.LOST) ICMLARRAY.GETMENUWGROUP ( -NILL) SUBRNUMBER (STRING.EQUAL) RAIDCOMMAND (PRINCOPY) INFILECOMSPROP (INFILECOMS?) \\RESETSTACK0 ( -\\FAULTHANDLER \\DOHARDRETURN \\DOTELERAID \\DUMMYTELERAID \\KEYHANDLER \\DOGC \\DOSTACKOVERFLOW -\\DOMISCAPPLY) TTYIN.SCRATCHFILE (\\TTYIN.RPEOF) BREAK.NSFILING.CONNECTION (\\NSFILING.OPENFILE) -CL::%MAKE-SMALL-FIXP-ACCESSOR (\\INSTANCE-P CL:ERROR) SAVEONSYSRECLST (PRIN2) BREAK1 (RELSTK) -CL::%MAKE-FIXP-ACCESSOR (\\INSTANCE-P CL:ERROR \\GETBASEFIXP) SELECTC (PROGN) ADVISEWDS (PAGEHEIGHT) -CHDIR (SI::MONITOR-UNWIND) |PopUpWindowAndGetAtom| (CLOSEW) SELECT (PROGN) -SI::DESCRIBE-USING-RECORD-DECL (SI::DESCRIBE-NEW-LINE CL:FORMAT SI::DESCRIBE-INTERNAL RECORDACCESS CL:1+ -) PRINTERDEVICE (\\CORE.OPENFILE STREAMPROP FILENAMEFIELD FFETCHFIELD OPENP IGREATERP GETEOFPTR -\\CORE.CLOSEFILE \\SETACCESS SEND.FILE.TO.PRINTER STRPOS ADD1 SUBATOM SUB1 APPEND FDEVOP SPREADAPPLY*) - \\TELERAIDENTRY (\\3MBRAWRECEIVE \\10MBRAWRECEIVE) CLISPIF0 (NCONC) TEDIT.COPY ( -\\TEDIT.COPY.PIECEMAPFN) DWIMIFYFNS (DWIMIFYFNS) \\LEAF.GETFILE (SI::MONITOR-UNWIND \\EOSERROR -\\FILEOUTCHARFN \\STREAM.NOT.OPEN) SET-READTABLE-INTERACTIVELY (CONS LIST ALPHORDER) -TEDIT.WINDOW.SETUP (\\TEDIT.BUTTONEVENTFN TEDIT.HARDCOPYFN) RATOM (\\RATOM/RSTRING-REFILL) -TOPW.BUTTONEVENTFN (INSPECT.INVERTREGION) INSPECT/HARRAYP (HARRAYKEYS INSPECTW.GETHASH -INSPECTW.PUTHASH) FB.FASTSEECOMMAND (FB.SEEFULLFN WINDOWPROP DEL.PROCESS OPENWP DETACHWINDOW CLOSEW) -CLISPATOM0 (SI::RESETUNWIND) \\NSFILING.DESERIALIZE1 (\\BULK.DATA.CLOSE \\NSFILING.RELEASE.BULKSTREAM) - SEDIT::SETUP-NEW-CONTEXT (SI::MONITOR-UNWIND) SI::CREATE-CONDITION-CASE-LITERALS (CL:THROW) -INSPECT/LISTP (NILL) USEREXEC (SI::RESETUNWIND) \\CAUSEINTERRUPT (\\INTERRUPTFRAME) -CL:MAKE-CONCATENATED-STREAM (\\EOSERROR \\FILEOUTCHARFN \\STREAM.NOT.OPEN) |\\DFSFreeDiskPages| ( -SI::MONITOR-UNWIND) FB.UPDATEBROWSERITEMS (CAR FB.NAMES.DECREASING.VERSION) PFI.PRINT.BITMAP ( -PFI.OUTCHARFN) RETURN (\\PROG0) CHAT (UALPHORDER CHAT.RECONNECT) INFILECOMTAIL (SI::RESETUNWIND) -DMCHAT.HANDLECHARACTER (DMCHAT.HANDLE.WRAP) \\STRINGSTREAM.INIT (NILL \\NULLFILEGENERATOR -\\ILLEGAL.DEVICEOP FFETCHFIELD FREPLACEFIELD GNCCODE \\EOF.ACTION CHCON1 EOFP NCHARS -\\GENERIC.READCCODE \\IS.NOT.RANDACCESSP \\GENERIC.CHARSET \\GENERIC.BOUTS \\GENERIC.BINS -\\GENERIC.UNREADCHAR \\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR \\GENERIC.RENAMEFILE) -\\SENDSPP (SI::MONITOR-UNWIND) FB.ADJUST.DATE.WIDTH (CL:NTH FFETCHFIELD + STRINGWIDTH > NCHARS -SUBSTRING FRPLACA) INTERRUPTED (\\DOINTERRUPTHERE) RECORDECLARATIONS (PRIN2) CL::GET-SIMPLE-SETF-METHOD - (CL:CONSP CL:CONSTANTP GENSYM) \\MAPCHARS (SPREADAPPLY*) COURIER.EXECUTE.EXPEDITED.CALL ( -\\SPP.RESETCLOSE) DWIMIFY2A (SUBSTRING RETDWIM2 CONCAT MKSTRING CONS) COMPERROR (COMP.RETFROM.POINT) -POSTSCRIPTFILEP (STRING-EQUAL) COPYVM (SI::RESETUNWIND) LISPXFIND (SI::RESETUNWIND) -COMPILER::START-COMPILATION (SI::RESETUNWIND) RESETFORM (SI::RESETUNWIND) OPENSTRINGSTREAM ( -\\STRINGBIN) CL::STRUCTURE-FUNCTION-P (CL:CONSP CL::PS-CONSTRUCTORS CL:MEMBER CL:FUNCTION EQ -CL::PS-PREDICATE CL::PS-COPIER CL:THROW) NCHARS (PLUS) XCL::WHERE-IS-NOTICE (HASH-FILE:CLOSE-HASH-FILE -) \\MAKE.PROCESS0 (\\PROCESS.MOVEFRAME) CL::%MAKE-WORD-ACCESSOR (\\INSTANCE-P CL:ERROR \\GETBASE) +NEWFILEMAP ORIGFLG PRTTYSPELLFLG LAM?LST SOURCEFILE %#RPARS) \CURVE2 (T) ALLCALLS (NOSPELLFLG) +\LFDeleteFile (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \EVALFORM (*FORM* *ARGVAL* *FN* *TAIL*) +DASSEM.DASSEM (VARCOUNT FRAMES CD CODELOC FRAME) CL:COMPILE-FILE (SPECVARS LOCALVARS LOCALFREEVARS +GLOBALVARS NLAMA NLAML LAMA DONTCOMPILEFNS) \UFSGenerateFiles (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +PACK (PACK.INDEX \PNAMESTRING) RESETVAR (SI::*RESETFORMS*) COPYALL (NH) \CORE.GETINFOBLOCK (ROOT EXT +VERS) LOADFNS-FINDFILE (DWIMFLG FILEPKGFLG) WINDOW.MOUSE.HANDLER (\MOUSEBUSY) \FTP.CLEANUP (CONNS FAIL +) PRIN3 (*PRINT-RADIX* *PRINT-ESCAPE* *PRINT-LEVEL* *PRINT-LENGTH* \THISFILELINELENGTH) +STACK.FULL.WARNING (FLG) NAMESTRING-CONVERSION-CLAUSE (LITATOM-PACKAGE-CONVERSION-TABLE) +\PFI.DO.HARDCOPY (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) PARSE-DEFMACRO (%%CTX-ARG-NAME %%ENV-ARG-NAME + *KEY-FINDER* *DEFAULT-DEFAULT*) RESOLVE-READER-CONFLICT (*PREFERRED-READING-SYMBOLS*) \UFSGetFileInfo + (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) \BACKTRACE (.I7) \MAIKO.ETHER-INTERRUPT (SI::*LOCKED-MONITOR* + SI::*RESETFORMS*) EQUALHASH (AR1 AR2) BCOMPL2 (GLOBALVARS RETFNS BLKLIBRARY NOLINKFNS LINKFNS +DONTCOMPILEFNS) GETDEF (NOCOPY) \UFSDeleteFile (SI::*LOCKED-MONITOR* SI::*RESETFORMS*) +OPENPOSTSCRIPTSTREAM (SI::*RESETFORMS*) READVARS-FROM-STREAM (BACKREFS BACKREFCNT DATATYPESEEN RPTCNT +RPTVAL) \NEW.MKATOM (*INTERLISP-PACKAGE*) COMP.TRANSFORM (*BYTECOMPILER-IS-EXPANDING* +*BC-MACRO-ENVIRONMENT*) WRITE-STRING* (\THISFILELINELENGTH) \STRINGWIDTH.HCPYDISPLAYAUX (TOTALWIDTH +WIDTHSBASE CSET FONT SPACEWIDTH) OPT.DEADSETQP (ICNT) \LFRenameFile (SI::*LOCKED-MONITOR* +SI::*RESETFORMS*) COMPILE-IN-CORE (LCFIL LAPFLG STRF SVFLG LSTFIL SPECVARS LOCALVARS +DONT-TRANSFER-PUTD SI::*RESETFORMS*) COMP.MACRO (*BYTECOMPILER-IS-EXPANDING*) NIL +LOCALVARS \INTERPRETER (FN ARGLIST T) FNTYP (#:G2 #:G3) SEDIT::STRINGWIDTH ($$TEM1 $$TEM2 $$TEM3 +$$TEM4 $$TEM5) TTYINBUFFERPEEK (CH) \UFS.RECOGNIZE.FILE (#:G101) EDITSHADE ($$OUTPUT) COURIER.OPEN ( +STREAM W) \DSPFONT.HCPYMODE (FONTDESC CHARCODE) FIND.PACKAGE (BASEA0286) \PSWOP.SELECTED ( +\DurationLimit) \FM.STATE-SETUP (SI::$PROG1-FIRST-EXPRESSION$) \COURIER.CHECK.ERRORS (X) +TB.COPYBUTTONEVENTFN (SI::*OR-GENTEMP*) \SPP.PREPARE.INPUT (STREAM NBYTES) PROCESS.EVAL (T) GETHASH ( +BASEA0293 BASEA0294) TEDIT.DISPLAYTEXT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) HASH.PASSWORD ($$TEM1 +$$TEM2 $$TEM3 $$TEM4 $$TEM5) \DOFORMATTING.HARDCOPY (BASEA0787 BASEA0788 BASEA0789 BASEA0790 BASEA0791 + BASEA0792 ARR N VAL BASEA0793 BASEA0794) \LET*-RECURSION (T) \ATMOUT (STREAM W $$TEM1 $$TEM2 $$TEM3 +$$TEM4 $$TEM5) \PEEKCCODE (CHA0349) \PRINTFRAME (FAST INCALL VALIDNAMETABLE NOPUSH USECNT SLOWP ALINK +FNHEADER NEXTBLOCK NAMETABLE BLINK) \RPLCHARCODE (FATPA0360 BASEA0359 OFFSETA0358) +\TEDIT.PUT.SINGLE.CHARLOOKS (STREAM W) \BACKTRACE (SI::$PROG1-FIRST-EXPRESSION$) SEDIT::COPY-SELECTION + ($$OUTPUT) \GETREADSYNTAX (TABLEA0392) \COURIER.ATTENTIONFN (SI::*OR-GENTEMP*) PREVWORD (X CH) +\FM.MENUHANDLER ($$OUTPUT) \GETTERMSYNTAX (TABLEA0389) SORT1 (T) TTSKREAD (TABLE CHAR CH) +\TEDIT.PUT.CHARLOOKS.LIST (STREAM W) \NSFILING.ADDQUOTES ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) MB.GETFN + (STREAM W) TTYIN.READ (STREAM CHAR CH TABLE) \FM.3STATE-CHANGESTATE (SI::$PROG1-FIRST-EXPRESSION$) +ROT (NA0615) UnixShellQuote (T) \STREAMCHARWIDTH (TABLEA0498) \TEDIT.PUT.CHARLOOKS.LIST2 (STREAM W) +TTYDISPLAYSTREAM (A) PRINTADDRS (SI::*OR-GENTEMP*) PP (T) CHARACTER (BASEA0354) \FM.EDITSTART-SETUP ( +SI::$PROG1-FIRST-EXPRESSION$) STREQUAL (T) TTYINBUFFERBIN (CH) \DISPLAYLINE (BASEA0753 BASEA0754 +BASEA0755 BASEA0756) TTYIN.FINISH (TABLE CHAR CH) \FTP.PRINTPLIST ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) + \PARSEARRAYSPACE1 (BASE N) SEDIT::MENU-PACKAGE-SELECTEDFN ($$OUTPUT) \ITEM.WINDOW.COPY.HANDLER ( +SI::*OR-GENTEMP*) \SETUPTIMERmacrofn (X) \MEDW.BLTCHAR (T SI::*OR-GENTEMP*) DINFO.SPECIAL.UPDATE ( +$$OUTPUT) L-CASE ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \NSFILING.HANDLE.ERROR (LOCK) \FAX.PARSE.NAME ( +$$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \BSP.HANDLE.ERROR (#:G117) \COURIER.CHECK.PROCEDURES (X) +\UFS.REMOVE.HOST.FIELD (#:G111) U-CASEP ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \VAMUpdateVAM ( +POSITIONA0720) \RESHOWBORDER1 (SI::*OR-GENTEMP*) TTYIN1 (TABLE CHAR CH) \TEDIT.HARDCOPY.FORMATLINE ( +ARR N VAL BASEA0782 BASEA0783 BASEA0784 BASEA0785 FONTDESC CHARCODE BASEA0786) SEDIT::ATOM-CHAR-ESCAPED + (TABLEA0702) \TEDIT.GET.TERMSA.WIDTHS (A J V) U-CASE ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5 FATP BASE +OFFSET CODE) BRKDWNCONSES (T PTRA0708 VALA0707 PTRA0710 VALA0709) \SEND.EXPEDITED.XIP (X) +\LFScavFileName ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \TEDIT.PURGE.SPACES (BASEA0744 BASEA0745) +\FM.DISPLAY-SETUP (SI::$PROG1-FIRST-EXPRESSION$) \BULK.DATA.CLOSE (SI::*OR-GENTEMP*) TEDIT.GETFUNCTION + (TABLEA0736) FIND.NEXT.WORD (X CH) APPENDNUMBER.IP (STREAMA0732 NUMA0731) BITMAPBIT (SI::*OR-GENTEMP* +) TTYIN.BALANCE (TABLE CHAR CH) \FILLBUFFER (STRM CHAR TABLE) \TELERAIDSERVER (KEYNUMBER) +PROCESS.APPLY (T) FAULTAPPLY (ARGLISTA0614 T) KEYDOWNP (BASE OFFST \ByteNo \BitMask POSITIONA0374) +BLTVLINE (A) \LINEWITHBRUSH (T SI::*OR-GENTEMP*) \UFS.DIRECTORY.NAME (#:G102 #:G103) +\INTERPRETER-LAMBDA (T) \LFUnpackName ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \PUTBASESTRING ($$TEM1 +$$TEM2 $$TEM3 $$TEM4) CHARWIDTH (FONTDESCA0491) \IRM.WILD.REF ($$OUTPUT) \SETTERMSYNTAX (TABLEA0391) +\BBTCURVEPT (BBTA0619 SourceTypeA0618 BBTA0621 SourceTypeA0620) \TEDIT.PUT.SINGLE.PARALOOKS2 (STREAM W +) TEDIT.\INSERT (T) TEDIT.PUT.PCTB2 (ARR NO BASEA0767 $$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) +\SETREADSYNTAX (TABLEA0393) AT.END.OF.TEXT (CH) SYNTAXP (TABLEA0378 TABLEA0379 TABLEA0381 TABLEA0383 +TABLEA0385 TABLEA0387) UNION (T) \MEDW.MOVEW (SI::*OR-GENTEMP*) INITDATATYPENAMES (X) CCCSCAN (X DEF +LC CODEBASE OFFSET) STRPOS (CABASE CASIZE CAFAT CHAR) FB.REMOVE.FILE (FD1 FD2) LENGTH (N) +\STRINGWIDTH.HDCPYDISPLAY (FONT CHARCODE) COURIER.WRITE (STREAM W FIXP) STRINGWIDTH (FONTDESC CHARCODE +) \SLOWBLTCHAR (SI::*OR-GENTEMP*) \TEDIT.PUT.SINGLE.CHARLOOKS2 (STREAM W) TEDIT.EXTEND.SEL (A) +\DSPPRINTCR/LF (SI::*OR-GENTEMP*) CL:MULTIPLE-VALUE-CALL (T) \SHIFT.DOCUMENT (ARR NO BASEA0775) +\TEDIT.BLTCHAR (T) \IDATESCANTOKEN (UCHAR) PPT (T) SCANFORWARD (CH) EDITDEF (T) CHAT.SCREENPARAMS (A) +\CCODEIVARSCAN (X CODEBASE OFFSET DEF LC) COURIER.EXECUTE.CALL (STREAM FIXP W) BLTSHADE (T) +RAIDCOMMAND (X) \CHARWIDTH.PRESS (FONTDESC CHARCODE) \SHAPEW2 (T) CL:RETURN-FROM (T) BLTHLINE (A) +\MEDW.CLOSEW (SI::*OR-GENTEMP*) \FM.CHANGELABEL (SI::$PROG1-FIRST-EXPRESSION$) SEDIT::TRANSLATE-CHARS +($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \STRINGOUT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) PARSE-NSADDRESS ( +$$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) UNPACKFILENAME.STRING (STA0395 ENDA0394 STA0397 ENDA0396 NAM ST +END STA0399 ENDA0398 STA0401 ENDA0400) \ENTITYSTART.PRESS (STRM) \ENTITYEND.PRESS (STREAM W) +\GETUFNENTRY (BASE N) \ALLOCBLOCK (SI::$PROG1-FIRST-EXPRESSION$) POSSIBILITYFN (FN) REVERSE (U) +DINFO.HISTORIC.UPDATE ($$OUTPUT) CHARACTER.READ (TABLEA0348) SHAPEW1 (T) SEDIT::LINEARIZE-CLISP ( +#:G115) \MEDW.OPENW (SI::*OR-GENTEMP*) SETD (BASEA0290 BASE N) TTYIN.SHOW.?ALTERNATIVES (X) +\UFS.HANDLE.RELATIVEDIRECTORY (#:G112) ELTD (BASEA0289 BASE N) FIND.START.OF.WORD (X CH) +\FM.3STATE-SETUPOFFBITMAP (SI::$PROG1-FIRST-EXPRESSION$) CALLSCCODE (X CODEBASE OFFSET) \MAYBEPEEKNS ( +X XA0722 XA0723) FAULTEVAL (T) \CHARWIDTH.IP (FONTDESCA0733) ATOMHASH#PROBES ($$TEM1 $$TEM2 $$TEM3 +$$TEM4) \POSTSCRIPT.OUTCHARFN (T) REHASH (BASE N BASEA0301) SEDIT::INPUT-NORMAL-CHAR ($$OUTPUT) +APPENDINTEGER.IP (STREAMA0730 NUMA0729) SCANBACK (CH) TEDIT.STRINGWIDTH ($$TEM1 $$TEM2 $$TEM3 $$TEM4 +$$TEM5) \HANDLE.RAW.PUP (SOCHI SOCLO) \LINEBUF.EOFP (STRM) \DOFORMATTING (BASEA0746 BASEA0747 +BASEA0748 BASEA0749 BASEA0750 ARR N VAL BASEA0751 BASEA0752) \FM.3STATE-SETUP ( +SI::$PROG1-FIRST-EXPRESSION$) APPLY (T) APPLY* (FN ARGLIST T) DREVERSE (Y Z) TCONC (XX) CL:VALUES (X) +POSTSCRIPT.OUTSTR (T $$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \WRITEPRESSBITMAP (STREAM W) INTERSECTION (R +S) \FTP.HANDLE.NO ($$OUTPUT) CL:VALUES-LIST (X) \HCPYMODEBLTCHAR (T SI::*OR-GENTEMP*) \TEXTBIN (T) +ICMLARRAY.MENUW.APPLY ($$OUTPUT) \PARSE.PORTCONSTANT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) +\MAIKO.CONS.UFN (A LO PAGE D) SEDIT::PRINT-STRING ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \CURVEEND ( +NEWXA0633 NEWYA0632 A SI::*OR-GENTEMP*) BRKDWNFBOXES (T PTRA0716 VALA0715 PTRA0718 VALA0717) +\SETSPACE.PRESS (STREAM W) LCONC (XX) CL:IF (T) \RTP.HANDLE.PUP (#:G116) DRAWELLIPSE (T) +SEDIT::INSPECT-SELECTION ($$OUTPUT) \INCHAR (CHA0807 EOLCA0806) \INIT-MISCN-TABLE (BASE N) +CL::VALUES-UFN (X) EVALUABLE.CONSTANTP (X) SEDIT::RELINEARIZE (SEDIT::LINE) \MEDW.BITBLT ( +SI::*OR-GENTEMP*) \10MBSENDPACKET (X Y) CL::VALUES-LIST-UFN (X) \MAIKO.10MBSENDPACKET (X Y) CLOSEALL ( +T) COURIER.WRITE.BULKDATA (STREAM W) \TEDIT.UNPARSE.CHARLOOKS.LIST (VAL A) \POSTSCRIPT.ACCENTFN (T +$$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) TTGIVEHELP1 (X) \FM.SETATTACHPOINT (SI::$PROG1-FIRST-EXPRESSION$) +SEDIT::OUTPUT-STRING (SEDIT::CONTEXT SEDIT::NEW-LPTR) \TEDIT.LOOKS.UPDATE (ARR N VAL BASEA0761 +BASEA0762 BASEA0763 BASEA0764 BASEA0765 BASEA0766) STRPOSL (TABLE CHAR) \EVAL-INVOKE-LAMBDA (T) +READATOM (SI::$PROG1-FIRST-EXPRESSION$) CLRHASH (BASE N BASEA0291) \ACTONDISKPAGES (SI::*OR-GENTEMP*) +EOFCLOSEF (T) CL:EVAL (T) COURIER.WRITE.FAT.STRING (STREAM W) \STKMIN (T) \PROG0 (X) +\SLOWHCPYMODEBLTCHAR (SI::*OR-GENTEMP*) MB.MARGINBAR.SELFN (A) FB.COPY/RENAME.MANY (FD1 FD2) +ICMLARRAY.MENUW.GETLEVEL ($$OUTPUT) \CLIPANDDRAWLINE (SI::*OR-GENTEMP* A) TTECHO.TO.FILE (STREAM CHAR) + \CHARWIDTH.PSC (FONTDESCA0728) IRM.DISPLAY.REF ($$OUTPUT) POSTSCRIPT.PUTBITMAPBYTES (T) STKARGNAME (X +) SETSTKARGNAME (X) ONEDINSPECT.COPYBUTTONFN (SI::*OR-GENTEMP*) \MEDW.GETSCREENREGION (A) CL:THROW (T) + TEDIT.WORDGET (TABLE CHAR) WHENCLOSE (T) \PROTECTED.APPLY (T) \WRITEDISKPAGES (SI::*OR-GENTEMP*) +\PEEKREFILL (C) COPY.WINDOW.TO.BITMAP (SI::*OR-GENTEMP*) \CHARWIDTH.DISPLAY (FONTDESCA0492) +\HASHACCESS (BASEA0299 BASEA0300) \INCCODE.EOLC (CHA0805 EOLCA0804) COURIER.WRITE.SEQUENCE.UNSPECIFIED + (STREAM W FIXP) \PUTBASEBITS (NA0617 POSA0616) MAPHASH (T BASE N BASEA0292) \DSPOPERATION.DISPLAY ( +BBTA0500 SourceTypeA0499) \EVALA (X) SEDIT::OUTPUT-SPACE (SEDIT::CONTEXT SEDIT::NEW-LPTR) +\FM.TOGGLE-CHANGESTATE (SI::$PROG1-FIRST-EXPRESSION$) \POSTSCRIPT.ACCENTPAIR (T $$TEM1 $$TEM2 $$TEM3 +$$TEM4 $$TEM5) \STRINGWIDTH.GENERIC ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5 FONTDESC CHARCODE) \SUBREAD ( +TABLE CHAR) \CHECKCONSPAGE (SI::*OR-GENTEMP*) \BLTSHADE.DISPLAY (T SI::*OR-GENTEMP*) TEDIT.PUT.PCTB ( +$$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) PRINTCODE (SI::$PROG1-FIRST-EXPRESSION$ CODEBASE OFFSET +SI::*OR-GENTEMP* X) \ARBOUT (STREAM W) \HASHRECLAIM (BASE N BASEA0298) RETURN (T) \HANDLE.RAW.10TO3 ( +XA0719) PRINTCODENT (CODEBASE OFFSET X) OPENPUPSOCKET (SOCHI SOCLO) EDITDATE? (T) \DRAWCIRCLE.DISPLAY +(T SI::*OR-GENTEMP* X Y XA0622 XA0623) \CHTOPCNO (T) \PS.BOUTFIXP (T) PUTASSOC (X) +\DRAWELLIPSE.DISPLAY (T SI::*OR-GENTEMP* X Y) PRINTBITMAP (T) EOFP (STRM) \DRAWLINE.DISPLAY (T +SI::*OR-GENTEMP*) TTUNREADBUF (CH) \PRINSTRING ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \DO.PROGV (T) +\FILLCIRCLE.DISPLAY (SI::*OR-GENTEMP*) LASTN (X Y) FIND.MATCHING.QUOTE (TABLE CHAR CH) FILL.XPER ( +SI::*OR-GENTEMP*) LET (T) RPLCHARCODE (FATPA0357 BASEA0356 OFFSETA0355) \LFGenerateFiles ($$TEM1 +$$TEM2 $$TEM3 $$TEM4 $$TEM5) \CKPOSSOUT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \STRINGWIDTH.PRESS ( +$$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \BITBLT.BITMAP.SLOW (T) \LET0 (T X) RPT (RPTF RPTV) FRPTQ (T) +COPYATOM (X) LET* (T) ENDREAD? (TABLE CHAR CH) \LITPRIN ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) +\TEDIT.PUT.SINGLE.PARALOOKS (STREAM W) MAKEINITLAST (PTR X SI::*OR-GENTEMP*) \LET* (T X) SKIPSEPRCODES + (TABLE CHAR) \FM.NUMBER-CHANGESTATE (SI::$PROG1-FIRST-EXPRESSION$) \STRING-EQUAL-HASHBITS-UFN ($$TEM1 + $$TEM2 $$TEM3 $$TEM4 $$TEM5) \BITBLT.DISPLAY (T DS SI::*OR-GENTEMP*) \PUNT.BITBLT.BITMAP (T) +COURIER.WRITE.SEQUENCE (STREAM W) \XIPERROR (X) \TELERAIDBREAK (KEYNUMBER) EDITADDNODE ($$OUTPUT) +\DSPFONT.DISPLAY (FONTDESC CHARCODE) INCORNER.REGION (A) %%NUMERIC-STRING-P ($$TEM1 $$TEM2 $$TEM3 +$$TEM4 $$TEM5) \POSTSCRIPT.SPECIALOUTCHARFN (T) SEDIT::SHRINKFN ($$OUTPUT) \HTFIND (GCCNT) +\SETNEWTIME0 (A) MENU (T) \STRINGHASHBITS-UFN ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) DUMPINITPAGES ( +VPAGE) WRITESTRIKEFONTFILE (STREAM W) RESETBUFS (T) \FM.TOGGLE-SETUP (SI::$PROG1-FIRST-EXPRESSION$) +SKREAD (TABLEA0343) DSPSOURCETYPE (BBT SourceType Operation) SELECT1 (T) DASSEM.DSTOREFNDEF (X) +\UFSParse-Directory (#:G109 #:G110) \TEDIT.PUT.CHARLOOKS (STREAM W) \RPLACD.UFN (PAGE A D) +\PUNT.BLTSHADE.BITMAP (T) TTYINSTRING (X CH) \TEDIT.HCPYLOOKS.UPDATE (ARR N VAL BASEA0795 BASEA0796 +BASEA0797 BASEA0798 BASEA0799 BASEA0800 BASEA0801 BASEA0802 BASEA0803) \MAP-CODE-POINTERS (CODEBASE +OFFSET) SELECTC (T) \TRANSLATE.10TO3 (X Y) \TELERAIDCOMMAND (KEYNUMBER) \MAP-CODE-LITERALS (X CODEBASE + OFFSET DEF LC) \LITPRIN.INTERNAL (A $$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \FONT.COMPARESYMBOL ($$TEM1 +$$TEM2 $$TEM3 $$TEM4 $$TEM5 $$TEM6 A0493 A0494 A0495 A0496) \CHECKARRAYBLOCK (BASE N) \RESETKEYBOARD ( +KEYNUMBER) SELECT (T) SORT (T) APPENDIDENTIFIER.IP ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) ENVAPPLY (T) +\PARTEND.PRESS (STREAM W) SEDIT::OUTPUT-CR (SEDIT::CONTEXT SEDIT::NEW-LPTR SEDIT::LINE) \CURVE (T A +SI::*OR-GENTEMP* NEWXA0625 NEWYA0624 NEWXA0627 NEWYA0626 NEWXA0629 NEWYA0628 NEWXA0631 NEWYA0630) +\POSTSCRIPT.PRINTSLUG (T) BRKDWNTIME (T PTRA0704 VALA0703 PTRA0706 VALA0705) CL:PARSE-INTEGER (TABLE +CHAR) TEDIT.SUBSTITUTE ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \FM.NUMBER-SETUP ( +SI::$PROG1-FIRST-EXPRESSION$) \FM.EDIT-SETUP (SI::$PROG1-FIRST-EXPRESSION$) \FM.NWAY-SETUP ( +SI::$PROG1-FIRST-EXPRESSION$) PRIN2-LONG-STRING ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) STRMEMB (C N) +\CONS.UFN (A LO PGA0282 PGA0283) \CHARWIDTH.HDCPYDISPLAY (FONTA0700) \HANDLE.RAW.XIP (SOCNUM) SUBSET ( +T) \PAGEDREADP (TABLE CHAR) SEDIT::HASFAT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) +%%SYNONYM-STREAM-DEVICE-EOFP (STRM) \UPCASEBASE (FATP BASE OFFSET CODE) TEDIT.GETSYNTAX (TABLE CHAR) +\KEYACTION1 (X) \SYMBOL.ESCAPE.COUNT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) NCHARS ($$TEM1 $$TEM2 $$TEM3 + $$TEM4 $$TEM5) \NOTE.10TO3 (X Y) \ROUTE.XIP (X) \MERGEFORWARD (BASE N) \HDCPYBLTCHAR (T +SI::*OR-GENTEMP*) \NUMERIC.PNAMEP ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) TTSKIPSEPR (CH) \LINKBLOCK ( +BASE N) \FM.EDIT-DELETE (SI::$PROG1-FIRST-EXPRESSION$) TTCOMPLETEWORD (TABLE CHAR CH X) \RPLCONS (A LO +) \TEDIT.HARDCOPY.DISPLAYLINE (BASEA0776 BASEA0777 BASEA0778 BASEA0779 BASEA0780 ARR NO BASEA0781) +\SOUT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) LAST (XX) \MERGEBACKWARD (BASE N) BROKENDEF (CODEBASE +OFFSET NEWVALUE) CL:APPLY (FN ARGLIST T) FRESHLINE (SI::*OR-GENTEMP*) \TTW1 (SI::*OR-GENTEMP*) +\DELETEBLOCK? (BASE N) BRACKET.CURRENT.WORD (X CH) GETFILEINFO (LEN) RETAPPLY (T) \RSTRING2 (TABLE +CHAR BASEA0345 OFFSETA0344) \PFReplaceString ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \FM.EDIT-INSERT ( +SI::$PROG1-FIRST-EXPRESSION$) TEDIT.SCAN.LINE (BASEA0768 BASEA0769 BASEA0770 BASEA0771 BASEA0772 +BASEA0773 BASEA0774) \MAIKO.PUNTBLTCHAR (T SI::*OR-GENTEMP*) ADVISEWDS (T) BITBLT (T DS) PP* (T) +\STKSCAN (CODEBASE OFFSET) SKOR (SI::*OR-GENTEMP* X Y) \SMASHSTRING ($$TEM1 $$TEM2 $$TEM3 $$TEM4) +\FM.EDIT-WORDDELETE (SI::$PROG1-FIRST-EXPRESSION$) DO.EDIT.COMMAND (X CH) TWODINSPECT.COPYBUTTONFN ( +SI::*OR-GENTEMP*) SEDIT::LINEARIZE (SEDIT::CONTEXT SEDIT::NEW-LPTR) ETHERHOSTNAME ($$TEM1 $$TEM2 +$$TEM3 $$TEM4 $$TEM5) \GETREGIONTRACKWITHBOX (T) \VFMSmartBLT (SI::*OR-GENTEMP* XA0721) \BITBLT.BITMAP + (T) \MAKE.PROCESS0 (T) \TEXTTTYBOUT (TABLEA0735) SPP.SENDEOM (SI::*OR-GENTEMP*) FNTH (X0) +\SLOWHDCPYBLTCHAR (SI::*OR-GENTEMP*) READ-AFM-FILE (A) PSCFONT.WRITEFONT (STREAM W) IDATE (UCHAR) +ALPHORDER (CABASE CASIZE CAFAT CHAR) FIND.MATCHING.WORD (X) OPT.INITHASH (T) COMP.COMPILER-LET (T) +\BLTSHADE.BITMAP (T) BRKDWNBOXES (T PTRA0712 VALA0711 PTRA0714 VALA0713) RESETSAVE (T) +\UFSDirectoryNameP (#:G105) \CLIPANDDRAWLINE1 (SI::*OR-GENTEMP*) \FM.EDIT-BACKUP ( +SI::$PROG1-FIRST-EXPRESSION$) MB.PUTFN (STREAM W) \DO.PROGV.SETUP.FRAME.AND.EXECUTE (T) +%%TWO-WAY-STREAM-DEVICE-EOFP (STRM) RESETVARS (T) \UFSOpenFile (#:G100) \FM.MOMENTARY-SETUP ( +SI::$PROG1-FIRST-EXPRESSION$) \TEDIT.PUT.PARALOOKS (STREAM W) \SELECTREALPAGE (SI::*OR-GENTEMP* A) +\UFSGenerateFiles (#:G108) TEDIT.INSERT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \FORMATLINE (ARR N VAL +BASEA0737 BASEA0738 BASEA0739 BASEA0740 BASEA0741 BASEA0742 FONTDESC CHARCODE BASEA0743) +\UFSSetFileInfo (#:G107) \FM.STATE-CHANGESTATE (SI::$PROG1-FIRST-EXPRESSION$) \MAIKO.DISPLAYLINE ( +BASEA0757 BASEA0758 BASEA0759 BASEA0760) \LEAF.FIX.BROKEN.SEQUIN (\DurationLimit) SPP.FORCEOUTPUT ( +STREAM NBYTES) \RETURN (T) \CLOSEF.PRESS (STREAM W) \CURVE2 (SI::*OR-GENTEMP* A) \GETCHARCODE (X) +\EVALFORM (FN ARGLIST T) FB.INSERT.FILE (FD1 FD2) \NSFILING.GETFILE (LOCK) \LFMakeDirEntry (STREAM W) +FIND.NON.SPACE (CH) \GC.HANDLEOVERFLOW (X Y) \TEDIT.PUT.PARALOOKS.LIST (STREAM W) \DRAWLINE.UFN (T) +STKAPPLY (T) \PACK.ITEM (BASEA0364 OFFSETA0363) \PRINTBINARYBITMAP (STREAM W) WINDOW.MOUSE.HANDLER ( +SI::*OR-GENTEMP*) \MAIKO.BLTSHADE.BITMAP (T) CHAT.STARTUP ($$OUTPUT) WORD.MATCHES.BUFFER (TABLE CHAR +CH) SEDIT::ATOM-POINT-TYPE ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \UFSGetFileInfo (#:G106) POWEROFTWOP ( +T X) BKSYSBUF ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \STRINGWIDTH.HCPYDISPLAYAUX ($$TEM1 $$TEM2 $$TEM3 +$$TEM4 $$TEM5 FONT CHARCODE) \FM.EDIT-PREPARETOEDIT (SI::$PROG1-FIRST-EXPRESSION$) BACKSKREAD (TABLE +CHAR CH) FILL.INITTBLE (SI::*OR-GENTEMP*) \UFSDeleteFile (#:G104) FB.INSERT.SUBDIRECTORIES (FD1 FD2) +\GETBRUSHBBT (BBT SourceType Operation) MSPRGE (Y) \DSPSPACEFACTOR.PSC (T) DREMOVE (Z) +\TEDIT.PUT.PARALOOKS.LIST2 (STREAM W) SEDIT::MENU-PRINTBASE-SELECTEDFN ($$OUTPUT) \IRM.GET.KEYWORDS ( +$$OUTPUT) \FM.EDITSTART-SELECTEDFN (SI::$PROG1-FIRST-EXPRESSION$) \BSP.HANDLE.INTERRUPT (#:G118) +CURRENT.WORD (TABLE CHAR CH) \GCMAPTABLE (XA0287 XA0288) OPENNSOCKET (SOCNUM) \INSERTCH ($$TEM1 $$TEM2 + $$TEM3 $$TEM4 $$TEM5) NIL +APPLY \INTERPRETER (\SETUP-COMPILED-CLOSURE-CALL) \UFS.RECOGNIZE.FILE (SI::MONITOR-UNWIND +\DSKGetFileName-C \UFSGetFileName-C SHOULDNT) \INTERNAL/SETPASSWORD (SI::MONITOR-UNWIND) +\POLYSHADE.DISPLAY (CRIT.LESSP SCAN.LESSP) FB.UPDATEBROWSERITEMS (CAR FB.NAMES.DECREASING.VERSION) +\FM.STATE-SETUP (\FM.STATE-SELECTEDFN FONTCREATE) BACKTRACE (PRINT) VIRGINFN (UNADVISE) \FM.FORMAT ( +FONTCREATE) \CREATE.THROUGH.EXTERNALFORMAT (\THROUGHIN \PEEKBIN \THROUGHBACKCCODE \THROUGHOUTCHARFN) +SEDIT::INITIALIZE (SEDIT::MARKASCHANGEDFN) PARSE-FORMAT-OPERATION (CL:CHAR=) INSPECT/PROPLIST ( +PROPNAMES NONSYSPROPNAMES GETPROP /PUTPROP) TTWAITFORINPUT (DOWINDOWCOM) \ALLOCWIDTHTOGROUPEDWINDOW ( +MAX) \COURIER.ATTENTIONFN (\COURIER.OUTPUT.ABORTED) FB.FASTSEECOMMAND (FB.SEEFULLFN WINDOWPROP +DEL.PROCESS OPENWP DETACHWINDOW CLOSEW) GRAPHERIMAGEFNS (GRAPHOBJ.DISPLAYFN GRAPHOBJ.IMAGEBOXFN +GRAPHOBJ.PUTFN GRAPHOBJ.GETFN GRAPHOBJ.COPYFN GRAPHOBJ.BUTTONEVENTINFN GRAPHOBJ.COPYBUTTONEVENTFN NILL +) SAVEONSYSRECLST (PRIN2) LOADCOMP (PUTPROP) INFILECOMSPROP (INFILECOMS?) \TEDIT.HARDCOPY.FORMATLINE ( +\TEDIT.HCPYLOOKS.UPDATE) COPYFILES (ILEQ NILL TRUE EQUAL ERSETQ INFILEP COPIEDFILENAME = GETFILEINFO +PRINTOUT PRIN1 TERPRI COPYFILE DELFILE DECLARE CL:MEMBER UNPACKFILENAME.STRING printout TAB GDATE +CL:FUNCALL ASKUSER SELECTQ STRPOS UPPERCASEARRAY SUBSTRING ADD1 NCHARS) EDITCALLERS (CLOSEF?) +CHAT.CLOSE (CHAT CHAT.RECONNECT) \TEDIT.COMMAND.RESET.SETUP (WINDOWPROP \TEDIT.COPYINSERTFN) +FB.MAKEHEADINGWINDOW (FB.HEADINGW.REDISPLAYFN FB.HEADINGW.RESHAPEFN TOTOPW.MODERNIZE) RECREDECLARE ( +RECREDECLARE1) \TEDIT.OBJECT.SHOWSEL (DSPXOFFSET DSPYOFFSET DSPCLIPPINGREGION) \LEAF.RECONNECT ( +SI::MONITOR-UNWIND) MODERN-SNAPW (TOTOPW MOVEW) TTYIN.SETUP (TTYIN.CLEANUP) +CL::%%MAKE-SMALL-FIXP-ACCESSOR (\INSTANCE-P CL:ERROR \GETBASESMALL-FIXP \GETBASE > \VAG2) +\UPDATE.PBT.RASTERWIDTHS (FOLDLO LRSH GREATERP \ADDBASE PLUS) MAKEMACFORMAT (\MACINCCODEFN +\MACPEEKCCODEFN \COMMONBACKCHARFN \MACOUTCHARFN) \PROCESS.EVAL1 (\RUN.PROCESS) COMPILE-FILE-EXPRESSION + (CL:CONSP CL:EVAL COMPILE-FILE-EXPRESSION COMPILE-FILE-WALK-FUNCTION PRINT) CL::%%MAKE-FLOAT-ACCESSOR + (\INSTANCE-P CL:ERROR \GETBASEFLOATP) TTYIN.FINISH (TTYIN.FINISH) \IMAGEIOINIT (POSITION SPACES +DIFFERENCE \UNIMPIMAGEOP \NOIMAGE.DSPFONT ZERO LINELENGTH ERROR NCHARS \IOMODEP \BOUT NILL) \PRESSINIT + (\CLOSEF.PRESS \DSPXPOSITION.PRESS \DSPYPOSITION.PRESS \DSPFONT.PRESS \DSPLEFTMARGIN.PRESS +\DSPRIGHTMARGIN.PRESS \DSPLINEFEED.PRESS \DRAWLINE.PRESS \DRAWCURVE.PRESS \DRAWCIRCLE.PRESS +\DRAWELLIPSE.PRESS \UNIMPIMAGEOP \BLTSHADE.PRESS \BITBLT.PRESS CONSTANT FQUOTIENT NEWLINE.PRESS +\DSPBOTTOMMARGIN.PRESS \DSPTOPMARGIN.PRESS NEWPAGE.PRESS \DSPSPACEFACTOR.PRESS \STRINGWIDTH.PRESS +\CHARWIDTH.PRESS \BITMAPSIZE.PRESS \DSPCLIPPINGREGION.PRESS \SCALEDBITBLT.PRESS \DRAWARC.PRESS) +\NSFILING.INIT (\NSFILING.HOSTNAMEP NILL \FILINGSESSION.DEFPRINT \FILINGHANDLE.DEFPRINT) HISTORYFIND ( +LISPXFIND) \SPP.CLEANUP (SI::MONITOR-UNWIND) \NSRANDOM.ENSURE.WATCHER (\NSRANDOM.SESSION.WATCHER) +\DSKDISPLAY.CREATE.WINDOW (\DSKDISPLAY.REPAINTFN WINDOWPROP \DSKDISPLAY.BUTTONEVENTFN DSKDISPLAY) +FB.MAKECOUNTERWINDOW (FB.COUNTERW.REDISPLAYFN NILL TOTOPW.MODERNIZE) FB.UNDELETEALLCOMMAND ( +FB.UNDELETE.FILE) XCL::WALK-ARGLIST (EQ) XCL::WHERE-IS-NOTICE (HASH-FILE:CLOSE-HASH-FILE) +CL:MAKE-BROADCAST-STREAM (%%BROADCAST-STREAM-DEVICE-OUTCHARFN) \TEDIT.COPYTEXTSTREAM.PIECEMAPFN ( +TEDIT.COPY) WTFIX1 (SI::RESETUNWIND) APROPRINT (DSPLEFTMARGIN) MSINTERPRET (MSEDITF TESTRELQ TESTTABLE + FASSOC MSSHOWUSE CONS) CL:MAKE-ECHO-STREAM (%%TWO-WAY-STREAM-DEVICE-OUTCHARFN) NTHCHARCODE (SUB1 +RETFROM NTHCHARCODE) \SPP.ESTABLISH (SI::MONITOR-UNWIND) \LEAF.DEVICEP (\LEAF.CLOSEFILE +\LEAF.DELETEFILE \LEAF.GETFILEINFO \LEAF.OPENFILE \LEAF.READPAGES \LEAF.WRITEPAGES \LEAF.SETFILEINFO +\LEAF.TRUNCATEFILE \LEAF.GETFILENAME \LEAF.REOPENFILE \LEAF.GENERATEFILES \LEAF.EVENTFN +\LEAF.DIRECTORYNAMEP NILL \LEAF.RENAMEFILE \LEAF.FORCEOUTPUT \GENERIC.OPENP \ADD-OPEN-STREAM +\GENERIC-UNREGISTER-STREAM \LEAF.BREAKCONNECTION) PRINTHISTORY1 (PRIN2) CL:MAKE-SYNONYM-STREAM ( +%%SYNONYM-STREAM-DEVICE-OUTCHARFN) DMPHASH (PRINT LIST KWOTE) UPDATECHANGED (UPDATECHANGED1) +MAKE-NETWORK-TRACE-WINDOW (LASTMOUSESTATE ZEROP LOGAND \CHANGE.ETHER.TRACING WINDOWPROP) +CL:MAKE-TWO-WAY-STREAM (%%TWO-WAY-STREAM-DEVICE-OUTCHARFN) \10MB.CREATENDB (\10MBSENDPACKET +\10MBENCAPSULATE \10MB.BROADCASTP \10MB.TURNOFFETHER) FILES?PRINTLST (> + POSITION NCHARS LINELENGTH +LISPXTERPRI LISPXPRIN1 LISPXPRIN2) MAKESCAN (LINE.LESSP) PRINT-LISP-INFORMATION (SI::RESETUNWIND) +\PROCESS.APPLY1 (\RUN.PROCESS) INFILECOMSVAL (INFILECOMS?) APROPOS (DECLARE SUB1 BLOCK STRPOS APPLY* +GETD GETPROPLIST GETTOPVAL GENSYM? CHCON1 CHARCODE \SUBFNDEF CONS FRESHLINE PRINTOUT PRIN2 SPACES +APROPRINT ARGLIST) \ALLOCHEIGHTTOGROUPEDWINDOW (MAX) MSEDITE (EDITF) FW-CREATE-OFD-LIST (FW-SORT-FN) +\TEDIT.TABTYPE.SET (IGREATERP IMAGEOBJPROP) MAKETITLEBARICON (\TITLEICONMINSIZE) \VFMGetPageGroup ( +SI::MONITOR-UNWIND) CHNGNM (SI::RESETUNWIND) BAKTRACE1 (BAKTRACE1) DWIMIFY2A (SUBSTRING RETDWIM2 +CONCAT MKSTRING CONS) RAIDSTACKCMD (PRINCOPY) ASKUSER (CONCAT) CL::STRUCTURE-FUNCTION-P (CL:CONSP +CL::PS-CONSTRUCTORS CL:MEMBER CL:FUNCTION EQ CL::PS-PREDICATE CL::PS-COPIER CL:THROW) +\NSPRINT.INTERNAL (SPP.CLOSE) PROVIDE.PROMPTING.WINDOW (WINDOWPROP PROCESSP PROCESS.APPLY FUNCTION +ERROR!) CL::GET-SHARED-SETF-METHOD (CL:CONSP CL:CONSTANTP GENSYM) CL::%%MAKE-FIXP-ACCESSOR ( +\INSTANCE-P CL:ERROR \GETBASEFIXP) \GETSPP (SI::MONITOR-UNWIND) MODERNWINDOW ( +MODERNWINDOW.BUTTONEVENTFN) \TEDIT.FIXCHANGEDLINE (\TEDIT.FIXCHANGEDLINE) INREADMACROP (ADD1) +SI::ADVICE-PUTDEF (CL:REST) EV (EDITV) \TERMINATESPP (SI::MONITOR-UNWIND) \FM.BUTTONEVENTFN ( +MODERN-ORIG-\FM.BUTTONEVENTFN) CHAT.RECONNECT.OFF (TOTOPW) \VFMDelete (\VFMDelete1 \VFMDelete2) +SEDIT::SETUP-WINDOW-AND-PROCESS (SEDIT::TTYEXITFN) PFI.CONDENSE.INDEX (ALPHORDER) CLDISABLE ( +SI::RESETUNWIND) MSEDITF (EDITF) FASL::ELEMENTS-IDENTICAL-P (EQL) TYPEINMENU (UNREADITEM) +FB.ADD.FILEGROUP (FB.DECREASING.VERSION) FNCHECK (GETD) \LEAF.GETFILE (SI::MONITOR-UNWIND) +D-ASSEM:ASSEMBLE-FUNCTION (CL:MAPHASH CL:FUNCTION DECLARE D-ASSEM::DTAG-PTR) READHASHMACRO (CL:READ +READ) PFI.CHOOSE.BEST (>) DUMPDATABASE (DUMPDATABASE1) \NULLDEVICE (NILL \NULL.OPENFILE \EOF.ACTION +BIN TRUE \NULLFILEGENERATOR ZERO) CHAT.INIT (TEDITCHAT.MENUFN CHAT.RESHAPEWINDOW CHAT.BUTTONFN +CHAT.CLOSEFN CHAT.ICONFN CHAT.ENDOFSTREAMOP) DOICONWINDOWCOM (PPROMPT3 CLRPROMPT) CLISPIF0 (NCONC) +DWIMIFYFNS (DWIMIFYFNS) FB.UNDELETECOMMAND (FB.UNDELETE.FILE) BYTEBLOCKCOMPILE2 (SI::RESETUNWIND) +MAKEIBMFORMAT (\IBMINCCODEFN \IBMPEEKCCODEFN \COMMONBACKCHARFN \IBMOUTCHARFN) FIXSPELL (SI::RESETUNWIND +) \SPP.CREATE.WATCHER (\SPPWATCHER) TB.MAKE.BROWSER (TB.SCROLLFN TB.REPAINTFN TB.BUTTONEVENTFN +TB.COPYBUTTONEVENTFN) PUTSEQUIN (SI::MONITOR-UNWIND) \SPP.HANDLE.DATA (\SPP.STREAM.LOST) PFI.ENQUEUE ( +SI::MONITOR-UNWIND \PFI.DO.HARDCOPY) RAIDCOMMAND (PRINCOPY) CHAT (UALPHORDER CHAT.RECONNECT) +INSPECT/ARRAY (ELT /SETA) PFI.PRINT.FILECREATED (MAX) CLISPATOM0 (SI::RESETUNWIND) FB.THINCOMMAND ( +FB.IS.NOT.SUBDIRECTORY.ITEM FB.DECREASING.VERSION FB.NAMES.DECREASING.VERSION CAR) +CL::%%MAKE-FLAG-ACCESSOR (\INSTANCE-P CL:ERROR LDB BYTE \GETBASE) ESUBST (ESUBST1) INITATOMS ( +\EVALFORM \GC.HANDLEOVERFLOW \DTEST.UFN \OVERFLOWMAKENUMBER \MAKENUMBER \SETGLOBAL.UFN \SETFVAR.UFN +\GCMAPTABLE \INTERPRETER) \TELERAIDENTRY (\3MBRAWRECEIVE \10MBRAWRECEIVE) FB.ADJUST.DATE.WIDTH (CL:NTH + + STRINGWIDTH > NCHARS SUBSTRING) MAKEISOFORMAT (\8859INCCODEFN \8859PEEKCCODEFN \COMMONBACKCHARFN +\8859OUTCHARFN) \NEWEPHEMERALPAGE (\DONEWEPHEMERALPAGE) MSHASHLIST (MSHASHLIST1) INFILECOM ( +INFILECOMS?) \TEDIT.LOOKS (TEDIT.NEW.FONT) OPENPRSTREAM (\OUTCHARFN.PRESS) USEREXEC (SI::RESETUNWIND) +RECORDECLARATIONS (PRIN2) MSTRYSPELLTYPE (FASSOC MSTRYSPELL) \LFVersions (LESSP) FORMAT-EAT-WHITESPACE + (WHITESPACE-CHAR-P) DOATTACHEDWINDOWCOM (PPROMPT3 CLRPROMPT) MODERN-ADD-EXEC (MODERN-ORIG-ADD-EXEC) +SI::MAKE-AROUND-BODY (CL:SUBST) COPYTEXTSTREAM (\TEDIT.COPYTEXTSTREAM.PIECEMAPFN) DEFPACKAGE ( +CL:MAKE-PACKAGE) CL::%%MAKE-WORD-ACCESSOR (\INSTANCE-P CL:ERROR \GETBASE) COMPILER::TEST-ANNOTATION ( +COMPILER::RELEASE-TREE) EDITP (GETPROPLIST) \TEMPLOCKPAGES (\DOTEMPLOCKPAGES) \LEAF.IDLE ( +\LEAF.MAYBE.FLUSH.CACHE) CL:PROVIDE (CL:STRING=) \SHOWMENULABEL (PRIN4 PRIN3) INFILECOMTAIL ( +SI::RESETUNWIND) RAIDSHOWFRAME (PRINCOPY) SEDIT::SETUP-NEW-CONTEXT (SI::MONITOR-UNWIND) +\LFCreateDevice (\LFCloseFile \LFDeleteFile \LFRenameFile \LFTruncateFile \LFGetFileInfo +\LFGetFileName \LFOpenFile \LFReadPages \LFSetFileInfo \LFWritePages \LFGenerateFiles \LFEventFn +\LFDirectoryNameP NILL \GENERIC.OPENP \ADD-OPEN-STREAM \GENERIC-UNREGISTER-STREAM) +BREAK.NSFILING.CONNECTION (\NSFILING.OPENFILE) \FM.STARTEDIT (\FM.NUMBER-CHANGESTATE) +CL::INSERT-INCLUDED-SLOT (CL::SAME-SLOT) \FM.3STATE-SETUP (\FM.3STATE-DOWNFN \FM.DISPLAYITEM +\FM.3STATE-SELECTEDFN) CL::GET-SIMPLE-SETF-METHOD (CL:CONSP CL:CONSTANTP GENSYM) GET-ONED-DISPLAYW ( +ONEDINSPECT.REPAINTFN CLEARW ONEDINSPECT.SCROLLFN ONEDINSPECT.BUTTONEVENTFN ONEDINSPECT.COPYBUTTONFN +ONEDINSPECT.CLOSEFN ONEDINSPECT.DEFAULT.VALUECOMMANDFN ONEDINSPECT.DEFAULT.TITLECOMMANDFN) +\DFSFreeDiskPages (SI::MONITOR-UNWIND) \NSGATELISTENER (\ROUTINGTABLE.INFOHOOK) \SENDSPP ( +SI::MONITOR-UNWIND) COMPILER::ALPHA-MV-PROG1 (COMPILER::ALPHA-FORM) COMP.MLLIST (COMP.MLLVAR) +NWAYBUTTON.INIT (MB.NB.DISPLAYFN MB.NB.SIZEFN MB.PUTFN MB.GETFN MB.COPYFN MB.NWAYBUTTON.SELFN +MB.NB.WHENOPERATEDFN) REMOVE-COMMENTS (EQ) \FTP.HANDLE.NO (\FTP.FLUSH.TO.MARK \FTP.FLUSH.TO.EOC) +TTYIN.SCRATCHFILE (\TTYIN.RPEOF) DOBACKGROUNDCOM (PPROMPT3 CLRPROMPT) \DISPLAYINIT (\DSPFONT.DISPLAY +\DSPLEFTMARGIN.DISPLAY \DSPRIGHTMARGIN.DISPLAY \DSPLINEFEED.DISPLAY \DSPXPOSITION.DISPLAY +\DSPYPOSITION.DISPLAY NILL \DRAWCURVE.DISPLAY \DRAWLINE.DISPLAY \DRAWELLIPSE.DISPLAY +\DRAWCIRCLE.DISPLAY POLYSHADE.DISPLAY \BITBLT.DISPLAY \SCALEDBITBLT.DISPLAY \BLTSHADE.DISPLAY +\NEWPAGE.DISPLAY \BACKCOLOR.DISPLAY \DSPOPERATION.DISPLAY \STRINGWIDTH.DISPLAY \CHARWIDTH.DISPLAY +\DSPCLIPPINGREGION.DISPLAY \DSPRESET.DISPLAY \DRAWARC.DISPLAY \DRAWPOLYGON.DISPLAY \DRAWPOINT.DISPLAY +\MEDW.BLTCHAR \MEDW.XOFFSET \MEDW.YOFFSET \ILLEGAL.DEVICEOP \GENERATENOFILES \DisplayEventFn +\DSPPRINTCHAR \PAGEDBACKFILEPTR \NONPAGEDBOUTS) CHAT.RESHAPEWINDOW (CHAT.DID.RESHAPE) +CREATE-SHELL-STREAM (UNIX.SENDSCREENPARAMS UNIX.SETDISPLAYTYPE) PACKFILENAME (PACKFILENAME) +\LEAF.TIMEDOUT.EXCESSIVE (\LEAF.ABORT.FROMMENU WINDOWPROP) DELETEMENU (BACKGROUNDWHENSELECTEDFN) +RESOLVE-USE-PACKAGE-CONFLICT (CL:STRING<) COMPILER::START-COMPILATION (SI::RESETUNWIND) FILING.CALL ( +SI::MONITOR-UNWIND) \FLUSHVM (\DOFLUSHVM) COURIER.EXECUTE.EXPEDITED.CALL (\SPP.RESETCLOSE) HPRINTEND ( +ILESSP ABS) TTYINBUFFERDEVICE (NILL \NULL.OPENFILE TTYINBUFFERBIN TTYINBUFFERPEEK TTYINBUFFERREADP +TTYINBUFFERBACKPTR TTYINBUFFEREOFP \EOF.ACTION \NULLFILEGENERATOR ZERO) CL::%%MAKE-BIT-ACCESSOR ( +\INSTANCE-P CL:ERROR LDB BYTE \GETBASE) SORT.NSADDRESSES.BY.DISTANCE (\NSNET.CLOSERP) INSPECT/LISTP ( +NILL) MULTIFILEINDEX1 (CLOSEF) COMPILER::COMPILE-FILE-DEFINEQ (CL:SECOND CONS) CHAT.BUTTONFN ( +CHAT.EMACS.MOVE) \TEDIT.LOOKS.UPDATE (\BIN) DINFO.UPDATE.MENU.DISPLAY (DINFO.UPDATE.FROM.MENU) +\CREATE.SPP.DEVICE (NILL \BUFFERED.BIN \BUFFERED.BOUT SPP.EOFP SPP.READP \BUFFERED.PEEKBIN +SPP.BACKFILEPTR SPP.FORCEOUTPUT \BUFFERED.BINS \SPP.BOUTS \SPP.GETNEXTBUFFER \SPP.GETFILEPTR +\SPP.SETFILEPTR) NSPRINT (CLOSEF? DECLARE GETFILEPTR RANDACCESSP SETFILEPTR OPENSTREAM FULLNAME CLOSEF + COPYBYTES) \ACTONDISKPAGES (\DOACTONDISKPAGES) \CREATECHARSET (\CREATECHARSET.DISPLAY) FB.SEEFULLFN ( +FB.SEEBUTTONFN) CENTERPRINTINAREA (PRIN4 PRIN3) CLOSEBSPSTREAM (SI::MONITOR-UNWIND) MAKEMAINWINDOW ( +TOPATTACHEDWINDOWS CLOSEATTACHEDWINDOWS OPENATTACHEDWINDOWS SHRINKATTACHEDWINDOWS +EXPANDATTACHEDWINDOWS ATTACHEDWINDOWREGION MINATTACHEDWINDOWEXTENT MAXATTACHEDWINDOWEXTENT +MOVEATTACHEDWINDOWS RESHAPEALLWINDOWS) FASL:PROCESS-FILE (CL:PRINC CL:TERPRI) REOPENTEXTSTREAM ( +\TEXTBIN \TEXTBOUT) \GENERIC.DSPCREATE (\DSPPRINTCHAR) GET-TITLEW (TITLEW.REPAINTFN CLEARW +TITLEW.BUTTONEVENTFN) MAPRINT (SI::RESETUNWIND LISPXPRIN1) FILEBROWSER (FB.MENU.WHENSELECTEDFN +FB.NAMES.DECREASING.VERSION FB.HANDLE.ABORT.BUTTON FB.PRINTFN FB.COPYFN FB.CLOSEFN FB.AFTERCLOSEFN +FB.HARDCOPY.DIRECTORY FB.ICONFN FB.GET.NEWPATTERN) XCL::DEL-WHERE-IS-DATABASE ( +XCL::SAME-WHERE-IS-DATABASE) PRETTYDEF (PRETTYDEF0) \TEDIT.SELECT.CHARACTER (DSPXOFFSET DSPYOFFSET +DSPCLIPPINGREGION) ICMLARRAY.GETMENUWGROUP (NILL) POSTSCRIPTFILEP (STRING-EQUAL) OPENBSPSTREAM ( +\BSP.OTHERBOUT \BSP.HANDLE.INPUT RELEASE.PUP \BSP.DEFAULT.ERROR.HANDLER) \STRINGWIDTH.GENERIC (PLUS +CHARCODE \CHARSET LRSH \FGETWIDTH \GETBASE \CHAR8CODE LOGAND \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH +\CREATECHARSET) \FTPINIT (\FTP.OPENFILE \FTP.REOPENFILE \FTP.CLOSEFILE \FTP.DIRECTORYNAMEP +\FTP.GETFILENAME \FTP.GETFILEINFO \FTP.RENAMEFILE \FTP.DELETEFILE \FTP.GENERATEFILES \FTPEVENTFN +\GENERIC.OPENP \FTP.REGISTER \FTP.UNREGISTER) \VFMSplit (\VFMSplit1) \WRITEDISKPAGES ( +\DOWRITEDISKPAGES) HPRINT1 (CONS) FB.COPYTEXTCOMMAND (COPYFILE) \RECLAIMCODEBLOCK (\DELREF OPCODES) +COERCE (EQ) XCL::ADD-WHERE-IS-DATABASES (XCL::ADD-WHERE-IS-DATABASE) \DOWRITEDISKPAGES (\CHECKFREEPAGE +) \MEDW.DSPCREATE (\DSPPRINTCHAR) \ASSIGNDATATYPE1 (\MAKEMDSENTRY) SEDIT::CLEAR-ALL-LINEAR-FORMS ( +SEDIT::CLEAR-LINEAR-FORM) SI::DESCRIBE-USING-RECORD-DECL (SI::DESCRIBE-NEW-LINE CL:FORMAT +SI::DESCRIBE-INTERNAL RECORDACCESS CL:1+) CL::%%MAKE-ARRAY-ACCESSOR (CL:AREF) PRINTERDEVICE ( +\CORE.OPENFILE STREAMPROP FILENAMEFIELD OPENP IGREATERP GETEOFPTR \CORE.CLOSEFILE SEND.FILE.TO.PRINTER + STRPOS ADD1 SUBATOM SUB1 APPEND FDEVOP SPREADAPPLY*) \SEQUIN.PROCESS (SI::MONITOR-UNWIND +\SEQUIN.CLEANUP INSPECT) \IDLER (NOTIFY.EVENT SETTOPVAL CLOSEW DEL.PROCESS) DINFO.GET.GRAPH.WINDOW ( +WINDOWPROP) RESOLVE-EXPORT-CONFLICT (CL:STRING< CL:PACKAGE-NAME) COMPERROR (COMP.RETFROM.POINT) +\PROCESS.INIT (\PROCESS.EVENTFN) PopUpWindowAndGetAtom (CLOSEW) HARRAYKEYS (CONS) +CL::ESTABLISH-SETFS-AND-OPTIMIZERS (CL::PSLOT-ACCESSOR CL:WHEN REMHASH CL::PSLOT-READ-ONLY +CL::SET-SHARED-SETF-INVERSE CL:MACRO-FUNCTION CL:MEMBER CL:FUNCTION EQ GET LIST REMPROP) PRINTDEF ( +DSPFONT PRIN2S) ICONW (\ICONW.REPAINTFN) FIXSPELL2 (STRINGP LISPXPRIN1 LISPXPRIN2) PFI.HANDLE.EXPR ( +PFI.DEFAULT.HANDLER) UNDONLSETQ (SI::RESETUNWIND) \TEXTINIT (\TEXTDSPXPOSITION \TEXTDSPYPOSITION +\TEXTLEFTMARGIN \TEXTRIGHTMARGIN \TEXTDSPFONT NILL \TEXTDSPLINEFEED \TEXTDSPCHARWIDTH +\TEXTDSPSTRINGWIDTH \TEXTBIN \TEXTBOUT \TEXTCLOSEF \TEXTOPENF \GENERATENOFILES \TEXTBACKFILEPTR +\TEXTSETFILEPTR \TEXTPEEKBIN \TEXTGETEOFPTR \TEXTGETFILEPTR \TEXTEOFP \TEDITOUTCHARFN +STREAM-ERROR-STREAM BOUNDP TEXTSTREAMP REOPENTEXTSTREAM APPLY*) RESOLVE-IMPORT-CONFLICT (CL:STRING<) +CL::RESOLVE-SLOTS (CL::PARSE-SLOT CL::COPY-PARSED-SLOT CL::PSLOT-NAME) SAVESETQ (PROG1) \INITSPP ( +SPP.CLOSE \SPP.EVENTFN \BULK.DATA.CLOSE) POLYSHADE.DISPLAY (KNOTLINE) \FORMATBYTESTREAM (NILL) +SEDIT::BUTTONEVENTFN (SEDIT::MODERN-ORIG-BUTTONEVENTFN) GETDEFERR (GETDEF) RESOLVE-EXPORT-MISSING ( +CL:STRING<) FB.NEWINFOCOMMAND (FB.INFOMENU.WHENSELECTEDFN WINDOWPROP MAINWINDOW) TEDIT.REDO.INSERTION +(TEDIT.COPY) PFI.NEW.LISTFILES1 (MAYBE.PRETTYFILEINDEX) INSPECTCODE (\INSPECT/CODE/REPAINTFN +\INSPECT/CODE/RESHAPEFN SCROLLBYREPAINTFN) CL:LIST-ALL-PACKAGES (CL:PUSHNEW) SPY.MAKE.TREE ( +SPY.COPYBUTTON SPY.GRAPH.EDITOR SPY.UPDATE.TITLE) CL::%%MAKE-POINTER-ACCESSOR (\INSTANCE-P CL:ERROR +\GETBASEPTR) \CH.LOCATE.SERVERS (\SPP.RESETCLOSE) COURIER.BROADCAST.CALL (ILEQ IGEQ FRPLACD CONS LIST) + \NSFILING.DESERIALIZE1 (\BULK.DATA.CLOSE \NSFILING.RELEASE.BULKSTREAM) \STORAGE.TYPE (PLUS) +MAKECREATE1 (COPYALL APPEND) DASSEM.DPRINTLAP (PRIN2) SEDIT::TTYFN (NOTIFY.EVENT SI::MONITOR-UNWIND) +\XCCSOUTCHAR (SELECTC) \STRINGWIDTH.PRESS (\PRESS.CONVERT.NSCHARACTER PLUS CHARCODE \FGETWIDTH +\GETBASE \CHAR8CODE LOGAND) DO-EVENT (EVAL-INPUT) GETDEFCOM0 (GETDEFCOM) FILEWATCH (FW-LOOP) SI::DESCRIBE-USING-INSPECT-MACRO (SI::DESCRIBE-NEW-LINE CL:PRINC SI::DESCRIBE-INTERNAL CL:FUNCALL CL:1+ -) FILING.CALL (SI::MONITOR-UNWIND) CREATE.NUMBERPAD.READER (NUMBERPAD.HELDFN NUMBER.READER.HANDLER) -HARRAYKEYS (CONS) \\SETACCESS (\\STREAM.NOT.OPEN) \\LEAF.IDLE (\\LEAF.MAYBE.FLUSH.CACHE) -\\CREATE.SPP.DEVICE (NILL \\BUFFERED.BIN \\BUFFERED.BOUT SPP.EOFP SPP.READP \\BUFFERED.PEEKBIN -SPP.BACKFILEPTR SPP.FORCEOUTPUT \\BUFFERED.BINS \\SPP.BOUTS \\SPP.GETNEXTBUFFER \\SPP.GETFILEPTR -\\SPP.SETFILEPTR \\GENERIC.READCCODE \\IS.NOT.RANDACCESSP \\GENERIC.CHARSET \\GENERIC.UNREADCHAR -\\GENERIC.PEEKCHAR \\GENERIC.WRITECHAR \\GENERIC.READCHAR \\GENERIC.RENAMEFILE) NIL -ERROR MSINTERPRETSET (|apply|) CL:COMPILE-FILE (|ppe|) \\FUNCT1 (|ppe|) COROUTINE (|stackfn|) -\\MAIKO.ALLOCBLOCK (|ppe|) CL::CACHE-SETF-INFO (|apply|) \\FTP.ERRORHANDLER (|stackfn|) -\\HANDLE.RAW.PACKET (|apply|) \\PRINDATUM.TO.STRING (|apply|) SI::UNWIND (|ppe|) MAPHASHFILE (|apply|) - \\HARDRESET-CLEANUP1 (|ppe|) \\GCRECLAIMCELL (|ppe|) CL:GENSYM (|ppe|) TWODINSPECT.REPAINTFN (|apply| -) \\TEDIT.FIXCHANGEDLINE (|apply|) LAPRD (|apply|) \\PROC.RESUME (|ppe|) SCANEXP (|apply|) -SEDIT::OUTPUT-STRING (|ppe|) \\NSRANDOM.PREPARE.CACHE (|ppe|) TWODINSPECT.SCROLLFN (|apply|) -COPYHASHITEM (|apply|) WINDOW.MOUSE.HANDLER (|apply|) GETDEFFROMFILE (|apply|) WINDOWREGION (|apply|) -TWODINSPECT.REDISPLAY (|apply|) TRAPLOOP (|apply|) PUTDEF (|apply|) CHANGETRAN1 (|apply|) RECORDINIT ( -|apply|) BLIPVAL (|ppe|) GRAPHDELETENODE (|apply|) /MAPCON (|apply|) TB.USERDATA (|ppe|) SHAPEW ( -|apply|) \\INTERNAL/SETPASSWORD (|apply|) TEDIT.GET (|apply|) TTYIN.FINISH (|apply|) ARCTAN (|ppe|) -PRINTPACKET (|apply|) \\COS.OLD (|ppe|) MSFAIL (|stackfn|) MSGETDEF (|apply|) INFILECOM (|apply|) -CL::BUILD-CONSTRUCTOR-ARGLIST (|apply|) SETBLIPVAL (|ppe|) DISPLAYLINK/TB (|apply|) MAKE.LOCAL.ATOM ( -|ppe|) BLOCK (|ppe|) EDITTOGGLEBORDER (|apply|) USERLISPXPRINT (|apply|) \\TAN-FLOAT (|ppe|) MAPPAGES -(|apply|) CL::GET-PS-FROM-PREDICATE (|apply|) \\TEDIT1 (|apply|) SCROLLW (|apply|) DELFROMFILES ( -|apply|) ERROR! (|ppe|) COMPILER::ALPHA-COMBINATION (|apply|) FIXDATUM (|apply|) \\BITBLTSUB (|ppe|) -TEDIT.PUT (|apply|) RESET (|ppe|) SORT1 (|apply|) BLIPSCAN (|ppe|) LITATOM (|ppe|) \\IPCURVE2 (|ppe|) -\\TIMER.INTERRUPTFRAME (|apply|) SEDIT::EXTRACT-CURRENT-SELECTION (|apply|) TEDIT.BUILD.PCTB (|apply|) - FONTSAVAILABLE (|apply|) CHOOZ (|apply|) MB.THREESTATEBUTTON.FN (|apply|) \\POP.N.UFN (|ppe|) -\\GCMAPSCAN (|ppe|) \\TEDIT.RESTARTFN (|apply|) GRAPHOBJ.DISPLAYFN (|apply|) \\TRACKWITHBOX (|apply|) -\\COPYCODEBLOCK (|ppe|) \\CURVE (|apply|) MERGE (|apply|) CL::%DO-TRANSLATE (|apply|) FONTCREATE ( -|apply|) ADDTOFILES? (|apply|) OPT.FRAMEVAR (|apply|) MISSPELLED? (|apply|) CL::RESOLVE-SLOTS (|apply| -) COMP.EQ (|apply|) PRINTFILETYPE (|apply|) \\TEDIT.HARDCOPY.FORMATLINE (|apply|) \\FTP.HANDLE.NO ( -|apply|) \\READREFILL (|apply|) ESUBST1 (|apply|) \\TEDIT.CARETLOOKS.VERIFY (|apply|) -SI::DESCRIBE-USING-DESCRIBERS (|apply|) \\REMOVE-DECLS (|apply|) \\SEQUIN.PROCESS (|apply|) ADDTO ( -|apply|) \\TEDIT.COMMAND.LOOP (|apply|) \\MAP-OPEN-STREAMS (|apply|) GENERATEFN (|apply| |stackfn|) -HISTORYFIND1 (|apply|) TWODINSPECT.ADJUSTSELECTION (|apply|) ICMLARRAY.DOWINDOWCOMFN (|apply|) -\\SEQUIN.HANDLE.INPUT (|apply|) GETHASH (|apply|) SEDIT::COPY-HASH-TABLE (|apply|) \\APPLYREADMACRO ( -|apply|) \\BSP.PREPARE.OUTPUT (|apply|) PACKAGE-HIERARCHY-INIT (|apply|) PROCESS.APPLY (|apply|) -\\PROTECTED.APPLY (|apply|) CLISP4 (|stackfn|) PROCESS.EVALV (|ppe|) CL:MERGE-PATHNAMES (|ppe|) -ADDTOCOM (|apply|) TTYINENTRYFN (|apply|) SEDIT::LINEARIZE-LIST (|ppe|) HPRINT1 (|apply|) -GRAPHDELETELINK (|apply|) MAP (|apply|) \\PROCESS.APPLY1 (|apply|) COMP.TOPLEVEL.COMPILE (|apply|) -\\MAYBEPRINTPACKET (|apply|) READIMAGEOBJ (|apply|) TEDIT.DEFAULT.MENUFN (|apply|) \\BSP.GETNEXTBUFFER - (|apply| |stackfn|) EF (|apply|) BSPPUTMARK (|apply|) NCREATE2 (|ppe|) PROMPTFORWORD (|apply|) -\\GR.METHODEXPANDER (|apply|) TEDIT.MAPPIECES (|apply|) \\ITEM.WINDOW.SELECTION.HANDLER (|apply|) -\\FM.STATE-SELECTEDFN (|apply|) \\PRINTBF (|apply|) |\\InitCurveBrushes| (|apply|) APROPOS (|apply|) -UNDOLISPX3 (|apply|) \\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (|apply|) D-ASSEM:ASSEMBLE-FUNCTION (|apply|) -WRITEPRINTERPORT (|ppe|) XCL::HASH-FILE-WHERE-IS (|apply|) SEDIT::UNDO-EVENT (|apply|) D-ASSEM:INTERN-DCODE - (|ppe|) SPP.FORCEOUTPUT (|apply|) MSTRYPARSE (|apply|) \\STOPSCROLL? (|apply|) WRITEIMAGEOBJ (|apply| -) ASKUSER (|apply|) MARKASCHANGED (|apply|) \\BLTCHAR (|ppe|) \\PARSEARRAYSPACE1 (|apply|) \\BACKTRACE - (|apply|) FAKE-COMPILE-FILE (|ppe|) READPRINTERPORT (|ppe|) EDIT4E (|apply|) COMPILER::ALPHA-LABELS ( -|apply|) OPT.JFIXPASS (|apply|) EDITDEF (|apply|) \\TEDIT.COPY.PIECEMAPFN (|apply|) ADIEU (|stackfn|) -COMPILER::GENCODE-LET (|apply|) D-ASSEM::GENERATE-EASY-ENTRY (|apply|) \\FM.CREATEITEM (|apply|) -GRAPHBUTTONEVENTFN (|apply|) DINFO.TITLEMENUFN (|apply|) GETDEFCURRENT (|apply|) \\FM.EDIT-ITEM ( -|apply|) TRANSMIT.ETHERPACKET (|apply|) \\SIN.OLD (|ppe|) \\TEDIT.OBJECT.SHOWSEL (|apply|) -\\FM.EDIT-INSERT (|apply|) FIXSPELL (|apply|) \\MEDW.GETSCREENREGION (|apply|) \\INTERPRETER1 (|ppe|) -\\SETARG0 (|ppe|) \\MAPCHARTABLE (|apply|) \\UPDATE.PROCESS.WINDOW (|apply|) COMPILER::RELEASE-CALL ( -|apply|) SHOWBITMAP.IP (|ppe|) COMP.MACRO (|apply|) COMP.STFIX (|apply|) SEARCHPDL (|apply|) -D-ASSEM:FIXUP-PTR (|ppe|) CL::%MAKE-RANDOM-ARRAY (|apply|) TITLEW.BUTTONEVENTFN (|apply|) -\\STACKARGPTR (|ppe|) TEDIT.FORMAT.HARDCOPY (|apply|) \\TEXTINIT (|apply|) COPYINSERT (|apply|) -FAULTAPPLY (|apply|) COMPILER::ENV-ANALYZE-VAR-REF (|ppe|) WHO-LINE-CURRENT-DIRECTORY (|apply|) -\\FM.MENUHANDLER (|apply|) DEFAULTWHENSELECTEDFN (|stackfn|) PROCESSWORLD (|stackfn|) DSPNEWPAGE ( -|apply|) BSPGETMARK (|apply|) \\SMASHLINK (|ppe|) \\PROCESS.GO.TO.SLEEP (|ppe|) \\UNBOXFLOAT1 (|ppe|) -\\DSPPRINTCR/LF (|apply|) ONEDINSPECT.SELECTITEM (|apply|) XCL::ADD-WHERE-IS-DATABASES (|apply|) -ADDTOFILE (|apply|) DASSEM.DASSEM (|apply|) CLEARCLISPARRAY (|apply|) XCL:LIST-ALL-PROFILES (|apply|) -\\FM.DOSELECTION (|apply|) CONSTANTEXPRESSIONP (|apply|) INSPECTW.FETCH (|apply|) PRINTER.BITMAPSCALE -(|apply|) COMP.EXPR (|apply|) \\START.PROCESSES (|ppe|) USERNAME (|ppe|) DINFO.UPDATE.FMENU (|ppe|) -DELDEF (|apply|) SUPERPRINT (|apply|) \\GCSCANSTACK (|ppe|) \\BSP.HANDLE.INTERRUPT (|apply|) -SETUSERNAME (|ppe|) \\SPP.CLEANUP (|apply|) TEDIT.PUT.OBJECT (|apply|) TEDIT.FORMATPAGE (|apply|) -INSPECTW.REPAINTFN (|apply|) \\SEQUIN.FLUSH.CONNECTION (|apply|) XCL:RESTORE-PROFILE (|apply|) -D-ASSEM::STORE-DIGEST-INFO (|apply|) FQUOTIENT (|ppe|) ENCAPSULATE.ETHERPACKET (|apply|) -CL::ARGUMENT-NAMES (|apply|) FABS (|ppe|) WBREAK (|ppe|) TEDIT.INSERT.OBJECT (|apply|) HASDEF (|apply| -) EDITV (|stackfn|) CONS (|ppe|) CALLS (|apply|) CLISPIFY2B (|apply|) XCL::PROTOTYPE-DEFN-TYPES ( -|apply|) TEDIT.MAPLINES (|apply|) RECORDECL1 (|apply|) SET/LABEL/SIZE (|apply|) -XCL::PROTOTYPE-DEFINERS-FOR-TYPE (|apply|) \\ARGPTR (|ppe|) DISPLAYLINK/LR (|apply|) LISPXREPRINT ( -|apply|) \\SIN-FLOAT (|ppe|) \\GETREGION.CHECKOPPT (|apply|) MAPDL (|apply|) EVERY (|apply|) -\\SPY.INTERRUPT (|ppe|) \\INSPECTW.COMMAND.HANDLER (|apply|) RETDWIM (|stackfn| |apply|) FGREATERP ( -|ppe|) TEDITCHAT.MENUFN (|apply|) LCSKIP (|apply|) COMP.CLEANFNOP (|apply|) XCL::GET-WHERE-IS-ENTRIES -(|apply|) \\TEDIT.TRY.ABBREV (|apply|) STKNTHNAME (|ppe|) SETMAINTPANEL (|ppe|) -DBG::COLLECT-ACTIVE-ESCAPES (|apply| |stackfn|) \\MAKE.PROCESS1 (|ppe|) \\GETREGIONTRACKWITHBOX ( -|apply|) FDIFFERENCE (|ppe|) CLISPATOM2 (|apply|) CHAT.RECONNECT (|apply|) CHECKBUFFERREFVAL (|ppe|) -COMPILER::GENCODE-CALL (|apply|) EDITF2 (|apply|) \\SETUP-ENVIRONMENT-CALL (|ppe|) EDITADDNODE ( -|apply|) EDITCOM1 (|apply|) TWODINSPECT.COLUMNWIDTH (|apply|) \\MEDW.GETSCREENPOSITION (|apply|) -\\TEDIT.SELECT.CHARACTER (|apply|) \\USEREVENT (|apply|) MSPRGTEMPLATE1 (|apply|) MB.SELFN (|apply|) -CDR (|ppe|) RPLACA (|ppe|) MODERNWINDOW.BUTTONEVENTFN (|apply|) GRAPHCHANGELABEL (|apply|) STKNTH ( -|ppe|) \\TEXTBIN (|apply|) \\CREATE.SYMBOL (|ppe|) \\ALLOCBLOCK (|ppe|) CL::DEFINE-CONSTRUCTORS ( -|apply|) SETSTKNAME (|ppe|) \\D0.STARTIO (|ppe|) \\INTERPRETER-LAMBDA (|ppe|) DOUSERFNS2 (|apply|) -EDITRAN (|apply|) EDITAPPLYTOLINK (|apply|) SEDIT:REPLACE-SELECTION (|apply|) %MAKE-CML-TYPE-TABLE ( -|apply|) DOMAINWINDOWCOMFN (|apply|) \\MENUSUBITEMS (|apply|) TWODINSPECT.DOWINDOWCOMFN (|apply|) -\\MAIKO.CONS.UFN (|ppe|) INSPECTW.CREATE (|apply|) \\POSTSCRIPT.OUTCHARFN (|apply|) -CL:DECODE-UNIVERSAL-TIME (|ppe|) MINIMUMWINDOWSIZE (|apply|) TWODINSPECT.REPLACE (|apply|) -\\MEDW.SHAPEW (|apply|) \\TEDIT.CONVERT.FOREIGN.FORMAT (|apply|) EVALUABLE.CONSTANTP (|apply|) -EDITSMASH (|apply|) READHASHMACRO (|apply|) MAPRINT (|apply|) TEDIT.UNDO.DELETION (|apply|) -MACROEXPANSION (|apply|) %MAKE-ARRAY-TYPE-TABLE (|apply|) \\UNBOXFLOAT2 (|ppe|) \\GET-MY-BF (|ppe|) -\\DISPLAYLINE (|apply|) CL:ROOM (|ppe|) IMAGEBOX (|apply|) \\WALKOVER.FUNCTION (|apply|) \\RPLPTR ( -|ppe|) TEDIT.REDO.INSERTION (|apply|) SI::UNWIND-TO-BLIP (|ppe|) CLISPIFY2 (|stackfn|) -\\TEDIT.APPLY.PARASTYLES (|apply|) \\EVAL-INVOKE-LAMBDA (|ppe|) \\READCREFILL (|apply|) -CHAT.OPTIONMENU (|apply|) \\WALKOVER.SPECIALFORMS (|apply|) PRINTPUP (|apply|) MAXIMUMMAINWINDOWSIZE ( -|apply|) \\CREATECHARSET (|apply|) COMP.NUMBERCALL (|apply|) \\SEQUIN.HANDLE.ACK (|apply|) RESUME ( -|ppe|) EOFCLOSEF (|apply|) ONEDINSPECT.REDISPLAY (|apply|) \\MEDW.EXPANDW (|apply|) -MINIMUMMAINWINDOWSIZE (|apply|) BRKDWNRESULTS2 (|apply|) MAP2C (|apply|) MAPC (|apply|) -CL::DEFINE-ACCESSORS (|apply|) TWODINSPECT.SELECTITEM (|apply|) PRINTERTYPE (|apply|) TEDIT.UNDO ( -|apply|) CLISPIFYCROPS (|apply|) GRAPHADDLINK (|apply|) \\COPYFNHEADER (|ppe|) SI::ADVICE-PUTDEF ( -|apply|) MAPATOMS (|apply|) DOICONWINDOWCOM (|apply|) XCL:SET-EXEC-TYPE (|stackfn|) \\WALKOVER.SF.LIST - (|apply|) \\NSFILING.ERRORHANDLER (|stackfn|) PRINTCOMSTRAN (|apply|) \\RESUME (|ppe|) HVBAKREAD ( -|apply|) MAPCAR (|apply|) CAR (|ppe|) \\BSP.HANDLE.ERROR (|apply|) OPT.SCANOPT (|apply|) -\\TTYBACKGROUND (|apply|) MAP2CAR (|apply|) \\HCPYMODEDISPLAYINIT (|apply|) \\CURVE2 (|ppe|) -CL:VALUES-LIST (|ppe|) \\DEVICE.OUTPUT (|ppe|) \\PFI.DO.HARDCOPY (|apply|) DOUSERFNS (|apply|) -\\TEDIT2 (|apply|) COMP.CLEANFNP (|apply|) \\SPP.GETNEXTBUFFER (|stackfn|) VARS.PUTDEF (|ppe|) -ONEDINSPECT.REPLACE (|apply|) SI::CLEAR-CLOSURE-CACHE (|ppe|) READVARS-FROM-STREAM (|apply|) -CONVERT.FILE.TO.TYPE.FOR.PRINTER (|apply|) CHAT.MENU (|apply|) \\FORMATLINE (|apply|) -\\TEDIT.HARDCOPY.DISPLAYLINE (|apply|) RESOLVE-EXPORT-CONFLICT (|apply|) XCL::WHERE-IS-FILES (|apply|) - \\TEDIT.INSPECTCODE (|apply|) MAPCON (|apply|) COMPILER::ENV-ANALYZE-SETQ (|ppe|) CL:VALUES (|ppe|) -OPENIMAGESTREAM (|apply|) ONEDINSPECT.VALUEWIDTH (|apply|) \\UNWIND.UFN (|ppe|) COMP.NUMERIC (|apply|) - COMP.USERFN (|apply|) PRINTROUTINGTABLE (|apply|) \\RECLAIMCODEBLOCK (|ppe|) FB.SORT.VERSIONS ( -|apply|) NOTEVERY (|apply|) CHANGECCODE (|ppe|) COMP.SHIFT (|apply|) \\DODISKCOMMAND (|ppe|) READLINE -(|apply|) CL::STRUCTURE-POINTER-SLOTS (|apply|) |\\VFMFind| (|apply|) ONEDINSPECT.ADJUSTSELECTION ( -|apply|) LOOKUP-SYMBOL (|ppe|) COMPILER::RELEASE-PROGN (|apply|) \\DO.PARAMS.AT.OPEN (|apply|) -FB.SORTCOMMAND (|apply|) \\BRUSHBITMAP (|apply|) CL::VALUES-UFN (|ppe|) IQUOTIENT (|ppe|) -\\SIMULATE.UNBIND (|ppe|) \\MEDW.SHRINKW (|apply|) CL::SET-PARSED-STRUCTURE (|ppe|) PRINTHISTORY1 ( -|apply|) FIND.SYMBOL (|ppe|) TWODINSPECT.SETELT (|apply|) \\MAPPAGE (|ppe|) CL::BUILD-COPIER-SLOT-SETFS - (|apply|) STKSCAN (|ppe|) \\PROG0 (|ppe|) ONEDINSPECT.REPAINTFN (|apply|) CL:LIST-ALL-PACKAGES ( -|apply|) MAPHASH (|apply|) \\CKAPPLYARGS (|ppe|) \\TEDIT.MOVE.PIECEMAPFN (|apply|) -\\TEDIT.APPLY.STYLES (|apply|) MAP.PROCESSES (|apply|) ONEDINSPECTW.CREATE (|apply|) -\\INSPECT.COMPUTE.TITLE (|apply|) CL:FILE-POSITION (|ppe|) \\RPLACD.UFN (|ppe|) COMPILER::RELEASE-MV-PROG1 - (|apply|) STKPOS (|ppe|) \\GETREGION.CHECKBASEPT (|apply|) CLOSEF (|apply|) ANTILOG (|ppe|) -CL::ESTABLISH-ACCESSORS (|apply|) \\BSP.PREPARE.INPUT (|apply|) RPLACD (|ppe|) MAPCONC (|apply|) LISPX - (|apply|) \\RPLPTR.UFN (|ppe|) MAXIMUMWINDOWSIZE (|apply|) COMPILE-FILE-EXPRESSION (|apply|) -DIFFERENCE (|ppe|) RECREDECLARE (|apply|) GRAPHOBJ.COPYBUTTONEVENTFN (|apply|) RECEVAL (|apply|) -INSPECTW.PROPERTIES (|apply|) WTFIX1 (|apply|) COMPILER::ALPHA-FUNCTIONAL-FORM (|ppe|) \\SLOWRETURN ( -|ppe|) SI::MAKE-AROUND-BODY (|apply|) XCL::WHERE-IS-DEFAULT-DEFINE-TYPES (|apply|) \\ASSIGNDATATYPE1 ( -|ppe|) EDITCOMA (|stackfn|) |GetImageFile| (|apply|) \\BASEBYTES.BOUT (|apply|) \\PROMISCUOUS.OFF ( -|ppe|) \\EVALA (|ppe|) COMPILER::ALPHA-MV-PROG1 (|apply|) PARSERELATION1 (|apply|) \\CLEANUPDISKQUEUE -(|ppe| |apply|) \\CONS.UFN (|ppe|) DISPLAYLINK/RL (|apply|) \\PRINTFRAME (|apply|) MSUPDATE (|apply|) -SI::%STRUCTURE-DECLARE-DATATYPE (|apply|) CLISPFUNCTION? (|apply|) IGREATERP (|ppe|) \\DEVICE.INPUT ( -|ppe|) \\SMASHRETURN (|ppe|) LISPXREAD (|apply|) \\SETFVARSLOT (|ppe|) MAPRELATION (|apply|) -SI::RESETUNWIND (|apply|) GENERATOR (|stackfn|) \\USER-SUBR-UFN (|apply|) \\TEDIT.INSERT.PIECES ( -|apply|) \\SPP.HANDLE.INPUT (|apply|) PRINTXIP (|apply|) HASHOVERFLOW (|apply|) \\RATOM/RSTRING-REFILL - (|apply|) CL::GET-SHARED-SETF-METHOD (|apply|) \\RESTLIST.UFN (|ppe|) \\FINDKEY.UFN (|ppe|) -COMPILE.FILE.APPLY (|apply|) TEDIT.SELECTED.PIECES (|apply|) CL::VALUES-LIST-UFN (|ppe|) -TEDIT.EDIT.OBJECT (|apply|) CL::ESTABLISH-SETFS-AND-OPTIMIZERS (|apply|) INSPECTW.REDISPLAY (|apply|) -CLISPCAR/CDR2 (|stackfn|) ONEDINSPECT.SETELT (|apply|) \\RPLCONS (|ppe|) \\DRAWCIRCLE.DISPLAY (|apply| -) \\TEXTMENU.TOGGLEFN (|apply|) DINFO.LOOKUP (|apply|) COMPILER::COMPILE-FILE-DEFINEQ (|apply|) -PUTSEQUIN (|apply|) DOWINDOWCOM (|apply|) MAKENEWCOM (|apply|) \\HASHACCESS (|apply|) -\\PAGED.REVALIDATEFILELST (|apply|) INSTALLBRUSH (|apply|) TEDIT.PUT.PCTB (|apply|) -*PACKAGE-FROM-INDEX* (|ppe|) SOME (|apply|) EDITTOGGLELABEL (|apply|) SUPERPRINT0 (|apply|) -MENU.HANDLER (|apply|) \\RPLACA.UFN (|ppe|) LOWERCASE (|apply|) GO (|ppe|) \\MEDW.MOVEW (|apply|) -PRINTHISTORY (|apply|) \\LINEWITHBRUSH (|apply|) INSPECT/LISTP (|apply|) \\LET0 (|ppe|) -COMPILER::RELEASE-MV-CALL (|apply|) NOTANY (|apply|) GRAPHADDNODE (|apply|) \\DRAWELLIPSE.DISPLAY ( -|apply|) TWODINSPECTW.CREATE (|apply|) \\LET* (|ppe|) SI::DESCRIBE-USING-RECORD-DECL (|apply|) ATAN ( -|ppe|) RETURN (|ppe|) IDIFFERENCE (|ppe|) \\TEDIT.ADJUST.LINES (|apply|) TEDIT.COPY (|apply|) INSPECT -(|apply|) \\RTP.HANDLE.PUP (|apply|) CL::BUILD-CONSTRUCTOR-SLOT-SETFS (|apply|) MAKEEPSFILE (|apply|) -CALL.MOVENODEFN (|apply|) \\STKSCAN (|ppe|) \\PAGED.REVALIDATEFILES (|apply|) UNDOLISPX2 (|apply|) -SUBSET (|apply|) CL:FIND-ALL-SYMBOLS (|apply|) \\TAN.OLD (|ppe|) \\MAIKO.DISPLAYLINE (|apply|) -\\FIXCODEPTR (|ppe|) \\CONTEXTAPPLY (|ppe|) /MAPCONC (|apply|) UNDONLSETQ1 (|apply|) \\SETIOPOINTERS ( -|ppe|) \\UNVISIBLE.PAGED.REVALIDATEFILELST (|apply|) HPRINT.IMAGEOBJ (|apply|) \\MAIKO.BITBLTSUB ( -|ppe|) \\MISCN.UFN (|ppe| |apply|) GIVE.TTY.PROCESS (|apply|) \\STORE.N.UFN (|ppe|) \\D01.FAULTINIT ( -|ppe|) \\BUFFERED.REVALIDATEFILELST (|apply|) ONEDINSPECT.SCROLLFN (|apply|) \\COPY.N.UFN (|ppe|) -\\PROMISCUOUS.ON (|ppe|) PRINTERSTATUS (|apply|) \\RETURN (|ppe|) CL::PUTHASH (|ppe|) DELFROMCOM ( -|apply|) DO-HISTORY-SEARCH (|apply|) CL:MAPHASH (|apply|) \\MAIKO.BLTCHAR (|ppe|) LOG (|ppe|) \\ARG0 ( -|ppe|) \\MP.ERROR (|ppe|) \\PRESSCURVE2 (|ppe|) MSMARKCHANGED (|apply|) CL::GET-SIMPLE-SETF-METHOD ( -|apply|) PFI.PRINT.BITMAP (|stackfn|) BROKENDEF (|ppe|) \\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD ( -|apply|) CL::GET-PS-FROM-ACCESSOR (|apply|) \\MYARGCOUNT (|ppe|) \\DO.PROGV.SETUP.FRAME.AND.EXECUTE ( -|ppe|) \\RTP.CLEANUP (|apply|) \\ALLOCHUNK (|ppe|) SEDIT::CFV-LIST (|ppe|) \\TEXTPEEKBIN (|apply|) -\\MAIKO.PUNTBLTCHAR (|ppe|) \\UNBOXFLOAT3 (|ppe|) \\DELETECH (|apply|) \\SPP.HANDLE.ATTN (|apply|) -CL::STRUCTURE-FUNCTION-P (|apply|) |\\UFSGetFileTypeConfirm| (|stackfn|) \\COPYDATATYPE (|ppe|) -MAPLIST (|apply|) XCL::%DEFINE-TYPE-FILE-DEFINITIONS (|apply|) SI::DESCRIBE-USING-INSPECT-MACRO ( -|apply|) \\BSP.SKIPBYTES (|apply|) CHANGE.NODEFONT.SIZE (|apply|) FIXATOM1 (|stackfn|) POSSIBILITYFN ( -|apply|) DISPLAYLINK/BT (|apply|) \\PEEKPUP (|ppe|) NIL -LOCALFREEVARS CL:COMPILE-FILE (COMPILER::*INPUT-STREAM* COMPILER::*FASL-HANDLE* COMPILER::ERROR-FILE-STREAM - COMPILER::*LAP-STREAM*) SEDIT:REPLACE-SELECTION (SEDIT::CONTEXT) NSPRINT (INSTREAM) -CL::GET-PS-FROM-PREDICATE (CL::PREDICATE) MSPRGDWIM (FILEPKGFLG NOSPELLFLG) \\NSRANDOM.WRITE.SEGMENT ( -BUFFERS FIRSTBYTE BYTESTOSTORE) \\RECLAIMCODEBLOCK (CODEBASE) SI::UNADVISE-FROM-RESTORE-CALLS (SI::FROM - SI::FN) \\UFS.FILEINFOFN (GENFILESTATE) CL::DEFINE-CONSTRUCTORS (CL::PS) CL::%MAKE-BIT-ACCESSOR (TYPE - CL::SIZE CL::OFFSET CL::WORD-OFFSET) CLISPIFY2 (FORM) HARRAYKEYS (ITEMLST) -SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::CONTEXT) \\UFS.NEXTFILEFN (GENFILESTATE) MSSHOWUSE (ANYFOUND -SHOWFN) FB.INSERT.FILE (FBSORTFN FILE) \\STRINGWIDTH.GENERIC (TOTALWIDTH SPACEWIDTH CSET WIDTHSBASE -FONT) \\NSFILING.COPY/RENAME (HANDLE SERIALSTREAM SESSION) COURIER.BROADCAST.CALL (NEARBYNETS) -CL::DEFINE-ACCESSORS (CL::PS) \\FTP.CLEANUP (CONNS FAIL) FASL::ELEMENTS-IDENTICAL-P (FASL::TESTELT) -\\STRINGWIDTH.HCPYDISPLAYAUX (TOTALWIDTH SPACEWIDTH CSET WIDTHSBASE FONT) COPYFILES (COPYFILESFROMSPEC - SECONDARYSPEC COPYFILESOUTPUT DONTCOPY COPYFILESTOSPEC COPYFILESVERSIONS COPYFILESALWAYS -COPYFILES.WHENTOSKIP COPYFILESSKIPFN COPYFILESPURGESOURCE COPYFILESASK COPYFILESASKDEFAULT -COPYFILESREPLACE COPYFILESFN COPYFILESTERSE) \\NSPRINT.INTERNAL (COURIERSTREAM) NTHCHARCODE (M) -MSTRYSPELLTYPE (TYPE) GETSYNTAX (TEM RESULT CH LST) PACKAGE-HIERARCHY-INIT (CONVERT?) -CL::%MAKE-FLAG-ACCESSOR (TYPE CL::OFFSET CL::WORD-OFFSET) COMPILER::TEST-META-EVAL (COMPILER::TREE) -CL::%MAKE-ARRAY-ACCESSOR (CL::OFFSET) COPYALL (NH) SI::UNBREAK-FROM-RESTORE-CALLS (SI::FROM SI::FN) -COMPILER::TEST-ALPHA (COMPILER::TREE) EQUALHASH (AR2 UNMATCHED AR1) HPRINT (STREAM) -XCL::DEL-WHERE-IS-DATABASE (XCL::DATABASE) \\PROCESS.EVAL1 (..PEV-PROC.. ..PEV-RESULT..) -SI::DESCRIBE-USING-DESCRIBERS (SI::OBJECT SI::DEPTH) DMPHASH (ARRAYNAME) \\SEQUIN.PROCESS (SEQUIN) -CL::%MAKE-POINTER-ACCESSOR (TYPE CL::OFFSET) COMPILER::COMPILE-ONE-LAMBDA (COMPILER::TREE) -SEDIT::COPY-HASH-TABLE (SEDIT::NEW-TABLE) CL:LIST-ALL-PACKAGES (RES) \\SETTYPEMASK (BITS) -COMPILER::TEST-ANNOTATION (COMPILER::TREE) XCL::SHOW-CLOSURE-CACHE (XCL::LONG-P STREAM) -CL::%MAKE-FLOAT-ACCESSOR (TYPE CL::OFFSET) I.S.OPR (UC LC) RECEVAL (DATUM NEWVALUE FIELDNAME) -CL::ESTABLISH-ACCESSORS (CL::PS) HASHFILESPLST1 (XWORD) CL:LOAD (STREAM) HPRINT1 (VALS) SEDIT::TTYFN ( -SEDIT::EVENT) \\PROCESS.APPLY1 (..PEV-PROC.. ..PEV-RESULT..) COMPILE-FILE-EXPRESSION (COMPILED.FILE -COMPILE.TIME.TOO DEFER FORCE-OUTPUT-P) CL:UNWIND-PROTECT (\\UNWIND-FORMS) MAPRELATION (MAPFN2 MAPZ -MAPFN MAPW) \\NSRANDOM.READ.SEGMENT (FIRSTPAGE# BYTESTOFETCH BUFFERS EXTRABUFFERS NEXTRA) -\\UFS.CLEANUP.GFS.TABLE (NOTICETOCP) \\ASSIGNDATATYPE1 (NEWTYPEENTRY FOUNDSOME) DBG::PRINT-BACKTRACE ( -DBG::TEST) \\COURIER.HANDLE.BULKDATA (DATASTREAM) HCOPYALL1 (NEW) \\STORAGE.TYPE (ALLOCMDS) APROPOS ( -BLOCKCOUNT FILTERFN STRING CASEARRAY ALLFLG QUIETFLG RESULT OUTPUT) \\NSFILING.SETFILEINFO ( -NAME.OR.STREAM DEVICE ATTR/VAL) XCL::HASH-FILE-WHERE-IS (TYPE) BAKTRACE (FN) MAKEINITLAST (AL) -COMPARENCHARS (COMPARECNT) CLEARSTK (FLG LST) CL::%MAKE-LIST-ACCESSOR (CL::OFFSET) MSINTERPRET (TYPE -SHOWSET EDIT EDITCOMS DONE) CL::GET-SHARED-SETF-METHOD (CL::VALS CL::VARS) GC-FILING-DIRECTORY ( -DIRINDEX CONFIRM? ID NDELETED) \\MISCN.UFN (MY-BF RESULT-IVAR CALLER) CL::%MAKE-FIXP-ACCESSOR (TYPE -CL::OFFSET) COMPILER::ALPHA-LABELS (CL:LABELS COMPILER::*ENVIRONMENT*) \\TOP-LEVEL-READ (STREAM -OLD-EOS-OP EOF-VALUE) SI::DESCRIBE-USING-RECORD-DECL (SI::DEPTH SI::OBJECT DECL) BAKTRACE1 (N IPOS POS -) D-ASSEM:ASSEMBLE-FUNCTION (D-ASSEM::*DTAG-ENV*) GETGRIDBOXREGION (GRIDREGION) -SET-READTABLE-INTERACTIVELY (READTABLES) \\NSFILING.LOGIN (STREAM) FB.CANONICAL.DIRECTORY (OLDTTYPROC -OLDTTYSTREAM PWINDOW) CL::%MAKE-RANDOM-ARRAY (CL::RANDOM-CONST-A CL::RANDOM-CONST-B) -CL::%MAKE-SMALL-FIXP-ACCESSOR (TYPE) COMPILER::TEST-ANALYSIS (COMPILER::TREE) NCHARS (NCHARCNT) -\\NSFILING.DELETEFILE (DEVICE) CLEARCLISPARRAY (NAME) XCL:LIST-ALL-PROFILES (XCL:PROFILES) -MULTIFILEINDEX1 (*STANDARD-OUTPUT*) \\STRINGWIDTH.PRESS (TOTALWIDTH STREAM WIDTHSBASE) INREADMACROP ( -\\READDEPTH) SEDIT::SEDITL (CL:ATOM) \\NSFILING.DESERIALIZE1 (BULKSTREAM SERIALSESSION) -SI::CREATE-CONDITION-CASE-LITERALS (SI::CATCH-TAG) CH.ADD.GROUP.PROPERTY (MEMBERS) -\\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (DISPLAYSTREAM NEWLENGTH X) BREAK1 (POS) -LOOKUP-ENVIRONMENT-AND-FILEMAP (FULL HIGHEST-VERSION MAPENTRY) \\PRINDATUM.TO.STRING (FATSTRINGP -STRINGLEN *PRINT-CIRCLE-HASHTABLE* STRINDEX STRINGPTR) UNPACK (\\CHCONLSTAIL \\CHCONLST) CL:MAPHASH ( -CL::FN) %MAKE-ARRAY-TYPE-TABLE (LIT-TYPE) COLLECTKEYS (KEYLST MKSTRING?) FB.ADJUST.DATE.WIDTH (INDEX -SPEC FONT) CL::GET-SIMPLE-SETF-METHOD (CL::VALS CL::VARS) \\MAPCHARS (\\MAPCHARFN) DCHCON ( -!SCRATCHTAIL) XCL:UNBREAK-FUNCTION (XCL::BROKEN-FN XCL::IN-FN) SEDIT::SEDITE (CL:ATOM SEDIT::IFCHANGEDFN - SEDIT::OLD-PROPS SEDIT::NEW-EXPR SEDIT::EVENT TYPE) CHCON (\\CHCONLSTAIL \\CHCONLST) -CL::STRUCTURE-FUNCTION-P (CL:SYMBOL) FLUSHFILEMAPS (ROOTNAME) XCL::WHERE-IS-NOTICE (HASH-FILE:HASH-FILE -) XCL::%DEFINE-TYPE-FILE-DEFINITIONS (TYPE) CL::%MAKE-WORD-ACCESSOR (TYPE CL::OFFSET) -SI::DESCRIBE-USING-INSPECT-MACRO (SI::DEPTH SI::FETCHFN SI::OBJECT) MSPRGTEMPLATE1 (EXPR) COPYHASHFILE - (HASHFILE NEWHASHFILE FN) \\FILEMAP-HASHOVERFLOW (ENTRIES) DUNPACK (!SCRATCHTAIL) NIL -USERTEMPLATES TTBOUT (CALL CALL |..| (IF (OR (LISTP EXPR) (AND (NTHCHAR EXPR 2) (NOT (ASSOC EXPR -DMCHARCODES)))) EVAL NIL)) CH.PROPERTY (CALL PROP) |\\DoveIO.LockMem| (CALL |..| EVAL) TTBOUTN (MACRO -(X . Y) (FRPTQ X (TTBOUT . Y))) NIL -KEYACCEPT EXEC-EVAL (:PROMPT :ID :TYPE) DBG::PRINT-BACKTRACE (:FROM :TO :TEST :PRINT-VARIABLES -:PRINT-JUNK :OUTPUT :LINK) CL:ADJOIN (:TEST :TEST-NOT :KEY) CL:UNION (:TEST :TEST-NOT :KEY) -CL:COMPILE-FILE (:OUTPUT-FILE :LAP-FILE :ERROR-FILE :ERRORS-TO-TERMINAL :FILE-MANAGER-FORMAT -:PROCESS-ENTIRE-FILE :LOAD) CL:DELETE-DUPLICATES (:START :END :FROM-END :KEY :TEST :TEST-NOT) ADD-EXEC - (:PROFILE :REGION :TTY :EXEC :ID &ALLOW-OTHER-KEYS) CL:COMPILE (:LAP) CL:SUBSTITUTE-IF-NOT (:START -:END :FROM-END :COUNT :KEY) CL:SEARCH (:START1 :END1 :START2 :END2 :FROM-END :TEST :TEST-NOT :KEY) -CL:SUBSTITUTE (:START :END :FROM-END :COUNT :KEY :TEST :TEST-NOT) PARSE-DEFMACRO (:PATH :ENVIRONMENT -:CONTEXT :ERROR-STRING :DOC-STRING-ALLOWED :DEFAULT-DEFAULT :KEY-FINDER :REMOVE-COMMENTS) COPY-VECTOR -(:START1 :END1 :START2 :END2) CL:INTERSECTION (:TEST :TEST-NOT :KEY) CL:MAKE-ARRAY (:ELEMENT-TYPE -:INITIAL-ELEMENT :INITIAL-CONTENTS :DISPLACED-TO :DISPLACED-TO-BASE :DISPLACED-INDEX-OFFSET -:FILL-POINTER :ADJUSTABLE :EXTENDABLE :FATP :READ-ONLY-P) CL:SUBSTITUTE-IF (:START :END :FROM-END -:COUNT :KEY) WALK-FORM (:DECLARATIONS :LEXICAL-VARIABLES :ENVIRONMENT :COPY :WALK-FUNCTION) -FASL::DUMP-ARRAY-DESCRIPTOR (:INITIAL-ELEMENT) CL:NUNION (:TEST :TEST-NOT :KEY) STRING-EQUAL (:START1 -:END1 :START2 :END2) CL:ASSOC (:TEST :TEST-NOT :KEY) FILL-VECTOR (:START :END) WRITE (:STREAM :ESCAPE -:RADIX :BASE :LEVEL :LENGTH :CASE :GENSYM :ARRAY :PRETTY :CIRCLE) CL:SUBST-IF (:KEY) CL::TIME-CALL ( -:OUTPUT :TIMED-FORM :DATA-TYPES :REPEAT) CL:RASSOC-IF-NOT (:KEY) CL:NSUBSTITUTE-IF-NOT (:START :END -:FROM-END :COUNT :KEY) CL:COUNT-IF (:START :END :FROM-END :KEY) CL:STRING<= (:START1 :END1 :START2 -:END2) CL:SUBST (:TEST :TEST-NOT :KEY) CL:STRING>= (:START1 :END1 :START2 :END2) FAKE-COMPILE-FILE ( -:LAP :REDEFINE :OUTPUT-FILE :SAVE-EXPRS :COMPILER-OUTPUT :PROCESS-ENTIRE-FILE) CL:PARSE-NAMESTRING ( -:START :END :JUNK-ALLOWED) CL:REMOVE-IF-NOT (:START :END :FROM-END :COUNT :KEY) CL:SET-EXCLUSIVE-OR ( -:TEST :TEST-NOT :KEY) CL:COUNT (:START :END :FROM-END :KEY :TEST :TEST-NOT) CL:STRING> (:START1 :END1 -:START2 :END2) DEBUGGER (:FORM :ENVIRONMENT :CONDITION :STACK-POSITION :AT) CL:SUBST-IF-NOT (:KEY) -CL:DISASSEMBLE (:LEVEL-P :RADIX :OUTPUT :FIRST-BYTE :MARKED-PC) FASL:PROCESS-FILE (:TEXT-FN :ITEM-FN) -CL:NSUBSTITUTE-IF (:START :END :FROM-END :COUNT :KEY) CL:SUBSETP (:TEST :TEST-NOT :KEY) -XCL:COMPILE-DEFINER (:LAP) COMPILER::ALPHA-LAMBDA (:CONTEXT :NAME) CL:POSITION-IF (:START :END -:FROM-END :KEY) CL:STRING-CAPITALIZE (:START :END) CL:NSUBSTITUTE (:START :END :FROM-END :COUNT :KEY -:TEST :TEST-NOT) CL:NSET-EXCLUSIVE-OR (:TEST :TEST-NOT :KEY) CL:NINTERSECTION (:TEST :TEST-NOT :KEY) -XCL:COMPILE-FORM (:LAP) BREAK-FUNCTION (:IN :WHEN :TRACE? :REBREAK?) CL:WRITE-LINE (:START :END) -CL:POSITION (:START :END :FROM-END :KEY :TEST :TEST-NOT) CL:NSUBST (:TEST :TEST-NOT :KEY) -CL:NSTRING-DOWNCASE (:START :END) CL:MAKE-HASH-TABLE (:TEST :SIZE :REHASH-SIZE :REHASH-THRESHOLD) -CL:STABLE-SORT (:KEY) CL:REMOVE (:START :END :FROM-END :COUNT :KEY :TEST :TEST-NOT) CL:REMOVE-DUPLICATES - (:START :END :FROM-END :KEY :TEST :TEST-NOT) CL:WRITE-STRING (:START :END) CL:IN-PACKAGE (:NICKNAMES -:USE) CL:STRING< (:START1 :END1 :START2 :END2) CL:DELETE-IF (:START :END :FROM-END :COUNT :KEY) CL:FIND - (:START :END :FROM-END :KEY :TEST :TEST-NOT) CL:STRING= (:START1 :END1 :START2 :END2) CL:NSUBST-IF ( -:KEY) CL:NSET-DIFFERENCE (:TEST :TEST-NOT :KEY) CL:WRITE-TO-STRING (:ESCAPE :RADIX :BASE :CIRCLE -:PRETTY :LEVEL :LENGTH :CASE :ARRAY :GENSYM) CL:RASSOC (:TEST :TEST-NOT :KEY) CL:SET-DIFFERENCE (:TEST - :TEST-NOT :KEY) CL:DELETE-IF-NOT (:START :END :FROM-END :COUNT :KEY) CL:MAKE-STRING (:INITIAL-ELEMENT - :FATP) CL:MEMBER (:TEST :TEST-NOT :KEY) CL:ASSOC-IF-NOT (:KEY) CL:MAKE-PACKAGE (:USE :NICKNAMES -:PREFIX-NAME :EXTERNAL-ONLY :INTERNAL-SYMBOLS :EXTERNAL-SYMBOLS) CL:STRING-GREATERP (:START1 :END1 -:START2 :END2) CL:ASSOC-IF (:KEY) CL:NSUBST-IF-NOT (:KEY) CL:MAKE-PATHNAME (:DEFAULTS :HOST :DEVICE -:DIRECTORY :NAME :TYPE :VERSION) COMPILER:ENV-FBOUNDP (:LEXICAL-ONLY) XCL:UNADVISE-FUNCTION (:IN -:NO-ERROR) CL:STRING-DOWNCASE (:START :END) CL:ADJUST-ARRAY (:ELEMENT-TYPE :INITIAL-ELEMENT -:INITIAL-CONTENTS :DISPLACED-TO :DISPLACED-TO-BASE :DISPLACED-INDEX-OFFSET :FILL-POINTER :FATP) -CL:REPLACE (:START1 :END1 :START2 :END2) XCL:READVISE-FUNCTION (:IN) CL:CLOSE (:ABORT) CL:DELETE ( -:START :END :FROM-END :COUNT :KEY :TEST :TEST-NOT) CL:NSUBLIS (:TEST :TEST-NOT :KEY) XCL:REINSTALL-ADVICE - (:BEFORE :AFTER :AROUND) CL:READ-FROM-STRING (:START :END :PRESERVE-WHITESPACE) CL:POSITION-IF-NOT ( -:START :END :FROM-END :KEY) CL:SORT (:KEY) CL:SUBLIS (:TEST :TEST-NOT :KEY) XCL:ADVISE-FUNCTION (:IN -:WHEN :PRIORITY) CL:STRING-LESSP (:START1 :END1 :START2 :END2) OPEN (:DIRECTION :ELEMENT-TYPE -:IF-EXISTS :IF-DOES-NOT-EXIST :EXTERNAL-FORMAT) CL:TREE-EQUAL (:TEST :TEST-NOT) INTERN-LITATOM (:WHERE -) CL:STRING-NOT-EQUAL (:START1 :END1 :START2 :END2) FASL:CLOSE-FASL-HANDLE (:ABORT &ALLOW-OTHER-KEYS) -CL:RASSOC-IF (:KEY) MAKE-VECTOR (:ELEMENT-TYPE :INITIAL-ELEMENT :FATP) CL:FIND-IF (:START :END -:FROM-END :KEY) CL:STRING/= (:START1 :END1 :START2 :END2) CL:MISMATCH (:START1 :END1 :START2 :END2 -:FROM-END :TEST :TEST-NOT :KEY) CL:STRING-NOT-LESSP (:START1 :END1 :START2 :END2) -CL::%LIST-MAP-OPTIMIZER (:TAIL-P :COLLECT-P :NCONC-P :INC-FN :NIL-RESULT-P) CL:PARSE-INTEGER (:START -:END :RADIX :JUNK-ALLOWED) CL:MAKE-SEQUENCE (:INITIAL-ELEMENT) CL:MERGE (:KEY) CL:REDUCE (:START :END -:FROM-END :INITIAL-VALUE) CL:MAKE-LIST (:INITIAL-ELEMENT) XCL:REBREAK-FUNCTION (:IN) XCL:UNBREAK-FUNCTION - (:IN :NO-ERROR) CL:FILL (:START :END) EXEC (:TOP-LEVEL-P :WINDOW :TITLE :COMMAND-TABLES :ENVIRONMENT -:PROMPT :FUNCTION :PROFILE :ID &ALLOW-OTHER-KEYS) SI::COMPILED-FUNCTION-ARGLIST (:INTERLISP?) -XCL:TRACE-FUNCTION (:IN :REBREAK?) CL:NSTRING-UPCASE (:START :END) CL:STRING-UPCASE (:START :END) -CL::%EVERY-MAP-OPTIMIZER (:SOME-P :NEGATE-P) CL:LOAD (:VERBOSE :PRINT :IF-DOES-NOT-EXIST :LOADFLG -:PACKAGE) CL:FIND-IF-NOT (:START :END :FROM-END :KEY) CL:COUNT-IF-NOT (:START :END :FROM-END :KEY) -XCL::WHERE-IS-NOTICE (:FILES :NEW :DEFINE-TYPES :HASH-FILE-SIZE :QUIET :TEMP-FILE) CL:MEMBER-IF-NOT ( -:KEY) CL:MEMBER-IF (:KEY) XCL:CREATE-TRACE-WINDOW (:REGION :OPEN? :TITLE) CL:NSTRING-CAPITALIZE ( -:START :END) CL:STRING-NOT-GREATERP (:START1 :END1 :START2 :END2) CL:REMOVE-IF (:START :END :FROM-END -:COUNT :KEY) NIL -KEYSPECIFY FASL:MAKE-OPTABLE (:INITIAL-ELEMENT) CL:COMPILE-FILE (:TOP-LEVEL-P :VALUES-USED :DIRECTION -:TYPE :VERSION :DEFAULTS) COMPILE-FILE-SETF-SYMBOL-FUNCTION (:WALK-FUNCTION) MAKE-SEQUENCE-OF-TYPE ( -:ELEMENT-TYPE) CL::INSERT-INCLUDED-SLOT (:TEST) FB.CREATE.FILEBUCKET (:END2) SI::HAS-CALLS (:TEST) -HASH-LEFT-PAD-INITIAL-CONTENTS (:INITIAL-ELEMENT) D-ASSEM::CONVERT-TO-BINARY (:ELEMENT-TYPE) -FORMAT-EAT-WHITESPACE (:START) FB.THINCOMMAND (:KEY) XCL::*BREAK-HASH-TABLE* (:TEST) -SEDIT::CREATE-COMMAND-TABLE (:SIZE :REHASH-SIZE) CANONICAL.HOSTNAME (:TEST) \\CONVERT.FLOATING.NUMBER -(:ELEMENT-TYPE :FILL-POINTER :ADJUSTABLE) FB.REMOVE.FILE (:END1 :END2) PFI.CHOOSE.BEST (:KEY) -COMPILER::COMPLETELY-EXPAND (:TEST) DEBUGGER (:TITLE :COMMAND-TABLES :ENVIRONMENT :PROMPT :FUNCTION) -FB.INSERT.FILE (:END1 :END2) XCL::WHERE-IS-NAMESTRING (:HOST :NAME :TYPE) RESOLVE-READER-CONFLICT ( -:TEST) XCL:COMPILE-FORM (:TOP-LEVEL-P :VALUES-USED) BREAK-FUNCTION (:IN :REBREAK? :WHEN :NO-ERROR -:TEST) ADD-USER-SUBR (:TEST :KEY) COMPILER::ENV-INLINE-DISALLOWED (:TEST) FASL::DUMP-GENERAL-ARRAY ( -:DISPLACED-TO :ELEMENT-TYPE) SI::ADVICE-PUTDEF (:IN) FB.INSERT.SUBDIRECTORIES (:END1 :END2) -SI::ADD-CHANGED-CALL (:TEST) ADD-SYMBOL (:ELEMENT-TYPE) HASH-LEFTPAREN (:INITIAL-ELEMENT -:INITIAL-CONTENTS) COMPILER::ALPHA-COMBINATION (:TEST) CONCOCT-SYMBOL (:TEST) COMPILER::FIND-SEGMENT ( -:TEST) COMPILER::*EFFECT-CONTEXT* (:VALUES-USED) OPENPOSTSCRIPTSTREAM (:TEST) HASH-TABLE-FOR-DOC-TYPE -(:TEST :SIZE :REHASH-SIZE) CONVERT-LITATOM (:WHERE) COERCE (:TEST) CL:MAKE-STRING (:ELEMENT-TYPE :FATP -) COMPILER::ENV-INLINE-ALLOWED (:TEST) CL:PRINC (:STREAM :ESCAPE) HASH-A (:INITIAL-CONTENTS) -DECLARERECORD (:TEST) XCL::WALK-ARGLIST (:TEST) PACKAGE-ENABLE (:TEST) PARSE-FORMAT-OPERATION (:TEST) -\\LEAF.DIRECTORYNAMEP (:TEST) %FLATTEN-ARRAY (:ELEMENT-TYPE :DISPLACED-TO) FB.MAYBE.INSERT.FILE (:END1 - :END2) %MAKE-INITIAL-STRING-STREAM-CONTENTS (:ELEMENT-TYPE :EXTENDABLE :FILL-POINTER) -XCL:UNADVISE-FUNCTION (:IN) PACKAGE-MAKE (:USE :NICKNAMES :PREFIX-NAME :EXTERNAL-ONLY -:EXTERNAL-SYMBOLS) CL:PRIN1 (:STREAM :ESCAPE) XCL:READVISE-FUNCTION (:IN :NO-ERROR) CHARCODE.DECODE ( -:START :RADIX :JUNK-ALLOWED :END) TRACE (:IN) XCL::ADD-PROTOTYPE-FN (:TEST) SI::ADVISE-CONTENTS (:TEST -) FB.SORTCOMMAND (:KEY) XCL:ADVISE-FUNCTION (:IN :WHEN :PRIORITY :TEST) ADVISE (:WHEN :PRIORITY :IN) -COMPILER::*ARGUMENT-CONTEXT* (:VALUES-USED) COMPILER::FRAME-ANNOTATE-CATCH (:TEST) OPEN (:TEST) -EXEC-PRIN1 (:STREAM :ESCAPE) COMPILER::FRAME-ANNOTATE-TAGBODY (:TEST) COMPILER::RESOLVE-VARIABLE-BINDING - (:TEST) XCL::*PROFILES* (:TEST) D-ASSEM::DCODE-FROM-DLAMBDA (:TEST :KEY) PACKAGE-HIERARCHY-INIT ( -:WHERE) FASL::NEW-VALUE-TABLE (:FILL-POINTER :EXTENDABLE) COMPILER::ALPHA-UNWIND-PROTECT (:CONTEXT -:NAME) XCL:REBREAK-FUNCTION (:IN) XCL:TRACE-FUNCTION (:IN :TEST) CHAT.STARTUP (:TEST) SUBRNUMBER ( -:TEST) %DESTRUCTIVE-RESULT-VECTOR (:ELEMENT-TYPE :FILL-POINTER :END1) COPYFILES (:TEST) -COMPILE-FILE-EXPRESSION (:WALK-FUNCTION) CL:BIT-NOT (:ELEMENT-TYPE) MAKE-PACKAGE-HASHTABLE ( -:ELEMENT-TYPE) MSSEEK-WORD (:TEST) EXEC-PRINT (:STREAM :ESCAPE) MAKEFILE1 (:REDEFINE :SAVE-EXPRS :LOAD -) COMPILER::ALPHA-FUNCTIONAL-FORM (:VALUES-USED) SI::MAKE-AROUND-BODY (:INITIAL-VALUE) -COMPILER::COMPILE-ONE-LAMBDA (:NAME) MAPFILES1 (:START1) COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION ( -:KEY) COPY-ARRAY (:ELEMENT-TYPE :FATP) D-ASSEM::STORE-DIGEST-INFO (:KEY) FIND-HISTORY-EVENTS (:TEST) -COMPILER::ALPHA-EVAL-WHEN (:TEST) SI::*ADVICE-HASH-TABLE* (:TEST) COMPILER::ENV-PROCLAIMED-GLOBAL-P ( -:TEST) COMPILER::FRAME-ANNOTATE-GO (:TEST) XCL::HASH-FILE-WHERE-IS (:TEST) SEDIT::*FSPEC-TABLE* (:TEST - :SIZE) CL::*TYPEP-HASH-TABLE* (:TEST) \\NSFILING.PARSE.FILENAME (:JUNK-ALLOWED) \\10MB.CREATENDB ( -:TEST) DBG::STACK-FRAME-FETCHFN (:TEST) FB.ADD.FILEGROUP (:END1 :END2) HASH-STAR (:ELEMENT-TYPE -:INITIAL-ELEMENT) CHAT.CHOOSE.EMULATOR (:TEST) \\MAKERECODEMAP (:INITIAL-ELEMENT) CL:PARSE-NAMESTRING -(:HOST :DEVICE :DIRECTORY :NAME :TYPE :VERSION) D-ASSEM:ASSEMBLE-FUNCTION (:TEST) COMP.TRANSFORM ( -:VALUES-USED :PREDICATE-P) WHITESPACE-CHAR-P (:TEST) FB.UPDATEBROWSERITEMS (:KEY) FASL-FILEDATE ( -:TEXT-FN :ITEM-FN) SI::EXPAND-CONDITION-CASE (:TEST) CL:USER-HOMEDIR-PATHNAME (:HOST :DIRECTORY) -XCL::WHERE-IS-NOTICE-INTERNAL (:TEST) CL::%MAKE-RANDOM-ARRAY (:INITIAL-CONTENTS) FB.COPY/RENAME.MANY ( -:END1 :END2) CL:PROVIDE (:TEST) WHO-LINE-CURRENT-DIRECTORY (:TEST) DBG::STACK-FRAME-STOREFN (:TEST) -CL:PPRINT (:STREAM :ESCAPE :PRETTY) SI::FINISH-UNADVISING (:TEST) CONSTANTEXPRESSIONP (:VALUES-USED -:PREDICATE-P) CL::SUBTYPEP-TYPE-EXPAND (:TEST) XCL:LIST-ALL-PROFILES (:TEST) -D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL (:TEST) COMPILER::*PREDICATE-CONTEXT* (:VALUES-USED -:PREDICATE-P) |\\UFSGetPrintFileType| (:TEST) FASL::DUMMY-HANDLE (:DIRECTION) COMPILER::PEEPHOLE-OPTIMIZE - (:TEST) COMPILER:ENV-BOUNDP (:TEST) \\PAPERSIZE.IP (:TEST) WRITE-UNICODE-INCLUDED (:RADIX) -XCL::PROTOTYPE-DEFINERS-FOR-TYPE (:TEST) READHASHMACRO (:INITIAL-CONTENTS :ELEMENT-TYPE) -SI::FINISH-ADVISING (:TEST) XCL::MAKE-PROTOTYPE (:TEST) XCL::VARIABLE-LEXICALLY-BOUNDP (:TEST) -*DIGIT-STRING* (:ELEMENT-TYPE :FILL-POINTER :ADJUSTABLE) CL::STEP-COMMAND (:TEST) -COMPILER::ENV-PROCLAIMED-SPECIAL-P (:TEST) |\\UFSGetFileType| (:TEST) CL::BASE-SUBTYPEP (:TEST) CHAT ( -:TEST) COMP.EXPR (:LEXICAL-ONLY) MAKE-UNICODE-TRANSLATION-TABLES (:INITIAL-ELEMENT) COMP.LABELS ( -:WALK-FUNCTION) POSTSCRIPT.INIT (:INITIAL-ELEMENT) SEDIT::LIST-FORMATS-TABLE (:SIZE) CL:MAKE-SEQUENCE -(:INITIAL-ELEMENT) *DEFINITION-HASH-TABLE* (:TEST :SIZE) COMPILER::FRAME-ANNOTATE-BLOCK (:TEST) BREAK0 - (:IN :WHEN) CL:ADJUST-ARRAY (:ELEMENT-TYPE :FATP) REMOVE-COMMENTS (:TEST) POSTSCRIPTFILEP (:TEST) -XCL:UNBREAK-FUNCTION (:IN) COMPILER::FIND-REACHABLE-TAGS (:TEST) XCL::VARIABLE-LEXICAL-P (:TEST) -COMPILER::FRAME-ANNOTATE-RETURN (:TEST) |NewPrinter| (:TEST) DBG::COLLECT-ACTIVE-ESCAPES (:FROM-END -:TEST) CL::STRUCTURE-FUNCTION-P (:TEST) \\PICK.EVALQT (:TOP-LEVEL-P :PROFILE :WINDOW) -COMPILER::FRAME-ANNOTATE-LAMBDA (:TEST) NIL -KEYCALL FASL:MAKE-OPTABLE (CL:MAKE-ARRAY) CL:COMPILE-FILE (COMPILER:MAKE-CONTEXT OPEN CL:MAKE-PATHNAME -) COMPILE-FILE-SETF-SYMBOL-FUNCTION (WALK-FORM) MAKE-SEQUENCE-OF-TYPE (MAKE-VECTOR) -CL::INSERT-INCLUDED-SLOT (CL:MEMBER) FB.CREATE.FILEBUCKET (STRING-EQUAL) SI::HAS-CALLS (CL:FIND) -HASH-LEFT-PAD-INITIAL-CONTENTS (CL:MAKE-LIST) D-ASSEM::CONVERT-TO-BINARY (CL:MAKE-ARRAY) -FORMAT-EAT-WHITESPACE (CL:POSITION-IF-NOT) FB.THINCOMMAND (CL:POSITION) XCL::*BREAK-HASH-TABLE* ( -CL:MAKE-HASH-TABLE) SEDIT::CREATE-COMMAND-TABLE (CL:MAKE-HASH-TABLE) CANONICAL.HOSTNAME (CL:ASSOC) -\\CONVERT.FLOATING.NUMBER (CL:MAKE-ARRAY) FB.REMOVE.FILE (STRING-EQUAL) PFI.CHOOSE.BEST (CL:STABLE-SORT -) COMPILER::COMPLETELY-EXPAND (CL:MEMBER) DEBUGGER (EXEC) FB.INSERT.FILE (STRING-EQUAL) -XCL::WHERE-IS-NAMESTRING (CL:MAKE-PATHNAME) RESOLVE-READER-CONFLICT (CL:MEMBER) XCL:COMPILE-FORM ( -COMPILER:MAKE-CONTEXT) BREAK-FUNCTION (XCL:TRACE-FUNCTION BREAK-FUNCTION XCL:UNADVISE-FUNCTION CL:DELETE -) ADD-USER-SUBR (CL:REMOVE CL:FIND) COMPILER::ENV-INLINE-DISALLOWED (CL:MEMBER) FASL::DUMP-GENERAL-ARRAY - (CL:MAKE-ARRAY) SI::ADVICE-PUTDEF (XCL:READVISE-FUNCTION) FB.INSERT.SUBDIRECTORIES (STRING-EQUAL) -SI::ADD-CHANGED-CALL (CL:MEMBER CL:DELETE) ADD-SYMBOL (CL:MAKE-ARRAY) HASH-LEFTPAREN (CL:MAKE-ARRAY) -COMPILER::ALPHA-COMBINATION (CL:MEMBER) CONCOCT-SYMBOL (CL:MEMBER) COMPILER::FIND-SEGMENT (CL:MEMBER) -COMPILER::*EFFECT-CONTEXT* (COMPILER:MAKE-CONTEXT) OPENPOSTSCRIPTSTREAM (CL:ASSOC) -HASH-TABLE-FOR-DOC-TYPE (CL:MAKE-HASH-TABLE) CONVERT-LITATOM (INTERN-LITATOM) COERCE (CL:MEMBER) -CL:MAKE-STRING (MAKE-VECTOR) COMPILER::ENV-INLINE-ALLOWED (CL:MEMBER) CL:PRINC (WRITE) HASH-A ( -CL:MAKE-ARRAY) DECLARERECORD (CL:MEMBER) XCL::WALK-ARGLIST (CL:MEMBER) PACKAGE-ENABLE (CL:PUSHNEW) -PARSE-FORMAT-OPERATION (CL:MEMBER) \\LEAF.DIRECTORYNAMEP (CL:MEMBER) %FLATTEN-ARRAY (CL:MAKE-ARRAY) -FB.MAYBE.INSERT.FILE (STRING-EQUAL) %MAKE-INITIAL-STRING-STREAM-CONTENTS (CL:MAKE-ARRAY) -XCL:UNADVISE-FUNCTION (XCL:UNADVISE-FUNCTION) PACKAGE-MAKE (CL:MAKE-PACKAGE) CL:PRIN1 (WRITE) -XCL:READVISE-FUNCTION (XCL:READVISE-FUNCTION XCL:UNADVISE-FUNCTION) CHARCODE.DECODE (CL:PARSE-INTEGER) - TRACE (XCL:TRACE-FUNCTION) XCL::ADD-PROTOTYPE-FN (CL:ASSOC) SI::ADVISE-CONTENTS (CL:MEMBER -CL:INTERSECTION) FB.SORTCOMMAND (CL:POSITION) XCL:ADVISE-FUNCTION (XCL:ADVISE-FUNCTION CL:MEMBER) -ADVISE (XCL:ADVISE-FUNCTION) COMPILER::*ARGUMENT-CONTEXT* (COMPILER:MAKE-CONTEXT) -COMPILER::FRAME-ANNOTATE-CATCH (CL:NUNION) OPEN (CL:MEMBER) EXEC-PRIN1 (WRITE) -COMPILER::FRAME-ANNOTATE-TAGBODY (CL:NUNION) COMPILER::RESOLVE-VARIABLE-BINDING (CL:MEMBER) -XCL::*PROFILES* (CL:MAKE-HASH-TABLE) D-ASSEM::DCODE-FROM-DLAMBDA (CL:FIND) PACKAGE-HIERARCHY-INIT ( -INTERN-LITATOM) FASL::NEW-VALUE-TABLE (CL:MAKE-ARRAY) COMPILER::ALPHA-UNWIND-PROTECT (COMPILER::ALPHA-LAMBDA -) XCL:REBREAK-FUNCTION (XCL:REBREAK-FUNCTION) XCL:TRACE-FUNCTION (XCL:TRACE-FUNCTION CL:DELETE) -CHAT.STARTUP (CL:ASSOC CL:MEMBER) SUBRNUMBER (CL:ASSOC) %DESTRUCTIVE-RESULT-VECTOR (CL:MAKE-ARRAY -COPY-VECTOR) COPYFILES (CL:MEMBER) COMPILE-FILE-EXPRESSION (WALK-FORM) CL:BIT-NOT (CL:MAKE-ARRAY) -MAKE-PACKAGE-HASHTABLE (CL:MAKE-ARRAY) MSSEEK-WORD (CL:MEMBER) EXEC-PRINT (WRITE) MAKEFILE1 ( -FAKE-COMPILE-FILE CL:COMPILE-FILE) COMPILER::ALPHA-FUNCTIONAL-FORM (COMPILER:MAKE-CONTEXT) -SI::MAKE-AROUND-BODY (CL:REDUCE) COMPILER::COMPILE-ONE-LAMBDA (COMPILER::ALPHA-LAMBDA) MAPFILES1 ( -STRING-EQUAL) COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION (CL:REMOVE) COPY-ARRAY (CL:MAKE-ARRAY) -D-ASSEM::STORE-DIGEST-INFO (CL:SORT) FIND-HISTORY-EVENTS (CL:MEMBER) COMPILER::ALPHA-EVAL-WHEN ( -CL:MEMBER) SI::*ADVICE-HASH-TABLE* (CL:MAKE-HASH-TABLE) COMPILER::ENV-PROCLAIMED-GLOBAL-P (CL:MEMBER) -COMPILER::FRAME-ANNOTATE-GO (CL:PUSHNEW) XCL::HASH-FILE-WHERE-IS (CL:REMOVE-DUPLICATES) -SEDIT::*FSPEC-TABLE* (CL:MAKE-HASH-TABLE) CL::*TYPEP-HASH-TABLE* (CL:MAKE-HASH-TABLE) -\\NSFILING.PARSE.FILENAME (CL:PARSE-INTEGER) \\10MB.CREATENDB (CL:PUSHNEW) DBG::STACK-FRAME-FETCHFN ( -CL:ASSOC) FB.ADD.FILEGROUP (STRING-EQUAL) HASH-STAR (CL:MAKE-ARRAY) CHAT.CHOOSE.EMULATOR (CL:ASSOC) -\\MAKERECODEMAP (CL:MAKE-ARRAY) CL:PARSE-NAMESTRING (CL:MAKE-PATHNAME) D-ASSEM:ASSEMBLE-FUNCTION ( -CL:MAKE-HASH-TABLE) COMP.TRANSFORM (COMPILER:MAKE-CONTEXT) WHITESPACE-CHAR-P (CL:MEMBER) -FB.UPDATEBROWSERITEMS (CL:POSITION) FASL-FILEDATE (FASL:PROCESS-FILE) SI::EXPAND-CONDITION-CASE ( -CL:ASSOC) CL:USER-HOMEDIR-PATHNAME (CL:MAKE-PATHNAME) XCL::WHERE-IS-NOTICE-INTERNAL (CL:ASSOC) -CL::%MAKE-RANDOM-ARRAY (CL:MAKE-ARRAY) FB.COPY/RENAME.MANY (STRING-EQUAL) CL:PROVIDE (CL:PUSHNEW) -WHO-LINE-CURRENT-DIRECTORY (CL:MEMBER) DBG::STACK-FRAME-STOREFN (CL:ASSOC) CL:PPRINT (WRITE) -SI::FINISH-UNADVISING (CL:DELETE) CONSTANTEXPRESSIONP (COMPILER:MAKE-CONTEXT) CL::SUBTYPEP-TYPE-EXPAND - (CL:MEMBER) XCL:LIST-ALL-PROFILES (CL:PUSHNEW) D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL (CL:MEMBER) -COMPILER::*PREDICATE-CONTEXT* (COMPILER:MAKE-CONTEXT) |\\UFSGetPrintFileType| (CL:ASSOC) -FASL::DUMMY-HANDLE (OPEN) COMPILER::PEEPHOLE-OPTIMIZE (CL:MAKE-HASH-TABLE) COMPILER:ENV-BOUNDP ( -CL:MEMBER) \\PAPERSIZE.IP (CL:ASSOC) WRITE-UNICODE-INCLUDED (CL:PARSE-INTEGER) -XCL::PROTOTYPE-DEFINERS-FOR-TYPE (CL:ASSOC) READHASHMACRO (CL:MAKE-ARRAY) SI::FINISH-ADVISING (CL:MEMBER - CL:DELETE) XCL::MAKE-PROTOTYPE (CL:ASSOC) XCL::VARIABLE-LEXICALLY-BOUNDP (CL:MEMBER) *DIGIT-STRING* ( -CL:MAKE-ARRAY) CL::STEP-COMMAND (CL:MEMBER) COMPILER::ENV-PROCLAIMED-SPECIAL-P (CL:MEMBER) -|\\UFSGetFileType| (CL:ASSOC) CL::BASE-SUBTYPEP (CL:MEMBER CL:ASSOC) CHAT (CL:MEMBER) COMP.EXPR ( -COMPILER:ENV-FBOUNDP) MAKE-UNICODE-TRANSLATION-TABLES (CL:MAKE-ARRAY) COMP.LABELS (WALK-FORM) -POSTSCRIPT.INIT (CL:MAKE-ARRAY) SEDIT::LIST-FORMATS-TABLE (CL:MAKE-HASH-TABLE) CL:MAKE-SEQUENCE ( -CL:MAKE-LIST) *DEFINITION-HASH-TABLE* (CL:MAKE-HASH-TABLE) COMPILER::FRAME-ANNOTATE-BLOCK (CL:NUNION) -BREAK0 (BREAK-FUNCTION) CL:ADJUST-ARRAY (CL:MAKE-ARRAY) REMOVE-COMMENTS (CL:MEMBER) POSTSCRIPTFILEP ( -CL:MEMBER) XCL:UNBREAK-FUNCTION (XCL:UNBREAK-FUNCTION) COMPILER::FIND-REACHABLE-TAGS (CL:MAKE-HASH-TABLE -) XCL::VARIABLE-LEXICAL-P (CL:MEMBER) COMPILER::FRAME-ANNOTATE-RETURN (CL:PUSHNEW) |NewPrinter| ( -CL:MEMBER) DBG::COLLECT-ACTIVE-ESCAPES (CL:DELETE-DUPLICATES) CL::STRUCTURE-FUNCTION-P (CL:MEMBER) -\\PICK.EVALQT (EXEC) COMPILER::FRAME-ANNOTATE-LAMBDA (CL:NUNION) NIL -FLET RESOLVE-MISSING-EXTERNAL-SYMBOL (FILTER) RESOLVE-USE-PACKAGE-CONFLICT (XCL::FILTER) -CL::INSERT-INCLUDED-SLOT (CL::SAME-SLOT) CL:Y-OR-N-P (CL::READ-CHAR-NOW) RESOLVE-MISSING-PACKAGE ( -FILTER) XCL::SAME-WHERE-IS-DATABASE (XCL::COERCE-TO-PATHAME) CONDITIONS:FIND-RESTART (CONDITIONS::SAME-RESTART -) TYPESOF (RSHADOW) COMPILER::GENCODE-BLOCK (COMPILER::GENCODE-CLOSED-OVER-BLOCK) -COMPILER::PROCESS-DECLARATIONS (COMPILER::CHECK-VAR-1) READVISE1 (READVISE-ENTRY) -RESOLVE-IMPORT-CONFLICT (XCL::FILTER) COMP.LABELS (TRANSFORM) RESOLVE-EXPORT-CONFLICT (XCL::FILTER) -D-ASSEM::STACK-ANALYZE-CODE (D-ASSEM::STACK-AMBIGUOUS-ERROR) INSTALL-PROTOTYPE-DEFN (MAKE-AND-INSTALL) - RESOLVE-UNINTERN-CONFLICT (XCL::FILTER) UNBREAK (XCL::UNBREAK-ENTRY) COMPILER::GENCODE-MV-CALL ( -COMPILER::GENERATE-VALUES) RAISE-SIGNAL (TRY-TO-HANDLE) WALK-PROCEED-CASES (CONVERT-PROCEED-CASE) -SI::SPLIT-PROCEED-CLAUSES (SI::MAYBE-QUOTE) READVISE (READVISE-ENTRY) REBREAK (REBREAK-FN) -SI::EXPAND-CONDITION-CASE (SI::CONSTRUCT-NO-ERROR-CODE) UNTRACE (CL::UNTRACE-ENTRY) -COMPILER::START-COMPILATION (COMPILER::DATE-STRING) WHO-LINE-CONTROL-SELECT (ENTRY-DESCRIPTION) -UNADVISE (UNADVISE-ENTRY) RESOLVE-EXPORT-MISSING (XCL::FILTER) NIL +) XCL:LIST-ALL-PROFILES (CL:PUSHNEW CL:FUNCTION EQ XCL:PROFILE-NAME) BREAK.PROCESS (\DOHELPINTERRUPT1) + SEDIT::*FSPEC-TABLE* (CL:EQUAL) MAKEINITLAST (SETPROPLIST COPY SETTOPVAL LOCAL CONS RPLACA) +FAKE-COMPILE-FILE (CLOSEF? COMPILE.FILE.RESET) /SETWORDCONTENTS (/SETWORDCONTENTS) COMP.LOOKUPVAR ( +COMP.VAL) \SEQUIN.CLOSE (SI::MONITOR-UNWIND) \CREATE.XCCS.EXTERNALFORMAT (\XCCSINCCODE \XCCSPEEKCCODE +\XCCSBACKCCODE \XCCSOUTCHAR \XCCSFORMATBYTESTREAM) TOPW.BUTTONEVENTFN (INSPECT.INVERTREGION) +\LEAF.CLOSEFILE (SI::MONITOR-UNWIND) PRINTHISTORY2 (SHOWPRIN2) SEE* (SEE) TB.EXPANDFN ( +SI::MONITOR-UNWIND TB.SHRINKFN) \MAKE.PMAP.DEVICE (\BUFFERED.BIN \BUFFERED.BOUT \BUFFERED.PEEKBIN +\PAGEDREADP \PAGEDBACKFILEPTR \PAGEDSETFILEPTR \PAGEDGETFILEPTR \PAGEDGETEOFPTR \PAGED.SETEOFPTR +\PAGEDEOFP \BUFFERED.BINS \BUFFERED.BOUTS \PAGED.GETNEXTBUFFER NILL \PAGED.FORCEOUTPUT) +DINFO.UPDATE.HISTORY (DINFO.HISTORIC.UPDATE) XCL:RESTORE-PROFILE (SET) HPRINT (CL:CLOSE) +COPY.TEXT.TO.IMAGE (ZERO MAX) DUMPINITPAGES (MAKEROOMFORPME ADDPME DUMPVP) TEDIT.SETSYNTAX (CHARCODE) +NUMBERPAD.READ (\NUMBERPAD.READER.CLOSEFN) RESETBUFS (PROGN) XCL::VARIABLE-LEXICALLY-BOUNDP (EQ) +\MAKE.EXPEDITED.STREAM (\COURIER.EOF \COURIER.EXPEDITED.OVERFLOW) \BSP.PREPARE.OUTPUT ( +SI::MONITOR-UNWIND) \PAGED.FORCEOUTPUT (IGREATERP) \NSRANDOM.WRITE.SEGMENT (IMOD > - \BOUTS) +PFI.PRINT.BITMAP (PFI.OUTCHARFN) DASSEM.DSTOREFNDEF (SI::RESETUNWIND) \GENERATENOFILES ( +\NOFILESNEXTFILEFN \NOFILESINFOFN) CL::%%MAKE-LIST-ACCESSOR (CL:NTH) \DOVMEMFULLINTERRUPT ( +SI::RESETUNWIND) \NULLFILEGENERATOR (NILL) %%MAKE-ARRAY-TYPE-TABLE (CL:MAPCAR CL:FUNCTION LIST +%%TYPE-SIZE-TO-TYPENUMBER) CL:UNWIND-PROTECT (\EVPROGN) INSPECT/HARRAYP (HARRAYKEYS INSPECTW.GETHASH +INSPECTW.PUTHASH) \TEDIT.HCPYLOOKS.UPDATE (\BIN) COMPARENCHARS (PLUS) ALISTS.WHENCHANGED ( +MARKASCHANGED) \IFS.LOOKUPFILE (SI::MONITOR-UNWIND) DSPCREATE (\DSPPRINTCHAR) FB.COPYBINARYCOMMAND ( +COPYFILE) SEDIT::RESHAPEFN (SI::MONITOR-UNWIND) SPY.SUM (IGREATERP) NEWDEFC (NEWDEFC) +TWODINSPECT.BUTTONEVENTFN (CL:FUNCALL WINDOWPROP INSPECT.INVERTREGION) TB.FINISH.CLOSE ( +SI::MONITOR-UNWIND TB.EXPANDFN TB.SHRINKFN) INSPECTW.REDISPLAY (DEFAULT.INSPECTW.PROPCOMMANDFN +DEFAULT.INSPECTW.VALUECOMMANDFN) TEDIT.GETSYNTAX (CHARCODE) SORT (ALPHORDER) GETGRIDBOXREGION (INSIDE? + CREATEPOSITION \RANGELIMIT) \DSKCreateDevice (\DSKEventFn) CL::GET-PS-FROM-ACCESSOR (CL:DOLIST +CL::PS-ALL-SLOTS CL:LOOP CL::PSLOT-ACCESSOR CL:THROW) FB.INSERT.FILE (CL:FUNCALL) PRETTYPRINT (DSPFONT +) \CHECK.PQUEUE (SI::RESETUNWIND) COMPILEDFETCHFIELD (\DTEST) DBG::COLLECT-ACTIVE-ESCAPES ( +CONDITIONS:RESTART-NAME) \FM.NUMBER-SETUP (\FM.NUMBER-MESSAGE \FM.NUMBER-SELECTEDFN) \4DISPLAYINIT ( +\DSPFONT.DISPLAY \DSPLEFTMARGIN.DISPLAY \DSPRIGHTMARGIN.DISPLAY \DSPLINEFEED.DISPLAY +\DSPXPOSITION.DISPLAY \DSPYPOSITION.DISPLAY NILL \DRAWCURVE.DISPLAY \DRAWLINE.DISPLAY +\DRAWELLIPSE.DISPLAY \DRAWCIRCLE.DISPLAY \BITBLT.DISPLAY \BLTSHADE.DISPLAY \NEWPAGE.DISPLAY +\DSPSPACEFACTOR.DISPLAY \DSPCOLOR.DISPLAY \DSPBACKCOLOR.DISPLAY \DSPOPERATION.DISPLAY +\STRINGWIDTH.DISPLAY \CHARWIDTH.DISPLAY \DSPCLIPPINGREGION.DISPLAY \DSPRESET.DISPLAY \DRAWARC.DISPLAY +\DRAWPOLYGON.DISPLAY \DRAWPOINT.DISPLAY \MEDW.BLTCHAR \MEDW.XOFFSET \MEDW.YOFFSET \ILLEGAL.DEVICEOP +\GENERATENOFILES \DSPPRINTCHAR \PAGEDBACKFILEPTR \NONPAGEDBOUTS) EP (EDITPROP) INTCHAR (CHARCODE) +\UFS.CREATE.DEVICE (\UFSCloseFile \UFSDeleteFile \UFSRenameFile \UFSTruncateFile \UFSGetFileInfo +\UFSGetFileName \UFSOpenFile \UFSReadPages \UFSSetFileInfo \UFSWritePages \UFSGenerateFiles +\UFSDirectoryNameP NILL \GENERIC.OPENP \ADD-OPEN-STREAM \GENERIC-UNREGISTER-STREAM) +COMPILEDREPLACEFIELD (\DTEST \RPLPTR PUTBASEPTRX) XCL::VARIABLE-LEXICAL-P (EQ) TB.FLUSH.WINDOW ( +TB.CLOSEFN) CL:MAPHASH (CL:FUNCALL) CL::GET-PS-FROM-PREDICATE (CL::PS-PREDICATE CL:THROW) +MSINTERPRETSET (MSINTERPA) \FM.EDIT-SETUP (\FM.EDIT-MESSAGE \FM.EDIT-ITEM) CHAT.TYPESCRIPT ( +CHAT.TYPESCRIPT1) PPROCWINDOW (PPROCREPAINTFN SCROLLBYREPAINTFN PPROCRESHAPEFN) \DSKEventFn ( +SI::MONITOR-UNWIND \UFS.UNREGISTER.GFS) OPENIPSTREAM (INTERPRESS.OUTCHARFN) PACKFILENAME.STRING ( +PACKFILENAME.STRING) COMPILER::COMPILE-ONE-LAMBDA (COMPILER::RELEASE-TREE) CL::SUBTYPEP-TYPE-EXPAND ( +EQ) CHCON (FRPLACD LIST) XCL::HASH-FILE-WHERE-IS (CL:ASSOC) CL::CACHE-SETF-INFO (CL::PSLOT-ACCESSOR +CL:WHEN REMHASH CL::PSLOT-READ-ONLY CL::SET-SHARED-SETF-INVERSE) \PROCESS.MAKEFRAME ( +\PROCESS.MAKEFRAME0) FASL-FILEDATE (RETFROM FASL:PROCESS-FILE) \MEDW.REDISPLAYW (NILL) RETDWIM1 ( +CONCAT) BSPPUTMARK (SI::MONITOR-UNWIND) UNPACK (FCHARACTER FRPLACD LIST) \DSKCloseDevice ( +SI::MONITOR-UNWIND) TEDIT.MOVE (\TEDIT.MOVE.PIECEMAPFN) \PRINDATUM.TO.STRING (GREATERP PLUS NUMBERP +CL:GETHASH CONCAT \PUTBASEFAT \PUTBASE IPLUS ILEQ \PUTBASETHIN \PUTBASEBYTE \FATTENSTRING) +\VANILLADISKINIT (NILL \VANILLAHOSTNAMEP) MSFAIL (MSTRYPARSE) \LFDeleteFile (SI::MONITOR-UNWIND) +GLOBAL-MACRO-FUNCTION (CLISPEXPANSION \INTERLISP-NLAMBDA-MACRO) EDITFROMFILE (SI::RESETUNWIND) +\RTP.SOCKET.PROCESS (\RTP.CLEANUP \RTP.INFO.HOOK) \UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (BOUNDP +CL:SYMBOL-VALUE CL:MAPC CL:FUNCTION) CLISPIFYCROPS (CLISPIFY2B) PRETTYCOM (BOUNDP PRIN2) \ENVCALL.UFN +(\SETUP-ENVIRONMENT-CALL) \FM.TOGGLE-SETUP (\FM.TOGGLE-DOWNFN \FM.DISPLAYITEM \FM.TOGGLE-SELECTEDFN) +CHAT.TAKE.INPUT (CHAT.TAKE.INPUT1) XCL:UNBREAK-FUNCTION (CL:CONSP CL:FIRST CL:SECOND) +\VANILLAHOSTNAMEP (\VANILLAEVENTFN) CL::STEP-SLEEP (CL::STEP-COMMAND) \NSGC.COLLECT.DIRECTORIES ( +\NSFILING.CLOSE.BULKSTREAM) COPYHASHFILE (COPYHASHITEM) DCHCON (ADDTOSCRATCHLIST FRPLACA FRPLACD CONS) + \DSKOpenDevice (SI::MONITOR-UNWIND) PUTDEFN (\RESETSTACK) CLEARCLISPARRAY (MEMB PUTHASH GETPROP) +RESOLVE-UNINTERN-CONFLICT (CL:STRING<) SETHASHSTATUS (HASHBEFORECLOSE) \BULK.DATA.CLOSE (FUNCTION +\COURIER.EOF SPP.CLOSE ERROR!) %%MAKE-CML-TYPE-TABLE (ARRAY-TABLE-ENTRY-CML-TYPE LIST) \LFOpenDevice ( +SI::MONITOR-UNWIND) \UFSCreateDevice (\UFSEventFn) ICMLARRAY.DOWINDOWCOMFN (ICMLARRAY.GETREGIONFN) +CL:COMPILE-FILE (STREAMP CL:CLOSE FASL:CLOSE-FASL-HANDLE) DUNPACK (ADDTOSCRATCHLIST FRPLACA FRPLACD +CONS FCHARACTER) \UFSOpenDevice (SI::MONITOR-UNWIND) BSPFORCEOUTPUT (SI::MONITOR-UNWIND) EXPRCHECK ( +GETD) CL::BASE-SUBTYPEP (EQ) \DOHELPINTERRUPT (\DOHELPINTERRUPT1) \FAULTINIT (\KEYHANDLER \DOMISCAPPLY +) \UFSEventFn (SI::MONITOR-UNWIND \UFS.UNREGISTER.GFS) \NSPRINT.FULL.REQUEST.STATUS (\SPP.RESETCLOSE) +COURIER.OPEN (\SPP.CLOSE.IF.ERROR \COURIER.EOF) COMPILER::ALPHA-LABELS (COMPILER::MAKE-VARIABLE +CL:SYMBOL-NAME COMPILER::ENV-BIND-FUNCTION) TWODINSPECT.COPYBUTTONFN (CL:FUNCALL WINDOWPROP +INSPECT.FLIPSELECTION) BRECOMPILE (BRECOMPILE) CL:FIND-ALL-SYMBOLS (CL:MULTIPLE-VALUE-BIND +CL:MULTIPLE-VALUE-LIST CL:MULTIPLE-VALUE-CALL LIST CL:FIND-SYMBOL) LOOKUP-ENVIRONMENT-AND-FILEMAP ( +STRPOS STRING-EQUAL ROOTFILENAME IGREATERP FILENAMEFIELD) CL::ESTABLISH-ACCESSORS (CL::PSLOT-ACCESSOR +CL::PS-EXPORT) WHO-LINE-CURRENT-DIRECTORY (STRING-EQUAL UALPHORDER) EDITADDLINK (ADD/AND/DISPLAY/LINK) + PROCESS.STATUS.WINDOW (\PSW.SELECTED \PSWOP.SELECTED) \UFSOpenFile (SI::MONITOR-UNWIND \EOSERROR +\DEVICEFILE.EOSERROR) SI::DESCRIBE-USING-DESCRIBERS (CL:CONSP CL:STRINGP CL:FIRST CL:FUNCALL) +MBUTTON.INIT (MB.DISPLAY MB.SIZEFN MB.PUTFN MB.GETFN MB.BUTTONEVENTINFN MB.WHENOPERATEDFN) +\D01.FAULTINIT (\M44ACTONVMEMFILE) \UFSGenerateFiles (SI::MONITOR-UNWIND) CL:LOAD (CL:CLOSE) +CHAT.ENDOFSTREAMOP (\EOSERROR) \DOVE.FAULTINIT (\DOVE.ACTONVMEMFILE) \UFSSetFileInfo (SI::MONITOR-UNWIND +) TRYNEXT (TRYNEXT) MASTERSCOPE1 (MASTERSCOPEXEC MASTERSCOPE1) \DL.FAULTINIT (\DL.ACTONVMEMFILE) +\8DISPLAYINIT (\DSPFONT.DISPLAY \DSPLEFTMARGIN.DISPLAY \DSPRIGHTMARGIN.DISPLAY \DSPLINEFEED.DISPLAY +\DSPXPOSITION.DISPLAY \DSPYPOSITION.DISPLAY NILL \DRAWCURVE.BIGBM \FILLCIRCLE.BIGBM \DRAWLINE.DISPLAY +\DRAWELLIPSE.BIGBM \DRAWCIRCLE.BIGBM \BITBLT.DISPLAY \BLTSHADE.DISPLAY \NEWPAGE.DISPLAY +\DSPSPACEFACTOR.DISPLAY \DSPCOLOR.DISPLAY \DSPBACKCOLOR.DISPLAY \DSPOPERATION.DISPLAY +\STRINGWIDTH.DISPLAY \CHARWIDTH.DISPLAY \DSPCLIPPINGREGION.DISPLAY \DSPRESET.DISPLAY \DRAWARC.DISPLAY +\DRAWPOLYGON.DISPLAY \DRAWPOINT.DISPLAY \MEDW.BLTCHAR \MEDW.XOFFSET \MEDW.YOFFSET \ILLEGAL.DEVICEOP +\GENERATENOFILES \DSPPRINTCHAR \PAGEDBACKFILEPTR \NONPAGEDBOUTS) ERROR! (\MAKE.PROCESS0) DASSEM.DASSEM + (IGREATERP DASSEM.ASMAJ) \FM.MOMENTARY-SETUP (\FM.MOMENTARY-SELECTEDFN) OPENPOSTSCRIPTSTREAM (BOUT +SI::RESETUNWIND SELECTC STRING-EQUAL \POSTSCRIPT.OUTCHARFN) \COPYCODEBLOCK (\ADDREF OPCODES) +MASTERSCOPEXEC (MASTERSCOPE1) CH.ADD.GROUP.PROPERTY (COURIER.WRITE.BULKDATA) ADDMENU (MENUBUTTONFN +MENUREPAINTFN BACKGROUNDWHENSELECTEDFN SCROLLBYREPAINTFN) COPYALL (PUTHASH COPYALL) FB.DELVERCOMMAND ( +NULL.VERSIONP FB.DECREASING.VERSION FB.NAMES.DECREASING.VERSION) \PACK.ITEM (IGREATERP LISPERROR +\PNAMESTRINGPUTCHAR \PUTBASECHAR DECLARE \PUTBASEFAT \PUTBASE \PUTBASETHIN \PUTBASEBYTE SUB1 PLUS) +\NSFILING.COPYFILE (\NSFILING.OPENFILE) \FTP.CLEANUP (PROCESS.EVALV) CHAT.STARTUP (UALPHORDER +CHAT.TTYENTRYFN) \3MB.CREATENDB (\3MBSENDPACKET \3MBENCAPSULATE \3MB.BROADCASTP NILL) \UFSGetFileInfo +(SI::MONITOR-UNWIND) \BSPINIT (BSP CLOSEBSPSTREAM NILL \IS.NOT.RANDACCESSP \GENERATENOFILES +\BSPEVENTFN \BUFFERED.BIN \BUFFERED.BOUT BSPREADP BSPEOFP \BUFFERED.PEEKBIN \BSP.GETFILEPTR +\BSP.SETFILEPTR \BSPBACKFILEPTR \BUFFERED.BINS \BSPWRITEBLOCK \BSP.GETNEXTBUFFER BSPFORCEOUTPUT +\ILLEGAL.DEVICEOP) BKSYSBUF (BKSYSCHARCODE) \MAIKO.ETHER-INTERRUPT (SI::MONITOR-UNWIND) EQUALHASH ( +LITATOM EQUALALL GETHASH RETFROM CONS SOME EQUALHASH) \FM.EDIT-PREPARETOEDIT (NILL) +GC-FILING-DIRECTORY (\NSFILING.OPENFILE FILING.CALL \FILING.ATTRIBUTE.TYPE.SEQUENCE SELECTQ SHOULDNT +PRINTOUT PRIN1 SUBSTRING \NSFILING.FULLNAME SPACES ASKUSER TERPRI PLUS DREMOVE) \FILEMAP-HASHOVERFLOW +(FASSOC CONS LIST FRPLACD FILENAMEFIELD) SEDIT:REPLACE-SELECTION (SEDIT::PARSE-NEW) +FB.CANONICAL.DIRECTORY (TTY.PROCESS TTYDISPLAYSTREAM WINDOWPROP) WALK-FORM (DECLARE) +CL::DEFINE-ACCESSORS (CL::PSLOT-ACCESSOR CL::PS-EXPORT) \DUMMYKEYHANDLER (\CAUSEINTERRUPT) +FB.SORTCOMMAND (FB.INCREASING.NUMERIC.ATTR FB.DECREASING.NUMERIC.ATTR FB.NAMES.INCREASING.VERSION +FB.NAMES.DECREASING.VERSION FB.ALPHABETIC.ATTR FB.IS.NOT.SUBDIRECTORY.ITEM CAR) MSCANT (MSTRYPARSE) +TRAPMAKE (PATH.LESSP) \PFTransferPage (\DLDISK.EXECUTE) XCL::%%DEFINE-TYPE-FILE-DEFINITIONS ( +XCL::%%DEFINE-TYPE-GETDEF CL:ERROR) \UFSDeleteFile (SI::MONITOR-UNWIND) \LFRenameFile ( +SI::MONITOR-UNWIND) FLUSHFILEMAPS (STRING-EQUAL REMHASH) PLAYTUNE (BEEPOFF) \MAIKO.FAULTINIT (NILL) +DINFO.SHOWGRAPH (DINFO.UPDATE.FROM.GRAPH) FONTSAVAILABLE (NILL) \CORE.GENERATEFILES (\CORE.NEXTFILEFN +\CORE.FILEINFOFN) TTYINENTRYFN (DOWINDOWCOM) GETSYNTAX (DECLARE CONS) LISPDIRECTORYP (SI::MONITOR-UNWIND +) \MEDW.SHRINKW (CLOSEMAINWINDOW ICONBUTTONEVENTFN CLOSEICONWINDOW \NOTENEWICONPOSITION +DOICONWINDOWCOM) \24DISPLAYINIT (\DSPFONT.DISPLAY \DSPLEFTMARGIN.DISPLAY \DSPRIGHTMARGIN.DISPLAY +\DSPLINEFEED.DISPLAY \DSPXPOSITION.DISPLAY \DSPYPOSITION.DISPLAY NILL \DRAWCURVE.DISPLAY +\DRAWLINE.DISPLAY \DRAWELLIPSE.DISPLAY \DRAWCIRCLE.DISPLAY \BITBLT.DISPLAY \BLTSHADE.DISPLAY +\NEWPAGE.DISPLAY \DSPSPACEFACTOR.DISPLAY \DSPCOLOR.DISPLAY \DSPBACKCOLOR.DISPLAY \DSPOPERATION.DISPLAY + \STRINGWIDTH.DISPLAY \CHARWIDTH.DISPLAY \DSPCLIPPINGREGION.DISPLAY \DSPRESET.DISPLAY \DRAWARC.DISPLAY + \DRAWPOLYGON.DISPLAY \DRAWPOINT.DISPLAY \MEDW.BLTCHAR \MEDW.XOFFSET \MEDW.YOFFSET \ILLEGAL.DEVICEOP +\GENERATENOFILES \DSPPRINTCHAR \PAGEDBACKFILEPTR \NONPAGEDBOUTS) SEDIT::CREATE-ENVIRONMENTS ( +SEDIT::INPUT-NORMAL-CHAR) PAGEFULLFN (INVERTW) GAINSPACE (REMPROPLIST) TEDIT.SETFUNCTION (CHARCODE) +\INSPECTW.COMMAND.HANDLER (DEFAULT.INSPECTW.TITLECOMMANDFN) \UFSCloseDevice (SI::MONITOR-UNWIND) +READVARS-FROM-STREAM (SAVESET) CREATESCREEN (\MEDW.CREATEW \MEDW.OPENW \MEDW.CLOSEW \MEDW.MOVEW +\MEDW.RELMOVEW \MEDW.SHRINKW \MEDW.EXPANDW \MEDW.SHAPEW \MEDW.REDISPLAYW \MEDW.BURYW \MEDW.TOTOPW +\MEDW.DSPCREATE \MEDW.GETWINDOWPROP \MEDW.PUTWINDOWPROP \MEDW.CURSOR \MEDW.BBTTOWIN \MEDW.BBTFROMWIN +\MEDW.BBTWINWIN \MEDW.CARET.SHOW \MEDW.GETSCREENPOSITION \MEDW.GETBOXSCREENPOSITION +\MEDW.GETSCREENREGION) \FM.EDITSTART-SELECTEDFN (NILL \FM.NUMBER-CHANGESTATE) \NSFILING.HOSTNAMEP ( +\NSFILING.OPENFILE NILL \NSFILING.CLOSEFILE \NSFILING.GETFILEINFO \NSFILING.SETFILEINFO +\NSFILING.GETEOFPTR \NSFILING.DELETEFILE \NSFILING.GETFILENAME \NSFILING.DIRECTORYNAMEP +\NSFILING.GENERATEFILES \NSFILING.RENAMEFILE \NSFILING.EVENTFN \GENERIC.OPENP +BREAK.NSFILING.CONNECTION) \NSINIT (\HANDLE.RAW.XIP \HANDLE.RAW.10TO3) SEDIT::OUTLINE-SELECTION ( +SEDIT::DRAW-OUTLINE) THREESTATE.INIT (MB.THREESTATE.DISPLAY MB.SIZEFN MB.PUTFN MB.GETFN MB.COPYFN +MB.BUTTONEVENTINFN MB.THREESTATE.WHENOPERATEDFN) \FM.CREATEITEM (FONTCREATE NILL) COMPILE-IN-CORE ( +SI::RESETUNWIND) SI::CLEAR-CLOSURE-CACHE (\ADDREF OPCODES) SEDIT::CHARCODE (CHARCODE) PRETTYVAR1 ( +PRIN2) PRETTYCOM1 (SI::RESETUNWIND) \NSFILING.ERRORHANDLER (COURIER.EXECUTE.CALL \COURIER.RESULTS +ERROR! \NSFILING.ERRORHANDLER) MAKEDEFLIST (CDDR) XCL::SHOW-CLOSURE-CACHE (CL:FORMAT CL:TERPRI) +CL::%%DO-TRANSLATE (CL:CONSP LIST) DO?CMD.ERRORHANDLER (DO?CMD) FB.MAKE.BROWSER.BUSY ( +FB.FINISH.COMMAND) \FDEVINSTANCE (FDEVOP SPREADAPPLY*) \UFS.OPENP (STRING-EQUAL STREQUAL) +REMOVEPROMPTWINDOW (\PROMPTWINDOW.OPENFN) BRKDWNCOMPILE2 (SI::RESETUNWIND) DWIMIFY (SI::RESETUNWIND) +\MAPPNAME.INTERNAL (\EOSERROR \STREAM.NOT.OPEN) \FM.EDITSTART-SETUP (\FM.EDITSTART-MESSAGE +\FM.EDITSTART-SELECTEDFN) \LFGetFileInfo (SI::MONITOR-UNWIND) \ROUTINGTABLE.INFOHOOK (PROCESSPROP +WINDOWPROP) TEDIT (SI::MONITOR-UNWIND) \MAKE.COURIER.REP.STREAM (\NONPAGEDBINS \NONPAGEDBOUTS +\COURIER.REP.BIN \COURIER.REP.BOUT \COURIER.EOF) \VAMInit (SI::MONITOR-UNWIND) TEDIT.GETFUNCTION ( +CHARCODE) GATHEREXPORTS (CLOSE-AND-MAYBE-DELETE) /PRINTLEVEL (/PRINTLEVEL) \NSFILING.GENERATEFILES ( +\NSFILING.NEXTFILE \NSFILING.FILEINFOFN \NSFILING.CLOSE.BULKSTREAM) \REMOVE-DECLS (CL:WHEN CL:CONSP +CL:WARN CL:MAPC CL:FUNCTION) EDITBM (EDITBMSCROLLFN EDITBMRESHAPEFN EDITBMREPAINTFN EDITBMBUTTONFN +EDITBMCLOSEFN EDITBM) \NSFILING.COPY/RENAME (FREPLACEFIELD PLUS FFETCHFIELD \BULK.DATA.CLOSE +\NSFILING.RELEASE.BULKSTREAM) UNMAKEHARDCOPYSTREAM (\DSPPRINTCHAR) \LFGetFileName (SI::MONITOR-UNWIND) + RIGHTW.BUTTONEVENTFN (INSPECT.INVERTREGION) COMPILER::RELEASE-PROGN (COMPILER::RELEASE-TREE) +COMP.NUMERIC (FIX) OPENRTPSOCKET (\RTP.HANDLE.INPUT RELEASE.PUP) PRINTROUTINGTABLE (<) BREAK (BREAK0) +SPELLFILE (SPELLFILEDIR RETFROM FIXSPELL) TWODINSPECT.DOWINDOWCOMFN (ICMLARRAY.GETREGIONFN) +CHANGE-TTY-PROCESS-INTERACTIVELY (ALPHORDER) \UFS.DIRECTORY.NAME (SI::MONITOR-UNWIND +\DSKDirectoryNameP-C \UFSDirectoryNameP-C SHOULDNT) SEDIT::BUILD-WINDOW (SEDIT::BUTTONEVENTFN +SEDIT::EXPANDREGIONFN SEDIT::CLOSEFN SEDIT::SHRINKFN SEDIT::EXPANDFN SEDIT::RESHAPEFN SEDIT::REPAINTFN + SCROLLBYREPAINTFN) PREEDITFN (POSTEDITPROPS POSTEDITALISTS) PPSPP (SI::RESETUNWIND) +PACKAGE-HIERARCHY-INIT (CONVERT-LITATOM INTERN-LITATOM) COMPILER::GENCODE-CALL (COMPILER::VARIABLE-LAP-VAR +) NEWFAULT1 (FAULTAPPLY FAULTEVAL) \TEDIT.COPY.PIECEMAPFN (TEDIT.COPY) UNMAKEHARDCOPYMODESTREAM ( +\DSPPRINTCHAR) HASHFILESPLST1 (STRPOS PRODUCE) ICMLARRAY.DISPLAYSLICE (ZEROD.FETCHFN ZEROD.STOREFN +ICMLARRAY.VALUECOMMANDFN ICMLARRAY.TITLECOMMANDFN SLICEREF SLICESET) LEAF.ASSURE.FINISHED ( +SI::MONITOR-UNWIND) CHAT.RECONNECT (TOTOPW) HCOPYALL1 (PUTHASH HCOPYALL1) BAKTRACE (CL:FUNCALL) +EDITFERROR (EDITF) ATTACHWINDOW (ATTACHEDWINDOWTOTOPFN DOATTACHEDWINDOWCOM DETACHWINDOW) +\READDISPLAYFONTFILE (CLOSEF) SI::UNADVISE-FROM-RESTORE-CALLS (CL:CONSP CL:FIRST CL:THIRD) +PROPS.WHENCHANGED (MARKASCHANGED) CLISPATOM1 (CONCAT RETDWIM2 MKSTRING CONS) DBG::PRINT-BACKTRACE ( +CL:FUNCALL) MAKEHASH (MSREHASH) GETPROMPTWINDOW (\PROMPTWINDOW.PAGEFULLFN \PROMPTWINDOW.OPENFN) +\BSP.PREPARE.INPUT (SI::MONITOR-UNWIND) \NSFILING.RENAMEFILE (\NSFILING.OPENFILE) \TEDIT.READTABLE ( +GET.OBJ.FROM.USER) DOMAINWINDOWCOMFN (DOWINDOWCOM) \INITBCPLDISPLAY (\DSCCOUT) EDITGRAPH1 ( +REDISPLAYGRAPH SCROLLBYREPAINTFN) MAKEFILES (SI::RESETUNWIND) \VAMRecomputeFreePageCount ( +SI::MONITOR-UNWIND) PPT (SI::RESETUNWIND) SHOWGRAPH (REDISPLAYGRAPH SCROLLBYREPAINTFN HARDCOPYGRAPH +GRAPHEDITEVENTFN GRAPHERCOPYBUTTONEVENTFN APPLYTOSELECTEDNODE) SHOWDEF (CLOSEF?) DOWINDOWCOM (PPROMPT3 + CLRPROMPT) \VFMInit (SI::MONITOR-UNWIND) COMPILER::TEST-META-EVAL (COMPILER::RELEASE-TREE) +BKSYSBUF.GENERAL (SI::RESETUNWIND) \TEDIT.WINDOW.SETUP (\TEDIT.RESHAPEFN \TEDIT.NEWREGIONFN +\TEDIT.SCROLLFN \TEDIT.REPAINTFN TEDIT.DEFAULT.MENUFN TEDIT.DEACTIVATE.WINDOW \TEDIT.PROCIDLEFN +\TEDIT.SHRINK.ICONCREATE \TEDIT.SHRINKFN \TEDIT.EXPANDFN TEXTOBJ \TEDIT.PROMPT.PAGEFULLFN) SEDIT::SEDITL + (SEDIT::TTYFN) \CREATEDISPLAY (NILL \ILLEGAL.DEVICEOP \GENERATENOFILES \DSPPRINTCHAR +\PAGEDBACKFILEPTR \NONPAGEDBOUTS) \NSFILING.GET.STREAM (SPP.CLOSE DREMOVE RPLACD) \SHAPEW2 ( +RESHAPEBYREPAINTFN) CLEANUP (LISTFILES) D-ASSEM::STORE-DIGEST-INFO (< CDR) \NSFILING.DELETEFILE ( +\NSFILING.CONFLICTP \NSFILING.CHILDLESS-P FILING.CALL DREMOVE \NSFILING.FULLNAME) STOPNS ( +\HANDLE.RAW.XIP \HANDLE.RAW.10TO3) \LEAF.FLUSH.CACHE (SI::MONITOR-UNWIND) CHAT.DEACTIVATE.WINDOW ( +CHAT.RECONNECT) PURGEDSKDIRECTORY (SI::MONITOR-UNWIND) \SPP.HANDLE.INPUT (RELEASE.XIP) COMPILER::TEST-ALPHA + (COMPILER::RELEASE-TREE) MENUWINDOW (MENUWMINSIZEFN MENUWRESHAPEFN) ICMLARRAY.ATTACHDISPLAY ( +ICMLARRAY.DOWINDOWCOMFN) CL::BUILD-CONSTRUCTOR-SLOT-SETFS (CL::PSLOT-ACCESSOR) INSPECT/AS/BLOCKRECORD +(PROMPTPRINT) MAKEHARDCOPYSTREAM (\HDCPYDSPPRINTCHAR) COLLECTKEYS (CONS MKSTRING) EDITH (SI::RESETUNWIND +) DBG::%%RELEASE-STACK-DATUM (RELSTK) WINDOWWORLD (NILL) POLYSHADE.SCAN.IP (KNOTLINE) +\FM.NUMBER-SELECTEDFN (\FM.NUMBER-CHANGESTATE) \SETUPUSERSTACK (\CODEFORTFRAME) BSP.PUTINTERRUPT ( +SI::MONITOR-UNWIND) SEDIT::HIGHLIGHT-SELECTION (SEDIT::DRAW-HIGHLIGHT) +COMPILE-FILE-SETF-SYMBOL-FUNCTION (COMPILE-FILE-WALK-FUNCTION) PROCESSWORLD (\BACKGROUND.PROCESS +\MOUSE.PROCESS \TIMER.PROCESS PROCESSWORLD) \NSPRINT.WATCH.JOB (\NSPRINT.WATCHDOG) APPLYTOSELECTEDNODE + (MODERN-ORIG-APPLYTOSELECTEDNODE) \SETUP.DEFAULT.LINEBUF (\LINEBUF.READP NILL \LINEBUF.PEEKBIN +\CREATE.TTYDISPLAYSTREAM STREAMOP SPREADAPPLY*) FB.CLOSEFN (FB.CLOSE&EXPUNGE) \CREATECOREDEVICE ( +\CORE.CLOSEFILE NILL \CORE.DELETEFILE \CORE.GETFILEINFO \NODIRCORE.OPENFILE \CORE.OPENFILE +\ILLEGAL.DEVICEOP \CORE.SETFILEINFO \CORE.RELEASEPAGES \CORE.GETFILENAME \NULLFILEGENERATOR +\CORE.GENERATEFILES \CORE.DIRECTORYNAMEP \GENERIC.READP \BUFFERED.BIN \BUFFERED.BOUT \BUFFERED.PEEKBIN + \CORE.BACKFILEPTR \CORE.SETFILEPTR \PAGEDGETFILEPTR \PAGEDGETEOFPTR \CORE.SETEOFPTR \PAGEDEOFP +\BUFFERED.BINS \BUFFERED.BOUTS \CORE.GETNEXTBUFFER \GENERIC.OPENP \ADD-OPEN-STREAM +\GENERIC-UNREGISTER-STREAM) CHAT.PROMPT.FOR.INPUT (CLEARW NILL CLOSEW) BMOBJ.INIT (BMOBJ.DISPLAYFN +BMOBJ.IMAGEBOXFN BMOBJ.PUTFN BMOBJ.GETFN5 BMOBJ.COPYFN BMOBJ.BUTTONEVENTINFN NILL) SCANDEFINEQ ( +SCANFILE0) EDITPROP (EDITP) D-ASSEM::GENERATE-EASY-ENTRY (CL:FIRST) \TEDIT.APPLY.PARALOOKS (ILEQ) +\TEDIT.MENU.INIT (\TEDITMENU.RECORD.UNFORMATTED \TEDIT.APPLY.PARALOOKS \TEDIT.SHOW.PARALOOKS +\TEDIT.NEUTRALIZE.PARALOOKS.MENU \TEDIT.RECORD.TABLEADERS) MSPATHS (SI::RESETUNWIND MSREHASH) +SI::UNBREAK-FROM-RESTORE-CALLS (CL:CONSP CL:FIRST CL:SECOND) \NSFILING.COURIER.OPEN ( +\NSFILING.WHENCLOSED \NSFILING.ERRORHANDLER) UNMAKEMAINWINDOW (TOPATTACHEDWINDOWS CLOSEATTACHEDWINDOWS + OPENATTACHEDWINDOWS SHRINKATTACHEDWINDOWS EXPANDATTACHEDWINDOWS MOVEATTACHEDWINDOWS) +\NSFILING.SETFILEINFO (DECLARE \NSFILING.CONFLICTP FILING.CALL LIST \NSFILING.UPDATE.ATTRIBUTES) +FTPDEBUG (WINDOWPROP) \INIT.KEYBOARD.STREAM (NILL \KEYBOARDEVENTFN \GETKEY \PEEKSYSBUF \SYSBUFP) +ONEDINSPECTW.CREATE (ONEDINSPECT.RESHAPEFN RIGHTW.RESHAPEFN TITLEW.REPAINTFN) \LFSetFileInfo ( +SI::MONITOR-UNWIND) ED (GET) EDITCOM (BREAK1) FB.DELETECOMMAND (FB.DELETE.FILE) +\COURIER.EXPEDITED.OVERFLOW (\COURIER.EXPEDITED.ARGS) SHAPEW1 (RESHAPEBYREPAINTFN) EDRPT ( +SI::RESETUNWIND) \NSFILING.GETFILEINFO (\NSFILING.GET.ATTRIBUTES) INSPECT/AS/RECORD (PROMPTPRINT) +DBG::MAKE-FRAME-INSPECT-WINDOW (DBG::%%RELEASE-STACK-DATUM WINDOWPROP) XCL::MAKE-PROTOTYPE (EQ) +\CREATELINEBUFFER (CL:FUNCALL) \TEDIT.BUTTONEVENTFN (MODERN-ORIG-\TEDIT.BUTTONEVENTFN) SEDIT::SEDITE ( +CL:FUNCALL CL:FUNCTION SEDIT::PROPS-COMPLETION NOTIFY.EVENT SEDIT::COMPLETION SEDIT::PROPLST-CHANGED +SEDIT::VAR-CHANGED SEDIT::FN-CHANGED) SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::PARSE-NEW) +POLYSHADE.BLT (KNOTLINE) XCL::PROTOTYPE-DEFN-TYPES (LIST) XCL::ADD-PROTOTYPE-FN (EQ) EDITCOMA (ERROR! +EDITL0) CLISPATOM2C (CONCAT RETDWIM2 SUBSTRING CONS) TB.FIND.ITEM (TB.ITEM.DELETED? TB.ITEM.SELECTED?) + CLISP4 (CLISPIFY) XCL::PROTOTYPE-DEFINERS-FOR-TYPE (CAR EQ) EDITCOML (RESETSAVE) EDITFNS (EDITF +EDITFNS) \POLYSHADE.BLT (MAKESCAN CRIT.LESSP SCAN.LESSP) COMPILER::RELEASE-MV-CALL (COMPILER::RELEASE-TREE +) UNSAVEFNS (SI::RESETUNWIND MSMARKCHANGED) GETCLEARINGHOUSE (SI::MONITOR-UNWIND +\CH.CHECK.CLEARINGHOUSE) PRETTYFILEINDEX (CLOSEF? \CORE.CLOSEFILE \GENERIC-UNREGISTER-STREAM +\CORE.DELETEFILE FULLNAME PFI.AFTER.NEW.PAGE) \TEDIT.INSPECTCODE (PRINTCODE TEXTICON) +SET-READTABLE-INTERACTIVELY (CONS LIST ALPHORDER) \COURIER.HANDLE.BULKDATA (\BULK.DATA.CLOSE) +EVALUABLE.CONSTANTP (EVALUABLE.CONSTANTP) FB.COPY/RENAME.MANY (FB.INCREASING.VERSION +FB.NAMES.INCREASING.VERSION) \VFMDeletePageGroup (SI::MONITOR-UNWIND) \FM.LAYOUTGRID (FONTCREATE) +POSTSCRIPT.PUTCOMMAND (SELECTC) COMP.LABELS (TRANSFORM) *DEFINITION-HASH-TABLE* (EQ) PFI.SORT.INDICES +(< - > LENGTH) \VARNOTUSED (\VARNOTUSED) SCROLLW (SCROLLBYREPAINTFN) MAPRELATION (SOME TESTTABLE +APPLY* MAPC GETRELATION) COMPILER::ALPHA-EVAL-WHEN (EQ) COMPILER::RELEASE-MV-PROG1 (COMPILER::RELEASE-TREE +) SPELLFILE.SPELL1 (SPELLFILE1) \UFS.NEXTFILEFN (\UFS.UNREGISTER.GFS) MSCHECKBOUNDFREE (MSREHASH) +\SETTYPEMASK (\PUTBASE FOLDLO LRSH LOGOR \GETBASE) GET-TWOD-DISPLAYW (TWODINSPECT.REPAINTFN CLEARW +TWODINSPECT.SCROLLFN TWODINSPECT.BUTTONEVENTFN TWODINSPECT.COPYBUTTONFN TWODINSPECT.CLOSEFN +TWODINSPECT.DEFAULT.VALUECOMMANDFN TWODINSPECT.DEFAULT.TITLECOMMANDFN) \UFS.FILEINFOFN (> +\UFS.UNREGISTER.GFS) SEDIT::SET-PROPS (NULL) \VAMFreePageGroup (SI::MONITOR-UNWIND) INSPECT/ALIST ( +ASSOCGET /ASSOCPUT) FB.COMPILECOMMAND (FB.OPERATE.ON.FILES) SEDIT::VERIFY-STRUCTURE (SI::MONITOR-UNWIND +) SCANCOMPILEDFN (SCANFILE0) OPENP (EVQ) \TTY.CREATING.DISPLAYSTREAM (\CREATE.TTY.OUTCHARFN) PEEKC ( +\PEEKREFILL) \LFExtendFileIfNecessary (SI::MONITOR-UNWIND) TWODINSPECTW.CREATE (TWODINSPECT.RESHAPEFN +TOPW.RESHAPEFN RIGHTW.RESHAPEFN TITLEW.REPAINTFN) DEBUGGER (EVAL-INPUT) CLISPFOR (SI::RESETUNWIND) +TEDIT.MINIMAL.WINDOW.SETUP (TEDIT.CURSORMOVEDFN TEDIT.CURSOROUTFN) PEEKCCODE (\PEEKREFILL) PFCOPYBYTES + (DSPFONT) PARSERELATION1 (LDIFFERENCE INTERSECTION UNION) CL::BUILD-CONSTRUCTOR-ARGLIST ( +CL::PSLOT-INITIAL-VALUE CL::PSLOT-NAME CL::PSLOT-ACCESSOR) \INIT.RTPPROCESS (\RTP.SOCKET.PROCESS) +CLIPBOARD-PASTE-STREAM (RETFROM READCCODE) GO (\PROG0) \HDCPYDISPLAYINIT (\DSPFONT.HDCPYDISPLAY +\DSPRIGHTMARGIN.HDCPYDISPLAY \DSPXPOSITION.HDCPYDISPLAY \DSPYPOSITION.HDCPYDISPLAY +\STRINGWIDTH.HDCPYDISPLAY \CHARWIDTH.HDCPYDISPLAY) ARGS.COMMUTABLEP (ARGS.COMMUTABLEP) +\POLYSHADE.YSCAN.IP (MAKESCAN CRIT.LESSP SCAN.LESSP) POSTSCRIPT.PUTBITMAPBYTES (SELECTC) +\LFCloseDevice (SI::MONITOR-UNWIND) CLISP3C (SI::RESETUNWIND) AS.MAKE.CONVERSATION (\SPP.RESETCLOSE) +HPINITRDTBL (HVFWDREAD HVFWDCDREAD HVBAKREAD) CL::STRUCTURE-POINTER-SLOTS (CL::PSLOT-FIELD-DESCRIPTOR) + CHECKCONSPAGES (\CHECKCONSPAGE) RATOM (\RATOM/RSTRING-REFILL) MAKEUSERMACROSCOMS (CAR) +CONVERT.FILE.TO.TYPE.FOR.PRINTER (CLOSEF? DELFILE) GET-TOPW (TOPW.REPAINTFN CLEARW TOPW.BUTTONEVENTFN +SCROLLBYREPAINTFN) \READACFONTFILE (CLOSEF?) SEDIT::COPY-HASH-TABLE (CL:GETHASH) \INFER.FILE.TYPE ( +NILL) ASSURE.PUP.READY (SI::MONITOR-UNWIND \HANDLE.RAW.PUP \HANDLE.RAW.3TO10) +ONEDINSPECT.BUTTONEVENTFN (CL:FUNCALL WINDOWPROP INSPECT.INVERTREGION) SORT.PUPHOSTS.BY.DISTANCE ( +\PUPNET.CLOSERP) PF* (SI::RESETUNWIND PF) COMP.EVQ (SI::RESETUNWIND) ADD-USER-SUBR (CL:SECOND) RETURN +(\PROG0) GET-CORNERW (CLEARW) SPY.BUTTON (LASTMOUSESTATE ZEROP LOGAND SPY.TOGGLE) ONEDINSPECT.SCROLLFN + (SCROLLBYREPAINTFN) CREATESCROLLINGW (SCROLLBYREPAINTFN) COMPILER::EXPAND-OPENLAMBDA-CALL (CL:CONSTANTP + CL:ATOM CL:SYMBOLP CL:CONSP CL:MEMBER) ONEDINSPECT.COPYBUTTONFN (CL:FUNCALL WINDOWPROP +INSPECT.FLIPSELECTION) RESETOPENFILES (MAPC CLOSEF?) BUTTONPANEL (BUTTONPANEL/SELECTION/FN PPROMPT2) +MakeMenuOfPrinters (PRINTERS.WHENSELECTEDFN) \TOP-LEVEL-READ (\READREFILL RETFROM \TOP-LEVEL-READ) +\KEYHANDLER1 (\PERIODIC.INTERRUPTFRAME \DOBUFFEREDTRANSITIONS \INTERRUPTFRAME \TIMER.INTERRUPTFRAME) +MAKEHARDCOPYMODESTREAM (\HCPYMODEDSPPRINTCHAR) \UNWIND.PROCESS (\MAKE.PROCESS0) FASL::SETESCAPE ( +FASL::FASL-EXTENDED) MAKE-FILL-POINTER-OUTPUT-STREAM (\ADJUSTABLE-STRING-STREAM-OUTCHARFN +\STRING-STREAM-OUTCHARFN \OUTCHAR) READC (\READCREFILL) TITLEDICONW (\ICONW.COPYBUTTONEVENTFN) +\LFGenerateFiles (SI::MONITOR-UNWIND \LFReturnNextFile \LFReturnInfo) \FM.LAYOUTCOLUMN (FONTCREATE) +DEL.PROCESS (\UNWIND.PROCESS) \LFOpenFile (SI::MONITOR-UNWIND) READCCODE (\READCREFILL) +\BASEBYTES.IO.INIT (NILL \GENERATENOFILES \BASEBYTES.NAME.FROM.STREAM \BASEBYTES.OPENFN +\ILLEGAL.DEVICEOP \BASEBYTES.BIN \BASEBYTES.BOUT \BASEBYTES.PEEKBIN \BASEBYTES.READP \PAGEDBACKFILEPTR + IDIFFERENCE \BASEBYTES.SETFILEPTR IGEQ \BASEBYTES.BLOCKIO) PROCESS.RETURN (\MAKE.PROCESS0) +COMPILER::ALPHA-COMBINATION (COMPILER::ALPHA-ARGUMENT-FORM COMPILER::ALPHA-LITERAL) FRPTQ (PROGN) +PURGEHISTORY (SI::RESETUNWIND) CLEARSTK (SELECTQ UNINTERRUPTABLY \DECUSECOUNT CONS IPLUS \ADDBASE) +MAKEFILE (LISTFILES) RPTQ (PROGN) MSSPLST (FMEMB CONS) POSTSCRIPT.SHOWACCUM (SELECTC) +WHITESPACE-CHAR-P (EQL) UNDOLISPX3 (SI::RESETUNWIND) TB.COLLECT.ITEMS (TB.ITEM.DELETED? +TB.ITEM.SELECTED?) \UFS.CLEANUP.GFS.TABLE (\UFS.UNREGISTER.GFS) MSCHECKBLOCKS (LOCALVARS SPECVARS +ADDTOVAR) \LFEventFn (SI::MONITOR-UNWIND NILL) GET-RIGHTW (RIGHTW.REPAINTFN CLEARW +RIGHTW.BUTTONEVENTFN) \TEXTMENU.TOGGLE.INIT (\TEXTMENU.TOGGLE.DISPLAY MB.SIZEFN MB.PUTFN MB.GETFN +MB.COPYFN MB.BUTTONEVENTINFN \TEXTMENU.TOGGLE.WHENOPERATEDFN) \TELERAIDBREAK (\DOHELPINTERRUPT1) +\VAMAllocPageGroup (SI::MONITOR-UNWIND) INSPECT/TOP/LEVEL/LIST (NTHTOPLEVELELT SETNTHTOPLEVELELT) +RESTART.PROCESS (RESTART.PROCESS \MAKE.PROCESS0) \GETFILINGCONNECTION (SI::MONITOR-UNWIND) +RECORDECLTAIL (PROGN) MSSHOWUSE (MSMEMBSET TAB PRIN2 PRIN1 CONS MSFIND FASSOC SPACES LVLPRINT OUTPUT +LVLPRIN2 MSEDITE) CLISPIF (SI::RESETUNWIND) \FM.LAYOUTROW (FONTCREATE) \NSFILING.OPEN.HANDLE ( +\NSRANDOM.RELEASE.IF.ERROR) \ETHERINIT (\ETHEREVENTFN) \OPENLEAFCONNECTION (SI::MONITOR-UNWIND +\LEAF.ACKED \LEAF.HANDLE.INPUT \LEAF.FIX.BROKEN.SEQUIN \LEAF.TIMEDOUT \LEAF.TIMEDIN \LEAF.WHENCLOSED +\LEAF.IDLE \LEAF.IDLE? \LEAF.OPENERRORHANDLER \SEQUIN.CLOSE) I.S.OPR (MEMB /PUTHASH) FB.LOADCOMMAND ( +FB.OPERATE.ON.FILES LOAD) SELECT (PROGN) CLISPIFYFNS (CLISPIFYFNS) EDITDELETELINK ( +DELETE/AND/DISPLAY/LINK) SELECTC (PROGN) MULTIFILEINDEX (MULTIFILEINDEX1) \RESETSTACK0 (\FAULTHANDLER +\DOHARDRETURN \DOTELERAID \DUMMYTELERAID \KEYHANDLER \DOGC \DOSTACKOVERFLOW \DOMISCAPPLY) +\MAKEBASEBYTESTREAM (\MBS.OUTCHARFN) SUBRNUMBER (STRING.EQUAL) DISPTREE (INSPECT) CLOSERTPSOCKET ( +SI::MONITOR-UNWIND) CL::%%MAKE-RANDOM-ARRAY (LOGAND LOGXOR + CL:*) \SPPWATCHER (\SPP.CLEANUP +\SPP.INFO.HOOK SI::MONITOR-UNWIND) \NSRANDOM.CREATE.STREAM (\NSRANDOM.RELEASE.IF.ERROR) +INITIALIZE-NEW-SHELL-DEVICE (UNIX-PTY-NEW \BUFFERED.BIN UNIX-STREAM-OUT \BUFFERED.PEEKBIN +UNIX-STREAM-CLOSE NILL UNIX-STREAM-EOFP-NEW UNIX-BACKFILEPTR-NEW UNIX-GET-NEXT-BUFFER \BUFFERED.BINS) +INSPECT/PLIST (LISTGET /LISTPUT) LISPX (SI::RESETUNWIND) OPENSTRINGSTREAM (\STRINGBIN) MSPRGDWIM ( +SI::RESETUNWIND) DMCHAT.HANDLECHARACTER (DMCHAT.HANDLE.WRAP) \NSRANDOM.READ.SEGMENT (>= \BINS - > +\CLEARBYTES PLUS GREATERP RPLACA HELP EOFP COURIER.ABORT.BULKDATA) \LFDirectoryNameP (SI::MONITOR-UNWIND +) SET-PACKAGE-INTERACTIVELY (ALPHORDER) \PUPGATELISTENER (\ROUTINGTABLE.INFOHOOK) +FW-CREATE-OFD-WINDOWS (FW-BUTTONEVENTFN FW-REPAINTFN NILL FW-CLOSEFN FW-AFTERMOVEFN) MSNOTICEFILE ( +SI::RESETUNWIND) TWODINSPECT.SCROLLFN (SCROLLBYREPAINTFN) NCHARS (PLUS) \FM.NWAY-SETUP ( +\FM.NWAY-MESSAGE \FM.NWAY-DOWNFN \FM.NWAY-MOVEDFN \FM.NWAY-SELECTEDFN) \CAUSEINTERRUPT ( +\INTERRUPTFRAME) FB.RENAMECOMMAND (RENAMEFILE) COURIERTRACE (LASTMOUSESTATE ZEROP LOGAND +\CHANGE.ETHER.TRACING WINDOWPROP) CREATEDSKDIRECTORY (SI::MONITOR-UNWIND) CALLS (SI::RESETUNWIND) +CHDIR (SI::MONITOR-UNWIND) ADVISEWDS (PAGEHEIGHT) SI::CREATE-CONDITION-CASE-LITERALS (CL:THROW) +\STRINGSTREAM.INIT (NILL \NULLFILEGENERATOR \ILLEGAL.DEVICEOP GNCCODE \EOF.ACTION CHCON1 EOFP NCHARS) +CL::ARGUMENT-NAMES (CL:CONSP LIST CL:MEMBER) LISPXTYPEAHEAD (LISPXTYPEAHEAD) INTERRUPTED ( +\DOINTERRUPTHERE) \NSPRINT.ENQUIRE (\SPP.RESETCLOSE COURIER.CALL) \POLYSHADE.XSCAN.IP (CRIT.LESSP +SCAN.LESSP) FB.COPYCOMMAND (COPYFILE) MAKE-UNICODE-FORMATS (UTF16BE.INCCODEFN UTF16BE.PEEKCCODEFN +\UTF16.BACKCHARFN UTF16BE.OUTCHARFN UTF8.INCCODEFN UTF8.PEEKCCODEFN \UTF8.BACKCHARFN UTF8.OUTCHARFN) +POSTSCRIPT.INIT (SETFONTDESCRIPTOR CLOSEPOSTSCRIPTSTREAM \DSPXPOSITION.PSC \DSPYPOSITION.PSC +\MOVETO.PSC \DSPFONT.PSC \DSPLEFTMARGIN.PSC \DSPRIGHTMARGIN.PSC \DSPLINEFEED.PSC \DRAWLINE.PSC +\DRAWCURVE.PSC \DRAWCIRCLE.PSC \DRAWELLIPSE.PSC \FILLCIRCLE.PSC \BLTSHADE.PSC \BITBLT.PSC +\SCALEDBITBLT.PSC \NEWPAGE.PSC \DSPSCALE.PSC \DSPSCALE2.PSC \DSPCOLOR.PSC \TERPRI.PSC +\DSPTOPMARGIN.PSC \DSPBOTTOMMARGIN.PSC \DSPSPACEFACTOR.PSC \DSPCLIPPINGREGION.PSC \DSPRESET.PSC +\DRAWPOLYGON.PSC \FILLPOLYGON.PSC \STRINGWIDTH.PSC \CHARWIDTH.PSC \DRAWARC.PSC \DSPROTATE.PSC +\DSPTRANSLATE.PSC \DRAWPOINT.PSC \DSPPUSHSTATE.PSC \DSPPOPSTATE.PSC) COPYVM (SI::RESETUNWIND) +\VFMMerge (\VFMMerge1) ICMLARRAY.TITLECOMMANDFN (MODERN-ORIG-ICMLARRAY.TITLECOMMANDFN) +\VFMInsertPageGroup (SI::MONITOR-UNWIND) \NSFILING.LOGIN (SPP.CLOSE \NSRANDOM.OPENFILE NILL +\NSRANDOM.CLOSEFILE \NSFILING.GETFILEINFO \NSFILING.SETFILEINFO \NSRANDOM.READPAGES +\NSRANDOM.WRITEPAGES \NSRANDOM.TRUNCATEFILE \NSRANDOM.SETEOFPTR) TEDIT.COPY (\TEDIT.COPY.PIECEMAPFN) +\MAKE.PROCESS0 (\PROCESS.MOVEFRAME) \ATBLSET (STRING-EQUAL-HASHBITS STRING-EQUAL) \MAPCHARS ( +SPREADAPPLY*) BREAK1 (RELSTK) RETRYSCAN (LOADFNSCAN) PFI.SETUP.TRANSLATIONS (PFI.OUTCHARFN) +\VFMGenerateFileIDs (SI::MONITOR-UNWIND) \FTP.OPEN.CONNECTION (\FTP.ERRORHANDLER \FTP.WHENCLOSED) +RESETFORM (SI::RESETUNWIND) \INTERPRESSINIT (\CLOSEIPSTREAM \DSPXPOSITION.IP \DSPYPOSITION.IP +\DSPFONT.IP \DSPLEFTMARGIN.IP \DSPRIGHTMARGIN.IP \DSPLINEFEED.IP \DRAWLINE.IP \DRAWCURVE.IP +\DRAWCIRCLE.GENERIC \DRAWELLIPSE.GENERIC CIRCSHADE.IP \BLTSHADE.IP \BITBLT.IP NEWPAGE.IP \MOVETO.IP +CONSTANT FQUOTIENT NEWLINE.IP \DSPBOTTOMMARGIN.IP \DSPTOPMARGIN.IP \DSPSPACEFACTOR.IP \DSPCOLOR.IP +\STRINGWIDTH.IP \CHARWIDTH.IP \SCALEDBITBLT.IP \DSPCLIPPINGREGION.IP POLYSHADE.IP \DRAWARC.IP +\PUSHSTATE.IP \POPSTATE.IP \DSPROTATE.IP \DSPSCALE2.IP \DSPTRANSLATE.IP \DEFAULTSTATE.IP +\DSPOPERATION.IP \BITMAPSIZE.IP \DRAWPOLYGON.IP \DRAWPOINT.IP) COMPILER::TEST-ANALYSIS (COMPILER::RELEASE-TREE +) \LFCloseFile (SI::MONITOR-UNWIND) TEDIT.WINDOW.SETUP (\TEDIT.BUTTONEVENTFN TEDIT.HARDCOPYFN) +HVBAKREAD (HASHARRAY) RESETVARS (SI::RESETUNWIND PROG) \LFSortFiles (SELECTQ UALPHORDER LESSP) +SCAVENGEDSKDIRECTORY (SI::MONITOR-UNWIND) CL::DEFINE-CONSTRUCTORS (CL::BOA-CONSTRUCTOR-P +CL::DEFINE-BOA-CONSTRUCTOR) LISPXFIND (SI::RESETUNWIND) \SETACCESS (\STREAM.NOT.OPEN) \FORMATLINE ( +\TEDIT.LOOKS.UPDATE) \ITEM.WINDOW.BUTTON.HANDLER (MODERN-ORIG-\ITEM.WINDOW.BUTTON.HANDLER) +\FTP.GENERATEFILES (\FTP.NEXTFILE \FTP.FILEINFOFN NILL CLOSEBSPSTREAM) \SPP.CREATE.STREAMS ( +\SPP.OTHER.BOUT) \LEAF.FIX.BROKEN.SEQUIN (EXPANDING-PAGEFULLFN) \PFI.DO.HARDCOPY (SI::MONITOR-UNWIND) +SELECTQ (PROGN) COMPILER::GENCODE-LET (COMPILER::MAKE-LAP-VAR) \HCPYMODEDISPLAYINIT (\DSPFONT.HCPYMODE + \DSPRIGHTMARGIN.HCPYMODE \DSPLEFTMARGIN.HCPYMODE \DSPLINEFEED.HCPYMODE \DRAWLINE.HCPYMODE +\DRAWCURVE.HCPYMODE \DRAWCIRCLE.HCPYMODE \DRAWELLIPSE.HCPYMODE \FILLCIRCLE.HCPYMODE \BLTSHADE.HCPYMODE + \BITBLT.HCPYMODE \DSPXPOSITION.HCPYMODE \DSPYPOSITION.HCPYMODE \MOVETO.HCPYMODE \STRINGWIDTH.HCPYMODE + \CHARWIDTH.HCPYMODE PRESSDISPLAY CONSTANT FQUOTIENT WFROMDS WINDOWPROP APPLY* PAGEFULLFN CLEARW +\DSPSPACEFACTOR.HCPYMODE INTERPRESSDISPLAY) RESETVAR (SI::RESETUNWIND) XCL::WHERE-IS-FILES ( +CL:PROBE-FILE LIST) ENCAPSULATEDIMAGEFNS (ENCAPSULATEDOBJ.DISPLAYFN ENCAPSULATEDOBJ.IMAGEBOXFN +ENCAPSULATEDOBJ.PUTFN NIL ENCAPSULATEDOBJ.BUTTONEVENTINFN NILL) INSPECTW.CREATE ( +\ITEM.WINDOW.BUTTON.HANDLER \ITEM.WINDOW.COPY.HANDLER INSPECTW.REPAINTFN SCROLLBYREPAINTFN) +\MENUSUBITEMS (DEFAULTSUBITEMFN) \STRINGWIDTH.HCPYDISPLAYAUX (PLUS CHARCODE \CHARSET LRSH +\FGETIMAGEWIDTH \GETBASE \CHAR8CODE LOGAND \GETCHARSETINFO \GETBASEPTR UNFOLD LLSH \CREATECHARSET) +CREATE.NUMBERPAD.READER (NUMBERPAD.HELDFN NUMBER.READER.HANDLER) %%INITIALIZE-CLSTREAM-TYPES (NILL +%%BROADCAST-STREAM-DEVICE-CLOSEFILE \GENERATENOFILES %%BROADCAST-STREAM-DEVICE-BOUT TRUE \GENERIC.BINS + %%BROADCAST-STREAM-DEVICE-FORCEOUTPUT %%BROADCAST-STREAM-DEVICE-CHARSETFN +%%CONCATENATED-STREAM-DEVICE-CLOSEFILE %%CONCATENATED-STREAM-DEVICE-BIN +%%CONCATENATED-STREAM-DEVICE-PEEKBIN \GENERIC.READP %%CONCATENATED-STREAM-DEVICE-BACKFILEPTR +%%CONCATENATED-STREAM-DEVICE-EOFP %%CONCATENATED-STREAM-DEVICE-CHARSETFN +%%TWO-WAY-STREAM-DEVICE-CLOSEFILE %%TWO-WAY-STREAM-DEVICE-BIN %%TWO-WAY-STREAM-DEVICE-BOUT +%%TWO-WAY-STREAM-DEVICE-PEEKBIN %%TWO-WAY-STREAM-DEVICE-READP %%TWO-WAY-STREAM-DEVICE-BACKFILEPTR +%%TWO-WAY-STREAM-DEVICE-EOFP \GENERIC.BOUTS %%TWO-WAY-STREAM-DEVICE-FORCEOUTPUT +%%TWO-WAY-STREAM-DEVICE-CHARSETFN %%TWO-WAY-STREAM-DEVICE-INPUTSTREAM +%%TWO-WAY-STREAM-DEVICE-OUTPUTSTREAM %%ECHO-STREAM-DEVICE-BIN %%SYNONYM-STREAM-DEVICE-CLOSEFILE +%%SYNONYM-STREAM-DEVICE-BIN %%SYNONYM-STREAM-DEVICE-BOUT %%SYNONYM-STREAM-DEVICE-PEEKBIN +%%SYNONYM-STREAM-DEVICE-READP %%SYNONYM-STREAM-DEVICE-BACKFILEPTR %%SYNONYM-STREAM-DEVICE-EOFP +%%SYNONYM-STREAM-DEVICE-FORCEOUTPUT %%SYNONYM-STREAM-DEVICE-GETFILEINFO +%%SYNONYM-STREAM-DEVICE-SETFILEINFO %%SYNONYM-STREAM-DEVICE-GET-INDIRECT-STREAM +%%SYNONYM-STREAM-DEVICE-CHARSETFN %%FILL-POINTER-STREAM-DEVICE-CLOSEFILE \ILLEGAL.DEVICEOP +%%FILL-POINTER-STREAM-DEVICE-GETFILEPTR) \LEAF.HANDLE.INPUT (\LEAF.ERROR) TB.BUTTONEVENTFN ( +MODERN-ORIG-TB.BUTTONEVENTFN) COMPILER::RELEASE-CALL (COMPILER::RELEASE-TREE) \DOSTACKFULLINTERRUPT ( +\CLEANUP.STACKFULL) \LEAFINIT (\LEAF.DEVICEP NILL \ILLEGAL.DEVICEOP) MSMARKCHANGE1 (MSMARKCHANGE1) +DMCHAT.STATE (DMCHAT.CLEARMODES) FONTCREATE (NILL) MARGINBAR.INIT (MB.MARGINBAR.DISPLAYFN +MB.MARGINBAR.SIZEFN MB.MARGINBAR.PUTFN MB.MARGINBAR.GETFN MB.COPYFN MB.MARGINBAR.SELFN) NIL +ERROR ONEDINSPECT.SELECTITEM (apply) FONTSAVAILABLE (apply) WINDOWREGION (apply) \APPLYREADMACRO ( +apply) MSMARKCHANGED (apply) DASSEM.DASSEM (apply) \MEDW.SHRINKW (apply) \INTERNAL/SETPASSWORD (apply) + UNDOLISPX2 (apply) INSPECTW.REPAINTFN (apply) \TEDIT.CARETLOOKS.VERIFY (apply) EDITTOGGLELABEL (apply +) SEDIT:REPLACE-SELECTION (apply) \TEDIT.COMMAND.LOOP (apply) \GCRECLAIMCELL (ppe) COROUTINE (stackfn) + \INSPECTW.COMMAND.HANDLER (apply) GETHASH (apply) \BITBLTSUB (ppe) LITATOM (ppe) COMP.EXPR (apply) +\PRINTFRAME (apply) ADDTO (apply) \DEVICE.OUTPUT (ppe) TITLEW.BUTTONEVENTFN (apply) COMP.MACRO (apply) + \PRINTBF (apply) \PROCESS.GO.TO.SLEEP (ppe) \FM.EDIT-ITEM (apply) GRAPHADDNODE (apply) +\FM.MENUHANDLER (apply) TTYINENTRYFN (apply) RECREDECLARE (apply) SORT1 (apply) MINIMUMMAINWINDOWSIZE +(apply) \NSFILING.ERRORHANDLER (stackfn) MERGE (apply) CL::%%DO-TRANSLATE (apply) \MAP-OPEN-STREAMS ( +apply) \TEDIT.HARDCOPY.FORMATLINE (apply) \FM.CREATEITEM (apply) MAKENEWCOM (apply) +PACKAGE-HIERARCHY-INIT (apply) \READREFILL (apply) XCL::WHERE-IS-DEFAULT-DEFINE-TYPES (apply) +\POP.N.UFN (ppe) NCREATE2 (ppe) COMPILE-FILE-EXPRESSION (apply) \BSP.HANDLE.ERROR (apply) +PRINTFILETYPE (apply) TTYIN.FINISH (apply) PRINTHISTORY1 (apply) \PARSEARRAYSPACE1 (apply) PRINTPUP ( +apply) COMP.NUMBERCALL (apply) MSTRYPARSE (apply) \SPP.CLEANUP (apply) \FM.DOSELECTION (apply) +CL::BUILD-COPIER-SLOT-SETFS (apply) CLISPFUNCTION? (apply) \ITEM.WINDOW.SELECTION.HANDLER (apply) +COMPILER::GENCODE-CALL (apply) TEDIT.MAPPIECES (apply) ESUBST1 (apply) +\TEDIT.COPYTEXTSTREAM.PIECEMAPFN (apply) WTFIX1 (apply) FW-SORT-FN (apply) GRAPHOBJ.COPYBUTTONEVENTFN +(apply) \REMOVE-DECLS (apply) \TEDIT.FIXCHANGEDLINE (apply) RECEVAL (apply) COMPILER::ENV-ANALYZE-VAR-REF + (ppe) \TEDIT.RESTARTFN (apply) TEDIT.PUT (apply) \INTERPRETER1 (ppe) \LINEWITHBRUSH (apply) +DINFO.TITLEMENUFN (apply) CLISPCAR/CDR2 (stackfn) CL::STRUCTURE-FUNCTION-P (apply) USERLISPXPRINT ( +apply) \SMASHLINK (ppe) CHANGE.NODEFONT.SIZE (apply) COMP.NUMERIC (apply) MAXIMUMMAINWINDOWSIZE (apply +) \PROCESS.APPLY1 (apply) PRINTROUTINGTABLE (apply) \STACKARGPTR (ppe) FQUOTIENT (ppe) MAP (apply) +COMPILE.FILE.APPLY (apply) PROCESS.APPLY (apply) APROPOS (apply) FDIFFERENCE (ppe) COMP.CLEANFNP ( +apply) TWODINSPECT.COLUMNWIDTH (apply) LOOKUP-SYMBOL (ppe) TB.USERDATA (ppe) PROMPTFORWORD (apply) +\INTERPRETER-LAMBDA (ppe) FGREATERP (ppe) CL:MERGE-PATHNAMES (ppe) TWODINSPECT.REPLACE (apply) +CONSTANTEXPRESSIONP (apply) READPRINTERPORT (ppe) FABS (ppe) ASKUSER (apply) \TEDIT.COPY.PIECEMAPFN ( +apply) \UPDATE.PROCESS.WINDOW (apply) CHAT.RECONNECT (apply) FAULTAPPLY (apply) +CL::GET-SHARED-SETF-METHOD (apply) EF (apply) ANTILOG (ppe) PRINTHISTORY (apply) COMPILER::RELEASE-PROGN + (apply) ATAN (ppe) \BLTCHAR (ppe) MAPDL (apply) \MEDW.MOVEW (apply) EDIT4E (apply) +SI::CLEAR-CLOSURE-CACHE (ppe) \STOPSCROLL? (apply) WRITEPRINTERPORT (ppe) DSPNEWPAGE (apply) +\USEREVENT (apply) TWODINSPECT.SELECTITEM (apply) \SETARG0 (ppe) EDITF2 (apply) \MAPCHARTABLE (apply) +D-ASSEM:ASSEMBLE-FUNCTION (apply) TEDIT.DEFAULT.MENUFN (apply) READHASHMACRO (apply) \DEVICE.INPUT ( +ppe) ONEDINSPECT.VALUEWIDTH (apply) \SPP.GETNEXTBUFFER (stackfn) D-ASSEM:INTERN-DCODE (ppe) +\DSPPRINTCR/LF (apply) MARKASCHANGED (apply) DISPLAYLINK/RL (apply) COMPILER::ALPHA-FUNCTIONAL-FORM ( +ppe) ONEDINSPECT.REPLACE (apply) DOICONWINDOWCOM (apply) DOMAINWINDOWCOMFN (apply) +TWODINSPECT.DOWINDOWCOMFN (apply) INSPECTW.FETCH (apply) \CREATE.SYMBOL (ppe) DOWINDOWCOM (apply) +\GCSCANSTACK (ppe) EDITDEF (apply) FIXSPELL (apply) SEARCHPDL (apply) COMP.SHIFT (apply) DELFROMCOM ( +apply) /MAPCONC (apply) DISPLAYLINK/TB (apply) ONEDINSPECT.REDISPLAY (apply) HPRINT.IMAGEOBJ (apply) +\BRUSHBITMAP (apply) D-ASSEM::STORE-DIGEST-INFO (apply) SHOWBITMAP.IP (ppe) \VFMFind (apply) +D-ASSEM:FIXUP-PTR (ppe) DISPLAYLINK/BT (apply) \SETUP-ENVIRONMENT-CALL (ppe) SCANEXP (apply) +\INSPECT.COMPUTE.TITLE (apply) \COPYDATATYPE (ppe) OPT.SCANOPT (apply) TEDIT.INSERT.OBJECT (apply) +DELFROMFILES (apply) EDITTOGGLEBORDER (apply) COMPILER::ENV-ANALYZE-SETQ (ppe) \TEDIT.APPLY.PARASTYLES + (apply) CL::BUILD-CONSTRUCTOR-SLOT-SETFS (apply) COMP.CLEANFNOP (apply) PUTSEQUIN (apply) +TEDIT.MAPLINES (apply) TEDIT.PUT.OBJECT (apply) \START.PROCESSES (ppe) \ALLOCBLOCK (ppe) POSSIBILITYFN + (apply) COPYHASHITEM (apply) PRINTER.BITMAPSCALE (apply) MSPRGTEMPLATE1 (apply) PROCESSWORLD (stackfn +) INFILECOM (apply) \BSP.PREPARE.INPUT (apply) INSPECTW.PROPERTIES (apply) USERNAME (ppe) HASDEF ( +apply) \POSTSCRIPT.OUTCHARFN (apply) FIXATOM1 (stackfn) \TAN.OLD (ppe) SI::ADVICE-PUTDEF (apply) +MACROEXPANSION (apply) SUPERPRINT (apply) \SPP.HANDLE.INPUT (apply) \ARGPTR (ppe) SETUSERNAME (ppe) +\RPLPTR (ppe) MAPATOMS (apply) EDITRAN (apply) CHAT.OPTIONMENU (apply) DELDEF (apply) \PEEKPUP (ppe) +SI::MAKE-AROUND-BODY (apply) ONEDINSPECT.REPAINTFN (apply) \SLOWRETURN (ppe) STKNTHNAME (ppe) +ONEDINSPECTW.CREATE (apply) COMP.USERFN (apply) MAPHASHFILE (apply) STKNTH (ppe) EVERY (apply) +SETMAINTPANEL (ppe) \TEXTBIN (apply) TEDITCHAT.MENUFN (apply) EDITV (stackfn) \UNBOXFLOAT1 (ppe) +MAXIMUMWINDOWSIZE (apply) D-ASSEM::GENERATE-EASY-ENTRY (apply) LOG (ppe) DO-HISTORY-SEARCH (apply) +ONEDINSPECT.SETELT (apply) INSTALLBRUSH (apply) CL::GET-SIMPLE-SETF-METHOD (apply) \COPYFNHEADER (ppe) + ARCTAN (ppe) ONEDINSPECT.ADJUSTSELECTION (apply) CONS (ppe) \HANDLE.RAW.PACKET (apply) CL:VALUES (ppe +) TWODINSPECT.SETELT (apply) SEDIT::EXTRACT-CURRENT-SELECTION (apply) \TEDIT.OBJECT.SHOWSEL (apply) +MB.THREESTATEBUTTON.FN (apply) \CKAPPLYARGS (ppe) CALL.MOVENODEFN (apply) EDITCOMA (stackfn) STKSCAN ( +ppe) CHECKBUFFERREFVAL (ppe) DINFO.UPDATE.FMENU (ppe) CLISP4 (stackfn) CL:VALUES-LIST (ppe) +\TEDIT.MOVE.PIECEMAPFN (apply) COMPILER::ALPHA-MV-PROG1 (apply) MAKEEPSFILE (apply) MAPRELATION (apply +) PRINTPACKET (apply) XCL::PROTOTYPE-DEFN-TYPES (apply) EDITCOM1 (apply) \FTP.ERRORHANDLER (stackfn) +\GR.METHODEXPANDER (apply) LCSKIP (apply) \MAIKO.CONS.UFN (ppe) ADDTOCOM (apply) /MAPCON (apply) +\UNBOXFLOAT2 (ppe) COMPILER::RELEASE-MV-CALL (apply) \MAKE.PROCESS1 (ppe) \SIMULATE.UNBIND (ppe) CAR ( +ppe) PRINTERTYPE (apply) FIXDATUM (apply) XCL::PROTOTYPE-DEFINERS-FOR-TYPE (apply) \FTP.HANDLE.NO ( +apply) \GET-MY-BF (ppe) CDR (ppe) GETDEFFROMFILE (apply) SI::UNWIND-TO-BLIP (ppe) \TEDIT.INSPECTCODE ( +apply) RESUME (ppe) CL::VALUES-UFN (ppe) EVALUABLE.CONSTANTP (apply) OPENIMAGESTREAM (apply) \RESUME ( +ppe) \TEDIT.TRY.ABBREV (apply) RPLACA (ppe) IDIFFERENCE (ppe) CHAT.MENU (apply) CL::VALUES-LIST-UFN ( +ppe) RPLACD (ppe) COMPILER::COMPILE-FILE-DEFINEQ (apply) IGREATERP (ppe) \TEDIT2 (apply) SCROLLW ( +apply) \PROMISCUOUS.OFF (ppe) \DO.PARAMS.AT.OPEN (apply) SEDIT::OUTPUT-STRING (ppe) \SETFVARSLOT (ppe) + INSPECT/LISTP (apply) EDITSMASH (apply) \EVAL-INVOKE-LAMBDA (ppe) CLOSEF (apply) \CREATECHARSET ( +apply) CL::SET-PARSED-STRUCTURE (ppe) \WALKOVER.SPECIALFORMS (apply) COMP.EQ (apply) CHANGECCODE (ppe) + CL:ROOM (ppe) CHOOZ (apply) SI::DESCRIBE-USING-RECORD-DECL (apply) \PROG0 (ppe) \WALKOVER.SF.LIST ( +apply) MAP2C (apply) MAPHASH (apply) \TTYBACKGROUND (apply) \COS.OLD (ppe) MAPRINT (apply) PRINTXIP ( +apply) TEDIT.UNDO.DELETION (apply) IQUOTIENT (ppe) MAPC (apply) EOFCLOSEF (apply) DIFFERENCE (ppe) +TWODINSPECTW.CREATE (apply) MAP2CAR (apply) \MEDW.GETSCREENREGION (apply) \SPP.HANDLE.ATTN (apply) +\RTP.CLEANUP (apply) TEDIT.GET (apply) GRAPHDELETELINK (apply) MAPCON (apply) PARSERELATION1 (apply) +\SMASHRETURN (ppe) \WALKOVER.FUNCTION (apply) GRAPHDELETENODE (apply) COMPILER::RELEASE-MV-PROG1 ( +apply) \RECLAIMCODEBLOCK (ppe) HISTORYFIND1 (apply) TEDIT.PUT.PCTB (apply) \HASHACCESS (apply) +MAPPAGES (apply) GRAPHBUTTONEVENTFN (apply) \TEDIT.APPLY.STYLES (apply) MAPLIST (apply) HPRINT1 (apply +) \ASSIGNDATATYPE1 (ppe) \MAYBEPRINTPACKET (apply) MAPCONC (apply) CL::PUTHASH (ppe) MAPCAR (apply) +CL::STRUCTURE-POINTER-SLOTS (apply) MAKE.LOCAL.ATOM (ppe) RESOLVE-EXPORT-CONFLICT (apply) +SI::%%STRUCTURE-DECLARE-DATATYPE (apply) XCL::ADD-WHERE-IS-DATABASES (apply) PRINTCOMSTRAN (apply) +SEDIT::CFV-LIST (ppe) GO (ppe) ADDTOFILES? (apply) STKPOS (ppe) \PROTECTED.APPLY (apply) +\SEQUIN.HANDLE.INPUT (apply) SEDIT::COPY-HASH-TABLE (apply) \TEDIT.SELECT.CHARACTER (apply) +CL:DECODE-UNIVERSAL-TIME (ppe) CL::ESTABLISH-SETFS-AND-OPTIMIZERS (apply) +CONVERT.FILE.TO.TYPE.FOR.PRINTER (apply) \MAPPAGE (ppe) \TEXTINIT (apply) CL::BUILD-CONSTRUCTOR-ARGLIST + (apply) RETURN (ppe) HASHOVERFLOW (apply) \RATOM/RSTRING-REFILL (apply) CL::RESOLVE-SLOTS (apply) +\EVALA (ppe) NOTANY (apply) ONEDINSPECT.SCROLLFN (apply) TEDIT.FORMATPAGE (apply) \TRACKWITHBOX (apply +) \DRAWCIRCLE.DISPLAY (apply) CHANGETRAN1 (apply) MSUPDATE (apply) \PROMISCUOUS.ON (ppe) +\DRAWELLIPSE.DISPLAY (apply) RECORDINIT (apply) TEDIT.SELECTED.PIECES (apply) DEFAULTWHENSELECTEDFN ( +stackfn) NOTEVERY (apply) TRAPLOOP (apply) \PAGED.REVALIDATEFILELST (apply) \BSP.SKIPBYTES (apply) +UNDOLISPX3 (apply) GRAPHOBJ.DISPLAYFN (apply) \READCREFILL (apply) INSPECTW.REDISPLAY (apply) +\SPY.INTERRUPT (ppe) CL:LIST-ALL-PACKAGES (apply) \TAN-FLOAT (ppe) TWODINSPECT.REPAINTFN (apply) \LET0 + (ppe) SI::DESCRIBE-USING-INSPECT-MACRO (apply) XCL:LIST-ALL-PROFILES (apply) COMPILER::ALPHA-COMBINATION + (apply) WRITEIMAGEOBJ (apply) \UNWIND.UFN (ppe) READLINE (apply) MAP.PROCESSES (apply) GENERATOR ( +stackfn) \LET* (ppe) FAKE-COMPILE-FILE (ppe) \GETREGION.CHECKOPPT (apply) \DODISKCOMMAND (ppe) +TRANSMIT.ETHERPACKET (apply) TEDIT.EDIT.OBJECT (apply) RETDWIM (stackfn apply) TEDIT.UNDO (apply) +\PAGED.REVALIDATEFILES (apply) READIMAGEOBJ (apply) \BASEBYTES.BOUT (apply) \RPLPTR.UFN (ppe) +EDITADDNODE (apply) \CLEANUPDISKQUEUE (ppe apply) \DELETECH (apply) XCL:RESTORE-PROFILE (apply) +CL:FILE-POSITION (ppe) \RTP.HANDLE.PUP (apply) \BUFFERED.REVALIDATEFILELST (apply) MB.SELFN (apply) +XCL::GET-WHERE-IS-ENTRIES (apply) \USER-SUBR-UFN (apply) DINFO.LOOKUP (apply) SUPERPRINT0 (apply) +\BSP.PREPARE.OUTPUT (apply) ADDTOFILE (apply) \CURVE (apply) \FIXCODEPTR (ppe) \TEDIT.INSERT.PIECES ( +apply) \RPLACA.UFN (ppe) SEDIT::UNDO-EVENT (apply) SEDIT::LINEARIZE-LIST (ppe) COPYINSERT (apply) +\RPLACD.UFN (ppe) \NSRANDOM.PREPARE.CACHE (ppe) GETDEFCURRENT (apply) FB.SORT.VERSIONS (apply) +\CONS.UFN (ppe) SI::RESETUNWIND (apply) CL:MAPHASH (apply) \SIN.OLD (ppe) TEDIT.COPY (apply) +\SEQUIN.FLUSH.CONNECTION (apply) \TEDIT.HARDCOPY.DISPLAYLINE (apply) SOME (apply) +CL::%%MAKE-RANDOM-ARRAY (apply) CL::GET-PS-FROM-ACCESSOR (apply) TEDIT.REDO.INSERTION (apply) +SET/LABEL/SIZE (apply) TWODINSPECT.SCROLLFN (apply) LISPX (apply) TWODINSPECT.REDISPLAY (apply) +GENERATEFN (apply stackfn) PFI.PRINT.BITMAP (stackfn) DBG::COLLECT-ACTIVE-ESCAPES (apply stackfn) +\FINDKEY.UFN (ppe) \ALLOCHUNK (ppe) *PACKAGE-FROM-INDEX* (ppe) \SEQUIN.PROCESS (apply) \FUNCT1 (ppe) +COMP.TOPLEVEL.COMPILE (apply) GRAPHCHANGELABEL (apply) SUBSET (apply) BSPPUTMARK (apply) +CL::GET-PS-FROM-PREDICATE (apply) MSINTERPRETSET (apply) LISPXREAD (apply) MENU.HANDLER (apply) +CLISPIFYCROPS (apply) \PRESSCURVE2 (ppe) RECORDECL1 (apply) \TEDIT.CONVERT.FOREIGN.FORMAT (apply) +FW-OPENP (apply) \CONTEXTAPPLY (ppe) \RESTLIST.UFN (ppe) CLISPIFY2B (apply) \BSP.GETNEXTBUFFER (apply +stackfn) \MAIKO.ALLOCBLOCK (ppe) CL::CACHE-SETF-INFO (apply) \SIN-FLOAT (ppe) \MISCN.UFN (ppe apply) +LOWERCASE (apply) GRAPHADDLINK (apply) MISSPELLED? (apply) \RPLCONS (ppe) CALLS (apply) WBREAK (ppe) +SI::UNWIND (ppe) \PRINDATUM.TO.STRING (apply) BROKENDEF (ppe) MSFAIL (stackfn) ENCAPSULATE.ETHERPACKET + (apply) BSPGETMARK (apply) \MAIKO.BITBLTSUB (ppe) CL::ARGUMENT-NAMES (apply) +\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (apply) %%MAKE-ARRAY-TYPE-TABLE (apply) \FM.EDIT-INSERT (apply +) \UFSGetFileTypeConfirm (stackfn) ADIEU (stackfn) \MAIKO.PUNTBLTCHAR (ppe) GetImageFile (apply) +CLISPATOM2 (apply) CL:FIND-ALL-SYMBOLS (apply) LISPXREPRINT (apply) \MAIKO.BLTCHAR (ppe) \STKSCAN (ppe +) OPT.FRAMEVAR (apply) CLEARCLISPARRAY (apply) \MEDW.SHAPEW (apply) BLIPVAL (ppe) XCL::HASH-FILE-WHERE-IS + (apply) \MEDW.GETSCREENPOSITION (apply) GIVE.TTY.PROCESS (apply) \UNVISIBLE.PAGED.REVALIDATEFILELST ( +apply) XCL:SET-EXEC-TYPE (stackfn) \GETREGIONTRACKWITHBOX (apply) MINIMUMWINDOWSIZE (apply) SETBLIPVAL + (ppe) CL:COMPILE-FILE (ppe) IMAGEBOX (apply) \UNBOXFLOAT3 (ppe) TEDIT.FORMAT.HARDCOPY (apply) +\InitCurveBrushes (apply) BLIPSCAN (ppe) %%MAKE-CML-TYPE-TABLE (apply) PRINTERSTATUS (apply) +OPT.JFIXPASS (apply) \TEXTPEEKBIN (apply) COMPILER::ALPHA-LABELS (apply) ICMLARRAY.DOWINDOWCOMFN ( +apply) BLOCK (ppe) DOUSERFNS2 (apply) DISPLAYLINK/LR (apply) \FORMATLINE (apply) CL::ESTABLISH-ACCESSORS + (apply) \DO.PROGV.SETUP.FRAME.AND.EXECUTE (ppe) UNDONLSETQ1 (apply) WHO-LINE-CURRENT-DIRECTORY (apply +) \HARDRESET-CLEANUP1 (ppe) HVBAKREAD (apply) \DISPLAYLINE (apply) \SETIOPOINTERS (ppe) +SI::DESCRIBE-USING-DESCRIBERS (apply) INSPECT (apply) \STORE.N.UFN (ppe) \D01.FAULTINIT (ppe) +INSPECTW.CREATE (apply) MODERNWINDOW.BUTTONEVENTFN (apply) MSGETDEF (apply) \COPY.N.UFN (ppe) +\GETREGION.CHECKBASEPT (apply) \MAIKO.DISPLAYLINE (apply) CL::DEFINE-CONSTRUCTORS (apply) \RETURN (ppe +) \TEDIT.ADJUST.LINES (apply) \CURVE2 (ppe) \GCMAPSCAN (ppe) \SEQUIN.HANDLE.ACK (apply) \D0.STARTIO ( +ppe) DOUSERFNS (apply) CL:GENSYM (ppe) COMPILER::GENCODE-LET (apply) \COPYCODEBLOCK (ppe) VARS.PUTDEF +(ppe) \MYARGCOUNT (ppe) \ARG0 (ppe) FIND.SYMBOL (ppe) XCL::WHERE-IS-FILES (apply) \HCPYMODEDISPLAYINIT + (apply) \IPCURVE2 (ppe) WINDOW.MOUSE.HANDLER (apply) \MEDW.EXPANDW (apply) \MP.ERROR (ppe) ERROR! ( +ppe) TWODINSPECT.ADJUSTSELECTION (apply) \PFI.DO.HARDCOPY (apply) \MENUSUBITEMS (apply) FB.SORTCOMMAND + (apply) SHAPEW (apply) SPP.FORCEOUTPUT (apply) BRKDWNRESULTS2 (apply) \FM.STATE-SELECTEDFN (apply) +READVARS-FROM-STREAM (apply) EDITAPPLYTOLINK (apply) LAPRD (apply) \PROC.RESUME (ppe) +CL::DEFINE-ACCESSORS (apply) COMPILER::RELEASE-CALL (apply) PROCESS.EVALV (ppe) \TEXTMENU.TOGGLEFN ( +apply) \TEDIT1 (apply) XCL::%%DEFINE-TYPE-FILE-DEFINITIONS (apply) TEDIT.BUILD.PCTB (apply) RESET (ppe +) \BSP.HANDLE.INTERRUPT (apply) \BACKTRACE (apply) CLISPIFY2 (stackfn) FONTCREATE (apply) PUTDEF ( +apply) \TIMER.INTERRUPTFRAME (apply) COMP.STFIX (apply) NIL +LOCALFREEVARS MSPRGDWIM (FILEPKGFLG NOSPELLFLG) SEDIT::SEDITL (CL:ATOM) EQUALHASH (AR2 UNMATCHED AR1) +MSINTERPRET (TYPE SHOWSET EDIT EDITCOMS DONE) GETSYNTAX (TEM RESULT CH LST) +CL::%%MAKE-SMALL-FIXP-ACCESSOR (TYPE CL::OFFSET) \UFS.FILEINFOFN (GENFILESTATE) \STRINGWIDTH.GENERIC ( +TOTALWIDTH SPACEWIDTH CSET WIDTHSBASE FONT) MSSHOWUSE (ANYFOUND SHOWFN) CL::GET-PS-FROM-PREDICATE ( +CL::PREDICATE) HPRINT1 (VALS) \RECLAIMCODEBLOCK (CODEBASE) COMPILER::TEST-ALPHA (COMPILER::TREE) +GC-FILING-DIRECTORY (DIRINDEX CONFIRM? ID NDELETED) MSPRGTEMPLATE1 (EXPR) NCHARS (NCHARCNT) +COMPILER::COMPILE-ONE-LAMBDA (COMPILER::TREE) \ASSIGNDATATYPE1 (NEWTYPEENTRY FOUNDSOME) CHCON ( +\CHCONLSTAIL \CHCONLST) CL::%%MAKE-ARRAY-ACCESSOR (CL::OFFSET) SI::UNADVISE-FROM-RESTORE-CALLS (SI::FROM + SI::FN) \NSFILING.SETFILEINFO (NAME.OR.STREAM DEVICE ATTR/VAL) \MISCN.UFN (MY-BF RESULT-IVAR CALLER) +COPYFILES (COPYFILESFROMSPEC SECONDARYSPEC COPYFILESOUTPUT DONTCOPY COPYFILESTOSPEC COPYFILESVERSIONS +COPYFILESALWAYS COPYFILES.WHENTOSKIP COPYFILESSKIPFN COPYFILESPURGESOURCE COPYFILESASK +COPYFILESASKDEFAULT COPYFILESREPLACE COPYFILESFN COPYFILESTERSE) FB.ADJUST.DATE.WIDTH (INDEX SPEC FONT +) UNPACK (\CHCONLSTAIL \CHCONLST) \COURIER.HANDLE.BULKDATA (DATASTREAM) SI::DESCRIBE-USING-INSPECT-MACRO + (SI::DEPTH SI::FETCHFN SI::OBJECT) HARRAYKEYS (ITEMLST) \PRINDATUM.TO.STRING (FATSTRINGP STRINGLEN +*PRINT-CIRCLE-HASHTABLE* STRINDEX STRINGPTR) SEDIT::COPY-HASH-TABLE (SEDIT::NEW-TABLE) +\NSRANDOM.WRITE.SEGMENT (BUFFERS FIRSTBYTE BYTESTOSTORE) RECEVAL (DATUM NEWVALUE FIELDNAME) +CL::ESTABLISH-SETFS-AND-OPTIMIZERS (CL:INLINE) CL::%%MAKE-FLAG-ACCESSOR (TYPE CL::OFFSET CL::WORD-OFFSET +) PACKAGE-HIERARCHY-INIT (CONVERT?) \NSPRINT.INTERNAL (COURIERSTREAM) +\UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD (DISPLAYSTREAM NEWLENGTH X) XCL::SHOW-CLOSURE-CACHE (XCL::LONG-P + STREAM) \PROCESS.EVAL1 (..PEV-PROC.. ..PEV-RESULT..) COMPILE-FILE-EXPRESSION (COMPILED.FILE +COMPILE.TIME.TOO DEFER FORCE-OUTPUT-P) COLLECTKEYS (KEYLST MKSTRING?) XCL:UNBREAK-FUNCTION ( +XCL::BROKEN-FN XCL::IN-FN) CL::%%MAKE-FLOAT-ACCESSOR (TYPE CL::OFFSET) CL:FIND-ALL-SYMBOLS (STRING) +DCHCON (!SCRATCHTAIL) CLEARCLISPARRAY (NAME) \SEQUIN.PROCESS (SEQUIN) XCL::HASH-FILE-WHERE-IS (TYPE) +CL::%%MAKE-WORD-ACCESSOR (TYPE CL::OFFSET) MSTRYSPELLTYPE (TYPE) SI::CREATE-CONDITION-CASE-LITERALS ( +SI::CATCH-TAG) \TOP-LEVEL-READ (STREAM OLD-EOS-OP EOF-VALUE) CL::%%MAKE-RANDOM-ARRAY (CL::RANDOM-CONST-A + CL::RANDOM-CONST-B) SET-READTABLE-INTERACTIVELY (READTABLES) CL:LIST-ALL-PACKAGES (RES) CL:COMPILE-FILE + (COMPILER::*INPUT-STREAM* COMPILER::*FASL-HANDLE* COMPILER::ERROR-FILE-STREAM COMPILER::*LAP-STREAM*) + DUNPACK (!SCRATCHTAIL) \NSFILING.LOGIN (STREAM) CL::%%MAKE-POINTER-ACCESSOR (TYPE CL::OFFSET) BREAK1 +(POS) NTHCHARCODE (M) SI::DESCRIBE-USING-DESCRIBERS (SI::OBJECT SI::DEPTH) \NSFILING.DESERIALIZE1 ( +BULKSTREAM SERIALSESSION) \STORAGE.TYPE (ALLOCMDS) DMPHASH (ARRAYNAME) SEDIT::TTYFN (SEDIT::EVENT) +CL::GET-SIMPLE-SETF-METHOD (CL::VALS CL::VARS) CL::STRUCTURE-FUNCTION-P (CL:SYMBOL) +SI::UNBREAK-FROM-RESTORE-CALLS (SI::FROM SI::FN) COMPILER::ALPHA-LABELS (CL:LABELS COMPILER::*ENVIRONMENT* +) XCL:LIST-ALL-PROFILES (XCL:PROFILES) COMPILER::TEST-ANNOTATION (COMPILER::TREE) \PROCESS.APPLY1 ( +..PEV-PROC.. ..PEV-RESULT..) COMPILER::TEST-ANALYSIS (COMPILER::TREE) LOOKUP-ENVIRONMENT-AND-FILEMAP ( +FULL HIGHEST-VERSION MAPENTRY) CLEARSTK (FLG LST) XCL::WHERE-IS-NOTICE (HASH-FILE:HASH-FILE) +\NSFILING.COPY/RENAME (HANDLE SERIALSTREAM SESSION) CL::ESTABLISH-ACCESSORS (CL::PS) +SEDIT::EXTRACT-CURRENT-SELECTION (SEDIT::CONTEXT) MAKEINITLAST (AL) APROPOS (BLOCKCOUNT FILTERFN +STRING CASEARRAY ALLFLG QUIETFLG RESULT OUTPUT) MAPRELATION (MAPFN2 MAPZ MAPFN MAPW) +\UFS.CLEANUP.GFS.TABLE (NOTICETOCP) MULTIFILEINDEX1 (*STANDARD-OUTPUT*) \REMOVE-DECLS (CL::SPECIALS) +\NSFILING.DELETEFILE (DEVICE) CL::DEFINE-CONSTRUCTORS (CL::PS) \FILEMAP-HASHOVERFLOW (ENTRIES) +BAKTRACE1 (N IPOS POS) CL:LOAD (STREAM) XCL::DEL-WHERE-IS-DATABASE (XCL::DATABASE) +COURIER.BROADCAST.CALL (NEARBYNETS) \STRINGWIDTH.PRESS (TOTALWIDTH STREAM WIDTHSBASE) +CL::GET-SHARED-SETF-METHOD (CL::VALS CL::VARS) \MAPCHARS (\MAPCHARFN) CL::%%MAKE-FIXP-ACCESSOR (TYPE +CL::OFFSET) CL:UNWIND-PROTECT (\UNWIND-FORMS) COPYHASHFILE (HASHFILE NEWHASHFILE FN) CLISPIFY2 (FORM) +INREADMACROP (\READDEPTH) HCOPYALL1 (NEW) SEDIT::SEDITE (CL:ATOM SEDIT::IFCHANGEDFN SEDIT::OLD-PROPS +SEDIT::NEW-EXPR SEDIT::EVENT TYPE) BAKTRACE (FN) FASL::ELEMENTS-IDENTICAL-P (FASL::TESTELT) +CL::%%MAKE-BIT-ACCESSOR (TYPE CL::SIZE CL::OFFSET CL::WORD-OFFSET) CH.ADD.GROUP.PROPERTY (MEMBERS) +COPYALL (NH) I.S.OPR (UC LC) \FTP.CLEANUP (CONNS FAIL) XCL::%%DEFINE-TYPE-FILE-DEFINITIONS (TYPE) +CL::%%MAKE-LIST-ACCESSOR (CL::OFFSET) %%MAKE-ARRAY-TYPE-TABLE (LIT-TYPE) HPRINT (STREAM) +HASHFILESPLST1 (XWORD) DBG::PRINT-BACKTRACE (DBG::TEST) NSPRINT (INSTREAM) D-ASSEM:ASSEMBLE-FUNCTION ( +D-ASSEM::*DTAG-ENV*) \UFS.NEXTFILEFN (GENFILESTATE) CL:MAPHASH (CL::FN) \SETTYPEMASK (BITS) +FB.CANONICAL.DIRECTORY (OLDTTYPROC OLDTTYSTREAM PWINDOW) \NSRANDOM.READ.SEGMENT (FIRSTPAGE# +BYTESTOFETCH BUFFERS EXTRABUFFERS NEXTRA) CL::DEFINE-ACCESSORS (CL::PS) SI::DESCRIBE-USING-RECORD-DECL + (SI::DEPTH SI::OBJECT DECL) COMPARENCHARS (COMPARECNT) \STRINGWIDTH.HCPYDISPLAYAUX (TOTALWIDTH +SPACEWIDTH CSET WIDTHSBASE FONT) GETGRIDBOXREGION (GRIDREGION) CL::GET-PS-FROM-ACCESSOR (CL::ACCESSOR) + FB.INSERT.FILE (FBSORTFN FILE) FLUSHFILEMAPS (ROOTNAME) SEDIT:REPLACE-SELECTION (SEDIT::CONTEXT) +COMPILER::TEST-META-EVAL (COMPILER::TREE) NIL +USERTEMPLATES \DoveIO.LockMem (CALL |..| EVAL) TTBOUT (CALL CALL |..| (IF (OR (LISTP EXPR) (AND ( +NTHCHAR EXPR 2) (NOT (ASSOC EXPR DMCHARCODES)))) EVAL NIL)) CH.PROPERTY (CALL PROP) TTBOUTN (MACRO (X + . Y) (FRPTQ X (TTBOUT . Y))) NIL +KEYACCEPT CL:DELETE-IF (:START :END :FROM-END :COUNT :KEY) DBG::PRINT-BACKTRACE (:FROM :TO :TEST +:PRINT-VARIABLES :PRINT-JUNK :OUTPUT :LINK) XCL:ADVISE-FUNCTION (:IN :WHEN :PRIORITY) CL:STRING-UPCASE + (:START :END) CL:DELETE-IF-NOT (:START :END :FROM-END :COUNT :KEY) CL:PARSE-NAMESTRING (:START :END +:JUNK-ALLOWED) INTERN-LITATOM (:WHERE) CL:NSUBST-IF-NOT (:KEY) DEBUGGER (:FORM :ENVIRONMENT :CONDITION + :STACK-POSITION :AT) CL:DELETE-DUPLICATES (:START :END :FROM-END :KEY :TEST :TEST-NOT) CL:STRING= ( +:START1 :END1 :START2 :END2) XCL:READVISE-FUNCTION (:IN) CL:ASSOC-IF (:KEY) COMPILER::ALPHA-LAMBDA ( +:CONTEXT :NAME) CL:SEARCH (:START1 :END1 :START2 :END2 :FROM-END :TEST :TEST-NOT :KEY) CL:ASSOC (:TEST + :TEST-NOT :KEY) CL:MEMBER (:TEST :TEST-NOT :KEY) CL:COMPILE (:LAP) XCL:CREATE-TRACE-WINDOW (:REGION +:OPEN? :TITLE) CL:SUBLIS (:TEST :TEST-NOT :KEY) CL:COUNT-IF (:START :END :FROM-END :KEY) +CL:STRING-NOT-GREATERP (:START1 :END1 :START2 :END2) CL:REMOVE-IF-NOT (:START :END :FROM-END :COUNT +:KEY) CL:NSUBSTITUTE-IF-NOT (:START :END :FROM-END :COUNT :KEY) CL:STRING>= (:START1 :END1 :START2 +:END2) CL:ASSOC-IF-NOT (:KEY) FILL-VECTOR (:START :END) EXEC-EVAL (:PROMPT :ID :TYPE) CL:MAKE-PACKAGE +(:USE :NICKNAMES :PREFIX-NAME :EXTERNAL-ONLY :INTERNAL-SYMBOLS :EXTERNAL-SYMBOLS) CL:MAKE-ARRAY ( +:ELEMENT-TYPE :INITIAL-ELEMENT :INITIAL-CONTENTS :DISPLACED-TO :DISPLACED-TO-BASE +:DISPLACED-INDEX-OFFSET :FILL-POINTER :ADJUSTABLE :EXTENDABLE :FATP :READ-ONLY-P) CL:WRITE-TO-STRING ( +:ESCAPE :RADIX :BASE :CIRCLE :PRETTY :LEVEL :LENGTH :CASE :ARRAY :GENSYM) CL:ADJUST-ARRAY ( +:ELEMENT-TYPE :INITIAL-ELEMENT :INITIAL-CONTENTS :DISPLACED-TO :DISPLACED-TO-BASE +:DISPLACED-INDEX-OFFSET :FILL-POINTER :FATP) CL:TREE-EQUAL (:TEST :TEST-NOT) CL:SUBSTITUTE-IF-NOT ( +:START :END :FROM-END :COUNT :KEY) CL:POSITION-IF-NOT (:START :END :FROM-END :KEY) CL:SORT (:KEY) +CL:NSUBLIS (:TEST :TEST-NOT :KEY) CL:RASSOC (:TEST :TEST-NOT :KEY) CL:DISASSEMBLE (:LEVEL-P :RADIX +:OUTPUT :FIRST-BYTE :MARKED-PC) CL:POSITION (:START :END :FROM-END :KEY :TEST :TEST-NOT) +XCL:TRACE-FUNCTION (:IN :REBREAK?) CL:RASSOC-IF-NOT (:KEY) FASL::DUMP-ARRAY-DESCRIPTOR ( +:INITIAL-ELEMENT) XCL:UNBREAK-FUNCTION (:IN :NO-ERROR) CL:WRITE-LINE (:START :END) COMPILER:ENV-FBOUNDP + (:LEXICAL-ONLY) CL:NSUBSTITUTE (:START :END :FROM-END :COUNT :KEY :TEST :TEST-NOT) CL:NSUBSTITUTE-IF +(:START :END :FROM-END :COUNT :KEY) CL:RASSOC-IF (:KEY) ADD-EXEC (:PROFILE :REGION :TTY :EXEC :ID +&ALLOW-OTHER-KEYS) CL:MAKE-LIST (:INITIAL-ELEMENT) CL:MAKE-PATHNAME (:DEFAULTS :HOST :DEVICE +:DIRECTORY :NAME :TYPE :VERSION) CL:REMOVE (:START :END :FROM-END :COUNT :KEY :TEST :TEST-NOT) +CL:STRING-CAPITALIZE (:START :END) CL:MAKE-SEQUENCE (:INITIAL-ELEMENT) CL:STRING-DOWNCASE (:START :END +) CL:FIND (:START :END :FROM-END :KEY :TEST :TEST-NOT) CL:DELETE (:START :END :FROM-END :COUNT :KEY +:TEST :TEST-NOT) XCL:COMPILE-FORM (:LAP) CL::%%LIST-MAP-OPTIMIZER (:TAIL-P :COLLECT-P :NCONC-P :INC-FN + :NIL-RESULT-P) XCL:COMPILE-DEFINER (:LAP) BREAK-FUNCTION (:IN :WHEN :TRACE? :REBREAK?) CL:STABLE-SORT + (:KEY) CL:MEMBER-IF-NOT (:KEY) CL:COMPILE-FILE (:OUTPUT-FILE :LAP-FILE :ERROR-FILE +:ERRORS-TO-TERMINAL :FILE-MANAGER-FORMAT :PROCESS-ENTIRE-FILE :LOAD) CL:POSITION-IF (:START :END +:FROM-END :KEY) CL:MEMBER-IF (:KEY) CL:STRING-LESSP (:START1 :END1 :START2 :END2) EXEC (:TOP-LEVEL-P +:WINDOW :TITLE :COMMAND-TABLES :ENVIRONMENT :PROMPT :FUNCTION :PROFILE :ID &ALLOW-OTHER-KEYS) +CL::%%EVERY-MAP-OPTIMIZER (:SOME-P :NEGATE-P) SI::COMPILED-FUNCTION-ARGLIST (:INTERLISP?) +CL:STRING-NOT-EQUAL (:START1 :END1 :START2 :END2) FASL:CLOSE-FASL-HANDLE (:ABORT &ALLOW-OTHER-KEYS) +CL:WRITE-STRING (:START :END) CL:MAKE-STRING (:INITIAL-ELEMENT :FATP) XCL::WHERE-IS-NOTICE (:FILES +:NEW :DEFINE-TYPES :HASH-FILE-SIZE :QUIET :TEMP-FILE) CL:NSTRING-UPCASE (:START :END) CL::TIME-CALL ( +:OUTPUT :TIMED-FORM :DATA-TYPES :REPEAT) FAKE-COMPILE-FILE (:LAP :REDEFINE :OUTPUT-FILE :SAVE-EXPRS +:COMPILER-OUTPUT :PROCESS-ENTIRE-FILE) CL:MERGE (:KEY) CL:NUNION (:TEST :TEST-NOT :KEY) +XCL:UNADVISE-FUNCTION (:IN :NO-ERROR) STRING-EQUAL (:START1 :END1 :START2 :END2) CL:FILL (:START :END) + WRITE (:STREAM :ESCAPE :RADIX :BASE :LEVEL :LENGTH :CASE :GENSYM :ARRAY :PRETTY :CIRCLE) CL:UNION ( +:TEST :TEST-NOT :KEY) CL:LOAD (:VERBOSE :PRINT :IF-DOES-NOT-EXIST :LOADFLG :PACKAGE) CL:CLOSE (:ABORT) + CL:ADJOIN (:TEST :TEST-NOT :KEY) CL:SUBST (:TEST :TEST-NOT :KEY) XCL:REINSTALL-ADVICE (:BEFORE :AFTER + :AROUND) CL:READ-FROM-STRING (:START :END :PRESERVE-WHITESPACE) CL:INTERSECTION (:TEST :TEST-NOT :KEY +) CL:MAKE-HASH-TABLE (:TEST :SIZE :REHASH-SIZE :REHASH-THRESHOLD) CL:STRING< (:START1 :END1 :START2 +:END2) WALK-FORM (:DECLARATIONS :LEXICAL-VARIABLES :ENVIRONMENT :COPY :WALK-FUNCTION) CL:REPLACE ( +:START1 :END1 :START2 :END2) CL:STRING-GREATERP (:START1 :END1 :START2 :END2) CL:NSTRING-DOWNCASE ( +:START :END) CL:REMOVE-IF (:START :END :FROM-END :COUNT :KEY) CL:IN-PACKAGE (:NICKNAMES :USE) +CL:STRING<= (:START1 :END1 :START2 :END2) CL:SUBST-IF (:KEY) MAKE-VECTOR (:ELEMENT-TYPE +:INITIAL-ELEMENT :FATP) CL:SET-DIFFERENCE (:TEST :TEST-NOT :KEY) CL:MISMATCH (:START1 :END1 :START2 +:END2 :FROM-END :TEST :TEST-NOT :KEY) CL:NSTRING-CAPITALIZE (:START :END) CL:SUBST-IF-NOT (:KEY) +CL:NSET-EXCLUSIVE-OR (:TEST :TEST-NOT :KEY) CL:COUNT (:START :END :FROM-END :KEY :TEST :TEST-NOT) OPEN + (:DIRECTION :ELEMENT-TYPE :IF-EXISTS :IF-DOES-NOT-EXIST :EXTERNAL-FORMAT) CL:STRING/= (:START1 :END1 +:START2 :END2) PARSE-DEFMACRO (:PATH :ENVIRONMENT :CONTEXT :ERROR-STRING :DOC-STRING-ALLOWED +:DEFAULT-DEFAULT :KEY-FINDER :REMOVE-COMMENTS) COPY-VECTOR (:START1 :END1 :START2 :END2) +CL:REMOVE-DUPLICATES (:START :END :FROM-END :KEY :TEST :TEST-NOT) CL:SET-EXCLUSIVE-OR (:TEST :TEST-NOT + :KEY) CL:NSET-DIFFERENCE (:TEST :TEST-NOT :KEY) CL:SUBSTITUTE (:START :END :FROM-END :COUNT :KEY +:TEST :TEST-NOT) XCL:REBREAK-FUNCTION (:IN) CL:FIND-IF (:START :END :FROM-END :KEY) CL:SUBSTITUTE-IF ( +:START :END :FROM-END :COUNT :KEY) CL:REDUCE (:START :END :FROM-END :INITIAL-VALUE) CL:STRING-NOT-LESSP + (:START1 :END1 :START2 :END2) CL:SUBSETP (:TEST :TEST-NOT :KEY) CL:NINTERSECTION (:TEST :TEST-NOT +:KEY) CL:STRING> (:START1 :END1 :START2 :END2) FASL:PROCESS-FILE (:TEXT-FN :ITEM-FN) CL:NSUBST-IF ( +:KEY) CL:FIND-IF-NOT (:START :END :FROM-END :KEY) CL:COUNT-IF-NOT (:START :END :FROM-END :KEY) CL:NSUBST + (:TEST :TEST-NOT :KEY) CL:PARSE-INTEGER (:START :END :RADIX :JUNK-ALLOWED) NIL +KEYSPECIFY CL:PARSE-NAMESTRING (:HOST :DEVICE :DIRECTORY :NAME :TYPE :VERSION) SI::ADVISE-CONTENTS ( +:TEST) HASH-LEFTPAREN (:INITIAL-ELEMENT :INITIAL-CONTENTS) DEBUGGER (:TITLE :COMMAND-TABLES +:ENVIRONMENT :PROMPT :FUNCTION) D-ASSEM::CONVERT-TO-BINARY (:ELEMENT-TYPE) COMPILER::FIND-SEGMENT ( +:TEST) XCL::VARIABLE-LEXICAL-P (:TEST) SI::FINISH-ADVISING (:TEST) COMPILER::FRAME-ANNOTATE-CATCH ( +:TEST) FB.REMOVE.FILE (:END1 :END2) FASL:MAKE-OPTABLE (:INITIAL-ELEMENT) D-ASSEM::STORE-DIGEST-INFO ( +:KEY) CHAT.CHOOSE.EMULATOR (:TEST) FB.THINCOMMAND (:KEY) FASL::DUMP-GENERAL-ARRAY (:DISPLACED-TO +:ELEMENT-TYPE) COMPILER::ALPHA-FUNCTIONAL-FORM (:VALUES-USED) FB.INSERT.SUBDIRECTORIES (:END1 :END2) +COMPILER::ENV-PROCLAIMED-SPECIAL-P (:TEST) \CONVERT.FLOATING.NUMBER (:ELEMENT-TYPE :FILL-POINTER +:ADJUSTABLE) SI::EXPAND-CONDITION-CASE (:TEST) COMPILER::FRAME-ANNOTATE-TAGBODY (:TEST) +XCL:REBREAK-FUNCTION (:IN) COMP.EXPR (:LEXICAL-ONLY) ADVISE (:WHEN :PRIORITY :IN) +CL::SUBTYPEP-TYPE-EXPAND (:TEST) HASH-A (:INITIAL-CONTENTS) FB.MAYBE.INSERT.FILE (:END1 :END2) +COMPILER::FRAME-ANNOTATE-LAMBDA (:TEST) CL:USER-HOMEDIR-PATHNAME (:HOST :DIRECTORY) ADD-SYMBOL ( +:ELEMENT-TYPE) COERCE (:TEST) COMPILER::*EFFECT-CONTEXT* (:VALUES-USED) MAKEFILE1 (:REDEFINE +:SAVE-EXPRS :LOAD) COMPILER::PEEPHOLE-OPTIMIZE (:TEST) COPYFILES (:TEST) PACKAGE-ENABLE (:TEST) +\NSFILING.PARSE.FILENAME (:JUNK-ALLOWED) FASL::DUMMY-HANDLE (:DIRECTION) COMPILER::ALPHA-UNWIND-PROTECT + (:CONTEXT :NAME) CONCOCT-SYMBOL (:TEST) COMPILER::*PREDICATE-CONTEXT* (:VALUES-USED :PREDICATE-P) +WHO-LINE-CURRENT-DIRECTORY (:TEST) *DIGIT-STRING* (:ELEMENT-TYPE :FILL-POINTER :ADJUSTABLE) +XCL::WHERE-IS-NOTICE-INTERNAL (:TEST) MAKE-UNICODE-TRANSLATION-TABLES (:INITIAL-ELEMENT) +COMPILER::RESOLVE-VARIABLE-BINDING (:TEST) PACKAGE-MAKE (:USE :NICKNAMES :PREFIX-NAME :EXTERNAL-ONLY +:EXTERNAL-SYMBOLS) CL::ESTABLISH-SETFS-AND-OPTIMIZERS (:TEST) CHAT (:TEST) SEDIT::CREATE-COMMAND-TABLE + (:SIZE :REHASH-SIZE) CL:PPRINT (:STREAM :ESCAPE :PRETTY) PACKAGE-HIERARCHY-INIT (:WHERE) +%%MAKE-INITIAL-STRING-STREAM-CONTENTS (:ELEMENT-TYPE :EXTENDABLE :FILL-POINTER) PARSE-FORMAT-OPERATION + (:TEST) \PICK.EVALQT (:TOP-LEVEL-P :PROFILE :WINDOW) CL::STEP-COMMAND (:TEST) MSSEEK-WORD (:TEST) +ADD-USER-SUBR (:TEST :KEY) COMPILE-FILE-EXPRESSION (:WALK-FUNCTION) WRITE-UNICODE-INCLUDED (:RADIX) +XCL:COMPILE-FORM (:TOP-LEVEL-P :VALUES-USED) XCL:UNBREAK-FUNCTION (:IN) BREAK-FUNCTION (:IN :REBREAK? +:WHEN :NO-ERROR :TEST) %%FLATTEN-ARRAY (:ELEMENT-TYPE :DISPLACED-TO) \UFSGetPrintFileType (:TEST) +SI::MAKE-AROUND-BODY (:INITIAL-VALUE) COMPILER::FRAME-ANNOTATE-GO (:TEST) CHECKSAMEDIR (:TEST) +MAKE-PACKAGE-HASHTABLE (:ELEMENT-TYPE) COMPILER::FIND-REACHABLE-TAGS (:TEST) \LEAF.DIRECTORYNAMEP ( +:TEST) COMPILER:ENV-BOUNDP (:TEST) COMPILER::COMPILE-ONE-LAMBDA (:NAME) XCL::ADD-PROTOTYPE-FN (:TEST) +EXEC-PRIN1 (:STREAM :ESCAPE) \PAPERSIZE.IP (:TEST) CL:ADJUST-ARRAY (:ELEMENT-TYPE :FATP) +COMPILER::ENV-PROCLAIMED-GLOBAL-P (:TEST) %%DESTRUCTIVE-RESULT-VECTOR (:ELEMENT-TYPE :FILL-POINTER +:END1) CL:COMPILE-FILE (:TOP-LEVEL-P :VALUES-USED :DIRECTION :TYPE :VERSION :DEFAULTS) +FORMAT-EAT-WHITESPACE (:START) POSTSCRIPT.INIT (:INITIAL-ELEMENT) CL:PROVIDE (:TEST) +FB.UPDATEBROWSERITEMS (:KEY) COMPILER::ALPHA-COMBINATION (:TEST) \UFSGetFileType (:TEST) +CL::BASE-SUBTYPEP (:TEST) NewPrinter (:TEST) EXEC-PRINT (:STREAM :ESCAPE) DBG::STACK-FRAME-STOREFN ( +:TEST) XCL::WHERE-IS-NAMESTRING (:HOST :NAME :TYPE) CL::INSERT-INCLUDED-SLOT (:TEST) XCL::MAKE-PROTOTYPE + (:TEST) HASH-LEFT-PAD-INITIAL-CONTENTS (:INITIAL-ELEMENT) CL::STRUCTURE-FUNCTION-P (:TEST) CL:BIT-NOT + (:ELEMENT-TYPE) \10MB.CREATENDB (:TEST) XCL:LIST-ALL-PROFILES (:TEST) CL:MAKE-STRING (:ELEMENT-TYPE +:FATP) COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION (:KEY) \MAKERECODEMAP (:INITIAL-ELEMENT) +XCL::WALK-ARGLIST (:TEST) SEDIT::*FSPEC-TABLE* (:TEST :SIZE) XCL::PROTOTYPE-DEFINERS-FOR-TYPE (:TEST) +WHITESPACE-CHAR-P (:TEST) SI::*ADVICE-HASH-TABLE* (:TEST) HASH-TABLE-FOR-DOC-TYPE (:TEST :SIZE +:REHASH-SIZE) COMPILE-FILE-SETF-SYMBOL-FUNCTION (:WALK-FUNCTION) NSDISPLAYSIZE (:TEST) +XCL:UNADVISE-FUNCTION (:IN) FB.CREATE.FILEBUCKET (:END2) SEDIT::LIST-FORMATS-TABLE (:SIZE) BREAK0 (:IN + :WHEN) CONSTANTEXPRESSIONP (:VALUES-USED :PREDICATE-P) CL:PRINC (:STREAM :ESCAPE) XCL:READVISE-FUNCTION + (:IN :NO-ERROR) PFI.CHOOSE.BEST (:KEY) COMPILER::FRAME-ANNOTATE-BLOCK (:TEST) FB.ADD.FILEGROUP (:END1 + :END2) COMPILER::COMPLETELY-EXPAND (:TEST) TRACE (:IN) XCL::*BREAK-HASH-TABLE* (:TEST) +D-ASSEM::DCODE-FROM-DLAMBDA (:TEST :KEY) COMPILER::ENV-INLINE-DISALLOWED (:TEST) FASL-FILEDATE ( +:TEXT-FN :ITEM-FN) SI::ADVICE-PUTDEF (:IN) DBG::STACK-FRAME-FETCHFN (:TEST) FASL::NEW-VALUE-TABLE ( +:FILL-POINTER :EXTENDABLE) OPENPOSTSCRIPTSTREAM (:TEST) CL::*TYPEP-HASH-TABLE* (:TEST) HASH-STAR ( +:ELEMENT-TYPE :INITIAL-ELEMENT) FB.COPY/RENAME.MANY (:END1 :END2) COPY-ARRAY (:ELEMENT-TYPE :FATP) +XCL::VARIABLE-LEXICALLY-BOUNDP (:TEST) MAKE-SEQUENCE-OF-TYPE (:ELEMENT-TYPE) COMPILER::FRAME-ANNOTATE-RETURN + (:TEST) COMP.LABELS (:WALK-FUNCTION) *DEFINITION-HASH-TABLE* (:TEST :SIZE) COMPILER::*ARGUMENT-CONTEXT* + (:VALUES-USED) CL:PRIN1 (:STREAM :ESCAPE) CHAT.STARTUP (:TEST) REMOVE-COMMENTS (:TEST) OPEN (:TEST) +COMPILER::ALPHA-EVAL-WHEN (:TEST) MAPFILES1 (:START1) SI::FINISH-UNADVISING (:TEST) XCL:ADVISE-FUNCTION + (:IN :WHEN :PRIORITY :TEST) POSTSCRIPTFILEP (:TEST) DECLARERECORD (:TEST) +D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL (:TEST) FB.SORTCOMMAND (:KEY) READHASHMACRO ( +:INITIAL-CONTENTS :ELEMENT-TYPE) XCL::*PROFILES* (:TEST) SI::HAS-CALLS (:TEST) SUBRNUMBER (:TEST) +D-ASSEM:ASSEMBLE-FUNCTION (:TEST) COMPILER::ENV-INLINE-ALLOWED (:TEST) XCL:TRACE-FUNCTION (:IN :TEST) +COMP.TRANSFORM (:VALUES-USED :PREDICATE-P) CHARCODE.DECODE (:START :RADIX :JUNK-ALLOWED :END) +XCL::HASH-FILE-WHERE-IS (:TEST) CL::%%MAKE-RANDOM-ARRAY (:INITIAL-CONTENTS) CONVERT-LITATOM (:WHERE) +CL:MAKE-SEQUENCE (:INITIAL-ELEMENT) FB.INSERT.FILE (:END1 :END2) RESOLVE-READER-CONFLICT (:TEST) +CANONICAL.HOSTNAME (:TEST) SI::ADD-CHANGED-CALL (:TEST) FIND-HISTORY-EVENTS (:TEST) +DBG::COLLECT-ACTIVE-ESCAPES (:FROM-END :TEST) NIL +KEYCALL CL:PARSE-NAMESTRING (CL:MAKE-PATHNAME) SI::ADVISE-CONTENTS (CL:MEMBER CL:INTERSECTION) +HASH-LEFTPAREN (CL:MAKE-ARRAY) DEBUGGER (EXEC) D-ASSEM::CONVERT-TO-BINARY (CL:MAKE-ARRAY) +COMPILER::FIND-SEGMENT (CL:MEMBER) XCL::VARIABLE-LEXICAL-P (CL:MEMBER) SI::FINISH-ADVISING (CL:MEMBER +CL:DELETE) COMPILER::FRAME-ANNOTATE-CATCH (CL:NUNION) FB.REMOVE.FILE (STRING-EQUAL) FASL:MAKE-OPTABLE +(CL:MAKE-ARRAY) D-ASSEM::STORE-DIGEST-INFO (CL:SORT) CHAT.CHOOSE.EMULATOR (CL:ASSOC) FB.THINCOMMAND ( +CL:POSITION) FASL::DUMP-GENERAL-ARRAY (CL:MAKE-ARRAY) COMPILER::ALPHA-FUNCTIONAL-FORM (COMPILER:MAKE-CONTEXT +) FB.INSERT.SUBDIRECTORIES (STRING-EQUAL) COMPILER::ENV-PROCLAIMED-SPECIAL-P (CL:MEMBER) +\CONVERT.FLOATING.NUMBER (CL:MAKE-ARRAY) SI::EXPAND-CONDITION-CASE (CL:ASSOC) COMPILER::FRAME-ANNOTATE-TAGBODY + (CL:NUNION) XCL:REBREAK-FUNCTION (XCL:REBREAK-FUNCTION) COMP.EXPR (COMPILER:ENV-FBOUNDP) ADVISE ( +XCL:ADVISE-FUNCTION) CL::SUBTYPEP-TYPE-EXPAND (CL:MEMBER) HASH-A (CL:MAKE-ARRAY) FB.MAYBE.INSERT.FILE +(STRING-EQUAL) COMPILER::FRAME-ANNOTATE-LAMBDA (CL:NUNION) CL:USER-HOMEDIR-PATHNAME (CL:MAKE-PATHNAME) + ADD-SYMBOL (CL:MAKE-ARRAY) COERCE (CL:MEMBER) COMPILER::*EFFECT-CONTEXT* (COMPILER:MAKE-CONTEXT) +MAKEFILE1 (FAKE-COMPILE-FILE CL:COMPILE-FILE) COMPILER::PEEPHOLE-OPTIMIZE (CL:MAKE-HASH-TABLE) +COPYFILES (CL:MEMBER) PACKAGE-ENABLE (CL:PUSHNEW) \NSFILING.PARSE.FILENAME (CL:PARSE-INTEGER) +FASL::DUMMY-HANDLE (OPEN) COMPILER::ALPHA-UNWIND-PROTECT (COMPILER::ALPHA-LAMBDA) CONCOCT-SYMBOL ( +CL:MEMBER) COMPILER::*PREDICATE-CONTEXT* (COMPILER:MAKE-CONTEXT) WHO-LINE-CURRENT-DIRECTORY (CL:MEMBER +) *DIGIT-STRING* (CL:MAKE-ARRAY) XCL::WHERE-IS-NOTICE-INTERNAL (CL:ASSOC) +MAKE-UNICODE-TRANSLATION-TABLES (CL:MAKE-ARRAY) COMPILER::RESOLVE-VARIABLE-BINDING (CL:MEMBER) +PACKAGE-MAKE (CL:MAKE-PACKAGE) CL::ESTABLISH-SETFS-AND-OPTIMIZERS (CL:MEMBER) CHAT (CL:MEMBER) +SEDIT::CREATE-COMMAND-TABLE (CL:MAKE-HASH-TABLE) CL:PPRINT (WRITE) PACKAGE-HIERARCHY-INIT ( +INTERN-LITATOM) %%MAKE-INITIAL-STRING-STREAM-CONTENTS (CL:MAKE-ARRAY) PARSE-FORMAT-OPERATION (CL:MEMBER +) \PICK.EVALQT (EXEC) CL::STEP-COMMAND (CL:MEMBER) MSSEEK-WORD (CL:MEMBER) ADD-USER-SUBR (CL:REMOVE +CL:FIND) COMPILE-FILE-EXPRESSION (WALK-FORM) WRITE-UNICODE-INCLUDED (CL:PARSE-INTEGER) XCL:COMPILE-FORM + (COMPILER:MAKE-CONTEXT) XCL:UNBREAK-FUNCTION (XCL:UNBREAK-FUNCTION) BREAK-FUNCTION (XCL:TRACE-FUNCTION + BREAK-FUNCTION XCL:UNADVISE-FUNCTION CL:DELETE) %%FLATTEN-ARRAY (CL:MAKE-ARRAY) \UFSGetPrintFileType +(CL:ASSOC) SI::MAKE-AROUND-BODY (CL:REDUCE) COMPILER::FRAME-ANNOTATE-GO (CL:PUSHNEW) CHECKSAMEDIR ( +CL:MEMBER) MAKE-PACKAGE-HASHTABLE (CL:MAKE-ARRAY) COMPILER::FIND-REACHABLE-TAGS (CL:MAKE-HASH-TABLE) +\LEAF.DIRECTORYNAMEP (CL:MEMBER) COMPILER:ENV-BOUNDP (CL:MEMBER) COMPILER::COMPILE-ONE-LAMBDA ( +COMPILER::ALPHA-LAMBDA) XCL::ADD-PROTOTYPE-FN (CL:ASSOC) EXEC-PRIN1 (WRITE) \PAPERSIZE.IP (CL:ASSOC) +CL:ADJUST-ARRAY (CL:MAKE-ARRAY) COMPILER::ENV-PROCLAIMED-GLOBAL-P (CL:MEMBER) +%%DESTRUCTIVE-RESULT-VECTOR (CL:MAKE-ARRAY COPY-VECTOR) CL:COMPILE-FILE (COMPILER:MAKE-CONTEXT OPEN +CL:MAKE-PATHNAME) FORMAT-EAT-WHITESPACE (CL:POSITION-IF-NOT) POSTSCRIPT.INIT (CL:MAKE-ARRAY) CL:PROVIDE + (CL:PUSHNEW) FB.UPDATEBROWSERITEMS (CL:POSITION) COMPILER::ALPHA-COMBINATION (CL:MEMBER) +\UFSGetFileType (CL:ASSOC) CL::BASE-SUBTYPEP (CL:MEMBER CL:ASSOC) NewPrinter (CL:MEMBER) EXEC-PRINT ( +WRITE) DBG::STACK-FRAME-STOREFN (CL:ASSOC) XCL::WHERE-IS-NAMESTRING (CL:MAKE-PATHNAME) +CL::INSERT-INCLUDED-SLOT (CL:MEMBER) XCL::MAKE-PROTOTYPE (CL:ASSOC) HASH-LEFT-PAD-INITIAL-CONTENTS ( +CL:MAKE-LIST) CL::STRUCTURE-FUNCTION-P (CL:MEMBER) CL:BIT-NOT (CL:MAKE-ARRAY) \10MB.CREATENDB ( +CL:PUSHNEW) XCL:LIST-ALL-PROFILES (CL:PUSHNEW) CL:MAKE-STRING (MAKE-VECTOR) +COMPILER::COMPILE-DEFINER-PROCESS-FUNCTION (CL:REMOVE) \MAKERECODEMAP (CL:MAKE-ARRAY) XCL::WALK-ARGLIST + (CL:MEMBER) SEDIT::*FSPEC-TABLE* (CL:MAKE-HASH-TABLE) XCL::PROTOTYPE-DEFINERS-FOR-TYPE (CL:ASSOC) +WHITESPACE-CHAR-P (CL:MEMBER) SI::*ADVICE-HASH-TABLE* (CL:MAKE-HASH-TABLE) HASH-TABLE-FOR-DOC-TYPE ( +CL:MAKE-HASH-TABLE) COMPILE-FILE-SETF-SYMBOL-FUNCTION (WALK-FORM) NSDISPLAYSIZE (CL:MEMBER) +XCL:UNADVISE-FUNCTION (XCL:UNADVISE-FUNCTION) FB.CREATE.FILEBUCKET (STRING-EQUAL) SEDIT::LIST-FORMATS-TABLE + (CL:MAKE-HASH-TABLE) BREAK0 (BREAK-FUNCTION) CONSTANTEXPRESSIONP (COMPILER:MAKE-CONTEXT) CL:PRINC ( +WRITE) XCL:READVISE-FUNCTION (XCL:READVISE-FUNCTION XCL:UNADVISE-FUNCTION) PFI.CHOOSE.BEST ( +CL:STABLE-SORT) COMPILER::FRAME-ANNOTATE-BLOCK (CL:NUNION) FB.ADD.FILEGROUP (STRING-EQUAL) +COMPILER::COMPLETELY-EXPAND (CL:MEMBER) TRACE (XCL:TRACE-FUNCTION) XCL::*BREAK-HASH-TABLE* ( +CL:MAKE-HASH-TABLE) D-ASSEM::DCODE-FROM-DLAMBDA (CL:FIND) COMPILER::ENV-INLINE-DISALLOWED (CL:MEMBER) +FASL-FILEDATE (FASL:PROCESS-FILE) SI::ADVICE-PUTDEF (XCL:READVISE-FUNCTION) DBG::STACK-FRAME-FETCHFN ( +CL:ASSOC) FASL::NEW-VALUE-TABLE (CL:MAKE-ARRAY) OPENPOSTSCRIPTSTREAM (CL:ASSOC) CL::*TYPEP-HASH-TABLE* + (CL:MAKE-HASH-TABLE) HASH-STAR (CL:MAKE-ARRAY) FB.COPY/RENAME.MANY (STRING-EQUAL) COPY-ARRAY ( +CL:MAKE-ARRAY) XCL::VARIABLE-LEXICALLY-BOUNDP (CL:MEMBER) MAKE-SEQUENCE-OF-TYPE (MAKE-VECTOR) +COMPILER::FRAME-ANNOTATE-RETURN (CL:PUSHNEW) COMP.LABELS (WALK-FORM) *DEFINITION-HASH-TABLE* ( +CL:MAKE-HASH-TABLE) COMPILER::*ARGUMENT-CONTEXT* (COMPILER:MAKE-CONTEXT) CL:PRIN1 (WRITE) CHAT.STARTUP + (CL:ASSOC CL:MEMBER) REMOVE-COMMENTS (CL:MEMBER) OPEN (CL:MEMBER) COMPILER::ALPHA-EVAL-WHEN (CL:MEMBER +) MAPFILES1 (STRING-EQUAL) SI::FINISH-UNADVISING (CL:DELETE) XCL:ADVISE-FUNCTION (XCL:ADVISE-FUNCTION +CL:MEMBER) POSTSCRIPTFILEP (CL:MEMBER) DECLARERECORD (CL:MEMBER) D-ASSEM::DETERMINE-LOCAL-FN-LEXICAL-LEVEL + (CL:MEMBER) FB.SORTCOMMAND (CL:POSITION) READHASHMACRO (CL:MAKE-ARRAY) XCL::*PROFILES* ( +CL:MAKE-HASH-TABLE) SI::HAS-CALLS (CL:FIND) SUBRNUMBER (CL:ASSOC) D-ASSEM:ASSEMBLE-FUNCTION ( +CL:MAKE-HASH-TABLE) COMPILER::ENV-INLINE-ALLOWED (CL:MEMBER) XCL:TRACE-FUNCTION (XCL:TRACE-FUNCTION +CL:DELETE) COMP.TRANSFORM (COMPILER:MAKE-CONTEXT) CHARCODE.DECODE (CL:PARSE-INTEGER) +XCL::HASH-FILE-WHERE-IS (CL:REMOVE-DUPLICATES) CL::%%MAKE-RANDOM-ARRAY (CL:MAKE-ARRAY) CONVERT-LITATOM + (INTERN-LITATOM) CL:MAKE-SEQUENCE (CL:MAKE-LIST) FB.INSERT.FILE (STRING-EQUAL) +RESOLVE-READER-CONFLICT (CL:MEMBER) CANONICAL.HOSTNAME (CL:ASSOC) SI::ADD-CHANGED-CALL (CL:MEMBER +CL:DELETE) FIND-HISTORY-EVENTS (CL:MEMBER) DBG::COLLECT-ACTIVE-ESCAPES (CL:DELETE-DUPLICATES) NIL +FLET D-ASSEM::STACK-ANALYZE-CODE (D-ASSEM::STACK-AMBIGUOUS-ERROR) SI::SPLIT-PROCEED-CLAUSES ( +SI::MAYBE-QUOTE) RAISE-SIGNAL (TRY-TO-HANDLE) CL::INSERT-INCLUDED-SLOT (CL::SAME-SLOT) +SI::EXPAND-CONDITION-CASE (SI::CONSTRUCT-NO-ERROR-CODE) COMPILER::GENCODE-BLOCK ( +COMPILER::GENCODE-CLOSED-OVER-BLOCK) UNTRACE (CL::UNTRACE-ENTRY) REBREAK (REBREAK-FN) READVISE ( +READVISE-ENTRY) RESOLVE-USE-PACKAGE-CONFLICT (XCL::FILTER) COMPILER::START-COMPILATION (COMPILER::DATE-STRING +) RESOLVE-UNINTERN-CONFLICT (XCL::FILTER) WALK-PROCEED-CASES (CONVERT-PROCEED-CASE) +INSTALL-PROTOTYPE-DEFN (MAKE-AND-INSTALL) RESOLVE-MISSING-PACKAGE (FILTER) RESOLVE-EXPORT-CONFLICT ( +XCL::FILTER) CONDITIONS:FIND-RESTART (CONDITIONS::SAME-RESTART) COMPILER::GENCODE-MV-CALL ( +COMPILER::GENERATE-VALUES) RESOLVE-MISSING-EXTERNAL-SYMBOL (FILTER) COMP.LABELS (TRANSFORM) UNBREAK ( +XCL::UNBREAK-ENTRY) RESOLVE-IMPORT-CONFLICT (XCL::FILTER) COMPILER::PROCESS-DECLARATIONS ( +COMPILER::CHECK-VAR-1) UNADVISE (UNADVISE-ENTRY) CL:Y-OR-N-P (CL::READ-CHAR-NOW) TYPESOF (RSHADOW) +READVISE1 (READVISE-ENTRY) WHO-LINE-CONTROL-SELECT (ENTRY-DESCRIPTION) RESOLVE-EXPORT-MISSING ( +XCL::FILTER) XCL::SAME-WHERE-IS-DATABASE (XCL::COERCE-TO-PATHAME) NIL LABEL COMPILER::META-CALL-LAMBDA-SIMPLIFY-PARAMETERS (COMPILER::ADD-PARAM COMPILER::CLOSE-LAMBDA COMPILER::NEW-LAMBDA COMPILER::OUTER-LAMBDA-P COMPILER::ENSURE-INNER-LAMBDA) COMPILER:ENV-FBOUNDP ( -COMPILER::FIND-FN) SI::INSERT-ADVICE-FORM (SI::EQUALISH) XCL::WALK-MACROLET (XCL::WALK-DEFINITIONS) +COMPILER::FIND-FN) XCL::WALK-MACROLET (XCL::WALK-DEFINITIONS) SI::INSERT-ADVICE-FORM (SI::EQUALISH) NIL -MACROLET FNUM-STRING (STRPUT) FLONUM-TO-STRING (STRPUT) CL:INTEGER-LENGTH (CL::BITS-OR-LESS-P) -D-ASSEM::STACK-ANALYZE-CODE (D-ASSEM::CHECK-STACK) \\INTERPRET-ARGUMENTS (RECUR WITH-BINDING) -COMPILER::PRINT-CONTEXT (COMPILER::OUTPUT) ENUM-STRING (STRPUT) SI::EXPAND-CONDITION-CASE ( -SI::BOUND-TYPES) FASL::DUMP-DCODE (FASL::DUMP-SEQ) COMPILER::PRINT-NODE (COMPILER::NEW-LINE -COMPILER::PRINT-BLIPPER-INFO) COMPILER::PROCESS-DECLARATIONS (COMPILER::CHECK-VAR) CL:FORMAT ( -CL::WITH-FORMAT-ESCAPES) PRINT-BITMAPS-NICELY (ELIDE?) \\IDATE-PARSE-MONTH (DISCRIMINATE -DISCRIMINATE-1 DISCRIMINATE-2) \\CONVERT.FLOATING.NUMBER (STRPUT) NIL +MACROLET CL:INTEGER-LENGTH (CL::BITS-OR-LESS-P) D-ASSEM::STACK-ANALYZE-CODE (D-ASSEM::CHECK-STACK) +\CONVERT.FLOATING.NUMBER (STRPUT) SI::EXPAND-CONDITION-CASE (SI::BOUND-TYPES) FNUM-STRING (STRPUT) +FASL::DUMP-DCODE (FASL::DUMP-SEQ) COMPILER::PRINT-CONTEXT (COMPILER::OUTPUT) COMPILER::PROCESS-DECLARATIONS + (COMPILER::CHECK-VAR) FLONUM-TO-STRING (STRPUT) COMPILER::PRINT-NODE (COMPILER::NEW-LINE +COMPILER::PRINT-BLIPPER-INFO) PRINT-BITMAPS-NICELY (ELIDE?) \INTERPRET-ARGUMENTS (RECUR WITH-BINDING) +CL:FORMAT (CL::WITH-FORMAT-ESCAPES) ENUM-STRING (STRPUT) \IDATE-PARSE-MONTH (DISCRIMINATE +DISCRIMINATE-1 DISCRIMINATE-2) NIL ) -(DECLARE\: DONTCOPY +(DECLARE%: DONTCOPY (FILEMAP (NIL))) STOP diff --git a/loadups/full.dribble b/loadups/full.dribble index 1aa2177c3..32d88f5d3 100644 --- a/loadups/full.dribble +++ b/loadups/full.dribble @@ -1,12 +1,12 @@ -Full loadup started at 6-May-2021 15:26:50 while connected to -{DSK}larry>ilisp>medley> +Full loadup started at 27-Jul-2021 21:13:36 while connected to +{DSK}larry>new>medley> loading POSTSCRIPTSTREAM -{DSK}larry>ilisp>medley>library>POSTSCRIPTSTREAM.LCOM;1 -compiled on 14-May-2018 10:53:32 -File created 14-May-2018 10:52:48 +{DSK}larry>new>medley>library>POSTSCRIPTSTREAM.LCOM;1 +compiled on 21-Jun-2021 20:29:51 +File created 21-Jun-2021 20:29:32 POSTSCRIPTSTREAMCOMS Loading FULL fonts... Loading CLASSIC 8 10 12 @@ -16,147 +16,147 @@ Loading FULL fonts... FULL fonts loaded loading CHAT -{DSK}larry>ilisp>medley>library>CHAT.LCOM;1 -compiled on 25-Oct-93 12:23:25 +{DSK}larry>new>medley>library>CHAT.LCOM;1 +compiled on 13-Jun-2021 22:04:59 File created 20-Jan-93 13:46:52 CHATCOMS -{DSK}larry>ilisp>medley>library>DMCHAT.LCOM;1 +{DSK}larry>new>medley>library>DMCHAT.LCOM;1 compiled on 25-Feb-93 18:08:53 File created 20-Jan-93 13:49:09 DMCHATCOMS -{DSK}larry>ilisp>medley>library>CHATTERMINAL.LCOM;1 +{DSK}larry>new>medley>library>CHATTERMINAL.LCOM;1 compiled on 24-Feb-93 19:37:23 File created 4-Jul-90 02:21:01 CHATTERMINALCOMS loading PRESS -{DSK}larry>ilisp>medley>library>PRESS.LCOM;1 +{DSK}larry>new>medley>library>PRESS.LCOM;1 compiled on 5-Feb-2021 22:18:09 File created 5-Feb-2021 22:18:06 PRESSCOMS loading INTERPRESS -{DSK}larry>ilisp>medley>sources>INTERPRESS.LCOM;7 -compiled on 16-Apr-2018 21:56:38 -File created 16-Apr-2018 21:56:38 +{DSK}larry>new>medley>sources>INTERPRESS.LCOM;7 +compiled on 27-Jun-2021 23:51:06 +File created 27-Jun-2021 23:50:51 INTERPRESSCOMS loading TEDIT -{DSK}larry>ilisp>medley>library>TEDIT.LCOM;1 +{DSK}larry>new>medley>library>TEDIT.LCOM;1 compiled on 18-May-2018 09:16:24 File created 19-Apr-2018 12:22:03 TEDITCOMS -{DSK}larry>ilisp>medley>library>TEDITDCL.LCOM;1 +{DSK}larry>new>medley>library>TEDITDCL.LCOM;1 compiled on 30-Apr-2021 17:26:58 File created 30-Apr-2021 17:26:17 TEDITDCLCOMS -{DSK}larry>ilisp>medley>library>PCTREE.LCOM;1 +{DSK}larry>new>medley>library>PCTREE.LCOM;1 compiled on 18-May-2018 09:19:35 File created 19-Apr-2018 12:19:49 PCTREECOMS -{DSK}larry>ilisp>medley>library>TEXTOFD.LCOM;1 -compiled on 11-Feb-2001 12:06:43 -File created 11-Feb-2001 12:06:42 +{DSK}larry>new>medley>library>TEXTOFD.LCOM;1 +compiled on 14-Jun-2021 23:30:39 +File created 6-May-2021 10:18:06 TEXTOFDCOMS -{DSK}larry>ilisp>medley>library>TEDITCOMMAND.LCOM;1 +{DSK}larry>new>medley>library>TEDITCOMMAND.LCOM;1 compiled on 18-May-2018 09:16:59 File created 20-Apr-2018 08:07:35 TEDITCOMMANDCOMS -{DSK}larry>ilisp>medley>library>TEDITSCREEN.LCOM;1 +{DSK}larry>new>medley>library>TEDITSCREEN.LCOM;1 compiled on 30-Apr-2021 14:42:15 File created 30-Apr-2021 14:42:15 TEDITSCREENCOMS -{DSK}larry>ilisp>medley>library>TEDITABBREV.LCOM;1 +{DSK}larry>new>medley>library>TEDITABBREV.LCOM;1 compiled on 6-Aug-2020 14:52:14 File created 6-Aug-2020 14:52:14 TEDITABBREVCOMS -{DSK}larry>ilisp>medley>library>TEDITLOOKS.LCOM;1 +{DSK}larry>new>medley>library>TEDITLOOKS.LCOM;1 compiled on 18-May-2018 09:17:44 File created 29-Jan-99 17:33:35 TEDITLOOKSCOMS -{DSK}larry>ilisp>medley>library>TEDITFIND.LCOM;1 +{DSK}larry>new>medley>library>TEDITFIND.LCOM;1 compiled on 18-May-2018 09:17:21 File created 6-May-2018 17:34:44 TEDITFINDCOMS -{DSK}larry>ilisp>medley>library>TEDITHISTORY.LCOM;1 +{DSK}larry>new>medley>library>TEDITHISTORY.LCOM;1 compiled on 18-May-2018 09:17:41 File created 29-Jan-99 17:34:39 TEDITHISTORYCOMS -{DSK}larry>ilisp>medley>library>TEDITFILE.LCOM;1 -compiled on 30-Apr-2021 14:46:41 +{DSK}larry>new>medley>library>TEDITFILE.LCOM;1 +compiled on 12-Jun-2021 12:03:35 File created 30-Apr-2021 14:46:41 TEDITFILECOMS -{DSK}larry>ilisp>medley>library>TEDITWINDOW.LCOM;1 +{DSK}larry>new>medley>library>TEDITWINDOW.LCOM;1 compiled on 18-May-2018 09:18:51 File created 21-Jun-99 20:00:42 TEDITWINDOWCOMS -{DSK}larry>ilisp>medley>library>TEDITSELECTION.LCOM;1 +{DSK}larry>new>medley>library>TEDITSELECTION.LCOM;1 compiled on 18-May-2018 09:18:43 File created 25-Aug-94 10:56:07 TEDITSELECTIONCOMS -{DSK}larry>ilisp>medley>library>IMAGEOBJ.LCOM;1 +{DSK}larry>new>medley>library>IMAGEOBJ.LCOM;1 compiled on 8-Feb-97 11:26:32 File created 7-Dec-95 13:21:56 IMAGEOBJCOMS -{DSK}larry>ilisp>medley>library>EDITBITMAP.LCOM;1 +{DSK}larry>new>medley>library>EDITBITMAP.LCOM;1 compiled on 25-Feb-93 18:10:27 File created 11-Jun-90 15:42:25 EDITBITMAPCOMS -{DSK}larry>ilisp>medley>library>READNUMBER.LCOM;1 +{DSK}larry>new>medley>library>READNUMBER.LCOM;1 compiled on 16-Aug-95 11:18:52 File created 25-May-93 00:28:30 READNUMBERCOMS -{DSK}larry>ilisp>medley>library>TFBRAVO.LCOM;1 -compiled on 19-Apr-2018 12:19:55 -File created 19-Apr-2018 12:19:55 +{DSK}larry>new>medley>library>TFBRAVO.LCOM;1 +compiled on 13-Jun-2021 09:46:34 +File created 13-Jun-2021 09:46:34 TFBRAVOCOMS -{DSK}larry>ilisp>medley>library>TEDITHCPY.LCOM;1 -compiled on 18-May-2018 09:17:32 -File created 25-Aug-94 10:54:07 +{DSK}larry>new>medley>library>TEDITHCPY.LCOM;1 +compiled on 28-Jun-2021 12:35:45 +File created 28-Jun-2021 12:35:45 TEDITHCPYCOMS -{DSK}larry>ilisp>medley>library>TEDITPAGE.LCOM;1 +{DSK}larry>new>medley>library>TEDITPAGE.LCOM;1 compiled on 18-May-2018 09:18:32 File created 25-Aug-94 10:55:28 TEDITPAGECOMS -{DSK}larry>ilisp>medley>library>TEDITMENU.LCOM;1 +{DSK}larry>new>medley>library>TEDITMENU.LCOM;1 compiled on 29-Apr-2021 22:44:22 File created 29-Apr-2021 22:44:22 TEDITMENUCOMS -{DSK}larry>ilisp>medley>library>TEDITFNKEYS.LCOM;1 +{DSK}larry>new>medley>library>TEDITFNKEYS.LCOM;1 compiled on 18-May-2018 09:17:25 File created 6-May-2018 17:15:13 TEDITFNKEYSCOMS loading HRULE -{DSK}larry>ilisp>medley>library>HRULE.LCOM;1 +{DSK}larry>new>medley>library>HRULE.LCOM;1 compiled on 26-Feb-93 11:26:19 File created 8-Oct-92 16:50:21 HRULECOMS loading TEDITCHAT -{DSK}larry>ilisp>medley>library>TEDITCHAT.LCOM;1 +{DSK}larry>new>medley>library>TEDITCHAT.LCOM;1 compiled on 18-May-2018 09:16:55 File created 28-Mar-94 16:05:24 IL:TEDITCHATCOMS @@ -164,121 +164,121 @@ loading READNUMBER loading EDITBITMAP loading FILEBROWSER -{DSK}larry>ilisp>medley>library>FILEBROWSER.LCOM;1 -compiled on 27-Feb-2021 20:08:26 -File created 27-Feb-2021 20:08:26 +{DSK}larry>new>medley>library>FILEBROWSER.LCOM;1 +compiled on 9-Jul-2021 23:09:57 +File created 9-Jul-2021 23:09:57 -{DSK}larry>ilisp>medley>library>TABLEBROWSER.LCOM;1 +{DSK}larry>new>medley>library>TABLEBROWSER.LCOM;1 compiled on 20-Feb-2021 23:04:42 File created 20-Feb-2021 23:02:39 TABLEBROWSERCOMS loading THINFILES -{DSK}larry>ilisp>medley>lispusers>THINFILES.LCOM;1 +{DSK}larry>new>medley>lispusers>THINFILES.LCOM;1 compiled on 26-Jun-99 00:47:00 File created 1-May-92 16:49:39 THINFILESCOMS loading GRAPHER -{DSK}larry>ilisp>medley>library>GRAPHER.LCOM;1 +{DSK}larry>new>medley>library>GRAPHER.LCOM;1 compiled on 14-Mar-2021 20:40:31 File created 14-Mar-2021 20:40:30 GRAPHERCOMS loading SPY -{DSK}larry>ilisp>medley>library>SPY.LCOM;1 +{DSK}larry>new>medley>library>SPY.LCOM;1 compiled on 23-Aug-94 16:33:38 File created 29-Apr-94 14:13:52 SPYCOMS loading WHERE-IS -{DSK}larry>ilisp>medley>library>WHERE-IS.DFASL;1 +{DSK}larry>new>medley>library>WHERE-IS.DFASL;1 XCL Compiler output for source file {DSK}lde>lispcore>library>WHERE-IS.;1 Source file created Wednesday, 13 June 1990, 1:16:15. FASL file created Thursday, 21 January 1993, 18:52:55. -{DSK}larry>ilisp>medley>library>HASH-FILE.dfasl;1 +{DSK}larry>new>medley>library>HASH-FILE.dfasl;1 XCL Compiler output for source file {PELE:MV:ENVOS}LIBRARY>HASH-FILE.;2 Source file created Monday, 11 June 1990, 16:16:54. FASL file created Friday, 26 February 1993, 11:23:40. -{DSK}larry>ilisp>medley>library>CASH-FILE.DFASL;5 +{DSK}larry>new>medley>library>CASH-FILE.DFASL;5 XCL Compiler output for source file {DSK}local>lde>lispcore>library>CASH-FILE.;2 Source file created 11-Jun-90 14:33:44 FASL file created Saturday, 19 September 2020, 22:04:31 loading COPYFILES -{DSK}larry>ilisp>medley>library>COPYFILES.LCOM;1 +{DSK}larry>new>medley>library>COPYFILES.LCOM;1 compiled on 6-Apr-2018 21:14:29 File created 6-Apr-2018 21:14:29 COPYFILESCOMS loading MSANALYZE -{DSK}larry>ilisp>medley>library>MSANALYZE.DFASL;1 +{DSK}larry>new>medley>library>MSANALYZE.DFASL;1 XCL Compiler output for source file {DSK}larry>ilisp>medley>library>MSANALYZE.;2 Source file created 3-Mar-2021 10:31:16 FASL file created Wednesday, 3 March 2021, 10:31:16 loading MSPARSE -{DSK}larry>ilisp>medley>library>MSPARSE.DFASL;1 +{DSK}larry>new>medley>library>MSPARSE.DFASL;1 XCL Compiler output for source file {PELE:MV:ENVOS}LIBRARY>MSPARSE.;5 Source file created Wednesday, 15 August 1990, 13:00:12. FASL file created Sunday, 28 February 1993, 23:24:50. loading MASTERSCOPE -{DSK}larry>ilisp>medley>library>MASTERSCOPE.DFASL;4 -XCL Compiler output for source file {DSK}larry>ilisp>medley>library>MASTERSCOPE.;6 -Source file created 7-Mar-2021 19:39:11 -FASL file created Sunday, 7 March 2021, 20:20:40 +{DSK}larry>new>medley>library>MASTERSCOPE.DFASL;4 +XCL Compiler output for source file {DSK}kaplan>Local>medley3.5>git-medley>library>MASTERSCOPE.;6 +Source file created 13-Jun-2021 09:05:17 +FASL file created Sunday, 13 June 2021, 9:05:17 -{DSK}larry>ilisp>medley>library>MSCOMMON.DFASL;1 +{DSK}larry>new>medley>library>MSCOMMON.DFASL;1 XCL Compiler output for source file {PELE:MV:ENVOS}LIBRARY>MSCOMMON.;3 Source file created Monday, 4 May 1992, 13:19:40. FASL file created Sunday, 28 February 1993, 23:23:14. loading UNIXPRINT -{DSK}larry>ilisp>medley>library>UNIXPRINT.DFASL;1 +{DSK}larry>new>medley>library>UNIXPRINT.DFASL;1 XCL Compiler output for source file {DSK}kaplan>Local>medley3.5>lispcore>library>UNIXPRINT.;8 Source file created Friday, 4 May 2018, 17:18:00. FASL file created Friday, 4 May 2018, 17:18:00. -{DSK}larry>ilisp>medley>library>UNIXCOMM.LCOM;1 +{DSK}larry>new>medley>library>UNIXCOMM.LCOM;1 compiled on 25-Apr-2018 07:31:56 File created 25-Apr-2018 07:31:56 UNIXCOMMCOMS loading UNICODE -{DSK}larry>ilisp>medley>library>UNICODE.LCOM;18 -compiled on 1-Feb-2021 18:00:30 -File created 1-Feb-2021 18:00:30 +{DSK}larry>new>medley>library>UNICODE.LCOM;18 +compiled on 3-Jul-2021 13:37:33 +File created 3-Jul-2021 13:37:33 UNICODECOMS loading ISO8859IO -{DSK}larry>ilisp>medley>lispusers>ISO8859IO.LCOM;1 -compiled on 24-Apr-2021 17:06:43 -File created 24-Apr-2021 17:06:30 +{DSK}larry>new>medley>lispusers>ISO8859IO.LCOM;1 +compiled on 23-Jun-2021 17:00:30 +File created 23-Jun-2021 17:00:30 ISO8859IOCOMS loading HELPSYS -{DSK}larry>ilisp>medley>lispusers>HELPSYS.LCOM;1 +{DSK}larry>new>medley>lispusers>HELPSYS.LCOM;1 compiled on 27-Nov-2020 11:23:11 File created 27-Nov-2020 09:47:44 HELPSYSCOMS -{DSK}larry>ilisp>medley>lispusers>DINFO.LCOM;1 +{DSK}larry>new>medley>lispusers>DINFO.LCOM;1 compiled on 14-Feb-2021 23:11:53 File created 14-Feb-2021 23:11:36 DINFOCOMS -{DSK}larry>ilisp>medley>library>HASH.LCOM;1 +{DSK}larry>new>medley>library>HASH.LCOM;1 compiled on 26-Feb-93 11:22:10 File created 11-Jun-90 16:23:11 HASHCOMS @@ -286,25 +286,25 @@ HASHCOMS Reading IRM graph...OK.loading DINFO loading CLIPBOARD -{DSK}larry>ilisp>medley>library>CLIPBOARD.LCOM;1 -compiled on 23-Feb-2021 22:13:09 -File created 23-Feb-2021 22:13:09 +{DSK}larry>new>medley>library>CLIPBOARD.LCOM;1 +compiled on 3-Jul-2021 13:16:26 +File created 3-Jul-2021 13:16:26 CLIPBOARDCOMS loading MODERNIZE -{DSK}larry>ilisp>medley>lispusers>MODERNIZE.LCOM;1 -compiled on 14-Mar-2021 20:33:34 -File created 14-Mar-2021 20:33:34 +{DSK}larry>new>medley>lispusers>MODERNIZE.LCOM;1 +compiled on 8-Jul-2021 23:33:42 +File created 8-Jul-2021 23:33:42 MODERNIZECOMS loading PRETTYFILEINDEX -{DSK}larry>ilisp>medley>lispusers>PRETTYFILEINDEX.LCOM;3 -compiled on 28-Jun-99 17:13:58 -File created 28-Jun-99 17:13:51 +{DSK}larry>new>medley>lispusers>PRETTYFILEINDEX.LCOM;3 +compiled on 9-Jul-2021 21:55:15 +File created 9-Jul-2021 21:55:15 PRETTYFILEINDEXCOMS loading WHO-LINE -{DSK}larry>ilisp>medley>lispusers>WHO-LINE.DFASL;1 +{DSK}larry>new>medley>lispusers>WHO-LINE.DFASL;1 XCL Compiler output for source file {DSK}larry>ilisp>medley>lispusers>WHO-LINE.;4 Source file created 26-Mar-2021 11:01:59 FASL file created Friday, 26 March 2021, 11:01:59 @@ -312,7 +312,7 @@ FASL file created Friday, 26 March 2021, 11:01:59 loading UNIXCOMM loading UNIXCHAT -{DSK}larry>ilisp>medley>library>UNIXCHAT.LCOM;1 +{DSK}larry>new>medley>library>UNIXCHAT.LCOM;1 compiled on 21-Jan-93 18:45:15 File created 15-Aug-90 11:05:53 UNIXCHATCOMS diff --git a/loadups/full.sysout b/loadups/full.sysout index ce12b4a50..dfe23813e 100644 Binary files a/loadups/full.sysout and b/loadups/full.sysout differ diff --git a/loadups/lisp.dribble b/loadups/lisp.dribble index fa5abbb83..d8dcdba97 100644 --- a/loadups/lisp.dribble +++ b/loadups/lisp.dribble @@ -48,6 +48,7 @@ IOCHAR bootloaded LLDATATYPE bootloaded LLSTK bootloaded LLCHAR bootloaded +XCCS bootloaded LLREAD bootloaded LLBIGNUM bootloaded LLFLOAT bootloaded @@ -72,840 +73,840 @@ loading MACHINEINDEPENDENT loading POSTLOADUP loading LISP-PACKAGE -{DSK}larry>ilisp>medley>sources>LISP-PACKAGE.LCOM;1 +{DSK}larry>new>medley>sources>LISP-PACKAGE.LCOM;1 compiled on 25-Jan-98 15:03:32 File created 16-May-90 18:44:49 IL:LISP-PACKAGECOMS loading FASL-PACKAGE -{DSK}larry>ilisp>medley>sources>FASL-PACKAGE.LCOM;1 +{DSK}larry>new>medley>sources>FASL-PACKAGE.LCOM;1 compiled on 25-Jan-98 13:21:46 File created 16-May-90 16:33:38 IL:FASL-PACKAGECOMS loading D-ASSEM-PACKAGE -{DSK}larry>ilisp>medley>sources>D-ASSEM-PACKAGE.LCOM;1 +{DSK}larry>new>medley>sources>D-ASSEM-PACKAGE.LCOM;1 compiled on 25-Jan-98 12:20:01 File created 8-Jan-91 00:37:24 IL:D-ASSEM-PACKAGECOMS loading COMPILER-PACKAGE -{DSK}larry>ilisp>medley>sources>COMPILER-PACKAGE.LCOM;1 +{DSK}larry>new>medley>sources>COMPILER-PACKAGE.LCOM;1 compiled on 25-Jan-98 11:43:48 File created 16-May-90 15:03:20 IL:COMPILER-PACKAGECOMS loading ERROR-RUNTIME -{DSK}larry>ilisp>medley>sources>ERROR-RUNTIME.LCOM;1 +{DSK}larry>new>medley>sources>ERROR-RUNTIME.LCOM;1 compiled on 25-Jan-98 13:15:12 File created 16-May-90 16:27:39 loading CMLARITH -{DSK}larry>ilisp>medley>sources>CMLARITH.LCOM;1 -compiled on 25-Jan-98 09:40:28 +{DSK}larry>new>medley>sources>CMLARITH.LCOM;1 +compiled on 13-Jun-2021 21:16:13 File created 4-Jan-93 17:38:48 loading CONDITION-HIERARCHY -{DSK}larry>ilisp>medley>sources>CONDITION-HIERARCHY.LCOM;1 +{DSK}larry>new>medley>sources>CONDITION-HIERARCHY.LCOM;1 compiled on 25-Jan-98 11:43:54 File created 22-Aug-90 09:45:58 -{DSK}larry>ilisp>medley>sources>CONDITION-HIERARCHY-SI.LCOM;1 +{DSK}larry>new>medley>sources>CONDITION-HIERARCHY-SI.LCOM;1 compiled on 25-Jan-98 11:52:40 File created 16-May-90 15:05:52 -{DSK}larry>ilisp>medley>sources>CONDITION-HIERARCHY-POST-SI.LCOM;1 +{DSK}larry>new>medley>sources>CONDITION-HIERARCHY-POST-SI.LCOM;1 compiled on 25-Jan-98 11:52:26 File created 16-May-90 15:05:05 -{DSK}larry>ilisp>medley>sources>CONDITION-HIERARCHY-IL.LCOM;1 +{DSK}larry>new>medley>sources>CONDITION-HIERARCHY-IL.LCOM;1 compiled on 25-Jan-98 11:50:25 File created 16-May-90 15:04:10 loading CMLHASH -{DSK}larry>ilisp>medley>sources>CMLHASH.LCOM;1 +{DSK}larry>new>medley>sources>CMLHASH.LCOM;1 compiled on 25-Jan-98 10:17:44 File created 16-May-90 13:25:03 loading D-ASSEM -{DSK}larry>ilisp>medley>sources>D-ASSEM.LCOM;1 +{DSK}larry>new>medley>sources>D-ASSEM.LCOM;1 compiled on 25-Jan-98 12:01:26 File created 1-Dec-92 02:18:56 loading FASLOAD -{DSK}larry>ilisp>medley>sources>FASLOAD.LCOM;1 -compiled on 31-Jan-98 09:39:23 -File created 25-Nov-92 12:35:33 +{DSK}larry>new>medley>sources>FASLOAD.LCOM;1 +compiled on 10-Jun-2021 18:26:43 +File created 10-Jun-2021 18:26:43 loading DEFFER-RUNTIME -{DSK}larry>ilisp>medley>sources>DEFFER-RUNTIME.LCOM;1 +{DSK}larry>new>medley>sources>DEFFER-RUNTIME.LCOM;1 compiled on 25-Jan-98 12:24:48 File created 16-May-90 15:30:14 loading CMLPRINT -{DSK}larry>ilisp>medley>sources>CMLPRINT.LCOM;1 -compiled on 25-Jan-98 10:30:50 +{DSK}larry>new>medley>sources>CMLPRINT.LCOM;1 +compiled on 13-Jun-2021 21:13:01 File created 16-May-90 14:19:58 loading CLSTREAMS -{DSK}larry>ilisp>medley>sources>CLSTREAMS.LCOM;1 -compiled on 25-Jan-98 09:36:01 +{DSK}larry>new>medley>sources>CLSTREAMS.LCOM;1 +compiled on 13-Jun-2021 21:15:29 File created 3-Apr-91 15:11:53 loading CMLSTRING -{DSK}larry>ilisp>medley>sources>CMLSTRING.LCOM;1 +{DSK}larry>new>medley>sources>CMLSTRING.LCOM;1 compiled on 25-Jan-98 11:21:16 File created 16-May-90 14:45:59 loading CMLSYMBOL -{DSK}larry>ilisp>medley>sources>CMLSYMBOL.LCOM;1 +{DSK}larry>new>medley>sources>CMLSYMBOL.LCOM;1 compiled on 25-Jan-98 11:30:38 File created 16-May-90 14:47:55 loading CMLTYPES -{DSK}larry>ilisp>medley>sources>CMLTYPES.LCOM;1 +{DSK}larry>new>medley>sources>CMLTYPES.LCOM;1 compiled on 25-Jan-98 11:31:44 File created 4-Jan-93 17:55:42 loading CMLSEQCOMMON -{DSK}larry>ilisp>medley>sources>CMLSEQCOMMON.LCOM;1 +{DSK}larry>new>medley>sources>CMLSEQCOMMON.LCOM;1 compiled on 25-Jan-98 10:35:19 File created 16-May-90 14:28:05 loading CMLSEQMAPPERS -{DSK}larry>ilisp>medley>sources>CMLSEQMAPPERS.LCOM;1 +{DSK}larry>new>medley>sources>CMLSEQMAPPERS.LCOM;1 compiled on 25-Jan-98 10:40:02 File created 16-May-90 14:31:36 loading CMLPATHNAME -{DSK}larry>ilisp>medley>sources>CMLPATHNAME.LCOM;1 +{DSK}larry>new>medley>sources>CMLPATHNAME.LCOM;1 compiled on 25-Jan-98 10:28:38 File created 28-Sep-90 15:14:19 loading CMLFILESYS -{DSK}larry>ilisp>medley>sources>CMLFILESYS.LCOM;1 +{DSK}larry>new>medley>sources>CMLFILESYS.LCOM;1 compiled on 25-Jan-98 10:07:48 File created 8-Jun-90 16:41:26 loading CMLDEFFER -{DSK}larry>ilisp>medley>sources>CMLDEFFER.DFASL;1 +{DSK}larry>new>medley>sources>CMLDEFFER.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>CMLDEFFER.;1 Source file created Sunday, 3 June 1990, 23:11:46. FASL file created Wednesday, 28 January 1998, 16:41:48. loading ERROR-RUNTIME-AFTER-FASL -{DSK}larry>ilisp>medley>sources>ERROR-RUNTIME-AFTER-FASL.DFASL;1 +{DSK}larry>new>medley>sources>ERROR-RUNTIME-AFTER-FASL.DFASL;1 XCL Compiler output for source file {DSK}sources>ERROR-RUNTIME-AFTER-FASL.;1 Source file created Wednesday, 16 May 1990, 16:14:06. FASL file created Sunday, 25 January 1998, 13:18:10. loading WRAPPERS -{DSK}larry>ilisp>medley>sources>WRAPPERS.LCOM;1 +{DSK}larry>new>medley>sources>WRAPPERS.LCOM;1 compiled on 26-Jan-98 13:55:56 File created 2-Feb-94 14:15:09 loading STACKFNS -{DSK}larry>ilisp>medley>sources>STACKFNS.LCOM;1 +{DSK}larry>new>medley>sources>STACKFNS.LCOM;1 compiled on 26-Jan-98 13:41:05 File created 17-May-90 15:48:43 STACKFNSCOMS STACKFNSCOMS loading CMLMVS -{DSK}larry>ilisp>medley>sources>CMLMVS.LCOM;1 +{DSK}larry>new>medley>sources>CMLMVS.LCOM;1 compiled on 25-Jan-98 10:25:04 File created 16-May-90 13:35:04 loading MACROS -{DSK}larry>ilisp>medley>sources>MACROS.LCOM;1 +{DSK}larry>new>medley>sources>MACROS.LCOM;1 compiled on 25-Jan-98 17:37:48 File created 16-May-90 20:28:24 loading MACROAUX -{DSK}larry>ilisp>medley>sources>MACROAUX.LCOM;1 +{DSK}larry>new>medley>sources>MACROAUX.LCOM;1 compiled on 25-Jan-98 17:37:05 File created 16-May-90 20:26:31 loading UNWINDMACROS -{DSK}larry>ilisp>medley>sources>UNWINDMACROS.LCOM;1 +{DSK}larry>new>medley>sources>UNWINDMACROS.LCOM;1 compiled on 26-Jan-98 13:53:42 File created 17-May-90 16:11:33 loading COMMON -{DSK}larry>ilisp>medley>sources>COMMON.LCOM;1 +{DSK}larry>new>medley>sources>COMMON.LCOM;1 compiled on 25-Jan-98 11:40:32 File created 16-May-90 14:58:17 loading XCLC-RUNTIME -{DSK}larry>ilisp>medley>sources>XCLC-RUNTIME.LCOM;1 +{DSK}larry>new>medley>sources>XCLC-RUNTIME.LCOM;1 compiled on 26-Jan-98 14:00:44 File created 23-May-90 13:18:14 loading CMLTYPES loading CL-ERROR -{DSK}larry>ilisp>medley>sources>CL-ERROR.DFASL;1 +{DSK}larry>new>medley>sources>CL-ERROR.DFASL;1 XCL Compiler output for source file {DSK}sources>CL-ERROR.;1 Source file created Wednesday, 21 August 1991, 17:03:40. FASL file created Sunday, 25 January 1998, 9:28:09. loading AFONT -{DSK}larry>ilisp>medley>sources>AFONT.DFASL;1 +{DSK}larry>new>medley>sources>AFONT.DFASL;1 XCL Compiler output for source file {DSK}sources>AFONT.;1 Source file created Wednesday, 16 May 1990, 11:47:29. FASL file created Sunday, 25 January 1998, 8:22:42. loading EDIT -{DSK}larry>ilisp>medley>sources>EDIT.LCOM;1 +{DSK}larry>new>medley>sources>EDIT.LCOM;1 compiled on 25-Jan-98 13:09:41 File created 16-May-90 16:23:16 EDITCOMS loading WEDIT -{DSK}larry>ilisp>medley>sources>WEDIT.LCOM;1 +{DSK}larry>new>medley>sources>WEDIT.LCOM;1 compiled on 26-Jan-98 13:54:04 File created 23-Oct-91 16:39:18 WEDITCOMS loading PRETTY -{DSK}larry>ilisp>medley>sources>PRETTY.LCOM;7 -compiled on 21-Feb-2021 10:59:08 -File created 21-Feb-2021 10:59:08 +{DSK}larry>new>medley>sources>PRETTY.LCOM;7 +compiled on 9-Jul-2021 14:12:19 +File created 9-Jul-2021 14:12:19 PRETTYCOMS loading DSPRINTDEF -{DSK}larry>ilisp>medley>sources>DSPRINTDEF.LCOM;1 -compiled on 25-Jan-98 12:58:43 +{DSK}larry>new>medley>sources>DSPRINTDEF.LCOM;1 +compiled on 13-Jun-2021 20:56:35 File created 19-Jan-93 10:27:05 DSPRINTDEFCOMS loading NEWPRINTDEF -{DSK}larry>ilisp>medley>sources>NEWPRINTDEF.LCOM;3 +{DSK}larry>new>medley>sources>NEWPRINTDEF.LCOM;3 compiled on 31-Dec-2000 11:53:35 File created 31-Dec-2000 11:53:33 NEWPRINTDEFCOMS loading FONTPROFILE -{DSK}larry>ilisp>medley>sources>FONTPROFILE.LCOM;1 +{DSK}larry>new>medley>sources>FONTPROFILE.LCOM;1 compiled on 14-May-2018 00:04:35 File created 28-Jun-99 22:10:46 FONTPROFILECOMS loading SPELLFILE -{DSK}larry>ilisp>medley>sources>SPELLFILE.LCOM;1 +{DSK}larry>new>medley>sources>SPELLFILE.LCOM;1 compiled on 26-Jan-98 13:37:13 File created 28-Apr-92 15:38:21 SPELLFILECOMS loading PRINTFN -{DSK}larry>ilisp>medley>sources>PRINTFN.LCOM;5 -compiled on 16-Apr-2018 21:40:32 -File created 16-Apr-2018 21:40:32 +{DSK}larry>new>medley>sources>PRINTFN.LCOM;5 +compiled on 27-Jun-2021 23:29:20 +File created 27-Jun-2021 23:29:20 PRINTFNCOMS loading LOADFNS -{DSK}larry>ilisp>medley>sources>LOADFNS.LCOM;11 +{DSK}larry>new>medley>sources>LOADFNS.LCOM;11 compiled on 16-Apr-2018 17:38:16 File created 16-Apr-2018 17:38:16 LOADFNSCOMS loading DMISC loading DIRECTORY -{DSK}larry>ilisp>medley>sources>DIRECTORY.LCOM;2 -compiled on 25-Jan-98 12:34:36 +{DSK}larry>new>medley>sources>DIRECTORY.LCOM;2 +compiled on 13-Jun-2021 20:54:06 File created 30-Apr-92 15:04:56 DIRECTORYCOMS loading SPELLFILE loading FILEPKG -{DSK}larry>ilisp>medley>sources>FILEPKG.LCOM;1 -compiled on 12-Feb-2021 17:16:06 -File created 12-Feb-2021 17:16:04 +{DSK}larry>new>medley>sources>FILEPKG.LCOM;1 +compiled on 3-Jul-2021 11:08:42 +File created 3-Jul-2021 11:08:42 FILEPKGCOMS loading RESOURCE -{DSK}larry>ilisp>medley>sources>RESOURCE.LCOM;1 +{DSK}larry>new>medley>sources>RESOURCE.LCOM;1 compiled on 26-Jan-98 13:30:19 File created 16-May-90 21:31:50 RESOURCECOMS loading HIST -{DSK}larry>ilisp>medley>sources>HIST.LCOM;1 +{DSK}larry>new>medley>sources>HIST.LCOM;1 compiled on 25-Jan-98 14:10:10 File created 10-Jul-91 12:07:43 HISTCOMS loading UNDO -{DSK}larry>ilisp>medley>sources>UNDO.LCOM;1 +{DSK}larry>new>medley>sources>UNDO.LCOM;1 compiled on 26-Jan-98 13:53:32 File created 17-May-90 16:09:40 UNDOCOMS loading SPELL -{DSK}larry>ilisp>medley>sources>SPELL.LCOM;1 +{DSK}larry>new>medley>sources>SPELL.LCOM;1 compiled on 26-Jan-98 13:37:04 File created 17-May-90 11:20:15 SPELLCOMS loading DWIM -{DSK}larry>ilisp>medley>sources>DWIM.LCOM;1 +{DSK}larry>new>medley>sources>DWIM.LCOM;1 compiled on 22-Mar-2021 14:37:47 File created 22-Mar-2021 14:37:45 DWIMCOMS loading WTFIX -{DSK}larry>ilisp>medley>sources>WTFIX.LCOM;1 +{DSK}larry>new>medley>sources>WTFIX.LCOM;1 compiled on 26-Jan-98 13:56:09 File created 18-May-90 01:12:06 WTFIXCOMS loading CLISP -{DSK}larry>ilisp>medley>sources>CLISP.LCOM;1 +{DSK}larry>new>medley>sources>CLISP.LCOM;1 compiled on 25-Jan-98 09:32:34 File created 16-May-90 12:27:02 loading DWIMIFY -{DSK}larry>ilisp>medley>sources>DWIMIFY.LCOM;1 +{DSK}larry>new>medley>sources>DWIMIFY.LCOM;1 compiled on 25-Jan-98 13:03:32 File created 16-May-90 16:21:27 DWIMIFYCOMS loading CLISPIFY -{DSK}larry>ilisp>medley>sources>CLISPIFY.LCOM;1 +{DSK}larry>new>medley>sources>CLISPIFY.LCOM;1 compiled on 25-Jan-98 09:33:48 File created 16-May-90 12:28:58 CLISPIFYCOMS loading RECORD -{DSK}larry>ilisp>medley>sources>RECORD.LCOM;1 +{DSK}larry>new>medley>sources>RECORD.LCOM;1 compiled on 26-Jan-98 13:29:01 File created 19-Jan-93 11:15:39 RECORDCOMS loading GAINSPACE -{DSK}larry>ilisp>medley>sources>GAINSPACE.LCOM;1 +{DSK}larry>new>medley>sources>GAINSPACE.LCOM;1 compiled on 25-Jan-98 14:03:59 File created 16-May-90 18:05:30 GAINSPACECOMS loading COROUTINE -{DSK}larry>ilisp>medley>sources>COROUTINE.LCOM;1 +{DSK}larry>new>medley>sources>COROUTINE.LCOM;1 compiled on 25-Jan-98 11:56:27 File created 16-May-90 15:10:30 loading ARGLIST -{DSK}larry>ilisp>medley>sources>ARGLIST.LCOM;1 +{DSK}larry>new>medley>sources>ARGLIST.LCOM;1 compiled on 25-Jan-98 08:30:09 File created 16-May-90 12:03:44 ARGLISTCOMS loading ASKUSER -{DSK}larry>ilisp>medley>sources>ASKUSER.LCOM;6 +{DSK}larry>new>medley>sources>ASKUSER.LCOM;6 compiled on 12-Feb-2021 17:00:05 File created 12-Feb-2021 17:00:02 ASKUSERCOMS loading SYSPRETTY -{DSK}larry>ilisp>medley>sources>SYSPRETTY.LCOM;1 +{DSK}larry>new>medley>sources>SYSPRETTY.LCOM;1 compiled on 26-Jan-98 13:41:07 File created 17-May-90 15:50:03 SYSPRETTYCOMS loading COMMON loading COMPARE -{DSK}larry>ilisp>medley>sources>COMPARE.LCOM;1 +{DSK}larry>new>medley>sources>COMPARE.LCOM;1 compiled on 25-Jan-98 11:41:10 File created 16-May-90 14:59:25 COMPARECOMS loading CMLSTEP -{DSK}larry>ilisp>medley>sources>CMLSTEP.LCOM;1 +{DSK}larry>new>medley>sources>CMLSTEP.LCOM;1 compiled on 25-Jan-98 11:20:57 File created 16-May-90 14:44:40 loading CMLDOC -{DSK}larry>ilisp>medley>sources>CMLDOC.LCOM;1 +{DSK}larry>new>medley>sources>CMLDOC.LCOM;1 compiled on 25-Jan-98 09:59:44 File created 16-May-90 13:06:35 loading CMLPARSE -{DSK}larry>ilisp>medley>sources>CMLPARSE.LCOM;1 +{DSK}larry>new>medley>sources>CMLPARSE.LCOM;1 compiled on 25-Jan-98 10:27:38 File created 8-Jun-90 14:57:22 loading CMLSETF -{DSK}larry>ilisp>medley>sources>CMLSETF.DFASL;1 +{DSK}larry>new>medley>sources>CMLSETF.DFASL;1 XCL Compiler output for source file {DSK}sources>CMLSETF.;1 Source file created Wednesday, 13 June 1990, 0:19:02. FASL file created Sunday, 25 January 1998, 10:52:44. loading CMLPRED -{DSK}larry>ilisp>medley>sources>CMLPRED.LCOM;1 +{DSK}larry>new>medley>sources>CMLPRED.LCOM;1 compiled on 25-Jan-98 10:30:39 File created 16-May-90 14:19:02 loading CMLREAD -{DSK}larry>ilisp>medley>sources>CMLREAD.LCOM;1 -compiled on 25-Jan-98 10:32:12 -File created 19-Jan-93 10:25:51 +{DSK}larry>new>medley>sources>CMLREAD.LCOM;1 +compiled on 9-Jul-2021 08:09:06 +File created 9-Jul-2021 08:09:06 loading WALKER -{DSK}larry>ilisp>medley>sources>WALKER.DFASL;1 +{DSK}larry>new>medley>sources>WALKER.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>WALKER.;1 Source file created Thursday, 17 May 1990, 16:04:34. FASL file created Monday, 26 January 1998, 13:53:47. loading CMLSEQFINDER -{DSK}larry>ilisp>medley>sources>CMLSEQFINDER.LCOM;1 +{DSK}larry>new>medley>sources>CMLSEQFINDER.LCOM;1 compiled on 25-Jan-98 10:35:46 File created 16-May-90 14:29:23 loading CMLSEQMODIFY -{DSK}larry>ilisp>medley>sources>CMLSEQMODIFY.LCOM;1 +{DSK}larry>new>medley>sources>CMLSEQMODIFY.LCOM;1 compiled on 25-Jan-98 10:41:41 File created 16-May-90 14:33:28 loading CMLSORT -{DSK}larry>ilisp>medley>sources>CMLSORT.LCOM;1 +{DSK}larry>new>medley>sources>CMLSORT.LCOM;1 compiled on 25-Jan-98 11:18:04 File created 16-May-90 14:41:22 loading DEFSTRUCT -{DSK}larry>ilisp>medley>sources>DEFSTRUCT.DFASL;1 +{DSK}larry>new>medley>sources>DEFSTRUCT.DFASL;1 XCL Compiler output for source file {DSK}sources>DEFSTRUCT.;1 Source file created Monday, 4 January 1993, 18:06:34. FASL file created Sunday, 25 January 1998, 12:25:14. loading CMLMISCIO -{DSK}larry>ilisp>medley>sources>CMLMISCIO.LCOM;1 -compiled on 25-Jan-98 10:24:15 +{DSK}larry>new>medley>sources>CMLMISCIO.LCOM;1 +compiled on 14-Jun-2021 23:16:31 File created 16-May-90 13:33:00 loading CMLCOMPILE -{DSK}larry>ilisp>medley>sources>CMLCOMPILE.LCOM;1 +{DSK}larry>new>medley>sources>CMLCOMPILE.LCOM;1 compiled on 25-Jan-98 09:55:54 File created 2-Jul-90 20:24:02 loading CMLDESTRUCT -{DSK}larry>ilisp>medley>sources>CMLDESTRUCT.LCOM;1 +{DSK}larry>new>medley>sources>CMLDESTRUCT.LCOM;1 compiled on 25-Jan-98 09:59:34 File created 16-May-90 13:05:47 loading CL-ERROR loading CMLFORMAT -{DSK}larry>ilisp>medley>sources>CMLFORMAT.LCOM;1 +{DSK}larry>new>medley>sources>CMLFORMAT.LCOM;1 compiled on 28-Jan-98 09:47:46 File created 16-May-90 13:19:59 loading CMLENVIRONMENT -{DSK}larry>ilisp>medley>sources>CMLENVIRONMENT.DFASL;1 +{DSK}larry>new>medley>sources>CMLENVIRONMENT.DFASL;1 XCL Compiler output for source file {DSK}sources>CMLENVIRONMENT.;1 Source file created Friday, 3 September 1993, 10:05:16. FASL file created Sunday, 25 January 1998, 9:59:56. loading CMLLOAD -{DSK}larry>ilisp>medley>sources>CMLLOAD.LCOM;1 +{DSK}larry>new>medley>sources>CMLLOAD.LCOM;1 compiled on 25-Jan-98 10:23:35 File created 13-Jul-90 18:00:23 loading CMLFLOAT -{DSK}larry>ilisp>medley>sources>CMLFLOAT.LCOM;1 +{DSK}larry>new>medley>sources>CMLFLOAT.LCOM;1 compiled on 25-Jan-98 10:08:08 File created 16-May-90 13:16:23 loading CMLTIME -{DSK}larry>ilisp>medley>sources>CMLTIME.LCOM;1 +{DSK}larry>new>medley>sources>CMLTIME.LCOM;1 compiled on 25-Jan-98 11:30:50 File created 16-May-90 14:48:46 loading CMLRAND -{DSK}larry>ilisp>medley>sources>CMLRAND.LCOM;1 +{DSK}larry>new>medley>sources>CMLRAND.LCOM;1 compiled on 25-Jan-98 10:31:47 File created 16-May-90 14:21:56 loading CMLMODULES -{DSK}larry>ilisp>medley>sources>CMLMODULES.DFASL;5 +{DSK}larry>new>medley>sources>CMLMODULES.DFASL;5 XCL Compiler output for source file {DSK}kaplan>Local>medley3.5>lispcore>sources>CMLMODULES.;2 Source file created Monday, 16 April 2018, 22:46:19. FASL file created Monday, 16 April 2018, 22:46:19. loading PROFILE -{DSK}larry>ilisp>medley>sources>PROFILE.LCOM;1 +{DSK}larry>new>medley>sources>PROFILE.LCOM;1 compiled on 26-Jan-98 13:28:16 File created 16-May-90 21:15:43 loading CMLEXEC -{DSK}larry>ilisp>medley>sources>CMLEXEC.LCOM;1 +{DSK}larry>new>medley>sources>CMLEXEC.LCOM;1 compiled on 25-Jan-98 10:04:21 File created 21-Jan-93 11:16:01 -{DSK}larry>ilisp>medley>sources>CMLUNDO.DFASL;1 +{DSK}larry>new>medley>sources>CMLUNDO.DFASL;1 XCL Compiler output for source file {DSK}sources>CMLUNDO.;1 Source file created Wednesday, 16 May 1990, 14:43:00. FASL file created Sunday, 25 January 1998, 11:35:46. loading EXEC-COMMANDS -{DSK}larry>ilisp>medley>sources>EXEC-COMMANDS.LCOM;1 +{DSK}larry>new>medley>sources>EXEC-COMMANDS.LCOM;1 compiled on 25-Jan-98 13:18:25 File created 16-May-90 16:29:25 loading DEBUGGER -{DSK}larry>ilisp>medley>sources>DEBUGGER.DFASL;1 +{DSK}larry>new>medley>sources>DEBUGGER.DFASL;1 XCL Compiler output for source file {DSK}sources>DEBUGGER.;1 Source file created Friday, 16 August 1991, 17:43:08. FASL file created Sunday, 25 January 1998, 12:20:29. loading IL-ERROR-STUFF -{DSK}larry>ilisp>medley>sources>IL-ERROR-STUFF.LCOM;1 +{DSK}larry>new>medley>sources>IL-ERROR-STUFF.LCOM;1 compiled on 25-Jan-98 14:25:53 File created 16-May-90 18:18:52 IL-ERROR-STUFFCOMS IL-ERROR-STUFFCOMS loading DEBUGEDIT -{DSK}larry>ilisp>medley>sources>DEBUGEDIT.LCOM;1 +{DSK}larry>new>medley>sources>DEBUGEDIT.LCOM;1 compiled on 25-Jan-98 12:20:10 File created 16-May-90 15:24:15 loading ADDARITH -{DSK}larry>ilisp>medley>sources>ADDARITH.LCOM;2 +{DSK}larry>new>medley>sources>ADDARITH.LCOM;1 compiled on 25-Jan-98 02:08:33 File created 16-May-90 11:46:37 loading CMLPATHNAME loading HPRINT -{DSK}larry>ilisp>medley>sources>HPRINT.LCOM;1 +{DSK}larry>new>medley>sources>HPRINT.LCOM;1 compiled on 26-Apr-2021 14:46:05 File created 26-Apr-2021 14:45:00 loading AARITH -{DSK}larry>ilisp>medley>sources>AARITH.LCOM;2 +{DSK}larry>new>medley>sources>AARITH.LCOM;1 compiled on 25-Jan-98 01:58:27 File created 16-May-90 11:41:16 AARITHCOMS loading ADISPLAY -{DSK}larry>ilisp>medley>sources>ADISPLAY.LCOM;1 -compiled on 28-Jan-98 10:53:47 -File created 15-Sep-94 17:07:04 +{DSK}larry>new>medley>sources>ADISPLAY.LCOM;1 +compiled on 13-Jun-2021 14:03:35 +File created 13-Jun-2021 14:03:35 ADISPLAYCOMS loading HLDISPLAY -{DSK}larry>ilisp>medley>sources>HLDISPLAY.LCOM;1 +{DSK}larry>new>medley>sources>HLDISPLAY.LCOM;1 compiled on 25-Jan-98 14:12:43 File created 15-Mar-94 10:48:02 loading MENU -{DSK}larry>ilisp>medley>sources>MENU.LCOM;1 +{DSK}larry>new>medley>sources>MENU.LCOM;1 compiled on 16-Jul-99 15:51:41 File created 16-Jul-99 15:51:36 MENUCOMS loading WINDOWOBJ -{DSK}larry>ilisp>medley>sources>WINDOWOBJ.LCOM;1 +{DSK}larry>new>medley>sources>WINDOWOBJ.LCOM;1 compiled on 26-Jan-98 13:55:38 File created 19-Jan-93 11:26:14 WINDOWOBJCOMS loading WINDOWSCROLL -{DSK}larry>ilisp>medley>sources>WINDOWSCROLL.LCOM;1 +{DSK}larry>new>medley>sources>WINDOWSCROLL.LCOM;1 compiled on 17-Feb-2021 13:49:06 File created 17-Feb-2021 13:49:06 WINDOWSCROLLCOMS loading WINDOW -{DSK}larry>ilisp>medley>sources>WINDOW.LCOM;1 -compiled on 9-Apr-2000 17:38:50 -File created 9-Apr-2000 17:36:29 +{DSK}larry>new>medley>sources>WINDOW.LCOM;1 +compiled on 13-Jun-2021 10:14:32 +File created 13-Jun-2021 10:14:32 -{DSK}larry>ilisp>medley>sources>PAINTW.LCOM;1 +{DSK}larry>new>medley>sources>PAINTW.LCOM;1 compiled on 16-Jul-99 15:49:39 File created 16-Jul-99 15:49:37 loading WINDOWICON -{DSK}larry>ilisp>medley>sources>WINDOWICON.LCOM;1 +{DSK}larry>new>medley>sources>WINDOWICON.LCOM;1 compiled on 26-Jan-98 13:55:34 File created 2-Feb-94 13:26:29 WINDOWICONCOMS loading PAINTW loading ATTACHEDWINDOW -{DSK}larry>ilisp>medley>sources>ATTACHEDWINDOW.LCOM;1 +{DSK}larry>new>medley>sources>ATTACHEDWINDOW.LCOM;1 compiled on 28-Jun-99 17:18:53 File created 28-Jun-99 17:18:50 ATTACHEDWINDOWCOMS loading XXGEOM -{DSK}larry>ilisp>medley>sources>XXGEOM.LCOM;1 -compiled on 26-Jan-98 14:03:05 -File created 19-Jan-93 11:30:54 +{DSK}larry>new>medley>sources>XXGEOM.LCOM;1 +compiled on 13-Jun-2021 14:42:16 +File created 13-Jun-2021 14:39:29 XXGEOMCOMS loading XXFILL -{DSK}larry>ilisp>medley>sources>XXFILL.LCOM;1 -compiled on 26-Jan-98 14:02:40 -File created 19-Jan-93 11:29:57 +{DSK}larry>new>medley>sources>XXFILL.LCOM;1 +compiled on 13-Jun-2021 14:41:45 +File created 13-Jun-2021 14:41:44 XXFILLCOMS loading DEXEC -{DSK}larry>ilisp>medley>sources>DEXEC.LCOM;13 +{DSK}larry>new>medley>sources>DEXEC.LCOM;13 compiled on 13-Aug-2020 12:36:18 File created 13-Aug-2020 12:36:18 loading INSPECT -{DSK}larry>ilisp>medley>sources>INSPECT.LCOM;8 -compiled on 21-Apr-2018 08:08:07 -File created 21-Apr-2018 08:08:07 +{DSK}larry>new>medley>sources>INSPECT.LCOM;8 +compiled on 10-Jul-2021 20:31:23 +File created 10-Jul-2021 20:31:23 INSPECTCOMS loading DESCRIBE -{DSK}larry>ilisp>medley>sources>DESCRIBE.DFASL;1 +{DSK}larry>new>medley>sources>DESCRIBE.DFASL;1 XCL Compiler output for source file {DSK}sources>DESCRIBE.;1 Source file created Wednesday, 16 May 1990, 15:27:33. FASL file created Sunday, 25 January 1998, 12:32:53. loading CMLARRAYINSPECTOR -{DSK}larry>ilisp>medley>sources>CMLARRAYINSPECTOR.LCOM;1 +{DSK}larry>new>medley>sources>CMLARRAYINSPECTOR.LCOM;1 compiled on 25-Jan-98 09:53:09 File created 31-Dec-93 12:26:35 CMLARRAYINSPECTORCOMS -{DSK}larry>ilisp>medley>sources>TWODINSPECTOR.LCOM;2 +{DSK}larry>new>medley>sources>TWODINSPECTOR.LCOM;2 compiled on 19-Feb-2021 14:31:33 File created 19-Feb-2021 14:31:33 TWODINSPECTORCOMS -{DSK}larry>ilisp>medley>sources>FREEMENU.LCOM;1 +{DSK}larry>new>medley>sources>FREEMENU.LCOM;1 compiled on 25-Jan-98 13:54:38 File created 6-Dec-94 10:55:40 loading EDITINTERFACE -{DSK}larry>ilisp>medley>sources>EDITINTERFACE.LCOM;1 +{DSK}larry>new>medley>sources>EDITINTERFACE.LCOM;1 compiled on 25-Jan-98 13:12:33 File created 7-Nov-91 18:15:13 loading TTYIN -{DSK}larry>ilisp>medley>sources>TTYIN.LCOM;1 -compiled on 26-Jan-98 13:49:55 -File created 24-May-91 11:33:53 +{DSK}larry>new>medley>sources>TTYIN.LCOM;1 +compiled on 13-Jun-2021 10:11:51 +File created 13-Jun-2021 10:11:51 TTYINCOMS loading BREAK-AND-TRACE -{DSK}larry>ilisp>medley>sources>BREAK-AND-TRACE.DFASL;1 +{DSK}larry>new>medley>sources>BREAK-AND-TRACE.DFASL;1 XCL Compiler output for source file {DSK}sources>BREAK-AND-TRACE.;1 Source file created Wednesday, 16 May 1990, 12:01:43. FASL file created Sunday, 25 January 1998, 9:14:16. loading FASDUMP -{DSK}larry>ilisp>medley>sources>FASDUMP.DFASL;1 +{DSK}larry>new>medley>sources>FASDUMP.DFASL;1 XCL Compiler output for source file {DSK}sources>FASDUMP.;1 Source file created Friday, 11 January 1991, 16:23:30. FASL file created Sunday, 25 January 1998, 13:18:44. loading XCL-COMPILER -{DSK}larry>ilisp>medley>sources>XCL-COMPILER.LCOM;1 +{DSK}larry>new>medley>sources>XCL-COMPILER.LCOM;1 compiled on 26-Jan-98 13:56:11 File created 18-May-90 01:13:35 XCL-COMPILERCOMS -{DSK}larry>ilisp>medley>sources>XCLC-ENV-CTXT.LCOM;1 +{DSK}larry>new>medley>sources>XCLC-ENV-CTXT.LCOM;1 compiled on 26-Jan-98 13:58:55 File created 17-Jul-90 10:48:08 -{DSK}larry>ilisp>medley>sources>XCLC-TREES.DFASL;1 +{DSK}larry>new>medley>sources>XCLC-TREES.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>XCLC-TREES.;1 Source file created Wednesday, 23 May 1990, 13:17:15. FASL file created Monday, 26 January 1998, 14:01:24. -{DSK}larry>ilisp>medley>sources>XCLC-TOP-LEVEL.DFASL;10 +{DSK}larry>new>medley>sources>XCLC-TOP-LEVEL.DFASL;10 XCL Compiler output for source file {DSK}kaplan>Local>medley3.5>lispcore>sources>XCLC-TOP-LEVEL.;10 Source file created 19-Sep-2020 22:02:59 FASL file created Saturday, 19 September 2020, 22:02:59 -{DSK}larry>ilisp>medley>sources>XCLC-ALPHA.LCOM;1 +{DSK}larry>new>medley>sources>XCLC-ALPHA.LCOM;1 compiled on 26-Jan-98 13:56:23 File created 20-Jul-90 17:07:06 -{DSK}larry>ilisp>medley>sources>XCLC-OPTIMIZERS.DFASL;1 +{DSK}larry>new>medley>sources>XCLC-OPTIMIZERS.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>XCLC-OPTIMIZERS.;1 Source file created Sunday, 3 June 1990, 22:30:55. FASL file created Monday, 26 January 1998, 14:00:16. -{DSK}larry>ilisp>medley>sources>XCLC-ANALYZE.LCOM;1 +{DSK}larry>new>medley>sources>XCLC-ANALYZE.LCOM;1 compiled on 26-Jan-98 13:57:17 File created 18-May-90 01:25:52 -{DSK}larry>ilisp>medley>sources>XCLC-META-EVAL.LCOM;1 +{DSK}larry>new>medley>sources>XCLC-META-EVAL.LCOM;1 compiled on 26-Jan-98 13:59:42 File created 9-Dec-91 03:12:25 -{DSK}larry>ilisp>medley>sources>XCLC-TRANSFORMS.LCOM;1 +{DSK}larry>new>medley>sources>XCLC-TRANSFORMS.LCOM;1 compiled on 26-Jan-98 14:01:16 File created 10-Aug-92 13:17:53 -{DSK}larry>ilisp>medley>sources>XCLC-DATABASE.DFASL;1 +{DSK}larry>new>medley>sources>XCLC-DATABASE.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>XCLC-DATABASE.;1 Source file created Tuesday, 19 January 1993, 11:26:11. FASL file created Monday, 26 January 1998, 13:58:14. -{DSK}larry>ilisp>medley>sources>XCLC-ANNOTATE.LCOM;1 +{DSK}larry>new>medley>sources>XCLC-ANNOTATE.LCOM;1 compiled on 26-Jan-98 13:57:27 File created 18-May-90 01:28:45 -{DSK}larry>ilisp>medley>sources>XCLC-GENCODE.LCOM;1 +{DSK}larry>new>medley>sources>XCLC-GENCODE.LCOM;1 compiled on 26-Jan-98 13:59:08 File created 2-Oct-91 11:38:50 -{DSK}larry>ilisp>medley>sources>XCLC-PEEPHOLE.LCOM;1 +{DSK}larry>new>medley>sources>XCLC-PEEPHOLE.LCOM;1 compiled on 26-Jan-98 14:00:34 File created 27-Aug-91 14:38:23 loading ADVISE -{DSK}larry>ilisp>medley>sources>ADVISE.dfasl;4 +{DSK}larry>new>medley>sources>ADVISE.DFASL;1 XCL Compiler output for source file {DSK}sources>ADVISE.;1 Source file created Wednesday, 16 May 1990, 11:45:00. FASL file created Sunday, 25 January 1998, 8:20:23. loading DLAP -{DSK}larry>ilisp>medley>sources>DLAP.LCOM;1 +{DSK}larry>new>medley>sources>DLAP.LCOM;1 compiled on 31-Jan-98 10:01:22 File created 25-Jan-93 16:56:13 loading BYTECOMPILER -{DSK}larry>ilisp>medley>sources>BYTECOMPILER.LCOM;1 -compiled on 25-Jan-98 09:21:09 -File created 26-Apr-91 17:25:53 +{DSK}larry>new>medley>sources>BYTECOMPILER.LCOM;1 +compiled on 13-Jun-2021 09:51:42 +File created 13-Jun-2021 09:51:42 loading COMPILE -{DSK}larry>ilisp>medley>sources>COMPILE.LCOM;1 -compiled on 25-Jan-98 11:41:58 -File created 27-Jul-90 11:15:42 +{DSK}larry>new>medley>sources>COMPILE.LCOM;1 +compiled on 5-Jul-2021 13:46:39 +File created 5-Jul-2021 13:46:39 COMPILECOMS loading HARDCOPY -{DSK}larry>ilisp>medley>sources>HARDCOPY.LCOM;7 -compiled on 16-Apr-2018 22:15:08 -File created 16-Apr-2018 22:15:08 +{DSK}larry>new>medley>sources>HARDCOPY.LCOM;7 +compiled on 14-Jun-2021 22:43:46 +File created 5-May-2021 19:41:55 HARDCOPYCOMS loading LOGOW -{DSK}larry>ilisp>medley>sources>LOGOW.DFASL;1 +{DSK}larry>new>medley>sources>LOGOW.DFASL;1 XCL Compiler output for source file {DSK}larry>ilisp>medley>sources>LOGOW.;3 Source file created 25-Mar-2021 21:49:00 FASL file created Thursday, 25 March 2021, 21:50:00 loading IDLER -{DSK}larry>ilisp>medley>sources>IDLER.LCOM;1 +{DSK}larry>new>medley>sources>IDLER.LCOM;1 compiled on 25-Jan-98 14:24:39 File created 23-Mar-92 13:38:29 IDLERCOMS loading ICONW -{DSK}larry>ilisp>medley>sources>ICONW.LCOM;1 -compiled on 25-Jan-98 14:23:21 +{DSK}larry>new>medley>sources>ICONW.LCOM;1 +compiled on 13-Jun-2021 20:58:49 File created 16-May-90 18:16:27 ICONWCOMS loading FREEMENU loading SEDIT -{DSK}larry>ilisp>medley>sources>SEDIT.DFASL;1 +{DSK}larry>new>medley>sources>SEDIT.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>SEDIT.;1 Source file created Friday, 25 January 1991, 17:01:33. FASL file created Monday, 26 January 1998, 13:30:21. -{DSK}larry>ilisp>medley>sources>SEDIT-ACCESS.DFASL;1 +{DSK}larry>new>medley>sources>SEDIT-ACCESS.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>SEDIT-ACCESS.;1 Source file created Tuesday, 19 January 1993, 11:16:06. FASL file created Monday, 26 January 1998, 13:30:23. -{DSK}larry>ilisp>medley>sources>SEDIT-ATOMIC.DFASL;3 +{DSK}larry>new>medley>sources>SEDIT-ATOMIC.DFASL;3 XCL Compiler output for source file {DSK}local>lde>lispcore>sources>SEDIT-ATOMIC.;3 Source file created 16-May-90 21:37:57 FASL file created Sunday, 20 September 2020, 21:00:28 -{DSK}larry>ilisp>medley>sources>SEDIT-BASE.DFASL;1 +{DSK}larry>new>medley>sources>SEDIT-BASE.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>SEDIT-BASE.;1 Source file created Wednesday, 2 December 1992, 17:40:24. FASL file created Monday, 26 January 1998, 13:31:04. -{DSK}larry>ilisp>medley>sources>SEDIT-COMMANDS.DFASL;4 +{DSK}larry>new>medley>sources>SEDIT-COMMANDS.DFASL;4 XCL Compiler output for source file {DSK}kaplan>Local>medley3.5>lispcore>sources>SEDIT-COMMANDS.;3 Source file created Monday, 23 April 2018, 18:12:52. FASL file created Monday, 23 April 2018, 18:13:51. -{DSK}larry>ilisp>medley>sources>SEDIT-COMMENTS.DFASL;1 +{DSK}larry>new>medley>sources>SEDIT-COMMENTS.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>SEDIT-COMMENTS.;1 Source file created Wednesday, 16 May 1990, 21:35:01. FASL file created Monday, 26 January 1998, 13:32:56. -{DSK}larry>ilisp>medley>sources>SEDIT-EXPORTS.DFASL;1 +{DSK}larry>new>medley>sources>SEDIT-EXPORTS.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>SEDIT-EXPORTS.;1 Source file created Thursday, 17 May 1990, 10:49:21. FASL file created Monday, 26 January 1998, 13:33:33. -{DSK}larry>ilisp>medley>sources>SEDIT-INDENT.DFASL;1 +{DSK}larry>new>medley>sources>SEDIT-INDENT.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>SEDIT-INDENT.;1 Source file created Thursday, 17 May 1990, 10:52:22. FASL file created Monday, 26 January 1998, 13:33:37. -{DSK}larry>ilisp>medley>sources>SEDIT-LIST-FORMATS.DFASL;1 +{DSK}larry>new>medley>sources>SEDIT-LIST-FORMATS.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>SEDIT-LIST-FORMATS.;1 Source file created Thursday, 17 May 1990, 10:56:07. FASL file created Monday, 26 January 1998, 13:34:54. -{DSK}larry>ilisp>medley>sources>SEDIT-LINEAR.DFASL;1 +{DSK}larry>new>medley>sources>SEDIT-LINEAR.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>SEDIT-LINEAR.;1 Source file created Thursday, 17 May 1990, 10:54:05. FASL file created Monday, 26 January 1998, 13:33:51. -{DSK}larry>ilisp>medley>sources>SEDIT-LISTS.DFASL;1 +{DSK}larry>new>medley>sources>SEDIT-LISTS.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>SEDIT-LISTS.;1 Source file created Thursday, 17 May 1990, 10:58:06. FASL file created Monday, 26 January 1998, 13:35:03. -{DSK}larry>ilisp>medley>sources>SEDIT-TERMINAL.DFASL;1 +{DSK}larry>new>medley>sources>SEDIT-TERMINAL.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>SEDIT-TERMINAL.;1 Source file created Thursday, 17 May 1990, 10:59:38. FASL file created Monday, 26 January 1998, 13:35:55. -{DSK}larry>ilisp>medley>sources>SEDIT-TOPLEVEL.DFASL;1 +{DSK}larry>new>medley>sources>SEDIT-TOPLEVEL.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>SEDIT-TOPLEVEL.;1 Source file created Wednesday, 10 July 1991, 19:03:29. FASL file created Monday, 26 January 1998, 13:36:04. -{DSK}larry>ilisp>medley>sources>SEDIT-WINDOW.DFASL;3 +{DSK}larry>new>medley>sources>SEDIT-WINDOW.DFASL;3 XCL Compiler output for source file {DSK}kaplan>Local>medley3.5>lispcore>sources>SEDIT-WINDOW.;2 Source file created Monday, 14 May 2018, 14:12:02. FASL file created Monday, 14 May 2018, 14:12:02. @@ -916,148 +917,148 @@ loading UFSCALLC loading MAIKOBITBLT loading TIME -{DSK}larry>ilisp>medley>sources>TIME.LCOM;5 +{DSK}larry>new>medley>sources>TIME.LCOM;5 compiled on 16-Apr-2018 23:05:17 File created 16-Apr-2018 23:05:10 loading BRKDWN -{DSK}larry>ilisp>medley>sources>BRKDWN.LCOM;1 +{DSK}larry>new>medley>sources>BRKDWN.LCOM;1 compiled on 25-Jan-98 09:16:08 File created 16-May-90 12:14:36 BRKDWNCOMS loading XCL-EXTRAS -{DSK}larry>ilisp>medley>sources>XCL-EXTRAS.DFASL;1 +{DSK}larry>new>medley>sources>XCL-EXTRAS.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>XCL-EXTRAS.;1 Source file created Friday, 18 May 1990, 1:03:51. FASL file created Monday, 26 January 1998, 13:56:12. loading CMLPACKAGE -{DSK}larry>ilisp>medley>sources>CMLPACKAGE.DFASL;1 +{DSK}larry>new>medley>sources>CMLPACKAGE.DFASL;1 XCL Compiler output for source file {DSK}sources>CMLPACKAGE.;1 Source file created Thursday, 14 June 1990, 1:35:57. FASL file created Sunday, 25 January 1998, 10:25:22. loading CMLSMARTARGS -{DSK}larry>ilisp>medley>sources>CMLSMARTARGS.DFASL;1 +{DSK}larry>new>medley>sources>CMLSMARTARGS.DFASL;1 XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>CMLSMARTARGS.;2 Source file created Tuesday, 27 January 1998, 10:56:02. FASL file created Tuesday, 27 January 1998, 10:58:59. loading IMPLICIT-KEY-HASH -{DSK}larry>ilisp>medley>sources>IMPLICIT-KEY-HASH.DFASL;1 +{DSK}larry>new>medley>sources>IMPLICIT-KEY-HASH.DFASL;1 XCL Compiler output for source file {DSK}sources>IMPLICIT-KEY-HASH.;1 Source file created Wednesday, 16 May 1990, 18:10:26. FASL file created Sunday, 25 January 1998, 14:31:31. loading CLOSURE-CACHE -{DSK}larry>ilisp>medley>sources>CLOSURE-CACHE.DFASL;1 +{DSK}larry>new>medley>sources>CLOSURE-CACHE.DFASL;1 XCL Compiler output for source file {DSK}sources>CLOSURE-CACHE.;1 Source file created Wednesday, 16 May 1990, 12:24:08. FASL file created Sunday, 25 January 1998, 9:35:47. loading PUP -{DSK}larry>ilisp>medley>sources>PUP.LCOM;1 +{DSK}larry>new>medley>sources>PUP.LCOM;1 compiled on 1-May-2021 19:49:18 File created 1-May-2021 19:49:18 loading 10MBDRIVER -{DSK}larry>ilisp>medley>sources>10MBDRIVER.LCOM;3 +{DSK}larry>new>medley>sources>10MBDRIVER.LCOM;1 compiled on 25-Jan-98 01:56:51 File created 26-Feb-91 13:32:30 10MBDRIVERCOMS loading LEAF -{DSK}larry>ilisp>medley>sources>LEAF.LCOM;1 +{DSK}larry>new>medley>sources>LEAF.LCOM;1 compiled on 27-Jan-98 12:52:59 File created 19-Jan-93 10:41:31 LEAFCOMS loading LLETHER -{DSK}larry>ilisp>medley>sources>LLETHER.LCOM;1 -compiled on 3-May-2021 23:13:56 +{DSK}larry>new>medley>sources>LLETHER.LCOM;2 +compiled on 27-Jul-2021 20:59:27 File created 3-May-2021 23:13:56 LLETHERCOMS loading DPUPFTP -{DSK}larry>ilisp>medley>sources>DPUPFTP.LCOM;1 -compiled on 25-Jan-98 12:54:18 +{DSK}larry>new>medley>sources>DPUPFTP.LCOM;1 +compiled on 13-Jun-2021 21:11:45 File created 16-May-90 16:10:35 DPUPFTPCOMS loading LOCALFILE -{DSK}larry>ilisp>medley>sources>LOCALFILE.LCOM;1 +{DSK}larry>new>medley>sources>LOCALFILE.LCOM;1 compiled on 25-Jan-98 17:19:53 File created 19-Jan-93 10:55:28 LOCALFILECOMS loading DSKDISPLAY -{DSK}larry>ilisp>medley>sources>DSKDISPLAY.LCOM;1 +{DSK}larry>new>medley>sources>DSKDISPLAY.LCOM;1 compiled on 25-Jan-98 12:58:13 File created 21-Jun-90 13:01:45 DSKDISPLAYCOMS loading COURIER -{DSK}larry>ilisp>medley>sources>COURIER.LCOM;1 +{DSK}larry>new>medley>sources>COURIER.LCOM;1 compiled on 25-Jan-98 11:57:30 File created 2-Nov-93 13:53:08 COURIERCOMS loading LLNS -{DSK}larry>ilisp>medley>sources>LLNS.LCOM;1 +{DSK}larry>new>medley>sources>LLNS.LCOM;1 compiled on 25-Jan-98 16:33:55 File created 19-Jan-93 10:52:26 LLNSCOMS loading TRSERVER -{DSK}larry>ilisp>medley>sources>TRSERVER.LCOM;1 +{DSK}larry>new>medley>sources>TRSERVER.LCOM;1 compiled on 29-Jan-98 10:12:58 File created 17-May-90 15:58:24 TRSERVERCOMS loading SPP -{DSK}larry>ilisp>medley>sources>SPP.LCOM;1 +{DSK}larry>new>medley>sources>SPP.LCOM;1 compiled on 26-Jan-98 13:37:20 File created 19-Jan-93 11:20:29 SPPCOMS loading NSPRINT -{DSK}larry>ilisp>medley>sources>NSPRINT.LCOM;1 +{DSK}larry>new>medley>sources>NSPRINT.LCOM;1 compiled on 26-Jan-98 13:26:31 File created 28-Apr-92 17:29:44 NSPRINTCOMS loading AUTHENTICATION -{DSK}larry>ilisp>medley>sources>AUTHENTICATION.LCOM;1 +{DSK}larry>new>medley>sources>AUTHENTICATION.LCOM;1 compiled on 25-Jan-98 08:40:41 File created 16-May-90 12:10:46 AUTHENTICATIONCOMS loading BSP -{DSK}larry>ilisp>medley>sources>BSP.LCOM;1 +{DSK}larry>new>medley>sources>BSP.LCOM;1 compiled on 25-Jan-98 09:17:10 File created 19-Jan-93 10:23:19 BSPCOMS loading CLEARINGHOUSE -{DSK}larry>ilisp>medley>sources>CLEARINGHOUSE.LCOM;1 +{DSK}larry>new>medley>sources>CLEARINGHOUSE.LCOM;1 compiled on 25-Jan-98 09:31:30 File created 19-Jan-93 10:24:59 CLEARINGHOUSECOMS loading NSFILING -{DSK}larry>ilisp>medley>sources>NSFILING.LCOM;1 +{DSK}larry>new>medley>sources>NSFILING.LCOM;1 compiled on 28-Jun-99 17:07:45 File created 28-Jun-99 17:07:34 NSFILINGCOMS loading MAIKOETHER -{DSK}larry>ilisp>medley>sources>MAIKOETHER.LCOM;3 +{DSK}larry>new>medley>sources>MAIKOETHER.LCOM;3 compiled on 25-Jan-98 17:43:08 File created 4-May-91 15:52:07 MAIKOETHERCOMS diff --git a/loadups/lisp.sysout b/loadups/lisp.sysout index 3c5a39112..f9c631530 100644 Binary files a/loadups/lisp.sysout and b/loadups/lisp.sysout differ diff --git a/loadups/whereis.dribble b/loadups/whereis.dribble index aecc61a41..7fc7c17b0 100644 --- a/loadups/whereis.dribble +++ b/loadups/whereis.dribble @@ -1,786 +1,784 @@ -;;; {DSK}larry>ilisp>medley>sources>10MBDECLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>10MBDRIVER.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>AARITH.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>ABASIC.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>ACODE.;4 ... done. -;;; {DSK}larry>ilisp>medley>sources>ADDARITH.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>ADIR.;8 ... done. -;;; {DSK}larry>ilisp>medley>sources>ADISPLAY.;8 ... done. -;;; {DSK}larry>ilisp>medley>sources>ADVISE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>AERROR.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>AFONT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>AINTERRUPT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>AOFD.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>APRINT.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>APUTDQ.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>ARGLIST.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>ASKUSER.;6 ... done. -;;; {DSK}larry>ilisp>medley>sources>ASTACK.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>ATBL.;8 . -Warning: Error attempting to LOADVARS (IL:CCECHOMODES IL:TERMCLASSES IL:READCODEMASKS IL:READMACROCONTEXTS IL:READCLASSES IL:READMACROWAKEUPS IL:READMACROESCAPES) from {DSK}larry>ilisp>medley>sources>ATBL.;8. +;;; {DSK}larry>new>medley>sources>10MBDECLS.;1 ... done. +;;; {DSK}larry>new>medley>sources>10MBDRIVER.;1 ... done. +;;; {DSK}larry>new>medley>sources>AARITH.;1 ... done. +;;; {DSK}larry>new>medley>sources>ABASIC.;1 ... done. +;;; {DSK}larry>new>medley>sources>ACODE.;4 ... done. +;;; {DSK}larry>new>medley>sources>ADDARITH.;1 ... done. +;;; {DSK}larry>new>medley>sources>ADIR.;8 ... done. +;;; {DSK}larry>new>medley>sources>ADISPLAY.;8 ... done. +;;; {DSK}larry>new>medley>sources>ADVISE.;1 ... done. +;;; {DSK}larry>new>medley>sources>AERROR.;1 ... done. +;;; {DSK}larry>new>medley>sources>AFONT.;1 ... done. +;;; {DSK}larry>new>medley>sources>AINTERRUPT.;1 ... done. +;;; {DSK}larry>new>medley>sources>AOFD.;1 ... done. +;;; {DSK}larry>new>medley>sources>APRINT.;3 ... done. +;;; {DSK}larry>new>medley>sources>APUTDQ.;1 ... done. +;;; {DSK}larry>new>medley>sources>ARGLIST.;1 ... done. +;;; {DSK}larry>new>medley>sources>ASKUSER.;6 ... done. +;;; {DSK}larry>new>medley>sources>ASTACK.;1 ... done. +;;; {DSK}larry>new>medley>sources>ATBL.;8 . +Warning: Error attempting to LOADVARS (IL:CCECHOMODES IL:TERMCLASSES IL:READCODEMASKS IL:READMACROCONTEXTS IL:READCLASSES IL:READMACROWAKEUPS IL:READMACROESCAPES) from {DSK}larry>new>medley>sources>ATBL.;8. .. done. -;;; {DSK}larry>ilisp>medley>sources>ATERM.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>ATTACHEDWINDOW.;4 ... done. -;;; {DSK}larry>ilisp>medley>sources>AUTHENTICATION.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>BOOTSTRAP.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>BREAK-AND-TRACE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>BRKDWN.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>BSP.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>BYTECOMPILER.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CL-ERROR.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CLEARINGHOUSE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CLISP.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CLISPIFY.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CLOSURE-CACHE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CLSTREAMS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLARITH.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLARRAY.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLARRAY-SUPPORT.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLARRAYINSPECTOR.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLCHARACTER.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLCOMPILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLDEFFER.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLDESTRUCT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLDOC.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLENVIRONMENT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLEVAL.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLEXEC.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLFILESYS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLFLOAT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLFORMAT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLHASH.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLLIST.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLLOAD.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLMACROS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLMISCIO.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLMODULES.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLMVS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLPACKAGE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLPARSE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLPATHNAME.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLPRED.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLPRINT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLPROGV.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLRAND.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLREAD.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLREADTABLE.;5 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLSEQ.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLSEQBASICS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLSEQCOMMON.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLSEQFINDER.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLSEQMAPPERS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLSEQMODIFY.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLSETF.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLSMARTARGS.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLSORT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLSPECIALFORMS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLSTEP.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLSTRING.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLSYMBOL.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLTIME.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLTYPES.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLUNDO.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CMLWALK.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>COMMENT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>COMMON.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>COMPARE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>COMPATIBILITY.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>COMPILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>COMPILER-PACKAGE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CONDITION-HIERARCHY.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CONDITION-HIERARCHY-IL.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CONDITION-HIERARCHY-POST-SI.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CONDITION-HIERARCHY-SI.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>CONDITION-PACKAGE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>COREIO.;5 ... done. -;;; {DSK}larry>ilisp>medley>sources>COROUTINE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>COURIER.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>D-ASSEM.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>D-ASSEM-PACKAGE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DEBUGEDIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DEBUGGER.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DEFFER-RUNTIME.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DEFPACKAGE-IMPORT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DEFSTRUCT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DEFSTRUCT-RUN-TIME.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DESCRIBE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DEXEC.;11 ... done. -;;; {DSK}larry>ilisp>medley>sources>DFILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DIRECTORY.;2 ... done. -;;; {DSK}larry>ilisp>medley>sources>DISKDLION.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DISKVMEMDECLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DLAP.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DMISC.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DOVEDECLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DOVEETHERDECLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DPUPFTP.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DSK.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DSKDISPLAY.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DSPRINTDEF.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DTDECLARE.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>DWIM.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>DWIMIFY.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>EDIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>EDITINTERFACE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>ERROR-RUNTIME.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>ERROR-RUNTIME-AFTER-FASL.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>EXEC-COMMANDS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>FASDUMP.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>FASL-PACKAGE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>FASL-SUPPORT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>FASLOAD.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>FILEIO.;11 ... done. -;;; {DSK}larry>ilisp>medley>sources>FILEPKG.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>FILESETS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>FONT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>FONTPROFILE.;2 ... done. -;;; {DSK}larry>ilisp>medley>sources>FONTPROFILEPATCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>FREEMENU.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>GAINSPACE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>HARDCOPY.;7 ... done. -;;; {DSK}larry>ilisp>medley>sources>HIST.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>HLDISPLAY.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>HPRINT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>ICONW.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>IDLER.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>IL-ERROR-STUFF.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>IMAGEIO.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>IMPLICIT-KEY-HASH.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>INSPECT.;8 ... done. -;;; {DSK}larry>ilisp>medley>sources>INSPECT-CLOSURE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>INTERPRESS.;7 ... done. -;;; {DSK}larry>ilisp>medley>sources>IOCHAR.;6 ... done. -;;; {DSK}larry>ilisp>medley>sources>LEAF.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LISP-PACKAGE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLARITH.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLARRAYELT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLBASIC.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLBFS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLBIGNUM.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLCHAR.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLCODE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLDATATYPE.;12 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLDISPLAY.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLERROR.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLETHER.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLFAULT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLFLOAT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLGC.;4 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLINTERP.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLKEY.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLMVS.;2 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLNEW.;16 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLNS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLNSDECLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLPACKAGE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLPARAMS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLREAD.;2 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLRESTART.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLSTK.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLSUBRS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLSYMBOL.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LLTIMER.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LOADFNS.;8 ... done. -;;; {DSK}larry>ilisp>medley>sources>LOADUP-FULL.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LOADUP-LISP.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LOCALFILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>LOGOW.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>MACHINEINDEPENDENT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>MACROAUX.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>MACROAUX-OPTIMIZERS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>MACROS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>MAIKOBITBLT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>MAIKOETHER.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>MAIKOINIT.;1 .Warning: Error attempting to LOADVARS (IL:MAIKOINITCOMS) from {DSK}larry>ilisp>medley>sources>MAIKOINIT.;1. -;;; {DSK}larry>ilisp>medley>sources>MAIKOLOADUPFNS.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>MAKEINIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>MEM.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>MENU.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>MISC.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>MOD44IO.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>MODARITH.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>NEWPRINTDEF.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>NSFILING.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>NSPRINT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>PACKAGE-CONVERSION-TABLE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>PACKAGE-STARTUP.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>PAINTW.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>PASSWORDS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>PMAP.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>POSTLOADUP.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>PRETTY.;7 ... done. -;;; {DSK}larry>ilisp>medley>sources>PRINTFN.;5 ... done. -;;; {DSK}larry>ilisp>medley>sources>PROC.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>PROFILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>PUP.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>READSYS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>RECORD.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>RENAMEFNS.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>RENAMEMACROS.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>RESOURCE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-ACCESS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-ATOMIC.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-BASE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-COMMANDS.;4 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-COMMENTS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-CONVERT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-DEBUG.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-DECLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-EXPORTS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-INDENT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-LINEAR.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-LIST-FORMATS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-LISTS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-TERMINAL.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-TOPLEVEL.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SEDIT-WINDOW.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>SETF-RUNTIME.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SPELL.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SPELLFILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SPP.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SPPDECLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>STACKFNS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>SYSPRETTY.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>TCPHTE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>TIME.;4 ... done. -;;; {DSK}larry>ilisp>medley>sources>TRSERVER.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>TTYIN.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>TWODINSPECTOR.;2 ... done. -;;; {DSK}larry>ilisp>medley>sources>UFS.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>UFSCALLC.;3 ... done. -;;; {DSK}larry>ilisp>medley>sources>UNDO.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>UNWINDMACROS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>VANILLADISK.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>VMEM.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>WALKER.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>WEDIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>WINDOW.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>WINDOWICON.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>WINDOWOBJ.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>WINDOWSCROLL.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>WRAPPERS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>WTFIX.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCL-COMPILER.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCL-EXTRAS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCL-PACKAGE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCLC-ALPHA.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCLC-ANALYZE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCLC-ANNOTATE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCLC-DATABASE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCLC-ENV-CTXT.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCLC-GENCODE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCLC-META-EVAL.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCLC-OPTIMIZERS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCLC-PEEPHOLE.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCLC-RUNTIME.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCLC-TOP-LEVEL.;11 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCLC-TRANSFORMS.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XCLC-TREES.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XXFILL.;1 ... done. -;;; {DSK}larry>ilisp>medley>sources>XXGEOM.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>BIGBITMAPS.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>BROWSER.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>CASH-FILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>CHARCODETABLES.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>CHARDEVICE.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>CHARS.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>CHAT.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>CHATDECLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>CHATSERVER-EMACS.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>CHATTERMINAL.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>CLIPBOARD.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>CMLFLOATARRAY.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>COLOR.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>COPYFILES.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>DANDELIONKEYBOARDS.;3 .Warning: Error attempting to LOADVARS (IL:DANDELIONKEYBOARDSCOMS) from {DSK}larry>ilisp>medley>library>DANDELIONKEYBOARDS.;3. -;;; {DSK}larry>ilisp>medley>library>DATABASEFNS.;3 ... done. -;;; {DSK}larry>ilisp>medley>library>DEDIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>DEDITPP.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>DES.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>DMCHAT.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>DORADOKEYBOARDS.;3 .Warning: Error attempting to LOADVARS (IL:DORADOKEYBOARDSCOMS) from {DSK}larry>ilisp>medley>library>DORADOKEYBOARDS.;3. -;;; {DSK}larry>ilisp>medley>library>DOSPRINT.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>DOVEKEYBOARDS.;3 .Warning: Error attempting to LOADVARS (IL:DOVEKEYBOARDSCOMS) from {DSK}larry>ilisp>medley>library>DOVEKEYBOARDS.;3. -;;; {DSK}larry>ilisp>medley>library>DOVERS232C.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>EDITBITMAP.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>ETHERRECORDS.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>FILE-UPDATE.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>FILEBROWSER.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>FONTSAMPLE.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>FOREIGN-FUNCTIONS.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>FX-80DRIVER.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>GCHAX.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>GRAPHER.;4 ... done. -;;; {DSK}larry>ilisp>medley>library>GRAPHZOOM.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>HASH.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>HASH-FILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>HRULE.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>IMAGEOBJ.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>KEYBOARDCONFIGS.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>KEYBOARDEDITOR.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>lafite> .Warning: Error attempting to LOADVARS (IL:NILCOMS) from {DSK}larry>ilisp>medley>library>lafite>. -;;; {DSK}larry>ilisp>medley>library>LLCOLOR.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>LOAD-SKETCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>MAIKOCOLOR.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>MAIKOKEYBOARDS.;3 .Warning: Error attempting to LOADVARS (IL:MAIKOKEYBOARDSCOMS) from {DSK}larry>ilisp>medley>library>MAIKOKEYBOARDS.;3. -;;; {DSK}larry>ilisp>medley>library>MASTERSCOPE.;5 ... done. -;;; {DSK}larry>ilisp>medley>library>MATCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>MATMULT.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>MSANALYZE.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>MSCOMMON.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>MSPARSE.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>NSCHAT.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>NSMAINTAIN.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>patches> .Warning: Error attempting to LOADVARS (IL:NILCOMS) from {DSK}larry>ilisp>medley>library>patches>. -;;; {DSK}larry>ilisp>medley>library>PCTREE.;4 ... done. -;;; {DSK}larry>ilisp>medley>library>POSTSCRIPTSTREAM.;3 ... done. -;;; {DSK}larry>ilisp>medley>library>PRESS.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>RDSYS.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>READNUMBER.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>REMOTEVMEM.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>SAMEDIR.;10 ... done. -;;; {DSK}larry>ilisp>medley>library>SCALEBITMAP.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>SEDIT-COMMONLISP.;2 .Warning: Error attempting to LOADVARS (IL:SEDIT-COMMONLISPCOMS) from {DSK}larry>ilisp>medley>library>SEDIT-COMMONLISP.;2. -;;; {DSK}larry>ilisp>medley>library>SKETCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>SKETCHBMELT.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>SKETCHEDIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>SKETCHELEMENTS.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>SKETCHOBJ.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>SKETCHOPS.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>SKETCHSTREAM.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>SPY.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>SYSEDIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TABLEBROWSER.;3 ... done. -;;; {DSK}larry>ilisp>medley>library>TABLEBROWSERDECLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TBDECLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDIT.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITABBREV.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITCHAT.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITCOMMAND.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITDCL.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITFILE.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITFIND.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITFNKEYS.;4 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITHCPY.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITHISTORY.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITLOOKS.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITMENU.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITPAGE.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITSCREEN.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITSELECTION.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TEDITWINDOW.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TELERAID.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TEXEC.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>TEXTMODULES.;1 . -{DSK}larry>ilisp>medley>library>SEDIT-COMMONLISP.DFASL;2 +;;; {DSK}larry>new>medley>sources>ATERM.;1 ... done. +;;; {DSK}larry>new>medley>sources>ATTACHEDWINDOW.;4 ... done. +;;; {DSK}larry>new>medley>sources>AUTHENTICATION.;1 ... done. +;;; {DSK}larry>new>medley>sources>BOOTSTRAP.;1 ... done. +;;; {DSK}larry>new>medley>sources>BREAK-AND-TRACE.;1 ... done. +;;; {DSK}larry>new>medley>sources>BRKDWN.;1 ... done. +;;; {DSK}larry>new>medley>sources>BSP.;1 ... done. +;;; {DSK}larry>new>medley>sources>BYTECOMPILER.;1 ... done. +;;; {DSK}larry>new>medley>sources>CL-ERROR.;1 ... done. +;;; {DSK}larry>new>medley>sources>CLEARINGHOUSE.;1 ... done. +;;; {DSK}larry>new>medley>sources>CLISP.;1 ... done. +;;; {DSK}larry>new>medley>sources>CLISPIFY.;1 ... done. +;;; {DSK}larry>new>medley>sources>CLOSURE-CACHE.;1 ... done. +;;; {DSK}larry>new>medley>sources>CLSTREAMS.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLARITH.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLARRAY.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLARRAY-SUPPORT.;3 ... done. +;;; {DSK}larry>new>medley>sources>CMLARRAYINSPECTOR.;3 ... done. +;;; {DSK}larry>new>medley>sources>CMLCHARACTER.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLCOMPILE.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLDEFFER.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLDESTRUCT.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLDOC.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLENVIRONMENT.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLEVAL.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLEXEC.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLFILESYS.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLFLOAT.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLFORMAT.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLHASH.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLLIST.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLLOAD.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLMACROS.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLMISCIO.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLMODULES.;3 ... done. +;;; {DSK}larry>new>medley>sources>CMLMVS.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLPACKAGE.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLPARSE.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLPATHNAME.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLPRED.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLPRINT.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLPROGV.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLRAND.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLREAD.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLREADTABLE.;5 ... done. +;;; {DSK}larry>new>medley>sources>CMLSEQ.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLSEQBASICS.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLSEQCOMMON.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLSEQFINDER.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLSEQMAPPERS.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLSEQMODIFY.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLSETF.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLSMARTARGS.;3 ... done. +;;; {DSK}larry>new>medley>sources>CMLSORT.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLSPECIALFORMS.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLSTEP.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLSTRING.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLSYMBOL.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLTIME.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLTYPES.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLUNDO.;1 ... done. +;;; {DSK}larry>new>medley>sources>CMLWALK.;1 ... done. +;;; {DSK}larry>new>medley>sources>COMMENT.;1 ... done. +;;; {DSK}larry>new>medley>sources>COMMON.;1 ... done. +;;; {DSK}larry>new>medley>sources>COMPARE.;1 ... done. +;;; {DSK}larry>new>medley>sources>COMPATIBILITY.;1 ... done. +;;; {DSK}larry>new>medley>sources>COMPILE.;1 ... done. +;;; {DSK}larry>new>medley>sources>COMPILER-PACKAGE.;1 ... done. +;;; {DSK}larry>new>medley>sources>CONDITION-HIERARCHY.;1 ... done. +;;; {DSK}larry>new>medley>sources>CONDITION-HIERARCHY-IL.;1 ... done. +;;; {DSK}larry>new>medley>sources>CONDITION-HIERARCHY-POST-SI.;1 ... done. +;;; {DSK}larry>new>medley>sources>CONDITION-HIERARCHY-SI.;1 ... done. +;;; {DSK}larry>new>medley>sources>CONDITION-PACKAGE.;1 ... done. +;;; {DSK}larry>new>medley>sources>COREIO.;5 ... done. +;;; {DSK}larry>new>medley>sources>COROUTINE.;1 ... done. +;;; {DSK}larry>new>medley>sources>COURIER.;3 ... done. +;;; {DSK}larry>new>medley>sources>D-ASSEM.;1 ... done. +;;; {DSK}larry>new>medley>sources>D-ASSEM-PACKAGE.;1 ... done. +;;; {DSK}larry>new>medley>sources>DEBUGEDIT.;1 ... done. +;;; {DSK}larry>new>medley>sources>DEBUGGER.;1 ... done. +;;; {DSK}larry>new>medley>sources>DEFFER-RUNTIME.;1 ... done. +;;; {DSK}larry>new>medley>sources>DEFPACKAGE-IMPORT.;1 ... done. +;;; {DSK}larry>new>medley>sources>DEFSTRUCT.;1 ... done. +;;; {DSK}larry>new>medley>sources>DEFSTRUCT-RUN-TIME.;1 ... done. +;;; {DSK}larry>new>medley>sources>DESCRIBE.;1 ... done. +;;; {DSK}larry>new>medley>sources>DEXEC.;11 ... done. +;;; {DSK}larry>new>medley>sources>DFILE.;1 ... done. +;;; {DSK}larry>new>medley>sources>DIRECTORY.;2 ... done. +;;; {DSK}larry>new>medley>sources>DISKDLION.;1 ... done. +;;; {DSK}larry>new>medley>sources>DISKVMEMDECLS.;1 ... done. +;;; {DSK}larry>new>medley>sources>DLAP.;1 ... done. +;;; {DSK}larry>new>medley>sources>DMISC.;1 ... done. +;;; {DSK}larry>new>medley>sources>DOVEDECLS.;1 ... done. +;;; {DSK}larry>new>medley>sources>DOVEETHERDECLS.;1 ... done. +;;; {DSK}larry>new>medley>sources>DPUPFTP.;1 ... done. +;;; {DSK}larry>new>medley>sources>DSK.;1 ... done. +;;; {DSK}larry>new>medley>sources>DSKDISPLAY.;1 ... done. +;;; {DSK}larry>new>medley>sources>DSPRINTDEF.;1 ... done. +;;; {DSK}larry>new>medley>sources>DTDECLARE.;3 ... done. +;;; {DSK}larry>new>medley>sources>DWIM.;1 ... done. +;;; {DSK}larry>new>medley>sources>DWIMIFY.;1 ... done. +;;; {DSK}larry>new>medley>sources>EDIT.;1 ... done. +;;; {DSK}larry>new>medley>sources>EDITINTERFACE.;1 ... done. +;;; {DSK}larry>new>medley>sources>ERROR-RUNTIME.;1 ... done. +;;; {DSK}larry>new>medley>sources>ERROR-RUNTIME-AFTER-FASL.;1 ... done. +;;; {DSK}larry>new>medley>sources>EXEC-COMMANDS.;1 ... done. +;;; {DSK}larry>new>medley>sources>FASDUMP.;1 ... done. +;;; {DSK}larry>new>medley>sources>FASL-PACKAGE.;1 ... done. +;;; {DSK}larry>new>medley>sources>FASL-SUPPORT.;1 ... done. +;;; {DSK}larry>new>medley>sources>FASLOAD.;3 ... done. +;;; {DSK}larry>new>medley>sources>FILEIO.;11 ... done. +;;; {DSK}larry>new>medley>sources>FILEPKG.;1 ... done. +;;; {DSK}larry>new>medley>sources>FILESETS.;1 ... done. +;;; {DSK}larry>new>medley>sources>FONT.;1 ... done. +;;; {DSK}larry>new>medley>sources>FONTPROFILE.;2 ... done. +;;; {DSK}larry>new>medley>sources>FONTPROFILEPATCH.;1 ... done. +;;; {DSK}larry>new>medley>sources>FREEMENU.;1 ... done. +;;; {DSK}larry>new>medley>sources>GAINSPACE.;1 ... done. +;;; {DSK}larry>new>medley>sources>HARDCOPY.;7 ... done. +;;; {DSK}larry>new>medley>sources>HIST.;1 ... done. +;;; {DSK}larry>new>medley>sources>HLDISPLAY.;1 ... done. +;;; {DSK}larry>new>medley>sources>HPRINT.;1 ... done. +;;; {DSK}larry>new>medley>sources>ICONW.;1 ... done. +;;; {DSK}larry>new>medley>sources>IDLER.;1 ... done. +;;; {DSK}larry>new>medley>sources>IL-ERROR-STUFF.;1 ... done. +;;; {DSK}larry>new>medley>sources>IMAGEIO.;1 ... done. +;;; {DSK}larry>new>medley>sources>IMPLICIT-KEY-HASH.;1 ... done. +;;; {DSK}larry>new>medley>sources>INSPECT.;8 ... done. +;;; {DSK}larry>new>medley>sources>INSPECT-CLOSURE.;1 ... done. +;;; {DSK}larry>new>medley>sources>INTERPRESS.;7 ... done. +;;; {DSK}larry>new>medley>sources>IOCHAR.;6 ... done. +;;; {DSK}larry>new>medley>sources>JAPANESE.;1 ... done. +;;; {DSK}larry>new>medley>sources>LEAF.;1 ... done. +;;; {DSK}larry>new>medley>sources>LISP-PACKAGE.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLARITH.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLARRAYELT.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLBASIC.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLBFS.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLBIGNUM.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLCHAR.;3 ... done. +;;; {DSK}larry>new>medley>sources>LLCODE.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLDATATYPE.;12 ... done. +;;; {DSK}larry>new>medley>sources>LLDISPLAY.;3 ... done. +;;; {DSK}larry>new>medley>sources>LLERROR.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLETHER.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLFAULT.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLFLOAT.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLGC.;4 ... done. +;;; {DSK}larry>new>medley>sources>LLINTERP.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLKEY.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLMVS.;2 ... done. +;;; {DSK}larry>new>medley>sources>LLNEW.;16 ... done. +;;; {DSK}larry>new>medley>sources>LLNS.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLNSDECLS.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLPACKAGE.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLPARAMS.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLREAD.;2 ... done. +;;; {DSK}larry>new>medley>sources>LLRESTART.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLSTK.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLSUBRS.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLSYMBOL.;1 ... done. +;;; {DSK}larry>new>medley>sources>LLTIMER.;1 ... done. +;;; {DSK}larry>new>medley>sources>LOADFNS.;8 ... done. +;;; {DSK}larry>new>medley>sources>LOADUP-FULL.;1 ... done. +;;; {DSK}larry>new>medley>sources>LOADUP-LISP.;1 ... done. +;;; {DSK}larry>new>medley>sources>LOCALFILE.;1 ... done. +;;; {DSK}larry>new>medley>sources>LOGOW.;3 ... done. +;;; {DSK}larry>new>medley>sources>MACHINEINDEPENDENT.;1 ... done. +;;; {DSK}larry>new>medley>sources>MACROAUX.;1 ... done. +;;; {DSK}larry>new>medley>sources>MACROAUX-OPTIMIZERS.;1 ... done. +;;; {DSK}larry>new>medley>sources>MACROS.;1 ... done. +;;; {DSK}larry>new>medley>sources>MAIKOBITBLT.;1 ... done. +;;; {DSK}larry>new>medley>sources>MAIKOETHER.;1 ... done. +;;; {DSK}larry>new>medley>sources>MAIKOINIT.;1 .Warning: Error attempting to LOADVARS (IL:MAIKOINITCOMS) from {DSK}larry>new>medley>sources>MAIKOINIT.;1. +;;; {DSK}larry>new>medley>sources>MAIKOLOADUPFNS.;3 ... done. +;;; {DSK}larry>new>medley>sources>MAKEINIT.;1 ... done. +;;; {DSK}larry>new>medley>sources>MEM.;1 ... done. +;;; {DSK}larry>new>medley>sources>MENU.;1 ... done. +;;; {DSK}larry>new>medley>sources>MISC.;1 ... done. +;;; {DSK}larry>new>medley>sources>MOD44IO.;1 ... done. +;;; {DSK}larry>new>medley>sources>MODARITH.;1 ... done. +;;; {DSK}larry>new>medley>sources>NEWPRINTDEF.;3 ... done. +;;; {DSK}larry>new>medley>sources>NSFILING.;1 ... done. +;;; {DSK}larry>new>medley>sources>NSPRINT.;1 ... done. +;;; {DSK}larry>new>medley>sources>PACKAGE-CONVERSION-TABLE.;1 ... done. +;;; {DSK}larry>new>medley>sources>PACKAGE-STARTUP.;1 ... done. +;;; {DSK}larry>new>medley>sources>PAINTW.;1 ... done. +;;; {DSK}larry>new>medley>sources>PASSWORDS.;1 ... done. +;;; {DSK}larry>new>medley>sources>PMAP.;3 ... done. +;;; {DSK}larry>new>medley>sources>POSTLOADUP.;1 ... done. +;;; {DSK}larry>new>medley>sources>PRETTY.;7 ... done. +;;; {DSK}larry>new>medley>sources>PRINTFN.;5 ... done. +;;; {DSK}larry>new>medley>sources>PROC.;1 ... done. +;;; {DSK}larry>new>medley>sources>PROFILE.;1 ... done. +;;; {DSK}larry>new>medley>sources>PUP.;1 ... done. +;;; {DSK}larry>new>medley>sources>READSYS.;1 ... done. +;;; {DSK}larry>new>medley>sources>RECORD.;1 ... done. +;;; {DSK}larry>new>medley>sources>RENAMEFNS.;3 ... done. +;;; {DSK}larry>new>medley>sources>RENAMEMACROS.;3 ... done. +;;; {DSK}larry>new>medley>sources>RESOURCE.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-ACCESS.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-ATOMIC.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-BASE.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-COMMANDS.;4 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-COMMENTS.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-CONVERT.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-DEBUG.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-DECLS.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-EXPORTS.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-INDENT.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-LINEAR.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-LIST-FORMATS.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-LISTS.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-TERMINAL.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-TOPLEVEL.;1 ... done. +;;; {DSK}larry>new>medley>sources>SEDIT-WINDOW.;3 ... done. +;;; {DSK}larry>new>medley>sources>SETF-RUNTIME.;1 ... done. +;;; {DSK}larry>new>medley>sources>SPELL.;1 ... done. +;;; {DSK}larry>new>medley>sources>SPELLFILE.;1 ... done. +;;; {DSK}larry>new>medley>sources>SPP.;1 ... done. +;;; {DSK}larry>new>medley>sources>SPPDECLS.;1 ... done. +;;; {DSK}larry>new>medley>sources>STACKFNS.;1 ... done. +;;; {DSK}larry>new>medley>sources>SYSPRETTY.;1 ... done. +;;; {DSK}larry>new>medley>sources>TCPHTE.;1 ... done. +;;; {DSK}larry>new>medley>sources>TIME.;4 ... done. +;;; {DSK}larry>new>medley>sources>TRSERVER.;1 ... done. +;;; {DSK}larry>new>medley>sources>TTYIN.;1 ... done. +;;; {DSK}larry>new>medley>sources>TWODINSPECTOR.;2 ... done. +;;; {DSK}larry>new>medley>sources>UFS.;3 ... done. +;;; {DSK}larry>new>medley>sources>UFSCALLC.;3 ... done. +;;; {DSK}larry>new>medley>sources>UNDO.;1 ... done. +;;; {DSK}larry>new>medley>sources>UNWINDMACROS.;1 ... done. +;;; {DSK}larry>new>medley>sources>VANILLADISK.;1 ... done. +;;; {DSK}larry>new>medley>sources>VMEM.;1 ... done. +;;; {DSK}larry>new>medley>sources>WALKER.;1 ... done. +;;; {DSK}larry>new>medley>sources>WEDIT.;1 ... done. +;;; {DSK}larry>new>medley>sources>WINDOW.;1 ... done. +;;; {DSK}larry>new>medley>sources>WINDOWICON.;1 ... done. +;;; {DSK}larry>new>medley>sources>WINDOWOBJ.;1 ... done. +;;; {DSK}larry>new>medley>sources>WINDOWSCROLL.;1 ... done. +;;; {DSK}larry>new>medley>sources>WRAPPERS.;1 ... done. +;;; {DSK}larry>new>medley>sources>WTFIX.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCCS.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCL-COMPILER.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCL-EXTRAS.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCL-PACKAGE.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCLC-ALPHA.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCLC-ANALYZE.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCLC-ANNOTATE.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCLC-DATABASE.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCLC-ENV-CTXT.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCLC-GENCODE.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCLC-META-EVAL.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCLC-OPTIMIZERS.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCLC-PEEPHOLE.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCLC-RUNTIME.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCLC-TOP-LEVEL.;11 ... done. +;;; {DSK}larry>new>medley>sources>XCLC-TRANSFORMS.;1 ... done. +;;; {DSK}larry>new>medley>sources>XCLC-TREES.;1 ... done. +;;; {DSK}larry>new>medley>sources>XXFILL.;1 ... done. +;;; {DSK}larry>new>medley>sources>XXGEOM.;1 ... done. +;;; {DSK}larry>new>medley>library>BIGBITMAPS.;1 ... done. +;;; {DSK}larry>new>medley>library>BROWSER.;1 ... done. +;;; {DSK}larry>new>medley>library>CASH-FILE.;1 ... done. +;;; {DSK}larry>new>medley>library>CHARCODETABLES.;1 ... done. +;;; {DSK}larry>new>medley>library>CHARDEVICE.;1 ... done. +;;; {DSK}larry>new>medley>library>CHARS.;1 ... done. +;;; {DSK}larry>new>medley>library>CHAT.;1 ... done. +;;; {DSK}larry>new>medley>library>CHATDECLS.;1 ... done. +;;; {DSK}larry>new>medley>library>CHATSERVER-EMACS.;1 ... done. +;;; {DSK}larry>new>medley>library>CHATTERMINAL.;1 ... done. +;;; {DSK}larry>new>medley>library>CLIPBOARD.;1 ... done. +;;; {DSK}larry>new>medley>library>CMLFLOATARRAY.;1 ... done. +;;; {DSK}larry>new>medley>library>COLOR.;1 ... done. +;;; {DSK}larry>new>medley>library>COPYFILES.;2 ... done. +;;; {DSK}larry>new>medley>library>DANDELIONKEYBOARDS.;3 .Warning: Error attempting to LOADVARS (IL:DANDELIONKEYBOARDSCOMS) from {DSK}larry>new>medley>library>DANDELIONKEYBOARDS.;3. +;;; {DSK}larry>new>medley>library>DATABASEFNS.;3 ... done. +;;; {DSK}larry>new>medley>library>DEDIT.;1 ... done. +;;; {DSK}larry>new>medley>library>DEDITPP.;1 ... done. +;;; {DSK}larry>new>medley>library>DES.;1 ... done. +;;; {DSK}larry>new>medley>library>DMCHAT.;1 ... done. +;;; {DSK}larry>new>medley>library>DORADOKEYBOARDS.;3 .Warning: Error attempting to LOADVARS (IL:DORADOKEYBOARDSCOMS) from {DSK}larry>new>medley>library>DORADOKEYBOARDS.;3. +;;; {DSK}larry>new>medley>library>DOSPRINT.;2 ... done. +;;; {DSK}larry>new>medley>library>DOVEKEYBOARDS.;3 .Warning: Error attempting to LOADVARS (IL:DOVEKEYBOARDSCOMS) from {DSK}larry>new>medley>library>DOVEKEYBOARDS.;3. +;;; {DSK}larry>new>medley>library>DOVERS232C.;1 ... done. +;;; {DSK}larry>new>medley>library>EDITBITMAP.;1 ... done. +;;; {DSK}larry>new>medley>library>ETHERRECORDS.;1 ... done. +;;; {DSK}larry>new>medley>library>FILE-UPDATE.;1 ... done. +;;; {DSK}larry>new>medley>library>FILEBROWSER.;2 ... done. +;;; {DSK}larry>new>medley>library>FONTSAMPLE.;1 ... done. +;;; {DSK}larry>new>medley>library>FOREIGN-FUNCTIONS.;2 ... done. +;;; {DSK}larry>new>medley>library>FX-80DRIVER.;1 ... done. +;;; {DSK}larry>new>medley>library>GCHAX.;1 ... done. +;;; {DSK}larry>new>medley>library>GRAPHER.;4 ... done. +;;; {DSK}larry>new>medley>library>GRAPHZOOM.;1 ... done. +;;; {DSK}larry>new>medley>library>HASH.;1 ... done. +;;; {DSK}larry>new>medley>library>HASH-FILE.;1 ... done. +;;; {DSK}larry>new>medley>library>HRULE.;1 ... done. +;;; {DSK}larry>new>medley>library>IMAGEOBJ.;2 ... done. +;;; {DSK}larry>new>medley>library>KEYBOARDCONFIGS.;1 ... done. +;;; {DSK}larry>new>medley>library>KEYBOARDEDITOR.;2 ... done. +;;; {DSK}larry>new>medley>library>lafite> .Warning: Error attempting to LOADVARS (IL:NILCOMS) from {DSK}larry>new>medley>library>lafite>. +;;; {DSK}larry>new>medley>library>LLCOLOR.;1 ... done. +;;; {DSK}larry>new>medley>library>LOAD-SKETCH.;1 ... done. +;;; {DSK}larry>new>medley>library>MAIKOCOLOR.;1 ... done. +;;; {DSK}larry>new>medley>library>MAIKOKEYBOARDS.;3 .Warning: Error attempting to LOADVARS (IL:MAIKOKEYBOARDSCOMS) from {DSK}larry>new>medley>library>MAIKOKEYBOARDS.;3. +;;; {DSK}larry>new>medley>library>MASTERSCOPE.;5 ... done. +;;; {DSK}larry>new>medley>library>MATCH.;1 ... done. +;;; {DSK}larry>new>medley>library>MATMULT.;1 ... done. +;;; {DSK}larry>new>medley>library>MSANALYZE.;1 ... done. +;;; {DSK}larry>new>medley>library>MSCOMMON.;1 ... done. +;;; {DSK}larry>new>medley>library>MSPARSE.;1 ... done. +;;; {DSK}larry>new>medley>library>NSCHAT.;1 ... done. +;;; {DSK}larry>new>medley>library>NSMAINTAIN.;2 ... done. +;;; {DSK}larry>new>medley>library>patches> .Warning: Error attempting to LOADVARS (IL:NILCOMS) from {DSK}larry>new>medley>library>patches>. +;;; {DSK}larry>new>medley>library>PCTREE.;4 ... done. +;;; {DSK}larry>new>medley>library>POSTSCRIPTSTREAM.;3 ... done. +;;; {DSK}larry>new>medley>library>PRESS.;1 ... done. +;;; {DSK}larry>new>medley>library>RDSYS.;1 ... done. +;;; {DSK}larry>new>medley>library>READNUMBER.;1 ... done. +;;; {DSK}larry>new>medley>library>REMOTEVMEM.;1 ... done. +;;; {DSK}larry>new>medley>library>SAMEDIR.;10 ... done. +;;; {DSK}larry>new>medley>library>SCALEBITMAP.;1 ... done. +;;; {DSK}larry>new>medley>library>SEDIT-COMMONLISP.;2 .Warning: Error attempting to LOADVARS (IL:SEDIT-COMMONLISPCOMS) from {DSK}larry>new>medley>library>SEDIT-COMMONLISP.;2. +;;; {DSK}larry>new>medley>library>SKETCH.;1 ... done. +;;; {DSK}larry>new>medley>library>SKETCHBMELT.;1 ... done. +;;; {DSK}larry>new>medley>library>SKETCHEDIT.;1 ... done. +;;; {DSK}larry>new>medley>library>SKETCHELEMENTS.;2 ... done. +;;; {DSK}larry>new>medley>library>SKETCHOBJ.;1 ... done. +;;; {DSK}larry>new>medley>library>SKETCHOPS.;1 ... done. +;;; {DSK}larry>new>medley>library>SKETCHSTREAM.;1 ... done. +;;; {DSK}larry>new>medley>library>SPY.;1 ... done. +;;; {DSK}larry>new>medley>library>SYSEDIT.;1 ... done. +;;; {DSK}larry>new>medley>library>TABLEBROWSER.;3 ... done. +;;; {DSK}larry>new>medley>library>TABLEBROWSERDECLS.;1 ... done. +;;; {DSK}larry>new>medley>library>TBDECLS.;1 ... done. +;;; {DSK}larry>new>medley>library>TEDIT.;2 ... done. +;;; {DSK}larry>new>medley>library>TEDITABBREV.;2 ... done. +;;; {DSK}larry>new>medley>library>TEDITCHAT.;1 ... done. +;;; {DSK}larry>new>medley>library>TEDITCOMMAND.;2 ... done. +;;; {DSK}larry>new>medley>library>TEDITDCL.;1 ... done. +;;; {DSK}larry>new>medley>library>TEDITFILE.;2 ... done. +;;; {DSK}larry>new>medley>library>TEDITFIND.;2 ... done. +;;; {DSK}larry>new>medley>library>TEDITFNKEYS.;4 ... done. +;;; {DSK}larry>new>medley>library>TEDITHCPY.;1 ... done. +;;; {DSK}larry>new>medley>library>TEDITHISTORY.;1 ... done. +;;; {DSK}larry>new>medley>library>TEDITLOOKS.;1 ... done. +;;; {DSK}larry>new>medley>library>TEDITMENU.;1 ... done. +;;; {DSK}larry>new>medley>library>TEDITPAGE.;1 ... done. +;;; {DSK}larry>new>medley>library>TEDITSCREEN.;1 ... done. +;;; {DSK}larry>new>medley>library>TEDITSELECTION.;1 ... done. +;;; {DSK}larry>new>medley>library>TEDITWINDOW.;1 ... done. +;;; {DSK}larry>new>medley>library>TELERAID.;1 ... done. +;;; {DSK}larry>new>medley>library>TEXEC.;1 ... done. +;;; {DSK}larry>new>medley>library>TEXTMODULES.;1 . +{DSK}larry>new>medley>library>SEDIT-COMMONLISP.DFASL;2 XCL Compiler output for source file {DSK}larry>ilisp>medley>SEDIT-COMMONLISP.;1 Source file created 4-Jan-2021 22:52:01 -FASL file created Monday, 4 January 2021, 22:52:13 +FASL file created Wednesday, 5 May 2021, 10:37:50 -{DSK}larry>ilisp>medley>library>TEXTMODULES.DFASL;1 +{DSK}larry>new>medley>library>TEXTMODULES.DFASL;1 XCL Compiler output for source file {DSK}export>lispcore>library>TEXTMODULES.;1 Source file created Wednesday, 16 January 1991, 9:07:18. FASL file created Tuesday, 12 July 1994, 12:31:02. .. done. -;;; {DSK}larry>ilisp>medley>library>TEXTOFD.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>TFBRAVO.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>TTYCHAT.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>UNICODE.;167 ... done. -;;; {DSK}larry>ilisp>medley>library>UNIXCHAT.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>UNIXCOMM.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>UNIXPRINT.;2 ... done. -;;; {DSK}larry>ilisp>medley>library>UNIXTELNET.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>VIRTUALKEYBOARDS.;9 ... done. -;;; {DSK}larry>ilisp>medley>library>VT100KP.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>VTCHAT.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>WHERE-IS.;1 ... done. -;;; {DSK}larry>ilisp>medley>library>XCCS.;2 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>ACCESS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>ACE> .Warning: Error attempting to LOADVARS (IL:NILCOMS) from {DSK}larry>ilisp>medley>lispusers>ACE>. -;;; {DSK}larry>ilisp>medley>lispusers>ADDRESSBOOK.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>AIREGIONS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>AIREGIONS-DEMO.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>AISBLT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>ANALYZER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>ARCHIVEBROWSER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>ARCHIVETOOL.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>ARMODES.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>autosamedir.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>AUXMENU.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>BACKGROUNDIMAGES.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>BACKGROUNDMENU.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>BICLOCK.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>BIGGER-FONT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>BITMAP-GALLERY.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>bitmapfns.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>BLACKBOX.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>BLOCKS-HKB.;1 .Warning: Couldn't find IL:BLOCKS-HKBCOMS on {DSK}larry>ilisp>medley>lispusers>BLOCKS-HKB.;1. -;;; {DSK}larry>ilisp>medley>lispusers>BMENCODE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>BOYERMOORE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>BRKDWNREPORT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>bsearch.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>BUTTONS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>C150STREAM.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>CALENDAR.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>canvasconverter.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>CD.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>CHATEMACS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>CHATSERVER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>CHATSERVER-NS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>CHATSERVER-RS232.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>CHATSERVER-TCP.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>checkset.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>circlprint.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>CL-TTYEDIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COLORDEMO.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COLORNNCC.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COLOROBJ.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COLORPOLYGONS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COMMENTHACKS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COMMON-MAKE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COMMWINDOW.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COMPARE-PATHS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COMPAREDIRECTORIES.;275 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COMPARESOURCES.;4 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>comparetext.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>compilebang.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COURIERDEFS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COURIEREVALSERVE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COURIERIMAGESTREAM.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COURIERSERVE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>COURIERSERVEPATCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>CROCK.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DANDELIONUFO.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DANDELIONUFO4096.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DATATYPESPLUS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DATE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DATEFNS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DATEFORMAT-EDITOR.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DATESORT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DEBUGGER-CONTEXT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DECL.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DEDITHARDCOPY.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DEFAULTICON.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DEFAULTSUBITEMFN.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DEFINERPRINT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DIALPHONE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DICOLOR.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DICT-WINDOW-TYPES.;1 .Warning: Error attempting to LOADVARS (IL:DICT-WINDOW-TYPESCOMS) from {DSK}larry>ilisp>medley>lispusers>DICT-WINDOW-TYPES.;1. -;;; {DSK}larry>ilisp>medley>lispusers>DICTTOOL.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DIGEST.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DIGI-CLOCK.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DINFO.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DIRGRAPHER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DLIONFNKEYS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DOC-OBJECTS.;8 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>document.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>donz.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DORADOCOLOR.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DPUPFTPPATCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DSPSCALE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>dumper.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>DUMPLOAD.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>EDITBG.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>EDITFONT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>EDITKEYS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>EMACS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>ENDNOTE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>EQUATIONFORMS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>EQUATIONS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>ETHERBOOT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>EVALOBJ.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>EYECON.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>FASTEDITBM.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>FILECACHE-FIX.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>FileCacheMsgWindow.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>FILENAMES.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>FILEWATCH.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>FILLREGION.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>FIND-CITATION.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>FINGER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>FM-CREATOR.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>fm-creator-examples> .Warning: Error attempting to LOADVARS (IL:NILCOMS) from {DSK}larry>ilisp>medley>lispusers>fm-creator-examples>. -;;; {DSK}larry>ilisp>medley>lispusers>FONTDECLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>FONTSAMPLER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>FORMACRO.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>FTPSERVERPATCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>GENERIC-INIT.;1 .Warning: Error attempting to LOADVARS (IL:GENERIC-INITCOMS) from {DSK}larry>ilisp>medley>lispusers>GENERIC-INIT.;1. -;;; {DSK}larry>ilisp>medley>lispusers>GRAPHCALLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>GraphGroup.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>GREP.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>GRID-ICONS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>H-ENV.;1 .Warning: Couldn't find IL:H-ENVCOMS on {DSK}larry>ilisp>medley>lispusers>H-ENV.;1. -;;; {DSK}larry>ilisp>medley>lispusers>H-LOAD.;1 .Warning: Couldn't find IL:H-LOADCOMS on {DSK}larry>ilisp>medley>lispusers>H-LOAD.;1. -;;; {DSK}larry>ilisp>medley>lispusers>H-PATCHES.;1 .Warning: Couldn't find IL:H-PATCHESCOMS on {DSK}larry>ilisp>medley>lispusers>H-PATCHES.;1. -;;; {DSK}larry>ilisp>medley>lispusers>H-SOURCE.;1 .Warning: Couldn't find IL:H-SOURCECOMS on {DSK}larry>ilisp>medley>lispusers>H-SOURCE.;1. -;;; {DSK}larry>ilisp>medley>lispusers>HANOI.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>HARDCOPY-RETAIN.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>HASHBUFFER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>HASHDATUM.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>HEADLINE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>HELPSYS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>HGRAPH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>HISTMENU.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>HOSTUP.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>HPGL.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>HYPERDESK-INIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>HYPERDESK-LOG.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>IDEASKETCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>IDLEDRAIN.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>IDLEHAX.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>IDLESWAP.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>INDEX.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>INSPECTCODE-TEDIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>IPTALK.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>IRISCONSTANTS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>IRISDEMOFNS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>IRISIO.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>IRISLIB.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>IRISNET.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>IRISSTREAM.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>IRISVIEW.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>ISO8859IO.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>KEYOBJ.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>KINETIC.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>KOTOLOGO.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LABEL.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LAFITE-INDENT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LAFITEABBREV.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LAFITEPRIVATEDL.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LAFITETIMEDDELETE.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LAMBDATRAN.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LAYOUT-SEDIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LIFE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LISPNERD.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LOADIRIS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LOADMENUITEMS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LoadPatches.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LOGIC.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LOGIC-DEVEL.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LOGIC-UNIFIER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LOGTIME.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LOOKUPINFILES.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>LUPINE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MACINTERFACE.;50 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MACWINDOW.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MAGNIFIER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MAILSHARE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MAKEGRAPH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MANAGER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MANDELBROT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MATHSERVER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>mathserverplot.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MATHTONS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MATRIXOPS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MESATOLISP.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MICROTEK.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MICROTEKPRINT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MIME.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MISSILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MODERNIZE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MONITOR.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MTP.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>MULTIPLE-HARDCOPY.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NEATICONS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NGROUP.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NOTECARDS-4045XLPPATCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NOTEPAD.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NOTEPAD-CORESTYLES.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NOVAFONT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NSALLOCATION.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NSCOPYFILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NSDISPLAYSIZES.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NSPROTECTION.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NSREADERPATCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NSROUTINGHASH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NSTALK.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NSTALKGAP.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>NSTHASIZE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>OSS-LYRIC-PATCHES.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PAC-MAN-IDLE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PACKED-STRUCTURE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PACMAN.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PAGEHOLD.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PARSER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PARSERG.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PATCH-LARGEIPBITMAP.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PATCH-TWOSIDED.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PCMEMTEST.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PHONE-DIRECTORY.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PIECE-MENUS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PIXELBLT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PLAINTEXTSTREAM.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PLAY.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PLOT.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PLOTANDNC-PATCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PLOTBOXPATCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PLOTEXAMPLES.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PLOTINSKETCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PLOTOBJECTS.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PLOTOBJECTS1.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PLOTOBJECTS2.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PORT-CLFILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>POSTSCRIPT> .Warning: Error attempting to LOADVARS (IL:NILCOMS) from {DSK}larry>ilisp>medley>lispusers>POSTSCRIPT>. -;;; {DSK}larry>ilisp>medley>lispusers>POSTSCRIPT-old> .Warning: Error attempting to LOADVARS (IL:NILCOMS) from {DSK}larry>ilisp>medley>lispusers>POSTSCRIPT-old>. -;;; {DSK}larry>ilisp>medley>lispusers>PP-CODE-FILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PREEMPTIVE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PRESSFROMNS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PRETTYFILEINDEX.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PRINTERMENU.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PROGRAMCHAT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PROMPTREMINDERS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PROOFREADER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PS-PATCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PS-RS232.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PS-SEND.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PS-SKETCH-PATCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PS-TTY.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>PSCFONT-FIX-FILENAME.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>QEDIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>QIX.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>READAIS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>READAPPLEFONT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>READBRUSH.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>READDATATYPE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>READDISPLAYFONT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>READEBCDIC.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>READINTERPRESS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>REGION.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>REGISTER-MACHINE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>REMOTEPSW.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>RPC.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>RPCCOMMON.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>RPCDECLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>RPCLOWLEVEL.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>RPCOS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>RPCPORTMAPPER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>RPCRPC.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>RPCSTRUCT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>RPCXDR.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>RS232CNETWORK.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SCREENPAPER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SEARCHMENU.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SEDIT-COMMONLISP.;1 .(SEDIT-COMMONLISPCOMS reset) -.. done. -;;; {DSK}larry>ilisp>medley>lispusers>SEDIT-MENU-ALWAYS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SEDIT-PATCHES.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SEDIT-PROFILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SETDEFAULTPRINTER.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SFFONT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SHOWTIME.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SIMPLECHAT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SIMPLIFY.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SINGLEFILEINDEX.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SKETCHCOLOR.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SKETCHTALK.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SNAPW-ICON.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SOLID-MOVEW.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SOLITAIRE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>STARBG.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>STEP-COMMAND-MENU.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>STORAGE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>STREAMDECLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>STYLESHEET.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SUPERPARENTHESES.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>SYSTATS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TALK.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TALKGAP.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TCPTIME.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TEDIT-CLOSE-ON-SHRINK.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TEDIT-LINE-NUMBERING.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>tedit-process-killer.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TEDITDORADOKEYS.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TEDITKEY.;2 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TEDITTALK.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TEK4010.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TEK4010CHAT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>THINFILES.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TILED-SEDIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>tkdorado.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TMAX.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TMAX-DATE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TMAX-ENDNOTE.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TMAX-INDEX.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TMAX-NGRAPH.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TMAX-NGROUP.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TMAX-NUMBER.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TMAX-XREF.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>tmenu.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TRAJECTORY-FOLLOWER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TRANSOR.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TRANSOR-LOADTRAN.;1 .Warning: Couldn't find IL:TRANSOR-LOADTRANCOMS on {DSK}larry>ilisp>medley>lispusers>TRANSOR-LOADTRAN.;1. -;;; {DSK}larry>ilisp>medley>lispusers>TRICKLE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TSET.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TTYTALK.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TURBO-WINDOWS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>TWODGRAPHICS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>UNBOXEDOPS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>UNDIGESTIFY.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>UNIFIER.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>UPCSTATS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>UTILISOPRS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>UUENCODE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>VANILLA-INIT.;1 .Warning: Error attempting to LOADVARS (IL:VANILLA-INITCOMS) from {DSK}larry>ilisp>medley>lispusers>VANILLA-INIT.;1. -;;; {DSK}larry>ilisp>medley>lispusers>VSTATS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>WALKFILES.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>WDWHACKS.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>WHEELSCROLL.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>WHO-LINE.;3 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>WHOCALLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>WINK.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>WORDNERD.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>XCL-BRIDGE.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>XORCURSORPATCH.;1 ... done. -;;; {DSK}larry>ilisp>medley>lispusers>XREF.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>ABC.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>ARCLEANUP.;2 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>AREDIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>ARHACK.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>ARINDEX.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>ARQUERY.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>arreport-test.;1 .Warning: Error attempting to LOADVARS (IL:ARREPORT-TESTCOMS) from {DSK}larry>ilisp>medley>internal>library>arreport-test.;1. -;;; {DSK}larry>ilisp>medley>internal>library>ARSREPORT.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>CALENDARHACKS.;4 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>CHANGECONTROL.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>COMPTEST.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>CONDITIONGRAPH.;3 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>DICOLOR.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>DO-TEST.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>DUMPFILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>FASL-DEBUG.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>FLOAT-ARRAY-SUPPORT.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>GIVE-AND-TAKE.;3 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>MACROTEST.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>MACROTESTAUX.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>MAILCLIENT.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>MAINTAIN.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>MAKE-EXPORTS-ALL.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>MAKE-TCP-EXPORTS.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>MEDLEY-UTILS.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>MESATYPES.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>msx.;1 .Warning: Error attempting to LOADVARS (IL:MSXCOMS) from {DSK}larry>ilisp>medley>internal>library>msx.;1. -;;; {DSK}larry>ilisp>medley>internal>library>MULTI-COMPILE.;5 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>NATIVE-TRANSLATOR.;1 .Warning: Error attempting to LOADVARS (IL:NATIVE-TRANSLATORCOMS) from {DSK}larry>ilisp>medley>internal>library>NATIVE-TRANSLATOR.;1. -;;; {DSK}larry>ilisp>medley>internal>library>NATIVE-TRANSLATOR-PACKAGE.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>NSTOASCIIDISPLAYFONT.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>PEANO.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>READ-PRINT-PROFILE.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>RELEASETOOLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>SMART-TRICKLE.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>SPLICE.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>TAR.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>TYPEHAX.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>WHEREIS.;1 ... done. -;;; {DSK}larry>ilisp>medley>internal>library>XCLC-DEBUG.;1 ... done. -;;; {DSK}larry>ilisp>medley>greetfiles>INIT.;2 .Warning: Error attempting to LOADVARS (IL:INITCOMS) from {DSK}larry>ilisp>medley>greetfiles>INIT.;2. -;;; {DSK}larry>ilisp>medley>greetfiles>LOCAL-INIT.;46 ... done. -;;; {DSK}larry>ilisp>medley>greetfiles>PARC-INIT.;21 ... done. -;;; {DSK}larry>ilisp>medley>greetfiles>SIMPLE-INIT.;3 ... done. -;;; {DSK}larry>ilisp>medley>docs>Documentation Tools>IMINDEX.;1 ... done. -;;; {DSK}larry>ilisp>medley>docs>Documentation Tools>IMNAME.;1 ... done. -;;; {DSK}larry>ilisp>medley>docs>Documentation Tools>IMTEDIT.;1 ... done. -;;; {DSK}larry>ilisp>medley>docs>Documentation Tools>IMTOOLS.;1 ... done. -;;; {DSK}larry>ilisp>medley>docs>Documentation Tools>IMTRAN.;1 ... done. +;;; {DSK}larry>new>medley>library>TEXTOFD.;2 ... done. +;;; {DSK}larry>new>medley>library>TFBRAVO.;2 ... done. +;;; {DSK}larry>new>medley>library>TTYCHAT.;1 ... done. +;;; {DSK}larry>new>medley>library>UNICODE.;167 ... done. +;;; {DSK}larry>new>medley>library>UNIXCHAT.;1 ... done. +;;; {DSK}larry>new>medley>library>UNIXCOMM.;2 ... done. +;;; {DSK}larry>new>medley>library>UNIXPRINT.;2 ... done. +;;; {DSK}larry>new>medley>library>UNIXTELNET.;1 ... done. +;;; {DSK}larry>new>medley>library>VIRTUALKEYBOARDS.;9 ... done. +;;; {DSK}larry>new>medley>library>VT100KP.;1 ... done. +;;; {DSK}larry>new>medley>library>VTCHAT.;1 ... done. +;;; {DSK}larry>new>medley>library>WHERE-IS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>ACCESS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>ACE> .Warning: Error attempting to LOADVARS (IL:NILCOMS) from {DSK}larry>new>medley>lispusers>ACE>. +;;; {DSK}larry>new>medley>lispusers>ADDRESSBOOK.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>AIREGIONS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>AIREGIONS-DEMO.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>AISBLT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>ANALYZER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>ARCHIVEBROWSER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>ARCHIVETOOL.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>ARMODES.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>autosamedir.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>AUXMENU.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>BACKGROUNDIMAGES.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>BACKGROUNDMENU.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>BICLOCK.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>BIGGER-FONT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>BITMAP-GALLERY.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>bitmapfns.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>BLACKBOX.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>BLOCKS-HKB.;1 .Warning: Couldn't find IL:BLOCKS-HKBCOMS on {DSK}larry>new>medley>lispusers>BLOCKS-HKB.;1. +;;; {DSK}larry>new>medley>lispusers>BMENCODE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>BOYERMOORE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>BRKDWNREPORT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>bsearch.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>BUTTONS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>C150STREAM.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>CALENDAR.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>canvasconverter.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>CD.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>CHATEMACS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>CHATSERVER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>CHATSERVER-NS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>CHATSERVER-RS232.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>CHATSERVER-TCP.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>checkset.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>circlprint.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>CL-TTYEDIT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>COLORDEMO.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>COLORNNCC.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>COLOROBJ.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>COLORPOLYGONS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>COMMENTHACKS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>COMMON-MAKE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>COMMWINDOW.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>COMPARE-PATHS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>COMPAREDIRECTORIES.;275 ... done. +;;; {DSK}larry>new>medley>lispusers>COMPARESOURCES.;4 ... done. +;;; {DSK}larry>new>medley>lispusers>comparetext.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>compilebang.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>COURIERDEFS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>COURIEREVALSERVE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>COURIERIMAGESTREAM.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>COURIERSERVE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>COURIERSERVEPATCH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>CROCK.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DANDELIONUFO.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DANDELIONUFO4096.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DATATYPESPLUS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DATE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DATEFNS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DATEFORMAT-EDITOR.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DATESORT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DEBUGGER-CONTEXT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DECL.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DEDITHARDCOPY.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DEFAULTICON.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DEFAULTSUBITEMFN.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DEFINERPRINT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DIALPHONE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DICOLOR.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DICT-WINDOW-TYPES.;1 .Warning: Error attempting to LOADVARS (IL:DICT-WINDOW-TYPESCOMS) from {DSK}larry>new>medley>lispusers>DICT-WINDOW-TYPES.;1. +;;; {DSK}larry>new>medley>lispusers>DICTTOOL.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>DIGEST.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DIGI-CLOCK.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DINFO.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DIRGRAPHER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DLIONFNKEYS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DOC-OBJECTS.;8 ... done. +;;; {DSK}larry>new>medley>lispusers>document.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>donz.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DORADOCOLOR.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DPUPFTPPATCH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DSPSCALE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>dumper.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>DUMPLOAD.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>EDITBG.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>EDITFONT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>EDITKEYS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>EMACS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>ENDNOTE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>EQUATIONFORMS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>EQUATIONS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>ETHERBOOT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>EVALOBJ.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>EYECON.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>FASTEDITBM.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>FILECACHE-FIX.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>FileCacheMsgWindow.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>FILENAMES.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>FILEWATCH.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>FILLREGION.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>FIND-CITATION.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>FINGER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>FM-CREATOR.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>fm-creator-examples> .Warning: Error attempting to LOADVARS (IL:NILCOMS) from {DSK}larry>new>medley>lispusers>fm-creator-examples>. +;;; {DSK}larry>new>medley>lispusers>FONTDECLS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>FONTSAMPLER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>FORMACRO.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>FTPSERVERPATCH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>GENERIC-INIT.;1 .Warning: Error attempting to LOADVARS (IL:GENERIC-INITCOMS) from {DSK}larry>new>medley>lispusers>GENERIC-INIT.;1. +;;; {DSK}larry>new>medley>lispusers>GRAPHCALLS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>GraphGroup.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>GREP.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>GRID-ICONS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>H-ENV.;1 .Warning: Couldn't find IL:H-ENVCOMS on {DSK}larry>new>medley>lispusers>H-ENV.;1. +;;; {DSK}larry>new>medley>lispusers>H-LOAD.;1 .Warning: Couldn't find IL:H-LOADCOMS on {DSK}larry>new>medley>lispusers>H-LOAD.;1. +;;; {DSK}larry>new>medley>lispusers>H-PATCHES.;1 .Warning: Couldn't find IL:H-PATCHESCOMS on {DSK}larry>new>medley>lispusers>H-PATCHES.;1. +;;; {DSK}larry>new>medley>lispusers>H-SOURCE.;1 .Warning: Couldn't find IL:H-SOURCECOMS on {DSK}larry>new>medley>lispusers>H-SOURCE.;1. +;;; {DSK}larry>new>medley>lispusers>HANOI.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>HARDCOPY-RETAIN.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>HASHBUFFER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>HASHDATUM.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>HEADLINE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>HELPSYS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>HGRAPH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>HISTMENU.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>HOSTUP.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>HPGL.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>HYPERDESK-INIT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>HYPERDESK-LOG.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>IDEASKETCH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>IDLEDRAIN.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>IDLEHAX.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>IDLESWAP.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>INDEX.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>INSPECTCODE-TEDIT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>IPTALK.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>IRISCONSTANTS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>IRISDEMOFNS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>IRISIO.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>IRISLIB.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>IRISNET.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>IRISSTREAM.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>IRISVIEW.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>ISO8859IO.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>KEYOBJ.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>KINETIC.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>KOTOLOGO.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LABEL.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LAFITE-INDENT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LAFITEABBREV.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LAFITEPRIVATEDL.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LAFITETIMEDDELETE.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>LAMBDATRAN.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LAYOUT-SEDIT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LIFE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LISPNERD.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>LOADIRIS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LOADMENUITEMS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LoadPatches.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LOGIC.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LOGIC-DEVEL.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LOGIC-UNIFIER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LOGTIME.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LOOKUPINFILES.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>LUPINE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MACWINDOW.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MAGNIFIER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MAILSHARE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MAKEGRAPH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MANAGER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MANDELBROT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MATHSERVER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>mathserverplot.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MATHTONS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MATRIXOPS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MESATOLISP.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MICROTEK.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MICROTEKPRINT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MIME.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MISSILE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MODERNIZE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MONITOR.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MTP.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>MULTIPLE-HARDCOPY.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>NEATICONS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>NGROUP.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>NOTECARDS-4045XLPPATCH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>NOTEPAD.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>NOTEPAD-CORESTYLES.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>NOVAFONT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>NSALLOCATION.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>NSCOPYFILE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>NSDISPLAYSIZES.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>NSPROTECTION.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>NSREADERPATCH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>NSROUTINGHASH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>NSTALK.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>NSTALKGAP.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>NSTHASIZE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>OSS-LYRIC-PATCHES.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PAC-MAN-IDLE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PACKED-STRUCTURE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PACMAN.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PAGEHOLD.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PARSER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PARSERG.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PATCH-LARGEIPBITMAP.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PATCH-TWOSIDED.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PCMEMTEST.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PHONE-DIRECTORY.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PIECE-MENUS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PIXELBLT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PLAINTEXTSTREAM.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PLAY.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PLOT.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>PLOTANDNC-PATCH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PLOTBOXPATCH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PLOTEXAMPLES.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PLOTINSKETCH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PLOTOBJECTS.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>PLOTOBJECTS1.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PLOTOBJECTS2.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PORT-CLFILE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>POSTSCRIPT> .Warning: Error attempting to LOADVARS (IL:NILCOMS) from {DSK}larry>new>medley>lispusers>POSTSCRIPT>. +;;; {DSK}larry>new>medley>lispusers>POSTSCRIPT-old> .Warning: Error attempting to LOADVARS (IL:NILCOMS) from {DSK}larry>new>medley>lispusers>POSTSCRIPT-old>. +;;; {DSK}larry>new>medley>lispusers>PP-CODE-FILE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PREEMPTIVE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PRESSFROMNS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PRETTYFILEINDEX.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>PRINTERMENU.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PROGRAMCHAT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PROMPTREMINDERS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PROOFREADER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PS-PATCH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PS-RS232.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PS-SEND.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PS-SKETCH-PATCH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PS-TTY.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>PSCFONT-FIX-FILENAME.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>QEDIT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>QIX.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>READAIS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>READAPPLEFONT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>READBRUSH.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>READDATATYPE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>READDISPLAYFONT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>READEBCDIC.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>READINTERPRESS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>REGION.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>REGISTER-MACHINE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>REMOTEPSW.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>RPC.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>RPCCOMMON.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>RPCDECLS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>RPCLOWLEVEL.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>RPCOS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>RPCPORTMAPPER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>RPCRPC.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>RPCSTRUCT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>RPCXDR.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>RS232CNETWORK.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SCREENPAPER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SEARCHMENU.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SEDIT-MENU-ALWAYS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SEDIT-PATCHES.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SEDIT-PROFILE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SETDEFAULTPRINTER.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>SFFONT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SHOWTIME.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SIMPLECHAT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SIMPLIFY.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SINGLEFILEINDEX.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SKETCHCOLOR.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SKETCHTALK.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SNAPW-ICON.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SOLID-MOVEW.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SOLITAIRE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>STARBG.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>STEP-COMMAND-MENU.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>STORAGE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>STREAMDECLS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>STYLESHEET.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SUPERPARENTHESES.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>SYSTATS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TALK.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TALKGAP.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TCPTIME.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TEDIT-CLOSE-ON-SHRINK.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TEDIT-LINE-NUMBERING.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>tedit-process-killer.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TEDITDORADOKEYS.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>TEDITKEY.;2 ... done. +;;; {DSK}larry>new>medley>lispusers>TEDITTALK.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TEK4010.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TEK4010CHAT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>THINFILES.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TILED-SEDIT.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>tkdorado.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TMAX.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>TMAX-DATE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TMAX-ENDNOTE.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>TMAX-INDEX.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>TMAX-NGRAPH.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>TMAX-NGROUP.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>TMAX-NUMBER.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>TMAX-XREF.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>tmenu.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TRAJECTORY-FOLLOWER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TRANSOR.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TRANSOR-LOADTRAN.;1 .Warning: Couldn't find IL:TRANSOR-LOADTRANCOMS on {DSK}larry>new>medley>lispusers>TRANSOR-LOADTRAN.;1. +;;; {DSK}larry>new>medley>lispusers>TRICKLE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TSET.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TTYTALK.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TURBO-WINDOWS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>TWODGRAPHICS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>UNBOXEDOPS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>UNDIGESTIFY.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>UNIFIER.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>UPCSTATS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>UTILISOPRS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>UUENCODE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>VANILLA-INIT.;1 .Warning: Error attempting to LOADVARS (IL:VANILLA-INITCOMS) from {DSK}larry>new>medley>lispusers>VANILLA-INIT.;1. +;;; {DSK}larry>new>medley>lispusers>VSTATS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>WALKFILES.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>WDWHACKS.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>WHEELSCROLL.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>WHO-LINE.;3 ... done. +;;; {DSK}larry>new>medley>lispusers>WHOCALLS.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>WINK.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>WORDNERD.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>XCL-BRIDGE.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>XORCURSORPATCH.;1 ... done. +;;; {DSK}larry>new>medley>lispusers>XREF.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>ABC.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>ARCLEANUP.;2 ... done. +;;; {DSK}larry>new>medley>internal>library>AREDIT.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>ARHACK.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>ARINDEX.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>ARQUERY.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>arreport-test.;1 .Warning: Error attempting to LOADVARS (IL:ARREPORT-TESTCOMS) from {DSK}larry>new>medley>internal>library>arreport-test.;1. +;;; {DSK}larry>new>medley>internal>library>ARSREPORT.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>CALENDARHACKS.;4 ... done. +;;; {DSK}larry>new>medley>internal>library>CHANGECONTROL.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>COMPTEST.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>CONDITIONGRAPH.;3 ... done. +;;; {DSK}larry>new>medley>internal>library>DICOLOR.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>DO-TEST.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>DUMPFILE.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>FASL-DEBUG.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>FLOAT-ARRAY-SUPPORT.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>GIVE-AND-TAKE.;3 ... done. +;;; {DSK}larry>new>medley>internal>library>MACROTEST.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>MACROTESTAUX.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>MAILCLIENT.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>MAINTAIN.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>MAKE-EXPORTS-ALL.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>MAKE-TCP-EXPORTS.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>MEDLEY-UTILS.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>MESATYPES.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>msx.;1 .Warning: Error attempting to LOADVARS (IL:MSXCOMS) from {DSK}larry>new>medley>internal>library>msx.;1. +;;; {DSK}larry>new>medley>internal>library>MULTI-COMPILE.;5 ... done. +;;; {DSK}larry>new>medley>internal>library>NATIVE-TRANSLATOR.;1 .Warning: Error attempting to LOADVARS (IL:NATIVE-TRANSLATORCOMS) from {DSK}larry>new>medley>internal>library>NATIVE-TRANSLATOR.;1. +;;; {DSK}larry>new>medley>internal>library>NATIVE-TRANSLATOR-PACKAGE.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>NSTOASCIIDISPLAYFONT.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>PEANO.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>READ-PRINT-PROFILE.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>RELEASETOOLS.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>SMART-TRICKLE.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>SPLICE.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>TAR.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>TYPEHAX.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>WHEREIS.;1 ... done. +;;; {DSK}larry>new>medley>internal>library>XCLC-DEBUG.;1 ... done. +;;; {DSK}larry>new>medley>greetfiles>INIT.;2 .Warning: Error attempting to LOADVARS (IL:INITCOMS) from {DSK}larry>new>medley>greetfiles>INIT.;2. +;;; {DSK}larry>new>medley>greetfiles>LOCAL-INIT.;46 ... done. +;;; {DSK}larry>new>medley>greetfiles>PARC-INIT.;1 ... done. +;;; {DSK}larry>new>medley>greetfiles>SIMPLE-INIT.;3 ... done. +;;; {DSK}larry>new>medley>docs>Documentation Tools>IMINDEX.;1 ... done. +;;; {DSK}larry>new>medley>docs>Documentation Tools>IMNAME.;1 ... done. +;;; {DSK}larry>new>medley>docs>Documentation Tools>IMTEDIT.;1 ... done. +;;; {DSK}larry>new>medley>docs>Documentation Tools>IMTOOLS.;1 ... done. +;;; {DSK}larry>new>medley>docs>Documentation Tools>IMTRAN.;1 ... done. diff --git a/loadups/whereis.hash b/loadups/whereis.hash index b782e9de0..f986a7ea8 100644 Binary files a/loadups/whereis.hash and b/loadups/whereis.hash differ diff --git a/sources/ABASIC b/sources/ABASIC index 92ac4de98..a600f82cf 100644 --- a/sources/ABASIC +++ b/sources/ABASIC @@ -1,13 +1,15 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "16-May-90 11:43:16" {DSK}local>lde>lispcore>sources>ABASIC.;2 24522 +(FILECREATED " 9-Jun-2021 19:40:59"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>ABASIC.;2 24528 - changes to%: (VARS ABASICCOMS) + changes to%: (FNS NILL ZERO) - previous date%: "10-Nov-87 13:01:39" {DSK}local>lde>lispcore>sources>ABASIC.;1) + previous date%: "16-May-90 11:43:16" +{DSK}kaplan>Local>medley3.5>git-medley>sources>ABASIC.;1) (* ; " -Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1982-1987, 1990, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT ABASICCOMS) @@ -17,8 +19,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Corporat (FNS NILL EVQ TRUE ZERO CL:IDENTITY DUMMYDEF NOTIMP) (P (DUMMYDEF (WINDOWWORLDP NILL))) (FNS EQUAL NEQ NULL NOT) - (COMS (* ; - "Belong on ACODE except they would clobber 10-versions in ABC") + (COMS (* ; + "Belong on ACODE except they would clobber 10-versions in ABC") (FNS LAPRD DEFC CGETD)) (FNS NCONC \NCONC2 SORT MERGE SORT1 FASSOC FLAST FLENGTH FMEMB FNTH LIST LIST* COUNT) (FNS CHANGENAME1 CHANGENAME1A) @@ -26,15 +28,15 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Corporat CDDADR CDDAAR CDAAAR CADADR CDADDR CDADAR CAADDR CDAADR CAADAR CADDDR CADAAR CADDAR CAAADR) (FNS SYSTEMTYPE) - (COMS (* ; - "Because can't have bignums in code at makeinit time") + (COMS (* ; + "Because can't have bignums in code at makeinit time") (VARS (\IMAX.FLOAT (FIX MAX.FLOAT)) (\IMIN.FLOAT (FIX MIN.FLOAT))) (GLOBALVARS \IMAX.FLOAT \IMIN.FLOAT)) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA DUMMYDEF) (NLAML) - (LAMA LIST* LIST NCONC NOTIMP ZERO TRUE NILL]) + (LAMA LIST* LIST NCONC NOTIMP ZERO NILL]) (DEFINEQ (EVALQT @@ -62,7 +64,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Corporat (DEFINEQ (NILL - [LAMBDA NOBIND (* lmm " 4-OCT-83 03:05") + [LAMBDA NIL (* ; "Edited 9-Jun-2021 19:40 by rmk:") NIL]) (EVQ @@ -74,7 +76,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Corporat T]) (ZERO - [LAMBDA NOBIND (* lmm " 4-OCT-83 03:05") + [LAMBDA NIL (* ; "Edited 9-Jun-2021 19:40 by rmk:") 0]) (CL:IDENTITY @@ -644,7 +646,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Corporat (ADDTOVAR NLAML ) -(ADDTOVAR LAMA LIST* LIST NCONC NOTIMP ZERO TRUE NILL) +(ADDTOVAR LAMA LIST* LIST NCONC NOTIMP ZERO NILL) ) (PRETTYCOMPRINT ABASICCOMS) @@ -653,8 +655,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Corporat (FNS NILL EVQ TRUE ZERO CL:IDENTITY DUMMYDEF NOTIMP) (P (DUMMYDEF (WINDOWWORLDP NILL))) (FNS EQUAL NEQ NULL NOT) - (COMS (* ; - "Belong on ACODE except they would clobber 10-versions in ABC") + (COMS (* ; + "Belong on ACODE except they would clobber 10-versions in ABC") (FNS LAPRD DEFC CGETD)) (FNS NCONC \NCONC2 SORT MERGE SORT1 FASSOC FLAST FLENGTH FMEMB FNTH LIST LIST* COUNT) (FNS CHANGENAME1 CHANGENAME1A) @@ -662,38 +664,38 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Corporat CDDADR CDDAAR CDAAAR CADADR CDADDR CDADAR CAADDR CDAADR CAADAR CADDDR CADAAR CADDAR CAAADR) (FNS SYSTEMTYPE) - (COMS (* ; - "Because can't have bignums in code at makeinit time") + (COMS (* ; + "Because can't have bignums in code at makeinit time") (VARS (\IMAX.FLOAT (FIX MAX.FLOAT)) (\IMIN.FLOAT (FIX MIN.FLOAT))) (GLOBALVARS \IMAX.FLOAT \IMIN.FLOAT)) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA DUMMYDEF) (NLAML) - (LAMA LIST* LIST NCONC NOTIMP ZERO NILL]) + (LAMA LIST* LIST NCONC NOTIMP]) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDTOVAR NLAMA DUMMYDEF) (ADDTOVAR NLAML ) -(ADDTOVAR LAMA LIST* LIST NCONC NOTIMP ZERO NILL) +(ADDTOVAR LAMA LIST* LIST NCONC NOTIMP) ) -(PUTPROPS ABASIC COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1990)) +(PUTPROPS ABASIC COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1990 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (1772 2517 (EVALQT 1782 . 2275) (\SystemERROR 2277 . 2515)) (2518 3516 (NILL 2528 . 2634 -) (EVQ 2636 . 2737) (TRUE 2739 . 2843) (ZERO 2845 . 2949) (CL:IDENTITY 2951 . 3064) (DUMMYDEF 3066 . -3377) (NOTIMP 3379 . 3514)) (3553 8305 (EQUAL 3563 . 8173) (NEQ 8175 . 8222) (NULL 8224 . 8263) (NOT -8265 . 8303)) (8383 10259 (LAPRD 8393 . 8884) (DEFC 8886 . 10169) (CGETD 10171 . 10257)) (10260 19969 -(NCONC 10270 . 10673) (\NCONC2 10675 . 10870) (SORT 10872 . 11256) (MERGE 11258 . 14142) (SORT1 14144 - . 17315) (FASSOC 17317 . 17553) (FLAST 17555 . 17801) (FLENGTH 17803 . 18118) (FMEMB 18120 . 18479) ( -FNTH 18481 . 18963) (LIST 18965 . 19268) (LIST* 19270 . 19640) (COUNT 19642 . 19967)) (19970 20799 ( -CHANGENAME1 19980 . 20471) (CHANGENAME1A 20473 . 20797)) (20800 22254 (CDDR 20810 . 20851) (CDAR 20853 - . 20894) (CADR 20896 . 20937) (CAAR 20939 . 20980) (CDDDR 20982 . 21029) (CDDAR 21031 . 21078) (CDADR - 21080 . 21127) (CDAAR 21129 . 21176) (CADDR 21178 . 21225) (CADAR 21227 . 21274) (CAADR 21276 . 21323 -) (CAAAR 21325 . 21372) (CDDDDR 21374 . 21427) (CAAAAR 21429 . 21482) (CDDDAR 21484 . 21537) (CDDADR -21539 . 21592) (CDDAAR 21594 . 21647) (CDAAAR 21649 . 21702) (CADADR 21704 . 21757) (CDADDR 21759 . -21812) (CDADAR 21814 . 21867) (CAADDR 21869 . 21922) (CDAADR 21924 . 21977) (CAADAR 21979 . 22032) ( -CADDDR 22034 . 22087) (CADAAR 22089 . 22142) (CADDAR 22144 . 22197) (CAAADR 22199 . 22252)) (22255 -22481 (SYSTEMTYPE 22265 . 22479))))) + (FILEMAP (NIL (1762 2507 (EVALQT 1772 . 2265) (\SystemERROR 2267 . 2505)) (2508 3542 (NILL 2518 . 2642 +) (EVQ 2644 . 2745) (TRUE 2747 . 2851) (ZERO 2853 . 2975) (CL:IDENTITY 2977 . 3090) (DUMMYDEF 3092 . +3403) (NOTIMP 3405 . 3540)) (3579 8331 (EQUAL 3589 . 8199) (NEQ 8201 . 8248) (NULL 8250 . 8289) (NOT +8291 . 8329)) (8409 10285 (LAPRD 8419 . 8910) (DEFC 8912 . 10195) (CGETD 10197 . 10283)) (10286 19995 +(NCONC 10296 . 10699) (\NCONC2 10701 . 10896) (SORT 10898 . 11282) (MERGE 11284 . 14168) (SORT1 14170 + . 17341) (FASSOC 17343 . 17579) (FLAST 17581 . 17827) (FLENGTH 17829 . 18144) (FMEMB 18146 . 18505) ( +FNTH 18507 . 18989) (LIST 18991 . 19294) (LIST* 19296 . 19666) (COUNT 19668 . 19993)) (19996 20825 ( +CHANGENAME1 20006 . 20497) (CHANGENAME1A 20499 . 20823)) (20826 22280 (CDDR 20836 . 20877) (CDAR 20879 + . 20920) (CADR 20922 . 20963) (CAAR 20965 . 21006) (CDDDR 21008 . 21055) (CDDAR 21057 . 21104) (CDADR + 21106 . 21153) (CDAAR 21155 . 21202) (CADDR 21204 . 21251) (CADAR 21253 . 21300) (CAADR 21302 . 21349 +) (CAAAR 21351 . 21398) (CDDDDR 21400 . 21453) (CAAAAR 21455 . 21508) (CDDDAR 21510 . 21563) (CDDADR +21565 . 21618) (CDDAAR 21620 . 21673) (CDAAAR 21675 . 21728) (CADADR 21730 . 21783) (CDADDR 21785 . +21838) (CDADAR 21840 . 21893) (CAADDR 21895 . 21948) (CDAADR 21950 . 22003) (CAADAR 22005 . 22058) ( +CADDDR 22060 . 22113) (CADAAR 22115 . 22168) (CADDAR 22170 . 22223) (CAAADR 22225 . 22278)) (22281 +22507 (SYSTEMTYPE 22291 . 22505))))) STOP diff --git a/sources/ABASIC.LCOM b/sources/ABASIC.LCOM index dce2aa639..454d9da2f 100644 Binary files a/sources/ABASIC.LCOM and b/sources/ABASIC.LCOM differ diff --git a/sources/ADIR b/sources/ADIR index 631cf8468..7fe32da35 100644 --- a/sources/ADIR +++ b/sources/ADIR @@ -1,10 +1,10 @@ (DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED "21-Mar-2021 21:59:07" {DSK}larry>ilisp>medley>sources>ADIR.;30 65795 +(FILECREATED "13-Jun-2021 11:25:58" {DSK}kaplan>Local>medley3.5>git-medley>sources>ADIR.;9 65815 - changes to%: (VARS ADIRCOMS) - (FNS \FLUSHVM \LOGOUT0) + changes to%: (FNS OPENSTREAM) - previous date%: "16-Mar-2021 19:55:51" {DSK}larry>ilisp>medley>sources>ADIR.;26) + previous date%: "21-Mar-2021 21:59:07" +{DSK}kaplan>Local>medley3.5>git-medley>sources>ADIR.;8) (* ; " @@ -14,14 +14,14 @@ Copyright (c) 1981-1988, 1990-1992, 1920, 2017, 2020-2021 by Venue & Xerox Corpo (PRETTYCOMPRINT ADIRCOMS) (RPAQQ ADIRCOMS - [[COMS (* ; "user-level i/o routines") + [[COMS (* ; "user-level i/o routines") (FNS DELFILE FULLNAME INFILE INFILEP IOFILE OPENFILE OPENSTREAM OUTFILE OUTFILEP RENAMEFILE SIMPLE.FINDFILE VMEMSIZE \COPYSYS \FLUSHVM \LOGOUT0) (CONSTANTS (MULTIPLE.STREAMS.PER.FILE.ALLOWED T)) (P (MOVD? 'SIMPLE.FINDFILE 'FINDFILE NIL T)) (DECLARE%: DONTEVAL@LOAD DOCOPY (P - (* ;; "for the benefit of the call to PATHNAMEP in OPENSTREAM. PATHNAMEP (and pathnames) get defined much later in the loadup.") + (* ;; "for the benefit of the call to PATHNAMEP in OPENSTREAM. PATHNAMEP (and pathnames) get defined much later in the loadup.") (MOVD? 'NILL 'CL:PATHNAMEP] (COMS (FNS UNPACKFILENAME UNPACKFILENAME.STRING LASTCHPOS \UPF.NEXTPOS \UPF.TEMPFILEP @@ -30,8 +30,8 @@ Copyright (c) 1981-1988, 1990-1992, 1920, 2017, 2020-2021 by Venue & Xerox Corpo PACKFILENAME.ASSEMBLE UNPACKFILE1)) (VARS \FILENAME.SYNTAX) (GLOBALVARS \FILENAME.SYNTAX)) - (COMS (* ; - "saving and restoring system state") + (COMS (* ; + "saving and restoring system state") (FNS LOGOUT MAKESYS SYSOUT SAVEVM HERALD INTERPRET.REM.CM \USEREVENT) (ADDVARS (AROUNDEXITFNS)) (INITVARS (HERALDSTRING "") @@ -89,7 +89,7 @@ Copyright (c) 1981-1988, 1990-1992, 1920, 2017, 2020-2021 by Venue & Xerox Corpo OPTIONAL]) (OPENSTREAM - [LAMBDA (FILE ACCESS RECOG PARAMETERS OBSOLETE) (* hdj "28-Aug-86 14:50") + [LAMBDA (FILE ACCESS RECOG PARAMETERS OBSOLETE) (* ; "Edited 13-Jun-2021 11:25 by rmk:") (PROG (REC OLDSTREAM STREAM) (SELECTQ ACCESS ((INPUT OUTPUT BOTH APPEND)) @@ -106,7 +106,7 @@ Copyright (c) 1981-1988, 1990-1992, 1920, 2017, 2020-2021 by Venue & Xerox Corpo (AND PARAMETERS (NLISTP PARAMETERS))) then - (* ;; "used to have OPENFILE/OPENSTREAM with BYTESIZE and PARAMETERS. Now it will take PARAMETERS, and generally ignore the BYTESIZE") + (* ;; "used to have OPENFILE/OPENSTREAM with BYTESIZE and PARAMETERS. Now it will take PARAMETERS, and generally ignore the BYTESIZE") (SETQ PARAMETERS (APPEND (SELECTQ PARAMETERS (7 '((TYPE TEXT))) @@ -117,46 +117,46 @@ Copyright (c) 1981-1988, 1990-1992, 1920, 2017, 2020-2021 by Venue & Xerox Corpo ((OR (EQ FILE T) (NULL FILE)) - (* ;; "Handle T and NIL separately, cause they can return the terminal streams, for which the search isn't necessary and the \ADDOFD shouldn't be done.") + (* ;; "Handle T and NIL separately, cause they can return the terminal streams, for which the search isn't necessary and the \ADDOFD shouldn't be done.") (SETQ STREAM (\GETSTREAM FILE ACCESS)) (\DO.PARAMS.AT.OPEN STREAM ACCESS PARAMETERS) (RETURN STREAM))) - (* ;; "Explicitly test for PATHNAMEP, as PATHNAMEP will have a NILL def early in the loadup, and the tests in \CONVERT-PATHNAME won't break anything") + (* ;; "Explicitly test for PATHNAMEP, as PATHNAMEP will have a NILL def early in the loadup, and the tests in \CONVERT-PATHNAME won't break anything") - (* ;; "Pavel changed a call to (PATHNAMEP FILE) into (TYPEP FILE `PATHNAME) because PATHNAMEP didn't have a NILL defn early in the loadup and TYPEP has an optimizer on it that compiles away the call to TYPEP which also has no defn early in the loadup.") + (* ;; "Pavel changed a call to (PATHNAMEP FILE) into (TYPEP FILE `PATHNAME) because PATHNAMEP didn't have a NILL defn early in the loadup and TYPEP has an optimizer on it that compiles away the call to TYPEP which also has no defn early in the loadup.") - (* ;; "Pavel also added the call to MKSTRING below as a temporary hack to get around the fact that the Interlisp string functions can't yet handle Common Lisp simple-strings.") + (* ;; "Pavel also added the call to MKSTRING below as a temporary hack to get around the fact that the Interlisp string functions can't yet handle Common Lisp simple-strings.") (if (TYPEP FILE 'PATHNAME) then (SETQ FILE (\CONVERT-PATHNAME FILE))) - (* ;; "We open the file before looking to see whether it is already open. This guarantees that we acquire the opening rights at the time we lookup the name. We then check to see if it is currently open in Lisp. If it is, we return the previous stream, which has the file's current state. ") + (* ;; "We open the file before looking to see whether it is already open. This guarantees that we acquire the opening rights at the time we lookup the name. We then check to see if it is currently open in Lisp. If it is, we return the previous stream, which has the file's current state. ") - (* ;; "There are still potential problems: First, an interrupt can happen while we are doing the search which causes the file to be deleted or re-opened beneath us, BEFORE it gets added to \OPENFILES. Second, a network device might not allow multiple openings of the file, even by the same guy with the same mode.") + (* ;; "There are still potential problems: First, an interrupt can happen while we are doing the search which causes the file to be deleted or re-opened beneath us, BEFORE it gets added to \OPENFILES. Second, a network device might not allow multiple openings of the file, even by the same guy with the same mode.") (SETQ STREAM (\OPENFILE FILE ACCESS REC PARAMETERS)) (COND [[AND (NOT MULTIPLE.STREAMS.PER.FILE.ALLOWED) - (SETQ OLDSTREAM (\SEARCHOPENFILES (fetch FULLNAME of STREAM] + (SETQ OLDSTREAM (\SEARCHOPENFILES (fetch (STREAM FULLNAME) of STREAM] - (* ;; "There is already a stream open on the file. Check that there is no conflict. Eventually all this registration belongs in the device, so that we can have multiple streams open per file") + (* ;; "There is already a stream open on the file. Check that there is no conflict. Eventually all this registration belongs in the device, so that we can have multiple streams open per file") (COND ((AND (EQ ACCESS 'INPUT) - (EQ (fetch ACCESS of OLDSTREAM) - 'INPUT)) (* ; - "Dispose of the newly-obtained stream, This might be a noop, but a network device (LEAF) cares") + (EQ (fetch (STREAM ACCESS) of OLDSTREAM) + 'INPUT)) (* ; + "Dispose of the newly-obtained stream, This might be a noop, but a network device (LEAF) cares") (OR (EQ STREAM OLDSTREAM) (\CLOSEFILE STREAM)) (\DO.PARAMS.AT.OPEN OLDSTREAM ACCESS PARAMETERS) - (* ; "Do parameters on the old stream") + (* ; "Do parameters on the old stream") (RETURN OLDSTREAM)) (T (LISPERROR "FILE WON'T OPEN" FILE] (T (AND (NOT MULTIPLE.STREAMS.PER.FILE.ALLOWED) - (\ADDOFD STREAM)) (* ; - "Parameters done on new stream by \OPENFILE") + (\ADDOFD STREAM)) (* ; + "Parameters done on new stream by \OPENFILE") (RETURN STREAM]) (OUTFILE @@ -274,7 +274,7 @@ Copyright (c) 1981-1988, 1990-1992, 1920, 2017, 2020-2021 by Venue & Xerox Corpo (DECLARE%: DONTEVAL@LOAD DOCOPY -(* ;; "for the benefit of the call to PATHNAMEP in OPENSTREAM. PATHNAMEP (and pathnames) get defined much later in the loadup.") +(* ;; "for the benefit of the call to PATHNAMEP in OPENSTREAM. PATHNAMEP (and pathnames) get defined much later in the loadup.") (MOVD? 'NILL 'CL:PATHNAMEP) @@ -709,7 +709,7 @@ Copyright (c) 1981-1988, 1990-1992, 1920, 2017, 2020-2021 by Venue & Xerox Corpo LP (COND ((<= I N) - (* ;; "Grab the next field-name / value pair and fold it into the filename:") + (* ;; "Grab the next field-name / value pair and fold it into the filename:") (COND ((LISTP (SETQ VAR (ARG N I))) @@ -803,7 +803,7 @@ Copyright (c) 1981-1988, 1990-1992, 1920, 2017, 2020-2021 by Venue & Xerox Corpo BLIP]) (RELATIVEDIRECTORY - (* ;; "This used to set RELATIVEDIRECTORY to BLIP if DIRECTORY was already specified. It really should act as a subdirectory in that case? JDS") + (* ;; "This used to set RELATIVEDIRECTORY to BLIP if DIRECTORY was already specified. It really should act as a subdirectory in that case? JDS") (OR RELATIVEDIRECTORY (SETQ RELATIVEDIRECTORY (OR (CADR X) @@ -826,7 +826,7 @@ Copyright (c) 1981-1988, 1990-1992, 1920, 2017, 2020-2021 by Venue & Xerox Corpo (SUBDIRECTORY (OR SUBDIRECTORY (SETQ SUBDIRECTORY (OR VAL BLIP)))) (RELATIVEDIRECTORY - (* ;; "This used to set RELATIVEDIRECTORY to BLIP if DIRECTORY was already specified. It really should act as a subdirectory in that case? JDS") + (* ;; "This used to set RELATIVEDIRECTORY to BLIP if DIRECTORY was already specified. It really should act as a subdirectory in that case? JDS") (OR RELATIVEDIRECTORY (SETQ RELATIVEDIRECTORY (OR VAL BLIP)))) (DEVICE (OR DEVICE (SETQ DEVICE (OR VAL BLIP)))) @@ -913,8 +913,8 @@ Copyright (c) 1981-1988, 1990-1992, 1920, 2017, 2020-2021 by Venue & Xerox Corpo (SUBSTRING VERSION 2 -1)) VERSION]) -(PUTPROPS UNPACKFILE1 MACRO [OPENLAMBDA (NAM ST END) - (* lmm "22-APR-81 22:21") +(PUTPROPS UNPACKFILE1 MACRO [OPENLAMBDA (NAM ST END) + (* lmm "22-APR-81 22:21") (COND [(NOT ONEFIELDFLG) (SETQ VAL (CONS (COND @@ -1158,14 +1158,14 @@ Copyright (c) 1981-1988, 1990-1992, 1920, 2017, 2020-2021 by Venue & Xerox Corpo (PUTPROPS ADIR COPYRIGHT ("Venue & Xerox Corporation" 1981 1982 1983 1984 1985 1986 1987 1988 1990 1991 1992 1920 2017 2020 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (2745 13838 (DELFILE 2755 . 2916) (FULLNAME 2918 . 3285) (INFILE 3287 . 3435) (INFILEP -3437 . 3572) (IOFILE 3574 . 3714) (OPENFILE 3716 . 4116) (OPENSTREAM 4118 . 8426) (OUTFILE 8428 . 8579 -) (OUTFILEP 8581 . 8717) (RENAMEFILE 8719 . 9025) (SIMPLE.FINDFILE 9027 . 9437) (VMEMSIZE 9439 . 9606) - (\COPYSYS 9608 . 12557) (\FLUSHVM 12559 . 13631) (\LOGOUT0 13633 . 13836)) (14210 33801 ( -UNPACKFILENAME 14220 . 14406) (UNPACKFILENAME.STRING 14408 . 30680) (LASTCHPOS 30682 . 31376) ( -\UPF.NEXTPOS 31378 . 32023) (\UPF.TEMPFILEP 32025 . 32602) (FILENAMEFIELD 32604 . 33089) (PACKFILENAME - 33091 . 33434) (PACKFILENAME.STRING 33436 . 33799)) (56242 63422 (LOGOUT 56252 . 57169) (MAKESYS -57171 . 58800) (SYSOUT 58802 . 60354) (SAVEVM 60356 . 61156) (HERALD 61158 . 61318) (INTERPRET.REM.CM -61320 . 63045) (\USEREVENT 63047 . 63420)) (63604 65331 (USERNAME 63614 . 64570) (SETUSERNAME 64572 . -65329))))) + (FILEMAP (NIL (2733 13858 (DELFILE 2743 . 2904) (FULLNAME 2906 . 3273) (INFILE 3275 . 3423) (INFILEP +3425 . 3560) (IOFILE 3562 . 3702) (OPENFILE 3704 . 4104) (OPENSTREAM 4106 . 8446) (OUTFILE 8448 . 8599 +) (OUTFILEP 8601 . 8737) (RENAMEFILE 8739 . 9045) (SIMPLE.FINDFILE 9047 . 9457) (VMEMSIZE 9459 . 9626) + (\COPYSYS 9628 . 12577) (\FLUSHVM 12579 . 13651) (\LOGOUT0 13653 . 13856)) (14230 33821 ( +UNPACKFILENAME 14240 . 14426) (UNPACKFILENAME.STRING 14428 . 30700) (LASTCHPOS 30702 . 31396) ( +\UPF.NEXTPOS 31398 . 32043) (\UPF.TEMPFILEP 32045 . 32622) (FILENAMEFIELD 32624 . 33109) (PACKFILENAME + 33111 . 33454) (PACKFILENAME.STRING 33456 . 33819)) (56262 63442 (LOGOUT 56272 . 57189) (MAKESYS +57191 . 58820) (SYSOUT 58822 . 60374) (SAVEVM 60376 . 61176) (HERALD 61178 . 61338) (INTERPRET.REM.CM +61340 . 63065) (\USEREVENT 63067 . 63440)) (63624 65351 (USERNAME 63634 . 64590) (SETUSERNAME 64592 . +65349))))) STOP diff --git a/sources/ADIR.LCOM b/sources/ADIR.LCOM index 48f6ab380..ddc650309 100644 Binary files a/sources/ADIR.LCOM and b/sources/ADIR.LCOM differ diff --git a/sources/ADISPLAY b/sources/ADISPLAY index b5bb2a792..7e3bd10d6 100644 --- a/sources/ADISPLAY +++ b/sources/ADISPLAY @@ -1,23 +1,26 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "15-Sep-94 17:07:04" {DSK}sources>ADISPLAY.;7 259403 +(FILECREATED "13-Jun-2021 14:03:35"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>ADISPLAY.;10 248693 - changes to%: (VARS ADISPLAYCOMS) - (FNS \CURSOR.DEFPRINT) + changes to%: (FNS \DRAWLINE.DISPLAY) + (VARS ADISPLAYCOMS) - previous date%: "24-Aug-94 14:14:55" {DSK}sources>ADISPLAY.;4) + previous date%: "15-Sep-94 17:07:04" +{DSK}kaplan>Local>medley3.5>git-medley>sources>ADISPLAY.;8) (* ; " -Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1982-1988, 1990-1991, 1993-1994, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT ADISPLAYCOMS) -(RPAQQ ADISPLAYCOMS - [(COMS (* ; "COMPILE SUPPORT") +(RPAQQ ADISPLAYCOMS + [(COMS (* ; "COMPILE SUPPORT") (DECLARE%: EVAL@COMPILE DONTCOPY (FILES (LOADCOMP) WINDOW))) - (COMS (* ; "Interlisp-D dependent stuff.") + (P (MOVD? 'NILL 'BIGBITMAPP)) + (COMS (* ; "Interlisp-D dependent stuff.") (EXPORT (RECORDS REGION BITMAP BITMAPWORD POSITION CURSOR MOUSEEVENT SCREENREGION SCREENPOSITION)) (SYSRECORDS PILOTBBT \DISPLAYDATA) @@ -27,21 +30,21 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b (P (DEFPRINT 'BITMAP 'PRINT-BITMAPS-NICELY)) (FNS \GETINTEGERPART \CONVERTTOFRACTION) (CONSTANTS (INTEGERBITS 12))) - [COMS (* ; - "cursor functions not on LLDISPLAY") + [COMS (* ; + "cursor functions not on LLDISPLAY") (FNS CURSORP CURSORBITMAP CreateCursorBitMap) (EXPORT (MACROS CURSORBITMAP) (CONSTANTS (HARDCURSORHEIGHT 16) (HARDCURSORWIDTH 16)) (DECLARE%: EVAL@COMPILE (ADDVARS (GLOBALVARS CursorBitMap] (COMS * CARETCOMS) - (COMS (* ; "Region functions") + (COMS (* ; "Region functions") (FNS CREATEREGION REGIONP INTERSECTREGIONS UNIONREGIONS REGIONSINTERSECTP SUBREGIONP EXTENDREGION EXTENDREGIONBOTTOM EXTENDREGIONLEFT EXTENDREGIONRIGHT EXTENDREGIONTOP INSIDEP STRINGREGION)) - (COMS (* ; "line and spline drawing.") - (COMS (* ; - "Brushes and brush initialization") + (COMS (* ; "line and spline drawing.") + (COMS (* ; + "Brushes and brush initialization") (GLOBALRESOURCES \BRUSHBBT) (FNS \BRUSHBITMAP \GETBRUSH \GETBRUSHBBT \InitCurveBrushes \BrushFromWidth) (FNS \MAKEBRUSH.DIAGONAL \MAKEBRUSH.HORIZONTAL \MAKEBRUSH.VERTICAL @@ -53,29 +56,29 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b (RECORDS BRUSHITEM) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (\InitCurveBrushes))) (DECLARE%: DONTCOPY (GLOBALVARS \BrushAList KNOWN.BRUSHES))) - (* ; "Lines") + (* ; "Lines") (FNS \DRAWLINE.DISPLAY RELMOVETO MOVETOUPPERLEFT) (FNS \CLIPANDDRAWLINE \CLIPANDDRAWLINE1 \CLIPCODE \LEASTPTAT \GREATESTPTAT \DRAWLINE1 \DRAWLINE.UFN) (DECLARE%: DONTCOPY (MACROS .DRAWLINEX. .DRAWLINEY.)) - (* ; "Curves") + (* ; "Curves") (FNS \DRAWCIRCLE.DISPLAY \DRAWARC.DISPLAY \DRAWARC.GENERIC \COMPUTE.ARC.POINTS \DRAWELLIPSE.DISPLAY \DRAWCURVE.DISPLAY \DRAWPOINT.DISPLAY \DRAWPOLYGON.DISPLAY \LINEWITHBRUSH) (FNS LOADPOLY PARAMETRICSPLINE \CURVE \CURVE2 \CURVEEND \CURVESLOPE \CURVESTART \FDIFS/FROM/DERIVS) - (DECLARE%: DONTCOPY (* ; "Used by drawcurve") + (DECLARE%: DONTCOPY (* ; "Used by drawcurve") (EXPORT (RECORDS POLYNOMIAL SPLINE))) (DECLARE%: DONTCOPY (EXPORT (MACROS HALF \FILLCIRCLEBLT)) (MACROS \CURVEPT .SETUP.FOR.\BBTCURVEPT. \CIRCLEPTS \CURVESMOOTH)) (FNS \FILLCIRCLE.DISPLAY \LINEBLT)) - [COMS (* ; "making and copying bitmaps") + [COMS (* ; "making and copying bitmaps") (FNS SCREENBITMAP BITMAPP BITMAPHEIGHT BITSPERPIXEL) (EXPORT (FILEPKGCOMS BITMAPS CURSORS)) (DECLARE%: EVAL@COMPILE (EXPORT (ADDVARS (GLOBALVARS SCREENHEIGHT SCREENWIDTH ScreenBitMap] - [COMS (* ; - "Display stream functions that are not needed in the primitive system") + [COMS (* ; + "Display stream functions that are not needed in the primitive system") (FNS DSPFILL INVERTW) (FNS \DSPCOLOR.DISPLAY \DSPBACKCOLOR.DISPLAY DSPEOLFN) (EXPORT (CONSTANTS (BLACKSHADE 65535) @@ -84,7 +87,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b (ADDVARS (GLOBALVARS GRAYSHADE))) (MACROS DSPRUBOUTCHAR) (FNS DSPCLEOL DSPRUBOUTCHAR \DSPMOVELR) - (COMS (* ; "for cursor") + (COMS (* ; "for cursor") (BITMAPS \DefaultCursor) (FNS \CURSOR.DEFPRINT) [DECLARE%: DONTEVAL@LOAD DOCOPY (INITVARS (DEFAULTCURSOR (CURSORCREATE @@ -94,8 +97,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b (SETQ \CURRENTCURSOR DEFAULTCURSOR))) (DEFPRINT 'CURSOR '\CURSOR.DEFPRINT] (DECLARE%: DONTCOPY (GLOBALVARS DEFAULTCURSOR] - [COMS (* ; - "stuff to interpret colors as textures which is needed even in system that don't have color.") + [COMS (* ; + "stuff to interpret colors as textures which is needed even in system that don't have color.") (FNS TEXTUREOFCOLOR \PRIMARYTEXTURE \LEVELTEXTURE INSURE.B&W.TEXTURE INSURE.RGB.COLOR \LOOKUPCOLORNAME RGBP HLSP HLSTORGB \HLSVALUEFN) (VARS COLORNAMES) @@ -104,7 +107,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b WHITESHADE16 REDTEXTURE GREENTEXTURE BLUETEXTURE)) (UGLYVARS BLACKSHADE16 DARKGRAY16 MEDIUMGRAY16 LIGHTGRAY16 WHITESHADE16 REDTEXTURE GREENTEXTURE BLUETEXTURE) - (DECLARE%: DONTCOPY (* ; "Used by drawcurve") + (DECLARE%: DONTCOPY (* ; "Used by drawcurve") (EXPORT (RECORDS HLS RGB] (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) @@ -121,6 +124,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b WINDOW) ) +(MOVD? 'NILL 'BIGBITMAPP) + (* ; "Interlisp-D dependent stuff.") @@ -150,7 +155,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b (BITMAPBITSPERPIXEL WORD)) BITMAPBITSPERPIXEL _ 1 (BLOCKRECORD BITMAP ((BitMapHiLoc WORD) (BitMapLoLoc WORD)) - (* ; "overlay initial pointer") + (* ; "overlay initial pointer") ) (SYSTEM)) @@ -603,7 +608,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b ) (* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE -(PUTPROPS CURSORBITMAP MACRO (NIL CursorBitMap)) +(PUTPROPS CURSORBITMAP MACRO (NIL CursorBitMap)) ) (DECLARE%: EVAL@COMPILE @@ -623,51 +628,52 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b (* "END EXPORTED DEFINITIONS") -(RPAQQ CARETCOMS ((BITMAPS \DefaultCaret) - (INITVARS (\CARET.UP NIL +(RPAQQ CARETCOMS + ((BITMAPS \DefaultCaret) + (INITVARS (\CARET.UP NIL - (* ;; "global. NIL if no caret showing, otherwise a CARET1 record with CURSOR, stream, x, y, and RATE (= off rate)") + (* ;; "global. NIL if no caret showing, otherwise a CARET1 record with CURSOR, stream, x, y, and RATE (= off rate)") ) - (\CARET.DEFAULT NIL (* ; - "global = default caret to put up. An instance of CARET1 datatype") - ) - (\CARET.TIMER (SETUPTIMER 0) - (* ; "time for next caret action")) - (DEFAULTCARET (CURSORCREATE \DefaultCaret NIL 3 4)) - (DEFAULTCARETRATE 333 (* ; "default rate for flashing caret") - ) - (\CARET.ON.RATE DEFAULTCARETRATE) - (\CARET.OFF.RATE DEFAULTCARETRATE) - (\CARET.FORCED.OFF.RATE 0)) - (ADDVARS (\SYSTEMTIMERVARS \CARET.TIMER)) - (DECLARE%: DONTCOPY (RECORDS CARET1)) - (INITRECORDS CARET1) - (FNS CARET \CARET.CREATE \CARET.DOWN \CARET.FLASH? \CARET.SHOW CARETRATE - \CARET.FLASH.AGAIN \CARET.FLASH.MULTIPLE \CARET.FLASH) - (FNS \MEDW.CARET.SHOW) - (* ; "some declarations are on LLDISPLAY -- macro for \CHECKCARET and globalvar declaration for \CARET.UP") - (GLOBALVARS \CARET.DEFAULT \CARET.ON.RATE \CARET.OFF.RATE DEFAULTCARET - \CARET.TIMER \CARET.UP \CARET.FORCED.OFF.RATE) - (DECLARE%: DONTEVAL@LOAD DOCOPY (ADDVARS (TTYBACKGROUNDFNS \CARET.FLASH?))) - (FNS \AREAVISIBLE? \REGIONOVERLAPAREAP \AREAINREGIONP) - (P (CARET T)))) + (\CARET.DEFAULT NIL (* ; + "global = default caret to put up. An instance of CARET1 datatype") + ) + (\CARET.TIMER (SETUPTIMER 0) + (* ; "time for next caret action")) + (DEFAULTCARET (CURSORCREATE \DefaultCaret NIL 3 4)) + (DEFAULTCARETRATE 333 (* ; "default rate for flashing caret") + ) + (\CARET.ON.RATE DEFAULTCARETRATE) + (\CARET.OFF.RATE DEFAULTCARETRATE) + (\CARET.FORCED.OFF.RATE 0)) + (ADDVARS (\SYSTEMTIMERVARS \CARET.TIMER)) + (DECLARE%: DONTCOPY (RECORDS CARET1)) + (INITRECORDS CARET1) + (FNS CARET \CARET.CREATE \CARET.DOWN \CARET.FLASH? \CARET.SHOW CARETRATE \CARET.FLASH.AGAIN + \CARET.FLASH.MULTIPLE \CARET.FLASH) + (FNS \MEDW.CARET.SHOW) + (* ; "some declarations are on LLDISPLAY -- macro for \CHECKCARET and globalvar declaration for \CARET.UP") + (GLOBALVARS \CARET.DEFAULT \CARET.ON.RATE \CARET.OFF.RATE DEFAULTCARET \CARET.TIMER \CARET.UP + \CARET.FORCED.OFF.RATE) + (DECLARE%: DONTEVAL@LOAD DOCOPY (ADDVARS (TTYBACKGROUNDFNS \CARET.FLASH?))) + (FNS \AREAVISIBLE? \REGIONOVERLAPAREAP \AREAINREGIONP) + (P (CARET T)))) (RPAQQ \DefaultCaret #*(7 6)A@@@CH@@CH@@FL@@FL@@LF@@) (RPAQ? \CARET.UP NIL - (* ;; "global. NIL if no caret showing, otherwise a CARET1 record with CURSOR, stream, x, y, and RATE (= off rate)") + (* ;; "global. NIL if no caret showing, otherwise a CARET1 record with CURSOR, stream, x, y, and RATE (= off rate)") ) -(RPAQ? \CARET.DEFAULT NIL (* ; - "global = default caret to put up. An instance of CARET1 datatype") +(RPAQ? \CARET.DEFAULT NIL (* ; + "global = default caret to put up. An instance of CARET1 datatype") ) (RPAQ? \CARET.TIMER (SETUPTIMER 0) - (* ; "time for next caret action")) + (* ; "time for next caret action")) (RPAQ? DEFAULTCARET (CURSORCREATE \DefaultCaret NIL 3 4)) -(RPAQ? DEFAULTCARETRATE 333 (* ; "default rate for flashing caret") +(RPAQ? DEFAULTCARETRATE 333 (* ; "default rate for flashing caret") ) (RPAQ? \CARET.ON.RATE DEFAULTCARETRATE) @@ -680,19 +686,19 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b (DECLARE%: DONTCOPY (DECLARE%: EVAL@COMPILE -(RECORD CARET1 (* ; - "a record that describes a SHOWING caret") - (STREAM (* ; - "the stream the caret is showing in") - STREAMX (* ; - "the X position stream relative that it was shown at") - STREAMY (* ; - "the Y position stream relative that it was shown at") - CURSOR (* ; - "the cursor bitmap + x and y that this caret represents") - RATE (* ; "the 'down rate' for this caret, in ticks. After comes down (when \CARET.TIMER expires), \CARET.TIMER will be rescheduled to put something up. This is the rate to use") - (* ; - "NEXT for threading carets together") +(RECORD CARET1 (* ; + "a record that describes a SHOWING caret") + (STREAM (* ; + "the stream the caret is showing in") + STREAMX (* ; + "the X position stream relative that it was shown at") + STREAMY (* ; + "the Y position stream relative that it was shown at") + CURSOR (* ; + "the cursor bitmap + x and y that this caret represents") + RATE (* ; "the 'down rate' for this caret, in ticks. After comes down (when \CARET.TIMER expires), \CARET.TIMER will be rescheduled to put something up. This is the rate to use") + (* ; + "NEXT for threading carets together") . NEXT)) ) ) @@ -1543,85 +1549,37 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b (DEFINEQ (\DRAWLINE.DISPLAY - [LAMBDA (DISPLAYSTREAM X1 Y1 X2 Y2 WIDTH OPERATION COLOR DASHING) - (* ; "Edited 29-Jan-91 14:59 by matsuda") + [LAMBDA (DISPLAYSTREAM X1 Y1 X2 Y2 WIDTH OPERATION COLOR DASHING) + (* ; "Edited 13-Jun-2021 14:03 by rmk:") - (* ;; "DISPLAYSTREAM is guaranteed to be a display-stream. Draws a line from x1,y1 to x2,y2 leaving the position at x2,y2") + (* ;; "DISPLAYSTREAM is guaranteed to be a display-stream. Draws a line from x1,y1 to x2,y2 leaving the position at x2,y2") - (* ;; "Added handling of brushes (I think, this is actually pretty tricky).") + (* ;; "Added handling of brushes (I think, this is actually pretty tricky).") (DECLARE (LOCALVARS . T)) - [COND - [(OR DASHING (BRUSHP WIDTH)) - (GLOBALRESOURCE - \BRUSHBBT - (LET ((BBT \BRUSHBBT) - (BRUSH (INSURE.BRUSH WIDTH))) - (if COLOR - then (replace (BRUSH BRUSHCOLOR) of BRUSH with COLOR)) - (IF [NOT (type? BIGBM (ffetch DDDestination of (fetch IMAGEDATA - of DISPLAYSTREAM] - THEN (\LINEWITHBRUSH X1 Y1 X2 Y2 BRUSH (\GOOD.DASHLST DASHING BRUSH) - DISPLAYSTREAM BBT (SELECTQ OPERATION - (NIL (ffetch DDOPERATION - of (fetch IMAGEDATA - of DISPLAYSTREAM))) - ((REPLACE PAINT INVERT ERASE) - OPERATION) - (\ILLEGAL.ARG OPERATION))) - ELSE (PROG ((DD (fetch IMAGEDATA of DISPLAYSTREAM)) - BITMAP BIGBMLIST HEIGHT BOTTOM BM YY1 YY2 ClippingTop ClippingBottom - CTop CBottom) - (SETQ BITMAP (ffetch DDDestination of DD)) - (SETQ BIGBMLIST (fetch (BIGBM BIGBMLIST) of BITMAP)) - (SETQ HEIGHT (BITMAPHEIGHT BITMAP)) - (SETQ ClippingTop (ffetch DDClippingTop of DD)) - (SETQ ClippingBottom (ffetch DDClippingBottom of DD)) - (SETQ BM (GetNewFragment BIGBMLIST)) - (while (AND BM (IGREATERP HEIGHT ClippingBottom)) - do (SETQ BOTTOM (IDIFFERENCE HEIGHT (BITMAPHEIGHT BM))) - [SETQ CTop (COND - ((IGREATERP ClippingTop HEIGHT) - (IDIFFERENCE HEIGHT BOTTOM)) - (T (IDIFFERENCE ClippingTop BOTTOM] - (if (IGEQ CTop 0) - then [SETQ CBottom (COND - ((ILESSP ClippingBottom BOTTOM) - 0) - (T (IDIFFERENCE ClippingBottom - BOTTOM] - (replace DDDestination of DD with - BM) - (replace DDClippingTop of DD with - CTop) - (replace DDClippingBottom of DD - with CBottom) - (\LINEWITHBRUSH - X1 - (IDIFFERENCE Y1 BOTTOM) - X2 - (IDIFFERENCE Y2 BOTTOM) - BRUSH - (\GOOD.DASHLST DASHING BRUSH) - DISPLAYSTREAM BBT - (SELECTQ OPERATION - (NIL (ffetch DDOPERATION - of (fetch IMAGEDATA - of DISPLAYSTREAM))) - ((REPLACE PAINT INVERT ERASE) - OPERATION) - (\ILLEGAL.ARG OPERATION))) - (SETQ BM (GetNewFragment BIGBMLIST)) - (SETQ HEIGHT BOTTOM))) - (freplace DDDestination of DD with BITMAP) - (freplace DDClippingTop of DD with ClippingTop) - (freplace DDClippingBottom of DD with ClippingBottom] - (T (PROG ((DD (fetch IMAGEDATA of DISPLAYSTREAM)) - BITMAP) - (\INSURETOPWDS DISPLAYSTREAM) (* ; "bring the window to the top") - (SETQ BITMAP (ffetch DDDestination of DD)) - (COND - ((NOT (type? BIGBM BITMAP)) + (SELECTQ OPERATION + (NIL (ffetch DDOPERATION of (fetch IMAGEDATA of DISPLAYSTREAM))) + ((REPLACE PAINT INVERT ERASE) + OPERATION) + (\ILLEGAL.ARG OPERATION)) + (\INSURETOPWDS DISPLAYSTREAM) (* ; + "RMK: This was only in the no-dash case, oddly") + (IF (OR DASHING (BRUSHP WIDTH)) + THEN [LET ((BRUSH (INSURE.BRUSH WIDTH))) + (if COLOR + then (replace (BRUSH BRUSHCOLOR) of BRUSH with COLOR)) + (IF (BIGBITMAPP (ffetch DDDestination of (fetch IMAGEDATA + of DISPLAYSTREAM))) + THEN (\DRAWLINE.BIGBM.DASH DISPLAYSTREAM X1 Y1 X2 Y2 BRUSH DASHING + OPERATION) + ELSE (GLOBALRESOURCES \BRUSHBBT (\LINEWITHBRUSH X1 Y1 X2 Y2 BRUSH + (\GOOD.DASHLST DASHING BRUSH) + DISPLAYSTREAM \BRUSHBBT OPERATION] + ELSEIF (BIGBITMAPP (ffetch DDDestination of (fetch IMAGEDATA of + DISPLAYSTREAM + ))) + THEN (\DRAWLINE.BIGBM.NODASH DISPLAYSTREAM X1 Y1 X2 Y2 WIDTH OPERATION COLOR) + ELSE (LET ((DD (fetch IMAGEDATA of DISPLAYSTREAM))) (\CLIPANDDRAWLINE (\DSPTRANSFORMX (OR (FIXP X1) (FIXR X1)) DD) @@ -1639,68 +1597,14 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b 1) ((OR (FIXP WIDTH) (FIXR WIDTH] - (SELECTQ OPERATION - (NIL (ffetch DDOPERATION of DD)) - ((REPLACE PAINT INVERT ERASE) - OPERATION) - (\ILLEGAL.ARG OPERATION)) - BITMAP + OPERATION + (ffetch DDDestination of DD) (ffetch DDClippingLeft of DD) (SUB1 (ffetch DDClippingRight of DD)) (ffetch DDClippingBottom of DD) (SUB1 (ffetch DDClippingTop of DD)) - DISPLAYSTREAM COLOR)) - (T (PROG ((BIGBMLIST (fetch (BIGBM BIGBMLIST) of BITMAP)) - (HEIGHT (BITMAPHEIGHT BITMAP)) - BOTTOM BM CTop CBottom (ClippingTop (ffetch DDClippingTop - of DD)) - (ClippingBottom (ffetch DDClippingBottom of DD)) - (YY1 (\DSPTRANSFORMY (OR (FIXP Y1) - (FIXR Y1)) - DD)) - (YY2 (\DSPTRANSFORMY (OR (FIXP Y2) - (FIXR Y2)) - DD))) - (SETQ BM (GetNewFragment BIGBMLIST)) - (while (AND BM (IGREATERP HEIGHT ClippingBottom)) - do (SETQ BOTTOM (IDIFFERENCE HEIGHT (BITMAPHEIGHT BM))) - [SETQ CTop (COND - ((IGREATERP ClippingTop HEIGHT) - (IDIFFERENCE HEIGHT BOTTOM)) - (T (IDIFFERENCE ClippingTop BOTTOM] - (COND - ((IGEQ CTop 0) - [SETQ CBottom (COND - ((ILESSP ClippingBottom BOTTOM) - 0) - (T (IDIFFERENCE ClippingBottom BOTTOM] - (\CLIPANDDRAWLINE (\DSPTRANSFORMX (OR (FIXP X1) - (FIXR X1)) - DD) - (IDIFFERENCE YY1 BOTTOM) - (\DSPTRANSFORMX (OR (FIXP X2) - (FIXR X2)) - DD) - (IDIFFERENCE YY2 BOTTOM) - [COND - ((NULL WIDTH) - 1) - ((OR (FIXP WIDTH) - (FIXR WIDTH] - (SELECTQ OPERATION - (NIL (ffetch DDOPERATION of DD)) - ((REPLACE PAINT INVERT ERASE) - OPERATION) - (\ILLEGAL.ARG OPERATION)) - BM - (ffetch DDClippingLeft of DD) - (SUB1 (ffetch DDClippingRight of DD)) - CBottom - (SUB1 CTop) - DISPLAYSTREAM COLOR))) - (SETQ BM (GetNewFragment BIGBMLIST)) - (SETQ HEIGHT BOTTOM] (* ; - "the generic case of MOVETO is used so that the hardcopy streams get handled as well.") + DISPLAYSTREAM COLOR))) (* ; + "the generic case of MOVETO is used so that the hardcopy streams get handled as well.") (MOVETO X2 Y2 DISPLAYSTREAM]) (RELMOVETO @@ -2118,70 +2022,79 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b (DECLARE%: DONTCOPY (DECLARE%: EVAL@COMPILE -[PUTPROPS .DRAWLINEX. MACRO ((MODE) - (bind (NY _ 0) for PT from 1 to PIXELSINX - do (* ; "main loop") - [replace (BITMAPWORD BITS) of FIRSTADDR - with (SELECTQ MODE - (INVERT (LOGXOR MASK (fetch (BITMAPWORD - BITS) - of FIRSTADDR))) - (ERASE (LOGAND (LOGXOR MASK WORDMASK) - (fetch (BITMAPWORD BITS) - of FIRSTADDR))) - (PROGN (* ; - "case is PAINT or REPLACE. Legality of OPERATION has been checked by \CLIPANDDRAWLINE1") - (LOGOR MASK (fetch (BITMAPWORD - BITS) - of FIRSTADDR] - [COND - ([NOT (IGREATERP XDELTA (SETQ INITIALBUCKET (IPLUS - INITIALBUCKET - YDELTA] - (* ; "increment in the Y direction") - (COND - ((EQ (SETQ NY (ADD1 NY)) - PIXELSINY) - (RETURN))) - (SETQ INITIALBUCKET (IDIFFERENCE INITIALBUCKET XDELTA)) - (SETQ FIRSTADDR (\ADDBASE FIRSTADDR YINCR] - (SETQ MASK (LRSH MASK 1)) - (COND - ((EQ 0 MASK) (* ; "crossed word boundary") - (SETQ FIRSTADDR (\ADDBASE FIRSTADDR 1)) - (SETQ MASK 32768] - -[PUTPROPS .DRAWLINEY. MACRO ((MODE) - (bind (NX _ 0) for PT from 1 to PIXELSINY - do (* ; "main loop") - [replace (BITMAPWORD BITS) of FIRSTADDR - with (SELECTQ MODE - (INVERT (LOGXOR MASK (fetch (BITMAPWORD - BITS) - of FIRSTADDR))) - (ERASE (LOGAND (LOGXOR MASK WORDMASK) - (fetch (BITMAPWORD BITS) - of FIRSTADDR))) - (PROGN (* ; - "case is PAINT or REPLACE. Legality of OPERATION has been checked by \CLIPANDDRAWLINE1") - (LOGOR MASK (fetch (BITMAPWORD - BITS) - of FIRSTADDR] - [COND - ([NOT (IGREATERP YDELTA (SETQ INITIALBUCKET (IPLUS - INITIALBUCKET - XDELTA] - (COND - ((EQ (SETQ NX (ADD1 NX)) - PIXELSINX) - (RETURN))) - (SETQ INITIALBUCKET (IDIFFERENCE INITIALBUCKET YDELTA)) - (SETQ MASK (LRSH MASK 1)) - (COND - ((EQ 0 MASK) (* ; "crossed word boundary") - (SETQ FIRSTADDR (\ADDBASE FIRSTADDR 1)) - (SETQ MASK 32768] - (SETQ FIRSTADDR (\ADDBASE FIRSTADDR YINCR] +(PUTPROPS .DRAWLINEX. MACRO [(MODE) + (bind (NY _ 0) for PT from 1 to PIXELSINX + do (* ; "main loop") + [replace (BITMAPWORD BITS) of FIRSTADDR + with (SELECTQ MODE + (INVERT (LOGXOR MASK + (fetch (BITMAPWORD + BITS) + of FIRSTADDR))) + (ERASE (LOGAND (LOGXOR MASK WORDMASK) + (fetch (BITMAPWORD + BITS) + of FIRSTADDR))) + (PROGN + (* ; + "case is PAINT or REPLACE. Legality of OPERATION has been checked by \CLIPANDDRAWLINE1") + (LOGOR MASK (fetch + (BITMAPWORD BITS) + of FIRSTADDR] + [COND + ([NOT (IGREATERP XDELTA (SETQ INITIALBUCKET + (IPLUS INITIALBUCKET YDELTA + ] + (* ; "increment in the Y direction") + (COND + ((EQ (SETQ NY (ADD1 NY)) + PIXELSINY) + (RETURN))) + (SETQ INITIALBUCKET (IDIFFERENCE INITIALBUCKET + XDELTA)) + (SETQ FIRSTADDR (\ADDBASE FIRSTADDR YINCR] + (SETQ MASK (LRSH MASK 1)) + (COND + ((EQ 0 MASK)(* ; "crossed word boundary") + (SETQ FIRSTADDR (\ADDBASE FIRSTADDR 1)) + (SETQ MASK 32768]) + +(PUTPROPS .DRAWLINEY. MACRO [(MODE) + (bind (NX _ 0) for PT from 1 to PIXELSINY + do (* ; "main loop") + [replace (BITMAPWORD BITS) of FIRSTADDR + with (SELECTQ MODE + (INVERT (LOGXOR MASK + (fetch (BITMAPWORD + BITS) + of FIRSTADDR))) + (ERASE (LOGAND (LOGXOR MASK WORDMASK) + (fetch (BITMAPWORD + BITS) + of FIRSTADDR))) + (PROGN + (* ; + "case is PAINT or REPLACE. Legality of OPERATION has been checked by \CLIPANDDRAWLINE1") + (LOGOR MASK (fetch + (BITMAPWORD BITS) + of FIRSTADDR] + [COND + ([NOT (IGREATERP YDELTA (SETQ INITIALBUCKET + (IPLUS INITIALBUCKET XDELTA + ] + (COND + ((EQ (SETQ NX (ADD1 NX)) + PIXELSINX) + (RETURN))) + (SETQ INITIALBUCKET (IDIFFERENCE INITIALBUCKET + YDELTA)) + (SETQ MASK (LRSH MASK 1)) + (COND + ((EQ 0 MASK) + (* ; "crossed word boundary") + (SETQ FIRSTADDR (\ADDBASE FIRSTADDR 1)) + (SETQ MASK 32768] + (SETQ FIRSTADDR (\ADDBASE FIRSTADDR YINCR]) ) ) @@ -3466,21 +3379,22 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b (DECLARE%: DONTCOPY (* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE -(PUTPROPS HALF MACRO ((X) - (LRSH X 1))) - -(PUTPROPS \FILLCIRCLEBLT MACRO (OPENLAMBDA (CX CY X Y) (* ; - "calls bitblt twice to fill in one line of the circle.") - (\LINEBLT FCBBT (IDIFFERENCE CX X) - (IPLUS CY Y) - (IPLUS CX X) - DESTINATIONBASE RASTERWIDTH LEFT RIGHT BOTTOM TOP - GRAYWIDTH GRAYHEIGHT GRAYBASE NBITS) - (\LINEBLT FCBBT (IDIFFERENCE CX X) - (IDIFFERENCE CY Y) - (IPLUS CX X) - DESTINATIONBASE RASTERWIDTH LEFT RIGHT BOTTOM TOP - GRAYWIDTH GRAYHEIGHT GRAYBASE NBITS))) +(PUTPROPS HALF MACRO ((X) + (LRSH X 1))) + +(PUTPROPS \FILLCIRCLEBLT MACRO (OPENLAMBDA (CX CY X Y) + (* ; + "calls bitblt twice to fill in one line of the circle.") + (\LINEBLT FCBBT (IDIFFERENCE CX X) + (IPLUS CY Y) + (IPLUS CX X) + DESTINATIONBASE RASTERWIDTH LEFT RIGHT BOTTOM TOP + GRAYWIDTH GRAYHEIGHT GRAYBASE NBITS) + (\LINEBLT FCBBT (IDIFFERENCE CX X) + (IDIFFERENCE CY Y) + (IPLUS CX X) + DESTINATIONBASE RASTERWIDTH LEFT RIGHT BOTTOM TOP + GRAYWIDTH GRAYHEIGHT GRAYBASE NBITS))) ) (* "END EXPORTED DEFINITIONS") @@ -3488,165 +3402,126 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b (DECLARE%: EVAL@COMPILE -[PUTPROPS \CURVEPT MACRO - (OPENLAMBDA (X Y) - (COND - ((OR (ILEQ X LEFTMINUSBRUSH) - (IGEQ X RIGHTPLUS1) - (ILEQ Y BOTTOMMINUSBRUSH) - (IGEQ Y TOP)) - NIL) - ((NULL BBT) - (\FBITMAPBIT DESTINATIONBASE X Y OPERATION HEIGHTMINUS1 RASTERWIDTH)) - (T - (* ;; - "This should have been done in .SETUP.FOR.\BBTCURVEPT., under \GETBRUSHBBT.") - - (* ;; "Its a bug here, because brushes can't use operation REPLACE.") - - (* ;; "(\SETPBTFUNCTION BBT (ffetch DDSOURCETYPE of DISPLAYDATA) OPERATION)") - - (\BBTCURVEPT X Y BBT LEFT BRUSHWIDTH LEFTMINUSBRUSH RIGHTPLUS1 - NBITSRIGHTPLUS1 TOPMINUSBRUSH DestinationBitMap BRUSHHEIGHT - BOTTOMMINUSBRUSH TOP BRUSHBASE DESTINATIONBASE RASTERWIDTH - BRUSHRASTERWIDTH COLORBRUSHBASE NBITS DISPLAYDATA] - -[PUTPROPS .SETUP.FOR.\BBTCURVEPT. MACRO (NIL (PROGN (SETQ BOTTOM (ffetch (\DISPLAYDATA - DDClippingBottom) - of DISPLAYDATA)) - (SETQ TOP (ffetch (\DISPLAYDATA DDClippingTop - ) of DISPLAYDATA - )) - (SETQ RIGHTPLUS1 (ffetch (\DISPLAYDATA - DDClippingRight - ) - of DISPLAYDATA)) - (SETQ LEFT (ffetch (\DISPLAYDATA - DDClippingLeft) - of DISPLAYDATA)) - (SETQ DestinationBitMap (ffetch (\DISPLAYDATA - - DDDestination - ) - of DISPLAYDATA)) - (SETQ OPERATION (OR OPERATION (ffetch - (\DISPLAYDATA - DDOPERATION) - of +(PUTPROPS \CURVEPT MACRO [OPENLAMBDA (X Y) + (COND + ((OR (ILEQ X LEFTMINUSBRUSH) + (IGEQ X RIGHTPLUS1) + (ILEQ Y BOTTOMMINUSBRUSH) + (IGEQ Y TOP)) + NIL) + ((NULL BBT) + (\FBITMAPBIT DESTINATIONBASE X Y OPERATION HEIGHTMINUS1 + RASTERWIDTH)) + (T + (* ;; + "This should have been done in .SETUP.FOR.\BBTCURVEPT., under \GETBRUSHBBT.") + + (* ;; + "Its a bug here, because brushes can't use operation REPLACE.") + + (* ;; + "(\SETPBTFUNCTION BBT (ffetch DDSOURCETYPE of DISPLAYDATA) OPERATION)") + + (\BBTCURVEPT X Y BBT LEFT BRUSHWIDTH LEFTMINUSBRUSH + RIGHTPLUS1 NBITSRIGHTPLUS1 TOPMINUSBRUSH + DestinationBitMap BRUSHHEIGHT BOTTOMMINUSBRUSH TOP + BRUSHBASE DESTINATIONBASE RASTERWIDTH + BRUSHRASTERWIDTH COLORBRUSHBASE NBITS DISPLAYDATA]) + +(PUTPROPS .SETUP.FOR.\BBTCURVEPT. MACRO + [NIL (PROGN (SETQ BOTTOM (ffetch (\DISPLAYDATA DDClippingBottom) of DISPLAYDATA)) + (SETQ TOP (ffetch (\DISPLAYDATA DDClippingTop) of DISPLAYDATA)) + (SETQ RIGHTPLUS1 (ffetch (\DISPLAYDATA DDClippingRight) of DISPLAYDATA) + ) + (SETQ LEFT (ffetch (\DISPLAYDATA DDClippingLeft) of DISPLAYDATA)) + (SETQ DestinationBitMap (ffetch (\DISPLAYDATA DDDestination) of DISPLAYDATA - ))) - (SETQ NBITS (fetch (BITMAP BITMAPBITSPERPIXEL - ) of + )) + (SETQ OPERATION (OR OPERATION (ffetch (\DISPLAYDATA DDOPERATION) + of DISPLAYDATA))) + (SETQ NBITS (fetch (BITMAP BITMAPBITSPERPIXEL) of DestinationBitMap)) + [COND + [(NOT (EQ NBITS 1)) + (SETQ BRUSHBM (\GETCOLORBRUSH BRUSH (MAXIMUMCOLOR NBITS) + NBITS)) + [SETQ COLOR (COND + [(AND (LISTP BRUSH) + (CAR (LISTP (CDDR BRUSH] + ((DSPCOLOR NIL DISPLAYSTREAM)) + (T (MAXIMUMCOLOR NBITS] + [COND + ((EQ OPERATION 'ERASE) + (SETQ COLOR (OPPOSITECOLOR COLOR NBITS] + (SETQ COLORBRUSHBASE (fetch (BITMAP BITMAPBASE) + of (\GETCOLORBRUSH BRUSH COLOR NBITS] + (T (SETQ BRUSHBM (\GETBRUSH BRUSH] + (SETQ RASTERWIDTH (ffetch (BITMAP BITMAPRASTERWIDTH) of DestinationBitMap - )) - [COND - [(NOT (EQ NBITS 1)) - (SETQ BRUSHBM (\GETCOLORBRUSH BRUSH - (MAXIMUMCOLOR NBITS) - NBITS)) - [SETQ COLOR - (COND - [(AND (LISTP BRUSH) - (CAR (LISTP (CDDR BRUSH] - ((DSPCOLOR NIL DISPLAYSTREAM)) - (T (MAXIMUMCOLOR NBITS] - [COND - ((EQ OPERATION 'ERASE) - (SETQ COLOR (OPPOSITECOLOR COLOR NBITS] - (SETQ COLORBRUSHBASE - (fetch (BITMAP BITMAPBASE) - of (\GETCOLORBRUSH BRUSH COLOR NBITS] - (T (SETQ BRUSHBM (\GETBRUSH BRUSH] - (SETQ RASTERWIDTH (ffetch (BITMAP - BITMAPRASTERWIDTH - ) - of DestinationBitMap)) - (SETQ DESTINATIONBASE (ffetch (BITMAP - BITMAPBASE - ) - of DestinationBitMap - )) - (SETQ BBT (\GETBRUSHBBT BRUSHBM DISPLAYDATA - BBT)) - (SETQ BRUSHBASE (fetch (BITMAP BITMAPBASE) - of BRUSHBM)) - (SETQ BRUSHRASTERWIDTH (ffetch (BITMAP - BITMAPRASTERWIDTH - ) - of BRUSHBM)) - [COND - ((NULL BBT) - (SETQ HEIGHTMINUS1 (SUB1 (ffetch - (BITMAP - BITMAPHEIGHT - ) - of + )) + (SETQ DESTINATIONBASE (ffetch (BITMAP BITMAPBASE) of DestinationBitMap) + ) + (SETQ BBT (\GETBRUSHBBT BRUSHBM DISPLAYDATA BBT)) + (SETQ BRUSHBASE (fetch (BITMAP BITMAPBASE) of BRUSHBM)) + (SETQ BRUSHRASTERWIDTH (ffetch (BITMAP BITMAPRASTERWIDTH) of BRUSHBM)) + [COND + ((NULL BBT) + (SETQ HEIGHTMINUS1 (SUB1 (ffetch (BITMAP BITMAPHEIGHT) of DestinationBitMap - ))) - (COND - ((EQ (ffetch (\DISPLAYDATA DDOPERATION - ) of - DISPLAYDATA - ) - 'INVERT) - (SETQ OPERATION 'INVERT] - (SETQ BRUSHWIDTH (ffetch (BITMAP BITMAPWIDTH) - of BRUSHBM)) - (SETQ BRUSHHEIGHT (ffetch (BITMAP - BITMAPHEIGHT - ) - of BRUSHBM)) - (SETQ LEFTMINUSBRUSH (IDIFFERENCE LEFT BRUSHWIDTH - )) - (SETQ BOTTOMMINUSBRUSH (IDIFFERENCE BOTTOM - BRUSHHEIGHT)) - (SETQ TOPMINUSBRUSH (IDIFFERENCE TOP BRUSHHEIGHT) - ) - (SETQ NBITSRIGHTPLUS1 (ITIMES RIGHTPLUS1 NBITS)) - (SETQ BRUSHWIDTH (ITIMES BRUSHWIDTH NBITS] - -[PUTPROPS \CIRCLEPTS MACRO (OPENLAMBDA (CX CY X Y) - (\CURVEPT (IPLUS CX X) - (IPLUS CY Y)) - (\CURVEPT (IDIFFERENCE CX X) - (IPLUS CY Y)) - (\CURVEPT (IPLUS CX X) - (IDIFFERENCE CY Y)) - (\CURVEPT (IDIFFERENCE CX X) - (IDIFFERENCE CY Y] - -[PUTPROPS \CURVESMOOTH MACRO (OPENLAMBDA (NEWX NEWY USERFN DISPLAYSTREAM) - (PROG [(DX (IABS (IDIFFERENCE NEWX \OLDX))) - (DY (IABS (IDIFFERENCE NEWY \OLDY] - (COND - ((OR (IGREATERP DX 1) - (IGREATERP DY 1)) - [COND - ((NEQ [IPLUS (ADD1 (IDIFFERENCE \OLDX \OLDERX)) - (ITIMES 3 (ADD1 (IDIFFERENCE \OLDY - \OLDERY] - 4) - [COND - (DASHON (COND - (USERFN (APPLY* USERFN \OLDX \OLDY - DISPLAYSTREAM)) - (T (.WHILE.TOP.DS. DISPLAYSTREAM - (\CURVEPT \OLDX \OLDY] - (COND - (DASHTAIL (COND - ((EQ 0 (SETQ DASHCNT (SUB1 DASHCNT) - )) - (SETQ DASHON (NOT DASHON)) - (SETQ DASHTAIL - (OR (LISTP (CDR DASHTAIL)) - DASHLST)) - (SETQ DASHCNT (CAR DASHTAIL] - (SETQ \OLDERX \OLDX) - (SETQ \OLDERY \OLDY) - (SETQ \OLDX \CURX) - (SETQ \OLDY \CURY))) - (SETQ \CURX NEWX) - (SETQ \CURY NEWY] + ))) + (COND + ((EQ (ffetch (\DISPLAYDATA DDOPERATION) of DISPLAYDATA) + 'INVERT) + (SETQ OPERATION 'INVERT] + (SETQ BRUSHWIDTH (ffetch (BITMAP BITMAPWIDTH) of BRUSHBM)) + (SETQ BRUSHHEIGHT (ffetch (BITMAP BITMAPHEIGHT) of BRUSHBM)) + (SETQ LEFTMINUSBRUSH (IDIFFERENCE LEFT BRUSHWIDTH)) + (SETQ BOTTOMMINUSBRUSH (IDIFFERENCE BOTTOM BRUSHHEIGHT)) + (SETQ TOPMINUSBRUSH (IDIFFERENCE TOP BRUSHHEIGHT)) + (SETQ NBITSRIGHTPLUS1 (ITIMES RIGHTPLUS1 NBITS)) + (SETQ BRUSHWIDTH (ITIMES BRUSHWIDTH NBITS]) + +(PUTPROPS \CIRCLEPTS MACRO (OPENLAMBDA (CX CY X Y) + (\CURVEPT (IPLUS CX X) + (IPLUS CY Y)) + (\CURVEPT (IDIFFERENCE CX X) + (IPLUS CY Y)) + (\CURVEPT (IPLUS CX X) + (IDIFFERENCE CY Y)) + (\CURVEPT (IDIFFERENCE CX X) + (IDIFFERENCE CY Y)))) + +(PUTPROPS \CURVESMOOTH MACRO (OPENLAMBDA (NEWX NEWY USERFN DISPLAYSTREAM) + (PROG [(DX (IABS (IDIFFERENCE NEWX \OLDX))) + (DY (IABS (IDIFFERENCE NEWY \OLDY] + (COND + ((OR (IGREATERP DX 1) + (IGREATERP DY 1)) + [COND + ((NEQ [IPLUS (ADD1 (IDIFFERENCE \OLDX \OLDERX)) + (ITIMES 3 (ADD1 (IDIFFERENCE \OLDY + \OLDERY] + 4) + [COND + (DASHON (COND + (USERFN (APPLY* USERFN \OLDX \OLDY + DISPLAYSTREAM)) + (T (.WHILE.TOP.DS. DISPLAYSTREAM + (\CURVEPT \OLDX \OLDY] + (COND + (DASHTAIL (COND + ((EQ 0 (SETQ DASHCNT + (SUB1 DASHCNT))) + (SETQ DASHON (NOT DASHON)) + (SETQ DASHTAIL + (OR (LISTP (CDR DASHTAIL)) + DASHLST)) + (SETQ DASHCNT (CAR DASHTAIL] + (SETQ \OLDERX \OLDX) + (SETQ \OLDERY \OLDY) + (SETQ \OLDX \CURX) + (SETQ \OLDY \CURY))) + (SETQ \CURX NEWX) + (SETQ \CURY NEWY)))) ) ) (DEFINEQ @@ -4064,8 +3939,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b (DECLARE%: EVAL@COMPILE -(PUTPROPS DSPRUBOUTCHAR MACRO ((DS CHAR X Y TTBL) - (\DSPMOVELR DS CHAR X Y TTBL NIL T))) +(PUTPROPS DSPRUBOUTCHAR MACRO ((DS CHAR X Y TTBL) + (\DSPMOVELR DS CHAR X Y TTBL NIL T))) ) (DEFINEQ @@ -4411,14 +4286,15 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b 255]) ) -(RPAQQ COLORNAMES ((WHITE 255 255 255) - (CYAN 0 255 255) - (MAGENTA 255 0 255) - (YELLOW 255 255 0) - (RED 255 0 0) - (GREEN 0 255 0) - (BLUE 0 0 255) - (BLACK 0 0 0))) +(RPAQQ COLORNAMES + ((WHITE 255 255 255) + (CYAN 0 255 255) + (MAGENTA 255 0 255) + (YELLOW 255 255 0) + (RED 255 0 0) + (GREEN 0 255 0) + (BLUE 0 0 255) + (BLACK 0 0 0))) (DECLARE%: DOEVAL@COMPILE DONTCOPY (GLOBALVARS COLORNAMES) @@ -4583,42 +4459,42 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1993, 1994 b (ADDTOVAR LAMA UNIONREGIONS INTERSECTREGIONS) ) (PUTPROPS ADISPLAY COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1988 1990 1991 - 1993 1994)) + 1993 1994 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (12396 20453 (\BBTCURVEPT 12406 . 20451)) (20454 30512 (CREATETEXTUREFROMBITMAP 20464 . -22496) (PRINTBITMAP 22498 . 23827) (PRINT-BITMAPS-NICELY 23829 . 27846) (PRINTCURSOR 27848 . 28795) ( -\WRITEBITMAP 28797 . 30510)) (30555 33101 (\GETINTEGERPART 30565 . 32108) (\CONVERTTOFRACTION 32110 . -33099)) (33238 34124 (CURSORP 33248 . 33467) (CURSORBITMAP 33469 . 33515) (CreateCursorBitMap 33517 . -34122)) (38756 48618 (CARET 38766 . 40514) (\CARET.CREATE 40516 . 40694) (\CARET.DOWN 40696 . 42149) ( -\CARET.FLASH? 42151 . 44048) (\CARET.SHOW 44050 . 44806) (CARETRATE 44808 . 45466) (\CARET.FLASH.AGAIN - 45468 . 46743) (\CARET.FLASH.MULTIPLE 46745 . 47277) (\CARET.FLASH 47279 . 48616)) (48619 53719 ( -\MEDW.CARET.SHOW 48629 . 53717)) (54083 55914 (\AREAVISIBLE? 54093 . 55015) (\REGIONOVERLAPAREAP 55017 - . 55560) (\AREAINREGIONP 55562 . 55912)) (55963 72020 (CREATEREGION 55973 . 56309) (REGIONP 56311 . -56457) (INTERSECTREGIONS 56459 . 60282) (UNIONREGIONS 60284 . 63484) (REGIONSINTERSECTP 63486 . 64094) - (SUBREGIONP 64096 . 64741) (EXTENDREGION 64743 . 67963) (EXTENDREGIONBOTTOM 67965 . 68770) ( -EXTENDREGIONLEFT 68772 . 69475) (EXTENDREGIONRIGHT 69477 . 70114) (EXTENDREGIONTOP 70116 . 70742) ( -INSIDEP 70744 . 71512) (STRINGREGION 71514 . 72018)) (72265 78654 (\BRUSHBITMAP 72275 . 73999) ( -\GETBRUSH 74001 . 74312) (\GETBRUSHBBT 74314 . 77077) (\InitCurveBrushes 77079 . 78518) ( -\BrushFromWidth 78520 . 78652)) (78655 81720 (\MAKEBRUSH.DIAGONAL 78665 . 78945) ( -\MAKEBRUSH.HORIZONTAL 78947 . 79341) (\MAKEBRUSH.VERTICAL 79343 . 79655) (\MAKEBRUSH.SQUARE 79657 . -79934) (\MAKEBRUSH.ROUND 79936 . 81718)) (81721 82833 (INSTALLBRUSH 81731 . 82831)) (83234 95532 ( -\DRAWLINE.DISPLAY 83244 . 94247) (RELMOVETO 94249 . 94636) (MOVETOUPPERLEFT 94638 . 95530)) (95533 -119275 (\CLIPANDDRAWLINE 95543 . 102112) (\CLIPANDDRAWLINE1 102114 . 113984) (\CLIPCODE 113986 . -115360) (\LEASTPTAT 115362 . 115960) (\GREATESTPTAT 115962 . 116590) (\DRAWLINE1 116592 . 117716) ( -\DRAWLINE.UFN 117718 . 119273)) (124435 171434 (\DRAWCIRCLE.DISPLAY 124445 . 133313) (\DRAWARC.DISPLAY - 133315 . 133605) (\DRAWARC.GENERIC 133607 . 134426) (\COMPUTE.ARC.POINTS 134428 . 136929) ( -\DRAWELLIPSE.DISPLAY 136931 . 152596) (\DRAWCURVE.DISPLAY 152598 . 154967) (\DRAWPOINT.DISPLAY 154969 - . 156054) (\DRAWPOLYGON.DISPLAY 156056 . 159998) (\LINEWITHBRUSH 160000 . 171432)) (171435 204665 ( -LOADPOLY 171445 . 172005) (PARAMETRICSPLINE 172007 . 182276) (\CURVE 182278 . 188822) (\CURVE2 188824 - . 200648) (\CURVEEND 200650 . 201148) (\CURVESLOPE 201150 . 203648) (\CURVESTART 203650 . 203974) ( -\FDIFS/FROM/DERIVS 203976 . 204663)) (218666 233818 (\FILLCIRCLE.DISPLAY 218676 . 229874) (\LINEBLT -229876 . 233816)) (233862 235918 (SCREENBITMAP 233872 . 234345) (BITMAPP 234347 . 234581) ( -BITMAPHEIGHT 234583 . 234959) (BITSPERPIXEL 234961 . 235916)) (236559 237552 (DSPFILL 236569 . 237252) - (INVERTW 237254 . 237550)) (237553 241354 (\DSPCOLOR.DISPLAY 237563 . 238856) (\DSPBACKCOLOR.DISPLAY -238858 . 240387) (DSPEOLFN 240389 . 241352)) (241779 246557 (DSPCLEOL 241789 . 242735) (DSPRUBOUTCHAR -242737 . 243175) (\DSPMOVELR 243177 . 246555)) (246687 247801 (\CURSOR.DEFPRINT 246697 . 247799)) ( -248213 256835 (TEXTUREOFCOLOR 248223 . 249485) (\PRIMARYTEXTURE 249487 . 250069) (\LEVELTEXTURE 250071 - . 250572) (INSURE.B&W.TEXTURE 250574 . 251967) (INSURE.RGB.COLOR 251969 . 253449) (\LOOKUPCOLORNAME -253451 . 253721) (RGBP 253723 . 254486) (HLSP 254488 . 254863) (HLSTORGB 254865 . 256005) (\HLSVALUEFN - 256007 . 256833))))) + (FILEMAP (NIL (12479 20536 (\BBTCURVEPT 12489 . 20534)) (20537 30595 (CREATETEXTUREFROMBITMAP 20547 . +22579) (PRINTBITMAP 22581 . 23910) (PRINT-BITMAPS-NICELY 23912 . 27929) (PRINTCURSOR 27931 . 28878) ( +\WRITEBITMAP 28880 . 30593)) (30638 33184 (\GETINTEGERPART 30648 . 32191) (\CONVERTTOFRACTION 32193 . +33182)) (33321 34207 (CURSORP 33331 . 33550) (CURSORBITMAP 33552 . 33598) (CreateCursorBitMap 33600 . +34205)) (38573 48435 (CARET 38583 . 40331) (\CARET.CREATE 40333 . 40511) (\CARET.DOWN 40513 . 41966) ( +\CARET.FLASH? 41968 . 43865) (\CARET.SHOW 43867 . 44623) (CARETRATE 44625 . 45283) (\CARET.FLASH.AGAIN + 45285 . 46560) (\CARET.FLASH.MULTIPLE 46562 . 47094) (\CARET.FLASH 47096 . 48433)) (48436 53536 ( +\MEDW.CARET.SHOW 48446 . 53534)) (53900 55731 (\AREAVISIBLE? 53910 . 54832) (\REGIONOVERLAPAREAP 54834 + . 55377) (\AREAINREGIONP 55379 . 55729)) (55780 71837 (CREATEREGION 55790 . 56126) (REGIONP 56128 . +56274) (INTERSECTREGIONS 56276 . 60099) (UNIONREGIONS 60101 . 63301) (REGIONSINTERSECTP 63303 . 63911) + (SUBREGIONP 63913 . 64558) (EXTENDREGION 64560 . 67780) (EXTENDREGIONBOTTOM 67782 . 68587) ( +EXTENDREGIONLEFT 68589 . 69292) (EXTENDREGIONRIGHT 69294 . 69931) (EXTENDREGIONTOP 69933 . 70559) ( +INSIDEP 70561 . 71329) (STRINGREGION 71331 . 71835)) (72082 78471 (\BRUSHBITMAP 72092 . 73816) ( +\GETBRUSH 73818 . 74129) (\GETBRUSHBBT 74131 . 76894) (\InitCurveBrushes 76896 . 78335) ( +\BrushFromWidth 78337 . 78469)) (78472 81537 (\MAKEBRUSH.DIAGONAL 78482 . 78762) ( +\MAKEBRUSH.HORIZONTAL 78764 . 79158) (\MAKEBRUSH.VERTICAL 79160 . 79472) (\MAKEBRUSH.SQUARE 79474 . +79751) (\MAKEBRUSH.ROUND 79753 . 81535)) (81538 82650 (INSTALLBRUSH 81548 . 82648)) (83051 87935 ( +\DRAWLINE.DISPLAY 83061 . 86650) (RELMOVETO 86652 . 87039) (MOVETOUPPERLEFT 87041 . 87933)) (87936 +111678 (\CLIPANDDRAWLINE 87946 . 94515) (\CLIPANDDRAWLINE1 94517 . 106387) (\CLIPCODE 106389 . 107763) + (\LEASTPTAT 107765 . 108363) (\GREATESTPTAT 108365 . 108993) (\DRAWLINE1 108995 . 110119) ( +\DRAWLINE.UFN 110121 . 111676)) (117836 164835 (\DRAWCIRCLE.DISPLAY 117846 . 126714) (\DRAWARC.DISPLAY + 126716 . 127006) (\DRAWARC.GENERIC 127008 . 127827) (\COMPUTE.ARC.POINTS 127829 . 130330) ( +\DRAWELLIPSE.DISPLAY 130332 . 145997) (\DRAWCURVE.DISPLAY 145999 . 148368) (\DRAWPOINT.DISPLAY 148370 + . 149455) (\DRAWPOLYGON.DISPLAY 149457 . 153399) (\LINEWITHBRUSH 153401 . 164833)) (164836 198066 ( +LOADPOLY 164846 . 165406) (PARAMETRICSPLINE 165408 . 175677) (\CURVE 175679 . 182223) (\CURVE2 182225 + . 194049) (\CURVEEND 194051 . 194549) (\CURVESLOPE 194551 . 197049) (\CURVESTART 197051 . 197375) ( +\FDIFS/FROM/DERIVS 197377 . 198064)) (208033 223185 (\FILLCIRCLE.DISPLAY 208043 . 219241) (\LINEBLT +219243 . 223183)) (223229 225285 (SCREENBITMAP 223239 . 223712) (BITMAPP 223714 . 223948) ( +BITMAPHEIGHT 223950 . 224326) (BITSPERPIXEL 224328 . 225283)) (225926 226919 (DSPFILL 225936 . 226619) + (INVERTW 226621 . 226917)) (226920 230721 (\DSPCOLOR.DISPLAY 226930 . 228223) (\DSPBACKCOLOR.DISPLAY +228225 . 229754) (DSPEOLFN 229756 . 230719)) (231162 235940 (DSPCLEOL 231172 . 232118) (DSPRUBOUTCHAR +232120 . 232558) (\DSPMOVELR 232560 . 235938)) (236070 237184 (\CURSOR.DEFPRINT 236080 . 237182)) ( +237596 246218 (TEXTUREOFCOLOR 237606 . 238868) (\PRIMARYTEXTURE 238870 . 239452) (\LEVELTEXTURE 239454 + . 239955) (INSURE.B&W.TEXTURE 239957 . 241350) (INSURE.RGB.COLOR 241352 . 242832) (\LOOKUPCOLORNAME +242834 . 243104) (RGBP 243106 . 243869) (HLSP 243871 . 244246) (HLSTORGB 244248 . 245388) (\HLSVALUEFN + 245390 . 246216))))) STOP diff --git a/sources/ADISPLAY.LCOM b/sources/ADISPLAY.LCOM index 11c293688..997d6bedd 100644 Binary files a/sources/ADISPLAY.LCOM and b/sources/ADISPLAY.LCOM differ diff --git a/sources/AOFD b/sources/AOFD index 4ab752aea..e3c7a052c 100644 --- a/sources/AOFD +++ b/sources/AOFD @@ -1,13 +1,15 @@ (DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED "13-Sep-90 16:39:58" |{PELE:MV:ENVOS}SOURCES>AOFD.;4| 34722 +(FILECREATED "13-Jun-2021 11:35:32" {DSK}kaplan>Local>medley3.5>git-medley>sources>AOFD.;2 35745 - changes to%: (FNS \BASEBYTES.IO.INIT \BASEBYTES.SETFILEPTR) + changes to%: (FNS CLOSEF INPUT OUTPUT RANDACCESSP \MAKEBASEBYTESTREAM \BASEBYTES.PEEKBIN + \SEARCHOPENFILES) - previous date%: "16-May-90 12:01:06" |{PELE:MV:ENVOS}SOURCES>AOFD.;3|) + previous date%: "10-May-2021 15:44:43" +{DSK}kaplan>Local>medley3.5>git-medley>sources>AOFD.;1) (* ; " -Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1981-1987, 1990, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT AOFDCOMS) @@ -15,7 +17,7 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co (RPAQQ AOFDCOMS [ -(* ;;; "streams (= OpenFileDescriptors)") +(* ;;; "streams (= OpenFileDescriptors)") (COMS (FNS \ADD-OPEN-STREAM \GENERIC-UNREGISTER-STREAM) (INITVARS (*ISSUE-CLOSE-WARNINGS* NIL)) @@ -26,7 +28,7 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co (\OPENFILES)) (GLOBALVARS DEFAULTEOFCLOSE \OPENFILES)) (COMS - (* ;; "STREAM interface to Read and Write to random memory") + (* ;; "STREAM interface to Read and Write to random memory") (DECLARE%: DONTCOPY (EXPORT (RECORDS BASEBYTESTREAM))) (FNS \BASEBYTES.IO.INIT \MAKEBASEBYTESTREAM \MBS.OUTCHARFN \BASEBYTES.NAME.FROM.STREAM @@ -36,7 +38,7 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co (DECLARE%: DONTEVAL@LOAD (P (\BASEBYTES.IO.INIT))) (FNS OPENSTRINGSTREAM)) [COMS - (* ;; "STREAM interface for old-style strings") + (* ;; "STREAM interface for old-style strings") (FNS \STRINGSTREAM.INIT) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (\STRINGSTREAM.INIT] @@ -93,11 +95,11 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co collect (CLOSEF STREAM]) (CLOSEF - [LAMBDA (FILE) (* ; "Edited 17-Jan-87 16:08 by bvm:") + [LAMBDA (FILE) (* ; "Edited 13-Jun-2021 11:26 by rmk:") (PROG ((STREAM (\GETSTREAM FILE))) (COND ((OR (\OUTTERMP STREAM) - (NOT (fetch USERCLOSEABLE of STREAM))) + (NOT (fetch (STREAM USERCLOSEABLE) of STREAM))) (RETURN NIL))) [MAPC (STREAMPROP STREAM 'BEFORECLOSE) (FUNCTION (LAMBDA (FN) @@ -111,14 +113,14 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co (SETQ *STANDARD-OUTPUT* \TERM.OFD))) (AND (NOT MULTIPLE.STREAMS.PER.FILE.ALLOWED) (\DELETEOFD STREAM)) - - (* ;; "Logical close before physical close; otherwise, we might have a logically open file with no physically open file behind it. (Device LPT depends on this)") + + (* ;; "Logical close before physical close; otherwise, we might have a logically open file with no physically open file behind it. (Device LPT depends on this)") (\CLOSEFILE STREAM) [MAPC (STREAMPROP STREAM 'AFTERCLOSE) (FUNCTION (LAMBDA (FN) (APPLY* FN STREAM] - (RETURN (fetch FULLNAME of STREAM]) + (RETURN (fetch (STREAM FULLNAME) of STREAM]) (EOFCLOSEF [LAMBDA (FILE) (* bvm%: "15-Jan-85 17:58") @@ -129,18 +131,18 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co STREAM]) (INPUT - [LAMBDA (FILE) (* ; "Edited 17-Jan-87 16:08 by bvm:") + [LAMBDA (FILE) (* ; "Edited 13-Jun-2021 11:27 by rmk:") (PROG1 (if (EQ *STANDARD-INPUT* \LINEBUF.OFD) then T else (if MULTIPLE.STREAMS.PER.FILE.ALLOWED - then *STANDARD-INPUT* - else (fetch FULLNAME of *STANDARD-INPUT*))) - (COND - (FILE (SETQ *STANDARD-INPUT* (COND - ((EQ FILE T) (* ; - "Check explicitly for T to avoid needless creations") - \LINEBUF.OFD) - (T (\GETSTREAM FILE 'INPUT]) + then *STANDARD-INPUT* + else (fetch (STREAM FULLNAME) of *STANDARD-INPUT*))) + [COND + (FILE (SETQ *STANDARD-INPUT* (COND + ((EQ FILE T) (* ; + "Check explicitly for T to avoid needless creations") + \LINEBUF.OFD) + (T (\GETSTREAM FILE 'INPUT])]) (OPENP [LAMBDA (FILE ACCESS) (* hdj "29-Sep-86 17:41") @@ -153,18 +155,18 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co \FILEDEVICES NIL]) (OUTPUT - [LAMBDA (FILE) (* ; "Edited 17-Jan-87 16:08 by bvm:") + [LAMBDA (FILE) (* ; "Edited 13-Jun-2021 11:27 by rmk:") (PROG1 (if (EQ *STANDARD-OUTPUT* \TERM.OFD) then T else (if MULTIPLE.STREAMS.PER.FILE.ALLOWED - then *STANDARD-OUTPUT* - else (fetch FULLNAME of *STANDARD-OUTPUT*))) - (COND - (FILE (SETQ *STANDARD-OUTPUT* (COND - ((EQ FILE T) (* ; - "Check for this special so we don't create a tty window needlessly") - \TERM.OFD) - (T (\GETSTREAM FILE 'OUTPUT]) + then *STANDARD-OUTPUT* + else (fetch (STREAM FULLNAME) of *STANDARD-OUTPUT*))) + [COND + (FILE (SETQ *STANDARD-OUTPUT* (COND + ((EQ FILE T) (* ; + "Check for this special so we don't create a tty window needlessly") + \TERM.OFD) + (T (\GETSTREAM FILE 'OUTPUT])]) (POSITION [LAMBDA (FILE N) (* ; "Edited 17-Jan-87 16:08 by bvm:") @@ -181,11 +183,12 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co 0]) (RANDACCESSP - [LAMBDA (FILE) (* rmk%: "14-OCT-83 15:32") + [LAMBDA (FILE) (* ; "Edited 13-Jun-2021 11:28 by rmk:") (PROG ((STREAM (\GETSTREAM FILE))) - (RETURN (AND (fetch RANDOMACCESSP of (fetch DEVICE of STREAM)) + (RETURN (AND (fetch (FDEV RANDOMACCESSP) of (fetch (STREAM DEVICE) of + STREAM)) (NEQ STREAM \LINEBUF.OFD) - (fetch FULLNAME of STREAM]) + (fetch (STREAM FULLNAME) of STREAM]) (\IOMODEP [LAMBDA (STREAM ACCESS NOERROR) (* rmk%: "21-OCT-83 11:10") @@ -248,9 +251,7 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co (* ;; "STREAM interface to Read and Write to random memory") (DECLARE%: DONTCOPY -(* "FOLLOWING DEFINITIONS EXPORTED") - -(DECLARE%: EVAL@COMPILE +(* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE (RECORD BASEBYTESTREAM STREAM (SUBRECORD STREAM) [ACCESSFNS ((BIASOFFST (fetch (STREAM FW6) of DATUM) @@ -334,9 +335,10 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co (\DEFINEDEVICE NIL \BASEBYTESDEVICE]) (\MAKEBASEBYTESTREAM - [LAMBDA (BASE OFFST LEN ACCESS WRITEXTENSIONFN OSTREAM) (* ; "Edited 17-Jan-87 16:08 by bvm:") - - (* ;; "If an error is to occur due to non-numeric arg or range restrictions, then let it happen outside the UNINTERRUPTABLY") + [LAMBDA (BASE OFFST LEN ACCESS WRITEXTENSIONFN OSTREAM) + (* ; "Edited 13-Jun-2021 11:33 by rmk:") + + (* ;; "If an error is to occur due to non-numeric arg or range restrictions, then let it happen outside the UNINTERRUPTABLY") (OR BASE (EQ LEN 0) (SHOULDNT)) @@ -350,34 +352,39 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co (\ILLEGAL.ARG ACCESS)) (if (type? STREAM OSTREAM) then (if (EQ (ffetch (STREAM DEVICE) of OSTREAM) - \BASEBYTESDEVICE) - then (replace ACCESS of OSTREAM with NIL) - else (CLOSEF OSTREAM) - (SETQ OSTREAM (create BASEBYTESTREAM - DEVICE _ \BASEBYTESDEVICE smashing OSTREAM))) + \BASEBYTESDEVICE) + then (replace (STREAM ACCESS) of OSTREAM with NIL) + else (CLOSEF OSTREAM) + (SETQ OSTREAM (create BASEBYTESTREAM + DEVICE _ \BASEBYTESDEVICE smashing OSTREAM))) else (SETQ OSTREAM (create BASEBYTESTREAM - DEVICE _ \BASEBYTESDEVICE))) + DEVICE _ \BASEBYTESDEVICE))) (UNINTERRUPTABLY - (freplace USERCLOSEABLE of OSTREAM with NIL) - (freplace USERVISIBLE of OSTREAM with NIL) - (freplace BYTESIZE of OSTREAM with BITSPERBYTE) - (freplace CPAGE of OSTREAM with (freplace EPAGE of OSTREAM with 0)) - (freplace CBUFPTR of OSTREAM with BASE) - (freplace COFFSET of OSTREAM with (freplace BIASOFFST of OSTREAM with OFFST)) - (freplace CBUFSIZE of OSTREAM with (freplace EOFFSET of OSTREAM with LEN)) - (replace ACCESS of OSTREAM with ACCESS) - - (* ;; "Insures that the BINABLE BOUTABLE and EXTENDABLE bits are setup setup, and that the correct BIN and BOUT fns are 'inherited' from the FDEV as well") - - (freplace FULLFILENAME of OSTREAM with NIL) - (freplace OUTCHARFN of OSTREAM with (FUNCTION \MBS.OUTCHARFN)) - (freplace LINELENGTH of OSTREAM with 0) - (freplace CHARPOSITION of OSTREAM with 0) - (freplace WRITEXTENSIONFN of OSTREAM with (SELECTQ ACCESS - ((OUTPUT BOTH) - WRITEXTENSIONFN) - NIL)) - (freplace BBSNCHARS of OSTREAM with 0)) + (freplace (STREAM USERCLOSEABLE) of OSTREAM with NIL) + (freplace (STREAM USERVISIBLE) of OSTREAM with NIL) + (freplace (STREAM BYTESIZE) of OSTREAM with BITSPERBYTE) + (freplace (STREAM CPAGE) of OSTREAM with (freplace (STREAM EPAGE) + of OSTREAM with 0)) + (freplace (STREAM CBUFPTR) of OSTREAM with BASE) + (freplace (STREAM COFFSET) of OSTREAM with (freplace (BASEBYTESTREAM + BIASOFFST) + of OSTREAM with OFFST)) + (freplace (STREAM CBUFSIZE) of OSTREAM with (freplace (STREAM EOFFSET) + of OSTREAM with LEN)) + (replace (STREAM ACCESS) of OSTREAM with ACCESS) + + (* ;; "Insures that the BINABLE BOUTABLE and EXTENDABLE bits are setup setup, and that the correct BIN and BOUT fns are 'inherited' from the FDEV as well") + + (freplace (STREAM FULLFILENAME) of OSTREAM with NIL) + (freplace (STREAM OUTCHARFN) of OSTREAM with (FUNCTION \MBS.OUTCHARFN)) + (freplace (STREAM LINELENGTH) of OSTREAM with 0) + (freplace (STREAM CHARPOSITION) of OSTREAM with 0) + (freplace (BASEBYTESTREAM WRITEXTENSIONFN) of OSTREAM with (SELECTQ ACCESS + ((OUTPUT BOTH) + + WRITEXTENSIONFN) + NIL)) + (freplace (BASEBYTESTREAM BBSNCHARS) of OSTREAM with 0)) OSTREAM]) (\MBS.OUTCHARFN @@ -453,18 +460,18 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co 1]) (\BASEBYTES.PEEKBIN - [LAMBDA (STREAM NOERRORFLG) (* ; "Edited 17-Jan-87 16:08 by bvm:") - (PROG ((CO (fetch COFFSET of STREAM))) + [LAMBDA (STREAM NOERRORFLG) (* ; "Edited 13-Jun-2021 11:34 by rmk:") + (PROG ((CO (fetch (STREAM COFFSET) of STREAM))) (SELECTQ (SYSTEMTYPE) - (VAX (if (fetch FULLNAME of STREAM) - then (* ; "Aha, it's a string stream") - (RETURN (\STRINGPEEKBIN STREAM NOERRORFLG)))) + (VAX (if (fetch (STREAM FULLNAME) of STREAM) + then (* ; "Aha, it's a string stream") + (RETURN (\STRINGPEEKBIN STREAM NOERRORFLG)))) NIL) - (RETURN (if (IGEQ CO (fetch EOFFSET of STREAM)) + (RETURN (if (IGEQ CO (fetch (STREAM EOFFSET) of STREAM)) then (if (NOT NOERRORFLG) - then (STREAMOP 'ENDOFSTREAMOP STREAM STREAM)) - else (\GETBASEBYTE (fetch CBUFPTR of STREAM) - CO]) + then (STREAMOP 'ENDOFSTREAMOP STREAM STREAM)) + else (\GETBASEBYTE (fetch (STREAM CBUFPTR) of STREAM) + CO]) (\BASEBYTES.TRUNCATEFN [LAMBDA (STREAM I) (* JonL " 7-NOV-83 22:20") @@ -694,19 +701,17 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co (T (\FILE.NOT.OPEN X NOERROR]) (\SEARCHOPENFILES - [LAMBDA (NAME ACCESS) (* rmk%: "14-OCT-83 15:04") - - (* ;; "Returns a stream whose fullname is NAME if it has accessmode ACCESS") + [LAMBDA (NAME ACCESS) (* ; "Edited 13-Jun-2021 11:35 by rmk:") + + (* ;; "Returns a stream whose fullname is NAME if it has accessmode ACCESS") - (for STREAM in \OPENFILES when (EQ NAME (fetch FULLNAME of STREAM)) + (for STREAM in \OPENFILES when (EQ NAME (fetch (STREAM FULLNAME) of STREAM)) do (RETURN (COND - (ACCESS (\IOMODEP STREAM ACCESS T)) - (T STREAM]) + (ACCESS (\IOMODEP STREAM ACCESS T)) + (T STREAM]) ) (DECLARE%: DONTCOPY -(* "FOLLOWING DEFINITIONS EXPORTED") - -(DECLARE%: EVAL@COMPILE +(* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE (PUTPROPS \INSTREAMARG MACRO ((STRM NOERRORFLG) (\GETSTREAM STRM 'INPUT NOERRORFLG))) @@ -715,9 +720,9 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co (\GETSTREAM STRM 'OUTPUT NOERRORFLG))) (PUTPROPS \STREAMARG MACRO [OPENLAMBDA (STRM NOERRORFLG) - (COND - (NOERRORFLG (\GETSTREAM STRM NIL T)) - (T (\DTEST STRM 'STREAM]) + (COND + (NOERRORFLG (\GETSTREAM STRM NIL T)) + (T (\DTEST STRM 'STREAM]) ) (* "END EXPORTED DEFINITIONS") @@ -741,18 +746,18 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1990 by Venue & Xerox Co (ADDTOVAR LAMA WHENCLOSE) ) -(PUTPROPS AOFD COPYRIGHT ("Venue & Xerox Corporation" 1981 1982 1983 1984 1985 1986 1987 1990)) +(PUTPROPS AOFD COPYRIGHT ("Venue & Xerox Corporation" 1981 1982 1983 1984 1985 1986 1987 1990 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (2304 3411 (\ADD-OPEN-STREAM 2314 . 2591) (\GENERIC-UNREGISTER-STREAM 2593 . 3409)) ( -3452 10531 (CLOSEALL 3462 . 4167) (CLOSEF 4169 . 5353) (EOFCLOSEF 5355 . 5651) (INPUT 5653 . 6407) ( -OPENP 6409 . 6808) (OUTPUT 6810 . 7566) (POSITION 7568 . 8380) (RANDACCESSP 8382 . 8727) (\IOMODEP -8729 . 9366) (WHENCLOSE 9368 . 10529)) (10532 10654 (STREAMADDPROP 10542 . 10652)) (11820 23932 ( -\BASEBYTES.IO.INIT 11830 . 15026) (\MAKEBASEBYTESTREAM 15028 . 17621) (\MBS.OUTCHARFN 17623 . 18011) ( -\BASEBYTES.NAME.FROM.STREAM 18013 . 18476) (\BASEBYTES.BOUT 18478 . 19195) (\BASEBYTES.SETFILEPTR -19197 . 19818) (\BASEBYTES.READP 19820 . 20456) (\BASEBYTES.BIN 20458 . 20989) (\BASEBYTES.PEEKBIN -20991 . 21772) (\BASEBYTES.TRUNCATEFN 21774 . 22278) (\BASEBYTES.OPENFN 22280 . 22770) ( -\BASEBYTES.BLOCKIO 22772 . 23930)) (24055 26305 (OPENSTRINGSTREAM 24065 . 26303)) (26362 29998 ( -\STRINGSTREAM.INIT 26372 . 29996)) (30060 33611 (GETSTREAM 30070 . 30293) (\ADDOFD 30295 . 30582) ( -\CLEAROFD 30584 . 30865) (\DELETEOFD 30867 . 31018) (\GETSTREAM 31020 . 33184) (\SEARCHOPENFILES 33186 - . 33609))))) + (FILEMAP (NIL (2373 3480 (\ADD-OPEN-STREAM 2383 . 2660) (\GENERIC-UNREGISTER-STREAM 2662 . 3478)) ( +3521 10778 (CLOSEALL 3531 . 4236) (CLOSEF 4238 . 5434) (EOFCLOSEF 5436 . 5732) (INPUT 5734 . 6506) ( +OPENP 6508 . 6907) (OUTPUT 6909 . 7683) (POSITION 7685 . 8497) (RANDACCESSP 8499 . 8974) (\IOMODEP +8976 . 9613) (WHENCLOSE 9615 . 10776)) (10779 10901 (STREAMADDPROP 10789 . 10899)) (12065 24946 ( +\BASEBYTES.IO.INIT 12075 . 15271) (\MAKEBASEBYTESTREAM 15273 . 18585) (\MBS.OUTCHARFN 18587 . 18975) ( +\BASEBYTES.NAME.FROM.STREAM 18977 . 19440) (\BASEBYTES.BOUT 19442 . 20159) (\BASEBYTES.SETFILEPTR +20161 . 20782) (\BASEBYTES.READP 20784 . 21420) (\BASEBYTES.BIN 21422 . 21953) (\BASEBYTES.PEEKBIN +21955 . 22786) (\BASEBYTES.TRUNCATEFN 22788 . 23292) (\BASEBYTES.OPENFN 23294 . 23784) ( +\BASEBYTES.BLOCKIO 23786 . 24944)) (25069 27319 (OPENSTRINGSTREAM 25079 . 27317)) (27376 31012 ( +\STRINGSTREAM.INIT 27386 . 31010)) (31074 34646 (GETSTREAM 31084 . 31307) (\ADDOFD 31309 . 31596) ( +\CLEAROFD 31598 . 31879) (\DELETEOFD 31881 . 32032) (\GETSTREAM 32034 . 34198) (\SEARCHOPENFILES 34200 + . 34644))))) STOP diff --git a/sources/AOFD.LCOM b/sources/AOFD.LCOM index 7815bb776..1b864a901 100644 Binary files a/sources/AOFD.LCOM and b/sources/AOFD.LCOM differ diff --git a/sources/APRINT b/sources/APRINT index 4abaa5269..b78898c28 100644 --- a/sources/APRINT +++ b/sources/APRINT @@ -1,22 +1,23 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "17-Jan-2020 05:51:20" {DSK}kaplan>Local>medley3.5>lispcore>sources>APRINT.;2 87685 +(FILECREATED " 9-Jun-2021 22:50:15"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>APRINT.;11 79264 - changes to%: (FNS \NUMERIC.PNAMEP) + changes to%: (VARS APRINTCOMS) - previous date%: " 6-Dec-91 11:43:22" -{DSK}kaplan>Local>medley3.5>lispcore>sources>APRINT.;1) + previous date%: "10-May-2021 15:46:22" +{DSK}kaplan>Local>medley3.5>git-medley>sources>APRINT.;10) (* ; " -Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1982-1988, 1990-1991, 2020-2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT APRINTCOMS) (RPAQQ APRINTCOMS [(COMS (* ; "User-level print functions") - (FNS PRIN1 PRIN2 PRIN3 PRIN4 PRINT PRINTCCODE PRINTLEVEL RADIX SPACES TERPRI FRESHLINE - DEFPRINT LINELENGTH)) + (FNS PRIN1 PRIN2 PRIN3 PRIN4 PRINT PRINTCCODE \PRINTCCODE PRINTLEVEL RADIX SPACES + TERPRI FRESHLINE DEFPRINT LINELENGTH)) (INITVARS (PLVLFILEFLG NIL) (\LINELENGTH 82) (\FLOATFORMAT T) @@ -42,13 +43,10 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (FNS \PRINDATUM \PRINT-USING-DEFPRINT \PRINT-USING-ADDRESS \ELIDE.PRINT.ELEMENT \ELIDE.ELEMENT.CHAR \ELIDE.PRINT.TAIL \ELIDE.TAIL.STRING \CKPOSBOUT \CKPOSSOUT \CONVERTNUMBER \LITPRIN \LITPRIN.INTERNAL \SYMBOL.ESCAPE.COUNT \NUMERIC.PNAMEP - \PRINSTACKP \PRINTADDR \PRINSTRING \SOUT \OUTCHAR) - (FNS \FILEOUTCHARFN \JISFILEOUTCHARFN \SHIFTJISFILEOUTCHARFN \EUCFILEOUTCHARFN - \THROUGHFILEOUTCHARFN) + \PRINSTACKP \PRINTADDR \PRINSTRING \SOUT) (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS .FILELINELENGTH.) (FUNCTIONS \PRINDATUM-LISTP) - (EXPORT (MACROS .SPACECHECK. \CHECKRADIX) - (MACROS \XCCSFILEOUTCHARFN))) + (EXPORT (MACROS .SPACECHECK. \CHECKRADIX))) (FNS \INVALID.RADIX) (SPECVARS \THISFILELINELENGTH)) (COMS (* ; "Internal printing") @@ -81,12 +79,13 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (DEFINEQ (PRIN1 - [LAMBDA (X FILE) (* bvm%: "29-Sep-86 23:59") + [LAMBDA (X FILE) (* bvm%: "29-Sep-86 23:59") (* ;;; "Like PRIN2 but no escaping. Also implies no radix qualifiers, although Common Lisp separates *PRINT-RADIX* from *PRINT-ESCAPE* -- might want to bind *PRINT-RADIX* to (AND (fetch (READTABLEP COMMONLISP) of *READTABLE*) *PRINT-RADIX*)") (LET* [(STRM (\GETSTREAM FILE 'OUTPUT)) - (OBEY-PRINT-LEVEL (OR (ffetch (READTABLEP COMMONLISP) of (\DTEST *READTABLE* 'READTABLEP)) + (OBEY-PRINT-LEVEL (OR (ffetch (READTABLEP COMMONLISP) of (\DTEST *READTABLE* + 'READTABLEP)) (OR (\OUTTERMP STRM) PLVLFILEFLG] (LET ((*PRINT-ESCAPE* NIL) @@ -96,17 +95,18 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (*PRINT-CASE* (OR *INTERLISP-PRIN1-CASE* *PRINT-CASE*)) \THISFILELINELENGTH) (DECLARE (SPECVARS *PRINT-RADIX* *PRINT-ESCAPE* *PRINT-LEVEL* *PRINT-LENGTH* - *PRINT-CASE* \THISFILELINELENGTH)) + *PRINT-CASE* \THISFILELINELENGTH)) (* ; - "*PRINT-CASE* because too many things in Interlisp prin1 things expecting the symbol's pname") + "*PRINT-CASE* because too many things in Interlisp prin1 things expecting the symbol's pname") (SETQ \THISFILELINELENGTH (.FILELINELENGTH. STRM)) (\PRINDATUM X STRM 0) X]) (PRIN2 - [LAMBDA (X FILE RDTBL) (* ; "Edited 20-Jan-87 17:04 by bvm:") + [LAMBDA (X FILE RDTBL) (* ; "Edited 20-Jan-87 17:04 by bvm:") (LET* [(STRM (\GETSTREAM FILE 'OUTPUT)) - (OBEY-PRINT-LEVEL (OR (fetch (READTABLEP COMMONLISP) of (SETQ RDTBL (\GTREADTABLE RDTBL))) + (OBEY-PRINT-LEVEL (OR (fetch (READTABLEP COMMONLISP) of (SETQ RDTBL (\GTREADTABLE + RDTBL))) (OR (\OUTTERMP STRM) PLVLFILEFLG] (LET ((*READTABLE* RDTBL) @@ -117,19 +117,20 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu then *INTERLISP-PACKAGE* else *PACKAGE*)) \THISFILELINELENGTH) - (DECLARE (SPECVARS *PRINT-ESCAPE* *READTABLE* *PRINT-LEVEL* *PRINT-LENGTH* *PACKAGE* - \THISFILELINELENGTH)) + (DECLARE (SPECVARS *PRINT-ESCAPE* *READTABLE* *PRINT-LEVEL* *PRINT-LENGTH* + *PACKAGE* \THISFILELINELENGTH)) (SETQ \THISFILELINELENGTH (.FILELINELENGTH. STRM)) (\PRINDATUM X STRM 0) X]) (PRIN3 - [LAMBDA (X FILE) (* bvm%: "29-Sep-86 23:59") + [LAMBDA (X FILE) (* bvm%: "29-Sep-86 23:59") (* ;;; "Like PRIN1 but no linelength checking") (LET* [(STRM (\GETSTREAM FILE 'OUTPUT)) - (OBEY-PRINT-LEVEL (OR (ffetch (READTABLEP COMMONLISP) of (\DTEST *READTABLE* 'READTABLEP)) + (OBEY-PRINT-LEVEL (OR (ffetch (READTABLEP COMMONLISP) of (\DTEST *READTABLE* + 'READTABLEP)) (OR (\OUTTERMP STRM) PLVLFILEFLG] (LET ((*PRINT-ESCAPE* NIL) @@ -139,17 +140,18 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (*PRINT-CASE* (OR *INTERLISP-PRIN1-CASE* *PRINT-CASE*)) \THISFILELINELENGTH) (DECLARE (SPECVARS *PRINT-RADIX* *PRINT-ESCAPE* *PRINT-LEVEL* *PRINT-LENGTH* - \THISFILELINELENGTH)) + \THISFILELINELENGTH)) (\PRINDATUM X STRM 0) X]) (PRIN4 - [LAMBDA (X FILE RDTBL) (* ; "Edited 20-Jan-87 17:05 by bvm:") + [LAMBDA (X FILE RDTBL) (* ; "Edited 20-Jan-87 17:05 by bvm:") (* ;;; "Like PRIN2 but doesn't check linelength") (LET* [(STRM (\GETSTREAM FILE 'OUTPUT)) - (OBEY-PRINT-LEVEL (OR (fetch (READTABLEP COMMONLISP) of (SETQ RDTBL (\GTREADTABLE RDTBL))) + (OBEY-PRINT-LEVEL (OR (fetch (READTABLEP COMMONLISP) of (SETQ RDTBL (\GTREADTABLE + RDTBL))) (OR (\OUTTERMP STRM) PLVLFILEFLG] (LET ((*READTABLE* RDTBL) @@ -160,28 +162,39 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu then *INTERLISP-PACKAGE* else *PACKAGE*)) \THISFILELINELENGTH) - (DECLARE (SPECVARS *PRINT-ESCAPE* *READTABLE* *PRINT-LEVEL* *PRINT-LENGTH* *PACKAGE* - \THISFILELINELENGTH)) + (DECLARE (SPECVARS *PRINT-ESCAPE* *READTABLE* *PRINT-LEVEL* *PRINT-LENGTH* + *PACKAGE* \THISFILELINELENGTH)) (\PRINDATUM X STRM 0) X]) (PRINT - [LAMBDA (X FILE RDTBL) (* bvm%: " 9-May-86 23:08") + [LAMBDA (X FILE RDTBL) (* bvm%: " 9-May-86 23:08") (LET [(STRM (\GETSTREAM FILE 'OUTPUT] (PRIN2 X STRM RDTBL) (\OUTCHAR STRM (CHARCODE EOL)) X]) (PRINTCCODE - [LAMBDA (CHARCODE FILE) (* bvm%: " 9-May-86 22:44") + [LAMBDA (CHARCODE FILE) (* bvm%: " 9-May-86 22:44") (\OUTCHAR (\GETSTREAM FILE 'OUTPUT) (COND ((\CHARCODEP CHARCODE) CHARCODE) (T (\ILLEGAL.ARG CHARCODE]) +(\PRINTCCODE + [LAMBDA (CHARCODE FILE) (* ; "Edited 5-May-2021 09:56 by rmk:") + + (* ;; "A copy of PRINTCCODE to be used in internal functions where \OUTCHAR doesn't have to be compiled open but which we don't want to screw up if the user breaks PRINTCCODE") + + (\OUTCHAR (\GETSTREAM FILE 'OUTPUT) + (COND + ((\CHARCODEP CHARCODE) + CHARCODE) + (T (\ILLEGAL.ARG CHARCODE]) + (PRINTLEVEL - [LAMBDA (CARVAL CDRVAL) (* bvm%: " 9-May-86 22:47") + [LAMBDA (CARVAL CDRVAL) (* bvm%: " 9-May-86 22:47") (* ;;; "Sets Interlisp print level to the given values in CAR and CDR directions. These correspond to *PRINT-LEVEL* and *PRINT-LENGTH* in Common Lisp") @@ -191,19 +204,20 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (SETQ CARVAL (CAR CARVAL] (PROG1 (CONS (OR *PRINT-LEVEL* -1) (OR *PRINT-LENGTH* -1)) - [COND - (CARVAL (SETQ *PRINT-LEVEL* (AND (IGEQ CARVAL 0) - CARVAL] - (COND - (CDRVAL (SETQ *PRINT-LENGTH* (AND (IGEQ CDRVAL 0) - CDRVAL]) + [COND + (CARVAL (SETQ *PRINT-LEVEL* (AND (IGEQ CARVAL 0) + CARVAL] + [COND + (CDRVAL (SETQ *PRINT-LENGTH* (AND (IGEQ CDRVAL 0) + CDRVAL])]) (RADIX - [LAMBDA (N) (* bvm%: " 5-May-86 10:56") - (PROG1 *PRINT-BASE* (AND N (SETQ *PRINT-BASE* (\CHECKRADIX N]) + [LAMBDA (N) (* bvm%: " 5-May-86 10:56") + (PROG1 *PRINT-BASE* + (AND N (SETQ *PRINT-BASE* (\CHECKRADIX N))))]) (SPACES - [LAMBDA (N FILE) (* rmk%: "21-OCT-83 12:32") + [LAMBDA (N FILE) (* rmk%: "21-OCT-83 12:32") [PROG ((STREAM (\GETSTREAM FILE 'OUTPUT)) \THISFILELINELENGTH) (SETQ \THISFILELINELENGTH (.FILELINELENGTH. STREAM)) @@ -212,29 +226,30 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu NIL]) (TERPRI - [LAMBDA (FILE) (* rmk%: "21-OCT-83 12:31") + [LAMBDA (FILE) (* rmk%: "21-OCT-83 12:31") (\OUTCHAR (\GETSTREAM FILE 'OUTPUT) (CHARCODE EOL)) NIL]) (FRESHLINE - [LAMBDA (STREAM) (* rmk%: "22-AUG-83 13:48") - - (* ;; "Adjusts the STREAM to be at a new line -- does equivalent of TERPRI unless it is already 'sitting at the beginning of a line'") + [LAMBDA (STREAM) (* rmk%: "22-AUG-83 13:48") + + (* ;; "Adjusts the STREAM to be at a new line -- does equivalent of TERPRI unless it is already 'sitting at the beginning of a line'") (COND ([NEQ 0 (fetch CHARPOSITION of (COND - ((AND (type? STREAM STREAM) - (WRITEABLE STREAM)) - STREAM) - (T (SETQ STREAM (GETSTREAM STREAM 'OUTPUT] + ((AND (type? STREAM STREAM) + (WRITEABLE STREAM)) + STREAM) + (T (SETQ STREAM (GETSTREAM STREAM 'OUTPUT] (\OUTCHAR STREAM (CHARCODE EOL)) T]) (DEFPRINT - [LAMBDA (TYPE FN) (* rmk%: "28-APR-80 12:04") + [LAMBDA (TYPE FN) (* rmk%: "28-APR-80 12:04") (AND (FIXP TYPE) - (SETQ TYPE (\TYPENAMEFROMNUMBER TYPE))) (* ; "The FIXP case should never occur") + (SETQ TYPE (\TYPENAMEFROMNUMBER TYPE))) (* ; + "The FIXP case should never occur") (PROG ((F (FASSOC TYPE \DEFPRINTFNS))) [COND (F (SETQ \DEFPRINTFNS (DREMOVE F \DEFPRINTFNS] @@ -244,21 +259,22 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (RETURN (CDR F]) (LINELENGTH - [LAMBDA (N FILE) (* bvm%: "11-Mar-86 14:56") + [LAMBDA (N FILE) (* bvm%: "11-Mar-86 14:56") (* ;;; "Sets to N the linelength of FILE -- defaults to primary output file") (LET [(STREAM (\GETSTREAM FILE 'OUTPUT] (PROG1 (fetch (STREAM LINELENGTH) of STREAM) - (AND N (COND - ((AND (NUMBERP N) - (ILESSP N 1)) - (\ILLEGAL.ARG N)) - (T (replace (STREAM LINELENGTH) of STREAM with (COND + [AND N (COND + ((AND (NUMBERP N) + (ILESSP N 1)) + (\ILLEGAL.ARG N)) + (T (replace (STREAM LINELENGTH) of STREAM with + (COND ((EQ N T) (* ; "Infinite") MAX.SMALLP) - (T (FIX N]) + (T (FIX N])]) ) (RPAQ? PLVLFILEFLG NIL) @@ -308,89 +324,91 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (DEFINEQ (PRINT-CIRCLE-LOOKUP - [LAMBDA (OBJECT) (* Pavel "16-Oct-86 21:13") + [LAMBDA (OBJECT) (* Pavel "16-Oct-86 21:13") (LET ((TABLEENTRY (GETHASH OBJECT *PRINT-CIRCLE-HASHTABLE*))) - (CASE TABLEENTRY ((T1 NIL) - (CL:VALUES NIL NIL)) - (T2 (CL:VALUES (PROG1 (CONCAT (CHARACTER (fetch (READTABLEP HASHMACROCHAR) - of *READTABLE*)) - *PRINT-CIRCLE-NUMBER* "=") - (CL:SETF (CL:GETHASH OBJECT *PRINT-CIRCLE-HASHTABLE*) - *PRINT-CIRCLE-NUMBER*) - (CL:INCF *PRINT-CIRCLE-NUMBER*)) - T)) - (CL:OTHERWISE (CL:IF (NUMBERP TABLEENTRY) - (CL:VALUES (CONCAT (CHARACTER (fetch (READTABLEP HASHMACROCHAR) - of *READTABLE*)) - TABLEENTRY "#") - NIL) - (CL:ERROR "Print-circle-lookup hashtable error!"]) + (CASE TABLEENTRY + ((T1 NIL) (CL:VALUES NIL NIL)) + (T2 (CL:VALUES (PROG1 (CONCAT (CHARACTER (fetch (READTABLEP HASHMACROCHAR) + of *READTABLE*)) + *PRINT-CIRCLE-NUMBER* "=") + (CL:SETF (CL:GETHASH OBJECT *PRINT-CIRCLE-HASHTABLE*) + *PRINT-CIRCLE-NUMBER*) + (CL:INCF *PRINT-CIRCLE-NUMBER*)) + T)) + (CL:OTHERWISE (CL:IF (NUMBERP TABLEENTRY) + (CL:VALUES (CONCAT (CHARACTER (fetch (READTABLEP HASHMACROCHAR) + of *READTABLE*)) + TABLEENTRY "#") + NIL) + (CL:ERROR "Print-circle-lookup hashtable error!"))))]) (PRINT-CIRCLE-LABEL-P - [CL:LAMBDA (OBJECT) (* jrb%: "30-Jun-86 23:04") + [CL:LAMBDA (OBJECT) (* jrb%: "30-Jun-86 23:04") (DECLARE (CL:SPECIAL *PRINT-CIRCLE-HASHTABLE*)) - (CL:BLOCK PRINT-CIRCLE-LABEL-P (LET ((TABLEENTRY (GETHASH OBJECT *PRINT-CIRCLE-HASHTABLE*))) - (COND - ((EQ TABLEENTRY 'T2)) - ((CL:INTEGERP TABLEENTRY) - TABLEENTRY) - (T NIL]) + (CL:BLOCK PRINT-CIRCLE-LABEL-P + (LET ((TABLEENTRY (GETHASH OBJECT *PRINT-CIRCLE-HASHTABLE*))) + (COND + ((EQ TABLEENTRY 'T2)) + ((CL:INTEGERP TABLEENTRY) + TABLEENTRY) + (T NIL))))]) (PRINT-CIRCLE-SCAN - [CL:LAMBDA (OBJECT) (* ; "Edited 16-Jan-87 15:53 by jrb:") + [CL:LAMBDA (OBJECT) (* ; "Edited 16-Jan-87 15:53 by jrb:") (DECLARE (CL:SPECIAL *PRINT-ARRAY*)) - (CL:TYPECASE OBJECT [CONS (COND - ((NOT (PRINT-CIRCLE-ENTER OBJECT)) - (PRINT-CIRCLE-SCAN (CAR OBJECT)) - (PRINT-CIRCLE-SCAN (CDR OBJECT] - [CL::STRUCTURE-OBJECT (COND - ((AND XCL:*PRINT-STRUCTURE* (NOT (PRINT-CIRCLE-ENTER OBJECT) - )) - (CL:MAPCAR [FUNCTION (LAMBDA (DESCRIPTOR) - (PRINT-CIRCLE-SCAN (FETCHFIELD - DESCRIPTOR - OBJECT] - (CL::STRUCTURE-POINTER-SLOTS (CL:TYPE-OF OBJECT] - ((CL:ARRAY T) - (COND - ((AND *PRINT-ARRAY* (NOT (PRINT-CIRCLE-ENTER OBJECT))) + (CL:TYPECASE OBJECT + (CONS [COND + ((NOT (PRINT-CIRCLE-ENTER OBJECT)) + (PRINT-CIRCLE-SCAN (CAR OBJECT)) + (PRINT-CIRCLE-SCAN (CDR OBJECT]) + (CL::STRUCTURE-OBJECT [COND + ((AND XCL:*PRINT-STRUCTURE* (NOT (PRINT-CIRCLE-ENTER OBJECT + ))) + (CL:MAPCAR [FUNCTION (LAMBDA (DESCRIPTOR) + (PRINT-CIRCLE-SCAN (FETCHFIELD + DESCRIPTOR + OBJECT] + (CL::STRUCTURE-POINTER-SLOTS (CL:TYPE-OF OBJECT]) + ((CL:ARRAY T) [COND + ((AND *PRINT-ARRAY* (NOT (PRINT-CIRCLE-ENTER OBJECT))) (* ; - "No need to walk array if we're not printing them") - (LET* [(ASIZE (CL:ARRAY-TOTAL-SIZE OBJECT)) - (VARRAY (COND - ((> (CL:ARRAY-RANK OBJECT) - 1) - (CL:MAKE-ARRAY ASIZE :DISPLACED-TO OBJECT)) - (T OBJECT] - (CL:DOTIMES (X ASIZE) - (PRINT-CIRCLE-SCAN (CL:AREF VARRAY X]) + "No need to walk array if we're not printing them") + (LET* [(ASIZE (CL:ARRAY-TOTAL-SIZE OBJECT)) + (VARRAY (COND + ((> (CL:ARRAY-RANK OBJECT) + 1) + (CL:MAKE-ARRAY ASIZE :DISPLACED-TO OBJECT)) + (T OBJECT] + (CL:DOTIMES (X ASIZE) + (PRINT-CIRCLE-SCAN (CL:AREF VARRAY X)))]))]) (PRINT-CIRCLE-ENTER [CL:LAMBDA (OBJECT) - (DECLARE (CL:SPECIAL *PRINT-CIRCLE-HASHTABLE* THERE-ARE-CIRCLES)) - (* ; "Edited 31-Mar-87 19:16 by jrb:") + (DECLARE (CL:SPECIAL *PRINT-CIRCLE-HASHTABLE* THERE-ARE-CIRCLES)) + (* ; "Edited 31-Mar-87 19:16 by jrb:") (CASE (CL:GETHASH OBJECT *PRINT-CIRCLE-HASHTABLE*) - ((NIL) + ((NIL) (CL:SETF (CL:GETHASH OBJECT *PRINT-CIRCLE-HASHTABLE*) 'T1) NIL) - (T1 (CL:SETF (CL:GETHASH OBJECT *PRINT-CIRCLE-HASHTABLE*) - 'T2) - (SETQ THERE-ARE-CIRCLES T) - T) - (T2 T) - (CL:OTHERWISE (CL:ERROR "Print-circle-enter hashtable error!"]) + (T1 + (CL:SETF (CL:GETHASH OBJECT *PRINT-CIRCLE-HASHTABLE*) + 'T2) + (SETQ THERE-ARE-CIRCLES T) + T) + (T2 T) + (CL:OTHERWISE (CL:ERROR "Print-circle-enter hashtable error!")))]) ) (DEFINEQ (\PRINDATUM - [LAMBDA (OBJECT STREAM CPL) (* ; "Edited 11-Feb-91 14:34 by jds") + [LAMBDA (OBJECT STREAM CPL) (* ; "Edited 11-Feb-91 14:34 by jds") (DECLARE (USEDFREE *READTABLE* *PRINT-RADIX* *PRINT-BASE* *PRINT-ESCAPE*)) (SELECTC (NTYPX OBJECT) ((LIST \LITATOM \NEW-ATOM) (\LITPRIN OBJECT STREAM)) (\LISTP - (* ;; "macro call that uses the arguments already bound, to save a fn call.") + (* ;; "macro call that uses the arguments already bound, to save a fn call.") (\PRINDATUM-LISTP)) ((LIST \SMALLP \FIXP) @@ -402,11 +420,11 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (AND (if (fetch (READTABLEP COMMONLISP) of *READTABLE*) then - (* ; - "Common Lisp controlled solely by this var") + (* ; + "Common Lisp controlled solely by this var") *PRINT-RADIX* - else (* ; - "Interlisp prints radix if it is not 10 and we are prin2") + else (* ; + "Interlisp prints radix if it is not 10 and we are prin2") (AND *PRINT-ESCAPE* (NEQ *PRINT-BASE* 10))) *READTABLE*) \NUMSTR \NUMSTR1)))) @@ -416,7 +434,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu ((AND (PNAMESTREAMP STREAM) (NOT PRXFLG)) - (* ;; "The pname of a number is unaffected by RADIX unless PRXFLG is true. This seems silly, but assorted code will break otherwise") + (* ;; "The pname of a number is unaffected by RADIX unless PRXFLG is true. This seems silly, but assorted code will break otherwise") T) (T \FLOATFORMAT]) @@ -426,19 +444,19 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (\PRINSTRING OBJECT STREAM)) ((TYPENAMEP OBJECT 'CL::STRUCTURE-OBJECT) - (* ;; "this is a structure, don't use defprint.") + (* ;; "this is a structure, don't use defprint.") (CL::PRINT-STRUCTURE-INSTANCE OBJECT STREAM CPL)) ((TYPENAMEP OBJECT 'T) - (* ;; - "this is a common-loops object, since it is a sub-class of t, so call the print-instance method.") + (* ;; + "this is a common-loops object, since it is a sub-class of t, so call the print-instance method.") (PRINT-INSTANCE OBJECT STREAM 0)) (T (\PRINT-USING-DEFPRINT OBJECT STREAM CPL]) (\PRINT-USING-DEFPRINT - [LAMBDA (X STREAM CPL) (* ; "Edited 18-Dec-86 12:22 by bvm:") + [LAMBDA (X STREAM CPL) (* ; "Edited 18-Dec-86 12:22 by bvm:") (DECLARE (USEDFREE *PRINT-LEVEL*)) (LET* ((TYPE (TYPENAME X)) (FN (FASSOC TYPE \DEFPRINTFNS))) @@ -447,16 +465,16 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (NULL (SETQ FN (LET [(*PRINT-LEVEL* (AND *PRINT-LEVEL* (IDIFFERENCE *PRINT-LEVEL* (OR CPL 0] (* ; - "This way recursive calls to PRINT etc will be at the 'right' level") + "This way recursive calls to PRINT etc will be at the 'right' level") (CL:FUNCALL (CDR FN) X STREAM 0] - - (* ;; "No defined printer, or printer declined to do anything") + + (* ;; "No defined printer, or printer declined to do anything") (\PRINT-USING-ADDRESS X STREAM CPL)) ((LISTP FN) - - (* ;; "PRIN1 the CAR (usually a macro char) and PRIN2 the CDR. Nowadays there is little reason for a defprint fn to not do its own printing") + + (* ;; "PRIN1 the CAR (usually a macro char) and PRIN2 the CDR. Nowadays there is little reason for a defprint fn to not do its own printing") (AND (CAR FN) (LET (*PRINT-ESCAPE*) @@ -468,37 +486,37 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (\PRINT-USING-ADDRESS (CL:LAMBDA (X STREAM CPL) - (CL:BLOCK \PRINT-USING-ADDRESS [LET ((TYPE (TYPENAME X))) - (COND - ((fetch (READTABLEP COMMONLISP) of *READTABLE*) - (.SPACECHECK. STREAM 2) - (\OUTCHAR STREAM (fetch (READTABLEP HASHMACROCHAR) - of *READTABLE*)) - (\OUTCHAR STREAM (CHARCODE "<")) - (AND TYPE (\LITPRIN TYPE STREAM)) - (\CKPOSSOUT STREAM " @ ") - (\PRINTADDR X STREAM) - (\CKPOSBOUT STREAM (CHARCODE ">"))) - (T (\CKPOSBOUT STREAM (CHARCODE {)) - (AND TYPE (\LITPRIN TYPE STREAM)) - (\CKPOSBOUT STREAM (CHARCODE })) - (\OUTCHAR STREAM (CHARCODE "#")) - (\PRINTADDR X STREAM] - T))) + (CL:BLOCK \PRINT-USING-ADDRESS + [LET ((TYPE (TYPENAME X))) + (COND + ((fetch (READTABLEP COMMONLISP) of *READTABLE*) + (.SPACECHECK. STREAM 2) + (\OUTCHAR STREAM (fetch (READTABLEP HASHMACROCHAR) of *READTABLE*)) + (\OUTCHAR STREAM (CHARCODE "<")) + (AND TYPE (\LITPRIN TYPE STREAM)) + (\CKPOSSOUT STREAM " @ ") + (\PRINTADDR X STREAM) + (\CKPOSBOUT STREAM (CHARCODE ">"))) + (T (\CKPOSBOUT STREAM (CHARCODE {)) + (AND TYPE (\LITPRIN TYPE STREAM)) + (\CKPOSBOUT STREAM (CHARCODE })) + (\OUTCHAR STREAM (CHARCODE "#")) + (\PRINTADDR X STREAM] + T))) (\ELIDE.PRINT.ELEMENT - [LAMBDA (STREAM) (* jrb%: "29-Jun-86 21:05") + [LAMBDA (STREAM) (* jrb%: "29-Jun-86 21:05") (\OUTCHAR STREAM (\ELIDE.ELEMENT.CHAR]) (\ELIDE.ELEMENT.CHAR - [LAMBDA NIL (* jrb%: "29-Jun-86 21:04") + [LAMBDA NIL (* jrb%: "29-Jun-86 21:04") (COND ((fetch (READTABLEP COMMONLISP) of *READTABLE*) (fetch (READTABLEP HASHMACROCHAR) of *READTABLE*)) (T (CHARCODE "&"]) (\ELIDE.PRINT.TAIL - [LAMBDA (STREAM NOSPACEP) (* jrb%: "29-Jun-86 21:06") + [LAMBDA (STREAM NOSPACEP) (* jrb%: "29-Jun-86 21:06") (* ;;; "Prints the appropriate elision indicator for elements beyond *PRINT-DEPTH* according to the read table we're using. Prints first a space unless NOSPACEP") @@ -509,24 +527,24 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu STREAM]) (\ELIDE.TAIL.STRING - [LAMBDA NIL (* jrb%: "29-Jun-86 21:05") + [LAMBDA NIL (* jrb%: "29-Jun-86 21:05") (COND ((fetch (READTABLEP COMMONLISP) of *READTABLE*) "...") (T "--"]) (\CKPOSBOUT - [LAMBDA (STREAM X) (* rmk%: "21-OCT-83 12:32") + [LAMBDA (STREAM X) (* rmk%: "21-OCT-83 12:32") (.SPACECHECK. STREAM 1) (\OUTCHAR STREAM X]) (\CKPOSSOUT - [LAMBDA (STREAM X) (* rmk%: "21-OCT-83 12:32") + [LAMBDA (STREAM X) (* rmk%: "21-OCT-83 12:32") (.SPACECHECK. STREAM (\NSTRINGCHARS X)) (for I instring X do (\OUTCHAR STREAM I]) (\CONVERTNUMBER - [LAMBDA (N R IGNORE RDTBL NS NSB) (* ; "Edited 18-Dec-86 17:53 by bvm:") + [LAMBDA (N R IGNORE RDTBL NS NSB) (* ; "Edited 18-Dec-86 17:53 by bvm:") (* ;;; "Convert integer N to a string in radix R. RDTBL governs whether radix qualifiers appear. NS is a scratch promised to be of sufficient length; NSB is a scratch string pointer. IGNORE is obsolete flag for printing unsigned numbers") @@ -539,85 +557,87 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (END (SUB1 POS)) COMMONLISPY DIDQ) (if RDTBL - then (* ; "do bletcherous suffix cases first") - (if (SETQ COMMONLISPY (fetch (READTABLEP COMMONLISP) of RDTBL)) - then (* ; "decimal is suffix") - (if (EQ R 10) - then (RPLCHARCODE NS (add END 1) - (CHARCODE ".")) - (SETQ DIDQ T)) - elseif (AND (EQ R 8) - (> MAGNITUDE 7)) - then (* ; "Octal numbers have Q suffix") - (RPLCHARCODE NS (add END 1) - (CHARCODE Q)) - (SETQ DIDQ T))) - (repeatuntil (EQ X 0) do (* ; - "note this loop happens at least once, for benefit of MAGNITUDE = 0") - [RPLCHARCODE NS (add POS -1) - (LET ((DIGIT (IREMAINDER X R))) - (if (< DIGIT 10) - then (+ DIGIT (CHARCODE 0)) - else (* ; - "For radices higher than 10, use letters of alphabet from A on up") - (+ (- DIGIT 10) - (CHARCODE A] - (SETQ X (IQUOTIENT X R))) + then (* ; + "do bletcherous suffix cases first") + (if (SETQ COMMONLISPY (fetch (READTABLEP COMMONLISP) of RDTBL)) + then (* ; "decimal is suffix") + (if (EQ R 10) + then (RPLCHARCODE NS (add END 1) + (CHARCODE ".")) + (SETQ DIDQ T)) + elseif (AND (EQ R 8) + (> MAGNITUDE 7)) + then (* ; "Octal numbers have Q suffix") + (RPLCHARCODE NS (add END 1) + (CHARCODE Q)) + (SETQ DIDQ T))) + (repeatuntil (EQ X 0) do (* ; + "note this loop happens at least once, for benefit of MAGNITUDE = 0") + [RPLCHARCODE NS (add POS -1) + (LET ((DIGIT (IREMAINDER X R))) + (if (< DIGIT 10) + then (+ DIGIT (CHARCODE 0)) + else + (* ; + "For radices higher than 10, use letters of alphabet from A on up") + (+ (- DIGIT 10) + (CHARCODE A] + (SETQ X (IQUOTIENT X R))) (if SIGN then (RPLCHARCODE NS (add POS -1) - (CHARCODE -))) + (CHARCODE -))) (if [AND RDTBL (NOT DIDQ) - (OR COMMONLISPY (AND (NEQ R 10) - (OR (> MAGNITUDE 9) - (>= MAGNITUDE R] + (OR COMMONLISPY (AND (NEQ R 10) + (OR (> MAGNITUDE 9) + (>= MAGNITUDE R] then - - (* ;; "Prepend a radix qualifier if it wasn't already done as a suffix. In Interlisp we don't do this if the radix is decimal or the number is smaller than the radix.") - [SELECTQ R - (16 (* ; "hex") + (* ;; "Prepend a radix qualifier if it wasn't already done as a suffix. In Interlisp we don't do this if the radix is decimal or the number is smaller than the radix.") + + [SELECTQ R + (16 (* ; "hex") + (RPLCHARCODE NS (add POS -1) + (CHARCODE x))) + (8 (* ; "octal") (RPLCHARCODE NS (add POS -1) - (CHARCODE x))) - (8 (* ; "octal") - (RPLCHARCODE NS (add POS -1) - (CHARCODE o))) - (2 (RPLCHARCODE NS (add POS -1) - (CHARCODE b))) - (PROGN (RPLCHARCODE NS (add POS -1) - (CHARCODE r)) - (RPLCHARCODE NS (add POS -1) - (+ (CHARCODE 0) - (IREMAINDER R 10))) - (if (>= R 10) - then (* ; "two-digit radix") - (RPLCHARCODE NS (add POS -1) - (+ (CHARCODE 0) - (IQUOTIENT R 10] - (RPLCHARCODE NS (add POS -1) - (fetch (READTABLEP HASHMACROCHAR) of RDTBL))) + (CHARCODE o))) + (2 (RPLCHARCODE NS (add POS -1) + (CHARCODE b))) + (PROGN (RPLCHARCODE NS (add POS -1) + (CHARCODE r)) + (RPLCHARCODE NS (add POS -1) + (+ (CHARCODE 0) + (IREMAINDER R 10))) + (if (>= R 10) + then (* ; "two-digit radix") + (RPLCHARCODE NS (add POS -1) + (+ (CHARCODE 0) + (IQUOTIENT R 10] + (RPLCHARCODE NS (add POS -1) + (fetch (READTABLEP HASHMACROCHAR) of RDTBL))) (SUBSTRING NS POS END NSB]) (\LITPRIN - [LAMBDA (X STREAM) (* ; "Edited 14-Apr-87 14:49 by jrb:") + [LAMBDA (X STREAM) (* ; "Edited 14-Apr-87 14:49 by jrb:") (DECLARE (USEDFREE \THISFILELINELENGTH *PRINT-ESCAPE* *READTABLE* *PACKAGE* *PRINT-GENSYM* *PRINT-CASE*)) (COND (*PRINT-ESCAPE* (LET ((RDTBL *READTABLE*) PKG PKGSEPR) [COND - (*PACKAGE* (* ; - "This is NIL until packages get turned on") + (*PACKAGE* (* ; + "This is NIL until packages get turned on") (COND ((EQ *PACKAGE* (SETQ PKG (fetch (CL:SYMBOL PACKAGE) of X))) - (* ; - "No prefix needed in current package") + (* ; + "No prefix needed in current package") (SETQ PKG NIL)) - [(NULL PKG) (* ; - "Uninterned. Print something if flag is on") + [(NULL PKG) (* ; + "Uninterned. Print something if flag is on") (COND - (*PRINT-GENSYM* (* ; - "Print #: as prefix. Not PACKAGECHAR here because colon hardwired into hashmacro dispatch.") + (*PRINT-GENSYM* (* ; + "Print #: as prefix. Not PACKAGECHAR here because colon hardwired into hashmacro dispatch.") (RPLCHARCODE (SETQ PKGSEPR (ALLOCSTRING 2 (CHARCODE ":"))) @@ -625,27 +645,27 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (fetch (READTABLEP HASHMACROCHAR) of RDTBL] ((EQ PKG *KEYWORD-PACKAGE*) - (* ; - "Keywords get single colon, no prefix") + (* ; + "Keywords get single colon, no prefix") (SETQ PKGSEPR (ALLOCSTRING 1 (fetch (READTABLEP PACKAGECHAR) of RDTBL))) (SETQ PKG NIL)) ((FIND-EXACT-SYMBOL X *PACKAGE*) - (* ;; "Symbol is accessible in current package, either by being imported or by inheritance. This is a messy test, which is why we test for special case of PKG being the current package first above. No prefix needed here.") + (* ;; "Symbol is accessible in current package, either by being imported or by inheritance. This is a messy test, which is why we test for special case of PKG being the current package first above. No prefix needed here.") (SETQ PKG NIL)) (T - (* ;; "Package qualifier is needed; we need only know now whether symbol is internal or external in its home package.") + (* ;; "Package qualifier is needed; we need only know now whether symbol is internal or external in its home package.") (SETQ PKGSEPR (ALLOCSTRING (COND ((EQ X ( FIND-EXTERNAL-SYMBOL X PKG)) - (* ; - "X is external in PKG, use single colon") + (* ; + "X is external in PKG, use single colon") 1) (T 2)) (fetch (READTABLEP PACKAGECHAR) @@ -656,7 +676,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (T (.SPACECHECK. STREAM (\NATOMCHARS X)) - (* ;; "Following code munged to match \LITPRIN.INTERNAL's handling of :CAPITALIZE") + (* ;; "Following code munged to match \LITPRIN.INTERNAL's handling of :CAPITALIZE") (for C inatom X bind (DOWNCASE _ (AND (fetch (READTABLEP CASEINSENSITIVE) of *READTABLE*) @@ -668,18 +688,18 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu do (\OUTCHAR STREAM (if DOWNCASE - then (* ; "may have to change case") + then (* ; "may have to change case") (if (AND (>= C (CHARCODE A)) (<= C (CHARCODE Z))) then (if (OR (NEQ DOWNCASE :CAPITALIZE) (PROG1 WAS-ALPHA (SETQ WAS-ALPHA T))) - then (* ; "for :capitalize, lower all but the characters that start %"words%", i.e., those immediately after a non-alphanumeric") + then (* ; "for :capitalize, lower all but the characters that start %"words%", i.e., those immediately after a non-alphanumeric") (+ C (- (CHARCODE a) (CHARCODE A))) else C) else [if (EQ DOWNCASE :CAPITALIZE) - then (* ; - "C not upper-case. Set WAS-ALPHA if it's lowercase alpha or numeric ") + then (* ; + "C not upper-case. Set WAS-ALPHA if it's lowercase alpha or numeric ") (SETQ WAS-ALPHA (OR (AND (>= C (CHARCODE a)) (<= C (CHARCODE z))) (AND (>= C (CHARCODE 0)) @@ -688,10 +708,10 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu else C]) (\LITPRIN.INTERNAL - [LAMBDA (SYMBOL RDTBL STREAM PKGNAME PKGSEPR CHECKLENGTH) - (* ; "Edited 18-Dec-86 17:33 by bvm:") + [LAMBDA (SYMBOL RDTBL STREAM PKGNAME PKGSEPR CHECKLENGTH) + (* ; "Edited 18-Dec-86 17:33 by bvm:") -(* ;;; "Print SYMBOL to STREAM according to RDTBL, preceded by PKGNAME (if non-NIL) and/or PKGSEPR. PKGNAME is a symbol, PKGSEPR is a string. If CHECKLENGTH is true, need to check that there is room for printing all three parts on this line; else caller has verified that there is room") +(* ;;; "Print SYMBOL to STREAM according to RDTBL, preceded by PKGNAME (if non-NIL) and/or PKGSEPR. PKGNAME is a symbol, PKGSEPR is a string. If CHECKLENGTH is true, need to check that there is room for printing all three parts on this line; else caller has verified that there is room") (LET ((PNAMELENGTH (\NATOMCHARS SYMBOL)) @@ -700,49 +720,49 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu USEMULTESCAPE CASEBASE SA SYN NESCAPES CHECKESCAPE FIRSTESCAPE) (if (OR (NEQ MULTESCAPE 0) CHECKLENGTH) - then (* ; - "have to check now if linelength matters or we plan to use multiple escapes") + then (* ; + "have to check now if linelength matters or we plan to use multiple escapes") (SETQ NESCAPES (\SYMBOL.ESCAPE.COUNT SYMBOL RDTBL (NULL CHECKLENGTH))) (if (EQ NESCAPES -1) - then (* ; - "Pname is numeric and we don't have a multiple escape available--need to escape first char") + then (* ; + "Pname is numeric and we don't have a multiple escape available--need to escape first char") (SETQ NESCAPES 1) (SETQ FIRSTESCAPE T) elseif (< NESCAPES 0) - then (* ; "Use multiple escapes") + then (* ; "Use multiple escapes") (SETQ NESCAPES (IMINUS NESCAPES)) (SETQ USEMULTESCAPE T) elseif (NEQ NESCAPES 0) then (SETQ CHECKESCAPE T)) - else (* ; - "if we don't check now then have to check while printing") + else (* ; + "if we don't check now then have to check while printing") (SETQ CHECKESCAPE T)) [if CHECKLENGTH - then (* ; "Verify space for everything") + then (* ; "Verify space for everything") (.SPACECHECK. STREAM (+ PNAMELENGTH NESCAPES (if PKGNAME then - (* ; - "How much space to print package name") + (* ; + "How much space to print package name") (IABS (\SYMBOL.ESCAPE.COUNT PKGNAME RDTBL)) else 0) (if PKGSEPR - then (* ; - "Extra characters between pkg name and symbol name") + then (* ; + "Extra characters between pkg name and symbol name") (\NSTRINGCHARS PKGSEPR) else 0] - (* ;; "First print any needed package qualifier") + (* ;; "First print any needed package qualifier") (if PKGNAME - then (* ; - "Print package name, don't check length") + then (* ; + "Print package name, don't check length") (\LITPRIN.INTERNAL PKGNAME RDTBL STREAM)) (if PKGSEPR then (\SOUT PKGSEPR STREAM)) (if USEMULTESCAPE - then (* ; - "Surround pname with multiple escape char, only escape internal escapes") + then (* ; + "Surround pname with multiple escape char, only escape internal escapes") (\OUTCHAR STREAM MULTESCAPE) (for C inatom SYMBOL do (if (OR (EQ C MULTESCAPE) (EQ C ESCAPE)) @@ -751,19 +771,19 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (\OUTCHAR STREAM MULTESCAPE) else [if FIRSTESCAPE - then (* ; - "Need an escape character at start to keep atom from being interpreted as number") + then (* ; + "Need an escape character at start to keep atom from being interpreted as number") (\OUTCHAR STREAM ESCAPE) elseif CHECKESCAPE then (if (AND (EQ PNAMELENGTH 1) (EQ (CHCON1 SYMBOL) (CHARCODE "."))) - then (* ; - "have to handle period special because it is only special in a dotted context") + then (* ; + "have to handle period special because it is only special in a dotted context") (\OUTCHAR STREAM ESCAPE) (SETQ CHECKESCAPE NIL) - else (* ; - "prepare to check for escaping of chars in the printing loop") + else (* ; + "prepare to check for escaping of chars in the printing loop") (SETQ CASEBASE (AND (fetch (READTABLEP CASEINSENSITIVE) of RDTBL) (fetch (ARRAYP BASE) of UPPERCASEARRAY))) (SETQ SA (fetch READSA of RDTBL] @@ -778,8 +798,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu do (if [AND CHECKESCAPE (OR (if (AND CASEBASE (ILEQ C \MAXTHINCHAR) (NEQ C (\GETBASEBYTE CASEBASE C))) - then (* ; - "lower-case alphabetic. We are assuming that no alphanumeric char will pass the next text") + then (* ; + "lower-case alphabetic. We are assuming that no alphanumeric char will pass the next text") (SETQ WAS-ALPHA T)) (AND (fetch (READCODE ESCQUOTE) of (SETQ SYN (\SYNCODE SA C))) @@ -787,24 +807,24 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu of SYN] then - (* ;; "Need to escape if: character is lower case when case-insensitive, or character intrinsically needs escape.") + (* ;; "Need to escape if: character is lower case when case-insensitive, or character intrinsically needs escape.") (\OUTCHAR STREAM ESCAPE) (\OUTCHAR STREAM C) else (\OUTCHAR STREAM (if DOWNCASE - then (* ; "may have to change case") + then (* ; "may have to change case") (if (AND (<= C (CHARCODE Z)) (>= C (CHARCODE A))) then (if (OR (NEQ DOWNCASE :CAPITALIZE) (PROG1 WAS-ALPHA (SETQ WAS-ALPHA T))) - then (* ; "for :capitalize, lower all but the characters that start %"words%", i.e., those immediately after a non-alphanumeric") + then (* ; "for :capitalize, lower all but the characters that start %"words%", i.e., those immediately after a non-alphanumeric") (+ C (- (CHARCODE a) (CHARCODE A))) else C) else [if (EQ DOWNCASE :CAPITALIZE) - then (* ; "C not upper-case. It's also not lowercase, because that was caught in the CHECKESCAPE clause if any, but note if it's numeric") + then (* ; "C not upper-case. It's also not lowercase, because that was caught in the CHECKESCAPE clause if any, but note if it's numeric") (SETQ WAS-ALPHA (AND (>= C (CHARCODE 0)) (<= C (CHARCODE 9] C) @@ -812,9 +832,9 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (SETQ FIRSTFLG NIL]) (\SYMBOL.ESCAPE.COUNT - [LAMBDA (SYMBOL RDTBL INEXACTOK) (* ; "Edited 18-Dec-86 17:08 by bvm:") + [LAMBDA (SYMBOL RDTBL INEXACTOK) (* ; "Edited 18-Dec-86 17:08 by bvm:") -(* ;;; "Counts the number of escape characters needed to print SYMBOL by RDTBL. If RDTBL has a multiple-escape character, then we return a negative count if we're assuming it is used instead of single escapes; else a positive count. The special value -1 means the symbol is numeric, so must be quoted, but no multiple escape is available, so just escape the first character. If INEXACTOK is true and we discover we want to use multiple escape char, returns -2 immediately.") +(* ;;; "Counts the number of escape characters needed to print SYMBOL by RDTBL. If RDTBL has a multiple-escape character, then we return a negative count if we're assuming it is used instead of single escapes; else a positive count. The special value -1 means the symbol is numeric, so must be quoted, but no multiple escape is available, so just escape the first character. If INEXACTOK is true and we discover we want to use multiple escape char, returns -2 immediately.") (for C inatom SYMBOL bind (RESULT _ 0) (NESCAPES _ 0) @@ -830,7 +850,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (SA _ (fetch READSA of RDTBL)) SYN first (if (EQ MULTESCAPE 0) then - (* ; "Can't use multiple-escape") + (* ; "Can't use multiple-escape") (SETQ MULTESCAPE NIL)) do [if [OR (AND CASEBASE (ILEQ C \MAXTHINCHAR) (NEQ C (\GETBASEBYTE CASEBASE C))) @@ -838,39 +858,39 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (OR FIRSTFLG (fetch (READCODE INNERESCQUOTE) of SYN] then - (* ;; "Need protection if char is lowercase in a case-insensitive read table or the read table says it needs it") + (* ;; "Need protection if char is lowercase in a case-insensitive read table or the read table says it needs it") (add RESULT 1) (if MULTESCAPE then (if (OR (EQ C MULTESCAPE) (EQ C ESCAPE)) - then (* ; - "These have to be escaped no matter what") + then (* ; + "These have to be escaped no matter what") (add NESCAPES 1) elseif (AND INEXACTOK (> (- RESULT NESCAPES) 1)) - then (* ; - "If at least 2 chars need escaping, better to use multiple escape, and we can quit scanning now") + then (* ; + "If at least 2 chars need escaping, better to use multiple escape, and we can quit scanning now") (RETURN -2] (SETQ FIRSTFLG NIL) finally (RETURN (if (EQ RESULT 0) - then (* ; - "No funny chars, check for some other perverse cases") + then (* ; + "No funny chars, check for some other perverse cases") (LET ((LEN (\NATOMCHARS SYMBOL))) (if (EQ LEN 0) - then (* ; - "The bletcherous null symbol. Shouldn't be allowed to create this, grumble.") + then (* ; + "The bletcherous null symbol. Shouldn't be allowed to create this, grumble.") (if MULTESCAPE then - (* ; "Can print as ||") + (* ; "Can print as ||") -2 else - (* ; "Single escape can't work") + (* ; "Single escape can't work") 0) elseif (AND (EQ LEN 1) (EQ C (CHARCODE "."))) - then (* ; - "Special case, dot is always escaped when by itself, and prefer single escape to multiple") + then (* ; + "Special case, dot is always escaped when by itself, and prefer single escape to multiple") -1 elseif (\NUMERIC.PNAMEP SYMBOL @@ -880,28 +900,28 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu else 10)) then - (* ;; "Is numeric, must escape it. Note that if pname is numeric, there can't be any special chars inside it needing escaping. We wait until now to test numeric on the grounds that it is more likely we will print a symbol with escapable chars than one that is a potential number.") + (* ;; "Is numeric, must escape it. Note that if pname is numeric, there can't be any special chars inside it needing escaping. We wait until now to test numeric on the grounds that it is more likely we will print a symbol with escapable chars than one that is a potential number.") (if MULTESCAPE then - (* ; - "Nicer to use multiple escape around whole symbol") + (* ; + "Nicer to use multiple escape around whole symbol") -2 else - (* ; "Say to escape first char") + (* ; "Say to escape first char") -1) else 0)) elseif (AND MULTESCAPE (> (- RESULT NESCAPES) 1)) then - (* ;; "The number of characters needing escaping, not counting the ones that have to be escaped in any case, is at least two. Use two multiple-escapes and NESCAPES regular escapes for the internal escapes = -(NESCAPES+2) total extra characters") + (* ;; "The number of characters needing escaping, not counting the ones that have to be escaped in any case, is at least two. Use two multiple-escapes and NESCAPES regular escapes for the internal escapes = -(NESCAPES+2) total extra characters") (- -2 NESCAPES) else RESULT]) (\NUMERIC.PNAMEP - [LAMBDA (SYMBOL RADIX) (* ; "Edited 17-Jan-2020 05:43 by rmk:") + [LAMBDA (SYMBOL RADIX) (* ; "Edited 17-Jan-2020 05:43 by rmk:") (* ; "Edited 6-Dec-91 11:27 by jds") (* ;;; "True if the chars in SYMBOL are a potential number in RADIX, which defaults to the current read base (according to current read table), OR IF the symbol consists solely of decimal points.") @@ -1007,14 +1027,14 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (for C inpname SYMBOL always (EQ C (CHARCODE "."]) (\PRINSTACKP - [LAMBDA (X STREAM) (* bvm%: "11-May-86 16:09") + [LAMBDA (X STREAM) (* bvm%: "11-May-86 16:09") (* ;;; "Print stackp as addr/framename. If stackp is released or framename is not a symbol, print mumble") (.SPACECHECK. STREAM (IPLUS 1 (CONSTANT (NCHARS "]) (\PRINTADDR - [LAMBDA (X STREAM) (* bvm%: "11-May-86 15:13") + [LAMBDA (X STREAM) (* bvm%: "11-May-86 15:13") (WITH-RESOURCES (\NUMSTR \NUMSTR1) (SELECTQ (SYSTEMTYPE) (D (\CKPOSSOUT STREAM (\CONVERTNUMBER (\HILOC X) - 8 NIL NIL \NUMSTR \NUMSTR1)) + 8 NIL NIL \NUMSTR \NUMSTR1)) (\CKPOSBOUT STREAM (CHARCODE %,)) (\CKPOSSOUT STREAM (\CONVERTNUMBER (\LOLOC X) - 8 NIL NIL \NUMSTR \NUMSTR1))) + 8 NIL NIL \NUMSTR \NUMSTR1))) (JERICHO (\CKPOSSOUT STREAM (\CONVERTNUMBER (LOGAND \ADDRMASK (LOC X)) - 8 NIL NIL \NUMSTR \NUMSTR1))) + 8 NIL NIL \NUMSTR \NUMSTR1))) (VAX (\CKPOSSOUT STREAM (\CONVERTNUMBER (LOC X) - 16 T NIL \NUMSTR \NUMSTR1))) + 16 T NIL \NUMSTR \NUMSTR1))) ((TENEX TOPS-20) (\CKPOSSOUT STREAM (\CONVERTNUMBER (LOC X) - 8 T NIL \NUMSTR \NUMSTR1))) + 8 T NIL \NUMSTR \NUMSTR1))) (SYSTEMTYPEPUNT '(\PRINDATUM X]) (\PRINSTRING - [LAMBDA (X STREAM) (* bvm%: "11-May-86 15:08") + [LAMBDA (X STREAM) (* bvm%: "11-May-86 15:08") (COND [*PRINT-ESCAPE* (* ; - "Print with double quotes and escaped as needed") + "Print with double quotes and escaped as needed") (LET ((ESC (fetch (READTABLEP ESCAPECHAR) of *READTABLE*))) [.SPACECHECK. STREAM (IPLUS 2 (\NSTRINGCHARS X) (for C instring X count (OR (EQ C (CHARCODE %")) - (EQ C ESC] + (EQ C ESC] (\OUTCHAR STREAM (CHARCODE %")) (for C instring X do (COND - ((OR (EQ C (CHARCODE %")) - (EQ C (CHARCODE LF)) - (EQ C ESC)) (* ; - "VM says only %" is escaped no matter what stringdelim's are.") - (\OUTCHAR STREAM ESC))) - (\OUTCHAR STREAM C)) + ((OR (EQ C (CHARCODE %")) + (EQ C (CHARCODE LF)) + (EQ C ESC)) + (* ; + "VM says only %" is escaped no matter what stringdelim's are.") + (\OUTCHAR STREAM ESC))) + (\OUTCHAR STREAM C)) (\OUTCHAR STREAM (CHARCODE %"] (T (.SPACECHECK. STREAM (\NSTRINGCHARS X)) (\SOUT X STREAM]) (\SOUT - [LAMBDA (X STREAM) (* ; "Edited 14-Dec-88 22:17 by jds") + [LAMBDA (X STREAM) (* ; "Edited 14-Dec-88 22:17 by jds") - (* ;; "Print the string X onto STREAM, which -must- be a stream.") + (* ;; "Print the string X onto STREAM, which -must- be a stream.") (DECLARE (GLOBALVARS \DISPLAYSTREAMTYPES)) (DECLARE (SPECVARS *DRIBBLE-OUTPUT* \PRIMTERMSA \TERM.OFD)) @@ -1091,31 +1112,6 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (\TERM.OFD \TERM.OFD)) (for I instring X do (\OUTCHAR STREAM I] ((for I instring X do (\OUTCHAR STREAM I]) - -(\OUTCHAR - [LAMBDA (STREAM CHARCODE) (* rmk%: " 7-APR-82 00:25") - (STREAMOP 'OUTCHARFN STREAM STREAM CHARCODE]) -) -(DEFINEQ - -(\FILEOUTCHARFN -(LAMBDA (ST CHARCODE) (* ; "Edited 25-Feb-91 17:15 by nm") (\XCCSFILEOUTCHARFN ST CHARCODE))) - -(\JISFILEOUTCHARFN -(LAMBDA (OUTSTREAM CHARCODE) (* ; "Edited 11-Mar-91 11:49 by nm") (* ;;; "Encoder for JIS format.") (COND ((EQ CHARCODE (CHARCODE EOL)) (COND ((\KIMODEP OUTSTREAM NIL) (\OUTKO OUTSTREAM) (\CHNAGE.KI.MODE OUTSTREAM NIL NIL))) (\BOUT OUTSTREAM (SELECTC (ffetch EOLCONVENTION of OUTSTREAM) (CR.EOLC (CHARCODE CR)) (LF.EOLC (CHARCODE LF)) (CRLF.EOLC (\BOUT OUTSTREAM (CHARCODE CR)) (* ;; "Don't put out high-order byte preceding LF. The CRLF is EOL only if the bytes are immediately adjacent in the stream, with no additional encoding bytes") (CHARCODE LF)) (SHOULDNT))) (freplace CHARPOSITION of OUTSTREAM with 0)) (T (SETQ CHARCODE (\CONV.XCCS.TO.JIS OUTSTREAM CHARCODE)) (* ; "\CONV.XCCS.TO.JIS converts ZENKAKUKATAKANA to HANKAKUKATAKANA if the stream desires it.") (COND ((> CHARCODE 255) (COND ((NOT (\KIMODEP OUTSTREAM NIL)) (\OUTKI OUTSTREAM) (\CHNAGE.KI.MODE OUTSTREAM NIL T))) (\BOUT OUTSTREAM (\CHARSET CHARCODE)) (\BOUT OUTSTREAM (\CHAR8CODE CHARCODE))) (T (* ; "ASCII or HANKAKUKATAKANA") (COND ((\KIMODEP OUTSTREAM NIL) (\OUTKO OUTSTREAM) (\CHNAGE.KI.MODE OUTSTREAM NIL NIL))) (\BOUT OUTSTREAM CHARCODE))) (freplace CHARPOSITION of OUTSTREAM with (PROGN (* ; "Ugh. Don't overflow") (IPLUS16 (ffetch CHARPOSITION of OUTSTREAM) 1)))))) -) - -(\SHIFTJISFILEOUTCHARFN -(LAMBDA (OUTSTREAM CHARCODE) (* ; "Edited 7-Mar-91 21:55 by nm") (* ;;; "Encoder for Shift-JIS format.") (COND ((EQ CHARCODE (CHARCODE EOL)) (\BOUT OUTSTREAM (SELECTC (ffetch EOLCONVENTION of OUTSTREAM) (CR.EOLC (CHARCODE CR)) (LF.EOLC (CHARCODE LF)) (CRLF.EOLC (\BOUT OUTSTREAM (CHARCODE CR)) (* ;; "Don't put out high-order byte preceding LF. The CRLF is EOL only if the bytes are immediately adjacent in the stream, with no additional encoding bytes") (CHARCODE LF)) (SHOULDNT))) (freplace CHARPOSITION of OUTSTREAM with 0)) (T (SETQ CHARCODE (\CONV.XCCS.TO.JIS OUTSTREAM CHARCODE)) (* ; "\CONV.XCCS.TO.JIS converts ZENKAKUKATAKANA to HANKAKUKATAKANA if the stream desires it.") (COND ((> CHARCODE 255) (LET ((CH1 (FOLDLO CHARCODE 256)) (CH2 (LOGAND CHARCODE 255))) (\CONV.JIS.TO.SJIS CH1 CH2) (COND ((AND (< CH1 256) (< CH2 256)) (\BOUT OUTSTREAM CH1) (\BOUT OUTSTREAM CH2))))) (T (\BOUT OUTSTREAM CHARCODE))) (freplace CHARPOSITION of OUTSTREAM with (PROGN (* ; "Ugh. Don't overflow") (IPLUS16 (ffetch CHARPOSITION of OUTSTREAM) 1)))))) -) - -(\EUCFILEOUTCHARFN -(LAMBDA (OUTSTREAM CHARCODE) (* ; "Edited 11-Mar-91 11:29 by nm") (* ;;; "Encoder for EUC format.") (COND ((EQ CHARCODE (CHARCODE EOL)) (\BOUT OUTSTREAM (SELECTC (ffetch EOLCONVENTION of OUTSTREAM) (CR.EOLC (CHARCODE CR)) (LF.EOLC (CHARCODE LF)) (CRLF.EOLC (\BOUT OUTSTREAM (CHARCODE CR)) (* ;; "Don't put out high-order byte preceding LF. The CRLF is EOL only if the bytes are immediately adjacent in the stream, with no additional encoding bytes") (CHARCODE LF)) (SHOULDNT))) (freplace CHARPOSITION of OUTSTREAM with 0)) (T (SETQ CHARCODE (\CONV.XCCS.TO.JIS OUTSTREAM CHARCODE)) (* ; "\CONV.XCCS.TO.JIS converts ZENKAKUKATAKANA to HANKAKUKATAKANA if the stream desires it.") (COND ((> CHARCODE 255) (* ; "KANJI or GAIJI") (AND (NOT (\NOTGAIJIP CHARCODE)) (\BOUT OUTSTREAM 143)) (\BOUT OUTSTREAM (LOGOR (\CHARSET CHARCODE) 128)) (\BOUT OUTSTREAM (LOGOR (\CHAR8CODE CHARCODE) 128))) ((\HANKAKUP CHARCODE) (\BOUT OUTSTREAM 142) (\BOUT OUTSTREAM (LOGOR CHARCODE 128))) (T (* ; "C0, C1, SP, DEL or G0") (\BOUT OUTSTREAM CHARCODE))) (freplace CHARPOSITION of OUTSTREAM with (PROGN (* ; "Ugh. Don't overflow") (IPLUS16 (ffetch CHARPOSITION of OUTSTREAM) 1)))))) -) - -(\THROUGHFILEOUTCHARFN -(LAMBDA (OUTSTREAM CHARCODE) (* ; "Edited 26-Feb-91 13:44 by nm") (* ;;; "Encoder for THROUGH format.") (COND ((> CHARCODE 255) (\BOUT OUTSTREAM (\CHARSET CHARCODE)) (\BOUT OUTSTREAM (\CHAR8CODE CHARCODE))) (T (\BOUT OUTSTREAM CHARCODE)))) -) ) (DECLARE%: EVAL@COMPILE DONTCOPY (DECLARE%: EVAL@COMPILE @@ -1212,66 +1208,6 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (\INVALID.RADIX R)) (T R]) ) -(DECLARE%: EVAL@COMPILE - -(PUTPROPS \XCCSFILEOUTCHARFN MACRO [(OUTSTREAM CHARCODE) - -(* ;;; "Encoder for XCCS format. Default decoder.") - - (COND - ((EQ CHARCODE (CHARCODE EOL)) - [COND - [(NOT (\RUNCODED OUTSTREAM)) - (* ; "Charset is a constant 0") - (\BOUT OUTSTREAM (\CHARSET (CHARCODE EOL] - ((EQ (\CHARSET (CHARCODE EOL)) - (ffetch (STREAM CHARSET) of OUTSTREAM - ))) - (T (\BOUT OUTSTREAM NSCHARSETSHIFT) - (\BOUT OUTSTREAM (freplace (STREAM CHARSET) - of OUTSTREAM - with - (\CHARSET (CHARCODE EOL] - (\BOUT OUTSTREAM (SELECTC (ffetch EOLCONVENTION - of OUTSTREAM) - (CR.EOLC (CHARCODE CR)) - (LF.EOLC (CHARCODE LF)) - (CRLF.EOLC (\BOUT OUTSTREAM - (CHARCODE - CR)) - - (* ;; "Don't put out high-order byte preceding LF. The CRLF is EOL only if the bytes are immediately adjacent in the stream, with no additional encoding bytes") - - (CHARCODE LF)) - (SHOULDNT))) - (freplace CHARPOSITION of OUTSTREAM - with 0)) - (T [COND - ((NOT (\RUNCODED OUTSTREAM)) - (\BOUT OUTSTREAM (\CHARSET CHARCODE)) - (\BOUT OUTSTREAM (\CHAR8CODE CHARCODE))) - ((EQ (\CHARSET CHARCODE) - (ffetch (STREAM CHARSET) of - OUTSTREAM - )) - (\BOUT OUTSTREAM (\CHAR8CODE CHARCODE))) - (T (\BOUT OUTSTREAM NSCHARSETSHIFT) - (\BOUT OUTSTREAM (freplace (STREAM - CHARSET - ) - of OUTSTREAM - with (\CHARSET - CHARCODE) - )) - (\BOUT OUTSTREAM (\CHAR8CODE CHARCODE] - (freplace CHARPOSITION of OUTSTREAM - with (PROGN - (* ; "Ugh. Don't overflow") - (IPLUS16 (ffetch - CHARPOSITION - of OUTSTREAM) - 1]) -) (* "END EXPORTED DEFINITIONS") @@ -1279,7 +1215,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (DEFINEQ (\INVALID.RADIX - [LAMBDA (N) (* bvm%: " 5-May-86 10:58") + [LAMBDA (N) (* bvm%: " 5-May-86 10:58") (ERROR "Bad value for *print-base*" N]) ) (DECLARE%: DOEVAL@COMPILE DONTCOPY @@ -1294,7 +1230,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (DEFINEQ (\MAPPNAME - [LAMBDA (FN X FLG RDTBL *PRINT-LEVEL* *PRINT-LENGTH*) (* ; "Edited 23-Mar-87 11:01 by bvm:") + [LAMBDA (FN X FLG RDTBL *PRINT-LEVEL* *PRINT-LENGTH*) (* ; "Edited 23-Mar-87 11:01 by bvm:") (* ;;; "Run thru the characters in the pname of X, calling FN on each character. For speed, FN is defined to be of the same form as an OUTCHARFN, viz., arglist = (stream char); stream in this case is a dummy") @@ -1312,17 +1248,18 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (\MAPPNAME.INTERNAL FN X]) (\MAPPNAME.INTERNAL - [LAMBDA (FN X) (* bvm%: "13-May-86 15:01") + [LAMBDA (FN X) (* ; "Edited 10-May-2021 15:46 by rmk:") (WITH-RESOURCE (\MAPPNAMESTREAM) - (replace OUTCHARFN of \MAPPNAMESTREAM with FN) - (replace STRMBOUTFN of \MAPPNAMESTREAM with FN) (* ; - "Should never use the bout fn, but include it just in case somebody thinks \OUTCHAR = \BOUT") + (replace (STREAM OUTCHARFN) of \MAPPNAMESTREAM with FN) + (replace STRMBOUTFN of \MAPPNAMESTREAM with FN) + (* ; + "Should never use the bout fn, but include it just in case somebody thinks \OUTCHAR = \BOUT") (LET (\THISFILELINELENGTH) (* ; "Stream has no linelength checks") (DECLARE (SPECVARS \THISFILELINELENGTH)) (\PRINDATUM X \MAPPNAMESTREAM 0]) (PNAMESTREAMP - [LAMBDA (STRM) (* bvm%: "24-Mar-86 17:37") + [LAMBDA (STRM) (* bvm%: "24-Mar-86 17:37") (* ;;; "True if STRM is an internal-printing stream for pnames, i.e., one of the values of the \MAPPNAMESTREAM resource") @@ -1363,13 +1300,13 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (DEFINEQ (\MAPCHARS - [LAMBDA (\MAPCHARFN X FLG RDTBL) (* bvm%: "13-Mar-86 18:53") + [LAMBDA (\MAPCHARFN X FLG RDTBL) (* bvm%: "13-Mar-86 18:53") (DECLARE (SPECVARS RDTBL)) (* ;;; "Run thru the characters in the pname of X, calling \MAPCHARFN on each character.") (\MAPPNAME [FUNCTION (LAMBDA (DUMMY CHAR) - (SPREADAPPLY* \MAPCHARFN CHAR] + (SPREADAPPLY* \MAPCHARFN CHAR] X FLG RDTBL]) ) (DECLARE%: EVAL@COMPILE DOCOPY @@ -1387,9 +1324,9 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (PRINTNUM [LAMBDA (FORMAT NUMBER FILE) (* DECLARATIONS%: (RECORD FIXFMT - (WIDTH RADIX PAD0 LEFTFLUSH)) - (RECORD FLOATFMT (WIDTH DECPART - EXPPART PAD0 SIGDIGITS))) + (WIDTH RADIX PAD0 LEFTFLUSH)) + (RECORD FLOATFMT (WIDTH DECPART + EXPPART PAD0 SIGDIGITS))) (* rmk%: "17-MAY-82 10:07") (DECLARE (GLOBALVARS NILNUMPRINTFLG)) (GLOBALRESOURCE (\NUMSTR \NUMSTR1) @@ -1405,7 +1342,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (FLOATFLAG (\CONVERT.FLOATING.NUMBER (FLOAT NUMBER) \NUMSTR \NUMSTR1 (\CHECKFLTFMT FORMAT))) (T (\CONVERTNUMBER (OR (FIXP NUMBER) - (FIXR NUMBER)) + (FIXR NUMBER)) (COND ((SETQ RAD (fetch RADIX of FMT)) (SETQ TEMP (IABS RAD)) @@ -1439,14 +1376,15 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (RETURN NUMBER]) (FLTFMT - [LAMBDA (FORMAT) (* bvm%: "30-JAN-81 23:20") + [LAMBDA (FORMAT) (* bvm%: "30-JAN-81 23:20") (* ; - "numeric arg, as on 10, not allowed") - (PROG1 \FLOATFORMAT (AND FORMAT (\CHECKFLTFMT FORMAT) - (SETQ \FLOATFORMAT FORMAT]) + "numeric arg, as on 10, not allowed") + (PROG1 \FLOATFORMAT + (AND FORMAT (\CHECKFLTFMT FORMAT) + (SETQ \FLOATFORMAT FORMAT)))]) (\CHECKFLTFMT - [LAMBDA (FORMAT) (* bvm%: "29-JAN-81 15:41") + [LAMBDA (FORMAT) (* bvm%: "29-JAN-81 15:41") (* ;;; "Generates error if FORMAT is not legal FLOAT format: (FLOAT WIDTH DECPART EXPPART PAD SIGDIGITS)") @@ -1463,11 +1401,11 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (T (LISPERROR "ILLEGAL ARG" FORMAT]) (PRINTNUM-TO-STRING - [LAMBDA (FORMAT NUMBER) (* DECLARATIONS%: (RECORD FIXFMT - (WIDTH RADIX PAD0 LEFTFLUSH)) - (RECORD FLOATFMT (WIDTH DECPART - EXPPART PAD0 SIGDIGITS))) - (* ; "Edited 27-Nov-91 13:32 by jds") + [LAMBDA (FORMAT NUMBER) (* DECLARATIONS%: (RECORD FIXFMT + (WIDTH RADIX PAD0 LEFTFLUSH)) + (RECORD FLOATFMT (WIDTH DECPART + EXPPART PAD0 SIGDIGITS))) + (* ; "Edited 27-Nov-91 13:32 by jds") (DECLARE (GLOBALVARS NILNUMPRINTFLG)) (GLOBALRESOURCE (\NUMSTR \NUMSTR1) (PROG (STR WIDTH PAD TEMP RAD (FLOATFLAG (SELECTQ (CAR (LISTP FORMAT)) @@ -1534,23 +1472,21 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 2020 by Venu (ADDTOVAR LAMA ) ) (PUTPROPS APRINT COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1988 1990 1991 -2020)) +2020 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (3975 12601 (PRIN1 3985 . 5389) (PRIN2 5391 . 6496) (PRIN3 6498 . 7449) (PRIN4 7451 . -8546) (PRINT 8548 . 8788) (PRINTCCODE 8790 . 9067) (PRINTLEVEL 9069 . 9795) (RADIX 9797 . 9971) ( -SPACES 9973 . 10323) (TERPRI 10325 . 10514) (FRESHLINE 10516 . 11181) (DEFPRINT 11183 . 11695) ( -LINELENGTH 11697 . 12599)) (13263 17752 (PRINT-CIRCLE-LOOKUP 13273 . 14503) (PRINT-CIRCLE-LABEL-P -14505 . 15103) (PRINT-CIRCLE-SCAN 15105 . 17042) (PRINT-CIRCLE-ENTER 17044 . 17750)) (17753 62216 ( -\PRINDATUM 17763 . 20705) (\PRINT-USING-DEFPRINT 20707 . 22097) (\PRINT-USING-ADDRESS 22099 . 23512) ( -\ELIDE.PRINT.ELEMENT 23514 . 23688) (\ELIDE.ELEMENT.CHAR 23690 . 23977) (\ELIDE.PRINT.TAIL 23979 . -24407) (\ELIDE.TAIL.STRING 24409 . 24634) (\CKPOSBOUT 24636 . 24805) (\CKPOSSOUT 24807 . 25025) ( -\CONVERTNUMBER 25027 . 29308) (\LITPRIN 29310 . 35845) (\LITPRIN.INTERNAL 35847 . 44202) ( -\SYMBOL.ESCAPE.COUNT 44204 . 50972) (\NUMERIC.PNAMEP 50974 . 57553) (\PRINSTACKP 57555 . 58866) ( -\PRINTADDR 58868 . 59949) (\PRINSTRING 59951 . 61332) (\SOUT 61334 . 62052) (\OUTCHAR 62054 . 62214)) -(62217 66145 (\FILEOUTCHARFN 62227 . 62340) (\JISFILEOUTCHARFN 62342 . 63612) (\SHIFTJISFILEOUTCHARFN -63614 . 64688) (\EUCFILEOUTCHARFN 64690 . 65873) (\THROUGHFILEOUTCHARFN 65875 . 66143)) (76348 76520 ( -\INVALID.RADIX 76358 . 76518)) (76624 78633 (\MAPPNAME 76634 . 77633) (\MAPPNAME.INTERNAL 77635 . -78272) (PNAMESTREAMP 78274 . 78631)) (79316 79704 (\MAPCHARS 79326 . 79702)) (80035 87091 (PRINTNUM -80045 . 83104) (FLTFMT 83106 . 83507) (\CHECKFLTFMT 83509 . 84081) (PRINTNUM-TO-STRING 84083 . 87089)) -))) + (FILEMAP (NIL (3743 13280 (PRIN1 3753 . 5238) (PRIN2 5240 . 6433) (PRIN3 6435 . 7469) (PRIN4 7471 . +8654) (PRINT 8656 . 8892) (PRINTCCODE 8894 . 9167) (\PRINTCCODE 9169 . 9638) (PRINTLEVEL 9640 . 10346) + (RADIX 10348 . 10530) (SPACES 10532 . 10878) (TERPRI 10880 . 11065) (FRESHLINE 11067 . 11744) ( +DEFPRINT 11746 . 12318) (LINELENGTH 12320 . 13278)) (13942 18274 (PRINT-CIRCLE-LOOKUP 13952 . 15118) ( +PRINT-CIRCLE-LABEL-P 15120 . 15596) (PRINT-CIRCLE-SCAN 15598 . 17560) (PRINT-CIRCLE-ENTER 17562 . +18272)) (18275 62434 (\PRINDATUM 18285 . 21227) (\PRINT-USING-DEFPRINT 21229 . 22601) ( +\PRINT-USING-ADDRESS 22603 . 23579) (\ELIDE.PRINT.ELEMENT 23581 . 23751) (\ELIDE.ELEMENT.CHAR 23753 . +24036) (\ELIDE.PRINT.TAIL 24038 . 24462) (\ELIDE.TAIL.STRING 24464 . 24685) (\CKPOSBOUT 24687 . 24852) + (\CKPOSSOUT 24854 . 25068) (\CONVERTNUMBER 25070 . 29559) (\LITPRIN 29561 . 36096) (\LITPRIN.INTERNAL + 36098 . 44453) (\SYMBOL.ESCAPE.COUNT 44455 . 51223) (\NUMERIC.PNAMEP 51225 . 57808) (\PRINSTACKP +57810 . 59115) (\PRINTADDR 59117 . 60214) (\PRINSTRING 60216 . 61712) (\SOUT 61714 . 62432)) (67877 +68045 (\INVALID.RADIX 67887 . 68043)) (68149 70224 (\MAPPNAME 68159 . 69154) (\MAPPNAME.INTERNAL 69156 + . 69867) (PNAMESTREAMP 69869 . 70222)) (70907 71295 (\MAPCHARS 70917 . 71293)) (71626 78665 (PRINTNUM + 71636 . 74693) (FLTFMT 74695 . 75085) (\CHECKFLTFMT 75087 . 75655) (PRINTNUM-TO-STRING 75657 . 78663) +)))) STOP diff --git a/sources/APRINT.LCOM b/sources/APRINT.LCOM index 9f30a5520..41f058366 100644 Binary files a/sources/APRINT.LCOM and b/sources/APRINT.LCOM differ diff --git a/sources/ATBL b/sources/ATBL index e9ff9d0c0..bdd1f53b6 100644 --- a/sources/ATBL +++ b/sources/ATBL @@ -1,28 +1,29 @@ -(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "12-Feb-2021 22:55:58" {DSK}larry>ilisp>medley>sources>ATBL.;9 257317Q +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS) +(FILECREATED " 9-Jul-2021 15:28:19" {DSK}kaplan>Local>medley3.5>git-medley>sources>ATBL.;11 260310Q - changes to%: (FNS RESETREADTABLE) + changes to%: (FNS SET-READER-ENVIRONMENT) - previous date%: "20-Apr-2018 17:35:56" {DSK}larry>ilisp>medley>sources>ATBL.;8) + previous date%: "28-Jun-2021 09:37:15" +{DSK}kaplan>Local>medley3.5>git-medley>sources>ATBL.;10) (* ; " -Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venue & Xerox Corporation. +Copyright (c) 1982-1987, 1990, 1993, 2018, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT ATBLCOMS) (RPAQQ ATBLCOMS [(E (RESETSAVE (RADIX 8))) - (COMS (* ; - "Common features of read and terminal tables") + (COMS (* ; + "Common features of read and terminal tables") (DECLARE%: DONTCOPY (EXPORT (MACROS \SYNCODE \SETSYNCODE) (RECORDS CHARTABLE)) (CONSTANTS \NSCHARHASHKEYS \NSCHARHASHOVERFLOW) (MACROS \CREATENSCHARHASH)) (FNS GETSYNTAX SETSYNTAX SYNTAXP \COPYSYNTAX \GETCHARCODE \SETFATSYNCODE \MAPCHARTABLE) ) - (COMS (* ; "terminal tables") + (COMS (* ; "terminal tables") (FNS CONTROL COPYTERMTABLE DELETECONTROL GETDELETECONTROL ECHOCHAR ECHOCONTROL ECHOMODE GETECHOMODE GETCONTROL GETTERMTABLE RAISE GETRAISE RESETTERMTABLE SETTERMTABLE TERMTABLEP \GETTERMSYNTAX \GTTERMTABLE \ORIGTERMTABLE \SETTERMSYNTAX @@ -31,16 +32,16 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venu (CONSTANTS * TERMCLASSES) (RECORDS TERMCODE TERMTABLEP))) (INITRECORDS TERMTABLEP)) - (COMS (* ; "read tables") + (COMS (* ; "read tables") (FNS COPYREADTABLE FIND-READTABLE IN-READTABLE ESCAPE GETBRK GETREADTABLE GETSEPR READMACROS READTABLEP READTABLEPROP RESETREADTABLE SETBRK SETREADTABLE SETSEPR \GETREADSYNTAX \GTREADTABLE \GTREADTABLE1 \ORIGREADTABLE \READCLASSTOCODE \SETMACROSYNTAX \SETREADSYNTAX \READTABLEP.DEFPRINT) (PROP ARGNAMES READTABLEPROP) - (DECLARE%: EVAL@COMPILE DONTCOPY (* ; - "READCLASSTOKENS Generates READCLASSES and some interesting SELECTQ's") - (* ; - "OTHER must be zero because of initialization.") + (DECLARE%: EVAL@COMPILE DONTCOPY (* ; + "READCLASSTOKENS Generates READCLASSES and some interesting SELECTQ's") + (* ; + "OTHER must be zero because of initialization.") [VARS READCLASSTOKENS (READCLASSES (MAPCAR READCLASSTOKENS (FUNCTION (LAMBDA (PAIR) @@ -48,8 +49,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venu ".RC") (CADR PAIR] (MACROS \COMPUTED.FORM) - (* ; - "This macro ought to be official somehow") + (* ; + "This macro ought to be official somehow") (RECORDS CONTEXTS ESCAPES WAKEUPS) (EXPORT (MACROS \GETREADMACRODEF \GTREADTABLE \GTREADTABLE1) (CONSTANTS MACROBIT BREAKBIT STOPATOMBIT ESCAPEBIT INNERESCAPEBIT) @@ -64,8 +65,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venu [COMS (INITVARS (\READTABLEHASH)) (FNS \ATBLSET) (INITRECORDS READER-ENVIRONMENT) - (* ; - "Definition is on CMLREAD, need it here to initialize *OLD-INTERLISP-READ-ENVIRONMENT*") + (* ; + "Definition is on CMLREAD, need it here to initialize *OLD-INTERLISP-READ-ENVIRONMENT*") (FNS MAKE-READER-ENVIRONMENT EQUAL-READER-ENVIRONMENT SET-READER-ENVIRONMENT) (INITVARS (*LISP-PACKAGE*) (*INTERLISP-PACKAGE*) @@ -85,8 +86,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venu (PUTPROPS \SYNCODE DMACRO [OPENLAMBDA (TABLE CHAR) (CHECK (type? CHARTABLE TABLE)) - (* ; - "0 is either NONE.TC, REAL.CCE, or OTHER.RC") + (* ; + "0 is either NONE.TC, REAL.CCE, or OTHER.RC") (COND ((IGREATERP CHAR \MAXTHINCHAR) (OR (AND (fetch (CHARTABLE NSCHARHASH) of TABLE) @@ -97,8 +98,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venu (PUTPROPS \SETSYNCODE DMACRO [LAMBDA (TABLE CHAR CODE) (CHECK (type? CHARTABLE TABLE)) - (* ; - "0 is REAL.CCE, NONE.TC, OTHER.RC") + (* ; + "0 is REAL.CCE, NONE.TC, OTHER.RC") (COND ((ILEQ CHAR \MAXTHINCHAR) (\PUTBASEBYTE TABLE CHAR CODE)) @@ -401,8 +402,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venu (DECLARE%: EVAL@COMPILE -(PUTPROPS \CREATENSCHARHASH MACRO (ARGS (* ; - "added size argument for creation of \ORIGTERMTABLE during initialization.") +(PUTPROPS \CREATENSCHARHASH MACRO (ARGS (* ; + "added size argument for creation of \ORIGTERMTABLE during initialization.") (LIST 'HASHARRAY (OR (CAR ARGS) '\NSCHARHASHKEYS) '\NSCHARHASHOVERFLOW))) @@ -928,8 +929,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venu (DECLARE%: EVAL@COMPILE (ACCESSFNS TERMCODE ((CCECHO (LOGAND DATUM 30Q)) - (TERMCLASS (LOGAND DATUM 7))) (* ; - "We assume that values are appropriately shifted") + (TERMCLASS (LOGAND DATUM 7))) (* ; + "We assume that values are appropriately shifted") (CREATE (LOGOR CCECHO TERMCLASS))) (DATATYPE TERMTABLEP (TERMSA RAISEFLG DELCHARECHO LINEDELETE 1STCHDEL NTHCHDEL POSTCHDEL @@ -1617,34 +1618,34 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venu (RECORD READMACRODEF (MACROTYPE . MACROFN)) -(DATATYPE READTABLEP ((READSA POINTER) (* ; - "A CHARTABLE defining syntax of each char") - (READMACRODEFS POINTER) (* ; - "A hash table associating macro chars with macro definitions") - (READMACROFLG FLAG) (* ; - "True if read macros are enabled (turned off by Interlisp's crufty READMACROS function)") - (ESCAPEFLG FLAG) (* ; "True if the char(s) with escape syntax are enabled (turned off by Interlisp's crufty ESCAPE function)") - (COMMONLISP FLAG) (* ; - "True if table is a Common Lisp read table and hence must obey Common Lisp syntax rules") - (NUMBERBASE BITS 5) (* ; "Not used") - (CASEINSENSITIVE FLAG) (* ; - "If true, unescaped lowercase chars are converted to uppercase in symbols") - (COMMONNUMSYNTAX FLAG) (* ; "True if number notation includes Common Lisp numbers: rationals as a/b, and the dfls exponent markers") - (USESILPACKAGE FLAG) (* ; - "If true, IL:READ ignores *PACKAGE* and reads in the IL package") +(DATATYPE READTABLEP ((READSA POINTER) (* ; + "A CHARTABLE defining syntax of each char") + (READMACRODEFS POINTER) (* ; + "A hash table associating macro chars with macro definitions") + (READMACROFLG FLAG) (* ; + "True if read macros are enabled (turned off by Interlisp's crufty READMACROS function)") + (ESCAPEFLG FLAG) (* ; "True if the char(s) with escape syntax are enabled (turned off by Interlisp's crufty ESCAPE function)") + (COMMONLISP FLAG) (* ; + "True if table is a Common Lisp read table and hence must obey Common Lisp syntax rules") + (NUMBERBASE BITS 5) (* ; "Not used") + (CASEINSENSITIVE FLAG) (* ; + "If true, unescaped lowercase chars are converted to uppercase in symbols") + (COMMONNUMSYNTAX FLAG) (* ; "True if number notation includes Common Lisp numbers: rationals as a/b, and the dfls exponent markers") + (USESILPACKAGE FLAG) (* ; + "If true, IL:READ ignores *PACKAGE* and reads in the IL package") (NIL 5 FLAG) - (DISPATCHMACRODEFS POINTER) (* ; - "An a-list of dispatching macro char and its dispatch definitions") - (HASHMACROCHAR BYTE) (* ; - "The character code used in this read table for the # dispatch macro") - (ESCAPECHAR BYTE) (* ; - "The character code used in this read table for single escape") - (MULTESCAPECHAR BYTE) (* ; - "The character code used in this read table for multiple escape") - (PACKAGECHAR BYTE) (* ; - "The character code used in this read table for package delimiter") - (READTBLNAME POINTER) (* ; - "The canonical 'name' of this read table") + (DISPATCHMACRODEFS POINTER) (* ; + "An a-list of dispatching macro char and its dispatch definitions") + (HASHMACROCHAR BYTE) (* ; + "The character code used in this read table for the # dispatch macro") + (ESCAPECHAR BYTE) (* ; + "The character code used in this read table for single escape") + (MULTESCAPECHAR BYTE) (* ; + "The character code used in this read table for multiple escape") + (PACKAGECHAR BYTE) (* ; + "The character code used in this read table for package delimiter") + (READTBLNAME POINTER) (* ; + "The canonical 'name' of this read table") ) READSA _ (create CHARTABLE)) ) @@ -1712,7 +1713,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venu (DEFINEQ (\ATBLSET - [LAMBDA NIL (* ; "Edited 20-Apr-2018 17:34 by rmk:") + [LAMBDA NIL (* ; "Edited 28-Jun-2021 09:29 by rmk:") (* ; "Edited 3-Dec-86 18:07 by Pavel") (DECLARE (GLOBALVARS \ORIGREADTABLE \ORIGTERMTABLE)) (COND @@ -1753,10 +1754,11 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venu (SETSYNTAX (CHARCODE "|") TRDTBL FILERDTBL) (READTABLEPROP FILERDTBL 'NAME "OLD-INTERLISP-FILE") - (SETQ *OLD-INTERLISP-READ-ENVIRONMENT* (create READER-ENVIRONMENT - REREADTABLE _ FILERDTBL - REBASE _ 12Q)) - (* ; + (SETQ *OLD-INTERLISP-READ-ENVIRONMENT* + (create READER-ENVIRONMENT + REREADTABLE _ FILERDTBL + REBASE _ 12Q + REFORMAT _ :XCCS)) (* ;  "need this to read files in the loadup") ) (PROGN (SETQ NEW-IL-RDTBL (COPYREADTABLE TRDTBL)) @@ -1793,12 +1795,13 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venu NIL]) ) -(/DECLAREDATATYPE 'READER-ENVIRONMENT '(POINTER POINTER POINTER POINTER) +(/DECLAREDATATYPE 'READER-ENVIRONMENT '(POINTER POINTER POINTER POINTER POINTER) '((READER-ENVIRONMENT 0 POINTER) (READER-ENVIRONMENT 2 POINTER) (READER-ENVIRONMENT 4 POINTER) - (READER-ENVIRONMENT 6 POINTER)) - '10Q) + (READER-ENVIRONMENT 6 POINTER) + (READER-ENVIRONMENT 10Q POINTER)) + '12Q) @@ -1807,7 +1810,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venu (DEFINEQ (MAKE-READER-ENVIRONMENT - [LAMBDA (PACKAGE READTABLE BASE) (* ; "Edited 18-Dec-86 18:28 by bvm:") + [LAMBDA (PACKAGE READTABLE BASE FORMAT) (* ; "Edited 28-Jun-2021 09:32 by rmk:") (create READER-ENVIRONMENT REPACKAGE _ (COND (PACKAGE (\DTEST PACKAGE 'PACKAGE)) @@ -1817,25 +1820,33 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venu (T *READTABLE*)) REBASE _ (COND (BASE (\CHECKRADIX BASE)) - (T *PRINT-BASE*]) + (T *PRINT-BASE*)) + REFORMAT _ (OR FORMAT *DEFAULT-EXTERNALFORMAT*]) (EQUAL-READER-ENVIRONMENT - [LAMBDA (ENV1 ENV2) (* bvm%: "31-Jul-86 12:54") + [LAMBDA (ENV1 ENV2) (* ; "Edited 28-Jun-2021 09:37 by rmk:") + (* ; ":XCCS is the prehistoric value") (AND (EQ (fetch (READER-ENVIRONMENT REREADTABLE) of ENV1) (fetch (READER-ENVIRONMENT REREADTABLE) of ENV2)) (EQ (fetch (READER-ENVIRONMENT REPACKAGE) of ENV1) (fetch (READER-ENVIRONMENT REPACKAGE) of ENV2)) (EQ (fetch (READER-ENVIRONMENT REBASE) of ENV1) - (fetch (READER-ENVIRONMENT REBASE) of ENV2]) + (fetch (READER-ENVIRONMENT REBASE) of ENV2)) + (EQ (OR (fetch (READER-ENVIRONMENT REFORMAT) of ENV1) + :XCCS) + (OR (fetch (READER-ENVIRONMENT REFORMAT) of ENV2) + :XCCS]) (SET-READER-ENVIRONMENT - [LAMBDA (ENV) (* bvm%: "28-Aug-86 17:44") + [LAMBDA (ENV STREAM) (* ; "Edited 9-Jul-2021 14:42 by rmk:") (* ;;; "Sets the reader environment variables from ENV. Should usually only be called inside a WITH-READER-ENVIRONMENT.") [SETQ *PACKAGE* (ffetch REPACKAGE of (\DTEST ENV 'READER-ENVIRONMENT] (SETQ *READTABLE* (ffetch REREADTABLE of ENV)) (SETQ *READ-BASE* (SETQ *PRINT-BASE* (ffetch REBASE of ENV))) + (CL:WHEN STREAM + (\EXTERNALFORMAT STREAM (ffetch (READER-ENVIRONMENT REFORMAT) OF ENV))) ENV]) ) @@ -1863,24 +1874,24 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1993, 2018, 2021 by Venu (PUTPROPS ATBL COPYRIGHT ("Venue & Xerox Corporation" 3676Q 3677Q 3700Q 3701Q 3702Q 3703Q 3706Q 3711Q 3742Q 3745Q)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (44114Q 67345Q (GETSYNTAX 44126Q . 55055Q) (SETSYNTAX 55057Q . 57144Q) (SYNTAXP 57146Q - . 62552Q) (\COPYSYNTAX 62554Q . 63637Q) (\GETCHARCODE 63641Q . 64305Q) (\SETFATSYNCODE 64307Q . -66462Q) (\MAPCHARTABLE 66464Q . 67343Q)) (67406Q 124174Q (CONTROL 67420Q . 70020Q) (COPYTERMTABLE -70022Q . 70464Q) (DELETECONTROL 70466Q . 75306Q) (GETDELETECONTROL 75310Q . 77216Q) (ECHOCHAR 77220Q - . 102116Q) (ECHOCONTROL 102120Q . 103040Q) (ECHOMODE 103042Q . 103434Q) (GETECHOMODE 103436Q . -103706Q) (GETCONTROL 103710Q . 104162Q) (GETTERMTABLE 104164Q . 104267Q) (RAISE 104271Q . 105113Q) ( -GETRAISE 105115Q . 105363Q) (RESETTERMTABLE 105365Q . 107465Q) (SETTERMTABLE 107467Q . 110156Q) ( -TERMTABLEP 110160Q . 110425Q) (\GETTERMSYNTAX 110427Q . 111036Q) (\GTTERMTABLE 111040Q . 111564Q) ( -\ORIGTERMTABLE 111566Q . 120427Q) (\SETTERMSYNTAX 120431Q . 121630Q) (\TERMCLASSTOCODE 121632Q . -122513Q) (\TERMCODETOCLASS 122515Q . 123324Q) (\LITCHECK 123326Q . 124172Q)) (131165Q 210145Q ( -COPYREADTABLE 131177Q . 131511Q) (FIND-READTABLE 131513Q . 131742Q) (IN-READTABLE 131744Q . 132210Q) ( -ESCAPE 132212Q . 132613Q) (GETBRK 132615Q . 133033Q) (GETREADTABLE 133035Q . 133246Q) (GETSEPR 133250Q - . 133466Q) (READMACROS 133470Q . 134103Q) (READTABLEP 134105Q . 134354Q) (READTABLEPROP 134356Q . -146554Q) (RESETREADTABLE 146556Q . 157076Q) (SETBRK 157100Q . 162204Q) (SETREADTABLE 162206Q . 162473Q -) (SETSEPR 162475Q . 165475Q) (\GETREADSYNTAX 165477Q . 172657Q) (\GTREADTABLE 172661Q . 173226Q) ( -\GTREADTABLE1 173230Q . 173634Q) (\ORIGREADTABLE 173636Q . 177455Q) (\READCLASSTOCODE 177457Q . -200366Q) (\SETMACROSYNTAX 200370Q . 204004Q) (\SETREADSYNTAX 204006Q . 206071Q) (\READTABLEP.DEFPRINT -206073Q . 210143Q)) (241661Q 252517Q (\ATBLSET 241673Q . 252515Q)) (253256Q 256351Q ( -MAKE-READER-ENVIRONMENT 253270Q . 254356Q) (EQUAL-READER-ENVIRONMENT 254360Q . 255407Q) ( -SET-READER-ENVIRONMENT 255411Q . 256347Q))))) + (FILEMAP (NIL (44154Q 67405Q (GETSYNTAX 44166Q . 55115Q) (SETSYNTAX 55117Q . 57204Q) (SYNTAXP 57206Q + . 62612Q) (\COPYSYNTAX 62614Q . 63677Q) (\GETCHARCODE 63701Q . 64345Q) (\SETFATSYNCODE 64347Q . +66522Q) (\MAPCHARTABLE 66524Q . 67403Q)) (67446Q 124234Q (CONTROL 67460Q . 70060Q) (COPYTERMTABLE +70062Q . 70524Q) (DELETECONTROL 70526Q . 75346Q) (GETDELETECONTROL 75350Q . 77256Q) (ECHOCHAR 77260Q + . 102156Q) (ECHOCONTROL 102160Q . 103100Q) (ECHOMODE 103102Q . 103474Q) (GETECHOMODE 103476Q . +103746Q) (GETCONTROL 103750Q . 104222Q) (GETTERMTABLE 104224Q . 104327Q) (RAISE 104331Q . 105153Q) ( +GETRAISE 105155Q . 105423Q) (RESETTERMTABLE 105425Q . 107525Q) (SETTERMTABLE 107527Q . 110216Q) ( +TERMTABLEP 110220Q . 110465Q) (\GETTERMSYNTAX 110467Q . 111076Q) (\GTTERMTABLE 111100Q . 111624Q) ( +\ORIGTERMTABLE 111626Q . 120467Q) (\SETTERMSYNTAX 120471Q . 121670Q) (\TERMCLASSTOCODE 121672Q . +122553Q) (\TERMCODETOCLASS 122555Q . 123364Q) (\LITCHECK 123366Q . 124232Q)) (131225Q 210205Q ( +COPYREADTABLE 131237Q . 131551Q) (FIND-READTABLE 131553Q . 132002Q) (IN-READTABLE 132004Q . 132250Q) ( +ESCAPE 132252Q . 132653Q) (GETBRK 132655Q . 133073Q) (GETREADTABLE 133075Q . 133306Q) (GETSEPR 133310Q + . 133526Q) (READMACROS 133530Q . 134143Q) (READTABLEP 134145Q . 134414Q) (READTABLEPROP 134416Q . +146614Q) (RESETREADTABLE 146616Q . 157136Q) (SETBRK 157140Q . 162244Q) (SETREADTABLE 162246Q . 162533Q +) (SETSEPR 162535Q . 165535Q) (\GETREADSYNTAX 165537Q . 172717Q) (\GTREADTABLE 172721Q . 173266Q) ( +\GTREADTABLE1 173270Q . 173674Q) (\ORIGREADTABLE 173676Q . 177515Q) (\READCLASSTOCODE 177517Q . +200426Q) (\SETMACROSYNTAX 200430Q . 204044Q) (\SETREADSYNTAX 204046Q . 206131Q) (\READTABLEP.DEFPRINT +206133Q . 210203Q)) (241721Q 252472Q (\ATBLSET 241733Q . 252470Q)) (253313Q 257342Q ( +MAKE-READER-ENVIRONMENT 253325Q . 254504Q) (EQUAL-READER-ENVIRONMENT 254506Q . 256214Q) ( +SET-READER-ENVIRONMENT 256216Q . 257340Q))))) STOP diff --git a/sources/ATBL.LCOM b/sources/ATBL.LCOM index 5281c39ec..2ed726449 100644 Binary files a/sources/ATBL.LCOM and b/sources/ATBL.LCOM differ diff --git a/sources/ATERM b/sources/ATERM index 00d4113f3..104ef16be 100644 --- a/sources/ATERM +++ b/sources/ATERM @@ -1,10 +1,10 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "29-Apr-2021 09:38:58" {DSK}kaplan>Local>medley3.5>git-medley>sources>ATERM.;4 56766 +(FILECREATED "23-Jun-2021 12:31:16" {DSK}kaplan>Local>medley3.5>git-medley>sources>ATERM.;2 57229 - changes to%: (FNS \CREATELINEBUFFER) + changes to%: (FNS \CHDEL1) - previous date%: "16-May-90 12:08:04" -{DSK}kaplan>Local>medley3.5>git-medley>sources>ATERM.;3) + previous date%: "10-May-2021 15:07:31" +{DSK}kaplan>Local>medley3.5>git-medley>sources>ATERM.;1) (* ; " @@ -181,10 +181,10 @@ Copyright (c) 1982-1988, 1990, 2021 by Venue & Xerox Corporation. (SETQ TtyDisplayStream (SETQ \TERM.OFD STREAM])]) (\CHDEL1 - [LAMBDA NIL (* rmk%: "28-Mar-85 18:25") + [LAMBDA NIL (* ; "Edited 23-Jun-2021 12:29 by rmk:") (COND - ((\BACKNSCHAR \LINEBUF.OFD (UNFOLD \NORUNCODE 256)) - (PROG1 (\NSPEEK \LINEBUF.OFD (UNFOLD \NORUNCODE 256)) + ((\BACKCCODE \LINEBUF.OFD) + (PROG1 (\PEEKCCODE \LINEBUF.OFD) (\SETEOFPTR \LINEBUF.OFD (GETFILEPTR \LINEBUF.OFD)))]) (\CLOSELINE @@ -243,7 +243,7 @@ Copyright (c) 1982-1988, 1990, 2021 by Venue & Xerox Corporation. T]) (\FILLBUFFER - [LAMBDA (FILLTYPE) (* ; "Edited 20-Aug-87 17:52 by jds") + [LAMBDA (FILLTYPE) (* ; "Edited 5-May-2021 20:45 by rmk:") (* ;; "While filling the line, the current file pointer is the end of the line. When the line is closed, this is made the eof. *READTABLE* is used for syntactic delimiters and paren counting on READ and RATOM calls but isn't referenced (or bound) for READC") @@ -300,8 +300,10 @@ Copyright (c) 1982-1988, 1990, 2021 by Venue & Xerox Corporation. (\SETFILEPTR \LINEBUF.OFD 0) (replace (LINEBUFFER LINEBUFSTATE) of \LINEBUF.OFD with RETYPING.LBS)) - [until (\PAGEDEOFP \LINEBUF.OFD) - do (\OUTCHAR \TERM.OFD (\NSIN \LINEBUF.OFD (UNFOLD \NORUNCODE 256] + (until (\PAGEDEOFP \LINEBUF.OFD) do (\OUTCHAR \TERM.OFD (\INCHAR + + \LINEBUF.OFD + ))) (replace (LINEBUFFER LINEBUFSTATE) of \LINEBUF.OFD with FILLING.LBS ) @@ -424,13 +426,14 @@ Copyright (c) 1982-1988, 1990, 2021 by Venue & Xerox Corporation. (replace (LINEBUFFER LBRKCOUNT) of \LINEBUF.OFD with ILB) (replace (LINEBUFFER INSTRINGP) of \LINEBUF.OFD with ISP) (replace (LINEBUFFER LPARCOUNT) of \LINEBUF.OFD with ILP)) - [until (\PAGEDEOFP \LINEBUF.OFD) - do (SETQ CHAR (\NSIN \LINEBUF.OFD (UNFOLD \NORUNCODE 256))) - (COND - [(EQ ESCAPE.RC (SETQ RSNX (\SYNCODE RTBLSA CHAR))) - (OR (\PAGEDEOFP \LINEBUF.OFD) - (\NSIN \LINEBUF.OFD (UNFOLD \NORUNCODE 256] - (T (\INCPARENCOUNT RSNX] + [until (\PAGEDEOFP \LINEBUF.OFD) do (SETQ CHAR (\INCHAR \LINEBUF.OFD)) + (COND + ((EQ ESCAPE.RC (SETQ RSNX + (\SYNCODE RTBLSA + CHAR))) + (OR (\PAGEDEOFP \LINEBUF.OFD) + (\INCHAR \LINEBUF.OFD))) + (T (\INCPARENCOUNT RSNX] (replace (LINEBUFFER LINEBUFSTATE) of \LINEBUF.OFD with FILLING.LBS ))) (GO NEXT) @@ -1136,18 +1139,18 @@ Copyright (c) 1982-1988, 1990, 2021 by Venue & Xerox Corporation. ) (PUTPROPS ATERM COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1988 1990 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (2982 31202 (BKLINBUF 2992 . 3467) (CLEARBUF 3469 . 4801) (LINBUF 4803 . 4989) ( -PAGEFULLFN 4991 . 6472) (SETLINELENGTH 6474 . 6670) (SYSBUF 6672 . 6858) (TERMCHARWIDTH 6860 . 7277) ( -TERMINAL-INPUT 7279 . 7847) (TERMINAL-OUTPUT 7849 . 8435) (\CHDEL1 8437 . 8740) (\CLOSELINE 8742 . -9031) (\DECPARENCOUNT 9033 . 10616) (\ECHOCHAR 10618 . 11310) (\FILLBUFFER 11312 . 23532) ( -\FILLBUFFER.WORDSEPRP 23534 . 23779) (\FILLBUFFER.BACKUP 23781 . 23960) (\GETCHAR 23962 . 24351) ( -\INCPARENCOUNT 24353 . 26965) (\RESETLINE 26967 . 27291) (\RESETTERMINAL 27293 . 28057) (\SAVELINEBUF -28059 . 30030) (\STOPSCROLL? 30032 . 31200)) (31413 35269 (\DSCCOUT 31423 . 34563) (\INITBCPLDISPLAY -34565 . 35267)) (35462 36712 (VIDEOCOLOR 35472 . 36710)) (37544 43398 (\PEEKREFILL 37554 . 41665) ( -\READREFILL 41667 . 42261) (\RATOM/RSTRING-REFILL 42263 . 42841) (\READCREFILL 42843 . 43396)) (43399 -45228 (DRIBBLE 43409 . 45010) (DRIBBLEFILE 45012 . 45226)) (45229 51904 (\SETUP.DEFAULT.LINEBUF 45239 - . 47696) (\CREATELINEBUFFER 47698 . 50120) (\LINEBUF.READP 50122 . 50471) (\LINEBUF.EOFP 50473 . -50812) (\LINEBUF.PEEKBIN 50814 . 51021) (\OPENLINEBUF 51023 . 51902)) (51979 53218 (LINEBUFFER-EOFP -51989 . 52447) (LINEBUFFER-SKIPSEPRS 52449 . 53216)) (53575 53849 (\INTERMP 53585 . 53716) (\OUTTERMP -53718 . 53847))))) + (FILEMAP (NIL (2974 31665 (BKLINBUF 2984 . 3459) (CLEARBUF 3461 . 4793) (LINBUF 4795 . 4981) ( +PAGEFULLFN 4983 . 6464) (SETLINELENGTH 6466 . 6662) (SYSBUF 6664 . 6850) (TERMCHARWIDTH 6852 . 7269) ( +TERMINAL-INPUT 7271 . 7839) (TERMINAL-OUTPUT 7841 . 8427) (\CHDEL1 8429 . 8698) (\CLOSELINE 8700 . +8989) (\DECPARENCOUNT 8991 . 10574) (\ECHOCHAR 10576 . 11268) (\FILLBUFFER 11270 . 23995) ( +\FILLBUFFER.WORDSEPRP 23997 . 24242) (\FILLBUFFER.BACKUP 24244 . 24423) (\GETCHAR 24425 . 24814) ( +\INCPARENCOUNT 24816 . 27428) (\RESETLINE 27430 . 27754) (\RESETTERMINAL 27756 . 28520) (\SAVELINEBUF +28522 . 30493) (\STOPSCROLL? 30495 . 31663)) (31876 35732 (\DSCCOUT 31886 . 35026) (\INITBCPLDISPLAY +35028 . 35730)) (35925 37175 (VIDEOCOLOR 35935 . 37173)) (38007 43861 (\PEEKREFILL 38017 . 42128) ( +\READREFILL 42130 . 42724) (\RATOM/RSTRING-REFILL 42726 . 43304) (\READCREFILL 43306 . 43859)) (43862 +45691 (DRIBBLE 43872 . 45473) (DRIBBLEFILE 45475 . 45689)) (45692 52367 (\SETUP.DEFAULT.LINEBUF 45702 + . 48159) (\CREATELINEBUFFER 48161 . 50583) (\LINEBUF.READP 50585 . 50934) (\LINEBUF.EOFP 50936 . +51275) (\LINEBUF.PEEKBIN 51277 . 51484) (\OPENLINEBUF 51486 . 52365)) (52442 53681 (LINEBUFFER-EOFP +52452 . 52910) (LINEBUFFER-SKIPSEPRS 52912 . 53679)) (54038 54312 (\INTERMP 54048 . 54179) (\OUTTERMP +54181 . 54310))))) STOP diff --git a/sources/ATERM.LCOM b/sources/ATERM.LCOM index 85501f9b9..f3f85f1bb 100644 Binary files a/sources/ATERM.LCOM and b/sources/ATERM.LCOM differ diff --git a/sources/BOOTSTRAP b/sources/BOOTSTRAP index 456c2e220..5f2e1a4e1 100644 --- a/sources/BOOTSTRAP +++ b/sources/BOOTSTRAP @@ -1,23 +1,25 @@ -(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED " 2-Nov-92 04:15:40" "{Pele:mv:envos}Sources>BOOTSTRAP.;4" 40191 +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS) +(FILECREATED " 9-Jul-2021 15:32:36"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>BOOTSTRAP.;20 40815 - changes to%: (FNS MOVD) + changes to%: (FNS \LOAD-STREAM \DO-DEFINE-FILE-INFO) - previous date%: "22-May-92 12:00:44" "{Pele:mv:envos}Sources>BOOTSTRAP.;3") + previous date%: " 9-Jul-2021 14:02:39" +{DSK}kaplan>Local>medley3.5>git-medley>sources>BOOTSTRAP.;18) (* ; " -Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1983-1990, 1992, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT BOOTSTRAPCOMS) (RPAQQ BOOTSTRAPCOMS - [(COMS (* ; "Some basic fns. Note that several are redefined later. E.g., RPAQQ et al real definitions are on UNDO") + [(COMS (* ; "Some basic fns. Note that several are redefined later. E.g., RPAQQ et al real definitions are on UNDO") (FNS GETPROP SETATOMVAL RPAQQ RPAQ RPAQ? MOVD MOVD? SELECTQ SELECTQ1 NCONC1 PUTPROP PROPNAMES ADDPROP REMPROP MEMB CLOSEF?)) - (COMS (* ; - "Need these in order to load even compiled files SYSLOAD") + (COMS (* ; + "Need these in order to load even compiled files SYSLOAD") (FNS LOAD \LOAD-STREAM FILECREATED FILECREATED1 PRETTYCOMPRINT BOOTSTRAP-NAMEFIELD PUTPROPS DECLARE%: DECLARE%:1 ROOTFILENAME DEFINE-FILE-INFO \DO-DEFINE-FILE-INFO)) (INITVARS (EOLCHARCODE (CHCON1 " @@ -70,7 +72,7 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992 by Venue & Xe (AND (CCODEP 'BOOTSTRAP-NAMEFIELD) (PUTD 'BOOTSTRAP-NAMEFIELD] (P (RADIX 10))) - (DECLARE%: DOEVAL@COMPILE DONTCOPY (* ; "eventually imported from FASL") + (DECLARE%: DOEVAL@COMPILE DONTCOPY (* ; "eventually imported from FASL") (CONSTANTS FASL:SIGNATURE)) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA DEFINE-FILE-INFO DECLARE%: PUTPROPS FILECREATED SELECTQ) @@ -362,16 +364,16 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992 by Venue & Xe (\LOAD-STREAM [LAMBDA (STREAM LDFLG PRINTFLG LOAD-VERBOSE-STREAM PACKAGE) - (DECLARE (SPECVARS LDFLG PRINTFLG LOAD-VERBOSE-STREAM)) - (* ; "Edited 29-Jan-88 19:02 by jop") + (DECLARE (SPECVARS LDFLG PRINTFLG LOAD-VERBOSE-STREAM)) + (* ; "Edited 9-Jul-2021 15:30 by rmk:") -(* ;;; "Internal function that loads from an already open stream. LOAD-VERBOSE-STREAM if non-nil is the stream to which to print %"file created%" messages and such. Similarly, PRINTFLG, if non-nil, is the stream to which to print the value of each expression.") +(* ;;; "Internal function that loads from an already open stream. LOAD-VERBOSE-STREAM if non-nil is the stream to which to print %"file created%" messages and such. Similarly, PRINTFLG, if non-nil, is the stream to which to print the value of each expression.") (PROG ((*STANDARD-INPUT* STREAM) (FILE (FULLNAME STREAM)) (*PACKAGE* *PACKAGE*) - (*READTABLE* (PROG1 FILERDTBL (* ; "This initial value important for SKIPSEPRCODES below, but *READTABLE* gets reset appropriately before anything else is read") -)) + (*READTABLE* (PROG1 FILERDTBL (* ; "This initial value important for SKIPSEPRCODES below, but *READTABLE* gets reset appropriately before anything else is read") + )) (DFNFLG DFNFLG) (BUILDMAPFLG BUILDMAPFLG) (FILEPKGFLG FILEPKGFLG) @@ -386,13 +388,11 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992 by Venue & Xe (if (AND LOAD-VERBOSE-STREAM FILE) then (LISPXTERPRI LOAD-VERBOSE-STREAM) (if (NEQ LOAD-VERBOSE-STREAM T) - then (* ; - "CL:LOAD says to prefix this stuff with comment marker") - + then (* ; + "CL:LOAD says to prefix this stuff with comment marker") (PRIN1 "; Loading " LOAD-VERBOSE-STREAM)) - (* ; - "Might use EXEC-FORMAT here except that it isn't defined early in loadup") - + (* ; + "Might use EXEC-FORMAT here except that it isn't defined early in loadup") (LISPXPRIN1 FILE LOAD-VERBOSE-STREAM) (LISPXTERPRI LOAD-VERBOSE-STREAM)) (if (EQ (SETQ DFNFLG LDFLG) @@ -403,9 +403,8 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992 by Venue & Xe (SETQ FILEPKGFLG NIL) (SETQ LISPXHIST NIL)) (if LISPXHIST - then (* ; - "Want UNDOSAVE to keep saving regardless of how many undosaves are involved") - + then (* ; + "Want UNDOSAVE to keep saving regardless of how many undosaves are involved") (if (SETQ LOADA (FMEMB 'SIDE LISPXHIST)) then (FRPLACA (CADR LOADA) -1) @@ -413,22 +412,21 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992 by Venue & Xe NIL LISPXHIST))) (if (EQ (SETQ TEM (SKIPSEPRCODES STREAM)) FASL:SIGNATURE) - then (* ; - "FASL file handled by FASL loader") - + then (* ; + "FASL file handled by FASL loader") (FASL:PROCESS-FILE STREAM) [LET [(MANAGED-FILE-P (GET (SETQ ROOTNAME (ROOTFILENAME FILE T)) 'FILEDATES] (if (NOT (MEMB FILE LOADEDFILELST)) - then (* ; - "Keep track of every file loaded.") - + then (* ; + "Keep track of every file loaded.") (SETQ LOADEDFILELST (CONS FILE LOADEDFILELST))) (if MANAGED-FILE-P then (if (EQ LDFLG 'SYSLOAD) then - (* ;; - "Don't notice DFASL's when you are coming from CL:LOAD, and the user didn't specify a load flag") + + (* ;; + "Don't notice DFASL's when you are coming from CL:LOAD, and the user didn't specify a load flag") (if (NOT (MEMB ROOTNAME SYSFILES)) then (SETQ SYSFILES (NCONC1 SYSFILES @@ -441,144 +439,127 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992 by Venue & Xe then (RETURN (\CML-LOAD STREAM PRINTFLG LOAD-VERBOSE-STREAM PACKAGE))) (if (AND BUILDMAPFLG (RANDACCESSP STREAM)) then (SETQ MAYBEWANTFILEMAP T)) - (WITH-READER-ENVIRONMENT - FILECREATEDENV - (PROG (ADR) - LP (if FILEMAP - then (* ; - "need to build map, so read carefully") - - (SETQ LOADA (SKIPSEPRCODES STREAM)) - (if (OR (SYNTAXP LOADA 'LEFTPAREN) - (SYNTAXP LOADA 'LEFTBRACKET)) - then (* ; "See if we have a DEFINEQ") - - (SETQ ADR (GETFILEPTR STREAM)) - (READCCODE STREAM) (* ; "Eat paren") - - (if (EQ (RATOM STREAM) - 'DEFINEQ) - then (SETQ FNADRLST (TCONC NIL ADR)) - (TCONC FNADRLST NIL) - (TCONC FILEMAP (CAR FNADRLST)) - (GO DEFQLP)) (* ; "Not a DEFINEQ, so back out") - - (SETFILEPTR STREAM ADR))) - (SELECTQ (SETQ LOADA (READ STREAM)) - ((STOP NIL) - (if (EQ LDFLG 'SYSLOAD) - then (if (NOT (MEMB (SETQ ROOTNAME (ROOTFILENAME - FILE - (CDR FILECREATEDLST - ))) - SYSFILES)) - then (SETQ SYSFILES (NCONC1 SYSFILES ROOTNAME) - )) - (SMASHFILECOMS ROOTNAME) - elseif FILEPKGFLG - then - (* ;; "Do not want any items that are added to FILEPKGCHANGES as a result of being mentioned in this file to remain on FILEPKGCHANGES. Also, we want items mentioned earlier to be deleted if they are taken care of by this file. The extra argument to ADDFILE allows it to restore FILEPKGCHANGES to the intersection of its current value and its previous value.") - - (ADDFILE FILE T PRLST FILECREATEDLST)) - [if FILEMAP - then (PUTFILEMAP FILE (CAR FILEMAP) - FILECREATEDLST FILECREATEDENV NIL FILECREATEDLOC) - (if UPDATEMAPFLG - then (SETFILEPTR STREAM ADR) - (* ; - "address of last expression read. good hint for finding filemap") - - (UPDATEFILEMAP STREAM (CAR FILEMAP] - (if (NOT (MEMB FILE LOADEDFILELST)) - then (/SETTOPVAL 'LOADEDFILELST (CONS FILE LOADEDFILELST))) - (RETURN)) - NIL) - [if (LISTP LOADA) - then - (SELECTQ (CAR LOADA) - (DEFINE-FILE-INFO (* ; - "Handle this specially, since we want to remember the environment") - - (SETQ FILECREATEDLOC (GETFILEPTR STREAM)) - [SET-READER-ENVIRONMENT (SETQ LOADA - (SETQ FILECREATEDENV - (\DO-DEFINE-FILE-INFO - NIL - (CDR LOADA] - (if PACKAGE - then (* ; - "Caller better really mean it--overrides what's on file!") - - [replace REPACKAGE of FILECREATEDENV - with (SETQ *PACKAGE* - (\DTEST PACKAGE 'PACKAGE] - (LISTPUT (fetch RESPEC of + (WITH-READER-ENVIRONMENT FILECREATEDENV + (PROG (ADR) + LP (if FILEMAP + then (* ; + "need to build map, so read carefully") + (SETQ LOADA (SKIPSEPRCODES STREAM)) + (if (OR (SYNTAXP LOADA 'LEFTPAREN) + (SYNTAXP LOADA 'LEFTBRACKET)) + then (* ; "See if we have a DEFINEQ") + (SETQ ADR (GETFILEPTR STREAM)) + (READCCODE STREAM) (* ; "Eat paren") + (if (EQ (RATOM STREAM) + 'DEFINEQ) + then (SETQ FNADRLST (TCONC NIL ADR)) + (TCONC FNADRLST NIL) + (TCONC FILEMAP (CAR FNADRLST)) + (GO DEFQLP)) + (* ; "Not a DEFINEQ, so back out") + (SETFILEPTR STREAM ADR))) + (SELECTQ (SETQ LOADA (READ STREAM)) + ((STOP NIL) + (if (EQ LDFLG 'SYSLOAD) + then (if (NOT (MEMB (SETQ ROOTNAME + (ROOTFILENAME FILE + (CDR FILECREATEDLST))) + SYSFILES)) + then (SETQ SYSFILES (NCONC1 SYSFILES + ROOTNAME))) + (SMASHFILECOMS ROOTNAME) + elseif FILEPKGFLG + then + + (* ;; "Do not want any items that are added to FILEPKGCHANGES as a result of being mentioned in this file to remain on FILEPKGCHANGES. Also, we want items mentioned earlier to be deleted if they are taken care of by this file. The extra argument to ADDFILE allows it to restore FILEPKGCHANGES to the intersection of its current value and its previous value.") + + (ADDFILE FILE T PRLST FILECREATEDLST)) + [if FILEMAP + then (PUTFILEMAP FILE (CAR FILEMAP) + FILECREATEDLST FILECREATEDENV NIL FILECREATEDLOC + ) + (if UPDATEMAPFLG + then (SETFILEPTR STREAM ADR) + (* ; + "address of last expression read. good hint for finding filemap") + (UPDATEFILEMAP STREAM (CAR FILEMAP] + (if (NOT (MEMB FILE LOADEDFILELST)) + then (/SETTOPVAL 'LOADEDFILELST (CONS FILE LOADEDFILELST))) + (RETURN)) + NIL) + [if (LISTP LOADA) + then + (SELECTQ (CAR LOADA) + (DEFINE-FILE-INFO (* ; + "Handle this specially, since we want to remember the environment") + (SETQ FILECREATEDLOC (GETFILEPTR STREAM)) + (SET-READER-ENVIRONMENT [SETQ LOADA + (SETQ FILECREATEDENV + (\DO-DEFINE-FILE-INFO + STREAM + (CDR LOADA] + STREAM) + [if PACKAGE + then (* ; + "Caller better really mean it--overrides what's on file!") + (replace REPACKAGE of FILECREATEDENV - ) - :PACKAGE - (CL:PACKAGE-NAME *PACKAGE*)))) - (FILECREATED (if MAYBEWANTFILEMAP - then (* ; "See if we have a valid file map") - - (SETQ ADR (GETFILEPTR STREAM)) - (if [AND (FIXP (SETQ TEM (CADDDR LOADA))) - [SETQ TEM - (CAR (NLSETQ (SETFILEPTR STREAM TEM) - (READ STREAM] - (EQ (CAR TEM) - 'FILEMAP) - (NULL (CAR (SETQ TEM (CADR TEM] - then - (* ; "Has ok map") - - (PUTFILEMAP FILE TEM NIL FILECREATEDENV) - else (* ; - "Need to build a file map as we go") - - (SETQ FILEMAP (TCONC NIL NIL))) - (SETFILEPTR STREAM ADR) - (SETQ MAYBEWANTFILEMAP NIL)) - (SETQ LOADA (\EVAL LOADA))) - (SETQ LOADA (\EVAL LOADA))) - else (* ; - "Atom found. Compiled code definition.") - - (if ADDSPELLFLG - then (ADDSPELL LOADA)) - (if FILEMAP - then (SETQ ADR (GETFILEPTR STREAM))) - (LAPRD LOADA) - (if FILEMAP - then (TCONC FILEMAP (CONS ADR (CONS (GETFILEPTR STREAM) - LOADA] - LP1 (if PRINTFLG - then (PRINT LOADA PRINTFLG)) - (GO LP) - DEFQLP - (SELCHARQ (SKIPSEPRCODES STREAM) - ((%) %]) (* ; "Closes DEFINEQ.") - - (READCCODE STREAM) - (if FNADRLST - then (RPLACA (CDAR FNADRLST) - (GETFILEPTR STREAM))) - (* ; - "FNADRLST is a TCONC format list, hence want to RPLACA CDAR, not just CDR.") - - (SETQ LOADA (DEFINE (DREVERSE LOADA))) - (GO LP1)) - ((%( %[) (* ; - "another function/definition pair") - - (SETQ ADR (GETFILEPTR STREAM)) - (SETQ LOADA (CONS (READ STREAM) - LOADA)) - [if FNADRLST - then (TCONC FNADRLST (CONS (CAAR LOADA) - (CONS ADR (GETFILEPTR STREAM] - (GO DEFQLP)) - NIL) - (ERROR "illegal argument in defineq"))) + with (SETQ *PACKAGE* + (\DTEST PACKAGE 'PACKAGE]) + (FILECREATED (if MAYBEWANTFILEMAP + then (* ; "See if we have a valid file map") + (SETQ ADR (GETFILEPTR STREAM)) + (if [AND (FIXP (SETQ TEM (CADDDR LOADA))) + [SETQ TEM (CAR (NLSETQ (SETFILEPTR STREAM + TEM) + (READ STREAM] + (EQ (CAR TEM) + 'FILEMAP) + (NULL (CAR (SETQ TEM (CADR TEM] + then (* ; "Has ok map") + (PUTFILEMAP FILE TEM NIL FILECREATEDENV) + else (* ; + "Need to build a file map as we go") + (SETQ FILEMAP (TCONC NIL NIL))) + (SETFILEPTR STREAM ADR) + (SETQ MAYBEWANTFILEMAP NIL)) + (SETQ LOADA (\EVAL LOADA))) + (SETQ LOADA (\EVAL LOADA))) + else (* ; + "Atom found. Compiled code definition.") + (if ADDSPELLFLG + then (ADDSPELL LOADA)) + (if FILEMAP + then (SETQ ADR (GETFILEPTR STREAM))) + (LAPRD LOADA) + (if FILEMAP + then (TCONC FILEMAP (CONS ADR (CONS (GETFILEPTR STREAM) + LOADA] + LP1 (if PRINTFLG + then (PRINT LOADA PRINTFLG)) + (GO LP) + DEFQLP + (SELCHARQ (SKIPSEPRCODES STREAM) + ((%) %]) (* ; "Closes DEFINEQ.") + (READCCODE STREAM) + (if FNADRLST + then (RPLACA (CDAR FNADRLST) + (GETFILEPTR STREAM))) + (* ; + "FNADRLST is a TCONC format list, hence want to RPLACA CDAR, not just CDR.") + (SETQ LOADA (DEFINE (DREVERSE LOADA))) + (GO LP1)) + ((%( %[) (* ; + "another function/definition pair") + (SETQ ADR (GETFILEPTR STREAM)) + (SETQ LOADA (CONS (READ STREAM) + LOADA)) + [if FNADRLST + then (TCONC FNADRLST (CONS (CAAR LOADA) + (CONS ADR (GETFILEPTR STREAM] + (GO DEFQLP)) + NIL) + (ERROR "illegal argument in defineq"))) (RETURN FILE]) (FILECREATED @@ -725,10 +706,11 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992 by Venue & Xe (SET-READER-ENVIRONMENT (\DO-DEFINE-FILE-INFO NIL ARGS]) (\DO-DEFINE-FILE-INFO - [LAMBDA (STREAM ARGS) (* bvm%: "14-Oct-86 00:28") -(* ;;; "Processes the (DEFINE-FILE-INFO . ARGS) at the front of STREAM") + [LAMBDA (STREAM ARGS) (* ; "Edited 9-Jul-2021 15:32 by rmk:") + +(* ;;; "Processes the (DEFINE-FILE-INFO . ARGS) at the front of STREAM. This converts the ARGS list to a READER-ENVIRONMENT, and also imposes the external format on STREAM, if non-NIL.") - (LET (PACKAGE READTABLE BASE VALUE) + (LET (PACKAGE READTABLE BASE FORMAT VALUE) [for TAIL on ARGS by (CDDR TAIL) do (SETQ VALUE (CADR TAIL)) (SELECTQ (CAR TAIL) @@ -745,18 +727,26 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992 by Venue & Xe 'READTABLEP) else (FIND-READTABLE VALUE)) (ERROR - "Can't find read table for reader environment" + "Can't find read table for reader environment" VALUE)))) (:BASE (SETQ BASE (OR (\CHECKRADIX (if (LISTP VALUE) then (EVAL VALUE) else VALUE)) (ERROR "Bad read base for reader environment" VALUE)))) + ((:FORMAT FORMAT) + (SETQ FORMAT (FETCH (EXTERNALFORMAT NAME) OF (FIND-FORMAT + VALUE)))) (ERROR "Unrecognized file info key" (CAR TAIL] + + (* ;; "Set the defaults. Is this essentially ignoring the *DEFAULT-MAKEFILE-ENVIRONMENT*? Maybe the defaults should be take from there?") + + (CL:UNLESS FORMAT (SETQ FORMAT :XCCS)) + (CL:WHEN STREAM (\EXTERNALFORMAT STREAM FORMAT)) (create READER-ENVIRONMENT REPACKAGE _ (OR PACKAGE *INTERLISP-PACKAGE*) REREADTABLE _ (OR READTABLE FILERDTBL) REBASE _ (OR BASE 10) - RESPEC _ ARGS]) + REFORMAT _ FORMAT]) ) (RPAQ? EOLCHARCODE (CHCON1 " @@ -857,14 +847,14 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992 by Venue & Xe (ADDTOVAR LAMA ) ) (PUTPROPS BOOTSTRAP COPYRIGHT ("Venue & Xerox Corporation" 1983 1984 1985 1986 1987 1988 1989 1990 -1992)) +1992 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (4429 14101 (GETPROP 4439 . 5011) (SETATOMVAL 5013 . 5142) (RPAQQ 5144 . 5197) (RPAQ -5199 . 5511) (RPAQ? 5513 . 5883) (MOVD 5885 . 7749) (MOVD? 7751 . 8181) (SELECTQ 8183 . 8370) ( -SELECTQ1 8372 . 8714) (NCONC1 8716 . 8912) (PUTPROP 8914 . 10398) (PROPNAMES 10400 . 10591) (ADDPROP -10593 . 12656) (REMPROP 12658 . 13512) (MEMB 13514 . 13773) (CLOSEF? 13775 . 14099)) (14174 38092 ( -LOAD 14184 . 15353) (\LOAD-STREAM 15355 . 29131) (FILECREATED 29133 . 30551) (FILECREATED1 30553 . -31661) (PRETTYCOMPRINT 31663 . 32148) (BOOTSTRAP-NAMEFIELD 32150 . 33110) (PUTPROPS 33112 . 33480) ( -DECLARE%: 33482 . 33614) (DECLARE%:1 33616 . 34488) (ROOTFILENAME 34490 . 35438) (DEFINE-FILE-INFO -35440 . 35875) (\DO-DEFINE-FILE-INFO 35877 . 38090))))) + (FILEMAP (NIL (4465 14137 (GETPROP 4475 . 5047) (SETATOMVAL 5049 . 5178) (RPAQQ 5180 . 5233) (RPAQ +5235 . 5547) (RPAQ? 5549 . 5919) (MOVD 5921 . 7785) (MOVD? 7787 . 8217) (SELECTQ 8219 . 8406) ( +SELECTQ1 8408 . 8750) (NCONC1 8752 . 8948) (PUTPROP 8950 . 10434) (PROPNAMES 10436 . 10627) (ADDPROP +10629 . 12692) (REMPROP 12694 . 13548) (MEMB 13550 . 13809) (CLOSEF? 13811 . 14135)) (14210 38711 ( +LOAD 14220 . 15389) (\LOAD-STREAM 15391 . 29116) (FILECREATED 29118 . 30536) (FILECREATED1 30538 . +31646) (PRETTYCOMPRINT 31648 . 32133) (BOOTSTRAP-NAMEFIELD 32135 . 33095) (PUTPROPS 33097 . 33465) ( +DECLARE%: 33467 . 33599) (DECLARE%:1 33601 . 34473) (ROOTFILENAME 34475 . 35423) (DEFINE-FILE-INFO +35425 . 35860) (\DO-DEFINE-FILE-INFO 35862 . 38709))))) STOP diff --git a/sources/BOOTSTRAP.LCOM b/sources/BOOTSTRAP.LCOM index 7430c3496..b379a3011 100644 Binary files a/sources/BOOTSTRAP.LCOM and b/sources/BOOTSTRAP.LCOM differ diff --git a/sources/BYTECOMPILER b/sources/BYTECOMPILER index a97c9735e..cfa8d5622 100644 --- a/sources/BYTECOMPILER +++ b/sources/BYTECOMPILER @@ -1,13 +1,15 @@ (DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED "26-Apr-91 17:25:53" |{PELE:MV:ENVOS}LIBRARY>BYTECOMPILER.;1| 264022 +(FILECREATED "13-Jun-2021 09:51:42"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>BYTECOMPILER.;2 263891 - changes to%: (FNS COMP.EXPR) + changes to%: (FNS COMP.MLLIST) - previous date%: "17-Jul-90 11:28:59" |{PELE:MV:ENVOS}SOURCES>BYTECOMPILER.;8|) + previous date%: "26-Apr-91 17:25:53" +{DSK}kaplan>Local>medley3.5>git-medley>sources>BYTECOMPILER.;1) (* ; " -Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, 1991 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1981-1987, 1900, 1988-1991, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT BYTECOMPILERCOMS) @@ -15,7 +17,7 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, (RPAQQ BYTECOMPILERCOMS [ -(* ;;; "THE BYTE LISP COMPILER") +(* ;;; "THE BYTE LISP COMPILER") (COMS (INITVARS (*BYTECOMPILER-IS-EXPANDING* NIL)) (FNS BYTEBLOCKCOMPILE2 BYTECOMPILE2 COMP.ATTEMPT.COMPILE COMP.RETFROM.POINT @@ -86,17 +88,17 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, (PROP BYTEMACRO SUB1VAR) (OPTIMIZERS EQMEMB MKLIST) (COMS - (* ;; "Pass 1 listing") + (* ;; "Pass 1 listing") (FNS COMP.MLLIST COMP.MLL COMP.MLLVAR COMP.MLLFN) (VARS COPS) (IFPROP MLSYM * (PROGN COPS))) (COMS - (* ;; "ARJ --- JUMP LENGTH RESOLVER") + (* ;; "ARJ --- JUMP LENGTH RESOLVER") (FNS OPT.RESOLVEJUMPS OPT.JLENPASS OPT.JFIXPASS OPT.JSIZE)) (COMS - (* ;; "Utilities used by all files") + (* ;; "Utilities used by all files") (FNS OPT.CALLP OPT.JUMPCHECK OPT.DREV OPT.CHLEV OPT.CHECKTAG OPT.NOTJUMP OPT.INITHASH OPT.COMPINIT)) @@ -118,7 +120,7 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, (FNS COMP.AREF COMP.ASET COMP.BOX COMP.LOOKFORDECLARE COMP.DECLARETYPE COMP.FLOATBOX COMP.FLOATUNBOX COMP.PREDP COMP.UBFLOAT2 COMP.UNBOX)) (ADDVARS (COMPILETYPELST)) - (COMS (* ; "POST OPTIMIZATION") + (COMS (* ; "POST OPTIMIZATION") (FNS OPT.POSTOPT OPT.SETUPOPT OPT.SCANOPT OPT.XVARSCAN OPT.XVARSCAN1 OPT.JUMPOPT OPT.JUMPTHRU OPT.LBMERGE OPT.PRDEL OPT.UBDEL OPT.LBDEL OPT.LABELNTHPR OPT.JUMPREV OPT.COMMONBACK OPT.DELTAGREF OPT.FINDEND OPT.RETOPT OPT.RETFIND OPT.RETPOP @@ -144,7 +146,7 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, (SPECVARS FRAME LEVEL ANY) (SPECVARS FRAME LEVEL ANY) (SPECVARS TAGS ANY))) - (COMS (* ; "CONSISTENCY CHECKS") + (COMS (* ; "CONSISTENCY CHECKS") (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS OPT.CCHECK) (VARS (COMPILECOMPILERCHECKS NIL))) (FNS OPT.COMPILERERROR OPT.OPTCHECK OPT.CCHECK)) @@ -157,7 +159,7 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, STATN SYSSPECVARS UNIQUE#ARRAY VCA VCONDITIONALS VREFFRA COUTFILE XVARFLG MERGEFRAMEFLG OPTIMIZATIONSOFF NOFREEVARSFNS EQCONSTFN NEWOPTFLG) [P (CL:PROCLAIM '(CL:SPECIAL COMPVARMACROHASH] - (DECLARE%: DONTCOPY (* ; "for compiling compiler") + (DECLARE%: DONTCOPY (* ; "for compiling compiler") EVAL@COMPILE (RECORDS CODELST) (PROP MACRO OASSOC) @@ -2836,34 +2838,34 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, (DEFOPTIMIZER KWOTE (&REST ARGS) (CONS '(OPENLAMBDA (Q) - (COND - ((AND Q (NEQ Q T) - (NOT (NUMBERP Q))) - (LIST 'QUOTE Q)) - (T Q))) + (COND + ((AND Q (NEQ Q T) + (NOT (NUMBERP Q))) + (LIST 'QUOTE Q)) + (T Q))) ARGS)) (DEFOPTIMIZER FRPLNODE (&REST ARGS) (CONS '(OPENLAMBDA (X A D) - (FRPLACD (FRPLACA X A) - D)) + (FRPLACD (FRPLACA X A) + D)) ARGS)) (DEFOPTIMIZER RPLNODE (&REST ARGS) (CONS '(OPENLAMBDA (X A D) - (RPLACD (RPLACA X A) - D)) + (RPLACD (RPLACA X A) + D)) ARGS)) (DEFOPTIMIZER LISTGET1 (&REST ARGS) (CONS '(OPENLAMBDA (X Y) - (CADR (MEMB Y X))) + (CADR (MEMB Y X))) ARGS)) (DEFOPTIMIZER FRPLNODE2 (&REST ARGS) (CONS '(OPENLAMBDA (X Y) - (FRPLACD (FRPLACA X (CAR Y)) - (CDR Y))) + (FRPLACD (FRPLACA X (CAR Y)) + (CDR Y))) ARGS)) (PUTPROPS SUB1VAR BYTEMACRO ((X) @@ -2871,16 +2873,16 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, (DEFOPTIMIZER EQMEMB (&REST ARGS) (CONS '(OPENLAMBDA (X Y) - (OR (EQ X Y) - (AND (LISTP Y) - (FMEMB X Y) - T))) + (OR (EQ X Y) + (AND (LISTP Y) + (FMEMB X Y) + T))) ARGS)) (DEFOPTIMIZER MKLIST (&REST ARGS) (CONS '[OPENLAMBDA (X) - (OR (LISTP X) - (AND X (LIST X] + (OR (LISTP X) + (AND X (LIST X] ARGS)) @@ -2890,20 +2892,21 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, (DEFINEQ (COMP.MLLIST - [LAMBDA (FN CC) (* lmm%: "13-NOV-76 06:56:28") - (RESETLST (RESETSAVE (RADIX 10)) - (RESETSAVE (LINELENGTH 72)) - (PRIN2 FN) - (MAPRINT (fetch ARGS of CC) - NIL "(" ")" " " (FUNCTION COMP.MLLVAR)) - (SPACES 5) - [PRINT (CDR (FASSOC (fetch COMTYPE of CC) - '((0 . LAMBDA) - (2 . LAMBDA*) - (1 . NLAMBDA) - (2 . NLAMBDA*) - (NIL . ???] - (COMP.MLL (fetch CODE of CC]) + [LAMBDA (FN CC) (* ; "Edited 13-Jun-2021 09:50 by rmk:") + (RESETLST + (RESETSAVE (RADIX 10)) + (RESETSAVE (LINELENGTH 72)) + (PRIN2 FN) + (MAPRINT (fetch (COMINFO ARGS) of CC) + NIL "(" ")" " " (FUNCTION COMP.MLLVAR)) + (SPACES 5) + [PRINT (CDR (FASSOC (fetch (COMINFO COMTYPE) of CC) + '((0 . LAMBDA) + (2 . LAMBDA*) + (1 . NLAMBDA) + (2 . NLAMBDA*) + (NIL . ???] + (COMP.MLL (fetch (COMINFO CODE) of CC)))]) (COMP.MLL [LAMBDA (LL) (* Pavel "15-Nov-86 16:02") @@ -3261,16 +3264,16 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, ) (PUTPROPS IMAX2 BYTEMACRO (OPENLAMBDA (X Y) - (COND - ((NOT (IGREATERP X Y)) - Y) - (T X)))) + (COND + ((NOT (IGREATERP X Y)) + Y) + (T X)))) (PUTPROPS IMIN2 BYTEMACRO (OPENLAMBDA (X Y) - (COND - ((IGREATERP X Y) - Y) - (T X)))) + (COND + ((IGREATERP X Y) + Y) + (T X)))) (PUTPROPS FLOAT BOX (\FLOATBOX . \FLOATUNBOX)) (DEFINEQ @@ -5223,7 +5226,7 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, (DEFMACRO CL:MACROLET (CL::MACRODEFS &BODY CL::BODY &ENVIRONMENT CL::ENV) (DECLARE (SPECVARS *BYTECOMPILER-IS-EXPANDING*)) - (* ;; "This macro for the old interpreter and compiler only. The new interpreter has a special-form definition. When the new compiler is expanding, we simply return a disguised version of the form.") + (* ;; "This macro for the old interpreter and compiler only. The new interpreter has a special-form definition. When the new compiler is expanding, we simply return a disguised version of the form.") (IF (AND *BYTECOMPILER-IS-EXPANDING* *BYTECOMPILER-OPTIMIZE-MACROLET*) THEN (LET ((CL::NEW-ENV (COMPILER::MAKE-CHILD-ENV CL::ENV))) @@ -5442,17 +5445,17 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, (RECORD OP (OPNAME . OPARG)) -(RECORD JUMP (OPNAME TAG . JT) (* kind of OP) +(RECORD JUMP (OPNAME TAG . JT) (* kind of OP) ) -(TYPERECORD TAG (LBNO . LEVEL) (* kind of OP) +(TYPERECORD TAG (LBNO . LEVEL) (* kind of OP) LBNO _ (SETQ LBCNT (ADD1 LBCNT)) [ACCESSFNS TAG ((FRAME (GETHASH DATUM FRA) (PUTHASH DATUM NEWVALUE FRA)) (JD (GETHASH DATUM LBA) (PUTHASH DATUM NEWVALUE LBA]) -(RECORD VAR (COMP.VARTYPE . VARNAME) (* A particular kind of OP) +(RECORD VAR (COMP.VARTYPE . VARNAME) (* A particular kind of OP) ) ) @@ -5462,9 +5465,9 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, LEVEL (BINDLST NVALS EXTCALL . CPIOK) . PROGLABELS) - (* FRAMETYPE is one of PROG LAMBDA ERRORSET MAP NIL - - VARS are variables bound, NNILS are %# which are bound to NIL - - LEVEL is %# of things on stack between this and next higher frame) + (* FRAMETYPE is one of PROG LAMBDA ERRORSET MAP NIL - + VARS are variables bound, NNILS are %# which are bound to NIL - + LEVEL is %# of things on stack between this and next higher frame) (ACCESSFNS FRAME ((PARENT (GETHASH DATUM FRA) (PUTHASH DATUM NEWVALUE FRA)) @@ -5474,14 +5477,14 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, (PUTHASH DATUM NEWVALUE NODARR)) (PRIMARYRETURN (GETHASH DATUM BCINFO) (PUTHASH DATUM NEWVALUE BCINFO))) - (* PARENT is next higher enclosing - frame - - shares hash table with TAG.FRAME) + (* PARENT is next higher enclosing + frame - + shares hash table with TAG.FRAME) ) (RECORD CPIOK NOXVAR - (* Share the CPIOK field used by the compiler pass 1 and the NOXVAR field used - by the maxc assembler) + (* Share the CPIOK field used by the compiler pass 1 and the NOXVAR field used + by the maxc assembler) ) NNILS _ 0) @@ -5497,12 +5500,12 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, (RECORD JD (JPT (JMIN . JSN) JU . JML) - (* JPT is NIL (for tags) or a pointer into ACODE - (for jumps)%. JMIN is the lowest possible location for the instruction or tag. - JU is the cumulative uncertainty (for tags) or the length uncertainty - (for jumps)%. JML is the minimum length - (for jumps)%. JSN is a serial number (the original JMIN) used to decide whether - a jump goes forward or backward.) + (* JPT is NIL (for tags) or a pointer into ACODE + (for jumps)%. JMIN is the lowest possible location for the instruction or tag. + JU is the cumulative uncertainty (for tags) or the length uncertainty + (for jumps)%. JML is the minimum length + (for jumps)%. JSN is a serial number (the original JMIN) used to decide whether + a jump goes forward or backward.) ) @@ -5530,62 +5533,62 @@ Copyright (c) 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1900, 1988, 1989, 1990, (ADDTOVAR LAMA ) ) (PUTPROPS BYTECOMPILER COPYRIGHT ("Venue & Xerox Corporation" 1981 1982 1983 1984 1985 1986 1987 1900 -1988 1989 1990 1991)) +1988 1989 1990 1991 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (9298 19200 (BYTEBLOCKCOMPILE2 9308 . 11925) (BYTECOMPILE2 11927 . 12166) ( -COMP.ATTEMPT.COMPILE 12168 . 13312) (COMP.RETFROM.POINT 13314 . 14004) (COMP.TRANSFORM 14006 . 17469) -(COMPERROR 17471 . 17830) (COMPPRINT 17832 . 18056) (COMPERRM 18058 . 19198)) (19201 28848 ( -COMP.TOPLEVEL.COMPILE 19211 . 25317) (COMP.BINDLIST 25319 . 25637) (COMP.CHECK.VAR 25639 . 26143) ( -COMP.BIND.VARS 26145 . 28436) (COMP.UNBIND.VARS 28438 . 28846)) (28849 43028 (COMP.VALN 28859 . 28992) - (COMP.PROGN 28994 . 29722) (COMP.PROGLST 29724 . 30622) (COMP.EXP1 30624 . 30772) (COMP.EXPR 30774 . -35500) (COMP.TRYUSERFN 35502 . 35831) (COMP.USERFN 35833 . 36754) (COMP.CONST 36756 . 37817) ( -COMP.CALL 37819 . 39258) (COMP.VAR 39260 . 39739) (COMP.VAL1 39741 . 39874) (COMP.PROG1 39876 . 40304) - (COMP.EFFECT 40306 . 40885) (COMP.VAL 40887 . 41510) (COMP.MACRO 41512 . 43026)) (43029 45232 ( -COMP.VARTYPE 43039 . 43268) (COMP.LOOKUPVAR 43270 . 44742) (COMP.LOOKUPCONST 44744 . 45230)) (45233 -52744 (COMP.ST 45243 . 45746) (COMP.STFN 45748 . 46142) (COMP.STCONST 46144 . 46313) (COMP.STVAR 46315 - . 46451) (COMP.STPOP 46453 . 46616) (COMP.DELFN 46618 . 46856) (COMP.STRETURN 46858 . 47030) ( -COMP.STTAG 47032 . 48002) (COMP.STJUMP 48004 . 50020) (COMP.STSETQ 50022 . 50290) (COMP.STCOPY 50292 - . 50472) (COMP.DELPUSH 50474 . 50638) (COMP.DELPOP 50640 . 50808) (COMP.STBIND 50810 . 52204) ( -COMP.STUNBIND 52206 . 52742)) (57165 60353 (COMP.ARGTYPE 57175 . 58344) (COMP.CLEANEXPP 58346 . 58662) - (COMP.CLEANFNP 58664 . 59078) (COMP.CLEANFNOP 59080 . 59228) (COMP.GLOBALVARP 59230 . 59408) ( -COMP.LINKCALLP 59410 . 59874) (COMP.ANONP 59876 . 60231) (COMP.NOSIDEEFFECTP 60233 . 60351)) (60354 -63601 (COMP.CPI 60364 . 62172) (COMP.CPI1 62174 . 62903) (COMP.PICOUNT 62905 . 63599)) (63645 63846 ( -COMP.EVQ 63655 . 63844)) (63958 66690 (COMP.BOOL 63968 . 66688)) (66691 67219 (COMP.APPLYFNP 66701 . -67217)) (67261 67843 (COMP.AC 67271 . 67467) (COMP.PUNT 67469 . 67841)) (67897 69523 (COMP.FUNCTION -67907 . 68327) (COMP.LAM1 68329 . 69183) (COMP.GENFN 69185 . 69521)) (69733 79689 (COMP.COND 69743 . -72832) (COMP.IF 72834 . 74307) (COMP.SELECTQ 74309 . 79687)) (79876 80406 (COMP.QUOTE 79886 . 80120) ( -COMP.COMMENT 80122 . 80404)) (80458 83446 (COMP.DECLARE 80468 . 82352) (COMP.DECLARE1 82354 . 83444)) -(86362 87269 (COMP.CARCDR 86372 . 87056) (COMP.STCROP 87058 . 87267)) (87357 87696 (COMP.NOT 87367 . -87694)) (87787 88524 (COMP.SETQ 87797 . 88294) (COMP.SETN 88296 . 88522)) (88525 92500 (COMP.LAMBDA -88535 . 92498)) (92749 104633 (COMP.PROG 92759 . 96529) (COMP.GO 96531 . 97549) (COMP.RETURN 97551 . -99228) (COMP.BLOCK 99230 . 100836) (COMP.RETURN-FROM 100838 . 102988) (COMP.TAGBODY 102990 . 104631)) -(104686 107192 (COMP.LABELS 104696 . 107190)) (110639 120378 (COMP.NUMERIC 110649 . 115463) ( -COMP.NUMBERCALL 115465 . 119055) (COMP.FIX 119057 . 119209) (COMP.STFIX 119211 . 119800) (COMP.DELFIX -119802 . 120376)) (120506 122351 (COMP.EQ 120516 . 122349)) (122413 125921 (COMP.NUMBERTEST 122423 . -125919)) (127424 134956 (COMP.MAP 127434 . 134954)) (137329 141510 (COMP.MLLIST 137339 . 138022) ( -COMP.MLL 138024 . 140799) (COMP.MLLVAR 140801 . 141114) (COMP.MLLFN 141116 . 141508)) (142527 148126 ( -OPT.RESOLVEJUMPS 142537 . 143608) (OPT.JLENPASS 143610 . 146975) (OPT.JFIXPASS 146977 . 147680) ( -OPT.JSIZE 147682 . 148124)) (148172 151031 (OPT.CALLP 148182 . 148660) (OPT.JUMPCHECK 148662 . 148878) - (OPT.DREV 148880 . 149079) (OPT.CHLEV 149081 . 149292) (OPT.CHECKTAG 149294 . 149673) (OPT.NOTJUMP -149675 . 150180) (OPT.INITHASH 150182 . 150559) (OPT.COMPINIT 150561 . 151029)) (151225 151996 ( -OPT.CFRPTQ 151235 . 151994)) (153051 159997 (COMP.AREF 153061 . 154152) (COMP.ASET 154154 . 155247) ( -COMP.BOX 155249 . 155899) (COMP.LOOKFORDECLARE 155901 . 156454) (COMP.DECLARETYPE 156456 . 157060) ( -COMP.FLOATBOX 157062 . 157316) (COMP.FLOATUNBOX 157318 . 158288) (COMP.PREDP 158290 . 158493) ( -COMP.UBFLOAT2 158495 . 159062) (COMP.UNBOX 159064 . 159995)) (160064 218417 (OPT.POSTOPT 160074 . -161970) (OPT.SETUPOPT 161972 . 164298) (OPT.SCANOPT 164300 . 173119) (OPT.XVARSCAN 173121 . 174296) ( -OPT.XVARSCAN1 174298 . 174941) (OPT.JUMPOPT 174943 . 175573) (OPT.JUMPTHRU 175575 . 182498) ( -OPT.LBMERGE 182500 . 183138) (OPT.PRDEL 183140 . 183622) (OPT.UBDEL 183624 . 183881) (OPT.LBDEL 183883 - . 184635) (OPT.LABELNTHPR 184637 . 185627) (OPT.JUMPREV 185629 . 198988) (OPT.COMMONBACK 198990 . -201957) (OPT.DELTAGREF 201959 . 202837) (OPT.FINDEND 202839 . 203199) (OPT.RETOPT 203201 . 204639) ( -OPT.RETFIND 204641 . 205116) (OPT.RETPOP 205118 . 207604) (OPT.RETOPT1 207606 . 208001) (OPT.RETTEST -208003 . 211618) (OPT.RETMERGE 211620 . 215060) (OPT.CODELEV 215062 . 217067) (OPT.CODEFRAME 217069 . -217895) (OPT.DEFREFS 217897 . 218136) (OPT.SETDEFREFS 218138 . 218415)) (218418 239190 (OPT.FRAMEOPT -218428 . 219579) (OPT.FRAMEMERGE 219581 . 222713) (OPT.NONILVAR 222715 . 223859) (OPT.MERGEFRAMEP -223861 . 225328) (OPT.FRAMELOCAL 225330 . 226147) (OPT.CLEANFRAME 226149 . 226666) (OPT.FRAMEDEL -226668 . 234584) (OPT.FRAMEVAR 234586 . 238394) (OPT.DELETEFRAMECHECK 238396 . 238993) (OPT.ONLYMEMB -238995 . 239188)) (239272 248086 (OPT.SKIPPUSH 239282 . 241705) (OPT.DELCODE 241707 . 243151) ( -OPT.PRATTACH 243153 . 243626) (OPT.JUMPCOPYTEST 243628 . 244572) (OPT.EQOP 244574 . 245757) ( -OPT.EQVALUE 245759 . 246866) (OPT.DELCOPYFN 246868 . 248084)) (248087 250651 (OPT.DEADSETQP 248097 . -248600) (OPT.DS1 248602 . 250649)) (254317 259058 (OPT.COMPILERERROR 254327 . 254505) (OPT.OPTCHECK -254507 . 258909) (OPT.CCHECK 258911 . 259056))))) + (FILEMAP (NIL (9282 19184 (BYTEBLOCKCOMPILE2 9292 . 11909) (BYTECOMPILE2 11911 . 12150) ( +COMP.ATTEMPT.COMPILE 12152 . 13296) (COMP.RETFROM.POINT 13298 . 13988) (COMP.TRANSFORM 13990 . 17453) +(COMPERROR 17455 . 17814) (COMPPRINT 17816 . 18040) (COMPERRM 18042 . 19182)) (19185 28832 ( +COMP.TOPLEVEL.COMPILE 19195 . 25301) (COMP.BINDLIST 25303 . 25621) (COMP.CHECK.VAR 25623 . 26127) ( +COMP.BIND.VARS 26129 . 28420) (COMP.UNBIND.VARS 28422 . 28830)) (28833 43012 (COMP.VALN 28843 . 28976) + (COMP.PROGN 28978 . 29706) (COMP.PROGLST 29708 . 30606) (COMP.EXP1 30608 . 30756) (COMP.EXPR 30758 . +35484) (COMP.TRYUSERFN 35486 . 35815) (COMP.USERFN 35817 . 36738) (COMP.CONST 36740 . 37801) ( +COMP.CALL 37803 . 39242) (COMP.VAR 39244 . 39723) (COMP.VAL1 39725 . 39858) (COMP.PROG1 39860 . 40288) + (COMP.EFFECT 40290 . 40869) (COMP.VAL 40871 . 41494) (COMP.MACRO 41496 . 43010)) (43013 45216 ( +COMP.VARTYPE 43023 . 43252) (COMP.LOOKUPVAR 43254 . 44726) (COMP.LOOKUPCONST 44728 . 45214)) (45217 +52728 (COMP.ST 45227 . 45730) (COMP.STFN 45732 . 46126) (COMP.STCONST 46128 . 46297) (COMP.STVAR 46299 + . 46435) (COMP.STPOP 46437 . 46600) (COMP.DELFN 46602 . 46840) (COMP.STRETURN 46842 . 47014) ( +COMP.STTAG 47016 . 47986) (COMP.STJUMP 47988 . 50004) (COMP.STSETQ 50006 . 50274) (COMP.STCOPY 50276 + . 50456) (COMP.DELPUSH 50458 . 50622) (COMP.DELPOP 50624 . 50792) (COMP.STBIND 50794 . 52188) ( +COMP.STUNBIND 52190 . 52726)) (57149 60337 (COMP.ARGTYPE 57159 . 58328) (COMP.CLEANEXPP 58330 . 58646) + (COMP.CLEANFNP 58648 . 59062) (COMP.CLEANFNOP 59064 . 59212) (COMP.GLOBALVARP 59214 . 59392) ( +COMP.LINKCALLP 59394 . 59858) (COMP.ANONP 59860 . 60215) (COMP.NOSIDEEFFECTP 60217 . 60335)) (60338 +63585 (COMP.CPI 60348 . 62156) (COMP.CPI1 62158 . 62887) (COMP.PICOUNT 62889 . 63583)) (63629 63830 ( +COMP.EVQ 63639 . 63828)) (63942 66674 (COMP.BOOL 63952 . 66672)) (66675 67203 (COMP.APPLYFNP 66685 . +67201)) (67245 67827 (COMP.AC 67255 . 67451) (COMP.PUNT 67453 . 67825)) (67881 69507 (COMP.FUNCTION +67891 . 68311) (COMP.LAM1 68313 . 69167) (COMP.GENFN 69169 . 69505)) (69717 79673 (COMP.COND 69727 . +72816) (COMP.IF 72818 . 74291) (COMP.SELECTQ 74293 . 79671)) (79860 80390 (COMP.QUOTE 79870 . 80104) ( +COMP.COMMENT 80106 . 80388)) (80442 83430 (COMP.DECLARE 80452 . 82336) (COMP.DECLARE1 82338 . 83428)) +(86346 87253 (COMP.CARCDR 86356 . 87040) (COMP.STCROP 87042 . 87251)) (87341 87680 (COMP.NOT 87351 . +87678)) (87771 88508 (COMP.SETQ 87781 . 88278) (COMP.SETN 88280 . 88506)) (88509 92484 (COMP.LAMBDA +88519 . 92482)) (92733 104617 (COMP.PROG 92743 . 96513) (COMP.GO 96515 . 97533) (COMP.RETURN 97535 . +99212) (COMP.BLOCK 99214 . 100820) (COMP.RETURN-FROM 100822 . 102972) (COMP.TAGBODY 102974 . 104615)) +(104670 107176 (COMP.LABELS 104680 . 107174)) (110623 120362 (COMP.NUMERIC 110633 . 115447) ( +COMP.NUMBERCALL 115449 . 119039) (COMP.FIX 119041 . 119193) (COMP.STFIX 119195 . 119784) (COMP.DELFIX +119786 . 120360)) (120490 122335 (COMP.EQ 120500 . 122333)) (122397 125905 (COMP.NUMBERTEST 122407 . +125903)) (127408 134940 (COMP.MAP 127418 . 134938)) (137223 141414 (COMP.MLLIST 137233 . 137926) ( +COMP.MLL 137928 . 140703) (COMP.MLLVAR 140705 . 141018) (COMP.MLLFN 141020 . 141412)) (142431 148030 ( +OPT.RESOLVEJUMPS 142441 . 143512) (OPT.JLENPASS 143514 . 146879) (OPT.JFIXPASS 146881 . 147584) ( +OPT.JSIZE 147586 . 148028)) (148076 150935 (OPT.CALLP 148086 . 148564) (OPT.JUMPCHECK 148566 . 148782) + (OPT.DREV 148784 . 148983) (OPT.CHLEV 148985 . 149196) (OPT.CHECKTAG 149198 . 149577) (OPT.NOTJUMP +149579 . 150084) (OPT.INITHASH 150086 . 150463) (OPT.COMPINIT 150465 . 150933)) (151129 151900 ( +OPT.CFRPTQ 151139 . 151898)) (152915 159861 (COMP.AREF 152925 . 154016) (COMP.ASET 154018 . 155111) ( +COMP.BOX 155113 . 155763) (COMP.LOOKFORDECLARE 155765 . 156318) (COMP.DECLARETYPE 156320 . 156924) ( +COMP.FLOATBOX 156926 . 157180) (COMP.FLOATUNBOX 157182 . 158152) (COMP.PREDP 158154 . 158357) ( +COMP.UBFLOAT2 158359 . 158926) (COMP.UNBOX 158928 . 159859)) (159928 218281 (OPT.POSTOPT 159938 . +161834) (OPT.SETUPOPT 161836 . 164162) (OPT.SCANOPT 164164 . 172983) (OPT.XVARSCAN 172985 . 174160) ( +OPT.XVARSCAN1 174162 . 174805) (OPT.JUMPOPT 174807 . 175437) (OPT.JUMPTHRU 175439 . 182362) ( +OPT.LBMERGE 182364 . 183002) (OPT.PRDEL 183004 . 183486) (OPT.UBDEL 183488 . 183745) (OPT.LBDEL 183747 + . 184499) (OPT.LABELNTHPR 184501 . 185491) (OPT.JUMPREV 185493 . 198852) (OPT.COMMONBACK 198854 . +201821) (OPT.DELTAGREF 201823 . 202701) (OPT.FINDEND 202703 . 203063) (OPT.RETOPT 203065 . 204503) ( +OPT.RETFIND 204505 . 204980) (OPT.RETPOP 204982 . 207468) (OPT.RETOPT1 207470 . 207865) (OPT.RETTEST +207867 . 211482) (OPT.RETMERGE 211484 . 214924) (OPT.CODELEV 214926 . 216931) (OPT.CODEFRAME 216933 . +217759) (OPT.DEFREFS 217761 . 218000) (OPT.SETDEFREFS 218002 . 218279)) (218282 239054 (OPT.FRAMEOPT +218292 . 219443) (OPT.FRAMEMERGE 219445 . 222577) (OPT.NONILVAR 222579 . 223723) (OPT.MERGEFRAMEP +223725 . 225192) (OPT.FRAMELOCAL 225194 . 226011) (OPT.CLEANFRAME 226013 . 226530) (OPT.FRAMEDEL +226532 . 234448) (OPT.FRAMEVAR 234450 . 238258) (OPT.DELETEFRAMECHECK 238260 . 238857) (OPT.ONLYMEMB +238859 . 239052)) (239136 247950 (OPT.SKIPPUSH 239146 . 241569) (OPT.DELCODE 241571 . 243015) ( +OPT.PRATTACH 243017 . 243490) (OPT.JUMPCOPYTEST 243492 . 244436) (OPT.EQOP 244438 . 245621) ( +OPT.EQVALUE 245623 . 246730) (OPT.DELCOPYFN 246732 . 247948)) (247951 250515 (OPT.DEADSETQP 247961 . +248464) (OPT.DS1 248466 . 250513)) (254181 258922 (OPT.COMPILERERROR 254191 . 254369) (OPT.OPTCHECK +254371 . 258773) (OPT.CCHECK 258775 . 258920))))) STOP diff --git a/sources/BYTECOMPILER.LCOM b/sources/BYTECOMPILER.LCOM index ab2d6b3c1..7cb52bb9e 100644 Binary files a/sources/BYTECOMPILER.LCOM and b/sources/BYTECOMPILER.LCOM differ diff --git a/sources/CLSTREAMS.LCOM b/sources/CLSTREAMS.LCOM index 9427dd460..5affa03be 100644 Binary files a/sources/CLSTREAMS.LCOM and b/sources/CLSTREAMS.LCOM differ diff --git a/sources/CMLARITH.LCOM b/sources/CMLARITH.LCOM index 03347b7d2..ec11e77bf 100644 --- a/sources/CMLARITH.LCOM +++ b/sources/CMLARITH.LCOM @@ -1,49 +1,311 @@ -(DEFINE-FILE-INFO READTABLE "XCL" PACKAGE "LISP") (IL:FILECREATED "25-Jan-98 09:40:28" ("compiled on " IL:|{DSK}sources>CMLARITH.;1|) "30-Mar-95 20:33:04" "COMPILE-FILEd" IL:|in| "Medley 14-Aug-95 ..." IL:|dated| "14-Aug-95 15:27:48") (IL:FILECREATED " 4-Jan-93 17:38:48" IL:|{DSK}lde>lispcore>sources>CMLARITH.;2| 102283 IL:|previous| IL:|date:| "16-May-90 12:46:36" IL:|{DSK}lde>lispcore>sources>CMLARITH.;1|) (IL:RPAQQ IL:CMLARITHCOMS ((IL:* IL:|;;;| "Common Lisp Arithmetic ") (IL:COMS (IL:* IL:|;;| "Error utilities") (IL:FUNCTIONS %NOT-NUMBER-ERROR %NOT-NONCOMPLEX-NUMBER-ERROR %NOT-INTEGER-ERROR %NOT-RATIONAL-ERROR %NOT-FLOAT-ERROR)) (IL:COMS (IL:* IL:|;;;| "Section 2.1.2 Ratios. ") (IL:COMS ( IL:STRUCTURES RATIO) (IL:* IL:|;;| "The following makes NUMBERP true on ratios") (IL:DECLARE\: IL:DONTEVAL@LOAD IL:DOCOPY (IL:P (IL:\\SETTYPEMASK (IL:\\TYPENUMBERFROMNAME (QUOTE RATIO)) (IL:LOGOR IL:\\TT.NUMBERP IL:\\TT.ATOM))))) (IL:FUNCTIONS DENOMINATOR NUMERATOR RATIONALP %RATIO-PRINT %BUILD-RATIO RATIONAL RATIONALIZE) (IL:FUNCTIONS %RATIO-PLUS %RATIO-TIMES)) (IL:COMS (IL:* IL:|;;;| "Section 2.1.4 Complex Numbers.") (IL:COMS (IL:STRUCTURES COMPLEX) (IL:* IL:|;;| "So we don't inherit the deftype from defstruct") (IL:TYPES COMPLEX) (IL:* IL:|;;| "Make Complex NUMBERP") (IL:DECLARE\: IL:DONTEVAL@LOAD IL:DOCOPY (IL:P (IL:\\SETTYPEMASK ( IL:\\TYPENUMBERFROMNAME (QUOTE COMPLEX)) (IL:LOGOR IL:\\TT.NUMBERP IL:\\TT.ATOM))))) (IL:FUNCTIONS COMPLEX REALPART IMAGPART CONJUGATE PHASE %COMPLEX-PRINT %COMPLEX-+ %COMPLEX-- %COMPLEX-* %COMPLEX-/ %COMPLEX-ABS)) (IL:COMS (IL:* IL:|;;;| "Datatype predicates") (IL:* IL:|;;| "cl:integerp is defined in cmlpred (has an optimizer)") (IL:* IL:|;;| "cl:floatp is defined in cmltypes (has an optimizer). il:floatp is defined on llbasic") (IL:* IL:|;;| "cl:complexp is a defstruct predicate (compiles in line)") (IL:* IL:|;;| "cl:numberp is defined in cmltypes (has an optimizer). il:numberp is defined on llbasic")) (IL:COMS ( IL:* IL:|;;;| "Section 12.2 Predicates on Numbers (generic).") (IL:* IL:|;;| "cl:zerop is not shared with il:zerop, although they are equivalent. There is no il;plusp ") (IL:COMS (IL:FUNCTIONS ZEROP PLUSP) (XCL:OPTIMIZERS ZEROP PLUSP)) (IL:* IL:|;;| "cl:minusp is shared with il:minusp, but must be redefined to work with ratios. Old version resides in llarith" ) (IL:COMS (IL:FUNCTIONS MINUSP) (XCL:OPTIMIZERS MINUSP)) (IL:* IL:|;;| "Both cl:evenp and cl:oddp are shared with il:. The functions are extended by allowing a second optional modulus argument. Another version of il:oddp exists on llarith, but the definition of il:evenp has disappeared" ) (IL:COMS (IL:FUNCTIONS EVENP ODDP) (XCL:OPTIMIZERS EVENP ODDP))) (IL:COMS (IL:* IL:|;;;| "Section 12.3 Comparisons on Numbers. (generic)") (IL:COMS (IL:FUNCTIONS %= %/= %> %< %>= %<=) (IL:PROP IL:DOPVAL %= %> %<) (IL:* IL:\; "For the byte compiler") (IL:PROP IL:DMACRO %> %< %>= %<=) ( IL:DECLARE\: IL:DONTEVAL@LOAD IL:DOCOPY (IL:P (IL:* IL:|;;| "Backward compatibility") (IL:* IL:\; " il:%= is listed as the punt function for the = opcode") (IL:MOVD (QUOTE %=) (QUOTE IL:%=)) (IL:* IL:\; "Greaterp is the UFN for the greaterp opcode. Effectively redefines the opcode") (IL:MOVD (QUOTE %>) (QUOTE IL:GREATERP)) (IL:* IL:\; "Interlisp Greaterp and Lessp are defined in llarith") (IL:MOVD ( QUOTE %<) (QUOTE IL:LESSP))))) (IL:* IL:|;;| "=, <, >, <=, and >= are shared with il:, but cl:/= is NOT shared (?!)") (IL:COMS (IL:DECLARE\: IL:DONTCOPY IL:DOEVAL@COMPILE (IL:FUNCTIONS %COMPARISON-MACRO)) (IL:FNS = /= < > <= >=) (IL:FUNCTIONS %COMPARISON-OPTIMIZER) (XCL:OPTIMIZERS = /= < > <= >=)) (IL:* IL:|;;| "Note: the related predicates EQL, EQUAL, and EQUALP should be consulted if any of the above change. EQL is on LLNEW (?), EQUAL and EQUALP on CMLTYPES." ) (IL:* IL:|;;| "cl:min and cl:max are shared with il: (defined in llarith). They are written in terms of GREATERP and hence work on ratios. Note (min) returns #.max.integer , which is an extension on the CLtl spec. We only optimize the case of two args" ) (XCL:OPTIMIZERS MIN MAX)) (IL:COMS (IL:* IL:|;;;| "Section 12.4 Arithmetic Operations (generic). ") (IL:COMS (IL:FUNCTIONS %+ %- %* %/) (IL:* IL:\; "NOTE: %/ cannot compile out to the existinq quotient opcode because it produces ratios rather than truncating" ) (IL:PROP IL:DOPVAL %+ %- %*) (IL:* IL:\; "For the byte compiler") (IL:PROP IL:DMACRO %+ %- %*) ( IL:DECLARE\: IL:DONTEVAL@LOAD IL:DOCOPY (IL:P (IL:* IL:|;;| "Backward compatibility") (IL:MOVD (QUOTE %/) (QUOTE IL:%/)) (IL:* IL:|;;| "Redefine UFNs for generic plus, difference, and times. Old UFN defined in llarith.") (IL:MOVD (QUOTE %+) (QUOTE IL:\\SLOWPLUS2)) (IL:MOVD (QUOTE %-) (QUOTE IL:\\SLOWDIFFERENCE)) (IL:MOVD (QUOTE %*) ( QUOTE IL:\\SLOWTIMES2))))) (IL:COMS (IL:FNS + - * /) (IL:FUNCTIONS 1+ 1- %RECIPROCOL) (XCL:OPTIMIZERS + - * / 1+ 1-) (IL:* IL:\; "For the byte compiler") (IL:PROP IL:DMACRO + *) (IL:* IL:|;;| "Redefine Interlisp generic arithmetic to work with ratios") (IL:DECLARE\: IL:DONTEVAL@LOAD IL:DOCOPY (IL:P (IL:MOVD (QUOTE +) (QUOTE IL:PLUS)) (IL:* IL:|;;| "Don't need to redefine difference since it is defined in terms of the difference opcode (redefined above)" ) (IL:MOVD (QUOTE *) (QUOTE IL:TIMES)) (IL:* IL:|;;| "So Interlisp quotient will do something reasonable with ratios") (IL:* (IL:MOVD (QUOTE IL:NEW-QUOTIENT ) (QUOTE IL:QUOTIENT))) (IL:* IL:|;;| "because QUOTIENT is already defined in LLARITH to do something useful with ratios. AR 8062.")))) (IL:* IL:|;;| "INCF and DECF implemented by CMLSETF.") (IL:FUNCTIONS %GCD %LCM) (IL:FNS GCD LCM)) (IL:COMS (IL:* IL:|;;| "Optimizers for Interlisp functions, so that they compile open with the PavCompiler.") ( IL:* IL:|;;| "optimizer of IL:minus") (XCL:OPTIMIZERS IL:MINUS) (XCL:OPTIMIZERS IL:PLUS IL:IPLUS IL:FPLUS IL:TIMES IL:ITIMES IL:FTIMES IL:RSH) (IL:PROP IL:DOPVAL IL:PLUS2 IL:IPLUS2 IL:FPLUS2 IL:TIMES2 IL:ITIMES2 IL:FTIMES2)) (IL:COMS (IL:* IL:|;;;| "Section 12.5 Irrational and Transcendental functions. Most of these will be found on cmlfloat.") ( IL:FUNCTIONS ISQRT) (IL:* IL:|;;| "Abs is shared with il: abs ia also defined in llarith.") ( IL:FUNCTIONS ABS %ABS) (IL:FUNCTIONS SIGNUM %SIGNUM)) (IL:COMS (IL:* IL:|;;;| "Section 12.6 Type Conversions and Component Extractions on Numbers.") (IL:* IL:|;;| "Float implemented in cmlfloat ") (IL:DECLARE\: IL:DONTCOPY IL:DOEVAL@COMPILE (IL:FILES IL:UNBOXEDOPS )) (IL:* IL:\; "These should be exported from xcl") (IL:COMS (IL:FUNCTIONS XCL::STRUNCATE XCL::SFLOOR XCL::SCEILING XCL::SROUND) (XCL:OPTIMIZERS XCL::STRUNCATE XCL::SROUND)) (IL:* IL:\; "Round is shared with il: (?!)") (IL:COMS (IL:DECLARE\: IL:DONTCOPY IL:DOEVAL@COMPILE (IL:FUNCTIONS %INTEGER-COERCE-MACRO)) (IL:FUNCTIONS TRUNCATE FLOOR CEILING ROUND) (IL:FUNCTIONS %INTEGER-COERCE-OPTIMIZER) (XCL:OPTIMIZERS TRUNCATE FLOOR CEILING ROUND)) (IL:COMS (IL:FUNCTIONS FTRUNCATE FFLOOR FCEILING FROUND) (XCL:OPTIMIZERS FTRUNCATE FFLOOR FCEILING FROUND)) (IL:COMS ( IL:FUNCTIONS MOD REM)) (IL:* IL:|;;| "Should IL:remainder be equivalent to cl:rem?. Thereis no IL:mod in the IRM, although it has a macro which makes it equivalent to imod." ) (IL:* IL:|;;| "See cmlfloat for ffloor and friends, decode-float and friends")) (IL:COMS (IL:* IL:|;;;| "Section 12.7 Logical Operations on Numbers.") (IL:* IL:|;;| "LOGXOR and LOGAND are shared with IL. (definitions in llarith)") (IL:COMS (IL:FUNCTIONS %LOGICAL-OPTIMIZER) (XCL:OPTIMIZERS LOGXOR LOGAND)) (IL:COMS (IL:FUNCTIONS %LOGIOR %LOGEQV) (IL:PROP IL:DOPVAL %LOGIOR) (IL:* IL:\; "for the byte compiler") (IL:PROP IL:DMACRO %LOGIOR)) (IL:COMS (IL:FNS LOGIOR LOGEQV) (XCL:OPTIMIZERS LOGIOR LOGEQV)) (IL:COMS (IL:FUNCTIONS LOGNAND LOGNOR LOGANDC1 LOGANDC2 LOGORC1 LOGORC2) (XCL:OPTIMIZERS LOGNAND LOGNOR LOGANDC1 LOGANDC2 LOGORC1 LOGORC2)) (IL:COMS ( IL:VARIABLES BOOLE-CLR BOOLE-SET BOOLE-1 BOOLE-2 BOOLE-C1 BOOLE-C2 BOOLE-AND BOOLE-IOR BOOLE-XOR BOOLE-EQV BOOLE-NAND BOOLE-NOR BOOLE-ANDC1 BOOLE-ANDC2 BOOLE-ORC1 BOOLE-ORC2) (IL:FUNCTIONS BOOLE)) ( IL:* IL:|;;| "Lognot is shared with IL.(in addarith) ") (IL:COMS (IL:FUNCTIONS LOGTEST LOGBITP) ( XCL:OPTIMIZERS LOGTEST)) (IL:COMS (IL:FUNCTIONS ASH) (IL:PROP IL:DOPVAL ASH) (IL:* IL:\; "For the byte compiler") (IL:PROP IL:DMACRO ASH)) (IL:COMS (IL:FUNCTIONS LOGCOUNT %LOGCOUNT) ( IL:DECLARE\: IL:DONTCOPY IL:DOEVAL@COMPILE (IL:FILES (IL:LOADCOMP) IL:LLBIGNUM)) (IL:* IL:\; "Should be in llbignum") (IL:FUNCTIONS %BIGNUM-LOGCOUNT)) (IL:FUNCTIONS INTEGER-LENGTH) (IL:* IL:|;;| "OPTIMIZERS FOR IL:LLSH AND IL:LRSH") (IL:COMS (IL:FUNCTIONS %LLSH8 %LLSH1 %LRSH8 %LRSH1) (IL:PROP IL:DOPVAL %LLSH8 %LLSH1 %LRSH8 %LRSH1) (XCL:OPTIMIZERS IL:LLSH IL:LRSH))) (IL:COMS (IL:* IL:|;;;| "Section 12.8 Byte Manipulations Functions.") (IL:COMS (IL:FUNCTIONS BYTE BYTE-SIZE BYTE-POSITION) (IL:* IL:|;;| "Byte doesn't need an optimizer since the side-effects data-base will do constant folding, but the byte-compiler can profit from an optimizer" ) (IL:FUNCTIONS OPTIMIZE-BYTE) (IL:PROP IL:DMACRO BYTE)) (IL:COMS (IL:DECLARE\: IL:DONTCOPY IL:DOEVAL@COMPILE (IL:FUNCTIONS %MAKE-BYTE-MASK-1 %MAKE-BYTE-MASK-0)) (IL:FUNCTIONS LDB DPB MASK-FIELD DEPOSIT-FIELD) (IL:FUNCTIONS %CONSTANT-BYTESPEC-P) (XCL:OPTIMIZERS LDB DPB MASK-FIELD DEPOSIT-FIELD)) (IL:COMS (IL:FUNCTIONS LDB-TEST) (XCL:OPTIMIZERS LDB-TEST))) (IL:DECLARE\: IL:DONTCOPY IL:DOEVAL@COMPILE (IL:LOCALVARS . T)) (IL:PROP (IL:MAKEFILE-ENVIRONMENT IL:FILETYPE) IL:CMLARITH) ( IL:DECLARE\: IL:DONTEVAL@LOAD IL:DOEVAL@COMPILE IL:DONTCOPY IL:COMPILERVARS (IL:ADDVARS (IL:NLAMA) ( IL:NLAML) (IL:LAMA LOGEQV LOGIOR LCM GCD / * - + >= <= > < /= =))))) %NOT-NUMBER-ERROR :D8 (IL:L (0 OBJECT)) #gggg@g@ (32 ERROR) (25 :VALUE 19 :NAME 14 NUMBER 9 :EXPECTED-TYPE 4 XCL:TYPE-MISMATCH) () %NOT-NONCOMPLEX-NUMBER-ERROR :D8 (IL:L (0 OBJECT)) 3@3›o@ -gggg@g@ (48 ERROR 14 ERROR) (41 :VALUE 35 :NAME 30 NUMBER 25 :EXPECTED-TYPE 20 XCL:TYPE-MISMATCH) ( 8 "Arg a complex number~%~s") %NOT-INTEGER-ERROR :D8 (IL:L (0 OBJECT)) #gggg@g@ (32 ERROR) (25 :VALUE 19 :NAME 14 INTEGER 9 :EXPECTED-TYPE 4 XCL:TYPE-MISMATCH) () %NOT-RATIONAL-ERROR :D8 (IL:L (0 OBJECT)) #gggg@g@ (32 ERROR) (25 :NAME 19 :VALUE 14 RATIONAL 9 :EXPECTED-TYPE 4 XCL:TYPE-MISMATCH) () %NOT-FLOAT-ERROR :D8 (IL:L (0 OBJECT)) #gggg@g@ (32 ERROR) (25 :VALUE 19 :NAME 14 FLOAT 9 :EXPECTED-TYPE 4 XCL:TYPE-MISMATCH) () (SET-PARSED-STRUCTURE (QUOTE RATIO) T (QUOTE (PS RATIO NIL (NUMERATOR DENOMINATOR) DATATYPE NIL NIL "RATIO-" ((%MAKE-RATIO (NUMERATOR DENOMINATOR))) %RATIO-P %RATIO-PRINT NIL NIL 0 NIL ((NUMERATOR :READ-ONLY T NIL (RATIO 0 IL:POINTER) RATIO-NUMERATOR) (DENOMINATOR :READ-ONLY T NIL (RATIO 2 IL:POINTER ) RATIO-DENOMINATOR)) NIL NIL (IL:POINTER IL:POINTER) NIL (:ACCESSOR :PREDICATE) NIL NIL NIL))) (SI::%STRUCTURE-DECLARE-DATATYPE (QUOTE RATIO) (QUOTE (IL:POINTER IL:POINTER)) (QUOTE ((RATIO 0 IL:POINTER) (RATIO 2 IL:POINTER))) 4 (QUOTE STRUCTURE-OBJECT)) (IL:PUTPROP (QUOTE RATIO) (QUOTE :TYPE-EXPANDER) (QUOTE TYPE-EXPAND-STRUCTURE)) %RATIO-P :D8 (IL:L (0 OBJECT)) @ÃNIL (5 RATIO) () (ESTABLISH-PREDICATE (QUOTE RATIO)) RATIO-NUMERATOR :D8 (IL:L (0 RATIO)) -@ÉNIL (5 RATIO) () RATIO-DENOMINATOR :D8 (IL:L (0 RATIO)) -@ÉNIL (5 RATIO) () (ESTABLISH-SETFS-AND-OPTIMIZERS (QUOTE RATIO)) %MAKE-RATIO :D8 (IL:L (1 DENOMINATOR 0 NUMERATOR)) lH@HAHNIL NIL () (IL:\\SETTYPEMASK (IL:\\TYPENUMBERFROMNAME (QUOTE RATIO)) (IL:LOGOR IL:\\TT.NUMBERP IL:\\TT.ATOM)) DENOMINATOR :D8 (IL:L (0 RATIONAL)) @dÙ¿@É3 ‘k@ (28 %NOT-RATIONAL-ERROR) (14 RATIO 6 RATIO) () NUMERATOR :D8 (IL:L (0 RATIONAL)) @dÙ¿@É3 ‘@@ (28 %NOT-RATIONAL-ERROR) (14 RATIO 6 RATIO) () RATIONALP :D8 (IL:L (0 NUMBER)) @d3 ‘iÃNIL (11 RATIO) () |definline-RATIONALP| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @oHNIL NIL ( 9 (LAMBDA (NUMBER) (BLOCK RATIONALP (OR (INTEGERP NUMBER) (%RATIO-P NUMBER))))) (IL:PUTPROP (QUOTE RATIONALP) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |definline-RATIONALP|) ( GET (QUOTE RATIONALP) (QUOTE COMPILER:OPTIMIZER-LIST)))) %RATIO-PRINT :D8 (IL:L (1 STREAM 0 NUMBER) IL:P 8 *PRINT-RADIX* IL:P 7 IL:\\THISFILELINELENGTH IL:P 6 *PRINT-RADIX* IL:P 5 *PRINT-BASE* IL:F 9 *PRINT-BASE* IL:F 10 *READTABLE* IL:F 11 IL:\\THISFILELINELENGTH IL:F 12 *PRINT-RADIX*)  @É@É2WÊjð²oA +(DEFINE-FILE-INFO READTABLE "XCL" PACKAGE "LISP") +(IL:FILECREATED "13-Jun-2021 21:16:13" ("compiled on " +IL:|{DSK}kaplan>Local>medley3.5>git-medley>sources>CMLARITH.;1|) "13-Jun-2021 14:44:27" +"COMPILE-FILEd" IL:|in| "FULL 13-Jun-2021 ..." IL:|dated| "13-Jun-2021 14:44:40") +(IL:FILECREATED " 4-Jan-93 17:38:48" IL:|{DSK}lde>lispcore>sources>CMLARITH.;2| 102283 +IL:|previous| IL:|date:| "16-May-90 12:46:36" IL:|{DSK}lde>lispcore>sources>CMLARITH.;1|) +(IL:RPAQQ IL:CMLARITHCOMS ((IL:* IL:|;;;| "Common Lisp Arithmetic ") (IL:COMS (IL:* IL:|;;| +"Error utilities") (IL:FUNCTIONS %NOT-NUMBER-ERROR %NOT-NONCOMPLEX-NUMBER-ERROR %NOT-INTEGER-ERROR +%NOT-RATIONAL-ERROR %NOT-FLOAT-ERROR)) (IL:COMS (IL:* IL:|;;;| "Section 2.1.2 Ratios. ") (IL:COMS ( +IL:STRUCTURES RATIO) (IL:* IL:|;;| "The following makes NUMBERP true on ratios") (IL:DECLARE\: +IL:DONTEVAL@LOAD IL:DOCOPY (IL:P (IL:\\SETTYPEMASK (IL:\\TYPENUMBERFROMNAME (QUOTE RATIO)) (IL:LOGOR +IL:\\TT.NUMBERP IL:\\TT.ATOM))))) (IL:FUNCTIONS DENOMINATOR NUMERATOR RATIONALP %RATIO-PRINT +%BUILD-RATIO RATIONAL RATIONALIZE) (IL:FUNCTIONS %RATIO-PLUS %RATIO-TIMES)) (IL:COMS (IL:* IL:|;;;| +"Section 2.1.4 Complex Numbers.") (IL:COMS (IL:STRUCTURES COMPLEX) (IL:* IL:|;;| +"So we don't inherit the deftype from defstruct") (IL:TYPES COMPLEX) (IL:* IL:|;;| +"Make Complex NUMBERP") (IL:DECLARE\: IL:DONTEVAL@LOAD IL:DOCOPY (IL:P (IL:\\SETTYPEMASK ( +IL:\\TYPENUMBERFROMNAME (QUOTE COMPLEX)) (IL:LOGOR IL:\\TT.NUMBERP IL:\\TT.ATOM))))) (IL:FUNCTIONS +COMPLEX REALPART IMAGPART CONJUGATE PHASE %COMPLEX-PRINT %COMPLEX-+ %COMPLEX-- %COMPLEX-* %COMPLEX-/ +%COMPLEX-ABS)) (IL:COMS (IL:* IL:|;;;| "Datatype predicates") (IL:* IL:|;;| +"cl:integerp is defined in cmlpred (has an optimizer)") (IL:* IL:|;;| +"cl:floatp is defined in cmltypes (has an optimizer). il:floatp is defined on llbasic") (IL:* IL:|;;| +"cl:complexp is a defstruct predicate (compiles in line)") (IL:* IL:|;;| +"cl:numberp is defined in cmltypes (has an optimizer). il:numberp is defined on llbasic")) (IL:COMS ( +IL:* IL:|;;;| "Section 12.2 Predicates on Numbers (generic).") (IL:* IL:|;;| +"cl:zerop is not shared with il:zerop, although they are equivalent. There is no il;plusp ") (IL:COMS + (IL:FUNCTIONS ZEROP PLUSP) (XCL:OPTIMIZERS ZEROP PLUSP)) (IL:* IL:|;;| +"cl:minusp is shared with il:minusp, but must be redefined to work with ratios. Old version resides in llarith" +) (IL:COMS (IL:FUNCTIONS MINUSP) (XCL:OPTIMIZERS MINUSP)) (IL:* IL:|;;| +"Both cl:evenp and cl:oddp are shared with il:. The functions are extended by allowing a second optional modulus argument. Another version of il:oddp exists on llarith, but the definition of il:evenp has disappeared" +) (IL:COMS (IL:FUNCTIONS EVENP ODDP) (XCL:OPTIMIZERS EVENP ODDP))) (IL:COMS (IL:* IL:|;;;| +"Section 12.3 Comparisons on Numbers. (generic)") (IL:COMS (IL:FUNCTIONS %= %/= %> %< %>= %<=) (IL:PROP + IL:DOPVAL %= %> %<) (IL:* IL:\; "For the byte compiler") (IL:PROP IL:DMACRO %> %< %>= %<=) ( +IL:DECLARE\: IL:DONTEVAL@LOAD IL:DOCOPY (IL:P (IL:* IL:|;;| "Backward compatibility") (IL:* IL:\; +" il:%= is listed as the punt function for the = opcode") (IL:MOVD (QUOTE %=) (QUOTE IL:%=)) (IL:* IL:\; + "Greaterp is the UFN for the greaterp opcode. Effectively redefines the opcode") (IL:MOVD (QUOTE %>) +(QUOTE IL:GREATERP)) (IL:* IL:\; "Interlisp Greaterp and Lessp are defined in llarith") (IL:MOVD ( +QUOTE %<) (QUOTE IL:LESSP))))) (IL:* IL:|;;| +"=, <, >, <=, and >= are shared with il:, but cl:/= is NOT shared (?!)") (IL:COMS (IL:DECLARE\: +IL:DONTCOPY IL:DOEVAL@COMPILE (IL:FUNCTIONS %COMPARISON-MACRO)) (IL:FNS = /= < > <= >=) (IL:FUNCTIONS +%COMPARISON-OPTIMIZER) (XCL:OPTIMIZERS = /= < > <= >=)) (IL:* IL:|;;| +"Note: the related predicates EQL, EQUAL, and EQUALP should be consulted if any of the above change. EQL is on LLNEW (?), EQUAL and EQUALP on CMLTYPES." +) (IL:* IL:|;;| +"cl:min and cl:max are shared with il: (defined in llarith). They are written in terms of GREATERP and hence work on ratios. Note (min) returns #.max.integer , which is an extension on the CLtl spec. We only optimize the case of two args" +) (XCL:OPTIMIZERS MIN MAX)) (IL:COMS (IL:* IL:|;;;| "Section 12.4 Arithmetic Operations (generic). ") +(IL:COMS (IL:FUNCTIONS %+ %- %* %/) (IL:* IL:\; +"NOTE: %/ cannot compile out to the existinq quotient opcode because it produces ratios rather than truncating" +) (IL:PROP IL:DOPVAL %+ %- %*) (IL:* IL:\; "For the byte compiler") (IL:PROP IL:DMACRO %+ %- %*) ( +IL:DECLARE\: IL:DONTEVAL@LOAD IL:DOCOPY (IL:P (IL:* IL:|;;| "Backward compatibility") (IL:MOVD (QUOTE +%/) (QUOTE IL:%/)) (IL:* IL:|;;| +"Redefine UFNs for generic plus, difference, and times. Old UFN defined in llarith.") (IL:MOVD (QUOTE +%+) (QUOTE IL:\\SLOWPLUS2)) (IL:MOVD (QUOTE %-) (QUOTE IL:\\SLOWDIFFERENCE)) (IL:MOVD (QUOTE %*) ( +QUOTE IL:\\SLOWTIMES2))))) (IL:COMS (IL:FNS + - * /) (IL:FUNCTIONS 1+ 1- %RECIPROCOL) (XCL:OPTIMIZERS ++ - * / 1+ 1-) (IL:* IL:\; "For the byte compiler") (IL:PROP IL:DMACRO + *) (IL:* IL:|;;| +"Redefine Interlisp generic arithmetic to work with ratios") (IL:DECLARE\: IL:DONTEVAL@LOAD IL:DOCOPY +(IL:P (IL:MOVD (QUOTE +) (QUOTE IL:PLUS)) (IL:* IL:|;;| +"Don't need to redefine difference since it is defined in terms of the difference opcode (redefined above)" +) (IL:MOVD (QUOTE *) (QUOTE IL:TIMES)) (IL:* IL:|;;| +"So Interlisp quotient will do something reasonable with ratios") (IL:* (IL:MOVD (QUOTE IL:NEW-QUOTIENT +) (QUOTE IL:QUOTIENT))) (IL:* IL:|;;| +"because QUOTIENT is already defined in LLARITH to do something useful with ratios. AR 8062.")))) (IL:* + IL:|;;| "INCF and DECF implemented by CMLSETF.") (IL:FUNCTIONS %GCD %LCM) (IL:FNS GCD LCM)) (IL:COMS +(IL:* IL:|;;| "Optimizers for Interlisp functions, so that they compile open with the PavCompiler.") ( +IL:* IL:|;;| "optimizer of IL:minus") (XCL:OPTIMIZERS IL:MINUS) (XCL:OPTIMIZERS IL:PLUS IL:IPLUS +IL:FPLUS IL:TIMES IL:ITIMES IL:FTIMES IL:RSH) (IL:PROP IL:DOPVAL IL:PLUS2 IL:IPLUS2 IL:FPLUS2 IL:TIMES2 + IL:ITIMES2 IL:FTIMES2)) (IL:COMS (IL:* IL:|;;;| +"Section 12.5 Irrational and Transcendental functions. Most of these will be found on cmlfloat.") ( +IL:FUNCTIONS ISQRT) (IL:* IL:|;;| "Abs is shared with il: abs ia also defined in llarith.") ( +IL:FUNCTIONS ABS %ABS) (IL:FUNCTIONS SIGNUM %SIGNUM)) (IL:COMS (IL:* IL:|;;;| +"Section 12.6 Type Conversions and Component Extractions on Numbers.") (IL:* IL:|;;| +"Float implemented in cmlfloat ") (IL:DECLARE\: IL:DONTCOPY IL:DOEVAL@COMPILE (IL:FILES IL:UNBOXEDOPS +)) (IL:* IL:\; "These should be exported from xcl") (IL:COMS (IL:FUNCTIONS XCL::STRUNCATE XCL::SFLOOR +XCL::SCEILING XCL::SROUND) (XCL:OPTIMIZERS XCL::STRUNCATE XCL::SROUND)) (IL:* IL:\; +"Round is shared with il: (?!)") (IL:COMS (IL:DECLARE\: IL:DONTCOPY IL:DOEVAL@COMPILE (IL:FUNCTIONS +%INTEGER-COERCE-MACRO)) (IL:FUNCTIONS TRUNCATE FLOOR CEILING ROUND) (IL:FUNCTIONS +%INTEGER-COERCE-OPTIMIZER) (XCL:OPTIMIZERS TRUNCATE FLOOR CEILING ROUND)) (IL:COMS (IL:FUNCTIONS +FTRUNCATE FFLOOR FCEILING FROUND) (XCL:OPTIMIZERS FTRUNCATE FFLOOR FCEILING FROUND)) (IL:COMS ( +IL:FUNCTIONS MOD REM)) (IL:* IL:|;;| +"Should IL:remainder be equivalent to cl:rem?. Thereis no IL:mod in the IRM, although it has a macro which makes it equivalent to imod." +) (IL:* IL:|;;| "See cmlfloat for ffloor and friends, decode-float and friends")) (IL:COMS (IL:* +IL:|;;;| "Section 12.7 Logical Operations on Numbers.") (IL:* IL:|;;| +"LOGXOR and LOGAND are shared with IL. (definitions in llarith)") (IL:COMS (IL:FUNCTIONS +%LOGICAL-OPTIMIZER) (XCL:OPTIMIZERS LOGXOR LOGAND)) (IL:COMS (IL:FUNCTIONS %LOGIOR %LOGEQV) (IL:PROP +IL:DOPVAL %LOGIOR) (IL:* IL:\; "for the byte compiler") (IL:PROP IL:DMACRO %LOGIOR)) (IL:COMS (IL:FNS +LOGIOR LOGEQV) (XCL:OPTIMIZERS LOGIOR LOGEQV)) (IL:COMS (IL:FUNCTIONS LOGNAND LOGNOR LOGANDC1 LOGANDC2 + LOGORC1 LOGORC2) (XCL:OPTIMIZERS LOGNAND LOGNOR LOGANDC1 LOGANDC2 LOGORC1 LOGORC2)) (IL:COMS ( +IL:VARIABLES BOOLE-CLR BOOLE-SET BOOLE-1 BOOLE-2 BOOLE-C1 BOOLE-C2 BOOLE-AND BOOLE-IOR BOOLE-XOR +BOOLE-EQV BOOLE-NAND BOOLE-NOR BOOLE-ANDC1 BOOLE-ANDC2 BOOLE-ORC1 BOOLE-ORC2) (IL:FUNCTIONS BOOLE)) ( +IL:* IL:|;;| "Lognot is shared with IL.(in addarith) ") (IL:COMS (IL:FUNCTIONS LOGTEST LOGBITP) ( +XCL:OPTIMIZERS LOGTEST)) (IL:COMS (IL:FUNCTIONS ASH) (IL:PROP IL:DOPVAL ASH) (IL:* IL:\; +"For the byte compiler") (IL:PROP IL:DMACRO ASH)) (IL:COMS (IL:FUNCTIONS LOGCOUNT %LOGCOUNT) ( +IL:DECLARE\: IL:DONTCOPY IL:DOEVAL@COMPILE (IL:FILES (IL:LOADCOMP) IL:LLBIGNUM)) (IL:* IL:\; +"Should be in llbignum") (IL:FUNCTIONS %BIGNUM-LOGCOUNT)) (IL:FUNCTIONS INTEGER-LENGTH) (IL:* IL:|;;| +"OPTIMIZERS FOR IL:LLSH AND IL:LRSH") (IL:COMS (IL:FUNCTIONS %LLSH8 %LLSH1 %LRSH8 %LRSH1) (IL:PROP +IL:DOPVAL %LLSH8 %LLSH1 %LRSH8 %LRSH1) (XCL:OPTIMIZERS IL:LLSH IL:LRSH))) (IL:COMS (IL:* IL:|;;;| +"Section 12.8 Byte Manipulations Functions.") (IL:COMS (IL:FUNCTIONS BYTE BYTE-SIZE BYTE-POSITION) (IL:* + IL:|;;| +"Byte doesn't need an optimizer since the side-effects data-base will do constant folding, but the byte-compiler can profit from an optimizer" +) (IL:FUNCTIONS OPTIMIZE-BYTE) (IL:PROP IL:DMACRO BYTE)) (IL:COMS (IL:DECLARE\: IL:DONTCOPY +IL:DOEVAL@COMPILE (IL:FUNCTIONS %MAKE-BYTE-MASK-1 %MAKE-BYTE-MASK-0)) (IL:FUNCTIONS LDB DPB MASK-FIELD + DEPOSIT-FIELD) (IL:FUNCTIONS %CONSTANT-BYTESPEC-P) (XCL:OPTIMIZERS LDB DPB MASK-FIELD DEPOSIT-FIELD)) + (IL:COMS (IL:FUNCTIONS LDB-TEST) (XCL:OPTIMIZERS LDB-TEST))) (IL:DECLARE\: IL:DONTCOPY +IL:DOEVAL@COMPILE (IL:LOCALVARS . T)) (IL:PROP (IL:MAKEFILE-ENVIRONMENT IL:FILETYPE) IL:CMLARITH) ( +IL:DECLARE\: IL:DONTEVAL@LOAD IL:DOEVAL@COMPILE IL:DONTCOPY IL:COMPILERVARS (IL:ADDVARS (IL:NLAMA) ( +IL:NLAML) (IL:LAMA LOGEQV LOGIOR LCM GCD / * - + >= <= > < /= =))))) +%NOT-NUMBER-ERROR :D8 +(IL:L (0 OBJECT)) #gggg@g@ (32 ERROR) +(25 :VALUE 19 :NAME 14 NUMBER 9 :EXPECTED-TYPE 4 XCL:TYPE-MISMATCH) +() +%NOT-NONCOMPLEX-NUMBER-ERROR :D8 +(IL:L (0 OBJECT)) 3@3›o@ +gggg@g@ (48 ERROR 14 ERROR) +(41 :VALUE 35 :NAME 30 NUMBER 25 :EXPECTED-TYPE 20 XCL:TYPE-MISMATCH) +( 8 "Arg a complex number~%~s") +%NOT-INTEGER-ERROR :D8 +(IL:L (0 OBJECT)) #gggg@g@ (32 ERROR) +(25 :VALUE 19 :NAME 14 INTEGER 9 :EXPECTED-TYPE 4 XCL:TYPE-MISMATCH) +() +%NOT-RATIONAL-ERROR :D8 +(IL:L (0 OBJECT)) #gggg@g@ (32 ERROR) +(25 :NAME 19 :VALUE 14 RATIONAL 9 :EXPECTED-TYPE 4 XCL:TYPE-MISMATCH) +() +%NOT-FLOAT-ERROR :D8 +(IL:L (0 OBJECT)) #gggg@g@ (32 ERROR) +(25 :VALUE 19 :NAME 14 FLOAT 9 :EXPECTED-TYPE 4 XCL:TYPE-MISMATCH) +() +(SET-PARSED-STRUCTURE (QUOTE RATIO) T (QUOTE (PS RATIO NIL (NUMERATOR DENOMINATOR) DATATYPE NIL NIL +"RATIO-" ((%MAKE-RATIO (NUMERATOR DENOMINATOR))) %RATIO-P %RATIO-PRINT NIL NIL 0 NIL ((NUMERATOR +:READ-ONLY T NIL (RATIO 0 IL:POINTER) RATIO-NUMERATOR) (DENOMINATOR :READ-ONLY T NIL (RATIO 2 IL:POINTER +) RATIO-DENOMINATOR)) NIL NIL (IL:POINTER IL:POINTER) NIL (:ACCESSOR :PREDICATE) NIL NIL NIL))) +(SI::%STRUCTURE-DECLARE-DATATYPE (QUOTE RATIO) (QUOTE (IL:POINTER IL:POINTER)) (QUOTE ((RATIO 0 +IL:POINTER) (RATIO 2 IL:POINTER))) 4 (QUOTE STRUCTURE-OBJECT)) +(IL:PUTPROP (QUOTE RATIO) (QUOTE :TYPE-EXPANDER) (QUOTE TYPE-EXPAND-STRUCTURE)) +%RATIO-P :D8 +(IL:L (0 OBJECT)) @ÃNIL +(5 RATIO) +() +(ESTABLISH-PREDICATE (QUOTE RATIO)) +RATIO-NUMERATOR :D8 +(IL:L (0 RATIO)) +@ÉNIL +(5 RATIO) +() +RATIO-DENOMINATOR :D8 +(IL:L (0 RATIO)) +@ÉNIL +(5 RATIO) +() +(ESTABLISH-SETFS-AND-OPTIMIZERS (QUOTE RATIO)) +%MAKE-RATIO :D8 +(IL:L (1 DENOMINATOR 0 NUMERATOR)) lH@HAHNIL +NIL +() +(IL:\\SETTYPEMASK (IL:\\TYPENUMBERFROMNAME (QUOTE RATIO)) (IL:LOGOR IL:\\TT.NUMBERP IL:\\TT.ATOM)) +DENOMINATOR :D8 +(IL:L (0 RATIONAL)) @dÙ¿@É3 ‘k@ (28 %NOT-RATIONAL-ERROR) +(14 RATIO 6 RATIO) +() +NUMERATOR :D8 +(IL:L (0 RATIONAL)) @dÙ¿@É3 ‘@@ (28 %NOT-RATIONAL-ERROR) +(14 RATIO 6 RATIO) +() +RATIONALP :D8 +(IL:L (0 NUMBER)) @d3 ‘iÃNIL +(11 RATIO) +() +|definline-RATIONALP| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @oHNIL +NIL +( 9 (LAMBDA (NUMBER) (BLOCK RATIONALP (OR (INTEGERP NUMBER) (%RATIO-P NUMBER))))) +(IL:PUTPROP (QUOTE RATIONALP) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |definline-RATIONALP|) ( +GET (QUOTE RATIONALP) (QUOTE COMPILER:OPTIMIZER-LIST)))) +%RATIO-PRINT :D8 +(IL:L (1 STREAM 0 NUMBER) IL:P 8 *PRINT-RADIX* IL:P 7 IL:\\THISFILELINELENGTH IL:P 6 *PRINT-RADIX* IL:P 5 *PRINT-BASE* IL:F 9 *PRINT-BASE* IL:F 10 *READTABLE* IL:F 11 IL:\\THISFILELINELENGTH IL:F 12 *PRINT-RADIX*)  @É@É2WÊjð²oA gHIhA -W²{gWÊ[Òlð´Klÿålÿðhð´lKÑ Wdlð—¿o°) ( 16 (0)) (IL:PUTPROP (QUOTE PLUSP) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-PLUSP|) (GET (QUOTE PLUSP) (QUOTE COMPILER:OPTIMIZER-LIST)))) MINUSP :D8 (IL:L (0 NUMBER)) j@óNIL NIL () |optimize-MINUSP| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @gHoNIL (10 <) ( 16 (0)) (IL:PUTPROP (QUOTE MINUSP) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-MINUSP|) (GET ( QUOTE MINUSP) (QUOTE COMPILER:OPTIMIZER-LIST)))) EVENP :D8 (IL:L (1 MODULUS 0 INTEGER)) A¥@kåjðj@A -ÿ(15 MOD) NIL () ODDP :D8 (IL:L (1 MODULUS 0 INTEGER)) A¥@kåkðj@A -ÿhð(15 MOD) NIL () |optimize-EVENP| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 0@!H¹HZ’J³ggIoogNIL (45 COMPILER:PASS 24 LOGAND 19 EQ) ( 37 (0) 30 (1)) (IL:PUTPROP (QUOTE EVENP) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-EVENP|) (GET (QUOTE EVENP) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-ODDP| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 0@!H¹HZ’J³ggIoogNIL (45 COMPILER:PASS 24 LOGAND 19 EQ) ( 37 (1) 30 (1)) (IL:PUTPROP (QUOTE ODDP) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-ODDP|) (GET (QUOTE ODDP) (QUOTE COMPILER:OPTIMIZER-LIST)))) %= :D8 (IL:NAME = IL:L (1 Y 0 X)) i@1Hd3 ²Q¿AYd3 –¿@AÙjð×@A +(106 COMPLEX 101 %/ 88 %/ 64 COMPLEX 59 %/ 52 %/ 39 COMPLEX 34 %/ 23 %/) +NIL +() +%COMPLEX-ABS :D8 +(IL:L (0 Z)) 1@Éí@ÉíHíHíÖIíIíÖÔíí (46 SQRT) +(15 COMPLEX 5 COMPLEX) +() +ZEROP :D8 +(IL:L (0 NUMBER)) j@ÿNIL +NIL +() +PLUSP :D8 +(IL:L (0 NUMBER)) @jóNIL +NIL +() +|optimize-ZEROP| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @gjHhNIL +(10 =) +() +(IL:PUTPROP (QUOTE ZEROP) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-ZEROP|) (GET (QUOTE + ZEROP) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-PLUSP| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @gHoNIL +(10 >) +( 16 (0)) +(IL:PUTPROP (QUOTE PLUSP) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-PLUSP|) (GET (QUOTE + PLUSP) (QUOTE COMPILER:OPTIMIZER-LIST)))) +MINUSP :D8 +(IL:L (0 NUMBER)) j@óNIL +NIL +() +|optimize-MINUSP| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @gHoNIL +(10 <) +( 16 (0)) +(IL:PUTPROP (QUOTE MINUSP) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-MINUSP|) (GET ( +QUOTE MINUSP) (QUOTE COMPILER:OPTIMIZER-LIST)))) +EVENP :D8 +(IL:L (1 MODULUS 0 INTEGER)) A¥@kåjðj@A +ÿ(15 MOD) +NIL +() +ODDP :D8 +(IL:L (1 MODULUS 0 INTEGER)) A¥@kåkðj@A +ÿhð(15 MOD) +NIL +() +|optimize-EVENP| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 0@!H¹HZ’J³ggIoogNIL +(45 COMPILER:PASS 24 LOGAND 19 EQ) +( 37 (0) 30 (1)) +(IL:PUTPROP (QUOTE EVENP) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-EVENP|) (GET (QUOTE + EVENP) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-ODDP| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 0@!H¹HZ’J³ggIoogNIL +(45 COMPILER:PASS 24 LOGAND 19 EQ) +( 37 (1) 30 (1)) +(IL:PUTPROP (QUOTE ODDP) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-ODDP|) (GET (QUOTE +ODDP) (QUOTE COMPILER:OPTIMIZER-LIST)))) +%= :D8 +(IL:NAME = IL:L (1 Y 0 X)) i@1Hd3 ²Q¿AYd3 –¿@AÙjð×@A IdÑhò@AÉÿ´‚±jAÉÿA ò>AZ[d3 ’¿iŒÃ³¯Kó§JòÓ@AÉÿ´‚±ÒjAÉÿHdòk¿Ad3 ³„dò,¿@ÉAÉ:´‚±—@ÉAÉ:dØ¿@A -â±ÿ^@AÉÿ´_jAÉÿòNAdò(¿@ÉAÉÿ´0@ÉAÉÿ3¢±ÿ A@Éÿ´ j@Éÿ@ (358 %NOT-NUMBER-ERROR 236 IL:FEQP 87 %NOT-NUMBER-ERROR 36 IL:FEQP) (348 COMPLEX 336 COMPLEX 319 COMPLEX 311 COMPLEX 300 COMPLEX 292 COMPLEX 283 COMPLEX 274 COMPLEX 265 COMPLEX 253 COMPLEX 242 COMPLEX 227 IL:FLOATP 217 RATIO 209 RATIO 194 RATIO 186 RATIO 177 RATIO 162 RATIO 151 COMPLEX 135 COMPLEX 126 COMPLEX 118 RATIO 110 IL:FLOATP 93 IL:FLOATP 77 COMPLEX 61 COMPLEX 52 COMPLEX 44 RATIO 28 IL:FLOATP) () |expand-%/=| :D8 (IL:L (1 SI::$$MACRO-ENVIRONMENT 0 SI::$$MACRO-FORM)) !@!H¹HºggIJhhNIL (21 %= 16 NOT) () (IL:SETF-MACRO-FUNCTION (QUOTE %/=) (QUOTE |expand-%/=|)) %> :D8 (IL:NAME > IL:L (1 Y 0 X)) é@1Hd3 ²;¿AYd3 ”¿@AñÓ@AòIòAÉ@ÖAÉñA ò.AZd3 ’¿i„óÄJòÜAÉ@ÖAÉòHòeA[d3 ²¿@É@ÉAÖñò@É@ÉAÖòKò@ÉAÉÖAÉ@ÉÖñ@ (230 %NOT-NONCOMPLEX-NUMBER-ERROR 65 %NOT-NONCOMPLEX-NUMBER-ERROR) (219 RATIO 211 RATIO 202 RATIO 194 RATIO 186 RATIO 174 RATIO 166 RATIO 158 IL:FLOATP 147 RATIO 139 RATIO 123 RATIO 113 RATIO 103 RATIO 95 RATIO 87 IL:FLOATP 71 IL:FLOATP 55 RATIO 45 RATIO 37 RATIO 26 IL:FLOATP) () %< :D8 (IL:L (1 Y 0 X)) A@óNIL NIL () |expand-%>=| :D8 (IL:L (1 SI::$$MACRO-ENVIRONMENT 0 SI::$$MACRO-FORM)) !@!H¹HºggIJhhNIL (21 %< 16 NOT) () (IL:SETF-MACRO-FUNCTION (QUOTE %>=) (QUOTE |expand-%>=|)) |expand-%<=| :D8 (IL:L (1 SI::$$MACRO-ENVIRONMENT 0 SI::$$MACRO-FORM)) !@!H¹HºggIJhhNIL (21 %> 16 NOT) () (IL:SETF-MACRO-FUNCTION (QUOTE %<=) (QUOTE |expand-%<=|)) (IL:PUTPROPS %= IL:DOPVAL (2 =)) (IL:PUTPROPS %> IL:DOPVAL (2 IL:GREATERP)) (IL:PUTPROPS %< IL:DOPVAL (2 IL:SWAP IL:GREATERP)) (IL:PUTPROPS %> IL:DMACRO (= . IL:GREATERP)) (IL:PUTPROPS %< IL:DMACRO (= . IL:LESSP)) (IL:PUTPROPS %>= IL:DMACRO (= . IL:GEQ)) (IL:PUTPROPS %<= IL:DMACRO (= . IL:LEQ)) (IL:MOVD (QUOTE %=) (QUOTE IL:%=)) (IL:MOVD (QUOTE %>) (QUOTE IL:GREATERP)) (IL:MOVD (QUOTE %<) (QUOTE IL:LESSP)) = :D8 (IL:L (0 ARGS)) 9ekHóšo ¿kalId3¤ ¿JHó‘iIJaÿ¡hJkÔZ°ð(35 %NOT-NUMBER-ERROR 17 ERROR) NIL ( 12 "= requires at least one argument") /= :D8 (IL:L (0 ARGS)) <ekHóšo ¿k!IdHó‘iaºIkÔ[Hó‘i…JKaÿ“h¤hK°îIkÔY°ß(17 ERROR) NIL ( 12 "/= requires at least one argument") < :D8 (IL:L (0 ARGS)) BekHóšo ¿kalId3–ÖI ¿JHó‘iJadIó¡h¹JkÔZ°î(42 %NOT-NUMBER-ERROR 17 ERROR) (35 COMPLEX) ( 12 "< requires at least one argument") > :D8 (IL:L (0 ARGS)) DekHóšo ¿kalId3–ÖI ¿JHó‘iJa»IKó¡hK¹JkÔZ°ì(42 %NOT-NUMBER-ERROR 17 ERROR) (35 COMPLEX) ( 12 "> requires at least one argument") <= :D8 (IL:L (0 ARGS)) DekHóšo ¿kalId3–ÖI ¿JHó‘iJa»IKó‘hK¹JkÔZ°ì(42 %NOT-NUMBER-ERROR 17 ERROR) (35 COMPLEX) ( 12 "<= requires at least one argument") >= :D8 (IL:L (0 ARGS)) BekHóšo ¿kalId3–ÖI ¿JHó‘iJadIó‘h¹JkÔZ°î(42 %NOT-NUMBER-ERROR 17 ERROR) (35 COMPLEX) ( 12 ">= requires at least one argument") %COMPARISON-OPTIMIZER :D8 (IL:L (3 THIRD-NUMBER 2 SECOND-NUMBER 1 FIRST-NUMBER 0 PREDICATE)) CB¥gC§@ABhgog@o@gChhhABhNIL (45 SI::%$$COMPARISON-MIDDLE-NUMBER 32 AND 22 IL:OPENLAMBDA 6 COMPILER:PASS) ( 38 (SI::%$$COMPARISON-FIRST-NUMBER SI::%$$COMPARISON-MIDDLE-NUMBER) 27 (SI::%$$COMPARISON-FIRST-NUMBER SI::%$$COMPARISON-MIDDLE-NUMBER)) |optimize-=| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) “ -@‘ H¹HZd»Jhðhð¼J½L¥gM«gIKhKM]gogh__¿M^µOhIh_¿O²OggOh&_¿°ggOhh__¿N°¸NIL (128 SI::%$$=FIRST-NUMBER 123 %= 106 SI::%$$=FIRST-NUMBER 101 %= 64 AND 54 IL:OPENLAMBDA 38 %= 30 COMPILER:PASS) ( 59 (SI::%$$=FIRST-NUMBER)) (IL:PUTPROP (QUOTE =) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-=|) (GET (QUOTE =) ( QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-/=| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 0@QH¹HZd»Jhðhð¼J½L¥gM³ùgIKhNIL (39 %/= 30 COMPILER:PASS) () (IL:PUTPROP (QUOTE /=) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-/=|) (GET (QUOTE /=) ( QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-<| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) .@QH¹HZd»J\d½L­gIKM g(37 %COMPARISON-OPTIMIZER) (43 COMPILER:PASS 29 %<) () (IL:PUTPROP (QUOTE <) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-<|) (GET (QUOTE <) ( QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize->| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) .@QH¹HZd»J\d½L­gIKM g(37 %COMPARISON-OPTIMIZER) (43 COMPILER:PASS 29 %>) () (IL:PUTPROP (QUOTE >) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize->|) (GET (QUOTE >) ( QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-<=| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) .@QH¹HZd»J\d½L­gIKM g(37 %COMPARISON-OPTIMIZER) (43 COMPILER:PASS 29 %<=) () (IL:PUTPROP (QUOTE <=) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-<=|) (GET (QUOTE <=) ( QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize->=| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) .@QH¹HZd»J\d½L­gIKM g(37 %COMPARISON-OPTIMIZER) (43 COMPILER:PASS 29 %>=) () (IL:PUTPROP (QUOTE >=) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize->=|) (GET (QUOTE >=) ( QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-MIN| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 7@QHd¹HhðhðºH[d¼Khðhð½K¯JM›oILhgNIL (52 COMPILER:PASS) ( 40 (IL:OPENLAMBDA (SI::%$$MIN-X SI::%$$MIN-Y) (IF (< SI::%$$MIN-X SI::%$$MIN-Y) SI::%$$MIN-X SI::%$$MIN-Y))) (IL:PUTPROP (QUOTE MIN) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-MIN|) (GET (QUOTE MIN ) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-MAX| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 7@QHd¹HhðhðºH[d¼Khðhð½K¯JM›oILhgNIL (52 COMPILER:PASS) ( 40 (IL:OPENLAMBDA (SI::%$$MAX-X SI::%$$MAX-Y) (IF (> SI::%$$MAX-X SI::%$$MAX-Y) SI::%$$MAX-X SI::%$$MAX-Y))) (IL:PUTPROP (QUOTE MAX) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-MAX|) (GET (QUOTE MAX ) (QUOTE COMPILER:OPTIMIZER-LIST)))) %+ :D8 (IL:NAME + IL:L (1 Y 0 X)) Ð@AHd3 ²J¿AYd3 ”¿@AØÓ@AèIdò¿@kAÉAÉ Ã’±âA òSAZd3 ’¿i„óµJdò¿@AÉAÉëèò¿@oAÉAÉ HdⱿA[d3 ²¿@É@ÉAk ò@É@ÉëAèKdò)¿@É@ÉAÉAÉ â±ÿ$@jAÉAÉ â±€A\d3 ’¿i„ò@É@ÉAj Ldò¿@É@ÉAo â±þ¬@É@ÉAÉAÉ @ (461 %NOT-NUMBER-ERROR 454 %COMPLEX-+ 407 %COMPLEX-+ 369 %COMPLEX-+ 320 %COMPLEX-+ 287 %RATIO-PLUS 212 %RATIO-PLUS 168 %COMPLEX-+ 80 %NOT-NUMBER-ERROR 64 %RATIO-PLUS) (447 COMPLEX 439 COMPLEX 431 COMPLEX 423 COMPLEX 413 COMPLEX 394 COMPLEX 386 COMPLEX 377 IL:FLOATP 360 COMPLEX 352 COMPLEX 344 RATIO 326 COMPLEX 313 COMPLEX 305 COMPLEX 293 COMPLEX 280 RATIO 272 RATIO 264 RATIO 256 RATIO 247 RATIO 234 RATIO 226 RATIO 218 IL:FLOATP 203 RATIO 195 RATIO 176 RATIO 161 COMPLEX 153 COMPLEX 139 COMPLEX 129 RATIO 121 RATIO 111 RATIO 102 IL:FLOATP 86 IL:FLOATP 70 COMPLEX 57 RATIO 49 RATIO 38 RATIO 26 IL:FLOATP) ( 402 0.0 147 0.0) %- :D8 (IL:NAME - IL:L (1 Y 0 X)) Ö@AHd3 ²L¿AYd3 ”¿@AÙÓ@AéIdò¿@kjAÉÕAÉ Ã’±æA òSAZd3 ’¿i„ó³Jdò¿@AÉAÉëéò¿@oAÉAÉ Hdâ±”¿A[d3 ²¿@É@ÉjAÕk ò@É@ÉëAéKdò+¿@É@ÉjAÉÕAÉ â±ÿ @jAÉAÉ â±€A\d3 ’¿i„ò@É@ÉAj Ldò¿@É@ÉAo â±þ¨@É@ÉAÉAÉ @ (467 %NOT-NUMBER-ERROR 460 %COMPLEX-- 413 %COMPLEX-- 375 %COMPLEX-- 326 %COMPLEX-- 293 %RATIO-PLUS 216 %RATIO-PLUS 170 %COMPLEX-- 82 %NOT-NUMBER-ERROR 66 %RATIO-PLUS) (453 COMPLEX 445 COMPLEX 437 COMPLEX 429 COMPLEX 419 COMPLEX 400 COMPLEX 392 COMPLEX 383 IL:FLOATP 366 COMPLEX 358 COMPLEX 350 RATIO 332 COMPLEX 319 COMPLEX 311 COMPLEX 299 COMPLEX 286 RATIO 277 RATIO 268 RATIO 260 RATIO 251 RATIO 238 RATIO 230 RATIO 222 IL:FLOATP 205 RATIO 197 RATIO 178 RATIO 163 COMPLEX 155 COMPLEX 141 COMPLEX 131 RATIO 123 RATIO 113 RATIO 104 IL:FLOATP 88 IL:FLOATP 72 COMPLEX 59 RATIO 50 RATIO 38 RATIO 26 IL:FLOATP) ( 408 0.0 149 0.0) %* :D8 (IL:NAME * IL:L (1 Y 0 X)) Ð@AHd3 ²J¿AYd3 ”¿@AÚÓ@AêIdò¿@kAÉAÉ Ã’±âA òSAZd3 ’¿i„óµJdò¿@AÉAÉëêò¿@oAÉAÉ HdⱿA[d3 ²¿@É@ÉAk ò@É@ÉëAêKdò)¿@É@ÉAÉAÉ â±ÿ$@jAÉAÉ â±€A\d3 ’¿i„ò@É@ÉAj Ldò¿@É@ÉAo â±þ¬@É@ÉAÉAÉ @ (461 %NOT-NUMBER-ERROR 454 %COMPLEX-* 407 %COMPLEX-* 369 %COMPLEX-* 320 %COMPLEX-* 287 %RATIO-TIMES 212 %RATIO-TIMES 168 %COMPLEX-* 80 %NOT-NUMBER-ERROR 64 %RATIO-TIMES) (447 COMPLEX 439 COMPLEX 431 COMPLEX 423 COMPLEX 413 COMPLEX 394 COMPLEX 386 COMPLEX 377 IL:FLOATP 360 COMPLEX 352 COMPLEX 344 RATIO 326 COMPLEX 313 COMPLEX 305 COMPLEX 293 COMPLEX 280 RATIO 272 RATIO 264 RATIO 256 RATIO 247 RATIO 234 RATIO 226 RATIO 218 IL:FLOATP 203 RATIO 195 RATIO 176 RATIO 161 COMPLEX 153 COMPLEX 139 COMPLEX 129 RATIO 121 RATIO 111 RATIO 102 IL:FLOATP 86 IL:FLOATP 70 COMPLEX 57 RATIO 49 RATIO 38 RATIO 26 IL:FLOATP) ( 402 0.0 147 0.0) %/ :D8 (IL:NAME / IL:L (1 Y 0 X)) @dŸ¿A™@dAÜjð“AÛ@AHd3 ²w¿AYd3 ²3¿@d`ð³d`ð³¿A`ð§A`ð“@AÛ@A -Ó@AëIdò¿@kAÉAÉ Ã’±âA òSAZd3 ’¿i„óµJdò¿AÉ@ÖAÉëò¿@oAÉAÉ HdⱿA[d3 ²¿@É@ÉkA ò@É@ÉAÖëKdò)¿@É@ÉAÉAÉ â±ÿ$@jAÉAÉ â±€A\d3 ’¿i„ò@É@ÉAj Ldò¿@É@ÉAo â±þ¬@É@ÉAÉAÉ @ (526 %NOT-NUMBER-ERROR 519 %COMPLEX-/ 472 %COMPLEX-/ 434 %COMPLEX-/ 385 %COMPLEX-/ 352 %RATIO-TIMES 277 %RATIO-TIMES 233 %COMPLEX-/ 145 %NOT-NUMBER-ERROR 129 %RATIO-TIMES 85 %BUILD-RATIO) (512 COMPLEX 504 COMPLEX 496 COMPLEX 488 COMPLEX 478 COMPLEX 459 COMPLEX 451 COMPLEX 442 IL:FLOATP 425 COMPLEX 417 COMPLEX 409 RATIO 391 COMPLEX 378 COMPLEX 370 COMPLEX 358 COMPLEX 345 RATIO 337 RATIO 329 RATIO 321 RATIO 312 RATIO 299 RATIO 291 RATIO 283 IL:FLOATP 268 RATIO 260 RATIO 241 RATIO 226 COMPLEX 218 COMPLEX 204 COMPLEX 195 RATIO 185 RATIO 176 RATIO 167 IL:FLOATP 151 IL:FLOATP 135 COMPLEX 122 RATIO 114 RATIO 103 RATIO 91 IL:FLOATP 72 IL:MAX.INTEGER 64 IL:MIN.INTEGER 54 IL:MAX.INTEGER 45 IL:MIN.INTEGER) ( 467 0.0 212 0.0) (IL:PUTPROPS %+ IL:DOPVAL (2 IL:PLUS2)) (IL:PUTPROPS %- IL:DOPVAL (2 IL:DIFFERENCE)) (IL:PUTPROPS %* IL:DOPVAL (2 IL:TIMES2)) (IL:PUTPROPS %+ IL:DMACRO (= . IL:PLUS)) (IL:PUTPROPS %- IL:DMACRO (= . IL:DIFFERENCE)) (IL:PUTPROPS %* IL:DMACRO (= . IL:TIMES)) (IL:MOVD (QUOTE %/) (QUOTE IL:%/)) (IL:MOVD (QUOTE %+) (QUOTE IL:\\SLOWPLUS2)) (IL:MOVD (QUOTE %-) (QUOTE IL:\\SLOWDIFFERENCE)) (IL:MOVD (QUOTE %*) (QUOTE IL:\\SLOWTIMES2)) + :D8 (IL:L (0 ARGS)) .eHjð‘jkalId3¤ ¿JHó‘IIJaÔ¹JkÔZ°ò(26 %NOT-NUMBER-ERROR) NIL () - :D8 (IL:L (0 ARGS)) 6eHdjð›¿o kð”jkaÕkalJHó‘IIJaÕ¹JkÔZ°ò(19 ERROR) NIL ( 14 "- requires at least one argument") * :D8 (IL:L (0 ARGS)) .eHjð‘kkalId3¤ ¿JHó‘IIJaÖ¹JkÔZ°ò(26 %NOT-NUMBER-ERROR) NIL () / :D8 (IL:L (0 ARGS)) =eHdjð›¿o kð—ka kalJHó‘IIJa -¹JkÔZ°î(52 %/ 30 %RECIPROCOL 19 ERROR) NIL ( 14 "/ requires at least one argument") 1+ :D8 (IL:L (0 NUMBER)) @kÔNIL NIL () 1- :D8 (IL:L (0 NUMBER)) @kÕNIL NIL () %RECIPROCOL :D8 (IL:L (0 NUMBER)) @—o@ëk@ -(18 %/) NIL ( 8 1.0) |optimize-+| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) %@1Hµj¹HZµI»gIKh¹J°ëNIL (25 %+) () (IL:PUTPROP (QUOTE +) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-+|) (GET (QUOTE +) ( QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize--| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 3@QH¹HZ«gjIhI»J\µK½gKMh»L°ëNIL (38 %- 16 %-) () (IL:PUTPROP (QUOTE -) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize--|) (GET (QUOTE -) ( QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-*| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) %@1Hµk¹HZµI»gIKh¹J°ëNIL (25 %*) () (IL:PUTPROP (QUOTE *) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-*|) (GET (QUOTE *) ( QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-/| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 1@QH¹HZ©gIhI»J\µK½gKMh»L°ëNIL (36 %/ 16 %RECIPROCOL) () (IL:PUTPROP (QUOTE /) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-/|) (GET (QUOTE /) ( QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-1+| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @gHoNIL (10 +) ( 16 (1)) (IL:PUTPROP (QUOTE 1+) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-1+|) (GET (QUOTE 1+) ( QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-1-| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @gHoNIL (10 -) ( 16 (1)) (IL:PUTPROP (QUOTE 1-) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-1-|) (GET (QUOTE 1-) ( QUOTE COMPILER:OPTIMIZER-LIST)))) (IL:PUTPROPS + IL:DMACRO (IL:ARGS (IL:|if| (IL:GREATERP (IL:LENGTH IL:ARGS) 1) IL:|then| (IL:BQUOTE ( IL:PLUS (IL:\\\,@ IL:ARGS))) IL:|else| (QUOTE IL:IGNOREMACRO)))) (IL:PUTPROPS * IL:DMACRO (IL:ARGS (IL:|if| (IL:GREATERP (IL:LENGTH IL:ARGS) 1) IL:|then| (IL:BQUOTE ( IL:TIMES (IL:\\\,@ IL:ARGS))) IL:|else| (QUOTE IL:IGNOREMACRO)))) (IL:MOVD (QUOTE +) (QUOTE IL:PLUS)) (IL:MOVD (QUOTE *) (QUOTE IL:TIMES)) %GCD :D8 (IL:L (1 Y 0 X)) j@ó“j@Õ€@bjAó“jAÕ€Ab@jðAdjð‘@kð£@kð‘kj@kåkð¦Akåkð²H@dkåkð²¿jAÕ°@mÿçb¿Amÿçb¿HkÔ¸°ÎmÿçYdjð”¿@Hçkåkð¦ImÿçY°öIjó“Ib†jIÕb¿@AÕ°ÙNIL NIL () %LCM :D8 (IL:L (1 Y 0 X)) E@kð‘AAkð‘@@jð£Ajð‘jj@ó“j@Õ€@bjAó“jAÕ€Ab@A -Hkð“@AÖ@HÛAÖ(50 %GCD) NIL () GCD :D8 (IL:L (0 ARGS)) FeHdjð‘jkðžkajIó“jIÕIkala +â±ÿ^@AÉÿ´_jAÉÿòNAdò(¿@ÉAÉÿ´0@ÉAÉÿ3¢±ÿ A@Éÿ´ j@Éÿ@ (358 %NOT-NUMBER-ERROR 236 IL:FEQP 87 %NOT-NUMBER-ERROR 36 IL:FEQP) +(348 COMPLEX 336 COMPLEX 319 COMPLEX 311 COMPLEX 300 COMPLEX 292 COMPLEX 283 COMPLEX 274 COMPLEX 265 COMPLEX 253 COMPLEX 242 COMPLEX 227 IL:FLOATP 217 RATIO 209 RATIO 194 RATIO 186 RATIO 177 RATIO 162 RATIO 151 COMPLEX 135 COMPLEX 126 COMPLEX 118 RATIO 110 IL:FLOATP 93 IL:FLOATP 77 COMPLEX 61 COMPLEX 52 COMPLEX 44 RATIO 28 IL:FLOATP) +() +|expand-%/=| :D8 +(IL:L (1 SI::$$MACRO-ENVIRONMENT 0 SI::$$MACRO-FORM)) !@!H¹HºggIJhhNIL +(21 %= 16 NOT) +() +(IL:SETF-MACRO-FUNCTION (QUOTE %/=) (QUOTE |expand-%/=|)) +%> :D8 +(IL:NAME > IL:L (1 Y 0 X)) é@1Hd3 ²;¿AYd3 ”¿@AñÓ@AòIòAÉ@ÖAÉñA ò.AZd3 ’¿i„óÄJòÜAÉ@ÖAÉòHòeA[d3 ²¿@É@ÉAÖñò@É@ÉAÖòKò@ÉAÉÖAÉ@ÉÖñ@ (230 %NOT-NONCOMPLEX-NUMBER-ERROR 65 %NOT-NONCOMPLEX-NUMBER-ERROR) +(219 RATIO 211 RATIO 202 RATIO 194 RATIO 186 RATIO 174 RATIO 166 RATIO 158 IL:FLOATP 147 RATIO 139 RATIO 123 RATIO 113 RATIO 103 RATIO 95 RATIO 87 IL:FLOATP 71 IL:FLOATP 55 RATIO 45 RATIO 37 RATIO 26 IL:FLOATP) +() +%< :D8 +(IL:L (1 Y 0 X)) A@óNIL +NIL +() +|expand-%>=| :D8 +(IL:L (1 SI::$$MACRO-ENVIRONMENT 0 SI::$$MACRO-FORM)) !@!H¹HºggIJhhNIL +(21 %< 16 NOT) +() +(IL:SETF-MACRO-FUNCTION (QUOTE %>=) (QUOTE |expand-%>=|)) +|expand-%<=| :D8 +(IL:L (1 SI::$$MACRO-ENVIRONMENT 0 SI::$$MACRO-FORM)) !@!H¹HºggIJhhNIL +(21 %> 16 NOT) +() +(IL:SETF-MACRO-FUNCTION (QUOTE %<=) (QUOTE |expand-%<=|)) +(IL:PUTPROPS %= IL:DOPVAL (2 =)) +(IL:PUTPROPS %> IL:DOPVAL (2 IL:GREATERP)) +(IL:PUTPROPS %< IL:DOPVAL (2 IL:SWAP IL:GREATERP)) +(IL:PUTPROPS %> IL:DMACRO (= . IL:GREATERP)) +(IL:PUTPROPS %< IL:DMACRO (= . IL:LESSP)) +(IL:PUTPROPS %>= IL:DMACRO (= . IL:GEQ)) +(IL:PUTPROPS %<= IL:DMACRO (= . IL:LEQ)) +(IL:MOVD (QUOTE %=) (QUOTE IL:%=)) +(IL:MOVD (QUOTE %>) (QUOTE IL:GREATERP)) +(IL:MOVD (QUOTE %<) (QUOTE IL:LESSP)) += :D8 +(IL:L (0 ARGS)) 9ekHóšo ¿kalId3¤ ¿JHó‘iIJaÿ¡hJkÔZ°ð(35 %NOT-NUMBER-ERROR 17 ERROR) +NIL +( 12 "= requires at least one argument") +/= :D8 +(IL:L (0 ARGS)) <ekHóšo ¿k!IdHó‘iaºIkÔ[Hó‘i…JKaÿ“h¤hK°îIkÔY°ß(17 ERROR) +NIL +( 12 "/= requires at least one argument") +< :D8 +(IL:L (0 ARGS)) BekHóšo ¿kalId3–ÖI ¿JHó‘iJadIó¡h¹JkÔZ°î(42 %NOT-NUMBER-ERROR 17 ERROR) +(35 COMPLEX) +( 12 "< requires at least one argument") +> :D8 +(IL:L (0 ARGS)) DekHóšo ¿kalId3–ÖI ¿JHó‘iJa»IKó¡hK¹JkÔZ°ì(42 %NOT-NUMBER-ERROR 17 ERROR) +(35 COMPLEX) +( 12 "> requires at least one argument") +<= :D8 +(IL:L (0 ARGS)) DekHóšo ¿kalId3–ÖI ¿JHó‘iJa»IKó‘hK¹JkÔZ°ì(42 %NOT-NUMBER-ERROR 17 ERROR) +(35 COMPLEX) +( 12 "<= requires at least one argument") +>= :D8 +(IL:L (0 ARGS)) BekHóšo ¿kalId3–ÖI ¿JHó‘iJadIó‘h¹JkÔZ°î(42 %NOT-NUMBER-ERROR 17 ERROR) +(35 COMPLEX) +( 12 ">= requires at least one argument") +%COMPARISON-OPTIMIZER :D8 +(IL:L (3 THIRD-NUMBER 2 SECOND-NUMBER 1 FIRST-NUMBER 0 PREDICATE)) CB¥gC§@ABhgog@o@gChhhABhNIL +(45 SI::%$$COMPARISON-MIDDLE-NUMBER 32 AND 22 IL:OPENLAMBDA 6 COMPILER:PASS) +( 38 (SI::%$$COMPARISON-FIRST-NUMBER SI::%$$COMPARISON-MIDDLE-NUMBER) 27 (SI::%$$COMPARISON-FIRST-NUMBER SI::%$$COMPARISON-MIDDLE-NUMBER)) +|optimize-=| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) “ +@‘ H¹HZd»Jhðhð¼J½L¥gM«gIKhKM]gogh__¿M^µOhIh_¿O²OggOh&_¿°ggOhh__¿N°¸NIL +(128 SI::%$$=FIRST-NUMBER 123 %= 106 SI::%$$=FIRST-NUMBER 101 %= 64 AND 54 IL:OPENLAMBDA 38 %= 30 COMPILER:PASS) +( 59 (SI::%$$=FIRST-NUMBER)) +(IL:PUTPROP (QUOTE =) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-=|) (GET (QUOTE =) ( +QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-/=| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 0@QH¹HZd»Jhðhð¼J½L¥gM³ùgIKhNIL +(39 %/= 30 COMPILER:PASS) +() +(IL:PUTPROP (QUOTE /=) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-/=|) (GET (QUOTE /=) ( +QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-<| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) .@QH¹HZd»J\d½L­gIKM g(37 %COMPARISON-OPTIMIZER) +(43 COMPILER:PASS 29 %<) +() +(IL:PUTPROP (QUOTE <) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-<|) (GET (QUOTE <) ( +QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize->| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) .@QH¹HZd»J\d½L­gIKM g(37 %COMPARISON-OPTIMIZER) +(43 COMPILER:PASS 29 %>) +() +(IL:PUTPROP (QUOTE >) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize->|) (GET (QUOTE >) ( +QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-<=| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) .@QH¹HZd»J\d½L­gIKM g(37 %COMPARISON-OPTIMIZER) +(43 COMPILER:PASS 29 %<=) +() +(IL:PUTPROP (QUOTE <=) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-<=|) (GET (QUOTE <=) ( +QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize->=| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) .@QH¹HZd»J\d½L­gIKM g(37 %COMPARISON-OPTIMIZER) +(43 COMPILER:PASS 29 %>=) +() +(IL:PUTPROP (QUOTE >=) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize->=|) (GET (QUOTE >=) ( +QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-MIN| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 7@QHd¹HhðhðºH[d¼Khðhð½K¯JM›oILhgNIL +(52 COMPILER:PASS) +( 40 (IL:OPENLAMBDA (SI::%$$MIN-X SI::%$$MIN-Y) (IF (< SI::%$$MIN-X SI::%$$MIN-Y) SI::%$$MIN-X SI::%$$MIN-Y))) +(IL:PUTPROP (QUOTE MIN) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-MIN|) (GET (QUOTE MIN +) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-MAX| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 7@QHd¹HhðhðºH[d¼Khðhð½K¯JM›oILhgNIL +(52 COMPILER:PASS) +( 40 (IL:OPENLAMBDA (SI::%$$MAX-X SI::%$$MAX-Y) (IF (> SI::%$$MAX-X SI::%$$MAX-Y) SI::%$$MAX-X SI::%$$MAX-Y))) +(IL:PUTPROP (QUOTE MAX) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-MAX|) (GET (QUOTE MAX +) (QUOTE COMPILER:OPTIMIZER-LIST)))) +%+ :D8 +(IL:NAME + IL:L (1 Y 0 X)) Ð@AHd3 ²J¿AYd3 ”¿@AØÓ@AèIdò¿@kAÉAÉ Ã’±âA òSAZd3 ’¿i„óµJdò¿@AÉAÉëèò¿@oAÉAÉ HdⱿA[d3 ²¿@É@ÉAk ò@É@ÉëAèKdò)¿@É@ÉAÉAÉ â±ÿ$@jAÉAÉ â±€A\d3 ’¿i„ò@É@ÉAj Ldò¿@É@ÉAo â±þ¬@É@ÉAÉAÉ @ (461 %NOT-NUMBER-ERROR 454 %COMPLEX-+ 407 %COMPLEX-+ 369 %COMPLEX-+ 320 %COMPLEX-+ 287 %RATIO-PLUS 212 %RATIO-PLUS 168 %COMPLEX-+ 80 %NOT-NUMBER-ERROR 64 %RATIO-PLUS) +(447 COMPLEX 439 COMPLEX 431 COMPLEX 423 COMPLEX 413 COMPLEX 394 COMPLEX 386 COMPLEX 377 IL:FLOATP 360 COMPLEX 352 COMPLEX 344 RATIO 326 COMPLEX 313 COMPLEX 305 COMPLEX 293 COMPLEX 280 RATIO 272 RATIO 264 RATIO 256 RATIO 247 RATIO 234 RATIO 226 RATIO 218 IL:FLOATP 203 RATIO 195 RATIO 176 RATIO 161 COMPLEX 153 COMPLEX 139 COMPLEX 129 RATIO 121 RATIO 111 RATIO 102 IL:FLOATP 86 IL:FLOATP 70 COMPLEX 57 RATIO 49 RATIO 38 RATIO 26 IL:FLOATP) +( 402 0.0 147 0.0) +%- :D8 +(IL:NAME - IL:L (1 Y 0 X)) Ö@AHd3 ²L¿AYd3 ”¿@AÙÓ@AéIdò¿@kjAÉÕAÉ Ã’±æA òSAZd3 ’¿i„ó³Jdò¿@AÉAÉëéò¿@oAÉAÉ Hdâ±”¿A[d3 ²¿@É@ÉjAÕk ò@É@ÉëAéKdò+¿@É@ÉjAÉÕAÉ â±ÿ @jAÉAÉ â±€A\d3 ’¿i„ò@É@ÉAj Ldò¿@É@ÉAo â±þ¨@É@ÉAÉAÉ @ (467 %NOT-NUMBER-ERROR 460 %COMPLEX-- 413 %COMPLEX-- 375 %COMPLEX-- 326 %COMPLEX-- 293 %RATIO-PLUS 216 %RATIO-PLUS 170 %COMPLEX-- 82 %NOT-NUMBER-ERROR 66 %RATIO-PLUS) +(453 COMPLEX 445 COMPLEX 437 COMPLEX 429 COMPLEX 419 COMPLEX 400 COMPLEX 392 COMPLEX 383 IL:FLOATP 366 COMPLEX 358 COMPLEX 350 RATIO 332 COMPLEX 319 COMPLEX 311 COMPLEX 299 COMPLEX 286 RATIO 277 RATIO 268 RATIO 260 RATIO 251 RATIO 238 RATIO 230 RATIO 222 IL:FLOATP 205 RATIO 197 RATIO 178 RATIO 163 COMPLEX 155 COMPLEX 141 COMPLEX 131 RATIO 123 RATIO 113 RATIO 104 IL:FLOATP 88 IL:FLOATP 72 COMPLEX 59 RATIO 50 RATIO 38 RATIO 26 IL:FLOATP) +( 408 0.0 149 0.0) +%* :D8 +(IL:NAME * IL:L (1 Y 0 X)) Ð@AHd3 ²J¿AYd3 ”¿@AÚÓ@AêIdò¿@kAÉAÉ Ã’±âA òSAZd3 ’¿i„óµJdò¿@AÉAÉëêò¿@oAÉAÉ HdⱿA[d3 ²¿@É@ÉAk ò@É@ÉëAêKdò)¿@É@ÉAÉAÉ â±ÿ$@jAÉAÉ â±€A\d3 ’¿i„ò@É@ÉAj Ldò¿@É@ÉAo â±þ¬@É@ÉAÉAÉ @ (461 %NOT-NUMBER-ERROR 454 %COMPLEX-* 407 %COMPLEX-* 369 %COMPLEX-* 320 %COMPLEX-* 287 %RATIO-TIMES 212 %RATIO-TIMES 168 %COMPLEX-* 80 %NOT-NUMBER-ERROR 64 %RATIO-TIMES) +(447 COMPLEX 439 COMPLEX 431 COMPLEX 423 COMPLEX 413 COMPLEX 394 COMPLEX 386 COMPLEX 377 IL:FLOATP 360 COMPLEX 352 COMPLEX 344 RATIO 326 COMPLEX 313 COMPLEX 305 COMPLEX 293 COMPLEX 280 RATIO 272 RATIO 264 RATIO 256 RATIO 247 RATIO 234 RATIO 226 RATIO 218 IL:FLOATP 203 RATIO 195 RATIO 176 RATIO 161 COMPLEX 153 COMPLEX 139 COMPLEX 129 RATIO 121 RATIO 111 RATIO 102 IL:FLOATP 86 IL:FLOATP 70 COMPLEX 57 RATIO 49 RATIO 38 RATIO 26 IL:FLOATP) +( 402 0.0 147 0.0) +%/ :D8 +(IL:NAME / IL:L (1 Y 0 X)) @dŸ¿A™@dAÜjð“AÛ@AHd3 ²w¿AYd3 ²3¿@d`ð³d`ð³¿A`ð§A`ð“@AÛ@A +Ó@AëIdò¿@kAÉAÉ Ã’±âA òSAZd3 ’¿i„óµJdò¿AÉ@ÖAÉëò¿@oAÉAÉ HdⱿA[d3 ²¿@É@ÉkA ò@É@ÉAÖëKdò)¿@É@ÉAÉAÉ â±ÿ$@jAÉAÉ â±€A\d3 ’¿i„ò@É@ÉAj Ldò¿@É@ÉAo â±þ¬@É@ÉAÉAÉ @ (526 %NOT-NUMBER-ERROR 519 %COMPLEX-/ 472 %COMPLEX-/ 434 %COMPLEX-/ 385 %COMPLEX-/ 352 %RATIO-TIMES 277 %RATIO-TIMES 233 %COMPLEX-/ 145 %NOT-NUMBER-ERROR 129 %RATIO-TIMES 85 %BUILD-RATIO) +(512 COMPLEX 504 COMPLEX 496 COMPLEX 488 COMPLEX 478 COMPLEX 459 COMPLEX 451 COMPLEX 442 IL:FLOATP 425 COMPLEX 417 COMPLEX 409 RATIO 391 COMPLEX 378 COMPLEX 370 COMPLEX 358 COMPLEX 345 RATIO 337 RATIO 329 RATIO 321 RATIO 312 RATIO 299 RATIO 291 RATIO 283 IL:FLOATP 268 RATIO 260 RATIO 241 RATIO 226 COMPLEX 218 COMPLEX 204 COMPLEX 195 RATIO 185 RATIO 176 RATIO 167 IL:FLOATP 151 IL:FLOATP 135 COMPLEX 122 RATIO 114 RATIO 103 RATIO 91 IL:FLOATP 72 IL:MAX.INTEGER 64 IL:MIN.INTEGER 54 IL:MAX.INTEGER 45 IL:MIN.INTEGER) +( 467 0.0 212 0.0) +(IL:PUTPROPS %+ IL:DOPVAL (2 IL:PLUS2)) +(IL:PUTPROPS %- IL:DOPVAL (2 IL:DIFFERENCE)) +(IL:PUTPROPS %* IL:DOPVAL (2 IL:TIMES2)) +(IL:PUTPROPS %+ IL:DMACRO (= . IL:PLUS)) +(IL:PUTPROPS %- IL:DMACRO (= . IL:DIFFERENCE)) +(IL:PUTPROPS %* IL:DMACRO (= . IL:TIMES)) +(IL:MOVD (QUOTE %/) (QUOTE IL:%/)) +(IL:MOVD (QUOTE %+) (QUOTE IL:\\SLOWPLUS2)) +(IL:MOVD (QUOTE %-) (QUOTE IL:\\SLOWDIFFERENCE)) +(IL:MOVD (QUOTE %*) (QUOTE IL:\\SLOWTIMES2)) ++ :D8 +(IL:L (0 ARGS)) .eHjð‘jkalId3¤ ¿JHó‘IIJaÔ¹JkÔZ°ò(26 %NOT-NUMBER-ERROR) +NIL +() +- :D8 +(IL:L (0 ARGS)) 6eHdjð›¿o kð”jkaÕkalJHó‘IIJaÕ¹JkÔZ°ò(19 ERROR) +NIL +( 14 "- requires at least one argument") +* :D8 +(IL:L (0 ARGS)) .eHjð‘kkalId3¤ ¿JHó‘IIJaÖ¹JkÔZ°ò(26 %NOT-NUMBER-ERROR) +NIL +() +/ :D8 +(IL:L (0 ARGS)) =eHdjð›¿o kð—ka kalJHó‘IIJa +¹JkÔZ°î(52 %/ 30 %RECIPROCOL 19 ERROR) +NIL +( 14 "/ requires at least one argument") +1+ :D8 +(IL:L (0 NUMBER)) @kÔNIL +NIL +() +1- :D8 +(IL:L (0 NUMBER)) @kÕNIL +NIL +() +%RECIPROCOL :D8 +(IL:L (0 NUMBER)) @—o@ëk@ +(18 %/) +NIL +( 8 1.0) +|optimize-+| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) %@1Hµj¹HZµI»gIKh¹J°ëNIL +(25 %+) +() +(IL:PUTPROP (QUOTE +) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-+|) (GET (QUOTE +) ( +QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize--| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 3@QH¹HZ«gjIhI»J\µK½gKMh»L°ëNIL +(38 %- 16 %-) +() +(IL:PUTPROP (QUOTE -) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize--|) (GET (QUOTE -) ( +QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-*| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) %@1Hµk¹HZµI»gIKh¹J°ëNIL +(25 %*) +() +(IL:PUTPROP (QUOTE *) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-*|) (GET (QUOTE *) ( +QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-/| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 1@QH¹HZ©gIhI»J\µK½gKMh»L°ëNIL +(36 %/ 16 %RECIPROCOL) +() +(IL:PUTPROP (QUOTE /) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-/|) (GET (QUOTE /) ( +QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-1+| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @gHoNIL +(10 +) +( 16 (1)) +(IL:PUTPROP (QUOTE 1+) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-1+|) (GET (QUOTE 1+) ( +QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-1-| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @gHoNIL +(10 -) +( 16 (1)) +(IL:PUTPROP (QUOTE 1-) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-1-|) (GET (QUOTE 1-) ( +QUOTE COMPILER:OPTIMIZER-LIST)))) +(IL:PUTPROPS + IL:DMACRO (IL:ARGS (IL:|if| (IL:GREATERP (IL:LENGTH IL:ARGS) 1) IL:|then| (IL:BQUOTE ( +IL:PLUS (IL:\\\,@ IL:ARGS))) IL:|else| (QUOTE IL:IGNOREMACRO)))) +(IL:PUTPROPS * IL:DMACRO (IL:ARGS (IL:|if| (IL:GREATERP (IL:LENGTH IL:ARGS) 1) IL:|then| (IL:BQUOTE ( +IL:TIMES (IL:\\\,@ IL:ARGS))) IL:|else| (QUOTE IL:IGNOREMACRO)))) +(IL:MOVD (QUOTE +) (QUOTE IL:PLUS)) +(IL:MOVD (QUOTE *) (QUOTE IL:TIMES)) +%GCD :D8 +(IL:L (1 Y 0 X)) j@ó“j@Õ€@bjAó“jAÕ€Ab@jðAdjð‘@kð£@kð‘kj@kåkð¦Akåkð²H@dkåkð²¿jAÕ°@mÿçb¿Amÿçb¿HkÔ¸°ÎmÿçYdjð”¿@Hçkåkð¦ImÿçY°öIjó“Ib†jIÕb¿@AÕ°ÙNIL +NIL +() +%LCM :D8 +(IL:L (1 Y 0 X)) E@kð‘AAkð‘@@jð£Ajð‘jj@ó“j@Õ€@bjAó“jAÕ€Ab@A +Hkð“@AÖ@HÛAÖ(50 %GCD) +NIL +() +GCD :D8 +(IL:L (0 ARGS)) FeHdjð‘jkðžkajIó“jIÕIkala lJHó¤Idkð‘IJa -¹JkÔZ°ê(61 %GCD 38 %GCD) NIL () LCM :D8 (IL:L (0 ARGS)) PeHdjð›¿o kðžkajIó“jIÕIkala +¹JkÔZ°ê(61 %GCD 38 %GCD) +NIL +() +LCM :D8 +(IL:L (0 ARGS)) PeHdjð›¿o kðžkajIó“jIÕIkala lJHó¤Idjð‘IJa -¹JkÔZ°ê(71 %LCM 48 %LCM 19 ERROR) NIL ( 14 "lcm requires at least one argument") IL:|optimize-MINUS| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @gjHhNIL (10 -) () (IL:PUTPROP (QUOTE IL:MINUS) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-MINUS|) (GET (QUOTE IL:MINUS) (QUOTE COMPILER:OPTIMIZER-LIST)))) IL:|optimize-PLUS| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) %@1Hµj¹HZµI»gIKh¹J°ëNIL (25 IL:PLUS2) () (IL:PUTPROP (QUOTE IL:PLUS) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-PLUS|) (GET ( QUOTE IL:PLUS) (QUOTE COMPILER:OPTIMIZER-LIST)))) IL:|optimize-IPLUS| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 7@1Hµj¹H²HZµI»gIKh¹J°ëgIoNIL (44 IL:IPLUS2 29 IL:IPLUS2) ( 50 (0)) (IL:PUTPROP (QUOTE IL:IPLUS) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-IPLUS|) (GET (QUOTE IL:IPLUS) (QUOTE COMPILER:OPTIMIZER-LIST)))) IL:|optimize-FPLUS| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) %@1Hµj¹HZµI»gIKh¹J°ëNIL (25 IL:FPLUS2) () (IL:PUTPROP (QUOTE IL:FPLUS) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-FPLUS|) (GET (QUOTE IL:FPLUS) (QUOTE COMPILER:OPTIMIZER-LIST)))) IL:|optimize-TIMES| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) %@1Hµj¹HZµI»gIKh¹J°ëNIL (25 IL:TIMES2) () (IL:PUTPROP (QUOTE IL:TIMES) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-TIMES|) (GET (QUOTE IL:TIMES) (QUOTE COMPILER:OPTIMIZER-LIST)))) IL:|optimize-ITIMES| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) %@1Hµj¹HZµI»gIKh¹J°ëNIL (25 IL:ITIMES2) () (IL:PUTPROP (QUOTE IL:ITIMES) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-ITIMES|) ( GET (QUOTE IL:ITIMES) (QUOTE COMPILER:OPTIMIZER-LIST)))) IL:|optimize-FTIMES| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) )@1Hµo¹HZµI»gIKh¹J°ëNIL (29 IL:FTIMES2) ( 12 1.0) (IL:PUTPROP (QUOTE IL:FTIMES) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-FTIMES|) ( GET (QUOTE IL:FTIMES) (QUOTE COMPILER:OPTIMIZER-LIST)))) IL:|optimize-RSH| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@!H¹HºgIgJhhNIL (22 IL:IMINUS 16 IL:LSH) () (IL:PUTPROP (QUOTE IL:RSH) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-RSH|) (GET ( QUOTE IL:RSH) (QUOTE COMPILER:OPTIMIZER-LIST)))) (IL:PUTPROPS IL:PLUS2 IL:DOPVAL (2 IL:PLUS2)) (IL:PUTPROPS IL:IPLUS2 IL:DOPVAL (2 IL:IPLUS2)) (IL:PUTPROPS IL:FPLUS2 IL:DOPVAL (2 IL:FPLUS2)) (IL:PUTPROPS IL:TIMES2 IL:DOPVAL (2 IL:TIMES2)) (IL:PUTPROPS IL:ITIMES2 IL:DOPVAL (2 IL:ITIMES2)) (IL:PUTPROPS IL:FTIMES2 IL:DOPVAL (2 IL:FTIMES2)) ISQRT :D8 (IL:L (0 INTEGER)) r@3 ”j@ó².ggog@g@go ¿@ 1kHkÕmÿççYdHkåkð’mÿ€jçÔºIJÔmÿç»JkÕIó¡IKddÖ@ó³ê¿KY°ç(58 INTEGER-LENGTH 51 ERROR) (40 :MESSAGE 34 :VALUE 28 :NAME 18 :EXPECTED-TYPE 13 XCL:TYPE-MISMATCH) ( 45 "a nonnegative integer" 23 (INTEGER 0)) ABS :D8 (IL:L (0 NUMBER)) o@Hd3 š¿j@ó“j@Õ@òo@ó²ðo@ÕHdò'¿j@Éó²Òj@ÉÕ@É -Ö@ @ (108 %NOT-NUMBER-ERROR 101 %COMPLEX-ABS 88 %MAKE-RATIO) (94 COMPLEX 81 RATIO 72 RATIO 60 RATIO 50 RATIO 24 IL:FLOATP) ( 40 0.0 31 0.0) |expand-%ABS| :D8 (IL:L (1 SI::$$MACRO-ENVIRONMENT 0 SI::$$MACRO-FORM)) @oHhNIL NIL ( 10 (IL:OPENLAMBDA (X) (IF (< X 0) (- 0 X) X))) (IL:SETF-MACRO-FUNCTION (QUOTE %ABS) (QUOTE |expand-%ABS|)) SIGNUM :D8 (IL:L (0 NUMBER)) Tj@ÿ‘@@HYãI3 ˜@jó‘kmÿHdò¿@jó•ooÃœ@d -@ (81 %NOT-NUMBER-ERROR 74 %/ 69 ABS) (61 COMPLEX 37 IL:FLOATP 16 RATIO) ( 55 -1.0 49 1.0) |expand-%SIGNUM| :D8 (IL:L (1 SI::$$MACRO-ENVIRONMENT 0 SI::$$MACRO-FORM)) @oHhNIL NIL ( 10 (IL:OPENLAMBDA (X) (COND ((EQ X 0) 0) ((PLUSP X) 1) (T -1)))) (IL:SETF-MACRO-FUNCTION (QUOTE %SIGNUM) (QUOTE |expand-%SIGNUM|)) XCL::STRUNCATE :D8 (IL:L (1 DIVISOR 0 NUMBER)) tAµ9@d׿@ dò¿@É@ÉÛ3 ‘@@ Hd3 ”¿@AÛÚ@íAíìíHÃœ@A - A (113 %NOT-NONCOMPLEX-NUMBER-ERROR 106 XCL::STRUNCATE 101 %/ 56 %NOT-NONCOMPLEX-NUMBER-ERROR 17 IL:\\FIXP.FROM.FLOATP) (93 RATIO 75 IL:FLOATP 41 RATIO 33 RATIO 24 RATIO 9 IL:FLOATP) () XCL::SFLOOR :D8 (IL:L (1 DIVISOR 0 NUMBER)) GA³@ H@ÿ‘Hj@ó²ûHkÕ@A +¹JkÔZ°ê(71 %LCM 48 %LCM 19 ERROR) +NIL +( 14 "lcm requires at least one argument") +IL:|optimize-MINUS| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @gjHhNIL +(10 -) +() +(IL:PUTPROP (QUOTE IL:MINUS) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-MINUS|) (GET +(QUOTE IL:MINUS) (QUOTE COMPILER:OPTIMIZER-LIST)))) +IL:|optimize-PLUS| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) %@1Hµj¹HZµI»gIKh¹J°ëNIL +(25 IL:PLUS2) +() +(IL:PUTPROP (QUOTE IL:PLUS) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-PLUS|) (GET ( +QUOTE IL:PLUS) (QUOTE COMPILER:OPTIMIZER-LIST)))) +IL:|optimize-IPLUS| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) 7@1Hµj¹H²HZµI»gIKh¹J°ëgIoNIL +(44 IL:IPLUS2 29 IL:IPLUS2) +( 50 (0)) +(IL:PUTPROP (QUOTE IL:IPLUS) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-IPLUS|) (GET +(QUOTE IL:IPLUS) (QUOTE COMPILER:OPTIMIZER-LIST)))) +IL:|optimize-FPLUS| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) %@1Hµj¹HZµI»gIKh¹J°ëNIL +(25 IL:FPLUS2) +() +(IL:PUTPROP (QUOTE IL:FPLUS) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-FPLUS|) (GET +(QUOTE IL:FPLUS) (QUOTE COMPILER:OPTIMIZER-LIST)))) +IL:|optimize-TIMES| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) %@1Hµj¹HZµI»gIKh¹J°ëNIL +(25 IL:TIMES2) +() +(IL:PUTPROP (QUOTE IL:TIMES) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-TIMES|) (GET +(QUOTE IL:TIMES) (QUOTE COMPILER:OPTIMIZER-LIST)))) +IL:|optimize-ITIMES| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) %@1Hµj¹HZµI»gIKh¹J°ëNIL +(25 IL:ITIMES2) +() +(IL:PUTPROP (QUOTE IL:ITIMES) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-ITIMES|) ( +GET (QUOTE IL:ITIMES) (QUOTE COMPILER:OPTIMIZER-LIST)))) +IL:|optimize-FTIMES| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) )@1Hµo¹HZµI»gIKh¹J°ëNIL +(29 IL:FTIMES2) +( 12 1.0) +(IL:PUTPROP (QUOTE IL:FTIMES) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-FTIMES|) ( +GET (QUOTE IL:FTIMES) (QUOTE COMPILER:OPTIMIZER-LIST)))) +IL:|optimize-RSH| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@!H¹HºgIgJhhNIL +(22 IL:IMINUS 16 IL:LSH) +() +(IL:PUTPROP (QUOTE IL:RSH) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-RSH|) (GET ( +QUOTE IL:RSH) (QUOTE COMPILER:OPTIMIZER-LIST)))) +(IL:PUTPROPS IL:PLUS2 IL:DOPVAL (2 IL:PLUS2)) +(IL:PUTPROPS IL:IPLUS2 IL:DOPVAL (2 IL:IPLUS2)) +(IL:PUTPROPS IL:FPLUS2 IL:DOPVAL (2 IL:FPLUS2)) +(IL:PUTPROPS IL:TIMES2 IL:DOPVAL (2 IL:TIMES2)) +(IL:PUTPROPS IL:ITIMES2 IL:DOPVAL (2 IL:ITIMES2)) +(IL:PUTPROPS IL:FTIMES2 IL:DOPVAL (2 IL:FTIMES2)) +ISQRT :D8 +(IL:L (0 INTEGER)) r@3 ”j@ó².ggog@g@go ¿@ 1kHkÕmÿççYdHkåkð’mÿ€jçÔºIJÔmÿç»JkÕIó¡IKddÖ@ó³ê¿KY°ç(58 INTEGER-LENGTH 51 ERROR) +(40 :MESSAGE 34 :VALUE 28 :NAME 18 :EXPECTED-TYPE 13 XCL:TYPE-MISMATCH) +( 45 "a nonnegative integer" 23 (INTEGER 0)) +ABS :D8 +(IL:L (0 NUMBER)) o@Hd3 š¿j@ó“j@Õ@òo@ó²ðo@ÕHdò'¿j@Éó²Òj@ÉÕ@É +Ö@ @ (108 %NOT-NUMBER-ERROR 101 %COMPLEX-ABS 88 %MAKE-RATIO) +(94 COMPLEX 81 RATIO 72 RATIO 60 RATIO 50 RATIO 24 IL:FLOATP) +( 40 0.0 31 0.0) +|expand-%ABS| :D8 +(IL:L (1 SI::$$MACRO-ENVIRONMENT 0 SI::$$MACRO-FORM)) @oHhNIL +NIL +( 10 (IL:OPENLAMBDA (X) (IF (< X 0) (- 0 X) X))) +(IL:SETF-MACRO-FUNCTION (QUOTE %ABS) (QUOTE |expand-%ABS|)) +SIGNUM :D8 +(IL:L (0 NUMBER)) Tj@ÿ‘@@HYãI3 ˜@jó‘kmÿHdò¿@jó•ooÃœ@d +@ (81 %NOT-NUMBER-ERROR 74 %/ 69 ABS) +(61 COMPLEX 37 IL:FLOATP 16 RATIO) +( 55 -1.0 49 1.0) +|expand-%SIGNUM| :D8 +(IL:L (1 SI::$$MACRO-ENVIRONMENT 0 SI::$$MACRO-FORM)) @oHhNIL +NIL +( 10 (IL:OPENLAMBDA (X) (COND ((EQ X 0) 0) ((PLUSP X) 1) (T -1)))) +(IL:SETF-MACRO-FUNCTION (QUOTE %SIGNUM) (QUOTE |expand-%SIGNUM|)) +XCL::STRUNCATE :D8 +(IL:L (1 DIVISOR 0 NUMBER)) tAµ9@d׿@ dò¿@É@ÉÛ3 ‘@@ Hd3 ”¿@AÛÚ@íAíìíHÃœ@A + A (113 %NOT-NONCOMPLEX-NUMBER-ERROR 106 XCL::STRUNCATE 101 %/ 56 %NOT-NONCOMPLEX-NUMBER-ERROR 17 IL:\\FIXP.FROM.FLOATP) +(93 RATIO 75 IL:FLOATP 41 RATIO 33 RATIO 24 RATIO 9 IL:FLOATP) +() +XCL::SFLOOR :D8 +(IL:L (1 DIVISOR 0 NUMBER)) GA³@ H@ÿ‘Hj@ó²ûHkÕ@A @A -jÿ‘Hjd@ó—Aó³÷HkÕAó²ïHkÕ(43 REM 33 XCL::STRUNCATE 8 XCL::STRUNCATE) NIL () XCL::SCEILING :D8 (IL:L (1 DIVISOR 0 NUMBER)) BA³@ H@ÿ‘Hj@ó³ûHkÔ@A +jÿ‘Hjd@ó—Aó³÷HkÕAó²ïHkÕ(43 REM 33 XCL::STRUNCATE 8 XCL::STRUNCATE) +NIL +() +XCL::SCEILING :D8 +(IL:L (1 DIVISOR 0 NUMBER)) BA³@ H@ÿ‘Hj@ó³ûHkÔ@A @A -jÿ¯jd@ó–Aó—HkÔAó²úH(43 REM 33 XCL::STRUNCATE 8 XCL::STRUNCATE) NIL () XCL::SROUND :D8 (IL:L (1 DIVISOR 0 NUMBER)) )A¦@ @µA˜@Aë @A - (38 IL:FIXR 33 %/ 25 IL:FIXR 7 IL:FIXR) NIL () XCL::|optimize-STRUNCATE| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) $@!H¹HdZ3 ›gIJhgNIL (33 COMPILER:PASS 21 IL:IQUOTIENT) () (IL:PUTPROP (QUOTE XCL::STRUNCATE) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE XCL::|optimize-STRUNCATE|) (GET (QUOTE XCL::STRUNCATE) (QUOTE COMPILER:OPTIMIZER-LIST)))) XCL::|optimize-SROUND| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @!H¹HZ‘J©gIhgNIL (28 COMPILER:PASS 18 IL:FIXR) () (IL:PUTPROP (QUOTE XCL::SROUND) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE XCL::|optimize-SROUND|) (GET (QUOTE XCL::SROUND) (QUOTE COMPILER:OPTIMIZER-LIST)))) TRUNCATE :D8 (IL:L (1 DIVISOR 0 NUMBER)) %A¦@ †@A -A¢@Hƒ@AHÖÕ¹HI$(15 XCL::STRUNCATE 7 XCL::STRUNCATE) NIL () FLOOR :D8 (IL:L (1 DIVISOR 0 NUMBER)) %A¦@ †@A -A¢@Hƒ@AHÖÕ¹HI$(15 XCL::SFLOOR 7 XCL::SFLOOR) NIL () CEILING :D8 (IL:L (1 DIVISOR 0 NUMBER)) %A¦@ †@A -A¢@Hƒ@AHÖÕ¹HI$(15 XCL::SCEILING 7 XCL::SCEILING) NIL () ROUND :D8 (IL:L (1 DIVISOR 0 NUMBER)) %A¦@ †@A -A¢@Hƒ@AHÖÕ¹HI$(15 XCL::SROUND 7 IL:FIXR) NIL () %INTEGER-COERCE-OPTIMIZER :D8 (IL:L (4 FLOAT-RESULT 3 CONTEXT 2 DIVISOR 1 NUMBER 0 SINGLE-VALUE-FN)) -CÉkð²@ABd‘hD™gHhHgNIL (42 COMPILER:PASS 30 FLOAT 5 COMPILER:CONTEXT) () |optimize-TRUNCATE| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @1H¹HdºB»gIJK (28 %INTEGER-COERCE-OPTIMIZER) (20 XCL::STRUNCATE) () (IL:PUTPROP (QUOTE TRUNCATE) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-TRUNCATE|) (GET (QUOTE TRUNCATE) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-FLOOR| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @1H¹HdºB»gIJK (28 %INTEGER-COERCE-OPTIMIZER) (20 XCL::SFLOOR) () (IL:PUTPROP (QUOTE FLOOR) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-FLOOR|) (GET (QUOTE FLOOR) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-CEILING| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @1H¹HdºB»gIJK (28 %INTEGER-COERCE-OPTIMIZER) (20 XCL::SCEILING) () (IL:PUTPROP (QUOTE CEILING) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-CEILING|) (GET ( QUOTE CEILING) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-ROUND| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @1H¹HdºB»gIJK (28 %INTEGER-COERCE-OPTIMIZER) (20 XCL::SROUND) () (IL:PUTPROP (QUOTE ROUND) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-ROUND|) (GET (QUOTE ROUND) (QUOTE COMPILER:OPTIMIZER-LIST)))) FTRUNCATE :D8 (IL:L (1 DIVISOR 0 NUMBER)) *A¦@ †@A -A¢@Hƒ@AHÖÕ¹HI$(15 XCL::STRUNCATE 7 XCL::STRUNCATE) (35 IL:FLOATP) () FFLOOR :D8 (IL:L (1 DIVISOR 0 NUMBER)) *A¦@ †@A -A¢@Hƒ@AHÖÕ¹HI$(15 XCL::SFLOOR 7 XCL::SFLOOR) (35 IL:FLOATP) () FCEILING :D8 (IL:L (1 DIVISOR 0 NUMBER)) *A¦@ †@A -A¢@Hƒ@AHÖÕ¹HI$(15 XCL::SCEILING 7 XCL::SCEILING) (35 IL:FLOATP) () FROUND :D8 (IL:L (1 DIVISOR 0 NUMBER)) *A¦@ †@A -A¢@Hƒ@AHÖÕ¹HI$(15 XCL::SROUND 7 IL:FIXR) (35 IL:FLOATP) () |optimize-FTRUNCATE| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@1H¹HdºB»gIJKi (30 %INTEGER-COERCE-OPTIMIZER) (20 XCL::STRUNCATE) () (IL:PUTPROP (QUOTE FTRUNCATE) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-FTRUNCATE|) ( GET (QUOTE FTRUNCATE) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-FFLOOR| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@1H¹HdºB»gIJKi (30 %INTEGER-COERCE-OPTIMIZER) (20 XCL::SFLOOR) () (IL:PUTPROP (QUOTE FFLOOR) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-FFLOOR|) (GET ( QUOTE FFLOOR) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-FCEILING| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@1H¹HdºB»gIJKi (30 %INTEGER-COERCE-OPTIMIZER) (20 XCL::SCEILING) () (IL:PUTPROP (QUOTE FCEILING) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-FCEILING|) (GET (QUOTE FCEILING) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-FROUND| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@1H¹HdºB»gIJKi (30 %INTEGER-COERCE-OPTIMIZER) (20 XCL::SROUND) () (IL:PUTPROP (QUOTE FROUND) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-FROUND|) (GET ( QUOTE FROUND) (QUOTE COMPILER:OPTIMIZER-LIST)))) MOD :D8 (IL:L (1 DIVISOR 0 NUMBER)) l@µA²D@íAíhHdIìíIíÖíìZddh첿hIì´Hh€Hì™JíIíÔí€Jí@A -jHÿ®jAó’@jj@ó“HAÔH(82 REM) (31 IL:FLOATP) () REM :D8 (IL:L (1 DIVISOR 0 NUMBER)) D@d3 ™¿A3 “@AÜ@¤A²"@íAíHdIìíIíÖíìí@A@A -ÖÕ(63 XCL::STRUNCATE) (43 IL:FLOATP) () %LOGICAL-OPTIMIZER :D8 (IL:L (4 MORE-INTEGERS 3 SECOND-INTEGER 2 FIRST-INTEGER 1 IDENTITY 0 BINARY-LOGICAL-FN)) 1B¡AC¡BD§@BCh@BCh!DYµHº@HJh¸I°ïNIL NIL () |optimize-LOGXOR| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE) IL:F 5 COMPILER::*NEW-COMPILER-IS-EXPANDING*) ,@AH¹HZ»J¼U²LŸgjIKL g(35 %LOGICAL-OPTIMIZER) (41 COMPILER:PASS 25 LOGXOR) () (IL:PUTPROP (QUOTE LOGXOR) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGXOR|) (GET ( QUOTE LOGXOR) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-LOGAND| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE) IL:F 5 COMPILER::*NEW-COMPILER-IS-EXPANDING*) .@AH¹HZ»J¼U²L²gmÿIKL g(37 %LOGICAL-OPTIMIZER) (43 COMPILER:PASS 26 LOGAND) () (IL:PUTPROP (QUOTE LOGAND) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGAND|) (GET ( QUOTE LOGAND) (QUOTE COMPILER:OPTIMIZER-LIST)))) %LOGIOR :D8 (IL:L (1 Y 0 X)) @AäNIL NIL () |expand-%LOGEQV| :D8 (IL:L (1 SI::$$MACRO-ENVIRONMENT 0 SI::$$MACRO-FORM)) !@!H¹HºggIJhhNIL (21 LOGXOR 16 LOGNOT) () (IL:SETF-MACRO-FUNCTION (QUOTE %LOGEQV) (QUOTE |expand-%LOGEQV|)) (IL:PUTPROPS %LOGIOR IL:DOPVAL (2 IL:LOGOR2)) (IL:PUTPROPS %LOGIOR IL:DMACRO (= . IL:LOGOR)) LOGIOR :D8 (IL:L (0 ARGS)) ;eHdjð‘jdkð“¿kalð–kalaäkalaälJHó‘IIJaä¹JkÔZ°òNIL NIL () LOGEQV :D8 (IL:L (0 ARGS)) EeHdjð’mÿdkð“¿kalð™kalamÿæækalamÿæælJHó‘IIJamÿææ¹JkÔZ°ïNIL NIL () |optimize-LOGIOR| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@AH¹HZ»J¼gjIKL (30 %LOGICAL-OPTIMIZER) (20 %LOGIOR) () (IL:PUTPROP (QUOTE LOGIOR) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGIOR|) (GET ( QUOTE LOGIOR) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-LOGEQV| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) "@AH¹HZ»J¼gmÿIKL (31 %LOGICAL-OPTIMIZER) (20 %LOGEQV) () (IL:PUTPROP (QUOTE LOGEQV) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGEQV|) (GET ( QUOTE LOGEQV) (QUOTE COMPILER:OPTIMIZER-LIST)))) LOGNAND :D8 (IL:L (1 INTEGER2 0 INTEGER1)) @AåmÿæNIL NIL () LOGNOR :D8 (IL:L (1 INTEGER2 0 INTEGER1)) @AämÿæNIL NIL () LOGANDC1 :D8 (IL:L (1 INTEGER2 0 INTEGER1)) @mÿæAåNIL NIL () LOGANDC2 :D8 (IL:L (1 INTEGER2 0 INTEGER1)) @AmÿæåNIL NIL () LOGORC1 :D8 (IL:L (1 INTEGER2 0 INTEGER1)) @mÿæAäNIL NIL () LOGORC2 :D8 (IL:L (1 INTEGER2 0 INTEGER1)) @AmÿæäNIL NIL () |optimize-LOGNAND| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@!H¹HºggIJhhNIL (21 LOGAND 16 LOGNOT) () (IL:PUTPROP (QUOTE LOGNAND) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGNAND|) (GET ( QUOTE LOGNAND) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-LOGNOR| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@!H¹HºggIJhhNIL (21 LOGIOR 16 LOGNOT) () (IL:PUTPROP (QUOTE LOGNOR) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGNOR|) (GET ( QUOTE LOGNOR) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-LOGANDC1| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@!H¹HºggIhJhNIL (21 LOGNOT 16 LOGAND) () (IL:PUTPROP (QUOTE LOGANDC1) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGANDC1|) (GET (QUOTE LOGANDC1) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-LOGANDC2| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@!H¹HºgIgJhhNIL (22 LOGNOT 16 LOGAND) () (IL:PUTPROP (QUOTE LOGANDC2) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGANDC2|) (GET (QUOTE LOGANDC2) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-LOGORC1| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@!H¹HºggIhJhNIL (21 LOGNOT 16 LOGIOR) () (IL:PUTPROP (QUOTE LOGORC1) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGORC1|) (GET ( QUOTE LOGORC1) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-LOGORC2| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@!H¹HºgIgJhhNIL (22 LOGNOT 16 LOGIOR) () (IL:PUTPROP (QUOTE LOGORC2) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGORC2|) (GET ( QUOTE LOGORC2) (QUOTE COMPILER:OPTIMIZER-LIST)))) (XCL::SET-CONSTANTP (QUOTE BOOLE-CLR) NIL) (IL:SETQ BOOLE-CLR 0) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-CLR))) (XCL::SET-CONSTANTP (QUOTE BOOLE-SET) NIL) (IL:SETQ BOOLE-SET 1) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-SET))) (XCL::SET-CONSTANTP (QUOTE BOOLE-1) NIL) (IL:SETQ BOOLE-1 2) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-1))) (XCL::SET-CONSTANTP (QUOTE BOOLE-2) NIL) (IL:SETQ BOOLE-2 3) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-2))) (XCL::SET-CONSTANTP (QUOTE BOOLE-C1) NIL) (IL:SETQ BOOLE-C1 4) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-C1))) (XCL::SET-CONSTANTP (QUOTE BOOLE-C2) NIL) (IL:SETQ BOOLE-C2 5) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-C2))) (XCL::SET-CONSTANTP (QUOTE BOOLE-AND) NIL) (IL:SETQ BOOLE-AND 6) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-AND))) (XCL::SET-CONSTANTP (QUOTE BOOLE-IOR) NIL) (IL:SETQ BOOLE-IOR 7) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-IOR))) (XCL::SET-CONSTANTP (QUOTE BOOLE-XOR) NIL) (IL:SETQ BOOLE-XOR 8) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-XOR))) (XCL::SET-CONSTANTP (QUOTE BOOLE-EQV) NIL) (IL:SETQ BOOLE-EQV 9) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-EQV))) (XCL::SET-CONSTANTP (QUOTE BOOLE-NAND) NIL) (IL:SETQ BOOLE-NAND 10) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-NAND))) (XCL::SET-CONSTANTP (QUOTE BOOLE-NOR) NIL) (IL:SETQ BOOLE-NOR 11) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-NOR))) (XCL::SET-CONSTANTP (QUOTE BOOLE-ANDC1) NIL) (IL:SETQ BOOLE-ANDC1 12) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-ANDC1))) (XCL::SET-CONSTANTP (QUOTE BOOLE-ANDC2) NIL) (IL:SETQ BOOLE-ANDC2 13) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-ANDC2))) (XCL::SET-CONSTANTP (QUOTE BOOLE-ORC1) NIL) (IL:SETQ BOOLE-ORC1 14) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-ORC1))) (XCL::SET-CONSTANTP (QUOTE BOOLE-ORC2) NIL) (IL:SETQ BOOLE-ORC2 15) (PROCLAIM (QUOTE (SI::CONSTANT BOOLE-ORC2))) BOOLE :D8 (IL:L (2 INTEGER2 1 INTEGER1 0 OP)) °@djð‘jdkð’mÿlð‘A@dlð‘Blð”Amÿæ@dlð•¿Bmÿælð“ABå@dlð”¿ABälð“ABæ@dl ð—¿ABmÿææl +jÿ¯jd@ó–Aó—HkÔAó²úH(43 REM 33 XCL::STRUNCATE 8 XCL::STRUNCATE) +NIL +() +XCL::SROUND :D8 +(IL:L (1 DIVISOR 0 NUMBER)) )A¦@ @µA˜@Aë @A + (38 IL:FIXR 33 %/ 25 IL:FIXR 7 IL:FIXR) +NIL +() +XCL::|optimize-STRUNCATE| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) $@!H¹HdZ3 ›gIJhgNIL +(33 COMPILER:PASS 21 IL:IQUOTIENT) +() +(IL:PUTPROP (QUOTE XCL::STRUNCATE) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE +XCL::|optimize-STRUNCATE|) (GET (QUOTE XCL::STRUNCATE) (QUOTE COMPILER:OPTIMIZER-LIST)))) +XCL::|optimize-SROUND| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @!H¹HZ‘J©gIhgNIL +(28 COMPILER:PASS 18 IL:FIXR) +() +(IL:PUTPROP (QUOTE XCL::SROUND) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE XCL::|optimize-SROUND|) + (GET (QUOTE XCL::SROUND) (QUOTE COMPILER:OPTIMIZER-LIST)))) +TRUNCATE :D8 +(IL:L (1 DIVISOR 0 NUMBER)) %A¦@ †@A +A¢@Hƒ@AHÖÕ¹HI$(15 XCL::STRUNCATE 7 XCL::STRUNCATE) +NIL +() +FLOOR :D8 +(IL:L (1 DIVISOR 0 NUMBER)) %A¦@ †@A +A¢@Hƒ@AHÖÕ¹HI$(15 XCL::SFLOOR 7 XCL::SFLOOR) +NIL +() +CEILING :D8 +(IL:L (1 DIVISOR 0 NUMBER)) %A¦@ †@A +A¢@Hƒ@AHÖÕ¹HI$(15 XCL::SCEILING 7 XCL::SCEILING) +NIL +() +ROUND :D8 +(IL:L (1 DIVISOR 0 NUMBER)) %A¦@ †@A +A¢@Hƒ@AHÖÕ¹HI$(15 XCL::SROUND 7 IL:FIXR) +NIL +() +%INTEGER-COERCE-OPTIMIZER :D8 +(IL:L (4 FLOAT-RESULT 3 CONTEXT 2 DIVISOR 1 NUMBER 0 SINGLE-VALUE-FN)) -CÉkð²@ABd‘hD™gHhHgNIL +(42 COMPILER:PASS 30 FLOAT 5 COMPILER:CONTEXT) +() +|optimize-TRUNCATE| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @1H¹HdºB»gIJK (28 %INTEGER-COERCE-OPTIMIZER) +(20 XCL::STRUNCATE) +() +(IL:PUTPROP (QUOTE TRUNCATE) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-TRUNCATE|) (GET +(QUOTE TRUNCATE) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-FLOOR| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @1H¹HdºB»gIJK (28 %INTEGER-COERCE-OPTIMIZER) +(20 XCL::SFLOOR) +() +(IL:PUTPROP (QUOTE FLOOR) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-FLOOR|) (GET (QUOTE + FLOOR) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-CEILING| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @1H¹HdºB»gIJK (28 %INTEGER-COERCE-OPTIMIZER) +(20 XCL::SCEILING) +() +(IL:PUTPROP (QUOTE CEILING) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-CEILING|) (GET ( +QUOTE CEILING) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-ROUND| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @1H¹HdºB»gIJK (28 %INTEGER-COERCE-OPTIMIZER) +(20 XCL::SROUND) +() +(IL:PUTPROP (QUOTE ROUND) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-ROUND|) (GET (QUOTE + ROUND) (QUOTE COMPILER:OPTIMIZER-LIST)))) +FTRUNCATE :D8 +(IL:L (1 DIVISOR 0 NUMBER)) *A¦@ †@A +A¢@Hƒ@AHÖÕ¹HI$(15 XCL::STRUNCATE 7 XCL::STRUNCATE) +(35 IL:FLOATP) +() +FFLOOR :D8 +(IL:L (1 DIVISOR 0 NUMBER)) *A¦@ †@A +A¢@Hƒ@AHÖÕ¹HI$(15 XCL::SFLOOR 7 XCL::SFLOOR) +(35 IL:FLOATP) +() +FCEILING :D8 +(IL:L (1 DIVISOR 0 NUMBER)) *A¦@ †@A +A¢@Hƒ@AHÖÕ¹HI$(15 XCL::SCEILING 7 XCL::SCEILING) +(35 IL:FLOATP) +() +FROUND :D8 +(IL:L (1 DIVISOR 0 NUMBER)) *A¦@ †@A +A¢@Hƒ@AHÖÕ¹HI$(15 XCL::SROUND 7 IL:FIXR) +(35 IL:FLOATP) +() +|optimize-FTRUNCATE| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@1H¹HdºB»gIJKi (30 %INTEGER-COERCE-OPTIMIZER) +(20 XCL::STRUNCATE) +() +(IL:PUTPROP (QUOTE FTRUNCATE) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-FTRUNCATE|) ( +GET (QUOTE FTRUNCATE) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-FFLOOR| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@1H¹HdºB»gIJKi (30 %INTEGER-COERCE-OPTIMIZER) +(20 XCL::SFLOOR) +() +(IL:PUTPROP (QUOTE FFLOOR) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-FFLOOR|) (GET ( +QUOTE FFLOOR) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-FCEILING| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@1H¹HdºB»gIJKi (30 %INTEGER-COERCE-OPTIMIZER) +(20 XCL::SCEILING) +() +(IL:PUTPROP (QUOTE FCEILING) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-FCEILING|) (GET +(QUOTE FCEILING) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-FROUND| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@1H¹HdºB»gIJKi (30 %INTEGER-COERCE-OPTIMIZER) +(20 XCL::SROUND) +() +(IL:PUTPROP (QUOTE FROUND) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-FROUND|) (GET ( +QUOTE FROUND) (QUOTE COMPILER:OPTIMIZER-LIST)))) +MOD :D8 +(IL:L (1 DIVISOR 0 NUMBER)) l@µA²D@íAíhHdIìíIíÖíìZddh첿hIì´Hh€Hì™JíIíÔí€Jí@A +jHÿ®jAó’@jj@ó“HAÔH(82 REM) +(31 IL:FLOATP) +() +REM :D8 +(IL:L (1 DIVISOR 0 NUMBER)) D@d3 ™¿A3 “@AÜ@¤A²"@íAíHdIìíIíÖíìí@A@A +ÖÕ(63 XCL::STRUNCATE) +(43 IL:FLOATP) +() +%LOGICAL-OPTIMIZER :D8 +(IL:L (4 MORE-INTEGERS 3 SECOND-INTEGER 2 FIRST-INTEGER 1 IDENTITY 0 BINARY-LOGICAL-FN)) 1B¡AC¡BD§@BCh@BCh!DYµHº@HJh¸I°ïNIL +NIL +() +|optimize-LOGXOR| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE) IL:F 5 COMPILER::*NEW-COMPILER-IS-EXPANDING*) ,@AH¹HZ»J¼U²LŸgjIKL g(35 %LOGICAL-OPTIMIZER) +(41 COMPILER:PASS 25 LOGXOR) +() +(IL:PUTPROP (QUOTE LOGXOR) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGXOR|) (GET ( +QUOTE LOGXOR) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-LOGAND| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE) IL:F 5 COMPILER::*NEW-COMPILER-IS-EXPANDING*) .@AH¹HZ»J¼U²L²gmÿIKL g(37 %LOGICAL-OPTIMIZER) +(43 COMPILER:PASS 26 LOGAND) +() +(IL:PUTPROP (QUOTE LOGAND) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGAND|) (GET ( +QUOTE LOGAND) (QUOTE COMPILER:OPTIMIZER-LIST)))) +%LOGIOR :D8 +(IL:L (1 Y 0 X)) @AäNIL +NIL +() +|expand-%LOGEQV| :D8 +(IL:L (1 SI::$$MACRO-ENVIRONMENT 0 SI::$$MACRO-FORM)) !@!H¹HºggIJhhNIL +(21 LOGXOR 16 LOGNOT) +() +(IL:SETF-MACRO-FUNCTION (QUOTE %LOGEQV) (QUOTE |expand-%LOGEQV|)) +(IL:PUTPROPS %LOGIOR IL:DOPVAL (2 IL:LOGOR2)) +(IL:PUTPROPS %LOGIOR IL:DMACRO (= . IL:LOGOR)) +LOGIOR :D8 +(IL:L (0 ARGS)) ;eHdjð‘jdkð“¿kalð–kalaäkalaälJHó‘IIJaä¹JkÔZ°òNIL +NIL +() +LOGEQV :D8 +(IL:L (0 ARGS)) EeHdjð’mÿdkð“¿kalð™kalamÿæækalamÿæælJHó‘IIJamÿææ¹JkÔZ°ïNIL +NIL +() +|optimize-LOGIOR| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@AH¹HZ»J¼gjIKL (30 %LOGICAL-OPTIMIZER) +(20 %LOGIOR) +() +(IL:PUTPROP (QUOTE LOGIOR) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGIOR|) (GET ( +QUOTE LOGIOR) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-LOGEQV| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) "@AH¹HZ»J¼gmÿIKL (31 %LOGICAL-OPTIMIZER) +(20 %LOGEQV) +() +(IL:PUTPROP (QUOTE LOGEQV) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGEQV|) (GET ( +QUOTE LOGEQV) (QUOTE COMPILER:OPTIMIZER-LIST)))) +LOGNAND :D8 +(IL:L (1 INTEGER2 0 INTEGER1)) @AåmÿæNIL +NIL +() +LOGNOR :D8 +(IL:L (1 INTEGER2 0 INTEGER1)) @AämÿæNIL +NIL +() +LOGANDC1 :D8 +(IL:L (1 INTEGER2 0 INTEGER1)) @mÿæAåNIL +NIL +() +LOGANDC2 :D8 +(IL:L (1 INTEGER2 0 INTEGER1)) @AmÿæåNIL +NIL +() +LOGORC1 :D8 +(IL:L (1 INTEGER2 0 INTEGER1)) @mÿæAäNIL +NIL +() +LOGORC2 :D8 +(IL:L (1 INTEGER2 0 INTEGER1)) @AmÿæäNIL +NIL +() +|optimize-LOGNAND| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@!H¹HºggIJhhNIL +(21 LOGAND 16 LOGNOT) +() +(IL:PUTPROP (QUOTE LOGNAND) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGNAND|) (GET ( +QUOTE LOGNAND) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-LOGNOR| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@!H¹HºggIJhhNIL +(21 LOGIOR 16 LOGNOT) +() +(IL:PUTPROP (QUOTE LOGNOR) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGNOR|) (GET ( +QUOTE LOGNOR) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-LOGANDC1| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@!H¹HºggIhJhNIL +(21 LOGNOT 16 LOGAND) +() +(IL:PUTPROP (QUOTE LOGANDC1) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGANDC1|) (GET +(QUOTE LOGANDC1) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-LOGANDC2| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@!H¹HºgIgJhhNIL +(22 LOGNOT 16 LOGAND) +() +(IL:PUTPROP (QUOTE LOGANDC2) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGANDC2|) (GET +(QUOTE LOGANDC2) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-LOGORC1| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@!H¹HºggIhJhNIL +(21 LOGNOT 16 LOGIOR) +() +(IL:PUTPROP (QUOTE LOGORC1) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGORC1|) (GET ( +QUOTE LOGORC1) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-LOGORC2| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) !@!H¹HºgIgJhhNIL +(22 LOGNOT 16 LOGIOR) +() +(IL:PUTPROP (QUOTE LOGORC2) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGORC2|) (GET ( +QUOTE LOGORC2) (QUOTE COMPILER:OPTIMIZER-LIST)))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-CLR) NIL) +(IL:SETQ BOOLE-CLR 0) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-CLR))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-SET) NIL) +(IL:SETQ BOOLE-SET 1) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-SET))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-1) NIL) +(IL:SETQ BOOLE-1 2) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-1))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-2) NIL) +(IL:SETQ BOOLE-2 3) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-2))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-C1) NIL) +(IL:SETQ BOOLE-C1 4) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-C1))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-C2) NIL) +(IL:SETQ BOOLE-C2 5) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-C2))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-AND) NIL) +(IL:SETQ BOOLE-AND 6) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-AND))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-IOR) NIL) +(IL:SETQ BOOLE-IOR 7) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-IOR))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-XOR) NIL) +(IL:SETQ BOOLE-XOR 8) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-XOR))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-EQV) NIL) +(IL:SETQ BOOLE-EQV 9) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-EQV))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-NAND) NIL) +(IL:SETQ BOOLE-NAND 10) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-NAND))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-NOR) NIL) +(IL:SETQ BOOLE-NOR 11) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-NOR))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-ANDC1) NIL) +(IL:SETQ BOOLE-ANDC1 12) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-ANDC1))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-ANDC2) NIL) +(IL:SETQ BOOLE-ANDC2 13) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-ANDC2))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-ORC1) NIL) +(IL:SETQ BOOLE-ORC1 14) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-ORC1))) +(XCL::SET-CONSTANTP (QUOTE BOOLE-ORC2) NIL) +(IL:SETQ BOOLE-ORC2 15) +(PROCLAIM (QUOTE (SI::CONSTANT BOOLE-ORC2))) +BOOLE :D8 +(IL:L (2 INTEGER2 1 INTEGER1 0 OP)) °@djð‘jdkð’mÿlð‘A@dlð‘Blð”Amÿæ@dlð•¿Bmÿælð“ABå@dlð”¿ABälð“ABæ@dl ð—¿ABmÿææl ð–ABåmÿæ@dl ð—¿ABämÿæl ð–AmÿæBå@dl ð—¿ABmÿæålð–AmÿæBä@lð–ABmÿæäo@ -(173 ERROR) NIL ( 167 "Not a valid op: ~s") LOGTEST :D8 (IL:L (1 INTEGER2 0 INTEGER1)) @AåjðhðNIL NIL () LOGBITP :D8 (IL:L (1 INTEGER 0 INDEX)) Aj@ÕçkåkðNIL NIL () |definline-LOGBITP| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @oHNIL NIL ( 9 (LAMBDA (INDEX INTEGER) (BLOCK LOGBITP (EQ 1 (LOGAND 1 (ASH INTEGER (- INDEX))))))) (IL:PUTPROP (QUOTE LOGBITP) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |definline-LOGBITP|) (GET ( QUOTE LOGBITP) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-LOGTEST| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) +@!H¹HºggjgIJhhhNIL (27 LOGAND 21 EQ 16 NOT) () (IL:PUTPROP (QUOTE LOGTEST) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGTEST|) (GET ( QUOTE LOGTEST) (QUOTE COMPILER:OPTIMIZER-LIST)))) ASH :D8 (IL:L (1 COUNT 0 INTEGER)) @AçNIL NIL () (IL:PUTPROPS ASH IL:DOPVAL (2 IL:LSH)) (IL:PUTPROPS ASH IL:DMACRO (= . IL:LSH)) LOGCOUNT :D8 (IL:L (0 INTEGER)) !j@ó–@mÿæb€@æ@ @ (30 %BIGNUM-LOGCOUNT 23 %LOGCOUNT) (16 BIGNUM) () %LOGCOUNT :D8 (IL:L (0 POSITIVE-INTEGER)) j@jð‘HHkÔ¸@dkÕåb°ðNIL NIL () %BIGNUM-LOGCOUNT :D8 (IL:L (0 BIGNUM)) "@Éj"HZµI»IK Ô¹J°î(26 %LOGCOUNT) (5 BIGNUM) () INTEGER-LENGTH :D8 (IL:L (0 INTEGER)) ©j@ó–mÿ@Õb¿o@󢱈n@ó²=l@ó²l@ó™l@ó‘@ll@ó’lll@@óšl @ó’lll€@ó’lln@ó² n@ó›n@ó’l l -n@ó’l l n@@ó›n @ó’l ln€@ó’lll@mðç Ô(165 INTEGER-LENGTH) NIL ( 15 65536) %LLSH8 :D8 (IL:L (0 X)) @áNIL NIL () %LLSH1 :D8 (IL:L (0 X)) @àNIL NIL () %LRSH8 :D8 (IL:L (0 X)) @ãNIL NIL () %LRSH1 :D8 (IL:L (0 X)) @âNIL NIL () (IL:PUTPROPS %LLSH8 IL:DOPVAL (1 IL:LLSH8)) (IL:PUTPROPS %LLSH1 IL:DOPVAL (1 IL:LLSH1)) (IL:PUTPROPS %LRSH8 IL:DOPVAL (1 IL:LRSH8)) (IL:PUTPROPS %LRSH1 IL:DOPVAL (1 IL:LRSH1)) IL:|optimize-LLSH| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE) IL:F 6 COMPILER::*NEW-COMPILER-IS-EXPANDING*) ^@QH¹HºV²J ´J [3 µg¼jLó³öI½lKó³gMh½KlÕ»°ëKjóŸgMh½KkÕ[°ïM(28 EVAL 20 CONSTANTP) (79 %LLSH1 58 %LLSH8 38 COMPILER:PASS) () (IL:PUTPROP (QUOTE IL:LLSH) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-LLSH|) (GET ( QUOTE IL:LLSH) (QUOTE COMPILER:OPTIMIZER-LIST)))) IL:|optimize-LRSH| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE) IL:F 6 COMPILER::*NEW-COMPILER-IS-EXPANDING*) ^@QH¹HºV²J ´J [3 µg¼jLó³öI½lKó³gMh½KlÕ»°ëKjóŸgMh½KkÕ[°ïM(28 EVAL 20 CONSTANTP) (79 %LRSH1 58 %LRSH8 38 COMPILER:PASS) () (IL:PUTPROP (QUOTE IL:LRSH) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-LRSH|) (GET ( QUOTE IL:LRSH) (QUOTE COMPILER:OPTIMIZER-LIST)))) BYTE :D8 (IL:L (1 POSITION 0 SIZE)) -j@ó£jAóœo@A n@óœnAó–@lçAÔ@A(19 ERROR) NIL ( 12 "Not a valid bytespec: ~s ~s") BYTE-SIZE :D8 (IL:L (0 BYTESPEC)) @d“møçNIL NIL () |definline-BYTE-SIZE| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @oHNIL NIL ( 9 (LAMBDA (BYTESPEC) (BLOCK BYTE-SIZE (IF (TYPEP BYTESPEC (QUOTE FIXNUM)) (ASH BYTESPEC -8) (CAR BYTESPEC))))) (IL:PUTPROP (QUOTE BYTE-SIZE) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |definline-BYTE-SIZE|) ( GET (QUOTE BYTE-SIZE) (QUOTE COMPILER:OPTIMIZER-LIST)))) BYTE-POSITION :D8 (IL:L (0 BYTESPEC)) @d“lÿåNIL NIL () |definline-BYTE-POSITION| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @oHNIL NIL ( 9 (LAMBDA (BYTESPEC) (BLOCK BYTE-POSITION (IF (TYPEP BYTESPEC (QUOTE FIXNUM)) (LOGAND BYTESPEC 255) (CDR BYTESPEC))))) (IL:PUTPROP (QUOTE BYTE-POSITION) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |definline-BYTE-POSITION|) (GET (QUOTE BYTE-POSITION) (QUOTE COMPILER:OPTIMIZER-LIST)))) OPTIMIZE-BYTE :D8 (IL:L (1 POSITION 0 SIZE)) C@H´H¹jIóhð´Ilÿóhð²#AH´H¹jIóhð´Ilÿóhð–@lçAÔgNIL (64 COMPILER:PASS) () (IL:PUTPROPS BYTE IL:DMACRO (IL:ARGS (OPTIMIZE-BYTE (CAR IL:ARGS) (CADR IL:ARGS)))) LDB :D8 (IL:L (1 INTEGER 0 BYTESPEC)) $@d“møç€@d“lÿå€AjIÕçkHçkÕåNIL NIL () DPB :D8 (IL:L (2 INTEGER 1 BYTESPEC 0 NEWBYTE)) /Ad“møç€Ad“lÿå€@kHçkÕåIçBkHçkÕIçmÿæåäNIL NIL () MASK-FIELD :D8 (IL:L (1 INTEGER 0 BYTESPEC)) "@d“møç€@d“lÿå€AkHçkÕIçåNIL NIL () DEPOSIT-FIELD :D8 (IL:L (2 INTEGER 1 BYTESPEC 0 NEWBYTE)) ,Ad“møç€!Ad“lÿ倹kHçkÕIçº@JåBJmÿæåäNIL NIL () %CONSTANT-BYTESPEC-P :D8 (IL:L (0 BYTESPEC)) *@d³$´!@gð´@3 ´@3 ´@ (39 EVAL) (15 BYTE) () |optimize-LDB| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) a@QH¹HºI [µgd“møç€Kd“lÿ倽¼jMÿŸgJkLçkÕhggJjMÕhkLçkÕh(17 %CONSTANT-BYTESPEC-P) (77 ASH 72 LOGAND 56 LOGAND 25 COMPILER:PASS) () (IL:PUTPROP (QUOTE LDB) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LDB|) (GET (QUOTE LDB ) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-DPB| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) ¢@qH¹HZ»J¼K ]µgd“møç€Md“lÿå€_¿¾jOÿ²-ggIkNçkÕhgLkNçkÕmÿæhhgggIkNçkÕhOhgLkNçkÕOçmÿæhh(22 %CONSTANT-BYTESPEC-P) (139 LOGAND 118 LOGAND 113 ASH 108 LOGIOR 85 LOGAND 70 LOGAND 65 LOGIOR 30 COMPILER:PASS) () (IL:PUTPROP (QUOTE DPB) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-DPB|) (GET (QUOTE DPB ) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-MASK-FIELD| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) C@QH¹HºI [µgd“møç€Kd“lÿ倽¼gJkLçkÕMçh(17 %CONSTANT-BYTESPEC-P) (52 LOGAND 25 COMPILER:PASS) () (IL:PUTPROP (QUOTE MASK-FIELD) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-MASK-FIELD|) ( GET (QUOTE MASK-FIELD) (QUOTE COMPILER:OPTIMIZER-LIST)))) |optimize-DEPOSIT-FIELD| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) h @H¹HZ»J¼K ]µgd“mø瀾Md“lÿå€_¿kNçkÕOç_¿ggIOhgLOmÿæhh(22 %CONSTANT-BYTESPEC-P) (87 LOGAND 75 LOGAND 70 LOGIOR 30 COMPILER:PASS) () (IL:PUTPROP (QUOTE DEPOSIT-FIELD) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-DEPOSIT-FIELD|) (GET (QUOTE DEPOSIT-FIELD) (QUOTE COMPILER:OPTIMIZER-LIST)))) LDB-TEST :D8 (IL:L (1 INTEGER 0 BYTESPEC)) @A -jðhð(6 LDB) NIL () |optimize-LDB-TEST| :D8 (IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) +@!H¹HºggjgIJhhhNIL (27 LDB 21 EQ 16 NOT) () (IL:PUTPROP (QUOTE LDB-TEST) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LDB-TEST|) (GET (QUOTE LDB-TEST) (QUOTE COMPILER:OPTIMIZER-LIST)))) (IL:PUTPROPS IL:CMLARITH IL:MAKEFILE-ENVIRONMENT (:READTABLE "XCL" :PACKAGE "LISP")) (IL:PUTPROPS IL:CMLARITH IL:FILETYPE COMPILE-FILE) (IL:PUTPROPS IL:CMLARITH IL:COPYRIGHT ("Venue & Xerox Corporation" 1985 1986 1987 1988 1989 1990 1993) ) NIL \ No newline at end of file +(173 ERROR) +NIL +( 167 "Not a valid op: ~s") +LOGTEST :D8 +(IL:L (1 INTEGER2 0 INTEGER1)) @AåjðhðNIL +NIL +() +LOGBITP :D8 +(IL:L (1 INTEGER 0 INDEX)) Aj@ÕçkåkðNIL +NIL +() +|definline-LOGBITP| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @oHNIL +NIL +( 9 (LAMBDA (INDEX INTEGER) (BLOCK LOGBITP (EQ 1 (LOGAND 1 (ASH INTEGER (- INDEX))))))) +(IL:PUTPROP (QUOTE LOGBITP) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |definline-LOGBITP|) (GET ( +QUOTE LOGBITP) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-LOGTEST| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) +@!H¹HºggjgIJhhhNIL +(27 LOGAND 21 EQ 16 NOT) +() +(IL:PUTPROP (QUOTE LOGTEST) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LOGTEST|) (GET ( +QUOTE LOGTEST) (QUOTE COMPILER:OPTIMIZER-LIST)))) +ASH :D8 +(IL:L (1 COUNT 0 INTEGER)) @AçNIL +NIL +() +(IL:PUTPROPS ASH IL:DOPVAL (2 IL:LSH)) +(IL:PUTPROPS ASH IL:DMACRO (= . IL:LSH)) +LOGCOUNT :D8 +(IL:L (0 INTEGER)) !j@ó–@mÿæb€@æ@ @ (30 %BIGNUM-LOGCOUNT 23 %LOGCOUNT) +(16 BIGNUM) +() +%LOGCOUNT :D8 +(IL:L (0 POSITIVE-INTEGER)) j@jð‘HHkÔ¸@dkÕåb°ðNIL +NIL +() +%BIGNUM-LOGCOUNT :D8 +(IL:L (0 BIGNUM)) "@Éj"HZµI»IK Ô¹J°î(26 %LOGCOUNT) +(5 BIGNUM) +() +INTEGER-LENGTH :D8 +(IL:L (0 INTEGER)) ©j@ó–mÿ@Õb¿o@󢱈n@ó²=l@ó²l@ó™l@ó‘@ll@ó’lll@@óšl @ó’lll€@ó’lln@ó² n@ó›n@ó’l l +n@ó’l l n@@ó›n @ó’l ln€@ó’lll@mðç Ô(165 INTEGER-LENGTH) +NIL +( 15 65536) +%LLSH8 :D8 +(IL:L (0 X)) @áNIL +NIL +() +%LLSH1 :D8 +(IL:L (0 X)) @àNIL +NIL +() +%LRSH8 :D8 +(IL:L (0 X)) @ãNIL +NIL +() +%LRSH1 :D8 +(IL:L (0 X)) @âNIL +NIL +() +(IL:PUTPROPS %LLSH8 IL:DOPVAL (1 IL:LLSH8)) +(IL:PUTPROPS %LLSH1 IL:DOPVAL (1 IL:LLSH1)) +(IL:PUTPROPS %LRSH8 IL:DOPVAL (1 IL:LRSH8)) +(IL:PUTPROPS %LRSH1 IL:DOPVAL (1 IL:LRSH1)) +IL:|optimize-LLSH| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE) IL:F 6 COMPILER::*NEW-COMPILER-IS-EXPANDING*) ^@QH¹HºV²J ´J [3 µg¼jLó³öI½lKó³gMh½KlÕ»°ëKjóŸgMh½KkÕ[°ïM(28 EVAL 20 CONSTANTP) +(79 %LLSH1 58 %LLSH8 38 COMPILER:PASS) +() +(IL:PUTPROP (QUOTE IL:LLSH) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-LLSH|) (GET ( +QUOTE IL:LLSH) (QUOTE COMPILER:OPTIMIZER-LIST)))) +IL:|optimize-LRSH| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE) IL:F 6 COMPILER::*NEW-COMPILER-IS-EXPANDING*) ^@QH¹HºV²J ´J [3 µg¼jLó³öI½lKó³gMh½KlÕ»°ëKjóŸgMh½KkÕ[°ïM(28 EVAL 20 CONSTANTP) +(79 %LRSH1 58 %LRSH8 38 COMPILER:PASS) +() +(IL:PUTPROP (QUOTE IL:LRSH) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE IL:|optimize-LRSH|) (GET ( +QUOTE IL:LRSH) (QUOTE COMPILER:OPTIMIZER-LIST)))) +BYTE :D8 +(IL:L (1 POSITION 0 SIZE)) -j@ó£jAóœo@A n@óœnAó–@lçAÔ@A(19 ERROR) +NIL +( 12 "Not a valid bytespec: ~s ~s") +BYTE-SIZE :D8 +(IL:L (0 BYTESPEC)) @d“møçNIL +NIL +() +|definline-BYTE-SIZE| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @oHNIL +NIL +( 9 (LAMBDA (BYTESPEC) (BLOCK BYTE-SIZE (IF (TYPEP BYTESPEC (QUOTE FIXNUM)) (ASH BYTESPEC -8) (CAR BYTESPEC))))) +(IL:PUTPROP (QUOTE BYTE-SIZE) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |definline-BYTE-SIZE|) ( +GET (QUOTE BYTE-SIZE) (QUOTE COMPILER:OPTIMIZER-LIST)))) +BYTE-POSITION :D8 +(IL:L (0 BYTESPEC)) @d“lÿåNIL +NIL +() +|definline-BYTE-POSITION| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) @oHNIL +NIL +( 9 (LAMBDA (BYTESPEC) (BLOCK BYTE-POSITION (IF (TYPEP BYTESPEC (QUOTE FIXNUM)) (LOGAND BYTESPEC 255) (CDR BYTESPEC))))) +(IL:PUTPROP (QUOTE BYTE-POSITION) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE +|definline-BYTE-POSITION|) (GET (QUOTE BYTE-POSITION) (QUOTE COMPILER:OPTIMIZER-LIST)))) +OPTIMIZE-BYTE :D8 +(IL:L (1 POSITION 0 SIZE)) C@H´H¹jIóhð´Ilÿóhð²#AH´H¹jIóhð´Ilÿóhð–@lçAÔgNIL +(64 COMPILER:PASS) +() +(IL:PUTPROPS BYTE IL:DMACRO (IL:ARGS (OPTIMIZE-BYTE (CAR IL:ARGS) (CADR IL:ARGS)))) +LDB :D8 +(IL:L (1 INTEGER 0 BYTESPEC)) $@d“møç€@d“lÿå€AjIÕçkHçkÕåNIL +NIL +() +DPB :D8 +(IL:L (2 INTEGER 1 BYTESPEC 0 NEWBYTE)) /Ad“møç€Ad“lÿå€@kHçkÕåIçBkHçkÕIçmÿæåäNIL +NIL +() +MASK-FIELD :D8 +(IL:L (1 INTEGER 0 BYTESPEC)) "@d“møç€@d“lÿå€AkHçkÕIçåNIL +NIL +() +DEPOSIT-FIELD :D8 +(IL:L (2 INTEGER 1 BYTESPEC 0 NEWBYTE)) ,Ad“møç€!Ad“lÿ倹kHçkÕIçº@JåBJmÿæåäNIL +NIL +() +%CONSTANT-BYTESPEC-P :D8 +(IL:L (0 BYTESPEC)) *@d³$´!@gð´@3 ´@3 ´@ (39 EVAL) +(15 BYTE) +() +|optimize-LDB| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) a@QH¹HºI [µgd“møç€Kd“lÿ倽¼jMÿŸgJkLçkÕhggJjMÕhkLçkÕh(17 %CONSTANT-BYTESPEC-P) +(77 ASH 72 LOGAND 56 LOGAND 25 COMPILER:PASS) +() +(IL:PUTPROP (QUOTE LDB) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LDB|) (GET (QUOTE LDB +) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-DPB| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) ¢@qH¹HZ»J¼K ]µgd“møç€Md“lÿå€_¿¾jOÿ²-ggIkNçkÕhgLkNçkÕmÿæhhgggIkNçkÕhOhgLkNçkÕOçmÿæhh(22 %CONSTANT-BYTESPEC-P) +(139 LOGAND 118 LOGAND 113 ASH 108 LOGIOR 85 LOGAND 70 LOGAND 65 LOGIOR 30 COMPILER:PASS) +() +(IL:PUTPROP (QUOTE DPB) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-DPB|) (GET (QUOTE DPB +) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-MASK-FIELD| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) C@QH¹HºI [µgd“møç€Kd“lÿ倽¼gJkLçkÕMçh(17 %CONSTANT-BYTESPEC-P) +(52 LOGAND 25 COMPILER:PASS) +() +(IL:PUTPROP (QUOTE MASK-FIELD) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-MASK-FIELD|) ( +GET (QUOTE MASK-FIELD) (QUOTE COMPILER:OPTIMIZER-LIST)))) +|optimize-DEPOSIT-FIELD| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) h @H¹HZ»J¼K ]µgd“mø瀾Md“lÿå€_¿kNçkÕOç_¿ggIOhgLOmÿæhh(22 %CONSTANT-BYTESPEC-P) +(87 LOGAND 75 LOGAND 70 LOGIOR 30 COMPILER:PASS) +() +(IL:PUTPROP (QUOTE DEPOSIT-FIELD) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE +|optimize-DEPOSIT-FIELD|) (GET (QUOTE DEPOSIT-FIELD) (QUOTE COMPILER:OPTIMIZER-LIST)))) +LDB-TEST :D8 +(IL:L (1 INTEGER 0 BYTESPEC)) @A +jðhð(6 LDB) +NIL +() +|optimize-LDB-TEST| :D8 +(IL:L (2 IL:$$CTX 1 IL:$$ENV 0 IL:$$WHOLE)) +@!H¹HºggjgIJhhhNIL +(27 LDB 21 EQ 16 NOT) +() +(IL:PUTPROP (QUOTE LDB-TEST) (QUOTE COMPILER:OPTIMIZER-LIST) (ADJOIN (QUOTE |optimize-LDB-TEST|) (GET +(QUOTE LDB-TEST) (QUOTE COMPILER:OPTIMIZER-LIST)))) +(IL:PUTPROPS IL:CMLARITH IL:MAKEFILE-ENVIRONMENT (:READTABLE "XCL" :PACKAGE "LISP")) +(IL:PUTPROPS IL:CMLARITH IL:FILETYPE COMPILE-FILE) +(IL:PUTPROPS IL:CMLARITH IL:COPYRIGHT ("Venue & Xerox Corporation" 1985 1986 1987 1988 1989 1990 1993) +) +NIL diff --git a/sources/CMLARRAY.LCOM b/sources/CMLARRAY.LCOM index 9ed54aa93..dab5560bd 100644 Binary files a/sources/CMLARRAY.LCOM and b/sources/CMLARRAY.LCOM differ diff --git a/sources/CMLCHARACTER.LCOM b/sources/CMLCHARACTER.LCOM index 4c067961c..ed86fbb82 100644 Binary files a/sources/CMLCHARACTER.LCOM and b/sources/CMLCHARACTER.LCOM differ diff --git a/sources/CMLMISCIO.LCOM b/sources/CMLMISCIO.LCOM index c2a16091d..28613df21 100644 Binary files a/sources/CMLMISCIO.LCOM and b/sources/CMLMISCIO.LCOM differ diff --git a/sources/CMLPRINT.LCOM b/sources/CMLPRINT.LCOM index 7fe085af7..82c4ec630 100644 Binary files a/sources/CMLPRINT.LCOM and b/sources/CMLPRINT.LCOM differ diff --git a/sources/CMLREAD b/sources/CMLREAD index 2a54d6777..182636b3d 100644 --- a/sources/CMLREAD +++ b/sources/CMLREAD @@ -1,34 +1,36 @@ -(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "19-Jan-93 10:25:51" {DSK}lde>lispcore>sources>CMLREAD.;2 15363 +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS) +(FILECREATED " 9-Jul-2021 08:09:06"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>CMLREAD.;9 12772 changes to%: (RECORDS READER-ENVIRONMENT) - previous date%: " 4-Jan-93 17:53:43" {DSK}lde>lispcore>sources>CMLREAD.;1) + previous date%: " 3-Jul-2021 13:32:59" +{DSK}kaplan>Local>medley3.5>git-medley>sources>CMLREAD.;8) (* ; " -Copyright (c) 1985, 1986, 1987, 1988, 1990, 1993 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1985-1988, 1990, 1993, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT CMLREADCOMS) -(RPAQQ CMLREADCOMS +(RPAQQ CMLREADCOMS [(COMS - (* ;; "Misc Common Lisp reader functions") + (* ;; "Misc Common Lisp reader functions") (FNS CL:COPY-READTABLE) (FNS CL:READ-LINE CL:READ-CHAR CL:UNREAD-CHAR CL:PEEK-CHAR CL:LISTEN CL:READ-CHAR-NO-HANG CL:CLEAR-INPUT CL:READ-FROM-STRING CL:READ-BYTE CL:WRITE-BYTE ) - (* ; - "must turn off packed version of CLISP infix") + (* ; + "must turn off packed version of CLISP infix") (VARS [CLISPCHARS (LDIFFERENCE CLISPCHARS '(- *] (CLISPCHARRAY (MAKEBITTABLE CLISPCHARS)) (DWIMINMACROSFLG)) (VARIABLES *READ-DEFAULT-FLOAT-FORMAT*) (GLOBALVARS CMLRDTBL READ-LINE-RDTBL)) [COMS - (* ;; "Crude means to aid reading and printing things in same reader environment. There are some fns and an INITRECORDS for this on ATBL to get it early in the loadup") + (* ;; "Crude means to aid reading and printing things in same reader environment. There are some fns and an INITRECORDS for this on ATBL to get it early in the loadup") (RECORDS READER-ENVIRONMENT) (FUNCTIONS WITH-READER-ENVIRONMENT) @@ -37,7 +39,8 @@ Copyright (c) 1985, 1986, 1987, 1988, 1990, 1993 by Venue & Xerox Corporation. (GLOBALVARS *COMMON-LISP-READ-ENVIRONMENT*) (INITVARS (*COMMON-LISP-READ-ENVIRONMENT* (create READER-ENVIRONMENT REPACKAGE _ (CL:FIND-PACKAGE "USER") - REREADTABLE _ CMLRDTBL REBASE _ 10] + REREADTABLE _ CMLRDTBL REBASE _ 10 + REFORMAT _ :XCCS] (PROP FILETYPE CMLREAD) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) @@ -93,9 +96,9 @@ Copyright (c) 1985, 1986, 1987, 1988, 1990, 1993 by Venue & Xerox Corporation. (CL:READ-CHAR [CL:LAMBDA (&OPTIONAL (STREAM *STANDARD-INPUT*) (EOF-ERRORP T) - EOF-VALUE RECURSIVE-P) (* ; "Edited 14-Dec-86 20:41 by bvm:") + EOF-VALUE RECURSIVE-P) (* ; "Edited 14-Dec-86 20:41 by bvm:") - (* ;; "Inputs a character from STREAM and returns it.") + (* ;; "Inputs a character from STREAM and returns it.") (LET [(STREAM (\GETSTREAM STREAM 'INPUT] (COND @@ -106,12 +109,12 @@ Copyright (c) 1985, 1986, 1987, 1988, 1990, 1993 by Venue & Xerox Corporation. (T (CL:CODE-CHAR (READCCODE STREAM]) (CL:UNREAD-CHAR - (CL:LAMBDA (CHARACTER &OPTIONAL (INPUT-STREAM *STANDARD-INPUT*)) - (* bvm%: "13-Oct-86 15:44") + (CL:LAMBDA (CHARACTER &OPTIONAL (INPUT-STREAM *STANDARD-INPUT*)) + (* ; "Edited 23-Jun-2021 13:05 by rmk:") - (* ;; "Puts the CHARACTER back on the front of the input STREAM. According to the manual, `One may apply UNREAD-CHAR only to the character most recently read from INPUT-STREAM.'") + (* ;; "Puts the CHARACTER back on the front of the input STREAM. According to the manual, `One may apply UNREAD-CHAR only to the character most recently read from INPUT-STREAM.'") - (\BACKCHAR (\GETSTREAM INPUT-STREAM 'INPUT)) + (\BACKCCODE (\GETSTREAM INPUT-STREAM 'INPUT)) NIL)) (CL:PEEK-CHAR @@ -237,28 +240,31 @@ Copyright (c) 1985, 1986, 1987, 1988, 1990, 1993 by Venue & Xerox Corporation. (DECLARE%: EVAL@COMPILE -(DATATYPE READER-ENVIRONMENT (REPACKAGE REREADTABLE REBASE RESPEC)) +(DATATYPE READER-ENVIRONMENT (REPACKAGE REREADTABLE REBASE NIL REFORMAT)) ) -(/DECLAREDATATYPE 'READER-ENVIRONMENT '(POINTER POINTER POINTER POINTER) +(/DECLAREDATATYPE 'READER-ENVIRONMENT '(POINTER POINTER POINTER POINTER POINTER) '((READER-ENVIRONMENT 0 POINTER) (READER-ENVIRONMENT 2 POINTER) (READER-ENVIRONMENT 4 POINTER) - (READER-ENVIRONMENT 6 POINTER)) - '8) + (READER-ENVIRONMENT 6 POINTER) + (READER-ENVIRONMENT 8 POINTER)) + '10) (DEFMACRO WITH-READER-ENVIRONMENT (ENV . BODY) `((CL:LAMBDA (E) (LET ((*PACKAGE* (ffetch (READER-ENVIRONMENT REPACKAGE) of E)) (*READTABLE* (ffetch (READER-ENVIRONMENT REREADTABLE) of E)) (*READ-BASE* (ffetch (READER-ENVIRONMENT REBASE) of E)) - (*PRINT-BASE* (ffetch (READER-ENVIRONMENT REBASE) of E))) + (*PRINT-BASE* (ffetch (READER-ENVIRONMENT REBASE) of E)) + (*EXTERNALFORMAT* (ffetch (READER-ENVIRONMENT REFORMAT) of E))) + (DECLARE (SPECVARS *EXTERNALFORMAT*)) ,@BODY)) (\DTEST ,ENV 'READER-ENVIRONMENT))) (ADDTOVAR SYSSPECVARS *PACKAGE* *READTABLE* *READ-BASE* *PRINT-BASE*) -(PUTPROPS WITH-READER-ENVIRONMENT INFO EVAL) +(PUTPROPS WITH-READER-ENVIRONMENT INFO EVAL) (DECLARE%: DOEVAL@COMPILE DONTCOPY (GLOBALVARS *COMMON-LISP-READ-ENVIRONMENT*) @@ -266,9 +272,9 @@ Copyright (c) 1985, 1986, 1987, 1988, 1990, 1993 by Venue & Xerox Corporation. (RPAQ? *COMMON-LISP-READ-ENVIRONMENT* (create READER-ENVIRONMENT REPACKAGE _ (CL:FIND-PACKAGE "USER") - REREADTABLE _ CMLRDTBL REBASE _ 10)) + REREADTABLE _ CMLRDTBL REBASE _ 10 REFORMAT _ :XCCS)) -(PUTPROPS CMLREAD FILETYPE CL:COMPILE-FILE) +(PUTPROPS CMLREAD FILETYPE CL:COMPILE-FILE) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDTOVAR NLAMA ) @@ -279,56 +285,10 @@ Copyright (c) 1985, 1986, 1987, 1988, 1990, 1993 by Venue & Xerox Corporation. CL:LISTEN CL:PEEK-CHAR CL:UNREAD-CHAR CL:READ-CHAR CL:READ-LINE CL:COPY-READTABLE) ) -(PRETTYCOMPRINT CMLREADCOMS) - -(RPAQQ CMLREADCOMS [(COMS - (* ;; "Misc Common Lisp reader functions") - - (FNS CL:COPY-READTABLE) - (FNS CL:READ-LINE CL:READ-CHAR CL:UNREAD-CHAR CL:PEEK-CHAR CL:LISTEN - CL:READ-CHAR-NO-HANG CL:CLEAR-INPUT CL:READ-FROM-STRING - CL:READ-BYTE CL:WRITE-BYTE) - (* ; - "must turn off packed version of CLISP infix") - (VARS [CLISPCHARS (LDIFFERENCE CLISPCHARS '(- *] - (CLISPCHARRAY (MAKEBITTABLE CLISPCHARS)) - (DWIMINMACROSFLG)) - (VARIABLES *READ-DEFAULT-FLOAT-FORMAT*) - (GLOBALVARS CMLRDTBL READ-LINE-RDTBL)) - [COMS - (* ;; "Crude means to aid reading and printing things in same reader environment. There are some fns and an INITRECORDS for this on ATBL to get it early in the loadup") - - (RECORDS READER-ENVIRONMENT) - (FUNCTIONS WITH-READER-ENVIRONMENT) - (ADDVARS (SYSSPECVARS *PACKAGE* *READTABLE* *READ-BASE* *PRINT-BASE*)) - (PROP INFO WITH-READER-ENVIRONMENT) - (GLOBALVARS *COMMON-LISP-READ-ENVIRONMENT*) - (INITVARS (*COMMON-LISP-READ-ENVIRONMENT* (create READER-ENVIRONMENT - REPACKAGE _ - (CL:FIND-PACKAGE - "USER") - REREADTABLE _ CMLRDTBL - REBASE _ 10] - (PROP FILETYPE CMLREAD) - (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS - (ADDVARS (NLAMA) - (NLAML) - (LAMA CL:READ-BYTE CL:READ-FROM-STRING CL:CLEAR-INPUT - CL:READ-CHAR-NO-HANG CL:PEEK-CHAR CL:UNREAD-CHAR - CL:READ-CHAR CL:READ-LINE CL:COPY-READTABLE]) -(DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS - -(ADDTOVAR NLAMA ) - -(ADDTOVAR NLAML ) - -(ADDTOVAR LAMA CL:READ-BYTE CL:READ-FROM-STRING CL:CLEAR-INPUT CL:READ-CHAR-NO-HANG CL:PEEK-CHAR - CL:UNREAD-CHAR CL:READ-CHAR CL:READ-LINE CL:COPY-READTABLE) -) -(PUTPROPS CMLREAD COPYRIGHT ("Venue & Xerox Corporation" 1985 1986 1987 1988 1990 1993)) +(PUTPROPS CMLREAD COPYRIGHT ("Venue & Xerox Corporation" 1985 1986 1987 1988 1990 1993 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (2481 3466 (CL:COPY-READTABLE 2491 . 3464)) (3467 10087 (CL:READ-LINE 3477 . 4349) ( -CL:READ-CHAR 4351 . 4901) (CL:UNREAD-CHAR 4903 . 5351) (CL:PEEK-CHAR 5353 . 7337) (CL:LISTEN 7339 . -7604) (CL:READ-CHAR-NO-HANG 7606 . 8378) (CL:CLEAR-INPUT 8380 . 8617) (CL:READ-FROM-STRING 8619 . 9374 -) (CL:READ-BYTE 9376 . 9829) (CL:WRITE-BYTE 9831 . 10085))))) + (FILEMAP (NIL (2592 3577 (CL:COPY-READTABLE 2602 . 3575)) (3578 10211 (CL:READ-LINE 3588 . 4460) ( +CL:READ-CHAR 4462 . 5012) (CL:UNREAD-CHAR 5014 . 5475) (CL:PEEK-CHAR 5477 . 7461) (CL:LISTEN 7463 . +7728) (CL:READ-CHAR-NO-HANG 7730 . 8502) (CL:CLEAR-INPUT 8504 . 8741) (CL:READ-FROM-STRING 8743 . 9498 +) (CL:READ-BYTE 9500 . 9953) (CL:WRITE-BYTE 9955 . 10209))))) STOP diff --git a/sources/CMLREAD.LCOM b/sources/CMLREAD.LCOM index 70650f090..723616c16 100644 Binary files a/sources/CMLREAD.LCOM and b/sources/CMLREAD.LCOM differ diff --git a/sources/COMPILE b/sources/COMPILE index e16b96f73..07bed40cb 100644 --- a/sources/COMPILE +++ b/sources/COMPILE @@ -1,13 +1,15 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED "27-Jul-90 11:15:42" |{PELE:MV:ENVOS}SOURCES>COMPILE.;4| 68945 +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS) +(FILECREATED " 5-Jul-2021 13:46:39"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>COMPILE.;4 77731 - changes to%: (FNS BRECOMPILE) + changes to%: (FNS BCOMPL BCOMPL.BODY) - previous date%: " 8-Jun-90 11:48:47" |{PELE:MV:ENVOS}SOURCES>COMPILE.;3|) + previous date%: " 5-Jul-2021 09:31:55" +{DSK}kaplan>Local>medley3.5>git-medley>sources>COMPILE.;3) (* ; " -Copyright (c) 1984, 1985, 1986, 1987, 1988, 1989, 1990 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1984-1990, 2021 by Venue & Xerox Corporation. The following program was created in 1984 but has not been published within the meaning of the copyright law, is furnished under license, and may not be used, copied and/or disclosed except in accordance @@ -16,11 +18,71 @@ with the terms of said license. (PRETTYCOMPRINT COMPILECOMS) -(RPAQQ COMPILECOMS ((FNS BCOMPL BCOMPL.BODY PRINT-COMPILE-HEADER RESETOPENFILES BCOMPL1A BCOMPL2 BCOMPL3 BLOCK%: BRECOMPILE BRECOMPILE1 BRECOMPILE2 BRECOMPILE3 BLOCKCOMPILE BLOCKCOMPILE1 COMPSET COMPSETREAD COMPSETY COMPSETF RCOMP3 TCOMPL RECOMPILE RECOMP? COMPILE COMPILE1 COMPILE1A SHOULD-BE-DWIMIFIED? COMPILE.FILECHECK COMPEM GETCFILE SPECVARS LOCALVARS GLOBALVARS) (ADDVARS (NOLINKFNS HELP ERRORX ERRORSET EVALV FAULTEVAL INTERRUPT SEARCHPDL MAPDL BREAK1 EDITE EDITL) (LINKFNS) (FREEVARS) (SYSSPECVARS HELPCLOCK LISPXHIST RESETSTATE OLDVALUE UNDOSIDE0 SPECVARS LOCALVARS GLOBALVARS) (SYSLOCALVARS) (LOCALFREEVARS) (BLKLIBRARY) (RETFNS) (BLKAPPLYFNS) (DONTCOMPILEFNS) (NLAML) (NLAMA) (LAMS) (LAMA)) (INITVARS (SPECVARS T) (LOCALVARS SYSLOCALVARS)) (INITVARS (DWIMIFYCOMPFLG NIL) (COMPILEHEADER "compiled on ") (COMPSETLST (QUOTE (ST F STF S Y N 1 2 NIL T))) (COMPSETKEYLST (QUOTE ((ST "ore and redefine " KEYLST ("" (F . "orget exprs"))) (S . "ame as last time") (F . "ile only") (T . "o terminal") (1) (2) (Y . "es") (N . "o")))) (COMPSETDEFAULTKEYLST (QUOTE ((Y . "es") (N . "o")))) (BCOMPL.SCRATCH (QUOTE {CORE}BCOMPL.SCRATCH)) (RECOMPILEDEFAULT (QUOTE CHANGES)) (COUTFILE T) (SVFLG T) (STRF T) (LSTFIL T) (LCFIL) (LAPFLG T)) (DECLARE%: DONTCOPY (RECORDS COMPFILEDESCR) (MACROS DIGITCHARP) (GLOBALVARS SYSSPECVARS SYSLOCALVARS RECOMPILEDEFAULT COMPILE.EXT NOTCOMPILEDFILES BYTECOMPFLG COMPILEHEADER COMPVERSION BCOMPL.SCRATCH LINKEDFNS NOFIXVARSLST0 NOFIXFNSLST0 CLISPTRANFLG CLISPARRAY COMPSETKEYLST REREADFLG HISTSTR0 LISPXHISTORY COMPSETDEFAULTKEYLST FILERDTBL DWIMFLG DWIMWAIT)) (P (MOVD? (QUOTE NILL) (QUOTE FILECHANGES)) (CL:PROCLAIM (QUOTE (CL:SPECIAL COMPVARMACROHASH))) (CL:PROCLAIM (QUOTE (GLOBAL SYSSPECVARS SYSLOCALVARS COMPILE.EXT NOTCOMPILEDFILES CLISPARRAY FILERDTBL DWIMFLG DWIMWAIT LISPXHISTORY)))) (COMS (* ; "COMPILEMODE") (PROP VARTYPE COMPILEMODELST) (FNS COMPILEMODE)) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA GLOBALVARS LOCALVARS SPECVARS BLOCK%:) (NLAML BCOMPL3) (LAMA))))) +(RPAQQ COMPILECOMS + [(FNS BCOMPL BCOMPL.BODY PRINT-COMPILE-HEADER RESETOPENFILES BCOMPL1A BCOMPL2 BCOMPL3 BLOCK%: + BRECOMPILE BRECOMPILE1 BRECOMPILE2 BRECOMPILE3 BLOCKCOMPILE BLOCKCOMPILE1 COMPSET + COMPSETREAD COMPSETY COMPSETF RCOMP3 TCOMPL RECOMPILE RECOMP? COMPILE COMPILE1 COMPILE1A + SHOULD-BE-DWIMIFIED? COMPILE.FILECHECK COMPEM GETCFILE SPECVARS LOCALVARS GLOBALVARS) + (ADDVARS (NOLINKFNS HELP ERRORX ERRORSET EVALV FAULTEVAL INTERRUPT SEARCHPDL MAPDL BREAK1 + EDITE EDITL) + (LINKFNS) + (FREEVARS) + (SYSSPECVARS HELPCLOCK LISPXHIST RESETSTATE OLDVALUE UNDOSIDE0 SPECVARS LOCALVARS + GLOBALVARS) + (SYSLOCALVARS) + (LOCALFREEVARS) + (BLKLIBRARY) + (RETFNS) + (BLKAPPLYFNS) + (DONTCOMPILEFNS) + (NLAML) + (NLAMA) + (LAMS) + (LAMA)) + (INITVARS (SPECVARS T) + (LOCALVARS SYSLOCALVARS)) + (INITVARS (DWIMIFYCOMPFLG NIL) + (COMPILEHEADER "compiled on ") + (COMPSETLST '(ST F STF S Y N 1 2 NIL T)) + [COMPSETKEYLST '((ST "ore and redefine " KEYLST ("" (F . "orget exprs"))) + (S . "ame as last time") + (F . "ile only") + (T . "o terminal") + (1) + (2) + (Y . "es") + (N . "o"] + [COMPSETDEFAULTKEYLST '((Y . "es") + (N . "o"] + (BCOMPL.SCRATCH '{CORE}BCOMPL.SCRATCH) + (RECOMPILEDEFAULT 'CHANGES) + (COUTFILE T) + (SVFLG T) + (STRF T) + (LSTFIL T) + (LCFIL) + (LAPFLG T)) + (DECLARE%: DONTCOPY (RECORDS COMPFILEDESCR) + (MACROS DIGITCHARP) + (GLOBALVARS SYSSPECVARS SYSLOCALVARS RECOMPILEDEFAULT COMPILE.EXT NOTCOMPILEDFILES + BYTECOMPFLG COMPILEHEADER COMPVERSION BCOMPL.SCRATCH LINKEDFNS NOFIXVARSLST0 + NOFIXFNSLST0 CLISPTRANFLG CLISPARRAY COMPSETKEYLST REREADFLG HISTSTR0 + LISPXHISTORY COMPSETDEFAULTKEYLST FILERDTBL DWIMFLG DWIMWAIT)) + [P (MOVD? 'NILL 'FILECHANGES) + (CL:PROCLAIM '(CL:SPECIAL COMPVARMACROHASH)) + (CL:PROCLAIM '(GLOBAL SYSSPECVARS SYSLOCALVARS COMPILE.EXT NOTCOMPILEDFILES CLISPARRAY + FILERDTBL DWIMFLG DWIMWAIT LISPXHISTORY] + (COMS (* ; "COMPILEMODE") + (PROP VARTYPE COMPILEMODELST) + (FNS COMPILEMODE)) + (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS + (ADDVARS (NLAMA GLOBALVARS LOCALVARS SPECVARS BLOCK%:) + (NLAML BCOMPL3) + (LAMA]) (DEFINEQ (BCOMPL - [LAMBDA (FILES CFILE NOBLOCKSFLG OPTIONSSET) (* ; "Edited 9-Feb-87 16:22 by Pavel") + [LAMBDA (FILES CFILE NOBLOCKSFLG OPTIONSSET) (* ; "Edited 5-Jul-2021 13:39 by rmk:") (* ;;; "BCOMPL is like TCOMPL, except that it reads in all of FILES before starting any compilations, so that a BLOCK can contain functions in several FILES. BLOCKS are set up using a DECLARE statement of the form") @@ -28,29 +90,32 @@ with the terms of said license. (* ;;; "where BLKFN1 ... are the functions in the BLOCK, and VAR1 ... are values for ENTRIES, RETFNS, SPECVARS, etc. A variable setting of the form (VAR . list) sets variable to UNION of the list with the variable's top level value. A variable setting of the form (VAR . ATOM) simply sets the variable to that atom, e.g. (NOLINKFLG . T)") - (RESETLST (LET ((NLAML NLAML) - (NLAMA NLAMA) - (LAMS LAMS) - (LAMA LAMA) - (DWIMIFYCOMPFLG DWIMIFYCOMPFLG) - (EXPRSLST NIL) - (NOFIXVARSLST NOFIXVARSLST) - (NOFIXFNSLST NOFIXFNSLST) - (*PRINT-ARRAY* T) - (*PRINT-LENGTH* NIL) - (*PRINT-LEVEL* NIL)) - (DECLARE (SPECVARS NLAML NLAMA LAMS LAMA DWIMIFYCOMPFLG EXPRSLST NOFIXVARSLST - NOFIXFNSLST *PRINT-ARRAY* *PRINT-LEVEL* *PRINT-LENGTH*)) - (SETQ FILES (RESETOPENFILES FILES)) - - (* ;; "Checks that all FILES are there, and if not, attempts spelling correction. Opens them for input, too, and returns the input stream") - - (BCOMPL.BODY FILES CFILE NOBLOCKSFLG OPTIONSSET]) + (RESETLST + (LET ((NLAML NLAML) + (NLAMA NLAMA) + (LAMS LAMS) + (LAMA LAMA) + (DWIMIFYCOMPFLG DWIMIFYCOMPFLG) + (EXPRSLST NIL) + (NOFIXVARSLST NOFIXVARSLST) + (NOFIXFNSLST NOFIXFNSLST) + (*PRINT-ARRAY* T) + (*PRINT-LENGTH* NIL) + (*PRINT-LEVEL* NIL)) + (DECLARE (SPECVARS NLAML NLAMA LAMS LAMA DWIMIFYCOMPFLG EXPRSLST NOFIXVARSLST + NOFIXFNSLST *PRINT-ARRAY* *PRINT-LEVEL* *PRINT-LENGTH*)) + + (* ;; "Checks that all FILES are there, and if not, attempts spelling correction. Opens them for input, too, and returns the input stream") + + (BCOMPL.BODY (RESETOPENFILES FILES) + CFILE NOBLOCKSFLG OPTIONSSET)))]) (BCOMPL.BODY - [LAMBDA (FILES CFILE NOBLOCKSFLG OPTIONSSET) (* bvm%: "13-Oct-86 17:07") + [LAMBDA (STREAMS CFILE NOBLOCKSFLG OPTIONSSET) (* ; "Edited 5-Jul-2021 13:46 by rmk:") + +(* ;;; "STREAMS is a list of streams. Compile everything on them, dumping to CFILE (default first stream.dcom). NOBLOCKSFLG means TCOMPL instead of BCOMPL. OPTIONSSET is true if the Listing? question has already been asked.") -(* ;;; "FILES is a list of streams. Compile everything on them, dumping to CFILE (default first stream.dcom). NOBLOCKSFLG means TCOMPL instead of BCOMPL. OPTIONSSET is true if the Listing? question has already been asked.") +(* ;;; "RMK: Apply each input streams \EXTERNALFORMAT") (DECLARE (SPECVARS CFILE)) (PROG ((SPECVARS T) @@ -60,78 +125,87 @@ with the terms of said license. (DECLARE (SPECVARS SPECVARS LOCALVARS CHANGES OTHERS FIRST BLOCKS BLKFNS DESTINATIONENV DEFS)) [OR OPTIONSSET (COMPSET NIL '(F % -] (* ; -"OPTIONSSET is T on calls from TCOMPL. In this case, the first COMPSET has already been performed.") +] (* ; +"OPTIONSSET is T on calls from TCOMPL. In this case, the first COMPSET has already been performed.") (COMPSET (OR CFILE (PACKFILENAME 'HOST [CADR (FMEMB 'HOST (SETQ UNPACKFILE - (UNPACKFILENAME (CAR FILES] + (UNPACKFILENAME (CAR STREAMS + ] 'DIRECTORY (CADR (FMEMB 'DIRECTORY UNPACKFILE)) 'NAME (SETQ FILEROOT (CADR (FMEMB 'NAME UNPACKFILE))) 'EXTENSION COMPILE.EXT))) - (* ;; "Edited by TT(8-June-90 : for Fix AR#2999)") + (* ;; "Edited by TT(8-June-90 : for Fix AR#2999)") [COND (LCFIL (SETQ SCRATCHFILE (OPENSTREAM BCOMPL.SCRATCH 'BOTH 'NEW] - (RESETSAVE NIL (LIST 'BCOMPL3 NIL FILES SCRATCHFILE)) + (RESETSAVE NIL (LIST 'BCOMPL3 NIL STREAMS SCRATCHFILE)) - (* ;; "BCOMPL3 will close and if necessary delete all the appropriate files when bcompl finishes, or control-d or control-e occurs.") + (* ;; "BCOMPL3 will close and if necessary delete all the appropriate files when bcompl finishes, or control-d or control-e occurs.") [LET (DFNFLG) - (* ;; "if top level value of DFNFLG is PROP, still want to evaluate expressions in declarations etc as though it were T. i.e. make BCOMPL1A equivalent to doing a LOADCOMP") + (* ;; "if top level value of DFNFLG is PROP, still want to evaluate expressions in declarations etc as though it were T. i.e. make BCOMPL1A equivalent to doing a LOADCOMP") - (for STREAM in FILES + (for STREAM in STREAMS do (RESETLST (RESETSAVE NIL (LIST 'CLOSEF STREAM)) - (RESETSAVE (INPUT STREAM)) (* ; - "Needs to be primary input for some of the filepkg expressions to work") + (RESETSAVE (INPUT STREAM)) (* ; + "Needs to be primary input for some of the filepkg expressions to work") (WITH-READER-ENVIRONMENT *OLD-INTERLISP-READ-ENVIRONMENT* (until (OR (NULL (SETQ TEM (READ STREAM))) - (EQ TEM 'STOP)) do (BCOMPL1A TEM 'DEFAULT - 'DEFAULT - 'DEFAULT))))] + (EQ TEM 'STOP)) + do (CL:WHEN (EQ (CAR (LISTP TEM)) + 'DEFINE-FILE-INFO) + (\EXTERNALFORMAT STREAM (OR (LISTGET (CDR TEM) + :FORMAT) + :XCCS))) + (BCOMPL1A TEM 'DEFAULT 'DEFAULT 'DEFAULT STREAM))))] (SETQ NOFIXFNSLST (APPEND NLAMA NLAML LAMS (NCONC [MAPCAR DEFS (FUNCTION (LAMBDA (X) (RCOMP3 (CAR X) (CADR X] NOFIXFNSLST))) - (* ;; "The BCOMPL1 reads in FILES. It returns a list of variables set in the files. The RCOMP3 adds function to NLAMA, LAMS, etc., and returns a list of functions. NOFIXFNLST is reset in case there is any dwimifying to be done.") + (* ;; "The BCOMPL1 reads in FILES. It returns a list of variables set in the files. The RCOMP3 adds function to NLAMA, LAMS, etc., and returns a list of functions. NOFIXFNLST is reset in case there is any dwimifying to be done.") (WITH-READER-ENVIRONMENT (OR DESTINATIONENV (SETQ DESTINATIONENV *OLD-INTERLISP-READ-ENVIRONMENT*)) (COND - (LCFIL (PRINT-COMPILE-HEADER FILES [LIST (COND - (NOBLOCKSFLG 'tcompl'd) - (T 'bcompl'd] + (LCFIL (\EXTERNALFORMAT LCFIL (OR (FETCH (READER-ENVIRONMENT REFORMAT) + OF DESTINATIONENV) + :XCCS)) + (PRINT-COMPILE-HEADER STREAMS [LIST (COND + (NOBLOCKSFLG 'tcompl'd) + (T 'bcompl'd] DESTINATIONENV))) (COND (SCRATCHFILE - (* ;; "writes others on a scratchfile so space can be freed up. will be copied onto lcfil aftr compilation.") + (* ;; "writes others on a scratchfile so space can be freed up. will be copied onto lcfil aftr compilation.") + (\EXTERNALFORMAT SCRATCHFILE (\EXTERNALFORMAT LCFIL)) (for X in OTHERS do (PRINT X SCRATCHFILE)) (PRINT NIL SCRATCHFILE) (SETQ OTHERS NIL))) [OR DWIMIFYCOMPFLG (SETQ DWIMIFYCOMPFLG (EQMEMB 'CLISP (GETPROP FILEROOT 'FILETYPE] - (* ; - "The FILETYPE may have been set during the course of BCOMPL1.") + (* ; + "The FILETYPE may have been set during the course of BCOMPL1.") [MAPC FIRST (FUNCTION (LAMBDA (X) (PRINT X LCFIL] [PROG (LISPXHIST) (DECLARE (SPECVARS LISPXHIST)) - (* ;; "compile blocks MAPC not used because BCOMPL2 checks BLOCKS. lispxhist rebound bcause no need to save information when compiling from file") + (* ;; "compile blocks MAPC not used because BCOMPL2 checks BLOCKS. lispxhist rebound bcause no need to save information when compiling from file") (AND NOBLOCKSFLG (GO NOBLOCKLP)) BLOCKLP (COND (BLOCKS (BCOMPL2 (CAR BLOCKS)) (SETQ BLOCKS (CDR BLOCKS)) - (GO BLOCKLP))) (* ; - "COMPILE other functions. done this way instead of MAPC to release the defs as soon aspossible.") + (GO BLOCKLP))) (* ; + "COMPILE other functions. done this way instead of MAPC to release the defs as soon aspossible.") NOBLOCKLP (COND (DEFS (AND (NOT (FMEMB (CAAR DEFS) @@ -423,9 +497,240 @@ with the terms of said license. (SETQ BLOCKS (NCONC1 BLOCKS X)))) (BRECOMPILE -(LAMBDA (FILES CFILE FNS NOBLOCKSFLG) (* ; "Edited 6-Jan-89 10:01 by jds") (* ;;; "FNS is a list of functions to be recompiled. The object is to make a file that looks exactly like that produced by BCOMPL except to greatly reduce the work by copying from CFILE the compiled definitions those functions not being recompiled.") (* ;;; "BRECOMPILE is driven by the source file(s). The algorithm is whenever a DEFINEQ is encountered, process all of the functions in the DEFINEQ as follows: COMPILE the definition of the function if it is on the list FNS, or if FNS is EXPRS and the function is currently defined as an EXPR. Otherwise copy its compiled definition from CFILE. Note that functions with compiled definitions in CFILE that do not appear in PFILE are NOT copied. This corresponds to the case where functions have been deleted from the source file.") (* ;;; "The value FNS = CHANGES means recompile anything marked changed in the file header.") (* ;;; "(RECOMPILE file cfile fns) is equivalent to (BRECOMPILE file cfile fns T).") (* ;;; "Note that CFILE=NIL is interpreted as meaning file.dcom even when FNS supplied.") (RESETLST (PROG ((*PRINT-ARRAY* T) (*PRINT-LENGTH* NIL) (*PRINT-LEVEL* NIL) (NLAMA NLAMA) (NLAML NLAML) (LAMS LAMS) (LAMA LAMA) (DWIMIFYCOMPFLG DWIMIFYCOMPFLG) (EXPRSLST NIL) (NOFIXFNSLST NOFIXFNSLST) (NOFIXVARSLST NOFIXVARSLST) (BUILDMAPFLG T) (SPECVARS T) (LOCALVARS SYSLOCALVARS) (AUXFILECOM T) CHANGES OTHERS FIRST FILEMAPLST FNLST BLKFNS BLOCKS FILE FILE.COM TEM ADRLST SCRATCHFILE COREOK DESTINATIONENV MSG) (DECLARE (SPECVARS *PRINT-ARRAY* *PRINT-LENGTH* *PRINT-LEVEL* NLAMA NLAML LAMS LAMA DWIMIFYCOMPFLG EXPRSLST NOFIXFNSLST NOFIXVARSLST BUILDMAPFLG SPECVARS LOCALVARS CHANGES OTHERS FIRST BLKFNS BLOCKS DESTINATIONENV ADRLST FILEMAPLST CFILE FNS FILE)) (COND ((AND (NULL CFILE) (NULL FNS)) (SETQ FNS RECOMPILEDEFAULT))) (RESETSAVE (INPUT)) (SETQ FILES (RESETOPENFILES FILES)) (COND ((SETQ TEM (for FILE in FILES when (NOT (RANDACCESSP FILE)) collect (FULLNAME FILE))) (GO NONRAND))) (SETQ FILE (UNPACKFILENAME (CAR FILES))) (SETQ FILE.COM (PACKFILENAME (QUOTE HOST) (CADR (FMEMB (QUOTE HOST) FILE)) (QUOTE DIRECTORY) (CADR (FMEMB (QUOTE DIRECTORY) FILE)) (QUOTE NAME) (SETQ FILE (CADR (FMEMB (QUOTE NAME) FILE))) (QUOTE EXTENSION) COMPILE.EXT)) (* ;; "Edited by TT (8-June-90 : for fix AR#2999)") (COND ((EQ FNS (QUOTE ALL)) (GO BRECALL))) CFILERETRY (COND ((NLSETQ (SETQ CFILE (OPENSTREAM (OR CFILE FILE.COM) (QUOTE INPUT) (QUOTE OLD) NIL (QUOTE ((TYPE BINARY)))))) (COND ((NOT (RANDACCESSP CFILE)) (SETQ TEM (CLOSEF CFILE)) (GO NONRAND)) ((OR (NULL (SETQ DESTINATIONENV (GET-ENVIRONMENT-AND-FILEMAP (CAR FILES)))) (CL:MULTIPLE-VALUE-BIND (ENV DUMMY START) (\PARSE-FILE-HEADER CFILE) (COND ((OR (NULL ENV) (NOT (EQUAL-READER-ENVIRONMENT ENV DESTINATIONENV))) T) (T (* "Position cfile back to start") (SETFILEPTR CFILE START) NIL)))) (SETQ TEM (CLOSEF CFILE)) (SETQ MSG " has different reader environment than the new file") (GO NONREC))) (GO BREC)) ((OR (AND (EQ AUXFILECOM T) (SETQ AUXFILECOM (SPELLFILE (ROOTFILENAME (OR CFILE FILE.COM)))) (SETQ CFILE AUXFILECOM) (GO CFILERETRY)) (EQ (ASKUSER DWIMWAIT (QUOTE Y) (LIST (OR CFILE FILE.COM) "not found;" " compile all functions on " (FULLNAME (CAR FILES)) (QUOTE "instead"))) (QUOTE Y))) (* ; "Edited by TT(8-June-90 : for Fix AR#8017)") (GO BRECALL)) ((EQ (ASKUSER DWIMWAIT (QUOTE Y) (CONS (QUOTE "Just forget about compiling") (MAPCAR FILES (FUNCTION FULLNAME)))) (QUOTE Y)) (SELECTQ (CAR READBUF) ((ST F STF) (* "E.g. From CLEANUP.") (SETQ READBUF (CDR READBUF))) NIL) (RETFROM (QUOTE BRECOMPILE))) (T (PRIN1 "File to use for CFILE (source of compiled definitions not being recompiled): " T) (SETQ CFILE (READ T T)) (GO CFILERETRY))) BRECALL (SETQQ FNS ALL) (SETQ CFILE NIL) BREC (COMPSET NIL (QUOTE (S T % -))) (SETQ LCFIL (OPENSTREAM FILE.COM (QUOTE OUTPUT) (QUOTE NEW) NIL (QUOTE ((TYPE BINARY))))) (SETQ SCRATCHFILE (OPENSTREAM BCOMPL.SCRATCH (QUOTE BOTH) (QUOTE NEW))) (RESETSAVE NIL (LIST (QUOTE BCOMPL3) CFILE FILES SCRATCHFILE)) (* ;; "BCOMPL3 will close and if necessary delete all the appropriate files when brecompile finishes, or control-d or control-e occurs. Note that this call differs from the call for bcompl in that cfile is also specified. this corresponds to the fact that recompile has an extra file open.") (SETQ COREOK (for X in FILES always (AND (EQ (CDAR (GETPROP (SETQ TEM (ROOTFILENAME X)) (QUOTE FILEDATES))) X) (FMEMB (CDAR (GETPROP TEM (QUOTE FILE))) (QUOTE (LOADFNS T)))))) (SETQ FILEMAPLST (for STREAM in FILES collect (LET ((LDFLG (QUOTE EXPRESSIONS)) (VARLST (QUOTE COMPILING)) DONELST FNLST) (DECLARE (SPECVARS LDFLG VARLST DONELST FNLST)) (* ; "FNLST etc are used free in LOADFNSCAN") (SETFILEPTR STREAM 0) (INPUT STREAM) (* ;; "LOADFNSCAN scans the file, building a map if one not already there. Value is the map. In addition, sets DONELST to a list of all non-defineq expressions.") (CL:MULTIPLE-VALUE-BIND (ENV MAP FILECREATEDLOC) (GET-ENVIRONMENT-AND-FILEMAP STREAM) (DECLARE (CL:SPECIAL FILECREATEDLOC)) (* ; " used by LOADFNSCAN") (WITH-READER-ENVIRONMENT ENV (create COMPFILEDESCR COMPFILESTREAM _ STREAM COMPFILEENV _ ENV COMPFILEMAP _ (LOADFNSCAN MAP) COMPFILEXPRS _ (DREVERSE DONELST))))))) (SETQ FNLST (for DESCR in FILEMAPLST join (for DEFQ in (CDR (fetch COMPFILEMAP of DESCR)) join (for X in (CDDR DEFQ) collect (CAR X))))) (* ;; "FILEMAPLST is a list of information about each file, including its name, filemap and non-defineq expressions. The first entry on the filemap is NIL. We start mapping down CDR of the filemap, and each element therein corresponds to a single DEFINEQ, in the form (start stop . fnEntries). fnEntries is a list of (FN start . stop), so the inner MAPCAR gathers up the names of the functions. The reason for not asking LOADFNS to do this is in most cases the map will already have been built, so LOADFNS won't even go inside of the defineq.") (for DESCR in FILEMAPLST do (for FORM in (fetch COMPFILEXPRS of DESCR) do (BCOMPL1A FORM (QUOTE DEFAULT) (QUOTE DEFAULT) (QUOTE DEFAULT)))) (* ;; "BCOMPL1A adds VARS set in the files to NOFIXVARSLST. NOFIXFNLST and NOFIXVARSLST are reset in case there is any dwimifying to be done BCOMPL1 also sets free variable OTHERS to list of expressions to be printed on compiled file when all is done.") (SETQ NOFIXFNSLST (APPEND NLAMA NLAML LAMS FNLST NOFIXFNSLST)) (WITH-READER-ENVIRONMENT (SETQ DESTINATIONENV (fetch COMPFILEENV of (CAR FILEMAPLST))) (* ; "Start writing the compiled file. Use environment of one of the source files--usually the only one") (if LCFIL then (PRINT-COMPILE-HEADER FILES (CONS (if NOBLOCKSFLG then (QUOTE recompiled) else (QUOTE brecompiled)) (if (EQ FNS (QUOTE ALL)) then (LIST (QUOTE ALL)) else (CONS (SELECTQ FNS (CHANGES (QUOTE changes%:)) ((EXPRS T) (QUOTE exprs%:)) (QUOTE explicitly%:)) (OR (SUBSET FNLST (FUNCTION (LAMBDA (X) (RECOMP? X FNS)))) (LIST (QUOTE nothing)))))) DESTINATIONENV)) (MAPC FNLST (FUNCTION (LAMBDA (X) (RCOMP3 X (VIRGINFN X))))) (if SCRATCHFILE then (* ;; "writes others on a scratchfile so space can be freed up. will be copied onto lcfil aftr compilation.") (for X in OTHERS do (PRINT X SCRATCHFILE)) (PRINT NIL SCRATCHFILE) (SETQ OTHERS NIL)) (for X in (PROGN FIRST) do (PRINT X LCFIL)) (OR DWIMIFYCOMPFLG (SETQ DWIMIFYCOMPFLG (EQMEMB (QUOTE CLISP) (GETPROP FILE (QUOTE FILETYPE))))) (OR (EQ FNS (QUOTE ALL)) (INPUT CFILE)) (if (NOT NOBLOCKSFLG) then (for BLOCK in BLOCKS do (if (NULL (CAR BLOCK)) then (BCOMPL2 BLOCK FILEMAPLST) elseif (for X in BLOCK thereis (AND (LITATOM X) (RECOMP? X FNS))) then (* ; "If any function in the BLOCK is to be recompiled, the whole BLOCK must be recompiled.") (BCOMPL2 BLOCK FILEMAPLST COREOK) else (BRECOMPILE1 BLOCK)))) (* ;; "NOBLOCKSFLG is T for calls from RECOMPILE. In this case, even if there were any blocks, ignore them.") (* ; "Now COMPILE rest of functions.") (for X in FNLST do (if (OR (FMEMB X BLKFNS) (FMEMB X DONTCOMPILEFNS)) elseif (RECOMP? X FNS) then (* ;; "The HELP is bcause if X is on FNS, then it follows X is in the file map, and brecompile3 should be able to produce its definition.") (COMPILE1 X (CADR (SETQ TEM (BRECOMPILE3 X FILEMAPLST COREOK))) (CADDR TEM)) else (BRECOMPILE1 X T)))) (RETURN (FULLNAME LCFIL)) NONRAND (SETQ MSG " is not RANDACCESSP") NONREC (printout T TEM MSG ", using " (if NOBLOCKSFLG then (QUOTE TCOMPL) else (QUOTE BCOMPL)) " instead." T) (RETURN (BCOMPL.BODY FILES NIL NOBLOCKSFLG))))) -) + [LAMBDA (FILES CFILE FNS NOBLOCKSFLG) (* ; "Edited 5-Jul-2021 09:28 by rmk:") + +(* ;;; "FNS is a list of functions to be recompiled. The object is to make a file that looks exactly like that produced by BCOMPL except to greatly reduce the work by copying from CFILE the compiled definitions those functions not being recompiled.") + +(* ;;; "BRECOMPILE is driven by the source file(s). The algorithm is whenever a DEFINEQ is encountered, process all of the functions in the DEFINEQ as follows: COMPILE the definition of the function if it is on the list FNS, or if FNS is EXPRS and the function is currently defined as an EXPR. Otherwise copy its compiled definition from CFILE. Note that functions with compiled definitions in CFILE that do not appear in PFILE are NOT copied. This corresponds to the case where functions have been deleted from the source file.") + +(* ;;; "The value FNS = CHANGES means recompile anything marked changed in the file header.") + +(* ;;; "(RECOMPILE file cfile fns) is equivalent to (BRECOMPILE file cfile fns T).") + +(* ;;; "Note that CFILE=NIL is interpreted as meaning file.dcom even when FNS supplied.") + + (RESETLST + (PROG ((*PRINT-ARRAY* T) + (*PRINT-LENGTH* NIL) + (*PRINT-LEVEL* NIL) + (NLAMA NLAMA) + (NLAML NLAML) + (LAMS LAMS) + (LAMA LAMA) + (DWIMIFYCOMPFLG DWIMIFYCOMPFLG) + (EXPRSLST NIL) + (NOFIXFNSLST NOFIXFNSLST) + (NOFIXVARSLST NOFIXVARSLST) + (BUILDMAPFLG T) + (SPECVARS T) + (LOCALVARS SYSLOCALVARS) + (AUXFILECOM T) + CHANGES OTHERS FIRST FILEMAPLST FNLST BLKFNS BLOCKS FILE FILE.COM TEM ADRLST + SCRATCHFILE COREOK DESTINATIONENV MSG) + (DECLARE (SPECVARS *PRINT-ARRAY* *PRINT-LENGTH* *PRINT-LEVEL* NLAMA NLAML LAMS + LAMA DWIMIFYCOMPFLG EXPRSLST NOFIXFNSLST NOFIXVARSLST BUILDMAPFLG + SPECVARS LOCALVARS CHANGES OTHERS FIRST BLKFNS BLOCKS + DESTINATIONENV ADRLST FILEMAPLST CFILE FNS FILE)) + (COND + ((AND (NULL CFILE) + (NULL FNS)) + (SETQ FNS RECOMPILEDEFAULT))) + (RESETSAVE (INPUT)) + (SETQ FILES (RESETOPENFILES FILES)) + (COND + ((SETQ TEM (for FILE in FILES when (NOT (RANDACCESSP FILE)) + collect (FULLNAME FILE))) + (GO NONRAND))) + (SETQ FILE (UNPACKFILENAME (CAR FILES))) + (SETQ FILE.COM (PACKFILENAME 'HOST (CADR (FMEMB 'HOST FILE)) + 'DIRECTORY + (CADR (FMEMB 'DIRECTORY FILE)) + 'NAME + (SETQ FILE (CADR (FMEMB 'NAME FILE))) + 'EXTENSION COMPILE.EXT)) + + (* ;; "Edited by TT (8-June-90 : for fix AR#2999)") + + (COND + ((EQ FNS 'ALL) + (GO BRECALL))) + CFILERETRY + (COND + ([NLSETQ (SETQ CFILE (OPENSTREAM (OR CFILE FILE.COM) + 'INPUT + 'OLD NIL '((TYPE BINARY] + (COND + ((NOT (RANDACCESSP CFILE)) + (SETQ TEM (CLOSEF CFILE)) + (GO NONRAND)) + ([OR [NULL (SETQ DESTINATIONENV (GET-ENVIRONMENT-AND-FILEMAP (CAR FILES] + (CL:MULTIPLE-VALUE-BIND (ENV DUMMY START) + (\PARSE-FILE-HEADER CFILE) + (COND + ((OR (NULL ENV) + (NOT (EQUAL-READER-ENVIRONMENT ENV DESTINATIONENV))) + T) + (T (* "Position cfile back to start") + (SETFILEPTR CFILE START) + NIL] + (SETQ TEM (CLOSEF CFILE)) + (SETQ MSG " has different reader environment than the new file") + (GO NONREC))) + (GO BREC)) + ((OR (AND (EQ AUXFILECOM T) + [SETQ AUXFILECOM (SPELLFILE (ROOTFILENAME (OR CFILE FILE.COM] + (SETQ CFILE AUXFILECOM) + (GO CFILERETRY)) + (EQ (ASKUSER DWIMWAIT 'Y (LIST (OR CFILE FILE.COM) + "not found;" " compile all functions on " + (FULLNAME (CAR FILES)) + '"instead")) + 'Y)) (* ; + "Edited by TT(8-June-90 : for Fix AR#8017)") + (GO BRECALL)) + ((EQ [ASKUSER DWIMWAIT 'Y (CONS '"Just forget about compiling" + (MAPCAR FILES (FUNCTION FULLNAME] + 'Y) + (SELECTQ (CAR READBUF) + ((ST F STF) (* "E.g. From CLEANUP.") + (SETQ READBUF (CDR READBUF))) + NIL) + (RETFROM 'BRECOMPILE)) + (T (PRIN1 + "File to use for CFILE (source of compiled definitions not being recompiled): " + T) + (SETQ CFILE (READ T T)) + (GO CFILERETRY))) + BRECALL + (SETQQ FNS ALL) + (SETQ CFILE NIL) + BREC + (COMPSET NIL '(S T % +)) + [SETQ LCFIL (OPENSTREAM FILE.COM 'OUTPUT 'NEW NIL '((TYPE BINARY] + (SETQ SCRATCHFILE (OPENSTREAM BCOMPL.SCRATCH 'BOTH 'NEW)) + (RESETSAVE NIL (LIST 'BCOMPL3 CFILE FILES SCRATCHFILE)) + + (* ;; "BCOMPL3 will close and if necessary delete all the appropriate files when brecompile finishes, or control-d or control-e occurs. Note that this call differs from the call for bcompl in that cfile is also specified. this corresponds to the fact that recompile has an extra file open.") + + [SETQ COREOK (for X in FILES + always (AND (EQ (CDAR (GETPROP (SETQ TEM (ROOTFILENAME X)) + 'FILEDATES)) + X) + (FMEMB (CDAR (GETPROP TEM 'FILE)) + '(LOADFNS T] + [SETQ FILEMAPLST + (for STREAM in FILES + collect (LET ((LDFLG 'EXPRESSIONS) + (VARLST 'COMPILING) + DONELST FNLST) + (DECLARE (SPECVARS LDFLG VARLST DONELST FNLST)) + (* ; + "FNLST etc are used free in LOADFNSCAN") + (SETFILEPTR STREAM 0) + (INPUT STREAM) + + (* ;; "LOADFNSCAN scans the file, building a map if one not already there. Value is the map. In addition, sets DONELST to a list of all non-defineq expressions.") + + (CL:MULTIPLE-VALUE-BIND (ENV MAP FILECREATEDLOC) + (GET-ENVIRONMENT-AND-FILEMAP STREAM) + (DECLARE (CL:SPECIAL FILECREATEDLOC)) + (* ; " used by LOADFNSCAN") + (WITH-READER-ENVIRONMENT ENV + (create COMPFILEDESCR + COMPFILESTREAM _ STREAM + COMPFILEENV _ ENV + COMPFILEMAP _ (LOADFNSCAN MAP) + COMPFILEXPRS _ (DREVERSE DONELST)))] + [SETQ FNLST (for DESCR in FILEMAPLST + join (for DEFQ in (CDR (fetch COMPFILEMAP of DESCR)) + join (for X in (CDDR DEFQ) + collect (CAR X] + + (* ;; "FILEMAPLST is a list of information about each file, including its name, filemap and non-defineq expressions. The first entry on the filemap is NIL. We start mapping down CDR of the filemap, and each element therein corresponds to a single DEFINEQ, in the form (start stop . fnEntries). fnEntries is a list of (FN start . stop), so the inner MAPCAR gathers up the names of the functions. The reason for not asking LOADFNS to do this is in most cases the map will already have been built, so LOADFNS won't even go inside of the defineq.") + + [for DESCR in FILEMAPLST do (for FORM + in (fetch COMPFILEXPRS of DESCR) + do (BCOMPL1A FORM 'DEFAULT + 'DEFAULT + 'DEFAULT] + + (* ;; "BCOMPL1A adds VARS set in the files to NOFIXVARSLST. NOFIXFNLST and NOFIXVARSLST are reset in case there is any dwimifying to be done BCOMPL1 also sets free variable OTHERS to list of expressions to be printed on compiled file when all is done.") + + (SETQ NOFIXFNSLST (APPEND NLAMA NLAML LAMS FNLST NOFIXFNSLST)) + (WITH-READER-ENVIRONMENT (SETQ DESTINATIONENV (fetch COMPFILEENV + of (CAR FILEMAPLST))) + (* ; +"Start writing the compiled file. Use environment of one of the source files--usually the only one") + (if LCFIL + then (\EXTERNALFORMAT LCFIL (OR (LISTGET DESTINATIONENV :FORMAT) + :XCCS)) + (PRINT-COMPILE-HEADER + FILES + [CONS (if NOBLOCKSFLG + then 'recompiled + else 'brecompiled) + (if (EQ FNS 'ALL) + then (LIST 'ALL) + else (CONS (SELECTQ FNS + (CHANGES 'changes%:) + ((EXPRS T) + 'exprs%:) + 'explicitly%:) + (OR [SUBSET FNLST (FUNCTION (LAMBDA (X) + (RECOMP? X FNS] + (LIST 'nothing] + DESTINATIONENV)) + [MAPC FNLST (FUNCTION (LAMBDA (X) + (RCOMP3 X (VIRGINFN X] + (if SCRATCHFILE + then + + (* ;; "writes others on a scratchfile so space can be freed up. will be copied onto lcfil aftr compilation.") + + (\EXTERNALFORMAT SCRATCHFILE (\EXTERNALFORMAT LCFIL)) + (for X in OTHERS do (PRINT X SCRATCHFILE)) + (PRINT NIL SCRATCHFILE) + (SETQ OTHERS NIL)) + (for X in (PROGN FIRST) do (PRINT X LCFIL)) + [OR DWIMIFYCOMPFLG (SETQ DWIMIFYCOMPFLG (EQMEMB 'CLISP (GETPROP FILE 'FILETYPE] + (OR (EQ FNS 'ALL) + (INPUT CFILE)) + [if (NOT NOBLOCKSFLG) + then (for BLOCK in BLOCKS + do (if (NULL (CAR BLOCK)) + then (BCOMPL2 BLOCK FILEMAPLST) + elseif (for X in BLOCK + thereis (AND (LITATOM X) + (RECOMP? X FNS))) + then (* ; + "If any function in the BLOCK is to be recompiled, the whole BLOCK must be recompiled.") + (BCOMPL2 BLOCK FILEMAPLST COREOK) + else (BRECOMPILE1 BLOCK] + + (* ;; "NOBLOCKSFLG is T for calls from RECOMPILE. In this case, even if there were any blocks, ignore them.") + (* ; "Now COMPILE rest of functions.") + (for X in FNLST + do (if (OR (FMEMB X BLKFNS) + (FMEMB X DONTCOMPILEFNS)) + elseif (RECOMP? X FNS) + then + + (* ;; "The HELP is bcause if X is on FNS, then it follows X is in the file map, and brecompile3 should be able to produce its definition.") + + (COMPILE1 X (CADR (SETQ TEM (BRECOMPILE3 X FILEMAPLST + COREOK))) + (CADDR TEM)) + else (BRECOMPILE1 X T)))) + (RETURN (FULLNAME LCFIL)) + NONRAND + (SETQ MSG " is not RANDACCESSP") + NONREC + (printout T TEM MSG ", using " (if NOBLOCKSFLG + then 'TCOMPL + else 'BCOMPL) + " instead." T) + (RETURN (BCOMPL.BODY FILES NIL NOBLOCKSFLG))))]) (BRECOMPILE1 (LAMBDA (FN/BLOCK NOBLOCKSFLG) (* bvm%: "29-Aug-86 22:41") @@ -1109,63 +1414,73 @@ with the terms of said license. THEN (SETQ GLOBALVARS (UNION A GLOBALVARS]) ) -(ADDTOVAR NOLINKFNS HELP ERRORX ERRORSET EVALV FAULTEVAL INTERRUPT SEARCHPDL MAPDL BREAK1 EDITE EDITL) +(ADDTOVAR NOLINKFNS HELP ERRORX ERRORSET EVALV FAULTEVAL INTERRUPT SEARCHPDL MAPDL BREAK1 EDITE + EDITL) -(ADDTOVAR LINKFNS) +(ADDTOVAR LINKFNS ) -(ADDTOVAR FREEVARS) +(ADDTOVAR FREEVARS ) -(ADDTOVAR SYSSPECVARS HELPCLOCK LISPXHIST RESETSTATE OLDVALUE UNDOSIDE0 SPECVARS LOCALVARS GLOBALVARS) +(ADDTOVAR SYSSPECVARS HELPCLOCK LISPXHIST RESETSTATE OLDVALUE UNDOSIDE0 SPECVARS LOCALVARS + GLOBALVARS) -(ADDTOVAR SYSLOCALVARS) +(ADDTOVAR SYSLOCALVARS ) -(ADDTOVAR LOCALFREEVARS) +(ADDTOVAR LOCALFREEVARS ) -(ADDTOVAR BLKLIBRARY) +(ADDTOVAR BLKLIBRARY ) -(ADDTOVAR RETFNS) +(ADDTOVAR RETFNS ) -(ADDTOVAR BLKAPPLYFNS) +(ADDTOVAR BLKAPPLYFNS ) -(ADDTOVAR DONTCOMPILEFNS) +(ADDTOVAR DONTCOMPILEFNS ) -(ADDTOVAR NLAML) +(ADDTOVAR NLAML ) -(ADDTOVAR NLAMA) +(ADDTOVAR NLAMA ) -(ADDTOVAR LAMS) +(ADDTOVAR LAMS ) -(ADDTOVAR LAMA) +(ADDTOVAR LAMA ) -(RPAQ? SPECVARS T) +(RPAQ? SPECVARS T) -(RPAQ? LOCALVARS SYSLOCALVARS) +(RPAQ? LOCALVARS SYSLOCALVARS) -(RPAQ? DWIMIFYCOMPFLG NIL) +(RPAQ? DWIMIFYCOMPFLG NIL) -(RPAQ? COMPILEHEADER "compiled on ") +(RPAQ? COMPILEHEADER "compiled on ") -(RPAQ? COMPSETLST (QUOTE (ST F STF S Y N 1 2 NIL T))) +(RPAQ? COMPSETLST '(ST F STF S Y N 1 2 NIL T)) -(RPAQ? COMPSETKEYLST (QUOTE ((ST "ore and redefine " KEYLST ("" (F . "orget exprs"))) (S . "ame as last time") (F . "ile only") (T . "o terminal") (1) (2) (Y . "es") (N . "o")))) +(RPAQ? COMPSETKEYLST '((ST "ore and redefine " KEYLST ("" (F . "orget exprs"))) + (S . "ame as last time") + (F . "ile only") + (T . "o terminal") + (1) + (2) + (Y . "es") + (N . "o"))) -(RPAQ? COMPSETDEFAULTKEYLST (QUOTE ((Y . "es") (N . "o")))) +(RPAQ? COMPSETDEFAULTKEYLST '((Y . "es") + (N . "o"))) -(RPAQ? BCOMPL.SCRATCH (QUOTE {CORE}BCOMPL.SCRATCH)) +(RPAQ? BCOMPL.SCRATCH '{CORE}BCOMPL.SCRATCH) -(RPAQ? RECOMPILEDEFAULT (QUOTE CHANGES)) +(RPAQ? RECOMPILEDEFAULT 'CHANGES) -(RPAQ? COUTFILE T) +(RPAQ? COUTFILE T) -(RPAQ? SVFLG T) +(RPAQ? SVFLG T) -(RPAQ? STRF T) +(RPAQ? STRF T) -(RPAQ? LSTFIL T) +(RPAQ? LSTFIL T) -(RPAQ? LCFIL) +(RPAQ? LCFIL ) -(RPAQ? LAPFLG T) +(RPAQ? LAPFLG T) (DECLARE%: DONTCOPY (DECLARE%: EVAL@COMPILE @@ -1174,27 +1489,33 @@ with the terms of said license. (DECLARE%: EVAL@COMPILE -(PUTPROPS DIGITCHARP MACRO (LAMBDA (CHAR) (AND (IGEQ CHAR (CHARCODE 0)) (ILEQ CHAR (CHARCODE 9))))) +(PUTPROPS DIGITCHARP MACRO [LAMBDA (CHAR) + (AND (IGEQ CHAR (CHARCODE 0)) + (ILEQ CHAR (CHARCODE 9]) ) (DECLARE%: DOEVAL@COMPILE DONTCOPY -(GLOBALVARS SYSSPECVARS SYSLOCALVARS RECOMPILEDEFAULT COMPILE.EXT NOTCOMPILEDFILES BYTECOMPFLG COMPILEHEADER COMPVERSION BCOMPL.SCRATCH LINKEDFNS NOFIXVARSLST0 NOFIXFNSLST0 CLISPTRANFLG CLISPARRAY COMPSETKEYLST REREADFLG HISTSTR0 LISPXHISTORY COMPSETDEFAULTKEYLST FILERDTBL DWIMFLG DWIMWAIT) +(GLOBALVARS SYSSPECVARS SYSLOCALVARS RECOMPILEDEFAULT COMPILE.EXT NOTCOMPILEDFILES BYTECOMPFLG + COMPILEHEADER COMPVERSION BCOMPL.SCRATCH LINKEDFNS NOFIXVARSLST0 NOFIXFNSLST0 CLISPTRANFLG + CLISPARRAY COMPSETKEYLST REREADFLG HISTSTR0 LISPXHISTORY COMPSETDEFAULTKEYLST FILERDTBL + DWIMFLG DWIMWAIT) ) ) -(MOVD? (QUOTE NILL) (QUOTE FILECHANGES)) +(MOVD? 'NILL 'FILECHANGES) -(CL:PROCLAIM (QUOTE (CL:SPECIAL COMPVARMACROHASH))) +(CL:PROCLAIM '(CL:SPECIAL COMPVARMACROHASH)) -(CL:PROCLAIM (QUOTE (GLOBAL SYSSPECVARS SYSLOCALVARS COMPILE.EXT NOTCOMPILEDFILES CLISPARRAY FILERDTBL DWIMFLG DWIMWAIT LISPXHISTORY))) +(CL:PROCLAIM '(GLOBAL SYSSPECVARS SYSLOCALVARS COMPILE.EXT NOTCOMPILEDFILES CLISPARRAY FILERDTBL + DWIMFLG DWIMWAIT LISPXHISTORY)) (* ; "COMPILEMODE") -(PUTPROPS COMPILEMODELST VARTYPE ALIST) +(PUTPROPS COMPILEMODELST VARTYPE ALIST) (DEFINEQ (COMPILEMODE @@ -1217,22 +1538,22 @@ with the terms of said license. ) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS -(ADDTOVAR NLAMA GLOBALVARS LOCALVARS SPECVARS BLOCK%:) +(ADDTOVAR NLAMA GLOBALVARS LOCALVARS SPECVARS BLOCK%:) -(ADDTOVAR NLAML BCOMPL3) +(ADDTOVAR NLAML BCOMPL3) -(ADDTOVAR LAMA) +(ADDTOVAR LAMA ) ) -(PUTPROPS COMPILE COPYRIGHT ("Venue & Xerox Corporation" T 1984 1985 1986 1987 1988 1989 1990)) +(PUTPROPS COMPILE COPYRIGHT ("Venue & Xerox Corporation" T 1984 1985 1986 1987 1988 1989 1990 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (2714 65742 (BCOMPL 2724 . 4466) (BCOMPL.BODY 4468 . 10254) (PRINT-COMPILE-HEADER 10256 - . 11319) (RESETOPENFILES 11321 . 11674) (BCOMPL1A 11676 . 17689) (BCOMPL2 17691 . 24506) (BCOMPL3 -24508 . 25857) (BLOCK%: 25859 . 26491) (BRECOMPILE 26493 . 34961) (BRECOMPILE1 34963 . 40815) ( -BRECOMPILE2 40817 . 41619) (BRECOMPILE3 41621 . 42997) (BLOCKCOMPILE 42999 . 44859) (BLOCKCOMPILE1 -44861 . 49946) (COMPSET 49948 . 52711) (COMPSETREAD 52713 . 54024) (COMPSETY 54026 . 54150) (COMPSETF -54152 . 54318) (RCOMP3 54320 . 56027) (TCOMPL 56029 . 56328) (RECOMPILE 56330 . 56413) (RECOMP? 56415 - . 56875) (COMPILE 56877 . 58866) (COMPILE1 58868 . 59456) (COMPILE1A 59458 . 61105) ( -SHOULD-BE-DWIMIFIED? 61107 . 61796) (COMPILE.FILECHECK 61798 . 61944) (COMPEM 61946 . 62670) (GETCFILE - 62672 . 64403) (SPECVARS 64405 . 64960) (LOCALVARS 64962 . 65536) (GLOBALVARS 65538 . 65740)) (67713 -68662 (COMPILEMODE 67723 . 68660))))) + (FILEMAP (NIL (3770 74020 (BCOMPL 3780 . 5430) (BCOMPL.BODY 5432 . 12011) (PRINT-COMPILE-HEADER 12013 + . 13076) (RESETOPENFILES 13078 . 13431) (BCOMPL1A 13433 . 19446) (BCOMPL2 19448 . 26263) (BCOMPL3 +26265 . 27614) (BLOCK%: 27616 . 28248) (BRECOMPILE 28250 . 43239) (BRECOMPILE1 43241 . 49093) ( +BRECOMPILE2 49095 . 49897) (BRECOMPILE3 49899 . 51275) (BLOCKCOMPILE 51277 . 53137) (BLOCKCOMPILE1 +53139 . 58224) (COMPSET 58226 . 60989) (COMPSETREAD 60991 . 62302) (COMPSETY 62304 . 62428) (COMPSETF +62430 . 62596) (RCOMP3 62598 . 64305) (TCOMPL 64307 . 64606) (RECOMPILE 64608 . 64691) (RECOMP? 64693 + . 65153) (COMPILE 65155 . 67144) (COMPILE1 67146 . 67734) (COMPILE1A 67736 . 69383) ( +SHOULD-BE-DWIMIFIED? 69385 . 70074) (COMPILE.FILECHECK 70076 . 70222) (COMPEM 70224 . 70948) (GETCFILE + 70950 . 72681) (SPECVARS 72683 . 73238) (LOCALVARS 73240 . 73814) (GLOBALVARS 73816 . 74018)) (76481 +77430 (COMPILEMODE 76491 . 77428))))) STOP diff --git a/sources/COMPILE.LCOM b/sources/COMPILE.LCOM index a1dbdff34..b8258da8d 100644 Binary files a/sources/COMPILE.LCOM and b/sources/COMPILE.LCOM differ diff --git a/sources/COREIO.LCOM b/sources/COREIO.LCOM index 9b94cd3e2..208fd1475 100644 Binary files a/sources/COREIO.LCOM and b/sources/COREIO.LCOM differ diff --git a/sources/DIRECTORY.LCOM b/sources/DIRECTORY.LCOM index 3563e7619..5af08faf4 100644 Binary files a/sources/DIRECTORY.LCOM and b/sources/DIRECTORY.LCOM differ diff --git a/sources/DPUPFTP.LCOM b/sources/DPUPFTP.LCOM index 438a337aa..12c152196 100644 Binary files a/sources/DPUPFTP.LCOM and b/sources/DPUPFTP.LCOM differ diff --git a/sources/DSPRINTDEF.LCOM b/sources/DSPRINTDEF.LCOM index 7e381a905..d0e5c0727 100644 Binary files a/sources/DSPRINTDEF.LCOM and b/sources/DSPRINTDEF.LCOM differ diff --git a/sources/EXTERNALFORMAT.TXT b/sources/EXTERNALFORMAT.TXT new file mode 100644 index 000000000..3a6a6dfb1 --- /dev/null +++ b/sources/EXTERNALFORMAT.TXT @@ -0,0 +1,70 @@ +New architecture for character input-output and alternative external formats + +Ron Kaplan, May 2021 + +The Medley system was built with the Xerox Character Coding standard as the target for multi-byte input and output and for the internal mapping of character codes to glyphs. + +This is now quite out of date, and our goal is to move to more modern conventions like Unicode and UTF-8. + +The coding conventions are embodied in macros that test a stream to see if it is XCCS, and to do special open-coded processing (often with the help of locally bound variables for encoding information) if it is. + +If it isn't XCCS, then the macros instead apply functions that are obtained from fields in the stream. This is optimized for the default XCCS set up because in that case a separate function call is avoided, the action itself is open coded. + +The new architecture recognizes that there may be an advantage to specifying a system default for character processing that avoids function calls but that doesn't depend on support (binding of special variables as opposed to accessing stream fields on each call) to get that last measure of efficiency. + +Thus, there are 4 generic macros corresponding to the 4 character IO operations: + +\INCCODE +\OUTCHAR +\BACKCHAR +\PEEKCCODE + +Each of these is defined to fetch a corresponding field from the stream (OUTCHARFN, INCCODEFN, PEEKCCODEFN, BACKCHARFN). If that field is NIL, then each of these passes to a corresonding default macro: + +\DEFAULTINCCODE +\DEFAULTOUTCHAR +\DEFAULTBACKCHAR +\DEFAULTPEEKCCODE + +These default macros can then be redefined to make a wholesale switch of the default encoding standard. + +The macro \OUTCHAR, for example, is defined as + if the stream has an OUTCHARFN, apply it. Otherwise do the \DEFAULTOUTCHAR +and so on for each of the others. + +For the current XCCS default, \DEFAULTOUTCHAR is defined to call \XCCSOUTCHARFN. + +The corresponding stream fields can be set directly, but the preferred interface is to wrap up the 4 functions for a given format in an EXTERNALFORMAT datastructure. The function + + (\EXTERNALFORMAT stream formatname) + +applies the information in the format into the stream. A particular (non-default) format can be specified as an optional parameter when a stream is opened, and each file device can have its own default external format. Then there is also a variable that holds the name of the name of the system-wide default, currently :XCCS. + +If the default external format is applied to a stream, the relevant function fields are set to NIL to kick off the default macro for that particular function, otherwise the function is copied from the external format to the stream. + +An external format has the following fields: + + NAME + INCCODEFN + PEEKCCODEFN + BACKCHARFN + OUTCHARFN + EOL + +The function (\INSTALL.EXTERNALFORMAT format) registers the given format under its name, so it can be retrieved when the name is given to \EXTERNALFORMAT. + +If EOL is not NIL, then it is an end-of-line convention that will override whatever a stream might have had by default. (The value of EOL is one of the constants LF.EOLC, CR.EOLC, CRLF.EOLC.) + +The system now includes external formats for + :XCCS (the global default) + :THROOUGH (untransformed bytes) + +It probably would make sense to also include a :KEYBOARD external format, to generalize that as well. + +UNICODE defines external formats for UTF8 with or without character translation, and also UTF16 (big-end and little-end). When we finally make the swap, we would make :UTF8 be the default, redefine the macros, and recompile all the callers. + +The Japanse external formats that used to be included in the basic system are now provided by a JAPANESE in the library. + +Finally, there is another macro \INCHAR that applies \CHECKEOLC to the result of \INCCODE. + + diff --git a/sources/FASLOAD b/sources/FASLOAD index 0752bef42..0993c39f4 100644 --- a/sources/FASLOAD +++ b/sources/FASLOAD @@ -1,14 +1,14 @@ (DEFINE-FILE-INFO READTABLE "XCL" PACKAGE "FASL") -(IL:FILECREATED "17-Apr-2018 07:55:20"  -IL:|{DSK}kaplan>Local>medley3.5>lispcore>sources>FASLOAD.;2| 35249 +(IL:FILECREATED "10-Jun-2021 18:26:43"  +IL:|{DSK}kaplan>Local>medley3.5>git-medley>sources>FASLOAD.;8| 35584 - IL:|changes| IL:|to:| (IL:FNS CONVERT-FASL-DATE) + IL:|changes| IL:|to:| (IL:FUNCTIONS READ-TEXT) - IL:|previous| IL:|date:| "25-Nov-92 12:35:33" -IL:|{DSK}kaplan>Local>medley3.5>lispcore>sources>FASLOAD.;1|) + IL:|previous| IL:|date:| "17-Apr-2018 07:55:20" +IL:|{DSK}kaplan>Local>medley3.5>git-medley>sources>FASLOAD.;3|) -; Copyright (c) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 2018 by Venue & Xerox Corporation. All rights reserved. +; Copyright (c) 1986-1992, 2018, 2021 by Venue & Xerox Corporation. (IL:PRETTYCOMPRINT IL:FASLOADCOMS) @@ -345,12 +345,17 @@ IL:|{DSK}kaplan>Local>medley3.5>lispcore>sources>FASLOAD.;1|) (RETURN-FROM CHECK-VERSION VERSION))) (DEFUN READ-TEXT (STREAM) + + (IL:* IL:|;;| "RMK: This really should be doing READCCODE to read the bytes, but that fails because this string is not delimited by quotes, rather it has 255 as the end marker. 255 is the XCCS characterset shift, will presumably do something else in Unicode.") + + (IL:* IL:|;;| "Any reason not to print the string as a string?") + (DO ((RESULT (MAKE-ARRAY 512 :ELEMENT-TYPE 'CHARACTER :ADJUSTABLE T :FILL-POINTER 0)) (BYTE (IL:BIN STREAM) (IL:BIN STREAM))) ((EQL BYTE END-MARK) RESULT) - (VECTOR-PUSH-EXTEND (CODE-CHAR BYTE) + (VECTOR-PUSH-EXTEND (CODE-CHAR (IL:\\CHECKEOLC BYTE NIL STREAM)) RESULT))) (DEFUN PROCESS-BLOCK (STREAM &OPTIONAL ITEM-FN (OPTABLE *DEFAULT-OPTABLE*)) @@ -846,17 +851,17 @@ IL:|{DSK}kaplan>Local>medley3.5>lispcore>sources>FASLOAD.;1|) (IL:PUTPROPS IL:FASLOAD IL:MAKEFILE-ENVIRONMENT (:READTABLE "XCL" :PACKAGE "FASL")) (IL:PUTPROPS IL:FASLOAD IL:COPYRIGHT ("Venue & Xerox Corporation" 1986 1987 1988 1989 1990 1991 1992 -2018)) +2018 2021)) (IL:DECLARE\: IL:DONTCOPY - (IL:FILEMAP (NIL (6504 6920 (TABLE-STATS 6504 . 6920)) (7082 7361 (MAKE-OPTABLE 7082 . 7361)) (7363 -8006 (DEFINE-OPCODE-RANGE 7363 . 8006)) (8008 8558 (DEFINE-SINGLE-OPCODE 8008 . 8558)) (8560 8818 ( -ADD-OP-TRANSLATION 8560 . 8818)) (8820 9184 (OPCODE-SEQUENCE 8820 . 9184)) (10778 10944 ( -FASL-END-OF-BLOCK 10778 . 10944)) (10946 11067 (FASL-EXTENDED 10946 . 11067)) (11069 11194 (SETESCAPE -11069 . 11194)) (11196 11292 (UNIMPLEMENTED-OPCODE 11196 . 11292)) (11653 13003 (PROCESS-FILE 11653 . -13003)) (13005 13235 (PROCESS-SEGMENT 13005 . 13235)) (13340 13652 (CHECK-VERSION 13340 . 13652)) ( -13654 13942 (READ-TEXT 13654 . 13942)) (13944 14446 (PROCESS-BLOCK 13944 . 14446)) (14448 14587 ( -SKIP-TEXT 14448 . 14587)) (14642 15249 (DO-OP 14642 . 15249)) (15251 15352 (NEW-VALUE-TABLE 15251 . -15352)) (15354 15453 (CLEAR-TABLE 15354 . 15453)) (15455 15709 (STORE-VALUE 15455 . 15709)) (15711 -15796 (FETCH-VALUE 15711 . 15796)) (15798 16326 (COLLECT-LIST 15798 . 16326)) (31293 34876 ( -IL:FASL-FILEDATE 31306 . 32467) (CONVERT-FASL-DATE 32469 . 34874))))) + (IL:FILEMAP (NIL (6461 6877 (TABLE-STATS 6461 . 6877)) (7039 7318 (MAKE-OPTABLE 7039 . 7318)) (7320 +7963 (DEFINE-OPCODE-RANGE 7320 . 7963)) (7965 8515 (DEFINE-SINGLE-OPCODE 7965 . 8515)) (8517 8775 ( +ADD-OP-TRANSLATION 8517 . 8775)) (8777 9141 (OPCODE-SEQUENCE 8777 . 9141)) (10735 10901 ( +FASL-END-OF-BLOCK 10735 . 10901)) (10903 11024 (FASL-EXTENDED 10903 . 11024)) (11026 11151 (SETESCAPE +11026 . 11151)) (11153 11249 (UNIMPLEMENTED-OPCODE 11153 . 11249)) (11610 12960 (PROCESS-FILE 11610 . +12960)) (12962 13192 (PROCESS-SEGMENT 12962 . 13192)) (13297 13609 (CHECK-VERSION 13297 . 13609)) ( +13611 14272 (READ-TEXT 13611 . 14272)) (14274 14776 (PROCESS-BLOCK 14274 . 14776)) (14778 14917 ( +SKIP-TEXT 14778 . 14917)) (14972 15579 (DO-OP 14972 . 15579)) (15581 15682 (NEW-VALUE-TABLE 15581 . +15682)) (15684 15783 (CLEAR-TABLE 15684 . 15783)) (15785 16039 (STORE-VALUE 15785 . 16039)) (16041 +16126 (FETCH-VALUE 16041 . 16126)) (16128 16656 (COLLECT-LIST 16128 . 16656)) (31623 35206 ( +IL:FASL-FILEDATE 31636 . 32797) (CONVERT-FASL-DATE 32799 . 35204))))) IL:STOP diff --git a/sources/FASLOAD.LCOM b/sources/FASLOAD.LCOM index 3d95e81a1..b480be22a 100644 Binary files a/sources/FASLOAD.LCOM and b/sources/FASLOAD.LCOM differ diff --git a/sources/FILEIO b/sources/FILEIO index 1dd846a9c..22cc6d55c 100644 --- a/sources/FILEIO +++ b/sources/FILEIO @@ -1,11 +1,12 @@ -(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "26-Apr-2021 22:59:15"  -{DSK}kaplan>Local>medley3.5>git-medley>sources>FILEIO.;15 181837 +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS) +(FILECREATED " 9-Jul-2021 17:43:09"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>FILEIO.;58 179154 - changes to%: (RECORDS STREAM EXTERNALFORMAT) + changes to%: (VARS FILEIOCOMS) + (FNS \EXTERNALFORMAT) - previous date%: "26-Apr-2021 22:23:18" -{DSK}kaplan>Local>medley3.5>git-medley>sources>FILEIO.;14) + previous date%: " 9-Jul-2021 09:35:10" +{DSK}kaplan>Local>medley3.5>git-medley>sources>FILEIO.;57) (* ; " @@ -33,11 +34,9 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (MACROS STREAMOP) (CONSTANTS AppendBit NoBits ReadBit WriteBit (OutputBits (LOGOR AppendBit WriteBit)) - (BothBits (LOGOR ReadBit OutputBits)) - \NORUNCODE) + (BothBits (LOGOR ReadBit OutputBits))) (MACROS TestMasked APPENDABLE APPENDONLY DIRTYABLE OPENED OVERWRITEABLE READABLE READONLY WRITEABLE) - (MACROS \RUNCODED) (CONSTANTS * EOLCONVENTIONS))) (FNS STREAMPROP GETSTREAMPROP PUTSTREAMPROP STREAMP) [COMS (* ; "make streams print pretty") @@ -58,29 +57,23 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (DECLARE%: DOEVAL@COMPILE DONTCOPY (EXPORT (RECORDS EXTERNALFORMAT))) (INITRECORDS EXTERNALFORMAT) (SYSRECORDS EXTERNALFORMAT) - (FNS \INSTALL.EXTERNALFORMAT \REMOVE.EXTERNALFORMAT \GET.EXTERNALFORMAT.FROM.NAME - \EXTERNALFORMAT) - (INITVARS (*SUPPORTED-EXTERNALFORMATS* '(:XCCS :DEFAULT)) - (*DEFAULT-EXTERNAL-FORMATS*) - (*EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT*)) - (GLOBALVARS *SUPPORTED-EXTERNALFORMATS* *DEFAULT-EXTERNAL-FORMATS* - *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT*) - (FNS \CREATE.JIS.EXTERNALFORMAT \CREATE.SHIFTJIS.EXTERNALFORMAT - \CREATE.EUC.EXTERNALFORMAT \CREATE.THROUGH.EXTERNALFORMAT) - (DECLARE%: DONTEVAL@LOAD DOCOPY (P (\CREATE.JIS.EXTERNALFORMAT) - (\CREATE.SHIFTJIS.EXTERNALFORMAT) - (\CREATE.EUC.EXTERNALFORMAT) - (\CREATE.THROUGH.EXTERNALFORMAT] + (FNS \INSTALL.EXTERNALFORMAT \REMOVE.EXTERNALFORMAT FIND-FORMAT \EXTERNALFORMAT) + (INITVARS [*DEFAULT-EXTERNALFORMATS* '((DSK :XCCS] + (*EXTERNALFORMATS* NIL)) + (GLOBALVARS *EXTERNALFORMATS* *DEFAULT-EXTERNALFORMATS* *DEFAULT-EXTERNALFORMAT*) + (EXPORT (INITVARS (*DEFAULT-EXTERNALFORMAT* :XCCS))) + (COMS (FNS \CREATE.THROUGH.EXTERNALFORMAT \THROUGHIN \THROUGHBACKCCODE + \THROUGHOUTCHARFN) + (DECLARE%: DONTEVAL@LOAD DOCOPY (P (\CREATE.THROUGH.EXTERNALFORMAT] (COMS (* ; "Device operations") (FNS \DEFINEDEVICE \GETDEVICEFROMNAME \GETDEVICEFROMHOSTNAME \REMOVEDEVICE \REMOVEDEVICE.NAMES) (INITVARS (STREAM-AFTER-OPEN-FNS NIL)) (FNS \CLOSEFILE \DELETEFILE \DEVICEEVENT \GENERATEFILES \GENERATENEXTFILE - \GENERATEFILEINFO \GETFILENAME \GENERIC.READCCODE \GENERIC.OUTFILEP \OPENFILE - \DO.PARAMS.AT.OPEN \RENAMEFILE \REVALIDATEFILE \PAGED.REVALIDATEFILELST - \PAGED.REVALIDATEFILES \PAGED.REVALIDATEFILE \BUFFERED.REVALIDATEFILE - \BUFFERED.REVALIDATEFILELST \PRINT-REVALIDATION-RESULT \TRUNCATEFILE - \FILE-CONFLICT) + \GENERATEFILEINFO \GETFILENAME \GENERIC.OUTFILEP \OPENFILE \DO.PARAMS.AT.OPEN + \RENAMEFILE \REVALIDATEFILE \PAGED.REVALIDATEFILELST \PAGED.REVALIDATEFILES + \PAGED.REVALIDATEFILE \BUFFERED.REVALIDATEFILE \BUFFERED.REVALIDATEFILELST + \PRINT-REVALIDATION-RESULT \TRUNCATEFILE \FILE-CONFLICT) (COMS (* ; "Generic enumerator") (FNS \GENERATENOFILES \NULLFILEGENERATOR \NOFILESNEXTFILEFN \NOFILESINFOFN) (DECLARE%: DONTCOPY (RECORDS NOFILEGENSTATE))) @@ -112,8 +105,8 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (FNS \MAP-OPEN-STREAMS) (VARS FILING.TYPES) (GLOBALVARS FILING.TYPES) - (DECLARE%: EVAL@COMPILE DONTCOPY (EXPORT (MACROS \OUTCHAR \DEVICE-OPEN-STREAMS - \CONVERT-PATHNAME) + (DECLARE%: EVAL@COMPILE DONTCOPY (EXPORT (MACROS \DEVICE-OPEN-STREAMS \CONVERT-PATHNAME + ) (OPTIMIZERS ACCESS-CHARSET))) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (MAPC '((FORCEOUTPUT FLUSHOUTPUT) (FORCEOUTPUT FLUSHMAP) @@ -127,14 +120,15 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (FNS \EOF.ACTION \EOSERROR \GETEOFPTR \INCFILEPTR \PEEKBIN \SETCLOSEDFILELENGTH \SETEOFPTR \SETFILEPTR) (FNS \FIXPOUT \FIXPIN) - (DECLARE%: DONTCOPY (EXPORT (MACROS \DECFILEPTR \GETFILEPTR \SIGNEDWIN \SIGNEDWOUT \WIN - \WOUT \BINS \BOUTS \EOFP SIZE.FROM.LENGTH) - (CONSTANTS BitsPerByte (ByteOffsetSize (SELECTQ (SYSTEMTYPE) - (VAX 10) - 9)) - WordsPerPage) - [CONSTANTS (\MAXFILEPTR (SUB1 (LLSH 1 30] - (RECORDS BYTEPTR)) + (DECLARE%: DONTCOPY + (EXPORT (MACROS \DECFILEPTR \GETFILEPTR \SIGNEDWIN \SIGNEDWOUT \WIN \WOUT \BINS + \BOUTS \BOUTEOL \EOFP SIZE.FROM.LENGTH) + (CONSTANTS BitsPerByte (ByteOffsetSize (SELECTQ (SYSTEMTYPE) + (VAX 10) + 9)) + WordsPerPage) + [CONSTANTS (\MAXFILEPTR (SUB1 (LLSH 1 30] + (RECORDS BYTEPTR)) (CONSTANTS MaxChar))) (COMS (* ; "Buffered IO") (FNS \BUFFERED.BIN \BUFFERED.PEEKBIN \BUFFERED.BOUT \BUFFERED.BINS \BUFFERED.BOUTS @@ -171,7 +165,7 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. POINTER FLAG (BITS 2) FLAG POINTER POINTER POINTER WORD WORD POINTER POINTER POINTER POINTER POINTER WORD WORD WORD WORD POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER - WORD WORD POINTER POINTER POINTER POINTER) + WORD WORD POINTER POINTER POINTER POINTER POINTER) '((STREAM 0 (BITS . 15)) (STREAM 1 (BITS . 15)) (STREAM 2 (FLAGBITS . 0)) @@ -223,8 +217,9 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (STREAM 54 POINTER) (STREAM 56 POINTER) (STREAM 58 POINTER) - (STREAM 60 POINTER)) - '62) + (STREAM 60 POINTER) + (STREAM 62 POINTER)) + '64) ) (ADDTOVAR SYSTEMRECLST @@ -279,7 +274,8 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (EXTRASTREAMOP POINTER) (INCCODEFN POINTER) (PEEKCCODEFN POINTER) - (BACKCHARFN POINTER))) + (BACKCCODEFN POINTER) + (EXTERNALFORMAT POINTER))) ) (DECLARE%: DONTCOPY (* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE @@ -375,7 +371,8 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation.  "For use of applications programs, not devices") (INCCODEFN POINTER) (* ; "Set by \EXTERNALFORMAT") (PEEKCCODEFN POINTER) - (BACKCHARFN POINTER)) + (BACKCCODEFN POINTER) + (EXTERNALFORMAT POINTER)) (BLOCKRECORD STREAM ((NIL 2 WORD) (UCODEFLAGS1 BITS 1) @@ -404,35 +401,6 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. DATUM)) (NAMEDP (AND (fetch (STREAM FULLFILENAME) of DATUM) T] - [ACCESSFNS STREAM (EXTERNALFORMAT (LISTGET (ffetch (STREAM OTHERPROPS) of DATUM) - 'EXTERNALFORMAT) - (LET ((PROPS (ffetch (STREAM OTHERPROPS) of DATUM))) - (freplace (STREAM NOTXCCS) of DATUM with T) - [COND - (PROPS (LISTPUT PROPS 'EXTERNALFORMAT NEWVALUE)) - (T (freplace (STREAM OTHERPROPS) of DATUM - with (LIST 'EXTERNALFORMAT NEWVALUE] - (freplace (STREAM OUTCHARFN) of DATUM - with (ffetch (EXTERNALFORMAT FILEOUTCHARFN) - of NEWVALUE)) - (AND (ffetch (EXTERNALFORMAT EOLVALID) of NEWVALUE) - (freplace (STREAM EOLCONVENTION) of DATUM - with (ffetch (EXTERNALFORMAT EOL) - of NEWVALUE] - [ACCESSFNS STREAM (EXTERNALFORMAT.NAME (LISTGET (ffetch (STREAM OTHERPROPS) - of DATUM) - 'EXTERNALFORMAT.NAME) - (LET [(PROPS (ffetch (STREAM OTHERPROPS) of DATUM)) - (NAME (COND - ((LITATOM NEWVALUE) - NEWVALUE) - (T (MKATOM NEWVALUE] - (freplace (STREAM NOTXCCS) of DATUM with T) - (COND - (PROPS (LISTPUT PROPS 'EXTERNALFORMAT.NAME NAME)) - (T (freplace (STREAM OTHERPROPS) of DATUM - with (LIST 'EXTERNALFORMAT.NAME NAME] - (ACCESSFNS STREAM (FILEOUTCHARFN (ffetch (STREAM OUTCHARFN) of DATUM))) (SYNONYM CBUFPTR (CPPTR)) USERCLOSEABLE _ T USERVISIBLE _ T ACCESSBITS _ NoBits CPAGE _ 0 EPAGE _ 0 BUFFS _ NIL BYTESIZE _ 8 CBUFPTR _ NIL MAXBUFFERS _ (LET NIL (DECLARE (GLOBALVARS @@ -441,7 +409,6 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. \STREAM.DEFAULT.MAXBUFFERS) CHARPOSITION _ 0 LINELENGTH _ (LET NIL (DECLARE (GLOBALVARS FILELINELENGTH)) FILELINELENGTH) - OUTCHARFN _ (FUNCTION \FILEOUTCHARFN) ENDOFSTREAMOP _ (FUNCTION \EOSERROR) IMAGEOPS _ \NOIMAGEOPS EOLCONVENTION _ LF.EOLC STRMBINFN _ (FUNCTION \STREAM.NOT.OPEN) STRMBOUTFN _ (FUNCTION \STREAM.NOT.OPEN) @@ -454,7 +421,7 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. POINTER FLAG (BITS 2) FLAG POINTER POINTER POINTER WORD WORD POINTER POINTER POINTER POINTER POINTER WORD WORD WORD WORD POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER - WORD WORD POINTER POINTER POINTER POINTER) + WORD WORD POINTER POINTER POINTER POINTER POINTER) '((STREAM 0 (BITS . 15)) (STREAM 1 (BITS . 15)) (STREAM 2 (FLAGBITS . 0)) @@ -506,8 +473,9 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (STREAM 54 POINTER) (STREAM 56 POINTER) (STREAM 58 POINTER) - (STREAM 60 POINTER)) - '62) + (STREAM 60 POINTER) + (STREAM 62 POINTER)) + '64) (DECLARE%: EVAL@COMPILE (PUTPROPS STREAMOP MACRO [ARGS (CONS 'SPREADAPPLY* @@ -535,12 +503,9 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (RPAQ BothBits (LOGOR ReadBit OutputBits)) -(RPAQQ \NORUNCODE 255) - (CONSTANTS AppendBit NoBits ReadBit WriteBit (OutputBits (LOGOR AppendBit WriteBit)) - (BothBits (LOGOR ReadBit OutputBits)) - \NORUNCODE) + (BothBits (LOGOR ReadBit OutputBits))) ) (DECLARE%: EVAL@COMPILE @@ -581,20 +546,11 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (AND (APPENDABLE STREAM) (\EOFP STREAM]) ) -(DECLARE%: EVAL@COMPILE - -(PUTPROPS \RUNCODED MACRO (OPENLAMBDA (STREAM) - - (* ;; "returns NIL is the stream is not runcoded, that is, if the stream has 16 bit bytes explicitly represented") - (* ; - "note that neq is ok since charsets are known to be SMALLP's") - (NEQ (fetch CHARSET of STREAM) - \NORUNCODE))) -) (RPAQQ EOLCONVENTIONS ((CR.EOLC 0) (LF.EOLC 1) - (CRLF.EOLC 2))) + (CRLF.EOLC 2) + (ANY.EOLC 3))) (DECLARE%: EVAL@COMPILE (RPAQQ CR.EOLC 0) @@ -603,10 +559,13 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (RPAQQ CRLF.EOLC 2) +(RPAQQ ANY.EOLC 3) + (CONSTANTS (CR.EOLC 0) (LF.EOLC 1) - (CRLF.EOLC 2)) + (CRLF.EOLC 2) + (ANY.EOLC 3)) ) (* "END EXPORTED DEFINITIONS") @@ -630,46 +589,49 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (T (\ILLEGAL.ARG NIL]) (GETSTREAMPROP - [LAMBDA (STREAM PROP) (* ; "Edited 5-Aug-2020 16:42 by rmk:") + [LAMBDA (STREAM PROP) (* ; "Edited 29-Jun-2021 17:06 by rmk:") (* rda%: "22-Aug-84 16:17") - (IF (EQ PROP 'EXTERNALFORMAT) - THEN (\EXTERNALFORMAT STREAM) - ELSE (LISTGET (fetch (STREAM OTHERPROPS) of STREAM) - PROP]) + (SELECTQ PROP + ((FORMAT EXTERNALFORMAT) + (\EXTERNALFORMAT STREAM)) + (ENDOFSTREAMOP (FETCH (STREAM ENDOFSTREAMOP) OF STREAM)) + (LISTGET (fetch (STREAM OTHERPROPS) of STREAM) + PROP]) (PUTSTREAMPROP - [LAMBDA (STREAM PROP VALUE) (* ; "Edited 5-Aug-2020 16:42 by rmk:") + [LAMBDA (STREAM PROP VALUE) (* ; "Edited 29-Jun-2021 17:06 by rmk:") (* rda%: "22-Aug-84 16:11") - (IF (EQ PROP 'EXTERNALFORMAT) - THEN - - (* ;; "Return the old name (=VALUE), not the format datum. Better design: the format should have it's name, and not have name as a separate property.") - - (PROG1 (\EXTERNALFORMAT STREAM NIL) - (AND VALUE (\EXTERNALFORMAT STREAM VALUE))) - ELSE (PROG ((OLDDATA (fetch OTHERPROPS of STREAM)) - OLDVALUE) - (RETURN (PROG1 (COND - (OLDDATA (SETQ OLDVALUE (LISTGET OLDDATA PROP)) - [COND - (VALUE (LISTPUT OLDDATA PROP VALUE)) - (OLDVALUE (* ; "Remove the property") - (COND - ((EQ (CAR OLDDATA) - PROP) - (replace OTHERPROPS of STREAM - with (CDDR OLDDATA))) - (T (for TAIL on (CDR OLDDATA) - by (CDDR TAIL) - when (EQ (CADR TAIL) - PROP) - do (FRPLACD TAIL (CDDDR TAIL)) - (RETURN] - OLDVALUE) - (VALUE (replace OTHERPROPS of STREAM - with (LIST PROP VALUE)) + (SELECTQ PROP + ((FORMAT EXTERNALFORMAT) + (* ;; "Return the old name (=VALUE), not the format datum. Better design: the format should have it's name, and not have name as a separate property.") + + (PROG1 (\EXTERNALFORMAT STREAM NIL) + (AND VALUE (\EXTERNALFORMAT STREAM VALUE)))) + (ENDOFSTREAMOP (PROG1 (fetch (STREAM ENDOFSTREAMOP) of STREAM) + (replace (STREAM ENDOFSTREAMOP) of STREAM with VALUE))) + (PROG ((OLDDATA (fetch OTHERPROPS of STREAM)) + OLDVALUE) + (RETURN (PROG1 (COND + (OLDDATA (SETQ OLDVALUE (LISTGET OLDDATA PROP)) + [COND + (VALUE (LISTPUT OLDDATA PROP VALUE)) + (OLDVALUE (* ; "Remove the property") + (COND + ((EQ (CAR OLDDATA) + PROP) + (replace OTHERPROPS of STREAM + with (CDDR OLDDATA))) + (T (for TAIL on (CDR OLDDATA) + by (CDDR TAIL) + when (EQ (CADR TAIL) + PROP) + do (FRPLACD TAIL (CDDDR TAIL)) + (RETURN] + OLDVALUE) + (VALUE (replace OTHERPROPS of STREAM with (LIST PROP + VALUE)) (* ; "know old value is NIL") - NIL]) + NIL]) (STREAMP [LAMBDA (X) (* rmk%: "14-OCT-83 14:35") @@ -920,11 +882,12 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation.  "(stream byte) output byte to stream") (PEEKBIN POINTER) (* ;  "(stream) => next byte without advancing position in stream") - (READCHAR POINTER) (* ; "(stream) => next input char") - (WRITECHAR POINTER) (* ; - "(stream char) => writes char to stream") - (PEEKCHAR POINTER) - (UNREADCHAR POINTER) + (NIL POINTER) (* ; + "Was READCHAR, replaced by READCHARCODE") + (NIL POINTER) (* ; + "Was WRITECHAR (stream char) => writes char to stream") + (NIL POINTER) (* ; "Was PEEKCHAR") + (NIL POINTER) (* ; "Was UNREADCHAR") (READP POINTER) (* ;  "(stream flag) => T if there is input available from stream right now") (EOFP POINTER) (* ; @@ -977,13 +940,13 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (* ;; "-----For any stream (here to not recompile everything)-----") - (READCHARCODE POINTER) (* ; - "Read a character code from the stream (cf BIN for bytes).") + (NIL POINTER) (* ; + "Was READCHARCODE. Read a character code from the stream (cf BIN for bytes).") ) DIRECTORYNAMEP _ (FUNCTION NILL) HOSTNAMEP _ (FUNCTION NILL) READP _ (FUNCTION \GENERIC.READP) - SETFILEPTR _ (FUNCTION \IS.NOT.RANDACCESSP) + SETFILEPTR _ (FUNCTION \IS.NO.RANDACCESSP) GETFILEPTR _ (FUNCTION \ILLEGAL.DEVICEOP) GETEOFPTR _ (FUNCTION \IS.NOT.RANDACCESSP) EOFP _ (FUNCTION \ILLEGAL.DEVICEOP) @@ -994,13 +957,8 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. REGISTERFILE _ (FUNCTION NILL) OPENP _ (FUNCTION NILL) UNREGISTERFILE _ (FUNCTION NILL) - READCHAR _ (FUNCTION \GENERIC.READCHAR) - WRITECHAR _ (FUNCTION \GENERIC.WRITECHAR) - PEEKCHAR _ (FUNCTION \GENERIC.PEEKCHAR) - UNREADCHAR _ (FUNCTION \GENERIC.UNREADCHAR) CHARSETFN _ (FUNCTION \GENERIC.CHARSET) - BREAKCONNECTION _ (FUNCTION NILL) - READCHARCODE _ (FUNCTION \GENERIC.READCCODE)) + BREAKCONNECTION _ (FUNCTION NILL)) (RECORD FILEGENOBJ (NEXTFILEFN FILEINFOFN . GENFILESTATE)) ) @@ -1192,10 +1150,10 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (BIN POINTER) (BOUT POINTER) (PEEKBIN POINTER) - (READCHAR POINTER) - (WRITECHAR POINTER) - (PEEKCHAR POINTER) - (UNREADCHAR POINTER) + (NIL POINTER) + (NIL POINTER) + (NIL POINTER) + (NIL POINTER) (READP POINTER) (EOFP POINTER) (BLOCKIN POINTER) @@ -1219,7 +1177,7 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (TRUNCATEFILE POINTER) (WINDOWOPS POINTER) (WINDOWDATA POINTER) - (READCHARCODE POINTER))) + (NIL POINTER))) ) @@ -1229,27 +1187,26 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (DECLARE%: DOEVAL@COMPILE DONTCOPY (* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE -(DATATYPE EXTERNALFORMAT ((EOLVALID FLAG) (* ; - "If true, the value of EOL field will replace the EOLCONVENTION field of the resulted stream.") +(DATATYPE EXTERNALFORMAT ((EOLVALID FLAG) (* ; "If true, the value of EOL field will replace the EOLCONVENTION field of the resulted stream. (Can't test EOL because it is always something)") (EOL BITS 2) (NIL BITS 1) (INCCODEFN POINTER) (* ; - "Called with two arguments -- STREAM and COUNTP") + "Called with STREAM and 2 optional arguments, BYTECOUNTVAR and BYTECOUNTVAL") (PEEKCCODEFN POINTER) (* ; - "Called with three arguments -- STREAM, NOERROR and COUNTP") - (BACKCHARFN POINTER) (* ; - "Called with two arguments -- STREAM and COUNTP") - (FILEOUTCHARFN POINTER) (* ; + "Called with three arguments -- STREAM, NOERROR, and EOL") + (BACKCCODEFN POINTER) (* ; + "Called with STREAM and optional BYTECOUNTVAR and BYTECOUNTVAL") + (OUTCHARFN POINTER) (* ;  "Called with two arguments -- STREAM and CHARCODE") (NAME POINTER) (* ;  "keyword name of this format, provided to \INSTALL.EXTERNALFORMAT") - ) - EOLVALID _ NIL) + (FORMATBYTESTREAMFN POINTER (* ; "Function to copy the format state of a given stream to an IO stream that allows formatted byte sequences to be examined") + ))) ) (/DECLAREDATATYPE 'EXTERNALFORMAT '(FLAG (BITS 2) (BITS 1) - POINTER POINTER POINTER POINTER POINTER) + POINTER POINTER POINTER POINTER POINTER POINTER) '((EXTERNALFORMAT 0 (FLAGBITS . 0)) (EXTERNALFORMAT 0 (BITS . 17)) (EXTERNALFORMAT 0 (BITS . 48)) @@ -1257,8 +1214,9 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (EXTERNALFORMAT 2 POINTER) (EXTERNALFORMAT 4 POINTER) (EXTERNALFORMAT 6 POINTER) - (EXTERNALFORMAT 8 POINTER)) - '10) + (EXTERNALFORMAT 8 POINTER) + (EXTERNALFORMAT 10 POINTER)) + '12) (* "END EXPORTED DEFINITIONS") @@ -1266,7 +1224,7 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (/DECLAREDATATYPE 'EXTERNALFORMAT '(FLAG (BITS 2) (BITS 1) - POINTER POINTER POINTER POINTER POINTER) + POINTER POINTER POINTER POINTER POINTER POINTER) '((EXTERNALFORMAT 0 (FLAGBITS . 0)) (EXTERNALFORMAT 0 (BITS . 17)) (EXTERNALFORMAT 0 (BITS . 48)) @@ -1274,8 +1232,9 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (EXTERNALFORMAT 2 POINTER) (EXTERNALFORMAT 4 POINTER) (EXTERNALFORMAT 6 POINTER) - (EXTERNALFORMAT 8 POINTER)) - '10) + (EXTERNALFORMAT 8 POINTER) + (EXTERNALFORMAT 10 POINTER)) + '12) (ADDTOVAR SYSTEMRECLST (DATATYPE EXTERNALFORMAT ((EOLVALID FLAG) @@ -1283,195 +1242,176 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (NIL BITS 1) (INCCODEFN POINTER) (PEEKCCODEFN POINTER) - (BACKCHARFN POINTER) - (FILEOUTCHARFN POINTER) - (NAME POINTER))) + (BACKCCODEFN POINTER) + (OUTCHARFN POINTER) + (NAME POINTER) + (FORMATBYTESTREAMFN POINTER (* ; "Function to copy the format state of a given stream to an IO stream that allows formatted byte sequences to be examined") + ))) ) (DEFINEQ (\INSTALL.EXTERNALFORMAT - [LAMBDA (NAME EXTERNALFORMAT) (* ; "Edited 25-Apr-2021 21:55 by rmk:") - -(* ;;; "Install an external format vector, giving it the name NAME. EXTERNALFORMAT is an instance of the datatype EXTERNALFORMAT. *SUPPORTED-EXTERNALFORMATS* contains all installed external formats. *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT* maps a name int its external format.") + [LAMBDA (EXTFORMAT/NAME EXTERNALFORMAT) (* ; "Edited 5-May-2021 12:55 by rmk:") - (DECLARE (GLOBALVARS *SUPPORTED-EXTERNALFORMATS* *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT*)) - (COND - ((type? EXTERNALFORMAT EXTERNALFORMAT) - (LET (ENTRY) - [SETQ NAME (COND - ((LITATOM NAME) - NAME) - (T (MKATOM NAME] +(* ;;; "Register an instance of the datatype EXTERNALFORMAT.") - (* ;; "RMK: Added NAME so the format-name can be extracted from a stream") +(* ;;; "For backward compatibility, the first argument can be a NAME with the second argument being the format. If so, the NAME must match the name inside the format") - (REPLACE (EXTERNALFORMAT NAME) OF EXTERNALFORMAT WITH NAME) - (UNINTERRUPTABLY - [COND - ((SETQ ENTRY (FASSOC NAME *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT*)) - (RPLACD ENTRY EXTERNALFORMAT)) - (T (pushnew *SUPPORTED-EXTERNALFORMATS* NAME) - (push *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT* (CONS NAME EXTERNALFORMAT] - NAME))) - (T (ERROR "INVALID EXTERNALFORMAT " EXTERNALFORMAT]) + (LET (NAME) + (IF EXTERNALFORMAT + THEN -(\REMOVE.EXTERNALFORMAT - [LAMBDA (EXTERNALFORMAT) (* ; "Edited 26-Feb-91 17:34 by nm") + (* ;; "Backwards compatibility") -(* ;;; -"Removes externalformat EXTERNALFORMAT and association between any of its name and EXTERNALFORMAT.") + (SETQ NAME (MKATOM EXTFORMAT/NAME)) + (IF (EQ NAME (FETCH (EXTERNALFORMAT NAME) OF EXTERNALFORMAT)) + ELSEIF (FETCH (EXTERNALFORMAT NAME) OF EXTERNALFORMAT) + THEN (ERROR "Mismatch of specified name and name of the external format") + ELSE (REPLACE (EXTERNALFORMAT NAME) OF EXTERNALFORMAT WITH + NAME)) + ELSE (SETQ EXTERNALFORMAT EXTFORMAT/NAME) + (SETQ NAME (FETCH (EXTERNALFORMAT NAME) OF EXTERNALFORMAT))) + (COND + ((type? EXTERNALFORMAT EXTERNALFORMAT) + (\REMOVE.EXTERNALFORMAT NAME) + (push *EXTERNALFORMATS* EXTERNALFORMAT) + NAME) + (T (ERROR "INVALID EXTERNALFORMAT " EXTERNALFORMAT]) - (DECLARE (GLOBALVARS *SUPPORTED-EXTERNALFORMATS* *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT*)) - (LET (ENTRY) - [COND - ((SETQ ENTRY (CL:RASSOC EXTERNALFORMAT *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT*)) - (UNINTERRUPTABLY - (SETQ *SUPPORTED-EXTERNALFORMATS* (DREMOVE (CAR ENTRY) - *SUPPORTED-EXTERNALFORMATS*)) - (SETQ *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT* (DREMOVE ENTRY - *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT* - )))] - EXTERNALFORMAT]) - -(\GET.EXTERNALFORMAT.FROM.NAME - [LAMBDA (NAME) - (DECLARE (GLOBALVARS *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT*)) - (* ; "Edited 26-Feb-91 17:33 by nm") - [SETQ NAME (COND - ((LITATOM NAME) - NAME) - (T (MKATOM NAME] - (CDR (FASSOC NAME *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT*]) +(\REMOVE.EXTERNALFORMAT + [LAMBDA (NAME/EXTFORMAT) (* ; "Edited 5-May-2021 15:42 by rmk:") + +(* ;;; "Deregisters external format EXTERNALFORMAT .") + + (SETQ NAME/EXTFORMAT (IF (TYPE? EXTERNALFORMAT NAME/EXTFORMAT) + THEN (FETCH (EXTERNALFORMAT NAME) OF NAME/EXTFORMAT) + ELSE (MKATOM NAME/EXTFORMAT))) + (SETQ *EXTERNALFORMATS* (DREMOVE (FIND EF IN *EXTERNALFORMATS* + SUCHTHAT (EQ NAME/EXTFORMAT (FETCH (EXTERNALFORMAT + NAME) + OF EF))) + *EXTERNALFORMATS*]) + +(FIND-FORMAT + [LAMBDA (NAME NOERROR) (* ; "Edited 9-Jul-2021 09:34 by rmk:") + (SETQ NAME (MKATOM NAME)) (* ; + "The EQMEMB allows for synonyms, the first of which should be canonical. E.g. (:UTF-8 :UTF8)") + (OR (FIND EF IN *EXTERNALFORMATS* SUCHTHAT (EQ NAME (FETCH (EXTERNALFORMAT NAME) + OF EF))) + (CL:UNLESS NOERROR (ERROR NAME "is not an external format"]) (\EXTERNALFORMAT - [LAMBDA (STREAM NEWVALUE) (* ; "Edited 26-Apr-2021 22:22 by rmk:") + [LAMBDA (STREAM NEWFORMAT/NAME) (* ; "Edited 9-Jul-2021 17:42 by rmk:") (* ; "Edited 26-Feb-91 13:20 by nm") -(* ;;; "If NEWVALUE is nil, just returns the current external format name of STREAM. If NEWVALUE is supplied, the external format of STREAM is set to the external format named NEWVALUE.") +(* ;;; ";;; RMK July 2020: Added interface for per-device default external format. \DO.PARAMS.AT.OPEN will make that call even if it is not specified from the open. STREAMPROP is fixed to call \EXTERNALFORMAT to set the property EXTERNALFORMAT, to export a user-level way of manipulating this.") -(* ;;; "RMK July 2020: Added interface for per-device default external format. \DO.PARAMS.AT.OPEN will make that call even if it is not specified from the open.") +(* ;;; "") - (* ;; ":DEFAULT means the default external format for STREAM's filedevice") +(* ;;; "If NEWFORMAT/NAME is nil, just returns the current external format name of STREAM. If NEWFORMAT/NAME is supplied and it is or names an external format, then the external format of STREAM is set to that format.") - (\DTEST STREAM 'STREAM) - (CL:WHEN (EQ NEWVALUE :DEFAULT) - (SETQ NEWVALUE (OR (CADR (ASSOC (FETCH DEVICENAME OF (FETCH DEVICE OF STREAM) - ) - *DEFAULT-EXTERNAL-FORMATS*)) - :XCCS))) +(* ;;; "") - (* ;; "The accessfn for replacing EXTERNALFORMAT sets NOTXCCS to NIL. If we don't want to make that more general, we don't want to create and store an explicit :XCCS format, since that would flip the bit. But it is OK to store the name. Also, STREAMPROP is fixed to call \EXTERNALFORMAT to set the property EXTERNALFORMAT, to export a user-level way of manipulating this.") +(* ;;; ":DEFAULT means the default external format for STREAM's filedevice") - (LET (EXTFORMAT) - (COND - [NEWVALUE (COND - ((EQ NEWVALUE :XCCS) - (UNINTERRUPTABLY - (freplace EXTERNALFORMAT.NAME of STREAM with :XCCS) - (freplace (STREAM NOTXCCS) of STREAM with NIL) - (freplace (STREAM INCCODEFN) of STREAM with NIL) - (freplace (STREAM PEEKCCODEFN) of STREAM with NIL) - (freplace (STREAM BACKCHARFN) of STREAM with NIL) - (freplace (STREAM EOLCONVENTION) of STREAM with LF.EOLC))) - [(AND (FMEMB NEWVALUE *SUPPORTED-EXTERNALFORMATS*) - (\DTEST (SETQ EXTFORMAT (\GET.EXTERNALFORMAT.FROM.NAME NEWVALUE)) - 'EXTERNALFORMAT)) - (UNINTERRUPTABLY - (freplace EXTERNALFORMAT of STREAM with EXTFORMAT) - (freplace (STREAM NOTXCCS) of STREAM with T) - (freplace (STREAM OUTCHARFN) of STREAM - with (ffetch (EXTERNALFORMAT FILEOUTCHARFN) of EXTFORMAT - )) - (freplace (STREAM INCCODEFN) of STREAM - with (ffetch (EXTERNALFORMAT INCCODEFN) of EXTFORMAT)) - (freplace (STREAM PEEKCCODEFN) of STREAM - with (ffetch (EXTERNALFORMAT PEEKCCODEFN) of EXTFORMAT)) - (freplace (STREAM BACKCHARFN) of STREAM - with (ffetch (EXTERNALFORMAT BACKCHARFN) of EXTFORMAT)) - (CL:WHEN (ffetch (EXTERNALFORMAT EOLVALID) of EXTFORMAT) - (freplace (STREAM EOLCONVENTION) of STREAM - with (ffetch (EXTERNALFORMAT EOL) of EXTFORMAT))))] - (T (ERROR NEWVALUE "INVALID EXTERNALFORMAT " NEWVALUE] - (T (ffetch EXTERNALFORMAT.NAME of STREAM]) -) +(* ;;; "The all-device default is in *DEFAULT-EXTERNALFORMAT*.") -(RPAQ? *SUPPORTED-EXTERNALFORMATS* '(:XCCS :DEFAULT)) + (\DTEST STREAM 'STREAM) + (CL:WHEN NEWFORMAT/NAME + [LET (EXTFORMAT) + (if (type? EXTERNALFORMAT NEWFORMAT/NAME) + then (SETQ EXTFORMAT NEWFORMAT/NAME) + else (CL:WHEN (EQ NEWFORMAT/NAME :DEFAULT) + (SETQ NEWFORMAT/NAME (OR (CADR (ASSOC (fetch DEVICENAME + of (fetch DEVICE + of STREAM)) + *DEFAULT-EXTERNALFORMATS*)) + *DEFAULT-EXTERNALFORMAT*))) + (SETQ EXTFORMAT (FIND-FORMAT NEWFORMAT/NAME)) + (CL:UNLESS EXTFORMAT (ERROR NEWFORMAT/NAME + "is not a registered external format name")) + (CL:UNLESS (type? EXTERNALFORMAT EXTFORMAT) + (ERROR "INVALID EXTERNALFORMAT " EXTFORMAT))) + (UNINTERRUPTABLY + (freplace (STREAM EXTERNALFORMAT) of STREAM with EXTFORMAT) + (CL:WHEN (ffetch (EXTERNALFORMAT EOLVALID) of EXTFORMAT) + (freplace (STREAM EOLCONVENTION) of STREAM with (ffetch + (EXTERNALFORMAT + EOL) of + EXTFORMAT + ))) + (freplace (STREAM OUTCHARFN) of STREAM with (ffetch (EXTERNALFORMAT + OUTCHARFN) + of EXTFORMAT)) + (freplace (STREAM INCCODEFN) of STREAM with (ffetch (EXTERNALFORMAT + INCCODEFN) + of EXTFORMAT)) + (freplace (STREAM PEEKCCODEFN) of STREAM with (ffetch ( + EXTERNALFORMAT + PEEKCCODEFN) + of EXTFORMAT)) + (freplace (STREAM BACKCCODEFN) of STREAM with (ffetch ( + EXTERNALFORMAT + BACKCCODEFN) + of EXTFORMAT)))]) + (ffetch (EXTERNALFORMAT NAME) of (fetch (STREAM EXTERNALFORMAT) of STREAM]) +) -(RPAQ? *DEFAULT-EXTERNAL-FORMATS* ) +(RPAQ? *DEFAULT-EXTERNALFORMATS* '((DSK :XCCS))) -(RPAQ? *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT* ) +(RPAQ? *EXTERNALFORMATS* NIL) (DECLARE%: DOEVAL@COMPILE DONTCOPY -(GLOBALVARS *SUPPORTED-EXTERNALFORMATS* *DEFAULT-EXTERNAL-FORMATS* - *EXTERNALFORMAT-NAME-TO-EXTERNALFORMAT*) +(GLOBALVARS *EXTERNALFORMATS* *DEFAULT-EXTERNALFORMATS* *DEFAULT-EXTERNALFORMAT*) ) -(DEFINEQ +(* "FOLLOWING DEFINITIONS EXPORTED") +(RPAQ? *DEFAULT-EXTERNALFORMAT* :XCCS) -(\CREATE.JIS.EXTERNALFORMAT - [LAMBDA NIL (* ; "Edited 25-Feb-91 17:21 by nm") - -(* ;;; "Create an instance of EXTERNALFORMAT datatype and install it with :JIS as its name.") - - (LET [(XFMT (create EXTERNALFORMAT - INCCODEFN _ (FUNCTION \JISIN) - PEEKCCODEFN _ (FUNCTION \JISPEEK) - BACKCHARFN _ (FUNCTION \BACKJISCHAR) - FILEOUTCHARFN _ (FUNCTION \JISFILEOUTCHARFN] - (\INSTALL.EXTERNALFORMAT :JIS XFMT]) - -(\CREATE.SHIFTJIS.EXTERNALFORMAT - [LAMBDA NIL (* ; "Edited 25-Feb-91 18:15 by nm") - -(* ;;; "Create two instances of EXTERNALFORMAT datatype and install them with :W-MS and :MS as their names respectively. :MS have to change the end of line convention to CRLF.") - - (LET ((XFMT1 (create EXTERNALFORMAT - INCCODEFN _ (FUNCTION \SHIFTJISIN) - PEEKCCODEFN _ (FUNCTION \SHIFTJISPEEK) - BACKCHARFN _ (FUNCTION \BACKSHIFTJISCHAR) - FILEOUTCHARFN _ (FUNCTION \SHIFTJISFILEOUTCHARFN))) - (XFMT2 (create EXTERNALFORMAT - INCCODEFN _ (FUNCTION \SHIFTJISIN) - PEEKCCODEFN _ (FUNCTION \SHIFTJISPEEK) - BACKCHARFN _ (FUNCTION \BACKSHIFTJISCHAR) - FILEOUTCHARFN _ (FUNCTION \SHIFTJISFILEOUTCHARFN) - EOLVALID _ T - EOL _ CRLF.EOLC))) - (\INSTALL.EXTERNALFORMAT :W-MS XFMT1) - (\INSTALL.EXTERNALFORMAT :MS XFMT2]) - -(\CREATE.EUC.EXTERNALFORMAT - [LAMBDA NIL (* ; "Edited 25-Feb-91 17:27 by nm") - -(* ;;; "Create an instance of EXTERNALFORMAT datatype and install it with :EUC as its name.") - - (LET [(XFMT (create EXTERNALFORMAT - INCCODEFN _ (FUNCTION \EUCIN) - PEEKCCODEFN _ (FUNCTION \EUCPEEK) - BACKCHARFN _ (FUNCTION \BACKEUCCHAR) - FILEOUTCHARFN _ (FUNCTION \EUCFILEOUTCHARFN] - (\INSTALL.EXTERNALFORMAT :EUC XFMT]) +(* "END EXPORTED DEFINITIONS") + +(DEFINEQ (\CREATE.THROUGH.EXTERNALFORMAT - [LAMBDA NIL (* ; "Edited 26-Feb-91 13:33 by nm") + [LAMBDA NIL (* ; "Edited 23-Jun-2021 13:34 by rmk:") (* ;;; "Create an instance of EXTERNALFORMAT datatype and install it with :THROUGH as its name. EOL is adjusted to CR so as not to do any eol conversion on this stream.") - (LET ((XFMT (create EXTERNALFORMAT - INCCODEFN _ (FUNCTION \THROUGHIN) - PEEKCCODEFN _ (FUNCTION \THROUGHPEEK) - BACKCHARFN _ (FUNCTION \BACKTHROUGHCHAR) - FILEOUTCHARFN _ (FUNCTION \THROUGHFILEOUTCHARFN) - EOLVALID _ T - EOL _ CR.EOLC))) - (\INSTALL.EXTERNALFORMAT :THROUGH XFMT]) -) -(DECLARE%: DONTEVAL@LOAD DOCOPY + (\INSTALL.EXTERNALFORMAT (create EXTERNALFORMAT + NAME _ :THROUGH + INCCODEFN _ (FUNCTION \THROUGHIN) + PEEKCCODEFN _ (FUNCTION \PEEKBIN) + BACKCCODEFN _ (FUNCTION \THROUGHBACKCCODE) + OUTCHARFN _ (FUNCTION \THROUGHOUTCHARFN) + EOL _ CR.EOLC]) + +(\THROUGHIN + [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 13:49 by rmk:") + +(* ;;; "Read in a single byte from STREAM and returns it without any character conversion, just through as if.") + +(* ;;; "If COUNP is non-NIL, always -1 is returned as the second value.") + + [CL:WHEN (BYTECOUNTVAR (SET BYTECOUNTVAR (SUB1 BYTECOUNTVAL] + (\BIN STREAM]) + +(\THROUGHBACKCCODE + [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 13:52 by rmk:") + (CL:WHEN (\BACKFILEPTR STREAM) + (AND BYTECOUNTVAR (SET BYTECOUNTVAR (ADD1 BYTECOUNTVAL))) + T)]) -(\CREATE.JIS.EXTERNALFORMAT) +(\THROUGHOUTCHARFN + [LAMBDA (OUTSTREAM CHARCODE) (* ; "Edited 26-Feb-91 13:44 by nm") -(\CREATE.SHIFTJIS.EXTERNALFORMAT) +(* ;;; "Encoder for THROUGH format.") -(\CREATE.EUC.EXTERNALFORMAT) + (COND + ((> CHARCODE 255) + (\BOUT OUTSTREAM (\CHARSET CHARCODE)) + (\BOUT OUTSTREAM (\CHAR8CODE CHARCODE))) + (T (\BOUT OUTSTREAM CHARCODE]) +) +(DECLARE%: DONTEVAL@LOAD DOCOPY (\CREATE.THROUGH.EXTERNALFORMAT) ) @@ -1682,19 +1622,6 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. ((OR FDEV (SETQ FDEV (\GETDEVICEFROMNAME NAME T))) (FDEVOP 'GETFILENAME FDEV NAME RECOG FDEV]) -(\GENERIC.READCCODE - [LAMBDA (FILE RDTBL) (* ; "Edited 13-Jan-88 10:04 by jds") - -(* ;;; "returns a 16 bit character code. \INCHAR does the EOL conversion and this function converts to a 16 bit value. Saves the character for LASTC as well.") - - (* ;; "This is the GENERIC method for READCCODE.") - - (LET ((*READTABLE* (\GTREADTABLE RDTBL)) - (\RefillBufferFn (FUNCTION \READCREFILL)) - (STREAM (\INSTREAMARG FILE))) - (DECLARE (SPECVARS *READTABLE* \RefillBufferFn)) - (replace (STREAM LASTCCODE) of STREAM with (\INCCODE STREAM]) - (\GENERIC.OUTFILEP [LAMBDA (NAME DEV) (* lmm " 6-Jan-85 17:41") (PROG ((V (FDEVOP 'GETFILENAME DEV NAME 'OLD DEV))) @@ -1746,7 +1673,7 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation. (GO RETRY]) (\DO.PARAMS.AT.OPEN - [LAMBDA (STREAM ACCESS PARAMETERS) (* ; "Edited 13-Aug-2020 11:40 by rmk:") + [LAMBDA (STREAM ACCESS PARAMETERS) (* ; "Edited 29-Jun-2021 17:07 by rmk:") (* ; "Edited 5-Oct-92 13:45 by jds") (* ;; "Does generic parameters when a file/stream is open. Called by \OPENFILE and OPENSTREAM") @@ -1757,28 +1684,29 @@ Copyright (c) 1981-1993, 1999, 2020-2021 by Venue & Xerox Corporation.  "RMK August 2020: Added hook for user STREAM-AFTER-OPEN-FNS, not global so can be rebound.") (DECLARE (USEDFREE STREAM-AFTER-OPEN-FNS)) - (for X ATTR VAL HADEXTFORMAT in PARAMETERS - do (COND - [(LISTP X) - (SETQ ATTR (CAR X)) - (SETQ VAL (CAR (LISTP (CDR X] - (T (SETQ ATTR X) - (SETQ VAL T))) - (SELECTQ ATTR - (BUFFERS (SETFILEINFO STREAM 'BUFFERS VAL)) - (ENDOFSTREAMOP (SETFILEINFO STREAM 'ENDOFSTREAMOP VAL)) - (CHARSET (CHARSET STREAM VAL)) - (EXTERNALFORMAT - (SETQ HADEXTFORMAT T) - (\EXTERNALFORMAT STREAM VAL)) - (CONVHANKAKU (CONVHANKAKU STREAM VAL)) - ((EOL EOLCONVENTION EOLC) - (replace EOLCONVENTION of STREAM with (SELECTQ VAL - (CR CR.EOLC) - (LF LF.EOLC) - (CRLF CRLF.EOLC) - (\ILLEGAL.ARG VAL)))) - NIL) FINALLY (CL:UNLESS HADEXTFORMAT (\EXTERNALFORMAT STREAM :DEFAULT))) + (\EXTERNALFORMAT STREAM :DEFAULT) + (for X ATTR VAL in PARAMETERS do (COND + [(LISTP X) + (SETQ ATTR (CAR X)) + (SETQ VAL (CAR (LISTP (CDR X] + (T (SETQ ATTR X) + (SETQ VAL T))) + (SELECTQ ATTR + (BUFFERS (SETFILEINFO STREAM 'BUFFERS VAL)) + (ENDOFSTREAMOP (SETFILEINFO STREAM + 'ENDOFSTREAMOP VAL)) + (CHARSET (CHARSET STREAM VAL)) + ((FORMAT EXTERNALFORMAT) + (\EXTERNALFORMAT STREAM VAL)) + (CONVHANKAKU (CONVHANKAKU STREAM VAL)) + ((EOL EOLCONVENTION EOLC) + (replace EOLCONVENTION of STREAM + with (SELECTQ VAL + (CR CR.EOLC) + (LF LF.EOLC) + (CRLF CRLF.EOLC) + (\ILLEGAL.ARG VAL)))) + NIL)) (FOR FN IN STREAM-AFTER-OPEN-FNS DO (APPLY* FN STREAM ACCESS PARAMETERS]) (\RENAMEFILE @@ -2480,7 +2408,8 @@ update the map") ]) (COPYCHARS - [LAMBDA (SRCFIL DSTFIL START END) (* ; "Edited 11-Dec-95 10:48 by ") + [LAMBDA (SRCFIL DSTFIL START END) (* ; "Edited 3-Jul-2021 10:59 by rmk:") + (* ; "Edited 14-Jun-2021 22:08 by rmk:") (* ; "Edited 8-Dec-95 16:38 by rmk:") (* ; "Edited 26-Mar-99 12:13 by rmk:") @@ -2518,7 +2447,7 @@ update the map") (T START] (RAP (SETQ ACTUALSTART (\GETFILEPTR SRCSTRM)) (SETQ ACTUALEND EOF)) - (T (until (\EOFP SRCSTRM) do (\OUTCHAR DSTSTRM (\INCHAR SRCSTRM))) + (T (until (\EOFP SRCSTRM) do (\OUTCHAR DSTSTRM (\INCHAR SRCSTRM NIL SRCEOLC))) (* ;  "Not RAP and START and END are both NIL. Slow copy to the end of the file.") (RETURN))) @@ -2566,12 +2495,14 @@ update the map") (SHOULDNT)) ELSE (* ;  "Extformat mismatch. The \INCHAR and \OUTCHAR will also handle any EOL conversion issues.") - (BIND (CNT _ (IDIFFERENCE ACTUALEND ACTUALSTART)) WHILE (IGREATERP CNT 0) - DO + (BIND (CNT _ (IDIFFERENCE ACTUALEND ACTUALSTART)) DECLARE (SPECVARS CNT) + WHILE (IGREATERP CNT 0) DO - (* ;; "Let the \INCHAR macro decrement the byte count") + (* ;; + "Let the \INCHAR macro decrement the byte count") - (\OUTCHAR DSTSTRM (\INCHAR SRCSTRM CNT] + (\OUTCHAR DSTSTRM (\INCHAR SRCSTRM + 'CNT NIL CNT] T]) (COPYFILE @@ -2590,7 +2521,7 @@ update the map") (\COPYOPENFILE FROMFILE TOFILE DESTPARAMETERS))]) (\COPYOPENFILE - [LAMBDA (INSTREAM NEWNAME DESTPARAMETERS) (* ; "Edited 11-Dec-95 12:04 by ") + [LAMBDA (INSTREAM NEWNAME DESTPARAMETERS) (* ; "Edited 3-May-2021 20:36 by rmk:") (* ; "Edited 11-Dec-95 11:50 by ") (* ; "Edited 17-Sep-90 11:41 by jds") (* bvm%: "18-Oct-85 15:54") @@ -2627,10 +2558,7 @@ update the map") (COND ((EQ TYPE 'TEXT) - (* ;; -"RMK replaced the following with COPYCHARS, to make sure Externalformat gets done as well as EOL: ") - - (* ;; "(AND (EQ TYPE 'TEXT) (NEQ (GETFILEINFO OUTSTREAM 'EOL) X)) ; Incompatible EOL conventions, do slow way (replace ENDOFSTREAMOP of INSTREAM with (FUNCTION NILL)) (bind CH (SRCEOL _ (fetch EOLCONVENTION of INSTREAM)) until (NULL (SETQ CH (\BIN INSTREAM))) do (\OUTCHAR OUTSTREAM (\CHECKEOLC CH SRCEOL INSTREAM)))") + (* ;; "RMK: COPYCHARS ensures that external format conversion happens if necessary ") (COPYCHARS INSTREAM OUTSTREAM)) (T (COPYBYTES INSTREAM OUTSTREAM))) @@ -2730,7 +2658,7 @@ update the map") STREAM]) (GETFILEINFO - [LAMBDA (FILE ATTRIB) (* ; "Edited 11-Dec-95 11:07 by ") + [LAMBDA (FILE ATTRIB) (* ; "Edited 29-Jun-2021 17:05 by rmk:") (* ; "Edited 11-Dec-95 11:03 by ") (* ; "Edited 8-May-87 16:53 by bvm") (LET (FULLNAME DEV) @@ -2750,6 +2678,7 @@ update the map") (CR.EOLC 'CR) (LF.EOLC 'LF) (CRLF.EOLC 'CRLF) + (ANY.EOLC 'ANY) (SHOULDNT))) (BUFFERS (fetch MAXBUFFERS of FILE)) (CHARSET (CHARSET FILE)) @@ -2759,7 +2688,7 @@ update the map") (SIZE [SIZE.FROM.LENGTH (OR (FDEVOP 'GETFILEINFO DEV FILE 'LENGTH DEV) (AND (RANDACCESSP FILE) (\GETEOFPTR FILE]) - (EXTERNALFORMAT + ((FORMAT EXTERNALFORMAT) (\EXTERNALFORMAT FILE)) NIL)) ((EQ ATTRIB 'SIZE) @@ -2799,7 +2728,7 @@ update the map") STREAM]) (SETFILEINFO - [LAMBDA (FILE ATTRIB VALUE) (* ; "Edited 11-Dec-95 11:31 by ") + [LAMBDA (FILE ATTRIB VALUE) (* ; "Edited 29-Jun-2021 17:05 by rmk:") (* ; "Edited 11-Dec-95 11:08 by ") (* ; "Edited 27-Mar-89 15:33 by bvm") (LET (FULLNAME DEV) @@ -2814,9 +2743,10 @@ update the map") (CR CR.EOLC) (CRLF CRLF.EOLC) (LF LF.EOLC) + (ANY ANY.EOLC) (\ILLEGAL.ARG VALUE))) VALUE) - (EXTERNALFORMAT + ((FORMAT EXTERNALFORMAT) (\EXTERNALFORMAT FILE VALUE) VALUE) (ENDOFSTREAMOP (replace ENDOFSTREAMOP of FILE with VALUE)) @@ -2851,7 +2781,7 @@ update the map") (T (LISPERROR "FILE NOT FOUND" FILE]) (SETFILEPTR - [LAMBDA (FILE ADR) (* ; "Edited 11-Sep-87 16:34 by bvm:") + [LAMBDA (FILE ADR) (* ; "Edited 21-Jun-2021 12:12 by rmk:") (LET ((STREAM (\GETSTREAM FILE))) [FDEVOP 'SETFILEPTR (ffetch DEVICE of STREAM) STREAM @@ -2861,12 +2791,13 @@ update the map") ((type? BYTEPTR ADR) ADR) (T (LISPERROR "ILLEGAL ARG" ADR] - (if (\RUNCODED STREAM) - then - (* ;; "always shift the character set to 0. This might be wrong sometimes, but it is more often right than wrong. We don't do it when reading a non-runcoded file, since maybe the whole file is that way (unfortunately, we can't tell)") + (* ;; " RMK: There is no reason to believe that going to CSET 0 is more often right than wrong. If it truly is a runcoded cset 0 file, where this would be appropriate, then it presumably is already in cset 0, no need to do anything. If it is runcoded in some other character set (e.g. Greek), then it is more likely that the whole file (or at least wherever we are setting the file ptr) is also in Greek. So leave it alone.") - (ACCESS-CHARSET STREAM 0)) + (* ;; "And this would only apply, presumably, to an NS/XCCS file or some other runcoded file format, of which there aren't any.") + (* (if (\RUNCODED STREAM) then + (* ;; "always shift the character set to 0. This might be wrong sometimes, but it is more often right than wrong. We don't do it when reading a non-runcoded file, since maybe the whole file is that way (unfortunately, we can't tell)") + (ACCESS-CHARSET STREAM 0))) (freplace (STREAM CHARPOSITION) of STREAM with 0) (* ; "Value is not coerced!") ADR]) @@ -2955,25 +2886,22 @@ update the map") (fetch USERVISIBLE of S]) (\GENERIC.READP - [LAMBDA (STREAM FLG) (* ; "Edited 11-Sep-87 16:26 by bvm:") + [LAMBDA (STRM FLG) (* ; "Edited 23-Jun-2021 13:09 by rmk:") (* ;  "The 10 does not do the EOL check on the peeked character.") (* ;  "If FLG is NIL, a single EOL doesn't count.") - (PROG ((SHIFTEDCHARSET (UNFOLD (ACCESS-CHARSET STREAM) - 256))) - (RETURN (AND (NOT (\EOFP STREAM)) - (OR (NOT (NULL FLG)) - [NEQ EOL.TC (\SYNCODE \PRIMTERMSA (OR (\NSPEEK STREAM SHIFTEDCHARSET - SHIFTEDCHARSET T) - (RETURN] - (UNINTERRUPTABLY - (\NSIN STREAM SHIFTEDCHARSET SHIFTEDCHARSET) + (CL:UNLESS (\EOFP STRM) + [PROG NIL + (RETURN (OR FLG [NEQ EOL.TC (\SYNCODE \PRIMTERMSA (OR (\PEEKCCODE STRM T) + (RETURN] + (UNINTERRUPTABLY + (\INCCODE STRM) - (* ;; "To find out if the EOL is the last character, we BIN the stream, check for EOF, then back it up again.") + (* ;; "To find out if the EOL is the last character, we BIN the stream, check for EOF, then back it up again.") - (PROG1 (NOT (\EOFP STREAM)) - (\BACKNSCHAR STREAM SHIFTEDCHARSET)))]) + (PROG1 (NOT (\EOFP STRM)) + (\BACKCCODE STRM)))])]) (\GENERIC.CHARSET [LAMBDA (STREAM NEWVALUE) (* ; "Edited 11-Sep-87 16:20 by bvm:") @@ -3007,9 +2935,6 @@ update the map") (DECLARE%: EVAL@COMPILE DONTCOPY (* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE -(PUTPROPS \OUTCHAR DMACRO (OPENLAMBDA (STREAM CHARCODE) - (STREAMOP 'OUTCHARFN STREAM STREAM CHARCODE))) - (PUTPROPS \DEVICE-OPEN-STREAMS MACRO [ARGS (LET ((DEVICE (CAR ARGS))) `(FDEVOP 'OPENP ,DEVICE NIL NIL ,DEVICE]) @@ -3157,6 +3082,15 @@ update the map") (FDEVOP 'BLOCKOUT (fetch (STREAM DEVICE) of STRM) STRM BASE OFF NBYTES))) +(PUTPROPS \BOUTEOL MACRO (OPENLAMBDA (STRM) + (SELECTC (FETCH (STREAM EOLCONVENTION) OF STRM) + (LF.EOLC (\BOUT STRM (CHARCODE LF))) + (CR.EOLC (\BOUT STRM (CHARCODE CR))) + (CRLF.EOLC (\BOUT STRM (CHARCODE CR)) + (\BOUT STRM (CHARCODE LF))) + (ANY.EOLC (SHOULDNT)) + NIL))) + (PUTPROPS \EOFP BYTEMACRO (OPENLAMBDA (STRM) (FDEVOP 'EOFP (fetch (STREAM DEVICE) of STRM) STRM))) @@ -3448,44 +3382,43 @@ update the map") (PUTPROPS FILEIO COPYRIGHT ("Venue & Xerox Corporation" 1981 1982 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992 1993 1999 2020 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (31767 35096 (STREAMPROP 31777 . 32211) (GETSTREAMPROP 32213 . 32616) (PUTSTREAMPROP -32618 . 34944) (STREAMP 34946 . 35094)) (35139 37658 (\DEFPRINT.BY.NAME 35149 . 36301) ( -\STREAM.DEFPRINT 36303 . 37351) (\FDEV.DEFPRINT 37353 . 37656)) (37916 42957 (\GETACCESS 37926 . 38380 -) (\SETACCESS 38382 . 42955)) (66784 73282 (\INSTALL.EXTERNALFORMAT 66794 . 68174) ( -\REMOVE.EXTERNALFORMAT 68176 . 69120) (\GET.EXTERNALFORMAT.FROM.NAME 69122 . 69529) (\EXTERNALFORMAT -69531 . 73280)) (73591 76597 (\CREATE.JIS.EXTERNALFORMAT 73601 . 74165) ( -\CREATE.SHIFTJIS.EXTERNALFORMAT 74167 . 75285) (\CREATE.EUC.EXTERNALFORMAT 75287 . 75851) ( -\CREATE.THROUGH.EXTERNALFORMAT 75853 . 76595)) (76812 82781 (\DEFINEDEVICE 76822 . 79138) ( -\GETDEVICEFROMNAME 79140 . 79613) (\GETDEVICEFROMHOSTNAME 79615 . 80659) (\REMOVEDEVICE 80661 . 81784) - (\REMOVEDEVICE.NAMES 81786 . 82779)) (82821 107560 (\CLOSEFILE 82831 . 83656) (\DELETEFILE 83658 . -83952) (\DEVICEEVENT 83954 . 85724) (\GENERATEFILES 85726 . 86204) (\GENERATENEXTFILE 86206 . 86857) ( -\GENERATEFILEINFO 86859 . 87320) (\GETFILENAME 87322 . 87711) (\GENERIC.READCCODE 87713 . 88349) ( -\GENERIC.OUTFILEP 88351 . 88821) (\OPENFILE 88823 . 91401) (\DO.PARAMS.AT.OPEN 91403 . 93397) ( -\RENAMEFILE 93399 . 93823) (\REVALIDATEFILE 93825 . 96427) (\PAGED.REVALIDATEFILELST 96429 . 97987) ( -\PAGED.REVALIDATEFILES 97989 . 99708) (\PAGED.REVALIDATEFILE 99710 . 101993) (\BUFFERED.REVALIDATEFILE - 101995 . 104281) (\BUFFERED.REVALIDATEFILELST 104283 . 105467) (\PRINT-REVALIDATION-RESULT 105469 . -105884) (\TRUNCATEFILE 105886 . 106277) (\FILE-CONFLICT 106279 . 107558)) (107596 112259 ( -\GENERATENOFILES 107606 . 109702) (\NULLFILEGENERATOR 109704 . 109948) (\NOFILESNEXTFILEFN 109950 . -111941) (\NOFILESINFOFN 111943 . 112257)) (112378 114286 (\FILE.NOT.OPEN 112388 . 112901) ( -\FILE.WONT.OPEN 112903 . 113231) (\ILLEGAL.DEVICEOP 113233 . 113515) (\IS.NOT.RANDACCESSP 113517 . -113963) (\STREAM.NOT.OPEN 113965 . 114284)) (114421 116719 (\FDEVINSTANCE 114431 . 116717)) (118269 -125643 (CNDIR 118279 . 119584) (DIRECTORYNAME 119586 . 123769) (DIRECTORYNAMEP 123771 . 124387) ( -HOSTNAMEP 124389 . 125196) (\ADD.CONNECTED.DIR 125198 . 125641)) (125688 155467 (\BACKFILEPTR 125698 - . 125886) (\BACKPEEKBIN 125888 . 126249) (\BACKBIN 126251 . 126602) (BIN 126604 . 126821) (\BIN -126823 . 127100) (\BINS 127102 . 127388) (BOUT 127390 . 127752) (\BOUT 127754 . 128069) (\BOUTS 128071 - . 128382) (COPYBYTES 128384 . 131716) (COPYCHARS 131718 . 138286) (COPYFILE 138288 . 139085) ( -\COPYOPENFILE 139087 . 142518) (\INFER.FILE.TYPE 142520 . 143474) (EOFP 143476 . 143773) (FORCEOUTPUT -143775 . 144022) (\FLUSH.OPEN.STREAMS 144024 . 144380) (CHARSET 144382 . 146046) (ACCESS-CHARSET -146048 . 146265) (GETEOFPTR 146267 . 146517) (GETFILEINFO 146519 . 149652) (\TYPE.FROM.FILETYPE 149654 - . 150124) (\FILETYPE.FROM.TYPE 150126 . 150305) (GETFILEPTR 150307 . 150559) (SETFILEINFO 150561 . -154071) (SETFILEPTR 154073 . 155087) (BOUT16 155089 . 155274) (BIN16 155276 . 155465)) (155570 161068 -(\GENERIC.BINS 155580 . 155860) (\GENERIC.BOUTS 155862 . 156127) (\GENERIC.RENAMEFILE 156129 . 157960) - (\GENERIC.OPENP 157962 . 159277) (\GENERIC.READP 159279 . 160613) (\GENERIC.CHARSET 160615 . 161066)) - (161069 161408 (\MAP-OPEN-STREAMS 161079 . 161406)) (163426 165506 (\EOF.ACTION 163436 . 163687) ( -\EOSERROR 163689 . 163882) (\GETEOFPTR 163884 . 164066) (\INCFILEPTR 164068 . 164418) (\PEEKBIN 164420 - . 164611) (\SETCLOSEDFILELENGTH 164613 . 164947) (\SETEOFPTR 164949 . 165137) (\SETFILEPTR 165139 . -165504)) (165507 166049 (\FIXPOUT 165517 . 165817) (\FIXPIN 165819 . 166047)) (169141 179005 ( -\BUFFERED.BIN 169151 . 170003) (\BUFFERED.PEEKBIN 170005 . 170787) (\BUFFERED.BOUT 170789 . 171649) ( -\BUFFERED.BINS 171651 . 175336) (\BUFFERED.BOUTS 175338 . 177139) (\BUFFERED.COPYBYTES 177141 . 179003 -)) (179034 181386 (\NULLDEVICE 179044 . 181062) (\NULL.OPENFILE 181064 . 181384))))) + (FILEMAP (NIL (28433 31923 (STREAMPROP 28443 . 28877) (GETSTREAMPROP 28879 . 29352) (PUTSTREAMPROP +29354 . 31771) (STREAMP 31773 . 31921)) (31966 34485 (\DEFPRINT.BY.NAME 31976 . 33128) ( +\STREAM.DEFPRINT 33130 . 34178) (\FDEV.DEFPRINT 34180 . 34483)) (34743 39784 (\GETACCESS 34753 . 35207 +) (\SETACCESS 35209 . 39782)) (63955 70961 (\INSTALL.EXTERNALFORMAT 63965 . 65398) ( +\REMOVE.EXTERNALFORMAT 65400 . 66231) (FIND-FORMAT 66233 . 66784) (\EXTERNALFORMAT 66786 . 70959)) ( +71284 73103 (\CREATE.THROUGH.EXTERNALFORMAT 71294 . 72096) (\THROUGHIN 72098 . 72504) ( +\THROUGHBACKCCODE 72506 . 72751) (\THROUGHOUTCHARFN 72753 . 73101)) (73211 79180 (\DEFINEDEVICE 73221 + . 75537) (\GETDEVICEFROMNAME 75539 . 76012) (\GETDEVICEFROMHOSTNAME 76014 . 77058) (\REMOVEDEVICE +77060 . 78183) (\REMOVEDEVICE.NAMES 78185 . 79178)) (79220 103880 (\CLOSEFILE 79230 . 80055) ( +\DELETEFILE 80057 . 80351) (\DEVICEEVENT 80353 . 82123) (\GENERATEFILES 82125 . 82603) ( +\GENERATENEXTFILE 82605 . 83256) (\GENERATEFILEINFO 83258 . 83719) (\GETFILENAME 83721 . 84110) ( +\GENERIC.OUTFILEP 84112 . 84582) (\OPENFILE 84584 . 87162) (\DO.PARAMS.AT.OPEN 87164 . 89717) ( +\RENAMEFILE 89719 . 90143) (\REVALIDATEFILE 90145 . 92747) (\PAGED.REVALIDATEFILELST 92749 . 94307) ( +\PAGED.REVALIDATEFILES 94309 . 96028) (\PAGED.REVALIDATEFILE 96030 . 98313) (\BUFFERED.REVALIDATEFILE +98315 . 100601) (\BUFFERED.REVALIDATEFILELST 100603 . 101787) (\PRINT-REVALIDATION-RESULT 101789 . +102204) (\TRUNCATEFILE 102206 . 102597) (\FILE-CONFLICT 102599 . 103878)) (103916 108579 ( +\GENERATENOFILES 103926 . 106022) (\NULLFILEGENERATOR 106024 . 106268) (\NOFILESNEXTFILEFN 106270 . +108261) (\NOFILESINFOFN 108263 . 108577)) (108698 110606 (\FILE.NOT.OPEN 108708 . 109221) ( +\FILE.WONT.OPEN 109223 . 109551) (\ILLEGAL.DEVICEOP 109553 . 109835) (\IS.NOT.RANDACCESSP 109837 . +110283) (\STREAM.NOT.OPEN 110285 . 110604)) (110741 113039 (\FDEVINSTANCE 110751 . 113037)) (114589 +121963 (CNDIR 114599 . 115904) (DIRECTORYNAME 115906 . 120089) (DIRECTORYNAMEP 120091 . 120707) ( +HOSTNAMEP 120709 . 121516) (\ADD.CONNECTED.DIR 121518 . 121961)) (122008 152651 (\BACKFILEPTR 122018 + . 122206) (\BACKPEEKBIN 122208 . 122569) (\BACKBIN 122571 . 122922) (BIN 122924 . 123141) (\BIN +123143 . 123420) (\BINS 123422 . 123708) (BOUT 123710 . 124072) (\BOUT 124074 . 124389) (\BOUTS 124391 + . 124702) (COPYBYTES 124704 . 128036) (COPYCHARS 128038 . 134960) (COPYFILE 134962 . 135759) ( +\COPYOPENFILE 135761 . 138834) (\INFER.FILE.TYPE 138836 . 139790) (EOFP 139792 . 140089) (FORCEOUTPUT +140091 . 140338) (\FLUSH.OPEN.STREAMS 140340 . 140696) (CHARSET 140698 . 142362) (ACCESS-CHARSET +142364 . 142581) (GETEOFPTR 142583 . 142833) (GETFILEINFO 142835 . 146028) (\TYPE.FROM.FILETYPE 146030 + . 146500) (\FILETYPE.FROM.TYPE 146502 . 146681) (GETFILEPTR 146683 . 146935) (SETFILEINFO 146937 . +150550) (SETFILEPTR 150552 . 152271) (BOUT16 152273 . 152458) (BIN16 152460 . 152649)) (152754 157959 +(\GENERIC.BINS 152764 . 153044) (\GENERIC.BOUTS 153046 . 153311) (\GENERIC.RENAMEFILE 153313 . 155144) + (\GENERIC.OPENP 155146 . 156461) (\GENERIC.READP 156463 . 157504) (\GENERIC.CHARSET 157506 . 157957)) + (157960 158299 (\MAP-OPEN-STREAMS 157970 . 158297)) (160169 162249 (\EOF.ACTION 160179 . 160430) ( +\EOSERROR 160432 . 160625) (\GETEOFPTR 160627 . 160809) (\INCFILEPTR 160811 . 161161) (\PEEKBIN 161163 + . 161354) (\SETCLOSEDFILELENGTH 161356 . 161690) (\SETEOFPTR 161692 . 161880) (\SETFILEPTR 161882 . +162247)) (162250 162792 (\FIXPOUT 162260 . 162560) (\FIXPIN 162562 . 162790)) (166458 176322 ( +\BUFFERED.BIN 166468 . 167320) (\BUFFERED.PEEKBIN 167322 . 168104) (\BUFFERED.BOUT 168106 . 168966) ( +\BUFFERED.BINS 168968 . 172653) (\BUFFERED.BOUTS 172655 . 174456) (\BUFFERED.COPYBYTES 174458 . 176320 +)) (176351 178703 (\NULLDEVICE 176361 . 178379) (\NULL.OPENFILE 178381 . 178701))))) STOP diff --git a/sources/FILEIO.LCOM b/sources/FILEIO.LCOM index cb805ce7a..38f9986fe 100644 Binary files a/sources/FILEIO.LCOM and b/sources/FILEIO.LCOM differ diff --git a/sources/FILEIO.LCOM.~10~ b/sources/FILEIO.LCOM.~10~ deleted file mode 100644 index dd0a490d8..000000000 Binary files a/sources/FILEIO.LCOM.~10~ and /dev/null differ diff --git a/sources/FILEIO.LCOM.~11~ b/sources/FILEIO.LCOM.~11~ deleted file mode 100644 index d9c75eb5f..000000000 Binary files a/sources/FILEIO.LCOM.~11~ and /dev/null differ diff --git a/sources/FILEIO.LCOM.~12~ b/sources/FILEIO.LCOM.~12~ deleted file mode 100644 index d746c99f1..000000000 Binary files a/sources/FILEIO.LCOM.~12~ and /dev/null differ diff --git a/sources/FILEIO.LCOM.~2~ b/sources/FILEIO.LCOM.~2~ deleted file mode 100644 index 77ac671bd..000000000 Binary files a/sources/FILEIO.LCOM.~2~ and /dev/null differ diff --git a/sources/FILEIO.LCOM.~6~ b/sources/FILEIO.LCOM.~6~ deleted file mode 100644 index 63cbc24b8..000000000 Binary files a/sources/FILEIO.LCOM.~6~ and /dev/null differ diff --git a/sources/FILEIO.LCOM.~7~ b/sources/FILEIO.LCOM.~7~ deleted file mode 100644 index 22230589b..000000000 Binary files a/sources/FILEIO.LCOM.~7~ and /dev/null differ diff --git a/sources/FILEIO.LCOM.~8~ b/sources/FILEIO.LCOM.~8~ deleted file mode 100644 index 561777214..000000000 Binary files a/sources/FILEIO.LCOM.~8~ and /dev/null differ diff --git a/sources/FILEIO.LCOM.~9~ b/sources/FILEIO.LCOM.~9~ deleted file mode 100644 index dd0a490d8..000000000 Binary files a/sources/FILEIO.LCOM.~9~ and /dev/null differ diff --git a/sources/FILEPKG b/sources/FILEPKG index 53ca012c6..e8de8c963 100644 --- a/sources/FILEPKG +++ b/sources/FILEPKG @@ -1,15 +1,16 @@ -(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED "12-Feb-2021 17:16:04" {DSK}larry>ilisp>medley>sources>FILEPKG.;16 282953 +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS) +(FILECREATED " 3-Jul-2021 11:08:42"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>FILEPKG.;5 284528 - changes to%: (VARS FILEPKGCOMS) - (FNS ADDTOFILEKEYLST) + changes to%: (FNS MAKEFILE) + (VARS FILEPKGCOMS) - previous date%: "27-Oct-2020 15:40:32" {DSK}larry>ilisp>medley>sources>FILEPKG.;15) + previous date%: "29-Jun-2021 17:25:04" +{DSK}kaplan>Local>medley3.5>git-medley>sources>FILEPKG.;4) (* ; " -Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1995, 2018, 2020, -2021 by Venue & Xerox Corporation. +Copyright (c) 1982-1993, 1995, 2018, 2020-2021 by Venue & Xerox Corporation. The following program was created in 1982 but has not been published within the meaning of the copyright law, is furnished under license, and may not be used, copied and/or disclosed except in accordance @@ -19,15 +20,15 @@ with the terms of said license. (PRETTYCOMPRINT FILEPKGCOMS) (RPAQQ FILEPKGCOMS - [(COMS (* ; - "standard records for accessing file package type/command parts. Exported for PRETTY") + [(COMS (* ; + "standard records for accessing file package type/command parts. Exported for PRETTY") (VARS FILEPKGTYPEPROPS) (EXPORT (DECLARE%: EVAL@COMPILE DONTCOPY (RECORDS * FILEPKGRECORDS))) (FNS SEARCHPRETTYTYPELST PRETTYDEFMACROS FILEPKGCOMPROPS) (INITRECORDS * FILEPKGRECORDS)) [DECLARE%: EVAL@COMPILE DOCOPY - (* ;; "Proclaim SPECIAL those variables that are used freely in a lot of code.") + (* ;; "Proclaim SPECIAL those variables that are used freely in a lot of code.") (P (CL:PROCLAIM '(CL:SPECIAL PRETTYDEFMACROS PRETTYTYPELST FILEPKGTYPES PRETTYPRINTMACROS *DEFAULT-CLEANUP-COMPILER* MARKASCHANGEDFNS @@ -36,7 +37,7 @@ with the terms of said license. NOTCOMPILEDFILES MAKEFILEFORMS CLEANUPOPTIONS] (INITVARS (MSDATABASELST)) [COMS - (* ;; "making, adding, listing, compiling files") + (* ;; "making, adding, listing, compiling files") (FNS CLEANUP COMPILEFILES COMPILEFILES0 CONTINUEDIT MAKEFILE FILECHANGES FILEPKG.MERGECHANGES FILEPKG.CHANGEDFNS MAKEFILE1 COMPILE-FILE? MAKEFILES ADDFILE @@ -49,7 +50,7 @@ with the terms of said license. (MAKEFILEFORMS) (NILCOMS)) (ADDVARS (MAKEFILEOPTIONS RC C LIST FAST CLISP CLISPIFY NIL REMAKE NEW NOCLISP CLISP% - F ST STF (REC . RC) + F ST STF FORMAT (REC . RC) (BREC . RC) (TC . C) (BC . C) @@ -58,14 +59,14 @@ with the terms of said license. (INITVARS (MAKEFILEREMAKEFLG T) (CLEANUPOPTIONS '(RC] (COMS - (* ;; "scanning file coms") + (* ;; "scanning file coms") (FNS FILEPKGCHANGES GETFILEPKGTYPE MARKASCHANGED FILECOMS WHEREIS SMASHFILECOMS FILEFNSLST FILECOMSLST UPDATEFILES INFILECOMS? INFILECOMTAIL INFILECOMS INFILECOM INFILECOMSVALS INFILECOMSVAL INFILECOMSPROP IFCPROPS IFCEXPRTYPE IFCPROPSCAN IFCDECLARE INFILEPAIRS INFILECOMSMACRO)) (COMS - (* ;; "adding to a file") + (* ;; "adding to a file") (FNS FILES? FILES?1 FILES?PRINTLST ADDTOFILES? ADDTOFILE WHATIS ADDTOCOMS ADDTOCOM ADDTOCOM1 ADDNEWCOM MAKENEWCOM DEFAULTMAKENEWCOM) @@ -73,28 +74,28 @@ with the terms of said license. (ADDVARS (MARKASCHANGEDFNS)) (FNS MERGEINSERT MERGEINSERT1) - (* ;; "RMK: Changed INITVARS to VARS, so = addition is a synonym for untypable LF, and also suppress appearance of raw CR and LF in the file") + (* ;; "RMK: Changed INITVARS to VARS, so = addition is a synonym for untypable LF, and also suppress appearance of raw CR and LF in the file") (FNS ADDTOFILEKEYLST) (INITVARS (ADDTOFILEKEYLST (ADDTOFILEKEYLST)) (LASTFILE))) (COMS - (* ;; "deleting an item from a file") + (* ;; "deleting an item from a file") (FNS DELFROMFILES DELFROMCOMS DELFROMCOM DELFROMCOM1 REMOVEITEM MOVETOFILE) (P (MOVD? 'DELFROMFILES 'DELFROMFILE NIL T) (MOVD? 'MOVETOFILE 'MOVEITEM NIL T)) (ADDVARS (SYSPROPS PROPTYPE VARTYPE))) - [COMS (* ; - "functions for doing things and marking them changed and auxiliary functions") + [COMS (* ; + "functions for doing things and marking them changed and auxiliary functions") (FNS SAVEPUT) [DECLARE%: DONTEVAL@LOAD DOCOPY (P (OR (CHANGENAME 'PUTPROPS 'PUTPROP 'SAVEPUT) (CHANGENAME 'PUTPROPS '/PUT 'SAVEPUT] (FNS UNMARKASCHANGED PREEDITFN POSTEDITPROPS POSTEDITALISTS) (ADDVARS (LISPXFNS (PUT . SAVEPUT) (PUTPROP . SAVEPUT] - (COMS (* ; - "sub-functions for file package commands & types") + (COMS (* ; + "sub-functions for file package commands & types") (FNS ALISTS.GETDEF ALISTS.WHENCHANGED CLEARCLISPARRAY EXPRESSIONS.WHENCHANGED MAKEALISTCOMS MAKEFILESCOMS MAKELISPXMACROSCOMS MAKEPROPSCOMS MAKEUSERMACROSCOMS PROPS.WHENCHANGED FILEGETDEF.LISPXMACROS FILEGETDEF.ALISTS FILEGETDEF.RECORDS @@ -107,24 +108,24 @@ with the terms of said license. (PROP VARTYPE BAKTRACELST BREAKMACROS COMPILETYPELST EDITMACROS ERRORTYPELST FONTDEFS LISPXHISTORYMACROS LISPXMACROS PRETTYDEFMACROS PRETTYEQUIVLST PRETTYPRINTMACROS PRETTYPRINTYPEMACROS USERMACROS)) - (COMS (* ; - "Define the commands below AFTER the various properties have been established.") + (COMS (* ; + "Define the commands below AFTER the various properties have been established.") (USERMACROS M)) - (COMS (* ; "GETDEF methods") + (COMS (* ; "GETDEF methods") (FNS RENAME CHANGECALLERS) (FNS SHOWDEF COPYDEF GETDEF GETDEFCOM GETDEFCOM0 GETDEFCURRENT GETDEFERR GETDEFFROMFILE GETDEFSAVED PUTDEF EDITDEF DEFAULT.EDITDEF EDITDEF.FILES LOADDEF DWIMDEF DELDEF DELFROMLIST HASDEF GETFILEDEF SAVEDEF UNSAVEDEF COMPAREDEFS COMPARE TYPESOF) (INITVARS (WHEREIS.HASH))) - (* ; "Must come after PUTDEF") + (* ; "Must come after PUTDEF") (FNS FIXEDITDATE EDITDATE?) - (* ; - "Edit date support for all kinds of definers (from PARC 6/10/92)") + (* ; + "Edit date support for all kinds of definers (from PARC 6/10/92)") [VARS (EDITDATE-ARGLIST-DEFINERS '(FUNCTIONS TYPES)) (EDITDATE-NAME-DEFINERS '(STRUCTURES VARIABLES] (GLOBALVARS EDITDATE-ARGLIST-DEFINERS EDITDATE-NAME-DEFINERS) (COMS - (* ;; "how to dump FILEPKGCOMS. The SPLST must be initialized to contain FILEPKGCOMS in order to get started.") + (* ;; "how to dump FILEPKGCOMS. The SPLST must be initialized to contain FILEPKGCOMS in order to get started.") (FNS FILEPKGCOM FILEPKGTYPE) (PROP ARGNAMES FILEPKGCOM) @@ -137,24 +138,24 @@ with the terms of said license. (ADDVARS (SHADOW-TYPES (FUNCTIONS FNS) (VARIABLES VARS CONSTANTS))) (INITVARS (SAVEDDEFS)) - (COMS (* ; "EDITCALLERS") + (COMS (* ; "EDITCALLERS") (FNS FINDCALLERS EDITCALLERS EDITFROMFILE FINDATS LOOKIN) (FNS SEPRCASE) [INITVARS (DEFAULTRENAMEMETHOD '(EDITCALLERS CAREFUL] (INITVARS (SEPRCASEARRAYS) (CLISPCASEARRAYS)) (P (MOVD? 'INFILEP 'FINDFILE) - (* ; "or else from SPELLFILE")) + (* ; "or else from SPELLFILE")) (BLOCKS (EDITFROMFILE EDITFROMFILE LOOKIN (GLOBALVARS EDITLOADFNSFLG) (NOLINKFNS LOADFROM))) (GLOBALVARS SYSFILES CLISPCASEARRAYS SEPRCASEARRAYS CLISPCHARS)) - (COMS (* ; "EXPORT") + (COMS (* ; "EXPORT") (FNS IMPORTFILE IMPORTEVAL IMPORTFILESCAN CHECKIMPORTS GATHEREXPORTS \DUMPEXPORTS) (FILEPKGCOMS EXPORT) [INITVARS (BEGINEXPORTDEFSTRING "* %"FOLLOWING DEFINITIONS EXPORTED%")") (ENDEXPORTDEFFORM '(* "END EXPORTED DEFINITIONS"] (GLOBALVARS BEGINEXPORTDEFSTRING ENDEXPORTDEFFORM)) - (COMS (* ; "for GAINSPACE") + (COMS (* ; "for GAINSPACE") (FNS CLEARFILEPKG) [ADDVARS (GAINSPACEFORMS (FILELST "erase filepkg information" (CLEARFILEPKG RESPONSE) ((Y "es") @@ -254,11 +255,11 @@ with the terms of said license. (REMOVE (FASSOC DATUM (GETTOPVAL 'PRETTYDEFMACROS)) (GETTOPVAL 'PRETTYDEFMACROS] - (* Not an atom record cause want - REMPROP on NILs.) - (* NOTE%: PRETTCOM on PRETTY has - open-coded access to the MACRO - property.) + (* Not an atom record cause want + REMPROP on NILs.) + (* NOTE%: PRETTCOM on PRETTY has + open-coded access to the MACRO + property.) (INIT (FILEPKGCOMPROPS ADDTOPRETTYCOM DELFROMPRETTYCOM PRETTYTYPE FILEPKGCONTENTS))) @@ -289,8 +290,8 @@ with the terms of said license. (REMOVE (SEARCHPRETTYTYPELST DATUM) (GETTOPVAL 'PRETTYTYPELST] - (* NOTE%: PRETTYCOM on PRETTY has - open-coded access to GETDEF property) + (* NOTE%: PRETTYCOM on PRETTY has + open-coded access to GETDEF property) (INIT [PROGN (SETQ SYSPROPS (UNION FILEPKGTYPEPROPS SYSPROPS)) (MAPC FILEPKGTYPEPROPS (FUNCTION (LAMBDA (X) (PUT X @@ -455,30 +456,31 @@ with the terms of said license. (RETURN FILE]) (MAKEFILE - [LAMBDA (FILE OPTIONS REPRINTFNS SOURCEFILE) (* ; "Edited 29-Aug-89 11:46 by bvm") + [LAMBDA (FILE OPTIONS REPRINTFNS SOURCEFILE) (* ; "Edited 3-Jul-2021 11:03 by rmk:") + (* ; "Edited 29-Jun-2021 17:24 by rmk:") - (* ;; "OPTIONS: FAST means dump with PRETTYFLG set to NIL; LIST means list the FILE; RC means RECOMPILE, C means COMPILEL; --- for C AND RC assume ST unless next option is F.") + (* ;; "OPTIONS: FAST means dump with PRETTYFLG set to NIL; LIST means list the FILE; RC means RECOMPILE, C means COMPILEL; --- for C AND RC assume ST unless next option is F.") (PROG ((PRETTYFLG (AND [NOT (MEMB 'FAST (SETQ OPTIONS (MKLIST OPTIONS] PRETTYFLG)) (*PRINT-BASE* (if (EQ *PRINT-BASE* 8) then 8 - else (* ; "make sure radix is either 8 or 10, because all others don't read in like they print. Maybe obsolete now with makefile environments") + else (* ; "make sure radix is either 8 or 10, because all others don't read in like they print. Maybe obsolete now with makefile environments") 10)) FILETYPE ROOTNAME FILEPROP CHANGES FILEDATES (Z (ADDFILE FILE))) (DECLARE (CL:SPECIAL PRETTYFLG)) - (SETQ FILE (CAR Z)) (* ; - "Necessary because FILE might have been misspelled.") - (SETQ ROOTNAME (CADR Z)) (* ; "result of (ROOTFILENAME FILE), or if FILE is corrected, result of applying ROOTFILENAME to correct value.") + (SETQ FILE (CAR Z)) (* ; + "Necessary because FILE might have been misspelled.") + (SETQ ROOTNAME (CADR Z)) (* ; "result of (ROOTFILENAME FILE), or if FILE is corrected, result of applying ROOTFILENAME to correct value.") (SETQ FILEPROP (CDDR Z)) - (UPDATEFILES) (* ; "Want updating done after file is added to filelst, so any functions that are being dumped are marked as having been dumped.") + (UPDATEFILES) (* ; "Want updating done after file is added to filelst, so any functions that are being dumped are marked as having been dumped.") (SETQ CHANGES (fetch TOBEDUMPED of FILEPROP)) (SETQ FILEDATES (LISTP (fetch FILEDATES of ROOTNAME))) (SETQ FILETYPE (GETPROP ROOTNAME 'FILETYPE)) LP0 (if (AND (NULL (fetch LOADTYPE of FILEPROP)) (NULL FILEDATES)) - then (* ; - "File has never been loaded and never dumped i.e. user just set up COMS in core") + then (* ; + "File has never been loaded and never dumped i.e. user just set up COMS in core") elseif [OR (EQMEMB 'NEW OPTIONS) (AND (NULL MAKEFILEREMAKEFLG) (NOT (MEMB 'REMAKE OPTIONS] @@ -499,14 +501,14 @@ with the terms of said license. T) (COND ((NEQ (ASKUSER DWIMWAIT 'Y "Go ahead and MAKEFILE anyway? ") - 'Y) (* ; - "E.g. user loads a .com file and then resets the COMS or defines the functons by hand.") + 'Y) (* ; + "E.g. user loads a .com file and then resets the COMS or defines the functons by hand.") (GO OUT))) (/replace LOADTYPE of FILEPROP with NIL))) (SETQ SOURCEFILE NIL) (SETQ REPRINTFNS NIL) elseif SOURCEFILE - then (* ; "source file given") + then (* ; "source file given") elseif [AND FILEDATES (OR [AND (SETQ SOURCEFILE (FINDFILE ROOTNAME T)) (EQUAL (FILEDATE SOURCEFILE) (fetch FILEDATE of (CAR FILEDATES] @@ -526,7 +528,7 @@ with the terms of said license. (fetch FILEDATE of (CADR FILEDATES] then - (* ;; "prevous version file is gone, drop back to original daddy file and dump everything that has been changed.") + (* ;; "prevous version file is gone, drop back to original daddy file and dump everything that has been changed.") (SETQ CHANGES (FILEPKG.MERGECHANGES (fetch TOBEDUMPED of FILEPROP) (fetch FILECHANGES of ROOTNAME))) @@ -544,8 +546,8 @@ with the terms of said license. (GO LP0)) (COND ((AND SOURCEFILE (SETQ Z (SELECTQ (fetch LOADTYPE of FILEPROP) - (LOADCOMP (* ; - "only loaded via LOADCOMP. Need to do LOADFROM") + (LOADCOMP (* ; + "only loaded via LOADCOMP. Need to do LOADFROM") (LIST 'N SOURCEFILE "was loaded with LOADCOMP" '- "LOADFROM it to obtain VARS/COMS")) (Compiled (AND (INFILECOMS? 'DONTCOPY 'DECLARE%: @@ -568,23 +570,23 @@ with the terms of said license. (A "bort MAKEFILE "] (Y (SELECTQ (fetch LOADTYPE of FILEPROP) - (LOADCOMP (* ; - "file was never actually loaded, just loadcomped. thus no filecoms") + (LOADCOMP (* ; + "file was never actually loaded, just loadcomped. thus no filecoms") (LOADFROM SOURCEFILE)) (Compiled - (* ;; "This is going to be a remake. If it was originally loaded as a compiled file, must first do a LOADFROM in order to get the properties set up by declare: etc.") + (* ;; "This is going to be a remake. If it was originally loaded as a compiled file, must first do a LOADFROM in order to get the properties set up by declare: etc.") (LOADVARS 'DONTCOPY SOURCEFILE) (/replace LOADTYPE of FILEPROP with 'COMPILED) - (* ; "So wont have to be done again.") + (* ; "So wont have to be done again.") - (* ;; "These are the only DECLARE:'s that are not also on the compiled file. Note that a DECLARE: DONTEVAL@LOAD will be found and evaluated, but the corresponding expressions won't be evaluated from within the DECLARE: Not worthwhile to bother setting up a complicated edit pattern to screen these out, especially if you consider expressions like (DECLARE: -- DONTEVAL@LOAD -- DOEVAL@LOAD --)") + (* ;; "These are the only DECLARE:'s that are not also on the compiled file. Note that a DECLARE: DONTEVAL@LOAD will be found and evaluated, but the corresponding expressions won't be evaluated from within the DECLARE: Not worthwhile to bother setting up a complicated edit pattern to screen these out, especially if you consider expressions like (DECLARE: -- DONTEVAL@LOAD -- DOEVAL@LOAD --)") ) ((loadfns compiled) - (* ;; "This is going to be a remake, but the original call to LOADFNS didnt specify all the VARS, so some expressions may not have been loaded.") + (* ;; "This is going to be a remake, but the original call to LOADFNS didnt specify all the VARS, so some expressions may not have been loaded.") (LOADVARS T SOURCEFILE)) NIL)) @@ -605,8 +607,8 @@ with the terms of said license. (MEMB 'CLISP (LISTP FILETYPE))) (RESETSAVE CLISPIFYPRETTYFLG 'CHANGES] (for X in MAKEFILEFORMS do (ERSETQ (EVAL X))) - (SETQ FILE (PRETTYDEF NIL FILE (fetch COMSNAME of FILEPROP) - REPRINTFNS SOURCEFILE CHANGES))) + [SETQ FILE (PRETTYDEF NIL FILE (fetch COMSNAME of FILEPROP) + REPRINTFNS SOURCEFILE CHANGES (CADR (ASSOC 'FORMAT OPTIONS]) (SETQ LASTFILE ROOTNAME) (/replace TOBEDUMPED of FILEPROP with NIL) (COND @@ -624,7 +626,10 @@ with the terms of said license. (LIST (AND (MEMB ROOTNAME NOTLISTEDFILES) (APPLY 'LISTFILES (LIST FILE)))) (COND - ((MEMB OPT MAKEFILEOPTIONS)) + ((MEMB (CL:IF (LISTP OPT) + (CAR OPT) + OPT) + MAKEFILEOPTIONS)) ((FIXSPELL OPT NIL MAKEFILEOPTIONS NIL OPTIONS) (GO $$LP)) @@ -946,8 +951,8 @@ compiling " T) (RPAQ? NILCOMS ) -(ADDTOVAR MAKEFILEOPTIONS RC C LIST FAST CLISP CLISPIFY NIL REMAKE NEW NOCLISP CLISP% F ST STF - (REC . RC) +(ADDTOVAR MAKEFILEOPTIONS RC C LIST FAST CLISP CLISPIFY NIL REMAKE NEW NOCLISP CLISP% F ST STF + FORMAT (REC . RC) (BREC . RC) (TC . C) (BC . C) @@ -1646,15 +1651,15 @@ compiling " T) (CL:VALUES]) (FILES?1 - [LAMBDA (TYPE FIRST) (* bvm%: "27-Oct-86 18:17") + [LAMBDA (TYPE FIRST) (* ; "Edited 13-Jun-2021 10:18 by rmk:") - (* ;; "If there are changed objects of TYPE, then print them out, preceded by FIRST (if given) plus a descriptive string, and return T.") + (* ;; "If there are changed objects of TYPE, then print them out, preceded by FIRST (if given) plus a descriptive string, and return T.") (LET (STR LST) (COND ([AND (LITATOM TYPE) - (SETQ STR (fetch DESCRIPTION of TYPE)) - (LISTP (SETQ LST (fetch CHANGED of TYPE] + (SETQ STR (fetch (FILEPKGTYPE DESCRIPTION) of TYPE)) + (LISTP (SETQ LST (fetch (FILEPKGTYPE CHANGED) of TYPE] (AND FIRST (LISPXPRIN1 FIRST T)) (LISPXPRIN1 '"the " T) (LISPXPRIN1 STR T) @@ -1680,7 +1685,7 @@ compiling " T) T]) (ADDTOFILES? - [LAMBDA (NOASKSTR) (* ; "Edited 10-Aug-2020 21:18 by rmk:") + [LAMBDA (NOASKSTR) (* ; "Edited 13-Jun-2021 10:22 by rmk:") (* ; "Edited 21-Aug-91 10:13 by jds") (* ;; "ask user about all of the things that need to be dumped, and distribute them to the files that he says") @@ -1720,7 +1725,7 @@ compiling " T) (SYSBUF) (SETQ BUFS (CLBUFS NIL T READBUF] [for TYPE STR LST in FILEPKGTYPES - when [AND (SETQ STR (fetch DESCRIPTION of TYPE)) + when [AND (SETQ STR (fetch (FILEPKGTYPE DESCRIPTION) of TYPE)) (LISTP (SETQ LST (COND ((EQ TYPE 'VARS) VARSCHANGES) @@ -1761,7 +1766,8 @@ compiling " T) (OR (ADDTOCOMS (SETQ COMSNAME (FILECOMS FILE)) NAME TYPE NEAR LISTNAME) (ADDNEWCOM COMSNAME NAME TYPE NIL FILE)) - (for F in (fetch WHENFILED of TYPE) + (for F in (fetch (FILEPKGTYPE WHENFILED) + of TYPE) do (APPLY* F NAME TYPE FILE)) (* ;; "This isn't factored to the end, cause ADDTOLISTNAME might have to deal with a set of old elements on the listname.") @@ -1783,7 +1789,8 @@ compiling " T) 'found) T T) (ERROR!))) - (for F in (fetch WHENFILED of TYPE) + (for F in (fetch (FILEPKGTYPE WHENFILED) + of TYPE) do (APPLY* F NAME TYPE FILE))) ([OR [UNDONLSETQ (PROGN (SAVESET (SETQ LISTNAME (CAR PLACE)) @@ -1804,7 +1811,8 @@ compiling " T) NAME TYPE NEAR LISTNAME] (PRIN1 " value is filed on " T) (PRINT FILE T T) - (for F in (fetch WHENFILED of TYPE) + (for F in (fetch (FILEPKGTYPE WHENFILED) + of TYPE) do (APPLY* F NAME TYPE FILE)) (* ;; "Only have to notice the single new item here, unlike the case in ADDNEWCOM below, cause other items on the list already belong and were previously noticed") @@ -1831,7 +1839,9 @@ compiling " T) (ADDNEWCOM (FILECOMS FILE) NAME TYPE (CAR PLACE) FILE) - (for F in (fetch WHENFILED of TYPE) + (for F in (fetch (FILEPKGTYPE + WHENFILED) + of TYPE) do (for I in (GETTOPVAL (CAR PLACE)) do (APPLY* F I TYPE FILE] (AND FILE (ADDFILE FILE)) @@ -2129,25 +2139,26 @@ compiling " T) (DEFAULTMAKENEWCOM NAME TYPE LISTNAME FILE]) (DEFAULTMAKENEWCOM - [LAMBDA (NAME TYPE LISTNAME FILE) (* lmm "20-OCT-82 22:48") + [LAMBDA (NAME TYPE LISTNAME FILE) (* ; "Edited 13-Jun-2021 10:24 by rmk:") (COND ((NOT (OR (FMEMB TYPE FILEPKGCOMSPLST) - (fetch MACRO of TYPE) - (fetch GETDEF of TYPE))) - (ERROR "no defined way to dump or obtain the definition of " (OR (fetch DESCRIPTION + (fetch (FILEPKGCOM MACRO) of TYPE) + (fetch (FILEPKGTYPE GETDEF) of TYPE))) + (ERROR "no defined way to dump or obtain the definition of " (OR (fetch (FILEPKGTYPE + DESCRIPTION) of TYPE) TYPE) T)) - ((NULL DEFAULTCOMHASFILEFLG) (* ; "disable FOOFNS FOOVARS junk") + ((NULL DEFAULTCOMHASFILEFLG) (* ; "disable FOOFNS FOOVARS junk") (LIST TYPE NAME)) - ((EQ FILE T) (* ; - "FILE=T only when called from SHOWDEF") + ((EQ FILE T) (* ; + "FILE=T only when called from SHOWDEF") (LIST TYPE NAME)) ([OR LISTNAME (AND FILE (SAVESET (SETQ LISTNAME (FILECOMS FILE TYPE)) (MERGEINSERT NAME (LISTP (GETTOPVAL LISTNAME)) T) T - 'NOPRINT] (* ; "The check (AND FILE --) is so that it will not bother with making listnames just for deleting items") + 'NOPRINT] (* ; "The check (AND FILE --) is so that it will not bother with making listnames just for deleting items") (LIST TYPE '* LISTNAME)) (T (LIST TYPE NAME]) ) @@ -4285,7 +4296,7 @@ compiling " T) (MARKASCHANGED COM 'FILEPKGCOMS]) (FILEPKGTYPE - [LAMBDA N (* lmm " 5-Jul-85 09:07") + [LAMBDA N (* ; "Edited 13-Jun-2021 10:20 by rmk:") (PROG ((TYPE (ARG N 1)) TEM) (RETURN (COND @@ -4303,7 +4314,8 @@ compiling " T) FILEPKGTYPEPROPS) then (GETPROP TYPE (ARG N 2)) else (SELECTQ (ARG N 2) - (DESCRIPTION (fetch DESCRIPTION of TYPE)) + (DESCRIPTION (fetch (FILEPKGTYPE DESCRIPTION) + of TYPE)) (TYPE [OR (AND (FMEMB TYPE (GETTOPVAL 'FILEPKGTYPES)) T) (CDR (ASSOC TYPE (GETTOPVAL 'FILEPKGTYPES]) @@ -4333,7 +4345,8 @@ compiling " T) TEM) else (/REMPROP TYPE (ARG N I))) else (SELECTQ (ARG N I) - (DESCRIPTION (/replace DESCRIPTION + (DESCRIPTION (/replace (FILEPKGTYPE + DESCRIPTION) of TYPE with TEM)) (ERROR (ARG N I) "not file package command/type property" @@ -4513,7 +4526,7 @@ compiling " T) (CAR X]) (EDITCALLERS - [LAMBDA (ATOMS FILES COMS) (* ; "Edited 8-Aug-2020 17:32 by rmk:") + [LAMBDA (ATOMS FILES COMS) (* ; "Edited 28-Jun-2021 09:50 by rmk:") (* bvm%: " 3-Nov-86 17:30") (LET (FFILEPOSPATTERNS FNS OTHERSFILES EDITPATTERN) @@ -4542,6 +4555,9 @@ compiling " T) (* ;; "Get reader environment of file. The call to GET-ENVIRONMENT-AND-FILEMAP with the filename will get cached info if it exists. Otherwise, read the top of the file") (SETQ RDTBL (AND ENV (fetch (READER-ENVIRONMENT REREADTABLE) of ENV))) + (CL:WHEN (AND ENV (FETCH (READER-ENVIRONMENT REFORMAT) OF ENV)) + (\EXTERNALFORMAT FILESTREAM (FETCH (READER-ENVIRONMENT REFORMAT) + OF ENV))) (SETQ CA (SEPRCASE DWIMIFYCOMPFLG RDTBL)) [OR (SETQ PATTERNS (CDR (ASSOC RDTBL FFILEPOSPATTERNS))) (push FFILEPOSPATTERNS @@ -4632,7 +4648,7 @@ compiling " T) (CONS OTHERSFILES FNS]) (EDITFROMFILE - [LAMBDA (FNS FILES EDITPATTERN EDITCOMS ONLYTYPES) (* rmk%: "14-Mar-85 21:51") + [LAMBDA (FNS FILES EDITPATTERN EDITCOMS ONLYTYPES) (* ; "Edited 13-Jun-2021 10:24 by rmk:") (RESETVARS [(EDITLOADFNSFLG (COND ((EQ EDITLOADFNSFLG T) '(T . NO)) @@ -4654,11 +4670,11 @@ compiling " T) (ONLYTYPES '(FNS)) (T - (* ;; "Move FNS to the front. This means that all the fns will be dwimified and edited before anything else (like a rename of fields) is done.") + (* ;; "Move FNS to the front. This means that all the fns will be dwimified and edited before anything else (like a rename of fields) is done.") (CONS 'FNS (REMOVE 'FNS FILEPKGTYPES] when (AND (LITATOM TYPE) - (NEQ (fetch EDITDEF of TYPE) + (NEQ (fetch (FILEPKGTYPE EDITDEF) of TYPE) 'NILL)) do (PROG (SEEN) @@ -4667,11 +4683,11 @@ compiling " T) (for NAME in [COND ((AND (EQ TYPE 'FNS) (NEQ FNS T)) - (* ; - "for this type, we are given the list of items") + (* ; + "for this type, we are given the list of items") (PROG1 FNS (SETQ FNS NIL))) - (T (* ; - "only want the values of `TYPE' which are not part of some other type") + (T (* ; + "only want the values of `TYPE' which are not part of some other type") (FILECOMSLST FILE TYPE 'EDIT] unless (MEMBER NAME SEEN) do @@ -4681,7 +4697,7 @@ compiling " T) (GETDEF NAME TYPE 'SAVED '(NOCOPY NOERROR] - (* ;; "If definition has been loaded, it may have been editted. Work on that explicitly instead of bringing in a file definition to smash the users previous changes. Perhaps we should query the user about this, but until the interaction is worked out, it is better to avoid trashing his in core edits, given that he can always get the file definition from permanent storage with LOADFNS. --- We might also be more discriminating about this: if the user specified a root file name, then he means the definition from the definition group, not the physical file. But ... rmk") + (* ;; "If definition has been loaded, it may have been editted. Work on that explicitly instead of bringing in a file definition to smash the users previous changes. Perhaps we should query the user about this, but until the interaction is worked out, it is better to avoid trashing his in core edits, given that he can always get the file definition from permanent storage with LOADFNS. --- We might also be more discriminating about this: if the user specified a root file name, then he means the definition from the definition group, not the physical file. But ... rmk") (COND ((OR (AND (EQ TYPE 'FNS) @@ -4691,7 +4707,8 @@ compiling " T) (COND ((NULL SEEN) (LISPXPRIN1 "editing the " T) - (LISPXPRIN1 (OR (fetch DESCRIPTION + (LISPXPRIN1 (OR (fetch (FILEPKGTYPE + DESCRIPTION) of TYPE) TYPE) T) @@ -4773,7 +4790,7 @@ compiling " T) (MOVD? 'INFILEP 'FINDFILE) - (* ; "or else from SPELLFILE") + (* ; "or else from SPELLFILE") (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY (BLOCK%: EDITFROMFILE EDITFROMFILE LOOKIN (GLOBALVARS EDITLOADFNSFLG) @@ -5020,46 +5037,46 @@ compiling " T) (PUTPROPS FILEPKG COPYRIGHT ("Venue & Xerox Corporation" T 1982 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992 1993 1995 2018 2020 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (20677 22382 (SEARCHPRETTYTYPELST 20687 . 21666) (PRETTYDEFMACROS 21668 . 22126) ( -FILEPKGCOMPROPS 22128 . 22380)) (23184 57307 (CLEANUP 23194 . 24582) (COMPILEFILES 24584 . 24860) ( -COMPILEFILES0 24862 . 25582) (CONTINUEDIT 25584 . 27004) (MAKEFILE 27006 . 38648) (FILECHANGES 38650 - . 40985) (FILEPKG.MERGECHANGES 40987 . 41810) (FILEPKG.CHANGEDFNS 41812 . 42124) (MAKEFILE1 42126 . -46353) (COMPILE-FILE? 46355 . 47912) (MAKEFILES 47914 . 49607) (ADDFILE 49609 . 52130) (ADDFILE0 52132 - . 56268) (LISTFILES 56270 . 57305)) (57995 93235 (FILEPKGCHANGES 58005 . 59355) (GETFILEPKGTYPE 59357 - . 62430) (MARKASCHANGED 62432 . 64069) (FILECOMS 64071 . 64455) (WHEREIS 64457 . 65877) ( -SMASHFILECOMS 65879 . 66114) (FILEFNSLST 66116 . 66278) (FILECOMSLST 66280 . 66764) (UPDATEFILES 66766 - . 72066) (INFILECOMS? 72068 . 73971) (INFILECOMTAIL 73973 . 75113) (INFILECOMS 75115 . 75276) ( -INFILECOM 75278 . 85487) (INFILECOMSVALS 85489 . 85816) (INFILECOMSVAL 85818 . 86820) (INFILECOMSPROP -86822 . 87651) (IFCPROPS 87653 . 88914) (IFCEXPRTYPE 88916 . 89427) (IFCPROPSCAN 89429 . 90482) ( -IFCDECLARE 90484 . 91795) (INFILEPAIRS 91797 . 92129) (INFILECOMSMACRO 92131 . 93233)) (93270 124046 ( -FILES? 93280 . 95473) (FILES?1 95475 . 96125) (FILES?PRINTLST 96127 . 96909) (ADDTOFILES? 96911 . -107513) (ADDTOFILE 107515 . 108431) (WHATIS 108433 . 110409) (ADDTOCOMS 110411 . 112055) (ADDTOCOM -112057 . 118604) (ADDTOCOM1 118606 . 119777) (ADDNEWCOM 119779 . 120829) (MAKENEWCOM 120831 . 122674) -(DEFAULTMAKENEWCOM 122676 . 124044)) (124116 126933 (MERGEINSERT 124126 . 126469) (MERGEINSERT1 126471 - . 126931)) (127087 128444 (ADDTOFILEKEYLST 127097 . 128442)) (128561 139473 (DELFROMFILES 128571 . -129421) (DELFROMCOMS 129423 . 131102) (DELFROMCOM 131104 . 136972) (DELFROMCOM1 136974 . 137771) ( -REMOVEITEM 137773 . 138647) (MOVETOFILE 138649 . 139471)) (139687 142056 (SAVEPUT 139697 . 142054)) ( -142181 150505 (UNMARKASCHANGED 142191 . 143899) (PREEDITFN 143901 . 146412) (POSTEDITPROPS 146414 . -148915) (POSTEDITALISTS 148917 . 150503)) (150654 171208 (ALISTS.GETDEF 150664 . 151043) ( -ALISTS.WHENCHANGED 151045 . 151689) (CLEARCLISPARRAY 151691 . 152865) (EXPRESSIONS.WHENCHANGED 152867 - . 153241) (MAKEALISTCOMS 153243 . 154316) (MAKEFILESCOMS 154318 . 155755) (MAKELISPXMACROSCOMS 155757 - . 157775) (MAKEPROPSCOMS 157777 . 158475) (MAKEUSERMACROSCOMS 158477 . 160277) (PROPS.WHENCHANGED -160279 . 160900) (FILEGETDEF.LISPXMACROS 160902 . 162344) (FILEGETDEF.ALISTS 162346 . 162965) ( -FILEGETDEF.RECORDS 162967 . 163898) (FILEGETDEF.PROPS 163900 . 164692) (FILEGETDEF.MACROS 164694 . -165754) (FILEGETDEF.VARS 165756 . 166172) (FILEGETDEF.FNS 166174 . 167538) (FILEPKGCOMS.PUTDEF 167540 - . 169980) (FILES.PUTDEF 169982 . 170939) (VARS.PUTDEF 170941 . 171084) (FILES.WHENCHANGED 171086 . -171206)) (173230 180663 (RENAME 173240 . 174641) (CHANGECALLERS 174643 . 180661)) (180664 228612 ( -SHOWDEF 180674 . 181467) (COPYDEF 181469 . 183943) (GETDEF 183945 . 186221) (GETDEFCOM 186223 . 187189 -) (GETDEFCOM0 187191 . 188537) (GETDEFCURRENT 188539 . 194959) (GETDEFERR 194961 . 196262) ( -GETDEFFROMFILE 196264 . 200544) (GETDEFSAVED 200546 . 201650) (PUTDEF 201652 . 202355) (EDITDEF 202357 - . 203334) (DEFAULT.EDITDEF 203336 . 206172) (EDITDEF.FILES 206174 . 206375) (LOADDEF 206377 . 206553) - (DWIMDEF 206555 . 207409) (DELDEF 207411 . 210425) (DELFROMLIST 210427 . 210931) (HASDEF 210933 . -217255) (GETFILEDEF 217257 . 217779) (SAVEDEF 217781 . 219440) (UNSAVEDEF 219442 . 220338) ( -COMPAREDEFS 220340 . 223642) (COMPARE 223644 . 224348) (TYPESOF 224350 . 228610)) (228679 233722 ( -FIXEDITDATE 228689 . 232192) (EDITDATE? 232194 . 233720)) (234141 242727 (FILEPKGCOM 234151 . 239084) -(FILEPKGTYPE 239086 . 242725)) (254764 269316 (FINDCALLERS 254774 . 255289) (EDITCALLERS 255291 . -262949) (EDITFROMFILE 262951 . 268631) (FINDATS 268633 . 268905) (LOOKIN 268907 . 269314)) (269317 -271044 (SEPRCASE 269327 . 271042)) (271561 277103 (IMPORTFILE 271571 . 272545) (IMPORTEVAL 272547 . -273427) (IMPORTFILESCAN 273429 . 273850) (CHECKIMPORTS 273852 . 275188) (GATHEREXPORTS 275190 . 276513 -) (\DUMPEXPORTS 276515 . 277101)) (277441 279649 (CLEARFILEPKG 277451 . 279647))))) + (FILEMAP (NIL (20669 22374 (SEARCHPRETTYTYPELST 20679 . 21658) (PRETTYDEFMACROS 21660 . 22118) ( +FILEPKGCOMPROPS 22120 . 22372)) (23176 57665 (CLEANUP 23186 . 24574) (COMPILEFILES 24576 . 24852) ( +COMPILEFILES0 24854 . 25574) (CONTINUEDIT 25576 . 26996) (MAKEFILE 26998 . 39006) (FILECHANGES 39008 + . 41343) (FILEPKG.MERGECHANGES 41345 . 42168) (FILEPKG.CHANGEDFNS 42170 . 42482) (MAKEFILE1 42484 . +46711) (COMPILE-FILE? 46713 . 48270) (MAKEFILES 48272 . 49965) (ADDFILE 49967 . 52488) (ADDFILE0 52490 + . 56626) (LISTFILES 56628 . 57663)) (58361 93601 (FILEPKGCHANGES 58371 . 59721) (GETFILEPKGTYPE 59723 + . 62796) (MARKASCHANGED 62798 . 64435) (FILECOMS 64437 . 64821) (WHEREIS 64823 . 66243) ( +SMASHFILECOMS 66245 . 66480) (FILEFNSLST 66482 . 66644) (FILECOMSLST 66646 . 67130) (UPDATEFILES 67132 + . 72432) (INFILECOMS? 72434 . 74337) (INFILECOMTAIL 74339 . 75479) (INFILECOMS 75481 . 75642) ( +INFILECOM 75644 . 85853) (INFILECOMSVALS 85855 . 86182) (INFILECOMSVAL 86184 . 87186) (INFILECOMSPROP +87188 . 88017) (IFCPROPS 88019 . 89280) (IFCEXPRTYPE 89282 . 89793) (IFCPROPSCAN 89795 . 90848) ( +IFCDECLARE 90850 . 92161) (INFILEPAIRS 92163 . 92495) (INFILECOMSMACRO 92497 . 93599)) (93636 125056 ( +FILES? 93646 . 95839) (FILES?1 95841 . 96539) (FILES?PRINTLST 96541 . 97323) (ADDTOFILES? 97325 . +108371) (ADDTOFILE 108373 . 109289) (WHATIS 109291 . 111267) (ADDTOCOMS 111269 . 112913) (ADDTOCOM +112915 . 119462) (ADDTOCOM1 119464 . 120635) (ADDNEWCOM 120637 . 121687) (MAKENEWCOM 121689 . 123532) +(DEFAULTMAKENEWCOM 123534 . 125054)) (125126 127943 (MERGEINSERT 125136 . 127479) (MERGEINSERT1 127481 + . 127941)) (128097 129454 (ADDTOFILEKEYLST 128107 . 129452)) (129571 140483 (DELFROMFILES 129581 . +130431) (DELFROMCOMS 130433 . 132112) (DELFROMCOM 132114 . 137982) (DELFROMCOM1 137984 . 138781) ( +REMOVEITEM 138783 . 139657) (MOVETOFILE 139659 . 140481)) (140697 143066 (SAVEPUT 140707 . 143064)) ( +143191 151515 (UNMARKASCHANGED 143201 . 144909) (PREEDITFN 144911 . 147422) (POSTEDITPROPS 147424 . +149925) (POSTEDITALISTS 149927 . 151513)) (151664 172218 (ALISTS.GETDEF 151674 . 152053) ( +ALISTS.WHENCHANGED 152055 . 152699) (CLEARCLISPARRAY 152701 . 153875) (EXPRESSIONS.WHENCHANGED 153877 + . 154251) (MAKEALISTCOMS 154253 . 155326) (MAKEFILESCOMS 155328 . 156765) (MAKELISPXMACROSCOMS 156767 + . 158785) (MAKEPROPSCOMS 158787 . 159485) (MAKEUSERMACROSCOMS 159487 . 161287) (PROPS.WHENCHANGED +161289 . 161910) (FILEGETDEF.LISPXMACROS 161912 . 163354) (FILEGETDEF.ALISTS 163356 . 163975) ( +FILEGETDEF.RECORDS 163977 . 164908) (FILEGETDEF.PROPS 164910 . 165702) (FILEGETDEF.MACROS 165704 . +166764) (FILEGETDEF.VARS 166766 . 167182) (FILEGETDEF.FNS 167184 . 168548) (FILEPKGCOMS.PUTDEF 168550 + . 170990) (FILES.PUTDEF 170992 . 171949) (VARS.PUTDEF 171951 . 172094) (FILES.WHENCHANGED 172096 . +172216)) (174240 181673 (RENAME 174250 . 175651) (CHANGECALLERS 175653 . 181671)) (181674 229622 ( +SHOWDEF 181684 . 182477) (COPYDEF 182479 . 184953) (GETDEF 184955 . 187231) (GETDEFCOM 187233 . 188199 +) (GETDEFCOM0 188201 . 189547) (GETDEFCURRENT 189549 . 195969) (GETDEFERR 195971 . 197272) ( +GETDEFFROMFILE 197274 . 201554) (GETDEFSAVED 201556 . 202660) (PUTDEF 202662 . 203365) (EDITDEF 203367 + . 204344) (DEFAULT.EDITDEF 204346 . 207182) (EDITDEF.FILES 207184 . 207385) (LOADDEF 207387 . 207563) + (DWIMDEF 207565 . 208419) (DELDEF 208421 . 211435) (DELFROMLIST 211437 . 211941) (HASDEF 211943 . +218265) (GETFILEDEF 218267 . 218789) (SAVEDEF 218791 . 220450) (UNSAVEDEF 220452 . 221348) ( +COMPAREDEFS 221350 . 224652) (COMPARE 224654 . 225358) (TYPESOF 225360 . 229620)) (229689 234732 ( +FIXEDITDATE 229699 . 233202) (EDITDATE? 233204 . 234730)) (235151 243922 (FILEPKGCOM 235161 . 240094) +(FILEPKGTYPE 240096 . 243920)) (255959 270891 (FINDCALLERS 255969 . 256484) (EDITCALLERS 256486 . +264396) (EDITFROMFILE 264398 . 270206) (FINDATS 270208 . 270480) (LOOKIN 270482 . 270889)) (270892 +272619 (SEPRCASE 270902 . 272617)) (273136 278678 (IMPORTFILE 273146 . 274120) (IMPORTEVAL 274122 . +275002) (IMPORTFILESCAN 275004 . 275425) (CHECKIMPORTS 275427 . 276763) (GATHEREXPORTS 276765 . 278088 +) (\DUMPEXPORTS 278090 . 278676)) (279016 281224 (CLEARFILEPKG 279026 . 281222))))) STOP diff --git a/sources/FILEPKG.LCOM b/sources/FILEPKG.LCOM index 9d08805a7..615b4aae3 100644 Binary files a/sources/FILEPKG.LCOM and b/sources/FILEPKG.LCOM differ diff --git a/sources/FILESETS b/sources/FILESETS index 0130c5597..35480331d 100644 --- a/sources/FILESETS +++ b/sources/FILESETS @@ -1,9 +1,11 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED " 6-Mar-2021 20:01:54" {DSK}larry>ilisp>medley>sources>FILESETS.;5 6224 +(FILECREATED "25-Jun-2021 10:21:40"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>FILESETS.;6 6395 - changes to%: (VARS EXPORTFILES) + changes to%: (VARS 0LISPSET) - previous date%: " 6-Mar-2021 16:22:11" {DSK}larry>ilisp>medley>sources>FILESETS.;4) + previous date%: "19-Jun-2021 12:13:31" +{DSK}kaplan>Local>medley3.5>git-medley>sources>FILESETS.;5) (* ; " @@ -12,18 +14,21 @@ Copyright (c) 1981-1990, 1998, 2021 by Xerox Corporation. (PRETTYCOMPRINT FILESETSCOMS) -(RPAQQ FILESETSCOMS ( +(RPAQQ FILESETSCOMS + ( -(* ;;; "contains all of the lists of files which are used in various ways") +(* ;;; "contains all of the lists of files which are used in various ways") - - (* ;; "I took out the EXPORT of the filesets because it led to inconsistency when one had loaded ABC. -- Pavel") + + (* ;; "I took out the EXPORT of the filesets because it led to inconsistency when one had loaded ABC. -- Pavel") - (VARS * FILESETS) - (VARS EXPORTFILES) - (VARS MAKEINITFILES MAKEINITTYPES RENAMETYPES ABCFILES READSYSFILES - DATABASEFILES) - (VARS DEADFNS))) + + (* ;; "The file with the default EXTERNALFORMAT should come right after FILEIO, and particularly before ATERM.") + + (VARS * FILESETS) + (VARS EXPORTFILES) + (VARS MAKEINITFILES MAKEINITTYPES RENAMETYPES ABCFILES READSYSFILES DATABASEFILES) + (VARS DEADFNS))) @@ -37,11 +42,18 @@ Copyright (c) 1981-1990, 1998, 2021 by Xerox Corporation. ) + + +(* ;; +"The file with the default EXTERNALFORMAT should come right after FILEIO, and particularly before ATERM." +) + + (RPAQQ FILESETS (0LISPSET 1LISPSET 2LISPSET 3LISPSET)) (RPAQQ 0LISPSET (PACKAGE-CONVERSION-TABLE LLFAULT LLSUBRS LLBFS LLNEW FILEIO IMAGEIO LLBASIC LLGC LLARRAYELT LLINTERP LLMVS DEFSTRUCT-RUN-TIME SETF-RUNTIME CMLSEQBASICS - LLARITH LLFLOAT LLBIGNUM LLREAD LLCHAR LLSTK LLDATATYPE IOCHAR LLKEY + LLARITH LLFLOAT LLBIGNUM LLREAD XCCS LLCHAR LLSTK LLDATATYPE IOCHAR LLKEY LLTIMER)) (RPAQQ 1LISPSET @@ -58,8 +70,8 @@ Copyright (c) 1981-1990, 1998, 2021 by Xerox Corporation. (RPAQQ EXPORTFILES (MODARITH LLPARAMS LLCODE AERROR AOFD APRINT ATERM LLARRAYELT LLDATATYPE LLNEW LLBASIC LLCHAR LLSTK PMAP LLGC ATBL FILEIO LLARITH LLFLOAT FONT LLKEY LLDISPLAY ADISPLAY AINTERRUPT - RENAMEMACROS HLDISPLAY WINDOW MACROAUX ADDARITH LLFAULT LLTIMER IMAGEIO PROC LLREAD - PASSWORDS INTERPRESS HARDCOPY CMLARRAY LLSUBRS)) + RENAMEMACROS HLDISPLAY WINDOW MACROAUX ADDARITH LLFAULT LLTIMER IMAGEIO PROC XCCS + LLREAD PASSWORDS INTERPRESS HARDCOPY CMLARRAY LLSUBRS)) (RPAQQ MAKEINITFILES (MAKEINIT MEM I-NEW)) @@ -102,7 +114,7 @@ Copyright (c) 1981-1990, 1998, 2021 by Xerox Corporation. (COMSNAME . RDCOMS) (EXTRACOMS - (* ;; "YOU MUST REMAKE THIS FILE using (DORENAME 'R) (after CONNing to library) whenever the SYSOUT layout changes in LLPARAMS (e.g., if MDSTypeTable moves)") + (* ;; "YOU MUST REMAKE THIS FILE using (DORENAME 'R) (after CONNing to library) whenever the SYSOUT layout changes in LLPARAMS (e.g., if MDSTypeTable moves)") (FILES VMEM) (VARS RDVALS RDPTRS) diff --git a/sources/HARDCOPY b/sources/HARDCOPY index 8acc4ed7b..9d9c7909e 100644 --- a/sources/HARDCOPY +++ b/sources/HARDCOPY @@ -1,16 +1,15 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "16-Apr-2018 22:15:08"  -{DSK}kaplan>Local>medley3.5>lispcore>sources>HARDCOPY.;6 104175 +(FILECREATED " 5-May-2021 19:41:55"  +{DSK}kaplan>Local>medley3.5>git-medley2>sources>HARDCOPY.;9 103663 - changes to%: (VARS HARDCOPYCOMS) - (FNS PRINTERS.WHENSELECTEDFN PopUpWindowAndGetList) + changes to%: (FNS COPY.TEXT.TO.IMAGE) - previous date%: "28-Jun-99 16:36:33" -{DSK}kaplan>Local>medley3.5>lispcore>sources>HARDCOPY.;4) + previous date%: "16-Apr-2018 22:15:08" +{DSK}kaplan>Local>medley3.5>git-medley2>sources>HARDCOPY.;8) (* ; " -Copyright (c) 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1999, 2018 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1984-1993, 1999, 2018, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT HARDCOPYCOMS) @@ -720,7 +719,7 @@ Copyright (c) 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1999, (CLOSEF IMAGESTREAM])]) (COPY.TEXT.TO.IMAGE - [LAMBDA (INFILE IMAGESTREAM FONTS TABS) (* ; "Edited 8-Feb-96 12:06 by rmk") + [LAMBDA (INFILE IMAGESTREAM FONTS TABS) (* ; "Edited 5-May-2021 19:41 by rmk:") (* ; "Edited 10-Apr-95 21:23 by rmk:") (* ;; "Copy text to an image stream, obeying PSPOOL control characters") @@ -733,95 +732,92 @@ Copyright (c) 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1999, (INSTRM (GETSTREAM INFILE 'INPUT)) DEFAULTTAB C FC) (replace (STREAM ENDOFSTREAMOP) of INSTRM with (FUNCTION ZERO)) - (bind (SHIFTEDCHARSET _ (UNFOLD (ACCESS-CHARSET INSTRM) - 256)) - do - (COND - ((AND [EQ 0 (LOGAND 255 (SETQ C (\NSIN INSTRM SHIFTEDCHARSET SHIFTEDCHARSET] - (EOFP INSTRM)) - (RETURN)) - ((AND RIGHTMAR (> (DSPXPOSITION NIL IMAGESTREAM) - RIGHTMAR)) (* ; + (do + (COND + ((AND [EQ 0 (LOGAND 255 (SETQ C (\INCCODE INSTRM] + (EOFP INSTRM)) + (RETURN)) + ((AND RIGHTMAR (> (DSPXPOSITION NIL IMAGESTREAM) + RIGHTMAR)) (* ;  "Not to walk off the right edge of the paper") - (TERPRI IMAGESTREAM))) - (COND - ([> C (CONSTANT (APPLY (FUNCTION MAX) - (CHARCODE (^F CR LF ^L TAB NULL] - (\OUTCHAR IMAGESTREAM C)) - (T - (SELCHARQ C - (^F (* ; "Font shift") - - (* ;; - "For FX-XP-9 printer:SETXY interpress command to avoid printer's BUG(Take)") - - (DSPXPOSITION (IPLUS (DSPXPOSITION NIL IMAGESTREAM) - 1) - IMAGESTREAM) - [SELCHARQ (SETQ FC (\NSIN INSTRM SHIFTEDCHARSET SHIFTEDCHARSET)) - (^T (* ; "tab to absolute pos.") - (COND - ((EQ 0 (SETQ FC (\NSIN INSTRM SHIFTEDCHARSET SHIFTEDCHARSET))) - (\OUTCHAR IMAGESTREAM (CHARCODE ^F)) - (\OUTCHAR IMAGESTREAM (CHARCODE ^T)) - (AND (\EOFP INSTRM) - (RETURN)) - (\OUTCHAR IMAGESTREAM FC)) - (T + (TERPRI IMAGESTREAM))) + (COND + ([> C (CONSTANT (APPLY (FUNCTION MAX) + (CHARCODE (^F CR LF ^L TAB NULL] + (\OUTCHAR IMAGESTREAM C)) + (T + (SELCHARQ C + (^F (* ; "Font shift") + + (* ;; + "For FX-XP-9 printer:SETXY interpress command to avoid printer's BUG(Take)") + + (DSPXPOSITION (IPLUS (DSPXPOSITION NIL IMAGESTREAM) + 1) + IMAGESTREAM) + [SELCHARQ (SETQ FC (\INCCODE INSTRM)) + (^T (* ; "tab to absolute pos.") + (COND + ((EQ 0 (SETQ FC (\INCCODE INSTRM))) + (\OUTCHAR IMAGESTREAM (CHARCODE ^F)) + (\OUTCHAR IMAGESTREAM (CHARCODE ^T)) + (AND (\EOFP INSTRM) + (RETURN)) + (\OUTCHAR IMAGESTREAM FC)) + (T (* ;; "TEXTDEFAULTTABS is a hack, since it depends on the units of the stream. Should really be a property of the stream or imagetype, or defined in terms of standard scale") - [SETQ FC - (IF TABS - THEN (OR (CAR (NTH TABS FC)) - (ERROR "Undefined absolute tab number" FC)) - ELSE (TIMES FC - (OR DEFAULTTAB - (SETQ DEFAULTTAB - (TIMES 8 - (CHARWIDTH (CHARCODE SPACE) + [SETQ FC + (IF TABS + THEN (OR (CAR (NTH TABS FC)) + (ERROR "Undefined absolute tab number" FC)) + ELSE (TIMES FC + (OR DEFAULTTAB + (SETQ DEFAULTTAB + (TIMES 8 (CHARWIDTH (CHARCODE SPACE) (FONTCREATE (ELT FONTARRAY 1) NIL NIL NIL IMAGESTREAM] - (DSPXPOSITION FC IMAGESTREAM)))) - (NULL (\OUTCHAR IMAGESTREAM (CHARCODE ^F)) - (AND (\EOFP INSTRM) - (RETURN)) - (\OUTCHAR IMAGESTREAM FC) (* ; "EOS after ^F") - ) - (COND - ((AND (>= MAXFONT FC) - (NEQ FC 0)) - (DSPFONT (ELT FONTARRAY FC) - IMAGESTREAM)) - (T (\OUTCHAR IMAGESTREAM (CHARCODE ^F)) - (\OUTCHAR IMAGESTREAM C]) - (CR - (* ;; "Assumes that CR and possibly following LF denote a single EOL, independent of the EOL convention and independent of whether the file was opened binary or text. Originally, this function tried to discriminate, treating an LF in a CR-mode file as a line-feed and a CR in an LF file as a carriage-return. But these formatting effects cannot be guaranteed across text-file transfers (which is all that it makes sense to print), so it is silly to take them seriously. Given that just this information can be lost in text-mode file transfers, we make adopt here the 99%% correct solution, which is to treat all instances of CR, CRLF, and LF as end-of-line.") - - (TERPRI IMAGESTREAM) - (COND - ((EQ (CHARCODE LF) - (\PEEKBIN INSTRM T)) - (BIN INSTRM)))) - (TAB (OR (LET* [(LEFTMARGIN (DSPLEFTMARGIN NIL IMAGESTREAM)) - (TAB.WIDTH (TIMES (CHARWIDTH (CHARCODE SPACE) - IMAGESTREAM) - 8)) - (CURRENT.X (- (DSPXPOSITION NIL IMAGESTREAM) - LEFTMARGIN)) - (CURRENT.STOP (- CURRENT.X (REMAINDER CURRENT.X TAB.WIDTH] - (NLSETQ (RELMOVETO (- (+ CURRENT.STOP TAB.WIDTH) - CURRENT.X) - 0 IMAGESTREAM))) - (\OUTCHAR IMAGESTREAM C))) - (LF (* ; "See comment at CR") - (TERPRI IMAGESTREAM)) - (NULL (AND (EOFP INSTRM) - (RETURN)) - (\OUTCHAR IMAGESTREAM C)) - (\OUTCHAR IMAGESTREAM C]) + (DSPXPOSITION FC IMAGESTREAM)))) + (NULL (\OUTCHAR IMAGESTREAM (CHARCODE ^F)) + (AND (\EOFP INSTRM) + (RETURN)) + (\OUTCHAR IMAGESTREAM FC) (* ; "EOS after ^F") + ) + (COND + ((AND (>= MAXFONT FC) + (NEQ FC 0)) + (DSPFONT (ELT FONTARRAY FC) + IMAGESTREAM)) + (T (\OUTCHAR IMAGESTREAM (CHARCODE ^F)) + (\OUTCHAR IMAGESTREAM C]) + (CR + (* ;; "Assumes that CR and possibly following LF denote a single EOL, independent of the EOL convention and independent of whether the file was opened binary or text. Originally, this function tried to discriminate, treating an LF in a CR-mode file as a line-feed and a CR in an LF file as a carriage-return. But these formatting effects cannot be guaranteed across text-file transfers (which is all that it makes sense to print), so it is silly to take them seriously. Given that just this information can be lost in text-mode file transfers, we make adopt here the 99%% correct solution, which is to treat all instances of CR, CRLF, and LF as end-of-line.") + + (TERPRI IMAGESTREAM) + (COND + ((EQ (CHARCODE LF) + (\PEEKBIN INSTRM T)) + (BIN INSTRM)))) + (TAB (OR (LET* [(LEFTMARGIN (DSPLEFTMARGIN NIL IMAGESTREAM)) + (TAB.WIDTH (TIMES (CHARWIDTH (CHARCODE SPACE) + IMAGESTREAM) + 8)) + (CURRENT.X (- (DSPXPOSITION NIL IMAGESTREAM) + LEFTMARGIN)) + (CURRENT.STOP (- CURRENT.X (REMAINDER CURRENT.X TAB.WIDTH] + (NLSETQ (RELMOVETO (- (+ CURRENT.STOP TAB.WIDTH) + CURRENT.X) + 0 IMAGESTREAM))) + (\OUTCHAR IMAGESTREAM C))) + (LF (* ; "See comment at CR") + (TERPRI IMAGESTREAM)) + (NULL (AND (EOFP INSTRM) + (RETURN)) + (\OUTCHAR IMAGESTREAM C)) + (\OUTCHAR IMAGESTREAM C]) ) (DEFINEQ @@ -1087,41 +1083,41 @@ Copyright (c) 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1999, (ADDTOVAR LAMA ) ) (PUTPROPS HARDCOPY COPYRIGHT ("Venue & Xerox Corporation" 1984 1985 1986 1987 1988 1989 1990 1991 1992 - 1993 1999 2018)) + 1993 1999 2018 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (6265 10449 (HARDCOPY.SOMEHOW 6275 . 7633) (HARDCOPYIMAGEW 7635 . 7787) ( -HARDCOPYIMAGEW.TOFILE 7789 . 8097) (HARDCOPYIMAGEW.TOPRINTER 8099 . 8764) (HARDCOPYREGION.TOFILE 8766 - . 9064) (HARDCOPYREGION.TOPRINTER 9066 . 9688) (COPY.WINDOW.TO.BITMAP 9690 . 10447)) (10521 21071 ( -MakeMenuOfPrinters 10531 . 11756) (PRINTERS.WHENSELECTEDFN 11758 . 13500) (MakeMenuOfImageTypes 13502 - . 14020) (GetNewPrinterFromUser 14022 . 14450) (PopUpWindowAndGetAtom 14452 . 15837) ( -PopUpWindowAndGetList 15839 . 17405) (NewPrinter 17407 . 18355) (GetPrinterName 18357 . 18637) ( -GetImageFile 18639 . 20926) (FetchDefaultPrinter 20928 . 21069)) (21106 21644 ( -ExtensionForPrintFileType 21116 . 21309) (PRINTFILETYPE.FROM.EXTENSION 21311 . 21642)) (21699 38083 ( -DEFAULTPRINTER 21709 . 21869) (CAN.PRINT.DIRECTLY 21871 . 22027) (CONVERT.FILE.TO.TYPE.FOR.PRINTER -22029 . 23073) (EMPRESS 23075 . 23388) (HARDCOPYW 23390 . 26350) (LISTFILES1 26352 . 26525) ( -PRINTER.BITMAPFILE 26527 . 26774) (PRINTER.BITMAPSCALE 26776 . 27041) (PRINTER.SCRATCH.FILE 27043 . -27166) (PRINTERPROP 27168 . 27351) (PRINTERSTATUS 27353 . 27542) (PRINTERTYPE 27544 . 29853) ( -PRINTERNAME 29855 . 30157) (PRINTFILEPROP 30159 . 30350) (PRINTFILETYPE 30352 . 32296) ( -\EXPECTED.FILE.TYPE 32298 . 33080) (SEND.FILE.TO.PRINTER 33082 . 38081)) (38084 43066 (PRINTERDEVICE -38094 . 43064)) (43849 52443 (TEXTTOIMAGEFILE 43859 . 46049) (COPY.TEXT.TO.IMAGE 46051 . 52441)) ( -52444 53579 (\BLTSHADE.GENERICPRINTER 52454 . 53577)) (53707 72459 (MAKEHARDCOPYSTREAM 53717 . 54721) -(UNMAKEHARDCOPYSTREAM 54723 . 55407) (HARDCOPYSTREAMTYPE 55409 . 55688) (\CHARWIDTH.HDCPYDISPLAY 55690 - . 56121) (\DSPFONT.HDCPYDISPLAY 56123 . 57528) (\DSPRIGHTMARGIN.HDCPYDISPLAY 57530 . 58107) ( -\DSPXPOSITION.HDCPYDISPLAY 58109 . 58370) (\DSPYPOSITION.HDCPYDISPLAY 58372 . 58633) ( -\STRINGWIDTH.HDCPYDISPLAY 58635 . 59142) (\STRINGWIDTH.HCPYDISPLAYAUX 59144 . 61476) (\HDCPYBLTCHAR -61478 . 64013) (\HDCPYDISPLAY.FIX.XPOS 64015 . 64435) (\HDCPYDISPLAY.FIX.YPOS 64437 . 64857) ( -\HDCPYDISPLAYINIT 64859 . 65636) (\HDCPYDSPPRINTCHAR 65638 . 67798) (\SLOWHDCPYBLTCHAR 67800 . 71303) -(\CHANGECHARSET.HDCPYDISPLAY 71305 . 72457)) (73181 103478 (MAKEHARDCOPYMODESTREAM 73191 . 75100) ( -UNMAKEHARDCOPYMODESTREAM 75102 . 76180) (\BLTSHADE.HCPYMODE 76182 . 76629) (\BITBLT.HCPYMODE 76631 . -77253) (\BRUSHCONVERT.HCPYMODE 77255 . 77492) (\CHANGECHARSET.HCPYMODE 77494 . 79261) ( -\DASHINGCONVERT.HCPYMODE 79263 . 79526) (\CHARWIDTH.HCPYMODE 79528 . 79815) (\DRAWLINE.HCPYMODE 79817 - . 80129) (\DRAWCURVE.HCPYMODE 80131 . 80560) (\DRAWCIRCLE.HCPYMODE 80562 . 80957) ( -\DRAWELLIPSE.HCPYMODE 80959 . 81471) (\DSPFONT.HCPYMODE 81473 . 82629) (\DSPLEFTMARGIN.HCPYMODE 82631 - . 83215) (\DSPLINEFEED.HCPYMODE 83217 . 83627) (\DSPRIGHTMARGIN.HCPYMODE 83629 . 84258) ( -\DSPSPACEFACTOR.HCPYMODE 84260 . 84781) (\DSPXPOSITION.HCPYMODE 84783 . 85364) (\DSPYPOSITION.HCPYMODE - 85366 . 85771) (\MOVETO.HCPYMODE 85773 . 85925) (\FONTCREATE.HCPYMODE.PRESS 85927 . 86939) ( -\CREATECHARSET.HCPYMODE.PRESS 86941 . 87912) (\FONTCREATE.HCPYMODE.INTERPRESS 87914 . 88948) ( -\CREATECHARSET.HCPYMODE.INTERPRESS 88950 . 89938) (\STRINGWIDTH.HCPYMODE 89940 . 90374) ( -\HCPYMODEBLTCHAR 90376 . 93345) (\HCPYMODEDISPLAYINIT 93347 . 96278) (\HCPYMODEDSPPRINTCHAR 96280 . -98461) (\SLOWHCPYMODEBLTCHAR 98463 . 101977) (\SFFixY.HCPYMODE 101979 . 103476))))) + (FILEMAP (NIL (6141 10325 (HARDCOPY.SOMEHOW 6151 . 7509) (HARDCOPYIMAGEW 7511 . 7663) ( +HARDCOPYIMAGEW.TOFILE 7665 . 7973) (HARDCOPYIMAGEW.TOPRINTER 7975 . 8640) (HARDCOPYREGION.TOFILE 8642 + . 8940) (HARDCOPYREGION.TOPRINTER 8942 . 9564) (COPY.WINDOW.TO.BITMAP 9566 . 10323)) (10397 20947 ( +MakeMenuOfPrinters 10407 . 11632) (PRINTERS.WHENSELECTEDFN 11634 . 13376) (MakeMenuOfImageTypes 13378 + . 13896) (GetNewPrinterFromUser 13898 . 14326) (PopUpWindowAndGetAtom 14328 . 15713) ( +PopUpWindowAndGetList 15715 . 17281) (NewPrinter 17283 . 18231) (GetPrinterName 18233 . 18513) ( +GetImageFile 18515 . 20802) (FetchDefaultPrinter 20804 . 20945)) (20982 21520 ( +ExtensionForPrintFileType 20992 . 21185) (PRINTFILETYPE.FROM.EXTENSION 21187 . 21518)) (21575 37959 ( +DEFAULTPRINTER 21585 . 21745) (CAN.PRINT.DIRECTLY 21747 . 21903) (CONVERT.FILE.TO.TYPE.FOR.PRINTER +21905 . 22949) (EMPRESS 22951 . 23264) (HARDCOPYW 23266 . 26226) (LISTFILES1 26228 . 26401) ( +PRINTER.BITMAPFILE 26403 . 26650) (PRINTER.BITMAPSCALE 26652 . 26917) (PRINTER.SCRATCH.FILE 26919 . +27042) (PRINTERPROP 27044 . 27227) (PRINTERSTATUS 27229 . 27418) (PRINTERTYPE 27420 . 29729) ( +PRINTERNAME 29731 . 30033) (PRINTFILEPROP 30035 . 30226) (PRINTFILETYPE 30228 . 32172) ( +\EXPECTED.FILE.TYPE 32174 . 32956) (SEND.FILE.TO.PRINTER 32958 . 37957)) (37960 42942 (PRINTERDEVICE +37970 . 42940)) (43725 51926 (TEXTTOIMAGEFILE 43735 . 45925) (COPY.TEXT.TO.IMAGE 45927 . 51924)) ( +51927 53062 (\BLTSHADE.GENERICPRINTER 51937 . 53060)) (53190 71942 (MAKEHARDCOPYSTREAM 53200 . 54204) +(UNMAKEHARDCOPYSTREAM 54206 . 54890) (HARDCOPYSTREAMTYPE 54892 . 55171) (\CHARWIDTH.HDCPYDISPLAY 55173 + . 55604) (\DSPFONT.HDCPYDISPLAY 55606 . 57011) (\DSPRIGHTMARGIN.HDCPYDISPLAY 57013 . 57590) ( +\DSPXPOSITION.HDCPYDISPLAY 57592 . 57853) (\DSPYPOSITION.HDCPYDISPLAY 57855 . 58116) ( +\STRINGWIDTH.HDCPYDISPLAY 58118 . 58625) (\STRINGWIDTH.HCPYDISPLAYAUX 58627 . 60959) (\HDCPYBLTCHAR +60961 . 63496) (\HDCPYDISPLAY.FIX.XPOS 63498 . 63918) (\HDCPYDISPLAY.FIX.YPOS 63920 . 64340) ( +\HDCPYDISPLAYINIT 64342 . 65119) (\HDCPYDSPPRINTCHAR 65121 . 67281) (\SLOWHDCPYBLTCHAR 67283 . 70786) +(\CHANGECHARSET.HDCPYDISPLAY 70788 . 71940)) (72664 102961 (MAKEHARDCOPYMODESTREAM 72674 . 74583) ( +UNMAKEHARDCOPYMODESTREAM 74585 . 75663) (\BLTSHADE.HCPYMODE 75665 . 76112) (\BITBLT.HCPYMODE 76114 . +76736) (\BRUSHCONVERT.HCPYMODE 76738 . 76975) (\CHANGECHARSET.HCPYMODE 76977 . 78744) ( +\DASHINGCONVERT.HCPYMODE 78746 . 79009) (\CHARWIDTH.HCPYMODE 79011 . 79298) (\DRAWLINE.HCPYMODE 79300 + . 79612) (\DRAWCURVE.HCPYMODE 79614 . 80043) (\DRAWCIRCLE.HCPYMODE 80045 . 80440) ( +\DRAWELLIPSE.HCPYMODE 80442 . 80954) (\DSPFONT.HCPYMODE 80956 . 82112) (\DSPLEFTMARGIN.HCPYMODE 82114 + . 82698) (\DSPLINEFEED.HCPYMODE 82700 . 83110) (\DSPRIGHTMARGIN.HCPYMODE 83112 . 83741) ( +\DSPSPACEFACTOR.HCPYMODE 83743 . 84264) (\DSPXPOSITION.HCPYMODE 84266 . 84847) (\DSPYPOSITION.HCPYMODE + 84849 . 85254) (\MOVETO.HCPYMODE 85256 . 85408) (\FONTCREATE.HCPYMODE.PRESS 85410 . 86422) ( +\CREATECHARSET.HCPYMODE.PRESS 86424 . 87395) (\FONTCREATE.HCPYMODE.INTERPRESS 87397 . 88431) ( +\CREATECHARSET.HCPYMODE.INTERPRESS 88433 . 89421) (\STRINGWIDTH.HCPYMODE 89423 . 89857) ( +\HCPYMODEBLTCHAR 89859 . 92828) (\HCPYMODEDISPLAYINIT 92830 . 95761) (\HCPYMODEDSPPRINTCHAR 95763 . +97944) (\SLOWHCPYMODEBLTCHAR 97946 . 101460) (\SFFixY.HCPYMODE 101462 . 102959))))) STOP diff --git a/sources/HARDCOPY.LCOM b/sources/HARDCOPY.LCOM index b632a4fea..423b38bc7 100644 Binary files a/sources/HARDCOPY.LCOM and b/sources/HARDCOPY.LCOM differ diff --git a/sources/ICONW.LCOM b/sources/ICONW.LCOM index 4f41fd6e7..7ef23bc4f 100644 Binary files a/sources/ICONW.LCOM and b/sources/ICONW.LCOM differ diff --git a/sources/IMAGEIO.LCOM b/sources/IMAGEIO.LCOM index c7d762767..01e04e6be 100644 Binary files a/sources/IMAGEIO.LCOM and b/sources/IMAGEIO.LCOM differ diff --git a/sources/INSPECT b/sources/INSPECT index 705543964..6a1d6b355 100644 --- a/sources/INSPECT +++ b/sources/INSPECT @@ -1,14 +1,15 @@ -(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "21-Apr-2018 08:08:07" {DSK}kaplan>Local>medley3.5>lispcore>sources>INSPECT.;7 115481 +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS) +(FILECREATED "10-Jul-2021 20:31:23"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>INSPECT.;10 119111 - changes to%: (VARS INSPECTCOMS) + changes to%: (FNS RDTBL\NONOTHERCODES) - previous date%: "21-Apr-2018 07:33:25" -{DSK}kaplan>Local>medley3.5>lispcore>sources>INSPECT.;6) + previous date%: "10-Jul-2021 20:20:35" +{DSK}kaplan>Local>medley3.5>git-medley>sources>INSPECT.;9) (* ; " -Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1991, 1993, 1995, 1999, 2018 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1982-1987, 1990-1991, 1993, 1995, 1999, 2018, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT INSPECTCOMS) @@ -1530,18 +1531,22 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1991, 1993, 1995, 1999, (DECLARE%: EVAL@COMPILE -(PUTPROPS EVAL.AS.PROCESS.WITH.PROFILE MACRO - [ARGS (LET ((PROFILE (CAR ARGS)) - (FORM (CADR ARGS))) - `(EVAL.AS.PROCESS (LIST 'XCL:WITH-PROFILE (LIST 'QUOTE ,PROFILE) - ,FORM]) - -(PUTPROPS WITH-INSPECTOR-ENV MACRO - [ARGS (LET ((PROFILE (CAR ARGS)) - (FORMS (CDR ARGS))) - `(XCL:WITH-PROFILE ,PROFILE (LET ((*PRINT-LEVEL* (CAR INSPECTPRINTLEVEL)) - (*PRINT-LENGTH* (CDR INSPECTPRINTLEVEL))) - ,@FORMS]) +(PUTPROPS EVAL.AS.PROCESS.WITH.PROFILE MACRO + [ARGS (LET ((PROFILE (CAR ARGS)) + (FORM (CADR ARGS))) + `(EVAL.AS.PROCESS (LIST 'XCL:WITH-PROFILE (LIST 'QUOTE ,PROFILE) + ,FORM]) + +(PUTPROPS WITH-INSPECTOR-ENV MACRO [ARGS (LET ((PROFILE (CAR ARGS)) + (FORMS (CDR ARGS))) + `(XCL:WITH-PROFILE ,PROFILE + (LET ((*PRINT-LEVEL* (CAR + INSPECTPRINTLEVEL + )) + (*PRINT-LENGTH* (CDR + INSPECTPRINTLEVEL + ))) + ,@FORMS]) ) @@ -1839,7 +1844,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1991, 1993, 1995, 1999, (DEFINEQ (RDTBL\NONOTHERCODES - [LAMBDA (RT) (* ; "Edited 20-Apr-2018 17:08 by rmk:") + [LAMBDA (RT) (* ; "Edited 10-Jul-2021 20:31 by rmk:") (* ; "Edited 3-Feb-87 16:54 by jop") (* ;; "returns the character codes that are not OTHER.") @@ -1851,21 +1856,67 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1991, 1993, 1995, 1999, 'OTHER) (PUSH RESULT KEY] (fetch READSA of (\GTREADTABLE RT T))) - RESULT]) -(GETSYNTAXPROP - [LAMBDA (RDTBL CH) (* ; "Edited 3-Feb-87 16:49 by jop") + (* ;; "(RECORDFIELDNAMES 'READTABLEP)") - (* ;; "version of GETSYNTAX that has arguments in the right order for inspector") + (APPEND '(CASEINSENSITIVE COMMONLISP COMMONNUMSYNTAX DISPATCHMACRODEFS ESCAPECHAR ESCAPEFLG + HASHMACROCHAR MULTESCAPECHAR NUMBERBASE PACKAGECHAR READMACRODEFS + READMACROFLG READSA READTBLNAME USESILPACKAGE) + (SORT RESULT]) - (GETSYNTAX CH RDTBL]) +(GETSYNTAXPROP + [LAMBDA (RDTBL CH/FIELD) (* ; "Edited 10-Jul-2021 20:17 by rmk:") + + (* ;; "version of GETSYNTAX that has arguments in the right order for inspector, and also shows field names as well as character assignments") + + (SELECTQ CH/FIELD + (READSA (fetch (READTABLEP READSA) of RDTBL)) + (READMACRODEFS (fetch (READTABLEP READMACRODEFS) of RDTBL)) + (READMACROFLG (fetch (READTABLEP READMACROFLG) of RDTBL)) + (ESCAPEFLG (fetch (READTABLEP ESCAPEFLG) of RDTBL)) + (COMMONLISP (fetch (READTABLEP COMMONLISP) of RDTBL)) + (NUMBERBASE (fetch (READTABLEP NUMBERBASE) of RDTBL)) + (CASEINSENSITIVE + (fetch (READTABLEP CASEINSENSITIVE) of RDTBL)) + (COMMONNUMSYNTAX + (fetch (READTABLEP COMMONNUMSYNTAX) of RDTBL)) + (USESILPACKAGE (fetch (READTABLEP USESILPACKAGE) of RDTBL)) + (DISPATCHMACRODEFS + (fetch (READTABLEP DISPATCHMACRODEFS) of RDTBL)) + (HASHMACROCHAR (fetch (READTABLEP HASHMACROCHAR) of RDTBL)) + (ESCAPECHAR (fetch (READTABLEP ESCAPECHAR) of RDTBL)) + (MULTESCAPECHAR + (fetch (READTABLEP MULTESCAPECHAR) of RDTBL)) + (PACKAGECHAR (fetch (READTABLEP PACKAGECHAR) of RDTBL)) + (READTBLNAME (fetch (READTABLEP READTBLNAME) of RDTBL)) + (GETSYNTAX CH/FIELD RDTBL]) (SETSYNTAXPROP - [LAMBDA (RDTBL CH CLASS) (* ; "Edited 3-Feb-87 16:55 by jop") - - (* ;; "version of SETSYNTAX that has arguments in the right order for inspector") - - (SETSYNTAX CH CLASS RDTBL]) + [LAMBDA (RDTBL CH/FIELD VALUE) (* ; "Edited 10-Jul-2021 20:20 by rmk:") + + (* ;; "version of SETSYNTAX that has arguments in the right order for inspector, plus allows setting fields.") + + (SELECTQ CH/FIELD + (READSA (replace (READTABLEP READSA) of RDTBL with VALUE)) + (READMACRODEFS (replace (READTABLEP READMACRODEFS) of RDTBL with VALUE)) + (READMACROFLG (replace (READTABLEP READMACROFLG) of RDTBL with VALUE)) + (ESCAPEFLG (replace (READTABLEP ESCAPEFLG) of RDTBL with VALUE)) + (COMMONLISP (replace (READTABLEP COMMONLISP) of RDTBL with VALUE)) + (NUMBERBASE (replace (READTABLEP NUMBERBASE) of RDTBL with VALUE)) + (CASEINSENSITIVE + (replace (READTABLEP CASEINSENSITIVE) of RDTBL with VALUE)) + (COMMONNUMSYNTAX + (replace (READTABLEP COMMONNUMSYNTAX) of RDTBL with VALUE)) + (USESILPACKAGE (replace (READTABLEP USESILPACKAGE) of RDTBL with VALUE)) + (DISPATCHMACRODEFS + (replace (READTABLEP DISPATCHMACRODEFS) of RDTBL with VALUE)) + (HASHMACROCHAR (replace (READTABLEP HASHMACROCHAR) of RDTBL with VALUE)) + (ESCAPECHAR (replace (READTABLEP ESCAPECHAR) of RDTBL with VALUE)) + (MULTESCAPECHAR + (replace (READTABLEP MULTESCAPECHAR) of RDTBL with VALUE)) + (PACKAGECHAR (replace (READTABLEP PACKAGECHAR) of RDTBL with VALUE)) + (READTBLNAME (replace (READTABLEP READTBLNAME) of RDTBL with VALUE)) + (SETSYNTAX CH/FIELD VALUE RDTBL]) (GETTTBLPROP [LAMBDA (TTBL PROP) (* ; "Edited 3-Feb-87 16:50 by jop") @@ -2093,42 +2144,42 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1991, 1993, 1995, 1999, ("As Character array" '(8 \INSPECT.FETCH.CHAR \INSPECT.STORE.CHAR)) ("As Fat Character array" '(16 \INSPECT.FETCH.FATCHAR \INSPECT.STORE.FATCHAR]) (PUTPROPS INSPECT COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1990 1991 1993 -1995 1999 2018)) +1995 1999 2018 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (7014 42742 (INSPECTW.CREATE 7024 . 11779) (INSPECTW.REPAINTFN 11781 . 17317) ( -INSPECTW.REDISPLAY 17319 . 26191) (\INSPECTW.VALUE.MARGIN 26193 . 26596) (INSPECTW.REPLACE 26598 . -27306) (INSPECTW.SELECTITEM 27308 . 28298) (\INSPECTW.REDISPLAYPROP 28300 . 30730) (INSPECTW.FETCH -30732 . 31155) (INSPECTW.PROPERTIES 31157 . 31798) (DECODE.WINDOW.ARG 31800 . 33528) ( -DEFAULT.INSPECTW.PROPCOMMANDFN 33530 . 35548) (DEFAULT.INSPECTW.VALUECOMMANDFN 35550 . 36808) ( -DEFAULT.INSPECTW.TITLECOMMANDFN 36810 . 38500) (\SELITEM.FROM.PROPERTY 38502 . 38944) ( -\INSPECT.COMPUTE.TITLE 38946 . 40072) (LEVELEDFORM 40074 . 40793) (MAKEWITHINREGION 40795 . 42740)) ( -42743 60044 (ITEMW.REPAINTFN 42753 . 43973) (\ITEM.WINDOW.BUTTON.HANDLER 43975 . 44390) ( -\ITEM.WINDOW.SELECTION.HANDLER 44392 . 47059) (\INSPECTW.COMMAND.HANDLER 47061 . 51062) ( -ITEM.WINDOW.SET.STACK.ARG 51064 . 53268) (REPLACESTKARG 53270 . 54369) (IN/ITEM? 54371 . 55253) ( -\ITEMW.DESELECTITEM 55255 . 55519) (\ITEMW.SELECTITEM 55521 . 55783) (\ITEMW.CLEARSELECTION 55785 . -56140) (\ITEMW.FLIPITEM 56142 . 56615) (PRINTANDBOX 56617 . 59126) (PRINTATBOX 59128 . 59645) ( -ITEMOFPROPERTYVALUE 59647 . 60042)) (60045 63650 (\ITEM.WINDOW.COPY.HANDLER 60055 . 61776) ( -\ITEMW.FLIPCOPY 61778 . 62237) (BKSYSBUF.GENERAL 62239 . 63648)) (64042 86517 (INSPECT 64052 . 68315) -(\APPLYINSPECTMACRO 68317 . 69299) (INSPECT/BITMAP 69301 . 70336) (INSPECT/DATATYPE 70338 . 73581) ( -INSPECTABLEFIELDNAMES 73583 . 74104) (REMOVEDUPS 74106 . 74311) (INSPECT/ARRAY 74313 . 75350) ( -INSPECT/TOP/LEVEL/LIST 75352 . 76311) (INSPECT/PROPLIST 76313 . 77288) (NONSYSPROPNAMES 77290 . 77586) - (INSPECT/LISTP 77588 . 77910) (ALISTP 77912 . 78121) (PROPLISTP 78123 . 78763) (INSPECT/ALIST 78765 - . 79120) (ASSOCGET 79122 . 79333) (/ASSOCPUT 79335 . 79600) (INSPECT/PLIST 79602 . 79965) ( -INSPECT/TYPERECORD 79967 . 80207) (INSPECT/AS/RECORD 80209 . 81333) (SELECT.LIST.INSPECTOR 81335 . -83380) (STANDARDEDITE 83382 . 83665) (NTHTOPLEVELELT 83667 . 83983) (SETNTHTOPLEVELELT 83985 . 84745) -(DEDITE 84747 . 84954) (FINDRECDECL 84956 . 85539) (FINDSYSRECDECL 85541 . 85942) ( -MAKE-INSPECTOR-PROFILE 85944 . 86329) (CONFIRM-SET 86331 . 86515)) (87849 95938 (INSPECT/ATOM 87859 . -91839) (SELECT.ATOM.ASPECT 91841 . 92985) (INSPECT/AS/FUNCTION 92987 . 95273) (SELECT.FNS.EDITOR 95275 - . 95936)) (95979 101378 (INSPECTCODE 95989 . 97135) (\TEDIT.INSPECTCODE 97137 . 99095) ( -\INSPECT/CODE/RESHAPEFN 99097 . 100636) (\INSPECT/CODE/REPAINTFN 100638 . 101376)) (101416 102901 ( -INSPECT/HARRAYP 101426 . 102053) (HARRAYKEYS 102055 . 102434) (INSPECTW.GETHASH 102436 . 102663) ( -INSPECTW.PUTHASH 102665 . 102899)) (102950 106081 (RDTBL\NONOTHERCODES 102960 . 103643) (GETSYNTAXPROP - 103645 . 103884) (SETSYNTAXPROP 103886 . 104131) (GETTTBLPROP 104133 . 105051) (SETTTBLPROP 105053 . -106079)) (106560 114943 (INSPECT/AS/BLOCKRECORD 106570 . 107453) (INSPECT/TYPELESS 107455 . 108701) ( -LIST-ALL-BLOCKRECORDS 108703 . 108978) (INSPECT/HUNK 108980 . 111586) (\INSPECT.DATATYPE.RAW.FETCH -111588 . 111914) (\INSPECT.FETCH.8 111916 . 112065) (\INSPECT.FETCH.32 112067 . 112238) ( -\INSPECT.FETCH.CHAR 112240 . 112403) (\INSPECT.FETCH.FATCHAR 112405 . 112567) (\INSPECT.FETCH.PTR -112569 . 112740) (\INSPECT.STORE.8 112742 . 113048) (\INSPECT.STORE.16 113050 . 113350) ( -\INSPECT.STORE.32 113352 . 113787) (\INSPECT.STORE.CHAR 113789 . 114115) (\INSPECT.STORE.FATCHAR -114117 . 114439) (\INSPECT.STORE.PTR 114441 . 114788) (INSPECT/MAKE/CCODEP 114790 . 114941))))) + (FILEMAP (NIL (6999 42727 (INSPECTW.CREATE 7009 . 11764) (INSPECTW.REPAINTFN 11766 . 17302) ( +INSPECTW.REDISPLAY 17304 . 26176) (\INSPECTW.VALUE.MARGIN 26178 . 26581) (INSPECTW.REPLACE 26583 . +27291) (INSPECTW.SELECTITEM 27293 . 28283) (\INSPECTW.REDISPLAYPROP 28285 . 30715) (INSPECTW.FETCH +30717 . 31140) (INSPECTW.PROPERTIES 31142 . 31783) (DECODE.WINDOW.ARG 31785 . 33513) ( +DEFAULT.INSPECTW.PROPCOMMANDFN 33515 . 35533) (DEFAULT.INSPECTW.VALUECOMMANDFN 35535 . 36793) ( +DEFAULT.INSPECTW.TITLECOMMANDFN 36795 . 38485) (\SELITEM.FROM.PROPERTY 38487 . 38929) ( +\INSPECT.COMPUTE.TITLE 38931 . 40057) (LEVELEDFORM 40059 . 40778) (MAKEWITHINREGION 40780 . 42725)) ( +42728 60029 (ITEMW.REPAINTFN 42738 . 43958) (\ITEM.WINDOW.BUTTON.HANDLER 43960 . 44375) ( +\ITEM.WINDOW.SELECTION.HANDLER 44377 . 47044) (\INSPECTW.COMMAND.HANDLER 47046 . 51047) ( +ITEM.WINDOW.SET.STACK.ARG 51049 . 53253) (REPLACESTKARG 53255 . 54354) (IN/ITEM? 54356 . 55238) ( +\ITEMW.DESELECTITEM 55240 . 55504) (\ITEMW.SELECTITEM 55506 . 55768) (\ITEMW.CLEARSELECTION 55770 . +56125) (\ITEMW.FLIPITEM 56127 . 56600) (PRINTANDBOX 56602 . 59111) (PRINTATBOX 59113 . 59630) ( +ITEMOFPROPERTYVALUE 59632 . 60027)) (60030 63635 (\ITEM.WINDOW.COPY.HANDLER 60040 . 61761) ( +\ITEMW.FLIPCOPY 61763 . 62222) (BKSYSBUF.GENERAL 62224 . 63633)) (64027 86502 (INSPECT 64037 . 68300) +(\APPLYINSPECTMACRO 68302 . 69284) (INSPECT/BITMAP 69286 . 70321) (INSPECT/DATATYPE 70323 . 73566) ( +INSPECTABLEFIELDNAMES 73568 . 74089) (REMOVEDUPS 74091 . 74296) (INSPECT/ARRAY 74298 . 75335) ( +INSPECT/TOP/LEVEL/LIST 75337 . 76296) (INSPECT/PROPLIST 76298 . 77273) (NONSYSPROPNAMES 77275 . 77571) + (INSPECT/LISTP 77573 . 77895) (ALISTP 77897 . 78106) (PROPLISTP 78108 . 78748) (INSPECT/ALIST 78750 + . 79105) (ASSOCGET 79107 . 79318) (/ASSOCPUT 79320 . 79585) (INSPECT/PLIST 79587 . 79950) ( +INSPECT/TYPERECORD 79952 . 80192) (INSPECT/AS/RECORD 80194 . 81318) (SELECT.LIST.INSPECTOR 81320 . +83365) (STANDARDEDITE 83367 . 83650) (NTHTOPLEVELELT 83652 . 83968) (SETNTHTOPLEVELELT 83970 . 84730) +(DEDITE 84732 . 84939) (FINDRECDECL 84941 . 85524) (FINDSYSRECDECL 85526 . 85927) ( +MAKE-INSPECTOR-PROFILE 85929 . 86314) (CONFIRM-SET 86316 . 86500)) (88396 96485 (INSPECT/ATOM 88406 . +92386) (SELECT.ATOM.ASPECT 92388 . 93532) (INSPECT/AS/FUNCTION 93534 . 95820) (SELECT.FNS.EDITOR 95822 + . 96483)) (96526 101925 (INSPECTCODE 96536 . 97682) (\TEDIT.INSPECTCODE 97684 . 99642) ( +\INSPECT/CODE/RESHAPEFN 99644 . 101183) (\INSPECT/CODE/REPAINTFN 101185 . 101923)) (101963 103448 ( +INSPECT/HARRAYP 101973 . 102600) (HARRAYKEYS 102602 . 102981) (INSPECTW.GETHASH 102983 . 103210) ( +INSPECTW.PUTHASH 103212 . 103446)) (103497 109706 (RDTBL\NONOTHERCODES 103507 . 104527) (GETSYNTAXPROP + 104529 . 106027) (SETSYNTAXPROP 106029 . 107756) (GETTTBLPROP 107758 . 108676) (SETTTBLPROP 108678 . +109704)) (110185 118568 (INSPECT/AS/BLOCKRECORD 110195 . 111078) (INSPECT/TYPELESS 111080 . 112326) ( +LIST-ALL-BLOCKRECORDS 112328 . 112603) (INSPECT/HUNK 112605 . 115211) (\INSPECT.DATATYPE.RAW.FETCH +115213 . 115539) (\INSPECT.FETCH.8 115541 . 115690) (\INSPECT.FETCH.32 115692 . 115863) ( +\INSPECT.FETCH.CHAR 115865 . 116028) (\INSPECT.FETCH.FATCHAR 116030 . 116192) (\INSPECT.FETCH.PTR +116194 . 116365) (\INSPECT.STORE.8 116367 . 116673) (\INSPECT.STORE.16 116675 . 116975) ( +\INSPECT.STORE.32 116977 . 117412) (\INSPECT.STORE.CHAR 117414 . 117740) (\INSPECT.STORE.FATCHAR +117742 . 118064) (\INSPECT.STORE.PTR 118066 . 118413) (INSPECT/MAKE/CCODEP 118415 . 118566))))) STOP diff --git a/sources/INSPECT.LCOM b/sources/INSPECT.LCOM index 50004d581..6c0070cee 100644 Binary files a/sources/INSPECT.LCOM and b/sources/INSPECT.LCOM differ diff --git a/sources/INTERPRESS b/sources/INTERPRESS index e91dfb290..9e7837c08 100644 --- a/sources/INTERPRESS +++ b/sources/INTERPRESS @@ -1,15 +1,15 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "16-Apr-2018 21:56:38"  -{DSK}kaplan>Local>medley3.5>lispcore>sources>INTERPRESS.;6 226422 +(FILECREATED "27-Jun-2021 23:50:51"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>INTERPRESS.;9 226784 - changes to%: (VARS INTERPRESSCOMS) + changes to%: (FNS OPENIPSTREAM) - previous date%: "28-Jun-99 16:33:05" -{DSK}kaplan>Local>medley3.5>lispcore>sources>INTERPRESS.;3) + previous date%: "27-Jun-2021 23:40:47" +{DSK}kaplan>Local>medley3.5>git-medley>sources>INTERPRESS.;8) (* ; " -Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1993, 1999, 2018 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1983-1991, 1993, 1999, 2018, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT INTERPRESSCOMS) @@ -1478,7 +1478,7 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1993, 1999, (NEWPAGE.IP IPSTREAM]) (OPENIPSTREAM - [LAMBDA (IPFILE OPTIONS) (* ; "Edited 29-May-93 13:19 by rmk:") + [LAMBDA (IPFILE OPTIONS) (* ; "Edited 27-Jun-2021 23:50 by rmk:") (* ; "Edited 18-Aug-88 16:13 by hdj") (* ;; "Opens an interpress stream, which user can OUTCHAR to. The FONTS option can be a list of fonts to be set up in the preamble. Headings will be printed in the first font in that list. If that list is NIL, then the stream is initialized with the INTERPRESS DEFAULTFONT") @@ -1518,7 +1518,13 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1993, 1999, (* ;  "GETEOFPTR might bomb on some streams") )) - (replace (STREAM OUTCHARFN) of IPSTREAM with (FUNCTION INTERPRESS.OUTCHARFN)) + + (* ;; "We install a special external format to ensure that COPYCHARS won't do COPYBYTES when copying a from am a text file to an IP stream. Really only the outcharfn matters.") + + (\EXTERNALFORMAT IPSTREAM (CREATE EXTERNALFORMAT + NAME _ 'INTERPRESS + OUTCHARFN _ (FUNCTION INTERPRESS.OUTCHARFN) + EOL _ (FETCH (STREAM EOLCONVENTION) OF IPSTREAM))) (freplace (IPSTREAM IMAGEOPS) of IPSTREAM with \IPIMAGEOPS) (freplace (IPSTREAM IPDATA) of IPSTREAM with IPDATA) [COND @@ -4488,46 +4494,46 @@ Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1993, 1999, (LOADDEF 'BRUSH 'RECORDS 'IMAGEIO) ) (PUTPROPS INTERPRESS COPYRIGHT ("Venue & Xerox Corporation" 1983 1984 1985 1986 1987 1988 1989 1990 -1991 1993 1999 2018)) +1991 1993 1999 2018 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (13200 17741 (APPENDBYTE.IP 13210 . 13346) (APPENDIDENTIFIER.IP 13348 . 13739) ( -APPENDINT.IP 13741 . 14192) (APPENDINTEGER.IP 14194 . 14619) (APPENDLARGEVECTOR.IP 14621 . 15421) ( -APPENDNUMBER.IP 15423 . 15779) (APPENDOP.IP 15781 . 16220) (APPENDRATIONAL.IP 16222 . 16578) ( -APPENDSEQUENCEDESCRIPTOR.IP 16580 . 17564) (BYTESININT.IP 17566 . 17739)) (17777 55249 (ARCTO.IP 17787 - . 18993) (BEGINMASTER.IP 18995 . 19149) (BEGINPAGE.IP 19151 . 19387) (BEGINPREAMBLE.IP 19389 . 19640) - (CLIPRECTANGLE.IP 19642 . 20009) (CONCAT.IP 20011 . 20157) (CONCATT.IP 20159 . 20307) (ENDMASTER.IP -20309 . 20632) (ENDPAGE.IP 20634 . 20891) (ENDPREAMBLE.IP 20893 . 21717) (FGET.IP 21719 . 21903) ( -FILLRECTANGLE.IP 21905 . 24116) (FILLTRAJECTORY.IP 24118 . 24615) (FILLNGON.IP 24617 . 27014) (FSET.IP - 27016 . 27200) (GETFRAMEVAR.IP 27202 . 27520) (INITIALIZEMASTER.IP 27522 . 27979) (INITIALIZECOLOR.IP - 27981 . 29149) (ISET.IP 29151 . 29403) (GETCP.IP 29405 . 29595) (LINETO.IP 29597 . 30107) ( -MASKSTROKE.IP 30109 . 30263) (MOVETO.IP 30265 . 30483) (ROTATE.IP 30485 . 30668) (SCALE.IP 30670 . -30854) (SCALE2.IP 30856 . 31074) (SETCOLOR.IP 31076 . 33222) (SETRGB.IP 33224 . 34142) (SETCOLORLV.IP -34144 . 38644) (SETCOLOR16.IP 38646 . 41592) (SETFONT.IP 41594 . 42290) (SETSPACE.IP 42292 . 42485) ( -SETXREL.IP 42487 . 43814) (SETX.IP 43816 . 45461) (SETXY.IP 45463 . 46965) (SETXYREL.IP 46967 . 48556) - (SETY.IP 48558 . 50147) (SETYREL.IP 50149 . 51343) (SHOW.IP 51345 . 54397) (TRAJECTORY.IP 54399 . -54797) (TRANS.IP 54799 . 55019) (TRANSLATE.IP 55021 . 55247)) (55280 61308 (\CHANGE-VISIBLE-REGION.IP -55290 . 58951) (\PAPERSIZE.IP 58953 . 59774) (HEADINGOP.IP 59776 . 61306)) (61309 166856 ( -DEFINEFONT.IP 61319 . 62185) (FONTNAME.IP 62187 . 63117) (INTERPRESS.BITMAPSCALE 63119 . 63681) ( -INTERPRESS.OUTCHARFN 63683 . 69855) (INTERPRESSFILEP 69857 . 71018) (MAKEINTERPRESS 71020 . 71204) ( -NEWLINE.IP 71206 . 71938) (NEWPAGE.IP 71940 . 76906) (NEWPAGE?.IP 76908 . 77387) (OPENIPSTREAM 77389 - . 85103) (SETUPFONTS.IP 85105 . 86097) (SHOWBITMAP.IP 86099 . 90761) (\BITMAPSIZE.IP 90763 . 91540) ( -SHOWBITMAP1.IP 91542 . 95824) (SHOWSHADE.IP 95826 . 96623) (\BITBLT.IP 96625 . 100829) ( -\SCALEDBITBLT.IP 100831 . 104476) (\BLTSHADE.IP 104478 . 105815) (\CHARWIDTH.IP 105817 . 106267) ( -\CLOSEIPSTREAM 106269 . 106596) (\DRAWARC.IP 106598 . 107045) (\DRAWCURVE.IP 107047 . 109343) ( -\DRAWPOINT.IP 109345 . 110382) (\DSPCOLOR.IP 110384 . 111335) (ENSURE.RGB 111337 . 112001) (\IPCURVE2 -112003 . 126512) (\CLIPCURVELINE.IP 126514 . 131212) (\DRAWLINE.IP 131214 . 134796) (\CLIPLINE 134798 - . 139498) (\DSPBOTTOMMARGIN.IP 139500 . 139916) (\DSPFONT.IP 139918 . 145502) (\DSPLEFTMARGIN.IP -145504 . 145964) (\DSPLINEFEED.IP 145966 . 146633) (\DSPRIGHTMARGIN.IP 146635 . 147432) ( -\DSPSPACEFACTOR.IP 147434 . 148519) (\DSPTOPMARGIN.IP 148521 . 148957) (\DSPXPOSITION.IP 148959 . -149946) (\DSPROTATE.IP 149948 . 150126) (\PUSHSTATE.IP 150128 . 150890) (\POPSTATE.IP 150892 . 151397) - (\DEFAULTSTATE.IP 151399 . 151632) (\DSPTRANSLATE.IP 151634 . 151815) (\DSPSCALE2.IP 151817 . 151992) - (\DSPYPOSITION.IP 151994 . 152295) (FILLCIRCLE.IP 152297 . 153380) (\FILLPOLYGON.IP 153382 . 154607) -(\DRAWPOLYGON.IP 154609 . 160880) (\FIXLINELENGTH.IP 160882 . 162096) (\MOVETO.IP 162098 . 162462) ( -\SETBRUSH.IP 162464 . 164474) (\STRINGWIDTH.IP 164476 . 164879) (\DSPCLIPPINGREGION.IP 164881 . 166057 -) (\DSPOPERATION.IP 166059 . 166854)) (167048 167803 (IP-TOS 167058 . 167318) (POP-IP-STACK 167320 . -167615) (PUSH-IP-STACK 167617 . 167801)) (167864 180428 (\CREATECHARSET.IP 167874 . 179665) ( -\CHANGECHARSET.IP 179667 . 180426)) (180429 185034 (\INTERPRESSINIT 180439 . 185032)) (185035 185593 ( -SCALEREGION 185045 . 185591)) (211509 213815 (INTERPRESSBITMAP 211519 . 213813)) (216047 222703 (NSMAP - 216057 . 216639) (\COERCEASCIITONSFONT 216641 . 220495) (\CREATEINTERPRESSFONT 220497 . 222362) ( -\SEARCHINTERPRESSFONTS 222364 . 222701))))) + (FILEMAP (NIL (13144 17685 (APPENDBYTE.IP 13154 . 13290) (APPENDIDENTIFIER.IP 13292 . 13683) ( +APPENDINT.IP 13685 . 14136) (APPENDINTEGER.IP 14138 . 14563) (APPENDLARGEVECTOR.IP 14565 . 15365) ( +APPENDNUMBER.IP 15367 . 15723) (APPENDOP.IP 15725 . 16164) (APPENDRATIONAL.IP 16166 . 16522) ( +APPENDSEQUENCEDESCRIPTOR.IP 16524 . 17508) (BYTESININT.IP 17510 . 17683)) (17721 55193 (ARCTO.IP 17731 + . 18937) (BEGINMASTER.IP 18939 . 19093) (BEGINPAGE.IP 19095 . 19331) (BEGINPREAMBLE.IP 19333 . 19584) + (CLIPRECTANGLE.IP 19586 . 19953) (CONCAT.IP 19955 . 20101) (CONCATT.IP 20103 . 20251) (ENDMASTER.IP +20253 . 20576) (ENDPAGE.IP 20578 . 20835) (ENDPREAMBLE.IP 20837 . 21661) (FGET.IP 21663 . 21847) ( +FILLRECTANGLE.IP 21849 . 24060) (FILLTRAJECTORY.IP 24062 . 24559) (FILLNGON.IP 24561 . 26958) (FSET.IP + 26960 . 27144) (GETFRAMEVAR.IP 27146 . 27464) (INITIALIZEMASTER.IP 27466 . 27923) (INITIALIZECOLOR.IP + 27925 . 29093) (ISET.IP 29095 . 29347) (GETCP.IP 29349 . 29539) (LINETO.IP 29541 . 30051) ( +MASKSTROKE.IP 30053 . 30207) (MOVETO.IP 30209 . 30427) (ROTATE.IP 30429 . 30612) (SCALE.IP 30614 . +30798) (SCALE2.IP 30800 . 31018) (SETCOLOR.IP 31020 . 33166) (SETRGB.IP 33168 . 34086) (SETCOLORLV.IP +34088 . 38588) (SETCOLOR16.IP 38590 . 41536) (SETFONT.IP 41538 . 42234) (SETSPACE.IP 42236 . 42429) ( +SETXREL.IP 42431 . 43758) (SETX.IP 43760 . 45405) (SETXY.IP 45407 . 46909) (SETXYREL.IP 46911 . 48500) + (SETY.IP 48502 . 50091) (SETYREL.IP 50093 . 51287) (SHOW.IP 51289 . 54341) (TRAJECTORY.IP 54343 . +54741) (TRANS.IP 54743 . 54963) (TRANSLATE.IP 54965 . 55191)) (55224 61252 (\CHANGE-VISIBLE-REGION.IP +55234 . 58895) (\PAPERSIZE.IP 58897 . 59718) (HEADINGOP.IP 59720 . 61250)) (61253 167213 ( +DEFINEFONT.IP 61263 . 62129) (FONTNAME.IP 62131 . 63061) (INTERPRESS.BITMAPSCALE 63063 . 63625) ( +INTERPRESS.OUTCHARFN 63627 . 69799) (INTERPRESSFILEP 69801 . 70962) (MAKEINTERPRESS 70964 . 71148) ( +NEWLINE.IP 71150 . 71882) (NEWPAGE.IP 71884 . 76850) (NEWPAGE?.IP 76852 . 77331) (OPENIPSTREAM 77333 + . 85460) (SETUPFONTS.IP 85462 . 86454) (SHOWBITMAP.IP 86456 . 91118) (\BITMAPSIZE.IP 91120 . 91897) ( +SHOWBITMAP1.IP 91899 . 96181) (SHOWSHADE.IP 96183 . 96980) (\BITBLT.IP 96982 . 101186) ( +\SCALEDBITBLT.IP 101188 . 104833) (\BLTSHADE.IP 104835 . 106172) (\CHARWIDTH.IP 106174 . 106624) ( +\CLOSEIPSTREAM 106626 . 106953) (\DRAWARC.IP 106955 . 107402) (\DRAWCURVE.IP 107404 . 109700) ( +\DRAWPOINT.IP 109702 . 110739) (\DSPCOLOR.IP 110741 . 111692) (ENSURE.RGB 111694 . 112358) (\IPCURVE2 +112360 . 126869) (\CLIPCURVELINE.IP 126871 . 131569) (\DRAWLINE.IP 131571 . 135153) (\CLIPLINE 135155 + . 139855) (\DSPBOTTOMMARGIN.IP 139857 . 140273) (\DSPFONT.IP 140275 . 145859) (\DSPLEFTMARGIN.IP +145861 . 146321) (\DSPLINEFEED.IP 146323 . 146990) (\DSPRIGHTMARGIN.IP 146992 . 147789) ( +\DSPSPACEFACTOR.IP 147791 . 148876) (\DSPTOPMARGIN.IP 148878 . 149314) (\DSPXPOSITION.IP 149316 . +150303) (\DSPROTATE.IP 150305 . 150483) (\PUSHSTATE.IP 150485 . 151247) (\POPSTATE.IP 151249 . 151754) + (\DEFAULTSTATE.IP 151756 . 151989) (\DSPTRANSLATE.IP 151991 . 152172) (\DSPSCALE2.IP 152174 . 152349) + (\DSPYPOSITION.IP 152351 . 152652) (FILLCIRCLE.IP 152654 . 153737) (\FILLPOLYGON.IP 153739 . 154964) +(\DRAWPOLYGON.IP 154966 . 161237) (\FIXLINELENGTH.IP 161239 . 162453) (\MOVETO.IP 162455 . 162819) ( +\SETBRUSH.IP 162821 . 164831) (\STRINGWIDTH.IP 164833 . 165236) (\DSPCLIPPINGREGION.IP 165238 . 166414 +) (\DSPOPERATION.IP 166416 . 167211)) (167405 168160 (IP-TOS 167415 . 167675) (POP-IP-STACK 167677 . +167972) (PUSH-IP-STACK 167974 . 168158)) (168221 180785 (\CREATECHARSET.IP 168231 . 180022) ( +\CHANGECHARSET.IP 180024 . 180783)) (180786 185391 (\INTERPRESSINIT 180796 . 185389)) (185392 185950 ( +SCALEREGION 185402 . 185948)) (211866 214172 (INTERPRESSBITMAP 211876 . 214170)) (216404 223060 (NSMAP + 216414 . 216996) (\COERCEASCIITONSFONT 216998 . 220852) (\CREATEINTERPRESSFONT 220854 . 222719) ( +\SEARCHINTERPRESSFONTS 222721 . 223058))))) STOP diff --git a/sources/INTERPRESS.LCOM b/sources/INTERPRESS.LCOM index e238b82a4..0915e9218 100644 Binary files a/sources/INTERPRESS.LCOM and b/sources/INTERPRESS.LCOM differ diff --git a/sources/JAPANESE b/sources/JAPANESE new file mode 100644 index 000000000..9823275e8 --- /dev/null +++ b/sources/JAPANESE @@ -0,0 +1,1173 @@ +(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") +(FILECREATED "23-Jun-2021 16:58:07"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>JAPANESE.;6 64773 + + changes to%: (FNS \CREATE.JIS.EXTERNALFORMAT \CREATE.SHIFTJIS.EXTERNALFORMAT + \CREATE.EUC.EXTERNALFORMAT) + + previous date%: "15-Jun-2021 15:26:08" +{DSK}kaplan>Local>medley3.5>git-medley>sources>JAPANESE.;5) + + +(PRETTYCOMPRINT JAPANESECOMS) + +(RPAQQ JAPANESECOMS + [ (* ; "XCCS to JIS converter") + [COMS (* ; "JIS to XCCS conversion table.") + (VARS *JIS-TO-XCCS-CONV-NO-FONT-TABLE* *JIS-TO-XCCS-CODE-MAP* + *HANKAKU-TO-ZENKAKU-CODE-MAP*) + (GLOBALVARS *JIS-TO-XCCS-CONV-NO-FONT-TABLE* *JIS-TO-XCCS-CONV-TABLE-LIST* + *JIS-TO-XCCS-CODE-MAP* *HANKAKU-TO-ZENKAKU-CODE-MAP* + *JIS-1KU-TO-XCCS-CONV-TABLE* *JIS-2KU-TO-XCCS-CONV-TABLE* + *JIS-6KU-TO-XCCS-CONV-TABLE* *XCCS-TO-JIS-CONV-TABLE* + *HANKAKU-TO-ZENKAKU-CONV-TABLE* *ZENKAKU-TO-HANKAKU-CONV-TABLE*) + (FNS \MAKE.JIS.TO.XCCS.CONV.TABLE) + (DECLARE%: DONTEVAL@LOAD DOCOPY (P (\MAKE.JIS.TO.XCCS.CONV.TABLE] + (DECLARE%: DOEVAL@COMPILE DONTCOPY (EXPORT (MACROS \CONV.JIS.TO.XCCS \DO.CONV.JIS.TO.XCCS))) + (FNS \JISIN \JISPEEK \BACKJISCHAR \SHIFTJISIN \SHIFTJISPEEK \BACKSHIFTJISCHAR \EUCIN \EUCPEEK + \BACKEUCCHAR) + (FNS \JISOUTCHARFN \SHIFTJISOUTCHARFN \EUCOUTCHARFN) + [COMS (FNS CONVHANKAKU) + (DECLARE%: DOEVAL@COMPILE DONTCOPY (EXPORT (MACROS \CONV.XCCS.TO.JIS + \DO.CONV.XCCS.TO.JIS \ASCIIP + \NOT.EQUIVALENT.TO.JIS + \CONV.HANKAKU.TO.ZENKAKUP + \CONV.ZENKAKU.KANA] + (DECLARE%: DOEVAL@COMPILE DONTCOPY + + (* ;; "JIS specific macro") + + (MACROS \EXTRACT.NO.FONT.CODE \EXTARACT.CONV.TABLE \NOT.EQUIVALENT.TO.XCCS + \EXTRACT.SET \EXTRACT.CODE \CHNAGE.KI.MODE \KIMODEP \HANKAKUP \KANJIP + \NOTGAIJIP \INVALID.TENP \CONV.HANKAKU.KANA \OUTKI \OUTKO) + + (* ;; "Shift-JIS specific macro") + + (MACROS \CONV.SJIS.TO.JIS \CONV.JIS.TO.SJIS \SJIS.KANJI.FIRST.BYTEP) + + (* ;; "EUC specific macro") + + (MACROS \EUC.KANJI.FIRST.BYTEP \GAIJIP \EUC.HANKAKUP)) + (FNS \CREATE.JIS.EXTERNALFORMAT \CREATE.SHIFTJIS.EXTERNALFORMAT \CREATE.EUC.EXTERNALFORMAT) + (DECLARE%: DONTEVAL@LOAD DOCOPY (P (\CREATE.JIS.EXTERNALFORMAT) + (\CREATE.SHIFTJIS.EXTERNALFORMAT) + (\CREATE.EUC.EXTERNALFORMAT))) + [DECLARE%: EVAL@COMPILE DONTCOPY (P (OR (GETP 'EXPORTS.ALL 'FILE) + (PRINT + "NOTE: JAPANESE requires EXPORTS.ALL for compilation" + T] + (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) + (NLAML) + (LAMA CONVHANKAKU]) + + + +(* ; "XCCS to JIS converter") + + + + +(* ; "JIS to XCCS conversion table.") + + +(RPAQQ *JIS-TO-XCCS-CONV-NO-FONT-TABLE* + ((8484 . 8484) + (8485 . 8485) + (8497 . 9155) + (8798 . 61376) + (8802 . 8802) + (8805 . 64892) + (8806 . 64894) + (8820 . 9148) + (8821 . 9132) + (8822 . 213) + (8830 . 8830) + (10273 . 61189) + (10274 . 61188) + (10275 . 10275) + (10276 . 10276) + (10277 . 10277) + (10278 . 10278) + (10279 . 10279) + (10280 . 10280) + (10281 . 10281) + (10282 . 10282) + (10283 . 61414) + (10284 . 61410) + (10285 . 61409) + (10286 . 10286) + (10287 . 10287) + (10288 . 10288) + (10289 . 10289) + (10290 . 10290) + (10291 . 10291) + (10292 . 10292) + (10293 . 10293) + (10294 . 61411) + (10295 . 10295) + (10296 . 10296) + (10297 . 10297) + (10298 . 10298) + (10299 . 10299) + (10300 . 10300) + (10301 . 10301) + (10302 . 10302) + (10303 . 10303) + (10304 . 10304))) + +(RPAQQ *JIS-TO-XCCS-CODE-MAP* + ((1 (1 33 . 33) + (2 33 . 34) + (3 33 . 35) + (6 0 . 183) + (7 0 . 58) + (8 0 . 59) + (9 0 . 63) + (10 0 . 33) + (11 33 . 43) + (12 33 . 44) + (13 0 . 194) + (14 0 . 193) + (15 0 . 200) + (16 0 . 195) + (18 0 . 204) + (19 33 . 51) + (20 33 . 52) + (21 33 . 53) + (22 33 . 54) + (23 33 . 55) + (24 33 . 56) + (25 33 . 57) + (26 33 . 58) + (27 33 . 59) + (28 33 . 60) + (29 239 . 36) + (30 33 . 62) + (31 0 . 47) + (32 0 . 92) + (33 0 . 126) + (34 33 . 66) + (35 0 . 124) + (36 33 . 68) + (37 33 . 69) + (38 0 . 169) + (39 0 . 39) + (40 0 . 170) + (41 0 . 186) + (42 0 . 40) + (43 0 . 41) + (44 33 . 76) + (45 33 . 77) + (46 0 . 91) + (47 0 . 93) + (48 0 . 123) + (49 0 . 125) + (50 239 . 50) + (51 239 . 51) + (52 0 . 171) + (53 0 . 187) + (54 33 . 86) + (55 33 . 87) + (56 33 . 88) + (57 33 . 89) + (58 33 . 90) + (59 33 . 91) + (60 0 . 43) + (61 0 . 45) + (62 0 . 177) + (63 0 . 180) + (64 0 . 184) + (65 0 . 61) + (66 33 . 98) + (67 0 . 60) + (68 0 . 62) + (69 33 . 101) + (70 33 . 102) + (71 33 . 103) + (72 33 . 104) + (73 33 . 105) + (74 33 . 106) + (75 0 . 176) + (76 33 . 108) + (77 33 . 109) + (78 33 . 110) + (79 0 . 165) + (80 0 . 164) + (81 0 . 162) + (82 0 . 163) + (83 0 . 37) + (84 0 . 35) + (85 0 . 38) + (86 0 . 42) + (87 0 . 64) + (88 0 . 167) + (89 33 . 121) + (90 33 . 122) + (91 33 . 123) + (92 33 . 124) + (93 33 . 125) + (94 33 . 126)) + (2 (1 34 . 33) + (2 34 . 34) + (3 34 . 35) + (4 34 . 36) + (5 34 . 37) + (6 34 . 38) + (7 34 . 39) + (8 34 . 40) + (9 34 . 41) + (10 0 . 174) + (11 0 . 172) + (12 0 . 173) + (13 0 . 175) + (14 34 . 46) + (26 239 . 74) + (27 239 . 76) + (28 239 . 89) + (29 239 . 88) + (30 239 . 91) + (31 239 . 90) + (32 239 . 87) + (33 239 . 86) + (42 239 . 182) + (43 239 . 183) + (44 239 . 106) + (45 239 . 79) + (46 239 . 78) + (47 239 . 181) + (48 239 . 180) + (60 239 . 108) + (61 239 . 112) + (63 239 . 186) + (64 239 . 185) + (65 239 . 114) + (67 239 . 66) + (68 239 . 67) + (71 239 . 113) + (72 239 . 111) + (73 239 . 117) + (74 34 . 106) + (82 241 . 40) + (83 239 . 65) + (87 239 . 48) + (88 239 . 49) + (89 0 . 176)) + (6 (1 38 . 65) + (2 38 . 66) + (3 38 . 68) + (4 38 . 69) + (5 38 . 70) + (6 38 . 73) + (7 38 . 74) + (8 38 . 75) + (9 38 . 76) + (10 38 . 77) + (11 38 . 78) + (12 38 . 79) + (13 38 . 80) + (14 38 . 81) + (15 38 . 82) + (16 38 . 83) + (17 38 . 85) + (18 38 . 86) + (19 38 . 88) + (20 38 . 89) + (21 38 . 90) + (22 38 . 91) + (23 38 . 92) + (24 38 . 93) + (33 38 . 97) + (34 38 . 98) + (35 38 . 100) + (36 38 . 101) + (37 38 . 102) + (38 38 . 105) + (39 38 . 106) + (40 38 . 107) + (41 38 . 108) + (42 38 . 109) + (43 38 . 110) + (44 38 . 111) + (45 38 . 112) + (46 38 . 113) + (47 38 . 114) + (48 38 . 115) + (49 38 . 117) + (50 38 . 118) + (51 38 . 120) + (52 38 . 121) + (53 38 . 122) + (54 38 . 123) + (55 38 . 124) + (56 38 . 125)))) + +(RPAQQ *HANKAKU-TO-ZENKAKU-CODE-MAP* + ((161 . 8483) + (162 . 8534) + (163 . 8535) + (164 . 8482) + (165 . 183) + (166 . 9586) + (167 . 9505) + (168 . 9507) + (169 . 9509) + (170 . 9511) + (171 . 9513) + (172 . 9571) + (173 . 9573) + (174 . 9575) + (175 . 9539) + (176 . 8508) + (177 . 9506) + (178 . 9508) + (179 . 9510) + (180 . 9512) + (181 . 9514) + (182 . 9515) + (183 . 9517) + (184 . 9519) + (185 . 9521) + (186 . 9523) + (187 . 9525) + (188 . 9527) + (189 . 9529) + (190 . 9531) + (191 . 9533) + (192 . 9535) + (193 . 9537) + (194 . 9540) + (195 . 9542) + (196 . 9544) + (197 . 9546) + (198 . 9547) + (199 . 9548) + (200 . 9549) + (201 . 9550) + (202 . 9551) + (203 . 9554) + (204 . 9557) + (205 . 9560) + (206 . 9563) + (207 . 9566) + (208 . 9567) + (209 . 9568) + (210 . 9569) + (211 . 9570) + (212 . 9572) + (213 . 9574) + (214 . 9576) + (215 . 9577) + (216 . 9578) + (217 . 9579) + (218 . 9580) + (219 . 9581) + (220 . 9583) + (221 . 9587) + (222 . 8491) + (223 . 8492))) +(DECLARE%: DOEVAL@COMPILE DONTCOPY + +(GLOBALVARS *JIS-TO-XCCS-CONV-NO-FONT-TABLE* *JIS-TO-XCCS-CONV-TABLE-LIST* *JIS-TO-XCCS-CODE-MAP* + *HANKAKU-TO-ZENKAKU-CODE-MAP* *JIS-1KU-TO-XCCS-CONV-TABLE* *JIS-2KU-TO-XCCS-CONV-TABLE* + *JIS-6KU-TO-XCCS-CONV-TABLE* *XCCS-TO-JIS-CONV-TABLE* *HANKAKU-TO-ZENKAKU-CONV-TABLE* + *ZENKAKU-TO-HANKAKU-CONV-TABLE*) +) +(DEFINEQ + +(\MAKE.JIS.TO.XCCS.CONV.TABLE + [LAMBDA NIL (* ; "Edited 20-Feb-91 19:28 by nm") + +(* ;;; "The JIS codes which are not equivalent to XCCS reside in 1, 2, 3, 6, 8 and 84 KU. In case of 3 and 84 KU, the corresponding XCCS is calicutated from JIS. In case of 1,2 and 6 KU, we have to prepare conversion tables for each because the mapping between XCCS and JIS are random. 8 KU is treated specially because no displayable font is assigned for 8 KU in XCCS. They are handled with *JIS-TO-XCCS-CONV-NO-FONT-TABLE*.") + +(* ;;; "Each conversion table is an byte array of size 188 (94 * 2). 94 is a largest number of TEN. TEN is one origin. Each JIS code is represented with two bytes in the table. The first byte is a character set and the second byte is a character code in XCCS. If both of the first byte and the second byte are 255, it means the JIS code is not defined for the entry. If the first byte is 255 and the second byte is 0, it means a JIS code is defined for the entry and there is a XCCS code corresponding to the JIS code, but no displayable font is assigned for the code in XCCS. In the last case, the real XCCS code is found in *JIS-TO-XCCS-CONV-NO-FONT-TABLE*.") + +(* ;;; "*HANKAKU-TO-ZENKAKU-CONV-TABLE* holds the mapping between JIS HANAKAKU-KANA code to XCCS. XCCS does not support HANKAKU code.") + + (SETQ *JIS-1KU-TO-XCCS-CONV-TABLE* (ARRAY 188 'BYTE 255)) + (SETQ *JIS-2KU-TO-XCCS-CONV-TABLE* (ARRAY 188 'BYTE 255)) + (SETQ *JIS-6KU-TO-XCCS-CONV-TABLE* (ARRAY 188 'BYTE 255)) + (SETQ *XCCS-TO-JIS-CONV-TABLE* (HASHARRAY 256)) + (SETQ *HANKAKU-TO-ZENKAKU-CONV-TABLE* (HASHARRAY 64)) + (SETQ *ZENKAKU-TO-HANKAKU-CONV-TABLE* (HASHARRAY 64)) + (CL:DO ((TABLES (LIST *JIS-1KU-TO-XCCS-CONV-TABLE* *JIS-2KU-TO-XCCS-CONV-TABLE* + *JIS-6KU-TO-XCCS-CONV-TABLE*) + (CDR TABLES)) + (KU '(1 2 6) + (CDR KU)) + CODEMAP) + ((CL:ENDP TABLES)) + (SETQ CODEMAP (CDR (ASSOC (CAR KU) + *JIS-TO-XCCS-CODE-MAP*))) + (for MAP in CODEMAP do (SETA (CAR TABLES) + (IDIFFERENCE (UNFOLD (CAR MAP) + 2) + 1) + (CADR MAP)) + (SETA (CAR TABLES) + (UNFOLD (CAR MAP) + 2) + (CDDR MAP)))) + (bind KU TEN TABLE for ENTRY in *JIS-TO-XCCS-CONV-NO-FONT-TABLE* + do (SETQ KU (IDIFFERENCE (FOLDLO (CAR ENTRY) + 256) + 32)) + (SETQ TABLE (SELECTQ KU + (1 *JIS-1KU-TO-XCCS-CONV-TABLE*) + (2 *JIS-2KU-TO-XCCS-CONV-TABLE*) + (6 *JIS-6KU-TO-XCCS-CONV-TABLE*) + NIL)) + (AND TABLE (SETA TABLE (UNFOLD (IDIFFERENCE (LOGAND 255 (CAR ENTRY)) + 32) + 2) + 0))) + (for MAP in *HANKAKU-TO-ZENKAKU-CODE-MAP* do (PUTHASH (CAR MAP) + (CDR MAP) + *HANKAKU-TO-ZENKAKU-CONV-TABLE*)) + (for MAP in *HANKAKU-TO-ZENKAKU-CODE-MAP* do (PUTHASH (CDR MAP) + (CAR MAP) + *ZENKAKU-TO-HANKAKU-CONV-TABLE*)) + (for MAP + in (APPEND [for KU in *JIS-TO-XCCS-CODE-MAP* + join (for TEN in (CDR KU) + collect `(,(LOGOR (UNFOLD (CADR TEN) + 256) + (CDDR TEN)) + \, + (LOGOR (UNFOLD (IPLUS (CAR KU) + 32) + 256) + (IPLUS (CAR TEN) + 32] + *JIS-TO-XCCS-CONV-NO-FONT-TABLE*) do (PUTHASH (CAR MAP) + (CDR MAP) + *XCCS-TO-JIS-CONV-TABLE*)) + (SETQ *JIS-TO-XCCS-CONV-TABLE-LIST* `((33 \, *JIS-1KU-TO-XCCS-CONV-TABLE*) + (34 \, *JIS-2KU-TO-XCCS-CONV-TABLE*) + (38 \, *JIS-6KU-TO-XCCS-CONV-TABLE*]) +) +(DECLARE%: DONTEVAL@LOAD DOCOPY + +(\MAKE.JIS.TO.XCCS.CONV.TABLE) +) +(DECLARE%: DOEVAL@COMPILE DONTCOPY +(* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE + +(PUTPROPS \CONV.JIS.TO.XCCS MACRO [OPENLAMBDA (KU TEN) + +(* ;;; "Some character code is not equivalent between JIS and XCCS. In such case, we have to convert the character to corresponding XCCS.") + + (COND + ((\NOT.EQUIVALENT.TO.XCCS KU) + (\DO.CONV.JIS.TO.XCCS KU TEN)) + (T (LOGOR (UNFOLD KU 256) + TEN]) + +(PUTPROPS \DO.CONV.JIS.TO.XCCS MACRO + [(KU TEN) + +(* ;;; " Convert a JIS code divided into KU (high 8 bit) and TEN (low 8 bit) to an corresponding XCCS code.") + + (COND + ((\INVALID.TENP TEN) + *DEFAULT-NOT-CONVERTED-FAT-CODE*) + (T (SELECTQ KU + ((33 34 38) (* ; "1, 2 and 6 KU") + [LET* ((CONVTABLE (\EXTARACT.CONV.TABLE KU)) + (SET (\EXTRACT.SET TEN CONVTABLE)) + (CODE (\EXTRACT.CODE TEN CONVTABLE))) + (COND + ((NEQ SET 255) + (LOGOR (UNFOLD SET 256) + CODE)) + (T (COND + ((EQ CODE 255) (* ; "Not defined in JIS.") + *DEFAULT-NOT-CONVERTED-FAT-CODE*) + (T (* ; + "Defined in JIS but the displayable font is not assigned in the corresponding code in XCCS.") + (COND + (*REPLACE-NO-FONT-CODE* + *DEFAULT-NOT-CONVERTED-FAT-CODE*) + (T (\EXTRACT.NO.FONT.CODE (LOGOR (UNFOLD KU 256) + TEN]) + (35 (* ; "3 KU") + (* ; + "Alpha numeric codes are all defined as single byte codes in XCCS.") + TEN) + (40 (* ; "8 KU") + (COND + [(< 0 TEN 33) + (COND + (*REPLACE-NO-FONT-CODE* *DEFAULT-NOT-CONVERTED-FAT-CODE*) + (T (\EXTRACT.NO.FONT.CODE (LOGOR KU TEN] + (T *DEFAULT-NOT-CONVERTED-FAT-CODE*))) + (116 (* ; "84 KU") + (COND + ((< 0 TEN 5) + (LOGOR 29952 TEN)) + (T *DEFAULT-NOT-CONVERTED-FAT-CODE*))) + (117 (* ; "85 KU") + (COND + ((< 0 TEN 28) + (LOGOR 29696 TEN)) + (T *DEFAULT-NOT-CONVERTED-FAT-CODE*))) + *DEFAULT-NOT-CONVERTED-FAT-CODE*]) +) + +(* "END EXPORTED DEFINITIONS") + +) +(DEFINEQ + +(\JISIN [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 15:24 by rmk:") (* ;;; "Returns a 16 bit XCCS code. Assuming the input character stream is encoded with JIS. Allows the incorrect usage of KI and KO based on the two different JIS, OLDJIS and NEWJIS, because it is very likely that these two different sets of KI and KO are used simultaneously, although it is against a standard! ") (* ;;; "If COUNP is non-NIL, the number of bytes read is returned as a second value. Doesn't do EOL conversion -- \INCHAR or \INCCODE do that.") (PROG (CH1 CH2 CH3 (IN16BITFLG (\KIMODEP STREAM T)) (CHARNUM 0)) RETRY (AND (SETQ CH1 (\BIN STREAM)) (COND [(EQ CH1 (CHARCODE ESC)) (* ; "Might be KI or KO.") (SETQ CH2 (\BIN STREAM)) (COND [(EQ CH2 (CHARCODE $)) (* ; "Might be KI") (SETQ CH3 (\BIN STREAM)) (COND ((OR (EQ CH3 (CHARCODE B)) (EQ CH3 (CHARCODE @))) (* ; "KI") (\CHNAGE.KI.MODE STREAM T T) [AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL (SETQ CHARNUM (IPLUS CHARNUM 3] (* ; "Here we have to try the same preocedure again, because bogus duplicated KI/KO sequence might come again!") (SETQ IN16BITFLG T) (GO RETRY)) (T (RETURN (COND (IN16BITFLG (* ; "Under processing 16 bit code.") (\BACKFILEPTR STREAM) [AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL (IPLUS 2 CHARNUM] (\CONV.JIS.TO.XCCS CH1 CH2)) (T (\BACKFILEPTR STREAM) (\BACKFILEPTR STREAM) [AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL (IPLUS 1 CHARNUM] (CHARCODE ESC] [(EQ CH2 (CHARCODE %()) (* ; "Might be KO") (SETQ CH3 (\BIN STREAM)) (COND ((OR (EQ CH3 (CHARCODE J)) (EQ CH3 (CHARCODE H))) (* ; "KO") (\CHNAGE.KI.MODE STREAM T NIL) [AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL (SETQ CHARNUM (IPLUS CHARNUM 3] (* ;  "Oops. Yes, we have to try again to ignore duplicated KI/KO sequence.") (SETQ IN16BITFLG NIL) (GO RETRY)) (T (RETURN (COND (IN16BITFLG (* ; "Under processing 16 bit code.") (\BACKFILEPTR STREAM) [AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL (IPLUS CHARNUM 2] (\CONV.JIS.TO.XCCS CH1 CH2)) (T (\BACKFILEPTR STREAM) (\BACKFILEPTR STREAM) [AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL (IPLUS CHARNUM 1] (CHARCODE ESC] (IN16BITFLG (* ; "Under processing 16 bit code.") [AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL (IPLUS CHARNUM 2] (RETURN (\CONV.JIS.TO.XCCS CH1 CH2))) (T (\BACKFILEPTR STREAM) [AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL (IPLUS CHARNUM 1] (RETURN (CHARCODE ESC] [IN16BITFLG (* ; "Under processing 16 bit code.") [AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL (IPLUS CHARNUM 2] (RETURN (\CONV.JIS.TO.XCCS CH1 (\BIN STREAM] ((\HANKAKUP CH1) (* ; "HANKAKU-KATAKANA is converted to ZENKAKU-KATAKANA because XCCS does not support HANKAKU-KATAKANA.") [AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL (IPLUS CHARNUM 1] (RETURN (\CONV.HANKAKU.KANA CH1))) (T (* ;; "C0, SP, DEL, C1, 10/0, or 15/15 of 0 character set.") [AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL (IPLUS CHARNUM 1] (RETURN CH1]) + +(\JISPEEK + [LAMBDA (STREAM NOERROR COUNTP) (* ; "Edited 25-Feb-91 16:27 by nm") + +(* ;;; "Returns a 16 bit XCCS code. Assuming the input character stream is encoded with JIS. Allows the incorrect usage of KI and KO based on the two different JIS, OLDJIS and NEWJIS, because it is very likely that these two different sets of KI and KO are used simultaneously, although it is against a standard! May actually read the KI or KO. ") + +(* ;;; "If COUNTP is non-NIL, the number of bytes read is returned as a second value. Doesn't do EOL conversion -- \INCHAR or \INCCODE do that.") + + (PROG ((IN16BITFLG (\KIMODEP STREAM T)) + (CHARNUM 0) + (CH1 (\PEEKBIN STREAM NOERROR)) + CH2 CH3) + RETRY + (COND + [(NULL CH1) + (COND + (COUNTP (RETURN (CL:VALUES NIL CHARNUM))) + (T (RETURN NIL] + [(EQ CH1 (CHARCODE ESC)) (* ; "Might be KI or KO.") + (\BIN STREAM) (* ; "Consume the first ESC.") + (SETQ CH2 (\PEEKBIN STREAM NOERROR)) + (COND + [(NULL CH2) + (\BACKFILEPTR STREAM) + (COND + (COUNTP (RETURN (CL:VALUES NIL CHARNUM))) + (T (RETURN NIL] + [(EQ CH2 (CHARCODE $)) (* ; "Might be KI") + (\BIN STREAM) (* ; "Consume the $.") + (SETQ CH3 (\PEEKBIN STREAM NOERROR)) + (COND + [(NULL CH3) + (\BACKFILEPTR STREAM) + (\BACKFILEPTR STREAM) + (COND + (COUNTP (RETURN (CL:VALUES NIL CHARNUM))) + (T (RETURN NIL] + ((OR (EQ CH3 (CHARCODE B)) + (EQ CH3 (CHARCODE @))) (* ; "KI") + (\CHNAGE.KI.MODE STREAM T T) + (AND COUNTP (SETQ CHARNUM (IPLUS CHARNUM 3))) + (\BIN STREAM) (* ; "Consume the B or @.") + (SETQ IN16BITFLG T) + (GO RETRY)) + (T (\BACKFILEPTR STREAM) + (\BACKFILEPTR STREAM) + (COND + [IN16BITFLG (* ; "Under processing 16 bit code.") + (COND + (COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS CH1 CH2) + CHARNUM))) + (T (RETURN (\CONV.JIS.TO.XCCS CH1 CH2] + (T (COND + (COUNTP (RETURN (CL:VALUES (CHARCODE ESC) + CHARNUM))) + (T (RETURN (CHARCODE ESC] + [(EQ CH2 (CHARCODE %()) (* ; "Might be KO") + (\BIN STREAM) (* ; "Consume the (.") + (SETQ CH3 (\PEEKBIN STREAM NOERROR)) + (COND + [(NULL CH3) + (\BACKFILEPTR STREAM) + (\BACKFILEPTR STREAM) + (COND + (COUNTP (RETURN (CL:VALUES NIL CHARNUM))) + (T (RETURN NIL] + ((OR (EQ CH3 (CHARCODE J)) + (EQ CH3 (CHARCODE H))) (* ; "KO") + (\CHNAGE.KI.MODE STREAM T NIL) + (AND COUNTP (SETQ CHARNUM 3)) + (\BIN STREAM) (* ; "Consume the J or H.") + (SETQ IN16BITFLG NIL) + (GO RETRY)) + (T (\BACKFILEPTR STREAM) + (\BACKFILEPTR STREAM) + (COND + [IN16BITFLG (* ; "Under processing 16 bit code.") + (COND + (COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS CH1 CH2) + CHARNUM))) + (T (RETURN (\CONV.JIS.TO.XCCS CH1 CH2] + (T (COND + (COUNTP (RETURN (CL:VALUES (CHARCODE ESC) + CHARNUM))) + (T (RETURN (CHARCODE ESC] + [IN16BITFLG (* ; "Under processing 16 bit code.") + (\BACKFILEPTR STREAM) + (COND + (COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS CH1 CH2) + CHARNUM))) + (T (RETURN (\CONV.JIS.TO.XCCS CH1 CH2] + (T (\BACKFILEPTR STREAM) + (COND + (COUNTP (RETURN (CL:VALUES (CHARCODE ESC) + CHARNUM))) + (T (RETURN (CHARCODE ESC] + [IN16BITFLG (* ; "Under processing 16 bit code.") + (\BIN STREAM) (* ; "Consume the first byte.") + (SETQ CH2 (\PEEKBIN STREAM NOERROR)) + (\BACKFILEPTR STREAM) + (COND + [CH2 (COND + (COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS CH1 CH2) + CHARNUM))) + (T (RETURN (\CONV.JIS.TO.XCCS CH1 CH2] + (T (COND + (COUNTP (RETURN (CL:VALUES NIL CHARNUM))) + (T (RETURN NIL] + [(\HANKAKUP CH1) (* ; +"HANKAKU-KATAKANA is converted to ZENKAKU-KATAKANA because XCCS does not support HANKAKU-KATAKANA.") + (COND + (COUNTP (RETURN (CL:VALUES (\CONV.HANKAKU.KANA CH1) + CHARNUM))) + (T (RETURN (\CONV.HANKAKU.KANA CH1] + (T + (* ;; "C0, SP, DEL, C1, 10/0, or 15/15 of 0 character set.") + + (COND + (COUNTP (RETURN (CL:VALUES CH1 CHARNUM))) + (T (RETURN CH1]) + +(\BACKJISCHAR [LAMBDA (STREAM COUNTP BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 15:13 by rmk:") (COND ((\BACKFILEPTR STREAM) (COND [(\KIMODEP STREAM T) (COND [(\BACKFILEPTR STREAM) (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IPLUS BYTECOUNTVAL 2] (T (AND BYTECOUNTVAR (SET BYTECOUNTVAR (ADD1 BYTECOUNTVAL] (AND BYTECOUNTVAR (SET BYTECOUNTVAR (ADD1 BYTECOUNTVAL]) + +(\SHIFTJISIN [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 15:01 by rmk:") (* ;;; "Returns a 16 bit XCCS code. Assuming the input character stream is encoded with Shift-JIS. If BYTECOUNTVAR is non-NIL, the number of bytes read is decremented from it.. Doesn't do EOL conversion -- \INCHAR or \INCCODE do that..") (LET ((CH1 (\BIN STREAM)) CH2) (AND CH1 (COND ((\SJIS.KANJI.FIRST.BYTEP CH1) (* ;  "Read next byte and compose a kanji character.") (\CONV.SJIS.TO.JIS CH1 (\BIN STREAM)) (* ;  "CH1 and CH2 is adjusted to represent JIS code in \CONV.SJIS.TO.JIS.") (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL 2))) (\CONV.JIS.TO.XCCS CH1 CH2)) (T (* ; "ASCII or HANKAKU-KATAKANA") (AND BYTECOUNTVAR (SET BYTECOUNTVAR (SUB1 BYTECOUNTVAL))) (COND ((\HANKAKUP CH1) (* ; "HANKAKU-KATAKANA") (\CONV.HANKAKU.KANA CH1)) (T (* ; "ASCII") CH1]) + +(\SHIFTJISPEEK + [LAMBDA (STREAM NOERROR COUNTP) (* ; "Edited 25-Feb-91 16:30 by nm") + +(* ;;; "Returns a 16 bit XCCS code. Assuming the input character stream is encoded with Shift-JIS. Doesn't do EOL conversion -- \INCHAR or \INCCODE do that.") + + (PROG ((CH1 (\PEEKBIN STREAM NOERROR)) + CH2) + (COND + [(NULL CH1) + (COND + (COUNTP (RETURN (CL:VALUES NIL 0))) + (T (RETURN NIL] + [(\SJIS.KANJI.FIRST.BYTEP CH1) (* ; + "Read next byte and compose a kanji character.") + (\BIN STREAM) (* ; "Consume the first byte.") + [COND + ((NULL (SETQ CH2 (\PEEKBIN STREAM NOERROR))) + (\BACKFILEPTR STREAM) + (COND + (COUNTP (RETURN (CL:VALUES NIL 0))) + (T (RETURN NIL] + (\BACKFILEPTR STREAM) + (\CONV.SJIS.TO.JIS CH1 CH2) (* ; + "CH1 and CH2 is adjusted to represent JIS code in \CONV.SJIS.TO.JIS.") + (COND + (COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS CH1 CH2) + 0))) + (T (RETURN (\CONV.JIS.TO.XCCS CH1 CH2] + (T (* ; "ASCII or HANKAKU-KATAKANA") + (RETURN (COND + [(\HANKAKUP CH1) (* ; "HANKAKU-KATAKANA") + (COND + (COUNTP (RETURN (CL:VALUES (\CONV.HANKAKU.KANA CH1) + 0))) + (T (RETURN (\CONV.HANKAKU.KANA CH1] + (T (* ; "ASCII") + (COND + (COUNTP (RETURN (CL:VALUES CH1 0))) + (T (RETURN CH1]) + +(\BACKSHIFTJISCHAR [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 15:11 by rmk:") (COND ((\BACKFILEPTR STREAM) (COND [(\BACKFILEPTR STREAM) (COND [(\SJIS.KANJI.FIRST.BYTEP (\PEEKBIN STREAM)) (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IPLUS BYTECOUNTVAL 2] (T (\BIN STREAM) (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IPLUS BYTECOUNTVAL 1] (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IPLUS BYTECOUNTVAL 1]) + +(\EUCIN [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 15:04 by rmk:") (* ;;; "Returns a 16 bit XCCS code. Assuming the input character stream is encoded with EUC (Extended Unix Codes). Although EUC is independent of a particular language, the language implemented here is Japanese, thus this should be called as UJIS (Unixnized extended JIS code). JEIDA uses EUC as UJIS. ") (* ;;; "If COUNP is non-NIL, the number of bytes read is returned as a second value. Doesn't do EOL conversion -- \INCHAR or \INCCODE do that.") (LET ((CH1 (\BIN STREAM)) CH2) (AND CH1 (COND ((\EUC.KANJI.FIRST.BYTEP CH1) (* ;  "Read next byte and compose a kanji character.") (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL 2))) (\CONV.JIS.TO.XCCS (LOGAND CH1 127) (LOGAND (\BIN STREAM) 127))) ((\EUC.HANKAKUP CH1) (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL 2))) (\CONV.HANKAKU.KANA (\BIN STREAM))) ((\GAIJIP CH1) (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL 3))) (CL:VALUES (\CONV.JIS.TO.XCCS (LOGAND (\BIN STREAM) 127) (LOGAND (\BIN STREAM) 127)) 3)) (T (* ; "ASCII, C0, C1, SP or DEL") (AND BYTECOUNTVAR (SET BYTECOUNTVAR (SUB1 BYTECOUNTVAL))) CH1]) + +(\EUCPEEK + [LAMBDA (STREAM NOERROR COUNTP) (* ; "Edited 25-Feb-91 16:35 by nm") + +(* ;;; "Returns a 16 bit XCCS code. Assuming the input character stream is encoded with EUC (Extended Unix Codes). Although EUC is independent of a particular language, the language implemented here is Japanese, thus this should be called as UJIS (Unixnized extended JIS code). JEIDA uses EUC as UJIS. Doesn't do EOL conversion -- \INCHAR or \INCCODE do that.") + + (PROG ((CH1 (\PEEKBIN STREAM NOERROR)) + CH2) + (COND + [(NULL CH1) + (COND + (COUNTP (RETURN (CL:VALUES NIL 0))) + (T (RETURN NIL] + [(\EUC.KANJI.FIRST.BYTEP CH1) (* ; + "Read next byte and compose a kanji character.") + (\BIN STREAM) (* ; "Consume the first byte.") + [COND + ((NULL (SETQ CH2 (\PEEKBIN STREAM NOERROR))) + (\BACKFILEPTR STREAM) + (COND + (COUNTP (RETURN (CL:VALUES NIL 0))) + (T (RETURN NIL] + (\BACKFILEPTR STREAM) + (COND + (COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS (LOGAND CH1 127) + (LOGAND CH2 127)) + 0))) + (T (RETURN (\CONV.JIS.TO.XCCS (LOGAND CH1 127) + (LOGAND CH2 127] + [(\EUC.HANKAKUP CH1) + (\BIN STREAM) (* ; "Consume the SS2.") + [COND + ((NULL (SETQ CH2 (\PEEKBIN STREAM NOERROR))) + (\BACKFILEPTR STREAM) + (COND + (COUNTP (RETURN (CL:VALUES NIL 0))) + (T (RETURN NIL] + (\BACKFILEPTR STREAM) + (COND + (COUNTP (RETURN (CL:VALUES (\CONV.HANKAKU.KANA CH2) + 0))) + (T (RETURN (\CONV.HANKAKU.KANA CH2] + [(\GAIJIP CH1) + (\BIN STREAM) (* ; "Consume the SS3.") + [COND + ((NULL (SETQ CH1 (\PEEKBIN STREAM NOERROR))) + (\BACKFILEPTR STREAM) + (COND + (COUNTP (RETURN (CL:VALUES NIL 0))) + (T (RETURN NIL] + (\BIN STREAM) (* ; + "Consume the first byte in GAIJI.") + [COND + ((NULL (SETQ CH2 (\PEEKBIN STREAM NOERROR))) + (\BACKFILEPTR STREAM) + (\BACKFILEPTR STREAM) + (COND + (COUNTP (RETURN (CL:VALUES NIL 0))) + (T (RETURN NIL] + (\BACKFILEPTR STREAM) + (\BACKFILEPTR STREAM) + (COND + (COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS (LOGAND CH1 127) + (LOGAND CH2 127)) + 0))) + (T (RETURN (\CONV.JIS.TO.XCCS (LOGAND CH1 127) + (LOGAND CH2 127] + (T (* ; "ASCII, C0, C1, SP or DEL") + (COND + (COUNTP (RETURN (CL:VALUES CH1 0))) + (T (RETURN CH1]) + +(\BACKEUCCHAR [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 15:11 by rmk:") (COND ((\BACKFILEPTR STREAM) (COND [(BITTEST (\PEEKBIN STREAM) (MASK.1'S 7 1)) (* ; "C1, KAINJI, HANKAKU or GAIJI") (COND [(\BACKFILEPTR STREAM) (COND [(\EUC.HANKAKUP (\PEEKBIN STREAM)) (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IPLUS BYTECOUNTVAL 2] [(BITTEST (\PEEKBIN STREAM) (MASK.1'S 7 1)) (* ; "KANJI or GAIJI") (COND [(\BACKFILEPTR STREAM) (COND [(\GAIJIP (\PEEKBIN STREAM)) (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IPLUS BYTECOUNTVAL 3] (T (* ; "KANJI") (\BIN STREAM) (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IPLUS BYTECOUNTVAL 2] (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IPLUS BYTECOUNTVAL 2] (T (* ; "C1") (\BIN STREAM) (AND BYTECOUNTVAR (SET BYTECOUNTVAR (ADD1 BYTECOUNTVAL] (AND BYTECOUNTVAR (SET BYTECOUNTVAR (ADD1 BYTECOUNTVAL] (AND BYTECOUNTVAR (SET BYTECOUNTVAR (ADD1 BYTECOUNTVAL]) +) +(DEFINEQ + +(\JISOUTCHARFN + [LAMBDA (OUTSTREAM CHARCODE) (* ; "Edited 11-Mar-91 11:49 by nm") + +(* ;;; "Encoder for JIS format.") + + (COND + ((EQ CHARCODE (CHARCODE EOL)) + (COND + ((\KIMODEP OUTSTREAM NIL) + (\OUTKO OUTSTREAM) + (\CHNAGE.KI.MODE OUTSTREAM NIL NIL))) + (\BOUT OUTSTREAM (SELECTC (ffetch EOLCONVENTION of OUTSTREAM) + (CR.EOLC (CHARCODE CR)) + (LF.EOLC (CHARCODE LF)) + (CRLF.EOLC (\BOUT OUTSTREAM (CHARCODE CR)) + + (* ;; "Don't put out high-order byte preceding LF. The CRLF is EOL only if the bytes are immediately adjacent in the stream, with no additional encoding bytes") + + (CHARCODE LF)) + (SHOULDNT))) + (freplace CHARPOSITION of OUTSTREAM with 0)) + (T (SETQ CHARCODE (\CONV.XCCS.TO.JIS OUTSTREAM CHARCODE)) + (* ; + "\CONV.XCCS.TO.JIS converts ZENKAKUKATAKANA to HANKAKUKATAKANA if the stream desires it.") + (COND + ((> CHARCODE 255) + (COND + ((NOT (\KIMODEP OUTSTREAM NIL)) + (\OUTKI OUTSTREAM) + (\CHNAGE.KI.MODE OUTSTREAM NIL T))) + (\BOUT OUTSTREAM (\CHARSET CHARCODE)) + (\BOUT OUTSTREAM (\CHAR8CODE CHARCODE))) + (T (* ; "ASCII or HANKAKUKATAKANA") + (COND + ((\KIMODEP OUTSTREAM NIL) + (\OUTKO OUTSTREAM) + (\CHNAGE.KI.MODE OUTSTREAM NIL NIL))) + (\BOUT OUTSTREAM CHARCODE))) + (freplace CHARPOSITION of OUTSTREAM with (PROGN + (* ; "Ugh. Don't overflow") + (IPLUS16 (ffetch + CHARPOSITION + of OUTSTREAM) + 1]) + +(\SHIFTJISOUTCHARFN + [LAMBDA (OUTSTREAM CHARCODE) (* ; "Edited 7-Mar-91 21:55 by nm") + +(* ;;; "Encoder for Shift-JIS format.") + + (COND + ((EQ CHARCODE (CHARCODE EOL)) + (\BOUT OUTSTREAM (SELECTC (ffetch EOLCONVENTION of OUTSTREAM) + (CR.EOLC (CHARCODE CR)) + (LF.EOLC (CHARCODE LF)) + (CRLF.EOLC (\BOUT OUTSTREAM (CHARCODE CR)) + + (* ;; "Don't put out high-order byte preceding LF. The CRLF is EOL only if the bytes are immediately adjacent in the stream, with no additional encoding bytes") + + (CHARCODE LF)) + (SHOULDNT))) + (freplace CHARPOSITION of OUTSTREAM with 0)) + (T (SETQ CHARCODE (\CONV.XCCS.TO.JIS OUTSTREAM CHARCODE)) + (* ; + "\CONV.XCCS.TO.JIS converts ZENKAKUKATAKANA to HANKAKUKATAKANA if the stream desires it.") + (COND + [(> CHARCODE 255) + (LET ((CH1 (FOLDLO CHARCODE 256)) + (CH2 (LOGAND CHARCODE 255))) + (\CONV.JIS.TO.SJIS CH1 CH2) + (COND + ((AND (< CH1 256) + (< CH2 256)) + (\BOUT OUTSTREAM CH1) + (\BOUT OUTSTREAM CH2] + (T (\BOUT OUTSTREAM CHARCODE))) + (freplace CHARPOSITION of OUTSTREAM with (PROGN + (* ; "Ugh. Don't overflow") + (IPLUS16 (ffetch + CHARPOSITION + of OUTSTREAM) + 1]) + +(\EUCOUTCHARFN + [LAMBDA (OUTSTREAM CHARCODE) (* ; "Edited 11-Mar-91 11:29 by nm") + +(* ;;; "Encoder for EUC format.") + + (COND + ((EQ CHARCODE (CHARCODE EOL)) + (\BOUT OUTSTREAM (SELECTC (ffetch EOLCONVENTION of OUTSTREAM) + (CR.EOLC (CHARCODE CR)) + (LF.EOLC (CHARCODE LF)) + (CRLF.EOLC (\BOUT OUTSTREAM (CHARCODE CR)) + + (* ;; "Don't put out high-order byte preceding LF. The CRLF is EOL only if the bytes are immediately adjacent in the stream, with no additional encoding bytes") + + (CHARCODE LF)) + (SHOULDNT))) + (freplace CHARPOSITION of OUTSTREAM with 0)) + (T (SETQ CHARCODE (\CONV.XCCS.TO.JIS OUTSTREAM CHARCODE)) + (* ; + "\CONV.XCCS.TO.JIS converts ZENKAKUKATAKANA to HANKAKUKATAKANA if the stream desires it.") + (COND + ((> CHARCODE 255) (* ; "KANJI or GAIJI") + (AND (NOT (\NOTGAIJIP CHARCODE)) + (\BOUT OUTSTREAM 143)) + (\BOUT OUTSTREAM (LOGOR (\CHARSET CHARCODE) + 128)) + (\BOUT OUTSTREAM (LOGOR (\CHAR8CODE CHARCODE) + 128))) + ((\HANKAKUP CHARCODE) + (\BOUT OUTSTREAM 142) + (\BOUT OUTSTREAM (LOGOR CHARCODE 128))) + (T (* ; "C0, C1, SP, DEL or G0") + (\BOUT OUTSTREAM CHARCODE))) + (freplace CHARPOSITION of OUTSTREAM with (PROGN + (* ; "Ugh. Don't overflow") + (IPLUS16 (ffetch + CHARPOSITION + of OUTSTREAM) + 1]) +) +(DEFINEQ + +(CONVHANKAKU + [LAMBDA ARGS (* ; "Edited 8-Feb-91 13:42 by nm") + (PROG1 (STREAMPROP (ARG ARGS 1) + :HTOZP) + (AND (> ARGS 1) + (STREAMPROP (ARG ARGS 1) + :HTOZP + (ARG ARGS 2))))]) +) +(DECLARE%: DOEVAL@COMPILE DONTCOPY +(* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE + +(PUTPROPS \CONV.XCCS.TO.JIS MACRO (OPENLAMBDA (OUTSTREAM CC) + +(* ;;; "Returns JIS code corresponding to XCCS charcode. Handle HANKAKU as well as ZENKAKU. If OUTSTREAM wants to convert ZENKAKUKANA to HANKAKUKANA, do so. Never returns two byte charcode for alpha-numeric character, they are all treated as single byte characode.") + + (OR (COND + ((\ASCIIP CC) + CC) + ((\NOT.EQUIVALENT.TO.JIS CC) + (\DO.CONV.XCCS.TO.JIS CC)) + ((\CONV.HANKAKU.TO.ZENKAKUP OUTSTREAM) + (* ; + "ZENKAKUKANA comes here, because their charcodes are equiavalent to JIS.") + (\CONV.ZENKAKU.KANA CC)) + (T CC)) + CC))) + +(PUTPROPS \DO.CONV.XCCS.TO.JIS MACRO ((CC) + (GETHASH CC *XCCS-TO-JIS-CONV-TABLE*))) + +(PUTPROPS \ASCIIP MACRO (OPENLAMBDA (CC) + (AND (EQ (FOLDLO CC 256) + 0) + (< (LOGAND CC 255) + 128)))) + +(PUTPROPS \NOT.EQUIVALENT.TO.JIS MACRO (OPENLAMBDA (CC) + (OR (EQ (FOLDLO CC 256) + 0) + (EQ (FOLDLO CC 256) + 33) + (EQ (FOLDLO CC 256) + 34) + (EQ (FOLDLO CC 256) + 38) + (EQ (FOLDLO CC 256) + 40) + (EQ (FOLDLO CC 256) + 239) + (EQ (FOLDLO CC 256) + 241)))) + +(PUTPROPS \CONV.HANKAKU.TO.ZENKAKUP MACRO ((OUTSTREAM) + (STREAMPROP OUTSTREAM :HTOZP))) + +(PUTPROPS \CONV.ZENKAKU.KANA MACRO ((CHAR) + (GETHASH CHAR *ZENKAKU-TO-HANKAKU-CONV-TABLE*))) +) + +(* "END EXPORTED DEFINITIONS") + +) +(DECLARE%: DOEVAL@COMPILE DONTCOPY +(DECLARE%: EVAL@COMPILE + +(PUTPROPS \EXTRACT.NO.FONT.CODE MACRO ((JISCODE) + (CDR (ASSOC JISCODE *JIS-TO-XCCS-CONV-NO-FONT-TABLE*)) + )) + +(PUTPROPS \EXTARACT.CONV.TABLE MACRO ((KU) + (CDR (ASSOC KU *JIS-TO-XCCS-CONV-TABLE-LIST*)))) + +(PUTPROPS \NOT.EQUIVALENT.TO.XCCS MACRO ((KU) + +(* ;;; " The JIS codes which are not equiavelent to XCCS reside in 1, 2, 3, 6, 8 and 84 KU. Although from 84-5 to 94-94 inclusive are not defined in JIS, that is they are GAIJI, they are also handled here.") + + (OR (EQ KU 33) + (EQ KU 34) + (EQ KU 35) + (EQ KU 38) + (EQ KU 40) + (EQ KU 116) + (EQ KU 117)))) + +(PUTPROPS \EXTRACT.SET MACRO ((TEN TABLE) + (ELT TABLE (IDIFFERENCE (UNFOLD (IDIFFERENCE TEN 32) + 2) + 1)))) + +(PUTPROPS \EXTRACT.CODE MACRO ((TEN TABLE) + (ELT TABLE (UNFOLD (IDIFFERENCE TEN 32) + 2)))) + +(PUTPROPS \CHNAGE.KI.MODE MACRO [OPENLAMBDA (ST INPUTFLG ENTERP) + +(* ;;; +"INPUTFLG is true if \CHNAGE.KI.MODE is called in the context in which ST is an input stream.") + + (COND + [INPUTFLG (COND + (ENTERP (freplace (STREAM IN.KANJIIN) + of (\DTEST ST 'STREAM) + with T)) + (T (freplace (STREAM IN.KANJIIN) + of (\DTEST ST 'STREAM) + with NIL] + (T (COND + (ENTERP (freplace (STREAM OUT.KANJIIN) + of (\DTEST ST 'STREAM) with + T)) + (T (freplace (STREAM OUT.KANJIIN) + of (\DTEST ST 'STREAM) with NIL]) + +(PUTPROPS \KIMODEP MACRO [OPENLAMBDA (ST INPUTFLG) + +(* ;;; "INPUTFLG is true if \KIMODEP is called in the context in which ST is an input stream.") + + (COND + [INPUTFLG (ffetch (STREAM IN.KANJIIN) + of (\DTEST ST 'STREAM] + (T (ffetch (STREAM OUT.KANJIIN) of (\DTEST ST + 'STREAM]) + +(PUTPROPS \HANKAKUP MACRO ((CHAR) + (< 160 CHAR 224))) + +(PUTPROPS \KANJIP MACRO ((CHAR) + (< 12158 CHAR 29733))) + +(PUTPROPS \NOTGAIJIP MACRO ((CHAR) + (OR (< 8480 CHAR 10305) + (< 12158 CHAR 29733)))) + +(PUTPROPS \INVALID.TENP MACRO (OPENLAMBDA (TEN) + (OR (< TEN 33) + (< 126 TEN)))) + +(PUTPROPS \CONV.HANKAKU.KANA MACRO ((CHAR) + (GETHASH CHAR *HANKAKU-TO-ZENKAKU-CONV-TABLE*))) + +(PUTPROPS \OUTKI MACRO ((STREAM) + (\BOUT OUTSTREAM (CHARCODE ESC)) + (\BOUT OUTSTREAM (CHARCODE $)) + (\BOUT OUTSTREAM (CHARCODE B)))) + +(PUTPROPS \OUTKO MACRO ((STREAM) + (\BOUT OUTSTREAM (CHARCODE ESC)) + (\BOUT OUTSTREAM (CHARCODE %()) + (\BOUT OUTSTREAM (CHARCODE J)))) +) + +(DECLARE%: EVAL@COMPILE + +(PUTPROPS \CONV.SJIS.TO.JIS MACRO [OPENLAMBDA (HI LO) + +(* ;;; "Convert Shift-JIS to JIS. The variable named CH1 and CH2 are set to the converted hight 8 bit and low 8bit of JIS code respectively.") + + [SETQ CH1 (IDIFFERENCE HI (COND + ((> HI 159) + 177) + (T 113] + (SETQ CH1 (IPLUS (UNFOLD CH1 2) + 1)) + (SETQ CH2 (COND + [(> LO 158) + (PROG1 (IDIFFERENCE LO 126) + (SETQ CH1 (IPLUS CH1 1)))] + (T (IDIFFERENCE LO (COND + ((> LO 126) + (IPLUS 31 1)) + (T 31]) + +(PUTPROPS \CONV.JIS.TO.SJIS MACRO [OPENLAMBDA (HI LO) + +(* ;;; "Convert JIS to Shift-JIS. The variable named CH1 and CH2 are set to the converted hight 8 bit and low 8bit of Shift-JIS code respectively.") + + [SETQ CH2 (COND + ((ODDP HI) + (SETQ CH2 (IPLUS LO 31)) + (COND + ((>= CH2 127) + (IPLUS CH2 1)) + (T CH2))) + (T (IPLUS LO 126] + (SETQ CH1 (IPLUS (FOLDLO (IDIFFERENCE HI 33) + 2) + 129)) + (AND (> CH1 159) + (SETQ CH1 (IPLUS CH1 64]) + +(PUTPROPS \SJIS.KANJI.FIRST.BYTEP MACRO (OPENLAMBDA (CHAR) + (OR (< 127 CHAR 160) + (< 223 CHAR 256)))) +) + +(DECLARE%: EVAL@COMPILE + +(PUTPROPS \EUC.KANJI.FIRST.BYTEP MACRO ((CHAR) + (< 160 CHAR 255))) + +(PUTPROPS \GAIJIP MACRO ((CHAR) + (EQ CHAR 143))) + +(PUTPROPS \EUC.HANKAKUP MACRO ((CHAR) + (EQ CHAR 142))) +) +) +(DEFINEQ + +(\CREATE.JIS.EXTERNALFORMAT + [LAMBDA NIL (* ; "Edited 23-Jun-2021 16:57 by rmk:") + +(* ;;; "Create an instance of EXTERNALFORMAT datatype and install it with :JIS as its name.") + + (\INSTALL.EXTERNALFORMAT (create EXTERNALFORMAT + NAME _ :JIS + INCCODEFN _ (FUNCTION \JISIN) + PEEKCCODEFN _ (FUNCTION \JISPEEK) + BACKCCODEFN _ (FUNCTION \BACKJISCHAR) + OUTCHARFN _ (FUNCTION \JISOUTCHARFN]) + +(\CREATE.SHIFTJIS.EXTERNALFORMAT + [LAMBDA NIL (* ; "Edited 23-Jun-2021 16:57 by rmk:") + +(* ;;; "Create two instances of EXTERNALFORMAT datatype and install them with :W-MS and :MS as their names respectively. :MS have to change the end of line convention to CRLF.") + + (\INSTALL.EXTERNALFORMAT (create EXTERNALFORMAT + NAME _ :W-MS + INCCODEFN _ (FUNCTION \SHIFTJISIN) + PEEKCCODEFN _ (FUNCTION \SHIFTJISPEEK) + BACKCCODEFN _ (FUNCTION \BACKSHIFTJISCHAR) + OUTCHARFN _ (FUNCTION \SHIFTJISOUTCHARFN))) + (\INSTALL.EXTERNALFORMAT (create EXTERNALFORMAT + NAME _ :MS + INCCODEFN _ (FUNCTION \SHIFTJISIN) + PEEKCCODEFN _ (FUNCTION \SHIFTJISPEEK) + BACKCCODEFN _ (FUNCTION \BACKSHIFTJISCHAR) + OUTCHARFN _ (FUNCTION \SHIFTJISOUTCHARFN) + EOL _ CRLF.EOLC]) + +(\CREATE.EUC.EXTERNALFORMAT + [LAMBDA NIL (* ; "Edited 23-Jun-2021 16:57 by rmk:") + +(* ;;; "Create an instance of EXTERNALFORMAT datatype and install it with :EUC as its name.") + + (\INSTALL.EXTERNALFORMAT (create EXTERNALFORMAT + NAME _ :EUC + INCCODEFN _ (FUNCTION \EUCIN) + PEEKCCODEFN _ (FUNCTION \EUCPEEK) + BACKCCODEFN _ (FUNCTION \BACKEUCCHAR) + OUTCHARFN _ (FUNCTION \EUCOUTCHARFN]) +) +(DECLARE%: DONTEVAL@LOAD DOCOPY + +(\CREATE.JIS.EXTERNALFORMAT) + +(\CREATE.SHIFTJIS.EXTERNALFORMAT) + +(\CREATE.EUC.EXTERNALFORMAT) +) +(DECLARE%: EVAL@COMPILE DONTCOPY + +(OR (GETP 'EXPORTS.ALL 'FILE) + (PRINT "NOTE: JAPANESE requires EXPORTS.ALL for compilation" T)) +) +(DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS + +(ADDTOVAR NLAMA ) + +(ADDTOVAR NLAML ) + +(ADDTOVAR LAMA CONVHANKAKU) +) +(DECLARE%: DONTCOPY + (FILEMAP (NIL (11013 16229 (\MAKE.JIS.TO.XCCS.CONV.TABLE 11023 . 16227)) (19873 44134 (\JISIN 19883 . +25968) (\JISPEEK 25970 . 32596) (\BACKJISCHAR 32598 . 33079) (\SHIFTJISIN 33081 . 34480) ( +\SHIFTJISPEEK 34482 . 36588) (\BACKSHIFTJISCHAR 36590 . 37138) (\EUCIN 37140 . 39018) (\EUCPEEK 39020 + . 42599) (\BACKEUCCHAR 42601 . 44132)) (44135 50824 (\JISOUTCHARFN 44145 . 46502) (\SHIFTJISOUTCHARFN + 46504 . 48551) (\EUCOUTCHARFN 48553 . 50822)) (50825 51144 (CONVHANKAKU 50835 . 51142)) (61868 64328 +(\CREATE.JIS.EXTERNALFORMAT 61878 . 62502) (\CREATE.SHIFTJIS.EXTERNALFORMAT 62504 . 63700) ( +\CREATE.EUC.EXTERNALFORMAT 63702 . 64326))))) +STOP diff --git a/sources/JAPANESE.LCOM b/sources/JAPANESE.LCOM new file mode 100644 index 000000000..30d3b8fdd Binary files /dev/null and b/sources/JAPANESE.LCOM differ diff --git a/sources/LLARRAYELT.LCOM b/sources/LLARRAYELT.LCOM index 408e13115..307ee5084 100644 Binary files a/sources/LLARRAYELT.LCOM and b/sources/LLARRAYELT.LCOM differ diff --git a/sources/LLBFS b/sources/LLBFS index 43800133a..1df7d841e 100644 --- a/sources/LLBFS +++ b/sources/LLBFS @@ -1,19 +1,20 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "17-Dec-92 01:31:53" |{PELE:MV:ENVOS}SOURCES>LLBFS.;3| 76536 +(FILECREATED "13-Jun-2021 11:52:17" {DSK}kaplan>Local>medley3.5>git-medley>sources>LLBFS.;2 80544 - changes to%: (RECORDS CB DSKOBJ) + changes to%: (FNS \ACTONDISKPAGES \WRITEDISKPAGES \VIRTUALDISKDA) - previous date%: "16-May-90 18:58:12" |{PELE:MV:ENVOS}SOURCES>LLBFS.;2|) + previous date%: "17-Dec-92 01:31:53" +{DSK}kaplan>Local>medley3.5>git-medley>sources>LLBFS.;1) (* ; " -Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1982-1987, 1990, 1992, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT LLBFSCOMS) (RPAQQ LLBFSCOMS - [(COMS (* ; "Low-level subr calls") + [(COMS (* ; "Low-level subr calls") (FNS \INITBFS \TESTPARTITION \ACTONDISKPAGES \WRITEDISKPAGES \DISKERROR M44.SIGNAL.DISK.ERROR) (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS .SETUPDISKBUFFERS. DISKWRITEACTION? @@ -21,8 +22,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co (PROP DOPVAL .DISKPARTINSTR.) (CONSTANTS * DISKCOMMANDS) (CONSTANTS * DISKERRORS) - (* ; - "Some of these are also used by MOD44IO") + (* ; + "Some of these are also used by MOD44IO") (RECORDS DISKREQUEST ALTODSKOBJ DDHEADER CB DISKLABEL REALDA SHORTCB FP DSKOBJ \M44LeaderPage M44STREAM FID) (CONSTANTS (\FILLINDA 65534) @@ -41,7 +42,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co \SPAREDISKWRITEBUFFER \FREEPAGEFID \#EMUBUFFERS \EMUBUFFERS \LASTVMEMFILEPAGE \SWAPDSK1 \SWAPDSK2 \XVmemFmapBase \XVmemFmapHighBase \XVmemDiskBase \XVmem \M44.READY))) - [COMS (* ; "Super low level") + [COMS (* ; "Super low level") (FNS \ACTONVMEMPAGES \WRITEVMEMPAGES \DOACTONDISKPAGES \DOWRITEDISKPAGES \CHECKFREEPAGE \DODISKCOMMAND \GETDISKCB \CLEARCB \CLEANUPDISKQUEUE \VIRTUALDISKDA \REALDISKDA) (DECLARE%: EVAL@COMPILE DONTCOPY (CONSTANTS * CBSTATUSCONSTANTS) @@ -55,7 +56,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co (\LENSHORTCB 18)) (CONSTANTS (\CB.PENDING 1) (\CB.FREE 0] - [COMS (* ; "At MAKEINIT time") + [COMS (* ; "At MAKEINIT time") (FNS MAKEINITBFS) (DECLARE%: DONTCOPY (ADDVARS (INITPTRS (\MAINDISK) (\SWAPDSK1) @@ -66,12 +67,12 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co (INEWCOMS (FNS MAKEINITBFS))) EVAL@COMPILE (ADDVARS (DONTCOMPILEFNS MAKEINITBFS] - (COMS (* ; "Swap stuff") + (COMS (* ; "Swap stuff") (FNS \M44ACTONVMEMFILE \LOOKUPFMAP \M44EXTENDVMEMFILE \M44DOEXTENDVMEMFILE \EXTENDISFMAP) - (* ; "Extended vmem stuff") + (* ; "Extended vmem stuff") (FNS \EXTENDEDVMEMINIT \INITIALIZESWAPDISK \WHICHPART \SWAPDISKERROR) - (* ; "For debugging and user info") + (* ; "For debugging and user info") (FNS DESCRIBE-VIRTUAL-MEMORY \PRINTFMAP) (DECLARE%: EVAL@COMPILE DONTCOPY (RECORDS ISFMAP) (CONSTANTS (\ISFMAPOFFSET 18))) @@ -116,12 +117,126 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co ) (\ACTONDISKPAGES -(LAMBDA (DSK BUFFERS DAs DAorigin FID FIRSTPAGE LASTPAGE ACTION LASTNUMCHARSCONS LASTACTION ReturnOnCheckError HINTLASTPAGE CAs) (* bvm%: "13-Feb-85 19:35") (* ;; "performs indicated ACTION on pages FIRSTPAGE thru LASTPAGE of DSK (a disk object) for file whose alto id is FID. Returns page number of last page acted on, which may be less than LASTPAGE if end of file was encountered. BUFFERS is either NIL (don't care about the data) or else a buffer or list of buffers of data to be read/written. DAs is a vector of virtual disk addresses (words) for pages of the file, per alto conventions. DAorigin indicates which page (\GETBASE DAs 0) corresponds to; it should be no greater than FIRSTPAGE. LASTACTION, if supplied, is performed instead of ACTION on LASTPAGE. HINTLASTPAGE is hint of the last page of file, to avoid chaining beyond the end of file. NUMCHARSCONS, if supplied, is a list, car of which will be smashed with the NUMCHARS field of the last page acted on (this in lieu of multiple value return). If ReturnOnCheckError is true, returns (--- (I + 64)), where I was the last page successfully acted on") (PROG (EMBLOCK EMBUFS EMCAs EMDAs EMFID EMFIXEDCA RESULT STREAM LASTNC) (COND ((EQ DSK \SYSDISK) (SETQ DSK \MAINDISK))) (COND ((type? STREAM FID) (SETQ STREAM FID) (SETQ FID (fetch (ARRAYP BASE) of (fetch FID of FID))))) RETRY (UNINTERRUPTABLY (\CLOCK0 (LOCF (fetch DISKTEMP0 of \MISCSTATS))) (* ; "Note starting time") (PROG ((REQUEST \DISKREQUESTBLOCK)) (.SETUPDISKBUFFERS. ACTION) (replace RETURNONCHECKERROR of REQUEST with ReturnOnCheckError) (replace DISKACTION of REQUEST with ACTION) (replace LASTDISKACTION of REQUEST with (COND ((AND LASTACTION (NEQ LASTACTION 0)) LASTACTION) (T ACTION))) (SETQ RESULT (\MISCAPPLY* (FUNCTION \DOACTONDISKPAGES) DSK REQUEST)) (SETQ LASTNC (fetch CURRENTNUMCHARS of REQUEST))) (COND ((AND BUFFERS (NEQ LASTNC BYTESPERPAGE) (IGEQ RESULT 0) (DISKREADACTION? (OR (AND (EQ RESULT LASTPAGE) LASTACTION) ACTION))) (* ; "Zero out everything past the last byte") (PROG ((BUF (OR EMFIXEDCA (EMPOINTER (\GETBASE EMCAs RESULT))))) (\CLEARBYTES BUF LASTNC (IDIFFERENCE BYTESPERPAGE LASTNC))))) (COND ((NOT (EMADDRESSP DAs)) (* ; "Possibly update the user's DAs from the emulator copy") (\BLT DAs EMDAs (IPLUS LASTPAGE 2 (IMINUS DAorigin))))) (* ; "If action was read, now copy from emu buffers into user buffers") (COND ((LISTP BUFFERS) (for BUF in BUFFERS as (CA _ EMCAs) by (\ADDBASE CA 1) as N from FIRSTPAGE when (AND BUF (NOT (EMADDRESSP BUF)) (DISKREADACTION? (OR (AND (EQ N LASTPAGE) LASTACTION) ACTION))) do (\BLT BUF (\VAG2 0 (\GETBASE CA 0)) WORDSPERPAGE))) ((AND BUFFERS (NOT (EMADDRESSP BUFFERS)) (DISKREADACTION? ACTION)) (\BLT BUFFERS EMFIXEDCA WORDSPERPAGE))) (\BOXIPLUS (LOCF (fetch DISKIOTIME of \MISCSTATS)) (\BOXIDIFFERENCE (\CLOCK0 (LOCF (fetch DISKTEMP1 of \MISCSTATS))) (LOCF (fetch DISKTEMP0 of \MISCSTATS)))) (* ; "Note total time spent here")) (COND ((ILESSP RESULT 0) (\DISKERROR (IMINUS RESULT) STREAM LASTNC) (GO RETRY)) (T (COND (LASTNUMCHARSCONS (COND ((LISTP LASTNUMCHARSCONS) (RPLACA LASTNUMCHARSCONS LASTNC)) (T (\PUTBASE LASTNUMCHARSCONS 0 LASTNC))))) (RETURN (SIGNED RESULT BITSPERWORD)))))) -) + [LAMBDA (DSK BUFFERS DAs DAorigin FID FIRSTPAGE LASTPAGE ACTION LASTNUMCHARSCONS LASTACTION + ReturnOnCheckError HINTLASTPAGE CAs) (* ; "Edited 13-Jun-2021 11:47 by rmk:") + + (* ;; "performs indicated ACTION on pages FIRSTPAGE thru LASTPAGE of DSK (a disk object) for file whose alto id is FID. Returns page number of last page acted on, which may be less than LASTPAGE if end of file was encountered. BUFFERS is either NIL (don't care about the data) or else a buffer or list of buffers of data to be read/written. DAs is a vector of virtual disk addresses (words) for pages of the file, per alto conventions. DAorigin indicates which page (\GETBASE DAs 0) corresponds to; it should be no greater than FIRSTPAGE. LASTACTION, if supplied, is performed instead of ACTION on LASTPAGE. HINTLASTPAGE is hint of the last page of file, to avoid chaining beyond the end of file. NUMCHARSCONS, if supplied, is a list, car of which will be smashed with the NUMCHARS field of the last page acted on (this in lieu of multiple value return). If ReturnOnCheckError is true, returns (--- (I + 64)), where I was the last page successfully acted on") + + (PROG (EMBLOCK EMBUFS EMCAs EMDAs EMFID EMFIXEDCA RESULT STREAM LASTNC) + (COND + ((EQ DSK \SYSDISK) + (SETQ DSK \MAINDISK))) + [COND + ((type? STREAM FID) + (SETQ STREAM FID) + (SETQ FID (fetch (ARRAYP BASE) of (fetch (M44STREAM FID) of FID] + RETRY + (UNINTERRUPTABLY + (\CLOCK0 (LOCF (fetch (MISCSTATS DISKTEMP0) of \MISCSTATS))) + (* ; "Note starting time") + (PROG ((REQUEST \DISKREQUESTBLOCK)) + (.SETUPDISKBUFFERS. ACTION) + (replace (DISKREQUEST RETURNONCHECKERROR) of REQUEST with + ReturnOnCheckError + ) + (replace (DISKREQUEST DISKACTION) of REQUEST with ACTION) + (replace (DISKREQUEST LASTDISKACTION) of REQUEST + with (COND + ((AND LASTACTION (NEQ LASTACTION 0)) + LASTACTION) + (T ACTION))) + (SETQ RESULT (\MISCAPPLY* (FUNCTION \DOACTONDISKPAGES) + DSK REQUEST)) + (SETQ LASTNC (fetch (DISKREQUEST CURRENTNUMCHARS) of REQUEST))) + [COND + ((AND BUFFERS (NEQ LASTNC BYTESPERPAGE) + (IGEQ RESULT 0) + (DISKREADACTION? (OR (AND (EQ RESULT LASTPAGE) + LASTACTION) + ACTION))) (* ; + "Zero out everything past the last byte") + (PROG [(BUF (OR EMFIXEDCA (EMPOINTER (\GETBASE EMCAs RESULT] + (\CLEARBYTES BUF LASTNC (IDIFFERENCE BYTESPERPAGE LASTNC] + [COND + ((NOT (EMADDRESSP DAs)) (* ; + "Possibly update the user's DAs from the emulator copy") + (\BLT DAs EMDAs (IPLUS LASTPAGE 2 (IMINUS DAorigin] + (* ; + "If action was read, now copy from emu buffers into user buffers") + (COND + ((LISTP BUFFERS) + (for BUF in BUFFERS as (CA _ EMCAs) by (\ADDBASE CA 1) as + N + from FIRSTPAGE when (AND BUF (NOT (EMADDRESSP BUF)) + (DISKREADACTION? (OR (AND (EQ N LASTPAGE) + LASTACTION) + ACTION))) + do (\BLT BUF (\VAG2 0 (\GETBASE CA 0)) + WORDSPERPAGE))) + ((AND BUFFERS (NOT (EMADDRESSP BUFFERS)) + (DISKREADACTION? ACTION)) + (\BLT BUFFERS EMFIXEDCA WORDSPERPAGE))) + [\BOXIPLUS (LOCF (fetch (MISCSTATS DISKIOTIME) of \MISCSTATS)) + (\BOXIDIFFERENCE (\CLOCK0 (LOCF (fetch (MISCSTATS DISKTEMP1) of + \MISCSTATS + ))) + (LOCF (fetch (MISCSTATS DISKTEMP0) of \MISCSTATS] + (* ; "Note total time spent here") + ) + (COND + ((ILESSP RESULT 0) + (\DISKERROR (IMINUS RESULT) + STREAM LASTNC) + (GO RETRY)) + (T [COND + (LASTNUMCHARSCONS (COND + ((LISTP LASTNUMCHARSCONS) + (RPLACA LASTNUMCHARSCONS LASTNC)) + (T (\PUTBASE LASTNUMCHARSCONS 0 LASTNC] + (RETURN (SIGNED RESULT BITSPERWORD]) (\WRITEDISKPAGES -(LAMBDA (DSK BUFFERS DAs DAorigin FID FIRSTPAGE LASTPAGE LASTACTION LASTNUMCHARSCONS LASTNUMCHARS HINTLASTPAGE CAs) (* bvm%: "19-Jan-85 16:24") (* ;; "Write pages FIRSTPAGE thru LASTPAGE of DSK (a disk object) for file whose alto id is FID. Returns page number of last page acted on. BUFFERS is either NIL (don't care about the data) or else a buffer or list of buffers of data to be written. DAs is a vector of virtual disk addresses (words) for pages of the file, per alto conventions. DAorigin indicates which page (\GETBASE DAs 0) corresponds to; it should be no greater than FIRSTPAGE. LASTACTION, if supplied, is performed instead of ACTION on LASTPAGE. HINTLASTPAGE is hint of the last page of file, to avoid chaining beyond the end of file. NUMCHARSCONS, if supplied, is a list, car of which will be smashed with the NUMCHARS field of the last page acted on (this in lieu of multiple value return). LASTNUMCHARS is the nchars field to be written for LASTPAGE") (PROG (EMBLOCK EMBUFS EMCAs EMDAs EMFID EMFIXEDCA RESULT STREAM) (COND ((EQ DSK \SYSDISK) (SETQ DSK \MAINDISK))) (COND ((type? STREAM FID) (SETQ STREAM FID) (SETQ FID (fetch (ARRAYP BASE) of (fetch FID of FID))))) (\OPENDISKDESCRIPTOR DSK) RETRY (UNINTERRUPTABLY (\CLOCK0 (LOCF (fetch DISKTEMP0 of \MISCSTATS))) (SETQ RESULT (PROG ((REQUEST \DISKREQUESTBLOCK)) (.SETUPDISKBUFFERS. \DC.WRITED) (replace DISKNOALLOC of REQUEST with (EQ LASTACTION (UNSIGNED -1 BITSPERWORD))) (replace DISKWRITELASTNUMCHARS of REQUEST with (OR LASTNUMCHARS BYTESPERPAGE)) (RETURN (\MISCAPPLY* (FUNCTION \DOWRITEDISKPAGES) DSK REQUEST)))) (COND ((NOT (EMADDRESSP DAs)) (\BLT DAs EMDAs (IPLUS LASTPAGE 2 (IMINUS DAorigin))))) (\BOXIPLUS (LOCF (fetch DISKIOTIME of \MISCSTATS)) (\BOXIDIFFERENCE (\CLOCK0 (LOCF (fetch DISKTEMP1 of \MISCSTATS))) (LOCF (fetch DISKTEMP0 of \MISCSTATS)))) (* Note total time spent)) (COND ((ILESSP RESULT 0) (\DISKERROR (IMINUS RESULT) STREAM) (GO RETRY)) (T (RETURN (SIGNED RESULT BITSPERWORD)))))) -) + [LAMBDA (DSK BUFFERS DAs DAorigin FID FIRSTPAGE LASTPAGE LASTACTION LASTNUMCHARSCONS LASTNUMCHARS + HINTLASTPAGE CAs) (* ; "Edited 13-Jun-2021 11:45 by rmk:") + + (* ;; "Write pages FIRSTPAGE thru LASTPAGE of DSK (a disk object) for file whose alto id is FID. Returns page number of last page acted on. BUFFERS is either NIL (don't care about the data) or else a buffer or list of buffers of data to be written. DAs is a vector of virtual disk addresses (words) for pages of the file, per alto conventions. DAorigin indicates which page (\GETBASE DAs 0) corresponds to; it should be no greater than FIRSTPAGE. LASTACTION, if supplied, is performed instead of ACTION on LASTPAGE. HINTLASTPAGE is hint of the last page of file, to avoid chaining beyond the end of file. NUMCHARSCONS, if supplied, is a list, car of which will be smashed with the NUMCHARS field of the last page acted on (this in lieu of multiple value return). LASTNUMCHARS is the nchars field to be written for LASTPAGE") + + (PROG (EMBLOCK EMBUFS EMCAs EMDAs EMFID EMFIXEDCA RESULT STREAM) + (COND + ((EQ DSK \SYSDISK) + (SETQ DSK \MAINDISK))) + [COND + ((type? STREAM FID) + (SETQ STREAM FID) + (SETQ FID (fetch (ARRAYP BASE) of (fetch (M44STREAM FID) of FID] + (\OPENDISKDESCRIPTOR DSK) + RETRY + (UNINTERRUPTABLY + (\CLOCK0 (LOCF (fetch (MISCSTATS DISKTEMP0) of \MISCSTATS))) + [SETQ RESULT (PROG ((REQUEST \DISKREQUESTBLOCK)) + (.SETUPDISKBUFFERS. \DC.WRITED) + (replace (DISKREQUEST DISKNOALLOC) of REQUEST + with (EQ LASTACTION (UNSIGNED -1 BITSPERWORD))) + (replace (DISKREQUEST DISKWRITELASTNUMCHARS) of REQUEST + with (OR LASTNUMCHARS BYTESPERPAGE)) + (RETURN (\MISCAPPLY* (FUNCTION \DOWRITEDISKPAGES) + DSK REQUEST] + [COND + ((NOT (EMADDRESSP DAs)) + (\BLT DAs EMDAs (IPLUS LASTPAGE 2 (IMINUS DAorigin] + [\BOXIPLUS (LOCF (fetch DISKIOTIME of \MISCSTATS)) + (\BOXIDIFFERENCE (\CLOCK0 (LOCF (fetch (MISCSTATS DISKTEMP1) of + \MISCSTATS + ))) + (LOCF (fetch (MISCSTATS DISKTEMP0) of \MISCSTATS] + (* Note total time spent) + ) + (COND + ((ILESSP RESULT 0) + (\DISKERROR (IMINUS RESULT) + STREAM) + (GO RETRY)) + (T (RETURN (SIGNED RESULT BITSPERWORD]) (\DISKERROR (LAMBDA (ERRCODE STREAM LASTNC) (* bvm%: "12-Mar-85 03:44") (COND (STREAM (M44.SIGNAL.DISK.ERROR ERRCODE (fetch FULLFILENAME of STREAM))) (T (while T do (SELECTC ERRCODE (\DSK.HARD.ERROR (RAID "Hard Disk Error in Lisp.virtualmem. Page = " (fetch (DSKOBJ CURRENTDISKPAGE) of \MAINDISK))) (\DSK.FULL.ERROR (RAID "Disk Full")) (RAID "Unknown disk error in Lisp.virtualmem" ERRCODE)))))) @@ -135,7 +250,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co (DECLARE%: EVAL@COMPILE (PUTPROPS .SETUPDISKBUFFERS. MACRO - ((ACTION) (* bvm%: "15-OCT-82 17:28") + ((ACTION) (* bvm%: "15-OCT-82 17:28") (SETQ EMBUFS \EMUDISKBUFFERS) (SETQ EMBLOCK \EMUSCRATCH) [COND @@ -154,8 +269,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co [CAs (SETQ EMCAs (\ADDBASE CAs (IMINUS DAorigin] [(AND (LISTP BUFFERS) (OR (CDR BUFFERS) - (PROGN (SETQ BUFFERS (CAR BUFFERS)) (* ; - "Treat singleton BUFFER as nonlist") + (PROGN (SETQ BUFFERS (CAR BUFFERS)) (* ; + "Treat singleton BUFFER as nonlist") NIL))) (SETQ EMCAs (\ADDBASE EMBLOCK (IMINUS FIRSTPAGE))) (for BUF in BUFFERS as N from FIRSTPAGE bind FIXEDBUF @@ -184,8 +299,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co BUFFERS) (T [COND ((DISKWRITEACTION? ACTION) - (* ; - "If writing, copy data into buffer") + (* ; + "If writing, copy data into buffer") (COND (BUFFERS (\BLT EMBUFS BUFFERS WORDSPERPAGE)) (T (\CLEARWORDS EMBUFS WORDSPERPAGE] @@ -195,18 +310,18 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co (replace DISKDAS of REQUEST with (\ADDBASE EMDAs (IMINUS DAorigin))) (replace DISKVERSION of REQUEST with (fetch FPVERSION of FID)) (\BLT (LOCF (fetch DISKSERIAL# of REQUEST)) - FID WORDSPERCELL) (* ; "Fill in serial number for label") + FID WORDSPERCELL) (* ; "Fill in serial number for label") (replace DISKFIRSTPAGE of REQUEST with FIRSTPAGE) (replace DISKLASTPAGE of REQUEST with LASTPAGE) (replace DISKHINTLASTPAGE of REQUEST with (OR HINTLASTPAGE 0)))) -(PUTPROPS DISKWRITEACTION? MACRO ((ACTION) (* bvm%: "15-OCT-82 17:06") +(PUTPROPS DISKWRITEACTION? MACRO ((ACTION) (* bvm%: "15-OCT-82 17:06") (SELECTC ACTION ((LIST \DC.WRITEHLD \DC.WRITELD \DC.WRITED) T) NIL))) -(PUTPROPS DISKREADACTION? MACRO ((ACTION) (* bvm%: "15-OCT-82 17:06") +(PUTPROPS DISKREADACTION? MACRO ((ACTION) (* bvm%: "15-OCT-82 17:06") (ILESSP ACTION \DC.WRITEHLD))) ) @@ -271,7 +386,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co (DECLARE%: EVAL@COMPILE -(BLOCKRECORD DISKREQUEST ((DISKDAS FULLXPOINTER) (* ; "Vector of DAs to be acted on") +(BLOCKRECORD DISKREQUEST ((DISKDAS FULLXPOINTER) (* ; "Vector of DAs to be acted on") (DISKCAS FULLXPOINTER) (FIXEDDISKBUFFER FULLXPOINTER) (DISKERRORCODE FULLXPOINTER) @@ -279,8 +394,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co (DISKFIRSTPAGE WORD) (DISKLASTPAGE WORD) (DISKHINTLASTPAGE WORD) - (DISKVERSION WORD) (* ; - "These 3 words are for the disk label") + (DISKVERSION WORD) (* ; + "These 3 words are for the disk label") (DISKSERIAL# FIXP) (DISKACTION WORD) (LASTDISKACTION WORD) @@ -291,40 +406,40 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co (DISKNOALLOC FLAG) (NIL BITS 14) (DISKCASTORAGE 20 WORD) - (DISKDASTORAGE 60 WORD) (* ; "Or as much as you want") + (DISKDASTORAGE 60 WORD) (* ; "Or as much as you want") ) [ACCESSFNS ((DISKFID (LOCF (fetch DISKVERSION of DATUM] (CREATE (\ALLOCBLOCK (FOLDHI (IPLUS \FIXEDLENDISKREQUEST 60) WORDSPERCELL)))) -(BLOCKRECORD ALTODSKOBJ ((NIL 8 WORD) (* ; - "Alto functions to implement generic ops") - (DSKFPSYSDIR WORD) (* ; "Short pointer to SYSDIR FP") - (NIL 2 WORD) (* ; "More alto fns") - (DSKFPWORKINGDIR WORD) (* ; - "Short pointer to FP of 'working' dir") - (DSKNAMEWORKINGDIR WORD) (* ; "Short pointer to bcpl string") - (DSKLNPAGESIZE WORD) (* ; "ln[pagesize-in-words]") - (NIL 3 WORD) (* ; "More alto cruft") - (DSKKD WORD) (* ; "Short pointer to DDHEADER") - (DSKFPDISKDESCRIPTOR WORD) (* ; - "Short pointer to DiskDescriptor FP") +(BLOCKRECORD ALTODSKOBJ ((NIL 8 WORD) (* ; + "Alto functions to implement generic ops") + (DSKFPSYSDIR WORD) (* ; "Short pointer to SYSDIR FP") + (NIL 2 WORD) (* ; "More alto fns") + (DSKFPWORKINGDIR WORD) (* ; + "Short pointer to FP of 'working' dir") + (DSKNAMEWORKINGDIR WORD) (* ; "Short pointer to bcpl string") + (DSKLNPAGESIZE WORD) (* ; "ln[pagesize-in-words]") + (NIL 3 WORD) (* ; "More alto cruft") + (DSKKD WORD) (* ; "Short pointer to DDHEADER") + (DSKFPDISKDESCRIPTOR WORD) (* ; + "Short pointer to DiskDescriptor FP") (DSKDRIVE# WORD) (DSKRETRYCOUNT WORD) (DSKTOTALERRORS WORD) (DSKLENCBZ WORD) (DSKLENCB WORD) - (DSKDDHEADER 16 WORD) (* ; "Overlays DDHEADER") + (DSKDDHEADER 16 WORD) (* ; "Overlays DDHEADER") (NIL 2 WORD) - (DSKDDMGR WORD) (* ; - "DD manager, for \FLUSHDISKDESCRIPTOR") - (DSKLASTVDA WORD) (* ; - "VDA of last page allocated, for biasing search") + (DSKDDMGR WORD) (* ; + "DD manager, for \FLUSHDISKDESCRIPTOR") + (DSKLASTVDA WORD) (* ; + "VDA of last page allocated, for biasing search") (DSKSYSDIRBLK 5 WORD) (DSKDDBLK 5 WORD) (DSKWDBLK 5 WORD) - (NIL 20 WORD) (* ; "WorkingDir name") - (DSKDDVDAS 17 WORD) (* ; "VDAs for the data part of DD") + (NIL 20 WORD) (* ; "WorkingDir name") + (DSKDDVDAS 17 WORD) (* ; "VDAs for the data part of DD") ) [ACCESSFNS ALTODSKOBJ ((DDHEADER (LOCF (fetch DSKDDHEADER of DATUM]) @@ -335,17 +450,17 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co (DD#SECTORS WORD) (DDLASTSERIAL# FIXP) (NIL WORD) - (DDBTSIZE WORD) (* ; "Size of bittable in words") + (DDBTSIZE WORD) (* ; "Size of bittable in words") (DDDEFAULTVERSIONSKEPT WORD) (DDFREEPAGES WORD) (NIL 6 WORD))) (BLOCKRECORD CB ((CBQSTATUS BITS 4) - (CBNEXT POINTER) (* ; "Link to next one") - (SHORTCB POINTER) (* ; - "In alto space, what disk actually uses") - (CBPAGENO WORD) (* ; - "The page number we intended to act on with this CB") + (CBNEXT POINTER) (* ; "Link to next one") + (SHORTCB POINTER) (* ; + "In alto space, what disk actually uses") + (CBPAGENO WORD) (* ; + "The page number we intended to act on with this CB") ) (CREATE (\ALLOCBLOCK 3))) @@ -354,8 +469,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co (NIL WORD) (DLNUMCHARS WORD) (DLPAGENO WORD) - (DLFID 3 WORD) (* ; - "Version followed by 2-word serial number") + (DLFID 3 WORD) (* ; + "Version followed by 2-word serial number") )) (ACCESSFNS REALDA ((SECTOR (LRSH DATUM 12)) @@ -367,22 +482,22 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co 1)) (RESTORE (LOGAND DATUM 1)))) -(BLOCKRECORD SHORTCB ((CBLINK WORD) (* ; - "Short pointer to next in command chain, or zero") +(BLOCKRECORD SHORTCB ((CBLINK WORD) (* ; + "Short pointer to next in command chain, or zero") (CBSTATUS WORD) (CBCOMMAND WORD) - (CBHEADERADDR WORD) (* ; - "Short pointer to header record, normally CBHEADER") - (CBLABELADDR WORD) (* ; - "Short pointer to label record, normally either in this CB or in the next cb in chain") - (CBDATAADDR WORD) (* ; "Short pointer to buffer of data") - (CBWAKEUPS WORD) (* ; "These two are always zero") + (CBHEADERADDR WORD) (* ; + "Short pointer to header record, normally CBHEADER") + (CBLABELADDR WORD) (* ; + "Short pointer to label record, normally either in this CB or in the next cb in chain") + (CBDATAADDR WORD) (* ; "Short pointer to buffer of data") + (CBWAKEUPS WORD) (* ; "These two are always zero") (CBERRWAKEUPS WORD) (CBHEADER WORD) - (CBDA WORD) (* ; - "Address of this disk block. May be filled in by previous access's label pointing at my CBHEADER") - (CBLABNEXT WORD) (* ; - "Start of label field, if my CBLABELADDR points here") + (CBDA WORD) (* ; + "Address of this disk block. May be filled in by previous access's label pointing at my CBHEADER") + (CBLABNEXT WORD) (* ; + "Start of label field, if my CBLABELADDR points here") (CBLABPREV WORD) (CBLABBLANK WORD) (CBLABNUMCHARS WORD) @@ -390,8 +505,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co (CBLABVERSION WORD) (CBLABSN1 WORD) (CBLABSN2 WORD) - (CBTRUEPAGENO WORD) (* ; - "From here on is alto stuff that Lisp doesn't care about") + (CBTRUEPAGENO WORD) (* ; + "From here on is alto stuff that Lisp doesn't care about") (CBCBZ WORD) (CBNEXTSHORTCB WORD)) (BLOCKRECORD SHORTCB ((NIL WORD) @@ -422,43 +537,43 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co (BLOCKRECORD DSKOBJ ((ddPOINTER FULLXPOINTER) - (* ;; "Either points at word 2 of this structure, or at DSKOBJ:LASTSERIAL#, so that we can maintain some fields in parallel with alto OS for awhile. The next 6 words are arranged exactly as in the alto KDH structure, at least those fields we care about") + (* ;; "Either points at word 2 of this structure, or at DSKOBJ:LASTSERIAL#, so that we can maintain some fields in parallel with alto OS for awhile. The next 6 words are arranged exactly as in the alto KDH structure, at least those fields we care about") - (ddLASTSERIAL# FIXP) (* ; "Last serial number given a file") + (ddLASTSERIAL# FIXP) (* ; "Last serial number given a file") (NIL WORD) - (ddBITTABLESIZE WORD) (* ; - "Size of disk descriptor's bit table in words") + (ddBITTABLESIZE WORD) (* ; + "Size of disk descriptor's bit table in words") (NIL WORD) (ddFREEPAGES WORD) - (DSKPARTITION BITS 4) (* ; "0 or explicit partition pointer") - (ALTODSKOBJ XPOINTER) (* ; - "Pointer to alto BFSDSK structure, or NIL for disks other than current partition") + (DSKPARTITION BITS 4) (* ; "0 or explicit partition pointer") + (ALTODSKOBJ XPOINTER) (* ; + "Pointer to alto BFSDSK structure, or NIL for disks other than current partition") (SAWCHECKERROR FLAG) (DISKERRORCNT BITS 3) - (SYSDIROFD POINTER) (* ; "Stream onto SYSDIR.;1") - (DDDIRTY FLAG) (* ; - "true if diskdescriptor needs writing") - (DDVALID FLAG) (* ; - "True if DISKDESCRIPTOROFD field is ok. Invalidated on logout, etc") - (DSKPASSWORDOK FLAG) (* ; - "True after password for this partition, if any, has been validated") + (SYSDIROFD POINTER) (* ; "Stream onto SYSDIR.;1") + (DDDIRTY FLAG) (* ; + "true if diskdescriptor needs writing") + (DDVALID FLAG) (* ; + "True if DISKDESCRIPTOROFD field is ok. Invalidated on logout, etc") + (DSKPASSWORDOK FLAG) (* ; + "True after password for this partition, if any, has been validated") (NIL BITS 1) - (DISKDESCRIPTOROFD POINTER) (* ; "Stream onto DiskDescriptor.;1") - (CBQUEUE POINTER) (* ; - "Stuff for management of command blocks. No ref count because must not fault") + (DISKDESCRIPTOROFD POINTER) (* ; "Stream onto DiskDescriptor.;1") + (CBQUEUE POINTER) (* ; + "Stuff for management of command blocks. No ref count because must not fault") (CBFREEPTR FULLXPOINTER) (CBPENDINGPTR FULLXPOINTER) (CBLASTPTR FULLXPOINTER) - (CURRENTDAS FULLXPOINTER) (* ; - "Vector of DAs currently being acted on") + (CURRENTDAS FULLXPOINTER) (* ; + "Vector of DAs currently being acted on") (DISKREQUEST FULLXPOINTER) - (DISKDEVICENAME POINTER) (* ; "For retrieving the FDEV") - (DISKLASTPAGEALLOC WORD) (* ; "Bias for new page search") - (* ; "Pointer to request subrecord") + (DISKDEVICENAME POINTER) (* ; "For retrieving the FDEV") + (DISKLASTPAGEALLOC WORD) (* ; "Bias for new page search") + (* ; "Pointer to request subrecord") (CURRENTDISKPAGE WORD) (TOTALDISKERRORS WORD) - (NDISKS WORD) (* ; - "Shape of disk. Info taken from disk descriptor") + (NDISKS WORD) (* ; + "Shape of disk. Info taken from disk descriptor") (NTRACKS WORD) (NHEADS WORD) (NSECTORS WORD) @@ -513,7 +628,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co (replace FW7 of DATUM with NEWVALUE))) (ACCESSFNS M44STREAM ((DIRHOLEPTR (fetch F4 of DATUM) (replace F4 of DATUM with NEWVALUE) - ) (* ; "In dir stream only") + ) (* ; "In dir stream only") )) (CREATE (create STREAM)) LASTMAPPEDPAGE _ -1 LastPage _ 0 LastOffset _ 0) @@ -617,8 +732,19 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1990, 1992 by Venue & Xerox Co ) (\VIRTUALDISKDA -(LAMBDA (DSK REALDA) (* bvm%: "13-Feb-85 19:43") (* ; "Converts a real disk address into a virtual one") (COND ((EQ REALDA 0) \EOFDA) (T (IPLUS (ITIMES (IPLUS (ITIMES (IPLUS (ITIMES (fetch DISK of REALDA) (fetch NTRACKS of DSK)) (fetch TRACK of REALDA)) (fetch NHEADS of DSK)) (fetch HEAD of REALDA)) (fetch NSECTORS of DSK)) (fetch SECTOR of REALDA))))) -) + [LAMBDA (DSK REALDA) (* ; "Edited 13-Jun-2021 11:51 by rmk:") + (* ; + "Converts a real disk address into a virtual one") + (COND + ((EQ REALDA 0) + \EOFDA) + (T (IPLUS (ITIMES (IPLUS (ITIMES (IPLUS (ITIMES (fetch (REALDA DISK) of REALDA) + (fetch (DSKOBJ NTRACKS) of DSK)) + (fetch (REALDA TRACK) of REALDA)) + (fetch (DSKOBJ NHEADS) of DSK)) + (fetch (REALDA HEAD) of REALDA)) + (fetch (DSKOBJ NSECTORS) of DSK)) + (fetch (REALDA SECTOR) of REALDA]) (\REALDISKDA (LAMBDA (DSK VDA) (* bvm%: "18-NOV-82 21:16") (* ;; "Returns a real disk address for given virtual address") (COND ((EQ VDA \EOFDA) 0) (T (PROG ((NSECTORS (fetch NSECTORS of DSK)) (NHEADS (fetch NHEADS of DSK)) (NTRACKS (fetch NTRACKS of DSK))) (RETURN (IPLUS (LLSH (IREMAINDER VDA NSECTORS) 12) (LLSH (IREMAINDER (SETQ VDA (IQUOTIENT VDA NSECTORS)) NHEADS) 2) (LLSH (IREMAINDER (SETQ VDA (IQUOTIENT VDA NHEADS)) NTRACKS) 3) (LLSH (IQUOTIENT VDA NTRACKS) 1))))))) @@ -815,26 +941,26 @@ EVAL@COMPILE (DECLARE%: EVAL@COMPILE DONTCOPY (DECLARE%: EVAL@COMPILE -(BLOCKRECORD ISFMAP ((NIL 5 WORD) (* ; "First 5 words are a FP") - (ISFDA0 WORD) (* ; - "DA's of the first 3 pages of file") +(BLOCKRECORD ISFMAP ((NIL 5 WORD) (* ; "First 5 words are a FP") + (ISFDA0 WORD) (* ; + "DA's of the first 3 pages of file") (ISFDA1 WORD) (ISFDA2 WORD) (ISFSEAL WORD) - (ISFDISK WORD) (* ; "points to a DSKOBJ for file") - (NIL WORD) (* ; "ZONE") - (ISFLAST WORD) (* ; "offset of last entry in map") - (ISFEND WORD) (* ; "Offset of end of space for map") - (ISFONEPAGE WORD) (* ; "Last page# added to map") - (ISFONEDA WORD) (* ; "its DA") - (ISFREWRITE WORD) (* ; - "non-zero if map should be rewritten when file is extended") - (ISFCHUNKSIZE WORD) (* ; - "if file needs to be extended, do so in this size unit") - (ISFHINTLASTPAGE WORD) (* ; "Hint of last page") + (ISFDISK WORD) (* ; "points to a DSKOBJ for file") + (NIL WORD) (* ; "ZONE") + (ISFLAST WORD) (* ; "offset of last entry in map") + (ISFEND WORD) (* ; "Offset of end of space for map") + (ISFONEPAGE WORD) (* ; "Last page# added to map") + (ISFONEDA WORD) (* ; "its DA") + (ISFREWRITE WORD) (* ; + "non-zero if map should be rewritten when file is extended") + (ISFCHUNKSIZE WORD) (* ; + "if file needs to be extended, do so in this size unit") + (ISFHINTLASTPAGE WORD) (* ; "Hint of last page") (ISFMAPSTART WORD) - (* ;; "Map entries follow. Each is two words: the page number of the start of a run, followed by the vda of that first page") + (* ;; "Map entries follow. Each is two words: the page number of the start of a run, followed by the vda of that first page") )) ) @@ -873,17 +999,17 @@ EVAL@COMPILE \LASTVMEMFILEPAGE \XVmem \XVmemFmapBase \XVmemFmapHighBase \XVmemDiskBase)))) ) -(PUTPROPS LLBFS COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1990 1992)) +(PUTPROPS LLBFS COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1990 1992 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (6747 15689 (\INITBFS 6757 . 9287) (\TESTPARTITION 9289 . 9553) (\ACTONDISKPAGES 9555 . -12760) (\WRITEDISKPAGES 12762 . 14768) (\DISKERROR 14770 . 15172) (M44.SIGNAL.DISK.ERROR 15174 . 15687 -)) (39206 56182 (\ACTONVMEMPAGES 39216 . 39952) (\WRITEVMEMPAGES 39954 . 40925) (\DOACTONDISKPAGES -40927 . 44074) (\DOWRITEDISKPAGES 44076 . 48416) (\CHECKFREEPAGE 48418 . 48920) (\DODISKCOMMAND 48922 - . 51221) (\GETDISKCB 51223 . 51891) (\CLEARCB 51893 . 52041) (\CLEANUPDISKQUEUE 52043 . 55318) ( -\VIRTUALDISKDA 55320 . 55696) (\REALDISKDA 55698 . 56180)) (58189 59369 (MAKEINITBFS 58199 . 59367)) ( -59751 68034 (\M44ACTONVMEMFILE 59761 . 62222) (\LOOKUPFMAP 62224 . 63312) (\M44EXTENDVMEMFILE 63314 . -63863) (\M44DOEXTENDVMEMFILE 63865 . 67117) (\EXTENDISFMAP 67119 . 68032)) (68071 71389 ( -\EXTENDEDVMEMINIT 68081 . 69667) (\INITIALIZESWAPDISK 69669 . 70443) (\WHICHPART 70445 . 70778) ( -\SWAPDISKERROR 70780 . 71387)) (71434 73235 (DESCRIBE-VIRTUAL-MEMORY 71444 . 72688) (\PRINTFMAP 72690 - . 73233))))) + (FILEMAP (NIL (6780 19163 (\INITBFS 6790 . 9320) (\TESTPARTITION 9322 . 9586) (\ACTONDISKPAGES 9588 . +15198) (\WRITEDISKPAGES 15200 . 18242) (\DISKERROR 18244 . 18646) (M44.SIGNAL.DISK.ERROR 18648 . 19161 +)) (42680 60185 (\ACTONVMEMPAGES 42690 . 43426) (\WRITEVMEMPAGES 43428 . 44399) (\DOACTONDISKPAGES +44401 . 47548) (\DOWRITEDISKPAGES 47550 . 51890) (\CHECKFREEPAGE 51892 . 52394) (\DODISKCOMMAND 52396 + . 54695) (\GETDISKCB 54697 . 55365) (\CLEARCB 55367 . 55515) (\CLEANUPDISKQUEUE 55517 . 58792) ( +\VIRTUALDISKDA 58794 . 59699) (\REALDISKDA 59701 . 60183)) (62192 63372 (MAKEINITBFS 62202 . 63370)) ( +63754 72037 (\M44ACTONVMEMFILE 63764 . 66225) (\LOOKUPFMAP 66227 . 67315) (\M44EXTENDVMEMFILE 67317 . +67866) (\M44DOEXTENDVMEMFILE 67868 . 71120) (\EXTENDISFMAP 71122 . 72035)) (72074 75392 ( +\EXTENDEDVMEMINIT 72084 . 73670) (\INITIALIZESWAPDISK 73672 . 74446) (\WHICHPART 74448 . 74781) ( +\SWAPDISKERROR 74783 . 75390)) (75437 77238 (DESCRIBE-VIRTUAL-MEMORY 75447 . 76691) (\PRINTFMAP 76693 + . 77236))))) STOP diff --git a/sources/LLBFS.LCOM b/sources/LLBFS.LCOM index 29f046f01..9fbcec188 100644 Binary files a/sources/LLBFS.LCOM and b/sources/LLBFS.LCOM differ diff --git a/sources/LLBIGNUM.LCOM b/sources/LLBIGNUM.LCOM index 64a291e1b..a2f49541f 100644 Binary files a/sources/LLBIGNUM.LCOM and b/sources/LLBIGNUM.LCOM differ diff --git a/sources/LLCHAR b/sources/LLCHAR index d2bf072e1..c42762aed 100644 --- a/sources/LLCHAR +++ b/sources/LLCHAR @@ -1,14 +1,13 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "11-Nov-2018 13:08:04" {DSK}kaplan>Local>medley3.5>lispcore>sources>LLCHAR.;2 77794 +(FILECREATED "21-Jun-2021 18:08:19"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>LLCHAR.;6 108072 - changes to%: (FNS U-CASE L-CASE) - - previous date%: "12-Jan-94 10:12:34" -{DSK}kaplan>Local>medley3.5>lispcore>sources>LLCHAR.;1) + previous date%: "19-Jun-2021 10:00:42" +{DSK}kaplan>Local>medley3.5>git-medley>sources>LLCHAR.;5) (* ; " -Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1982-1988, 1990, 1994, 2018, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT LLCHARCOMS) @@ -44,7 +43,6 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venu (\MAXTHINCHAR 255) (\MAXFATCHAR 65535) (\MAXCHARSET 255) - (NSCHARSETSHIFT 255) (%#STRINGPWORDS 4)) (MACROS \NATOMCHARS \NSTRINGCHARS))) (INITRESOURCES \NUMSTR \NUMSTR1 \PNAMESTRING) @@ -67,39 +65,386 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venu (DEFINEQ (ALLOCSTRING -(LAMBDA (N INITCHAR OLD FATFLG) (* jop%: "23-Sep-86 17:44") (SETQ N (FIX N)) (* ; "Coerce floats at the outset") (COND ((OR (ILESSP N 0) (IGREATERP N \MaxArrayLen)) (LISPERROR "ILLEGAL ARG" N))) (COND ((NULL INITCHAR) (SETQ INITCHAR 0)) ((\CHARCODEP INITCHAR)) (T (SETQ INITCHAR (CHCON1 INITCHAR)))) (LET ((FATP (OR FATFLG (IGREATERP INITCHAR \MAXTHINCHAR))) STRINGBASE) (* ; "Allocate the block before going uninterruptable in the smashing case.") (SETQ STRINGBASE (\ALLOCBLOCK (COND (FATP (FOLDHI N WORDSPERCELL)) (T (FOLDHI N BYTESPERCELL))))) (COND ((STRINGP OLD) (UNINTERRUPTABLY (create STRINGP smashing OLD LENGTH _ N BASE _ STRINGBASE TYP _ (COND (FATP \ST.POS16) (T \ST.BYTE))))) (T (SETQ OLD (create STRINGP LENGTH _ N BASE _ STRINGBASE TYP _ (COND (FATP \ST.POS16) (T \ST.BYTE)))))) (COND ((NEQ 0 INITCHAR) (* ; "\ALLOCBLOCK always zeros the block, so don't need to initialize then") (COND (FATP (for I from 0 to (SUB1 N) do (\PUTBASEFAT STRINGBASE I INITCHAR))) (T (for I from 0 to (SUB1 N) do (\PUTBASETHIN STRINGBASE I INITCHAR))))))) OLD) -) + [LAMBDA (N INITCHAR OLD FATFLG) (* jop%: "23-Sep-86 17:44") + (SETQ N (FIX N)) (* ; "Coerce floats at the outset") + (COND + ((OR (ILESSP N 0) + (IGREATERP N \MaxArrayLen)) + (LISPERROR "ILLEGAL ARG" N))) + [COND + ((NULL INITCHAR) + (SETQ INITCHAR 0)) + ((\CHARCODEP INITCHAR)) + (T (SETQ INITCHAR (CHCON1 INITCHAR] + [LET ((FATP (OR FATFLG (IGREATERP INITCHAR \MAXTHINCHAR))) + STRINGBASE) (* ; + "Allocate the block before going uninterruptable in the smashing case.") + [SETQ STRINGBASE (\ALLOCBLOCK (COND + (FATP (FOLDHI N WORDSPERCELL)) + (T (FOLDHI N BYTESPERCELL] + [COND + [(STRINGP OLD) + (UNINTERRUPTABLY + (create STRINGP smashing OLD LENGTH _ N BASE _ STRINGBASE TYP _ + (COND + (FATP \ST.POS16) + (T \ST.BYTE))))] + (T (SETQ OLD (create STRINGP + LENGTH _ N + BASE _ STRINGBASE + TYP _ (COND + (FATP \ST.POS16) + (T \ST.BYTE] + (COND + ((NEQ 0 INITCHAR) (* ; + "\ALLOCBLOCK always zeros the block, so don't need to initialize then") + (COND + (FATP (for I from 0 to (SUB1 N) do (\PUTBASEFAT STRINGBASE I INITCHAR + ))) + (T (for I from 0 to (SUB1 N) do (\PUTBASETHIN STRINGBASE I INITCHAR] + OLD]) (MKATOM -(LAMBDA (X) (* jop%: "23-Sep-86 16:30") (COND ((STRINGP X) (\MKATOM (ffetch (STRINGP BASE) of X) (ffetch (STRINGP OFFST) of X) (LET ((LEN (ffetch (STRINGP LENGTH) of X))) (COND ((IGREATERP LEN \PNAMELIMIT) (LISPERROR "ATOM TOO LONG" X)) (T LEN))) (ffetch (STRINGP FATSTRINGP) of X))) ((OR (LITATOM X) (NUMBERP X)) X) (T (PACK* X)))) -) + [LAMBDA (X) (* jop%: "23-Sep-86 16:30") + (COND + ((STRINGP X) + (\MKATOM (ffetch (STRINGP BASE) of X) + (ffetch (STRINGP OFFST) of X) + (LET ((LEN (ffetch (STRINGP LENGTH) of X))) + (COND + ((IGREATERP LEN \PNAMELIMIT) + (LISPERROR "ATOM TOO LONG" X)) + (T LEN))) + (ffetch (STRINGP FATSTRINGP) of X))) + ((OR (LITATOM X) + (NUMBERP X)) + X) + (T (PACK* X]) (SUBATOM -(LAMBDA (X N M) (* jop%: "23-Sep-86 17:47") (PROG (BASE OFFST LEN FATP (N1 N) (M1 M)) (* ; "N1 and M1 so don't reset user arg.") (COND ((LITATOM X) (SETQ BASE (ffetch (LITATOM PNAMEBASE) of X)) (SETQ OFFST 1) (SETQ FATP (ffetch (LITATOM FATPNAMEP) of X)) (SETQ LEN (ffetch (LITATOM PNAMELENGTH) of X))) (T (SETQ LEN (OR (STRINGP X) (MKSTRING X))) (* ; "Don't reset user arg") (SETQ BASE (ffetch (STRINGP BASE) of LEN)) (SETQ FATP (ffetch (STRINGP FATSTRINGP) of LEN)) (SETQ OFFST (ffetch (STRINGP OFFST) of LEN)) (SETQ LEN (ffetch (STRINGP LENGTH) of LEN)))) (COND ((IGREATERP 0 N1) (* ; "Coerce the first index") (SETQ N1 (IPLUS N1 LEN 1)))) (COND ((NULL M1) (* ; "Coerce the second") (SETQ M1 LEN)) ((IGREATERP 0 M1) (SETQ M1 (IPLUS M1 LEN 1)))) (RETURN (AND (IGREATERP N1 0) (ILEQ N1 M1) (ILEQ M1 LEN) (\MKATOM BASE (IPLUS OFFST N1 -1) (COND ((IGREATERP (SETQ LEN (ADD1 (IDIFFERENCE M1 N1))) \PNAMELIMIT) (LISPERROR "ATOM TOO LONG" X)) (T LEN)) FATP))))) -) + [LAMBDA (X N M) (* jop%: "23-Sep-86 17:47") + (PROG (BASE OFFST LEN FATP (N1 N) + (M1 M)) (* ; + "N1 and M1 so don't reset user arg.") + [COND + ((LITATOM X) + (SETQ BASE (ffetch (LITATOM PNAMEBASE) of X)) + (SETQ OFFST 1) + (SETQ FATP (ffetch (LITATOM FATPNAMEP) of X)) + (SETQ LEN (ffetch (LITATOM PNAMELENGTH) of X))) + (T (SETQ LEN (OR (STRINGP X) + (MKSTRING X))) (* ; "Don't reset user arg") + (SETQ BASE (ffetch (STRINGP BASE) of LEN)) + (SETQ FATP (ffetch (STRINGP FATSTRINGP) of LEN)) + (SETQ OFFST (ffetch (STRINGP OFFST) of LEN)) + (SETQ LEN (ffetch (STRINGP LENGTH) of LEN] + [COND + ((IGREATERP 0 N1) (* ; "Coerce the first index") + (SETQ N1 (IPLUS N1 LEN 1] + [COND + ((NULL M1) (* ; "Coerce the second") + (SETQ M1 LEN)) + ((IGREATERP 0 M1) + (SETQ M1 (IPLUS M1 LEN 1] + (RETURN (AND (IGREATERP N1 0) + (ILEQ N1 M1) + (ILEQ M1 LEN) + (\MKATOM BASE (IPLUS OFFST N1 -1) + (COND + ((IGREATERP (SETQ LEN (ADD1 (IDIFFERENCE M1 N1))) + \PNAMELIMIT) + (LISPERROR "ATOM TOO LONG" X)) + (T LEN)) + FATP]) (CHARACTER -(LAMBDA (N) (* jop%: "23-Sep-86 17:45") (OR (\CHARCODEP N) (SETQ N (\ILLEGAL.ARG N))) (COND ((IGREATERP N \MAXTHINCHAR) (* ; "The character we're getting is NOT a thin character -- do it the hard way") (WITH-RESOURCE (\PNAMESTRING) (\PNAMESTRINGPUTCHAR (ffetch (STRINGP XBASE) of \PNAMESTRING) 0 N) (\MKATOM (ffetch (STRINGP XBASE) of \PNAMESTRING) 0 1 \FATPNAMESTRINGP))) ((IGREATERP N (CHARCODE 9)) (\ADDBASE \OneCharAtomBase (IDIFFERENCE N 10))) ((IGEQ N (CHARCODE 0)) (IDIFFERENCE N (CHARCODE 0))) (T (* ; "The common case -- just add on the one-atom base.") (\ADDBASE \OneCharAtomBase N)))) -) + [LAMBDA (N) (* jop%: "23-Sep-86 17:45") + (OR (\CHARCODEP N) + (SETQ N (\ILLEGAL.ARG N))) + (COND + ((IGREATERP N \MAXTHINCHAR) (* ; + "The character we're getting is NOT a thin character -- do it the hard way") + (WITH-RESOURCE (\PNAMESTRING) + (\PNAMESTRINGPUTCHAR (ffetch (STRINGP XBASE) of \PNAMESTRING) + 0 N) + (\MKATOM (ffetch (STRINGP XBASE) of \PNAMESTRING) + 0 1 \FATPNAMESTRINGP))) + ((IGREATERP N (CHARCODE 9)) + (\ADDBASE \OneCharAtomBase (IDIFFERENCE N 10))) + ((IGEQ N (CHARCODE 0)) + (IDIFFERENCE N (CHARCODE 0))) + (T (* ; + "The common case -- just add on the one-atom base.") + (\ADDBASE \OneCharAtomBase N]) (\PARSE.NUMBER -(LAMBDA (BASE BN LEN FATP RADIX RDTBL) (* ; "Edited 12-Feb-87 19:21 by bvm:") (* ;;; "Attempt to create a numeric atom out of the chars in BASE from BN for LEN characters (fat or thin, depending on FATP). Return NIL if the chars do not form a legal number when read in this read table.") (DECLARE (GLOBALVARS \ORIGREADTABLE)) (if (NULL RDTBL) then (SETQ RDTBL *READTABLE*)) (PROG ((I BN) (END (IPLUS BN LEN)) (STATE (QUOTE INIT)) (COMMONLISP (AND (NEQ RDTBL \ORIGREADTABLE) (fetch (READTABLEP COMMONLISP) of RDTBL))) COMMONLISPY MAXDIGIT MAXALPHADIGIT C SIGN START ENDFRAC DECPT EXPSTART NEGFRAC SIGDIGITS EXP10 SEENALPHADIGITS SEENBOGUSDIGITS) (* ; "The test for \origreadtable is a kludge so that \MKATOM can work before read tables are set up. \MKATOM calls us with RDTBL = \origreadtable, which is initially NOBIND. ") (if (NULL RADIX) then (SETQ RADIX (if COMMONLISP then *READ-BASE* else 10))) (if (GREATERP RADIX 10) then (* ; "can have alphabetic digits for large bases") (SETQ MAXALPHADIGIT (IPLUS (CHARCODE A) (IDIFFERENCE RADIX 11))) (SETQ MAXDIGIT (CHARCODE 9)) else (SETQ MAXDIGIT (IPLUS (CHARCODE 0) (SUB1 RADIX)))) (SETQ COMMONLISPY (OR COMMONLISP (AND (NEQ RDTBL \ORIGREADTABLE) (fetch (READTABLEP COMMONNUMSYNTAX) of RDTBL)))) LP (* ;; "Scan string to see what we have: a decimal integer, octal integer, or floating-point number. Once we know which we have, we can pack up the value quickly") (if (EQ I END) then (RETURN (SELECTQ STATE ((INITDIGIT AFTERQ AFTERMIDDLEDOT) (if (NOT START) then (* ; "saw no non-zero digits") 0 elseif SEENBOGUSDIGITS then (* ; "Some digits were not valid in this radix, so object is not a number. Note that there is no suffix in this case, so i is correct.") (\INVALID.INTEGER BASE START I SIGN RADIX FATP) else (\MKINTEGER BASE START (if (NEQ STATE (QUOTE INITDIGIT)) then (* ; "string ended in Q or dot") (SUB1 I) else I) (EQ SIGN (QUOTE -)) RADIX FATP))) ((INFRACTION INEXPONENT) (if SIGDIGITS then (if (NOT ENDFRAC) then (SETQ ENDFRAC I) (SETQ NEGFRAC (EQ SIGN (QUOTE -)))) (if (IGREATERP SIGDIGITS MAX.DIGITS.ACCURACY) then (* ;; "Too many digits--we will overflow. Only take as many as we can handle. Don't worry about looking at the n+1'st digit for rounding, since it won't make any difference (there are many fewer sig bits in a floatp than in a fixp)") (SETQ ENDFRAC (IPLUS START MAX.DIGITS.ACCURACY)) (if (AND (IGREATERP DECPT START) (ILESSP DECPT ENDFRAC)) then (add ENDFRAC 1))) (SETQ EXP10 (if EXPSTART then (\MKINTEGER BASE EXPSTART I (EQ SIGN (QUOTE -)) 10 FATP) else 0)) (* ; "the explicit exponent") (\FLOATINGSCALE (\MKINTEGER BASE START ENDFRAC NEGFRAC 10 FATP) (IPLUS EXP10 (IDIFFERENCE DECPT ENDFRAC) (if (ILESSP DECPT ENDFRAC) then (* ; "don't count the position the dec pt occupies") 1 else 0))) else (* ; "we saw only zeros") (FLOAT 0))) NIL))) (SETQ STATE (OR (SELCHARQ (SETQ C (\GETBASECHAR FATP BASE I)) (- (AND (NOT SIGN) (SELECTQ STATE ((INIT AFTERE) (SETQ SIGN (QUOTE -)) STATE) NIL))) (+ (AND (NOT SIGN) (SELECTQ STATE ((INIT AFTERE) (SETQ SIGN (QUOTE +)) STATE) NIL))) (%. (SETQ DECPT I) (SELECTQ STATE (INIT (QUOTE AFTERINITIALDOT)) (INITDIGIT (if SEENALPHADIGITS then (* ; "Can't have decimal point in other radices") NIL elseif COMMONLISP then (* ; "Could be decimal integer") (SETQ RADIX 10) (SETQ SEENBOGUSDIGITS NIL) (* ; "digits bigger than radix not an error any more") (QUOTE AFTERMIDDLEDOT) else (QUOTE INFRACTION))) (AFTERINITIALDOT (* ; "Two dots in a row. If symbol is ALL dots, then we have to signal an error.") (if (AND COMMONLISP (NOT SIGN) (for J from (ADD1 I) to (SUB1 END) always (EQ (\GETBASECHAR FATP BASE J) (CHARCODE %.)))) then (\INVALID.DOTTED.SYMBOL BASE BN LEN FATP) else (* ; "not all dots, started with sign, or in Interlisp read table, where it's ok -- just not a number") NIL)) NIL)) (COND ((AND (IGEQ C (CHARCODE 0)) (ILEQ C (CHARCODE 9))) (* ; "digit") (SELECTQ STATE ((INIT INITDIGIT) (IF (> C MAXDIGIT) THEN (* ; "not a digit in this radix. However, number could turn out to be decimal (integer or float), so keep going.") (SETQ SEENBOGUSDIGITS T)) (if SIGDIGITS then (add SIGDIGITS 1) elseif (NEQ C (CHARCODE 0)) then (* ; "record where first significant digit happens") (SETQ START I) (SETQ SIGDIGITS 1)) (QUOTE INITDIGIT)) ((INFRACTION AFTERINITIALDOT AFTERMIDDLEDOT) (* ; "Scanning fractional part") (if SIGDIGITS then (add SIGDIGITS 1) elseif (NEQ C (CHARCODE 0)) then (SETQ SIGDIGITS 1) (SETQ START I)) (QUOTE INFRACTION)) (AFTERE (SETQ EXPSTART I) (QUOTE INEXPONENT)) (INEXPONENT (QUOTE INEXPONENT)) NIL)) ((IGREATERP C (CHARCODE z)) (* ; "Out in the wilderness") NIL) (T (* ; "Some other non-digit") (if (AND COMMONLISPY (IGEQ C (CHARCODE a))) then (SETQ C (IDIFFERENCE C (IDIFFERENCE (CHARCODE a) (CHARCODE A))))) (if (AND MAXALPHADIGIT (IGEQ C (CHARCODE A)) (ILEQ C MAXALPHADIGIT) (NOT DECPT)) then (* ; "Letter is a digit in this base") (SELECTQ STATE ((INIT INITDIGIT) (SETQ SEENALPHADIGITS T) (if SIGDIGITS then (add SIGDIGITS 1) else (SETQ START I) (SETQ SIGDIGITS 1)) (QUOTE INITDIGIT)) NIL) elseif (EQ C (CHARCODE Q)) then (* ; "Interlisp octal specifier -- perhaps should only do this if not common lisp") (SELECTQ STATE (INITDIGIT (SETQ RADIX 8) (SETQ SEENBOGUSDIGITS NIL) (* ; "It is possible that we should check to see if all the digits are really octal digits, but that's a pain, and we never did it before in Interlisp.") (QUOTE AFTERQ)) NIL) elseif (AND (OR (EQ C (CHARCODE E)) (AND COMMONLISPY (FMEMB C (CHARCODE (D F L S))))) (NOT SEENALPHADIGITS)) then (* ; "Exponent marker. Someday there will be differences among some of these") (SELECTQ STATE ((INITDIGIT INFRACTION AFTERMIDDLEDOT) (* ; "We've seen digits and/or a fraction") (OR DECPT (SETQ DECPT I)) (SETQ ENDFRAC I) (SETQ NEGFRAC (EQ SIGN (QUOTE -))) (SETQ SIGN NIL) (QUOTE AFTERE)) NIL) elseif (AND (EQ C (CHARCODE /)) COMMONLISPY) then (* ; "Ratio marker. Must only have seen digits and possibly sign so far") (if (AND (EQ STATE (QUOTE INITDIGIT)) (NEQ (ADD1 I) END) (for J from (ADD1 I) to (SUB1 END) always (* ; "test remaining digits valid for this radix") (AND (IGEQ (SETQ C (\GETBASECHAR FATP BASE J)) (CHARCODE 0)) (OR (ILEQ C MAXDIGIT) (AND MAXALPHADIGIT (IGEQ C (CHARCODE A)) (ILEQ (if (IGEQ C (CHARCODE a)) then (IDIFFERENCE C (IDIFFERENCE (CHARCODE a) (CHARCODE A))) else C) MAXALPHADIGIT)))))) then (RETURN (if START then (/ (\MKINTEGER BASE START I (EQ SIGN (QUOTE -)) RADIX FATP) (\MKINTEGER BASE (ADD1 I) END NIL RADIX FATP)) else (* ; "saw no non-zero digits") 0))))))) (RETURN NIL))) (SETQ I (ADD1 I)) (GO LP))) -) + [LAMBDA (BASE BN LEN FATP RADIX RDTBL) (* ; "Edited 12-Feb-87 19:21 by bvm:") + +(* ;;; "Attempt to create a numeric atom out of the chars in BASE from BN for LEN characters (fat or thin, depending on FATP). Return NIL if the chars do not form a legal number when read in this read table.") + + (DECLARE (GLOBALVARS \ORIGREADTABLE)) + (if (NULL RDTBL) + then (SETQ RDTBL *READTABLE*)) + (PROG ((I BN) + (END (IPLUS BN LEN)) + (STATE 'INIT) + (COMMONLISP (AND (NEQ RDTBL \ORIGREADTABLE) + (fetch (READTABLEP COMMONLISP) of RDTBL))) + COMMONLISPY MAXDIGIT MAXALPHADIGIT C SIGN START ENDFRAC DECPT EXPSTART NEGFRAC SIGDIGITS + EXP10 SEENALPHADIGITS SEENBOGUSDIGITS) (* ; "The test for \origreadtable is a kludge so that \MKATOM can work before read tables are set up. \MKATOM calls us with RDTBL = \origreadtable, which is initially NOBIND. ") + (if (NULL RADIX) + then (SETQ RADIX (if COMMONLISP + then *READ-BASE* + else 10))) + [if (GREATERP RADIX 10) + then (* ; + "can have alphabetic digits for large bases") + (SETQ MAXALPHADIGIT (IPLUS (CHARCODE A) + (IDIFFERENCE RADIX 11))) + (SETQ MAXDIGIT (CHARCODE 9)) + else (SETQ MAXDIGIT (IPLUS (CHARCODE 0) + (SUB1 RADIX] + [SETQ COMMONLISPY (OR COMMONLISP (AND (NEQ RDTBL \ORIGREADTABLE) + (fetch (READTABLEP COMMONNUMSYNTAX) of RDTBL] + LP + + (* ;; "Scan string to see what we have: a decimal integer, octal integer, or floating-point number. Once we know which we have, we can pack up the value quickly") + + (if (EQ I END) + then (RETURN (SELECTQ STATE + ((INITDIGIT AFTERQ AFTERMIDDLEDOT) + (if (NOT START) + then (* ; "saw no non-zero digits") + 0 + elseif SEENBOGUSDIGITS + then (* ; "Some digits were not valid in this radix, so object is not a number. Note that there is no suffix in this case, so i is correct.") + (\INVALID.INTEGER BASE START I SIGN RADIX FATP) + else (\MKINTEGER BASE START + (if (NEQ STATE 'INITDIGIT) + then + (* ; "string ended in Q or dot") + (SUB1 I) + else I) + (EQ SIGN '-) + RADIX FATP))) + ((INFRACTION INEXPONENT) + (if SIGDIGITS + then [if (NOT ENDFRAC) + then (SETQ ENDFRAC I) + (SETQ NEGFRAC (EQ SIGN '-] + (if (IGREATERP SIGDIGITS MAX.DIGITS.ACCURACY) + then + + (* ;; "Too many digits--we will overflow. Only take as many as we can handle. Don't worry about looking at the n+1'st digit for rounding, since it won't make any difference (there are many fewer sig bits in a floatp than in a fixp)") + + (SETQ ENDFRAC (IPLUS START + MAX.DIGITS.ACCURACY) + ) + (if (AND (IGREATERP DECPT START) + (ILESSP DECPT ENDFRAC)) + then (add ENDFRAC 1))) + (SETQ EXP10 (if EXPSTART + then (\MKINTEGER + BASE EXPSTART I + (EQ SIGN '-) + 10 FATP) + else 0)) + (* ; "the explicit exponent") + (\FLOATINGSCALE (\MKINTEGER BASE START ENDFRAC + NEGFRAC 10 FATP) + (IPLUS EXP10 (IDIFFERENCE DECPT ENDFRAC) + (if (ILESSP DECPT ENDFRAC) + then + (* ; + "don't count the position the dec pt occupies") + 1 + else 0))) + else (* ; "we saw only zeros") + (FLOAT 0))) + NIL))) + (SETQ STATE + (OR + [SELCHARQ (SETQ C (\GETBASECHAR FATP BASE I)) + (- (AND (NOT SIGN) + (SELECTQ STATE + ((INIT AFTERE) + (SETQ SIGN '-) + STATE) + NIL))) + (+ (AND (NOT SIGN) + (SELECTQ STATE + ((INIT AFTERE) + (SETQ SIGN '+) + STATE) + NIL))) + (%. (SETQ DECPT I) + (SELECTQ STATE + (INIT 'AFTERINITIALDOT) + (INITDIGIT (if SEENALPHADIGITS + then (* ; + "Can't have decimal point in other radices") + NIL + elseif COMMONLISP + then (* ; "Could be decimal integer") + (SETQ RADIX 10) + (SETQ SEENBOGUSDIGITS NIL) + (* ; + "digits bigger than radix not an error any more") + 'AFTERMIDDLEDOT + else 'INFRACTION)) + (AFTERINITIALDOT (* ; + "Two dots in a row. If symbol is ALL dots, then we have to signal an error.") + (if [AND COMMONLISP (NOT SIGN) + (for J from (ADD1 I) to (SUB1 END) + always (EQ (\GETBASECHAR FATP BASE J) + (CHARCODE %.] + then (\INVALID.DOTTED.SYMBOL BASE BN LEN FATP) + else (* ; + "not all dots, started with sign, or in Interlisp read table, where it's ok -- just not a number") + NIL)) + NIL)) + (COND + ((AND (IGEQ C (CHARCODE 0)) + (ILEQ C (CHARCODE 9))) (* ; "digit") + (SELECTQ STATE + ((INIT INITDIGIT) + (IF (> C MAXDIGIT) + THEN (* ; "not a digit in this radix. However, number could turn out to be decimal (integer or float), so keep going.") + (SETQ SEENBOGUSDIGITS T)) + (if SIGDIGITS + then (add SIGDIGITS 1) + elseif (NEQ C (CHARCODE 0)) + then (* ; + "record where first significant digit happens") + (SETQ START I) + (SETQ SIGDIGITS 1)) + 'INITDIGIT) + ((INFRACTION AFTERINITIALDOT AFTERMIDDLEDOT) + (* ; "Scanning fractional part") + (if SIGDIGITS + then (add SIGDIGITS 1) + elseif (NEQ C (CHARCODE 0)) + then (SETQ SIGDIGITS 1) + (SETQ START I)) + 'INFRACTION) + (AFTERE (SETQ EXPSTART I) + 'INEXPONENT) + (INEXPONENT 'INEXPONENT) + NIL)) + ((IGREATERP C (CHARCODE z)) (* ; "Out in the wilderness") + NIL) + (T (* ; "Some other non-digit") + [if (AND COMMONLISPY (IGEQ C (CHARCODE a))) + then (SETQ C (IDIFFERENCE C (IDIFFERENCE (CHARCODE a) + (CHARCODE A] + (if (AND MAXALPHADIGIT (IGEQ C (CHARCODE A)) + (ILEQ C MAXALPHADIGIT) + (NOT DECPT)) + then (* ; "Letter is a digit in this base") + (SELECTQ STATE + ((INIT INITDIGIT) + (SETQ SEENALPHADIGITS T) + (if SIGDIGITS + then (add SIGDIGITS 1) + else (SETQ START I) + (SETQ SIGDIGITS 1)) + 'INITDIGIT) + NIL) + elseif (EQ C (CHARCODE Q)) + then (* ; + "Interlisp octal specifier -- perhaps should only do this if not common lisp") + (SELECTQ STATE + (INITDIGIT (SETQ RADIX 8) + (SETQ SEENBOGUSDIGITS NIL) + (* ; "It is possible that we should check to see if all the digits are really octal digits, but that's a pain, and we never did it before in Interlisp.") + 'AFTERQ) + NIL) + elseif (AND [OR (EQ C (CHARCODE E)) + (AND COMMONLISPY (FMEMB C (CHARCODE (D F L S] + (NOT SEENALPHADIGITS)) + then (* ; + "Exponent marker. Someday there will be differences among some of these") + (SELECTQ STATE + ((INITDIGIT INFRACTION AFTERMIDDLEDOT) + (* ; + "We've seen digits and/or a fraction") + (OR DECPT (SETQ DECPT I)) + (SETQ ENDFRAC I) + (SETQ NEGFRAC (EQ SIGN '-)) + (SETQ SIGN NIL) + 'AFTERE) + NIL) + elseif (AND (EQ C (CHARCODE /)) + COMMONLISPY) + then (* ; + "Ratio marker. Must only have seen digits and possibly sign so far") + (if + [AND + (EQ STATE 'INITDIGIT) + (NEQ (ADD1 I) + END) + (for J from (ADD1 I) to (SUB1 END) + always (* ; + "test remaining digits valid for this radix") + (AND (IGEQ (SETQ C (\GETBASECHAR FATP BASE J)) + (CHARCODE 0)) + (OR (ILEQ C MAXDIGIT) + (AND MAXALPHADIGIT (IGEQ C (CHARCODE A)) + (ILEQ (if (IGEQ C (CHARCODE a)) + then (IDIFFERENCE C (IDIFFERENCE + (CHARCODE a) + (CHARCODE A))) + else C) + MAXALPHADIGIT] + then (RETURN (if START + then (/ (\MKINTEGER BASE START I + (EQ SIGN '-) + RADIX FATP) + (\MKINTEGER BASE (ADD1 I) + END NIL RADIX FATP)) + else (* ; "saw no non-zero digits") + 0] + (RETURN NIL))) + (SETQ I (ADD1 I)) + (GO LP]) (\INVALID.DOTTED.SYMBOL -(LAMBDA (BASE START LEN FATP) (* ; "Edited 12-Feb-87 18:56 by bvm:") (* ;;; "Called from number parser when scanning a token that is all dots. Value returned from here is NIL to treat it as a quoted symbol or any other non-null value you'd like to return.") (CL:CERROR "Treat the dots as if they were escaped" "Invalid symbol consisting entirely of dots ~S" (\GETBASESTRING BASE START LEN FATP)) NIL) -) + [LAMBDA (BASE START LEN FATP) (* ; "Edited 12-Feb-87 18:56 by bvm:") + +(* ;;; "Called from number parser when scanning a token that is all dots. Value returned from here is NIL to treat it as a quoted symbol or any other non-null value you'd like to return.") + + (CL:CERROR "Treat the dots as if they were escaped" + "Invalid symbol consisting entirely of dots ~S" (\GETBASESTRING BASE START LEN FATP)) + NIL]) (\INVALID.INTEGER -(LAMBDA (BASE START END SIGN RADIX FATP) (* ; "Edited 12-Feb-87 19:39 by bvm:") (* ;;; "Called when scanning a token that is all digits, but some digits are not valid in this read base. Value returned from here is NIL to treat it as a symbol or a number (the default proceed case says to interpret in decimal).") (CL:CERROR "Treat the number as if in decimal radix" "Invalid integer %"~@[~A~]~A%" in read base ~D" SIGN (\GETBASESTRING BASE (if FATP then (* ;; "yecch. start arg to \getbasestring is always byte offset, whether it's fat or not. start arg to \parse.number is character number (and usually zero, apparently).") (UNFOLD START BYTESPERWORD) else START) (- END START) FATP) RADIX) (\MKINTEGER BASE START END (EQ SIGN (QUOTE -)) 10 FATP)) -) + [LAMBDA (BASE START END SIGN RADIX FATP) (* ; "Edited 12-Feb-87 19:39 by bvm:") + +(* ;;; "Called when scanning a token that is all digits, but some digits are not valid in this read base. Value returned from here is NIL to treat it as a symbol or a number (the default proceed case says to interpret in decimal).") + + (CL:CERROR "Treat the number as if in decimal radix" + "Invalid integer %"~@[~A~]~A%" in read base ~D" SIGN (\GETBASESTRING + BASE + (if FATP + then + + (* ;; "yecch. start arg to \getbasestring is always byte offset, whether it's fat or not. start arg to \parse.number is character number (and usually zero, apparently).") + + (UNFOLD START BYTESPERWORD + ) + else START) + (- END START) + FATP) + RADIX) + (\MKINTEGER BASE START END (EQ SIGN '-) + 10 FATP]) (\MKINTEGER - [LAMBDA (BASE START END NEG RADIX FATP) (* ; "Edited 13-Oct-87 11:10 by jrb:") + [LAMBDA (BASE START END NEG RADIX FATP) (* ; "Edited 13-Oct-87 11:10 by jrb:") -(* ;;; "Return integer whose Ascii characters run from START to END off BASE. If NEG is true, negate it. RADIX is the base. String is assumed to contain only digits valid in RADIX -- no error checking. For benefit of floating routines, dec pt is ignored.") +(* ;;; "Return integer whose Ascii characters run from START to END off BASE. If NEG is true, negate it. RADIX is the base. String is assumed to contain only digits valid in RADIX -- no error checking. For benefit of floating routines, dec pt is ignored.") -(* ;;; "JRB - Modified per BvM suggestion to accumulate three digits at a time (three digits insures largest legal radix (36) won't overflow a smallp). The bottom of the loop goes to great lengths to avoid computing RADIX^2 and RADIX^3 unless it absolutely has to.") +(* ;;; "JRB - Modified per BvM suggestion to accumulate three digits at a time (three digits insures largest legal radix (36) won't overflow a smallp). The bottom of the loop goes to great lengths to avoid computing RADIX^2 and RADIX^3 unless it absolutely has to.") (PROG ((VAL 0) LOOPVAL CH I RADIX2 RADIX3) @@ -108,93 +453,479 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venu (SETQ LOOPVAL 0) (SETQ I 3) (while (AND (NOT (EQ START END)) - (NOT (EQ I 0))) + (NOT (EQ I 0))) do (SETQ CH (\GETBASECHAR FATP BASE START)) - (if (NEQ CH (CHARCODE ".")) - then (* ; "ignore dec pt") - - [SETQ CH (if (IGEQ CH (CHARCODE A)) - then (* ; - "Large radix digit. Could be lowercase, so zap the 40q bit") - - (IPLUS 10 (IDIFFERENCE (LOGAND CH 95) - (CHARCODE A))) - else (IDIFFERENCE CH (CHARCODE 0] - (SETQ LOOPVAL (if NEG - then (IDIFFERENCE (ITIMES LOOPVAL RADIX) - CH) - else (IPLUS (ITIMES LOOPVAL RADIX) - CH))) - (SETQ I (SUB1 I))) - (SETQ START (ADD1 START))) + (if (NEQ CH (CHARCODE ".")) + then (* ; "ignore dec pt") + [SETQ CH (if (IGEQ CH (CHARCODE A)) + then (* ; + "Large radix digit. Could be lowercase, so zap the 40q bit") + (IPLUS 10 (IDIFFERENCE (LOGAND CH 95) + (CHARCODE A))) + else (IDIFFERENCE CH (CHARCODE 0] + (SETQ LOOPVAL (if NEG + then (IDIFFERENCE (ITIMES LOOPVAL RADIX) + CH) + else (IPLUS (ITIMES LOOPVAL RADIX) + CH))) + (SETQ I (SUB1 I))) + (SETQ START (ADD1 START))) (SETQ VAL (if (EQ VAL 0) then LOOPVAL - else [OR RADIX3 (SETQ RADIX3 (ITIMES RADIX (SETQ RADIX2 (ITIMES RADIX RADIX] - (IPLUS (ITIMES VAL (SELECTQ I - (0 RADIX3) - (1 RADIX2) - (2 RADIX) - 1)) - LOOPVAL))) + else [OR RADIX3 (SETQ RADIX3 (ITIMES RADIX (SETQ RADIX2 (ITIMES RADIX RADIX + ] + (IPLUS (ITIMES VAL (SELECTQ I + (0 RADIX3) + (1 RADIX2) + (2 RADIX) + 1)) + LOOPVAL))) (GO LP]) (MKSTRING -(LAMBDA (X FLG RDTBL) (* ; "Edited 10-Feb-87 19:09 by bvm:") (* ; "Coerce X to be a string. The string will be FAT if X is") (DECLARE (GLOBALVARS PRXFLG)) (OR (COND ((NOT FLG) (* ; "The simple case -- just gather up the characters in the item") (COND ((STRINGP X) (* ; "Strings coerce to themselves") X) ((LITATOM X) (* ; "LITATOMs have a new descriptor created, pointing to the same characters.") (create STRINGP XBASE _ (ffetch (LITATOM PNAMEBASE) of X) LENGTH _ (ffetch (LITATOM PNAMELENGTH) of X) OFFST _ 1 XREADONLY _ T TYP _ (COND ((ffetch (LITATOM FATPNAMEP) of X) \ST.POS16) (T \ST.BYTE)))) ((CL:CHARACTERP X) (* ; "CL characters are one-character strings") (ALLOCSTRING 1 (CL:CHAR-CODE X)))))) (LET ((BASE (COND (PRXFLG (\CHECKRADIX *PRINT-BASE*)) (T 10)))) (LET ((*PRINT-ESCAPE* FLG) (*READTABLE* (COND (FLG (\GTREADTABLE RDTBL)) (T *READTABLE*))) (*PRINT-RADIX* (AND FLG (NEQ BASE 10))) (*PRINT-BASE* BASE) (*PRINT-LENGTH*) (*PRINT-LEVEL*)) (* ;; "General case: internally print the name, gather up the characters") (\PRINDATUM.TO.STRING X))))) -) + [LAMBDA (X FLG RDTBL) (* ; "Edited 10-Feb-87 19:09 by bvm:") + (* ; + "Coerce X to be a string. The string will be FAT if X is") + (DECLARE (GLOBALVARS PRXFLG)) + (OR [COND + ((NOT FLG) (* ; + "The simple case -- just gather up the characters in the item") + (COND + ((STRINGP X) (* ; "Strings coerce to themselves") + X) + [(LITATOM X) (* ; + "LITATOMs have a new descriptor created, pointing to the same characters.") + (create STRINGP + XBASE _ (ffetch (LITATOM PNAMEBASE) of X) + LENGTH _ (ffetch (LITATOM PNAMELENGTH) of X) + OFFST _ 1 + XREADONLY _ T + TYP _ (COND + ((ffetch (LITATOM FATPNAMEP) of X) + \ST.POS16) + (T \ST.BYTE] + ((CL:CHARACTERP X) (* ; + "CL characters are one-character strings") + (ALLOCSTRING 1 (CL:CHAR-CODE X] + (LET [(BASE (COND + (PRXFLG (\CHECKRADIX *PRINT-BASE*)) + (T 10] + (LET ((*PRINT-ESCAPE* FLG) + (*READTABLE* (COND + (FLG (\GTREADTABLE RDTBL)) + (T *READTABLE*))) + (*PRINT-RADIX* (AND FLG (NEQ BASE 10))) + (*PRINT-BASE* BASE) + (*PRINT-LENGTH*) + (*PRINT-LEVEL*)) + + (* ;; "General case: internally print the name, gather up the characters") + + (\PRINDATUM.TO.STRING X]) (\PRINDATUM.TO.STRING -(LAMBDA (X) (* ; "Edited 9-Dec-86 11:04 by jrb:") (* ;;; "Produces a string that is the result of printing X according the current settings of *PRINT-ESCAPE* etc.") (SELECTC (NTYPX X) ((LIST \FIXP \SMALLP \FLOATP) (* ; "We know how to print numbers without extra steps") (GLOBALRESOURCE (\NUMSTR \NUMSTR1) (LET ((STR (COND ((FLOATP X) (\CONVERT.FLOATING.NUMBER X \NUMSTR \NUMSTR1)) (T (\CONVERTNUMBER X *PRINT-BASE* NIL (AND *PRINT-RADIX* *READTABLE*) \NUMSTR \NUMSTR1))))) (RPLSTRING (ALLOCSTRING (NCHARS STR)) 1 STR)))) (LET ((FATSTRINGP) (STRINGLEN 0) (STRINDEX 0) STRINGPTR *PRINT-CIRCLE-HASHTABLE* (*PRINT-CIRCLE-NUMBER* 1) THERE-ARE-CIRCLES) (DECLARE (CL:SPECIAL *PRINT-CIRCLE-HASHTABLE* *PRINT-CIRCLE-NUMBER* THERE-ARE-CIRCLES)) (* ; "If *print-circle* is on, need to scan the structure") (IF *PRINT-CIRCLE* THEN (SETQ *PRINT-CIRCLE-HASHTABLE* (CL:MAKE-HASH-TABLE)) (PRINT-CIRCLE-SCAN X) (IF (NOT THERE-ARE-CIRCLES) THEN (SETQ *PRINT-CIRCLE-HASHTABLE* NIL))) (* ;; "First count up the characters and their fatness") (\MAPPNAME.INTERNAL (FUNCTION (LAMBDA (DUMMY CODE) (COND ((GREATERP CODE \MAXTHINCHAR) (SETQ FATSTRINGP T))) (add STRINGLEN 1))) X) (* ;; "We print structures TWICE here, so we need to reset *PRINT-CIRCLE-HASHTABLE* and *PRINT-CIRCLE-NUMBER* if circles are being printed") (if *PRINT-CIRCLE-HASHTABLE* then (SETQ *PRINT-CIRCLE-NUMBER* 1) (CL:MAPHASH (CL:FUNCTION (LAMBDA (KEY VAL) (if (NUMBERP VAL) then (CL:SETF (CL:GETHASH KEY *PRINT-CIRCLE-HASHTABLE*) (QUOTE T2))))) *PRINT-CIRCLE-HASHTABLE*)) (* ;; "Then print X again actually storing the characters into the string") (SETQ STRINGPTR (ALLOCSTRING STRINGLEN NIL NIL FATSTRINGP)) (\MAPPNAME.INTERNAL (FUNCTION (LAMBDA (DUMMY CODE) (COND ((EQ STRINDEX (ffetch (STRINGP LENGTH) of STRINGPTR)) (* ; "Help! NCHARS and \MAPPNAME disagree.") (SETQ STRINGPTR (CONCAT STRINGPTR " ")))) (add STRINDEX 1) (COND ((ffetch (STRINGP FATSTRINGP) of STRINGPTR) (* ; "Fat string; just smash the character in.") (\PUTBASEFAT (fetch (STRINGP BASE) of STRINGPTR) (IPLUS (fetch (STRINGP OFFST) of STRINGPTR) STRINDEX -1) CODE)) ((ILEQ CODE \MAXTHINCHAR) (* ; "Thin char and String; just smash the char in") (\PUTBASETHIN (fetch (STRINGP BASE) of STRINGPTR) (IPLUS (fetch (STRINGP OFFST) of STRINGPTR) STRINDEX -1) CODE)) (T (* ;; "Need to fatten the string, then smash in the char. This shouldn't happen unless X gets printed different the two times!") (\FATTENSTRING STRINGPTR) (\PUTBASEFAT (fetch (STRINGP BASE) of STRINGPTR) (IPLUS (fetch (STRINGP OFFST) of STRINGPTR) STRINDEX -1) CODE))))) X) STRINGPTR))) -) + [LAMBDA (X) (* ; "Edited 9-Dec-86 11:04 by jrb:") + +(* ;;; "Produces a string that is the result of printing X according the current settings of *PRINT-ESCAPE* etc.") + + (SELECTC (NTYPX X) + ((LIST \FIXP \SMALLP \FLOATP) (* ; + "We know how to print numbers without extra steps") + (GLOBALRESOURCE (\NUMSTR \NUMSTR1) + (LET [(STR (COND + ((FLOATP X) + (\CONVERT.FLOATING.NUMBER X \NUMSTR \NUMSTR1)) + (T (\CONVERTNUMBER X *PRINT-BASE* NIL (AND *PRINT-RADIX* + *READTABLE*) + \NUMSTR \NUMSTR1] + (RPLSTRING (ALLOCSTRING (NCHARS STR)) + 1 STR)))) + (LET ((FATSTRINGP) + (STRINGLEN 0) + (STRINDEX 0) + STRINGPTR *PRINT-CIRCLE-HASHTABLE* (*PRINT-CIRCLE-NUMBER* 1) + THERE-ARE-CIRCLES) + (DECLARE (CL:SPECIAL *PRINT-CIRCLE-HASHTABLE* *PRINT-CIRCLE-NUMBER* + THERE-ARE-CIRCLES)) (* ; + "If *print-circle* is on, need to scan the structure") + (IF *PRINT-CIRCLE* + THEN (SETQ *PRINT-CIRCLE-HASHTABLE* (CL:MAKE-HASH-TABLE)) + (PRINT-CIRCLE-SCAN X) + (IF (NOT THERE-ARE-CIRCLES) + THEN (SETQ *PRINT-CIRCLE-HASHTABLE* NIL))) + + (* ;; "First count up the characters and their fatness") + + (\MAPPNAME.INTERNAL [FUNCTION (LAMBDA (DUMMY CODE) + (COND + ((GREATERP CODE \MAXTHINCHAR) + (SETQ FATSTRINGP T))) + (add STRINGLEN 1] + X) + + (* ;; "We print structures TWICE here, so we need to reset *PRINT-CIRCLE-HASHTABLE* and *PRINT-CIRCLE-NUMBER* if circles are being printed") + + (if *PRINT-CIRCLE-HASHTABLE* + then (SETQ *PRINT-CIRCLE-NUMBER* 1) + (CL:MAPHASH #'[LAMBDA (KEY VAL) + (if (NUMBERP VAL) + then (CL:SETF (CL:GETHASH KEY *PRINT-CIRCLE-HASHTABLE* + ) + 'T2] + *PRINT-CIRCLE-HASHTABLE*)) + + (* ;; "Then print X again actually storing the characters into the string") + + (SETQ STRINGPTR (ALLOCSTRING STRINGLEN NIL NIL FATSTRINGP)) + (\MAPPNAME.INTERNAL [FUNCTION (LAMBDA (DUMMY CODE) + [COND + ((EQ STRINDEX (ffetch (STRINGP LENGTH) + of STRINGPTR)) + (* ; + "Help! NCHARS and \MAPPNAME disagree.") + (SETQ STRINGPTR (CONCAT STRINGPTR " "] + (add STRINDEX 1) + (COND + ((ffetch (STRINGP FATSTRINGP) of + STRINGPTR + ) (* ; + "Fat string; just smash the character in.") + (\PUTBASEFAT (fetch (STRINGP BASE) + of STRINGPTR) + (IPLUS (fetch (STRINGP OFFST) + of STRINGPTR) + STRINDEX -1) + CODE)) + ((ILEQ CODE \MAXTHINCHAR) + (* ; + "Thin char and String; just smash the char in") + (\PUTBASETHIN (fetch (STRINGP BASE) + of STRINGPTR) + (IPLUS (fetch (STRINGP OFFST) + of STRINGPTR) + STRINDEX -1) + CODE)) + (T + + (* ;; "Need to fatten the string, then smash in the char. This shouldn't happen unless X gets printed different the two times!") + + (\FATTENSTRING STRINGPTR) + (\PUTBASEFAT (fetch (STRINGP BASE) + of STRINGPTR) + (IPLUS (fetch (STRINGP OFFST) + of STRINGPTR) + STRINDEX -1) + CODE] + X) + STRINGPTR]) (BKSYSBUF -(LAMBDA (X FLG RDTBL) (* jop%: "23-Sep-86 17:31") (PROG NIL (if (NOT FLG) then (COND ((LITATOM X) (RETURN (for C inatom X do (BKSYSCHARCODE C)))) ((STRINGP X) (RETURN (for C instring X do (BKSYSCHARCODE C)))) (T NIL))) (LET ((*READTABLE* *READTABLE*) (*PACKAGE* *PACKAGE*) TTY) (if FLG then (if RDTBL then (* ; "Use the explicit read table we were given") (SETQ *READTABLE* (\GTREADTABLE RDTBL)) elseif (NEQ (SETQ TTY (TTY.PROCESS)) (THIS.PROCESS)) then (* ; "Print it using the read environment of the destination tty") (SETQ *READTABLE* (PROCESS.EVALV TTY (QUOTE *READTABLE*))) (SETQ *PACKAGE* (PROCESS.EVALV TTY (QUOTE *PACKAGE*))))) (\MAPPNAME (FUNCTION (LAMBDA (DUMMY CODE) (BKSYSCHARCODE CODE))) X FLG RDTBL))) X) -) + [LAMBDA (X FLG RDTBL) (* jop%: "23-Sep-86 17:31") + (PROG NIL + (if (NOT FLG) + then (COND + [(LITATOM X) + (RETURN (for C inatom X do (BKSYSCHARCODE C] + [(STRINGP X) + (RETURN (for C instring X do (BKSYSCHARCODE C] + (T NIL))) + (LET ((*READTABLE* *READTABLE*) + (*PACKAGE* *PACKAGE*) + TTY) + [if FLG + then (if RDTBL + then (* ; + "Use the explicit read table we were given") + (SETQ *READTABLE* (\GTREADTABLE RDTBL)) + elseif (NEQ (SETQ TTY (TTY.PROCESS)) + (THIS.PROCESS)) + then (* ; + "Print it using the read environment of the destination tty") + (SETQ *READTABLE* (PROCESS.EVALV TTY '*READTABLE*)) + (SETQ *PACKAGE* (PROCESS.EVALV TTY '*PACKAGE*] + (\MAPPNAME [FUNCTION (LAMBDA (DUMMY CODE) + (BKSYSCHARCODE CODE] + X FLG RDTBL))) + X]) (NCHARS -(LAMBDA (X FLG RDTBL) (* jop%: "24-Sep-86 23:06") (* ;;; "Return the number of characters in (the print name of) X. If FLG, then return the number of characters in the PRIN2 version, according to RDTBL.") (PROG ((NCHARCNT 0)) (COND ((LITATOM X) (if (NOT FLG) then (* ; "Too hairy to figure out package count") (RETURN (ffetch (LITATOM PNAMELENGTH) of X)))) ((STRINGP X) (RETURN (IPLUS (ffetch (STRINGP LENGTH) of X) (COND (FLG (* ;; "2 for the enclosing quotes and an escape to quote every double quote char or escape in the string body") (IPLUS 2 (for C instring X bind (ESC _ (ffetch (READTABLEP ESCAPECHAR) of (\GTREADTABLE RDTBL))) count (OR (EQ C (CHARCODE %")) (EQ C (CHARCODE LF)) (EQ C ESC))))) (T 0)))))) (* ; "Slow case...") (\MAPPNAME (FUNCTION (LAMBDA NIL (add NCHARCNT 1))) X FLG RDTBL) (RETURN NCHARCNT))) -) + [LAMBDA (X FLG RDTBL) (* jop%: "24-Sep-86 23:06") + +(* ;;; "Return the number of characters in (the print name of) X. If FLG, then return the number of characters in the PRIN2 version, according to RDTBL.") + + (PROG ((NCHARCNT 0)) + [COND + [(LITATOM X) + (if (NOT FLG) + then (* ; + "Too hairy to figure out package count") + (RETURN (ffetch (LITATOM PNAMELENGTH) of X] + ((STRINGP X) + (RETURN (IPLUS (ffetch (STRINGP LENGTH) of X) + (COND + [FLG + (* ;; "2 for the enclosing quotes and an escape to quote every double quote char or escape in the string body") + + (IPLUS 2 (for C instring X + bind (ESC _ (ffetch (READTABLEP ESCAPECHAR) + of (\GTREADTABLE RDTBL))) + count (OR (EQ C (CHARCODE %")) + (EQ C (CHARCODE LF)) + (EQ C ESC] + (T 0] (* ; "Slow case...") + (\MAPPNAME [FUNCTION (LAMBDA NIL + (add NCHARCNT 1] + X FLG RDTBL) + (RETURN NCHARCNT]) (NTHCHARCODE -(LAMBDA (X N FLG RDTBL) (* jop%: "23-Sep-86 16:34") (PROG (BASE OFFST FATP LEN (M N)) (COND (FLG (GO SLOWCASE)) (T (COND ((STRINGP X) (SETQ BASE (ffetch (STRINGP BASE) of X)) (SETQ LEN (ffetch (STRINGP LENGTH) of X)) (SETQ OFFST (ffetch (STRINGP OFFST) of X)) (SETQ FATP (ffetch (STRINGP FATSTRINGP) of X))) ((LITATOM X) (SETQ BASE (ffetch (LITATOM PNAMEBASE) of X)) (SETQ LEN (ffetch (LITATOM PNAMELENGTH) of X)) (SETQ OFFST 1) (SETQ FATP (ffetch (LITATOM FATPNAMEP) of X))) (T (GO SLOWCASE))))) (COND ((ILESSP M 0) (* ; "Negative index counts from end") (SETQ M (IPLUS M LEN 1)))) (RETURN (COND ((OR (ILESSP M 1) (IGREATERP M LEN)) (* ; "out of range") NIL) (T (* ; "The -1 is cause strings have ORIG=1") (\GETBASECHAR FATP BASE (SUB1 (IPLUS OFFST M)))))) SLOWCASE (COND ((EQ M 0) (RETURN)) ((ILESSP M 0) (AND (ILESSP (SETQ M (IPLUS M (NCHARS X FLG RDTBL) 1)) 1) (RETURN)))) (\MAPPNAME (FUNCTION (LAMBDA (DUMMY CODE) (COND ((EQ (SETQ M (SUB1 M)) 0) (RETFROM (QUOTE NTHCHARCODE) CODE))))) X FLG RDTBL) (RETURN))) -) + [LAMBDA (X N FLG RDTBL) (* jop%: "23-Sep-86 16:34") + (PROG (BASE OFFST FATP LEN (M N)) + [COND + (FLG (GO SLOWCASE)) + (T (COND + ((STRINGP X) + (SETQ BASE (ffetch (STRINGP BASE) of X)) + (SETQ LEN (ffetch (STRINGP LENGTH) of X)) + (SETQ OFFST (ffetch (STRINGP OFFST) of X)) + (SETQ FATP (ffetch (STRINGP FATSTRINGP) of X))) + ((LITATOM X) + (SETQ BASE (ffetch (LITATOM PNAMEBASE) of X)) + (SETQ LEN (ffetch (LITATOM PNAMELENGTH) of X)) + (SETQ OFFST 1) + (SETQ FATP (ffetch (LITATOM FATPNAMEP) of X))) + (T (GO SLOWCASE] + [COND + ((ILESSP M 0) (* ; "Negative index counts from end") + (SETQ M (IPLUS M LEN 1] + [RETURN (COND + ((OR (ILESSP M 1) + (IGREATERP M LEN)) (* ; "out of range") + NIL) + (T (* ; + "The -1 is cause strings have ORIG=1") + (\GETBASECHAR FATP BASE (SUB1 (IPLUS OFFST M] + SLOWCASE + [COND + ((EQ M 0) + (RETURN)) + ((ILESSP M 0) + (AND (ILESSP (SETQ M (IPLUS M (NCHARS X FLG RDTBL) + 1)) + 1) + (RETURN] + (\MAPPNAME [FUNCTION (LAMBDA (DUMMY CODE) + (COND + ((EQ (SETQ M (SUB1 M)) + 0) + (RETFROM 'NTHCHARCODE CODE] + X FLG RDTBL) + (RETURN]) (RPLCHARCODE -(LAMBDA (X N CHAR) (* jop%: "23-Sep-86 16:36") (COND ((STRINGP X) (PROG ((LEN (ffetch (STRINGP LENGTH) of X))) (\SMASHABLESTRING X (\FATCHARCODEP CHAR)) (COND ((ILESSP N 0) (* ; "address from end") (SETQ N (IPLUS N LEN 1)))) (COND ((OR (ILESSP N 1) (IGREATERP N LEN)) (LISPERROR "ILLEGAL ARG" N))) (* ; "We assume that ORIG is 1 because X is a string") (\PUTBASECHAR (ffetch (STRINGP FATSTRINGP) of X) (ffetch (STRINGP BASE) of X) (IPLUS (ffetch (STRINGP OFFST) of X) (SUB1 N)) CHAR) (RETURN X))) (T (RPLCHARCODE (MKSTRING X) N CHAR)))) -) + [LAMBDA (X N CHAR) (* jop%: "23-Sep-86 16:36") + (COND + ((STRINGP X) + (PROG ((LEN (ffetch (STRINGP LENGTH) of X))) + (\SMASHABLESTRING X (\FATCHARCODEP CHAR)) + [COND + ((ILESSP N 0) (* ; "address from end") + (SETQ N (IPLUS N LEN 1] + (COND + ((OR (ILESSP N 1) + (IGREATERP N LEN)) + (LISPERROR "ILLEGAL ARG" N))) (* ; + "We assume that ORIG is 1 because X is a string") + (\PUTBASECHAR (ffetch (STRINGP FATSTRINGP) of X) + (ffetch (STRINGP BASE) of X) + (IPLUS (ffetch (STRINGP OFFST) of X) + (SUB1 N)) + CHAR) + (RETURN X))) + (T (RPLCHARCODE (MKSTRING X) + N CHAR]) (\RPLCHARCODE -(LAMBDA (X N CHAR) (* jop%: "23-Sep-86 16:50") (* ;;; "System version: does error checking interpreted. Compiles open as \PUTBASEFAT or \PUTBASETHIN. N must be positive, X must be a real not READONLY string") (COND ((OR (NOT (STRINGP X)) (ffetch (STRINGP READONLY) of X)) (* ; "X has to be a string, and can't be READONLY (e.g. a litatom's pname)") (LISPERROR "ILLEGAL ARG" X)) ((OR (ILEQ N 0) (IGREATERP N (ffetch (STRINGP LENGTH) of X))) (* ; "The position arg has to be inside the string's length") (LISPERROR "ILLEGAL ARG" N)) ((NOT (\CHARCODEP CHAR)) (* ; "CHAR has to be a charcode") (LISPERROR "ILLEGAL ARG" CHAR)) ((AND (IGREATERP CHAR \MAXTHINCHAR) (NOT (ffetch (STRINGP FATSTRINGP) of X))) (* ; "If the char's fat, and the string isn't, coerce it to fatness.") (\SMASHABLESTRING X T))) (\PUTBASECHAR (ffetch (STRINGP FATSTRINGP) of X) (ffetch (STRINGP BASE) of X) (IPLUS (ffetch (STRINGP OFFST) of X) (SUB1 N)) CHAR) X) -) + [LAMBDA (X N CHAR) (* jop%: "23-Sep-86 16:50") + +(* ;;; "System version: does error checking interpreted. Compiles open as \PUTBASEFAT or \PUTBASETHIN. N must be positive, X must be a real not READONLY string") + + (COND + ((OR (NOT (STRINGP X)) + (ffetch (STRINGP READONLY) of X)) (* ; + "X has to be a string, and can't be READONLY (e.g. a litatom's pname)") + (LISPERROR "ILLEGAL ARG" X)) + ((OR (ILEQ N 0) + (IGREATERP N (ffetch (STRINGP LENGTH) of X))) + (* ; + "The position arg has to be inside the string's length") + (LISPERROR "ILLEGAL ARG" N)) + ((NOT (\CHARCODEP CHAR)) (* ; "CHAR has to be a charcode") + (LISPERROR "ILLEGAL ARG" CHAR)) + ((AND (IGREATERP CHAR \MAXTHINCHAR) + (NOT (ffetch (STRINGP FATSTRINGP) of X))) + (* ; + "If the char's fat, and the string isn't, coerce it to fatness.") + (\SMASHABLESTRING X T))) + (\PUTBASECHAR (ffetch (STRINGP FATSTRINGP) of X) + (ffetch (STRINGP BASE) of X) + (IPLUS (ffetch (STRINGP OFFST) of X) + (SUB1 N)) + CHAR) + X]) (NTHCHAR -(LAMBDA (X N FLG RDTBL) (* jop%: "23-Sep-86 17:17") (LET ((CODE (NTHCHARCODE X N FLG RDTBL))) (AND CODE (FCHARACTER CODE)))) -) + [LAMBDA (X N FLG RDTBL) (* jop%: "23-Sep-86 17:17") + (LET ((CODE (NTHCHARCODE X N FLG RDTBL))) + (AND CODE (FCHARACTER CODE]) (RPLSTRING -(LAMBDA (X N Y) (* ; "Edited 24-Sep-87 11:49 by bvm:") (PROG ((OLDSTRING (OR (STRINGP X) (MKSTRING X))) (REP Y) OBASE OLEN RBASE RLEN ROFFST POS FIRSTNEW RFAT) (SETQ OLEN (ffetch (STRINGP LENGTH) of OLDSTRING)) (COND ((LITATOM REP) (SETQ RBASE (ffetch (LITATOM PNAMEBASE) of REP)) (SETQ ROFFST 1) (SETQ RLEN (ffetch (LITATOM PNAMELENGTH) of REP)) (SETQ RFAT (ffetch (LITATOM FATPNAMEP) of REP))) (T (OR (STRINGP REP) (SETQ REP (MKSTRING REP))) (SETQ RBASE (ffetch (STRINGP BASE) of REP)) (SETQ ROFFST (ffetch (STRINGP OFFST) of REP)) (SETQ RLEN (ffetch (STRINGP LENGTH) of REP)) (SETQ RFAT (ffetch (STRINGP FATSTRINGP) of REP)))) (COND ((> (+ RLEN (SETQ POS (COND ((> N 0) (SUB1 N)) (T (+ OLEN N))))) OLEN) (LISPERROR "ILLEGAL ARG" (if (> POS OLEN) then (* ; "actually, the index is wrong, without even considering the replacement") N else Y)))) (\SMASHABLESTRING OLDSTRING RFAT) (* ; "Make sure the string is writeable and of the appropriate width") (SETQ OBASE (ffetch (STRINGP BASE) of OLDSTRING)) (* ; "Note: OBASE might have changed, so not fetched until now") (SETQ FIRSTNEW (+ POS (ffetch (STRINGP OFFST) of OLDSTRING))) (* ; "Now can smash chars from RBASE into OBASE starting at position FIRSTNEW") (COND (RFAT (* ; "Fat into fat. \SMASHABLESTRING* above ensured that OLDSTRING is now fat") (\BLT (\ADDBASE OBASE FIRSTNEW) (\ADDBASE RBASE ROFFST) RLEN)) ((ffetch (STRINGP FATSTRINGP) of OLDSTRING) (* ; "Smashing thin string into a fat one") (for I from ROFFST to (SUB1 (+ ROFFST RLEN)) as J from FIRSTNEW do (\PUTBASEFAT OBASE J (\GETBASETHIN RBASE I)))) (T (* ; "Thin into thin is just byte blt") (\MOVEBYTES RBASE ROFFST OBASE FIRSTNEW RLEN))) (RETURN OLDSTRING))) -) + [LAMBDA (X N Y) (* ; "Edited 24-Sep-87 11:49 by bvm:") + (PROG ((OLDSTRING (OR (STRINGP X) + (MKSTRING X))) + (REP Y) + OBASE OLEN RBASE RLEN ROFFST POS FIRSTNEW RFAT) + (SETQ OLEN (ffetch (STRINGP LENGTH) of OLDSTRING)) + [COND + ((LITATOM REP) + (SETQ RBASE (ffetch (LITATOM PNAMEBASE) of REP)) + (SETQ ROFFST 1) + (SETQ RLEN (ffetch (LITATOM PNAMELENGTH) of REP)) + (SETQ RFAT (ffetch (LITATOM FATPNAMEP) of REP))) + (T (OR (STRINGP REP) + (SETQ REP (MKSTRING REP))) + (SETQ RBASE (ffetch (STRINGP BASE) of REP)) + (SETQ ROFFST (ffetch (STRINGP OFFST) of REP)) + (SETQ RLEN (ffetch (STRINGP LENGTH) of REP)) + (SETQ RFAT (ffetch (STRINGP FATSTRINGP) of REP] + [COND + ((> [+ RLEN (SETQ POS (COND + ((> N 0) + (SUB1 N)) + (T (+ OLEN N] + OLEN) + (LISPERROR "ILLEGAL ARG" (if (> POS OLEN) + then (* ; + "actually, the index is wrong, without even considering the replacement") + N + else Y] + (\SMASHABLESTRING OLDSTRING RFAT) (* ; + "Make sure the string is writeable and of the appropriate width") + (SETQ OBASE (ffetch (STRINGP BASE) of OLDSTRING)) + (* ; + "Note: OBASE might have changed, so not fetched until now") + (SETQ FIRSTNEW (+ POS (ffetch (STRINGP OFFST) of OLDSTRING))) + (* ; + "Now can smash chars from RBASE into OBASE starting at position FIRSTNEW") + (COND + (RFAT (* ; + "Fat into fat. \SMASHABLESTRING* above ensured that OLDSTRING is now fat") + (\BLT (\ADDBASE OBASE FIRSTNEW) + (\ADDBASE RBASE ROFFST) + RLEN)) + [(ffetch (STRINGP FATSTRINGP) of OLDSTRING) + (* ; + "Smashing thin string into a fat one") + (for I from ROFFST to (SUB1 (+ ROFFST RLEN)) as J from FIRSTNEW + do (\PUTBASEFAT OBASE J (\GETBASETHIN RBASE I] + (T (* ; "Thin into thin is just byte blt") + (\MOVEBYTES RBASE ROFFST OBASE FIRSTNEW RLEN))) + (RETURN OLDSTRING]) (SUBSTRING -(LAMBDA (X N M OLDPTR) (* jop%: "23-Sep-86 17:48") (PROG ((OLDSTRING X) (START N) (END M) FATP BASE OFFST LEN) (* ; "OLDSTRING START and END so don't reset user args") (COND ((LITATOM OLDSTRING) (SETQ BASE (ffetch (LITATOM PNAMEBASE) of OLDSTRING)) (SETQ LEN (ffetch (LITATOM PNAMELENGTH) of OLDSTRING)) (SETQ FATP (ffetch (LITATOM FATPNAMEP) of OLDSTRING)) (SETQ OFFST 1)) (T (OR (STRINGP OLDSTRING) (SETQ OLDSTRING (MKSTRING OLDSTRING))) (SETQ BASE (ffetch (STRINGP BASE) of OLDSTRING)) (SETQ LEN (ffetch (STRINGP LENGTH) of OLDSTRING)) (SETQ FATP (ffetch (STRINGP FATSTRINGP) of OLDSTRING)) (SETQ OFFST (ffetch (STRINGP OFFST) of OLDSTRING)))) (COND ((ILESSP START 0) (* ; "Coerce the first index") (SETQ START (IPLUS START LEN 1)))) (COND ((NULL END) (* ; "Now coerce the second index") (SETQ END LEN)) ((ILESSP END 0) (SETQ END (IPLUS END LEN 1)))) (RETURN (COND ((AND (IGREATERP START 0) (ILEQ START END) (ILEQ END LEN)) (UNINTERRUPTABLY (COND ((STRINGP OLDPTR) (create STRINGP smashing OLDPTR READONLY _ (LITATOM OLDSTRING) BASE _ BASE TYP _ (COND (FATP \ST.POS16) (T \ST.BYTE)) LENGTH _ (ADD1 (IDIFFERENCE END START)) OFFST _ (IPLUS START OFFST -1))) (T (SETQ OLDPTR (create STRINGP READONLY _ (LITATOM OLDSTRING) BASE _ BASE TYP _ (COND (FATP \ST.POS16) (T \ST.BYTE)) LENGTH _ (ADD1 (IDIFFERENCE END START)) OFFST _ (IPLUS START OFFST -1)))))) OLDPTR))))) -) + [LAMBDA (X N M OLDPTR) (* jop%: "23-Sep-86 17:48") + (PROG ((OLDSTRING X) + (START N) + (END M) + FATP BASE OFFST LEN) (* ; + "OLDSTRING START and END so don't reset user args") + [COND + ((LITATOM OLDSTRING) + (SETQ BASE (ffetch (LITATOM PNAMEBASE) of OLDSTRING)) + (SETQ LEN (ffetch (LITATOM PNAMELENGTH) of OLDSTRING)) + (SETQ FATP (ffetch (LITATOM FATPNAMEP) of OLDSTRING)) + (SETQ OFFST 1)) + (T (OR (STRINGP OLDSTRING) + (SETQ OLDSTRING (MKSTRING OLDSTRING))) + (SETQ BASE (ffetch (STRINGP BASE) of OLDSTRING)) + (SETQ LEN (ffetch (STRINGP LENGTH) of OLDSTRING)) + (SETQ FATP (ffetch (STRINGP FATSTRINGP) of OLDSTRING)) + (SETQ OFFST (ffetch (STRINGP OFFST) of OLDSTRING] + [COND + ((ILESSP START 0) (* ; "Coerce the first index") + (SETQ START (IPLUS START LEN 1] + [COND + ((NULL END) (* ; "Now coerce the second index") + (SETQ END LEN)) + ((ILESSP END 0) + (SETQ END (IPLUS END LEN 1] + (RETURN (COND + ((AND (IGREATERP START 0) + (ILEQ START END) + (ILEQ END LEN)) + (UNINTERRUPTABLY + [COND + ((STRINGP OLDPTR) + (create STRINGP smashing OLDPTR READONLY _ (LITATOM OLDSTRING) + BASE _ BASE TYP _ (COND + (FATP \ST.POS16) + (T \ST.BYTE)) + LENGTH _ (ADD1 (IDIFFERENCE END START)) + OFFST _ (IPLUS START OFFST -1))) + (T (SETQ OLDPTR (create STRINGP + READONLY _ (LITATOM OLDSTRING) + BASE _ BASE + TYP _ (COND + (FATP \ST.POS16) + (T \ST.BYTE)) + LENGTH _ (ADD1 (IDIFFERENCE END START)) + OFFST _ (IPLUS START OFFST -1]) + OLDPTR]) (GNC -(LAMBDA (X) (* jop%: "23-Sep-86 16:26") (LET ((CODE (GNCCODE X))) (AND CODE (FCHARACTER CODE))))) + [LAMBDA (X) (* jop%: "23-Sep-86 16:26") + (LET ((CODE (GNCCODE X))) + (AND CODE (FCHARACTER CODE]) (GNCCODE -(LAMBDA (X) (* jop%: "23-Sep-86 16:27") (COND ((STRINGP X) (LET ((LEN (fetch (STRINGP LENGTH) of X)) (OFFST (fetch (STRINGP OFFST) of X))) (COND ((NOT (EQ 0 LEN)) (PROG1 (\GETBASECHAR (ffetch (STRINGP FATSTRINGP) of X) (ffetch (STRINGP BASE) of X) OFFST) (UNINTERRUPTABLY (freplace (STRINGP OFFST) of X with (ADD1 OFFST)) (freplace (STRINGP LENGTH) of X with (SUB1 LEN)))))))) (T (NTHCHARCODE X 1)))) -) + [LAMBDA (X) (* jop%: "23-Sep-86 16:27") + (COND + [(STRINGP X) + (LET ((LEN (fetch (STRINGP LENGTH) of X)) + (OFFST (fetch (STRINGP OFFST) of X))) + (COND + ((NOT (EQ 0 LEN)) + (PROG1 (\GETBASECHAR (ffetch (STRINGP FATSTRINGP) of X) + (ffetch (STRINGP BASE) of X) + OFFST) + (UNINTERRUPTABLY + (freplace (STRINGP OFFST) of X with (ADD1 OFFST)) + (freplace (STRINGP LENGTH) of X with (SUB1 LEN))))] + (T (NTHCHARCODE X 1]) (GLC -(LAMBDA (X) (* jop%: "23-Sep-86 16:25") (LET ((CODE (GLCCODE X))) (AND CODE (FCHARACTER CODE))))) + [LAMBDA (X) (* jop%: "23-Sep-86 16:25") + (LET ((CODE (GLCCODE X))) + (AND CODE (FCHARACTER CODE]) (GLCCODE -(LAMBDA (X) (* jop%: "23-Sep-86 16:26") (COND ((STRINGP X) (LET ((LEN (SUB1 (fetch (ARRAY-HEADER FILL-POINTER) of X)))) (COND ((NOT (EQ -1 LEN)) (PROG1 (\GETBASECHAR (ffetch (STRINGP FATSTRINGP) of X) (ffetch (STRINGP BASE) of X) (IPLUS LEN (ffetch (STRINGP OFFST) of X))) (UNINTERRUPTABLY (freplace (ARRAY-HEADER FILL-POINTER-P) of X with T) (freplace (ARRAY-HEADER FILL-POINTER) of X with LEN))))))) (T (NTHCHARCODE X -1)))) -) + [LAMBDA (X) (* jop%: "23-Sep-86 16:26") + (COND + [(STRINGP X) + (LET [(LEN (SUB1 (fetch (ARRAY-HEADER FILL-POINTER) of X] + (COND + ((NOT (EQ -1 LEN)) + (PROG1 (\GETBASECHAR (ffetch (STRINGP FATSTRINGP) of X) + (ffetch (STRINGP BASE) of X) + (IPLUS LEN (ffetch (STRINGP OFFST) of X))) + (UNINTERRUPTABLY + (freplace (ARRAY-HEADER FILL-POINTER-P) of X with T) + (freplace (ARRAY-HEADER FILL-POINTER) of X with LEN)))] + (T (NTHCHARCODE X -1]) (STREQUAL - [LAMBDA (X Y) (* ; - "Edited 12-Jan-94 10:07 by sybalsky:mv:envos") + [LAMBDA (X Y) (* ; + "Edited 12-Jan-94 10:07 by sybalsky:mv:envos") (DECLARE (LOCALVARS . T)) (AND (STRINGP X) (STRINGP Y) @@ -235,10 +966,10 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venu (GO SLOWLP]) (STRING.EQUAL - [LAMBDA (X Y) (* ; - "Edited 12-Jan-94 10:01 by sybalsky:mv:envos") + [LAMBDA (X Y) (* ; + "Edited 12-Jan-94 10:01 by sybalsky:mv:envos") -(* ;;; "True if X and Y are equal atoms or strings without respect to alphabetic case") +(* ;;; "True if X and Y are equal atoms or strings without respect to alphabetic case") (PROG (CABASE LEN BASEX OFFSETX FATPX BASEY OFFSETY FATPY C1 C2) (COND @@ -283,12 +1014,12 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venu (T (RETURN NIL))) [COND ((NEQ (ffetch (ARRAYP TYP) of (\DTEST UPPERCASEARRAY 'ARRAYP)) - \ST.BYTE) (* ; - "Someone smashed UPPERCASEARRAY ?") + \ST.BYTE) (* ; + "Someone smashed UPPERCASEARRAY ?") (SETQ UPPERCASEARRAY (UPPERCASEARRAY] (SETQ CABASE (ffetch (ARRAYP BASE) of UPPERCASEARRAY)) (RETURN (COND - [(OR FATPX FATPY) (* ; "Slow case") + [(OR FATPX FATPY) (* ; "Slow case") (for BNX from OFFSETX as BNY from OFFSETY as I to LEN always (PROGN (SETQ C1 (\GETBASECHAR FATPX BASEX BNX)) @@ -296,7 +1027,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venu (COND ((OR (IGREATERP C1 \MAXTHINCHAR) (IGREATERP C2 \MAXTHINCHAR)) - (* ; "Fat chars not alphabetic") + (* ; "Fat chars not alphabetic") (EQ C1 C2)) (T (EQ (\GETBASEBYTE CABASE C1) (\GETBASEBYTE CABASE C2] @@ -305,14 +1036,32 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venu (\GETBASEBYTE CABASE (\GETBASETHIN BASEY BNY]) (STRINGP -(LAMBDA (OBJECT) (* jop%: "24-Sep-86 22:58") (AND (%%STRINGP OBJECT) OBJECT))) + [LAMBDA (OBJECT) (* jop%: "24-Sep-86 22:58") + (AND (%%STRINGP OBJECT) + OBJECT]) (CHCON1 -(LAMBDA (X) (* jop%: "23-Sep-86 17:45") (* ;;; "This is opencoded NTHCHARCODE* for the case where N=1 and FLG=NIL") (COND ((STRINGP X) (AND (NEQ (fetch (STRINGP LENGTH) of X) 0) (\GETBASECHAR (fetch (STRINGP FATSTRINGP) of X) (fetch (STRINGP BASE) of X) (fetch (STRINGP OFFST) of X)))) ((LITATOM X) (AND (NEQ (ffetch (LITATOM PNAMELENGTH) of X) 0) (\GETBASECHAR (ffetch (LITATOM FATPNAMEP) of X) (ffetch (LITATOM PNAMEBASE) of X) 1))) (T (NTHCHARCODE X 1)))) -) + [LAMBDA (X) (* jop%: "23-Sep-86 17:45") + +(* ;;; "This is opencoded NTHCHARCODE* for the case where N=1 and FLG=NIL") + + (COND + [(STRINGP X) + (AND (NEQ (fetch (STRINGP LENGTH) of X) + 0) + (\GETBASECHAR (fetch (STRINGP FATSTRINGP) of X) + (fetch (STRINGP BASE) of X) + (fetch (STRINGP OFFST) of X] + ((LITATOM X) + (AND (NEQ (ffetch (LITATOM PNAMELENGTH) of X) + 0) + (\GETBASECHAR (ffetch (LITATOM FATPNAMEP) of X) + (ffetch (LITATOM PNAMEBASE) of X) + 1))) + (T (NTHCHARCODE X 1]) (U-CASE - [LAMBDA (X) (* ; "Edited 11-Nov-2018 13:06 by rmk:") + [LAMBDA (X) (* ; "Edited 11-Nov-2018 13:06 by rmk:") (* ; "Edited 10-Feb-87 19:12 by bvm:") (COND [(LITATOM X) @@ -358,7 +1107,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venu (T X]) (L-CASE - [LAMBDA (X FLG) (* ; "Edited 11-Nov-2018 13:07 by rmk:") + [LAMBDA (X FLG) (* ; "Edited 11-Nov-2018 13:07 by rmk:") (* ; "Edited 10-Feb-87 19:12 by bvm:") (* ;; "RMK: See comment in U-CASE") @@ -421,23 +1170,94 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venu (T X]) (U-CASEP -(LAMBDA (X) (* jop%: "23-Sep-86 16:43") (COND ((LITATOM X) (for C inatom X never (AND (IGEQ C (CHARCODE a)) (ILEQ C (CHARCODE z))))) ((STRINGP X) (for C instring X never (AND (IGEQ C (CHARCODE a)) (ILEQ C (CHARCODE z))))) ((LISTP X) (AND (U-CASEP (CAR X)) (OR (NULL (CDR X)) (U-CASEP (CDR X))))) (T T))) -) + [LAMBDA (X) (* jop%: "23-Sep-86 16:43") + (COND + [(LITATOM X) + (for C inatom X never (AND (IGEQ C (CHARCODE a)) + (ILEQ C (CHARCODE z] + [(STRINGP X) + (for C instring X never (AND (IGEQ C (CHARCODE a)) + (ILEQ C (CHARCODE z] + [(LISTP X) + (AND (U-CASEP (CAR X)) + (OR (NULL (CDR X)) + (U-CASEP (CDR X] + (T T]) (\SMASHABLESTRING -(LAMBDA (STR FATP) (* gbn "18-Apr-85 00:39") (* ;; "Ensures that FATP characters can be smashed into STR") (COND ((ffetch (STRINGP READONLY) of STR) (\MAKEWRITABLESTRING STR (OR FATP (ffetch (STRINGP FATSTRINGP) of STR)))) ((AND FATP (NOT (ffetch (STRINGP FATSTRINGP) of STR))) (\FATTENSTRING STR))) STR) -) + [LAMBDA (STR FATP) (* gbn "18-Apr-85 00:39") + + (* ;; "Ensures that FATP characters can be smashed into STR") + + (COND + [(ffetch (STRINGP READONLY) of STR) + (\MAKEWRITABLESTRING STR (OR FATP (ffetch (STRINGP FATSTRINGP) of STR] + ((AND FATP (NOT (ffetch (STRINGP FATSTRINGP) of STR))) + (\FATTENSTRING STR))) + STR]) (\MAKEWRITABLESTRING -(LAMBDA (STR NEWFATP) (* jop%: "23-Sep-86 16:44") (* ;;; "takes a string pointing at a readonly pname and changes the string to point to a block of writable memory of the appropriate width") (%%MAKE-ARRAY-WRITEABLE STR) (if (AND NEWFATP (NOT (ffetch (STRINGP FATSTRINGP) of STR))) then (%%MAKE-STRING-ARRAY-FAT STR)) STR) -) + [LAMBDA (STR NEWFATP) (* jop%: "23-Sep-86 16:44") + +(* ;;; "takes a string pointing at a readonly pname and changes the string to point to a block of writable memory of the appropriate width") + + (%%MAKE-ARRAY-WRITEABLE STR) + (if (AND NEWFATP (NOT (ffetch (STRINGP FATSTRINGP) of STR))) + then (%%MAKE-STRING-ARRAY-FAT STR)) + STR]) (\SMASHSTRING -(LAMBDA (DEST POS SOURCE NC) (* jop%: "23-Sep-86 16:51") (* ;;; "copy NC characters from the string SOURCE to the string DEST starting at character POS (counting from 0) of DEST. If NC=NIL, length of SOURCE is used. DEST is presumed to be not READONLY, long enough for the smash, and to be fat if SOURCE contains any fat characters--the caller must guarantee this.") (* ; "Only caller so far is \RSTRING2 in the reader") (OR NC (SETQ NC (ffetch (STRINGP LENGTH) of SOURCE))) (add POS (ffetch (STRINGP OFFST) of DEST)) (COND ((ffetch (STRINGP FATSTRINGP) of DEST) (* ; "The destination is fat.") (COND ((ffetch (STRINGP FATSTRINGP) of SOURCE) (* ; "The source is also; just copy the characters straight across") (\BLT (\ADDBASE (ffetch (STRINGP BASE) of DEST) POS) (\ADDBASE (ffetch (STRINGP BASE) of SOURCE) (ffetch (STRINGP OFFST) of SOURCE)) NC)) (T (* ; "Have to do thin-to-fat conversion") (bind (DBASE _ (ffetch (STRINGP BASE) of DEST)) for C inthinstring SOURCE as DESTCH# from POS as SRCH# from 1 to NC do (* ; "Run thru chars 1..NC (or len) of the source, moving them into the destination") (\PUTBASEFAT DBASE DESTCH# C))))) ((ffetch (STRINGP FATSTRINGP) of SOURCE) (* ; "Assume that SOURCE is FATP with no fat characters. This is a guarantee made by \RSTRING2.") (bind (DBASE _ (ffetch (STRINGP BASE) of DEST)) for C infatstring SOURCE as DESTCH# from POS as SRCH# from 1 to NC do (* ; "Run thru chars 1..NC (or len) of the source, moving them into the destination") (AND (IGREATERP C \MAXTHINCHAR) (SHOULDNT)) (* ; "If we find an unexpected fat character, complain!") (\PUTBASETHIN DBASE DESTCH# C))) (T (* ; "The source and destination are both thin. Just copy characters.") (\MOVEBYTES (ffetch (STRINGP BASE) of SOURCE) (ffetch (STRINGP OFFST) of SOURCE) (ffetch (STRINGP BASE) of DEST) POS NC))) DEST) -) + [LAMBDA (DEST POS SOURCE NC) (* jop%: "23-Sep-86 16:51") + +(* ;;; "copy NC characters from the string SOURCE to the string DEST starting at character POS (counting from 0) of DEST. If NC=NIL, length of SOURCE is used. DEST is presumed to be not READONLY, long enough for the smash, and to be fat if SOURCE contains any fat characters--the caller must guarantee this.") + (* ; + "Only caller so far is \RSTRING2 in the reader") + (OR NC (SETQ NC (ffetch (STRINGP LENGTH) of SOURCE))) + (add POS (ffetch (STRINGP OFFST) of DEST)) + (COND + [(ffetch (STRINGP FATSTRINGP) of DEST) (* ; "The destination is fat.") + (COND + ((ffetch (STRINGP FATSTRINGP) of SOURCE) + (* ; + "The source is also; just copy the characters straight across") + (\BLT (\ADDBASE (ffetch (STRINGP BASE) of DEST) + POS) + (\ADDBASE (ffetch (STRINGP BASE) of SOURCE) + (ffetch (STRINGP OFFST) of SOURCE)) + NC)) + (T (* ; + "Have to do thin-to-fat conversion") + (bind (DBASE _ (ffetch (STRINGP BASE) of DEST)) for C  + inthinstring + SOURCE + as DESTCH# from POS as SRCH# from 1 to NC + do (* ; + "Run thru chars 1..NC (or len) of the source, moving them into the destination") + (\PUTBASEFAT DBASE DESTCH# C] + ((ffetch (STRINGP FATSTRINGP) of SOURCE) (* ; + "Assume that SOURCE is FATP with no fat characters. This is a guarantee made by \RSTRING2.") + (bind (DBASE _ (ffetch (STRINGP BASE) of DEST)) for C infatstring + SOURCE as + DESTCH# + from POS as SRCH# from 1 to NC do + (* ; + "Run thru chars 1..NC (or len) of the source, moving them into the destination") + (AND (IGREATERP C \MAXTHINCHAR) + (SHOULDNT)) + (* ; + "If we find an unexpected fat character, complain!") + (\PUTBASETHIN DBASE DESTCH# C))) + (T (* ; + "The source and destination are both thin. Just copy characters.") + (\MOVEBYTES (ffetch (STRINGP BASE) of SOURCE) + (ffetch (STRINGP OFFST) of SOURCE) + (ffetch (STRINGP BASE) of DEST) + POS NC))) + DEST]) (\FATTENSTRING -(LAMBDA (STR) (* jop%: "11-Sep-86 18:00") (%%MAKE-STRING-ARRAY-FAT STR))) + [LAMBDA (STR) (* jop%: "11-Sep-86 18:00") + (%%MAKE-STRING-ARRAY-FAT STR]) ) @@ -451,24 +1271,104 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venu (DEFINEQ (\GETBASESTRING -(LAMBDA (BASE BYTEOFFSET NCHARS FATP) (* jop%: "23-Sep-86 17:50") (* ;;; "Makes a string consisting of NCHARS characters starting at BYTEOFFSET from BASE -- note that caller must know whether the string is fat (see \PUTBASESTRING); BYTEOFFSET is always a byte offset in either case") (LET ((STR (ALLOCSTRING NCHARS NIL NIL FATP))) (\MOVEBYTES BASE BYTEOFFSET (fetch (STRINGP BASE) of STR) (fetch (STRINGP OFFST) of STR) (COND (FATP (UNFOLD NCHARS BYTESPERWORD)) (T NCHARS))) STR)) -) + [LAMBDA (BASE BYTEOFFSET NCHARS FATP) (* jop%: "23-Sep-86 17:50") + +(* ;;; "Makes a string consisting of NCHARS characters starting at BYTEOFFSET from BASE -- note that caller must know whether the string is fat (see \PUTBASESTRING); BYTEOFFSET is always a byte offset in either case") + + (LET ((STR (ALLOCSTRING NCHARS NIL NIL FATP))) + (\MOVEBYTES BASE BYTEOFFSET (fetch (STRINGP BASE) of STR) + (fetch (STRINGP OFFST) of STR) + (COND + (FATP (UNFOLD NCHARS BYTESPERWORD)) + (T NCHARS))) + STR]) (\PUTBASESTRING -(LAMBDA (BASE BYTEOFFSET SOURCE FATP) (* jop%: "23-Sep-86 16:48") (* ;; "In addition to putting the bytes into memory, this guy returns the number of characters `written' , since the source may not be a STRINGP, but will be coerced to one.") (* ;; "Not clear what this fn should do with fat strings. Caller is using this fn to store raw characters into some random location, so must make some assumption about the format they are stored in. Hence if there's a fat string, but FATP is false, we don't know what to do") (COND ((STRINGP SOURCE) (COND (FATP (\PUTBASESTRINGFAT BASE BYTEOFFSET (ffetch (STRINGP BASE) of SOURCE) (ffetch (STRINGP OFFST) of SOURCE) (ffetch (STRINGP LENGTH) of SOURCE) (ffetch (STRINGP FATSTRINGP) of SOURCE))) ((ffetch (STRINGP FATSTRINGP) of SOURCE) (for CH infatstring SOURCE as OFFSET from BYTEOFFSET do (COND ((ILEQ CH \MAXTHINCHAR) (\PUTBASEBYTE BASE OFFSET CH)) (T (ERROR "Fat string in \PUTBASESTRING" SOURCE)))) (ffetch (STRINGP LENGTH) of SOURCE)) (T (\MOVEBYTES (ffetch (STRINGP BASE) of SOURCE) (ffetch (STRINGP OFFST) of SOURCE) BASE BYTEOFFSET (SETQ SOURCE (ffetch (STRINGP LENGTH) of SOURCE))) SOURCE))) ((LITATOM SOURCE) (COND (FATP (\PUTBASESTRINGFAT BASE BYTEOFFSET (ffetch (LITATOM PNAMEBASE) of SOURCE) 1 (ffetch (LITATOM PNAMELENGTH) of SOURCE) (ffetch (LITATOM FATPNAMEP) of SOURCE))) ((ffetch (LITATOM FATPNAMEP) of SOURCE) (for CH infatatom SOURCE as OFFSET from BYTEOFFSET do (COND ((ILEQ CH \MAXTHINCHAR) (\PUTBASEBYTE BASE OFFSET CH)) (T (ERROR "Fat string in \PUTBASESTRING" SOURCE)))) (ffetch (LITATOM PNAMELENGTH) of SOURCE)) (T (\MOVEBYTES (ffetch (LITATOM PNAMEBASE) of SOURCE) 1 BASE BYTEOFFSET (SETQ SOURCE (ffetch (LITATOM PNAMELENGTH) of SOURCE))) SOURCE))) (T (\PUTBASESTRING BASE BYTEOFFSET (MKSTRING SOURCE) FATP)))) -) + [LAMBDA (BASE BYTEOFFSET SOURCE FATP) (* jop%: "23-Sep-86 16:48") + + (* ;; "In addition to putting the bytes into memory, this guy returns the number of characters `written' , since the source may not be a STRINGP, but will be coerced to one.") + + (* ;; "Not clear what this fn should do with fat strings. Caller is using this fn to store raw characters into some random location, so must make some assumption about the format they are stored in. Hence if there's a fat string, but FATP is false, we don't know what to do") + + (COND + ((STRINGP SOURCE) + (COND + (FATP (\PUTBASESTRINGFAT BASE BYTEOFFSET (ffetch (STRINGP BASE) of SOURCE) + (ffetch (STRINGP OFFST) of SOURCE) + (ffetch (STRINGP LENGTH) of SOURCE) + (ffetch (STRINGP FATSTRINGP) of SOURCE))) + ((ffetch (STRINGP FATSTRINGP) of SOURCE) + [for CH infatstring SOURCE as OFFSET from BYTEOFFSET + do (COND + ((ILEQ CH \MAXTHINCHAR) + (\PUTBASEBYTE BASE OFFSET CH)) + (T (ERROR "Fat string in \PUTBASESTRING" SOURCE] + (ffetch (STRINGP LENGTH) of SOURCE)) + (T (\MOVEBYTES (ffetch (STRINGP BASE) of SOURCE) + (ffetch (STRINGP OFFST) of SOURCE) + BASE BYTEOFFSET (SETQ SOURCE (ffetch (STRINGP LENGTH) of SOURCE))) + SOURCE))) + ((LITATOM SOURCE) + (COND + (FATP (\PUTBASESTRINGFAT BASE BYTEOFFSET (ffetch (LITATOM PNAMEBASE) of SOURCE + ) + 1 + (ffetch (LITATOM PNAMELENGTH) of SOURCE) + (ffetch (LITATOM FATPNAMEP) of SOURCE))) + ((ffetch (LITATOM FATPNAMEP) of SOURCE) + [for CH infatatom SOURCE as OFFSET from BYTEOFFSET + do (COND + ((ILEQ CH \MAXTHINCHAR) + (\PUTBASEBYTE BASE OFFSET CH)) + (T (ERROR "Fat string in \PUTBASESTRING" SOURCE] + (ffetch (LITATOM PNAMELENGTH) of SOURCE)) + (T (\MOVEBYTES (ffetch (LITATOM PNAMEBASE) of SOURCE) + 1 BASE BYTEOFFSET (SETQ SOURCE (ffetch (LITATOM PNAMELENGTH) of SOURCE)) + ) + SOURCE))) + (T (\PUTBASESTRING BASE BYTEOFFSET (MKSTRING SOURCE) + FATP]) (\PUTBASESTRINGFAT -(LAMBDA (DBASE DBYTEOFFSET SBASE SOFFSET LEN FATP) (* jop%: " 8-Sep-86 21:02") (* ;;; "Store a fat string at byte offset from DBASE. SBASE and SOFFSET are in the source's units (bytes or words)") (COND (FATP (\MOVEBYTES SBASE (UNFOLD SOFFSET BYTESPERWORD) DBASE DBYTEOFFSET (UNFOLD LEN BYTESPERWORD))) (T (* ; "Store thin string in fat format") (for I from 0 to (SUB1 LEN) as DOFF from DBYTEOFFSET by 2 do (\PUTBASETHIN DBASE DOFF 0) (\PUTBASETHIN DBASE (ADD1 DOFF) (\GETBASETHIN SBASE (IPLUS SOFFSET I)))))) LEN) -) + [LAMBDA (DBASE DBYTEOFFSET SBASE SOFFSET LEN FATP) (* jop%: " 8-Sep-86 21:02") + +(* ;;; "Store a fat string at byte offset from DBASE. SBASE and SOFFSET are in the source's units (bytes or words)") + + [COND + (FATP (\MOVEBYTES SBASE (UNFOLD SOFFSET BYTESPERWORD) + DBASE DBYTEOFFSET (UNFOLD LEN BYTESPERWORD))) + (T (* ; "Store thin string in fat format") + (for I from 0 to (SUB1 LEN) as DOFF from DBYTEOFFSET by 2 + do (\PUTBASETHIN DBASE DOFF 0) + (\PUTBASETHIN DBASE (ADD1 DOFF) + (\GETBASETHIN SBASE (IPLUS SOFFSET I] + LEN]) (GetBcplString -(LAMBDA (BASE ATOMFLG) (* jop%: "23-Sep-86 17:46") (* ;; "Returns as a Lisp string the Bcpl string stored at BS. Format is one byte length, follwed by chars. If ATOMFLG is true, returns result as an atom") (LET ((L (\GETBASEBYTE BASE 0)) S) (COND ((AND ATOMFLG (ILEQ L \PNAMELIMIT)) (\MKATOM BASE 1 L)) (T (SETQ S (\GETBASESTRING BASE 1 L)) (COND (ATOMFLG (* ; "Let MKATOM handle the error") (MKATOM S)) (T S)))))) -) + [LAMBDA (BASE ATOMFLG) (* jop%: "23-Sep-86 17:46") + + (* ;; "Returns as a Lisp string the Bcpl string stored at BS. Format is one byte length, follwed by chars. If ATOMFLG is true, returns result as an atom") + + (LET ((L (\GETBASEBYTE BASE 0)) + S) + (COND + ((AND ATOMFLG (ILEQ L \PNAMELIMIT)) + (\MKATOM BASE 1 L)) + (T (SETQ S (\GETBASESTRING BASE 1 L)) + (COND + (ATOMFLG (* ; "Let MKATOM handle the error") + (MKATOM S)) + (T S]) (SetBcplString -(LAMBDA (BASE STR) (* bvm%: " 5-Jul-85 21:50") (LET ((L (NCHARS STR))) (COND ((IGREATERP L 255) (LISPERROR "ILLEGAL ARG" BASE)) (T (\PUTBASEBYTE BASE 0 L) (\PUTBASESTRING BASE 1 STR))) BASE)) -) + [LAMBDA (BASE STR) (* bvm%: " 5-Jul-85 21:50") + (LET ((L (NCHARS STR))) + (COND + ((IGREATERP L 255) + (LISPERROR "ILLEGAL ARG" BASE)) + (T (\PUTBASEBYTE BASE 0 L) + (\PUTBASESTRING BASE 1 STR))) + BASE]) ) (DECLARE%: DONTCOPY (* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE @@ -874,8 +1774,6 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venu (RPAQQ \MAXCHARSET 255) -(RPAQQ NSCHARSETSHIFT 255) - (RPAQQ %#STRINGPWORDS 4) @@ -884,7 +1782,6 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venu (\MAXTHINCHAR 255) (\MAXFATCHAR 65535) (\MAXCHARSET 255) - (NSCHARSETSHIFT 255) (%#STRINGPWORDS 4)) ) (DECLARE%: EVAL@COMPILE @@ -910,12 +1807,54 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venu (DEFINEQ (%%COPY-ONED-ARRAY -(LAMBDA (LOCAL-ARRAY) (* jop%: "24-Sep-86 17:51") (PROG ((SIZE (LOCAL (ffetch (ONED-ARRAY TOTAL-SIZE) of LOCAL-ARRAY))) (BASE (LOCAL (ffetch (ONED-ARRAY BASE) of LOCAL-ARRAY))) (OFFSET (LOCAL (ffetch (ONED-ARRAY OFFSET) of LOCAL-ARRAY))) (TYPENUMBER (LOCAL (ffetch (ONED-ARRAY TYPE-NUMBER) of LOCAL-ARRAY))) NCELLS REMOTE-ARRAY REMOTE-BASE) (if (NEQ OFFSET 0) then (ERROR "Can't copy an array with non-zero offset")) (if (EQ (%%TYPENUMBER-TO-GC-TYPE TYPENUMBER) PTRBLOCK.GCT) then (ERROR "Can't copy pointer arrays")) (SETQ NCELLS (FOLDHI (ITIMES (IPLUS SIZE OFFSET) (%%TYPENUMBER-TO-BITS-PER-ELEMENT TYPENUMBER)) BITSPERCELL)) (SETQ REMOTE-ARRAY (create ONED-ARRAY BASE _ (\ALLOCBLOCK NCELLS) STRING-P _ (%%CHAR-TYPE-P TYPENUMBER) FILL-POINTER-P _ (LOCAL (ffetch (ONED-ARRAY FILL-POINTER-P) of LOCAL-ARRAY)) TYPE-NUMBER _ TYPENUMBER FILL-POINTER _ (LOCAL (ffetch (ONED-ARRAY FILL-POINTER) of LOCAL-ARRAY)) TOTAL-SIZE _ SIZE)) (SETQ REMOTE-BASE (ffetch (ONED-ARRAY BASE) of REMOTE-ARRAY)) (for I from 0 to (SUB1 (LLSH NCELLS 1)) do (\PUTBASE REMOTE-BASE I (LOCAL (\GETBASE BASE I)))) (RETURN REMOTE-ARRAY))) -) + [LAMBDA (LOCAL-ARRAY) (* jop%: "24-Sep-86 17:51") + (PROG ((SIZE (LOCAL (ffetch (ONED-ARRAY TOTAL-SIZE) of LOCAL-ARRAY))) + (BASE (LOCAL (ffetch (ONED-ARRAY BASE) of LOCAL-ARRAY))) + (OFFSET (LOCAL (ffetch (ONED-ARRAY OFFSET) of LOCAL-ARRAY))) + (TYPENUMBER (LOCAL (ffetch (ONED-ARRAY TYPE-NUMBER) of LOCAL-ARRAY))) + NCELLS REMOTE-ARRAY REMOTE-BASE) + (if (NEQ OFFSET 0) + then (ERROR "Can't copy an array with non-zero offset")) + (if (EQ (%%TYPENUMBER-TO-GC-TYPE TYPENUMBER) + PTRBLOCK.GCT) + then (ERROR "Can't copy pointer arrays")) + (SETQ NCELLS (FOLDHI (ITIMES (IPLUS SIZE OFFSET) + (%%TYPENUMBER-TO-BITS-PER-ELEMENT TYPENUMBER)) + BITSPERCELL)) + (SETQ REMOTE-ARRAY (create ONED-ARRAY + BASE _ (\ALLOCBLOCK NCELLS) + STRING-P _ (%%CHAR-TYPE-P TYPENUMBER) + FILL-POINTER-P _ (LOCAL (ffetch (ONED-ARRAY FILL-POINTER-P) + of LOCAL-ARRAY)) + TYPE-NUMBER _ TYPENUMBER + FILL-POINTER _ (LOCAL (ffetch (ONED-ARRAY FILL-POINTER) + of LOCAL-ARRAY)) + TOTAL-SIZE _ SIZE)) + (SETQ REMOTE-BASE (ffetch (ONED-ARRAY BASE) of REMOTE-ARRAY)) + [for I from 0 to (SUB1 (LLSH NCELLS 1)) + do (\PUTBASE REMOTE-BASE I (LOCAL (\GETBASE BASE I] + (RETURN REMOTE-ARRAY]) (%%COPY-STRING-TO-ARRAY -(LAMBDA (LOCAL-STRING) (* jop%: "24-Sep-86 17:51") (* ;;; "Only handles thin strings") (PROG ((SIZE (LOCAL (NCHARS LOCAL-STRING))) REMOTE-BASE REMOTE-ARRAY) (SETQ REMOTE-BASE (\ALLOCBLOCK (FOLDHI (ITIMES SIZE 8) BITSPERCELL))) (SETQ REMOTE-ARRAY (create ONED-ARRAY BASE _ REMOTE-BASE STRING-P _ T TYPE-NUMBER _ %%THIN-CHAR-TYPENUMBER FILL-POINTER _ SIZE TOTAL-SIZE _ SIZE)) (for I from 0 to (SUB1 SIZE) do (\PUTBASEBYTE REMOTE-BASE I (LOCAL (NTHCHARCODE LOCAL-STRING (ADD1 I))))) (RETURN REMOTE-ARRAY))) -) + [LAMBDA (LOCAL-STRING) (* jop%: "24-Sep-86 17:51") + +(* ;;; "Only handles thin strings") + + (PROG ((SIZE (LOCAL (NCHARS LOCAL-STRING))) + REMOTE-BASE REMOTE-ARRAY) + (SETQ REMOTE-BASE (\ALLOCBLOCK (FOLDHI (ITIMES SIZE 8) + BITSPERCELL))) + (SETQ REMOTE-ARRAY + (create ONED-ARRAY + BASE _ REMOTE-BASE + STRING-P _ T + TYPE-NUMBER _ %%THIN-CHAR-TYPENUMBER + FILL-POINTER _ SIZE + TOTAL-SIZE _ SIZE)) + [for I from 0 to (SUB1 SIZE) do (\PUTBASEBYTE REMOTE-BASE I + (LOCAL (NTHCHARCODE LOCAL-STRING + (ADD1 I] + (RETURN REMOTE-ARRAY]) ) @@ -948,18 +1887,18 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1994, 2018 by Venu (PUTPROPS LLCHAR FILETYPE :FAKE-COMPILE-FILE) (PUTPROPS LLCHAR COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1988 1990 1994 -2018)) +2018 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (4114 46325 (ALLOCSTRING 4124 . 5196) (MKATOM 5198 . 5544) (SUBATOM 5546 . 6518) ( -CHARACTER 6520 . 7132) (\PARSE.NUMBER 7134 . 13696) (\INVALID.DOTTED.SYMBOL 13698 . 14129) ( -\INVALID.INTEGER 14131 . 14906) (\MKINTEGER 14908 . 17475) (MKSTRING 17477 . 18549) ( -\PRINDATUM.TO.STRING 18551 . 21148) (BKSYSBUF 21150 . 21885) (NCHARS 21887 . 22721) (NTHCHARCODE 22723 - . 23755) (RPLCHARCODE 23757 . 24312) (\RPLCHARCODE 24314 . 25266) (NTHCHAR 25268 . 25407) (RPLSTRING -25409 . 27103) (SUBSTRING 27105 . 28486) (GNC 28488 . 28594) (GNCCODE 28596 . 29011) (GLC 29013 . -29119) (GLCCODE 29121 . 29562) (STREQUAL 29564 . 31678) (STRING.EQUAL 31680 . 35738) (STRINGP 35740 . -35831) (CHCON1 35833 . 36305) (U-CASE 36307 . 39530) (L-CASE 39532 . 43388) (U-CASEP 43390 . 43708) ( -\SMASHABLESTRING 43710 . 44038) (\MAKEWRITABLESTRING 44040 . 44388) (\SMASHSTRING 44390 . 46229) ( -\FATTENSTRING 46231 . 46323)) (46510 50025 (\GETBASESTRING 46520 . 47023) (\PUTBASESTRING 47025 . -48829) (\PUTBASESTRINGFAT 48831 . 49370) (GetBcplString 49372 . 49809) (SetBcplString 49811 . 50023)) -(75312 76991 (%%COPY-ONED-ARRAY 75322 . 76454) (%%COPY-STRING-TO-ARRAY 76456 . 76989))))) + (FILEMAP (NIL (3970 73876 (ALLOCSTRING 3980 . 6003) (MKATOM 6005 . 6640) (SUBATOM 6642 . 8512) ( +CHARACTER 8514 . 9518) (\PARSE.NUMBER 9520 . 25240) (\INVALID.DOTTED.SYMBOL 25242 . 25737) ( +\INVALID.INTEGER 25739 . 27191) (\MKINTEGER 27193 . 29900) (MKSTRING 29902 . 32045) ( +\PRINDATUM.TO.STRING 32047 . 38225) (BKSYSBUF 38227 . 39761) (NCHARS 39763 . 41463) (NTHCHARCODE 41465 + . 43511) (RPLCHARCODE 43513 . 44574) (\RPLCHARCODE 44576 . 46111) (NTHCHAR 46113 . 46306) (RPLSTRING +46308 . 49519) (SUBSTRING 49521 . 52444) (GNC 52446 . 52619) (GNCCODE 52621 . 53389) (GLC 53391 . +53564) (GLCCODE 53566 . 54331) (STREQUAL 54333 . 56447) (STRING.EQUAL 56449 . 60507) (STRINGP 60509 . +60660) (CHCON1 60662 . 61449) (U-CASE 61451 . 64678) (L-CASE 64680 . 68540) (U-CASEP 68542 . 69116) ( +\SMASHABLESTRING 69118 . 69580) (\MAKEWRITABLESTRING 69582 . 70018) (\SMASHSTRING 70020 . 73726) ( +\FATTENSTRING 73728 . 73874)) (74061 79223 (\GETBASESTRING 74071 . 74725) (\PUTBASESTRING 74727 . +77466) (\PUTBASESTRINGFAT 77468 . 78214) (GetBcplString 78216 . 78881) (SetBcplString 78883 . 79221)) +(104450 107264 (%%COPY-ONED-ARRAY 104460 . 106310) (%%COPY-STRING-TO-ARRAY 106312 . 107262))))) STOP diff --git a/sources/LLCHAR.LCOM b/sources/LLCHAR.LCOM index f7f47d3be..032a8d992 100644 Binary files a/sources/LLCHAR.LCOM and b/sources/LLCHAR.LCOM differ diff --git a/sources/LLCODE.LCOM b/sources/LLCODE.LCOM index 7f9acf781..2a14a2ee1 100644 Binary files a/sources/LLCODE.LCOM and b/sources/LLCODE.LCOM differ diff --git a/sources/LLDISPLAY.LCOM b/sources/LLDISPLAY.LCOM index 699b5386e..7e706bd85 100644 --- a/sources/LLDISPLAY.LCOM +++ b/sources/LLDISPLAY.LCOM @@ -1,17 +1,17 @@ -(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED "25-Jan-98 15:41:01" ("compiled on " {DSK}sources>LLDISPLAY.;4) "30-Mar-95 20:33:04" "COMPILE-FILEd" in "Medley 14-Aug-95 ..." dated "14-Aug-95 15:27:48") (FILECREATED "18-Apr-94 00:20:42" {DSK}nilsson>mnw>LLDISPLAY.;7 267646 changes to%: (FNS \BACKCOLOR.DISPLAY DSPTEXTURE \DSPRESET.DISPLAY \MEDW.XOFFSET \MEDW.YOFFSET DSPXOFFSET DSPYOFFSET) ( VARS LLDISPLAYCOMS) previous date%: "25-Feb-94 17:56:47" {DSK}nilsson>mnw>LLDISPLAY.;6) (RPAQQ LLDISPLAYCOMS ((DECLARE%: DONTCOPY (EXPORT (RECORDS PILOTBBT \DISPLAYDATA DISPLAYSTATE DISPLAYINFO) (MACROS \GETDISPLAYDATA))) (* ; "User-visible records are on ADISPLAY --- must be init'ed here") (INITRECORDS BITMAP PILOTBBT REGION \DISPLAYDATA) (COMS (* ; "BITMASKS") (FNS \FBITMAPBIT \FBITMAPBIT.UFN \NEWPAGE.DISPLAY INITBITMASKS) ( OPTIMIZERS \FBITMAPBIT) (EXPORT (DECLARE%: DONTCOPY (MACROS \BITMASK \4BITMASK \NOTBITMASK \NOT4BITMASK) (GLOBALVARS BITMASKARRAY NOTBITMASKARRAY 4BITMASKARRAY NOT4BITMASKARRAY) (CONSTANTS ( WORDMASK 65535)))) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (INITBITMASKS)))) (COMS (* ; "init cursor") (FNS \CreateCursorBitMap) (DECLARE%: DONTEVAL@LOAD DOCOPY (VARS (CursorBitMap (\CreateCursorBitMap))))) ( COMS (* ; "bitmap functions.") (FNS BITBLT BLTSHADE \BITBLTSUB \GETPILOTBBTSCRATCHBM BITMAPCOPY BITMAPCREATE BITMAPBIT BLTCHAR \BLTCHAR \MEDW.BLTCHAR \CHANGECHARSET.DISPLAY \INDICATESTRING \SLOWBLTCHAR TEXTUREP INVERT.TEXTURE INVERT.TEXTURE.BITMAP BITMAPWIDTH READBITMAP \INSUREBITSPERPIXEL MAXIMUMCOLOR OPPOSITECOLOR MAXIMUMSHADE OPPOSITESHADE \MEDW.BITBLT) (FUNCTIONS FINISH-READING-BITMAP) (CONSTANTS (MINIMUMCOLOR 0) (MINIMUMSHADE 0)) (P (MOVD (QUOTE BITMAPBIT) (QUOTE \BITMAPBIT))) ( DECLARE%: DONTCOPY (EXPORT (MACROS \INVALIDATEDISPLAYCACHE))) (OPTIMIZERS BITMAPBIT BITMAPP) (FNS BITMAPBIT.EXPANDER) (FNS \BITBLT.DISPLAY \BITBLT.BITMAP \BITBLT.MERGE \BLTSHADE.DISPLAY \BLTSHADE.BITMAP) (FNS (* ;; "For SunLoadup") \BITBLT.BITMAP.SLOW) (FNS (* ;; " punt case for C funcs.bitblt_bitmap,bitshade.bitmap") \PUNT.BLTSHADE.BITMAP \PUNT.BITBLT.BITMAP) ( FNS (* ;; "from SUMEX-AIM") \SCALEDBITBLT.DISPLAY \BACKCOLOR.DISPLAY) (DECLARE%: DONTCOPY (CONSTANTS ( \DisplayWordAlign 16) (\MaxBitMapWidth 65535) (\MaxBitMapHeight 65535) (\MaxBitMapWords 131066)) ( EXPORT (MACROS \DSPGETCHARWIDTH \DSPGETCHARIMAGEWIDTH \DSPGETCHAROFFSET \CONVERTOP \SFInvert \SFReplicate \SETPBTFUNCTION \BITBLT1)) (GLOBALVARS \SYSBBTEXTURE \BBSCRATCHTEXTURE \SYSPILOTBBT \PILOTBBTSCRATCHBM)) (VARS (\BBSCRATCHTEXTURE) (\PILOTBBTSCRATCHBM)) (DECLARE%: DONTEVAL@LOAD DOCOPY ( P (MOVD? (QUOTE BITBLT) (QUOTE BKBITBLT)))) (* ; "macro for this file so that BITBLT can be broken by users") (EXPORT (DECLARE%: DONTCOPY DONTEVAL@LOAD DOEVAL@COMPILE (P (PUTPROP (QUOTE BITBLT) (QUOTE MACRO) (QUOTE (= . BKBITBLT))))))) (COMS (* ; "display stream functions") (FNS DISPLAYSTREAMP DSPSOURCETYPE DSPXOFFSET DSPYOFFSET) (FNS DSPCREATE DSPDESTINATION DSPTEXTURE \DISPLAYSTREAMINCRXPOSITION \SFFixDestination \SFFixClippingRegion \SFFixFont \SFFIXLINELENGTH \UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD \SFFixY) (FNS \MEDW.XOFFSET \MEDW.YOFFSET) (FNS \DSPCLIPPINGREGION.DISPLAY \DSPFONT.DISPLAY \DISPLAY.PILOTBITBLT \DSPLINEFEED.DISPLAY \DSPLEFTMARGIN.DISPLAY \DSPOPERATION.DISPLAY \DSPRIGHTMARGIN.DISPLAY \DSPXPOSITION.DISPLAY \DSPYPOSITION.DISPLAY) (P (MOVD? (QUOTE \ILLEGAL.ARG) (QUOTE \COERCETODS)) ( MOVD? (QUOTE NILL) (QUOTE WFROMDS)) (MOVD? (QUOTE NILL) (QUOTE WINDOWP)) (MOVD? (QUOTE NILL) (QUOTE INVERTW))) (INITVARS (PROMPTWINDOW T) (\WINDOWWORLD NIL) (\MAINSCREEN NIL))) (COMS (* ; "Stub for window package") (INITVARS (\TOPWDS) (\SCREENBITMAPS)) (P (MOVD? (QUOTE NILL) (QUOTE \TOTOPWDS))) (DECLARE%: DONTCOPY EVAL@COMPILE (EXPORT (MACROS \INSURETOPWDS .WHILE.TOP.DS. .WHILE.CURSOR.DOWN.) (ADDVARS (GLOBALVARS \TOPWDS))))) (COMS (* ; "DisplayStream TTY functions") (FNS TTYDISPLAYSTREAM) (EXPORT (OPTIMIZERS TTYDISPLAYSTREAM)) (FNS DSPSCROLL PAGEHEIGHT) (INITVARS ( \CURRENTTTYDEVICE (QUOTE BCPLDISPLAY))) (FNS \DSPRESET.DISPLAY) (COMS (INITVARS (*DRIBBLE-OUTPUT* NIL) ) (FUNCTIONS \MAYBE-DRIBBLE-CHAR) (FNS \DSPPRINTCHAR \DSPPRINTCR/LF)) (FNS \TTYBACKGROUND) (FNS DSPBACKUP) (INITVARS (\CARET.UP)) (DECLARE%: DONTEVAL@LOAD DOCOPY (VARS (BELLCNT 2) (BELLRATE 60) ( \DisplayStoppedForLogout) (TtyDisplayStream))) (FNS COLORDISPLAYP) (FNS DISPLAYBEFOREEXIT DISPLAYAFTERENTRY) (EXPORT (GLOBALVARS BELLCNT BELLRATE TTYBACKGROUNDFNS \DisplayStoppedForLogout \CARET.UP) (MACROS \CHECKCARET))) (COMS (* ; "transformation related functions.") (FNS \DSPCLIPTRANSFORMX \DSPCLIPTRANSFORMY \DSPTRANSFORMREGION \DSPUNTRANSFORMY \DSPUNTRANSFORMX \OFFSETCLIPPINGREGION) (DECLARE%: DONTCOPY (EXPORT (MACROS \DSPTRANSFORMX \DSPTRANSFORMY \OFFSETBOTTOM \OFFSETLEFT)))) (COMS (* ; "screen related functions") (FNS UPDATESCREENDIMENSIONS \CreateScreenBitMap) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (UPDATESCREENDIMENSIONS)) (INITVARS ( SCREENHEIGHT 808) (SCREENWIDTH 1024) (\OLDSCREENHEIGHT 808) (\OLDSCREENWIDTH 1024) (\MaxScreenPage -1) (ScreenBitMap (\CreateScreenBitMap SCREENWIDTH SCREENHEIGHT)) (ColorScreenBitMap NIL))) (GLOBALVARS \OLDSCREENHEIGHT \OLDSCREENWIDTH \MaxScreenPage ScreenBitMap) (DECLARE%: DONTEVAL@LOAD DOCOPY (P ( CURSOR.INIT)))) (COMS (* ; "initialization") (INITVARS (\DISPLAYINFOALIST)) (FNS \CoerceToDisplayDevice \CREATEDISPLAY DISPLAYSTREAMINIT \STARTDISPLAY \MOVE.WINDOWS.ONTO.SCREEN \UPDATE.PBT.RASTERWIDTHS \STOPDISPLAY \DEFINEDISPLAYINFO) (DECLARE%: EVAL@COMPILE DONTCOPY (ADDVARS ( DONTCOMPILEFNS \UPDATE.PBT.RASTERWIDTHS))) (EXPORT (MACROS DISPLAYINITIALIZEDP DISPLAYSTARTEDP) ( GLOBALVARS \DisplayStarted \DisplayStreamsInitialized \DisplayInitialed WHOLEDISPLAY WHOLESCREEN SCREENWIDTH SCREENHEIGHT)) (ADDVARS (GLOBALVARS WHOLESCREEN)) (FNS INITIALIZEDISPLAYSTREAMS) ( DECLARE%: DOCOPY DONTEVAL@LOAD (VARS (\DisplayStarted NIL) (\LastTTYLines 12)) (P ( INITIALIZEDISPLAYSTREAMS) (DISPLAYSTREAMINIT 1000)))) (PROP FILETYPE LLDISPLAY) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) (LAMA))))) (/DECLAREDATATYPE (QUOTE BITMAP) (QUOTE (POINTER WORD WORD WORD WORD)) (QUOTE ((BITMAP 0 POINTER) ( BITMAP 2 (BITS . 15)) (BITMAP 3 (BITS . 15)) (BITMAP 4 (BITS . 15)) (BITMAP 5 (BITS . 15)))) (QUOTE 6) ) (/DECLAREDATATYPE (QUOTE PILOTBBT) (QUOTE (WORD WORD WORD SIGNEDWORD WORD WORD WORD SIGNEDWORD WORD WORD WORD WORD WORD WORD WORD WORD)) (QUOTE ((PILOTBBT 0 (BITS . 15)) (PILOTBBT 1 (BITS . 15)) ( PILOTBBT 2 (BITS . 15)) (PILOTBBT 3 (SIGNEDBITS . 15)) (PILOTBBT 4 (BITS . 15)) (PILOTBBT 5 (BITS . 15 )) (PILOTBBT 6 (BITS . 15)) (PILOTBBT 7 (SIGNEDBITS . 15)) (PILOTBBT 8 (BITS . 15)) (PILOTBBT 9 (BITS . 15)) (PILOTBBT 10 (BITS . 15)) (PILOTBBT 11 (BITS . 15)) (PILOTBBT 12 (BITS . 15)) (PILOTBBT 13 ( BITS . 15)) (PILOTBBT 14 (BITS . 15)) (PILOTBBT 15 (BITS . 15)))) (QUOTE 16)) (/DECLAREDATATYPE (QUOTE \DISPLAYDATA) (QUOTE (POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER WORD WORD WORD WORD WORD FLAG XPOINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER WORD WORD POINTER WORD)) (QUOTE ((\DISPLAYDATA 0 POINTER) (\DISPLAYDATA 2 POINTER) ( \DISPLAYDATA 4 POINTER) (\DISPLAYDATA 6 POINTER) (\DISPLAYDATA 8 POINTER) (\DISPLAYDATA 10 POINTER) ( \DISPLAYDATA 12 POINTER) (\DISPLAYDATA 14 POINTER) (\DISPLAYDATA 16 POINTER) (\DISPLAYDATA 18 POINTER) (\DISPLAYDATA 20 POINTER) (\DISPLAYDATA 22 POINTER) (\DISPLAYDATA 24 POINTER) (\DISPLAYDATA 26 POINTER) (\DISPLAYDATA 28 POINTER) (\DISPLAYDATA 30 POINTER) (\DISPLAYDATA 32 POINTER) (\DISPLAYDATA 34 (BITS . 15)) (\DISPLAYDATA 35 (BITS . 15)) (\DISPLAYDATA 36 (BITS . 15)) (\DISPLAYDATA 37 (BITS . 15)) (\DISPLAYDATA 38 (BITS . 15)) (\DISPLAYDATA 32 (FLAGBITS . 0)) (\DISPLAYDATA 40 XPOINTER) ( \DISPLAYDATA 42 POINTER) (\DISPLAYDATA 44 POINTER) (\DISPLAYDATA 46 POINTER) (\DISPLAYDATA 48 POINTER) (\DISPLAYDATA 50 POINTER) (\DISPLAYDATA 52 POINTER) (\DISPLAYDATA 54 POINTER) (\DISPLAYDATA 56 POINTER) (\DISPLAYDATA 58 POINTER) (\DISPLAYDATA 60 POINTER) (\DISPLAYDATA 62 POINTER) (\DISPLAYDATA 39 (BITS . 15)) (\DISPLAYDATA 64 (BITS . 15)) (\DISPLAYDATA 66 POINTER) (\DISPLAYDATA 65 (BITS . 15))) ) (QUOTE 68)) \FBITMAPBIT :D8 (I 5 RASTERWIDTH I 4 HEIGHTMINUS1 I 3 OPERATION I 2 Y I 1 X I 0 BASE) 1@ABCdgð“¿j°dgð’¿k‹gð’llDE (46 \FBITMAPBIT.UFN) (31 READ 21 ERASE 9 INVERT) () \FBITMAPBIT.UFN :D8 (P 3 BITMASK P 2 WORDBASE I 5 RASTERWIDTH I 4 HEIGHTMINUS1 I 3 OPERATION I 2 Y I 1 X I 0 BASE) ¢@DBÙEÚAââââØÐ`AlåHÉHl +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED "14-Jun-2021 23:15:18" ("compiled on " {DSK}kaplan>Local>medley3.5>git-medley>sources>LLDISPLAY.;3) "14-Jun-2021 22:45:51" "COMPILE-FILEd" in "FULL 14-Jun-2021 ..." dated "14-Jun-2021 22:46:04") (FILECREATED "18-Apr-94 00:20:42" {DSK}nilsson>mnw>LLDISPLAY.;7 267646 changes to%: (FNS \BACKCOLOR.DISPLAY DSPTEXTURE \DSPRESET.DISPLAY \MEDW.XOFFSET \MEDW.YOFFSET DSPXOFFSET DSPYOFFSET) ( VARS LLDISPLAYCOMS) previous date%: "25-Feb-94 17:56:47" {DSK}nilsson>mnw>LLDISPLAY.;6) (RPAQQ LLDISPLAYCOMS ((DECLARE%: DONTCOPY (EXPORT (RECORDS PILOTBBT \DISPLAYDATA DISPLAYSTATE DISPLAYINFO) (MACROS \GETDISPLAYDATA))) (* ; "User-visible records are on ADISPLAY --- must be init'ed here") (INITRECORDS BITMAP PILOTBBT REGION \DISPLAYDATA) (COMS (* ; "BITMASKS") (FNS \FBITMAPBIT \FBITMAPBIT.UFN \NEWPAGE.DISPLAY INITBITMASKS) ( OPTIMIZERS \FBITMAPBIT) (EXPORT (DECLARE%: DONTCOPY (MACROS \BITMASK \4BITMASK \NOTBITMASK \NOT4BITMASK) (GLOBALVARS BITMASKARRAY NOTBITMASKARRAY 4BITMASKARRAY NOT4BITMASKARRAY) (CONSTANTS ( WORDMASK 65535)))) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (INITBITMASKS)))) (COMS (* ; "init cursor") (FNS \CreateCursorBitMap) (DECLARE%: DONTEVAL@LOAD DOCOPY (VARS (CursorBitMap (\CreateCursorBitMap))))) ( COMS (* ; "bitmap functions.") (FNS BITBLT BLTSHADE \BITBLTSUB \GETPILOTBBTSCRATCHBM BITMAPCOPY BITMAPCREATE BITMAPBIT BLTCHAR \BLTCHAR \MEDW.BLTCHAR \CHANGECHARSET.DISPLAY \INDICATESTRING \SLOWBLTCHAR TEXTUREP INVERT.TEXTURE INVERT.TEXTURE.BITMAP BITMAPWIDTH READBITMAP \INSUREBITSPERPIXEL MAXIMUMCOLOR OPPOSITECOLOR MAXIMUMSHADE OPPOSITESHADE \MEDW.BITBLT) (FUNCTIONS FINISH-READING-BITMAP) (CONSTANTS (MINIMUMCOLOR 0) (MINIMUMSHADE 0)) (P (MOVD (QUOTE BITMAPBIT) (QUOTE \BITMAPBIT))) ( DECLARE%: DONTCOPY (EXPORT (MACROS \INVALIDATEDISPLAYCACHE))) (OPTIMIZERS BITMAPBIT BITMAPP) (FNS BITMAPBIT.EXPANDER) (FNS \BITBLT.DISPLAY \BITBLT.BITMAP \BITBLT.MERGE \BLTSHADE.DISPLAY \BLTSHADE.BITMAP) (FNS (* ;; "For SunLoadup") \BITBLT.BITMAP.SLOW) (FNS (* ;; " punt case for C funcs.bitblt_bitmap,bitshade.bitmap") \PUNT.BLTSHADE.BITMAP \PUNT.BITBLT.BITMAP) ( FNS (* ;; "from SUMEX-AIM") \SCALEDBITBLT.DISPLAY \BACKCOLOR.DISPLAY) (DECLARE%: DONTCOPY (CONSTANTS ( \DisplayWordAlign 16) (\MaxBitMapWidth 65535) (\MaxBitMapHeight 65535) (\MaxBitMapWords 131066)) ( EXPORT (MACROS \DSPGETCHARWIDTH \DSPGETCHARIMAGEWIDTH \DSPGETCHAROFFSET \CONVERTOP \SFInvert \SFReplicate \SETPBTFUNCTION \BITBLT1)) (GLOBALVARS \SYSBBTEXTURE \BBSCRATCHTEXTURE \SYSPILOTBBT \PILOTBBTSCRATCHBM)) (VARS (\BBSCRATCHTEXTURE) (\PILOTBBTSCRATCHBM)) (DECLARE%: DONTEVAL@LOAD DOCOPY ( P (MOVD? (QUOTE BITBLT) (QUOTE BKBITBLT)))) (* ; "macro for this file so that BITBLT can be broken by users") (EXPORT (DECLARE%: DONTCOPY DONTEVAL@LOAD DOEVAL@COMPILE (P (PUTPROP (QUOTE BITBLT) (QUOTE MACRO) (QUOTE (= . BKBITBLT))))))) (COMS (* ; "display stream functions") (FNS DISPLAYSTREAMP DSPSOURCETYPE DSPXOFFSET DSPYOFFSET) (FNS DSPCREATE DSPDESTINATION DSPTEXTURE \DISPLAYSTREAMINCRXPOSITION \SFFixDestination \SFFixClippingRegion \SFFixFont \SFFIXLINELENGTH \UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD \SFFixY) (FNS \MEDW.XOFFSET \MEDW.YOFFSET) (FNS \DSPCLIPPINGREGION.DISPLAY \DSPFONT.DISPLAY \DISPLAY.PILOTBITBLT \DSPLINEFEED.DISPLAY \DSPLEFTMARGIN.DISPLAY \DSPOPERATION.DISPLAY \DSPRIGHTMARGIN.DISPLAY \DSPXPOSITION.DISPLAY \DSPYPOSITION.DISPLAY) (P (MOVD? (QUOTE \ILLEGAL.ARG) (QUOTE \COERCETODS)) ( MOVD? (QUOTE NILL) (QUOTE WFROMDS)) (MOVD? (QUOTE NILL) (QUOTE WINDOWP)) (MOVD? (QUOTE NILL) (QUOTE INVERTW))) (INITVARS (PROMPTWINDOW T) (\WINDOWWORLD NIL) (\MAINSCREEN NIL))) (COMS (* ; "Stub for window package") (INITVARS (\TOPWDS) (\SCREENBITMAPS)) (P (MOVD? (QUOTE NILL) (QUOTE \TOTOPWDS))) (DECLARE%: DONTCOPY EVAL@COMPILE (EXPORT (MACROS \INSURETOPWDS .WHILE.TOP.DS. .WHILE.CURSOR.DOWN.) (ADDVARS (GLOBALVARS \TOPWDS))))) (COMS (* ; "DisplayStream TTY functions") (FNS TTYDISPLAYSTREAM) (EXPORT (OPTIMIZERS TTYDISPLAYSTREAM)) (FNS DSPSCROLL PAGEHEIGHT) (INITVARS ( \CURRENTTTYDEVICE (QUOTE BCPLDISPLAY))) (FNS \DSPRESET.DISPLAY) (COMS (INITVARS (*DRIBBLE-OUTPUT* NIL) ) (FUNCTIONS \MAYBE-DRIBBLE-CHAR) (FNS \DSPPRINTCHAR \DSPPRINTCR/LF)) (FNS \TTYBACKGROUND) (FNS DSPBACKUP) (INITVARS (\CARET.UP)) (DECLARE%: DONTEVAL@LOAD DOCOPY (VARS (BELLCNT 2) (BELLRATE 60) ( \DisplayStoppedForLogout) (TtyDisplayStream))) (FNS COLORDISPLAYP) (FNS DISPLAYBEFOREEXIT DISPLAYAFTERENTRY) (EXPORT (GLOBALVARS BELLCNT BELLRATE TTYBACKGROUNDFNS \DisplayStoppedForLogout \CARET.UP) (MACROS \CHECKCARET))) (COMS (* ; "transformation related functions.") (FNS \DSPCLIPTRANSFORMX \DSPCLIPTRANSFORMY \DSPTRANSFORMREGION \DSPUNTRANSFORMY \DSPUNTRANSFORMX \OFFSETCLIPPINGREGION) (DECLARE%: DONTCOPY (EXPORT (MACROS \DSPTRANSFORMX \DSPTRANSFORMY \OFFSETBOTTOM \OFFSETLEFT)))) (COMS (* ; "screen related functions") (FNS UPDATESCREENDIMENSIONS \CreateScreenBitMap) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (UPDATESCREENDIMENSIONS)) (INITVARS ( SCREENHEIGHT 808) (SCREENWIDTH 1024) (\OLDSCREENHEIGHT 808) (\OLDSCREENWIDTH 1024) (\MaxScreenPage -1) (ScreenBitMap (\CreateScreenBitMap SCREENWIDTH SCREENHEIGHT)) (ColorScreenBitMap NIL))) (GLOBALVARS \OLDSCREENHEIGHT \OLDSCREENWIDTH \MaxScreenPage ScreenBitMap) (DECLARE%: DONTEVAL@LOAD DOCOPY (P ( CURSOR.INIT)))) (COMS (* ; "initialization") (INITVARS (\DISPLAYINFOALIST)) (FNS \CoerceToDisplayDevice \CREATEDISPLAY DISPLAYSTREAMINIT \STARTDISPLAY \MOVE.WINDOWS.ONTO.SCREEN \UPDATE.PBT.RASTERWIDTHS \STOPDISPLAY \DEFINEDISPLAYINFO) (DECLARE%: EVAL@COMPILE DONTCOPY (ADDVARS ( DONTCOMPILEFNS \UPDATE.PBT.RASTERWIDTHS))) (EXPORT (MACROS DISPLAYINITIALIZEDP DISPLAYSTARTEDP) ( GLOBALVARS \DisplayStarted \DisplayStreamsInitialized \DisplayInitialed WHOLEDISPLAY WHOLESCREEN SCREENWIDTH SCREENHEIGHT)) (ADDVARS (GLOBALVARS WHOLESCREEN)) (FNS INITIALIZEDISPLAYSTREAMS) ( DECLARE%: DOCOPY DONTEVAL@LOAD (VARS (\DisplayStarted NIL) (\LastTTYLines 12)) (P ( INITIALIZEDISPLAYSTREAMS) (DISPLAYSTREAMINIT 1000)))) (PROP FILETYPE LLDISPLAY) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) (LAMA))))) (/DECLAREDATATYPE (QUOTE BITMAP) (QUOTE (POINTER WORD WORD WORD WORD)) (QUOTE ((BITMAP 0 POINTER) ( BITMAP 2 (BITS . 15)) (BITMAP 3 (BITS . 15)) (BITMAP 4 (BITS . 15)) (BITMAP 5 (BITS . 15)))) (QUOTE 6) ) (/DECLAREDATATYPE (QUOTE PILOTBBT) (QUOTE (WORD WORD WORD SIGNEDWORD WORD WORD WORD SIGNEDWORD WORD WORD WORD WORD WORD WORD WORD WORD)) (QUOTE ((PILOTBBT 0 (BITS . 15)) (PILOTBBT 1 (BITS . 15)) ( PILOTBBT 2 (BITS . 15)) (PILOTBBT 3 (SIGNEDBITS . 15)) (PILOTBBT 4 (BITS . 15)) (PILOTBBT 5 (BITS . 15 )) (PILOTBBT 6 (BITS . 15)) (PILOTBBT 7 (SIGNEDBITS . 15)) (PILOTBBT 8 (BITS . 15)) (PILOTBBT 9 (BITS . 15)) (PILOTBBT 10 (BITS . 15)) (PILOTBBT 11 (BITS . 15)) (PILOTBBT 12 (BITS . 15)) (PILOTBBT 13 ( BITS . 15)) (PILOTBBT 14 (BITS . 15)) (PILOTBBT 15 (BITS . 15)))) (QUOTE 16)) (/DECLAREDATATYPE (QUOTE \DISPLAYDATA) (QUOTE (POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER WORD WORD WORD WORD WORD FLAG XPOINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER WORD WORD POINTER WORD)) (QUOTE ((\DISPLAYDATA 0 POINTER) (\DISPLAYDATA 2 POINTER) ( \DISPLAYDATA 4 POINTER) (\DISPLAYDATA 6 POINTER) (\DISPLAYDATA 8 POINTER) (\DISPLAYDATA 10 POINTER) ( \DISPLAYDATA 12 POINTER) (\DISPLAYDATA 14 POINTER) (\DISPLAYDATA 16 POINTER) (\DISPLAYDATA 18 POINTER) (\DISPLAYDATA 20 POINTER) (\DISPLAYDATA 22 POINTER) (\DISPLAYDATA 24 POINTER) (\DISPLAYDATA 26 POINTER) (\DISPLAYDATA 28 POINTER) (\DISPLAYDATA 30 POINTER) (\DISPLAYDATA 32 POINTER) (\DISPLAYDATA 34 (BITS . 15)) (\DISPLAYDATA 35 (BITS . 15)) (\DISPLAYDATA 36 (BITS . 15)) (\DISPLAYDATA 37 (BITS . 15)) (\DISPLAYDATA 38 (BITS . 15)) (\DISPLAYDATA 32 (FLAGBITS . 0)) (\DISPLAYDATA 40 XPOINTER) ( \DISPLAYDATA 42 POINTER) (\DISPLAYDATA 44 POINTER) (\DISPLAYDATA 46 POINTER) (\DISPLAYDATA 48 POINTER) (\DISPLAYDATA 50 POINTER) (\DISPLAYDATA 52 POINTER) (\DISPLAYDATA 54 POINTER) (\DISPLAYDATA 56 POINTER) (\DISPLAYDATA 58 POINTER) (\DISPLAYDATA 60 POINTER) (\DISPLAYDATA 62 POINTER) (\DISPLAYDATA 39 (BITS . 15)) (\DISPLAYDATA 64 (BITS . 15)) (\DISPLAYDATA 66 POINTER) (\DISPLAYDATA 65 (BITS . 15))) ) (QUOTE 68)) \FBITMAPBIT :D8 (I 5 RASTERWIDTH I 4 HEIGHTMINUS1 I 3 OPERATION I 2 Y I 1 X I 0 BASE) 1@ABCdgð“¿j°dgð’¿k‹gð’llDE (46 \FBITMAPBIT.UFN) (31 READ 21 ERASE 9 INVERT) () \FBITMAPBIT.UFN :D8 (P 3 BITMASK P 2 WORDBASE I 5 RASTERWIDTH I 4 HEIGHTMINUS1 I 3 OPERATION I 2 Y I 1 X I 0 BASE) ¢@DBÙEÚAââââØÐ`AlåHÉHl IØÐÈBKJÈå\jð³#LµkJÈ_¿JCdjð²¿OKæ°D ²æj°äkð²*O`Alå¾]ÉMl NØÐÈå‹Clð’OƒOKäÍ¿(137 \GETBASEFIXP 95 \FZEROP 45 \GETBASEFIXP) (130 ARRAYP 122 ARRAYP 111 NOTBITMASKARRAY 38 ARRAYP 30 ARRAYP 17 BITMASKARRAY) () \NEWPAGE.DISPLAY :D8 (I 0 STREAM) @ (5 DSPRESET) NIL () INITBITMASKS :D8 (P 2 MASK P 1 I) ½lgjd lgjd ljn€IHó²9lgjd lgjd ljnðIHó²+h`IJ ¿`IJnÿÿæ ¿JâºIkÔY° `IJ ¿`IJnÿÿæ ¿JââââºIkÔY°«(174 SETA 157 SETA 135 SETA 118 SETA 85 ARRAY 66 ARRAY 32 ARRAY 13 ARRAY) (163 NOT4BITMASKARRAY 150 4BITMASKARRAY 124 NOTBITMASKARRAY 111 BITMASKARRAY 90 NOT4BITMASKARRAY 78 SMALLPOSP 71 4BITMASKARRAY 59 SMALLPOSP 37 NOTBITMASKARRAY 25 SMALLPOSP 18 BITMASKARRAY 6 SMALLPOSP) () optimize-\FBITMAPBIT :D8 (L (2 $$CTX 1 $$ENV 0 $$WHOLE)) Œ @¡ -H¹HZ»J\½L^_¿N__¿O_¿oIKMOµ!gOoOOogð²ÚO dgð“¿j°Õdgð“¿k°Égð“l°¾l°º(99 EVAL) (128 READ 117 ERASE 105 INVERT 89 QUOTE 57 SELECTQ) ( 75 (NIL) 64 ((INVERT 0) (ERASE 1) (READ 2) 3) 44 (OPCODES MISC7 1)) (PUTPROP (QUOTE \FBITMAPBIT) (QUOTE COMPILER:OPTIMIZER-LIST) (CL:ADJOIN (QUOTE optimize-\FBITMAPBIT) ( GET (QUOTE \FBITMAPBIT) (QUOTE COMPILER:OPTIMIZER-LIST)))) (INITBITMASKS) \CreateCursorBitMap :D8 NIL $l dkÍ¿dlÍ¿dlÍ¿d`¿dkÍ¿NIL (25 \EM.CURSORBITMAP) () (RPAQ CursorBitMap (\CreateCursorBitMap)) BITBLT :D8 (L (11 CLIPPINGREGION 10 TEXTURE 9 OPERATION 8 SOURCETYPE 7 HEIGHT 6 WIDTH 5 DESTINATIONBOTTOM 4 DESTINATIONLEFT 3 DESTINATION 2 SOURCEBOTTOM 1 SOURCELEFT 0 SOURCE) F 19 \SOFTCURSORP F 20 \SOFTCURSORUPP F 21 \SCREENBITMAPS) ¢ D£jb¿E£jb +H¹HZ»J\½L^_¿N__¿O_¿oIKMOµ!gOoOOogð²ÚO dgð“¿j°Õdgð“¿k°Égð“l°¾l°º(99 EVAL) (128 READ 117 ERASE 105 INVERT 89 QUOTE 57 SELECTQ) ( 75 (NIL) 64 ((INVERT 0) (ERASE 1) (READ 2) 3) 44 (OPCODES MISC7 1)) (PUTPROP (QUOTE \FBITMAPBIT) (QUOTE COMPILER:OPTIMIZER-LIST) (CL:ADJOIN (QUOTE optimize-\FBITMAPBIT) ( GET (QUOTE \FBITMAPBIT) (QUOTE COMPILER:OPTIMIZER-LIST)))) (INITBITMASKS) \CreateCursorBitMap :D8 NIL $l dkÍ¿dlÍ¿dlÍ¿d`¿dkÍ¿NIL (25 \EM.CURSORBITMAP) () (RPAQ CursorBitMap (\CreateCursorBitMap)) BITBLT :D8 (L (11 CLIPPINGREGION 10 TEXTURE 9 OPERATION 8 SOURCETYPE 7 HEIGHT 6 WIDTH 5 DESTINATIONBOTTOM 4 DESTINATIONLEFT 3 DESTINATION 2 SOURCEBOTTOM 1 SOURCELEFT 0 SOURCE) F 19 \SOFTCURSORP F 20 \SOFTCURSORUPP F 21 \CURSORDESTINATION F 22 \SCREENBITMAPS) œ D£jb¿E£jb ¿Ggð²NCdò¿GCDEFGGG gh HÉ.ɹGHDEFGGGlIð@@dò]¿A£jb¿B£jb¿@¹AºB»Fµ3@Èb ¿Gµ@Èb¿±É@ÈBÙ½dMñ²ì¿M°è@ÈAÙ¼dLñ²É¿L°Ågh É0X¢±…A¦HÉ b¿B§HÉ -b¿HɹAHÉØbHÈ"¾dNñ¡¿NºBHÉØbHÈ$_¿dOñ¢¿O»FµNHÈ#JÙb ¿Gµ%HÈ%KÙb¿G¥HÉ6b¿Fjñ´ Gjñ³4hHÈ%KÙ_¿dOñ²Ö¿O°ÑHÈ#JÙ_¿dOñ²­¿O°¨Cdâ±É¿@ ¢±¤h__¿W&²;W(´h@gh -`ð_²`È_¿`jÍ¿¿@gh _`ð³hO -W*—O ¿IABCDEFGGGGGJK O´‚±X¿`OÍ¿±DIABCDEFGGGGGJK gh _@Cð’±ê@ ¢±àC ¢±Ï@dC -¢±Ä¿h__ _"¿W&²;W(´h@gh -`ð_"²`È_ ¿`jÍ¿¿@gh _`ð³hO -W*—O ¿IABFG +b¿HɹAHÉØbHÈ"¾dNñ¡¿NºBHÉØbHÈ$_¿dOñ¢¿O»FµNHÈ#JÙb ¿Gµ%HÈ%KÙb¿G¥HÉ6b¿Fjñ´ Gjñ³4hHÈ%KÙ_¿dOñ²Ö¿O°ÑHÈ#JÙ_¿dOñ²­¿O°¨Cdâ±Æ¿@ ¢±¡h__¿W&²8W(´h@gh +W*ð_²`È_¿`jÍ¿¿@gh _`ð³hO +W,—O ¿IABCDEFGGGGGJK O´‚±U¿`OÍ¿±AIABCDEFGGGGGJK gh _@Cð’±ç@ ¢±ÝC ¢±Ì@dC +¢±Á¿h__ _"¿W&²8W(´h@gh +W*ð_"²`È_ ¿`jÍ¿¿@gh _`ð³hO +W,—O ¿IABFG _jdFGgg -¿O"Ÿ¿`O Í¿OjdODEFGGGGG @ ¿OÉ.É_$¿IABODEFGGGGGJKlO$h(881 TOTOPW 874 BKBITBLT 838 \SOFTCURSORUPCURRENT 829 BKBITBLT 806 BITMAPCREATE 794 \TOTOPWDS 783 DSPDESTINATION 765 \GETSTREAM 752 \SOFTCURSORDOWN 718 DSPDESTINATION 713 \GETSTREAM 679 WOVERLAPP 667 WINDOWP 657 WINDOWP 642 \GETSTREAM 630 \BITBLT.BITMAP 591 \SOFTCURSORUPCURRENT 578 \BITBLT.BITMAP 552 \TOTOPWDS 541 DSPDESTINATION 523 \GETSTREAM 510 \SOFTCURSORDOWN 476 DSPDESTINATION 471 \GETSTREAM 440 WINDOWP 214 \GETSTREAM 61 \GETSTREAM 49 \BLTSHADE.BITMAP) (896 IMAGEOPS 889 STREAM 844 \EM.DISPINTERRUPT 823 REPLACE 818 INPUT 772 \TOPWDS 759 OUTPUT 743 \EM.DISPINTERRUPT 733 \EM.DISPINTERRUPT 723 \CURSORDESTINATION 707 OUTPUT 636 OUTPUT 597 \EM.DISPINTERRUPT 530 \TOPWDS 517 OUTPUT 501 \EM.DISPINTERRUPT 491 \EM.DISPINTERRUPT 481 \CURSORDESTINATION 465 OUTPUT 429 BITMAP 404 \DISPLAYDATA 380 \DISPLAYDATA 345 \DISPLAYDATA 328 \DISPLAYDATA 305 \DISPLAYDATA 294 \DISPLAYDATA 277 \DISPLAYDATA 266 \DISPLAYDATA 256 \DISPLAYDATA 226 \DISPLAYDATA 219 STREAM 208 OUTPUT 189 BITMAP 169 BITMAP 155 BITMAP 140 BITMAP 110 BITMAP 77 IMAGEOPS 70 STREAM 55 OUTPUT 28 BITMAP 18 TEXTURE) () BLTSHADE :D8 (L (7 CLIPPINGREGION 6 OPERATION 5 HEIGHT 4 WIDTH 3 DESTINATIONBOTTOM 2 DESTINATIONLEFT 1 DESTINATION 0 TEXTURE)) [Adò¿@ABµjCµjDEFG gh HÉ.ɹ@HBµjCµjDEFd¥H +¿O"Ÿ¿`O Í¿OjdODEFGGGGG @ ¿OÉ.É_$¿IABODEFGGGGGJKlO$h(875 TOTOPW 868 BKBITBLT 832 \SOFTCURSORUPCURRENT 823 BKBITBLT 800 BITMAPCREATE 788 \TOTOPWDS 777 DSPDESTINATION 759 \GETSTREAM 746 \SOFTCURSORDOWN 715 DSPDESTINATION 710 \GETSTREAM 676 WOVERLAPP 664 WINDOWP 654 WINDOWP 639 \GETSTREAM 627 \BITBLT.BITMAP 588 \SOFTCURSORUPCURRENT 575 \BITBLT.BITMAP 549 \TOTOPWDS 538 DSPDESTINATION 520 \GETSTREAM 507 \SOFTCURSORDOWN 476 DSPDESTINATION 471 \GETSTREAM 440 WINDOWP 214 \GETSTREAM 61 \GETSTREAM 49 \BLTSHADE.BITMAP) (890 IMAGEOPS 883 STREAM 838 \EM.DISPINTERRUPT 817 REPLACE 812 INPUT 766 \TOPWDS 753 OUTPUT 737 \EM.DISPINTERRUPT 727 \EM.DISPINTERRUPT 704 OUTPUT 633 OUTPUT 594 \EM.DISPINTERRUPT 527 \TOPWDS 514 OUTPUT 498 \EM.DISPINTERRUPT 488 \EM.DISPINTERRUPT 465 OUTPUT 429 BITMAP 404 \DISPLAYDATA 380 \DISPLAYDATA 345 \DISPLAYDATA 328 \DISPLAYDATA 305 \DISPLAYDATA 294 \DISPLAYDATA 277 \DISPLAYDATA 266 \DISPLAYDATA 256 \DISPLAYDATA 226 \DISPLAYDATA 219 STREAM 208 OUTPUT 189 BITMAP 169 BITMAP 155 BITMAP 140 BITMAP 110 BITMAP 77 IMAGEOPS 70 STREAM 55 OUTPUT 28 BITMAP 18 TEXTURE) () BLTSHADE :D8 (L (7 CLIPPINGREGION 6 OPERATION 5 HEIGHT 4 WIDTH 3 DESTINATIONBOTTOM 2 DESTINATIONLEFT 1 DESTINATION 0 TEXTURE)) [Adò¿@ABµjCµjDEFG gh HÉ.ɹ@HBµjCµjDEFd¥H GlI(82 DSPOPERATION 42 \GETSTREAM 30 \BLTSHADE.BITMAP) (58 IMAGEOPS 51 STREAM 36 OUTPUT 6 BITMAP) () \BITBLTSUB :D8 (P 5 X P 4 DESTADDR P 3 SOURCEADDR P 2 GRAY P 1 SBMR P 0 DBMR I 12 WindowYOffset I 11 WindowXOffset I 10 Texture I 9 Operation I 8 SourceType I 7 HEIGHT I 6 DTY I 5 DLX I 4 DestinationBitMap I 3 STY I 2 SLX I 1 SourceBitMap I 0 PILOTBBT) Ð Ð DÈX@jÍ @HàààànÿÿåÍDÉHFÚÐ\@EÍGdgð¢±H¿@kÏ 0¿@G”EGÙ€ElåÍ¿@jÍ¿G3 ¢±È`ÉZGnÿÿåbjð¦Gnÿÿð™JGÍ¿j±„JGãââââ^dáNààààdáäääÍ¿JGãlå_dáOààààdáäääÍ¿JGââââlå_dáOààààdáäääÍ¿JGlå_dáOààààdáäääÍ¿@lÏÿ@G”FGÔ€Flå_ÏC¿OÐ_¿@OÒÍ¿@O±6@GbÈdlñ’¿l]kÙÏÿ@GšFGÔM @@ -25,7 +25,7 @@ H Q¿@GgðGgðð‘j€kÏ @@jv(414 RAID 356 IMOD) (705 ERASE 697 INVERT 679 INVERT 667 PAINT 656 ERASE 643 PILOTBBT 632 PILOTBBT 621 PILOTBBT 610 PILOTBBT 586 PILOTBBT 565 PILOTBBT 532 PILOTBBT 466 PILOTBBT 453 BITMAP 433 BITMAP 427 PILOTBBT 402 MERGE 392 PILOTBBT 380 PILOTBBT 323 BITMAP 310 PILOTBBT 298 PILOTBBT 128 BITMAP 123 \SYSBBTEXTURE 106 PILOTBBT 85 PILOTBBT 67 TEXTURE 56 PILOTBBT 43 BITMAP 26 PILOTBBT 17 PILOTBBT 8 BITMAP) ( 409 "Hard bitblt case") \GETPILOTBBTSCRATCHBM :D8 (I 1 HEIGHT I 0 WIDTH) ?`ò'@`Èñ³A`Èñ¥`@A (55 BITMAPCREATE) (60 \PILOTBBTSCRATCHBM 47 \PILOTBBTSCRATCHBM 38 BITMAP 33 \PILOTBBTSCRATCHBM 22 BITMAP 17 \PILOTBBTSCRATCHBM 9 BITMAP 4 \PILOTBBTSCRATCHBM) () BITMAPCOPY :D8 (P 0 NEWBITMAP I 0 BITMAP) 7@bjd@ @È@È Xjdhdggj H(51 BKBITBLT 29 BITMAPCREATE 18 BITMAPWIDTH) (44 REPLACE 39 INPUT 8 BITMAP) () BITMAPCREATE :D8 (P 0 RW I 2 BITSPERPIXEL I 1 HEIGHT I 0 WIDTH)  j@ñ¥@nÿÿñ–@ ¿jAñ¥Anÿÿñ–A ¿B b@BÚlØââââXl dHÍ¿d@Í¿dAÍ¿dBÍ¿HAÚXdoñ²¿@AÚBÚo -‰kØâhh ¹dI¿(118 \ALLOCBLOCK 107 ERROR 42 \INSUREBITSPERPIXEL 35 \ILLEGAL.ARG 18 \ILLEGAL.ARG) NIL ( 102 "bits in BITMAP -- too big" 88 131066) BITMAPBIT :D8 (P 15 SOFTCURSORUP P 14 DISPINTERRUPT P 13 DD P 12 TY P 11 TX P 6 bitmapbase P 5 oldword P 4 HEIGHT P 3 OLDVALUE P 2 WORDX P 1 BITX P 0 NBITS I 3 NEWVALUE I 2 Y I 1 X I 0 BITMAP F 16 \SOFTCURSORP F 17 \SOFTCURSORUPP F 18 \SCREENBITMAPS) ì° +‰kØâhh ¹dI¿(118 \ALLOCBLOCK 107 ERROR 42 \INSUREBITSPERPIXEL 35 \ILLEGAL.ARG 18 \ILLEGAL.ARG) NIL ( 102 "bits in BITMAP -- too big" 88 131066) BITMAPBIT :D8 (P 15 SOFTCURSORUP P 14 DISPINTERRUPT P 13 DD P 12 TY P 11 TX P 6 bitmapbase P 5 oldword P 4 HEIGHT P 3 OLDVALUE P 2 WORDX P 1 BITX P 0 NBITS I 3 NEWVALUE I 2 Y I 1 X I 0 BITMAP F 16 \SOFTCURSORP F 17 \SOFTCURSORUPP F 18 \CURSORDESTINATION F 19 \SCREENBITMAPS) é° @â±+@ÈXjAñ’± A@Èýñ¢±üjBñ’±õB@È\ýñ¢±åHkð²[Cdjð²¿@ÉABkLkÙ@Èh8³@ÉABlLkÙ@Èh8@ÉABlLkÙ@Èh8@É@ÈBÙkÙ@ÈÚÐ^C²jCñ¯C@È ñ–C ¿Hdkð²c¿AââââZNJÐÈ]`Alå_¿_ÉOl OØÐÈYCµ MIåjð² jjðNJÐMImÿæåÍ¿°èNJÐMIäÍ¿°Ýklð²mAlçYdââââZNJÐÈ]d`Alå_¿_ÉOl OØÐÈå[C²NJÐMKæCllAlåÙÚ @@ -34,31 +34,31 @@ Q [C—NAC KoH 0 @gh bÉ0_AO _BO -_O¢±þºd¢±þµ W ²0W"´h@ -`ð_²`È_¿`jÍ¿¿@`ð³h@ -W$–@ ¿OÉOOCû_¿Ož¿`OÍO(733 \SOFTCURSORUPCURRENT 705 \TOTOPWDS 695 DSPDESTINATION 678 \SOFTCURSORDOWN 644 DSPDESTINATION 613 \DSPCLIPTRANSFORMY 603 \DSPCLIPTRANSFORMX 579 \GETSTREAM 563 ERROR 550 \PUTBASE24 539 \GETBASE24 435 LRSH 415 LLSH 382 \GETBASEFIXP 275 \GETBASEFIXP 220 \ILLEGAL.ARG 212 MAXIMUMCOLOR) (739 \EM.DISPINTERRUPT 713 \DISPLAYDATA 685 \TOPWDS 669 \EM.DISPINTERRUPT 659 \EM.DISPINTERRUPT 649 \CURSORDESTINATION 593 \DISPLAYDATA 586 STREAM 573 OUTPUT 375 ARRAYP 366 ARRAYP 352 4BITMASKARRAY 268 ARRAYP 259 ARRAYP 245 BITMASKARRAY 205 BITMAP 186 BITMAP 174 BITMAP 166 BITMAP 154 BITMAP 139 BITMAP 127 BITMAP 112 BITMAP 98 BITMAP 84 BITMAP 57 BITMAP 35 BITMAP 18 BITMAP 8 BITMAP) ( 557 "unknown bits per pixel size.") BLTCHAR :D8 (I 1 DISPLAYSTREAM I 0 CHARCODE) 2@d—¿j@ñ¡@…@ Adgh É0 (47 \BLTCHAR 30 \GETSTREAM 17 \ILLEGAL.ARG) (42 \DISPLAYDATA 35 STREAM 24 OUTPUT) () \BLTCHAR :D8 (P 0 A13769 I 2 DISPLAYDATA I 1 DISPLAYSTREAM I 0 CHARCODE) (Agh bÉ.ÉZ@ABlH(11 \GETSTREAM) (25 IMAGEOPS 18 STREAM 5 OUTPUT) () \MEDW.BLTCHAR :D8 (L (2 DISPLAYDATA 1 DISPLAYSTREAM 0 CHARCODE) F 7 \SOFTCURSORP F 8 \SOFTCURSORUPP F 9 \SCREENBITMAPS) p@lÿå\¿BdÉ>@ãð¨@ã +_O¢±þºd¢±þµ W ²-W"´ h@ +W$ð_²`È_¿`jÍ¿¿@`ð³h@ +W&–@ ¿OÉOOCû_¿Ož¿`OÍO(730 \SOFTCURSORUPCURRENT 702 \TOTOPWDS 692 DSPDESTINATION 675 \SOFTCURSORDOWN 644 DSPDESTINATION 613 \DSPCLIPTRANSFORMY 603 \DSPCLIPTRANSFORMX 579 \GETSTREAM 563 ERROR 550 \PUTBASE24 539 \GETBASE24 435 LRSH 415 LLSH 382 \GETBASEFIXP 275 \GETBASEFIXP 220 \ILLEGAL.ARG 212 MAXIMUMCOLOR) (736 \EM.DISPINTERRUPT 710 \DISPLAYDATA 682 \TOPWDS 666 \EM.DISPINTERRUPT 656 \EM.DISPINTERRUPT 593 \DISPLAYDATA 586 STREAM 573 OUTPUT 375 ARRAYP 366 ARRAYP 352 4BITMASKARRAY 268 ARRAYP 259 ARRAYP 245 BITMASKARRAY 205 BITMAP 186 BITMAP 174 BITMAP 166 BITMAP 154 BITMAP 139 BITMAP 127 BITMAP 112 BITMAP 98 BITMAP 84 BITMAP 57 BITMAP 35 BITMAP 18 BITMAP 8 BITMAP) ( 557 "unknown bits per pixel size.") BLTCHAR :D8 (I 1 DISPLAYSTREAM I 0 CHARCODE) 2@d—¿j@ñ¡@…@ Adgh É0 (47 \BLTCHAR 30 \GETSTREAM 17 \ILLEGAL.ARG) (42 \DISPLAYDATA 35 STREAM 24 OUTPUT) () \BLTCHAR :D8 (P 0 A0202 I 2 DISPLAYDATA I 1 DISPLAYSTREAM I 0 CHARCODE) (Agh bÉ.ÉZ@ABlH(11 \GETSTREAM) (25 IMAGEOPS 18 STREAM 5 OUTPUT) () \MEDW.BLTCHAR :D8 (L (2 DISPLAYDATA 1 DISPLAYSTREAM 0 CHARCODE) F 7 \SOFTCURSORP F 8 \SOFTCURSORUPP F 9 \CURSORDESTINATION F 10 \SCREENBITMAPS)  p@lÿå\¿BdÉ>@ãð¨@ã ¿BÉ—@A BÉ[BÉ0LÐÈØYBÉñŸKBÉñ™l A -°ÃBKBÉLÐÈØ¿BɸKHØ»IHØYBÈ#Xñ‘H¹KBÈ"Xñ‘K€HºIJñ´‚±“BÉ*XÈ jð’±h]¾W²-W´hA -`ð^²`Ƚ`jÍ¿¿A`ð³hA -W–A ¿HJÍ¿HIJÙÍ¿HBÉLÐÈJØKÙÍ¿Hjv¿N¿`MÍih(255 \SOFTCURSORUPCURRENT 216 \TOTOPWDS 206 DSPDESTINATION 189 \SOFTCURSORDOWN 158 DSPDESTINATION 68 \DSPPRINTCR/LF 35 \SLOWBLTCHAR 23 \CHANGECHARSET.DISPLAY) (261 \EM.DISPINTERRUPT 196 \TOPWDS 180 \EM.DISPINTERRUPT 172 \EM.DISPINTERRUPT 163 \CURSORDESTINATION 132 PILOTBBT) () \CHANGECHARSET.DISPLAY :D8 (P 4 \INTERRUPTABLE P 2 BM P 1 CSINFO P 0 PBT I 1 CHARSET I 0 DISPLAYDATA) Š@É*@É ÉAàÐɵ A@É h "@IÉ¿@IÉ¿@IÉ0¿@A>¿IɺHJÈàààànÿÿåÍ¿@È'IÈ +°ÃBKBÉLÐÈØ¿BɸKHØ»IHØYBÈ#Xñ‘H¹KBÈ"Xñ‘K€HºIJñ´‚±ŽBÉ*XÈ jð³}h]¾W²*W´ hA +Wð^²`Ƚ`jÍ¿¿A`ð³hA +W–A ¿HJÍ¿HIJÙÍ¿HBÉLÐÈJØKÙÍ¿Hjv¿N¿`MÍih(250 \SOFTCURSORUPCURRENT 211 \TOTOPWDS 201 DSPDESTINATION 184 \SOFTCURSORDOWN 156 DSPDESTINATION 68 \DSPPRINTCR/LF 35 \SLOWBLTCHAR 23 \CHANGECHARSET.DISPLAY) (256 \EM.DISPINTERRUPT 191 \TOPWDS 175 \EM.DISPINTERRUPT 167 \EM.DISPINTERRUPT 132 PILOTBBT) () \CHANGECHARSET.DISPLAY :D8 (P 4 \INTERRUPTABLE P 2 BM P 1 CSINFO P 0 PBT I 1 CHARSET I 0 DISPLAYDATA) Š@É*@É ÉAàÐɵ A@É h "@IÉ¿@IÉ¿@IÉ0¿@A>¿IɺHJÈàààànÿÿåÍ¿@È'IÈ ð—@È@IÈ ð©@I ¿°#JÉJÈ@ÉBÚлHKÒÍ¿HKÓÍh(98 \SFFixY 24 \CREATECHARSET) (130 PILOTBBT 119 PILOTBBT) () \INDICATESTRINGA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 SI::*RESETFORMS* F 1 CHARCODE) Hgd gi -¿Pcgl hhPcgQãoQlÿå (69 CONCAT 39 RADIX 22 SETTOPVAL 10 GETTOPVAL) (53 %# 32 RADIX 16 PRXFLT 4 PRXFLT) ( 60 ",") \INDICATESTRING :D8 (P 2 RESETSTATE P 1 SI::*RESETFORMS* P 0 LISPXHIST I 0 CHARCODE F 3 LISPXHIST) _@dlÿñ² ¿S!g ¿$lñœ@låb¿g„ol @ñœ@l@äb¿g„o@ (92 CONCAT 87 CHARACTER 31 SI::RESETUNWIND 26 \MVLIST 21 \INDICATESTRINGA0001) (75 ^ 52 %# 16 SI::RESETUNWIND) ( 81 "" 58 "") \SLOWBLTCHAR :D8 (P 16 CSINFO P 15 HEIGHTMOVED P 14 YPOS P 13 SOFTCURSORUP P 12 DISPINTERRUPT P 11 SOURCEBIT P 10 WIDTH P 9 DESTBIT P 8 PILOTBBT P 7 CURX P 6 RIGHT P 5 LEFT P 4 NEWX P 2 DD P 1 CHAR8CODE P 0 ROTATION I 1 DISPLAYSTREAM I 0 CHARCODE F 17 \SOFTCURSORP F 18 \SOFTCURSORUPP F 19 \SCREENBITMAPS) N@@lÿåYAÉ0ZdÉ È Xdj𢱀 JÉ_JÉIÐÈØ\JÉñ²l A -¿JÉ_JÉIÐÈؼJL¿OJÉØ_¿JÈ"dOñ¢¿O½JÈ#LJÉØ»dKñ‘¿K¾JÉ*_¿NMñ¢±OÈ jð’±M_¿NMÙ_¿JÉIÐÈMØOÙ_¿JÉÈdkð³adlð²¿Oàà_¿Oàà_¿Oàà_°Ddlð²¿Oààà_¿Oààà_¿Oààà_°$lð²lOÚ_¿lOÚ_¿lOÚ_„¿ W"²0W$´hA -`ð_²`È_¿`jÍ¿¿A`ð³hA -W&–A ¿OOÍ¿OOÍ¿OOÍ¿Ojv¿OŸ¿`OÍ¿±·0JÉ_¿JÉIÐÈ_¿JÉ É@ãàÐɵ @ãJÉ h _ ¿HdlZð²;¿AOOØ +¿Pcgl hhPcgQãoQlÿå (69 CONCAT 39 RADIX 22 SETTOPVAL 10 GETTOPVAL) (53 %# 32 RADIX 16 PRXFLT 4 PRXFLT) ( 60 ",") \INDICATESTRING :D8 (P 2 RESETSTATE P 1 SI::*RESETFORMS* P 0 LISPXHIST I 0 CHARCODE F 3 LISPXHIST) _@dlÿñ² ¿S!g ¿$lñœ@låb¿g„ol @ñœ@l@äb¿g„o@ (92 CONCAT 87 CHARACTER 31 SI::RESETUNWIND 26 \MVLIST 21 \INDICATESTRINGA0001) (75 ^ 52 %# 16 SI::RESETUNWIND) ( 81 "" 58 "") \SLOWBLTCHAR :D8 (P 16 CSINFO P 15 HEIGHTMOVED P 14 YPOS P 13 SOFTCURSORUP P 12 DISPINTERRUPT P 11 SOURCEBIT P 10 WIDTH P 9 DESTBIT P 8 PILOTBBT P 7 CURX P 6 RIGHT P 5 LEFT P 4 NEWX P 2 DD P 1 CHAR8CODE P 0 ROTATION I 1 DISPLAYSTREAM I 0 CHARCODE F 17 \SOFTCURSORP F 18 \SOFTCURSORUPP F 19 \CURSORDESTINATION F 20 \SCREENBITMAPS) K@@lÿåYAÉ0ZdÉ È Xdjð¢±~€ JÉ_JÉIÐÈØ\JÉñ²l A +¿JÉ_JÉIÐÈؼJL¿OJÉØ_¿JÈ"dOñ¢¿O½JÈ#LJÉØ»dKñ‘¿K¾JÉ*_¿NMñ¢± OÈ jð’±M_¿NMÙ_¿JÉIÐÈMØOÙ_¿JÉÈdkð³adlð²¿Oàà_¿Oàà_¿Oàà_°Ddlð²¿Oààà_¿Oààà_¿Oààà_°$lð²lOÚ_¿lOÚ_¿lOÚ_„¿ W"²-W$´ hA +W&ð_²`È_¿`jÍ¿¿A`ð³hA +W(–A ¿OOÍ¿OOÍ¿OOÍ¿Ojv¿OŸ¿`OÍ¿±·0JÉ_¿JÉIÐÈ_¿JÉ É@ãàÐɵ @ãJÉ h _ ¿HdlZð²;¿AOOØ ¿O ÉjJÉIÐÈAJÉO È ÙkØOO È O È ØO °Hnð²8AOOÙ ¿O ÉjJÉIÐÈAJÉO È ÙJÉO È -O È ØO ‰o h(586 ERROR 575 BKBITBLT 533 \DSPYPOSITION.DISPLAY 514 BKBITBLT 471 \DSPYPOSITION.DISPLAY 449 \CREATECHARSET 390 \SOFTCURSORUPCURRENT 355 \TOTOPWDS 345 DSPDESTINATION 328 \SOFTCURSORDOWN 294 DSPDESTINATION 275 SHOULDNT 55 \DSPPRINTCR/LF) (396 \EM.DISPINTERRUPT 335 \TOPWDS 319 \EM.DISPINTERRUPT 309 \EM.DISPINTERRUPT 299 \CURSORDESTINATION 111 \DISPLAYDATA 83 \DISPLAYDATA) ( 581 "Not implemented to rotate by other than 0, 90 or 270") TEXTUREP :D8 (I 0 OBJECT) @d3 ³ô@Èkð´@NIL (18 BITMAP 10 BITMAP) () INVERT.TEXTURE :D8 (I 1 SCRATCHBM I 0 TEXTURE) @d3 ˜nÿÿånÿÿæA +O È ØO ‰o h(583 ERROR 572 BKBITBLT 530 \DSPYPOSITION.DISPLAY 511 BKBITBLT 468 \DSPYPOSITION.DISPLAY 446 \CREATECHARSET 387 \SOFTCURSORUPCURRENT 352 \TOTOPWDS 342 DSPDESTINATION 325 \SOFTCURSORDOWN 294 DSPDESTINATION 275 SHOULDNT 55 \DSPPRINTCR/LF) (393 \EM.DISPINTERRUPT 332 \TOPWDS 316 \EM.DISPINTERRUPT 306 \EM.DISPINTERRUPT 111 \DISPLAYDATA 83 \DISPLAYDATA) ( 578 "Not implemented to rotate by other than 0, 90 or 270") TEXTUREP :D8 (I 0 OBJECT) @d3 ³ô@Èkð´@NIL (18 BITMAP 10 BITMAP) () INVERT.TEXTURE :D8 (I 1 SCRATCHBM I 0 TEXTURE) @d3 ˜nÿÿånÿÿæA (19 INVERT.TEXTURE.BITMAP) NIL () INVERT.TEXTURE.BITMAP :D8 (P 0 NEWBM I 1 SCRATCHBM I 0 BM) “@Èkð¦@ ¿Aò)AÈkð²@ÈAÈñ–A ¿AŽl@È HÉ@ÉHÉ@ÈÐIdKð‘HJÈnÿÿæÍ¿JkкIkÐY°è(79 BITMAPCREATE 61 \ILLEGAL.ARG 16 \ILLEGAL.ARG) (112 BITMAP 104 BITMAP 96 BITMAP 88 BITMAP 72 BITMAP 51 BITMAP 43 BITMAP 31 BITMAP 23 BITMAP 5 BITMAP) () BITMAPWIDTH :D8 (I 0 BITMAP) &@Ó@È@Û@g @ (35 \ILLEGAL.ARG 28 GETWINDOWPROP) (23 WIDTH 16 WINDOW 5 BITMAP) () READBITMAP :D8 (P 6 BITSPERPIXEL P 5 W P 4 BM P 3 BASE P 2 STRM P 1 HEIGHT P 0 WIDTH I 0 FILE) ù@ @ gðªo ¿@ @ @g CJ dgð§dgð’¿k†¿@ ^HÚlØââââ½HIN \É»Ijð³qJ gð²RIdjñ²\J ¿J l"ð²=Mdjñ²0KjJ l@ÙààààJ l@ÙäÇ¿KkJ l@ÙààààJ l@ÙäÇ¿KkлkÙ°Ï¿J l"ð¬¿o hkÙ°£¿J ¿J l)ð²ãL(237 SKIPSEPRS 224 ERROR 146 SKIPSEPRS 126 SKIPSEPRS 106 BITMAPCREATE 87 RATOM 61 SKIPSEPRS 52 GETSTREAM 41 RATOM 35 RATOM 28 ERROR 11 READC 5 SKIPSEPRS) (131 %" 112 BITMAP 75 %) 67 %" 47 INPUT 16 %() ( 219 "BAD FORMAT OF BITMAP IN FILE" 23 "BAD FORMAT OF BITMAP IN FILE") \INSUREBITSPERPIXEL :D8 (I 0 NBITS) #@d¡kdkð³üdlð³ödlð³ðdlð³ê (32 \ILLEGAL.ARG) NIL () MAXIMUMCOLOR :D8 (L (0 BITSPERPIXEL)) k@çkÙNIL NIL () OPPOSITECOLOR :D8 (I 1 BITSPERPIXEL I 0 COLOR) A @Ù(5 MAXIMUMCOLOR) NIL () MAXIMUMSHADE :D8 (I 0 BITSPERPIXEL) @dkð“nÿÿ (13 MAXIMUMCOLOR) NIL () OPPOSITESHADE :D8 (I 1 BITSPERPIXEL I 0 SHADE) -A @Ù(5 MAXIMUMSHADE) NIL () \MEDW.BITBLT :D8 (P 9 A13796 P 8 A13793 P 7 SOURCEBOTTOMTRANSFORMED P 6 SOURCELEFTTRANSFORMED P 3 SRCWIN P 2 A13790 P 1 DD P 0 DSTWIN I 11 CLIPPINGREGION I 10 TEXTURE I 9 OPERATION I 8 SOURCETYPE I 7 HEIGHT I 6 WIDTH I 5 DESTINATIONBOTTOM I 4 DESTINATIONLEFT I 3 DESTINATION I 2 SOURCEBOTTOM I 1 SOURCELEFT I 0 SOURCE F 10 \SCREENBITMAPS)  +A @Ù(5 MAXIMUMSHADE) NIL () \MEDW.BITBLT :D8 (P 9 A0205 P 8 A0204 P 7 SOURCEBOTTOMTRANSFORMED P 6 SOURCELEFTTRANSFORMED P 3 SRCWIN P 2 A0203 P 1 DD P 0 DSTWIN I 11 CLIPPINGREGION I 10 TEXTURE I 9 OPERATION I 8 SOURCETYPE I 7 HEIGHT I 6 WIDTH I 5 DESTINATIONBOTTOM I 4 DESTINATIONLEFT I 3 DESTINATION I 2 SOURCEBOTTOM I 1 SOURCELEFT I 0 SOURCE F 10 \SCREENBITMAPS)   @ ³C ªo ¿@òZ@²WCi Cgh É0HÉ2ÉHºHÉ2@ABCDEFGGGGGABlJ±–Cô‚±¯C´‚±¨@i !@gh É0AIÉصABIÉصBKÉ2ÉJ_¿KÉ2IÉNOCDEFGGGGGNIÈ"¼dLñ¡¿LOIÈ$½dMñ¡¿MlO±Þ@ @@ -68,27 +68,27 @@ O W–@ ¿KÉ2ÉL KÉ2IÉNOCDEFGGGGGNIÈ"¼dLñ¡¿LOIÈ$½dMñ¡¿MlO‰o i(524 SHOULDNT 418 \TOTOPWDS 408 DSPDESTINATION 345 \GETSTREAM 330 WFROMDS 318 DSPDESTINATION 311 DSPDESTINATION 162 \GETSTREAM 147 WFROMDS 55 \GETSTREAM 43 WFROMDS 24 SHOULDNT 13 IMAGESTREAMP 5 IMAGESTREAMP) (494 \DISPLAYDATA 477 \DISPLAYDATA 451 \DISPLAYDATA 443 WINDOW 432 SCREEN 425 WINDOW 398 \TOPWDS 383 \DISPLAYDATA 367 \DISPLAYDATA 357 \DISPLAYDATA 350 STREAM 339 OUTPUT 284 \DISPLAYDATA 267 \DISPLAYDATA 241 \DISPLAYDATA 233 WINDOW 222 SCREEN 215 WINDOW 200 \DISPLAYDATA 184 \DISPLAYDATA 174 \DISPLAYDATA 167 STREAM 156 OUTPUT 127 BITMAP 92 WINDOW 83 SCREEN 76 WINDOW 67 \DISPLAYDATA 60 STREAM 49 OUTPUT 31 BITMAP) ( 519 "Invalid argument to \XW.BIBLT" 19 "Neither SOURCE nor DESTINATION is an imagestream.") FINISH-READING-BITMAP :D8 (L (0 STREAM) F 29 *READ-SUPPRESS*) (@ ñ Hd²µoH ¿°íYºI[¼K]µLk¾M_¿J3 šL3 –N3 ’O›oH ¿JNÖlØââââ!W:²,LO$ÖlÖj_¿_¿OOó¥O&°¶@ ¿OkÔ_¿°æJLN _&É_(¿@g -_"¿Lj_ ¿_¿OO ó²»O"ʇ_jð’±¼Oµ‚±©O$j_¿_¿OOó¢±6O" l@ÕO" l@ÕO" l@ÕO" l@ÕjO*ó³-O*ló³&jO,ó³ O,ló³jO.ó³O.lóªjO0ó¥O0lóšo ¿O(jO*ààààO,äÇ¿O(kO.ààààO0äÇO(kÐ_(¿OkÔ_¿±ÿf ¢±ÿTO$j_¿_¿OO󢱇O" l@ÕO" l@ÕO" l@ÕO" l@ÕjO2ó³-O2ló³&jO4ó³ O4ló³jO6ó³O6lóªjO8ó¥O8lóšo ¿O(jO2ààààO4äÇ¿O(kO6ààààO8äÇO(kÐ_(¿OkÔ_¿±ÿvO kÔ_ ¿±þ‘(494 CL:ERROR 386 \FZEROP 335 CL:ERROR 270 READCCODE 260 READCCODE 250 READCCODE 240 READCCODE 169 \GETSTREAM 146 BITMAPCREATE 128 CL:READ-CHAR 78 CL:ERROR 29 ASSERT-FAIL 5 READ) (194 STREAM 164 INPUT 153 BITMAP) ( 489 "Illegal character in bitmap contents specification." 330 "Illegal character in bitmap contents specification." 72 "Bad bitmap dimension specification: ~S" 23 "BUG: FINISH-READING-BITMAP called with non-list on stream: ~S") (RPAQQ MINIMUMCOLOR 0) (RPAQQ MINIMUMSHADE 0) (CONSTANTS (MINIMUMCOLOR 0) (MINIMUMSHADE 0)) (MOVD (QUOTE BITMAPBIT) (QUOTE \BITMAPBIT)) optimize-BITMAPBIT :D8 (L (2 $$CTX 1 $$ENV 0 $$WHOLE)) @ (6 BITMAPBIT.EXPANDER) NIL () (PUTPROP (QUOTE BITMAPBIT) (QUOTE COMPILER:OPTIMIZER-LIST) (CL:ADJOIN (QUOTE optimize-BITMAPBIT) (GET (QUOTE BITMAPBIT) (QUOTE COMPILER:OPTIMIZER-LIST)))) optimize-BITMAPP :D8 (L (2 $$CTX 1 $$ENV 0 $$WHOLE)) @oHhNIL NIL ( 10 (OPENLAMBDA (X) (AND (type? BITMAP X) X))) (PUTPROP (QUOTE BITMAPP) (QUOTE COMPILER:OPTIMIZER-LIST) (CL:ADJOIN (QUOTE optimize-BITMAPP) (GET ( QUOTE BITMAPP) (QUOTE COMPILER:OPTIMIZER-LIST)))) BITMAPBIT.EXPANDER :D8 (P 3 NEWVALUE P 2 Y P 1 X P 0 BM I 0 ARGS) -@@@@ lð•@»oHIJKh(17 LENGTH) NIL ( 32 (OPCODES MISC4 6)) \BITBLT.DISPLAY :D8 (L (11 CLIPPINGREGION 10 TEXTURE 9 OPERATION 8 SOURCETYPE 7 HEIGHT 6 WIDTH 5 DESTINATIONBOTTOM 4 DESTINATIONLEFT 3 DESTINATION 2 SOURCEBOTTOM 1 SOURCELEFT 0 SOURCEBITMAP) F 48 \SCREENBITMAPS F 49 \SOFTCURSORP F 50 \SOFTCURSORUPP) 0 ðð@dò[¿A£jb¿B£jb¿AºB»Fµ3@Èb ¿Gµ@Èb¿±Í@ÈBÙ½dMñ²ì¿M°è@ÈAÙ¼dLñ²É¿L°Ågh É0X¢±‰@¹A¦HÉ +_"¿Lj_ ¿_¿OO ó²»O"ʇ_jð’±¼Oµ‚±©O$j_¿_¿OOó¢±6O" l@ÕO" l@ÕO" l@ÕO" l@ÕjO*ó³-O*ló³&jO,ó³ O,ló³jO.ó³O.lóªjO0ó¥O0lóšo ¿O(jO*ààààO,äÇ¿O(kO.ààààO0äÇO(kÐ_(¿OkÔ_¿±ÿf ¢±ÿTO$j_¿_¿OO󢱇O" l@ÕO" l@ÕO" l@ÕO" l@ÕjO2ó³-O2ló³&jO4ó³ O4ló³jO6ó³O6lóªjO8ó¥O8lóšo ¿O(jO2ààààO4äÇ¿O(kO6ààààO8äÇO(kÐ_(¿OkÔ_¿±ÿvO kÔ_ ¿±þ‘(494 CL:ERROR 386 \FZEROP 335 CL:ERROR 270 READCCODE 260 READCCODE 250 READCCODE 240 READCCODE 169 \GETSTREAM 146 BITMAPCREATE 128 CL:READ-CHAR 78 CL:ERROR 29 ASSERT-FAIL 5 READ) (194 STREAM 164 INPUT 153 BITMAP) ( 489 "Illegal character in bitmap contents specification." 330 "Illegal character in bitmap contents specification." 72 "Bad bitmap dimension specification: ~S" 23 "BUG: FINISH-READING-BITMAP called with non-list on stream: ~S") (RPAQQ MINIMUMCOLOR 0) (RPAQQ MINIMUMSHADE 0) (CONSTANTS (MINIMUMCOLOR 0) (MINIMUMSHADE 0)) (MOVD (QUOTE BITMAPBIT) (QUOTE \BITMAPBIT)) optimize-BITMAPBIT :D8 (L (2 $$CTX 1 $$ENV 0 $$WHOLE)) @ (6 BITMAPBIT.EXPANDER) NIL () (PUTPROP (QUOTE BITMAPBIT) (QUOTE COMPILER:OPTIMIZER-LIST) (CL:ADJOIN (QUOTE optimize-BITMAPBIT) (GET (QUOTE BITMAPBIT) (QUOTE COMPILER:OPTIMIZER-LIST)))) optimize-BITMAPP :D8 (L (2 $$CTX 1 $$ENV 0 $$WHOLE)) @oHhNIL NIL ( 10 (OPENLAMBDA (X) (AND (type? BITMAP X) X))) (PUTPROP (QUOTE BITMAPP) (QUOTE COMPILER:OPTIMIZER-LIST) (CL:ADJOIN (QUOTE optimize-BITMAPP) (GET ( QUOTE BITMAPP) (QUOTE COMPILER:OPTIMIZER-LIST)))) BITMAPBIT.EXPANDER :D8 (P 3 NEWVALUE P 2 Y P 1 X P 0 BM I 0 ARGS) -@@@@ lð•@»oHIJKh(17 LENGTH) NIL ( 32 (OPCODES MISC4 6)) \BITBLT.DISPLAY :D8 (L (11 CLIPPINGREGION 10 TEXTURE 9 OPERATION 8 SOURCETYPE 7 HEIGHT 6 WIDTH 5 DESTINATIONBOTTOM 4 DESTINATIONLEFT 3 DESTINATION 2 SOURCEBOTTOM 1 SOURCELEFT 0 SOURCEBITMAP) F 48 \SCREENBITMAPS F 49 \SOFTCURSORP F 50 \SOFTCURSORUPP F 51 \CURSORDESTINATION) x0 ðð@dò[¿A£jb¿B£jb¿AºB»Fµ3@Èb ¿Gµ@Èb¿±Í@ÈBÙ½dMñ²ì¿M°è@ÈAÙ¼dLñ²É¿L°Ågh É0X¢±‰@¹A¦HÉ b¿B§HÉ -b¿HÉb¿AHÉØbHÈ"¾dNñ¡¿NºBHÉØbHÈ$_¿dOñ¢¿O»FµNHÈ#JÙb ¿Gµ%HÈ%KÙb¿G¥HÉ6b¿Fjñ´ Gjñ³4hHÈ%KÙ_¿dOñ²Ö¿O°ÑHÈ#JÙ_¿dOñ²­¿O°¨Cdâ±É¿I ¢±¤h__¿Wb²;Wd´h@gh -`ð_²`È_¿`jÍ¿¿@gh _`ð³hO -W`—O ¿@ABCDEFGGGGGJK O´‚±”¿`OÍ¿±€@ABCDEFGGGGGJK gh _IdCð’± ³I¢±&Id ¢±¿C ¢±òIdC -¢±ç¿I ÉÉ.C ÉÉ.ð¢±Âh__ _"¿Wb²;Wd´hIgh -`ð_"²`È_ ¿`jÍ¿¿Igh _`ð³hO +b¿HÉb¿AHÉØbHÈ"¾dNñ¡¿NºBHÉØbHÈ$_¿dOñ¢¿O»FµNHÈ#JÙb ¿Gµ%HÈ%KÙb¿G¥HÉ6b¿Fjñ´ Gjñ³4hHÈ%KÙ_¿dOñ²Ö¿O°ÑHÈ#JÙ_¿dOñ²­¿O°¨Cdâ±Æ¿I ¢±¡h__¿Wb²8Wd´h@gh +Wfð_²`È_¿`jÍ¿¿@gh _`ð³hO +W`—O ¿@ABCDEFGGGGGJK O´‚±Ž¿`OÍ¿±z@ABCDEFGGGGGJK gh _IdCð’± ³I¢±#Id ¢±¿C ¢±ïIdC +¢±ä¿I ÉÉ.C ÉÉ.𢱿h__ _"¿Wb²8Wd´hIgh +Wfð_"²`È_ ¿`jÍ¿¿Igh _`ð³hO W`—O ¿@ABFG _jdFGgg ¿O"Ÿ¿`O Í¿OjdODEFGGGGG I ¿I²hI hO -ð¢±ö°)OÉ0_JÉ_L¿O`ð³hO +ð¢±ó°)OÉ0_JÉ_L¿O`ð³hO W`—O ¿DOJÉØb¿EOJÉØb -¿OJÈ"_B¿OJÈ$_F¿OJÈ#_H¿OJÈ%_D¿G²nOBGOJÉØ_(¿dO(ñ¢¿O(_B¿OFGOJÉØ_*¿dO*ñ¢¿O*_F¿OHO(GØ_$¿dO$ñ’¿O$_H¿ODO*GØ_&¿dO&ñ’¿O&_D¿OLÈ_N¿@È_PONð³2OPkð²@jON ON °ONkð¢±Ë@ON -b¿DdOBñ¢¿OB_B¿EdOFñ¢¿OF_F¿FDFØdOHñ’¿OH_H¿GžEGØdODñ’¿OD_D¿DAÙ_>¿EBÙ_@¿JOBO>Ù_,¿dO,ñ¢¿O,djñ¡¿j_B¿KOFO@Ù_.¿dO.ñ¢¿O.djñ¡¿j_F¿@ÈOHO>Ù_0¿dO0ñ’¿O0JFØ_2¿dO2ñ’¿O2_H¿@ÈODO@Ù_4¿dO4ñ’¿O4KGØ_6¿dO6ñ’¿O6_D¿OHOBñ¢±ïODOFñ¢±æG¦OJÉb¿ON _R¿Gdgð²~¿Gd²¿ONkð™G bG£OR°JGd3 —ORåORæ°<òG`µld +¿OJÈ"_B¿OJÈ$_F¿OJÈ#_H¿OJÈ%_D¿G²nOBGOJÉØ_(¿dO(ñ¢¿O(_B¿OFGOJÉØ_*¿dO*ñ¢¿O*_F¿OHO(GØ_$¿dO$ñ’¿O$_H¿ODO*GØ_&¿dO&ñ’¿O&_D¿OLÈ_N¿@È_PONð³2OPkð²@jON ON °ONkð¢±È@ON +b¿DdOBñ¢¿OB_B¿EdOFñ¢¿OF_F¿FDFØdOHñ’¿OH_H¿GžEGØdODñ’¿OD_D¿DAÙ_>¿EBÙ_@¿JOBO>Ù_,¿dO,ñ¢¿O,djñ¡¿j_B¿KOFO@Ù_.¿dO.ñ¢¿O.djñ¡¿j_F¿@ÈOHO>Ù_0¿dO0ñ’¿O0JFØ_2¿dO2ñ’¿O2_H¿@ÈODO@Ù_4¿dO4ñ’¿O4KGØ_6¿dO6ñ’¿O6_D¿OHOBñ¢±ìODOFñ¢±ãG¦OJÉb¿ON _R¿Gdgð²~¿Gd²¿ONkð™G bG£OR°JGd3 —ORåORæ°<òG`µld  °ONkð©GON †G b¿ONdkð³)¿GON -°gð²ONdkðœ¿G b¿ONkð³ONOBÚ_B¿ONOHÚ_H¿ONO>Ú_>¿h_8_:¿Wb²1Wd´hO -`ð_:²`È_8¿`jÍ¿¿O`ð³hO -W`—O ¿`/ODOFÙ_T¿OHOBÙ_V¿OLÈODO@ØÙ_X¿OBO>Ø_Z¿@ÈODÙ_\¿OB_^¿`OVÍ¿`OTÍ ¿Ggð²"`@O^O\OLOZOXOVOTGG ° `@O^O\OLOZOXOTGGG O:Ÿ¿`O8Í¿°.OÉ.É_<¿@ABODEFGGGGGJKlO<h(1859 \SOFTCURSORUPCURRENT 1850 \BITBLTSUB 1818 \BITBLT.MERGE 1683 \TOTOPWDS 1672 DSPDESTINATION 1653 \SOFTCURSORDOWN 1619 DSPDESTINATION 1564 INSURE.B&W.TEXTURE 1540 COLORTEXTUREFROMCOLOR# 1520 \ILLEGAL.ARG 1512 COLORNUMBERP 1496 INVERT.TEXTURE.BITMAP 1486 BITMAPCREATE 1438 INSURE.B&W.TEXTURE 1404 MAXIMUMSHADE 1171 UNCOLORIZEBITMAP 1166 COLORMAP 1148 COLORIZEBITMAP 1141 MAXIMUMCOLOR 915 \TOTOPWDS 904 DSPDESTINATION 857 DSPDESTINATION 849 DSPDESTINATION 838 TOTOPW 831 BKBITBLT 795 \SOFTCURSORUPCURRENT 786 BKBITBLT 763 BITMAPCREATE 751 \TOTOPWDS 740 DSPDESTINATION 722 \GETSTREAM 709 \SOFTCURSORDOWN 675 DSPDESTINATION 670 \GETSTREAM 627 \INSUREWINDOW 612 \INSUREWINDOW 601 WOVERLAPP 589 WINDOWP 578 WFROMDS 564 WINDOWP 549 \GETSTREAM 537 \BITBLT.BITMAP 498 \SOFTCURSORUPCURRENT 485 \BITBLT.BITMAP 459 \TOTOPWDS 448 DSPDESTINATION 430 \GETSTREAM 417 \SOFTCURSORDOWN 383 DSPDESTINATION 378 \GETSTREAM 347 WINDOWP 117 \GETSTREAM) (1887 IMAGEOPS 1880 STREAM 1865 \EM.DISPINTERRUPT 1825 \SYSPILOTBBT 1793 \SYSPILOTBBT 1785 MERGE 1773 PILOTBBT 1768 \SYSPILOTBBT 1758 PILOTBBT 1753 \SYSPILOTBBT 1735 BITMAP 1710 BITMAP 1661 \TOPWDS 1644 \EM.DISPINTERRUPT 1634 \EM.DISPINTERRUPT 1624 \CURSORDESTINATION 1547 TEXTURE 1491 \BBSCRATCHTEXTURE 1476 \BBSCRATCHTEXTURE 1467 BITMAP 1415 MERGE 1111 BITMAP 1038 \DISPLAYDATA 1008 \DISPLAYDATA 987 \DISPLAYDATA 975 \DISPLAYDATA 963 \DISPLAYDATA 951 \DISPLAYDATA 938 \DISPLAYDATA 924 \DISPLAYDATA 893 \TOPWDS 881 \DISPLAYDATA 872 STREAM 801 \EM.DISPINTERRUPT 780 REPLACE 775 INPUT 729 \TOPWDS 716 OUTPUT 700 \EM.DISPINTERRUPT 690 \EM.DISPINTERRUPT 680 \CURSORDESTINATION 664 OUTPUT 634 STREAM 619 STREAM 543 OUTPUT 504 \EM.DISPINTERRUPT 437 \TOPWDS 424 OUTPUT 408 \EM.DISPINTERRUPT 398 \EM.DISPINTERRUPT 388 \CURSORDESTINATION 372 OUTPUT 336 BITMAP 311 \DISPLAYDATA 287 \DISPLAYDATA 252 \DISPLAYDATA 235 \DISPLAYDATA 212 \DISPLAYDATA 201 \DISPLAYDATA 184 \DISPLAYDATA 173 \DISPLAYDATA 161 \DISPLAYDATA 129 \DISPLAYDATA 122 STREAM 111 OUTPUT 92 BITMAP 72 BITMAP 58 BITMAP 43 BITMAP 15 BITMAP) () \BITBLT.BITMAP :D8 (L (13 CLIPPEDSOURCEBOTTOM 12 CLIPPEDSOURCELEFT 11 CLIPPINGREGION 10 TEXTURE 9 OPERATION 8 SOURCETYPE 7 HEIGHT 6 WIDTH 5 DESTINATIONBOTTOM 4 DESTINATIONLEFT 3 DESTBITMAP 2 SOURCEBOTTOM 1 SOURCELEFT 0 SOURCEBITMAP) P 18 \INTERRUPTABLE) ð0CÈ[CÈ\j]d^@È_CÈZG²QMG_¿dOñ¢¿O½NG_¿dOñ¢¿O¾JGGØ_¿dOñ’¿OºKGGØ_¿dOñ’¿O»DdMñ¡¿M½EdNñ¡¿N¾F™DFØdJñ‘¿JºGšEGØdKñ‘¿K»DAÙXEBÙYGdjñ¡¿jMHÙ_¿dOñ¢¿O½Gdjñ¡¿jNIÙ_¿dOñ¢¿O¾@ÈJHÙ_¿dOñ’¿OGFØ_¿dOñ’¿Oº@ÈKIÙ_ ¿dO ñ’¿O GGØ_"¿dO"ñ’¿O"[JMñ´dNñ¡hGgð²WGµnÿÿ°K3 ›Gnÿÿånÿÿæ°Ú_>¿h_8_:¿Wb².Wd´ hO +Wfð_:²`È_8¿`jÍ¿¿O`ð³hO +W`—O ¿`/ODOFÙ_T¿OHOBÙ_V¿OLÈODO@ØÙ_X¿OBO>Ø_Z¿@ÈODÙ_\¿OB_^¿`OVÍ¿`OTÍ ¿Ggð²"`@O^O\OLOZOXOVOTGG ° `@O^O\OLOZOXOTGGG O:Ÿ¿`O8Í¿°.OÉ.É_<¿@ABODEFGGGGGJKlO<h(1850 \SOFTCURSORUPCURRENT 1841 \BITBLTSUB 1809 \BITBLT.MERGE 1674 \TOTOPWDS 1663 DSPDESTINATION 1644 \SOFTCURSORDOWN 1613 DSPDESTINATION 1558 INSURE.B&W.TEXTURE 1534 COLORTEXTUREFROMCOLOR# 1514 \ILLEGAL.ARG 1506 COLORNUMBERP 1490 INVERT.TEXTURE.BITMAP 1480 BITMAPCREATE 1432 INSURE.B&W.TEXTURE 1398 MAXIMUMSHADE 1165 UNCOLORIZEBITMAP 1160 COLORMAP 1142 COLORIZEBITMAP 1135 MAXIMUMCOLOR 909 \TOTOPWDS 898 DSPDESTINATION 851 DSPDESTINATION 843 DSPDESTINATION 832 TOTOPW 825 BKBITBLT 789 \SOFTCURSORUPCURRENT 780 BKBITBLT 757 BITMAPCREATE 745 \TOTOPWDS 734 DSPDESTINATION 716 \GETSTREAM 703 \SOFTCURSORDOWN 672 DSPDESTINATION 667 \GETSTREAM 624 \INSUREWINDOW 609 \INSUREWINDOW 598 WOVERLAPP 586 WINDOWP 575 WFROMDS 561 WINDOWP 546 \GETSTREAM 534 \BITBLT.BITMAP 495 \SOFTCURSORUPCURRENT 482 \BITBLT.BITMAP 456 \TOTOPWDS 445 DSPDESTINATION 427 \GETSTREAM 414 \SOFTCURSORDOWN 383 DSPDESTINATION 378 \GETSTREAM 347 WINDOWP 117 \GETSTREAM) (1878 IMAGEOPS 1871 STREAM 1856 \EM.DISPINTERRUPT 1816 \SYSPILOTBBT 1784 \SYSPILOTBBT 1776 MERGE 1764 PILOTBBT 1759 \SYSPILOTBBT 1749 PILOTBBT 1744 \SYSPILOTBBT 1726 BITMAP 1701 BITMAP 1652 \TOPWDS 1635 \EM.DISPINTERRUPT 1625 \EM.DISPINTERRUPT 1541 TEXTURE 1485 \BBSCRATCHTEXTURE 1470 \BBSCRATCHTEXTURE 1461 BITMAP 1409 MERGE 1105 BITMAP 1032 \DISPLAYDATA 1002 \DISPLAYDATA 981 \DISPLAYDATA 969 \DISPLAYDATA 957 \DISPLAYDATA 945 \DISPLAYDATA 932 \DISPLAYDATA 918 \DISPLAYDATA 887 \TOPWDS 875 \DISPLAYDATA 866 STREAM 795 \EM.DISPINTERRUPT 774 REPLACE 769 INPUT 723 \TOPWDS 710 OUTPUT 694 \EM.DISPINTERRUPT 684 \EM.DISPINTERRUPT 661 OUTPUT 631 STREAM 616 STREAM 540 OUTPUT 501 \EM.DISPINTERRUPT 434 \TOPWDS 421 OUTPUT 405 \EM.DISPINTERRUPT 395 \EM.DISPINTERRUPT 372 OUTPUT 336 BITMAP 311 \DISPLAYDATA 287 \DISPLAYDATA 252 \DISPLAYDATA 235 \DISPLAYDATA 212 \DISPLAYDATA 201 \DISPLAYDATA 184 \DISPLAYDATA 173 \DISPLAYDATA 161 \DISPLAYDATA 129 \DISPLAYDATA 122 STREAM 111 OUTPUT 92 BITMAP 72 BITMAP 58 BITMAP 43 BITMAP 15 BITMAP) () \BITBLT.BITMAP :D8 (L (13 CLIPPEDSOURCEBOTTOM 12 CLIPPEDSOURCELEFT 11 CLIPPINGREGION 10 TEXTURE 9 OPERATION 8 SOURCETYPE 7 HEIGHT 6 WIDTH 5 DESTINATIONBOTTOM 4 DESTINATIONLEFT 3 DESTBITMAP 2 SOURCEBOTTOM 1 SOURCELEFT 0 SOURCEBITMAP) P 18 \INTERRUPTABLE) ð0CÈ[CÈ\j]d^@È_CÈZG²QMG_¿dOñ¢¿O½NG_¿dOñ¢¿O¾JGGØ_¿dOñ’¿OºKGGØ_¿dOñ’¿O»DdMñ¡¿M½EdNñ¡¿N¾F™DFØdJñ‘¿JºGšEGØdKñ‘¿K»DAÙXEBÙYGdjñ¡¿jMHÙ_¿dOñ¢¿O½Gdjñ¡¿jNIÙ_¿dOñ¢¿O¾@ÈJHÙ_¿dOñ’¿OGFØ_¿dOñ’¿Oº@ÈKIÙ_ ¿dO ñ’¿O GGØ_"¿dO"ñ’¿O"[JMñ´dNñ¡hGgð²WGµnÿÿ°K3 ›Gnÿÿånÿÿæ°¿@nÿÿÍ'A@ h(53 \SFFixFont 33 \SFFixClippingRegion) (14 PILOTBBT) () \SFFixClippingRegion :D8 (P 1 BM P 0 CLIPREG I 0 DISPLAYDATA) •@É -@ÉB@HHØ@ÉØIȺdJñ‘¿J»jKñ¡K€jÍ#@H@ÉØdjñ¡¿jdnÿÿñ“¿nÿÿÍ"@HHØ@ÉØIȼdLñ‘¿L½jMñ¡M€jÍ%@H@ÉØdjñ¡¿jdnÿÿñ“¿nÿÿÍ$hNIL (124 \DISPLAYDATA 91 \DISPLAYDATA 54 \DISPLAYDATA 22 \DISPLAYDATA) () \SFFixFont :D8 (I 1 DISPLAYDATA I 0 DISPLAYSTREAM) 5AÉ*AÉ AÉÈAJkðhðµ IÈ jðhðAnÿÿ>¿AnÿÿÍ'@ (50 \SFFIXLINELENGTH) NIL () \SFFIXLINELENGTH :D8 (P 0 DD I 0 DISPLAYSTREAM) I@É0!@HÉHÉÙHÉ ÈÛ¹kIñ¡I€kºnÿÿJñ‘J‚nÿÿÍg ´ @ h(69 \UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD 61 BOUNDP) (56 %%SYNONYM-STREAM-DEVICE 26 FONTDESCRIPTOR 5 STREAM) () \UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD :D8 (P 7 SI::%%$$MAP-FIRST-SUBLIST P 6 X P 1 SI::%%$$MAP-FIRST-LIST P 0 NEWLENGTH I 0 DISPLAYSTREAM) o@Èa`ÉYOµI^É ²'NÉ @ð²NHÍ¿`ÉZµ`É\µO_°Ç[ÉNð”KHÍ¿J°Þ]ÉNð”MHÍ¿L°Ø(41 CL:SYMBOL-VALUE 31 BOUNDP) (65 %%TWO-WAY-STREAM-DEVICE 55 %%ECHO-STREAM-DEVICE 10 %%SYNONYM-STREAM-DEVICE) () \SFFixY :D8 (P 4 BM P 3 CHARTOP P 2 TOP P 1 Y P 0 PBT I 1 CSINFO I 0 DISPLAYDATA) È @É*@É@ÉØ’ +@ÉB@HHØ@ÉØIȺdJñ‘¿J»jKñ¡K€jÍ#@H@ÉØdjñ¡¿jdnÿÿñ“¿nÿÿÍ"@HHØ@ÉØIȼdLñ‘¿L½jMñ¡M€jÍ%@H@ÉØdjñ¡¿jdnÿÿñ“¿nÿÿÍ$hNIL (124 \DISPLAYDATA 91 \DISPLAYDATA 54 \DISPLAYDATA 22 \DISPLAYDATA) () \SFFixFont :D8 (I 1 DISPLAYDATA I 0 DISPLAYSTREAM) 5AÉ*AÉ AÉÈAJkðhðµ IÈ jðhðAnÿÿ>¿AnÿÿÍ'@ (50 \SFFIXLINELENGTH) NIL () \SFFIXLINELENGTH :D8 (P 0 DD I 0 DISPLAYSTREAM) I@É0!@HÉHÉÙHÉ ÈÛ¹kIñ¡I€kºnÿÿJñ‘J‚nÿÿÍg ´ @ h(69 \UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD 61 BOUNDP) (56 %%SYNONYM-STREAM-DEVICE 26 FONTDESCRIPTOR 5 STREAM) () \UPDATE-SYNONYM-STREAM-LINELENGTH-FIELD :D8 (P 7 SI::%%$$MAP-FIRST-SUBLIST P 6 X P 1 SI::%%$$MAP-FIRST-LIST P 0 NEWLENGTH I 0 DISPLAYSTREAM F 8 %%SYNONYM-STREAM-DEVICE F 9 %%ECHO-STREAM-DEVICE F 10 %%TWO-WAY-STREAM-DEVICE) f@ÈaWÉYOµI^É ²!NÉ @ð²NHÍ¿WÉZµWÉ\µO_°Í[ÉNð”KHÍ¿J°á]ÉNð”MHÍ¿L°Ø(38 CL:SYMBOL-VALUE 28 BOUNDP) NIL () \SFFixY :D8 (P 4 BM P 3 CHARTOP P 2 TOP P 1 Y P 0 PBT I 1 CSINFO I 0 DISPLAYDATA) È @É*@É@ÉØ’ I@AÈ ]Í'¿MØ[@É\ÉLÈLÈ@È%dKñ‘¿Kdjñ¡¿jZÙÚоHNÒÍ¿HNÓÍ¿AÉ\ÉLÈ@KJÙdjñ¡¿jdnÿÿñ“¿nÿÿ_B¿OÚÐ_¿HOÒÍ¿HOÓÍ¿HJI@AÈ _Í@¿OÙ@È$_¿dOñ¢¿OÙdjñ¡¿jÍ hNIL (152 PILOTBBT 140 PILOTBBT 88 PILOTBBT 77 PILOTBBT 49 BITMAP 38 BITMAP 11 \DISPLAYDATA) () \MEDW.XOFFSET :D8 (P 1 \INTERRUPTABLE P 0 DD I 1 DISPLAYSTREAM I 0 XOFFSET) NAd²Egh É0HÉ@²@d3²¿H@¿H  ¿ (75 \ILLEGAL.ARG 68 \ILLEGAL.ARG 61 \SFFixClippingRegion 14 \GETSTREAM) (35 \DISPLAYDATA 26 \DISPLAYDATA 19 STREAM 8 OUTPUT) () \MEDW.YOFFSET :D8 (P 1 \INTERRUPTABLE P 0 DD I 1 DISPLAYSTREAM I 0 YOFFSET) WAd²Ngh É0HÉ@²-@d3²!¿H@¿H ¿Hnÿÿ>¿HnÿÿÍ' ¿ (84 \ILLEGAL.ARG 77 \ILLEGAL.ARG 56 \SFFixClippingRegion 14 \GETSTREAM) (26 \DISPLAYDATA 19 STREAM 8 OUTPUT) () \DSPCLIPPINGREGION.DISPLAY :D8 (P 1 \INTERRUPTABLE P 0 DD I 1 REGION I 0 DISPLAYSTREAM) e@gh É0HÉ A²DAl @@ -155,12 +154,13 @@ jHh (119 \SFFixFont 105 \CREATECHARSET 62 ERROR 50 FONTCOPY 31 \COERCEFONTDESC) (83 FONTDESCRIPTOR 41 NOERROR 17 \DISPLAYDATA 8 STREAM) ( 57 "FONT NOT FOUND OR ILLEGAL FONTCOPY PARAMETER") \DISPLAY.PILOTBITBLT :D8 (I 1 N I 0 PILOTBBT) @AvNIL NIL () \DSPLINEFEED.DISPLAY :D8 (P 0 DD I 1 DELTAY I 0 DISPLAYSTREAM) %@É0HÉA²Ad3–¿HA¿ ¿(33 \ILLEGAL.ARG) (5 STREAM) () \DSPLEFTMARGIN.DISPLAY :D8 (P 1 \INTERRUPTABLE P 0 DD I 1 XPOSITION I 0 DISPLAYSTREAM) 0@É0HÉA²Ad3²¿HA¿@  ¿(44 \ILLEGAL.ARG 37 \SFFIXLINELENGTH) (5 STREAM) () \DSPOPERATION.DISPLAY :D8 (P 3 \INTERRUPTABLE P 0 DD I 1 OPERATION I 0 DISPLAYSTREAM) ¯@gh É0!HÉA¢±ˆAgð³%Agð³Agð³Adgð¦l ¿HA¿HÉ*HÉ ºYAdgð“¿k°gð’l‹Agð’l€jÏ Q¿IJgðAgðð‘j€kÏ -@(82 \LISPERROR 11 \GETSTREAM) (162 ERASE 155 INVERT 138 INVERT 127 PAINT 116 ERASE 105 \DISPLAYDATA 97 \DISPLAYDATA 73 ERASE 63 INVERT 54 REPLACE 45 PAINT 32 \DISPLAYDATA 23 \DISPLAYDATA 16 STREAM 5 OUTPUT) () \DSPRIGHTMARGIN.DISPLAY :D8 (P 2 \INTERRUPTABLE P 1 OLDRM P 0 DD I 1 XPOSITION I 0 DISPLAYSTREAM) 4@É0HÉYA²!Ad3²Iô³HA¿@ „ I(48 \ILLEGAL.ARG 41 \SFFIXLINELENGTH) (5 STREAM) () \DSPXPOSITION.DISPLAY :D8 (P 0 DD I 1 XPOSITION I 0 DISPLAYSTREAM) /@É0HÉA²Ad3›¿HA¿@jÍ¿ ¿(43 \ILLEGAL.ARG) (16 \DISPLAYDATA 5 STREAM) () \DSPYPOSITION.DISPLAY :D8 (P 1 \INTERRUPTABLE P 0 DD I 1 YPOSITION I 0 DISPLAYSTREAM) 7@É0HÉA²&Ad3²¿HA¿Hnÿÿ>¿HnÿÿÍ' ¿(51 \ILLEGAL.ARG) (5 STREAM) () (MOVD? (QUOTE \ILLEGAL.ARG) (QUOTE \COERCETODS)) (MOVD? (QUOTE NILL) (QUOTE WFROMDS)) (MOVD? (QUOTE NILL) (QUOTE WINDOWP)) (MOVD? (QUOTE NILL) (QUOTE INVERTW)) (RPAQ? PROMPTWINDOW T) (RPAQ? \WINDOWWORLD NIL) (RPAQ? \MAINSCREEN NIL) (RPAQ? \TOPWDS) (RPAQ? \SCREENBITMAPS) (MOVD? (QUOTE NILL) (QUOTE \TOTOPWDS)) TTYDISPLAYSTREAM :D8 (P 3 DD P 2 WIN P 0 \INTERRUPTABLE I 0 DISPLAYSTREAM F 4 \TERM.OFD F 5 \LINEBUF.OFD F 6 *STANDARD-OUTPUT* F 7 *STANDARD-INPUT* F 8 TtyDisplayStream) T@¢± @gh b ³g –@ ¦@ ¿ @dTð’±…¿Tµ VTð²8@c °4`ð³ð`–h ¿Ti +@(82 \LISPERROR 11 \GETSTREAM) (162 ERASE 155 INVERT 138 INVERT 127 PAINT 116 ERASE 105 \DISPLAYDATA 97 \DISPLAYDATA 73 ERASE 63 INVERT 54 REPLACE 45 PAINT 32 \DISPLAYDATA 23 \DISPLAYDATA 16 STREAM 5 OUTPUT) () \DSPRIGHTMARGIN.DISPLAY :D8 (P 2 \INTERRUPTABLE P 1 OLDRM P 0 DD I 1 XPOSITION I 0 DISPLAYSTREAM) 4@É0HÉYA²!Ad3²Iô³HA¿@ „ I(48 \ILLEGAL.ARG 41 \SFFIXLINELENGTH) (5 STREAM) () \DSPXPOSITION.DISPLAY :D8 (P 0 DD I 1 XPOSITION I 0 DISPLAYSTREAM) /@É0HÉA²Ad3›¿HA¿@jÍ¿ ¿(43 \ILLEGAL.ARG) (16 \DISPLAYDATA 5 STREAM) () \DSPYPOSITION.DISPLAY :D8 (P 1 \INTERRUPTABLE P 0 DD I 1 YPOSITION I 0 DISPLAYSTREAM) 7@É0HÉA²&Ad3²¿HA¿Hnÿÿ>¿HnÿÿÍ' ¿(51 \ILLEGAL.ARG) (5 STREAM) () (MOVD? (QUOTE \ILLEGAL.ARG) (QUOTE \COERCETODS)) (MOVD? (QUOTE NILL) (QUOTE WFROMDS)) (MOVD? (QUOTE NILL) (QUOTE WINDOWP)) (MOVD? (QUOTE NILL) (QUOTE INVERTW)) (RPAQ? PROMPTWINDOW T) (RPAQ? \WINDOWWORLD NIL) (RPAQ? \MAINSCREEN NIL) (RPAQ? \TOPWDS) (RPAQ? \SCREENBITMAPS) (MOVD? (QUOTE NILL) (QUOTE \TOTOPWDS)) TTYDISPLAYSTREAM :D8 (P 3 DD P 2 WIN P 0 \INTERRUPTABLE I 0 DISPLAYSTREAM F 4 \TERM.OFD F 5 \LINEBUF.OFD F 6 *STANDARD-OUTPUT* F 7 *STANDARD-INPUT* F 8 \DISPLAYSTREAMTYPES F 9 TtyDisplayStream) T@¢± +@gh b ³g –@ ¦@ ¿ @dTð’±…¿Tµ VTð²8@c °4`ð³ð`–h ¿Ti JœJgU ¿°Ç@c¿WU@i Z² Jg` ¿Jg µc -ð“Uc¿@c `²Cg@ -¿@É0[È%KÈ$ÙKɹjIñ¡I‚jIÙÛ (269 PAGEHEIGHT 216 DSPSCROLL 197 IMAGESTREAMTYPE 180 \CREATELINEBUFFER 173 GETWINDOWUSERPROP 161 PUTWINDOWPROP 142 WFROMDS 121 PUTWINDOWPROP 104 WFROMDS 96 \CARET.DOWN 50 \ILLEGAL.ARG 43 TEXTSTREAMP 36 \DEFINEDP 24 DISPLAYSTREAMP 17 \GETSTREAM) (251 \DISPLAYDATA 242 \DISPLAYDATA 234 \DISPLAYDATA 226 STREAM 210 ON 202 \DISPLAYSTREAMTYPES 168 \LINEBUF.OFD 156 \RUNNING.PROCESS 151 PROCESS 115 \LINEBUF.OFD 89 \CARET.UP 81 \DEFAULTTTYDISPLAYSTREAM 31 TEXTSTREAMP 11 OUTPUT) () optimize-TTYDISPLAYSTREAM :D8 (L (2 $$CTX 1 $$ENV 0 $$WHOLE)) @¥ggNIL (14 IGNOREMACRO 8 \TERM.OFD) () (PUTPROP (QUOTE TTYDISPLAYSTREAM) (QUOTE COMPILER:OPTIMIZER-LIST) (CL:ADJOIN (QUOTE optimize-TTYDISPLAYSTREAM) (GET (QUOTE TTYDISPLAYSTREAM) (QUOTE COMPILER:OPTIMIZER-LIST)))) DSPSCROLL :D8 (I 1 DISPLAYSTREAM I 0 SWITCHSETTING) 6Agh É0Hɵg@œH@gðhð¿(11 \GETSTREAM) (45 OFF 36 OFF 23 \DISPLAYDATA 16 STREAM 5 OUTPUT) () PAGEHEIGHT :D8 (L (0 N) F 0 \#DISPLAYLINES F 1 \CURRENTDISPLAYLINE) P@3—@c¿jc¿NIL NIL () (RPAQ? \CURRENTTTYDEVICE (QUOTE BCPLDISPLAY)) \DSPRESET.DISPLAY :D8 (P 5 X P 4 FONTASCENT P 3 FONT P 2 CREG P 1 WINDOW P 0 DD I 0 DISPLAYSTREAM) -@gh bÉ0@i +ð“Uc¿@c W²Cg@ +¿@É0[È%KÈ$ÙKɹjIñ¡I‚jIÙÛ (266 PAGEHEIGHT 213 DSPSCROLL 197 IMAGESTREAMTYPE 180 \CREATELINEBUFFER 173 GETWINDOWUSERPROP 161 PUTWINDOWPROP 142 WFROMDS 121 PUTWINDOWPROP 104 WFROMDS 96 \CARET.DOWN 50 \ILLEGAL.ARG 43 TEXTSTREAMP 36 \DEFINEDP 24 DISPLAYSTREAMP 17 \GETSTREAM) (248 \DISPLAYDATA 239 \DISPLAYDATA 231 \DISPLAYDATA 223 STREAM 207 ON 168 \LINEBUF.OFD 156 \RUNNING.PROCESS 151 PROCESS 115 \LINEBUF.OFD 89 \CARET.UP 81 \DEFAULTTTYDISPLAYSTREAM 31 TEXTSTREAMP 11 OUTPUT) () optimize-TTYDISPLAYSTREAM :D8 (L (2 $$CTX 1 $$ENV 0 $$WHOLE)) @¥ggNIL (14 IGNOREMACRO 8 \TERM.OFD) () (PUTPROP (QUOTE TTYDISPLAYSTREAM) (QUOTE COMPILER:OPTIMIZER-LIST) (CL:ADJOIN (QUOTE optimize-TTYDISPLAYSTREAM) (GET (QUOTE TTYDISPLAYSTREAM) (QUOTE COMPILER:OPTIMIZER-LIST)))) DSPSCROLL :D8 (I 1 DISPLAYSTREAM I 0 SWITCHSETTING) 6Agh É0Hɵg@œH@gðhð¿(11 \GETSTREAM) (45 OFF 36 OFF 23 \DISPLAYDATA 16 STREAM 5 OUTPUT) () PAGEHEIGHT :D8 (L (0 N) F 0 \#DISPLAYLINES F 1 \CURRENTDISPLAYLINE) P@3—@c¿jc¿NIL NIL () (RPAQ? \CURRENTTTYDEVICE (QUOTE BCPLDISPLAY)) \DSPRESET.DISPLAY :D8 (P 5 X P 4 FONTASCENT P 3 FONT P 2 CREG P 1 WINDOW P 0 DD I 0 DISPLAYSTREAM) -@gh bÉ0@i 2hI I hI @@ -174,33 +174,34 @@ ZH ¿@JJØmÿØ ‰o ¿hdd@JJJJggHÉ6 @i Md²" É.]d² @ð´Mo -h(297 PROCESS.EVAL 282 PROCESS.TTY 271 \INSUREWINDOW 259 WFROMDS 252 BKBITBLT 214 ERROR 203 \DSPYPOSITION.DISPLAY 184 \DSPXPOSITION.DISPLAY 158 \DSPYPOSITION.DISPLAY 148 \DSPXPOSITION.DISPLAY 129 \DSPYPOSITION.DISPLAY 106 \DSPXPOSITION.DISPLAY 61 WYOFFSET 55 WYOFFSET 48 WXOFFSET 42 WXOFFSET 32 WFROMDS 11 \GETSTREAM) (243 REPLACE 238 TEXTURE 89 FONTDESCRIPTOR 80 FONTDESCRIPTOR 71 \DISPLAYDATA 25 \DISPLAYDATA 18 STREAM 5 OUTPUT) ( 292 (SETQ \CURRENTDISPLAYLINE 0) 209 "only supported rotations are 0, 90 and 270") (RPAQ? *DRIBBLE-OUTPUT* NIL) expand-\MAYBE-DRIBBLE-CHAR :D8 (L (1 SI::$$MACRO-ENVIRONMENT 0 SI::$$MACRO-FORM)) ?@!H¹HºggogIoggJhhNIL (49 *DRIBBLE-OUTPUT* 44 \OUTCHAR 31 EQ 21 *DRIBBLE-OUTPUT* 16 AND) ( 37 ((TTYDISPLAYSTREAM)) 26 (STREAMP *DRIBBLE-OUTPUT*)) (SETF-MACRO-FUNCTION (QUOTE \MAYBE-DRIBBLE-CHAR) (QUOTE expand-\MAYBE-DRIBBLE-CHAR)) (SET-DOCUMENTATION (QUOTE \MAYBE-DRIBBLE-CHAR) (QUOTE CL:FUNCTION) "if we are dribbling, then dribble this character") \DSPPRINTCHAR :D8 (P 5 TABWIDTH P 4 SPACEWIDTH P 3 I P 2 STR P 1 A13945 P 0 DD I 1 CHARCODE I 0 STREAM F 6 *DRIBBLE-OUTPUT* F 7 \PRIMTERMSA F 8 \TERM.OFD) C@É0`–@ ¿V²"V ²@Wð²VÉ(VAlIAlÿñ² WÉ€²AWÉ€ -µjƒWAÂlådjð²y¿Adl ñ²@H ¿@@ÈkÔͱ¸l ð«Adl ð¦dl +h(297 PROCESS.EVAL 282 PROCESS.TTY 271 \INSUREWINDOW 259 WFROMDS 252 BKBITBLT 214 ERROR 203 \DSPYPOSITION.DISPLAY 184 \DSPXPOSITION.DISPLAY 158 \DSPYPOSITION.DISPLAY 148 \DSPXPOSITION.DISPLAY 129 \DSPYPOSITION.DISPLAY 106 \DSPXPOSITION.DISPLAY 61 WYOFFSET 55 WYOFFSET 48 WXOFFSET 42 WXOFFSET 32 WFROMDS 11 \GETSTREAM) (243 REPLACE 238 TEXTURE 89 FONTDESCRIPTOR 80 FONTDESCRIPTOR 71 \DISPLAYDATA 25 \DISPLAYDATA 18 STREAM 5 OUTPUT) ( 292 (SETQ \CURRENTDISPLAYLINE 0) 209 "only supported rotations are 0, 90 and 270") (RPAQ? *DRIBBLE-OUTPUT* NIL) expand-\MAYBE-DRIBBLE-CHAR :D8 (L (1 SI::$$MACRO-ENVIRONMENT 0 SI::$$MACRO-FORM)) ?@!H¹HºggogIoggJhhNIL (49 *DRIBBLE-OUTPUT* 44 \OUTCHAR 31 EQ 21 *DRIBBLE-OUTPUT* 16 AND) ( 37 ((TTYDISPLAYSTREAM)) 26 (STREAMP *DRIBBLE-OUTPUT*)) (SETF-MACRO-FUNCTION (QUOTE \MAYBE-DRIBBLE-CHAR) (QUOTE expand-\MAYBE-DRIBBLE-CHAR)) (SET-DOCUMENTATION (QUOTE \MAYBE-DRIBBLE-CHAR) (QUOTE CL:FUNCTION) "if we are dribbling, then dribble this character") \DSPPRINTCHAR :D8 (P 4 TABWIDTH P 3 SPACEWIDTH P 2 I P 1 STR P 0 DD I 1 CHARCODE I 0 STREAM F 5 *DRIBBLE-OUTPUT* F 6 \PRIMTERMSA F 7 \TERM.OFD) 3@É0`–@ ¿U²U œ@Wð—UA +¿Alÿñ²VÉ€ŸAVÉ€ +µj‚VAÂlådjð²y¿Adl ñ²@H ¿@@ÈkÔͱ¸l ð«Adl ð¦dl ðŸ¿A@ ¿@jͱ™jð²lA@ @ -±„A@H ¿@@ÈkÔͱfdlð²h¿A º@J +±„A@H ¿@@ÈkÔͱfdlð²h¿A ¹@I HÉHÉÙñ²l @ -¿@J °@@ÈJ ÔÍ¿kJK -µ±@H ¿KkÔ»°ædlð¢±é¿Adl ð©dl ð¤dl +¿@I °@@ÈI ÔÍ¿kIJ +µ±@H ¿JkÔº°ædlð¢±é¿Adl ð©dl ð¤dl ð@ ¿@jͱÓlð²!l$@H ¿@@ÈkÔͱ¯Adlð²3¿`dlð©dlð¤dlð¿o ±…¿@ °vl ð²Ll @ -Lààà]HÉHÉÙM -Ù]H +Kààà\HÉHÉÙL +Ù\H HÉñ˜l @ -¿@@ÈMLÛÔÍ°'A@H ¿@@ÈkÔ͈lð¤h(575 SHOULDNT 546 \BLTCHAR 514 \DSPPRINTCR/LF 501 \DISPLAYSTREAMINCRXPOSITION 493 IMOD 472 CHARWIDTH 457 FLASHWINDOW 452 WFROMDS 442 PLAYTUNE 381 \BLTCHAR 359 \DSPPRINTCR/LF 321 \BLTCHAR 307 NTHCHARCODE 292 NCHARS 270 NCHARS 262 \DSPPRINTCR/LF 244 \STRINGWIDTH.DISPLAY 236 \INDICATESTRING 198 \BLTCHAR 187 DSPBACKUP 181 CHARWIDTH 161 \DSPPRINTCR/LF 116 \BLTCHAR 85 GETHASH 27 STREAMP 17 \CARET.DOWN) (559 STREAM 553 STREAM 527 STREAM 521 STREAM 416 \MACHINETYPE 394 STREAM 388 STREAM 284 STREAM 278 STREAM 211 STREAM 205 STREAM 129 STREAM 123 STREAM 78 CHARTABLE 66 CHARTABLE 41 STREAM 10 \CARET.UP) ( 437 ((880 . 2500))) \DSPPRINTCR/LF :D8 (P 15 SOFTCURSORUP P 14 DISPINTERRUPT P 13 KEPTWIDTH P 12 HGHT P 11 DBITMAP P 10 BKGRND P 9 WDTH P 8 LFT P 7 X P 6 CLIPREG P 5 FONT P 4 ROTATION P 3 Y P 2 AMOUNT/BELOW P 1 BTM P 0 DD I 1 DISPLAY-STREAM I 0 CHARCODE F 16 \SOFTCURSORP F 17 \SOFTCURSORUPP F 18 \SCREENBITMAPS F 19 \TERM.OFD) ÙAdW&𲿿`–A ¿AÉ0QHÉ¢±NHÉ È \jð’±8HÉ +¿@@ÈLKÛÔÍ°'A@H ¿@@ÈkÔ͈lð¤h(559 SHOULDNT 530 \BLTCHAR 498 \DSPPRINTCR/LF 485 \DISPLAYSTREAMINCRXPOSITION 477 IMOD 456 CHARWIDTH 441 FLASHWINDOW 436 WFROMDS 426 PLAYTUNE 365 \BLTCHAR 343 \DSPPRINTCR/LF 305 \BLTCHAR 291 NTHCHARCODE 276 NCHARS 254 NCHARS 246 \DSPPRINTCR/LF 228 \STRINGWIDTH.DISPLAY 220 \INDICATESTRING 182 \BLTCHAR 171 DSPBACKUP 165 CHARWIDTH 145 \DSPPRINTCR/LF 100 \BLTCHAR 70 GETHASH 40 \OUTCHAR 27 STREAMP 17 \CARET.DOWN) (543 STREAM 537 STREAM 511 STREAM 505 STREAM 400 \MACHINETYPE 378 STREAM 372 STREAM 268 STREAM 262 STREAM 195 STREAM 189 STREAM 113 STREAM 107 STREAM 63 CHARTABLE 53 CHARTABLE 10 \CARET.UP) ( 421 ((880 . 2500))) \DSPPRINTCR/LF :D8 (P 15 SOFTCURSORUP P 14 DISPINTERRUPT P 13 KEPTWIDTH P 12 HGHT P 11 DBITMAP P 10 BKGRND P 9 WDTH P 8 LFT P 7 X P 6 CLIPREG P 5 FONT P 4 ROTATION P 3 Y P 2 AMOUNT/BELOW P 1 BTM P 0 DD I 1 DISPLAY-STREAM I 0 CHARCODE F 16 \SOFTCURSORP F 17 \SCREENBITMAPS F 18 \SOFTCURSORUPP F 19 \CURSORDESTINATION F 20 \TERM.OFD) ÓAdW(𲿿`–A ¿AÉ0QHÉ¢±KHÉ È \jð’±5HÉ @l ð²AHÉ2[•AkK¿LdlZð•¿N°nðœNNØmÿ؉o A -¿HÉLdlZð—¿jHÉÙ°nð“Hɉo Ø_¿HÉ¢±¨LdlZð²,¿OHÉØHÈ#HÉ È ÙÙZjñ°5nð²*HÈ"HÉ È ØOHÉØÙZjñ„¢±@` HÈ"_¿HÉ_¿HÈ$¹HÈ%IÙ_¿HÈ#OÙ_¿HÉ6_¿ W ²0W"´hA -`ð_²`È_¿`jÍ¿¿A`ð³hA -W$–A ¿JOñ›hjdOOIO°eLlZð²3OOJØIOOIOJÙ_Ogg +¿HÉLdlZð—¿jHÉÙ°nð“Hɉo Ø_¿HÉ¢±¥LdlZð²,¿OHÉØHÈ#HÉ È ÙÙZjñ°5nð²*HÈ"HÉ È ØOHÉØÙZjñ„¢±=` HÈ"_¿HÉ_¿HÈ$¹HÈ%IÙ_¿HÈ#OÙ_¿HÉ6_¿ W ²-W$´ hA +W&ð_²`È_¿`jÍ¿¿A`ð³hA +W"–A ¿JOñ›hjdOOIO°eLlZð²3OOJØIOOIOJÙ_Ogg ¿hjdOOOØ°,OOIOOJØIOJÙOgg ¿hjdOOIJOggO ¿OŸ¿`OÍ¿LlZð”OJÙƒOJØ_OA -±\@l ð²HÉ2[•AkK¿HÉA -¿HÉHÉØ»HÉ¢±!HÈ$YHÉ È ØKHÉØÙZjñ¢±öP HÈ"_¿HÉ_¿HÈ%IÙ_¿HÈ#OÙ_¿HÉ6_¿ W ²0W"´hA -`ð_²`È_¿`jÍ¿¿A`ð³hA -W$–A ¿JOñhjdOOIOO°0OOIOOIJØOOJÙgg +±Y@l ð²HÉ2[•AkK¿HÉA +¿HÉHÉØ»HÉ¢±HÈ$YHÉ È ØKHÉØÙZjñ¢±óP HÈ"_¿HÉ_¿HÈ%IÙ_¿HÈ#OÙ_¿HÉ6_¿ W ²-W$´ hA +W&ð_²`È_¿`jÍ¿¿A`ð³hA +W"–A ¿JOñhjdOOIOO°0OOIOOIJØOOJÙgg ¿hjdOOIOJggO ¿OŸ¿`OÍ¿KJØ[€KA -h(981 DSPYPOSITION 956 \SOFTCURSORUPCURRENT 947 BKBITBLT 917 BKBITBLT 863 \TOTOPWDS 853 DSPDESTINATION 836 \SOFTCURSORDOWN 802 DSPDESTINATION 667 DSPXPOSITION 632 DSPXPOSITION 594 \SOFTCURSORUPCURRENT 585 BKBITBLT 555 BKBITBLT 508 BKBITBLT 448 \TOTOPWDS 438 DSPDESTINATION 421 \SOFTCURSORDOWN 387 DSPDESTINATION 303 SHOULDNT 187 ERROR 145 DSPYPOSITION 139 ERROR 25 \CARET.DOWN 12 \STOPSCROLL?) (962 \EM.DISPINTERRUPT 939 REPLACE 934 TEXTURE 911 REPLACE 906 INPUT 843 \TOPWDS 827 \EM.DISPINTERRUPT 817 \EM.DISPINTERRUPT 807 \CURSORDESTINATION 770 \DISPLAYDATA 751 \DISPLAYDATA 740 \DISPLAYDATA 720 \DISPLAYDATA 710 FONTDESCRIPTOR 703 \DISPLAYDATA 694 \DISPLAYDATA 682 \DISPLAYDATA 648 \DISPLAYDATA 600 \EM.DISPINTERRUPT 577 REPLACE 572 TEXTURE 549 REPLACE 544 INPUT 502 REPLACE 497 INPUT 428 \TOPWDS 412 \EM.DISPINTERRUPT 402 \EM.DISPINTERRUPT 392 \CURSORDESTINATION 355 \DISPLAYDATA 338 \DISPLAYDATA 327 \DISPLAYDATA 316 \DISPLAYDATA 290 \DISPLAYDATA 279 FONTDESCRIPTOR 272 \DISPLAYDATA 264 \DISPLAYDATA 243 FONTDESCRIPTOR 236 \DISPLAYDATA 228 \DISPLAYDATA 219 \DISPLAYDATA 197 \DISPLAYDATA 152 \DISPLAYDATA 89 \DISPLAYDATA 62 FONTDESCRIPTOR 55 \DISPLAYDATA 43 \DISPLAYDATA 32 STREAM 18 \CARET.UP) ( 182 "Only rotations supported are 0, 90 and 270" 134 "Only rotations supported are 0, 90 and 270") \TTYBACKGROUND :D8 (P 0 X F 1 \LINEBUF.OFD) DQÉ`ð²/`²``ð¥¿`ŠdjHµô(65 \BACKGROUND 39 WAIT.FOR.TTY) (45 TTYBACKGROUNDFNS 32 \TTY.PROCESS 27 \RUNNING.PROCESS 20 \RUNNING.PROCESS 12 \KEYBOARD.STREAM 5 STREAM) () DSPBACKUP :D8 (P 4 XPOS P 3 BLTWIDTH P 2 ROTATION P 1 FONT P 0 DD I 1 DISPLAYSTREAM I 0 WIDTH) fA ³Ag +h(975 DSPYPOSITION 950 \SOFTCURSORUPCURRENT 941 BKBITBLT 911 BKBITBLT 857 \TOTOPWDS 847 DSPDESTINATION 830 \SOFTCURSORDOWN 799 DSPDESTINATION 664 DSPXPOSITION 629 DSPXPOSITION 591 \SOFTCURSORUPCURRENT 582 BKBITBLT 552 BKBITBLT 505 BKBITBLT 445 \TOTOPWDS 435 DSPDESTINATION 418 \SOFTCURSORDOWN 387 DSPDESTINATION 303 SHOULDNT 187 ERROR 145 DSPYPOSITION 139 ERROR 25 \CARET.DOWN 12 \STOPSCROLL?) (956 \EM.DISPINTERRUPT 933 REPLACE 928 TEXTURE 905 REPLACE 900 INPUT 837 \TOPWDS 821 \EM.DISPINTERRUPT 811 \EM.DISPINTERRUPT 767 \DISPLAYDATA 748 \DISPLAYDATA 737 \DISPLAYDATA 717 \DISPLAYDATA 707 FONTDESCRIPTOR 700 \DISPLAYDATA 691 \DISPLAYDATA 679 \DISPLAYDATA 645 \DISPLAYDATA 597 \EM.DISPINTERRUPT 574 REPLACE 569 TEXTURE 546 REPLACE 541 INPUT 499 REPLACE 494 INPUT 425 \TOPWDS 409 \EM.DISPINTERRUPT 399 \EM.DISPINTERRUPT 355 \DISPLAYDATA 338 \DISPLAYDATA 327 \DISPLAYDATA 316 \DISPLAYDATA 290 \DISPLAYDATA 279 FONTDESCRIPTOR 272 \DISPLAYDATA 264 \DISPLAYDATA 243 FONTDESCRIPTOR 236 \DISPLAYDATA 228 \DISPLAYDATA 219 \DISPLAYDATA 197 \DISPLAYDATA 152 \DISPLAYDATA 89 \DISPLAYDATA 62 FONTDESCRIPTOR 55 \DISPLAYDATA 43 \DISPLAYDATA 32 STREAM 18 \CARET.UP) ( 182 "Only rotations supported are 0, 90 and 270" 134 "Only rotations supported are 0, 90 and 270") \TTYBACKGROUND :D8 (P 0 X F 1 \LINEBUF.OFD) DQÉ`ð²/`²``ð¥¿`ŠdjHµô(65 \BACKGROUND 39 WAIT.FOR.TTY) (45 TTYBACKGROUNDFNS 32 \TTY.PROCESS 27 \RUNNING.PROCESS 20 \RUNNING.PROCESS 12 \KEYBOARD.STREAM 5 STREAM) () DSPBACKUP :D8 (P 4 XPOS P 3 BLTWIDTH P 2 ROTATION P 1 FONT P 0 DD I 1 DISPLAYSTREAM I 0 WIDTH) fA ³Ag b ¢±Agh bÉ0q@HÉ\HÉÙ½dMñ‘¿M[HÉ YHɘIÈ €jZKjñ´‚±Ä`–A ¿Jdjð²0¿LKÙA ¿hjdAHÉHÉIÈ ÙKIÈ °qlZð²0hjdAHÉIÈÙHHÉjKÙÔ^¿N°5Jnð²GhjdAHÉIÈ ÙHHÉKÔ_¿OIÈ @@ -208,10 +209,10 @@ Kgg i@Mjñ²#Al ¿Al ¿Al -¾MkÙ]°ÝN(347 BOUT 338 BOUT 329 BOUT 310 BKBITBLT 147 DSPXPOSITION 130 \CARET.DOWN 41 \GETSTREAM 25 DISPLAYSTREAMP 18 GETSTREAM 5 DISPLAYSTREAMP) (304 REPLACE 299 TEXTURE 291 FONTDESCRIPTOR 274 \DISPLAYDATA 268 \DISPLAYDATA 259 FONTDESCRIPTOR 251 \DISPLAYDATA 221 \DISPLAYDATA 215 \DISPLAYDATA 206 FONTDESCRIPTOR 198 \DISPLAYDATA 179 FONTDESCRIPTOR 169 FONTDESCRIPTOR 158 \DISPLAYDATA 123 \CARET.UP 104 FONTDESCRIPTOR 95 \DISPLAYDATA 86 \DISPLAYDATA 65 \DISPLAYDATA 55 \DISPLAYDATA 48 STREAM 35 OUTPUT 13 OUTPUT) () (RPAQ? \CARET.UP) (RPAQQ BELLCNT 2) (RPAQQ BELLRATE 60) (RPAQQ \DisplayStoppedForLogout NIL) (RPAQQ TtyDisplayStream NIL) COLORDISPLAYP :D8 NIL `hðhðNIL (4 ColorScreenBitMap) () DISPLAYBEFOREEXIT :D8 (I 0 EXITFN F 0 \TERM.OFD) L`´E@dgð–¿dgðœ¿P gð‘h(73 SHOULDNT 58 CLRPROMPT 53 DSPRESET 37 SHOWDISPLAY 16 CHANGEBACKGROUNDBORDER 11 CURSOR) (64 SYSOUT 44 MAKESYS 29 LOGOUT 22 \DisplayStoppedForLogout 4 \DisplayStarted) () DISPLAYAFTERENTRY :D8 (I 0 ENTRYFN) ````²2¿` ¿` ¿` ¿h¿g ´  (93 CARETRATE 88 CARETRATE 81 \DEFINEDP 63 CHANGEBACKGROUNDBORDER 51 CURSOR 39 VIDEOCOLOR 28 \STARTDISPLAY) (76 CARETRATE 70 \DisplayStoppedForLogout 57 \DisplayStoppedForLogout 45 \DisplayStoppedForLogout 34 \VideoColor 21 \DisplayStoppedForLogout 14 \EM.CURSORBITMAP 9 BITMAP 4 CursorBitMap) () (PUTPROPS \CHECKCARET MACRO ((X) (AND \CARET.UP (\CARET.DOWN X)))) \DSPCLIPTRANSFORMX :D8 (P 0 TX I 1 DD I 0 X) *@AÉØAÈ"Hñhð´AÈ#Hñ´HNIL (32 \DISPLAYDATA 18 \DISPLAYDATA 6 \DISPLAYDATA) () \DSPCLIPTRANSFORMY :D8 (P 0 TY I 1 DD I 0 Y) *@AÉØAÈ$Hñhð´AÈ%Hñ´HNIL (32 \DISPLAYDATA 18 \DISPLAYDATA 6 \DISPLAYDATA) () \DSPTRANSFORMREGION :D8 (I 1 DS I 0 REGION) '@AÉØ@AÉØ@@hNIL (19 \DISPLAYDATA 7 \DISPLAYDATA) () \DSPUNTRANSFORMY :D8 (I 1 DD I 0 Y) @AÉÙNIL (6 \DISPLAYDATA) () \DSPUNTRANSFORMX :D8 (I 1 DD I 0 X) @AÉÙNIL (6 \DISPLAYDATA) () \OFFSETCLIPPINGREGION :D8 (P 0 CREG I 1 OLDREGION I 0 DD) ~@É -Aµ@Éjð²?@Éjð²3HH@ÉØAH@ÉØAHAHAH@ÉØH@ÉØHHhNIL (106 \DISPLAYDATA 94 \DISPLAYDATA 62 \DISPLAYDATA 47 \DISPLAYDATA 31 \DISPLAYDATA 19 \DISPLAYDATA 5 \DISPLAYDATA) () UPDATESCREENDIMENSIONS :D8 NIL ``dlðªdlð¥dlð²¿nn(dlð²¿lð²}C}D(93 SHOULDNT 60 \DoveDisplay.ScreenHeight 50 \DoveDisplay.ScreenWidth) (87 SCREENHEIGHT 79 SCREENWIDTH 65 SCREENHEIGHT 55 SCREENWIDTH 37 SCREENHEIGHT 29 SCREENWIDTH 4 \MACHINETYPE) () \CreateScreenBitMap :D8 (P 3 I P 1 MAXPAGE# P 0 RASTERWIDTH I 1 HEIGHT I 0 WIDTH) ¹@lØââââHAÚlÿØãkÙY`ñ²I`kØKJó²vI¿`Ö`µ#l d`¿dHÍ¿d@Í¿dAÍ¿dkÍ¿``@Í`HÍ`AÍ``KáÐid ¿KkÔ[±ÿt(175 \NEWPAGE) (165 \DISPLAYREGION 159 ScreenBitMap 151 BITMAP 146 ScreenBitMap 138 BITMAP 133 ScreenBitMap 125 BITMAP 120 ScreenBitMap 113 \DISPLAYREGION 108 BITMAP 79 \DISPLAYREGION 68 ScreenBitMap 62 BITMAP 57 ScreenBitMap 51 \MaxScreenPage 34 \MaxScreenPage 25 \MaxScreenPage) () (UPDATESCREENDIMENSIONS) (RPAQ? SCREENHEIGHT 808) (RPAQ? SCREENWIDTH 1024) (RPAQ? \OLDSCREENHEIGHT 808) (RPAQ? \OLDSCREENWIDTH 1024) (RPAQ? \MaxScreenPage -1) (RPAQ? ScreenBitMap (\CreateScreenBitMap SCREENWIDTH SCREENHEIGHT)) (RPAQ? ColorScreenBitMap NIL) (CURSOR.INIT) (RPAQ? \DISPLAYINFOALIST) \CoerceToDisplayDevice :D8 (P 0 DEV I 0 NameOrDevice) *@µ`HÑHHid µ o (39 ERROR 27 \GETDEVICEFROMNAME) (16 FDEV 7 LastCreatedDisplayDevice) ( 34 "No color drivers have been loaded") \CREATEDISPLAYA0014 :D8 (L (4 FDEV 3 OTHERINFO 2 RECOG 1 ACCESS 0 NAME)) @NIL NIL () \CREATEDISPLAYA0021 :D8 (L (2 FDEV 1 RECOG 0 NAME)) @NIL NIL () \CREATEDISPLAYA0023 :D8 (L (0 NAME)) @NIL NIL () \CREATEDISPLAY :D8 (P 0 FDEV I 0 DISPLAYNAME) … `d@¿djÏ¿djÏ¿djÏ0¿dg¿dg¿dgD¿dg¿dg^¿dgF¿dg¿dgb¿dg`¿dg¿dg¿dg -¿dg ¿dg¿dg,¿dg.¿dg0¿dgT¿dg>¿dg@¿gh¹dI¿dgh¿dgR¿dgP¿dgN¿dgH¿dgB¿dg<¿dg:¿dg8¿dg6¿dg4¿dg2¿dg*¿dg ¿dg¿dg¿dg¿X@H -H(385 \DEFINEDEVICE) (374 \GENERIC.RENAMEFILE 365 NILL 356 NILL 347 NILL 338 NILL 329 \GENERIC.READCHAR 320 \GENERIC.WRITECHAR 311 \GENERIC.PEEKCHAR 302 \GENERIC.UNREADCHAR 293 \GENERIC.READP 284 \ILLEGAL.DEVICEOP 275 NILL 266 \GENERIC.CHARSET 257 \ILLEGAL.DEVICEOP 248 \IS.NOT.RANDACCESSP 239 \IS.NOT.RANDACCESSP 230 \GENERIC.READCCODE 216 OFF 208 \NONPAGEDBOUTS 199 \ILLEGAL.DEVICEOP 190 \PAGEDBACKFILEPTR 181 \ILLEGAL.DEVICEOP 172 \DSPPRINTCHAR 163 \ILLEGAL.DEVICEOP 154 NILL 145 NILL 136 NILL 127 \CREATEDISPLAYA0023 118 \CREATEDISPLAYA0021 109 \ILLEGAL.DEVICEOP 100 NILL 91 \GENERATENOFILES 82 NILL 73 \ILLEGAL.DEVICEOP 64 \CREATEDISPLAYA0014 55 NILL 46 NILL 37 NILL 7 |FDEVTYPE#|) () DISPLAYSTREAMINIT :D8 (P 2 TTYFONTHEIGHT P 1 TTYHEIGHT P 0 TTYFONT I 0 N F 3 TtyDisplayStream) «chS +¾MkÙ]°ÝN(347 BOUT 338 BOUT 329 BOUT 310 BKBITBLT 147 DSPXPOSITION 130 \CARET.DOWN 41 \GETSTREAM 25 DISPLAYSTREAMP 18 GETSTREAM 5 DISPLAYSTREAMP) (304 REPLACE 299 TEXTURE 291 FONTDESCRIPTOR 274 \DISPLAYDATA 268 \DISPLAYDATA 259 FONTDESCRIPTOR 251 \DISPLAYDATA 221 \DISPLAYDATA 215 \DISPLAYDATA 206 FONTDESCRIPTOR 198 \DISPLAYDATA 179 FONTDESCRIPTOR 169 FONTDESCRIPTOR 158 \DISPLAYDATA 123 \CARET.UP 104 FONTDESCRIPTOR 95 \DISPLAYDATA 86 \DISPLAYDATA 65 \DISPLAYDATA 55 \DISPLAYDATA 48 STREAM 35 OUTPUT 13 OUTPUT) () (RPAQ? \CARET.UP) (RPAQQ BELLCNT 2) (RPAQQ BELLRATE 60) (RPAQQ \DisplayStoppedForLogout NIL) (RPAQQ TtyDisplayStream NIL) COLORDISPLAYP :D8 (F 0 ColorScreenBitMap) PhðhðNIL NIL () DISPLAYBEFOREEXIT :D8 (I 0 EXITFN F 0 \TERM.OFD) L`´E@dgð–¿dgðœ¿P gð‘h(73 SHOULDNT 58 CLRPROMPT 53 DSPRESET 37 SHOWDISPLAY 16 CHANGEBACKGROUNDBORDER 11 CURSOR) (64 SYSOUT 44 MAKESYS 29 LOGOUT 22 \DisplayStoppedForLogout 4 \DisplayStarted) () DISPLAYAFTERENTRY :D8 (I 0 ENTRYFN F 0 \VideoColor) \```².¿P ¿` ¿` ¿h¿g ´  (89 CARETRATE 84 CARETRATE 77 \DEFINEDP 59 CHANGEBACKGROUNDBORDER 47 CURSOR 35 VIDEOCOLOR 28 \STARTDISPLAY) (72 CARETRATE 66 \DisplayStoppedForLogout 53 \DisplayStoppedForLogout 41 \DisplayStoppedForLogout 21 \DisplayStoppedForLogout 14 \EM.CURSORBITMAP 9 BITMAP 4 CursorBitMap) () (PUTPROPS \CHECKCARET MACRO ((X) (AND \CARET.UP (\CARET.DOWN X)))) \DSPCLIPTRANSFORMX :D8 (P 0 TX I 1 DD I 0 X) *@AÉØAÈ"Hñhð´AÈ#Hñ´HNIL (32 \DISPLAYDATA 18 \DISPLAYDATA 6 \DISPLAYDATA) () \DSPCLIPTRANSFORMY :D8 (P 0 TY I 1 DD I 0 Y) *@AÉØAÈ$Hñhð´AÈ%Hñ´HNIL (32 \DISPLAYDATA 18 \DISPLAYDATA 6 \DISPLAYDATA) () \DSPTRANSFORMREGION :D8 (I 1 DS I 0 REGION) '@AÉØ@AÉØ@@hNIL (19 \DISPLAYDATA 7 \DISPLAYDATA) () \DSPUNTRANSFORMY :D8 (I 1 DD I 0 Y) @AÉÙNIL (6 \DISPLAYDATA) () \DSPUNTRANSFORMX :D8 (I 1 DD I 0 X) @AÉÙNIL (6 \DISPLAYDATA) () \OFFSETCLIPPINGREGION :D8 (P 0 CREG I 1 OLDREGION I 0 DD) ~@É +Aµ@Éjð²?@Éjð²3HH@ÉØAH@ÉØAHAHAH@ÉØH@ÉØHHhNIL (106 \DISPLAYDATA 94 \DISPLAYDATA 62 \DISPLAYDATA 47 \DISPLAYDATA 31 \DISPLAYDATA 19 \DISPLAYDATA 5 \DISPLAYDATA) () UPDATESCREENDIMENSIONS :D8 NIL ``dlðªdlð¥dlð²¿nn(dlð²¿lð²}C}D(93 SHOULDNT 60 \DoveDisplay.ScreenHeight 50 \DoveDisplay.ScreenWidth) (87 SCREENHEIGHT 79 SCREENWIDTH 65 SCREENHEIGHT 55 SCREENWIDTH 37 SCREENHEIGHT 29 SCREENWIDTH 4 \MACHINETYPE) () \CreateScreenBitMap :D8 (P 3 I P 1 MAXPAGE# P 0 RASTERWIDTH I 1 HEIGHT I 0 WIDTH) ¹@lØââââHAÚlÿØãkÙY`ñ²I`kØKJó²vI¿`Ö`µ#l d`¿dHÍ¿d@Í¿dAÍ¿dkÍ¿``@Í`HÍ`AÍ``KáÐid ¿KkÔ[±ÿt(175 \NEWPAGE) (165 \DISPLAYREGION 159 ScreenBitMap 151 BITMAP 146 ScreenBitMap 138 BITMAP 133 ScreenBitMap 125 BITMAP 120 ScreenBitMap 113 \DISPLAYREGION 108 BITMAP 79 \DISPLAYREGION 68 ScreenBitMap 62 BITMAP 57 ScreenBitMap 51 \MaxScreenPage 34 \MaxScreenPage 25 \MaxScreenPage) () (UPDATESCREENDIMENSIONS) (RPAQ? SCREENHEIGHT 808) (RPAQ? SCREENWIDTH 1024) (RPAQ? \OLDSCREENHEIGHT 808) (RPAQ? \OLDSCREENWIDTH 1024) (RPAQ? \MaxScreenPage -1) (RPAQ? ScreenBitMap (\CreateScreenBitMap SCREENWIDTH SCREENHEIGHT)) (RPAQ? ColorScreenBitMap NIL) (CURSOR.INIT) (RPAQ? \DISPLAYINFOALIST) \CoerceToDisplayDevice :D8 (P 0 DEV I 0 NameOrDevice) *@µ`HÑHHid µ o (39 ERROR 27 \GETDEVICEFROMNAME) (16 FDEV 7 LastCreatedDisplayDevice) ( 34 "No color drivers have been loaded") \CREATEDISPLAYA0014 :D8 (L (4 FDEV 3 OTHERINFO 2 RECOG 1 ACCESS 0 NAME)) @NIL NIL () \CREATEDISPLAYA0021 :D8 (L (2 FDEV 1 RECOG 0 NAME)) @NIL NIL () \CREATEDISPLAYA0023 :D8 (L (0 NAME)) @NIL NIL () \CREATEDISPLAY :D8 (P 0 FDEV I 0 DISPLAYNAME) X `d@¿djÏ¿djÏ¿djÏ0¿dg¿dg¿dgD¿dg¿dg^¿dgF¿dg¿dgb¿dg`¿dg¿dg¿dg +¿dg ¿dg¿dg,¿dg.¿dg0¿dgT¿dg>¿dg@¿gh¹dI¿dgR¿dgP¿dgN¿dgH¿dgB¿dg<¿dg:¿dg*¿dg ¿dg¿dg¿dg¿X@H +H(340 \DEFINEDEVICE) (329 \GENERIC.RENAMEFILE 320 NILL 311 NILL 302 NILL 293 NILL 284 \GENERIC.READP 275 \ILLEGAL.DEVICEOP 266 NILL 257 \GENERIC.CHARSET 248 \ILLEGAL.DEVICEOP 239 \IS.NOT.RANDACCESSP 230 \IS.NO.RANDACCESSP 216 OFF 208 \NONPAGEDBOUTS 199 \ILLEGAL.DEVICEOP 190 \PAGEDBACKFILEPTR 181 \ILLEGAL.DEVICEOP 172 \DSPPRINTCHAR 163 \ILLEGAL.DEVICEOP 154 NILL 145 NILL 136 NILL 127 \CREATEDISPLAYA0023 118 \CREATEDISPLAYA0021 109 \ILLEGAL.DEVICEOP 100 NILL 91 \GENERATENOFILES 82 NILL 73 \ILLEGAL.DEVICEOP 64 \CREATEDISPLAYA0014 55 NILL 46 NILL 37 NILL 7 |FDEVTYPE#|) () DISPLAYSTREAMINIT :D8 (P 2 TTYFONTHEIGHT P 1 TTYHEIGHT P 0 TTYFONT I 0 N F 3 TtyDisplayStream) «chS !HÈ Z`S S `@3µLdJÚ¹`IÙS @@ -219,13 +220,13 @@ Z`S ¿jS ¿jd`IhS ¿`S -¿JÚ`ñš`JÛlÙ€@°(139 DSPRIGHTMARGIN 127 DSPCLIPPINGREGION 107 DSPXOFFSET 99 DSPYPOSITION 84 DSPYOFFSET 57 TERMINAL-OUTPUT 41 DSPDESTINATION 18 DSPFONT 9 DSPCREATE 4 \STARTDISPLAY) (167 \LastTTYLines 155 SCREENHEIGHT 148 SCREENHEIGHT 133 SCREENWIDTH 115 SCREENWIDTH 91 FONTDESCRIPTOR 76 SCREENHEIGHT 62 \LastTTYLines 52 \TopLevelTtyWindow 47 \DEFAULTTTYDISPLAYSTREAM 35 ScreenBitMap 27 FONTDESCRIPTOR) () \STARTDISPLAY :D8 (P 2 \INTERRUPTABLE P 1 W P 0 OLDWINDOWS F 3 \MAINSCREEN F 4 \WINDOWWORLD F 5 \CURSORDESTRASTERWIDTH) I``ðœ``ð³AT²> ¸``ó«``ó–H ¿HŒdI µò`` +¿JÚ`ñš`JÛlÙ€@°(139 DSPRIGHTMARGIN 127 DSPCLIPPINGREGION 107 DSPXOFFSET 99 DSPYPOSITION 84 DSPYOFFSET 57 TERMINAL-OUTPUT 41 DSPDESTINATION 18 DSPFONT 9 DSPCREATE 4 \STARTDISPLAY) (167 \LastTTYLines 155 SCREENHEIGHT 148 SCREENHEIGHT 133 SCREENWIDTH 115 SCREENWIDTH 91 FONTDESCRIPTOR 76 SCREENHEIGHT 62 \LastTTYLines 52 \TopLevelTtyWindow 47 \DEFAULTTTYDISPLAYSTREAM 35 ScreenBitMap 27 FONTDESCRIPTOR) () \STARTDISPLAY :D8 (P 2 \INTERRUPTABLE P 1 W P 0 OLDWINDOWS F 3 \MAINSCREEN F 4 \WINDOWWORLD F 5 \CURSORDESTINATION F 6 \CURSORDESTRASTERWIDTH F 7 \CURSORDESTWIDTH F 8 \CURSORDESTHEIGHT) @``ðœ``ð³AT²> ¸``ó«``ó–H ¿HŒdI µò`` É`È -¿ijd``hSµD````Èc -H²P` ¿H °:`¿S`¿S`¿°•dI µò``h(300 \OPENW1 244 REVERSE 237 CHANGEBACKGROUND 142 SHOWDISPLAY 113 \CreateScreenBitMap 90 \CLOSEW1 76 \MOVE.WINDOWS.ONTO.SCREEN 45 REVERSE 40 OPENWINDOWS 7 UPDATESCREENDIMENSIONS) (325 \OLDSCREENWIDTH 320 SCREENWIDTH 315 \OLDSCREENHEIGHT 310 SCREENHEIGHT 284 SCREENHEIGHT 279 SCREEN 270 SCREENWIDTH 265 SCREEN 256 ScreenBitMap 251 SCREEN 232 WINDOWBACKGROUNDSHADE 220 BITMAP 215 ScreenBitMap 210 \CURSORDESTHEIGHT 205 SCREENHEIGHT 200 \CURSORDESTWIDTH 195 SCREENWIDTH 190 \CURSORDESTINATION 185 ScreenBitMap 177 WHOLESCREEN 172 WHOLEDISPLAY 162 SCREENHEIGHT 157 SCREENWIDTH 149 \DisplayStarted 135 BITMAP 130 ScreenBitMap 123 BITMAP 118 ScreenBitMap 108 SCREENHEIGHT 103 SCREENWIDTH 68 SCREENHEIGHT 63 \OLDSCREENHEIGHT 56 SCREENWIDTH 51 \OLDSCREENWIDTH 29 \OLDSCREENHEIGHT 24 SCREENHEIGHT 17 \OLDSCREENWIDTH 12 SCREENWIDTH) () \MOVE.WINDOWS.ONTO.SCREEN :D8 (P 4 REG P 3 YFACTOR P 2 XFACTOR P 1 W I 0 WINDOWS) Ú@Hµ+h´&```ëZ``ë[@HµAhYÉLLØmÿØ`óµLLØmÿØ`ó•Iµ¥i°¢HX°™Yd ð²\Ii +¿ijd``hSµ;`c +`c`c`Èc H²P` ¿H °:`¿S`¿S`¿°ždI µò``h(291 \OPENW1 235 REVERSE 228 CHANGEBACKGROUND 142 SHOWDISPLAY 113 \CreateScreenBitMap 90 \CLOSEW1 76 \MOVE.WINDOWS.ONTO.SCREEN 45 REVERSE 40 OPENWINDOWS 7 UPDATESCREENDIMENSIONS) (316 \OLDSCREENWIDTH 311 SCREENWIDTH 306 \OLDSCREENHEIGHT 301 SCREENHEIGHT 275 SCREENHEIGHT 270 SCREEN 261 SCREENWIDTH 256 SCREEN 247 ScreenBitMap 242 SCREEN 223 WINDOWBACKGROUNDSHADE 211 BITMAP 206 ScreenBitMap 199 SCREENHEIGHT 192 SCREENWIDTH 185 ScreenBitMap 177 WHOLESCREEN 172 WHOLEDISPLAY 162 SCREENHEIGHT 157 SCREENWIDTH 149 \DisplayStarted 135 BITMAP 130 ScreenBitMap 123 BITMAP 118 ScreenBitMap 108 SCREENHEIGHT 103 SCREENWIDTH 68 SCREENHEIGHT 63 \OLDSCREENHEIGHT 56 SCREENWIDTH 51 \OLDSCREENWIDTH 29 \OLDSCREENHEIGHT 24 SCREENHEIGHT 17 \OLDSCREENWIDTH 12 SCREENWIDTH) () \MOVE.WINDOWS.ONTO.SCREEN :D8 (P 4 REG P 3 YFACTOR P 2 XFACTOR P 1 W I 0 WINDOWS) Ú@Hµ+h´&```ëZ``ë[@HµAhYÉLLØmÿØ`óµLLØmÿØ`ó•Iµ¥i°¢HX°™Yd ð²\Ii YJIÉ\]MØmÿØê LÙ¾jNñ¡N€jKLLØmÿØê LÙ_¿jOñ¢O€j ¿HX±ÿV(209 MOVEW 186 FIXR 154 FIXR 127 MAINWINDOW 117 MAINWINDOW) (135 WINDOW 95 SCREENHEIGHT 75 SCREENWIDTH 55 WINDOW 36 \OLDSCREENHEIGHT 31 SCREENHEIGHT 24 \OLDSCREENWIDTH 19 SCREENWIDTH) () \STOPDISPLAY :D8 (P 0 \INTERRUPTABLE) :¿`É`kØ ¿mÿ¿hl: (55 PAGEHEIGHT 32 \UNLOCKPAGES 7 SHOWDISPLAY) (47 \DisplayStarted 40 \MaxScreenPage 25 \MaxScreenPage 18 BITMAP 13 ScreenBitMap) () \DEFINEDISPLAYINFO :D8 (P 0 BUCKET I 0 DISPLAYINFO F 1 \DISPLAYINFOALIST) @QXd—dQ -¿@Qch(16 DREMOVE) NIL () (PUTPROPS DISPLAYINITIALIZEDP MACRO (NIL (* always initialized now) T)) (PUTPROPS DISPLAYSTARTEDP MACRO (NIL \DisplayStarted)) (ADDTOVAR GLOBALVARS WHOLESCREEN) INITIALIZEDISPLAYSTREAMS :D8 (F 0 \GUARANTEEDDISPLAYFONT) Xodnÿdh`ld +¿@Qch(16 DREMOVE) NIL () (PUTPROPS DISPLAYINITIALIZEDP MACRO (NIL (* always initialized now) T)) (PUTPROPS DISPLAYSTARTEDP MACRO (NIL \DisplayStarted)) (ADDTOVAR GLOBALVARS WHOLESCREEN) INITIALIZEDISPLAYSTREAMS :D8 (F 0 \GUARANTEEDDISPLAYFONT F 1 DEFAULTFONT) Uodnÿdh`ld gl hdg cgkPh -(80 FONTCLASS 63 FONTCREATE 38 BITMAPCREATE) (85 DEFAULTFONT 70 DEFAULTFONT 57 DISPLAY 48 GACHA 43 \SYSBBTEXTURE 30 \SYSPILOTBBT 24 |PILOTBBTTYPE#| 19 WHOLEDISPLAY) ( 4 -16383) (RPAQQ \DisplayStarted NIL) (RPAQQ \LastTTYLines 12) (INITIALIZEDISPLAYSTREAMS) (DISPLAYSTREAMINIT 1000) (PUTPROPS LLDISPLAY FILETYPE COMPILE-FILE) (PUTPROPS LLDISPLAY COPYRIGHT ("Venue & Xerox Corporation" 1981 1982 1983 1984 1985 1986 1987 1988 1989 1990 1993 1994)) NIL \ No newline at end of file +c(80 FONTCLASS 63 FONTCREATE 38 BITMAPCREATE) (70 DEFAULTFONT 57 DISPLAY 48 GACHA 43 \SYSBBTEXTURE 30 \SYSPILOTBBT 24 |PILOTBBTTYPE#| 19 WHOLEDISPLAY) ( 4 -16383) (RPAQQ \DisplayStarted NIL) (RPAQQ \LastTTYLines 12) (INITIALIZEDISPLAYSTREAMS) (DISPLAYSTREAMINIT 1000) (PUTPROPS LLDISPLAY FILETYPE COMPILE-FILE) (PUTPROPS LLDISPLAY COPYRIGHT ("Venue & Xerox Corporation" 1981 1982 1983 1984 1985 1986 1987 1988 1989 1990 1993 1994)) NIL \ No newline at end of file diff --git a/sources/LLETHER.LCOM b/sources/LLETHER.LCOM index 44e58fab8..c08375cd3 100644 Binary files a/sources/LLETHER.LCOM and b/sources/LLETHER.LCOM differ diff --git a/sources/LLKEY b/sources/LLKEY index 1d98638b4..896277eab 100644 --- a/sources/LLKEY +++ b/sources/LLKEY @@ -1,19 +1,18 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "13-Feb-2021 23:24:49" {DSK}larry>ilisp>medley>sources>LLKEY.;2 206612 +(FILECREATED "11-Jun-2021 09:43:22" {DSK}kaplan>Local>medley3.5>git-medley>sources>LLKEY.;6 197710 - changes to%: (FNS \KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS) - - previous date%: "12-Feb-2021 19:16:08" {DSK}larry>ilisp>medley>sources>LLKEY.;1) + previous date%: " 9-Jun-2021 20:18:50" +{DSK}kaplan>Local>medley3.5>git-medley>sources>LLKEY.;5) (* ; " -Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, 1920, 2000, 2018, 2021 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1982-1990, 1992, 1999, 1920, 2000, 2018, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT LLKEYCOMS) -(RPAQQ LLKEYCOMS - [(COMS (* ; "Access to keyboard") +(RPAQQ LLKEYCOMS + [(COMS (* ; "Access to keyboard") (FNS BKSYSCHARCODE \CLEARSYSBUF \GETKEY \NSYSBUFCHARS \SAVESYSBUF \SYSBUFP \GETSYSBUF \PUTSYSBUF \PEEKSYSBUF) (INITVARS (\LONGSYSBUF)) @@ -21,10 +20,10 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, (DECLARE%: DONTCOPY (RESOURCES \KEYBOARDWAITBOX)) (DECLARE%: DONTCOPY (CONSTANTS (\SYSBUFSIZE 200)) (MACROS \GETREALSYSBUF))) - [DECLARE%: DOCOPY DONTEVAL@LOAD (COMS (* ; - "Here because it must be done in init before PROC loaded") + [DECLARE%: DOCOPY DONTEVAL@LOAD (COMS (* ; + "Here because it must be done in init before PROC loaded") (P (MOVD? 'NILL 'CARET] - (COMS (* ; "Key handler") + (COMS (* ; "Key handler") (FNS \KEYBOARDINIT \KEYBOARDEVENTFN \ALLOCLOCKED \SETIOPOINTERS \KEYBOARDOFF \KEYBOARDON \KEYHANDLER \KEYHANDLER1 \RESETKEYBOARD \DOMOUSECHORDING \DOTRANSITIONS \DECODETRANSITION MOUSECHORDWAIT \TRACKCURSOR) @@ -45,8 +44,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, (EXPORT (RECORDS KEYACTION) (CONSTANTS \NKEYS)) (RECORDS RING) - (COMS (* ; - "can get rid of shiftstate after clients have been fixed") + (COMS (* ; + "can get rid of shiftstate after clients have been fixed") (RECORDS SHIFTSTATE) (GLOBALVARS \SHIFTSTATE \MOUSETIMERTEMP)) (CONSTANTS NRINGINDEXWORDS) @@ -54,7 +53,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, (\SYSBUFFER.LAST (IPLUS \SYSBUFFER.FIRST (SUB1 \SYSBUFSIZE] (DECLARE%: EVAL@COMPILE (VARS \KEYNAMES)) - (* ;; "\maikokeyactions does not contain keyactions of the form %"2,50%" because it breaks the loadup process on the sun.") + (* ;; "\maikokeyactions does not contain keyactions of the form %"2,50%" because it breaks the loadup process on the sun.") (VARS \ORIGKEYACTIONS \DLIONKEYACTIONS \DLIONOSDKEYACTIONS \DORADOKEYACTIONS \DOVEKEYACTIONS \DOVEOSDKEYACTIONS \MAIKOKEYACTIONS \MAIKOKEYACTIONST4 @@ -69,32 +68,32 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, \COMMANDKEYACTION \DEFAULTKEYACTION \TIMER.INTERRUPT.PENDING \ORIGKEYACTIONS \KEYBOARD.META \MOUSECHORDMILLISECONDS \DORADOKEYACTIONS \DLIONKEYACTIONS \DLIONOSDKEYACTIONS \DOVEKEYACTIONS \DOVEOSDKEYACTIONS)) - (COMS (* ; "Key interpretation") + (COMS (* ; "Key interpretation") (FNS KEYACTION KEYACTIONTABLE KEYBOARDTYPE RESETKEYACTION \KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS \KEYACTION1 KEYDOWNP KEYNUMBERP \KEYNAMETONUMBER MODIFY.KEYACTIONS METASHIFT SHIFTDOWNP) - (* ; - "To support office style 1108 & 1186 keyboards") + (* ; + "To support office style 1108 & 1186 keyboards") (FNS SETUP.OFFICE.KEYBOARD) (OPTIMIZERS) (MACROS \TEMPCOPYTIMER) - (* ; - "Don't copy this optimizer since it expands out to \getbasebit, but do exportit.") + (* ; + "Don't copy this optimizer since it expands out to \getbasebit, but do exportit.") (DECLARE%: DONTCOPY (EXPORT (OPTIMIZERS KEYDOWNP))) (EXPORT (MACROS XKEYDOWNP KEYDOWNP1 \NEWKEYDOWNP))) - (COMS (* ; "A raw keyboard device/stream") + (COMS (* ; "A raw keyboard device/stream") (FNS \INIT.KEYBOARD.STREAM) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (\INIT.KEYBOARD.STREAM))) (EXPORT (GLOBALVARS \KEYBOARD.DEVICE \KEYBOARD.STREAM))) - (COMS (* ; "Hook for a periodic interrupt") + (COMS (* ; "Hook for a periodic interrupt") (FNS \DOBUFFEREDTRANSITIONS \TIMER.INTERRUPTFRAME \PERIODIC.INTERRUPTFRAME) (INITVARS (\KEYBUFFERING) (\PERIODIC.INTERRUPT) (\TIMER.INTERRUPT.PENDING) (\PERIODIC.INTERRUPT.FREQUENCY 77))) (LOCALVARS . T) - [COMS (* ; - "cursor and mouse related functions.") + [COMS (* ; + "cursor and mouse related functions.") (FNS \HARDCURSORUP \HARDCURSORPOSITION \HARDCURSORDOWN) (FNS CURSOR.INIT \CURSORDESTINATION \SOFTCURSORUP \SOFTCURSORUPCURRENT \SOFTCURSORPOSITION \SOFTCURSORDOWN CURSORPROP GETCURSORPROP PUTCURSORPROP @@ -148,7 +147,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, \KEYBOARDEVENT.SIZE 383] (COMS (FNS MACHINETYPE SETMAINTPANEL) - (* ; "DLion beeper") + (* ; "DLion beeper") (FNS BEEPON BEEPOFF)) (EXPORT (GLOBALVARS \EM.MOUSEX \EM.MOUSEY \EM.CURSORX \EM.CURSORY \EM.UTILIN \EM.REALUTILIN \EM.KBDAD0 \EM.KBDAD1 \EM.KBDAD2 \EM.KBDAD3 \EM.KBDAD4 \EM.KBDAD5 @@ -156,8 +155,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, \DEFAULTKEYACTION \COMMANDKEYACTION \CURRENTKEYACTION \PERIODIC.INTERRUPT \PERIODIC.INTERRUPT.FREQUENCY)) (FNS WITHOUT-INTERRUPTS) - (COMS (* ; - "Compile locked fns together for locality") + (COMS (* ; + "Compile locked fns together for locality") (BLOCKS (NIL FLIPCURSORBAR \KEYHANDLER \KEYHANDLER1 \TRACKCURSOR \PERIODIC.INTERRUPTFRAME \TIMER.INTERRUPTFRAME \DOBUFFEREDTRANSITIONS \DOTRANSITIONS \DECODETRANSITION \EVENTKEYS \HARDCURSORUP \DOMOUSECHORDING @@ -376,17 +375,17 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, (DECLARE%: EVAL@COMPILE -[PUTPROPS \GETREALSYSBUF MACRO - (NIL (PROG ((R (fetch (RING READ) of \SYSBUFFER))) - (RETURN (AND (NOT (EQ 0 R)) - (PROG1 (\GETBASEFAT \SYSBUFFER R) - (AND [EQ (fetch (RING WRITE) of \SYSBUFFER) - (replace (RING READ) of \SYSBUFFER - with (COND - ((EQ \SYSBUFFER.LAST R) - \SYSBUFFER.FIRST) - (T (ADD1 R] - (replace (RING READ) of \SYSBUFFER with 0)))] +(PUTPROPS \GETREALSYSBUF MACRO + [NIL (PROG ((R (fetch (RING READ) of \SYSBUFFER))) + (RETURN (AND (NOT (EQ 0 R)) + (PROG1 (\GETBASEFAT \SYSBUFFER R) + (AND [EQ (fetch (RING WRITE) of \SYSBUFFER) + (replace (RING READ) of \SYSBUFFER + with (COND + ((EQ \SYSBUFFER.LAST R) + \SYSBUFFER.FIRST) + (T (ADD1 R] + (replace (RING READ) of \SYSBUFFER with 0)))]) ) ) (DECLARE%: DOCOPY DONTEVAL@LOAD @@ -1077,9 +1076,9 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, (DECLARE%: DONTCOPY (DECLARE%: EVAL@COMPILE -(PUTPROPS .NOTELASTUSERACTION MACRO (NIL (\BLT \LASTUSERACTION (LOCF (fetch SECONDSTMP - of \MISCSTATS)) - WORDSPERCELL))) +(PUTPROPS .NOTELASTUSERACTION MACRO (NIL (\BLT \LASTUSERACTION (LOCF (fetch SECONDSTMP + of \MISCSTATS)) + WORDSPERCELL))) ) (DECLARE%: EVAL@COMPILE @@ -1151,7 +1150,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, ) -(RPAQQ TRANSITIONFLAGS +(RPAQQ TRANSITIONFLAGS (ALTGRDOWN.TF ALTGRUP.TF ALTGRTOGGLE.TF CTRLDOWN.TF CTRLUP.TF DEADKEY.TF IGNORE.TF EVENT.TF LOCKDOWN.TF LOCKSHIFT.TF LOCKTOGGLE.TF LOCKUP.TF NOLOCKSHIFT.TF 1SHIFTDOWN.TF 1SHIFTUP.TF 2SHIFTDOWN.TF 2SHIFTUP.TF METADOWN.TF METAUP.TF FONTDOWN.TF FONTUP.TF @@ -1231,70 +1230,72 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, (DECLARE%: EVAL@COMPILE -[PUTPROPS \TRANSINDEX MACRO ((KEYNUMBER DOWNFLG) - (COND - (DOWNFLG (IPLUS \NKEYS KEYNUMBER)) - (T KEYNUMBER] - -(PUTPROPS ARMEDCODE MACRO ((TABLE CHAR) - (\GETBASEBIT (fetch (KEYACTION ARMED) - TABLE) - CHAR))) - -(PUTPROPS TRANSITIONALTGRCODE MACRO ((TABLE CHAR) - (\GETBASE (fetch (KEYACTION ALTGRAPHCODES) of TABLE) - CHAR))) - -(PUTPROPS TRANSITIONSHIFTCODE MACRO ((TABLE CHAR) - (\GETBASE (fetch (KEYACTION SHIFTCODES) - TABLE) - CHAR))) - -(PUTPROPS TRANSITIONCODE MACRO ((TABLE CHAR) - (\GETBASE (fetch (KEYACTION CODES) - TABLE) - CHAR))) - -(PUTPROPS TRANSITIONFLAGS MACRO ((TABLE CHAR) - (\GETBASEBYTE (fetch (KEYACTION FLAGS) - TABLE) - CHAR))) - -[PUTPROPS TRANSITIONDEADLIST MACRO ((TABLE CHAR SHIFTED) - (\GETBASEPTR (fetch (KEYACTION DEADKEYLIST) of TABLE) - (LLSH (COND - (SHIFTED (IPLUS CHAR \NKEYS \NKEYS)) - (T CHAR)) - 1] - -[PUTPROPS CHECKFORDEADKEY MACRO - ((KEYCODE TABLE CHAR SHIFTED) - (LET ((CODE KEYCODE)) - (COND - [(IEQP CODE 65535) - `(DEADKEY ,(\GETBASEPTR (fetch (KEYACTION DEADKEYLIST) of TABLE) - (LLSH (COND - (SHIFTED (IPLUS CHAR \NKEYS \NKEYS)) - (T CHAR)) - 1] - (T CODE] +(PUTPROPS \TRANSINDEX MACRO ((KEYNUMBER DOWNFLG) + (COND + (DOWNFLG (IPLUS \NKEYS KEYNUMBER)) + (T KEYNUMBER)))) + +(PUTPROPS ARMEDCODE MACRO ((TABLE CHAR) + (\GETBASEBIT (fetch (KEYACTION ARMED) + TABLE) + CHAR))) + +(PUTPROPS TRANSITIONALTGRCODE MACRO ((TABLE CHAR) + (\GETBASE (fetch (KEYACTION ALTGRAPHCODES) + of TABLE) + CHAR))) + +(PUTPROPS TRANSITIONSHIFTCODE MACRO ((TABLE CHAR) + (\GETBASE (fetch (KEYACTION SHIFTCODES) + TABLE) + CHAR))) + +(PUTPROPS TRANSITIONCODE MACRO ((TABLE CHAR) + (\GETBASE (fetch (KEYACTION CODES) + TABLE) + CHAR))) + +(PUTPROPS TRANSITIONFLAGS MACRO ((TABLE CHAR) + (\GETBASEBYTE (fetch (KEYACTION FLAGS) + TABLE) + CHAR))) + +(PUTPROPS TRANSITIONDEADLIST MACRO ((TABLE CHAR SHIFTED) + (\GETBASEPTR (fetch (KEYACTION DEADKEYLIST) + of TABLE) + (LLSH (COND + (SHIFTED (IPLUS CHAR \NKEYS \NKEYS)) + (T CHAR)) + 1)))) + +(PUTPROPS CHECKFORDEADKEY MACRO + [(KEYCODE TABLE CHAR SHIFTED) + (LET ((CODE KEYCODE)) + (COND + [(IEQP CODE 65535) + `(DEADKEY ,(\GETBASEPTR (fetch (KEYACTION DEADKEYLIST) of TABLE) + (LLSH (COND + (SHIFTED (IPLUS CHAR \NKEYS \NKEYS)) + (T CHAR)) + 1] + (T CODE]) ) (* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE (BLOCKRECORD KEYACTION ( - (* ;; "KEYACTION Table: For interpreting keystrokes. Stored as a 8-cell block of untyped pointer hunk storage.") - - FLAGS (* ; "Flag byte per key# (one for down-transtion, 1 for up-.) to describe whether lockshifting occrrs, you ignore the transition, etc.") - CODES (* ; - "Table of character codes generated by each key when no shift key is pressed.") - SHIFTCODES (* ; - "Table of character codes generated by each key when the shift key is pressed.") - ARMED (* ; "Not sure...") - INTERRUPTLIST (* ; "List of armed interrupts?") - ALTGRAPHCODES (* ; - "Table of codes to be generated when the ALT-GRAPH key is pressed.") - DEADKEYLIST (* ; "Block of dead-key handlers, with the nominal up-transition fields filled by the shifted-case tables. Each %"table%" is an ALIST of orignal code => accented code. no entry means punt the accent..") + (* ;; "KEYACTION Table: For interpreting keystrokes. Stored as a 8-cell block of untyped pointer hunk storage.") + + FLAGS (* ; "Flag byte per key# (one for down-transtion, 1 for up-.) to describe whether lockshifting occrrs, you ignore the transition, etc.") + CODES (* ; + "Table of character codes generated by each key when no shift key is pressed.") + SHIFTCODES (* ; + "Table of character codes generated by each key when the shift key is pressed.") + ARMED (* ; "Not sure...") + INTERRUPTLIST (* ; "List of armed interrupts?") + ALTGRAPHCODES (* ; + "Table of codes to be generated when the ALT-GRAPH key is pressed.") + DEADKEYLIST (* ; "Block of dead-key handlers, with the nominal up-transition fields filled by the shifted-case tables. Each %"table%" is an ALIST of orignal code => accented code. no entry means punt the accent..") ) FLAGS _ (\ALLOCBLOCK (FOLDHI (IPLUS \NKEYS \NKEYS) BYTESPERCELL)) @@ -1456,118 +1457,119 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, ) (DECLARE%: EVAL@COMPILE -(RPAQQ \KEYNAMES ((5 %% FIVE) - (4 $ FOUR) - (6 ~ SIX) - (e E) - (7 & SEVEN) - (d D) - (u U) - (v V) - (0 %) ZERO) - (k K) - (- %) - (p P) - (/ ?) - (\ %| FONT LOOKS) - (LF SAME) - (BS <-) - (3 %# THREE) - (2 @ TWO) - (w W) - (q Q) - (s S) - (a A) - (9 %( NINE) - (i I) - (x X) - (o O) - (l L) - (%, <) - (%' %") - (%] }) - (BLANK-MIDDLE OPEN DBK-HELP) - (BLANK-TOP KEYBOARD DBK-META) - (1 ! ONE) - (ESC ESCAPE ->) - (TAB =>) - (f F) - (CTRL PROP'S EDIT) - (c C) - (j J) - (b B) - (z Z) - (LSHIFT) - (%. >) - (; %:) - (CR <-%|) - (_ ^) - (DEL DELETE) - (SKIP NEXT) - (r R) - (t T) - (g G) - (y Y) - (h H) - (8 * EIGHT) - (n N) - (m M) - (LOCK) - (SPACE) - (%[ {) - (= +) - (RSHIFT) - (BLANK-BOTTOM STOP) - (MOVE) - (UNDO) - (UTIL0 SUN-KEYPAD=) - (UTIL1 SUN-KEYPAD/) - (UTIL2 SUPER/SUB) - (UTIL3 CASE) - (UTIL4 STRIKEOUT) - (UTIL5 KEYPAD2) - (UTIL6 KEYPAD3 PGDN) - (UTIL7 SUN-LF) - (PAD1 LEFTKEY CAPSLOCK KEYPAD+) - (PAD2 LEFTMIDDLEKEY NUMLOCK KEYPAD-) - (PAD3 MIDDLEKEY SCROLLLOCK KEYPAD*) - (PAD4 RIGHTMIDDLEKEY BREAK KEYPAD/ SUN-PAUSE) - (PAD5 RIGHTKEY DOIT PRTSC) - (LEFT RED MOUSERED) - (RIGHT BLUE MOUSEBLUE) - (MIDDLE YELLOW MOUSEYELLOW) - (MARGINS) - (K41 KEYPAD7 HOME) - (K42 KEYPAD8) - (K43 KEYPAD9 PGUP) - (K44 KEYPAD4) - (K45 KEYPAD5) - (K46 SUN-LEFT-SPACE) - (K47 KEYPAD6) - (K48 RIGHT-COMMAND SUN-RIGHT-SPACE) - (COPY) - (FIND) - (AGAIN) - (HELP) - (DEF'N EXPAND) - (K4E KEYPAD1 END) - (ALWAYS-ON-1) - (ALWAYS-ON-2) - (CENTER) - (K52 KEYPAD0 INS) - (BOLD) - (ITALICS) - (UNDERLINE) - (SUPERSCRIPT) - (SUBSCRIPT) - (LARGER SMALLER) - (K59 KEYPAD%| KEYPAD.) - (K5A KEYPAD\ KEYPAD, SUN-F10) - (K5B SUN-F11) - (K5C SUN-F12) - (DEFAULTS SUN-PROP) - (K5E SUN-PRTSC) - (K5F SUN-OPEN))) +(RPAQQ \KEYNAMES + ((5 %% FIVE) + (4 $ FOUR) + (6 ~ SIX) + (e E) + (7 & SEVEN) + (d D) + (u U) + (v V) + (0 %) ZERO) + (k K) + (- %) + (p P) + (/ ?) + (\ %| FONT LOOKS) + (LF SAME) + (BS <-) + (3 %# THREE) + (2 @ TWO) + (w W) + (q Q) + (s S) + (a A) + (9 %( NINE) + (i I) + (x X) + (o O) + (l L) + (%, <) + (%' %") + (%] }) + (BLANK-MIDDLE OPEN DBK-HELP) + (BLANK-TOP KEYBOARD DBK-META) + (1 ! ONE) + (ESC ESCAPE ->) + (TAB =>) + (f F) + (CTRL PROP'S EDIT) + (c C) + (j J) + (b B) + (z Z) + (LSHIFT) + (%. >) + (; %:) + (CR <-%|) + (_ ^) + (DEL DELETE) + (SKIP NEXT) + (r R) + (t T) + (g G) + (y Y) + (h H) + (8 * EIGHT) + (n N) + (m M) + (LOCK) + (SPACE) + (%[ {) + (= +) + (RSHIFT) + (BLANK-BOTTOM STOP) + (MOVE) + (UNDO) + (UTIL0 SUN-KEYPAD=) + (UTIL1 SUN-KEYPAD/) + (UTIL2 SUPER/SUB) + (UTIL3 CASE) + (UTIL4 STRIKEOUT) + (UTIL5 KEYPAD2) + (UTIL6 KEYPAD3 PGDN) + (UTIL7 SUN-LF) + (PAD1 LEFTKEY CAPSLOCK KEYPAD+) + (PAD2 LEFTMIDDLEKEY NUMLOCK KEYPAD-) + (PAD3 MIDDLEKEY SCROLLLOCK KEYPAD*) + (PAD4 RIGHTMIDDLEKEY BREAK KEYPAD/ SUN-PAUSE) + (PAD5 RIGHTKEY DOIT PRTSC) + (LEFT RED MOUSERED) + (RIGHT BLUE MOUSEBLUE) + (MIDDLE YELLOW MOUSEYELLOW) + (MARGINS) + (K41 KEYPAD7 HOME) + (K42 KEYPAD8) + (K43 KEYPAD9 PGUP) + (K44 KEYPAD4) + (K45 KEYPAD5) + (K46 SUN-LEFT-SPACE) + (K47 KEYPAD6) + (K48 RIGHT-COMMAND SUN-RIGHT-SPACE) + (COPY) + (FIND) + (AGAIN) + (HELP) + (DEF'N EXPAND) + (K4E KEYPAD1 END) + (ALWAYS-ON-1) + (ALWAYS-ON-2) + (CENTER) + (K52 KEYPAD0 INS) + (BOLD) + (ITALICS) + (UNDERLINE) + (SUPERSCRIPT) + (SUBSCRIPT) + (LARGER SMALLER) + (K59 KEYPAD%| KEYPAD.) + (K5A KEYPAD\ KEYPAD, SUN-F10) + (K5B SUN-F11) + (K5C SUN-F12) + (DEFAULTS SUN-PROP) + (K5E SUN-PRTSC) + (K5F SUN-OPEN))) ) @@ -1577,369 +1579,377 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, ) -(RPAQQ \ORIGKEYACTIONS ((0 (53 "%%" NOLOCKSHIFT)) - (1 (52 "$" NOLOCKSHIFT)) - (2 (54 "~" NOLOCKSHIFT)) - (3 ("e" "E" LOCKSHIFT)) - (4 (55 "&" NOLOCKSHIFT)) - (5 ("d" "D" LOCKSHIFT)) - (6 ("u" "U" LOCKSHIFT)) - (7 ("v" "V" LOCKSHIFT)) - (8 (48 ")" NOLOCKSHIFT)) - (9 ("k" "K" LOCKSHIFT)) - (10 ("-" "-" NOLOCKSHIFT)) - (11 ("p" "P" LOCKSHIFT)) - (12 ("/" "?" NOLOCKSHIFT)) - (13 ("\" "|" NOLOCKSHIFT)) - (14 (10 96 NOLOCKSHIFT)) - (15 (8 8 NOLOCKSHIFT)) - (16 (51 "#" NOLOCKSHIFT)) - (17 (50 "@" NOLOCKSHIFT)) - (18 ("w" "W" LOCKSHIFT)) - (19 ("q" "Q" LOCKSHIFT)) - (20 ("s" "S" LOCKSHIFT)) - (21 ("a" "A" LOCKSHIFT)) - (22 (57 "(" NOLOCKSHIFT)) - (23 ("i" "I" LOCKSHIFT)) - (24 ("x" "X" LOCKSHIFT)) - (25 ("o" "O" LOCKSHIFT)) - (26 ("l" "L" LOCKSHIFT)) - (27 ("," "<" NOLOCKSHIFT)) - (28 ("'" "%"" NOLOCKSHIFT)) - (29 ("]" "}" NOLOCKSHIFT)) - (30 (194 194 NOLOCKSHIFT)) - (31 (193 193 NOLOCKSHIFT)) - (32 (49 "!" NOLOCKSHIFT)) - (33 (27 27 NOLOCKSHIFT)) - (34 (9 9 NOLOCKSHIFT)) - (35 ("f" "F" LOCKSHIFT)) - (36 CTRLDOWN . CTRLUP) - (37 ("c" "C" LOCKSHIFT)) - (38 ("j" "J" LOCKSHIFT)) - (39 ("b" "B" LOCKSHIFT)) - (40 ("z" "Z" LOCKSHIFT)) - (41 1SHIFTDOWN . 1SHIFTUP) - (42 ("." ">" NOLOCKSHIFT)) - (43 (";" ":" NOLOCKSHIFT)) - (44 (13 13 NOLOCKSHIFT)) - (45 ("_" "^" NOLOCKSHIFT)) - (46 (127 535 NOLOCKSHIFT)) - (47 ("(" "[" NOLOCKSHIFT)) - (48 ("r" "R" LOCKSHIFT)) - (49 ("t" "T" LOCKSHIFT)) - (50 ("g" "G" LOCKSHIFT)) - (51 ("y" "Y" LOCKSHIFT)) - (52 ("h" "H" LOCKSHIFT)) - (53 (56 "*" NOLOCKSHIFT)) - (54 ("n" "N" LOCKSHIFT)) - (55 ("m" "M" LOCKSHIFT)) - (56 LOCKDOWN . LOCKUP) - (57 (32 32 NOLOCKSHIFT)) - (58 ("[" "{" NOLOCKSHIFT)) - (59 ("=" "+" NOLOCKSHIFT)) - (60 2SHIFTDOWN . 2SHIFTUP) - (61 (195 195 NOLOCKSHIFT)) - (63 (")" "]" NOLOCKSHIFT)) - (77 EVENT . EVENT) - (78 EVENT . EVENT) - (79 EVENT . EVENT) - (102 LOCKDOWN) - (103 LOCKUP))) - -(RPAQQ \DLIONKEYACTIONS ((2 (54 "^" NOLOCKSHIFT)) - (10 ("-" "_" NOLOCKSHIFT)) - (33 ("\" "|" NOLOCKSHIFT)) - (45 (96 "~" NOLOCKSHIFT)) - (OPEN METADOWN . METAUP) - (PROP'S CTRLDOWN . CTRLUP) - (SAME METADOWN . METAUP) - (FIND ("2,3" "2,43" NOLOCKSHIFT)) - (UNDO ("2,4" "2,44" NOLOCKSHIFT)) - (STOP (5 7 NOLOCKSHIFT)) - (MOVE) - (COPY) - (AGAIN ("2,10" "2,50" NOLOCKSHIFT)) - (CENTER ("2,101" "2,141" NOLOCKSHIFT)) - (BOLD ("2,102" "2,142" NOLOCKSHIFT)) - (ITALICS ("2,103" "2,143" NOLOCKSHIFT)) - (UNDERLINE ("2,106" "2,146" NOLOCKSHIFT)) - (SUPERSCRIPT ("2,113" "2,153" NOLOCKSHIFT)) - (SUBSCRIPT ("2,114" "2,154" NOLOCKSHIFT)) - (LARGER ("2,110" "2,150" NOLOCKSHIFT)) - (DEFAULTS ("2,115" "2,155" NOLOCKSHIFT)) - (93 (27 "2,64" NOLOCKSHIFT)) - (47 ("2,22" "2,62" NOLOCKSHIFT)) - (31 ("2,5" "2,45" NOLOCKSHIFT)) - (92 ("2,1" "2,41" NOLOCKSHIFT)) - (80 ("2,13" "2,53" NOLOCKSHIFT)) - (FONT ("2,112" "2,152" NOLOCKSHIFT)))) +(RPAQQ \ORIGKEYACTIONS + ((0 (53 "%%" NOLOCKSHIFT)) + (1 (52 "$" NOLOCKSHIFT)) + (2 (54 "~" NOLOCKSHIFT)) + (3 ("e" "E" LOCKSHIFT)) + (4 (55 "&" NOLOCKSHIFT)) + (5 ("d" "D" LOCKSHIFT)) + (6 ("u" "U" LOCKSHIFT)) + (7 ("v" "V" LOCKSHIFT)) + (8 (48 ")" NOLOCKSHIFT)) + (9 ("k" "K" LOCKSHIFT)) + (10 ("-" "-" NOLOCKSHIFT)) + (11 ("p" "P" LOCKSHIFT)) + (12 ("/" "?" NOLOCKSHIFT)) + (13 ("\" "|" NOLOCKSHIFT)) + (14 (10 96 NOLOCKSHIFT)) + (15 (8 8 NOLOCKSHIFT)) + (16 (51 "#" NOLOCKSHIFT)) + (17 (50 "@" NOLOCKSHIFT)) + (18 ("w" "W" LOCKSHIFT)) + (19 ("q" "Q" LOCKSHIFT)) + (20 ("s" "S" LOCKSHIFT)) + (21 ("a" "A" LOCKSHIFT)) + (22 (57 "(" NOLOCKSHIFT)) + (23 ("i" "I" LOCKSHIFT)) + (24 ("x" "X" LOCKSHIFT)) + (25 ("o" "O" LOCKSHIFT)) + (26 ("l" "L" LOCKSHIFT)) + (27 ("," "<" NOLOCKSHIFT)) + (28 ("'" "%"" NOLOCKSHIFT)) + (29 ("]" "}" NOLOCKSHIFT)) + (30 (194 194 NOLOCKSHIFT)) + (31 (193 193 NOLOCKSHIFT)) + (32 (49 "!" NOLOCKSHIFT)) + (33 (27 27 NOLOCKSHIFT)) + (34 (9 9 NOLOCKSHIFT)) + (35 ("f" "F" LOCKSHIFT)) + (36 CTRLDOWN . CTRLUP) + (37 ("c" "C" LOCKSHIFT)) + (38 ("j" "J" LOCKSHIFT)) + (39 ("b" "B" LOCKSHIFT)) + (40 ("z" "Z" LOCKSHIFT)) + (41 1SHIFTDOWN . 1SHIFTUP) + (42 ("." ">" NOLOCKSHIFT)) + (43 (";" ":" NOLOCKSHIFT)) + (44 (13 13 NOLOCKSHIFT)) + (45 ("_" "^" NOLOCKSHIFT)) + (46 (127 535 NOLOCKSHIFT)) + (47 ("(" "[" NOLOCKSHIFT)) + (48 ("r" "R" LOCKSHIFT)) + (49 ("t" "T" LOCKSHIFT)) + (50 ("g" "G" LOCKSHIFT)) + (51 ("y" "Y" LOCKSHIFT)) + (52 ("h" "H" LOCKSHIFT)) + (53 (56 "*" NOLOCKSHIFT)) + (54 ("n" "N" LOCKSHIFT)) + (55 ("m" "M" LOCKSHIFT)) + (56 LOCKDOWN . LOCKUP) + (57 (32 32 NOLOCKSHIFT)) + (58 ("[" "{" NOLOCKSHIFT)) + (59 ("=" "+" NOLOCKSHIFT)) + (60 2SHIFTDOWN . 2SHIFTUP) + (61 (195 195 NOLOCKSHIFT)) + (63 (")" "]" NOLOCKSHIFT)) + (77 EVENT . EVENT) + (78 EVENT . EVENT) + (79 EVENT . EVENT) + (102 LOCKDOWN) + (103 LOCKUP))) + +(RPAQQ \DLIONKEYACTIONS + ((2 (54 "^" NOLOCKSHIFT)) + (10 ("-" "_" NOLOCKSHIFT)) + (33 ("\" "|" NOLOCKSHIFT)) + (45 (96 "~" NOLOCKSHIFT)) + (OPEN METADOWN . METAUP) + (PROP'S CTRLDOWN . CTRLUP) + (SAME METADOWN . METAUP) + (FIND ("2,3" "2,43" NOLOCKSHIFT)) + (UNDO ("2,4" "2,44" NOLOCKSHIFT)) + (STOP (5 7 NOLOCKSHIFT)) + (MOVE) + (COPY) + (AGAIN ("2,10" "2,50" NOLOCKSHIFT)) + (CENTER ("2,101" "2,141" NOLOCKSHIFT)) + (BOLD ("2,102" "2,142" NOLOCKSHIFT)) + (ITALICS ("2,103" "2,143" NOLOCKSHIFT)) + (UNDERLINE ("2,106" "2,146" NOLOCKSHIFT)) + (SUPERSCRIPT ("2,113" "2,153" NOLOCKSHIFT)) + (SUBSCRIPT ("2,114" "2,154" NOLOCKSHIFT)) + (LARGER ("2,110" "2,150" NOLOCKSHIFT)) + (DEFAULTS ("2,115" "2,155" NOLOCKSHIFT)) + (93 (27 "2,64" NOLOCKSHIFT)) + (47 ("2,22" "2,62" NOLOCKSHIFT)) + (31 ("2,5" "2,45" NOLOCKSHIFT)) + (92 ("2,1" "2,41" NOLOCKSHIFT)) + (80 ("2,13" "2,53" NOLOCKSHIFT)) + (FONT ("2,112" "2,152" NOLOCKSHIFT)))) (RPAQQ \DLIONOSDKEYACTIONS ((56 LOCKTOGGLE))) -(RPAQQ \DORADOKEYACTIONS ((2 (54 "~" NOLOCKSHIFT)) - (10 ("-" "-" NOLOCKSHIFT)) - (13 ("\" "|" NOLOCKSHIFT)) - (14 (10 96 NOLOCKSHIFT)) - (33 (27 27 NOLOCKSHIFT)) - (45 ("_" "^" NOLOCKSHIFT)))) - -(RPAQQ \DOVEKEYACTIONS ((2 (54 "^" NOLOCKSHIFT)) - (10 ("-" "_" NOLOCKSHIFT)) - (33 (27 27 NOLOCKSHIFT)) - (56 CTRLDOWN . CTRLUP) - (65 (27 27 NOLOCKSHIFT)) - (71 (39 34 NOLOCKSHIFT)) - (93 ("2,24" "2,64" NOLOCKSHIFT)) - (108 (96 126 NOLOCKSHIFT)) - (DBK-META METADOWN . METAUP) - (DBK-HELP ("2,1" "2,41" NOLOCKSHIFT)) - (SAME METADOWN . METAUP) - (FIND ("2,3" "2,43" NOLOCKSHIFT)) - (UNDO ("2,4" "2,44" NOLOCKSHIFT)) - (STOP (5 7 NOLOCKSHIFT)) - (EDIT ("2,5" "2,45" NOLOCKSHIFT)) - (MOVE) - (COPY) - (AGAIN ("2,10" "2,50" NOLOCKSHIFT)) - (CENTER ("2,101" "2,141" NOLOCKSHIFT)) - (BOLD ("2,102" "2,142" NOLOCKSHIFT)) - (ITALICS ("2,103" "2,143" NOLOCKSHIFT)) - (CASE ("2,104" "2,144" NOLOCKSHIFT)) - (STRIKEOUT ("2,105" "2,145" NOLOCKSHIFT)) - (UNDERLINE ("2,106" "2,146" NOLOCKSHIFT)) - (SUPER/SUB ("2,107" "2,147" NOLOCKSHIFT)) - (LARGER ("2,110" "2,150" NOLOCKSHIFT)) - (MARGINS ("2,111" "2,151" NOLOCKSHIFT)) - (LOOKS ("2,112" "2,152" NOLOCKSHIFT)) - (CAPSLOCK LOCKTOGGLE) - (NUMLOCK ("2,11" "-" NOLOCKSHIFT)) - (SCROLLLOCK ("2,12" 180 NOLOCKSHIFT)) - (BREAK (2 184 NOLOCKSHIFT)) - (DOIT ("2,13" "2,53" NOLOCKSHIFT)) - (KEYPAD7 ("2,14" 55 NOLOCKSHIFT)) - (KEYPAD8 (173 56 NOLOCKSHIFT)) - (KEYPAD9 ("2,15" 57 NOLOCKSHIFT)) - (KEYPAD4 (172 52 NOLOCKSHIFT)) - (KEYPAD5 ("2,16" 53 NOLOCKSHIFT)) - (KEYPAD6 (174 54 NOLOCKSHIFT)) - (KEYPAD1 ("2,17" 49 NOLOCKSHIFT)) - (KEYPAD2 (175 50 NOLOCKSHIFT)) - (KEYPAD3 ("2,20" 51 NOLOCKSHIFT)) - (KEYPAD0 ("2,21" 48 NOLOCKSHIFT)) - (KEYPAD%| ("|" 46 NOLOCKSHIFT)) - (KEYPAD\ ("\" 44 NOLOCKSHIFT)) - (47 ("2,22" "2,62" NOLOCKSHIFT)))) +(RPAQQ \DORADOKEYACTIONS + ((2 (54 "~" NOLOCKSHIFT)) + (10 ("-" "-" NOLOCKSHIFT)) + (13 ("\" "|" NOLOCKSHIFT)) + (14 (10 96 NOLOCKSHIFT)) + (33 (27 27 NOLOCKSHIFT)) + (45 ("_" "^" NOLOCKSHIFT)))) + +(RPAQQ \DOVEKEYACTIONS + ((2 (54 "^" NOLOCKSHIFT)) + (10 ("-" "_" NOLOCKSHIFT)) + (33 (27 27 NOLOCKSHIFT)) + (56 CTRLDOWN . CTRLUP) + (65 (27 27 NOLOCKSHIFT)) + (71 (39 34 NOLOCKSHIFT)) + (93 ("2,24" "2,64" NOLOCKSHIFT)) + (108 (96 126 NOLOCKSHIFT)) + (DBK-META METADOWN . METAUP) + (DBK-HELP ("2,1" "2,41" NOLOCKSHIFT)) + (SAME METADOWN . METAUP) + (FIND ("2,3" "2,43" NOLOCKSHIFT)) + (UNDO ("2,4" "2,44" NOLOCKSHIFT)) + (STOP (5 7 NOLOCKSHIFT)) + (EDIT ("2,5" "2,45" NOLOCKSHIFT)) + (MOVE) + (COPY) + (AGAIN ("2,10" "2,50" NOLOCKSHIFT)) + (CENTER ("2,101" "2,141" NOLOCKSHIFT)) + (BOLD ("2,102" "2,142" NOLOCKSHIFT)) + (ITALICS ("2,103" "2,143" NOLOCKSHIFT)) + (CASE ("2,104" "2,144" NOLOCKSHIFT)) + (STRIKEOUT ("2,105" "2,145" NOLOCKSHIFT)) + (UNDERLINE ("2,106" "2,146" NOLOCKSHIFT)) + (SUPER/SUB ("2,107" "2,147" NOLOCKSHIFT)) + (LARGER ("2,110" "2,150" NOLOCKSHIFT)) + (MARGINS ("2,111" "2,151" NOLOCKSHIFT)) + (LOOKS ("2,112" "2,152" NOLOCKSHIFT)) + (CAPSLOCK LOCKTOGGLE) + (NUMLOCK ("2,11" "-" NOLOCKSHIFT)) + (SCROLLLOCK ("2,12" 180 NOLOCKSHIFT)) + (BREAK (2 184 NOLOCKSHIFT)) + (DOIT ("2,13" "2,53" NOLOCKSHIFT)) + (KEYPAD7 ("2,14" 55 NOLOCKSHIFT)) + (KEYPAD8 (173 56 NOLOCKSHIFT)) + (KEYPAD9 ("2,15" 57 NOLOCKSHIFT)) + (KEYPAD4 (172 52 NOLOCKSHIFT)) + (KEYPAD5 ("2,16" 53 NOLOCKSHIFT)) + (KEYPAD6 (174 54 NOLOCKSHIFT)) + (KEYPAD1 ("2,17" 49 NOLOCKSHIFT)) + (KEYPAD2 (175 50 NOLOCKSHIFT)) + (KEYPAD3 ("2,20" 51 NOLOCKSHIFT)) + (KEYPAD0 ("2,21" 48 NOLOCKSHIFT)) + (KEYPAD%| ("|" 46 NOLOCKSHIFT)) + (KEYPAD\ ("\" 44 NOLOCKSHIFT)) + (47 ("2,22" "2,62" NOLOCKSHIFT)))) (RPAQQ \DOVEOSDKEYACTIONS ((56 LOCKDOWN . LOCKUP) (36 CTRLDOWN . CTRLUP) (CAPSLOCK ("2,5" "2,45" NOLOCKSHIFT)))) -(RPAQQ \MAIKOKEYACTIONS ((61 (5 7 NOLOCKSHIFT)) - (91 (520 552 NOLOCKSHIFT)) - (92 (513 545 NOLOCKSHIFT)) - (30 (513 545 NOLOCKSHIFT)) - (63 (516 548 NOLOCKSHIFT)) - (93 (532 564 NOLOCKSHIFT)) - (62) - (111 (329 263 NOLOCKSHIFT)) - (89) - (90 (515 547 NOLOCKSHIFT)) - (73 (521 521 NOLOCKSHIFT)) - (74 (522 522 NOLOCKSHIFT)) - (75 (2 2 NOLOCKSHIFT)) - (81 (524 55 NOLOCKSHIFT)) - (82 (173 56 NOLOCKSHIFT)) - (83 (525 57 NOLOCKSHIFT)) - (84 (172 52 NOLOCKSHIFT)) - (85 (526 53 NOLOCKSHIFT)) - (87 (174 54 NOLOCKSHIFT)) - (94 (527 49 NOLOCKSHIFT)) - (69 (175 50 NOLOCKSHIFT)) - (70 (528 51 NOLOCKSHIFT)) - (98 (529 48 NOLOCKSHIFT)) - (76 (523 555 NOLOCKSHIFT)) - (72 LOCKTOGGLE) - (97 (577 609 NOLOCKSHIFT)) - (99 (578 610 NOLOCKSHIFT)) - (100 (579 611 NOLOCKSHIFT)) - (67 (580 612 NOLOCKSHIFT)) - (68 (581 613 NOLOCKSHIFT)) - (101 (582 614 NOLOCKSHIFT)) - (66 (583 615 NOLOCKSHIFT)) - (104 (584 616 NOLOCKSHIFT)) - (80 (585 617 NOLOCKSHIFT)) - (13 (23 21 NOLOCKSHIFT)) - (33 (27 27 NOLOCKSHIFT)) - (65 (27 27 NOLOCKSHIFT)) - (2 (54 94 NOLOCKSHIFT)) - (10 (45 95 NOLOCKSHIFT)) - (36 CTRLDOWN . CTRLUP) - (56 LOCKTOGGLE . IGNORE) - (45 (96 126 NOLOCKSHIFT)) - (31 METADOWN . METAUP) - (14 METADOWN . METAUP) - (71 (10 10 NOLOCKSHIFT)) - (47 (530 562 NOLOCKSHIFT)) - (105 (92 124 NOLOCKSHIFT)))) - -(RPAQQ \MAIKOKEYACTIONST4 ((61 ("^E" "^G" NOLOCKSHIFT)) - (91 ("2,10" "2,50" NOLOCKSHIFT)) - (92 ("2,1" "2,41" NOLOCKSHIFT)) - (30 ("2,1" "2,41" NOLOCKSHIFT)) - (109 ("2,25" "2,65" NOLOCKSHIFT)) - (63 ("2,4" "2,44" NOLOCKSHIFT)) - (14 METADOWN . METAUP) - (93 ("2,24" "2,64" NOLOCKSHIFT)) - (62) - (111 ("1,111" "1,79" NOLOCKSHIFT)) - (89) - (90 ("2,3" "2,43" NOLOCKSHIFT)) - (73 ("2,11" "2,11" NOLOCKSHIFT)) - (74 ("2,12" "2,12" NOLOCKSHIFT)) - (75 ("^B" "^B" NOLOCKSHIFT)) - (81 ("2,14" 55 NOLOCKSHIFT)) - (82 (173 56 NOLOCKSHIFT)) - (83 ("2,15" 57 NOLOCKSHIFT)) - (84 (172 52 NOLOCKSHIFT)) - (85 ("2,16" 53 NOLOCKSHIFT)) - (87 (174 54 NOLOCKSHIFT)) - (94 ("2,17" 49 NOLOCKSHIFT)) - (69 (175 50 NOLOCKSHIFT)) - (70 ("2,20" 51 NOLOCKSHIFT)) - (98 ("2,21" 48 NOLOCKSHIFT)) - (76 ("2,13" "2,13" NOLOCKSHIFT)) - (110 ("2,53" "2,53" NOLOCKSHIFT)) - (72 LOCKTOGGLE) - (97 ("2,101" "2,141" NOLOCKSHIFT)) - (99 ("2,102" "2,142" NOLOCKSHIFT)) - (100 ("2,103" "2,143" NOLOCKSHIFT)) - (67 ("2,104" "2,144" NOLOCKSHIFT)) - (68 ("2,105" "2,145" NOLOCKSHIFT)) - (101 ("2,106" "2,146" NOLOCKSHIFT)) - (66 ("2,107" "2,147" NOLOCKSHIFT)) - (104 ("2,110" "2,150" NOLOCKSHIFT)) - (80 ("2,111" "2,151" NOLOCKSHIFT)) - (106 ("2,113" "2,153" NOLOCKSHIFT)) - (107 ("2,114" "2,154" NOLOCKSHIFT)) - (108 ("2,115" "2,155" NOLOCKSHIFT)) - (13 ("^W" "^U" NOLOCKSHIFT)) - (33 ("ESC" "ESC" NOLOCKSHIFT)) - (64 IGNORE . IGNORE) - (65 (27 27 NOLOCKSHIFT)) - (95 IGNORE . IGNORE) - (96 IGNORE . IGNORE) - (102 IGNORE . IGNORE) - (2 ("6" "^" NOLOCKSHIFT)) - (10 ("-" "_" NOLOCKSHIFT)) - (36 CTRLDOWN . CTRLUP) - (56 LOCKTOGGLE . IGNORE) - (45 ("`" "~" NOLOCKSHIFT)) - (31 METADOWN . METAUP) - (71 (10 10 NOLOCKSHIFT)) - (47 ("2,22" "2,62" NOLOCKSHIFT)) - (86 IGNORE . IGNORE) - (88 IGNORE . IGNORE) - (105 ("\" "|" NOLOCKSHIFT)))) - -(RPAQQ \MAIKO-JLE-KEYACTIONS ((2 ("6" "&" NOLOCKSHIFT)) - (4 ("7" "'" NOLOCKSHIFT)) - (8 ("0" "0" NOLOCKSHIFT)) - (10 ("\" "_" NOLOCKSHIFT)) - (13 ("^W" "^U" NOLOCKSHIFT)) - (14 METADOWN . METAUP) - (15 (8 8 NOLOCKSHIFT)) - (17 ("2" "%"" NOLOCKSHIFT)) - (22 ("9" ")" NOLOCKSHIFT)) - (28 (":" "*" NOLOCKSHIFT)) - (29 ("[" "{" NOLOCKSHIFT)) - (30 ("]" "}" NOLOCKSHIFT)) - (31 METADOWN . METAUP) - (33 ("ESC" "ESC" NOLOCKSHIFT)) - (36 CTRLDOWN . CTRLUP) - (43 (";" "+" NOLOCKSHIFT)) - (45 ("^" "~" NOLOCKSHIFT)) - (47 ("2,22" "2,62" NOLOCKSHIFT)) - (53 ("8" "(" NOLOCKSHIFT)) - (56 LOCKTOGGLE . IGNORE) - (58 ("@" "`" NOLOCKSHIFT)) - (59 ("-" "=" NOLOCKSHIFT)) - (61 ("^E" "^G" NOLOCKSHIFT)) - (62) - (63 ("2,4" "2,44" NOLOCKSHIFT)) - (64 ("2,14" 55 NOLOCKSHIFT)) - (65 (27 27 NOLOCKSHIFT)) - (66 ("2,107" "2,147" NOLOCKSHIFT)) - (67 ("2,104" "2,144" NOLOCKSHIFT)) - (69 ("2,13" "2,53" NOLOCKSHIFT)) - (70 ("2,20" 51 NOLOCKSHIFT)) - (71 (10 10 NOLOCKSHIFT)) - (72 (766 766 NOLOCKSHIFT)) - (73 ("2,11" "2,11" NOLOCKSHIFT)) - (74 ("2,12" "2,12" NOLOCKSHIFT)) - (75 ("^B" "^B" NOLOCKSHIFT)) - (80 ("2,111" "2,151" NOLOCKSHIFT)) - (81 ("2,14" 55 NOLOCKSHIFT)) - (82 (173 56 NOLOCKSHIFT)) - (83 ("2,15" 57 NOLOCKSHIFT)) - (84 (172 52 NOLOCKSHIFT)) - (85 ("2,16" 53 NOLOCKSHIFT)) - (86 (765 765 NOLOCKSHIFT)) - (87 (174 54 NOLOCKSHIFT)) - (88 (770 771 NOLOCKSHIFT)) - (90 ("2,3" "2,43" NOLOCKSHIFT)) - (91 ("2,10" "2,50" NOLOCKSHIFT)) - (92 ("2,1" "2,41" NOLOCKSHIFT)) - (93 ("2,24" "2,64" NOLOCKSHIFT)) - (96 IGNORE . IGNORE) - (98 ("2,21" 48 NOLOCKSHIFT)) - (99 ("2,102" "2,142" NOLOCKSHIFT)) - (101 ("2,106" "2,146" NOLOCKSHIFT)) - (102 IGNORE . IGNORE) - (103 (767 768 NOLOCKSHIFT)) - (104 ("2,110" "2,150" NOLOCKSHIFT)) - (105 ("\" "|" NOLOCKSHIFT)) - (106 ("2,113" "2,153" NOLOCKSHIFT)) - (107 ("2,114" "2,154" NOLOCKSHIFT)) - (108 ("2,115" "2,155" NOLOCKSHIFT)) - (109 (769 769 NOLOCKSHIFT)) - (110 ("2,53" "2,53" NOLOCKSHIFT)) - (111 ("1,111" "1,79" NOLOCKSHIFT)))) - -(RPAQQ \TOSHIBA-KEYACTIONS ((2 ("6" "&" NOLOCKSHIFT)) - (4 ("7" "'" NOLOCKSHIFT)) - (17 ("2" "%"" NOLOCKSHIFT)) - (53 ("8" "(" NOLOCKSHIFT)) - (22 ("9" ")" NOLOCKSHIFT)) - (8 ("0" "0" NOLOCKSHIFT)) - (10 ("-" "=" NOLOCKSHIFT)) - (59 ("^" "~" NOLOCKSHIFT)) - (45 ("\" "|" NOLOCKSHIFT)) - (58 ("@" "`" NOLOCKSHIFT)) - (29 ("[" "{" NOLOCKSHIFT)) - (105 ("]" "}" NOLOCKSHIFT)) - (43 (";" "+" NOLOCKSHIFT)) - (28 (":" "*" NOLOCKSHIFT)) - (15 (23 95 NOLOCKSHIFT)) - (13 (8 8 NOLOCKSHIFT)) - (86 METADOWN . METAUP) - (73 (530 562 NOLOCKSHIFT)) - (88 ("2,24" "2,64" NOLOCKSHIFT)) - (98 IGNORE . IGNORE) - (75 ("2,11" "2,11" NOLOCKSHIFT)) - (110 ("2,12" "2,12" NOLOCKSHIFT)) - (74 ("^B" "^B" NOLOCKSHIFT)) - (64 ("2,14" 55 NOLOCKSHIFT)) - (65 (173 56 NOLOCKSHIFT)) - (95 ("2,15" 57 NOLOCKSHIFT)) - (81 (172 52 NOLOCKSHIFT)) - (82 ("2,16" 53 NOLOCKSHIFT)) - (83 (174 54 NOLOCKSHIFT)) - (84 ("2,17" 49 NOLOCKSHIFT)) - (85 (175 50 NOLOCKSHIFT)) - (87 ("2,20" 51 NOLOCKSHIFT)) - (94 ("2,21" 48 NOLOCKSHIFT)) - (69 ("2,13" "2,53" NOLOCKSHIFT)) - (70 LOCKTOGGLE))) +(RPAQQ \MAIKOKEYACTIONS + ((61 (5 7 NOLOCKSHIFT)) + (91 (520 552 NOLOCKSHIFT)) + (92 (513 545 NOLOCKSHIFT)) + (30 (513 545 NOLOCKSHIFT)) + (63 (516 548 NOLOCKSHIFT)) + (93 (532 564 NOLOCKSHIFT)) + (62) + (111 (329 263 NOLOCKSHIFT)) + (89) + (90 (515 547 NOLOCKSHIFT)) + (73 (521 521 NOLOCKSHIFT)) + (74 (522 522 NOLOCKSHIFT)) + (75 (2 2 NOLOCKSHIFT)) + (81 (524 55 NOLOCKSHIFT)) + (82 (173 56 NOLOCKSHIFT)) + (83 (525 57 NOLOCKSHIFT)) + (84 (172 52 NOLOCKSHIFT)) + (85 (526 53 NOLOCKSHIFT)) + (87 (174 54 NOLOCKSHIFT)) + (94 (527 49 NOLOCKSHIFT)) + (69 (175 50 NOLOCKSHIFT)) + (70 (528 51 NOLOCKSHIFT)) + (98 (529 48 NOLOCKSHIFT)) + (76 (523 555 NOLOCKSHIFT)) + (72 LOCKTOGGLE) + (97 (577 609 NOLOCKSHIFT)) + (99 (578 610 NOLOCKSHIFT)) + (100 (579 611 NOLOCKSHIFT)) + (67 (580 612 NOLOCKSHIFT)) + (68 (581 613 NOLOCKSHIFT)) + (101 (582 614 NOLOCKSHIFT)) + (66 (583 615 NOLOCKSHIFT)) + (104 (584 616 NOLOCKSHIFT)) + (80 (585 617 NOLOCKSHIFT)) + (13 (23 21 NOLOCKSHIFT)) + (33 (27 27 NOLOCKSHIFT)) + (65 (27 27 NOLOCKSHIFT)) + (2 (54 94 NOLOCKSHIFT)) + (10 (45 95 NOLOCKSHIFT)) + (36 CTRLDOWN . CTRLUP) + (56 LOCKTOGGLE . IGNORE) + (45 (96 126 NOLOCKSHIFT)) + (31 METADOWN . METAUP) + (14 METADOWN . METAUP) + (71 (10 10 NOLOCKSHIFT)) + (47 (530 562 NOLOCKSHIFT)) + (105 (92 124 NOLOCKSHIFT)))) + +(RPAQQ \MAIKOKEYACTIONST4 + ((61 ("^E" "^G" NOLOCKSHIFT)) + (91 ("2,10" "2,50" NOLOCKSHIFT)) + (92 ("2,1" "2,41" NOLOCKSHIFT)) + (30 ("2,1" "2,41" NOLOCKSHIFT)) + (109 ("2,25" "2,65" NOLOCKSHIFT)) + (63 ("2,4" "2,44" NOLOCKSHIFT)) + (14 METADOWN . METAUP) + (93 ("2,24" "2,64" NOLOCKSHIFT)) + (62) + (111 ("1,111" "1,79" NOLOCKSHIFT)) + (89) + (90 ("2,3" "2,43" NOLOCKSHIFT)) + (73 ("2,11" "2,11" NOLOCKSHIFT)) + (74 ("2,12" "2,12" NOLOCKSHIFT)) + (75 ("^B" "^B" NOLOCKSHIFT)) + (81 ("2,14" 55 NOLOCKSHIFT)) + (82 (173 56 NOLOCKSHIFT)) + (83 ("2,15" 57 NOLOCKSHIFT)) + (84 (172 52 NOLOCKSHIFT)) + (85 ("2,16" 53 NOLOCKSHIFT)) + (87 (174 54 NOLOCKSHIFT)) + (94 ("2,17" 49 NOLOCKSHIFT)) + (69 (175 50 NOLOCKSHIFT)) + (70 ("2,20" 51 NOLOCKSHIFT)) + (98 ("2,21" 48 NOLOCKSHIFT)) + (76 ("2,13" "2,13" NOLOCKSHIFT)) + (110 ("2,53" "2,53" NOLOCKSHIFT)) + (72 LOCKTOGGLE) + (97 ("2,101" "2,141" NOLOCKSHIFT)) + (99 ("2,102" "2,142" NOLOCKSHIFT)) + (100 ("2,103" "2,143" NOLOCKSHIFT)) + (67 ("2,104" "2,144" NOLOCKSHIFT)) + (68 ("2,105" "2,145" NOLOCKSHIFT)) + (101 ("2,106" "2,146" NOLOCKSHIFT)) + (66 ("2,107" "2,147" NOLOCKSHIFT)) + (104 ("2,110" "2,150" NOLOCKSHIFT)) + (80 ("2,111" "2,151" NOLOCKSHIFT)) + (106 ("2,113" "2,153" NOLOCKSHIFT)) + (107 ("2,114" "2,154" NOLOCKSHIFT)) + (108 ("2,115" "2,155" NOLOCKSHIFT)) + (13 ("^W" "^U" NOLOCKSHIFT)) + (33 ("ESC" "ESC" NOLOCKSHIFT)) + (64 IGNORE . IGNORE) + (65 (27 27 NOLOCKSHIFT)) + (95 IGNORE . IGNORE) + (96 IGNORE . IGNORE) + (102 IGNORE . IGNORE) + (2 ("6" "^" NOLOCKSHIFT)) + (10 ("-" "_" NOLOCKSHIFT)) + (36 CTRLDOWN . CTRLUP) + (56 LOCKTOGGLE . IGNORE) + (45 ("`" "~" NOLOCKSHIFT)) + (31 METADOWN . METAUP) + (71 (10 10 NOLOCKSHIFT)) + (47 ("2,22" "2,62" NOLOCKSHIFT)) + (86 IGNORE . IGNORE) + (88 IGNORE . IGNORE) + (105 ("\" "|" NOLOCKSHIFT)))) + +(RPAQQ \MAIKO-JLE-KEYACTIONS + ((2 ("6" "&" NOLOCKSHIFT)) + (4 ("7" "'" NOLOCKSHIFT)) + (8 ("0" "0" NOLOCKSHIFT)) + (10 ("\" "_" NOLOCKSHIFT)) + (13 ("^W" "^U" NOLOCKSHIFT)) + (14 METADOWN . METAUP) + (15 (8 8 NOLOCKSHIFT)) + (17 ("2" "%"" NOLOCKSHIFT)) + (22 ("9" ")" NOLOCKSHIFT)) + (28 (":" "*" NOLOCKSHIFT)) + (29 ("[" "{" NOLOCKSHIFT)) + (30 ("]" "}" NOLOCKSHIFT)) + (31 METADOWN . METAUP) + (33 ("ESC" "ESC" NOLOCKSHIFT)) + (36 CTRLDOWN . CTRLUP) + (43 (";" "+" NOLOCKSHIFT)) + (45 ("^" "~" NOLOCKSHIFT)) + (47 ("2,22" "2,62" NOLOCKSHIFT)) + (53 ("8" "(" NOLOCKSHIFT)) + (56 LOCKTOGGLE . IGNORE) + (58 ("@" "`" NOLOCKSHIFT)) + (59 ("-" "=" NOLOCKSHIFT)) + (61 ("^E" "^G" NOLOCKSHIFT)) + (62) + (63 ("2,4" "2,44" NOLOCKSHIFT)) + (64 ("2,14" 55 NOLOCKSHIFT)) + (65 (27 27 NOLOCKSHIFT)) + (66 ("2,107" "2,147" NOLOCKSHIFT)) + (67 ("2,104" "2,144" NOLOCKSHIFT)) + (69 ("2,13" "2,53" NOLOCKSHIFT)) + (70 ("2,20" 51 NOLOCKSHIFT)) + (71 (10 10 NOLOCKSHIFT)) + (72 (766 766 NOLOCKSHIFT)) + (73 ("2,11" "2,11" NOLOCKSHIFT)) + (74 ("2,12" "2,12" NOLOCKSHIFT)) + (75 ("^B" "^B" NOLOCKSHIFT)) + (80 ("2,111" "2,151" NOLOCKSHIFT)) + (81 ("2,14" 55 NOLOCKSHIFT)) + (82 (173 56 NOLOCKSHIFT)) + (83 ("2,15" 57 NOLOCKSHIFT)) + (84 (172 52 NOLOCKSHIFT)) + (85 ("2,16" 53 NOLOCKSHIFT)) + (86 (765 765 NOLOCKSHIFT)) + (87 (174 54 NOLOCKSHIFT)) + (88 (770 771 NOLOCKSHIFT)) + (90 ("2,3" "2,43" NOLOCKSHIFT)) + (91 ("2,10" "2,50" NOLOCKSHIFT)) + (92 ("2,1" "2,41" NOLOCKSHIFT)) + (93 ("2,24" "2,64" NOLOCKSHIFT)) + (96 IGNORE . IGNORE) + (98 ("2,21" 48 NOLOCKSHIFT)) + (99 ("2,102" "2,142" NOLOCKSHIFT)) + (101 ("2,106" "2,146" NOLOCKSHIFT)) + (102 IGNORE . IGNORE) + (103 (767 768 NOLOCKSHIFT)) + (104 ("2,110" "2,150" NOLOCKSHIFT)) + (105 ("\" "|" NOLOCKSHIFT)) + (106 ("2,113" "2,153" NOLOCKSHIFT)) + (107 ("2,114" "2,154" NOLOCKSHIFT)) + (108 ("2,115" "2,155" NOLOCKSHIFT)) + (109 (769 769 NOLOCKSHIFT)) + (110 ("2,53" "2,53" NOLOCKSHIFT)) + (111 ("1,111" "1,79" NOLOCKSHIFT)))) + +(RPAQQ \TOSHIBA-KEYACTIONS + ((2 ("6" "&" NOLOCKSHIFT)) + (4 ("7" "'" NOLOCKSHIFT)) + (17 ("2" "%"" NOLOCKSHIFT)) + (53 ("8" "(" NOLOCKSHIFT)) + (22 ("9" ")" NOLOCKSHIFT)) + (8 ("0" "0" NOLOCKSHIFT)) + (10 ("-" "=" NOLOCKSHIFT)) + (59 ("^" "~" NOLOCKSHIFT)) + (45 ("\" "|" NOLOCKSHIFT)) + (58 ("@" "`" NOLOCKSHIFT)) + (29 ("[" "{" NOLOCKSHIFT)) + (105 ("]" "}" NOLOCKSHIFT)) + (43 (";" "+" NOLOCKSHIFT)) + (28 (":" "*" NOLOCKSHIFT)) + (15 (23 95 NOLOCKSHIFT)) + (13 (8 8 NOLOCKSHIFT)) + (86 METADOWN . METAUP) + (73 (530 562 NOLOCKSHIFT)) + (88 ("2,24" "2,64" NOLOCKSHIFT)) + (98 IGNORE . IGNORE) + (75 ("2,11" "2,11" NOLOCKSHIFT)) + (110 ("2,12" "2,12" NOLOCKSHIFT)) + (74 ("^B" "^B" NOLOCKSHIFT)) + (64 ("2,14" 55 NOLOCKSHIFT)) + (65 (173 56 NOLOCKSHIFT)) + (95 ("2,15" 57 NOLOCKSHIFT)) + (81 (172 52 NOLOCKSHIFT)) + (82 ("2,16" 53 NOLOCKSHIFT)) + (83 (174 54 NOLOCKSHIFT)) + (84 ("2,17" 49 NOLOCKSHIFT)) + (85 (175 50 NOLOCKSHIFT)) + (87 ("2,20" 51 NOLOCKSHIFT)) + (94 ("2,21" 48 NOLOCKSHIFT)) + (69 ("2,13" "2,53" NOLOCKSHIFT)) + (70 LOCKTOGGLE))) (RPAQQ KEYBOARD.APPLICATION-SPECIFIC-KEYACTIONS NIL) @@ -2097,7 +2107,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, \MAIKOKEYACTIONS]) (\KEYACTION1 - [LAMBDA (TI ACTION TABLE) (* ; "Edited 4-Mar-92 13:59 by jds") + [LAMBDA (TI ACTION TABLE) (* ; "Edited 9-Jun-2021 20:18 by rmk:") (PROG1 (SELECTC (TRANSITIONFLAGS TABLE TI) (IGNORE.TF 'IGNORE) ((LIST LOCKSHIFT.TF NOLOCKSHIFT.TF) @@ -2217,25 +2227,21 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, ([AND [OR (AND (AND (LISTP (CAR (LISTP ACTION))) (EQ (CAAR (LISTP ACTION)) 'DEADKEY)) - [SETQ DEAD - (for PAIR in (CADAR (LISTP ACTION)) - collect - - (* ;; - "Make sure we'll take string charcode specs in the deadkey list.") - - (CONS (OR (AND (\CHARCODEP (CAR PAIR)) - (CAR PAIR)) - (APPLY* (FUNCTION CHARCODE) - (CAR PAIR))) - (OR (AND (\CHARCODEP (CDR PAIR)) - (CDR PAIR)) - (APPLY* (FUNCTION CHARCODE) - (CDR PAIR] + [SETQ DEAD (for PAIR in (CADAR (LISTP ACTION)) + collect + + (* ;; + "Make sure we'll take string charcode specs in the deadkey list.") + + (CONS (OR (AND (\CHARCODEP (CAR PAIR)) + (CAR PAIR)) + (CHARCODE.DECODE (CAR PAIR))) + (OR (AND (\CHARCODEP (CDR PAIR)) + (CDR PAIR)) + (CHARCODE.DECODE (CDR PAIR] (SETQ CODE 65535)) [\CHARCODEP (SETQ CODE (\GETCHARCODE (CAR (LISTP ACTION] - (SETQ CODE (APPLY* (FUNCTION CHARCODE) - (CAR (LISTP ACTION] + (SETQ CODE (CHARCODE.DECODE (CAR (LISTP ACTION] [OR (AND (AND (LISTP (CADR (LISTP ACTION))) (EQ (CAADR (LISTP ACTION)) 'DEADKEY)) @@ -2243,18 +2249,15 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, (for PAIR in (CADADR (LISTP ACTION)) collect (CONS (OR (AND (\CHARCODEP (CAR PAIR)) (CAR PAIR)) - (APPLY* (FUNCTION CHARCODE) - (CAR PAIR))) + (CHARCODE.DECODE (CAR PAIR))) (OR (AND (\CHARCODEP (CDR PAIR)) (CDR PAIR)) - (APPLY* (FUNCTION CHARCODE) - (CDR PAIR] + (CHARCODE.DECODE (CDR PAIR] (SETQ SHIFTCODE 65535) (SETQ ACT (CDR ACTION))) [\CHARCODEP (SETQ SHIFTCODE (\GETCHARCODE (CAR (SETQ ACT (LISTP (CDR ACTION] - (SETQ SHIFTCODE (APPLY* (FUNCTION CHARCODE) - (CAR ACT] + (SETQ SHIFTCODE (CHARCODE.DECODE (CAR ACT] (OR (NULL (SETQ ACT (CDR ACT))) (LISTP ACT)) (SELECTQ (CAR ACT) @@ -2265,8 +2268,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, (change (TRANSITIONFLAGS TABLE TI) NOLOCKSHIFT.TF)) (AND [OR [\CHARCODEP (SETQ ALTGRCODE (\GETCHARCODE (CAR ACT] - (SETQ ALTGRCODE (APPLY* (FUNCTION CHARCODE) - (CAR ACT] + (SETQ ALTGRCODE (CHARCODE.DECODE (CAR ACT] (OR (NULL (SETQ ACT (CDR ACT))) (LISTP ACT)) (SELECTQ (CAR ACT) @@ -2385,10 +2387,10 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, ) (DECLARE%: EVAL@COMPILE -(PUTPROPS \TEMPCOPYTIMER MACRO ((X) - (PROGN (\BLT \MOUSETIMERTEMP (LOCF X) - WORDSPERCELL) - \MOUSETIMERTEMP))) +(PUTPROPS \TEMPCOPYTIMER MACRO ((X) + (PROGN (\BLT \MOUSETIMERTEMP (LOCF X) + WORDSPERCELL) + \MOUSETIMERTEMP))) ) @@ -2405,36 +2407,36 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, ) (* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE -[PUTPROPS XKEYDOWNP MACRO ((KEYNAME) - (KEYDOWNP1 (\KEYNAMETONUMBER KEYNAME] - -[PUTPROPS KEYDOWNP1 MACRO (OPENLAMBDA (KEYNUMBER) - (DECLARE (GLOBALVARS \EM.KBDAD0 \EM.KBDAD1 \EM.KBDAD2 \EM.KBDAD3 - \EM.UTILIN \EM.KBDAD4 \EM.KBDAD5)) - (PROG NIL - (RETURN (EQ 0 (LOGAND (LRSH (LLSH 1 15) - (PROGN - (* (IMOD KEYNUMBER BITSPERWORD) - - GETD cause IMOD and BITSPERWORD not - exported to user) - (LOGAND KEYNUMBER 15))) - (\GETBASE (SELECTQ (PROGN - (* (FOLDLO KEYNUMBER BITSPERWORD) - GETD follows since FOLDLO and - BITSPERWORD not exported to user) - (LRSH KEYNUMBER 4)) - (0 \EM.KBDAD0) - (1 \EM.KBDAD1) - (2 \EM.KBDAD2) - (3 \EM.KBDAD3) - (4 \EM.UTILIN) - (5 (OR \EM.KBDAD4 (RETURN))) - (6 (OR \EM.KBDAD5 (RETURN))) - (RETURN)) - 0] - -[PUTPROPS \NEWKEYDOWNP MACRO ((KEYNUMBER) - (EQ 0 (\GETBASEBIT \LASTKEYSTATE KEYNUMBER] +(PUTPROPS XKEYDOWNP MACRO ((KEYNAME) + (KEYDOWNP1 (\KEYNAMETONUMBER KEYNAME)))) + +(PUTPROPS KEYDOWNP1 MACRO + [OPENLAMBDA (KEYNUMBER) + (DECLARE (GLOBALVARS \EM.KBDAD0 \EM.KBDAD1 \EM.KBDAD2 \EM.KBDAD3 \EM.UTILIN + \EM.KBDAD4 \EM.KBDAD5)) + (PROG NIL + (RETURN (EQ 0 (LOGAND (LRSH (LLSH 1 15) + (PROGN (* (IMOD KEYNUMBER BITSPERWORD) - + GETD cause IMOD and BITSPERWORD not + exported to user) + (LOGAND KEYNUMBER 15))) + (\GETBASE (SELECTQ (PROGN + (* (FOLDLO KEYNUMBER BITSPERWORD) + GETD follows since FOLDLO and + BITSPERWORD not exported to user) + (LRSH KEYNUMBER 4)) + (0 \EM.KBDAD0) + (1 \EM.KBDAD1) + (2 \EM.KBDAD2) + (3 \EM.KBDAD3) + (4 \EM.UTILIN) + (5 (OR \EM.KBDAD4 (RETURN))) + (6 (OR \EM.KBDAD5 (RETURN))) + (RETURN)) + 0]) + +(PUTPROPS \NEWKEYDOWNP MACRO ((KEYNUMBER) + (EQ 0 (\GETBASEBIT \LASTKEYSTATE KEYNUMBER)))) ) (* "END EXPORTED DEFINITIONS") @@ -3555,7 +3557,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, (SETQ \CURSORHOTSPOTY (fetch (POSITION YCOORD) of NEWPOSITION]) ) -(PUTPROPS CURSORPROP ARGNAMES (NIL (CURSOR PROP {NEWVALUE}) . U)) +(PUTPROPS CURSORPROP ARGNAMES (NIL (CURSOR PROP {NEWVALUE}) . U)) (RPAQ? \CURSORHOTSPOTX 0) @@ -3675,31 +3677,35 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, (DECLARE%: DONTCOPY (* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE -[PUTPROPS \SETMOUSEXY MACRO ((XPOS YPOS) - (PROGN (SELECTC \MACHINETYPE - (\DAYBREAK (\DoveMisc.SetMousePosition XPOS YPOS)) - (\MAIKO (SUBRCALL SETMOUSEXY XPOS YPOS)) - (\DANDELION (do (PROGN (replace (IOPAGE NEWMOUSEX) - of \IOPAGE with XPOS) - (replace (IOPAGE NEWMOUSEY) - of \IOPAGE with YPOS)) - repeatuntil (ILESSP (fetch - (IOPAGE NEWMOUSESTATE - ) of - \IOPAGE) - 32768)) - (* ; - "smash position until mouse says it is not busy") - (replace (IOPAGE NEWMOUSEX) of \IOPAGE - with XPOS) - (replace (IOPAGE NEWMOUSEY) of \IOPAGE - with YPOS) - (replace (IOPAGE NEWMOUSESTATE) of - \IOPAGE - with 32768)) - NIL) - (PROGN (\PUTBASE \EM.MOUSEX 0 XPOS) - (\PUTBASE \EM.MOUSEY 0 YPOS] +(PUTPROPS \SETMOUSEXY MACRO [(XPOS YPOS) + (PROGN (SELECTC \MACHINETYPE + (\DAYBREAK (\DoveMisc.SetMousePosition XPOS YPOS)) + (\MAIKO (SUBRCALL SETMOUSEXY XPOS YPOS)) + (\DANDELION (do (PROGN (replace (IOPAGE + NEWMOUSEX) + of \IOPAGE + with XPOS) + (replace (IOPAGE + NEWMOUSEY) + of \IOPAGE + with YPOS)) + repeatuntil + (ILESSP (fetch (IOPAGE + NEWMOUSESTATE + ) + of \IOPAGE) + 32768)) + (* ; + "smash position until mouse says it is not busy") + (replace (IOPAGE NEWMOUSEX) + of \IOPAGE with XPOS) + (replace (IOPAGE NEWMOUSEY) + of \IOPAGE with YPOS) + (replace (IOPAGE NEWMOUSESTATE) + of \IOPAGE with 32768)) + NIL) + (PROGN (\PUTBASE \EM.MOUSEX 0 XPOS) + (\PUTBASE \EM.MOUSEY 0 YPOS]) ) (* "END EXPORTED DEFINITIONS") @@ -3707,12 +3713,13 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, (DECLARE%: EVAL@COMPILE -[PUTPROPS \XMOUSECOORD MACRO (NIL (IPLUS \CURSORHOTSPOTX (SIGNED (\GETBASE \EM.CURSORX 0) - BITSPERWORD] +(PUTPROPS \XMOUSECOORD MACRO (NIL (IPLUS \CURSORHOTSPOTX (SIGNED (\GETBASE \EM.CURSORX 0) + BITSPERWORD)))) -[PUTPROPS \YMOUSECOORD MACRO (NIL (IDIFFERENCE (SUB1 \CURSORDESTHEIGHT) - (IPLUS \CURSORHOTSPOTY (SIGNED (\GETBASE \EM.CURSORY 0) - BITSPERWORD] +(PUTPROPS \YMOUSECOORD MACRO [NIL (IDIFFERENCE (SUB1 \CURSORDESTHEIGHT) + (IPLUS \CURSORHOTSPOTY (SIGNED (\GETBASE \EM.CURSORY + 0) + BITSPERWORD]) ) ) (DECLARE%: DONTEVAL@LOAD DOCOPY @@ -3747,12 +3754,12 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, (USERMODE2 FLAG) (USERMODE3 FLAG) (ALTGRAPH FLAG) - (DEADKEYPENDING FLAG) (* ; "T if the last key was a dead (accent) key, and we should generate an accented character if possible.") + (DEADKEYPENDING FLAG) (* ; "T if the last key was a dead (accent) key, and we should generate an accented character if possible.") (NIL BITS 2) (MOUSEX WORD) (MOUSEY WORD) - (DEADKEY-ALIST XPOINTER) (* ; - "The ALIST describing accents possible from teh last dead key.") + (DEADKEY-ALIST XPOINTER) (* ; + "The ALIST describing accents possible from teh last dead key.") ) (CREATE (\ALLOCBLOCK (FOLDHI \KEYBOARDEVENT.SIZE WORDSPERCELL))) W0 _ ALLUP W1 _ ALLUP W2 _ ALLUP W3 _ ALLUP W4 _ ALLUP W5 _ ALLUP WU _ ALLUP MOUSESTATE @@ -3873,7 +3880,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, ) (DECLARE%: DONTCOPY -(ADDTOVAR INEWCOMS +(ADDTOVAR INEWCOMS (ALLOCAL (ADDVARS (LOCKEDFNS FLIPCURSORBAR \SETIOPOINTERS \KEYHANDLER \KEYHANDLER1 \CONTEXTAPPLY \LOCKPAGES \DECODETRANSITION \SMASHLINK \INCUSECOUNT LLSH \MAKEFREEBLOCK \DECUSECOUNT \MAKENUMBER \ADDBASE @@ -3898,7 +3905,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, (ADDTOVAR RDCOMS (FNS \SETIOPOINTERS)) ) -(PUTPROPS LLKEY FILETYPE :BCOMPL) +(PUTPROPS LLKEY FILETYPE :BCOMPL) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDTOVAR NLAMA ) @@ -3910,33 +3917,32 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1992, 1999, (PUTPROPS LLKEY COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1988 1989 1990 1992 1999 1920 2000 2018 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (14777 22093 (BKSYSCHARCODE 14787 . 15136) (\CLEARSYSBUF 15138 . 15696) (\GETKEY 15698 - . 16873) (\NSYSBUFCHARS 16875 . 17617) (\SAVESYSBUF 17619 . 19228) (\SYSBUFP 19230 . 19534) ( -\GETSYSBUF 19536 . 19716) (\PUTSYSBUF 19718 . 20931) (\PEEKSYSBUF 20933 . 22091)) (23351 60185 ( -\KEYBOARDINIT 23361 . 25081) (\KEYBOARDEVENTFN 25083 . 29783) (\ALLOCLOCKED 29785 . 30375) ( -\SETIOPOINTERS 30377 . 34913) (\KEYBOARDOFF 34915 . 35329) (\KEYBOARDON 35331 . 35710) (\KEYHANDLER -35712 . 35843) (\KEYHANDLER1 35845 . 43291) (\RESETKEYBOARD 43293 . 44941) (\DOMOUSECHORDING 44943 . -48763) (\DOTRANSITIONS 48765 . 49442) (\DECODETRANSITION 49444 . 56133) (MOUSECHORDWAIT 56135 . 56799) - (\TRACKCURSOR 56801 . 60183)) (102601 124455 (KEYACTION 102611 . 103455) (KEYACTIONTABLE 103457 . -104639) (KEYBOARDTYPE 104641 . 105743) (RESETKEYACTION 105745 . 107504) ( -\KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS 107506 . 109408) (\KEYACTION1 109410 . 120031) (KEYDOWNP 120033 - . 120368) (KEYNUMBERP 120370 . 120568) (\KEYNAMETONUMBER 120570 . 121264) (MODIFY.KEYACTIONS 121266 - . 122127) (METASHIFT 122129 . 123073) (SHIFTDOWNP 123075 . 124453)) (124518 124814 ( -SETUP.OFFICE.KEYBOARD 124528 . 124812)) (127754 129466 (\INIT.KEYBOARD.STREAM 127764 . 129464)) ( -129731 146108 (\DOBUFFEREDTRANSITIONS 129741 . 145171) (\TIMER.INTERRUPTFRAME 145173 . 145898) ( -\PERIODIC.INTERRUPTFRAME 145900 . 146106)) (146362 150439 (\HARDCURSORUP 146372 . 148254) ( -\HARDCURSORPOSITION 148256 . 150292) (\HARDCURSORDOWN 150294 . 150437)) (150440 174500 (CURSOR.INIT -150450 . 154150) (\CURSORDESTINATION 154152 . 156470) (\SOFTCURSORUP 156472 . 161726) ( -\SOFTCURSORUPCURRENT 161728 . 168764) (\SOFTCURSORPOSITION 168766 . 169531) (\SOFTCURSORDOWN 169533 . -170241) (CURSORPROP 170243 . 170585) (GETCURSORPROP 170587 . 170775) (PUTCURSORPROP 170777 . 171932) ( -\CURSORBITSPERPIXEL 171934 . 174050) (\CURSORIMAGEPROPNAME 174052 . 174276) (\CURSORMASKPROPNAME -174278 . 174498)) (174501 192451 (CURSORCREATE 174511 . 177186) (CURSOR 177188 . 179000) ( -\CURSOR-VALID-P 179002 . 180089) (\CURSORUP 180091 . 181806) (\CURSORPOSITION 181808 . 184336) ( -\CURSORDOWN 184338 . 184571) (ADJUSTCURSORPOSITION 184573 . 185151) (CURSORPOSITION 185153 . 186695) ( -CURSORSCREEN 186697 . 187353) (CURSOREXIT 187355 . 188746) (FLIPCURSOR 188748 . 189874) (FLIPCURSORBAR - 189876 . 190856) (LASTMOUSEX 190858 . 191112) (LASTMOUSEY 191114 . 191368) (CREATEPOSITION 191370 . -191576) (POSITIONP 191578 . 191862) (CURSORHOTSPOT 191864 . 192449)) (193685 195233 (GETMOUSESTATE -193695 . 194354) (\EVENTKEYS 194356 . 195231)) (201094 201890 (MACHINETYPE 201104 . 201504) ( -SETMAINTPANEL 201506 . 201888)) (201920 203059 (BEEPON 201930 . 202583) (BEEPOFF 202585 . 203057)) ( -203510 203773 (WITHOUT-INTERRUPTS 203520 . 203771))))) + (FILEMAP (NIL (14679 21995 (BKSYSCHARCODE 14689 . 15038) (\CLEARSYSBUF 15040 . 15598) (\GETKEY 15600 + . 16775) (\NSYSBUFCHARS 16777 . 17519) (\SAVESYSBUF 17521 . 19130) (\SYSBUFP 19132 . 19436) ( +\GETSYSBUF 19438 . 19618) (\PUTSYSBUF 19620 . 20833) (\PEEKSYSBUF 20835 . 21993)) (23292 60126 ( +\KEYBOARDINIT 23302 . 25022) (\KEYBOARDEVENTFN 25024 . 29724) (\ALLOCLOCKED 29726 . 30316) ( +\SETIOPOINTERS 30318 . 34854) (\KEYBOARDOFF 34856 . 35270) (\KEYBOARDON 35272 . 35651) (\KEYHANDLER +35653 . 35784) (\KEYHANDLER1 35786 . 43232) (\RESETKEYBOARD 43234 . 44882) (\DOMOUSECHORDING 44884 . +48704) (\DOTRANSITIONS 48706 . 49383) (\DECODETRANSITION 49385 . 56074) (MOUSECHORDWAIT 56076 . 56740) + (\TRACKCURSOR 56742 . 60124)) (93868 115217 (KEYACTION 93878 . 94722) (KEYACTIONTABLE 94724 . 95906) +(KEYBOARDTYPE 95908 . 97010) (RESETKEYACTION 97012 . 98771) (\KEYBOARD.MACHINE-SPECIFIC-KEYACTIONS +98773 . 100675) (\KEYACTION1 100677 . 110793) (KEYDOWNP 110795 . 111130) (KEYNUMBERP 111132 . 111330) +(\KEYNAMETONUMBER 111332 . 112026) (MODIFY.KEYACTIONS 112028 . 112889) (METASHIFT 112891 . 113835) ( +SHIFTDOWNP 113837 . 115215)) (115280 115576 (SETUP.OFFICE.KEYBOARD 115290 . 115574)) (118279 119991 ( +\INIT.KEYBOARD.STREAM 118289 . 119989)) (120256 136633 (\DOBUFFEREDTRANSITIONS 120266 . 135696) ( +\TIMER.INTERRUPTFRAME 135698 . 136423) (\PERIODIC.INTERRUPTFRAME 136425 . 136631)) (136887 140964 ( +\HARDCURSORUP 136897 . 138779) (\HARDCURSORPOSITION 138781 . 140817) (\HARDCURSORDOWN 140819 . 140962) +) (140965 165025 (CURSOR.INIT 140975 . 144675) (\CURSORDESTINATION 144677 . 146995) (\SOFTCURSORUP +146997 . 152251) (\SOFTCURSORUPCURRENT 152253 . 159289) (\SOFTCURSORPOSITION 159291 . 160056) ( +\SOFTCURSORDOWN 160058 . 160766) (CURSORPROP 160768 . 161110) (GETCURSORPROP 161112 . 161300) ( +PUTCURSORPROP 161302 . 162457) (\CURSORBITSPERPIXEL 162459 . 164575) (\CURSORIMAGEPROPNAME 164577 . +164801) (\CURSORMASKPROPNAME 164803 . 165023)) (165026 182976 (CURSORCREATE 165036 . 167711) (CURSOR +167713 . 169525) (\CURSOR-VALID-P 169527 . 170614) (\CURSORUP 170616 . 172331) (\CURSORPOSITION 172333 + . 174861) (\CURSORDOWN 174863 . 175096) (ADJUSTCURSORPOSITION 175098 . 175676) (CURSORPOSITION 175678 + . 177220) (CURSORSCREEN 177222 . 177878) (CURSOREXIT 177880 . 179271) (FLIPCURSOR 179273 . 180399) ( +FLIPCURSORBAR 180401 . 181381) (LASTMOUSEX 181383 . 181637) (LASTMOUSEY 181639 . 181893) ( +CREATEPOSITION 181895 . 182101) (POSITIONP 182103 . 182387) (CURSORHOTSPOT 182389 . 182974)) (184214 +185762 (GETMOUSESTATE 184224 . 184883) (\EVENTKEYS 184885 . 185760)) (192189 192985 (MACHINETYPE +192199 . 192599) (SETMAINTPANEL 192601 . 192983)) (193015 194154 (BEEPON 193025 . 193678) (BEEPOFF +193680 . 194152)) (194605 194868 (WITHOUT-INTERRUPTS 194615 . 194866))))) STOP diff --git a/sources/LLKEY.LCOM b/sources/LLKEY.LCOM index 4a7efdcf2..118d7adb9 100644 Binary files a/sources/LLKEY.LCOM and b/sources/LLKEY.LCOM differ diff --git a/sources/LLREAD b/sources/LLREAD index 272431104..6a3de82a5 100644 --- a/sources/LLREAD +++ b/sources/LLREAD @@ -1,11 +1,12 @@ (DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED "19-Apr-2021 21:52:10"  -{DSK}kaplan>Local>medley3.5>git-medley>sources>LLREAD.;3 167165 +(FILECREATED "27-Jun-2021 23:26:36"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>LLREAD.;47 97691 - changes to%: (FNS \RSTRING2) + changes to%: (FNS \PEEKCCODE.NOEOLC \INCCODE.EOLC) + (VARS LLREADCOMS) - previous date%: " 4-Feb-2021 17:06:41" -{DSK}kaplan>Local>medley3.5>git-medley>sources>LLREAD.;2) + previous date%: "24-Jun-2021 17:26:28" +{DSK}kaplan>Local>medley3.5>git-medley>sources>LLREAD.;45) (* ; " @@ -17,7 +18,7 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (RPAQQ LLREADCOMS [(COMS (* ; "Reader entrypoints") (FNS LASTC PEEKC PEEKCCODE RATOM READ READC READCCODE READP SETREADMACROFLG - SKIPSEPRCODES SKIPSEPRS \NSIN.24BITENCODING.ERROR SKREAD)) + SKIPSEPRCODES SKIPSEPRS SKREAD)) (COMS (* ; "CommonLisp read entry points") (FNS CL:READ CL:READ-PRESERVING-WHITESPACE CL:READ-DELIMITED-LIST CL:PARSE-INTEGER) (GLOBALVARS CMLRDTBL)) @@ -25,7 +26,7 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (FNS RSTRING READ-EXTENDED-TOKEN \RSTRING2)) [COMS (* ; "Core of the reader") (FNS \TOP-LEVEL-READ \SUBREAD \SUBREADCONCAT \ORIG-READ.SYMBOL \ORIG-INVALID.SYMBOL - \APPLYREADMACRO INREADMACROP) + \APPLYREADMACRO INREADMACROP \CHECKEOLC.CRLF) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (MOVD? '\ORIG-READ.SYMBOL '\READ.SYMBOL) (MOVD? '\ORIG-INVALID.SYMBOL '\INVALID.SYMBOL] (COMS (* ; "Read macro for '") @@ -38,61 +39,18 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (VARS CHARACTERNAMES CHARACTERSETNAMES)) (DECLARE%: DOEVAL@COMPILE DONTCOPY (CONSTANTS * READTYPES) (MACROS .CALL.SUBREAD. FIXDOT RBCONTEXT PROPRB \RDCONC) - (EXPORT (MACROS \BACKCHAR \BACKNSCHAR \CHECKEOLC \INCHAR \INCCODE \PEEKCCODE \NSIN - \NSPEEK NUMERIC-CHARSET)) (SPECVARS *READ-NEWLINE-SUPPRESS* \RefillBufferFn) (GLOBALVARS *KEYWORD-PACKAGE* *INTERLISP-PACKAGE*)) - [COMS (* ; - "Support for various external formats") - [COMS (* ; "JIS to XCCS conversion table.") - (VARS *JIS-TO-XCCS-CONV-NO-FONT-TABLE* *JIS-TO-XCCS-CODE-MAP* - *HANKAKU-TO-ZENKAKU-CODE-MAP*) - (GLOBALVARS *JIS-TO-XCCS-CONV-NO-FONT-TABLE* *JIS-TO-XCCS-CONV-TABLE-LIST* - *JIS-TO-XCCS-CODE-MAP* *HANKAKU-TO-ZENKAKU-CODE-MAP* - *JIS-1KU-TO-XCCS-CONV-TABLE* *JIS-2KU-TO-XCCS-CONV-TABLE* - *JIS-6KU-TO-XCCS-CONV-TABLE* *XCCS-TO-JIS-CONV-TABLE* - *HANKAKU-TO-ZENKAKU-CONV-TABLE* *ZENKAKU-TO-HANKAKU-CONV-TABLE*) - (FNS \MAKE.JIS.TO.XCCS.CONV.TABLE) - (DECLARE%: DONTEVAL@LOAD DOCOPY (P (\MAKE.JIS.TO.XCCS.CONV.TABLE] - [COMS (* ; "JIS to XCCS converter") - (INITVARS (*REPLACE-NO-FONT-CODE* T) - (*DEFAULT-NOT-CONVERTED-FAT-CODE* 8739)) - (GLOBALVARS *REPLACE-NO-FONT-CODE* *DEFAULT-NOT-CONVERTED-FAT-CODE*) - (DECLARE%: DOEVAL@COMPILE DONTCOPY (EXPORT (MACROS \CONV.JIS.TO.XCCS - \DO.CONV.JIS.TO.XCCS] - [COMS (* ; "XCCS to JIS converter") - (FNS CONVHANKAKU) - (DECLARE%: DOEVAL@COMPILE DONTCOPY (EXPORT (MACROS \CONV.XCCS.TO.JIS - \DO.CONV.XCCS.TO.JIS \ASCIIP - \NOT.EQUIVALENT.TO.JIS - \CONV.HANKAKU.TO.ZENKAKUP - \CONV.ZENKAKU.KANA] - (COMS (FNS \JISIN \JISPEEK \BACKJISCHAR \SHIFTJISIN \SHIFTJISPEEK \BACKSHIFTJISCHAR - \EUCIN \EUCPEEK \BACKEUCCHAR \THROUGHIN \THROUGHPEEK \BACKTHROUGHCHAR) - (DECLARE%: DOEVAL@COMPILE DONTCOPY - (EXPORT - - (* ;; "XCCS specific macro. Although the decoder and encoder are implemented as functions in general, only for XCCS, they are implemeted as macros for efficiency reason.") - - (MACROS \XCCSIN \XCCSPEEK \BACKXCCSCHAR \XCCSP) - - (* ;; "JIS specific macro") - - (MACROS \EXTRACT.NO.FONT.CODE \EXTARACT.CONV.TABLE - \NOT.EQUIVALENT.TO.XCCS \EXTRACT.SET \EXTRACT.CODE - \CHNAGE.KI.MODE \KIMODEP \HANKAKUP \KANJIP \NOTGAIJIP - \INVALID.TENP \CONV.HANKAKU.KANA \OUTKI \OUTKO) - - (* ;; "Shift-JIS specific macro") - - (MACROS \CONV.SJIS.TO.JIS \CONV.JIS.TO.SJIS \SJIS.KANJI.FIRST.BYTEP - ) - - (* ;; "EUC specific macro") - - (MACROS \EUC.KANJI.FIRST.BYTEP \GAIJIP \EUC.HANKAKUP] - (INITVARS (*SIGNAL-24BIT-NSENCODING-ERROR*) - (*READ-NEWLINE-SUPPRESS*) + (COMS + (* ;; "Generic functions not compiled open") + + (FNS \OUTCHAR \INCCODE \BACKCCODE \PEEKCCODE \PEEKCCODE.NOEOLC \INCHAR \INCCODE.EOLC + \FORMATBYTESTREAM) + (MACROS \CHECKEOLC)) + (COMS (INITVARS (*REPLACE-NO-FONT-CODE* T) + (*DEFAULT-NOT-CONVERTED-FAT-CODE* 8739)) + (GLOBALVARS *REPLACE-NO-FONT-CODE* *DEFAULT-NOT-CONVERTED-FAT-CODE*)) + (INITVARS (*READ-NEWLINE-SUPPRESS*) (\RefillBufferFn (FUNCTION \READCREFILL))) (* ;  "Top level val of \RefillBufferFn means act like READC--we must be doing a raw BIN (or PEEKBIN?)") @@ -100,8 +58,8 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) - (LAMA CONVHANKAKU CL:PARSE-INTEGER CL:READ-DELIMITED-LIST - CL:READ-PRESERVING-WHITESPACE CL:READ]) + (LAMA CL:PARSE-INTEGER CL:READ-DELIMITED-LIST CL:READ-PRESERVING-WHITESPACE + CL:READ]) @@ -110,19 +68,12 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (DEFINEQ (LASTC - [LAMBDA (FILE) (* ; "Edited 6-Jan-88 15:31 by jds") - - (* ;; "Be careful only to do BIN's if we first were able to back up, so that an EOF doesn't happen. This is really an inadequate implementation, because it fails for files that cannot be backed up. Eventually, we must change the character reading functions READ, RATOM, READC to save the last character they read in an STREAM field.") - - (LET* ((STREAM (\GETSTREAM FILE 'INPUT)) - (LASTCCODE (FETCH (STREAM LASTCCODE) OF STREAM))) - - (* ;; "(FCHARACTER (SELCHARQ C (CR (SELECTC (ffetch EOLCONVENTION of STREAM) (CR.EOLC (CHARCODE EOL)) C)) (LF (SELECTC (ffetch EOLCONVENTION of STREAM) (LF.EOLC (CHARCODE EOL)) (CRLF.EOLC (COND ((EQ (CHARCODE CR) (UNINTERRUPTABLY (AND (\BACKNSCHAR STREAM SHIFTEDCHARSET) (PROG1 (PROGN (\BACKNSCHAR STREAM SHIFTEDCHARSET) (\NSIN STREAM SHIFTEDCHARSET)) (\NSIN STREAM SHIFTEDCHARSET))))) (CHARCODE EOL)) (T C))) C)) (NIL 0) C))") - - (COND - ((IEQP LASTCCODE 65535) - NIL) - (T (FCHARACTER LASTCCODE]) + [LAMBDA (FILE) (* ; "Edited 3-May-2021 16:45 by rmk:") + (LET [(LASTCCODE (FETCH (STREAM LASTCCODE) OF (\GETSTREAM FILE 'INPUT] + (COND + ((IEQP LASTCCODE 65535) + NIL) + (T (FCHARACTER LASTCCODE]) (PEEKC [LAMBDA (FILE FLG) (* rmk%: "10-Apr-85 11:55") @@ -135,11 +86,11 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (FCHARACTER (PEEKCCODE STREAM]) (PEEKCCODE - [LAMBDA (FILE NOERROR) (* bvm%: "12-Sep-86 15:19") - (LET [(\RefillBufferFn (FUNCTION \PEEKREFILL)) - (STREAM (\GETSTREAM FILE 'INPUT] + [LAMBDA (FILE NOERROR) (* ; "Edited 3-May-2021 16:47 by rmk:") + (LET ((\RefillBufferFn (FUNCTION \PEEKREFILL))) (DECLARE (SPECVARS \RefillBufferFn)) - (\PEEKCCODE STREAM NOERROR]) + (\PEEKCCODE (\GETSTREAM FILE 'INPUT) + NOERROR]) (RATOM [LAMBDA (FILE RDTBL) (* ; "Edited 30-Mar-87 17:21 by bvm:") @@ -174,21 +125,31 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (\TOP-LEVEL-READ FILE NIL NIL NIL T]) (READC - [LAMBDA (FILE RDTBL) (* ; "Edited 6-Jan-88 15:30 by jds") + [LAMBDA (FILE RDTBL) (* ; "Edited 22-Jun-2021 09:50 by rmk:") + (SETQ FILE (\GETSTREAM FILE 'INPUT)) (LET ((*READTABLE* (\GTREADTABLE RDTBL)) - (\RefillBufferFn (FUNCTION \READCREFILL))) + (\RefillBufferFn (FUNCTION \READCREFILL)) + (CODE (\INCHAR FILE))) (DECLARE (SPECVARS *READTABLE* \RefillBufferFn)) - (FCHARACTER (REPLACE (STREAM LASTCCODE) OF (\INSTREAMARG FILE) - WITH (\INCCODE (\INSTREAMARG FILE]) + (CL:WHEN (\CHARCODEP CODE) (* ; + "If not a charcode, we must have run off the end with an ENDOFSTREAMOP") + (freplace (STREAM LASTCCODE) of FILE with CODE) + (FCHARACTER CODE))]) (READCCODE - [LAMBDA (FILE RDTBL) (* ; "Edited 3-Jun-88 01:30 by atm") + [LAMBDA (STREAM RDTBL) (* ; "Edited 22-Jun-2021 09:47 by rmk:") -(* ;;; "returns a 16 bit character code. \INCHAR does the EOL conversion and this function converts to a 16 bit value. Saves the character for LASTC as well.") +(* ;;; "returns a 16 bit character code. \INCHAR does the EOL conversion. Saves the character for LASTC as well.") - (SETQ FILE (\GETSTREAM FILE 'INPUT)) - (FDEVOP 'READCHARCODE (fetch (STREAM DEVICE) of FILE) - FILE RDTBL]) + (SETQ STREAM (\GETSTREAM STREAM 'INPUT)) + (LET ((*READTABLE* (\GTREADTABLE RDTBL)) + (\RefillBufferFn (FUNCTION \READCREFILL)) + (CODE (\INCHAR STREAM))) + (DECLARE (SPECVARS *READTABLE* \RefillBufferFn)) + (CL:WHEN (\CHARCODEP CODE) (* ; + "If not a charcode, we must have run off the end with an ENDOFSTREAMOP") + (freplace (STREAM LASTCCODE) of STREAM with CODE)) + CODE]) (READP [LAMBDA (FILE FLG) (* rmk%: " 5-Apr-85 09:09") @@ -208,54 +169,29 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. NIL]) (SKIPSEPRCODES - [LAMBDA (FILE RDTBL) (* ; "Edited 6-Jan-88 13:09 by jds") + [LAMBDA (FILE RDTBL) (* ; "Edited 18-Jun-2021 11:38 by rmk:") + + (* ;; "Passes over non-separators to peek at the first non-separator on FILE. Returns either last peeked character, or NIL if no non-seprs left in the file.") - (* ;; "Passes over non-separators to peek at the first non-separator on FILE. Returns either last peeked character, or NIL if no non-seprs left in the file.") + (* ;; "Assumes that CR and LF are both seprs so that no EOL processing is needed.") - (bind PREVC C SHIFTEDCHARSET (STREAM _ (\GETSTREAM FILE 'INPUT)) + (bind PREVC C (STRM _ (\GETSTREAM FILE 'INPUT)) (SA _ (fetch (READTABLEP READSA) of (\GTREADTABLE RDTBL))) - (\RefillBufferFn _ '\PEEKREFILL) first (SETQ SHIFTEDCHARSET (UNFOLD (ACCESS-CHARSET - STREAM) - 256)) - declare (SPECVARS \RefillBufferFn) - while [EQ SEPRCHAR.RC (\SYNCODE SA (SETQ C (OR (\NSPEEK STREAM SHIFTEDCHARSET - SHIFTEDCHARSET T) + (\RefillBufferFn _ '\PEEKREFILL) declare (SPECVARS \RefillBufferFn) + while [EQ SEPRCHAR.RC (\SYNCODE SA (SETQ C (OR (\PEEKCCODE STRM T) (RETURN] do (SETQ PREVC C) - (\NSIN STREAM SHIFTEDCHARSET - SHIFTEDCHARSET) - finally (AND PREVC (replace (STREAM LASTCCODE) of STREAM with PREVC)) + (\INCCODE STRM) + finally (AND PREVC (replace (STREAM LASTCCODE) of STRM with PREVC)) (RETURN C]) (SKIPSEPRS - [LAMBDA (FILE RDTBL) (* ; "Edited 11-Sep-87 17:52 by bvm:") + [LAMBDA (FILE RDTBL) (* ; "Edited 18-Jun-2021 11:39 by rmk:") - (* ;; "Passes over non-separators to peek at the first non-separator on FILE. Returns either last peeked character, or NIL if no non-seprs left in the file.") + (* ;; "Passes over non-separators to peek at the first non-separator on FILE. Returns either last peeked character, or NIL if no non-seprs left in the file.") - (bind C SHIFTEDCHARSET (STREAM _ (\GETSTREAM FILE 'INPUT)) - (SA _ (fetch (READTABLEP READSA) of (\GTREADTABLE RDTBL))) - (\RefillBufferFn _ '\PEEKREFILL) first (SETQ SHIFTEDCHARSET (UNFOLD (ACCESS-CHARSET - STREAM) - 256)) - declare (SPECVARS \RefillBufferFn) - while [EQ SEPRCHAR.RC (\SYNCODE SA (SETQ C (OR (\NSPEEK STREAM SHIFTEDCHARSET - SHIFTEDCHARSET T) - (RETURN] do (\NSIN STREAM - SHIFTEDCHARSET - SHIFTEDCHARSET) - finally (RETURN (FCHARACTER C]) - -(\NSIN.24BITENCODING.ERROR - [LAMBDA (STREAM) (* bvm%: "12-Mar-86 15:35") - (DECLARE (USEDFREE *SIGNAL-24BIT-NSENCODING-ERROR*)) - -(* ;;; "Called if we see the sequence shift,shift on STREAM -- means shift to 24-bit character set, which we don't support. Usually this just means we're erroneously reading a binary file as text. If this function returns, its value is taken as a character set to shift to") - - (COND - (*SIGNAL-24BIT-NSENCODING-ERROR* (* ; - "Only cause error if user/reader cares") - (ERROR "24-bit NS encoding not supported" STREAM))) - (* ; "Return charset zero") - 0]) + (LET (C) + (AND (SETQ C (SKIPSEPRCODES FILE RDTBL)) + (FCHARACTER C]) (SKREAD [LAMBDA (FILE REREADSTRING RDTBL) (* ; "Edited 6-Apr-88 11:06 by amd") @@ -464,50 +400,42 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. \PNAMESTRING]) (READ-EXTENDED-TOKEN - [LAMBDA (STREAM RDTBL ESCAPE-ALLOWED-P) (* ; "Edited 11-Sep-87 16:23 by bvm:") + [LAMBDA (STRM RDTBL ESCAPE-ALLOWED-P) (* ; "Edited 23-Jun-2021 13:04 by rmk:") - (* ;; "This is a cross between RSTRING and \SUBREAD. Read a %"token%" from STREAM, as defined by the Common Lisp reader and the syntax in RDTBL. EOF terminates as well. If ESCAPE-ALLOWED-P is true, escapes are honored and if one appears, a second value of T is returned. Otherwise, escapes are treated as vanilla chars and the caller can barf on them itself if it desires.") + (* ;; "This is a cross between RSTRING and \SUBREAD. Read a %"token%" from STREAM, as defined by the Common Lisp reader and the syntax in RDTBL. EOF terminates as well. If ESCAPE-ALLOWED-P is true, escapes are honored and if one appears, a second value of T is returned. Otherwise, escapes are treated as vanilla chars and the caller can barf on them itself if it desires.") (SETQ RDTBL (\GTREADTABLE RDTBL)) (WITH-RESOURCE (\PNAMESTRING) (PROG ((CASEBASE (AND (fetch (READTABLEP CASEINSENSITIVE) of RDTBL) (fetch (ARRAYP BASE) of UPPERCASEARRAY))) (PBASE (ffetch (STRINGP XBASE) of \PNAMESTRING)) - (SHIFTEDCHARSET (UNFOLD (ACCESS-CHARSET STREAM) - 256)) (J 0) (SA (fetch READSA of RDTBL)) CH SNX ANSLIST ANSTAIL ESCAPE-APPEARED ESCAPING FATSEEN) - LP (if (\EOFP STREAM) - then (* ; - "end of file terminates string just like a sepr/break") + LP (if (\EOFP STRM) + then (* ; + "end of file terminates string just like a sepr/break") (GO FINISH)) - (SETQ CH (\NSIN STREAM SHIFTEDCHARSET SHIFTEDCHARSET)) - (* ; "NOTE: This should really be (\CHECKEOLC (\NSIN --) --), but eol is usually a break or sepr and the \BACKNSCHAR doesn't work right. Fix this when we unread correctly") + (SETQ CH (\INCCODE STRM)) (* ; "NOTE: This should really be (\INCHAR --) --), but eol is usually a break or sepr and the \BACKNSCHAR doesn't work right. Fix this when we unread correctly") (SETQ SNX (\SYNCODE SA CH)) [COND ((AND ESCAPE-ALLOWED-P (SELECTC SNX - (ESCAPE.RC (SETQ CH (\CHECKEOLC (\NSIN STREAM - SHIFTEDCHARSET - SHIFTEDCHARSET) - (ffetch EOLCONVENTION - of STREAM) - STREAM)) + (ESCAPE.RC (SETQ CH (\INCHAR STRM)) (SETQ ESCAPE-APPEARED T)) (MULTIPLE-ESCAPE.RC (SETQ ESCAPING (NOT ESCAPING)) (SETQ ESCAPE-APPEARED T) (GO LP)) NIL))) - (ESCAPING (* ; "eat chars until next |")) + (ESCAPING (* ; "eat chars until next |")) ((fetch STOPATOM of SNX) - (\BACKNSCHAR STREAM SHIFTEDCHARSET) + (\BACKCCODE STRM) (GO FINISH)) ((AND CASEBASE (ILEQ CH \MAXTHINCHAR)) (SETQ CH (\GETBASEBYTE CASEBASE CH] (COND - ((EQ J \PNAMELIMIT) (* ; - "Filled PNSTR so have to save those chars away and start filling up a new buffer") + ((EQ J \PNAMELIMIT) (* ; + "Filled PNSTR so have to save those chars away and start filling up a new buffer") (SETQ J (\SMASHSTRING (ALLOCSTRING J NIL NIL FATSEEN) 0 \PNAMESTRING J)) [COND @@ -528,38 +456,30 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (ANSLIST (RPLACD ANSTAIL (SETQ ANSTAIL (CONS J NIL))) (SETQ J (CONCATLIST ANSLIST] (RETURN (if ESCAPE-APPEARED - then (* ; - "do it this way because multiple values are slow") + then (* ; + "do it this way because multiple values are slow") (CL:VALUES J T) else J]) (\RSTRING2 - [LAMBDA (STREAM SA RSFLG PNSTR) (* ; "Edited 19-Apr-2021 21:52 by rmk:") + [LAMBDA (STRM SA RSFLG PNSTR) (* ; "Edited 23-Jun-2021 13:02 by rmk:") (* ;;; "The main string reader. Reads characters from STREAM according to the syntax table SA and returns a string. PNSTR is an instance of the global resource \PNAMESTRING, which we can use all to ourselves as a buffer.") (* ;;; "If RSFLG is T then the call is from RSTRING, in which case the string is terminated by a break or sepr in SA. If RSFLG is NIL then the string is terminated by a string delimiter. If RSFLG is SKIP then CR's and the following separator chars are discarded as an otherwise normal string is read") (DECLARE (USEDFREE *READTABLE* *READ-SUPPRESS*)) - (PROG ((EOLC (ffetch EOLCONVENTION of STREAM)) - (PBASE (SELECTQ (SYSTEMTYPE) - (VAX PNSTR) - (ffetch (STRINGP XBASE) of PNSTR))) - (SHIFTEDCHARSET (UNFOLD (ACCESS-CHARSET STREAM) - 256)) + (PROG ((EOLC (ffetch EOLCONVENTION of STRM)) + (PBASE (ffetch (STRINGP XBASE) of PNSTR)) (J 0) - EOLCHAR CH SNX ANSLIST ANSTAIL LASTC FATSEEN SKIPPING) - (SELECTC EOLC - (CRLF.EOLC (SETQ EOLCHAR (CHARCODE CR))) - (CR.EOLC (SETQ EOLCHAR (CHARCODE CR))) - (LF.EOLC (SETQ EOLCHAR (CHARCODE LF))) - NIL) + CH SNX ANSLIST ANSTAIL LASTC FATSEEN SKIPPING) RS2LP - (SETQ CH (\NSIN STREAM SHIFTEDCHARSET SHIFTEDCHARSET)) + (SETQ CH (\INCCODE STRM)) [COND - ((EQ CH EOLCHAR) + ((OR (EQ CH (CHARCODE LF)) + (EQ CH (CHARCODE CR))) - (* ;; "We just read the stream's EOL character, so we have to turn it into our EOL. Most places do this with \CHECKEOLC, but we can't do that here, because if the eol is CRLF and would terminate the read, \BACKNSCHAR won't work right.") + (* ;; "We just read a potential (first) EOL character, so we have to turn it into our EOL. Most places do this with \CHECKEOLC, but we can't do that here, because if the eol happens to be a CR-LF sequence and would terminate the read, \BACKCCODE won't work right.") (* ;; "An escaped LF is handled below, stays as LF even from an LF file.") @@ -567,14 +487,15 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. ([AND (EQ RSFLG T) (fetch STOPATOM of (\SYNCODE SA (CHARCODE CR] (* ; - "From RSTRING, eol terminates read. Leave eol in buffer") - (\BACKNSCHAR STREAM SHIFTEDCHARSET) + "From RSTRING, eol terminates read. Leave (the first) eol in buffer") + (\BACKCCODE STRM) (GO FINISH)) (T (COND - ((AND (EQ EOLC CRLF.EOLC) - (EQ (\PEEKBIN STREAM T) + ((AND (OR (EQ EOLC CRLF.EOLC) + (EQ EOLC ANY.EOLC)) + (EQ (\PEEKBIN STRM T) (CHARCODE LF))) (* ; "Eat the LF after the CR") - (\BIN STREAM))) + (\BIN STRM))) (SETQ CH (CHARCODE EOL] (SETQ SNX (\SYNCODE SA CH)) (SELECTC SNX @@ -585,12 +506,12 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. [COND ((fetch ESCAPEFLG of *READTABLE*) - (SETQ CH (\NSIN STREAM SHIFTEDCHARSET SHIFTEDCHARSET)) + (SETQ CH (\INCCODE STRM)) (COND ((EQ CH (CHARCODE LF)) (* ;  "An escaped LF stays as an LF, even from a LF file.") (GO PUTCHAR)) - (T (SETQ CH (\CHECKEOLC CH EOLC STREAM)) + (T (SETQ CH (\CHECKEOLC CH EOLC STRM)) (COND ((AND (EQ RSFLG 'SKIP) (EQ CH (CHARCODE EOL))) @@ -608,7 +529,7 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation.  "if called from RSTRING, end check is break or sepr, and we must leave delim in stream") (COND ((fetch STOPATOM of SNX) - (\BACKNSCHAR STREAM SHIFTEDCHARSET) + (\BACKCCODE STRM) (GO FINISH)))) (SKIP (* ;  "Like NIL but strip cr's and leading spaces") @@ -662,10 +583,10 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (SETQ J (ADD1 J] (COND ((OR (NEQ RSFLG T) - (NOT (\EOFP STREAM))) (* ; "in RSTRING (RSFLG=T), if we've read something already, then end of file terminates string just like a sepr/break") + (NOT (\EOFP STRM))) (* ; "in RSTRING (RSFLG=T), if we've read something already, then end of file terminates string just like a sepr/break") (GO RS2LP))) FINISH - (AND LASTC (replace (STREAM LASTCCODE) of STREAM with LASTC)) + (AND LASTC (freplace (STREAM LASTCCODE) of STRM with LASTC)) (RETURN (COND ((NOT *READ-SUPPRESS*) (SETQ J (\SMASHSTRING (ALLOCSTRING J NIL NIL FATSEEN) @@ -714,149 +635,134 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (REPLACE ENDOFSTREAMOP OF STREAM WITH OLD-EOS-OP))]) (\SUBREAD - [LAMBDA (STREAM SA READTYPE PNSTR CASEBASE EOF-SUPPRESS EOF-VALUE CHAR PRESERVE-WHITESPACE) - (* ; "Edited 7-Jan-88 18:38 by jds") + [LAMBDA (STRM SA READTYPE PNSTR CASEBASE EOF-SUPPRESS EOF-VALUE CHAR PRESERVE-WHITESPACE) + (* ; "Edited 23-Jun-2021 13:00 by rmk:") - (* ;; "Values of READTYPE are: --- READ.RT for top level of READ, --- NOPROPRB.RT if right-bracket isn't to be propagated -- sublist beginning with left-bracket --- PROPRB.RT if propagation is not suppressed -- sublist beginning with left-paren --- RATOM.RT for call from RATOM") + (* ;; "Values of READTYPE are: --- READ.RT for top level of READ, --- NOPROPRB.RT if right-bracket isn't to be propagated -- sublist beginning with left-bracket --- PROPRB.RT if propagation is not suppressed -- sublist beginning with left-paren --- RATOM.RT for call from RATOM") - (* ;; "PNSTR is an instance of the global resource \PNAMESTRING, acquired in READ and passed on from level to level. It is released during read-macro applications, then reacquired.") + (* ;; "PNSTR is an instance of the global resource \PNAMESTRING, acquired in READ and passed on from level to level. It is released during read-macro applications, then reacquired.") - (* ;; "CASEBASE is base of uppercasearray if read table is case-insensitive.") + (* ;; "CASEBASE is base of uppercasearray if read table is case-insensitive.") - (* ;; "If EOF-SUPPRESS is true, then if we are at end of file we should return EOF-VALUE instead of erroring (we need this because we might actually be sitting before end of file in front of something that reads nothing, e.g., a comment, so caller can't check EOFP itself). Always false on recursive calls.") + (* ;; "If EOF-SUPPRESS is true, then if we are at end of file we should return EOF-VALUE instead of erroring (we need this because we might actually be sitting before end of file in front of something that reads nothing, e.g., a comment, so caller can't check EOFP itself). Always false on recursive calls.") - (* ;; "If CHAR is supplied, it is a character code which, when read (in isolation), should terminate this call to read. Never on when at top-level.") + (* ;; "If CHAR is supplied, it is a character code which, when read (in isolation), should terminate this call to read. Never on when at top-level.") - (* ;; "\RBFLG is propagated for top-level calls, in case they are embedded in read-macros. SKREAD also depends on this.") + (* ;; "\RBFLG is propagated for top-level calls, in case they are embedded in read-macros. SKREAD also depends on this.") - (* ;; - "If PRESERVE-WHITESPACE is true, doesn't throw away the whitespace that terminates the read.") + (* ;; + "If PRESERVE-WHITESPACE is true, doesn't throw away the whitespace that terminates the read.") (DECLARE (USEDFREE *READTABLE* \RBFLG)) - (* ;; "\RDCONC is a macro that adds a new element as specified by its first argument to the current sublist. Its other arguments will be executed instead if we are the top-level call") + (* ;; "\RDCONC is a macro that adds a new element as specified by its first argument to the current sublist. Its other arguments will be executed instead if we are the top-level call") (PROG ((TOPLEVELP (SELECTC READTYPE ((LIST READ.RT RATOM.RT) T) NIL)) - (SHIFTEDCHARSET (UNFOLD (ACCESS-CHARSET STREAM) - 256)) - (PBASE (SELECTQ (SYSTEMTYPE) - (VAX PNSTR) - (ffetch (STRINGP XBASE) of PNSTR))) + (PBASE (ffetch (STRINGP XBASE) of PNSTR)) SNX LST END ELT DOTLOC CH J ESCAPEFLG INVALIDFLG PACKAGE NCOLONS AT-EOF EOF-POSSIBILITY EXTRASEGMENTS LASTC) - (if (AND TOPLEVELP (NOT (\INTERMP STREAM))) + (if (AND TOPLEVELP (NOT (\INTERMP STRM))) then - (* ;; "EOF is allowed to terminate tokens on direct READ calls. Not if reading from terminal, because \FILLBUFFER made sure to put something at the end.") + (* ;; "EOF is allowed to terminate tokens on direct READ calls. Not if reading from terminal, because \FILLBUFFER made sure to put something at the end.") (SETQ EOF-POSSIBILITY T)) NEWTOKEN - (* ;; "Here ready to scan a new token. First skip over separator characters") + (* ;; "Here ready to scan a new token. First skip over separator characters") (SETQ J 0) [SETQ EXTRASEGMENTS (SETQ INVALIDFLG (SETQ ESCAPEFLG (SETQ PACKAGE (SETQ NCOLONS NIL] - (if (AND EOF-SUPPRESS (NULL (SKIPSEPRCODES STREAM))) - then (* ; - "caller specified eof-error-p of NIL. Happens only on top-level calls") - (RETURN EOF-VALUE)) - (SETQ SHIFTEDCHARSET (UNFOLD (ACCESS-CHARSET STREAM) - 256)) (* ; "By Skipping Separator Characters,Happens CHARSET-Mode Exchanging. (Solution of AR#114 in FX, edited by tt [Jan-22-'90])") - (repeatwhile (EQ [SETQ SNX (\SYNCODE SA (SETQ CH (\NSIN STREAM SHIFTEDCHARSET - SHIFTEDCHARSET] + (if (AND EOF-SUPPRESS (NULL (SKIPSEPRCODES STRM))) + then (* ; + "caller specified eof-error-p of NIL. Happens only on top-level calls") + (RETURN EOF-VALUE)) (* ; "By Skipping Separator Characters,Happens CHARSET-Mode Exchanging. (Solution of AR#114 in FX, edited by tt [Jan-22-'90])") + (repeatwhile (EQ [SETQ SNX (\SYNCODE SA (SETQ CH (\INCCODE STRM] SEPRCHAR.RC)) (COND - ((EQ CH CHAR) (* ; - "Read desired terminating char. TOPLEVELP is always false here") - (replace (STREAM LASTCCODE) of STREAM with CH) - (* ; "Save last char for LASTC.") + ((EQ CH CHAR) (* ; + "Read desired terminating char. TOPLEVELP is always false here") + (freplace (STREAM LASTCCODE) of STRM with CH) + (* ; "Save last char for LASTC.") (RETURN LST)) - ((EQ SNX OTHER.RC) (* ; "Start of an atom") + ((EQ SNX OTHER.RC) (* ; "Start of an atom") (COND ([AND (EQ CH (CHARCODE %.)) - (fetch STOPATOM of (\SYNCODE SA (\NSPEEK STREAM SHIFTEDCHARSET - SHIFTEDCHARSET] + (fetch STOPATOM of (\SYNCODE SA (\PEEKCCODE STRM] - (* ;; "An isolated, unescaped dot. This special check on every atom could be eliminated if . had a special SNX code") + (* ;; "An isolated, unescaped dot. This special check on every atom could be eliminated if . had a special SNX code") - (SETQ DOTLOC END) (* ; - "DOTLOC points to CONS cell one before the dot, NIL for car of list, as desired.") + (SETQ DOTLOC END) (* ; + "DOTLOC points to CONS cell one before the dot, NIL for car of list, as desired.") )) (GO GOTATOMCHAR)) - [(fetch STOPATOM of SNX) (* ; - "This character definitely does not start an atom") + [(fetch STOPATOM of SNX) (* ; + "This character definitely does not start an atom") (COND ((EQ READTYPE RATOM.RT) (GO SINGLECHARATOM)) (T (GO BREAK] - ((EQ SNX PACKAGEDELIM.RC) (* ; - "Starting a symbol with a package delimiter -- must be a keyword") + ((EQ SNX PACKAGEDELIM.RC) (* ; + "Starting a symbol with a package delimiter -- must be a keyword") (SETQ NCOLONS 1) (SETQ PACKAGE *KEYWORD-PACKAGE*) (SETQ ESCAPEFLG T) (GO NEXTATOMCHAR)) [(AND (SELECTC (fetch MACROCONTEXT of SNX) (FIRST.RMC T) - (ALONE.RMC (fetch STOPATOM of (\SYNCODE SA (\NSPEEK STREAM - SHIFTEDCHARSET - SHIFTEDCHARSET)))) + (ALONE.RMC (fetch STOPATOM of (\SYNCODE SA (\PEEKCCODE STRM)))) NIL) (fetch READMACROFLG of *READTABLE*)) (COND ((EQ READTYPE RATOM.RT) (GO SINGLECHARATOM)) (T (GO MACRO] - (T (* ; - "Some character that starts an atom but has non-trivial syntax attributes") + (T (* ; + "Some character that starts an atom but has non-trivial syntax attributes") )) ATOMLOOP - (* ;; "At this point, we are accumulating an atom, and CH does not have syntax OTHER, so we have to check special cases") + (* ;; "At this point, we are accumulating an atom, and CH does not have syntax OTHER, so we have to check special cases") (SELECTC SNX - (ESCAPE.RC (* ; - "Take next character to be alphabetic, case exact") + (ESCAPE.RC (* ; + "Take next character to be alphabetic, case exact") (COND ((fetch ESCAPEFLG of *READTABLE*) - (SETQ CH (\CHECKEOLC (\NSIN STREAM SHIFTEDCHARSET SHIFTEDCHARSET) - (ffetch EOLCONVENTION of STREAM) - STREAM)) (* ; - "No EOFP check needed -- it's an error to have escape char with nothing following") + (SETQ CH (\INCHAR STRM)) (* ; + "No EOFP check needed -- it's an error to have escape char with nothing following") (SETQ ESCAPEFLG T) (GO PUTATOMCHAR)))) (MULTIPLE-ESCAPE.RC - (* ;; "Take characters up to next multiple escape to be alphabetic, except that single escape chars still escape the next char") + (* ;; "Take characters up to next multiple escape to be alphabetic, except that single escape chars still escape the next char") (SETQ ESCAPEFLG T) - [bind ESCFLG do (SETQ CH (\CHECKEOLC (\NSIN STREAM SHIFTEDCHARSET - SHIFTEDCHARSET) - (ffetch EOLCONVENTION of STREAM) - STREAM)) + [bind ESCFLG do (SETQ CH (\INCHAR STRM)) (COND ([NOT (COND (ESCFLG (SETQ ESCFLG NIL)) (T (SELECTC (SETQ SNX (\SYNCODE SA CH)) (MULTIPLE-ESCAPE.RC - (* ; - "Finished escaped sequence, resume normal processing") + (* ; + "Finished escaped sequence, resume normal processing") (GO NEXTATOMCHAR)) (ESCAPE.RC - (* ; - "Pass the next char thru verbatim") + (* ; + "Pass the next char thru verbatim") (SETQ ESCFLG T)) NIL] - (* ; - "All others are pname chars, quoted") + (* ; + "All others are pname chars, quoted") (if (NOT *READ-SUPPRESS*) then (COND ((EQ J \PNAMELIMIT) - (* ; - "if there have been escapes, can't be a number, so ok to error now.") + (* ; + "if there have been escapes, can't be a number, so ok to error now.") (LISPERROR "ATOM TOO LONG" (\SUBREADCONCAT EXTRASEGMENTS PBASE J)) @@ -867,34 +773,33 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. GOTATOMCHAR - (* ;; "CH is a vanilla atom char to accumulate") + (* ;; "CH is a vanilla atom char to accumulate") [COND - ((AND CASEBASE (ILEQ CH \MAXTHINCHAR)) (* ; "Uppercase atom characters") + ((AND CASEBASE (ILEQ CH \MAXTHINCHAR)) (* ; "Uppercase atom characters") (SETQ CH (\GETBASEBYTE CASEBASE CH] PUTATOMCHAR (if (NOT *READ-SUPPRESS*) then (COND - ((EQ J \PNAMELIMIT) (* ; "Symbol is too long. However, it could just be a bignum, so keep accumulating characters until we have to do something.") + ((EQ J \PNAMELIMIT) (* ; "Symbol is too long. However, it could just be a bignum, so keep accumulating characters until we have to do something.") (push EXTRASEGMENTS (\SMASHSTRING (ALLOCSTRING J NIL NIL T) 0 PNSTR J)) (SETQ J 0))) (\PNAMESTRINGPUTCHAR PBASE J CH) (add J 1) - (SETQ LASTC CH) (* ; "Save CH for LASTC.")) + (SETQ LASTC CH) (* ; "Save CH for LASTC.")) NEXTATOMCHAR - (if (AND EOF-POSSIBILITY (SETQ AT-EOF (\EOFP STREAM))) - then (* ; - "EOF terminates atoms at top level") + (if (AND EOF-POSSIBILITY (SETQ AT-EOF (\EOFP STRM))) + then (* ; + "EOF terminates atoms at top level") (GO FINISHATOM) - elseif (EQ [SETQ SNX (\SYNCODE SA (SETQ CH (\NSIN STREAM SHIFTEDCHARSET - SHIFTEDCHARSET] + elseif (EQ [SETQ SNX (\SYNCODE SA (SETQ CH (\INCCODE STRM] OTHER.RC) - then (* ; - "normal case tested first--another vanilla constituent char, so keep accumulating atom chars") + then (* ; + "normal case tested first--another vanilla constituent char, so keep accumulating atom chars") (GO GOTATOMCHAR) elseif (fetch STOPATOM of SNX) - then (* ; "Terminates atom") + then (* ; "Terminates atom") (GO FINISHATOM) elseif (EQ SNX PACKAGEDELIM.RC) then (GO GOTPACKAGEDELIM) @@ -902,17 +807,17 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. FINISHATOM - (* ;; - "Come here when an atom has been terminated, either by a break/sepr char or by end of file.") + (* ;; + "Come here when an atom has been terminated, either by a break/sepr char or by end of file.") (if INVALIDFLG - then (replace (STREAM LASTCCODE) of STREAM with (OR LASTC CH 65535)) + then (freplace (STREAM LASTCCODE) of STRM with (OR LASTC CH 65535)) (\INVALID.SYMBOL PBASE J NCOLONS PACKAGE EXTRASEGMENTS)) [SETQ ELT (AND (NOT *READ-SUPPRESS*) (if EXTRASEGMENTS then - (* ;; "More than \PNAMELIMIT chars were read. Can't be a symbol, but might be a number. Pack up all the strings we have into a single string and try to parse it as a number.") + (* ;; "More than \PNAMELIMIT chars were read. Can't be a symbol, but might be a number. Pack up all the strings we have into a single string and try to parse it as a number.") (SETQ EXTRASEGMENTS (\SUBREADCONCAT EXTRASEGMENTS PBASE J)) (OR (AND (NULL (OR PACKAGE ESCAPEFLG NCOLONS)) @@ -925,56 +830,56 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (LISPERROR "ATOM TOO LONG" EXTRASEGMENTS)) else (\READ.SYMBOL PBASE 0 J \FATPNAMESTRINGP PACKAGE (EQ NCOLONS 1) ESCAPEFLG] - (replace (STREAM LASTCCODE) of STREAM with CH) - (* ; "Save last READ char for LASTC.") + (freplace (STREAM LASTCCODE) of STRM with CH) + (* ; "Save last READ char for LASTC.") (if AT-EOF - then (* ; - "top-level read, atom terminated by EOF") + then (* ; + "top-level read, atom terminated by EOF") (RETURN ELT)) (\RDCONC ELT (PROGN (COND ((OR PRESERVE-WHITESPACE (NEQ SNX SEPRCHAR.RC)) - (* ; "At top-level, put back the terminating character if preserving whitespace or terminator is significant") - (replace (STREAM LASTCCODE) of STREAM + (* ; "At top-level, put back the terminating character if preserving whitespace or terminator is significant") + (freplace (STREAM LASTCCODE) of STRM with (OR LASTC CH 65535)) - (* ; - "And LASTC will return the last REAL char read.") - (\BACKNSCHAR STREAM SHIFTEDCHARSET))) + (* ; + "And LASTC will return the last REAL char read.") + (\BACKCCODE STRM))) (RETURN ELT))) (if (EQ SNX SEPRCHAR.RC) - then (* ; - "Terminated with sepr, go on to next char") + then (* ; + "Terminated with sepr, go on to next char") (GO NEWTOKEN) elseif (EQ CH CHAR) - then (* ; "read terminates here") - (replace (STREAM LASTCCODE) of STREAM with CH) + then (* ; "read terminates here") + (freplace (STREAM LASTCCODE) of STRM with CH) (RETURN LST) - else (* ; - "Terminated with break, jump into the break char code") + else (* ; + "Terminated with break, jump into the break char code") (GO BREAK)) GOTPACKAGEDELIM - (* ;; "Come here if CH is a package delimiter. Note that we have already scanned at least one character of the token, so this must be an interior delim") + (* ;; "Come here if CH is a package delimiter. Note that we have already scanned at least one character of the token, so this must be an interior delim") (COND - (*READ-SUPPRESS* (* ; "Don't care about packages")) + (*READ-SUPPRESS* (* ; "Don't care about packages")) [(AND (EQ J 0) (NULL EXTRASEGMENTS)) - (* ;; "No chars accumulated, so must be 2 colons in a row. Note that the case where we've just started scanning a token happens up at NEWTOKEN") + (* ;; "No chars accumulated, so must be 2 colons in a row. Note that the case where we've just started scanning a token happens up at NEWTOKEN") (SETQ LASTC CH) (COND ((AND (EQ NCOLONS 1) - (NEQ PACKAGE *KEYWORD-PACKAGE*)) (* ; - "Two colons in a row means internal symbol") + (NEQ PACKAGE *KEYWORD-PACKAGE*)) (* ; + "Two colons in a row means internal symbol") (SETQ NCOLONS 2)) - (T (* ; - "Error, e.g., `FOO:::BAZ' or `::BAR'") + (T (* ; + "Error, e.g., `FOO:::BAZ' or `::BAR'") (SETQ INVALIDFLG T) (GO GOTATOMCHAR] - ((NULL NCOLONS) (* ; - "We have just scanned the package name") + ((NULL NCOLONS) (* ; + "We have just scanned the package name") (SETQ NCOLONS 1) (SETQ LASTC CH) [SETQ PACKAGE (COND @@ -983,67 +888,67 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. )) (SETQ EXTRASEGMENTS NIL)) ((\FIND.PACKAGE.INTERNAL PBASE 0 J \FATPNAMESTRINGP)) - (T (* ; - "Error, but don't signal yet -- save name as string for benefit of error handlers") + (T (* ; + "Error, but don't signal yet -- save name as string for benefit of error handlers") (\GETBASESTRING PBASE 0 J \FATPNAMESTRINGP] (SETQ J 0)) - (T (* ; - "Have alread seen one or more colons, and have scanned more symbol. This colon is an error.") + (T (* ; + "Have alread seen one or more colons, and have scanned more symbol. This colon is an error.") (SETQ LASTC CH) (SETQ INVALIDFLG T) (GO GOTATOMCHAR))) - (SETQ ESCAPEFLG T) (* ; "Result MUST be a symbol now") + (SETQ ESCAPEFLG T) (* ; "Result MUST be a symbol now") (GO NEXTATOMCHAR) SINGLECHARATOM - (* ;; "Come here to create a symbol whose single character is CH -- no package stuff to worry about. This happens mainly for RATOM. We create the single char atom in IL for backward compatibility.") + (* ;; "Come here to create a symbol whose single character is CH -- no package stuff to worry about. This happens mainly for RATOM. We create the single char atom in IL for backward compatibility.") (\PNAMESTRINGPUTCHAR PBASE 0 CH) (SETQ ELT (\READ.SYMBOL PBASE 0 1 \FATPNAMESTRINGP *INTERLISP-PACKAGE*)) - (replace (STREAM LASTCCODE) of STREAM with CH) + (freplace (STREAM LASTCCODE) of STRM with CH) (\RDCONC ELT (RETURN ELT)) (GO NEWTOKEN) - (* ;; "End of atom scanning code") + (* ;; "End of atom scanning code") BREAK - (* ;; "At this point, we have just read a break character, stored in CH") + (* ;; "At this point, we have just read a break character, stored in CH") - (replace (STREAM LASTCCODE) of STREAM with CH) + (freplace (STREAM LASTCCODE) of STRM with CH) [SELECTC SNX (LEFTPAREN.RC - (* ;; "recursively read a list. If that list (or any of it's non-bracketed sublists) is terminated by a right bracket it terminates our read as well. PROPRB macro worries about right-bracket propagation: if the subread encounters a right bracket (sets \RBFLG), PROPRB returns true. In addition, if we were not called by a left-bracket (READTYPE = NOPROPRB.RT) it sets \RBFLG in caller, thereby propagating the bracket upward.") + (* ;; "recursively read a list. If that list (or any of it's non-bracketed sublists) is terminated by a right bracket it terminates our read as well. PROPRB macro worries about right-bracket propagation: if the subread encounters a right bracket (sets \RBFLG), PROPRB returns true. In addition, if we were not called by a left-bracket (READTYPE = NOPROPRB.RT) it sets \RBFLG in caller, thereby propagating the bracket upward.") (COND - ((PROG1 (PROPRB (SETQ ELT (\SUBREAD STREAM SA PROPRB.RT PNSTR + ((PROG1 (PROPRB (SETQ ELT (\SUBREAD STRM SA PROPRB.RT PNSTR CASEBASE))) (\RDCONC ELT (RETURN ELT))) - (* ;; "PROG1 is true if the subread encountered a right bracket") + (* ;; "PROG1 is true if the subread encountered a right bracket") - (FIXDOT) (* ; "Fix dotted pair if necessary") + (FIXDOT) (* ; "Fix dotted pair if necessary") (RETURN LST)))) (LEFTBRACKET.RC - (* ;; "recursively read a list, terminated by either right paren or right bracket. In this case, right bracket is not propagated upward--we continue reading elements after it.") + (* ;; "recursively read a list, terminated by either right paren or right bracket. In this case, right bracket is not propagated upward--we continue reading elements after it.") - (SETQ ELT (\SUBREAD STREAM SA NOPROPRB.RT PNSTR CASEBASE)) + (SETQ ELT (\SUBREAD STRM SA NOPROPRB.RT PNSTR CASEBASE)) (\RDCONC ELT (RETURN ELT))) ((LIST RIGHTPAREN.RC RIGHTBRACKET.RC) - (* ;; "Terminate one or more lists, return what we have accumulated so far. In the case of Right bracket, if caller did not have the matching left bracket, we have to allow the bracket to close more than one list.") + (* ;; "Terminate one or more lists, return what we have accumulated so far. In the case of Right bracket, if caller did not have the matching left bracket, we have to allow the bracket to close more than one list.") (RETURN (COND (TOPLEVELP - (* ;; "Naked right paren/bracket returns NIL. This is sort of bogus in common lisp, but changing it would be a significant change to Interlisp folks.") + (* ;; "Naked right paren/bracket returns NIL. This is sort of bogus in common lisp, but changing it would be a significant change to Interlisp folks.") NIL) (CHAR - (* ;; "call from READ-DELIMITED-LIST doesn't want to terminate this way. Could read as NIL and not terminate, but seems best to error.") + (* ;; "call from READ-DELIMITED-LIST doesn't want to terminate this way. Could read as NIL and not terminate, but seems best to error.") (CL:ERROR "Unmatched ~A encountered while reading to a ~A" (CL:CODE-CHAR CH) @@ -1055,15 +960,15 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (SETQ \RBFLG T)) LST)))) (STRINGDELIM.RC - (* ;; "Invoke string reader") + (* ;; "Invoke string reader") - (SETQ ELT (\RSTRING2 STREAM SA NIL PNSTR)) + (SETQ ELT (\RSTRING2 STRM SA NIL PNSTR)) (\RDCONC ELT (RETURN ELT))) (COND ((OR (EQ SNX BREAKCHAR.RC) (NOT (fetch READMACROFLG of *READTABLE*))) - (* ; - "A breakchar or a disabled always macro") + (* ; + "A breakchar or a disabled always macro") (GO SINGLECHARATOM)) (T (GO MACRO] (GO NEWTOKEN) @@ -1072,63 +977,63 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (MACRO (COND ((PROG1 (PROPRB [SETQ ELT (RELEASERESOURCE \PNAMESTRING PNSTR (CL:MULTIPLE-VALUE-LIST (\APPLYREADMACRO - STREAM SNX] - (* ; - "Ignore right-bracket if macro is called at top-level read") + STRM SNX] + (* ; + "Ignore right-bracket if macro is called at top-level read") ) [COND - ((NULL ELT) (* ; - "Macro returned zero values, read as nothing") + ((NULL ELT) (* ; + "Macro returned zero values, read as nothing") ) (T (SETQ ELT (CAR ELT)) (\RDCONC ELT (RETURN ELT]) - (FIXDOT) (* ; - "Encountered right bracket if we get here -- return what we have") + (FIXDOT) (* ; + "Encountered right bracket if we get here -- return what we have") (RETURN LST)))) (INFIX - (* ;; "We give macro TCONC list of what we've accumulated so far--it gets to modify it as it pleases and return it. We continue from there.") + (* ;; "We give macro TCONC list of what we've accumulated so far--it gets to modify it as it pleases and return it. We continue from there.") (COND ((PROG1 [PROPRB (SETQ ELT (RELEASERESOURCE \PNAMESTRING PNSTR - (\APPLYREADMACRO STREAM SNX + (\APPLYREADMACRO STRM SNX (AND LST (CONS LST END] [COND - [TOPLEVELP (* ; - "What does INFIX mean at top level?? See IRM") + [TOPLEVELP (* ; + "What does INFIX mean at top level?? See IRM") (COND ((AND (LISTP ELT) - (CDR ELT)) (* ; - "Result is in TCONC format, so it's returnable") + (CDR ELT)) (* ; + "Result is in TCONC format, so it's returnable") (RETURN (COND ((EQ (CDR ELT) (CAR ELT)) - (* ; "TCONC list of one element--return the element. This is how INFIX top level macro can return a non-list. ") + (* ; "TCONC list of one element--return the element. This is how INFIX top level macro can return a non-list. ") (CAAR ELT)) (T (CAR ELT] - (T (* ; - "Reading sublist. Take apart TCONC list and continue.") + (T (* ; + "Reading sublist. Take apart TCONC list and continue.") (SETQ LST (CAR ELT)) (SETQ END (CDR ELT]) - (FIXDOT) (* ; - "Macro hit right bracket if we got to here") + (FIXDOT) (* ; + "Macro hit right bracket if we got to here") (RETURN LST)))) (SPLICE - (* ;; "Macro returns arbitrary number of values to be spliced inline.") + (* ;; "Macro returns arbitrary number of values to be spliced inline.") [RBCONTEXT (SETQ ELT (RELEASERESOURCE \PNAMESTRING PNSTR (\APPLYREADMACRO - STREAM SNX] - (* ; - "Note: we don't care if there was terminating right-bracket") - (* ; "Why? -bvm") + STRM SNX] + (* ; + "Note: we don't care if there was terminating right-bracket") + (* ; "Why? -bvm") (COND ((OR (NULL ELT) TOPLEVELP) - (* ;; "On the 10, it actually returns ELT if it is a list and the next token is a closing paren or bracket. Hard to see how to get that behavior--rmk") + (* ;; "On the 10, it actually returns ELT if it is a list and the next token is a closing paren or bracket. Hard to see how to get that behavior--rmk") (GO NEWTOKEN)) - ((NLISTP ELT) (* ; - "The 10 throws initial non-lists away (What if LST/END aren't set?)") + ((NLISTP ELT) (* ; + "The 10 throws initial non-lists away (What if LST/END aren't set?)") (SETQ ELT (AND LST (LIST '%. ELT))) (SETQ DOTLOC END))) [COND @@ -1138,7 +1043,7 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (T (SETQ LST ELT))) (SETQ END (LAST ELT)) (COND - ((CDR END) (* ; "A dotted pair") + ((CDR END) (* ; "A dotted pair") (SETQ DOTLOC END) (RPLACD END (CONS '%. (SETQ END (CONS (CDR END]) (SHOULDNT)) @@ -1212,6 +1117,56 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. TEM) (RELSTK TEM) (RETURN \READDEPTH]) + +(\CHECKEOLC.CRLF + [LAMBDA (STREAM PEEKBINFLG BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 23-Jun-2021 13:08 by rmk:") + + (* ;; "This is called only when a CR has been read and EOLC is either any or CRLF. This returns EOL if the next code is an LF") + + (* ;; "If BYTECOUNTVAR, decrements that free variable by the number of bytes read.") + + (LET (CH (NUM 0)) + [SETQ CH (COND + [PEEKBINFLG + + (* ;; + "T from PEEKC. In this case, must leave the fileptr where it was.") + + (* ;; "The CR itself hasn't been read, just peeked. So here we have to read it, then peek at the next character to see if it is an LF, and then back out the CR") + + (COND + ([EQ (CHARCODE LF) + (UNINTERRUPTABLY + + (* ;; " Since we are going to \BACKCCODE back the peeked character, we don't need to update the counter variable") + + (\INCCODE STREAM) + (PROG1 (\PEEKCCODE STREAM T 'NOEOLC) + + (* ;; + "This has to be a call to \PEEKCODE that doesn't itself to the checkeolc") + + (* ;; + "LF must be the next char after the CR. We back up over the CR that \INCCODE just read.") + + (\BACKCCODE STREAM)))] + + (* ;; "Got the CRLF, it's an EOL") + + (CHARCODE EOL)) + (T (CHARCODE CR] + ((EQ (CHARCODE LF) + (\PEEKCCODE STREAM T 'NOEOLC)) + + (* ;; "Since we aren't peeking, the CR has actually been read, and we are entitled to read the LF that we just peeked at.") + + (\INCCODE STREAM BYTECOUNTVAR BYTECOUNTVAL) + (CHARCODE EOL)) + (T (CHARCODE CR] + (CL:WHEN BYTECOUNTVAR + (SET BYTECOUNTVAR (IDIFFERENCE (OR BYTECOUNTVAL (\EVALV1 BYTECOUNTVAR)) + NUM))) + CH]) ) (DECLARE%: DONTEVAL@LOAD DOCOPY @@ -1604,7 +1559,8 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. ("Linefeed" 10) ("LF" 10))) -(RPAQQ CHARACTERSETNAMES (("Greek" 38) +(RPAQQ CHARACTERSETNAMES ((Meta 1) + ("Greek" 38) ("Cyrillic" 39) ("Hira" 36) ("Hiragana" 36) @@ -1679,141 +1635,6 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (SETQ END (SETQ LST (CONS ELT]) ) -(* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE - -(PUTPROPS \BACKCHAR MACRO (OPENLAMBDA (STREAM) (* ; "Backs up over an NS character") - (\BACKNSCHAR STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256)))) - -(PUTPROPS \BACKNSCHAR MACRO [(ST SHIFTEDCHARSET COUNTERVAR) - (COND - ((\XCCSP ST) - (\BACKXCCSCHAR ST SHIFTEDCHARSET COUNTERVAR)) - (T (COND - ['COUNTERVAR (SETQ COUNTERVAR - (IDIFFERENCE COUNTERVAR - (CL:FUNCALL (ffetch - (STREAM BACKCHARFN) - of ST) - ST T] - (T (CL:FUNCALL (ffetch (STREAM BACKCHARFN) - of ST) - ST NIL]) - -(PUTPROPS \CHECKEOLC MACRO - (OPENLAMBDA (CH EOLC STREAM PEEKBINFLG COUNTERVAR) - - (* ;; "Subtracts number of bytes read from COUNTERVAR, which may be NIL. In fact, should be NIL if PEEKBINFLG is T.") - - (SELCHARQ CH - (CR (SELECTC EOLC - (CR.EOLC (CHARCODE EOL)) - (CRLF.EOLC (COND - [PEEKBINFLG - - (* ;; "T from PEEKC, compile-time constant. In this case, must leave the fileptr where it was, except for possibly advancing over character set shifts") - - (COND - ([EQ (CHARCODE LF) - (UNINTERRUPTABLY - (\NSIN STREAM (UNFOLD (ACCESS-CHARSET - STREAM) - 256)) - - (* ;; "Read the NS CR. We know that there aren't any font-shift characters in front of the CR, because they would have already been read by the \NSPEEK that got the CR character. Since we are going to NS back the CR character, we don't need to update the counter variable") - - (PROG1 (\PEEKBIN STREAM T) - - (* ;; "LF must be in next BYTE after NS CR, regardless of coding. Character-set shifting bytes can't intervene. Then we back up over the CR that was \NSINed above.") - - (\BACKNSCHAR STREAM)))] - (CHARCODE EOL)) - (T (CHARCODE CR] - ((EQ (CHARCODE LF) - (\PEEKBIN STREAM T)) - (\BIN STREAM) - (AND 'COUNTERVAR (SETQ COUNTERVAR (SUB1 COUNTERVAR))) - (CHARCODE EOL)) - (T (CHARCODE CR)))) - (CHARCODE CR))) - (LF (COND - ((EQ EOLC LF.EOLC) - (CHARCODE EOL)) - (T (CHARCODE LF)))) - CH))) - -(PUTPROPS \INCHAR MACRO (OPENLAMBDA (STREAM COUNTERVAR) - (* ; "returns a 16 bit character code") - (\CHECKEOLC (\NSIN STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256) - NIL COUNTERVAR) - (FFETCH EOLCONVENTION OF STREAM) - STREAM NIL COUNTERVAR))) - -(PUTPROPS \INCCODE MACRO (OPENLAMBDA (STREAM COUNTERVAR) - (* ; "returns a 16 bit character code") - (\CHECKEOLC (\NSIN STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256) - NIL COUNTERVAR) - (ffetch EOLCONVENTION of STREAM) - STREAM NIL COUNTERVAR))) - -(PUTPROPS \PEEKCCODE MACRO (OPENLAMBDA (STREAM NOERROR) - (\CHECKEOLC (\NSPEEK STREAM (UNFOLD (ACCESS-CHARSET STREAM) - 256) - NIL NOERROR) - (ffetch EOLCONVENTION of STREAM) - STREAM T))) - -(PUTPROPS \NSIN MACRO [(ST SHIFTEDCSET SHIFTEDCSETVAR COUNTERVAR) - -(* ;;; "Dispatches to the appropriate character code decoder. If you want to support a new character encoding format, you have to write a decoder and add it here.") - - (COND - ((\XCCSP ST) - (\XCCSIN ST SHIFTEDCSET SHIFTEDCSETVAR COUNTERVAR)) - (T (COND - ('COUNTERVAR (CL:MULTIPLE-VALUE-BIND - (CODE NUM) - (CL:FUNCALL (ffetch (STREAM INCCODEFN) - of ST) - ST T) - (AND NUM (SETQ COUNTERVAR (IDIFFERENCE - COUNTERVAR NUM - ))) - CODE)) - (T (CL:FUNCALL (ffetch (STREAM INCCODEFN) of ST) - ST NIL]) - -(PUTPROPS \NSPEEK MACRO [(ST SHIFTEDCSET SHIFTEDCSETVAR NOERROR COUNTERVAR) - -(* ;;; "Dispatches to the appropriate character code decoder. If you want to support a new character encoding format, you have to write a decoder and add it here.") - - (COND - ((\XCCSP ST) - (\XCCSPEEK ST (UNFOLD (ACCESS-CHARSET ST) - 256) - NIL NOERROR)) - (T (COND - ('COUNTERVAR (CL:MULTIPLE-VALUE-BIND - (CODE NUM) - (CL:FUNCALL (ffetch (STREAM PEEKCCODEFN) - of ST) - ST NOERROR T) - (AND NUM (SETQ COUNTERVAR (IDIFFERENCE - COUNTERVAR - NUM))) - CODE)) - (T (CL:FUNCALL (ffetch (STREAM PEEKCCODEFN) - of ST) - ST NOERROR NIL]) - -(PUTPROPS NUMERIC-CHARSET MACRO (= . ACCESS-CHARSET)) -) - -(* "END EXPORTED DEFINITIONS") - - (DECLARE%: DOEVAL@COMPILE DONTCOPY (SPECVARS *READ-NEWLINE-SUPPRESS* \RefillBufferFn) @@ -1827,399 +1648,120 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. -(* ; "Support for various external formats") - - - - -(* ; "JIS to XCCS conversion table.") - - -(RPAQQ *JIS-TO-XCCS-CONV-NO-FONT-TABLE* - ((8484 . 8484) - (8485 . 8485) - (8497 . 9155) - (8798 . 61376) - (8802 . 8802) - (8805 . 64892) - (8806 . 64894) - (8820 . 9148) - (8821 . 9132) - (8822 . 213) - (8830 . 8830) - (10273 . 61189) - (10274 . 61188) - (10275 . 10275) - (10276 . 10276) - (10277 . 10277) - (10278 . 10278) - (10279 . 10279) - (10280 . 10280) - (10281 . 10281) - (10282 . 10282) - (10283 . 61414) - (10284 . 61410) - (10285 . 61409) - (10286 . 10286) - (10287 . 10287) - (10288 . 10288) - (10289 . 10289) - (10290 . 10290) - (10291 . 10291) - (10292 . 10292) - (10293 . 10293) - (10294 . 61411) - (10295 . 10295) - (10296 . 10296) - (10297 . 10297) - (10298 . 10298) - (10299 . 10299) - (10300 . 10300) - (10301 . 10301) - (10302 . 10302) - (10303 . 10303) - (10304 . 10304))) - -(RPAQQ *JIS-TO-XCCS-CODE-MAP* - ((1 (1 33 . 33) - (2 33 . 34) - (3 33 . 35) - (6 0 . 183) - (7 0 . 58) - (8 0 . 59) - (9 0 . 63) - (10 0 . 33) - (11 33 . 43) - (12 33 . 44) - (13 0 . 194) - (14 0 . 193) - (15 0 . 200) - (16 0 . 195) - (18 0 . 204) - (19 33 . 51) - (20 33 . 52) - (21 33 . 53) - (22 33 . 54) - (23 33 . 55) - (24 33 . 56) - (25 33 . 57) - (26 33 . 58) - (27 33 . 59) - (28 33 . 60) - (29 239 . 36) - (30 33 . 62) - (31 0 . 47) - (32 0 . 92) - (33 0 . 126) - (34 33 . 66) - (35 0 . 124) - (36 33 . 68) - (37 33 . 69) - (38 0 . 169) - (39 0 . 39) - (40 0 . 170) - (41 0 . 186) - (42 0 . 40) - (43 0 . 41) - (44 33 . 76) - (45 33 . 77) - (46 0 . 91) - (47 0 . 93) - (48 0 . 123) - (49 0 . 125) - (50 239 . 50) - (51 239 . 51) - (52 0 . 171) - (53 0 . 187) - (54 33 . 86) - (55 33 . 87) - (56 33 . 88) - (57 33 . 89) - (58 33 . 90) - (59 33 . 91) - (60 0 . 43) - (61 0 . 45) - (62 0 . 177) - (63 0 . 180) - (64 0 . 184) - (65 0 . 61) - (66 33 . 98) - (67 0 . 60) - (68 0 . 62) - (69 33 . 101) - (70 33 . 102) - (71 33 . 103) - (72 33 . 104) - (73 33 . 105) - (74 33 . 106) - (75 0 . 176) - (76 33 . 108) - (77 33 . 109) - (78 33 . 110) - (79 0 . 165) - (80 0 . 164) - (81 0 . 162) - (82 0 . 163) - (83 0 . 37) - (84 0 . 35) - (85 0 . 38) - (86 0 . 42) - (87 0 . 64) - (88 0 . 167) - (89 33 . 121) - (90 33 . 122) - (91 33 . 123) - (92 33 . 124) - (93 33 . 125) - (94 33 . 126)) - (2 (1 34 . 33) - (2 34 . 34) - (3 34 . 35) - (4 34 . 36) - (5 34 . 37) - (6 34 . 38) - (7 34 . 39) - (8 34 . 40) - (9 34 . 41) - (10 0 . 174) - (11 0 . 172) - (12 0 . 173) - (13 0 . 175) - (14 34 . 46) - (26 239 . 74) - (27 239 . 76) - (28 239 . 89) - (29 239 . 88) - (30 239 . 91) - (31 239 . 90) - (32 239 . 87) - (33 239 . 86) - (42 239 . 182) - (43 239 . 183) - (44 239 . 106) - (45 239 . 79) - (46 239 . 78) - (47 239 . 181) - (48 239 . 180) - (60 239 . 108) - (61 239 . 112) - (63 239 . 186) - (64 239 . 185) - (65 239 . 114) - (67 239 . 66) - (68 239 . 67) - (71 239 . 113) - (72 239 . 111) - (73 239 . 117) - (74 34 . 106) - (82 241 . 40) - (83 239 . 65) - (87 239 . 48) - (88 239 . 49) - (89 0 . 176)) - (6 (1 38 . 65) - (2 38 . 66) - (3 38 . 68) - (4 38 . 69) - (5 38 . 70) - (6 38 . 73) - (7 38 . 74) - (8 38 . 75) - (9 38 . 76) - (10 38 . 77) - (11 38 . 78) - (12 38 . 79) - (13 38 . 80) - (14 38 . 81) - (15 38 . 82) - (16 38 . 83) - (17 38 . 85) - (18 38 . 86) - (19 38 . 88) - (20 38 . 89) - (21 38 . 90) - (22 38 . 91) - (23 38 . 92) - (24 38 . 93) - (33 38 . 97) - (34 38 . 98) - (35 38 . 100) - (36 38 . 101) - (37 38 . 102) - (38 38 . 105) - (39 38 . 106) - (40 38 . 107) - (41 38 . 108) - (42 38 . 109) - (43 38 . 110) - (44 38 . 111) - (45 38 . 112) - (46 38 . 113) - (47 38 . 114) - (48 38 . 115) - (49 38 . 117) - (50 38 . 118) - (51 38 . 120) - (52 38 . 121) - (53 38 . 122) - (54 38 . 123) - (55 38 . 124) - (56 38 . 125)))) - -(RPAQQ *HANKAKU-TO-ZENKAKU-CODE-MAP* - ((161 . 8483) - (162 . 8534) - (163 . 8535) - (164 . 8482) - (165 . 183) - (166 . 9586) - (167 . 9505) - (168 . 9507) - (169 . 9509) - (170 . 9511) - (171 . 9513) - (172 . 9571) - (173 . 9573) - (174 . 9575) - (175 . 9539) - (176 . 8508) - (177 . 9506) - (178 . 9508) - (179 . 9510) - (180 . 9512) - (181 . 9514) - (182 . 9515) - (183 . 9517) - (184 . 9519) - (185 . 9521) - (186 . 9523) - (187 . 9525) - (188 . 9527) - (189 . 9529) - (190 . 9531) - (191 . 9533) - (192 . 9535) - (193 . 9537) - (194 . 9540) - (195 . 9542) - (196 . 9544) - (197 . 9546) - (198 . 9547) - (199 . 9548) - (200 . 9549) - (201 . 9550) - (202 . 9551) - (203 . 9554) - (204 . 9557) - (205 . 9560) - (206 . 9563) - (207 . 9566) - (208 . 9567) - (209 . 9568) - (210 . 9569) - (211 . 9570) - (212 . 9572) - (213 . 9574) - (214 . 9576) - (215 . 9577) - (216 . 9578) - (217 . 9579) - (218 . 9580) - (219 . 9581) - (220 . 9583) - (221 . 9587) - (222 . 8491) - (223 . 8492))) -(DECLARE%: DOEVAL@COMPILE DONTCOPY +(* ;; "Generic functions not compiled open") -(GLOBALVARS *JIS-TO-XCCS-CONV-NO-FONT-TABLE* *JIS-TO-XCCS-CONV-TABLE-LIST* *JIS-TO-XCCS-CODE-MAP* - *HANKAKU-TO-ZENKAKU-CODE-MAP* *JIS-1KU-TO-XCCS-CONV-TABLE* *JIS-2KU-TO-XCCS-CONV-TABLE* - *JIS-6KU-TO-XCCS-CONV-TABLE* *XCCS-TO-JIS-CONV-TABLE* *HANKAKU-TO-ZENKAKU-CONV-TABLE* - *ZENKAKU-TO-HANKAKU-CONV-TABLE*) -) (DEFINEQ -(\MAKE.JIS.TO.XCCS.CONV.TABLE - [LAMBDA NIL (* ; "Edited 20-Feb-91 19:28 by nm") - -(* ;;; "The JIS codes which are not equivalent to XCCS reside in 1, 2, 3, 6, 8 and 84 KU. In case of 3 and 84 KU, the corresponding XCCS is calicutated from JIS. In case of 1,2 and 6 KU, we have to prepare conversion tables for each because the mapping between XCCS and JIS are random. 8 KU is treated specially because no displayable font is assigned for 8 KU in XCCS. They are handled with *JIS-TO-XCCS-CONV-NO-FONT-TABLE*.") - -(* ;;; "Each conversion table is an byte array of size 188 (94 * 2). 94 is a largest number of TEN. TEN is one origin. Each JIS code is represented with two bytes in the table. The first byte is a character set and the second byte is a character code in XCCS. If both of the first byte and the second byte are 255, it means the JIS code is not defined for the entry. If the first byte is 255 and the second byte is 0, it means a JIS code is defined for the entry and there is a XCCS code corresponding to the JIS code, but no displayable font is assigned for the code in XCCS. In the last case, the real XCCS code is found in *JIS-TO-XCCS-CONV-NO-FONT-TABLE*.") - -(* ;;; "*HANKAKU-TO-ZENKAKU-CONV-TABLE* holds the mapping between JIS HANAKAKU-KANA code to XCCS. XCCS does not support HANKAKU code.") - - (SETQ *JIS-1KU-TO-XCCS-CONV-TABLE* (ARRAY 188 'BYTE 255)) - (SETQ *JIS-2KU-TO-XCCS-CONV-TABLE* (ARRAY 188 'BYTE 255)) - (SETQ *JIS-6KU-TO-XCCS-CONV-TABLE* (ARRAY 188 'BYTE 255)) - (SETQ *XCCS-TO-JIS-CONV-TABLE* (HASHARRAY 256)) - (SETQ *HANKAKU-TO-ZENKAKU-CONV-TABLE* (HASHARRAY 64)) - (SETQ *ZENKAKU-TO-HANKAKU-CONV-TABLE* (HASHARRAY 64)) - (CL:DO ((TABLES (LIST *JIS-1KU-TO-XCCS-CONV-TABLE* *JIS-2KU-TO-XCCS-CONV-TABLE* - *JIS-6KU-TO-XCCS-CONV-TABLE*) - (CDR TABLES)) - (KU '(1 2 6) - (CDR KU)) - CODEMAP) - ((CL:ENDP TABLES)) - (SETQ CODEMAP (CDR (ASSOC (CAR KU) - *JIS-TO-XCCS-CODE-MAP*))) - (for MAP in CODEMAP do (SETA (CAR TABLES) - (IDIFFERENCE (UNFOLD (CAR MAP) - 2) - 1) - (CADR MAP)) - (SETA (CAR TABLES) - (UNFOLD (CAR MAP) - 2) - (CDDR MAP)))) - (bind KU TEN TABLE for ENTRY in *JIS-TO-XCCS-CONV-NO-FONT-TABLE* - do (SETQ KU (IDIFFERENCE (FOLDLO (CAR ENTRY) - 256) - 32)) - (SETQ TABLE (SELECTQ KU - (1 *JIS-1KU-TO-XCCS-CONV-TABLE*) - (2 *JIS-2KU-TO-XCCS-CONV-TABLE*) - (6 *JIS-6KU-TO-XCCS-CONV-TABLE*) - NIL)) - (AND TABLE (SETA TABLE (UNFOLD (IDIFFERENCE (LOGAND 255 (CAR ENTRY)) - 32) - 2) - 0))) - (for MAP in *HANKAKU-TO-ZENKAKU-CODE-MAP* do (PUTHASH (CAR MAP) - (CDR MAP) - *HANKAKU-TO-ZENKAKU-CONV-TABLE*)) - (for MAP in *HANKAKU-TO-ZENKAKU-CODE-MAP* do (PUTHASH (CDR MAP) - (CAR MAP) - *ZENKAKU-TO-HANKAKU-CONV-TABLE*)) - (for MAP - in (APPEND [for KU in *JIS-TO-XCCS-CODE-MAP* - join (for TEN in (CDR KU) - collect `(,(LOGOR (UNFOLD (CADR TEN) - 256) - (CDDR TEN)) - \, - (LOGOR (UNFOLD (IPLUS (CAR KU) - 32) - 256) - (IPLUS (CAR TEN) - 32] - *JIS-TO-XCCS-CONV-NO-FONT-TABLE*) do (PUTHASH (CAR MAP) - (CDR MAP) - *XCCS-TO-JIS-CONV-TABLE*)) - (SETQ *JIS-TO-XCCS-CONV-TABLE-LIST* `((33 \, *JIS-1KU-TO-XCCS-CONV-TABLE*) - (34 \, *JIS-2KU-TO-XCCS-CONV-TABLE*) - (38 \, *JIS-6KU-TO-XCCS-CONV-TABLE*]) +(\OUTCHAR + [LAMBDA (STREAM CODE) (* ; "Edited 14-Jun-2021 16:20 by rmk:") + + (* ;; "We can't do the EOL stuff here because we don't know whether BOUTs are legit. We have to pass the EOL character to the stream's function") + + (CL:FUNCALL (OR (ffetch (STREAM OUTCHARFN) of STREAM) + \DEFAULTOUTCHAR) + STREAM CODE]) + +(\INCCODE [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 10:23 by rmk:") (* ;; "Calling functions pass the name of the BYTECOUNTVAR, or NIL. If non-NIL, implementing functions are required to") (* ;; " (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAR num-bytes-read))") (* ;; "Caller must bind BYTECOUNTVAR as a SPECVAR. BYTECOUNTVAL can be passed as the current value of BYTECOUNTVAR, to save a call to EVAL.") (CL:FUNCALL (OR (ffetch (STREAM INCCODEFN) of STREAM) \DEFAULTINCCODE) STREAM BYTECOUNTVAR (AND BYTECOUNTVAR (OR BYTECOUNTVAL (\EVALV1 BYTECOUNTVAR]) + +(\BACKCCODE + [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 23-Jun-2021 14:49 by rmk:") + (CL:FUNCALL (OR (ffetch (STREAM BACKCCODEFN) of STREAM) + \DEFAULTBACKCCODE) + STREAM BYTECOUNTVAR (AND BYTECOUNTVAR (\EVALV1 BYTECOUNTVAR]) + +(\PEEKCCODE + [LAMBDA (STREAM NOERROR EOL) (* ; "Edited 14-Jun-2021 12:40 by rmk:") + (\CHECKEOLC (CL:FUNCALL (OR (ffetch (STREAM PEEKCCODEFN) of STREAM) + \DEFAULTPEEKCCODE) + STREAM NOERROR) + EOL STREAM T]) + +(\PEEKCCODE.NOEOLC + [LAMBDA (STREAM NOERROR) (* ; "Edited 27-Jun-2021 23:26 by rmk:") + (CL:FUNCALL (OR (ffetch (STREAM PEEKCCODEFN) of STREAM) + \DEFAULTPEEKCCODE) + STREAM NOERROR]) + +(\INCHAR + [LAMBDA (STREAM BYTECOUNTVAR EOLC BYTECOUNTVAL) (* ; "Edited 22-Jun-2021 10:48 by rmk:") + + (* ;; "EOL conversion around essentially what \INCCODE does, without the extra function call.") + + (* ;; " EOLC of NIL means all patterns go to EOL") + + (CL:WHEN BYTECOUNTVAR + (OR BYTECOUNTVAL (SETQ BYTECOUNTVAL (\EVALV1 BYTECOUNTVAR)))) + (\CHECKEOLC (CL:FUNCALL (OR (ffetch (STREAM INCCODEFN) of STREAM) + \DEFAULTINCCODE) + STREAM BYTECOUNTVAR BYTECOUNTVAL) + (OR EOLC (FFETCH (STREAM EOLCONVENTION) OF STREAM)) + STREAM NIL BYTECOUNTVAR BYTECOUNTVAL]) + +(\INCCODE.EOLC + [LAMBDA (STREAM BYTECOUNTVAR EOLC BYTECOUNTVAL) (* ; "Edited 22-Jun-2021 10:48 by rmk:") + + (* ;; "EOL conversion around essentially what \INCCODE does, without the extra function call.") + + (* ;; " EOLC of NIL means all patterns go to EOL") + + (CL:WHEN BYTECOUNTVAR + (OR BYTECOUNTVAL (SETQ BYTECOUNTVAL (\EVALV1 BYTECOUNTVAR)))) + (\CHECKEOLC (CL:FUNCALL (OR (ffetch (STREAM INCCODEFN) of STREAM) + \DEFAULTINCCODE) + STREAM BYTECOUNTVAR BYTECOUNTVAL) + (OR EOLC (FFETCH (STREAM EOLCONVENTION) OF STREAM)) + STREAM NIL BYTECOUNTVAR BYTECOUNTVAL]) + +(\FORMATBYTESTREAM + [LAMBDA (STREAM BYTESTREAM) (* ; "Edited 24-Jun-2021 17:26 by rmk:") + + (* ;; "Create or modify a stream that will simulate the current character input/output byte sequences of STREAM. The set up here does what is common to all formats: an IO stream starting with STREAM external format and EOL.") + + (* ;; "If the format has its own FORMATBYTESTREAMFN function, that is applied to copy any other state. (Currently that function is a property of the format, not carried over into a stream field that can be changed dynamically.)") + + (CL:UNLESS (AND (STREAMP BYTESTREAM) + (\IOMODEP STREAM 'BOTH)) + (SETQ BYTESTREAM (OPENSTREAM '{NODIRCORE} 'BOTH))) + (LET ((FORMAT (FETCH (STREAM EXTERNALFORMAT) OF STREAM)) + (EOLC (FETCH (STREAM EOLCONVENTION) OF STREAM))) + (\EXTERNALFORMAT BYTESTREAM FORMAT) + (CL:WHEN (EQ EOLC ANY.EOLC) + (SETQ EOLC (OR (FETCH (EXTERNALFORMAT EOL) OF FORMAT) + LF.EOLC))) + (REPLACE (STREAM EOLCONVENTION) OF BYTESTREAM WITH EOLC) + (SETFILEPTR BYTESTREAM 0) + (SETFILEINFO BYTESTREAM 'ENDOFSTREAMOP (FUNCTION NILL)) + (CL:WHEN (FETCH (EXTERNALFORMAT FORMATBYTESTREAMFN) OF FORMAT) + (APPLY* (FETCH (EXTERNALFORMAT FORMATBYTESTREAMFN) OF FORMAT) + STREAM BYTESTREAM)) + BYTESTREAM]) ) -(DECLARE%: DONTEVAL@LOAD DOCOPY +(DECLARE%: EVAL@COMPILE -(\MAKE.JIS.TO.XCCS.CONV.TABLE) +(PUTPROPS \CHECKEOLC MACRO [OPENLAMBDA (CH EOLC STRM PEEKBINFLG BYTECOUNTVAR BYTECOUNTVAL) + (COND + ((EQ EOLC 'NOEOLC) + CH) + (T (SELCHARQ CH + (LF (SELECTC (OR EOLC (FFETCH (STREAM + EOLCONVENTION + ) + OF STRM)) + ((LIST LF.EOLC ANY.EOLC) + (CHARCODE EOL)) + (CHARCODE LF))) + (CR (SELECTC (OR EOLC (FFETCH (STREAM + EOLCONVENTION + ) + OF STRM)) + (CR.EOLC (CHARCODE EOL)) + ((LIST ANY.EOLC CRLF.EOLC) + (\CHECKEOLC.CRLF STRM PEEKBINFLG + BYTECOUNTVAR BYTECOUNTVAL)) + (CHARCODE CR))) + CH]) ) - - -(* ; "JIS to XCCS converter") - - (RPAQ? *REPLACE-NO-FONT-CODE* T) (RPAQ? *DEFAULT-NOT-CONVERTED-FAT-CODE* 8739) @@ -2227,895 +1769,6 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (GLOBALVARS *REPLACE-NO-FONT-CODE* *DEFAULT-NOT-CONVERTED-FAT-CODE*) ) -(DECLARE%: DOEVAL@COMPILE DONTCOPY -(* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE - -(PUTPROPS \CONV.JIS.TO.XCCS MACRO [OPENLAMBDA (KU TEN) - -(* ;;; "Some character code is not equivalent between JIS and XCCS. In such case, we have to convert the character to corresponding XCCS.") - - (COND - ((\NOT.EQUIVALENT.TO.XCCS KU) - (\DO.CONV.JIS.TO.XCCS KU TEN)) - (T (LOGOR (UNFOLD KU 256) - TEN]) - -(PUTPROPS \DO.CONV.JIS.TO.XCCS MACRO - [(KU TEN) - -(* ;;; " Convert a JIS code divided into KU (high 8 bit) and TEN (low 8 bit) to an corresponding XCCS code.") - - (COND - ((\INVALID.TENP TEN) - *DEFAULT-NOT-CONVERTED-FAT-CODE*) - (T (SELECTQ KU - ((33 34 38) (* ; "1, 2 and 6 KU") - [LET* ((CONVTABLE (\EXTARACT.CONV.TABLE KU)) - (SET (\EXTRACT.SET TEN CONVTABLE)) - (CODE (\EXTRACT.CODE TEN CONVTABLE))) - (COND - ((NEQ SET 255) - (LOGOR (UNFOLD SET 256) - CODE)) - (T (COND - ((EQ CODE 255) (* ; "Not defined in JIS.") - *DEFAULT-NOT-CONVERTED-FAT-CODE*) - (T (* ; - "Defined in JIS but the displayable font is not assigned in the corresponding code in XCCS.") - (COND - (*REPLACE-NO-FONT-CODE* - *DEFAULT-NOT-CONVERTED-FAT-CODE*) - (T (\EXTRACT.NO.FONT.CODE (LOGOR (UNFOLD KU 256) - TEN]) - (35 (* ; "3 KU") - (* ; - "Alpha numeric codes are all defined as single byte codes in XCCS.") - TEN) - (40 (* ; "8 KU") - (COND - [(< 0 TEN 33) - (COND - (*REPLACE-NO-FONT-CODE* *DEFAULT-NOT-CONVERTED-FAT-CODE*) - (T (\EXTRACT.NO.FONT.CODE (LOGOR KU TEN] - (T *DEFAULT-NOT-CONVERTED-FAT-CODE*))) - (116 (* ; "84 KU") - (COND - ((< 0 TEN 5) - (LOGOR 29952 TEN)) - (T *DEFAULT-NOT-CONVERTED-FAT-CODE*))) - (117 (* ; "85 KU") - (COND - ((< 0 TEN 28) - (LOGOR 29696 TEN)) - (T *DEFAULT-NOT-CONVERTED-FAT-CODE*))) - *DEFAULT-NOT-CONVERTED-FAT-CODE*]) -) - -(* "END EXPORTED DEFINITIONS") - -) - - - -(* ; "XCCS to JIS converter") - -(DEFINEQ - -(CONVHANKAKU - [LAMBDA ARGS (* ; "Edited 8-Feb-91 13:42 by nm") - (PROG1 (STREAMPROP (ARG ARGS 1) - :HTOZP) - (AND (> ARGS 1) - (STREAMPROP (ARG ARGS 1) - :HTOZP - (ARG ARGS 2))))]) -) -(DECLARE%: DOEVAL@COMPILE DONTCOPY -(* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE - -(PUTPROPS \CONV.XCCS.TO.JIS MACRO (OPENLAMBDA (OUTSTREAM CC) - -(* ;;; "Returns JIS code corresponding to XCCS charcode. Handle HANKAKU as well as ZENKAKU. If OUTSTREAM wants to convert ZENKAKUKANA to HANKAKUKANA, do so. Never returns two byte charcode for alpha-numeric character, they are all treated as single byte characode.") - - (OR (COND - ((\ASCIIP CC) - CC) - ((\NOT.EQUIVALENT.TO.JIS CC) - (\DO.CONV.XCCS.TO.JIS CC)) - ((\CONV.HANKAKU.TO.ZENKAKUP OUTSTREAM) - (* ; - "ZENKAKUKANA comes here, because their charcodes are equiavalent to JIS.") - (\CONV.ZENKAKU.KANA CC)) - (T CC)) - CC))) - -(PUTPROPS \DO.CONV.XCCS.TO.JIS MACRO ((CC) - (GETHASH CC *XCCS-TO-JIS-CONV-TABLE*))) - -(PUTPROPS \ASCIIP MACRO (OPENLAMBDA (CC) - (AND (EQ (FOLDLO CC 256) - 0) - (< (LOGAND CC 255) - 128)))) - -(PUTPROPS \NOT.EQUIVALENT.TO.JIS MACRO (OPENLAMBDA (CC) - (OR (EQ (FOLDLO CC 256) - 0) - (EQ (FOLDLO CC 256) - 33) - (EQ (FOLDLO CC 256) - 34) - (EQ (FOLDLO CC 256) - 38) - (EQ (FOLDLO CC 256) - 40) - (EQ (FOLDLO CC 256) - 239) - (EQ (FOLDLO CC 256) - 241)))) - -(PUTPROPS \CONV.HANKAKU.TO.ZENKAKUP MACRO ((OUTSTREAM) - (STREAMPROP OUTSTREAM :HTOZP))) - -(PUTPROPS \CONV.ZENKAKU.KANA MACRO ((CHAR) - (GETHASH CHAR *ZENKAKU-TO-HANKAKU-CONV-TABLE*))) -) - -(* "END EXPORTED DEFINITIONS") - -) -(DEFINEQ - -(\JISIN - [LAMBDA (STREAM COUNTP) (* ; "Edited 25-Feb-91 15:47 by nm") - -(* ;;; "Returns a 16 bit XCCS code. Assuming the input character stream is encoded with JIS. Allows the incorrect usage of KI and KO based on the two different JIS, OLDJIS and NEWJIS, because it is very likely that these two different sets of KI and KO are used simultaneously, although it is against a standard! ") - -(* ;;; "If COUNP is non-NIL, the number of bytes read is returned as a second value. Doesn't do EOL conversion -- \INCHAR or \INCCODE do that.") - - (PROG (CH1 CH2 CH3 (IN16BITFLG (\KIMODEP STREAM T)) - (CHARNUM 0)) - RETRY - (AND (SETQ CH1 (\BIN STREAM)) - (COND - [(EQ CH1 (CHARCODE ESC)) (* ; "Might be KI or KO.") - (SETQ CH2 (\BIN STREAM)) - (COND - [(EQ CH2 (CHARCODE $)) (* ; "Might be KI") - (SETQ CH3 (\BIN STREAM)) - (COND - ((OR (EQ CH3 (CHARCODE B)) - (EQ CH3 (CHARCODE @))) (* ; "KI") - (\CHNAGE.KI.MODE STREAM T T) - (AND COUNTP (SETQ CHARNUM (IPLUS CHARNUM 3))) - (* ; "Here we have to try the same preocedure again, because bogus duplicated KI/KO sequence might come again!") - (SETQ IN16BITFLG T) - (GO RETRY)) - (T (COND - [IN16BITFLG (* ; "Under processing 16 bit code.") - (\BACKFILEPTR STREAM) - (COND - [COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS CH1 CH2) - (IPLUS 2 CHARNUM] - (T (RETURN (\CONV.JIS.TO.XCCS CH1 CH2] - (T (\BACKFILEPTR STREAM) - (\BACKFILEPTR STREAM) - (COND - [COUNTP (RETURN (CL:VALUES (CHARCODE ESC) - (IPLUS 1 CHARNUM] - (T (RETURN (CHARCODE ESC] - [(EQ CH2 (CHARCODE %()) (* ; "Might be KO") - (SETQ CH3 (\BIN STREAM)) - (COND - ((OR (EQ CH3 (CHARCODE J)) - (EQ CH3 (CHARCODE H))) (* ; "KO") - (\CHNAGE.KI.MODE STREAM T NIL) - (AND COUNTP (SETQ CHARNUM (IPLUS CHARNUM 3))) - (* ; - "Oops. Yes, we have to try again to ignore duplicated KI/KO sequence.") - (SETQ IN16BITFLG NIL) - (GO RETRY)) - (T (COND - [IN16BITFLG (* ; "Under processing 16 bit code.") - (\BACKFILEPTR STREAM) - (COND - [COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS CH1 CH2) - (IPLUS 2 CHARNUM] - (T (RETURN (\CONV.JIS.TO.XCCS CH1 CH2] - (T (\BACKFILEPTR STREAM) - (\BACKFILEPTR STREAM) - (COND - [COUNTP (RETURN (CL:VALUES (CHARCODE ESC) - (IPLUS 1 CHARNUM] - (T (RETURN (CHARCODE ESC] - [IN16BITFLG (* ; "Under processing 16 bit code.") - (COND - [COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS CH1 CH2) - (IPLUS 2 CHARNUM] - (T (RETURN (\CONV.JIS.TO.XCCS CH1 CH2] - (T (\BACKFILEPTR STREAM) - (COND - [COUNTP (RETURN (CL:VALUES (CHARCODE ESC) - (IPLUS 1 CHARNUM] - (T (RETURN (CHARCODE ESC] - [IN16BITFLG (* ; "Under processing 16 bit code.") - (COND - [COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS CH1 (\BIN STREAM)) - (IPLUS 2 CHARNUM] - (T (RETURN (\CONV.JIS.TO.XCCS CH1 (\BIN STREAM] - [(\HANKAKUP CH1) (* ; -"HANKAKU-KATAKANA is converted to ZENKAKU-KATAKANA because XCCS does not support HANKAKU-KATAKANA.") - (COND - [COUNTP (RETURN (CL:VALUES (\CONV.HANKAKU.KANA CH1) - (IPLUS 1 CHARNUM] - (T (RETURN (\CONV.HANKAKU.KANA CH1] - (T - (* ;; "C0, SP, DEL, C1, 10/0, or 15/15 of 0 character set.") - - (COND - [COUNTP (RETURN (CL:VALUES CH1 (IPLUS 1 CHARNUM] - (T (RETURN CH1]) - -(\JISPEEK - [LAMBDA (STREAM NOERROR COUNTP) (* ; "Edited 25-Feb-91 16:27 by nm") - -(* ;;; "Returns a 16 bit XCCS code. Assuming the input character stream is encoded with JIS. Allows the incorrect usage of KI and KO based on the two different JIS, OLDJIS and NEWJIS, because it is very likely that these two different sets of KI and KO are used simultaneously, although it is against a standard! May actually read the KI or KO. ") - -(* ;;; "If COUNTP is non-NIL, the number of bytes read is returned as a second value. Doesn't do EOL conversion -- \INCHAR or \INCCODE do that.") - - (PROG ((IN16BITFLG (\KIMODEP STREAM T)) - (CHARNUM 0) - (CH1 (\PEEKBIN STREAM NOERROR)) - CH2 CH3) - RETRY - (COND - [(NULL CH1) - (COND - (COUNTP (RETURN (CL:VALUES NIL CHARNUM))) - (T (RETURN NIL] - [(EQ CH1 (CHARCODE ESC)) (* ; "Might be KI or KO.") - (\BIN STREAM) (* ; "Consume the first ESC.") - (SETQ CH2 (\PEEKBIN STREAM NOERROR)) - (COND - [(NULL CH2) - (\BACKFILEPTR STREAM) - (COND - (COUNTP (RETURN (CL:VALUES NIL CHARNUM))) - (T (RETURN NIL] - [(EQ CH2 (CHARCODE $)) (* ; "Might be KI") - (\BIN STREAM) (* ; "Consume the $.") - (SETQ CH3 (\PEEKBIN STREAM NOERROR)) - (COND - [(NULL CH3) - (\BACKFILEPTR STREAM) - (\BACKFILEPTR STREAM) - (COND - (COUNTP (RETURN (CL:VALUES NIL CHARNUM))) - (T (RETURN NIL] - ((OR (EQ CH3 (CHARCODE B)) - (EQ CH3 (CHARCODE @))) (* ; "KI") - (\CHNAGE.KI.MODE STREAM T T) - (AND COUNTP (SETQ CHARNUM (IPLUS CHARNUM 3))) - (\BIN STREAM) (* ; "Consume the B or @.") - (SETQ IN16BITFLG T) - (GO RETRY)) - (T (\BACKFILEPTR STREAM) - (\BACKFILEPTR STREAM) - (COND - [IN16BITFLG (* ; "Under processing 16 bit code.") - (COND - (COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS CH1 CH2) - CHARNUM))) - (T (RETURN (\CONV.JIS.TO.XCCS CH1 CH2] - (T (COND - (COUNTP (RETURN (CL:VALUES (CHARCODE ESC) - CHARNUM))) - (T (RETURN (CHARCODE ESC] - [(EQ CH2 (CHARCODE %()) (* ; "Might be KO") - (\BIN STREAM) (* ; "Consume the (.") - (SETQ CH3 (\PEEKBIN STREAM NOERROR)) - (COND - [(NULL CH3) - (\BACKFILEPTR STREAM) - (\BACKFILEPTR STREAM) - (COND - (COUNTP (RETURN (CL:VALUES NIL CHARNUM))) - (T (RETURN NIL] - ((OR (EQ CH3 (CHARCODE J)) - (EQ CH3 (CHARCODE H))) (* ; "KO") - (\CHNAGE.KI.MODE STREAM T NIL) - (AND COUNTP (SETQ CHARNUM 3)) - (\BIN STREAM) (* ; "Consume the J or H.") - (SETQ IN16BITFLG NIL) - (GO RETRY)) - (T (\BACKFILEPTR STREAM) - (\BACKFILEPTR STREAM) - (COND - [IN16BITFLG (* ; "Under processing 16 bit code.") - (COND - (COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS CH1 CH2) - CHARNUM))) - (T (RETURN (\CONV.JIS.TO.XCCS CH1 CH2] - (T (COND - (COUNTP (RETURN (CL:VALUES (CHARCODE ESC) - CHARNUM))) - (T (RETURN (CHARCODE ESC] - [IN16BITFLG (* ; "Under processing 16 bit code.") - (\BACKFILEPTR STREAM) - (COND - (COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS CH1 CH2) - CHARNUM))) - (T (RETURN (\CONV.JIS.TO.XCCS CH1 CH2] - (T (\BACKFILEPTR STREAM) - (COND - (COUNTP (RETURN (CL:VALUES (CHARCODE ESC) - CHARNUM))) - (T (RETURN (CHARCODE ESC] - [IN16BITFLG (* ; "Under processing 16 bit code.") - (\BIN STREAM) (* ; "Consume the first byte.") - (SETQ CH2 (\PEEKBIN STREAM NOERROR)) - (\BACKFILEPTR STREAM) - (COND - [CH2 (COND - (COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS CH1 CH2) - CHARNUM))) - (T (RETURN (\CONV.JIS.TO.XCCS CH1 CH2] - (T (COND - (COUNTP (RETURN (CL:VALUES NIL CHARNUM))) - (T (RETURN NIL] - [(\HANKAKUP CH1) (* ; -"HANKAKU-KATAKANA is converted to ZENKAKU-KATAKANA because XCCS does not support HANKAKU-KATAKANA.") - (COND - (COUNTP (RETURN (CL:VALUES (\CONV.HANKAKU.KANA CH1) - CHARNUM))) - (T (RETURN (\CONV.HANKAKU.KANA CH1] - (T - (* ;; "C0, SP, DEL, C1, 10/0, or 15/15 of 0 character set.") - - (COND - (COUNTP (RETURN (CL:VALUES CH1 CHARNUM))) - (T (RETURN CH1]) - -(\BACKJISCHAR - [LAMBDA (STREAM COUNTP) (* ; "Edited 25-Feb-91 17:05 by nm") - (COND - ((\BACKFILEPTR STREAM) - (COND - [(\KIMODEP STREAM T) - (COND - ((\BACKFILEPTR STREAM) - (AND COUNTP 2)) - (T (AND COUNTP 1] - (COUNTP 1))) - (COUNTP 0]) - -(\SHIFTJISIN - [LAMBDA (STREAM COUNTP) (* ; "Edited 25-Feb-91 15:49 by nm") - -(* ;;; "Returns a 16 bit XCCS code. Assuming the input character stream is encoded with Shift-JIS. If COUNP is non-NIL, the number of bytes read is returned as a second value. Doesn't do EOL conversion -- \INCHAR or \INCCODE do that..") - - (LET ((CH1 (\BIN STREAM)) - CH2) - (AND CH1 (COND - [(\SJIS.KANJI.FIRST.BYTEP CH1) (* ; - "Read next byte and compose a kanji character.") - (\CONV.SJIS.TO.JIS CH1 (\BIN STREAM)) (* ; - "CH1 and CH2 is adjusted to represent JIS code in \CONV.SJIS.TO.JIS.") - (COND - (COUNTP (CL:VALUES (\CONV.JIS.TO.XCCS CH1 CH2) - 2)) - (T (\CONV.JIS.TO.XCCS CH1 CH2] - (T (* ; "ASCII or HANKAKU-KATAKANA") - (COND - [(\HANKAKUP CH1) (* ; "HANKAKU-KATAKANA") - (COND - (COUNTP (CL:VALUES (\CONV.HANKAKU.KANA CH1) - 1)) - (T (\CONV.HANKAKU.KANA CH1] - (T (* ; "ASCII") - (COND - (COUNTP (CL:VALUES CH1 1)) - (T CH1]) - -(\SHIFTJISPEEK - [LAMBDA (STREAM NOERROR COUNTP) (* ; "Edited 25-Feb-91 16:30 by nm") - -(* ;;; "Returns a 16 bit XCCS code. Assuming the input character stream is encoded with Shift-JIS. Doesn't do EOL conversion -- \INCHAR or \INCCODE do that.") - - (PROG ((CH1 (\PEEKBIN STREAM NOERROR)) - CH2) - (COND - [(NULL CH1) - (COND - (COUNTP (RETURN (CL:VALUES NIL 0))) - (T (RETURN NIL] - [(\SJIS.KANJI.FIRST.BYTEP CH1) (* ; - "Read next byte and compose a kanji character.") - (\BIN STREAM) (* ; "Consume the first byte.") - [COND - ((NULL (SETQ CH2 (\PEEKBIN STREAM NOERROR))) - (\BACKFILEPTR STREAM) - (COND - (COUNTP (RETURN (CL:VALUES NIL 0))) - (T (RETURN NIL] - (\BACKFILEPTR STREAM) - (\CONV.SJIS.TO.JIS CH1 CH2) (* ; - "CH1 and CH2 is adjusted to represent JIS code in \CONV.SJIS.TO.JIS.") - (COND - (COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS CH1 CH2) - 0))) - (T (RETURN (\CONV.JIS.TO.XCCS CH1 CH2] - (T (* ; "ASCII or HANKAKU-KATAKANA") - (RETURN (COND - [(\HANKAKUP CH1) (* ; "HANKAKU-KATAKANA") - (COND - (COUNTP (RETURN (CL:VALUES (\CONV.HANKAKU.KANA CH1) - 0))) - (T (RETURN (\CONV.HANKAKU.KANA CH1] - (T (* ; "ASCII") - (COND - (COUNTP (RETURN (CL:VALUES CH1 0))) - (T (RETURN CH1]) - -(\BACKSHIFTJISCHAR - [LAMBDA (STREAM COUNTP) (* ; "Edited 25-Feb-91 17:05 by nm") - (COND - ((\BACKFILEPTR STREAM) - (COND - [(\BACKFILEPTR STREAM) - (COND - ((\SJIS.KANJI.FIRST.BYTEP (\PEEKBIN STREAM)) - (AND COUNTP 2)) - (T (\BIN STREAM) - (AND COUNTP 1] - (COUNTP 1))) - (COUNTP 0]) - -(\EUCIN - [LAMBDA (STREAM COUNTP) (* ; "Edited 25-Feb-91 15:54 by nm") - -(* ;;; "Returns a 16 bit XCCS code. Assuming the input character stream is encoded with EUC (Extended Unix Codes). Although EUC is independent of a particular language, the language implemented here is Japanese, thus this should be called as UJIS (Unixnized extended JIS code). JEIDA uses EUC as UJIS. ") - -(* ;;; "If COUNP is non-NIL, the number of bytes read is returned as a second value. Doesn't do EOL conversion -- \INCHAR or \INCCODE do that.") - - (LET ((CH1 (\BIN STREAM)) - CH2) - (AND CH1 (COND - [(\EUC.KANJI.FIRST.BYTEP CH1) (* ; - "Read next byte and compose a kanji character.") - (COND - (COUNTP (CL:VALUES (\CONV.JIS.TO.XCCS (LOGAND CH1 127) - (LOGAND (\BIN STREAM) - 127)) - 2)) - (T (\CONV.JIS.TO.XCCS (LOGAND CH1 127) - (LOGAND (\BIN STREAM) - 127] - [(\EUC.HANKAKUP CH1) - (COND - (COUNTP (CL:VALUES (\CONV.HANKAKU.KANA (\BIN STREAM)) - 2)) - (T (\CONV.HANKAKU.KANA (\BIN STREAM] - [(\GAIJIP CH1) - (COND - (COUNTP (CL:VALUES (\CONV.JIS.TO.XCCS (LOGAND (\BIN STREAM) - 127) - (LOGAND (\BIN STREAM) - 127)) - 3)) - (T (\CONV.JIS.TO.XCCS (LOGAND (\BIN STREAM) - 127) - (LOGAND (\BIN STREAM) - 127] - (T (* ; "ASCII, C0, C1, SP or DEL") - (COND - (COUNTP (CL:VALUES CH1 1)) - (T CH1]) - -(\EUCPEEK - [LAMBDA (STREAM NOERROR COUNTP) (* ; "Edited 25-Feb-91 16:35 by nm") - -(* ;;; "Returns a 16 bit XCCS code. Assuming the input character stream is encoded with EUC (Extended Unix Codes). Although EUC is independent of a particular language, the language implemented here is Japanese, thus this should be called as UJIS (Unixnized extended JIS code). JEIDA uses EUC as UJIS. Doesn't do EOL conversion -- \INCHAR or \INCCODE do that.") - - (PROG ((CH1 (\PEEKBIN STREAM NOERROR)) - CH2) - (COND - [(NULL CH1) - (COND - (COUNTP (RETURN (CL:VALUES NIL 0))) - (T (RETURN NIL] - [(\EUC.KANJI.FIRST.BYTEP CH1) (* ; - "Read next byte and compose a kanji character.") - (\BIN STREAM) (* ; "Consume the first byte.") - [COND - ((NULL (SETQ CH2 (\PEEKBIN STREAM NOERROR))) - (\BACKFILEPTR STREAM) - (COND - (COUNTP (RETURN (CL:VALUES NIL 0))) - (T (RETURN NIL] - (\BACKFILEPTR STREAM) - (COND - (COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS (LOGAND CH1 127) - (LOGAND CH2 127)) - 0))) - (T (RETURN (\CONV.JIS.TO.XCCS (LOGAND CH1 127) - (LOGAND CH2 127] - [(\EUC.HANKAKUP CH1) - (\BIN STREAM) (* ; "Consume the SS2.") - [COND - ((NULL (SETQ CH2 (\PEEKBIN STREAM NOERROR))) - (\BACKFILEPTR STREAM) - (COND - (COUNTP (RETURN (CL:VALUES NIL 0))) - (T (RETURN NIL] - (\BACKFILEPTR STREAM) - (COND - (COUNTP (RETURN (CL:VALUES (\CONV.HANKAKU.KANA CH2) - 0))) - (T (RETURN (\CONV.HANKAKU.KANA CH2] - [(\GAIJIP CH1) - (\BIN STREAM) (* ; "Consume the SS3.") - [COND - ((NULL (SETQ CH1 (\PEEKBIN STREAM NOERROR))) - (\BACKFILEPTR STREAM) - (COND - (COUNTP (RETURN (CL:VALUES NIL 0))) - (T (RETURN NIL] - (\BIN STREAM) (* ; - "Consume the first byte in GAIJI.") - [COND - ((NULL (SETQ CH2 (\PEEKBIN STREAM NOERROR))) - (\BACKFILEPTR STREAM) - (\BACKFILEPTR STREAM) - (COND - (COUNTP (RETURN (CL:VALUES NIL 0))) - (T (RETURN NIL] - (\BACKFILEPTR STREAM) - (\BACKFILEPTR STREAM) - (COND - (COUNTP (RETURN (CL:VALUES (\CONV.JIS.TO.XCCS (LOGAND CH1 127) - (LOGAND CH2 127)) - 0))) - (T (RETURN (\CONV.JIS.TO.XCCS (LOGAND CH1 127) - (LOGAND CH2 127] - (T (* ; "ASCII, C0, C1, SP or DEL") - (COND - (COUNTP (RETURN (CL:VALUES CH1 0))) - (T (RETURN CH1]) - -(\BACKEUCCHAR - [LAMBDA (STREAM COUNTP) (* ; "Edited 25-Feb-91 17:06 by nm") - (COND - ((\BACKFILEPTR STREAM) - (COND - ((BITTEST (\PEEKBIN STREAM) - (MASK.1'S 7 1)) (* ; "C1, KAINJI, HANKAKU or GAIJI") - (COND - [(\BACKFILEPTR STREAM) - (COND - ((\EUC.HANKAKUP (\PEEKBIN STREAM)) - (AND COUNTP 2)) - ((BITTEST (\PEEKBIN STREAM) - (MASK.1'S 7 1)) (* ; "KANJI or GAIJI") - (COND - [(\BACKFILEPTR STREAM) - (COND - ((\GAIJIP (\PEEKBIN STREAM)) - (AND COUNTP 3)) - (T (* ; "KANJI") - (\BIN STREAM) - (AND COUNTP 2] - (COUNTP 2))) - (T (* ; "C1") - (\BIN STREAM) - (AND COUNTP 1] - (COUNTP 1))) - (COUNTP 1))) - (COUNTP 0]) - -(\THROUGHIN - [LAMBDA (STREAM COUNTP) (* ; "Edited 26-Feb-91 13:36 by nm") - -(* ;;; "Read in a single byte from STREAM and returns it without any character conversion, just through as if.") - -(* ;;; "If COUNP is non-NIL, always 1 is returned as the second value.") - - (COND - (COUNTP (CL:VALUES (\BIN STREAM) - 1)) - (T (\BIN STREAM]) - -(\THROUGHPEEK - [LAMBDA (STREAM NOERROR COUNTP) (* ; "Edited 26-Feb-91 13:40 by nm") - -(* ;;; "Returns a 8 bit code without any character conversion, just through as if.") - -(* ;;; "If COUNTP is non-NIL, always 0 is returned as its second value.") - - (COND - (COUNTP (CL:VALUES (\PEEKBIN STREAM NOERROR) - 0)) - (T (\PEEKBIN STREAM NOERROR]) - -(\BACKTHROUGHCHAR - [LAMBDA (STREAM COUNTP) (* ; "Edited 26-Feb-91 13:43 by nm") - (COND - ((\BACKFILEPTR STREAM) - 1) - (COUNTP 0]) -) -(DECLARE%: DOEVAL@COMPILE DONTCOPY -(* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE - -(PUTPROPS \XCCSIN MACRO [(STREAM SHIFTEDCSET SHIFTEDCSETVAR COUNTERVAR) - -(* ;;; "returns a 16 bit character code. SHIFTEDCSET is STREAM's char set left shifted 8, SHIFTEDCSETVAR if non-NIL is the variable to set if char set changes. COUNTERVAR if non-NIL is decremented by number of bytes read. Doesn't do EOL conversion -- \INCHAR and \INCCODE do that.") - - (LET ((CHAR (\BIN STREAM)) - SCSET) - (COND - [(EQ CHAR NSCHARSETSHIFT) - (* ; "Shifting character sets") - [ACCESS-CHARSET STREAM - (SETQ SCSET (COND - ((NEQ NSCHARSETSHIFT (SETQ CHAR - (\BIN STREAM))) - (AND 'COUNTERVAR (SETQ COUNTERVAR - (IDIFFERENCE - COUNTERVAR 2))) - CHAR) - ((PROGN - (* ; - "2 shift-bytes means not run-encoded") - (AND 'COUNTERVAR - (SETQ COUNTERVAR - (IDIFFERENCE COUNTERVAR - 3))) - (EQ 0 (\BIN STREAM))) - \NORUNCODE) - (T (\NSIN.24BITENCODING.ERROR - STREAM] - (SETQ CHAR (\BIN STREAM)) - (SETQ SCSET (COND - ('SHIFTEDCSETVAR - (* ; "CHARSETVAR=NIL means don't set") - (SETQ SHIFTEDCSETVAR (UNFOLD SCSET - 256))) - (T (UNFOLD SCSET 256] - (T (SETQ SCSET SHIFTEDCSET))) - (COND - ((EQ SCSET (UNFOLD \NORUNCODE 256)) - (* ; - "just read two bytes and combine them to a 16 bit value") - (AND 'COUNTERVAR (SETQ COUNTERVAR (IDIFFERENCE COUNTERVAR 2 - ))) - (LOGOR (UNFOLD CHAR 256) - (\BIN STREAM))) - (CHAR (AND 'COUNTERVAR (SETQ COUNTERVAR (IDIFFERENCE - COUNTERVAR 1) - )) - (AND CHAR (LOGOR SCSET CHAR]) - -(PUTPROPS \XCCSPEEK MACRO [(STREAM SHIFTEDCSET SHIFTEDCSETVAR NOERROR COUNTERVAR) - - (* ;; "Returns a 16 bit character code. Doesn't do EOL conversion--\INCHAR does that. May actually read the character-set shift, storing the result in the stream. COUNTERVAR, if given, is updated to reflect any such bytes that are actually read") - - (PROG ((CHAR (\PEEKBIN STREAM NOERROR)) - SCSET) - (COND - ((NULL CHAR) - (RETURN NIL)) - [(EQ CHAR NSCHARSETSHIFT) - (* ; "CHARSETVAR=NIL means don't set") - (\BIN STREAM) (* ; "Consume the char shift byte") - [ACCESS-CHARSET STREAM - (SETQ SCSET (COND - ((NEQ NSCHARSETSHIFT - (SETQ CHAR (\BIN STREAM))) - (* ; - "Note: no eof error check on this \BIN -- an eof in the middle of a charset shift is an error") - (AND 'COUNTERVAR - (SETQ COUNTERVAR - (IDIFFERENCE COUNTERVAR 2)) - ) - CHAR) - ((PROGN - (* ; - "2 shift-bytes means not run-encoded") - (AND 'COUNTERVAR - (SETQ COUNTERVAR - (IDIFFERENCE - COUNTERVAR 3) - )) - (EQ 0 (\BIN STREAM))) - \NORUNCODE) - (T (\NSIN.24BITENCODING.ERROR - STREAM] - [SETQ SCSET (COND - ('SHIFTEDCSETVAR - (* ; "CHARSETVAR=NIL means don't set") - (SETQ SHIFTEDCSETVAR - (UNFOLD SCSET 256))) - (T (UNFOLD SCSET 256] - (COND - ((NULL (SETQ CHAR (\PEEKBIN STREAM NOERROR))) - (RETURN NIL] - (T (SETQ SCSET SHIFTEDCSET))) - (RETURN (COND - ((EQ SCSET (UNFOLD \NORUNCODE 256)) - - (* ;; "just peek two bytes and combine them to a 16 bit value. Again, is an error if we hit eof in mid-character") - - (\BIN STREAM) - (PROG1 (LOGOR (UNFOLD CHAR 256) - (\PEEKBIN STREAM NOERROR)) - (\BACKFILEPTR STREAM))) - (T (LOGOR SHIFTEDCSET CHAR]) - -(PUTPROPS \BACKXCCSCHAR MACRO [(STREAM SHIFTEDCHARSET COUNTERVAR) - (AND (\BACKFILEPTR STREAM) - (COND - [[COND - (SHIFTEDCHARSET (EQ SHIFTEDCHARSET - (UNFOLD \NORUNCODE 256))) - (T (EQ \NORUNCODE (ACCESS-CHARSET STREAM] - (COND - ((\BACKFILEPTR STREAM) - (AND 'COUNTERVAR (add COUNTERVAR 2)) - T) - ('COUNTERVAR (add COUNTERVAR 1] - ('COUNTERVAR (add COUNTERVAR 1]) - -(PUTPROPS \XCCSP MACRO [OPENLAMBDA (ST) - (NOT (ffetch (STREAM NOTXCCS) of (\DTEST ST 'STREAM]) -) -(DECLARE%: EVAL@COMPILE - -(PUTPROPS \EXTRACT.NO.FONT.CODE MACRO ((JISCODE) - (CDR (ASSOC JISCODE *JIS-TO-XCCS-CONV-NO-FONT-TABLE*)) - )) - -(PUTPROPS \EXTARACT.CONV.TABLE MACRO ((KU) - (CDR (ASSOC KU *JIS-TO-XCCS-CONV-TABLE-LIST*)))) - -(PUTPROPS \NOT.EQUIVALENT.TO.XCCS MACRO ((KU) - -(* ;;; " The JIS codes which are not equiavelent to XCCS reside in 1, 2, 3, 6, 8 and 84 KU. Although from 84-5 to 94-94 inclusive are not defined in JIS, that is they are GAIJI, they are also handled here.") - - (OR (EQ KU 33) - (EQ KU 34) - (EQ KU 35) - (EQ KU 38) - (EQ KU 40) - (EQ KU 116) - (EQ KU 117)))) - -(PUTPROPS \EXTRACT.SET MACRO ((TEN TABLE) - (ELT TABLE (IDIFFERENCE (UNFOLD (IDIFFERENCE TEN 32) - 2) - 1)))) - -(PUTPROPS \EXTRACT.CODE MACRO ((TEN TABLE) - (ELT TABLE (UNFOLD (IDIFFERENCE TEN 32) - 2)))) - -(PUTPROPS \CHNAGE.KI.MODE MACRO [OPENLAMBDA (ST INPUTFLG ENTERP) - -(* ;;; -"INPUTFLG is true if \CHNAGE.KI.MODE is called in the context in which ST is an input stream.") - - (COND - [INPUTFLG (COND - (ENTERP (freplace (STREAM IN.KANJIIN) - of (\DTEST ST 'STREAM) - with T)) - (T (freplace (STREAM IN.KANJIIN) - of (\DTEST ST 'STREAM) - with NIL] - (T (COND - (ENTERP (freplace (STREAM OUT.KANJIIN) - of (\DTEST ST 'STREAM) with - T)) - (T (freplace (STREAM OUT.KANJIIN) - of (\DTEST ST 'STREAM) with NIL]) - -(PUTPROPS \KIMODEP MACRO [OPENLAMBDA (ST INPUTFLG) - -(* ;;; "INPUTFLG is true if \KIMODEP is called in the context in which ST is an input stream.") - - (COND - [INPUTFLG (ffetch (STREAM IN.KANJIIN) - of (\DTEST ST 'STREAM] - (T (ffetch (STREAM OUT.KANJIIN) of (\DTEST ST - 'STREAM]) - -(PUTPROPS \HANKAKUP MACRO ((CHAR) - (< 160 CHAR 224))) - -(PUTPROPS \KANJIP MACRO ((CHAR) - (< 12158 CHAR 29733))) - -(PUTPROPS \NOTGAIJIP MACRO ((CHAR) - (OR (< 8480 CHAR 10305) - (< 12158 CHAR 29733)))) - -(PUTPROPS \INVALID.TENP MACRO (OPENLAMBDA (TEN) - (OR (< TEN 33) - (< 126 TEN)))) - -(PUTPROPS \CONV.HANKAKU.KANA MACRO ((CHAR) - (GETHASH CHAR *HANKAKU-TO-ZENKAKU-CONV-TABLE*))) - -(PUTPROPS \OUTKI MACRO ((STREAM) - (\BOUT OUTSTREAM (CHARCODE ESC)) - (\BOUT OUTSTREAM (CHARCODE $)) - (\BOUT OUTSTREAM (CHARCODE B)))) - -(PUTPROPS \OUTKO MACRO ((STREAM) - (\BOUT OUTSTREAM (CHARCODE ESC)) - (\BOUT OUTSTREAM (CHARCODE %()) - (\BOUT OUTSTREAM (CHARCODE J)))) -) -(DECLARE%: EVAL@COMPILE - -(PUTPROPS \CONV.SJIS.TO.JIS MACRO [OPENLAMBDA (HI LO) - -(* ;;; "Convert Shift-JIS to JIS. The variable named CH1 and CH2 are set to the converted hight 8 bit and low 8bit of JIS code respectively.") - - [SETQ CH1 (IDIFFERENCE HI (COND - ((> HI 159) - 177) - (T 113] - (SETQ CH1 (IPLUS (UNFOLD CH1 2) - 1)) - (SETQ CH2 (COND - [(> LO 158) - (PROG1 (IDIFFERENCE LO 126) - (SETQ CH1 (IPLUS CH1 1)))] - (T (IDIFFERENCE LO (COND - ((> LO 126) - (IPLUS 31 1)) - (T 31]) - -(PUTPROPS \CONV.JIS.TO.SJIS MACRO [OPENLAMBDA (HI LO) - -(* ;;; "Convert JIS to Shift-JIS. The variable named CH1 and CH2 are set to the converted hight 8 bit and low 8bit of Shift-JIS code respectively.") - - [SETQ CH2 (COND - ((ODDP HI) - (SETQ CH2 (IPLUS LO 31)) - (COND - ((>= CH2 127) - (IPLUS CH2 1)) - (T CH2))) - (T (IPLUS LO 126] - (SETQ CH1 (IPLUS (FOLDLO (IDIFFERENCE HI 33) - 2) - 129)) - (AND (> CH1 159) - (SETQ CH1 (IPLUS CH1 64]) - -(PUTPROPS \SJIS.KANJI.FIRST.BYTEP MACRO (OPENLAMBDA (CHAR) - (OR (< 127 CHAR 160) - (< 223 CHAR 256)))) -) -(DECLARE%: EVAL@COMPILE - -(PUTPROPS \EUC.KANJI.FIRST.BYTEP MACRO ((CHAR) - (< 160 CHAR 255))) - -(PUTPROPS \GAIJIP MACRO ((CHAR) - (EQ CHAR 143))) - -(PUTPROPS \EUC.HANKAKUP MACRO ((CHAR) - (EQ CHAR 142))) -) - -(* "END EXPORTED DEFINITIONS") - -) - -(RPAQ? *SIGNAL-24BIT-NSENCODING-ERROR* ) (RPAQ? *READ-NEWLINE-SUPPRESS* ) @@ -3136,28 +1789,24 @@ Copyright (c) 1981-1988, 1990-1991, 1993, 2021 by Venue & Xerox Corporation. (ADDTOVAR NLAML ) -(ADDTOVAR LAMA CONVHANKAKU CL:PARSE-INTEGER CL:READ-DELIMITED-LIST CL:READ-PRESERVING-WHITESPACE - CL:READ) +(ADDTOVAR LAMA CL:PARSE-INTEGER CL:READ-DELIMITED-LIST CL:READ-PRESERVING-WHITESPACE CL:READ) ) (PUTPROPS LLREAD COPYRIGHT ("Venue & Xerox Corporation" 1981 1982 1983 1984 1985 1986 1987 1988 1990 1991 1993 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (6807 17343 (LASTC 6817 . 7947) (PEEKC 7949 . 8337) (PEEKCCODE 8339 . 8628) (RATOM 8630 - . 9711) (READ 9713 . 10273) (READC 10275 . 10692) (READCCODE 10694 . 11110) (READP 11112 . 11664) ( -SETREADMACROFLG 11666 . 11965) (SKIPSEPRCODES 11967 . 13312) (SKIPSEPRS 13314 . 14571) ( -\NSIN.24BITENCODING.ERROR 14573 . 15392) (SKREAD 15394 . 17341)) (17389 26064 (CL:READ 17399 . 17948) -(CL:READ-PRESERVING-WHITESPACE 17950 . 18672) (CL:READ-DELIMITED-LIST 18674 . 19589) (CL:PARSE-INTEGER - 19591 . 26062)) (26157 40130 (RSTRING 26167 . 26899) (READ-EXTENDED-TOKEN 26901 . 31462) (\RSTRING2 -31464 . 40128)) (40166 72483 (\TOP-LEVEL-READ 40176 . 42159) (\SUBREAD 42161 . 68899) (\SUBREADCONCAT -68901 . 69524) (\ORIG-READ.SYMBOL 69526 . 70594) (\ORIG-INVALID.SYMBOL 70596 . 71495) (\APPLYREADMACRO - 71497 . 71913) (INREADMACROP 71915 . 72481)) (72642 72817 (READQUOTE 72652 . 72815)) (72842 84746 ( -READVBAR 72852 . 74183) (READHASHMACRO 74185 . 79995) (DEFMACRO-LAMBDA-LIST-KEYWORD-P 79997 . 80217) ( -DIGITBASEP 80219 . 80953) (READNUMBERINBASE 80955 . 82841) (ESTIMATE-DIMENSIONALITY 82843 . 83168) ( -SKIP.HASH.COMMENT 83170 . 84138) (CMLREAD.FEATURE.PARSER 84140 . 84744)) (84790 91323 (CHARACTER.READ -84800 . 86054) (CHARCODE.DECODE 86056 . 91321)) (111533 116749 (\MAKE.JIS.TO.XCCS.CONV.TABLE 111543 . -116747)) (120665 120984 (CONVHANKAKU 120675 . 120982)) (123955 149095 (\JISIN 123965 . 129666) ( -\JISPEEK 129668 . 136294) (\BACKJISCHAR 136296 . 136665) (\SHIFTJISIN 136667 . 138306) (\SHIFTJISPEEK -138308 . 140414) (\BACKSHIFTJISCHAR 140416 . 140846) (\EUCIN 140848 . 143239) (\EUCPEEK 143241 . -146820) (\BACKEUCCHAR 146822 . 148065) (\THROUGHIN 148067 . 148482) (\THROUGHPEEK 148484 . 148898) ( -\BACKTHROUGHCHAR 148900 . 149093))))) + (FILEMAP (NIL (3513 11730 (LASTC 3523 . 3829) (PEEKC 3831 . 4219) (PEEKCCODE 4221 . 4514) (RATOM 4516 + . 5597) (READ 5599 . 6159) (READC 6161 . 6796) (READCCODE 6798 . 7551) (READP 7553 . 8105) ( +SETREADMACROFLG 8107 . 8406) (SKIPSEPRCODES 8408 . 9391) (SKIPSEPRS 9393 . 9779) (SKREAD 9781 . 11728) +) (11776 20451 (CL:READ 11786 . 12335) (CL:READ-PRESERVING-WHITESPACE 12337 . 13059) ( +CL:READ-DELIMITED-LIST 13061 . 13976) (CL:PARSE-INTEGER 13978 . 20449)) (20544 33483 (RSTRING 20554 . +21286) (READ-EXTENDED-TOKEN 21288 . 25154) (\RSTRING2 25156 . 33481)) (33519 66982 (\TOP-LEVEL-READ +33529 . 35512) (\SUBREAD 35514 . 61005) (\SUBREADCONCAT 61007 . 61630) (\ORIG-READ.SYMBOL 61632 . +62700) (\ORIG-INVALID.SYMBOL 62702 . 63601) (\APPLYREADMACRO 63603 . 64019) (INREADMACROP 64021 . +64587) (\CHECKEOLC.CRLF 64589 . 66980)) (67141 67316 (READQUOTE 67151 . 67314)) (67341 79245 (READVBAR + 67351 . 68682) (READHASHMACRO 68684 . 74494) (DEFMACRO-LAMBDA-LIST-KEYWORD-P 74496 . 74716) ( +DIGITBASEP 74718 . 75452) (READNUMBERINBASE 75454 . 77340) (ESTIMATE-DIMENSIONALITY 77342 . 77667) ( +SKIP.HASH.COMMENT 77669 . 78637) (CMLREAD.FEATURE.PARSER 78639 . 79243)) (79289 85822 (CHARACTER.READ +79299 . 80553) (CHARCODE.DECODE 80555 . 85820)) (90247 95097 (\OUTCHAR 90257 . 90660) (\INCCODE 90662 + . 91345) (\BACKCCODE 91347 . 91647) (\PEEKCCODE 91649 . 91965) (\PEEKCCODE.NOEOLC 91967 . 92229) ( +\INCHAR 92231 . 92915) (\INCCODE.EOLC 92917 . 93607) (\FORMATBYTESTREAM 93609 . 95095))))) STOP diff --git a/sources/LLREAD.LCOM b/sources/LLREAD.LCOM index 72a179204..2c78f2fef 100644 Binary files a/sources/LLREAD.LCOM and b/sources/LLREAD.LCOM differ diff --git a/sources/LLREAD.XLCOM b/sources/LLREAD.XLCOM new file mode 100644 index 000000000..720456a0e Binary files /dev/null and b/sources/LLREAD.XLCOM differ diff --git a/sources/MACHINEINDEPENDENT b/sources/MACHINEINDEPENDENT index c505231bf..475b1c114 100644 --- a/sources/MACHINEINDEPENDENT +++ b/sources/MACHINEINDEPENDENT @@ -1,13 +1,14 @@ -(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "XCL" BASE 10) -(FILECREATED " 4-Feb-2021 19:07:44" |{DSK}larry>ilisp>medley>sources>MACHINEINDEPENDENT.;2| 77071 +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "XCL" BASE 10 FORMAT XCCS) +(FILECREATED " 9-Jul-2021 22:18:59"  +|{DSK}kaplan>Local>medley3.5>git-medley>sources>MACHINEINDEPENDENT.;4| 78156 - |changes| |to:| (VARS MACHINEINDEPENDENTCOMS) + |changes| |to:| (FNS LISPSOURCEFILEP) - |previous| |date:| "27-Feb-91 18:30:38" -|{DSK}larry>ilisp>medley>sources>MACHINEINDEPENDENT.;1|) + |previous| |date:| " 9-Jul-2021 08:06:11" +|{DSK}kaplan>Local>medley3.5>git-medley>sources>MACHINEINDEPENDENT.;3|) -; Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 2021 by Venue & Xerox Corporation. All rights reserved. +; Copyright (c) 1983-1991, 2021 by Venue & Xerox Corporation. ; The following program was created in 1983 but has not been published ; within the meaning of the copyright law, is furnished under license, ; and may not be used, copied and/or disclosed except in accordance @@ -16,11 +17,11 @@ (PRETTYCOMPRINT MACHINEINDEPENDENTCOMS) (RPAQQ MACHINEINDEPENDENTCOMS - ((COMS (* \; " \"File loader\"") + ((COMS (* \; " \"File loader\"") (FNS LOAD? FILESLOAD DOFILESLOAD FINDFILE-WITH-EXTENSIONS READ-FILECREATED) (INITVARS (*COMPILED-EXTENSIONS* (LIST FASL.EXT COMPILE.EXT)))) - (COMS (* \; - "random machine-independent utilities") + (COMS (* \; + "random machine-independent utilities") (FNS DMPHASH HASHOVERFLOW) (DECLARE\: EVAL@COMPILE DONTCOPY (MACROS HASHOVERFLOW.ARRAYTEST HASHOVERFLOW.UPDATEARRAY)) @@ -29,19 +30,19 @@ READLINE REMPROPLIST RESETBUFS TAB UNSAVED1 WRITEFILE CLOSE-AND-MAYBE-DELETE UNSAFE.TO.MODIFY) (VARS UNSAFE.TO.MODIFY.FNS) - (COMS (* \; - "FILEDATE, for finding out the creation date of source files, from the compiled files.") + (COMS (* \; + "FILEDATE, for finding out the creation date of source files, from the compiled files.") - (* |;;| "FASL isn't loaded when MACHINEINDEPENDENT is, so we have to fake the FASL checker for now. It's defined in FASLOAD.") + (* |;;| "FASL isn't loaded when MACHINEINDEPENDENT is, so we have to fake the FASL checker for now. It's defined in FASLOAD.") (FNS FILEDATE) (P (MOVD? 'NILL 'FASL-FILEDATE))) (P (MOVD? 'CL:FMAKUNBOUND 'UNDOABLY-FMAKUNBOUND)) - (* \; - "used in FNS.PUTDEF before CMLUNDO loaded") + (* \; + "used in FNS.PUTDEF before CMLUNDO loaded") ) - (COMS (* \; - "Functions for retrieving and remembering FILEMAPs and file reader environments") + (COMS (* \; + "Functions for retrieving and remembering FILEMAPs and file reader environments") (FNS FILEMAP \\PARSE-FILE-HEADER GET-ENVIRONMENT-AND-FILEMAP LOOKUP-ENVIRONMENT-AND-FILEMAP GET-FILEMAP-FROM-FILECREATED \\FILEMAP-HASHOVERFLOW FLUSHFILEMAPS LISPSOURCEFILEP GETFILEMAP PUTFILEMAP UPDATEFILEMAP @@ -55,9 +56,9 @@ (GLOBALVARS *FILEMAP-LIMIT* *FILEMAP-VERSIONS* *FILEMAP-HASH*))) (COMS (* * LVLPRINT) (FNS LVLPRINT LVLPRIN1 LVLPRIN2 LVLPRIN LVLPRIN0)) - (COMS (* \; "used by PRINTOUT") + (COMS (* \; "used by PRINTOUT") (FNS FLUSHRIGHT PRINTPARA PRINTPARA1)) - (COMS (* \; "SUBLIS and friends") + (COMS (* \; "SUBLIS and friends") (FNS SUBLIS SUBPAIR DSUBLIS)) (COMS (* * CONSTANTS) (FNS CONSTANTOK) @@ -72,8 +73,8 @@ USERWORDS BELLS CLISPARRAY) (FNS NLAMBDA.ARGS) (DECLARE\: - DONTEVAL@LOAD DOCOPY (* \; - "initialization of variables used in many places") + DONTEVAL@LOAD DOCOPY (* \; + "initialization of variables used in many places") (ADDVARS (CLISPARRAY) (CLISPFLG) (CTRLUFLG) @@ -565,9 +566,26 @@ The first expression on the file is read in the current reader environment. Usu (lambda (rootname) (* |bvm:| "26-Sep-86 11:37") (|if| (eq rootname t) |then| (clrhash *filemap-hash*) |else| (maphash *filemap-hash* (function (lambda (me fullname) (|if| (string-equal (|fetch| fmrootname |of| me) rootname) |then| (remhash fullname *filemap-hash*)))))) rootname) ) -(lispsourcefilep -(lambda (file) (* |bvm:| "29-Sep-86 23:15") (* |;;;| "If the first few characters of FILE `look like' those output by MAKEFILE then return the alleged address in the file of its FILEMAP expression.") (resetlst (|if| (not (streamp file)) |then| (resetsave nil (list (quote closef) (setq file (openstream file (quote input)))))) (|if| (randaccessp file) |then| (let ((here (getfileptr file))) (prog1 (cl:multiple-value-bind (env map) (\\parse-file-header file (function (lambda (stream) (* \; "Pointed now right after the FILECREATED expression") (car (nlsetq (skread stream) (skread stream) (fixp (read stream))))))) map) (setfileptr file here)))))) -) +(LISPSOURCEFILEP + (LAMBDA (FILE) (* \; "Edited 9-Jul-2021 22:12 by rmk:") + +(* |;;;| "If the first few characters of FILE `look like' those output by MAKEFILE then return the alleged address in the file of its FILEMAP expression.") + + (RESETLST + (CL:UNLESS (STREAMP FILE) + (RESETSAVE NIL (LIST 'CLOSEF (SETQ FILE (OPENSTREAM FILE 'INPUT))))) + (CL:WHEN (RANDACCESSP FILE) + (LET ((HERE (GETFILEPTR FILE))) + (CL:MULTIPLE-VALUE-BIND (ENV MAP) + (\\PARSE-FILE-HEADER FILE (FUNCTION (LAMBDA (STREAM) + (* \; + "Pointed now right after the FILECREATED expression") + (CAR (NLSETQ (SKREAD STREAM) + (SKREAD STREAM) + (FIXP (READ STREAM))))) + )) + (SETFILEPTR FILE HERE) + (CL:VALUES ENV MAP))))))) (getfilemap (lambda (stream fl) (* |bvm:| "27-Aug-86 15:48") (* |;;;| "Value is map for STREAM either obtained from the file itself, or from its property list. STREAM is presumed open. FL is (NAMEFIELD STREAM T)") (and usemapflg (cl:multiple-value-bind (env map) (get-environment-and-filemap stream) map))) @@ -585,9 +603,26 @@ This has little hope of working any more.") (|if| nil |then| (* \; "This has lit " stream) (setq filemapadr (getfileptr stream)) (prin3 "(FILEMAP " stream) (position stream (constant (nchars "(FILEMAP "))) (let ((*print-radix* 10)) (prin2 filemap stream)) (prin1 "))" stream) (terpri stream) (print (quote stop) stream) (setfileptr stream filemaplocadr) (printnum (list (quote fix) filemaploclen) filemapadr stream) (cond ((neq dfnflg t) (prin3 "****rewrote file map for " t) (print fullname t t))))) t)))) ) -(print-reader-environment -(lambda (env stream) (* |bvm:| "24-Oct-86 15:53") (* |;;;| "If ENV is not the old default interlisp reader environment, writes a DEFINE-FILE-INFO expression on STREAM that will produce this environment when the file is loaded.") (|if| (not (equal-reader-environment env *old-interlisp-read-environment*)) |then| (let ((*package* *interlisp-package*) (*print-base* 10) pkg) (print (cons (quote define-file-info) (or (|fetch| respec |of| env) (bquote ((\\\,@ (and (setq pkg (|fetch| repackage |of| env)) (bquote (:package (\\\, (cl:package-name pkg)))))) :readtable (\\\, (readtableprop (|fetch| rereadtable |of| env) (quote name))) :base (\\\, (|fetch| rebase |of| env)))))) stream filerdtbl)))) -) +(PRINT-READER-ENVIRONMENT + (LAMBDA (ENV STREAM) (* \; "Edited 9-Jul-2021 07:53 by rmk:") + +(* |;;;| "If ENV is not the old default interlisp reader environment, writes a DEFINE-FILE-INFO expression on STREAM that will produce this environment when the file is loaded.") + + (|if| (NOT (EQUAL-READER-ENVIRONMENT ENV *OLD-INTERLISP-READ-ENVIRONMENT*)) + |then| (LET ((*PACKAGE* *INTERLISP-PACKAGE*) + (*PRINT-BASE* 10) + PKG) + (PRINT (CONS 'DEFINE-FILE-INFO + `(,@(AND (SETQ PKG (|fetch| REPACKAGE |of| ENV)) + `(:PACKAGE ,(CL:PACKAGE-NAME PKG))) + :READTABLE + ,(READTABLEPROP (|fetch| REREADTABLE |of| ENV) + 'NAME) + :BASE + ,(|fetch| REBASE |of| ENV) + :FORMAT + ,(FETCH REFORMAT OF ENV))) + STREAM FILERDTBL))))) ) (RPAQ? *FILEMAP-LIMIT* 20) @@ -948,23 +983,23 @@ This has little hope of working any more.") (|if| nil |then| (* \; "This has lit (PUTPROPS MACHINEINDEPENDENT COPYRIGHT ("Venue & Xerox Corporation" T 1983 1984 1985 1986 1987 1988 1989 1990 1991 2021)) (DECLARE\: DONTCOPY - (FILEMAP (NIL (12991 19140 (LOAD? 13001 . 13728) (FILESLOAD 13730 . 13954) (DOFILESLOAD 13956 . 16893) - (FINDFILE-WITH-EXTENSIONS 16895 . 18625) (READ-FILECREATED 18627 . 19138)) (19258 23713 (DMPHASH -19268 . 19846) (HASHOVERFLOW 19848 . 23711)) (24515 43785 (BKBUFS 24525 . 25306) (CHANGENAME 25308 . -25481) (CHNGNM 25483 . 26693) (CLBUFS 26695 . 27647) (DEFINE 27649 . 27969) (FNS.PUTDEF 27971 . 30151) - (EQMEMB 30153 . 30249) (EQUALN 30251 . 30753) (FNCHECK 30755 . 31900) (FNTYP1 31902 . 31986) (LCSKIP -31988 . 32432) (MAPRINT 32434 . 32962) (MKLIST 32964 . 33046) (NAMEFIELD 33048 . 34102) (NLIST 34104 - . 34278) (PRINTBELLS 34280 . 34351) (PROMPTCHAR 34353 . 35609) (RAISEP 35611 . 35791) (READFILE 35793 - . 36804) (READLINE 36806 . 40522) (REMPROPLIST 40524 . 41003) (RESETBUFS 41005 . 41252) (TAB 41254 . -41564) (UNSAVED1 41566 . 42197) (WRITEFILE 42199 . 43174) (CLOSE-AND-MAYBE-DELETE 43176 . 43452) ( -UNSAFE.TO.MODIFY 43454 . 43783)) (46112 47367 (FILEDATE 46122 . 47365)) (47599 60551 (FILEMAP 47609 . -47952) (\\PARSE-FILE-HEADER 47954 . 50101) (GET-ENVIRONMENT-AND-FILEMAP 50103 . 51499) ( -LOOKUP-ENVIRONMENT-AND-FILEMAP 51501 . 52689) (GET-FILEMAP-FROM-FILECREATED 52691 . 53181) ( -\\FILEMAP-HASHOVERFLOW 53183 . 55231) (FLUSHFILEMAPS 55233 . 55533) (LISPSOURCEFILEP 55535 . 56206) ( -GETFILEMAP 56208 . 56522) (PUTFILEMAP 56524 . 57625) (UPDATEFILEMAP 57627 . 59821) ( -PRINT-READER-ENVIRONMENT 59823 . 60549)) (61169 63349 (LVLPRINT 61179 . 61309) (LVLPRIN1 61311 . 61458 -) (LVLPRIN2 61460 . 61636) (LVLPRIN 61638 . 62299) (LVLPRIN0 62301 . 63347)) (63384 66691 (FLUSHRIGHT -63394 . 63900) (PRINTPARA 63902 . 64725) (PRINTPARA1 64727 . 66689)) (66728 67842 (SUBLIS 66738 . -67061) (SUBPAIR 67063 . 67582) (DSUBLIS 67584 . 67840)) (67865 68214 (CONSTANTOK 67875 . 68212)) ( -70300 70843 (NLAMBDA.ARGS 70310 . 70841))))) + (FILEMAP (NIL (12967 19116 (LOAD? 12977 . 13704) (FILESLOAD 13706 . 13930) (DOFILESLOAD 13932 . 16869) + (FINDFILE-WITH-EXTENSIONS 16871 . 18601) (READ-FILECREATED 18603 . 19114)) (19234 23689 (DMPHASH +19244 . 19822) (HASHOVERFLOW 19824 . 23687)) (24491 43761 (BKBUFS 24501 . 25282) (CHANGENAME 25284 . +25457) (CHNGNM 25459 . 26669) (CLBUFS 26671 . 27623) (DEFINE 27625 . 27945) (FNS.PUTDEF 27947 . 30127) + (EQMEMB 30129 . 30225) (EQUALN 30227 . 30729) (FNCHECK 30731 . 31876) (FNTYP1 31878 . 31962) (LCSKIP +31964 . 32408) (MAPRINT 32410 . 32938) (MKLIST 32940 . 33022) (NAMEFIELD 33024 . 34078) (NLIST 34080 + . 34254) (PRINTBELLS 34256 . 34327) (PROMPTCHAR 34329 . 35585) (RAISEP 35587 . 35767) (READFILE 35769 + . 36780) (READLINE 36782 . 40498) (REMPROPLIST 40500 . 40979) (RESETBUFS 40981 . 41228) (TAB 41230 . +41540) (UNSAVED1 41542 . 42173) (WRITEFILE 42175 . 43150) (CLOSE-AND-MAYBE-DELETE 43152 . 43428) ( +UNSAFE.TO.MODIFY 43430 . 43759)) (46088 47343 (FILEDATE 46098 . 47341)) (47575 61636 (FILEMAP 47585 . +47928) (\\PARSE-FILE-HEADER 47930 . 50077) (GET-ENVIRONMENT-AND-FILEMAP 50079 . 51475) ( +LOOKUP-ENVIRONMENT-AND-FILEMAP 51477 . 52665) (GET-FILEMAP-FROM-FILECREATED 52667 . 53157) ( +\\FILEMAP-HASHOVERFLOW 53159 . 55207) (FLUSHFILEMAPS 55209 . 55509) (LISPSOURCEFILEP 55511 . 56762) ( +GETFILEMAP 56764 . 57078) (PUTFILEMAP 57080 . 58181) (UPDATEFILEMAP 58183 . 60377) ( +PRINT-READER-ENVIRONMENT 60379 . 61634)) (62254 64434 (LVLPRINT 62264 . 62394) (LVLPRIN1 62396 . 62543 +) (LVLPRIN2 62545 . 62721) (LVLPRIN 62723 . 63384) (LVLPRIN0 63386 . 64432)) (64469 67776 (FLUSHRIGHT +64479 . 64985) (PRINTPARA 64987 . 65810) (PRINTPARA1 65812 . 67774)) (67813 68927 (SUBLIS 67823 . +68146) (SUBPAIR 68148 . 68667) (DSUBLIS 68669 . 68925)) (68950 69299 (CONSTANTOK 68960 . 69297)) ( +71385 71928 (NLAMBDA.ARGS 71395 . 71926))))) STOP diff --git a/sources/MACHINEINDEPENDENT.LCOM b/sources/MACHINEINDEPENDENT.LCOM index d668f08da..7fab5eaa1 100644 Binary files a/sources/MACHINEINDEPENDENT.LCOM and b/sources/MACHINEINDEPENDENT.LCOM differ diff --git a/sources/PACKAGE-STARTUP b/sources/PACKAGE-STARTUP index 6d108f1bc..55f5bcd61 100644 --- a/sources/PACKAGE-STARTUP +++ b/sources/PACKAGE-STARTUP @@ -1,71 +1,69 @@ (DEFINE-FILE-INFO READTABLE "XCL" PACKAGE "INTERLISP") -(FILECREATED "15-Mar-91 17:09:30" |{PELE:MV:ENVOS}SOURCES>PACKAGE-STARTUP.;4| 37574 +(FILECREATED "28-Jun-2021 13:02:48"  +|{DSK}kaplan>Local>medley3.5>git-medley>sources>PACKAGE-STARTUP.;2| 36550 - |changes| |to:| (FUNCTIONS PACKAGE-MAKE) + |changes| |to:| (FUNCTIONS PACKAGE-ENABLE) - |previous| |date:| "27-Feb-91 20:17:52" |{PELE:MV:ENVOS}SOURCES>PACKAGE-STARTUP.;3| -) + |previous| |date:| "15-Mar-91 17:09:30" +|{DSK}kaplan>Local>medley3.5>git-medley>sources>PACKAGE-STARTUP.;1|) -; Copyright (c) 1986, 1987, 1988, 1990, 1991 by Venue & Xerox Corporation. All rights reserved. +; Copyright (c) 1986-1988, 1990-1991, 2021 by Venue & Xerox Corporation. (PRETTYCOMPRINT PACKAGE-STARTUPCOMS) -(RPAQQ PACKAGE-STARTUPCOMS ( - -(* |;;;| "Initialize the package system (LLPACKAGE must be loaded)") - - - (* |;;| "Simple definitions for the init. Improved in CMLPACKAGE") - - (FUNCTIONS RETURN-FIRST-OF-THREE ERROR-MISSING-EXTERNAL-SYMBOL) - (P (MOVD? 'ERROR-MISSING-EXTERNAL-SYMBOL - 'RESOLVE-MISSING-EXTERNAL-SYMBOL) - (MOVD? 'ERROR 'RESOLVE-MISSING-PACKAGE) - (MOVD? 'ERROR 'RESOLVE-USE-PACKAGE-CONFLICT) - (MOVD? 'ERROR 'RESOLVE-EXPORT-CONFLICT) - (MOVD? 'ERROR 'RESOLVE-EXPORT-MISSING-CONFLICT) - (MOVD? 'ERROR 'RESOLVE-IMPORT-CONFLICT) - (MOVD? 'ERROR 'RESOLVE-UNINTERN-CONFLICT) - (MOVD? 'RETURN-FIRST-OF-THREE 'RESOLVE-READER-CONFLICT) - (* \; - "In pre-package init all symbols are prefixed, thus the INTERLISP symbol is always default") - ) - - (* |;;| "Reader changes") - - (FUNCTIONS CHECK-SYMBOL-NAMESTRING \\NEW.READ.SYMBOL \\NEW.MKATOM) - (VARIABLES LITATOM-PACKAGE-CONVERSION-ENABLED) - - (* |;;| "Initialization tables and functions") - - (VARIABLES CMLSYMBOLS.VARS CMLSYMBOLS.FNNAMES CMLSYMBOLS.DECLARATORS - CMLSYMBOLS.TYPENAMES CMLSYMBOLS.MACROS CMLSYMBOLS.SPECIALFORMS - CMLSYMBOLS.LAMBDA.LIST.KEYWORDS) - (VARIABLES (* \; "Be very careful with this.") - CMLSYMBOLS.SHARED) - (FUNCTIONS LITATOM.EXISTS) - (VARIABLES LITATOM-PACKAGE-CONVERSION-TABLE) - (FUNCTIONS NAMESTRING-CONVERSION-CLAUSE CONVERT-LITATOM - CONCOCT-SYMBOL TRANSFER-SYMBOL INTERN-LITATOM - \\LITATOM.EATCHARS) - (FUNCTIONS PACKAGE-INIT PACKAGE-CLEAR PACKAGE-MAKE - PACKAGE-HIERARCHY-INIT PACKAGE-ENABLE PACKAGE-DISABLE) - - (* |;;| "A hack for initialization") - - (FUNCTIONS ID) - (PROP (FILETYPE MAKEFILE-ENVIRONMENT) - PACKAGE-STARTUP) - - (* |;;| - "Initialize package system, plus functions needed in llpackage at init time") - - (DECLARE\: DONTEVAL@LOAD DOCOPY (P (MOVD? 'EQ 'EQL) - (MOVD? 'LENGTH 'CL:LENGTH) - (MOVD? 'ID 'CL:IDENTITY) - (MOVD? 'ID 'REMOVE-COMMENTS) - (PACKAGE-INIT))))) +(RPAQQ PACKAGE-STARTUPCOMS + ( + +(* |;;;| "Initialize the package system (LLPACKAGE must be loaded)") + + + (* |;;| "Simple definitions for the init. Improved in CMLPACKAGE") + + (FUNCTIONS RETURN-FIRST-OF-THREE ERROR-MISSING-EXTERNAL-SYMBOL) + (P (MOVD? 'ERROR-MISSING-EXTERNAL-SYMBOL 'RESOLVE-MISSING-EXTERNAL-SYMBOL) + (MOVD? 'ERROR 'RESOLVE-MISSING-PACKAGE) + (MOVD? 'ERROR 'RESOLVE-USE-PACKAGE-CONFLICT) + (MOVD? 'ERROR 'RESOLVE-EXPORT-CONFLICT) + (MOVD? 'ERROR 'RESOLVE-EXPORT-MISSING-CONFLICT) + (MOVD? 'ERROR 'RESOLVE-IMPORT-CONFLICT) + (MOVD? 'ERROR 'RESOLVE-UNINTERN-CONFLICT) + (MOVD? 'RETURN-FIRST-OF-THREE 'RESOLVE-READER-CONFLICT) + (* \; + "In pre-package init all symbols are prefixed, thus the INTERLISP symbol is always default") + ) + + (* |;;| "Reader changes") + + (FUNCTIONS CHECK-SYMBOL-NAMESTRING \\NEW.READ.SYMBOL \\NEW.MKATOM) + (VARIABLES LITATOM-PACKAGE-CONVERSION-ENABLED) + + (* |;;| "Initialization tables and functions") + + (VARIABLES CMLSYMBOLS.VARS CMLSYMBOLS.FNNAMES CMLSYMBOLS.DECLARATORS CMLSYMBOLS.TYPENAMES + CMLSYMBOLS.MACROS CMLSYMBOLS.SPECIALFORMS CMLSYMBOLS.LAMBDA.LIST.KEYWORDS) + (VARIABLES (* \; "Be very careful with this.") + CMLSYMBOLS.SHARED) + (FUNCTIONS LITATOM.EXISTS) + (VARIABLES LITATOM-PACKAGE-CONVERSION-TABLE) + (FUNCTIONS NAMESTRING-CONVERSION-CLAUSE CONVERT-LITATOM CONCOCT-SYMBOL TRANSFER-SYMBOL + INTERN-LITATOM \\LITATOM.EATCHARS) + (FUNCTIONS PACKAGE-INIT PACKAGE-CLEAR PACKAGE-MAKE PACKAGE-HIERARCHY-INIT PACKAGE-ENABLE + PACKAGE-DISABLE) + + (* |;;| "A hack for initialization") + + (FUNCTIONS ID) + (PROP (FILETYPE MAKEFILE-ENVIRONMENT) + PACKAGE-STARTUP) + + (* |;;| "Initialize package system, plus functions needed in llpackage at init time") + + (DECLARE\: DONTEVAL@LOAD DOCOPY (P (MOVD? 'EQ 'EQL) + (MOVD? 'LENGTH 'CL:LENGTH) + (MOVD? 'ID 'CL:IDENTITY) + (MOVD? 'ID 'REMOVE-COMMENTS) + (PACKAGE-INIT))))) @@ -100,8 +98,8 @@ (MOVD? 'RETURN-FIRST-OF-THREE 'RESOLVE-READER-CONFLICT) - (* \; - "In pre-package init all symbols are prefixed, thus the INTERLISP symbol is always default") + (* \; + "In pre-package init all symbols are prefixed, thus the INTERLISP symbol is always default") @@ -133,7 +131,7 @@ (OR (AND (NOT NONNUMERICP) (\\PARSE.NUMBER BASE OFFSET LEN FATP)) (AND - (* |;;| "The reader conversion feature is contained in this expression") + (* |;;| "The reader conversion feature is contained in this expression") LITATOM-PACKAGE-CONVERSION-ENABLED (NULL PACKAGE) @@ -144,13 +142,13 @@ (FIND-SYMBOL* BASE OFFSET LEN FATP *LISP-PACKAGE*) (LET ((ILSYM (FIND-SYMBOL* BASE OFFSET LEN FATP *INTERLISP-PACKAGE*))) (COND - ((NULL ILSYM) (* \; "No IL symbol, try CL") + ((NULL ILSYM) (* \; "No IL symbol, try CL") CLSYM) - ((NULL CLSYM) (* \; "No CL symbol, use IL") + ((NULL CLSYM) (* \; "No CL symbol, use IL") ILSYM) - ((EQ ILSYM CLSYM) (* \; "SAME") + ((EQ ILSYM CLSYM) (* \; "SAME") ILSYM) - (T (* \; "Both symbols exist, resolve. During the INIT where packages are turned off this is defined to return its first argument.") + (T (* \; "Both symbols exist, resolve. During the INIT where packages are turned off this is defined to return its first argument.") (RESOLVE-READER-CONFLICT ILSYM CLSYM CLSYMWHERE))))))) (COND ((STRINGP PACKAGE) @@ -166,8 +164,8 @@ (COND ((EQ ACCESSIBLE :EXTERNAL) CL:SYMBOL) - ((CL::%PACKAGE-EXTERNAL-ONLY PACKAGE) (* \; - "External only packages don't error creating external symbols on read") + ((CL::%PACKAGE-EXTERNAL-ONLY PACKAGE) (* \; + "External only packages don't error creating external symbols on read") (INTERN* BASE OFFSET LEN FATP (\\FATCHARSEENP BASE OFFSET LEN FATP) (OR PACKAGE *PACKAGE*) T)) @@ -184,20 +182,20 @@ (UNLESSRDSYS (COND ((AND (EQ LEN 1) (ILEQ FIRSTCHAR \\MAXTHINCHAR) - |\\OneCharAtomBase|) (* \; - "The one-character atoms live in well known places, no need to hash") + |\\OneCharAtomBase|) (* \; + "The one-character atoms live in well known places, no need to hash") (RETURN (COND ((IGREATERP FIRSTCHAR (CHARCODE "9")) (\\ADDBASE |\\OneCharAtomBase| (IDIFFERENCE FIRSTCHAR 10))) ((IGEQ FIRSTCHAR (CHARCODE "0")) - (* \; - "These one-character atoms are integers") + (* \; + "These one-character atoms are integers") (IDIFFERENCE FIRSTCHAR (CHARCODE "0"))) (T (\\ADDBASE |\\OneCharAtomBase| FIRSTCHAR))))) ((AND (ILEQ FIRSTCHAR (CHARCODE "9")) (SETQ TEMP (\\PARSE.NUMBER BASE OFFST LEN FATP))) - (* |;;| "\\PARSE.NUMBER returns a number or NIL") + (* |;;| "\\PARSE.NUMBER returns a number or NIL") (RETURN TEMP)))) (RETURN (CL:VALUES (INTERN* BASE OFFST LEN FATP FATCHARSEENP *INTERLISP-PACKAGE* T))))) @@ -363,7 +361,7 @@ "RPLACA" "RPLACD" "SATISFIES" "SEQUENCE" "SET" "STRING" "STRING-EQUAL" "STREAM" "STREAMP" "T" "TAILP" "THE" "TIME" "TRACE" "TYPE" "TYPEP" "UNTRACE" "WRITE") -(* |;;;| "Symbols shared by the Interlisp and Lisp packages.") +(* |;;;| "Symbols shared by the Interlisp and Lisp packages.") ) @@ -390,7 +388,7 @@ (CL:DEFUN NAMESTRING-CONVERSION-CLAUSE (BASE OFFSET LEN FATP) -(* |;;;| "Check whether a given namestring has a prefix that would indicate membership in a package. If so, return the first clause out of the conversion table that matched. Otherwise, return NIL.") +(* |;;;| "Check whether a given namestring has a prefix that would indicate membership in a package. If so, return the first clause out of the conversion table that matched. Otherwise, return NIL.") (DECLARE (CL:SPECIAL LITATOM-PACKAGE-CONVERSION-TABLE)) (CL:DOLIST (CONVERSION-LIST LITATOM-PACKAGE-CONVERSION-TABLE NIL) @@ -407,7 +405,7 @@ (CL:DEFUN CONVERT-LITATOM (ATOM) - (* |;;| "Conditionally move an INTERLISP litatom into a package based on the naming conventions in LITATOM-PACKAGE-CONVERSION-TABLE.") + (* |;;| "Conditionally move an INTERLISP litatom into a package based on the naming conventions in LITATOM-PACKAGE-CONVERSION-TABLE.") (LET* ((BASE (|ffetch| (CL:SYMBOL PNAMEBASE) |of| ATOM)) (LEN (|ffetch| (CL:SYMBOL PNAMELENGTH) |of| ATOM)) @@ -419,17 +417,17 @@ (WHERE (CL:FOURTH CLAUSE)) (PREFIX-LENGTH (|ffetch| (STRINGP LENGTH) PREFIX))) - (\\LITATOM.EATCHARS ATOM PREFIX-LENGTH) (* \; "Take off the pseudo-package prefix. This makes the symbol inaccessible in INTERLISP (because not rehashed).") + (\\LITATOM.EATCHARS ATOM PREFIX-LENGTH) (* \; "Take off the pseudo-package prefix. This makes the symbol inaccessible in INTERLISP (because not rehashed).") (COND - (CL:PACKAGE-NAME (* \; - " Symbol is interned, put it in the package.") + (CL:PACKAGE-NAME (* \; + " Symbol is interned, put it in the package.") (INTERN-LITATOM ATOM (CL:FIND-PACKAGE CL:PACKAGE-NAME) :WHERE WHERE))) T)) (CL:DEFUN CONCOCT-SYMBOL (STRING) - (* |;;| "Create a symbol in the LISP package. Conflicting symbols must already have been converted and defined by CONVERT-LITATOM. Given a string, if a symbol by that name exists in INTERLISP (and doesn't conflict) we INTERN-LITATOM it into the LISP package, making that its home. Otherwise, we create a new one.") + (* |;;| "Create a symbol in the LISP package. Conflicting symbols must already have been converted and defined by CONVERT-LITATOM. Given a string, if a symbol by that name exists in INTERLISP (and doesn't conflict) we INTERN-LITATOM it into the LISP package, making that its home. Otherwise, we create a new one.") (DECLARE (CL:SPECIAL *LISP-PACKAGE* *INTERLISP-PACKAGE* CMLSYMBOLS.SHARED)) (LET (ILSYM CLSYM) @@ -439,27 +437,27 @@ (CL:WHEN (EQ WHERE :INTERNAL) (EXPORT SYM *LISP-PACKAGE*)) (SETQ CLSYM SYM) - WHERE) (* \; - "The CL symbol already exists. Make it external. If the symbol is shared, import it into IL.") + WHERE) (* \; + "The CL symbol already exists. Make it external. If the symbol is shared, import it into IL.") (CL:WHEN (CL:MEMBER STRING CMLSYMBOLS.SHARED :TEST 'STREQUAL) (IMPORT CLSYM *INTERLISP-PACKAGE*))) - (* |;;| "From this point down, the CL symbol doesn't yet exist.") + (* |;;| "From this point down, the CL symbol doesn't yet exist.") ((CL:MEMBER STRING CMLSYMBOLS.SHARED :TEST 'STREQUAL) - (* \; "The symbol is shared. Create it in CL and import it to IL. NOTE that the symbol should never be found in IL.") + (* \; "The symbol is shared. Create it in CL and import it to IL. NOTE that the symbol should never be found in IL.") (COND ((CL:FIND-SYMBOL STRING *INTERLISP-PACKAGE*) (CL:ERROR "Shared symbol found in IL: ~S" STRING) - (* |;;| "(intern-litatom ilsym *lisp-package* :where :external)") + (* |;;| "(intern-litatom ilsym *lisp-package* :where :external)") ) (T (LET ((SYM (CL:INTERN STRING *LISP-PACKAGE*))) (EXPORT SYM *LISP-PACKAGE*) (IMPORT SYM *INTERLISP-PACKAGE*))))) - (T (* \; - "Symbol doesn't exist, so just create it in LISP.") + (T (* \; + "Symbol doesn't exist, so just create it in LISP.") (EXPORT (CL:INTERN STRING *LISP-PACKAGE*) *LISP-PACKAGE*))))) @@ -547,20 +545,20 @@ (CL:DEFUN PACKAGE-HIERARCHY-INIT (&OPTIONAL (CONVERT? NIL)) -(* |;;;| "Fill all the initial system packages with their proper symbols, moving litatoms into appropriate places and such. If convert? is non-nil then symbols whose pnames have fake package qualifiers, like cl:length, will be converted IN PLACE to remove the qualifier. If conversion takes place you cannot fully disable the package system.") +(* |;;;| "Fill all the initial system packages with their proper symbols, moving litatoms into appropriate places and such. If convert? is non-nil then symbols whose pnames have fake package qualifiers, like cl:length, will be converted IN PLACE to remove the qualifier. If conversion takes place you cannot fully disable the package system.") (DECLARE (CL:SPECIAL *INTERLISP-PACKAGE* *KEYWORD-PACKAGE* CMLSYMBOLS.LAMBDA.LIST.KEYWORDS CMLSYMBOLS.SPECIALFORMS CMLSYMBOLS.MACROS CMLSYMBOLS.TYPENAMES CMLSYMBOLS.FNNAMES CMLSYMBOLS.DECLARATORS CMLSYMBOLS.VARS)) - (* |;;| "Fill the INTERLISP package with its symbols.") + (* |;;| "Fill the INTERLISP package with its symbols.") (MAPATOMS #'(CL:LAMBDA (ATOM) (CL:IF (OR (NULL CONVERT?) (NULL (CONVERT-LITATOM ATOM))) (INTERN-LITATOM ATOM *INTERLISP-PACKAGE* :WHERE :EXTERNAL)))) - (* |;;| "Fill the LISP package with its symbols.") + (* |;;| "Fill the LISP package with its symbols.") (CL:DOLIST (I (APPEND CMLSYMBOLS.VARS CMLSYMBOLS.FNNAMES CMLSYMBOLS.DECLARATORS CMLSYMBOLS.TYPENAMES CMLSYMBOLS.MACROS CMLSYMBOLS.SPECIALFORMS @@ -588,14 +586,14 @@ (READTABLEPROP (FIND-READTABLE "XCL") 'PACKAGECHAR (CHARCODE ":")))) - (RPAQ? *PER-EXEC-VARIABLES* NIL) + (RPAQ? *PER-EXEC-VARIABLES* NIL) (CL:PUSHNEW '(*PACKAGE* (COND ((CL:PACKAGEP *PACKAGE*) *PACKAGE*) (T (PROMPTPRINT "Invalid package, reset to LISP") (SETQ *PACKAGE* (CL:FIND-PACKAGE "LISP"))))) *PER-EXEC-VARIABLES* :TEST 'CL:EQUAL) - (CL:SETF *DEFAULT-MAKEFILE-ENVIRONMENT* '(:READTABLE "XCL" :PACKAGE "INTERLISP")) + (CL:SETF *DEFAULT-MAKEFILE-ENVIRONMENT* '(:READTABLE "XCL" :PACKAGE "INTERLISP" :FORMAT :XCCS)) (MOVD '\\NEW.READ.SYMBOL '\\READ.SYMBOL) (MOVD '\\NEW.MKATOM '\\MKATOM) (CL:SETF *PACKAGE* PACKAGE) @@ -623,9 +621,9 @@ (CL:DEFUN ID (X) X) -(PUTPROPS PACKAGE-STARTUP FILETYPE CL:COMPILE-FILE) +(PUTPROPS PACKAGE-STARTUP FILETYPE CL:COMPILE-FILE) -(PUTPROPS PACKAGE-STARTUP MAKEFILE-ENVIRONMENT (:READTABLE "XCL" :PACKAGE "INTERLISP")) +(PUTPROPS PACKAGE-STARTUP MAKEFILE-ENVIRONMENT (:READTABLE "XCL" :PACKAGE "INTERLISP")) @@ -643,7 +641,16 @@ (PACKAGE-INIT) ) -(PUTPROPS PACKAGE-STARTUP COPYRIGHT ("Venue & Xerox Corporation" 1986 1987 1988 1990 1991)) +(PUTPROPS PACKAGE-STARTUP COPYRIGHT ("Venue & Xerox Corporation" 1986 1987 1988 1990 1991 2021)) (DECLARE\: DONTCOPY - (FILEMAP (NIL))) + (FILEMAP (NIL (3098 3193 (RETURN-FIRST-OF-THREE 3098 . 3193)) (3195 3333 ( +ERROR-MISSING-EXTERNAL-SYMBOL 3195 . 3333)) (3938 4906 (CHECK-SYMBOL-NAMESTRING 3938 . 4906)) (4908 +8069 (\\NEW.READ.SYMBOL 4908 . 8069)) (8071 9777 (\\NEW.MKATOM 8071 . 9777)) (23575 23657 ( +LITATOM.EXISTS 23575 . 23657)) (24337 25303 (NAMESTRING-CONVERSION-CLAUSE 24337 . 25303)) (25305 26554 + (CONVERT-LITATOM 25305 . 26554)) (26556 28625 (CONCOCT-SYMBOL 26556 . 28625)) (28627 28921 ( +TRANSFER-SYMBOL 28627 . 28921)) (28923 29631 (INTERN-LITATOM 28923 . 29631)) (29633 30260 ( +\\LITATOM.EATCHARS 29633 . 30260)) (30262 30539 (PACKAGE-INIT 30262 . 30539)) (30541 31118 ( +PACKAGE-CLEAR 30541 . 31118)) (31120 32515 (PACKAGE-MAKE 31120 . 32515)) (32517 33838 ( +PACKAGE-HIERARCHY-INIT 32517 . 33838)) (33840 35303 (PACKAGE-ENABLE 33840 . 35303)) (35305 35948 ( +PACKAGE-DISABLE 35305 . 35948)) (35995 36021 (ID 35995 . 36021))))) STOP diff --git a/sources/PACKAGE-STARTUP.LCOM b/sources/PACKAGE-STARTUP.LCOM index 5316f9854..e7905b599 100644 Binary files a/sources/PACKAGE-STARTUP.LCOM and b/sources/PACKAGE-STARTUP.LCOM differ diff --git a/sources/PASSWORDS.LCOM b/sources/PASSWORDS.LCOM index 29ebffea4..3020ae64b 100644 Binary files a/sources/PASSWORDS.LCOM and b/sources/PASSWORDS.LCOM differ diff --git a/sources/PMAP b/sources/PMAP index 589e935c1..127838f01 100644 --- a/sources/PMAP +++ b/sources/PMAP @@ -1,13 +1,14 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED " 3-Feb-2002 14:11:02" {DSK}medley3.5>sources>PMAP.;2 58154 +(FILECREATED "23-Jun-2021 12:40:35" {DSK}kaplan>Local>medley3.5>git-medley>sources>PMAP.;6 60175 - changes to%: (FNS \PAGED.GETNEXTBUFFER) + changes to%: (FNS \PAGEDREADP) - previous date%: "19-Jan-93 11:00:45" {DSK}medley3.5>sources>PMAP.;1) + previous date%: "21-Jun-2021 21:45:16" +{DSK}kaplan>Local>medley3.5>git-medley>sources>PMAP.;5) (* ; " -Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1993, 2002 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1982-1988, 1990, 1993, 2002, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT PMAPCOMS) @@ -573,16 +574,17 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1993, 2002 by Venu (DECLARE%: DONTCOPY (* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE -(PUTPROPS \RELEASECPAGE MACRO - ((STREAM) - (PROGN (* ; +(PUTPROPS \RELEASECPAGE MACRO ((STREAM) + (PROGN (* ;  "Must be under an UNINTERRUPTABLY !") - (COND - ((fetch CBUFDIRTY of STREAM) - (\SETIODIRTY STREAM (fetch CPAGE of STREAM)) - (replace CBUFDIRTY of STREAM with NIL))) - (replace CBUFSIZE of STREAM with 0) - (replace CBUFPTR of STREAM with NIL)))) + (COND + ((fetch CBUFDIRTY of STREAM) + (\SETIODIRTY STREAM (fetch CPAGE + of STREAM)) + (replace CBUFDIRTY of STREAM with + NIL))) + (replace CBUFSIZE of STREAM with 0) + (replace CBUFPTR of STREAM with NIL)))) ) (* "END EXPORTED DEFINITIONS") @@ -622,29 +624,34 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1993, 2002 by Venu DEVICE]) (\PAGEDBACKFILEPTR - [LAMBDA (STREAM) (* bvm%: "13-Feb-85 23:32") - (* ; - "also see similar function \DRIBBACKFILEPTR") + [LAMBDA (STREAM) (* ; "Edited 13-Jun-2021 11:21 by rmk:") + (* ; + "also see similar function \DRIBBACKFILEPTR") [COND ((APPENDONLY STREAM) - (LISPERROR "ILLEGAL ARG" (fetch FULLNAME of STREAM] - (* ; - "Checks done separately so we dont take an error with interrupts off") + (LISPERROR "ILLEGAL ARG" (fetch (STREAM FULLNAME) of STREAM] + (* ; + "Checks done separately so we dont take an error with interrupts off") (\UPDATEOF STREAM) (COND - ((NOT (AND (EQ (fetch COFFSET of STREAM) + ((NOT (AND (EQ (fetch (STREAM COFFSET) of STREAM) 0) - (EQ (fetch CPAGE of STREAM) + (EQ (fetch (STREAM CPAGE) of STREAM) 0))) (UNINTERRUPTABLY - [replace COFFSET of STREAM with (COND - ((EQ (fetch COFFSET of STREAM) - 0) - (\RELEASECPAGE STREAM) - (add (fetch CPAGE of STREAM) - -1) - (SUB1 BYTESPERPAGE)) - (T (SUB1 (fetch COFFSET of STREAM] + [replace (STREAM COFFSET) of STREAM with (COND + ((EQ (fetch (STREAM COFFSET) + of STREAM) + 0) + (\RELEASECPAGE STREAM) + (add (fetch (STREAM + CPAGE) + of STREAM) + -1) + (SUB1 BYTESPERPAGE)) + (T (SUB1 (fetch (STREAM + COFFSET) + of STREAM] [replace (STREAM CHARPOSITION) of STREAM with (IMAX 0 (SUB1 (fetch (STREAM CHARPOSITION @@ -733,25 +740,26 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1993, 2002 by Venu OFFSET _ (fetch EOFFSET of STREAM]) (\PAGEDREADP - [LAMBDA (STREAM FLG) (* rmk%: " 5-Apr-85 11:10") + [LAMBDA (STREAM FLG) (* ; "Edited 23-Jun-2021 12:40 by rmk:") + + (* ;; "If FLG is NIL, a single EOL as the last character of the file doesn't count. This is a character operation, not a byte operation.") - (* ;; "If FLG is NIL, a single EOL as the last character of the file doesn't count.") - (* ; - "The 10 does not do the EOL check on the peeked character.") (AND (NOT (\PAGEDEOFP STREAM)) (OR (NOT (NULL FLG)) (NEQ EOL.TC (\SYNCODE \PRIMTERMSA (\PEEKCCODE STREAM))) - (OR (ILESSP (ffetch CPAGE of STREAM) - (ffetch EPAGE of STREAM)) - (PROGN - (* ;; "Having done a \PAGEDPEEKBIN above, we won't be in the case where COFFSET is BYTESPERPAGE Thus there are at least two characters in the buffer") - - (ILESSP (IPLUS (ffetch COFFSET of STREAM) - (COND - ((\RUNCODED STREAM) - 1) - (T 2))) - (ffetch CBUFSIZE of STREAM]) + (PROGN + (* ;; "We peeked at an EOL. Is there anything beyond that?") + + (OR (ILESSP (ffetch CPAGE of STREAM) + (ffetch EPAGE of STREAM)) + (PROGN + (* ;; "Yes if we aren't on the last page.") + + (* ;; "If on the last page, we know we are not at the end, because the just-peeked EOL is there. But we also don't know how many bytes the EOL occupied. So at this point we have to read the EOL, check to see if we are at then at the EOF, and then back out the EOL") + + (\INCHAR STREAM) + (PROG1 (NOT (\PAGEDEOFP STREAM)) + (\BACKCCODE STREAM]) (\PAGEDEOFP [LAMBDA (STREAM) (* ; "Edited 15-Jun-87 15:06 by jds") @@ -787,21 +795,22 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1993, 2002 by Venu T]) (\PAGED.GETNEXTBUFFER - [LAMBDA (STREAM WHATFOR NOERRORFLG) (* bvm%: "30-Sep-84 15:14") + [LAMBDA (STREAM WHATFOR NOERRORFLG) (* ; "Edited 13-Jun-2021 11:24 by rmk:") (* ;; "Advances STREAM to a new page. Leaves the current page pointer NIL as the new page may never be written, so must update eof. Returns T on success; any other return is a value to use by \BIN") - (PROG ((CPAGE# (fetch CPAGE of STREAM)) - (COFF (fetch COFFSET of STREAM)) + (PROG ((CPAGE# (fetch (STREAM CPAGE) of STREAM)) + (COFF (fetch (STREAM COFFSET) of STREAM)) EPAGE# BUF) [COND ((NOT (OPENED STREAM)) - (LISPERROR "FILE NOT OPEN" (fetch FULLNAME of STREAM] + (LISPERROR "FILE NOT OPEN" (fetch (STREAM FULLNAME) of STREAM] (COND ((AND (ILESSP COFF (SELECTQ WHATFOR - (READ (fetch CBUFSIZE of STREAM)) + (READ (fetch (STREAM CBUFSIZE) of STREAM)) BYTESPERPAGE)) - (fetch CBUFPTR of STREAM)) (* ; "Is ok, why were we called?") + (fetch (STREAM CBUFPTR) of STREAM)) + (* ; "Is ok, why were we called?") (RETURN T))) (* ; "Buffer exhausted or empty") (UNINTERRUPTABLY (* ; "Clean up current page") @@ -809,38 +818,39 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1993, 2002 by Venu (if (EQ COFF BYTESPERPAGE) then (* ;  "Change to be first byte of next page instead of beyond last byte of previous page") - (replace COFFSET of STREAM with (SETQ COFF 0)) - (replace CPAGE of STREAM with (add CPAGE# 1)))) + (replace (STREAM COFFSET) of STREAM with (SETQ COFF 0)) + (replace (STREAM CPAGE) of STREAM with (add CPAGE# 1)))) [COND - ([AND (IGEQ CPAGE# (SETQ EPAGE# (fetch EPAGE of STREAM))) + ([AND (IGEQ CPAGE# (SETQ EPAGE# (fetch (STREAM EPAGE) of STREAM))) (OR (NOT (IEQP CPAGE# EPAGE#)) - (IGEQ COFF (fetch EOFFSET of STREAM] + (IGEQ COFF (fetch (STREAM EOFFSET) of STREAM] (* ;  "Current file pointer is at or past end of file") (SELECTQ WHATFOR (READ (RETURN (AND (NULL NOERRORFLG) (\EOF.ACTION STREAM)))) (WRITE (UNINTERRUPTABLY - (replace EPAGE of STREAM with (SETQ EPAGE# CPAGE#)) - (replace EOFFSET of STREAM with COFF))) + (replace (STREAM EPAGE) of STREAM with (SETQ EPAGE# CPAGE#)) + (replace (STREAM EOFFSET) of STREAM with COFF))) (SHOULDNT] (* ;; "Now fill the buffer -- map in current page") (SETQ BUF (\MAPPAGE CPAGE# STREAM)) (* ; "This is interruptable") (UNINTERRUPTABLY - (replace CBUFSIZE of STREAM with (COND - ((ILESSP CPAGE# EPAGE#) + (replace (STREAM CBUFSIZE) of STREAM with (COND + ((ILESSP CPAGE# EPAGE#) (* ; "Full page") - BYTESPERPAGE) - ((IEQP CPAGE# EPAGE#) + BYTESPERPAGE) + ((IEQP CPAGE# EPAGE#) (* ; "Last page") - (fetch EOFFSET of STREAM)) - (T + (fetch (STREAM EOFFSET) + of STREAM)) + (T (* ; "Beyond EOF so no data") - 0))) - (replace CBUFMAXSIZE of STREAM with BYTESPERPAGE) - (replace CBUFPTR of STREAM with BUF)) + 0))) + (replace (STREAM CBUFMAXSIZE) of STREAM with BYTESPERPAGE) + (replace (STREAM CBUFPTR) of STREAM with BUF)) (RETURN T]) (\PAGED.FORCEOUTPUT @@ -1032,50 +1042,46 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1993, 2002 by Venu EVAL@COMPILE (DECLARE%: EVAL@COMPILE -(PUTPROPS GETBUFFERPTR MACRO - ((BUFF) - (fetch VMEMPAGE of BUFF))) +(PUTPROPS GETBUFFERPTR MACRO ((BUFF) + (fetch VMEMPAGE of BUFF))) -(PUTPROPS CHECKBUFFERREF MACRO - [OPENLAMBDA (BUFF) (* bvm%: "24-JUN-82 17:03") +(PUTPROPS CHECKBUFFERREF MACRO [OPENLAMBDA (BUFF)(* bvm%: "24-JUN-82 17:03") - (* ;; "checks the reference field of a buffer descriptor and if no one is referencing it, it creates a reference and changes the flag. The flag is set by the garbage collector when there are no longer any references to the buffer it describes.") + (* ;; "checks the reference field of a buffer descriptor and if no one is referencing it, it creates a reference and changes the flag. The flag is set by the garbage collector when there are no longer any references to the buffer it describes.") - (UNINTERRUPTABLY - (COND - ((fetch NOREFERENCE of BUFF) + (UNINTERRUPTABLY + (COND + ((fetch NOREFERENCE of BUFF) - (* ;; "this is a page the reference to which has been dropped, zero its reference count before returning it.") + (* ;; "this is a page the reference to which has been dropped, zero its reference count before returning it.") - (\DELREF (fetch VMEMPAGE of BUFF)) - (replace NOREFERENCE of BUFF with NIL))))]) + (\DELREF (fetch VMEMPAGE of BUFF)) + (replace NOREFERENCE of BUFF with NIL)))) + ]) -(PUTPROPS CPBUFFERP MACRO - ((BUFFER STREAM) - (EQ (fetch CBUFPTR of STREAM) - (fetch VMEMPAGE of BUFFER)))) +(PUTPROPS CPBUFFERP MACRO ((BUFFER STREAM) + (EQ (fetch CBUFPTR of STREAM) + (fetch VMEMPAGE of BUFFER)))) -(PUTPROPS BUFFERINUSEP MACRO - [OPENLAMBDA (BUFFER STREAM) - (AND (NULL (fetch NOREFERENCE of BUFFER)) - (OR (fetch USERMAPPED of BUFFER) - (CPBUFFERP BUFFER STREAM]) +(PUTPROPS BUFFERINUSEP MACRO [OPENLAMBDA (BUFFER STREAM) + (AND (NULL (fetch NOREFERENCE of BUFFER)) + (OR (fetch USERMAPPED of BUFFER) + (CPBUFFERP BUFFER STREAM]) -(PUTPROPS UNDIRTY MACRO - [OPENLAMBDA (BUFFER STREAM) - (replace IODIRTY of BUFFER with NIL) - (COND - ((CPBUFFERP BUFFER STREAM) - (replace CBUFDIRTY of STREAM with NIL]) +(PUTPROPS UNDIRTY MACRO [OPENLAMBDA (BUFFER STREAM) + (replace IODIRTY of BUFFER with NIL) + (COND + ((CPBUFFERP BUFFER STREAM) + (replace CBUFDIRTY of STREAM with NIL]) -(PUTPROPS DIRTYP MACRO - [OPENLAMBDA (BUFFER STREAM) (* rmk%: "25-OCT-83 19:57") +(PUTPROPS DIRTYP MACRO [OPENLAMBDA (BUFFER STREAM) + (* rmk%: "25-OCT-83 19:57") - (* ;; "determines if this buffer has been dirtied by the IO system. It can't determine if the user has done a putbase into the page if he got it from MAPPAGE.") + (* ;; "determines if this buffer has been dirtied by the IO system. It can't determine if the user has done a putbase into the page if he got it from MAPPAGE.") - (OR (fetch IODIRTY of BUFFER) - (AND STREAM (CPBUFFERP BUFFER STREAM) - (fetch CBUFDIRTY of STREAM]) + (OR (fetch IODIRTY of BUFFER) + (AND STREAM (CPBUFFERP BUFFER STREAM) + (fetch CBUFDIRTY of STREAM]) ) (DECLARE%: EVAL@COMPILE @@ -1099,20 +1105,20 @@ EVAL@COMPILE (LOCALVARS . T) ) (PUTPROPS PMAP COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1988 1990 1993 -2002)) +2002 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (2522 29176 (ADDMAPBUFFER 2532 . 2708) (\ALLOCMAPBUFFER 2710 . 3311) (CHECKBUFFERREFVAL -3313 . 3888) (CLEARMAP 3890 . 4546) (\WRITEOUTBUFFERS 4548 . 5297) (\CLEARMAP 5299 . 8525) (DOPMAP -8527 . 8990) (FINDPTRSBUFFER 8992 . 9866) (FORGETPAGES 9868 . 12153) (\GETMAPBUFFER 12155 . 15277) ( -LOCKMAP 15279 . 15486) (MAPAFTERCLOSE 15488 . 15791) (MAPBUFFERCOUNT 15793 . 16283) (MAPPAGE 16285 . -17794) (MAPWORD 17796 . 18109) (\RELEASEBUFFER 18111 . 18680) (RELEASINGVMEMPAGE 18682 . 19319) ( -RESTOREMAP 19321 . 22118) (UNLOCKMAP 22120 . 22329) (\MAPPAGE 22331 . 27785) (\COLLECTDIRTYBUFS 27787 - . 28567) (\SETIODIRTY 28569 . 29174)) (29177 30148 (WORDCONTENTS 29187 . 29356) (SETWORDCONTENTS -29358 . 29670) (/SETWORDCONTENTS 29672 . 29977) (WORDOFFSET 29979 . 30146)) (31476 50442 ( -\MAKE.PMAP.DEVICE 31486 . 32814) (\PAGEDBACKFILEPTR 32816 . 34736) (\PAGEDSETFILEPTR 34738 . 36174) ( -\PAGED.INCFILEPTR 36176 . 39200) (\PAGEDGETFILEPTR 39202 . 39445) (\PAGEDGETEOFPTR 39447 . 39865) ( -\PAGEDREADP 39867 . 41051) (\PAGEDEOFP 41053 . 42670) (\PAGED.GETNEXTBUFFER 42672 . 46136) ( -\PAGED.FORCEOUTPUT 46138 . 48586) (\UPDATEOF 48588 . 49420) (\READPAGES 49422 . 49882) (\WRITEPAGES -49884 . 50440)) (50443 54535 (\SETEOF 50453 . 51668) (\PAGED.SETEOFPTR 51670 . 53564) (\NEWLENGTHIS -53566 . 54533)) (54677 55057 (PPBUFS 54687 . 55055))))) + (FILEMAP (NIL (2513 29167 (ADDMAPBUFFER 2523 . 2699) (\ALLOCMAPBUFFER 2701 . 3302) (CHECKBUFFERREFVAL +3304 . 3879) (CLEARMAP 3881 . 4537) (\WRITEOUTBUFFERS 4539 . 5288) (\CLEARMAP 5290 . 8516) (DOPMAP +8518 . 8981) (FINDPTRSBUFFER 8983 . 9857) (FORGETPAGES 9859 . 12144) (\GETMAPBUFFER 12146 . 15268) ( +LOCKMAP 15270 . 15477) (MAPAFTERCLOSE 15479 . 15782) (MAPBUFFERCOUNT 15784 . 16274) (MAPPAGE 16276 . +17785) (MAPWORD 17787 . 18100) (\RELEASEBUFFER 18102 . 18671) (RELEASINGVMEMPAGE 18673 . 19310) ( +RESTOREMAP 19312 . 22109) (UNLOCKMAP 22111 . 22320) (\MAPPAGE 22322 . 27776) (\COLLECTDIRTYBUFS 27778 + . 28558) (\SETIODIRTY 28560 . 29165)) (29168 30139 (WORDCONTENTS 29178 . 29347) (SETWORDCONTENTS +29349 . 29661) (/SETWORDCONTENTS 29663 . 29968) (WORDOFFSET 29970 . 30137)) (31845 51748 ( +\MAKE.PMAP.DEVICE 31855 . 33183) (\PAGEDBACKFILEPTR 33185 . 35659) (\PAGEDSETFILEPTR 35661 . 37097) ( +\PAGED.INCFILEPTR 37099 . 40123) (\PAGEDGETFILEPTR 40125 . 40368) (\PAGEDGETEOFPTR 40370 . 40788) ( +\PAGEDREADP 40790 . 42027) (\PAGEDEOFP 42029 . 43646) (\PAGED.GETNEXTBUFFER 43648 . 47442) ( +\PAGED.FORCEOUTPUT 47444 . 49892) (\UPDATEOF 49894 . 50726) (\READPAGES 50728 . 51188) (\WRITEPAGES +51190 . 51746)) (51749 55841 (\SETEOF 51759 . 52974) (\PAGED.SETEOFPTR 52976 . 54870) (\NEWLENGTHIS +54872 . 55839)) (55983 56363 (PPBUFS 55993 . 56361))))) STOP diff --git a/sources/PMAP.LCOM b/sources/PMAP.LCOM index d7f184bdd..c4d937e3f 100644 Binary files a/sources/PMAP.LCOM and b/sources/PMAP.LCOM differ diff --git a/sources/PRETTY b/sources/PRETTY index 3d1c0da58..cd4f14a64 100644 --- a/sources/PRETTY +++ b/sources/PRETTY @@ -1,11 +1,11 @@ -(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "21-Feb-2021 10:59:08"  -{DSK}kaplan>Local>medley3.5>git-medley>sources>PRETTY.;10 57241 +(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS) +(FILECREATED " 9-Jul-2021 14:12:19"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>PRETTY.;19 64744 - changes to%: (FNS PRINTCOPYRIGHT1) + changes to%: (FNS PRETTYDEF) - previous date%: "16-Apr-2018 21:37:09" -{DSK}kaplan>Local>medley3.5>git-medley>sources>PRETTY.;6) + previous date%: " 3-Jul-2021 15:24:17" +{DSK}kaplan>Local>medley3.5>git-medley>sources>PRETTY.;17) (* ; " @@ -45,7 +45,7 @@ with the terms of said license. " EXPLAINSTRING "] - no copyright notice now" NOECHOFLG T RETURN NIL] (COPYRIGHTSRESERVED T) (*NEW-INTERLISP-MAKEFILE-ENVIRONMENT* '(:READTABLE "INTERLISP" :PACKAGE - "INTERLISP")) + "INTERLISP" :FORMAT :XCCS)) (*DEFAULT-MAKEFILE-ENVIRONMENT*)) (GLOBALVARS COPYRIGHTOWNERS DEFAULTCOPYRIGHTKEYLST COPYRIGHTPRETTYFLG COMMENTFLG *DEFAULT-MAKEFILE-ENVIRONMENT* *NEW-INTERLISP-MAKEFILE-ENVIRONMENT*)) @@ -99,10 +99,214 @@ with the terms of said license. (DEFINEQ (PRETTYDEF -(LAMBDA (PRTTYFNS PRTTYFILE PRTTYCOMS REPRINTFNS SOURCEFILE CHANGES) (* ; "Edited 16-Feb-88 11:46 by raf") (DECLARE (SPECVARS PRTTYFILE REPRINTFNS SOURCEFILE CHANGES)) (RESETLST (RESETSAVE (RESETUNDO) (QUOTE (AND RESETSTATE (RESETUNDO OLDVALUE)))) (* ;; "Says undo everything if there is an error or control-D This is particularly necessary if user is using the PRINT* prettyprintmacro which updates comments to point to the newest version.") (PROG ((NEWFILEMAP (AND BUILDMAPFLG (LIST NIL))) (%#RPARS %#RPARS) (*PRINT-ARRAY* T) (XCL:*PRINT-STRUCTURE* T) (*PRINT-LEVEL* NIL) (*PRINT-LENGTH* NIL) FILEFLG FNSLST PRTTYTEM PRETTYCOMSLST PRTTYSPELLFLG OLDFILEMAP MAPADR NLAMALST NLAMLST LAMALST LAM?LST FILEDATES ORIGFLG ROOTNAME DESTINATIONENV SOURCEFILENV SOURCEFC FCLOCATION) (DECLARE (SPECVARS *PRINT-ARRAY* XCL:*PRINT-STRUCTURE* *PRINT-LEVEL* *PRINT-LENGTH* NEWFILEMAP ORIGFLG FILEFLG NLAMALST PRTTYSPELLFLG PRETTYCOMSLST PRTTYCOMS LAM?LST FNSLST OLDFILEMAP LAMALST MAPADR ORIGFLG NLAMLST DESTINATIONENV SOURCEFILENV %#RPARS)) (* ; "NEWFILEMAP corresponds to the map being built for the file being written. OLDFILEMAP corresponds to the map that exists for SOURCEFILE, if any.") (COND ((OR (NULL (\DTEST PRTTYFILE (QUOTE LITATOM))) (EQ PRTTYFILE T)) (* ; "we no longer support any of the crufty alternatives to writing a brand new file") (\ILLEGAL.ARG PRTTYFILE))) (SETQ ROOTNAME (ROOTFILENAME PRTTYFILE)) (if (OR (EQ SOURCEFILE T) (AND REPRINTFNS (NULL SOURCEFILE))) then (* ;; "SOURCEFILE plays the role of CFILE for recompiling. It permits PRETTYPRINT to obtain the definitions from the file withou having to reprettyprint them, or even having them loaded into core. T (or NIL if REPRINTFNS is specified) is the same as PRETTYFILE.") (* ;; "REPRINTFNS specifies those functions to be printed anew. REPRINTFNS=T means reprint all EXPRS, a la recompile. For example, if you have an entire file loaded in, but only change a few functions, using this option can speed up dumping the file by a factor of two. If REPRINTFNS=ALL, all functions that contain in core exprs, whether on function definition cell or property lists, are reprinted. REPRINTFNS can also be a list. MAKEFILE uses this for the REMAKE option by specifying as REPRINTFNS the list CHANGES. In any case, if the function does not contain an in core defnition, prettyprint will try to find one on the file. i.e., act as though REPRINTFNS were NIL.") (SETQ SOURCEFILE ROOTNAME)) (if (SETQ DESTINATIONENV (GET ROOTNAME (QUOTE MAKEFILE-ENVIRONMENT))) then (* ; "use this explicit environment. Copy it in case user later on destructively edits it") (SETQ DESTINATIONENV (\DO-DEFINE-FILE-INFO NIL (COPY DESTINATIONENV))) else (* ; "see if we already know the environment of the source") (CL:MULTIPLE-VALUE-SETQ (SOURCEFILENV OLDFILEMAP SOURCEFC) (LOOKUP-ENVIRONMENT-AND-FILEMAP (OR SOURCEFILE ROOTNAME) (OR (NULL SOURCEFILE) (EQ SOURCEFILE ROOTNAME))))) (if SOURCEFILE then (if (NULL (NLSETQ (SETQ SOURCEFILE (OPENSTREAM SOURCEFILE (QUOTE INPUT))))) then (* ; "can't find file to reprint from.") (* ; "OPENSTREAM is called in order that 'correction' take place.") (SETQ SOURCEFILE NIL) (PRIN1 PRTTYFILE T) (PRIN1 (QUOTE " not found, so it will be written anew. -") T) elseif (RANDACCESSP SOURCEFILE) then (RESETSAVE NIL (LIST (QUOTE CLOSEF) SOURCEFILE)) (RESETSAVE (INPUT SOURCEFILE)) (if (EQ REPRINTFNS (QUOTE EXPRS)) then (SETQ REPRINTFNS T) elseif (EQ REPRINTFNS (QUOTE CHANGES)) then (SETQ REPRINTFNS (UNION (FILEPKG.CHANGEDFNS CHANGES) (FILEPKG.CHANGEDFNS (fetch FILECHANGES of ROOTNAME))))) (if (NULL SOURCEFILENV) then (* ; "if we didn't have environment cached, look it up from the actual stream now") (CL:MULTIPLE-VALUE-SETQ (SOURCEFILENV OLDFILEMAP SOURCEFC) (GET-ENVIRONMENT-AND-FILEMAP SOURCEFILE))) (if (NULL OLDFILEMAP) then (* ; "no map on file, so we will build one as needed") (SETFILEPTR SOURCEFILE (OR SOURCEFC 0)) elseif (NULL (CAR OLDFILEMAP)) then (* ; "complete map.") elseif (LISTP (CAR OLDFILEMAP)) then (* ; "only partial map built up. should only happen for files that were made with BUILDMAPFLG=NIL, since otherwise there would be a coplete map on the file.") (SETFILEPTR SOURCEFILE (CAAR OLDFILEMAP)) else (* ; "Redundancy check. Should only occur if there was a compiled function in the file. and a partial map was formed that stopped after that function.") (HELP)) else (* ; "Can't copy from non-randaccessp source") (SETQ SOURCEFILE NIL))) (* ;; "Now figure out what environment to write the new file in.") (if DESTINATIONENV then (* ; "have explicit env, ok") elseif SOURCEFILENV then (* ; "use same as source") (SETQ DESTINATIONENV (if (EQUAL-READER-ENVIRONMENT SOURCEFILENV *OLD-INTERLISP-READ-ENVIRONMENT*) then (* ; "write the new style") (\DO-DEFINE-FILE-INFO NIL *NEW-INTERLISP-MAKEFILE-ENVIRONMENT*) else (* ; "use same env on new file as old") SOURCEFILENV)) else (* ; "new file, use default") (SETQ DESTINATIONENV (\DO-DEFINE-FILE-INFO NIL (COPY *DEFAULT-MAKEFILE-ENVIRONMENT*)))) (if (NULL SOURCEFILE) then (* ; "get rid of anything we knew about source") (SETQ OLDFILEMAP NIL) (SETQ SOURCEFC NIL) (SETQ SOURCEFILENV NIL) elseif (AND SOURCEFILENV (EQUAL-READER-ENVIRONMENT SOURCEFILENV DESTINATIONENV)) then (* ; "source and destination compatible, so we won't need to worry about it in PRETTYPRINT1/2") (SETQ SOURCEFILENV NIL)) (RESETSAVE NIL (LIST (FUNCTION PRETTYDEF0) (SETQ PRTTYFILE (OPENSTREAM PRTTYFILE (QUOTE OUTPUT))))) (* ; "Cleans up by closing and deleting file if aborted.") (RESETSAVE (OUTPUT PRTTYFILE)) (PRINT-READER-ENVIRONMENT DESTINATIONENV) (SETQ FCLOCATION (GETFILEPTR PRTTYFILE)) (WITH-READER-ENVIRONMENT DESTINATIONENV (if (NOT (SYNTAXP (CHARCODE "[") (QUOTE LEFTBRACKET))) then (* ; "can't use brackets on this read table") (SETQ %#RPARS NIL)) (SETQ FILEDATES (PRINTDATE PRTTYFILE CHANGES)) (AND (NEQ COPYRIGHTFLG (QUOTE NEVER)) ROOTNAME (PRINTCOPYRIGHT ROOTNAME)) (SETQ FILEFLG T) (SETQ CHANGES (FILEPKG.CHANGEDFNS CHANGES)) (* ; "Used freely by PRETTYPRINT to decide clispifying.") (if (NOT (RANDACCESSP PRTTYFILE)) then (* ; "No point building a map, since we won't be able to go back to the start to point at it") (SETQ NEWFILEMAP NIL)) (if FONTCHANGEFLG then (* ; "this is expensive in that it costs as many conses as there are functions, but you can afford it for a makefile.") (SETQ FNSLST (OR (for FL in (GETPROP ROOTNAME (QUOTE FILEGROUP)) when (fetch FILEPROP of FL) join (FILEFNSLST FL)) (FILEFNSLST ROOTNAME)))) (if (OR (LISTP PRTTYFNS) (LISTP (GETTOPVAL PRTTYFNS))) then (* ; "Ancient cruft from before the days of MAKEFILE.") (PRINTFNS PRTTYFNS T) (PRETTYCOM PRTTYFNS T)) (if (SETQ PRETTYCOMSLST (OR (LISTP PRTTYCOMS) (AND (LITATOM PRTTYCOMS) (LISTP (GETTOPVAL PRTTYCOMS))))) then (PRETTYCOM PRTTYCOMS T) (* ; "PRTTYCOMS is just like the argument to a COMS command. see comment in prettycom1") (for L on PRETTYCOMSLST do (PRETTYCOM (CAR L) NIL L)) (* ; "The original value of PRTTYCOMS is saved so that it can be rewritten if a spelling correction occurs. The list PRTTYCOMSLST is searched by PRETTYCOM1 for * commands to see if the variable has be dumped out as well.")) (if (PRETTYDEF1) then (* ; "The coms were reprinted by PRETTYDEF1 due to a change to nlama and or nlaml") elseif PRTTYSPELLFLG then (* ; "A correction on prettycoms was performed, so dump it out aain to get the corrected version on the file.") (PRETTYCOM PRTTYCOMS T)) (if (NEQ COPYRIGHTFLG (QUOTE NEVER)) then (SAVECOPYRIGHT ROOTNAME)) (if NEWFILEMAP then (PRIN1 "(") (PRIN2 (QUOTE DECLARE%:)) (SPACES 1) (PRIN2 (QUOTE DONTCOPY)) (TERPRI) (SPACES 2) (for ADR in MAPADR do (SETQ PRTTYTEM (GETFILEPTR PRTTYFILE)) (SETFILEPTR PRTTYFILE ADR) (* ; "Write the current file positon into the filecreated expression, and then restores the file pointer.") (PRIN2 PRTTYTEM) (SETFILEPTR PRTTYFILE PRTTYTEM)) (PRIN2 (LIST (QUOTE FILEMAP) NEWFILEMAP)) (* ; "printed instead of prettyprinted, so wont take up two pages of listing.") (PRIN1 (QUOTE ") -")) (PUTFILEMAP (FULLNAME PRTTYFILE) NEWFILEMAP NIL DESTINATIONENV NIL FCLOCATION) (* ; "Also save map, so can be used for subsequent makefiles.")) (ENDFILE PRTTYFILE) (if (AND FILEDATES ROOTNAME) then (/replace FILEDATES of ROOTNAME with FILEDATES))) (RETURN (FULLNAME PRTTYFILE))))) -) + [LAMBDA (PRTTYFNS PRTTYFILE PRTTYCOMS REPRINTFNS SOURCEFILE CHANGES FORMAT) + (* ; "Edited 9-Jul-2021 14:12 by rmk:") + (* ; "Edited 29-Jun-2021 17:23 by rmk:") + (DECLARE (SPECVARS PRTTYFILE REPRINTFNS SOURCEFILE CHANGES)) + (RESETLST + [RESETSAVE (RESETUNDO) + '(AND RESETSTATE (RESETUNDO OLDVALUE] + + (* ;; "Says undo everything if there is an error or control-D This is particularly necessary if user is using the PRINT* prettyprintmacro which updates comments to point to the newest version.") + + (PROG ((NEWFILEMAP (AND BUILDMAPFLG (LIST NIL))) + (%#RPARS %#RPARS) + (*PRINT-ARRAY* T) + (XCL:*PRINT-STRUCTURE* T) + (*PRINT-LEVEL* NIL) + (*PRINT-LENGTH* NIL) + FILEFLG FNSLST PRTTYTEM PRETTYCOMSLST PRTTYSPELLFLG OLDFILEMAP MAPADR NLAMALST NLAMLST + LAMALST LAM?LST FILEDATES ORIGFLG ROOTNAME DESTINATIONENV SOURCEFILENV SOURCEFC + FCLOCATION DEFAULTDESTENV) + (DECLARE (SPECVARS *PRINT-ARRAY* XCL:*PRINT-STRUCTURE* *PRINT-LEVEL* *PRINT-LENGTH* + NEWFILEMAP ORIGFLG FILEFLG NLAMALST PRTTYSPELLFLG PRETTYCOMSLST + PRTTYCOMS LAM?LST FNSLST OLDFILEMAP LAMALST MAPADR ORIGFLG NLAMLST + DESTINATIONENV SOURCEFILENV %#RPARS)) + (* ; "NEWFILEMAP corresponds to the map being built for the file being written. OLDFILEMAP corresponds to the map that exists for SOURCEFILE, if any.") + (COND + ((OR (NULL (\DTEST PRTTYFILE 'LITATOM)) + (EQ PRTTYFILE T)) (* ; + "we no longer support any of the crufty alternatives to writing a brand new file") + (\ILLEGAL.ARG PRTTYFILE))) + (SETQ ROOTNAME (ROOTFILENAME PRTTYFILE)) + (if (OR (EQ SOURCEFILE T) + (AND REPRINTFNS (NULL SOURCEFILE))) + then + + (* ;; "SOURCEFILE plays the role of CFILE for recompiling. It permits PRETTYPRINT to obtain the definitions from the file withou having to reprettyprint them, or even having them loaded into core. T (or NIL if REPRINTFNS is specified) is the same as PRETTYFILE.") + + (* ;; "REPRINTFNS specifies those functions to be printed anew. REPRINTFNS=T means reprint all EXPRS, a la recompile. For example, if you have an entire file loaded in, but only change a few functions, using this option can speed up dumping the file by a factor of two. If REPRINTFNS=ALL, all functions that contain in core exprs, whether on function definition cell or property lists, are reprinted. REPRINTFNS can also be a list. MAKEFILE uses this for the REMAKE option by specifying as REPRINTFNS the list CHANGES. In any case, if the function does not contain an in core defnition, prettyprint will try to find one on the file. i.e., act as though REPRINTFNS were NIL.") + + (SETQ SOURCEFILE ROOTNAME)) + [if (SETQ DESTINATIONENV (GET ROOTNAME 'MAKEFILE-ENVIRONMENT)) + then (SETQ DESTINATIONENV (\DO-DEFINE-FILE-INFO NIL DESTINATIONENV)) + else (* ; + "see if we already know the environment of the source") + (CL:MULTIPLE-VALUE-SETQ (SOURCEFILENV OLDFILEMAP SOURCEFC) + (LOOKUP-ENVIRONMENT-AND-FILEMAP (OR SOURCEFILE ROOTNAME) + (OR (NULL SOURCEFILE) + (EQ SOURCEFILE ROOTNAME] + (if SOURCEFILE + then (if [NULL (NLSETQ (SETQ SOURCEFILE (OPENSTREAM SOURCEFILE 'INPUT] + then (* ; + "can't find file to reprint from.") + (* ; + "OPENSTREAM was called in order that 'correction' take place.") + (SETQ SOURCEFILE NIL) + (PRINTOUT T PRTTYFILE " not found, so it will be written anew." + T) + elseif (RANDACCESSP SOURCEFILE) + then (RESETSAVE NIL (LIST 'CLOSEF SOURCEFILE)) + (* ; "The typical case: File is open") + (RESETSAVE (INPUT SOURCEFILE)) + [if (EQ REPRINTFNS 'EXPRS) + then (SETQ REPRINTFNS T) + elseif (EQ REPRINTFNS 'CHANGES) + then (SETQ REPRINTFNS + (UNION (FILEPKG.CHANGEDFNS CHANGES) + (FILEPKG.CHANGEDFNS (fetch FILECHANGES + of ROOTNAME] + (CL:UNLESS SOURCEFILENV (* ; + "if we didn't have environment cached, look it up from the actual stream now") + (CL:MULTIPLE-VALUE-SETQ (SOURCEFILENV OLDFILEMAP SOURCEFC) + (GET-ENVIRONMENT-AND-FILEMAP SOURCEFILE))) + (\EXTERNALFORMAT SOURCEFILE (FETCH (READER-ENVIRONMENT + REFORMAT) OF + SOURCEFILENV + )) + (if (NULL OLDFILEMAP) + then (* ; + "no map on file, so we will build one as needed") + (SETFILEPTR SOURCEFILE (OR SOURCEFC 0)) + elseif (NULL (CAR OLDFILEMAP)) + then (* ; "complete map.") + elseif (LISTP (CAR OLDFILEMAP)) + then (* ; "only partial map built up. should only happen for files that were made with BUILDMAPFLG=NIL, since otherwise there would be a coplete map on the file.") + (SETFILEPTR SOURCEFILE (CAAR OLDFILEMAP)) + else (* ; "Redundancy check. Should only occur if there was a compiled function in the file. and a partial map was formed that stopped after that function.") + (HELP)) + else (* ; + "Can't copy from non-randaccessp source") + (SETQ SOURCEFILE NIL))) + + (* ;; "Now figure out what environment to write the new file in.") + + (CL:UNLESS DESTINATIONENV (* ; + "Don't yet have a destination environment") + (SETQ DESTINATIONENV (if SOURCEFILENV + then (* ; "use same as source") + (if (EQUAL-READER-ENVIRONMENT SOURCEFILENV + *OLD-INTERLISP-READ-ENVIRONMENT*) + then + (* ; "Coercing to the new style") + (\DO-DEFINE-FILE-INFO NIL + *NEW-INTERLISP-MAKEFILE-ENVIRONMENT* + ) + else (* ; + "use same env on new file as old. But copy in case something changes") + (CREATE READER-ENVIRONMENT USING + SOURCEFILENV) + ) + elseif *DEFAULT-MAKEFILE-ENVIRONMENT* + then + + (* ;; "new file, use default") + + (\DO-DEFINE-FILE-INFO NIL + *DEFAULT-MAKEFILE-ENVIRONMENT*)))) + (CL:WHEN FORMAT + (REPLACE (READER-ENVIRONMENT REFORMAT) OF DESTINATIONENV WITH FORMAT)) + + (* ;; "We now have a DESTINATIONENV") + + (if (NULL SOURCEFILE) + then (* ; + "get rid of anything we knew about source") + (SETQ OLDFILEMAP NIL) + (SETQ SOURCEFC NIL) + (SETQ SOURCEFILENV NIL) + elseif (AND SOURCEFILENV (EQUAL-READER-ENVIRONMENT SOURCEFILENV DESTINATIONENV)) + then (* ; + "source and destination compatible, so we won't need to worry about it in PRETTYPRINT1/2") + (SETQ SOURCEFILENV NIL)) + + (* ;; "Ready to go. Clean up by closing and deleting file if aborted.") + + [RESETSAVE NIL (LIST (FUNCTION PRETTYDEF0) + (SETQ PRTTYFILE (OPENSTREAM PRTTYFILE 'OUTPUT] + (\EXTERNALFORMAT PRTTYFILE (FETCH (READER-ENVIRONMENT REFORMAT) OF + DESTINATIONENV + )) + (RESETSAVE (OUTPUT PRTTYFILE)) + (PRINT-READER-ENVIRONMENT DESTINATIONENV) + (SETQ FCLOCATION (GETFILEPTR PRTTYFILE)) + (WITH-READER-ENVIRONMENT DESTINATIONENV + (CL:UNLESS (SYNTAXP (CHARCODE "[") + 'LEFTBRACKET) (* ; + "can't use brackets on this read table") + (SETQ %#RPARS NIL)) + (SETQ FILEDATES (PRINTDATE PRTTYFILE CHANGES)) + (AND (NEQ COPYRIGHTFLG 'NEVER) + ROOTNAME + (PRINTCOPYRIGHT ROOTNAME)) + (SETQ FILEFLG T) + (SETQ CHANGES (FILEPKG.CHANGEDFNS CHANGES))(* ; + "Used freely by PRETTYPRINT to decide clispifying.") + (CL:UNLESS (RANDACCESSP PRTTYFILE) (* ; + "No point building a map, since we won't be able to go back to the start to point at it") + (SETQ NEWFILEMAP NIL)) + (CL:WHEN FONTCHANGEFLG (* ; "this is expensive in that it costs as many conses as there are functions, but you can afford it for a makefile.") + (SETQ FNSLST (OR (for FL in (GETPROP ROOTNAME 'FILEGROUP) + when (fetch FILEPROP of FL) + join (FILEFNSLST FL)) + (FILEFNSLST ROOTNAME)))) + (CL:WHEN (OR (LISTP PRTTYFNS) + (LISTP (GETTOPVAL PRTTYFNS))) (* ; + "Ancient cruft from before the days of MAKEFILE.") + (PRINTFNS PRTTYFNS T) + (PRETTYCOM PRTTYFNS T)) + (CL:WHEN [SETQ PRETTYCOMSLST (OR (LISTP PRTTYCOMS) + (AND (LITATOM PRTTYCOMS) + (LISTP (GETTOPVAL PRTTYCOMS] + (PRETTYCOM PRTTYCOMS T) (* ; + "PRTTYCOMS is just like the argument to a COMS command. see comment in prettycom1") + (for L on PRETTYCOMSLST do (PRETTYCOM (CAR L) + NIL L)) + (* ; "The original value of PRTTYCOMS is saved so that it can be rewritten if a spelling correction occurs. The list PRTTYCOMSLST is searched by PRETTYCOM1 for * commands to see if the variable has be dumped out as well.") + ) + (if (PRETTYDEF1) + then (* ; + "The coms were reprinted by PRETTYDEF1 due to a change to nlama and or nlaml") + elseif PRTTYSPELLFLG + then (* ; "A correction on prettycoms was performed, so dump it out aain to get the corrected version on the file.") + (PRETTYCOM PRTTYCOMS T)) + (CL:UNLESS (EQ COPYRIGHTFLG 'NEVER) + (SAVECOPYRIGHT ROOTNAME)) + (CL:WHEN NEWFILEMAP + (PRIN1 "(") + (PRIN2 'DECLARE%:) + (SPACES 1) + (PRIN2 'DONTCOPY) + (TERPRI) + (SPACES 2) + (for ADR in MAPADR do (SETQ PRTTYTEM (GETFILEPTR PRTTYFILE)) + (SETFILEPTR PRTTYFILE ADR) + (* ; "Write the current file positon into the filecreated expression, and then restores the file pointer.") + (PRIN2 PRTTYTEM) + (SETFILEPTR PRTTYFILE PRTTYTEM)) + (PRIN2 (LIST 'FILEMAP NEWFILEMAP)) (* ; + "printed instead of prettyprinted, so wont take up two pages of listing.") + (PRIN1 ")") + (TERPRI) + + (* ;; "Also save map, so can be used for subsequent makefiles.") + + (PUTFILEMAP (FULLNAME PRTTYFILE) + NEWFILEMAP NIL DESTINATIONENV NIL FCLOCATION)) + (ENDFILE PRTTYFILE) + (CL:WHEN (AND FILEDATES ROOTNAME) + (/replace FILEDATES of ROOTNAME with FILEDATES))) + (RETURN (FULLNAME PRTTYFILE))))]) (PRETTYDEFCOMS (LAMBDA (PRTTYCOMS FNSLST) (* ; "Edited 19-Aug-88 16:07 by raf") (DECLARE (SPECVARS FNSLST)) (PROG ((%#RPARS %#RPARS) (*PRINT-ARRAY* T) (XCL:*PRINT-STRUCTURE* T) (*PRINT-LEVEL* NIL) (*PRINT-LENGTH* NIL) BUILDMAPFLG PRTTYSPELLFLG ORIGFLG SOURCEFILE) (DECLARE (SPECVARS *PRINT-ARRAY* XCL:*PRINT-STRUCTURE* *PRINT-LEVEL* *PRINT-LENGTH* BUILDMAPFLG NEWFILEMAP ORIGFLG PRTTYSPELLFLG LAM?LST ORIGFLG SOURCEFILE %#RPARS)) (if (NOT (SYNTAXP (CHARCODE "[") (QUOTE LEFTBRACKET))) then (* ; "can't use brackets on this read table") (SETQ %#RPARS NIL)) (for L on (OR (LISTP PRTTYCOMS) (AND (LITATOM PRTTYCOMS) (LISTP (GETTOPVAL PRTTYCOMS)))) do (PRETTYCOM (CAR L) NIL L)))) @@ -392,7 +596,8 @@ must replace the declare: by a nop addvars.") (SETQ PRTTYCOM (SUBPAIR (QUOTE (NL (RPAQ? COPYRIGHTSRESERVED T) -(RPAQ? *NEW-INTERLISP-MAKEFILE-ENVIRONMENT* '(:READTABLE "INTERLISP" :PACKAGE "INTERLISP")) +(RPAQ? *NEW-INTERLISP-MAKEFILE-ENVIRONMENT* '(:READTABLE "INTERLISP" :PACKAGE "INTERLISP" :FORMAT + :XCCS)) (RPAQ? *DEFAULT-MAKEFILE-ENVIRONMENT* ) (DECLARE%: DOEVAL@COMPILE DONTCOPY @@ -484,14 +689,14 @@ must replace the declare: by a nop addvars.") (SETQ PRTTYCOM (SUBPAIR (QUOTE (NL (PUTPROPS PRETTY COPYRIGHT ("Venue & Xerox Corporation" T 1984 1985 1986 1987 1988 1989 1990 1999 2018 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (5927 40668 (PRETTYDEF 5937 . 14200) (PRETTYDEFCOMS 14202 . 14884) (PRETTYDEF0 14886 . -15077) (PRETTYDEF1 15079 . 16842) (PRINTDATE 16844 . 18080) (PRINTDATE1 18082 . 19287) (PRINTFNS 19289 - . 19858) (PRETTYCOM 19860 . 26201) (PRETTYVAR 26203 . 27241) (PRETTYVAR1 27243 . 29461) (PRETTYCOM1 -29463 . 30167) (ENDFILE 30169 . 30265) (MAKEDEFLIST 30267 . 30671) (PP 30673 . 30949) (PP* 30951 . -31264) (PPT 31266 . 31585) (PRETTYPRINT 31587 . 34739) (PRETTYPRINT1 34741 . 36627) (PRETTYPRINT2 -36629 . 37945) (PRETTYPRINT3 37947 . 38902) (PRINTDEF1 38904 . 39912) (SUPERPRINTEQ 39914 . 40008) ( -SUPERPRINTGETPROP 40010 . 40154) (CHANGEFONT 40156 . 40666)) (40669 46015 (READARRAY 40679 . 41605) ( -PRINTARRAY 41607 . 43347) (READARRAY-FROM-LIST 43349 . 44454) (PRINTARRAY-TO-LIST 44456 . 46013)) ( -46142 53355 (PRINTCOPYRIGHT 46152 . 49924) (PRINTCOPYRIGHT1 49926 . 53050) (SAVECOPYRIGHT 53052 . -53353))))) + (FILEMAP (NIL (5950 48101 (PRETTYDEF 5960 . 21633) (PRETTYDEFCOMS 21635 . 22317) (PRETTYDEF0 22319 . +22510) (PRETTYDEF1 22512 . 24275) (PRINTDATE 24277 . 25513) (PRINTDATE1 25515 . 26720) (PRINTFNS 26722 + . 27291) (PRETTYCOM 27293 . 33634) (PRETTYVAR 33636 . 34674) (PRETTYVAR1 34676 . 36894) (PRETTYCOM1 +36896 . 37600) (ENDFILE 37602 . 37698) (MAKEDEFLIST 37700 . 38104) (PP 38106 . 38382) (PP* 38384 . +38697) (PPT 38699 . 39018) (PRETTYPRINT 39020 . 42172) (PRETTYPRINT1 42174 . 44060) (PRETTYPRINT2 +44062 . 45378) (PRETTYPRINT3 45380 . 46335) (PRINTDEF1 46337 . 47345) (SUPERPRINTEQ 47347 . 47441) ( +SUPERPRINTGETPROP 47443 . 47587) (CHANGEFONT 47589 . 48099)) (48102 53448 (READARRAY 48112 . 49038) ( +PRINTARRAY 49040 . 50780) (READARRAY-FROM-LIST 50782 . 51887) (PRINTARRAY-TO-LIST 51889 . 53446)) ( +53575 60788 (PRINTCOPYRIGHT 53585 . 57357) (PRINTCOPYRIGHT1 57359 . 60483) (SAVECOPYRIGHT 60485 . +60786))))) STOP diff --git a/sources/PRETTY.LCOM b/sources/PRETTY.LCOM index 9bdeb6e7c..60cb1b6db 100644 Binary files a/sources/PRETTY.LCOM and b/sources/PRETTY.LCOM differ diff --git a/sources/PRINTFN b/sources/PRINTFN index 435a31805..607bce7ab 100644 --- a/sources/PRINTFN +++ b/sources/PRINTFN @@ -1,14 +1,15 @@ (DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED "16-Apr-2018 21:40:32" {DSK}kaplan>Local>medley3.5>lispcore>sources>PRINTFN.;4 14468 +(FILECREATED "27-Jun-2021 23:29:20"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>PRINTFN.;16 13154 - changes to%: (FNS PF) + changes to%: (FNS PFCOPYBYTES) - previous date%: "28-Jun-99 17:09:59" -{DSK}kaplan>Local>medley3.5>lispcore>sources>PRINTFN.;3) + previous date%: "22-Jun-2021 10:48:42" +{DSK}kaplan>Local>medley3.5>git-medley>sources>PRINTFN.;14) (* ; " -Copyright (c) 1986, 1987, 1990, 1999, 2018 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1986-1987, 1990, 1999, 2018, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT PRINTFNCOMS) @@ -28,150 +29,34 @@ Copyright (c) 1986, 1987, 1990, 1999, 2018 by Venue & Xerox Corporation. All ri (DEFINEQ -(PF - [NLAMBDA FN (* ; "Edited 4-Apr-2018 11:13 by rmk:") +(PF [NLAMBDA FN (* ; "Edited 4-Apr-2018 11:13 by rmk:") (* ;; "RMK; Fixed to skip compiled files, also to use FUNCTIONS as well as FNS. That might not help, if FUNCTIONS are not included in the filemap.") (* ;; "Print from files known to masterscope database before looking at whereis database. Note, however, that it also prefers the masterscope database to incore files") (* ;; "If FN is NIL, prints the function named by LASTWORD") (* ;; "If FN is a list, then extra args are interpreted as:") (* ;; " OUTPUT FILE") (* ;; "...") (RESETLST (PROG (OUT OTHERARGS IFILES) (SETQ FN (NLAMBDA.ARGS FN)) (* ; "Grab the args as a list") [COND ((LISTP FN) (* ;  "If it's a list, take the first element as the function name.") (SETQ OTHERARGS (CDR FN)) (SETQ FN (CAR FN] (COND (FN (* ; "FN name specified; use it.") (SETQ LASTWORD FN)) (T (* ; "Not specified, use LASTWORD") (SETQ FN LASTWORD))) [SETQ IFILES (OR (CAR OTHERARGS) (APPEND (WHEREIS FN 'FNS T) (WHEREIS FN 'FUNCTIONS T] [RESETSAVE (OUTPUT (COND ((CADR OTHERARGS) (* ;  "An output file was specified; if not open for output, open it.") (OR (OPENP (CADR OTHERARGS) 'OUTPUT) (WINDOWP (CADR OTHERARGS)) (PROGN [RESETSAVE (SETQ OUT (OPENFILE (CADR OTHERARGS) 'OUTPUT)) '(PROGN (CLOSEF? OLDVALUE] OUT))) (T (* ; "otherwise, use primary output.") T] (* ; "skip compiled files") (FOR FILE INSIDE IFILES UNLESS (MEMB (FILENAMEFIELD FILE 'EXTENSION) *COMPILED-EXTENSIONS*) DO (PRINTFN FN FILE))))]) - (* ;; "RMK; Fixed to skip compiled files, also to use FUNCTIONS as well as FNS. That might not help, if FUNCTIONS are not included in the filemap.") +(PF* [NLAMBDA FN (* ; "Edited 10-Jun-87 11:09 by jds") (* ;;; "Print the function FN (or LASTWORD), with comments visible to the user.") (RESETVARS (**COMMENT**FLG) (APPLY (FUNCTION PF) FN]) - (* ;; "Print from files known to masterscope database before looking at whereis database. Note, however, that it also prefers the masterscope database to incore files") +(PMORE [LAMBDA NIL (* lmm " 9-AUG-78 17:21") (* lmm "17-MAY-78 15:38") (PRINTFNDEF (CAR LASTFNDEF) T (CADDR LASTFNDEF) -1 (CADDDR LASTFNDEF]) - (* ;; "If FN is NIL, prints the function named by LASTWORD") +(PRINTFN [LAMBDA (FN FROMFILE TOFILE) (* lmm "14-Aug-84 14:16") (PROG ((LOC (FINDFNDEF FN FROMFILE))) (COND ((LISTP LOC) (SETQ LASTFNDEF LOC) (PRINTFNDEF (CAR LOC) TOFILE (CADR LOC) (CADDR LOC) (CADDDR LOC)) (RETURN FN)) ((EQ LOC 'FILE.NOT.FOUND) (printout TOFILE "file " FROMFILE " not found." T)) (T (printout TOFILE FN " not found on " LOC "." T]) - (* ;; "If FN is a list, then extra args are interpreted as:") +(PRINTFNDEF [LAMBDA (SRCFIL DSTFIL START END TYPE) (* bvm%: " 9-Sep-86 15:54") (RESETLST (PROG (TEM) [COND ((SETQ TEM (GETSTREAM DSTFIL 'OUTPUT T)) (SETQ DSTFIL TEM)) (T (RESETSAVE (SETQ DSTFIL (OPENSTREAM DSTFIL 'OUTPUT)) '(PROGN (CLOSEF? OLDVALUE] [COND ((SETQ TEM (GETSTREAM SRCFIL 'INPUT T)) (RESETSAVE NIL (LIST 'SETFILEPTR TEM (GETFILEPTR TEM))) (SETQ SRCFIL TEM)) (T (RESETSAVE (SETQ SRCFIL (OPENSTREAM SRCFIL 'INPUT)) '(PROGN (CLOSEF? OLDVALUE] (PRIN1 "{from " DSTFIL) (PRIN2 (FULLNAME SRCFIL) DSTFIL T) (PRIN1 "} " DSTFIL)) (COND ((OR (NOT (DISPLAYP DSTFIL)) (EQ PFDEFAULT 'COPYBYTES) (EQ TYPE 'MAC)) (COPYBYTES SRCFIL DSTFIL START END)) (T (PFCOPYBYTES SRCFIL DSTFIL START END PFDEFAULT))) (TERPRI DSTFIL))]) - (* ;; " OUTPUT FILE") - - (* ;; "...") - - (RESETLST - (PROG (OUT OTHERARGS IFILES) - (SETQ FN (NLAMBDA.ARGS FN)) (* ; "Grab the args as a list") - [COND - ((LISTP FN) (* ; - "If it's a list, take the first element as the function name.") - (SETQ OTHERARGS (CDR FN)) - (SETQ FN (CAR FN] - (COND - (FN (* ; "FN name specified; use it.") - (SETQ LASTWORD FN)) - (T (* ; "Not specified, use LASTWORD") - (SETQ FN LASTWORD))) - [SETQ IFILES (OR (CAR OTHERARGS) - (APPEND (WHEREIS FN 'FNS T) - (WHEREIS FN 'FUNCTIONS T] - [RESETSAVE (OUTPUT (COND - ((CADR OTHERARGS) (* ; - "An output file was specified; if not open for output, open it.") - (OR (OPENP (CADR OTHERARGS) - 'OUTPUT) - (WINDOWP (CADR OTHERARGS)) - (PROGN [RESETSAVE (SETQ OUT (OPENFILE (CADR OTHERARGS) - 'OUTPUT)) - '(PROGN (CLOSEF? OLDVALUE] - OUT))) - (T (* ; "otherwise, use primary output.") - T] (* ; "skip compiled files") - (FOR FILE INSIDE IFILES UNLESS (MEMB (FILENAMEFIELD FILE 'EXTENSION) - *COMPILED-EXTENSIONS*) - DO (PRINTFN FN FILE))))]) - -(PF* - [NLAMBDA FN (* ; "Edited 10-Jun-87 11:09 by jds") - -(* ;;; "Print the function FN (or LASTWORD), with comments visible to the user.") - - (RESETVARS (**COMMENT**FLG) - (APPLY (FUNCTION PF) - FN]) - -(PMORE - [LAMBDA NIL (* lmm " 9-AUG-78 17:21") - (* lmm "17-MAY-78 15:38") - (PRINTFNDEF (CAR LASTFNDEF) - T - (CADDR LASTFNDEF) - -1 - (CADDDR LASTFNDEF]) - -(PRINTFN - [LAMBDA (FN FROMFILE TOFILE) (* lmm "14-Aug-84 14:16") - (PROG ((LOC (FINDFNDEF FN FROMFILE))) - (COND - ((LISTP LOC) - (SETQ LASTFNDEF LOC) - (PRINTFNDEF (CAR LOC) - TOFILE - (CADR LOC) - (CADDR LOC) - (CADDDR LOC)) - (RETURN FN)) - ((EQ LOC 'FILE.NOT.FOUND) - (printout TOFILE "file " FROMFILE " not found." T)) - (T (printout TOFILE FN " not found on " LOC "." T]) - -(PRINTFNDEF - [LAMBDA (SRCFIL DSTFIL START END TYPE) (* bvm%: " 9-Sep-86 15:54") - (RESETLST (PROG (TEM) - [COND - ((SETQ TEM (GETSTREAM DSTFIL 'OUTPUT T)) - (SETQ DSTFIL TEM)) - (T (RESETSAVE (SETQ DSTFIL (OPENSTREAM DSTFIL 'OUTPUT)) - '(PROGN (CLOSEF? OLDVALUE] - [COND - ((SETQ TEM (GETSTREAM SRCFIL 'INPUT T)) - (RESETSAVE NIL (LIST 'SETFILEPTR TEM (GETFILEPTR TEM))) - (SETQ SRCFIL TEM)) - (T (RESETSAVE (SETQ SRCFIL (OPENSTREAM SRCFIL 'INPUT)) - '(PROGN (CLOSEF? OLDVALUE] - (PRIN1 "{from " DSTFIL) - (PRIN2 (FULLNAME SRCFIL) - DSTFIL T) - (PRIN1 "} -" DSTFIL)) - (COND - ((OR (NOT (DISPLAYP DSTFIL)) - (EQ PFDEFAULT 'COPYBYTES) - (EQ TYPE 'MAC)) - (COPYBYTES SRCFIL DSTFIL START END)) - (T (PFCOPYBYTES SRCFIL DSTFIL START END PFDEFAULT))) - (TERPRI DSTFIL]) - -(FINDFNDEF - [LAMBDA (FN FROMFILE) (* bvm%: "27-Aug-86 16:27") - - (* * "Locates FNS definition of FN on FROMFILE. If found, returns a list (file start end type); if file not found, returns symbol FILE.NOT.FOUND; if file found but not fn, returns full name of file that was found") - - (LET (FULL MAP VALUE) - (COND - ((NOT (SETQ FULL (FINDFILE FROMFILE T))) - 'FILE.NOT.FOUND) - [(COND - ((SETQ MAP (OR (GETFILEMAP FULL) - (LOADFILEMAP FULL))) - - (* First clause is quick check when the file already has a map. - LOADFILEMAP will find file map, rebuild if necessary and rewrite it on file if - updatemapflg is T.) - - (AND (for GROUP in (CDR MAP) thereis (SETQ VALUE (FASSOC FN GROUP))) - (LIST FULL (CADR VALUE) - (CDDR VALUE) - 'MAP] - (T FULL]) +(FINDFNDEF [LAMBDA (FN FROMFILE) (* bvm%: "27-Aug-86 16:27") (* * "Locates FNS definition of FN on FROMFILE. If found, returns a list (file start end type); if file not found, returns symbol FILE.NOT.FOUND; if file found but not fn, returns full name of file that was found") (LET (FULL MAP VALUE) (COND ((NOT (SETQ FULL (FINDFILE FROMFILE T))) 'FILE.NOT.FOUND) [(COND ((SETQ MAP (OR (GETFILEMAP FULL) (LOADFILEMAP FULL))) (* First clause is quick check when the file already has a map.  LOADFILEMAP will find file map, rebuild if necessary and rewrite it on file if  updatemapflg is T.) (AND (for GROUP in (CDR MAP) thereis (SETQ VALUE (FASSOC FN GROUP))) (LIST FULL (CADR VALUE) (CDDR VALUE) 'MAP] (T FULL]) (PFCOPYBYTES - [LAMBDA (SRCFIL DSTFIL START END FLG) (* ; "Edited 29-Mar-96 11:51 by rmk") - (* ; "Edited 24-Mar-93 14:16 by rmk:") + [LAMBDA (SRCFIL DSTFIL START END FLG) (* ; "Edited 27-Jun-2021 23:29 by rmk:") + (* ; "Edited 24-Mar-93 14:16 by rmk:") (* lmm "28-Sep-86 14:38") - (* ;; " copy from SRCFIL to DSTFIL, paying attention to font changes. Other stuff about truncating lines gone away. Interprets all possible EOL conventions as EOL. Has to call \NSIN macro in order to keep track of character count--READDCODE doesn't do that.") + (* ;; " copy from SRCFIL to DSTFIL, paying attention to font changes. Other stuff about truncating lines gone away. Interprets all possible EOL conventions as EOL. Has to call \INCHAR-\INCCODE macros in order to keep track of character count--READDCODE doesn't do that.") + + (* ;; "If END is NIL and START is given, then START is the number of characters to copy from the current file position. Otherwise, copy to the end of the file.") (DECLARE (GLOBALVARS CHANGECHAR COMMENTFLG **COMMENT**FLG)) (RESETLST (PROG ((SSTRM (\INSTREAMARG SRCFIL)) (DSTRM (\OUTSTREAMARG DSTFIL)) FONTARRAY CHARCODE %#CHARS MAXFONT) - (DECLARE (SPECVARS . T)) + (DECLARE (SPECVARS . T)) (* ; + "In particular, #CHARS must be a specvar for \INCCODE") (COND ((IMAGESTREAMP DSTRM) (SETQ FONTARRAY (FONTMAPARRAY)) @@ -181,7 +66,7 @@ Copyright (c) 1986, 1987, 1990, 1999, 2018 by Venue & Xerox Corporation. All ri DSTRM)) (DSPFONT (ELT FONTARRAY 1) DSTRM))) - (SETQ %#CHARS (COND + [SETQ %#CHARS (COND (END (SETFILEPTR SSTRM START) (* ;; "Doesn't call \SETFILEPTR cause START has to be checked") @@ -192,65 +77,36 @@ Copyright (c) 1986, 1987, 1990, 1999, 2018 by Venue & Xerox Corporation. All ri (T END)) START)) (START) - (T (* ; "Stop on end of file") - (RESETSAVE NIL (LIST [FUNCTION (LAMBDA (STREAM FN) - (REPLACE ENDOFSTREAMOP - OF STREAM WITH FN] - SSTRM - (FETCH ENDOFSTREAMOP OF SSTRM))) - (REPLACE ENDOFSTREAMOP OF SSTRM - WITH (FUNCTION NILL)) - MAX.SMALL.INTEGER))) + (T (* ; + "Copy everything from here to the end-of-file") + (SETQ START (GETFILEPTR SSTRM)) + (IDIFFERENCE (GETEOFPTR SSTRM) + (GETFILEPTR SSTRM] (COND - ((AND START (ILEQ %#CHARS 0)) - (RETURN T))) - LP [COND ((ILEQ %#CHARS 0) - (COND - (START (RETURN T)) - (T (* ; - "Just keep the counter going until EOF") - (SETQ %#CHARS MAX.SMALL.INTEGER] - (SETQ CHARCODE (\NSIN SSTRM (UNFOLD (ACCESS-CHARSET SSTRM) - 256) - NIL %#CHARS)) - (SELCHARQ CHARCODE - ((LINEFEED EOL) (* ; - "Output CR, since we don't rely on EOL convention") - (TERPRI DSTRM) - (GO LP)) - (CR - (* ;; "Consume next LF, since we don't rely on EOL convention") - - (CL:WHEN (EQ (CHARCODE LF) - (\PEEKBIN SSTRM T)) - (\BIN SSTRM) - (SETQ %#CHARS (SUB1 %#CHARS))) - (TERPRI DSTRM) - (GO LP)) - (NIL (TERPRI DSTRM) (* ; - "This is the EOF when we are copying the whole file") - (RETURN T)) - (^F (* ; - "Don't do EOL interpretation after ^F") - (SETQ CHARCODE (\NSIN SSTRM (UNFOLD (ACCESS-CHARSET SSTRM) - 256) - NIL %#CHARS)) - (COND - ((AND (IGEQ MAXFONT CHARCODE) - (NEQ CHARCODE 0)) - (DSPFONT (ELT FONTARRAY CHARCODE) - DSTRM) - (GO LP)))) - NIL) - (\OUTCHAR DSTRM CHARCODE) + (RETURN T))) (* ; "Nothing to do") + LP (COND + ((ILEQ %#CHARS 0) + (CL:WHEN (AND (EQ START 0) + (EOFP SSTRM)) (* ; "We copied the whole file") + (TERPRI DSTRM)) + (RETURN T))) + (SETQ CHARCODE (\INCCODE.EOLC SSTRM '%#CHARS ANY.EOLC %#CHARS)) + (IF (EQ CHARCODE (CONSTANT (CHARCODE.DECODE FONTESCAPECHAR))) + THEN + + (* ;; + "No EOL check on font character, otherwise we would be limited to 9 fonts") + + (SETQ CHARCODE (\INCCODE SSTRM '%#CHARS %#CHARS)) + (CL:WHEN (AND (IGEQ MAXFONT CHARCODE) + (NEQ CHARCODE 0)) + (DSPFONT (ELT FONTARRAY CHARCODE) + DSTRM)) + ELSE (\OUTCHAR DSTRM CHARCODE)) (GO LP)))]) -(DISPLAYP - [LAMBDA (STREAM) (* AJB "23-Sep-85 14:53") - (LET ((STRM (\OUTSTREAMARG STREAM T))) - (AND STRM (OR (DISPLAYSTREAMP STRM) - (IMAGESTREAMTYPEP STRM 'TEXT]) +(DISPLAYP [LAMBDA (STREAM) (* AJB "23-Sep-85 14:53") (LET ((STRM (\OUTSTREAMARG STREAM T))) (AND STRM (OR (DISPLAYSTREAMP STRM) (IMAGESTREAMTYPEP STRM 'TEXT]) ) (RPAQ? PFDEFAULT NIL) @@ -305,9 +161,9 @@ Copyright (c) 1986, 1987, 1990, 1999, 2018 by Venue & Xerox Corporation. All ri (ADDTOVAR LAMA ) ) -(PUTPROPS PRINTFN COPYRIGHT ("Venue & Xerox Corporation" 1986 1987 1990 1999 2018)) +(PUTPROPS PRINTFN COPYRIGHT ("Venue & Xerox Corporation" 1986 1987 1990 1999 2018 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (1112 12351 (PF 1122 . 3817) (PF* 3819 . 4117) (PMORE 4119 . 4442) (PRINTFN 4444 . 5039) - (PRINTFNDEF 5041 . 6263) (FINDFNDEF 6265 . 7321) (PFCOPYBYTES 7323 . 12097) (DISPLAYP 12099 . 12349)) + (FILEMAP (NIL (1113 11032 (PF 1123 . 3818) (PF* 3820 . 4114) (PMORE 4116 . 4435) (PRINTFN 4437 . 5028) + (PRINTFNDEF 5030 . 6147) (FINDFNDEF 6149 . 7173) (PFCOPYBYTES 7175 . 10782) (DISPLAYP 10784 . 11030)) ))) STOP diff --git a/sources/PRINTFN.LCOM b/sources/PRINTFN.LCOM index 32a4dc3be..c3ab70755 100644 Binary files a/sources/PRINTFN.LCOM and b/sources/PRINTFN.LCOM differ diff --git a/sources/TTYIN b/sources/TTYIN index 806a2b3d8..3e9f34dc1 100644 --- a/sources/TTYIN +++ b/sources/TTYIN @@ -1,33 +1,20 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "24-May-91 11:33:53" |{PELE:MV:ENVOS}SOURCES>TTYIN.;6| 330378 - - changes to%: (FNS TTYIN TTYIN.CLEANUP TTYIN1 TTYIN1RESTART TTYIN.FINISH ADDCHAR TTADDTAB - ADJUSTLINE ADJUSTLINE.AND.RESTORE BREAKLINE CHECK.MARGIN CURRENT.WORD - DELETE.TO.END DELETELINE DELETETO DELETETO1 DO.EDIT.COMMAND DO.EDIT.PP - FIND.LINE FIND.NEXT.WORD FORWARD.DELETE.TO GO.TO.FREELINE GO.TO.RELATIVE - INSERTLINE KILLSEGMENT MOVE.TO.LINE MOVE.TO.NEXT.LINE NTH.COLUMN.OF - NTH.RELATIVE.COLUMN.OF OVERFLOW? OVERFLOWLINE? PREVLINE PREVWORD READFROMBUF - RENUMBER.LINES RESTOREBUF RETYPE.BUFFER SCANBACK SCANFORWARD SCRATCHCONS - SEGMENT.LENGTH SEGMENT.BIT.LENGTH SETTAIL? SHOW.MATCHING.PAREN SKIP/ZAP - START.NEW.LINE START.OF.PARAGRAPH? TTDELETECHAR TTDELETELINE TTDELETEWORD - TTECHO.TO.FILE TTLASTLINE TTNEXTLINE TTNLEFT TTNTH TTNTHLINE TTRUBOUT - TYPE.BUFFER U/L-CASE TTRATOM DO.INSERT.LINE TTADJUSTWIDTH TTYINBUFFERSTREAM - TTYINBUFFERBIN TTYINBUFFERPEEK TTYINBUFFERREADP TTYINBUFFEREOFP - TTYINBUFFERBACKPTR DO.MOUSE DO.SHIFTED.SELECTION DELETE.LONG.SEGMENT - DELETE.LONG.SEGMENT1 INVERT.LONG.SEGMENT INVERT.SEGMENT BRACKET.CURRENT.WORD - TTBEFOREPOS TTNEXTPOS TTRACKMOUSE TTYIN.LASTINPUT) - - previous date%: "24-May-91 10:23:44" |{PELE:MV:ENVOS}SOURCES>TTYIN.;5|) +(FILECREATED "13-Jun-2021 10:11:51" {DSK}kaplan>Local>medley3.5>git-medley>sources>TTYIN.;5 329054 + + changes to%: (MACROS AT.START.OF.LINE EMPTY.LINE) + + previous date%: "13-Jun-2021 10:04:21" +{DSK}kaplan>Local>medley3.5>git-medley>sources>TTYIN.;3) (* ; " -Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1982-1988, 1990-1991, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT TTYINCOMS) (RPAQQ TTYINCOMS - [(COMS (* ; "Main TTYIN editor") + [(COMS (* ; "Main TTYIN editor") (FNS TTYIN TTYIN.SETUP TTYIN.CLEANUP TTYIN1 TTYIN1RESTART TTYIN.FINISH TTYIN.BALANCE ADDCHAR TTMAKECOMPLEXCHAR ADDNAKEDCHAR TTADDTAB ADJUSTLINE ADJUSTLINE.AND.RESTORE AT.END.OF.SCREEN AT.END.OF.TEXT AUTOCR? BACKSKREAD BACKWARD.DELETE.TO BREAKLINE @@ -47,37 +34,37 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe TTLOADBUF TTNEXTLINE TTNEXTNODE TTNLEFT TTNTH TTNTHLINE TTPRIN1 TTPRINSPACE TTPRIN1COMMENT TTPRIN2 TTPROMPTCHAR TTRUBOUT TTUNREADBUF TTWAITFORINPUT TTYINSTRING TYPE.BUFFER U-CASECODE U/L-CASE)) - (COMS (* ; "Internal reading. These functions all expect caller to have bound *READTABLE* correctly (not bound in TTYIN for who-line transparency)") + (COMS (* ; "Internal reading. These functions all expect caller to have bound *READTABLE* correctly (not bound in TTYIN for who-line transparency)") (FNS TTRATOM TTREADLIST TTSKIPSEPR TTSKREAD TTYIN.READ)) - (COMS (* ; "Escape completion and friends") + (COMS (* ; "Escape completion and friends") (FNS FIND.MATCHING.WORD TTCOMPLETEWORD WORD.MATCHES.BUFFER TTYIN.SHOW.?ALTERNATIVES)) - (COMS (* ; "? and ?= handler") + (COMS (* ; "? and ?= handler") (FNS DO?CMD TTYIN.PRINTARGS TTYIN.READ?=ARGS DO?CMD.ERRORHANDLER)) - (COMS (* ; "Display handling") + (COMS (* ; "Display handling") (FNS BEEP BITBLT.DELETE BITBLT.ERASE BITBLT.INSERT DO.CRLF DO.DELETE.LINES DO.INSERT.LINE DO.LF ERASE.TO.END.OF.LINE ERASE.TO.END.OF.PAGE INSERT.TEXT TTDELSECTION TTADJUSTWIDTH TTINSERTSECTION TTSETCURSOR)) - [COMS (* ; "TTYINBUFFERSTREAM") + [COMS (* ; "TTYINBUFFERSTREAM") (FNS TTYINBUFFERDEVICE TTYINBUFFERSTREAM TTYINBUFFERBIN TTYINBUFFERPEEK TTYINBUFFERREADP TTYINBUFFEREOFP TTYINBUFFERBACKPTR TTYINWORDRDTBL) (DECLARE%: DONTEVAL@LOAD DOCOPY (VARS (TTYINBUFFERDEVICE (TTYINBUFFERDEVICE)) (TTYINWORDRDTBL (TTYINWORDRDTBL] - (COMS (* ; "Mouse handling") + (COMS (* ; "Mouse handling") (FNS DO.MOUSE DO.SHIFTED.SELECTION COPY.SEGMENT DELETE.LONG.SEGMENT DELETE.LONG.SEGMENT1 INVERT.LONG.SEGMENT INVERT.SEGMENT BRACKET.CURRENT.WORD TTBEFOREPOS TTNEXTPOS TTRACKMOUSE)) (COMS - (* ;; "Auxiliary fns. These are outside the TTYIN block, and are provided to aid the outside world in special interfaces to TTYIN") + (* ;; "Auxiliary fns. These are outside the TTYIN block, and are provided to aid the outside world in special interfaces to TTYIN") (FNS SETREADFN TTYINENTRYFN TTYINREADP TTYINREAD TTYINFIX CHARMACRO? TTYINMETA TTYIN.LASTINPUT) (FNS TTYINEDIT SIMPLETEXTEDIT SET.TTYINEDIT.WINDOW TTYIN.PPTOFILE) - (COMS (* ; - "New, correct way of getting scratch file") + (COMS (* ; + "New, correct way of getting scratch file") (FNS MAKE-TTSCRATCHFILE) (RESOURCES TTSCRATCHFILE)) - (COMS (* ; - "Obsolete, but maybe someone calls it") + (COMS (* ; + "Obsolete, but maybe someone calls it") (FNS TTYIN.SCRATCHFILE \TTYIN.RPEOF) (INITVARS (TTYINEDIT.SCRATCH))) (INITVARS (TTYINEDITWINDOW) @@ -85,11 +72,11 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (TTYINAUTOCLOSEFLG) (TTYINPRINTFN) (TTYIN?=FN))) - [COMS (* ; "Kludge of the week") + [COMS (* ; "Kludge of the week") (FNS TTYINPROMPTFORWORD) (INITVARS (TTYIN.USE.EXACT.CHARS)) - (DECLARE%: DONTEVAL@LOAD DOCOPY (* ; - "This is so that you can (MOVD 'TTYINPROMPTFORWORD 'PROMPTFORWORD) and not die") + (DECLARE%: DONTEVAL@LOAD DOCOPY (* ; + "This is so that you can (MOVD 'TTYINPROMPTFORWORD 'PROMPTFORWORD) and not die") (P (MOVD? 'PROMPTFORWORD 'NON-TTYIN-PROMPTFORWORD NIL T] (DECLARE%: DOEVAL@COMPILE DONTCOPY (COMS * TTCOMPILETIME)) (INITVARS (DORADO.RESTORE.BUF.CODES '(194)) @@ -387,22 +374,22 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (SETQ TTYINBUFFER \TTYINSTATE]) (TTYIN1 - [LAMBDA NIL (* ; "Edited 24-May-91 10:33 by jds") + [LAMBDA NIL (* ; "Edited 13-Jun-2021 09:55 by rmk:") -(* ;;; "The main moby subfn of TTYIN. Is errorset protected in caller") +(* ;;; "The main moby subfn of TTYIN. Is errorset protected in caller") (PROG ((DRIBFL (DRIBBLEFILE)) CHAR MATCHED RESULT STARTOFWORD X TMP WASEDITCHAR SNX) (COND ((SETQ CHAR (fetch (LINEBUFFER PEEKEDCHAR) of \LINEBUF.OFD)) - (* ; "Handle peeked char") + (* ; "Handle peeked char") [COND ((AND (OR (NULL \PROMPT1) (EQ \FIRSTTIME 'NOPROMPT)) (OR T (fetch (LINEBUFFER PEEKEDECHOFLG) of \LINEBUF.OFD)) (>= CHAR (CHARCODE SPACE))) - (* ;; "Want to avoid echoing peeked char twice. Only feasible to do so if we were called with no prompt, implying that there is some hope that the preceding char on the line is the peeked char") + (* ;; "Want to avoid echoing peeked char twice. Only feasible to do so if we were called with no prompt, implying that there is some hope that the preceding char on the line is the peeked char") (SETQ X (FCHARWIDTH CHAR \FONT)) (DSPBACKUP X \DSP) @@ -413,20 +400,20 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe PROMPT0 (TTYIN1RESTART) (COND - ((NOT \FIRSTTIME) (* ; "Space over to where we started") + ((NOT \FIRSTTIME) (* ; "Space over to where we started") (GO.TO.ADDRESSING \INITPOS 0))) (SETQ RESULT NIL) PROMPT1 (INIT.CURSOR \INITPOS) (COND [(AND (EQ \FIRSTTIME 'NOPROMPT) - \PROMPT1) (* ; - "Prompting has already happened; account for it") + \PROMPT1) (* ; + "Prompting has already happened; account for it") (COND ((< (SETQ X (- \INITPOS (STRINGWIDTH \PROMPT1 \FONT))) \LMARG) - (* ;; "Caller is confused; prompt couldn't have fit. Typically happens when LISPXREAD is called by other than LISPX") + (* ;; "Caller is confused; prompt couldn't have fit. Typically happens when LISPXREAD is called by other than LISPX") (SETQ \PROMPT1)) (T (SETQ \INITPOS X] @@ -441,46 +428,46 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe \CHARWIDTH) \CURSORCOL)) - (* ;; "Caller specified first tabstop as the position of the first char; we don't treat that as a tabstop, so peel it off") + (* ;; "Caller specified first tabstop as the position of the first char; we don't treat that as a tabstop, so peel it off") (SETQ TABS (CDR TABS] (COND - [UNREADBUF (* ; - "something to preload buffer with") + [UNREADBUF (* ; + "something to preload buffer with") (COND ((FIXP UNREADBUF) - (SETQ CHAR UNREADBUF) (* ; - "interpret number as character code of something to type ahead, usually altmode") + (SETQ CHAR UNREADBUF) (* ; + "interpret number as character code of something to type ahead, usually altmode") (SETQ UNREADBUF NIL) (GO SELECTCHAR)) (T (WITH-RESOURCES (TTSCRATCHFILE) (TTLOADBUF (PROG1 (COND ((EQMEMB 'PRETTY OPTIONS) - (* ;; - "We were told to pretty-print the FIXed form, so have to use a temp file.") + (* ;; + "We were told to pretty-print the FIXed form, so have to use a temp file.") - (* ;; - "Pass TTLOADBUF a list ( (file start . end)).") + (* ;; + "Pass TTLOADBUF a list ( (file start . end)).") (LIST HISTSTR1 (TTYIN.PPTOFILE (COND ((EQ (CAR (SETQ X (LAST UNREADBUF))) HISTSTR0) - (* ; - "knock off the terminating marker") + (* ; + "knock off the terminating marker") (LDIFF UNREADBUF X)) (T UNREADBUF)) 'PRETTY RDTBL TTSCRATCHFILE))) - (T (* ; - "Not pretty printing; just pass TTLOADBUF the form to FIX.") + (T (* ; + "Not pretty printing; just pass TTLOADBUF the form to FIX.") UNREADBUF)) (SETQ UNREADBUF NIL) (SETFILEPTR TTSCRATCHFILE 0))] (\FIRSTTIME - (* ;; "(for FORM in AFTERPROMPTCHARFORMS bind REFRESH when (EVAL FORM) do (SETQ REFRESH T) (* User forms to do after prompt is printed but before we do anything more. If one returns T, means it altered the display) finally (COND (REFRESH (SETQ \FIRSTTIME) (GO PROMPT1))))") + (* ;; "(for FORM in AFTERPROMPTCHARFORMS bind REFRESH when (EVAL FORM) do (SETQ REFRESH T) (* User forms to do after prompt is printed but before we do anything more. If one returns T, means it altered the display) finally (COND (REFRESH (SETQ \FIRSTTIME) (GO PROMPT1))))") )) (SETQ \FIRSTTIME) (COND @@ -498,34 +485,34 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (EMPTY.BUFFER)) ((LISTP (CAR X)) (EVAL (CAR X))) - (T (* ; - "Old style macros that worked only at start of buffer") + (T (* ; + "Old style macros that worked only at start of buffer") (SETQ X TMP) (EMPTY.BUFFER))) (OR (NLISTP (SETQ X (CDR X))) (SETQ X (EVAL X] - (* ;; "Simple read macros: if you type the char on a blank line, and the macro returns something, use it as the value of the READ (or whatever)") + (* ;; "Simple read macros: if you type the char on a blank line, and the macro returns something, use it as the value of the READ (or whatever)") (COND - [(FIXP X) (* ; - "Special: means pretend this CHARACTER code was typed") + [(FIXP X) (* ; + "Special: means pretend this CHARACTER code was typed") (SELECTQ X - (0 (* ; "No action") + (0 (* ; "No action") (GO CHAR)) - (-1 (* ; - "Means refresh line, because terminal control was taken away") + (-1 (* ; + "Means refresh line, because terminal control was taken away") (SETQ CHAR NIL) (GO PROMPT1)) (COND ((METACHARP (SETQ CHAR X)) [COND ((EQ (NONMETACHARBITS X) - 0) (* ; "another way to get edit prefix") + 0) (* ; "another way to get edit prefix") (SETQ CHAR (METACHAR (TTBIN T] T] - ((EMPTY.BUFFER) (* ; - "For now I'm not handling funny results in the middle") + ((EMPTY.BUFFER) (* ; + "For now I'm not handling funny results in the middle") (SETQ RESULT (OR (LISTP X) (LIST X))) (GO DOCRLF] @@ -534,62 +521,62 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (SETQ WASEDITCHAR NIL)) ([NOT (SETQ CHAR (DO.EDIT.COMMAND (NONMETACHARBITS CHAR] (GO CHAR)) - (T (* ; - "Fall thru if edit char gave us something to chomp on") + (T (* ; + "Fall thru if edit char gave us something to chomp on") (SETQ WASEDITCHAR T))) [COND - ((SELECTC (fetch TERMCLASS of (\SYNCODE \PRIMTERMSA CHAR)) + ((SELECTC (fetch (TERMCODE TERMCLASS) of (\SYNCODE \PRIMTERMSA CHAR)) (CHARDELETE.TC (TTDELETECHAR) T) (LINEDELETE.TC (TTDELETELINE) T) (WORDDELETE.TC (TTDELETEWORD) T) - (RETYPE.TC (* ; "^R retype") + (RETYPE.TC (* ; "^R retype") (SETQ \PFW.FIRSTTIME NIL) [RETYPE.BUFFER (COND ((OR (ON.FIRST.LINE) (NOT (EMPTY.LINE))) \ARROW) - (T (* ; - "If sitting on empty line, refresh the previous line") + (T (* ; + "If sitting on empty line, refresh the previous line") (PREVLINE \ARROW 1] (COND ((EQ CHAR (SETQ CHAR (TTBIN))) - (* ; - "two ^R's means retype whole buffer") + (* ; + "two ^R's means retype whole buffer") (OR DISPLAYTERMFLG (TTCRLF)) - (* ; - "set off full retype by double line") + (* ; + "set off full retype by double line") (RETYPE.BUFFER \FIRSTLINE T)) (T (GO SELECTCHAR))) T) - NIL) (* ; - "Did some routine editing command. This cancels promptforword kill mode") + NIL) (* ; + "Did some routine editing command. This cancels promptforword kill mode") (SETQ \PFW.FIRSTTIME NIL)) ((PROGN (SETQ SNX (\SYNCODE \RDTBLSA CHAR)) - (AND \FILLINGBUFFER (EQ (fetch WAKEUP of SNX) + (AND \FILLINGBUFFER (EQ (fetch (READCODE WAKEUP) of SNX) IMMEDIATE.RMW) - (AT.END.OF.TEXT \CURSOR))) (* ; - "Immediate read macro--return now") + (AT.END.OF.TEXT \CURSOR))) (* ; + "Immediate read macro--return now") (GO DOCRLF)) (T (if \PFW.FIRSTTIME - then (* ; "The only non-meta characters that accept the input are cr, space and the hard-wired editing commands (which we have mostly covered already)") + then (* ; "The only non-meta characters that accept the input are cr, space and the hard-wired editing commands (which we have mostly covered already)") (SELCHARQ CHAR ((CR SPACE ^X ^A BS RUBOUT ^Q ^U ^W)) - (PROGN (* ; - "Kill the entire input (could be more than one line if long input or long prompt)") + (PROGN (* ; + "Kill the entire input (could be more than one line if long input or long prompt)") (MOVE.TO.LINE \FIRSTLINE) (DELETE.TO.END))) (SETQ \PFW.FIRSTTIME NIL)) (COND - ((AND (fetch STOPATOM of SNX) - (NOT \DONTCOMPLETE)) (* ; "End of atom, try completion") + ((AND (fetch (READCODE STOPATOM) of SNX) + (NOT \DONTCOMPLETE)) (* ; "End of atom, try completion") (TTCOMPLETEWORD T))) (SELECTC SNX ((LIST RIGHTPAREN.RC RIGHTBRACKET.RC) - (* ;; "Right paren/bracket. See if it terminates read. Note that \READING is implicitly true here, since there are no parens in the word rdtbl") + (* ;; "Right paren/bracket. See if it terminates read. Note that \READING is implicitly true here, since there are no parens in the word rdtbl") (SETQ STARTOFWORD \CURSOR) (ADDCHAR CHAR) @@ -597,36 +584,36 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe ((ENDREAD?) (GO DOCRLF)) ((AND SHOWPARENFLG T (NOT (TYPEAHEAD?))) - (* ; - "prime conditions for hack to show which paren it matched") + (* ; + "prime conditions for hack to show which paren it matched") (SHOW.MATCHING.PAREN STARTOFWORD)))) (SELECTC CHAR ((CHARCODE ESCAPE) [COND - (SPLST (* ; - "try to complete from spelling list") + (SPLST (* ; + "try to complete from spelling list") (OR (TTCOMPLETEWORD) (BEEP))) [(AND TTYINCOMPLETEFLG \LISPXREADING) - (* ;; "always try to complete") + (* ;; "always try to complete") (COND ((SETQ STARTOFWORD (CURRENT.WORD)) (SETQ MATCHED (FIND.MATCHING.WORD USERWORDS STARTOFWORD))) ((NEQ TTYINCOMPLETEFLG 0) - (* ;; "naked escape stands for LASTWORD. ") + (* ;; "naked escape stands for LASTWORD. ") (SETQ MATCHED (LIST LASTWORD)) LASTWORD)) - (SETQ CHAR DIDESCAPECODE) (* ; "Kludge used by ? routine below") + (SETQ CHAR DIDESCAPECODE) (* ; "Kludge used by ? routine below") (COND (MATCHED (OR (TTCOMPLETEWORD NIL NIL MATCHED (OR STARTOFWORD \CURSOR)) (BEEP))) (T (BEEP] - (T (* ; "no special significance") + (T (* ; "no special significance") (ADDNAKEDCHAR (CHARCODE ESCAPE]) ((CHARCODE (%" *)) (ADDCHAR CHAR) @@ -637,23 +624,23 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe ((CHARCODE SPACE) (if (AND (EQ \PROMPTFORWORD 'PROMPTFORWORD-SPACE) (AT.END.OF.TEXT \CURSOR)) - then (* ; "Space completes") + then (* ; "Space completes") (GO DOCRLF)) (OR (AUTOCR?) (ADDCHAR CHAR))) - ((CHARCODE ?) (* ; "supply alternative completions") + ((CHARCODE ?) (* ; "supply alternative completions") (TTYIN.SHOW.?ALTERNATIVES)) - ((CHARCODE CR) (* ; "terminate line") + ((CHARCODE CR) (* ; "terminate line") [COND - ((NOT WASEDITCHAR) (* ; "i.e. not edit-CR") - (* ; "Check for ? and ?= macros") + ((NOT WASEDITCHAR) (* ; "i.e. not edit-CR") + (* ; "Check for ? and ?= macros") (PROG ((START (fetch (LINE START) of \ARROW)) TAIL) (COND ((EQ \CURSOR START) (RETURN))) (SETQ TAIL (NLEFT START 1 \CURSOR)) - (* ; "Look at last char on line") + (* ; "Look at last char on line") (SELCHARQ (CAR TAIL) (? (COND ((AND (DEFINEDP 'XHELPSYS) @@ -676,12 +663,12 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe ((NOT (AT.END.OF.TEXT \CURSOR)) (COND ((OR \REPEAT \READING) - (* ; - "Insert a and continue reading") + (* ; + "Insert a and continue reading") (BREAKLINE EOLCHARCODE) (GO CHAR)) - (T (* ; - " typed here would terminate, so unread what's left") + (T (* ; + " typed here would terminate, so unread what's left") (TTUNREADBUF] (COND [(NOT (AT.END.OF.BUF)) @@ -691,15 +678,15 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe ((AND \READING (NOT \PROMPT2) (AT.END.OF.TEXT (fetch (LINE END) of \ARROW))) - (* ;; "Really the same condition as previous clause: there are lines after this one, but they're blank, so it looks like we're on the last line") + (* ;; "Really the same condition as previous clause: there are lines after this one, but they're blank, so it looks like we're on the last line") (MOVE.FORWARD.TO (fetch (LINE END) of \ARROW)) - (* ; - "have to make the extra stuff go away so the finishing routines are happy") + (* ; + "have to make the extra stuff go away so the finishing routines are happy") (DELETE.TO.END)) (T (DO.EDIT.COMMAND (CHARCODE CR)) - (* ; - "CR on other than last line just means go down one") + (* ; + "CR on other than last line just means go down one") (GO CHAR] ((OR (NOT \DONTCOMPLETE) (EQ \DONTCOMPLETE 'CRCOMPLETE)) @@ -714,49 +701,49 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (FIND.NON.SPACE \BUFFER) ) \ENDBUFFER] - (T T)) (* ; - "Terminating conditions: no REPEAT, or first line is a comment or has a single command on it") + (T T)) (* ; + "Terminating conditions: no REPEAT, or first line is a comment or has a single command on it") (SETQ CTRLVFLG (SETQ RESULT)) - (SETQ CHAR (CHARCODE EOL)) (* ; - "Lisp likes to treat cr as (choke) EOL") + (SETQ CHAR (CHARCODE EOL)) (* ; + "Lisp likes to treat cr as (choke) EOL") (GO DOCRLF)) (T (START.NEW.LINE EOLCHARCODE)))) - ((CHARCODE ^X) (* ; "Maybe exit") + ((CHARCODE ^X) (* ; "Maybe exit") (COND ((COND - (\READING (* ; - "return if parens balance. If already at end, add enough parens to balance") + (\READING (* ; + "return if parens balance. If already at end, add enough parens to balance") (TTYIN.BALANCE T (AT.END.OF.TEXT \CURSOR))) - (T (* ; - "Taking string input, etc--finish now") + (T (* ; + "Taking string input, etc--finish now") (MOVE.TO.WHEREVER \ENDBUFFER) T)) (SETQ CHAR (CHARCODE EOL)) (GO DOCRLF)))) ((CHARCODE ^V) (COND - ((NEQ \REPEAT 'TEXT) (* ; "Means enter control char") + ((NEQ \REPEAT 'TEXT) (* ; "Means enter control char") (SETQ CHAR (TTBIN)) (ADDNAKEDCHAR (if (EQ CHAR (CHARCODE ?)) then - (* ; - "This is the only way to get a rubout") + (* ; + "This is the only way to get a rubout") (SETQ CHAR (CHARCODE RUBOUT)) elseif (>= CHAR (CHARCODE @)) then - (* ; - "Change alphabetics to corresponding control char") + (* ; + "Change alphabetics to corresponding control char") (SETQ CHAR (LOGAND CHAR 31)) else - (* ; "take exact char") + (* ; "take exact char") CHAR))) - ((AT.END.OF.BUF) (* ; - "terminate multiline input and set special flag") + ((AT.END.OF.BUF) (* ; + "terminate multiline input and set special flag") (SETQ CTRLVFLG T) (TTBOUT ^ V) (GO DOCRLF)) (T (BEEP)))) - ((CHARCODE ^Z) (* ; "^Z terminates multiline input") + ((CHARCODE ^Z) (* ; "^Z terminates multiline input") (COND ((AND \REPEAT (AT.END.OF.BUF)) (TTBOUT ^ Z) @@ -764,10 +751,10 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (GO DOCRLF)) (\READING (ADDNAKEDCHAR CHAR)) (T (BEEP)))) - ((CHARCODE ^Y) (* ; "^Y invokes user exec") + ((CHARCODE ^Y) (* ; "^Y invokes user exec") (COND ((AND \READING (NOT WASEDITCHAR)) - (* ; "let ^Y read macro work instead") + (* ; "let ^Y read macro work instead") (ADDNAKEDCHAR CHAR)) ((GUESTUSER?) (BEEP)) @@ -775,7 +762,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (SAVE.CURSOR) (GO.TO.FREELINE) (COND - (DRIBFL (* ; "Make typescript understandable") + (DRIBFL (* ; "Make typescript understandable") (AND \PROMPT1 (PRIN1 \PROMPT1 DRIBFL)) (PRINT '^Y DRIBFL))) (PRIN1 "lisp: @@ -786,12 +773,12 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (PROG ((\INSIDE.TTYIN)) (USEREXEC '__)) (GO RETYPEBUFFER)))) - (0 (* ; "ignore NULL")) + (0 (* ; "ignore NULL")) ((CHARCODE (^A BS RUBOUT)) (TTDELETECHAR)) - ((CHARCODE (^Q ^U)) (* ; "^Q delete line; ^U on tops20") + ((CHARCODE (^Q ^U)) (* ; "^Q delete line; ^U on tops20") (TTDELETELINE)) - ((CHARCODE ^W) (* ; "^W delete last word") + ((CHARCODE ^W) (* ; "^W delete last word") (TTDELETEWORD)) (COND ([MEMB CHAR (OR \RESTOREBUFCODES (SETQ \RESTOREBUFCODES @@ -800,10 +787,10 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe DORADO.RESTORE.BUF.CODES) TTYIN.RESTORE.BUF.CODES] - (* ;; "One of the characters we interpret as %"restore last buffer%". Recomputed after exit in case we change machine. The dorado code is a perfectly good charset 0 code, so don't usually want to usurp it.") + (* ;; "One of the characters we interpret as %"restore last buffer%". Recomputed after exit in case we change machine. The dorado code is a perfectly good charset 0 code, so don't usually want to usurp it.") (RESTOREBUF)) - [(> CHAR 32) (* ; "not a control char") + [(> CHAR 32) (* ; "not a control char") (ADDCHAR (COND (\RAISEINPUT (U-CASECODE CHAR)) (T CHAR] @@ -815,11 +802,11 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe DOCRLF - (* ;; "Come here when it is time to terminate line") + (* ;; "Come here when it is time to terminate line") (COND ((EQ (SETQ RESULT (TTYIN.FINISH CHAR DRIBFL RESULT)) - 'ABORT) (* ; "Aborted, try again") + 'ABORT) (* ; "Aborted, try again") (SETQ CHAR NIL) (GO PROMPT0)) (T (RETURN RESULT]) @@ -1119,14 +1106,14 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe 7) to 7 collect (CHARCODE SPACE]) (ADJUSTLINE - [LAMBDA (JUSTIFYING LINE) (* ; "Edited 24-May-91 10:33 by jds") + [LAMBDA (JUSTIFYING LINE) (* ; "Edited 13-Jun-2021 10:01 by rmk:") - (* ;; "Handles patching up lines that are too long or short. Assures that the current line, ARROW, is correct with regard to overflows. If JUSTIFYING is true, it is a number specifying how many lines to 'justify' , by which we mean moving text around so that each line has as many words as possible for the linelength, but does not overflow. We don't do anything very fancy with that, like take care of deleting extra spaces.") + (* ;; "Handles patching up lines that are too long or short. Assures that the current line, ARROW, is correct with regard to overflows. If JUSTIFYING is true, it is a number specifying how many lines to 'justify' , by which we mean moving text around so that each line has as many words as possible for the linelength, but does not overflow. We don't do anything very fancy with that, like take care of deleting extra spaces.") (PROG ((IDEALLENGTH (- [COND ((> TTYJUSTLENGTH 0) (IMIN \RMARG (TIMES TTYJUSTLENGTH \CHARWIDTH))) - (T (* ; "Relative to right margin") + (T (* ; "Relative to right margin") (IMAX (- \RMARG (TIMES (- TTYJUSTLENGTH) \CHARWIDTH)) (+ (LRSH (- \RMARG \LMARG) @@ -1144,7 +1131,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (COND ((< %#BITS 0) - (* ;; "Too much on line; need to break it somewhere, preferably at a space if permissible. If justifying, try to break at the appropriate length") + (* ;; "Too much on line; need to break it somewhere, preferably at a space if permissible. If justifying, try to break at the appropriate length") (COND ([OR (AND JUSTIFYING (< (+ (fetch (LINE FIRSTCOL) of LINE) @@ -1163,9 +1150,9 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (NEQ (SETQ NEWENDLINE (NTH.RELATIVE.COLUMN.OF NEXTLINE %#BITS)) (fetch (LINE START) of NEXTLINE))) - (* ;; "Line is too short, but is an overflow line, so text MUST be moved to fill the gap; alternatively, if we are justifying, we could break the line sooner") + (* ;; "Line is too short, but is an overflow line, so text MUST be moved to fill the gap; alternatively, if we are justifying, we could break the line sooner") - (* ;; "NEWENDLINE = where the line should end, based on linelength") + (* ;; "NEWENDLINE = where the line should end, based on linelength") (COND ([OR (EQ (fetch (LINE END) of LINE) @@ -1185,7 +1172,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe [(OR OVFL (AND (NEQ JUSTIFYING T) (> (- (fetch (LINE LASTCOL) of LINE) (fetch (LINE FIRSTCOL) of LINE)) - IDEALLENGTH))) (* ; "line is longer than we'd like") + IDEALLENGTH))) (* ; "line is longer than we'd like") (COND ((SETQ BREAK (FIND.LINE.BREAK START (NTH.RELATIVE.COLUMN.OF LINE IDEALLENGTH ) @@ -1198,9 +1185,9 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (EQ (CAR (fetch (LINE END) of LINE)) (CHARCODE SPACE] - (* ;; "Don't move up text from next line if it is blank or starts with tab -- treat those as paragraph breaks") + (* ;; "Don't move up text from next line if it is blank or starts with tab -- treat those as paragraph breaks") - (* ;; "Note that we are guaranteed at this point that LINE is not an overflow line, so (fetch END of LINE) points at a space or cr") + (* ;; "Note that we are guaranteed at this point that LINE is not an overflow line, so (fetch END of LINE) points at a space or cr") (COND ((OR (EQ [SETQ BREAK (NTH.RELATIVE.COLUMN.OF @@ -1212,21 +1199,21 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (fetch (LINE END) of NEXTLINE)) (SETQ BREAK (FIND.LINE.BREAK (fetch (LINE START) of NEXTLINE) BREAK T))) - (SETQ NEWENDLINE BREAK) (* ; - "At least one more word from next line will fit up here") + (SETQ NEWENDLINE BREAK) (* ; + "At least one more word from next line will fit up here") (GO DOJOIN)) - (T (* ; - "No text movement, but if line ended in a real , make it a space") + (T (* ; + "No text movement, but if line ended in a real , make it a space") (FRPLACA (fetch (LINE END) of LINE) (CHARCODE SPACE] - ((EQ JUSTIFYING T) (* ; "If this line is fine, quit") + ((EQ JUSTIFYING T) (* ; "If this line is fine, quit") )) (SETQ LINE NEXTLINE) (GO BOTTOM) DOJOIN - (* ;; "Move text from next line up to this one. NEWENDLINE is where line should end when done. BREAK=NEWENDLINE if this new end line is a pseudo-cr break") + (* ;; "Move text from next line up to this one. NEWENDLINE is where line should end when done. BREAK=NEWENDLINE if this new end line is a pseudo-cr break") (COND ((EQ (SETQ OLDENDLINE (fetch (LINE END) of LINE)) @@ -1235,25 +1222,25 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (T (GO.TO.RELATIVE (fetch (LINE LASTCOL) of LINE) ROW) (SETQ %#BITS (SEGMENT.BIT.LENGTH OLDENDLINE NEWENDLINE)) - (* ; - "# chars to delete from next line") + (* ; + "# chars to delete from next line") [COND - ((NOT OVFL) (* ; - "Joining toa non-overflow line: turn its cr into a space") + ((NOT OVFL) (* ; + "Joining toa non-overflow line: turn its cr into a space") (FRPLACA OLDENDLINE (CHARCODE SPACE)) (while (AND (NEQ (CDR OLDENDLINE) NEWENDLINE) (EQ (CADR OLDENDLINE) (CHARCODE SPACE))) do - (* ; - "strip leading spaces from next line") + (* ; + "strip leading spaces from next line") (KILLSEGMENT OLDENDLINE (CDR OLDENDLINE))) (COND ((EQ (CAR (NLEFT (fetch (LINE START) of LINE) 1 OLDENDLINE)) - (CHARCODE %.)) (* ; - "LINE ends in period, so space twice") + (CHARCODE %.)) (* ; + "LINE ends in period, so space twice") (FRPLACA (INSERT.NODE OLDENDLINE) (CHARCODE SPACE] (TYPE.BUFFER OLDENDLINE NEWENDLINE) @@ -1263,21 +1250,21 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (replace (LINE START) of NEXTLINE with (COND (BREAK (FRPLACA BREAK (CHARCODE SPACE)) - (* ; - "In case BREAK was at the CR turn it into space") + (* ; + "In case BREAK was at the CR turn it into space") (COND (OVFL (add %#BITS (TTBITWIDTH (CHARCODE SPACE))) - (* ; "will delete space also") + (* ; "will delete space also") )) (CDR NEWENDLINE)) (T NEWENDLINE))) (COND ((EQ (fetch (LINE END) of NEXTLINE) NEWENDLINE) - (DELETELINE NEXTLINE T) (* ; "Nothing left here, so kill it") + (DELETELINE NEXTLINE T) (* ; "Nothing left here, so kill it") [COND - (JUSTIFYING (* ; - "maybe we can move from next line, too") + (JUSTIFYING (* ; + "maybe we can move from next line, too") (COND ((AND (NEQ JUSTIFYING T) (NEQ (SUB1VAR JUSTIFYING) @@ -1294,7 +1281,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe DOBREAK - (* ;; "Break line at BREAK, moving excess down to next line or a new line. USECR is true if break is to act like a cr; otherwise we are breaking a too-long line at the right margin, so there is no end of line place holder") + (* ;; "Break line at BREAK, moving excess down to next line or a new line. USECR is true if break is to act like a cr; otherwise we are breaking a too-long line at the right margin, so there is no end of line place holder") [replace (LINE LASTCOL) of LINE with (SETQ LASTCOL (+ (SEGMENT.BIT.LENGTH @@ -1302,45 +1289,45 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe BREAK) (fetch (LINE FIRSTCOL) of LINE] - (* ; "Column where break will occur") + (* ; "Column where break will occur") [SETQ %#BITS (SEGMENT.BIT.LENGTH BREAK (SETQ OLDENDLINE (fetch (LINE END) of LINE] - (* ; "length of segment being moved") + (* ; "length of segment being moved") (COND ((NEQ LASTCOL \RMARG) - (GO.TO.RELATIVE LASTCOL ROW) (* ; - "Go wipe out what was there. Don't need to do this if the break is right at the margin") + (GO.TO.RELATIVE LASTCOL ROW) (* ; + "Go wipe out what was there. Don't need to do this if the break is right at the margin") (ERASE.TO.END.OF.LINE))) - (replace END of LINE with BREAK) + (replace (LINE END) of LINE with BREAK) [COND - (USECR (* ; - "we have counted one char too many above...") + (USECR (* ; + "we have counted one char too many above...") [SETQ %#BITS (- %#BITS (TTBITWIDTH (CHARCODE SPACE] (SETQ BREAK (CDR BREAK] (COND [[AND NEXTLINE (OR OVFL (AND (OR (SMALLP JUSTIFYING) (AND (EQ (CAR OLDENDLINE) (CHARCODE SPACE)) - (< (+ (fetch LASTCOL of NEXTLINE) + (< (+ (fetch (LINE LASTCOL) of NEXTLINE) %#BITS) \RMARG))) (NOT (START.OF.PARAGRAPH? NEXTLINE] - (* ;; "Insert the text on the next line, rather than starting new line, if justifying, overflow (forced), or the text will fit, i.e. not cause anything to be bumped off the next line") + (* ;; "Insert the text on the next line, rather than starting new line, if justifying, overflow (forced), or the text will fit, i.e. not cause anything to be bumped off the next line") (GO.TO.RELATIVE 'LINE (SETQ LINE NEXTLINE)) (COND ((NOT OVFL) - (* ;; "Turn the terminating into ordinary space; this space also needs to be inserted and counted, of course") + (* ;; "Turn the terminating into ordinary space; this space also needs to be inserted and counted, of course") (add %#BITS (TTBITWIDTH (CHARCODE SPACE))) (SETQ OLDENDLINE (CDR (FRPLACA OLDENDLINE (CHARCODE SPACE] (T (SETQ LINE (INSERTLINE LINE)) - (replace END of LINE with OLDENDLINE))) - (replace START of LINE with BREAK) - (INSERT.TEXT BREAK OLDENDLINE (fetch END of LINE)) - (add (fetch LASTCOL of LINE) + (replace (LINE END) of LINE with OLDENDLINE))) + (replace (LINE START) of LINE with BREAK) + (INSERT.TEXT BREAK OLDENDLINE (fetch (LINE END) of LINE)) + (add (fetch (LINE LASTCOL) of LINE) %#BITS) BOTTOM (COND @@ -5819,7 +5806,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (PUTPROPS AT.START.OF.BUF MACRO (NIL (EQ \CURSOR \BUFFER))) -(PUTPROPS AT.START.OF.LINE MACRO (NIL (EQ (fetch START of \ARROW) +(PUTPROPS AT.START.OF.LINE MACRO (NIL (EQ (fetch (LINE START) of \ARROW) \CURSOR))) (PUTPROPS BEFOREBUF MACRO ((THIS THAT END) @@ -5835,8 +5822,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (PUTPROPS EMPTY.LINE MACRO [X (SUBST (OR (CAR X) '\ARROW) '\ARROW - '(EQ (fetch START of \ARROW) - (fetch END of \ARROW]) + '(EQ (fetch (LINE START) of \ARROW) + (fetch (LINE END) of \ARROW]) (PUTPROPS EQPOS MACRO [(X Y) (AND (EQ (fetch COLPOS of X) @@ -5848,10 +5835,10 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (NOT (EQPOS X Y)))) (PUTPROPS INPART MACRO (OPENLAMBDA (X) - (COND - ((LISTP X) - (CAR X)) - (T X)))) + (COND + ((LISTP X) + (CAR X)) + (T X)))) (PUTPROPS ON.FIRST.LINE MACRO (NIL (EQ \FIRSTLINE \ARROW))) @@ -5892,16 +5879,16 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991 by Venue & Xe (PUTPROPS TTNEXTCHAR MACRO (= . CDR)) (PUTPROPS BOUTCCODE MACRO (OPENLAMBDA (STREAM CHAR) - (PRINTCCODE CHAR STREAM))) + (PRINTCCODE CHAR STREAM))) (PUTPROPS PEEKBINCCODE MACRO (= . PEEKCCODE)) (PUTPROPS BINCCODE MACRO (= . READCCODE)) (PUTPROPS WORDSEPRP DMACRO [OPENLAMBDA (X) - (OR (EQ (\SYNCODE \PRIMTERMSA X) - WORDSEPR.TC) - (fetch STOPATOM of (\SYNCODE \RDTBLSA X]) + (OR (EQ (\SYNCODE \PRIMTERMSA X) + WORDSEPR.TC) + (fetch STOPATOM of (\SYNCODE \RDTBLSA X]) (PUTPROPS FCHARWIDTH MACRO (= . CHARWIDTH)) @@ -6101,64 +6088,65 @@ DONTEVAL@LOAD EVAL@COMPILE (ADDTOVAR LAMA ) ) -(PUTPROPS TTYIN COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1988 1990 1991)) +(PUTPROPS TTYIN COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1988 1990 1991 +2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (9111 208710 (TTYIN 9121 . 22354) (TTYIN.SETUP 22356 . 25432) (TTYIN.CLEANUP 25434 . -26262) (TTYIN1 26264 . 52747) (TTYIN1RESTART 52749 . 54013) (TTYIN.FINISH 54015 . 63432) ( -TTYIN.BALANCE 63434 . 64560) (ADDCHAR 64562 . 66748) (TTMAKECOMPLEXCHAR 66750 . 67224) (ADDNAKEDCHAR -67226 . 68736) (TTADDTAB 68738 . 69673) (ADJUSTLINE 69675 . 83542) (ADJUSTLINE.AND.RESTORE 83544 . -83982) (AT.END.OF.SCREEN 83984 . 84272) (AT.END.OF.TEXT 84274 . 84729) (AUTOCR? 84731 . 85205) ( -BACKSKREAD 85207 . 89792) (BACKWARD.DELETE.TO 89794 . 89976) (BREAKLINE 89978 . 92245) (BUFTAILP 92247 - . 92565) (CHECK.MARGIN 92567 . 93190) (CLEAR.LINE? 93192 . 93485) (CURRENT.WORD 93487 . 95887) ( -DELETE.TO.END 95889 . 96608) (DELETELINE 96610 . 99567) (DELETETO 99569 . 101391) (DELETETO1 101393 . -102736) (DO.EDIT.COMMAND 102738 . 120057) (DO.EDIT.PP 120059 . 122721) (TTDOTABS 122723 . 124093) ( -EDITCOLUMN 124095 . 124551) (EDITNUMBERP 124553 . 124784) (END.DELETE.MODE 124786 . 125303) (ENDREAD? -125305 . 127740) (FIND.LINE 127742 . 129278) (FIND.LINE.BREAK 129280 . 129950) (FIND.MATCHING.QUOTE -129952 . 130797) (FIND.NEXT.WORD 130799 . 132178) (FIND.NON.SPACE 132180 . 132453) (FIND.START.OF.WORD - 132455 . 132818) (FORWARD.DELETE.TO 132820 . 135042) (GO.TO.ADDRESSING 135044 . 136000) ( -GO.TO.FREELINE 136002 . 136583) (GO.TO.RELATIVE 136585 . 137365) (INIT.CURSOR 137367 . 138264) ( -INSERT.NODE 138266 . 138788) (INSERTLINE 138790 . 140294) (KILL.LINES 140296 . 140834) (KILLSEGMENT -140836 . 141959) (L-CASECODE 141961 . 142122) (MOVE.BACK.TO 142124 . 142353) (MOVE.FORWARD.TO 142355 - . 142776) (MOVE.TO.LINE 142778 . 143693) (MOVE.TO.NEXT.LINE 143695 . 143965) (MOVE.TO.START.OF.WORD -143967 . 144731) (MOVE.TO.WHEREVER 144733 . 144956) (NTH.COLUMN.OF 144958 . 145289) ( -NTH.RELATIVE.COLUMN.OF 145291 . 146591) (OVERFLOW? 146593 . 147541) (OVERFLOWLINE? 147543 . 147869) ( -PREVLINE 147871 . 149051) (PREVWORD 149053 . 151194) (PROPERTAILP 151196 . 151403) (READFROMBUF 151405 - . 153994) (RENUMBER.LINES 153996 . 154389) (RESTORE.CURSOR 154391 . 154545) (RESTOREBUF 154547 . -156731) (RETYPE.BUFFER 156733 . 158996) (SAVE.CURSOR 158998 . 159170) (SCANBACK 159172 . 160530) ( -SCANFORWARD 160532 . 161400) (SCRATCHCONS 161402 . 162004) (SEGMENT.LENGTH 162006 . 162542) ( -SEGMENT.BIT.LENGTH 162544 . 163151) (SETLASTC 163153 . 163450) (SETTAIL? 163452 . 164268) ( -SHOW.MATCHING.PAREN 164270 . 166770) (SKIP/ZAP 166772 . 169251) (START.NEW.LINE 169253 . 169585) ( -START.OF.PARAGRAPH? 169587 . 169968) (TTADJUSTWORD 169970 . 171144) (TTBIN 171146 . 172352) ( -TTBITWIDTH 172354 . 172503) (TTCRLF 172505 . 172712) (TTCRLF.ACCOUNT 172714 . 173354) (TTDELETECHAR -173356 . 174500) (TTDELETELINE 174502 . 176450) (TTDELETEWORD 176452 . 177120) (TTECHO.TO.FILE 177122 - . 180670) (TTGIVEHELP 180672 . 181937) (TTGIVEHELP1 181939 . 182521) (TTGIVEHELP2 182523 . 183218) ( -TTLASTLINE 183220 . 183588) (TTLOADBUF 183590 . 187104) (TTNEXTLINE 187106 . 187426) (TTNEXTNODE -187428 . 187667) (TTNLEFT 187669 . 188896) (TTNTH 188898 . 189357) (TTNTHLINE 189359 . 189891) ( -TTPRIN1 189893 . 193706) (TTPRINSPACE 193708 . 194101) (TTPRIN1COMMENT 194103 . 194427) (TTPRIN2 -194429 . 196748) (TTPROMPTCHAR 196750 . 197646) (TTRUBOUT 197648 . 198611) (TTUNREADBUF 198613 . -199022) (TTWAITFORINPUT 199024 . 203232) (TTYINSTRING 203234 . 204193) (TYPE.BUFFER 204195 . 205947) ( -U-CASECODE 205949 . 206108) (U/L-CASE 206110 . 208708)) (208865 218578 (TTRATOM 208875 . 209319) ( -TTREADLIST 209321 . 209688) (TTSKIPSEPR 209690 . 210064) (TTSKREAD 210066 . 214706) (TTYIN.READ 214708 - . 218576)) (218625 238669 (FIND.MATCHING.WORD 218635 . 219163) (TTCOMPLETEWORD 219165 . 233593) ( -WORD.MATCHES.BUFFER 233595 . 235155) (TTYIN.SHOW.?ALTERNATIVES 235157 . 238667)) (238703 257013 ( -DO?CMD 238713 . 244615) (TTYIN.PRINTARGS 244617 . 255475) (TTYIN.READ?=ARGS 255477 . 256258) ( -DO?CMD.ERRORHANDLER 256260 . 257011)) (257047 265120 (BEEP 257057 . 257232) (BITBLT.DELETE 257234 . -257881) (BITBLT.ERASE 257883 . 258068) (BITBLT.INSERT 258070 . 258381) (DO.CRLF 258383 . 258702) ( -DO.DELETE.LINES 258704 . 259748) (DO.INSERT.LINE 259750 . 261684) (DO.LF 261686 . 261852) ( -ERASE.TO.END.OF.LINE 261854 . 262179) (ERASE.TO.END.OF.PAGE 262181 . 262786) (INSERT.TEXT 262788 . -263292) (TTDELSECTION 263294 . 263592) (TTADJUSTWIDTH 263594 . 264458) (TTINSERTSECTION 264460 . -264799) (TTSETCURSOR 264801 . 265118)) (265155 270132 (TTYINBUFFERDEVICE 265165 . 266481) ( -TTYINBUFFERSTREAM 266483 . 267245) (TTYINBUFFERBIN 267247 . 267783) (TTYINBUFFERPEEK 267785 . 268263) -(TTYINBUFFERREADP 268265 . 268520) (TTYINBUFFEREOFP 268522 . 268774) (TTYINBUFFERBACKPTR 268776 . -269328) (TTYINWORDRDTBL 269330 . 270130)) (270293 295850 (DO.MOUSE 270303 . 273060) ( -DO.SHIFTED.SELECTION 273062 . 283501) (COPY.SEGMENT 283503 . 283707) (DELETE.LONG.SEGMENT 283709 . -284068) (DELETE.LONG.SEGMENT1 284070 . 286546) (INVERT.LONG.SEGMENT 286548 . 287577) (INVERT.SEGMENT -287579 . 289094) (BRACKET.CURRENT.WORD 289096 . 290630) (TTBEFOREPOS 290632 . 291362) (TTNEXTPOS -291364 . 292072) (TTRACKMOUSE 292074 . 295848)) (295994 301250 (SETREADFN 296004 . 296482) ( -TTYINENTRYFN 296484 . 296909) (TTYINREADP 296911 . 297376) (TTYINREAD 297378 . 298772) (TTYINFIX -298774 . 299973) (CHARMACRO? 299975 . 300542) (TTYINMETA 300544 . 300672) (TTYIN.LASTINPUT 300674 . -301248)) (301251 309520 (TTYINEDIT 301261 . 303378) (SIMPLETEXTEDIT 303380 . 306424) ( -SET.TTYINEDIT.WINDOW 306426 . 307577) (TTYIN.PPTOFILE 307579 . 309518)) (309578 309755 ( -MAKE-TTSCRATCHFILE 309588 . 309753)) (309902 310680 (TTYIN.SCRATCHFILE 309912 . 310371) (\TTYIN.RPEOF -310373 . 310678)) (310892 314525 (TTYINPROMPTFORWORD 310902 . 314523))))) + (FILEMAP (NIL (7721 207399 (TTYIN 7731 . 20964) (TTYIN.SETUP 20966 . 24042) (TTYIN.CLEANUP 24044 . +24872) (TTYIN1 24874 . 51392) (TTYIN1RESTART 51394 . 52658) (TTYIN.FINISH 52660 . 62077) ( +TTYIN.BALANCE 62079 . 63205) (ADDCHAR 63207 . 65393) (TTMAKECOMPLEXCHAR 65395 . 65869) (ADDNAKEDCHAR +65871 . 67381) (TTADDTAB 67383 . 68318) (ADJUSTLINE 68320 . 82231) (ADJUSTLINE.AND.RESTORE 82233 . +82671) (AT.END.OF.SCREEN 82673 . 82961) (AT.END.OF.TEXT 82963 . 83418) (AUTOCR? 83420 . 83894) ( +BACKSKREAD 83896 . 88481) (BACKWARD.DELETE.TO 88483 . 88665) (BREAKLINE 88667 . 90934) (BUFTAILP 90936 + . 91254) (CHECK.MARGIN 91256 . 91879) (CLEAR.LINE? 91881 . 92174) (CURRENT.WORD 92176 . 94576) ( +DELETE.TO.END 94578 . 95297) (DELETELINE 95299 . 98256) (DELETETO 98258 . 100080) (DELETETO1 100082 . +101425) (DO.EDIT.COMMAND 101427 . 118746) (DO.EDIT.PP 118748 . 121410) (TTDOTABS 121412 . 122782) ( +EDITCOLUMN 122784 . 123240) (EDITNUMBERP 123242 . 123473) (END.DELETE.MODE 123475 . 123992) (ENDREAD? +123994 . 126429) (FIND.LINE 126431 . 127967) (FIND.LINE.BREAK 127969 . 128639) (FIND.MATCHING.QUOTE +128641 . 129486) (FIND.NEXT.WORD 129488 . 130867) (FIND.NON.SPACE 130869 . 131142) (FIND.START.OF.WORD + 131144 . 131507) (FORWARD.DELETE.TO 131509 . 133731) (GO.TO.ADDRESSING 133733 . 134689) ( +GO.TO.FREELINE 134691 . 135272) (GO.TO.RELATIVE 135274 . 136054) (INIT.CURSOR 136056 . 136953) ( +INSERT.NODE 136955 . 137477) (INSERTLINE 137479 . 138983) (KILL.LINES 138985 . 139523) (KILLSEGMENT +139525 . 140648) (L-CASECODE 140650 . 140811) (MOVE.BACK.TO 140813 . 141042) (MOVE.FORWARD.TO 141044 + . 141465) (MOVE.TO.LINE 141467 . 142382) (MOVE.TO.NEXT.LINE 142384 . 142654) (MOVE.TO.START.OF.WORD +142656 . 143420) (MOVE.TO.WHEREVER 143422 . 143645) (NTH.COLUMN.OF 143647 . 143978) ( +NTH.RELATIVE.COLUMN.OF 143980 . 145280) (OVERFLOW? 145282 . 146230) (OVERFLOWLINE? 146232 . 146558) ( +PREVLINE 146560 . 147740) (PREVWORD 147742 . 149883) (PROPERTAILP 149885 . 150092) (READFROMBUF 150094 + . 152683) (RENUMBER.LINES 152685 . 153078) (RESTORE.CURSOR 153080 . 153234) (RESTOREBUF 153236 . +155420) (RETYPE.BUFFER 155422 . 157685) (SAVE.CURSOR 157687 . 157859) (SCANBACK 157861 . 159219) ( +SCANFORWARD 159221 . 160089) (SCRATCHCONS 160091 . 160693) (SEGMENT.LENGTH 160695 . 161231) ( +SEGMENT.BIT.LENGTH 161233 . 161840) (SETLASTC 161842 . 162139) (SETTAIL? 162141 . 162957) ( +SHOW.MATCHING.PAREN 162959 . 165459) (SKIP/ZAP 165461 . 167940) (START.NEW.LINE 167942 . 168274) ( +START.OF.PARAGRAPH? 168276 . 168657) (TTADJUSTWORD 168659 . 169833) (TTBIN 169835 . 171041) ( +TTBITWIDTH 171043 . 171192) (TTCRLF 171194 . 171401) (TTCRLF.ACCOUNT 171403 . 172043) (TTDELETECHAR +172045 . 173189) (TTDELETELINE 173191 . 175139) (TTDELETEWORD 175141 . 175809) (TTECHO.TO.FILE 175811 + . 179359) (TTGIVEHELP 179361 . 180626) (TTGIVEHELP1 180628 . 181210) (TTGIVEHELP2 181212 . 181907) ( +TTLASTLINE 181909 . 182277) (TTLOADBUF 182279 . 185793) (TTNEXTLINE 185795 . 186115) (TTNEXTNODE +186117 . 186356) (TTNLEFT 186358 . 187585) (TTNTH 187587 . 188046) (TTNTHLINE 188048 . 188580) ( +TTPRIN1 188582 . 192395) (TTPRINSPACE 192397 . 192790) (TTPRIN1COMMENT 192792 . 193116) (TTPRIN2 +193118 . 195437) (TTPROMPTCHAR 195439 . 196335) (TTRUBOUT 196337 . 197300) (TTUNREADBUF 197302 . +197711) (TTWAITFORINPUT 197713 . 201921) (TTYINSTRING 201923 . 202882) (TYPE.BUFFER 202884 . 204636) ( +U-CASECODE 204638 . 204797) (U/L-CASE 204799 . 207397)) (207554 217267 (TTRATOM 207564 . 208008) ( +TTREADLIST 208010 . 208377) (TTSKIPSEPR 208379 . 208753) (TTSKREAD 208755 . 213395) (TTYIN.READ 213397 + . 217265)) (217314 237358 (FIND.MATCHING.WORD 217324 . 217852) (TTCOMPLETEWORD 217854 . 232282) ( +WORD.MATCHES.BUFFER 232284 . 233844) (TTYIN.SHOW.?ALTERNATIVES 233846 . 237356)) (237392 255702 ( +DO?CMD 237402 . 243304) (TTYIN.PRINTARGS 243306 . 254164) (TTYIN.READ?=ARGS 254166 . 254947) ( +DO?CMD.ERRORHANDLER 254949 . 255700)) (255736 263809 (BEEP 255746 . 255921) (BITBLT.DELETE 255923 . +256570) (BITBLT.ERASE 256572 . 256757) (BITBLT.INSERT 256759 . 257070) (DO.CRLF 257072 . 257391) ( +DO.DELETE.LINES 257393 . 258437) (DO.INSERT.LINE 258439 . 260373) (DO.LF 260375 . 260541) ( +ERASE.TO.END.OF.LINE 260543 . 260868) (ERASE.TO.END.OF.PAGE 260870 . 261475) (INSERT.TEXT 261477 . +261981) (TTDELSECTION 261983 . 262281) (TTADJUSTWIDTH 262283 . 263147) (TTINSERTSECTION 263149 . +263488) (TTSETCURSOR 263490 . 263807)) (263844 268821 (TTYINBUFFERDEVICE 263854 . 265170) ( +TTYINBUFFERSTREAM 265172 . 265934) (TTYINBUFFERBIN 265936 . 266472) (TTYINBUFFERPEEK 266474 . 266952) +(TTYINBUFFERREADP 266954 . 267209) (TTYINBUFFEREOFP 267211 . 267463) (TTYINBUFFERBACKPTR 267465 . +268017) (TTYINWORDRDTBL 268019 . 268819)) (268982 294539 (DO.MOUSE 268992 . 271749) ( +DO.SHIFTED.SELECTION 271751 . 282190) (COPY.SEGMENT 282192 . 282396) (DELETE.LONG.SEGMENT 282398 . +282757) (DELETE.LONG.SEGMENT1 282759 . 285235) (INVERT.LONG.SEGMENT 285237 . 286266) (INVERT.SEGMENT +286268 . 287783) (BRACKET.CURRENT.WORD 287785 . 289319) (TTBEFOREPOS 289321 . 290051) (TTNEXTPOS +290053 . 290761) (TTRACKMOUSE 290763 . 294537)) (294683 299939 (SETREADFN 294693 . 295171) ( +TTYINENTRYFN 295173 . 295598) (TTYINREADP 295600 . 296065) (TTYINREAD 296067 . 297461) (TTYINFIX +297463 . 298662) (CHARMACRO? 298664 . 299231) (TTYINMETA 299233 . 299361) (TTYIN.LASTINPUT 299363 . +299937)) (299940 308209 (TTYINEDIT 299950 . 302067) (SIMPLETEXTEDIT 302069 . 305113) ( +SET.TTYINEDIT.WINDOW 305115 . 306266) (TTYIN.PPTOFILE 306268 . 308207)) (308267 308444 ( +MAKE-TTSCRATCHFILE 308277 . 308442)) (308591 309369 (TTYIN.SCRATCHFILE 308601 . 309060) (\TTYIN.RPEOF +309062 . 309367)) (309581 313214 (TTYINPROMPTFORWORD 309591 . 313212))))) STOP diff --git a/sources/TTYIN.LCOM b/sources/TTYIN.LCOM index 3319851a0..feb34ffce 100644 Binary files a/sources/TTYIN.LCOM and b/sources/TTYIN.LCOM differ diff --git a/sources/UFS.LCOM b/sources/UFS.LCOM index 297bb55b9..f8a99de40 100644 Binary files a/sources/UFS.LCOM and b/sources/UFS.LCOM differ diff --git a/sources/WINDOW b/sources/WINDOW index 92c87f831..dcc34320e 100644 --- a/sources/WINDOW +++ b/sources/WINDOW @@ -1,18 +1,20 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED " 9-Apr-2000 17:36:29" {DSK}sybalsky>lispcore>sources>WINDOW.;6 225105 +(FILECREATED "13-Jun-2021 10:14:32"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>WINDOW.;2 224540 - changes to%: (FNS WINDOWWORLD CREATESCREEN) + changes to%: (FNS \TTY.CREATING.DISPLAYSTREAM) - previous date%: "28-Jun-99 17:17:47" {DSK}sybalsky>lispcore>sources>WINDOW.;5) + previous date%: " 9-Apr-2000 17:36:29" +{DSK}kaplan>Local>medley3.5>git-medley>sources>WINDOW.;1) (* ; " -Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1992, 1993, 1994, 1999, 2000 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1982-1988, 1990-1994, 1999-2000, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT WINDOWCOMS) -(RPAQQ WINDOWCOMS +(RPAQQ WINDOWCOMS [(COMS (FNS WINDOWWORLD WINDOWWORLDP CHANGEBACKGROUND CHANGEBACKGROUNDBORDER TILE \TTY.CREATING.DISPLAYSTREAM \CREATE.TTY.OUTCHARFN \CREATE.TTYDISPLAYSTREAM HASTTYWINDOWP TTYINFOSTREAM CREATESCREEN \INSURESCREEN \BITMAPTOSCREEN MAINSCREEN) @@ -30,7 +32,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1992, 1993, (\SCREENBITMAPS)) (GLOBALVARS \TTYREGIONOFFSETSPTR TTYREGIONOFFSETS \DEFAULTTTYDISPLAYSTREAM) (VARIABLES \TopLevelTtyWindow)) - (COMS (* ; "Window menu operations") + (COMS (* ; "Window menu operations") (FNS WINDOW.MOUSE.HANDLER \PROTECTED.APPLY DOWINDOWCOM DOBACKGROUNDCOM DEFAULT.BACKGROUND.COPYFN) (VARS (BackgroundCopyMenu)) @@ -53,42 +55,42 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1992, 1993, (EXPORT (MACROS .COPYKEYDOWNP. WSOP)) (PROP ARGNAMES WSOP) (RECORDS WSOPS WSDATA)) - (COMS (* ; "Window utilities") + (COMS (* ; "Window utilities") (FNS ADVISEWDS SHOWWFRAME SHOWWTITLE \STRINGWIDTHGUESS RESHOWTITLE TOTOPW \INTERNALTOTOPW \TTW1 WHICHW) (INITVARS (WINDOWTITLEPRINTLEVEL '(2 . 5)) (WINDOWTITLESHADE BLACKSHADE))) - [COMS (* ; "Window vs non-window world") + [COMS (* ; "Window vs non-window world") (FNS WFROMDS NU\TOTOPWDS \COERCETODS) (DECLARE%: DONTCOPY (EXPORT (MACROS \COERCETODS .WHILE.ON.TOP.))) (P (MOVD 'NU\TOTOPWDS '\TOTOPWDS] - (COMS (* ; "User interface functions") + (COMS (* ; "User interface functions") (FNS WINDOWP INSURE.WINDOW WINDOWPROP WINDOWADDPROP WINDOWDELPROP GETWINDOWPROP GETWINDOWUSERPROP PUTWINDOWPROP REMWINDOWPROP WINDOWADDFNPROP) - (* ; "Compiled WINDOWPROP") + (* ; "Compiled WINDOWPROP") (PROP ARGNAMES WINDOWPROP) (OPTIMIZERS WINDOWPROP) (FNS CWINDOWPROP CGETWINDOWPROP \GETWINDOWHEIGHT \GETWINDOWWIDTH)) (COMS (FNS OPENWP TOPWP RESHAPEBYREPAINTFN \INBETWEENP DECODE/WINDOW/OR/DISPLAYSTREAM GROW/REGION CLRPROMPT PROMPTPRINT OPENWINDOWS \INSUREWINDOW) - (* ; - "these entries are left in for backward compatibility. They were dedocumented 6/83. rrb") + (* ; + "these entries are left in for backward compatibility. They were dedocumented 6/83. rrb") (P (MOVD 'OPENWP 'ACTIVEWP)) (FNS OVERLAPPINGWINDOWS WOVERLAPP ORDERFROMBOTTOMTOTOP) - (* ; "screen size changing functions.") + (* ; "screen size changing functions.") (FNS \ONSCREENW \PUTONSCREENW \UPDATECACHEDFIELDS \WWCHANGESCREENSIZE CREATEWFROMIMAGE UPDATEWFROMIMAGE)) [COMS - (* ;; "MEDLEY-NATIVE-WINDOWS INTERFACE FUNCTIONS") + (* ;; "MEDLEY-NATIVE-WINDOWS INTERFACE FUNCTIONS") (GLOBALVARS \SCREENS \SCREENTYPES) [INITVARS - (* ;; "\SCREENS is a list of all known screens. The SCREEN-CREATE function for the screen type must register it there. It's used, e.g., by DSPCREATE to find the right screen given a screen bitmap.") + (* ;; "\SCREENS is a list of all known screens. The SCREEN-CREATE function for the screen type must register it there. It's used, e.g., by DSPCREATE to find the right screen given a screen bitmap.") (\SCREENS) - (* ;; "\SCREENTYPES is used to interpret the values we get back from the query-for-screen-types function, and to look up the methods for creating a screen and destroying one.") + (* ;; "\SCREENTYPES is used to interpret the values we get back from the query-for-screen-types function, and to look up the methods for creating a screen and destroying one.") (\SCREENTYPES '((1 MEDLEY OPEN-SCREEN CREATESCREEN CLOSE-SCREEN NILL) (2 MEDLEY-COLOR-4) @@ -98,7 +100,7 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1992, 1993, (32 X-COLOR) (64 MS-WINDOWS] - (* ;; "OLD-MEDLEY-SCREEN window management functions") + (* ;; "OLD-MEDLEY-SCREEN window management functions") (FNS \MEDW.CREATEW \MEDW.OPENW \MEDW.CLOSEW \MEDW.MOVEW \MEDW.RELMOVEW \MEDW.SHRINKW \MEDW.EXPANDW \MEDW.SHAPEW \MEDW.REDISPLAYW \MEDW.BURYW \MEDW.TOTOPW @@ -108,8 +110,8 @@ Copyright (c) 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1990, 1991, 1992, 1993, (DECLARE%: EVAL@COMPILE DONTCOPY (EXPORT (MACROS WINDOWOP))) (DECLARE%: DONTEVAL@COMPILE DONTEVAL@LOAD DOCOPY - (* ;; - "Take care of installing the generic DSPCREATE over the simple one defined in LLDISPLAY.") + (* ;; + "Take care of installing the generic DSPCREATE over the simple one defined in LLDISPLAY.") (P (CL:UNLESS (EQUAL (GETD 'DSPCREATE) (GETD '\GENERIC.DSPCREATE)) @@ -182,7 +184,7 @@ Middle button down moves closest corner.") (MOVD? 'TRUE 'LISPWINDOWP)) (VARS (\WINDOWWORLD T))) - (* ;; "Arrange for the proper compiler") + (* ;; "Arrange for the proper compiler") (PROP FILETYPE WINDOW) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) @@ -317,13 +319,13 @@ Middle button down moves closest corner.") (add X W]) (\TTY.CREATING.DISPLAYSTREAM - [LAMBDA NIL (* rmk%: "27-AUG-83 13:41") + [LAMBDA NIL (* ; "Edited 13-Jun-2021 10:14 by rmk:") - (* ;; "creates a displaystream that points to a stream that has a OUTCHARFN that creates a new displaystream. It is used as the default TtyDisplayStream in a process.") + (* ;; "creates a displaystream that points to a stream that has a OUTCHARFN that creates a new displaystream. It is used as the default TtyDisplayStream in a process.") (PROG [(DS (DSPCREATE (BITMAPCREATE 1 1] - (replace OUTCHARFN of DS with (FUNCTION \CREATE.TTY.OUTCHARFN)) - (replace FULLFILENAME of DS with T) + (replace (STREAM OUTCHARFN) of DS with (FUNCTION \CREATE.TTY.OUTCHARFN)) + (replace (STREAM FULLFILENAME) of DS with T) (RETURN DS]) (\CREATE.TTY.OUTCHARFN @@ -1387,25 +1389,24 @@ Middle button down moves closest corner.") ) (* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE -[PUTPROPS .COPYKEYDOWNP. MACRO (NIL (OR (KEYDOWNP 'LSHIFT) - (KEYDOWNP 'RSHIFT) - (KEYDOWNP 'COPY] - -[PUTPROPS WSOP MACRO (ARGS (LET ((METHOD (CADR (CAR ARGS))) - (DISPLAY (CADR ARGS)) - (OTHERARGS (CDDR ARGS))) - `(SPREADAPPLY* (fetch (WSOPS ,METHOD) of (fetch - (FDEV WINDOWOPS) - of - ,DISPLAY)) - ,DISPLAY - ,@OTHERARGS] +(PUTPROPS .COPYKEYDOWNP. MACRO [NIL (OR (KEYDOWNP 'LSHIFT) + (KEYDOWNP 'RSHIFT) + (KEYDOWNP 'COPY]) + +(PUTPROPS WSOP MACRO [ARGS (LET ((METHOD (CADR (CAR ARGS))) + (DISPLAY (CADR ARGS)) + (OTHERARGS (CDDR ARGS))) + `(SPREADAPPLY* (fetch (WSOPS ,METHOD) + of (fetch (FDEV WINDOWOPS) + of ,DISPLAY)) + ,DISPLAY + ,@OTHERARGS]) ) (* "END EXPORTED DEFINITIONS") -(PUTPROPS WSOP ARGNAMES (METHOD DISPLAY . OTHERARGS)) +(PUTPROPS WSOP ARGNAMES (METHOD DISPLAY . OTHERARGS)) (DECLARE%: EVAL@COMPILE (RECORD WSOPS (STARTBOARD STARTCOLOR STOPCOLOR EVENTFN SENDCOLORMAPENTRY SENDPAGE PILOTBITBLT)) @@ -1868,15 +1869,15 @@ Middle button down moves closest corner.") (DECLARE%: DONTCOPY (* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE -[PUTPROPS \COERCETODS MACRO (OPENLAMBDA (X) - (COND - ((type? WINDOW X) - (fetch (WINDOW DSP) of X)) - (T (\ILLEGAL.ARG X] +(PUTPROPS \COERCETODS MACRO [OPENLAMBDA (X) + (COND + ((type? WINDOW X) + (fetch (WINDOW DSP) of X)) + (T (\ILLEGAL.ARG X]) -[PUTPROPS .WHILE.ON.TOP. MACRO ((FIRST . REST) - (UNINTERRUPTABLY - (\INTERNALTOTOPW FIRST) . REST)] +(PUTPROPS .WHILE.ON.TOP. MACRO ((FIRST . REST) + (UNINTERRUPTABLY + (\INTERNALTOTOPW FIRST) . REST))) ) (* "END EXPORTED DEFINITIONS") @@ -2042,7 +2043,7 @@ Middle button down moves closest corner.") (* ; "Compiled WINDOWPROP") -(PUTPROPS WINDOWPROP ARGNAMES (NIL (WINDOW PROP {NEWVALUE}) . U)) +(PUTPROPS WINDOWPROP ARGNAMES (NIL (WINDOW PROP {NEWVALUE}) . U)) (DEFOPTIMIZER WINDOWPROP (&REST ARGS) (CWINDOWPROP ARGS)) @@ -3530,18 +3531,19 @@ Middle button down moves closest corner.") (DECLARE%: EVAL@COMPILE DONTCOPY (* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE -[PUTPROPS WINDOWOP DMACRO (ARGS (LET ((OPNAME (CAR ARGS)) - (METHOD-DEVICE (CADR ARGS)) - (TAIL (CDDR ARGS))) - (COND - [(AND (LISTP OPNAME) - (EQ (CAR OPNAME) - 'QUOTE)) - `(SPREADAPPLY* (fetch (SCREEN ,(CADR OPNAME)) - of ,METHOD-DEVICE) - ,METHOD-DEVICE - ,@TAIL] - (T (ERROR "OPNAME not quoted: " OPNAME] +(PUTPROPS WINDOWOP DMACRO [ARGS (LET ((OPNAME (CAR ARGS)) + (METHOD-DEVICE (CADR ARGS)) + (TAIL (CDDR ARGS))) + (COND + [(AND (LISTP OPNAME) + (EQ (CAR OPNAME) + 'QUOTE)) + `(SPREADAPPLY* (fetch (SCREEN + ,(CADR OPNAME)) + of ,METHOD-DEVICE) + ,METHOD-DEVICE + ,@TAIL] + (T (ERROR "OPNAME not quoted: " OPNAME]) ) (* "END EXPORTED DEFINITIONS") @@ -3577,51 +3579,51 @@ Middle button down moves closest corner.") ) (DECLARE%: EVAL@COMPILE -(DATATYPE WINDOW (DSP (* ; - "The display stream you use to actually printto the window.") - NEXTW (* ; - "Next window in the open-window list") - SAVE (* ; - "Saved image from anything this window's on top of") - REG (* ; - "Screen region this window occupies") - BUTTONEVENTFN (* ; - "FN called when left/middle mouse button goes up/down") - RIGHTBUTTONFN (* ; - "FN called when right mouse button goes up/down") - CURSORINFN (* ; - "Fn called when mouse enters window") - CURSOROUTFN (* ; "Called when mouse leaves window") - CURSORMOVEDFN (* ; - "Called when mouse moves in window") - REPAINTFN (* ; "Redisplay part of thie window") - RESHAPEFN (* ; "Called when window is reshaped") - EXTENT (* ; "Scrolling limits") - USERDATA (* ; - "Proplist to hold other window properites") - VERTSCROLLREG (* ; "Region of vert scroll bar") - HORIZSCROLLREG (* ; "Tegion of horiz scroll bar") - SCROLLFN (* ; "Fn to scroll this window") - VERTSCROLLWINDOW (* ; "Vert scroll bar") - HORIZSCROLLWINDOW (* ; "Horiz scroll bar") - CLOSEFN (* ; "Called at close time") - MOVEFN (* ; "Called when window is moved") - WTITLE (* ; "Window's title string, if any") - NEWREGIONFN (* ; "Called to get new window shape") - WBORDER (* ; "Window border-width, in pixels") - PROCESS (* ; - "Medley process associated with this window") - WINDOWENTRYFN (* ; - "Fn to call when kbd focus is switched here") - SCREEN (* ; "Screen this window appears on") - (NATIVE-HANDLE FIXP) (* ; - "Uniterpreted place for native window to store a C pointer to its private info") - (NATIVE-INFO1 FIXP) (* ; - "Reserved in case the pointer must be 64 bits") - (NATIVE-W1 WORD) (* ; "Word for use by native handler") - (NATIVE-W2 WORD) (* ; "Word for use by native handler") - (NATIVE-P1 POINTER) (* ; - "Lisp pointer for use by native handler") +(DATATYPE WINDOW (DSP (* ; + "The display stream you use to actually printto the window.") + NEXTW (* ; + "Next window in the open-window list") + SAVE (* ; + "Saved image from anything this window's on top of") + REG (* ; + "Screen region this window occupies") + BUTTONEVENTFN (* ; + "FN called when left/middle mouse button goes up/down") + RIGHTBUTTONFN (* ; + "FN called when right mouse button goes up/down") + CURSORINFN (* ; + "Fn called when mouse enters window") + CURSOROUTFN (* ; "Called when mouse leaves window") + CURSORMOVEDFN (* ; + "Called when mouse moves in window") + REPAINTFN (* ; "Redisplay part of thie window") + RESHAPEFN (* ; "Called when window is reshaped") + EXTENT (* ; "Scrolling limits") + USERDATA (* ; + "Proplist to hold other window properites") + VERTSCROLLREG (* ; "Region of vert scroll bar") + HORIZSCROLLREG (* ; "Tegion of horiz scroll bar") + SCROLLFN (* ; "Fn to scroll this window") + VERTSCROLLWINDOW (* ; "Vert scroll bar") + HORIZSCROLLWINDOW (* ; "Horiz scroll bar") + CLOSEFN (* ; "Called at close time") + MOVEFN (* ; "Called when window is moved") + WTITLE (* ; "Window's title string, if any") + NEWREGIONFN (* ; "Called to get new window shape") + WBORDER (* ; "Window border-width, in pixels") + PROCESS (* ; + "Medley process associated with this window") + WINDOWENTRYFN (* ; + "Fn to call when kbd focus is switched here") + SCREEN (* ; "Screen this window appears on") + (NATIVE-HANDLE FIXP) (* ; + "Uniterpreted place for native window to store a C pointer to its private info") + (NATIVE-INFO1 FIXP) (* ; + "Reserved in case the pointer must be 64 bits") + (NATIVE-W1 WORD) (* ; "Word for use by native handler") + (NATIVE-W2 WORD) (* ; "Word for use by native handler") + (NATIVE-P1 POINTER) (* ; + "Lisp pointer for use by native handler") ) BUTTONEVENTFN _ (FUNCTION TOTOPW) WBORDER _ WBorder WINDOWENTRYFN _ (FUNCTION GIVE.TTY.PROCESS) @@ -3630,72 +3632,72 @@ Middle button down moves closest corner.") (DATATYPE SCREEN (SCONOFF SCDESTINATION SCWIDTH SCHEIGHT SCTOPW SCTOPWDS SCTITLEDS SCFDEV SCDS SCDATA - (* ;; "Space for native window manager interface to use.") - - (HANDLE FIXP) (* ; - "Handle for emulator to store info about display for C code use.") - (HANDLE2 FIXP) (* ; - "Reserved in case HANDLE needs to be 64 bits on the C side.") - (NATIVE-INFO POINTER) (* ; - "POINTER for the private use of the emulator window code") - NATIVETYPE (* ; - "Symbol to tell what kind of native window system we're using.") - - (* ;; "- - - Functional interface to screen management - - -") - - WINIMAGEOPS (* ; - "IMAGEOPS to be used in display streas on this kind of screen") - WINFDEV (* ; - "FDEV for display streams on this screen") - CREATEWFN (* ; "Create a window") - OPENWFN (* ; "Open a window") - CLOSEWFN (* ; "Close a window") - MOVEWFN (* ; "Move a window") - RELMOVEWFN (* ; "Move window, relative") - SHRINKWFN (* ; "Shrink window to icon") - EXPANDWFN (* ; "Expand icon to window") - SHAPEWFN (* ; "Reshape a window") - REDISPLAYFN (* ; "Redisplay (part of) a window") - GETWINDOWPROPFN (* ; "Get window property value") - PUTWINDOWPROPFN (* ; "Set window property value") - BURYWFN (* ; "Move window behind all others") - TOTOPWFN (* ; - "Move iwindow in front of all others") - IMPORTWFN (* ; - "Take a native window and save its state internally") - EXPORTWFN (* ; - "Take a saved window state and open it on this screen, filling in screen and methods as needed.") - DESTROYFN (* ; - "Destroy this window, for GC finaliszation") - SETCURSORFN (* ; "Set the cursor for this window.") - PROMPTW (* ; - "The prompt window for this screen") - SHOWGCFN (* ; - "Show GC indication; called with ON/OFF arg, t=>show gcing status, NIL=>turn off GC indicator.") - DSPCREATEFN (* ; - "Create a displaystream on this screen.") - BBTTOWIN (* ; - "BITBLT from a lisp bitmap to a window") - BBTFROMWIN (* ; - "BITBLT from a window to a lisp bitmap") - BBTWINWIN (* ; - "BITBLT from a window to another window.") - SCCURSOR (* ; - "CURSOR that's in effect for this screen by default.") - SCKEYBOARD (* ; - "Something about which keyboard we're receiving from.") - SCDEPTH (* ; - "# of bits per pixel on the screen. THIS WILL REPLACE SCBITSPERPIXEL ASAP.") - SCCLOSEDOWN (* ; - "Close down this screen cleanly, saving window state.") - SCCLOSESCREEN (* ; - "Close down thie screen cleanly, no state saving.") - SCREOPEN (* ; "Reopen this screen?") - SCCARETFLASH (* ; "Function to flash thecaret.") - SCGETSCREENPOSITION (* ; "GETSCREENPOSITION") - SCGETBOXSCREENPOSITION (* ; "GETBOXPOSITION") - SCGETSCREENREGION (* ; "GETREGION") - SCMOVEPOINTER (* ; "\CURSORPOSITION") + (* ;; "Space for native window manager interface to use.") + + (HANDLE FIXP) (* ; + "Handle for emulator to store info about display for C code use.") + (HANDLE2 FIXP) (* ; + "Reserved in case HANDLE needs to be 64 bits on the C side.") + (NATIVE-INFO POINTER) (* ; + "POINTER for the private use of the emulator window code") + NATIVETYPE (* ; + "Symbol to tell what kind of native window system we're using.") + + (* ;; "- - - Functional interface to screen management - - -") + + WINIMAGEOPS (* ; + "IMAGEOPS to be used in display streas on this kind of screen") + WINFDEV (* ; + "FDEV for display streams on this screen") + CREATEWFN (* ; "Create a window") + OPENWFN (* ; "Open a window") + CLOSEWFN (* ; "Close a window") + MOVEWFN (* ; "Move a window") + RELMOVEWFN (* ; "Move window, relative") + SHRINKWFN (* ; "Shrink window to icon") + EXPANDWFN (* ; "Expand icon to window") + SHAPEWFN (* ; "Reshape a window") + REDISPLAYFN (* ; "Redisplay (part of) a window") + GETWINDOWPROPFN (* ; "Get window property value") + PUTWINDOWPROPFN (* ; "Set window property value") + BURYWFN (* ; "Move window behind all others") + TOTOPWFN (* ; + "Move iwindow in front of all others") + IMPORTWFN (* ; + "Take a native window and save its state internally") + EXPORTWFN (* ; + "Take a saved window state and open it on this screen, filling in screen and methods as needed.") + DESTROYFN (* ; + "Destroy this window, for GC finaliszation") + SETCURSORFN (* ; "Set the cursor for this window.") + PROMPTW (* ; + "The prompt window for this screen") + SHOWGCFN (* ; + "Show GC indication; called with ON/OFF arg, t=>show gcing status, NIL=>turn off GC indicator.") + DSPCREATEFN (* ; + "Create a displaystream on this screen.") + BBTTOWIN (* ; + "BITBLT from a lisp bitmap to a window") + BBTFROMWIN (* ; + "BITBLT from a window to a lisp bitmap") + BBTWINWIN (* ; + "BITBLT from a window to another window.") + SCCURSOR (* ; + "CURSOR that's in effect for this screen by default.") + SCKEYBOARD (* ; + "Something about which keyboard we're receiving from.") + SCDEPTH (* ; + "# of bits per pixel on the screen. THIS WILL REPLACE SCBITSPERPIXEL ASAP.") + SCCLOSEDOWN (* ; + "Close down this screen cleanly, saving window state.") + SCCLOSESCREEN (* ; + "Close down thie screen cleanly, no state saving.") + SCREOPEN (* ; "Reopen this screen?") + SCCARETFLASH (* ; "Function to flash thecaret.") + SCGETSCREENPOSITION (* ; "GETSCREENPOSITION") + SCGETBOXSCREENPOSITION (* ; "GETBOXPOSITION") + SCGETSCREENREGION (* ; "GETREGION") + SCMOVEPOINTER (* ; "\CURSORPOSITION") ) SCONOFF _ 'OFF [ACCESSFNS ((SCBITSPERPIXEL (COND @@ -3959,42 +3961,40 @@ Middle button down moves closest corner.") (FILESLOAD PAINTW) -(ADDTOVAR WindowMenuCommands (Close '\INTERACTIVE.CLOSEW "Closes a window") - (Snap 'SNAPW "Saves a snapshot of a region of the screen.") - (Paint 'PAINTW +(ADDTOVAR WindowMenuCommands + (Close '\INTERACTIVE.CLOSEW "Closes a window") + (Snap 'SNAPW "Saves a snapshot of a region of the screen.") + (Paint 'PAINTW "Starts a painting mode in which the mouse can be used to draw pictures or make notes on windows.") - (Clear 'CLEARW "Clears a window to its gray.") - (Bury 'BURYW "Puts a window on the bottom.") - (Redisplay 'REDISPLAYW "Redisplays a window using its REPAINTFN.") - (Hardcopy 'HARDCOPYIMAGEW "Prints a window using its HARDCOPYFN." - (SUBITEMS ("To a file" 'HARDCOPYIMAGEW.TOFILE - "Puts image on a file; prompts for filename and format" - ) - ("To a printer" 'HARDCOPYIMAGEW.TOPRINTER - "Sends image to a printer of your choosing"))) - (Move 'MOVEW "Moves a window by a corner.") - (Shape 'SHAPEW "Gets a new region for a window. + (Clear 'CLEARW "Clears a window to its gray.") + (Bury 'BURYW "Puts a window on the bottom.") + (Redisplay 'REDISPLAYW "Redisplays a window using its REPAINTFN.") + (Hardcopy 'HARDCOPYIMAGEW "Prints a window using its HARDCOPYFN." + (SUBITEMS ("To a file" 'HARDCOPYIMAGEW.TOFILE + "Puts image on a file; prompts for filename and format") + ("To a printer" 'HARDCOPYIMAGEW.TOPRINTER + "Sends image to a printer of your choosing"))) + (Move 'MOVEW "Moves a window by a corner.") + (Shape 'SHAPEW "Gets a new region for a window. Left button down marks fixed corner; sweep to other corner. Middle button down moves closest corner.") - (Shrink 'SHRINKW - "Replaces this window with its icon (or title if it doesn't have an icon." - )) - -(ADDTOVAR BackgroundMenuCommands (SaveVM '(SAVEVM) - "Updates the virtual memory.") - (Snap '(SNAPW) - "Saves a snapshot of a region of the screen.") - (Hardcopy '(HARDCOPYW) - "Send hardcopy of screen region to printer." - (SUBITEMS ("To a file" '(HARDCOPYREGION.TOFILE) - + (Shrink 'SHRINKW "Replaces this window with its icon (or title if it doesn't have an icon." + )) + +(ADDTOVAR BackgroundMenuCommands + (SaveVM '(SAVEVM) + "Updates the virtual memory.") + (Snap '(SNAPW) + "Saves a snapshot of a region of the screen.") + (Hardcopy '(HARDCOPYW) + "Send hardcopy of screen region to printer." + (SUBITEMS ("To a file" '(HARDCOPYREGION.TOFILE) + "Writes a region of screen to a file; prompts for filename and format" - ) - ("To a printer" '(HARDCOPYREGION.TOPRINTER) - - "Sends a region of screen to a printer of your choosing" - )))) + ) + ("To a printer" '(HARDCOPYREGION.TOPRINTER) + "Sends a region of screen to a printer of your choosing")))) (ADDTOVAR WINDOWUSERFORMS ) @@ -4019,7 +4019,7 @@ Middle button down moves closest corner.") (* ;; "Arrange for the proper compiler") -(PUTPROPS WINDOW FILETYPE :FAKE-COMPILE-FILE) +(PUTPROPS WINDOW FILETYPE :FAKE-COMPILE-FILE) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDTOVAR NLAMA ) @@ -4029,43 +4029,43 @@ Middle button down moves closest corner.") (ADDTOVAR LAMA PROMPTPRINT WINDOWPROP DOWINDOWCOM) ) (PUTPROPS WINDOW COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1988 1990 1991 -1992 1993 1994 1999 2000)) +1992 1993 1994 1999 2000 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (11575 26185 (WINDOWWORLD 11585 . 15338) (WINDOWWORLDP 15340 . 15640) (CHANGEBACKGROUND -15642 . 16679) (CHANGEBACKGROUNDBORDER 16681 . 17232) (TILE 17234 . 17826) ( -\TTY.CREATING.DISPLAYSTREAM 17828 . 18345) (\CREATE.TTY.OUTCHARFN 18347 . 18647) ( -\CREATE.TTYDISPLAYSTREAM 18649 . 21688) (HASTTYWINDOWP 21690 . 21970) (TTYINFOSTREAM 21972 . 22496) ( -CREATESCREEN 22498 . 25441) (\INSURESCREEN 25443 . 25692) (\BITMAPTOSCREEN 25694 . 26055) (MAINSCREEN -26057 . 26183)) (26844 44127 (WINDOW.MOUSE.HANDLER 26854 . 39649) (\PROTECTED.APPLY 39651 . 39899) ( -DOWINDOWCOM 39901 . 41921) (DOBACKGROUNDCOM 41923 . 43081) (DEFAULT.BACKGROUND.COPYFN 43083 . 44125)) -(44208 76091 (BURYW 44218 . 44506) (CLEARW 44508 . 44898) (CLOSEW 44900 . 45674) (\CLOSEW1 45676 . -46029) (\OKTOCLOSEW 46031 . 46390) (\INTERACTIVE.CLOSEW 46392 . 47215) (OPENW 47217 . 48272) ( -DOUSERFNS 48274 . 49435) (DOUSERFNS2 49437 . 49933) (\USERFNISDON'T 49935 . 50206) (\OPENW1 50208 . -50558) (CREATEW 50560 . 51824) (CREATEW1 51826 . 54104) (\CREATEW1 54106 . 55325) (OPENDISPLAYSTREAM -55327 . 55650) (MOVEW 55652 . 55867) (PPROMPT3 55869 . 56197) (\ONSCREENCLIPPINGREGION 56199 . 56750) -(RELMOVEW 56752 . 57050) (SHAPEW 57052 . 61971) (SHAPEW1 61973 . 64675) (\SHAPEW2 64677 . 67363) ( -RESHOWBORDER 67365 . 67876) (\RESHOWBORDER1 67878 . 72804) (TRACKW 72806 . 73921) (SNAPW 73923 . 75596 -) (WINDOWREGION 75598 . 76089)) (76092 76788 (MINIMUMWINDOWSIZE 76102 . 76786)) (78591 101856 ( -ADVISEWDS 78601 . 86544) (SHOWWFRAME 86546 . 88298) (SHOWWTITLE 88300 . 92334) (\STRINGWIDTHGUESS -92336 . 92695) (RESHOWTITLE 92697 . 97338) (TOTOPW 97340 . 97579) (\INTERNALTOTOPW 97581 . 98671) ( -\TTW1 98673 . 101273) (WHICHW 101275 . 101854)) (101985 104823 (WFROMDS 101995 . 103993) (NU\TOTOPWDS -103995 . 104431) (\COERCETODS 104433 . 104821)) (105468 112268 (WINDOWP 105478 . 105624) ( -INSURE.WINDOW 105626 . 105965) (WINDOWPROP 105967 . 106399) (WINDOWADDPROP 106401 . 108135) ( -WINDOWDELPROP 108137 . 108563) (GETWINDOWPROP 108565 . 109115) (GETWINDOWUSERPROP 109117 . 109544) ( -PUTWINDOWPROP 109546 . 110011) (REMWINDOWPROP 110013 . 111068) (WINDOWADDFNPROP 111070 . 112266)) ( -112472 120036 (CWINDOWPROP 112482 . 113487) (CGETWINDOWPROP 113489 . 118707) (\GETWINDOWHEIGHT 118709 - . 119617) (\GETWINDOWWIDTH 119619 . 120034)) (120037 135485 (OPENWP 120047 . 120325) (TOPWP 120327 . -120610) (RESHAPEBYREPAINTFN 120612 . 130864) (\INBETWEENP 130866 . 131082) ( -DECODE/WINDOW/OR/DISPLAYSTREAM 131084 . 133124) (GROW/REGION 133126 . 133689) (CLRPROMPT 133691 . -134095) (PROMPTPRINT 134097 . 134361) (OPENWINDOWS 134363 . 135147) (\INSUREWINDOW 135149 . 135483)) ( -135616 138865 (OVERLAPPINGWINDOWS 135626 . 137908) (WOVERLAPP 137910 . 138165) (ORDERFROMBOTTOMTOTOP -138167 . 138863)) (138914 143697 (\ONSCREENW 138924 . 139630) (\PUTONSCREENW 139632 . 140459) ( -\UPDATECACHEDFIELDS 140461 . 140725) (\WWCHANGESCREENSIZE 140727 . 142116) (CREATEWFROMIMAGE 142118 . -143081) (UPDATEWFROMIMAGE 143083 . 143695)) (144254 200056 (\MEDW.CREATEW 144264 . 148938) ( -\MEDW.OPENW 148940 . 151298) (\MEDW.CLOSEW 151300 . 152666) (\MEDW.MOVEW 152668 . 163280) ( -\MEDW.RELMOVEW 163282 . 163661) (\MEDW.SHRINKW 163663 . 171847) (\MEDW.EXPANDW 171849 . 174116) ( -\MEDW.SHAPEW 174118 . 178724) (\MEDW.REDISPLAYW 178726 . 180681) (\MEDW.BURYW 180683 . 181965) ( -\MEDW.TOTOPW 181967 . 183315) (\MEDW.DSPCREATE 183317 . 185759) (\GENERIC.DSPCREATE 185761 . 189225) ( -\MEDW.GETWINDOWPROP 189227 . 191465) (\MEDW.PUTWINDOWPROP 191467 . 198252) (\MEDW.CURSOR 198254 . -200054)) (200057 200677 (\GENERIC.CURSOR 200067 . 200675))))) + (FILEMAP (NIL (11546 26186 (WINDOWWORLD 11556 . 15309) (WINDOWWORLDP 15311 . 15611) (CHANGEBACKGROUND +15613 . 16650) (CHANGEBACKGROUNDBORDER 16652 . 17203) (TILE 17205 . 17797) ( +\TTY.CREATING.DISPLAYSTREAM 17799 . 18346) (\CREATE.TTY.OUTCHARFN 18348 . 18648) ( +\CREATE.TTYDISPLAYSTREAM 18650 . 21689) (HASTTYWINDOWP 21691 . 21971) (TTYINFOSTREAM 21973 . 22497) ( +CREATESCREEN 22499 . 25442) (\INSURESCREEN 25444 . 25693) (\BITMAPTOSCREEN 25695 . 26056) (MAINSCREEN +26058 . 26184)) (26845 44128 (WINDOW.MOUSE.HANDLER 26855 . 39650) (\PROTECTED.APPLY 39652 . 39900) ( +DOWINDOWCOM 39902 . 41922) (DOBACKGROUNDCOM 41924 . 43082) (DEFAULT.BACKGROUND.COPYFN 43084 . 44126)) +(44209 76092 (BURYW 44219 . 44507) (CLEARW 44509 . 44899) (CLOSEW 44901 . 45675) (\CLOSEW1 45677 . +46030) (\OKTOCLOSEW 46032 . 46391) (\INTERACTIVE.CLOSEW 46393 . 47216) (OPENW 47218 . 48273) ( +DOUSERFNS 48275 . 49436) (DOUSERFNS2 49438 . 49934) (\USERFNISDON'T 49936 . 50207) (\OPENW1 50209 . +50559) (CREATEW 50561 . 51825) (CREATEW1 51827 . 54105) (\CREATEW1 54107 . 55326) (OPENDISPLAYSTREAM +55328 . 55651) (MOVEW 55653 . 55868) (PPROMPT3 55870 . 56198) (\ONSCREENCLIPPINGREGION 56200 . 56751) +(RELMOVEW 56753 . 57051) (SHAPEW 57053 . 61972) (SHAPEW1 61974 . 64676) (\SHAPEW2 64678 . 67364) ( +RESHOWBORDER 67366 . 67877) (\RESHOWBORDER1 67879 . 72805) (TRACKW 72807 . 73922) (SNAPW 73924 . 75597 +) (WINDOWREGION 75599 . 76090)) (76093 76789 (MINIMUMWINDOWSIZE 76103 . 76787)) (78546 101811 ( +ADVISEWDS 78556 . 86499) (SHOWWFRAME 86501 . 88253) (SHOWWTITLE 88255 . 92289) (\STRINGWIDTHGUESS +92291 . 92650) (RESHOWTITLE 92652 . 97293) (TOTOPW 97295 . 97534) (\INTERNALTOTOPW 97536 . 98626) ( +\TTW1 98628 . 101228) (WHICHW 101230 . 101809)) (101940 104778 (WFROMDS 101950 . 103948) (NU\TOTOPWDS +103950 . 104386) (\COERCETODS 104388 . 104776)) (105469 112269 (WINDOWP 105479 . 105625) ( +INSURE.WINDOW 105627 . 105966) (WINDOWPROP 105968 . 106400) (WINDOWADDPROP 106402 . 108136) ( +WINDOWDELPROP 108138 . 108564) (GETWINDOWPROP 108566 . 109116) (GETWINDOWUSERPROP 109118 . 109545) ( +PUTWINDOWPROP 109547 . 110012) (REMWINDOWPROP 110014 . 111069) (WINDOWADDFNPROP 111071 . 112267)) ( +112477 120041 (CWINDOWPROP 112487 . 113492) (CGETWINDOWPROP 113494 . 118712) (\GETWINDOWHEIGHT 118714 + . 119622) (\GETWINDOWWIDTH 119624 . 120039)) (120042 135490 (OPENWP 120052 . 120330) (TOPWP 120332 . +120615) (RESHAPEBYREPAINTFN 120617 . 130869) (\INBETWEENP 130871 . 131087) ( +DECODE/WINDOW/OR/DISPLAYSTREAM 131089 . 133129) (GROW/REGION 133131 . 133694) (CLRPROMPT 133696 . +134100) (PROMPTPRINT 134102 . 134366) (OPENWINDOWS 134368 . 135152) (\INSUREWINDOW 135154 . 135488)) ( +135621 138870 (OVERLAPPINGWINDOWS 135631 . 137913) (WOVERLAPP 137915 . 138170) (ORDERFROMBOTTOMTOTOP +138172 . 138868)) (138919 143702 (\ONSCREENW 138929 . 139635) (\PUTONSCREENW 139637 . 140464) ( +\UPDATECACHEDFIELDS 140466 . 140730) (\WWCHANGESCREENSIZE 140732 . 142121) (CREATEWFROMIMAGE 142123 . +143086) (UPDATEWFROMIMAGE 143088 . 143700)) (144259 200061 (\MEDW.CREATEW 144269 . 148943) ( +\MEDW.OPENW 148945 . 151303) (\MEDW.CLOSEW 151305 . 152671) (\MEDW.MOVEW 152673 . 163285) ( +\MEDW.RELMOVEW 163287 . 163666) (\MEDW.SHRINKW 163668 . 171852) (\MEDW.EXPANDW 171854 . 174121) ( +\MEDW.SHAPEW 174123 . 178729) (\MEDW.REDISPLAYW 178731 . 180686) (\MEDW.BURYW 180688 . 181970) ( +\MEDW.TOTOPW 181972 . 183320) (\MEDW.DSPCREATE 183322 . 185764) (\GENERIC.DSPCREATE 185766 . 189230) ( +\MEDW.GETWINDOWPROP 189232 . 191470) (\MEDW.PUTWINDOWPROP 191472 . 198257) (\MEDW.CURSOR 198259 . +200059)) (200062 200682 (\GENERIC.CURSOR 200072 . 200680))))) STOP diff --git a/sources/WINDOW.LCOM b/sources/WINDOW.LCOM index f143584d8..0cb9f36e7 100644 Binary files a/sources/WINDOW.LCOM and b/sources/WINDOW.LCOM differ diff --git a/sources/XCCS b/sources/XCCS new file mode 100644 index 000000000..059bd67a1 --- /dev/null +++ b/sources/XCCS @@ -0,0 +1,297 @@ +(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") +(FILECREATED "24-Jun-2021 23:15:05" {DSK}kaplan>Local>medley3.5>git-medley>sources>XCCS.;36 13925 + + changes to%: (VARS XCCSCOMS) + + previous date%: "24-Jun-2021 16:47:37" +{DSK}kaplan>Local>medley3.5>git-medley>sources>XCCS.;35) + + +(PRETTYCOMPRINT XCCSCOMS) + +(RPAQQ XCCSCOMS + [(FNS ACCESS-CHARSET) + (FNS \XCCSINCCODE \XCCSPEEKCCODE \XCCSOUTCHAR \XCCSBACKCCODE \XCCSFORMATBYTESTREAM) + (FNS \CREATE.XCCS.EXTERNALFORMAT) + (FNS \NSIN.24BITENCODING.ERROR) + (INITVARS (*SIGNAL-24BIT-NSENCODING-ERROR*)) + (GLOBALVARS \DEFAULTINCCODE \DEFAULTOUTCHAR \DEFAULTBACKCCODE \DEFAULTPEEKCCODE) + (INITVARS (\DEFAULTINCCODE '\XCCSINCCODE) + (\DEFAULTOUTCHAR '\XCCSOUTCHAR) + (\DEFAULTPEEKCCODE '\XCCSPEEKCCODE) + (\DEFAULTBACKCCODE '\XCCSBACKCCODE)) + (DECLARE%: EVAL@COMPILE DONTCOPY (EXPORT (CONSTANTS (\NORUNCODE 255) + (NSCHARSETSHIFT 255)) + (MACROS \RUNCODED) + (OPTIMIZERS ACCESS-CHARSET))) + (DECLARE%: DONTEVAL@LOAD DOCOPY (P (\CREATE.XCCS.EXTERNALFORMAT]) +(DEFINEQ + +(ACCESS-CHARSET + [LAMBDA (STREAM NEWVALUE) (* ; "Edited 11-Sep-87 15:46 by bvm:") + (FDEVOP 'CHARSETFN (fetch (STREAM DEVICE) of STREAM) + STREAM NEWVALUE]) +) +(DEFINEQ + +(\XCCSINCCODE + [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 21-Jun-2021 15:44 by rmk:") + +(* ;;; "Returns a 16 bit character code. SHIFTEDCSET is STREAM's char set left shifted 8.") + +(* ;;; "If BYTECOUNTVAR is non-NIL, it is freely incremented by number of bytes read. If BYTECOUNTVAL is given it is the current value, saves the call to EVAL.") + +(* ;;; "This doesn't do EOL conversion, \INCHAR does that") + + (LET (NUMBYTES (CSET (ACCESS-CHARSET STREAM)) + (CHAR (\BIN STREAM))) (* ; + "Error on EOF unless ENDOFSTREAMOP does something else.") + + (* ;; " NUMBYTES tracks the number of \BINs. ") + + (IF (EQ CHAR NSCHARSETSHIFT) + THEN (* ; + "Shifting character sets, toss CHAR") + (SETQ CSET (\BIN STREAM)) + (IF (NEQ NSCHARSETSHIFT CSET) + THEN (* ; + "Shift to new runcode CSET: SH CS CH") + (ACCESS-CHARSET STREAM CSET) + (SETQ CHAR (\BIN STREAM)) + (SETQ NUMBYTES 3) + ELSEIF (EQ 0 (\BIN STREAM)) + THEN (* ; "SH SH CSH CS CH where CSH is 0") + + (* ;; + "The high-order character set byte must be 0, because we don't support obese characters (24 bit)") + + (SETQ CSET (\BIN STREAM)) + (SETQ CHAR (\BIN STREAM)) (* ; "To align with below") + (SETQ NUMBYTES 5) + (ACCESS-CHARSET STREAM \NORUNCODE) + ELSE (\NSIN.24BITENCODING.ERROR STREAM)) + + (* ;; "The stream now knows the new character set, runcoded or not.") + + ELSEIF (EQ CSET \NORUNCODE) + THEN (* ; "2-bytes") + (SETQ CSET CHAR) + (SETQ CHAR (\BIN STREAM)) + (SETQ NUMBYTES 2) + ELSE + + (* ;; "Runcoded CSET and CHAR") + + (SETQ NUMBYTES 1)) + (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IDIFFERENCE BYTECOUNTVAL NUMBYTES))) + (CL:WHEN CHAR (* ; + "Typically NIL if ENDOFSTREAMOP returned NIL at EOF ") + (LOGOR (UNFOLD CSET 256) + CHAR))]) + +(\XCCSPEEKCCODE + [LAMBDA (STREAM NOERROR) (* ; "Edited 21-Jun-2021 23:44 by rmk:") + + (* ;; + "Modeled on \XCCSINCCODE, but peeks at the last byte in the sequence, leaves the stream unchanged") + + (LET ((CSET (ACCESS-CHARSET STREAM)) + (CHAR (\PEEKBIN STREAM NOERROR))) + + (* ;; + "Returns a 16 bit character code. Doesn't do EOL conversion--\PEEKCCODE does that. ") + + (* ;; "We don't change the charset in the stream, put the file ptr back the way it was.") + + (CL:WHEN CHAR + (IF (EQ CHAR NSCHARSETSHIFT) + THEN (\BIN STREAM) (* ; "Read the peeked shifting byte") + (SETQ CSET (\BIN STREAM)) (* ; "Consume the char shift byte") + (IF (NEQ CSET NSCHARSETSHIFT) + THEN + + (* ;; + "Shift to new runcode CSET: SH CS CH. We have to BIN what we peeked, BIN, and peek again") + + (SETQ CHAR (\PEEKBIN STREAM NOERROR)) + (\BACKFILEPTR STREAM) + (\BACKFILEPTR STREAM) + ELSEIF (EQ 0 (\BIN STREAM)) + THEN (* ; "SH SH CSH CS CH where CSH is 0") + + (* ;; + "Note: no eof error check on this \BIN -- an eof in the middle of a charset shift is an error") + + (SETQ CSET (\BIN STREAM)) + (SETQ CHAR (\PEEKBIN STREAM NOERROR)) + (\BACKFILEPTR STREAM) + (\BACKFILEPTR STREAM) + (\BACKFILEPTR STREAM) + (\BACKFILEPTR STREAM) + ELSE (\NSIN.24BITENCODING.ERROR STREAM)) + ELSEIF (EQ CSET \NORUNCODE) + THEN (* ; "2 byte runs, BIN/PEEK/BACK") + (SETQ CSET CHAR) + (\BIN STREAM) + (SETQ CHAR (\PEEKBIN STREAM NOERROR)) (* ; "One BACKFILEPTR seems OK") + (\BACKFILEPTR STREAM)) + + (* ;; "No need to back up for the runcoded case") + + (CL:WHEN CHAR + (LOGOR (UNFOLD CSET 256) + CHAR)))]) + +(\XCCSOUTCHAR + [LAMBDA (STREAM CHARCODE) (* ; "Edited 21-Jun-2021 13:28 by rmk:") + + (* ;; "Closed function for the :XCCS external format, also called when :XCCS is the default") + + (COND + ((EQ CHARCODE (CHARCODE EOL)) + [COND + [(NOT (\RUNCODED STREAM)) (* ; + "Charset is a constant 0, we put out the high-order byte.") + (\BOUT STREAM (\CHARSET (CHARCODE EOL] + ((EQ (\CHARSET (CHARCODE EOL)) + (ffetch (STREAM CHARSET) of STREAM))) + (T (* ; + "We are runcoded, and not in character set 0, have to shift.") + (\BOUT STREAM NSCHARSETSHIFT) + (\BOUT STREAM (freplace (STREAM CHARSET) of STREAM with (\CHARSET + (CHARCODE EOL] + + (* ;; "We are now in the right charset (0) for the first EOL byte. For CRLF, the CR is immediately followed by the LF byte, without the prefix 0 byte even if not runcoded, i.e. the 2 bytes are though of as a composite. The stream is left in CSET0 (the freplace above), read for another shift according to the next shift in a runcoded file.") + + (\BOUTEOL STREAM) + (freplace CHARPOSITION of STREAM with 0)) + (T [COND + ((NOT (\RUNCODED STREAM)) + (\BOUT STREAM (\CHARSET CHARCODE)) + (\BOUT STREAM (\CHAR8CODE CHARCODE))) + ((EQ (\CHARSET CHARCODE) + (ffetch (STREAM CHARSET) of STREAM)) + (\BOUT STREAM (\CHAR8CODE CHARCODE))) + (T (\BOUT STREAM NSCHARSETSHIFT) + (\BOUT STREAM (freplace (STREAM CHARSET) of STREAM with (\CHARSET + CHARCODE)) + ) + (\BOUT STREAM (\CHAR8CODE CHARCODE] + (freplace CHARPOSITION of STREAM with (PROGN + (* ; "Ugh. Don't overflow") + (IPLUS16 (ffetch CHARPOSITION + of STREAM) + 1]) + +(\XCCSBACKCCODE + [LAMBDA (STREAM BYTECOUNTVAR BYTECOUNTVAL) (* ; "Edited 15-Jun-2021 10:26 by rmk:") + (CL:WHEN (\BACKFILEPTR STREAM) + + (* ;; "The immediately preceding byte must be a character byte. If it is a byte in a runcode, then we are done, even if the byte before is part of a shift sequence.") + + (* ;; "But if we are currently in a nonruncoded file, we have to go back one more to get the character set byte.") + + (* ;; "If we can't back up, we are already at the beginning.") + + [COND + [(EQ \NORUNCODE (ACCESS-CHARSET STREAM)) + (COND + ((\BACKFILEPTR STREAM) + (AND BYTECOUNTVAR (SET BYTECOUNTVAR (IPLUS BYTECOUNTVAL 2))) + T) + (BYTECOUNTVAR (SET BYTECOUNTVAR (ADD1 BYTECOUNTVAL] + (BYTECOUNTVAR (SET BYTECOUNTVAR (ADD1 BYTECOUNTVAL])]) + +(\XCCSFORMATBYTESTREAM + [LAMBDA (STREAM BYTESTREAM) (* ; "Edited 24-Jun-2021 16:47 by rmk:") + (REPLACE (STREAM CHARSET) OF BYTESTREAM WITH (FETCH (STREAM CHARSET) OF + STREAM]) +) +(DEFINEQ + +(\CREATE.XCCS.EXTERNALFORMAT + [LAMBDA NIL (* ; "Edited 24-Jun-2021 16:45 by rmk:") + +(* ;;; "Create the :XCCS external format. Stream's EOL overrides the (vacuous) default here") + + (\INSTALL.EXTERNALFORMAT (create EXTERNALFORMAT + NAME _ :XCCS + INCCODEFN _ (FUNCTION \XCCSINCCODE) + PEEKCCODEFN _ (FUNCTION \XCCSPEEKCCODE) + BACKCCODEFN _ (FUNCTION \XCCSBACKCCODE) + OUTCHARFN _ (FUNCTION \XCCSOUTCHAR) + FORMATBYTESTREAMFN _ (FUNCTION \XCCSFORMATBYTESTREAM) + EOL _ LF.EOLC + EOLVALID _ NIL]) +) +(DEFINEQ + +(\NSIN.24BITENCODING.ERROR + [LAMBDA (STREAM) (* bvm%: "12-Mar-86 15:35") + (DECLARE (USEDFREE *SIGNAL-24BIT-NSENCODING-ERROR*)) + +(* ;;; "Called if we see the sequence shift,shift on STREAM -- means shift to 24-bit character set, which we don't support. Usually this just means we're erroneously reading a binary file as text. If this function returns, its value is taken as a character set to shift to") + + (COND + (*SIGNAL-24BIT-NSENCODING-ERROR* (* ; + "Only cause error if user/reader cares") + (ERROR "24-bit NS encoding not supported" STREAM))) + (* ; "Return charset zero") + 0]) +) + +(RPAQ? *SIGNAL-24BIT-NSENCODING-ERROR* ) +(DECLARE%: DOEVAL@COMPILE DONTCOPY + +(GLOBALVARS \DEFAULTINCCODE \DEFAULTOUTCHAR \DEFAULTBACKCCODE \DEFAULTPEEKCCODE) +) + +(RPAQ? \DEFAULTINCCODE '\XCCSINCCODE) + +(RPAQ? \DEFAULTOUTCHAR '\XCCSOUTCHAR) + +(RPAQ? \DEFAULTPEEKCCODE '\XCCSPEEKCCODE) + +(RPAQ? \DEFAULTBACKCCODE '\XCCSBACKCCODE) +(DECLARE%: EVAL@COMPILE DONTCOPY +(* "FOLLOWING DEFINITIONS EXPORTED")(DECLARE%: EVAL@COMPILE + +(RPAQQ \NORUNCODE 255) + +(RPAQQ NSCHARSETSHIFT 255) + + +(CONSTANTS (\NORUNCODE 255) + (NSCHARSETSHIFT 255)) +) +(DECLARE%: EVAL@COMPILE + +(PUTPROPS \RUNCODED MACRO (OPENLAMBDA (STREAM) + + (* ;; "returns NIL is the stream is not runcoded, that is, if the stream has 16 bit bytes explicitly represented") + (* ; + "note that neq is ok since charsets are known to be SMALLP's") + (NEQ (fetch CHARSET of STREAM) + \NORUNCODE))) +) + +(DEFOPTIMIZER ACCESS-CHARSET (STREAM &OPTIONAL NEWVALUE) + `((OPENLAMBDA (STRM) + (FDEVOP 'CHARSETFN (fetch (STREAM DEVICE) of STRM) + STRM + ,NEWVALUE)) + ,STREAM)) + +(* "END EXPORTED DEFINITIONS") + +) +(DECLARE%: DONTEVAL@LOAD DOCOPY + +(\CREATE.XCCS.EXTERNALFORMAT) +) +(DECLARE%: DONTCOPY + (FILEMAP (NIL (1292 1521 (ACCESS-CHARSET 1302 . 1519)) (1522 10652 (\XCCSINCCODE 1532 . 4344) ( +\XCCSPEEKCCODE 4346 . 6882) (\XCCSOUTCHAR 6884 . 9422) (\XCCSBACKCCODE 9424 . 10323) ( +\XCCSFORMATBYTESTREAM 10325 . 10650)) (10653 11497 (\CREATE.XCCS.EXTERNALFORMAT 10663 . 11495)) (11498 + 12329 (\NSIN.24BITENCODING.ERROR 11508 . 12327))))) +STOP diff --git a/sources/XCCS.LCOM b/sources/XCCS.LCOM new file mode 100644 index 000000000..faf2592c5 Binary files /dev/null and b/sources/XCCS.LCOM differ diff --git a/sources/XXFILL b/sources/XXFILL index 240470cbc..57b1437df 100644 --- a/sources/XXFILL +++ b/sources/XXFILL @@ -1,63 +1,64 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "19-Jan-93 11:29:57" {DSK}lde>lispcore>sources>XXFILL.;2 57665 +(FILECREATED "13-Jun-2021 14:41:44"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>XXFILL.;2 56697 - changes to%: (RECORDS SCAN FILL.TBLE) + changes to%: (FNS SHEDSCAN) - previous date%: "14-Jun-90 09:29:51" {DSK}lde>lispcore>sources>XXFILL.;1) + previous date%: "19-Jan-93 11:29:57" +{DSK}kaplan>Local>medley3.5>git-medley>sources>XXFILL.;1) (* ; " -Copyright (c) 1985, 1986, 1987, 1988, 1989, 1990, 1993 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1985-1990, 1993, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT XXFILLCOMS) -(RPAQQ XXFILLCOMS ((COMS +(RPAQQ XXFILLCOMS + ((COMS -(* ;;; "Filled Polygons") +(* ;;; "Filled Polygons") - (FNS SCAN.LESSP CRIT.LESSP) - (DECLARE%: EVAL@COMPILE DONTCOPY (RECORDS SCAN)) - (INITRECORDS SCAN) - (VARS FILL.WRULE \FILL.DEBUG) - (DECLARE%: EVAL@COMPILE DONTCOPY (GLOBALVARS \FILL.DEBUG) - (MACROS \NORMSECT \DrawScanList.Blt \DrawScanList.Display - \DrawScanList.XScan.IP \DrawScanList.YScan.IP)) - (FNS MAKESCAN SHEDSCAN NORMSECT CRITSECT) - (FNS \POLYSHADE.BLT \POLYSHADE.DISPLAY \POLYSHADE.XSCAN.IP - \POLYSHADE.YSCAN.IP) - (FNS POLYSHADE.BLT POLYSHADE.DISPLAY POLYSHADE.IP POLYSHADE.SCAN.IP) - (FNS FILLTRIANGLE)) - (COMS + (FNS SCAN.LESSP CRIT.LESSP) + (DECLARE%: EVAL@COMPILE DONTCOPY (RECORDS SCAN)) + (INITRECORDS SCAN) + (VARS FILL.WRULE \FILL.DEBUG) + (DECLARE%: EVAL@COMPILE DONTCOPY (GLOBALVARS \FILL.DEBUG) + (MACROS \NORMSECT \DrawScanList.Blt \DrawScanList.Display \DrawScanList.XScan.IP + \DrawScanList.YScan.IP)) + (FNS MAKESCAN SHEDSCAN NORMSECT CRITSECT) + (FNS \POLYSHADE.BLT \POLYSHADE.DISPLAY \POLYSHADE.XSCAN.IP \POLYSHADE.YSCAN.IP) + (FNS POLYSHADE.BLT POLYSHADE.DISPLAY POLYSHADE.IP POLYSHADE.SCAN.IP) + (FNS FILLTRIANGLE)) + (COMS -(* ;;; "Filled Circles") +(* ;;; "Filled Circles") - (FNS \CIRCSHADE.BLT \CIRCSHADE.DISPLAY \CIRCSHADE.IP \CIRCSHADE.XSCAN.IP - ) - (FNS CIRCSHADE.BLT CIRCSHADE.DISPLAY CIRCSHADE.IP) - (FNS FILLCIRCLE.IP FILLNGON.IP)) - (P (MOVD 'FILLCIRCLE.IP 'CIRCSHADE.IP)) - + (FNS \CIRCSHADE.BLT \CIRCSHADE.DISPLAY \CIRCSHADE.IP \CIRCSHADE.XSCAN.IP) + (FNS CIRCSHADE.BLT CIRCSHADE.DISPLAY CIRCSHADE.IP) + (FNS FILLCIRCLE.IP FILLNGON.IP)) + (P (MOVD 'FILLCIRCLE.IP 'CIRCSHADE.IP)) + -(* ;;; " Considering scan direction of the printer") +(* ;;; " Considering scan direction of the printer") - + -(* ;;; " You must set these vars before opening IMAGESTREAM") +(* ;;; " You must set these vars before opening IMAGESTREAM") - (COMS (VARS (PRINTER.DEFAULT.SCAN.DIRECTION 'Y) - (PRINTER.SCAN.DIRECTIONS.LIST))) - (COMS + (COMS (VARS (PRINTER.DEFAULT.SCAN.DIRECTION 'Y) + (PRINTER.SCAN.DIRECTIONS.LIST))) + (COMS -(* ;;; "PBBT Optimized routines") +(* ;;; "PBBT Optimized routines") - (VARS PBBT.PANEL) - (DECLARE%: EVAL@COMPILE DONTCOPY (RECORDS FILL.TBLE)) - (INITRECORDS FILL.TBLE) - (FNS FILL.INITTBLE FILL.INCY FILL.LINE) - (FNS FILL.TEST FILL.XPER FILL.CONT)) - (DECLARE%: DOEVAL@COMPILE DONTCOPY (FILES (LOADCOMP) - INTERPRESS XXGEOM)))) + (VARS PBBT.PANEL) + (DECLARE%: EVAL@COMPILE DONTCOPY (RECORDS FILL.TBLE)) + (INITRECORDS FILL.TBLE) + (FNS FILL.INITTBLE FILL.INCY FILL.LINE) + (FNS FILL.TEST FILL.XPER FILL.CONT)) + (DECLARE%: DOEVAL@COMPILE DONTCOPY (FILES (LOADCOMP) + INTERPRESS XXGEOM)))) @@ -119,121 +120,119 @@ Copyright (c) 1985, 1986, 1987, 1988, 1989, 1990, 1993 by Venue & Xerox Corporat (DECLARE%: EVAL@COMPILE -[PUTPROPS \NORMSECT DMACRO ((SELF Y) - (LET (XL XR (GEOM (ffetch (SCAN GEOM) of SELF))) - (BRESSTEP GEOM Y XL XR) - (freplace (SCAN LX) of SELF with XL) - (freplace (SCAN RX) of SELF with XR] - -[PUTPROPS \DrawScanList.Blt DMACRO - ((strm scanlist scany) - - (* ;; "count, fill.shade fill.wrule fill.frule are dynamically scoped outside macro") - - (SETQ count 0) - [IF (EQ FILL.WRULE 1) - THEN (for scan in scanlist - do (SETQ count (IPLUS count 1)) - (if (ODDP count) - then (SETQ ex (IPLUS (ffetch (SCAN RX) of scan) - 1)) - else (BLTSHADE FILL.SHADE strm ex scany - (IDIFFERENCE (ffetch (SCAN LX) of scan) - ex) - 1 FILL.FRULE] - (IF (EQ FILL.WRULE 0) - THEN (for scan in scanlist +(PUTPROPS \NORMSECT DMACRO ((SELF Y) + (LET (XL XR (GEOM (ffetch (SCAN GEOM) of SELF))) + (BRESSTEP GEOM Y XL XR) + (freplace (SCAN LX) of SELF with XL) + (freplace (SCAN RX) of SELF with XR)))) + +(PUTPROPS \DrawScanList.Blt DMACRO + [(strm scanlist scany) + + (* ;; "count, fill.shade fill.wrule fill.frule are dynamically scoped outside macro") + + (SETQ count 0) + [IF (EQ FILL.WRULE 1) + THEN (for scan in scanlist + do (SETQ count (IPLUS count 1)) + (if (ODDP count) + then (SETQ ex (IPLUS (ffetch (SCAN RX) of scan) + 1)) + else (BLTSHADE FILL.SHADE strm ex scany + (IDIFFERENCE (ffetch (SCAN LX) of scan) + ex) + 1 FILL.FRULE] + (IF (EQ FILL.WRULE 0) + THEN (for scan in scanlist + do [if (EQ count 0) + then (SETQ ex (ADD1 (ffetch (SCAN RX) of scan] + (SETQ count (IPLUS count (ffetch (SCAN WC) of scan))) + (if (EQ count 0) + then (BLTSHADE FILL.SHADE strm ex scany + (IDIFFERENCE (ffetch (SCAN LX) of scan) + ex) + 1 FILL.FRULE]) + +(PUTPROPS \DrawScanList.Display DMACRO + [(strm scanlist scany) + + (* ;; "count, fill.shade fill.wrule fill.frule, table are dynamically scoped outside macro. Since if fill.wrule is 1 count is merely a toggle, use T and NIL.") + + [IF (EQ FILL.WRULE 1) + THEN (SETQ count NIL) + (for scan in scanlist + do (SETQ count (NOT count)) + (if count + then (SETQ ex (ADD1 (ffetch (SCAN RX) of scan))) + else (FILL.LINE table scany ex (ffetch (SCAN LX) + of scan] + (IF (EQ FILL.WRULE 0) + THEN (SETQ count 0) + (for scan in scanlist do [if (EQ count 0) then (SETQ ex (ADD1 (ffetch (SCAN RX) of scan] (SETQ count (IPLUS count (ffetch (SCAN WC) of scan))) (if (EQ count 0) - then (BLTSHADE FILL.SHADE strm ex scany - (IDIFFERENCE (ffetch (SCAN LX) of scan) - ex) - 1 FILL.FRULE] - -[PUTPROPS \DrawScanList.Display DMACRO - ((strm scanlist scany) - - (* ;; "count, fill.shade fill.wrule fill.frule, table are dynamically scoped outside macro. Since if fill.wrule is 1 count is merely a toggle, use T and NIL.") - - [IF (EQ FILL.WRULE 1) - THEN (SETQ count NIL) - (for scan in scanlist - do (SETQ count (NOT count)) - (if count - then (SETQ ex (ADD1 (ffetch (SCAN RX) of scan))) - else (FILL.LINE table scany ex (ffetch (SCAN LX) - of scan] - (IF (EQ FILL.WRULE 0) - THEN (SETQ count 0) - (for scan in scanlist - do [if (EQ count 0) - then (SETQ ex (ADD1 (ffetch (SCAN RX) of scan] - (SETQ count (IPLUS count (ffetch (SCAN WC) of scan))) - (if (EQ count 0) - then (FILL.LINE table scany ex (ffetch (SCAN LX) - of scan] - -[PUTPROPS \DrawScanList.XScan.IP DMACRO - ((strm scanlist scany) - - (* ;; "count, fill.shade fill.wrule fill.frule are dynamically scoped outside macro") - - (SETQ count 0) - [IF (EQ FILL.WRULE 1) - THEN (for scan in scanlist do (SETQ ix (fetch (SCAN LX) of scan)) - (SETQ tx (ffetch (SCAN RX) of scan)) - (SETQ count (IPLUS count 1)) - (if (ODDP count) - then (SETQ ex (IPLUS tx 1)) - else (FILLRECTANGLE.IP strm ex scany - (IDIFFERENCE ix ex) - 1] - (IF (EQ FILL.WRULE 0) - THEN (for scan in scanlist do (SETQ ix (fetch (SCAN LX) of scan)) - (SETQ tx (ffetch (SCAN RX) of scan)) - (if (EQ count 0) - then (SETQ ex (IPLUS tx 1))) - (SETQ count (IPLUS count (ffetch - (SCAN WC) - of scan))) - (if (EQ count 0) - then (FILLRECTANGLE.IP strm ex scany - (IDIFFERENCE ix ex) - 1] - -[PUTPROPS \DrawScanList.YScan.IP DMACRO - ((strm scanlist scany) - - (* ;; "count, fill.shade fill.wrule fill.frule are dynamically scoped outside macro * *") - - (SETQ count 0) - [IF (EQ FILL.WRULE 1) - THEN (for scan in scanlist - do (SETQ ix (fetch (SCAN LX) of scan)) - (SETQ tx (fetch (SCAN RX) of scan)) - (SETQ count (IPLUS count 1)) - (if (ODDP count) - then (SETQ ex (IPLUS tx 1)) - else - - (* ;; "Unreflect coordinates back") - - (FILLRECTANGLE.IP strm scany ix 1 (IDIFFERENCE ex ix] - (IF (EQ FILL.WRULE 0) - THEN (for scan in scanlist - do (SETQ ix (fetch (SCAN LX) of scan)) - (SETQ tx (fetch (SCAN RX) of scan)) - (if (EQ count 0) - then (SETQ ex (IPLUS tx 1))) - (SETQ count (IPLUS count (fetch (SCAN WC) of scan))) - (if (EQ count 0) - then - - (* ;; "Unreflect coordinates back") - - (FILLRECTANGLE.IP strm scany ix 1 (IDIFFERENCE ex ix] + then (FILL.LINE table scany ex (ffetch (SCAN LX) + of scan]) + +(PUTPROPS \DrawScanList.XScan.IP DMACRO + [(strm scanlist scany) + + (* ;; "count, fill.shade fill.wrule fill.frule are dynamically scoped outside macro") + + (SETQ count 0) + [IF (EQ FILL.WRULE 1) + THEN (for scan in scanlist + do (SETQ ix (fetch (SCAN LX) of scan)) + (SETQ tx (ffetch (SCAN RX) of scan)) + (SETQ count (IPLUS count 1)) + (if (ODDP count) + then (SETQ ex (IPLUS tx 1)) + else (FILLRECTANGLE.IP strm ex scany (IDIFFERENCE ix ex) + 1] + (IF (EQ FILL.WRULE 0) + THEN (for scan in scanlist + do (SETQ ix (fetch (SCAN LX) of scan)) + (SETQ tx (ffetch (SCAN RX) of scan)) + (if (EQ count 0) + then (SETQ ex (IPLUS tx 1))) + (SETQ count (IPLUS count (ffetch (SCAN WC) of scan))) + (if (EQ count 0) + then (FILLRECTANGLE.IP strm ex scany (IDIFFERENCE ix ex) + 1]) + +(PUTPROPS \DrawScanList.YScan.IP DMACRO + [(strm scanlist scany) + + (* ;; "count, fill.shade fill.wrule fill.frule are dynamically scoped outside macro * *") + + (SETQ count 0) + [IF (EQ FILL.WRULE 1) + THEN (for scan in scanlist + do (SETQ ix (fetch (SCAN LX) of scan)) + (SETQ tx (fetch (SCAN RX) of scan)) + (SETQ count (IPLUS count 1)) + (if (ODDP count) + then (SETQ ex (IPLUS tx 1)) + else + + (* ;; "Unreflect coordinates back") + + (FILLRECTANGLE.IP strm scany ix 1 (IDIFFERENCE ex ix] + (IF (EQ FILL.WRULE 0) + THEN (for scan in scanlist + do (SETQ ix (fetch (SCAN LX) of scan)) + (SETQ tx (fetch (SCAN RX) of scan)) + (if (EQ count 0) + then (SETQ ex (IPLUS tx 1))) + (SETQ count (IPLUS count (fetch (SCAN WC) of scan))) + (if (EQ count 0) + then + + (* ;; "Unreflect coordinates back") + + (FILLRECTANGLE.IP strm scany ix 1 (IDIFFERENCE ex ix]) ) ) (DEFINEQ @@ -249,9 +248,9 @@ Copyright (c) 1985, 1986, 1987, 1988, 1989, 1990, 1993 by Venue & Xerox Corporat SELF]) (SHEDSCAN - [LAMBDA (SELF) (* rrb " 6-Mar-86 16:24") + [LAMBDA (SELF) (* ; "Edited 13-Jun-2021 14:41 by rmk:") - (* * remove current edge and replace with next) + (* * remove current edge and replace with next) (LET (X0 Y0 DX DY YDIR EDGE TAIL BRES) (SETQ TAIL (fetch REST of SELF)) @@ -260,7 +259,7 @@ Copyright (c) 1985, 1986, 1987, 1988, 1989, 1990, 1993 by Venue & Xerox Corporat (GETLINEORIG EDGE X0 Y0) (GETLINEDIFF EDGE DX DY) (SETQ BRES (MAKEBRES X0 Y0 DX DY)) - (SETQ YDIR (fetch (LINE WIND) of EDGE)) + (SETQ YDIR (fetch (XXLINE WIND) of EDGE)) (replace (SCAN GEOM) of SELF with BRES) (replace (SCAN REST) of SELF with (CDR TAIL)) (replace (SCAN BY) of SELF with Y0) @@ -954,22 +953,23 @@ Copyright (c) 1985, 1986, 1987, 1988, 1989, 1990, 1993 by Venue & Xerox Corporat (* ;;; "PBBT Optimized routines") -(RPAQQ PBBT.PANEL ((NULL (SETQ MYDSTRM (\OUTSTREAMARG MYWIN)) - (TIMEALL (FILL.CONT MYDSTRM (RAND) - 'REPLACE 10 300) - 20) - (TIMEALL (FILL.TEST MYDSTRM (RAND) - 'REPLACE 10 300) - 20) - (TIMEALL (FILL.XPER MYDSTRM (RAND) - 'REPLACE 10 300) - 20) - (TIMEALL (FILLPOLYGON KLIST (RAND) - MYDSTRM) - 20) - (TIMEALL (BLTSHADE (RAND) - MYDSTRM 10 10 290 290 'REPLACE) - 20)))) +(RPAQQ PBBT.PANEL + ((NULL (SETQ MYDSTRM (\OUTSTREAMARG MYWIN)) + (TIMEALL (FILL.CONT MYDSTRM (RAND) + 'REPLACE 10 300) + 20) + (TIMEALL (FILL.TEST MYDSTRM (RAND) + 'REPLACE 10 300) + 20) + (TIMEALL (FILL.XPER MYDSTRM (RAND) + 'REPLACE 10 300) + 20) + (TIMEALL (FILLPOLYGON KLIST (RAND) + MYDSTRM) + 20) + (TIMEALL (BLTSHADE (RAND) + MYDSTRM 10 10 290 290 'REPLACE) + 20)))) (DECLARE%: EVAL@COMPILE DONTCOPY (DECLARE%: EVAL@COMPILE @@ -1170,17 +1170,17 @@ Copyright (c) 1985, 1986, 1987, 1988, 1989, 1990, 1993 by Venue & Xerox Corporat (FILESLOAD (LOADCOMP) INTERPRESS XXGEOM) ) -(PUTPROPS XXFILL COPYRIGHT ("Venue & Xerox Corporation" 1985 1986 1987 1988 1989 1990 1993)) +(PUTPROPS XXFILL COPYRIGHT ("Venue & Xerox Corporation" 1985 1986 1987 1988 1989 1990 1993 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (2690 3246 (SCAN.LESSP 2700 . 2970) (CRIT.LESSP 2972 . 3244)) (10805 13332 (MAKESCAN -10815 . 11134) (SHEDSCAN 11136 . 12015) (NORMSECT 12017 . 12298) (CRITSECT 12300 . 13330)) (13333 -25445 (\POLYSHADE.BLT 13343 . 16244) (\POLYSHADE.DISPLAY 16246 . 19298) (\POLYSHADE.XSCAN.IP 19300 . -22385) (\POLYSHADE.YSCAN.IP 22387 . 25443)) (25446 29450 (POLYSHADE.BLT 25456 . 25951) ( -POLYSHADE.DISPLAY 25953 . 26496) (POLYSHADE.IP 26498 . 27551) (POLYSHADE.SCAN.IP 27553 . 29448)) ( -29451 30218 (FILLTRIANGLE 29461 . 30216)) (30252 41279 (\CIRCSHADE.BLT 30262 . 33084) ( -\CIRCSHADE.DISPLAY 33086 . 35590) (\CIRCSHADE.IP 35592 . 38366) (\CIRCSHADE.XSCAN.IP 38368 . 41277)) ( -41280 43483 (CIRCSHADE.BLT 41290 . 41833) (CIRCSHADE.DISPLAY 41835 . 42398) (CIRCSHADE.IP 42400 . -43481)) (43484 46634 (FILLCIRCLE.IP 43494 . 44576) (FILLNGON.IP 44578 . 46632)) (49331 56392 ( -FILL.INITTBLE 49341 . 55700) (FILL.INCY 55702 . 56024) (FILL.LINE 56026 . 56390)) (56393 57462 ( -FILL.TEST 56403 . 56692) (FILL.XPER 56694 . 57086) (FILL.CONT 57088 . 57460))))) + (FILEMAP (NIL (2199 2755 (SCAN.LESSP 2209 . 2479) (CRIT.LESSP 2481 . 2753)) (10034 12577 (MAKESCAN +10044 . 10363) (SHEDSCAN 10365 . 11260) (NORMSECT 11262 . 11543) (CRITSECT 11545 . 12575)) (12578 +24690 (\POLYSHADE.BLT 12588 . 15489) (\POLYSHADE.DISPLAY 15491 . 18543) (\POLYSHADE.XSCAN.IP 18545 . +21630) (\POLYSHADE.YSCAN.IP 21632 . 24688)) (24691 28695 (POLYSHADE.BLT 24701 . 25196) ( +POLYSHADE.DISPLAY 25198 . 25741) (POLYSHADE.IP 25743 . 26796) (POLYSHADE.SCAN.IP 26798 . 28693)) ( +28696 29463 (FILLTRIANGLE 28706 . 29461)) (29497 40524 (\CIRCSHADE.BLT 29507 . 32329) ( +\CIRCSHADE.DISPLAY 32331 . 34835) (\CIRCSHADE.IP 34837 . 37611) (\CIRCSHADE.XSCAN.IP 37613 . 40522)) ( +40525 42728 (CIRCSHADE.BLT 40535 . 41078) (CIRCSHADE.DISPLAY 41080 . 41643) (CIRCSHADE.IP 41645 . +42726)) (42729 45879 (FILLCIRCLE.IP 42739 . 43821) (FILLNGON.IP 43823 . 45877)) (48358 55419 ( +FILL.INITTBLE 48368 . 54727) (FILL.INCY 54729 . 55051) (FILL.LINE 55053 . 55417)) (55420 56489 ( +FILL.TEST 55430 . 55719) (FILL.XPER 55721 . 56113) (FILL.CONT 56115 . 56487))))) STOP diff --git a/sources/XXFILL.LCOM b/sources/XXFILL.LCOM index c63b4e1d2..9e356fc8d 100644 Binary files a/sources/XXFILL.LCOM and b/sources/XXFILL.LCOM differ diff --git a/sources/XXGEOM b/sources/XXGEOM index ce1f9f339..3c738f96a 100644 --- a/sources/XXGEOM +++ b/sources/XXGEOM @@ -1,69 +1,75 @@ (DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") -(FILECREATED "19-Jan-93 11:30:54" {DSK}lde>lispcore>sources>XXGEOM.;2 49900 +(FILECREATED "13-Jun-2021 14:39:29"  +{DSK}kaplan>Local>medley3.5>git-medley>sources>XXGEOM.;2 49841 - changes to%: (RECORDS XYPT LINE BRES) + changes to%: (VARS XXGEOMCOMS) + (RECORDS XXLINE) + (FNS MAKELINE LINE.LESSP) + (MACROS \GETLINEORIGY \GETLINEDIFFY) - previous date%: "23-May-90 13:39:37" {DSK}lde>lispcore>sources>XXGEOM.;1) + previous date%: "19-Jan-93 11:30:54" +{DSK}kaplan>Local>medley3.5>git-medley>sources>XXGEOM.;1) (* ; " -Copyright (c) 1985, 1986, 1987, 1990, 1993 by Venue & Xerox Corporation. All rights reserved. +Copyright (c) 1985-1987, 1990, 1993, 2021 by Venue & Xerox Corporation. ") (PRETTYCOMPRINT XXGEOMCOMS) -(RPAQQ XXGEOMCOMS ( +(RPAQQ XXGEOMCOMS + ( -(* ;;; "Integer Geometry Library") +(* ;;; "Integer Geometry Library") - + -(* ;;; "Scalar methods") +(* ;;; "Scalar methods") - (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS \SGN)) - (FNS \IRND) - + (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS \SGN)) + (FNS \IRND) + -(* ;;; "XYpt object and methods") +(* ;;; "XYpt object and methods") - (RECORDS XYPT) - (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS XYPT.X XYPT.Y)) - (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS HEADPT NEXTPT HEADPTY NEXTPTY)) - (FNS MAKEXYPT IRNDLIST NORMLOOP SLITLOOP PREPLOOP YMAPLIST IMAPLIST UNIQLIST - MERGLIST MMLTLIST IMLTLIST XYPT.LESSP PATH.LESSP CONVEXP) - + (RECORDS XYPT) + (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS XYPT.X XYPT.Y)) + (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS HEADPT NEXTPT HEADPTY NEXTPTY)) + (FNS MAKEXYPT IRNDLIST NORMLOOP SLITLOOP PREPLOOP YMAPLIST IMAPLIST UNIQLIST MERGLIST + MMLTLIST IMLTLIST XYPT.LESSP PATH.LESSP CONVEXP) + -(* ;;; "Line object and methods") +(* ;;; "Line object and methods") - (RECORDS LINE) - (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS GETLINEDIFF GETLINEORIG \GETLINEDIFF - \GETLINEORIGY \GETLINEDIFFY)) - (FNS MAKELINE MSECT XSECT YSECT XYSECT KNOTLINE KNOTLOOP LINE.LESSP) - (FNS LINEY MIDDX INITX TERMX SCANX XPROD) - + (RECORDS XXLINE) + (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS GETLINEDIFF GETLINEORIG \GETLINEDIFF \GETLINEORIGY + \GETLINEDIFFY)) + (FNS MAKELINE MSECT XSECT YSECT XYSECT KNOTLINE KNOTLOOP LINE.LESSP) + (FNS LINEY MIDDX INITX TERMX SCANX XPROD) + -(* ;;; "line segment methods") +(* ;;; "line segment methods") - (FNS XYSECTLSEG) - + (FNS XYSECTLSEG) + -(* ;;; "Bresenham line object and methods") +(* ;;; "Bresenham line object and methods") - (RECORDS BRES) - (FNS MAKEBRES) - (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS BRESSTEP)) - + (RECORDS BRES) + (FNS MAKEBRES) + (DECLARE%: EVAL@COMPILE DONTCOPY (MACROS BRESSTEP)) + -(* ;;; "Debugging control panel") +(* ;;; "Debugging control panel") - (DECLARE%: EVAL@COMPILE DONTCOPY (VARS \GEOM.PANEL)) - + (DECLARE%: EVAL@COMPILE DONTCOPY (VARS \GEOM.PANEL)) + -(* ;;; "Trapezoidal decomposition") +(* ;;; "Trapezoidal decomposition") - (FNS TRAPLOOP TRAPMAKE) - (VARS TRAP.DEBUG) - (DECLARE%: EVAL@COMPILE DONTCOPY (VARS \TRAP.PANEL)))) + (FNS TRAPLOOP TRAPMAKE) + (VARS TRAP.DEBUG) + (DECLARE%: EVAL@COMPILE DONTCOPY (VARS \TRAP.PANEL)))) @@ -77,12 +83,12 @@ Copyright (c) 1985, 1986, 1987, 1990, 1993 by Venue & Xerox Corporation. All ri (DECLARE%: EVAL@COMPILE DONTCOPY (DECLARE%: EVAL@COMPILE -(PUTPROPS \SGN DMACRO ((VAL) - (if (IGREATERP VAL 0) - then 1 - elseif (ILESSP VAL 0) - then -1 - else 0))) +(PUTPROPS \SGN DMACRO ((VAL) + (if (IGREATERP VAL 0) + then 1 + elseif (ILESSP VAL 0) + then -1 + else 0))) ) ) (DEFINEQ @@ -112,27 +118,27 @@ Copyright (c) 1985, 1986, 1987, 1990, 1993 by Venue & Xerox Corporation. All ri (DECLARE%: EVAL@COMPILE DONTCOPY (DECLARE%: EVAL@COMPILE -(PUTPROPS XYPT.X DMACRO ((PT) - (CAR PT))) +(PUTPROPS XYPT.X DMACRO ((PT) + (CAR PT))) -(PUTPROPS XYPT.Y DMACRO ((PT) - (CDR PT))) +(PUTPROPS XYPT.Y DMACRO ((PT) + (CDR PT))) ) ) (DECLARE%: EVAL@COMPILE DONTCOPY (DECLARE%: EVAL@COMPILE -(PUTPROPS HEADPT DMACRO ((PATH) - (CAR PATH))) +(PUTPROPS HEADPT DMACRO ((PATH) + (CAR PATH))) -(PUTPROPS NEXTPT DMACRO ((PATH) - (CADR PATH))) +(PUTPROPS NEXTPT DMACRO ((PATH) + (CADR PATH))) -(PUTPROPS HEADPTY DMACRO ((PATH) - (CDAR PATH))) +(PUTPROPS HEADPTY DMACRO ((PATH) + (CDAR PATH))) -(PUTPROPS NEXTPTY DMACRO ((PATH) - (CDADR PATH))) +(PUTPROPS NEXTPTY DMACRO ((PATH) + (CDADR PATH))) ) ) (DEFINEQ @@ -574,58 +580,61 @@ Copyright (c) 1985, 1986, 1987, 1990, 1993 by Venue & Xerox Corporation. All ri (DECLARE%: EVAL@COMPILE -(RECORD LINE (ORIG DIFF WIND)) +(RECORD XXLINE (ORIG DIFF WIND)) ) (DECLARE%: EVAL@COMPILE DONTCOPY (DECLARE%: EVAL@COMPILE -[PUTPROPS GETLINEDIFF DMACRO ((SELF DX DY) +(PUTPROPS GETLINEDIFF DMACRO [(SELF DX DY) - (* ;; "External method, get dx, dy from line") + (* ;; "External method, get dx, dy from line") - (WITH LINE SELF (SETQ DX (ffetch (XYPT X) of DIFF)) - (SETQ DY (ffetch (XYPT Y) OF DIFF] + (WITH LINE SELF (SETQ DX (ffetch (XYPT X) of DIFF)) + (SETQ DY (ffetch (XYPT Y) OF DIFF]) -[PUTPROPS GETLINEORIG DMACRO ((SELF OX OY) +(PUTPROPS GETLINEORIG DMACRO [(SELF OX OY) - (* ;; "External method, get dx, dy from line") + (* ;; "External method, get dx, dy from line") - (WITH LINE SELF (SETQ OX (ffetch (XYPT X) of ORIG)) - (SETQ OY (ffetch (XYPT Y) OF ORIG] + (WITH LINE SELF (SETQ OX (ffetch (XYPT X) of ORIG)) + (SETQ OY (ffetch (XYPT Y) OF ORIG]) -[PUTPROPS \GETLINEDIFF DMACRO ((SELF DX DY) (* edited " 1-Jan-00 00:00") +(PUTPROPS \GETLINEDIFF DMACRO [(SELF DX DY) (* edited " 1-Jan-00 00:00") - (* ;; "Degenerate private method, get dx, dy from line") + (* ;; "Degenerate private method, get dx, dy from line") - (WITH LINE SELF (SETQ DX (FFETCH (XYPT X) OF DIFF)) - (SETQ DY (FFETCH (XYPT T) OF DIFF] + (WITH LINE SELF (SETQ DX (FFETCH (XYPT X) OF + DIFF)) + (SETQ DY (FFETCH (XYPT T) OF DIFF]) -[PUTPROPS \GETLINEORIGY DMACRO ((SELF YPTR) - (SETQ YPTR (FFETCH (XYPT Y) of (FFETCH (LINE ORIG) - of SELF] +(PUTPROPS \GETLINEORIGY DMACRO [(SELF YPTR) + (SETQ YPTR (FFETCH (XYPT Y) of (FFETCH + (XXLINE ORIG) + of SELF]) -[PUTPROPS \GETLINEDIFFY DMACRO ((SELF YPTR) - (SETQ YPTR (FFETCH (XYPT Y) of (FFETCH (LINE DIFF) - of SELF] +(PUTPROPS \GETLINEDIFFY DMACRO [(SELF YPTR) + (SETQ YPTR (FFETCH (XYPT Y) of (FFETCH + (XXLINE DIFF) + of SELF]) ) ) (DEFINEQ (MAKELINE - [LAMBDA (X0 Y0 DX DY) (* FS "29-Aug-85 17:48") - - (* * To simplify bresenham arithmetic, switch all lines to have positive dy. - True direction is held in WIND.) + [LAMBDA (X0 Y0 DX DY) (* ; "Edited 13-Jun-2021 14:38 by rmk:") + + (* * To simplify bresenham arithmetic, switch all lines to have positive dy. + True direction is held in WIND.) (LET (DIR) (if (ILESSP DY 0) then (SETQ X0 (IPLUS X0 DX)) - (SETQ Y0 (IPLUS Y0 DY)) - (SETQ DX (IMINUS DX)) - (SETQ DY (IMINUS DY)) - (SETQ DIR -1) + (SETQ Y0 (IPLUS Y0 DY)) + (SETQ DX (IMINUS DX)) + (SETQ DY (IMINUS DY)) + (SETQ DIR -1) else (SETQ DIR 1)) - (create LINE + (create XXLINE ORIG _ (MAKEXYPT X0 Y0) DIFF _ (MAKEXYPT DX DY) WIND _ DIR]) @@ -730,9 +739,9 @@ Copyright (c) 1985, 1986, 1987, 1990, 1993 by Venue & Xerox Corporation. All ri (RETURN (REVERSE ALIST]) (LINE.LESSP - [LAMBDA (ARG1 ARG2) (* FS " 6-Aug-85 17:58") - - (* * comment) + [LAMBDA (ARG1 ARG2) (* FS " 6-Aug-85 17:58") + + (* * comment) (LET (Y1 Y2 DY1 DY2) (\GETLINEORIGY ARG1 Y1) @@ -740,8 +749,8 @@ Copyright (c) 1985, 1986, 1987, 1990, 1993 by Venue & Xerox Corporation. All ri (if (NEQ Y1 Y2) then (ILEQ Y1 Y2) else (\GETLINEDIFFY ARG1 DY1) - (\GETLINEDIFFY ARG2 DY2) - (ILEQ DY1 DY2]) + (\GETLINEDIFFY ARG2 DY2) + (ILEQ DY1 DY2]) ) (DEFINEQ @@ -979,55 +988,56 @@ Copyright (c) 1985, 1986, 1987, 1990, 1993 by Venue & Xerox Corporation. All ri (DECLARE%: EVAL@COMPILE DONTCOPY (DECLARE%: EVAL@COMPILE -[PUTPROPS BRESSTEP DMACRO ((SELF SCANY INITX TERMX) - - (* * Assume that this Y is exactly incremented by one from the last call, so - DDA can be used. Then passed parameter scany is not used.) - - (* * (WITH BRES SELF (*) (SETQ INITX X) - (IF (EQ MAJOR (QUOTE X)) THEN (while (ILESSP P 0) do - (SETQ X (IPLUS X IX)) (SETQ P (IPLUS P IPX))) - (IF (ILEQ INITX X) THEN (SETQ TERMX X) ELSE - (SETQ TERMX INITX) (SETQ INITX X)) (SETQ X - (IPLUS X IX)) (SETQ P (IPLUS P IPY)) ELSE - (SETQ TERMX X) (if (ILESSP P 0) then (SETQ P - (IPLUS P IPY)) else (SETQ P (IPLUS P IPX)) - (SETQ X (IPLUS X IX)))))) - - (LET (X0 DX D DDX DDY) - - (* * (WITH BRES SELF (*) (SETQ X0 X) (SETQ DX IX) - (SETQ D P) (SETQ DDX IPX) (SETQ DDY IPY))) - - (SETQ D (FFETCH (BRES P) OF SELF)) - (SETQ X0 (FFETCH (BRES X) OF SELF)) - (SETQ DX (FFETCH (BRES IX) OF SELF)) - (SETQ DDX (FFETCH (BRES IPX) OF SELF)) - (SETQ DDY (FFETCH (BRES IPY) OF SELF)) - - (* * Above faster than WITH form * *) - - (SETQ INITX X0) - [IF (EQ (FFETCH (BRES MAJOR) OF SELF) - 'X) - THEN (while (ILESSP D 0) do (SETQ X0 (IPLUS X0 DX)) - (SETQ D (IPLUS D DDX))) - (IF (ILEQ INITX X0) - THEN (SETQ TERMX X0) - ELSE (SETQ TERMX INITX) - (SETQ INITX X0)) - (SETQ X0 (IPLUS X0 DX)) - (SETQ D (IPLUS D DDY)) - ELSE (SETQ TERMX X0) - (if (ILESSP D 0) - then (SETQ D (IPLUS D DDY)) - else (SETQ D (IPLUS D DDX)) - (SETQ X0 (IPLUS X0 DX] - - (* * (WITH BRES SELF (*) (SETQ X X0) (SETQ P D))) - - (FREPLACE (BRES X) OF SELF with X0) - (FREPLACE (BRES P) OF SELF with D] +(PUTPROPS BRESSTEP DMACRO ((SELF SCANY INITX TERMX) + + (* * Assume that this Y is exactly incremented by one from the last call, so + DDA can be used. Then passed parameter scany is not used.) + + (* * (WITH BRES SELF (*) (SETQ INITX X) + (IF (EQ MAJOR (QUOTE X)) THEN (while (ILESSP P 0) do + (SETQ X (IPLUS X IX)) (SETQ P (IPLUS P IPX))) + (IF (ILEQ INITX X) THEN (SETQ TERMX X) ELSE + (SETQ TERMX INITX) (SETQ INITX X)) (SETQ X + (IPLUS X IX)) (SETQ P (IPLUS P IPY)) ELSE + (SETQ TERMX X) (if (ILESSP P 0) then (SETQ P + (IPLUS P IPY)) else (SETQ P (IPLUS P IPX)) + (SETQ X (IPLUS X IX)))))) + + (LET (X0 DX D DDX DDY) + + (* * (WITH BRES SELF (*) (SETQ X0 X) (SETQ DX IX) + (SETQ D P) (SETQ DDX IPX) (SETQ DDY IPY))) + + (SETQ D (FFETCH (BRES P) OF SELF)) + (SETQ X0 (FFETCH (BRES X) OF SELF)) + (SETQ DX (FFETCH (BRES IX) OF SELF)) + (SETQ DDX (FFETCH (BRES IPX) OF SELF)) + (SETQ DDY (FFETCH (BRES IPY) OF SELF)) + + (* * Above faster than WITH form * *) + + (SETQ INITX X0) + [IF (EQ (FFETCH (BRES MAJOR) OF SELF) + 'X) + THEN (while (ILESSP D 0) + do (SETQ X0 (IPLUS X0 DX)) + (SETQ D (IPLUS D DDX))) + (IF (ILEQ INITX X0) + THEN (SETQ TERMX X0) + ELSE (SETQ TERMX INITX) + (SETQ INITX X0)) + (SETQ X0 (IPLUS X0 DX)) + (SETQ D (IPLUS D DDY)) + ELSE (SETQ TERMX X0) + (if (ILESSP D 0) + then (SETQ D (IPLUS D DDY)) + else (SETQ D (IPLUS D DDX)) + (SETQ X0 (IPLUS X0 DX] + + (* * (WITH BRES SELF (*) (SETQ X X0) (SETQ P D))) + + (FREPLACE (BRES X) OF SELF with X0) + (FREPLACE (BRES P) OF SELF with D)))) ) ) @@ -1037,17 +1047,18 @@ Copyright (c) 1985, 1986, 1987, 1990, 1993 by Venue & Xerox Corporation. All ri (DECLARE%: EVAL@COMPILE DONTCOPY -(RPAQQ \GEOM.PANEL ((* * Debugging control panel * *) - (PROG NIL (SETQQ KLIST ((10 . 10) - (20 . 20) - (30 . 20) - (40 . 30) - (50 . 10) - (30 . 0))) - (SETQ NLIST (NORMLOOP KLIST)) - (SETQ SLIST (SLITLOOP NLIST)) - (MYPGON MYWIN KLIST) - (MYNUMB MYWIN KLIST)))) +(RPAQQ \GEOM.PANEL + ((* * Debugging control panel * *) + (PROG NIL (SETQQ KLIST ((10 . 10) + (20 . 20) + (30 . 20) + (40 . 30) + (50 . 10) + (30 . 0))) + (SETQ NLIST (NORMLOOP KLIST)) + (SETQ SLIST (SLITLOOP NLIST)) + (MYPGON MYWIN KLIST) + (MYNUMB MYWIN KLIST)))) ) @@ -1185,42 +1196,42 @@ Copyright (c) 1985, 1986, 1987, 1990, 1993 by Venue & Xerox Corporation. All ri (RPAQQ TRAP.DEBUG NIL) (DECLARE%: EVAL@COMPILE DONTCOPY -(RPAQQ \TRAP.PANEL [(WHILE (EQ MYWIN (WHICHW (GETPOSITION))) - DO - (CLEARW MYWIN2) - (CLEARW MYWIN) - (NILL (SETQ RLIST (MYRAND MYWIN 7))) - (MYPGON MYWIN2 RLIST) - (POLYSHADE.DISPLAY MYWIN2 RLIST GRAYSHADE) - (NILL (SETQ RZOID (TRAPLOOP RLIST))) - (PRINTOUT MYWIN "NUMBER OF TRAPEZOIDS: " (LENGTH RZOID) - T) - (FOR I IN RZOID DO (POLYSHADE.DISPLAY MYWIN I (RAND))) - (MYPGON MYWIN RLIST)) - (NILL (NILL (SETQ RLIST (MYRAND MYWIN 5))) - (MYPGON MYWIN RLIST) - (FOR I IN RZOID DO (MYPGON MYWIN I)) - (MYPGON MYWIN (CAR (NTH RZOID 27))) - (FOR I FROM 23 TO 25 DO (POLYSHADE.DISPLAY MYWIN - (CAR (NTH RZOID I)) - GRAYSHADE))) - (NILL (WHILE (EQ MYWIN (WHICHW (GETPOSITION))) - DO - (CLEARW MYWIN) - (SETQ RLIST (MYDRAW MYWIN NIL)) - (MYPGON MYWIN RLIST) - (PRINTOUT MYWIN "CONVEX: " (CONVEXP RLIST) - T]) +(RPAQQ \TRAP.PANEL + [(WHILE (EQ MYWIN (WHICHW (GETPOSITION))) + DO + (CLEARW MYWIN2) + (CLEARW MYWIN) + (NILL (SETQ RLIST (MYRAND MYWIN 7))) + (MYPGON MYWIN2 RLIST) + (POLYSHADE.DISPLAY MYWIN2 RLIST GRAYSHADE) + (NILL (SETQ RZOID (TRAPLOOP RLIST))) + (PRINTOUT MYWIN "NUMBER OF TRAPEZOIDS: " (LENGTH RZOID) + T) + (FOR I IN RZOID DO (POLYSHADE.DISPLAY MYWIN I (RAND))) + (MYPGON MYWIN RLIST)) + (NILL (NILL (SETQ RLIST (MYRAND MYWIN 5))) + (MYPGON MYWIN RLIST) + (FOR I IN RZOID DO (MYPGON MYWIN I)) + (MYPGON MYWIN (CAR (NTH RZOID 27))) + (FOR I FROM 23 TO 25 DO (POLYSHADE.DISPLAY MYWIN (CAR (NTH RZOID I)) + GRAYSHADE))) + (NILL (WHILE (EQ MYWIN (WHICHW (GETPOSITION))) + DO + (CLEARW MYWIN) + (SETQ RLIST (MYDRAW MYWIN NIL)) + (MYPGON MYWIN RLIST) + (PRINTOUT MYWIN "CONVEX: " (CONVEXP RLIST) + T]) ) -(PUTPROPS XXGEOM COPYRIGHT ("Venue & Xerox Corporation" 1985 1986 1987 1990 1993)) +(PUTPROPS XXGEOM COPYRIGHT ("Venue & Xerox Corporation" 1985 1986 1987 1990 1993 2021)) (DECLARE%: DONTCOPY - (FILEMAP (NIL (2654 3087 (\IRND 2664 . 3085)) (3735 23347 (MAKEXYPT 3745 . 3976) (IRNDLIST 3978 . 4582 -) (NORMLOOP 4584 . 6212) (SLITLOOP 6214 . 7913) (PREPLOOP 7915 . 8580) (YMAPLIST 8582 . 10143) ( -IMAPLIST 10145 . 13704) (UNIQLIST 13706 . 14327) (MERGLIST 14329 . 16976) (MMLTLIST 16978 . 17791) ( -IMLTLIST 17793 . 18676) (XYPT.LESSP 18678 . 19047) (PATH.LESSP 19049 . 20375) (CONVEXP 20377 . 23345)) - (24936 30188 (MAKELINE 24946 . 25626) (MSECT 25628 . 26097) (XSECT 26099 . 26655) (YSECT 26657 . -27215) (XYSECT 27217 . 27958) (KNOTLINE 27960 . 28884) (KNOTLOOP 28886 . 29762) (LINE.LESSP 29764 . -30186)) (30189 33763 (LINEY 30199 . 30653) (MIDDX 30655 . 31158) (INITX 31160 . 31841) (TERMX 31843 . -32473) (SCANX 32475 . 33259) (XPROD 33261 . 33761)) (33803 35267 (XYSECTLSEG 33813 . 35265)) (35711 -38266 (MAKEBRES 35721 . 38264)) (41742 48104 (TRAPLOOP 41752 . 44494) (TRAPMAKE 44496 . 48102))))) + (FILEMAP (NIL (2461 2894 (\IRND 2471 . 2892)) (3638 23250 (MAKEXYPT 3648 . 3879) (IRNDLIST 3881 . 4485 +) (NORMLOOP 4487 . 6115) (SLITLOOP 6117 . 7816) (PREPLOOP 7818 . 8483) (YMAPLIST 8485 . 10046) ( +IMAPLIST 10048 . 13607) (UNIQLIST 13609 . 14230) (MERGLIST 14232 . 16879) (MMLTLIST 16881 . 17694) ( +IMLTLIST 17696 . 18579) (XYPT.LESSP 18581 . 18950) (PATH.LESSP 18952 . 20278) (CONVEXP 20280 . 23248)) + (25235 30477 (MAKELINE 25245 . 25928) (MSECT 25930 . 26399) (XSECT 26401 . 26957) (YSECT 26959 . +27517) (XYSECT 27519 . 28260) (KNOTLINE 28262 . 29186) (KNOTLOOP 29188 . 30064) (LINE.LESSP 30066 . +30475)) (30478 34052 (LINEY 30488 . 30942) (MIDDX 30944 . 31447) (INITX 31449 . 32130) (TERMX 32132 . +32762) (SCANX 32764 . 33548) (XPROD 33550 . 34050)) (34092 35556 (XYSECTLSEG 34102 . 35554)) (36000 +38555 (MAKEBRES 36010 . 38553)) (42116 48478 (TRAPLOOP 42126 . 44868) (TRAPMAKE 44870 . 48476))))) STOP diff --git a/sources/XXGEOM.LCOM b/sources/XXGEOM.LCOM index e2d639021..07a53a2f8 100644 Binary files a/sources/XXGEOM.LCOM and b/sources/XXGEOM.LCOM differ