home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1995-08-29 | 73.5 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
| 1%
| dexvert
| Combustion 2 Particle Library (other/combustion2ParticleLibrary)
| ext
| Unsupported |
| 100%
| file
| Emacs/XEmacs v19 byte-compiled Lisp data
| default
| |
| 99%
| file
| data
| default
| |
| 55%
| TrID
| Emacs/XEmacs byte-compiled Lisp (generic)
| default
| |
| 44%
| TrID
| Summation Document Image Information Load File
| default (weak)
| |
| 100%
| xdgMime
| text/x-emacs-lisp
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 63 74 68 6f 6d 70 40 |piled by| cthomp@|
|00000020| 77 69 6c 6c 6f 77 2e 63 | 73 2e 75 69 75 63 2e 65 |willow.c|s.uiuc.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 41 75 67 20 32 39 |du on Tu|e Aug 29|
|00000040| 20 31 33 3a 35 31 3a 32 | 32 20 31 39 39 35 0a 3b | 13:51:2|2 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 78 65 |;; from |file /xe|
|00000060| 6d 61 63 73 2f 78 65 6d | 61 63 73 2d 31 39 2e 31 |macs/xem|acs-19.1|
|00000070| 33 2d 72 65 6c 65 61 73 | 65 2f 65 64 69 74 6f 72 |3-releas|e/editor|
|00000080| 2f 6c 69 73 70 2f 62 79 | 74 65 63 6f 6d 70 2f 62 |/lisp/by|tecomp/b|
|00000090| 79 74 65 63 6f 6d 70 2e | 65 6c 0a 3b 3b 3b 20 65 |ytecomp.|el.;;; e|
|000000a0| 6d 61 63 73 20 76 65 72 | 73 69 6f 6e 20 31 39 2e |macs ver|sion 19.|
|000000b0| 31 33 20 58 45 6d 61 63 | 73 20 4c 75 63 69 64 2e |13 XEmac|s Lucid.|
|000000c0| 0a 3b 3b 3b 20 62 79 74 | 65 63 6f 6d 70 20 76 65 |.;;; byt|ecomp ve|
|000000d0| 72 73 69 6f 6e 20 32 2e | 32 35 3b 20 31 2d 53 65 |rsion 2.|25; 1-Se|
|000000e0| 70 2d 39 34 2e 0a 3b 3b | 3b 20 6f 70 74 69 6d 69 |p-94..;;|; optimi|
|000000f0| 7a 61 74 69 6f 6e 20 69 | 73 20 6f 6e 2e 0a 3b 3b |zation i|s on..;;|
|00000100| 3b 20 74 68 69 73 20 66 | 69 6c 65 20 75 73 65 73 |; this f|ile uses|
|00000110| 20 6f 70 63 6f 64 65 73 | 20 77 68 69 63 68 20 64 | opcodes| which d|
|00000120| 6f 20 6e 6f 74 20 65 78 | 69 73 74 20 69 6e 20 45 |o not ex|ist in E|
|00000130| 6d 61 63 73 20 31 38 2e | 0a 0a 28 69 66 20 28 61 |macs 18.|..(if (a|
|00000140| 6e 64 20 28 62 6f 75 6e | 64 70 20 27 65 6d 61 63 |nd (boun|dp 'emac|
|00000150| 73 2d 76 65 72 73 69 6f | 6e 29 0a 09 20 28 6f 72 |s-versio|n).. (or|
|00000160| 20 28 61 6e 64 20 28 62 | 6f 75 6e 64 70 20 27 65 | (and (b|oundp 'e|
|00000170| 70 6f 63 68 3a 3a 76 65 | 72 73 69 6f 6e 29 20 65 |poch::ve|rsion) e|
|00000180| 70 6f 63 68 3a 3a 76 65 | 72 73 69 6f 6e 29 0a 09 |poch::ve|rsion)..|
|00000190| 20 20 20 20 20 28 73 74 | 72 69 6e 67 2d 6c 65 73 | (st|ring-les|
|000001a0| 73 70 20 65 6d 61 63 73 | 2d 76 65 72 73 69 6f 6e |sp emacs|-version|
|000001b0| 20 22 31 39 22 29 29 29 | 0a 20 20 20 20 28 65 72 | "19")))|. (er|
|000001c0| 72 6f 72 20 22 54 68 69 | 73 20 66 69 6c 65 20 77 |ror "Thi|s file w|
|000001d0| 61 73 20 63 6f 6d 70 69 | 6c 65 64 20 66 6f 72 20 |as compi|led for |
|000001e0| 45 6d 61 63 73 20 31 39 | 2e 22 29 29 0a 0a 28 62 |Emacs 19|."))..(b|
|000001f0| 79 74 65 2d 63 6f 64 65 | 20 22 c0 c1 21 12 c3 c4 |yte-code| "..!...|
|00000200| 21 ac 84 c5 c6 21 88 c7 | c8 21 ab 84 0e 08 ac 86 |!....!..|.!......|
|00000210| 0e 09 ca 99 ab a7 cb cc | 4d 88 cd ce 4d 88 cf d0 |........|M...M...|
|00000220| 4d 88 d1 d2 4d 88 d3 d4 | 4d 88 d5 d6 4d 88 c3 d7 |M...M...|M...M...|
|00000230| 21 ab 86 d8 d7 4b 21 ac | 84 d7 d9 4d 88 c0 87 22 |!....K!.|...M..."|
|00000240| 20 5b 70 75 72 65 63 6f | 70 79 20 22 32 2e 32 35 | [pureco|py "2.25|
|00000250| 3b 20 31 2d 53 65 70 2d | 39 34 2e 22 20 62 79 74 |; 1-Sep-|94." byt|
|00000260| 65 2d 63 6f 6d 70 69 6c | 65 2d 76 65 72 73 69 6f |e-compil|e-versio|
|00000270| 6e 20 66 62 6f 75 6e 64 | 70 20 64 65 66 73 75 62 |n fbound|p defsub|
|00000280| 73 74 20 6c 6f 61 64 2d | 6c 69 62 72 61 72 79 20 |st load-|library |
|00000290| 22 62 79 74 65 63 6f 6d | 70 2d 72 75 6e 74 69 6d |"bytecom|p-runtim|
|000002a0| 65 22 20 62 6f 75 6e 64 | 70 20 65 70 6f 63 68 3a |e" bound|p epoch:|
|000002b0| 3a 76 65 72 73 69 6f 6e | 20 65 6d 61 63 73 2d 76 |:version| emacs-v|
|000002c0| 65 72 73 69 6f 6e 20 22 | 31 39 22 20 63 6f 6d 70 |ersion "|19" comp|
|000002d0| 69 6c 65 64 2d 66 75 6e | 63 74 69 6f 6e 2d 70 20 |iled-fun|ction-p |
|000002e0| 28 6c 61 6d 62 64 61 20 | 28 78 29 20 22 45 6d 61 |(lambda |(x) "Ema|
|000002f0| 63 73 20 31 38 20 64 6f | 65 73 6e 27 74 20 68 61 |cs 18 do|esn't ha|
|00000300| 76 65 20 74 68 65 73 65 | 2e 22 20 6e 69 6c 29 20 |ve these|." nil) |
|00000310| 63 6f 6d 70 69 6c 65 64 | 2d 66 75 6e 63 74 69 6f |compiled|-functio|
|00000320| 6e 2d 61 72 67 6c 69 73 | 74 20 23 5b 28 78 29 20 |n-arglis|t #[(x) |
|00000330| 22 08 c1 48 87 22 20 5b | 78 20 30 5d 20 32 5d 20 |"..H." [|x 0] 2] |
|00000340| 63 6f 6d 70 69 6c 65 64 | 2d 66 75 6e 63 74 69 6f |compiled|-functio|
|00000350| 6e 2d 69 6e 73 74 72 75 | 63 74 69 6f 6e 73 20 23 |n-instru|ctions #|
|00000360| 5b 28 78 29 20 22 08 c1 | 48 87 22 20 5b 78 20 31 |[(x) "..|H." [x 1|
|00000370| 5d 20 32 5d 20 63 6f 6d | 70 69 6c 65 64 2d 66 75 |] 2] com|piled-fu|
|00000380| 6e 63 74 69 6f 6e 2d 63 | 6f 6e 73 74 61 6e 74 73 |nction-c|onstants|
|00000390| 20 23 5b 28 78 29 20 22 | 08 c1 48 87 22 20 5b 78 | #[(x) "|..H." [x|
|000003a0| 20 32 5d 20 32 5d 20 63 | 6f 6d 70 69 6c 65 64 2d | 2] 2] c|ompiled-|
|000003b0| 66 75 6e 63 74 69 6f 6e | 2d 73 74 61 63 6b 2d 64 |function|-stack-d|
|000003c0| 65 70 74 68 20 23 5b 28 | 78 29 20 22 08 c1 48 87 |epth #[(|x) "..H.|
|000003d0| 22 20 5b 78 20 33 5d 20 | 32 5d 20 63 6f 6d 70 69 |" [x 3] |2] compi|
|000003e0| 6c 65 64 2d 66 75 6e 63 | 74 69 6f 6e 2d 69 6e 74 |led-func|tion-int|
|000003f0| 65 72 61 63 74 69 76 65 | 20 23 5b 28 78 29 20 22 |eractive| #[(x) "|
|00000400| c0 c1 c2 8f 87 22 20 5b | 6e 69 6c 20 28 62 79 74 |....." [|nil (byt|
|00000410| 65 2d 63 6f 64 65 20 22 | c0 09 c2 48 44 87 22 20 |e-code "|...HD." |
|00000420| 5b 69 6e 74 65 72 61 63 | 74 69 76 65 20 78 20 35 |[interac|tive x 5|
|00000430| 5d 20 33 29 20 28 28 65 | 72 72 6f 72 29 29 5d 20 |] 3) ((e|rror))] |
|00000440| 33 5d 20 6d 65 6d 62 65 | 72 20 73 75 62 72 70 20 |3] membe|r subrp |
|00000450| 23 5b 28 65 6c 74 20 6c | 69 73 74 29 20 22 08 ab |#[(elt l|ist) "..|
|00000460| 8c 09 08 40 9a ac 86 08 | 41 89 10 ac 74 08 87 22 |...@....|A...t.."|
|00000470| 20 5b 6c 69 73 74 20 65 | 6c 74 5d 20 33 20 22 6c | [list e|lt] 3 "l|
|00000480| 69 6b 65 20 6d 65 6d 71 | 2c 20 62 75 74 20 75 73 |ike memq|, but us|
|00000490| 65 73 20 65 71 75 61 6c | 20 69 6e 73 74 65 61 64 |es equal| instead|
|000004a0| 20 6f 66 20 65 71 2e 20 | 20 49 6e 20 76 31 39 2c | of eq. | In v19,|
|000004b0| 20 74 68 69 73 20 69 73 | 20 61 20 73 75 62 72 2e | this is| a subr.|
|000004c0| 22 5d 5d 20 32 29 0a 28 | 64 65 66 76 61 72 20 65 |"]] 2).(|defvar e|
|000004d0| 6d 61 63 73 2d 6c 69 73 | 70 2d 66 69 6c 65 2d 72 |macs-lis|p-file-r|
|000004e0| 65 67 65 78 70 20 28 62 | 79 74 65 2d 63 6f 64 65 |egexp (b|yte-code|
|000004f0| 20 22 08 c1 3d ab 84 c2 | c3 21 87 c2 c4 21 87 22 | "..=...|.!...!."|
|00000500| 20 5b 73 79 73 74 65 6d | 2d 74 79 70 65 20 76 61 | [system|-type va|
|00000510| 78 2d 76 6d 73 20 70 75 | 72 65 63 6f 70 79 20 22 |x-vms pu|recopy "|
|00000520| 5c 5c 2e 45 4c 5c 5c 28 | 3b 5b 30 2d 39 5d 2b 5c |\\.EL\\(|;[0-9]+\|
|00000530| 5c 29 3f 24 22 20 22 5c | 5c 2e 65 6c 24 22 5d 20 |\)?$" "\|\.el$"] |
|00000540| 32 29 20 22 5c 0a 2a 52 | 65 67 65 78 70 20 77 68 |2) "\.*R|egexp wh|
|00000550| 69 63 68 20 6d 61 74 63 | 68 65 73 20 45 6d 61 63 |ich matc|hes Emac|
|00000560| 73 20 4c 69 73 70 20 73 | 6f 75 72 63 65 20 66 69 |s Lisp s|ource fi|
|00000570| 6c 65 73 2e 0a 59 6f 75 | 20 6d 61 79 20 77 61 6e |les..You| may wan|
|00000580| 74 20 74 6f 20 72 65 64 | 65 66 69 6e 65 20 60 62 |t to red|efine `b|
|00000590| 79 74 65 2d 63 6f 6d 70 | 69 6c 65 2d 64 65 73 74 |yte-comp|ile-dest|
|000005a0| 2d 66 69 6c 65 27 20 69 | 66 20 79 6f 75 20 63 68 |-file' i|f you ch|
|000005b0| 61 6e 67 65 20 74 68 69 | 73 2e 22 29 0a 28 62 79 |ange thi|s.").(by|
|000005c0| 74 65 2d 63 6f 64 65 20 | 22 c0 c1 21 ac 84 c1 c2 |te-code |"..!....|
|000005d0| 4d 88 c3 c4 c5 5c 22 88 | c3 c6 c5 5c 22 88 c3 c7 |M....\".|...\"...|
|000005e0| c5 5c 22 88 c3 c8 c5 5c | 22 87 22 20 5b 66 62 6f |.\"....\|"." [fbo|
|000005f0| 75 6e 64 70 20 62 79 74 | 65 2d 63 6f 6d 70 69 6c |undp byt|e-compil|
|00000600| 65 2d 64 65 73 74 2d 66 | 69 6c 65 20 23 5b 28 66 |e-dest-f|ile #[(f|
|00000610| 69 6c 65 6e 61 6d 65 29 | 20 22 c0 09 21 11 5c 6e |ilename)| "..!.\n|
|00000620| c3 3d ab 8a 09 c4 c5 c6 | 09 5c 22 4f c7 50 87 c5 |.=......|.\"O.P..|
|00000630| 0e 08 09 5c 22 ab 88 09 | c4 89 94 4f c9 50 87 09 |...\"...|...O.P..|
|00000640| c7 50 87 22 20 5b 66 69 | 6c 65 2d 6e 61 6d 65 2d |.P." [fi|le-name-|
|00000650| 73 61 6e 73 2d 76 65 72 | 73 69 6f 6e 73 20 66 69 |sans-ver|sions fi|
|00000660| 6c 65 6e 61 6d 65 20 73 | 79 73 74 65 6d 2d 74 79 |lename s|ystem-ty|
|00000670| 70 65 20 76 61 78 2d 76 | 6d 73 20 30 20 73 74 72 |pe vax-v|ms 0 str|
|00000680| 69 6e 67 2d 6d 61 74 63 | 68 20 22 3b 22 20 22 63 |ing-matc|h ";" "c|
|00000690| 22 20 65 6d 61 63 73 2d | 6c 69 73 70 2d 66 69 6c |" emacs-|lisp-fil|
|000006a0| 65 2d 72 65 67 65 78 70 | 20 22 2e 65 6c 63 22 5d |e-regexp| ".elc"]|
|000006b0| 20 35 20 22 43 6f 6e 76 | 65 72 74 20 61 6e 20 45 | 5 "Conv|ert an E|
|000006c0| 6d 61 63 73 20 4c 69 73 | 70 20 73 6f 75 72 63 65 |macs Lis|p source|
|000006d0| 20 66 69 6c 65 20 6e 61 | 6d 65 20 74 6f 20 61 20 | file na|me to a |
|000006e0| 63 6f 6d 70 69 6c 65 64 | 20 66 69 6c 65 20 6e 61 |compiled| file na|
|000006f0| 6d 65 2e 22 5d 20 61 75 | 74 6f 6c 6f 61 64 20 62 |me."] au|toload b|
|00000700| 79 74 65 2d 63 6f 6d 70 | 69 6c 65 2d 69 6e 6c 69 |yte-comp|ile-inli|
|00000710| 6e 65 2d 65 78 70 61 6e | 64 20 22 62 79 74 65 2d |ne-expan|d "byte-|
|00000720| 6f 70 74 69 6d 69 7a 65 | 22 20 62 79 74 65 2d 6f |optimize|" byte-o|
|00000730| 70 74 69 6d 69 7a 65 2d | 66 6f 72 6d 20 62 79 74 |ptimize-|form byt|
|00000740| 65 2d 6f 70 74 69 6d 69 | 7a 65 2d 6c 61 70 63 6f |e-optimi|ze-lapco|
|00000750| 64 65 20 62 79 74 65 2d | 63 6f 6d 70 69 6c 65 2d |de byte-|compile-|
|00000760| 75 6e 66 6f 6c 64 2d 6c | 61 6d 62 64 61 5d 20 33 |unfold-l|ambda] 3|
|00000770| 29 0a 28 64 65 66 76 61 | 72 20 62 79 74 65 2d 63 |).(defva|r byte-c|
|00000780| 6f 6d 70 69 6c 65 2d 76 | 65 72 62 6f 73 65 20 28 |ompile-v|erbose (|
|00000790| 62 79 74 65 2d 63 6f 64 | 65 20 22 08 3f ad 84 c1 |byte-cod|e ".?...|
|000007a0| 20 5c 6e 56 87 22 20 5b | 6e 6f 6e 69 6e 74 65 72 | \nV." [|noninter|
|000007b0| 61 63 74 69 76 65 20 62 | 61 75 64 2d 72 61 74 65 |active b|aud-rate|
|000007c0| 20 73 65 61 72 63 68 2d | 73 6c 6f 77 2d 73 70 65 | search-|slow-spe|
|000007d0| 65 64 5d 20 32 29 20 22 | 5c 0a 2a 4e 6f 6e 2d 6e |ed] 2) "|\.*Non-n|
|000007e0| 69 6c 20 6d 65 61 6e 73 | 20 70 72 69 6e 74 20 6d |il means| print m|
|000007f0| 65 73 73 61 67 65 73 20 | 64 65 73 63 72 69 62 69 |essages |describi|
|00000800| 6e 67 20 70 72 6f 67 72 | 65 73 73 20 6f 66 20 62 |ng progr|ess of b|
|00000810| 79 74 65 2d 63 6f 6d 70 | 69 6c 65 72 2e 22 29 0a |yte-comp|iler.").|
|00000820| 28 64 65 66 76 61 72 20 | 62 79 74 65 2d 63 6f 6d |(defvar |byte-com|
|00000830| 70 69 6c 65 2d 65 6d 61 | 63 73 31 38 2d 63 6f 6d |pile-ema|cs18-com|
|00000840| 70 61 74 69 62 69 6c 69 | 74 79 20 28 62 79 74 65 |patibili|ty (byte|
|00000850| 2d 63 6f 64 65 20 22 c0 | c1 21 ab 83 09 ae 83 5c |-code ".|.!.....\|
|00000860| 6e c3 99 87 22 20 5b 62 | 6f 75 6e 64 70 20 65 70 |n..." [b|oundp ep|
|00000870| 6f 63 68 3a 3a 76 65 72 | 73 69 6f 6e 20 65 6d 61 |och::ver|sion ema|
|00000880| 63 73 2d 76 65 72 73 69 | 6f 6e 20 22 31 39 22 5d |cs-versi|on "19"]|
|00000890| 20 32 29 20 22 5c 0a 2a | 49 66 20 74 68 69 73 20 | 2) "\.*|If this |
|000008a0| 69 73 20 74 72 75 65 2c | 20 74 68 65 6e 20 74 68 |is true,| then th|
|000008b0| 65 20 62 79 74 65 20 63 | 6f 6d 70 69 6c 65 72 20 |e byte c|ompiler |
|000008c0| 77 69 6c 6c 20 67 65 6e | 65 72 61 74 65 20 2e 65 |will gen|erate .e|
|000008d0| 6c 63 20 66 69 6c 65 73 | 20 77 68 69 63 68 20 77 |lc files| which w|
|000008e0| 69 6c 6c 0a 77 6f 72 6b | 20 69 6e 20 67 65 6e 65 |ill.work| in gene|
|000008f0| 72 69 63 20 76 65 72 73 | 69 6f 6e 20 31 38 20 65 |ric vers|ion 18 e|
|00000900| 6d 61 63 73 65 73 20 77 | 69 74 68 6f 75 74 20 68 |macses w|ithout h|
|00000910| 61 76 69 6e 67 20 62 79 | 74 65 63 6f 6d 70 2d 72 |aving by|tecomp-r|
|00000920| 75 6e 74 69 6d 65 2e 65 | 6c 20 6c 6f 61 64 65 64 |untime.e|l loaded|
|00000930| 2e 0a 49 66 20 74 68 69 | 73 20 69 73 20 66 61 6c |..If thi|s is fal|
|00000940| 73 65 2c 20 74 68 65 20 | 67 65 6e 65 72 61 74 65 |se, the |generate|
|00000950| 64 20 63 6f 64 65 20 77 | 69 6c 6c 20 62 65 20 6d |d code w|ill be m|
|00000960| 6f 72 65 20 65 66 66 69 | 63 69 65 6e 74 20 69 6e |ore effi|cient in|
|00000970| 20 65 6d 61 63 73 20 31 | 39 2c 20 61 6e 64 0a 77 | emacs 1|9, and.w|
|00000980| 69 6c 6c 20 62 65 20 6c | 6f 61 64 61 62 6c 65 20 |ill be l|oadable |
|00000990| 69 6e 20 65 6d 61 63 73 | 20 31 38 20 6f 6e 6c 79 |in emacs| 18 only|
|000009a0| 20 69 66 20 62 79 74 65 | 63 6f 6d 70 2d 72 75 6e | if byte|comp-run|
|000009b0| 74 69 6d 65 2e 65 6c 20 | 69 73 20 6c 6f 61 64 65 |time.el |is loade|
|000009c0| 64 2e 0a 53 65 65 20 61 | 6c 73 6f 20 62 79 74 65 |d..See a|lso byte|
|000009d0| 2d 63 6f 6d 70 69 6c 65 | 2d 67 65 6e 65 72 61 74 |-compile|-generat|
|000009e0| 65 2d 65 6d 61 63 73 31 | 39 2d 62 79 74 65 63 6f |e-emacs1|9-byteco|
|000009f0| 64 65 73 2e 22 29 0a 28 | 64 65 66 76 61 72 20 62 |des.").(|defvar b|
|00000a00| 79 74 65 2d 63 6f 6d 70 | 69 6c 65 2d 67 65 6e 65 |yte-comp|ile-gene|
|00000a10| 72 61 74 65 2d 65 6d 61 | 63 73 31 39 2d 62 79 74 |rate-ema|cs19-byt|
|00000a20| 65 63 6f 64 65 73 20 28 | 62 79 74 65 2d 63 6f 64 |ecodes (|byte-cod|
|00000a30| 65 20 22 c0 c1 21 ab 83 | 09 ae 83 5c 6e c3 99 3f |e "..!..|...\n..?|
|00000a40| 87 22 20 5b 62 6f 75 6e | 64 70 20 65 70 6f 63 68 |." [boun|dp epoch|
|00000a50| 3a 3a 76 65 72 73 69 6f | 6e 20 65 6d 61 63 73 2d |::versio|n emacs-|
|00000a60| 76 65 72 73 69 6f 6e 20 | 22 31 39 22 5d 20 32 29 |version |"19"] 2)|
|00000a70| 20 22 5c 0a 2a 49 66 20 | 74 68 69 73 20 69 73 20 | "\.*If |this is |
|00000a80| 74 72 75 65 2c 20 74 68 | 65 6e 20 74 68 65 20 62 |true, th|en the b|
|00000a90| 79 74 65 2d 63 6f 6d 70 | 69 6c 65 72 20 77 69 6c |yte-comp|iler wil|
|00000aa0| 6c 20 67 65 6e 65 72 61 | 74 65 20 62 79 74 65 63 |l genera|te bytec|
|00000ab0| 6f 64 65 20 77 68 69 63 | 68 20 0a 6d 61 6b 65 73 |ode whic|h .makes|
|00000ac0| 20 75 73 65 20 6f 66 20 | 62 79 74 65 2d 6f 70 73 | use of |byte-ops|
|00000ad0| 20 77 68 69 63 68 20 61 | 72 65 20 70 72 65 73 65 | which a|re prese|
|00000ae0| 6e 74 20 6f 6e 6c 79 20 | 69 6e 20 65 6d 61 63 73 |nt only |in emacs|
|00000af0| 31 39 2e 20 20 43 6f 64 | 65 20 67 65 6e 65 72 61 |19. Cod|e genera|
|00000b00| 74 65 64 0a 74 68 69 73 | 20 77 61 79 20 63 61 6e |ted.this| way can|
|00000b10| 20 6e 65 76 65 72 20 62 | 65 20 72 75 6e 20 69 6e | never b|e run in|
|00000b20| 20 65 6d 61 63 73 31 38 | 2c 20 61 6e 64 20 6d 61 | emacs18|, and ma|
|00000b30| 79 20 65 76 65 6e 20 63 | 61 75 73 65 20 69 74 20 |y even c|ause it |
|00000b40| 74 6f 20 63 72 61 73 68 | 2e 22 29 0a 28 64 65 66 |to crash|.").(def|
|00000b50| 76 61 72 20 62 79 74 65 | 2d 6f 70 74 69 6d 69 7a |var byte|-optimiz|
|00000b60| 65 20 74 20 22 5c 0a 2a | 45 6e 61 62 6c 65 73 20 |e t "\.*|Enables |
|00000b70| 6f 70 74 69 6d 69 7a 61 | 74 69 6f 6e 20 69 6e 20 |optimiza|tion in |
|00000b80| 74 68 65 20 62 79 74 65 | 20 63 6f 6d 70 69 6c 65 |the byte| compile|
|00000b90| 72 2e 0a 6e 69 6c 20 6d | 65 61 6e 73 20 64 6f 6e |r..nil m|eans don|
|00000ba0| 27 74 20 64 6f 20 61 6e | 79 20 6f 70 74 69 6d 69 |'t do an|y optimi|
|00000bb0| 7a 61 74 69 6f 6e 2e 0a | 74 20 6d 65 61 6e 73 20 |zation..|t means |
|00000bc0| 64 6f 20 61 6c 6c 20 6f | 70 74 69 6d 69 7a 61 74 |do all o|ptimizat|
|00000bd0| 69 6f 6e 73 2e 0a 60 73 | 6f 75 72 63 65 27 20 6d |ions..`s|ource' m|
|00000be0| 65 61 6e 73 20 64 6f 20 | 73 6f 75 72 63 65 2d 6c |eans do |source-l|
|00000bf0| 65 76 65 6c 20 6f 70 74 | 69 6d 69 7a 61 74 69 6f |evel opt|imizatio|
|00000c00| 6e 73 20 6f 6e 6c 79 2e | 0a 60 62 79 74 65 27 20 |ns only.|.`byte' |
|00000c10| 6d 65 61 6e 73 20 64 6f | 20 63 6f 64 65 2d 6c 65 |means do| code-le|
|00000c20| 76 65 6c 20 6f 70 74 69 | 6d 69 7a 61 74 69 6f 6e |vel opti|mization|
|00000c30| 73 20 6f 6e 6c 79 2e 22 | 29 0a 28 64 65 66 76 61 |s only."|).(defva|
|00000c40| 72 20 62 79 74 65 2d 63 | 6f 6d 70 69 6c 65 2d 64 |r byte-c|ompile-d|
|00000c50| 65 6c 65 74 65 2d 65 72 | 72 6f 72 73 20 74 20 22 |elete-er|rors t "|
|00000c60| 5c 0a 2a 49 66 20 6e 6f | 6e 2d 6e 69 6c 2c 20 74 |\.*If no|n-nil, t|
|00000c70| 68 65 20 6f 70 74 69 6d | 69 7a 65 72 20 6d 61 79 |he optim|izer may|
|00000c80| 20 64 65 6c 65 74 65 20 | 66 6f 72 6d 73 20 74 68 | delete |forms th|
|00000c90| 61 74 20 6d 61 79 20 73 | 69 67 6e 61 6c 20 61 6e |at may s|ignal an|
|00000ca0| 20 65 72 72 6f 72 2e 0a | 54 68 69 73 20 69 6e 63 | error..|This inc|
|00000cb0| 6c 75 64 65 73 20 76 61 | 72 69 61 62 6c 65 20 72 |ludes va|riable r|
|00000cc0| 65 66 65 72 65 6e 63 65 | 73 20 61 6e 64 20 63 61 |eference|s and ca|
|00000cd0| 6c 6c 73 20 74 6f 20 66 | 75 6e 63 74 69 6f 6e 73 |lls to f|unctions|
|00000ce0| 20 73 75 63 68 20 61 73 | 20 60 63 61 72 27 2e 22 | such as| `car'."|
|00000cf0| 29 0a 28 64 65 66 76 61 | 72 20 62 79 74 65 2d 6f |).(defva|r byte-o|
|00000d00| 70 74 69 6d 69 7a 65 2d | 6c 6f 67 20 6e 69 6c 20 |ptimize-|log nil |
|00000d10| 22 5c 0a 2a 49 66 20 74 | 72 75 65 2c 20 74 68 65 |"\.*If t|rue, the|
|00000d20| 20 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 72 20 77 | byte-co|mpiler w|
|00000d30| 69 6c 6c 20 6c 6f 67 20 | 69 74 73 20 6f 70 74 69 |ill log |its opti|
|00000d40| 6d 69 7a 61 74 69 6f 6e | 73 20 69 6e 74 6f 20 2a |mization|s into *|
|00000d50| 43 6f 6d 70 69 6c 65 2d | 4c 6f 67 2a 2e 0a 49 66 |Compile-|Log*..If|
|00000d60| 20 74 68 69 73 20 69 73 | 20 27 73 6f 75 72 63 65 | this is| 'source|
|00000d70| 2c 20 74 68 65 6e 20 6f | 6e 6c 79 20 73 6f 75 72 |, then o|nly sour|
|00000d80| 63 65 2d 6c 65 76 65 6c | 20 6f 70 74 69 6d 69 7a |ce-level| optimiz|
|00000d90| 61 74 69 6f 6e 73 20 77 | 69 6c 6c 20 62 65 20 6c |ations w|ill be l|
|00000da0| 6f 67 67 65 64 2e 0a 49 | 66 20 69 74 20 69 73 20 |ogged..I|f it is |
|00000db0| 27 62 79 74 65 2c 20 74 | 68 65 6e 20 6f 6e 6c 79 |'byte, t|hen only|
|00000dc0| 20 62 79 74 65 2d 6c 65 | 76 65 6c 20 6f 70 74 69 | byte-le|vel opti|
|00000dd0| 6d 69 7a 61 74 69 6f 6e | 73 20 77 69 6c 6c 20 62 |mization|s will b|
|00000de0| 65 20 6c 6f 67 67 65 64 | 2e 22 29 0a 28 64 65 66 |e logged|.").(def|
|00000df0| 76 61 72 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |var byte|-compile|
|00000e00| 2d 65 72 72 6f 72 2d 6f | 6e 2d 77 61 72 6e 20 6e |-error-o|n-warn n|
|00000e10| 69 6c 20 22 5c 0a 2a 49 | 66 20 74 72 75 65 2c 20 |il "\.*I|f true, |
|00000e20| 74 68 65 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |the byte|-compile|
|00000e30| 72 20 72 65 70 6f 72 74 | 73 20 77 61 72 6e 69 6e |r report|s warnin|
|00000e40| 67 73 20 77 69 74 68 20 | 60 65 72 72 6f 72 27 2e |gs with |`error'.|
|00000e50| 22 29 0a 28 64 65 66 76 | 61 72 20 62 79 74 65 2d |").(defv|ar byte-|
|00000e60| 63 6f 6d 70 69 6c 65 2d | 64 65 66 61 75 6c 74 2d |compile-|default-|
|00000e70| 77 61 72 6e 69 6e 67 73 | 20 27 28 72 65 64 65 66 |warnings| '(redef|
|00000e80| 69 6e 65 20 63 61 6c 6c | 61 72 67 73 20 66 72 65 |ine call|args fre|
|00000e90| 65 2d 76 61 72 73 20 75 | 6e 72 65 73 6f 6c 76 65 |e-vars u|nresolve|
|00000ea0| 64 20 75 6e 75 73 65 64 | 2d 76 61 72 73 20 6f 62 |d unused|-vars ob|
|00000eb0| 73 6f 6c 65 74 65 29 20 | 22 5c 0a 2a 54 68 65 20 |solete) |"\.*The |
|00000ec0| 77 61 72 6e 69 6e 67 73 | 20 75 73 65 64 20 77 68 |warnings| used wh|
|00000ed0| 65 6e 20 62 79 74 65 2d | 63 6f 6d 70 69 6c 65 2d |en byte-|compile-|
|00000ee0| 77 61 72 6e 69 6e 67 73 | 20 69 73 20 74 2e 22 29 |warnings| is t.")|
|00000ef0| 0a 28 64 65 66 76 61 72 | 20 62 79 74 65 2d 63 6f |.(defvar| byte-co|
|00000f00| 6d 70 69 6c 65 2d 77 61 | 72 6e 69 6e 67 73 20 74 |mpile-wa|rnings t|
|00000f10| 20 22 5c 0a 2a 4c 69 73 | 74 20 6f 66 20 77 61 72 | "\.*Lis|t of war|
|00000f20| 6e 69 6e 67 73 20 74 68 | 61 74 20 74 68 65 20 63 |nings th|at the c|
|00000f30| 6f 6d 70 69 6c 65 72 20 | 73 68 6f 75 6c 64 20 69 |ompiler |should i|
|00000f40| 73 73 75 65 20 28 74 20 | 66 6f 72 20 74 68 65 20 |ssue (t |for the |
|00000f50| 64 65 66 61 75 6c 74 20 | 73 65 74 29 2e 0a 45 6c |default |set)..El|
|00000f60| 65 6d 65 6e 74 73 20 6f | 66 20 74 68 65 20 6c 69 |ements o|f the li|
|00000f70| 73 74 20 6d 61 79 20 62 | 65 20 62 65 3a 0a 0a 20 |st may b|e be:.. |
|00000f80| 20 66 72 65 65 2d 76 61 | 72 73 09 72 65 66 65 72 | free-va|rs.refer|
|00000f90| 65 6e 63 65 73 20 74 6f | 20 76 61 72 69 61 62 6c |ences to| variabl|
|00000fa0| 65 73 20 6e 6f 74 20 69 | 6e 20 74 68 65 20 63 75 |es not i|n the cu|
|00000fb0| 72 72 65 6e 74 20 6c 65 | 78 69 63 61 6c 20 73 63 |rrent le|xical sc|
|00000fc0| 6f 70 65 2e 0a 20 20 75 | 6e 75 73 65 64 2d 76 61 |ope.. u|nused-va|
|00000fd0| 72 73 09 72 65 66 65 72 | 65 6e 63 65 73 20 74 6f |rs.refer|ences to|
|00000fe0| 20 6e 6f 6e 2d 67 6c 6f | 62 61 6c 20 76 61 72 69 | non-glo|bal vari|
|00000ff0| 61 62 6c 65 73 20 62 6f | 75 6e 64 20 62 75 74 20 |ables bo|und but |
|00001000| 6e 6f 74 20 72 65 66 65 | 72 65 6e 63 65 64 2e 0a |not refe|renced..|
|00001010| 20 20 75 6e 72 65 73 6f | 6c 76 65 64 09 63 61 6c | unreso|lved.cal|
|00001020| 6c 73 20 74 6f 20 75 6e | 6b 6e 6f 77 6e 20 66 75 |ls to un|known fu|
|00001030| 6e 63 74 69 6f 6e 73 2e | 0a 20 20 63 61 6c 6c 61 |nctions.|. calla|
|00001040| 72 67 73 09 6c 61 6d 62 | 64 61 20 63 61 6c 6c 73 |rgs.lamb|da calls|
|00001050| 20 77 69 74 68 20 61 72 | 67 73 20 74 68 61 74 20 | with ar|gs that |
|00001060| 64 6f 6e 27 74 20 6d 61 | 74 63 68 20 74 68 65 20 |don't ma|tch the |
|00001070| 64 65 66 69 6e 69 74 69 | 6f 6e 2e 0a 20 20 72 65 |definiti|on.. re|
|00001080| 64 65 66 69 6e 65 09 66 | 75 6e 63 74 69 6f 6e 20 |define.f|unction |
|00001090| 63 65 6c 6c 20 72 65 64 | 65 66 69 6e 65 64 20 66 |cell red|efined f|
|000010a0| 72 6f 6d 20 61 20 6d 61 | 63 72 6f 20 74 6f 20 61 |rom a ma|cro to a|
|000010b0| 20 6c 61 6d 62 64 61 20 | 6f 72 20 76 69 63 65 0a | lambda |or vice.|
|000010c0| 09 09 76 65 72 73 61 2c | 20 6f 72 20 72 65 64 65 |..versa,| or rede|
|000010d0| 66 69 6e 65 64 20 74 6f | 20 74 61 6b 65 20 61 20 |fined to| take a |
|000010e0| 64 69 66 66 65 72 65 6e | 74 20 6e 75 6d 62 65 72 |differen|t number|
|000010f0| 20 6f 66 20 61 72 67 75 | 6d 65 6e 74 73 2e 0a 20 | of argu|ments.. |
|00001100| 20 6f 62 73 6f 6c 65 74 | 65 09 75 73 65 20 6f 66 | obsolet|e.use of|
|00001110| 20 61 6e 20 6f 62 73 6f | 6c 65 74 65 20 66 75 6e | an obso|lete fun|
|00001120| 63 74 69 6f 6e 20 6f 72 | 20 76 61 72 69 61 62 6c |ction or| variabl|
|00001130| 65 2e 0a 0a 54 68 65 20 | 64 65 66 61 75 6c 74 20 |e...The |default |
|00001140| 73 65 74 20 69 73 20 73 | 70 65 63 69 66 69 65 64 |set is s|pecified|
|00001150| 20 62 79 20 60 62 79 74 | 65 2d 63 6f 6d 70 69 6c | by `byt|e-compil|
|00001160| 65 2d 64 65 66 61 75 6c | 74 2d 77 61 72 6e 69 6e |e-defaul|t-warnin|
|00001170| 67 73 27 20 61 6e 64 0a | 6e 6f 72 6d 61 6c 6c 79 |gs' and.|normally|
|00001180| 20 65 6e 63 6f 6d 70 61 | 73 73 65 73 20 61 6c 6c | encompa|sses all|
|00001190| 20 70 6f 73 73 69 62 6c | 65 20 77 61 72 6e 69 6e | possibl|e warnin|
|000011a0| 67 73 2e 0a 0a 53 65 65 | 20 61 6c 73 6f 20 74 68 |gs...See| also th|
|000011b0| 65 20 6d 61 63 72 6f 20 | 60 62 79 74 65 2d 63 6f |e macro |`byte-co|
|000011c0| 6d 70 69 6c 65 72 2d 6f | 70 74 69 6f 6e 73 27 2e |mpiler-o|ptions'.|
|000011d0| 22 29 0a 28 64 65 66 76 | 61 72 20 62 79 74 65 2d |").(defv|ar byte-|
|000011e0| 63 6f 6d 70 69 6c 65 2d | 67 65 6e 65 72 61 74 65 |compile-|generate|
|000011f0| 2d 63 61 6c 6c 2d 74 72 | 65 65 20 6e 69 6c 20 22 |-call-tr|ee nil "|
|00001200| 5c 0a 2a 4e 6f 6e 2d 6e | 69 6c 20 6d 65 61 6e 73 |\.*Non-n|il means|
|00001210| 20 63 6f 6c 6c 65 63 74 | 20 63 61 6c 6c 2d 67 72 | collect| call-gr|
|00001220| 61 70 68 20 69 6e 66 6f | 72 6d 61 74 69 6f 6e 20 |aph info|rmation |
|00001230| 77 68 65 6e 20 63 6f 6d | 70 69 6c 69 6e 67 2e 0a |when com|piling..|
|00001240| 54 68 69 73 20 72 65 63 | 6f 72 64 73 20 66 75 6e |This rec|ords fun|
|00001250| 63 74 69 6f 6e 73 20 77 | 65 72 65 20 63 61 6c 6c |ctions w|ere call|
|00001260| 65 64 20 61 6e 64 20 66 | 72 6f 6d 20 77 68 65 72 |ed and f|rom wher|
|00001270| 65 2e 0a 49 66 20 74 68 | 65 20 76 61 6c 75 65 20 |e..If th|e value |
|00001280| 69 73 20 74 2c 20 63 6f | 6d 70 69 6c 61 74 69 6f |is t, co|mpilatio|
|00001290| 6e 20 64 69 73 70 6c 61 | 79 73 20 74 68 65 20 63 |n displa|ys the c|
|000012a0| 61 6c 6c 20 67 72 61 70 | 68 20 77 68 65 6e 20 69 |all grap|h when i|
|000012b0| 74 20 66 69 6e 69 73 68 | 65 73 2e 0a 49 66 20 74 |t finish|es..If t|
|000012c0| 68 65 20 76 61 6c 75 65 | 20 69 73 20 6e 65 69 74 |he value| is neit|
|000012d0| 68 65 72 20 74 20 6e 6f | 72 20 6e 69 6c 2c 20 63 |her t no|r nil, c|
|000012e0| 6f 6d 70 69 6c 61 74 69 | 6f 6e 20 61 73 6b 73 20 |ompilati|on asks |
|000012f0| 79 6f 75 20 77 68 65 74 | 68 65 72 20 74 6f 20 64 |you whet|her to d|
|00001300| 69 73 70 6c 61 79 0a 74 | 68 65 20 67 72 61 70 68 |isplay.t|he graph|
|00001310| 2e 0a 0a 54 68 65 20 63 | 61 6c 6c 20 74 72 65 65 |...The c|all tree|
|00001320| 20 6f 6e 6c 79 20 6c 69 | 73 74 73 20 66 75 6e 63 | only li|sts func|
|00001330| 74 69 6f 6e 73 20 63 61 | 6c 6c 65 64 2c 20 6e 6f |tions ca|lled, no|
|00001340| 74 20 6d 61 63 72 6f 73 | 20 75 73 65 64 2e 20 54 |t macros| used. T|
|00001350| 68 6f 73 65 20 66 75 6e | 63 74 69 6f 6e 73 0a 77 |hose fun|ctions.w|
|00001360| 68 69 63 68 20 74 68 65 | 20 62 79 74 65 2d 63 6f |hich the| byte-co|
|00001370| 64 65 20 69 6e 74 65 72 | 70 72 65 74 65 72 20 6b |de inter|preter k|
|00001380| 6e 6f 77 73 20 61 62 6f | 75 74 20 64 69 72 65 63 |nows abo|ut direc|
|00001390| 74 6c 79 20 28 65 71 2c | 20 63 6f 6e 73 2c 20 65 |tly (eq,| cons, e|
|000013a0| 74 63 2e 29 20 61 72 65 | 0a 6e 6f 74 20 72 65 70 |tc.) are|.not rep|
|000013b0| 6f 72 74 65 64 2e 0a 0a | 54 68 65 20 63 61 6c 6c |orted...|The call|
|000013c0| 20 74 72 65 65 20 61 6c | 73 6f 20 6c 69 73 74 73 | tree al|so lists|
|000013d0| 20 74 68 6f 73 65 20 66 | 75 6e 63 74 69 6f 6e 73 | those f|unctions|
|000013e0| 20 77 68 69 63 68 20 61 | 72 65 20 6e 6f 74 20 6b | which a|re not k|
|000013f0| 6e 6f 77 6e 20 74 6f 20 | 62 65 20 63 61 6c 6c 65 |nown to |be calle|
|00001400| 64 0a 28 74 68 61 74 20 | 69 73 2c 20 74 6f 20 77 |d.(that |is, to w|
|00001410| 68 69 63 68 20 6e 6f 20 | 63 61 6c 6c 73 20 68 61 |hich no |calls ha|
|00001420| 76 65 20 62 65 65 6e 20 | 63 6f 6d 70 69 6c 65 64 |ve been |compiled|
|00001430| 2e 29 20 20 46 75 6e 63 | 74 69 6f 6e 73 20 77 68 |.) Func|tions wh|
|00001440| 69 63 68 20 63 61 6e 20 | 62 65 0a 69 6e 76 6f 6b |ich can |be.invok|
|00001450| 65 64 20 69 6e 74 65 72 | 61 63 74 69 76 65 6c 79 |ed inter|actively|
|00001460| 20 61 72 65 20 65 78 63 | 6c 75 64 65 64 20 66 72 | are exc|luded fr|
|00001470| 6f 6d 20 74 68 69 73 20 | 6c 69 73 74 2e 22 29 0a |om this |list.").|
|00001480| 28 64 65 66 63 6f 6e 73 | 74 20 62 79 74 65 2d 63 |(defcons|t byte-c|
|00001490| 6f 6d 70 69 6c 65 2d 63 | 61 6c 6c 2d 74 72 65 65 |ompile-c|all-tree|
|000014a0| 20 6e 69 6c 20 22 5c 0a | 41 6c 69 73 74 20 6f 66 | nil "\.|Alist of|
|000014b0| 20 66 75 6e 63 74 69 6f | 6e 73 20 61 6e 64 20 74 | functio|ns and t|
|000014c0| 68 65 69 72 20 63 61 6c | 6c 20 74 72 65 65 2e 0a |heir cal|l tree..|
|000014d0| 45 61 63 68 20 65 6c 65 | 6d 65 6e 74 20 6c 6f 6f |Each ele|ment loo|
|000014e0| 6b 73 20 6c 69 6b 65 0a | 0a 20 20 28 46 55 4e 43 |ks like.|. (FUNC|
|000014f0| 54 49 4f 4e 20 43 41 4c | 4c 45 52 53 20 43 41 4c |TION CAL|LERS CAL|
|00001500| 4c 53 29 0a 0a 77 68 65 | 72 65 20 43 41 4c 4c 45 |LS)..whe|re CALLE|
|00001510| 52 53 20 69 73 20 61 20 | 6c 69 73 74 20 6f 66 20 |RS is a |list of |
|00001520| 66 75 6e 63 74 69 6f 6e | 73 20 74 68 61 74 20 63 |function|s that c|
|00001530| 61 6c 6c 20 46 55 4e 43 | 54 49 4f 4e 2c 20 61 6e |all FUNC|TION, an|
|00001540| 64 20 43 41 4c 4c 53 0a | 69 73 20 61 20 6c 69 73 |d CALLS.|is a lis|
|00001550| 74 20 6f 66 20 66 75 6e | 63 74 69 6f 6e 73 20 66 |t of fun|ctions f|
|00001560| 6f 72 20 77 68 69 63 68 | 20 63 61 6c 6c 73 20 77 |or which| calls w|
|00001570| 65 72 65 20 67 65 6e 65 | 72 61 74 65 64 20 77 68 |ere gene|rated wh|
|00001580| 69 6c 65 20 63 6f 6d 70 | 69 6c 69 6e 67 0a 46 55 |ile comp|iling.FU|
|00001590| 4e 43 54 49 4f 4e 2e 22 | 29 0a 28 64 65 66 76 61 |NCTION."|).(defva|
|000015a0| 72 20 62 79 74 65 2d 63 | 6f 6d 70 69 6c 65 2d 63 |r byte-c|ompile-c|
|000015b0| 61 6c 6c 2d 74 72 65 65 | 2d 73 6f 72 74 20 27 6e |all-tree|-sort 'n|
|000015c0| 61 6d 65 20 22 5c 0a 2a | 49 66 20 6e 6f 6e 2d 6e |ame "\.*|If non-n|
|000015d0| 69 6c 2c 20 73 6f 72 74 | 20 74 68 65 20 63 61 6c |il, sort| the cal|
|000015e0| 6c 20 74 72 65 65 2e 0a | 54 68 65 20 76 61 6c 75 |l tree..|The valu|
|000015f0| 65 73 20 60 6e 61 6d 65 | 27 2c 20 60 63 61 6c 6c |es `name|', `call|
|00001600| 65 72 73 27 2c 20 60 63 | 61 6c 6c 73 27 2c 20 60 |ers', `c|alls', `|
|00001610| 63 61 6c 6c 73 2b 63 61 | 6c 6c 65 72 73 27 0a 73 |calls+ca|llers'.s|
|00001620| 70 65 63 69 66 79 20 64 | 69 66 66 65 72 65 6e 74 |pecify d|ifferent|
|00001630| 20 66 69 65 6c 64 73 20 | 74 6f 20 73 6f 72 74 20 | fields |to sort |
|00001640| 6f 6e 2e 22 29 0a 28 64 | 65 66 76 61 72 20 62 79 |on.").(d|efvar by|
|00001650| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 6f 76 65 72 77 |te-compi|le-overw|
|00001660| 72 69 74 65 2d 66 69 6c | 65 20 74 20 22 5c 0a 49 |rite-fil|e t "\.I|
|00001670| 66 20 6e 69 6c 2c 20 6f | 6c 64 20 2e 65 6c 63 20 |f nil, o|ld .elc |
|00001680| 66 69 6c 65 73 20 61 72 | 65 20 64 65 6c 65 74 65 |files ar|e delete|
|00001690| 64 20 62 65 66 6f 72 65 | 20 74 68 65 20 6e 65 77 |d before| the new|
|000016a0| 20 69 73 20 73 61 76 65 | 64 2c 20 61 6e 64 20 2e | is save|d, and .|
|000016b0| 65 6c 63 0a 66 69 6c 65 | 73 20 77 69 6c 6c 20 68 |elc.file|s will h|
|000016c0| 61 76 65 20 74 68 65 20 | 73 61 6d 65 20 6d 6f 64 |ave the |same mod|
|000016d0| 65 73 20 61 73 20 74 68 | 65 20 63 6f 72 72 65 73 |es as th|e corres|
|000016e0| 70 6f 6e 64 69 6e 67 20 | 2e 65 6c 20 66 69 6c 65 |ponding |.el file|
|000016f0| 2e 20 20 4f 74 68 65 72 | 77 69 73 65 2c 0a 65 78 |. Other|wise,.ex|
|00001700| 69 73 74 69 6e 67 20 2e | 65 6c 63 20 66 69 6c 65 |isting .|elc file|
|00001710| 73 20 77 69 6c 6c 20 73 | 69 6d 70 6c 79 20 62 65 |s will s|imply be|
|00001720| 20 6f 76 65 72 77 72 69 | 74 74 65 6e 2c 20 61 6e | overwri|tten, an|
|00001730| 64 20 74 68 65 20 65 78 | 69 73 74 69 6e 67 20 6d |d the ex|isting m|
|00001740| 6f 64 65 73 0a 77 69 6c | 6c 20 6e 6f 74 20 62 65 |odes.wil|l not be|
|00001750| 20 63 68 61 6e 67 65 64 | 2e 20 20 49 66 20 74 68 | changed|. If th|
|00001760| 69 73 20 76 61 72 69 61 | 62 6c 65 20 69 73 20 6e |is varia|ble is n|
|00001770| 69 6c 2c 20 74 68 65 6e | 20 61 6e 20 2e 65 6c 63 |il, then| an .elc|
|00001780| 20 66 69 6c 65 20 77 68 | 69 63 68 20 0a 69 73 20 | file wh|ich .is |
|00001790| 61 20 73 79 6d 62 6f 6c | 69 63 20 6c 69 6e 6b 20 |a symbol|ic link |
|000017a0| 77 69 6c 6c 20 62 65 20 | 74 75 72 6e 65 64 20 69 |will be |turned i|
|000017b0| 6e 74 6f 20 61 20 6e 6f | 72 6d 61 6c 20 66 69 6c |nto a no|rmal fil|
|000017c0| 65 2c 20 69 6e 73 74 65 | 61 64 20 6f 66 20 74 68 |e, inste|ad of th|
|000017d0| 65 20 66 69 6c 65 0a 77 | 68 69 63 68 20 74 68 65 |e file.w|hich the|
|000017e0| 20 6c 69 6e 6b 20 70 6f | 69 6e 74 73 20 74 6f 20 | link po|ints to |
|000017f0| 62 65 69 6e 67 20 6f 76 | 65 72 77 72 69 74 74 65 |being ov|erwritte|
|00001800| 6e 2e 22 29 0a 28 64 65 | 66 76 61 72 20 62 79 74 |n.").(de|fvar byt|
|00001810| 65 2d 72 65 63 6f 6d 70 | 69 6c 65 2d 64 69 72 65 |e-recomp|ile-dire|
|00001820| 63 74 6f 72 79 2d 69 67 | 6e 6f 72 65 2d 65 72 72 |ctory-ig|nore-err|
|00001830| 6f 72 73 2d 70 20 6e 69 | 6c 20 22 5c 0a 49 66 20 |ors-p ni|l "\.If |
|00001840| 74 72 75 65 2c 20 74 68 | 65 6e 20 60 62 79 74 65 |true, th|en `byte|
|00001850| 2d 72 65 63 6f 6d 70 69 | 6c 65 2d 64 69 72 65 63 |-recompi|le-direc|
|00001860| 74 6f 72 79 27 20 77 69 | 6c 6c 20 63 6f 6e 74 69 |tory' wi|ll conti|
|00001870| 6e 75 65 20 63 6f 6d 70 | 69 6c 69 6e 67 20 65 76 |nue comp|iling ev|
|00001880| 65 6e 0a 77 68 65 6e 20 | 61 6e 20 65 72 72 6f 72 |en.when |an error|
|00001890| 20 6f 63 63 75 72 73 20 | 69 6e 20 61 20 66 69 6c | occurs |in a fil|
|000018a0| 65 2e 20 20 54 68 69 73 | 20 69 73 20 62 6f 75 6e |e. This| is boun|
|000018b0| 64 20 74 6f 20 74 20 62 | 79 0a 60 62 61 74 63 68 |d to t b|y.`batch|
|000018c0| 2d 62 79 74 65 2d 72 65 | 63 6f 6d 70 69 6c 65 2d |-byte-re|compile-|
|000018d0| 64 69 72 65 63 74 6f 72 | 79 27 2e 22 29 0a 28 64 |director|y'.").(d|
|000018e0| 65 66 76 61 72 20 62 79 | 74 65 2d 72 65 63 6f 6d |efvar by|te-recom|
|000018f0| 70 69 6c 65 2d 64 69 72 | 65 63 74 6f 72 79 2d 72 |pile-dir|ectory-r|
|00001900| 65 63 75 72 73 69 76 65 | 6c 79 20 74 20 22 5c 0a |ecursive|ly t "\.|
|00001910| 2a 49 66 20 74 72 75 65 | 2c 20 74 68 65 6e 20 60 |*If true|, then `|
|00001920| 62 79 74 65 2d 72 65 63 | 6f 6d 70 69 6c 65 2d 64 |byte-rec|ompile-d|
|00001930| 69 72 65 63 74 6f 72 79 | 27 20 77 69 6c 6c 20 72 |irectory|' will r|
|00001940| 65 63 75 72 73 65 20 6f | 6e 20 73 75 62 64 69 72 |ecurse o|n subdir|
|00001950| 65 63 74 6f 72 69 65 73 | 2e 22 29 0a 28 64 65 66 |ectories|.").(def|
|00001960| 76 61 72 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |var byte|-compile|
|00001970| 2d 63 6f 6e 73 74 61 6e | 74 73 20 6e 69 6c 20 22 |-constan|ts nil "|
|00001980| 5c 0a 6c 69 73 74 20 6f | 66 20 61 6c 6c 20 63 6f |\.list o|f all co|
|00001990| 6e 73 74 61 6e 74 73 20 | 65 6e 63 6f 75 6e 74 65 |nstants |encounte|
|000019a0| 72 65 64 20 64 75 72 69 | 6e 67 20 63 6f 6d 70 69 |red duri|ng compi|
|000019b0| 6c 61 74 69 6f 6e 20 6f | 66 20 74 68 69 73 20 66 |lation o|f this f|
|000019c0| 6f 72 6d 22 29 0a 28 64 | 65 66 76 61 72 20 62 79 |orm").(d|efvar by|
|000019d0| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 76 61 72 69 61 |te-compi|le-varia|
|000019e0| 62 6c 65 73 20 6e 69 6c | 20 22 5c 0a 6c 69 73 74 |bles nil| "\.list|
|000019f0| 20 6f 66 20 61 6c 6c 20 | 76 61 72 69 61 62 6c 65 | of all |variable|
|00001a00| 73 20 65 6e 63 6f 75 6e | 74 65 72 65 64 20 64 75 |s encoun|tered du|
|00001a10| 72 69 6e 67 20 63 6f 6d | 70 69 6c 61 74 69 6f 6e |ring com|pilation|
|00001a20| 20 6f 66 20 74 68 69 73 | 20 66 6f 72 6d 22 29 0a | of this| form").|
|00001a30| 28 64 65 66 76 61 72 20 | 62 79 74 65 2d 63 6f 6d |(defvar |byte-com|
|00001a40| 70 69 6c 65 2d 62 6f 75 | 6e 64 2d 76 61 72 69 61 |pile-bou|nd-varia|
|00001a50| 62 6c 65 73 20 6e 69 6c | 20 22 5c 0a 41 6c 69 73 |bles nil| "\.Alis|
|00001a60| 74 20 6f 66 20 76 61 72 | 69 61 62 6c 65 73 20 62 |t of var|iables b|
|00001a70| 6f 75 6e 64 20 69 6e 20 | 74 68 65 20 63 6f 6e 74 |ound in |the cont|
|00001a80| 65 78 74 20 6f 66 20 74 | 68 65 20 63 75 72 72 65 |ext of t|he curre|
|00001a90| 6e 74 20 66 6f 72 6d 2c | 0a 74 68 61 74 20 69 73 |nt form,|.that is|
|00001aa0| 2c 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 6c 65 |, the cu|rrent le|
|00001ab0| 78 69 63 61 6c 20 65 6e | 76 69 72 6f 6e 6d 65 6e |xical en|vironmen|
|00001ac0| 74 2e 20 20 54 68 69 73 | 20 6c 69 73 74 20 6c 69 |t. This| list li|
|00001ad0| 76 65 73 20 70 61 72 74 | 6c 79 20 0a 6f 6e 20 74 |ves part|ly .on t|
|00001ae0| 68 65 20 73 70 65 63 62 | 69 6e 64 20 73 74 61 63 |he specb|ind stac|
|00001af0| 6b 2e 20 20 54 68 65 20 | 63 64 72 20 6f 66 20 65 |k. The |cdr of e|
|00001b00| 61 63 68 20 63 65 6c 6c | 20 69 73 20 61 6e 20 69 |ach cell| is an i|
|00001b10| 6e 74 65 67 65 72 20 62 | 69 74 6d 61 73 6b 2e 22 |nteger b|itmask."|
|00001b20| 29 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 11 |).(byte-|code "..|
|00001b30| c2 13 c4 15 c6 16 07 c0 | 87 22 20 5b 31 20 62 79 |........|." [1 by|
|00001b40| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 72 65 66 65 72 |te-compi|le-refer|
|00001b50| 65 6e 63 65 64 2d 62 69 | 74 20 32 20 62 79 74 65 |enced-bi|t 2 byte|
|00001b60| 2d 63 6f 6d 70 69 6c 65 | 2d 61 73 73 69 67 6e 65 |-compile|-assigne|
|00001b70| 64 2d 62 69 74 20 34 20 | 62 79 74 65 2d 63 6f 6d |d-bit 4 |byte-com|
|00001b80| 70 69 6c 65 2d 61 72 67 | 6c 69 73 74 2d 62 69 74 |pile-arg|list-bit|
|00001b90| 20 38 20 62 79 74 65 2d | 63 6f 6d 70 69 6c 65 2d | 8 byte-|compile-|
|00001ba0| 67 6c 6f 62 61 6c 2d 62 | 69 74 5d 20 31 29 0a 28 |global-b|it] 1).(|
|00001bb0| 64 65 66 63 6f 6e 73 74 | 20 62 79 74 65 2d 63 6f |defconst| byte-co|
|00001bc0| 6d 70 69 6c 65 2d 69 6e | 69 74 69 61 6c 2d 6d 61 |mpile-in|itial-ma|
|00001bd0| 63 72 6f 2d 65 6e 76 69 | 72 6f 6e 6d 65 6e 74 20 |cro-envi|ronment |
|00001be0| 28 70 75 72 65 63 6f 70 | 79 20 27 28 28 62 79 74 |(purecop|y '((byt|
|00001bf0| 65 2d 63 6f 6d 70 69 6c | 65 72 2d 6f 70 74 69 6f |e-compil|er-optio|
|00001c00| 6e 73 20 6c 61 6d 62 64 | 61 20 28 26 72 65 73 74 |ns lambd|a (&rest|
|00001c10| 20 66 6f 72 6d 73 29 20 | 28 61 70 70 6c 79 20 27 | forms) |(apply '|
|00001c20| 62 79 74 65 2d 63 6f 6d | 70 69 6c 65 72 2d 6f 70 |byte-com|piler-op|
|00001c30| 74 69 6f 6e 73 2d 68 61 | 6e 64 6c 65 72 20 66 6f |tions-ha|ndler fo|
|00001c40| 72 6d 73 29 29 20 28 65 | 76 61 6c 2d 77 68 65 6e |rms)) (e|val-when|
|00001c50| 2d 63 6f 6d 70 69 6c 65 | 20 6c 61 6d 62 64 61 20 |-compile| lambda |
|00001c60| 28 26 72 65 73 74 20 62 | 6f 64 79 29 20 28 6c 69 |(&rest b|ody) (li|
|00001c70| 73 74 20 27 71 75 6f 74 | 65 20 28 65 76 61 6c 20 |st 'quot|e (eval |
|00001c80| 28 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 74 6f |(byte-co|mpile-to|
|00001c90| 70 2d 6c 65 76 65 6c 20 | 28 63 6f 6e 73 20 27 70 |p-level |(cons 'p|
|00001ca0| 72 6f 67 6e 20 62 6f 64 | 79 29 29 29 29 29 20 28 |rogn bod|y))))) (|
|00001cb0| 65 76 61 6c 2d 61 6e 64 | 2d 63 6f 6d 70 69 6c 65 |eval-and|-compile|
|00001cc0| 20 6c 61 6d 62 64 61 20 | 28 26 72 65 73 74 20 62 | lambda |(&rest b|
|00001cd0| 6f 64 79 29 20 28 65 76 | 61 6c 20 28 63 6f 6e 73 |ody) (ev|al (cons|
|00001ce0| 20 27 70 72 6f 67 6e 20 | 62 6f 64 79 29 29 20 28 | 'progn |body)) (|
|00001cf0| 63 6f 6e 73 20 27 70 72 | 6f 67 6e 20 62 6f 64 79 |cons 'pr|ogn body|
|00001d00| 29 29 29 29 20 22 5c 0a | 54 68 65 20 64 65 66 61 |)))) "\.|The defa|
|00001d10| 75 6c 74 20 6d 61 63 72 | 6f 2d 65 6e 76 69 72 6f |ult macr|o-enviro|
|00001d20| 6e 6d 65 6e 74 20 70 61 | 73 73 65 64 20 74 6f 20 |nment pa|ssed to |
|00001d30| 6d 61 63 72 6f 65 78 70 | 61 6e 64 20 62 79 20 74 |macroexp|and by t|
|00001d40| 68 65 20 63 6f 6d 70 69 | 6c 65 72 2e 0a 50 6c 61 |he compi|ler..Pla|
|00001d50| 63 69 6e 67 20 61 20 6d | 61 63 72 6f 20 68 65 72 |cing a m|acro her|
|00001d60| 65 20 77 69 6c 6c 20 63 | 61 75 73 65 20 61 20 6d |e will c|ause a m|
|00001d70| 61 63 72 6f 20 74 6f 20 | 68 61 76 65 20 64 69 66 |acro to |have dif|
|00001d80| 66 65 72 65 6e 74 20 73 | 65 6d 61 6e 74 69 63 73 |ferent s|emantics|
|00001d90| 20 77 68 65 6e 0a 65 78 | 70 61 6e 64 65 64 20 62 | when.ex|panded b|
|00001da0| 79 20 74 68 65 20 63 6f | 6d 70 69 6c 65 72 20 61 |y the co|mpiler a|
|00001db0| 73 20 77 68 65 6e 20 65 | 78 70 61 6e 64 65 64 20 |s when e|xpanded |
|00001dc0| 62 79 20 74 68 65 20 69 | 6e 74 65 72 70 72 65 74 |by the i|nterpret|
|00001dd0| 65 72 2e 22 29 0a 28 64 | 65 66 76 61 72 20 62 79 |er.").(d|efvar by|
|00001de0| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 6d 61 63 72 6f |te-compi|le-macro|
|00001df0| 2d 65 6e 76 69 72 6f 6e | 6d 65 6e 74 20 62 79 74 |-environ|ment byt|
|00001e00| 65 2d 63 6f 6d 70 69 6c | 65 2d 69 6e 69 74 69 61 |e-compil|e-initia|
|00001e10| 6c 2d 6d 61 63 72 6f 2d | 65 6e 76 69 72 6f 6e 6d |l-macro-|environm|
|00001e20| 65 6e 74 20 22 5c 0a 41 | 6c 69 73 74 20 6f 66 20 |ent "\.A|list of |
|00001e30| 6d 61 63 72 6f 73 20 64 | 65 66 69 6e 65 64 20 69 |macros d|efined i|
|00001e40| 6e 20 74 68 65 20 66 69 | 6c 65 20 62 65 69 6e 67 |n the fi|le being|
|00001e50| 20 63 6f 6d 70 69 6c 65 | 64 2e 0a 45 61 63 68 20 | compile|d..Each |
|00001e60| 65 6c 65 6d 65 6e 74 20 | 6c 6f 6f 6b 73 20 6c 69 |element |looks li|
|00001e70| 6b 65 20 28 4d 41 43 52 | 4f 4e 41 4d 45 20 2e 20 |ke (MACR|ONAME . |
|00001e80| 44 45 46 49 4e 49 54 49 | 4f 4e 29 2e 20 20 49 74 |DEFINITI|ON). It|
|00001e90| 20 69 73 0a 28 4d 41 43 | 52 4f 4e 41 4d 45 20 2e | is.(MAC|RONAME .|
|00001ea0| 20 6e 69 6c 29 20 77 68 | 65 6e 20 61 20 6d 61 63 | nil) wh|en a mac|
|00001eb0| 72 6f 20 69 73 20 72 65 | 64 65 66 69 6e 65 64 20 |ro is re|defined |
|00001ec0| 61 73 20 61 20 66 75 6e | 63 74 69 6f 6e 2e 22 29 |as a fun|ction.")|
|00001ed0| 0a 28 64 65 66 76 61 72 | 20 62 79 74 65 2d 63 6f |.(defvar| byte-co|
|00001ee0| 6d 70 69 6c 65 2d 66 75 | 6e 63 74 69 6f 6e 2d 65 |mpile-fu|nction-e|
|00001ef0| 6e 76 69 72 6f 6e 6d 65 | 6e 74 20 6e 69 6c 20 22 |nvironme|nt nil "|
|00001f00| 5c 0a 41 6c 69 73 74 20 | 6f 66 20 66 75 6e 63 74 |\.Alist |of funct|
|00001f10| 69 6f 6e 73 20 64 65 66 | 69 6e 65 64 20 69 6e 20 |ions def|ined in |
|00001f20| 74 68 65 20 66 69 6c 65 | 20 62 65 69 6e 67 20 63 |the file| being c|
|00001f30| 6f 6d 70 69 6c 65 64 2e | 0a 54 68 69 73 20 69 73 |ompiled.|.This is|
|00001f40| 20 73 6f 20 77 65 20 63 | 61 6e 20 69 6e 6c 69 6e | so we c|an inlin|
|00001f50| 65 20 74 68 65 6d 20 77 | 68 65 6e 20 6e 65 63 65 |e them w|hen nece|
|00001f60| 73 73 61 72 79 2e 0a 45 | 61 63 68 20 65 6c 65 6d |ssary..E|ach elem|
|00001f70| 65 6e 74 20 6c 6f 6f 6b | 73 20 6c 69 6b 65 20 28 |ent look|s like (|
|00001f80| 46 55 4e 43 54 49 4f 4e | 4e 41 4d 45 20 2e 20 44 |FUNCTION|NAME . D|
|00001f90| 45 46 49 4e 49 54 49 4f | 4e 29 2e 20 20 49 74 20 |EFINITIO|N). It |
|00001fa0| 69 73 0a 28 46 55 4e 43 | 54 49 4f 4e 4e 41 4d 45 |is.(FUNC|TIONNAME|
|00001fb0| 20 2e 20 6e 69 6c 29 20 | 77 68 65 6e 20 61 20 66 | . nil) |when a f|
|00001fc0| 75 6e 63 74 69 6f 6e 20 | 69 73 20 72 65 64 65 66 |unction |is redef|
|00001fd0| 69 6e 65 64 20 61 73 20 | 61 20 6d 61 63 72 6f 2e |ined as |a macro.|
|00001fe0| 22 29 0a 28 64 65 66 76 | 61 72 20 62 79 74 65 2d |").(defv|ar byte-|
|00001ff0| 63 6f 6d 70 69 6c 65 2d | 61 75 74 6f 6c 6f 61 64 |compile-|autoload|
|00002000| 2d 65 6e 76 69 72 6f 6e | 6d 65 6e 74 20 6e 69 6c |-environ|ment nil|
|00002010| 20 22 5c 0a 41 6c 69 73 | 74 20 6f 66 20 66 75 6e | "\.Alis|t of fun|
|00002020| 63 74 69 6f 6e 73 20 61 | 6e 64 20 6d 61 63 72 6f |ctions a|nd macro|
|00002030| 73 20 64 65 66 69 6e 65 | 64 20 62 79 20 61 75 74 |s define|d by aut|
|00002040| 6f 6c 6f 61 64 20 69 6e | 20 74 68 65 20 66 69 6c |oload in| the fil|
|00002050| 65 20 62 65 69 6e 67 20 | 63 6f 6d 70 69 6c 65 64 |e being |compiled|
|00002060| 2e 0a 54 68 69 73 20 69 | 73 20 73 6f 20 77 65 20 |..This i|s so we |
|00002070| 63 61 6e 20 73 75 70 70 | 72 65 73 73 20 77 61 72 |can supp|ress war|
|00002080| 6e 69 6e 67 73 20 61 62 | 6f 75 74 20 63 61 6c 6c |nings ab|out call|
|00002090| 73 20 74 6f 20 74 68 65 | 73 65 20 66 75 6e 63 74 |s to the|se funct|
|000020a0| 69 6f 6e 73 2c 20 65 76 | 65 6e 20 74 68 6f 75 67 |ions, ev|en thoug|
|000020b0| 68 0a 74 68 65 79 20 64 | 6f 20 6e 6f 74 20 68 61 |h.they d|o not ha|
|000020c0| 76 65 20 60 72 65 61 6c | 27 20 64 65 66 69 6e 69 |ve `real|' defini|
|000020d0| 74 69 6f 6e 73 2e 0a 45 | 61 63 68 20 65 6c 65 6d |tions..E|ach elem|
|000020e0| 65 6e 74 20 6c 6f 6f 6b | 73 20 6c 69 6b 65 20 28 |ent look|s like (|
|000020f0| 46 55 4e 43 54 49 4f 4e | 4e 41 4d 45 20 2e 20 43 |FUNCTION|NAME . C|
|00002100| 41 4c 4c 2d 54 4f 2d 41 | 55 54 4f 4c 4f 41 44 29 |ALL-TO-A|UTOLOAD)|
|00002110| 2e 22 29 0a 28 64 65 66 | 76 61 72 20 62 79 74 65 |.").(def|var byte|
|00002120| 2d 63 6f 6d 70 69 6c 65 | 2d 75 6e 72 65 73 6f 6c |-compile|-unresol|
|00002130| 76 65 64 2d 66 75 6e 63 | 74 69 6f 6e 73 20 6e 69 |ved-func|tions ni|
|00002140| 6c 20 22 5c 0a 41 6c 69 | 73 74 20 6f 66 20 75 6e |l "\.Ali|st of un|
|00002150| 64 65 66 69 6e 65 64 20 | 66 75 6e 63 74 69 6f 6e |defined |function|
|00002160| 73 20 74 6f 20 77 68 69 | 63 68 20 63 61 6c 6c 73 |s to whi|ch calls|
|00002170| 20 68 61 76 65 20 62 65 | 65 6e 20 63 6f 6d 70 69 | have be|en compi|
|00002180| 6c 65 64 20 28 75 73 65 | 64 20 66 6f 72 0a 77 61 |led (use|d for.wa|
|00002190| 72 6e 69 6e 67 73 20 77 | 68 65 6e 20 74 68 65 20 |rnings w|hen the |
|000021a0| 66 75 6e 63 74 69 6f 6e | 20 69 73 20 6c 61 74 65 |function| is late|
|000021b0| 72 20 64 65 66 69 6e 65 | 64 20 77 69 74 68 20 69 |r define|d with i|
|000021c0| 6e 63 6f 72 72 65 63 74 | 20 61 72 67 73 29 2e 22 |ncorrect| args)."|
|000021d0| 29 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 c1 |).(byte-|code "..|
|000021e0| 21 ac 82 c2 11 c0 87 22 | 20 5b 62 6f 75 6e 64 70 |!......"| [boundp|
|000021f0| 20 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 74 61 | byte-co|mpile-ta|
|00002200| 67 2d 6e 75 6d 62 65 72 | 20 30 5d 20 32 29 0a 28 |g-number| 0] 2).(|
|00002210| 64 65 66 76 61 72 20 62 | 79 74 65 2d 63 6f 6d 70 |defvar b|yte-comp|
|00002220| 69 6c 65 2d 6f 75 74 70 | 75 74 20 6e 69 6c 20 22 |ile-outp|ut nil "|
|00002230| 5c 0a 41 6c 69 73 74 20 | 64 65 73 63 72 69 62 69 |\.Alist |describi|
|00002240| 6e 67 20 63 6f 6e 74 65 | 6e 74 73 20 74 6f 20 70 |ng conte|nts to p|
|00002250| 75 74 20 69 6e 20 62 79 | 74 65 20 63 6f 64 65 20 |ut in by|te code |
|00002260| 73 74 72 69 6e 67 2e 0a | 45 61 63 68 20 65 6c 65 |string..|Each ele|
|00002270| 6d 65 6e 74 20 69 73 20 | 28 49 4e 44 45 58 20 2e |ment is |(INDEX .|
|00002280| 20 56 41 4c 55 45 29 22 | 29 0a 28 64 65 66 76 61 | VALUE)"|).(defva|
|00002290| 72 20 62 79 74 65 2d 63 | 6f 6d 70 69 6c 65 2d 64 |r byte-c|ompile-d|
|000022a0| 65 70 74 68 20 30 20 22 | 5c 0a 43 75 72 72 65 6e |epth 0 "|\.Curren|
|000022b0| 74 20 64 65 70 74 68 20 | 6f 66 20 65 78 65 63 75 |t depth |of execu|
|000022c0| 74 69 6f 6e 20 73 74 61 | 63 6b 2e 22 29 0a 28 64 |tion sta|ck.").(d|
|000022d0| 65 66 76 61 72 20 62 79 | 74 65 2d 63 6f 6d 70 69 |efvar by|te-compi|
|000022e0| 6c 65 2d 6d 61 78 64 65 | 70 74 68 20 30 20 22 5c |le-maxde|pth 0 "\|
|000022f0| 0a 4d 61 78 69 6d 75 6d | 20 64 65 70 74 68 20 6f |.Maximum| depth o|
|00002300| 66 20 65 78 65 63 75 74 | 69 6f 6e 20 73 74 61 63 |f execut|ion stac|
|00002310| 6b 2e 22 29 0a 28 64 65 | 66 63 6f 6e 73 74 20 62 |k.").(de|fconst b|
|00002320| 79 74 65 2d 63 6f 64 65 | 2d 76 65 63 74 6f 72 20 |yte-code|-vector |
|00002330| 6e 69 6c 20 22 5c 0a 41 | 6e 20 61 72 72 61 79 20 |nil "\.A|n array |
|00002340| 63 6f 6e 74 61 69 6e 69 | 6e 67 20 62 79 74 65 2d |containi|ng byte-|
|00002350| 63 6f 64 65 20 6e 61 6d | 65 73 20 69 6e 64 65 78 |code nam|es index|
|00002360| 65 64 20 62 79 20 62 79 | 74 65 2d 63 6f 64 65 20 |ed by by|te-code |
|00002370| 76 61 6c 75 65 73 2e 22 | 29 0a 28 64 65 66 63 6f |values."|).(defco|
|00002380| 6e 73 74 20 62 79 74 65 | 2d 73 74 61 63 6b 2b 2d |nst byte|-stack+-|
|00002390| 69 6e 66 6f 20 6e 69 6c | 20 22 5c 0a 41 6e 20 61 |info nil| "\.An a|
|000023a0| 72 72 61 79 20 77 69 74 | 68 20 74 68 65 20 73 74 |rray wit|h the st|
|000023b0| 61 63 6b 20 61 64 6a 75 | 73 74 6d 65 6e 74 20 66 |ack adju|stment f|
|000023c0| 6f 72 20 65 61 63 68 20 | 62 79 74 65 2d 63 6f 64 |or each |byte-cod|
|000023d0| 65 2e 22 29 0a 28 62 79 | 74 65 2d 63 6f 64 65 20 |e.").(by|te-code |
|000023e0| 22 c0 c1 4d 88 c2 c3 4d | 87 22 20 5b 62 79 74 65 |"..M...M|." [byte|
|000023f0| 2d 64 65 66 6f 70 20 28 | 6d 61 63 72 6f 20 2e 20 |-defop (|macro . |
|00002400| 23 5b 28 6f 70 63 6f 64 | 65 20 73 74 61 63 6b 2d |#[(opcod|e stack-|
|00002410| 61 64 6a 75 73 74 20 6f | 70 6e 61 6d 65 20 26 6f |adjust o|pname &o|
|00002420| 70 74 69 6f 6e 61 6c 20 | 64 6f 63 73 74 72 69 6e |ptional |docstrin|
|00002430| 67 29 20 22 c0 c1 4e ae | 88 c2 c0 c1 c3 c4 c5 5c |g) "..N.|.......\|
|00002440| 22 23 c6 c1 4e ae 88 c2 | c6 c1 c3 c4 c5 5c 22 23 |"#..N...|.....\"#|
|00002450| 1e 07 89 1e 08 0e 09 0e | 5c 6e 49 88 0e 07 0e 09 |........|\nI.....|
|00002460| 0e 0b 49 88 2a 0e 0c ab | 8c cd 0e 5c 6e 0e 09 ce |..I.*...|...\n...|
|00002470| 0e 0c cf 51 46 87 cd 0e | 5c 6e 0e 09 45 87 22 20 |...QF...|\n..E." |
|00002480| 5b 62 79 74 65 2d 63 6f | 64 65 2d 76 65 63 74 6f |[byte-co|de-vecto|
|00002490| 72 20 74 6d 70 2d 63 6f | 6d 70 69 6c 65 2d 74 69 |r tmp-co|mpile-ti|
|000024a0| 6d 65 2d 76 61 6c 75 65 | 20 70 75 74 20 6d 61 6b |me-value| put mak|
|000024b0| 65 2d 76 65 63 74 6f 72 | 20 32 35 36 20 6e 69 6c |e-vector| 256 nil|
|000024c0| 20 62 79 74 65 2d 73 74 | 61 63 6b 2b 2d 69 6e 66 | byte-st|ack+-inf|
|000024d0| 6f 20 76 32 20 76 31 20 | 6f 70 63 6f 64 65 20 6f |o v2 v1 |opcode o|
|000024e0| 70 6e 61 6d 65 20 73 74 | 61 63 6b 2d 61 64 6a 75 |pname st|ack-adju|
|000024f0| 73 74 20 64 6f 63 73 74 | 72 69 6e 67 20 64 65 66 |st docst|ring def|
|00002500| 63 6f 6e 73 74 20 22 42 | 79 74 65 20 63 6f 64 65 |const "B|yte code|
|00002510| 20 6f 70 63 6f 64 65 20 | 22 20 22 2e 22 5d 20 38 | opcode |" "."] 8|
|00002520| 5d 29 20 62 79 74 65 2d | 65 78 74 72 75 64 65 2d |]) byte-|extrude-|
|00002530| 62 79 74 65 2d 63 6f 64 | 65 2d 76 65 63 74 6f 72 |byte-cod|e-vector|
|00002540| 73 20 28 6d 61 63 72 6f | 20 2e 20 23 5b 6e 69 6c |s (macro| . #[nil|
|00002550| 20 22 c0 c1 89 c2 4e c3 | 89 c2 4e af 05 c4 c1 c2 | "....N.|..N.....|
|00002560| c5 23 88 c4 c3 c2 c5 23 | 88 87 22 20 5b 73 65 74 |.#.....#|.." [set|
|00002570| 71 20 62 79 74 65 2d 63 | 6f 64 65 2d 76 65 63 74 |q byte-c|ode-vect|
|00002580| 6f 72 20 74 6d 70 2d 63 | 6f 6d 70 69 6c 65 2d 74 |or tmp-c|ompile-t|
|00002590| 69 6d 65 2d 76 61 6c 75 | 65 20 62 79 74 65 2d 73 |ime-valu|e byte-s|
|000025a0| 74 61 63 6b 2b 2d 69 6e | 66 6f 20 70 75 74 20 6e |tack+-in|fo put n|
|000025b0| 69 6c 5d 20 36 5d 29 5d | 20 32 29 0a 28 64 65 66 |il] 6])]| 2).(def|
|000025c0| 63 6f 6e 73 74 20 62 79 | 74 65 2d 76 61 72 72 65 |const by|te-varre|
|000025d0| 66 20 38 20 22 5c 0a 42 | 79 74 65 20 63 6f 64 65 |f 8 "\.B|yte code|
|000025e0| 20 6f 70 63 6f 64 65 20 | 66 6f 72 20 76 61 72 69 | opcode |for vari|
|000025f0| 61 62 6c 65 20 72 65 66 | 65 72 65 6e 63 65 2e 22 |able ref|erence."|
|00002600| 29 0a 28 64 65 66 63 6f | 6e 73 74 20 62 79 74 65 |).(defco|nst byte|
|00002610| 2d 76 61 72 73 65 74 20 | 31 36 20 22 5c 0a 42 79 |-varset |16 "\.By|
|00002620| 74 65 20 63 6f 64 65 20 | 6f 70 63 6f 64 65 20 66 |te code |opcode f|
|00002630| 6f 72 20 73 65 74 74 69 | 6e 67 20 61 20 76 61 72 |or setti|ng a var|
|00002640| 69 61 62 6c 65 2e 22 29 | 0a 28 64 65 66 63 6f 6e |iable.")|.(defcon|
|00002650| 73 74 20 62 79 74 65 2d | 76 61 72 62 69 6e 64 20 |st byte-|varbind |
|00002660| 32 34 20 22 5c 0a 42 79 | 74 65 20 63 6f 64 65 20 |24 "\.By|te code |
|00002670| 6f 70 63 6f 64 65 20 66 | 6f 72 20 62 69 6e 64 69 |opcode f|or bindi|
|00002680| 6e 67 20 61 20 76 61 72 | 69 61 62 6c 65 2e 22 29 |ng a var|iable.")|
|00002690| 0a 28 64 65 66 63 6f 6e | 73 74 20 62 79 74 65 2d |.(defcon|st byte-|
|000026a0| 63 61 6c 6c 20 33 32 20 | 22 5c 0a 42 79 74 65 20 |call 32 |"\.Byte |
|000026b0| 63 6f 64 65 20 6f 70 63 | 6f 64 65 20 66 6f 72 20 |code opc|ode for |
|000026c0| 63 61 6c 6c 69 6e 67 20 | 61 20 66 75 6e 63 74 69 |calling |a functi|
|000026d0| 6f 6e 2e 22 29 0a 28 64 | 65 66 63 6f 6e 73 74 20 |on.").(d|efconst |
|000026e0| 62 79 74 65 2d 75 6e 62 | 69 6e 64 20 34 30 20 22 |byte-unb|ind 40 "|
|000026f0| 5c 0a 42 79 74 65 20 63 | 6f 64 65 20 6f 70 63 6f |\.Byte c|ode opco|
|00002700| 64 65 20 66 6f 72 20 75 | 6e 62 69 6e 64 69 6e 67 |de for u|nbinding|
|00002710| 20 73 70 65 63 69 61 6c | 20 62 69 6e 64 69 6e 67 | special| binding|
|00002720| 73 2e 22 29 0a 28 62 79 | 74 65 2d 63 6f 64 65 20 |s.").(by|te-code |
|00002730| 22 c0 11 c2 13 c4 15 c6 | 16 07 c8 16 09 ca 16 0b |".......|........|
|00002740| cc 16 0d ce 16 0f d0 16 | 11 d2 16 13 d4 16 15 d6 |........|........|
|00002750| 16 17 d8 16 19 da 16 1b | dc 16 1d de 16 1f e0 16 |........|........|
|00002760| 21 e2 16 23 e4 16 25 e6 | 16 27 e8 16 29 ea 16 2b |!..#..%.|.'..)..+|
|00002770| ec 16 2d ee 16 2f f0 16 | 31 f2 16 33 f4 16 35 f6 |..-../..|1..3..5.|
|00002780| 16 37 f8 16 39 fa 16 3b | fc 16 3d fe 16 3f 81 40 |.7..9..;|..=..?.@|
|00002790| 00 16 41 81 42 00 16 43 | 81 44 00 16 45 81 46 00 |..A.B..C|.D..E.F.|
|000027a0| 16 47 81 48 00 16 49 81 | 4a 00 16 4b 81 4c 00 16 |.G.H..I.|J..K.L..|
|000027b0| 4d 81 4e 00 16 4f 81 50 | 00 16 51 81 52 00 16 53 |M.N..O.P|..Q.R..S|
|000027c0| 81 54 00 16 55 81 56 00 | 16 57 81 58 00 16 59 81 |.T..U.V.|.W.X..Y.|
|000027d0| 5a 00 16 5b 81 5c 5c 00 | 16 5d 81 5e 00 16 5f 81 |Z..[.\\.|.].^.._.|
|000027e0| 60 00 16 61 81 62 00 16 | 63 81 64 00 16 65 81 66 |`..a.b..|c.d..e.f|
|000027f0| 00 16 67 81 68 00 16 69 | 81 6a 00 16 6b 81 6c 00 |..g.h..i|.j..k.l.|
|00002800| 16 6d 81 6e 00 16 6f 81 | 70 00 16 71 81 72 00 16 |.m.n..o.|p..q.r..|
|00002810| 73 81 74 00 16 75 81 76 | 00 16 77 81 78 00 16 79 |s.t..u.v|..w.x..y|
|00002820| 81 7a 00 16 7b 81 7c 00 | 16 7d 81 7e 00 16 7f 81 |.z..{.|.|.}.~....|
|00002830| 80 00 16 81 81 82 00 16 | 83 81 84 00 16 85 81 86 |........|........|
|00002840| 00 16 87 81 88 00 16 89 | 81 8a 00 16 8b 81 8c 00 |........|........|
|00002850| 16 8d 81 8e 00 16 8f c0 | 87 22 20 5b 35 36 20 62 |........|." [56 b|
|00002860| 79 74 65 2d 6e 74 68 20 | 35 37 20 62 79 74 65 2d |yte-nth |57 byte-|
|00002870| 73 79 6d 62 6f 6c 70 20 | 35 38 20 62 79 74 65 2d |symbolp |58 byte-|
|00002880| 63 6f 6e 73 70 20 35 39 | 20 62 79 74 65 2d 73 74 |consp 59| byte-st|
|00002890| 72 69 6e 67 70 20 36 30 | 20 62 79 74 65 2d 6c 69 |ringp 60| byte-li|
|000028a0| 73 74 70 20 36 31 20 62 | 79 74 65 2d 65 71 20 36 |stp 61 b|yte-eq 6|
|000028b0| 32 20 62 79 74 65 2d 6d | 65 6d 71 20 36 33 20 62 |2 byte-m|emq 63 b|
|000028c0| 79 74 65 2d 6e 6f 74 20 | 36 34 20 62 79 74 65 2d |yte-not |64 byte-|
|000028d0| 63 61 72 20 36 35 20 62 | 79 74 65 2d 63 64 72 20 |car 65 b|yte-cdr |
|000028e0| 36 36 20 62 79 74 65 2d | 63 6f 6e 73 20 36 37 20 |66 byte-|cons 67 |
|000028f0| 62 79 74 65 2d 6c 69 73 | 74 31 20 36 38 20 62 79 |byte-lis|t1 68 by|
|00002900| 74 65 2d 6c 69 73 74 32 | 20 36 39 20 62 79 74 65 |te-list2| 69 byte|
|00002910| 2d 6c 69 73 74 33 20 37 | 30 20 62 79 74 65 2d 6c |-list3 7|0 byte-l|
|00002920| 69 73 74 34 20 37 31 20 | 62 79 74 65 2d 6c 65 6e |ist4 71 |byte-len|
|00002930| 67 74 68 20 37 32 20 62 | 79 74 65 2d 61 72 65 66 |gth 72 b|yte-aref|
|00002940| 20 37 33 20 62 79 74 65 | 2d 61 73 65 74 20 37 34 | 73 byte|-aset 74|
|00002950| 20 62 79 74 65 2d 73 79 | 6d 62 6f 6c 2d 76 61 6c | byte-sy|mbol-val|
|00002960| 75 65 20 37 35 20 62 79 | 74 65 2d 73 79 6d 62 6f |ue 75 by|te-symbo|
|00002970| 6c 2d 66 75 6e 63 74 69 | 6f 6e 20 37 36 20 62 79 |l-functi|on 76 by|
|00002980| 74 65 2d 73 65 74 20 37 | 37 20 62 79 74 65 2d 66 |te-set 7|7 byte-f|
|00002990| 73 65 74 20 37 38 20 62 | 79 74 65 2d 67 65 74 20 |set 78 b|yte-get |
|000029a0| 37 39 20 62 79 74 65 2d | 73 75 62 73 74 72 69 6e |79 byte-|substrin|
|000029b0| 67 20 38 30 20 62 79 74 | 65 2d 63 6f 6e 63 61 74 |g 80 byt|e-concat|
|000029c0| 32 20 38 31 20 62 79 74 | 65 2d 63 6f 6e 63 61 74 |2 81 byt|e-concat|
|000029d0| 33 20 38 32 20 62 79 74 | 65 2d 63 6f 6e 63 61 74 |3 82 byt|e-concat|
|000029e0| 34 20 38 33 20 62 79 74 | 65 2d 73 75 62 31 20 38 |4 83 byt|e-sub1 8|
|000029f0| 34 20 62 79 74 65 2d 61 | 64 64 31 20 38 35 20 62 |4 byte-a|dd1 85 b|
|00002a00| 79 74 65 2d 65 71 6c 73 | 69 67 6e 20 38 36 20 62 |yte-eqls|ign 86 b|
|00002a10| 79 74 65 2d 67 74 72 20 | 38 37 20 62 79 74 65 2d |yte-gtr |87 byte-|
|00002a20| 6c 73 73 20 38 38 20 62 | 79 74 65 2d 6c 65 71 20 |lss 88 b|yte-leq |
|00002a30| 38 39 20 62 79 74 65 2d | 67 65 71 20 39 30 20 62 |89 byte-|geq 90 b|
|00002a40| 79 74 65 2d 64 69 66 66 | 20 39 31 20 62 79 74 65 |yte-diff| 91 byte|
|00002a50| 2d 6e 65 67 61 74 65 20 | 39 32 20 62 79 74 65 2d |-negate |92 byte-|
|00002a60| 70 6c 75 73 20 39 33 20 | 62 79 74 65 2d 6d 61 78 |plus 93 |byte-max|
|00002a70| 20 39 34 20 62 79 74 65 | 2d 6d 69 6e 20 39 35 20 | 94 byte|-min 95 |
|00002a80| 62 79 74 65 2d 6d 75 6c | 74 20 39 36 20 62 79 74 |byte-mul|t 96 byt|
|00002a90| 65 2d 70 6f 69 6e 74 20 | 39 37 20 62 79 74 65 2d |e-point |97 byte-|
|00002aa0| 6d 61 72 6b 2d 4f 42 53 | 4f 4c 45 54 45 20 39 38 |mark-OBS|OLETE 98|
|00002ab0| 20 62 79 74 65 2d 67 6f | 74 6f 2d 63 68 61 72 20 | byte-go|to-char |
|00002ac0| 39 39 20 62 79 74 65 2d | 69 6e 73 65 72 74 20 31 |99 byte-|insert 1|
|00002ad0| 30 30 20 62 79 74 65 2d | 70 6f 69 6e 74 2d 6d 61 |00 byte-|point-ma|
|00002ae0| 78 20 31 30 31 20 62 79 | 74 65 2d 70 6f 69 6e 74 |x 101 by|te-point|
|00002af0| 2d 6d 69 6e 20 31 30 32 | 20 62 79 74 65 2d 63 68 |-min 102| byte-ch|
|00002b00| 61 72 2d 61 66 74 65 72 | 20 31 30 33 20 62 79 74 |ar-after| 103 byt|
|00002b10| 65 2d 66 6f 6c 6c 6f 77 | 69 6e 67 2d 63 68 61 72 |e-follow|ing-char|
|00002b20| 20 31 30 34 20 62 79 74 | 65 2d 70 72 65 63 65 64 | 104 byt|e-preced|
|00002b30| 69 6e 67 2d 63 68 61 72 | 20 31 30 35 20 62 79 74 |ing-char| 105 byt|
|00002b40| 65 2d 63 75 72 72 65 6e | 74 2d 63 6f 6c 75 6d 6e |e-curren|t-column|
|00002b50| 20 31 30 36 20 62 79 74 | 65 2d 69 6e 64 65 6e 74 | 106 byt|e-indent|
|00002b60| 2d 74 6f 20 31 30 37 20 | 62 79 74 65 2d 73 63 61 |-to 107 |byte-sca|
|00002b70| 6e 2d 62 75 66 66 65 72 | 2d 4f 42 53 4f 4c 45 54 |n-buffer|-OBSOLET|
|00002b80| 45 20 31 30 38 20 62 79 | 74 65 2d 65 6f 6c 70 20 |E 108 by|te-eolp |
|00002b90| 31 30 39 20 62 79 74 65 | 2d 65 6f 62 70 20 31 31 |109 byte|-eobp 11|
|00002ba0| 30 20 62 79 74 65 2d 62 | 6f 6c 70 20 31 31 31 20 |0 byte-b|olp 111 |
|00002bb0| 62 79 74 65 2d 62 6f 62 | 70 20 31 31 32 20 62 79 |byte-bob|p 112 by|
|00002bc0| 74 65 2d 63 75 72 72 65 | 6e 74 2d 62 75 66 66 65 |te-curre|nt-buffe|
|00002bd0| 72 20 31 31 33 20 62 79 | 74 65 2d 73 65 74 2d 62 |r 113 by|te-set-b|
|00002be0| 75 66 66 65 72 20 31 31 | 34 20 62 79 74 65 2d 72 |uffer 11|4 byte-r|
|00002bf0| 65 61 64 2d 63 68 61 72 | 2d 4f 42 53 4f 4c 45 54 |ead-char|-OBSOLET|
|00002c00| 45 20 31 31 35 20 62 79 | 74 65 2d 73 65 74 2d 6d |E 115 by|te-set-m|
|00002c10| 61 72 6b 2d 4f 42 53 4f | 4c 45 54 45 20 31 31 36 |ark-OBSO|LETE 116|
|00002c20| 20 62 79 74 65 2d 69 6e | 74 65 72 61 63 74 69 76 | byte-in|teractiv|
|00002c30| 65 2d 70 20 31 31 37 20 | 62 79 74 65 2d 66 6f 72 |e-p 117 |byte-for|
|00002c40| 77 61 72 64 2d 63 68 61 | 72 20 31 31 38 20 62 79 |ward-cha|r 118 by|
|00002c50| 74 65 2d 66 6f 72 77 61 | 72 64 2d 77 6f 72 64 20 |te-forwa|rd-word |
|00002c60| 31 31 39 20 62 79 74 65 | 2d 73 6b 69 70 2d 63 68 |119 byte|-skip-ch|
|00002c70| 61 72 73 2d 66 6f 72 77 | 61 72 64 20 31 32 30 20 |ars-forw|ard 120 |
|00002c80| 62 79 74 65 2d 73 6b 69 | 70 2d 63 68 61 72 73 2d |byte-ski|p-chars-|
|00002c90| 62 61 63 6b 77 61 72 64 | 20 31 32 31 20 62 79 74 |backward| 121 byt|
|00002ca0| 65 2d 66 6f 72 77 61 72 | 64 2d 6c 69 6e 65 20 31 |e-forwar|d-line 1|
|00002cb0| 32 32 20 62 79 74 65 2d | 63 68 61 72 2d 73 79 6e |22 byte-|char-syn|
|00002cc0| 74 61 78 20 31 32 33 20 | 62 79 74 65 2d 62 75 66 |tax 123 |byte-buf|
|00002cd0| 66 65 72 2d 73 75 62 73 | 74 72 69 6e 67 20 31 32 |fer-subs|tring 12|
|00002ce0| 34 20 62 79 74 65 2d 64 | 65 6c 65 74 65 2d 72 65 |4 byte-d|elete-re|
|00002cf0| 67 69 6f 6e 20 31 32 35 | 20 62 79 74 65 2d 6e 61 |gion 125| byte-na|
|00002d00| 72 72 6f 77 2d 74 6f 2d | 72 65 67 69 6f 6e 20 31 |rrow-to-|region 1|
|00002d10| 32 36 20 62 79 74 65 2d | 77 69 64 65 6e 20 31 32 |26 byte-|widen 12|
|00002d20| 37 20 62 79 74 65 2d 65 | 6e 64 2d 6f 66 2d 6c 69 |7 byte-e|nd-of-li|
|00002d30| 6e 65 5d 20 31 29 0a 28 | 64 65 66 63 6f 6e 73 74 |ne] 1).(|defconst|
|00002d40| 20 62 79 74 65 2d 63 6f | 6e 73 74 61 6e 74 32 20 | byte-co|nstant2 |
|00002d50| 31 32 39 20 22 5c 0a 42 | 79 74 65 20 63 6f 64 65 |129 "\.B|yte code|
|00002d60| 20 6f 70 63 6f 64 65 20 | 66 6f 72 20 72 65 66 65 | opcode |for refe|
|00002d70| 72 65 6e 63 65 20 74 6f | 20 61 20 63 6f 6e 73 74 |rence to| a const|
|00002d80| 61 6e 74 20 77 69 74 68 | 20 76 65 63 74 6f 72 20 |ant with| vector |
|00002d90| 69 6e 64 65 78 20 3e 3d | 20 62 79 74 65 2d 63 6f |index >=| byte-co|
|00002da0| 6e 73 74 61 6e 74 2d 6c | 69 6d 69 74 2e 22 29 0a |nstant-l|imit.").|
|00002db0| 28 64 65 66 63 6f 6e 73 | 74 20 62 79 74 65 2d 67 |(defcons|t byte-g|
|00002dc0| 6f 74 6f 20 31 33 30 20 | 22 5c 0a 42 79 74 65 20 |oto 130 |"\.Byte |
|00002dd0| 63 6f 64 65 20 6f 70 63 | 6f 64 65 20 66 6f 72 20 |code opc|ode for |
|00002de0| 75 6e 63 6f 6e 64 69 74 | 69 6f 6e 61 6c 20 6a 75 |uncondit|ional ju|
|00002df0| 6d 70 2e 22 29 0a 28 64 | 65 66 63 6f 6e 73 74 20 |mp.").(d|efconst |
|00002e00| 62 79 74 65 2d 67 6f 74 | 6f 2d 69 66 2d 6e 69 6c |byte-got|o-if-nil|
|00002e10| 20 31 33 31 20 22 5c 0a | 42 79 74 65 20 63 6f 64 | 131 "\.|Byte cod|
|00002e20| 65 20 6f 70 63 6f 64 65 | 20 74 6f 20 70 6f 70 20 |e opcode| to pop |
|00002e30| 76 61 6c 75 65 20 61 6e | 64 20 6a 75 6d 70 20 69 |value an|d jump i|
|00002e40| 66 20 69 74 27 73 20 6e | 69 6c 2e 22 29 0a 28 64 |f it's n|il.").(d|
|00002e50| 65 66 63 6f 6e 73 74 20 | 62 79 74 65 2d 67 6f 74 |efconst |byte-got|
|00002e60| 6f 2d 69 66 2d 6e 6f 74 | 2d 6e 69 6c 20 31 33 32 |o-if-not|-nil 132|
|00002e70| 20 22 5c 0a 42 79 74 65 | 20 63 6f 64 65 20 6f 70 | "\.Byte| code op|
|00002e80| 63 6f 64 65 20 74 6f 20 | 70 6f 70 20 76 61 6c 75 |code to |pop valu|
|00002e90| 65 20 61 6e 64 20 6a 75 | 6d 70 20 69 66 20 69 74 |e and ju|mp if it|
|00002ea0| 27 73 20 6e 6f 74 20 6e | 69 6c 2e 22 29 0a 28 64 |'s not n|il.").(d|
|00002eb0| 65 66 63 6f 6e 73 74 20 | 62 79 74 65 2d 67 6f 74 |efconst |byte-got|
|00002ec0| 6f 2d 69 66 2d 6e 69 6c | 2d 65 6c 73 65 2d 70 6f |o-if-nil|-else-po|
|00002ed0| 70 20 31 33 33 20 22 5c | 0a 42 79 74 65 20 63 6f |p 133 "\|.Byte co|
|00002ee0| 64 65 20 6f 70 63 6f 64 | 65 20 74 6f 20 65 78 61 |de opcod|e to exa|
|00002ef0| 6d 69 6e 65 20 74 6f 70 | 2d 6f 66 2d 73 74 61 63 |mine top|-of-stac|
|00002f00| 6b 2c 20 6a 75 6d 70 20 | 61 6e 64 20 64 6f 6e 27 |k, jump |and don'|
|00002f10| 74 20 70 6f 70 20 69 74 | 20 69 66 20 69 74 27 73 |t pop it| if it's|
|00002f20| 20 6e 69 6c 2c 20 0a 6f | 74 68 65 72 77 69 73 65 | nil, .o|therwise|
|00002f30| 20 70 6f 70 20 69 74 2e | 22 29 0a 28 64 65 66 63 | pop it.|").(defc|
|00002f40| 6f 6e 73 74 20 62 79 74 | 65 2d 67 6f 74 6f 2d 69 |onst byt|e-goto-i|
|00002f50| 66 2d 6e 6f 74 2d 6e 69 | 6c 2d 65 6c 73 65 2d 70 |f-not-ni|l-else-p|
|00002f60| 6f 70 20 31 33 34 20 22 | 5c 0a 42 79 74 65 20 63 |op 134 "|\.Byte c|
|00002f70| 6f 64 65 20 6f 70 63 6f | 64 65 20 74 6f 20 65 78 |ode opco|de to ex|
|00002f80| 61 6d 69 6e 65 20 74 6f | 70 2d 6f 66 2d 73 74 61 |amine to|p-of-sta|
|00002f90| 63 6b 2c 20 6a 75 6d 70 | 20 61 6e 64 20 64 6f 6e |ck, jump| and don|
|00002fa0| 27 74 20 70 6f 70 20 69 | 74 20 69 66 20 69 74 27 |'t pop i|t if it'|
|00002fb0| 73 20 6e 6f 6e 20 6e 69 | 6c 2c 20 0a 6f 74 68 65 |s non ni|l, .othe|
|00002fc0| 72 77 69 73 65 20 70 6f | 70 20 69 74 2e 22 29 0a |rwise po|p it.").|
|00002fd0| 28 64 65 66 63 6f 6e 73 | 74 20 62 79 74 65 2d 72 |(defcons|t byte-r|
|00002fe0| 65 74 75 72 6e 20 31 33 | 35 20 22 5c 0a 42 79 74 |eturn 13|5 "\.Byt|
|00002ff0| 65 20 63 6f 64 65 20 6f | 70 63 6f 64 65 20 74 6f |e code o|pcode to|
|00003000| 20 70 6f 70 20 61 20 76 | 61 6c 75 65 20 61 6e 64 | pop a v|alue and|
|00003010| 20 72 65 74 75 72 6e 20 | 69 74 20 66 72 6f 6d 20 | return |it from |
|00003020| 60 62 79 74 65 2d 63 6f | 64 65 27 2e 22 29 0a 28 |`byte-co|de'.").(|
|00003030| 64 65 66 63 6f 6e 73 74 | 20 62 79 74 65 2d 64 69 |defconst| byte-di|
|00003040| 73 63 61 72 64 20 31 33 | 36 20 22 5c 0a 42 79 74 |scard 13|6 "\.Byt|
|00003050| 65 20 63 6f 64 65 20 6f | 70 63 6f 64 65 20 74 6f |e code o|pcode to|
|00003060| 20 64 69 73 63 61 72 64 | 20 6f 6e 65 20 76 61 6c | discard| one val|
|00003070| 75 65 20 66 72 6f 6d 20 | 73 74 61 63 6b 2e 22 29 |ue from |stack.")|
|00003080| 0a 28 64 65 66 63 6f 6e | 73 74 20 62 79 74 65 2d |.(defcon|st byte-|
|00003090| 64 75 70 20 31 33 37 20 | 22 5c 0a 42 79 74 65 20 |dup 137 |"\.Byte |
|000030a0| 63 6f 64 65 20 6f 70 63 | 6f 64 65 20 74 6f 20 64 |code opc|ode to d|
|000030b0| 75 70 6c 69 63 61 74 65 | 20 74 68 65 20 74 6f 70 |uplicate| the top|
|000030c0| 20 6f 66 20 74 68 65 20 | 73 74 61 63 6b 2e 22 29 | of the |stack.")|
|000030d0| 0a 28 64 65 66 63 6f 6e | 73 74 20 62 79 74 65 2d |.(defcon|st byte-|
|000030e0| 73 61 76 65 2d 65 78 63 | 75 72 73 69 6f 6e 20 31 |save-exc|ursion 1|
|000030f0| 33 38 20 22 5c 0a 42 79 | 74 65 20 63 6f 64 65 20 |38 "\.By|te code |
|00003100| 6f 70 63 6f 64 65 20 74 | 6f 20 6d 61 6b 65 20 61 |opcode t|o make a|
|00003110| 20 62 69 6e 64 69 6e 67 | 20 74 6f 20 72 65 63 6f | binding| to reco|
|00003120| 72 64 20 74 68 65 20 62 | 75 66 66 65 72 2c 20 70 |rd the b|uffer, p|
|00003130| 6f 69 6e 74 20 61 6e 64 | 20 6d 61 72 6b 2e 22 29 |oint and| mark.")|
|00003140| 0a 28 64 65 66 63 6f 6e | 73 74 20 62 79 74 65 2d |.(defcon|st byte-|
|00003150| 73 61 76 65 2d 77 69 6e | 64 6f 77 2d 65 78 63 75 |save-win|dow-excu|
|00003160| 72 73 69 6f 6e 20 31 33 | 39 20 22 5c 0a 42 79 74 |rsion 13|9 "\.Byt|
|00003170| 65 20 63 6f 64 65 20 6f | 70 63 6f 64 65 20 74 6f |e code o|pcode to|
|00003180| 20 6d 61 6b 65 20 61 20 | 62 69 6e 64 69 6e 67 20 | make a |binding |
|00003190| 74 6f 20 72 65 63 6f 72 | 64 20 65 6e 74 69 72 65 |to recor|d entire|
|000031a0| 20 77 69 6e 64 6f 77 20 | 63 6f 6e 66 69 67 75 72 | window |configur|
|000031b0| 61 74 69 6f 6e 2e 22 29 | 0a 28 64 65 66 63 6f 6e |ation.")|.(defcon|
|000031c0| 73 74 20 62 79 74 65 2d | 73 61 76 65 2d 72 65 73 |st byte-|save-res|
|000031d0| 74 72 69 63 74 69 6f 6e | 20 31 34 30 20 22 5c 0a |triction| 140 "\.|
|000031e0| 42 79 74 65 20 63 6f 64 | 65 20 6f 70 63 6f 64 65 |Byte cod|e opcode|
|000031f0| 20 74 6f 20 6d 61 6b 65 | 20 61 20 62 69 6e 64 69 | to make| a bindi|
|00003200| 6e 67 20 74 6f 20 72 65 | 63 6f 72 64 20 74 68 65 |ng to re|cord the|
|00003210| 20 63 75 72 72 65 6e 74 | 20 62 75 66 66 65 72 20 | current| buffer |
|00003220| 63 6c 69 70 70 69 6e 67 | 20 72 65 73 74 72 69 63 |clipping| restric|
|00003230| 74 69 6f 6e 73 2e 22 29 | 0a 28 64 65 66 63 6f 6e |tions.")|.(defcon|
|00003240| 73 74 20 62 79 74 65 2d | 63 61 74 63 68 20 31 34 |st byte-|catch 14|
|00003250| 31 20 22 5c 0a 42 79 74 | 65 20 63 6f 64 65 20 6f |1 "\.Byt|e code o|
|00003260| 70 63 6f 64 65 20 66 6f | 72 20 63 61 74 63 68 2e |pcode fo|r catch.|
|00003270| 20 20 54 61 6b 65 73 2c | 20 6f 6e 20 73 74 61 63 | Takes,| on stac|
|00003280| 6b 2c 20 74 68 65 20 74 | 61 67 20 61 6e 64 20 61 |k, the t|ag and a|
|00003290| 6e 20 65 78 70 72 65 73 | 73 69 6f 6e 20 66 6f 72 |n expres|sion for|
|000032a0| 20 74 68 65 20 62 6f 64 | 79 2e 22 29 0a 28 64 65 | the bod|y.").(de|
|000032b0| 66 63 6f 6e 73 74 20 62 | 79 74 65 2d 75 6e 77 69 |fconst b|yte-unwi|
|000032c0| 6e 64 2d 70 72 6f 74 65 | 63 74 20 31 34 32 20 22 |nd-prote|ct 142 "|
|000032d0| 5c 0a 42 79 74 65 20 63 | 6f 64 65 20 6f 70 63 6f |\.Byte c|ode opco|
|000032e0| 64 65 20 66 6f 72 20 75 | 6e 77 69 6e 64 2d 70 72 |de for u|nwind-pr|
|000032f0| 6f 74 65 63 74 2e 20 20 | 54 61 6b 65 73 2c 20 6f |otect. |Takes, o|
|00003300| 6e 20 73 74 61 63 6b 2c | 20 61 6e 20 65 78 70 72 |n stack,| an expr|
|00003310| 65 73 73 69 6f 6e 20 66 | 6f 72 20 74 68 65 20 75 |ession f|or the u|
|00003320| 6e 77 69 6e 64 2d 61 63 | 74 69 6f 6e 2e 22 29 0a |nwind-ac|tion.").|
|00003330| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 11 c2 13 |(byte-co|de "....|
|00003340| c4 15 c6 16 07 c8 16 09 | ca 16 0b cc 16 0d ce 16 |........|........|
|00003350| 0f d0 16 11 d2 16 13 d4 | 16 15 d6 16 17 d8 16 19 |........|........|
|00003360| da 16 1b dc 16 1d de 16 | 1f e0 16 21 e2 16 23 e4 |........|...!..#.|
|00003370| 16 25 e6 16 27 e8 16 29 | ea 16 2b ec 16 2d ee 16 |.%..'..)|..+..-..|
|00003380| 2f f0 16 31 f2 16 33 f4 | 16 35 f6 16 37 f8 16 39 |/..1..3.|.5..7..9|
|00003390| fa 16 3b fc 16 3d fe 16 | 3f 81 40 00 16 41 81 42 |..;..=..|?.@..A.B|
|000033a0| 00 16 43 c0 87 22 20 5b | 31 34 33 20 62 79 74 65 |..C.." [|143 byte|
|000033b0| 2d 63 6f 6e 64 69 74 69 | 6f 6e 2d 63 61 73 65 20 |-conditi|on-case |
|000033c0| 31 34 34 20 62 79 74 65 | 2d 74 65 6d 70 2d 6f 75 |144 byte|-temp-ou|
|000033d0| 74 70 75 74 2d 62 75 66 | 66 65 72 2d 73 65 74 75 |tput-buf|fer-setu|
|000033e0| 70 20 31 34 35 20 62 79 | 74 65 2d 74 65 6d 70 2d |p 145 by|te-temp-|
|000033f0| 6f 75 74 70 75 74 2d 62 | 75 66 66 65 72 2d 73 68 |output-b|uffer-sh|
|00003400| 6f 77 20 31 34 36 20 62 | 79 74 65 2d 75 6e 62 69 |ow 146 b|yte-unbi|
|00003410| 6e 64 2d 61 6c 6c 20 31 | 34 37 20 62 79 74 65 2d |nd-all 1|47 byte-|
|00003420| 73 65 74 2d 6d 61 72 6b | 65 72 20 31 34 38 20 62 |set-mark|er 148 b|
|00003430| 79 74 65 2d 6d 61 74 63 | 68 2d 62 65 67 69 6e 6e |yte-matc|h-beginn|
|00003440| 69 6e 67 20 31 34 39 20 | 62 79 74 65 2d 6d 61 74 |ing 149 |byte-mat|
|00003450| 63 68 2d 65 6e 64 20 31 | 35 30 20 62 79 74 65 2d |ch-end 1|50 byte-|
|00003460| 75 70 63 61 73 65 20 31 | 35 31 20 62 79 74 65 2d |upcase 1|51 byte-|
|00003470| 64 6f 77 6e 63 61 73 65 | 20 31 35 32 20 62 79 74 |downcase| 152 byt|
|00003480| 65 2d 73 74 72 69 6e 67 | 3d 20 31 35 33 20 62 79 |e-string|= 153 by|
|00003490| 74 65 2d 73 74 72 69 6e | 67 3c 20 31 35 34 20 62 |te-strin|g< 154 b|
|000034a0| 79 74 65 2d 65 71 75 61 | 6c 20 31 35 35 20 62 79 |yte-equa|l 155 by|
|000034b0| 74 65 2d 6e 74 68 63 64 | 72 20 31 35 36 20 62 79 |te-nthcd|r 156 by|
|000034c0| 74 65 2d 65 6c 74 20 31 | 35 37 20 62 79 74 65 2d |te-elt 1|57 byte-|
|000034d0| 6d 65 6d 62 65 72 20 31 | 35 38 20 62 79 74 65 2d |member 1|58 byte-|
|000034e0| 61 73 73 71 20 31 35 39 | 20 62 79 74 65 2d 6e 72 |assq 159| byte-nr|
|000034f0| 65 76 65 72 73 65 20 31 | 36 30 20 62 79 74 65 2d |everse 1|60 byte-|
|00003500| 73 65 74 63 61 72 20 31 | 36 31 20 62 79 74 65 2d |setcar 1|61 byte-|
|00003510| 73 65 74 63 64 72 20 31 | 36 32 20 62 79 74 65 2d |setcdr 1|62 byte-|
|00003520| 63 61 72 2d 73 61 66 65 | 20 31 36 33 20 62 79 74 |car-safe| 163 byt|
|00003530| 65 2d 63 64 72 2d 73 61 | 66 65 20 31 36 34 20 62 |e-cdr-sa|fe 164 b|
|00003540| 79 74 65 2d 6e 63 6f 6e | 63 20 31 36 35 20 62 79 |yte-ncon|c 165 by|
|00003550| 74 65 2d 71 75 6f 20 31 | 36 36 20 62 79 74 65 2d |te-quo 1|66 byte-|
|00003560| 72 65 6d 20 31 36 37 20 | 62 79 74 65 2d 6e 75 6d |rem 167 |byte-num|
|00003570| 62 65 72 70 20 31 36 38 | 20 62 79 74 65 2d 69 6e |berp 168| byte-in|
|00003580| 74 65 67 65 72 70 20 31 | 37 30 20 62 79 74 65 2d |tegerp 1|70 byte-|
|00003590| 72 65 6c 2d 67 6f 74 6f | 20 31 37 31 20 62 79 74 |rel-goto| 171 byt|
|000035a0| 65 2d 72 65 6c 2d 67 6f | 74 6f 2d 69 66 2d 6e 69 |e-rel-go|to-if-ni|
|000035b0| 6c 20 31 37 32 20 62 79 | 74 65 2d 72 65 6c 2d 67 |l 172 by|te-rel-g|
|000035c0| 6f 74 6f 2d 69 66 2d 6e | 6f 74 2d 6e 69 6c 20 31 |oto-if-n|ot-nil 1|
|000035d0| 37 33 20 62 79 74 65 2d | 72 65 6c 2d 67 6f 74 6f |73 byte-|rel-goto|
|000035e0| 2d 69 66 2d 6e 69 6c 2d | 65 6c 73 65 2d 70 6f 70 |-if-nil-|else-pop|
|000035f0| 20 31 37 34 20 62 79 74 | 65 2d 72 65 6c 2d 67 6f | 174 byt|e-rel-go|
|00003600| 74 6f 2d 69 66 2d 6e 6f | 74 2d 6e 69 6c 2d 65 6c |to-if-no|t-nil-el|
|00003610| 73 65 2d 70 6f 70 20 31 | 37 35 20 62 79 74 65 2d |se-pop 1|75 byte-|
|00003620| 6c 69 73 74 4e 20 31 37 | 36 20 62 79 74 65 2d 63 |listN 17|6 byte-c|
|00003630| 6f 6e 63 61 74 4e 20 31 | 37 37 20 62 79 74 65 2d |oncatN 1|77 byte-|
|00003640| 69 6e 73 65 72 74 4e 5d | 20 31 29 0a 28 64 65 66 |insertN]| 1).(def|
|00003650| 63 6f 6e 73 74 20 62 79 | 74 65 2d 63 6f 6e 73 74 |const by|te-const|
|00003660| 61 6e 74 20 31 39 32 20 | 22 5c 0a 42 79 74 65 20 |ant 192 |"\.Byte |
|00003670| 63 6f 64 65 20 6f 70 63 | 6f 64 65 20 66 6f 72 20 |code opc|ode for |
|00003680| 72 65 66 65 72 65 6e 63 | 65 20 74 6f 20 61 20 63 |referenc|e to a c|
|00003690| 6f 6e 73 74 61 6e 74 2e | 22 29 0a 28 64 65 66 63 |onstant.|").(defc|
|000036a0| 6f 6e 73 74 20 62 79 74 | 65 2d 63 6f 6e 73 74 61 |onst byt|e-consta|
|000036b0| 6e 74 2d 6c 69 6d 69 74 | 20 36 34 20 22 5c 0a 45 |nt-limit| 64 "\.E|
|000036c0| 78 63 6c 75 73 69 76 65 | 20 6d 61 78 69 6d 75 6d |xclusive| maximum|
|000036d0| 20 69 6e 64 65 78 20 75 | 73 61 62 6c 65 20 69 6e | index u|sable in|
|000036e0| 20 74 68 65 20 60 62 79 | 74 65 2d 63 6f 6e 73 74 | the `by|te-const|
|000036f0| 61 6e 74 27 20 6f 70 63 | 6f 64 65 2e 22 29 0a 28 |ant' opc|ode.").(|
|00003700| 64 65 66 63 6f 6e 73 74 | 20 62 79 74 65 2d 67 6f |defconst| byte-go|
|00003710| 74 6f 2d 6f 70 73 20 28 | 70 75 72 65 63 6f 70 79 |to-ops (|purecopy|
|00003720| 20 27 28 62 79 74 65 2d | 67 6f 74 6f 20 62 79 74 | '(byte-|goto byt|
|00003730| 65 2d 67 6f 74 6f 2d 69 | 66 2d 6e 69 6c 20 62 79 |e-goto-i|f-nil by|
|00003740| 74 65 2d 67 6f 74 6f 2d | 69 66 2d 6e 6f 74 2d 6e |te-goto-|if-not-n|
|00003750| 69 6c 20 62 79 74 65 2d | 67 6f 74 6f 2d 69 66 2d |il byte-|goto-if-|
|00003760| 6e 69 6c 2d 65 6c 73 65 | 2d 70 6f 70 20 62 79 74 |nil-else|-pop byt|
|00003770| 65 2d 67 6f 74 6f 2d 69 | 66 2d 6e 6f 74 2d 6e 69 |e-goto-i|f-not-ni|
|00003780| 6c 2d 65 6c 73 65 2d 70 | 6f 70 29 29 20 22 5c 0a |l-else-p|op)) "\.|
|00003790| 4c 69 73 74 20 6f 66 20 | 62 79 74 65 2d 63 6f 64 |List of |byte-cod|
|000037a0| 65 73 20 77 68 6f 73 65 | 20 6f 66 66 73 65 74 20 |es whose| offset |
|000037b0| 69 73 20 61 20 70 63 2e | 22 29 0a 28 62 79 74 65 |is a pc.|").(byte|
|000037c0| 2d 63 6f 64 65 20 22 c0 | c1 21 12 c0 87 22 20 5b |-code ".|.!..." [|
|000037d0| 70 75 72 65 63 6f 70 79 | 20 28 62 79 74 65 2d 67 |purecopy| (byte-g|
|000037e0| 6f 74 6f 2d 69 66 2d 6e | 69 6c 20 62 79 74 65 2d |oto-if-n|il byte-|
|000037f0| 67 6f 74 6f 2d 69 66 2d | 6e 6f 74 2d 6e 69 6c 29 |goto-if-|not-nil)|
|00003800| 20 62 79 74 65 2d 67 6f | 74 6f 2d 61 6c 77 61 79 | byte-go|to-alway|
|00003810| 73 2d 70 6f 70 2d 6f 70 | 73 5d 20 32 29 0a 28 64 |s-pop-op|s] 2).(d|
|00003820| 65 66 63 6f 6e 73 74 20 | 62 79 74 65 2d 72 65 6c |efconst |byte-rel|
|00003830| 2d 67 6f 74 6f 2d 6f 70 | 73 20 28 70 75 72 65 63 |-goto-op|s (purec|
|00003840| 6f 70 79 20 27 28 62 79 | 74 65 2d 72 65 6c 2d 67 |opy '(by|te-rel-g|
|00003850| 6f 74 6f 20 62 79 74 65 | 2d 72 65 6c 2d 67 6f 74 |oto byte|-rel-got|
|00003860| 6f 2d 69 66 2d 6e 69 6c | 20 62 79 74 65 2d 72 65 |o-if-nil| byte-re|
|00003870| 6c 2d 67 6f 74 6f 2d 69 | 66 2d 6e 6f 74 2d 6e 69 |l-goto-i|f-not-ni|
|00003880| 6c 20 62 79 74 65 2d 72 | 65 6c 2d 67 6f 74 6f 2d |l byte-r|el-goto-|
|00003890| 69 66 2d 6e 69 6c 2d 65 | 6c 73 65 2d 70 6f 70 20 |if-nil-e|lse-pop |
|000038a0| 62 79 74 65 2d 72 65 6c | 2d 67 6f 74 6f 2d 69 66 |byte-rel|-goto-if|
|000038b0| 2d 6e 6f 74 2d 6e 69 6c | 2d 65 6c 73 65 2d 70 6f |-not-nil|-else-po|
|000038c0| 70 29 29 20 22 5c 0a 62 | 79 74 65 2d 63 6f 64 65 |p)) "\.b|yte-code|
|000038d0| 73 20 66 6f 72 20 72 65 | 6c 61 74 69 76 65 20 6a |s for re|lative j|
|000038e0| 75 6d 70 73 2e 22 29 0a | 28 62 79 74 65 2d 63 6f |umps.").|(byte-co|
|000038f0| 64 65 20 22 c0 11 c2 13 | c4 87 22 20 5b 5b 6e 69 |de "....|.." [[ni|
|00003900| 6c 20 6e 69 6c 20 6e 69 | 6c 20 6e 69 6c 20 6e 69 |l nil ni|l nil ni|
|00003910| 6c 20 6e 69 6c 20 6e 69 | 6c 20 6e 69 6c 20 62 79 |l nil ni|l nil by|
|00003920| 74 65 2d 76 61 72 72 65 | 66 20 6e 69 6c 20 6e 69 |te-varre|f nil ni|
|00003930| 6c 20 6e 69 6c 20 6e 69 | 6c 20 6e 69 6c 20 6e 69 |l nil ni|l nil ni|
|00003940| 6c 20 6e 69 6c 20 62 79 | 74 65 2d 76 61 72 73 65 |l nil by|te-varse|
|00003950| 74 20 6e 69 6c 20 6e 69 | 6c 20 6e 69 6c 20 6e 69 |t nil ni|l nil ni|
|00003960| 6c 20 6e 69 6c 20 6e 69 | 6c 20 6e 69 6c 20 62 79 |l nil ni|l nil by|
|00003970| 74 65 2d 76 61 72 62 69 | 6e 64 20 6e 69 6c 20 6e |te-varbi|nd nil n|
|00003980| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|00003990| 69 6c 20 6e 69 6c 20 62 | 79 74 65 2d 63 61 6c 6c |il nil b|yte-call|
|000039a0| 20 6e 69 6c 20 6e 69 6c | 20 6e 69 6c 20 6e 69 6c | nil nil| nil nil|
|000039b0| 20 6e 69 6c 20 6e 69 6c | 20 6e 69 6c 20 62 79 74 | nil nil| nil byt|
|000039c0| 65 2d 75 6e 62 69 6e 64 | 20 6e 69 6c 20 6e 69 6c |e-unbind| nil nil|
|000039d0| 20 6e 69 6c 20 6e 69 6c | 20 6e 69 6c 20 6e 69 6c | nil nil| nil nil|
|000039e0| 20 6e 69 6c 20 6e 69 6c | 20 6e 69 6c 20 6e 69 6c | nil nil| nil nil|
|000039f0| 20 6e 69 6c 20 6e 69 6c | 20 6e 69 6c 20 6e 69 6c | nil nil| nil nil|
|00003a00| 20 6e 69 6c 20 62 79 74 | 65 2d 6e 74 68 20 62 79 | nil byt|e-nth by|
|00003a10| 74 65 2d 73 79 6d 62 6f | 6c 70 20 62 79 74 65 2d |te-symbo|lp byte-|
|00003a20| 63 6f 6e 73 70 20 62 79 | 74 65 2d 73 74 72 69 6e |consp by|te-strin|
|00003a30| 67 70 20 62 79 74 65 2d | 6c 69 73 74 70 20 62 79 |gp byte-|listp by|
|00003a40| 74 65 2d 65 71 20 62 79 | 74 65 2d 6d 65 6d 71 20 |te-eq by|te-memq |
|00003a50| 62 79 74 65 2d 6e 6f 74 | 20 62 79 74 65 2d 63 61 |byte-not| byte-ca|
|00003a60| 72 20 62 79 74 65 2d 63 | 64 72 20 62 79 74 65 2d |r byte-c|dr byte-|
|00003a70| 63 6f 6e 73 20 62 79 74 | 65 2d 6c 69 73 74 31 20 |cons byt|e-list1 |
|00003a80| 62 79 74 65 2d 6c 69 73 | 74 32 20 62 79 74 65 2d |byte-lis|t2 byte-|
|00003a90| 6c 69 73 74 33 20 62 79 | 74 65 2d 6c 69 73 74 34 |list3 by|te-list4|
|00003aa0| 20 62 79 74 65 2d 6c 65 | 6e 67 74 68 20 62 79 74 | byte-le|ngth byt|
|00003ab0| 65 2d 61 72 65 66 20 62 | 79 74 65 2d 61 73 65 74 |e-aref b|yte-aset|
|00003ac0| 20 62 79 74 65 2d 73 79 | 6d 62 6f 6c 2d 76 61 6c | byte-sy|mbol-val|
|00003ad0| 75 65 20 62 79 74 65 2d | 73 79 6d 62 6f 6c 2d 66 |ue byte-|symbol-f|
|00003ae0| 75 6e 63 74 69 6f 6e 20 | 62 79 74 65 2d 73 65 74 |unction |byte-set|
|00003af0| 20 62 79 74 65 2d 66 73 | 65 74 20 62 79 74 65 2d | byte-fs|et byte-|
|00003b00| 67 65 74 20 62 79 74 65 | 2d 73 75 62 73 74 72 69 |get byte|-substri|
|00003b10| 6e 67 20 62 79 74 65 2d | 63 6f 6e 63 61 74 32 20 |ng byte-|concat2 |
|00003b20| 62 79 74 65 2d 63 6f 6e | 63 61 74 33 20 62 79 74 |byte-con|cat3 byt|
|00003b30| 65 2d 63 6f 6e 63 61 74 | 34 20 62 79 74 65 2d 73 |e-concat|4 byte-s|
|00003b40| 75 62 31 20 62 79 74 65 | 2d 61 64 64 31 20 62 79 |ub1 byte|-add1 by|
|00003b50| 74 65 2d 65 71 6c 73 69 | 67 6e 20 62 79 74 65 2d |te-eqlsi|gn byte-|
|00003b60| 67 74 72 20 62 79 74 65 | 2d 6c 73 73 20 62 79 74 |gtr byte|-lss byt|
|00003b70| 65 2d 6c 65 71 20 62 79 | 74 65 2d 67 65 71 20 62 |e-leq by|te-geq b|
|00003b80| 79 74 65 2d 64 69 66 66 | 20 62 79 74 65 2d 6e 65 |yte-diff| byte-ne|
|00003b90| 67 61 74 65 20 62 79 74 | 65 2d 70 6c 75 73 20 62 |gate byt|e-plus b|
|00003ba0| 79 74 65 2d 6d 61 78 20 | 62 79 74 65 2d 6d 69 6e |yte-max |byte-min|
|00003bb0| 20 62 79 74 65 2d 6d 75 | 6c 74 20 62 79 74 65 2d | byte-mu|lt byte-|
|00003bc0| 70 6f 69 6e 74 20 62 79 | 74 65 2d 6d 61 72 6b 2d |point by|te-mark-|
|00003bd0| 4f 42 53 4f 4c 45 54 45 | 20 62 79 74 65 2d 67 6f |OBSOLETE| byte-go|
|00003be0| 74 6f 2d 63 68 61 72 20 | 62 79 74 65 2d 69 6e 73 |to-char |byte-ins|
|00003bf0| 65 72 74 20 62 79 74 65 | 2d 70 6f 69 6e 74 2d 6d |ert byte|-point-m|
|00003c00| 61 78 20 62 79 74 65 2d | 70 6f 69 6e 74 2d 6d 69 |ax byte-|point-mi|
|00003c10| 6e 20 62 79 74 65 2d 63 | 68 61 72 2d 61 66 74 65 |n byte-c|har-afte|
|00003c20| 72 20 62 79 74 65 2d 66 | 6f 6c 6c 6f 77 69 6e 67 |r byte-f|ollowing|
|00003c30| 2d 63 68 61 72 20 62 79 | 74 65 2d 70 72 65 63 65 |-char by|te-prece|
|00003c40| 64 69 6e 67 2d 63 68 61 | 72 20 62 79 74 65 2d 63 |ding-cha|r byte-c|
|00003c50| 75 72 72 65 6e 74 2d 63 | 6f 6c 75 6d 6e 20 62 79 |urrent-c|olumn by|
|00003c60| 74 65 2d 69 6e 64 65 6e | 74 2d 74 6f 20 62 79 74 |te-inden|t-to byt|
|00003c70| 65 2d 73 63 61 6e 2d 62 | 75 66 66 65 72 2d 4f 42 |e-scan-b|uffer-OB|
|00003c80| 53 4f 4c 45 54 45 20 62 | 79 74 65 2d 65 6f 6c 70 |SOLETE b|yte-eolp|
|00003c90| 20 62 79 74 65 2d 65 6f | 62 70 20 62 79 74 65 2d | byte-eo|bp byte-|
|00003ca0| 62 6f 6c 70 20 62 79 74 | 65 2d 62 6f 62 70 20 62 |bolp byt|e-bobp b|
|00003cb0| 79 74 65 2d 63 75 72 72 | 65 6e 74 2d 62 75 66 66 |yte-curr|ent-buff|
|00003cc0| 65 72 20 62 79 74 65 2d | 73 65 74 2d 62 75 66 66 |er byte-|set-buff|
|00003cd0| 65 72 20 62 79 74 65 2d | 72 65 61 64 2d 63 68 61 |er byte-|read-cha|
|00003ce0| 72 2d 4f 42 53 4f 4c 45 | 54 45 20 62 79 74 65 2d |r-OBSOLE|TE byte-|
|00003cf0| 73 65 74 2d 6d 61 72 6b | 2d 4f 42 53 4f 4c 45 54 |set-mark|-OBSOLET|
|00003d00| 45 20 62 79 74 65 2d 69 | 6e 74 65 72 61 63 74 69 |E byte-i|nteracti|
|00003d10| 76 65 2d 70 20 62 79 74 | 65 2d 66 6f 72 77 61 72 |ve-p byt|e-forwar|
|00003d20| 64 2d 63 68 61 72 20 62 | 79 74 65 2d 66 6f 72 77 |d-char b|yte-forw|
|00003d30| 61 72 64 2d 77 6f 72 64 | 20 62 79 74 65 2d 73 6b |ard-word| byte-sk|
|00003d40| 69 70 2d 63 68 61 72 73 | 2d 66 6f 72 77 61 72 64 |ip-chars|-forward|
|00003d50| 20 62 79 74 65 2d 73 6b | 69 70 2d 63 68 61 72 73 | byte-sk|ip-chars|
|00003d60| 2d 62 61 63 6b 77 61 72 | 64 20 62 79 74 65 2d 66 |-backwar|d byte-f|
|00003d70| 6f 72 77 61 72 64 2d 6c | 69 6e 65 20 62 79 74 65 |orward-l|ine byte|
|00003d80| 2d 63 68 61 72 2d 73 79 | 6e 74 61 78 20 62 79 74 |-char-sy|ntax byt|
|00003d90| 65 2d 62 75 66 66 65 72 | 2d 73 75 62 73 74 72 69 |e-buffer|-substri|
|00003da0| 6e 67 20 62 79 74 65 2d | 64 65 6c 65 74 65 2d 72 |ng byte-|delete-r|
|00003db0| 65 67 69 6f 6e 20 62 79 | 74 65 2d 6e 61 72 72 6f |egion by|te-narro|
|00003dc0| 77 2d 74 6f 2d 72 65 67 | 69 6f 6e 20 62 79 74 65 |w-to-reg|ion byte|
|00003dd0| 2d 77 69 64 65 6e 20 62 | 79 74 65 2d 65 6e 64 2d |-widen b|yte-end-|
|00003de0| 6f 66 2d 6c 69 6e 65 20 | 6e 69 6c 20 62 79 74 65 |of-line |nil byte|
|00003df0| 2d 63 6f 6e 73 74 61 6e | 74 32 20 62 79 74 65 2d |-constan|t2 byte-|
|00003e00| 67 6f 74 6f 20 62 79 74 | 65 2d 67 6f 74 6f 2d 69 |goto byt|e-goto-i|
|00003e10| 66 2d 6e 69 6c 20 62 79 | 74 65 2d 67 6f 74 6f 2d |f-nil by|te-goto-|
|00003e20| 69 66 2d 6e 6f 74 2d 6e | 69 6c 20 62 79 74 65 2d |if-not-n|il byte-|
|00003e30| 67 6f 74 6f 2d 69 66 2d | 6e 69 6c 2d 65 6c 73 65 |goto-if-|nil-else|
|00003e40| 2d 70 6f 70 20 62 79 74 | 65 2d 67 6f 74 6f 2d 69 |-pop byt|e-goto-i|
|00003e50| 66 2d 6e 6f 74 2d 6e 69 | 6c 2d 65 6c 73 65 2d 70 |f-not-ni|l-else-p|
|00003e60| 6f 70 20 62 79 74 65 2d | 72 65 74 75 72 6e 20 62 |op byte-|return b|
|00003e70| 79 74 65 2d 64 69 73 63 | 61 72 64 20 62 79 74 65 |yte-disc|ard byte|
|00003e80| 2d 64 75 70 20 62 79 74 | 65 2d 73 61 76 65 2d 65 |-dup byt|e-save-e|
|00003e90| 78 63 75 72 73 69 6f 6e | 20 62 79 74 65 2d 73 61 |xcursion| byte-sa|
|00003ea0| 76 65 2d 77 69 6e 64 6f | 77 2d 65 78 63 75 72 73 |ve-windo|w-excurs|
|00003eb0| 69 6f 6e 20 62 79 74 65 | 2d 73 61 76 65 2d 72 65 |ion byte|-save-re|
|00003ec0| 73 74 72 69 63 74 69 6f | 6e 20 62 79 74 65 2d 63 |strictio|n byte-c|
|00003ed0| 61 74 63 68 20 62 79 74 | 65 2d 75 6e 77 69 6e 64 |atch byt|e-unwind|
|00003ee0| 2d 70 72 6f 74 65 63 74 | 20 62 79 74 65 2d 63 6f |-protect| byte-co|
|00003ef0| 6e 64 69 74 69 6f 6e 2d | 63 61 73 65 20 62 79 74 |ndition-|case byt|
|00003f00| 65 2d 74 65 6d 70 2d 6f | 75 74 70 75 74 2d 62 75 |e-temp-o|utput-bu|
|00003f10| 66 66 65 72 2d 73 65 74 | 75 70 20 62 79 74 65 2d |ffer-set|up byte-|
|00003f20| 74 65 6d 70 2d 6f 75 74 | 70 75 74 2d 62 75 66 66 |temp-out|put-buff|
|00003f30| 65 72 2d 73 68 6f 77 20 | 62 79 74 65 2d 75 6e 62 |er-show |byte-unb|
|00003f40| 69 6e 64 2d 61 6c 6c 20 | 62 79 74 65 2d 73 65 74 |ind-all |byte-set|
|00003f50| 2d 6d 61 72 6b 65 72 20 | 62 79 74 65 2d 6d 61 74 |-marker |byte-mat|
|00003f60| 63 68 2d 62 65 67 69 6e | 6e 69 6e 67 20 62 79 74 |ch-begin|ning byt|
|00003f70| 65 2d 6d 61 74 63 68 2d | 65 6e 64 20 62 79 74 65 |e-match-|end byte|
|00003f80| 2d 75 70 63 61 73 65 20 | 62 79 74 65 2d 64 6f 77 |-upcase |byte-dow|
|00003f90| 6e 63 61 73 65 20 62 79 | 74 65 2d 73 74 72 69 6e |ncase by|te-strin|
|00003fa0| 67 3d 20 62 79 74 65 2d | 73 74 72 69 6e 67 3c 20 |g= byte-|string< |
|00003fb0| 62 79 74 65 2d 65 71 75 | 61 6c 20 62 79 74 65 2d |byte-equ|al byte-|
|00003fc0| 6e 74 68 63 64 72 20 62 | 79 74 65 2d 65 6c 74 20 |nthcdr b|yte-elt |
|00003fd0| 62 79 74 65 2d 6d 65 6d | 62 65 72 20 62 79 74 65 |byte-mem|ber byte|
|00003fe0| 2d 61 73 73 71 20 62 79 | 74 65 2d 6e 72 65 76 65 |-assq by|te-nreve|
|00003ff0| 72 73 65 20 62 79 74 65 | 2d 73 65 74 63 61 72 20 |rse byte|-setcar |
|00004000| 62 79 74 65 2d 73 65 74 | 63 64 72 20 62 79 74 65 |byte-set|cdr byte|
|00004010| 2d 63 61 72 2d 73 61 66 | 65 20 62 79 74 65 2d 63 |-car-saf|e byte-c|
|00004020| 64 72 2d 73 61 66 65 20 | 62 79 74 65 2d 6e 63 6f |dr-safe |byte-nco|
|00004030| 6e 63 20 62 79 74 65 2d | 71 75 6f 20 62 79 74 65 |nc byte-|quo byte|
|00004040| 2d 72 65 6d 20 62 79 74 | 65 2d 6e 75 6d 62 65 72 |-rem byt|e-number|
|00004050| 70 20 62 79 74 65 2d 69 | 6e 74 65 67 65 72 70 20 |p byte-i|ntegerp |
|00004060| 6e 69 6c 20 62 79 74 65 | 2d 72 65 6c 2d 67 6f 74 |nil byte|-rel-got|
|00004070| 6f 20 62 79 74 65 2d 72 | 65 6c 2d 67 6f 74 6f 2d |o byte-r|el-goto-|
|00004080| 69 66 2d 6e 69 6c 20 62 | 79 74 65 2d 72 65 6c 2d |if-nil b|yte-rel-|
|00004090| 67 6f 74 6f 2d 69 66 2d | 6e 6f 74 2d 6e 69 6c 20 |goto-if-|not-nil |
|000040a0| 62 79 74 65 2d 72 65 6c | 2d 67 6f 74 6f 2d 69 66 |byte-rel|-goto-if|
|000040b0| 2d 6e 69 6c 2d 65 6c 73 | 65 2d 70 6f 70 20 62 79 |-nil-els|e-pop by|
|000040c0| 74 65 2d 72 65 6c 2d 67 | 6f 74 6f 2d 69 66 2d 6e |te-rel-g|oto-if-n|
|000040d0| 6f 74 2d 6e 69 6c 2d 65 | 6c 73 65 2d 70 6f 70 20 |ot-nil-e|lse-pop |
|000040e0| 62 79 74 65 2d 6c 69 73 | 74 4e 20 62 79 74 65 2d |byte-lis|tN byte-|
|000040f0| 63 6f 6e 63 61 74 4e 20 | 62 79 74 65 2d 69 6e 73 |concatN |byte-ins|
|00004100| 65 72 74 4e 20 6e 69 6c | 20 6e 69 6c 20 6e 69 6c |ertN nil| nil nil|
|00004110| 20 6e 69 6c 20 6e 69 6c | 20 6e 69 6c 20 6e 69 6c | nil nil| nil nil|
|00004120| 20 6e 69 6c 20 6e 69 6c | 20 6e 69 6c 20 6e 69 6c | nil nil| nil nil|
|00004130| 20 6e 69 6c 20 6e 69 6c | 20 6e 69 6c 20 62 79 74 | nil nil| nil byt|
|00004140| 65 2d 63 6f 6e 73 74 61 | 6e 74 20 6e 69 6c 20 6e |e-consta|nt nil n|
|00004150| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|00004160| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|00004170| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|00004180| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|00004190| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|000041a0| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|000041b0| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|000041c0| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|000041d0| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|000041e0| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|000041f0| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|00004200| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|00004210| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|00004220| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|00004230| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|00004240| 69 6c 20 6e 69 6c 5d 20 | 62 79 74 65 2d 63 6f 64 |il nil] |byte-cod|
|00004250| 65 2d 76 65 63 74 6f 72 | 20 5b 6e 69 6c 20 6e 69 |e-vector| [nil ni|
|00004260| 6c 20 6e 69 6c 20 6e 69 | 6c 20 6e 69 6c 20 6e 69 |l nil ni|l nil ni|
|00004270| 6c 20 6e 69 6c 20 6e 69 | 6c 20 31 20 6e 69 6c 20 |l nil ni|l 1 nil |
|00004280| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|00004290| 6e 69 6c 20 6e 69 6c 20 | 2d 31 20 6e 69 6c 20 6e |nil nil |-1 nil n|
|000042a0| 69 6c 20 6e 69 6c 20 6e | 69 6c 20 6e 69 6c 20 6e |il nil n|il nil n|
|000042b0| 69 6c 20 6e 69 6c 20 2d | 31 20 6e 69 6c 20 6e 69 |il nil -|1 nil ni|
|000042c0| 6c 20 6e 69 6c 20 6e 69 | 6c 20 6e 69 6c 20 6e 69 |l nil ni|l nil ni|
|000042d0| 6c 20 6e 69 6c 20 30 20 | 6e 69 6c 20 6e 69 6c 20 |l nil 0 |nil nil |
|000042e0| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|000042f0| 6e 69 6c 20 30 20 6e 69 | 6c 20 6e 69 6c 20 6e 69 |nil 0 ni|l nil ni|
|00004300| 6c 20 6e 69 6c 20 6e 69 | 6c 20 6e 69 6c 20 6e 69 |l nil ni|l nil ni|
|00004310| 6c 20 6e 69 6c 20 6e 69 | 6c 20 6e 69 6c 20 6e 69 |l nil ni|l nil ni|
|00004320| 6c 20 6e 69 6c 20 6e 69 | 6c 20 6e 69 6c 20 6e 69 |l nil ni|l nil ni|
|00004330| 6c 20 2d 31 20 30 20 30 | 20 30 20 30 20 2d 31 20 |l -1 0 0| 0 0 -1 |
|00004340| 2d 31 20 30 20 30 20 30 | 20 2d 31 20 30 20 2d 31 |-1 0 0 0| -1 0 -1|
|00004350| 20 2d 32 20 2d 33 20 30 | 20 2d 31 20 2d 32 20 30 | -2 -3 0| -1 -2 0|
|00004360| 20 30 20 2d 31 20 2d 31 | 20 2d 31 20 2d 32 20 2d | 0 -1 -1| -1 -2 -|
|00004370| 31 20 2d 32 20 2d 33 20 | 30 20 30 20 2d 31 20 2d |1 -2 -3 |0 0 -1 -|
|00004380| 31 20 2d 31 20 2d 31 20 | 2d 31 20 2d 31 20 30 20 |1 -1 -1 |-1 -1 0 |
|00004390| 2d 31 20 2d 31 20 2d 31 | 20 2d 31 20 31 20 31 20 |-1 -1 -1| -1 1 1 |
|000043a0| 30 20 30 20 31 20 31 20 | 30 20 31 20 31 20 31 20 |0 0 1 1 |0 1 1 1 |
|000043b0| 30 20 30 20 31 20 31 20 | 31 20 31 20 31 20 30 20 |0 0 1 1 |1 1 1 0 |
|000043c0| 31 20 30 20 31 20 30 20 | 30 20 2d 31 20 2d 31 20 |1 0 1 0 |0 -1 -1 |
|000043d0| 30 20 30 20 2d 31 20 2d | 31 20 2d 31 20 31 20 30 |0 0 -1 -|1 -1 1 0|
|000043e0| 20 6e 69 6c 20 31 20 30 | 20 2d 31 20 2d 31 20 2d | nil 1 0| -1 -1 -|
|000043f0| 31 20 2d 31 20 2d 31 20 | 2d 31 20 31 20 30 20 30 |1 -1 -1 |-1 1 0 0|
|00004400| 20 30 20 2d 31 20 2d 31 | 20 2d 32 20 30 20 2d 31 | 0 -1 -1| -2 0 -1|
|00004410| 20 30 20 2d 32 20 30 20 | 30 20 30 20 30 20 2d 31 | 0 -2 0 |0 0 0 -1|
|00004420| 20 2d 31 20 2d 31 20 2d | 31 20 2d 31 20 2d 31 20 | -1 -1 -|1 -1 -1 |
|00004430| 2d 31 20 30 20 2d 31 20 | 2d 31 20 30 20 30 20 2d |-1 0 -1 |-1 0 0 -|
|00004440| 31 20 2d 31 20 2d 31 20 | 30 20 30 20 6e 69 6c 20 |1 -1 -1 |0 0 nil |
|00004450| 30 20 2d 31 20 2d 31 20 | 2d 31 20 2d 31 20 6e 69 |0 -1 -1 |-1 -1 ni|
|00004460| 6c 20 6e 69 6c 20 6e 69 | 6c 20 6e 69 6c 20 6e 69 |l nil ni|l nil ni|
|00004470| 6c 20 6e 69 6c 20 6e 69 | 6c 20 6e 69 6c 20 6e 69 |l nil ni|l nil ni|
|00004480| 6c 20 6e 69 6c 20 6e 69 | 6c 20 6e 69 6c 20 6e 69 |l nil ni|l nil ni|
|00004490| 6c 20 6e 69 6c 20 6e 69 | 6c 20 6e 69 6c 20 6e 69 |l nil ni|l nil ni|
|000044a0| 6c 20 31 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |l 1 nil |nil nil |
|000044b0| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|000044c0| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|000044d0| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|000044e0| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|000044f0| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|00004500| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|00004510| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|00004520| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|00004530| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|00004540| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|00004550| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|00004560| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|00004570| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|00004580| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 20 |nil nil |nil nil |
|00004590| 6e 69 6c 20 6e 69 6c 20 | 6e 69 6c 20 6e 69 6c 5d |nil nil |nil nil]|
|000045a0| 20 62 79 74 65 2d 73 74 | 61 63 6b 2b 2d 69 6e 66 | byte-st|ack+-inf|
|000045b0| 6f 20 6e 69 6c 5d 20 31 | 29 0a 28 66 73 65 74 20 |o nil] 1|).(fset |
|000045c0| 27 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 6c 61 |'byte-co|mpile-la|
|000045d0| 70 63 6f 64 65 20 23 5b | 28 6c 61 70 29 20 22 c0 |pcode #[|(lap) ".|
|000045e0| c1 89 89 89 89 89 89 1a | 1b 1c 1d 1e 06 1e 07 1e |........|........|
|000045f0| 08 1e 09 0e 5c 6e 83 17 | 01 0e 5c 6e 40 40 16 08 |....\n..|..\n@@..|
|00004600| 0e 5c 6e 40 41 16 07 0e | 08 39 ac 89 cb cc 0e 08 |.\n@A...|.9......|
|00004610| 5c 22 88 82 0e 01 0e 08 | cd 3d ab 8e 0e 07 0e 09 |\"......|.=......|
|00004620| a0 88 0e 07 0d 42 15 82 | 0e 01 0e 08 0e 0e 3e ab |.....B..|......>.|
|00004630| 9d 0e 09 cf 5c 5c 89 16 | 09 0e 07 41 42 c1 0e 08 |....\\..|...AB...|
|00004640| 4a 0e 06 42 42 42 89 16 | 06 0d 42 15 82 0e 01 0e |J..BBB..|..B.....|
|00004650| 07 3a ab ba 0e 07 41 16 | 07 0e 08 d0 3d ab af 0e |.:....A.|....=...|
|00004660| 07 0e 11 57 ab 8f 0e 09 | 54 16 09 0e 10 0e 07 5c |...W....|T......\|
|00004670| 5c 0e 06 42 aa fb 0e 09 | cf 5c 5c 16 09 d2 0e 07 |\..B....|.\\.....|
|00004680| d3 5c 22 d4 0e 07 d5 5c | 22 0e 16 0e 06 42 42 42 |.\"....\|"....BBB|
|00004690| aa e2 0e 17 0e 08 4a 58 | ab 91 0e 09 d8 5c 5c 16 |......JX|.....\\.|
|000046a0| 09 0e 07 0e 08 4a 0e 06 | 42 42 aa c9 0e 07 d9 57 |.....J..|BB.....W|
|000046b0| ab 90 0e 09 54 16 09 0e | 08 4a 0e 07 5c 5c 0e 06 |....T...|.J..\\..|
|000046c0| 42 aa b3 0e 07 da 57 ab | 93 0e 09 d8 5c 5c 16 09 |B.....W.|....\\..|
|000046d0| 0e 07 0e 08 4a d9 5c 5c | 0e 06 42 42 aa 9a 0e 09 |....J.\\|..BB....|
|000046e0| cf 5c 5c 16 09 d2 0e 07 | d3 5c 22 d4 0e 07 d5 5c |.\\.....|.\"....\|
|000046f0| 22 0e 08 4a db 5c 5c 0e | 06 42 42 42 16 06 0e 5c |"..J.\\.|.BBB...\|
|00004700| 6e 41 89 16 5c 6e 84 19 | 00 0e 1c ab e1 0d 9f 15 |nA..\n..|........|
|00004710| c0 16 07 0d 89 14 ab cc | 0c 40 89 12 40 3a ab b6 |........|.@..@:..|
|00004720| 5c 6e 41 40 3f 5c 6e 40 | 12 ab ad 5c 6e 41 40 5c |\nA@?\n@|...\nA@\|
|00004730| 6e 40 5a 13 dd 0b 58 ab | a1 0b de 57 ab 9c 0c 40 |n@Z...X.|...W...@|
|00004740| 0c 40 41 41 a1 88 0c 40 | 41 0c 40 41 40 0e 1f 0e |.@AA...@|A.@A@...|
|00004750| 20 5a 5c 5c a0 88 0e 07 | 53 16 07 5c 6e 89 40 0e | Z\\....|S..\n.@.|
|00004760| 07 5c 5c a0 88 0c 41 89 | 14 ac 34 0e 21 ab 86 0e |.\\...A.|..4.!...|
|00004770| 07 c0 55 ab 5c 22 c1 1e | 06 0d ab c0 0d 40 89 16 |..U.\"..|.....@..|
|00004780| 06 40 3a ab b1 0e 06 41 | 40 ab 91 0e 06 89 40 41 |.@:....A|@.....@A|
|00004790| 40 0e 06 40 40 5a de 5c | 5c a0 88 aa 9a 0e 06 40 |@..@@Z.\|\......@|
|000047a0| 41 40 16 09 0e 06 41 d4 | 0e 09 d5 5c 22 a0 88 0e |A@....A.|...\"...|
|000047b0| 06 d2 0e 09 d3 5c 22 a0 | 88 0d 41 89 15 ac 40 29 |.....\".|..A...@)|
|000047c0| 0e 06 9f b0 01 2e 08 87 | 22 20 5b 30 20 6e 69 6c |........|" [0 nil|
|000047d0| 20 74 6d 70 20 72 65 6c | 20 72 65 73 74 20 70 61 | tmp rel| rest pa|
|000047e0| 74 63 68 6c 69 73 74 20 | 62 79 74 65 73 20 6f 66 |tchlist |bytes of|
|000047f0| 66 20 6f 70 20 70 63 20 | 6c 61 70 20 65 72 72 6f |f op pc |lap erro|
|00004800| 72 20 22 4e 6f 6e 2d 73 | 79 6d 62 6f 6c 69 63 20 |r "Non-s|ymbolic |
|00004810| 6f 70 63 6f 64 65 20 60 | 25 73 27 22 20 54 41 47 |opcode `|%s'" TAG|
|00004820| 20 62 79 74 65 2d 67 6f | 74 6f 2d 6f 70 73 20 33 | byte-go|to-ops 3|
|00004830| 20 62 79 74 65 2d 63 6f | 6e 73 74 61 6e 74 20 62 | byte-co|nstant b|
|00004840| 79 74 65 2d 63 6f 6e 73 | 74 61 6e 74 2d 6c 69 6d |yte-cons|tant-lim|
|00004850| 69 74 20 6c 73 68 20 2d | 38 20 6c 6f 67 61 6e 64 |it lsh -|8 logand|
|00004860| 20 32 35 35 20 62 79 74 | 65 2d 63 6f 6e 73 74 61 | 255 byt|e-consta|
|00004870| 6e 74 32 20 62 79 74 65 | 2d 6c 69 73 74 4e 20 32 |nt2 byte|-listN 2|
|00004880| 20 36 20 32 35 36 20 37 | 20 62 79 74 65 2d 63 6f | 6 256 7| byte-co|
|00004890| 6d 70 69 6c 65 2d 67 65 | 6e 65 72 61 74 65 2d 65 |mpile-ge|nerate-e|
|000048a0| 6d 61 63 73 31 39 2d 62 | 79 74 65 63 6f 64 65 73 |macs19-b|ytecodes|
|000048b0| 20 2d 31 32 39 20 31 32 | 38 20 62 79 74 65 2d 72 | -129 12|8 byte-r|
|000048c0| 65 6c 2d 67 6f 74 6f 20 | 62 79 74 65 2d 67 6f 74 |el-goto |byte-got|
|000048d0| 6f 20 62 79 74 65 2d 6f | 70 74 69 6d 69 7a 65 5d |o byte-o|ptimize]|
|000048e0| 20 39 20 22 5c 0a 54 75 | 72 6e 73 20 6c 61 70 63 | 9 "\.Tu|rns lapc|
|000048f0| 6f 64 65 20 69 6e 74 6f | 20 62 79 74 65 63 6f 64 |ode into| bytecod|
|00004900| 65 2e 20 20 54 68 65 20 | 6c 61 70 63 6f 64 65 20 |e. The |lapcode |
|00004910| 69 73 20 64 65 73 74 72 | 6f 79 65 64 2e 22 5d 29 |is destr|oyed."])|
|00004920| 0a 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c0 11 c0 |.(byte-c|ode "...|
|00004930| 12 c3 c4 4d 88 c0 15 c6 | c7 4d 88 c8 c9 4d 88 ca |...M....|.M...M..|
|00004940| cb 4d 88 cc 16 0d ce 0e | 0d 21 16 0d cf d0 4d 88 |.M......|.!....M.|
|00004950| d1 d2 4d 88 d3 d4 4d 88 | d5 d6 4d 88 d7 d8 4d 88 |..M...M.|..M...M.|
|00004960| d9 da 4d 88 db dc 4d 88 | dd de 4d 88 df e0 4d 88 |..M...M.|..M...M.|
|00004970| e1 e2 4d 88 e3 e4 4d 88 | e5 e6 4d 88 e7 e8 4d 87 |..M...M.|..M...M.|
|00004980| 22 20 5b 6e 69 6c 20 62 | 79 74 65 2d 63 6f 6d 70 |" [nil b|yte-comp|
|00004990| 69 6c 65 2d 63 75 72 72 | 65 6e 74 2d 66 6f 72 6d |ile-curr|ent-form|
|000049a0| 20 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 63 75 | byte-co|mpile-cu|
|000049b0| 72 72 65 6e 74 2d 66 69 | 6c 65 20 62 79 74 65 2d |rrent-fi|le byte-|
|000049c0| 63 6f 6d 70 69 6c 65 2d | 6c 6f 67 20 28 6d 61 63 |compile-|log (mac|
|000049d0| 72 6f 20 2e 20 23 5b 28 | 66 6f 72 6d 61 74 2d 73 |ro . #[(|format-s|
|000049e0| 74 72 69 6e 67 20 26 72 | 65 73 74 20 61 72 67 73 |tring &r|est args|
|000049f0| 29 20 22 c0 c1 c2 c3 c4 | c5 c6 0e 07 c8 c9 0e 5c |) ".....|.......\|
|00004a00| 6e 5c 22 42 42 44 45 46 | 87 22 20 5b 61 6e 64 20 |n\"BBDEF|." [and |
|00004a10| 62 79 74 65 2d 6f 70 74 | 69 6d 69 7a 65 20 28 6d |byte-opt|imize (m|
|00004a20| 65 6d 71 20 62 79 74 65 | 2d 6f 70 74 69 6d 69 7a |emq byte|-optimiz|
|00004a30| 65 2d 6c 6f 67 20 27 28 | 74 20 73 6f 75 72 63 65 |e-log '(|t source|
|00004a40| 29 29 20 6c 65 74 20 28 | 28 70 72 69 6e 74 2d 65 |)) let (|(print-e|
|00004a50| 73 63 61 70 65 2d 6e 65 | 77 6c 69 6e 65 73 20 74 |scape-ne|wlines t|
|00004a60| 29 20 28 70 72 69 6e 74 | 2d 6c 65 76 65 6c 20 34 |) (print|-level 4|
|00004a70| 29 20 28 70 72 69 6e 74 | 2d 6c 65 6e 67 74 68 20 |) (print|-length |
|00004a80| 34 29 29 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |4)) byte|-compile|
|00004a90| 2d 6c 6f 67 2d 31 20 66 | 6f 72 6d 61 74 20 66 6f |-log-1 f|ormat fo|
|00004aa0| 72 6d 61 74 2d 73 74 72 | 69 6e 67 20 6d 61 70 63 |rmat-str|ing mapc|
|00004ab0| 61 72 20 23 5b 28 78 29 | 20 22 08 39 ab 84 c1 08 |ar #[(x)| ".9....|
|00004ac0| 44 87 08 87 22 20 5b 78 | 20 70 72 69 6e 31 2d 74 |D..." [x| prin1-t|
|00004ad0| 6f 2d 73 74 72 69 6e 67 | 5d 20 32 5d 20 61 72 67 |o-string|] 2] arg|
|00004ae0| 73 5d 20 31 31 5d 29 20 | 62 79 74 65 2d 63 6f 6d |s] 11]) |byte-com|
|00004af0| 70 69 6c 65 2d 6c 61 73 | 74 2d 77 61 72 6e 65 64 |pile-las|t-warned|
|00004b00| 2d 66 6f 72 6d 20 62 79 | 74 65 2d 63 6f 6d 70 69 |-form by|te-compi|
|00004b10| 6c 65 2d 6c 6f 67 2d 31 | 20 23 5b 28 73 74 72 69 |le-log-1| #[(stri|
|00004b20| 6e 67 20 26 6f 70 74 69 | 6f 6e 61 6c 20 66 69 6c |ng &opti|onal fil|
|00004b30| 6c 29 20 22 08 ae 81 c1 | 1a 0b ab ae 0c ac 88 0d |l) "....|........|
|00004b40| ab a0 5c 6e 0d 3d ac 9b | c6 c7 c8 5c 6e 0c ab 90 |..\n.=..|...\n...|
|00004b50| 0c 3b ab 85 c9 0c 50 aa | 88 ca cb 0c 21 50 aa 81 |.;....P.|....!P..|
|00004b60| cc 23 21 88 c6 cd 0e 0e | 5c 22 88 aa e3 8a cf d0 |.#!.....|\"......|
|00004b70| 21 71 88 64 62 88 0c ac | 88 0d ab b6 5c 6e 0d 3d |!q.db...|....\n.=|
|00004b80| ac b1 0c ab 87 d1 d2 20 | d3 b1 03 88 d4 5c 6e 3b |....... |.....\n;|
|00004b90| ab 83 5c 6e aa 84 c7 d5 | 5c 6e 5c 22 b1 02 88 0c |..\n....|\n\"....|
|00004ba0| ab 92 0c 3b ab 87 c9 0c | b1 02 88 aa 87 ca cb 0c |...;....|........|
|00004bb0| 21 b1 02 88 d6 63 88 d7 | 0e 0e d3 b1 03 88 0e 18 |!....c..|........|
|00004bc0| ab 92 d9 d3 0e 0e 5c 22 | ac 8b da db 1e 1c 1e 1d |......\"|........|
|00004bd0| de df 21 88 2a 29 df 14 | 5c 6e 89 15 29 87 22 20 |..!.*)..|\n..)." |
|00004be0| 5b 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 63 75 |[byte-co|mpile-cu|
|00004bf0| 72 72 65 6e 74 2d 66 6f | 72 6d 20 22 74 6f 70 6c |rrent-fo|rm "topl|
|00004c00| 65 76 65 6c 20 66 6f 72 | 6d 73 22 20 74 68 69 73 |evel for|ms" this|
|00004c10| 2d 66 6f 72 6d 20 6e 6f | 6e 69 6e 74 65 72 61 63 |-form no|ninterac|
|00004c20| 74 69 76 65 20 62 79 74 | 65 2d 63 6f 6d 70 69 6c |tive byt|e-compil|
|00004c30| 65 2d 63 75 72 72 65 6e | 74 2d 66 69 6c 65 20 62 |e-curren|t-file b|
|00004c40| 79 74 65 2d 63 6f 6d 70 | 69 6c 65 2d 6c 61 73 74 |yte-comp|ile-last|
|00004c50| 2d 77 61 72 6e 65 64 2d | 66 6f 72 6d 20 6d 65 73 |-warned-|form mes|
|00004c60| 73 61 67 65 20 66 6f 72 | 6d 61 74 20 22 57 68 69 |sage for|mat "Whi|
|00004c70| 6c 65 20 63 6f 6d 70 69 | 6c 69 6e 67 20 25 73 25 |le compi|ling %s%|
|00004c80| 73 3a 22 20 22 20 69 6e | 20 66 69 6c 65 20 22 20 |s:" " in| file " |
|00004c90| 22 20 69 6e 20 62 75 66 | 66 65 72 20 22 20 62 75 |" in buf|fer " bu|
|00004ca0| 66 66 65 72 2d 6e 61 6d | 65 20 22 22 20 22 20 20 |ffer-nam|e "" " |
|00004cb0| 25 73 22 20 73 74 72 69 | 6e 67 20 67 65 74 2d 62 |%s" stri|ng get-b|
|00004cc0| 75 66 66 65 72 2d 63 72 | 65 61 74 65 20 22 2a 43 |uffer-cr|eate "*C|
|00004cd0| 6f 6d 70 69 6c 65 2d 4c | 6f 67 2a 22 20 22 5c 6e |ompile-L|og*" "\n|
|00004ce0| 0c 5c 6e 22 20 63 75 72 | 72 65 6e 74 2d 74 69 6d |.\n" cur|rent-tim|
|00004cf0| 65 2d 73 74 72 69 6e 67 | 20 22 5c 6e 22 20 22 57 |e-string| "\n" "W|
|00004d00| 68 69 6c 65 20 63 6f 6d | 70 69 6c 69 6e 67 20 22 |hile com|piling "|
|00004d10| 20 22 25 73 22 20 22 3a | 5c 6e 22 20 22 20 20 22 | "%s" ":|\n" " "|
|00004d20| 20 66 69 6c 6c 20 73 74 | 72 69 6e 67 2d 6d 61 74 | fill st|ring-mat|
|00004d30| 63 68 20 22 20 20 20 20 | 20 22 20 37 38 20 66 69 |ch " | " 78 fi|
|00004d40| 6c 6c 2d 63 6f 6c 75 6d | 6e 20 66 69 6c 6c 2d 70 |ll-colum|n fill-p|
|00004d50| 72 65 66 69 78 20 66 69 | 6c 6c 2d 70 61 72 61 67 |refix fi|ll-parag|
|00004d60| 72 61 70 68 20 6e 69 6c | 5d 20 37 5d 20 62 79 74 |raph nil|] 7] byt|
|00004d70| 65 2d 63 6f 6d 70 69 6c | 65 2d 77 61 72 6e 20 23 |e-compil|e-warn #|
|00004d80| 5b 28 66 6f 72 6d 61 74 | 20 26 72 65 73 74 20 61 |[(format| &rest a|
|00004d90| 72 67 73 29 20 22 c0 c1 | 09 5c 6e 23 11 0b ab 85 |rgs) "..|.\n#....|
|00004da0| c4 c5 09 5c 22 87 c6 c7 | 09 50 c8 5c 22 88 0e 09 |...\"...|.P.\"...|
|00004db0| ae 84 ca cb 09 5c 22 87 | 22 20 5b 61 70 70 6c 79 |.....\".|" [apply|
|00004dc0| 20 66 6f 72 6d 61 74 20 | 61 72 67 73 20 62 79 74 | format |args byt|
|00004dd0| 65 2d 63 6f 6d 70 69 6c | 65 2d 65 72 72 6f 72 2d |e-compil|e-error-|
|00004de0| 6f 6e 2d 77 61 72 6e 20 | 65 72 72 6f 72 20 22 25 |on-warn |error "%|
|00004df0| 73 22 20 62 79 74 65 2d | 63 6f 6d 70 69 6c 65 2d |s" byte-|compile-|
|00004e00| 6c 6f 67 2d 31 20 22 2a | 2a 20 22 20 74 20 6e 6f |log-1 "*|* " t no|
|00004e10| 6e 69 6e 74 65 72 61 63 | 74 69 76 65 20 6d 65 73 |ninterac|tive mes|
|00004e20| 73 61 67 65 20 22 57 61 | 72 6e 69 6e 67 3a 20 25 |sage "Wa|rning: %|
|00004e30| 73 22 5d 20 34 5d 20 62 | 79 74 65 2d 63 6f 6d 70 |s"] 4] b|yte-comp|
|00004e40| 69 6c 65 2d 6f 62 73 6f | 6c 65 74 65 20 23 5b 28 |ile-obso|lete #[(|
|00004e50| 66 6f 72 6d 29 20 22 08 | 40 c1 4e 1a c3 0c 3e ab |form) ".|@.N...>.|
|00004e60| 94 c5 c6 08 40 5c 6e 40 | 3b ab 84 5c 6e 40 aa 85 |....@\n@|;..\n@..|
|00004e70| c7 c8 5c 6e 40 5c 22 23 | 88 5c 6e 41 ae 81 c9 08 |..\n@\"#|.\nA....|
|00004e80| 21 29 87 22 20 5b 66 6f | 72 6d 20 62 79 74 65 2d |!)." [fo|rm byte-|
|00004e90| 6f 62 73 6f 6c 65 74 65 | 2d 69 6e 66 6f 20 6e 65 |obsolete|-info ne|
|00004ea0| 77 20 6f 62 73 6f 6c 65 | 74 65 20 62 79 74 65 2d |w obsole|te byte-|
|00004eb0| 63 6f 6d 70 69 6c 65 2d | 77 61 72 6e 69 6e 67 73 |compile-|warnings|
|00004ec0| 20 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 77 61 | byte-co|mpile-wa|
|00004ed0| 72 6e 20 22 25 73 20 69 | 73 20 61 6e 20 6f 62 73 |rn "%s i|s an obs|
|00004ee0| 6f 6c 65 74 65 20 66 75 | 6e 63 74 69 6f 6e 3b 20 |olete fu|nction; |
|00004ef0| 25 73 22 20 66 6f 72 6d | 61 74 20 22 75 73 65 20 |%s" form|at "use |
|00004f00| 25 73 20 69 6e 73 74 65 | 61 64 2e 22 20 62 79 74 |%s inste|ad." byt|
|00004f10| 65 2d 63 6f 6d 70 69 6c | 65 2d 6e 6f 72 6d 61 6c |e-compil|e-normal|
|00004f20| 2d 63 61 6c 6c 5d 20 36 | 5d 20 28 28 6f 70 74 69 |-call] 6|] ((opti|
|00004f30| 6d 69 7a 65 20 62 79 74 | 65 2d 6f 70 74 69 6d 69 |mize byt|e-optimi|
|00004f40| 7a 65 20 28 74 20 6e 69 | 6c 20 73 6f 75 72 63 65 |ze (t ni|l source|
|00004f50| 20 62 79 74 65 29 20 76 | 61 6c 29 20 28 66 69 6c | byte) v|al) (fil|
|00004f60| 65 2d 66 6f 72 6d 61 74 | 20 62 79 74 65 2d 63 6f |e-format| byte-co|
|00004f70| 6d 70 69 6c 65 2d 65 6d | 61 63 73 31 38 2d 63 6f |mpile-em|acs18-co|
|00004f80| 6d 70 61 74 69 62 69 6c | 69 74 79 20 28 65 6d 61 |mpatibil|ity (ema|
|00004f90| 63 73 31 38 20 65 6d 61 | 63 73 31 39 29 20 28 65 |cs18 ema|cs19) (e|
|00004fa0| 71 20 76 61 6c 20 27 65 | 6d 61 63 73 31 38 29 29 |q val 'e|macs18))|
|00004fb0| 20 28 6e 65 77 2d 62 79 | 74 65 63 6f 64 65 73 20 | (new-by|tecodes |
|00004fc0| 62 79 74 65 2d 63 6f 6d | 70 69 6c 65 2d 67 65 6e |byte-com|pile-gen|
|00004fd0| 65 72 61 74 65 2d 65 6d | 61 63 73 31 39 2d 62 79 |erate-em|acs19-by|
|00004fe0| 74 65 63 6f 64 65 73 20 | 28 74 20 6e 69 6c 29 20 |tecodes |(t nil) |
|00004ff0| 76 61 6c 29 20 28 64 65 | 6c 65 74 65 2d 65 72 72 |val) (de|lete-err|
|00005000| 6f 72 73 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |ors byte|-compile|
|00005010| 2d 64 65 6c 65 74 65 2d | 65 72 72 6f 72 73 20 28 |-delete-|errors (|
|00005020| 74 20 6e 69 6c 29 20 76 | 61 6c 29 20 28 76 65 72 |t nil) v|al) (ver|
|00005030| 62 6f 73 65 20 62 79 74 | 65 2d 63 6f 6d 70 69 6c |bose byt|e-compil|
|00005040| 65 2d 76 65 72 62 6f 73 | 65 20 28 74 20 6e 69 6c |e-verbos|e (t nil|
|00005050| 29 20 76 61 6c 29 20 28 | 77 61 72 6e 69 6e 67 73 |) val) (|warnings|
|00005060| 20 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 77 61 | byte-co|mpile-wa|
|00005070| 72 6e 69 6e 67 73 20 28 | 28 63 61 6c 6c 61 72 67 |rnings (|(callarg|
|00005080| 73 20 72 65 64 65 66 69 | 6e 65 20 66 72 65 65 2d |s redefi|ne free-|
|00005090| 76 61 72 73 20 75 6e 75 | 73 65 64 2d 76 61 72 73 |vars unu|sed-vars|
|000050a0| 20 75 6e 72 65 73 6f 6c | 76 65 64 29 29 20 76 61 | unresol|ved)) va|
|000050b0| 6c 29 29 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |l)) byte|-compile|
|000050c0| 72 2d 6c 65 67 61 6c 2d | 6f 70 74 69 6f 6e 73 20 |r-legal-|options |
|000050d0| 70 75 72 65 63 6f 70 79 | 20 62 79 74 65 2d 63 6f |purecopy| byte-co|
|000050e0| 6d 70 69 6c 65 72 2d 6f | 70 74 69 6f 6e 73 2d 68 |mpiler-o|ptions-h|
|000050f0| 61 6e 64 6c 65 72 20 23 | 5b 28 26 72 65 73 74 20 |andler #|[(&rest |
|00005100| 61 72 67 73 29 20 22 c0 | 89 89 89 19 1a 1b 1c 0d |args) ".|........|
|00005110| 83 c6 00 0d 40 3a ab 8b | 0d 40 41 41 ac 85 0d 40 |....@:..|.@AA...@|
|00005120| 41 ac 86 c6 c7 0d 40 5c | 22 88 0d 40 40 14 0d 40 |A.....@\|"..@@..@|
|00005130| 41 40 13 0c 0e 08 9e 89 | 12 ac 85 c6 c9 0c 5c 22 |A@......|......\"|
|00005140| 88 ca 5c 6e 38 89 11 40 | 3a ab e9 c0 1e 0b cc 1e |..\n8..@|:.......|
|00005150| 0d 5c 6e 41 40 1e 0e 0b | 40 cf 3e ad 90 d0 0e 0e |.\nA@...|@.>.....|
|00005160| 4a d1 3d ab 84 09 40 aa | 83 0e 0e 4a 21 1e 12 09 |J.=...@.|...J!...|
|00005170| 40 11 0b ab b6 0b 40 89 | 16 0b 09 3e ab 8b 0e 0d |@.....@.|...>....|
|00005180| 0e 0b 0e 12 5c 22 16 12 | aa 9c 0e 0b d3 3d ab 85 |....\"..|.....=..|
|00005190| cc 16 0d aa 91 0e 0b d4 | 3d ab 85 d5 16 0d aa 86 |........|=.......|
|000051a0| c6 d6 0c 09 23 88 0b 41 | 89 13 ac 4a 5c 6e 41 40 |....#..A|...J\nA@|
|000051b0| 0e 12 4c 88 2c aa 95 0b | 09 3e ac 86 c6 d7 0c 09 |..L.,...|.>......|
|000051c0| 23 88 5c 6e 41 40 d8 d9 | 5c 6e 38 21 4c 88 0d 41 |#.\nA@..|\n8!L..A|
|000051d0| 89 15 84 0c 00 2c c0 87 | 22 20 5b 6e 69 6c 20 63 |.....,..|" [nil c|
|000051e0| 68 6f 69 63 65 73 20 64 | 65 73 63 20 76 61 6c 20 |hoices d|esc val |
|000051f0| 6b 65 79 20 61 72 67 73 | 20 65 72 72 6f 72 20 22 |key args| error "|
|00005200| 6d 61 6c 66 6f 72 6d 65 | 64 20 62 79 74 65 2d 63 |malforme|d byte-c|
|00005210| 6f 6d 70 69 6c 65 72 2d | 6f 70 74 69 6f 6e 20 25 |ompiler-|option %|
|00005220| 73 22 20 62 79 74 65 2d | 63 6f 6d 70 69 6c 65 72 |s" byte-|compiler|
|00005230| 2d 6c 65 67 61 6c 2d 6f | 70 74 69 6f 6e 73 20 22 |-legal-o|ptions "|
|00005240| 75 6e 6b 6e 6f 77 6e 20 | 62 79 74 65 2d 63 6f 6d |unknown |byte-com|
|00005250| 70 69 6c 65 72 20 6f 70 | 74 69 6f 6e 20 25 73 22 |piler op|tion %s"|
|00005260| 20 32 20 74 68 69 73 20 | 63 6f 6e 73 20 68 61 6e | 2 this |cons han|
|00005270| 64 6c 65 72 20 76 61 72 | 20 28 2b 20 2d 29 20 63 |dler var| (+ -) c|
|00005280| 6f 70 79 2d 73 65 71 75 | 65 6e 63 65 20 74 20 72 |opy-sequ|ence t r|
|00005290| 65 74 20 2b 20 2d 20 64 | 65 6c 71 20 22 25 73 20 |et + - d|elq "%s |
|000052a0| 6f 6e 6c 79 20 61 63 63 | 65 70 74 73 20 25 73 2e |only acc|epts %s.|
|000052b0| 22 20 22 25 73 20 6d 75 | 73 74 20 62 65 20 6f 6e |" "%s mu|st be on|
|000052c0| 65 20 6f 66 20 25 73 2e | 22 20 65 76 61 6c 20 33 |e of %s.|" eval 3|
|000052d0| 5d 20 35 5d 20 62 79 74 | 65 2d 63 6f 6d 70 69 6c |] 5] byt|e-compil|
|000052e0| 65 2d 66 64 65 66 69 6e | 69 74 69 6f 6e 20 23 5b |e-fdefin|ition #[|
|000052f0| 28 6e 61 6d 65 20 6d 61 | 63 72 6f 2d 70 29 20 22 |(name ma|cro-p) "|
|00005300| 08 c1 3e ab 83 5c 6e aa | 81 0b 1c 0d 0c 9e 41 89 |..>..\n.|......A.|
|00005310| 1e 06 ae d3 0d 89 1e 07 | 39 ab 8e c8 0e 07 21 ab |........|9.....!.|
|00005320| 88 0e 07 4b 89 16 07 aa | 6f 08 ac 86 c9 0e 07 21 |...K....|o......!|
|00005330| ac 8b 08 ca 3d ab 8a cb | 0e 07 21 ab 84 0e 07 aa |....=...|..!.....|
|00005340| a5 0e 07 3a ad a0 08 ca | 3d 3f ad 9a 0e 07 40 cc |...:....|=?....@.|
|00005350| 3d ab 85 0e 07 41 aa 8e | 08 3f ad 8a 0e 07 40 cd |=....A..|.?....@.|
|00005360| 3d 3f ad 82 0e 07 29 2a | 87 22 20 5b 6d 61 63 72 |=?....)*|." [macr|
|00005370| 6f 2d 70 20 28 6e 69 6c | 20 73 75 62 72 29 20 62 |o-p (nil| subr) b|
|00005380| 79 74 65 2d 63 6f 6d 70 | 69 6c 65 2d 66 75 6e 63 |yte-comp|ile-func|
|00005390| 74 69 6f 6e 2d 65 6e 76 | 69 72 6f 6e 6d 65 6e 74 |tion-env|ironment|
|000053a0| 20 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 6d 61 | byte-co|mpile-ma|
|000053b0| 63 72 6f 2d 65 6e 76 69 | 72 6f 6e 6d 65 6e 74 20 |cro-envi|ronment |
|000053c0| 6c 69 73 74 20 6e 61 6d | 65 20 65 6e 76 20 66 6e |list nam|e env fn|
|000053d0| 20 66 62 6f 75 6e 64 70 | 20 63 6f 6d 70 69 6c 65 | fboundp| compile|
|000053e0| 64 2d 66 75 6e 63 74 69 | 6f 6e 2d 70 20 73 75 62 |d-functi|on-p sub|
|000053f0| 72 20 73 75 62 72 70 20 | 6d 61 63 72 6f 20 61 75 |r subrp |macro au|
|00005400| 74 6f 6c 6f 61 64 5d 20 | 33 5d 20 62 79 74 65 2d |toload] |3] byte-|
|00005410| 63 6f 6d 70 69 6c 65 2d | 61 72 67 6c 69 73 74 2d |compile-|arglist-|
|00005420| 73 69 67 6e 61 74 75 72 | 65 20 23 5b 28 61 72 67 |signatur|e #[(arg|
|00005430| 6c 69 73 74 29 20 22 c0 | c1 89 1a 1b 1c 0d ab ae |list) ".|........|
|00005440| 0d 40 c6 3d ab 87 0b ac | 9f c0 13 aa 9b 0d 40 c7 |.@.=....|......@.|
|00005450| 3d ab 8a 0d 41 ab 91 c8 | 12 c1 15 aa 8b 0b ab 85 |=...A...|........|
|00005460| 0b 54 13 aa 83 0c 54 14 | 0d 41 89 15 ac 52 0c 5c |.T....T.|.A...R.\|
|00005470| 6e 3f ad 89 0b ab 85 0c | 0b 5c 5c aa 81 0c 2b 42 |n?......|.\\...+B|
|00005480| 87 22 20 5b 30 20 6e 69 | 6c 20 72 65 73 74 70 20 |." [0 ni|l restp |
|00005490| 6f 70 74 73 20 61 72 67 | 73 20 61 72 67 6c 69 73 |opts arg|s arglis|
|000054a0| 74 20 26 6f 70 74 69 6f | 6e 61 6c 20 26 72 65 73 |t &optio|nal &res|
|000054b0| 74 20 74 5d 20 34 5d 20 | 62 79 74 65 2d 63 6f 6d |t t] 4] |byte-com|
|000054c0| 70 69 6c 65 2d 61 72 67 | 6c 69 73 74 2d 73 69 67 |pile-arg|list-sig|
|000054d0| 6e 61 74 75 72 65 73 2d | 63 6f 6e 67 72 75 65 6e |natures-|congruen|
|000054e0| 74 2d 70 20 23 5b 28 6f | 6c 64 20 6e 65 77 29 20 |t-p #[(o|ld new) |
|000054f0| 22 08 40 09 40 56 ae 95 | 09 41 ac 84 08 41 ae 8d |".@.@V..|.A...A..|
|00005500| 08 41 ad 89 09 41 ad 85 | 08 41 09 41 57 3f 87 22 |.A...A..|.A.AW?."|
|00005510| 20 5b 6e 65 77 20 6f 6c | 64 5d 20 32 5d 20 62 79 | [new ol|d] 2] by|
|00005520| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 61 72 67 6c 69 |te-compi|le-argli|
|00005530| 73 74 2d 73 69 67 6e 61 | 74 75 72 65 2d 73 74 72 |st-signa|ture-str|
|00005540| 69 6e 67 20 23 5b 28 73 | 69 67 6e 61 74 75 72 65 |ing #[(s|ignature|
|00005550| 29 20 22 08 41 ac 86 c1 | c2 08 40 5c 22 87 08 40 |) ".A...|..@\"..@|
|00005560| 08 41 55 ab 86 c1 c3 08 | 40 5c 22 87 c1 c4 08 40 |.AU.....|@\"....@|
|00005570| 08 41 23 87 22 20 5b 73 | 69 67 6e 61 74 75 72 65 |.A#." [s|ignature|
|00005580| 20 66 6f 72 6d 61 74 20 | 22 25 64 2b 22 20 22 25 | format |"%d+" "%|
|00005590| 64 22 20 22 25 64 2d 25 | 64 22 5d 20 34 5d 20 62 |d" "%d-%|d"] 4] b|
|000055a0| 79 74 65 2d 63 6f 6d 70 | 69 6c 65 2d 63 61 6c 6c |yte-comp|ile-call|
|000055b0| 61 72 67 73 2d 77 61 72 | 6e 20 23 5b 28 66 6f 72 |args-war|n #[(for|
|000055c0| 6d 29 20 22 c0 09 40 c2 | 5c 22 ae 85 c0 09 40 c3 |m) "..@.|\"....@.|
|000055d0| 5c 22 89 1c ad 90 c5 0c | a2 c6 3d ab 85 0c 41 40 |\"......|..=...A@|
|000055e0| aa 83 c7 0c 21 21 1e 08 | 09 41 47 1e 09 0c ac 97 |....!!..|.AG.....|
|000055f0| ca cb 21 ab 92 c0 09 40 | cc 5c 22 89 14 ab 89 cb |..!....@|.\".....|
|00005600| 0c 21 cd 0c 21 42 16 08 | 0e 08 ab b8 0e 09 0e 08 |.!..!B..|........|
|00005610| 40 57 ac 8d 0e 08 41 ad | e6 0e 09 0e 08 41 56 ad |@W....A.|.....AV.|
|00005620| de ce cf 09 40 0e 09 89 | d0 55 ab 83 d1 aa 81 d2 |....@...|.U......|
|00005630| 0e 09 0e 08 40 57 ab 83 | d3 aa 81 d4 d5 0e 08 21 |....@W..|.......!|
|00005640| 26 06 aa bb ca 09 40 21 | ae b5 09 40 0e 16 3d ae |&.....@!|...@..=.|
|00005650| ae 09 40 0e 17 9e 09 41 | 47 1e 18 89 1e 19 ab 93 |..@....A|G.......|
|00005660| 0e 18 0e 19 41 3e ae 96 | 0e 19 0e 18 0e 19 41 42 |....A>..|......AB|
|00005670| a1 aa 8b 09 40 0e 18 44 | 0e 17 42 89 16 17 2a 2b |....@..D|..B...*+|
|00005680| 87 22 20 5b 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |." [byte|-compile|
|00005690| 2d 66 64 65 66 69 6e 69 | 74 69 6f 6e 20 66 6f 72 |-fdefini|tion for|
|000056a0| 6d 20 6e 69 6c 20 74 20 | 64 65 66 20 62 79 74 65 |m nil t |def byte|
|000056b0| 2d 63 6f 6d 70 69 6c 65 | 2d 61 72 67 6c 69 73 74 |-compile|-arglist|
|000056c0| 2d 73 69 67 6e 61 74 75 | 72 65 20 6c 61 6d 62 64 |-signatu|re lambd|
|000056d0| 61 20 63 6f 6d 70 69 6c | 65 64 2d 66 75 6e 63 74 |a compil|ed-funct|
|000056e0| 69 6f 6e 2d 61 72 67 6c | 69 73 74 20 73 69 67 20 |ion-argl|ist sig |
|000056f0| 6e 63 61 6c 6c 20 66 62 | 6f 75 6e 64 70 20 73 75 |ncall fb|oundp su|
|00005700| 62 72 2d 6d 69 6e 2d 61 | 72 67 73 20 73 75 62 72 |br-min-a|rgs subr|
|00005710| 20 73 75 62 72 2d 6d 61 | 78 2d 61 72 67 73 20 62 | subr-ma|x-args b|
|00005720| 79 74 65 2d 63 6f 6d 70 | 69 6c 65 2d 77 61 72 6e |yte-comp|ile-warn|
|00005730| 20 22 25 73 20 63 61 6c | 6c 65 64 20 77 69 74 68 | "%s cal|led with|
|00005740| 20 25 64 20 61 72 67 75 | 6d 65 6e 74 25 73 2c 20 | %d argu|ment%s, |
|00005750| 62 75 74 20 25 73 20 25 | 73 22 20 31 20 22 22 20 |but %s %|s" 1 "" |
|00005760| 22 73 22 20 22 72 65 71 | 75 69 72 65 73 22 20 22 |"s" "req|uires" "|
|00005770| 61 63 63 65 70 74 73 20 | 6f 6e 6c 79 22 20 62 79 |accepts |only" by|
|00005780| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 61 72 67 6c 69 |te-compi|le-argli|
|00005790| 73 74 2d 73 69 67 6e 61 | 74 75 72 65 2d 73 74 72 |st-signa|ture-str|
|000057a0| 69 6e 67 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |ing byte|-compile|
|000057b0| 2d 63 75 72 72 65 6e 74 | 2d 66 6f 72 6d 20 62 79 |-current|-form by|
|000057c0| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 75 6e 72 65 73 |te-compi|le-unres|
|000057d0| 6f 6c 76 65 64 2d 66 75 | 6e 63 74 69 6f 6e 73 20 |olved-fu|nctions |
|000057e0| 6e 20 63 6f 6e 73 5d 20 | 39 5d 20 62 79 74 65 2d |n cons] |9] byte-|
|000057f0| 63 6f 6d 70 69 6c 65 2d | 61 72 67 6c 69 73 74 2d |compile-|arglist-|
|00005800| 77 61 72 6e 20 23 5b 28 | 66 6f 72 6d 20 6d 61 63 |warn #[(|form mac|
|00005810| 72 6f 70 29 20 22 c0 09 | 41 40 5c 6e 5c 22 89 1b |rop) "..|A@\n\"..|
|00005820| ab c7 c4 0b a2 c5 3d ab | 85 0b 41 40 aa 83 c6 0b |......=.|..A@....|
|00005830| 21 21 c4 c7 09 38 21 1e | 08 1e 09 ca 0e 09 0e 08 |!!...8!.|........|
|00005840| 5c 22 ae a3 cb cc 09 40 | cd 3d ab 83 ce aa 81 cf |\".....@|.=......|
|00005850| 09 41 40 d0 0e 09 21 0e | 09 d1 9a ab 83 d2 aa 81 |.A@...!.|........|
|00005860| d3 d0 0e 08 21 26 06 2a | aa ed 09 41 40 0e 14 9e |....!&.*|...A@...|
|00005870| d5 89 89 89 1e 16 1e 17 | 1e 18 1e 19 89 1e 1a ad |........|........|
|00005880| d5 c4 c7 09 38 21 16 18 | db dc 0e 1a 41 21 dd 5c |....8!..|....A!.\|
|00005890| 22 89 16 19 40 16 17 0e | 19 9f 40 16 16 0e 17 0e |"...@...|..@.....|
|000058a0| 18 40 57 ac 8d 0e 18 41 | ab a4 0e 16 0e 18 41 56 |.@W....A|......AV|
|000058b0| ab 9c cb de 09 41 40 d0 | 0e 18 21 0e 18 df 9a ab |.....A@.|..!.....|
|000058c0| 83 e0 aa 81 e1 d0 0e 17 | 0e 16 42 21 25 88 e2 0e |........|..B!%...|
|000058d0| 1a 0e 14 5c 22 89 16 14 | 2d 29 87 22 20 5b 62 79 |...\"...|-)." [by|
|000058e0| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 66 64 65 66 69 |te-compi|le-fdefi|
|000058f0| 6e 69 74 69 6f 6e 20 66 | 6f 72 6d 20 6d 61 63 72 |nition f|orm macr|
|00005900| 6f 70 20 6f 6c 64 20 62 | 79 74 65 2d 63 6f 6d 70 |op old b|yte-comp|
|00005910| 69 6c 65 2d 61 72 67 6c | 69 73 74 2d 73 69 67 6e |ile-argl|ist-sign|
|00005920| 61 74 75 72 65 20 6c 61 | 6d 62 64 61 20 63 6f 6d |ature la|mbda com|
|00005930| 70 69 6c 65 64 2d 66 75 | 6e 63 74 69 6f 6e 2d 61 |piled-fu|nction-a|
|00005940| 72 67 6c 69 73 74 20 32 | 20 73 69 67 32 20 73 69 |rglist 2| sig2 si|
|00005950| 67 31 20 62 79 74 65 2d | 63 6f 6d 70 69 6c 65 2d |g1 byte-|compile-|
|00005960| 61 72 67 6c 69 73 74 2d | 73 69 67 6e 61 74 75 72 |arglist-|signatur|
|00005970| 65 73 2d 63 6f 6e 67 72 | 75 65 6e 74 2d 70 20 62 |es-congr|uent-p b|
|00005980| 79 74 65 2d 63 6f 6d 70 | 69 6c 65 2d 77 61 72 6e |yte-comp|ile-warn|
|00005990| 20 22 25 73 20 25 73 20 | 75 73 65 64 20 74 6f 20 | "%s %s |used to |
|000059a0| 74 61 6b 65 20 25 73 20 | 25 73 2c 20 6e 6f 77 20 |take %s |%s, now |
|000059b0| 74 61 6b 65 73 20 25 73 | 22 20 64 65 66 75 6e 20 |takes %s|" defun |
|000059c0| 22 66 75 6e 63 74 69 6f | 6e 22 20 22 6d 61 63 72 |"functio|n" "macr|
|000059d0| 6f 22 20 62 79 74 65 2d | 63 6f 6d 70 69 6c 65 2d |o" byte-|compile-|
|000059e0| 61 72 67 6c 69 73 74 2d | 73 69 67 6e 61 74 75 72 |arglist-|signatur|
|000059f0| 65 2d 73 74 72 69 6e 67 | 20 28 31 20 2e 20 31 29 |e-string| (1 . 1)|
|00005a00| 20 22 61 72 67 75 6d 65 | 6e 74 22 20 22 61 72 67 | "argume|nt" "arg|
|00005a10| 75 6d 65 6e 74 73 22 20 | 62 79 74 65 2d 63 6f 6d |uments" |byte-com|
|00005a20| 70 69 6c 65 2d 75 6e 72 | 65 73 6f 6c 76 65 64 2d |pile-unr|esolved-|
|00005a30| 66 75 6e 63 74 69 6f 6e | 73 20 6e 69 6c 20 6d 61 |function|s nil ma|
|00005a40| 78 20 6d 69 6e 20 73 69 | 67 20 6e 75 6d 73 20 63 |x min si|g nums c|
|00005a50| 61 6c 6c 73 20 73 6f 72 | 74 20 63 6f 70 79 2d 73 |alls sor|t copy-s|
|00005a60| 65 71 75 65 6e 63 65 20 | 3c 20 22 25 73 20 62 65 |equence |< "%s be|
|00005a70| 69 6e 67 20 64 65 66 69 | 6e 65 64 20 74 6f 20 74 |ing defi|ned to t|
|00005a80| 61 6b 65 20 25 73 25 73 | 2c 20 62 75 74 20 77 61 |ake %s%s|, but wa|
|00005a90| 73 20 70 72 65 76 69 6f | 75 73 6c 79 20 63 61 6c |s previo|usly cal|
|00005aa0| 6c 65 64 20 77 69 74 68 | 20 25 73 22 20 28 31 20 |led with| %s" (1 |
|00005ab0| 2e 20 31 29 20 22 20 61 | 72 67 22 20 22 20 61 72 |. 1) " a|rg" " ar|
|00005ac0| 67 73 22 20 64 65 6c 71 | 5d 20 39 5d 20 62 79 74 |gs" delq|] 9] byt|
|00005ad0| 65 2d 63 6f 6d 70 69 6c | 65 2d 77 61 72 6e 2d 61 |e-compil|e-warn-a|
|00005ae0| 62 6f 75 74 2d 75 6e 72 | 65 73 6f 6c 76 65 64 2d |bout-unr|esolved-|
|00005af0| 66 75 6e 63 74 69 6f 6e | 73 20 23 5b 28 26 6f 70 |function|s #[(&op|
|00005b00| 74 69 6f 6e 61 6c 20 6d | 73 67 29 20 22 c0 09 3e |tional m|sg) "..>|
|00005b10| 83 a4 00 5c 6e ae 81 c3 | 1c 0d ab a1 0e 06 89 1e |...\n...|........|
|00005b20| 07 ab 99 0e 07 40 40 0d | 9e ab 89 c8 0e 07 40 0e |.....@@.|......@.|
|00005b30| 06 5c 22 16 06 0e 07 41 | 89 16 07 ac 67 29 0e 06 |.\"....A|....g)..|
|00005b40| 41 ab e3 c9 1e 5c 6e c9 | 47 cb 5c 5c 1e 0c cd 0e |A....\n.|G.\\....|
|00005b50| 06 21 1e 07 ce 1e 0f 0e | 07 ab c4 d0 0e 07 40 40 |.!......|......@@|
|00005b60| 21 16 0f 0e 0c 0e 0f 47 | d1 5c 5c 5c 5c 16 0c 0e |!......G|.\\\\...|
|00005b70| 07 41 16 07 0e 0c 0e 12 | 53 58 ab 8f 0e 5c 6e d3 |.A......|SX...\n.|
|00005b80| 0e 0f 0e 07 ad 81 d4 52 | 16 5c 6e aa 4e 0e 5c 6e |.......R|.\n.N.\n|
|00005b90| d5 0e 0f 0e 07 ad 81 d4 | 52 16 5c 6e 0e 0f 47 d6 |........|R.\n..G.|
|00005ba0| 5c 5c 16 0c aa 38 d7 d8 | 0e 5c 6e 5c 22 88 2c aa |\\...8..|.\n\".,.|
|00005bb0| 8c 0e 06 ab 88 d7 d9 0e | 06 40 40 5c 22 88 29 ce |........|.@@\".).|
|00005bc0| 87 22 20 5b 75 6e 72 65 | 73 6f 6c 76 65 64 20 62 |." [unre|solved b|
|00005bd0| 79 74 65 2d 63 6f 6d 70 | 69 6c 65 2d 77 61 72 6e |yte-comp|ile-warn|
|00005be0| 69 6e 67 73 20 6d 73 67 | 20 22 74 68 65 20 65 6e |ings msg| "the en|
|00005bf0| 64 20 6f 66 20 74 68 65 | 20 64 61 74 61 22 20 62 |d of the| data" b|
|00005c00| 79 74 65 2d 63 6f 6d 70 | 69 6c 65 2d 63 75 72 72 |yte-comp|ile-curr|
|00005c10| 65 6e 74 2d 66 6f 72 6d | 20 62 79 74 65 2d 63 6f |ent-form| byte-co|
|00005c20| 6d 70 69 6c 65 2d 61 75 | 74 6f 6c 6f 61 64 2d 65 |mpile-au|toload-e|
|00005c30| 6e 76 69 72 6f 6e 6d 65 | 6e 74 20 62 79 74 65 2d |nvironme|nt byte-|
|00005c40| 63 6f 6d 70 69 6c 65 2d | 75 6e 72 65 73 6f 6c 76 |compile-|unresolv|
|00005c50| 65 64 2d 66 75 6e 63 74 | 69 6f 6e 73 20 72 65 73 |ed-funct|ions res|
|00005c60| 74 20 64 65 6c 71 20 22 | 54 68 65 20 66 6f 6c 6c |t delq "|The foll|
|00005c70| 6f 77 69 6e 67 20 66 75 | 6e 63 74 69 6f 6e 73 20 |owing fu|nctions |
|00005c80| 61 72 65 20 6e 6f 74 20 | 6b 6e 6f 77 6e 20 74 6f |are not |known to|
|00005c90| 20 62 65 20 64 65 66 69 | 6e 65 64 3a 20 22 20 73 | be defi|ned: " s|
|00005ca0| 74 72 20 35 20 4c 20 72 | 65 76 65 72 73 65 20 6e |tr 5 L r|everse n|
|00005cb0| 69 6c 20 73 20 73 79 6d | 62 6f 6c 2d 6e 61 6d 65 |il s sym|bol-name|
|00005cc0| 20 32 20 66 69 6c 6c 2d | 63 6f 6c 75 6d 6e 20 22 | 2 fill-|column "|
|00005cd0| 20 22 20 22 2c 22 20 22 | 5c 6e 20 20 20 20 22 20 | " "," "|\n " |
|00005ce0| 34 20 62 79 74 65 2d 63 | 6f 6d 70 69 6c 65 2d 77 |4 byte-c|ompile-w|
|00005cf0| 61 72 6e 20 22 25 73 22 | 20 22 74 68 65 20 66 75 |arn "%s"| "the fu|
|00005d00| 6e 63 74 69 6f 6e 20 25 | 73 20 69 73 20 6e 6f 74 |nction %|s is not|
|00005d10| 20 6b 6e 6f 77 6e 20 74 | 6f 20 62 65 20 64 65 66 | known t|o be def|
|00005d20| 69 6e 65 64 2e 22 5d 20 | 35 5d 20 62 79 74 65 2d |ined."] |5] byte-|
|00005d30| 63 6f 6d 70 69 6c 65 2d | 64 65 66 76 61 72 2d 70 |compile-|defvar-p|
|00005d40| 20 23 5b 28 76 61 72 29 | 20 22 c0 09 21 ae a4 5c | #[(var)| "..!..\|
|00005d50| 6e 89 1b ab 9c 09 ab 99 | 09 0b 40 a2 3d ab 8c c4 |n.......|..@.=...|
|00005d60| 0b 40 41 0d 5c 22 c6 55 | ac 82 c7 11 0b 41 89 13 |.@A.\".U|.....A..|
|00005d70| ac 64 09 29 3f 87 22 20 | 5b 67 6c 6f 62 61 6c 6c |.d.)?." |[globall|
|00005d80| 79 2d 62 6f 75 6e 64 70 | 20 76 61 72 20 62 79 74 |y-boundp| var byt|
|00005d90| 65 2d 63 6f 6d 70 69 6c | 65 2d 62 6f 75 6e 64 2d |e-compil|e-bound-|
|00005da0| 76 61 72 69 61 62 6c 65 | 73 20 72 65 73 74 20 6c |variable|s rest l|
|00005db0| 6f 67 61 6e 64 20 62 79 | 74 65 2d 63 6f 6d 70 69 |ogand by|te-compi|
|00005dc0| 6c 65 2d 67 6c 6f 62 61 | 6c 2d 62 69 74 20 30 20 |le-globa|l-bit 0 |
|00005dd0| 6e 69 6c 5d 20 34 5d 20 | 62 79 74 65 2d 63 6f 6d |nil] 4] |byte-com|
|00005de0| 70 69 6c 65 2d 77 61 72 | 6e 2d 61 62 6f 75 74 2d |pile-war|n-about-|
|00005df0| 75 6e 75 73 65 64 2d 76 | 61 72 69 61 62 6c 65 73 |unused-v|ariables|
|00005e00| 20 23 5b 6e 69 6c 20 22 | 08 c1 89 1a 1b 89 1c ab | #[nil "|........|
|00005e10| ae 0c 40 c5 3d ac a8 0c | 40 12 c6 0e 07 5c 6e 41 |..@.=...|@....\nA|
|00005e20| 5c 22 c8 55 ab 95 c6 0e | 09 5c 6e 41 5c 22 c8 55 |\".U....|.\nA\".U|
|00005e30| ab 8b ca 5c 6e 40 21 ac | 85 5c 6e 40 0b 42 13 0c |...\n@!.|.\n@.B..|
|00005e40| 41 89 14 ac 52 0b 9f 89 | 13 ad 8f cb cc cd 0b 40 |A...R...|.......@|
|00005e50| 5c 22 21 88 0b 41 89 13 | ac 72 c1 2b 87 22 20 5b |\"!..A..|.r.+." [|
|00005e60| 62 79 74 65 2d 63 6f 6d | 70 69 6c 65 2d 62 6f 75 |byte-com|pile-bou|
|00005e70| 6e 64 2d 76 61 72 69 61 | 62 6c 65 73 20 6e 69 6c |nd-varia|bles nil|
|00005e80| 20 63 65 6c 6c 20 75 6e | 72 65 66 65 72 65 6e 63 | cell un|referenc|
|00005e90| 65 64 20 72 65 73 74 20 | 6e 65 77 2d 73 63 6f 70 |ed rest |new-scop|
|00005ea0| 65 20 6c 6f 67 61 6e 64 | 20 62 79 74 65 2d 63 6f |e logand| byte-co|
|00005eb0| 6d 70 69 6c 65 2d 72 65 | 66 65 72 65 6e 63 65 64 |mpile-re|ferenced|
|00005ec0| 2d 62 69 74 20 30 20 62 | 79 74 65 2d 63 6f 6d 70 |-bit 0 b|yte-comp|
|00005ed0| 69 6c 65 2d 61 72 67 6c | 69 73 74 2d 62 69 74 20 |ile-argl|ist-bit |
|00005ee0| 62 79 74 65 2d 63 6f 6d | 70 69 6c 65 2d 64 65 66 |byte-com|pile-def|
|00005ef0| 76 61 72 2d 70 20 62 79 | 74 65 2d 63 6f 6d 70 69 |var-p by|te-compi|
|00005f00| 6c 65 2d 77 61 72 6e 20 | 66 6f 72 6d 61 74 20 22 |le-warn |format "|
|00005f10| 76 61 72 69 61 62 6c 65 | 20 25 73 20 62 6f 75 6e |variable| %s boun|
|00005f20| 64 20 62 75 74 20 6e 6f | 74 20 72 65 66 65 72 65 |d but no|t refere|
|00005f30| 6e 63 65 64 22 5d 20 35 | 5d 20 62 79 74 65 2d 63 |nced"] 5|] byte-c|
|00005f40| 6f 6d 70 69 6c 65 2d 63 | 6f 6e 73 74 70 20 28 6d |ompile-c|onstp (m|
|00005f50| 61 63 72 6f 20 2e 20 23 | 5b 28 66 6f 72 6d 29 20 |acro . #|[(form) |
|00005f60| 22 c0 c1 5c 6e 44 c3 c4 | 5c 6e 44 c5 42 42 44 c6 |"..\nD..|\nD.BBD.|
|00005f70| c7 5c 6e 44 44 43 c8 5c | 6e 44 43 c9 5c 6e ca 42 |.\nDDC.\|nDC.\n.B|
|00005f80| 42 43 af 05 87 22 20 5b | 63 6f 6e 64 20 63 6f 6e |BC..." [|cond con|
|00005f90| 73 70 20 66 6f 72 6d 20 | 65 71 20 63 61 72 20 28 |sp form |eq car (|
|00005fa0| 27 71 75 6f 74 65 29 20 | 6e 6f 74 20 73 79 6d 62 |'quote) |not symb|
|00005fb0| 6f 6c 70 20 6b 65 79 77 | 6f 72 64 70 20 6d 65 6d |olp keyw|ordp mem|
|00005fc0| 71 20 28 27 28 6e 69 6c | 20 74 29 29 5d 20 37 5d |q ('(nil| t))] 7]|
|00005fd0| 29 20 62 79 74 65 2d 63 | 6f 6d 70 69 6c 65 2d 63 |) byte-c|ompile-c|
|00005fe0| 6c 6f 73 65 2d 76 61 72 | 69 61 62 6c 65 73 20 28 |lose-var|iables (|
|00005ff0| 6d 61 63 72 6f 20 2e 20 | 23 5b 28 26 72 65 73 74 |macro . |#[(&rest|
|00006000| 20 62 6f 64 79 29 20 22 | c0 c1 c2 c3 0c 42 c5 45 | body) "|.....B.E|
|00006010| 43 42 42 87 22 20 5b 6c | 65 74 20 28 28 62 79 74 |CBB." [l|et ((byt|
|00006020| 65 2d 63 6f 6d 70 69 6c | 65 2d 6d 61 63 72 6f 2d |e-compil|e-macro-|
|00006030| 65 6e 76 69 72 6f 6e 6d | 65 6e 74 20 28 63 6f 70 |environm|ent (cop|
|00006040| 79 2d 61 6c 69 73 74 20 | 62 79 74 65 2d 63 6f 6d |y-alist |byte-com|
|00006050| 70 69 6c 65 2d 69 6e 69 | 74 69 61 6c 2d 6d 61 63 |pile-ini|tial-mac|
|00006060| 72 6f 2d 65 6e 76 69 72 | 6f 6e 6d 65 6e 74 29 29 |ro-envir|onment))|
|00006070| 20 28 62 79 74 65 2d 63 | 6f 6d 70 69 6c 65 2d 66 | (byte-c|ompile-f|
|00006080| 75 6e 63 74 69 6f 6e 2d | 65 6e 76 69 72 6f 6e 6d |unction-|environm|
|00006090| 65 6e 74 20 6e 69 6c 29 | 20 28 62 79 74 65 2d 63 |ent nil)| (byte-c|
|000060a0| 6f 6d 70 69 6c 65 2d 61 | 75 74 6f 6c 6f 61 64 2d |ompile-a|utoload-|
|000060b0| 65 6e 76 69 72 6f 6e 6d | 65 6e 74 20 6e 69 6c 29 |environm|ent nil)|
|000060c0| 20 28 62 79 74 65 2d 63 | 6f 6d 70 69 6c 65 2d 75 | (byte-c|ompile-u|
|000060d0| 6e 72 65 73 6f 6c 76 65 | 64 2d 66 75 6e 63 74 69 |nresolve|d-functi|
|000060e0| 6f 6e 73 20 6e 69 6c 29 | 20 28 62 79 74 65 2d 63 |ons nil)| (byte-c|
|000060f0| 6f 6d 70 69 6c 65 2d 62 | 6f 75 6e 64 2d 76 61 72 |ompile-b|ound-var|
|00006100| 69 61 62 6c 65 73 20 6e | 69 6c 29 20 28 62 79 74 |iables n|il) (byt|
|00006110| 65 2d 63 6f 6d 70 69 6c | 65 2d 66 72 65 65 2d 72 |e-compil|e-free-r|
|00006120| 65 66 65 72 65 6e 63 65 | 73 20 6e 69 6c 29 20 28 |eference|s nil) (|
|00006130| 62 79 74 65 2d 63 6f 6d | 70 69 6c 65 2d 66 72 65 |byte-com|pile-fre|
|00006140| 65 2d 61 73 73 69 67 6e | 6d 65 6e 74 73 20 6e 69 |e-assign|ments ni|
|00006150| 6c 29 20 28 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |l) (byte|-compile|
|00006160| 2d 76 65 72 62 6f 73 65 | 20 62 79 74 65 2d 63 6f |-verbose| byte-co|
|00006170| 6d 70 69 6c 65 2d 76 65 | 72 62 6f 73 65 29 20 28 |mpile-ve|rbose) (|
|00006180| 62 79 74 65 2d 6f 70 74 | 69 6d 69 7a 65 20 62 79 |byte-opt|imize by|
|00006190| 74 65 2d 6f 70 74 69 6d | 69 7a 65 29 20 28 62 79 |te-optim|ize) (by|
|000061a0| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 67 65 6e 65 72 |te-compi|le-gener|
|000061b0| 61 74 65 2d 65 6d 61 63 | 73 31 39 2d 62 79 74 65 |ate-emac|s19-byte|
|000061c0| 63 6f 64 65 73 20 62 79 | 74 65 2d 63 6f 6d 70 69 |codes by|te-compi|
|000061d0| 6c 65 2d 67 65 6e 65 72 | 61 74 65 2d 65 6d 61 63 |le-gener|ate-emac|
|000061e0| 73 31 39 2d 62 79 74 65 | 63 6f 64 65 73 29 20 28 |s19-byte|codes) (|
|000061f0| 62 79 74 65 2d 63 6f 6d | 70 69 6c 65 2d 77 61 72 |byte-com|pile-war|
|00006200| 6e 69 6e 67 73 20 28 69 | 66 20 28 65 71 20 62 79 |nings (i|f (eq by|
|00006210| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 77 61 72 6e 69 |te-compi|le-warni|
|00006220| 6e 67 73 20 74 29 20 62 | 79 74 65 2d 63 6f 6d 70 |ngs t) b|yte-comp|
|00006230| 69 6c 65 2d 64 65 66 61 | 75 6c 74 2d 77 61 72 6e |ile-defa|ult-warn|
|00006240| 69 6e 67 73 20 62 79 74 | 65 2d 63 6f 6d 70 69 6c |ings byt|e-compil|
|00006250| 65 2d 77 61 72 6e 69 6e | 67 73 29 29 20 28 62 79 |e-warnin|gs)) (by|
|00006260| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 66 69 6c 65 2d |te-compi|le-file-|
|00006270| 64 6f 6d 61 69 6e 20 6e | 69 6c 29 29 20 70 72 6f |domain n|il)) pro|
|00006280| 67 31 20 70 72 6f 67 6e | 20 62 6f 64 79 20 28 69 |g1 progn| body (i|
|00006290| 66 20 28 6d 65 6d 71 20 | 27 75 6e 75 73 65 64 2d |f (memq |'unused-|
|000062a0| 76 61 72 73 20 62 79 74 | 65 2d 63 6f 6d 70 69 6c |vars byt|e-compil|
|000062b0| 65 2d 77 61 72 6e 69 6e | 67 73 29 20 28 62 79 74 |e-warnin|gs) (byt|
|000062c0| 65 2d 63 6f 6d 70 69 6c | 65 2d 77 61 72 6e 2d 61 |e-compil|e-warn-a|
|000062d0| 62 6f 75 74 2d 75 6e 75 | 73 65 64 2d 76 61 72 69 |bout-unu|sed-vari|
|000062e0| 61 62 6c 65 73 29 29 5d | 20 35 5d 29 20 64 69 73 |ables))]| 5]) dis|
|000062f0| 70 6c 61 79 69 6e 67 2d | 62 79 74 65 2d 63 6f 6d |playing-|byte-com|
|00006300| 70 69 6c 65 2d 77 61 72 | 6e 69 6e 67 73 20 28 6d |pile-war|nings (m|
|00006310| 61 63 72 6f 20 2e 20 23 | 5b 28 26 72 65 73 74 20 |acro . #|[(&rest |
|00006320| 62 6f 64 79 29 20 22 c0 | c1 c2 c3 0c 42 c5 45 45 |body) ".|....B.EE|
|00006330| 87 22 20 5b 6c 65 74 20 | 28 28 62 79 74 65 2d 63 |." [let |((byte-c|
|00006340| 6f 6d 70 69 6c 65 2d 77 | 61 72 6e 69 6e 67 73 2d |ompile-w|arnings-|
|00006350| 70 6f 69 6e 74 2d 6d 61 | 78 20 28 69 66 20 28 62 |point-ma|x (if (b|
|00006360| 6f 75 6e 64 70 20 27 62 | 79 74 65 2d 63 6f 6d 70 |oundp 'b|yte-comp|
|00006370| 69 6c 65 2d 77 61 72 6e | 69 6e 67 73 2d 70 6f 69 |ile-warn|ings-poi|
|00006380| 6e 74 2d 6d 61 78 29 20 | 62 79 74 65 2d 63 6f 6d |nt-max) |byte-com|
|00006390| 70 69 6c 65 2d 77 61 72 | 6e 69 6e 67 73 2d 70 6f |pile-war|nings-po|
|000063a0| 69 6e 74 2d 6d 61 78 20 | 28 73 61 76 65 2d 65 78 |int-max |(save-ex|
|000063b0| 63 75 72 73 69 6f 6e 20 | 28 73 65 74 2d 62 75 66 |cursion |(set-buf|
|000063c0| 66 65 72 20 28 67 65 74 | 2d 62 75 66 66 65 72 2d |fer (get|-buffer-|
|000063d0| 63 72 65 61 74 65 20 22 | 2a 43 6f 6d 70 69 6c 65 |create "|*Compile|
|000063e0| 2d 4c 6f 67 2a 22 29 29 | 20 28 70 6f 69 6e 74 2d |-Log*"))| (point-|
|000063f0| 6d 61 78 29 29 29 29 29 | 20 75 6e 77 69 6e 64 2d |max)))))| unwind-|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
