InfoMagic Source Code 1993 July

home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / gnu / emacs-19.16 / lisp / term / wyse50.elc < prev next >
Emacs Compiled Lisp | 1993-07-05 | 2.0 KB
open in:
MacOS 8.1 |
Win98 |
DOS
view JSON data |
view as text

This file was processed as: Emacs Compiled Lisp (other/emacsCompiledLisp).
This format is not currently supported by dexvert.
Confidence	Program	Detection	Match Type	Support
`1%`	dexvert	Emacs Compiled Lisp `(other/emacsCompiledLisp)`	magic	Unsupported
`1%`	dexvert	Combustion 2 Particle Library `(other/combustion2ParticleLibrary)`	ext	Unsupported
`100%`	file	Emacs/XEmacs v19 byte-compiled Lisp data	default
`99%`	file	data	default
`100%`	TrID	Emacs/XEmacs byte-compiled Lisp (generic)	default
`100%`	xdgMime	text/x-emacs-lisp	default (weak)
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 69 6d 62 40 67 65 |piled by| jimb@ge|
|00000020| 65 63 68 2e 67 6e 75 2e | 61 69 2e 6d 69 74 2e 65 |ech.gnu.|ai.mit.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 4a 75 6c 20 20 36 |du on Tu|e Jul  6|
|00000040| 20 30 30 3a 32 36 3a 31 | 36 20 31 39 39 33 0a 3b | 00:26:1|6 1993.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 67 64 |;; from |file /gd|
|00000060| 2f 67 6e 75 2f 65 6d 61 | 63 73 2f 31 39 2e 30 2f |/gnu/ema|cs/19.0/|
|00000070| 6c 69 73 70 2f 74 65 72 | 6d 2f 77 79 73 65 35 30 |lisp/ter|m/wyse50|
|00000080| 2e 65 6c 0a 3b 3b 3b 20 | 65 6d 61 63 73 20 76 65 |.el.;;; |emacs ve|
|00000090| 72 73 69 6f 6e 20 31 39 | 2e 31 35 2e 31 36 2e 0a |rsion 19|.15.16..|
|000000a0| 3b 3b 3b 20 62 79 74 65 | 63 6f 6d 70 20 76 65 72 |;;; byte|comp ver|
|000000b0| 73 69 6f 6e 20 46 53 46 | 20 32 2e 31 30 0a 3b 3b |sion FSF| 2.10.;;|
|000000c0| 3b 20 6f 70 74 69 6d 69 | 7a 61 74 69 6f 6e 20 69 |; optimi|zation i|
|000000d0| 73 20 6f 6e 2e 0a 3b 3b | 3b 20 74 68 69 73 20 66 |s on..;;|; this f|
|000000e0| 69 6c 65 20 75 73 65 73 | 20 6f 70 63 6f 64 65 73 |ile uses| opcodes|
|000000f0| 20 77 68 69 63 68 20 64 | 6f 20 6e 6f 74 20 65 78 | which d|o not ex|
|00000100| 69 73 74 20 69 6e 20 45 | 6d 61 63 73 20 31 38 2e |ist in E|macs 18.|
|00000110| 0a 0a 28 69 66 20 28 61 | 6e 64 20 28 62 6f 75 6e |..(if (a|nd (boun|
|00000120| 64 70 20 27 65 6d 61 63 | 73 2d 76 65 72 73 69 6f |dp 'emac|s-versio|
|00000130| 6e 29 0a 09 20 28 6f 72 | 20 28 61 6e 64 20 28 62 |n).. (or| (and (b|
|00000140| 6f 75 6e 64 70 20 27 65 | 70 6f 63 68 3a 3a 76 65 |oundp 'e|poch::ve|
|00000150| 72 73 69 6f 6e 29 20 65 | 70 6f 63 68 3a 3a 76 65 |rsion) e|poch::ve|
|00000160| 72 73 69 6f 6e 29 0a 09 | 20 20 20 20 20 28 73 74 |rsion)..|     (st|
|00000170| 72 69 6e 67 2d 6c 65 73 | 73 70 20 65 6d 61 63 73 |ring-les|sp emacs|
|00000180| 2d 76 65 72 73 69 6f 6e | 20 22 31 39 22 29 29 29 |-version| "19")))|
|00000190| 0a 20 20 20 20 28 65 72 | 72 6f 72 20 22 54 68 69 |.    (er|ror "Thi|
|000001a0| 73 20 66 69 6c 65 20 77 | 61 73 20 63 6f 6d 70 69 |s file w|as compi|
|000001b0| 6c 65 64 20 66 6f 72 20 | 45 6d 61 63 73 20 31 39 |led for |Emacs 19|
|000001c0| 22 29 29 0a 0a 28 62 79 | 74 65 2d 63 6f 64 65 20 |"))..(by|te-code |
|000001d0| 22 c0 09 c2 c3 20 23 88 | c4 c5 c6 5c 22 87 22 20 |".... #.|...\"." |
|000001e0| 5b 64 65 66 69 6e 65 2d | 6b 65 79 20 66 75 6e 63 |[define-|key func|
|000001f0| 74 69 6f 6e 2d 6b 65 79 | 2d 6d 61 70 20 22 01 22 |tion-key|-map "."|
|00000200| 20 6d 61 6b 65 2d 6b 65 | 79 6d 61 70 20 6d 61 70 | make-ke|ymap map|
|00000210| 63 61 72 20 23 5b 28 6b | 65 79 2d 64 65 66 69 6e |car #[(k|ey-defin|
|00000220| 69 74 69 6f 6e 29 20 22 | c0 09 5c 6e 40 5c 6e 41 |ition) "|..\n@\nA|
|00000230| 40 23 87 22 20 5b 64 65 | 66 69 6e 65 2d 6b 65 79 |@#." [de|fine-key|
|00000240| 20 66 75 6e 63 74 69 6f | 6e 2d 6b 65 79 2d 6d 61 | functio|n-key-ma|
|00000250| 70 20 6b 65 79 2d 64 65 | 66 69 6e 69 74 69 6f 6e |p key-de|finition|
|00000260| 5d 20 34 5d 20 28 28 22 | 0b 22 20 5b 75 70 5d 29 |] 4] (("|." [up])|
|00000270| 20 28 22 5c 6e 22 20 5b | 64 6f 77 6e 5d 29 20 28 | ("\n" [|down]) (|
|00000280| 22 0c 22 20 5b 72 69 67 | 68 74 5d 29 20 28 22 08 |"." [rig|ht]) (".|
|00000290| 22 20 5b 6c 65 66 74 5d | 29 20 28 22 01 40 0d 22 |" [left]|) (".@."|
|000002a0| 20 5b 66 31 5d 29 20 28 | 22 01 41 0d 22 20 5b 66 | [f1]) (|".A." [f|
|000002b0| 32 5d 29 20 28 22 01 42 | 0d 22 20 5b 66 33 5d 29 |2]) (".B|." [f3])|
|000002c0| 20 28 22 01 43 0d 22 20 | 5b 66 34 5d 29 20 28 22 | (".C." |[f4]) ("|
|000002d0| 01 44 0d 22 20 5b 66 35 | 5d 29 20 28 22 01 45 0d |.D." [f5|]) (".E.|
|000002e0| 22 20 5b 66 36 5d 29 20 | 28 22 01 46 0d 22 20 5b |" [f6]) |(".F." [|
|000002f0| 66 37 5d 29 20 28 22 01 | 47 0d 22 20 5b 66 38 5d |f7]) (".|G." [f8]|
|00000300| 29 20 28 22 01 48 0d 22 | 20 5b 66 39 5d 29 20 28 |) (".H."| [f9]) (|
|00000310| 22 1b 4b 22 20 5b 6e 65 | 78 74 5d 29 20 28 22 1b |".K" [ne|xt]) (".|
|00000320| 54 22 20 5b 63 6c 65 61 | 72 6c 69 6e 65 5d 29 20 |T" [clea|rline]) |
|00000330| 28 22 1e 22 20 5b 68 6f | 6d 65 5d 29 20 28 22 1b |("." [ho|me]) (".|
|00000340| 1e 22 20 5b 65 6e 64 5d | 29 20 28 22 1b 51 22 20 |." [end]|) (".Q" |
|00000350| 5b 69 6e 73 65 72 74 5d | 29 20 28 22 1b 45 22 20 |[insert]|) (".E" |
|00000360| 5b 69 6e 73 65 72 74 6c | 69 6e 65 5d 29 20 28 22 |[insertl|ine]) ("|
|00000370| 1b 52 22 20 5b 64 65 6c | 65 74 65 6c 69 6e 65 5d |.R" [del|eteline]|
|00000380| 29 20 28 22 1b 50 22 20 | 5b 70 72 69 6e 74 5d 29 |) (".P" |[print])|
|00000390| 20 28 22 1b 72 22 20 5b | 72 65 70 6c 61 63 65 5d | (".r" [|replace]|
|000003a0| 29 20 28 22 01 49 0d 22 | 20 5b 66 31 30 5d 29 20 |) (".I."| [f10]) |
|000003b0| 28 22 01 4a 0d 22 20 5b | 66 31 31 5d 29 20 28 22 |(".J." [|f11]) ("|
|000003c0| 01 4b 0d 22 20 5b 66 31 | 32 5d 29 20 28 22 01 4c |.K." [f1|2]) (".L|
|000003d0| 0d 22 20 5b 66 31 33 5d | 29 20 28 22 01 4d 0d 22 |." [f13]|) (".M."|
|000003e0| 20 5b 66 31 34 5d 29 20 | 28 22 01 4e 0d 22 20 5b | [f14]) |(".N." [|
|000003f0| 66 31 35 5d 29 20 28 22 | 01 4f 0d 22 20 5b 66 31 |f15]) ("|.O." [f1|
|00000400| 36 5d 29 20 28 22 01 60 | 0d 22 20 5b 66 31 37 5d |6]) (".`|." [f17]|
|00000410| 29 20 28 22 01 61 0d 22 | 20 5b 66 31 38 5d 29 20 |) (".a."| [f18]) |
|00000420| 28 22 01 62 0d 22 20 5b | 66 31 39 5d 29 20 28 22 |(".b." [|f19]) ("|
|00000430| 01 63 0d 22 20 5b 66 32 | 30 5d 29 20 28 22 01 64 |.c." [f2|0]) (".d|
|00000440| 0d 22 20 5b 66 32 31 5d | 29 20 28 22 01 65 0d 22 |." [f21]|) (".e."|
|00000450| 20 5b 66 32 32 5d 29 20 | 28 22 01 66 0d 22 20 5b | [f22]) |(".f." [|
|00000460| 66 32 33 5d 29 20 28 22 | 01 67 0d 22 20 5b 66 32 |f23]) ("|.g." [f2|
|00000470| 34 5d 29 20 28 22 01 68 | 0d 22 20 5b 66 32 35 5d |4]) (".h|." [f25]|
|00000480| 29 20 28 22 01 69 0d 22 | 20 5b 66 32 36 5d 29 20 |) (".i."| [f26]) |
|00000490| 28 22 01 6a 0d 22 20 5b | 66 32 37 5d 29 20 28 22 |(".j." [|f27]) ("|
|000004a0| 01 6b 0d 22 20 5b 66 32 | 38 5d 29 20 28 22 01 6c |.k." [f2|8]) (".l|
|000004b0| 0d 22 20 5b 66 32 39 5d | 29 20 28 22 01 6d 0d 22 |." [f29]|) (".m."|
|000004c0| 20 5b 66 33 30 5d 29 20 | 28 22 01 6e 0d 22 20 5b | [f30]) |(".n." [|
|000004d0| 66 33 31 5d 29 20 28 22 | 01 6f 0d 22 20 5b 66 33 |f31]) ("|.o." [f3|
|000004e0| 32 5d 29 20 28 22 1b 49 | 22 20 5b 6b 65 79 2d 73 |2]) (".I|" [key-s|
|000004f0| 74 61 62 5d 29 20 28 22 | 1b 4a 22 20 5b 6b 65 79 |tab]) ("|.J" [key|
|00000500| 2d 73 6e 65 78 74 5d 29 | 20 28 22 1b 59 22 20 5b |-snext])| (".Y" [|
|00000510| 6b 65 79 2d 63 6c 65 61 | 72 5d 29 20 28 22 1b 57 |key-clea|r]) (".W|
|00000520| 22 20 5b 31 32 37 5d 29 | 20 28 22 01 0b 0d 22 20 |" [127])| ("..." |
|00000530| 5b 66 75 6e 63 74 2d 75 | 70 5d 29 20 28 22 01 5c |[funct-u|p]) (".\|
|00000540| 6e 0d 22 20 5b 66 75 6e | 63 74 2d 64 6f 77 6e 5d |n." [fun|ct-down]|
|00000550| 29 20 28 22 01 0c 0d 22 | 20 5b 66 75 6e 63 74 2d |) ("..."| [funct-|
|00000560| 72 69 67 68 74 5d 29 20 | 28 22 01 08 0d 22 20 5b |right]) |("..." [|
|00000570| 66 75 6e 63 74 2d 6c 65 | 66 74 5d 29 20 28 22 01 |funct-le|ft]) (".|
|00000580| 0d 0d 22 20 5b 66 75 6e | 63 74 2d 72 65 74 75 72 |.." [fun|ct-retur|
|00000590| 6e 5d 29 20 28 22 01 09 | 0d 22 20 5b 66 75 6e 63 |n]) ("..|." [func|
|000005a0| 74 2d 74 61 62 5d 29 29 | 5d 20 34 29 0a 28 64 65 |t-tab]))|] 4).(de|
|000005b0| 66 61 6c 69 61 73 20 27 | 65 6e 61 62 6c 65 2d 61 |falias '|enable-a|
|000005c0| 72 72 6f 77 2d 6b 65 79 | 73 20 23 5b 6e 69 6c 20 |rrow-key|s #[nil |
|000005d0| 22 c0 c1 c2 5c 22 88 c3 | c4 4d 87 22 20 5b 6d 61 |"...\"..|.M." [ma|
|000005e0| 70 63 61 72 20 23 5b 28 | 6b 65 79 2d 64 65 66 69 |pcar #[(|key-defi|
|000005f0| 6e 69 74 69 6f 6e 29 20 | 22 c0 09 40 09 41 40 5c |nition) |"..@.A@\|
|00000600| 22 87 22 20 5b 67 6c 6f | 62 61 6c 2d 73 65 74 2d |"." [glo|bal-set-|
|00000610| 6b 65 79 20 6b 65 79 2d | 64 65 66 69 6e 69 74 69 |key key-|definiti|
|00000620| 6f 6e 5d 20 33 5d 20 28 | 28 22 01 22 20 6e 69 6c |on] 3] (|("." nil|
|00000630| 29 20 28 22 0b 22 20 6e | 69 6c 29 20 28 22 5c 6e |) ("." n|il) ("\n|
|00000640| 22 20 6e 69 6c 29 20 28 | 22 0c 22 20 6e 69 6c 29 |" nil) (|"." nil)|
|00000650| 20 28 22 08 22 20 6e 69 | 6c 29 20 28 22 1b 72 22 | ("." ni|l) (".r"|
|00000660| 20 6e 69 6c 29 29 20 65 | 6e 61 62 6c 65 2d 61 72 | nil)) e|nable-ar|
|00000670| 72 6f 77 2d 6b 65 79 73 | 20 6e 69 6c 5d 20 33 20 |row-keys| nil] 3 |
|00000680| 22 5c 0a 54 6f 20 62 65 | 20 63 61 6c 6c 65 64 20 |"\.To be| called |
|00000690| 62 79 20 74 65 72 6d 2d | 73 65 74 75 70 2d 68 6f |by term-|setup-ho|
|000006a0| 6f 6b 2e 20 4f 76 65 72 | 72 69 64 65 73 20 36 20 |ok. Over|rides 6 |
|000006b0| 45 6d 61 63 73 20 73 74 | 61 6e 64 61 72 64 20 6b |Emacs st|andard k|
|000006c0| 65 79 73 0a 77 68 6f 73 | 65 20 66 75 6e 63 74 69 |eys.whos|e functi|
|000006d0| 6f 6e 73 20 61 72 65 20 | 74 68 65 6e 20 74 79 70 |ons are |then typ|
|000006e0| 65 64 20 61 73 20 66 6f | 6c 6c 6f 77 73 3a 0a 43 |ed as fo|llows:.C|
|000006f0| 2d 61 09 46 75 6e 63 74 | 20 4c 65 66 74 2d 61 72 |-a.Funct| Left-ar|
|00000700| 72 6f 77 0a 43 2d 68 09 | 4d 2d 3f 0a 4c 46 44 09 |row.C-h.|M-?.LFD.|
|00000710| 46 75 6e 63 74 20 52 65 | 74 75 72 6e 2c 20 73 6f |Funct Re|turn, so|
|00000720| 6d 65 20 6d 6f 64 65 73 | 20 6f 76 65 72 72 69 64 |me modes| overrid|
|00000730| 65 20 64 6f 77 6e 2d 61 | 72 72 6f 77 20 76 69 61 |e down-a|rrow via|
|00000740| 20 4c 46 44 0a 43 2d 6b | 09 43 4c 52 20 4c 69 6e | LFD.C-k|.CLR Lin|
|00000750| 65 0a 43 2d 6c 09 53 63 | 72 6e 20 43 4c 52 0a 4d |e.C-l.Sc|rn CLR.M|
|00000760| 2d 72 09 4d 2d 78 20 6d | 6f 76 65 2d 74 6f 2d 77 |-r.M-x m|ove-to-w|
|00000770| 69 6e 64 6f 77 2d 6c 69 | 6e 65 2c 20 46 75 6e 63 |indow-li|ne, Func|
|00000780| 74 20 75 70 2d 61 72 72 | 6f 77 20 6f 72 20 64 6f |t up-arr|ow or do|
|00000790| 77 6e 2d 61 72 72 6f 77 | 20 61 72 65 20 73 69 6d |wn-arrow| are sim|
|000007a0| 69 6c 61 72 0a 22 20 6e | 69 6c 5d 29 0a 28 62 79 |ilar." n|il]).(by|
|000007b0| 74 65 2d 63 6f 64 65 20 | 22 c0 11 c2 87 22 20 5b |te-code |"...." [|
|000007c0| 23 5b 6e 69 6c 20 22 c0 | c1 c2 20 54 c3 51 21 87 |#[nil ".|.. T.Q!.|
|000007d0| 22 20 5b 73 65 6e 64 2d | 73 74 72 69 6e 67 2d 74 |" [send-|string-t|
|000007e0| 6f 2d 74 65 72 6d 69 6e | 61 6c 20 22 1b 61 32 33 |o-termin|al ".a23|
|000007f0| 52 22 20 66 72 61 6d 65 | 2d 77 69 64 74 68 20 22 |R" frame|-width "|
|00000800| 43 1b 47 30 22 5d 20 34 | 20 6e 69 6c 20 6e 69 6c |C.G0"] 4| nil nil|
|00000810| 5d 20 6b 69 6c 6c 2d 65 | 6d 61 63 73 2d 68 6f 6f |] kill-e|macs-hoo|
|00000820| 6b 20 6e 69 6c 5d 20 31 | 29 0a                   |k nil] 1|).      |
+--------+-------------------------+-------------------------+--------+--------+