/ BCI NET 2 / BCI NET 2.iso / archives / programming / source / a2.0bemacs-src.lha / Emacs-19.25 / lisp / lucid.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6b 77 7a 68 40 68 61 |piled by| kwzh@ha|
|00000020| 6c 2e 67 6e 75 2e 61 69 | 2e 6d 69 74 2e 65 64 75 |l.gnu.ai|.mit.edu|
|00000030| 20 6f 6e 20 46 72 69 20 | 4d 61 79 20 20 36 20 31 | on Fri |May  6 1|
|00000040| 36 3a 33 34 3a 30 35 20 | 31 39 39 34 0a 3b 3b 3b |6:34:05 |1994.;;;|
|00000050| 20 66 72 6f 6d 20 66 69 | 6c 65 20 2f 67 64 2f 67 | from fi|le /gd/g|
|00000060| 6e 75 2f 65 6d 61 63 73 | 2f 31 39 2e 30 2f 6c 69 |nu/emacs|/19.0/li|
|00000070| 73 70 2f 6c 75 63 69 64 | 2e 65 6c 0a 3b 3b 3b 20 |sp/lucid|.el.;;; |
|00000080| 65 6d 61 63 73 20 76 65 | 72 73 69 6f 6e 20 31 39 |emacs ve|rsion 19|
|00000090| 2e 32 32 2e 39 33 2e 31 | 2e 0a 3b 3b 3b 20 62 79 |.22.93.1|..;;; by|
|000000a0| 74 65 63 6f 6d 70 20 76 | 65 72 73 69 6f 6e 20 46 |tecomp v|ersion F|
|000000b0| 53 46 20 32 2e 31 30 0a | 3b 3b 3b 20 6f 70 74 69 |SF 2.10.|;;; opti|
|000000c0| 6d 69 7a 61 74 69 6f 6e | 20 69 73 20 6f 6e 2e 0a |mization| is on..|
|000000d0| 3b 3b 3b 20 74 68 69 73 | 20 66 69 6c 65 20 75 73 |;;; this| file us|
|000000e0| 65 73 20 6f 70 63 6f 64 | 65 73 20 77 68 69 63 68 |es opcod|es which|
|000000f0| 20 64 6f 20 6e 6f 74 20 | 65 78 69 73 74 20 69 6e | do not |exist in|
|00000100| 20 45 6d 61 63 73 20 31 | 38 2e 0a 0a 28 69 66 20 | Emacs 1|8...(if |
|00000110| 28 61 6e 64 20 28 62 6f | 75 6e 64 70 20 27 65 6d |(and (bo|undp 'em|
|00000120| 61 63 73 2d 76 65 72 73 | 69 6f 6e 29 0a 09 20 28 |acs-vers|ion).. (|
|00000130| 6f 72 20 28 61 6e 64 20 | 28 62 6f 75 6e 64 70 20 |or (and |(boundp |
|00000140| 27 65 70 6f 63 68 3a 3a | 76 65 72 73 69 6f 6e 29 |'epoch::|version)|
|00000150| 20 65 70 6f 63 68 3a 3a | 76 65 72 73 69 6f 6e 29 | epoch::|version)|
|00000160| 0a 09 20 20 20 20 20 28 | 73 74 72 69 6e 67 2d 6c |..     (|string-l|
|00000170| 65 73 73 70 20 65 6d 61 | 63 73 2d 76 65 72 73 69 |essp ema|cs-versi|
|00000180| 6f 6e 20 22 31 39 22 29 | 29 29 0a 20 20 20 20 28 |on "19")|)).    (|
|00000190| 65 72 72 6f 72 20 22 60 | 2f 67 64 2f 67 6e 75 2f |error "`|/gd/gnu/|
|000001a0| 65 6d 61 63 73 2f 31 39 | 2e 30 2f 6c 69 73 70 2f |emacs/19|.0/lisp/|
|000001b0| 6c 75 63 69 64 2e 65 6c | 27 20 77 61 73 20 63 6f |lucid.el|' was co|
|000001c0| 6d 70 69 6c 65 64 20 66 | 6f 72 20 45 6d 61 63 73 |mpiled f|or Emacs|
|000001d0| 20 31 39 22 29 29 0a 0a | 28 62 79 74 65 2d 63 6f | 19"))..|(byte-co|
|000001e0| 64 65 20 22 c0 c1 c2 5c | 22 88 c0 c3 c4 5c 22 88 |de "...\|"....\".|
|000001f0| c0 c5 c6 5c 22 88 c0 c7 | c8 5c 22 88 c0 c9 ca 5c |...\"...|.\"....\|
|00000200| 22 88 c0 cb cc 5c 22 88 | c0 cd ce 5c 22 87 22 20 |"....\".|...\"." |
|00000210| 5b 64 65 66 61 6c 69 61 | 73 20 61 64 64 2d 74 69 |[defalia|s add-ti|
|00000220| 6d 65 6f 75 74 20 23 5b | 28 73 65 63 73 20 66 75 |meout #[|(secs fu|
|00000230| 6e 63 74 69 6f 6e 20 6f | 62 6a 65 63 74 20 26 6f |nction o|bject &o|
|00000240| 70 74 69 6f 6e 61 6c 20 | 72 65 73 69 67 6e 61 6c |ptional |resignal|
|00000250| 29 20 22 c0 09 5c 6e 0b | 5c 66 24 87 22 20 5b 72 |) "..\n.|\f$." [r|
|00000260| 75 6e 2d 61 74 2d 74 69 | 6d 65 20 73 65 63 73 20 |un-at-ti|me secs |
|00000270| 72 65 73 69 67 6e 61 6c | 20 66 75 6e 63 74 69 6f |resignal| functio|
|00000280| 6e 20 6f 62 6a 65 63 74 | 5d 20 35 5d 20 64 69 73 |n object|] 5] dis|
|00000290| 61 62 6c 65 2d 74 69 6d | 65 6f 75 74 20 23 5b 28 |able-tim|eout #[(|
|000002a0| 74 69 6d 65 6f 75 74 29 | 20 22 c0 09 21 87 22 20 |timeout)| "..!." |
|000002b0| 5b 63 61 6e 63 65 6c 2d | 74 69 6d 65 72 20 74 69 |[cancel-|timer ti|
|000002c0| 6d 65 6f 75 74 5d 20 32 | 5d 20 63 6f 70 79 2d 74 |meout] 2|] copy-t|
|000002d0| 72 65 65 20 23 5b 28 74 | 72 65 65 29 20 22 08 3a |ree #[(t|ree) ".:|
|000002e0| 83 0f 00 c1 08 40 21 c1 | 08 41 21 42 87 c2 08 21 |.....@!.|.A!B...!|
|000002f0| 83 36 00 c3 08 21 89 1c | 47 53 89 1d c6 59 83 33 |.6...!..|GS...Y.3|
|00000300| 00 5c 66 0d c1 5c 66 0d | 48 21 49 88 0d 53 89 15 |.\f..\f.|H!I..S..|
|00000310| 82 1e 00 5c 66 2a 87 08 | 87 22 20 5b 74 72 65 65 |...\f*..|." [tree|
|00000320| 20 63 6f 70 79 2d 74 72 | 65 65 20 76 65 63 74 6f | copy-tr|ee vecto|
|00000330| 72 70 20 63 6f 70 79 2d | 73 65 71 75 65 6e 63 65 |rp copy-|sequence|
|00000340| 20 6e 65 77 20 69 20 30 | 5d 20 36 5d 20 63 75 72 | new i 0|] 6] cur|
|00000350| 72 65 6e 74 2d 74 69 6d | 65 2d 73 65 63 6f 6e 64 |rent-tim|e-second|
|00000360| 73 20 63 75 72 72 65 6e | 74 2d 74 69 6d 65 20 6b |s curren|t-time k|
|00000370| 65 79 6d 61 70 2d 70 61 | 72 65 6e 74 20 23 5b 28 |eymap-pa|rent #[(|
|00000380| 6b 65 79 6d 61 70 29 20 | 22 08 41 89 19 83 15 00 |keymap) |".A.....|
|00000390| 09 40 c0 3d 84 15 00 09 | 41 89 11 84 07 00 09 29 |.@.=....|A......)|
|000003a0| 87 22 20 5b 6b 65 79 6d | 61 70 20 74 61 69 6c 5d |." [keym|ap tail]|
|000003b0| 20 33 5d 20 73 65 74 2d | 6b 65 79 6d 61 70 2d 70 | 3] set-|keymap-p|
|000003c0| 61 72 65 6e 74 20 23 5b | 28 6b 65 79 6d 61 70 20 |arent #[|(keymap |
|000003d0| 6e 65 77 2d 70 61 72 65 | 6e 74 29 20 22 08 41 89 |new-pare|nt) ".A.|
|000003e0| 19 83 1b 00 09 41 83 1b | 00 09 41 40 c0 3d 84 1b |.....A..|..A@.=..|
|000003f0| 00 09 41 89 11 84 07 00 | 09 85 5c 22 00 09 5c 6e |..A.....|..\"..\n|
|00000400| a1 29 87 22 20 5b 6b 65 | 79 6d 61 70 20 74 61 69 |.)." [ke|ymap tai|
|00000410| 6c 20 6e 65 77 2d 70 61 | 72 65 6e 74 5d 20 33 5d |l new-pa|rent] 3]|
|00000420| 20 72 65 6d 70 72 6f 70 | 20 23 5b 28 73 79 6d 62 | remprop| #[(symb|
|00000430| 6f 6c 20 70 72 6f 70 29 | 20 22 c0 09 21 1a 5c 6e |ol prop)| "..!.\n|
|00000440| 40 0b 3d 83 17 00 c4 09 | 5c 6e 41 41 89 12 5c 22 |@.=.....|\nAA..\"|
|00000450| 88 82 04 00 5c 6e 85 33 | 00 c5 5c 6e 38 0b 3d 83 |....\n.3|..\n8.=.|
|00000460| 2a 00 5c 6e 41 c6 5c 6e | 9b a1 88 5c 6e 41 41 89 |*.\nA.\n|...\nAA.|
|00000470| 12 84 1b 00 c7 29 87 22 | 20 5b 73 79 6d 62 6f 6c |.....)."| [symbol|
|00000480| 2d 70 6c 69 73 74 20 73 | 79 6d 62 6f 6c 20 70 6c |-plist s|ymbol pl|
|00000490| 69 73 74 20 70 72 6f 70 | 20 73 65 74 70 6c 69 73 |ist prop| setplis|
|000004a0| 74 20 32 20 34 20 6e 69 | 6c 5d 20 35 5d 5d 20 33 |t 2 4 ni|l] 5]] 3|
|000004b0| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 6d 61 70 |).(defal|ias 'map|
|000004c0| 2d 6b 65 79 6d 61 70 20 | 23 5b 28 66 75 6e 63 74 |-keymap |#[(funct|
|000004d0| 69 6f 6e 20 6b 65 79 6d | 61 70 20 26 6f 70 74 69 |ion keym|ap &opti|
|000004e0| 6f 6e 61 6c 20 73 6f 72 | 74 2d 66 69 72 73 74 29 |onal sor|t-first)|
|000004f0| 20 22 08 83 28 00 c1 1a | c3 c4 0d 5c 22 88 c6 5c | "..(...|...\"..\|
|00000500| 6e c7 5c 22 89 12 85 26 | 00 0e 08 5c 6e 40 40 5c |n.\"...&|...\n@@\|
|00000510| 6e 40 41 5c 22 88 5c 6e | 41 89 12 84 14 00 c1 29 |n@A\".\n|A......)|
|00000520| 87 0d 3a 85 73 00 0d 40 | 3a 83 40 00 0e 08 0d 40 |..:.s..@|:.@....@|
|00000530| 40 0d 40 41 5c 22 88 82 | 6c 00 c9 0d 40 21 83 6c |@.@A\"..|l...@!.l|
|00000540| 00 0d 40 47 53 0d 40 1e | 5c 6e 89 1e 0b cc 59 83 |..@GS.@.|\n....Y.|
|00000550| 6b 00 0e 08 0e 0b 0e 5c | 6e 0e 0b 48 5c 22 88 0e |k......\|n..H\"..|
|00000560| 0b 53 89 16 0b 82 52 00 | 2a 0d 41 89 15 82 29 00 |.S....R.|*.A...).|
|00000570| 87 22 20 5b 73 6f 72 74 | 2d 66 69 72 73 74 20 6e |." [sort|-first n|
|00000580| 69 6c 20 6c 69 73 74 20 | 6d 61 70 2d 6b 65 79 6d |il list |map-keym|
|00000590| 61 70 20 23 5b 28 61 20 | 62 29 20 22 08 09 42 5c |ap #[(a |b) "..B\|
|000005a0| 6e 42 89 12 87 22 20 5b | 61 20 62 20 6c 69 73 74 |nB..." [|a b list|
|000005b0| 5d 20 32 5d 20 6b 65 79 | 6d 61 70 20 73 6f 72 74 |] 2] key|map sort|
|000005c0| 20 23 5b 28 61 20 62 29 | 20 22 08 40 10 09 40 11 | #[(a b)| ".@..@.|
|000005d0| 08 a8 83 16 00 09 a8 83 | 14 00 08 09 57 87 c2 87 |........|....W...|
|000005e0| 09 a8 83 1d 00 c2 87 08 | 09 99 87 22 20 5b 61 20 |........|..." [a |
|000005f0| 62 20 74 5d 20 32 5d 20 | 66 75 6e 63 74 69 6f 6e |b t] 2] |function|
|00000600| 20 76 65 63 74 6f 72 70 | 20 76 65 63 74 6f 72 20 | vectorp| vector |
|00000610| 69 20 30 5d 20 35 20 22 | 5c 0a 43 61 6c 6c 20 46 |i 0] 5 "|\.Call F|
|00000620| 55 4e 43 54 49 4f 4e 20 | 66 6f 72 20 65 76 65 72 |UNCTION |for ever|
|00000630| 79 20 62 69 6e 64 69 6e | 67 20 69 6e 20 4b 45 59 |y bindin|g in KEY|
|00000640| 4d 41 50 2e 0a 54 68 69 | 73 20 69 6e 63 6c 75 64 |MAP..Thi|s includ|
|00000650| 65 73 20 62 69 6e 64 69 | 6e 67 73 20 69 6e 68 65 |es bindi|ngs inhe|
|00000660| 72 69 74 65 64 20 66 72 | 6f 6d 20 61 20 70 61 72 |rited fr|om a par|
|00000670| 65 6e 74 20 6b 65 79 6d | 61 70 2e 0a 46 55 4e 43 |ent keym|ap..FUNC|
|00000680| 54 49 4f 4e 20 72 65 63 | 65 69 76 65 73 20 74 77 |TION rec|eives tw|
|00000690| 6f 20 61 72 67 75 6d 65 | 6e 74 73 20 65 61 63 68 |o argume|nts each|
|000006a0| 20 74 69 6d 65 20 69 74 | 20 69 73 20 63 61 6c 6c | time it| is call|
|000006b0| 65 64 3a 0a 74 68 65 20 | 63 68 61 72 61 63 74 65 |ed:.the |characte|
|000006c0| 72 20 28 6d 6f 72 65 20 | 67 65 6e 65 72 61 6c 6c |r (more |generall|
|000006d0| 79 2c 20 74 68 65 20 65 | 76 65 6e 74 20 74 79 70 |y, the e|vent typ|
|000006e0| 65 29 20 74 68 61 74 20 | 69 73 20 62 6f 75 6e 64 |e) that |is bound|
|000006f0| 2c 0a 61 6e 64 20 74 68 | 65 20 62 69 6e 64 69 6e |,.and th|e bindin|
|00000700| 67 20 69 74 20 68 61 73 | 2e 0a 0a 4e 6f 74 65 20 |g it has|...Note |
|00000710| 74 68 61 74 20 70 61 73 | 73 69 6e 67 20 74 68 65 |that pas|sing the|
|00000720| 20 65 76 65 6e 74 20 74 | 79 70 65 20 64 69 72 65 | event t|ype dire|
|00000730| 63 74 6c 79 20 74 6f 20 | 60 64 65 66 69 6e 65 2d |ctly to |`define-|
|00000740| 6b 65 79 27 20 64 6f 65 | 73 20 6e 6f 74 20 77 6f |key' doe|s not wo|
|00000750| 72 6b 0a 69 6e 20 45 6d | 61 63 73 20 31 39 2e 20 |rk.in Em|acs 19. |
|00000760| 20 57 65 20 64 6f 20 6e | 6f 74 20 65 6d 75 6c 61 | We do n|ot emula|
|00000770| 74 65 20 74 68 61 74 20 | 70 61 72 74 69 63 75 6c |te that |particul|
|00000780| 61 72 20 66 65 61 74 75 | 72 65 20 6f 66 20 4c 75 |ar featu|re of Lu|
|00000790| 63 69 64 20 45 6d 61 63 | 73 2e 0a 49 66 20 79 6f |cid Emac|s..If yo|
|000007a0| 75 72 20 63 6f 64 65 20 | 64 6f 65 73 20 74 68 61 |ur code |does tha|
|000007b0| 74 2c 20 6d 6f 64 69 66 | 79 20 69 74 20 74 6f 20 |t, modif|y it to |
|000007c0| 6d 61 6b 65 20 61 20 76 | 65 63 74 6f 72 20 63 6f |make a v|ector co|
|000007d0| 6e 74 61 69 6e 69 6e 67 | 20 74 68 65 20 65 76 65 |ntaining| the eve|
|000007e0| 6e 74 0a 74 79 70 65 20 | 74 68 61 74 20 79 6f 75 |nt.type |that you|
|000007f0| 20 67 65 74 2e 20 20 54 | 68 61 74 20 77 69 6c 6c | get.  T|hat will|
|00000800| 20 77 6f 72 6b 20 69 6e | 20 62 6f 74 68 20 76 65 | work in| both ve|
|00000810| 72 73 69 6f 6e 73 20 6f | 66 20 45 6d 61 63 73 2e |rsions o|f Emacs.|
|00000820| 22 5d 29 0a 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |"]).(byt|e-code "|
|00000830| c0 c1 c2 5c 22 88 c0 c3 | c4 5c 22 87 22 20 5b 64 |...\"...|.\"." [d|
|00000840| 65 66 61 6c 69 61 73 20 | 72 65 61 6c 2d 70 61 74 |efalias |real-pat|
|00000850| 68 2d 6e 61 6d 65 20 23 | 5b 28 6e 61 6d 65 20 26 |h-name #|[(name &|
|00000860| 6f 70 74 69 6f 6e 61 6c | 20 64 65 66 61 75 6c 74 |optional| default|
|00000870| 29 20 22 c0 c1 5c 6e 0b | 5c 22 21 87 22 20 5b 66 |) "..\n.|\"!." [f|
|00000880| 69 6c 65 2d 74 72 75 65 | 6e 61 6d 65 20 65 78 70 |ile-true|name exp|
|00000890| 61 6e 64 2d 66 69 6c 65 | 2d 6e 61 6d 65 20 6e 61 |and-file|-name na|
|000008a0| 6d 65 20 64 65 66 61 75 | 6c 74 5d 20 34 5d 20 72 |me defau|lt] 4] r|
|000008b0| 65 61 64 2d 6d 6f 75 73 | 65 2d 70 6f 73 69 74 69 |ead-mous|e-positi|
|000008c0| 6f 6e 20 23 5b 28 66 72 | 61 6d 65 29 20 22 c0 20 |on #[(fr|ame) ". |
|000008d0| 89 19 40 5c 6e 3d 85 5c | 66 00 09 41 29 87 22 20 |..@\n=.\|f..A)." |
|000008e0| 5b 6d 6f 75 73 65 2d 70 | 6f 73 69 74 69 6f 6e 20 |[mouse-p|osition |
|000008f0| 70 6f 73 20 66 72 61 6d | 65 5d 20 33 5d 5d 20 33 |pos fram|e] 3]] 3|
|00000900| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 73 77 69 |).(defal|ias 'swi|
|00000910| 74 63 68 2d 74 6f 2d 6f | 74 68 65 72 2d 62 75 66 |tch-to-o|ther-buf|
|00000920| 66 65 72 20 23 5b 28 61 | 72 67 29 20 22 08 c1 3d |fer #[(a|rg) "..=|
|00000930| 83 5c 6e 00 c2 70 21 88 | c3 08 c4 58 83 17 00 c5 |.\n..p!.|...X....|
|00000940| 70 21 82 5c 22 00 08 54 | c6 c7 c8 c9 ca 20 5c 22 |p!.\"..T|..... \"|
|00000950| 5c 22 38 21 87 22 20 5b | 61 72 67 20 30 20 62 75 |\"8!." [|arg 0 bu|
|00000960| 72 79 2d 62 75 66 66 65 | 72 20 73 77 69 74 63 68 |ry-buffe|r switch|
|00000970| 2d 74 6f 2d 62 75 66 66 | 65 72 20 31 20 6f 74 68 |-to-buff|er 1 oth|
|00000980| 65 72 2d 62 75 66 66 65 | 72 20 61 70 70 6c 79 20 |er-buffe|r apply |
|00000990| 6e 63 6f 6e 63 20 6d 61 | 70 63 61 72 20 23 5b 28 |nconc ma|pcar #[(|
|000009a0| 62 75 66 29 20 22 c0 c1 | 5c 6e 21 21 c3 55 3f 85 |buf) "..|\n!!.U?.|
|000009b0| 0d 00 5c 6e 43 87 22 20 | 5b 73 74 72 69 6e 67 2d |..\nC." |[string-|
|000009c0| 74 6f 2d 63 68 61 72 20 | 62 75 66 66 65 72 2d 6e |to-char |buffer-n|
|000009d0| 61 6d 65 20 62 75 66 20 | 33 32 5d 20 33 5d 20 62 |ame buf |32] 3] b|
|000009e0| 75 66 66 65 72 2d 6c 69 | 73 74 5d 20 37 20 22 5c |uffer-li|st] 7 "\|
|000009f0| 0a 53 77 69 74 63 68 20 | 74 6f 20 74 68 65 20 70 |.Switch |to the p|
|00000a00| 72 65 76 69 6f 75 73 20 | 62 75 66 66 65 72 2e 0a |revious |buffer..|
|00000a10| 57 69 74 68 20 61 20 6e | 75 6d 65 72 69 63 20 61 |With a n|umeric a|
|00000a20| 72 67 20 4e 2c 20 73 77 | 69 74 63 68 20 74 6f 20 |rg N, sw|itch to |
|00000a30| 74 68 65 20 4e 74 68 20 | 6d 6f 73 74 20 72 65 63 |the Nth |most rec|
|00000a40| 65 6e 74 20 62 75 66 66 | 65 72 2e 0a 57 69 74 68 |ent buff|er..With|
|00000a50| 20 61 6e 20 61 72 67 20 | 6f 66 20 30 2c 20 62 75 | an arg |of 0, bu|
|00000a60| 72 69 65 73 20 74 68 65 | 20 63 75 72 72 65 6e 74 |ries the| current|
|00000a70| 20 62 75 66 66 65 72 20 | 61 74 20 74 68 65 0a 62 | buffer |at the.b|
|00000a80| 6f 74 74 6f 6d 20 6f 66 | 20 74 68 65 20 62 75 66 |ottom of| the buf|
|00000a90| 66 65 72 20 73 74 61 63 | 6b 2e 22 20 22 70 22 5d |fer stac|k." "p"]|
|00000aa0| 29 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 c1 |).(byte-|code "..|
|00000ab0| c2 5c 22 88 c0 c3 c4 5c | 22 88 c0 c5 c6 5c 22 88 |.\"....\|"....\".|
|00000ac0| c0 c7 c8 5c 22 88 c0 c9 | ca 5c 22 88 c0 cb cc 5c |...\"...|.\"....\|
|00000ad0| 22 88 c0 cd ce 5c 22 88 | c0 cf d0 5c 22 88 c0 d1 |"....\".|...\"...|
|00000ae0| d2 5c 22 88 c0 d3 d4 5c | 22 88 c0 d5 d6 5c 22 88 |.\"....\|"....\".|
|00000af0| c0 d7 d8 5c 22 88 c0 d9 | da 5c 22 88 c0 db dc 5c |...\"...|.\"....\|
|00000b00| 22 88 c0 dd de 5c 22 88 | c0 df e0 5c 22 88 c0 e1 |"....\".|...\"...|
|00000b10| e2 5c 22 88 c0 e3 e4 5c | 22 88 c0 e5 e6 5c 22 88 |.\"....\|"....\".|
|00000b20| c0 e7 e8 5c 22 88 c0 e9 | ea 5c 22 88 c0 eb ec 5c |...\"...|.\"....\|
|00000b30| 22 88 c0 ed ee 5c 22 88 | c0 ef f0 5c 22 88 c0 f1 |"....\".|...\"...|
|00000b40| f2 5c 22 88 c0 f3 f4 5c | 22 88 c0 f5 f6 5c 22 88 |.\"....\|"....\".|
|00000b50| c0 f7 f8 5c 22 88 c0 f9 | fa 5c 22 88 c0 fb fc 5c |...\"...|.\"....\|
|00000b60| 22 88 c0 fd fe 5c 22 88 | c0 ff 81 40 00 5c 22 88 |"....\".|...@.\".|
|00000b70| c0 81 41 00 81 42 00 5c | 22 88 c0 81 43 00 81 44 |..A..B.\|"...C..D|
|00000b80| 00 5c 22 88 c0 81 45 00 | 81 46 00 5c 22 88 c0 81 |.\"...E.|.F.\"...|
|00000b90| 47 00 81 48 00 5c 22 88 | 81 49 00 81 4a 00 21 87 |G..H.\".|.I..J.!.|
|00000ba0| 22 20 5b 64 65 66 61 6c | 69 61 73 20 66 69 6e 64 |" [defal|ias find|
|00000bb0| 2d 66 61 63 65 20 69 6e | 74 65 72 6e 61 6c 2d 66 |-face in|ternal-f|
|00000bc0| 69 6e 64 2d 66 61 63 65 | 20 67 65 74 2d 66 61 63 |ind-face| get-fac|
|00000bd0| 65 20 69 6e 74 65 72 6e | 61 6c 2d 67 65 74 2d 66 |e intern|al-get-f|
|00000be0| 61 63 65 20 74 72 79 2d | 66 61 63 65 2d 66 6f 6e |ace try-|face-fon|
|00000bf0| 74 20 69 6e 74 65 72 6e | 61 6c 2d 74 72 79 2d 66 |t intern|al-try-f|
|00000c00| 61 63 65 2d 66 6f 6e 74 | 20 63 75 72 72 65 6e 74 |ace-font| current|
|00000c10| 2d 73 63 72 65 65 6e 2d | 63 6f 6e 66 69 67 75 72 |-screen-|configur|
|00000c20| 61 74 69 6f 6e 20 63 75 | 72 72 65 6e 74 2d 66 72 |ation cu|rrent-fr|
|00000c30| 61 6d 65 2d 63 6f 6e 66 | 69 67 75 72 61 74 69 6f |ame-conf|iguratio|
|00000c40| 6e 20 64 65 6c 65 74 65 | 2d 73 63 72 65 65 6e 20 |n delete|-screen |
|00000c50| 64 65 6c 65 74 65 2d 66 | 72 61 6d 65 20 66 69 6e |delete-f|rame fin|
|00000c60| 64 2d 66 69 6c 65 2d 6e | 65 77 2d 73 63 72 65 65 |d-file-n|ew-scree|
|00000c70| 6e 20 66 69 6e 64 2d 66 | 69 6c 65 2d 6f 74 68 65 |n find-f|ile-othe|
|00000c80| 72 2d 66 72 61 6d 65 20 | 66 69 6e 64 2d 66 69 6c |r-frame |find-fil|
|00000c90| 65 2d 72 65 61 64 2d 6f | 6e 6c 79 2d 6e 65 77 2d |e-read-o|nly-new-|
|00000ca0| 73 63 72 65 65 6e 20 66 | 69 6e 64 2d 66 69 6c 65 |screen f|ind-file|
|00000cb0| 2d 72 65 61 64 2d 6f 6e | 6c 79 2d 6f 74 68 65 72 |-read-on|ly-other|
|00000cc0| 2d 66 72 61 6d 65 20 66 | 69 6e 64 2d 74 61 67 2d |-frame f|ind-tag-|
|00000cd0| 6e 65 77 2d 73 63 72 65 | 65 6e 20 66 69 6e 64 2d |new-scre|en find-|
|00000ce0| 74 61 67 2d 6f 74 68 65 | 72 2d 66 72 61 6d 65 20 |tag-othe|r-frame |
|00000cf0| 69 63 6f 6e 69 66 79 2d | 73 63 72 65 65 6e 20 69 |iconify-|screen i|
|00000d00| 63 6f 6e 69 66 79 2d 66 | 72 61 6d 65 20 6d 61 69 |conify-f|rame mai|
|00000d10| 6c 2d 6e 65 77 2d 73 63 | 72 65 65 6e 20 6d 61 69 |l-new-sc|reen mai|
|00000d20| 6c 2d 6f 74 68 65 72 2d | 66 72 61 6d 65 20 6d 61 |l-other-|frame ma|
|00000d30| 6b 65 2d 73 63 72 65 65 | 6e 2d 69 6e 76 69 73 69 |ke-scree|n-invisi|
|00000d40| 62 6c 65 20 6d 61 6b 65 | 2d 66 72 61 6d 65 2d 69 |ble make|-frame-i|
|00000d50| 6e 76 69 73 69 62 6c 65 | 20 6d 61 6b 65 2d 73 63 |nvisible| make-sc|
|00000d60| 72 65 65 6e 2d 76 69 73 | 69 62 6c 65 20 6d 61 6b |reen-vis|ible mak|
|00000d70| 65 2d 66 72 61 6d 65 2d | 76 69 73 69 62 6c 65 20 |e-frame-|visible |
|00000d80| 6d 6f 64 69 66 79 2d 73 | 63 72 65 65 6e 2d 70 61 |modify-s|creen-pa|
|00000d90| 72 61 6d 65 74 65 72 73 | 20 6d 6f 64 69 66 79 2d |rameters| modify-|
|00000da0| 66 72 61 6d 65 2d 70 61 | 72 61 6d 65 74 65 72 73 |frame-pa|rameters|
|00000db0| 20 6e 65 78 74 2d 73 63 | 72 65 65 6e 20 6e 65 78 | next-sc|reen nex|
|00000dc0| 74 2d 66 72 61 6d 65 20 | 72 65 64 72 61 77 2d 73 |t-frame |redraw-s|
|00000dd0| 63 72 65 65 6e 20 72 65 | 64 72 61 77 2d 66 72 61 |creen re|draw-fra|
|00000de0| 6d 65 20 73 63 72 65 65 | 6e 2d 68 65 69 67 68 74 |me scree|n-height|
|00000df0| 20 66 72 61 6d 65 2d 68 | 65 69 67 68 74 20 73 63 | frame-h|eight sc|
|00000e00| 72 65 65 6e 2d 6c 69 73 | 74 20 66 72 61 6d 65 2d |reen-lis|t frame-|
|00000e10| 6c 69 73 74 20 73 63 72 | 65 65 6e 2d 70 61 72 61 |list scr|een-para|
|00000e20| 6d 65 74 65 72 73 20 66 | 72 61 6d 65 2d 70 61 72 |meters f|rame-par|
|00000e30| 61 6d 65 74 65 72 73 20 | 73 63 72 65 65 6e 2d 70 |ameters |screen-p|
|00000e40| 69 78 65 6c 2d 68 65 69 | 67 68 74 20 66 72 61 6d |ixel-hei|ght fram|
|00000e50| 65 2d 70 69 78 65 6c 2d | 68 65 69 67 68 74 20 73 |e-pixel-|height s|
|00000e60| 63 72 65 65 6e 2d 70 69 | 78 65 6c 2d 77 69 64 74 |creen-pi|xel-widt|
|00000e70| 68 20 66 72 61 6d 65 2d | 70 69 78 65 6c 2d 77 69 |h frame-|pixel-wi|
|00000e80| 64 74 68 20 73 63 72 65 | 65 6e 2d 72 6f 6f 74 2d |dth scre|en-root-|
|00000e90| 77 69 6e 64 6f 77 20 66 | 72 61 6d 65 2d 72 6f 6f |window f|rame-roo|
|00000ea0| 74 2d 77 69 6e 64 6f 77 | 20 73 63 72 65 65 6e 2d |t-window| screen-|
|00000eb0| 73 65 6c 65 63 74 65 64 | 2d 77 69 6e 64 6f 77 20 |selected|-window |
|00000ec0| 66 72 61 6d 65 2d 73 65 | 6c 65 63 74 65 64 2d 77 |frame-se|lected-w|
|00000ed0| 69 6e 64 6f 77 20 6c 6f | 77 65 72 2d 73 63 72 65 |indow lo|wer-scre|
|00000ee0| 65 6e 20 6c 6f 77 65 72 | 2d 66 72 61 6d 65 20 72 |en lower|-frame r|
|00000ef0| 61 69 73 65 2d 73 63 72 | 65 65 6e 20 72 61 69 73 |aise-scr|een rais|
|00000f00| 65 2d 66 72 61 6d 65 20 | 73 63 72 65 65 6e 2d 76 |e-frame |screen-v|
|00000f10| 69 73 69 62 6c 65 2d 70 | 20 66 72 61 6d 65 2d 76 |isible-p| frame-v|
|00000f20| 69 73 69 62 6c 65 2d 70 | 20 73 63 72 65 65 6e 2d |isible-p| screen-|
|00000f30| 77 69 64 74 68 20 66 72 | 61 6d 65 2d 77 69 64 74 |width fr|ame-widt|
|00000f40| 68 20 73 63 72 65 65 6e | 70 20 66 72 61 6d 65 70 |h screen|p framep|
|00000f50| 20 73 65 6c 65 63 74 2d | 73 63 72 65 65 6e 20 73 | select-|screen s|
|00000f60| 65 6c 65 63 74 2d 66 72 | 61 6d 65 20 73 65 6c 65 |elect-fr|ame sele|
|00000f70| 63 74 65 64 2d 73 63 72 | 65 65 6e 20 73 65 6c 65 |cted-scr|een sele|
|00000f80| 63 74 65 64 2d 66 72 61 | 6d 65 20 73 65 74 2d 73 |cted-fra|me set-s|
|00000f90| 63 72 65 65 6e 2d 70 6f | 73 69 74 69 6f 6e 20 73 |creen-po|sition s|
|00000fa0| 65 74 2d 66 72 61 6d 65 | 2d 70 6f 73 69 74 69 6f |et-frame|-positio|
|00000fb0| 6e 20 73 65 74 2d 73 63 | 72 65 65 6e 2d 73 69 7a |n set-sc|reen-siz|
|00000fc0| 65 20 73 65 74 2d 66 72 | 61 6d 65 2d 73 69 7a 65 |e set-fr|ame-size|
|00000fd0| 20 73 77 69 74 63 68 2d | 74 6f 2d 62 75 66 66 65 | switch-|to-buffe|
|00000fe0| 72 2d 6e 65 77 2d 73 63 | 72 65 65 6e 20 73 77 69 |r-new-sc|reen swi|
|00000ff0| 74 63 68 2d 74 6f 2d 62 | 75 66 66 65 72 2d 6f 74 |tch-to-b|uffer-ot|
|00001000| 68 65 72 2d 66 72 61 6d | 65 20 76 69 73 69 62 6c |her-fram|e visibl|
|00001010| 65 2d 73 63 72 65 65 6e | 2d 6c 69 73 74 20 76 69 |e-screen|-list vi|
|00001020| 73 69 62 6c 65 2d 66 72 | 61 6d 65 2d 6c 69 73 74 |sible-fr|ame-list|
|00001030| 20 77 69 6e 64 6f 77 2d | 73 63 72 65 65 6e 20 77 | window-|screen w|
|00001040| 69 6e 64 6f 77 2d 66 72 | 61 6d 65 20 78 2d 63 72 |indow-fr|ame x-cr|
|00001050| 65 61 74 65 2d 73 63 72 | 65 65 6e 20 78 2d 63 72 |eate-scr|een x-cr|
|00001060| 65 61 74 65 2d 66 72 61 | 6d 65 20 78 2d 6e 65 77 |eate-fra|me x-new|
|00001070| 2d 73 63 72 65 65 6e 20 | 6d 61 6b 65 2d 66 72 61 |-screen |make-fra|
|00001080| 6d 65 20 70 72 6f 76 69 | 64 65 20 6c 75 63 69 64 |me provi|de lucid|
|00001090| 5d 20 33 29 0a          |                         |] 3).   |        |
+--------+-------------------------+-------------------------+--------+--------+