/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / gnu / emacs-19.16 / lisp / mail-extr.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|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 69 6d 62 40 67 65 |piled by| jimb@ge|
|00000020| 65 63 68 2e 67 6e 75 2e | 61 69 2e 6d 69 74 2e 65 |ech.gnu.|ai.mit.e|
|00000030| 64 75 20 6f 6e 20 4d 6f | 6e 20 4a 75 6c 20 20 35 |du on Mo|n Jul  5|
|00000040| 20 32 33 3a 33 32 3a 30 | 31 20 31 39 39 33 0a 3b | 23:32:0|1 1993.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 67 64 |;; from |file /gd|
|00000060| 2f 67 6e 75 2f 65 6d 61 | 63 73 2f 31 39 2e 30 2f |/gnu/ema|cs/19.0/|
|00000070| 6c 69 73 70 2f 6d 61 69 | 6c 2d 65 78 74 72 2e 65 |lisp/mai|l-extr.e|
|00000080| 6c 0a 3b 3b 3b 20 65 6d | 61 63 73 20 76 65 72 73 |l.;;; em|acs vers|
|00000090| 69 6f 6e 20 31 39 2e 31 | 35 2e 31 36 2e 0a 3b 3b |ion 19.1|5.16..;;|
|000000a0| 3b 20 62 79 74 65 63 6f | 6d 70 20 76 65 72 73 69 |; byteco|mp versi|
|000000b0| 6f 6e 20 46 53 46 20 32 | 2e 31 30 0a 3b 3b 3b 20 |on FSF 2|.10.;;; |
|000000c0| 6f 70 74 69 6d 69 7a 61 | 74 69 6f 6e 20 69 73 20 |optimiza|tion is |
|000000d0| 6f 6e 2e 0a 3b 3b 3b 20 | 74 68 69 73 20 66 69 6c |on..;;; |this fil|
|000000e0| 65 20 75 73 65 73 20 6f | 70 63 6f 64 65 73 20 77 |e uses o|pcodes w|
|000000f0| 68 69 63 68 20 64 6f 20 | 6e 6f 74 20 65 78 69 73 |hich do |not exis|
|00000100| 74 20 69 6e 20 45 6d 61 | 63 73 20 31 38 2e 0a 0a |t in Ema|cs 18...|
|00000110| 28 69 66 20 28 61 6e 64 | 20 28 62 6f 75 6e 64 70 |(if (and| (boundp|
|00000120| 20 27 65 6d 61 63 73 2d | 76 65 72 73 69 6f 6e 29 | 'emacs-|version)|
|00000130| 0a 09 20 28 6f 72 20 28 | 61 6e 64 20 28 62 6f 75 |.. (or (|and (bou|
|00000140| 6e 64 70 20 27 65 70 6f | 63 68 3a 3a 76 65 72 73 |ndp 'epo|ch::vers|
|00000150| 69 6f 6e 29 20 65 70 6f | 63 68 3a 3a 76 65 72 73 |ion) epo|ch::vers|
|00000160| 69 6f 6e 29 0a 09 20 20 | 20 20 20 28 73 74 72 69 |ion)..  |   (stri|
|00000170| 6e 67 2d 6c 65 73 73 70 | 20 65 6d 61 63 73 2d 76 |ng-lessp| emacs-v|
|00000180| 65 72 73 69 6f 6e 20 22 | 31 39 22 29 29 29 0a 20 |ersion "|19"))). |
|00000190| 20 20 20 28 65 72 72 6f | 72 20 22 54 68 69 73 20 |   (erro|r "This |
|000001a0| 66 69 6c 65 20 77 61 73 | 20 63 6f 6d 70 69 6c 65 |file was| compile|
|000001b0| 64 20 66 6f 72 20 45 6d | 61 63 73 20 31 39 22 29 |d for Em|acs 19")|
|000001c0| 29 0a 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |)..(byte|-code ".|
|000001d0| c1 21 84 08 00 c2 11 c3 | 14 c5 16 06 c7 16 08 c9 |.!......|........|
|000001e0| 16 5c 6e cb 16 0c cd 16 | 0e cf d0 0e 08 0e 0c 0e |.\n.....|........|
|000001f0| 08 24 16 11 d2 0e 08 d3 | 51 16 14 d2 0e 0c 50 16 |.$......|Q.....P.|
|00000200| 15 d2 0e 0e 50 16 16 cf | d7 0e 08 0e 0e 0e 0c 24 |....P...|.......$|
|00000210| 16 18 cf d9 0e 08 5c 22 | 16 1a db 16 1c cf dd 0e |......\"|........|
|00000220| 08 89 23 16 1e df 16 20 | e1 16 5c 22 cf e3 0e 08 |..#.... |..\"....|
|00000230| 0e 0e 0e 0c 0e 08 89 0e | 0e 0e 0c 0e 08 26 09 16 |........|.....&..|
|00000240| 24 e5 16 26 e7 16 28 cf | e9 0e 0c 0e 08 0e 0e 24 |$..&..(.|.......$|
|00000250| 16 2a cf eb 0e 0c 5c 22 | 16 2c ed 0e 2a ee 51 16 |.*....\"|.,..*.Q.|
|00000260| 2f f0 16 31 f2 16 33 cf | f4 0e 0c 0e 5c 6e 0e 0e |/..1..3.|....\n..|
|00000270| 24 16 35 f6 0e 35 f7 0e | 2c f8 0e 35 f9 b0 07 16 |$.5..5..|,..5....|
|00000280| 3a c0 fb 21 84 b7 00 fc | 20 16 3b c0 fd 21 84 c1 |:..!....| .;..!..|
|00000290| 00 fc 20 16 3d c0 fe 21 | 84 cb 00 fc 20 16 3e c0 |.. .=..!|.... .>.|
|000002a0| ff 21 84 d5 00 fc 20 16 | 3f c0 81 40 00 21 84 e1 |.!.... .|?..@.!..|
|000002b0| 00 fc 20 16 40 81 41 00 | 81 42 00 81 43 00 5c 22 |.. .@.A.|.B..C.\"|
|000002c0| 88 81 44 00 81 45 00 81 | 46 00 5c 22 88 81 44 00 |..D..E..|F.\"..D.|
|000002d0| 81 47 00 81 48 00 5c 22 | 88 81 44 00 81 49 00 81 |.G..H.\"|..D..I..|
|000002e0| 4a 00 5c 22 88 81 44 00 | 81 4b 00 81 4c 00 5c 22 |J.\"..D.|.K..L.\"|
|000002f0| 88 81 44 00 81 4d 00 81 | 4e 00 5c 22 87 22 20 5b |..D..M..|N.\"." [|
|00000300| 62 6f 75 6e 64 70 20 6d | 61 69 6c 2d 40 2d 62 69 |boundp m|ail-@-bi|
|00000310| 6e 64 73 2d 74 69 67 68 | 74 65 72 2d 74 68 61 6e |nds-tigh|ter-than|
|00000320| 2d 21 20 6e 69 6c 20 33 | 32 20 6d 61 69 6c 2d 73 |-! nil 3|2 mail-s|
|00000330| 70 61 63 65 2d 63 68 61 | 72 20 22 20 09 5c 6e 22 |pace-cha|r " .\n"|
|00000340| 20 6d 61 69 6c 2d 77 68 | 69 74 65 73 70 61 63 65 | mail-wh|itespace|
|00000350| 20 22 41 2d 5a 61 2d 7a | 2d 2d 2d 7b 7c 7d 27 7e | "A-Za-z|---{|}'~|
|00000360| 30 2d 39 60 2e 22 20 6d | 61 69 6c 2d 61 6c 6c 2d |0-9`." m|ail-all-|
|00000370| 6c 65 74 74 65 72 73 20 | 22 41 2d 5a 61 2d 7a 7b |letters |"A-Za-z{|
|00000380| 7c 7d 27 7e 30 2d 39 60 | 22 20 6d 61 69 6c 2d 61 ||}'~0-9`|" mail-a|
|00000390| 6c 6c 2d 6c 65 74 74 65 | 72 73 2d 62 75 74 2d 73 |ll-lette|rs-but-s|
|000003a0| 65 70 61 72 61 74 6f 72 | 73 20 22 41 2d 5a 61 2d |eparator|s "A-Za-|
|000003b0| 7a 22 20 6d 61 69 6c 2d | 66 69 72 73 74 2d 6c 65 |z" mail-|first-le|
|000003c0| 74 74 65 72 73 20 22 41 | 2d 5a 61 2d 7a 60 27 2e |tters "A|-Za-z`'.|
|000003d0| 22 20 6d 61 69 6c 2d 6c | 61 73 74 2d 6c 65 74 74 |" mail-l|ast-lett|
|000003e0| 65 72 73 20 66 6f 72 6d | 61 74 20 22 5c 5c 28 5c |ers form|at "\\(\|
|000003f0| 5c 28 5b 5e 25 73 5d 5c | 5c 7c 5c 5c 60 5c 5c 29 |\([^%s]\|\|\\`\\)|
|00000400| 5b 25 73 5d 5c 5c 29 5c | 5c 28 5c 5c 2e 5c 5c 28 |[%s]\\)\|\(\\.\\(|
|00000410| 5b 5e 20 5d 5c 5c 29 5c | 5c 7c 20 5c 5c 7c 5c 5c |[^ ]\\)\|\| \\|\\|
|00000420| 28 5b 5e 25 73 20 2e 5d | 5c 5c 29 5c 5c 7c 5c 5c |([^%s .]|\\)\\|\\|
|00000430| 27 5c 5c 29 22 20 6d 61 | 69 6c 2d 62 61 64 2d 69 |'\\)" ma|il-bad-i|
|00000440| 6e 69 74 69 61 6c 73 2d | 70 61 74 74 65 72 6e 20 |nitials-|pattern |
|00000450| 22 5e 22 20 22 2e 22 20 | 6d 61 69 6c 2d 6e 6f 6e |"^" "." |mail-non|
|00000460| 2d 6e 61 6d 65 2d 63 68 | 61 72 73 20 6d 61 69 6c |-name-ch|ars mail|
|00000470| 2d 6e 6f 6e 2d 62 65 67 | 69 6e 2d 6e 61 6d 65 2d |-non-beg|in-name-|
|00000480| 63 68 61 72 73 20 6d 61 | 69 6c 2d 6e 6f 6e 2d 65 |chars ma|il-non-e|
|00000490| 6e 64 2d 6e 61 6d 65 2d | 63 68 61 72 73 20 22 5c |nd-name-|chars "\|
|000004a0| 5c 28 5b 25 73 5d 5b 25 | 73 5d 5c 5c 29 5c 5c 2e |\([%s][%|s]\\)\\.|
|000004b0| 2b 5c 5c 28 5b 25 73 5d | 5c 5c 29 22 20 6d 61 69 |+\\([%s]|\\)" mai|
|000004c0| 6c 2d 62 61 64 2d 5c 2e | 2d 70 61 74 74 65 72 6e |l-bad-\.|-pattern|
|000004d0| 20 22 5c 5c 28 5b 20 2e | 5d 5c 5c 7c 5c 5c 60 5c | "\\([ .|]\\|\\`\|
|000004e0| 5c 29 5b 5c 22 27 60 5b | 28 5d 5c 5c 28 5b 20 2e |\)[\"'`[|(]\\([ .|
|000004f0| 25 73 5d 2b 5c 5c 29 5b | 5d 5c 22 27 29 5d 20 22 |%s]+\\)[|]\"')] "|
|00000500| 20 6d 61 69 6c 2d 6e 69 | 63 6b 6e 61 6d 65 2d 70 | mail-ni|ckname-p|
|00000510| 61 74 74 65 72 6e 20 22 | 5c 5c 60 20 2a 5c 5c 28 |attern "|\\` *\\(|
|00000520| 50 72 6f 66 5c 5c 7c 44 | 72 5c 5c 7c 4d 72 73 3f |Prof\\|D|r\\|Mrs?|
|00000530| 5c 5c 7c 52 65 76 5c 5c | 7c 52 61 62 62 69 5c 5c |\\|Rev\\||Rabbi\\|
|00000540| 7c 53 79 73 4f 70 5c 5c | 7c 4c 43 44 52 5c 5c 29 ||SysOp\\||LCDR\\)|
|00000550| 5c 5c 2e 3f 20 22 20 6d | 61 69 6c 2d 66 75 6c 6c |\\.? " m|ail-full|
|00000560| 2d 6e 61 6d 65 2d 70 72 | 65 66 69 78 65 73 20 22 |-name-pr|efixes "|
|00000570| 5c 5c 28 2c 3f 20 3f 5c | 5c 28 5b 4a 6a 53 73 5d |\\(,? ?\|\([JjSs]|
|00000580| 72 5c 5c 2e 3f 5c 5c 7c | 56 3f 49 2b 56 3f 5c 5c |r\\.?\\||V?I+V?\\|
|00000590| 29 5c 5c 29 5c 5c 28 5b | 5e 25 73 5d 5c 5c 28 5b |)\\)\\([|^%s]\\([|
|000005a0| 5e 25 73 5d 5c 5c 7c 5c | 5c 27 5c 5c 29 5c 5c 7c |^%s]\\|\|\'\\)\\||
|000005b0| 5c 5c 27 5c 5c 29 22 20 | 6d 61 69 6c 2d 66 75 6c |\\'\\)" |mail-ful|
|000005c0| 6c 2d 6e 61 6d 65 2d 73 | 75 66 66 69 78 2d 70 61 |l-name-s|uffix-pa|
|000005d0| 74 74 65 72 6e 20 22 56 | 3f 49 2b 56 3f 5c 5c 62 |ttern "V|?I+V?\\b|
|000005e0| 22 20 6d 61 69 6c 2d 72 | 6f 6d 61 6e 2d 6e 75 6d |" mail-r|oman-num|
|000005f0| 65 72 61 6c 2d 70 61 74 | 74 65 72 6e 20 22 5c 5c |eral-pat|tern "\\|
|00000600| 28 5b 41 2d 5a 5d 2b 5b | 2d 5f 2f 5d 5c 5c 7c 5b |([A-Z]+[|-_/]\\|[|
|00000610| 41 2d 5a 5d 5b 41 2d 5a | 5d 5b 41 2d 5a 5d 3f 5c |A-Z][A-Z|][A-Z]?\|
|00000620| 5c 62 5c 5c 29 22 20 6d | 61 69 6c 2d 77 65 69 72 |\b\\)" m|ail-weir|
|00000630| 64 2d 61 63 72 6f 6e 79 | 6d 2d 70 61 74 74 65 72 |d-acrony|m-patter|
|00000640| 6e 20 22 5c 5c 62 5c 5c | 28 5b 61 2d 7a 5d 5b 25 |n "\\b\\|([a-z][%|
|00000650| 73 5d 2a 5b 25 73 5d 5c | 5c 7c 5b 25 73 5d 5b 25 |s]*[%s]\|\|[%s][%|
|00000660| 73 5d 2a 5b 61 2d 7a 5d | 5b 25 73 5d 2a 5b 25 73 |s]*[a-z]|[%s]*[%s|
|00000670| 5d 5c 5c 7c 5b 25 73 5d | 5b 25 73 5d 2a 5b 61 2d |]\\|[%s]|[%s]*[a-|
|00000680| 7a 5d 5c 5c 29 22 20 6d | 61 69 6c 2d 6d 69 78 65 |z]\\)" m|ail-mixe|
|00000690| 64 2d 63 61 73 65 2d 6e | 61 6d 65 2d 70 61 74 74 |d-case-n|ame-patt|
|000006a0| 65 72 6e 20 22 5b 61 2d | 7a 41 2d 5a 2e 5d 2b 5b |ern "[a-|zA-Z.]+[|
|000006b0| 21 40 5d 5b 61 2d 7a 41 | 2d 5a 2e 5d 22 20 6d 61 |!@][a-zA|-Z.]" ma|
|000006c0| 69 6c 2d 61 6c 74 65 72 | 6e 61 74 69 76 65 2d 61 |il-alter|native-a|
|000006d0| 64 64 72 65 73 73 2d 70 | 61 74 74 65 72 6e 20 22 |ddress-p|attern "|
|000006e0| 20 5b 2d 7b 5d 5c 5c 7c | 2d 2d 5c 5c 7c 5b 2b 40 | [-{]\\||--\\|[+@|
|000006f0| 23 3e 3c 2f 3b 5d 22 20 | 6d 61 69 6c 2d 74 72 61 |#></;]" |mail-tra|
|00000700| 69 6c 69 6e 67 2d 63 6f | 6d 6d 65 6e 74 2d 73 74 |iling-co|mment-st|
|00000710| 61 72 74 2d 70 61 74 74 | 65 72 6e 20 22 5c 5c 62 |art-patt|ern "\\b|
|00000720| 5b 25 73 5d 5b 25 73 5d | 2a 5b 25 73 5d 22 20 6d |[%s][%s]|*[%s]" m|
|00000730| 61 69 6c 2d 6e 61 6d 65 | 2d 70 61 74 74 65 72 6e |ail-name|-pattern|
|00000740| 20 22 5c 5c 62 5b 25 73 | 5d 5c 5c 28 5b 2e 20 5d | "\\b[%s|]\\([. ]|
|00000750| 5c 5c 7c 5c 5c 62 5c 5c | 29 22 20 6d 61 69 6c 2d |\\|\\b\\|)" mail-|
|00000760| 69 6e 69 74 69 61 6c 2d | 70 61 74 74 65 72 6e 20 |initial-|pattern |
|00000770| 22 5c 5c 60 22 20 22 2c | 22 20 6d 61 69 6c 2d 6c |"\\`" ",|" mail-l|
|00000780| 61 73 74 2d 6e 61 6d 65 | 2d 66 69 72 73 74 2d 70 |ast-name|-first-p|
|00000790| 61 74 74 65 72 6e 20 22 | 5c 5c 28 5c 5c 28 5b 45 |attern "|\\(\\([E|
|000007a0| 65 5d 78 74 5c 5c 7c 5b | 54 74 5d 65 6c 5c 5c 7c |e]xt\\|[|Tt]el\\||
|000007b0| 5b 58 78 5d 5c 5c 29 2e | 3f 5c 5c 29 3f 20 2a 5c |[Xx]\\).|?\\)? *\|
|000007c0| 5c 2b 3f 5b 30 2d 39 5d | 5b 2d 20 30 2d 39 5d 2b |\+?[0-9]|[- 0-9]+|
|000007d0| 22 20 6d 61 69 6c 2d 74 | 65 6c 65 70 68 6f 6e 65 |" mail-t|elephone|
|000007e0| 2d 65 78 74 65 6e 73 69 | 6f 6e 2d 70 61 74 74 65 |-extensi|on-patte|
|000007f0| 72 6e 20 22 5c 5c 62 5b | 41 2d 5a 5d 2b 5b 30 2d |rn "\\b[|A-Z]+[0-|
|00000800| 39 5d 5b 41 2d 5a 30 2d | 39 5d 2a 22 20 6d 61 69 |9][A-Z0-|9]*" mai|
|00000810| 6c 2d 68 61 6d 2d 63 61 | 6c 6c 2d 73 69 67 6e 2d |l-ham-ca|ll-sign-|
|00000820| 70 61 74 74 65 72 6e 20 | 22 5c 5c 62 5b 25 73 5d |pattern |"\\b[%s]|
|00000830| 5b 25 73 5d 2b 5b 25 73 | 5d 22 20 6d 61 69 6c 2d |[%s]+[%s|]" mail-|
|00000840| 6e 6f 72 6d 61 6c 2d 6e | 61 6d 65 2d 70 61 74 74 |normal-n|ame-patt|
|00000850| 65 72 6e 20 22 5c 5c 60 | 5c 5c 28 22 20 22 5c 5c |ern "\\`|\\(" "\\|
|00000860| 7c 22 20 22 5c 5c 29 20 | 2b 5c 5c 28 22 20 22 5c ||" "\\) |+\\(" "\|
|00000870| 5c 29 5c 5c 28 2c 5c 5c | 7c 5c 5c 27 5c 5c 29 22 |\)\\(,\\||\\'\\)"|
|00000880| 20 6d 61 69 6c 2d 74 77 | 6f 2d 6e 61 6d 65 2d 70 | mail-tw|o-name-p|
|00000890| 61 74 74 65 72 6e 20 61 | 64 64 72 65 73 73 2d 73 |attern a|ddress-s|
|000008a0| 79 6e 74 61 78 2d 74 61 | 62 6c 65 20 6d 61 6b 65 |yntax-ta|ble make|
|000008b0| 2d 73 79 6e 74 61 78 2d | 74 61 62 6c 65 20 61 64 |-syntax-|table ad|
|000008c0| 64 72 65 73 73 2d 63 6f | 6d 6d 65 6e 74 2d 73 79 |dress-co|mment-sy|
|000008d0| 6e 74 61 78 2d 74 61 62 | 6c 65 20 61 64 64 72 65 |ntax-tab|le addre|
|000008e0| 73 73 2d 64 6f 6d 61 69 | 6e 2d 6c 69 74 65 72 61 |ss-domai|n-litera|
|000008f0| 6c 2d 73 79 6e 74 61 78 | 2d 74 61 62 6c 65 20 61 |l-syntax|-table a|
|00000900| 64 64 72 65 73 73 2d 74 | 65 78 74 2d 63 6f 6d 6d |ddress-t|ext-comm|
|00000910| 65 6e 74 2d 73 79 6e 74 | 61 78 2d 74 61 62 6c 65 |ent-synt|ax-table|
|00000920| 20 61 64 64 72 65 73 73 | 2d 74 65 78 74 2d 73 79 | address|-text-sy|
|00000930| 6e 74 61 78 2d 74 61 62 | 6c 65 20 6d 61 70 63 61 |ntax-tab|le mapca|
|00000940| 72 20 23 5b 28 70 61 69 | 72 29 20 22 08 40 4a 19 |r #[(pai|r) ".@J.|
|00000950| c2 c3 08 41 5c 22 29 87 | 22 20 5b 70 61 69 72 20 |...A\").|" [pair |
|00000960| 73 79 6e 74 61 78 2d 74 | 61 62 6c 65 20 6d 61 70 |syntax-t|able map|
|00000970| 63 61 72 20 23 5b 28 69 | 74 65 6d 29 20 22 08 47 |car #[(i|tem) ".G|
|00000980| c1 3d 83 10 00 c2 08 40 | 08 41 40 0b 23 87 08 40 |.=.....@|.A@.#..@|
|00000990| 08 41 40 08 41 41 40 1c | 1d 89 1e 06 0d 58 85 33 |.A@.AA@.|.....X.3|
|000009a0| 00 c2 0e 06 0c 0b 23 88 | 0e 06 54 89 16 06 82 1e |......#.|..T.....|
|000009b0| 00 2b 87 22 20 5b 69 74 | 65 6d 20 32 20 6d 6f 64 |.+." [it|em 2 mod|
|000009c0| 69 66 79 2d 73 79 6e 74 | 61 78 2d 65 6e 74 72 79 |ify-synt|ax-entry|
|000009d0| 20 73 79 6e 74 61 78 2d | 74 61 62 6c 65 20 73 79 | syntax-|table sy|
|000009e0| 6e 74 61 78 20 62 6f 75 | 6e 64 20 63 68 61 72 5d |ntax bou|nd char]|
|000009f0| 20 35 5d 5d 20 33 5d 20 | 28 28 61 64 64 72 65 73 | 5]] 3] |((addres|
|00000a00| 73 2d 73 79 6e 74 61 78 | 2d 74 61 62 6c 65 20 28 |s-syntax|-table (|
|00000a10| 30 20 33 31 20 22 77 22 | 29 20 28 33 32 20 22 20 |0 31 "w"|) (32 " |
|00000a20| 22 29 20 28 33 33 20 31 | 32 36 20 22 77 22 29 20 |") (33 1|26 "w") |
|00000a30| 28 31 32 37 20 22 77 22 | 29 20 28 31 32 38 20 32 |(127 "w"|) (128 2|
|00000a40| 35 35 20 22 77 22 29 20 | 28 39 20 22 20 22 29 20 |55 "w") |(9 " ") |
|00000a50| 28 31 33 20 22 20 22 29 | 20 28 31 30 20 22 20 22 |(13 " ")| (10 " "|
|00000a60| 29 20 28 34 30 20 22 2e | 22 29 20 28 34 31 20 22 |) (40 ".|") (41 "|
|00000a70| 2e 22 29 20 28 36 30 20 | 22 2e 22 29 20 28 36 32 |.") (60 |".") (62|
|00000a80| 20 22 2e 22 29 20 28 36 | 34 20 22 2e 22 29 20 28 | ".") (6|4 ".") (|
|00000a90| 34 34 20 22 2e 22 29 20 | 28 35 39 20 22 2e 22 29 |44 ".") |(59 ".")|
|00000aa0| 20 28 35 38 20 22 2e 22 | 29 20 28 39 32 20 22 5c | (58 "."|) (92 "\|
|00000ab0| 5c 22 29 20 28 33 34 20 | 22 5c 22 22 29 20 28 34 |\") (34 |"\"") (4|
|00000ac0| 36 20 22 2e 22 29 20 28 | 39 31 20 22 2e 22 29 20 |6 ".") (|91 ".") |
|00000ad0| 28 39 33 20 22 2e 22 29 | 20 28 33 37 20 22 2e 22 |(93 ".")| (37 "."|
|00000ae0| 29 20 28 33 33 20 22 2e | 22 29 29 20 28 61 64 64 |) (33 ".|")) (add|
|00000af0| 72 65 73 73 2d 63 6f 6d | 6d 65 6e 74 2d 73 79 6e |ress-com|ment-syn|
|00000b00| 74 61 78 2d 74 61 62 6c | 65 20 28 30 20 32 35 35 |tax-tabl|e (0 255|
|00000b10| 20 22 77 22 29 20 28 34 | 30 20 22 28 29 22 29 20 | "w") (4|0 "()") |
|00000b20| 28 34 31 20 22 29 28 22 | 29 20 28 39 32 20 22 5c |(41 ")("|) (92 "\|
|00000b30| 5c 22 29 29 20 28 61 64 | 64 72 65 73 73 2d 64 6f |\")) (ad|dress-do|
|00000b40| 6d 61 69 6e 2d 6c 69 74 | 65 72 61 6c 2d 73 79 6e |main-lit|eral-syn|
|00000b50| 74 61 78 2d 74 61 62 6c | 65 20 28 30 20 32 35 35 |tax-tabl|e (0 255|
|00000b60| 20 22 77 22 29 20 28 39 | 31 20 22 28 5d 22 29 20 | "w") (9|1 "(]") |
|00000b70| 28 39 33 20 22 29 5b 22 | 29 20 28 39 32 20 22 5c |(93 ")["|) (92 "\|
|00000b80| 5c 22 29 29 20 28 61 64 | 64 72 65 73 73 2d 74 65 |\")) (ad|dress-te|
|00000b90| 78 74 2d 63 6f 6d 6d 65 | 6e 74 2d 73 79 6e 74 61 |xt-comme|nt-synta|
|00000ba0| 78 2d 74 61 62 6c 65 20 | 28 30 20 32 35 35 20 22 |x-table |(0 255 "|
|00000bb0| 77 22 29 20 28 34 30 20 | 22 28 29 22 29 20 28 34 |w") (40 |"()") (4|
|00000bc0| 31 20 22 29 28 22 29 20 | 28 39 31 20 22 28 5d 22 |1 ")(") |(91 "(]"|
|00000bd0| 29 20 28 39 33 20 22 29 | 5b 22 29 20 28 31 32 33 |) (93 ")|[") (123|
|00000be0| 20 22 28 7d 22 29 20 28 | 31 32 35 20 22 29 7b 22 | "(}") (|125 "){"|
|00000bf0| 29 20 28 39 32 20 22 5c | 5c 22 29 20 28 33 34 20 |) (92 "\|\") (34 |
|00000c00| 22 5c 22 22 29 29 20 28 | 61 64 64 72 65 73 73 2d |"\"")) (|address-|
|00000c10| 74 65 78 74 2d 73 79 6e | 74 61 78 2d 74 61 62 6c |text-syn|tax-tabl|
|00000c20| 65 20 28 30 20 32 35 35 | 20 22 2e 22 29 20 28 36 |e (0 255| ".") (6|
|00000c30| 35 20 39 30 20 22 77 22 | 29 20 28 39 37 20 31 32 |5 90 "w"|) (97 12|
|00000c40| 32 20 22 77 22 29 20 28 | 34 35 20 22 77 22 29 20 |2 "w") (|45 "w") |
|00000c50| 28 31 32 35 20 22 77 22 | 29 20 28 31 32 33 20 22 |(125 "w"|) (123 "|
|00000c60| 77 22 29 20 28 31 32 34 | 20 22 77 22 29 20 28 33 |w") (124| "w") (3|
|00000c70| 39 20 22 77 22 29 20 28 | 31 32 36 20 22 77 22 29 |9 "w") (|126 "w")|
|00000c80| 20 28 34 38 20 35 37 20 | 22 77 22 29 29 29 20 64 | (48 57 |"w"))) d|
|00000c90| 65 66 61 6c 69 61 73 20 | 6d 61 69 6c 2d 75 6e 64 |efalias |mail-und|
|00000ca0| 6f 2d 62 61 63 6b 73 6c | 61 73 68 2d 71 75 6f 74 |o-backsl|ash-quot|
|00000cb0| 69 6e 67 20 28 6d 61 63 | 72 6f 20 2e 20 23 5b 28 |ing (mac|ro . #[(|
|00000cc0| 62 65 67 20 65 6e 64 29 | 20 22 c0 c1 c2 0b 0c 45 |beg end)| ".....E|
|00000cd0| c5 c6 46 44 87 22 20 5b | 73 61 76 65 2d 65 78 63 |..FD." [|save-exc|
|00000ce0| 75 72 73 69 6f 6e 20 73 | 61 76 65 2d 72 65 73 74 |ursion s|ave-rest|
|00000cf0| 72 69 63 74 69 6f 6e 20 | 6e 61 72 72 6f 77 2d 74 |riction |narrow-t|
|00000d00| 6f 2d 72 65 67 69 6f 6e | 20 62 65 67 20 65 6e 64 |o-region| beg end|
|00000d10| 20 28 67 6f 74 6f 2d 63 | 68 61 72 20 28 70 6f 69 | (goto-c|har (poi|
|00000d20| 6e 74 2d 6d 69 6e 29 29 | 20 28 77 68 69 6c 65 20 |nt-min))| (while |
|00000d30| 28 72 65 2d 73 65 61 72 | 63 68 2d 66 6f 72 77 61 |(re-sear|ch-forwa|
|00000d40| 72 64 20 22 5c 5c 5c 5c | 5c 5c 28 2e 5c 5c 29 22 |rd "\\\\|\\(.\\)"|
|00000d50| 20 6e 69 6c 20 74 29 20 | 28 72 65 70 6c 61 63 65 | nil t) |(replace|
|00000d60| 2d 6d 61 74 63 68 20 22 | 5c 5c 31 22 29 29 5d 20 |-match "|\\1"))] |
|00000d70| 35 5d 29 20 6d 61 69 6c | 2d 6e 75 6b 65 2d 63 68 |5]) mail|-nuke-ch|
|00000d80| 61 72 2d 61 74 20 28 6d | 61 63 72 6f 20 2e 20 23 |ar-at (m|acro . #|
|00000d90| 5b 28 70 6f 73 29 20 22 | c0 c1 5c 6e 44 c3 c4 46 |[(pos) "|..\nD..F|
|00000da0| 87 22 20 5b 73 61 76 65 | 2d 65 78 63 75 72 73 69 |." [save|-excursi|
|00000db0| 6f 6e 20 67 6f 74 6f 2d | 63 68 61 72 20 70 6f 73 |on goto-|char pos|
|00000dc0| 20 28 64 65 6c 65 74 65 | 2d 63 68 61 72 20 31 29 | (delete|-char 1)|
|00000dd0| 20 28 69 6e 73 65 72 74 | 20 6d 61 69 6c 2d 73 70 | (insert| mail-sp|
|00000de0| 61 63 65 2d 63 68 61 72 | 29 5d 20 34 5d 29 20 6d |ace-char|)] 4]) m|
|00000df0| 61 69 6c 2d 6e 75 6b 65 | 2d 65 6c 65 6d 65 6e 74 |ail-nuke|-element|
|00000e00| 73 2d 6f 75 74 73 69 64 | 65 2d 72 61 6e 67 65 20 |s-outsid|e-range |
|00000e10| 28 6d 61 63 72 6f 20 2e | 20 23 5b 28 6c 69 73 74 |(macro .| #[(list|
|00000e20| 2d 73 79 6d 62 6f 6c 20 | 62 65 67 2d 73 79 6d 62 |-symbol |beg-symb|
|00000e30| 6f 6c 20 65 6e 64 2d 73 | 79 6d 62 6f 6c 20 26 6f |ol end-s|ymbol &o|
|00000e40| 70 74 69 6f 6e 61 6c 20 | 6e 6f 2d 72 65 70 6c 61 |ptional |no-repla|
|00000e50| 63 65 29 20 22 c0 c1 c2 | 0b 45 c4 c2 c5 c6 c7 c8 |ce) "...|.E......|
|00000e60| 0e 09 45 ca cb 0e 0c 45 | 45 0e 0d 86 1a 00 ce cf |..E....E|E.......|
|00000e70| 45 44 d0 46 c1 0b d1 d2 | 0b 45 45 46 87 22 20 5b |ED.F....|.EEF." [|
|00000e80| 70 72 6f 67 6e 20 73 65 | 74 71 20 74 65 6d 70 20 |progn se|tq temp |
|00000e90| 6c 69 73 74 2d 73 79 6d | 62 6f 6c 20 77 68 69 6c |list-sym|bol whil|
|00000ea0| 65 20 63 6f 6e 64 20 6f | 72 20 3e 20 28 63 61 72 |e cond o|r > (car|
|00000eb0| 20 74 65 6d 70 29 20 65 | 6e 64 2d 73 79 6d 62 6f | temp) e|nd-symbo|
|00000ec0| 6c 20 3c 20 28 63 61 72 | 20 74 65 6d 70 29 20 62 |l < (car| temp) b|
|00000ed0| 65 67 2d 73 79 6d 62 6f | 6c 20 6e 6f 2d 72 65 70 |eg-symbo|l no-rep|
|00000ee0| 6c 61 63 65 20 28 6d 61 | 69 6c 2d 6e 75 6b 65 2d |lace (ma|il-nuke-|
|00000ef0| 63 68 61 72 2d 61 74 20 | 28 63 61 72 20 74 65 6d |char-at |(car tem|
|00000f00| 70 29 29 20 28 73 65 74 | 63 61 72 20 74 65 6d 70 |p)) (set|car temp|
|00000f10| 20 6e 69 6c 29 20 28 73 | 65 74 71 20 74 65 6d 70 | nil) (s|etq temp|
|00000f20| 20 28 63 64 72 20 74 65 | 6d 70 29 29 20 64 65 6c | (cdr te|mp)) del|
|00000f30| 71 20 6e 69 6c 5d 20 31 | 30 5d 29 20 6d 61 69 6c |q nil] 1|0]) mail|
|00000f40| 2d 64 65 6d 61 72 6b 65 | 72 69 7a 65 20 23 5b 28 |-demarke|rize #[(|
|00000f50| 6d 61 72 6b 65 72 29 20 | 22 08 85 17 00 c1 08 21 |marker) |"......!|
|00000f60| 83 16 00 c2 08 21 1b 08 | c4 89 93 88 0b 29 87 08 |.....!..|.....)..|
|00000f70| 87 22 20 5b 6d 61 72 6b | 65 72 20 6d 61 72 6b 65 |." [mark|er marke|
|00000f80| 72 70 20 6d 61 72 6b 65 | 72 2d 70 6f 73 69 74 69 |rp marke|r-positi|
|00000f90| 6f 6e 20 74 65 6d 70 20 | 6e 69 6c 5d 20 33 5d 20 |on temp |nil] 3] |
|00000fa0| 6d 61 69 6c 2d 6d 61 72 | 6b 65 72 69 7a 65 20 23 |mail-mar|kerize #|
|00000fb0| 5b 28 70 6f 73 29 20 22 | 08 85 0f 00 c1 08 21 83 |[(pos) "|......!.|
|00000fc0| 0c 00 08 87 c2 08 21 87 | 22 20 5b 70 6f 73 20 6d |......!.|" [pos m|
|00000fd0| 61 72 6b 65 72 70 20 63 | 6f 70 79 2d 6d 61 72 6b |arkerp c|opy-mark|
|00000fe0| 65 72 5d 20 32 5d 5d 20 | 31 30 29 0a 28 64 65 66 |er] 2]] |10).(def|
|00000ff0| 61 6c 69 61 73 20 27 6d | 61 69 6c 2d 6c 61 73 74 |alias 'm|ail-last|
|00001000| 2d 65 6c 65 6d 65 6e 74 | 20 27 28 6d 61 63 72 6f |-element| '(macro|
|00001010| 20 2e 20 23 5b 28 6c 69 | 73 74 29 20 22 c0 c1 09 | . #[(li|st) "...|
|00001020| 44 43 c2 c3 46 87 22 20 | 5b 6c 65 74 20 6c 69 73 |DC..F." |[let lis|
|00001030| 74 20 28 77 68 69 6c 65 | 20 28 6e 6f 74 20 28 6e |t (while| (not (n|
|00001040| 75 6c 6c 20 28 63 64 72 | 20 6c 69 73 74 29 29 29 |ull (cdr| list)))|
|00001050| 20 28 73 65 74 71 20 6c | 69 73 74 20 28 63 64 72 | (setq l|ist (cdr|
|00001060| 20 6c 69 73 74 29 29 29 | 20 28 63 61 72 20 6c 69 | list)))| (car li|
|00001070| 73 74 29 5d 20 34 20 22 | 5c 0a 52 65 74 75 72 6e |st)] 4 "|\.Return|
|00001080| 20 6c 61 73 74 20 65 6c | 65 6d 65 6e 74 20 6f 66 | last el|ement of|
|00001090| 20 4c 49 53 54 2e 22 5d | 29 29 0a 28 64 65 66 61 | LIST."]|)).(defa|
|000010a0| 6c 69 61 73 20 27 6d 61 | 69 6c 2d 73 61 66 65 2d |lias 'ma|il-safe-|
|000010b0| 6d 6f 76 65 2d 73 65 78 | 70 20 27 28 6d 61 63 72 |move-sex|p '(macr|
|000010c0| 6f 20 2e 20 23 5b 28 61 | 72 67 29 20 22 c0 c1 c2 |o . #[(a|rg) "...|
|000010d0| c3 c4 c5 0e 06 45 44 c7 | 45 c8 46 87 22 20 5b 63 |.....ED.|E.F." [c|
|000010e0| 6f 6e 64 69 74 69 6f 6e | 2d 63 61 73 65 20 65 72 |ondition|-case er|
|000010f0| 72 6f 72 20 70 72 6f 67 | 6e 20 67 6f 74 6f 2d 63 |ror prog|n goto-c|
|00001100| 68 61 72 20 73 63 61 6e | 2d 73 65 78 70 73 20 28 |har scan|-sexps (|
|00001110| 70 6f 69 6e 74 29 20 61 | 72 67 20 74 20 28 65 72 |point) a|rg t (er|
|00001120| 72 6f 72 20 28 69 66 20 | 28 73 74 72 69 6e 67 2d |ror (if |(string-|
|00001130| 65 71 75 61 6c 20 28 6e | 74 68 20 31 20 65 72 72 |equal (n|th 1 err|
|00001140| 6f 72 29 20 22 55 6e 62 | 61 6c 61 6e 63 65 64 20 |or) "Unb|alanced |
|00001150| 70 61 72 65 6e 74 68 65 | 73 65 73 22 29 20 6e 69 |parenthe|ses") ni|
|00001160| 6c 20 28 77 68 69 6c 65 | 20 74 20 28 73 69 67 6e |l (while| t (sign|
|00001170| 61 6c 20 28 63 61 72 20 | 65 72 72 6f 72 29 20 28 |al (car |error) (|
|00001180| 63 64 72 20 65 72 72 6f | 72 29 29 29 29 29 5d 20 |cdr erro|r)))))] |
|00001190| 37 20 22 5c 0a 53 61 66 | 65 6c 79 20 73 6b 69 70 |7 "\.Saf|ely skip|
|000011a0| 20 6f 76 65 72 20 6f 6e | 65 20 62 61 6c 61 6e 63 | over on|e balanc|
|000011b0| 65 64 20 73 65 78 70 2c | 20 69 66 20 74 68 65 72 |ed sexp,| if ther|
|000011c0| 65 20 69 73 20 6f 6e 65 | 2e 20 20 52 65 74 75 72 |e is one|.  Retur|
|000011d0| 6e 20 74 20 69 66 20 73 | 75 63 63 65 73 73 2e 22 |n t if s|uccess."|
|000011e0| 5d 29 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 6d |])).(def|alias 'm|
|000011f0| 61 69 6c 2d 65 78 74 72 | 61 63 74 2d 61 64 64 72 |ail-extr|act-addr|
|00001200| 65 73 73 2d 63 6f 6d 70 | 6f 6e 65 6e 74 73 20 23 |ess-comp|onents #|
|00001210| 5b 28 61 64 64 72 65 73 | 73 29 20 22 c0 c1 21 c0 |[(addres|s) "..!.|
|00001220| c2 21 c3 c4 89 89 89 89 | 89 89 89 89 89 89 89 89 |.!......|........|
|00001230| 89 89 89 89 89 89 89 89 | 89 89 89 89 89 89 89 89 |........|........|
|00001240| 89 89 89 89 89 89 89 89 | 89 89 1d 1e 06 1e 07 1e |........|........|
|00001250| 08 1e 09 1e 5c 6e 1e 0b | 1e 0c 1e 0d 1e 0e 1e 0f |....\n..|........|
|00001260| 1e 10 1e 11 1e 12 1e 13 | 1e 14 1e 15 1e 16 1e 17 |........|........|
|00001270| 1e 18 1e 19 1e 1a 1e 1b | 1e 1c 1e 1d 1e 1e 1e 1f |........|........|
|00001280| 1e 20 1e 21 1e 5c 22 1e | 23 1e 24 1e 25 1e 26 1e |. .!.\".|#.$.%.&.|
|00001290| 27 1e 28 1e 29 1e 2a 1e | 2b 1e 2c 1e 2d 1e 2e 8a |'.(.).*.|+.,.-...|
|000012a0| 0e 2d 71 88 ef 0e 2d 21 | 88 f0 0e 31 21 88 7e 88 |.-q...-!|...1!.~.|
|000012b0| f2 20 88 c4 16 33 0e 34 | 0e 35 b1 02 88 65 62 88 |. ...3.4|.5...eb.|
|000012c0| f6 f7 c4 f8 23 83 b2 00 | f9 fa f8 5c 22 88 82 a2 |....#...|...\"...|
|000012d0| 00 65 62 88 0e 3b c4 77 | 88 6d 84 1e 02 60 66 16 |.eb..;.w|.m...`f.|
|000012e0| 2b 0e 1d 84 d1 00 0e 2b | fc 3d 84 d1 00 60 16 1d |+......+|.=...`..|
|000012f0| 0e 2b fc 3d 83 1b 01 f0 | 0e 3d 21 88 0e 19 84 f6 |.+.=....|.=!.....|
|00001300| 00 8a fe 75 88 0e 3b c4 | 77 88 60 66 29 ff 3d 84 |...u..;.|w.`f).=.|
|00001310| f6 00 60 16 19 81 40 00 | 81 41 00 81 42 00 8f 84 |..`...@.|.A..B...|
|00001320| 06 01 fe 75 88 f0 0e 31 | 21 88 0e 19 83 11 02 0e |...u...1|!.......|
|00001330| 18 84 11 02 60 16 18 82 | 11 02 0e 2b 81 43 00 3d |....`...|...+.C.=|
|00001340| 83 5f 01 0e 17 84 3f 01 | 8a fe 75 88 0e 3b c4 77 |._....?.|..u..;.w|
|00001350| 88 60 66 29 81 43 00 3d | 84 3f 01 60 16 17 81 40 |.`f).C.=|.?.`...@|
|00001360| 00 81 44 00 81 45 00 8f | 84 4f 01 fe 75 88 0e 17 |..D..E..|.O..u...|
|00001370| 83 11 02 0e 16 84 11 02 | 60 16 16 82 11 02 0e 2b |........|`......+|
|00001380| 81 46 00 3d 83 85 01 f0 | 0e 47 21 88 81 40 00 81 |.F.=....|.G!..@..|
|00001390| 48 00 81 49 00 8f 84 7d | 01 fe 75 88 f0 0e 31 21 |H..I...}|..u...1!|
|000013a0| 88 82 11 02 0e 2b 81 4a | 00 3d 83 c5 01 0e 29 83 |.....+.J|.=....).|
|000013b0| b5 01 0e 28 83 c5 01 0e | 29 89 1e 4b 41 83 aa 01 |...(....|)..KA...|
|000013c0| 0e 4b 41 89 16 4b 82 9d | 01 0e 4b 40 29 0e 28 40 |.KA..K..|..K@).(@|
|000013d0| 56 83 c5 01 f8 16 2a 81 | 4c 00 fe 21 88 65 60 7d |V.....*.|L..!.e`}|
|000013e0| 88 82 11 02 0e 2b 81 4d | 00 9e 41 89 16 1e 83 e1 |.....+.M|..A.....|
|000013f0| 01 0e 1e 60 0e 1e 4a 42 | 4c 88 fe 75 88 82 11 02 |...`..JB|L..u....|
|00001400| 0e 2b 81 4e 00 3d 83 f0 | 01 fe 75 88 82 11 02 0e |.+.N.=..|..u.....|
|00001410| 2b 81 4f 00 3e 83 0e 02 | 8a 60 62 88 81 4c 00 fe |+.O.>...|.`b..L..|
|00001420| 21 88 0e 34 63 88 29 fe | 75 88 82 11 02 fe 76 88 |!..4c.).|u.....v.|
|00001430| 0e 2b fc 3d 84 b5 00 60 | 16 1c 82 b5 00 0e 29 41 |.+.=...`|......)A|
|00001440| 83 3e 02 8a 0e 29 40 62 | 88 81 4c 00 fe 21 88 0e |.>...)@b|..L..!..|
|00001450| 34 63 88 29 0e 29 41 89 | 16 29 82 20 02 0e 28 41 |4c.).)A.|.). ..(A|
|00001460| 83 60 02 8a 0e 28 41 40 | 62 88 81 4c 00 fe 21 88 |.`...(A@|b..L..!.|
|00001470| 0e 34 63 88 29 0e 28 89 | 41 41 a1 88 82 3e 02 0e |.4c.).(.|AA...>..|
|00001480| 27 47 fe 56 83 84 02 0e | 26 83 84 02 0e 29 84 84 |'G.V....|&....)..|
|00001490| 02 65 62 88 81 4c 00 fe | 21 88 60 43 16 29 81 50 |.eb..L..|!.`C.).P|
|000014a0| 00 63 88 0e 29 83 9a 02 | 0e 28 84 9a 02 64 62 88 |.c..)...|.(...db.|
|000014b0| 60 43 16 28 81 51 00 63 | 88 0e 28 83 b8 02 0e 29 |`C.(.Q.c|..(....)|
|000014c0| 84 b8 02 8a 0e 28 40 62 | 88 81 4c 00 fe 21 88 0e |.....(@b|..L..!..|
|000014d0| 34 63 88 29 c4 16 28 0e | 28 40 16 28 0e 29 40 89 |4c.)..(.|(@.(.)@.|
|000014e0| 16 29 83 59 03 0e 27 89 | 16 10 83 ee 02 0e 10 40 |.).Y..'.|.......@|
|000014f0| 0e 28 56 84 e0 02 0e 10 | 40 0e 29 57 83 e5 02 0e |.(V.....|@.)W....|
|00001500| 10 c4 a0 88 0e 10 41 89 | 16 10 84 ce 02 81 52 00 |......A.|......R.|
|00001510| c4 0e 27 5c 22 16 27 0e | 24 89 16 10 83 1f 03 0e |..'\".'.|$.......|
|00001520| 10 40 0e 28 56 84 11 03 | 0e 10 40 0e 29 57 83 16 |.@.(V...|..@.)W..|
|00001530| 03 0e 10 c4 a0 88 0e 10 | 41 89 16 10 84 ff 02 81 |........|A.......|
|00001540| 52 00 c4 0e 24 5c 22 16 | 24 0e 23 89 16 10 83 50 |R...$\".|$.#....P|
|00001550| 03 0e 10 40 0e 28 56 84 | 42 03 0e 10 40 0e 29 57 |...@.(V.|B...@.)W|
|00001560| 83 47 03 0e 10 c4 a0 88 | 0e 10 41 89 16 10 84 30 |.G......|..A....0|
|00001570| 03 81 52 00 c4 0e 23 5c | 22 16 23 0e 26 83 d7 03 |..R...#\|".#.&...|
|00001580| 0e 26 40 16 10 0e 26 41 | 16 26 0e 29 83 be 03 0e |.&@...&A|.&.)....|
|00001590| 28 83 be 03 0e 10 0e 29 | 56 83 be 03 0e 10 0e 28 |(......)|V......(|
|000015a0| 57 83 be 03 0e 1f 84 a4 | 03 0e 27 47 81 53 00 57 |W.......|..'G.S.W|
|000015b0| 84 a4 03 0e 10 0e 27 40 | 56 84 a4 03 0e 10 0e 27 |......'@|V......'|
|000015c0| 41 40 57 83 b7 03 8a 0e | 10 62 88 81 4c 00 fe 21 |A@W.....|.b..L..!|
|000015d0| 88 0e 34 63 88 29 82 59 | 03 0e 10 16 1f 82 59 03 |..4c.).Y|......Y.|
|000015e0| 0e 29 83 d0 03 0e 29 83 | 59 03 0e 10 0e 29 57 83 |.)....).|Y....)W.|
|000015f0| 59 03 0e 10 16 21 82 59 | 03 0e 5c 22 83 2c 04 0e |Y....!.Y|..\".,..|
|00001600| 5c 22 40 16 10 0e 5c 22 | 41 16 5c 22 0e 29 83 13 |\"@...\"|A.\".)..|
|00001610| 04 0e 28 83 13 04 0e 10 | 0e 29 56 83 13 04 0e 10 |..(.....|.)V.....|
|00001620| 0e 28 57 83 13 04 8a 0e | 10 62 88 81 4c 00 fe 21 |.(W.....|.b..L..!|
|00001630| 88 0e 34 63 88 29 82 d7 | 03 0e 21 83 20 04 0e 10 |..4c.)..|..!. ...|
|00001640| 0e 21 56 83 d7 03 0e 20 | 84 d7 03 0e 10 16 20 82 |.!V.... |...... .|
|00001650| d7 03 0e 20 83 4f 05 0e | 24 89 16 10 83 59 04 0e |... .O..|$....Y..|
|00001660| 10 40 0e 20 56 84 4b 04 | 0e 10 40 0e 21 57 83 50 |.@. V.K.|..@.!W.P|
|00001670| 04 0e 10 c4 a0 88 0e 10 | 41 89 16 10 84 39 04 81 |........|A....9..|
|00001680| 52 00 c4 0e 24 5c 22 89 | 16 24 83 4f 05 0e 27 89 |R...$\".|.$.O..'.|
|00001690| 16 10 83 8e 04 0e 10 40 | 0e 20 56 84 80 04 0e 10 |.......@|. V.....|
|000016a0| 40 0e 21 57 83 85 04 0e | 10 c4 a0 88 0e 10 41 89 |@.!W....|......A.|
|000016b0| 16 10 84 6e 04 81 52 00 | c4 0e 27 5c 22 89 16 27 |...n..R.|..'\"..'|
|000016c0| 83 4f 05 0e 23 89 16 10 | 83 c3 04 0e 10 40 0e 20 |.O..#...|.....@. |
|000016d0| 56 84 b5 04 0e 10 40 0e | 21 57 83 ba 04 0e 10 c4 |V.....@.|!W......|
|000016e0| a0 88 0e 10 41 89 16 10 | 84 a3 04 81 52 00 c4 0e |....A...|....R...|
|000016f0| 23 5c 22 89 16 23 83 4f | 05 0e 25 89 16 10 83 f8 |#\"..#.O|..%.....|
|00001700| 04 0e 10 40 0e 20 56 84 | ea 04 0e 10 40 0e 21 57 |...@. V.|....@.!W|
|00001710| 83 ef 04 0e 10 c4 a0 88 | 0e 10 41 89 16 10 84 d8 |........|..A.....|
|00001720| 04 81 52 00 c4 0e 25 5c | 22 89 16 25 83 4f 05 0e |..R...%\|"..%.O..|
|00001730| 1c 83 4f 05 0e 1c 0e 20 | 54 56 83 4f 05 0e 20 54 |..O.... |TV.O.. T|
|00001740| 89 16 1c 83 4f 05 0e 18 | 83 4f 05 0e 18 0e 20 56 |....O...|.O.... V|
|00001750| 83 4f 05 c4 16 18 c4 89 | 16 19 83 4f 05 0e 16 83 |.O......|...O....|
|00001760| 4f 05 0e 16 0e 20 56 83 | 4f 05 c4 16 16 c4 89 16 |O.... V.|O.......|
|00001770| 17 83 4f 05 65 0e 20 7d | 88 0e 25 89 16 10 83 86 |..O.e. }|..%.....|
|00001780| 05 0e 10 40 fe 56 84 67 | 05 0e 10 40 fe 57 83 7d |...@.V.g|...@.W.}|
|00001790| 05 8a 0e 10 40 62 88 81 | 4c 00 fe 21 88 0e 34 63 |....@b..|L..!..4c|
|000017a0| 88 29 0e 10 c4 a0 88 0e | 10 41 89 16 10 84 57 05 |.)......|.A....W.|
|000017b0| 81 52 00 c4 0e 25 5c 22 | 16 25 0e 29 83 b8 05 0e |.R...%\"|.%.)....|
|000017c0| 29 62 88 0e 3b c4 78 88 | 60 16 1a 65 62 88 0e 3b |)b..;.x.|`..eb..;|
|000017d0| c4 77 88 60 0e 1a 57 83 | b5 05 60 16 1b 82 b8 05 |.w.`..W.|..`.....|
|000017e0| c4 16 1a 0e 1f 83 65 06 | c4 16 24 c4 16 23 81 54 |......e.|..$..#.T|
|000017f0| 00 0e 28 21 16 28 81 54 | 00 0e 1f 21 16 1f 0e 28 |..(!.(.T|...!...(|
|00001800| 62 88 81 55 00 81 56 00 | 21 88 0e 27 40 62 88 0e |b..U..V.|!..'@b..|
|00001810| 27 41 89 16 27 83 28 06 | 81 4c 00 fe 21 88 81 57 |'A..'.(.|.L..!..W|
|00001820| 00 20 0e 23 42 16 23 81 | 58 00 63 88 0e 28 53 62 |. .#B.#.|X.c..(Sb|
|00001830| 88 8a 81 59 00 0e 2d 0e | 27 40 0e 1f 23 88 0e 27 |...Y..-.|'@..#..'|
|00001840| 40 0e 1f 7c 88 29 0e 27 | 41 84 e4 05 60 43 16 08 |@..|.).'|A...`C..|
|00001850| 82 e4 05 0e 08 16 27 0e | 28 62 88 81 4c 00 81 5a |......'.|(b..L..Z|
|00001860| 00 21 88 8a 0e 1f 62 88 | 81 4c 00 fe 21 88 0e 34 |.!....b.|.L..!..4|
|00001870| 63 88 29 81 5b 00 0e 1f | 21 88 c4 16 1f 81 5b 00 |c.).[...|!.....[.|
|00001880| 0e 28 21 16 28 81 5c 5c | 00 81 5b 00 0e 23 5c 22 |.(!.(.\\|..[..#\"|
|00001890| 16 23 0e 27 40 16 27 0e | 2e 71 88 ef 0e 2e 21 88 |.#.'@.'.|.q....!.|
|000018a0| f0 0e 31 21 88 c4 16 33 | 7e 88 f2 20 88 81 59 00 |..1!...3|~.. ..Y.|
|000018b0| 0e 2d 21 88 0e 29 83 9e | 06 0e 29 54 62 88 0e 3b |.-!..)..|..)Tb..;|
|000018c0| c4 77 88 60 0e 28 7d 88 | 82 a4 06 0e 1d 0e 1c 7d |.w.`.(}.|.......}|
|000018d0| 88 0e 27 83 ef 06 0e 23 | 83 ef 06 0e 23 89 16 10 |..'....#|....#...|
|000018e0| 83 e6 06 0e 10 40 0e 27 | 56 84 c7 06 0e 10 40 65 |.....@.'|V.....@e|
|000018f0| 57 83 dd 06 8a 0e 10 40 | 62 88 81 4c 00 fe 21 88 |W......@|b..L..!.|
|00001900| 0e 34 63 88 29 0e 10 c4 | a0 88 0e 10 41 89 16 10 |.4c.)...|....A...|
|00001910| 84 b6 06 81 52 00 c4 0e | 23 5c 22 16 23 0e 23 83 |....R...|#\".#.#.|
|00001920| 3b 07 0e 24 83 3b 07 0e | 24 89 16 10 83 32 07 0e |;..$.;..|$....2..|
|00001930| 10 40 0e 23 40 56 84 13 | 07 0e 10 40 65 57 83 29 |.@.#@V..|...@eW.)|
|00001940| 07 8a 0e 10 40 62 88 81 | 4c 00 fe 21 88 0e 34 63 |....@b..|L..!..4c|
|00001950| 88 29 0e 10 c4 a0 88 0e | 10 41 89 16 10 84 01 07 |.)......|.A......|
|00001960| 81 52 00 c4 0e 24 5c 22 | 16 24 0e 27 83 8b 07 0e |.R...$\"|.$.'....|
|00001970| 24 83 8b 07 0e 23 84 8b | 07 0e 24 89 16 10 83 82 |$....#..|..$.....|
|00001980| 07 0e 10 40 0e 27 56 84 | 63 07 0e 10 40 65 57 83 |...@.'V.|c...@eW.|
|00001990| 79 07 8a 0e 10 40 62 88 | 81 4c 00 fe 21 88 0e 34 |y....@b.|.L..!..4|
|000019a0| 63 88 29 0e 10 c4 a0 88 | 0e 10 41 89 16 10 84 52 |c.).....|..A....R|
|000019b0| 07 81 52 00 c4 0e 24 5c | 22 16 24 0e 24 83 d1 08 |..R...$\|".$.$...|
|000019c0| 8c 0e 27 83 b8 07 0e 5d | 83 b8 07 0e 27 62 88 60 |..'....]|....'b.`|
|000019d0| 0e 23 42 16 23 c4 16 27 | 81 4c 00 fe 21 88 81 58 |.#B.#..'|.L..!..X|
|000019e0| 00 63 88 64 15 82 0c 08 | 0e 5d 83 c2 07 64 15 82 |.c.d....|.]...d..|
|000019f0| 0c 08 0e 23 83 f7 07 0e | 23 89 1e 4b 41 83 d9 07 |...#....|#..KA...|
|00001a00| 0e 4b 41 89 16 4b 82 cc | 07 0e 4b 40 29 15 81 5c |.KA..K..|..K@)..\|
|00001a10| 5c 00 81 5e 00 0e 23 5c | 22 16 5c 6e c4 16 23 81 |\..^..#\|".\n..#.|
|00001a20| 5e 00 0e 27 21 16 27 82 | 0c 08 0e 27 83 5c 6e 08 |^..'!.'.|...'.\n.|
|00001a30| 0e 27 15 81 5e 00 0e 27 | 21 16 27 82 0c 08 64 15 |.'..^..'|!.'...d.|
|00001a40| 65 0d 7d 88 0e 24 40 16 | 09 0e 24 83 ac 08 64 62 |e.}..$@.|..$...db|
|00001a50| 88 0e 27 84 36 08 0e 24 | 41 84 36 08 60 16 27 81 |..'.6..$|A.6.`.'.|
|00001a60| 55 00 81 5f 00 21 88 82 | 44 08 60 0e 23 42 16 23 |U.._.!..|D.`.#B.#|
|00001a70| 81 55 00 81 60 00 21 88 | 81 61 00 fe 21 88 81 59 |.U..`.!.|.a..!..Y|
|00001a80| 00 70 0e 24 41 40 83 5d | 08 0e 24 41 40 54 82 5e |.p.$A@.]|..$A@T.^|
|00001a90| 08 65 0e 24 40 23 88 81 | 4c 00 fe 21 88 8a 81 40 |.e.$@#..|L..!...@|
|00001aa0| 00 81 62 00 81 63 00 8f | 88 0e 3b c4 78 88 68 29 |..b..c..|..;.x.h)|
|00001ab0| 81 4e 00 3d 84 a3 08 81 | 55 00 8a 0e 3b c4 78 88 |.N.=....|U...;.x.|
|00001ac0| 68 29 81 4e 00 3d 83 9b | 08 81 64 00 82 9e 08 81 |h).N.=..|..d.....|
|00001ad0| 65 00 81 66 00 5c 22 88 | 0e 24 41 89 16 24 84 1a |e..f.\".|.$A..$..|
|00001ae0| 08 29 0e 5c 6e 83 c3 08 | 81 67 00 81 5c 5c 00 81 |.).\n...|.g..\\..|
|00001af0| 5b 00 0e 5c 6e 5c 22 0e | 23 5c 22 16 23 81 5b 00 |[..\n\".|#\".#.[.|
|00001b00| 0e 27 21 16 27 0e 09 54 | 64 7d 88 0e 23 83 f3 08 |.'!.'..T|d}..#...|
|00001b10| 0e 27 84 f3 08 0e 23 40 | 62 88 81 4c 00 fe 21 88 |.'....#@|b..L..!.|
|00001b20| 60 16 27 81 68 00 63 88 | 0e 23 41 16 23 0e 23 9f |`.'.h.c.|.#A.#.#.|
|00001b30| 16 23 81 69 00 0e 23 40 | 86 07 09 0e 27 86 07 09 |.#.i..#@|....'...|
|00001b40| 64 64 5c 22 88 0e 23 83 | 1b 09 0e 23 16 10 81 6a |dd\"..#.|...#...j|
|00001b50| 00 81 6b 00 8d 88 65 16 | 13 0e 23 83 29 09 0e 23 |..k...e.|..#.)..#|
|00001b60| 40 82 2f 09 0e 27 86 2f | 09 64 16 12 0e 2d 71 88 |@./..'./|.d...-q.|
|00001b70| 0e 1b 83 72 09 0e 17 0e | 1b 3d 83 72 09 0e 16 0e |...r....|.=.r....|
|00001b80| 1a 58 83 72 09 0e 17 54 | 0e 16 53 7d 88 8a 8c 65 |.X.r...T|..S}...e|
|00001b90| 64 7d 88 65 62 88 f6 81 | 6c 00 c4 f8 23 83 6e 09 |d}.eb...|l...#.n.|
|00001ba0| f9 81 6d 00 21 88 82 5b | 09 2a 82 c6 5c 6e 0e 1b |..m.!..[|.*..\n..|
|00001bb0| 83 80 09 0e 1b 0e 1a 7d | 88 82 c6 5c 6e 0e 19 83 |.......}|...\n...|
|00001bc0| ad 09 0e 19 54 0e 18 53 | 7d 88 8a 8c 65 64 7d 88 |....T..S|}...ed}.|
|00001bd0| 65 62 88 f6 81 6c 00 c4 | f8 23 83 a9 09 f9 81 6d |eb...l..|.#.....m|
|00001be0| 00 21 88 82 96 09 2a 82 | c6 5c 6e 65 64 7c 88 81 |.!....*.|.\ned|..|
|00001bf0| 59 00 0e 2e 0e 13 0e 12 | 23 88 65 62 88 81 6e 00 |Y.......|#.eb..n.|
|00001c00| 81 6f 00 c4 f8 23 16 11 | 65 62 88 0e 3b c4 77 88 |.o...#..|eb..;.w.|
|00001c10| 6d 84 c6 5c 6e 60 66 89 | 16 2b 81 43 00 3d 83 46 |m..\n`f.|.+.C.=.F|
|00001c20| 5c 6e 60 16 17 81 40 00 | 81 70 00 81 71 00 8f 84 |\n`...@.|.p..q...|
|00001c30| f5 09 fe 75 88 60 81 53 | 00 5a 16 16 8a 81 61 00 |...u.`.S|.Z....a.|
|00001c40| fe 21 88 81 4c 00 fe 21 | 88 0e 17 62 88 81 4c 00 |.!..L..!|...b..L.|
|00001c50| fe 21 88 29 8a 8c 0e 17 | 0e 16 7d 88 65 62 88 f6 |.!.)....|..}.eb..|
|00001c60| 81 6c 00 c4 f8 23 83 32 | 5c 6e f9 81 6d 00 21 88 |.l...#.2|\n..m.!.|
|00001c70| 82 1f 5c 6e 2a 0e 34 60 | 66 3d 84 40 5c 6e 81 72 |..\n*.4`|f=.@\n.r|
|00001c80| 00 63 88 f8 16 11 82 cd | 09 0e 2b 81 4e 00 3d 83 |.c......|..+.N.=.|
|00001c90| 83 5c 6e 60 54 66 81 73 | 00 3d 83 69 5c 6e fe 75 |.\n`Tf.s|.=.i\n.u|
|00001ca0| 88 81 4c 00 fe 21 88 0e | 34 63 88 82 cd 09 0e 11 |..L..!..|4c......|
|00001cb0| 83 75 5c 6e 65 60 7d 88 | 82 cd 09 81 4c 00 fe 21 |.u\ne`}.|....L..!|
|00001cc0| 88 81 72 00 63 88 82 cd | 09 0e 2b 7a 81 74 00 3e |..r.c...|..+z.t.>|
|00001cd0| 83 9b 5c 6e 81 4c 00 fe | 21 88 81 72 00 63 88 82 |..\n.L..|!..r.c..|
|00001ce0| cd 09 60 16 15 fe 76 88 | 60 16 14 8c 0e 15 0e 14 |..`...v.|`.......|
|00001cf0| 7d 88 65 62 88 f6 81 75 | 00 c4 f8 23 83 bf 5c 6e |}.eb...u|...#..\n|
|00001d00| f9 fa 21 88 82 ae 5c 6e | 64 62 88 29 82 cd 09 f0 |..!...\n|db.)....|
|00001d10| 0e 76 21 88 81 77 00 81 | 78 00 20 21 16 79 65 64 |.v!..w..|x. !.yed|
|00001d20| 7c 88 0e 79 63 88 65 62 | 88 0e 12 0e 13 5a 81 7a ||..yc.eb|.....Z.z|
|00001d30| 00 3d 83 4c 0b 65 62 88 | 81 7b 00 0e 7c 21 83 4c |.=.L.eb.|.{..|!.L|
|00001d40| 0b 81 7d 00 94 66 16 0d | 81 7a 00 94 66 16 0b 8a |..}..f..|.z..f...|
|00001d50| 0e 2e 71 88 f8 1e 33 81 | 7e 00 0e 0d 0e 13 66 5c |..q...3.|~.....f\|
|00001d60| 22 83 2d 0b 81 7e 00 0e | 0b 0e 12 53 66 5c 22 83 |".-..~..|...Sf\".|
|00001d70| 2d 0b 0e 13 54 66 16 0c | 2a 0e 0c 83 4c 0b 0e 0c |-...Tf..|*...L...|
|00001d80| 7a 81 7f 00 3d 83 4c 0b | 81 7a 00 94 62 88 0e 0c |z...=.L.|.z..b...|
|00001d90| 96 81 80 00 b1 02 88 81 | 78 00 20 0e 2e 71 88 81 |........|x. ..q..|
|00001da0| 78 00 20 2e 2b 44 87 22 | 20 5b 67 65 74 2d 62 75 |x. .+D."| [get-bu|
|00001db0| 66 66 65 72 2d 63 72 65 | 61 74 65 20 22 2a 63 61 |ffer-cre|ate "*ca|
|00001dc0| 6e 6f 6e 69 63 61 6c 20 | 61 64 64 72 65 73 73 2a |nonical |address*|
|00001dd0| 22 20 22 2a 65 78 74 72 | 61 63 74 20 61 64 64 72 |" "*extr|act addr|
|00001de0| 65 73 73 20 63 6f 6d 70 | 6f 6e 65 6e 74 73 2a 22 |ess comp|onents*"|
|00001df0| 20 62 61 72 20 6e 69 6c | 20 69 6e 73 65 72 74 2d | bar nil| insert-|
|00001e00| 70 6f 69 6e 74 20 5c 2e | 2d 70 6f 73 20 64 6f 6d |point \.|-pos dom|
|00001e10| 61 69 6e 2d 70 6f 73 20 | 73 61 76 65 64 2d 40 2d |ain-pos |saved-@-|
|00001e20| 70 6f 73 20 73 61 76 65 | 64 2d 21 2d 70 6f 73 20 |pos save|d-!-pos |
|00001e30| 73 61 76 65 64 2d 25 2d | 70 6f 73 20 6c 69 20 6d |saved-%-|pos li m|
|00001e40| 69 20 66 69 20 73 61 76 | 65 64 2d 70 6f 69 6e 74 |i fi sav|ed-point|
|00001e50| 20 6e 61 6d 65 2d 73 75 | 66 66 69 78 20 74 65 6d | name-su|ffix tem|
|00001e60| 70 20 5c 2e 2d 65 6e 64 | 73 2d 6e 61 6d 65 20 6d |p \.-end|s-name m|
|00001e70| 62 6f 78 2d 65 6e 64 20 | 6d 62 6f 78 2d 62 65 67 |box-end |mbox-beg|
|00001e80| 20 61 74 6f 6d 2d 65 6e | 64 20 61 74 6f 6d 2d 62 | atom-en|d atom-b|
|00001e90| 65 67 20 71 75 6f 74 65 | 2d 65 6e 64 20 71 75 6f |eg quote|-end quo|
|00001ea0| 74 65 2d 62 65 67 20 63 | 6f 6d 6d 65 6e 74 2d 65 |te-beg c|omment-e|
|00001eb0| 6e 64 20 63 6f 6d 6d 65 | 6e 74 2d 62 65 67 20 70 |nd comme|nt-beg p|
|00001ec0| 68 72 61 73 65 2d 65 6e | 64 20 70 68 72 61 73 65 |hrase-en|d phrase|
|00001ed0| 2d 62 65 67 20 6c 61 73 | 74 2d 72 65 61 6c 2d 70 |-beg las|t-real-p|
|00001ee0| 6f 73 20 66 69 72 73 74 | 2d 72 65 61 6c 2d 70 6f |os first|-real-po|
|00001ef0| 73 20 72 65 63 6f 72 64 | 2d 70 6f 73 2d 73 79 6d |s record|-pos-sym|
|00001f00| 62 6f 6c 20 72 6f 75 74 | 65 2d 61 64 64 72 2d 3a |bol rout|e-addr-:|
|00001f10| 2d 70 6f 73 20 67 72 6f | 75 70 2d 5c 3b 2d 70 6f |-pos gro|up-\;-po|
|00001f20| 73 20 67 72 6f 75 70 2d | 3a 2d 70 6f 73 20 5c 3b |s group-|:-pos \;|
|00001f30| 2d 70 6f 73 20 25 2d 70 | 6f 73 20 21 2d 70 6f 73 |-pos %-p|os !-pos|
|00001f40| 20 5c 2c 2d 70 6f 73 20 | 3a 2d 70 6f 73 20 40 2d | \,-pos |:-pos @-|
|00001f50| 70 6f 73 20 3e 2d 70 6f | 73 20 3c 2d 70 6f 73 20 |pos >-po|s <-pos |
|00001f60| 6d 75 6c 74 69 70 6c 65 | 2d 61 64 64 72 65 73 73 |multiple|-address|
|00001f70| 65 73 20 63 68 61 72 20 | 66 6f 6f 20 65 78 74 72 |es char |foo extr|
|00001f80| 61 63 74 69 6f 6e 2d 62 | 75 66 66 65 72 20 63 61 |action-b|uffer ca|
|00001f90| 6e 6f 6e 69 63 61 6c 69 | 7a 61 74 69 6f 6e 2d 62 |nonicali|zation-b|
|00001fa0| 75 66 66 65 72 20 62 75 | 66 66 65 72 2d 64 69 73 |uffer bu|ffer-dis|
|00001fb0| 61 62 6c 65 2d 75 6e 64 | 6f 20 73 65 74 2d 73 79 |able-und|o set-sy|
|00001fc0| 6e 74 61 78 2d 74 61 62 | 6c 65 20 61 64 64 72 65 |ntax-tab|le addre|
|00001fd0| 73 73 2d 73 79 6e 74 61 | 78 2d 74 61 62 6c 65 20 |ss-synta|x-table |
|00001fe0| 65 72 61 73 65 2d 62 75 | 66 66 65 72 20 63 61 73 |erase-bu|ffer cas|
|00001ff0| 65 2d 66 6f 6c 64 2d 73 | 65 61 72 63 68 20 6d 61 |e-fold-s|earch ma|
|00002000| 69 6c 2d 73 70 61 63 65 | 2d 63 68 61 72 20 61 64 |il-space|-char ad|
|00002010| 64 72 65 73 73 20 72 65 | 2d 73 65 61 72 63 68 2d |dress re|-search-|
|00002020| 66 6f 72 77 61 72 64 20 | 22 5c 5c 28 5b 5e 5c 5c |forward |"\\([^\\|
|00002030| 5d 5c 5c 28 5c 5c 5c 5c | 5c 5c 5c 5c 5c 5c 29 2a |]\\(\\\\|\\\\\\)*|
|00002040| 5c 5c 29 5c 6e 5b 20 09 | 5d 22 20 74 20 72 65 70 |\\)\n[ .|]" t rep|
|00002050| 6c 61 63 65 2d 6d 61 74 | 63 68 20 22 5c 5c 31 20 |lace-mat|ch "\\1 |
|00002060| 22 20 6d 61 69 6c 2d 77 | 68 69 74 65 73 70 61 63 |" mail-w|hitespac|
|00002070| 65 20 34 30 20 61 64 64 | 72 65 73 73 2d 63 6f 6d |e 40 add|ress-com|
|00002080| 6d 65 6e 74 2d 73 79 6e | 74 61 78 2d 74 61 62 6c |ment-syn|tax-tabl|
|00002090| 65 20 31 20 34 31 20 65 | 72 72 6f 72 20 28 62 79 |e 1 41 e|rror (by|
|000020a0| 74 65 2d 63 6f 64 65 20 | 22 c0 60 c1 5c 22 62 88 |te-code |".`.\"b.|
|000020b0| c2 87 22 20 5b 73 63 61 | 6e 2d 73 65 78 70 73 20 |.." [sca|n-sexps |
|000020c0| 31 20 74 5d 20 33 29 20 | 28 28 65 72 72 6f 72 20 |1 t] 3) |((error |
|000020d0| 28 62 79 74 65 2d 63 6f | 64 65 20 22 08 41 40 c1 |(byte-co|de ".A@.|
|000020e0| 98 3f 85 13 00 c2 08 40 | 08 41 5c 22 88 82 09 00 |.?.....@|.A\"....|
|000020f0| 87 22 20 5b 65 72 72 6f | 72 20 22 55 6e 62 61 6c |." [erro|r "Unbal|
|00002100| 61 6e 63 65 64 20 70 61 | 72 65 6e 74 68 65 73 65 |anced pa|renthese|
|00002110| 73 22 20 73 69 67 6e 61 | 6c 5d 20 33 29 29 29 20 |s" signa|l] 3))) |
|00002120| 33 34 20 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |34 (byte|-code ".|
|00002130| 60 c1 5c 22 62 88 c2 87 | 22 20 5b 73 63 61 6e 2d |`.\"b...|" [scan-|
|00002140| 73 65 78 70 73 20 31 20 | 74 5d 20 33 29 20 28 28 |sexps 1 |t] 3) ((|
|00002150| 65 72 72 6f 72 20 28 62 | 79 74 65 2d 63 6f 64 65 |error (b|yte-code|
|00002160| 20 22 08 41 40 c1 98 3f | 85 13 00 c2 08 40 08 41 | ".A@..?|.....@.A|
|00002170| 5c 22 88 82 09 00 87 22 | 20 5b 65 72 72 6f 72 20 |\"....."| [error |
|00002180| 22 55 6e 62 61 6c 61 6e | 63 65 64 20 70 61 72 65 |"Unbalan|ced pare|
|00002190| 6e 74 68 65 73 65 73 22 | 20 73 69 67 6e 61 6c 5d |ntheses"| signal]|
|000021a0| 20 33 29 29 29 20 39 31 | 20 61 64 64 72 65 73 73 | 3))) 91| address|
|000021b0| 2d 64 6f 6d 61 69 6e 2d | 6c 69 74 65 72 61 6c 2d |-domain-|literal-|
|000021c0| 73 79 6e 74 61 78 2d 74 | 61 62 6c 65 20 28 62 79 |syntax-t|able (by|
|000021d0| 74 65 2d 63 6f 64 65 20 | 22 c0 60 c1 5c 22 62 88 |te-code |".`.\"b.|
|000021e0| c2 87 22 20 5b 73 63 61 | 6e 2d 73 65 78 70 73 20 |.." [sca|n-sexps |
|000021f0| 31 20 74 5d 20 33 29 20 | 28 28 65 72 72 6f 72 20 |1 t] 3) |((error |
|00002200| 28 62 79 74 65 2d 63 6f | 64 65 20 22 08 41 40 c1 |(byte-co|de ".A@.|
|00002210| 98 3f 85 13 00 c2 08 40 | 08 41 5c 22 88 82 09 00 |.?.....@|.A\"....|
|00002220| 87 22 20 5b 65 72 72 6f | 72 20 22 55 6e 62 61 6c |." [erro|r "Unbal|
|00002230| 61 6e 63 65 64 20 70 61 | 72 65 6e 74 68 65 73 65 |anced pa|renthese|
|00002240| 73 22 20 73 69 67 6e 61 | 6c 5d 20 33 29 29 29 20 |s" signa|l] 3))) |
|00002250| 34 34 20 6c 69 73 74 20 | 64 65 6c 65 74 65 2d 63 |44 list |delete-c|
|00002260| 68 61 72 20 28 28 36 30 | 20 2e 20 3c 2d 70 6f 73 |har ((60| . <-pos|
|00002270| 29 20 28 36 32 20 2e 20 | 3e 2d 70 6f 73 29 20 28 |) (62 . |>-pos) (|
|00002280| 36 34 20 2e 20 40 2d 70 | 6f 73 29 20 28 35 38 20 |64 . @-p|os) (58 |
|00002290| 2e 20 3a 2d 70 6f 73 29 | 20 28 34 34 20 2e 20 5c |. :-pos)| (44 . \|
|000022a0| 2c 2d 70 6f 73 29 20 28 | 33 33 20 2e 20 21 2d 70 |,-pos) (|33 . !-p|
|000022b0| 6f 73 29 20 28 33 37 20 | 2e 20 25 2d 70 6f 73 29 |os) (37 |. %-pos)|
|000022c0| 20 28 35 39 20 2e 20 5c | 3b 2d 70 6f 73 29 29 20 | (59 . \|;-pos)) |
|000022d0| 34 36 20 28 34 31 20 39 | 33 20 39 32 29 20 36 30 |46 (41 9|3 92) 60|
|000022e0| 20 36 32 20 64 65 6c 71 | 20 32 20 63 6f 70 79 2d | 62 delq| 2 copy-|
|000022f0| 6d 61 72 6b 65 72 20 69 | 6e 73 65 72 74 2d 62 65 |marker i|nsert-be|
|00002300| 66 6f 72 65 2d 6d 61 72 | 6b 65 72 73 20 38 38 20 |fore-mar|kers 88 |
|00002310| 70 6f 69 6e 74 2d 6d 61 | 72 6b 65 72 20 22 25 22 |point-ma|rker "%"|
|00002320| 20 69 6e 73 65 72 74 2d | 62 75 66 66 65 72 2d 73 | insert-|buffer-s|
|00002330| 75 62 73 74 72 69 6e 67 | 20 2d 31 20 6d 61 69 6c |ubstring| -1 mail|
|00002340| 2d 64 65 6d 61 72 6b 65 | 72 69 7a 65 20 6d 61 70 |-demarke|rize map|
|00002350| 63 61 72 20 6d 61 69 6c | 2d 40 2d 62 69 6e 64 73 |car mail|-@-binds|
|00002360| 2d 74 69 67 68 74 65 72 | 2d 74 68 61 6e 2d 21 20 |-tighter|-than-! |
|00002370| 6d 61 69 6c 2d 6d 61 72 | 6b 65 72 69 7a 65 20 22 |mail-mar|kerize "|
|00002380| 40 20 22 20 22 25 20 22 | 20 62 61 63 6b 77 61 72 |@ " "% "| backwar|
|00002390| 64 2d 63 68 61 72 20 28 | 62 79 74 65 2d 63 6f 64 |d-char (|byte-cod|
|000023a0| 65 20 22 c0 60 c1 5c 22 | 62 87 22 20 5b 73 63 61 |e ".`.\"|b." [sca|
|000023b0| 6e 2d 73 65 78 70 73 20 | 2d 31 5d 20 33 29 20 28 |n-sexps |-1] 3) (|
|000023c0| 28 65 72 72 6f 72 20 28 | 62 79 74 65 2d 63 6f 64 |(error (|byte-cod|
|000023d0| 65 20 22 08 41 40 c1 98 | 84 12 00 c2 08 40 08 41 |e ".A@..|.....@.A|
|000023e0| 5c 22 88 82 08 00 c3 87 | 22 20 5b 65 72 72 6f 72 |\"......|" [error|
|000023f0| 20 22 55 6e 62 61 6c 61 | 6e 63 65 64 20 70 61 72 | "Unbala|nced par|
|00002400| 65 6e 74 68 65 73 65 73 | 22 20 73 69 67 6e 61 6c |entheses|" signal|
|00002410| 20 74 5d 20 33 29 29 29 | 20 22 22 20 22 2e 22 20 | t] 3)))| "" "." |
|00002420| 22 75 75 63 70 22 20 61 | 70 70 65 6e 64 20 22 40 |"uucp" a|ppend "@|
|00002430| 22 20 64 6f 77 6e 63 61 | 73 65 2d 72 65 67 69 6f |" downca|se-regio|
|00002440| 6e 20 74 72 75 6e 63 61 | 74 65 64 20 28 62 79 74 |n trunca|ted (byt|
|00002450| 65 2d 63 6f 64 65 20 22 | 08 83 5c 5c 00 08 41 40 |e-code "|..\\..A@|
|00002460| 86 0b 00 09 62 88 5c 6e | c3 78 88 8a c4 c5 c6 8f |....b.\n|.x......|
|00002470| 88 60 16 07 5c 6e c3 78 | 88 68 c8 3d 16 09 29 0e |.`..\n.x|.h.=..).|
|00002480| 09 83 55 00 ca 0e 07 60 | 7b 21 cb 4e 83 55 00 65 |..U....`|{!.N.U.e|
|00002490| 60 7d 88 08 40 62 88 cc | cd 21 88 60 11 08 c3 a1 |`}..@b..|.!.`....|
|000024a0| 88 ce 09 0e 0f 5c 22 16 | 0f d0 63 88 d1 d2 d3 5c |.....\".|..c....\|
|000024b0| 22 88 08 41 89 10 84 04 | 00 c3 87 22 20 5b 74 65 |"..A....|..." [te|
|000024c0| 6d 70 20 40 2d 70 6f 73 | 20 6d 61 69 6c 2d 77 68 |mp @-pos| mail-wh|
|000024d0| 69 74 65 73 70 61 63 65 | 20 6e 69 6c 20 65 72 72 |itespace| nil err|
|000024e0| 6f 72 20 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |or (byte|-code ".|
|000024f0| 60 c1 5c 22 62 87 22 20 | 5b 73 63 61 6e 2d 73 65 |`.\"b." |[scan-se|
|00002500| 78 70 73 20 2d 31 5d 20 | 33 29 20 28 28 65 72 72 |xps -1] |3) ((err|
|00002510| 6f 72 20 28 62 79 74 65 | 2d 63 6f 64 65 20 22 08 |or (byte|-code ".|
|00002520| 41 40 c1 98 84 12 00 c2 | 08 40 08 41 5c 22 88 82 |A@......|.@.A\"..|
|00002530| 08 00 c3 87 22 20 5b 65 | 72 72 6f 72 20 22 55 6e |...." [e|rror "Un|
|00002540| 62 61 6c 61 6e 63 65 64 | 20 70 61 72 65 6e 74 68 |balanced| parenth|
|00002550| 65 73 65 73 22 20 73 69 | 67 6e 61 6c 20 74 5d 20 |eses" si|gnal t] |
|00002560| 33 29 29 29 20 64 6f 6d | 61 69 6e 2d 70 6f 73 20 |3))) dom|ain-pos |
|00002570| 34 36 20 5c 2e 2d 70 6f | 73 20 69 6e 74 65 72 6e |46 \.-po|s intern|
|00002580| 20 64 6f 6d 61 69 6e 2d | 6e 61 6d 65 20 64 65 6c | domain-|name del|
|00002590| 65 74 65 2d 63 68 61 72 | 20 31 20 64 65 6c 71 20 |ete-char| 1 delq |
|000025a0| 25 2d 70 6f 73 20 22 40 | 22 20 74 68 72 6f 77 20 |%-pos "@|" throw |
|000025b0| 74 72 75 6e 63 61 74 65 | 64 20 74 5d 20 34 29 20 |truncate|d t] 4) |
|000025c0| 22 5c 5c 5c 5c 5c 5c 28 | 2e 5c 5c 29 22 20 22 5c |"\\\\\\(|.\\)" "\|
|000025d0| 5c 31 22 20 73 65 61 72 | 63 68 2d 66 6f 72 77 61 |\1" sear|ch-forwa|
|000025e0| 72 64 20 22 5f 22 20 28 | 62 79 74 65 2d 63 6f 64 |rd "_" (|byte-cod|
|000025f0| 65 20 22 c0 60 c1 5c 22 | 62 88 c2 87 22 20 5b 73 |e ".`.\"|b..." [s|
|00002600| 63 61 6e 2d 73 65 78 70 | 73 20 31 20 74 5d 20 33 |can-sexp|s 1 t] 3|
|00002610| 29 20 28 28 65 72 72 6f | 72 20 28 62 79 74 65 2d |) ((erro|r (byte-|
|00002620| 63 6f 64 65 20 22 08 41 | 40 c1 98 3f 85 13 00 c2 |code ".A|@..?....|
|00002630| 08 40 08 41 5c 22 88 82 | 09 00 87 22 20 5b 65 72 |.@.A\"..|..." [er|
|00002640| 72 6f 72 20 22 55 6e 62 | 61 6c 61 6e 63 65 64 20 |ror "Unb|alanced |
|00002650| 70 61 72 65 6e 74 68 65 | 73 65 73 22 20 73 69 67 |parenthe|ses" sig|
|00002660| 6e 61 6c 5d 20 33 29 29 | 29 20 22 20 22 20 39 35 |nal] 3))|) " " 95|
|00002670| 20 28 34 36 20 39 32 29 | 20 22 5c 5c 28 5b 5e 5f | (46 92)| "\\([^_|
|00002680| 5d 2b 5c 5c 29 5f 22 20 | 61 64 64 72 65 73 73 2d |]+\\)_" |address-|
|00002690| 74 65 78 74 2d 73 79 6e | 74 61 78 2d 74 61 62 6c |text-syn|tax-tabl|
|000026a0| 65 20 6d 61 69 6c 2d 76 | 61 72 69 61 6e 74 2d 6d |e mail-v|ariant-m|
|000026b0| 65 74 68 6f 64 20 62 75 | 66 66 65 72 2d 73 74 72 |ethod bu|ffer-str|
|000026c0| 69 6e 67 20 78 78 78 20 | 33 20 6c 6f 6f 6b 69 6e |ing xxx |3 lookin|
|000026d0| 67 2d 61 74 20 6d 61 69 | 6c 2d 74 77 6f 2d 6e 61 |g-at mai|l-two-na|
|000026e0| 6d 65 2d 70 61 74 74 65 | 72 6e 20 30 20 63 68 61 |me-patte|rn 0 cha|
|000026f0| 72 2d 65 71 75 61 6c 20 | 31 31 39 20 22 2e 20 22 |r-equal |119 ". "|
|00002700| 5d 20 34 33 20 22 5c 0a | 47 69 76 65 6e 20 61 6e |] 43 "\.|Given an|
|00002710| 20 72 66 63 20 38 32 32 | 20 41 44 44 52 45 53 53 | rfc 822| ADDRESS|
|00002720| 2c 20 65 78 74 72 61 63 | 74 20 66 75 6c 6c 20 6e |, extrac|t full n|
|00002730| 61 6d 65 20 61 6e 64 20 | 63 61 6e 6f 6e 69 63 61 |ame and |canonica|
|00002740| 6c 20 61 64 64 72 65 73 | 73 2e 0a 52 65 74 75 72 |l addres|s..Retur|
|00002750| 6e 73 20 61 20 6c 69 73 | 74 20 6f 66 20 74 68 65 |ns a lis|t of the|
|00002760| 20 66 6f 72 6d 20 28 46 | 55 4c 4c 2d 4e 41 4d 45 | form (F|ULL-NAME|
|00002770| 20 43 41 4e 4f 4e 49 43 | 41 4c 2d 41 44 44 52 45 | CANONIC|AL-ADDRE|
|00002780| 53 53 29 2e 22 5d 29 0a | 28 62 79 74 65 2d 63 6f |SS)."]).|(byte-co|
|00002790| 64 65 20 22 c0 c1 c2 5c | 22 88 c3 c4 c5 5c 22 88 |de "...\|"....\".|
|000027a0| c0 c6 c7 5c 22 88 c0 c8 | c9 5c 22 88 c0 ca cb 5c |...\"...|.\"....\|
|000027b0| 22 88 c0 cc cd 5c 22 87 | 22 20 5b 64 65 66 61 6c |"....\".|" [defal|
|000027c0| 69 61 73 20 6d 61 69 6c | 2d 76 61 72 69 61 6e 74 |ias mail|-variant|
|000027d0| 2d 6d 65 74 68 6f 64 20 | 23 5b 28 73 74 72 69 6e |-method |#[(strin|
|000027e0| 67 29 20 22 c0 c1 21 c2 | c3 89 89 89 89 89 89 89 |g) "..!.|........|
|000027f0| 89 89 1c 1d 1e 06 1e 07 | 1e 08 1e 09 1e 5c 6e 1e |........|.....\n.|
|00002800| 0b 1e 0c 1e 0d 1e 0e 1e | 0f 8a 0e 0f 71 88 d0 0e |........|....q...|
|00002810| 0f 21 88 d1 0e 12 21 88 | 7e 88 d3 20 88 c3 16 14 |.!....!.|~.. ....|
|00002820| 0e 15 63 88 65 62 88 d6 | 0e 17 c3 d8 23 83 52 00 |..c.eb..|....#.R.|
|00002830| d9 da 21 88 82 42 00 65 | 62 88 0e 1b c3 77 88 dc |..!..B.e|b....w..|
|00002840| c3 78 88 60 64 7d 88 dd | de 8d 88 65 60 7d 88 0e |.x.`d}..|...e`}..|
|00002850| 5c 6e 84 7f 00 65 62 88 | d6 df c3 d8 23 83 7f 00 |\n...eb.|....#...|
|00002860| 65 c2 94 7d 88 0e 09 83 | ac 00 65 62 88 e0 e1 21 |e..}....|..eb...!|
|00002870| 88 60 53 14 0e 5c 6e 86 | 94 00 64 62 88 0e 5c 22 |.`S..\n.|..db..\"|
|00002880| 68 3d 84 a1 00 0e 5c 22 | 63 88 e3 70 65 0c 23 88 |h=....\"|c..pe.#.|
|00002890| 0c 54 64 7d 88 64 62 88 | 0e 24 c3 78 88 67 e5 3d |.Td}.db.|.$.x.g.=|
|000028a0| 83 bd 00 e6 75 88 60 65 | 62 88 0e 1b c3 77 88 60 |....u.`e|b....w.`|
|000028b0| 7d 88 65 62 88 d6 e7 c3 | d8 23 83 db 00 d9 e8 21 |}.eb....|.#.....!|
|000028c0| 88 82 cc 00 65 64 7b 2e | 0d 87 22 20 5b 67 65 74 |....ed{.|.." [get|
|000028d0| 2d 62 75 66 66 65 72 2d | 63 72 65 61 74 65 20 22 |-buffer-|create "|
|000028e0| 2a 76 61 72 69 61 6e 74 | 20 6d 65 74 68 6f 64 20 |*variant| method |
|000028f0| 62 75 66 66 65 72 2a 22 | 20 30 20 6e 69 6c 20 65 |buffer*"| 0 nil e|
|00002900| 6e 64 20 62 65 67 20 69 | 6e 69 74 69 61 6c 20 63 |nd beg i|nitial c|
|00002910| 6f 6d 6d 65 6e 74 2d 65 | 6e 64 20 63 6f 6d 6d 65 |omment-e|nd comme|
|00002920| 6e 74 2d 62 65 67 20 6c | 61 73 74 2d 6e 61 6d 65 |nt-beg l|ast-name|
|00002930| 2d 63 6f 6d 6d 61 2d 66 | 6c 61 67 20 73 75 66 66 |-comma-f|lag suff|
|00002940| 69 78 2d 66 6c 61 67 20 | 75 70 70 65 72 2d 63 61 |ix-flag |upper-ca|
|00002950| 73 65 2d 66 6c 61 67 20 | 6c 6f 77 65 72 2d 63 61 |se-flag |lower-ca|
|00002960| 73 65 2d 66 6c 61 67 20 | 6d 69 78 65 64 2d 63 61 |se-flag |mixed-ca|
|00002970| 73 65 2d 66 6c 61 67 20 | 77 6f 72 64 2d 63 6f 75 |se-flag |word-cou|
|00002980| 6e 74 20 76 61 72 69 61 | 6e 74 2d 62 75 66 66 65 |nt varia|nt-buffe|
|00002990| 72 20 62 75 66 66 65 72 | 2d 64 69 73 61 62 6c 65 |r buffer|-disable|
|000029a0| 2d 75 6e 64 6f 20 73 65 | 74 2d 73 79 6e 74 61 78 |-undo se|t-syntax|
|000029b0| 2d 74 61 62 6c 65 20 61 | 64 64 72 65 73 73 2d 74 |-table a|ddress-t|
|000029c0| 65 78 74 2d 73 79 6e 74 | 61 78 2d 74 61 62 6c 65 |ext-synt|ax-table|
|000029d0| 20 65 72 61 73 65 2d 62 | 75 66 66 65 72 20 63 61 | erase-b|uffer ca|
|000029e0| 73 65 2d 66 6f 6c 64 2d | 73 65 61 72 63 68 20 73 |se-fold-|search s|
|000029f0| 74 72 69 6e 67 20 72 65 | 2d 73 65 61 72 63 68 2d |tring re|-search-|
|00002a00| 66 6f 72 77 61 72 64 20 | 6d 61 69 6c 2d 62 61 64 |forward |mail-bad|
|00002a10| 2d 5c 2e 2d 70 61 74 74 | 65 72 6e 20 74 20 72 65 |-\.-patt|ern t re|
|00002a20| 70 6c 61 63 65 2d 6d 61 | 74 63 68 20 22 5c 5c 31 |place-ma|tch "\\1|
|00002a30| 20 5c 5c 32 22 20 6d 61 | 69 6c 2d 6e 6f 6e 2d 62 | \\2" ma|il-non-b|
|00002a40| 65 67 69 6e 2d 6e 61 6d | 65 2d 63 68 61 72 73 20 |egin-nam|e-chars |
|00002a50| 22 26 20 5c 22 22 20 73 | 74 6f 70 20 28 62 79 74 |"& \"" s|top (byt|
|00002a60| 65 2d 63 6f 64 65 20 22 | 08 c1 77 88 5c 6e c3 3d |e-code "|..w.\n.=|
|00002a70| 83 1b 00 c4 0d 21 83 1b | 00 c3 95 62 88 60 64 7d |.....!..|...b.`d}|
|00002a80| 88 82 00 00 5c 6e c6 59 | 83 78 00 c4 0e 07 21 83 |....\n.Y|.x....!.|
|00002a90| 78 00 08 c1 78 88 60 16 | 08 67 c9 3d 83 3b 00 ca |x...x.`.|.g.=.;..|
|00002aa0| 75 88 82 3e 00 c9 63 88 | 0e 0b 67 3d 84 49 00 0e |u..>..c.|..g=.I..|
|00002ab0| 0b 63 88 08 c1 77 88 67 | cc 3e 83 69 00 cd ca 21 |.c...w.g|.>.i...!|
|00002ac0| 88 67 ce 3d 83 63 00 ca | 75 88 82 6d 00 ce 63 88 |.g.=.c..|u..m..c.|
|00002ad0| 82 6d 00 cf ca 21 88 5c | 6e 54 12 d0 d1 d2 5c 22 |.m...!.\|nT....\"|
|00002ae0| 88 82 00 00 c4 d3 21 83 | 8b 00 c3 12 ca 94 62 88 |......!.|......b.|
|00002af0| 60 64 7d 88 82 00 00 5c | 6e c6 59 83 a9 00 0e 14 |`d}....\|n.Y.....|
|00002b00| 84 9b 00 0e 15 83 a9 00 | c4 0e 16 21 83 a9 00 c4 |........|...!....|
|00002b10| 0e 17 21 83 d4 00 5c 6e | c6 59 83 bf 00 0e 18 84 |..!...\n|.Y......|
|00002b20| b9 00 0e 14 83 bf 00 c4 | d9 21 84 d4 00 c4 0e 1a |........|.!......|
|00002b30| 21 84 d4 00 c4 0e 1b 21 | 84 d4 00 c4 0e 1c 21 83 |!......!|......!.|
|00002b40| dc 00 d0 d1 d2 5c 22 88 | 82 00 00 67 c9 3d 83 fc |.....\".|...g.=..|
|00002b50| 00 5c 6e ca 3d 83 fc 00 | ca 75 88 d2 16 1d 0e 0b |.\n.=...|.u......|
|00002b60| 67 3d 84 00 00 0e 0b 63 | 88 82 00 00 67 c9 3d 83 |g=.....c|....g.=.|
|00002b70| 5c 6e 01 d0 d1 d2 5c 22 | 88 82 00 00 67 de 3e 83 |\n....\"|....g.>.|
|00002b80| b0 01 60 16 1f e0 0e 21 | 21 88 67 e2 3e 83 36 01 |..`....!|!.g.>.6.|
|00002b90| 67 e3 3d 83 27 01 ca 75 | 88 e4 e5 c1 d2 23 84 40 |g.=.'..u|.....#.@|
|00002ba0| 01 e6 ca 21 88 82 40 01 | e7 e8 e9 8f 84 40 01 64 |...!..@.|.....@.d|
|00002bb0| 62 88 e0 0e 2a 21 88 60 | 16 2b 5c 6e c3 3d 83 6c |b...*!.`|.+\n.=.l|
|00002bc0| 01 c4 ec 21 83 6c 01 0e | 2b 0e 1f 5a c6 59 83 6c |...!.l..|+..Z.Y.l|
|00002bd0| 01 0e 1f 54 0e 2b 53 7d | 88 65 62 88 82 00 00 0e |...T.+S}|.eb.....|
|00002be0| 2b 0e 1f 5a ed 55 84 8a | 01 0e 2b 0e 1f 5a ee 55 |+..Z.U..|..+..Z.U|
|00002bf0| 83 99 01 0e 1f c6 5c 5c | 66 ce 3d 83 99 01 c4 ec |......\\|f.=.....|
|00002c00| 21 84 99 01 0e 1f 54 66 | 16 2f 82 9c 01 c1 16 2f |!.....Tf|./...../|
|00002c10| 0e 1f 0e 2b 7c 88 0e 2f | 83 00 00 0e 2f f0 b1 02 |...+|../|..../...|
|00002c20| 88 82 00 00 c4 0e 31 21 | 83 c0 01 c3 94 c3 95 7c |......1!|.......||
|00002c30| 88 82 00 00 6f 84 cb 01 | 0e 0b 68 3d 83 e6 01 c4 |....o...|..h=....|
|00002c40| f2 21 83 e6 01 e6 ca 21 | 88 f3 60 f4 0e 35 0e 36 |.!.....!|..`..5.6|
|00002c50| 0e 37 23 88 60 5c 22 88 | 82 00 00 c4 0e 38 21 83 |.7#.`\".|.....8!.|
|00002c60| 1a 02 67 67 96 3d 84 f7 | 01 d2 16 15 ca 75 88 67 |..gg.=..|.....u.g|
|00002c70| ce 3d 83 06 02 ca 75 88 | 82 09 02 ce 63 88 0e 0b |.=....u.|....c...|
|00002c80| 67 3d 84 14 02 0e 0b 63 | 88 5c 6e 54 12 82 00 00 |g=.....c|.\nT....|
|00002c90| c4 0e 39 21 83 54 02 60 | 16 3a c3 95 16 3b fc fd |..9!.T.`|.:...;..|
|00002ca0| 0e 3b d2 23 83 46 02 0e | 3a 62 88 fc fe 0e 3b d2 |.;.#.F..|:b....;.|
|00002cb0| 23 83 42 02 d4 82 47 02 | d5 82 47 02 d8 d2 4c 88 |#.B...G.|..G...L.|
|00002cc0| 0e 3b 62 88 5c 6e 54 12 | 82 00 00 d0 d1 d2 5c 22 |.;b.\nT.|......\"|
|00002cd0| 88 82 00 00 22 20 5b 6d | 61 69 6c 2d 77 68 69 74 |...." [m|ail-whit|
|00002ce0| 65 73 70 61 63 65 20 6e | 69 6c 20 77 6f 72 64 2d |espace n|il word-|
|00002cf0| 63 6f 75 6e 74 20 30 20 | 6c 6f 6f 6b 69 6e 67 2d |count 0 |looking-|
|00002d00| 61 74 20 6d 61 69 6c 2d | 66 75 6c 6c 2d 6e 61 6d |at mail-|full-nam|
|00002d10| 65 2d 70 72 65 66 69 78 | 65 73 20 32 20 6d 61 69 |e-prefix|es 2 mai|
|00002d20| 6c 2d 66 75 6c 6c 2d 6e | 61 6d 65 2d 73 75 66 66 |l-full-n|ame-suff|
|00002d30| 69 78 2d 70 61 74 74 65 | 72 6e 20 73 75 66 66 69 |ix-patte|rn suffi|
|00002d40| 78 2d 66 6c 61 67 20 34 | 34 20 31 20 6d 61 69 6c |x-flag 4|4 1 mail|
|00002d50| 2d 73 70 61 63 65 2d 63 | 68 61 72 20 28 31 30 36 |-space-c|har (106|
|00002d60| 20 37 34 20 31 31 35 20 | 38 33 29 20 63 61 70 69 | 74 115 |83) capi|
|00002d70| 74 61 6c 69 7a 65 2d 77 | 6f 72 64 20 34 36 20 75 |talize-w|ord 46 u|
|00002d80| 70 63 61 73 65 2d 77 6f | 72 64 20 74 68 72 6f 77 |pcase-wo|rd throw|
|00002d90| 20 73 74 6f 70 20 74 20 | 22 4d 4b 41 20 5c 5c 28 | stop t |"MKA \\(|
|00002da0| 2e 2b 5c 5c 29 22 20 6d | 69 78 65 64 2d 63 61 73 |.+\\)" m|ixed-cas|
|00002db0| 65 2d 66 6c 61 67 20 6c | 6f 77 65 72 2d 63 61 73 |e-flag l|ower-cas|
|00002dc0| 65 2d 66 6c 61 67 20 6d | 61 69 6c 2d 77 65 69 72 |e-flag m|ail-weir|
|00002dd0| 64 2d 61 63 72 6f 6e 79 | 6d 2d 70 61 74 74 65 72 |d-acrony|m-patter|
|00002de0| 6e 20 6d 61 69 6c 2d 72 | 6f 6d 61 6e 2d 6e 75 6d |n mail-r|oman-num|
|00002df0| 65 72 61 6c 2d 70 61 74 | 74 65 72 6e 20 75 70 70 |eral-pat|tern upp|
|00002e00| 65 72 2d 63 61 73 65 2d | 66 6c 61 67 20 22 5b 61 |er-case-|flag "[a|
|00002e10| 2d 7a 5d 5b 61 2d 7a 5d | 5b 61 2d 7a 5d 5b 61 2d |-z][a-z]|[a-z][a-|
|00002e20| 7a 5d 2b 5c 5c 62 22 20 | 6d 61 69 6c 2d 61 6c 74 |z]+\\b" |mail-alt|
|00002e30| 65 72 6e 61 74 69 76 65 | 2d 61 64 64 72 65 73 73 |ernative|-address|
|00002e40| 2d 70 61 74 74 65 72 6e | 20 6d 61 69 6c 2d 74 72 |-pattern| mail-tr|
|00002e50| 61 69 6c 69 6e 67 2d 63 | 6f 6d 6d 65 6e 74 2d 73 |ailing-c|omment-s|
|00002e60| 74 61 72 74 2d 70 61 74 | 74 65 72 6e 20 6d 61 69 |tart-pat|tern mai|
|00002e70| 6c 2d 74 65 6c 65 70 68 | 6f 6e 65 2d 65 78 74 65 |l-teleph|one-exte|
|00002e80| 6e 73 69 6f 6e 2d 70 61 | 74 74 65 72 6e 20 6c 61 |nsion-pa|ttern la|
|00002e90| 73 74 2d 6e 61 6d 65 2d | 63 6f 6d 6d 61 2d 66 6c |st-name-|comma-fl|
|00002ea0| 61 67 20 28 34 30 20 31 | 32 33 20 39 31 20 33 34 |ag (40 1|23 91 34|
|00002eb0| 20 33 39 20 39 36 29 20 | 63 6f 6d 6d 65 6e 74 2d | 39 96) |comment-|
|00002ec0| 62 65 67 20 73 65 74 2d | 73 79 6e 74 61 78 2d 74 |beg set-|syntax-t|
|00002ed0| 61 62 6c 65 20 61 64 64 | 72 65 73 73 2d 74 65 78 |able add|ress-tex|
|00002ee0| 74 2d 63 6f 6d 6d 65 6e | 74 2d 73 79 6e 74 61 78 |t-commen|t-syntax|
|00002ef0| 2d 74 61 62 6c 65 20 28 | 33 39 20 39 36 29 20 33 |-table (|39 96) 3|
|00002f00| 39 20 73 65 61 72 63 68 | 2d 66 6f 72 77 61 72 64 |9 search|-forward|
|00002f10| 20 22 27 22 20 64 65 6c | 65 74 65 2d 63 68 61 72 | "'" del|ete-char|
|00002f20| 20 65 72 72 6f 72 20 28 | 62 79 74 65 2d 63 6f 64 | error (|byte-cod|
|00002f30| 65 20 22 c0 60 c1 5c 22 | 62 88 c2 87 22 20 5b 73 |e ".`.\"|b..." [s|
|00002f40| 63 61 6e 2d 73 65 78 70 | 73 20 31 20 74 5d 20 33 |can-sexp|s 1 t] 3|
|00002f50| 29 20 28 28 65 72 72 6f | 72 20 28 62 79 74 65 2d |) ((erro|r (byte-|
|00002f60| 63 6f 64 65 20 22 08 41 | 40 c1 98 3f 85 13 00 c2 |code ".A|@..?....|
|00002f70| 08 40 08 41 5c 22 88 82 | 09 00 87 22 20 5b 65 72 |.@.A\"..|..." [er|
|00002f80| 72 6f 72 20 22 55 6e 62 | 61 6c 61 6e 63 65 64 20 |ror "Unb|alanced |
|00002f90| 70 61 72 65 6e 74 68 65 | 73 65 73 22 20 73 69 67 |parenthe|ses" sig|
|00002fa0| 6e 61 6c 5d 20 33 29 29 | 29 20 61 64 64 72 65 73 |nal] 3))|) addres|
|00002fb0| 73 2d 74 65 78 74 2d 73 | 79 6e 74 61 78 2d 74 61 |s-text-s|yntax-ta|
|00002fc0| 62 6c 65 20 63 6f 6d 6d | 65 6e 74 2d 65 6e 64 20 |ble comm|ent-end |
|00002fd0| 22 20 2a 5c 5c 27 22 20 | 33 20 34 20 69 6e 69 74 |" *\\'" |3 4 init|
|00002fe0| 69 61 6c 20 22 2e 20 22 | 20 6d 61 69 6c 2d 68 61 |ial ". "| mail-ha|
|00002ff0| 6d 2d 63 61 6c 6c 2d 73 | 69 67 6e 2d 70 61 74 74 |m-call-s|ign-patt|
|00003000| 65 72 6e 20 22 26 5c 5c | 28 20 5c 5c 7c 5c 5c 27 |ern "&\\|( \\|\\'|
|00003010| 5c 5c 29 22 20 63 61 70 | 69 74 61 6c 69 7a 65 2d |\\)" cap|italize-|
|00003020| 72 65 67 69 6f 6e 20 69 | 6e 73 65 72 74 2d 62 75 |region i|nsert-bu|
|00003030| 66 66 65 72 2d 73 75 62 | 73 74 72 69 6e 67 20 63 |ffer-sub|string c|
|00003040| 61 6e 6f 6e 69 63 61 6c | 69 7a 61 74 69 6f 6e 2d |anonical|ization-|
|00003050| 62 75 66 66 65 72 20 6d | 62 6f 78 2d 62 65 67 20 |buffer m|box-beg |
|00003060| 6d 62 6f 78 2d 65 6e 64 | 20 6d 61 69 6c 2d 69 6e |mbox-end| mail-in|
|00003070| 69 74 69 61 6c 2d 70 61 | 74 74 65 72 6e 20 6d 61 |itial-pa|ttern ma|
|00003080| 69 6c 2d 6e 61 6d 65 2d | 70 61 74 74 65 72 6e 20 |il-name-|pattern |
|00003090| 62 65 67 20 65 6e 64 20 | 72 65 2d 73 65 61 72 63 |beg end |re-searc|
|000030a0| 68 2d 66 6f 72 77 61 72 | 64 20 22 5b 61 2d 7a 5d |h-forwar|d "[a-z]|
|000030b0| 22 20 22 5b 41 2d 5a 5d | 22 5d 20 36 29 20 22 5c |" "[A-Z]|"] 6) "\|
|000030c0| 5c 62 5b 41 2d 5a 61 2d | 7a 5d 5b 41 2d 5a 61 2d |\b[A-Za-|z][A-Za-|
|000030d0| 7a 5d 2b 5c 5c 2e 20 2a | 5c 5c 27 22 20 73 65 61 |z]+\\. *|\\'" sea|
|000030e0| 72 63 68 2d 66 6f 72 77 | 61 72 64 20 22 2c 22 20 |rch-forw|ard "," |
|000030f0| 6d 61 69 6c 2d 73 70 61 | 63 65 2d 63 68 61 72 20 |mail-spa|ce-char |
|00003100| 69 6e 73 65 72 74 2d 62 | 75 66 66 65 72 2d 73 75 |insert-b|uffer-su|
|00003110| 62 73 74 72 69 6e 67 20 | 6d 61 69 6c 2d 6e 6f 6e |bstring |mail-non|
|00003120| 2d 65 6e 64 2d 6e 61 6d | 65 2d 63 68 61 72 73 20 |-end-nam|e-chars |
|00003130| 34 36 20 31 20 22 5b 20 | 09 5c 6e 5d 2b 22 20 22 |46 1 "[ |.\n]+" "|
|00003140| 20 22 5d 20 31 32 5d 20 | 6d 61 70 63 61 72 20 23 | "] 12] |mapcar #|
|00003150| 5b 28 78 29 20 22 08 39 | 83 0b 00 c1 08 c2 c3 23 |[(x) ".9|.......#|
|00003160| 87 c1 08 40 c2 08 41 40 | 23 87 22 20 5b 78 20 70 |...@..A@|#." [x p|
|00003170| 75 74 20 64 6f 6d 61 69 | 6e 2d 6e 61 6d 65 20 74 |ut domai|n-name t|
|00003180| 5d 20 34 5d 20 28 28 61 | 67 20 22 41 6e 74 69 67 |] 4] ((a|g "Antig|
|00003190| 75 61 22 29 20 28 61 72 | 20 22 41 72 67 65 6e 74 |ua") (ar| "Argent|
|000031a0| 69 6e 61 22 29 20 61 72 | 70 61 20 28 61 74 20 22 |ina") ar|pa (at "|
|000031b0| 41 75 73 74 72 69 61 22 | 29 20 28 61 75 20 22 41 |Austria"|) (au "A|
|000031c0| 75 73 74 72 61 6c 69 61 | 22 29 20 28 62 62 20 22 |ustralia|") (bb "|
|000031d0| 42 61 72 62 61 64 6f 73 | 22 29 20 28 62 65 20 22 |Barbados|") (be "|
|000031e0| 42 65 6c 67 69 75 6d 22 | 29 20 28 62 67 20 22 42 |Belgium"|) (bg "B|
|000031f0| 75 6c 67 61 72 69 61 22 | 29 20 62 69 74 6e 65 74 |ulgaria"|) bitnet|
|00003200| 20 28 62 6f 20 22 42 6f | 6c 69 76 69 61 22 29 20 | (bo "Bo|livia") |
|00003210| 28 62 72 20 22 42 72 61 | 7a 69 6c 22 29 20 28 62 |(br "Bra|zil") (b|
|00003220| 73 20 22 42 61 68 61 6d | 61 73 22 29 20 28 62 7a |s "Baham|as") (bz|
|00003230| 20 22 42 65 6c 69 7a 65 | 22 29 20 28 63 61 20 22 | "Belize|") (ca "|
|00003240| 43 61 6e 61 64 61 22 29 | 20 28 63 68 20 22 53 77 |Canada")| (ch "Sw|
|00003250| 69 74 7a 65 72 6c 61 6e | 64 22 29 20 28 63 6c 20 |itzerlan|d") (cl |
|00003260| 22 43 68 69 6c 65 22 29 | 20 28 63 6e 20 22 43 68 |"Chile")| (cn "Ch|
|00003270| 69 6e 61 22 29 20 28 63 | 6f 20 22 43 6f 6c 75 6d |ina") (c|o "Colum|
|00003280| 62 69 61 22 29 20 63 6f | 6d 20 28 63 72 20 22 43 |bia") co|m (cr "C|
|00003290| 6f 73 74 61 20 52 69 63 | 61 22 29 20 28 63 73 20 |osta Ric|a") (cs |
|000032a0| 22 43 7a 65 63 68 6f 73 | 6c 6f 76 61 6b 69 61 22 |"Czechos|lovakia"|
|000032b0| 29 20 28 64 65 20 22 47 | 65 72 6d 61 6e 79 22 29 |) (de "G|ermany")|
|000032c0| 20 28 64 6b 20 22 44 65 | 6e 6d 61 72 6b 22 29 20 | (dk "De|nmark") |
|000032d0| 28 64 6d 20 22 44 6f 6d | 69 6e 69 63 61 22 29 20 |(dm "Dom|inica") |
|000032e0| 28 64 6f 20 22 44 6f 6d | 69 6e 69 63 61 6e 20 52 |(do "Dom|inican R|
|000032f0| 65 70 75 62 6c 69 63 22 | 29 20 28 65 63 20 22 45 |epublic"|) (ec "E|
|00003300| 63 75 61 64 6f 72 22 29 | 20 65 64 75 20 28 65 67 |cuador")| edu (eg|
|00003310| 20 22 45 67 79 70 74 22 | 29 20 28 65 73 20 22 53 | "Egypt"|) (es "S|
|00003320| 70 61 69 6e 22 29 20 28 | 66 69 20 22 46 69 6e 6c |pain") (|fi "Finl|
|00003330| 61 6e 64 22 29 20 28 66 | 6a 20 22 46 69 6a 69 22 |and") (f|j "Fiji"|
|00003340| 29 20 28 66 72 20 22 46 | 72 61 6e 63 65 22 29 20 |) (fr "F|rance") |
|00003350| 67 6f 76 20 28 67 72 20 | 22 47 72 65 65 63 65 22 |gov (gr |"Greece"|
|00003360| 29 20 28 68 6b 20 22 48 | 6f 6e 67 20 4b 6f 6e 67 |) (hk "H|ong Kong|
|00003370| 22 29 20 28 68 75 20 22 | 48 75 6e 67 61 72 79 22 |") (hu "|Hungary"|
|00003380| 29 20 28 69 65 20 22 49 | 72 65 6c 61 6e 64 22 29 |) (ie "I|reland")|
|00003390| 20 28 69 6c 20 22 49 73 | 72 61 65 6c 22 29 20 28 | (il "Is|rael") (|
|000033a0| 69 6e 20 22 49 6e 64 69 | 61 22 29 20 69 6e 74 20 |in "Indi|a") int |
|000033b0| 28 69 73 20 22 49 63 65 | 6c 61 6e 64 22 29 20 28 |(is "Ice|land") (|
|000033c0| 69 74 20 22 49 74 61 6c | 79 22 29 20 28 6a 6d 20 |it "Ital|y") (jm |
|000033d0| 22 4a 61 6d 61 69 63 61 | 22 29 20 28 6a 70 20 22 |"Jamaica|") (jp "|
|000033e0| 4a 61 70 61 6e 22 29 20 | 28 6b 6e 20 22 53 74 2e |Japan") |(kn "St.|
|000033f0| 20 4b 69 74 74 73 20 61 | 6e 64 20 4e 65 76 69 73 | Kitts a|nd Nevis|
|00003400| 22 29 20 28 6b 72 20 22 | 53 6f 75 74 68 20 4b 6f |") (kr "|South Ko|
|00003410| 72 65 61 22 29 20 28 6c | 63 20 22 53 74 2e 20 4c |rea") (l|c "St. L|
|00003420| 75 63 69 61 22 29 20 28 | 6c 6b 20 22 53 72 69 20 |ucia") (|lk "Sri |
|00003430| 4c 61 6e 6b 61 22 29 20 | 6d 69 6c 20 28 6d 78 20 |Lanka") |mil (mx |
|00003440| 22 4d 65 78 69 63 6f 22 | 29 20 28 6d 79 20 22 4d |"Mexico"|) (my "M|
|00003450| 61 6c 61 79 73 69 61 22 | 29 20 28 6e 61 20 22 4e |alaysia"|) (na "N|
|00003460| 61 6d 69 62 69 61 22 29 | 20 6e 61 74 6f 20 6e 65 |amibia")| nato ne|
|00003470| 74 20 28 6e 69 20 22 4e | 69 63 61 72 61 67 75 61 |t (ni "N|icaragua|
|00003480| 22 29 20 28 6e 6c 20 22 | 4e 65 74 68 65 72 6c 61 |") (nl "|Netherla|
|00003490| 6e 64 73 22 29 20 28 6e | 6f 20 22 4e 6f 72 77 61 |nds") (n|o "Norwa|
|000034a0| 79 22 29 20 28 6e 7a 20 | 22 4e 65 77 20 5a 65 61 |y") (nz |"New Zea|
|000034b0| 6c 61 6e 64 22 29 20 6f | 72 67 20 28 70 65 20 22 |land") o|rg (pe "|
|000034c0| 50 65 72 75 22 29 20 28 | 70 67 20 22 50 61 70 75 |Peru") (|pg "Papu|
|000034d0| 61 20 4e 65 77 20 47 75 | 69 6e 65 61 22 29 20 28 |a New Gu|inea") (|
|000034e0| 70 68 20 22 50 68 69 6c | 69 70 70 69 6e 65 73 22 |ph "Phil|ippines"|
|000034f0| 29 20 28 70 6c 20 22 50 | 6f 6c 61 6e 64 22 29 20 |) (pl "P|oland") |
|00003500| 28 70 72 20 22 50 75 65 | 72 74 6f 20 52 69 63 6f |(pr "Pue|rto Rico|
|00003510| 22 29 20 28 70 74 20 22 | 50 6f 72 74 75 67 61 6c |") (pt "|Portugal|
|00003520| 22 29 20 28 70 79 20 22 | 50 61 72 61 67 75 61 79 |") (py "|Paraguay|
|00003530| 22 29 20 28 73 65 20 22 | 53 77 65 64 65 6e 22 29 |") (se "|Sweden")|
|00003540| 20 28 73 67 20 22 53 69 | 6e 67 61 70 6f 72 65 22 | (sg "Si|ngapore"|
|00003550| 29 20 28 73 72 20 22 53 | 75 72 69 6e 61 6d 65 22 |) (sr "S|uriname"|
|00003560| 29 20 28 73 75 20 22 53 | 6f 76 69 65 74 20 55 6e |) (su "S|oviet Un|
|00003570| 69 6f 6e 22 29 20 28 74 | 68 20 22 54 68 61 69 6c |ion") (t|h "Thail|
|00003580| 61 6e 64 22 29 20 28 74 | 6e 20 22 54 75 6e 69 73 |and") (t|n "Tunis|
|00003590| 69 61 22 29 20 28 74 72 | 20 22 54 75 72 6b 65 79 |ia") (tr| "Turkey|
|000035a0| 22 29 20 28 74 74 20 22 | 54 72 69 6e 69 64 61 64 |") (tt "|Trinidad|
|000035b0| 20 61 6e 64 20 54 6f 62 | 61 67 6f 22 29 20 28 74 | and Tob|ago") (t|
|000035c0| 77 20 22 54 61 69 77 61 | 6e 22 29 20 28 75 6b 20 |w "Taiwa|n") (uk |
|000035d0| 22 55 6e 69 74 65 64 20 | 4b 69 6e 67 64 6f 6d 22 |"United |Kingdom"|
|000035e0| 29 20 75 6e 74 65 72 2d | 64 6f 6d 20 28 75 73 20 |) unter-|dom (us |
|000035f0| 22 55 2e 53 2e 41 2e 22 | 29 20 75 75 63 70 20 28 |"U.S.A."|) uucp (|
|00003600| 75 79 20 22 55 72 75 67 | 75 61 79 22 29 20 28 76 |uy "Urug|uay") (v|
|00003610| 63 20 22 53 74 2e 20 56 | 69 6e 63 65 6e 74 20 61 |c "St. V|incent a|
|00003620| 6e 64 20 74 68 65 20 47 | 72 65 6e 61 64 69 6e 65 |nd the G|renadine|
|00003630| 73 22 29 20 28 76 65 20 | 22 56 65 6e 65 7a 75 65 |s") (ve |"Venezue|
|00003640| 6c 61 22 29 20 28 79 75 | 20 22 59 75 67 6f 73 6c |la") (yu| "Yugosl|
|00003650| 61 76 69 61 22 29 20 28 | 7a 61 20 22 53 6f 75 74 |avia") (|za "Sout|
|00003660| 68 20 41 66 72 69 63 61 | 22 29 20 28 7a 77 20 22 |h Africa|") (zw "|
|00003670| 5a 69 6d 62 61 62 77 65 | 22 29 29 20 74 69 6d 65 |Zimbabwe|")) time|
|00003680| 2d 65 78 74 72 61 63 74 | 20 23 5b 6e 69 6c 20 22 |-extract| #[nil "|
|00003690| c0 89 19 1a c3 20 5c 6e | 42 12 0c 89 11 83 1c 00 |..... \n|B.......|
|000036a0| c5 09 40 40 21 88 09 41 | 89 11 84 0f 00 c3 20 5c |..@@!..A|...... \|
|000036b0| 6e 42 89 12 9f 2a 87 22 | 20 5b 6e 69 6c 20 6c 69 |nB...*."| [nil li|
|000036c0| 73 74 20 74 69 6d 65 73 | 20 63 75 72 72 65 6e 74 |st times| current|
|000036d0| 2d 74 69 6d 65 2d 73 74 | 72 69 6e 67 20 70 72 6f |-time-st|ring pro|
|000036e0| 62 6c 65 6d 2d 61 64 64 | 72 65 73 73 2d 61 6c 69 |blem-add|ress-ali|
|000036f0| 73 74 20 6d 61 69 6c 2d | 65 78 74 72 61 63 74 2d |st mail-|extract-|
|00003700| 61 64 64 72 65 73 73 2d | 63 6f 6d 70 6f 6e 65 6e |address-|componen|
|00003710| 74 73 5d 20 33 5d 20 74 | 65 73 74 2d 65 78 74 72 |ts] 3] t|est-extr|
|00003720| 61 63 74 20 23 5b 28 26 | 6f 70 74 69 6f 6e 61 6c |act #[(&|optional|
|00003730| 20 73 74 61 72 74 69 6e | 67 2d 70 6f 69 6e 74 29 | startin|g-point)|
|00003740| 20 22 c0 c1 21 71 88 c2 | 20 88 c3 c4 21 88 c5 c6 | "..!q..| ...!...|
|00003750| 0e 07 83 1b 00 0e 07 0e | 08 3e 82 1d 00 0e 08 5c |........|.>.....\|
|00003760| 22 87 22 20 5b 67 65 74 | 2d 62 75 66 66 65 72 2d |"." [get|-buffer-|
|00003770| 63 72 65 61 74 65 20 22 | 2a 54 65 73 74 69 6e 67 |create "|*Testing|
|00003780| 2a 22 20 65 72 61 73 65 | 2d 62 75 66 66 65 72 20 |*" erase|-buffer |
|00003790| 73 69 74 2d 66 6f 72 20 | 30 20 6d 61 70 63 61 72 |sit-for |0 mapcar|
|000037a0| 20 74 65 73 74 2d 65 78 | 74 72 61 63 74 2d 69 6e | test-ex|tract-in|
|000037b0| 74 65 72 6e 61 6c 20 73 | 74 61 72 74 69 6e 67 2d |ternal s|tarting-|
|000037c0| 70 6f 69 6e 74 20 70 72 | 6f 62 6c 65 6d 2d 61 64 |point pr|oblem-ad|
|000037d0| 64 72 65 73 73 2d 61 6c | 69 73 74 5d 20 34 20 6e |dress-al|ist] 4 n|
|000037e0| 69 6c 20 6e 69 6c 5d 20 | 74 65 73 74 2d 65 78 74 |il nil] |test-ext|
|000037f0| 72 61 63 74 2d 69 6e 74 | 65 72 6e 61 6c 20 23 5b |ract-int|ernal #[|
|00003800| 28 69 74 65 6d 29 20 22 | 08 11 08 40 1a 08 41 40 |(item) "|...@..A@|
|00003810| 1b c4 08 38 1d c6 5c 6e | 21 89 1e 07 40 1e 08 0e |...8..\n|!...@...|
|00003820| 07 41 40 1e 09 0b 3f 86 | 27 00 0b 97 0e 08 97 98 |.A@...?.|'.......|
|00003830| 1e 5c 6e 0d 3f 86 32 00 | 0d 0e 09 98 1e 0b 0e 5c |.\n.?.2.|.......\|
|00003840| 6e 83 3e 00 0e 0b 84 74 | 00 cc cd 21 88 ce cf 70 |n.>....t|...!...p|
|00003850| 21 21 88 64 62 88 d0 5c | 6e d1 b1 03 88 0e 5c 6e |!!.db..\|n.....\n|
|00003860| 84 5f 00 d2 0b d3 0e 08 | d4 b1 05 88 0e 0b 84 6d |._......|.......m|
|00003870| 00 d5 0d d3 0e 09 d4 b1 | 05 88 d1 63 88 d6 d7 21 |........|...c...!|
|00003880| 88 2e 08 d8 89 11 87 22 | 20 5b 69 74 65 6d 20 66 |......."| [item f|
|00003890| 61 69 6c 65 64 2d 69 74 | 65 6d 20 61 64 64 72 65 |ailed-it|em addre|
|000038a0| 73 73 20 63 6f 72 72 65 | 63 74 2d 6e 61 6d 65 20 |ss corre|ct-name |
|000038b0| 32 20 63 6f 72 72 65 63 | 74 2d 63 61 6e 6f 6e 20 |2 correc|t-canon |
|000038c0| 6d 61 69 6c 2d 65 78 74 | 72 61 63 74 2d 61 64 64 |mail-ext|ract-add|
|000038d0| 72 65 73 73 2d 63 6f 6d | 70 6f 6e 65 6e 74 73 20 |ress-com|ponents |
|000038e0| 72 65 73 75 6c 74 20 6e | 61 6d 65 20 63 61 6e 6f |result n|ame cano|
|000038f0| 6e 20 6e 61 6d 65 2d 63 | 6f 72 72 65 63 74 20 63 |n name-c|orrect c|
|00003900| 61 6e 6f 6e 2d 63 6f 72 | 72 65 63 74 20 70 6f 70 |anon-cor|rect pop|
|00003910| 2d 74 6f 2d 62 75 66 66 | 65 72 20 22 2a 54 65 73 |-to-buff|er "*Tes|
|00003920| 74 69 6e 67 2a 22 20 73 | 65 6c 65 63 74 2d 77 69 |ting*" s|elect-wi|
|00003930| 6e 64 6f 77 20 67 65 74 | 2d 62 75 66 66 65 72 2d |ndow get|-buffer-|
|00003940| 77 69 6e 64 6f 77 20 22 | 41 64 64 72 65 73 73 3a |window "|Address:|
|00003950| 20 22 20 22 5c 6e 22 20 | 22 20 43 6f 72 72 65 63 | " "\n" |" Correc|
|00003960| 74 20 4e 61 6d 65 3a 20 | 20 5b 22 20 22 5d 3b 20 |t Name: | [" "]; |
|00003970| 52 65 73 75 6c 74 3a 20 | 5b 22 20 22 5d 5c 6e 22 |Result: |[" "]\n"|
|00003980| 20 22 20 43 6f 72 72 65 | 63 74 20 43 61 6e 6f 6e | " Corre|ct Canon|
|00003990| 3a 20 5b 22 20 73 69 74 | 2d 66 6f 72 20 30 20 6e |: [" sit|-for 0 n|
|000039a0| 69 6c 5d 20 36 5d 20 74 | 65 73 74 2d 63 6f 6e 74 |il] 6] t|est-cont|
|000039b0| 69 6e 75 65 2d 65 78 74 | 72 61 63 74 20 23 5b 6e |inue-ext|ract #[n|
|000039c0| 69 6c 20 22 c0 09 21 87 | 22 20 5b 74 65 73 74 2d |il "..!.|" [test-|
|000039d0| 65 78 74 72 61 63 74 20 | 66 61 69 6c 65 64 2d 69 |extract |failed-i|
|000039e0| 74 65 6d 5d 20 32 20 6e | 69 6c 20 6e 69 6c 5d 5d |tem] 2 n|il nil]]|
|000039f0| 20 33 29 0a             |                         | 3).    |        |
+--------+-------------------------+-------------------------+--------+--------+