/ Linux Cubed Series 2: Applications / Linux Cubed Series 2 - Applications.iso / editors / emacs / xemacs / xemacs-1.006 / xemacs-1 / lib / xemacs-19.13 / lisp / ilisp / ilisp-key.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 63 74 68 6f 6d 70 40 |piled by| cthomp@|
|00000020| 77 69 6c 6c 6f 77 2e 63 | 73 2e 75 69 75 63 2e 65 |willow.c|s.uiuc.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 41 75 67 20 32 39 |du on Tu|e Aug 29|
|00000040| 20 31 39 3a 30 35 3a 32 | 38 20 31 39 39 35 0a 3b | 19:05:2|8 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 65 78 |;; from |file /ex|
|00000060| 70 6f 72 74 2f 77 69 6c | 6c 6f 77 33 2f 78 65 6d |port/wil|low3/xem|
|00000070| 61 63 73 2d 31 39 2e 31 | 33 2d 72 65 6c 65 61 73 |acs-19.1|3-releas|
|00000080| 65 2f 65 64 69 74 6f 72 | 2f 6c 69 73 70 2f 69 6c |e/editor|/lisp/il|
|00000090| 69 73 70 2f 69 6c 69 73 | 70 2d 6b 65 79 2e 65 6c |isp/ilis|p-key.el|
|000000a0| 0a 3b 3b 3b 20 65 6d 61 | 63 73 20 76 65 72 73 69 |.;;; ema|cs versi|
|000000b0| 6f 6e 20 31 39 2e 31 33 | 20 58 45 6d 61 63 73 20 |on 19.13| XEmacs |
|000000c0| 4c 75 63 69 64 2e 0a 3b | 3b 3b 20 62 79 74 65 63 |Lucid..;|;; bytec|
|000000d0| 6f 6d 70 20 76 65 72 73 | 69 6f 6e 20 32 2e 32 35 |omp vers|ion 2.25|
|000000e0| 3b 20 31 2d 53 65 70 2d | 39 34 2e 0a 3b 3b 3b 20 |; 1-Sep-|94..;;; |
|000000f0| 6f 70 74 69 6d 69 7a 61 | 74 69 6f 6e 20 69 73 20 |optimiza|tion is |
|00000100| 6f 6e 2e 0a 3b 3b 3b 20 | 74 68 69 73 20 66 69 6c |on..;;; |this fil|
|00000110| 65 20 75 73 65 73 20 6f | 70 63 6f 64 65 73 20 77 |e uses o|pcodes w|
|00000120| 68 69 63 68 20 64 6f 20 | 6e 6f 74 20 65 78 69 73 |hich do |not exis|
|00000130| 74 20 69 6e 20 45 6d 61 | 63 73 20 31 38 2e 0a 0a |t in Ema|cs 18...|
|00000140| 28 69 66 20 28 61 6e 64 | 20 28 62 6f 75 6e 64 70 |(if (and| (boundp|
|00000150| 20 27 65 6d 61 63 73 2d | 76 65 72 73 69 6f 6e 29 | 'emacs-|version)|
|00000160| 0a 09 20 28 6f 72 20 28 | 61 6e 64 20 28 62 6f 75 |.. (or (|and (bou|
|00000170| 6e 64 70 20 27 65 70 6f | 63 68 3a 3a 76 65 72 73 |ndp 'epo|ch::vers|
|00000180| 69 6f 6e 29 20 65 70 6f | 63 68 3a 3a 76 65 72 73 |ion) epo|ch::vers|
|00000190| 69 6f 6e 29 0a 09 20 20 | 20 20 20 28 73 74 72 69 |ion)..  |   (stri|
|000001a0| 6e 67 2d 6c 65 73 73 70 | 20 65 6d 61 63 73 2d 76 |ng-lessp| emacs-v|
|000001b0| 65 72 73 69 6f 6e 20 22 | 31 39 22 29 29 29 0a 20 |ersion "|19"))). |
|000001c0| 20 20 20 28 65 72 72 6f | 72 20 22 54 68 69 73 20 |   (erro|r "This |
|000001d0| 66 69 6c 65 20 77 61 73 | 20 63 6f 6d 70 69 6c 65 |file was| compile|
|000001e0| 64 20 66 6f 72 20 45 6d | 61 63 73 20 31 39 2e 22 |d for Em|acs 19."|
|000001f0| 29 29 0a 0a 28 66 73 65 | 74 20 27 69 6c 69 73 70 |))..(fse|t 'ilisp|
|00000200| 2d 77 68 65 72 65 2d 69 | 73 20 23 5b 28 63 6f 6d |-where-i|s #[(com|
|00000210| 6d 61 6e 64 29 20 22 c0 | 09 c2 c3 23 89 1c ad 83 |mand) ".|...#....|
|00000220| c5 0c 21 29 87 22 20 5b | 77 68 65 72 65 2d 69 73 |..!)." [|where-is|
|00000230| 2d 69 6e 74 65 72 6e 61 | 6c 20 63 6f 6d 6d 61 6e |-interna|l comman|
|00000240| 64 20 6e 69 6c 20 74 20 | 63 6d 64 20 6b 65 79 2d |d nil t |cmd key-|
|00000250| 64 65 73 63 72 69 70 74 | 69 6f 6e 5d 20 35 5d 29 |descript|ion] 5])|
|00000260| 0a 28 66 73 65 74 20 27 | 69 6c 69 73 70 2d 64 65 |.(fset '|ilisp-de|
|00000270| 66 6b 65 79 20 23 5b 28 | 6b 65 79 6d 61 70 20 6b |fkey #[(|keymap k|
|00000280| 65 79 20 63 6f 6d 6d 61 | 6e 64 29 20 22 c0 09 5c |ey comma|nd) "..\|
|00000290| 6e 5c 22 1b c4 0b 21 ac | 87 c5 09 5c 6e c6 20 23 |n\"...!.|...\n. #|
|000002a0| 13 c5 0b 0e 07 0e 08 23 | 29 87 22 20 5b 6c 6f 6f |.......#|)." [loo|
|000002b0| 6b 75 70 2d 6b 65 79 20 | 6b 65 79 6d 61 70 20 69 |kup-key |keymap i|
|000002c0| 6c 69 73 70 2d 70 72 65 | 66 69 78 20 70 72 65 66 |lisp-pre|fix pref|
|000002d0| 69 78 2d 6d 61 70 20 6b | 65 79 6d 61 70 70 20 64 |ix-map k|eymapp d|
|000002e0| 65 66 69 6e 65 2d 6b 65 | 79 20 6d 61 6b 65 2d 73 |efine-ke|y make-s|
|000002f0| 70 61 72 73 65 2d 6b 65 | 79 6d 61 70 20 6b 65 79 |parse-ke|ymap key|
|00000300| 20 63 6f 6d 6d 61 6e 64 | 5d 20 34 20 22 5c 0a 44 | command|] 4 "\.D|
|00000310| 65 66 69 6e 65 20 4b 45 | 59 4d 41 50 20 69 6c 69 |efine KE|YMAP ili|
|00000320| 73 70 2d 70 72 65 66 69 | 78 2b 4b 45 59 20 61 73 |sp-prefi|x+KEY as|
|00000330| 20 63 6f 6d 6d 61 6e 64 | 2e 22 5d 29 0a 28 66 73 | command|."]).(fs|
|00000340| 65 74 20 27 64 65 66 6b | 65 79 2d 69 6c 69 73 70 |et 'defk|ey-ilisp|
|00000350| 20 23 5b 28 6b 65 79 20 | 63 6f 6d 6d 61 6e 64 29 | #[(key |command)|
|00000360| 20 22 08 ac 83 c1 20 88 | c2 08 0b 0c 23 88 c2 0d | ".... .|....#...|
|00000370| 0b 0c 23 87 22 20 5b 69 | 6c 69 73 70 2d 6d 6f 64 |..#." [i|lisp-mod|
|00000380| 65 2d 6d 61 70 20 69 6c | 69 73 70 2d 62 69 6e 64 |e-map il|isp-bind|
|00000390| 69 6e 67 73 20 64 65 66 | 69 6e 65 2d 6b 65 79 20 |ings def|ine-key |
|000003a0| 6b 65 79 20 63 6f 6d 6d | 61 6e 64 20 6c 69 73 70 |key comm|and lisp|
|000003b0| 2d 6d 6f 64 65 2d 6d 61 | 70 5d 20 34 20 22 5c 0a |-mode-ma|p] 4 "\.|
|000003c0| 44 65 66 69 6e 65 20 4b | 45 59 20 61 73 20 43 4f |Define K|EY as CO|
|000003d0| 4d 4d 41 4e 44 20 69 6e | 20 69 6c 69 73 70 2d 6d |MMAND in| ilisp-m|
|000003e0| 6f 64 65 2d 6d 61 70 20 | 61 6e 64 20 6c 69 73 70 |ode-map |and lisp|
|000003f0| 2d 6d 6f 64 65 2d 6d 61 | 70 22 5d 29 0a 28 66 73 |-mode-ma|p"]).(fs|
|00000400| 65 74 20 27 6c 69 73 70 | 2d 62 69 6e 64 69 6e 67 |et 'lisp|-binding|
|00000410| 73 20 23 5b 28 6b 65 79 | 6d 61 70 20 26 6f 70 74 |s #[(key|map &opt|
|00000420| 69 6f 6e 61 6c 20 69 6e | 66 65 72 69 6f 72 2d 70 |ional in|ferior-p|
|00000430| 29 20 22 08 ab a0 c1 5c | 6e c3 c4 23 88 c1 5c 6e |) "....\|n..#..\n|
|00000440| c5 c6 23 88 c1 5c 6e c7 | c8 23 88 c1 5c 6e c9 ca |..#..\n.|.#..\n..|
|00000450| 23 88 cb 5c 6e cc cd 23 | 88 aa 8c cb 5c 6e ce cf |#..\n..#|....\n..|
|00000460| 23 88 c1 5c 6e c3 d0 23 | 88 c1 5c 6e d1 d2 23 88 |#..\n..#|..\n..#.|
|00000470| c1 5c 6e d3 d4 23 88 c1 | 5c 6e d5 d6 23 88 c1 5c |.\n..#..|\n..#..\|
|00000480| 6e d7 d8 23 88 c1 5c 6e | d9 d0 23 88 c1 5c 6e da |n..#..\n|..#..\n.|
|00000490| db 23 88 cb 5c 6e dc dd | 23 88 cb 5c 6e de df 23 |.#..\n..|#..\n..#|
|000004a0| 88 c1 5c 6e e0 e1 23 88 | c1 5c 6e e2 e3 23 88 c1 |..\n..#.|.\n..#..|
|000004b0| 5c 6e e4 e5 23 88 cb 5c | 6e e6 e7 23 88 cb 5c 6e |\n..#..\|n..#..\n|
|000004c0| e8 e9 23 88 cb 5c 6e ea | eb 23 88 cb 5c 6e ec ed |..#..\n.|.#..\n..|
|000004d0| 23 88 cb 5c 6e ee ef 23 | 88 cb 5c 6e f0 f1 23 88 |#..\n..#|..\n..#.|
|000004e0| c1 5c 6e f2 f3 23 88 c1 | 5c 6e f4 f5 23 88 c1 5c |.\n..#..|\n..#..\|
|000004f0| 6e f6 f7 23 88 c1 5c 6e | f8 f9 23 88 cb 5c 6e fa |n..#..\n|..#..\n.|
|00000500| fb 23 88 c1 5c 6e fc fd | 23 88 c1 5c 6e fe ff 23 |.#..\n..|#..\n..#|
|00000510| 88 c1 5c 6e 81 40 00 81 | 41 00 23 88 cb 5c 6e 81 |..\n.@..|A.#..\n.|
|00000520| 42 00 81 43 00 23 88 c1 | 5c 6e 81 44 00 81 45 00 |B..C.#..|\n.D..E.|
|00000530| 23 88 cb 5c 6e 81 46 00 | 81 45 00 23 88 cb 5c 6e |#..\n.F.|.E.#..\n|
|00000540| 81 47 00 81 48 00 23 88 | cb 5c 6e 81 49 00 81 4a |.G..H.#.|.\n.I..J|
|00000550| 00 23 88 cb 5c 6e 81 4b | 00 81 4c 00 23 88 cb 5c |.#..\n.K|..L.#..\|
|00000560| 6e 81 4d 00 81 4e 00 23 | 88 cb 5c 6e 81 4f 00 81 |n.M..N.#|..\n.O..|
|00000570| 50 00 23 88 cb 5c 6e 81 | 51 00 81 52 00 23 88 cb |P.#..\n.|Q..R.#..|
|00000580| 5c 6e 81 53 00 81 54 00 | 23 88 cb 5c 6e 81 55 00 |\n.S..T.|#..\n.U.|
|00000590| 81 56 00 23 88 cb 5c 6e | 81 57 00 81 58 00 23 88 |.V.#..\n|.W..X.#.|
|000005a0| cb 5c 6e 81 59 00 81 5a | 00 23 88 cb 5c 6e 81 5b |.\n.Y..Z|.#..\n.[|
|000005b0| 00 81 5c 5c 00 23 88 cb | 5c 6e 81 5d 00 81 5e 00 |..\\.#..|\n.]..^.|
|000005c0| 23 88 0e 5f 81 60 00 50 | 1e 5f cb 5c 6e 81 61 00 |#.._.`.P|._.\n.a.|
|000005d0| 81 62 00 23 88 cb 5c 6e | 81 46 00 81 63 00 23 88 |.b.#..\n|.F..c.#.|
|000005e0| cb 5c 6e 81 4f 00 81 64 | 00 23 88 cb 5c 6e 81 65 |.\n.O..d|.#..\n.e|
|000005f0| 00 81 66 00 23 88 29 cb | 5c 6e 81 67 00 81 68 00 |..f.#.).|\n.g..h.|
|00000600| 23 88 cb 5c 6e 81 69 00 | 81 6a 00 23 88 cb 5c 6e |#..\n.i.|.j.#..\n|
|00000610| 81 6b 00 81 6c 00 23 88 | cb 5c 6e 81 6d 00 81 6e |.k..l.#.|.\n.m..n|
|00000620| 00 23 88 cb 5c 6e 81 6f | 00 81 70 00 23 88 cb 5c |.#..\n.o|..p.#..\|
|00000630| 6e 81 71 00 81 72 00 23 | 88 c1 5c 6e 81 73 00 81 |n.q..r.#|..\n.s..|
|00000640| 74 00 23 88 cb 5c 6e 81 | 61 00 81 75 00 23 88 cb |t.#..\n.|a..u.#..|
|00000650| 5c 6e 81 76 00 81 77 00 | 23 88 cb 5c 6e 81 78 00 |\n.v..w.|#..\n.x.|
|00000660| 81 79 00 23 88 cb 5c 6e | 81 7a 00 81 7b 00 23 87 |.y.#..\n|.z..{.#.|
|00000670| 22 20 5b 69 6e 66 65 72 | 69 6f 72 2d 70 20 64 65 |" [infer|ior-p de|
|00000680| 66 69 6e 65 2d 6b 65 79 | 20 6b 65 79 6d 61 70 20 |fine-key| keymap |
|00000690| 22 0d 22 20 72 65 74 75 | 72 6e 2d 69 6c 69 73 70 |"." retu|rn-ilisp|
|000006a0| 20 22 01 22 20 62 6f 6c | 2d 69 6c 69 73 70 20 22 | "." bol|-ilisp "|
|000006b0| 03 03 22 20 69 6e 74 65 | 72 72 75 70 74 2d 73 75 |.." inte|rrupt-su|
|000006c0| 62 6a 6f 62 2d 69 6c 69 | 73 70 20 22 04 22 20 64 |bjob-ili|sp "." d|
|000006d0| 65 6c 65 74 65 2d 63 68 | 61 72 2d 6f 72 2d 70 6f |elete-ch|ar-or-po|
|000006e0| 70 2d 69 6c 69 73 70 20 | 69 6c 69 73 70 2d 64 65 |p-ilisp |ilisp-de|
|000006f0| 66 6b 65 79 20 22 23 22 | 20 72 61 77 2d 6b 65 79 |fkey "#"| raw-key|
|00000700| 73 2d 69 6c 69 73 70 20 | 22 03 22 20 63 6f 6d 70 |s-ilisp |"." comp|
|00000710| 69 6c 65 2d 64 65 66 75 | 6e 2d 61 6e 64 2d 67 6f |ile-defu|n-and-go|
|00000720| 2d 6c 69 73 70 20 6e 65 | 77 6c 69 6e 65 2d 61 6e |-lisp ne|wline-an|
|00000730| 64 2d 69 6e 64 65 6e 74 | 2d 6c 69 73 70 20 22 5d |d-indent|-lisp "]|
|00000740| 22 20 63 6c 6f 73 65 2d | 61 6c 6c 2d 6c 69 73 70 |" close-|all-lisp|
|00000750| 20 22 f1 22 20 72 65 69 | 6e 64 65 6e 74 2d 6c 69 | "." rei|ndent-li|
|00000760| 73 70 20 22 1d 22 20 63 | 6c 6f 73 65 2d 61 6e 64 |sp "." c|lose-and|
|00000770| 2d 73 65 6e 64 2d 6c 69 | 73 70 20 22 09 22 20 69 |-send-li|sp "." i|
|00000780| 6e 64 65 6e 74 2d 6c 69 | 6e 65 2d 69 6c 69 73 70 |ndent-li|ne-ilisp|
|00000790| 20 22 5c 6e 22 20 22 91 | 22 20 69 6e 64 65 6e 74 | "\n" ".|" indent|
|000007a0| 2d 73 65 78 70 2d 69 6c | 69 73 70 20 22 3b 22 20 |-sexp-il|isp ";" |
|000007b0| 63 6f 6d 6d 65 6e 74 2d | 72 65 67 69 6f 6e 2d 6c |comment-|region-l|
|000007c0| 69 73 70 20 22 29 22 20 | 66 69 6e 64 2d 75 6e 62 |isp ")" |find-unb|
|000007d0| 61 6c 61 6e 63 65 64 2d | 6c 69 73 70 20 22 81 22 |alanced-|lisp "."|
|000007e0| 20 62 65 67 69 6e 6e 69 | 6e 67 2d 6f 66 2d 64 65 | beginni|ng-of-de|
|000007f0| 66 75 6e 2d 6c 69 73 70 | 20 22 85 22 20 65 6e 64 |fun-lisp| "." end|
|00000800| 2d 6f 66 2d 64 65 66 75 | 6e 2d 6c 69 73 70 20 22 |-of-defu|n-lisp "|
|00000810| 92 22 20 72 65 70 6f 73 | 69 74 69 6f 6e 2d 77 69 |." repos|ition-wi|
|00000820| 6e 64 6f 77 2d 6c 69 73 | 70 20 22 69 22 20 64 65 |ndow-lis|p "i" de|
|00000830| 73 63 72 69 62 65 2d 6c | 69 73 70 20 22 49 22 20 |scribe-l|isp "I" |
|00000840| 69 6e 73 70 65 63 74 2d | 6c 69 73 70 20 22 61 22 |inspect-|lisp "a"|
|00000850| 20 61 72 67 6c 69 73 74 | 2d 6c 69 73 70 20 22 64 | arglist|-lisp "d|
|00000860| 22 20 64 6f 63 75 6d 65 | 6e 74 61 74 69 6f 6e 2d |" docume|ntation-|
|00000870| 6c 69 73 70 20 22 6d 22 | 20 6d 61 63 72 6f 65 78 |lisp "m"| macroex|
|00000880| 70 61 6e 64 2d 31 2d 6c | 69 73 70 20 22 4d 22 20 |pand-1-l|isp "M" |
|00000890| 6d 61 63 72 6f 65 78 70 | 61 6e 64 2d 6c 69 73 70 |macroexp|and-lisp|
|000008a0| 20 22 ac 22 20 6e 65 78 | 74 2d 64 65 66 69 6e 69 | "." nex|t-defini|
|000008b0| 74 69 6f 6e 2d 6c 69 73 | 70 20 22 ae 22 20 65 64 |tion-lis|p "." ed|
|000008c0| 69 74 2d 64 65 66 69 6e | 69 74 69 6f 6e 73 2d 6c |it-defin|itions-l|
|000008d0| 69 73 70 20 22 bf 22 20 | 73 65 61 72 63 68 2d 6c |isp "." |search-l|
|000008e0| 69 73 70 20 22 a2 22 20 | 72 65 70 6c 61 63 65 2d |isp "." |replace-|
|000008f0| 6c 69 73 70 20 22 5e 22 | 20 65 64 69 74 2d 63 61 |lisp "^"| edit-ca|
|00000900| 6c 6c 65 72 73 2d 6c 69 | 73 70 20 22 e0 22 20 6e |llers-li|sp "." n|
|00000910| 65 78 74 2d 63 61 6c 6c | 65 72 2d 6c 69 73 70 20 |ext-call|er-lisp |
|00000920| 22 89 22 20 63 6f 6d 70 | 6c 65 74 65 2d 6c 69 73 |"." comp|lete-lis|
|00000930| 70 20 22 8d 22 20 63 6f | 6d 70 6c 65 74 65 20 22 |p "." co|mplete "|
|00000940| 72 22 20 65 76 61 6c 2d | 72 65 67 69 6f 6e 2d 6c |r" eval-|region-l|
|00000950| 69 73 70 20 22 98 22 20 | 65 76 61 6c 2d 64 65 66 |isp "." |eval-def|
|00000960| 75 6e 2d 6c 69 73 70 20 | 22 65 22 20 22 6e 22 20 |un-lisp |"e" "n" |
|00000970| 65 76 61 6c 2d 6e 65 78 | 74 2d 73 65 78 70 2d 6c |eval-nex|t-sexp-l|
|00000980| 69 73 70 20 22 70 22 20 | 70 61 63 6b 61 67 65 2d |isp "p" |package-|
|00000990| 6c 69 73 70 20 22 50 22 | 20 73 65 74 2d 70 61 63 |lisp "P"| set-pac|
|000009a0| 6b 61 67 65 2d 6c 69 73 | 70 20 22 77 22 20 63 6f |kage-lis|p "w" co|
|000009b0| 6d 70 69 6c 65 2d 72 65 | 67 69 6f 6e 2d 6c 69 73 |mpile-re|gion-lis|
|000009c0| 70 20 22 63 22 20 63 6f | 6d 70 69 6c 65 2d 64 65 |p "c" co|mpile-de|
|000009d0| 66 75 6e 2d 6c 69 73 70 | 20 22 12 22 20 65 76 61 |fun-lisp| "." eva|
|000009e0| 6c 2d 72 65 67 69 6f 6e | 2d 61 6e 64 2d 67 6f 2d |l-region|-and-go-|
|000009f0| 6c 69 73 70 20 22 05 22 | 20 65 76 61 6c 2d 64 65 |lisp "."| eval-de|
|00000a00| 66 75 6e 2d 61 6e 64 2d | 67 6f 2d 6c 69 73 70 20 |fun-and-|go-lisp |
|00000a10| 22 0e 22 20 65 76 61 6c | 2d 6e 65 78 74 2d 73 65 |"." eval|-next-se|
|00000a20| 78 70 2d 61 6e 64 2d 67 | 6f 2d 6c 69 73 70 20 22 |xp-and-g|o-lisp "|
|00000a30| 17 22 20 63 6f 6d 70 69 | 6c 65 2d 72 65 67 69 6f |." compi|le-regio|
|00000a40| 6e 2d 61 6e 64 2d 67 6f | 2d 6c 69 73 70 20 22 74 |n-and-go|-lisp "t|
|00000a50| 22 20 74 72 61 63 65 2d | 64 65 66 75 6e 2d 6c 69 |" trace-|defun-li|
|00000a60| 73 70 20 22 21 22 20 64 | 65 66 61 75 6c 74 2d 64 |sp "!" d|efault-d|
|00000a70| 69 72 65 63 74 6f 72 79 | 2d 6c 69 73 70 20 22 20 |irectory|-lisp " |
|00000a80| 22 20 6d 61 72 6b 2d 63 | 68 61 6e 67 65 2d 6c 69 |" mark-c|hange-li|
|00000a90| 73 70 20 69 6c 69 73 70 | 2d 70 72 65 66 69 78 20 |sp ilisp|-prefix |
|00000aa0| 22 2a 22 20 22 6c 22 20 | 6c 69 73 74 2d 63 68 61 |"*" "l" |list-cha|
|00000ab0| 6e 67 65 73 2d 6c 69 73 | 70 20 65 76 61 6c 2d 63 |nges-lis|p eval-c|
|00000ac0| 68 61 6e 67 65 73 2d 6c | 69 73 70 20 63 6f 6d 70 |hanges-l|isp comp|
|00000ad0| 69 6c 65 2d 63 68 61 6e | 67 65 73 2d 6c 69 73 70 |ile-chan|ges-lisp|
|00000ae0| 20 22 30 22 20 63 6c 65 | 61 72 2d 63 68 61 6e 67 | "0" cle|ar-chang|
|00000af0| 65 73 2d 6c 69 73 70 20 | 22 62 22 20 73 77 69 74 |es-lisp |"b" swit|
|00000b00| 63 68 2d 74 6f 2d 6c 69 | 73 70 20 22 79 22 20 63 |ch-to-li|sp "y" c|
|00000b10| 61 6c 6c 2d 64 65 66 75 | 6e 2d 6c 69 73 70 20 22 |all-defu|n-lisp "|
|00000b20| 7a 22 20 72 65 73 65 74 | 2d 69 6c 69 73 70 20 22 |z" reset|-ilisp "|
|00000b30| 67 22 20 61 62 6f 72 74 | 2d 63 6f 6d 6d 61 6e 64 |g" abort|-command|
|00000b40| 73 2d 6c 69 73 70 20 22 | 73 22 20 73 74 61 74 75 |s-lisp "|s" statu|
|00000b50| 73 2d 6c 69 73 70 20 22 | 53 22 20 73 65 6c 65 63 |s-lisp "|S" selec|
|00000b60| 74 2d 69 6c 69 73 70 20 | 22 18 06 22 20 66 69 6e |t-ilisp |".." fin|
|00000b70| 64 2d 66 69 6c 65 2d 6c | 69 73 70 20 6c 6f 61 64 |d-file-l|isp load|
|00000b80| 2d 66 69 6c 65 2d 6c 69 | 73 70 20 22 6b 22 20 63 |-file-li|sp "k" c|
|00000b90| 6f 6d 70 69 6c 65 2d 66 | 69 6c 65 2d 6c 69 73 70 |ompile-f|ile-lisp|
|00000ba0| 20 22 41 22 20 66 69 3a | 63 6c 6d 61 6e 2d 61 70 | "A" fi:|clman-ap|
|00000bb0| 72 6f 70 6f 73 20 22 44 | 22 20 66 69 3a 63 6c 6d |ropos "D|" fi:clm|
|00000bc0| 61 6e 5d 20 34 20 22 5c | 0a 53 65 74 20 75 70 20 |an] 4 "\|.Set up |
|00000bd0| 74 68 65 20 62 69 6e 64 | 69 6e 67 73 20 66 6f 72 |the bind|ings for|
|00000be0| 20 69 6e 74 65 72 61 63 | 74 69 6e 67 20 77 69 74 | interac|ting wit|
|00000bf0| 68 20 61 6e 20 69 6e 66 | 65 72 69 6f 72 20 4c 49 |h an inf|erior LI|
|00000c00| 53 50 20 69 6e 0a 4b 45 | 59 4d 41 50 2e 22 5d 29 |SP in.KE|YMAP."])|
|00000c10| 0a 28 66 73 65 74 20 27 | 69 6c 69 73 70 2d 6c 69 |.(fset '|ilisp-li|
|00000c20| 73 70 6d 2d 62 69 6e 64 | 69 6e 67 73 20 23 5b 6e |spm-bind|ings #[n|
|00000c30| 69 6c 20 22 08 c1 3d ae | cc 08 c2 3d ab aa c3 c4 |il "..=.|...=....|
|00000c40| c5 21 c6 5c 22 88 c3 c4 | c7 21 c8 5c 22 88 c3 c4 |.!.\"...|.!.\"...|
|00000c50| c9 21 ca 5c 22 88 c3 c4 | cb 21 cc 5c 22 88 c3 c4 |.!.\"...|.!.\"...|
|00000c60| cd 21 ce 5c 22 88 c3 c4 | cf 21 d0 5c 22 87 c3 d1 |.!.\"...|.!.\"...|
|00000c70| c6 5c 22 88 c3 d2 c8 5c | 22 88 c3 d3 ca 5c 22 88 |.\"....\|"....\".|
|00000c80| c3 d4 cc 5c 22 88 c3 d5 | ce 5c 22 88 c3 d6 d0 5c |...\"...|.\"....\|
|00000c90| 22 87 22 20 5b 2b 69 6c | 69 73 70 2d 65 6d 61 63 |"." [+il|isp-emac|
|00000ca0| 73 2d 76 65 72 73 69 6f | 6e 2d 69 64 2b 20 66 73 |s-versio|n-id+ fs|
|00000cb0| 66 2d 31 38 20 66 73 66 | 2d 31 39 20 64 65 66 6b |f-18 fsf|-19 defk|
|00000cc0| 65 79 2d 69 6c 69 73 70 | 20 72 65 61 64 20 22 5b |ey-ilisp| read "[|
|00000cd0| 3f 5c 5c 53 2d 5c 5c 43 | 2d 61 5d 22 20 61 72 67 |?\\S-\\C|-a]" arg|
|00000ce0| 6c 69 73 74 2d 6c 69 73 | 70 20 22 5b 3f 5c 5c 53 |list-lis|p "[?\\S|
|00000cf0| 2d 5c 5c 43 2d 63 5d 22 | 20 63 6f 6d 70 69 6c 65 |-\\C-c]"| compile|
|00000d00| 2d 64 65 66 75 6e 2d 6c | 69 73 70 20 22 5b 3f 5c |-defun-l|isp "[?\|
|00000d10| 5c 53 2d 5c 5c 43 2d 64 | 5d 22 20 64 6f 63 75 6d |\S-\\C-d|]" docum|
|00000d20| 65 6e 74 61 74 69 6f 6e | 2d 6c 69 73 70 20 22 5b |entation|-lisp "[|
|00000d30| 3f 5c 5c 53 2d 5c 5c 43 | 2d 65 5d 22 20 65 76 61 |?\\S-\\C|-e]" eva|
|00000d40| 6c 2d 64 65 66 75 6e 2d | 6c 69 73 70 20 22 5b 3f |l-defun-|lisp "[?|
|00000d50| 5c 5c 53 2d 5c 5c 43 2d | 6d 5d 22 20 6d 61 63 72 |\\S-\\C-|m]" macr|
|00000d60| 6f 65 78 70 61 6e 64 2d | 31 2d 6c 69 73 70 20 22 |oexpand-|1-lisp "|
|00000d70| 5b 3f 5c 5c 4d 2d 4d 5d | 22 20 6d 61 63 72 6f 65 |[?\\M-M]|" macroe|
|00000d80| 78 70 61 6e 64 2d 6c 69 | 73 70 20 28 63 6f 6e 74 |xpand-li|sp (cont|
|00000d90| 72 6f 6c 20 41 29 20 28 | 63 6f 6e 74 72 6f 6c 20 |rol A) (|control |
|00000da0| 43 29 20 28 63 6f 6e 74 | 72 6f 6c 20 44 29 20 28 |C) (cont|rol D) (|
|00000db0| 63 6f 6e 74 72 6f 6c 20 | 45 29 20 28 63 6f 6e 74 |control |E) (cont|
|00000dc0| 72 6f 6c 20 4d 29 20 28 | 6d 65 74 61 20 4d 29 5d |rol M) (|meta M)]|
|00000dd0| 20 33 20 22 5c 0a 53 65 | 74 75 70 20 61 64 64 69 | 3 "\.Se|tup addi|
|00000de0| 74 69 6f 6e 61 6c 20 4c | 69 73 70 20 4d 61 63 68 |tional L|isp Mach|
|00000df0| 69 6e 65 2d 6c 69 6b 65 | 20 62 69 6e 64 69 6e 67 |ine-like| binding|
|00000e00| 73 20 66 6f 72 20 73 6f | 6d 65 20 69 6c 69 73 70 |s for so|me ilisp|
|00000e10| 20 63 6f 6d 6d 61 6e 64 | 73 22 20 6e 69 6c 5d 29 | command|s" nil])|
|00000e20| 0a 28 66 73 65 74 20 27 | 69 6c 69 73 70 2d 62 69 |.(fset '|ilisp-bi|
|00000e30| 6e 64 69 6e 67 73 20 23 | 5b 6e 69 6c 20 22 c0 c1 |ndings #|[nil "..|
|00000e40| 21 ab 8a c2 20 13 c1 0b | 0c 5c 22 88 aa 84 c5 0c |!... ...|.\".....|
|00000e50| 21 13 c6 0b c7 c8 23 88 | c6 0b c9 c8 23 88 c0 ca |!.....#.|....#...|
|00000e60| 21 ab 84 ca 0b 21 88 cb | 0b cc 5c 22 88 cd ce 21 |!....!..|..\"...!|
|00000e70| ab 85 cb 0e 0e 21 88 cd | cf 21 ab 85 cb 0e 0f 21 |.....!..|.!.....!|
|00000e80| 88 d0 0e 11 d2 d3 23 88 | d0 0e 14 d5 d6 23 88 d0 |......#.|.....#..|
|00000e90| 0e 14 d7 d8 23 88 d0 0e | 14 d9 da 23 88 d0 0e 14 |....#...|...#....|
|00000ea0| db dc 23 88 d0 0e 14 dd | de 23 88 cd df 21 ac 84 |..#.....|.#...!..|
|00000eb0| c2 20 16 1f d0 0e 1f e0 | e1 23 88 d0 0e 1f e2 e3 |. ......|.#......|
|00000ec0| 23 87 22 20 5b 66 62 6f | 75 6e 64 70 20 73 65 74 |#." [fbo|undp set|
|00000ed0| 2d 6b 65 79 6d 61 70 2d | 70 61 72 65 6e 74 20 6d |-keymap-|parent m|
|00000ee0| 61 6b 65 2d 73 70 61 72 | 73 65 2d 6b 65 79 6d 61 |ake-spar|se-keyma|
|00000ef0| 70 20 69 6c 69 73 70 2d | 6d 6f 64 65 2d 6d 61 70 |p ilisp-|mode-map|
|00000f00| 20 63 6f 6d 69 6e 74 2d | 6d 6f 64 65 2d 6d 61 70 | comint-|mode-map|
|00000f10| 20 63 6f 70 79 2d 6b 65 | 79 6d 61 70 20 64 65 66 | copy-ke|ymap def|
|00000f20| 69 6e 65 2d 6b 65 79 20 | 22 03 1a 22 20 6e 69 6c |ine-key |".." nil|
|00000f30| 20 22 03 1c 22 20 6c 69 | 73 70 2d 6d 6f 64 65 2d | ".." li|sp-mode-|
|00000f40| 63 6f 6d 6d 61 6e 64 73 | 20 6c 69 73 70 2d 62 69 |commands| lisp-bi|
|00000f50| 6e 64 69 6e 67 73 20 74 | 20 62 6f 75 6e 64 70 20 |ndings t| boundp |
|00000f60| 6c 69 73 70 2d 6d 6f 64 | 65 2d 6d 61 70 20 73 63 |lisp-mod|e-map sc|
|00000f70| 68 65 6d 65 2d 6d 6f 64 | 65 2d 6d 61 70 20 69 6c |heme-mod|e-map il|
|00000f80| 69 73 70 2d 64 65 66 6b | 65 79 20 65 6d 61 63 73 |isp-defk|ey emacs|
|00000f90| 2d 6c 69 73 70 2d 6d 6f | 64 65 2d 6d 61 70 20 22 |-lisp-mo|de-map "|
|00000fa0| 3b 22 20 63 6f 6d 6d 65 | 6e 74 2d 72 65 67 69 6f |;" comme|nt-regio|
|00000fb0| 6e 2d 6c 69 73 70 20 67 | 6c 6f 62 61 6c 2d 6d 61 |n-lisp g|lobal-ma|
|00000fc0| 70 20 22 14 22 20 74 72 | 61 63 65 2d 64 65 66 75 |p "." tr|ace-defu|
|00000fd0| 6e 2d 6c 69 73 70 2d 62 | 72 65 61 6b 20 22 62 22 |n-lisp-b|reak "b"|
|00000fe0| 20 73 77 69 74 63 68 2d | 74 6f 2d 6c 69 73 70 20 | switch-|to-lisp |
|00000ff0| 22 31 22 20 69 6c 69 73 | 70 2d 62 75 72 79 2d 6f |"1" ilis|p-bury-o|
|00001000| 75 74 70 75 74 20 22 76 | 22 20 69 6c 69 73 70 2d |utput "v|" ilisp-|
|00001010| 73 63 72 6f 6c 6c 2d 6f | 75 74 70 75 74 20 22 47 |scroll-o|utput "G|
|00001020| 22 20 69 6c 69 73 70 2d | 67 72 6f 77 2d 6f 75 74 |" ilisp-|grow-out|
|00001030| 70 75 74 20 66 69 3a 63 | 6c 6d 61 6e 2d 6d 6f 64 |put fi:c|lman-mod|
|00001040| 65 2d 6d 61 70 20 22 44 | 22 20 66 69 3a 63 6c 6d |e-map "D|" fi:clm|
|00001050| 61 6e 20 22 41 22 20 66 | 69 3a 63 6c 6d 61 6e 2d |an "A" f|i:clman-|
|00001060| 61 70 72 6f 70 6f 73 5d | 20 34 20 22 5c 0a 53 65 |apropos]| 4 "\.Se|
|00001070| 74 20 75 70 20 74 68 65 | 20 6b 65 79 20 62 69 6e |t up the| key bin|
|00001080| 64 69 6e 67 73 20 66 6f | 72 20 4c 49 53 50 20 61 |dings fo|r LISP a|
|00001090| 6e 64 20 49 4c 49 53 50 | 20 62 75 66 66 65 72 73 |nd ILISP| buffers|
|000010a0| 2e 22 5d 29 0a          |                         |."]).   |        |
+--------+-------------------------+-------------------------+--------+--------+