github.com/Interlisp.medley
1
0
Fork 0
mirror of synced 2026-04-25 11:51:46 +00:00
Code Issues Projects Releases Wiki Activity
Files
00a8f0eba3da7edc043cff5e04b06f5dadf2c4c0
Interlisp.medley/docs/internal/sketches/LYRIC/SPEC/LISTP.SKETCH
Larry Masinter f86be45834 Add documents from envos/LISPCORE/internal/docs (#812)
2022-07-02 22:08:47 -07:00

2 lines
12 KiB
Plaintext
Raw Blame History

This file contains invisible Unicode characters
This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
((SKETCH <lispfiles>Lyric>Spec>listp.sketch VERSION 3 SKETCHCONTEXT ((ROUND 1 BLACK) (TERMINAL 8 (
MEDIUM REGULAR REGULAR)) (CENTER BASELINE) (CURVE 18.0 8) NIL NIL (CENTER CENTER) (NIL NIL) T NIL
NIL 1.0)) ((0.0 64.0 NIL) (WIRE ((168.0 . 568.0) (168.0 . 608.0) (40.0 . 608.0) (40.0 .
568.0)) (ROUND 1 BLACK) NIL NIL 1.0 NIL)) ((.05 10.0 NIL) (TEXT (104.0 . 592.0) (
"MDSTT entry offset") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((59.0 589.0
90.0 10.0)) BLACK)) ((.008000001 8.0 NIL) (BOX (40.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0
(NIL NIL))) ((.008000001 8.0 NIL) (BOX (48.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL
NIL))) ((.008000001 8.0 NIL) (BOX (56.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL)))
((.008000001 8.0 NIL) (BOX (64.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((
.008000001 8.0 NIL) (BOX (72.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((
.008000001 8.0 NIL) (BOX (80.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((
.008000001 8.0 NIL) (BOX (88.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((
.008000001 8.0 NIL) (BOX (96.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((
.008000001 8.0 NIL) (BOX (120.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((
.008000001 8.0 NIL) (BOX (128.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((
.008000001 8.0 NIL) (BOX (136.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((
.008000001 8.0 NIL) (BOX (144.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((
.008000001 8.0 NIL) (BOX (152.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((
.008000001 8.0 NIL) (BOX (160.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((
.008000001 8.0 NIL) (BOX (168.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((
.008000001 8.0 NIL) (BOX (176.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.05
10.0 NIL) (TEXT (112.0 . 520.0) ("PAGE number") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM
REGULAR REGULAR)) ((84.5 517.0 55.0 10.0)) BLACK)) ((0.0 68.0 NIL) (WIRE ((40.0 . 552.0) (
40.0 . 512.0) (176.0 . 512.0)) (ROUND 1 BLACK) NIL NIL 1.0 NIL)) ((0.0 44.0 NIL) (WIRE ((
176.0 . 552.0) (176.0 . 512.0) (264.0 . 512.0) (264.0 . 552.0)) (ROUND 1 BLACK) NIL NIL 1.0
NIL)) ((.008000001 8.0 NIL) (BOX (208.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL)))
((.008000001 8.0 NIL) (BOX (200.0 552.0 8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.05
10.0 NIL) (TEXT (224.0 . 520.0) ("Offset in PAGE") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM
REGULAR REGULAR)) ((189.0 517.0 70.0 10.0)) BLACK)) ((.008000001 8.0 NIL) (BOX (232.0 552.0
8.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.008000001 8.0 NIL) (BOX (216.0 552.0 8.0
16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.008000001 8.0 NIL) (BOX (224.0 552.0 8.0 16.0)
(ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.008000001 8.0 NIL) (BOX (256.0 552.0 8.0 16.0) (
ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.008000001 8.0 NIL) (BOX (240.0 552.0 8.0 16.0) (ROUND
1 BLACK) NIL 1.0 (NIL NIL))) ((.008000001 8.0 NIL) (BOX (248.0 552.0 8.0 16.0) (ROUND 1
BLACK) NIL 1.0 (NIL NIL))) ((.05 10.0 NIL) (TEXT (40.0 . 640.0) ("OP_listp()") 1.0 (CENTER
BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((15.0 637.0 50.0 10.0)) BLACK)) ((.016 32.0
NIL) (BOX (72.0 408.0 64.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.016 32.0 NIL) (BOX
(136.0 408.0 64.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.05 10.0 NIL) (TEXT (40.0 .
416.0) ("TopOfStack") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((15.0 413.0
50.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT (104.0 . 432.0) ("(TOSH)") 1.0 (CENTER BASELINE)
(TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((89.0 429.0 30.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT
(168.0 . 432.0) ("(TOS)") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((155.5
429.0 25.0 10.0)) BLACK)) ((.06400001 108.0 NIL) (BOX (8.0 400.0 216.0 64.0) (ROUND 1 BLACK)
NIL 1.0 (NIL NIL))) ((.05 10.0 NIL) (TEXT (32.0 . 448.0) ("AT Entry") 1.0 (CENTER BASELINE)
(TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((12.0 445.0 40.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT
(32.0 . 176.0) ("AT Exit") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((14.5
173.0 35.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT (40.0 . 144.0) ("TopOfStack") 1.0 (CENTER
BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((15.0 141.0 50.0 10.0)) BLACK)) ((.06400001
108.0 NIL) (BOX (8.0 128.0 216.0 64.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.016 32.0 NIL)
(BOX (72.0 136.0 64.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.05 10.0 NIL) (TEXT (
104.0 . 160.0) ("(TOSH)") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((89.0
157.0 30.0 10.0)) BLACK)) ((.016 32.0 NIL) (BOX (136.0 136.0 64.0 16.0) (ROUND 1 BLACK) NIL
1.0 (NIL NIL))) ((.05 10.0 NIL) (TEXT (168.0 . 160.0) ("(TOS)") 1.0 (CENTER BASELINE) (
TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((155.5 157.0 25.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT
(136.0 . 448.0) ("24 bit object pointer ") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR
REGULAR)) ((81.0 445.0 110.0 10.0)) BLACK)) ((.016 24.0 NIL) (BOX (328.0 448.0 48.0 16.0)
(ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.016 24.0 NIL) (BOX (328.0 432.0 48.0 16.0) (ROUND 1
BLACK) NIL 1.0 (NIL NIL))) ((.016 24.0 NIL) (BOX (328.0 400.0 48.0 16.0) (ROUND 1 BLACK) NIL
1.0 (NIL NIL))) ((.016 24.0 NIL) (BOX (328.0 416.0 48.0 16.0) (ROUND 1 BLACK) NIL 1.0 (
NIL NIL))) ((.05 10.0 NIL) (TEXT (344.0 . 472.0) ("ByteCode") 1.0 (CENTER BASELINE) (TERMINAL
8 (MEDIUM REGULAR REGULAR)) ((324.0 469.0 40.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT (352.0
. 440.0) ("3Q") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((347.0 437.0
10.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT (272.0 . 440.0) ("PC at Entry") 1.0 (CENTER
BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((244.5 437.0 55.0 10.0)) BLACK)) ((0.0 12.0
NIL) (WIRE ((304.0 . 440.0) (328.0 . 440.0)) (ROUND 1 BLACK) (NIL (CURVE 18.0 8.0)) NIL 1.0
NIL)) ((.05 10.0 NIL) (TEXT (104.0 . 416.0) ("Addr Hi 8") 1.0 (CENTER BASELINE) (TERMINAL 8
(MEDIUM REGULAR REGULAR)) ((81.5 413.0 45.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT (168.0 .
416.0) ("Addr Lo 16") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((143.0 413.0
50.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT (112.0 . 312.0) ("(TYPE Num in MDSTT entry )"
" >>10)!= TYPE_LISTP") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((47.0 314.0
130.0 10.0) (64.5 304.0 95.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT (80.0 . 616.0) (
"Object Pointer") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((45.0 613.0 70.0
10.0)) BLACK)) ((0.0 104.0 NIL) (WIRE ((40.0 . 400.0) (40.0 . 192.0)) (ROUND 1 BLACK) NIL
NIL 1.0 NIL)) ((0.0 88.0 NIL) (CLOSEDWIRE ((40.0 . 344.0) (216.0 . 344.0) (184.0 . 312.0) (
216.0 . 280.0) (40.0 . 280.0)) (ROUND 1 BLACK) NIL 1.0 NIL NIL)) ((0.0 20.0 NIL) (OPENCURVE (
(344.0 . 632.0) (352.0 . 624.0) (384.0 . 624.0)) (ROUND 1 BLACK) NIL (NIL (CURVE 18.0 8.0))
1.0 NIL)) ((.05 10.0 NIL) (TEXT (344.0 . 640.0) ("DLword *MDStypetbl") 1.0 (CENTER BASELINE)
(TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((299.0 637.0 90.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT
(424.0 . 624.0) ("DLword") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((
409.0 621.0 30.0 10.0)) BLACK)) ((.016 40.0 NIL) (BOX (384.0 616.0 80.0 16.0) (ROUND 1
BLACK) NIL 1.0 (NIL NIL))) ((0.0 40.0 NIL) (OPENCURVE ((464.0 . 632.0) (480.0 . 616.0) (
488.0 . 592.0) (480.0 . 568.0) (464.0 . 552.0)) (ROUND 1 BLACK) NIL NIL 1.0 NIL)) ((.06400001
40.0 NIL) (BOX (384.0 552.0 80.0 64.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.016 20.0 NIL)
(BOX (384.0 536.0 40.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.016 20.0 NIL) (BOX (
424.0 536.0 40.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.05 10.0 NIL) (TEXT (400.0 .
528.0) ("mask") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((390.0 525.0 20.0
10.0)) BLACK)) ((.05 10.0 NIL) (TEXT (440.0 . 528.0) ("type") 1.0 (CENTER BASELINE) (
TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((430.0 525.0 20.0 10.0)) BLACK)) ((.016 20.0 NIL) (BOX
(384.0 520.0 40.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.05 10.0 NIL) (TEXT (400.0 .
544.0) ("mask") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((390.0 541.0 20.0
10.0)) BLACK)) ((.05 10.0 NIL) (TEXT (440.0 . 544.0) ("type") 1.0 (CENTER BASELINE) (
TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((430.0 541.0 20.0 10.0)) BLACK)) ((.032 40.0 NIL) (BOX
(384.0 488.0 80.0 32.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.016 20.0 NIL) (BOX (424.0
520.0 40.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.05 10.0 NIL) (TEXT (320.0 . 344.0)
("TopOfStack = NIL_PTR ;") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((265.0
341.0 110.0 10.0)) BLACK)) ((.032 64.0 NIL) (BOX (256.0 328.0 128.0 32.0) (ROUND 1 BLACK)
NIL 1.0 (NIL NIL))) ((0.0 20.0 NIL) (WIRE ((216.0 . 344.0) (256.0 . 344.0)) (ROUND 1 BLACK)
NIL NIL 1.0 NIL)) ((.05 10.0 NIL) (TEXT (80.0 . 240.0) ("PC ++ ;") 1.0 (CENTER BASELINE) (
TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((62.5 237.0 35.0 10.0)) BLACK)) ((.032 40.0 NIL) (BOX (
40.0 224.0 80.0 32.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.05 10.0 NIL) (TEXT (272.0 .
152.0) ("PC at Exit") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((247.0 149.0
50.0 10.0)) BLACK)) ((0.0 12.0 NIL) (WIRE ((304.0 . 152.0) (328.0 . 152.0)) (ROUND 1 BLACK)
(NIL (CURVE 18.0 8.0)) NIL 1.0 NIL)) ((.016 24.0 NIL) (BOX (328.0 160.0 48.0 16.0) (
ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.016 24.0 NIL) (BOX (328.0 144.0 48.0 16.0) (ROUND 1
BLACK) NIL 1.0 (NIL NIL))) ((.016 24.0 NIL) (BOX (328.0 128.0 48.0 16.0) (ROUND 1 BLACK) NIL
1.0 (NIL NIL))) ((.016 24.0 NIL) (BOX (328.0 176.0 48.0 16.0) (ROUND 1 BLACK) NIL 1.0 (
NIL NIL))) ((.05 10.0 NIL) (TEXT (344.0 . 200.0) ("ByteCode") 1.0 (CENTER BASELINE) (TERMINAL
8 (MEDIUM REGULAR REGULAR)) ((324.0 197.0 40.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT (352.0
. 168.0) ("3Q") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((347.0 165.0
10.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT (352.0 . 152.0) ("Next") 1.0 (CENTER BASELINE) (
TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((342.0 149.0 20.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT
(120.0 . 176.0) ("24 bit object pointer ") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR
REGULAR)) ((65.0 173.0 110.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT (280.0 . 368.0) (
"NIL return") 1.0 (CENTER BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((255.0 365.0 50.0
10.0)) BLACK)) ((.05 10.0 NIL) (TEXT (296.0 . 272.0) ("The Object Type is LISTP") 1.0 (CENTER
BASELINE) (TERMINAL 8 (MEDIUM REGULAR REGULAR)) ((236.0 269.0 120.0 10.0)) BLACK)) ((.05 12.0
NIL) (TEXT (72.0 . 672.0) ("SPEC of LISTP(3Q)") 1.0 (CENTER BASELINE) (MODERN 10 (BOLD REGULAR
REGULAR)) ((30.0 669.0 84.0 12.0)) BLACK)))
(0.0 44.0 580.0 652.0)
1.0
8.0
?1(DEFAULTFONT 1 (GACHA 10) (GACHA 8) (TERMINAL 8))
.‹ SKIO.GETFN.2.‹zº
Reference in New Issue View Git Blame Copy Permalink