home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / gnu / emacs-19.16 / lisp / byte-opt.elc < prev    next >
Emacs Compiled Lisp  |  1993-07-05  |  21.7 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.

ConfidenceProgramDetectionMatch TypeSupport
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
100% TrID Emacs/XEmacs byte-compiled Lisp (generic) default
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 6a 69 6d 62 40 67 65 |piled by| jimb@ge|
|00000020| 65 63 68 2e 67 6e 75 2e | 61 69 2e 6d 69 74 2e 65 |ech.gnu.|ai.mit.e|
|00000030| 64 75 20 6f 6e 20 4d 6f | 6e 20 4a 75 6c 20 20 35 |du on Mo|n Jul 5|
|00000040| 20 32 32 3a 32 31 3a 31 | 31 20 31 39 39 33 0a 3b | 22:21:1|1 1993.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 67 64 |;; from |file /gd|
|00000060| 2f 67 6e 75 2f 65 6d 61 | 63 73 2f 31 39 2e 30 2f |/gnu/ema|cs/19.0/|
|00000070| 6c 69 73 70 2f 62 79 74 | 65 2d 6f 70 74 2e 65 6c |lisp/byt|e-opt.el|
|00000080| 0a 3b 3b 3b 20 65 6d 61 | 63 73 20 76 65 72 73 69 |.;;; ema|cs versi|
|00000090| 6f 6e 20 31 39 2e 31 35 | 2e 31 36 2e 0a 3b 3b 3b |on 19.15|.16..;;;|
|000000a0| 20 62 79 74 65 63 6f 6d | 70 20 76 65 72 73 69 6f | bytecom|p versio|
|000000b0| 6e 20 46 53 46 20 32 2e | 31 30 0a 3b 3b 3b 20 6f |n FSF 2.|10.;;; o|
|000000c0| 70 74 69 6d 69 7a 61 74 | 69 6f 6e 20 69 73 20 6f |ptimizat|ion is o|
|000000d0| 6e 2e 0a 3b 3b 3b 20 74 | 68 69 73 20 66 69 6c 65 |n..;;; t|his file|
|000000e0| 20 75 73 65 73 20 6f 70 | 63 6f 64 65 73 20 77 68 | uses op|codes wh|
|000000f0| 69 63 68 20 64 6f 20 6e | 6f 74 20 65 78 69 73 74 |ich do n|ot exist|
|00000100| 20 69 6e 20 45 6d 61 63 | 73 20 31 38 2e 0a 0a 28 | in Emac|s 18...(|
|00000110| 69 66 20 28 61 6e 64 20 | 28 62 6f 75 6e 64 70 20 |if (and |(boundp |
|00000120| 27 65 6d 61 63 73 2d 76 | 65 72 73 69 6f 6e 29 0a |'emacs-v|ersion).|
|00000130| 09 20 28 6f 72 20 28 61 | 6e 64 20 28 62 6f 75 6e |. (or (a|nd (boun|
|00000140| 64 70 20 27 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |dp 'epoc|h::versi|
|00000150| 6f 6e 29 20 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |on) epoc|h::versi|
|00000160| 6f 6e 29 0a 09 20 20 20 | 20 20 28 73 74 72 69 6e |on).. | (strin|
|00000170| 67 2d 6c 65 73 73 70 20 | 65 6d 61 63 73 2d 76 65 |g-lessp |emacs-ve|
|00000180| 72 73 69 6f 6e 20 22 31 | 39 22 29 29 29 0a 20 20 |rsion "1|9"))). |
|00000190| 20 20 28 65 72 72 6f 72 | 20 22 54 68 69 73 20 66 | (error| "This f|
|000001a0| 69 6c 65 20 77 61 73 20 | 63 6f 6d 70 69 6c 65 64 |ile was |compiled|
|000001b0| 20 66 6f 72 20 45 6d 61 | 63 73 20 31 39 22 29 29 | for Ema|cs 19"))|
|000001c0| 0a 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 c1 |..(byte-|code "..|
|000001d0| c2 5c 22 88 c0 c3 c4 5c | 22 88 c5 c6 c7 c8 23 87 |.\"....\|".....#.|
|000001e0| 22 20 5b 64 65 66 61 6c | 69 61 73 20 62 79 74 65 |" [defal|ias byte|
|000001f0| 2d 63 6f 6d 70 69 6c 65 | 2d 6c 6f 67 2d 6c 61 70 |-compile|-log-lap|
|00000200| 2d 31 20 23 5b 28 66 6f | 72 6d 61 74 20 26 72 65 |-1 #[(fo|rmat &re|
|00000210| 73 74 20 61 72 67 73 29 | 20 22 08 c1 48 83 5c 6e |st args)| "..H.\n|
|00000220| 00 c2 c3 21 88 c4 c5 c6 | 0e 06 c7 89 1e 08 1e 09 |...!....|........|
|00000230| ca cb 0e 0c 5c 22 2a 23 | 21 87 22 20 5b 62 79 74 |....\"*#|!." [byt|
|00000240| 65 2d 63 6f 64 65 2d 76 | 65 63 74 6f 72 20 30 20 |e-code-v|ector 0 |
|00000250| 65 72 72 6f 72 20 22 54 | 68 65 20 6f 6c 64 20 76 |error "T|he old v|
|00000260| 65 72 73 69 6f 6e 20 6f | 66 20 74 68 65 20 64 69 |ersion o|f the di|
|00000270| 73 61 73 73 65 6d 62 6c | 65 72 20 69 73 20 6c 6f |sassembl|er is lo|
|00000280| 61 64 65 64 2e 20 20 52 | 65 6c 6f 61 64 20 6e 65 |aded. R|eload ne|
|00000290| 77 2d 62 79 74 65 63 6f | 6d 70 20 61 73 20 77 65 |w-byteco|mp as we|
|000002a0| 6c 6c 2e 22 20 62 79 74 | 65 2d 63 6f 6d 70 69 6c |ll." byt|e-compil|
|000002b0| 65 2d 6c 6f 67 2d 31 20 | 61 70 70 6c 79 20 66 6f |e-log-1 |apply fo|
|000002c0| 72 6d 61 74 20 6e 69 6c | 20 61 20 63 20 6d 61 70 |rmat nil| a c map|
|000002d0| 63 61 72 20 23 5b 28 61 | 72 67 29 20 22 08 3a 84 |car #[(a|rg) ".:.|
|000002e0| 1e 00 08 39 83 1c 00 c1 | c2 c3 08 21 5c 22 83 1c |...9....|...!\"..|
|000002f0| 00 c4 c3 08 21 c5 c6 4f | 21 87 08 87 08 40 89 16 |....!..O|!....@..|
|00000300| 07 a8 83 2d 00 c8 c9 0e | 07 5c 22 88 0e 07 ca 3d |...-....|.\"....=|
|00000310| 83 3a 00 08 16 07 82 72 | 00 0e 07 0e 0b 3e 83 49 |.:.....r|.....>.I|
|00000320| 00 08 41 41 40 82 59 00 | 0e 07 0e 0c 3e 83 57 00 |..AA@.Y.|....>.W.|
|00000330| 08 41 40 82 59 00 08 41 | 16 0d c3 0e 07 21 16 07 |.A@.Y..A|.....!..|
|00000340| c1 ce 0e 07 5c 22 83 72 | 00 c4 0e 07 c5 c6 4f 21 |....\".r|......O!|
|00000350| 16 07 0e 07 cf 3d 83 7c | 00 d0 16 07 08 41 d1 3d |.....=.||.....A.=|
|00000360| 83 8d 00 0e 07 d2 3e 84 | 8d 00 0e 07 87 d3 d4 0e |......>.|........|
|00000370| 07 0e 0d 23 87 22 20 5b | 61 72 67 20 73 74 72 69 |...#." [|arg stri|
|00000380| 6e 67 2d 6d 61 74 63 68 | 20 22 5e 62 79 74 65 2d |ng-match| "^byte-|
|00000390| 22 20 73 79 6d 62 6f 6c | 2d 6e 61 6d 65 20 69 6e |" symbol|-name in|
|000003a0| 74 65 72 6e 20 35 20 6e | 69 6c 20 63 20 65 72 72 |tern 5 n|il c err|
|000003b0| 6f 72 20 22 6e 6f 6e 2d | 73 79 6d 62 6f 6c 69 63 |or "non-|symbolic|
|000003c0| 20 62 79 74 65 2d 6f 70 | 20 25 73 22 20 54 41 47 | byte-op| %s" TAG|
|000003d0| 20 62 79 74 65 2d 67 6f | 74 6f 2d 6f 70 73 20 62 | byte-go|to-ops b|
|000003e0| 79 74 65 2d 63 6f 6e 73 | 74 72 65 66 2d 6f 70 73 |yte-cons|tref-ops|
|000003f0| 20 61 20 22 5e 62 79 74 | 65 2d 2e 22 20 63 6f 6e | a "^byt|e-." con|
|00000400| 73 74 61 6e 74 20 63 6f | 6e 73 74 20 30 20 28 75 |stant co|nst 0 (u|
|00000410| 6e 62 69 6e 64 20 63 61 | 6c 6c 20 63 6f 6e 73 74 |nbind ca|ll const|
|00000420| 29 20 66 6f 72 6d 61 74 | 20 22 28 25 73 20 25 73 |) format| "(%s %s|
|00000430| 29 22 5d 20 34 5d 20 61 | 72 67 73 5d 20 37 5d 20 |)"] 4] a|rgs] 7] |
|00000440| 62 79 74 65 2d 63 6f 6d | 70 69 6c 65 2d 6c 6f 67 |byte-com|pile-log|
|00000450| 2d 6c 61 70 20 28 6d 61 | 63 72 6f 20 2e 20 23 5b |-lap (ma|cro . #[|
|00000460| 28 66 6f 72 6d 61 74 2d | 73 74 72 69 6e 67 20 26 |(format-|string &|
|00000470| 72 65 73 74 20 61 72 67 | 73 29 20 22 c0 c1 c2 0b |rest arg|s) "....|
|00000480| 0c 42 42 45 87 22 20 5b | 61 6e 64 20 28 6d 65 6d |.BBE." [|and (mem|
|00000490| 71 20 62 79 74 65 2d 6f | 70 74 69 6d 69 7a 65 2d |q byte-o|ptimize-|
|000004a0| 6c 6f 67 20 28 71 75 6f | 74 65 20 28 74 20 62 79 |log (quo|te (t by|
|000004b0| 74 65 29 29 29 20 62 79 | 74 65 2d 63 6f 6d 70 69 |te))) by|te-compi|
|000004c0| 6c 65 2d 6c 6f 67 2d 6c | 61 70 2d 31 20 66 6f 72 |le-log-l|ap-1 for|
|000004d0| 6d 61 74 2d 73 74 72 69 | 6e 67 20 61 72 67 73 5d |mat-stri|ng args]|
|000004e0| 20 35 5d 29 20 70 75 74 | 20 69 6e 6c 69 6e 65 20 | 5]) put| inline |
|000004f0| 62 79 74 65 2d 6f 70 74 | 69 6d 69 7a 65 72 20 62 |byte-opt|imizer b|
|00000500| 79 74 65 2d 6f 70 74 69 | 6d 69 7a 65 2d 69 6e 6c |yte-opti|mize-inl|
|00000510| 69 6e 65 2d 68 61 6e 64 | 6c 65 72 5d 20 34 29 0a |ine-hand|ler] 4).|
|00000520| 28 64 65 66 61 6c 69 61 | 73 20 27 62 79 74 65 2d |(defalia|s 'byte-|
|00000530| 6f 70 74 69 6d 69 7a 65 | 2d 69 6e 6c 69 6e 65 2d |optimize|-inline-|
|00000540| 68 61 6e 64 6c 65 72 20 | 23 5b 28 66 6f 72 6d 29 |handler |#[(form)|
|00000550| 20 22 c0 c1 c2 0b 41 5c | 22 42 87 22 20 5b 70 72 | "....A\|"B." [pr|
|00000560| 6f 67 6e 20 6d 61 70 63 | 61 72 20 23 5b 28 73 65 |ogn mapc|ar #[(se|
|00000570| 78 70 29 20 22 08 a2 89 | 19 39 83 37 00 09 5c 6e |xp) "...|.9.7..\n|
|00000580| 9e 41 84 31 00 c3 09 21 | 83 37 00 09 0c 9e 41 84 |.A.1...!|.7....A.|
|00000590| 37 00 09 4b 89 11 3a 83 | 2b 00 09 40 c5 3d 84 37 |7..K..:.|+..@.=.7|
|000005a0| 00 c6 09 21 84 37 00 c7 | 08 21 82 38 00 08 29 87 |...!.7..|.!.8..).|
|000005b0| 22 20 5b 73 65 78 70 20 | 66 6e 20 62 79 74 65 2d |" [sexp |fn byte-|
|000005c0| 63 6f 6d 70 69 6c 65 2d | 66 75 6e 63 74 69 6f 6e |compile-|function|
|000005d0| 2d 65 6e 76 69 72 6f 6e | 6d 65 6e 74 20 66 62 6f |-environ|ment fbo|
|000005e0| 75 6e 64 70 20 62 79 74 | 65 2d 63 6f 6d 70 69 6c |undp byt|e-compil|
|000005f0| 65 2d 6d 61 63 72 6f 2d | 65 6e 76 69 72 6f 6e 6d |e-macro-|environm|
|00000600| 65 6e 74 20 6d 61 63 72 | 6f 20 73 75 62 72 70 20 |ent macr|o subrp |
|00000610| 62 79 74 65 2d 63 6f 6d | 70 69 6c 65 2d 69 6e 6c |byte-com|pile-inl|
|00000620| 69 6e 65 2d 65 78 70 61 | 6e 64 5d 20 33 5d 20 66 |ine-expa|nd] 3] f|
|00000630| 6f 72 6d 5d 20 34 20 22 | 5c 0a 62 79 74 65 2d 6f |orm] 4 "|\.byte-o|
|00000640| 70 74 69 6d 69 7a 65 2d | 68 61 6e 64 6c 65 72 20 |ptimize-|handler |
|00000650| 66 6f 72 20 74 68 65 20 | 60 69 6e 6c 69 6e 65 27 |for the |`inline'|
|00000660| 20 73 70 65 63 69 61 6c | 2d 66 6f 72 6d 2e 22 5d | special|-form."]|
|00000670| 29 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 c1 |).(byte-|code "..|
|00000680| c2 5c 22 88 c0 c3 c4 5c | 22 88 c0 c5 c6 5c 22 88 |.\"....\|"....\".|
|00000690| c0 c7 c8 5c 22 87 22 20 | 5b 64 65 66 61 6c 69 61 |...\"." |[defalia|
|000006a0| 73 20 62 79 74 65 2d 69 | 6e 6c 69 6e 65 2d 6c 61 |s byte-i|nline-la|
|000006b0| 70 63 6f 64 65 20 23 5b | 28 6c 61 70 29 20 22 08 |pcode #[|(lap) ".|
|000006c0| 9f 09 a4 89 11 87 22 20 | 5b 6c 61 70 20 62 79 74 |......" |[lap byt|
|000006d0| 65 2d 63 6f 6d 70 69 6c | 65 2d 6f 75 74 70 75 74 |e-compil|e-output|
|000006e0| 5d 20 32 5d 20 62 79 74 | 65 2d 63 6f 6d 70 69 6c |] 2] byt|e-compil|
|000006f0| 65 2d 69 6e 6c 69 6e 65 | 2d 65 78 70 61 6e 64 20 |e-inline|-expand |
|00000700| 23 5b 28 66 6f 72 6d 29 | 20 22 08 40 89 19 5c 6e |#[(form)| ".@..\n|
|00000710| 9e 41 86 12 00 c3 09 21 | 85 12 00 09 4b 89 1c 84 |.A.....!|....K...|
|00000720| 20 00 c5 c6 09 5c 22 88 | 08 82 80 00 0c 3a 83 32 | ....\".|.....:.2|
|00000730| 00 0c 40 c7 3d 83 32 00 | c8 0c 41 40 21 88 0c 3a |..@.=.2.|..A@!..:|
|00000740| 83 46 00 0c 40 c7 3d 83 | 46 00 c9 ca 0c 41 40 09 |.F..@.=.|F....A@.|
|00000750| 23 88 0c 39 83 54 00 cb | 0c 08 41 42 21 82 80 00 |#..9.T..|..AB!...|
|00000760| cc 0c 21 83 70 00 cd 0c | ce 48 cf 0c d0 48 0c d1 |..!.p...|.H...H..|
|00000770| 48 0c d2 48 46 45 08 41 | 42 82 80 00 0c 40 cd 3d |H..HFE.A|B....@.=|
|00000780| 84 7c 00 c9 d3 09 5c 22 | 88 0c 08 41 42 2a 87 22 |.|....\"|...AB*."|
|00000790| 20 5b 66 6f 72 6d 20 6e | 61 6d 65 20 62 79 74 65 | [form n|ame byte|
|000007a0| 2d 63 6f 6d 70 69 6c 65 | 2d 66 75 6e 63 74 69 6f |-compile|-functio|
|000007b0| 6e 2d 65 6e 76 69 72 6f | 6e 6d 65 6e 74 20 66 62 |n-enviro|nment fb|
|000007c0| 6f 75 6e 64 70 20 66 6e | 20 62 79 74 65 2d 63 6f |oundp fn| byte-co|
|000007d0| 6d 70 69 6c 65 2d 77 61 | 72 6e 20 22 61 74 74 65 |mpile-wa|rn "atte|
|000007e0| 6d 70 74 20 74 6f 20 69 | 6e 6c 69 6e 65 20 25 73 |mpt to i|nline %s|
|000007f0| 20 62 65 66 6f 72 65 20 | 69 74 20 77 61 73 20 64 | before |it was d|
|00000800| 65 66 69 6e 65 64 22 20 | 61 75 74 6f 6c 6f 61 64 |efined" |autoload|
|00000810| 20 6c 6f 61 64 20 65 72 | 72 6f 72 20 22 66 69 6c | load er|ror "fil|
|00000820| 65 20 5c 22 25 73 5c 22 | 20 64 69 64 6e 27 74 20 |e \"%s\"| didn't |
|00000830| 64 65 66 69 6e 65 20 5c | 22 25 73 5c 22 22 20 62 |define \|"%s\"" b|
|00000840| 79 74 65 2d 63 6f 6d 70 | 69 6c 65 2d 69 6e 6c 69 |yte-comp|ile-inli|
|00000850| 6e 65 2d 65 78 70 61 6e | 64 20 62 79 74 65 2d 63 |ne-expan|d byte-c|
|00000860| 6f 64 65 2d 66 75 6e 63 | 74 69 6f 6e 2d 70 20 6c |ode-func|tion-p l|
|00000870| 61 6d 62 64 61 20 30 20 | 62 79 74 65 2d 63 6f 64 |ambda 0 |byte-cod|
|00000880| 65 20 31 20 32 20 33 20 | 22 25 73 20 69 73 20 6e |e 1 2 3 |"%s is n|
|00000890| 6f 74 20 61 20 6c 61 6d | 62 64 61 22 5d 20 38 5d |ot a lam|bda"] 8]|
|000008a0| 20 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 75 6e | byte-co|mpile-un|
|000008b0| 66 6f 6c 64 2d 6c 61 6d | 62 64 61 20 23 5b 28 66 |fold-lam|bda #[(f|
|000008c0| 6f 72 6d 20 26 6f 70 74 | 69 6f 6e 61 6c 20 6e 61 |orm &opt|ional na|
|000008d0| 6d 65 29 20 22 08 84 06 | 00 c1 10 5c 6e 40 5c 6e |me) "...|...\n@\n|
|000008e0| 41 1b 1c c5 0c 21 83 23 | 00 c4 0c c6 48 c7 0c c8 |A....!.#|....H...|
|000008f0| 48 0c c9 48 0c ca 48 46 | 45 14 0c 41 40 0c 41 41 |H..H..HF|E..A@.AA|
|00000900| cb 89 89 1e 0c 1e 0d 1e | 0e 1e 0f 1e 10 0e 0f 40 |........|.......@|
|00000910| 3b 83 48 00 0e 0f 41 83 | 48 00 0e 0f 41 16 0f 0e |;.H...A.|H...A...|
|00000920| 0f 40 3a 83 5d 00 0e 0f | 40 40 d1 3d 83 5d 00 0e |.@:.]...|@@.=.]..|
|00000930| 0f 41 16 0f 0e 10 83 f1 | 00 0e 10 40 d2 3d 83 85 |.A......|...@.=..|
|00000940| 00 0e 0d 83 74 00 d3 d4 | 08 5c 22 88 0e 10 41 84 |....t...|.\"...A.|
|00000950| 7f 00 d3 d5 08 5c 22 88 | d6 16 0e 82 e8 00 0e 10 |.....\".|........|
|00000960| 40 d7 3d 83 aa 00 0e 10 | 41 84 98 00 d3 d8 08 5c |@.=.....|A......\|
|00000970| 22 88 0e 10 41 41 83 a4 | 00 d3 d9 08 5c 22 88 d6 |"...AA..|....\"..|
|00000980| 16 0d 82 e8 00 0e 0d 83 | c4 00 0e 10 40 0b 85 b9 |........|....@...|
|00000990| 00 da 0b 42 44 0e 0c 42 | 16 0c cb 13 82 e8 00 0e |...BD..B|........|
|000009a0| 0e 84 da 00 0b 84 da 00 | db dc 08 5c 22 88 cb 16 |........|...\"...|
|000009b0| 10 dd 13 82 e8 00 0e 10 | 40 0b 40 44 0e 0c 42 16 |........|@.@D..B.|
|000009c0| 0c 0b 41 13 0e 10 41 89 | 16 10 84 62 00 0b 83 04 |..A...A.|...b....|
|000009d0| 01 0b dd 3d 84 00 01 db | de 08 5c 22 88 5c 6e 82 |...=....|..\".\n.|
|000009e0| 40 01 0e 0c 83 14 01 df | 0e 0c 9f 0e 0f 42 42 82 |@.......|.....BB.|
|000009f0| 18 01 e0 0e 0f 42 1e 21 | 0e 5c 22 83 3d 01 0e 23 |.....B.!|.\".=..#|
|00000a00| e4 3e 83 3d 01 d6 e5 89 | 1e 26 1e 27 1e 28 e9 ea |.>.=....|.&.'.(..|
|00000a10| eb ec 5c 6e 21 ec 0e 21 | 21 23 21 88 2b 0e 21 29 |..\n!..!|!#!.+.!)|
|00000a20| 2e 07 87 22 20 5b 6e 61 | 6d 65 20 22 61 6e 6f 6e |..." [na|me "anon|
|00000a30| 79 6d 6f 75 73 20 6c 61 | 6d 62 64 61 22 20 66 6f |ymous la|mbda" fo|
|00000a40| 72 6d 20 76 61 6c 75 65 | 73 20 6c 61 6d 62 64 61 |rm value|s lambda|
|00000a50| 20 62 79 74 65 2d 63 6f | 64 65 2d 66 75 6e 63 74 | byte-co|de-funct|
|00000a60| 69 6f 6e 2d 70 20 30 20 | 62 79 74 65 2d 63 6f 64 |ion-p 0 |byte-cod|
|00000a70| 65 20 31 20 32 20 33 20 | 6e 69 6c 20 62 69 6e 64 |e 1 2 3 |nil bind|
|00000a80| 69 6e 67 73 20 72 65 73 | 74 70 20 6f 70 74 69 6f |ings res|tp optio|
|00000a90| 6e 61 6c 70 20 62 6f 64 | 79 20 61 72 67 6c 69 73 |nalp bod|y arglis|
|00000aa0| 74 20 69 6e 74 65 72 61 | 63 74 69 76 65 20 26 6f |t intera|ctive &o|
|00000ab0| 70 74 69 6f 6e 61 6c 20 | 65 72 72 6f 72 20 22 26 |ptional |error "&|
|00000ac0| 6f 70 74 69 6f 6e 61 6c | 20 66 6f 75 6e 64 20 61 |optional| found a|
|00000ad0| 66 74 65 72 20 26 72 65 | 73 74 20 69 6e 20 25 73 |fter &re|st in %s|
|00000ae0| 22 20 22 6e 6f 74 68 69 | 6e 67 20 61 66 74 65 72 |" "nothi|ng after|
|00000af0| 20 26 6f 70 74 69 6f 6e | 61 6c 20 69 6e 20 25 73 | &option|al in %s|
|00000b00| 22 20 74 20 26 72 65 73 | 74 20 22 6e 6f 74 68 69 |" t &res|t "nothi|
|00000b10| 6e 67 20 61 66 74 65 72 | 20 26 72 65 73 74 20 69 |ng after| &rest i|
|00000b20| 6e 20 25 73 22 20 22 6d | 75 6c 74 69 70 6c 65 20 |n %s" "m|ultiple |
|00000b30| 76 61 72 73 20 61 66 74 | 65 72 20 26 72 65 73 74 |vars aft|er &rest|
|00000b40| 20 69 6e 20 25 73 22 20 | 6c 69 73 74 20 62 79 74 | in %s" |list byt|
|00000b50| 65 2d 63 6f 6d 70 69 6c | 65 2d 77 61 72 6e 20 22 |e-compil|e-warn "|
|00000b60| 61 74 74 65 6d 70 74 20 | 74 6f 20 6f 70 65 6e 2d |attempt |to open-|
|00000b70| 63 6f 64 65 20 25 73 20 | 77 69 74 68 20 74 6f 6f |code %s |with too|
|00000b80| 20 66 65 77 20 61 72 67 | 75 6d 65 6e 74 73 22 20 | few arg|uments" |
|00000b90| 74 6f 6f 2d 66 65 77 20 | 22 61 74 74 65 6d 70 74 |too-few |"attempt|
|00000ba0| 20 74 6f 20 6f 70 65 6e | 2d 63 6f 64 65 20 25 73 | to open|-code %s|
|00000bb0| 20 77 69 74 68 20 74 6f | 6f 20 6d 61 6e 79 20 61 | with to|o many a|
|00000bc0| 72 67 75 6d 65 6e 74 73 | 22 20 6c 65 74 20 70 72 |rguments|" let pr|
|00000bd0| 6f 67 6e 20 6e 65 77 66 | 6f 72 6d 20 62 79 74 65 |ogn newf|orm byte|
|00000be0| 2d 6f 70 74 69 6d 69 7a | 65 20 62 79 74 65 2d 6f |-optimiz|e byte-o|
|00000bf0| 70 74 69 6d 69 7a 65 2d | 6c 6f 67 20 28 74 20 73 |ptimize-|log (t s|
|00000c00| 6f 75 72 63 65 29 20 34 | 20 70 72 69 6e 74 2d 6c |ource) 4| print-l|
|00000c10| 65 6e 67 74 68 20 70 72 | 69 6e 74 2d 6c 65 76 65 |ength pr|int-leve|
|00000c20| 6c 20 70 72 69 6e 74 2d | 65 73 63 61 70 65 2d 6e |l print-|escape-n|
|00000c30| 65 77 6c 69 6e 65 73 20 | 62 79 74 65 2d 63 6f 6d |ewlines |byte-com|
|00000c40| 70 69 6c 65 2d 6c 6f 67 | 2d 31 20 66 6f 72 6d 61 |pile-log|-1 forma|
|00000c50| 74 20 22 20 20 25 73 09 | 3d 3d 3e 09 25 73 22 20 |t " %s.|==>.%s" |
|00000c60| 70 72 69 6e 31 2d 74 6f | 2d 73 74 72 69 6e 67 5d |prin1-to|-string]|
|00000c70| 20 38 5d 20 62 79 74 65 | 2d 6f 70 74 69 6d 69 7a | 8] byte|-optimiz|
|00000c80| 65 2d 66 6f 72 6d 2d 63 | 6f 64 65 2d 77 61 6c 6b |e-form-c|ode-walk|
|00000c90| 65 72 20 23 5b 28 66 6f | 72 6d 20 66 6f 72 2d 65 |er #[(fo|rm for-e|
|00000ca0| 66 66 65 63 74 29 20 22 | 08 a2 c1 1a 1b 08 3a 84 |ffect) "|......:.|
|00000cb0| 23 00 0c 85 1b 00 0d 86 | 1b 00 08 39 3f 86 1b 00 |#.......|...9?...|
|00000cc0| 08 c6 3d 3f 85 65 02 08 | 82 65 02 0b c7 3d 83 45 |..=?.e..|.e...=.E|
|00000cd0| 00 08 41 41 83 36 00 c8 | c9 ca 08 21 5c 22 88 08 |..AA.6..|...!\"..|
|00000ce0| 41 40 85 65 02 0c 3f 85 | 65 02 08 82 65 02 cb 0b |A@.e..?.|e...e...|
|00000cf0| 21 84 52 00 0b a2 cc 3d | 83 58 00 cd 08 21 82 65 |!.R....=|.X...!.e|
|00000d00| 02 0b ce 3e 83 70 00 0b | cf d0 08 41 40 5c 22 d1 |...>.p..|...A@\".|
|00000d10| 08 41 41 0c 5c 22 42 42 | 82 65 02 0b d2 3d 83 80 |.AA.\"BB|.e...=..|
|00000d20| 00 0b cf d3 08 41 5c 22 | 42 82 65 02 0b d4 3d 83 |.....A\"|B.e...=.|
|00000d30| ab 00 08 41 41 83 a2 00 | d1 08 41 0c 5c 22 89 12 |...AA...|..A.\"..|
|00000d40| 41 83 9d 00 d4 5c 6e 42 | 82 65 02 5c 6e 40 82 65 |A....\nB|.e.\n@.e|
|00000d50| 02 d5 08 41 40 0c 5c 22 | 82 65 02 0b d6 3d 83 d2 |...A@.\"|.e...=..|
|00000d60| 00 08 41 41 83 c9 00 d6 | d5 08 41 40 0c 5c 22 d1 |..AA....|..A@.\".|
|00000d70| 08 41 41 c6 5c 22 42 42 | 82 65 02 d5 08 41 40 0c |.AA.\"BB|.e...A@.|
|00000d80| 5c 22 82 65 02 0b d7 3d | 83 f2 00 d7 d5 08 41 40 |\".e...=|......A@|
|00000d90| c6 5c 22 d5 d8 08 38 0c | 5c 22 d1 08 41 41 41 c6 |.\"...8.|\"..AAA.|
|00000da0| 5c 22 42 42 42 82 65 02 | 0b d9 3e 83 02 01 0b d1 |\"BBB.e.|..>.....|
|00000db0| 08 41 0c 5c 22 42 82 65 | 02 0b da 3d 83 1a 01 0b |.A.\"B.e|...=....|
|00000dc0| d5 08 41 40 c1 5c 22 d1 | 08 41 41 0c 5c 22 42 42 |..A@.\".|.AA.\"BB|
|00000dd0| 82 65 02 0b db 3d 83 39 | 01 0b d5 08 41 40 c1 5c |.e...=.9|....A@.\|
|00000de0| 22 d5 d8 08 38 0c 5c 22 | d1 dc 08 9b 0c 5c 22 42 |"...8.\"|.....\"B|
|00000df0| 42 42 82 65 02 0b dd 3e | 83 a3 01 0c 83 99 01 de |BB.e...>|........|
|00000e00| 08 41 21 89 1e 1f 83 62 | 01 0e 1f d5 0e 1f 40 0c |.A!....b|......@.|
|00000e10| 5c 22 a0 84 62 01 0e 1f | 41 89 16 1f 84 4d 01 08 |\"..b...|A....M..|
|00000e20| 41 83 8b 01 0e 1f 84 8b | 01 0e 20 83 8b 01 0e 21 |A.......|.. ....!|
|00000e30| e2 3e 83 8b 01 c6 e3 89 | 1e 24 1e 25 1e 26 e7 e8 |.>......|.$.%.&..|
|00000e40| e9 ca 08 21 5c 22 21 88 | 2b 0e 1f 85 95 01 0b 0e |...!\"!.|+.......|
|00000e50| 1f 9f 42 29 82 65 02 0b | cf d5 08 41 5c 22 42 82 |..B).e..|...A\"B.|
|00000e60| 65 02 0b ea 3d 83 b4 01 | c8 eb ca 08 21 5c 22 88 |e...=...|....!\".|
|00000e70| c1 82 65 02 0b ec 3e 83 | be 01 08 82 65 02 0b ed |..e...>.|....e...|
|00000e80| 3d 83 d3 01 0b d5 08 41 | 40 0c 5c 22 08 41 41 42 |=......A|@.\".AAB|
|00000e90| 42 82 65 02 0b ee 3d 83 | e8 01 0b d5 08 41 40 c1 |B.e...=.|.....A@.|
|00000ea0| 5c 22 08 41 41 42 42 82 | 65 02 08 ef 08 0e 30 5c |\".AABB.|e.....0\|
|00000eb0| 22 89 10 3d 84 fb 01 d5 | 08 0c 5c 22 82 65 02 0b |"..=....|..\".e..|
|00000ec0| 39 84 12 02 f1 0b a2 3d | 84 0e 02 c8 f2 ca 0b 21 |9......=|.......!|
|00000ed0| 5c 22 88 08 82 65 02 0c | 83 5e 02 0b f3 4e 89 12 |\"...e..|.^...N..|
|00000ee0| 83 5e 02 0d 84 32 02 5c | 6e f4 3d 84 32 02 c8 f5 |.^...2.\|n.=.2...|
|00000ef0| ca 08 21 5c 22 88 82 5e | 02 0e 20 83 51 02 0e 21 |..!\"..^|.. .Q..!|
|00000f00| e2 3e 83 51 02 c6 e3 89 | 1e 24 1e 25 1e 26 e7 e8 |.>.Q....|.$.%.&..|
|00000f10| f6 ca 0b 21 5c 22 21 88 | 2b d5 d4 f7 08 41 f8 5c |...!\"!.|+....A.\|
|00000f20| 22 42 c6 5c 22 82 65 02 | 0b cf d5 08 41 5c 22 42 |"B.\".e.|....A\"B|
|00000f30| 2a 87 22 20 5b 66 6f 72 | 6d 20 6e 69 6c 20 74 6d |*." [for|m nil tm|
|00000f40| 70 20 66 6e 20 66 6f 72 | 2d 65 66 66 65 63 74 20 |p fn for|-effect |
|00000f50| 62 79 74 65 2d 63 6f 6d | 70 69 6c 65 2d 64 65 6c |byte-com|pile-del|
|00000f60| 65 74 65 2d 65 72 72 6f | 72 73 20 74 20 71 75 6f |ete-erro|rs t quo|
|00000f70| 74 65 20 62 79 74 65 2d | 63 6f 6d 70 69 6c 65 2d |te byte-|compile-|
|00000f80| 77 61 72 6e 20 22 6d 61 | 6c 66 6f 72 6d 65 64 20 |warn "ma|lformed |
|00000f90| 71 75 6f 74 65 20 66 6f | 72 6d 3a 20 25 73 22 20 |quote fo|rm: %s" |
|00000fa0| 70 72 69 6e 31 2d 74 6f | 2d 73 74 72 69 6e 67 20 |prin1-to|-string |
|00000fb0| 62 79 74 65 2d 63 6f 64 | 65 2d 66 75 6e 63 74 69 |byte-cod|e-functi|
|00000fc0| 6f 6e 2d 70 20 6c 61 6d | 62 64 61 20 62 79 74 65 |on-p lam|bda byte|
|00000fd0| 2d 63 6f 6d 70 69 6c 65 | 2d 75 6e 66 6f 6c 64 2d |-compile|-unfold-|
|00000fe0| 6c 61 6d 62 64 61 20 28 | 6c 65 74 20 6c 65 74 2a |lambda (|let let*|
|00000ff0| 29 20 6d 61 70 63 61 72 | 20 23 5b 28 62 69 6e 64 |) mapcar| #[(bind|
|00001000| 69 6e 67 29 20 22 08 39 | 83 07 00 08 87 08 41 41 |ing) ".9|......AA|
|00001010| 83 14 00 c1 c2 c3 08 21 | 5c 22 88 08 40 c4 08 41 |.......!|\"..@..A|
|00001020| 40 c5 5c 22 44 87 22 20 | 5b 62 69 6e 64 69 6e 67 |@.\"D." |[binding|
|00001030| 20 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 77 61 | byte-co|mpile-wa|
|00001040| 72 6e 20 22 6d 61 6c 66 | 6f 72 6d 65 64 20 6c 65 |rn "malf|ormed le|
|00001050| 74 20 62 69 6e 64 69 6e | 67 3a 20 25 73 22 20 70 |t bindin|g: %s" p|
|00001060| 72 69 6e 31 2d 74 6f 2d | 73 74 72 69 6e 67 20 62 |rin1-to-|string b|
|00001070| 79 74 65 2d 6f 70 74 69 | 6d 69 7a 65 2d 66 6f 72 |yte-opti|mize-for|
|00001080| 6d 20 6e 69 6c 5d 20 34 | 5d 20 62 79 74 65 2d 6f |m nil] 4|] byte-o|
|00001090| 70 74 69 6d 69 7a 65 2d | 62 6f 64 79 20 63 6f 6e |ptimize-|body con|
|000010a0| 64 20 23 5b 28 63 6c 61 | 75 73 65 29 20 22 08 3a |d #[(cla|use) ".:|
|000010b0| 83 11 00 c1 08 40 c2 5c | 22 c3 08 41 0c 5c 22 42 |.....@.\|"..A.\"B|
|000010c0| 87 c5 c6 c7 08 21 5c 22 | 88 08 87 22 20 5b 63 6c |.....!\"|..." [cl|
|000010d0| 61 75 73 65 20 62 79 74 | 65 2d 6f 70 74 69 6d 69 |ause byt|e-optimi|
|000010e0| 7a 65 2d 66 6f 72 6d 20 | 6e 69 6c 20 62 79 74 65 |ze-form |nil byte|
|000010f0| 2d 6f 70 74 69 6d 69 7a | 65 2d 62 6f 64 79 20 66 |-optimiz|e-body f|
|00001100| 6f 72 2d 65 66 66 65 63 | 74 20 62 79 74 65 2d 63 |or-effec|t byte-c|
|00001110| 6f 6d 70 69 6c 65 2d 77 | 61 72 6e 20 22 6d 61 6c |ompile-w|arn "mal|
|00001120| 66 6f 72 6d 65 64 20 63 | 6f 6e 64 20 66 6f 72 6d |formed c|ond form|
|00001130| 3a 20 25 73 22 20 70 72 | 69 6e 31 2d 74 6f 2d 73 |: %s" pr|in1-to-s|
|00001140| 74 72 69 6e 67 5d 20 34 | 5d 20 70 72 6f 67 6e 20 |tring] 4|] progn |
|00001150| 62 79 74 65 2d 6f 70 74 | 69 6d 69 7a 65 2d 66 6f |byte-opt|imize-fo|
|00001160| 72 6d 20 70 72 6f 67 31 | 20 70 72 6f 67 32 20 32 |rm prog1| prog2 2|
|00001170| 20 28 73 61 76 65 2d 65 | 78 63 75 72 73 69 6f 6e | (save-e|xcursion|
|00001180| 20 73 61 76 65 2d 72 65 | 73 74 72 69 63 74 69 6f | save-re|strictio|
|00001190| 6e 29 20 77 69 74 68 2d | 6f 75 74 70 75 74 2d 74 |n) with-|output-t|
|000011a0| 6f 2d 74 65 6d 70 2d 62 | 75 66 66 65 72 20 69 66 |o-temp-b|uffer if|
|000011b0| 20 33 20 28 61 6e 64 20 | 6f 72 29 20 72 65 76 65 | 3 (and |or) reve|
|000011c0| 72 73 65 20 62 61 63 6b | 77 61 72 64 73 20 62 79 |rse back|wards by|
|000011d0| 74 65 2d 6f 70 74 69 6d | 69 7a 65 20 62 79 74 65 |te-optim|ize byte|
|000011e0| 2d 6f 70 74 69 6d 69 7a | 65 2d 6c 6f 67 20 28 74 |-optimiz|e-log (t|
|000011f0| 20 73 6f 75 72 63 65 29 | 20 34 20 70 72 69 6e 74 | source)| 4 print|
|00001200| 2d 6c 65 6e 67 74 68 20 | 70 72 69 6e 74 2d 6c 65 |-length |print-le|
|00001210| 76 65 6c 20 70 72 69 6e | 74 2d 65 73 63 61 70 65 |vel prin|t-escape|
|00001220| 2d 6e 65 77 6c 69 6e 65 | 73 20 62 79 74 65 2d 63 |-newline|s byte-c|
|00001230| 6f 6d 70 69 6c 65 2d 6c | 6f 67 2d 31 20 66 6f 72 |ompile-l|og-1 for|
|00001240| 6d 61 74 20 22 20 20 61 | 6c 6c 20 73 75 62 66 6f |mat " a|ll subfo|
|00001250| 72 6d 73 20 6f 66 20 25 | 73 20 63 61 6c 6c 65 64 |rms of %|s called|
|00001260| 20 66 6f 72 20 65 66 66 | 65 63 74 3b 20 64 65 6c | for eff|ect; del|
|00001270| 65 74 65 64 22 20 69 6e | 74 65 72 61 63 74 69 76 |eted" in|teractiv|
|00001280| 65 20 22 6d 69 73 70 6c | 61 63 65 64 20 69 6e 74 |e "mispl|aced int|
|00001290| 65 72 61 63 74 69 76 65 | 20 73 70 65 63 3a 20 25 |eractive| spec: %|
|000012a0| 73 22 20 28 64 65 66 75 | 6e 20 64 65 66 6d 61 63 |s" (defu|n defmac|
|000012b0| 72 6f 20 66 75 6e 63 74 | 69 6f 6e 20 63 6f 6e 64 |ro funct|ion cond|
|000012c0| 69 74 69 6f 6e 2d 63 61 | 73 65 20 73 61 76 65 2d |ition-ca|se save-|
|000012d0| 77 69 6e 64 6f 77 2d 65 | 78 63 75 72 73 69 6f 6e |window-e|xcursion|
|000012e0| 29 20 75 6e 77 69 6e 64 | 2d 70 72 6f 74 65 63 74 |) unwind|-protect|
|000012f0| 20 63 61 74 63 68 20 6d | 61 63 72 6f 65 78 70 61 | catch m|acroexpa|
|00001300| 6e 64 20 62 79 74 65 2d | 63 6f 6d 70 69 6c 65 2d |nd byte-|compile-|
|00001310| 6d 61 63 72 6f 2d 65 6e | 76 69 72 6f 6e 6d 65 6e |macro-en|vironmen|
|00001320| 74 20 6d 6f 63 6b 6c 69 | 73 70 20 22 25 73 20 69 |t mockli|sp "%s i|
|00001330| 73 20 61 20 6d 61 6c 66 | 6f 72 6d 65 64 20 66 75 |s a malf|ormed fu|
|00001340| 6e 63 74 69 6f 6e 22 20 | 73 69 64 65 2d 65 66 66 |nction" |side-eff|
|00001350| 65 63 74 2d 66 72 65 65 | 20 65 72 72 6f 72 2d 66 |ect-free| error-f|
|00001360| 72 65 65 20 22 25 73 20 | 63 61 6c 6c 65 64 20 66 |ree "%s |called f|
|00001370| 6f 72 20 65 66 66 65 63 | 74 22 20 22 20 20 25 73 |or effec|t" " %s|
|00001380| 20 63 61 6c 6c 65 64 20 | 66 6f 72 20 65 66 66 65 | called |for effe|
|00001390| 63 74 3b 20 64 65 6c 65 | 74 65 64 22 20 61 70 70 |ct; dele|ted" app|
|000013a0| 65 6e 64 20 28 6e 69 6c | 29 5d 20 37 5d 5d 20 33 |end (nil|)] 7]] 3|
|000013b0| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 62 79 74 |).(defal|ias 'byt|
|000013c0| 65 2d 6f 70 74 69 6d 69 | 7a 65 2d 66 6f 72 6d 20 |e-optimi|ze-form |
|000013d0| 23 5b 28 66 6f 72 6d 20 | 26 6f 70 74 69 6f 6e 61 |#[(form |&optiona|
|000013e0| 6c 20 66 6f 72 2d 65 66 | 66 65 63 74 29 20 22 c0 |l for-ef|fect) ".|
|000013f0| 09 5c 6e 5c 22 11 c3 89 | 1c 1d 09 3a 83 5f 00 09 |.\n\"...|...:._..|
|00001400| 40 39 83 5f 00 5c 6e 83 | 21 00 09 40 c6 4e 89 15 |@9._.\n.|!..@.N..|
|00001410| 84 2a 00 09 40 c7 4e 89 | 15 83 5f 00 09 0d 09 21 |.*..@.N.|.._....!|
|00001420| 89 14 3d 84 5f 00 0e 08 | 83 56 00 0e 09 ca 3e 83 |..=._...|.V....>.|
|00001430| 56 00 cb cc 89 1e 0d 1e | 0e 1e 0f d0 d1 d2 d3 09 |V.......|........|
|00001440| 21 d3 0c 21 23 21 88 2b | d4 0c 5c 6e 5c 22 89 14 |!..!#!.+|..\n\"..|
|00001450| 82 60 00 09 2a 87 22 20 | 5b 62 79 74 65 2d 6f 70 |.`..*." |[byte-op|
|00001460| 74 69 6d 69 7a 65 2d 66 | 6f 72 6d 2d 63 6f 64 65 |timize-f|orm-code|
|00001470| 2d 77 61 6c 6b 65 72 20 | 66 6f 72 6d 20 66 6f 72 |-walker |form for|
|00001480| 2d 65 66 66 65 63 74 20 | 6e 69 6c 20 6e 65 77 20 |-effect |nil new |
|00001490| 6f 70 74 20 62 79 74 65 | 2d 66 6f 72 2d 65 66 66 |opt byte|-for-eff|
|000014a0| 65 63 74 2d 6f 70 74 69 | 6d 69 7a 65 72 20 62 79 |ect-opti|mizer by|
|000014b0| 74 65 2d 6f 70 74 69 6d | 69 7a 65 72 20 62 79 74 |te-optim|izer byt|
|000014c0| 65 2d 6f 70 74 69 6d 69 | 7a 65 20 62 79 74 65 2d |e-optimi|ze byte-|
|000014d0| 6f 70 74 69 6d 69 7a 65 | 2d 6c 6f 67 20 28 74 20 |optimize|-log (t |
|000014e0| 73 6f 75 72 63 65 29 20 | 74 20 34 20 70 72 69 6e |source) |t 4 prin|
|000014f0| 74 2d 6c 65 6e 67 74 68 | 20 70 72 69 6e 74 2d 6c |t-length| print-l|
|00001500| 65 76 65 6c 20 70 72 69 | 6e 74 2d 65 73 63 61 70 |evel pri|nt-escap|
|00001510| 65 2d 6e 65 77 6c 69 6e | 65 73 20 62 79 74 65 2d |e-newlin|es byte-|
|00001520| 63 6f 6d 70 69 6c 65 2d | 6c 6f 67 2d 31 20 66 6f |compile-|log-1 fo|
|00001530| 72 6d 61 74 20 22 20 20 | 25 73 09 3d 3d 3e 09 25 |rmat " |%s.==>.%|
|00001540| 73 22 20 70 72 69 6e 31 | 2d 74 6f 2d 73 74 72 69 |s" prin1|-to-stri|
|00001550| 6e 67 20 62 79 74 65 2d | 6f 70 74 69 6d 69 7a 65 |ng byte-|optimize|
|00001560| 2d 66 6f 72 6d 5d 20 37 | 20 22 5c 0a 54 68 65 20 |-form] 7| "\.The |
|00001570| 73 6f 75 72 63 65 2d 6c | 65 76 65 6c 20 70 61 73 |source-l|evel pas|
|00001580| 73 20 6f 66 20 74 68 65 | 20 6f 70 74 69 6d 69 7a |s of the| optimiz|
|00001590| 65 72 2e 22 5d 29 0a 28 | 62 79 74 65 2d 63 6f 64 |er."]).(|byte-cod|
|000015a0| 65 20 22 c0 c1 c2 5c 22 | 88 c0 c3 c4 5c 22 88 c0 |e "...\"|....\"..|
|000015b0| c5 c6 5c 22 88 c0 c7 c8 | 5c 22 88 c0 c9 ca 5c 22 |..\"....|\"....\"|
|000015c0| 88 c0 cb cc 5c 22 88 c0 | cd ce 5c 22 88 c0 cf d0 |....\"..|..\"....|
|000015d0| 5c 22 88 c0 d1 d2 5c 22 | 88 d3 d1 d4 d5 23 88 c0 |\"....\"|.....#..|
|000015e0| d6 d7 5c 22 88 c0 d8 d9 | 5c 22 88 c0 da db 5c 22 |..\"....|\"....\"|
|000015f0| 88 c0 dc dd 5c 22 88 c0 | de df 5c 22 88 d3 e0 d4 |....\"..|..\"....|
|00001600| de 23 88 d3 e1 d4 cb 23 | 88 d3 e2 d4 cf 23 88 d3 |.#.....#|.....#..|
|00001610| e3 d4 cd 23 88 d3 e4 d4 | d6 23 88 d3 e5 d4 c5 23 |...#....|.#.....#|
|00001620| 88 d3 e6 d4 c5 23 88 d3 | e7 d4 da 23 88 d3 e8 d4 |.....#..|...#....|
|00001630| da 23 88 d3 e9 d4 da 23 | 88 d3 ea d4 da 23 88 d3 |.#.....#|.....#..|
|00001640| eb d4 da 23 88 d3 ec d4 | da 23 88 d3 ed d4 dc 23 |...#....|.#.....#|
|00001650| 88 d3 ee d4 dc 23 88 d3 | ef d4 dc 23 88 d3 f0 d4 |.....#..|...#....|
|00001660| dc 23 88 d3 f1 d4 dc 23 | 88 d3 f2 d4 dc 23 88 d3 |.#.....#|.....#..|
|00001670| f3 d4 dc 23 88 d3 f4 d4 | dc 23 88 d3 f5 d4 dc 23 |...#....|.#.....#|
|00001680| 88 d3 f6 d4 dc 23 88 d3 | f7 d4 dc 23 88 d3 f8 d4 |.....#..|...#....|
|00001690| dc 23 88 d3 f9 d4 dc 23 | 88 d3 fa d4 dc 23 88 d3 |.#.....#|.....#..|
|000016a0| fb d4 dc 23 88 d3 fc d4 | d8 23 88 d3 fd d4 d8 23 |...#....|.#.....#|
|000016b0| 88 d3 fe d4 d8 23 88 d3 | ff d4 dc 23 88 d3 81 40 |.....#..|...#...@|
|000016c0| 00 d4 dc 23 88 d3 81 41 | 00 d4 dc 23 88 d3 81 42 |...#...A|...#...B|
|000016d0| 00 d4 dc 23 88 d3 81 43 | 00 d4 dc 23 88 d3 81 44 |...#...C|...#...D|
|000016e0| 00 d4 81 45 00 23 88 c0 | 81 45 00 81 46 00 5c 22 |...E.#..|.E..F.\"|
|000016f0| 88 c0 81 47 00 81 48 00 | 5c 22 88 d3 81 49 00 d4 |...G..H.|\"...I..|
|00001700| 81 47 00 23 88 c0 81 4a | 00 81 4b 00 5c 22 88 c0 |.G.#...J|..K.\"..|
|00001710| 81 4c 00 81 4d 00 5c 22 | 88 c0 81 4e 00 81 4f 00 |.L..M.\"|...N..O.|
|00001720| 5c 22 88 c0 81 50 00 81 | 51 00 5c 22 88 c0 81 52 |\"...P..|Q.\"...R|
|00001730| 00 81 53 00 5c 22 88 d3 | 81 54 00 d4 81 4a 00 23 |..S.\"..|.T...J.#|
|00001740| 88 d3 81 55 00 d4 81 4c | 00 23 88 d3 81 56 00 d4 |...U...L|.#...V..|
|00001750| 81 4e 00 23 88 d3 81 57 | 00 d4 81 50 00 23 88 d3 |.N.#...W|...P.#..|
|00001760| 81 58 00 d4 81 52 00 23 | 88 d3 81 59 00 d4 81 5a |.X...R.#|...Y...Z|
|00001770| 00 23 88 d3 81 5b 00 d4 | 81 5a 00 23 88 d3 81 5c |.#...[..|.Z.#...\|
|00001780| 5c 00 d4 81 5a 00 23 88 | c0 81 5d 00 81 5e 00 5c |\...Z.#.|..]..^.\|
|00001790| 22 88 c0 81 5f 00 81 60 | 00 5c 22 88 d3 81 61 00 |"..._..`|.\"...a.|
|000017a0| d4 81 5d 00 23 88 d3 81 | 62 00 d4 81 5f 00 23 88 |..].#...|b..._.#.|
|000017b0| d3 81 63 00 d4 81 64 00 | 23 88 d3 81 65 00 d4 81 |..c...d.|#...e...|
|000017c0| 64 00 23 88 c0 81 64 00 | 81 66 00 5c 22 88 d3 81 |d.#...d.|.f.\"...|
|000017d0| 67 00 d4 81 68 00 23 88 | c0 81 68 00 81 69 00 5c |g...h.#.|..h..i.\|
|000017e0| 22 88 d3 81 6a 00 d4 81 | 6b 00 23 88 c0 81 6b 00 |"...j...|k.#...k.|
|000017f0| 81 6c 00 5c 22 88 81 6d | 00 81 6e 00 1e 6f 89 1e |.l.\"..m|..n..o..|
|00001800| 70 83 5b 02 d3 0e 70 40 | 81 71 00 81 72 00 23 88 |p.[...p@|.q..r.#.|
|00001810| 0e 70 41 89 16 70 84 46 | 02 0e 6f 83 75 02 d3 0e |.pA..p.F|..o.u...|
|00001820| 6f 40 81 71 00 81 73 00 | 23 88 0e 6f 41 89 16 6f |o@.q..s.|#..oA..o|
|00001830| 84 60 02 2a c0 81 74 00 | 81 75 00 5c 22 88 d3 81 |.`.*..t.|.u.\"...|
|00001840| 76 00 81 77 00 81 74 00 | 23 88 81 78 00 16 79 c0 |v..w..t.|#..x..y.|
|00001850| 87 22 20 5b 64 65 66 61 | 6c 69 61 73 20 62 79 74 |." [defa|lias byt|
|00001860| 65 2d 6f 70 74 69 6d 69 | 7a 65 2d 62 6f 64 79 20 |e-optimi|ze-body |
|00001870| 23 5b 28 66 6f 72 6d 73 | 20 61 6c 6c 2d 66 6f 72 |#[(forms| all-for|
|00001880| 2d 65 66 66 65 63 74 29 | 20 22 08 c1 89 89 1a 1b |-effect)| "......|
|00001890| 1c 89 1d 83 32 00 0e 06 | 86 13 00 0d 41 13 0d 40 |....2...|....A..@|
|000018a0| 85 1e 00 c7 0d 40 0b 5c | 22 89 12 84 27 00 0b 84 |.....@.\|"...'...|
|000018b0| 2b 00 5c 6e 0c 42 14 0d | 41 89 15 84 0c 00 0c 9f |+.\n.B..|A.......|
|000018c0| 2c 87 22 20 5b 66 6f 72 | 6d 73 20 6e 69 6c 20 6e |,." [for|ms nil n|
|000018d0| 65 77 20 66 65 20 72 65 | 73 75 6c 74 20 72 65 73 |ew fe re|sult res|
|000018e0| 74 20 61 6c 6c 2d 66 6f | 72 2d 65 66 66 65 63 74 |t all-fo|r-effect|
|000018f0| 20 62 79 74 65 2d 6f 70 | 74 69 6d 69 7a 65 2d 66 | byte-op|timize-f|
|00001900| 6f 72 6d 5d 20 35 5d 20 | 62 79 74 65 2d 63 6f 6d |orm] 5] |byte-com|
|00001910| 70 69 6c 65 2d 74 72 75 | 65 63 6f 6e 73 74 70 20 |pile-tru|econstp |
|00001920| 28 6d 61 63 72 6f 20 2e | 20 23 5b 28 66 6f 72 6d |(macro .| #[(form|
|00001930| 29 20 22 c0 c1 5c 6e 44 | c3 c4 5c 6e 44 c5 45 44 |) "..\nD|..\nD.ED|
|00001940| c6 c7 5c 6e 44 44 43 c3 | 5c 6e c8 45 43 46 87 22 |..\nDDC.|\n.ECF."|
|00001950| 20 5b 63 6f 6e 64 20 63 | 6f 6e 73 70 20 66 6f 72 | [cond c|onsp for|
|00001960| 6d 20 65 71 20 63 61 72 | 20 28 71 75 6f 74 65 20 |m eq car| (quote |
|00001970| 71 75 6f 74 65 29 20 6e | 6f 74 20 73 79 6d 62 6f |quote) n|ot symbo|
|00001980| 6c 70 20 74 5d 20 36 5d | 29 20 62 79 74 65 2d 6f |lp t] 6]|) byte-o|
|00001990| 70 74 69 6d 69 7a 65 2d | 61 73 73 6f 63 69 61 74 |ptimize-|associat|
|000019a0| 69 76 65 2d 6d 61 74 68 | 20 23 5b 28 66 6f 72 6d |ive-math| #[(form|
|000019b0| 29 20 22 c0 89 09 41 1a | 1b 1c 5c 6e 83 25 00 5c |) "...A.|..\n.%.\|
|000019c0| 6e 40 a7 83 19 00 5c 6e | 40 0b 42 13 82 1e 00 5c |n@....\n|@.B....\|
|000019d0| 6e 40 0c 42 14 5c 6e 41 | 89 12 84 0b 00 0b 41 83 |n@.B.\nA|......A.|
|000019e0| 50 00 0c 83 48 00 09 40 | c5 09 40 0b 5c 22 0c 41 |P...H..@|..@.\".A|
|000019f0| 83 42 00 09 40 0c 9f 42 | 82 44 00 0c 40 45 82 51 |.B..@..B|.D..@E.Q|
|00001a00| 00 c5 09 40 0b 5c 22 82 | 51 00 09 2b 87 22 20 5b |...@.\".|Q..+." [|
|00001a10| 6e 69 6c 20 66 6f 72 6d | 20 72 65 73 74 20 63 6f |nil form| rest co|
|00001a20| 6e 73 74 61 6e 74 73 20 | 61 72 67 73 20 61 70 70 |nstants |args app|
|00001a30| 6c 79 5d 20 35 5d 20 62 | 79 74 65 2d 6f 70 74 69 |ly] 5] b|yte-opti|
|00001a40| 6d 69 7a 65 2d 6e 6f 6e | 61 73 73 6f 63 69 61 74 |mize-non|associat|
|00001a50| 69 76 65 2d 6d 61 74 68 | 20 23 5b 28 66 6f 72 6d |ive-math| #[(form|
|00001a60| 29 20 22 08 41 40 a7 83 | 0f 00 08 41 41 40 a7 84 |) ".A@..|...AA@..|
|00001a70| 11 00 08 87 08 41 40 08 | 41 41 19 1a 09 40 a7 83 |.....A@.|AA...@..|
|00001a80| 2d 00 08 40 5c 6e 09 40 | 5c 22 12 09 41 89 11 82 |-..@\n.@|\"..A...|
|00001a90| 1a 00 09 83 3a 00 08 40 | 5c 6e 09 42 42 82 3b 00 |....:..@|\n.BB.;.|
|00001aa0| 5c 6e 2a 87 22 20 5b 66 | 6f 72 6d 20 72 65 73 74 |\n*." [f|orm rest|
|00001ab0| 20 63 6f 6e 73 74 61 6e | 74 5d 20 34 5d 20 62 79 | constan|t] 4] by|
|00001ac0| 74 65 2d 6f 70 74 69 6d | 69 7a 65 2d 64 65 6c 61 |te-optim|ize-dela|
|00001ad0| 79 2d 63 6f 6e 73 74 61 | 6e 74 73 2d 6d 61 74 68 |y-consta|nts-math|
|00001ae0| 20 23 5b 28 66 6f 72 6d | 20 73 74 61 72 74 20 66 | #[(form| start f|
|00001af0| 75 6e 29 20 22 08 53 09 | 9b 1a 5c 6e 41 89 12 41 |un) ".S.|..\nA..A|
|00001b00| 83 48 00 5c 6e 40 a7 83 | 05 00 c3 1c c5 09 21 11 |.H.\n@..|......!.|
|00001b10| 08 53 09 9b 12 5c 6e 41 | 89 12 83 37 00 5c 6e 40 |.S...\nA|...7.\n@|
|00001b20| a7 83 1e 00 5c 6e 40 0c | 42 14 5c 6e c3 a0 88 82 |....\n@.|B.\n....|
|00001b30| 1e 00 c6 c3 09 5c 22 c7 | 0e 08 0c 9f 5c 22 43 a4 |.....\".|....\"C.|
|00001b40| 11 29 82 05 00 09 29 87 | 22 20 5b 73 74 61 72 74 |.)....).|" [start|
|00001b50| 20 66 6f 72 6d 20 72 65 | 73 74 20 6e 69 6c 20 63 | form re|st nil c|
|00001b60| 6f 6e 73 74 61 6e 74 73 | 20 63 6f 70 79 2d 73 65 |onstants| copy-se|
|00001b70| 71 75 65 6e 63 65 20 64 | 65 6c 71 20 61 70 70 6c |quence d|elq appl|
|00001b80| 79 20 66 75 6e 5d 20 34 | 5d 20 62 79 74 65 2d 6f |y fun] 4|] byte-o|
|00001b90| 70 74 69 6d 69 7a 65 2d | 70 6c 75 73 20 23 5b 28 |ptimize-|plus #[(|
|00001ba0| 66 6f 72 6d 29 20 22 c0 | 09 c2 c3 23 11 c4 09 3e |form) ".|...#...>|
|00001bb0| 83 13 00 c5 c4 c6 09 21 | 5c 22 11 09 41 84 1d 00 |.......!|\"..A...|
|00001bc0| c7 c8 c9 8f 87 09 87 22 | 20 5b 62 79 74 65 2d 6f |......."| [byte-o|
|00001bd0| 70 74 69 6d 69 7a 65 2d | 64 65 6c 61 79 2d 63 6f |ptimize-|delay-co|
|00001be0| 6e 73 74 61 6e 74 73 2d | 6d 61 74 68 20 66 6f 72 |nstants-|math for|
|00001bf0| 6d 20 31 20 2b 20 30 20 | 64 65 6c 71 20 63 6f 70 |m 1 + 0 |delq cop|
|00001c00| 79 2d 73 65 71 75 65 6e | 63 65 20 6e 69 6c 20 28 |y-sequen|ce nil (|
|00001c10| 65 76 61 6c 20 66 6f 72 | 6d 29 20 28 28 65 72 72 |eval for|m) ((err|
|00001c20| 6f 72 20 66 6f 72 6d 29 | 29 5d 20 34 5d 20 62 79 |or form)|)] 4] by|
|00001c30| 74 65 2d 6f 70 74 69 6d | 69 7a 65 2d 6d 69 6e 75 |te-optim|ize-minu|
|00001c40| 73 20 23 5b 28 66 6f 72 | 6d 29 20 22 c0 09 c2 c3 |s #[(for|m) "....|
|00001c50| 23 11 c4 c5 09 9b 21 40 | 89 1e 06 c7 3d 83 26 00 |#.....!@|....=.&.|
|00001c60| c8 09 21 89 11 41 41 c9 | c7 c5 09 9b 5c 22 a1 88 |..!..AA.|....\"..|
|00001c70| 82 49 00 09 41 40 a7 83 | 49 00 0e 06 a7 83 49 00 |.I..A@..|I.....I.|
|00001c80| ca 09 41 40 0e 06 5a c2 | 09 38 45 c9 0e 06 c8 c5 |..A@..Z.|.8E.....|
|00001c90| 09 9b 21 5c 22 a4 11 29 | cb 09 41 41 41 84 63 00 |..!\"..)|..AAA.c.|
|00001ca0| 09 41 40 c7 3d 83 63 00 | 09 40 09 41 41 42 82 64 |.A@.=.c.|.@.AAB.d|
|00001cb0| 00 09 21 87 22 20 5b 62 | 79 74 65 2d 6f 70 74 69 |..!." [b|yte-opti|
|00001cc0| 6d 69 7a 65 2d 64 65 6c | 61 79 2d 63 6f 6e 73 74 |mize-del|ay-const|
|00001cd0| 61 6e 74 73 2d 6d 61 74 | 68 20 66 6f 72 6d 20 32 |ants-mat|h form 2|
|00001ce0| 20 2b 20 72 65 76 65 72 | 73 65 20 33 20 6c 61 73 | + rever|se 3 las|
|00001cf0| 74 20 30 20 63 6f 70 79 | 2d 73 65 71 75 65 6e 63 |t 0 copy|-sequenc|
|00001d00| 65 20 64 65 6c 71 20 2d | 20 62 79 74 65 2d 6f 70 |e delq -| byte-op|
|00001d10| 74 69 6d 69 7a 65 2d 70 | 72 65 64 69 63 61 74 65 |timize-p|redicate|
|00001d20| 5d 20 37 5d 20 62 79 74 | 65 2d 6f 70 74 69 6d 69 |] 7] byt|e-optimi|
|00001d30| 7a 65 2d 6d 75 6c 74 69 | 70 6c 79 20 23 5b 28 66 |ze-multi|ply #[(f|
|00001d40| 6f 72 6d 29 20 22 c0 09 | c2 c3 23 89 11 41 84 0d |orm) "..|..#..A..|
|00001d50| 00 c2 87 c4 09 21 40 89 | 1d c6 3d 83 1f 00 c7 09 |.....!@.|..=.....|
|00001d60| 41 44 82 6d 00 0d c2 3d | 83 2e 00 c8 c2 c9 09 21 |AD.m...=|.......!|
|00001d70| 5c 22 82 6d 00 0d ca 3d | 83 3f 00 cb c8 ca c9 09 |\".m...=|.?......|
|00001d80| 21 5c 22 44 82 6d 00 0d | cc 3d 83 6c 00 cd ce cf |!\"D.m..|.=.l....|
|00001d90| 09 41 5c 22 3e 83 6c 00 | c8 cc c9 09 21 5c 22 89 |.A\">.l.|....!\".|
|00001da0| 11 09 41 89 11 40 39 83 | 57 00 09 d0 09 40 09 40 |..A..@9.|W....@.@|
|00001db0| 45 a0 88 82 6d 00 09 29 | 87 22 20 5b 62 79 74 65 |E...m..)|." [byte|
|00001dc0| 2d 6f 70 74 69 6d 69 7a | 65 2d 64 65 6c 61 79 2d |-optimiz|e-delay-|
|00001dd0| 63 6f 6e 73 74 61 6e 74 | 73 2d 6d 61 74 68 20 66 |constant|s-math f|
|00001de0| 6f 72 6d 20 31 20 2a 20 | 72 65 76 65 72 73 65 20 |orm 1 * |reverse |
|00001df0| 6c 61 73 74 20 30 20 70 | 72 6f 67 6e 20 64 65 6c |last 0 p|rogn del|
|00001e00| 71 20 63 6f 70 79 2d 73 | 65 71 75 65 6e 63 65 20 |q copy-s|equence |
|00001e10| 2d 31 20 2d 20 32 20 74 | 20 6d 61 70 63 61 72 20 |-1 - 2 t| mapcar |
|00001e20| 73 79 6d 62 6f 6c 70 20 | 2b 5d 20 36 5d 20 62 79 |symbolp |+] 6] by|
|00001e30| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 62 75 74 6c 61 |te-compi|le-butla|
|00001e40| 73 74 20 23 5b 28 66 6f | 72 6d 29 20 22 c0 09 21 |st #[(fo|rm) "..!|
|00001e50| 41 9f 87 22 20 5b 72 65 | 76 65 72 73 65 20 66 6f |A.." [re|verse fo|
|00001e60| 72 6d 5d 20 32 5d 20 70 | 75 74 20 62 79 74 65 2d |rm] 2] p|ut byte-|
|00001e70| 6f 70 74 69 6d 69 7a 65 | 72 20 62 79 74 65 2d 63 |optimize|r byte-c|
|00001e80| 6f 6d 70 69 6c 65 2d 69 | 6e 6c 69 6e 65 2d 65 78 |ompile-i|nline-ex|
|00001e90| 70 61 6e 64 20 62 79 74 | 65 2d 6f 70 74 69 6d 69 |pand byt|e-optimi|
|00001ea0| 7a 65 2d 64 69 76 69 64 | 65 20 23 5b 28 66 6f 72 |ze-divid|e #[(for|
|00001eb0| 6d 29 20 22 c0 09 c2 c3 | 23 11 c4 09 41 41 21 40 |m) "....|#...AA!@|
|00001ec0| 89 1d a7 83 48 00 09 47 | c6 55 84 48 00 0d c7 55 |....H..G|.U.H...U|
|00001ed0| 83 2b 00 09 19 c4 09 21 | 41 9f 29 11 82 48 00 09 |.+.....!|A.)..H..|
|00001ee0| 41 40 a7 83 48 00 09 40 | 09 41 40 0d a5 09 41 41 |A@..H..@|.A@...AA|
|00001ef0| 19 c4 09 21 41 9f 29 42 | 42 11 c8 15 09 41 40 c9 |...!A.)B|B....A@.|
|00001f00| 3d 83 5a 00 ca cb 09 41 | 41 cc 23 82 7a 00 0d cd |=.Z....A|A.#.z...|
|00001f10| 3d 83 79 00 ce c6 09 9b | 83 72 00 09 19 c4 09 21 |=.y.....|.r.....!|
|00001f20| 41 9f 29 82 75 00 09 41 | 40 44 82 7a 00 09 29 87 |A.).u..A|@D.z..).|
|00001f30| 22 20 5b 62 79 74 65 2d | 6f 70 74 69 6d 69 7a 65 |" [byte-|optimize|
|00001f40| 2d 64 65 6c 61 79 2d 63 | 6f 6e 73 74 61 6e 74 73 |-delay-c|onstants|
|00001f50| 2d 6d 61 74 68 20 66 6f | 72 6d 20 32 20 2a 20 72 |-math fo|rm 2 * r|
|00001f60| 65 76 65 72 73 65 20 6c | 61 73 74 20 33 20 31 20 |everse l|ast 3 1 |
|00001f70| 6e 69 6c 20 30 20 61 70 | 70 65 6e 64 20 28 70 72 |nil 0 ap|pend (pr|
|00001f80| 6f 67 6e 29 20 28 30 29 | 20 2d 31 20 2d 5d 20 35 |ogn) (0)| -1 -] 5|
|00001f90| 5d 20 62 79 74 65 2d 6f | 70 74 69 6d 69 7a 65 2d |] byte-o|ptimize-|
|00001fa0| 6c 6f 67 6d 75 6d 62 6c | 65 20 23 5b 28 66 6f 72 |logmumbl|e #[(for|
|00001fb0| 6d 29 20 22 c0 09 c2 09 | 40 23 11 c3 c4 09 3e 83 |m) "....|@#....>.|
|00001fc0| 27 00 09 40 c5 3d 83 1c | 00 c6 09 41 42 82 5c 22 |'..@.=..|...AB.\"|
|00001fd0| 00 c7 c4 c8 09 21 5c 22 | 89 11 82 3e 00 09 a2 c9 |.....!\"|...>....|
|00001fe0| 3d 83 3d 00 ca 09 3e 83 | 3d 00 c7 ca c8 09 21 5c |=.=...>.|=.....!\|
|00001ff0| 22 82 3e 00 09 21 87 22 | 20 5b 62 79 74 65 2d 6f |".>..!."| [byte-o|
|00002000| 70 74 69 6d 69 7a 65 2d | 64 65 6c 61 79 2d 63 6f |ptimize-|delay-co|
|00002010| 6e 73 74 61 6e 74 73 2d | 6d 61 74 68 20 66 6f 72 |nstants-|math for|
|00002020| 6d 20 31 20 62 79 74 65 | 2d 6f 70 74 69 6d 69 7a |m 1 byte|-optimiz|
|00002030| 65 2d 70 72 65 64 69 63 | 61 74 65 20 30 20 6c 6f |e-predic|ate 0 lo|
|00002040| 67 61 6e 64 20 70 72 6f | 67 6e 20 64 65 6c 71 20 |gand pro|gn delq |
|00002050| 63 6f 70 79 2d 73 65 71 | 75 65 6e 63 65 20 6c 6f |copy-seq|uence lo|
|00002060| 67 69 6f 72 20 2d 31 5d | 20 35 5d 20 62 79 74 65 |gior -1]| 5] byte|
|00002070| 2d 6f 70 74 69 6d 69 7a | 65 2d 62 69 6e 61 72 79 |-optimiz|e-binary|
|00002080| 2d 70 72 65 64 69 63 61 | 74 65 20 23 5b 28 66 6f |-predica|te #[(fo|
|00002090| 72 6d 29 20 22 08 41 40 | 3a 83 10 00 08 41 40 40 |rm) ".A@|:....A@@|
|000020a0| c1 3d 82 1c 00 08 41 40 | 39 83 1f 00 08 41 40 c2 |.=....A@|9....A@.|
|000020b0| 3e 83 4d 00 c3 08 38 3a | 83 2f 00 c3 08 38 40 c1 |>.M...8:|./...8@.|
|000020c0| 3d 82 3b 00 c3 08 38 39 | 83 3e 00 c3 08 38 c2 3e |=.;...89|.>...8.>|
|000020d0| 83 43 00 c4 c5 c6 8f 87 | 08 40 c3 08 38 08 41 40 |.C......|.@..8.A@|
|000020e0| 45 87 08 87 22 20 5b 66 | 6f 72 6d 20 71 75 6f 74 |E..." [f|orm quot|
|000020f0| 65 20 28 6e 69 6c 20 74 | 29 20 32 20 6e 69 6c 20 |e (nil t|) 2 nil |
|00002100| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 c1 5c 6e |(byte-co|de "..\n|
|00002110| 21 44 87 22 20 5b 71 75 | 6f 74 65 20 65 76 61 6c |!D." [qu|ote eval|
|00002120| 20 66 6f 72 6d 5d 20 33 | 29 20 28 28 65 72 72 6f | form] 3|) ((erro|
|00002130| 72 20 66 6f 72 6d 29 29 | 5d 20 33 5d 20 62 79 74 |r form))|] 3] byt|
|00002140| 65 2d 6f 70 74 69 6d 69 | 7a 65 2d 70 72 65 64 69 |e-optimi|ze-predi|
|00002150| 63 61 74 65 20 23 5b 28 | 66 6f 72 6d 29 20 22 c0 |cate #[(|form) ".|
|00002160| 09 41 1a 1b 5c 6e 83 2e | 00 0b 83 2e 00 5c 6e 40 |.A..\n..|.....\n@|
|00002170| 3a 83 1b 00 5c 6e 40 40 | c4 3d 82 26 00 5c 6e 40 |:...\n@@|.=.&.\n@|
|00002180| 39 3f 86 26 00 5c 6e 40 | c5 3e 13 5c 6e 41 89 12 |9?.&.\n@|.>.\nA..|
|00002190| 84 09 00 0b 83 39 00 c6 | c7 c8 8f 82 3a 00 09 2a |.....9..|....:..*|
|000021a0| 87 22 20 5b 74 20 66 6f | 72 6d 20 72 65 73 74 20 |." [t fo|rm rest |
|000021b0| 6f 6b 20 71 75 6f 74 65 | 20 28 6e 69 6c 20 74 29 |ok quote| (nil t)|
|000021c0| 20 6e 69 6c 20 28 62 79 | 74 65 2d 63 6f 64 65 20 | nil (by|te-code |
|000021d0| 22 c0 c1 5c 6e 21 44 87 | 22 20 5b 71 75 6f 74 65 |"..\n!D.|" [quote|
|000021e0| 20 65 76 61 6c 20 66 6f | 72 6d 5d 20 33 29 20 28 | eval fo|rm] 3) (|
|000021f0| 28 65 72 72 6f 72 20 66 | 6f 72 6d 29 29 5d 20 34 |(error f|orm))] 4|
|00002200| 5d 20 62 79 74 65 2d 6f | 70 74 69 6d 69 7a 65 2d |] byte-o|ptimize-|
|00002210| 69 64 65 6e 74 69 74 79 | 20 23 5b 28 66 6f 72 6d |identity| #[(form|
|00002220| 29 20 22 08 41 83 0f 00 | 08 41 41 84 0f 00 08 41 |) ".A...|.AA....A|
|00002230| 40 87 c1 c2 08 41 47 08 | 41 47 c3 55 83 20 00 c4 |@....AG.|AG.U. ..|
|00002240| 82 21 00 c5 23 88 08 87 | 22 20 5b 66 6f 72 6d 20 |.!..#...|" [form |
|00002250| 62 79 74 65 2d 63 6f 6d | 70 69 6c 65 2d 77 61 72 |byte-com|pile-war|
|00002260| 6e 20 22 69 64 65 6e 74 | 69 74 79 20 63 61 6c 6c |n "ident|ity call|
|00002270| 65 64 20 77 69 74 68 20 | 25 64 20 61 72 67 25 73 |ed with |%d arg%s|
|00002280| 2c 20 62 75 74 20 72 65 | 71 75 69 72 65 73 20 31 |, but re|quires 1|
|00002290| 22 20 31 20 22 22 20 22 | 73 22 5d 20 35 5d 20 69 |" 1 "" "|s"] 5] i|
|000022a0| 64 65 6e 74 69 74 79 20 | 2b 20 2a 20 2d 20 2f 20 |dentity |+ * - / |
|000022b0| 6d 61 78 20 6d 69 6e 20 | 3d 20 65 71 20 65 71 6c |max min |= eq eql|
|000022c0| 20 65 71 75 61 6c 20 73 | 74 72 69 6e 67 3d 20 73 | equal s|tring= s|
|000022d0| 74 72 69 6e 67 2d 65 71 | 75 61 6c 20 3c 20 3e 20 |tring-eq|ual < > |
|000022e0| 3c 3d 20 3e 3d 20 31 2b | 20 31 2d 20 6e 6f 74 20 |<= >= 1+| 1- not |
|000022f0| 6e 75 6c 6c 20 6d 65 6d | 71 20 63 6f 6e 73 70 20 |null mem|q consp |
|00002300| 6c 69 73 74 70 20 73 79 | 6d 62 6f 6c 70 20 73 74 |listp sy|mbolp st|
|00002310| 72 69 6e 67 70 20 73 74 | 72 69 6e 67 3c 20 73 74 |ringp st|ring< st|
|00002320| 72 69 6e 67 2d 6c 65 73 | 73 70 20 6c 6f 67 61 6e |ring-les|sp logan|
|00002330| 64 20 6c 6f 67 69 6f 72 | 20 6c 6f 67 78 6f 72 20 |d logior| logxor |
|00002340| 6c 6f 67 6e 6f 74 20 63 | 61 72 20 63 64 72 20 63 |lognot c|ar cdr c|
|00002350| 61 72 2d 73 61 66 65 20 | 63 64 72 2d 73 61 66 65 |ar-safe |cdr-safe|
|00002360| 20 71 75 6f 74 65 20 62 | 79 74 65 2d 6f 70 74 69 | quote b|yte-opti|
|00002370| 6d 69 7a 65 2d 71 75 6f | 74 65 20 23 5b 28 66 6f |mize-quo|te #[(fo|
|00002380| 72 6d 29 20 22 08 41 40 | 3a 84 16 00 08 41 40 39 |rm) ".A@|:....A@9|
|00002390| 83 18 00 08 41 40 c1 3e | 84 18 00 08 87 08 41 40 |....A@.>|......A@|
|000023a0| 87 22 20 5b 66 6f 72 6d | 20 28 6e 69 6c 20 74 29 |." [form| (nil t)|
|000023b0| 5d 20 32 5d 20 62 79 74 | 65 2d 6f 70 74 69 6d 69 |] 2] byt|e-optimi|
|000023c0| 7a 65 2d 7a 65 72 6f 70 | 20 23 5b 28 66 6f 72 6d |ze-zerop| #[(form|
|000023d0| 29 20 22 08 41 40 a7 83 | 0b 00 c1 08 21 87 5c 6e |) ".A@..|....!.\n|
|000023e0| 83 16 00 c3 08 41 40 c4 | 45 87 08 87 22 20 5b 66 |.....A@.|E..." [f|
|000023f0| 6f 72 6d 20 65 76 61 6c | 20 62 79 74 65 2d 63 6f |orm eval| byte-co|
|00002400| 6d 70 69 6c 65 2d 64 65 | 6c 65 74 65 2d 65 72 72 |mpile-de|lete-err|
|00002410| 6f 72 73 20 3d 20 30 5d | 20 33 5d 20 7a 65 72 6f |ors = 0]| 3] zero|
|00002420| 70 20 62 79 74 65 2d 6f | 70 74 69 6d 69 7a 65 2d |p byte-o|ptimize-|
|00002430| 61 6e 64 20 23 5b 28 66 | 6f 72 6d 29 20 22 08 41 |and #[(f|orm) ".A|
|00002440| 3f 86 35 00 c1 08 3e 83 | 28 00 c2 c3 c4 08 21 89 |?.5...>.|(.....!.|
|00002450| 10 89 41 40 83 20 00 08 | 41 89 10 82 14 00 08 c1 |..A@. ..|A.......|
|00002460| a1 88 21 c1 45 87 08 41 | 41 84 32 00 08 41 40 87 |..!.E..A|A.2..A@.|
|00002470| c5 08 21 87 22 20 5b 66 | 6f 72 6d 20 6e 69 6c 20 |..!." [f|orm nil |
|00002480| 70 72 6f 67 6e 20 62 79 | 74 65 2d 6f 70 74 69 6d |progn by|te-optim|
|00002490| 69 7a 65 2d 61 6e 64 20 | 63 6f 70 79 2d 73 65 71 |ize-and |copy-seq|
|000024a0| 75 65 6e 63 65 20 62 79 | 74 65 2d 6f 70 74 69 6d |uence by|te-optim|
|000024b0| 69 7a 65 2d 70 72 65 64 | 69 63 61 74 65 5d 20 36 |ize-pred|icate] 6|
|000024c0| 5d 20 62 79 74 65 2d 6f | 70 74 69 6d 69 7a 65 2d |] byte-o|ptimize-|
|000024d0| 6f 72 20 23 5b 28 66 6f | 72 6d 29 20 22 c0 09 3e |or #[(fo|rm) "..>|
|000024e0| 83 0d 00 c2 c0 c3 09 21 | 5c 22 11 09 1c 0c 41 89 |.......!|\"....A.|
|000024f0| 14 41 83 41 00 0c 40 3a | 83 25 00 0c 40 40 c5 3d |.A.A..@:|.%..@@.=|
|00002500| 82 2f 00 0c 40 39 83 32 | 00 0c 40 c6 3d 83 0f 00 |./..@9.2|..@.=...|
|00002510| c3 09 21 11 0c 40 09 3e | c0 a1 89 14 82 10 00 09 |..!..@.>|........|
|00002520| 41 41 83 4d 00 c7 09 21 | 82 50 00 09 41 40 29 87 |AA.M...!|.P..A@).|
|00002530| 22 20 5b 6e 69 6c 20 66 | 6f 72 6d 20 64 65 6c 71 |" [nil f|orm delq|
|00002540| 20 63 6f 70 79 2d 73 65 | 71 75 65 6e 63 65 20 72 | copy-se|quence r|
|00002550| 65 73 74 20 71 75 6f 74 | 65 20 74 20 62 79 74 65 |est quot|e t byte|
|00002560| 2d 6f 70 74 69 6d 69 7a | 65 2d 70 72 65 64 69 63 |-optimiz|e-predic|
|00002570| 61 74 65 5d 20 35 5d 20 | 62 79 74 65 2d 6f 70 74 |ate] 5] |byte-opt|
|00002580| 69 6d 69 7a 65 2d 63 6f | 6e 64 20 23 5b 28 66 6f |imize-co|nd #[(fo|
|00002590| 72 6d 29 20 22 c0 19 c0 | 5c 6e 41 9e 89 11 83 15 |rm) "...|\nA.....|
|000025a0| 00 c3 09 c4 5c 6e 21 5c | 22 12 82 02 00 c0 5c 6e |....\n!\|".....\n|
|000025b0| 41 3e 83 23 00 c3 c0 c4 | 5c 6e 21 5c 22 12 5c 6e |A>.#....|\n!\".\n|
|000025c0| 11 09 41 89 11 83 8b 00 | 09 40 a2 3a 83 3c 00 09 |..A.....|.@.:.<..|
|000025d0| 40 a2 40 c5 3d 82 48 00 | 09 40 a2 39 83 4b 00 09 |@.@.=.H.|.@.9.K..|
|000025e0| 40 a2 c6 3d 83 25 00 09 | 5c 6e 41 3d 83 75 00 09 |@..=.%..|\nA=.u..|
|000025f0| 40 41 83 6e 00 09 40 41 | 41 83 67 00 c7 09 40 41 |@A.n..@A|A.g...@A|
|00002600| 42 82 71 00 09 40 41 40 | 82 71 00 09 40 40 12 82 |B.q..@A@|.q..@@..|
|00002610| 85 00 09 41 83 85 00 c4 | 5c 6e 21 12 09 40 5c 6e |...A....|\n!..@\n|
|00002620| 3e c0 a1 88 c0 89 11 82 | 26 00 29 5c 6e a2 c8 3d |>.......|&.)\n..=|
|00002630| 83 b8 00 5c 6e 41 89 1e | 09 40 3a 83 b5 00 0e 09 |...\nA..|.@:.....|
|00002640| 40 41 84 b5 00 ca 0e 09 | 40 40 cb 5c 6e 40 5c 6e |@A......|@@.\n@\n|
|00002650| 41 41 42 21 45 82 b6 00 | 5c 6e 29 87 5c 6e 87 22 |AAB!E...|\n).\n."|
|00002660| 20 5b 6e 69 6c 20 72 65 | 73 74 20 66 6f 72 6d 20 | [nil re|st form |
|00002670| 64 65 6c 71 20 63 6f 70 | 79 2d 73 65 71 75 65 6e |delq cop|y-sequen|
|00002680| 63 65 20 71 75 6f 74 65 | 20 74 20 70 72 6f 67 6e |ce quote| t progn|
|00002690| 20 63 6f 6e 64 20 63 6c | 61 75 73 65 73 20 6f 72 | cond cl|auses or|
|000026a0| 20 62 79 74 65 2d 6f 70 | 74 69 6d 69 7a 65 2d 63 | byte-op|timize-c|
|000026b0| 6f 6e 64 5d 20 36 5d 20 | 62 79 74 65 2d 6f 70 74 |ond] 6] |byte-opt|
|000026c0| 69 6d 69 7a 65 2d 69 66 | 20 23 5b 28 66 6f 72 6d |imize-if| #[(form|
|000026d0| 29 20 22 08 41 40 89 19 | 3a 83 10 00 09 40 c2 3d |) ".A@..|:....@.=|
|000026e0| 82 18 00 09 39 83 1b 00 | 09 c3 3d 83 21 00 c4 08 |....9...|..=.!...|
|000026f0| 38 82 7d 00 09 84 39 00 | c5 08 9b 83 33 00 c6 c7 |8.}...9.|....3...|
|00002700| 08 9b 42 82 7d 00 c7 08 | 38 82 7d 00 c4 08 38 83 |..B.}...|8.}...8.|
|00002710| 54 00 c7 08 9b c8 9a 83 | 50 00 c9 09 c4 08 38 45 |T.......|P.....8E|
|00002720| 82 7d 00 08 82 7d 00 c7 | 08 38 84 60 00 c5 08 9b |.}...}..|.8.`....|
|00002730| 83 79 00 c9 ca 09 44 c5 | 08 9b 83 72 00 c6 c7 08 |.y....D.|...r....|
|00002740| 9b 42 82 75 00 c7 08 38 | 45 82 7d 00 c6 09 cb 45 |.B.u...8|E.}....E|
|00002750| 29 87 22 20 5b 66 6f 72 | 6d 20 63 6c 61 75 73 65 |)." [for|m clause|
|00002760| 20 71 75 6f 74 65 20 74 | 20 32 20 34 20 70 72 6f | quote t| 2 4 pro|
|00002770| 67 6e 20 33 20 28 6e 69 | 6c 29 20 69 66 20 6e 6f |gn 3 (ni|l) if no|
|00002780| 74 20 6e 69 6c 5d 20 36 | 5d 20 62 79 74 65 2d 6f |t nil] 6|] byte-o|
|00002790| 70 74 69 6d 69 7a 65 2d | 77 68 69 6c 65 20 23 5b |ptimize-|while #[|
|000027a0| 28 66 6f 72 6d 29 20 22 | 08 41 40 85 07 00 08 87 |(form) "|.A@.....|
|000027b0| 22 20 5b 66 6f 72 6d 5d | 20 31 5d 20 61 6e 64 20 |" [form]| 1] and |
|000027c0| 6f 72 20 63 6f 6e 64 20 | 69 66 20 77 68 69 6c 65 |or cond |if while|
|000027d0| 20 2f 3d 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 | /= byte|-compile|
|000027e0| 2d 6e 65 67 61 74 69 6f | 6e 2d 6f 70 74 69 6d 69 |-negatio|n-optimi|
|000027f0| 7a 65 72 20 61 74 6f 6d | 20 6e 6c 69 73 74 70 20 |zer atom| nlistp |
|00002800| 62 79 74 65 2d 6f 70 74 | 69 6d 69 7a 65 2d 66 75 |byte-opt|imize-fu|
|00002810| 6e 63 61 6c 6c 20 23 5b | 28 66 6f 72 6d 29 20 22 |ncall #[|(form) "|
|00002820| 08 41 40 89 19 a2 c2 3e | 83 15 00 09 41 40 08 41 |.A@....>|....A@.A|
|00002830| 41 42 82 16 00 08 29 87 | 22 20 5b 66 6f 72 6d 20 |AB....).|" [form |
|00002840| 66 6e 20 28 71 75 6f 74 | 65 20 66 75 6e 63 74 69 |fn (quot|e functi|
|00002850| 6f 6e 29 5d 20 33 5d 20 | 62 79 74 65 2d 6f 70 74 |on)] 3] |byte-opt|
|00002860| 69 6d 69 7a 65 2d 61 70 | 70 6c 79 20 23 5b 28 66 |imize-ap|ply #[(f|
|00002870| 6f 72 6d 29 20 22 08 41 | 40 08 47 53 08 38 19 1a |orm) ".A|@.GS.8..|
|00002880| 09 83 15 00 09 a2 c3 3d | 83 3f 00 09 41 40 3c 83 |.......=|.?..A@<.|
|00002890| 34 00 c4 08 41 41 21 41 | 9f 1d c6 5c 6e 44 0d a4 |4...AA!A|...\nD..|
|000028a0| c7 c8 09 41 40 5c 22 a4 | 29 82 3c 00 c9 ca cb 09 |...A@\".|).<.....|
|000028b0| 21 5c 22 88 cc 86 40 00 | 08 2a 87 22 20 5b 66 6f |!\"...@.|.*." [fo|
|000028c0| 72 6d 20 6c 61 73 74 20 | 66 6e 20 71 75 6f 74 65 |rm last |fn quote|
|000028d0| 20 72 65 76 65 72 73 65 | 20 62 75 74 6c 61 73 74 | reverse| butlast|
|000028e0| 20 66 75 6e 63 61 6c 6c | 20 6d 61 70 63 61 72 20 | funcall| mapcar |
|000028f0| 23 5b 28 78 29 20 22 c0 | 09 44 87 22 20 5b 71 75 |#[(x) ".|.D." [qu|
|00002900| 6f 74 65 20 78 5d 20 32 | 5d 20 62 79 74 65 2d 63 |ote x] 2|] byte-c|
|00002910| 6f 6d 70 69 6c 65 2d 77 | 61 72 6e 20 22 6c 61 73 |ompile-w|arn "las|
|00002920| 74 20 61 72 67 20 74 6f | 20 61 70 70 6c 79 20 63 |t arg to| apply c|
|00002930| 61 6e 27 74 20 62 65 20 | 61 20 6c 69 74 65 72 61 |an't be |a litera|
|00002940| 6c 20 61 74 6f 6d 3a 20 | 25 73 22 20 70 72 69 6e |l atom: |%s" prin|
|00002950| 31 2d 74 6f 2d 73 74 72 | 69 6e 67 20 6e 69 6c 5d |1-to-str|ing nil]|
|00002960| 20 34 5d 20 66 75 6e 63 | 61 6c 6c 20 61 70 70 6c | 4] func|all appl|
|00002970| 79 20 6c 65 74 20 62 79 | 74 65 2d 6f 70 74 69 6d |y let by|te-optim|
|00002980| 69 7a 65 2d 6c 65 74 58 | 20 6c 65 74 2a 20 23 5b |ize-letX| let* #[|
|00002990| 28 66 6f 72 6d 29 20 22 | 08 41 40 84 0c 00 c1 08 |(form) "|.A@.....|
|000029a0| 41 41 42 87 c2 08 38 84 | 18 00 c3 08 9b 83 1a 00 |AAB...8.|........|
|000029b0| 08 87 08 40 c4 3d 83 2f | 00 c5 c6 c7 c8 c7 c9 08 |...@.=./|........|
|000029c0| 41 40 5c 22 5c 22 ca 23 | 87 cb 08 41 40 21 1e 0c |A@\"\".#|...A@!..|
|000029d0| cd cb 0e 0c 41 21 0e 0c | 40 41 40 ce 46 29 87 22 |....A!..|@A@.F)."|
|000029e0| 20 5b 66 6f 72 6d 20 70 | 72 6f 67 6e 20 32 20 33 | [form p|rogn 2 3|
|000029f0| 20 6c 65 74 20 61 70 70 | 65 6e 64 20 28 70 72 6f | let app|end (pro|
|00002a00| 67 6e 29 20 6d 61 70 63 | 61 72 20 63 61 72 20 63 |gn) mapc|ar car c|
|00002a10| 64 72 20 28 6e 69 6c 29 | 20 72 65 76 65 72 73 65 |dr (nil)| reverse|
|00002a20| 20 62 69 6e 64 73 20 6c | 65 74 2a 20 6e 69 6c 5d | binds l|et* nil]|
|00002a30| 20 37 5d 20 6e 74 68 20 | 62 79 74 65 2d 6f 70 74 | 7] nth |byte-opt|
|00002a40| 69 6d 69 7a 65 2d 6e 74 | 68 20 23 5b 28 66 6f 72 |imize-nt|h #[(for|
|00002a50| 6d 29 20 22 08 41 40 c1 | 3e 83 1e 00 c2 08 41 40 |m) ".A@.|>.....A@|
|00002a60| c3 55 83 17 00 c4 08 38 | 82 1c 00 c5 c4 08 38 44 |.U.....8|......8D|
|00002a70| 44 87 c6 08 21 87 22 20 | 5b 66 6f 72 6d 20 28 30 |D...!." |[form (0|
|00002a80| 20 31 29 20 63 61 72 20 | 30 20 32 20 63 64 72 20 | 1) car |0 2 cdr |
|00002a90| 62 79 74 65 2d 6f 70 74 | 69 6d 69 7a 65 2d 70 72 |byte-opt|imize-pr|
|00002aa0| 65 64 69 63 61 74 65 5d | 20 34 5d 20 6e 74 68 63 |edicate]| 4] nthc|
|00002ab0| 64 72 20 62 79 74 65 2d | 6f 70 74 69 6d 69 7a 65 |dr byte-|optimize|
|00002ac0| 2d 6e 74 68 63 64 72 20 | 23 5b 28 66 6f 72 6d 29 |-nthcdr |#[(form)|
|00002ad0| 20 22 08 41 40 89 19 c2 | 3e 84 10 00 c3 08 21 82 | ".A@...|>.....!.|
|00002ae0| 25 00 c4 08 38 10 c5 09 | 53 89 11 21 83 24 00 c6 |%...8...|S..!.$..|
|00002af0| 08 44 10 82 14 00 08 29 | 87 22 20 5b 66 6f 72 6d |.D.....)|." [form|
|00002b00| 20 63 6f 75 6e 74 20 28 | 30 20 31 20 32 29 20 62 | count (|0 1 2) b|
|00002b10| 79 74 65 2d 6f 70 74 69 | 6d 69 7a 65 2d 70 72 65 |yte-opti|mize-pre|
|00002b20| 64 69 63 61 74 65 20 32 | 20 6e 61 74 6e 75 6d 70 |dicate 2| natnump|
|00002b30| 20 63 64 72 5d 20 34 5d | 20 28 25 20 2a 20 2b 20 | cdr] 4]| (% * + |
|00002b40| 2f 20 2f 3d 20 31 2b 20 | 3c 20 3c 3d 20 3d 20 3e |/ /= 1+ |< <= = >|
|00002b50| 20 3e 3d 20 61 70 70 65 | 6e 64 20 61 72 65 66 20 | >= appe|nd aref |
|00002b60| 61 73 68 20 61 73 73 6f | 63 20 61 73 73 71 20 62 |ash asso|c assq b|
|00002b70| 6f 75 6e 64 70 20 62 75 | 66 66 65 72 2d 66 69 6c |oundp bu|ffer-fil|
|00002b80| 65 2d 6e 61 6d 65 20 62 | 75 66 66 65 72 2d 6c 6f |e-name b|uffer-lo|
|00002b90| 63 61 6c 2d 76 61 72 69 | 61 62 6c 65 73 20 62 75 |cal-vari|ables bu|
|00002ba0| 66 66 65 72 2d 6d 6f 64 | 69 66 69 65 64 2d 70 20 |ffer-mod|ified-p |
|00002bb0| 62 75 66 66 65 72 2d 73 | 75 62 73 74 72 69 6e 67 |buffer-s|ubstring|
|00002bc0| 20 63 61 70 69 74 61 6c | 69 7a 65 20 63 61 72 20 | capital|ize car |
|00002bd0| 63 64 72 20 63 6f 6e 63 | 61 74 20 63 6f 6f 72 64 |cdr conc|at coord|
|00002be0| 69 6e 61 74 65 73 2d 69 | 6e 2d 77 69 6e 64 6f 77 |inates-i|n-window|
|00002bf0| 2d 70 20 63 6f 70 79 2d | 6d 61 72 6b 65 72 20 63 |-p copy-|marker c|
|00002c00| 6f 75 6e 74 2d 6c 69 6e | 65 73 20 64 6f 63 75 6d |ount-lin|es docum|
|00002c10| 65 6e 74 61 74 69 6f 6e | 20 64 6f 77 6e 63 61 73 |entation| downcas|
|00002c20| 65 20 65 6c 74 20 66 62 | 6f 75 6e 64 70 20 66 65 |e elt fb|oundp fe|
|00002c30| 61 74 75 72 65 70 20 66 | 69 6c 65 2d 64 69 72 65 |aturep f|ile-dire|
|00002c40| 63 74 6f 72 79 2d 70 20 | 66 69 6c 65 2d 65 78 69 |ctory-p |file-exi|
|00002c50| 73 74 73 2d 70 20 66 69 | 6c 65 2d 6c 6f 63 6b 65 |sts-p fi|le-locke|
|00002c60| 64 2d 70 20 66 69 6c 65 | 2d 6e 61 6d 65 2d 61 62 |d-p file|-name-ab|
|00002c70| 73 6f 6c 75 74 65 2d 70 | 20 66 69 6c 65 2d 6e 65 |solute-p| file-ne|
|00002c80| 77 65 72 2d 74 68 61 6e | 2d 66 69 6c 65 2d 70 20 |wer-than|-file-p |
|00002c90| 66 69 6c 65 2d 72 65 61 | 64 61 62 6c 65 2d 70 20 |file-rea|dable-p |
|00002ca0| 66 69 6c 65 2d 73 79 6d | 6c 69 6e 6b 2d 70 20 66 |file-sym|link-p f|
|00002cb0| 69 6c 65 2d 77 72 69 74 | 61 62 6c 65 2d 70 20 66 |ile-writ|able-p f|
|00002cc0| 6f 72 6d 61 74 20 67 65 | 74 20 67 65 74 2d 62 75 |ormat ge|t get-bu|
|00002cd0| 66 66 65 72 20 67 65 74 | 2d 62 75 66 66 65 72 2d |ffer get|-buffer-|
|00002ce0| 77 69 6e 64 6f 77 20 67 | 65 74 65 6e 76 20 67 65 |window g|etenv ge|
|00002cf0| 74 2d 66 69 6c 65 2d 62 | 75 66 66 65 72 20 6c 65 |t-file-b|uffer le|
|00002d00| 6e 67 74 68 20 6c 6f 67 | 61 6e 64 20 6c 6f 67 69 |ngth log|and logi|
|00002d10| 6f 72 20 6c 6f 67 6e 6f | 74 20 6c 6f 67 78 6f 72 |or logno|t logxor|
|00002d20| 20 6c 73 68 20 6d 61 72 | 6b 65 72 2d 62 75 66 66 | lsh mar|ker-buff|
|00002d30| 65 72 20 6d 61 78 20 6d | 65 6d 62 65 72 20 6d 65 |er max m|ember me|
|00002d40| 6d 71 20 6d 69 6e 20 6d | 6f 64 20 6e 65 78 74 2d |mq min m|od next-|
|00002d50| 77 69 6e 64 6f 77 20 6e | 74 68 20 6e 74 68 63 64 |window n|th nthcd|
|00002d60| 72 20 70 72 65 76 69 6f | 75 73 2d 77 69 6e 64 6f |r previo|us-windo|
|00002d70| 77 20 72 61 73 73 71 20 | 72 65 67 65 78 70 2d 71 |w rassq |regexp-q|
|00002d80| 75 6f 74 65 20 72 65 76 | 65 72 73 65 20 73 74 72 |uote rev|erse str|
|00002d90| 69 6e 67 3c 20 73 74 72 | 69 6e 67 3d 20 73 74 72 |ing< str|ing= str|
|00002da0| 69 6e 67 2d 6c 65 73 73 | 70 20 73 74 72 69 6e 67 |ing-less|p string|
|00002db0| 2d 65 71 75 61 6c 20 73 | 75 62 73 74 72 69 6e 67 |-equal s|ubstring|
|00002dc0| 20 75 73 65 72 2d 76 61 | 72 69 61 62 6c 65 2d 70 | user-va|riable-p|
|00002dd0| 20 77 69 6e 64 6f 77 2d | 62 75 66 66 65 72 20 77 | window-|buffer w|
|00002de0| 69 6e 64 6f 77 2d 65 64 | 67 65 73 20 77 69 6e 64 |indow-ed|ges wind|
|00002df0| 6f 77 2d 68 65 69 67 68 | 74 20 77 69 6e 64 6f 77 |ow-heigh|t window|
|00002e00| 2d 68 73 63 72 6f 6c 6c | 20 77 69 6e 64 6f 77 2d |-hscroll| window-|
|00002e10| 77 69 64 74 68 20 7a 65 | 72 6f 70 29 20 28 61 72 |width ze|rop) (ar|
|00002e20| 72 61 79 70 20 61 74 6f | 6d 20 62 6f 62 70 20 62 |rayp ato|m bobp b|
|00002e30| 6f 6c 70 20 62 75 66 66 | 65 72 2d 65 6e 64 20 62 |olp buff|er-end b|
|00002e40| 75 66 66 65 72 2d 6c 69 | 73 74 20 62 75 66 66 65 |uffer-li|st buffe|
|00002e50| 72 2d 73 69 7a 65 20 62 | 75 66 66 65 72 2d 73 74 |r-size b|uffer-st|
|00002e60| 72 69 6e 67 20 62 75 66 | 66 65 72 70 20 63 68 61 |ring buf|ferp cha|
|00002e70| 72 2d 6f 72 2d 73 74 72 | 69 6e 67 2d 70 20 63 6f |r-or-str|ing-p co|
|00002e80| 6d 6d 61 6e 64 70 20 63 | 6f 6e 73 20 63 6f 6e 73 |mmandp c|ons cons|
|00002e90| 70 20 63 75 72 72 65 6e | 74 2d 62 75 66 66 65 72 |p curren|t-buffer|
|00002ea0| 20 64 6f 74 20 64 6f 74 | 2d 6d 61 72 6b 65 72 20 | dot dot|-marker |
|00002eb0| 65 6f 62 70 20 65 6f 6c | 70 20 65 71 20 65 71 6c |eobp eol|p eq eql|
|00002ec0| 20 65 71 75 61 6c 20 67 | 65 74 2d 6c 61 72 67 65 | equal g|et-large|
|00002ed0| 73 74 2d 77 69 6e 64 6f | 77 20 69 64 65 6e 74 69 |st-windo|w identi|
|00002ee0| 74 79 20 69 6e 74 65 67 | 65 72 70 20 69 6e 74 65 |ty integ|erp inte|
|00002ef0| 67 65 72 2d 6f 72 2d 6d | 61 72 6b 65 72 2d 70 20 |ger-or-m|arker-p |
|00002f00| 69 6e 74 65 72 61 63 74 | 69 76 65 2d 70 20 6b 65 |interact|ive-p ke|
|00002f10| 79 6d 61 70 70 20 6c 69 | 73 74 20 6c 69 73 74 70 |ymapp li|st listp|
|00002f20| 20 6d 61 6b 65 2d 6d 61 | 72 6b 65 72 20 6d 61 72 | make-ma|rker mar|
|00002f30| 6b 20 6d 61 72 6b 2d 6d | 61 72 6b 65 72 20 6d 61 |k mark-m|arker ma|
|00002f40| 72 6b 65 72 70 20 6d 69 | 6e 69 62 75 66 66 65 72 |rkerp mi|nibuffer|
|00002f50| 2d 77 69 6e 64 6f 77 20 | 6e 61 74 6e 75 6d 70 20 |-window |natnump |
|00002f60| 6e 6c 69 73 74 70 20 6e | 6f 74 20 6e 75 6c 6c 20 |nlistp n|ot null |
|00002f70| 6e 75 6d 62 65 72 70 20 | 6f 6e 65 2d 77 69 6e 64 |numberp |one-wind|
|00002f80| 6f 77 2d 70 20 70 6f 69 | 6e 74 20 70 6f 69 6e 74 |ow-p poi|nt point|
|00002f90| 2d 6d 61 72 6b 65 72 20 | 70 72 6f 63 65 73 73 70 |-marker |processp|
|00002fa0| 20 73 65 6c 65 63 74 65 | 64 2d 77 69 6e 64 6f 77 | selecte|d-window|
|00002fb0| 20 73 65 71 75 65 6e 63 | 65 70 20 73 74 72 69 6e | sequenc|ep strin|
|00002fc0| 67 70 20 73 75 62 72 70 | 20 73 79 6d 62 6f 6c 70 |gp subrp| symbolp|
|00002fd0| 20 73 79 6e 74 61 78 2d | 74 61 62 6c 65 2d 70 20 | syntax-|table-p |
|00002fe0| 76 65 63 74 6f 72 20 76 | 65 63 74 6f 72 70 20 77 |vector v|ectorp w|
|00002ff0| 69 6e 64 6f 77 70 29 20 | 73 69 64 65 2d 65 66 66 |indowp) |side-eff|
|00003000| 65 63 74 2d 61 6e 64 2d | 65 72 72 6f 72 2d 66 72 |ect-and-|error-fr|
|00003010| 65 65 2d 66 6e 73 20 73 | 69 64 65 2d 65 66 66 65 |ee-fns s|ide-effe|
|00003020| 63 74 2d 66 72 65 65 2d | 66 6e 73 20 73 69 64 65 |ct-free-|fns side|
|00003030| 2d 65 66 66 65 63 74 2d | 66 72 65 65 20 74 20 65 |-effect-|free t e|
|00003040| 72 72 6f 72 2d 66 72 65 | 65 20 62 79 74 65 2d 63 |rror-fre|e byte-c|
|00003050| 6f 6d 70 69 6c 65 2d 73 | 70 6c 69 63 65 2d 69 6e |ompile-s|plice-in|
|00003060| 2d 61 6c 72 65 61 64 79 | 2d 63 6f 6d 70 69 6c 65 |-already|-compile|
|00003070| 64 2d 63 6f 64 65 20 23 | 5b 28 66 6f 72 6d 29 20 |d-code #|[(form) |
|00003080| 22 08 c1 3e 84 5c 6e 00 | c2 0b 21 87 c4 c5 0b 41 |"..>.\n.|..!....A|
|00003090| 40 c6 0b 38 c7 23 21 88 | 0e 08 c9 0b 38 5c 5c 0e |@..8.#!.|....8\\.|
|000030a0| 5c 6e 5d 16 5c 6e 0e 08 | 54 89 16 08 87 22 20 5b |\n].\n..|T...." [|
|000030b0| 62 79 74 65 2d 6f 70 74 | 69 6d 69 7a 65 20 28 74 |byte-opt|imize (t|
|000030c0| 20 6c 61 70 29 20 62 79 | 74 65 2d 63 6f 6d 70 69 | lap) by|te-compi|
|000030d0| 6c 65 2d 6e 6f 72 6d 61 | 6c 2d 63 61 6c 6c 20 66 |le-norma|l-call f|
|000030e0| 6f 72 6d 20 62 79 74 65 | 2d 69 6e 6c 69 6e 65 2d |orm byte|-inline-|
|000030f0| 6c 61 70 63 6f 64 65 20 | 62 79 74 65 2d 64 65 63 |lapcode |byte-dec|
|00003100| 6f 6d 70 69 6c 65 2d 62 | 79 74 65 63 6f 64 65 2d |ompile-b|ytecode-|
|00003110| 31 20 32 20 74 20 62 79 | 74 65 2d 63 6f 6d 70 69 |1 2 t by|te-compi|
|00003120| 6c 65 2d 64 65 70 74 68 | 20 33 20 62 79 74 65 2d |le-depth| 3 byte-|
|00003130| 63 6f 6d 70 69 6c 65 2d | 6d 61 78 64 65 70 74 68 |compile-|maxdepth|
|00003140| 5d 20 35 5d 20 62 79 74 | 65 2d 63 6f 64 65 20 62 |] 5] byt|e-code b|
|00003150| 79 74 65 2d 63 6f 6d 70 | 69 6c 65 20 28 62 79 74 |yte-comp|ile (byt|
|00003160| 65 2d 63 6f 6e 73 74 61 | 6e 74 20 62 79 74 65 2d |e-consta|nt byte-|
|00003170| 63 6f 6e 73 74 61 6e 74 | 32 20 62 79 74 65 2d 76 |constant|2 byte-v|
|00003180| 61 72 72 65 66 20 62 79 | 74 65 2d 76 61 72 73 65 |arref by|te-varse|
|00003190| 74 20 62 79 74 65 2d 76 | 61 72 62 69 6e 64 29 20 |t byte-v|arbind) |
|000031a0| 62 79 74 65 2d 63 6f 6e | 73 74 72 65 66 2d 6f 70 |byte-con|stref-op|
|000031b0| 73 5d 20 35 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |s] 5).(d|efalias |
|000031c0| 27 64 69 73 61 73 73 65 | 6d 62 6c 65 2d 6f 66 66 |'disasse|mble-off|
|000031d0| 73 65 74 20 23 5b 6e 69 | 6c 20 22 08 09 57 83 47 |set #[ni|l "..W.G|
|000031e0| 00 c2 08 c3 5c 22 1c c2 | 08 c5 5c 22 10 0c c6 3d |....\"..|..\"...=|
|000031f0| 83 23 00 0e 07 54 16 07 | 0e 08 0e 07 48 82 45 00 |.#...T..|....H.E.|
|00003200| 0c c3 3d 83 44 00 0e 07 | 54 16 07 0e 08 0e 07 48 |..=.D...|T......H|
|00003210| 0e 07 54 16 07 c9 0e 08 | 0e 07 48 ca 5c 22 5c 5c |..T.....|..H.\"\\|
|00003220| 82 45 00 0c 29 87 08 0e | 0b 59 83 56 00 08 0e 0b |.E..)...|.Y.V....|
|00003230| 5a 0e 0b 10 87 08 0e 0c | 59 83 7d 00 08 0e 0d 58 |Z.......|Y.}....X|
|00003240| 83 7d 00 0e 07 54 16 07 | 0e 08 0e 07 48 0e 07 54 |.}...T..|....H..T|
|00003250| 16 07 c9 0e 08 0e 07 48 | ca 5c 22 5c 5c 87 08 0e |.......H|.\"\\...|
|00003260| 0e 59 85 95 00 08 0e 0f | 58 85 95 00 0e 07 54 16 |.Y......|X.....T.|
|00003270| 07 0e 08 0e 07 48 87 22 | 20 5b 6f 70 20 62 79 74 |.....H."| [op byt|
|00003280| 65 2d 6e 74 68 20 6c 6f | 67 61 6e 64 20 37 20 74 |e-nth lo|gand 7 t|
|00003290| 65 6d 20 32 34 38 20 36 | 20 70 74 72 20 62 79 74 |em 248 6| ptr byt|
|000032a0| 65 73 20 6c 73 68 20 38 | 20 62 79 74 65 2d 63 6f |es lsh 8| byte-co|
|000032b0| 6e 73 74 61 6e 74 20 62 | 79 74 65 2d 63 6f 6e 73 |nstant b|yte-cons|
|000032c0| 74 61 6e 74 32 20 62 79 | 74 65 2d 67 6f 74 6f 2d |tant2 by|te-goto-|
|000032d0| 69 66 2d 6e 6f 74 2d 6e | 69 6c 2d 65 6c 73 65 2d |if-not-n|il-else-|
|000032e0| 70 6f 70 20 62 79 74 65 | 2d 6c 69 73 74 4e 20 62 |pop byte|-listN b|
|000032f0| 79 74 65 2d 69 6e 73 65 | 72 74 4e 5d 20 34 20 22 |yte-inse|rtN] 4 "|
|00003300| 5c 0a 44 6f 6e 27 74 20 | 63 61 6c 6c 20 74 68 69 |\.Don't |call thi|
|00003310| 73 21 22 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |s!"]).(d|efalias |
|00003320| 27 62 79 74 65 2d 64 65 | 63 6f 6d 70 69 6c 65 2d |'byte-de|compile-|
|00003330| 62 79 74 65 63 6f 64 65 | 20 23 5b 28 62 79 74 65 |bytecode| #[(byte|
|00003340| 73 20 63 6f 6e 73 74 76 | 65 63 29 20 22 c0 89 c1 |s constv|ec) "...|
|00003350| 1a 1b 1c c5 0e 06 0e 07 | 5c 22 2b 87 22 20 5b 6e |........|\"+." [n|
|00003360| 69 6c 20 30 20 62 79 74 | 65 2d 63 6f 6d 70 69 6c |il 0 byt|e-compil|
|00003370| 65 2d 74 61 67 2d 6e 75 | 6d 62 65 72 20 62 79 74 |e-tag-nu|mber byt|
|00003380| 65 2d 63 6f 6d 70 69 6c | 65 2d 76 61 72 69 61 62 |e-compil|e-variab|
|00003390| 6c 65 73 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |les byte|-compile|
|000033a0| 2d 63 6f 6e 73 74 61 6e | 74 73 20 62 79 74 65 2d |-constan|ts byte-|
|000033b0| 64 65 63 6f 6d 70 69 6c | 65 2d 62 79 74 65 63 6f |decompil|e-byteco|
|000033c0| 64 65 2d 31 20 62 79 74 | 65 73 20 63 6f 6e 73 74 |de-1 byt|es const|
|000033d0| 76 65 63 5d 20 33 20 22 | 5c 0a 54 75 72 6e 73 20 |vec] 3 "|\.Turns |
|000033e0| 42 59 54 45 43 4f 44 45 | 20 69 6e 74 6f 20 6c 61 |BYTECODE| into la|
|000033f0| 70 63 6f 64 65 2c 20 72 | 65 66 65 72 72 69 6e 67 |pcode, r|eferring|
|00003400| 20 74 6f 20 43 4f 4e 53 | 54 56 45 43 2e 22 5d 29 | to CONS|TVEC."])|
|00003410| 0a 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c0 c1 c2 |.(byte-c|ode "...|
|00003420| 5c 22 88 c3 0c 42 15 c6 | 16 07 c8 16 09 ca 16 0b |\"...B..|........|
|00003430| cc 0e 0b a4 16 0d c0 87 | 22 20 5b 64 65 66 61 6c |........|" [defal|
|00003440| 69 61 73 20 62 79 74 65 | 2d 64 65 63 6f 6d 70 69 |ias byte|-decompi|
|00003450| 6c 65 2d 62 79 74 65 63 | 6f 64 65 2d 31 20 23 5b |le-bytec|ode-1 #[|
|00003460| 28 62 79 74 65 73 20 63 | 6f 6e 73 74 76 65 63 20 |(bytes c|onstvec |
|00003470| 26 6f 70 74 69 6f 6e 61 | 6c 20 6d 61 6b 65 2d 73 |&optiona|l make-s|
|00003480| 70 6c 69 63 61 62 6c 65 | 29 20 22 08 47 c1 c2 89 |plicable|) ".G...|
|00003490| 89 89 89 89 89 89 c1 1b | 1c 1d 1e 06 1e 07 1e 08 |........|........|
|000034a0| 1e 09 1e 5c 6e 1e 0b 1e | 0c 1e 0d 0e 0c 0e 0d 55 |...\n...|.......U|
|000034b0| 84 f6 00 08 0e 0c 48 16 | 08 0e 0c 16 0b ce 20 16 |......H.|...... .|
|000034c0| 07 0e 0f 0e 08 48 89 16 | 08 0e 10 3e 83 5d 00 0e |.....H..|...>.]..|
|000034d0| 07 0e 09 9e 86 57 00 0e | 07 d1 20 42 0e 09 42 89 |.....W..|.. B..B.|
|000034e0| 16 09 40 41 16 07 82 dc | 00 0e 08 d2 3d 83 6a 00 |..@A....|....=.j.|
|000034f0| d3 16 08 82 72 00 0e 08 | 0e 14 3e 83 b4 00 0e 15 |....r...|..>.....|
|00003500| 0e 07 48 15 0e 08 d3 3d | 83 9f 00 0d 3b 83 8c 00 |..H....=|....;...|
|00003510| d6 0d 0e 17 5c 22 82 90 | 00 0d 0e 17 9e 86 af 00 |....\"..|........|
|00003520| 0d 43 0e 17 42 89 16 17 | 40 82 af 00 0d 0e 18 9e |.C..B...|@.......|
|00003530| 86 af 00 0d 43 0e 18 42 | 89 16 18 40 16 07 82 dc |....C..B|...@....|
|00003540| 00 0e 19 83 dc 00 0e 08 | da 3d 83 dc 00 0e 0c 0e |........|.=......|
|00003550| 0d 53 55 83 cf 00 c2 16 | 08 82 dc 00 0c 86 d7 00 |.SU.....|........|
|00003560| d1 20 89 14 16 07 db 16 | 08 0e 0b 0e 08 0e 07 86 |. ......|........|
|00003570| e6 00 c1 42 42 0e 06 42 | 16 06 0e 0c 54 89 16 0c |...BB..B|....T...|
|00003580| 82 21 00 0e 06 89 1e 1c | 83 2b 01 0e 1c 40 40 0e |.!......|.+...@@.|
|00003590| 09 9e 89 15 83 5c 22 01 | 0e 1c c2 0d 41 42 0e 1c |.....\".|....AB..|
|000035a0| 41 42 a1 88 dd 0d 0e 09 | 5c 22 16 09 0e 1c 41 16 |AB......|\"....A.|
|000035b0| 1c 0e 1c 41 89 16 1c 84 | fe 00 29 0e 09 83 37 01 |...A....|..)...7.|
|000035c0| de df 0e 09 5c 22 88 0e | 06 40 41 40 84 44 01 0e |....\"..|.@A@.D..|
|000035d0| 06 41 16 06 0c 83 50 01 | c2 0c 42 0e 06 42 16 06 |.A....P.|..B..B..|
|000035e0| e0 e1 0e 06 9f 5c 22 2e | 0b 87 22 20 5b 62 79 74 |.....\".|.." [byt|
|000035f0| 65 73 20 30 20 6e 69 6c | 20 72 65 74 63 6f 75 6e |es 0 nil| retcoun|
|00003600| 74 20 65 6e 64 74 61 67 | 20 74 6d 70 20 6c 61 70 |t endtag| tmp lap|
|00003610| 20 6f 66 66 73 65 74 20 | 6f 70 20 74 61 67 73 20 | offset |op tags |
|00003620| 74 61 67 20 6f 70 74 72 | 20 70 74 72 20 6c 65 6e |tag optr| ptr len|
|00003630| 67 74 68 20 64 69 73 61 | 73 73 65 6d 62 6c 65 2d |gth disa|ssemble-|
|00003640| 6f 66 66 73 65 74 20 62 | 79 74 65 2d 63 6f 64 65 |offset b|yte-code|
|00003650| 2d 76 65 63 74 6f 72 20 | 62 79 74 65 2d 67 6f 74 |-vector |byte-got|
|00003660| 6f 2d 6f 70 73 20 62 79 | 74 65 2d 63 6f 6d 70 69 |o-ops by|te-compi|
|00003670| 6c 65 2d 6d 61 6b 65 2d | 74 61 67 20 62 79 74 65 |le-make-|tag byte|
|00003680| 2d 63 6f 6e 73 74 61 6e | 74 32 20 62 79 74 65 2d |-constan|t2 byte-|
|00003690| 63 6f 6e 73 74 61 6e 74 | 20 62 79 74 65 2d 63 6f |constant| byte-co|
|000036a0| 6e 73 74 72 65 66 2d 6f | 70 73 20 63 6f 6e 73 74 |nstref-o|ps const|
|000036b0| 76 65 63 20 61 73 73 6f | 63 20 62 79 74 65 2d 63 |vec asso|c byte-c|
|000036c0| 6f 6d 70 69 6c 65 2d 63 | 6f 6e 73 74 61 6e 74 73 |ompile-c|onstants|
|000036d0| 20 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 76 61 | byte-co|mpile-va|
|000036e0| 72 69 61 62 6c 65 73 20 | 6d 61 6b 65 2d 73 70 6c |riables |make-spl|
|000036f0| 69 63 61 62 6c 65 20 62 | 79 74 65 2d 72 65 74 75 |icable b|yte-retu|
|00003700| 72 6e 20 62 79 74 65 2d | 67 6f 74 6f 20 72 65 73 |rn byte-|goto res|
|00003710| 74 20 64 65 6c 71 20 65 | 72 72 6f 72 20 22 6f 70 |t delq e|rror "op|
|00003720| 74 69 6d 69 7a 65 72 20 | 65 72 72 6f 72 3a 20 6d |timizer |error: m|
|00003730| 69 73 73 65 64 20 74 61 | 67 73 20 25 73 22 20 6d |issed ta|gs %s" m|
|00003740| 61 70 63 61 72 20 63 64 | 72 5d 20 31 32 5d 20 54 |apcar cd|r] 12] T|
|00003750| 41 47 20 62 79 74 65 2d | 67 6f 74 6f 2d 6f 70 73 |AG byte-|goto-ops|
|00003760| 20 62 79 74 65 2d 74 61 | 67 72 65 66 2d 6f 70 73 | byte-ta|gref-ops|
|00003770| 20 28 62 79 74 65 2d 67 | 6f 74 6f 2d 69 66 2d 6e | (byte-g|oto-if-n|
|00003780| 69 6c 20 62 79 74 65 2d | 67 6f 74 6f 2d 69 66 2d |il byte-|goto-if-|
|00003790| 6e 6f 74 2d 6e 69 6c 20 | 62 79 74 65 2d 67 6f 74 |not-nil |byte-got|
|000037a0| 6f 2d 69 66 2d 6e 69 6c | 2d 65 6c 73 65 2d 70 6f |o-if-nil|-else-po|
|000037b0| 70 20 62 79 74 65 2d 67 | 6f 74 6f 2d 69 66 2d 6e |p byte-g|oto-if-n|
|000037c0| 6f 74 2d 6e 69 6c 2d 65 | 6c 73 65 2d 70 6f 70 29 |ot-nil-e|lse-pop)|
|000037d0| 20 62 79 74 65 2d 63 6f | 6e 64 69 74 69 6f 6e 61 | byte-co|nditiona|
|000037e0| 6c 2d 6f 70 73 20 28 62 | 79 74 65 2d 63 6f 6e 73 |l-ops (b|yte-cons|
|000037f0| 74 61 6e 74 20 62 79 74 | 65 2d 64 75 70 20 62 79 |tant byt|e-dup by|
|00003800| 74 65 2d 73 79 6d 62 6f | 6c 70 20 62 79 74 65 2d |te-symbo|lp byte-|
|00003810| 63 6f 6e 73 70 20 62 79 | 74 65 2d 73 74 72 69 6e |consp by|te-strin|
|00003820| 67 70 20 62 79 74 65 2d | 6c 69 73 74 70 20 62 79 |gp byte-|listp by|
|00003830| 74 65 2d 6e 75 6d 62 65 | 72 70 20 62 79 74 65 2d |te-numbe|rp byte-|
|00003840| 69 6e 74 65 67 65 72 70 | 20 62 79 74 65 2d 65 71 |integerp| byte-eq|
|00003850| 20 62 79 74 65 2d 65 71 | 75 61 6c 20 62 79 74 65 | byte-eq|ual byte|
|00003860| 2d 6e 6f 74 20 62 79 74 | 65 2d 63 6f 6e 73 20 62 |-not byt|e-cons b|
|00003870| 79 74 65 2d 6c 69 73 74 | 31 20 62 79 74 65 2d 6c |yte-list|1 byte-l|
|00003880| 69 73 74 32 20 62 79 74 | 65 2d 69 6e 74 65 72 61 |ist2 byt|e-intera|
|00003890| 63 74 69 76 65 2d 70 20 | 22 42 79 74 65 2d 63 6f |ctive-p |"Byte-co|
|000038a0| 64 65 73 20 74 68 61 74 | 20 63 61 6e 20 62 65 20 |des that| can be |
|000038b0| 6d 6f 76 65 64 20 70 61 | 73 74 20 61 6e 20 75 6e |moved pa|st an un|
|000038c0| 62 69 6e 64 2e 22 29 20 | 62 79 74 65 2d 61 66 74 |bind.") |byte-aft|
|000038d0| 65 72 2d 75 6e 62 69 6e | 64 2d 6f 70 73 20 28 62 |er-unbin|d-ops (b|
|000038e0| 79 74 65 2d 63 6f 6e 73 | 74 61 6e 74 20 62 79 74 |yte-cons|tant byt|
|000038f0| 65 2d 64 75 70 20 62 79 | 74 65 2d 73 79 6d 62 6f |e-dup by|te-symbo|
|00003900| 6c 70 20 62 79 74 65 2d | 63 6f 6e 73 70 20 62 79 |lp byte-|consp by|
|00003910| 74 65 2d 73 74 72 69 6e | 67 70 20 62 79 74 65 2d |te-strin|gp byte-|
|00003920| 6c 69 73 74 70 20 62 79 | 74 65 2d 69 6e 74 65 67 |listp by|te-integ|
|00003930| 65 72 70 20 62 79 74 65 | 2d 6e 75 6d 62 65 72 70 |erp byte|-numberp|
|00003940| 20 62 79 74 65 2d 65 71 | 20 62 79 74 65 2d 65 71 | byte-eq| byte-eq|
|00003950| 75 61 6c 20 62 79 74 65 | 2d 6e 6f 74 20 62 79 74 |ual byte|-not byt|
|00003960| 65 2d 63 61 72 2d 73 61 | 66 65 20 62 79 74 65 2d |e-car-sa|fe byte-|
|00003970| 63 64 72 2d 73 61 66 65 | 20 62 79 74 65 2d 63 6f |cdr-safe| byte-co|
|00003980| 6e 73 20 62 79 74 65 2d | 6c 69 73 74 31 20 62 79 |ns byte-|list1 by|
|00003990| 74 65 2d 6c 69 73 74 32 | 20 62 79 74 65 2d 70 6f |te-list2| byte-po|
|000039a0| 69 6e 74 20 62 79 74 65 | 2d 70 6f 69 6e 74 2d 6d |int byte|-point-m|
|000039b0| 61 78 20 62 79 74 65 2d | 70 6f 69 6e 74 2d 6d 69 |ax byte-|point-mi|
|000039c0| 6e 20 62 79 74 65 2d 66 | 6f 6c 6c 6f 77 69 6e 67 |n byte-f|ollowing|
|000039d0| 2d 63 68 61 72 20 62 79 | 74 65 2d 70 72 65 63 65 |-char by|te-prece|
|000039e0| 64 69 6e 67 2d 63 68 61 | 72 20 62 79 74 65 2d 63 |ding-cha|r byte-c|
|000039f0| 75 72 72 65 6e 74 2d 63 | 6f 6c 75 6d 6e 20 62 79 |urrent-c|olumn by|
|00003a00| 74 65 2d 65 6f 6c 70 20 | 62 79 74 65 2d 65 6f 62 |te-eolp |byte-eob|
|00003a10| 70 20 62 79 74 65 2d 62 | 6f 6c 70 20 62 79 74 65 |p byte-b|olp byte|
|00003a20| 2d 62 6f 62 70 20 62 79 | 74 65 2d 63 75 72 72 65 |-bobp by|te-curre|
|00003a30| 6e 74 2d 62 75 66 66 65 | 72 20 62 79 74 65 2d 69 |nt-buffe|r byte-i|
|00003a40| 6e 74 65 72 61 63 74 69 | 76 65 2d 70 29 20 62 79 |nteracti|ve-p) by|
|00003a50| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 73 69 64 65 2d |te-compi|le-side-|
|00003a60| 65 66 66 65 63 74 2d 61 | 6e 64 2d 65 72 72 6f 72 |effect-a|nd-error|
|00003a70| 2d 66 72 65 65 2d 6f 70 | 73 20 28 62 79 74 65 2d |-free-op|s (byte-|
|00003a80| 76 61 72 72 65 66 20 62 | 79 74 65 2d 6e 74 68 20 |varref b|yte-nth |
|00003a90| 62 79 74 65 2d 6d 65 6d | 71 20 62 79 74 65 2d 63 |byte-mem|q byte-c|
|00003aa0| 61 72 20 62 79 74 65 2d | 63 64 72 20 62 79 74 65 |ar byte-|cdr byte|
|00003ab0| 2d 6c 65 6e 67 74 68 20 | 62 79 74 65 2d 61 72 65 |-length |byte-are|
|00003ac0| 66 20 62 79 74 65 2d 73 | 79 6d 62 6f 6c 2d 76 61 |f byte-s|ymbol-va|
|00003ad0| 6c 75 65 20 62 79 74 65 | 2d 67 65 74 20 62 79 74 |lue byte|-get byt|
|00003ae0| 65 2d 63 6f 6e 63 61 74 | 32 20 62 79 74 65 2d 63 |e-concat|2 byte-c|
|00003af0| 6f 6e 63 61 74 33 20 62 | 79 74 65 2d 73 75 62 31 |oncat3 b|yte-sub1|
|00003b00| 20 62 79 74 65 2d 61 64 | 64 31 20 62 79 74 65 2d | byte-ad|d1 byte-|
|00003b10| 65 71 6c 73 69 67 6e 20 | 62 79 74 65 2d 67 74 72 |eqlsign |byte-gtr|
|00003b20| 20 62 79 74 65 2d 6c 73 | 73 20 62 79 74 65 2d 6c | byte-ls|s byte-l|
|00003b30| 65 71 20 62 79 74 65 2d | 67 65 71 20 62 79 74 65 |eq byte-|geq byte|
|00003b40| 2d 64 69 66 66 20 62 79 | 74 65 2d 6e 65 67 61 74 |-diff by|te-negat|
|00003b50| 65 20 62 79 74 65 2d 70 | 6c 75 73 20 62 79 74 65 |e byte-p|lus byte|
|00003b60| 2d 6d 61 78 20 62 79 74 | 65 2d 6d 69 6e 20 62 79 |-max byt|e-min by|
|00003b70| 74 65 2d 6d 75 6c 74 20 | 62 79 74 65 2d 63 68 61 |te-mult |byte-cha|
|00003b80| 72 2d 61 66 74 65 72 20 | 62 79 74 65 2d 63 68 61 |r-after |byte-cha|
|00003b90| 72 2d 73 79 6e 74 61 78 | 20 62 79 74 65 2d 62 75 |r-syntax| byte-bu|
|00003ba0| 66 66 65 72 2d 73 75 62 | 73 74 72 69 6e 67 20 62 |ffer-sub|string b|
|00003bb0| 79 74 65 2d 73 74 72 69 | 6e 67 3d 20 62 79 74 65 |yte-stri|ng= byte|
|00003bc0| 2d 73 74 72 69 6e 67 3c | 20 62 79 74 65 2d 6e 74 |-string<| byte-nt|
|00003bd0| 68 63 64 72 20 62 79 74 | 65 2d 65 6c 74 20 62 79 |hcdr byt|e-elt by|
|00003be0| 74 65 2d 6d 65 6d 62 65 | 72 20 62 79 74 65 2d 61 |te-membe|r byte-a|
|00003bf0| 73 73 71 20 62 79 74 65 | 2d 71 75 6f 20 62 79 74 |ssq byte|-quo byt|
|00003c00| 65 2d 72 65 6d 29 20 62 | 79 74 65 2d 63 6f 6d 70 |e-rem) b|yte-comp|
|00003c10| 69 6c 65 2d 73 69 64 65 | 2d 65 66 66 65 63 74 2d |ile-side|-effect-|
|00003c20| 66 72 65 65 2d 6f 70 73 | 5d 20 33 29 0a 28 64 65 |free-ops|] 3).(de|
|00003c30| 66 63 6f 6e 73 74 20 62 | 79 74 65 2d 62 6f 6f 6c |fconst b|yte-bool|
|00003c40| 65 61 6e 2d 76 61 72 73 | 20 28 71 75 6f 74 65 20 |ean-vars| (quote |
|00003c50| 28 61 62 62 72 65 76 2d | 61 6c 6c 2d 63 61 70 73 |(abbrev-|all-caps|
|00003c60| 20 61 62 62 72 65 76 73 | 2d 63 68 61 6e 67 65 64 | abbrevs|-changed|
|00003c70| 20 62 79 74 65 2d 6d 65 | 74 65 72 69 6e 67 2d 6f | byte-me|tering-o|
|00003c80| 6e 20 63 68 65 63 6b 2d | 70 72 6f 74 65 63 74 65 |n check-|protecte|
|00003c90| 64 2d 66 69 65 6c 64 73 | 20 63 6f 6d 70 6c 65 74 |d-fields| complet|
|00003ca0| 69 6f 6e 2d 61 75 74 6f | 2d 68 65 6c 70 20 63 6f |ion-auto|-help co|
|00003cb0| 6d 70 6c 65 74 69 6f 6e | 2d 69 67 6e 6f 72 65 2d |mpletion|-ignore-|
|00003cc0| 63 61 73 65 20 63 75 72 | 73 6f 72 2d 69 6e 2d 65 |case cur|sor-in-e|
|00003cd0| 63 68 6f 2d 61 72 65 61 | 20 64 65 62 75 67 2d 6f |cho-area| debug-o|
|00003ce0| 6e 2d 6e 65 78 74 2d 63 | 61 6c 6c 20 64 65 62 75 |n-next-c|all debu|
|00003cf0| 67 2d 6f 6e 2d 71 75 69 | 74 20 64 65 66 69 6e 69 |g-on-qui|t defini|
|00003d00| 6e 67 2d 6b 62 64 2d 6d | 61 63 72 6f 20 64 65 6c |ng-kbd-m|acro del|
|00003d10| 65 74 65 2d 65 78 69 74 | 65 64 2d 70 72 6f 63 65 |ete-exit|ed-proce|
|00003d20| 73 73 65 73 20 65 6e 61 | 62 6c 65 2d 72 65 63 75 |sses ena|ble-recu|
|00003d30| 72 73 69 76 65 2d 6d 69 | 6e 69 62 75 66 66 65 72 |rsive-mi|nibuffer|
|00003d40| 73 20 69 6e 64 65 6e 74 | 2d 74 61 62 73 2d 6d 6f |s indent|-tabs-mo|
|00003d50| 64 65 20 69 6e 73 65 72 | 74 2d 64 65 66 61 75 6c |de inser|t-defaul|
|00003d60| 74 2d 64 69 72 65 63 74 | 6f 72 79 20 69 6e 76 65 |t-direct|ory inve|
|00003d70| 72 73 65 2d 76 69 64 65 | 6f 20 6c 6f 61 64 2d 69 |rse-vide|o load-i|
|00003d80| 6e 2d 70 72 6f 67 72 65 | 73 73 20 6d 65 6e 75 2d |n-progre|ss menu-|
|00003d90| 70 72 6f 6d 70 74 69 6e | 67 20 6d 6f 64 65 2d 6c |promptin|g mode-l|
|00003da0| 69 6e 65 2d 69 6e 76 65 | 72 73 65 2d 76 69 64 65 |ine-inve|rse-vide|
|00003db0| 6f 20 6e 6f 2d 72 65 64 | 72 61 77 2d 6f 6e 2d 72 |o no-red|raw-on-r|
|00003dc0| 65 65 6e 74 65 72 20 6e | 6f 6e 69 6e 74 65 72 61 |eenter n|onintera|
|00003dd0| 63 74 69 76 65 20 70 61 | 72 73 65 2d 73 65 78 70 |ctive pa|rse-sexp|
|00003de0| 2d 69 67 6e 6f 72 65 2d | 63 6f 6d 6d 65 6e 74 73 |-ignore-|comments|
|00003df0| 20 70 6f 70 2d 75 70 2d | 66 72 61 6d 65 73 20 70 | pop-up-|frames p|
|00003e00| 6f 70 2d 75 70 2d 77 69 | 6e 64 6f 77 73 20 70 72 |op-up-wi|ndows pr|
|00003e10| 69 6e 74 2d 65 73 63 61 | 70 65 2d 6e 65 77 6c 69 |int-esca|pe-newli|
|00003e20| 6e 65 73 20 70 72 69 6e | 74 2d 65 73 63 61 70 65 |nes prin|t-escape|
|00003e30| 2d 6e 65 77 6c 69 6e 65 | 73 20 74 72 75 6e 63 61 |-newline|s trunca|
|00003e40| 74 65 2d 70 61 72 74 69 | 61 6c 2d 77 69 64 74 68 |te-parti|al-width|
|00003e50| 2d 77 69 6e 64 6f 77 73 | 20 76 69 73 69 62 6c 65 |-windows| visible|
|00003e60| 2d 62 65 6c 6c 20 76 6d | 73 2d 73 74 6d 6c 66 2d |-bell vm|s-stmlf-|
|00003e70| 72 65 63 66 6d 20 77 6f | 72 64 73 2d 69 6e 63 6c |recfm wo|rds-incl|
|00003e80| 75 64 65 2d 65 73 63 61 | 70 65 73 20 78 2d 73 61 |ude-esca|pes x-sa|
|00003e90| 76 65 2d 75 6e 64 65 72 | 29 29 20 22 5c 0a 44 45 |ve-under|)) "\.DE|
|00003ea0| 46 56 41 52 5f 42 4f 4f | 4c 20 76 61 72 69 61 62 |FVAR_BOO|L variab|
|00003eb0| 6c 65 73 2e 20 20 47 69 | 76 69 6e 67 20 74 68 65 |les. Gi|ving the|
|00003ec0| 73 65 20 61 6e 79 20 6e | 6f 6e 2d 6e 69 6c 20 76 |se any n|on-nil v|
|00003ed0| 61 6c 75 65 20 73 65 74 | 73 20 74 68 65 6d 20 74 |alue set|s them t|
|00003ee0| 6f 20 74 2e 0a 49 66 20 | 74 68 69 73 20 64 6f 65 |o t..If |this doe|
|00003ef0| 73 20 6e 6f 74 20 65 6e | 75 6d 65 72 61 74 65 20 |s not en|umerate |
|00003f00| 61 6c 6c 20 44 45 46 56 | 41 52 5f 42 4f 4f 4c 20 |all DEFV|AR_BOOL |
|00003f10| 76 61 72 69 61 62 6c 65 | 73 2c 20 74 68 65 20 62 |variable|s, the b|
|00003f20| 79 74 65 2d 6f 70 74 69 | 6d 69 7a 65 72 0a 6d 61 |yte-opti|mizer.ma|
|00003f30| 79 20 67 65 6e 65 72 61 | 74 65 20 69 6e 63 6f 72 |y genera|te incor|
|00003f40| 72 65 63 74 20 63 6f 64 | 65 2e 22 29 0a 28 64 65 |rect cod|e.").(de|
|00003f50| 66 61 6c 69 61 73 20 27 | 62 79 74 65 2d 6f 70 74 |falias '|byte-opt|
|00003f60| 69 6d 69 7a 65 2d 6c 61 | 70 63 6f 64 65 20 23 5b |imize-la|pcode #[|
|00003f70| 28 6c 61 70 20 26 6f 70 | 74 69 6f 6e 61 6c 20 66 |(lap &op|tional f|
|00003f80| 6f 72 2d 65 66 66 65 63 | 74 29 20 22 c0 89 89 89 |or-effec|t) "....|
|00003f90| 89 89 c1 c2 c0 89 89 89 | 0b 83 14 00 0c 82 15 00 |........|........|
|00003fa0| 0d 1e 06 1e 07 1e 08 1e | 09 1e 5c 6e 1e 0b 1e 0c |........|..\n....|
|00003fb0| 1e 0d 1e 0e 1e 0f 1e 10 | 1e 11 1e 12 0e 0c 83 d4 |........|........|
|00003fc0| 09 0e 0c c1 3d 84 46 00 | 0e 13 d4 3e 83 46 00 d5 |....=.F.|...>.F..|
|00003fd0| d6 21 88 0e 17 16 5c 6e | c0 16 0c 0e 5c 6e 83 2f |.!....\n|....\n./|
|00003fe0| 00 0e 5c 6e 40 16 12 0e | 5c 6e 41 40 16 10 d8 0e |..\n@...|\nA@....|
|00003ff0| 5c 6e 38 16 0e 0e 10 40 | d9 3d 83 ef 00 0e 12 40 |\n8....@|.=.....@|
|00004000| 0e 06 3e 83 ef 00 da 16 | 0c 0e 1b 0e 12 40 4a 48 |..>.....|.....@JH|
|00004010| 16 09 0e 5c 6e 41 16 5c | 6e 0e 09 dc 55 83 a8 00 |...\nA.\|n...U...|
|00004020| 0e 13 d4 3e 83 99 00 d5 | dd 0e 12 5c 22 88 de 0e |...>....|...\"...|
|00004030| 12 de 0e 10 0e 17 5c 22 | 5c 22 16 17 82 cb 09 0e |......\"|\"......|
|00004040| 09 c2 55 83 c7 00 0e 13 | d4 3e 83 bc 00 d5 df 0e |..U.....|.>......|
|00004050| 12 5c 22 88 de 0e 12 0e | 17 5c 22 16 17 82 cb 09 |.\".....|.\".....|
|00004060| 0e 09 e0 55 83 e8 00 0e | 13 d4 3e 83 db 00 d5 e1 |...U....|..>.....|
|00004070| 0e 12 5c 22 88 0e 12 d9 | a0 88 0e 12 c2 a1 88 82 |..\"....|........|
|00004080| cb 09 e2 e3 21 88 82 cb | 09 0e 12 40 0e 24 3e 83 |....!...|...@.$>.|
|00004090| 71 01 0e 12 41 0e 10 3d | 83 71 01 0e 12 40 e5 3d |q...A..=|.q...@.=|
|000040a0| 83 17 01 de 0e 12 0e 17 | 5c 22 16 17 e6 16 09 82 |........|\"......|
|000040b0| 38 01 0e 12 40 0e 27 3e | 83 30 01 0e 12 d9 89 16 |8...@.'>|.0......|
|000040c0| 09 a0 88 0e 12 c2 a1 88 | 82 38 01 e2 e8 d8 0e 12 |........|.8......|
|000040d0| 38 5c 22 88 0e 13 e9 3e | 83 6b 01 0e 2a 83 6b 01 |8\"....>|.k..*.k.|
|000040e0| 0e 13 eb 3e 83 6b 01 da | ec 89 1e 2d 1e 2e 1e 2f |...>.k..|...-.../|
|000040f0| f0 f1 f2 0e 10 41 40 0e | 10 41 40 f3 0e 09 21 0e |.....A@.|.A@...!.|
|00004100| 10 41 40 25 21 88 2b da | 16 0c 82 cb 09 0e 0e 40 |.A@%!.+.|.......@|
|00004110| f4 3d 83 25 02 0e 10 41 | 0e 0e 41 3d 83 25 02 0e |.=.%...A|..A=.%..|
|00004120| 10 40 f5 3e 83 25 02 0e | 0e 41 40 0e 36 3e 89 16 |.@.>.%..|.A@.6>..|
|00004130| 09 83 a0 01 0e 12 40 f7 | 3d 83 cb 09 da 16 0c 0e |......@.|=.......|
|00004140| 12 40 f8 3e 83 fd 01 0e | 09 83 b9 01 0e 12 41 40 |.@.>....|......A@|
|00004150| f9 3e 83 bf 01 0e 12 41 | 82 cf 01 da 0e 3a 9e 86 |.>.....A|.....:..|
|00004160| cf 01 da 43 0e 3a 42 89 | 16 3a 40 16 09 0e 13 d4 |...C.:B.|.:@.....|
|00004170| 3e 83 ed 01 d5 fb 0e 12 | 0e 10 0e 0e 0e 12 0e 10 |>.......|........|
|00004180| 0e 12 40 0e 09 42 26 07 | 88 0e 0e 0e 12 40 a0 88 |..@..B&.|.....@..|
|00004190| 0e 0e 0e 09 a1 88 82 cb | 09 0e 13 d4 3e 83 0e 02 |........|....>...|
|000041a0| d5 fc 0e 10 0e 0e 0e 10 | 24 88 0e 0e 0e 10 40 a0 |........|$.....@.|
|000041b0| 88 0e 10 fd a0 88 0e 10 | c2 a1 88 dc 16 0b 82 cb |........|........|
|000041c0| 09 0e 12 40 fd 3d 83 62 | 02 0e 0e 40 d9 3d 83 62 |...@.=.b|...@.=.b|
|000041d0| 02 0e 10 40 fe 3e 83 62 | 02 0e 13 d4 3e 83 4b 02 |...@.>.b|....>.K.|
|000041e0| d5 ff 0e 10 89 23 88 da | 16 0c 0e 5c 6e 41 16 5c |.....#..|...\nA.\|
|000041f0| 6e de 0e 12 de 0e 0e 0e | 17 5c 22 5c 22 16 17 82 |n.......|.\"\"...|
|00004200| cb 09 0e 12 40 81 40 00 | 3d 83 c9 02 0e 10 40 81 |....@.@.|=.....@.|
|00004210| 41 00 3d 84 80 02 0e 10 | 40 81 42 00 3d 83 c9 02 |A.=.....|@.B.=...|
|00004220| 0e 13 d4 3e 83 a5 02 d5 | 81 43 00 0e 10 89 40 81 |...>....|.C....@.|
|00004230| 41 00 3d 83 9c 02 81 42 | 00 82 9f 02 81 41 00 0e |A.=....B|.....A..|
|00004240| 10 41 42 23 88 0e 10 89 | 40 81 41 00 3d 83 b6 02 |.AB#....|@.A.=...|
|00004250| 81 42 00 82 b9 02 81 41 | 00 a0 88 de 0e 12 0e 17 |.B.....A|........|
|00004260| 5c 22 16 17 da 16 0c 82 | cb 09 0e 12 40 81 41 00 |\"......|....@.A.|
|00004270| 3d 84 dd 02 0e 12 40 81 | 42 00 3d 83 34 03 0e 10 |=.....@.|B.=.4...|
|00004280| 40 e5 3d 83 34 03 0e 12 | 41 0e 0e 3d 83 34 03 0e |@.=.4...|A..=.4..|
|00004290| 12 40 81 41 00 3d 83 fe | 02 81 42 00 82 01 03 81 |.@.A.=..|..B.....|
|000042a0| 41 00 1e 44 0e 13 d4 3e | 83 1f 03 d5 81 45 00 0e |A..D...>|.....E..|
|000042b0| 12 0e 10 0e 0e 0e 44 0e | 10 41 42 0e 0e 26 06 88 |......D.|.AB..&..|
|000042c0| de 0e 12 0e 17 5c 22 16 | 17 0e 10 0e 44 a0 88 da |.....\".|....D...|
|000042d0| 16 0c 29 82 cb 09 0e 12 | 40 f7 3d 83 d8 03 0e 10 |..).....|@.=.....|
|000042e0| 40 0e 46 3e 83 d8 03 0e | 10 40 81 41 00 3d 84 59 |@.F>....|.@.A.=.Y|
|000042f0| 03 0e 10 40 81 47 00 3d | 83 60 03 0e 12 41 40 82 |...@.G.=|.`...A@.|
|00004300| 65 03 0e 12 41 40 3f 83 | 8d 03 0e 13 d4 3e 83 79 |e...A@?.|.....>.y|
|00004310| 03 d5 81 48 00 0e 12 0e | 10 23 88 0e 5c 6e 41 16 |...H....|.#..\nA.|
|00004320| 5c 6e de 0e 12 de 0e 10 | 0e 17 5c 22 5c 22 16 17 |\n......|..\"\"..|
|00004330| 82 d2 03 0e 10 40 0e 27 | 3e 83 b7 03 0e 13 d4 3e |.....@.'|>......>|
|00004340| 83 ac 03 d5 81 49 00 0e | 12 0e 10 e5 0e 10 41 42 |.....I..|......AB|
|00004350| 24 88 de 0e 12 0e 17 5c | 22 16 17 82 cd 03 0e 13 |$......\|".......|
|00004360| d4 3e 83 cd 03 d5 81 49 | 00 0e 12 0e 10 e5 0e 10 |.>.....I|........|
|00004370| 41 42 24 88 0e 10 e5 a0 | 88 da 16 0c 82 cb 09 0e |AB$.....|........|
|00004380| 12 40 f4 3d 83 63 04 0e | 5c 6e 41 89 16 09 40 40 |.@.=.c..|\nA...@@|
|00004390| fd 3d 83 f6 03 0e 09 41 | 89 16 09 82 e6 03 0e 12 |.=.....A|........|
|000043a0| 41 0e 09 40 41 3d 83 63 | 04 0e 09 40 40 f4 3d 83 |A..@A=.c|...@@.=.|
|000043b0| 63 04 0e 13 81 4a 00 3e | 83 4d 04 81 4b 00 1e 4c |c....J.>|.M..K..L|
|000043c0| 0e 5c 6e 41 16 08 0e 09 | 0e 08 3d 84 35 04 0e 08 |.\nA....|..=.5...|
|000043d0| 41 16 08 0e 4c 81 4d 00 | 50 16 4c 82 1d 04 0e 13 |A...L.M.|P.L.....|
|000043e0| d4 3e 83 4c 04 d5 81 4e | 00 0e 12 0e 4c 0e 12 89 |.>.L...N|....L...|
|000043f0| 0e 4c 26 06 88 29 da 16 | 0c 0e 09 40 fd a0 88 0e |.L&..)..|...@....|
|00004400| 09 40 c2 a1 88 0e 09 16 | 5c 6e 82 cb 09 0e 12 40 |.@......|\n.....@|
|00004410| 81 4f 00 3d 83 d7 04 0e | 10 40 81 4f 00 3d 83 d7 |.O.=....|.@.O.=..|
|00004420| 04 0e 13 81 50 00 3e 83 | a6 04 0e 2a 83 a6 04 0e |....P.>.|...*....|
|00004430| 13 eb 3e 83 a6 04 da ec | 89 1e 2d 1e 2e 1e 2f f0 |..>.....|..-.../.|
|00004440| f1 81 51 00 0e 10 41 40 | 0e 12 41 40 23 21 88 2b |..Q...A@|..A@#!.+|
|00004450| 0e 17 16 07 81 52 00 0e | 12 0e 07 5c 22 89 16 08 |.....R..|...\"...|
|00004460| 83 c9 04 0e 08 0e 10 a1 | 88 0e 08 0e 07 3e 41 16 |........|.....>A.|
|00004470| 07 82 aa 04 de 0e 12 0e | 17 5c 22 16 17 da 16 0c |........|.\".....|
|00004480| 82 cb 09 0e 12 40 81 4f | 00 3d 83 25 05 81 52 00 |.....@.O|.=.%..R.|
|00004490| 0e 12 0e 17 5c 22 84 25 | 05 0e 13 81 53 00 3e 83 |....\".%|....S.>.|
|000044a0| 17 05 0e 2a 83 17 05 0e | 13 eb 3e 83 17 05 da ec |...*....|..>.....|
|000044b0| 89 1e 2d 1e 2e 1e 2f f0 | f1 81 54 00 0e 12 41 40 |..-.../.|..T...A@|
|000044c0| 5c 22 21 88 2b de 0e 12 | 0e 17 5c 22 16 17 da 16 |\"!.+...|..\"....|
|000044d0| 0c 82 cb 09 0e 12 40 81 | 55 00 3e 83 03 06 0e 10 |......@.|U.>.....|
|000044e0| 40 81 56 00 3e 84 03 06 | 0e 5c 6e 16 09 c2 0e 13 |@.V.>...|.\n.....|
|000044f0| 81 57 00 3e c0 89 1e 58 | 1e 4c 1e 59 1e 5a 0e 09 |.W.>...X|.L.Y.Z..|
|00004500| 41 89 16 09 83 7f 05 0e | 09 40 40 81 4f 00 3d 84 |A.......|.@@.O.=.|
|00004510| 7f 05 0e 59 83 4e 05 0e | 09 40 0e 58 42 16 58 0e |...Y.N..|.@.XB.X.|
|00004520| 4c 81 5b 00 50 16 4c 0e | 5a 54 16 5a 82 4e 05 0e |L.[.P.L.|ZT.Z.N..|
|00004530| 59 83 f6 05 0e 09 40 40 | 81 4f 00 3d 83 9b 05 f1 |Y.....@@|.O.=....|
|00004540| 81 5c 5c 00 0e 09 40 41 | 5c 22 82 a4 05 0e 09 40 |.\\...@A|\".....@|
|00004550| 86 a4 05 81 4b 00 1e 5d | 0e 5a 81 5e 00 57 83 ce |....K..]|.Z.^.W..|
|00004560| 05 81 5f 00 d5 81 60 00 | 0e 4c 81 61 00 51 0e 12 |.._...`.|.L.a.Q..|
|00004570| 0e 58 9f 0e 5d 0e 12 0e | 5d 45 a4 24 88 82 f5 05 |.X..]...|]E.$....|
|00004580| 0e 13 d4 3e 83 f5 05 d5 | 81 62 00 0e 12 0e 5a 89 |...>....|.b....Z.|
|00004590| dc 55 83 e9 05 81 4b 00 | 82 ec 05 81 63 00 0e 5d |.U....K.|....c..]|
|000045a0| 0e 12 0e 5d 26 07 88 29 | 0e 5c 6e 0e 09 a1 88 2c |...]&..)|.\n....,|
|000045b0| da 16 0c 82 cb 09 0e 10 | 40 81 64 00 3d 83 3d 06 |........|@.d.=.=.|
|000045c0| 0e 12 40 0e 65 3e 83 3d | 06 0e 13 d4 3e 83 2a 06 |..@.e>.=|....>.*.|
|000045d0| d5 81 66 00 0e 12 0e 10 | 89 0e 12 25 88 0e 5c 6e |..f.....|...%..\n|
|000045e0| 0e 10 a0 88 0e 5c 6e 41 | 0e 12 a0 88 da 16 0c 82 |.....\nA|........|
|000045f0| cb 09 0e 10 40 81 64 00 | 3d 83 d4 06 0e 12 40 81 |....@.d.|=.....@.|
|00004600| 67 00 3e 83 d4 06 c2 0e | 10 41 57 83 d4 06 0e 10 |g.>.....|.AW.....|
|00004610| 89 41 53 a1 c2 55 83 6b | 06 de 0e 10 0e 5c 6e 5c |.AS..U.k|.....\n\|
|00004620| 22 88 0e 12 40 81 68 00 | 3d 83 7f 06 0e 5c 6e d9 |"...@.h.|=....\n.|
|00004630| c2 42 a0 88 82 87 06 de | 0e 12 0e 17 5c 22 16 17 |.B......|....\"..|
|00004640| 0e 13 d4 3e 83 ce 06 d5 | 81 66 00 0e 12 0e 10 40 |...>....|.f.....@|
|00004650| 0e 10 41 54 42 0e 12 40 | 81 68 00 3d 83 ac 06 0e |..ATB..@|.h.=....|
|00004660| 5c 6e 40 82 b0 06 0e 5c | 6e 41 40 0e 10 41 c2 55 |\n@....\|nA@..A.U|
|00004670| 84 c9 06 0e 12 40 81 68 | 00 3d 83 c9 06 0e 5c 6e |.....@.h|.=....\n|
|00004680| 41 40 82 cc 06 81 4b 00 | 25 88 da 16 0c 82 cb 09 |A@....K.|%.......|
|00004690| 0e 12 40 0e 24 3e 83 39 | 07 0e 12 41 0e 17 3e 41 |..@.$>.9|...A..>A|
|000046a0| 40 89 16 09 40 81 69 00 | 3e 83 39 07 0e 09 0e 12 |@...@.i.|>.9.....|
|000046b0| 3d 84 cb 09 0e 12 40 e5 | 3d 84 08 07 0e 09 40 e5 |=.....@.|=.....@.|
|000046c0| 3d 83 cb 09 0e 13 d4 3e | 83 1b 07 d5 81 6a 00 0e |=......>|.....j..|
|000046d0| 12 40 0e 09 89 24 88 0e | 09 40 81 6b 00 3d 83 2c |.@...$..|.@.k.=.,|
|000046e0| 07 0e 12 81 6b 00 a0 88 | 0e 12 0e 09 41 a1 88 da |....k...|....A...|
|000046f0| 16 0c 82 cb 09 0e 12 40 | 81 6c 00 3e 83 df 07 0e |.......@|.l.>....|
|00004700| 12 41 0e 17 3e 41 89 16 | 09 40 40 81 6d 00 3e 83 |.A..>A..|.@@.m.>.|
|00004710| df 07 0e 12 0e 09 40 3d | 84 df 07 0e 09 40 16 08 |......@=|.....@..|
|00004720| 0e 12 40 81 6e 00 9e 16 | 07 0e 08 40 0e 07 3e 83 |..@.n...|...@..>.|
|00004730| 9b 07 0e 12 0e 08 40 a0 | 88 0e 12 0e 08 41 a1 88 |......@.|.....A..|
|00004740| 0e 13 d4 3e 83 d9 07 d5 | 81 6f 00 0e 12 40 0e 08 |...>....|.o...@..|
|00004750| 0e 12 24 88 82 d9 07 81 | 4f 00 dc 0e 09 38 40 3d |..$.....|O....8@=|
|00004760| 84 b3 07 0e 09 81 70 00 | 20 0e 09 41 42 a1 88 0e |......p.| ..AB...|
|00004770| 13 d4 3e 83 c9 07 d5 81 | 71 00 0e 12 40 0e 08 0e |..>.....|q...@...|
|00004780| 07 41 40 24 88 0e 12 0e | 07 41 40 a0 88 0e 12 0e |.A@$....|.A@.....|
|00004790| 09 41 40 a1 88 da 16 0c | 82 cb 09 0e 12 40 f7 3d |.A@.....|.....@.=|
|000047a0| 83 91 08 0e 10 40 e5 3d | 83 91 08 0e 10 41 0e 17 |.....@.=|.....A..|
|000047b0| 3e 41 89 16 09 40 40 81 | 72 00 3e 83 91 08 0e 10 |>A...@@.|r.>.....|
|000047c0| 0e 09 40 3d 84 91 08 0e | 09 40 89 16 08 40 0e 12 |..@=....|.@...@..|
|000047d0| 41 40 84 1f 08 81 73 00 | 82 5c 22 08 81 74 00 3e |A@....s.|.\"..t.>|
|000047e0| 83 52 08 0e 13 d4 3e 83 | 3b 08 d5 81 75 00 0e 12 |.R....>.|;...u...|
|000047f0| 0e 08 0e 12 0e 08 25 88 | 0e 10 0e 08 40 a0 88 0e |......%.|....@...|
|00004800| 10 0e 08 41 a1 88 c0 0e | 5c 6e 42 16 5c 6e 82 8b |...A....|\nB.\n..|
|00004810| 08 0e 13 d4 3e 83 63 08 | d5 81 76 00 0e 12 0e 08 |....>.c.|..v.....|
|00004820| 23 88 81 4f 00 dc 0e 09 | 38 40 3d 84 7b 08 0e 09 |#..O....|8@=.{...|
|00004830| 81 70 00 20 0e 09 41 42 | a1 88 0e 10 0e 09 41 40 |.p. ..AB|......A@|
|00004840| a1 88 de 0e 12 0e 17 5c | 22 16 17 da 16 0c 82 cb |.......\|".......|
|00004850| 09 0e 10 40 81 77 00 3d | 83 26 09 0e 0e 40 e5 3d |...@.w.=|.&...@.=|
|00004860| 83 26 09 0e 0e 41 0e 5c | 6e 3e 84 26 09 0e 0e 41 |.&...A.\|n>.&...A|
|00004870| 0e 17 3e 41 89 16 09 40 | 40 f4 3d 83 26 09 0e 09 |..>A...@|@.=.&...|
|00004880| 40 41 0e 10 41 3d 83 26 | 09 0e 10 41 40 0e 36 3e |@A..A=.&|...A@.6>|
|00004890| 84 26 09 81 70 00 20 1e | 78 0e 13 d4 3e 83 04 09 |.&..p. .|x...>...|
|000048a0| d5 81 79 00 0e 0e 41 41 | 40 0e 09 40 0e 10 0e 0e |..y...AA|@..@....|
|000048b0| 89 41 41 40 0e 09 40 0e | 78 41 40 fd 0e 10 e5 0e |.AA@..@.|xA@.....|
|000048c0| 78 42 26 0b 88 0e 5c 6e | fd c2 42 0e 5c 6e 41 42 |xB&...\n|..B.\nAB|
|000048d0| a1 88 0e 09 0e 0e 0e 78 | a1 0e 09 41 42 a1 88 29 |.......x|...AB..)|
|000048e0| dc 16 0b da 16 0c 82 cb | 09 0e 12 40 e5 3d 83 cb |........|...@.=..|
|000048f0| 09 0e 10 40 81 4f 00 3d | 83 cb 09 0e 10 0e 12 41 |...@.O.=|.......A|
|00004900| 0e 17 3e 41 89 16 09 40 | 41 3d 83 cb 09 0e 09 40 |..>A...@|A=.....@|
|00004910| 40 81 7a 00 3e 83 cb 09 | 81 70 00 20 1e 78 0e 13 |@.z.>...|.p. .x..|
|00004920| d4 3e 83 87 09 d5 81 7b | 00 0e 12 0e 10 41 40 0e |.>.....{|.....A@.|
|00004930| 12 41 41 40 0e 09 40 0e | 09 40 40 81 7c 00 9e 41 |.AA@..@.|.@@.|..A|
|00004940| 0e 78 42 0e 78 41 40 26 | 07 88 0e 09 0e 12 0e 78 |.xB.xA@&|.......x|
|00004950| a1 0e 09 41 42 a1 88 0e | 09 40 40 81 47 00 3d 83 |...AB...|.@@.G.=.|
|00004960| b9 09 0e 5c 6e f7 c0 0e | 3a 9e 86 b2 09 c0 43 0e |...\n...|:.....C.|
|00004970| 3a 42 89 16 3a 40 42 0e | 5c 6e 41 42 a1 88 0e 12 |:B..:@B.|\nAB....|
|00004980| 0e 09 40 40 81 7d 00 3e | 41 40 a0 88 29 da 16 0c |..@@.}.>|A@..)...|
|00004990| 0e 5c 6e 41 89 16 5c 6e | 82 4f 00 c0 16 3a c0 16 |.\nA..\n|.O...:..|
|000049a0| 7e 0e 17 89 16 5c 6e 83 | 25 0b 0e 5c 6e 40 16 12 |~....\n.|%..\n@..|
|000049b0| 0e 5c 6e 41 40 16 10 0e | 12 40 0e 7f 3e 83 23 5c |.\nA@...|.@..>.#\|
|000049c0| 6e 0e 12 41 f7 3d 83 12 | 5c 6e 0e 12 41 0e 7e 3e |n..A.=..|\n..A.~>|
|000049d0| 84 23 5c 6e 0e 12 41 0e | 7e 42 16 7e 82 23 5c 6e |.#\n..A.|~B.~.#\n|
|000049e0| 0e 12 41 0e 3a 3e 84 23 | 5c 6e 0e 12 41 0e 3a 42 |..A.:>.#|\n..A.:B|
|000049f0| 16 3a 0e 12 40 f7 3d 83 | 7d 5c 6e d8 0e 5c 6e 38 |.:..@.=.|}\n..\n8|
|00004a00| 40 f7 3d 83 7d 5c 6e 0e | 12 41 d8 0e 5c 6e 38 40 |@.=.}\n.|.A..\n8@|
|00004a10| 3d 83 7d 5c 6e 0e 10 40 | 81 80 00 3e 83 7d 5c 6e |=.}\n..@|...>.}\n|
|00004a20| 0e 13 d4 3e 83 62 5c 6e | d5 81 81 00 0e 12 0e 10 |...>.b\n|........|
|00004a30| 0e 12 89 0e 10 26 06 88 | 0e 5c 6e 41 41 0e 10 40 |.....&..|.\nAA..@|
|00004a40| 0e 10 41 42 a0 88 0e 5c | 6e 41 fd c2 42 a0 88 dc |..AB...\|nA..B...|
|00004a50| 16 0b 82 1c 0b 0e 12 40 | 81 82 00 3e 83 d7 5c 6e |.......@|...>..\n|
|00004a60| 0e 5c 6e 16 09 c0 16 08 | 0e 09 41 89 16 09 40 40 |.\n.....|..A...@@|
|00004a70| fd 3d 84 8e 5c 6e 0e 12 | 41 0e 09 40 41 3d 83 be |.=..\n..|A..@A=..|
|00004a80| 5c 6e 0e 12 40 0e 09 40 | 40 3d 83 be 5c 6e 0e 09 |\n..@..@|@=..\n..|
|00004a90| fd c2 42 a0 88 da 16 08 | 82 8e 5c 6e 0e 08 83 1c |..B.....|..\n....|
|00004aa0| 0b 0e 13 d4 3e 83 1c 0b | d5 81 83 00 0e 12 89 89 |....>...|........|
|00004ab0| 24 88 82 1c 0b 0e 12 40 | 81 64 00 3d 83 1c 0b 0e |$......@|.d.=....|
|00004ac0| 10 40 81 64 00 3d 83 1c | 0b 0e 13 d4 3e 83 07 0b |.@.d.=..|....>...|
|00004ad0| d5 81 49 00 0e 12 0e 10 | 81 64 00 0e 12 41 0e 10 |..I.....|.d...A..|
|00004ae0| 41 5c 5c 42 24 88 da 16 | 0c de 0e 12 0e 17 5c 22 |A\\B$...|......\"|
|00004af0| 16 17 0e 10 89 41 0e 12 | 41 5c 5c a1 88 0e 5c 6e |.....A..|A\\...\n|
|00004b00| 41 89 16 5c 6e 84 e2 09 | 0e 84 0e 0b 5c 5c 16 84 |A..\n...|....\\..|
|00004b10| 2e 0d 0e 17 87 22 20 5b | 6e 69 6c 20 66 69 72 73 |....." [|nil firs|
|00004b20| 74 2d 74 69 6d 65 20 30 | 20 62 79 74 65 2d 63 6f |t-time 0| byte-co|
|00004b30| 6d 70 69 6c 65 2d 64 65 | 6c 65 74 65 2d 65 72 72 |mpile-de|lete-err|
|00004b40| 6f 72 73 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |ors byte|-compile|
|00004b50| 2d 73 69 64 65 2d 65 66 | 66 65 63 74 2d 66 72 65 |-side-ef|fect-fre|
|00004b60| 65 2d 6f 70 73 20 62 79 | 74 65 2d 63 6f 6d 70 69 |e-ops by|te-compi|
|00004b70| 6c 65 2d 73 69 64 65 2d | 65 66 66 65 63 74 2d 61 |le-side-|effect-a|
|00004b80| 6e 64 2d 65 72 72 6f 72 | 2d 66 72 65 65 2d 6f 70 |nd-error|-free-op|
|00004b90| 73 20 73 69 64 65 2d 65 | 66 66 65 63 74 2d 66 72 |s side-e|ffect-fr|
|00004ba0| 65 65 20 74 6d 70 33 20 | 74 6d 70 32 20 74 6d 70 |ee tmp3 |tmp2 tmp|
|00004bb0| 20 72 65 73 74 20 61 64 | 64 2d 64 65 70 74 68 20 | rest ad|d-depth |
|00004bc0| 6b 65 65 70 2d 67 6f 69 | 6e 67 20 6f 66 66 32 20 |keep-goi|ng off2 |
|00004bd0| 6c 61 70 32 20 6f 66 66 | 31 20 6c 61 70 31 20 6f |lap2 off|1 lap1 o|
|00004be0| 66 66 30 20 6c 61 70 30 | 20 62 79 74 65 2d 6f 70 |ff0 lap0| byte-op|
|00004bf0| 74 69 6d 69 7a 65 2d 6c | 6f 67 20 28 74 20 62 79 |timize-l|og (t by|
|00004c00| 74 65 29 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |te) byte|-compile|
|00004c10| 2d 6c 6f 67 2d 6c 61 70 | 2d 31 20 22 20 20 2d 2d |-log-lap|-1 " --|
|00004c20| 2d 2d 20 6e 65 78 74 20 | 70 61 73 73 22 20 6c 61 |-- next |pass" la|
|00004c30| 70 20 32 20 62 79 74 65 | 2d 64 69 73 63 61 72 64 |p 2 byte|-discard|
|00004c40| 20 74 20 62 79 74 65 2d | 73 74 61 63 6b 2b 2d 69 | t byte-|stack+-i|
|00004c50| 6e 66 6f 20 31 20 22 20 | 20 25 73 20 64 69 73 63 |nfo 1 " | %s disc|
|00004c60| 61 72 64 09 2d 2d 3e 09 | 3c 64 65 6c 65 74 65 64 |ard.-->.|<deleted|
|00004c70| 3e 22 20 64 65 6c 71 20 | 22 20 20 25 73 20 64 69 |>" delq |" %s di|
|00004c80| 73 63 61 72 64 09 2d 2d | 3e 09 3c 64 65 6c 65 74 |scard.--|>.<delet|
|00004c90| 65 64 3e 20 64 69 73 63 | 61 72 64 22 20 2d 31 20 |ed> disc|ard" -1 |
|00004ca0| 22 20 20 25 73 20 64 69 | 73 63 61 72 64 09 2d 2d |" %s di|scard.--|
|00004cb0| 3e 09 64 69 73 63 61 72 | 64 20 64 69 73 63 61 72 |>.discar|d discar|
|00004cc0| 64 22 20 65 72 72 6f 72 | 20 22 4f 70 74 69 6d 69 |d" error| "Optimi|
|00004cd0| 7a 65 72 20 65 72 72 6f | 72 3a 20 74 6f 6f 20 6d |zer erro|r: too m|
|00004ce0| 75 63 68 20 6f 6e 20 74 | 68 65 20 73 74 61 63 6b |uch on t|he stack|
|00004cf0| 22 20 62 79 74 65 2d 67 | 6f 74 6f 2d 6f 70 73 20 |" byte-g|oto-ops |
|00004d00| 62 79 74 65 2d 67 6f 74 | 6f 20 22 3c 64 65 6c 65 |byte-got|o "<dele|
|00004d10| 74 65 64 3e 22 20 62 79 | 74 65 2d 67 6f 74 6f 2d |ted>" by|te-goto-|
|00004d20| 61 6c 77 61 79 73 2d 70 | 6f 70 2d 6f 70 73 20 22 |always-p|op-ops "|
|00004d30| 44 65 70 74 68 20 63 6f | 6e 66 6c 69 63 74 20 61 |Depth co|nflict a|
|00004d40| 74 20 74 61 67 20 25 64 | 22 20 28 74 20 62 79 74 |t tag %d|" (t byt|
|00004d50| 65 29 20 62 79 74 65 2d | 6f 70 74 69 6d 69 7a 65 |e) byte-|optimize|
|00004d60| 20 28 74 20 73 6f 75 72 | 63 65 29 20 34 20 70 72 | (t sour|ce) 4 pr|
|00004d70| 69 6e 74 2d 6c 65 6e 67 | 74 68 20 70 72 69 6e 74 |int-leng|th print|
|00004d80| 2d 6c 65 76 65 6c 20 70 | 72 69 6e 74 2d 65 73 63 |-level p|rint-esc|
|00004d90| 61 70 65 2d 6e 65 77 6c | 69 6e 65 73 20 62 79 74 |ape-newl|ines byt|
|00004da0| 65 2d 63 6f 6d 70 69 6c | 65 2d 6c 6f 67 2d 31 20 |e-compil|e-log-1 |
|00004db0| 66 6f 72 6d 61 74 20 22 | 20 20 28 67 6f 74 6f 20 |format "| (goto |
|00004dc0| 25 73 29 20 25 73 3a 09 | 2d 2d 3e 09 25 73 20 25 |%s) %s:.|-->.%s %|
|00004dd0| 73 3a 22 20 70 72 69 6e | 31 2d 74 6f 2d 73 74 72 |s:" prin|1-to-str|
|00004de0| 69 6e 67 20 62 79 74 65 | 2d 76 61 72 72 65 66 20 |ing byte|-varref |
|00004df0| 28 62 79 74 65 2d 76 61 | 72 73 65 74 20 62 79 74 |(byte-va|rset byt|
|00004e00| 65 2d 76 61 72 62 69 6e | 64 29 20 62 79 74 65 2d |e-varbin|d) byte-|
|00004e10| 62 6f 6f 6c 65 61 6e 2d | 76 61 72 73 20 62 79 74 |boolean-|vars byt|
|00004e20| 65 2d 63 6f 6e 73 74 61 | 6e 74 20 28 62 79 74 65 |e-consta|nt (byte|
|00004e30| 2d 63 6f 6e 73 74 61 6e | 74 20 62 79 74 65 2d 64 |-constan|t byte-d|
|00004e40| 75 70 29 20 28 6e 69 6c | 20 74 29 20 62 79 74 65 |up) (nil| t) byte|
|00004e50| 2d 63 6f 6d 70 69 6c 65 | 2d 63 6f 6e 73 74 61 6e |-compile|-constan|
|00004e60| 74 73 20 22 20 20 25 73 | 20 25 73 20 25 73 09 2d |ts " %s| %s %s.-|
|00004e70| 2d 3e 09 25 73 20 25 73 | 20 25 73 22 20 22 20 20 |->.%s %s| %s" " |
|00004e80| 25 73 20 25 73 09 2d 2d | 3e 09 64 75 70 20 25 73 |%s %s.--|>.dup %s|
|00004e90| 22 20 62 79 74 65 2d 64 | 75 70 20 28 62 79 74 65 |" byte-d|up (byte|
|00004ea0| 2d 76 61 72 73 65 74 20 | 62 79 74 65 2d 76 61 72 |-varset |byte-var|
|00004eb0| 62 69 6e 64 29 20 22 20 | 20 64 75 70 20 25 73 20 |bind) " | dup %s |
|00004ec0| 64 69 73 63 61 72 64 09 | 2d 2d 3e 09 25 73 22 20 |discard.|-->.%s" |
|00004ed0| 62 79 74 65 2d 6e 6f 74 | 20 62 79 74 65 2d 67 6f |byte-not| byte-go|
|00004ee0| 74 6f 2d 69 66 2d 6e 69 | 6c 20 62 79 74 65 2d 67 |to-if-ni|l byte-g|
|00004ef0| 6f 74 6f 2d 69 66 2d 6e | 6f 74 2d 6e 69 6c 20 22 |oto-if-n|ot-nil "|
|00004f00| 20 20 6e 6f 74 20 25 73 | 09 2d 2d 3e 09 25 73 22 | not %s|.-->.%s"|
|00004f10| 20 69 6e 76 65 72 73 65 | 20 22 20 20 25 73 20 25 | inverse| " %s %|
|00004f20| 73 20 25 73 3a 09 2d 2d | 3e 09 25 73 20 25 73 3a |s %s:.--|>.%s %s:|
|00004f30| 22 20 62 79 74 65 2d 63 | 6f 6e 64 69 74 69 6f 6e |" byte-c|ondition|
|00004f40| 61 6c 2d 6f 70 73 20 62 | 79 74 65 2d 67 6f 74 6f |al-ops b|yte-goto|
|00004f50| 2d 69 66 2d 6e 69 6c 2d | 65 6c 73 65 2d 70 6f 70 |-if-nil-|else-pop|
|00004f60| 20 22 20 20 25 73 20 25 | 73 09 2d 2d 3e 09 3c 64 | " %s %|s.-->.<d|
|00004f70| 65 6c 65 74 65 64 3e 22 | 20 22 20 20 25 73 20 25 |eleted>"| " %s %|
|00004f80| 73 09 2d 2d 3e 09 25 73 | 22 20 28 74 20 62 79 74 |s.-->.%s|" (t byt|
|00004f90| 65 29 20 22 22 20 73 74 | 72 20 22 20 64 75 70 22 |e) "" st|r " dup"|
|00004fa0| 20 22 20 20 25 73 25 73 | 20 25 73 09 2d 2d 3e 09 | " %s%s| %s.-->.|
|00004fb0| 25 73 25 73 20 64 75 70 | 22 20 54 41 47 20 28 74 |%s%s dup|" TAG (t|
|00004fc0| 20 62 79 74 65 29 20 22 | 20 20 61 64 6a 61 63 65 | byte) "| adjace|
|00004fd0| 6e 74 20 74 61 67 73 20 | 25 64 20 61 6e 64 20 25 |nt tags |%d and %|
|00004fe0| 64 20 6d 65 72 67 65 64 | 22 20 72 61 73 73 71 20 |d merged|" rassq |
|00004ff0| 28 74 20 62 79 74 65 29 | 20 22 20 20 75 6e 75 73 |(t byte)| " unus|
|00005000| 65 64 20 74 61 67 20 25 | 64 20 72 65 6d 6f 76 65 |ed tag %|d remove|
|00005010| 64 22 20 28 62 79 74 65 | 2d 67 6f 74 6f 20 62 79 |d" (byte|-goto by|
|00005020| 74 65 2d 72 65 74 75 72 | 6e 29 20 28 54 41 47 20 |te-retur|n) (TAG |
|00005030| 6e 69 6c 29 20 28 74 20 | 6c 61 70 29 20 64 65 6c |nil) (t |lap) del|
|00005040| 65 74 65 64 20 6f 70 74 | 2d 70 20 69 20 22 20 25 |eted opt|-p i " %|
|00005050| 73 22 20 22 25 64 3a 22 | 20 74 61 67 73 74 72 20 |s" "%d:"| tagstr |
|00005060| 36 20 61 70 70 6c 79 20 | 22 20 20 25 73 22 20 22 |6 apply |" %s" "|
|00005070| 20 25 73 09 2d 2d 3e 09 | 25 73 20 3c 64 65 6c 65 | %s.-->.|%s <dele|
|00005080| 74 65 64 3e 20 25 73 22 | 20 22 20 20 25 73 20 3c |ted> %s"| " %s <|
|00005090| 25 64 20 75 6e 72 65 61 | 63 68 61 62 6c 65 20 6f |%d unrea|chable o|
|000050a0| 70 25 73 3e 20 25 73 09 | 2d 2d 3e 09 25 73 20 3c |p%s> %s.|-->.%s <|
|000050b0| 64 65 6c 65 74 65 64 3e | 20 25 73 22 20 22 73 22 |deleted>| %s" "s"|
|000050c0| 20 62 79 74 65 2d 75 6e | 62 69 6e 64 20 62 79 74 | byte-un|bind byt|
|000050d0| 65 2d 61 66 74 65 72 2d | 75 6e 62 69 6e 64 2d 6f |e-after-|unbind-o|
|000050e0| 70 73 20 22 20 20 25 73 | 20 25 73 09 2d 2d 3e 09 |ps " %s| %s.-->.|
|000050f0| 25 73 20 25 73 22 20 28 | 62 79 74 65 2d 76 61 72 |%s %s" (|byte-var|
|00005100| 62 69 6e 64 20 62 79 74 | 65 2d 73 61 76 65 2d 65 |bind byt|e-save-e|
|00005110| 78 63 75 72 73 69 6f 6e | 20 62 79 74 65 2d 73 61 |xcursion| byte-sa|
|00005120| 76 65 2d 72 65 73 74 72 | 69 63 74 69 6f 6e 29 20 |ve-restr|iction) |
|00005130| 62 79 74 65 2d 76 61 72 | 62 69 6e 64 20 28 62 79 |byte-var|bind (by|
|00005140| 74 65 2d 67 6f 74 6f 20 | 62 79 74 65 2d 72 65 74 |te-goto |byte-ret|
|00005150| 75 72 6e 29 20 22 20 20 | 25 73 20 5b 25 73 5d 09 |urn) " |%s [%s].|
|00005160| 2d 2d 3e 09 25 73 22 20 | 62 79 74 65 2d 72 65 74 |-->.%s" |byte-ret|
|00005170| 75 72 6e 20 28 62 79 74 | 65 2d 67 6f 74 6f 2d 69 |urn (byt|e-goto-i|
|00005180| 66 2d 6e 69 6c 2d 65 6c | 73 65 2d 70 6f 70 20 62 |f-nil-el|se-pop b|
|00005190| 79 74 65 2d 67 6f 74 6f | 2d 69 66 2d 6e 6f 74 2d |yte-goto|-if-not-|
|000051a0| 6e 69 6c 2d 65 6c 73 65 | 2d 70 6f 70 29 20 28 62 |nil-else|-pop) (b|
|000051b0| 79 74 65 2d 64 69 73 63 | 61 72 64 20 62 79 74 65 |yte-disc|ard byte|
|000051c0| 2d 67 6f 74 6f 2d 69 66 | 2d 6e 69 6c 20 62 79 74 |-goto-if|-nil byt|
|000051d0| 65 2d 67 6f 74 6f 2d 69 | 66 2d 6e 6f 74 2d 6e 69 |e-goto-i|f-not-ni|
|000051e0| 6c 20 62 79 74 65 2d 67 | 6f 74 6f 2d 69 66 2d 6e |l byte-g|oto-if-n|
|000051f0| 69 6c 2d 65 6c 73 65 2d | 70 6f 70 20 62 79 74 65 |il-else-|pop byte|
|00005200| 2d 67 6f 74 6f 2d 69 66 | 2d 6e 6f 74 2d 6e 69 6c |-goto-if|-not-nil|
|00005210| 2d 65 6c 73 65 2d 70 6f | 70 29 20 28 28 62 79 74 |-else-po|p) ((byt|
|00005220| 65 2d 67 6f 74 6f 2d 69 | 66 2d 6e 69 6c 2d 65 6c |e-goto-i|f-nil-el|
|00005230| 73 65 2d 70 6f 70 20 62 | 79 74 65 2d 67 6f 74 6f |se-pop b|yte-goto|
|00005240| 2d 69 66 2d 6e 69 6c 29 | 20 28 62 79 74 65 2d 67 |-if-nil)| (byte-g|
|00005250| 6f 74 6f 2d 69 66 2d 6e | 6f 74 2d 6e 69 6c 2d 65 |oto-if-n|ot-nil-e|
|00005260| 6c 73 65 2d 70 6f 70 20 | 62 79 74 65 2d 67 6f 74 |lse-pop |byte-got|
|00005270| 6f 2d 69 66 2d 6e 6f 74 | 2d 6e 69 6c 29 29 20 22 |o-if-not|-nil)) "|
|00005280| 20 20 25 73 2d 65 6c 73 | 65 2d 70 6f 70 20 5b 25 | %s-els|e-pop [%|
|00005290| 73 5d 09 2d 2d 3e 09 25 | 73 22 20 62 79 74 65 2d |s].-->.%|s" byte-|
|000052a0| 63 6f 6d 70 69 6c 65 2d | 6d 61 6b 65 2d 74 61 67 |compile-|make-tag|
|000052b0| 20 22 20 20 25 73 20 5b | 25 73 5d 09 2d 2d 3e 09 | " %s [|%s].-->.|
|000052c0| 25 73 20 3c 73 6b 69 70 | 3e 22 20 28 62 79 74 65 |%s <skip|>" (byte|
|000052d0| 2d 64 69 73 63 61 72 64 | 20 62 79 74 65 2d 67 6f |-discard| byte-go|
|000052e0| 74 6f 2d 69 66 2d 6e 69 | 6c 20 62 79 74 65 2d 67 |to-if-ni|l byte-g|
|000052f0| 6f 74 6f 2d 69 66 2d 6e | 6f 74 2d 6e 69 6c 20 62 |oto-if-n|ot-nil b|
|00005300| 79 74 65 2d 67 6f 74 6f | 2d 69 66 2d 6e 69 6c 2d |yte-goto|-if-nil-|
|00005310| 65 6c 73 65 2d 70 6f 70 | 20 62 79 74 65 2d 67 6f |else-pop| byte-go|
|00005320| 74 6f 2d 69 66 2d 6e 6f | 74 2d 6e 69 6c 2d 65 6c |to-if-no|t-nil-el|
|00005330| 73 65 2d 70 6f 70 29 20 | 28 62 79 74 65 2d 67 6f |se-pop) |(byte-go|
|00005340| 74 6f 2d 69 66 2d 6e 69 | 6c 20 62 79 74 65 2d 67 |to-if-ni|l byte-g|
|00005350| 6f 74 6f 2d 69 66 2d 6e | 69 6c 2d 65 6c 73 65 2d |oto-if-n|il-else-|
|00005360| 70 6f 70 29 20 28 62 79 | 74 65 2d 67 6f 74 6f 2d |pop) (by|te-goto-|
|00005370| 69 66 2d 6e 6f 74 2d 6e | 69 6c 20 62 79 74 65 2d |if-not-n|il byte-|
|00005380| 67 6f 74 6f 2d 69 66 2d | 6e 6f 74 2d 6e 69 6c 2d |goto-if-|not-nil-|
|00005390| 65 6c 73 65 2d 70 6f 70 | 29 20 22 20 20 25 73 20 |else-pop|) " %s |
|000053a0| 67 6f 74 6f 20 5b 25 73 | 5d 09 2d 2d 3e 09 25 73 |goto [%s|].-->.%s|
|000053b0| 20 25 73 22 20 22 20 20 | 25 73 20 67 6f 74 6f 20 | %s" " |%s goto |
|000053c0| 5b 25 73 5d 09 2d 2d 3e | 09 3c 64 65 6c 65 74 65 |[%s].-->|.<delete|
|000053d0| 64 3e 20 67 6f 74 6f 20 | 3c 73 6b 69 70 3e 22 20 |d> goto |<skip>" |
|000053e0| 62 79 74 65 2d 76 61 72 | 73 65 74 20 6e 65 77 74 |byte-var|set newt|
|000053f0| 61 67 20 22 20 20 25 73 | 3a 20 25 73 20 2e 2e 2e |ag " %s|: %s ...|
|00005400| 20 25 73 20 25 73 09 2d | 2d 3e 09 25 73 3a 20 25 | %s %s.-|->.%s: %|
|00005410| 73 20 25 73 3a 20 2e 2e | 2e 20 25 73 20 25 73 20 |s %s: ..|. %s %s |
|00005420| 25 73 22 20 28 62 79 74 | 65 2d 67 6f 74 6f 20 62 |%s" (byt|e-goto b|
|00005430| 79 74 65 2d 67 6f 74 6f | 2d 69 66 2d 6e 69 6c 20 |yte-goto|-if-nil |
|00005440| 62 79 74 65 2d 67 6f 74 | 6f 2d 69 66 2d 6e 6f 74 |byte-got|o-if-not|
|00005450| 2d 6e 69 6c 20 62 79 74 | 65 2d 67 6f 74 6f 2d 69 |-nil byt|e-goto-i|
|00005460| 66 2d 6e 69 6c 2d 65 6c | 73 65 2d 70 6f 70 29 20 |f-nil-el|se-pop) |
|00005470| 22 25 73 20 25 73 3a 20 | 2e 2e 2e 20 25 73 3a 20 |"%s %s: |... %s: |
|00005480| 25 73 09 2d 2d 3e 09 25 | 73 20 2e 2e 2e 20 25 73 |%s.-->.%|s ... %s|
|00005490| 3a 22 20 28 28 62 79 74 | 65 2d 67 6f 74 6f 2d 69 |:" ((byt|e-goto-i|
|000054a0| 66 2d 6e 69 6c 20 2e 20 | 62 79 74 65 2d 67 6f 74 |f-nil . |byte-got|
|000054b0| 6f 2d 69 66 2d 6e 6f 74 | 2d 6e 69 6c 29 20 28 62 |o-if-not|-nil) (b|
|000054c0| 79 74 65 2d 67 6f 74 6f | 2d 69 66 2d 6e 6f 74 2d |yte-goto|-if-not-|
|000054d0| 6e 69 6c 20 2e 20 62 79 | 74 65 2d 67 6f 74 6f 2d |nil . by|te-goto-|
|000054e0| 69 66 2d 6e 69 6c 29 20 | 28 62 79 74 65 2d 67 6f |if-nil) |(byte-go|
|000054f0| 74 6f 2d 69 66 2d 6e 69 | 6c 2d 65 6c 73 65 2d 70 |to-if-ni|l-else-p|
|00005500| 6f 70 20 2e 20 62 79 74 | 65 2d 67 6f 74 6f 2d 69 |op . byt|e-goto-i|
|00005510| 66 2d 6e 6f 74 2d 6e 69 | 6c 2d 65 6c 73 65 2d 70 |f-not-ni|l-else-p|
|00005520| 6f 70 29 20 28 62 79 74 | 65 2d 67 6f 74 6f 2d 69 |op) (byt|e-goto-i|
|00005530| 66 2d 6e 6f 74 2d 6e 69 | 6c 2d 65 6c 73 65 2d 70 |f-not-ni|l-else-p|
|00005540| 6f 70 20 2e 20 62 79 74 | 65 2d 67 6f 74 6f 2d 69 |op . byt|e-goto-i|
|00005550| 66 2d 6e 69 6c 2d 65 6c | 73 65 2d 70 6f 70 29 29 |f-nil-el|se-pop))|
|00005560| 20 28 62 79 74 65 2d 67 | 6f 74 6f 2d 69 66 2d 6e | (byte-g|oto-if-n|
|00005570| 69 6c 2d 65 6c 73 65 2d | 70 6f 70 20 62 79 74 65 |il-else-|pop byte|
|00005580| 2d 67 6f 74 6f 2d 69 66 | 2d 6e 6f 74 2d 6e 69 6c |-goto-if|-not-nil|
|00005590| 20 62 79 74 65 2d 67 6f | 74 6f 2d 69 66 2d 6e 69 | byte-go|to-if-ni|
|000055a0| 6c 20 62 79 74 65 2d 67 | 6f 74 6f 2d 69 66 2d 6e |l byte-g|oto-if-n|
|000055b0| 6f 74 2d 6e 69 6c 20 62 | 79 74 65 2d 67 6f 74 6f |ot-nil b|yte-goto|
|000055c0| 20 62 79 74 65 2d 67 6f | 74 6f 29 20 62 79 74 65 | byte-go|to) byte|
|000055d0| 2d 63 6f 6d 70 69 6c 65 | 2d 76 61 72 69 61 62 6c |-compile|-variabl|
|000055e0| 65 73 20 62 79 74 65 2d | 63 6f 6e 73 74 72 65 66 |es byte-|constref|
|000055f0| 2d 6f 70 73 20 28 62 79 | 74 65 2d 76 61 72 62 69 |-ops (by|te-varbi|
|00005600| 6e 64 20 62 79 74 65 2d | 76 61 72 73 65 74 29 20 |nd byte-|varset) |
|00005610| 22 20 20 25 73 20 25 73 | 20 25 73 09 2d 2d 3e 09 |" %s %s| %s.-->.|
|00005620| 25 73 20 64 75 70 20 25 | 73 22 20 28 62 79 74 65 |%s dup %|s" (byte|
|00005630| 2d 63 6f 6e 73 74 61 6e | 74 20 62 79 74 65 2d 76 |-constan|t byte-v|
|00005640| 61 72 72 65 66 29 20 22 | 20 20 25 73 20 5b 64 75 |arref) "| %s [du|
|00005650| 70 2f 25 73 5d 2e 2e 2e | 20 25 73 09 2d 2d 3e 09 |p/%s]...| %s.-->.|
|00005660| 25 73 20 64 75 70 2e 2e | 2e 22 20 62 79 74 65 2d |%s dup..|." byte-|
|00005670| 63 6f 6d 70 69 6c 65 2d | 6d 61 78 64 65 70 74 68 |compile-|maxdepth|
|00005680| 5d 20 31 34 20 22 5c 0a | 53 69 6d 70 6c 65 20 70 |] 14 "\.|Simple p|
|00005690| 65 65 70 68 6f 6c 65 20 | 6f 70 74 69 6d 69 7a 65 |eephole |optimize|
|000056a0| 72 2e 20 20 4c 41 50 20 | 69 73 20 62 6f 74 68 20 |r. LAP |is both |
|000056b0| 6d 6f 64 69 66 69 65 64 | 20 61 6e 64 20 72 65 74 |modified| and ret|
|000056c0| 75 72 6e 65 64 2e 22 5d | 29 0a 28 70 72 6f 76 69 |urned."]|).(provi|
|000056d0| 64 65 20 28 71 75 6f 74 | 65 20 62 79 74 65 2d 6f |de (quot|e byte-o|
|000056e0| 70 74 69 6d 69 7a 65 29 | 29 0a |ptimize)|). |
+--------+-------------------------+-------------------------+--------+--------+