home *** CD-ROM | disk | FTP | other *** search
Emacs Compiled Lisp | 1991-12-02 | 5.9 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
1%
| dexvert
| Combustion 2 Particle Library (other/combustion2ParticleLibrary)
| ext
| Unsupported |
100%
| file
| Emacs v18 byte-compiled Lisp data
| default
| |
99%
| file
| data
| default
| |
100%
| gt2
| Kopftext: '(fset (quote delete-non-matching-lines) (quote keep-lines))
| default (weak)
| |
100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
| |
100%
| xdgMime
| text/x-emacs-lisp
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0a 28 66 73 65 74 20 28 | 71 75 6f 74 65 20 64 65 |.(fset (|quote de|
|00000010| 6c 65 74 65 2d 6e 6f 6e | 2d 6d 61 74 63 68 69 6e |lete-non|-matchin|
|00000020| 67 2d 6c 69 6e 65 73 29 | 20 28 71 75 6f 74 65 20 |g-lines)| (quote |
|00000030| 6b 65 65 70 2d 6c 69 6e | 65 73 29 29 0a 0a 28 64 |keep-lin|es))..(d|
|00000040| 65 66 75 6e 20 6b 65 65 | 70 2d 6c 69 6e 65 73 20 |efun kee|p-lines |
|00000050| 28 72 65 67 65 78 70 29 | 20 22 5c 0a 44 65 6c 65 |(regexp)| "\.Dele|
|00000060| 74 65 20 61 6c 6c 20 6c | 69 6e 65 73 20 65 78 63 |te all l|ines exc|
|00000070| 65 70 74 20 74 68 6f 73 | 65 20 63 6f 6e 74 61 69 |ept thos|e contai|
|00000080| 6e 69 6e 67 20 6d 61 74 | 63 68 65 73 20 66 6f 72 |ning mat|ches for|
|00000090| 20 52 45 47 45 58 50 2e | 0a 41 20 6d 61 74 63 68 | REGEXP.|.A match|
|000000a0| 20 73 70 6c 69 74 20 61 | 63 72 6f 73 73 20 6c 69 | split a|cross li|
|000000b0| 6e 65 73 20 70 72 65 73 | 65 72 76 65 73 20 61 6c |nes pres|erves al|
|000000c0| 6c 20 74 68 65 20 6c 69 | 6e 65 73 20 69 74 20 6c |l the li|nes it l|
|000000d0| 69 65 73 20 69 6e 2e 0a | 41 70 70 6c 69 65 73 20 |ies in..|Applies |
|000000e0| 74 6f 20 61 6c 6c 20 6c | 69 6e 65 73 20 61 66 74 |to all l|ines aft|
|000000f0| 65 72 20 70 6f 69 6e 74 | 2e 22 20 28 69 6e 74 65 |er point|." (inte|
|00000100| 72 61 63 74 69 76 65 20 | 22 73 4b 65 65 70 20 6c |ractive |"sKeep l|
|00000110| 69 6e 65 73 20 28 63 6f | 6e 74 61 69 6e 69 6e 67 |ines (co|ntaining|
|00000120| 20 6d 61 74 63 68 20 66 | 6f 72 20 72 65 67 65 78 | match f|or regex|
|00000130| 70 29 3a 20 22 29 20 28 | 62 79 74 65 2d 63 6f 64 |p): ") (|byte-cod|
|00000140| 65 20 22 c2 88 8a 6e 86 | 0a 00 c4 c5 21 88 60 18 |e "...n.|....!.`.|
|00000150| 6d 3f 85 47 00 c6 09 c2 | c7 23 3f 83 5c 22 00 c8 |m?.G....|.#?.\"..|
|00000160| 08 64 5c 22 82 39 00 8a | c9 ca 21 62 88 cb 20 88 |.d\".9..|..!b.. .|
|00000170| 60 29 1b 08 0b 57 85 38 | 00 c8 08 0b 5c 22 29 88 |`)...W.8|....\").|
|00000180| 8a c4 c5 21 88 60 29 89 | 10 88 82 0d 00 29 29 87 |...!.`).|.....)).|
|00000190| 22 20 5b 73 74 61 72 74 | 20 72 65 67 65 78 70 20 |" [start| regexp |
|000001a0| 6e 69 6c 20 65 6e 64 20 | 66 6f 72 77 61 72 64 2d |nil end |forward-|
|000001b0| 6c 69 6e 65 20 31 20 72 | 65 2d 73 65 61 72 63 68 |line 1 r|e-search|
|000001c0| 2d 66 6f 72 77 61 72 64 | 20 6d 6f 76 65 20 64 65 |-forward| move de|
|000001d0| 6c 65 74 65 2d 72 65 67 | 69 6f 6e 20 6d 61 74 63 |lete-reg|ion matc|
|000001e0| 68 2d 62 65 67 69 6e 6e | 69 6e 67 20 30 20 62 65 |h-beginn|ing 0 be|
|000001f0| 67 69 6e 6e 69 6e 67 2d | 6f 66 2d 6c 69 6e 65 5d |ginning-|of-line]|
|00000200| 20 31 30 29 29 0a 0a 28 | 66 73 65 74 20 28 71 75 | 10))..(|fset (qu|
|00000210| 6f 74 65 20 64 65 6c 65 | 74 65 2d 6d 61 74 63 68 |ote dele|te-match|
|00000220| 69 6e 67 2d 6c 69 6e 65 | 73 29 20 28 71 75 6f 74 |ing-line|s) (quot|
|00000230| 65 20 66 6c 75 73 68 2d | 6c 69 6e 65 73 29 29 0a |e flush-|lines)).|
|00000240| 0a 28 64 65 66 75 6e 20 | 66 6c 75 73 68 2d 6c 69 |.(defun |flush-li|
|00000250| 6e 65 73 20 28 72 65 67 | 65 78 70 29 20 22 5c 0a |nes (reg|exp) "\.|
|00000260| 44 65 6c 65 74 65 20 6c | 69 6e 65 73 20 63 6f 6e |Delete l|ines con|
|00000270| 74 61 69 6e 69 6e 67 20 | 6d 61 74 63 68 65 73 20 |taining |matches |
|00000280| 66 6f 72 20 52 45 47 45 | 58 50 2e 0a 49 66 20 61 |for REGE|XP..If a|
|00000290| 20 6d 61 74 63 68 20 69 | 73 20 73 70 6c 69 74 20 | match i|s split |
|000002a0| 61 63 72 6f 73 73 20 6c | 69 6e 65 73 2c 20 61 6c |across l|ines, al|
|000002b0| 6c 20 74 68 65 20 6c 69 | 6e 65 73 20 69 74 20 6c |l the li|nes it l|
|000002c0| 69 65 73 20 69 6e 20 61 | 72 65 20 64 65 6c 65 74 |ies in a|re delet|
|000002d0| 65 64 2e 0a 41 70 70 6c | 69 65 73 20 74 6f 20 6c |ed..Appl|ies to l|
|000002e0| 69 6e 65 73 20 61 66 74 | 65 72 20 70 6f 69 6e 74 |ines aft|er point|
|000002f0| 2e 22 20 28 69 6e 74 65 | 72 61 63 74 69 76 65 20 |." (inte|ractive |
|00000300| 22 73 46 6c 75 73 68 20 | 6c 69 6e 65 73 20 28 63 |"sFlush |lines (c|
|00000310| 6f 6e 74 61 69 6e 69 6e | 67 20 6d 61 74 63 68 20 |ontainin|g match |
|00000320| 66 6f 72 20 72 65 67 65 | 78 70 29 3a 20 22 29 20 |for rege|xp): ") |
|00000330| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c1 88 8a 6d |(byte-co|de "...m|
|00000340| 3f 85 0d 00 c3 08 c1 c2 | 23 85 26 00 c4 8a c5 c6 |?.......|#.&.....|
|00000350| 21 62 88 c7 20 88 60 29 | c8 c9 21 88 60 5c 22 88 |!b.. .`)|..!.`\".|
|00000360| 82 03 00 29 87 22 20 5b | 72 65 67 65 78 70 20 6e |...)." [|regexp n|
|00000370| 69 6c 20 74 20 72 65 2d | 73 65 61 72 63 68 2d 66 |il t re-|search-f|
|00000380| 6f 72 77 61 72 64 20 64 | 65 6c 65 74 65 2d 72 65 |orward d|elete-re|
|00000390| 67 69 6f 6e 20 6d 61 74 | 63 68 2d 62 65 67 69 6e |gion mat|ch-begin|
|000003a0| 6e 69 6e 67 20 30 20 62 | 65 67 69 6e 6e 69 6e 67 |ning 0 b|eginning|
|000003b0| 2d 6f 66 2d 6c 69 6e 65 | 20 66 6f 72 77 61 72 64 |-of-line| forward|
|000003c0| 2d 6c 69 6e 65 20 31 5d | 20 38 29 29 0a 0a 28 66 |-line 1]| 8))..(f|
|000003d0| 73 65 74 20 28 71 75 6f | 74 65 20 63 6f 75 6e 74 |set (quo|te count|
|000003e0| 2d 6d 61 74 63 68 65 73 | 29 20 28 71 75 6f 74 65 |-matches|) (quote|
|000003f0| 20 68 6f 77 2d 6d 61 6e | 79 29 29 0a 0a 28 64 65 | how-man|y))..(de|
|00000400| 66 75 6e 20 68 6f 77 2d | 6d 61 6e 79 20 28 72 65 |fun how-|many (re|
|00000410| 67 65 78 70 29 20 22 5c | 0a 50 72 69 6e 74 20 6e |gexp) "\|.Print n|
|00000420| 75 6d 62 65 72 20 6f 66 | 20 6d 61 74 63 68 65 73 |umber of| matches|
|00000430| 20 66 6f 72 20 52 45 47 | 45 58 50 20 66 6f 6c 6c | for REG|EXP foll|
|00000440| 6f 77 69 6e 67 20 70 6f | 69 6e 74 2e 22 20 28 69 |owing po|int." (i|
|00000450| 6e 74 65 72 61 63 74 69 | 76 65 20 22 73 48 6f 77 |nteracti|ve "sHow|
|00000460| 20 6d 61 6e 79 20 6d 61 | 74 63 68 65 73 20 66 6f | many ma|tches fo|
|00000470| 72 20 28 72 65 67 65 78 | 70 29 3a 20 22 29 20 28 |r (regex|p): ") (|
|00000480| 62 79 74 65 2d 63 6f 64 | 65 20 22 c3 88 c5 c3 19 |byte-cod|e ".....|
|00000490| 18 8a 6d 3f 85 15 00 60 | 89 11 88 c6 0a c3 c4 23 |..m?...`|.......#|
|000004a0| 85 2c 00 09 60 55 83 24 | 00 c7 c8 21 82 28 00 08 |.,..`U.$|...!.(..|
|000004b0| 54 89 10 88 82 07 00 88 | c9 ca 08 5c 22 29 2a 87 |T.......|...\")*.|
|000004c0| 22 20 5b 63 6f 75 6e 74 | 20 6f 70 6f 69 6e 74 20 |" [count| opoint |
|000004d0| 72 65 67 65 78 70 20 6e | 69 6c 20 74 20 30 20 72 |regexp n|il t 0 r|
|000004e0| 65 2d 73 65 61 72 63 68 | 2d 66 6f 72 77 61 72 64 |e-search|-forward|
|000004f0| 20 66 6f 72 77 61 72 64 | 2d 63 68 61 72 20 31 20 | forward|-char 1 |
|00000500| 6d 65 73 73 61 67 65 20 | 22 25 64 20 6f 63 63 75 |message |"%d occu|
|00000510| 72 72 65 6e 63 65 73 22 | 5d 20 35 29 29 0a 0a 28 |rrences"|] 5))..(|
|00000520| 64 65 66 76 61 72 20 6f | 63 63 75 72 2d 6d 6f 64 |defvar o|ccur-mod|
|00000530| 65 2d 6d 61 70 20 6e 69 | 6c 29 0a 0a 28 69 66 20 |e-map ni|l)..(if |
|00000540| 6f 63 63 75 72 2d 6d 6f | 64 65 2d 6d 61 70 20 6e |occur-mo|de-map n|
|00000550| 69 6c 20 28 73 65 74 71 | 20 6f 63 63 75 72 2d 6d |il (setq| occur-m|
|00000560| 6f 64 65 2d 6d 61 70 20 | 28 6d 61 6b 65 2d 73 70 |ode-map |(make-sp|
|00000570| 61 72 73 65 2d 6b 65 79 | 6d 61 70 29 29 20 28 64 |arse-key|map)) (d|
|00000580| 65 66 69 6e 65 2d 6b 65 | 79 20 6f 63 63 75 72 2d |efine-ke|y occur-|
|00000590| 6d 6f 64 65 2d 6d 61 70 | 20 22 03 03 22 20 28 71 |mode-map| ".." (q|
|000005a0| 75 6f 74 65 20 6f 63 63 | 75 72 2d 6d 6f 64 65 2d |uote occ|ur-mode-|
|000005b0| 67 6f 74 6f 2d 6f 63 63 | 75 72 72 65 6e 63 65 29 |goto-occ|urrence)|
|000005c0| 29 29 0a 0a 28 64 65 66 | 76 61 72 20 6f 63 63 75 |))..(def|var occu|
|000005d0| 72 2d 62 75 66 66 65 72 | 20 6e 69 6c 29 0a 0a 28 |r-buffer| nil)..(|
|000005e0| 64 65 66 76 61 72 20 6f | 63 63 75 72 2d 6e 6c 69 |defvar o|ccur-nli|
|000005f0| 6e 65 73 20 6e 69 6c 29 | 0a 0a 28 64 65 66 76 61 |nes nil)|..(defva|
|00000600| 72 20 6f 63 63 75 72 2d | 70 6f 73 2d 6c 69 73 74 |r occur-|pos-list|
|00000610| 20 6e 69 6c 29 0a 0a 28 | 64 65 66 75 6e 20 6f 63 | nil)..(|defun oc|
|00000620| 63 75 72 2d 6d 6f 64 65 | 20 6e 69 6c 20 22 5c 0a |cur-mode| nil "\.|
|00000630| 4d 61 6a 6f 72 20 6d 6f | 64 65 20 66 6f 72 20 6f |Major mo|de for o|
|00000640| 75 74 70 75 74 20 66 72 | 6f 6d 20 5c 5c 5b 6f 63 |utput fr|om \\[oc|
|00000650| 63 75 72 5d 2e 0a 4d 6f | 76 65 20 70 6f 69 6e 74 |cur]..Mo|ve point|
|00000660| 20 74 6f 20 6f 6e 65 20 | 6f 66 20 74 68 65 20 6f | to one |of the o|
|00000670| 63 63 75 72 72 65 6e 63 | 65 73 20 69 6e 20 74 68 |ccurrenc|es in th|
|00000680| 69 73 20 62 75 66 66 65 | 72 2c 0a 74 68 65 6e 20 |is buffe|r,.then |
|00000690| 75 73 65 20 5c 5c 5b 6f | 63 63 75 72 2d 6d 6f 64 |use \\[o|ccur-mod|
|000006a0| 65 2d 67 6f 74 6f 2d 6f | 63 63 75 72 72 65 6e 63 |e-goto-o|ccurrenc|
|000006b0| 65 5d 20 74 6f 20 67 6f | 20 74 6f 20 74 68 65 20 |e] to go| to the |
|000006c0| 73 61 6d 65 20 6f 63 63 | 75 72 72 65 6e 63 65 0a |same occ|urrence.|
|000006d0| 69 6e 20 74 68 65 20 62 | 75 66 66 65 72 20 74 68 |in the b|uffer th|
|000006e0| 61 74 20 74 68 65 20 6f | 63 63 75 72 72 65 6e 63 |at the o|ccurrenc|
|000006f0| 65 73 20 77 65 72 65 20 | 66 6f 75 6e 64 20 69 6e |es were |found in|
|00000700| 2e 0a 5c 5c 7b 6f 63 63 | 75 72 2d 6d 6f 64 65 2d |..\\{occ|ur-mode-|
|00000710| 6d 61 70 7d 22 20 28 62 | 79 74 65 2d 63 6f 64 65 |map}" (b|yte-code|
|00000720| 20 22 c3 20 88 c4 08 21 | 88 c5 89 11 88 c6 89 12 | ". ...!|........|
|00000730| 88 c7 c8 21 88 c7 c9 21 | 88 c7 ca 21 87 22 20 5b |...!...!|...!." [|
|00000740| 6f 63 63 75 72 2d 6d 6f | 64 65 2d 6d 61 70 20 6d |occur-mo|de-map m|
|00000750| 61 6a 6f 72 2d 6d 6f 64 | 65 20 6d 6f 64 65 2d 6e |ajor-mod|e mode-n|
|00000760| 61 6d 65 20 6b 69 6c 6c | 2d 61 6c 6c 2d 6c 6f 63 |ame kill|-all-loc|
|00000770| 61 6c 2d 76 61 72 69 61 | 62 6c 65 73 20 75 73 65 |al-varia|bles use|
|00000780| 2d 6c 6f 63 61 6c 2d 6d | 61 70 20 6f 63 63 75 72 |-local-m|ap occur|
|00000790| 2d 6d 6f 64 65 20 22 4f | 63 63 75 72 22 20 6d 61 |-mode "O|ccur" ma|
|000007a0| 6b 65 2d 6c 6f 63 61 6c | 2d 76 61 72 69 61 62 6c |ke-local|-variabl|
|000007b0| 65 20 6f 63 63 75 72 2d | 62 75 66 66 65 72 20 6f |e occur-|buffer o|
|000007c0| 63 63 75 72 2d 6e 6c 69 | 6e 65 73 20 6f 63 63 75 |ccur-nli|nes occu|
|000007d0| 72 2d 70 6f 73 2d 6c 69 | 73 74 5d 20 36 29 29 0a |r-pos-li|st] 6)).|
|000007e0| 0a 28 64 65 66 75 6e 20 | 6f 63 63 75 72 2d 6d 6f |.(defun |occur-mo|
|000007f0| 64 65 2d 67 6f 74 6f 2d | 6f 63 63 75 72 72 65 6e |de-goto-|occurren|
|00000800| 63 65 20 6e 69 6c 20 22 | 5c 0a 47 6f 20 74 6f 20 |ce nil "|\.Go to |
|00000810| 74 68 65 20 6c 69 6e 65 | 20 74 68 69 73 20 6f 63 |the line| this oc|
|00000820| 63 75 72 72 65 6e 63 65 | 20 77 61 73 20 66 6f 75 |currence| was fou|
|00000830| 6e 64 20 69 6e 2c 20 69 | 6e 20 74 68 65 20 62 75 |nd in, i|n the bu|
|00000840| 66 66 65 72 20 69 74 20 | 77 61 73 20 66 6f 75 6e |ffer it |was foun|
|00000850| 64 20 69 6e 2e 22 20 28 | 69 6e 74 65 72 61 63 74 |d in." (|interact|
|00000860| 69 76 65 29 20 28 62 79 | 74 65 2d 63 6f 64 65 20 |ive) (by|te-code |
|00000870| 22 c1 88 08 3f 86 0b 00 | c7 08 21 3f 85 17 00 c1 |"...?...|..!?....|
|00000880| 10 c1 89 12 88 c8 c9 21 | 88 8a ca 20 88 cb cc 65 |.......!|... ...e|
|00000890| 60 5c 22 53 0c cd 57 83 | 2e 00 ce 0c 5a 82 3e 00 |`\"S..W.|....Z.>.|
|000008a0| 0c cd 56 83 3d 00 ce cf | ce 0c 5c 22 5c 5c 82 3e |..V.=...|..\"\\.>|
|000008b0| 00 d0 5c 22 29 1b 0b 0a | 38 1e 06 d1 08 21 88 d2 |..\")...|8....!..|
|000008c0| 0e 06 21 62 2a 87 22 20 | 5b 6f 63 63 75 72 2d 62 |..!b*." |[occur-b|
|000008d0| 75 66 66 65 72 20 6e 69 | 6c 20 6f 63 63 75 72 2d |uffer ni|l occur-|
|000008e0| 70 6f 73 2d 6c 69 73 74 | 20 6f 63 63 75 72 2d 6e |pos-list| occur-n|
|000008f0| 75 6d 62 65 72 20 6f 63 | 63 75 72 2d 6e 6c 69 6e |umber oc|cur-nlin|
|00000900| 65 73 20 74 20 70 6f 73 | 20 62 75 66 66 65 72 2d |es t pos| buffer-|
|00000910| 6e 61 6d 65 20 65 72 72 | 6f 72 20 22 42 75 66 66 |name err|or "Buff|
|00000920| 65 72 20 69 6e 20 77 68 | 69 63 68 20 6f 63 63 75 |er in wh|ich occu|
|00000930| 72 65 6e 63 65 73 20 77 | 65 72 65 20 66 6f 75 6e |rences w|ere foun|
|00000940| 64 20 69 73 20 64 65 6c | 65 74 65 64 2e 22 20 62 |d is del|eted." b|
|00000950| 65 67 69 6e 6e 69 6e 67 | 2d 6f 66 2d 6c 69 6e 65 |eginning|-of-line|
|00000960| 20 2f 20 63 6f 75 6e 74 | 2d 6c 69 6e 65 73 20 30 | / count|-lines 0|
|00000970| 20 32 20 2a 20 31 20 70 | 6f 70 2d 74 6f 2d 62 75 | 2 * 1 p|op-to-bu|
|00000980| 66 66 65 72 20 6d 61 72 | 6b 65 72 2d 70 6f 73 69 |ffer mar|ker-posi|
|00000990| 74 69 6f 6e 5d 20 31 30 | 29 29 0a 0a 28 64 65 66 |tion] 10|))..(def|
|000009a0| 76 61 72 20 6c 69 73 74 | 2d 6d 61 74 63 68 69 6e |var list|-matchin|
|000009b0| 67 2d 6c 69 6e 65 73 2d | 64 65 66 61 75 6c 74 2d |g-lines-|default-|
|000009c0| 63 6f 6e 74 65 78 74 2d | 6c 69 6e 65 73 20 30 20 |context-|lines 0 |
|000009d0| 22 5c 0a 2a 44 65 66 61 | 75 6c 74 20 6e 75 6d 62 |"\.*Defa|ult numb|
|000009e0| 65 72 20 6f 66 20 63 6f | 6e 74 65 78 74 20 6c 69 |er of co|ntext li|
|000009f0| 6e 65 73 20 74 6f 20 69 | 6e 63 6c 75 64 65 20 61 |nes to i|nclude a|
|00000a00| 72 6f 75 6e 64 20 61 20 | 6c 69 73 74 2d 6d 61 74 |round a |list-mat|
|00000a10| 63 68 69 6e 67 2d 6c 69 | 6e 65 73 0a 6d 61 74 63 |ching-li|nes.matc|
|00000a20| 68 2e 20 20 41 20 6e 65 | 67 61 74 69 76 65 20 6e |h. A ne|gative n|
|00000a30| 75 6d 62 65 72 20 6d 65 | 61 6e 73 20 74 6f 20 69 |umber me|ans to i|
|00000a40| 6e 63 6c 75 64 65 20 74 | 68 61 74 20 6d 61 6e 79 |nclude t|hat many|
|00000a50| 20 6c 69 6e 65 73 20 62 | 65 66 6f 72 65 20 74 68 | lines b|efore th|
|00000a60| 65 20 6d 61 74 63 68 2e | 0a 41 20 70 6f 73 69 74 |e match.|.A posit|
|00000a70| 69 76 65 20 6e 75 6d 62 | 65 72 20 6d 65 61 6e 73 |ive numb|er means|
|00000a80| 20 74 6f 20 69 6e 63 6c | 75 64 65 20 74 68 61 74 | to incl|ude that|
|00000a90| 20 6d 61 6e 79 20 6c 69 | 6e 65 73 20 62 6f 74 68 | many li|nes both|
|00000aa0| 20 62 65 66 6f 72 65 20 | 61 6e 64 20 61 66 74 65 | before |and afte|
|00000ab0| 72 2e 22 29 0a 0a 28 66 | 73 65 74 20 28 71 75 6f |r.")..(f|set (quo|
|00000ac0| 74 65 20 6c 69 73 74 2d | 6d 61 74 63 68 69 6e 67 |te list-|matching|
|00000ad0| 2d 6c 69 6e 65 73 29 20 | 28 71 75 6f 74 65 20 6f |-lines) |(quote o|
|00000ae0| 63 63 75 72 29 29 0a 0a | 28 64 65 66 75 6e 20 6f |ccur))..|(defun o|
|00000af0| 63 63 75 72 20 28 72 65 | 67 65 78 70 20 26 6f 70 |ccur (re|gexp &op|
|00000b00| 74 69 6f 6e 61 6c 20 6e | 6c 69 6e 65 73 29 20 22 |tional n|lines) "|
|00000b10| 5c 0a 53 68 6f 77 20 61 | 6c 6c 20 6c 69 6e 65 73 |\.Show a|ll lines|
|00000b20| 20 66 6f 6c 6c 6f 77 69 | 6e 67 20 70 6f 69 6e 74 | followi|ng point|
|00000b30| 20 63 6f 6e 74 61 69 6e | 69 6e 67 20 61 20 6d 61 | contain|ing a ma|
|00000b40| 74 63 68 20 66 6f 72 20 | 52 45 47 45 58 50 2e 0a |tch for |REGEXP..|
|00000b50| 44 69 73 70 6c 61 79 20 | 65 61 63 68 20 6c 69 6e |Display |each lin|
|00000b60| 65 20 77 69 74 68 20 4e | 4c 49 4e 45 53 20 6c 69 |e with N|LINES li|
|00000b70| 6e 65 73 20 62 65 66 6f | 72 65 20 61 6e 64 20 61 |nes befo|re and a|
|00000b80| 66 74 65 72 2c 0a 20 6f | 72 20 2d 4e 4c 49 4e 45 |fter,. o|r -NLINE|
|00000b90| 53 20 62 65 66 6f 72 65 | 20 69 66 20 4e 4c 49 4e |S before| if NLIN|
|00000ba0| 45 53 20 69 73 20 6e 65 | 67 61 74 69 76 65 2e 0a |ES is ne|gative..|
|00000bb0| 4e 4c 49 4e 45 53 20 64 | 65 66 61 75 6c 74 73 20 |NLINES d|efaults |
|00000bc0| 74 6f 20 6c 69 73 74 2d | 6d 61 74 63 68 69 6e 67 |to list-|matching|
|00000bd0| 2d 6c 69 6e 65 73 2d 64 | 65 66 61 75 6c 74 2d 63 |-lines-d|efault-c|
|00000be0| 6f 6e 74 65 78 74 2d 6c | 69 6e 65 73 2e 0a 49 6e |ontext-l|ines..In|
|00000bf0| 74 65 72 61 63 74 69 76 | 65 6c 79 20 69 74 20 69 |teractiv|ely it i|
|00000c00| 73 20 74 68 65 20 70 72 | 65 66 69 78 20 61 72 67 |s the pr|efix arg|
|00000c10| 2e 0a 0a 54 68 65 20 6c | 69 6e 65 73 20 61 72 65 |...The l|ines are|
|00000c20| 20 73 68 6f 77 6e 20 69 | 6e 20 61 20 62 75 66 66 | shown i|n a buff|
|00000c30| 65 72 20 6e 61 6d 65 64 | 20 2a 4f 63 63 75 72 2a |er named| *Occur*|
|00000c40| 2e 0a 49 74 20 73 65 72 | 76 65 73 20 61 73 20 61 |..It ser|ves as a|
|00000c50| 20 6d 65 6e 75 20 74 6f | 20 66 69 6e 64 20 61 6e | menu to| find an|
|00000c60| 79 20 6f 66 20 74 68 65 | 20 6f 63 63 75 72 72 65 |y of the| occurre|
|00000c70| 6e 63 65 73 20 69 6e 20 | 74 68 69 73 20 62 75 66 |nces in |this buf|
|00000c80| 66 65 72 2e 0a 5c 5c 5b | 64 65 73 63 72 69 62 65 |fer..\\[|describe|
|00000c90| 2d 6d 6f 64 65 5d 20 69 | 6e 20 74 68 61 74 20 62 |-mode] i|n that b|
|00000ca0| 75 66 66 65 72 20 77 69 | 6c 6c 20 65 78 70 6c 61 |uffer wi|ll expla|
|00000cb0| 69 6e 20 68 6f 77 2e 22 | 20 28 69 6e 74 65 72 61 |in how."| (intera|
|00000cc0| 63 74 69 76 65 20 22 73 | 4c 69 73 74 20 6c 69 6e |ctive "s|List lin|
|00000cd0| 65 73 20 6d 61 74 63 68 | 69 6e 67 20 72 65 67 65 |es match|ing rege|
|00000ce0| 78 70 3a 20 0a 50 22 29 | 20 28 62 79 74 65 2d 63 |xp: .P")| (byte-c|
|00000cf0| 6f 64 65 20 22 cc 88 08 | 83 0c 00 d2 08 21 82 0d |ode "...|.....!..|
|00000d00| 00 09 89 10 88 c3 70 cc | cc 1e 06 1d 1c 1a 8a d3 |......p.|........|
|00000d10| 20 88 d4 65 60 5c 22 54 | 89 15 88 60 89 16 06 29 | ..e`\"T|...`...)|
|00000d20| 88 d5 90 8a 0e 07 71 88 | d6 63 88 d7 0e 08 21 88 |......q.|.c....!.|
|00000d30| d8 d9 da 0c 21 db dc 24 | 88 dd 20 88 0c 89 16 09 |....!..$|.. .....|
|00000d40| 88 08 89 16 0a 88 cc 89 | 16 0b 29 88 0c 0e 07 3d |........|..)....=|
|00000d50| 85 5f 00 64 62 88 8a 0e | 06 64 55 3f 85 6f 00 de |._.db...|.dU?.o..|
|00000d60| 0e 08 cc c3 23 85 58 01 | d3 df 21 88 8a 0d d4 0e |....#.X.|..!.....|
|00000d70| 06 60 5c 22 5c 5c 89 15 | 88 60 89 16 06 29 88 8a |.`\"\\..|.`...)..|
|00000d80| e0 08 e1 57 83 93 00 08 | 82 95 00 08 5b 21 88 60 |...W....|....[!.`|
|00000d90| 29 1e 0d 8a 08 e1 56 83 | a9 00 e0 08 54 21 82 ac |).....V.|....T!..|
|00000da0| 00 e0 df 21 88 60 29 1e | 0e e2 e3 0d 5c 22 1e 0f |...!.`).|....\"..|
|00000db0| e4 0e 0f 47 e5 5c 22 1e | 10 cc 1e 11 8a e6 20 89 |...G.\".|...... .|
|00000dc0| 16 11 88 e7 0e 11 60 5c | 22 88 0e 07 71 88 0e 11 |......`\|"...q...|
|00000dd0| 0e 0b 42 89 16 0b 88 0a | 86 e8 00 e8 08 21 86 e8 |..B.....|.....!..|
|00000de0| 00 e9 63 88 cc 89 12 88 | ea 0c 0e 0d 0e 0e 23 88 |..c.....|......#.|
|00000df0| eb 0e 0e 0e 0d 5a 21 88 | 08 e1 57 83 08 01 08 5b |.....Z!.|..W....[|
|00000e00| 82 09 01 08 89 16 11 88 | 0e 11 e1 56 85 28 01 d8 |........|...V.(..|
|00000e10| 0e 10 ec 5c 22 88 e0 df | 21 88 0e 11 53 89 16 11 |...\"...|!...S...|
|00000e20| 88 82 0d 01 88 d8 0e 0f | ec 5c 22 88 e0 df 21 88 |........|.\"...!.|
|00000e30| 0e 11 08 57 85 4e 01 d8 | 0e 10 ec 5c 22 88 e0 df |...W.N..|...\"...|
|00000e40| 21 88 0e 11 54 89 16 11 | 88 82 33 01 29 88 e0 df |!...T...|..3.)...|
|00000e50| 21 2d 88 82 61 00 88 0e | 07 71 88 ed 0e 0b 21 89 |!-..a...|.q....!.|
|00000e60| 16 0b 88 74 85 6f 01 ee | ef 0e 0b 47 5c 22 29 91 |...t.o..|...G\").|
|00000e70| 2c 87 22 20 5b 6e 6c 69 | 6e 65 73 20 6c 69 73 74 |,." [nli|nes list|
|00000e80| 2d 6d 61 74 63 68 69 6e | 67 2d 6c 69 6e 65 73 2d |-matchin|g-lines-|
|00000e90| 64 65 66 61 75 6c 74 2d | 63 6f 6e 74 65 78 74 2d |default-|context-|
|00000ea0| 6c 69 6e 65 73 20 66 69 | 72 73 74 20 74 20 62 75 |lines fi|rst t bu|
|00000eb0| 66 66 65 72 20 6c 69 6e | 65 6e 75 6d 20 70 72 65 |ffer lin|enum pre|
|00000ec0| 76 70 6f 73 20 73 74 61 | 6e 64 61 72 64 2d 6f 75 |vpos sta|ndard-ou|
|00000ed0| 74 70 75 74 20 72 65 67 | 65 78 70 20 6f 63 63 75 |tput reg|exp occu|
|00000ee0| 72 2d 62 75 66 66 65 72 | 20 6f 63 63 75 72 2d 6e |r-buffer| occur-n|
|00000ef0| 6c 69 6e 65 73 20 6f 63 | 63 75 72 2d 70 6f 73 2d |lines oc|cur-pos-|
|00000f00| 6c 69 73 74 20 6e 69 6c | 20 73 74 61 72 74 20 65 |list nil| start e|
|00000f10| 6e 64 20 74 61 67 20 65 | 6d 70 74 79 20 74 65 6d |nd tag e|mpty tem|
|00000f20| 20 70 72 65 66 69 78 2d | 6e 75 6d 65 72 69 63 2d | prefix-|numeric-|
|00000f30| 76 61 6c 75 65 20 62 65 | 67 69 6e 6e 69 6e 67 2d |value be|ginning-|
|00000f40| 6f 66 2d 6c 69 6e 65 20 | 63 6f 75 6e 74 2d 6c 69 |of-line |count-li|
|00000f50| 6e 65 73 20 22 2a 4f 63 | 63 75 72 2a 22 20 22 4c |nes "*Oc|cur*" "L|
|00000f60| 69 6e 65 73 20 6d 61 74 | 63 68 69 6e 67 20 22 20 |ines mat|ching " |
|00000f70| 70 72 69 6e 31 20 69 6e | 73 65 72 74 20 22 20 69 |prin1 in|sert " i|
|00000f80| 6e 20 62 75 66 66 65 72 | 20 22 20 62 75 66 66 65 |n buffer| " buffe|
|00000f90| 72 2d 6e 61 6d 65 20 34 | 36 20 31 30 20 6f 63 63 |r-name 4|6 10 occ|
|00000fa0| 75 72 2d 6d 6f 64 65 20 | 72 65 2d 73 65 61 72 63 |ur-mode |re-searc|
|00000fb0| 68 2d 66 6f 72 77 61 72 | 64 20 31 20 66 6f 72 77 |h-forwar|d 1 forw|
|00000fc0| 61 72 64 2d 6c 69 6e 65 | 20 30 20 66 6f 72 6d 61 |ard-line| 0 forma|
|00000fd0| 74 20 22 25 33 64 22 20 | 6d 61 6b 65 2d 73 74 72 |t "%3d" |make-str|
|00000fe0| 69 6e 67 20 33 32 20 6d | 61 6b 65 2d 6d 61 72 6b |ing 32 m|ake-mark|
|00000ff0| 65 72 20 73 65 74 2d 6d | 61 72 6b 65 72 20 7a 65 |er set-m|arker ze|
|00001000| 72 6f 70 20 22 2d 2d 2d | 2d 2d 2d 2d 2d 0a 22 20 |rop "---|-----." |
|00001010| 69 6e 73 65 72 74 2d 62 | 75 66 66 65 72 2d 73 75 |insert-b|uffer-su|
|00001020| 62 73 74 72 69 6e 67 20 | 62 61 63 6b 77 61 72 64 |bstring |backward|
|00001030| 2d 63 68 61 72 20 35 38 | 20 6e 72 65 76 65 72 73 |-char 58| nrevers|
|00001040| 65 20 6d 65 73 73 61 67 | 65 20 22 25 64 20 6d 61 |e messag|e "%d ma|
|00001050| 74 63 68 69 6e 67 20 6c | 69 6e 65 73 2e 22 5d 20 |tching l|ines."] |
|00001060| 33 32 29 29 0a 0a 28 64 | 65 66 63 6f 6e 73 74 20 |32))..(d|efconst |
|00001070| 71 75 65 72 79 2d 72 65 | 70 6c 61 63 65 2d 68 65 |query-re|place-he|
|00001080| 6c 70 20 22 54 79 70 65 | 20 53 70 61 63 65 20 6f |lp "Type| Space o|
|00001090| 72 20 60 79 27 20 74 6f | 20 72 65 70 6c 61 63 65 |r `y' to| replace|
|000010a0| 20 6f 6e 65 20 6d 61 74 | 63 68 2c 20 44 65 6c 65 | one mat|ch, Dele|
|000010b0| 74 65 20 6f 72 20 60 6e | 27 20 74 6f 20 73 6b 69 |te or `n|' to ski|
|000010c0| 70 20 74 6f 20 6e 65 78 | 74 2c 0a 45 53 43 20 6f |p to nex|t,.ESC o|
|000010d0| 72 20 60 71 27 20 74 6f | 20 65 78 69 74 2c 20 50 |r `q' to| exit, P|
|000010e0| 65 72 69 6f 64 20 74 6f | 20 72 65 70 6c 61 63 65 |eriod to| replace|
|000010f0| 20 6f 6e 65 20 6d 61 74 | 63 68 20 61 6e 64 20 65 | one mat|ch and e|
|00001100| 78 69 74 2c 0a 43 6f 6d | 6d 61 20 74 6f 20 72 65 |xit,.Com|ma to re|
|00001110| 70 6c 61 63 65 20 62 75 | 74 20 6e 6f 74 20 6d 6f |place bu|t not mo|
|00001120| 76 65 20 70 6f 69 6e 74 | 20 69 6d 6d 65 64 69 61 |ve point| immedia|
|00001130| 74 65 6c 79 2c 0a 43 2d | 72 20 74 6f 20 65 6e 74 |tely,.C-|r to ent|
|00001140| 65 72 20 72 65 63 75 72 | 73 69 76 65 20 65 64 69 |er recur|sive edi|
|00001150| 74 20 28 5c 5c 5b 65 78 | 69 74 2d 72 65 63 75 72 |t (\\[ex|it-recur|
|00001160| 73 69 76 65 2d 65 64 69 | 74 5d 20 74 6f 20 67 65 |sive-edi|t] to ge|
|00001170| 74 20 6f 75 74 20 61 67 | 61 69 6e 29 2c 0a 43 2d |t out ag|ain),.C-|
|00001180| 77 20 74 6f 20 64 65 6c | 65 74 65 20 6d 61 74 63 |w to del|ete matc|
|00001190| 68 20 61 6e 64 20 72 65 | 63 75 72 73 69 76 65 20 |h and re|cursive |
|000011a0| 65 64 69 74 2c 0a 43 2d | 6c 20 74 6f 20 63 6c 65 |edit,.C-|l to cle|
|000011b0| 61 72 20 74 68 65 20 73 | 63 72 65 65 6e 2c 20 72 |ar the s|creen, r|
|000011c0| 65 64 69 73 70 6c 61 79 | 2c 20 61 6e 64 20 6f 66 |edisplay|, and of|
|000011d0| 66 65 72 20 73 61 6d 65 | 20 72 65 70 6c 61 63 65 |fer same| replace|
|000011e0| 6d 65 6e 74 20 61 67 61 | 69 6e 2c 0a 21 20 74 6f |ment aga|in,.! to|
|000011f0| 20 72 65 70 6c 61 63 65 | 20 61 6c 6c 20 72 65 6d | replace| all rem|
|00001200| 61 69 6e 69 6e 67 20 6d | 61 74 63 68 65 73 20 77 |aining m|atches w|
|00001210| 69 74 68 20 6e 6f 20 6d | 6f 72 65 20 71 75 65 73 |ith no m|ore ques|
|00001220| 74 69 6f 6e 73 2c 0a 5e | 20 74 6f 20 6d 6f 76 65 |tions,.^| to move|
|00001230| 20 70 6f 69 6e 74 20 62 | 61 63 6b 20 74 6f 20 70 | point b|ack to p|
|00001240| 72 65 76 69 6f 75 73 20 | 6d 61 74 63 68 2e 22 20 |revious |match." |
|00001250| 22 48 65 6c 70 20 6d 65 | 73 73 61 67 65 20 77 68 |"Help me|ssage wh|
|00001260| 69 6c 65 20 69 6e 20 71 | 75 65 72 79 2d 72 65 70 |ile in q|uery-rep|
|00001270| 6c 61 63 65 22 29 0a 0a | 28 64 65 66 75 6e 20 70 |lace")..|(defun p|
|00001280| 65 72 66 6f 72 6d 2d 72 | 65 70 6c 61 63 65 20 28 |erform-r|eplace (|
|00001290| 66 72 6f 6d 2d 73 74 72 | 69 6e 67 20 74 6f 2d 73 |from-str|ing to-s|
|000012a0| 74 72 69 6e 67 20 71 75 | 65 72 79 2d 66 6c 61 67 |tring qu|ery-flag|
|000012b0| 20 72 65 67 65 78 70 2d | 66 6c 61 67 20 64 65 6c | regexp-|flag del|
|000012c0| 69 6d 69 74 65 64 2d 66 | 6c 61 67 29 20 28 62 79 |imited-f|lag) (by|
|000012d0| 74 65 2d 63 6f 64 65 20 | 22 09 85 0e 00 0a 85 0e |te-code |".......|
|000012e0| 00 d6 0b d7 0b 21 5c 22 | 3f 0d 3f 0d 83 19 00 d8 |.....!\"|?.?.....|
|000012f0| 82 1a 00 d9 0b c9 cb 1e | 0a 1e 08 1e 07 1e 06 1c |........|........|
|00001300| 18 0e 0c 85 40 00 d8 16 | 06 da 0d 83 38 00 0b 82 |....@...|....8...|
|00001310| 3b 00 db 0b 21 da 51 89 | 16 07 88 dc 20 88 dc 20 |;...!.Q.|.... .. |
|00001320| 88 0e 08 85 5d 00 6d 3f | 85 5d 00 dd 60 21 88 de |....].m?|.]..`!..|
|00001330| 0e 06 0e 07 cb c9 24 85 | de 01 0e 0a 60 3d 83 6d |......$.|....`=.m|
|00001340| 00 df e0 21 82 da 01 e1 | 20 88 0e 0d 3f 83 7f 00 |...!....| ...?...|
|00001350| e2 0e 0e 08 0c 23 82 d5 | 01 cb cb 1e 10 1e 0f 0e |.....#..|........|
|00001360| 0f 3f 85 d4 01 e3 20 e4 | 1e 12 1e 11 0e 14 89 16 |.?.... .|........|
|00001370| 13 88 0e 13 0e 14 55 85 | c0 00 e5 e6 0b 0e 0e 23 |......U.|.......#|
|00001380| 88 72 89 16 13 88 0e 13 | e7 55 85 bc 00 0e 14 16 |.r......|.U......|
|00001390| 15 0e 14 89 16 13 88 82 | 98 00 88 e8 0e 11 21 2a |........|......!*|
|000013a0| 88 0e 13 e9 55 86 d2 00 | 0e 13 ea 55 83 e1 00 cb |....U...|...U....|
|000013b0| 89 16 08 88 c9 89 16 0f | 82 d0 01 0e 13 eb 55 83 |........|......U.|
|000013c0| f3 00 ec 20 62 88 c9 89 | 16 10 82 d0 01 0e 13 ed |... b...|........|
|000013d0| 55 86 fe 00 0e 13 ee 55 | 83 14 01 0e 10 86 0c 01 |U......U|........|
|000013e0| e2 0e 0e 08 0c 23 88 c9 | 89 16 0f 82 d0 01 0e 13 |.....#..|........|
|000013f0| ef 55 83 33 01 0e 10 86 | 26 01 e2 0e 0e 08 0c 23 |.U.3....|&......#|
|00001400| 88 cb 89 16 08 88 c9 89 | 16 0f 82 d0 01 0e 13 f0 |........|........|
|00001410| 55 83 4e 01 0e 10 3f 85 | 4b 01 e2 0e 0e 08 0c 23 |U.N...?.|K......#|
|00001420| 88 c9 89 16 10 82 d0 01 | 0e 13 f1 55 83 6b 01 0e |........|...U.k..|
|00001430| 10 86 60 01 e2 0e 0e 08 | 0c 23 88 c9 16 0f cb 89 |..`.....|.#......|
|00001440| 16 0d 82 d0 01 0e 13 f2 | 55 86 76 01 0e 13 f3 55 |........|U.v....U|
|00001450| 83 80 01 c9 89 16 0f 82 | d0 01 0e 13 f4 55 83 8d |........|.....U..|
|00001460| 01 f5 cb 21 82 d0 01 0e | 13 f6 55 83 a0 01 e8 e3 |...!....|..U.....|
|00001470| 20 8a f7 20 29 88 21 82 | d0 01 0e 13 f8 55 83 c1 | .. ).!.|.....U..|
|00001480| 01 f9 fa fb 21 fc fb 21 | 5c 22 88 e8 e3 20 8a f7 |....!..!|\"... ..|
|00001490| 20 29 88 21 88 c9 89 16 | 10 82 d0 01 cb 89 16 08 | ).!....|........|
|000014a0| 88 0e 13 89 16 15 88 c9 | 89 16 0f 88 82 85 00 2a |........|.......*|
|000014b0| 88 60 89 16 0a 88 82 47 | 00 88 fd 20 88 0e 08 2e |.`.....G|... ....|
|000014c0| 06 87 22 20 5b 6e 6f 63 | 61 73 69 66 79 20 63 61 |.." [noc|asify ca|
|000014d0| 73 65 2d 66 6f 6c 64 2d | 73 65 61 72 63 68 20 63 |se-fold-|search c|
|000014e0| 61 73 65 2d 72 65 70 6c | 61 63 65 20 66 72 6f 6d |ase-repl|ace from|
|000014f0| 2d 73 74 72 69 6e 67 20 | 6c 69 74 65 72 61 6c 20 |-string |literal |
|00001500| 72 65 67 65 78 70 2d 66 | 6c 61 67 20 73 65 61 72 |regexp-f|lag sear|
|00001510| 63 68 2d 66 75 6e 63 74 | 69 6f 6e 20 73 65 61 72 |ch-funct|ion sear|
|00001520| 63 68 2d 73 74 72 69 6e | 67 20 6b 65 65 70 2d 67 |ch-strin|g keep-g|
|00001530| 6f 69 6e 67 20 74 20 6c | 61 73 74 72 65 70 6c 20 |oing t l|astrepl |
|00001540| 6e 69 6c 20 64 65 6c 69 | 6d 69 74 65 64 2d 66 6c |nil deli|mited-fl|
|00001550| 61 67 20 71 75 65 72 79 | 2d 66 6c 61 67 20 74 6f |ag query|-flag to|
|00001560| 2d 73 74 72 69 6e 67 20 | 64 6f 6e 65 20 72 65 70 |-string |done rep|
|00001570| 6c 61 63 65 64 20 64 61 | 74 61 20 68 65 6c 70 2d |laced da|ta help-|
|00001580| 66 6f 72 6d 20 63 68 61 | 72 20 68 65 6c 70 2d 63 |form cha|r help-c|
|00001590| 68 61 72 20 75 6e 72 65 | 61 64 2d 63 6f 6d 6d 61 |har unre|ad-comma|
|000015a0| 6e 64 2d 63 68 61 72 20 | 73 74 72 69 6e 67 2d 65 |nd-char |string-e|
|000015b0| 71 75 61 6c 20 64 6f 77 | 6e 63 61 73 65 20 72 65 |qual dow|ncase re|
|000015c0| 2d 73 65 61 72 63 68 2d | 66 6f 72 77 61 72 64 20 |-search-|forward |
|000015d0| 73 65 61 72 63 68 2d 66 | 6f 72 77 61 72 64 20 22 |search-f|orward "|
|000015e0| 5c 5c 62 22 20 72 65 67 | 65 78 70 2d 71 75 6f 74 |\\b" reg|exp-quot|
|000015f0| 65 20 70 75 73 68 2d 6d | 61 72 6b 20 73 65 74 2d |e push-m|ark set-|
|00001600| 6d 61 72 6b 20 66 75 6e | 63 61 6c 6c 20 66 6f 72 |mark fun|call for|
|00001610| 77 61 72 64 2d 63 68 61 | 72 20 31 20 75 6e 64 6f |ward-cha|r 1 undo|
|00001620| 2d 62 6f 75 6e 64 61 72 | 79 20 72 65 70 6c 61 63 |-boundar|y replac|
|00001630| 65 2d 6d 61 74 63 68 20 | 6d 61 74 63 68 2d 64 61 |e-match |match-da|
|00001640| 74 61 20 28 63 6f 6e 63 | 61 74 20 22 51 75 65 72 |ta (conc|at "Quer|
|00001650| 79 20 72 65 70 6c 61 63 | 69 6e 67 20 22 20 28 69 |y replac|ing " (i|
|00001660| 66 20 72 65 67 65 78 70 | 2d 66 6c 61 67 20 22 72 |f regexp|-flag "r|
|00001670| 65 67 65 78 70 20 22 20 | 22 22 29 20 66 72 6f 6d |egexp " |"") from|
|00001680| 2d 73 74 72 69 6e 67 20 | 22 20 77 69 74 68 20 22 |-string |" with "|
|00001690| 20 74 6f 2d 73 74 72 69 | 6e 67 20 22 2e 0a 0a 22 | to-stri|ng "..."|
|000016a0| 20 28 73 75 62 73 74 69 | 74 75 74 65 2d 63 6f 6d | (substi|tute-com|
|000016b0| 6d 61 6e 64 2d 6b 65 79 | 73 20 71 75 65 72 79 2d |mand-key|s query-|
|000016c0| 72 65 70 6c 61 63 65 2d | 68 65 6c 70 29 29 20 6d |replace-|help)) m|
|000016d0| 65 73 73 61 67 65 20 22 | 51 75 65 72 79 20 72 65 |essage "|Query re|
|000016e0| 70 6c 61 63 69 6e 67 20 | 25 73 20 77 69 74 68 20 |placing |%s with |
|000016f0| 25 73 3a 20 22 20 36 33 | 20 73 74 6f 72 65 2d 6d |%s: " 63| store-m|
|00001700| 61 74 63 68 2d 64 61 74 | 61 20 32 37 20 31 31 33 |atch-dat|a 27 113|
|00001710| 20 39 34 20 6d 61 72 6b | 20 33 32 20 31 32 31 20 | 94 mark| 32 121 |
|00001720| 34 36 20 34 34 20 33 33 | 20 31 32 37 20 31 31 30 |46 44 33| 127 110|
|00001730| 20 31 32 20 72 65 63 65 | 6e 74 65 72 20 31 38 20 | 12 rece|nter 18 |
|00001740| 72 65 63 75 72 73 69 76 | 65 2d 65 64 69 74 20 32 |recursiv|e-edit 2|
|00001750| 33 20 64 65 6c 65 74 65 | 2d 72 65 67 69 6f 6e 20 |3 delete|-region |
|00001760| 6d 61 74 63 68 2d 62 65 | 67 69 6e 6e 69 6e 67 20 |match-be|ginning |
|00001770| 30 20 6d 61 74 63 68 2d | 65 6e 64 20 70 6f 70 2d |0 match-|end pop-|
|00001780| 6d 61 72 6b 5d 20 33 32 | 29 29 0a |mark] 32|)). |
+--------+-------------------------+-------------------------+--------+--------+