KongFuOfArchitect/part3/lisp/lisp_function/lisp_rest_parameters.fas at master · program-spiritual/KongFuOfArchitect · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
(|SYSTEM|::|VERSION| '(20080430.))
#0Y_ #0Y |CHARSET|::|UTF-8|
#Y(#:|1 3 (DEFUN SHOW-MEMBERS (A B &REST ...) ...)-1|
   #20Y(00 00 00 00 00 00 00 00 20 01 DA 2F 01 DA DC 32 9C C5 19 01)
   (|COMMON-LISP-USER|::|SHOW-MEMBERS| |SYSTEM|::|REMOVE-OLD-DEFINITIONS|
    #Y(|COMMON-LISP-USER|::|SHOW-MEMBERS|
       #21Y(00 00 00 00 02 00 00 00 27 18 AF AF AF 7B 03 38 11 31 8C 19 04) ()
       (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
       (|COMMON-LISP-USER|::|A| |COMMON-LISP-USER|::|B| |COMMON-LISP|::|&REST|
        |COMMON-LISP|::|VALUES|)
       |COMMON-LISP|::|NIL| 1))
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|5 5 (SHOW-MEMBERS 1 2 ...)-2|
   #18Y(00 00 00 00 00 00 00 00 20 01 DA DB DC 2D 03 03 19 01)
   (1. 2. 3. |COMMON-LISP-USER|::|SHOW-MEMBERS|)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|6 6 (TERPRI)-3| #16Y(00 00 00 00 00 00 00 00 20 01 38 01 31 97 19 01) ()
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|8 8 (SHOW-MEMBERS 'A 'B ...)-4|
   #19Y(00 00 00 00 00 00 00 00 20 01 DA DB DC DD 2D 04 04 19 01)
   (|COMMON-LISP-USER|::|A| |COMMON-LISP-USER|::|B| |COMMON-LISP-USER|::|C|
    |COMMON-LISP-USER|::|D| |COMMON-LISP-USER|::|SHOW-MEMBERS|)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|9 9 (TERPRI)-5| #16Y(00 00 00 00 00 00 00 00 20 01 38 01 31 97 19 01) ()
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|11 11 (SHOW-MEMBERS 'A 'B)-6|
   #16Y(00 00 00 00 00 00 00 00 20 01 DA DB 30 02 19 01)
   (|COMMON-LISP-USER|::|A| |COMMON-LISP-USER|::|B|
    |COMMON-LISP-USER|::|SHOW-MEMBERS|)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|12 12 (TERPRI)-7| #16Y(00 00 00 00 00 00 00 00 20 01 38 01 31 97 19 01)
   () (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|14 14 (SHOW-MEMBERS 1 2 ...)-8|
   #19Y(00 00 00 00 00 00 00 00 20 01 DA DB DC DD 2D 04 04 19 01)
   (1. 2. 3. 4. |COMMON-LISP-USER|::|SHOW-MEMBERS|)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|15 15 (TERPRI)-9| #16Y(00 00 00 00 00 00 00 00 20 01 38 01 31 97 19 01)
   () (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|17 17 (SHOW-MEMBERS 1 2 ...)-10|
   #24Y(00 00 00 00 00 00 00 00 20 01 DA DB DC DD DE DF E0 E1 E2 2D 09 09 19
        01)
   (1. 2. 3. 4. 5. 6. 7. 8. 9. |COMMON-LISP-USER|::|SHOW-MEMBERS|)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))