home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1993-06-08 | 2.5 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Combustion 2 Particle Library (other/combustion2ParticleLibrary)
| ext
| Unsupported |
| 1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| ext
| Unsupported |
| 100%
| file
| data
| default
| |
| 100%
| gt2
| Kopftext: ';;; compiled by jwz'
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 3b 3b 20 63 6f 6d 70 | 69 6c 65 64 20 62 79 20 |;;; comp|iled by |
|00000010| 6a 77 7a 40 74 68 61 6c | 69 64 6f 6d 69 64 65 20 |jwz@thal|idomide |
|00000020| 6f 6e 20 54 68 75 20 4a | 75 6c 20 20 32 20 31 36 |on Thu J|ul 2 16|
|00000030| 3a 33 32 3a 30 32 20 31 | 39 39 32 0a 3b 3b 3b 20 |:32:02 1|992.;;; |
|00000040| 66 72 6f 6d 20 66 69 6c | 65 20 2f 75 2f 6a 77 7a |from fil|e /u/jwz|
|00000050| 2f 65 6d 61 63 73 31 39 | 2f 6c 69 73 70 2f 70 61 |/emacs19|/lisp/pa|
|00000060| 63 6b 61 67 65 73 2f 63 | 6f 6d 70 61 72 65 2d 77 |ckages/c|ompare-w|
|00000070| 2e 65 6c 0a 3b 3b 3b 20 | 65 6d 61 63 73 20 76 65 |.el.;;; |emacs ve|
|00000080| 72 73 69 6f 6e 20 31 39 | 2e 32 2e 31 20 4c 75 63 |rsion 19|.2.1 Luc|
|00000090| 69 64 2e 0a 3b 3b 3b 20 | 62 79 74 65 63 6f 6d 70 |id..;;; |bytecomp|
|000000a0| 20 76 65 72 73 69 6f 6e | 20 32 2e 30 37 3b 20 31 | version| 2.07; 1|
|000000b0| 37 2d 6a 75 6e 2d 39 32 | 2e 0a 3b 3b 3b 20 6f 70 |7-jun-92|..;;; op|
|000000c0| 74 69 6d 69 7a 61 74 69 | 6f 6e 20 69 73 20 6f 6e |timizati|on is on|
|000000d0| 2e 0a 3b 3b 3b 20 74 68 | 69 73 20 66 69 6c 65 20 |..;;; th|is file |
|000000e0| 75 73 65 73 20 6f 70 63 | 6f 64 65 73 20 77 68 69 |uses opc|odes whi|
|000000f0| 63 68 20 64 6f 20 6e 6f | 74 20 65 78 69 73 74 20 |ch do no|t exist |
|00000100| 69 6e 20 45 6d 61 63 73 | 31 38 2e 0a 0a 28 69 66 |in Emacs|18...(if|
|00000110| 20 28 61 6e 64 20 28 62 | 6f 75 6e 64 70 20 27 65 | (and (b|oundp 'e|
|00000120| 6d 61 63 73 2d 76 65 72 | 73 69 6f 6e 29 0a 09 20 |macs-ver|sion).. |
|00000130| 28 6f 72 20 28 61 6e 64 | 20 28 62 6f 75 6e 64 70 |(or (and| (boundp|
|00000140| 20 27 65 70 6f 63 68 3a | 3a 76 65 72 73 69 6f 6e | 'epoch:|:version|
|00000150| 29 20 65 70 6f 63 68 3a | 3a 76 65 72 73 69 6f 6e |) epoch:|:version|
|00000160| 29 0a 09 20 20 20 20 20 | 28 73 74 72 69 6e 67 2d |).. |(string-|
|00000170| 6c 65 73 73 70 20 65 6d | 61 63 73 2d 76 65 72 73 |lessp em|acs-vers|
|00000180| 69 6f 6e 20 22 31 39 22 | 29 29 29 0a 20 20 20 20 |ion "19"|))). |
|00000190| 28 65 72 72 6f 72 20 22 | 54 68 69 73 20 66 69 6c |(error "|This fil|
|000001a0| 65 20 77 61 73 20 63 6f | 6d 70 69 6c 65 64 20 66 |e was co|mpiled f|
|000001b0| 6f 72 20 45 6d 61 63 73 | 31 39 2e 22 29 29 0a 0a |or Emacs|19."))..|
|000001c0| 28 70 72 6f 76 69 64 65 | 20 27 63 6f 6d 70 61 72 |(provide| 'compar|
|000001d0| 65 2d 77 29 0a 28 64 65 | 66 76 61 72 20 63 6f 6d |e-w).(de|fvar com|
|000001e0| 70 61 72 65 2d 77 69 6e | 64 6f 77 73 2d 77 68 69 |pare-win|dows-whi|
|000001f0| 74 65 73 70 61 63 65 20 | 22 5b 20 09 5c 6e 5d 2b |tespace |"[ .\n]+|
|00000200| 22 20 22 5c 0a 2a 52 65 | 67 75 6c 61 72 20 65 78 |" "\.*Re|gular ex|
|00000210| 70 72 65 73 73 69 6f 6e | 20 64 65 66 69 6e 69 6e |pression| definin|
|00000220| 67 20 72 75 6e 73 20 6f | 66 20 77 68 69 74 65 73 |g runs o|f whites|
|00000230| 70 61 63 65 20 66 6f 72 | 20 5c 5c 5b 63 6f 6d 70 |pace for| \\[comp|
|00000240| 61 72 65 2d 77 69 6e 64 | 6f 77 73 5d 2e 0a 43 68 |are-wind|ows]..Ch|
|00000250| 61 6e 67 65 73 20 69 6e | 20 77 68 69 74 65 73 70 |anges in| whitesp|
|00000260| 61 63 65 20 61 72 65 20 | 6f 70 74 69 6f 6e 61 6c |ace are |optional|
|00000270| 6c 79 20 69 67 6e 6f 72 | 65 64 2e 0a 0a 54 68 65 |ly ignor|ed...The|
|00000280| 20 76 61 6c 75 65 20 6f | 66 20 60 63 6f 6d 70 61 | value o|f `compa|
|00000290| 72 65 2d 77 69 6e 64 6f | 77 73 2d 77 68 69 74 65 |re-windo|ws-white|
|000002a0| 73 70 61 63 65 27 20 6d | 61 79 20 69 6e 73 74 65 |space' m|ay inste|
|000002b0| 61 64 20 62 65 20 61 20 | 66 75 6e 63 74 69 6f 6e |ad be a |function|
|000002c0| 3b 20 74 68 69 73 0a 66 | 75 6e 63 74 69 6f 6e 20 |; this.f|unction |
|000002d0| 69 73 20 63 61 6c 6c 65 | 64 20 69 6e 20 65 61 63 |is calle|d in eac|
|000002e0| 68 20 62 75 66 66 65 72 | 2c 20 77 69 74 68 20 70 |h buffer|, with p|
|000002f0| 6f 69 6e 74 20 61 74 20 | 74 68 65 20 63 75 72 72 |oint at |the curr|
|00000300| 65 6e 74 20 73 63 61 6e | 6e 69 6e 67 20 70 6f 69 |ent scan|ning poi|
|00000310| 6e 74 2e 0a 54 68 65 20 | 66 75 6e 63 74 69 6f 6e |nt..The |function|
|00000320| 27 73 20 6a 6f 62 20 69 | 73 20 74 6f 20 63 61 74 |'s job i|s to cat|
|00000330| 65 67 6f 72 69 7a 65 20 | 61 6e 79 20 77 68 69 74 |egorize |any whit|
|00000340| 65 73 70 61 63 65 20 61 | 72 6f 75 6e 64 20 28 69 |espace a|round (i|
|00000350| 6e 63 6c 75 64 69 6e 67 | 20 62 65 66 6f 72 65 29 |ncluding| before)|
|00000360| 0a 70 6f 69 6e 74 3b 20 | 69 74 20 73 68 6f 75 6c |.point; |it shoul|
|00000370| 64 20 61 6c 73 6f 20 61 | 64 76 61 6e 63 65 20 70 |d also a|dvance p|
|00000380| 61 73 74 20 61 6e 79 20 | 77 68 69 74 65 73 70 61 |ast any |whitespa|
|00000390| 63 65 2e 0a 54 68 65 20 | 66 75 6e 63 74 69 6f 6e |ce..The |function|
|000003a0| 20 69 73 20 70 61 73 73 | 65 64 20 6f 6e 65 20 61 | is pass|ed one a|
|000003b0| 72 67 75 6d 65 6e 74 2c | 20 74 68 65 20 70 6f 69 |rgument,| the poi|
|000003c0| 6e 74 20 77 68 65 72 65 | 20 63 6f 6d 70 61 72 65 |nt where| compare|
|000003d0| 2d 77 69 6e 64 6f 77 73 | 0a 77 61 73 20 6f 72 69 |-windows|.was ori|
|000003e0| 67 69 6e 61 6c 6c 79 20 | 63 61 6c 6c 65 64 3b 20 |ginally |called; |
|000003f0| 69 74 20 73 68 6f 75 6c | 64 20 6e 6f 74 20 63 6f |it shoul|d not co|
|00000400| 6e 73 69 64 65 72 20 61 | 6e 79 20 74 65 78 74 20 |nsider a|ny text |
|00000410| 62 65 66 6f 72 65 20 74 | 68 61 74 20 70 6f 69 6e |before t|hat poin|
|00000420| 74 2e 0a 49 66 20 74 68 | 65 20 66 75 6e 63 74 69 |t..If th|e functi|
|00000430| 6f 6e 20 72 65 74 75 72 | 6e 73 20 74 68 65 20 73 |on retur|ns the s|
|00000440| 61 6d 65 20 76 61 6c 75 | 65 20 66 6f 72 20 62 6f |ame valu|e for bo|
|00000450| 74 68 20 62 75 66 66 65 | 72 73 2c 20 74 68 65 6e |th buffe|rs, then|
|00000460| 20 74 68 65 0a 77 68 69 | 74 65 73 70 61 63 65 20 | the.whi|tespace |
|00000470| 69 73 20 63 6f 6e 73 69 | 64 65 72 65 64 20 74 6f |is consi|dered to|
|00000480| 20 6d 61 74 63 68 2c 20 | 61 6e 64 20 69 73 20 73 | match, |and is s|
|00000490| 6b 69 70 70 65 64 2e 22 | 29 0a 28 64 65 66 76 61 |kipped."|).(defva|
|000004a0| 72 20 63 6f 6d 70 61 72 | 65 2d 69 67 6e 6f 72 65 |r compar|e-ignore|
|000004b0| 2d 63 61 73 65 20 6e 69 | 6c 20 22 5c 0a 2a 49 66 |-case ni|l "\.*If|
|000004c0| 20 74 68 65 20 76 61 6c | 75 65 20 6f 66 20 74 68 | the val|ue of th|
|000004d0| 69 73 20 76 61 72 69 61 | 62 6c 65 20 65 76 61 6c |is varia|ble eval|
|000004e0| 75 61 74 65 73 20 74 6f | 20 6e 6f 6e 2d 6e 69 6c |uates to| non-nil|
|000004f0| 2c 20 5c 5c 5b 63 6f 6d | 70 61 72 65 2d 77 69 6e |, \\[com|pare-win|
|00000500| 64 6f 77 73 5d 0a 69 67 | 6e 6f 72 65 73 20 63 61 |dows].ig|nores ca|
|00000510| 73 65 20 64 69 66 66 65 | 72 65 6e 63 65 73 2e 20 |se diffe|rences. |
|00000520| 20 53 6f 6d 65 20 75 73 | 65 66 75 6c 20 73 65 74 | Some us|eful set|
|00000530| 74 69 6e 67 73 3a 20 6e | 69 6c 2c 20 74 20 6f 72 |tings: n|il, t or|
|00000540| 20 27 63 61 73 65 2d 66 | 6f 6c 64 2d 73 65 61 72 | 'case-f|old-sear|
|00000550| 63 68 2c 0a 6d 65 61 6e | 69 6e 67 20 74 6f 20 74 |ch,.mean|ing to t|
|00000560| 72 61 63 6b 20 74 68 65 | 20 76 61 6c 75 65 20 6f |rack the| value o|
|00000570| 66 20 74 68 65 20 60 63 | 61 73 65 2d 66 6f 6c 64 |f the `c|ase-fold|
|00000580| 2d 73 65 61 72 63 68 27 | 20 76 61 72 69 61 62 6c |-search'| variabl|
|00000590| 65 2e 22 29 0a 28 66 73 | 65 74 20 27 63 6f 6d 70 |e.").(fs|et 'comp|
|000005a0| 61 72 65 2d 77 69 6e 64 | 6f 77 73 20 23 5b 28 26 |are-wind|ows #[(&|
|000005b0| 6f 70 74 69 6f 6e 61 6c | 20 69 67 6e 6f 72 65 2d |optional| ignore-|
|000005c0| 77 68 69 74 65 73 70 61 | 63 65 29 20 22 c0 89 89 |whitespa|ce) "...|
|000005d0| 89 89 89 89 89 89 89 60 | c0 c1 5c 6e 21 0b ad 81 |.......`|..\n!...|
|000005e0| 0c 1d 1a 1e 06 1e 07 1e | 08 1e 09 1e 5c 6e 1e 0b |........|....\n..|
|000005f0| 1e 0c 1e 0d 1e 0e 1e 0f | 1e 10 1e 11 60 16 11 70 |........|....`..p|
|00000600| 16 0d d2 d3 20 21 89 16 | 5c 6e d3 20 3d ab 84 d4 |.... !..|\n. =...|
|00000610| d5 21 88 d6 0e 5c 6e 21 | 16 10 d7 0e 5c 6e 21 16 |.!...\n!|....\n!.|
|00000620| 0c 0e 10 16 06 64 16 0f | 8a 0e 0c 71 88 64 16 0e |.....d..|...q.d..|
|00000630| 29 d8 16 09 0e 09 83 6e | 01 c0 16 09 0e 11 62 88 |)......n|......b.|
|00000640| d9 0e 5c 6e 0e 10 5c 22 | 88 0d ab fa 8a c0 89 89 |..\n..\"|........|
|00000650| 89 89 89 1e 1a 1e 1b 1e | 5c 6e 1e 1c 1e 1d 1e 1e |........|\n......|
|00000660| 0d 3b ab 96 6d ac 85 0d | 0e 07 78 88 df 0d 21 ab |.;..m...|..x...!.|
|00000670| 92 e0 95 16 1e d8 16 1b | aa 89 0d 0e 07 21 16 1b |........|.....!..|
|00000680| 60 16 1e 0e 0c 71 88 0e | 10 62 88 0d 3b ab 96 6d |`....q..|.b..;..m|
|00000690| ac 85 0d 0e 06 78 88 df | 0d 21 ab 92 e0 95 16 1d |.....x..|.!......|
|000006a0| d8 16 1a aa 89 0d 0e 06 | 21 16 1a 60 16 1d 0e 1b |........|!..`....|
|000006b0| ab 93 0e 1a ab 8f 0e 1b | 0e 1a 3d ab 88 0e 1e 16 |........|..=.....|
|000006c0| 11 0e 1d 16 10 2e 07 e1 | c0 1e 5c 22 89 1e 08 e0 |........|..\"....|
|000006d0| 56 ab ed d8 16 5c 22 0e | 5c 22 ab dd 0e 08 0e 0f |V....\".|\"......|
|000006e0| 0e 11 5a 0e 0e 0e 10 5a | 5e 5e 16 08 8a 0e 0c 71 |..Z....Z|^^.....q|
|000006f0| 88 0e 10 0e 08 0e 10 5c | 5c 7b 16 0b 29 0e 08 e0 |.......\|\{..)...|
|00000700| 56 ad 9f 5c 6e ab 91 d8 | 1e 23 8a e4 0e 0b 0e 11 |V..\n...|.#......|
|00000710| 0e 08 5c 5c d8 23 2a aa | 8b 0e 11 0e 08 0e 11 5c |..\\.#*.|.......\|
|00000720| 5c 7b 0e 0b 9a 89 16 5c | 22 ab 32 0e 11 0e 08 5c |\{.....\|".2....\|
|00000730| 5c 16 11 0e 10 0e 08 5c | 5c 16 10 d8 16 09 aa 1f |\......\|\.......|
|00000740| 0e 08 e5 a5 89 16 08 aa | 0f 2a 82 62 00 0e 11 62 |........|.*.b...b|
|00000750| 88 d9 0e 5c 6e 0e 10 5c | 22 88 60 0e 07 55 ad 82 |...\n..\|".`..U..|
|00000760| e6 20 2e 0e 87 22 20 5b | 6e 69 6c 20 65 76 61 6c |. ..." [|nil eval|
|00000770| 20 63 6f 6d 70 61 72 65 | 2d 69 67 6e 6f 72 65 2d | compare|-ignore-|
|00000780| 63 61 73 65 20 69 67 6e | 6f 72 65 2d 77 68 69 74 |case ign|ore-whit|
|00000790| 65 73 70 61 63 65 20 63 | 6f 6d 70 61 72 65 2d 77 |espace c|ompare-w|
|000007a0| 69 6e 64 6f 77 73 2d 77 | 68 69 74 65 73 70 61 63 |indows-w|hitespac|
|000007b0| 65 20 73 6b 69 70 2d 77 | 68 69 74 65 73 70 61 63 |e skip-w|hitespac|
|000007c0| 65 20 6f 70 6f 69 6e 74 | 32 20 6f 70 6f 69 6e 74 |e opoint|2 opoint|
|000007d0| 31 20 73 69 7a 65 20 73 | 75 63 63 65 73 73 20 77 |1 size s|uccess w|
|000007e0| 32 20 73 32 20 62 32 20 | 62 31 20 6d 61 78 70 32 |2 s2 b2 |b1 maxp2|
|000007f0| 20 6d 61 78 70 31 20 70 | 32 20 70 31 20 6e 65 78 | maxp1 p|2 p1 nex|
|00000800| 74 2d 77 69 6e 64 6f 77 | 20 73 65 6c 65 63 74 65 |t-window| selecte|
|00000810| 64 2d 77 69 6e 64 6f 77 | 20 65 72 72 6f 72 20 22 |d-window| error "|
|00000820| 4e 6f 20 6f 74 68 65 72 | 20 77 69 6e 64 6f 77 22 |No other| window"|
|00000830| 20 77 69 6e 64 6f 77 2d | 70 6f 69 6e 74 20 77 69 | window-|point wi|
|00000840| 6e 64 6f 77 2d 62 75 66 | 66 65 72 20 74 20 73 65 |ndow-buf|fer t se|
|00000850| 74 2d 77 69 6e 64 6f 77 | 2d 70 6f 69 6e 74 20 72 |t-window|-point r|
|00000860| 65 73 75 6c 74 32 20 72 | 65 73 75 6c 74 31 20 77 |esult2 r|esult1 w|
|00000870| 31 20 70 32 61 20 70 31 | 61 20 6c 6f 6f 6b 69 6e |1 p2a p1|a lookin|
|00000880| 67 2d 61 74 20 30 20 31 | 30 30 30 20 73 75 63 63 |g-at 0 1|000 succ|
|00000890| 65 73 73 2d 31 20 63 61 | 73 65 2d 66 6f 6c 64 2d |ess-1 ca|se-fold-|
|000008a0| 73 65 61 72 63 68 20 73 | 65 61 72 63 68 2d 66 6f |search s|earch-fo|
|000008b0| 72 77 61 72 64 20 32 20 | 64 69 6e 67 5d 20 31 35 |rward 2 |ding] 15|
|000008c0| 20 22 5c 0a 43 6f 6d 70 | 61 72 65 20 74 65 78 74 | "\.Comp|are text|
|000008d0| 20 69 6e 20 63 75 72 72 | 65 6e 74 20 77 69 6e 64 | in curr|ent wind|
|000008e0| 6f 77 20 77 69 74 68 20 | 74 65 78 74 20 69 6e 20 |ow with |text in |
|000008f0| 6e 65 78 74 20 77 69 6e | 64 6f 77 2e 0a 43 6f 6d |next win|dow..Com|
|00000900| 70 61 72 65 73 20 74 68 | 65 20 74 65 78 74 20 73 |pares th|e text s|
|00000910| 74 61 72 74 69 6e 67 20 | 61 74 20 70 6f 69 6e 74 |tarting |at point|
|00000920| 20 69 6e 20 65 61 63 68 | 20 77 69 6e 64 6f 77 2c | in each| window,|
|00000930| 0a 6d 6f 76 69 6e 67 20 | 6f 76 65 72 20 74 65 78 |.moving |over tex|
|00000940| 74 20 69 6e 20 65 61 63 | 68 20 6f 6e 65 20 61 73 |t in eac|h one as|
|00000950| 20 66 61 72 20 61 73 20 | 74 68 65 79 20 6d 61 74 | far as |they mat|
|00000960| 63 68 2e 0a 0a 41 20 70 | 72 65 66 69 78 20 61 72 |ch...A p|refix ar|
|00000970| 67 20 6d 65 61 6e 73 20 | 69 67 6e 6f 72 65 20 63 |g means |ignore c|
|00000980| 68 61 6e 67 65 73 20 69 | 6e 20 77 68 69 74 65 73 |hanges i|n whites|
|00000990| 70 61 63 65 2e 0a 54 68 | 65 20 76 61 72 69 61 62 |pace..Th|e variab|
|000009a0| 6c 65 20 60 63 6f 6d 70 | 61 72 65 2d 77 69 6e 64 |le `comp|are-wind|
|000009b0| 6f 77 73 2d 77 68 69 74 | 65 73 70 61 63 65 27 20 |ows-whit|espace' |
|000009c0| 63 6f 6e 74 72 6f 6c 73 | 20 68 6f 77 20 77 68 69 |controls| how whi|
|000009d0| 74 65 73 70 61 63 65 20 | 69 73 20 73 6b 69 70 70 |tespace |is skipp|
|000009e0| 65 64 2e 0a 0a 49 66 20 | 60 63 6f 6d 70 61 72 65 |ed...If |`compare|
|000009f0| 2d 69 67 6e 6f 72 65 2d | 63 61 73 65 27 20 69 73 |-ignore-|case' is|
|00000a00| 20 6e 6f 6e 2d 6e 69 6c | 2c 20 63 68 61 6e 67 65 | non-nil|, change|
|00000a10| 73 20 69 6e 20 63 61 73 | 65 20 61 72 65 20 61 6c |s in cas|e are al|
|00000a20| 73 6f 20 69 67 6e 6f 72 | 65 64 2e 22 20 22 50 22 |so ignor|ed." "P"|
|00000a30| 5d 29 0a | |]). | |
+--------+-------------------------+-------------------------+--------+--------+
