/ Fresh Fish 6 / FreshFish_September1994.bin / bbs / gnu / emacs-18.59-src.lha / GNU / src / amiga / emacs-18.59 / lisp / compare-w.elc

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0a 28 64 65 66 75 6e 20 | 63 6f 6d 70 61 72 65 2d |.(defun |compare-|
|00000010| 77 69 6e 64 6f 77 73 20 | 6e 69 6c 20 22 5c 0a 43 |windows |nil "\.C|
|00000020| 6f 6d 70 61 72 65 20 74 | 65 78 74 20 69 6e 20 63 |ompare t|ext in c|
|00000030| 75 72 72 65 6e 74 20 77 | 69 6e 64 6f 77 20 77 69 |urrent w|indow wi|
|00000040| 74 68 20 74 65 78 74 20 | 69 6e 20 6e 65 78 74 20 |th text |in next |
|00000050| 77 69 6e 64 6f 77 2e 0a | 43 6f 6d 70 61 72 65 73 |window..|Compares|
|00000060| 20 74 68 65 20 74 65 78 | 74 20 73 74 61 72 74 69 | the tex|t starti|
|00000070| 6e 67 20 61 74 20 70 6f | 69 6e 74 20 69 6e 20 65 |ng at po|int in e|
|00000080| 61 63 68 20 77 69 6e 64 | 6f 77 2c 0a 6d 6f 76 69 |ach wind|ow,.movi|
|00000090| 6e 67 20 6f 76 65 72 20 | 74 65 78 74 20 69 6e 20 |ng over |text in |
|000000a0| 65 61 63 68 20 6f 6e 65 | 20 61 73 20 66 61 72 20 |each one| as far |
|000000b0| 61 73 20 74 68 65 79 20 | 6d 61 74 63 68 2e 22 20 |as they |match." |
|000000c0| 28 69 6e 74 65 72 61 63 | 74 69 76 65 29 20 28 62 |(interac|tive) (b|
|000000d0| 79 74 65 2d 63 6f 64 65 | 20 22 cd 88 cd cd cd cd |yte-code| "......|
|000000e0| cd cd cd cd cd 60 1e 09 | 1e 08 1e 07 1e 06 1d 1c |.....`..|........|
|000000f0| 1b 1a 19 18 60 10 70 89 | 14 88 ce cf 20 21 89 16 |....`.p.|.... !..|
|00000100| 06 88 0e 06 cf 20 3d 83 | 36 00 d0 d1 21 82 37 00 |..... =.|6...!.7.|
|00000110| cd 88 d2 0e 06 21 11 d3 | 0e 06 21 89 15 88 64 89 |.....!..|..!...d.|
|00000120| 12 88 8a 0d 71 88 64 89 | 13 29 88 d4 89 16 08 88 |....q.d.|.)......|
|00000130| 0e 08 d5 56 85 c6 00 ca | 89 16 07 88 0e 07 85 b9 |...V....|........|
|00000140| 00 d6 0e 08 0a 08 5a 0b | 09 5a 23 89 16 08 88 8a |......Z.|.Z#.....|
|00000150| 0d 71 88 d7 09 0e 08 09 | 5c 5c 5c 22 89 16 0b 29 |.q......|\\\"...)|
|00000160| 88 d7 08 0e 08 08 5c 5c | 5c 22 89 16 0c 88 0e 08 |......\\|\"......|
|00000170| d5 56 85 9d 00 d8 0e 0c | 0e 0b 5c 22 89 16 07 88 |.V......|..\"....|
|00000180| 0e 07 83 b4 00 08 0e 08 | 5c 5c 10 09 0e 08 5c 5c |........|\\....\\|
|00000190| 89 11 82 b5 00 cd 88 82 | 62 00 88 d9 0e 08 da 5c |........|b......\|
|000001a0| 22 89 16 08 88 82 56 00 | 88 08 62 88 db 0e 06 09 |".....V.|..b.....|
|000001b0| 5c 22 88 60 0e 09 55 83 | dc 00 dc 20 82 dd 00 cd |\".`..U.|... ....|
|000001c0| 2e 0a 87 22 20 5b 70 31 | 20 70 32 20 6d 61 78 70 |..." [p1| p2 maxp|
|000001d0| 31 20 6d 61 78 70 32 20 | 62 31 20 62 32 20 77 32 |1 maxp2 |b1 b2 w2|
|000001e0| 20 73 75 63 63 65 73 73 | 20 73 69 7a 65 20 6f 70 | success| size op|
|000001f0| 6f 69 6e 74 20 74 20 73 | 32 20 73 31 20 6e 69 6c |oint t s|2 s1 nil|
|00000200| 20 6e 65 78 74 2d 77 69 | 6e 64 6f 77 20 73 65 6c | next-wi|ndow sel|
|00000210| 65 63 74 65 64 2d 77 69 | 6e 64 6f 77 20 65 72 72 |ected-wi|ndow err|
|00000220| 6f 72 20 22 4e 6f 20 6f | 74 68 65 72 20 77 69 6e |or "No o|ther win|
|00000230| 64 6f 77 2e 22 20 77 69 | 6e 64 6f 77 2d 70 6f 69 |dow." wi|ndow-poi|
|00000240| 6e 74 20 77 69 6e 64 6f | 77 2d 62 75 66 66 65 72 |nt windo|w-buffer|
|00000250| 20 31 30 30 30 20 30 20 | 6d 69 6e 20 62 75 66 66 | 1000 0 |min buff|
|00000260| 65 72 2d 73 75 62 73 74 | 72 69 6e 67 20 65 71 75 |er-subst|ring equ|
|00000270| 61 6c 20 2f 20 32 20 73 | 65 74 2d 77 69 6e 64 6f |al / 2 s|et-windo|
|00000280| 77 2d 70 6f 69 6e 74 20 | 64 69 6e 67 5d 20 31 34 |w-point |ding] 14|
|00000290| 29 29 0a                |                         |)).     |        |
+--------+-------------------------+-------------------------+--------+--------+