home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1991-01-10 | 739 b |
view JSON data
|
view as text
|
open on a Mac
|
open on a PC
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 |
| 100%
| file
| Emacs v18 byte-compiled Lisp data
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| gt2
| Kopftext: '(defun underline-region (start end) '
| default (weak)
| |
| 100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0a 28 64 65 66 75 6e 20 | 75 6e 64 65 72 6c 69 6e |.(defun |underlin|
|00000010| 65 2d 72 65 67 69 6f 6e | 20 28 73 74 61 72 74 20 |e-region| (start |
|00000020| 65 6e 64 29 20 22 5c 0a | 55 6e 64 65 72 6c 69 6e |end) "\.|Underlin|
|00000030| 65 20 61 6c 6c 20 6e 6f | 6e 62 6c 61 6e 6b 20 63 |e all no|nblank c|
|00000040| 68 61 72 61 63 74 65 72 | 73 20 69 6e 20 74 68 65 |haracter|s in the|
|00000050| 20 72 65 67 69 6f 6e 2e | 0a 57 6f 72 6b 73 20 62 | region.|.Works b|
|00000060| 79 20 6f 76 65 72 73 74 | 72 69 6b 69 6e 67 20 75 |y overst|riking u|
|00000070| 6e 64 65 72 73 63 6f 72 | 65 73 2e 0a 43 61 6c 6c |nderscor|es..Call|
|00000080| 65 64 20 66 72 6f 6d 20 | 70 72 6f 67 72 61 6d 2c |ed from |program,|
|00000090| 20 74 61 6b 65 73 20 74 | 77 6f 20 61 72 67 75 6d | takes t|wo argum|
|000000a0| 65 6e 74 73 20 53 54 41 | 52 54 20 61 6e 64 20 45 |ents STA|RT and E|
|000000b0| 4e 44 0a 77 68 69 63 68 | 20 73 70 65 63 69 66 79 |ND.which| specify|
|000000c0| 20 74 68 65 20 72 61 6e | 67 65 20 74 6f 20 6f 70 | the ran|ge to op|
|000000d0| 65 72 61 74 65 20 6f 6e | 2e 22 20 28 69 6e 74 65 |erate on|." (inte|
|000000e0| 72 61 63 74 69 76 65 20 | 22 72 22 29 20 28 62 79 |ractive |"r") (by|
|000000f0| 74 65 2d 63 6f 64 65 20 | 22 c3 88 8a c4 20 18 c5 |te-code |".... ..|
|00000100| 08 09 0a 5d 5c 22 88 09 | 0a 5e 62 88 60 08 57 85 |...]\"..|.^b.`.W.|
|00000110| 28 00 c6 c7 21 86 20 00 | c8 63 88 c9 ca 21 88 82 |(...!. .|.c...!..|
|00000120| 12 00 29 29 87 22 20 5b | 65 6e 64 31 20 73 74 61 |..))." [|end1 sta|
|00000130| 72 74 20 65 6e 64 20 6e | 69 6c 20 6d 61 6b 65 2d |rt end n|il make-|
|00000140| 6d 61 72 6b 65 72 20 6d | 6f 76 65 2d 6d 61 72 6b |marker m|ove-mark|
|00000150| 65 72 20 6c 6f 6f 6b 69 | 6e 67 2d 61 74 20 22 5b |er looki|ng-at "[|
|00000160| 5f 00 2d 20 5d 22 20 22 | 5f 08 22 20 66 6f 72 77 |_.- ]" "|_." forw|
|00000170| 61 72 64 2d 63 68 61 72 | 20 31 5d 20 36 29 29 0a |ard-char| 1] 6)).|
|00000180| 0a 28 64 65 66 75 6e 20 | 75 6e 75 6e 64 65 72 6c |.(defun |ununderl|
|00000190| 69 6e 65 2d 72 65 67 69 | 6f 6e 20 28 73 74 61 72 |ine-regi|on (star|
|000001a0| 74 20 65 6e 64 29 20 22 | 5c 0a 52 65 6d 6f 76 65 |t end) "|\.Remove|
|000001b0| 20 61 6c 6c 20 75 6e 64 | 65 72 6c 69 6e 69 6e 67 | all und|erlining|
|000001c0| 20 28 6f 76 65 72 73 74 | 72 75 63 6b 20 75 6e 64 | (overst|ruck und|
|000001d0| 65 72 73 63 6f 72 65 73 | 29 20 69 6e 20 74 68 65 |erscores|) in the|
|000001e0| 20 72 65 67 69 6f 6e 2e | 0a 43 61 6c 6c 65 64 20 | region.|.Called |
|000001f0| 66 72 6f 6d 20 70 72 6f | 67 72 61 6d 2c 20 74 61 |from pro|gram, ta|
|00000200| 6b 65 73 20 74 77 6f 20 | 61 72 67 75 6d 65 6e 74 |kes two |argument|
|00000210| 73 20 53 54 41 52 54 20 | 61 6e 64 20 45 4e 44 0a |s START |and END.|
|00000220| 77 68 69 63 68 20 73 70 | 65 63 69 66 79 20 74 68 |which sp|ecify th|
|00000230| 65 20 72 61 6e 67 65 20 | 74 6f 20 6f 70 65 72 61 |e range |to opera|
|00000240| 74 65 20 6f 6e 2e 22 20 | 28 69 6e 74 65 72 61 63 |te on." |(interac|
|00000250| 74 69 76 65 20 22 72 22 | 29 20 28 62 79 74 65 2d |tive "r"|) (byte-|
|00000260| 63 6f 64 65 20 22 c4 88 | 8a c5 20 18 c6 08 09 0a |code "..|.. .....|
|00000270| 5d 5c 22 88 09 0a 5e 62 | 88 c7 c8 08 c3 23 85 21 |]\"...^b|.....#.!|
|00000280| 00 c9 ca 21 88 82 12 00 | 29 29 87 22 20 5b 65 6e |...!....|))." [en|
|00000290| 64 31 20 73 74 61 72 74 | 20 65 6e 64 20 74 20 6e |d1 start| end t n|
|000002a0| 69 6c 20 6d 61 6b 65 2d | 6d 61 72 6b 65 72 20 6d |il make-|marker m|
|000002b0| 6f 76 65 2d 6d 61 72 6b | 65 72 20 73 65 61 72 63 |ove-mark|er searc|
|000002c0| 68 2d 66 6f 72 77 61 72 | 64 20 22 5f 08 22 20 64 |h-forwar|d "_." d|
|000002d0| 65 6c 65 74 65 2d 63 68 | 61 72 20 2d 32 5d 20 36 |elete-ch|ar -2] 6|
|000002e0| 29 29 0a | |)). | |
+--------+-------------------------+-------------------------+--------+--------+
