/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / stk-3.002 / stk-3 / STk-3.1 / Doc / Extension / Extending.tex / node9_ct.html

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3c 21 44 4f 43 54 59 50 | 45 20 48 54 4d 4c 20 50 |<!DOCTYP|E HTML P|
|00000010| 55 42 4c 49 43 20 22 2d | 2f 2f 57 33 43 2f 2f 44 |UBLIC "-|//W3C//D|
|00000020| 54 44 20 48 54 4d 4c 20 | 33 2e 32 20 46 69 6e 61 |TD HTML |3.2 Fina|
|00000030| 6c 2f 2f 65 6e 22 3e 0a | 0a 3c 21 2d 2d 43 6f 6e |l//en">.|.<!--Con|
|00000040| 76 65 72 74 65 64 20 77 | 69 74 68 20 4c 61 54 65 |verted w|ith LaTe|
|00000050| 58 32 48 54 4d 4c 20 32 | 30 32 32 20 28 52 65 6c |X2HTML 2|022 (Rel|
|00000060| 65 61 73 65 64 20 4a 61 | 6e 75 61 72 79 20 31 2c |eased Ja|nuary 1,|
|00000070| 20 32 30 32 32 29 20 2d | 2d 3e 0a 3c 48 54 4d 4c | 2022) -|->.<HTML|
|00000080| 20 6c 61 6e 67 3d 22 65 | 6e 22 3e 0a 3c 48 45 41 | lang="e|n">.<HEA|
|00000090| 44 3e 0a 3c 54 49 54 4c | 45 3e 43 6f 6e 74 65 6e |D>.<TITL|E>Conten|
|000000a0| 74 73 20 6f 66 20 4e 6f | 74 65 3a 3c 2f 54 49 54 |ts of No|te:</TIT|
|000000b0| 4c 45 3e 0a 0a 3c 4d 45 | 54 41 20 48 54 54 50 2d |LE>..<ME|TA HTTP-|
|000000c0| 45 51 55 49 56 3d 22 43 | 6f 6e 74 65 6e 74 2d 54 |EQUIV="C|ontent-T|
|000000d0| 79 70 65 22 20 43 4f 4e | 54 45 4e 54 3d 22 74 65 |ype" CON|TENT="te|
|000000e0| 78 74 2f 68 74 6d 6c 3b | 20 63 68 61 72 73 65 74 |xt/html;| charset|
|000000f0| 3d 75 74 66 2d 38 22 3e | 0a 3c 4d 45 54 41 20 4e |=utf-8">|.<META N|
|00000100| 41 4d 45 3d 22 76 69 65 | 77 70 6f 72 74 22 20 43 |AME="vie|wport" C|
|00000110| 4f 4e 54 45 4e 54 3d 22 | 77 69 64 74 68 3d 64 65 |ONTENT="|width=de|
|00000120| 76 69 63 65 2d 77 69 64 | 74 68 2c 20 69 6e 69 74 |vice-wid|th, init|
|00000130| 69 61 6c 2d 73 63 61 6c | 65 3d 31 2e 30 22 3e 0a |ial-scal|e=1.0">.|
|00000140| 3c 4d 45 54 41 20 4e 41 | 4d 45 3d 22 47 65 6e 65 |<META NA|ME="Gene|
|00000150| 72 61 74 6f 72 22 20 43 | 4f 4e 54 45 4e 54 3d 22 |rator" C|ONTENT="|
|00000160| 4c 61 54 65 58 32 48 54 | 4d 4c 20 76 32 30 32 32 |LaTeX2HT|ML v2022|
|00000170| 22 3e 0a 0a 3c 4c 49 4e | 4b 20 52 45 4c 3d 22 53 |">..<LIN|K REL="S|
|00000180| 54 59 4c 45 53 48 45 45 | 54 22 20 48 52 45 46 3d |TYLESHEE|T" HREF=|
|00000190| 22 45 78 74 65 6e 64 69 | 6e 67 2e 63 73 73 22 3e |"Extendi|ng.css">|
|000001a0| 0a 0a 3c 4c 49 4e 4b 20 | 52 45 4c 3d 22 70 72 65 |..<LINK |REL="pre|
|000001b0| 76 69 6f 75 73 22 20 48 | 52 45 46 3d 22 6e 6f 64 |vious" H|REF="nod|
|000001c0| 65 38 5f 6d 6e 2e 68 74 | 6d 6c 22 3e 0a 3c 4c 49 |e8_mn.ht|ml">.<LI|
|000001d0| 4e 4b 20 52 45 4c 3d 22 | 75 70 22 20 48 52 45 46 |NK REL="|up" HREF|
|000001e0| 3d 22 6e 6f 64 65 38 5f | 6d 6e 2e 68 74 6d 6c 22 |="node8_|mn.html"|
|000001f0| 3e 0a 3c 4c 49 4e 4b 20 | 52 45 4c 3d 22 6e 65 78 |>.<LINK |REL="nex|
|00000200| 74 22 20 48 52 45 46 3d | 22 6e 6f 64 65 31 30 5f |t" HREF=|"node10_|
|00000210| 6d 6e 2e 68 74 6d 6c 22 | 3e 0a 3c 2f 48 45 41 44 |mn.html"|>.</HEAD|
|00000220| 3e 0a 20 0a 3c 42 4f 44 | 59 20 62 67 63 6f 6c 6f |>. .<BOD|Y bgcolo|
|00000230| 72 3d 22 23 66 66 66 66 | 66 66 22 20 74 65 78 74 |r="#ffff|ff" text|
|00000240| 3d 22 23 30 30 30 30 30 | 30 22 20 6c 69 6e 6b 3d |="#00000|0" link=|
|00000250| 22 23 39 39 34 34 45 45 | 22 20 76 6c 69 6e 6b 3d |"#9944EE|" vlink=|
|00000260| 22 23 30 30 30 30 66 66 | 22 20 61 6c 69 6e 6b 3d |"#0000ff|" alink=|
|00000270| 22 23 30 30 66 66 30 30 | 22 3e 0a 0a 3c 48 34 3e |"#00ff00|">..<H4>|
|00000280| 3c 41 20 49 44 3d 22 53 | 45 43 54 49 4f 4e 30 30 |<A ID="S|ECTION00|
|00000290| 30 33 33 30 31 30 30 30 | 30 30 30 30 30 30 30 30 |03301000|00000000|
|000002a0| 30 30 22 3e 0a 4e 6f 74 | 65 3a 3c 2f 41 3e 0a 3c |00">.Not|e:</A>.<|
|000002b0| 2f 48 34 3e 20 3c 42 3e | 61 20 6c 69 73 74 20 6f |/H4> <B>|a list o|
|000002c0| 66 20 61 72 67 75 6d 65 | 6e 74 73 20 69 73 20 61 |f argume|nts is a|
|000002d0| 6c 77 61 79 73 20 61 20 | 70 72 6f 70 65 72 20 6c |lways a |proper l|
|000002e0| 69 73 74 2e 20 59 6f 75 | 20 64 6f 6e 27 74 20 6e |ist. You| don't n|
|000002f0| 65 65 64 20 74 6f 20 74 | 65 73 74 0a 69 66 20 69 |eed to t|est.if i|
|00000300| 74 20 69 73 20 77 65 6c | 6c 20 66 6f 72 6d 65 64 |t is wel|l formed|
|00000310| 2e 3c 2f 42 3e 0a 0a 3c | 50 3e 0a 48 65 72 65 61 |.</B>..<|P>.Herea|
|00000320| 66 74 65 72 20 69 73 20 | 74 68 65 20 63 6f 64 65 |fter is |the code|
|00000330| 20 6f 66 20 74 68 65 20 | 3c 54 54 3e 77 68 65 6e | of the |<TT>when|
|00000340| 3c 2f 54 54 3e 20 70 72 | 69 6d 69 74 69 76 65 2e |</TT> pr|imitive.|
|00000350| 0a 3c 42 52 3e 0a 3c 49 | 4d 47 0a 20 20 53 54 59 |.<BR>.<I|MG.  STY|
|00000360| 4c 45 3d 22 22 20 53 52 | 43 3d 22 69 6d 67 31 31 |LE="" SR|C="img11|
|00000370| 2e 70 6e 67 22 0a 20 41 | 4c 54 3d 22 5c 62 65 67 |.png". A|LT="\beg|
|00000380| 69 6e 7b 43 6f 64 65 7d | 0a 5c 62 65 67 69 6e 7b |in{Code}|.\begin{|
|00000390| 6c 69 73 74 69 6e 67 7d | 5b 32 30 30 5d 7b 32 7d |listing}|[200]{2}|
|000003a0| 0a 73 74 61 74 69 63 20 | 50 52 49 4d 49 54 49 56 |.static |PRIMITIV|
|000003b0| 45 20 77 68 65 6e 28 53 | 43 4d 20 6c 2c 20 53 43 |E when(S|CM l, SC|
|000003c0| 4d 20 65 6e 76 2c 20 69 | 6e 74 20 61 2e 2e 2e 0a |M env, i|nt a....|
|000003d0| 2e 2e 2e 20 7b 0a 72 65 | 73 20 3d 20 53 54 6b 5f |... {.re|s = STk_|
|000003e0| 65 76 61 6c 28 43 41 52 | 28 6c 29 2c 20 65 6e 76 |eval(CAR|(l), env|
|000003f0| 29 3b 0a 7d 0a 7d 0a 7d | 0a 72 65 74 75 72 6e 20 |);.}.}.}|.return |
|00000400| 72 65 73 3b 0a 7d 0a 5c | 65 6e 64 7b 6c 69 73 74 |res;.}.\|end{list|
|00000410| 69 6e 67 7d 5c 65 6e 64 | 7b 43 6f 64 65 7d 22 3e |ing}\end|{Code}">|
|00000420| 0a 3c 42 52 3e 0a 0a 3c | 50 3e 0a 53 6f 6d 65 20 |.<BR>..<|P>.Some |
|00000430| 70 6f 69 6e 74 73 20 74 | 6f 20 6e 6f 74 65 20 68 |points t|o note h|
|00000440| 65 72 65 3a 0a 0a 3c 55 | 4c 3e 0a 3c 4c 49 3e 55 |ere:..<U|L>.<LI>U|
|00000450| 4e 44 45 46 49 4e 45 44 | 20 69 73 20 61 6e 20 69 |NDEFINED| is an i|
|00000460| 6e 74 65 72 70 72 65 74 | 65 72 20 3c 45 4d 3e 63 |nterpret|er <EM>c|
|00000470| 6f 6e 73 74 61 6e 74 3c | 2f 45 4d 3e 2e 20 49 74 |onstant<|/EM>. It|
|00000480| 20 73 65 72 76 65 73 20 | 74 6f 20 64 65 6e 6f 74 | serves |to denot|
|00000490| 65 0a 74 68 65 20 6e 6f | 74 69 6f 6e 20 6f 66 20 |e.the no|tion of |
|000004a0| 3c 45 4d 3e 60 60 75 6e | 73 70 65 63 69 66 69 65 |<EM>``un|specifie|
|000004b0| 64 20 72 65 73 75 6c 74 | 27 27 3c 2f 45 4d 3e 20 |d result|''</EM> |
|000004c0| 6f 66 20 2e 0a 3c 2f 4c | 49 3e 0a 3c 4c 49 3e 54 |of ..</L|I>.<LI>T|
|000004d0| 72 75 74 68 20 61 6e 64 | 20 4e 74 72 75 74 68 20 |ruth and| Ntruth |
|000004e0| 61 72 65 20 74 77 6f 20 | 67 6c 6f 62 61 6c 20 3c |are two |global <|
|000004f0| 45 4d 3e 63 6f 6e 73 74 | 61 6e 74 73 3c 2f 45 4d |EM>const|ants</EM|
|00000500| 3e 20 6f 66 20 74 68 65 | 0a 69 6e 74 65 72 70 72 |> of the|.interpr|
|00000510| 65 74 65 72 20 77 68 69 | 63 68 20 64 65 6e 6f 74 |eter whi|ch denot|
|00000520| 65 20 72 65 73 70 65 63 | 74 69 76 65 6c 79 20 74 |e respec|tively t|
|00000530| 68 65 20 23 74 20 61 6e | 64 20 23 66 20 53 63 68 |he #t an|d #f Sch|
|00000540| 65 6d 65 0a 63 6f 6e 73 | 74 61 6e 74 73 2e 0a 3c |eme.cons|tants..<|
|00000550| 2f 4c 49 3e 0a 3c 2f 55 | 4c 3e 0a 0a 3c 50 3e 0a |/LI>.</U|L>..<P>.|
|00000560| 46 69 67 75 72 65 26 6e | 62 73 70 3b 3c 41 20 48 |Figure&n|bsp;<A H|
|00000570| 52 45 46 3d 22 6e 6f 64 | 65 39 5f 63 74 2e 68 74 |REF="nod|e9_ct.ht|
|00000580| 6d 6c 23 77 68 65 6e 22 | 3e 3c 49 4d 47 20 20 41 |ml#when"|><IMG  A|
|00000590| 4c 54 3d 22 5b 2a 5d 22 | 20 53 52 43 3d 22 63 72 |LT="[*]"| SRC="cr|
|000005a0| 6f 73 73 72 65 66 2e 70 | 6e 67 22 3e 3c 2f 41 3e |ossref.p|ng"></A>|
|000005b0| 20 73 68 6f 77 73 20 61 | 20 63 6f 6d 70 6c 65 74 | shows a| complet|
|000005c0| 65 20 69 6d 70 6c 65 6d | 65 6e 74 61 74 69 6f 6e |e implem|entation|
|000005d0| 20 6f 66 20 3c 54 54 3e | 77 68 65 6e 3c 2f 54 54 | of <TT>|when</TT|
|000005e0| 3e 20 61 6e 64 20 3c 54 | 54 3e 75 6e 6c 65 73 73 |> and <T|T>unless|
|000005f0| 3c 2f 54 54 3e 2e 0a 0a | 3c 50 3e 0a 0a 3c 44 49 |</TT>...|<P>..<DI|
|00000600| 56 20 63 6c 61 73 73 3d | 22 43 45 4e 54 45 52 22 |V class=|"CENTER"|
|00000610| 3e 3c 41 20 49 44 3d 22 | 77 68 65 6e 22 3e 3c 2f |><A ID="|when"></|
|00000620| 41 3e 3c 41 20 49 44 3d | 22 36 31 32 22 3e 3c 2f |A><A ID=|"612"></|
|00000630| 41 3e 0a 3c 54 41 42 4c | 45 3e 0a 3c 43 41 50 54 |A>.<TABL|E>.<CAPT|
|00000640| 49 4f 4e 20 63 6c 61 73 | 73 3d 22 42 4f 54 54 4f |ION clas|s="BOTTO|
|00000650| 4d 22 3e 3c 53 54 52 4f | 4e 47 3e 46 69 67 75 72 |M"><STRO|NG>Figur|
|00000660| 65 3a 3c 2f 53 54 52 4f | 4e 47 3e 0a 53 6f 75 72 |e:</STRO|NG>.Sour|
|00000670| 63 65 20 6c 69 73 74 69 | 6e 67 20 6f 66 20 66 69 |ce listi|ng of fi|
|00000680| 6c 65 20 3c 54 54 3e 77 | 68 65 6e 5f 75 6e 6c 65 |le <TT>w|hen_unle|
|00000690| 73 73 2e 63 3c 2f 54 54 | 3e 3c 2f 43 41 50 54 49 |ss.c</TT|></CAPTI|
|000006a0| 4f 4e 3e 0a 3c 54 52 3e | 3c 54 44 3e 3c 49 4d 47 |ON>.<TR>|<TD><IMG|
|000006b0| 0a 20 53 54 59 4c 45 3d | 22 22 20 53 52 43 3d 22 |. STYLE=|"" SRC="|
|000006c0| 69 6d 67 31 32 2e 70 6e | 67 22 0a 20 41 4c 54 3d |img12.pn|g". ALT=|
|000006d0| 22 5c 62 65 67 69 6e 7b | 66 69 67 75 72 65 7d 5c |"\begin{|figure}\|
|000006e0| 62 65 67 69 6e 7b 71 75 | 6f 74 65 7d 5c 66 6f 6f |begin{qu|ote}\foo|
|000006f0| 74 6e 6f 74 65 73 69 7a | 65 0a 5c 62 65 67 69 6e |tnotesiz|e.\begin|
|00000700| 7b 76 65 72 62 61 74 69 | 6d 7d 2e 2e 2e 22 3e 3c |{verbati|m}..."><|
|00000710| 2f 54 44 3e 3c 2f 54 52 | 3e 0a 3c 2f 54 41 42 4c |/TD></TR|>.</TABL|
|00000720| 45 3e 0a 3c 2f 44 49 56 | 3e 0a 0a 3c 50 3e 0a 0a |E>.</DIV|>..<P>..|
|00000730| 3c 48 52 3e 0a 0a 3c 2f | 42 4f 44 59 3e 0a 3c 2f |<HR>..</|BODY>.</|
|00000740| 48 54 4d 4c 3e 0a       |                         |HTML>.  |        |
+--------+-------------------------+-------------------------+--------+--------+