home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1993-06-08 | 21.2 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Combustion 2 Particle Library (other/combustion2ParticleLibrary)
| ext
| Unsupported |
| 1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| ext
| Unsupported |
| 100%
| file
| data
| default
| |
| 100%
| TrID
| Summation Document Image Information Load File
| default (weak)
| |
| 100%
| gt2
| Kopftext: ';;; compiled by jwz'
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 3b 3b 20 63 6f 6d 70 | 69 6c 65 64 20 62 79 20 |;;; comp|iled by |
|00000010| 6a 77 7a 40 74 68 61 6c | 69 64 6f 6d 69 64 65 20 |jwz@thal|idomide |
|00000020| 6f 6e 20 54 75 65 20 4a | 75 6e 20 33 30 20 32 33 |on Tue J|un 30 23|
|00000030| 3a 32 34 3a 34 34 20 31 | 39 39 32 0a 3b 3b 3b 20 |:24:44 1|992.;;; |
|00000040| 66 72 6f 6d 20 66 69 6c | 65 20 2f 63 61 64 69 6c |from fil|e /cadil|
|00000050| 6c 61 63 2d 74 68 2f 6a | 77 7a 2f 65 6d 61 63 73 |lac-th/j|wz/emacs|
|00000060| 31 39 2f 6c 69 73 70 2f | 70 61 63 6b 61 67 65 73 |19/lisp/|packages|
|00000070| 2f 74 65 72 6d 69 6e 61 | 6c 2e 65 6c 0a 3b 3b 3b |/termina|l.el.;;;|
|00000080| 20 65 6d 61 63 73 20 76 | 65 72 73 69 6f 6e 20 31 | emacs v|ersion 1|
|00000090| 39 2e 32 2e 31 20 4c 75 | 63 69 64 2e 0a 3b 3b 3b |9.2.1 Lu|cid..;;;|
|000000a0| 20 62 79 74 65 63 6f 6d | 70 20 76 65 72 73 69 6f | bytecom|p versio|
|000000b0| 6e 20 32 2e 30 37 3b 20 | 31 37 2d 6a 75 6e 2d 39 |n 2.07; |17-jun-9|
|000000c0| 32 2e 0a 3b 3b 3b 20 6f | 70 74 69 6d 69 7a 61 74 |2..;;; o|ptimizat|
|000000d0| 69 6f 6e 20 69 73 20 6f | 6e 2e 0a 3b 3b 3b 20 74 |ion is o|n..;;; t|
|000000e0| 68 69 73 20 66 69 6c 65 | 20 75 73 65 73 20 6f 70 |his file| uses op|
|000000f0| 63 6f 64 65 73 20 77 68 | 69 63 68 20 64 6f 20 6e |codes wh|ich do n|
|00000100| 6f 74 20 65 78 69 73 74 | 20 69 6e 20 45 6d 61 63 |ot exist| in Emac|
|00000110| 73 31 38 2e 0a 0a 28 69 | 66 20 28 61 6e 64 20 28 |s18...(i|f (and (|
|00000120| 62 6f 75 6e 64 70 20 27 | 65 6d 61 63 73 2d 76 65 |boundp '|emacs-ve|
|00000130| 72 73 69 6f 6e 29 0a 09 | 20 28 6f 72 20 28 61 6e |rsion)..| (or (an|
|00000140| 64 20 28 62 6f 75 6e 64 | 70 20 27 65 70 6f 63 68 |d (bound|p 'epoch|
|00000150| 3a 3a 76 65 72 73 69 6f | 6e 29 20 65 70 6f 63 68 |::versio|n) epoch|
|00000160| 3a 3a 76 65 72 73 69 6f | 6e 29 0a 09 20 20 20 20 |::versio|n).. |
|00000170| 20 28 73 74 72 69 6e 67 | 2d 6c 65 73 73 70 20 65 | (string|-lessp e|
|00000180| 6d 61 63 73 2d 76 65 72 | 73 69 6f 6e 20 22 31 39 |macs-ver|sion "19|
|00000190| 22 29 29 29 0a 20 20 20 | 20 28 65 72 72 6f 72 20 |"))). | (error |
|000001a0| 22 54 68 69 73 20 66 69 | 6c 65 20 77 61 73 20 63 |"This fi|le was c|
|000001b0| 6f 6d 70 69 6c 65 64 20 | 66 6f 72 20 45 6d 61 63 |ompiled |for Emac|
|000001c0| 73 31 39 2e 22 29 29 0a | 0a 28 62 79 74 65 2d 63 |s19.")).|.(byte-c|
|000001d0| 6f 64 65 20 22 c0 c1 21 | 88 c2 c3 21 87 22 20 5b |ode "..!|...!." [|
|000001e0| 70 72 6f 76 69 64 65 20 | 74 65 72 6d 69 6e 61 6c |provide |terminal|
|000001f0| 20 72 65 71 75 69 72 65 | 20 65 68 65 6c 70 5d 20 | require| ehelp] |
|00000200| 32 29 0a 28 64 65 66 76 | 61 72 20 74 65 72 6d 69 |2).(defv|ar termi|
|00000210| 6e 61 6c 2d 65 73 63 61 | 70 65 2d 63 68 61 72 20 |nal-esca|pe-char |
|00000220| 33 30 20 22 5c 0a 2a 41 | 6c 6c 20 63 68 61 72 61 |30 "\.*A|ll chara|
|00000230| 63 74 65 72 73 20 65 78 | 63 65 70 74 20 66 6f 72 |cters ex|cept for|
|00000240| 20 74 68 69 73 20 61 72 | 65 20 70 61 73 73 65 64 | this ar|e passed|
|00000250| 20 76 65 72 62 61 74 69 | 6d 20 74 68 72 6f 75 67 | verbati|m throug|
|00000260| 68 20 74 68 65 0a 74 65 | 72 6d 69 6e 61 6c 2d 65 |h the.te|rminal-e|
|00000270| 6d 75 6c 61 74 6f 72 2e | 20 20 54 68 69 73 20 63 |mulator.| This c|
|00000280| 68 61 72 61 63 74 65 72 | 20 61 63 74 73 20 61 73 |haracter| acts as|
|00000290| 20 61 20 70 72 65 66 69 | 78 20 66 6f 72 20 63 6f | a prefi|x for co|
|000002a0| 6d 6d 61 6e 64 73 0a 74 | 6f 20 74 68 65 20 65 6d |mmands.t|o the em|
|000002b0| 75 6c 61 74 6f 72 20 70 | 72 6f 67 72 61 6d 20 69 |ulator p|rogram i|
|000002c0| 74 73 65 6c 66 2e 20 20 | 54 79 70 65 20 74 68 69 |tself. |Type thi|
|000002d0| 73 20 63 68 61 72 61 63 | 74 65 72 20 74 77 69 63 |s charac|ter twic|
|000002e0| 65 20 74 6f 20 73 65 6e | 64 0a 69 74 20 74 68 72 |e to sen|d.it thr|
|000002f0| 6f 75 67 68 20 74 68 65 | 20 65 6d 75 6c 61 74 6f |ough the| emulato|
|00000300| 72 2e 20 20 54 79 70 65 | 20 3f 20 61 66 74 65 72 |r. Type| ? after|
|00000310| 20 74 79 70 69 6e 67 20 | 69 74 20 66 6f 72 20 61 | typing |it for a|
|00000320| 20 6c 69 73 74 20 6f 66 | 0a 70 6f 73 73 69 62 6c | list of|.possibl|
|00000330| 65 20 63 6f 6d 6d 61 6e | 64 73 2e 0a 54 68 69 73 |e comman|ds..This|
|00000340| 20 76 61 72 69 61 62 6c | 65 20 69 73 20 6c 6f 63 | variabl|e is loc|
|00000350| 61 6c 20 74 6f 20 65 61 | 63 68 20 74 65 72 6d 69 |al to ea|ch termi|
|00000360| 6e 61 6c 2d 65 6d 75 6c | 61 74 6f 72 20 62 75 66 |nal-emul|ator buf|
|00000370| 66 65 72 2e 22 29 0a 28 | 64 65 66 76 61 72 20 74 |fer.").(|defvar t|
|00000380| 65 72 6d 69 6e 61 6c 2d | 73 63 72 6f 6c 6c 69 6e |erminal-|scrollin|
|00000390| 67 20 74 20 22 5c 0a 2a | 49 66 20 6e 6f 6e 2d 6e |g t "\.*|If non-n|
|000003a0| 69 6c 2c 20 74 68 65 20 | 74 65 72 6d 69 6e 61 6c |il, the |terminal|
|000003b0| 2d 65 6d 75 6c 61 74 6f | 72 20 77 69 6c 6c 20 60 |-emulato|r will `|
|000003c0| 73 63 72 6f 6c 6c 27 20 | 77 68 65 6e 20 6f 75 74 |scroll' |when out|
|000003d0| 70 75 74 20 6f 63 63 75 | 72 73 0a 70 61 73 74 20 |put occu|rs.past |
|000003e0| 74 68 65 20 62 6f 74 74 | 6f 6d 20 6f 66 20 74 68 |the bott|om of th|
|000003f0| 65 20 73 63 72 65 65 6e | 2e 20 20 49 66 20 6e 69 |e screen|. If ni|
|00000400| 6c 2c 20 6f 75 74 70 75 | 74 20 77 69 6c 6c 20 60 |l, outpu|t will `|
|00000410| 77 72 61 70 27 20 74 6f | 20 74 68 65 20 74 6f 70 |wrap' to| the top|
|00000420| 0a 6f 66 20 74 68 65 20 | 73 63 72 65 65 6e 2e 0a |.of the |screen..|
|00000430| 54 68 69 73 20 76 61 72 | 69 61 62 6c 65 20 69 73 |This var|iable is|
|00000440| 20 6c 6f 63 61 6c 20 74 | 6f 20 65 61 63 68 20 74 | local t|o each t|
|00000450| 65 72 6d 69 6e 61 6c 2d | 65 6d 75 6c 61 74 6f 72 |erminal-|emulator|
|00000460| 20 62 75 66 66 65 72 2e | 22 29 0a 28 64 65 66 76 | buffer.|").(defv|
|00000470| 61 72 20 74 65 72 6d 69 | 6e 61 6c 2d 6d 6f 72 65 |ar termi|nal-more|
|00000480| 2d 70 72 6f 63 65 73 73 | 69 6e 67 20 74 20 22 5c |-process|ing t "\|
|00000490| 0a 2a 49 66 20 6e 6f 6e | 2d 6e 69 6c 2c 20 64 6f |.*If non|-nil, do|
|000004a0| 20 6d 6f 72 65 2d 70 72 | 6f 63 65 73 73 69 6e 67 | more-pr|ocessing|
|000004b0| 2e 0a 54 68 69 73 20 76 | 61 72 69 61 62 6c 65 20 |..This v|ariable |
|000004c0| 69 73 20 6c 6f 63 61 6c | 20 74 6f 20 65 61 63 68 |is local| to each|
|000004d0| 20 74 65 72 6d 69 6e 61 | 6c 2d 65 6d 75 6c 61 74 | termina|l-emulat|
|000004e0| 6f 72 20 62 75 66 66 65 | 72 2e 22 29 0a 28 64 65 |or buffe|r.").(de|
|000004f0| 66 76 61 72 20 74 65 72 | 6d 69 6e 61 6c 2d 72 65 |fvar ter|minal-re|
|00000500| 64 69 73 70 6c 61 79 2d | 69 6e 74 65 72 76 61 6c |display-|interval|
|00000510| 20 35 30 30 30 20 22 5c | 0a 2a 4d 61 78 69 6d 75 | 5000 "\|.*Maximu|
|00000520| 6d 20 6e 75 6d 62 65 72 | 20 6f 66 20 63 68 61 72 |m number| of char|
|00000530| 61 63 74 65 72 73 20 77 | 68 69 63 68 20 77 69 6c |acters w|hich wil|
|00000540| 6c 20 62 65 20 70 72 6f | 63 65 73 73 65 64 20 62 |l be pro|cessed b|
|00000550| 79 20 74 68 65 0a 74 65 | 72 6d 69 6e 61 6c 2d 65 |y the.te|rminal-e|
|00000560| 6d 75 6c 61 74 6f 72 20 | 62 65 66 6f 72 65 20 61 |mulator |before a|
|00000570| 20 73 63 72 65 65 6e 20 | 72 65 64 69 73 70 6c 61 | screen |redispla|
|00000580| 79 20 69 73 20 66 6f 72 | 63 65 64 2e 0a 53 65 74 |y is for|ced..Set|
|00000590| 20 74 68 69 73 20 74 6f | 20 61 20 6c 61 72 67 65 | this to| a large|
|000005a0| 20 76 61 6c 75 65 20 66 | 6f 72 20 67 72 65 61 74 | value f|or great|
|000005b0| 65 72 20 74 68 72 6f 75 | 67 68 70 75 74 2c 0a 73 |er throu|ghput,.s|
|000005c0| 65 74 20 69 74 20 73 6d | 61 6c 6c 65 72 20 66 6f |et it sm|aller fo|
|000005d0| 72 20 6d 6f 72 65 20 66 | 72 65 71 75 65 6e 74 20 |r more f|requent |
|000005e0| 75 70 64 61 74 65 73 20 | 62 75 74 20 6f 76 65 72 |updates |but over|
|000005f0| 61 6c 6c 20 73 6c 6f 77 | 65 72 0a 70 65 72 66 6f |all slow|er.perfo|
|00000600| 72 6d 61 6e 63 65 2e 22 | 29 0a 28 62 79 74 65 2d |rmance."|).(byte-|
|00000610| 63 6f 64 65 20 22 c0 c1 | 21 ac 82 c2 11 c0 c3 21 |code "..|!......!|
|00000620| ac 82 c4 13 c0 c5 21 ac | 82 c4 15 c0 c6 21 ac 83 |......!.|.....!..|
|00000630| c4 16 06 0d ac a4 c7 20 | c8 1e 09 1e 5c 6e 0e 09 |....... |....\n..|
|00000640| cb 57 ab 93 cc 0e 5c 6e | cd ce 0e 09 5c 22 cf 23 |.W....\n|....\".#|
|00000650| 88 0e 09 54 89 16 09 aa | 69 0e 5c 6e 15 2a 0b 84 |...T....|i.\n.*..|
|00000660| ce 00 c7 20 c8 1e 09 1e | 5c 6e 0e 09 cb 57 ab 93 |... ....|\n...W..|
|00000670| cc 0e 5c 6e cd ce 0e 09 | 5c 22 d0 23 88 0e 09 54 |..\n....|\".#...T|
|00000680| 89 16 09 aa 69 d1 1e 12 | 0e 12 c8 48 d3 58 ab 94 |....i...|...H.X..|
|00000690| cc 0e 5c 6e 0e 12 d4 23 | 88 0e 12 c8 0e 12 c8 48 |..\n...#|.......H|
|000006a0| 54 49 88 aa 64 29 cc 0e | 5c 6e d5 d6 23 88 cc 0e |TI..d)..|\n..#...|
|000006b0| 5c 6e d7 d8 23 88 cc 0e | 5c 6e d9 da 23 88 cc 0e |\n..#...|\n..#...|
|000006c0| 5c 6e db dc 23 88 cc 0e | 5c 6e dd de 23 88 cc 0e |\n..#...|\n..#...|
|000006d0| 5c 6e df e0 23 88 cc 0e | 5c 6e e1 e2 23 88 cc 0e |\n..#...|\n..#...|
|000006e0| 5c 6e e3 e4 23 88 cc 0e | 5c 6e e5 0e 26 21 e4 23 |\n..#...|\n..&!.#|
|000006f0| 88 0e 5c 6e 13 2a c0 e7 | 21 ac 83 c4 16 27 0e 27 |..\n.*..|!....'.'|
|00000700| ac 83 e8 16 27 0e 06 ac | cb c7 20 c8 1e 09 1e 5c |....'...|.. ....\|
|00000710| 6e 0e 09 cb 57 ab 93 cc | 0e 5c 6e cd ce 0e 09 5c |n...W...|.\n....\|
|00000720| 22 e9 23 88 0e 09 54 89 | 16 09 aa 69 cc 0e 5c 6e |".#...T.|...i..\n|
|00000730| e5 0e 26 21 ea 23 88 cc | 0e 5c 6e eb ec 23 88 cc |..&!.#..|.\n..#..|
|00000740| 0e 5c 6e db dc 23 88 cc | 0e 5c 6e dd ed 23 88 cc |.\n..#..|.\n..#..|
|00000750| 0e 5c 6e ee ef 23 88 0e | 5c 6e 16 06 2a f0 f1 4d |.\n..#..|\n..*..M|
|00000760| 87 22 20 5b 62 6f 75 6e | 64 70 20 74 65 72 6d 69 |." [boun|dp termi|
|00000770| 6e 61 6c 2d 6d 6f 72 65 | 2d 62 72 65 61 6b 2d 69 |nal-more|-break-i|
|00000780| 6e 73 65 72 74 69 6f 6e | 20 22 2a 2a 2a 20 4d 6f |nsertion| "*** Mo|
|00000790| 72 65 20 62 72 65 61 6b | 20 2d 2d 20 50 72 65 73 |re break| -- Pres|
|000007a0| 73 20 73 70 61 63 65 20 | 74 6f 20 63 6f 6e 74 69 |s space |to conti|
|000007b0| 6e 75 65 20 2a 2a 2a 22 | 20 74 65 72 6d 69 6e 61 |nue ***"| termina|
|000007c0| 6c 2d 65 73 63 61 70 65 | 2d 6d 61 70 20 6e 69 6c |l-escape|-map nil|
|000007d0| 20 74 65 72 6d 69 6e 61 | 6c 2d 6d 61 70 20 74 65 | termina|l-map te|
|000007e0| 72 6d 69 6e 61 6c 2d 6d | 6f 72 65 2d 62 72 65 61 |rminal-m|ore-brea|
|000007f0| 6b 2d 6d 61 70 20 6d 61 | 6b 65 2d 6b 65 79 6d 61 |k-map ma|ke-keyma|
|00000800| 70 20 30 20 69 20 6d 61 | 70 20 31 32 38 20 64 65 |p 0 i ma|p 128 de|
|00000810| 66 69 6e 65 2d 6b 65 79 | 20 6d 61 6b 65 2d 73 74 |fine-key| make-st|
|00000820| 72 69 6e 67 20 31 20 74 | 65 2d 70 61 73 73 2d 74 |ring 1 t|e-pass-t|
|00000830| 68 72 6f 75 67 68 20 75 | 6e 64 65 66 69 6e 65 64 |hrough u|ndefined|
|00000840| 20 22 30 22 20 73 20 35 | 37 20 64 69 67 69 74 2d | "0" s 5|7 digit-|
|00000850| 61 72 67 75 6d 65 6e 74 | 20 22 62 22 20 73 77 69 |argument| "b" swi|
|00000860| 74 63 68 2d 74 6f 2d 62 | 75 66 66 65 72 20 22 6f |tch-to-b|uffer "o|
|00000870| 22 20 6f 74 68 65 72 2d | 77 69 6e 64 6f 77 20 22 |" other-|window "|
|00000880| 65 22 20 74 65 2d 73 65 | 74 2d 65 73 63 61 70 65 |e" te-se|t-escape|
|00000890| 2d 63 68 61 72 20 22 0c | 22 20 72 65 64 72 61 77 |-char ".|" redraw|
|000008a0| 2d 64 69 73 70 6c 61 79 | 20 22 0f 22 20 74 65 2d |-display| "." te-|
|000008b0| 66 6c 75 73 68 2d 70 65 | 6e 64 69 6e 67 2d 6f 75 |flush-pe|nding-ou|
|000008c0| 74 70 75 74 20 22 6d 22 | 20 74 65 2d 74 6f 67 67 |tput "m"| te-togg|
|000008d0| 6c 65 2d 6d 6f 72 65 2d | 70 72 6f 63 65 73 73 69 |le-more-|processi|
|000008e0| 6e 67 20 22 78 22 20 74 | 65 2d 65 73 63 61 70 65 |ng "x" t|e-escape|
|000008f0| 2d 65 78 74 65 6e 64 65 | 64 2d 63 6f 6d 6d 61 6e |-extende|d-comman|
|00000900| 64 20 22 3f 22 20 74 65 | 2d 65 73 63 61 70 65 2d |d "?" te|-escape-|
|00000910| 68 65 6c 70 20 63 68 61 | 72 2d 74 6f 2d 73 74 72 |help cha|r-to-str|
|00000920| 69 6e 67 20 68 65 6c 70 | 2d 63 68 61 72 20 74 65 |ing help|-char te|
|00000930| 2d 65 73 63 61 70 65 2d | 63 6f 6d 6d 61 6e 64 2d |-escape-|command-|
|00000940| 61 6c 69 73 74 20 28 28 | 22 53 65 74 20 45 73 63 |alist ((|"Set Esc|
|00000950| 61 70 65 20 43 68 61 72 | 61 63 74 65 72 22 20 2e |ape Char|acter" .|
|00000960| 20 74 65 2d 73 65 74 2d | 65 73 63 61 70 65 2d 63 | te-set-|escape-c|
|00000970| 68 61 72 29 20 28 22 52 | 65 66 72 65 73 68 22 20 |har) ("R|efresh" |
|00000980| 2e 20 72 65 64 72 61 77 | 2d 64 69 73 70 6c 61 79 |. redraw|-display|
|00000990| 29 20 28 22 52 65 63 6f | 72 64 20 4f 75 74 70 75 |) ("Reco|rd Outpu|
|000009a0| 74 22 20 2e 20 74 65 2d | 73 65 74 2d 6f 75 74 70 |t" . te-|set-outp|
|000009b0| 75 74 2d 6c 6f 67 29 20 | 28 22 50 68 6f 74 6f 22 |ut-log) |("Photo"|
|000009c0| 20 2e 20 74 65 2d 73 65 | 74 2d 6f 75 74 70 75 74 | . te-se|t-output|
|000009d0| 2d 6c 6f 67 29 20 28 22 | 54 6f 66 75 22 20 2e 20 |-log) ("|Tofu" . |
|000009e0| 74 65 2d 74 6f 66 75 29 | 20 28 22 53 74 75 66 66 |te-tofu)| ("Stuff|
|000009f0| 20 49 6e 70 75 74 22 20 | 2e 20 74 65 2d 73 74 75 | Input" |. te-stu|
|00000a00| 66 66 2d 73 74 72 69 6e | 67 29 20 28 22 46 6c 75 |ff-strin|g) ("Flu|
|00000a10| 73 68 20 50 65 6e 64 69 | 6e 67 20 4f 75 74 70 75 |sh Pendi|ng Outpu|
|00000a20| 74 22 20 2e 20 74 65 2d | 66 6c 75 73 68 2d 70 65 |t" . te-|flush-pe|
|00000a30| 6e 64 69 6e 67 2d 6f 75 | 74 70 75 74 29 20 28 22 |nding-ou|tput) ("|
|00000a40| 45 6e 61 62 6c 65 20 4d | 6f 72 65 20 50 72 6f 63 |Enable M|ore Proc|
|00000a50| 65 73 73 69 6e 67 22 20 | 2e 20 74 65 2d 65 6e 61 |essing" |. te-ena|
|00000a60| 62 6c 65 2d 6d 6f 72 65 | 2d 70 72 6f 63 65 73 73 |ble-more|-process|
|00000a70| 69 6e 67 29 20 28 22 44 | 69 73 61 62 6c 65 20 4d |ing) ("D|isable M|
|00000a80| 6f 72 65 20 50 72 6f 63 | 65 73 73 69 6e 67 22 20 |ore Proc|essing" |
|00000a90| 2e 20 74 65 2d 64 69 73 | 61 62 6c 65 2d 6d 6f 72 |. te-dis|able-mor|
|00000aa0| 65 2d 70 72 6f 63 65 73 | 73 69 6e 67 29 20 28 22 |e-proces|sing) ("|
|00000ab0| 53 63 72 6f 6c 6c 20 61 | 74 20 65 6e 64 20 6f 66 |Scroll a|t end of|
|00000ac0| 20 70 61 67 65 22 20 2e | 20 74 65 2d 64 6f 2d 73 | page" .| te-do-s|
|00000ad0| 63 72 6f 6c 6c 69 6e 67 | 29 20 28 22 57 72 61 70 |crolling|) ("Wrap|
|00000ae0| 20 61 74 20 65 6e 64 20 | 6f 66 20 70 61 67 65 22 | at end |of page"|
|00000af0| 20 2e 20 74 65 2d 64 6f | 2d 77 72 61 70 70 69 6e | . te-do|-wrappin|
|00000b00| 67 29 20 28 22 53 77 69 | 74 63 68 20 54 6f 20 42 |g) ("Swi|tch To B|
|00000b10| 75 66 66 65 72 22 20 2e | 20 73 77 69 74 63 68 2d |uffer" .| switch-|
|00000b20| 74 6f 2d 62 75 66 66 65 | 72 29 20 28 22 4f 74 68 |to-buffe|r) ("Oth|
|00000b30| 65 72 20 57 69 6e 64 6f | 77 22 20 2e 20 6f 74 68 |er Windo|w" . oth|
|00000b40| 65 72 2d 77 69 6e 64 6f | 77 29 20 28 22 4b 69 6c |er-windo|w) ("Kil|
|00000b50| 6c 20 42 75 66 66 65 72 | 22 20 2e 20 6b 69 6c 6c |l Buffer|" . kill|
|00000b60| 2d 62 75 66 66 65 72 29 | 20 28 22 48 65 6c 70 22 |-buffer)| ("Help"|
|00000b70| 20 2e 20 74 65 2d 65 73 | 63 61 70 65 2d 68 65 6c | . te-es|cape-hel|
|00000b80| 70 29 20 28 22 53 65 74 | 20 52 65 64 69 73 70 6c |p) ("Set| Redispl|
|00000b90| 61 79 20 49 6e 74 65 72 | 76 61 6c 22 20 2e 20 74 |ay Inter|val" . t|
|00000ba0| 65 2d 73 65 74 2d 72 65 | 64 69 73 70 6c 61 79 2d |e-set-re|display-|
|00000bb0| 69 6e 74 65 72 76 61 6c | 29 29 20 74 65 2d 6d 6f |interval|)) te-mo|
|00000bc0| 72 65 2d 62 72 65 61 6b | 2d 75 6e 72 65 61 64 20 |re-break|-unread |
|00000bd0| 74 65 2d 6d 6f 72 65 2d | 62 72 65 61 6b 2d 68 65 |te-more-|break-he|
|00000be0| 6c 70 20 22 20 22 20 74 | 65 2d 6d 6f 72 65 2d 62 |lp " " t|e-more-b|
|00000bf0| 72 65 61 6b 2d 72 65 73 | 75 6d 65 20 74 65 2d 6d |reak-res|ume te-m|
|00000c00| 6f 72 65 2d 62 72 65 61 | 6b 2d 66 6c 75 73 68 2d |ore-brea|k-flush-|
|00000c10| 70 65 6e 64 69 6e 67 2d | 6f 75 74 70 75 74 20 22 |pending-|output "|
|00000c20| 0d 22 20 74 65 2d 6d 6f | 72 65 2d 62 72 65 61 6b |." te-mo|re-break|
|00000c30| 2d 61 64 76 61 6e 63 65 | 2d 6f 6e 65 2d 6c 69 6e |-advance|-one-lin|
|00000c40| 65 20 74 65 2d 65 73 63 | 61 70 65 20 23 5b 6e 69 |e te-esc|ape #[ni|
|00000c50| 6c 20 22 c0 c1 20 c2 20 | 1b 1c 1d c6 8e c7 0e 08 |l ".. . |........|
|00000c60| 21 88 c9 0e 08 21 88 ca | 0e 0b ab 89 cc cd ce 0e |!....!..|........|
|00000c70| 0b 21 5c 22 aa 81 cf 21 | 15 29 d0 d1 21 88 0d d2 |.!\"...!|.)..!...|
|00000c80| d3 0e 14 5c 22 98 ab 8c | 0e 14 16 15 d6 1e 14 d7 |...\"...|........|
|00000c90| 20 29 aa 8c d8 0e 08 0d | 5c 22 89 15 ad 83 d9 0d | )......|\"......|
|00000ca0| 21 2b 87 22 20 5b 6e 69 | 6c 20 63 75 72 72 65 6e |!+." [ni|l curren|
|00000cb0| 74 2d 6c 6f 63 61 6c 2d | 6d 61 70 20 63 75 72 72 |t-local-|map curr|
|00000cc0| 65 6e 74 2d 67 6c 6f 62 | 61 6c 2d 6d 61 70 20 67 |ent-glob|al-map g|
|00000cd0| 6c 6f 62 61 6c 20 6c 6f | 63 61 6c 20 73 20 28 28 |lobal lo|cal s ((|
|00000ce0| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 09 21 88 c2 |byte-cod|e "..!..|
|00000cf0| 0b 21 87 22 20 5b 75 73 | 65 2d 67 6c 6f 62 61 6c |.!." [us|e-global|
|00000d00| 2d 6d 61 70 20 67 6c 6f | 62 61 6c 20 75 73 65 2d |-map glo|bal use-|
|00000d10| 6c 6f 63 61 6c 2d 6d 61 | 70 20 6c 6f 63 61 6c 5d |local-ma|p local]|
|00000d20| 20 32 29 29 20 75 73 65 | 2d 67 6c 6f 62 61 6c 2d | 2)) use|-global-|
|00000d30| 6d 61 70 20 74 65 72 6d | 69 6e 61 6c 2d 65 73 63 |map term|inal-esc|
|00000d40| 61 70 65 2d 6d 61 70 20 | 75 73 65 2d 6c 6f 63 61 |ape-map |use-loca|
|00000d50| 6c 2d 6d 61 70 20 72 65 | 61 64 2d 6b 65 79 2d 73 |l-map re|ad-key-s|
|00000d60| 65 71 75 65 6e 63 65 20 | 70 72 65 66 69 78 2d 61 |equence |prefix-a|
|00000d70| 72 67 20 66 6f 72 6d 61 | 74 20 22 45 6d 61 63 73 |rg forma|t "Emacs|
|00000d80| 20 54 65 72 6d 69 6e 61 | 6c 20 65 73 63 61 70 65 | Termina|l escape|
|00000d90| 3e 20 25 64 20 22 20 70 | 72 65 66 69 78 2d 6e 75 |> %d " p|refix-nu|
|00000da0| 6d 65 72 69 63 2d 76 61 | 6c 75 65 20 22 45 6d 61 |meric-va|lue "Ema|
|00000db0| 63 73 20 54 65 72 6d 69 | 6e 61 6c 20 65 73 63 61 |cs Termi|nal esca|
|00000dc0| 70 65 3e 20 22 20 6d 65 | 73 73 61 67 65 20 22 22 |pe> " me|ssage ""|
|00000dd0| 20 6d 61 6b 65 2d 73 74 | 72 69 6e 67 20 31 20 74 | make-st|ring 1 t|
|00000de0| 65 72 6d 69 6e 61 6c 2d | 65 73 63 61 70 65 2d 63 |erminal-|escape-c|
|00000df0| 68 61 72 20 6c 61 73 74 | 2d 63 6f 6d 6d 61 6e 64 |har last|-command|
|00000e00| 2d 63 68 61 72 20 2d 32 | 35 39 20 74 65 2d 70 61 |-char -2|59 te-pa|
|00000e10| 73 73 2d 74 68 72 6f 75 | 67 68 20 6c 6f 6f 6b 75 |ss-throu|gh looku|
|00000e20| 70 2d 6b 65 79 20 63 61 | 6c 6c 2d 69 6e 74 65 72 |p-key ca|ll-inter|
|00000e30| 61 63 74 69 76 65 6c 79 | 5d 20 35 20 6e 69 6c 20 |actively|] 5 nil |
|00000e40| 6e 69 6c 5d 5d 20 36 29 | 0a 28 66 73 65 74 20 27 |nil]] 6)|.(fset '|
|00000e50| 74 65 2d 65 73 63 61 70 | 65 2d 68 65 6c 70 20 23 |te-escap|e-help #|
|00000e60| 5b 6e 69 6c 20 22 c0 c1 | 21 88 c2 0b 21 1c c5 c6 |[nil "..|!...!...|
|00000e70| 21 29 87 22 20 5b 6d 65 | 73 73 61 67 65 20 22 54 |!)." [me|ssage "T|
|00000e80| 65 72 6d 69 6e 61 6c 20 | 65 6d 75 6c 61 74 6f 72 |erminal |emulator|
|00000e90| 20 65 73 63 61 70 65 20 | 68 65 6c 70 2e 2e 2e 22 | escape |help..."|
|00000ea0| 20 73 69 6e 67 6c 65 2d | 6b 65 79 2d 64 65 73 63 | single-|key-desc|
|00000eb0| 72 69 70 74 69 6f 6e 20 | 74 65 72 6d 69 6e 61 6c |ription |terminal|
|00000ec0| 2d 65 73 63 61 70 65 2d | 63 68 61 72 20 63 68 61 |-escape-|char cha|
|00000ed0| 72 20 77 69 74 68 2d 65 | 6c 65 63 74 72 69 63 2d |r with-e|lectric-|
|00000ee0| 68 65 6c 70 20 23 5b 6e | 69 6c 20 22 c0 c1 c2 0b |help #[n|il "....|
|00000ef0| 89 89 89 25 21 88 c0 c4 | c5 21 21 88 c0 c1 c6 c7 |...%!...|.!!.....|
|00000f00| c8 0e 09 ca cb 24 c8 23 | 21 88 cc cd 21 ab 89 cd |.....$.#|!...!...|
|00000f10| ce 0e 0f 21 d0 5c 22 aa | 87 d1 ce 0e 0f 21 d2 5c |...!.\".|.....!.\|
|00000f20| 22 89 1e 13 ab bb d4 0e | 13 40 41 21 ae 81 d5 1e |".......|.@A!....|
|00000f30| 16 d7 d8 0e 16 5c 22 ab | 88 0e 16 d9 89 94 4f 16 |.....\".|......O.|
|00000f40| 16 c0 da 21 88 c0 0e 13 | 40 40 21 88 c0 db 21 88 |...!....|@@!...!.|
|00000f50| c0 0e 16 21 88 dc dd 21 | 88 29 0e 13 41 89 16 13 |...!...!|.)..A...|
|00000f60| ac 45 29 ca 87 22 20 5b | 70 72 69 6e 63 20 66 6f |.E).." [|princ fo|
|00000f70| 72 6d 61 74 20 22 54 65 | 72 6d 69 6e 61 6c 2d 65 |rmat "Te|rminal-e|
|00000f80| 6d 75 6c 61 74 6f 72 20 | 65 73 63 61 70 65 2c 20 |mulator |escape, |
|00000f90| 69 6e 76 6f 6b 65 64 20 | 62 79 20 5c 22 25 73 5c |invoked |by \"%s\|
|00000fa0| 22 5c 6e 54 79 70 65 20 | 5c 22 25 73 5c 22 20 74 |"\nType |\"%s\" t|
|00000fb0| 77 69 63 65 20 74 6f 20 | 73 65 6e 64 20 61 20 73 |wice to |send a s|
|00000fc0| 69 6e 67 6c 65 20 5c 22 | 25 73 5c 22 20 74 68 72 |ingle \"|%s\" thr|
|00000fd0| 6f 75 67 68 2e 5c 6e 5c | 6e 4f 74 68 65 72 20 63 |ough.\n\|nOther c|
|00000fe0| 68 61 72 73 20 66 6f 6c | 6c 6f 77 69 6e 67 20 5c |hars fol|lowing \|
|00000ff0| 22 25 73 5c 22 20 61 72 | 65 20 69 6e 74 65 72 70 |"%s\" ar|e interp|
|00001000| 72 65 74 65 64 20 61 73 | 20 66 6f 6c 6c 6f 77 73 |reted as| follows|
|00001010| 3a 5c 6e 22 20 63 68 61 | 72 20 73 75 62 73 74 69 |:\n" cha|r substi|
|00001020| 74 75 74 65 2d 63 6f 6d | 6d 61 6e 64 2d 6b 65 79 |tute-com|mand-key|
|00001030| 73 20 22 5c 5c 7b 74 65 | 72 6d 69 6e 61 6c 2d 65 |s "\\{te|rminal-e|
|00001040| 73 63 61 70 65 2d 6d 61 | 70 7d 5c 6e 22 20 22 5c |scape-ma|p}\n" "\|
|00001050| 6e 53 75 62 63 6f 6d 6d | 61 6e 64 73 20 6f 66 20 |nSubcomm|ands of |
|00001060| 5c 22 25 73 5c 22 20 28 | 25 73 29 5c 6e 22 20 77 |\"%s\" (|%s)\n" w|
|00001070| 68 65 72 65 2d 69 73 2d | 69 6e 74 65 72 6e 61 6c |here-is-|internal|
|00001080| 20 74 65 2d 65 73 63 61 | 70 65 2d 65 78 74 65 6e | te-esca|pe-exten|
|00001090| 64 65 64 2d 63 6f 6d 6d | 61 6e 64 20 74 65 72 6d |ded-comm|and term|
|000010a0| 69 6e 61 6c 2d 65 73 63 | 61 70 65 2d 6d 61 70 20 |inal-esc|ape-map |
|000010b0| 6e 69 6c 20 74 20 66 62 | 6f 75 6e 64 70 20 73 6f |nil t fb|oundp so|
|000010c0| 72 74 63 61 72 20 63 6f | 70 79 2d 73 65 71 75 65 |rtcar co|py-seque|
|000010d0| 6e 63 65 20 74 65 2d 65 | 73 63 61 70 65 2d 63 6f |nce te-e|scape-co|
|000010e0| 6d 6d 61 6e 64 2d 61 6c | 69 73 74 20 73 74 72 69 |mmand-al|ist stri|
|000010f0| 6e 67 3c 20 73 6f 72 74 | 20 23 5b 28 61 20 62 29 |ng< sort| #[(a b)|
|00001100| 20 22 08 40 09 40 99 87 | 22 20 5b 61 20 62 5d 20 | ".@.@..|" [a b] |
|00001110| 32 5d 20 6c 20 64 6f 63 | 75 6d 65 6e 74 61 74 69 |2] l doc|umentati|
|00001120| 6f 6e 20 22 4e 6f 74 20 | 64 6f 63 75 6d 65 6e 74 |on "Not |document|
|00001130| 65 64 22 20 64 6f 63 20 | 73 74 72 69 6e 67 2d 6d |ed" doc |string-m|
|00001140| 61 74 63 68 20 22 5c 6e | 22 20 30 20 22 20 20 5c |atch "\n|" 0 " \|
|00001150| 22 22 20 22 5c 22 3a 5c | 6e 20 20 20 20 20 22 20 |"" "\":\|n " |
|00001160| 77 72 69 74 65 2d 63 68 | 61 72 20 31 30 5d 20 39 |write-ch|ar 10] 9|
|00001170| 5d 5d 20 32 20 22 5c 0a | 50 72 6f 76 69 64 65 20 |]] 2 "\.|Provide |
|00001180| 68 65 6c 70 20 6f 6e 20 | 63 6f 6d 6d 61 6e 64 73 |help on |commands|
|00001190| 20 61 76 61 69 6c 61 62 | 6c 65 20 61 66 74 65 72 | availab|le after|
|000011a0| 20 74 65 72 6d 69 6e 61 | 6c 2d 65 73 63 61 70 65 | termina|l-escape|
|000011b0| 2d 63 68 61 72 20 69 73 | 20 74 79 70 65 64 2e 22 |-char is| typed."|
|000011c0| 20 6e 69 6c 5d 29 0a 28 | 62 79 74 65 2d 63 6f 64 | nil]).(|byte-cod|
|000011d0| 65 20 22 c0 c1 4d 88 c2 | c3 4d 87 22 20 5b 74 65 |e "..M..|.M." [te|
|000011e0| 2d 65 73 63 61 70 65 2d | 65 78 74 65 6e 64 65 64 |-escape-|extended|
|000011f0| 2d 63 6f 6d 6d 61 6e 64 | 20 23 5b 6e 69 6c 20 22 |-command| #[nil "|
|00001200| c0 19 c2 c3 0c c5 c0 24 | 29 89 1e 06 ad 83 c7 c8 |.......$|).......|
|00001210| 8d 29 87 22 20 5b 74 20 | 63 6f 6d 70 6c 65 74 69 |.)." [t |completi|
|00001220| 6f 6e 2d 69 67 6e 6f 72 | 65 2d 63 61 73 65 20 63 |on-ignor|e-case c|
|00001230| 6f 6d 70 6c 65 74 69 6e | 67 2d 72 65 61 64 20 22 |ompletin|g-read "|
|00001240| 74 65 72 6d 69 6e 61 6c | 20 63 6f 6d 6d 61 6e 64 |terminal| command|
|00001250| 3a 20 22 20 74 65 2d 65 | 73 63 61 70 65 2d 63 6f |: " te-e|scape-co|
|00001260| 6d 6d 61 6e 64 2d 61 6c | 69 73 74 20 6e 69 6c 20 |mmand-al|ist nil |
|00001270| 63 20 66 6f 6f 20 28 62 | 79 74 65 2d 63 6f 64 65 |c foo (b|yte-code|
|00001280| 20 22 08 97 10 09 1a 5c | 6e ad 9a 08 5c 6e 40 40 | ".....\|n...\n@@|
|00001290| 97 98 ab 8b c3 c4 c5 5c | 6e 40 41 21 5c 22 88 aa |.......\|n@A!\"..|
|000012a0| 6a 5c 6e 41 89 12 ac 67 | c6 29 87 22 20 5b 63 20 |j\nA...g|.)." [c |
|000012b0| 74 65 2d 65 73 63 61 70 | 65 2d 63 6f 6d 6d 61 6e |te-escap|e-comman|
|000012c0| 64 2d 61 6c 69 73 74 20 | 6c 20 74 68 72 6f 77 20 |d-alist |l throw |
|000012d0| 66 6f 6f 20 63 61 6c 6c | 2d 69 6e 74 65 72 61 63 |foo call|-interac|
|000012e0| 74 69 76 65 6c 79 20 6e | 69 6c 5d 20 35 29 5d 20 |tively n|il] 5)] |
|000012f0| 36 20 6e 69 6c 20 6e 69 | 6c 5d 20 74 65 2d 65 73 |6 nil ni|l] te-es|
|00001300| 63 61 70 65 2d 65 78 74 | 65 6e 64 65 64 2d 63 6f |cape-ext|ended-co|
|00001310| 6d 6d 61 6e 64 2d 75 6e | 72 65 61 64 20 23 5b 6e |mmand-un|read #[n|
|00001320| 69 6c 20 22 08 11 c2 20 | 87 22 20 5b 6c 61 73 74 |il "... |." [last|
|00001330| 2d 63 6f 6d 6d 61 6e 64 | 2d 65 76 65 6e 74 20 75 |-command|-event u|
|00001340| 6e 72 65 61 64 2d 63 6f | 6d 6d 61 6e 64 2d 65 76 |nread-co|mmand-ev|
|00001350| 65 6e 74 20 74 65 2d 65 | 73 63 61 70 65 2d 65 78 |ent te-e|scape-ex|
|00001360| 74 65 6e 64 65 64 2d 63 | 6f 6d 6d 61 6e 64 5d 20 |tended-c|ommand] |
|00001370| 31 20 6e 69 6c 20 6e 69 | 6c 5d 5d 20 32 29 0a 28 |1 nil ni|l]] 2).(|
|00001380| 66 73 65 74 20 27 74 65 | 2d 73 65 74 2d 65 73 63 |fset 'te|-set-esc|
|00001390| 61 70 65 2d 63 68 61 72 | 20 23 5b 28 63 29 20 22 |ape-char| #[(c) "|
|000013a0| 08 19 c2 09 0b 55 ab 83 | c4 aa 81 c5 c6 0b 21 c6 |.....U..|......!.|
|000013b0| 09 21 23 88 0b 89 10 29 | 87 22 20 5b 74 65 72 6d |.!#....)|." [term|
|000013c0| 69 6e 61 6c 2d 65 73 63 | 61 70 65 2d 63 68 61 72 |inal-esc|ape-char|
|000013d0| 20 6f 20 6d 65 73 73 61 | 67 65 20 63 20 22 5c 22 | o messa|ge c "\"|
|000013e0| 25 73 5c 22 20 69 73 20 | 65 73 63 61 70 65 20 63 |%s\" is |escape c|
|000013f0| 68 61 72 22 20 22 5c 22 | 25 73 5c 22 20 69 73 20 |har" "\"|%s\" is |
|00001400| 6e 6f 77 20 65 73 63 61 | 70 65 3b 20 5c 22 25 73 |now esca|pe; \"%s|
|00001410| 5c 22 20 70 61 73 73 65 | 73 20 74 68 6f 75 67 68 |\" passe|s though|
|00001420| 22 20 73 69 6e 67 6c 65 | 2d 6b 65 79 2d 64 65 73 |" single|-key-des|
|00001430| 63 72 69 70 74 69 6f 6e | 5d 20 35 20 22 5c 0a 43 |cription|] 5 "\.C|
|00001440| 68 61 6e 67 65 20 74 68 | 65 20 74 65 72 6d 69 6e |hange th|e termin|
|00001450| 61 6c 2d 65 6d 75 6c 61 | 74 6f 72 20 65 73 63 61 |al-emula|tor esca|
|00001460| 70 65 20 63 68 61 72 61 | 63 74 65 72 2e 22 20 22 |pe chara|cter." "|
|00001470| 63 53 65 74 20 65 73 63 | 61 70 65 20 63 68 61 72 |cSet esc|ape char|
|00001480| 61 63 74 65 72 20 74 6f | 3a 20 22 5d 29 0a 28 66 |acter to|: "]).(f|
|00001490| 73 65 74 20 27 74 65 2d | 73 74 75 66 66 2d 73 74 |set 'te-|stuff-st|
|000014a0| 72 69 6e 67 20 23 5b 28 | 73 74 72 69 6e 67 29 20 |ring #[(|string) |
|000014b0| 22 c0 09 5c 6e 5c 22 87 | 22 20 5b 70 72 6f 63 65 |"..\n\".|" [proce|
|000014c0| 73 73 2d 73 65 6e 64 2d | 73 74 72 69 6e 67 20 74 |ss-send-|string t|
|000014d0| 65 2d 70 72 6f 63 65 73 | 73 20 73 74 72 69 6e 67 |e-proces|s string|
|000014e0| 5d 20 33 20 22 5c 0a 52 | 65 61 64 20 61 20 73 74 |] 3 "\.R|ead a st|
|000014f0| 72 69 6e 67 20 74 6f 20 | 73 65 6e 64 20 74 6f 20 |ring to |send to |
|00001500| 74 68 72 6f 75 67 68 20 | 74 68 65 20 74 65 72 6d |through |the term|
|00001510| 69 6e 61 6c 20 65 6d 75 | 6c 61 74 6f 72 0a 61 73 |inal emu|lator.as|
|00001520| 20 74 68 6f 75 67 68 20 | 74 68 61 74 20 73 74 72 | though |that str|
|00001530| 69 6e 67 20 68 61 64 20 | 62 65 65 6e 20 74 79 70 |ing had |been typ|
|00001540| 65 64 20 6f 6e 20 74 68 | 65 20 6b 65 79 62 6f 61 |ed on th|e keyboa|
|00001550| 72 64 2e 0a 0a 56 65 72 | 79 20 70 6f 6f 72 20 6d |rd...Ver|y poor m|
|00001560| 61 6e 27 73 20 66 69 6c | 65 20 74 72 61 6e 73 66 |an's fil|e transf|
|00001570| 65 72 20 70 72 6f 74 6f | 63 6f 6c 2e 22 20 22 73 |er proto|col." "s|
|00001580| 53 74 75 66 66 20 73 74 | 72 69 6e 67 3a 20 22 5d |Stuff st|ring: "]|
|00001590| 29 0a 28 66 73 65 74 20 | 27 74 65 2d 73 65 74 2d |).(fset |'te-set-|
|000015a0| 6f 75 74 70 75 74 2d 6c | 6f 67 20 23 5b 28 6e 61 |output-l|og #[(na|
|000015b0| 6d 65 29 20 22 08 ab 85 | 08 c1 9a ab 86 c2 13 c4 |me) "...|........|
|000015c0| c5 21 87 c6 08 21 ac 91 | 8a c7 08 21 71 88 c8 20 |.!...!..|...!q.. |
|000015d0| 88 c9 70 21 88 ca 20 88 | 29 c6 08 21 13 c4 cb cc |..p!.. .|)..!....|
|000015e0| 0b 21 5c 22 87 22 20 5b | 6e 61 6d 65 20 22 22 20 |.!\"." [|name "" |
|000015f0| 6e 69 6c 20 74 65 2d 6c | 6f 67 2d 62 75 66 66 65 |nil te-l|og-buffe|
|00001600| 72 20 6d 65 73 73 61 67 | 65 20 22 4f 75 74 70 75 |r messag|e "Outpu|
|00001610| 74 20 6c 6f 67 67 69 6e | 67 20 6f 66 66 2e 22 20 |t loggin|g off." |
|00001620| 67 65 74 2d 62 75 66 66 | 65 72 20 67 65 74 2d 62 |get-buff|er get-b|
|00001630| 75 66 66 65 72 2d 63 72 | 65 61 74 65 20 66 75 6e |uffer-cr|eate fun|
|00001640| 64 61 6d 65 6e 74 61 6c | 2d 6d 6f 64 65 20 62 75 |damental|-mode bu|
|00001650| 66 66 65 72 2d 64 69 73 | 61 62 6c 65 2d 75 6e 64 |ffer-dis|able-und|
|00001660| 6f 20 65 72 61 73 65 2d | 62 75 66 66 65 72 20 22 |o erase-|buffer "|
|00001670| 52 65 63 6f 72 64 69 6e | 67 20 74 65 72 6d 69 6e |Recordin|g termin|
|00001680| 61 6c 20 65 6d 75 6c 61 | 74 6f 72 20 6f 75 74 70 |al emula|tor outp|
|00001690| 75 74 20 69 6e 74 6f 20 | 62 75 66 66 65 72 20 5c |ut into |buffer \|
|000016a0| 22 25 73 5c 22 22 20 62 | 75 66 66 65 72 2d 6e 61 |"%s\"" b|uffer-na|
|000016b0| 6d 65 5d 20 34 20 22 5c | 0a 52 65 63 6f 72 64 20 |me] 4 "\|.Record |
|000016c0| 6f 75 74 70 75 74 20 66 | 72 6f 6d 20 74 68 65 20 |output f|rom the |
|000016d0| 74 65 72 6d 69 6e 61 6c | 20 65 6d 75 6c 61 74 6f |terminal| emulato|
|000016e0| 72 20 69 6e 20 61 20 62 | 75 66 66 65 72 2e 22 20 |r in a b|uffer." |
|000016f0| 28 62 79 74 65 2d 63 6f | 64 65 20 22 08 3f ad 8a |(byte-co|de ".?..|
|00001700| c1 c2 c3 c4 c5 70 21 5c | 22 c6 23 43 87 22 20 5b |.....p!\|".#C." [|
|00001710| 74 65 2d 6c 6f 67 2d 62 | 75 66 66 65 72 20 72 65 |te-log-b|uffer re|
|00001720| 61 64 2d 62 75 66 66 65 | 72 20 22 52 65 63 6f 72 |ad-buffe|r "Recor|
|00001730| 64 20 6f 75 74 70 75 74 | 20 69 6e 20 62 75 66 66 |d output| in buff|
|00001740| 65 72 3a 20 22 20 66 6f | 72 6d 61 74 20 22 25 73 |er: " fo|rmat "%s|
|00001750| 20 6f 75 74 70 75 74 2d | 6c 6f 67 22 20 62 75 66 | output-|log" buf|
|00001760| 66 65 72 2d 6e 61 6d 65 | 20 6e 69 6c 5d 20 36 29 |fer-name| nil] 6)|
|00001770| 5d 29 0a 28 66 73 65 74 | 20 27 74 65 2d 74 6f 66 |]).(fset| 'te-tof|
|00001780| 75 20 23 5b 6e 69 6c 20 | 22 c0 c1 21 87 22 20 5b |u #[nil |"..!." [|
|00001790| 74 65 2d 73 65 74 2d 6f | 75 74 70 75 74 2d 6c 6f |te-set-o|utput-lo|
|000017a0| 67 20 6e 69 6c 5d 20 32 | 20 22 5c 0a 44 69 73 63 |g nil] 2| "\.Disc|
|000017b0| 6f 6e 74 69 6e 75 65 20 | 6f 75 74 70 75 74 20 6c |ontinue |output l|
|000017c0| 6f 67 2e 22 20 6e 69 6c | 5d 29 0a 28 62 79 74 65 |og." nil|]).(byte|
|000017d0| 2d 63 6f 64 65 20 22 c0 | c1 4d 88 c2 c3 4d 88 c4 |-code ".|.M...M..|
|000017e0| c5 4d 87 22 20 5b 74 65 | 2d 74 6f 67 67 6c 65 20 |.M." [te|-toggle |
|000017f0| 23 5b 28 73 79 6d 20 61 | 72 67 29 20 22 08 09 a7 |#[(sym a|rg) "...|
|00001800| ac 83 09 aa 93 09 c2 55 | ab 85 08 4a 3f aa 89 09 |.......U|...J?...|
|00001810| c3 57 ab 83 c4 aa 81 c5 | 4c 87 22 20 5b 73 79 6d |.W......|L." [sym|
|00001820| 20 61 72 67 20 31 20 30 | 20 6e 69 6c 20 74 5d 20 | arg 1 0| nil t] |
|00001830| 33 5d 20 74 65 2d 74 6f | 67 67 6c 65 2d 6d 6f 72 |3] te-to|ggle-mor|
|00001840| 65 2d 70 72 6f 63 65 73 | 73 69 6e 67 20 23 5b 28 |e-proces|sing #[(|
|00001850| 61 72 67 29 20 22 c0 c1 | c2 0b 5c 22 ab 83 c4 aa |arg) "..|..\"....|
|00001860| 81 c5 21 88 5c 6e ad 84 | c6 89 16 07 87 22 20 5b |..!.\n..|....." [|
|00001870| 6d 65 73 73 61 67 65 20 | 74 65 2d 74 6f 67 67 6c |message |te-toggl|
|00001880| 65 20 74 65 72 6d 69 6e | 61 6c 2d 6d 6f 72 65 2d |e termin|al-more-|
|00001890| 70 72 6f 63 65 73 73 69 | 6e 67 20 61 72 67 20 22 |processi|ng arg "|
|000018a0| 4d 6f 72 65 20 70 72 6f | 63 65 73 73 69 6e 67 20 |More pro|cessing |
|000018b0| 6f 6e 22 20 22 4d 6f 72 | 65 20 70 72 6f 63 65 73 |on" "Mor|e proces|
|000018c0| 73 69 6e 67 20 6f 66 66 | 22 20 2d 31 20 74 65 2d |sing off|" -1 te-|
|000018d0| 6d 6f 72 65 2d 63 6f 75 | 6e 74 5d 20 34 20 6e 69 |more-cou|nt] 4 ni|
|000018e0| 6c 20 22 70 22 5d 20 74 | 65 2d 74 6f 67 67 6c 65 |l "p"] t|e-toggle|
|000018f0| 2d 73 63 72 6f 6c 6c 69 | 6e 67 20 23 5b 28 61 72 |-scrolli|ng #[(ar|
|00001900| 67 29 20 22 c0 c1 c2 0b | 5c 22 ab 83 c4 aa 81 c5 |g) "....|\"......|
|00001910| 21 87 22 20 5b 6d 65 73 | 73 61 67 65 20 74 65 2d |!." [mes|sage te-|
|00001920| 74 6f 67 67 6c 65 20 74 | 65 72 6d 69 6e 61 6c 2d |toggle t|erminal-|
|00001930| 73 63 72 6f 6c 6c 69 6e | 67 20 61 72 67 20 22 53 |scrollin|g arg "S|
|00001940| 63 72 6f 6c 6c 20 61 74 | 20 65 6e 64 20 6f 66 20 |croll at| end of |
|00001950| 70 61 67 65 22 20 22 57 | 72 61 70 20 61 74 20 65 |page" "W|rap at e|
|00001960| 6e 64 20 6f 66 20 70 61 | 67 65 22 5d 20 34 20 6e |nd of pa|ge"] 4 n|
|00001970| 69 6c 20 22 70 22 5d 5d | 20 32 29 0a 28 66 73 65 |il "p"]]| 2).(fse|
|00001980| 74 20 27 74 65 2d 65 6e | 61 62 6c 65 2d 6d 6f 72 |t 'te-en|able-mor|
|00001990| 65 2d 70 72 6f 63 65 73 | 73 69 6e 67 20 23 5b 6e |e-proces|sing #[n|
|000019a0| 69 6c 20 22 c0 c1 21 87 | 22 20 5b 74 65 2d 74 6f |il "..!.|" [te-to|
|000019b0| 67 67 6c 65 2d 6d 6f 72 | 65 2d 70 72 6f 63 65 73 |ggle-mor|e-proces|
|000019c0| 73 69 6e 67 20 74 5d 20 | 32 20 22 5c 0a 45 6e 61 |sing t] |2 "\.Ena|
|000019d0| 62 6c 65 20 2a 2a 20 4d | 4f 52 45 20 2a 2a 20 70 |ble ** M|ORE ** p|
|000019e0| 72 6f 63 65 73 73 69 6e | 67 22 20 6e 69 6c 5d 29 |rocessin|g" nil])|
|000019f0| 0a 28 66 73 65 74 20 27 | 74 65 2d 64 69 73 61 62 |.(fset '|te-disab|
|00001a00| 6c 65 2d 6d 6f 72 65 2d | 70 72 6f 63 65 73 73 69 |le-more-|processi|
|00001a10| 6e 67 20 23 5b 6e 69 6c | 20 22 c0 c1 21 87 22 20 |ng #[nil| "..!." |
|00001a20| 5b 74 65 2d 74 6f 67 67 | 6c 65 2d 6d 6f 72 65 2d |[te-togg|le-more-|
|00001a30| 70 72 6f 63 65 73 73 69 | 6e 67 20 6e 69 6c 5d 20 |processi|ng nil] |
|00001a40| 32 20 22 5c 0a 44 69 73 | 61 62 6c 65 20 2a 2a 20 |2 "\.Dis|able ** |
|00001a50| 4d 4f 52 45 20 2a 2a 20 | 70 72 6f 63 65 73 73 69 |MORE ** |processi|
|00001a60| 6e 67 22 20 6e 69 6c 5d | 29 0a 28 66 73 65 74 20 |ng" nil]|).(fset |
|00001a70| 27 74 65 2d 64 6f 2d 73 | 63 72 6f 6c 6c 69 6e 67 |'te-do-s|crolling|
|00001a80| 20 23 5b 6e 69 6c 20 22 | c0 c1 21 87 22 20 5b 74 | #[nil "|..!." [t|
|00001a90| 65 2d 74 6f 67 67 6c 65 | 2d 73 63 72 6f 6c 6c 69 |e-toggle|-scrolli|
|00001aa0| 6e 67 20 74 5d 20 32 20 | 22 5c 0a 53 63 72 6f 6c |ng t] 2 |"\.Scrol|
|00001ab0| 6c 20 61 74 20 65 6e 64 | 20 6f 66 20 70 61 67 65 |l at end| of page|
|00001ac0| 20 28 79 75 63 6b 29 22 | 20 6e 69 6c 5d 29 0a 28 | (yuck)"| nil]).(|
|00001ad0| 66 73 65 74 20 27 74 65 | 2d 64 6f 2d 77 72 61 70 |fset 'te|-do-wrap|
|00001ae0| 70 69 6e 67 20 23 5b 6e | 69 6c 20 22 c0 c1 21 87 |ping #[n|il "..!.|
|00001af0| 22 20 5b 74 65 2d 74 6f | 67 67 6c 65 2d 73 63 72 |" [te-to|ggle-scr|
|00001b00| 6f 6c 6c 69 6e 67 20 6e | 69 6c 5d 20 32 20 22 5c |olling n|il] 2 "\|
|00001b10| 0a 57 72 61 70 20 74 6f | 20 74 6f 70 20 6f 66 20 |.Wrap to| top of |
|00001b20| 77 69 6e 64 6f 77 20 61 | 74 20 65 6e 64 20 6f 66 |window a|t end of|
|00001b30| 20 70 61 67 65 22 20 6e | 69 6c 5d 29 0a 28 66 73 | page" n|il]).(fs|
|00001b40| 65 74 20 27 74 65 2d 73 | 65 74 2d 72 65 64 69 73 |et 'te-s|et-redis|
|00001b50| 70 6c 61 79 2d 69 6e 74 | 65 72 76 61 6c 20 23 5b |play-int|erval #[|
|00001b60| 28 61 72 67 29 20 22 08 | c1 5d 89 10 12 c3 89 14 |(arg) ".|.]......|
|00001b70| 87 22 20 5b 61 72 67 20 | 31 20 74 65 72 6d 69 6e |." [arg |1 termin|
|00001b80| 61 6c 2d 72 65 64 69 73 | 70 6c 61 79 2d 69 6e 74 |al-redis|play-int|
|00001b90| 65 72 76 61 6c 20 30 20 | 74 65 2d 72 65 64 69 73 |erval 0 |te-redis|
|00001ba0| 70 6c 61 79 2d 63 6f 75 | 6e 74 5d 20 33 20 22 5c |play-cou|nt] 3 "\|
|00001bb0| 0a 53 65 74 20 74 68 65 | 20 6d 61 78 69 6d 75 6d |.Set the| maximum|
|00001bc0| 20 69 6e 74 65 72 76 61 | 6c 20 28 69 6e 20 6f 75 | interva|l (in ou|
|00001bd0| 74 70 75 74 20 63 68 61 | 72 61 63 74 65 72 73 29 |tput cha|racters)|
|00001be0| 20 62 65 74 77 65 65 6e | 20 73 63 72 65 65 6e 20 | between| screen |
|00001bf0| 75 70 64 61 74 65 73 2e | 0a 53 65 74 20 74 68 69 |updates.|.Set thi|
|00001c00| 73 20 6e 75 6d 62 65 72 | 20 74 6f 20 6c 61 72 67 |s number| to larg|
|00001c10| 65 20 76 61 6c 75 65 20 | 66 6f 72 20 67 72 65 61 |e value |for grea|
|00001c20| 74 65 72 20 74 68 72 6f | 75 67 68 70 75 74 2c 0a |ter thro|ughput,.|
|00001c30| 73 65 74 20 69 74 20 73 | 6d 61 6c 6c 65 72 20 66 |set it s|maller f|
|00001c40| 6f 72 20 6d 6f 72 65 20 | 66 72 65 71 75 65 6e 74 |or more |frequent|
|00001c50| 20 75 70 64 61 74 65 73 | 20 28 62 75 74 20 6f 76 | updates| (but ov|
|00001c60| 65 72 61 6c 6c 20 73 6c | 6f 77 65 72 20 70 65 72 |erall sl|ower per|
|00001c70| 66 6f 72 6d 61 6e 63 65 | 2e 22 20 22 4e 4d 61 78 |formance|." "NMax|
|00001c80| 20 6e 75 6d 62 65 72 20 | 6f 66 20 6f 75 74 70 75 | number |of outpu|
|00001c90| 74 20 63 68 61 72 73 20 | 62 65 74 77 65 65 6e 20 |t chars |between |
|00001ca0| 72 65 64 69 73 70 6c 61 | 79 20 75 70 64 61 74 65 |redispla|y update|
|00001cb0| 73 3a 20 22 5d 29 0a 28 | 62 79 74 65 2d 63 6f 64 |s: "]).(|byte-cod|
|00001cc0| 65 20 22 c0 c1 c2 c3 23 | 88 c1 c4 4d 87 22 20 5b |e "....#|...M." [|
|00001cd0| 70 75 74 20 74 65 2d 6d | 6f 72 65 2d 62 72 65 61 |put te-m|ore-brea|
|00001ce0| 6b 2d 75 6e 72 65 61 64 | 20 73 75 70 70 72 65 73 |k-unread| suppres|
|00001cf0| 73 2d 6b 65 79 6d 61 70 | 20 74 20 23 5b 6e 69 6c |s-keymap| t #[nil|
|00001d00| 20 22 08 09 55 ab 84 c2 | c3 21 87 c4 c5 c6 08 21 | "..U...|.!.....!|
|00001d10| c7 20 23 88 c8 16 09 ca | 20 88 cb 1e 0c cd 20 29 |. #.....| ..... )|
|00001d20| 87 22 20 5b 6c 61 73 74 | 2d 69 6e 70 75 74 2d 63 |." [last|-input-c|
|00001d30| 68 61 72 20 74 65 72 6d | 69 6e 61 6c 2d 65 73 63 |har term|inal-esc|
|00001d40| 61 70 65 2d 63 68 61 72 | 20 63 61 6c 6c 2d 69 6e |ape-char| call-in|
|00001d50| 74 65 72 61 63 74 69 76 | 65 6c 79 20 74 65 2d 65 |teractiv|ely te-e|
|00001d60| 73 63 61 70 65 20 6d 65 | 73 73 61 67 65 20 22 43 |scape me|ssage "C|
|00001d70| 6f 6e 74 69 6e 75 69 6e | 67 20 66 72 6f 6d 20 6d |ontinuin|g from m|
|00001d80| 6f 72 65 20 62 72 65 61 | 6b 20 28 5c 22 25 73 5c |ore brea|k (\"%s\|
|00001d90| 22 20 74 79 70 65 64 2c | 20 25 64 20 63 68 61 72 |" typed,| %d char|
|00001da0| 73 20 6f 75 74 70 75 74 | 20 70 65 6e 64 69 6e 67 |s output| pending|
|00001db0| 2e 2e 2e 29 22 20 73 69 | 6e 67 6c 65 2d 6b 65 79 |...)" si|ngle-key|
|00001dc0| 2d 64 65 73 63 72 69 70 | 74 69 6f 6e 20 74 65 2d |-descrip|tion te-|
|00001dd0| 70 65 6e 64 69 6e 67 2d | 6f 75 74 70 75 74 2d 6c |pending-|output-l|
|00001de0| 65 6e 67 74 68 20 32 35 | 39 32 35 39 20 74 65 2d |ength 25|9259 te-|
|00001df0| 6d 6f 72 65 2d 63 6f 75 | 6e 74 20 74 65 2d 6d 6f |more-cou|nt te-mo|
|00001e00| 72 65 2d 62 72 65 61 6b | 2d 75 6e 77 69 6e 64 20 |re-break|-unwind |
|00001e10| 6e 69 6c 20 74 65 72 6d | 69 6e 61 6c 2d 6d 6f 72 |nil term|inal-mor|
|00001e20| 65 2d 70 72 6f 63 65 73 | 73 69 6e 67 20 74 65 2d |e-proces|sing te-|
|00001e30| 70 61 73 73 2d 74 68 72 | 6f 75 67 68 5d 20 34 20 |pass-thr|ough] 4 |
|00001e40| 6e 69 6c 20 6e 69 6c 5d | 5d 20 34 29 0a 28 66 73 |nil nil]|] 4).(fs|
|00001e50| 65 74 20 27 74 65 2d 6d | 6f 72 65 2d 62 72 65 61 |et 'te-m|ore-brea|
|00001e60| 6b 2d 72 65 73 75 6d 65 | 20 23 5b 6e 69 6c 20 22 |k-resume| #[nil "|
|00001e70| c0 c1 21 88 c2 20 87 22 | 20 5b 6d 65 73 73 61 67 |..!.. ."| [messag|
|00001e80| 65 20 22 43 6f 6e 74 69 | 6e 75 69 6e 67 20 66 72 |e "Conti|nuing fr|
|00001e90| 6f 6d 20 6d 6f 72 65 20 | 62 72 65 61 6b 22 20 74 |om more |break" t|
|00001ea0| 65 2d 6d 6f 72 65 2d 62 | 72 65 61 6b 2d 75 6e 77 |e-more-b|reak-unw|
|00001eb0| 69 6e 64 5d 20 32 20 22 | 5c 0a 50 72 6f 63 65 65 |ind] 2 "|\.Procee|
|00001ec0| 64 20 70 61 73 74 20 74 | 68 65 20 2a 2a 4d 4f 52 |d past t|he **MOR|
|00001ed0| 45 2a 2a 20 62 72 65 61 | 6b 2c 0a 61 6c 6c 6f 77 |E** brea|k,.allow|
|00001ee0| 69 6e 67 20 74 68 65 20 | 6e 65 78 74 20 70 61 67 |ing the |next pag|
|00001ef0| 65 20 6f 66 20 6f 75 74 | 70 75 74 20 74 6f 20 61 |e of out|put to a|
|00001f00| 70 70 65 61 72 22 20 6e | 69 6c 5d 29 0a 28 66 73 |ppear" n|il]).(fs|
|00001f10| 65 74 20 27 74 65 2d 6d | 6f 72 65 2d 62 72 65 61 |et 'te-m|ore-brea|
|00001f20| 6b 2d 68 65 6c 70 20 23 | 5b 6e 69 6c 20 22 c0 c1 |k-help #|[nil "..|
|00001f30| 21 88 c2 c3 21 88 c4 c5 | 21 87 22 20 5b 6d 65 73 |!...!...|!." [mes|
|00001f40| 73 61 67 65 20 22 54 65 | 72 6d 69 6e 61 6c 2d 65 |sage "Te|rminal-e|
|00001f50| 6d 75 6c 61 74 6f 72 20 | 6d 6f 72 65 20 62 72 65 |mulator |more bre|
|00001f60| 61 6b 20 68 65 6c 70 2e | 2e 2e 22 20 73 69 74 2d |ak help.|.." sit-|
|00001f70| 66 6f 72 20 30 20 77 69 | 74 68 2d 65 6c 65 63 74 |for 0 wi|th-elect|
|00001f80| 72 69 63 2d 68 65 6c 70 | 20 23 5b 6e 69 6c 20 22 |ric-help| #[nil "|
|00001f90| c0 c1 21 88 c0 c2 c3 c4 | c5 0e 06 c7 c8 24 c9 c5 |..!.....|.....$..|
|00001fa0| 21 23 21 88 c0 ca cb 21 | 21 88 c0 cc 21 88 c7 87 |!#!....!|!...!...|
|00001fb0| 22 20 5b 70 72 69 6e 63 | 20 22 54 65 72 6d 69 6e |" [princ| "Termin|
|00001fc0| 61 6c 2d 65 6d 75 6c 61 | 74 6f 72 20 6d 6f 72 65 |al-emula|tor more|
|00001fd0| 20 62 72 65 61 6b 2e 5c | 6e 5c 6e 22 20 66 6f 72 | break.\|n\n" for|
|00001fe0| 6d 61 74 20 22 54 79 70 | 65 20 5c 22 25 73 5c 22 |mat "Typ|e \"%s\"|
|00001ff0| 20 28 74 65 2d 6d 6f 72 | 65 2d 62 72 65 61 6b 2d | (te-mor|e-break-|
|00002000| 72 65 73 75 6d 65 29 5c | 6e 25 73 5c 6e 22 20 77 |resume)\|n%s\n" w|
|00002010| 68 65 72 65 2d 69 73 2d | 69 6e 74 65 72 6e 61 6c |here-is-|internal|
|00002020| 20 74 65 2d 6d 6f 72 65 | 2d 62 72 65 61 6b 2d 72 | te-more|-break-r|
|00002030| 65 73 75 6d 65 20 74 65 | 72 6d 69 6e 61 6c 2d 6d |esume te|rminal-m|
|00002040| 6f 72 65 2d 62 72 65 61 | 6b 2d 6d 61 70 20 6e 69 |ore-brea|k-map ni|
|00002050| 6c 20 74 20 64 6f 63 75 | 6d 65 6e 74 61 74 69 6f |l t docu|mentatio|
|00002060| 6e 20 73 75 62 73 74 69 | 74 75 74 65 2d 63 6f 6d |n substi|tute-com|
|00002070| 6d 61 6e 64 2d 6b 65 79 | 73 20 22 5c 5c 7b 74 65 |mand-key|s "\\{te|
|00002080| 72 6d 69 6e 61 6c 2d 6d | 6f 72 65 2d 62 72 65 61 |rminal-m|ore-brea|
|00002090| 6b 2d 6d 61 70 7d 5c 6e | 22 20 22 41 6e 79 20 6f |k-map}\n|" "Any o|
|000020a0| 74 68 65 72 20 6b 65 79 | 20 69 73 20 70 61 73 73 |ther key| is pass|
|000020b0| 65 64 20 74 68 72 6f 75 | 67 68 20 74 6f 20 74 68 |ed throu|gh to th|
|000020c0| 65 20 70 72 6f 67 72 61 | 6d 5c 6e 72 75 6e 6e 69 |e progra|m\nrunni|
|000020d0| 6e 67 20 75 6e 64 65 72 | 20 74 68 65 20 74 65 72 |ng under| the ter|
|000020e0| 6d 69 6e 61 6c 20 65 6d | 75 6c 61 74 6f 72 20 61 |minal em|ulator a|
|000020f0| 6e 64 20 64 69 73 61 62 | 6c 65 73 20 6d 6f 72 65 |nd disab|les more|
|00002100| 20 70 72 6f 63 65 73 73 | 69 6e 67 20 75 6e 74 69 | process|ing unti|
|00002110| 6c 5c 6e 61 6c 6c 20 70 | 65 6e 64 69 6e 67 20 6f |l\nall p|ending o|
|00002120| 75 74 70 75 74 20 68 61 | 73 20 62 65 65 6e 20 64 |utput ha|s been d|
|00002130| 65 61 6c 74 20 77 69 74 | 68 2e 22 5d 20 38 5d 5d |ealt wit|h."] 8]]|
|00002140| 20 32 20 22 5c 0a 50 72 | 6f 76 69 64 65 20 68 65 | 2 "\.Pr|ovide he|
|00002150| 6c 70 20 6f 6e 20 63 6f | 6d 6d 61 6e 64 73 20 61 |lp on co|mmands a|
|00002160| 76 61 69 6c 61 62 6c 65 | 20 69 6e 20 61 20 74 65 |vailable| in a te|
|00002170| 72 6d 69 6e 61 6c 2d 65 | 6d 75 6c 61 74 6f 72 20 |rminal-e|mulator |
|00002180| 2a 2a 4d 4f 52 45 2a 2a | 20 62 72 65 61 6b 22 20 |**MORE**| break" |
|00002190| 6e 69 6c 5d 29 0a 28 66 | 73 65 74 20 27 74 65 2d |nil]).(f|set 'te-|
|000021a0| 6d 6f 72 65 2d 62 72 65 | 61 6b 2d 61 64 76 61 6e |more-bre|ak-advan|
|000021b0| 63 65 2d 6f 6e 65 2d 6c | 69 6e 65 20 23 5b 6e 69 |ce-one-l|ine #[ni|
|000021c0| 6c 20 22 c0 11 c2 20 87 | 22 20 5b 31 20 74 65 2d |l "... .|" [1 te-|
|000021d0| 6d 6f 72 65 2d 63 6f 75 | 6e 74 20 74 65 2d 6d 6f |more-cou|nt te-mo|
|000021e0| 72 65 2d 62 72 65 61 6b | 2d 75 6e 77 69 6e 64 5d |re-break|-unwind]|
|000021f0| 20 31 20 22 5c 0a 41 6c | 6c 6f 77 20 6f 6e 65 20 | 1 "\.Al|low one |
|00002200| 6d 6f 72 65 20 6c 69 6e | 65 20 6f 66 20 74 65 78 |more lin|e of tex|
|00002210| 74 20 74 6f 20 62 65 20 | 6f 75 74 70 75 74 20 62 |t to be |output b|
|00002220| 65 66 6f 72 65 20 64 6f | 69 6e 67 20 61 6e 6f 74 |efore do|ing anot|
|00002230| 68 65 72 20 6d 6f 72 65 | 20 62 72 65 61 6b 2e 22 |her more| break."|
|00002240| 20 6e 69 6c 5d 29 0a 28 | 66 73 65 74 20 27 74 65 | nil]).(|fset 'te|
|00002250| 2d 6d 6f 72 65 2d 62 72 | 65 61 6b 2d 66 6c 75 73 |-more-br|eak-flus|
|00002260| 68 2d 70 65 6e 64 69 6e | 67 2d 6f 75 74 70 75 74 |h-pendin|g-output|
|00002270| 20 23 5b 6e 69 6c 20 22 | c0 20 88 c1 20 87 22 20 | #[nil "|. .. ." |
|00002280| 5b 74 65 2d 6d 6f 72 65 | 2d 62 72 65 61 6b 2d 75 |[te-more|-break-u|
|00002290| 6e 77 69 6e 64 20 74 65 | 2d 66 6c 75 73 68 2d 70 |nwind te|-flush-p|
|000022a0| 65 6e 64 69 6e 67 2d 6f | 75 74 70 75 74 5d 20 31 |ending-o|utput] 1|
|000022b0| 20 22 5c 0a 44 69 73 63 | 61 72 64 20 61 6e 79 20 | "\.Disc|ard any |
|000022c0| 6f 75 74 70 75 74 20 77 | 68 69 63 68 20 68 61 73 |output w|hich has|
|000022d0| 20 62 65 65 6e 20 72 65 | 63 65 69 76 65 64 20 62 | been re|ceived b|
|000022e0| 79 20 74 68 65 20 74 65 | 72 6d 69 6e 61 6c 20 65 |y the te|rminal e|
|000022f0| 6d 75 6c 61 74 6f 72 20 | 62 75 74 0a 6e 6f 74 20 |mulator |but.not |
|00002300| 79 65 74 20 70 72 6f 63 | 65 65 73 65 64 20 61 6e |yet proc|eesed an|
|00002310| 64 20 74 68 65 6e 20 70 | 72 6f 63 65 65 64 20 66 |d then p|roceed f|
|00002320| 72 6f 6d 20 74 68 65 20 | 6d 6f 72 65 20 62 72 65 |rom the |more bre|
|00002330| 61 6b 2e 22 20 6e 69 6c | 5d 29 0a 28 66 73 65 74 |ak." nil|]).(fset|
|00002340| 20 27 74 65 2d 66 6c 75 | 73 68 2d 70 65 6e 64 69 | 'te-flu|sh-pendi|
|00002350| 6e 67 2d 6f 75 74 70 75 | 74 20 23 5b 6e 69 6c 20 |ng-outpu|t #[nil |
|00002360| 22 08 41 ac 84 c1 c2 21 | 87 c3 20 1c c1 c5 0c 5c |".A....!|.. ....\|
|00002370| 22 88 c6 c7 c8 0c 5c 22 | 44 10 c9 20 88 ca cb 21 |".....\"|D.. ...!|
|00002380| 88 cc c6 21 29 87 22 20 | 5b 74 65 2d 70 65 6e 64 |...!)." |[te-pend|
|00002390| 69 6e 67 2d 6f 75 74 70 | 75 74 20 6d 65 73 73 61 |ing-outp|ut messa|
|000023a0| 67 65 20 22 28 54 68 65 | 72 65 20 69 73 20 6e 6f |ge "(The|re is no|
|000023b0| 20 6f 75 74 70 75 74 20 | 70 65 6e 64 69 6e 67 29 | output |pending)|
|000023c0| 22 20 74 65 2d 70 65 6e | 64 69 6e 67 2d 6f 75 74 |" te-pen|ding-out|
|000023d0| 70 75 74 2d 6c 65 6e 67 | 74 68 20 6c 65 6e 67 74 |put-leng|th lengt|
|000023e0| 68 20 22 46 6c 75 73 68 | 69 6e 67 20 25 64 20 63 |h "Flush|ing %d c|
|000023f0| 68 61 72 73 20 6f 66 20 | 70 65 6e 64 69 6e 67 20 |hars of |pending |
|00002400| 6f 75 74 70 75 74 22 20 | 30 20 66 6f 72 6d 61 74 |output" |0 format|
|00002410| 20 22 5c 6e 2a 2a 2a 20 | 25 64 20 63 68 61 72 73 | "\n*** |%d chars|
|00002420| 20 6f 66 20 70 65 6e 64 | 69 6e 67 20 6f 75 74 70 | of pend|ing outp|
|00002430| 75 74 20 66 6c 75 73 68 | 65 64 20 2a 2a 2a 5c 6e |ut flush|ed ***\n|
|00002440| 22 20 74 65 2d 75 70 64 | 61 74 65 2d 70 65 6e 64 |" te-upd|ate-pend|
|00002450| 69 6e 67 2d 6f 75 74 70 | 75 74 2d 64 69 73 70 6c |ing-outp|ut-displ|
|00002460| 61 79 20 74 65 2d 70 72 | 6f 63 65 73 73 2d 6f 75 |ay te-pr|ocess-ou|
|00002470| 74 70 75 74 20 6e 69 6c | 20 73 69 74 2d 66 6f 72 |tput nil| sit-for|
|00002480| 5d 20 34 20 22 5c 0a 44 | 69 73 63 61 72 64 20 61 |] 4 "\.D|iscard a|
|00002490| 6e 79 20 61 73 2d 79 65 | 74 2d 75 6e 70 72 6f 63 |ny as-ye|t-unproc|
|000024a0| 65 73 73 65 64 20 6f 75 | 74 70 75 74 20 77 68 69 |essed ou|tput whi|
|000024b0| 63 68 20 68 61 73 20 62 | 65 65 6e 20 72 65 63 65 |ch has b|een rece|
|000024c0| 69 76 65 64 20 62 79 0a | 74 68 65 20 74 65 72 6d |ived by.|the term|
|000024d0| 69 6e 61 6c 20 65 6d 75 | 6c 61 74 6f 72 2e 22 20 |inal emu|lator." |
|000024e0| 6e 69 6c 5d 29 0a 28 66 | 73 65 74 20 27 74 65 2d |nil]).(f|set 'te-|
|000024f0| 70 61 73 73 2d 74 68 72 | 6f 75 67 68 20 23 5b 6e |pass-thr|ough #[n|
|00002500| 69 6c 20 22 08 09 3d ab | 84 c2 c3 21 87 0c ab 88 |il "..=.|...!....|
|00002510| 0d 41 ac 84 c6 c7 21 88 | c8 0e 09 ca cb 08 5c 22 |.A....!.|......\"|
|00002520| 5c 22 88 cc cd 21 87 22 | 20 5b 6c 61 73 74 2d 69 |\"...!."| [last-i|
|00002530| 6e 70 75 74 2d 63 68 61 | 72 20 74 65 72 6d 69 6e |nput-cha|r termin|
|00002540| 61 6c 2d 65 73 63 61 70 | 65 2d 63 68 61 72 20 63 |al-escap|e-char c|
|00002550| 61 6c 6c 2d 69 6e 74 65 | 72 61 63 74 69 76 65 6c |all-inte|ractivel|
|00002560| 79 20 74 65 2d 65 73 63 | 61 70 65 20 74 65 72 6d |y te-esc|ape term|
|00002570| 69 6e 61 6c 2d 6d 6f 72 | 65 2d 70 72 6f 63 65 73 |inal-mor|e-proces|
|00002580| 73 69 6e 67 20 74 65 2d | 70 65 6e 64 69 6e 67 2d |sing te-|pending-|
|00002590| 6f 75 74 70 75 74 20 74 | 65 2d 73 65 74 2d 6d 6f |output t|e-set-mo|
|000025a0| 72 65 2d 63 6f 75 6e 74 | 20 6e 69 6c 20 73 65 6e |re-count| nil sen|
|000025b0| 64 2d 73 74 72 69 6e 67 | 20 74 65 2d 70 72 6f 63 |d-string| te-proc|
|000025c0| 65 73 73 20 6d 61 6b 65 | 2d 73 74 72 69 6e 67 20 |ess make|-string |
|000025d0| 31 20 74 65 2d 70 72 6f | 63 65 73 73 2d 6f 75 74 |1 te-pro|cess-out|
|000025e0| 70 75 74 20 74 5d 20 35 | 20 22 5c 0a 53 65 6e 64 |put t] 5| "\.Send|
|000025f0| 20 74 68 65 20 6c 61 73 | 74 20 63 68 61 72 61 63 | the las|t charac|
|00002600| 74 65 72 20 74 79 70 65 | 64 20 74 68 72 6f 75 67 |ter type|d throug|
|00002610| 68 20 74 68 65 20 74 65 | 72 6d 69 6e 61 6c 2d 65 |h the te|rminal-e|
|00002620| 6d 75 6c 61 74 6f 72 0a | 77 69 74 68 6f 75 74 20 |mulator.|without |
|00002630| 61 6e 79 20 69 6e 74 65 | 72 70 72 65 74 61 74 69 |any inte|rpretati|
|00002640| 6f 6e 22 20 6e 69 6c 5d | 29 0a 28 62 79 74 65 2d |on" nil]|).(byte-|
|00002650| 63 6f 64 65 20 22 c0 c1 | 4d 88 c2 c3 4d 88 c4 c5 |code "..|M...M...|
|00002660| 4d 88 c6 c7 4d 88 c8 c9 | 4d 87 22 20 5b 74 65 2d |M...M...|M." [te-|
|00002670| 73 65 74 2d 77 69 6e 64 | 6f 77 2d 73 74 61 72 74 |set-wind|ow-start|
|00002680| 20 23 5b 6e 69 6c 20 22 | c0 70 21 89 19 ad 83 c2 | #[nil "|.p!.....|
|00002690| 09 21 1b 09 3f ae a8 0b | 60 65 5a 0c 54 a5 59 ab |.!..?...|`eZ.T.Y.|
|000026a0| 86 c5 09 65 5c 22 aa 98 | 0b 64 60 5a 0c 54 a5 59 |...e\"..|.d`Z.T.Y|
|000026b0| ab 8d c5 09 64 0b 0c 54 | 5f 5a c6 5a 5c 22 aa 81 |....d..T|_Z.Z\"..|
|000026c0| c7 2a 87 22 20 5b 67 65 | 74 2d 62 75 66 66 65 72 |.*." [ge|t-buffer|
|000026d0| 2d 77 69 6e 64 6f 77 20 | 77 20 77 69 6e 64 6f 77 |-window |w window|
|000026e0| 2d 68 65 69 67 68 74 20 | 68 20 74 65 2d 77 69 64 |-height |h te-wid|
|000026f0| 74 68 20 73 65 74 2d 77 | 69 6e 64 6f 77 2d 73 74 |th set-w|indow-st|
|00002700| 61 72 74 20 2d 31 20 6e | 69 6c 5d 20 36 5d 20 74 |art -1 n|il] 6] t|
|00002710| 65 2d 70 65 6e 64 69 6e | 67 2d 6f 75 74 70 75 74 |e-pendin|g-output|
|00002720| 2d 6c 65 6e 67 74 68 20 | 23 5b 6e 69 6c 20 22 08 |-length |#[nil ".|
|00002730| 40 08 41 19 1a 09 ab 8c | 5c 6e 09 40 47 5c 5c 12 |@.A.....|\n.@G\\.|
|00002740| 09 41 89 11 ac 74 5c 6e | 2a 87 22 20 5b 74 65 2d |.A...t\n|*." [te-|
|00002750| 70 65 6e 64 69 6e 67 2d | 6f 75 74 70 75 74 20 74 |pending-|output t|
|00002760| 65 6d 20 6c 65 6e 67 74 | 68 5d 20 33 5d 20 74 65 |em lengt|h] 3] te|
|00002770| 2d 6d 6f 72 65 2d 62 72 | 65 61 6b 20 23 5b 6e 69 |-more-br|eak #[ni|
|00002780| 6c 20 22 c0 c1 21 88 c2 | c3 21 88 60 13 c2 c4 21 |l "..!..|.!.`...!|
|00002790| 88 c5 20 14 c6 0e 07 21 | 88 c2 c8 21 88 c9 0e 5c |.. ....!|...!...\|
|000027a0| 6e 21 16 08 c2 cb 21 88 | 0e 0c 16 0b cd 0e 0e cf |n!....!.|........|
|000027b0| 45 16 0c d0 0e 5c 6e d1 | 5c 22 88 d2 20 88 d3 d4 |E....\n.|\".. ...|
|000027c0| 20 21 70 3d ab 84 d5 d6 | 21 88 6d ac 94 0e 17 ab | !p=....|!.m.....|
|000027d0| 90 8a d8 75 88 60 60 0e | 19 5c 5c 7c 88 0e 17 63 |...u.``.|.\\|...c|
|000027e0| 88 29 da db 21 88 dc dd | 21 88 de df c1 5c 22 87 |.)..!...|!....\".|
|000027f0| 22 20 5b 74 65 2d 73 65 | 74 2d 6d 6f 72 65 2d 63 |" [te-se|t-more-c|
|00002800| 6f 75 6e 74 20 74 20 6d | 61 6b 65 2d 6c 6f 63 61 |ount t m|ake-loca|
|00002810| 6c 2d 76 61 72 69 61 62 | 6c 65 20 74 65 2d 6d 6f |l-variab|le te-mo|
|00002820| 72 65 2d 6f 6c 64 2d 70 | 6f 69 6e 74 20 74 65 2d |re-old-p|oint te-|
|00002830| 6d 6f 72 65 2d 6f 6c 64 | 2d 6c 6f 63 61 6c 2d 6d |more-old|-local-m|
|00002840| 61 70 20 63 75 72 72 65 | 6e 74 2d 6c 6f 63 61 6c |ap curre|nt-local|
|00002850| 2d 6d 61 70 20 75 73 65 | 2d 6c 6f 63 61 6c 2d 6d |-map use|-local-m|
|00002860| 61 70 20 74 65 72 6d 69 | 6e 61 6c 2d 6d 6f 72 65 |ap termi|nal-more|
|00002870| 2d 62 72 65 61 6b 2d 6d | 61 70 20 74 65 2d 6d 6f |-break-m|ap te-mo|
|00002880| 72 65 2d 6f 6c 64 2d 66 | 69 6c 74 65 72 20 70 72 |re-old-f|ilter pr|
|00002890| 6f 63 65 73 73 2d 66 69 | 6c 74 65 72 20 74 65 2d |ocess-fi|lter te-|
|000028a0| 70 72 6f 63 65 73 73 20 | 74 65 2d 6d 6f 72 65 2d |process |te-more-|
|000028b0| 6f 6c 64 2d 6d 6f 64 65 | 2d 6c 69 6e 65 2d 66 6f |old-mode|-line-fo|
|000028c0| 72 6d 61 74 20 6d 6f 64 | 65 2d 6c 69 6e 65 2d 66 |rmat mod|e-line-f|
|000028d0| 6f 72 6d 61 74 20 22 2d | 2d 20 20 20 2a 2a 4d 4f |ormat "-|- **MO|
|000028e0| 52 45 2a 2a 20 20 22 20 | 6d 6f 64 65 2d 6c 69 6e |RE** " |mode-lin|
|000028f0| 65 2d 62 75 66 66 65 72 | 2d 69 64 65 6e 74 69 66 |e-buffer|-identif|
|00002900| 69 63 61 74 69 6f 6e 20 | 22 25 2d 22 20 73 65 74 |ication |"%-" set|
|00002910| 2d 70 72 6f 63 65 73 73 | 2d 66 69 6c 74 65 72 20 |-process|-filter |
|00002920| 23 5b 28 70 72 6f 63 65 | 73 73 20 73 74 72 69 6e |#[(proce|ss strin|
|00002930| 67 29 20 22 8a c0 09 21 | 71 88 5c 6e 0b 43 a4 12 |g) "...!|q.\n.C..|
|00002940| 29 c4 20 87 22 20 5b 70 | 72 6f 63 65 73 73 2d 62 |). ." [p|rocess-b|
|00002950| 75 66 66 65 72 20 70 72 | 6f 63 65 73 73 20 74 65 |uffer pr|ocess te|
|00002960| 2d 70 65 6e 64 69 6e 67 | 2d 6f 75 74 70 75 74 20 |-pending|-output |
|00002970| 73 74 72 69 6e 67 20 74 | 65 2d 75 70 64 61 74 65 |string t|e-update|
|00002980| 2d 70 65 6e 64 69 6e 67 | 2d 6f 75 74 70 75 74 2d |-pending|-output-|
|00002990| 64 69 73 70 6c 61 79 5d | 20 32 5d 20 74 65 2d 75 |display]| 2] te-u|
|000029a0| 70 64 61 74 65 2d 70 65 | 6e 64 69 6e 67 2d 6f 75 |pdate-pe|nding-ou|
|000029b0| 74 70 75 74 2d 64 69 73 | 70 6c 61 79 20 77 69 6e |tput-dis|play win|
|000029c0| 64 6f 77 2d 62 75 66 66 | 65 72 20 73 65 6c 65 63 |dow-buff|er selec|
|000029d0| 74 65 64 2d 77 69 6e 64 | 6f 77 20 6d 65 73 73 61 |ted-wind|ow messa|
|000029e0| 67 65 20 22 4d 6f 72 65 | 20 62 72 65 61 6b 20 22 |ge "More| break "|
|000029f0| 20 74 65 72 6d 69 6e 61 | 6c 2d 6d 6f 72 65 2d 62 | termina|l-more-b|
|00002a00| 72 65 61 6b 2d 69 6e 73 | 65 72 74 69 6f 6e 20 31 |reak-ins|ertion 1|
|00002a10| 20 74 65 2d 77 69 64 74 | 68 20 72 75 6e 2d 68 6f | te-widt|h run-ho|
|00002a20| 6f 6b 73 20 74 65 72 6d | 69 6e 61 6c 2d 6d 6f 72 |oks term|inal-mor|
|00002a30| 65 2d 62 72 65 61 6b 2d | 68 6f 6f 6b 20 73 69 74 |e-break-|hook sit|
|00002a40| 2d 66 6f 72 20 30 20 74 | 68 72 6f 77 20 74 65 2d |-for 0 t|hrow te-|
|00002a50| 70 72 6f 63 65 73 73 2d | 6f 75 74 70 75 74 5d 20 |process-|output] |
|00002a60| 33 5d 20 74 65 2d 6d 6f | 72 65 2d 62 72 65 61 6b |3] te-mo|re-break|
|00002a70| 2d 75 6e 77 69 6e 64 20 | 23 5b 6e 69 6c 20 22 c0 |-unwind |#[nil ".|
|00002a80| 09 21 88 c2 0b 0c 5c 22 | 88 0d 62 88 0e 06 16 07 |.!....\"|..b.....|
|00002a90| c8 c9 20 21 88 ca 1e 0b | 6d ac 98 0e 0c ab 94 cd |.. !....|m.......|
|00002aa0| 75 88 60 60 0e 0c 47 5c | 5c 7c 88 ce cf 0e 10 5c |u.``..G\|\|.....\|
|00002ab0| 22 88 0d 62 88 ca 15 d1 | 1e 12 d3 20 88 2a d4 d5 |"..b....|... .*..|
|00002ac0| 21 87 22 20 5b 75 73 65 | 2d 6c 6f 63 61 6c 2d 6d |!." [use|-local-m|
|00002ad0| 61 70 20 74 65 2d 6d 6f | 72 65 2d 6f 6c 64 2d 6c |ap te-mo|re-old-l|
|00002ae0| 6f 63 61 6c 2d 6d 61 70 | 20 73 65 74 2d 70 72 6f |ocal-map| set-pro|
|00002af0| 63 65 73 73 2d 66 69 6c | 74 65 72 20 74 65 2d 70 |cess-fil|ter te-p|
|00002b00| 72 6f 63 65 73 73 20 74 | 65 2d 6d 6f 72 65 2d 6f |rocess t|e-more-o|
|00002b10| 6c 64 2d 66 69 6c 74 65 | 72 20 74 65 2d 6d 6f 72 |ld-filte|r te-mor|
|00002b20| 65 2d 6f 6c 64 2d 70 6f | 69 6e 74 20 74 65 2d 6d |e-old-po|int te-m|
|00002b30| 6f 72 65 2d 6f 6c 64 2d | 6d 6f 64 65 2d 6c 69 6e |ore-old-|mode-lin|
|00002b40| 65 2d 66 6f 72 6d 61 74 | 20 6d 6f 64 65 2d 6c 69 |e-format| mode-li|
|00002b50| 6e 65 2d 66 6f 72 6d 61 | 74 20 73 65 74 2d 62 75 |ne-forma|t set-bu|
|00002b60| 66 66 65 72 2d 6d 6f 64 | 69 66 69 65 64 2d 70 20 |ffer-mod|ified-p |
|00002b70| 62 75 66 66 65 72 2d 6d | 6f 64 69 66 69 65 64 2d |buffer-m|odified-|
|00002b80| 70 20 6e 69 6c 20 62 75 | 66 66 65 72 2d 72 65 61 |p nil bu|ffer-rea|
|00002b90| 64 2d 6f 6e 6c 79 20 74 | 65 72 6d 69 6e 61 6c 2d |d-only t|erminal-|
|00002ba0| 6d 6f 72 65 2d 62 72 65 | 61 6b 2d 69 6e 73 65 72 |more-bre|ak-inser|
|00002bb0| 74 69 6f 6e 20 31 20 69 | 6e 73 65 72 74 2d 63 68 |tion 1 i|nsert-ch|
|00002bc0| 61 72 20 33 32 20 74 65 | 2d 77 69 64 74 68 20 32 |ar 32 te|-width 2|
|00002bd0| 35 39 32 35 39 20 74 65 | 2d 6d 6f 72 65 2d 63 6f |59259 te|-more-co|
|00002be0| 75 6e 74 20 74 65 2d 6e | 65 77 6c 69 6e 65 20 74 |unt te-n|ewline t|
|00002bf0| 65 2d 70 72 6f 63 65 73 | 73 2d 6f 75 74 70 75 74 |e-proces|s-output|
|00002c00| 20 74 5d 20 33 5d 20 74 | 65 2d 73 65 74 2d 6d 6f | t] 3] t|e-set-mo|
|00002c10| 72 65 2d 63 6f 75 6e 74 | 20 23 5b 28 6e 65 77 6c |re-count| #[(newl|
|00002c20| 69 6e 65 29 20 22 60 65 | 5a 08 54 a5 19 5c 6e ab |ine) "`e|Z.T..\n.|
|00002c30| 83 09 54 11 09 0b 55 ab | 85 0b 89 14 aa ad 09 0b |..T...U.|........|
|00002c40| 53 55 ab 85 0b 89 14 aa | a2 09 0b c5 a5 57 ac 87 |SU......|.....W..|
|00002c50| 0b 09 5a c6 56 ab 87 0b | 09 5a 89 14 aa 8d 0b 89 |..Z.V...|.Z......|
|00002c60| c6 56 ab 83 c5 aa 81 c7 | 5a 89 14 29 87 22 20 5b |.V......|Z..)." [|
|00002c70| 74 65 2d 77 69 64 74 68 | 20 6c 69 6e 65 20 6e 65 |te-width| line ne|
|00002c80| 77 6c 69 6e 65 20 74 65 | 2d 68 65 69 67 68 74 20 |wline te|-height |
|00002c90| 74 65 2d 6d 6f 72 65 2d | 63 6f 75 6e 74 20 32 20 |te-more-|count 2 |
|00002ca0| 31 30 20 31 5d 20 33 5d | 5d 20 32 29 0a 28 66 73 |10 1] 3]|] 2).(fs|
|00002cb0| 65 74 20 27 74 65 2d 6e | 65 77 6c 69 6e 65 20 23 |et 'te-n|ewline #|
|00002cc0| 5b 6e 69 6c 20 22 c0 7f | 88 09 ab 96 5c 6e 53 89 |[nil "..|....\nS.|
|00002cd0| 12 c3 57 ab 86 c4 c5 21 | 88 aa 88 5c 6e c3 3d ab |..W....!|...\n.=.|
|00002ce0| 83 c6 20 88 6d ab 9a 65 | 65 0e 07 5c 5c 7c 88 65 |.. .m..e|e..\\|.e|
|00002cf0| 62 88 0e 08 ab 96 c9 ca | 21 88 64 62 88 cb 63 88 |b.......|!.db..c.|
|00002d00| aa 8a ca 75 88 60 60 0e | 07 5c 5c 7c 88 cc cd 0e |...u.``.|.\\|....|
|00002d10| 07 5c 22 88 c3 79 88 ce | 20 87 22 20 5b 6e 69 6c |.\"..y..| ." [nil|
|00002d20| 20 74 65 72 6d 69 6e 61 | 6c 2d 6d 6f 72 65 2d 70 | termina|l-more-p|
|00002d30| 72 6f 63 65 73 73 69 6e | 67 20 74 65 2d 6d 6f 72 |rocessin|g te-mor|
|00002d40| 65 2d 63 6f 75 6e 74 20 | 30 20 74 65 2d 73 65 74 |e-count |0 te-set|
|00002d50| 2d 6d 6f 72 65 2d 63 6f | 75 6e 74 20 74 20 74 65 |-more-co|unt t te|
|00002d60| 2d 6d 6f 72 65 2d 62 72 | 65 61 6b 20 74 65 2d 77 |-more-br|eak te-w|
|00002d70| 69 64 74 68 20 74 65 72 | 6d 69 6e 61 6c 2d 73 63 |idth ter|minal-sc|
|00002d80| 72 6f 6c 6c 69 6e 67 20 | 64 65 6c 65 74 65 2d 63 |rolling |delete-c|
|00002d90| 68 61 72 20 31 20 31 30 | 20 69 6e 73 65 72 74 2d |har 1 10| insert-|
|00002da0| 63 68 61 72 20 33 32 20 | 74 65 2d 73 65 74 2d 77 |char 32 |te-set-w|
|00002db0| 69 6e 64 6f 77 2d 73 74 | 61 72 74 5d 20 33 20 22 |indow-st|art] 3 "|
|00002dc0| 5c 0a 4d 6f 76 65 20 64 | 6f 77 6e 20 61 20 6c 69 |\.Move d|own a li|
|00002dd0| 6e 65 2c 20 6f 70 74 69 | 6f 6e 61 6c 6c 79 20 64 |ne, opti|onally d|
|00002de0| 6f 20 6d 6f 72 65 20 70 | 72 6f 63 65 73 73 69 6e |o more p|rocessin|
|00002df0| 67 2c 20 70 65 72 68 61 | 70 73 20 77 72 61 70 2f |g, perha|ps wrap/|
|00002e00| 73 63 72 6f 6c 6c 2c 0a | 6d 6f 76 65 20 74 6f 20 |scroll,.|move to |
|00002e10| 73 74 61 72 74 20 6f 66 | 20 6e 65 77 20 6c 69 6e |start of| new lin|
|00002e20| 65 2c 20 63 6c 65 61 72 | 20 74 6f 20 65 6e 64 20 |e, clear| to end |
|00002e30| 6f 66 20 6c 69 6e 65 2e | 22 5d 29 0a 28 66 73 65 |of line.|"]).(fse|
|00002e40| 74 20 27 74 65 2d 64 6f | 77 6e 2d 76 65 72 74 69 |t 'te-do|wn-verti|
|00002e50| 63 61 6c 6c 79 2d 6f 72 | 2d 73 63 72 6f 6c 6c 20 |cally-or|-scroll |
|00002e60| 23 5b 6e 69 6c 20 22 69 | 18 c1 7f 88 6d ab 9d 65 |#[nil "i|....m..e|
|00002e70| 65 5c 6e 5c 5c 7c 88 65 | 62 88 c3 c4 21 88 64 62 |e\n\\|.e|b...!.db|
|00002e80| 88 c5 63 88 c6 c7 5c 6e | 5c 22 88 c8 79 88 aa 83 |..c...\n|\"..y...|
|00002e90| c4 79 88 c9 08 21 88 29 | ca 20 87 22 20 5b 63 6f |.y...!.)|. ." [co|
|00002ea0| 6c 75 6d 6e 20 6e 69 6c | 20 74 65 2d 77 69 64 74 |lumn nil| te-widt|
|00002eb0| 68 20 64 65 6c 65 74 65 | 2d 63 68 61 72 20 31 20 |h delete|-char 1 |
|00002ec0| 31 30 20 69 6e 73 65 72 | 74 2d 63 68 61 72 20 33 |10 inser|t-char 3|
|00002ed0| 32 20 30 20 6d 6f 76 65 | 2d 74 6f 2d 63 6f 6c 75 |2 0 move|-to-colu|
|00002ee0| 6d 6e 20 74 65 2d 73 65 | 74 2d 77 69 6e 64 6f 77 |mn te-se|t-window|
|00002ef0| 2d 73 74 61 72 74 5d 20 | 33 20 22 5c 0a 4d 6f 76 |-start] |3 "\.Mov|
|00002f00| 65 20 64 6f 77 6e 20 61 | 20 6c 69 6e 65 20 76 65 |e down a| line ve|
|00002f10| 72 74 69 63 61 6c 6c 79 | 2c 20 6f 72 20 73 63 72 |rtically|, or scr|
|00002f20| 6f 6c 6c 20 61 74 20 62 | 6f 74 74 6f 6d 2e 22 5d |oll at b|ottom."]|
|00002f30| 29 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 c1 |).(byte-|code "..|
|00002f40| 4d 88 c2 c3 4d 88 c4 c5 | 4d 88 c6 c7 4d 88 c8 c9 |M...M...|M...M...|
|00002f50| 4d 88 ca cb 4d 88 cc cd | 4d 88 ce cf 4d 88 d0 d1 |M...M...|M...M...|
|00002f60| 4d 88 d2 d3 4d 88 d4 d5 | 4d 88 d6 d7 4d 88 d8 d9 |M...M...|M...M...|
|00002f70| 4d 88 da db 4d 88 dc dd | 4d 88 de df 4d 88 e0 e1 |M...M...|M...M...|
|00002f80| 4d 88 e2 e3 4d 88 e4 e5 | 4d 88 e6 e7 4d 88 e8 e9 |M...M...|M...M...|
|00002f90| 4d 87 22 20 5b 74 65 2d | 6d 6f 76 65 2d 74 6f 2d |M." [te-|move-to-|
|00002fa0| 70 6f 73 69 74 69 6f 6e | 20 23 5b 6e 69 6c 20 22 |position| #[nil "|
|00002fb0| c0 20 c1 5a c0 20 c1 5a | 1a 1b 5c 6e 0c 56 ac 8f |. .Z. .Z|..\n.V..|
|00002fc0| 0b 0d 56 ac 8a 65 5c 6e | 0b 0c 54 5f 5c 5c 5c 5c |..V..e\n|..T_\\\\|
|00002fd0| 62 88 2a c6 89 16 07 87 | 22 20 5b 74 65 2d 67 65 |b.*.....|" [te-ge|
|00002fe0| 74 2d 63 68 61 72 20 33 | 32 20 78 20 79 20 74 65 |t-char 3|2 x y te|
|00002ff0| 2d 77 69 64 74 68 20 74 | 65 2d 68 65 69 67 68 74 |-width t|e-height|
|00003000| 20 2d 31 20 74 65 2d 6d | 6f 72 65 2d 63 6f 75 6e | -1 te-m|ore-coun|
|00003010| 74 5d 20 34 5d 20 74 65 | 2d 63 6c 65 61 72 2d 72 |t] 4] te|-clear-r|
|00003020| 65 73 74 2d 6f 66 2d 6c | 69 6e 65 20 23 5b 6e 69 |est-of-l|ine #[ni|
|00003030| 6c 20 22 8a 60 c0 7f 88 | 60 5a 19 60 60 09 5c 5c |l ".`...|`Z.``.\\|
|00003040| 7c 88 c2 c3 09 5b 5c 22 | 2a 87 22 20 5b 6e 69 6c ||....[\"|*." [nil|
|00003050| 20 6e 20 69 6e 73 65 72 | 74 2d 63 68 61 72 20 33 | n inser|t-char 3|
|00003060| 32 5d 20 33 5d 20 74 65 | 2d 63 6c 65 61 72 2d 72 |2] 3] te|-clear-r|
|00003070| 65 73 74 2d 6f 66 2d 73 | 63 72 65 65 6e 20 23 5b |est-of-s|creen #[|
|00003080| 6e 69 6c 20 22 8a c0 20 | 88 c1 7f 88 6d 3f ad 93 |nil ".. |....m?..|
|00003090| c2 75 88 c1 7f 88 60 0b | 5a 60 7c 88 c4 c5 0b 5c |.u....`.|Z`|....\|
|000030a0| 22 88 aa 66 29 87 22 20 | 5b 74 65 2d 63 6c 65 61 |"..f)." |[te-clea|
|000030b0| 72 2d 72 65 73 74 2d 6f | 66 2d 6c 69 6e 65 20 6e |r-rest-o|f-line n|
|000030c0| 69 6c 20 31 20 74 65 2d | 77 69 64 74 68 20 69 6e |il 1 te-|width in|
|000030d0| 73 65 72 74 2d 63 68 61 | 72 20 33 32 5d 20 33 5d |sert-cha|r 32] 3]|
|000030e0| 20 74 65 2d 63 6c 65 61 | 72 2d 73 63 72 65 65 6e | te-clea|r-screen|
|000030f0| 20 23 5b 6e 69 6c 20 22 | c0 20 88 c1 1a 5c 6e 0b | #[nil "|. ...\n.|
|00003100| 57 ab 8e 5c 6e 54 12 c4 | c5 0e 06 5c 22 88 c7 63 |W..\nT..|...\"..c|
|00003110| 88 aa 6d 29 64 53 64 7c | 88 65 62 88 c8 89 16 09 |..m)dSd||.eb.....|
|00003120| 87 22 20 5b 65 72 61 73 | 65 2d 62 75 66 66 65 72 |." [eras|e-buffer|
|00003130| 20 30 20 69 20 74 65 2d | 68 65 69 67 68 74 20 69 | 0 i te-|height i|
|00003140| 6e 73 65 72 74 2d 63 68 | 61 72 20 33 32 20 74 65 |nsert-ch|ar 32 te|
|00003150| 2d 77 69 64 74 68 20 31 | 30 20 2d 31 20 74 65 2d |-width 1|0 -1 te-|
|00003160| 6d 6f 72 65 2d 63 6f 75 | 6e 74 5d 20 33 5d 20 74 |more-cou|nt] 3] t|
|00003170| 65 2d 69 6e 73 65 72 74 | 2d 6c 69 6e 65 73 20 23 |e-insert|-lines #|
|00003180| 5b 6e 69 6c 20 22 6e ab | c6 8a 08 60 65 5a 09 54 |[nil "n.|...`eZ.T|
|00003190| a5 5a c2 5a 1b c4 20 c5 | 5a 0b 5e 1e 06 c7 1e 08 |.Z.Z.. .|Z.^.....|
|000031a0| 64 0e 06 09 54 5f 5a 64 | 7c 88 60 64 3d ab 83 c9 |d...T_Zd||.`d=...|
|000031b0| 63 88 0e 08 0e 06 57 ab | 95 0e 08 54 16 08 ca c5 |c.....W.|...T....|
|000031c0| 09 5c 22 88 0e 08 0b 3d | ac 69 c9 63 88 aa 64 2c |.\"....=|.i.c..d,|
|000031d0| c2 89 16 0b 87 22 20 5b | 74 65 2d 68 65 69 67 68 |....." [|te-heigh|
|000031e0| 74 20 74 65 2d 77 69 64 | 74 68 20 2d 31 20 6c 69 |t te-wid|th -1 li|
|000031f0| 6e 65 20 74 65 2d 67 65 | 74 2d 63 68 61 72 20 33 |ne te-ge|t-char 3|
|00003200| 32 20 6e 20 30 20 69 20 | 31 30 20 69 6e 73 65 72 |2 n 0 i |10 inser|
|00003210| 74 2d 63 68 61 72 20 74 | 65 2d 6d 6f 72 65 2d 63 |t-char t|e-more-c|
|00003220| 6f 75 6e 74 5d 20 33 5d | 20 74 65 2d 64 65 6c 65 |ount] 3]| te-dele|
|00003230| 74 65 2d 6c 69 6e 65 73 | 20 23 5b 6e 69 6c 20 22 |te-lines| #[nil "|
|00003240| 6e ab c3 08 60 65 5a 09 | 54 a5 5a c2 5a 1b c4 20 |n...`eZ.|T.Z.Z.. |
|00003250| c5 5a 0b 5e 1e 06 c7 1e | 08 60 60 0e 06 09 54 5f |.Z.^....|.``...T_|
|00003260| 5c 5c 64 5e 7c 88 8a 64 | 62 88 0e 08 0e 06 57 ab |\\d^|..d|b.....W.|
|00003270| 95 0e 08 54 16 08 c9 c5 | 09 5c 22 88 0e 08 0b 3d |...T....|.\"....=|
|00003280| ac 69 ca 63 88 aa 64 2c | c2 89 16 0b 87 22 20 5b |.i.c..d,|....." [|
|00003290| 74 65 2d 68 65 69 67 68 | 74 20 74 65 2d 77 69 64 |te-heigh|t te-wid|
|000032a0| 74 68 20 2d 31 20 6c 69 | 6e 65 20 74 65 2d 67 65 |th -1 li|ne te-ge|
|000032b0| 74 2d 63 68 61 72 20 33 | 32 20 6e 20 30 20 69 20 |t-char 3|2 n 0 i |
|000032c0| 69 6e 73 65 72 74 2d 63 | 68 61 72 20 31 30 20 74 |insert-c|har 10 t|
|000032d0| 65 2d 6d 6f 72 65 2d 63 | 6f 75 6e 74 5d 20 34 5d |e-more-c|ount] 4]|
|000032e0| 20 74 65 2d 62 65 67 69 | 6e 6e 69 6e 67 2d 6f 66 | te-begi|nning-of|
|000032f0| 2d 6c 69 6e 65 20 23 5b | 6e 69 6c 20 22 c0 79 88 |-line #[|nil ".y.|
|00003300| c1 87 22 20 5b 30 20 6e | 69 6c 5d 20 31 5d 20 74 |.." [0 n|il] 1] t|
|00003310| 65 2d 62 61 63 6b 77 61 | 72 64 2d 63 68 61 72 20 |e-backwa|rd-char |
|00003320| 23 5b 6e 69 6c 20 22 6e | 3f ad 83 c0 c1 21 87 22 |#[nil "n|?....!."|
|00003330| 20 5b 62 61 63 6b 77 61 | 72 64 2d 63 68 61 72 20 | [backwa|rd-char |
|00003340| 31 5d 20 32 5d 20 74 65 | 2d 66 6f 72 77 61 72 64 |1] 2] te|-forward|
|00003350| 2d 63 68 61 72 20 23 5b | 6e 69 6c 20 22 6c 3f ad |-char #[|nil "l?.|
|00003360| 82 c0 75 87 22 20 5b 31 | 5d 20 31 5d 20 74 65 2d |..u." [1|] 1] te-|
|00003370| 64 65 6c 65 74 65 20 23 | 5b 6e 69 6c 20 22 6e 3f |delete #|[nil "n?|
|00003380| ad 8a 60 53 60 7c 88 c0 | 63 88 c1 75 87 22 20 5b |..`S`|..|c..u." [|
|00003390| 33 32 20 2d 31 5d 20 32 | 5d 20 74 65 2d 62 65 65 |32 -1] 2|] te-bee|
|000033a0| 70 20 23 5b 6e 69 6c 20 | 22 c0 20 87 22 20 5b 62 |p #[nil |". ." [b|
|000033b0| 65 65 70 5d 20 31 5d 20 | 74 65 2d 69 6e 73 65 72 |eep] 1] |te-inser|
|000033c0| 74 2d 73 70 61 63 65 73 | 20 23 5b 6e 69 6c 20 22 |t-spaces| #[nil "|
|000033d0| 60 18 c1 20 c2 5a c3 7f | 88 60 08 5a 5e 89 1c c5 |`.. .Z..|.`.Z^...|
|000033e0| 58 ac 8d c6 0c 5b 21 88 | 08 62 88 c7 c2 0c 5c 22 |X....[!.|.b....\"|
|000033f0| 88 08 62 2a 87 22 20 5b | 70 20 74 65 2d 67 65 74 |..b*." [|p te-get|
|00003400| 2d 63 68 61 72 20 33 32 | 20 6e 69 6c 20 6e 20 30 |-char 32| nil n 0|
|00003410| 20 64 65 6c 65 74 65 2d | 63 68 61 72 20 69 6e 73 | delete-|char ins|
|00003420| 65 72 74 2d 63 68 61 72 | 5d 20 34 5d 20 74 65 2d |ert-char|] 4] te-|
|00003430| 64 65 6c 65 74 65 2d 63 | 68 61 72 20 23 5b 6e 69 |delete-c|har #[ni|
|00003440| 6c 20 22 60 18 c1 20 c2 | 5a c3 7f 88 60 08 5a 5e |l "`.. .|Z...`.Z^|
|00003450| 89 1c c5 58 ac 8c c6 c2 | 0c 5c 22 88 08 62 88 c7 |...X....|.\"..b..|
|00003460| 0c 21 88 08 62 2a 87 22 | 20 5b 70 20 74 65 2d 67 |.!..b*."| [p te-g|
|00003470| 65 74 2d 63 68 61 72 20 | 33 32 20 6e 69 6c 20 6e |et-char |32 nil n|
|00003480| 20 30 20 69 6e 73 65 72 | 74 2d 63 68 61 72 20 64 | 0 inser|t-char d|
|00003490| 65 6c 65 74 65 2d 63 68 | 61 72 5d 20 34 5d 20 74 |elete-ch|ar] 4] t|
|000034a0| 65 2d 6c 6f 73 69 6e 67 | 2d 75 6e 69 78 20 28 6c |e-losing|-unix (l|
|000034b0| 61 6d 62 64 61 20 6e 69 | 6c 29 20 74 65 2d 6f 75 |ambda ni|l) te-ou|
|000034c0| 74 70 75 74 2d 74 61 62 | 20 23 5b 6e 69 6c 20 22 |tput-tab| #[nil "|
|000034d0| 60 89 18 c1 79 88 60 5a | 1a c3 c4 5c 6e c5 5c 22 |`...y.`Z|...\n.\"|
|000034e0| 5a c6 7f 88 60 08 5a 5e | 1e 07 08 0e 07 5c 5c 62 |Z...`.Z^|.....\\b|
|000034f0| 2b 87 22 20 5b 70 20 30 | 20 78 20 38 20 6c 6f 67 |+." [p 0| x 8 log|
|00003500| 61 6e 64 20 37 20 6e 69 | 6c 20 6c 5d 20 35 5d 20 |and 7 ni|l l] 5] |
|00003510| 74 65 2d 66 69 6c 74 65 | 72 20 23 5b 28 70 72 6f |te-filte|r #[(pro|
|00003520| 63 65 73 73 20 73 74 72 | 69 6e 67 29 20 22 70 18 |cess str|ing) "p.|
|00003530| 09 1a c3 8e c4 0d 21 71 | 88 0e 06 62 88 c7 0e 08 |......!q|...b....|
|00003540| 21 ab 9c c9 0e 08 21 ac | 85 ca 16 08 aa 91 0e 08 |!.....!.|........|
|00003550| 71 88 64 62 88 cb 0e 0c | 21 88 c4 0d 21 71 88 0e |q.db....|!...!q..|
|00003560| 0d 0e 0c 43 a4 16 0d ce | 20 88 5c 6e 19 cf 70 d0 |...C....| .\n..p.|
|00003570| d1 20 21 3d 21 88 29 c4 | 0d 21 71 88 60 89 16 06 |. !=!.).|.!q.`...|
|00003580| 2b 87 22 20 5b 6f 62 75 | 66 20 6d 65 74 61 2d 66 |+." [obu|f meta-f|
|00003590| 6c 61 67 20 6d 20 28 28 | 73 65 74 2d 62 75 66 66 |lag m ((|set-buff|
|000035a0| 65 72 20 6f 62 75 66 29 | 29 20 70 72 6f 63 65 73 |er obuf)|) proces|
|000035b0| 73 2d 62 75 66 66 65 72 | 20 70 72 6f 63 65 73 73 |s-buffer| process|
|000035c0| 20 74 65 2d 73 61 76 65 | 64 2d 70 6f 69 6e 74 20 | te-save|d-point |
|000035d0| 62 75 66 66 65 72 70 20 | 74 65 2d 6c 6f 67 2d 62 |bufferp |te-log-b|
|000035e0| 75 66 66 65 72 20 62 75 | 66 66 65 72 2d 6e 61 6d |uffer bu|ffer-nam|
|000035f0| 65 20 6e 69 6c 20 69 6e | 73 65 72 74 2d 62 65 66 |e nil in|sert-bef|
|00003600| 6f 72 65 2d 6d 61 72 6b | 65 72 73 20 73 74 72 69 |ore-mark|ers stri|
|00003610| 6e 67 20 74 65 2d 70 65 | 6e 64 69 6e 67 2d 6f 75 |ng te-pe|nding-ou|
|00003620| 74 70 75 74 20 74 65 2d | 75 70 64 61 74 65 2d 70 |tput te-|update-p|
|00003630| 65 6e 64 69 6e 67 2d 6f | 75 74 70 75 74 2d 64 69 |ending-o|utput-di|
|00003640| 73 70 6c 61 79 20 74 65 | 2d 70 72 6f 63 65 73 73 |splay te|-process|
|00003650| 2d 6f 75 74 70 75 74 20 | 77 69 6e 64 6f 77 2d 62 |-output |window-b|
|00003660| 75 66 66 65 72 20 73 65 | 6c 65 63 74 65 64 2d 77 |uffer se|lected-w|
|00003670| 69 6e 64 6f 77 5d 20 34 | 5d 20 74 65 2d 70 72 6f |indow] 4|] te-pro|
|00003680| 63 65 73 73 2d 6f 75 74 | 70 75 74 20 23 5b 28 70 |cess-out|put #[(p|
|00003690| 72 65 65 6d 70 74 61 62 | 6c 65 29 20 22 c0 11 c2 |reemptab|le) "...|
|000036a0| c3 8d 88 c4 20 89 1d 1e | 06 0d c7 0e 06 21 89 16 |.... ...|.....!..|
|000036b0| 06 3d 3f ad 90 c8 0e 06 | 21 70 3d ab 6c c9 0e 06 |.=?.....|!p=.l...|
|000036c0| 60 5c 22 88 aa 64 2a 87 | 22 20 5b 74 20 70 72 65 |`\"..d*.|" [t pre|
|000036d0| 65 6d 70 74 61 62 6c 65 | 20 74 65 2d 70 72 6f 63 |emptable| te-proc|
|000036e0| 65 73 73 2d 6f 75 74 70 | 75 74 20 28 62 79 74 65 |ess-outp|ut (byte|
|000036f0| 2d 63 6f 64 65 20 22 c0 | 89 89 89 89 89 19 1a 1b |-code ".|........|
|00003700| 1c 1d 1e 06 0e 07 41 83 | 28 01 0d 14 0e 07 40 13 |......A.|(.....@.|
|00003710| 0e 07 41 40 89 15 0b 48 | 12 0b 54 89 13 0d 47 3d |..A@...H|..T...G=|
|00003720| ab 94 c8 0e 07 41 41 42 | 16 07 c8 13 0e 07 41 40 |.....AAB|......A@|
|00003730| 15 c9 20 88 aa 85 0e 07 | 0b a0 88 5c 6e ca 56 83 |.. .....|...\n.V.|
|00003740| fa 00 5c 6e cb 57 83 fa | 00 6c ab 9f 0b c8 3d ab |..\n.W..|.l....=.|
|00003750| 8e c8 cc cd 5c 6e 5c 22 | 0e 07 41 42 42 16 07 aa |....\n\"|..ABB...|
|00003760| 86 0e 07 0b 53 a0 88 ce | 20 88 82 16 01 0d ac 8e |....S...| .......|
|00003770| cf cd 21 88 5c 6e 63 88 | d0 cd 21 88 82 16 01 0c |..!.\nc.|..!.....|
|00003780| 0d 3d ab 83 09 ae 8b d1 | d2 0d 0b 23 89 11 ae 82 |.=......|...#....|
|00003790| 0d 47 1e 13 cf cd 21 88 | 5c 6e 63 88 60 12 c0 7f |.G....!.|\nc.`...|
|000037a0| 88 0e 13 0b 60 5c 6e 5a | 5c 5c 5e 16 13 5c 6e 62 |....`\nZ|\\^..\nb|
|000037b0| 88 0e 13 09 3d ab 82 c0 | 11 60 60 0e 13 0b 5a 5c |....=...|.``...Z\|
|000037c0| 5c 7c 88 0b c8 3d ab 8a | 0e 13 0d 47 3d ab 83 0d |\|...=..|...G=...|
|000037d0| aa 85 0d 0b 0e 13 4f 63 | 88 0e 13 0d 47 3d ab 8a |......Oc|....G=..|
|000037e0| c8 0e 07 41 41 42 16 07 | aa 86 0e 07 0e 13 a0 88 |...AAB..|........|
|000037f0| d0 0e 13 0b 5a 54 21 88 | 29 aa 9c 5c 6e d4 3d ab |....ZT!.|)..\n.=.|
|00003800| 8a d5 20 d6 9e 41 ae 8a | d7 aa 87 5c 6e d8 9e 41 |.. ..A..|...\n..A|
|00003810| ae 81 d7 20 88 d0 cd 21 | 88 0e 19 83 0d 00 da 20 |... ...!|....... |
|00003820| 83 0d 00 db dc dd 5c 22 | 88 82 0d 00 2e 06 c0 87 |......\"|........|
|00003830| 22 20 5b 6e 69 6c 20 6d | 61 74 63 68 70 6f 73 20 |" [nil m|atchpos |
|00003840| 63 68 61 72 20 73 74 61 | 72 74 20 6f 73 74 72 69 |char sta|rt ostri|
|00003850| 6e 67 20 73 74 72 69 6e | 67 20 62 75 66 66 65 72 |ng strin|g buffer|
|00003860| 2d 72 65 61 64 2d 6f 6e | 6c 79 20 74 65 2d 70 65 |-read-on|ly te-pe|
|00003870| 6e 64 69 6e 67 2d 6f 75 | 74 70 75 74 20 30 20 74 |nding-ou|tput 0 t|
|00003880| 65 2d 75 70 64 61 74 65 | 2d 70 65 6e 64 69 6e 67 |e-update|-pending|
|00003890| 2d 6f 75 74 70 75 74 2d | 64 69 73 70 6c 61 79 20 |-output-|display |
|000038a0| 33 31 20 32 35 35 20 6d | 61 6b 65 2d 73 74 72 69 |31 255 m|ake-stri|
|000038b0| 6e 67 20 31 20 74 65 2d | 6e 65 77 6c 69 6e 65 20 |ng 1 te-|newline |
|000038c0| 64 65 6c 65 74 65 2d 63 | 68 61 72 20 74 65 2d 72 |delete-c|har te-r|
|000038d0| 65 64 69 73 70 6c 61 79 | 2d 69 66 2d 6e 65 63 65 |edisplay|-if-nece|
|000038e0| 73 73 61 72 79 20 73 74 | 72 69 6e 67 2d 6d 61 74 |ssary st|ring-mat|
|000038f0| 63 68 20 22 5b 00 2d 1f | 7f 2d ff 5d 22 20 65 6e |ch "[.-.|.-.]" en|
|00003900| 64 20 31 36 20 74 65 2d | 67 65 74 2d 63 68 61 72 |d 16 te-|get-char|
|00003910| 20 28 28 36 31 20 2e 20 | 74 65 2d 6d 6f 76 65 2d | ((61 . |te-move-|
|00003920| 74 6f 2d 70 6f 73 69 74 | 69 6f 6e 29 20 28 39 39 |to-posit|ion) (99|
|00003930| 20 2e 20 74 65 2d 63 6c | 65 61 72 2d 72 65 73 74 | . te-cl|ear-rest|
|00003940| 2d 6f 66 2d 6c 69 6e 65 | 29 20 28 36 37 20 2e 20 |-of-line|) (67 . |
|00003950| 74 65 2d 63 6c 65 61 72 | 2d 72 65 73 74 2d 6f 66 |te-clear|-rest-of|
|00003960| 2d 73 63 72 65 65 6e 29 | 20 28 31 35 20 2e 20 74 |-screen)| (15 . t|
|00003970| 65 2d 69 6e 73 65 72 74 | 2d 6c 69 6e 65 73 29 20 |e-insert|-lines) |
|00003980| 28 31 31 20 2e 20 74 65 | 2d 64 65 6c 65 74 65 2d |(11 . te|-delete-|
|00003990| 6c 69 6e 65 73 29 20 28 | 31 20 2e 20 74 65 2d 62 |lines) (|1 . te-b|
|000039a0| 65 67 69 6e 6e 69 6e 67 | 2d 6f 66 2d 6c 69 6e 65 |eginning|-of-line|
|000039b0| 29 20 28 32 20 2e 20 74 | 65 2d 62 61 63 6b 77 61 |) (2 . t|e-backwa|
|000039c0| 72 64 2d 63 68 61 72 29 | 20 28 31 30 30 20 2e 20 |rd-char)| (100 . |
|000039d0| 74 65 2d 64 65 6c 65 74 | 65 2d 63 68 61 72 29 20 |te-delet|e-char) |
|000039e0| 28 39 35 20 2e 20 74 65 | 2d 69 6e 73 65 72 74 2d |(95 . te|-insert-|
|000039f0| 73 70 61 63 65 73 29 20 | 28 36 20 2e 20 74 65 2d |spaces) |(6 . te-|
|00003a00| 66 6f 72 77 61 72 64 2d | 63 68 61 72 29 20 28 37 |forward-|char) (7|
|00003a10| 20 2e 20 74 65 2d 62 65 | 65 70 29 20 28 31 30 20 | . te-be|ep) (10 |
|00003a20| 2e 20 74 65 2d 64 6f 77 | 6e 2d 76 65 72 74 69 63 |. te-dow|n-vertic|
|00003a30| 61 6c 6c 79 2d 6f 72 2d | 73 63 72 6f 6c 6c 29 20 |ally-or-|scroll) |
|00003a40| 28 31 32 20 2e 20 74 65 | 2d 63 6c 65 61 72 2d 73 |(12 . te|-clear-s|
|00003a50| 63 72 65 65 6e 29 29 20 | 74 65 2d 6c 6f 73 69 6e |creen)) |te-losin|
|00003a60| 67 2d 75 6e 69 78 20 28 | 28 31 30 20 2e 20 74 65 |g-unix (|(10 . te|
|00003a70| 2d 6e 65 77 6c 69 6e 65 | 29 20 28 31 32 37 20 2e |-newline|) (127 .|
|00003a80| 20 74 65 2d 64 65 6c 65 | 74 65 29 20 28 31 33 20 | te-dele|te) (13 |
|00003a90| 2e 20 74 65 2d 62 65 67 | 69 6e 6e 69 6e 67 2d 6f |. te-beg|inning-o|
|00003aa0| 66 2d 6c 69 6e 65 29 20 | 28 37 20 2e 20 74 65 2d |f-line) |(7 . te-|
|00003ab0| 62 65 65 70 29 20 28 38 | 20 2e 20 74 65 2d 62 61 |beep) (8| . te-ba|
|00003ac0| 63 6b 77 61 72 64 2d 63 | 68 61 72 29 20 28 39 20 |ckward-c|har) (9 |
|00003ad0| 2e 20 74 65 2d 6f 75 74 | 70 75 74 2d 74 61 62 29 |. te-out|put-tab)|
|00003ae0| 29 20 70 72 65 65 6d 70 | 74 61 62 6c 65 20 69 6e |) preemp|table in|
|00003af0| 70 75 74 2d 70 65 6e 64 | 69 6e 67 2d 70 20 74 68 |put-pend|ing-p th|
|00003b00| 72 6f 77 20 74 65 2d 70 | 72 6f 63 65 73 73 2d 6f |row te-p|rocess-o|
|00003b10| 75 74 70 75 74 20 74 5d | 20 37 29 20 73 65 6c 65 |utput t]| 7) sele|
|00003b20| 63 74 65 64 2d 77 69 6e | 64 6f 77 20 73 20 77 20 |cted-win|dow s w |
|00003b30| 6e 65 78 74 2d 77 69 6e | 64 6f 77 20 77 69 6e 64 |next-win|dow wind|
|00003b40| 6f 77 2d 62 75 66 66 65 | 72 20 73 65 74 2d 77 69 |ow-buffe|r set-wi|
|00003b50| 6e 64 6f 77 2d 70 6f 69 | 6e 74 5d 20 34 5d 20 74 |ndow-poi|nt] 4] t|
|00003b60| 65 2d 67 65 74 2d 63 68 | 61 72 20 23 5b 6e 69 6c |e-get-ch|ar #[nil|
|00003b70| 20 22 08 41 ab a1 08 40 | 08 41 40 19 1a 09 5c 6e | ".A...@|.A@...\n|
|00003b80| 48 5c 6e 54 89 12 09 47 | 3d ab 88 c3 08 41 41 42 |H\nT...G|=....AAB|
|00003b90| 10 aa 84 08 5c 6e a0 88 | 2a 87 c4 c5 8d 87 22 20 |....\n..|*....." |
|00003ba0| 5b 74 65 2d 70 65 6e 64 | 69 6e 67 2d 6f 75 74 70 |[te-pend|ing-outp|
|00003bb0| 75 74 20 73 74 72 69 6e | 67 20 73 74 61 72 74 20 |ut strin|g start |
|00003bc0| 30 20 63 68 61 72 20 28 | 62 79 74 65 2d 63 6f 64 |0 char (|byte-cod|
|00003bd0| 65 20 22 c0 09 21 1a c3 | 8e c4 09 c5 5c 22 88 c6 |e "..!..|....\"..|
|00003be0| 09 21 2a 87 22 20 5b 70 | 72 6f 63 65 73 73 2d 66 |.!*." [p|rocess-f|
|00003bf0| 69 6c 74 65 72 20 74 65 | 2d 70 72 6f 63 65 73 73 |ilter te|-process|
|00003c00| 20 66 69 6c 74 65 72 20 | 28 28 73 65 74 2d 70 72 | filter |((set-pr|
|00003c10| 6f 63 65 73 73 2d 66 69 | 6c 74 65 72 20 74 65 2d |ocess-fi|lter te-|
|00003c20| 70 72 6f 63 65 73 73 20 | 66 69 6c 74 65 72 29 29 |process |filter))|
|00003c30| 20 73 65 74 2d 70 72 6f | 63 65 73 73 2d 66 69 6c | set-pro|cess-fil|
|00003c40| 74 65 72 20 23 5b 28 70 | 20 73 29 20 22 08 47 c1 |ter #[(p| s) ".G.|
|00003c50| 3d ac 84 c1 08 44 12 c3 | c4 08 c5 48 5c 22 87 22 |=....D..|...H\"."|
|00003c60| 20 5b 73 20 31 20 74 65 | 2d 70 65 6e 64 69 6e 67 | [s 1 te|-pending|
|00003c70| 2d 6f 75 74 70 75 74 20 | 74 68 72 6f 77 20 63 68 |-output |throw ch|
|00003c80| 61 72 20 30 5d 20 34 5d | 20 61 63 63 65 70 74 2d |ar 0] 4]| accept-|
|00003c90| 70 72 6f 63 65 73 73 2d | 6f 75 74 70 75 74 5d 20 |process-|output] |
|00003ca0| 33 29 5d 20 33 5d 20 74 | 65 2d 72 65 64 69 73 70 |3)] 3] t|e-redisp|
|00003cb0| 6c 61 79 2d 69 66 2d 6e | 65 63 65 73 73 61 72 79 |lay-if-n|ecessary|
|00003cc0| 20 23 5b 28 6c 65 6e 67 | 74 68 29 20 22 08 09 5a | #[(leng|th) "..Z|
|00003cd0| 89 10 c2 58 ad 97 70 c3 | c4 20 21 3d ad 8f c5 20 |...X..p.|. !=... |
|00003ce0| ad 8b c6 20 88 c7 c2 21 | 88 0e 08 89 10 87 22 20 |... ...!|......" |
|00003cf0| 5b 74 65 2d 72 65 64 69 | 73 70 6c 61 79 2d 63 6f |[te-redi|splay-co|
|00003d00| 75 6e 74 20 6c 65 6e 67 | 74 68 20 30 20 77 69 6e |unt leng|th 0 win|
|00003d10| 64 6f 77 2d 62 75 66 66 | 65 72 20 73 65 6c 65 63 |dow-buff|er selec|
|00003d20| 74 65 64 2d 77 69 6e 64 | 6f 77 20 77 61 69 74 69 |ted-wind|ow waiti|
|00003d30| 6e 67 2d 66 6f 72 2d 75 | 73 65 72 2d 69 6e 70 75 |ng-for-u|ser-inpu|
|00003d40| 74 2d 70 20 74 65 2d 75 | 70 64 61 74 65 2d 70 65 |t-p te-u|pdate-pe|
|00003d50| 6e 64 69 6e 67 2d 6f 75 | 74 70 75 74 2d 64 69 73 |nding-ou|tput-dis|
|00003d60| 70 6c 61 79 20 73 69 74 | 2d 66 6f 72 20 74 65 72 |play sit|-for ter|
|00003d70| 6d 69 6e 61 6c 2d 72 65 | 64 69 73 70 6c 61 79 2d |minal-re|display-|
|00003d80| 69 6e 74 65 72 76 61 6c | 5d 20 33 5d 20 74 65 2d |interval|] 3] te-|
|00003d90| 75 70 64 61 74 65 2d 70 | 65 6e 64 69 6e 67 2d 6f |update-p|ending-o|
|00003da0| 75 74 70 75 74 2d 64 69 | 73 70 6c 61 79 20 23 5b |utput-di|splay #[|
|00003db0| 6e 69 6c 20 22 08 41 ac | 84 c1 12 aa 96 c3 20 89 |nil ".A.|...... .|
|00003dc0| 1c c5 57 ab 84 c1 12 aa | 89 c6 c7 0c c8 5c 5c c9 |..W.....|.....\\.|
|00003dd0| a5 5c 22 12 29 ca cb 20 | 21 87 22 20 5b 74 65 2d |.\".).. |!." [te-|
|00003de0| 70 65 6e 64 69 6e 67 2d | 6f 75 74 70 75 74 20 22 |pending-|output "|
|00003df0| 22 20 74 65 2d 70 65 6e | 64 69 6e 67 2d 6f 75 74 |" te-pen|ding-out|
|00003e00| 70 75 74 2d 69 6e 66 6f | 20 74 65 2d 70 65 6e 64 |put-info| te-pend|
|00003e10| 69 6e 67 2d 6f 75 74 70 | 75 74 2d 6c 65 6e 67 74 |ing-outp|ut-lengt|
|00003e20| 68 20 6c 65 6e 67 74 68 | 20 31 35 30 30 20 66 6f |h length| 1500 fo|
|00003e30| 72 6d 61 74 20 22 28 25 | 64 4b 20 63 68 61 72 73 |rmat "(%|dK chars|
|00003e40| 20 6f 75 74 70 75 74 20 | 70 65 6e 64 69 6e 67 29 | output |pending)|
|00003e50| 20 22 20 35 31 32 20 31 | 30 32 34 20 73 65 74 2d | " 512 1|024 set-|
|00003e60| 62 75 66 66 65 72 2d 6d | 6f 64 69 66 69 65 64 2d |buffer-m|odified-|
|00003e70| 70 20 62 75 66 66 65 72 | 2d 6d 6f 64 69 66 69 65 |p buffer|-modifie|
|00003e80| 64 2d 70 5d 20 35 5d 20 | 74 65 2d 73 65 6e 74 69 |d-p] 5] |te-senti|
|00003e90| 6e 65 6c 20 23 5b 28 70 | 72 6f 63 65 73 73 20 6d |nel #[(p|rocess m|
|00003ea0| 65 73 73 61 67 65 29 20 | 22 c0 09 21 c2 3d ae b9 |essage) |"..!.=..|
|00003eb0| c3 c4 09 21 21 3f ae b1 | 70 1d 8a c4 09 21 71 88 |...!!?..|p....!q.|
|00003ec0| c6 16 07 c8 20 88 64 62 | 88 c9 20 88 ca 20 88 cb |.... .db|.. .. ..|
|00003ed0| 0e 0c cd b1 03 88 29 0d | c4 09 21 3d ad 8a ce 20 |......).|..!=... |
|00003ee0| ad 86 64 62 88 cf d0 21 | 29 87 22 20 5b 70 72 6f |..db...!|)." [pro|
|00003ef0| 63 65 73 73 2d 73 74 61 | 74 75 73 20 70 72 6f 63 |cess-sta|tus proc|
|00003f00| 65 73 73 20 72 75 6e 20 | 62 75 66 66 65 72 2d 6e |ess run |buffer-n|
|00003f10| 61 6d 65 20 70 72 6f 63 | 65 73 73 2d 62 75 66 66 |ame proc|ess-buff|
|00003f20| 65 72 20 62 20 6e 69 6c | 20 62 75 66 66 65 72 2d |er b nil| buffer-|
|00003f30| 72 65 61 64 2d 6f 6e 6c | 79 20 66 75 6e 64 61 6d |read-onl|y fundam|
|00003f40| 65 6e 74 61 6c 2d 6d 6f | 64 65 20 64 65 6c 65 74 |ental-mo|de delet|
|00003f50| 65 2d 62 6c 61 6e 6b 2d | 6c 69 6e 65 73 20 64 65 |e-blank-|lines de|
|00003f60| 6c 65 74 65 2d 68 6f 72 | 69 7a 6f 6e 74 61 6c 2d |lete-hor|izontal-|
|00003f70| 73 70 61 63 65 20 22 5c | 6e 2a 2a 2a 2a 2a 2a 2a |space "\|n*******|
|00003f80| 5c 6e 22 20 6d 65 73 73 | 61 67 65 20 22 2a 2a 2a |\n" mess|age "***|
|00003f90| 2a 2a 2a 2a 5c 6e 22 20 | 77 61 69 74 69 6e 67 2d |****\n" |waiting-|
|00003fa0| 66 6f 72 2d 75 73 65 72 | 2d 69 6e 70 75 74 2d 70 |for-user|-input-p|
|00003fb0| 20 72 65 63 65 6e 74 65 | 72 20 2d 31 5d 20 33 5d | recente|r -1] 3]|
|00003fc0| 5d 20 32 29 0a 28 64 65 | 66 76 61 72 20 74 65 2d |] 2).(de|fvar te-|
|00003fd0| 73 74 74 79 2d 73 74 72 | 69 6e 67 20 22 73 74 74 |stty-str|ing "stt|
|00003fe0| 79 20 2d 6e 6c 20 6e 65 | 77 20 64 65 63 20 65 63 |y -nl ne|w dec ec|
|00003ff0| 68 6f 22 20 22 5c 0a 43 | 6f 6d 6d 61 6e 64 20 73 |ho" "\.C|ommand s|
|00004000| 74 72 69 6e 67 20 28 74 | 6f 20 62 65 20 69 6e 74 |tring (t|o be int|
|00004010| 65 72 70 72 65 74 65 64 | 20 62 79 20 5c 22 73 68 |erpreted| by \"sh|
|00004020| 5c 22 29 20 77 68 69 63 | 68 20 73 65 74 73 20 74 |\") whic|h sets t|
|00004030| 68 65 20 6d 6f 64 65 73 | 0a 6f 66 20 74 68 65 20 |he modes|.of the |
|00004040| 76 69 72 74 75 61 6c 20 | 74 65 72 6d 69 6e 61 6c |virtual |terminal|
|00004050| 20 74 6f 20 62 65 20 61 | 70 70 72 6f 70 72 69 61 | to be a|ppropria|
|00004060| 74 65 20 66 6f 72 20 69 | 6e 74 65 72 61 63 74 69 |te for i|nteracti|
|00004070| 76 65 20 75 73 65 2e 22 | 29 0a 28 64 65 66 76 61 |ve use."|).(defva|
|00004080| 72 20 65 78 70 6c 69 63 | 69 74 2d 73 68 65 6c 6c |r explic|it-shell|
|00004090| 2d 66 69 6c 65 2d 6e 61 | 6d 65 20 6e 69 6c 20 22 |-file-na|me nil "|
|000040a0| 5c 0a 2a 49 66 20 6e 6f | 6e 2d 6e 69 6c 2c 20 69 |\.*If no|n-nil, i|
|000040b0| 73 20 66 69 6c 65 20 6e | 61 6d 65 20 74 6f 20 75 |s file n|ame to u|
|000040c0| 73 65 20 66 6f 72 20 65 | 78 70 6c 69 63 69 74 6c |se for e|xplicitl|
|000040d0| 79 20 72 65 71 75 65 73 | 74 65 64 20 69 6e 66 65 |y reques|ted infe|
|000040e0| 72 69 6f 72 20 73 68 65 | 6c 6c 2e 22 29 0a 28 66 |rior she|ll.").(f|
|000040f0| 73 65 74 20 27 74 65 72 | 6d 69 6e 61 6c 2d 65 6d |set 'ter|minal-em|
|00004100| 75 6c 61 74 6f 72 20 23 | 5b 28 62 75 66 66 65 72 |ulator #|[(buffer|
|00004110| 20 70 72 6f 67 72 61 6d | 20 61 72 67 73 20 26 6f | program| args &o|
|00004120| 70 74 69 6f 6e 61 6c 20 | 77 69 64 74 68 20 68 65 |ptional |width he|
|00004130| 69 67 68 74 29 20 22 c0 | 09 21 88 5c 6e ac 87 c3 |ight) ".|.!.\n...|
|00004140| c4 20 21 c5 5a 12 0e 06 | ac 88 c7 c4 20 21 c5 5a |. !.Z...|.... !.Z|
|00004150| 16 06 c8 20 88 5c 6e 16 | 09 0e 06 16 5c 6e cb cc |... .\n.|....\n..|
|00004160| 0e 09 0e 5c 6e 23 cd 44 | 16 0e cf 1e 10 d1 20 88 |...\n#.D|...... .|
|00004170| 29 cf 1e 12 d3 70 21 89 | 16 12 ab 9c d4 cb d5 d6 |)....p!.|........|
|00004180| 0e 12 21 5c 22 21 ab 87 | d7 0e 12 21 88 aa 66 d8 |..!\"!..|...!..f.|
|00004190| d9 d6 0e 12 21 5c 22 88 | aa 5c 5c 29 da db dc 8f |....!\".|.\\)....|
|000041a0| 88 dd de 21 ab 88 df e0 | 21 88 e1 c5 21 88 e2 16 |...!....|!...!...|
|000041b0| 23 e4 0e 25 21 88 e6 e7 | 21 88 df e8 e9 0e 2a 21 |#..%!...|!.....*!|
|000041c0| eb e9 ec ed 0e 2e cf e2 | 24 ef 23 23 87 22 20 5b |........|$.##." [|
|000041d0| 73 77 69 74 63 68 2d 74 | 6f 2d 62 75 66 66 65 72 |switch-t|o-buffer|
|000041e0| 20 62 75 66 66 65 72 20 | 77 69 64 74 68 20 77 69 | buffer |width wi|
|000041f0| 6e 64 6f 77 2d 77 69 64 | 74 68 20 73 65 6c 65 63 |ndow-wid|th selec|
|00004200| 74 65 64 2d 77 69 6e 64 | 6f 77 20 31 20 68 65 69 |ted-wind|ow 1 hei|
|00004210| 67 68 74 20 77 69 6e 64 | 6f 77 2d 68 65 69 67 68 |ght wind|ow-heigh|
|00004220| 74 20 74 65 72 6d 69 6e | 61 6c 2d 6d 6f 64 65 20 |t termin|al-mode |
|00004230| 74 65 2d 77 69 64 74 68 | 20 74 65 2d 68 65 69 67 |te-width| te-heig|
|00004240| 68 74 20 66 6f 72 6d 61 | 74 20 22 45 6d 61 63 73 |ht forma|t "Emacs|
|00004250| 20 74 65 72 6d 69 6e 61 | 6c 20 25 64 78 25 64 3a | termina|l %dx%d:|
|00004260| 20 25 25 62 20 20 22 20 | 74 65 2d 70 65 6e 64 69 | %%b " |te-pendi|
|00004270| 6e 67 2d 6f 75 74 70 75 | 74 2d 69 6e 66 6f 20 6d |ng-outpu|t-info m|
|00004280| 6f 64 65 2d 6c 69 6e 65 | 2d 62 75 66 66 65 72 2d |ode-line|-buffer-|
|00004290| 69 64 65 6e 74 69 66 69 | 63 61 74 69 6f 6e 20 6e |identifi|cation n|
|000042a0| 69 6c 20 62 75 66 66 65 | 72 2d 72 65 61 64 2d 6f |il buffe|r-read-o|
|000042b0| 6e 6c 79 20 74 65 2d 63 | 6c 65 61 72 2d 73 63 72 |nly te-c|lear-scr|
|000042c0| 65 65 6e 20 70 72 6f 63 | 65 73 73 20 67 65 74 2d |een proc|ess get-|
|000042d0| 62 75 66 66 65 72 2d 70 | 72 6f 63 65 73 73 20 79 |buffer-p|rocess y|
|000042e0| 2d 6f 72 2d 6e 2d 70 20 | 22 4b 69 6c 6c 20 70 72 |-or-n-p |"Kill pr|
|000042f0| 6f 63 65 73 73 20 25 73 | 3f 20 22 20 70 72 6f 63 |ocess %s|? " proc|
|00004300| 65 73 73 2d 6e 61 6d 65 | 20 64 65 6c 65 74 65 2d |ess-name| delete-|
|00004310| 70 72 6f 63 65 73 73 20 | 65 72 72 6f 72 20 22 50 |process |error "P|
|00004320| 72 6f 63 65 73 73 20 25 | 73 20 6e 6f 74 20 6b 69 |rocess %|s not ki|
|00004330| 6c 6c 65 64 22 20 65 72 | 72 20 28 62 79 74 65 2d |lled" er|r (byte-|
|00004340| 63 6f 64 65 20 22 c0 c1 | 5c 6e 0b 0c ab 83 c5 aa |code "..|\n......|
|00004350| 81 c6 24 c7 c8 c9 ca cb | cc b0 07 1e 0d ce cf 21 |..$.....|.......!|
|00004360| ab 9d cf d0 0e 11 0e 12 | d3 d4 d5 d6 d7 70 d8 d9 |........|.....p..|
|00004370| da db dc 42 dd 0e 0d 42 | 44 26 0d 16 1e aa ae df |...B...B|D&......|
|00004380| d0 70 e0 e1 c0 e2 0e 23 | e4 0e 25 e6 50 21 e4 e7 |.p.....#|..%.P!..|
|00004390| 0e 0d 50 21 e8 e4 0e 11 | 0e 12 42 e9 23 25 25 16 |..P!....|..B.#%%.|
|000043a0| 1e ea 0e 1e d6 5c 22 88 | eb 0e 1e d9 5c 22 88 29 |.....\".|....\".)|
|000043b0| c0 87 22 20 5b 66 6f 72 | 6d 61 74 20 22 65 6d 61 |.." [for|mat "ema|
|000043c0| 63 73 2d 76 69 72 74 75 | 61 6c 3a 63 6f 23 25 64 |cs-virtu|al:co#%d|
|000043d0| 3a 6c 69 23 25 64 3a 25 | 73 22 20 74 65 2d 77 69 |:li#%d:%|s" te-wi|
|000043e0| 64 74 68 20 74 65 2d 68 | 65 69 67 68 74 20 74 65 |dth te-h|eight te|
|000043f0| 72 6d 69 6e 61 6c 2d 73 | 63 72 6f 6c 6c 69 6e 67 |rminal-s|crolling|
|00004400| 20 22 22 20 22 6e 73 3a | 22 20 22 63 6d 3d 5e 70 | "" "ns:|" "cm=^p|
|00004410| 3d 25 2b 20 25 2b 20 3a | 63 72 3d 5e 70 5e 61 3a |=%+ %+ :|cr=^p^a:|
|00004420| 6c 65 3d 5e 70 5e 62 3a | 6e 64 3d 5e 70 5e 66 3a |le=^p^b:|nd=^p^f:|
|00004430| 22 20 22 6e 77 3d 5e 6a | 3a 63 65 3d 5e 70 63 3a |" "nw=^j|:ce=^pc:|
|00004440| 63 64 3d 5e 70 43 3a 63 | 6c 3d 5e 70 5e 6c 3a 62 |cd=^pC:c|l=^p^l:b|
|00004450| 6c 3d 5e 70 5e 67 3a 22 | 20 22 49 43 3d 5e 70 5f |l=^p^g:"| "IC=^p_|
|00004460| 25 2b 20 3a 44 43 3d 5e | 70 64 25 2b 20 3a 41 4c |%+ :DC=^|pd%+ :AL|
|00004470| 3d 5e 70 5e 6f 25 2b 20 | 3a 44 4c 3d 5e 70 5e 6b |=^p^o%+ |:DL=^p^k|
|00004480| 25 2b 20 3a 22 20 22 4c | 50 3a 4e 46 3a 22 20 22 |%+ :" "L|P:NF:" "|
|00004490| 69 63 3d 5e 70 5f 21 3a | 64 63 3d 5e 70 64 21 3a |ic=^p_!:|dc=^pd!:|
|000044a0| 61 6c 3d 5e 70 5e 6f 21 | 3a 64 6c 3d 5e 70 5e 6b |al=^p^o!|:dl=^p^k|
|000044b0| 21 3a 68 6f 3d 5e 70 3d | 20 20 3a 22 20 22 69 6d |!:ho=^p=| :" "im|
|000044c0| 3d 3a 65 69 3d 3a 64 6d | 3d 3a 65 64 3d 3a 6d 69 |=:ei=:dm|=:ed=:mi|
|000044d0| 3a 64 6f 3d 5e 70 5e 6a | 3a 6e 6c 3d 5e 70 5e 6a |:do=^p^j|:nl=^p^j|
|000044e0| 3a 62 73 3a 22 20 74 65 | 72 6d 63 61 70 20 66 62 |:bs:" te|rmcap fb|
|000044f0| 6f 75 6e 64 70 20 73 74 | 61 72 74 2d 73 75 62 70 |oundp st|art-subp|
|00004500| 72 6f 63 65 73 73 20 22 | 74 65 72 6d 69 6e 61 6c |rocess "|terminal|
|00004510| 2d 65 6d 75 6c 61 74 6f | 72 22 20 70 72 6f 67 72 |-emulato|r" progr|
|00004520| 61 6d 20 61 72 67 73 20 | 63 68 61 6e 6e 65 6c 2d |am args |channel-|
|00004530| 74 79 70 65 20 74 65 72 | 6d 69 6e 61 6c 20 66 69 |type ter|minal fi|
|00004540| 6c 74 65 72 20 74 65 2d | 66 69 6c 74 65 72 20 62 |lter te-|filter b|
|00004550| 75 66 66 65 72 20 73 65 | 6e 74 69 6e 65 6c 20 74 |uffer se|ntinel t|
|00004560| 65 2d 73 65 6e 74 69 6e | 65 6c 20 6d 6f 64 69 66 |e-sentin|el modif|
|00004570| 79 2d 65 6e 76 69 72 6f | 6e 6d 65 6e 74 20 22 54 |y-enviro|nment "T|
|00004580| 45 52 4d 22 20 22 65 6d | 61 63 73 2d 76 69 72 74 |ERM" "em|acs-virt|
|00004590| 75 61 6c 22 20 22 54 45 | 52 4d 43 41 50 22 20 74 |ual" "TE|RMCAP" t|
|000045a0| 65 2d 70 72 6f 63 65 73 | 73 20 73 74 61 72 74 2d |e-proces|s start-|
|000045b0| 70 72 6f 63 65 73 73 20 | 22 2f 62 69 6e 2f 73 68 |process |"/bin/sh|
|000045c0| 22 20 22 2d 63 22 20 22 | 25 73 3b 20 65 78 65 63 |" "-c" "|%s; exec|
|000045d0| 20 25 73 20 54 45 52 4d | 3d 65 6d 61 63 73 2d 76 | %s TERM|=emacs-v|
|000045e0| 69 72 74 75 61 6c 20 25 | 73 20 25 73 22 20 74 65 |irtual %|s %s" te|
|000045f0| 2d 73 74 74 79 2d 73 74 | 72 69 6e 67 20 74 65 2d |-stty-st|ring te-|
|00004600| 71 75 6f 74 65 2d 61 72 | 67 2d 66 6f 72 2d 73 68 |quote-ar|g-for-sh|
|00004610| 20 65 78 65 63 2d 64 69 | 72 65 63 74 6f 72 79 20 | exec-di|rectory |
|00004620| 22 65 6e 76 22 20 22 54 | 45 52 4d 43 41 50 3d 22 |"env" "T|ERMCAP="|
|00004630| 20 6d 61 70 63 6f 6e 63 | 61 74 20 22 20 22 20 73 | mapconc|at " " s|
|00004640| 65 74 2d 70 72 6f 63 65 | 73 73 2d 66 69 6c 74 65 |et-proce|ss-filte|
|00004650| 72 20 73 65 74 2d 70 72 | 6f 63 65 73 73 2d 73 65 |r set-pr|ocess-se|
|00004660| 6e 74 69 6e 65 6c 5d 20 | 31 36 29 20 28 28 65 72 |ntinel] |16) ((er|
|00004670| 72 6f 72 20 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |ror (byt|e-code "|
|00004680| c0 20 88 c1 5c 6e 40 5c | 6e 41 5c 22 87 22 20 5b |. ..\n@\|nA\"." [|
|00004690| 66 75 6e 64 61 6d 65 6e | 74 61 6c 2d 6d 6f 64 65 |fundamen|tal-mode|
|000046a0| 20 73 69 67 6e 61 6c 20 | 65 72 72 5d 20 33 29 29 | signal |err] 3))|
|000046b0| 29 20 64 65 66 61 75 6c | 74 2d 76 61 6c 75 65 20 |) defaul|t-value |
|000046c0| 6d 65 74 61 2d 66 6c 61 | 67 20 6d 65 73 73 61 67 |meta-fla|g messag|
|000046d0| 65 20 22 4e 6f 74 65 3a | 20 20 4d 65 74 61 20 6b |e "Note:| Meta k|
|000046e0| 65 79 20 64 69 73 61 62 | 6c 65 64 20 64 75 65 20 |ey disab|led due |
|000046f0| 74 6f 20 6d 61 79 62 65 | 2d 65 76 65 6e 74 75 61 |to maybe|-eventua|
|00004700| 6c 6c 79 2d 72 65 70 61 | 72 61 62 6c 65 20 62 72 |lly-repa|rable br|
|00004710| 61 69 6e 64 61 6d 61 67 | 65 22 20 73 69 74 2d 66 |aindamag|e" sit-f|
|00004720| 6f 72 20 74 20 69 6e 68 | 69 62 69 74 2d 71 75 69 |or t inh|ibit-qui|
|00004730| 74 20 75 73 65 2d 6c 6f | 63 61 6c 2d 6d 61 70 20 |t use-lo|cal-map |
|00004740| 74 65 72 6d 69 6e 61 6c | 2d 6d 61 70 20 72 75 6e |terminal|-map run|
|00004750| 2d 68 6f 6f 6b 73 20 74 | 65 72 6d 69 6e 61 6c 2d |-hooks t|erminal-|
|00004760| 6d 6f 64 65 2d 68 6f 6f | 6b 20 22 45 6e 74 65 72 |mode-hoo|k "Enter|
|00004770| 69 6e 67 20 65 6d 61 63 | 73 20 74 65 72 6d 69 6e |ing emac|s termin|
|00004780| 61 6c 2d 65 6d 75 6c 61 | 74 6f 72 2e 2e 2e 20 20 |al-emula|tor... |
|00004790| 54 79 70 65 20 25 73 20 | 25 73 20 66 6f 72 20 68 |Type %s |%s for h|
|000047a0| 65 6c 70 22 20 73 69 6e | 67 6c 65 2d 6b 65 79 2d |elp" sin|gle-key-|
|000047b0| 64 65 73 63 72 69 70 74 | 69 6f 6e 20 74 65 72 6d |descript|ion term|
|000047c0| 69 6e 61 6c 2d 65 73 63 | 61 70 65 2d 63 68 61 72 |inal-esc|ape-char|
|000047d0| 20 6d 61 70 63 6f 6e 63 | 61 74 20 77 68 65 72 65 | mapconc|at where|
|000047e0| 2d 69 73 2d 69 6e 74 65 | 72 6e 61 6c 20 74 65 2d |-is-inte|rnal te-|
|000047f0| 65 73 63 61 70 65 2d 68 | 65 6c 70 20 74 65 72 6d |escape-h|elp term|
|00004800| 69 6e 61 6c 2d 65 73 63 | 61 70 65 2d 6d 61 70 20 |inal-esc|ape-map |
|00004810| 22 20 22 5d 20 31 30 20 | 22 5c 0a 55 6e 64 65 72 |" "] 10 |"\.Under|
|00004820| 20 61 20 64 69 73 70 6c | 61 79 2d 74 65 72 6d 69 | a displ|ay-termi|
|00004830| 6e 61 6c 20 65 6d 75 6c | 61 74 6f 72 20 69 6e 20 |nal emul|ator in |
|00004840| 42 55 46 46 45 52 2c 20 | 72 75 6e 20 50 52 4f 47 |BUFFER, |run PROG|
|00004850| 52 41 4d 20 6f 6e 20 61 | 72 67 75 6d 65 6e 74 73 |RAM on a|rguments|
|00004860| 20 41 52 47 53 2e 0a 41 | 52 47 53 20 69 73 20 61 | ARGS..A|RGS is a|
|00004870| 20 6c 69 73 74 20 6f 66 | 20 61 72 67 75 6d 65 6e | list of| argumen|
|00004880| 74 2d 73 74 72 69 6e 67 | 73 2e 20 20 52 65 6d 61 |t-string|s. Rema|
|00004890| 69 6e 69 6e 67 20 61 72 | 67 75 6d 65 6e 74 73 20 |ining ar|guments |
|000048a0| 61 72 65 20 57 49 44 54 | 48 20 61 6e 64 20 48 45 |are WIDT|H and HE|
|000048b0| 49 47 48 54 2e 0a 42 55 | 46 46 45 52 27 73 20 63 |IGHT..BU|FFER's c|
|000048c0| 6f 6e 74 65 6e 74 73 20 | 61 72 65 20 6d 61 64 65 |ontents |are made|
|000048d0| 20 61 6e 20 69 6d 61 67 | 65 20 6f 66 20 74 68 65 | an imag|e of the|
|000048e0| 20 64 69 73 70 6c 61 79 | 20 67 65 6e 65 72 61 74 | display| generat|
|000048f0| 65 64 20 62 79 20 74 68 | 61 74 20 70 72 6f 67 72 |ed by th|at progr|
|00004900| 61 6d 2c 0a 61 6e 64 20 | 61 6e 79 20 69 6e 70 75 |am,.and |any inpu|
|00004910| 74 20 74 79 70 65 64 20 | 77 68 65 6e 20 42 55 46 |t typed |when BUF|
|00004920| 46 45 52 20 69 73 20 74 | 68 65 20 63 75 72 72 65 |FER is t|he curre|
|00004930| 6e 74 20 45 6d 61 63 73 | 20 62 75 66 66 65 72 20 |nt Emacs| buffer |
|00004940| 69 73 20 73 65 6e 74 20 | 74 6f 20 74 68 61 74 0a |is sent |to that.|
|00004950| 70 72 6f 67 72 61 6d 20 | 61 6e 20 6b 65 79 62 6f |program |an keybo|
|00004960| 61 72 64 20 69 6e 70 75 | 74 2e 0a 0a 49 6e 74 65 |ard inpu|t...Inte|
|00004970| 72 61 63 74 69 76 65 6c | 79 2c 20 42 55 46 46 45 |ractivel|y, BUFFE|
|00004980| 52 20 64 65 66 61 75 6c | 74 73 20 74 6f 20 5c 22 |R defaul|ts to \"|
|00004990| 2a 74 65 72 6d 69 6e 61 | 6c 2a 5c 22 20 61 6e 64 |*termina|l*\" and|
|000049a0| 20 50 52 4f 47 52 41 4d | 20 61 6e 64 20 41 52 47 | PROGRAM| and ARG|
|000049b0| 53 0a 61 72 65 20 70 61 | 72 73 65 64 20 66 72 6f |S.are pa|rsed fro|
|000049c0| 6d 20 61 6e 20 69 6e 70 | 75 74 2d 73 74 72 69 6e |m an inp|ut-strin|
|000049d0| 67 20 75 73 69 6e 67 20 | 79 6f 75 72 20 75 73 75 |g using |your usu|
|000049e0| 61 6c 20 73 68 65 6c 6c | 2e 0a 57 49 44 54 48 20 |al shell|..WIDTH |
|000049f0| 61 6e 64 20 48 45 49 47 | 48 54 20 61 72 65 20 64 |and HEIG|HT are d|
|00004a00| 65 74 65 72 6d 69 6e 65 | 64 20 66 72 6f 6d 20 74 |etermine|d from t|
|00004a10| 68 65 20 73 69 7a 65 20 | 6f 66 20 74 68 65 20 63 |he size |of the c|
|00004a20| 75 72 72 65 6e 74 20 77 | 69 6e 64 6f 77 0a 2d 2d |urrent w|indow.--|
|00004a30| 20 57 49 44 54 48 20 77 | 69 6c 6c 20 62 65 20 6f | WIDTH w|ill be o|
|00004a40| 6e 65 20 6c 65 73 73 20 | 74 68 61 6e 20 74 68 65 |ne less |than the|
|00004a50| 20 77 69 6e 64 6f 77 27 | 73 20 77 69 64 74 68 2c | window'|s width,|
|00004a60| 20 48 45 49 47 48 54 20 | 77 69 6c 6c 20 62 65 20 | HEIGHT |will be |
|00004a70| 69 74 73 20 68 65 69 67 | 68 74 2e 0a 0a 54 6f 20 |its heig|ht...To |
|00004a80| 73 77 69 74 63 68 20 62 | 75 66 66 65 72 73 20 61 |switch b|uffers a|
|00004a90| 6e 64 20 6c 65 61 76 65 | 20 74 68 65 20 65 6d 75 |nd leave| the emu|
|00004aa0| 6c 61 74 6f 72 2c 20 6f | 72 20 74 6f 20 67 69 76 |lator, o|r to giv|
|00004ab0| 65 20 63 6f 6d 6d 61 6e | 64 73 0a 74 6f 20 74 68 |e comman|ds.to th|
|00004ac0| 65 20 65 6d 75 6c 61 74 | 6f 72 20 69 74 73 65 6c |e emulat|or itsel|
|00004ad0| 66 20 28 61 73 20 6f 70 | 70 6f 73 65 64 20 74 6f |f (as op|posed to|
|00004ae0| 20 74 68 65 20 70 72 6f | 67 72 61 6d 20 72 75 6e | the pro|gram run|
|00004af0| 6e 69 6e 67 20 75 6e 64 | 65 72 20 69 74 29 2c 0a |ning und|er it),.|
|00004b00| 74 79 70 65 20 43 6f 6e | 74 72 6f 6c 2d 5e 2e 20 |type Con|trol-^. |
|00004b10| 20 54 68 65 20 66 6f 6c | 6c 6f 77 69 6e 67 20 63 | The fol|lowing c|
|00004b20| 68 61 72 61 63 74 65 72 | 20 69 73 20 61 6e 20 65 |haracter| is an e|
|00004b30| 6d 75 6c 61 74 6f 72 20 | 63 6f 6d 6d 61 6e 64 2e |mulator |command.|
|00004b40| 0a 54 79 70 65 20 43 6f | 6e 74 72 6f 6c 2d 5e 20 |.Type Co|ntrol-^ |
|00004b50| 74 77 69 63 65 20 74 6f | 20 73 65 6e 64 20 69 74 |twice to| send it|
|00004b60| 20 74 6f 20 74 68 65 20 | 73 75 62 70 72 6f 67 72 | to the |subprogr|
|00004b70| 61 6d 2e 0a 54 68 69 73 | 20 65 73 63 61 70 65 20 |am..This| escape |
|00004b80| 63 68 61 72 61 63 74 65 | 72 20 6d 61 79 20 62 65 |characte|r may be|
|00004b90| 20 63 68 61 6e 67 65 64 | 20 75 73 69 6e 67 20 74 | changed| using t|
|00004ba0| 68 65 20 76 61 72 69 61 | 62 6c 65 20 60 74 65 72 |he varia|ble `ter|
|00004bb0| 6d 69 6e 61 6c 2d 65 73 | 63 61 70 65 2d 63 68 61 |minal-es|cape-cha|
|00004bc0| 72 27 2e 0a 0a 60 4d 65 | 74 61 27 20 63 68 61 72 |r'...`Me|ta' char|
|00004bd0| 61 63 74 65 72 73 20 6d | 61 79 20 6e 6f 74 20 63 |acters m|ay not c|
|00004be0| 75 72 72 65 6e 74 6c 79 | 20 62 65 20 73 65 6e 74 |urrently| be sent|
|00004bf0| 20 74 68 72 6f 75 67 68 | 20 74 68 65 20 74 65 72 | through| the ter|
|00004c00| 6d 69 6e 61 6c 20 65 6d | 75 6c 61 74 6f 72 2e 0a |minal em|ulator..|
|00004c10| 0a 48 65 72 65 20 69 73 | 20 61 20 6c 69 73 74 20 |.Here is| a list |
|00004c20| 6f 66 20 73 6f 6d 65 20 | 6f 66 20 74 68 65 20 76 |of some |of the v|
|00004c30| 61 72 69 61 62 6c 65 73 | 20 77 68 69 63 68 20 63 |ariables| which c|
|00004c40| 6f 6e 74 72 6f 6c 20 74 | 68 65 20 62 65 68 61 76 |ontrol t|he behav|
|00004c50| 69 6f 75 72 0a 6f 66 20 | 74 68 65 20 65 6d 75 6c |iour.of |the emul|
|00004c60| 61 74 6f 72 20 2d 2d 20 | 73 65 65 20 74 68 65 69 |ator -- |see thei|
|00004c70| 72 20 64 6f 63 75 6d 65 | 6e 74 61 74 69 6f 6e 20 |r docume|ntation |
|00004c80| 66 6f 72 20 6d 6f 72 65 | 20 69 6e 66 6f 72 6d 61 |for more| informa|
|00004c90| 74 69 6f 6e 3a 0a 74 65 | 72 6d 69 6e 61 6c 2d 65 |tion:.te|rminal-e|
|00004ca0| 73 63 61 70 65 2d 63 68 | 61 72 2c 20 74 65 72 6d |scape-ch|ar, term|
|00004cb0| 69 6e 61 6c 2d 73 63 72 | 6f 6c 6c 69 6e 67 2c 20 |inal-scr|olling, |
|00004cc0| 74 65 72 6d 69 6e 61 6c | 2d 6d 6f 72 65 2d 70 72 |terminal|-more-pr|
|00004cd0| 6f 63 65 73 73 69 6e 67 | 2c 0a 74 65 72 6d 69 6e |ocessing|,.termin|
|00004ce0| 61 6c 2d 72 65 64 69 73 | 70 6c 61 79 2d 69 6e 74 |al-redis|play-int|
|00004cf0| 65 72 76 61 6c 2e 0a 0a | 54 68 69 73 20 66 75 6e |erval...|This fun|
|00004d00| 63 74 69 6f 6e 20 63 61 | 6c 6c 73 20 74 68 65 20 |ction ca|lls the |
|00004d10| 76 61 6c 75 65 20 6f 66 | 20 74 65 72 6d 69 6e 61 |value of| termina|
|00004d20| 6c 2d 6d 6f 64 65 2d 68 | 6f 6f 6b 20 69 66 20 74 |l-mode-h|ook if t|
|00004d30| 68 61 74 20 65 78 69 73 | 74 73 0a 61 6e 64 20 69 |hat exis|ts.and i|
|00004d40| 73 20 6e 6f 6e 2d 6e 69 | 6c 20 61 66 74 65 72 20 |s non-ni|l after |
|00004d50| 74 68 65 20 74 65 72 6d | 69 6e 61 6c 20 62 75 66 |the term|inal buf|
|00004d60| 66 65 72 20 68 61 73 20 | 62 65 65 6e 20 73 65 74 |fer has |been set|
|00004d70| 20 75 70 20 61 6e 64 20 | 74 68 65 0a 73 75 62 70 | up and |the.subp|
|00004d80| 72 6f 63 65 73 73 20 73 | 74 61 72 74 65 64 2e 0a |rocess s|tarted..|
|00004d90| 0a 50 72 65 73 65 6e 74 | 6c 79 20 77 69 74 68 20 |.Present|ly with |
|00004da0| 60 74 65 72 6d 63 61 70 | 27 20 6f 6e 6c 79 3b 20 |`termcap|' only; |
|00004db0| 69 66 20 73 6f 6d 65 62 | 6f 64 79 20 73 65 6e 64 |if someb|ody send|
|00004dc0| 73 20 75 73 20 63 6f 64 | 65 20 74 6f 20 6d 61 6b |s us cod|e to mak|
|00004dd0| 65 20 74 68 69 73 0a 77 | 6f 72 6b 20 77 69 74 68 |e this.w|ork with|
|00004de0| 20 60 74 65 72 6d 69 6e | 66 6f 27 20 77 65 20 77 | `termin|fo' we w|
|00004df0| 69 6c 6c 20 74 72 79 20 | 74 6f 20 75 73 65 20 69 |ill try |to use i|
|00004e00| 74 2e 22 20 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |t." (byt|e-code "|
|00004e10| 8a c0 c1 21 71 88 c2 c3 | c4 21 ab 8a 0c ab 87 c5 |...!q...|.!......|
|00004e20| 0c 21 c6 3d ac 83 70 aa | 83 c7 c1 21 21 29 c8 0e |.!.=..p.|...!!)..|
|00004e30| 09 ae 8b ca cb 21 ae 86 | ca cc 21 ae 81 cd 1e 0e |.....!..|..!.....|
|00004e40| cf d0 d1 0e 0e 5c 22 21 | 89 1e 12 d3 9a ab 86 0e |.....\"!|........|
|00004e50| 0e d4 44 aa 84 d5 0e 12 | 21 2a 21 42 87 22 20 5b |..D.....|!*!B." [|
|00004e60| 67 65 74 2d 62 75 66 66 | 65 72 2d 63 72 65 61 74 |get-buff|er-creat|
|00004e70| 65 20 22 2a 74 65 72 6d | 69 6e 61 6c 2a 22 20 62 |e "*term|inal*" b|
|00004e80| 75 66 66 65 72 2d 6e 61 | 6d 65 20 62 6f 75 6e 64 |uffer-na|me bound|
|00004e90| 70 20 74 65 2d 70 72 6f | 63 65 73 73 20 70 72 6f |p te-pro|cess pro|
|00004ea0| 63 65 73 73 2d 73 74 61 | 74 75 73 20 72 75 6e 20 |cess-sta|tus run |
|00004eb0| 67 65 6e 65 72 61 74 65 | 2d 6e 65 77 2d 62 75 66 |generate|-new-buf|
|00004ec0| 66 65 72 20 61 70 70 65 | 6e 64 20 65 78 70 6c 69 |fer appe|nd expli|
|00004ed0| 63 69 74 2d 73 68 65 6c | 6c 2d 66 69 6c 65 2d 6e |cit-shel|l-file-n|
|00004ee0| 61 6d 65 20 67 65 74 65 | 6e 76 20 22 45 53 48 45 |ame gete|nv "ESHE|
|00004ef0| 4c 4c 22 20 22 53 48 45 | 4c 4c 22 20 22 2f 62 69 |LL" "SHE|LL" "/bi|
|00004f00| 6e 2f 73 68 22 20 64 65 | 66 61 75 6c 74 2d 73 20 |n/sh" de|fault-s |
|00004f10| 72 65 61 64 2d 73 74 72 | 69 6e 67 20 66 6f 72 6d |read-str|ing form|
|00004f20| 61 74 20 22 52 75 6e 20 | 70 72 6f 67 72 61 6d 20 |at "Run |program |
|00004f30| 69 6e 20 65 6d 75 6c 61 | 74 6f 72 3a 20 28 64 65 |in emula|tor: (de|
|00004f40| 66 61 75 6c 74 20 25 73 | 29 20 22 20 73 20 22 22 |fault %s|) " s ""|
|00004f50| 20 6e 69 6c 20 74 65 2d | 70 61 72 73 65 2d 70 72 | nil te-|parse-pr|
|00004f60| 6f 67 72 61 6d 2d 61 6e | 64 2d 61 72 67 73 5d 20 |ogram-an|d-args] |
|00004f70| 37 29 5d 29 0a 28 62 79 | 74 65 2d 63 6f 64 65 20 |7)]).(by|te-code |
|00004f80| 22 c0 c1 4d 88 c2 c3 c4 | c5 23 87 22 20 5b 74 65 |"..M....|.#." [te|
|00004f90| 2d 70 61 72 73 65 2d 70 | 72 6f 67 72 61 6d 2d 61 |-parse-p|rogram-a|
|00004fa0| 6e 64 2d 61 72 67 73 20 | 23 5b 28 73 29 20 22 c0 |nd-args |#[(s) ".|
|00004fb0| c1 5c 6e 5c 22 ab bb c3 | c4 1d 1e 06 0d ab a6 c0 |.\n\"...|........|
|00004fc0| c7 5c 6e 0d 23 ab 92 5c | 6e 0d c8 95 4f c4 95 89 |.\n.#..\|n...O...|
|00004fd0| 15 5c 6e 47 3d ab 8a c3 | 15 aa 86 5c 6e 0d c3 4f |.\nG=...|...\n..O|
|00004fe0| c3 15 0e 06 42 16 06 aa | 57 0e 06 9f 89 16 06 40 |....B...|W......@|
|00004ff0| 0e 06 41 2a 44 87 c0 c9 | 5c 6e 5c 22 ab 8e ca 5c |..A*D...|\n\"...\|
|00005000| 6e 21 ac 89 0e 0b cc cd | 5c 6e 50 44 44 87 5c 6e |n!......|\nPDD.\n|
|00005010| c3 44 87 22 20 5b 73 74 | 72 69 6e 67 2d 6d 61 74 |.D." [st|ring-mat|
|00005020| 63 68 20 22 5c 5c 60 5c | 5c 28 5b 61 2d 7a 41 2d |ch "\\`\|\([a-zA-|
|00005030| 5a 30 2d 39 2d 2b 3d 5f | 2e 40 2f 3a 5d 2b 5b 20 |Z0-9-+=_|.@/:]+[ |
|00005040| 09 5d 2a 5c 5c 29 2b 5c | 5c 27 22 20 73 20 6e 69 |.]*\\)+\|\'" s ni|
|00005050| 6c 20 30 20 70 20 6c 20 | 22 5c 5c 28 5b 61 2d 7a |l 0 p l |"\\([a-z|
|00005060| 41 2d 5a 30 2d 39 2d 2b | 3d 5f 2e 40 2f 3a 5d 2b |A-Z0-9-+|=_.@/:]+|
|00005070| 5c 5c 29 5c 5c 28 5b 20 | 09 5d 2b 5c 5c 29 2a 22 |\\)\\([ |.]+\\)*"|
|00005080| 20 31 20 22 5b 20 09 5d | 22 20 66 69 6c 65 2d 65 | 1 "[ .]|" file-e|
|00005090| 78 69 73 74 73 2d 70 20 | 73 68 65 6c 6c 2d 66 69 |xists-p |shell-fi|
|000050a0| 6c 65 2d 6e 61 6d 65 20 | 22 2d 63 22 20 22 65 78 |le-name |"-c" "ex|
|000050b0| 65 63 20 22 5d 20 35 5d | 20 70 75 74 20 74 65 72 |ec "] 5]| put ter|
|000050c0| 6d 69 6e 61 6c 2d 6d 6f | 64 65 20 6d 6f 64 65 2d |minal-mo|de mode-|
|000050d0| 63 6c 61 73 73 20 73 70 | 65 63 69 61 6c 5d 20 34 |class sp|ecial] 4|
|000050e0| 29 0a 28 66 73 65 74 20 | 27 74 65 72 6d 69 6e 61 |).(fset |'termina|
|000050f0| 6c 2d 6d 6f 64 65 20 23 | 5b 6e 69 6c 20 22 c0 20 |l-mode #|[nil ". |
|00005100| 88 c1 70 21 88 c2 13 c4 | 15 c6 16 07 c8 16 09 c8 |..p!....|........|
|00005110| 16 5c 6e cb cc 21 88 cd | cc 21 16 0c cb ce 21 88 |.\n..!..|.!....!.|
|00005120| cd ce 21 16 0e cb cf 21 | 88 cd cf 21 16 0f cb d0 |..!....!|...!....|
|00005130| 21 88 cd d0 21 16 10 cb | d1 21 88 cb d2 21 88 cb |!...!...|.!...!..|
|00005140| d3 21 88 cb d4 21 88 d5 | 43 16 14 cb d6 21 88 65 |.!...!..|C....!.e|
|00005150| 16 16 cb d7 21 88 d8 16 | 17 cb d9 21 88 cb da 21 |....!...|...!...!|
|00005160| 88 db 16 1a cb dc 21 88 | dd 16 1c cb de 21 88 0e |......!.|.....!..|
|00005170| 10 16 1e cb df 21 88 db | 89 16 1f 87 22 20 5b 6b |.....!..|...." [k|
|00005180| 69 6c 6c 2d 61 6c 6c 2d | 6c 6f 63 61 6c 2d 76 61 |ill-all-|local-va|
|00005190| 72 69 61 62 6c 65 73 20 | 62 75 66 66 65 72 2d 64 |riables |buffer-d|
|000051a0| 69 73 61 62 6c 65 2d 75 | 6e 64 6f 20 74 65 72 6d |isable-u|ndo term|
|000051b0| 69 6e 61 6c 2d 6d 6f 64 | 65 20 6d 61 6a 6f 72 2d |inal-mod|e major-|
|000051c0| 6d 6f 64 65 20 22 74 65 | 72 6d 69 6e 61 6c 22 20 |mode "te|rminal" |
|000051d0| 6d 6f 64 65 2d 6e 61 6d | 65 20 28 22 3a 20 25 73 |mode-nam|e (": %s|
|000051e0| 22 29 20 6d 6f 64 65 2d | 6c 69 6e 65 2d 70 72 6f |") mode-|line-pro|
|000051f0| 63 65 73 73 20 74 20 62 | 75 66 66 65 72 2d 72 65 |cess t b|uffer-re|
|00005200| 61 64 2d 6f 6e 6c 79 20 | 74 72 75 6e 63 61 74 65 |ad-only |truncate|
|00005210| 2d 6c 69 6e 65 73 20 6d | 61 6b 65 2d 6c 6f 63 61 |-lines m|ake-loca|
|00005220| 6c 2d 76 61 72 69 61 62 | 6c 65 20 74 65 72 6d 69 |l-variab|le termi|
|00005230| 6e 61 6c 2d 65 73 63 61 | 70 65 2d 63 68 61 72 20 |nal-esca|pe-char |
|00005240| 64 65 66 61 75 6c 74 2d | 76 61 6c 75 65 20 74 65 |default-|value te|
|00005250| 72 6d 69 6e 61 6c 2d 73 | 63 72 6f 6c 6c 69 6e 67 |rminal-s|crolling|
|00005260| 20 74 65 72 6d 69 6e 61 | 6c 2d 6d 6f 72 65 2d 70 | termina|l-more-p|
|00005270| 72 6f 63 65 73 73 69 6e | 67 20 74 65 72 6d 69 6e |rocessin|g termin|
|00005280| 61 6c 2d 72 65 64 69 73 | 70 6c 61 79 2d 69 6e 74 |al-redis|play-int|
|00005290| 65 72 76 61 6c 20 74 65 | 2d 77 69 64 74 68 20 74 |erval te|-width t|
|000052a0| 65 2d 68 65 69 67 68 74 | 20 74 65 2d 70 72 6f 63 |e-height| te-proc|
|000052b0| 65 73 73 20 74 65 2d 70 | 65 6e 64 69 6e 67 2d 6f |ess te-p|ending-o|
|000052c0| 75 74 70 75 74 20 30 20 | 74 65 2d 73 61 76 65 64 |utput 0 |te-saved|
|000052d0| 2d 70 6f 69 6e 74 20 74 | 65 2d 70 65 6e 64 69 6e |-point t|e-pendin|
|000052e0| 67 2d 6f 75 74 70 75 74 | 2d 69 6e 66 6f 20 22 22 |g-output|-info ""|
|000052f0| 20 69 6e 68 69 62 69 74 | 2d 71 75 69 74 20 74 65 | inhibit|-quit te|
|00005300| 2d 6c 6f 67 2d 62 75 66 | 66 65 72 20 6e 69 6c 20 |-log-buf|fer nil |
|00005310| 74 65 2d 6d 6f 72 65 2d | 63 6f 75 6e 74 20 2d 31 |te-more-|count -1|
|00005320| 20 74 65 2d 72 65 64 69 | 73 70 6c 61 79 2d 63 6f | te-redi|splay-co|
|00005330| 75 6e 74 20 6d 65 74 61 | 2d 66 6c 61 67 5d 20 32 |unt meta|-flag] 2|
|00005340| 20 22 5c 0a 53 65 74 20 | 75 70 20 76 61 72 69 61 | "\.Set |up varia|
|00005350| 62 6c 65 73 20 66 6f 72 | 20 75 73 65 20 66 20 74 |bles for| use f t|
|00005360| 68 65 20 74 65 72 6d 69 | 6e 61 6c 2d 65 6d 75 61 |he termi|nal-emua|
|00005370| 6c 74 6f 72 2e 0a 4f 6e | 65 20 73 68 6f 75 6c 64 |ltor..On|e should|
|00005380| 20 6e 6f 74 20 63 61 6c | 6c 20 74 68 69 73 20 2d | not cal|l this -|
|00005390| 2d 20 69 74 20 69 73 20 | 61 6e 20 69 6e 74 65 72 |- it is |an inter|
|000053a0| 6e 61 6c 20 66 75 6e 63 | 74 69 6f 6e 0a 6f 66 20 |nal func|tion.of |
|000053b0| 74 68 65 20 74 65 72 6d | 69 6e 61 6c 2d 65 6d 75 |the term|inal-emu|
|000053c0| 6c 61 74 6f 72 22 5d 29 | 0a 28 66 73 65 74 20 27 |lator"])|.(fset '|
|000053d0| 74 65 2d 71 75 6f 74 65 | 2d 61 72 67 2d 66 6f 72 |te-quote|-arg-for|
|000053e0| 2d 73 68 20 23 5b 28 66 | 75 63 6b 6d 65 29 20 22 |-sh #[(f|uckme) "|
|000053f0| c0 c1 5c 6e 5c 22 ab 82 | 5c 6e 87 c0 c3 5c 6e 5c |..\n\"..|\n...\n\|
|00005400| 22 ac 84 c4 5c 6e 21 87 | c5 c6 89 1e 07 1e 08 1e |"...\n!.|........|
|00005410| 09 0e 08 5c 6e 47 59 ac | b1 c0 ca 5c 6e 0e 08 23 |...\nGY.|...\n..#|
|00005420| 89 16 07 ac 8c 0e 09 5c | 6e 0e 08 cb 4f 50 16 09 |.......\|n...OP..|
|00005430| aa 9a 0e 09 5c 6e 0e 08 | 0e 07 4f cc 5c 6e 0e 07 |....\n..|..O.\n..|
|00005440| 89 54 4f 52 16 09 0e 07 | 54 89 16 08 aa 4a cd 0e |.TOR....|T....J..|
|00005450| 09 cd 51 2b 87 22 20 5b | 73 74 72 69 6e 67 2d 6d |..Q+." [|string-m|
|00005460| 61 74 63 68 20 22 5c 5c | 60 5b 61 2d 7a 41 2d 5a |atch "\\|`[a-zA-Z|
|00005470| 30 2d 39 2d 2b 3d 5f 2e | 40 2f 3a 5d 2b 5c 5c 27 |0-9-+=_.|@/:]+\\'|
|00005480| 22 20 66 75 63 6b 6d 65 | 20 22 5b 24 5d 22 20 70 |" fuckme| "[$]" p|
|00005490| 72 69 6e 31 2d 74 6f 2d | 73 74 72 69 6e 67 20 22 |rin1-to-|string "|
|000054a0| 22 20 30 20 73 74 75 70 | 69 64 20 63 72 65 74 69 |" 0 stup|id creti|
|000054b0| 6e 20 68 61 72 64 65 72 | 20 22 5b 5c 22 5c 5c 24 |n harder| "[\"\\$|
|000054c0| 5d 22 20 6e 69 6c 20 22 | 5c 5c 22 20 22 5c 22 22 |]" nil "|\\" "\""|
|000054d0| 5d 20 37 5d 29 0a | |] 7]). | |
+--------+-------------------------+-------------------------+--------+--------+
