home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / gnu / lucid / lemacs-19.6 / lisp / emulators / vi.elc < prev    next >
Emacs Compiled Lisp  |  1993-04-01  |  37.1 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was processed as: Emacs Compiled Lisp (other/emacsCompiledLisp).
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
1% dexvert Emacs Compiled Lisp (other/emacsCompiledLisp) magic Unsupported
1% dexvert Combustion 2 Particle Library (other/combustion2ParticleLibrary) ext Unsupported
100% file Emacs/XEmacs v19 byte-compiled Lisp data default
99% file data default
55% TrID Emacs/XEmacs byte-compiled Lisp (generic) default
44% TrID Summation Document Image Information Load File default (weak)
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 77 7a 40 74 68 61 |piled by| jwz@tha|
|00000020| 6c 69 64 6f 6d 69 64 65 | 20 6f 6e 20 4d 6f 6e 20 |lidomide| on Mon |
|00000030| 46 65 62 20 20 31 20 31 | 38 3a 34 36 3a 33 30 20 |Feb 1 1|8:46:30 |
|00000040| 31 39 39 33 0a 3b 3b 3b | 20 66 72 6f 6d 20 66 69 |1993.;;;| from fi|
|00000050| 6c 65 20 2f 63 61 64 69 | 6c 6c 61 63 31 2f 63 6f |le /cadi|llac1/co|
|00000060| 64 65 2f 62 75 69 6c 64 | 2f 6c 65 6d 61 63 73 2f |de/build|/lemacs/|
|00000070| 6c 69 73 70 2f 65 6d 75 | 6c 61 74 6f 72 73 2f 76 |lisp/emu|lators/v|
|00000080| 69 2e 65 6c 0a 3b 3b 3b | 20 65 6d 61 63 73 20 76 |i.el.;;;| emacs v|
|00000090| 65 72 73 69 6f 6e 20 31 | 39 2e 34 2e 31 33 20 4c |ersion 1|9.4.13 L|
|000000a0| 75 63 69 64 2e 0a 3b 3b | 3b 20 62 79 74 65 63 6f |ucid..;;|; byteco|
|000000b0| 6d 70 20 76 65 72 73 69 | 6f 6e 20 32 2e 31 30 3b |mp versi|on 2.10;|
|000000c0| 20 20 31 2d 66 65 62 2d | 39 33 2e 0a 3b 3b 3b 20 | 1-feb-|93..;;; |
|000000d0| 6f 70 74 69 6d 69 7a 61 | 74 69 6f 6e 20 69 73 20 |optimiza|tion is |
|000000e0| 6f 6e 2e 0a 3b 3b 3b 20 | 74 68 69 73 20 66 69 6c |on..;;; |this fil|
|000000f0| 65 20 75 73 65 73 20 6f | 70 63 6f 64 65 73 20 77 |e uses o|pcodes w|
|00000100| 68 69 63 68 20 64 6f 20 | 6e 6f 74 20 65 78 69 73 |hich do |not exis|
|00000110| 74 20 69 6e 20 45 6d 61 | 63 73 31 38 2e 0a 0a 28 |t in Ema|cs18...(|
|00000120| 69 66 20 28 61 6e 64 20 | 28 62 6f 75 6e 64 70 20 |if (and |(boundp |
|00000130| 27 65 6d 61 63 73 2d 76 | 65 72 73 69 6f 6e 29 0a |'emacs-v|ersion).|
|00000140| 09 20 28 6f 72 20 28 61 | 6e 64 20 28 62 6f 75 6e |. (or (a|nd (boun|
|00000150| 64 70 20 27 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |dp 'epoc|h::versi|
|00000160| 6f 6e 29 20 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |on) epoc|h::versi|
|00000170| 6f 6e 29 0a 09 20 20 20 | 20 20 28 73 74 72 69 6e |on).. | (strin|
|00000180| 67 2d 6c 65 73 73 70 20 | 65 6d 61 63 73 2d 76 65 |g-lessp |emacs-ve|
|00000190| 72 73 69 6f 6e 20 22 31 | 39 22 29 29 29 0a 20 20 |rsion "1|9"))). |
|000001a0| 20 20 28 65 72 72 6f 72 | 20 22 54 68 69 73 20 66 | (error| "This f|
|000001b0| 69 6c 65 20 77 61 73 20 | 63 6f 6d 70 69 6c 65 64 |ile was |compiled|
|000001c0| 20 66 6f 72 20 45 6d 61 | 63 73 31 39 2e 22 29 29 | for Ema|cs19."))|
|000001d0| 0a 0a 28 66 73 65 74 20 | 27 76 69 2d 73 77 69 74 |..(fset |'vi-swit|
|000001e0| 63 68 2d 6d 6f 64 65 20 | 23 5b 28 61 72 67 20 6d |ch-mode |#[(arg m|
|000001f0| 6f 64 65 2d 63 68 61 72 | 29 20 22 c0 09 c2 0b 21 |ode-char|) "....!|
|00000200| 5c 22 89 1c ac 8a c5 90 | c6 c7 c8 21 21 91 aa 8d |\"......|...!!...|
|00000210| 0e 09 16 5c 6e cb 0c cc | 5c 22 88 cd ce 20 21 29 |...\n...|\"... !)|
|00000220| 87 22 20 5b 6c 6f 6f 6b | 75 70 2d 6b 65 79 20 76 |." [look|up-key v|
|00000230| 69 2d 74 69 6c 64 65 2d | 6d 61 70 20 63 68 61 72 |i-tilde-|map char|
|00000240| 2d 74 6f 2d 73 74 72 69 | 6e 67 20 6d 6f 64 65 2d |-to-stri|ng mode-|
|00000250| 63 68 61 72 20 6d 6f 64 | 65 2d 63 6d 64 20 22 2a |char mod|e-cmd "*|
|00000260| 48 65 6c 70 2a 22 20 70 | 72 69 6e 63 20 73 75 62 |Help*" p|rinc sub|
|00000270| 73 74 69 74 75 74 65 2d | 63 6f 6d 6d 61 6e 64 2d |stitute-|command-|
|00000280| 6b 65 79 73 20 22 50 6f | 73 73 69 62 6c 65 20 6d |keys "Po|ssible m|
|00000290| 61 6a 6f 72 20 6d 6f 64 | 65 73 20 74 6f 20 73 77 |ajor mod|es to sw|
|000002a0| 69 74 63 68 20 74 6f 3a | 20 5c 5c 7b 76 69 2d 74 |itch to:| \\{vi-t|
|000002b0| 69 6c 64 65 2d 6d 61 70 | 7d 22 20 61 72 67 20 70 |ilde-map|}" arg p|
|000002c0| 72 65 66 69 78 2d 61 72 | 67 20 63 6f 6d 6d 61 6e |refix-ar|g comman|
|000002d0| 64 2d 65 78 65 63 75 74 | 65 20 6e 69 6c 20 73 65 |d-execut|e nil se|
|000002e0| 74 2d 62 75 66 66 65 72 | 2d 6d 6f 64 69 66 69 65 |t-buffer|-modifie|
|000002f0| 64 2d 70 20 62 75 66 66 | 65 72 2d 6d 6f 64 69 66 |d-p buff|er-modif|
|00000300| 69 65 64 2d 70 5d 20 35 | 20 22 5c 0a 53 77 69 74 |ied-p] 5| "\.Swit|
|00000310| 63 68 20 74 68 65 20 6d | 61 6a 6f 72 20 6d 6f 64 |ch the m|ajor mod|
|00000320| 65 20 6f 66 20 63 75 72 | 72 65 6e 74 20 62 75 66 |e of cur|rent buf|
|00000330| 66 65 72 20 61 73 20 73 | 70 65 63 69 66 69 65 64 |fer as s|pecified|
|00000340| 20 62 79 20 74 68 65 20 | 66 6f 6c 6c 6f 77 69 6e | by the |followin|
|00000350| 67 20 63 68 61 72 20 5c | 5c 7b 76 69 2d 74 69 6c |g char \|\{vi-til|
|00000360| 64 65 2d 6d 61 70 7d 22 | 20 22 50 5c 6e 63 22 5d |de-map}"| "P\nc"]|
|00000370| 29 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 c1 |).(byte-|code "..|
|00000380| c2 20 5c 22 ac 86 c3 0c | c5 c1 23 88 c0 87 22 20 |. \"....|..#..." |
|00000390| 5b 77 68 65 72 65 2d 69 | 73 2d 69 6e 74 65 72 6e |[where-i|s-intern|
|000003a0| 61 6c 20 76 69 2d 73 77 | 69 74 63 68 2d 6d 6f 64 |al vi-sw|itch-mod|
|000003b0| 65 20 63 75 72 72 65 6e | 74 2d 6c 6f 63 61 6c 2d |e curren|t-local-|
|000003c0| 6d 61 70 20 64 65 66 69 | 6e 65 2d 6b 65 79 20 63 |map defi|ne-key c|
|000003d0| 74 6c 2d 78 2d 6d 61 70 | 20 22 7e 22 5d 20 34 29 |tl-x-map| "~"] 4)|
|000003e0| 0a 28 64 65 66 76 61 72 | 20 76 69 2d 74 69 6c 64 |.(defvar| vi-tild|
|000003f0| 65 2d 6d 61 70 20 6e 69 | 6c 20 22 5c 0a 4b 65 79 |e-map ni|l "\.Key|
|00000400| 6d 61 70 20 75 73 65 64 | 20 66 6f 72 20 5c 5c 5b |map used| for \\[|
|00000410| 76 69 2d 73 77 69 74 63 | 68 2d 6d 6f 64 65 5d 20 |vi-switc|h-mode] |
|00000420| 70 72 65 66 69 78 20 6b | 65 79 2e 20 20 4c 69 6e |prefix k|ey. Lin|
|00000430| 6b 20 74 6f 20 76 61 72 | 69 6f 75 73 20 6d 61 6a |k to var|ious maj|
|00000440| 6f 72 20 6d 6f 64 65 73 | 2e 22 29 0a 28 62 79 74 |or modes|.").(byt|
|00000450| 65 2d 63 6f 64 65 20 22 | 08 ac ef c1 20 10 c2 08 |e-code "|.... ...|
|00000460| c3 c4 23 88 c2 08 c5 c6 | 23 88 c2 08 c7 c8 23 88 |..#.....|#.....#.|
|00000470| c2 08 c9 ca 23 88 c2 08 | cb cc 23 88 c2 08 cd ce |....#...|..#.....|
|00000480| 23 88 c2 08 cf d0 23 88 | c2 08 d1 d2 23 88 c2 08 |#.....#.|....#...|
|00000490| d3 d4 23 88 c2 08 d5 d6 | 23 88 c2 08 d7 d8 23 88 |..#.....|#.....#.|
|000004a0| c2 08 d9 da 23 88 c2 08 | db dc 23 88 c2 08 dd de |....#...|..#.....|
|000004b0| 23 88 c2 08 df e0 23 88 | c2 08 e1 e2 23 88 c2 08 |#.....#.|....#...|
|000004c0| e3 e4 23 88 c2 08 e5 e6 | 23 88 c1 87 22 20 5b 76 |..#.....|#..." [v|
|000004d0| 69 2d 74 69 6c 64 65 2d | 6d 61 70 20 6d 61 6b 65 |i-tilde-|map make|
|000004e0| 2d 6b 65 79 6d 61 70 20 | 64 65 66 69 6e 65 2d 6b |-keymap |define-k|
|000004f0| 65 79 20 22 61 22 20 61 | 62 62 72 65 76 2d 6d 6f |ey "a" a|bbrev-mo|
|00000500| 64 65 20 22 63 22 20 63 | 2d 6d 6f 64 65 20 22 64 |de "c" c|-mode "d|
|00000510| 22 20 76 69 2d 64 65 62 | 75 67 67 69 6e 67 20 22 |" vi-deb|ugging "|
|00000520| 65 22 20 65 6d 61 63 73 | 2d 6c 69 73 70 2d 6d 6f |e" emacs|-lisp-mo|
|00000530| 64 65 20 22 66 22 20 61 | 75 74 6f 2d 66 69 6c 6c |de "f" a|uto-fill|
|00000540| 2d 6d 6f 64 65 20 22 67 | 22 20 70 72 6f 6c 6f 67 |-mode "g|" prolog|
|00000550| 2d 6d 6f 64 65 20 22 68 | 22 20 68 61 6e 6f 69 20 |-mode "h|" hanoi |
|00000560| 22 69 22 20 69 6e 66 6f | 2d 6d 6f 64 65 20 22 6c |"i" info|-mode "l|
|00000570| 22 20 6c 69 73 70 2d 6d | 6f 64 65 20 22 6e 22 20 |" lisp-m|ode "n" |
|00000580| 6e 72 6f 66 66 2d 6d 6f | 64 65 20 22 6f 22 20 6f |nroff-mo|de "o" o|
|00000590| 76 65 72 77 72 69 74 65 | 2d 6d 6f 64 65 20 22 4f |verwrite|-mode "O|
|000005a0| 22 20 6f 75 74 6c 69 6e | 65 2d 6d 6f 64 65 20 22 |" outlin|e-mode "|
|000005b0| 50 22 20 70 69 63 74 75 | 72 65 2d 6d 6f 64 65 20 |P" pictu|re-mode |
|000005c0| 22 72 22 20 76 69 2d 72 | 65 61 64 6f 6e 6c 79 2d |"r" vi-r|eadonly-|
|000005d0| 6d 6f 64 65 20 22 74 22 | 20 74 65 78 74 2d 6d 6f |mode "t"| text-mo|
|000005e0| 64 65 20 22 76 22 20 76 | 69 2d 6d 6f 64 65 20 22 |de "v" v|i-mode "|
|000005f0| 78 22 20 74 65 78 2d 6d | 6f 64 65 20 22 7e 22 20 |x" tex-m|ode "~" |
|00000600| 76 69 2d 62 61 63 6b 2d | 74 6f 2d 6f 6c 64 2d 6d |vi-back-|to-old-m|
|00000610| 6f 64 65 5d 20 34 29 0a | 28 66 73 65 74 20 27 76 |ode] 4).|(fset 'v|
|00000620| 69 2d 64 65 62 75 67 67 | 69 6e 67 20 23 5b 28 61 |i-debugg|ing #[(a|
|00000630| 72 67 29 20 22 08 ab 84 | c1 12 aa 83 5c 6e 3f 12 |rg) "...|....\n?.|
|00000640| 5c 6e ab 84 c3 c4 21 87 | c3 c5 21 87 22 20 5b 61 |\n....!.|..!." [a|
|00000650| 72 67 20 74 20 64 65 62 | 75 67 2d 6f 6e 2d 65 72 |rg t deb|ug-on-er|
|00000660| 72 6f 72 20 6d 65 73 73 | 61 67 65 20 22 44 65 62 |ror mess|age "Deb|
|00000670| 75 67 2d 6f 6e 2d 65 72 | 72 6f 72 20 2e 2e 2e 22 |ug-on-er|ror ..."|
|00000680| 20 22 4e 4f 20 6d 6f 72 | 65 20 64 65 62 75 67 2d | "NO mor|e debug-|
|00000690| 6f 6e 2d 65 72 72 6f 72 | 22 5d 20 32 20 22 5c 0a |on-error|"] 2 "\.|
|000006a0| 54 6f 67 67 6c 65 20 64 | 65 62 75 67 2d 6f 6e 2d |Toggle d|ebug-on-|
|000006b0| 65 72 72 6f 72 20 66 6c | 61 67 2e 20 20 49 66 20 |error fl|ag. If |
|000006c0| 70 72 65 66 69 78 20 61 | 72 67 20 69 73 20 67 69 |prefix a|rg is gi|
|000006d0| 76 65 6e 2c 20 73 65 74 | 20 74 2e 22 20 22 50 22 |ven, set| t." "P"|
|000006e0| 5d 29 0a 28 66 73 65 74 | 20 27 76 69 2d 62 61 63 |]).(fset| 'vi-bac|
|000006f0| 6b 2d 74 6f 2d 6f 6c 64 | 2d 6d 6f 64 65 20 23 5b |k-to-old|-mode #[|
|00000700| 6e 69 6c 20 22 08 ad 90 | 09 12 c3 0c 21 88 08 15 |nil "...|....!...|
|00000710| 0e 06 16 07 c8 c9 20 21 | 87 22 20 5b 76 69 2d 6d |...... !|." [vi-m|
|00000720| 6f 64 65 2d 6f 6c 64 2d | 6d 61 6a 6f 72 2d 6d 6f |ode-old-|major-mo|
|00000730| 64 65 20 76 69 2d 6d 6f | 64 65 2d 6f 6c 64 2d 6d |de vi-mo|de-old-m|
|00000740| 6f 64 65 2d 6e 61 6d 65 | 20 6d 6f 64 65 2d 6e 61 |ode-name| mode-na|
|00000750| 6d 65 20 75 73 65 2d 6c | 6f 63 61 6c 2d 6d 61 70 |me use-l|ocal-map|
|00000760| 20 76 69 2d 6d 6f 64 65 | 2d 6f 6c 64 2d 6c 6f 63 | vi-mode|-old-loc|
|00000770| 61 6c 2d 6d 61 70 20 6d | 61 6a 6f 72 2d 6d 6f 64 |al-map m|ajor-mod|
|00000780| 65 20 76 69 2d 6d 6f 64 | 65 2d 6f 6c 64 2d 63 61 |e vi-mod|e-old-ca|
|00000790| 73 65 2d 66 6f 6c 64 20 | 63 61 73 65 2d 66 6f 6c |se-fold |case-fol|
|000007a0| 64 2d 73 65 61 72 63 68 | 20 73 65 74 2d 62 75 66 |d-search| set-buf|
|000007b0| 66 65 72 2d 6d 6f 64 69 | 66 69 65 64 2d 70 20 62 |fer-modi|fied-p b|
|000007c0| 75 66 66 65 72 2d 6d 6f | 64 69 66 69 65 64 2d 70 |uffer-mo|dified-p|
|000007d0| 5d 20 32 20 22 5c 0a 47 | 6f 20 62 61 63 6b 20 74 |] 2 "\.G|o back t|
|000007e0| 6f 20 74 68 65 20 70 72 | 65 76 69 6f 75 73 20 6d |o the pr|evious m|
|000007f0| 6f 64 65 20 77 69 74 68 | 6f 75 74 20 73 65 74 74 |ode with|out sett|
|00000800| 69 6e 67 20 75 70 20 66 | 6f 72 20 69 6e 73 65 72 |ing up f|or inser|
|00000810| 74 69 6f 6e 2e 22 20 6e | 69 6c 5d 29 0a 28 66 73 |tion." n|il]).(fs|
|00000820| 65 74 20 27 76 69 2d 72 | 65 61 64 6f 6e 6c 79 2d |et 'vi-r|eadonly-|
|00000830| 6d 6f 64 65 20 23 5b 6e | 69 6c 20 22 08 3f 89 10 |mode #[n|il ".?..|
|00000840| 87 22 20 5b 62 75 66 66 | 65 72 2d 72 65 61 64 2d |." [buff|er-read-|
|00000850| 6f 6e 6c 79 5d 20 32 20 | 22 5c 0a 54 6f 67 67 6c |only] 2 |"\.Toggl|
|00000860| 65 20 63 75 72 72 65 6e | 74 20 62 75 66 66 65 72 |e curren|t buffer|
|00000870| 27 73 20 72 65 61 64 6f | 6e 6c 79 20 66 6c 61 67 |'s reado|nly flag|
|00000880| 2e 22 20 6e 69 6c 5d 29 | 0a 28 64 65 66 76 61 72 |." nil])|.(defvar|
|00000890| 20 76 69 2d 63 6f 6d 2d | 6d 61 70 20 6e 69 6c 20 | vi-com-|map nil |
|000008a0| 22 5c 0a 4b 65 79 6d 61 | 70 20 75 73 65 64 20 69 |"\.Keyma|p used i|
|000008b0| 6e 20 45 76 69 27 73 20 | 63 6f 6d 6d 61 6e 64 20 |n Evi's |command |
|000008c0| 73 74 61 74 65 0a 43 6f | 6d 6d 61 6e 64 20 73 74 |state.Co|mmand st|
|000008d0| 61 74 65 20 69 6e 63 6c | 75 64 65 73 20 6d 6f 73 |ate incl|udes mos|
|000008e0| 74 20 6f 66 20 74 68 65 | 20 76 69 20 65 64 69 74 |t of the| vi edit|
|000008f0| 69 6e 67 20 63 6f 6d 6d | 61 6e 64 73 2c 20 77 69 |ing comm|ands, wi|
|00000900| 74 68 20 73 6f 6d 65 20 | 45 6d 61 63 73 0a 63 6f |th some |Emacs.co|
|00000910| 6d 6d 61 6e 64 20 65 78 | 74 65 6e 73 69 6f 6e 73 |mmand ex|tensions|
|00000920| 2e 22 29 0a 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |.").(byt|e-code "|
|00000930| c0 c1 c2 c3 23 88 0c 84 | 82 04 c5 20 14 c6 0c c7 |....#...|... ....|
|00000940| c8 23 88 c6 0c c9 ca 23 | 88 c6 0c cb cc 23 88 c6 |.#.....#|.....#..|
|00000950| 0c cd ce 23 88 c6 0c cf | d0 23 88 c6 0c d1 d2 23 |...#....|.#.....#|
|00000960| 88 c6 0c d3 d4 23 88 c6 | 0c d5 d6 23 88 c6 0c d7 |.....#..|...#....|
|00000970| d8 23 88 c6 0c d9 da 23 | 88 c6 0c db dc 23 88 c6 |.#.....#|.....#..|
|00000980| 0c dd de 23 88 c6 0c df | e0 23 88 c6 0c e1 da 23 |...#....|.#.....#|
|00000990| 88 c6 0c e2 e3 23 88 c6 | 0c e4 e5 23 88 c6 0c e6 |.....#..|...#....|
|000009a0| e7 23 88 c6 0c e8 e9 23 | 88 c6 0c ea eb 23 88 c6 |.#.....#|.....#..|
|000009b0| 0c ec ed 23 88 c6 0c ee | ef 23 88 c6 0c f0 f1 23 |...#....|.#.....#|
|000009c0| 88 c6 0c f2 f3 23 88 c6 | 0c f4 f5 23 88 c6 0c f6 |.....#..|...#....|
|000009d0| f7 23 88 c6 0c f8 f9 23 | 88 c6 0c fa fb 23 88 c6 |.#.....#|.....#..|
|000009e0| 0c fc fd 23 88 c6 0c fe | ff 23 88 c6 0c 81 40 00 |...#....|.#....@.|
|000009f0| 81 41 00 23 88 c6 0c 81 | 42 00 c1 23 88 c6 0c 81 |.A.#....|B..#....|
|00000a00| 43 00 81 44 00 23 88 c6 | 0c 81 45 00 81 46 00 23 |C..D.#..|..E..F.#|
|00000a10| 88 c6 0c 81 47 00 81 48 | 00 23 88 c6 0c 81 49 00 |....G..H|.#....I.|
|00000a20| 81 4a 00 23 88 c6 0c 81 | 4b 00 81 4c 00 23 88 c6 |.J.#....|K..L.#..|
|00000a30| 0c 81 4d 00 81 4e 00 23 | 88 c6 0c 81 4f 00 fd 23 |..M..N.#|....O..#|
|00000a40| 88 c6 0c 81 50 00 81 51 | 00 23 88 c6 0c 81 52 00 |....P..Q|.#....R.|
|00000a50| 81 53 00 23 88 c6 0c 81 | 54 00 81 55 00 23 88 c6 |.S.#....|T..U.#..|
|00000a60| 0c 81 56 00 81 57 00 23 | 88 c6 0c 81 58 00 e0 23 |..V..W.#|....X..#|
|00000a70| 88 c6 0c 81 59 00 81 5a | 00 23 88 c6 0c 81 5b 00 |....Y..Z|.#....[.|
|00000a80| 81 5c 5c 00 23 88 c6 0c | 81 5d 00 81 5e 00 23 88 |.\\.#...|.]..^.#.|
|00000a90| c6 0c 81 5f 00 81 60 00 | 23 88 c6 0c 81 61 00 81 |..._..`.|#....a..|
|00000aa0| 62 00 23 88 c6 0c 81 63 | 00 81 64 00 23 88 c6 0c |b.#....c|..d.#...|
|00000ab0| 81 65 00 81 64 00 23 88 | c6 0c 81 66 00 81 64 00 |.e..d.#.|...f..d.|
|00000ac0| 23 88 c6 0c 81 67 00 81 | 64 00 23 88 c6 0c 81 68 |#....g..|d.#....h|
|00000ad0| 00 81 64 00 23 88 c6 0c | 81 69 00 81 64 00 23 88 |..d.#...|.i..d.#.|
|00000ae0| c6 0c 81 6a 00 81 64 00 | 23 88 c6 0c 81 6b 00 81 |...j..d.|#....k..|
|00000af0| 64 00 23 88 c6 0c 81 6c | 00 81 64 00 23 88 c6 0c |d.#....l|..d.#...|
|00000b00| 81 6d 00 81 6e 00 23 88 | c6 0c 81 6f 00 81 70 00 |.m..n.#.|...o..p.|
|00000b10| 23 88 c6 0c 81 71 00 81 | 46 00 23 88 c6 0c 81 72 |#....q..|F.#....r|
|00000b20| 00 81 46 00 23 88 c6 0c | 81 73 00 81 46 00 23 88 |..F.#...|.s..F.#.|
|00000b30| c6 0c 81 74 00 81 75 00 | 23 88 c6 0c 81 76 00 81 |...t..u.|#....v..|
|00000b40| 77 00 23 88 c6 0c 81 78 | 00 81 79 00 23 88 c6 0c |w.#....x|..y.#...|
|00000b50| 81 7a 00 81 7b 00 23 88 | c6 0c 81 7c 00 81 7d 00 |.z..{.#.|...|..}.|
|00000b60| 23 88 c6 0c 81 7e 00 dc | 23 88 c6 0c 81 7f 00 81 |#....~..|#.......|
|00000b70| 80 00 23 88 c6 0c 81 81 | 00 81 82 00 23 88 c6 0c |..#.....|....#...|
|00000b80| 81 83 00 81 84 00 23 88 | c6 0c 81 85 00 81 86 00 |......#.|........|
|00000b90| 23 88 c6 0c 81 87 00 81 | 88 00 23 88 c6 0c 81 89 |#.......|..#.....|
|00000ba0| 00 81 8a 00 23 88 c6 0c | 81 8b 00 c1 23 88 c6 0c |....#...|....#...|
|00000bb0| 81 8c 00 81 8d 00 23 88 | c6 0c 81 8e 00 81 8f 00 |......#.|........|
|00000bc0| 23 88 c6 0c 81 90 00 81 | 91 00 23 88 c6 0c 81 92 |#.......|..#.....|
|00000bd0| 00 81 93 00 23 88 c6 0c | 81 94 00 81 95 00 23 88 |....#...|......#.|
|00000be0| c6 0c 81 96 00 81 97 00 | 23 88 c6 0c 81 98 00 81 |........|#.......|
|00000bf0| 99 00 23 88 c6 0c 81 9a | 00 81 9b 00 23 88 c6 0c |..#.....|....#...|
|00000c00| 81 9c 00 81 9d 00 23 88 | c6 0c 81 9e 00 fd 23 88 |......#.|......#.|
|00000c10| c6 0c 81 9f 00 c1 23 88 | c6 0c 81 a0 00 81 a1 00 |......#.|........|
|00000c20| 23 88 c6 0c 81 a2 00 81 | a3 00 23 88 c6 0c 81 a4 |#.......|..#.....|
|00000c30| 00 81 a5 00 23 88 c6 0c | 81 a6 00 81 a7 00 20 23 |....#...|...... #|
|00000c40| 88 c6 0c 81 a8 00 81 a9 | 00 23 88 c6 0c 81 aa 00 |........|.#......|
|00000c50| fd 23 88 c6 0c 81 ab 00 | 81 46 00 23 88 c6 0c 81 |.#......|.F.#....|
|00000c60| ac 00 fd 23 88 c6 0c 81 | ad 00 81 ae 00 23 88 c6 |...#....|.....#..|
|00000c70| 0c 81 af 00 c1 23 88 c6 | 0c 81 b0 00 81 b1 00 23 |.....#..|.......#|
|00000c80| 88 c6 0c 81 b2 00 81 b3 | 00 23 88 c6 0c 81 b4 00 |........|.#......|
|00000c90| 81 b5 00 23 88 c6 0c 81 | b6 00 81 46 00 23 88 c6 |...#....|...F.#..|
|00000ca0| 0c 81 b7 00 81 46 00 23 | 88 c6 0c 81 b8 00 81 b9 |.....F.#|........|
|00000cb0| 00 23 88 c6 0c 81 ba 00 | 81 bb 00 23 88 c6 0c 81 |.#......|...#....|
|00000cc0| bc 00 81 bd 00 23 88 c6 | 0c 81 be 00 81 bf 00 23 |.....#..|.......#|
|00000cd0| 88 c6 0c 81 c0 00 81 c1 | 00 23 88 c6 0c 81 c2 00 |........|.#......|
|00000ce0| da 23 88 c6 0c 81 c3 00 | e5 23 88 c6 0c 81 c4 00 |.#......|.#......|
|00000cf0| 81 44 00 23 88 c6 0c 81 | c5 00 81 c6 00 23 88 c6 |.D.#....|.....#..|
|00000d00| 0c 81 c7 00 81 c8 00 23 | 88 c6 0c 81 c9 00 81 ca |.......#|........|
|00000d10| 00 23 88 c6 0c 81 cb 00 | 81 cc 00 23 88 c6 0c 81 |.#......|...#....|
|00000d20| cd 00 81 ce 00 23 88 c6 | 0c 81 cf 00 81 d0 00 23 |.....#..|.......#|
|00000d30| 88 c6 0c 81 d1 00 81 d2 | 00 23 88 c6 0c 81 d3 00 |........|.#......|
|00000d40| 81 d4 00 23 88 c6 0c 81 | d5 00 81 d6 00 23 88 c6 |...#....|.....#..|
|00000d50| 0c 81 d7 00 81 d8 00 23 | 88 c6 0c 81 d9 00 81 da |.......#|........|
|00000d60| 00 23 88 c6 0c 81 db 00 | 81 dc 00 23 88 c6 0c 81 |.#......|...#....|
|00000d70| dd 00 81 46 00 23 88 c6 | 0c 81 de 00 81 df 00 23 |...F.#..|.......#|
|00000d80| 88 c6 0c 81 e0 00 81 e1 | 00 23 88 c6 0c 81 e2 00 |........|.#......|
|00000d90| 81 e3 00 23 88 c6 0c 81 | e4 00 81 e5 00 23 88 c6 |...#....|.....#..|
|00000da0| 0c 81 e6 00 81 e7 00 23 | 88 c6 0c 81 e8 00 81 e9 |.......#|........|
|00000db0| 00 23 88 c0 81 bf 00 81 | ea 00 81 eb 00 23 88 c0 |.#......|.....#..|
|00000dc0| da 81 ea 00 81 ec 00 23 | 88 c0 81 ed 00 81 ea 00 |.......#|........|
|00000dd0| 81 ec 00 23 88 c0 81 ee | 00 81 ea 00 81 ec 00 23 |...#....|.......#|
|00000de0| 88 c0 e5 81 ea 00 81 ec | 00 23 88 c0 e9 81 ea 00 |........|.#......|
|00000df0| 81 ef 00 23 88 c0 81 75 | 00 81 ea 00 81 ef 00 23 |...#...u|.......#|
|00000e00| 88 c0 eb 81 ea 00 81 ef | 00 23 88 c0 81 60 00 81 |........|.#...`..|
|00000e10| ea 00 81 ef 00 23 88 c0 | 81 44 00 81 ea 00 81 eb |.....#..|.D......|
|00000e20| 00 23 88 c0 81 4c 00 81 | ea 00 81 eb 00 23 88 c0 |.#...L..|.....#..|
|00000e30| 81 4e 00 81 ea 00 81 f0 | 00 23 88 c0 81 51 00 81 |.N......|.#...Q..|
|00000e40| ea 00 81 ec 00 23 88 c0 | 81 53 00 81 ea 00 81 f1 |.....#..|.S......|
|00000e50| 00 23 88 c0 81 55 00 81 | ea 00 81 f1 00 23 88 c0 |.#...U..|.....#..|
|00000e60| e0 81 ea 00 81 ec 00 23 | 88 c0 81 5c 5c 00 81 ea |.......#|...\\...|
|00000e70| 00 81 ec 00 23 88 c0 81 | 5a 00 81 ea 00 81 f2 00 |....#...|Z.......|
|00000e80| 23 88 c0 81 f3 00 81 ea | 00 81 ef 00 23 88 c0 81 |#.......|....#...|
|00000e90| 62 00 81 ea 00 81 eb 00 | 23 88 c0 81 bd 00 81 ea |b.......|#.......|
|00000ea0| 00 81 eb 00 23 88 c0 81 | 70 00 81 ea 00 81 f4 00 |....#...|p.......|
|00000eb0| 23 88 c0 81 f5 00 81 ea | 00 81 ef 00 23 88 c0 81 |#.......|....#...|
|00000ec0| 7b 00 81 ea 00 81 f6 00 | 23 88 c0 81 80 00 81 ea |{.......|#.......|
|00000ed0| 00 81 f0 00 23 88 c0 81 | 82 00 81 ea 00 81 f4 00 |....#...|........|
|00000ee0| 23 88 c0 81 84 00 81 ea | 00 81 ec 00 23 88 c0 81 |#.......|....#...|
|00000ef0| 86 00 81 ea 00 81 ec 00 | 23 88 c0 81 8d 00 81 ea |........|#.......|
|00000f00| 00 81 ec 00 23 88 c0 81 | 8f 00 81 ea 00 81 ec 00 |....#...|........|
|00000f10| 23 88 c0 81 91 00 81 ea | 00 81 f7 00 23 88 c0 81 |#.......|....#...|
|00000f20| 9d 00 81 ea 00 81 f4 00 | 23 88 c0 81 a1 00 81 ea |........|#.......|
|00000f30| 00 81 f6 00 23 88 c0 81 | ae 00 81 ea 00 81 eb 00 |....#...|........|
|00000f40| 23 88 c0 81 b1 00 81 ea | 00 81 eb 00 23 88 c0 81 |#.......|....#...|
|00000f50| b5 00 81 ea 00 81 f8 00 | 23 88 c0 81 b9 00 81 ea |........|#.......|
|00000f60| 00 81 f0 00 23 88 c0 81 | bb 00 81 ea 00 81 f4 00 |....#...|........|
|00000f70| 23 88 c0 81 bf 00 81 ea | 00 81 eb 00 23 88 c0 81 |#.......|....#...|
|00000f80| f9 00 81 ea 00 81 eb 00 | 23 88 c0 81 c8 00 81 ea |........|#.......|
|00000f90| 00 81 ef 00 23 88 c0 81 | d4 00 81 ea 00 81 f4 00 |....#...|........|
|00000fa0| 23 88 c0 81 da 00 81 ea | 00 81 f8 00 23 88 c0 81 |#.......|....#...|
|00000fb0| e3 00 81 ea 00 81 f0 00 | 23 88 c0 81 e5 00 81 ea |........|#.......|
|00000fc0| 00 81 fa 00 23 88 c0 81 | e1 00 81 ea 00 81 fa 00 |....#...|........|
|00000fd0| 23 88 c0 81 fb 00 81 ea | 00 81 fc 00 23 88 c0 81 |#.......|....#...|
|00000fe0| fd 00 81 ea 00 81 fc 00 | 23 88 c0 81 fe 00 81 ea |........|#.......|
|00000ff0| 00 81 fc 00 23 88 c0 81 | ff 00 81 ea 00 81 fc 00 |....#...|........|
|00001000| 23 88 c0 81 00 01 81 ea | 00 81 fc 00 23 88 c0 81 |#.......|....#...|
|00001010| 01 01 81 ea 00 81 fc 00 | 23 88 c0 81 02 01 81 ea |........|#.......|
|00001020| 00 81 fc 00 23 88 c0 81 | 03 01 81 ea 00 81 fc 00 |....#...|........|
|00001030| 23 87 22 20 5b 70 75 74 | 20 76 69 2d 75 6e 64 65 |#." [put| vi-unde|
|00001040| 66 69 6e 65 64 20 73 75 | 70 70 72 65 73 73 2d 6b |fined su|ppress-k|
|00001050| 65 79 6d 61 70 20 74 20 | 76 69 2d 63 6f 6d 2d 6d |eymap t |vi-com-m|
|00001060| 61 70 20 6d 61 6b 65 2d | 6b 65 79 6d 61 70 20 64 |ap make-|keymap d|
|00001070| 65 66 69 6e 65 2d 6b 65 | 79 20 22 00 22 20 76 69 |efine-ke|y "." vi|
|00001080| 2d 6d 61 72 6b 2d 72 65 | 67 69 6f 6e 20 22 01 22 |-mark-re|gion "."|
|00001090| 20 76 69 2d 61 73 6b 2d | 66 6f 72 2d 69 6e 66 6f | vi-ask-|for-info|
|000010a0| 20 22 02 22 20 76 69 2d | 62 61 63 6b 77 61 72 64 | "." vi-|backward|
|000010b0| 2d 77 69 6e 64 6f 77 66 | 75 6c 6c 20 22 03 22 20 |-windowf|ull "." |
|000010c0| 76 69 2d 64 6f 2d 6f 6c | 64 2d 6d 6f 64 65 2d 43 |vi-do-ol|d-mode-C|
|000010d0| 2d 63 2d 63 6f 6d 6d 61 | 6e 64 20 22 04 22 20 76 |-c-comma|nd "." v|
|000010e0| 69 2d 73 63 72 6f 6c 6c | 2d 64 6f 77 6e 2d 77 69 |i-scroll|-down-wi|
|000010f0| 6e 64 6f 77 20 22 05 22 | 20 76 69 2d 65 78 70 6f |ndow "."| vi-expo|
|00001100| 73 65 2d 6c 69 6e 65 2d | 62 65 6c 6f 77 20 22 06 |se-line-|below ".|
|00001110| 22 20 76 69 2d 66 6f 72 | 77 61 72 64 2d 77 69 6e |" vi-for|ward-win|
|00001120| 64 6f 77 66 75 6c 6c 20 | 22 07 22 20 6b 65 79 62 |dowfull |"." keyb|
|00001130| 6f 61 72 64 2d 71 75 69 | 74 20 22 09 22 20 69 6e |oard-qui|t "." in|
|00001140| 64 65 6e 74 2d 72 65 6c | 61 74 69 76 65 2d 6d 61 |dent-rel|ative-ma|
|00001150| 79 62 65 20 22 5c 6e 22 | 20 76 69 2d 6e 65 78 74 |ybe "\n"| vi-next|
|00001160| 2d 6c 69 6e 65 20 22 0b | 22 20 76 69 2d 6b 69 6c |-line ".|" vi-kil|
|00001170| 6c 2d 6c 69 6e 65 20 22 | 0c 22 20 72 65 63 65 6e |l-line "|." recen|
|00001180| 74 65 72 20 22 0d 22 20 | 76 69 2d 6e 65 78 74 2d |ter "." |vi-next-|
|00001190| 6c 69 6e 65 2d 66 69 72 | 73 74 2d 6e 6f 6e 77 68 |line-fir|st-nonwh|
|000011a0| 69 74 65 20 22 0e 22 20 | 22 0f 22 20 76 69 2d 73 |ite "." |"." vi-s|
|000011b0| 70 6c 69 74 2d 6f 70 65 | 6e 2d 6c 69 6e 65 20 22 |plit-ope|n-line "|
|000011c0| 10 22 20 70 72 65 76 69 | 6f 75 73 2d 6c 69 6e 65 |." previ|ous-line|
|000011d0| 20 22 11 22 20 76 69 2d | 71 75 65 72 79 2d 72 65 | "." vi-|query-re|
|000011e0| 70 6c 61 63 65 20 22 12 | 22 20 76 69 2d 69 73 65 |place ".|" vi-ise|
|000011f0| 61 72 63 68 2d 62 61 63 | 6b 77 61 72 64 20 22 13 |arch-bac|kward ".|
|00001200| 22 20 76 69 2d 69 73 65 | 61 72 63 68 2d 66 6f 72 |" vi-ise|arch-for|
|00001210| 77 61 72 64 20 22 14 22 | 20 76 69 2d 74 72 61 6e |ward "."| vi-tran|
|00001220| 73 70 6f 73 65 2d 6f 62 | 6a 65 63 74 73 20 22 15 |spose-ob|jects ".|
|00001230| 22 20 76 69 2d 73 63 72 | 6f 6c 6c 2d 75 70 2d 77 |" vi-scr|oll-up-w|
|00001240| 69 6e 64 6f 77 20 22 16 | 22 20 73 63 72 6f 6c 6c |indow ".|" scroll|
|00001250| 2d 75 70 20 22 17 22 20 | 76 69 2d 6b 69 6c 6c 2d |-up "." |vi-kill-|
|00001260| 72 65 67 69 6f 6e 20 22 | 18 22 20 43 6f 6e 74 72 |region "|." Contr|
|00001270| 6f 6c 2d 58 2d 70 72 65 | 66 69 78 20 22 19 22 20 |ol-X-pre|fix "." |
|00001280| 76 69 2d 65 78 70 6f 73 | 65 2d 6c 69 6e 65 2d 61 |vi-expos|e-line-a|
|00001290| 62 6f 76 65 20 22 1a 22 | 20 73 75 73 70 65 6e 64 |bove "."| suspend|
|000012a0| 2d 65 6d 61 63 73 20 22 | 1b 22 20 45 53 43 2d 70 |-emacs "|." ESC-p|
|000012b0| 72 65 66 69 78 20 22 1c | 22 20 76 69 2d 75 6e 69 |refix ".|" vi-uni|
|000012c0| 6d 70 6c 65 6d 65 6e 74 | 65 64 20 22 1d 22 20 66 |mplement|ed "." f|
|000012d0| 69 6e 64 2d 74 61 67 20 | 22 1e 22 20 76 69 2d 6c |ind-tag |"." vi-l|
|000012e0| 6f 63 61 74 65 2d 64 65 | 66 20 22 1f 22 20 22 20 |ocate-de|f "." " |
|000012f0| 22 20 66 6f 72 77 61 72 | 64 2d 63 68 61 72 20 22 |" forwar|d-char "|
|00001300| 21 22 20 76 69 2d 6f 70 | 65 72 61 74 6f 72 20 22 |!" vi-op|erator "|
|00001310| 5c 22 22 20 76 69 2d 63 | 68 61 72 2d 61 72 67 75 |\"" vi-c|har-argu|
|00001320| 6d 65 6e 74 20 22 23 22 | 20 75 6e 69 76 65 72 73 |ment "#"| univers|
|00001330| 61 6c 2d 61 72 67 75 6d | 65 6e 74 20 22 24 22 20 |al-argum|ent "$" |
|00001340| 65 6e 64 2d 6f 66 2d 6c | 69 6e 65 20 22 25 22 20 |end-of-l|ine "%" |
|00001350| 76 69 2d 66 69 6e 64 2d | 6d 61 74 63 68 69 6e 67 |vi-find-|matching|
|00001360| 2d 70 61 72 65 6e 20 22 | 26 22 20 22 27 22 20 76 |-paren "|&" "'" v|
|00001370| 69 2d 67 6f 74 6f 2d 6c | 69 6e 65 2d 6d 61 72 6b |i-goto-l|ine-mark|
|00001380| 20 22 28 22 20 62 61 63 | 6b 77 61 72 64 2d 73 65 | "(" bac|kward-se|
|00001390| 78 70 20 22 29 22 20 66 | 6f 72 77 61 72 64 2d 73 |xp ")" f|orward-s|
|000013a0| 65 78 70 20 22 2a 22 20 | 76 69 2d 6e 61 6d 65 2d |exp "*" |vi-name-|
|000013b0| 6c 61 73 74 2d 63 68 61 | 6e 67 65 2d 6f 72 2d 6d |last-cha|nge-or-m|
|000013c0| 61 63 72 6f 20 22 2b 22 | 20 22 2c 22 20 76 69 2d |acro "+"| "," vi-|
|000013d0| 72 65 76 65 72 73 65 2d | 6c 61 73 74 2d 66 69 6e |reverse-|last-fin|
|000013e0| 64 2d 63 68 61 72 20 22 | 2d 22 20 76 69 2d 70 72 |d-char "|-" vi-pr|
|000013f0| 65 76 69 6f 75 73 2d 6c | 69 6e 65 2d 66 69 72 73 |evious-l|ine-firs|
|00001400| 74 2d 6e 6f 6e 77 68 69 | 74 65 20 22 2e 22 20 76 |t-nonwhi|te "." v|
|00001410| 69 2d 72 65 64 6f 2d 6c | 61 73 74 2d 63 68 61 6e |i-redo-l|ast-chan|
|00001420| 67 65 2d 63 6f 6d 6d 61 | 6e 64 20 22 2f 22 20 76 |ge-comma|nd "/" v|
|00001430| 69 2d 73 65 61 72 63 68 | 2d 66 6f 72 77 61 72 64 |i-search|-forward|
|00001440| 20 22 30 22 20 62 65 67 | 69 6e 6e 69 6e 67 2d 6f | "0" beg|inning-o|
|00001450| 66 2d 6c 69 6e 65 20 22 | 31 22 20 76 69 2d 64 69 |f-line "|1" vi-di|
|00001460| 67 69 74 2d 61 72 67 75 | 6d 65 6e 74 20 22 32 22 |git-argu|ment "2"|
|00001470| 20 22 33 22 20 22 34 22 | 20 22 35 22 20 22 36 22 | "3" "4"| "5" "6"|
|00001480| 20 22 37 22 20 22 38 22 | 20 22 39 22 20 22 3a 22 | "7" "8"| "9" ":"|
|00001490| 20 76 69 2d 65 78 2d 63 | 6d 64 20 22 3b 22 20 76 | vi-ex-c|md ";" v|
|000014a0| 69 2d 72 65 70 65 61 74 | 2d 6c 61 73 74 2d 66 69 |i-repeat|-last-fi|
|000014b0| 6e 64 2d 63 68 61 72 20 | 22 3c 22 20 22 3d 22 20 |nd-char |"<" "=" |
|000014c0| 22 3e 22 20 22 3f 22 20 | 76 69 2d 73 65 61 72 63 |">" "?" |vi-searc|
|000014d0| 68 2d 62 61 63 6b 77 61 | 72 64 20 22 40 22 20 76 |h-backwa|rd "@" v|
|000014e0| 69 2d 63 61 6c 6c 2d 6e | 61 6d 65 64 2d 63 68 61 |i-call-n|amed-cha|
|000014f0| 6e 67 65 2d 6f 72 2d 6d | 61 63 72 6f 20 22 41 22 |nge-or-m|acro "A"|
|00001500| 20 76 69 2d 61 70 70 65 | 6e 64 2d 61 74 2d 65 6e | vi-appe|nd-at-en|
|00001510| 64 2d 6f 66 2d 6c 69 6e | 65 20 22 42 22 20 76 69 |d-of-lin|e "B" vi|
|00001520| 2d 62 61 63 6b 77 61 72 | 64 2d 62 6c 61 6e 6b 2d |-backwar|d-blank-|
|00001530| 64 65 6c 69 6d 69 74 65 | 64 2d 77 6f 72 64 20 22 |delimite|d-word "|
|00001540| 43 22 20 76 69 2d 63 68 | 61 6e 67 65 2d 72 65 73 |C" vi-ch|ange-res|
|00001550| 74 2d 6f 66 2d 6c 69 6e | 65 20 22 44 22 20 22 45 |t-of-lin|e "D" "E|
|00001560| 22 20 76 69 2d 65 6e 64 | 2d 6f 66 2d 62 6c 61 6e |" vi-end|-of-blan|
|00001570| 6b 2d 64 65 6c 69 6d 69 | 74 65 64 2d 77 6f 72 64 |k-delimi|ted-word|
|00001580| 20 22 46 22 20 76 69 2d | 62 61 63 6b 77 61 72 64 | "F" vi-|backward|
|00001590| 2d 66 69 6e 64 2d 63 68 | 61 72 20 22 47 22 20 76 |-find-ch|ar "G" v|
|000015a0| 69 2d 67 6f 74 6f 2d 6c | 69 6e 65 20 22 48 22 20 |i-goto-l|ine "H" |
|000015b0| 76 69 2d 68 6f 6d 65 2d | 77 69 6e 64 6f 77 2d 6c |vi-home-|window-l|
|000015c0| 69 6e 65 20 22 49 22 20 | 76 69 2d 69 6e 73 65 72 |ine "I" |vi-inser|
|000015d0| 74 2d 62 65 66 6f 72 65 | 2d 66 69 72 73 74 2d 6e |t-before|-first-n|
|000015e0| 6f 6e 77 68 69 74 65 20 | 22 4a 22 20 76 69 2d 6a |onwhite |"J" vi-j|
|000015f0| 6f 69 6e 2d 6c 69 6e 65 | 73 20 22 4b 22 20 22 4c |oin-line|s "K" "L|
|00001600| 22 20 76 69 2d 6c 61 73 | 74 2d 77 69 6e 64 6f 77 |" vi-las|t-window|
|00001610| 2d 6c 69 6e 65 20 22 4d | 22 20 76 69 2d 6d 69 64 |-line "M|" vi-mid|
|00001620| 64 6c 65 2d 77 69 6e 64 | 6f 77 2d 6c 69 6e 65 20 |dle-wind|ow-line |
|00001630| 22 4e 22 20 76 69 2d 72 | 65 76 65 72 73 65 2d 6c |"N" vi-r|everse-l|
|00001640| 61 73 74 2d 73 65 61 72 | 63 68 20 22 4f 22 20 76 |ast-sear|ch "O" v|
|00001650| 69 2d 6f 70 65 6e 2d 61 | 62 6f 76 65 20 22 50 22 |i-open-a|bove "P"|
|00001660| 20 76 69 2d 70 75 74 2d | 62 65 66 6f 72 65 20 22 | vi-put-|before "|
|00001670| 51 22 20 76 69 2d 71 75 | 6f 74 65 2d 77 6f 72 64 |Q" vi-qu|ote-word|
|00001680| 73 20 22 52 22 20 76 69 | 2d 72 65 70 6c 61 63 65 |s "R" vi|-replace|
|00001690| 2d 63 68 61 72 73 20 22 | 53 22 20 76 69 2d 73 75 |-chars "|S" vi-su|
|000016a0| 62 73 74 69 74 75 74 65 | 2d 6c 69 6e 65 73 20 22 |bstitute|-lines "|
|000016b0| 54 22 20 76 69 2d 62 61 | 63 6b 77 61 72 64 2d 75 |T" vi-ba|ckward-u|
|000016c0| 70 74 6f 2d 63 68 61 72 | 20 22 55 22 20 22 56 22 |pto-char| "U" "V"|
|000016d0| 20 22 57 22 20 76 69 2d | 66 6f 72 77 61 72 64 2d | "W" vi-|forward-|
|000016e0| 62 6c 61 6e 6b 2d 64 65 | 6c 69 6d 69 74 65 64 2d |blank-de|limited-|
|000016f0| 77 6f 72 64 20 22 58 22 | 20 63 61 6c 6c 2d 6c 61 |word "X"| call-la|
|00001700| 73 74 2d 6b 62 64 2d 6d | 61 63 72 6f 20 22 59 22 |st-kbd-m|acro "Y"|
|00001710| 20 76 69 2d 79 61 6e 6b | 2d 6c 69 6e 65 20 22 5a | vi-yank|-line "Z|
|00001720| 22 20 6d 61 6b 65 2d 73 | 70 61 72 73 65 2d 6b 65 |" make-s|parse-ke|
|00001730| 79 6d 61 70 20 22 5a 5a | 22 20 76 69 2d 73 61 76 |ymap "ZZ|" vi-sav|
|00001740| 65 2d 61 6c 6c 2d 61 6e | 64 2d 65 78 69 74 20 22 |e-all-an|d-exit "|
|00001750| 5b 22 20 22 5c 5c 22 20 | 22 5d 22 20 22 5e 22 20 |[" "\\" |"]" "^" |
|00001760| 62 61 63 6b 2d 74 6f 2d | 69 6e 64 65 6e 74 61 74 |back-to-|indentat|
|00001770| 69 6f 6e 20 22 5f 22 20 | 22 60 22 20 76 69 2d 67 |ion "_" |"`" vi-g|
|00001780| 6f 74 6f 2d 63 68 61 72 | 2d 6d 61 72 6b 20 22 61 |oto-char|-mark "a|
|00001790| 22 20 76 69 2d 69 6e 73 | 65 72 74 2d 61 66 74 65 |" vi-ins|ert-afte|
|000017a0| 72 20 22 62 22 20 62 61 | 63 6b 77 61 72 64 2d 77 |r "b" ba|ckward-w|
|000017b0| 6f 72 64 20 22 63 22 20 | 22 64 22 20 22 65 22 20 |ord "c" |"d" "e" |
|000017c0| 76 69 2d 65 6e 64 2d 6f | 66 2d 77 6f 72 64 20 22 |vi-end-o|f-word "|
|000017d0| 66 22 20 76 69 2d 66 6f | 72 77 61 72 64 2d 66 69 |f" vi-fo|rward-fi|
|000017e0| 6e 64 2d 63 68 61 72 20 | 22 67 22 20 76 69 2d 62 |nd-char |"g" vi-b|
|000017f0| 65 67 69 6e 6e 69 6e 67 | 2d 6f 66 2d 62 75 66 66 |eginning|-of-buff|
|00001800| 65 72 20 22 68 22 20 62 | 61 63 6b 77 61 72 64 2d |er "h" b|ackward-|
|00001810| 63 68 61 72 20 22 69 22 | 20 76 69 2d 69 6e 73 65 |char "i"| vi-inse|
|00001820| 72 74 2d 62 65 66 6f 72 | 65 20 22 6a 22 20 22 6b |rt-befor|e "j" "k|
|00001830| 22 20 22 6c 22 20 22 6d | 22 20 76 69 2d 73 65 74 |" "l" "m|" vi-set|
|00001840| 2d 6d 61 72 6b 20 22 6e | 22 20 76 69 2d 72 65 70 |-mark "n|" vi-rep|
|00001850| 65 61 74 2d 6c 61 73 74 | 2d 73 65 61 72 63 68 20 |eat-last|-search |
|00001860| 22 6f 22 20 76 69 2d 6f | 70 65 6e 2d 62 65 6c 6f |"o" vi-o|pen-belo|
|00001870| 77 20 22 70 22 20 76 69 | 2d 70 75 74 2d 61 66 74 |w "p" vi|-put-aft|
|00001880| 65 72 20 22 71 22 20 76 | 69 2d 72 65 70 6c 61 63 |er "q" v|i-replac|
|00001890| 65 20 22 72 22 20 76 69 | 2d 72 65 70 6c 61 63 65 |e "r" vi|-replace|
|000018a0| 2d 31 2d 63 68 61 72 20 | 22 73 22 20 76 69 2d 73 |-1-char |"s" vi-s|
|000018b0| 75 62 73 74 69 74 75 74 | 65 2d 63 68 61 72 73 20 |ubstitut|e-chars |
|000018c0| 22 74 22 20 76 69 2d 66 | 6f 72 77 61 72 64 2d 75 |"t" vi-f|orward-u|
|000018d0| 70 74 6f 2d 63 68 61 72 | 20 22 75 22 20 75 6e 64 |pto-char| "u" und|
|000018e0| 6f 20 22 76 22 20 76 69 | 2d 76 65 72 69 66 79 2d |o "v" vi|-verify-|
|000018f0| 73 70 65 6c 6c 69 6e 67 | 20 22 77 22 20 76 69 2d |spelling| "w" vi-|
|00001900| 66 6f 72 77 61 72 64 2d | 77 6f 72 64 20 22 78 22 |forward-|word "x"|
|00001910| 20 76 69 2d 6b 69 6c 6c | 2d 63 68 61 72 20 22 79 | vi-kill|-char "y|
|00001920| 22 20 22 7a 22 20 76 69 | 2d 61 64 6a 75 73 74 2d |" "z" vi|-adjust-|
|00001930| 77 69 6e 64 6f 77 20 22 | 7b 22 20 62 61 63 6b 77 |window "|{" backw|
|00001940| 61 72 64 2d 70 61 72 61 | 67 72 61 70 68 20 22 7c |ard-para|graph "||
|00001950| 22 20 76 69 2d 67 6f 74 | 6f 2d 63 6f 6c 75 6d 6e |" vi-got|o-column|
|00001960| 20 22 7d 22 20 66 6f 72 | 77 61 72 64 2d 70 61 72 | "}" for|ward-par|
|00001970| 61 67 72 61 70 68 20 22 | 7e 22 20 76 69 2d 63 68 |agraph "|~" vi-ch|
|00001980| 61 6e 67 65 2d 63 61 73 | 65 20 22 7f 22 20 64 65 |ange-cas|e "." de|
|00001990| 6c 65 74 65 2d 62 61 63 | 6b 77 61 72 64 2d 63 68 |lete-bac|kward-ch|
|000019a0| 61 72 20 70 6f 69 6e 74 | 2d 6d 6f 76 69 6e 67 2d |ar point|-moving-|
|000019b0| 75 6e 69 74 20 63 68 61 | 72 20 6c 69 6e 65 20 6e |unit cha|r line n|
|000019c0| 65 78 74 2d 6c 69 6e 65 | 20 66 6f 72 77 61 72 64 |ext-line| forward|
|000019d0| 2d 6c 69 6e 65 20 73 65 | 61 72 63 68 20 6d 61 74 |-line se|arch mat|
|000019e0| 63 68 20 73 65 78 70 20 | 72 65 76 2d 66 69 6e 64 |ch sexp |rev-find|
|000019f0| 20 76 69 2d 72 65 2d 73 | 65 61 72 63 68 2d 66 6f | vi-re-s|earch-fo|
|00001a00| 72 77 61 72 64 20 66 69 | 6e 64 20 76 69 2d 72 65 |rward fi|nd vi-re|
|00001a10| 2d 73 65 61 72 63 68 2d | 62 61 63 6b 77 61 72 64 |-search-|backward|
|00001a20| 20 57 4f 52 44 20 72 65 | 76 2d 73 65 61 72 63 68 | WORD re|v-search|
|00001a30| 20 77 6f 72 64 20 76 69 | 2d 66 6f 72 77 61 72 64 | word vi|-forward|
|00001a40| 2d 63 68 61 72 20 70 61 | 72 61 67 72 61 70 68 20 |-char pa|ragraph |
|00001a50| 6d 61 72 6b 2d 70 61 67 | 65 20 72 65 67 69 6f 6e |mark-pag|e region|
|00001a60| 20 6d 61 72 6b 2d 70 61 | 72 61 67 72 61 70 68 20 | mark-pa|ragraph |
|00001a70| 6d 61 72 6b 2d 77 6f 72 | 64 20 6d 61 72 6b 2d 73 |mark-wor|d mark-s|
|00001a80| 65 78 70 20 6d 61 72 6b | 2d 64 65 66 75 6e 20 6d |exp mark|-defun m|
|00001a90| 61 72 6b 2d 77 68 6f 6c | 65 2d 62 75 66 66 65 72 |ark-whol|e-buffer|
|00001aa0| 20 6d 61 72 6b 2d 65 6e | 64 2d 6f 66 2d 73 65 6e | mark-en|d-of-sen|
|00001ab0| 74 65 6e 63 65 20 6d 61 | 72 6b 2d 63 2d 66 75 6e |tence ma|rk-c-fun|
|00001ac0| 63 74 69 6f 6e 5d 20 34 | 29 0a 28 64 65 66 76 61 |ction] 4|).(defva|
|00001ad0| 72 20 76 69 2d 6d 61 72 | 6b 2d 61 6c 69 73 74 20 |r vi-mar|k-alist |
|00001ae0| 6e 69 6c 20 22 5c 0a 41 | 6c 69 73 74 20 6f 66 20 |nil "\.A|list of |
|00001af0| 28 4e 41 4d 45 20 2e 20 | 4d 41 52 4b 29 2c 20 6d |(NAME . |MARK), m|
|00001b00| 61 72 6b 73 20 61 72 65 | 20 6c 6f 63 61 6c 20 74 |arks are| local t|
|00001b10| 6f 20 65 61 63 68 20 62 | 75 66 66 65 72 2e 22 29 |o each b|uffer.")|
|00001b20| 0a 28 64 65 66 76 61 72 | 20 76 69 2d 73 63 72 6f |.(defvar| vi-scro|
|00001b30| 6c 6c 2d 61 6d 6f 75 6e | 74 20 28 62 79 74 65 2d |ll-amoun|t (byte-|
|00001b40| 63 6f 64 65 20 22 c0 20 | c1 a5 87 22 20 5b 77 69 |code ". |..." [wi|
|00001b50| 6e 64 6f 77 2d 68 65 69 | 67 68 74 20 32 5d 20 32 |ndow-hei|ght 2] 2|
|00001b60| 29 20 22 5c 0a 44 65 66 | 61 75 6c 74 20 61 6d 6f |) "\.Def|ault amo|
|00001b70| 75 6e 74 20 6f 66 20 6c | 69 6e 65 73 20 66 6f 72 |unt of l|ines for|
|00001b80| 20 73 63 72 6f 6c 6c 69 | 6e 67 20 28 75 73 65 64 | scrolli|ng (used|
|00001b90| 20 62 79 20 22 20 5e 44 | 20 22 2f 22 20 5e 55 20 | by " ^D| "/" ^U |
|00001ba0| 22 29 2e 22 29 0a 28 64 | 65 66 76 61 72 20 76 69 |").").(d|efvar vi|
|00001bb0| 2d 73 68 69 66 74 2d 77 | 69 64 74 68 20 34 20 22 |-shift-w|idth 4 "|
|00001bc0| 5c 0a 53 68 69 66 74 20 | 61 6d 6f 75 6e 74 20 66 |\.Shift |amount f|
|00001bd0| 6f 72 20 22 20 3c 20 22 | 2f 22 20 3e 20 22 20 6f |or " < "|/" > " o|
|00001be0| 70 65 72 61 74 6f 72 73 | 2e 22 29 0a 28 64 65 66 |perators|.").(def|
|00001bf0| 76 61 72 20 76 69 2d 69 | 6e 73 2d 70 6f 69 6e 74 |var vi-i|ns-point|
|00001c00| 20 6e 69 6c 20 22 5c 0a | 4c 61 73 74 20 69 6e 73 | nil "\.|Last ins|
|00001c10| 65 72 74 69 6f 6e 20 70 | 6f 69 6e 74 2e 20 20 53 |ertion p|oint. S|
|00001c20| 68 6f 75 6c 64 20 75 73 | 65 20 27 6d 61 72 6b 27 |hould us|e 'mark'|
|00001c30| 20 69 6e 73 74 65 61 64 | 2e 22 29 0a 28 64 65 66 | instead|.").(def|
|00001c40| 76 61 72 20 76 69 2d 69 | 6e 73 2d 6c 65 6e 67 74 |var vi-i|ns-lengt|
|00001c50| 68 20 6e 69 6c 20 22 5c | 0a 4c 65 6e 67 74 68 20 |h nil "\|.Length |
|00001c60| 6f 66 20 6c 61 73 74 20 | 69 6e 73 65 72 74 69 6f |of last |insertio|
|00001c70| 6e 2e 22 29 0a 28 64 65 | 66 76 61 72 20 76 69 2d |n.").(de|fvar vi-|
|00001c80| 69 6e 73 2d 72 65 70 65 | 74 69 74 69 6f 6e 20 6e |ins-repe|tition n|
|00001c90| 69 6c 20 22 5c 0a 54 68 | 65 20 72 65 70 65 74 69 |il "\.Th|e repeti|
|00001ca0| 74 69 6f 6e 20 72 65 71 | 75 69 72 65 64 20 66 6f |tion req|uired fo|
|00001cb0| 72 20 6c 61 73 74 20 69 | 6e 73 65 72 74 69 6f 6e |r last i|nsertion|
|00001cc0| 2e 22 29 0a 28 64 65 66 | 76 61 72 20 76 69 2d 69 |.").(def|var vi-i|
|00001cd0| 6e 73 2d 6f 76 65 72 77 | 72 74 2d 70 20 6e 69 6c |ns-overw|rt-p nil|
|00001ce0| 20 22 5c 0a 54 20 69 66 | 20 6c 61 73 74 20 69 6e | "\.T if| last in|
|00001cf0| 73 65 72 74 69 6f 6e 20 | 77 61 73 20 61 20 72 65 |sertion |was a re|
|00001d00| 70 6c 61 63 65 20 61 63 | 74 75 61 6c 6c 79 2e 22 |place ac|tually."|
|00001d10| 29 0a 28 64 65 66 76 61 | 72 20 76 69 2d 69 6e 73 |).(defva|r vi-ins|
|00001d20| 2d 70 72 65 66 69 78 2d | 63 6f 64 65 20 6e 69 6c |-prefix-|code nil|
|00001d30| 20 22 5c 0a 43 6f 64 65 | 20 74 6f 20 62 65 20 65 | "\.Code| to be e|
|00001d40| 76 61 6c 27 65 64 20 62 | 65 66 6f 72 65 20 28 72 |val'ed b|efore (r|
|00001d50| 65 64 6f 2d 29 69 6e 73 | 65 72 74 69 6f 6e 20 62 |edo-)ins|ertion b|
|00001d60| 65 67 69 6e 73 2e 22 29 | 0a 28 64 65 66 76 61 72 |egins.")|.(defvar|
|00001d70| 20 76 69 2d 6c 61 73 74 | 2d 66 69 6e 64 2d 63 68 | vi-last|-find-ch|
|00001d80| 61 72 20 6e 69 6c 20 22 | 5c 0a 53 61 76 65 20 6c |ar nil "|\.Save l|
|00001d90| 61 73 74 20 64 69 72 65 | 63 74 69 6f 6e 2c 20 63 |ast dire|ction, c|
|00001da0| 68 61 72 20 61 6e 64 20 | 75 70 74 6f 2d 66 6c 61 |har and |upto-fla|
|00001db0| 67 20 75 73 65 64 20 66 | 6f 72 20 63 68 61 72 20 |g used f|or char |
|00001dc0| 66 69 6e 64 69 6e 67 2e | 22 29 0a 28 64 65 66 76 |finding.|").(defv|
|00001dd0| 61 72 20 76 69 2d 6c 61 | 73 74 2d 63 68 61 6e 67 |ar vi-la|st-chang|
|00001de0| 65 2d 63 6f 6d 6d 61 6e | 64 20 6e 69 6c 20 22 5c |e-comman|d nil "\|
|00001df0| 0a 53 61 76 65 20 63 6f | 6d 6d 6d 61 6e 64 73 20 |.Save co|mmmands |
|00001e00| 66 6f 72 20 72 65 64 6f | 69 6e 67 20 6c 61 73 74 |for redo|ing last|
|00001e10| 20 63 68 61 6e 67 65 73 | 2e 20 20 45 61 63 68 20 | changes|. Each |
|00001e20| 63 6f 6d 6d 61 6e 64 20 | 69 73 20 69 6e 20 28 46 |command |is in (F|
|00001e30| 55 4e 43 20 2e 20 41 52 | 47 53 29 0a 66 6f 72 6d |UNC . AR|GS).form|
|00001e40| 20 74 68 61 74 20 69 73 | 20 72 65 61 64 79 20 74 | that is| ready t|
|00001e50| 6f 20 62 65 20 27 61 70 | 70 6c 79 27 65 64 2e 22 |o be 'ap|ply'ed."|
|00001e60| 29 0a 28 64 65 66 76 61 | 72 20 76 69 2d 6c 61 73 |).(defva|r vi-las|
|00001e70| 74 2d 73 68 65 6c 6c 2d | 63 6f 6d 6d 61 6e 64 20 |t-shell-|command |
|00001e80| 6e 69 6c 20 22 5c 0a 53 | 61 76 65 20 6c 61 73 74 |nil "\.S|ave last|
|00001e90| 20 73 68 65 6c 6c 20 63 | 6f 6d 6d 61 6e 64 20 67 | shell c|ommand g|
|00001ea0| 69 76 65 6e 20 66 6f 72 | 20 5c 22 21 5c 22 20 6f |iven for| \"!\" o|
|00001eb0| 70 65 72 61 74 6f 72 2e | 22 29 0a 28 64 65 66 76 |perator.|").(defv|
|00001ec0| 61 72 20 76 69 2d 69 6e | 73 65 72 74 2d 73 74 61 |ar vi-in|sert-sta|
|00001ed0| 74 65 20 6e 69 6c 20 22 | 5c 0a 54 20 69 66 20 69 |te nil "|\.T if i|
|00001ee0| 74 20 69 73 20 69 6e 20 | 69 6e 73 65 72 74 20 73 |t is in |insert s|
|00001ef0| 74 61 74 65 2e 22 29 0a | 28 64 65 66 76 61 72 20 |tate.").|(defvar |
|00001f00| 76 69 2d 73 65 61 72 63 | 68 2d 6c 61 73 74 2d 63 |vi-searc|h-last-c|
|00001f10| 6f 6d 6d 61 6e 64 20 6e | 69 6c 20 22 5c 0a 53 61 |ommand n|il "\.Sa|
|00001f20| 76 65 20 6c 61 73 74 20 | 73 65 61 72 63 68 20 63 |ve last |search c|
|00001f30| 6f 6d 6d 61 6e 64 20 66 | 6f 72 20 70 6f 73 73 69 |ommand f|or possi|
|00001f40| 62 6c 65 20 72 65 64 6f | 2e 22 29 0a 28 64 65 66 |ble redo|.").(def|
|00001f50| 76 61 72 20 76 69 2d 6d | 6f 64 65 2d 6f 6c 64 2d |var vi-m|ode-old-|
|00001f60| 6c 6f 63 61 6c 2d 6d 61 | 70 20 6e 69 6c 20 22 5c |local-ma|p nil "\|
|00001f70| 0a 53 61 76 65 20 74 68 | 65 20 6c 6f 63 61 6c 2d |.Save th|e local-|
|00001f80| 6d 61 70 20 75 73 65 64 | 20 62 65 66 6f 72 65 20 |map used| before |
|00001f90| 65 6e 74 65 72 69 6e 67 | 20 76 69 2d 6d 6f 64 65 |entering| vi-mode|
|00001fa0| 2e 22 29 0a 28 64 65 66 | 76 61 72 20 76 69 2d 6d |.").(def|var vi-m|
|00001fb0| 6f 64 65 2d 6f 6c 64 2d | 6d 6f 64 65 2d 6e 61 6d |ode-old-|mode-nam|
|00001fc0| 65 20 6e 69 6c 20 22 5c | 0a 53 61 76 65 20 74 68 |e nil "\|.Save th|
|00001fd0| 65 20 6d 6f 64 65 2d 6e | 61 6d 65 20 62 65 66 6f |e mode-n|ame befo|
|00001fe0| 72 65 20 65 6e 74 65 72 | 69 6e 67 20 76 69 2d 6d |re enter|ing vi-m|
|00001ff0| 6f 64 65 2e 22 29 0a 28 | 64 65 66 76 61 72 20 76 |ode.").(|defvar v|
|00002000| 69 2d 6d 6f 64 65 2d 6f | 6c 64 2d 6d 61 6a 6f 72 |i-mode-o|ld-major|
|00002010| 2d 6d 6f 64 65 20 6e 69 | 6c 20 22 5c 0a 53 61 76 |-mode ni|l "\.Sav|
|00002020| 65 20 74 68 65 20 6d 61 | 6a 6f 72 2d 6d 6f 64 65 |e the ma|jor-mode|
|00002030| 20 62 65 66 6f 72 65 20 | 65 6e 74 65 72 69 6e 67 | before |entering|
|00002040| 20 76 69 2d 6d 6f 64 65 | 2e 22 29 0a 28 62 79 74 | vi-mode|.").(byt|
|00002050| 65 2d 63 6f 64 65 20 22 | c0 c1 21 ac 82 c2 11 c2 |e-code "|..!.....|
|00002060| 87 22 20 5b 62 6f 75 6e | 64 70 20 76 69 2d 6d 6f |." [boun|dp vi-mo|
|00002070| 64 65 2d 6f 6c 64 2d 63 | 61 73 65 2d 66 6f 6c 64 |de-old-c|ase-fold|
|00002080| 20 6e 69 6c 5d 20 32 29 | 0a 28 66 73 65 74 20 27 | nil] 2)|.(fset '|
|00002090| 76 69 2d 6d 6f 64 65 2d | 73 65 74 75 70 20 23 5b |vi-mode-|setup #[|
|000020a0| 6e 69 6c 20 22 c0 c1 21 | 88 c2 20 c3 a5 11 c0 c4 |nil "..!|.. .....|
|000020b0| 21 88 c5 14 c0 c6 21 88 | c0 c7 21 88 c0 c8 21 88 |!.....!.|..!...!.|
|000020c0| c0 c9 21 88 c0 ca 21 88 | c0 cb 21 88 c0 cc 21 88 |..!...!.|..!...!.|
|000020d0| c0 cd 21 88 c0 ce 21 88 | c0 cf 21 88 c0 d0 21 88 |..!...!.|..!...!.|
|000020e0| c0 d1 21 88 c0 d2 21 88 | c0 d3 21 88 d4 d5 21 87 |..!...!.|..!...!.|
|000020f0| 22 20 5b 6d 61 6b 65 2d | 6c 6f 63 61 6c 2d 76 61 |" [make-|local-va|
|00002100| 72 69 61 62 6c 65 20 76 | 69 2d 73 63 72 6f 6c 6c |riable v|i-scroll|
|00002110| 2d 61 6d 6f 75 6e 74 20 | 77 69 6e 64 6f 77 2d 68 |-amount |window-h|
|00002120| 65 69 67 68 74 20 32 20 | 76 69 2d 73 68 69 66 74 |eight 2 |vi-shift|
|00002130| 2d 77 69 64 74 68 20 34 | 20 76 69 2d 69 6e 73 2d |-width 4| vi-ins-|
|00002140| 70 6f 69 6e 74 20 76 69 | 2d 69 6e 73 2d 6c 65 6e |point vi|-ins-len|
|00002150| 67 74 68 20 76 69 2d 69 | 6e 73 2d 72 65 70 65 74 |gth vi-i|ns-repet|
|00002160| 69 74 69 6f 6e 20 76 69 | 2d 69 6e 73 2d 6f 76 65 |ition vi|-ins-ove|
|00002170| 72 77 72 74 2d 70 20 76 | 69 2d 69 6e 73 2d 70 72 |rwrt-p v|i-ins-pr|
|00002180| 65 66 69 78 2d 63 6f 64 | 65 20 76 69 2d 6c 61 73 |efix-cod|e vi-las|
|00002190| 74 2d 63 68 61 6e 67 65 | 2d 63 6f 6d 6d 61 6e 64 |t-change|-command|
|000021a0| 20 76 69 2d 6c 61 73 74 | 2d 73 68 65 6c 6c 2d 63 | vi-last|-shell-c|
|000021b0| 6f 6d 6d 61 6e 64 20 76 | 69 2d 6c 61 73 74 2d 66 |ommand v|i-last-f|
|000021c0| 69 6e 64 2d 63 68 61 72 | 20 76 69 2d 6d 61 72 6b |ind-char| vi-mark|
|000021d0| 2d 61 6c 69 73 74 20 76 | 69 2d 69 6e 73 65 72 74 |-alist v|i-insert|
|000021e0| 2d 73 74 61 74 65 20 76 | 69 2d 6d 6f 64 65 2d 6f |-state v|i-mode-o|
|000021f0| 6c 64 2d 6c 6f 63 61 6c | 2d 6d 61 70 20 76 69 2d |ld-local|-map vi-|
|00002200| 6d 6f 64 65 2d 6f 6c 64 | 2d 6d 6f 64 65 2d 6e 61 |mode-old|-mode-na|
|00002210| 6d 65 20 76 69 2d 6d 6f | 64 65 2d 6f 6c 64 2d 6d |me vi-mo|de-old-m|
|00002220| 61 6a 6f 72 2d 6d 6f 64 | 65 20 76 69 2d 6d 6f 64 |ajor-mod|e vi-mod|
|00002230| 65 2d 6f 6c 64 2d 63 61 | 73 65 2d 66 6f 6c 64 20 |e-old-ca|se-fold |
|00002240| 72 75 6e 2d 68 6f 6f 6b | 73 20 76 69 2d 6d 6f 64 |run-hook|s vi-mod|
|00002250| 65 2d 68 6f 6f 6b 5d 20 | 32 20 22 5c 0a 53 65 74 |e-hook] |2 "\.Set|
|00002260| 75 70 20 61 20 62 75 66 | 66 65 72 20 66 6f 72 20 |up a buf|fer for |
|00002270| 76 69 2d 6d 6f 64 65 20 | 62 79 20 63 72 65 61 74 |vi-mode |by creat|
|00002280| 69 6e 67 20 6e 65 63 65 | 73 73 61 72 79 20 62 75 |ing nece|ssary bu|
|00002290| 66 66 65 72 2d 6c 6f 63 | 61 6c 20 76 61 72 69 61 |ffer-loc|al varia|
|000022a0| 62 6c 65 73 2e 22 5d 29 | 0a 28 66 73 65 74 20 27 |bles."])|.(fset '|
|000022b0| 76 69 2d 6d 6f 64 65 20 | 23 5b 6e 69 6c 20 22 08 |vi-mode |#[nil ".|
|000022c0| ac 83 c1 20 88 5c 6e c3 | 3d ab 86 c4 c5 c6 20 5c |... .\n.|=..... \|
|000022d0| 22 87 c7 20 16 08 0e 09 | 16 5c 6e 5c 6e 10 0e 0b |".. ....|.\n\n...|
|000022e0| 16 0c cd 16 0b ce 0e 0f | 21 88 c3 12 d0 16 09 d1 |........|!.......|
|000022f0| d2 20 21 88 0e 13 ad 82 | d4 20 87 22 20 5b 76 69 |. !.....|. ." [vi|
|00002300| 2d 6d 6f 64 65 2d 6f 6c | 64 2d 6d 61 6a 6f 72 2d |-mode-ol|d-major-|
|00002310| 6d 6f 64 65 20 76 69 2d | 6d 6f 64 65 2d 73 65 74 |mode vi-|mode-set|
|00002320| 75 70 20 6d 61 6a 6f 72 | 2d 6d 6f 64 65 20 76 69 |up major|-mode vi|
|00002330| 2d 6d 6f 64 65 20 6d 65 | 73 73 61 67 65 20 22 41 |-mode me|ssage "A|
|00002340| 6c 72 65 61 64 79 20 69 | 6e 20 76 69 2d 6d 6f 64 |lready i|n vi-mod|
|00002350| 65 2e 22 20 64 69 6e 67 | 20 63 75 72 72 65 6e 74 |e." ding| current|
|00002360| 2d 6c 6f 63 61 6c 2d 6d | 61 70 20 76 69 2d 6d 6f |-local-m|ap vi-mo|
|00002370| 64 65 2d 6f 6c 64 2d 6c | 6f 63 61 6c 2d 6d 61 70 |de-old-l|ocal-map|
|00002380| 20 6d 6f 64 65 2d 6e 61 | 6d 65 20 76 69 2d 6d 6f | mode-na|me vi-mo|
|00002390| 64 65 2d 6f 6c 64 2d 6d | 6f 64 65 2d 6e 61 6d 65 |de-old-m|ode-name|
|000023a0| 20 63 61 73 65 2d 66 6f | 6c 64 2d 73 65 61 72 63 | case-fo|ld-searc|
|000023b0| 68 20 76 69 2d 6d 6f 64 | 65 2d 6f 6c 64 2d 63 61 |h vi-mod|e-old-ca|
|000023c0| 73 65 2d 66 6f 6c 64 20 | 6e 69 6c 20 75 73 65 2d |se-fold |nil use-|
|000023d0| 6c 6f 63 61 6c 2d 6d 61 | 70 20 76 69 2d 63 6f 6d |local-ma|p vi-com|
|000023e0| 2d 6d 61 70 20 22 56 49 | 22 20 73 65 74 2d 62 75 |-map "VI|" set-bu|
|000023f0| 66 66 65 72 2d 6d 6f 64 | 69 66 69 65 64 2d 70 20 |ffer-mod|ified-p |
|00002400| 62 75 66 66 65 72 2d 6d | 6f 64 69 66 69 65 64 2d |buffer-m|odified-|
|00002410| 70 20 76 69 2d 69 6e 73 | 65 72 74 2d 73 74 61 74 |p vi-ins|ert-stat|
|00002420| 65 20 76 69 2d 65 6e 64 | 2d 6f 66 2d 69 6e 73 65 |e vi-end|-of-inse|
|00002430| 72 74 2d 73 74 61 74 65 | 5d 20 33 20 22 5c 0a 4d |rt-state|] 3 "\.M|
|00002440| 61 6a 6f 72 20 6d 6f 64 | 65 20 74 68 61 74 20 61 |ajor mod|e that a|
|00002450| 63 74 73 20 6c 69 6b 65 | 20 74 68 65 20 60 76 69 |cts like| the `vi|
|00002460| 27 20 65 64 69 74 6f 72 | 2e 0a 54 68 65 20 70 75 |' editor|..The pu|
|00002470| 72 70 6f 73 65 20 6f 66 | 20 74 68 69 73 20 6d 6f |rpose of| this mo|
|00002480| 64 65 20 69 73 20 74 6f | 20 70 72 6f 76 69 64 65 |de is to| provide|
|00002490| 20 79 6f 75 20 74 68 65 | 20 63 6f 6d 62 69 6e 65 | you the| combine|
|000024a0| 64 20 70 6f 77 65 72 20 | 6f 66 20 76 69 20 28 6e |d power |of vi (n|
|000024b0| 61 6d 65 6c 79 2c 0a 74 | 68 65 20 5c 22 63 72 6f |amely,.t|he \"cro|
|000024c0| 73 73 20 70 72 6f 64 75 | 63 74 5c 22 20 65 66 66 |ss produ|ct\" eff|
|000024d0| 65 63 74 20 6f 66 20 63 | 6f 6d 6d 61 6e 64 73 20 |ect of c|ommands |
|000024e0| 61 6e 64 20 72 65 70 65 | 61 74 20 6c 61 73 74 20 |and repe|at last |
|000024f0| 63 68 61 6e 67 65 73 29 | 20 61 6e 64 20 45 6d 61 |changes)| and Ema|
|00002500| 63 73 2e 0a 0a 54 68 69 | 73 20 63 6f 6d 6d 61 6e |cs...Thi|s comman|
|00002510| 64 20 72 65 64 65 66 69 | 6e 65 73 20 6e 65 61 72 |d redefi|nes near|
|00002520| 6c 79 20 61 6c 6c 20 6b | 65 79 73 20 74 6f 20 6c |ly all k|eys to l|
|00002530| 6f 6f 6b 20 6c 69 6b 65 | 20 76 69 20 63 6f 6d 6d |ook like| vi comm|
|00002540| 61 6e 64 73 2e 0a 49 74 | 20 72 65 63 6f 72 64 73 |ands..It| records|
|00002550| 20 74 68 65 20 70 72 65 | 76 69 6f 75 73 20 6d 61 | the pre|vious ma|
|00002560| 6a 6f 72 20 6d 6f 64 65 | 2c 20 61 6e 64 20 61 6e |jor mode|, and an|
|00002570| 79 20 76 69 20 63 6f 6d | 6d 61 6e 64 20 66 6f 72 |y vi com|mand for|
|00002580| 20 69 6e 70 75 74 0a 28 | 60 69 27 2c 20 60 61 27 | input.(|`i', `a'|
|00002590| 2c 20 60 73 27 2c 20 65 | 74 63 2e 29 20 73 77 69 |, `s', e|tc.) swi|
|000025a0| 74 63 68 65 73 20 62 61 | 63 6b 20 74 6f 20 74 68 |tches ba|ck to th|
|000025b0| 61 74 20 6d 6f 64 65 2e | 0a 54 68 75 73 2c 20 6f |at mode.|.Thus, o|
|000025c0| 72 64 69 6e 61 72 79 20 | 45 6d 61 63 73 20 28 69 |rdinary |Emacs (i|
|000025d0| 6e 20 77 68 61 74 65 76 | 65 72 20 6d 61 6a 6f 72 |n whatev|er major|
|000025e0| 20 6d 6f 64 65 20 79 6f | 75 20 68 61 64 20 62 65 | mode yo|u had be|
|000025f0| 65 6e 20 75 73 69 6e 67 | 29 0a 69 73 20 5c 22 69 |en using|).is \"i|
|00002600| 6e 70 75 74 5c 22 20 6d | 6f 64 65 20 61 73 20 66 |nput\" m|ode as f|
|00002610| 61 72 20 61 73 20 76 69 | 20 69 73 20 63 6f 6e 63 |ar as vi| is conc|
|00002620| 65 72 6e 65 64 2e 0a 0a | 54 6f 20 67 65 74 20 62 |erned...|To get b|
|00002630| 61 63 6b 20 69 6e 74 6f | 20 76 69 20 66 72 6f 6d |ack into| vi from|
|00002640| 20 5c 22 69 6e 70 75 74 | 5c 22 20 6d 6f 64 65 2c | \"input|\" mode,|
|00002650| 20 79 6f 75 20 6d 75 73 | 74 20 69 73 73 75 65 20 | you mus|t issue |
|00002660| 74 68 69 73 20 63 6f 6d | 6d 61 6e 64 20 61 67 61 |this com|mand aga|
|00002670| 69 6e 2e 0a 54 68 65 72 | 65 66 6f 72 65 2c 20 69 |in..Ther|efore, i|
|00002680| 74 20 69 73 20 72 65 63 | 6f 6d 6d 65 6e 64 65 64 |t is rec|ommended|
|00002690| 20 74 68 61 74 20 79 6f | 75 20 61 73 73 69 67 6e | that yo|u assign|
|000026a0| 20 69 74 20 74 6f 20 61 | 20 6b 65 79 2e 0a 0a 4d | it to a| key...M|
|000026b0| 61 6a 6f 72 20 64 69 66 | 66 65 72 65 6e 63 65 73 |ajor dif|ferences|
|000026c0| 20 62 65 74 77 65 65 6e | 20 74 68 69 73 20 6d 6f | between| this mo|
|000026d0| 64 65 20 61 6e 64 20 72 | 65 61 6c 20 76 69 20 3a |de and r|eal vi :|
|000026e0| 0a 0a 2a 20 4c 69 6d 69 | 74 61 74 69 6f 6e 73 20 |..* Limi|tations |
|000026f0| 61 6e 64 20 75 6e 73 75 | 70 70 6f 72 74 65 64 20 |and unsu|pported |
|00002700| 66 65 61 74 75 72 65 73 | 0a 20 20 2d 20 53 65 61 |features|. - Sea|
|00002710| 72 63 68 20 70 61 74 74 | 65 72 6e 73 20 77 69 74 |rch patt|erns wit|
|00002720| 68 20 6c 69 6e 65 20 6f | 66 66 73 65 74 20 28 65 |h line o|ffset (e|
|00002730| 2e 67 2e 20 2f 70 61 74 | 2f 2b 33 20 6f 72 20 2f |.g. /pat|/+3 or /|
|00002740| 70 61 74 2f 7a 2e 29 20 | 61 72 65 0a 20 20 20 20 |pat/z.) |are. |
|00002750| 6e 6f 74 20 73 75 70 70 | 6f 72 74 65 64 2e 0a 20 |not supp|orted.. |
|00002760| 20 2d 20 45 78 20 63 6f | 6d 6d 61 6e 64 73 20 61 | - Ex co|mmands a|
|00002770| 72 65 20 6e 6f 74 20 69 | 6d 70 6c 65 6d 65 6e 74 |re not i|mplement|
|00002780| 65 64 3b 20 74 72 79 20 | 27 3a 27 20 74 6f 20 67 |ed; try |':' to g|
|00002790| 65 74 20 73 6f 6d 65 20 | 68 69 6e 74 73 2e 0a 20 |et some |hints.. |
|000027a0| 20 2d 20 4e 6f 20 6c 69 | 6e 65 20 75 6e 64 6f 20 | - No li|ne undo |
|000027b0| 28 69 2e 65 2e 20 74 68 | 65 20 27 55 27 20 63 6f |(i.e. th|e 'U' co|
|000027c0| 6d 6d 61 6e 64 29 2c 20 | 62 75 74 20 6d 75 6c 74 |mmand), |but mult|
|000027d0| 69 2d 75 6e 64 6f 20 69 | 73 20 61 20 73 74 61 6e |i-undo i|s a stan|
|000027e0| 64 61 72 64 20 66 65 61 | 74 75 72 65 2e 0a 0a 2a |dard fea|ture...*|
|000027f0| 20 4d 6f 64 69 66 69 63 | 61 74 69 6f 6e 73 0a 20 | Modific|ations. |
|00002800| 20 2d 20 54 68 65 20 73 | 74 6f 70 70 69 6e 67 20 | - The s|topping |
|00002810| 70 6f 73 69 74 69 6f 6e | 73 20 66 6f 72 20 73 6f |position|s for so|
|00002820| 6d 65 20 70 6f 69 6e 74 | 20 6d 6f 74 69 6f 6e 20 |me point| motion |
|00002830| 63 6f 6d 6d 61 6e 64 73 | 20 28 77 6f 72 64 20 62 |commands| (word b|
|00002840| 6f 75 6e 64 61 72 79 2c | 0a 20 20 20 20 70 61 74 |oundary,|. pat|
|00002850| 74 65 72 6e 20 73 65 61 | 72 63 68 29 20 61 72 65 |tern sea|rch) are|
|00002860| 20 73 6c 69 67 68 74 6c | 79 20 64 69 66 66 65 72 | slightl|y differ|
|00002870| 65 6e 74 20 66 72 6f 6d | 20 73 74 61 6e 64 61 72 |ent from| standar|
|00002880| 64 20 27 76 69 27 2e 0a | 20 20 20 20 41 6c 73 6f |d 'vi'..| Also|
|00002890| 2c 20 6e 6f 20 61 75 74 | 6f 6d 61 74 69 63 20 77 |, no aut|omatic w|
|000028a0| 72 61 70 20 61 72 6f 75 | 6e 64 20 61 74 20 65 6e |rap arou|nd at en|
|000028b0| 64 20 6f 66 20 62 75 66 | 66 65 72 20 66 6f 72 20 |d of buf|fer for |
|000028c0| 70 61 74 74 65 72 6e 20 | 73 65 61 72 63 68 69 6e |pattern |searchin|
|000028d0| 67 2e 0a 20 20 2d 20 53 | 69 6e 63 65 20 63 68 61 |g.. - S|ince cha|
|000028e0| 6e 67 65 73 20 61 72 65 | 20 64 6f 6e 65 20 69 6e |nges are| done in|
|000028f0| 20 74 77 6f 20 73 74 65 | 70 73 20 28 64 65 6c 65 | two ste|ps (dele|
|00002900| 74 69 6f 6e 20 74 68 65 | 6e 20 69 6e 73 65 72 74 |tion the|n insert|
|00002910| 69 6f 6e 29 2c 20 79 6f | 75 20 6e 65 65 64 0a 20 |ion), yo|u need. |
|00002920| 20 20 20 74 6f 20 75 6e | 64 6f 20 74 77 69 63 65 | to un|do twice|
|00002930| 20 74 6f 20 63 6f 6d 70 | 6c 65 74 65 6c 79 20 75 | to comp|letely u|
|00002940| 6e 64 6f 20 61 20 63 68 | 61 6e 67 65 20 63 6f 6d |ndo a ch|ange com|
|00002950| 6d 61 6e 64 2e 20 20 42 | 75 74 20 74 68 69 73 20 |mand. B|ut this |
|00002960| 69 73 20 6e 6f 74 20 6e | 65 65 64 65 64 0a 20 20 |is not n|eeded. |
|00002970| 20 20 66 6f 72 20 75 6e | 64 6f 69 6e 67 20 61 20 | for un|doing a |
|00002980| 72 65 70 65 61 74 65 64 | 20 63 68 61 6e 67 65 20 |repeated| change |
|00002990| 63 6f 6d 6d 61 6e 64 2e | 0a 20 20 2d 20 4e 6f 20 |command.|. - No |
|000029a0| 6e 65 65 64 20 74 6f 20 | 73 65 74 2f 75 6e 73 65 |need to |set/unse|
|000029b0| 74 20 27 6d 61 67 69 63 | 27 2c 20 74 6f 20 73 65 |t 'magic|', to se|
|000029c0| 61 72 63 68 20 66 6f 72 | 20 61 20 73 74 72 69 6e |arch for| a strin|
|000029d0| 67 20 77 69 74 68 20 72 | 65 67 75 6c 61 72 20 65 |g with r|egular e|
|000029e0| 78 70 72 0a 20 20 20 20 | 69 6e 20 69 74 20 6a 75 |xpr. |in it ju|
|000029f0| 73 74 20 70 75 74 20 61 | 20 70 72 65 66 69 78 20 |st put a| prefix |
|00002a00| 61 72 67 20 66 6f 72 20 | 74 68 65 20 73 65 61 72 |arg for |the sear|
|00002a10| 63 68 20 63 6f 6d 6d 61 | 6e 64 73 2e 20 20 52 65 |ch comma|nds. Re|
|00002a20| 70 6c 61 63 65 20 63 6d | 64 73 20 74 6f 6f 2e 0a |place cm|ds too..|
|00002a30| 20 20 2d 20 5e 52 20 69 | 73 20 62 6f 75 6e 64 20 | - ^R i|s bound |
|00002a40| 74 6f 20 69 6e 63 72 65 | 6d 65 6e 74 61 6c 20 62 |to incre|mental b|
|00002a50| 61 63 6b 77 61 72 64 20 | 73 65 61 72 63 68 2c 20 |ackward |search, |
|00002a60| 73 6f 20 75 73 65 20 5e | 4c 20 74 6f 20 72 65 64 |so use ^|L to red|
|00002a70| 72 61 77 20 73 63 72 65 | 65 6e 2e 0a 0a 2a 20 45 |raw scre|en...* E|
|00002a80| 78 74 65 6e 73 69 6f 6e | 73 0a 20 20 2d 20 53 6f |xtension|s. - So|
|00002a90| 6d 65 20 73 74 61 6e 64 | 61 72 64 20 28 6f 72 20 |me stand|ard (or |
|00002aa0| 6d 6f 64 69 66 69 65 64 | 29 20 45 6d 61 63 73 20 |modified|) Emacs |
|00002ab0| 63 6f 6d 6d 61 6e 64 73 | 20 77 65 72 65 20 69 6e |commands| were in|
|00002ac0| 74 65 67 72 61 74 65 64 | 2c 20 73 75 63 68 20 61 |tegrated|, such a|
|00002ad0| 73 0a 20 20 20 20 69 6e | 63 72 65 6d 65 6e 74 61 |s. in|crementa|
|00002ae0| 6c 20 73 65 61 72 63 68 | 2c 20 71 75 65 72 79 20 |l search|, query |
|00002af0| 72 65 70 6c 61 63 65 2c | 20 74 72 61 6e 73 70 6f |replace,| transpo|
|00002b00| 73 65 20 6f 62 6a 65 63 | 74 73 2c 20 61 6e 64 20 |se objec|ts, and |
|00002b10| 6b 65 79 62 6f 61 72 64 | 20 6d 61 63 72 6f 73 2e |keyboard| macros.|
|00002b20| 0a 20 20 2d 20 49 6e 20 | 63 6f 6d 6d 61 6e 64 20 |. - In |command |
|00002b30| 73 74 61 74 65 2c 20 5e | 58 20 6c 69 6e 6b 73 20 |state, ^|X links |
|00002b40| 74 6f 20 74 68 65 20 27 | 63 74 6c 2d 78 2d 6d 61 |to the '|ctl-x-ma|
|00002b50| 70 27 2c 20 61 6e 64 20 | 45 53 43 20 63 61 6e 20 |p', and |ESC can |
|00002b60| 62 65 20 6c 69 6e 6b 65 | 64 20 74 6f 0a 20 20 20 |be linke|d to. |
|00002b70| 20 65 73 63 2d 6d 61 70 | 20 6f 72 20 73 65 74 20 | esc-map| or set |
|00002b80| 75 6e 64 65 66 69 6e 65 | 64 2e 20 20 54 68 65 73 |undefine|d. Thes|
|00002b90| 65 20 63 61 6e 20 67 69 | 76 65 20 79 6f 75 20 74 |e can gi|ve you t|
|00002ba0| 68 65 20 66 75 6c 6c 20 | 70 6f 77 65 72 20 6f 66 |he full |power of|
|00002bb0| 20 45 6d 61 63 73 2e 0a | 20 20 2d 20 53 65 65 20 | Emacs..| - See |
|00002bc0| 76 69 2d 63 6f 6d 2d 6d | 61 70 20 66 6f 72 20 74 |vi-com-m|ap for t|
|00002bd0| 68 6f 73 65 20 6b 65 79 | 73 20 74 68 61 74 20 61 |hose key|s that a|
|00002be0| 72 65 20 65 78 74 65 6e | 73 69 6f 6e 73 20 74 6f |re exten|sions to|
|00002bf0| 20 73 74 61 6e 64 61 72 | 64 20 76 69 2c 20 65 2e | standar|d vi, e.|
|00002c00| 67 2e 0a 20 20 20 20 60 | 76 69 2d 6e 61 6d 65 2d |g.. `|vi-name-|
|00002c10| 6c 61 73 74 2d 63 68 61 | 6e 67 65 2d 6f 72 2d 6d |last-cha|nge-or-m|
|00002c20| 61 63 72 6f 27 2c 20 60 | 76 69 2d 76 65 72 69 66 |acro', `|vi-verif|
|00002c30| 79 2d 73 70 65 6c 6c 69 | 6e 67 27 2c 20 60 76 69 |y-spelli|ng', `vi|
|00002c40| 2d 6c 6f 63 61 74 65 2d | 64 65 66 27 2c 0a 20 20 |-locate-|def',. |
|00002c50| 20 20 60 76 69 2d 6d 61 | 72 6b 2d 72 65 67 69 6f | `vi-ma|rk-regio|
|00002c60| 6e 27 2c 20 61 6e 64 20 | 27 76 69 2d 71 75 6f 74 |n', and |'vi-quot|
|00002c70| 65 2d 77 6f 72 64 73 27 | 2e 20 20 53 6f 6d 65 20 |e-words'|. Some |
|00002c80| 6f 66 20 74 68 65 6d 20 | 61 72 65 20 71 75 69 74 |of them |are quit|
|00002c90| 65 20 68 61 6e 64 79 2e | 0a 20 20 2d 20 55 73 65 |e handy.|. - Use|
|00002ca0| 20 5c 5c 5b 76 69 2d 73 | 77 69 74 63 68 2d 6d 6f | \\[vi-s|witch-mo|
|00002cb0| 64 65 5d 20 74 6f 20 73 | 77 69 74 63 68 20 61 6d |de] to s|witch am|
|00002cc0| 6f 6e 67 20 64 69 66 66 | 65 72 65 6e 74 20 6d 6f |ong diff|erent mo|
|00002cd0| 64 65 73 20 71 75 69 63 | 6b 6c 79 2e 0a 20 20 0a |des quic|kly.. .|
|00002ce0| 53 79 6e 74 61 78 20 74 | 61 62 6c 65 20 61 6e 64 |Syntax t|able and|
|00002cf0| 20 61 62 62 72 65 76 73 | 20 77 68 69 6c 65 20 69 | abbrevs| while i|
|00002d00| 6e 20 76 69 20 6d 6f 64 | 65 20 72 65 6d 61 69 6e |n vi mod|e remain|
|00002d10| 20 61 73 20 74 68 65 79 | 20 77 65 72 65 20 69 6e | as they| were in|
|00002d20| 20 45 6d 61 63 73 2e 22 | 20 6e 69 6c 5d 29 0a 28 | Emacs."| nil]).(|
|00002d30| 66 73 65 74 20 27 76 69 | 2d 64 69 6e 67 20 23 5b |fset 'vi|-ding #[|
|00002d40| 6e 69 6c 20 22 c0 20 87 | 22 20 5b 64 69 6e 67 5d |nil ". .|" [ding]|
|00002d50| 20 31 20 22 5c 0a 44 69 | 6e 67 20 21 22 20 6e 69 | 1 "\.Di|ng !" ni|
|00002d60| 6c 5d 29 0a 28 66 73 65 | 74 20 27 76 69 2d 73 61 |l]).(fse|t 'vi-sa|
|00002d70| 76 65 2d 61 6c 6c 2d 61 | 6e 64 2d 65 78 69 74 20 |ve-all-a|nd-exit |
|00002d80| 23 5b 6e 69 6c 20 22 c0 | c1 21 88 c2 20 87 22 20 |#[nil ".|.!.. ." |
|00002d90| 5b 73 61 76 65 2d 73 6f | 6d 65 2d 62 75 66 66 65 |[save-so|me-buffe|
|00002da0| 72 73 20 74 20 6b 69 6c | 6c 2d 65 6d 61 63 73 5d |rs t kil|l-emacs]|
|00002db0| 20 32 20 22 5c 0a 53 61 | 76 65 20 61 6c 6c 20 6d | 2 "\.Sa|ve all m|
|00002dc0| 6f 64 69 66 69 65 64 20 | 62 75 66 66 65 72 73 20 |odified |buffers |
|00002dd0| 77 69 74 68 6f 75 74 20 | 61 73 6b 69 6e 67 2c 20 |without |asking, |
|00002de0| 74 68 65 6e 20 65 78 69 | 74 73 20 65 6d 61 63 73 |then exi|ts emacs|
|00002df0| 2e 22 20 6e 69 6c 5d 29 | 0a 28 62 79 74 65 2d 63 |." nil])|.(byte-c|
|00002e00| 6f 64 65 20 22 c0 c1 21 | ac 82 c2 11 c0 c3 21 ac |ode "..!|......!.|
|00002e10| 82 c2 13 c2 87 22 20 5b | 62 6f 75 6e 64 70 20 76 |....." [|boundp v|
|00002e20| 69 2d 72 65 70 6c 61 63 | 65 64 2d 73 74 72 69 6e |i-replac|ed-strin|
|00002e30| 67 20 6e 69 6c 20 76 69 | 2d 72 65 70 6c 61 63 69 |g nil vi|-replaci|
|00002e40| 6e 67 2d 73 74 72 69 6e | 67 5d 20 32 29 0a 28 66 |ng-strin|g] 2).(f|
|00002e50| 73 65 74 20 27 76 69 2d | 65 78 2d 63 6d 64 20 23 |set 'vi-|ex-cmd #|
|00002e60| 5b 6e 69 6c 20 22 c0 90 | c1 c2 c3 21 21 91 87 22 |[nil "..|...!!.."|
|00002e70| 20 5b 22 2a 48 65 6c 70 | 2a 22 20 70 72 69 6e 63 | ["*Help|*" princ|
|00002e80| 20 64 6f 63 75 6d 65 6e | 74 61 74 69 6f 6e 20 76 | documen|tation v|
|00002e90| 69 2d 65 78 2d 63 6d 64 | 5d 20 34 20 22 5c 0a 45 |i-ex-cmd|] 4 "\.E|
|00002ea0| 78 20 63 6f 6d 6d 61 6e | 64 73 20 61 72 65 20 6e |x comman|ds are n|
|00002eb0| 6f 74 20 69 6d 70 6c 65 | 6d 65 6e 74 65 64 20 69 |ot imple|mented i|
|00002ec0| 6e 20 45 76 69 20 6d 6f | 64 65 2e 20 20 46 6f 72 |n Evi mo|de. For|
|00002ed0| 20 73 6f 6d 65 20 63 6f | 6d 6d 6f 6e 6c 79 20 75 | some co|mmonly u|
|00002ee0| 73 65 64 20 65 78 0a 63 | 6f 6d 6d 61 6e 64 73 2c |sed ex.c|ommands,|
|00002ef0| 20 79 6f 75 20 63 61 6e | 20 75 73 65 20 74 68 65 | you can| use the|
|00002f00| 20 66 6f 6c 6c 6f 77 69 | 6e 67 20 61 6c 74 65 72 | followi|ng alter|
|00002f10| 6e 61 74 69 76 65 73 20 | 66 6f 72 20 73 69 6d 69 |natives |for simi|
|00002f20| 6c 61 72 20 65 66 66 65 | 63 74 20 3a 0a 77 20 20 |lar effe|ct :.w |
|00002f30| 20 20 20 20 20 20 20 20 | 20 20 43 2d 78 20 43 2d | | C-x C-|
|00002f40| 73 20 28 73 61 76 65 2d | 62 75 66 66 65 72 29 0a |s (save-|buffer).|
|00002f50| 77 71 20 20 20 20 20 20 | 20 20 20 20 20 43 2d 78 |wq | C-x|
|00002f60| 20 43 2d 63 20 28 73 61 | 76 65 2d 62 75 66 66 65 | C-c (sa|ve-buffe|
|00002f70| 72 73 2d 6b 69 6c 6c 2d | 65 6d 61 63 73 29 0a 77 |rs-kill-|emacs).w|
|00002f80| 20 66 6e 61 6d 65 20 20 | 20 20 20 20 43 2d 78 20 | fname | C-x |
|00002f90| 43 2d 77 20 28 77 72 69 | 74 65 2d 66 69 6c 65 29 |C-w (wri|te-file)|
|00002fa0| 0a 65 20 66 6e 61 6d 65 | 20 20 20 20 20 20 43 2d |.e fname| C-|
|00002fb0| 78 20 43 2d 66 20 28 66 | 69 6e 64 2d 66 69 6c 65 |x C-f (f|ind-file|
|00002fc0| 29 0a 72 20 66 6e 61 6d | 65 20 20 20 20 20 20 43 |).r fnam|e C|
|00002fd0| 2d 78 20 69 20 20 20 28 | 69 6e 73 65 72 74 2d 66 |-x i (|insert-f|
|00002fe0| 69 6c 65 29 0a 73 2f 6f | 6c 64 2f 6e 65 77 20 20 |ile).s/o|ld/new |
|00002ff0| 20 20 75 73 65 20 71 20 | 28 76 69 2d 72 65 70 6c | use q |(vi-repl|
|00003000| 61 63 65 29 20 74 6f 20 | 64 6f 20 75 6e 63 6f 6e |ace) to |do uncon|
|00003010| 64 69 74 69 6f 6e 61 6c | 20 72 65 70 6c 61 63 65 |ditional| replace|
|00003020| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 75 73 |. | us|
|00003030| 65 20 43 2d 71 20 28 76 | 69 2d 71 75 65 72 79 2d |e C-q (v|i-query-|
|00003040| 72 65 70 6c 61 63 65 29 | 20 74 6f 20 64 6f 20 71 |replace)| to do q|
|00003050| 75 65 72 79 20 72 65 70 | 6c 61 63 65 0a 73 65 74 |uery rep|lace.set|
|00003060| 20 73 77 3d 6e 20 20 20 | 20 20 4d 2d 78 20 73 65 | sw=n | M-x se|
|00003070| 74 2d 76 61 72 69 61 62 | 6c 65 20 76 69 2d 73 68 |t-variab|le vi-sh|
|00003080| 69 66 74 2d 77 69 64 74 | 68 20 6e 20 22 20 6e 69 |ift-widt|h n " ni|
|00003090| 6c 5d 29 0a 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |l]).(byt|e-code "|
|000030a0| c0 c1 4d 88 c2 c3 4d 87 | 22 20 5b 76 69 2d 75 6e |..M...M.|" [vi-un|
|000030b0| 64 65 66 69 6e 65 64 20 | 23 5b 6e 69 6c 20 22 c0 |defined |#[nil ".|
|000030c0| c1 c2 0b 21 5c 22 88 c4 | 20 87 22 20 5b 6d 65 73 |...!\"..| ." [mes|
|000030d0| 73 61 67 65 20 22 43 6f | 6d 6d 61 6e 64 20 6b 65 |sage "Co|mmand ke|
|000030e0| 79 20 5c 22 25 73 5c 22 | 20 69 73 20 75 6e 64 65 |y \"%s\"| is unde|
|000030f0| 66 69 6e 65 64 20 69 6e | 20 45 76 69 2e 22 20 73 |fined in| Evi." s|
|00003100| 69 6e 67 6c 65 2d 6b 65 | 79 2d 64 65 73 63 72 69 |ingle-ke|y-descri|
|00003110| 70 74 69 6f 6e 20 6c 61 | 73 74 2d 63 6f 6d 6d 61 |ption la|st-comma|
|00003120| 6e 64 2d 63 68 61 72 20 | 64 69 6e 67 5d 20 34 20 |nd-char |ding] 4 |
|00003130| 6e 69 6c 20 6e 69 6c 5d | 20 76 69 2d 75 6e 69 6d |nil nil]| vi-unim|
|00003140| 70 6c 65 6d 65 6e 74 65 | 64 20 23 5b 6e 69 6c 20 |plemente|d #[nil |
|00003150| 22 c0 c1 c2 0b 21 5c 22 | 88 c4 20 87 22 20 5b 6d |"....!\"|.. ." [m|
|00003160| 65 73 73 61 67 65 20 22 | 43 6f 6d 6d 61 6e 64 20 |essage "|Command |
|00003170| 6b 65 79 20 5c 22 25 73 | 5c 22 20 69 73 20 6e 6f |key \"%s|\" is no|
|00003180| 74 20 69 6d 70 6c 65 6d | 65 6e 74 65 64 20 69 6e |t implem|ented in|
|00003190| 20 45 76 69 2e 22 20 73 | 69 6e 67 6c 65 2d 6b 65 | Evi." s|ingle-ke|
|000031a0| 79 2d 64 65 73 63 72 69 | 70 74 69 6f 6e 20 6c 61 |y-descri|ption la|
|000031b0| 73 74 2d 63 6f 6d 6d 61 | 6e 64 2d 63 68 61 72 20 |st-comma|nd-char |
|000031c0| 64 69 6e 67 5d 20 34 20 | 6e 69 6c 20 6e 69 6c 5d |ding] 4 |nil nil]|
|000031d0| 5d 20 32 29 0a 28 66 73 | 65 74 20 27 76 69 2d 67 |] 2).(fs|et 'vi-g|
|000031e0| 6f 74 6f 2d 69 6e 73 65 | 72 74 2d 73 74 61 74 65 |oto-inse|rt-state|
|000031f0| 20 23 5b 28 72 65 70 65 | 74 69 74 69 6f 6e 20 26 | #[(repe|tition &|
|00003200| 6f 70 74 69 6f 6e 61 6c | 20 70 72 65 66 69 78 2d |optional| prefix-|
|00003210| 63 6f 64 65 20 64 6f 2d | 69 74 2d 6e 6f 77 2d 70 |code do-|it-now-p|
|00003220| 29 20 22 08 ab 87 c1 5c | 6e 40 5c 6e 41 5c 22 88 |) "....\|n@\nA\".|
|00003230| 60 13 0c 15 5c 6e 16 06 | 0e 07 16 08 0e 09 16 5c |`...\n..|.......\|
|00003240| 6e cb 0e 0c 21 88 0e 0d | 16 0e cf d0 20 21 88 d1 |n...!...|.... !..|
|00003250| 89 16 12 87 22 20 5b 64 | 6f 2d 69 74 2d 6e 6f 77 |...." [d|o-it-now|
|00003260| 2d 70 20 61 70 70 6c 79 | 20 70 72 65 66 69 78 2d |-p apply| prefix-|
|00003270| 63 6f 64 65 20 76 69 2d | 69 6e 73 2d 70 6f 69 6e |code vi-|ins-poin|
|00003280| 74 20 72 65 70 65 74 69 | 74 69 6f 6e 20 76 69 2d |t repeti|tion vi-|
|00003290| 69 6e 73 2d 72 65 70 65 | 74 69 74 69 6f 6e 20 76 |ins-repe|tition v|
|000032a0| 69 2d 69 6e 73 2d 70 72 | 65 66 69 78 2d 63 6f 64 |i-ins-pr|efix-cod|
|000032b0| 65 20 76 69 2d 6d 6f 64 | 65 2d 6f 6c 64 2d 6d 6f |e vi-mod|e-old-mo|
|000032c0| 64 65 2d 6e 61 6d 65 20 | 6d 6f 64 65 2d 6e 61 6d |de-name |mode-nam|
|000032d0| 65 20 76 69 2d 6d 6f 64 | 65 2d 6f 6c 64 2d 63 61 |e vi-mod|e-old-ca|
|000032e0| 73 65 2d 66 6f 6c 64 20 | 63 61 73 65 2d 66 6f 6c |se-fold |case-fol|
|000032f0| 64 2d 73 65 61 72 63 68 | 20 75 73 65 2d 6c 6f 63 |d-search| use-loc|
|00003300| 61 6c 2d 6d 61 70 20 76 | 69 2d 6d 6f 64 65 2d 6f |al-map v|i-mode-o|
|00003310| 6c 64 2d 6c 6f 63 61 6c | 2d 6d 61 70 20 76 69 2d |ld-local|-map vi-|
|00003320| 6d 6f 64 65 2d 6f 6c 64 | 2d 6d 61 6a 6f 72 2d 6d |mode-old|-major-m|
|00003330| 6f 64 65 20 6d 61 6a 6f | 72 2d 6d 6f 64 65 20 73 |ode majo|r-mode s|
|00003340| 65 74 2d 62 75 66 66 65 | 72 2d 6d 6f 64 69 66 69 |et-buffe|r-modifi|
|00003350| 65 64 2d 70 20 62 75 66 | 66 65 72 2d 6d 6f 64 69 |ed-p buf|fer-modi|
|00003360| 66 69 65 64 2d 70 20 74 | 20 76 69 2d 69 6e 73 65 |fied-p t| vi-inse|
|00003370| 72 74 2d 73 74 61 74 65 | 5d 20 33 20 22 5c 0a 47 |rt-state|] 3 "\.G|
|00003380| 6f 20 69 6e 74 6f 20 69 | 6e 73 65 72 74 20 73 74 |o into i|nsert st|
|00003390| 61 74 65 2c 20 74 68 65 | 20 74 65 78 74 20 65 6e |ate, the| text en|
|000033a0| 74 65 72 65 64 20 77 69 | 6c 6c 20 62 65 20 72 65 |tered wi|ll be re|
|000033b0| 70 65 61 74 65 64 20 69 | 66 20 52 45 50 45 54 49 |peated i|f REPETI|
|000033c0| 54 49 4f 4e 20 3e 20 31 | 2e 0a 49 66 20 50 52 45 |TION > 1|..If PRE|
|000033d0| 46 49 58 2d 43 4f 44 45 | 20 69 73 20 67 69 76 65 |FIX-CODE| is give|
|000033e0| 6e 2c 20 64 6f 20 69 74 | 20 62 65 66 6f 72 65 20 |n, do it| before |
|000033f0| 69 6e 73 65 72 74 69 6f | 6e 20 62 65 67 69 6e 73 |insertio|n begins|
|00003400| 20 69 66 20 44 4f 2d 49 | 54 2d 4e 4f 57 2d 50 20 | if DO-I|T-NOW-P |
|00003410| 69 73 20 54 2e 0a 49 6e | 20 61 6e 79 20 63 61 73 |is T..In| any cas|
|00003420| 65 2c 20 74 68 65 20 70 | 72 65 66 69 78 2d 63 6f |e, the p|refix-co|
|00003430| 64 65 20 77 69 6c 6c 20 | 62 65 20 64 6f 6e 65 20 |de will |be done |
|00003440| 62 65 66 6f 72 65 20 65 | 61 63 68 20 27 72 65 64 |before e|ach 'red|
|00003450| 6f 2d 69 6e 73 65 72 74 | 27 2e 0a 54 68 69 73 20 |o-insert|'..This |
|00003460| 66 75 6e 63 74 69 6f 6e | 20 65 78 70 65 63 74 73 |function| expects|
|00003470| 20 27 6f 76 65 72 77 72 | 69 74 65 2d 6d 6f 64 65 | 'overwr|ite-mode|
|00003480| 27 20 62 65 69 6e 67 20 | 73 65 74 20 70 72 6f 70 |' being |set prop|
|00003490| 65 72 6c 79 20 62 65 66 | 6f 72 65 68 61 6e 64 2e |erly bef|orehand.|
|000034a0| 22 5d 29 0a 28 66 73 65 | 74 20 27 76 69 2d 65 6e |"]).(fse|t 'vi-en|
|000034b0| 64 2d 6f 66 2d 69 6e 73 | 65 72 74 2d 73 74 61 74 |d-of-ins|ert-stat|
|000034c0| 65 20 23 5b 6e 69 6c 20 | 22 60 08 57 ac 8d 60 08 |e #[nil |"`.W..`.|
|000034d0| 55 ab 83 09 ab 85 5c 6e | c3 58 ab 84 c4 c5 21 87 |U.....\n|.X....!.|
|000034e0| 5c 6e c6 56 ab 95 08 60 | 7b 1e 07 5c 6e c6 56 ab |\n.V...`|{..\n.V.|
|000034f0| 8a 0e 07 63 88 5c 6e 53 | 89 12 aa 72 29 c8 c9 08 |...c.\nS|...r)...|
|00003500| 60 0e 5c 6e 09 25 88 c4 | c5 21 87 22 20 5b 76 69 |`.\n.%..|.!." [vi|
|00003510| 2d 69 6e 73 2d 70 6f 69 | 6e 74 20 76 69 2d 69 6e |-ins-poi|nt vi-in|
|00003520| 73 2d 70 72 65 66 69 78 | 2d 63 6f 64 65 20 76 69 |s-prefix|-code vi|
|00003530| 2d 69 6e 73 2d 72 65 70 | 65 74 69 74 69 6f 6e 20 |-ins-rep|etition |
|00003540| 30 20 76 69 2d 67 6f 74 | 6f 2d 63 6f 6d 6d 61 6e |0 vi-got|o-comman|
|00003550| 64 2d 73 74 61 74 65 20 | 74 20 31 20 73 74 72 20 |d-state |t 1 str |
|00003560| 76 69 2d 73 65 74 2d 6c | 61 73 74 2d 63 68 61 6e |vi-set-l|ast-chan|
|00003570| 67 65 2d 63 6f 6d 6d 61 | 6e 64 20 76 69 2d 66 69 |ge-comma|nd vi-fi|
|00003580| 72 73 74 2d 72 65 64 6f | 2d 69 6e 73 65 72 74 69 |rst-redo|-inserti|
|00003590| 6f 6e 20 6f 76 65 72 77 | 72 69 74 65 2d 6d 6f 64 |on overw|rite-mod|
|000035a0| 65 5d 20 37 20 22 5c 0a | 54 65 72 6d 69 6e 61 74 |e] 7 "\.|Terminat|
|000035b0| 65 20 69 6e 73 65 72 74 | 69 6f 6e 20 61 6e 64 20 |e insert|ion and |
|000035c0| 73 65 74 20 75 70 20 6c | 61 73 74 20 63 68 61 6e |set up l|ast chan|
|000035d0| 67 65 20 63 6f 6d 6d 61 | 6e 64 2e 22 5d 29 0a 28 |ge comma|nd."]).(|
|000035e0| 66 73 65 74 20 27 76 69 | 2d 66 69 72 73 74 2d 72 |fset 'vi|-first-r|
|000035f0| 65 64 6f 2d 69 6e 73 65 | 72 74 69 6f 6e 20 23 5b |edo-inse|rtion #[|
|00003600| 28 62 65 67 69 6e 20 65 | 6e 64 20 26 6f 70 74 69 |(begin e|nd &opti|
|00003610| 6f 6e 61 6c 20 6f 76 65 | 72 77 72 69 74 65 2d 70 |onal ove|rwrite-p|
|00003620| 20 70 72 65 66 69 78 2d | 63 6f 64 65 29 20 22 08 | prefix-|code) ".|
|00003630| 09 7b 1a 0b ab 87 c4 0b | 40 0b 41 5c 22 88 0d ab |.{......|@.A\"...|
|00003640| 87 60 60 5c 6e 47 5c 5c | 7c 88 5c 6e 63 88 c6 c7 |.``\nG\\||.\nc...|
|00003650| 5c 6e 0d 0b 24 29 87 22 | 20 5b 62 65 67 69 6e 20 |\n..$)."| [begin |
|00003660| 65 6e 64 20 73 74 72 20 | 70 72 65 66 69 78 2d 63 |end str |prefix-c|
|00003670| 6f 64 65 20 61 70 70 6c | 79 20 6f 76 65 72 77 72 |ode appl|y overwr|
|00003680| 69 74 65 2d 70 20 76 69 | 2d 73 65 74 2d 6c 61 73 |ite-p vi|-set-las|
|00003690| 74 2d 63 68 61 6e 67 65 | 2d 63 6f 6d 6d 61 6e 64 |t-change|-command|
|000036a0| 20 76 69 2d 6d 6f 72 65 | 2d 72 65 64 6f 2d 69 6e | vi-more|-redo-in|
|000036b0| 73 65 72 74 69 6f 6e 5d | 20 35 20 22 5c 0a 52 65 |sertion]| 5 "\.Re|
|000036c0| 64 6f 20 6c 61 73 74 20 | 69 6e 73 65 72 74 69 6f |do last |insertio|
|000036d0| 6e 20 74 68 65 20 66 69 | 72 73 74 20 74 69 6d 65 |n the fi|rst time|
|000036e0| 2e 20 20 45 78 74 72 61 | 63 74 20 74 68 65 20 73 |. Extra|ct the s|
|000036f0| 74 72 69 6e 67 20 61 6e | 64 20 73 61 76 65 20 69 |tring an|d save i|
|00003700| 74 20 66 6f 72 0a 66 75 | 74 75 72 65 20 72 65 64 |t for.fu|ture red|
|00003710| 6f 65 73 2e 20 20 44 6f | 20 70 72 65 66 69 78 2d |oes. Do| prefix-|
|00003720| 63 6f 64 65 20 69 66 20 | 69 74 27 73 20 67 69 76 |code if |it's giv|
|00003730| 65 6e 2c 20 75 73 65 20 | 6f 76 65 72 77 72 69 74 |en, use |overwrit|
|00003740| 65 20 6d 6f 64 65 20 69 | 66 20 61 73 6b 65 64 2e |e mode i|f asked.|
|00003750| 22 5d 29 0a 28 66 73 65 | 74 20 27 76 69 2d 6d 6f |"]).(fse|t 'vi-mo|
|00003760| 72 65 2d 72 65 64 6f 2d | 69 6e 73 65 72 74 69 6f |re-redo-|insertio|
|00003770| 6e 20 23 5b 28 73 74 72 | 20 26 6f 70 74 69 6f 6e |n #[(str| &option|
|00003780| 61 6c 20 6f 76 65 72 77 | 72 69 74 65 2d 70 20 70 |al overw|rite-p p|
|00003790| 72 65 66 69 78 2d 63 6f | 64 65 29 20 22 08 ab 87 |refix-co|de) "...|
|000037a0| c1 08 40 08 41 5c 22 88 | 5c 6e ab 87 60 60 0b 47 |..@.A\".|\n..``.G|
|000037b0| 5c 5c 7c 88 0b 63 87 22 | 20 5b 70 72 65 66 69 78 |\\|..c."| [prefix|
|000037c0| 2d 63 6f 64 65 20 61 70 | 70 6c 79 20 6f 76 65 72 |-code ap|ply over|
|000037d0| 77 72 69 74 65 2d 70 20 | 73 74 72 5d 20 33 20 22 |write-p |str] 3 "|
|000037e0| 5c 0a 52 65 64 6f 20 6d | 6f 72 65 20 69 6e 73 65 |\.Redo m|ore inse|
|000037f0| 72 74 69 6f 6e 20 3a 20 | 63 6f 70 79 20 73 74 72 |rtion : |copy str|
|00003800| 69 6e 67 20 66 72 6f 6d | 20 53 54 52 20 74 6f 20 |ing from| STR to |
|00003810| 70 6f 69 6e 74 2c 20 75 | 73 65 20 6f 76 65 72 77 |point, u|se overw|
|00003820| 72 69 74 65 20 6d 6f 64 | 65 0a 69 66 20 6f 76 65 |rite mod|e.if ove|
|00003830| 72 77 72 69 74 65 2d 70 | 20 69 73 20 54 3b 20 61 |rwrite-p| is T; a|
|00003840| 70 70 6c 79 20 70 72 65 | 66 69 78 2d 63 6f 64 65 |pply pre|fix-code|
|00003850| 20 66 69 72 73 74 20 69 | 66 20 69 74 27 73 20 6e | first i|f it's n|
|00003860| 6f 6e 2d 6e 69 6c 2e 22 | 5d 29 0a 28 66 73 65 74 |on-nil."|]).(fset|
|00003870| 20 27 76 69 2d 67 6f 74 | 6f 2d 63 6f 6d 6d 61 6e | 'vi-got|o-comman|
|00003880| 64 2d 73 74 61 74 65 20 | 23 5b 28 26 6f 70 74 69 |d-state |#[(&opti|
|00003890| 6f 6e 61 6c 20 66 72 6f | 6d 2d 69 6e 73 65 72 74 |onal fro|m-insert|
|000038a0| 2d 73 74 61 74 65 2d 70 | 29 20 22 c0 09 21 88 c2 |-state-p|) "..!..|
|000038b0| 13 0c ad 86 0d ad 83 c5 | c6 21 87 22 20 5b 75 73 |........|.!." [us|
|000038c0| 65 2d 6c 6f 63 61 6c 2d | 6d 61 70 20 76 69 2d 63 |e-local-|map vi-c|
|000038d0| 6f 6d 2d 6d 61 70 20 6e | 69 6c 20 76 69 2d 69 6e |om-map n|il vi-in|
|000038e0| 73 65 72 74 2d 73 74 61 | 74 65 20 66 72 6f 6d 2d |sert-sta|te from-|
|000038f0| 69 6e 73 65 72 74 2d 73 | 74 61 74 65 2d 70 20 6f |insert-s|tate-p o|
|00003900| 76 65 72 77 72 69 74 65 | 2d 6d 6f 64 65 20 30 5d |verwrite|-mode 0]|
|00003910| 20 32 20 22 5c 0a 47 6f | 20 74 6f 20 76 69 2d 6d | 2 "\.Go| to vi-m|
|00003920| 6f 64 65 20 63 6f 6d 6d | 61 6e 64 20 73 74 61 74 |ode comm|and stat|
|00003930| 65 2e 20 20 49 66 20 6f | 70 74 69 6f 6e 61 6c 20 |e. If o|ptional |
|00003940| 61 72 67 20 65 78 69 73 | 74 73 2c 20 6d 65 61 6e |arg exis|ts, mean|
|00003950| 73 20 72 65 74 75 72 6e | 20 66 72 6f 6d 0a 69 6e |s return| from.in|
|00003960| 73 65 72 74 20 73 74 61 | 74 65 2e 22 5d 29 0a 28 |sert sta|te."]).(|
|00003970| 66 73 65 74 20 27 76 69 | 2d 6b 69 6c 6c 2d 6c 69 |fset 'vi|-kill-li|
|00003980| 6e 65 20 23 5b 28 61 72 | 67 29 20 22 c0 09 21 88 |ne #[(ar|g) "..!.|
|00003990| c2 c0 09 5c 22 87 22 20 | 5b 6b 69 6c 6c 2d 6c 69 |...\"." |[kill-li|
|000039a0| 6e 65 20 61 72 67 20 76 | 69 2d 73 65 74 2d 6c 61 |ne arg v|i-set-la|
|000039b0| 73 74 2d 63 68 61 6e 67 | 65 2d 63 6f 6d 6d 61 6e |st-chang|e-comman|
|000039c0| 64 5d 20 33 20 22 5c 0a | 6b 69 6c 6c 20 73 70 65 |d] 3 "\.|kill spe|
|000039d0| 63 69 66 69 65 64 20 6e | 75 6d 62 65 72 20 6f 66 |cified n|umber of|
|000039e0| 20 6c 69 6e 65 73 20 28 | 3d 64 24 29 2c 20 74 65 | lines (|=d$), te|
|000039f0| 78 74 20 73 61 76 65 64 | 20 69 6e 20 74 68 65 20 |xt saved| in the |
|00003a00| 6b 69 6c 6c 20 72 69 6e | 67 2e 22 20 22 2a 50 22 |kill rin|g." "*P"|
|00003a10| 5d 29 0a 28 66 73 65 74 | 20 27 76 69 2d 6b 69 6c |]).(fset| 'vi-kil|
|00003a20| 6c 2d 72 65 67 69 6f 6e | 20 23 5b 6e 69 6c 20 22 |l-region| #[nil "|
|00003a30| c0 20 88 c1 c0 21 87 22 | 20 5b 6b 69 6c 6c 2d 72 |. ...!."| [kill-r|
|00003a40| 65 67 69 6f 6e 20 76 69 | 2d 73 65 74 2d 6c 61 73 |egion vi|-set-las|
|00003a50| 74 2d 63 68 61 6e 67 65 | 2d 63 6f 6d 6d 61 6e 64 |t-change|-command|
|00003a60| 5d 20 32 20 6e 69 6c 20 | 6e 69 6c 5d 29 0a 28 66 |] 2 nil |nil]).(f|
|00003a70| 73 65 74 20 27 76 69 2d | 61 70 70 65 6e 64 2d 61 |set 'vi-|append-a|
|00003a80| 74 2d 65 6e 64 2d 6f 66 | 2d 6c 69 6e 65 20 23 5b |t-end-of|-line #[|
|00003a90| 28 61 72 67 29 20 22 c0 | 09 c2 c3 23 87 22 20 5b |(arg) ".|...#." [|
|00003aa0| 76 69 2d 67 6f 74 6f 2d | 69 6e 73 65 72 74 2d 73 |vi-goto-|insert-s|
|00003ab0| 74 61 74 65 20 61 72 67 | 20 28 65 6e 64 2d 6f 66 |tate arg| (end-of|
|00003ac0| 2d 6c 69 6e 65 29 20 74 | 5d 20 34 20 22 5c 0a 67 |-line) t|] 4 "\.g|
|00003ad0| 6f 20 74 6f 20 65 6e 64 | 20 6f 66 20 6c 69 6e 65 |o to end| of line|
|00003ae0| 20 61 6e 64 20 74 68 65 | 6e 20 67 6f 20 69 6e 74 | and the|n go int|
|00003af0| 6f 20 76 69 20 69 6e 73 | 65 72 74 20 73 74 61 74 |o vi ins|ert stat|
|00003b00| 65 2e 22 20 22 2a 70 22 | 5d 29 0a 28 66 73 65 74 |e." "*p"|]).(fset|
|00003b10| 20 27 76 69 2d 63 68 61 | 6e 67 65 2d 72 65 73 74 | 'vi-cha|nge-rest|
|00003b20| 2d 6f 66 2d 6c 69 6e 65 | 20 23 5b 28 61 72 67 29 |-of-line| #[(arg)|
|00003b30| 20 22 c0 c1 c2 0b 44 c4 | 23 87 22 20 5b 76 69 2d | "....D.|#." [vi-|
|00003b40| 67 6f 74 6f 2d 69 6e 73 | 65 72 74 2d 73 74 61 74 |goto-ins|ert-stat|
|00003b50| 65 20 31 20 6b 69 6c 6c | 2d 6c 69 6e 65 20 61 72 |e 1 kill|-line ar|
|00003b60| 67 20 74 5d 20 34 20 22 | 5c 0a 43 68 61 6e 67 65 |g t] 4 "|\.Change|
|00003b70| 20 74 68 65 20 72 65 73 | 74 20 6f 66 20 28 41 52 | the res|t of (AR|
|00003b80| 47 29 20 6c 69 6e 65 73 | 20 28 3d 20 63 24 20 69 |G) lines| (= c$ i|
|00003b90| 6e 20 76 69 29 2e 22 20 | 22 2a 50 22 5d 29 0a 28 |n vi)." |"*P"]).(|
|00003ba0| 66 73 65 74 20 27 76 69 | 2d 69 6e 73 65 72 74 2d |fset 'vi|-insert-|
|00003bb0| 62 65 66 6f 72 65 2d 66 | 69 72 73 74 2d 6e 6f 6e |before-f|irst-non|
|00003bc0| 77 68 69 74 65 20 23 5b | 28 61 72 67 29 20 22 c0 |white #[|(arg) ".|
|00003bd0| 09 c2 c3 23 87 22 20 5b | 76 69 2d 67 6f 74 6f 2d |...#." [|vi-goto-|
|00003be0| 69 6e 73 65 72 74 2d 73 | 74 61 74 65 20 61 72 67 |insert-s|tate arg|
|00003bf0| 20 28 62 61 63 6b 2d 74 | 6f 2d 69 6e 64 65 6e 74 | (back-t|o-indent|
|00003c00| 61 74 69 6f 6e 29 20 74 | 5d 20 34 20 22 5c 0a 28 |ation) t|] 4 "\.(|
|00003c10| 3d 20 5e 69 20 69 6e 20 | 76 69 29 22 20 22 2a 70 |= ^i in |vi)" "*p|
|00003c20| 22 5d 29 0a 28 66 73 65 | 74 20 27 76 69 2d 6f 70 |"]).(fse|t 'vi-op|
|00003c30| 65 6e 2d 61 62 6f 76 65 | 20 23 5b 28 61 72 67 29 |en-above| #[(arg)|
|00003c40| 20 22 c0 c1 c2 0b 44 c4 | 23 87 22 20 5b 76 69 2d | "....D.|#." [vi-|
|00003c50| 67 6f 74 6f 2d 69 6e 73 | 65 72 74 2d 73 74 61 74 |goto-ins|ert-stat|
|00003c60| 65 20 31 20 23 5b 28 78 | 29 20 22 c0 79 88 c1 5c |e 1 #[(x|) ".y..\|
|00003c70| 6e 21 87 22 20 5b 30 20 | 6f 70 65 6e 2d 6c 69 6e |n!." [0 |open-lin|
|00003c80| 65 20 78 5d 20 32 5d 20 | 61 72 67 20 74 5d 20 34 |e x] 2] |arg t] 4|
|00003c90| 20 22 5c 0a 6f 70 65 6e | 20 6e 65 77 20 6c 69 6e | "\.open| new lin|
|00003ca0| 65 28 73 29 20 61 62 6f | 76 65 20 63 75 72 72 65 |e(s) abo|ve curre|
|00003cb0| 6e 74 20 6c 69 6e 65 20 | 61 6e 64 20 65 6e 74 65 |nt line |and ente|
|00003cc0| 72 20 69 6e 73 65 72 74 | 20 73 74 61 74 65 2e 22 |r insert| state."|
|00003cd0| 20 22 2a 70 22 5d 29 0a | 28 66 73 65 74 20 27 76 | "*p"]).|(fset 'v|
|00003ce0| 69 2d 6f 70 65 6e 2d 62 | 65 6c 6f 77 20 23 5b 28 |i-open-b|elow #[(|
|00003cf0| 61 72 67 29 20 22 c0 c1 | c2 0b 44 c4 23 87 22 20 |arg) "..|..D.#." |
|00003d00| 5b 76 69 2d 67 6f 74 6f | 2d 69 6e 73 65 72 74 2d |[vi-goto|-insert-|
|00003d10| 73 74 61 74 65 20 31 20 | 23 5b 28 78 29 20 22 c0 |state 1 |#[(x) ".|
|00003d20| 7f ae 87 c1 5c 6e 21 ae | 82 5c 6e 79 87 22 20 5b |....\n!.|.\ny." [|
|00003d30| 6e 69 6c 20 6f 70 65 6e | 2d 6c 69 6e 65 20 78 5d |nil open|-line x]|
|00003d40| 20 32 5d 20 61 72 67 20 | 74 5d 20 34 20 22 5c 0a | 2] arg |t] 4 "\.|
|00003d50| 6f 70 65 6e 20 6e 65 77 | 20 6c 69 6e 65 28 73 29 |open new| line(s)|
|00003d60| 20 61 6e 64 20 67 6f 20 | 69 6e 74 6f 20 69 6e 73 | and go |into ins|
|00003d70| 65 72 74 20 6d 6f 64 65 | 20 6f 6e 20 74 68 65 20 |ert mode| on the |
|00003d80| 6c 61 73 74 20 6c 69 6e | 65 2e 22 20 22 2a 70 22 |last lin|e." "*p"|
|00003d90| 5d 29 0a 28 66 73 65 74 | 20 27 76 69 2d 69 6e 73 |]).(fset| 'vi-ins|
|00003da0| 65 72 74 2d 61 66 74 65 | 72 20 23 5b 28 61 72 67 |ert-afte|r #[(arg|
|00003db0| 29 20 22 c0 09 c2 43 c3 | 23 87 22 20 5b 76 69 2d |) "...C.|#." [vi-|
|00003dc0| 67 6f 74 6f 2d 69 6e 73 | 65 72 74 2d 73 74 61 74 |goto-ins|ert-stat|
|00003dd0| 65 20 61 72 67 20 23 5b | 6e 69 6c 20 22 6c 3f ad |e arg #[|nil "l?.|
|00003de0| 82 c0 75 87 22 20 5b 6e | 69 6c 5d 20 31 5d 20 74 |..u." [n|il] 1] t|
|00003df0| 5d 20 34 20 22 5c 0a 73 | 74 61 72 74 20 76 69 20 |] 4 "\.s|tart vi |
|00003e00| 69 6e 73 65 72 74 20 73 | 74 61 74 65 20 61 66 74 |insert s|tate aft|
|00003e10| 65 72 20 63 75 72 73 6f | 72 2e 22 20 22 2a 70 22 |er curso|r." "*p"|
|00003e20| 5d 29 0a 28 66 73 65 74 | 20 27 76 69 2d 69 6e 73 |]).(fset| 'vi-ins|
|00003e30| 65 72 74 2d 62 65 66 6f | 72 65 20 23 5b 28 61 72 |ert-befo|re #[(ar|
|00003e40| 67 29 20 22 c0 09 21 87 | 22 20 5b 76 69 2d 67 6f |g) "..!.|" [vi-go|
|00003e50| 74 6f 2d 69 6e 73 65 72 | 74 2d 73 74 61 74 65 20 |to-inser|t-state |
|00003e60| 61 72 67 5d 20 32 20 22 | 5c 0a 65 6e 74 65 72 20 |arg] 2 "|\.enter |
|00003e70| 69 6e 73 65 72 74 20 73 | 74 61 74 65 20 62 65 66 |insert s|tate bef|
|00003e80| 6f 72 65 20 74 68 65 20 | 63 75 72 73 6f 72 2e 22 |ore the |cursor."|
|00003e90| 20 22 2a 70 22 5d 29 0a | 28 66 73 65 74 20 27 76 | "*p"]).|(fset 'v|
|00003ea0| 69 2d 67 6f 74 6f 2d 6c | 69 6e 65 20 23 5b 28 61 |i-goto-l|ine #[(a|
|00003eb0| 72 67 29 20 22 c0 09 21 | ac 83 c2 20 87 c3 c4 09 |rg) "..!|... ....|
|00003ec0| 21 21 87 22 20 5b 76 69 | 2d 72 61 77 2d 6e 75 6d |!!." [vi|-raw-num|
|00003ed0| 65 72 69 63 2d 70 72 65 | 66 69 78 20 61 72 67 20 |eric-pre|fix arg |
|00003ee0| 65 6e 64 2d 6f 66 2d 62 | 75 66 66 65 72 20 67 6f |end-of-b|uffer go|
|00003ef0| 74 6f 2d 6c 69 6e 65 20 | 76 69 2d 70 72 65 66 69 |to-line |vi-prefi|
|00003f00| 78 2d 6e 75 6d 65 72 69 | 63 2d 76 61 6c 75 65 5d |x-numeri|c-value]|
|00003f10| 20 33 20 22 5c 0a 47 6f | 20 74 6f 20 41 52 47 74 | 3 "\.Go| to ARGt|
|00003f20| 68 20 6c 69 6e 65 2e 22 | 20 22 50 22 5d 29 0a 28 |h line."| "P"]).(|
|00003f30| 66 73 65 74 20 27 76 69 | 2d 62 65 67 69 6e 6e 69 |fset 'vi|-beginni|
|00003f40| 6e 67 2d 6f 66 2d 62 75 | 66 66 65 72 20 23 5b 6e |ng-of-bu|ffer #[n|
|00003f50| 69 6c 20 22 65 62 87 22 | 20 5b 5d 20 31 20 22 5c |il "eb."| [] 1 "\|
|00003f60| 0a 4d 6f 76 65 20 70 6f | 69 6e 74 20 74 6f 20 74 |.Move po|int to t|
|00003f70| 68 65 20 62 65 67 69 6e | 6e 69 6e 67 20 6f 66 20 |he begin|ning of |
|00003f80| 63 75 72 72 65 6e 74 20 | 62 75 66 66 65 72 2e 22 |current |buffer."|
|00003f90| 20 6e 69 6c 5d 29 0a 28 | 66 73 65 74 20 27 76 69 | nil]).(|fset 'vi|
|00003fa0| 2d 69 73 65 61 72 63 68 | 2d 66 6f 72 77 61 72 64 |-isearch|-forward|
|00003fb0| 20 23 5b 28 61 72 67 29 | 20 22 08 ab 83 c1 aa 81 | #[(arg)| "......|
|00003fc0| c2 60 1b 1c c5 0c 21 88 | 0b 60 55 3f ad 8a 08 ab |.`....!.|.`U?....|
|00003fd0| 83 c6 aa 81 c7 89 16 08 | 2a 87 22 20 5b 61 72 67 |........|*." [arg|
|00003fe0| 20 69 73 65 61 72 63 68 | 2d 66 6f 72 77 61 72 64 | isearch|-forward|
|00003ff0| 2d 72 65 67 65 78 70 20 | 69 73 65 61 72 63 68 2d |-regexp |isearch-|
|00004000| 66 6f 72 77 61 72 64 20 | 6f 70 6f 69 6e 74 20 73 |forward |opoint s|
|00004010| 63 6d 64 20 63 61 6c 6c | 2d 69 6e 74 65 72 61 63 |cmd call|-interac|
|00004020| 74 69 76 65 6c 79 20 72 | 65 2d 73 65 61 72 63 68 |tively r|e-search|
|00004030| 2d 66 6f 72 77 61 72 64 | 20 73 65 61 72 63 68 2d |-forward| search-|
|00004040| 66 6f 72 77 61 72 64 20 | 76 69 2d 73 65 61 72 63 |forward |vi-searc|
|00004050| 68 2d 6c 61 73 74 2d 63 | 6f 6d 6d 61 6e 64 5d 20 |h-last-c|ommand] |
|00004060| 32 20 22 5c 0a 49 6e 63 | 72 65 6d 65 6e 74 61 6c |2 "\.Inc|remental|
|00004070| 20 73 65 61 72 63 68 20 | 66 6f 72 77 61 72 64 2e | search |forward.|
|00004080| 20 20 55 73 65 20 72 65 | 67 65 78 70 20 76 65 72 | Use re|gexp ver|
|00004090| 73 69 6f 6e 20 69 66 20 | 41 52 47 20 69 73 20 6e |sion if |ARG is n|
|000040a0| 6f 6e 2d 6e 69 6c 2e 22 | 20 22 50 22 5d 29 0a 28 |on-nil."| "P"]).(|
|000040b0| 66 73 65 74 20 27 76 69 | 2d 69 73 65 61 72 63 68 |fset 'vi|-isearch|
|000040c0| 2d 62 61 63 6b 77 61 72 | 64 20 23 5b 28 61 72 67 |-backwar|d #[(arg|
|000040d0| 29 20 22 08 ab 83 c1 aa | 81 c2 60 1b 1c c5 0c 21 |) ".....|..`....!|
|000040e0| 88 0b 60 55 3f ad 8a 08 | ab 83 c6 aa 81 c7 89 16 |..`U?...|........|
|000040f0| 08 2a 87 22 20 5b 61 72 | 67 20 69 73 65 61 72 63 |.*." [ar|g isearc|
|00004100| 68 2d 62 61 63 6b 77 61 | 72 64 2d 72 65 67 65 78 |h-backwa|rd-regex|
|00004110| 70 20 69 73 65 61 72 63 | 68 2d 62 61 63 6b 77 61 |p isearc|h-backwa|
|00004120| 72 64 20 6f 70 6f 69 6e | 74 20 73 63 6d 64 20 63 |rd opoin|t scmd c|
|00004130| 61 6c 6c 2d 69 6e 74 65 | 72 61 63 74 69 76 65 6c |all-inte|ractivel|
|00004140| 79 20 72 65 2d 73 65 61 | 72 63 68 2d 62 61 63 6b |y re-sea|rch-back|
|00004150| 77 61 72 64 20 73 65 61 | 72 63 68 2d 62 61 63 6b |ward sea|rch-back|
|00004160| 77 61 72 64 20 76 69 2d | 73 65 61 72 63 68 2d 6c |ward vi-|search-l|
|00004170| 61 73 74 2d 63 6f 6d 6d | 61 6e 64 5d 20 32 20 22 |ast-comm|and] 2 "|
|00004180| 5c 0a 49 6e 63 72 65 6d | 65 6e 74 61 6c 20 73 65 |\.Increm|ental se|
|00004190| 61 72 63 68 20 62 61 63 | 6b 77 61 72 64 2e 20 20 |arch bac|kward. |
|000041a0| 55 73 65 20 72 65 67 65 | 78 70 20 76 65 72 73 69 |Use rege|xp versi|
|000041b0| 6f 6e 20 69 66 20 41 52 | 47 20 69 73 20 6e 6f 6e |on if AR|G is non|
|000041c0| 2d 6e 69 6c 2e 22 20 22 | 50 22 5d 29 0a 28 66 73 |-nil." "|P"]).(fs|
|000041d0| 65 74 20 27 76 69 2d 73 | 65 61 72 63 68 2d 66 6f |et 'vi-s|earch-fo|
|000041e0| 72 77 61 72 64 20 23 5b | 28 61 72 67 20 73 74 72 |rward #[|(arg str|
|000041f0| 69 6e 67 29 20 22 08 ab | 83 c1 aa 81 c2 13 0c 47 |ing) "..|.......G|
|00004200| c5 56 ab 83 0c 16 06 0b | 0e 06 c7 89 c8 24 87 22 |.V......|.....$."|
|00004210| 20 5b 61 72 67 20 72 65 | 2d 73 65 61 72 63 68 2d | [arg re|-search-|
|00004220| 66 6f 72 77 61 72 64 20 | 73 65 61 72 63 68 2d 66 |forward |search-f|
|00004230| 6f 72 77 61 72 64 20 76 | 69 2d 73 65 61 72 63 68 |orward v|i-search|
|00004240| 2d 6c 61 73 74 2d 63 6f | 6d 6d 61 6e 64 20 73 74 |-last-co|mmand st|
|00004250| 72 69 6e 67 20 30 20 73 | 65 61 72 63 68 2d 6c 61 |ring 0 s|earch-la|
|00004260| 73 74 2d 73 74 72 69 6e | 67 20 6e 69 6c 20 31 5d |st-strin|g nil 1]|
|00004270| 20 35 20 22 5c 0a 4e 6f | 6e 69 6e 63 72 65 6d 65 | 5 "\.No|nincreme|
|00004280| 6e 74 61 6c 20 73 65 61 | 72 63 68 20 66 6f 72 77 |ntal sea|rch forw|
|00004290| 61 72 64 2e 20 55 73 65 | 20 72 65 67 65 78 70 20 |ard. Use| regexp |
|000042a0| 76 65 72 73 69 6f 6e 20 | 69 66 20 41 52 47 20 69 |version |if ARG i|
|000042b0| 73 20 6e 6f 6e 2d 6e 69 | 6c 2e 22 20 28 62 79 74 |s non-ni|l." (byt|
|000042c0| 65 2d 63 6f 64 65 20 22 | 08 ab 87 c1 c2 c3 c4 5c |e-code "|.......\|
|000042d0| 22 44 87 c4 c2 c5 c4 5c | 22 44 87 22 20 5b 63 75 |"D.....\|"D." [cu|
|000042e0| 72 72 65 6e 74 2d 70 72 | 65 66 69 78 2d 61 72 67 |rrent-pr|efix-arg|
|000042f0| 20 74 20 72 65 61 64 2d | 73 74 72 69 6e 67 20 22 | t read-|string "|
|00004300| 72 65 67 65 78 70 2f 22 | 20 6e 69 6c 20 22 2f 22 |regexp/"| nil "/"|
|00004310| 5d 20 34 29 5d 29 0a 28 | 66 73 65 74 20 27 76 69 |] 4)]).(|fset 'vi|
|00004320| 2d 73 65 61 72 63 68 2d | 62 61 63 6b 77 61 72 64 |-search-|backward|
|00004330| 20 23 5b 28 61 72 67 20 | 73 74 72 69 6e 67 29 20 | #[(arg |string) |
|00004340| 22 08 ab 83 c1 aa 81 c2 | 13 0c 47 c5 56 ab 83 0c |".......|..G.V...|
|00004350| 16 06 0b 0e 06 c7 89 c8 | 24 87 22 20 5b 61 72 67 |........|$." [arg|
|00004360| 20 72 65 2d 73 65 61 72 | 63 68 2d 62 61 63 6b 77 | re-sear|ch-backw|
|00004370| 61 72 64 20 73 65 61 72 | 63 68 2d 62 61 63 6b 77 |ard sear|ch-backw|
|00004380| 61 72 64 20 76 69 2d 73 | 65 61 72 63 68 2d 6c 61 |ard vi-s|earch-la|
|00004390| 73 74 2d 63 6f 6d 6d 61 | 6e 64 20 73 74 72 69 6e |st-comma|nd strin|
|000043a0| 67 20 30 20 73 65 61 72 | 63 68 2d 6c 61 73 74 2d |g 0 sear|ch-last-|
|000043b0| 73 74 72 69 6e 67 20 6e | 69 6c 20 31 5d 20 35 20 |string n|il 1] 5 |
|000043c0| 22 5c 0a 4e 6f 6e 69 6e | 63 72 65 6d 65 6e 74 61 |"\.Nonin|crementa|
|000043d0| 6c 20 73 65 61 72 63 68 | 20 62 61 63 6b 77 61 72 |l search| backwar|
|000043e0| 64 2e 20 20 55 73 65 20 | 72 65 67 65 78 70 20 76 |d. Use |regexp v|
|000043f0| 65 72 73 69 6f 6e 20 69 | 66 20 41 52 47 20 69 73 |ersion i|f ARG is|
|00004400| 20 6e 6f 6e 2d 6e 69 6c | 2e 22 20 28 62 79 74 65 | non-nil|." (byte|
|00004410| 2d 63 6f 64 65 20 22 08 | ab 87 c1 c2 c3 c4 5c 22 |-code ".|......\"|
|00004420| 44 87 c4 c2 c5 c4 5c 22 | 44 87 22 20 5b 63 75 72 |D.....\"|D." [cur|
|00004430| 72 65 6e 74 2d 70 72 65 | 66 69 78 2d 61 72 67 20 |rent-pre|fix-arg |
|00004440| 74 20 72 65 61 64 2d 73 | 74 72 69 6e 67 20 22 72 |t read-s|tring "r|
|00004450| 65 67 65 78 70 3f 22 20 | 6e 69 6c 20 22 3f 22 5d |egexp?" |nil "?"]|
|00004460| 20 34 29 5d 29 0a 28 66 | 73 65 74 20 27 76 69 2d | 4)]).(f|set 'vi-|
|00004470| 72 65 70 65 61 74 2d 6c | 61 73 74 2d 73 65 61 72 |repeat-l|ast-sear|
|00004480| 63 68 20 23 5b 28 61 72 | 67 20 26 6f 70 74 69 6f |ch #[(ar|g &optio|
|00004490| 6e 61 6c 20 73 65 61 72 | 63 68 2d 63 6f 6d 6d 61 |nal sear|ch-comma|
|000044a0| 6e 64 20 73 65 61 72 63 | 68 2d 73 74 72 69 6e 67 |nd searc|h-string|
|000044b0| 29 20 22 08 ac 82 09 10 | 5c 6e ac 82 0b 12 08 ac |) ".....|\n......|
|000044c0| 86 c4 c5 c6 20 5c 22 87 | 08 5c 6e c7 89 0e 08 24 |.... \".|.\n....$|
|000044d0| 87 22 20 5b 73 65 61 72 | 63 68 2d 63 6f 6d 6d 61 |." [sear|ch-comma|
|000044e0| 6e 64 20 76 69 2d 73 65 | 61 72 63 68 2d 6c 61 73 |nd vi-se|arch-las|
|000044f0| 74 2d 63 6f 6d 6d 61 6e | 64 20 73 65 61 72 63 68 |t-comman|d search|
|00004500| 2d 73 74 72 69 6e 67 20 | 73 65 61 72 63 68 2d 6c |-string |search-l|
|00004510| 61 73 74 2d 73 74 72 69 | 6e 67 20 6d 65 73 73 61 |ast-stri|ng messa|
|00004520| 67 65 20 22 4e 6f 20 6c | 61 73 74 20 73 65 61 72 |ge "No l|ast sear|
|00004530| 63 68 20 63 6f 6d 6d 61 | 6e 64 20 74 6f 20 72 65 |ch comma|nd to re|
|00004540| 70 65 61 74 2e 22 20 64 | 69 6e 67 20 6e 69 6c 20 |peat." d|ing nil |
|00004550| 61 72 67 5d 20 35 20 22 | 5c 0a 52 65 70 65 61 74 |arg] 5 "|\.Repeat|
|00004560| 20 6c 61 73 74 20 73 65 | 61 72 63 68 20 63 6f 6d | last se|arch com|
|00004570| 6d 61 6e 64 2e 20 20 49 | 66 20 6f 70 74 69 6f 6e |mand. I|f option|
|00004580| 61 6c 20 73 65 61 72 63 | 68 2d 63 6f 6d 6d 61 6e |al searc|h-comman|
|00004590| 64 2f 73 74 72 69 6e 67 | 20 61 72 65 20 67 69 76 |d/string| are giv|
|000045a0| 65 6e 2c 0a 75 73 65 20 | 74 68 6f 73 65 20 69 6e |en,.use |those in|
|000045b0| 73 74 65 61 64 20 6f 66 | 20 74 68 65 20 6f 6e 65 |stead of| the one|
|000045c0| 73 20 73 61 76 65 64 2e | 22 20 22 70 22 5d 29 0a |s saved.|" "p"]).|
|000045d0| 28 66 73 65 74 20 27 76 | 69 2d 72 65 76 65 72 73 |(fset 'v|i-revers|
|000045e0| 65 2d 6c 61 73 74 2d 73 | 65 61 72 63 68 20 23 5b |e-last-s|earch #[|
|000045f0| 28 61 72 67 20 26 6f 70 | 74 69 6f 6e 61 6c 20 73 |(arg &op|tional s|
|00004600| 65 61 72 63 68 2d 63 6f | 6d 6d 61 6e 64 20 73 65 |earch-co|mmand se|
|00004610| 61 72 63 68 2d 73 74 72 | 69 6e 67 29 20 22 08 ac |arch-str|ing) "..|
|00004620| 82 09 10 5c 6e ac 82 0b | 12 08 ac 86 c4 c5 c6 20 |...\n...|....... |
|00004630| 5c 22 87 08 c7 3d ab 83 | c8 aa 96 08 c8 3d ab 83 |\"...=..|.....=..|
|00004640| c7 aa 8e 08 c9 3d ab 83 | ca aa 86 08 ca 3d ad 81 |.....=..|.....=..|
|00004650| c9 5c 6e cb 89 0e 0c 24 | 87 22 20 5b 73 65 61 72 |.\n....$|." [sear|
|00004660| 63 68 2d 63 6f 6d 6d 61 | 6e 64 20 76 69 2d 73 65 |ch-comma|nd vi-se|
|00004670| 61 72 63 68 2d 6c 61 73 | 74 2d 63 6f 6d 6d 61 6e |arch-las|t-comman|
|00004680| 64 20 73 65 61 72 63 68 | 2d 73 74 72 69 6e 67 20 |d search|-string |
|00004690| 73 65 61 72 63 68 2d 6c | 61 73 74 2d 73 74 72 69 |search-l|ast-stri|
|000046a0| 6e 67 20 6d 65 73 73 61 | 67 65 20 22 4e 6f 20 6c |ng messa|ge "No l|
|000046b0| 61 73 74 20 73 65 61 72 | 63 68 20 63 6f 6d 6d 61 |ast sear|ch comma|
|000046c0| 6e 64 20 74 6f 20 72 65 | 70 65 61 74 2e 22 20 64 |nd to re|peat." d|
|000046d0| 69 6e 67 20 72 65 2d 73 | 65 61 72 63 68 2d 66 6f |ing re-s|earch-fo|
|000046e0| 72 77 61 72 64 20 72 65 | 2d 73 65 61 72 63 68 2d |rward re|-search-|
|000046f0| 62 61 63 6b 77 61 72 64 | 20 73 65 61 72 63 68 2d |backward| search-|
|00004700| 66 6f 72 77 61 72 64 20 | 73 65 61 72 63 68 2d 62 |forward |search-b|
|00004710| 61 63 6b 77 61 72 64 20 | 6e 69 6c 20 61 72 67 5d |ackward |nil arg]|
|00004720| 20 35 20 22 5c 0a 52 65 | 64 6f 20 6c 61 73 74 20 | 5 "\.Re|do last |
|00004730| 73 65 61 72 63 68 20 63 | 6f 6d 6d 61 6e 64 20 69 |search c|ommand i|
|00004740| 6e 20 72 65 76 65 72 73 | 65 20 64 69 72 65 63 74 |n revers|e direct|
|00004750| 69 6f 6e 2e 20 49 66 20 | 74 68 65 20 6f 70 74 69 |ion. If |the opti|
|00004760| 6f 6e 61 6c 20 73 65 61 | 72 63 68 20 61 72 67 73 |onal sea|rch args|
|00004770| 0a 61 72 65 20 67 69 76 | 65 6e 2c 20 75 73 65 20 |.are giv|en, use |
|00004780| 74 68 6f 73 65 20 69 6e | 73 74 65 61 64 20 6f 66 |those in|stead of|
|00004790| 20 74 68 65 20 6f 6e 65 | 73 20 73 61 76 65 64 2e | the one|s saved.|
|000047a0| 22 20 22 70 22 5d 29 0a | 28 66 73 65 74 20 27 76 |" "p"]).|(fset 'v|
|000047b0| 69 2d 6a 6f 69 6e 2d 6c | 69 6e 65 73 20 23 5b 28 |i-join-l|ines #[(|
|000047c0| 61 72 67 29 20 22 c0 09 | 21 ac 86 c2 c3 21 88 aa |arg) "..|!....!..|
|000047d0| 93 c4 09 21 89 15 c6 59 | ab 8a c2 c3 21 88 0d 53 |...!...Y|....!..S|
|000047e0| 89 15 aa 72 c7 c8 09 5c | 22 87 22 20 5b 76 69 2d |...r...\|"." [vi-|
|000047f0| 72 61 77 2d 6e 75 6d 65 | 72 69 63 2d 70 72 65 66 |raw-nume|ric-pref|
|00004800| 69 78 20 61 72 67 20 64 | 65 6c 65 74 65 2d 69 6e |ix arg d|elete-in|
|00004810| 64 65 6e 74 61 74 69 6f | 6e 20 74 20 76 69 2d 70 |dentatio|n t vi-p|
|00004820| 72 65 66 69 78 2d 6e 75 | 6d 65 72 69 63 2d 76 61 |refix-nu|meric-va|
|00004830| 6c 75 65 20 63 6f 75 6e | 74 20 32 20 76 69 2d 73 |lue coun|t 2 vi-s|
|00004840| 65 74 2d 6c 61 73 74 2d | 63 68 61 6e 67 65 2d 63 |et-last-|change-c|
|00004850| 6f 6d 6d 61 6e 64 20 76 | 69 2d 6a 6f 69 6e 2d 6c |ommand v|i-join-l|
|00004860| 69 6e 65 73 5d 20 34 20 | 22 5c 0a 6a 6f 69 6e 20 |ines] 4 |"\.join |
|00004870| 41 52 47 20 6c 69 6e 65 | 73 20 66 72 6f 6d 20 63 |ARG line|s from c|
|00004880| 75 72 72 65 6e 74 20 6c | 69 6e 65 20 28 64 65 66 |urrent l|ine (def|
|00004890| 61 75 6c 74 20 32 29 2c | 20 63 6c 65 61 6e 69 6e |ault 2),| cleanin|
|000048a0| 67 20 75 70 20 77 68 69 | 74 65 20 73 70 61 63 65 |g up whi|te space|
|000048b0| 2e 22 20 22 50 22 5d 29 | 0a 28 66 73 65 74 20 27 |." "P"])|.(fset '|
|000048c0| 76 69 2d 62 61 63 6b 77 | 61 72 64 2d 6b 69 6c 6c |vi-backw|ard-kill|
|000048d0| 2d 6c 69 6e 65 20 23 5b | 6e 69 6c 20 22 08 3f 3f |-line #[|nil ".??|
|000048e0| ad 86 c1 79 88 c2 c3 21 | 87 22 20 5b 76 69 2d 69 |...y...!|." [vi-i|
|000048f0| 6e 73 65 72 74 2d 73 74 | 61 74 65 20 30 20 6b 69 |nsert-st|ate 0 ki|
|00004900| 6c 6c 2d 6c 69 6e 65 20 | 6e 69 6c 5d 20 32 20 22 |ll-line |nil] 2 "|
|00004910| 5c 0a 6b 69 6c 6c 20 74 | 68 65 20 63 75 72 72 65 |\.kill t|he curre|
|00004920| 6e 74 20 6c 69 6e 65 2e | 20 20 4f 6e 6c 79 20 77 |nt line.| Only w|
|00004930| 6f 72 6b 73 20 69 6e 20 | 69 6e 73 65 72 74 20 73 |orks in |insert s|
|00004940| 74 61 74 65 2e 22 20 6e | 69 6c 5d 29 0a 28 66 73 |tate." n|il]).(fs|
|00004950| 65 74 20 27 76 69 2d 61 | 62 6f 72 74 2d 69 6e 73 |et 'vi-a|bort-ins|
|00004960| 20 23 5b 6e 69 6c 20 22 | 08 3f 3f ad 8d 60 09 56 | #[nil "|.??..`.V|
|00004970| ab 85 c2 09 60 5c 22 88 | c3 c4 21 87 22 20 5b 76 |....`\".|..!." [v|
|00004980| 69 2d 69 6e 73 65 72 74 | 2d 73 74 61 74 65 20 76 |i-insert|-state v|
|00004990| 69 2d 69 6e 73 2d 70 6f | 69 6e 74 20 6b 69 6c 6c |i-ins-po|int kill|
|000049a0| 2d 72 65 67 69 6f 6e 20 | 76 69 2d 67 6f 74 6f 2d |-region |vi-goto-|
|000049b0| 63 6f 6d 6d 61 6e 64 2d | 73 74 61 74 65 20 74 5d |command-|state t]|
|000049c0| 20 33 20 22 5c 0a 61 62 | 6f 72 74 20 69 6e 73 65 | 3 "\.ab|ort inse|
|000049d0| 72 74 20 73 74 61 74 65 | 2c 20 6b 69 6c 6c 20 69 |rt state|, kill i|
|000049e0| 6e 73 65 72 74 65 64 20 | 74 65 78 74 20 61 6e 64 |nserted |text and|
|000049f0| 20 67 6f 20 62 61 63 6b | 20 74 6f 20 63 6f 6d 6d | go back| to comm|
|00004a00| 61 6e 64 20 73 74 61 74 | 65 2e 22 20 6e 69 6c 5d |and stat|e." nil]|
|00004a10| 29 0a 28 66 73 65 74 20 | 27 76 69 2d 62 61 63 6b |).(fset |'vi-back|
|00004a20| 77 61 72 64 2d 77 69 6e | 64 6f 77 66 75 6c 6c 20 |ward-win|dowfull |
|00004a30| 23 5b 28 63 6f 75 6e 74 | 29 20 22 08 c1 56 ad 8a |#[(count|) "..V..|
|00004a40| c2 c3 21 88 08 53 89 10 | aa 72 87 22 20 5b 63 6f |..!..S..|.r." [co|
|00004a50| 75 6e 74 20 30 20 73 63 | 72 6f 6c 6c 2d 64 6f 77 |unt 0 sc|roll-dow|
|00004a60| 6e 20 6e 69 6c 5d 20 33 | 20 22 5c 0a 42 61 63 6b |n nil] 3| "\.Back|
|00004a70| 77 61 72 64 20 43 4f 55 | 4e 54 20 77 69 6e 64 6f |ward COU|NT windo|
|00004a80| 77 66 75 6c 6c 73 2e 20 | 44 65 66 61 75 6c 74 20 |wfulls. |Default |
|00004a90| 69 73 20 6f 6e 65 2e 22 | 20 22 70 22 5d 29 0a 28 |is one."| "p"]).(|
|00004aa0| 66 73 65 74 20 27 76 69 | 2d 73 63 72 6f 6c 6c 2d |fset 'vi|-scroll-|
|00004ab0| 64 6f 77 6e 2d 77 69 6e | 64 6f 77 20 23 5b 28 63 |down-win|dow #[(c|
|00004ac0| 6f 75 6e 74 29 20 22 08 | a8 ab 82 08 11 c2 09 21 |ount) ".|.......!|
|00004ad0| 87 22 20 5b 63 6f 75 6e | 74 20 76 69 2d 73 63 72 |." [coun|t vi-scr|
|00004ae0| 6f 6c 6c 2d 61 6d 6f 75 | 6e 74 20 73 63 72 6f 6c |oll-amou|nt scrol|
|00004af0| 6c 2d 75 70 5d 20 32 20 | 22 5c 0a 53 63 72 6f 6c |l-up] 2 |"\.Scrol|
|00004b00| 6c 73 20 64 6f 77 6e 20 | 77 69 6e 64 6f 77 20 43 |ls down |window C|
|00004b10| 4f 55 4e 54 20 6c 69 6e | 65 73 2e 20 20 49 66 20 |OUNT lin|es. If |
|00004b20| 43 4f 55 4e 54 20 69 73 | 20 6e 69 6c 20 28 61 63 |COUNT is| nil (ac|
|00004b30| 74 75 61 6c 6c 79 2c 20 | 6e 6f 6e 2d 69 6e 74 65 |tually, |non-inte|
|00004b40| 67 65 72 29 2c 0a 73 63 | 72 6f 6c 6c 73 20 64 65 |ger),.sc|rolls de|
|00004b50| 66 61 75 6c 74 20 61 6d | 6f 75 6e 74 2e 20 20 54 |fault am|ount. T|
|00004b60| 68 65 20 67 69 76 65 6e | 20 43 4f 55 4e 54 20 69 |he given| COUNT i|
|00004b70| 73 20 72 65 6d 65 6d 62 | 65 72 65 64 20 66 6f 72 |s rememb|ered for|
|00004b80| 20 66 75 74 75 72 65 20 | 73 63 72 6f 6c 6c 69 6e | future |scrollin|
|00004b90| 67 73 2e 22 20 22 50 22 | 5d 29 0a 28 66 73 65 74 |gs." "P"|]).(fset|
|00004ba0| 20 27 76 69 2d 65 78 70 | 6f 73 65 2d 6c 69 6e 65 | 'vi-exp|ose-line|
|00004bb0| 2d 62 65 6c 6f 77 20 23 | 5b 28 63 6f 75 6e 74 29 |-below #|[(count)|
|00004bc0| 20 22 c0 09 21 87 22 20 | 5b 73 63 72 6f 6c 6c 2d | "..!." |[scroll-|
|00004bd0| 75 70 20 63 6f 75 6e 74 | 5d 20 32 20 22 5c 0a 45 |up count|] 2 "\.E|
|00004be0| 78 70 6f 73 65 20 43 4f | 55 4e 54 20 6d 6f 72 65 |xpose CO|UNT more|
|00004bf0| 20 6c 69 6e 65 73 20 62 | 65 6c 6f 77 20 74 68 65 | lines b|elow the|
|00004c00| 20 63 75 72 72 65 6e 74 | 20 77 69 6e 64 6f 77 2e | current| window.|
|00004c10| 20 20 44 65 66 61 75 6c | 74 20 43 4f 55 4e 54 20 | Defaul|t COUNT |
|00004c20| 69 73 20 31 2e 22 20 22 | 70 22 5d 29 0a 28 66 73 |is 1." "|p"]).(fs|
|00004c30| 65 74 20 27 76 69 2d 66 | 6f 72 77 61 72 64 2d 77 |et 'vi-f|orward-w|
|00004c40| 69 6e 64 6f 77 66 75 6c | 6c 20 23 5b 28 63 6f 75 |indowful|l #[(cou|
|00004c50| 6e 74 29 20 22 08 c1 56 | ad 8a c2 c3 21 88 08 53 |nt) "..V|....!..S|
|00004c60| 89 10 aa 72 87 22 20 5b | 63 6f 75 6e 74 20 30 20 |...r." [|count 0 |
|00004c70| 73 63 72 6f 6c 6c 2d 75 | 70 20 6e 69 6c 5d 20 33 |scroll-u|p nil] 3|
|00004c80| 20 22 5c 0a 46 6f 72 77 | 61 72 64 20 43 4f 55 4e | "\.Forw|ard COUN|
|00004c90| 54 20 77 69 6e 64 6f 77 | 66 75 6c 6c 73 2e 20 44 |T window|fulls. D|
|00004ca0| 65 66 61 75 6c 74 20 69 | 73 20 6f 6e 65 2e 22 20 |efault i|s one." |
|00004cb0| 22 70 22 5d 29 0a 28 66 | 73 65 74 20 27 76 69 2d |"p"]).(f|set 'vi-|
|00004cc0| 6e 65 78 74 2d 6c 69 6e | 65 20 23 5b 28 63 6f 75 |next-lin|e #[(cou|
|00004cd0| 6e 74 29 20 22 c0 11 60 | c2 0b 21 ae 81 60 55 ab |nt) "..`|..!..`U.|
|00004ce0| 83 c4 20 87 c0 89 15 87 | 22 20 5b 6e 65 78 74 2d |.. .....|" [next-|
|00004cf0| 6c 69 6e 65 20 74 68 69 | 73 2d 63 6f 6d 6d 61 6e |line thi|s-comman|
|00004d00| 64 20 6c 69 6e 65 2d 6d | 6f 76 65 20 63 6f 75 6e |d line-m|ove coun|
|00004d10| 74 20 64 69 6e 67 20 6c | 61 73 74 2d 63 6f 6d 6d |t ding l|ast-comm|
|00004d20| 61 6e 64 5d 20 33 20 22 | 5c 0a 47 6f 20 64 6f 77 |and] 3 "|\.Go dow|
|00004d30| 6e 20 63 6f 75 6e 74 20 | 6c 69 6e 65 73 2c 20 74 |n count |lines, t|
|00004d40| 72 79 20 74 6f 20 6b 65 | 65 70 20 61 74 20 74 68 |ry to ke|ep at th|
|00004d50| 65 20 73 61 6d 65 20 63 | 6f 6c 75 6d 6e 2e 22 20 |e same c|olumn." |
|00004d60| 22 70 22 5d 29 0a 28 66 | 73 65 74 20 27 76 69 2d |"p"]).(f|set 'vi-|
|00004d70| 6e 65 78 74 2d 6c 69 6e | 65 2d 66 69 72 73 74 2d |next-lin|e-first-|
|00004d80| 6e 6f 6e 77 68 69 74 65 | 20 23 5b 28 63 6f 75 6e |nonwhite| #[(coun|
|00004d90| 74 29 20 22 60 08 79 88 | c1 20 88 60 55 ad 82 c2 |t) "`.y.|. .`U...|
|00004da0| 20 87 22 20 5b 63 6f 75 | 6e 74 20 62 61 63 6b 2d | ." [cou|nt back-|
|00004db0| 74 6f 2d 69 6e 64 65 6e | 74 61 74 69 6f 6e 20 64 |to-inden|tation d|
|00004dc0| 69 6e 67 5d 20 32 20 22 | 5c 0a 47 6f 20 64 6f 77 |ing] 2 "|\.Go dow|
|00004dd0| 6e 20 43 4f 55 4e 54 20 | 6c 69 6e 65 73 2e 20 20 |n COUNT |lines. |
|00004de0| 53 74 6f 70 20 61 74 20 | 66 69 72 73 74 20 6e 6f |Stop at |first no|
|00004df0| 6e 2d 77 68 69 74 65 2e | 22 20 22 70 22 5d 29 0a |n-white.|" "p"]).|
|00004e00| 28 66 73 65 74 20 27 76 | 69 2d 70 72 65 76 69 6f |(fset 'v|i-previo|
|00004e10| 75 73 2d 6c 69 6e 65 2d | 66 69 72 73 74 2d 6e 6f |us-line-|first-no|
|00004e20| 6e 77 68 69 74 65 20 23 | 5b 28 63 6f 75 6e 74 29 |nwhite #|[(count)|
|00004e30| 20 22 c0 09 21 88 c2 20 | 87 22 20 5b 70 72 65 76 | "..!.. |." [prev|
|00004e40| 69 6f 75 73 2d 6c 69 6e | 65 20 63 6f 75 6e 74 20 |ious-lin|e count |
|00004e50| 62 61 63 6b 2d 74 6f 2d | 69 6e 64 65 6e 74 61 74 |back-to-|indentat|
|00004e60| 69 6f 6e 5d 20 32 20 22 | 5c 0a 47 6f 20 75 70 20 |ion] 2 "|\.Go up |
|00004e70| 43 4f 55 4e 54 20 6c 69 | 6e 65 73 2e 20 20 53 74 |COUNT li|nes. St|
|00004e80| 6f 70 20 61 74 20 66 69 | 72 73 74 20 6e 6f 6e 2d |op at fi|rst non-|
|00004e90| 77 68 69 74 65 2e 22 20 | 22 70 22 5d 29 0a 28 66 |white." |"p"]).(f|
|00004ea0| 73 65 74 20 27 76 69 2d | 73 63 72 6f 6c 6c 2d 75 |set 'vi-|scroll-u|
|00004eb0| 70 2d 77 69 6e 64 6f 77 | 20 23 5b 28 63 6f 75 6e |p-window| #[(coun|
|00004ec0| 74 29 20 22 08 a8 ab 82 | 08 11 c2 09 21 87 22 20 |t) "....|....!." |
|00004ed0| 5b 63 6f 75 6e 74 20 76 | 69 2d 73 63 72 6f 6c 6c |[count v|i-scroll|
|00004ee0| 2d 61 6d 6f 75 6e 74 20 | 73 63 72 6f 6c 6c 2d 64 |-amount |scroll-d|
|00004ef0| 6f 77 6e 5d 20 32 20 22 | 5c 0a 53 63 72 6f 6c 6c |own] 2 "|\.Scroll|
|00004f00| 73 20 75 70 20 77 69 6e | 64 6f 77 20 43 4f 55 4e |s up win|dow COUN|
|00004f10| 54 20 6c 69 6e 65 73 2e | 20 20 49 66 20 43 4f 55 |T lines.| If COU|
|00004f20| 4e 54 20 69 73 20 6e 69 | 6c 20 28 61 63 74 75 61 |NT is ni|l (actua|
|00004f30| 6c 6c 79 2c 20 6e 6f 6e | 2d 69 6e 74 65 67 65 72 |lly, non|-integer|
|00004f40| 29 2c 0a 73 63 72 6f 6c | 6c 73 20 64 65 66 61 75 |),.scrol|ls defau|
|00004f50| 6c 74 20 61 6d 6f 75 6e | 74 2e 20 20 54 68 65 20 |lt amoun|t. The |
|00004f60| 67 69 76 65 6e 20 43 4f | 55 4e 54 20 69 73 20 72 |given CO|UNT is r|
|00004f70| 65 6d 65 6d 62 65 72 65 | 64 20 66 6f 72 20 66 75 |emembere|d for fu|
|00004f80| 74 75 72 65 20 73 63 72 | 6f 6c 6c 69 6e 67 73 2e |ture scr|ollings.|
|00004f90| 22 20 22 50 22 5d 29 0a | 28 66 73 65 74 20 27 76 |" "P"]).|(fset 'v|
|00004fa0| 69 2d 65 78 70 6f 73 65 | 2d 6c 69 6e 65 2d 61 62 |i-expose|-line-ab|
|00004fb0| 6f 76 65 20 23 5b 28 63 | 6f 75 6e 74 29 20 22 c0 |ove #[(c|ount) ".|
|00004fc0| 09 21 87 22 20 5b 73 63 | 72 6f 6c 6c 2d 64 6f 77 |.!." [sc|roll-dow|
|00004fd0| 6e 20 63 6f 75 6e 74 5d | 20 32 20 22 5c 0a 45 78 |n count]| 2 "\.Ex|
|00004fe0| 70 6f 73 65 20 43 4f 55 | 4e 54 20 6d 6f 72 65 20 |pose COU|NT more |
|00004ff0| 6c 69 6e 65 73 20 61 62 | 6f 76 65 20 74 68 65 20 |lines ab|ove the |
|00005000| 63 75 72 72 65 6e 74 20 | 77 69 6e 64 6f 77 2e 20 |current |window. |
|00005010| 20 44 65 66 61 75 6c 74 | 20 43 4f 55 4e 54 20 69 | Default| COUNT i|
|00005020| 73 20 31 2e 22 20 22 70 | 22 5d 29 0a 28 66 73 65 |s 1." "p|"]).(fse|
|00005030| 74 20 27 76 69 2d 63 68 | 61 72 2d 61 72 67 75 6d |t 'vi-ch|ar-argum|
|00005040| 65 6e 74 20 23 5b 28 61 | 72 67 29 20 22 c0 20 19 |ent #[(a|rg) ". .|
|00005050| 5c 6e ac 87 c3 09 42 89 | 14 aa 91 5c 6e a8 ab 87 |\n....B.|...\n...|
|00005060| 5c 6e 09 42 89 14 aa 86 | 5c 6e 40 09 42 89 14 29 |\n.B....|\n@.B..)|
|00005070| 87 22 20 5b 72 65 61 64 | 2d 63 68 61 72 20 63 68 |." [read|-char ch|
|00005080| 61 72 20 61 72 67 20 6e | 69 6c 20 70 72 65 66 69 |ar arg n|il prefi|
|00005090| 78 2d 61 72 67 5d 20 32 | 20 22 5c 0a 47 65 74 20 |x-arg] 2| "\.Get |
|000050a0| 66 6f 6c 6c 6f 77 69 6e | 67 20 63 68 61 72 61 63 |followin|g charac|
|000050b0| 74 65 72 20 28 63 6f 75 | 6c 64 20 62 65 20 61 6e |ter (cou|ld be an|
|000050c0| 79 20 43 48 41 52 29 20 | 61 73 20 70 61 72 74 20 |y CHAR) |as part |
|000050d0| 6f 66 20 74 68 65 20 70 | 72 65 66 69 78 20 61 72 |of the p|refix ar|
|000050e0| 67 75 6d 65 6e 74 2e 0a | 50 6f 73 73 69 62 6c 65 |gument..|Possible|
|000050f0| 20 70 65 72 66 69 78 2d | 61 72 67 20 63 61 73 65 | perfix-|arg case|
|00005100| 73 20 61 72 65 20 4e 49 | 4c 2c 20 49 4e 54 45 47 |s are NI|L, INTEG|
|00005110| 45 52 2c 20 28 4e 49 4c | 20 2e 20 43 48 41 52 29 |ER, (NIL| . CHAR)|
|00005120| 20 6f 72 20 28 49 4e 54 | 45 47 45 52 20 2e 20 43 | or (INT|EGER . C|
|00005130| 48 41 52 29 2e 22 20 22 | 50 22 5d 29 0a 28 66 73 |HAR)." "|P"]).(fs|
|00005140| 65 74 20 27 76 69 2d 67 | 6f 74 6f 2d 6d 61 72 6b |et 'vi-g|oto-mark|
|00005150| 20 23 5b 28 6d 61 72 6b | 2d 63 68 61 72 20 26 6f | #[(mark|-char &o|
|00005160| 70 74 69 6f 6e 61 6c 20 | 6c 69 6e 65 2d 66 6c 61 |ptional |line-fla|
|00005170| 67 29 20 22 c0 09 5c 6e | 5c 22 ab 89 c3 20 88 0c |g) "..\n|\"... ..|
|00005180| ad b0 c5 20 87 c0 09 c6 | 5c 22 ab 8a c7 c8 21 88 |... ....|\"....!.|
|00005190| 0c ad a0 c5 20 87 c9 09 | 21 89 1e 5c 6e ac 87 cb |.... ...|!..\n...|
|000051a0| cc cd 20 5c 22 aa 8d c7 | ce 21 88 0e 5c 6e 62 88 |.. \"...|.!..\nb.|
|000051b0| 0c ad 82 c5 20 29 87 22 | 20 5b 63 68 61 72 2d 65 |.... )."| [char-e|
|000051c0| 71 75 61 6c 20 6d 61 72 | 6b 2d 63 68 61 72 20 6c |qual mar|k-char l|
|000051d0| 61 73 74 2d 63 6f 6d 6d | 61 6e 64 2d 63 68 61 72 |ast-comm|and-char|
|000051e0| 20 65 78 63 68 61 6e 67 | 65 2d 70 6f 69 6e 74 2d | exchang|e-point-|
|000051f0| 61 6e 64 2d 6d 61 72 6b | 20 6c 69 6e 65 2d 66 6c |and-mark| line-fl|
|00005200| 61 67 20 62 61 63 6b 2d | 74 6f 2d 69 6e 64 65 6e |ag back-|to-inden|
|00005210| 74 61 74 69 6f 6e 20 36 | 34 20 73 65 74 2d 6d 61 |tation 6|4 set-ma|
|00005220| 72 6b 2d 63 6f 6d 6d 61 | 6e 64 20 74 20 76 69 2d |rk-comma|nd t vi-|
|00005230| 67 65 74 2d 6d 61 72 6b | 20 6d 61 72 6b 20 6d 65 |get-mark| mark me|
|00005240| 73 73 61 67 65 20 22 4d | 61 72 6b 20 72 65 67 69 |ssage "M|ark regi|
|00005250| 73 74 65 72 20 75 6e 64 | 65 66 69 6e 65 64 2e 22 |ster und|efined."|
|00005260| 20 76 69 2d 64 69 6e 67 | 20 6e 69 6c 5d 20 34 20 | vi-ding| nil] 4 |
|00005270| 22 5c 0a 47 6f 20 74 6f | 20 6d 61 72 6b 65 64 20 |"\.Go to| marked |
|00005280| 70 6f 73 69 74 69 6f 6e | 20 6f 72 20 6c 69 6e 65 |position| or line|
|00005290| 20 28 69 66 20 6c 69 6e | 65 2d 66 6c 61 67 20 69 | (if lin|e-flag i|
|000052a0| 73 20 67 69 76 65 6e 29 | 2e 20 47 6f 74 6f 20 6d |s given)|. Goto m|
|000052b0| 61 72 6b 20 27 40 27 20 | 6d 65 61 6e 73 0a 6a 75 |ark '@' |means.ju|
|000052c0| 6d 70 20 69 6e 74 6f 20 | 61 6e 64 20 70 6f 70 20 |mp into |and pop |
|000052d0| 74 68 65 20 74 6f 70 20 | 6d 61 72 6b 20 6f 6e 20 |the top |mark on |
|000052e0| 74 68 65 20 6d 61 72 6b | 20 72 69 6e 67 2e 22 5d |the mark| ring."]|
|000052f0| 29 0a 28 66 73 65 74 20 | 27 76 69 2d 67 6f 74 6f |).(fset |'vi-goto|
|00005300| 2d 6c 69 6e 65 2d 6d 61 | 72 6b 20 23 5b 28 63 68 |-line-ma|rk #[(ch|
|00005310| 61 72 29 20 22 c0 09 c2 | 5c 22 87 22 20 5b 76 69 |ar) "...|\"." [vi|
|00005320| 2d 67 6f 74 6f 2d 6d 61 | 72 6b 20 63 68 61 72 20 |-goto-ma|rk char |
|00005330| 74 5d 20 33 20 22 5c 0a | 47 6f 20 74 6f 20 74 68 |t] 3 "\.|Go to th|
|00005340| 65 20 6c 69 6e 65 20 28 | 61 74 20 66 69 72 73 74 |e line (|at first|
|00005350| 20 6e 6f 6e 2d 77 68 69 | 74 65 29 20 6d 61 72 6b | non-whi|te) mark|
|00005360| 65 64 20 62 79 20 6e 65 | 78 74 20 63 68 61 72 2e |ed by ne|xt char.|
|00005370| 22 20 22 63 22 5d 29 0a | 28 66 73 65 74 20 27 76 |" "c"]).|(fset 'v|
|00005380| 69 2d 67 6f 74 6f 2d 63 | 68 61 72 2d 6d 61 72 6b |i-goto-c|har-mark|
|00005390| 20 23 5b 28 63 68 61 72 | 29 20 22 c0 09 21 87 22 | #[(char|) "..!."|
|000053a0| 20 5b 76 69 2d 67 6f 74 | 6f 2d 6d 61 72 6b 20 63 | [vi-got|o-mark c|
|000053b0| 68 61 72 5d 20 32 20 22 | 5c 0a 47 6f 20 74 6f 20 |har] 2 "|\.Go to |
|000053c0| 74 68 65 20 63 68 61 72 | 20 70 6f 73 69 74 69 6f |the char| positio|
|000053d0| 6e 20 6d 61 72 6b 65 64 | 20 62 79 20 6e 65 78 74 |n marked| by next|
|000053e0| 20 6d 61 72 6b 2d 63 68 | 61 72 2e 22 20 22 63 22 | mark-ch|ar." "c"|
|000053f0| 5d 29 0a 28 66 73 65 74 | 20 27 76 69 2d 64 69 67 |]).(fset| 'vi-dig|
|00005400| 69 74 2d 61 72 67 75 6d | 65 6e 74 20 23 5b 28 61 |it-argum|ent #[(a|
|00005410| 72 67 29 20 22 08 ac 84 | c1 08 21 87 08 a8 ab 8a |rg) "...|..!.....|
|00005420| c1 c2 21 88 0b 08 5f 89 | 13 87 c1 c2 21 88 0b 08 |..!..._.|....!...|
|00005430| 40 ac 83 c4 aa 82 08 40 | 5f 08 41 42 89 13 87 22 |@......@|_.AB..."|
|00005440| 20 5b 61 72 67 20 64 69 | 67 69 74 2d 61 72 67 75 | [arg di|git-argu|
|00005450| 6d 65 6e 74 20 6e 69 6c | 20 70 72 65 66 69 78 2d |ment nil| prefix-|
|00005460| 61 72 67 20 31 5d 20 32 | 20 22 5c 0a 53 65 74 20 |arg 1] 2| "\.Set |
|00005470| 6e 75 6d 65 72 69 63 20 | 70 72 65 66 69 78 20 61 |numeric |prefix a|
|00005480| 72 67 75 6d 65 6e 74 2e | 22 20 22 50 22 5d 29 0a |rgument.|" "P"]).|
|00005490| 28 66 73 65 74 20 27 76 | 69 2d 72 61 77 2d 6e 75 |(fset 'v|i-raw-nu|
|000054a0| 6d 65 72 69 63 2d 70 72 | 65 66 69 78 20 23 5b 28 |meric-pr|efix #[(|
|000054b0| 61 72 67 29 20 22 08 3a | ab 83 08 40 87 08 87 22 |arg) ".:|...@..."|
|000054c0| 20 5b 61 72 67 5d 20 31 | 20 22 5c 0a 52 65 74 75 | [arg] 1| "\.Retu|
|000054d0| 72 6e 20 74 68 65 20 72 | 61 77 20 76 61 6c 75 65 |rn the r|aw value|
|000054e0| 20 6f 66 20 6e 75 6d 65 | 72 69 63 20 70 61 72 74 | of nume|ric part|
|000054f0| 20 70 72 65 66 69 78 20 | 61 72 67 75 6d 65 6e 74 | prefix |argument|
|00005500| 2e 22 5d 29 0a 28 66 73 | 65 74 20 27 76 69 2d 70 |."]).(fs|et 'vi-p|
|00005510| 72 65 66 69 78 2d 6e 75 | 6d 65 72 69 63 2d 76 61 |refix-nu|meric-va|
|00005520| 6c 75 65 20 23 5b 28 61 | 72 67 29 20 22 08 ac 82 |lue #[(a|rg) "...|
|00005530| c1 87 08 a8 ab 82 08 87 | 08 3a ad 88 08 40 ab 83 |........|.:...@..|
|00005540| 08 40 87 c1 87 22 20 5b | 61 72 67 20 31 5d 20 31 |.@..." [|arg 1] 1|
|00005550| 20 22 5c 0a 52 65 74 75 | 72 6e 20 6e 75 6d 65 72 | "\.Retu|rn numer|
|00005560| 69 63 20 6d 65 61 6e 69 | 6e 67 20 6f 66 20 74 68 |ic meani|ng of th|
|00005570| 65 20 72 61 77 20 70 72 | 65 66 69 78 20 61 72 67 |e raw pr|efix arg|
|00005580| 75 6d 65 6e 74 2e 20 20 | 54 68 69 73 20 69 73 20 |ument. |This is |
|00005590| 61 20 6d 6f 64 69 66 69 | 63 61 74 69 6f 6e 0a 74 |a modifi|cation.t|
|000055a0| 6f 20 74 68 65 20 73 74 | 61 6e 64 61 72 64 20 6f |o the st|andard o|
|000055b0| 6e 65 20 70 72 6f 76 69 | 64 65 64 20 69 6e 20 60 |ne provi|ded in `|
|000055c0| 63 61 6c 6c 69 6e 74 2e | 63 27 20 74 6f 20 68 61 |callint.|c' to ha|
|000055d0| 6e 64 6c 65 20 28 5f 20 | 2e 20 43 48 41 52 29 20 |ndle (_ |. CHAR) |
|000055e0| 63 61 73 65 73 2e 22 5d | 29 0a 28 66 73 65 74 20 |cases."]|).(fset |
|000055f0| 27 76 69 2d 72 65 76 65 | 72 73 65 2d 6c 61 73 74 |'vi-reve|rse-last|
|00005600| 2d 66 69 6e 64 2d 63 68 | 61 72 20 23 5b 28 63 6f |-find-ch|ar #[(co|
|00005610| 75 6e 74 20 26 6f 70 74 | 69 6f 6e 61 6c 20 66 69 |unt &opt|ional fi|
|00005620| 6e 64 2d 61 72 67 29 20 | 22 08 ac 82 09 10 08 ac |nd-arg) |".......|
|00005630| 86 c2 c3 c4 20 5c 22 87 | c5 08 40 5b 08 41 42 0e |.... \".|..@[.AB.|
|00005640| 06 5c 22 87 22 20 5b 66 | 69 6e 64 2d 61 72 67 20 |.\"." [f|ind-arg |
|00005650| 76 69 2d 6c 61 73 74 2d | 66 69 6e 64 2d 63 68 61 |vi-last-|find-cha|
|00005660| 72 20 6d 65 73 73 61 67 | 65 20 22 4e 6f 20 6c 61 |r messag|e "No la|
|00005670| 73 74 20 66 69 6e 64 20 | 63 68 61 72 20 74 6f 20 |st find |char to |
|00005680| 72 65 70 65 61 74 2e 22 | 20 64 69 6e 67 20 76 69 |repeat."| ding vi|
|00005690| 2d 66 69 6e 64 2d 63 68 | 61 72 20 63 6f 75 6e 74 |-find-ch|ar count|
|000056a0| 5d 20 33 20 22 5c 0a 52 | 65 76 65 72 73 65 20 6c |] 3 "\.R|everse l|
|000056b0| 61 73 74 20 66 20 46 20 | 74 20 54 20 6f 70 65 72 |ast f F |t T oper|
|000056c0| 61 74 69 6f 6e 20 43 4f | 55 4e 54 20 74 69 6d 65 |ation CO|UNT time|
|000056d0| 73 2e 20 20 49 66 20 74 | 68 65 20 6f 70 74 69 6f |s. If t|he optio|
|000056e0| 6e 61 6c 20 46 49 4e 44 | 2d 41 52 47 0a 69 73 20 |nal FIND|-ARG.is |
|000056f0| 67 69 76 65 6e 2c 20 69 | 74 20 69 73 20 75 73 65 |given, i|t is use|
|00005700| 64 20 69 6e 73 74 65 61 | 64 20 6f 66 20 74 68 65 |d instea|d of the|
|00005710| 20 73 61 76 65 64 20 6f | 6e 65 2e 22 20 22 70 22 | saved o|ne." "p"|
|00005720| 5d 29 0a 28 66 73 65 74 | 20 27 76 69 2d 66 69 6e |]).(fset| 'vi-fin|
|00005730| 64 2d 63 68 61 72 20 23 | 5b 28 61 72 67 20 63 6f |d-char #|[(arg co|
|00005740| 75 6e 74 29 20 22 08 40 | 19 08 41 40 1a 08 41 41 |unt) ".@|..A@..AA|
|00005750| 1b 60 09 5c 5c 1c c5 c6 | 8d ab 84 0c 62 aa 82 c7 |.`.\\...|....b...|
|00005760| 20 2c 87 22 20 5b 61 72 | 67 20 64 69 72 65 63 74 | ,." [ar|g direct|
|00005770| 69 6f 6e 20 63 68 61 72 | 20 75 70 74 6f 2d 66 6c |ion char| upto-fl|
|00005780| 61 67 20 70 6f 73 20 65 | 78 69 74 2d 66 69 6e 64 |ag pos e|xit-find|
|00005790| 2d 63 68 61 72 20 28 62 | 79 74 65 2d 63 6f 64 65 |-char (b|yte-code|
|000057a0| 20 22 08 66 ac 87 c1 c2 | c3 5c 22 88 aa b1 c4 08 | ".f....|.\".....|
|000057b0| 66 c5 5c 22 ab 87 c1 c2 | c3 5c 22 88 aa a3 c4 0e |f.\"....|.\".....|
|000057c0| 06 08 66 5c 22 ab 9b 0e | 07 53 89 16 07 c8 55 ab |..f\"...|.S....U.|
|000057d0| 91 c1 c2 0e 09 ab 88 08 | 0e 5c 6e 5a 89 10 aa 81 |........|.\nZ....|
|000057e0| 08 5c 22 88 08 0e 5c 6e | 5c 5c 89 10 aa 3d 22 20 |.\"...\n|\\...=" |
|000057f0| 5b 70 6f 73 20 74 68 72 | 6f 77 20 65 78 69 74 2d |[pos thr|ow exit-|
|00005800| 66 69 6e 64 2d 63 68 61 | 72 20 6e 69 6c 20 63 68 |find-cha|r nil ch|
|00005810| 61 72 2d 65 71 75 61 6c | 20 31 30 20 63 68 61 72 |ar-equal| 10 char|
|00005820| 20 63 6f 75 6e 74 20 30 | 20 75 70 74 6f 2d 66 6c | count 0| upto-fl|
|00005830| 61 67 20 64 69 72 65 63 | 74 69 6f 6e 5d 20 35 29 |ag direc|tion] 5)|
|00005840| 20 64 69 6e 67 5d 20 32 | 20 22 5c 0a 46 69 6e 64 | ding] 2| "\.Find|
|00005850| 20 69 6e 20 44 49 52 45 | 43 54 49 4f 4e 20 28 31 | in DIRE|CTION (1|
|00005860| 2f 2d 31 29 20 66 6f 72 | 20 43 48 41 52 20 6f 66 |/-1) for| CHAR of|
|00005870| 20 43 4f 55 4e 54 27 74 | 68 20 74 69 6d 65 73 20 | COUNT't|h times |
|00005880| 6f 6e 20 63 75 72 72 65 | 6e 74 20 6c 69 6e 65 2e |on curre|nt line.|
|00005890| 0a 49 66 20 55 50 54 4f | 2d 46 4c 41 47 20 69 73 |.If UPTO|-FLAG is|
|000058a0| 20 54 2c 20 73 74 6f 70 | 20 62 65 66 6f 72 65 20 | T, stop| before |
|000058b0| 74 68 65 20 63 68 61 72 | 2e 20 41 52 47 20 3d 20 |the char|. ARG = |
|000058c0| 28 44 49 52 45 43 54 49 | 4f 4e 2e 43 48 41 52 2e |(DIRECTI|ON.CHAR.|
|000058d0| 55 50 54 4f 2d 46 4c 41 | 47 2e 22 5d 29 0a 28 66 |UPTO-FLA|G."]).(f|
|000058e0| 73 65 74 20 27 76 69 2d | 72 65 70 65 61 74 2d 6c |set 'vi-|repeat-l|
|000058f0| 61 73 74 2d 66 69 6e 64 | 2d 63 68 61 72 20 23 5b |ast-find|-char #[|
|00005900| 28 63 6f 75 6e 74 20 26 | 6f 70 74 69 6f 6e 61 6c |(count &|optional|
|00005910| 20 66 69 6e 64 2d 61 72 | 67 29 20 22 08 ac 82 09 | find-ar|g) "....|
|00005920| 10 08 ac 86 c2 c3 c4 20 | 5c 22 87 c5 08 0e 06 5c |....... |\".....\|
|00005930| 22 87 22 20 5b 66 69 6e | 64 2d 61 72 67 20 76 69 |"." [fin|d-arg vi|
|00005940| 2d 6c 61 73 74 2d 66 69 | 6e 64 2d 63 68 61 72 20 |-last-fi|nd-char |
|00005950| 6d 65 73 73 61 67 65 20 | 22 4e 6f 20 6c 61 73 74 |message |"No last|
|00005960| 20 66 69 6e 64 20 63 68 | 61 72 20 74 6f 20 72 65 | find ch|ar to re|
|00005970| 70 65 61 74 2e 22 20 64 | 69 6e 67 20 76 69 2d 66 |peat." d|ing vi-f|
|00005980| 69 6e 64 2d 63 68 61 72 | 20 63 6f 75 6e 74 5d 20 |ind-char| count] |
|00005990| 33 20 22 5c 0a 52 65 70 | 65 61 74 20 6c 61 73 74 |3 "\.Rep|eat last|
|000059a0| 20 66 20 46 20 74 20 54 | 20 6f 70 65 72 61 74 69 | f F t T| operati|
|000059b0| 6f 6e 20 43 4f 55 4e 54 | 20 74 69 6d 65 73 2e 20 |on COUNT| times. |
|000059c0| 20 49 66 20 6f 70 74 69 | 6f 6e 61 6c 20 46 49 4e | If opti|onal FIN|
|000059d0| 44 2d 41 52 47 20 69 73 | 20 67 69 76 65 6e 2c 0a |D-ARG is| given,.|
|000059e0| 69 74 20 69 73 20 75 73 | 65 64 20 69 6e 73 74 65 |it is us|ed inste|
|000059f0| 61 64 20 6f 66 20 74 68 | 65 20 73 61 76 65 64 20 |ad of th|e saved |
|00005a00| 6f 6e 65 2e 22 20 22 70 | 22 5d 29 0a 28 66 73 65 |one." "p|"]).(fse|
|00005a10| 74 20 27 76 69 2d 62 61 | 63 6b 77 61 72 64 2d 66 |t 'vi-ba|ckward-f|
|00005a20| 69 6e 64 2d 63 68 61 72 | 20 23 5b 28 63 6f 75 6e |ind-char| #[(coun|
|00005a30| 74 20 63 68 61 72 29 20 | 22 c0 09 c2 42 42 13 c4 |t char) |"...BB..|
|00005a40| 0d 21 87 22 20 5b 2d 31 | 20 63 68 61 72 20 6e 69 |.!." [-1| char ni|
|00005a50| 6c 20 76 69 2d 6c 61 73 | 74 2d 66 69 6e 64 2d 63 |l vi-las|t-find-c|
|00005a60| 68 61 72 20 76 69 2d 72 | 65 70 65 61 74 2d 6c 61 |har vi-r|epeat-la|
|00005a70| 73 74 2d 66 69 6e 64 2d | 63 68 61 72 20 63 6f 75 |st-find-|char cou|
|00005a80| 6e 74 5d 20 33 20 22 5c | 0a 46 69 6e 64 20 74 68 |nt] 3 "\|.Find th|
|00005a90| 65 20 43 4f 55 4e 54 27 | 74 68 20 43 48 41 52 20 |e COUNT'|th CHAR |
|00005aa0| 62 61 63 6b 77 61 72 64 | 20 6f 6e 20 63 75 72 72 |backward| on curr|
|00005ab0| 65 6e 74 20 6c 69 6e 65 | 2e 22 20 22 70 5c 6e 63 |ent line|." "p\nc|
|00005ac0| 22 5d 29 0a 28 66 73 65 | 74 20 27 76 69 2d 66 6f |"]).(fse|t 'vi-fo|
|00005ad0| 72 77 61 72 64 2d 66 69 | 6e 64 2d 63 68 61 72 20 |rward-fi|nd-char |
|00005ae0| 23 5b 28 63 6f 75 6e 74 | 20 63 68 61 72 29 20 22 |#[(count| char) "|
|00005af0| c0 09 c2 42 42 13 c4 0d | 21 87 22 20 5b 31 20 63 |...BB...|!." [1 c|
|00005b00| 68 61 72 20 6e 69 6c 20 | 76 69 2d 6c 61 73 74 2d |har nil |vi-last-|
|00005b10| 66 69 6e 64 2d 63 68 61 | 72 20 76 69 2d 72 65 70 |find-cha|r vi-rep|
|00005b20| 65 61 74 2d 6c 61 73 74 | 2d 66 69 6e 64 2d 63 68 |eat-last|-find-ch|
|00005b30| 61 72 20 63 6f 75 6e 74 | 5d 20 33 20 22 5c 0a 46 |ar count|] 3 "\.F|
|00005b40| 69 6e 64 20 74 68 65 20 | 43 4f 55 4e 54 27 74 68 |ind the |COUNT'th|
|00005b50| 20 43 48 41 52 20 66 6f | 72 77 61 72 64 20 6f 6e | CHAR fo|rward on|
|00005b60| 20 63 75 72 72 65 6e 74 | 20 6c 69 6e 65 2e 22 20 | current| line." |
|00005b70| 22 70 5c 6e 63 22 5d 29 | 0a 28 66 73 65 74 20 27 |"p\nc"])|.(fset '|
|00005b80| 76 69 2d 62 61 63 6b 77 | 61 72 64 2d 75 70 74 6f |vi-backw|ard-upto|
|00005b90| 2d 63 68 61 72 20 23 5b | 28 63 6f 75 6e 74 20 63 |-char #[|(count c|
|00005ba0| 68 61 72 29 20 22 c0 09 | c2 42 42 13 c4 0d 21 87 |har) "..|.BB...!.|
|00005bb0| 22 20 5b 2d 31 20 63 68 | 61 72 20 74 20 76 69 2d |" [-1 ch|ar t vi-|
|00005bc0| 6c 61 73 74 2d 66 69 6e | 64 2d 63 68 61 72 20 76 |last-fin|d-char v|
|00005bd0| 69 2d 72 65 70 65 61 74 | 2d 6c 61 73 74 2d 66 69 |i-repeat|-last-fi|
|00005be0| 6e 64 2d 63 68 61 72 20 | 63 6f 75 6e 74 5d 20 33 |nd-char |count] 3|
|00005bf0| 20 22 5c 0a 46 69 6e 64 | 20 75 70 74 6f 20 74 68 | "\.Find| upto th|
|00005c00| 65 20 43 4f 55 4e 54 27 | 74 68 20 43 48 41 52 20 |e COUNT'|th CHAR |
|00005c10| 62 61 63 6b 77 61 72 64 | 20 6f 6e 20 63 75 72 72 |backward| on curr|
|00005c20| 65 6e 74 20 6c 69 6e 65 | 2e 22 20 22 70 5c 6e 63 |ent line|." "p\nc|
|00005c30| 22 5d 29 0a 28 66 73 65 | 74 20 27 76 69 2d 66 6f |"]).(fse|t 'vi-fo|
|00005c40| 72 77 61 72 64 2d 75 70 | 74 6f 2d 63 68 61 72 20 |rward-up|to-char |
|00005c50| 23 5b 28 63 6f 75 6e 74 | 20 63 68 61 72 29 20 22 |#[(count| char) "|
|00005c60| c0 09 c2 42 42 13 c4 0d | 21 87 22 20 5b 31 20 63 |...BB...|!." [1 c|
|00005c70| 68 61 72 20 74 20 76 69 | 2d 6c 61 73 74 2d 66 69 |har t vi|-last-fi|
|00005c80| 6e 64 2d 63 68 61 72 20 | 76 69 2d 72 65 70 65 61 |nd-char |vi-repea|
|00005c90| 74 2d 6c 61 73 74 2d 66 | 69 6e 64 2d 63 68 61 72 |t-last-f|ind-char|
|00005ca0| 20 63 6f 75 6e 74 5d 20 | 33 20 22 5c 0a 46 69 6e | count] |3 "\.Fin|
|00005cb0| 64 20 75 70 74 6f 20 74 | 68 65 20 43 4f 55 4e 54 |d upto t|he COUNT|
|00005cc0| 27 74 68 20 43 48 41 52 | 20 66 6f 72 77 61 72 64 |'th CHAR| forward|
|00005cd0| 20 6f 6e 20 63 75 72 72 | 65 6e 74 20 6c 69 6e 65 | on curr|ent line|
|00005ce0| 2e 22 20 22 70 5c 6e 63 | 22 5d 29 0a 28 66 73 65 |." "p\nc|"]).(fse|
|00005cf0| 74 20 27 76 69 2d 65 6e | 64 2d 6f 66 2d 77 6f 72 |t 'vi-en|d-of-wor|
|00005d00| 64 20 23 5b 28 63 6f 75 | 6e 74 29 20 22 6d ac 83 |d #[(cou|nt) "m..|
|00005d10| c0 75 88 c1 c2 c0 c3 0c | 24 ad 82 c5 20 87 22 20 |.u......|$... ." |
|00005d20| 5b 6e 69 6c 20 72 65 2d | 73 65 61 72 63 68 2d 66 |[nil re-|search-f|
|00005d30| 6f 72 77 61 72 64 20 22 | 5c 5c 57 2a 5c 5c 77 2b |orward "|\\W*\\w+|
|00005d40| 5c 5c 3e 22 20 74 20 63 | 6f 75 6e 74 20 62 61 63 |\\>" t c|ount bac|
|00005d50| 6b 77 61 72 64 2d 63 68 | 61 72 5d 20 35 20 22 5c |kward-ch|ar] 5 "\|
|00005d60| 0a 4d 6f 76 65 20 66 6f | 72 77 61 72 64 20 75 6e |.Move fo|rward un|
|00005d70| 74 69 6c 20 65 6e 63 6f | 75 6e 74 65 72 69 6e 67 |til enco|untering|
|00005d80| 20 74 68 65 20 65 6e 64 | 20 6f 66 20 61 20 77 6f | the end| of a wo|
|00005d90| 72 64 2e 0a 57 69 74 68 | 20 61 72 67 75 6d 65 6e |rd..With| argumen|
|00005da0| 74 2c 20 64 6f 20 74 68 | 69 73 20 74 68 61 74 20 |t, do th|is that |
|00005db0| 6d 61 6e 79 20 74 69 6d | 65 73 2e 22 20 22 70 22 |many tim|es." "p"|
|00005dc0| 5d 29 0a 28 66 73 65 74 | 20 27 76 69 2d 72 65 70 |]).(fset| 'vi-rep|
|00005dd0| 6c 61 63 65 2d 31 2d 63 | 68 61 72 20 23 5b 28 63 |lace-1-c|har #[(c|
|00005de0| 6f 75 6e 74 20 63 68 61 | 72 29 20 22 c0 09 c2 5c |ount cha|r) "...\|
|00005df0| 22 88 0b 14 c5 09 21 88 | c6 c7 09 0b 23 87 22 20 |".....!.|....#." |
|00005e00| 5b 64 65 6c 65 74 65 2d | 63 68 61 72 20 63 6f 75 |[delete-|char cou|
|00005e10| 6e 74 20 6e 69 6c 20 63 | 68 61 72 20 6c 61 73 74 |nt nil c|har last|
|00005e20| 2d 63 6f 6d 6d 61 6e 64 | 2d 63 68 61 72 20 73 65 |-command|-char se|
|00005e30| 6c 66 2d 69 6e 73 65 72 | 74 2d 63 6f 6d 6d 61 6e |lf-inser|t-comman|
|00005e40| 64 20 76 69 2d 73 65 74 | 2d 6c 61 73 74 2d 63 68 |d vi-set|-last-ch|
|00005e50| 61 6e 67 65 2d 63 6f 6d | 6d 61 6e 64 20 76 69 2d |ange-com|mand vi-|
|00005e60| 72 65 70 6c 61 63 65 2d | 31 2d 63 68 61 72 5d 20 |replace-|1-char] |
|00005e70| 34 20 22 5c 0a 52 65 70 | 6c 61 63 65 20 63 68 61 |4 "\.Rep|lace cha|
|00005e80| 72 20 61 66 74 65 72 20 | 70 6f 69 6e 74 20 62 79 |r after |point by|
|00005e90| 20 43 48 41 52 2e 20 20 | 52 65 70 65 61 74 20 43 | CHAR. |Repeat C|
|00005ea0| 4f 55 4e 54 20 74 69 6d | 65 73 2e 22 20 22 70 5c |OUNT tim|es." "p\|
|00005eb0| 6e 63 22 5d 29 0a 28 66 | 73 65 74 20 27 76 69 2d |nc"]).(f|set 'vi-|
|00005ec0| 72 65 70 6c 61 63 65 2d | 63 68 61 72 73 20 23 5b |replace-|chars #[|
|00005ed0| 28 61 72 67 29 20 22 c0 | c1 21 88 c2 0b 21 87 22 |(arg) ".|.!...!."|
|00005ee0| 20 5b 6f 76 65 72 77 72 | 69 74 65 2d 6d 6f 64 65 | [overwr|ite-mode|
|00005ef0| 20 31 20 76 69 2d 67 6f | 74 6f 2d 69 6e 73 65 72 | 1 vi-go|to-inser|
|00005f00| 74 2d 73 74 61 74 65 20 | 61 72 67 5d 20 32 20 22 |t-state |arg] 2 "|
|00005f10| 5c 0a 52 65 70 6c 61 63 | 65 20 63 68 61 72 73 20 |\.Replac|e chars |
|00005f20| 6f 76 65 72 20 6f 6c 64 | 20 6f 6e 65 73 2e 22 20 |over old| ones." |
|00005f30| 22 2a 70 22 5d 29 0a 28 | 66 73 65 74 20 27 76 69 |"*p"]).(|fset 'vi|
|00005f40| 2d 73 75 62 73 74 69 74 | 75 74 65 2d 63 68 61 72 |-substit|ute-char|
|00005f50| 73 20 23 5b 28 63 6f 75 | 6e 74 29 20 22 c0 c1 c2 |s #[(cou|nt) "...|
|00005f60| 0b 44 c4 23 87 22 20 5b | 76 69 2d 67 6f 74 6f 2d |.D.#." [|vi-goto-|
|00005f70| 69 6e 73 65 72 74 2d 73 | 74 61 74 65 20 31 20 23 |insert-s|tate 1 #|
|00005f80| 5b 28 63 29 20 22 60 60 | 08 5c 5c 7c 87 22 20 5b |[(c) "``|.\\|." [|
|00005f90| 63 5d 20 33 5d 20 63 6f | 75 6e 74 20 74 5d 20 34 |c] 3] co|unt t] 4|
|00005fa0| 20 22 5c 0a 53 75 62 73 | 74 69 74 75 74 65 20 43 | "\.Subs|titute C|
|00005fb0| 4f 55 4e 54 20 63 68 61 | 72 73 20 62 79 20 74 68 |OUNT cha|rs by th|
|00005fc0| 65 20 69 6e 70 75 74 20 | 63 68 61 72 73 2c 20 65 |e input |chars, e|
|00005fd0| 6e 74 65 72 20 69 6e 73 | 65 72 74 20 73 74 61 74 |nter ins|ert stat|
|00005fe0| 65 2e 22 20 22 2a 70 22 | 5d 29 0a 28 66 73 65 74 |e." "*p"|]).(fset|
|00005ff0| 20 27 76 69 2d 73 75 62 | 73 74 69 74 75 74 65 2d | 'vi-sub|stitute-|
|00006000| 6c 69 6e 65 73 20 23 5b | 28 63 6f 75 6e 74 29 20 |lines #[|(count) |
|00006010| 22 c0 c1 c2 c3 0c 53 45 | c5 23 87 22 20 5b 76 69 |".....SE|.#." [vi|
|00006020| 2d 67 6f 74 6f 2d 69 6e | 73 65 72 74 2d 73 74 61 |-goto-in|sert-sta|
|00006030| 74 65 20 31 20 76 69 2d | 64 65 6c 65 74 65 2d 6f |te 1 vi-|delete-o|
|00006040| 70 20 6e 65 78 74 2d 6c | 69 6e 65 20 63 6f 75 6e |p next-l|ine coun|
|00006050| 74 20 74 5d 20 35 20 22 | 5c 0a 53 75 62 73 74 69 |t t] 5 "|\.Substi|
|00006060| 74 75 74 65 20 43 4f 55 | 4e 54 20 6c 69 6e 65 73 |tute COU|NT lines|
|00006070| 20 62 79 20 74 68 65 20 | 69 6e 70 75 74 20 63 68 | by the |input ch|
|00006080| 61 72 73 2e 20 28 3d 63 | 63 20 69 6e 20 76 69 29 |ars. (=c|c in vi)|
|00006090| 22 20 22 2a 70 22 5d 29 | 0a 28 66 73 65 74 20 27 |" "*p"])|.(fset '|
|000060a0| 76 69 2d 70 72 65 66 69 | 78 2d 63 68 61 72 2d 76 |vi-prefi|x-char-v|
|000060b0| 61 6c 75 65 20 23 5b 28 | 61 72 67 29 20 22 08 ac |alue #[(|arg) "..|
|000060c0| 82 c1 87 08 a8 ab 82 c1 | 87 08 3a ab 83 08 41 87 |........|..:...A.|
|000060d0| c1 87 22 20 5b 61 72 67 | 20 6e 69 6c 5d 20 31 20 |.." [arg| nil] 1 |
|000060e0| 22 5c 0a 47 65 74 20 74 | 68 65 20 63 68 61 72 20 |"\.Get t|he char |
|000060f0| 70 61 72 74 20 6f 66 20 | 74 68 65 20 63 75 72 72 |part of |the curr|
|00006100| 65 6e 74 20 70 72 65 66 | 69 78 20 61 72 67 75 6d |ent pref|ix argum|
|00006110| 65 6e 74 2e 22 5d 29 0a | 28 66 73 65 74 20 27 76 |ent."]).|(fset 'v|
|00006120| 69 2d 6f 70 65 72 61 74 | 6f 72 20 23 5b 28 61 72 |i-operat|or #[(ar|
|00006130| 67 29 20 22 c0 c1 8d 87 | 22 20 5b 76 69 2d 65 78 |g) "....|" [vi-ex|
|00006140| 69 74 2d 6f 70 20 28 62 | 79 74 65 2d 63 6f 64 65 |it-op (b|yte-code|
|00006150| 20 22 08 19 c2 20 10 c3 | 0c c5 08 21 5c 22 89 16 | "... ..|...!\"..|
|00006160| 06 c7 3d ac 86 0e 08 16 | 09 aa 90 c7 0e 08 21 88 |..=.....|......!.|
|00006170| c2 20 10 c3 0c c5 08 21 | 5c 22 16 06 ca 09 08 5c |. .....!|\".....\|
|00006180| 22 ab 90 cb 09 cc cd 0e | 09 21 53 ce 0e 09 21 42 |".......|.!S...!B|
|00006190| 23 aa 87 cb 09 0e 06 0e | 09 23 29 87 22 20 5b 6c |#.......|.#)." [l|
|000061a0| 61 73 74 2d 63 6f 6d 6d | 61 6e 64 2d 63 68 61 72 |ast-comm|and-char|
|000061b0| 20 74 68 69 73 2d 6f 70 | 2d 63 68 61 72 20 72 65 | this-op|-char re|
|000061c0| 61 64 2d 63 68 61 72 20 | 6c 6f 6f 6b 75 70 2d 6b |ad-char |lookup-k|
|000061d0| 65 79 20 76 69 2d 63 6f | 6d 2d 6d 61 70 20 63 68 |ey vi-co|m-map ch|
|000061e0| 61 72 2d 74 6f 2d 73 74 | 72 69 6e 67 20 74 68 69 |ar-to-st|ring thi|
|000061f0| 73 2d 63 6f 6d 6d 61 6e | 64 20 76 69 2d 64 69 67 |s-comman|d vi-dig|
|00006200| 69 74 2d 61 72 67 75 6d | 65 6e 74 20 61 72 67 20 |it-argum|ent arg |
|00006210| 70 72 65 66 69 78 2d 61 | 72 67 20 63 68 61 72 2d |prefix-a|rg char-|
|00006220| 65 71 75 61 6c 20 76 69 | 2d 65 78 65 63 75 74 65 |equal vi|-execute|
|00006230| 2d 6f 70 20 6e 65 78 74 | 2d 6c 69 6e 65 20 76 69 |-op next|-line vi|
|00006240| 2d 70 72 65 66 69 78 2d | 6e 75 6d 65 72 69 63 2d |-prefix-|numeric-|
|00006250| 76 61 6c 75 65 20 76 69 | 2d 70 72 65 66 69 78 2d |value vi|-prefix-|
|00006260| 63 68 61 72 2d 76 61 6c | 75 65 5d 20 37 29 5d 20 |char-val|ue] 7)] |
|00006270| 32 20 22 5c 0a 48 61 6e | 64 6c 69 6e 67 20 76 69 |2 "\.Han|dling vi|
|00006280| 20 6f 70 65 72 61 74 6f | 72 73 20 28 64 2f 63 2f | operato|rs (d/c/|
|00006290| 3c 2f 3e 2f 21 2f 3d 2f | 79 29 2e 20 20 43 75 72 |</>/!/=/|y). Cur|
|000062a0| 72 65 6e 74 20 69 6d 70 | 6c 65 6d 65 6e 74 61 74 |rent imp|lementat|
|000062b0| 69 6f 6e 20 72 65 71 75 | 69 72 65 73 0a 74 68 65 |ion requ|ires.the|
|000062c0| 20 6b 65 79 20 62 69 6e | 64 69 6e 67 73 20 6f 66 | key bin|dings of|
|000062d0| 20 74 68 65 20 6f 70 65 | 72 61 74 6f 72 73 20 62 | the ope|rators b|
|000062e0| 65 69 6e 67 20 66 69 78 | 65 64 2e 22 20 22 50 22 |eing fix|ed." "P"|
|000062f0| 5d 29 0a 28 66 73 65 74 | 20 27 76 69 2d 65 78 65 |]).(fset| 'vi-exe|
|00006300| 63 75 74 65 2d 6f 70 20 | 23 5b 28 6f 70 2d 63 68 |cute-op |#[(op-ch|
|00006310| 61 72 20 6d 6f 74 69 6f | 6e 2d 63 6f 6d 6d 61 6e |ar motio|n-comman|
|00006320| 64 20 61 72 67 29 20 22 | 08 c1 55 ab 8f c2 0b 0c |d arg) "|..U.....|
|00006330| 5c 22 85 9e 00 c5 c2 c6 | 0b 21 0c 23 87 08 c7 55 |\"......|.!.#...U|
|00006340| ab 91 c2 0b 0c 5c 22 ad | ff c8 c9 c2 c6 0b 21 0c |.....\".|......!.|
|00006350| 45 ca 23 87 08 cb 55 ab | 8e cc 0b 0c 5c 22 ad e9 |E.#...U.|....\"..|
|00006360| c5 cc c6 0b 21 0c 23 87 | 08 cd 55 ab 90 ce 0b 0c |....!.#.|..U.....|
|00006370| 5c 22 ad d6 c5 ce c6 0b | 21 0c 0e 0f 24 87 08 d0 |\"......|!...$...|
|00006380| 55 ab 94 d1 0b 0c 0e 12 | 5b 23 ad be c5 d1 c6 0b |U.......|[#......|
|00006390| 21 0c 0e 12 5b 24 87 08 | d3 55 ab 92 d1 0b 0c 0e |!...[$..|.U......|
|000063a0| 12 23 ad a6 c5 d1 c6 0b | 21 0c 0e 12 24 87 08 d4 |.#......|!...$...|
|000063b0| 55 ab 8e d5 0b 0c 5c 22 | ad 91 c5 d5 c6 0b 21 0c |U.....\"|......!.|
|000063c0| 23 87 08 d6 55 ad 84 d7 | 0b 0c 5c 22 87 22 20 5b |#...U...|..\"." [|
|000063d0| 6f 70 2d 63 68 61 72 20 | 31 30 30 20 76 69 2d 64 |op-char |100 vi-d|
|000063e0| 65 6c 65 74 65 2d 6f 70 | 20 6d 6f 74 69 6f 6e 2d |elete-op| motion-|
|000063f0| 63 6f 6d 6d 61 6e 64 20 | 61 72 67 20 76 69 2d 73 |command |arg vi-s|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.