home *** CD-ROM | disk | FTP | other *** search
open in:
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: LaTeX Document
(document/latex).
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| dexvert
| LaTeX Document (document/latex)
| magic
| Supported |
1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
100%
| file
| LaTeX document text
| default
| |
99%
| file
| Lisp/Scheme program text
| default
| |
98%
| file
| Lisp/Scheme program, ASCII text
| default
| |
100%
| checkBytes
| Printable ASCII
| default
| |
100%
| perlTextCheck
| Likely Text (Perl)
| default
| |
100%
| siegfried
| fmt/281 LaTeX (Subdocument)
| default
| |
100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 3b 20 43 6f 6e 76 65 | 72 74 20 73 63 72 69 62 |;; Conve|rt scrib|
|00000010| 65 20 66 69 6c 65 73 20 | 74 6f 20 6c 61 74 65 78 |e files |to latex|
|00000020| 69 6e 66 6f 2e 0a 3b 3b | 20 54 68 69 73 20 69 73 |info..;;| This is|
|00000030| 20 61 6e 20 61 62 73 6f | 6c 75 74 65 6c 79 20 73 | an abso|lutely s|
|00000040| 68 61 6d 65 66 75 6c 20 | 61 6e 64 20 69 6e 64 65 |hameful |and inde|
|00000050| 63 79 70 68 65 72 61 62 | 6c 65 20 68 61 63 6b 2c |cypherab|le hack,|
|00000060| 20 62 75 74 20 69 74 20 | 77 6f 72 6b 73 2e 0a 3b | but it |works..;|
|00000070| 3b 20 50 6c 65 61 73 65 | 20 70 72 65 74 65 6e 64 |; Please| pretend|
|00000080| 20 79 6f 75 20 6e 65 76 | 65 72 20 6c 6f 6f 6b 65 | you nev|er looke|
|00000090| 64 20 69 6e 20 74 68 69 | 73 20 66 69 6c 65 2e 0a |d in thi|s file..|
|000000a0| 3b 3b 20 49 66 20 79 6f | 75 20 68 61 76 65 20 61 |;; If yo|u have a|
|000000b0| 6e 79 20 71 75 65 73 74 | 69 6f 6e 73 2c 20 49 27 |ny quest|ions, I'|
|000000c0| 6c 6c 20 64 65 6e 79 20 | 61 6c 6c 20 6b 6e 6f 77 |ll deny |all know|
|000000d0| 6c 65 64 67 65 20 6f 66 | 20 69 74 2e 0a 0a 28 72 |ledge of| it...(r|
|000000e0| 65 71 75 69 72 65 20 27 | 6c 61 74 65 78 69 6e 66 |equire '|latexinf|
|000000f0| 6f 29 0a 28 72 65 71 75 | 69 72 65 20 27 6c 61 74 |o).(requ|ire 'lat|
|00000100| 65 78 6e 66 6f 2d 75 70 | 64 29 0a 0a 28 64 65 66 |exnfo-up|d)..(def|
|00000110| 76 61 72 20 73 63 72 69 | 62 65 2d 66 6f 72 6d 61 |var scri|be-forma|
|00000120| 74 2d 73 79 6e 74 61 78 | 2d 74 61 62 6c 65 20 6e |t-syntax|-table n|
|00000130| 69 6c 29 0a 0a 28 64 65 | 66 76 61 72 20 20 20 73 |il)..(de|fvar s|
|00000140| 63 72 69 62 65 2d 74 6f | 2d 6c 61 74 65 78 2d 68 |cribe-to|-latex-h|
|00000150| 65 61 64 0a 22 5c 5c 64 | 6f 63 75 6d 65 6e 74 73 |ead."\\d|ocuments|
|00000160| 74 79 6c 65 5b 6c 61 74 | 65 78 69 6e 66 6f 2c 66 |tyle[lat|exinfo,f|
|00000170| 76 70 69 6e 64 65 78 2c | 63 6d 75 6c 69 73 70 2c |vpindex,|cmulisp,|
|00000180| 66 6f 72 6d 61 74 5d 7b | 62 6f 6f 6b 7d 20 25 20 |format]{|book} % |
|00000190| 2d 2a 2d 6c 61 74 65 78 | 69 6e 66 6f 2d 2a 2d 0a |-*-latex|info-*-.|
|000001a0| 5c 5c 70 61 67 65 73 74 | 79 6c 65 7b 68 65 61 64 |\\pagest|yle{head|
|000001b0| 69 6e 67 73 7d 0a 0a 5c | 5c 62 65 67 69 6e 7b 64 |ings}..\|\begin{d|
|000001c0| 6f 63 75 6d 65 6e 74 7d | 0a 5c 5c 61 6c 77 61 79 |ocument}|.\\alway|
|000001d0| 73 72 65 66 69 6c 6c 0a | 0a 5c 5c 63 6f 6d 6d 65 |srefill.|.\\comme|
|000001e0| 6e 74 20 44 65 6c 65 74 | 65 20 61 6e 79 20 6f 66 |nt Delet|e any of|
|000001f0| 20 74 68 65 73 65 20 69 | 66 20 79 6f 75 20 64 6f | these i|f you do|
|00000200| 6e 27 74 20 77 61 6e 74 | 20 74 68 61 74 20 70 61 |n't want| that pa|
|00000210| 72 74 69 63 75 6c 61 72 | 20 69 6e 64 65 78 2e 0a |rticular| index..|
|00000220| 5c 5c 6e 65 77 69 6e 64 | 65 78 7b 63 70 7d 0a 5c |\\newind|ex{cp}.\|
|00000230| 5c 6e 65 77 69 6e 64 65 | 78 7b 6b 79 7d 0a 0a 22 |\newinde|x{ky}.."|
|00000240| 29 0a 0a 28 64 65 66 76 | 61 72 20 73 63 72 69 62 |)..(defv|ar scrib|
|00000250| 65 2d 74 6f 2d 6c 61 74 | 65 78 2d 74 61 69 6c 20 |e-to-lat|ex-tail |
|00000260| 22 5c 5c 74 77 6f 63 6f | 6c 75 6d 6e 0a 5c 5c 6e |"\\twoco|lumn.\\n|
|00000270| 6f 64 65 20 46 75 6e 63 | 74 69 6f 6e 20 49 6e 64 |ode Func|tion Ind|
|00000280| 65 78 2c 20 56 61 72 69 | 61 62 6c 65 20 49 6e 64 |ex, Vari|able Ind|
|00000290| 65 78 2c 20 2c 20 74 6f | 70 0a 5c 5c 75 6e 6e 75 |ex, , to|p.\\unnu|
|000002a0| 6d 62 65 72 65 64 7b 46 | 75 6e 63 74 69 6f 6e 20 |mbered{F|unction |
|000002b0| 49 6e 64 65 78 7d 0a 5c | 5c 63 69 6e 64 65 78 7b |Index}.\|\cindex{|
|000002c0| 46 75 6e 63 74 69 6f 6e | 20 49 6e 64 65 78 7d 0a |Function| Index}.|
|000002d0| 0a 5c 5c 70 72 69 6e 74 | 69 6e 64 65 78 7b 66 6e |.\\print|index{fn|
|000002e0| 7d 0a 0a 5c 5c 74 77 6f | 63 6f 6c 75 6d 6e 0a 5c |}..\\two|column.\|
|000002f0| 5c 6e 6f 64 65 20 56 61 | 72 69 61 62 6c 65 20 49 |\node Va|riable I|
|00000300| 6e 64 65 78 2c 20 50 61 | 63 6b 61 67 65 20 49 6e |ndex, Pa|ckage In|
|00000310| 64 65 78 2c 20 46 75 6e | 63 74 69 6f 6e 20 49 6e |dex, Fun|ction In|
|00000320| 64 65 78 2c 20 74 6f 70 | 0a 5c 5c 75 6e 6e 75 6d |dex, top|.\\unnum|
|00000330| 62 65 72 65 64 7b 56 61 | 72 69 61 62 6c 65 20 49 |bered{Va|riable I|
|00000340| 6e 64 65 78 7d 0a 5c 5c | 63 69 6e 64 65 78 7b 56 |ndex}.\\|cindex{V|
|00000350| 61 72 69 61 62 6c 65 20 | 49 6e 64 65 78 7d 0a 0a |ariable |Index}..|
|00000360| 5c 5c 70 72 69 6e 74 69 | 6e 64 65 78 7b 76 72 7d |\\printi|ndex{vr}|
|00000370| 0a 0a 5c 5c 74 77 6f 63 | 6f 6c 75 6d 6e 0a 5c 5c |..\\twoc|olumn.\\|
|00000380| 6e 6f 64 65 20 50 61 63 | 6b 61 67 65 20 49 6e 64 |node Pac|kage Ind|
|00000390| 65 78 2c 20 43 6f 6e 64 | 69 74 69 6f 6e 20 49 6e |ex, Cond|ition In|
|000003a0| 64 65 78 2c 20 56 61 72 | 69 61 62 6c 65 20 49 6e |dex, Var|iable In|
|000003b0| 64 65 78 2c 20 74 6f 70 | 0a 5c 5c 75 6e 6e 75 6d |dex, top|.\\unnum|
|000003c0| 62 65 72 65 64 7b 50 61 | 63 6b 61 67 65 20 49 6e |bered{Pa|ckage In|
|000003d0| 64 65 78 7d 0a 5c 5c 63 | 69 6e 64 65 78 7b 50 61 |dex}.\\c|index{Pa|
|000003e0| 63 6b 61 67 65 20 49 6e | 64 65 78 7d 0a 0a 5c 5c |ckage In|dex}..\\|
|000003f0| 70 72 69 6e 74 69 6e 64 | 65 78 7b 70 67 7d 0a 0a |printind|ex{pg}..|
|00000400| 5c 5c 74 77 6f 63 6f 6c | 75 6d 6e 0a 5c 5c 6e 6f |\\twocol|umn.\\no|
|00000410| 64 65 20 43 6f 6e 64 69 | 74 69 6f 6e 20 49 6e 64 |de Condi|tion Ind|
|00000420| 65 78 2c 20 43 6f 6e 63 | 65 70 74 20 49 6e 64 65 |ex, Conc|ept Inde|
|00000430| 78 2c 20 50 61 63 6b 61 | 67 65 20 49 6e 64 65 78 |x, Packa|ge Index|
|00000440| 2c 20 74 6f 70 0a 5c 5c | 75 6e 6e 75 6d 62 65 72 |, top.\\|unnumber|
|00000450| 65 64 7b 43 6f 6e 64 69 | 74 69 6f 6e 20 49 6e 64 |ed{Condi|tion Ind|
|00000460| 65 78 7d 0a 5c 5c 63 69 | 6e 64 65 78 7b 43 6f 6e |ex}.\\ci|ndex{Con|
|00000470| 64 69 74 69 6f 6e 20 49 | 6e 64 65 78 7d 0a 0a 5c |dition I|ndex}..\|
|00000480| 5c 70 72 69 6e 74 69 6e | 64 65 78 7b 6b 79 7d 0a |\printin|dex{ky}.|
|00000490| 0a 5c 5c 6f 6e 65 63 6f | 6c 75 6d 6e 0a 5c 5c 6e |.\\oneco|lumn.\\n|
|000004a0| 6f 64 65 20 43 6f 6e 63 | 65 70 74 20 49 6e 64 65 |ode Conc|ept Inde|
|000004b0| 78 2c 20 20 2c 20 56 61 | 72 69 61 62 6c 65 20 49 |x, , Va|riable I|
|000004c0| 6e 64 65 78 2c 20 74 6f | 70 0a 5c 5c 75 6e 6e 75 |ndex, to|p.\\unnu|
|000004d0| 6d 62 65 72 65 64 7b 43 | 6f 6e 63 65 70 74 20 49 |mbered{C|oncept I|
|000004e0| 6e 64 65 78 7d 0a 5c 5c | 63 69 6e 64 65 78 7b 43 |ndex}.\\|cindex{C|
|000004f0| 6f 6e 63 65 70 74 20 49 | 6e 64 65 78 7d 0a 0a 5c |oncept I|ndex}..\|
|00000500| 5c 70 72 69 6e 74 69 6e | 64 65 78 7b 63 70 7d 0a |\printin|dex{cp}.|
|00000510| 5c 5c 65 6e 64 7b 64 6f | 63 75 6d 65 6e 74 7d 0a |\\end{do|cument}.|
|00000520| 22 29 0a 0a 28 64 65 66 | 75 6e 20 73 63 72 69 62 |")..(def|un scrib|
|00000530| 65 2d 74 6f 2d 6c 61 74 | 65 78 69 6e 66 6f 20 28 |e-to-lat|exinfo (|
|00000540| 61 72 67 29 0a 20 20 28 | 69 6e 74 65 72 61 63 74 |arg). (|interact|
|00000550| 69 76 65 20 22 46 4e 65 | 77 20 46 69 6c 65 20 4e |ive "FNe|w File N|
|00000560| 61 6d 65 3a 20 22 29 0a | 20 20 28 6c 65 74 20 28 |ame: ").| (let (|
|00000570| 28 63 61 73 65 2d 66 6f | 6c 64 2d 73 65 61 72 63 |(case-fo|ld-searc|
|00000580| 68 20 6e 69 6c 29 0a 09 | 28 69 6e 70 75 74 2d 62 |h nil)..|(input-b|
|00000590| 75 66 66 65 72 20 28 63 | 75 72 72 65 6e 74 2d 62 |uffer (c|urrent-b|
|000005a0| 75 66 66 65 72 29 29 29 | 0a 20 20 20 20 28 66 69 |uffer)))|. (fi|
|000005b0| 6e 64 2d 66 69 6c 65 20 | 61 72 67 29 0a 20 20 20 |nd-file |arg). |
|000005c0| 20 28 61 75 74 6f 2d 73 | 61 76 65 2d 6d 6f 64 65 | (auto-s|ave-mode|
|000005d0| 20 2d 31 29 0a 20 20 20 | 20 28 65 72 61 73 65 2d | -1). | (erase-|
|000005e0| 62 75 66 66 65 72 29 0a | 20 20 20 20 28 69 6e 73 |buffer).| (ins|
|000005f0| 65 72 74 2d 62 75 66 66 | 65 72 2d 73 75 62 73 74 |ert-buff|er-subst|
|00000600| 72 69 6e 67 20 69 6e 70 | 75 74 2d 62 75 66 66 65 |ring inp|ut-buffe|
|00000610| 72 29 0a 20 20 20 20 28 | 67 6f 74 6f 2d 63 68 61 |r). (|goto-cha|
|00000620| 72 20 28 70 6f 69 6e 74 | 2d 6d 69 6e 29 29 0a 20 |r (point|-min)). |
|00000630| 20 20 20 28 6c 65 74 20 | 28 28 61 6c 69 73 74 20 | (let |((alist |
|00000640| 73 63 72 69 62 65 2d 61 | 6c 69 73 74 29 29 0a 20 |scribe-a|list)). |
|00000650| 20 20 20 20 20 28 73 65 | 74 2d 73 79 6e 74 61 78 | (se|t-syntax|
|00000660| 2d 74 61 62 6c 65 20 73 | 63 72 69 62 65 2d 66 6f |-table s|cribe-fo|
|00000670| 72 6d 61 74 2d 73 79 6e | 74 61 78 2d 74 61 62 6c |rmat-syn|tax-tabl|
|00000680| 65 29 0a 20 20 20 20 20 | 20 3b 3b 20 49 6e 70 75 |e). | ;; Inpu|
|00000690| 74 20 74 68 65 20 40 69 | 6e 70 75 74 20 66 69 6c |t the @i|nput fil|
|000006a0| 65 73 0a 20 20 20 20 20 | 20 28 73 32 6c 2d 69 6e |es. | (s2l-in|
|000006b0| 70 75 74 2d 66 69 6c 65 | 73 29 0a 20 20 20 20 20 |put-file|s). |
|000006c0| 20 28 73 32 6c 2d 64 6f | 2d 61 6c 69 73 74 20 27 | (s2l-do|-alist '|
|000006d0| 28 0a 09 09 20 20 20 20 | 20 20 3b 3b 20 77 69 6c |(... | ;; wil|
|000006e0| 6c 20 74 72 61 73 68 20 | 62 61 63 6b 73 6c 61 73 |l trash |backslas|
|000006f0| 68 65 73 20 69 6e 20 76 | 65 72 62 61 74 69 6d 20 |hes in v|erbatim |
|00000700| 65 6e 76 69 72 6f 6e 6d | 65 6e 74 73 0a 09 09 20 |environm|ents... |
|00000710| 20 20 20 20 20 28 22 5c | 5c 5c 5c 22 20 2e 20 22 | ("\|\\\" . "|
|00000720| 5c 5c 5c 5c 62 61 63 6b | 20 22 29 20 0a 09 09 20 |\\\\back| ") ... |
|00000730| 20 20 20 20 20 28 22 5c | 6e 5c 6e 40 5c 5c 5c 5c | ("\|n\n@\\\\|
|00000740| 62 61 63 6b 20 22 20 2e | 20 22 5c 6e 40 5c 5c 5c |back " .| "\n@\\\|
|00000750| 5c 22 29 0a 09 09 20 20 | 20 20 20 20 28 22 40 5c |\")... | ("@\|
|00000760| 5c 5c 5c 62 61 63 6b 20 | 22 20 2e 20 22 40 5c 5c |\\\back |" . "@\\|
|00000770| 5c 5c 22 29 29 29 0a 20 | 20 20 20 20 20 3b 3b 20 |\\"))). | ;; |
|00000780| 46 69 78 20 74 68 65 20 | 68 65 61 64 65 72 20 66 |Fix the |header f|
|00000790| 6f 72 20 4c 61 54 65 58 | 0a 20 20 20 20 20 20 28 |or LaTeX|. (|
|000007a0| 67 6f 74 6f 2d 63 68 61 | 72 20 28 70 6f 69 6e 74 |goto-cha|r (point|
|000007b0| 2d 6d 69 6e 29 29 0a 20 | 20 20 20 20 20 28 69 6e |-min)). | (in|
|000007c0| 73 65 72 74 20 20 20 20 | 73 63 72 69 62 65 2d 74 |sert |scribe-t|
|000007d0| 6f 2d 6c 61 74 65 78 2d | 68 65 61 64 29 0a 20 20 |o-latex-|head). |
|000007e0| 20 20 20 20 28 69 6e 73 | 65 72 74 20 22 5c 5c 73 | (ins|ert "\\s|
|000007f0| 65 74 66 69 6c 65 6e 61 | 6d 65 7b 22 20 28 66 69 |etfilena|me{" (fi|
|00000800| 6c 65 2d 6e 61 6d 65 2d | 6e 6f 6e 64 69 72 65 63 |le-name-|nondirec|
|00000810| 74 6f 72 79 20 61 72 67 | 29 20 22 2e 69 6e 66 6f |tory arg|) ".info|
|00000820| 7d 5c 6e 22 29 0a 20 20 | 20 20 20 20 3b 3b 20 44 |}\n"). | ;; D|
|00000830| 65 6c 65 74 65 20 63 6f | 6d 6d 61 6e 64 73 20 79 |elete co|mmands y|
|00000840| 6f 75 20 64 6f 6e 27 74 | 20 77 61 6e 74 20 74 6f |ou don't| want to|
|00000850| 20 68 61 6e 64 6c 65 2e | 0a 20 20 20 20 20 20 28 | handle.|. (|
|00000860| 73 65 74 71 20 61 6c 69 | 73 74 20 73 63 72 69 62 |setq ali|st scrib|
|00000870| 65 2d 64 65 6c 65 74 65 | 2d 6c 69 73 74 29 0a 20 |e-delete|-list). |
|00000880| 20 20 20 20 20 28 77 68 | 69 6c 65 20 61 6c 69 73 | (wh|ile alis|
|00000890| 74 0a 09 28 67 6f 74 6f | 2d 63 68 61 72 20 28 70 |t..(goto|-char (p|
|000008a0| 6f 69 6e 74 2d 6d 69 6e | 29 29 0a 09 28 64 65 6c |oint-min|))..(del|
|000008b0| 65 74 65 2d 6d 61 74 63 | 68 69 6e 67 2d 6c 69 6e |ete-matc|hing-lin|
|000008c0| 65 73 20 28 63 61 72 20 | 61 6c 69 73 74 29 29 0a |es (car |alist)).|
|000008d0| 09 28 73 65 74 71 20 61 | 6c 69 73 74 20 28 63 64 |.(setq a|list (cd|
|000008e0| 72 20 61 6c 69 73 74 29 | 29 29 0a 20 20 20 20 20 |r alist)|)). |
|000008f0| 20 3b 3b 20 67 65 74 20 | 72 69 64 20 6f 66 20 74 | ;; get |rid of t|
|00000900| 68 65 20 66 20 63 6b 69 | 6e 67 20 73 70 61 63 65 |he f cki|ng space|
|00000910| 73 0a 20 20 20 20 20 20 | 28 73 32 6c 2d 64 6f 2d |s. |(s2l-do-|
|00000920| 61 6c 69 73 74 20 27 28 | 0a 09 09 20 20 20 20 20 |alist '(|... |
|00000930| 20 28 22 5e 40 5c 5c 28 | 5b 61 2d 7a 41 2d 5a 30 | ("^@\\(|[a-zA-Z0|
|00000940| 2d 39 5d 2b 5c 5c 29 20 | 2b 5c 5c 5b 22 20 2e 20 |-9]+\\) |+\\[" . |
|00000950| 22 40 5c 5c 31 5b 22 29 | 0a 09 09 20 20 20 20 20 |"@\\1[")|... |
|00000960| 20 28 22 5e 40 5c 5c 28 | 5b 61 2d 7a 41 2d 5a 30 | ("^@\\(|[a-zA-Z0|
|00000970| 2d 39 5d 2b 5c 5c 29 20 | 2b 3c 22 20 2e 20 22 40 |-9]+\\) |+<" . "@|
|00000980| 5c 5c 31 3c 22 29 0a 09 | 09 20 20 20 20 20 20 28 |\\1<")..|. (|
|00000990| 22 5e 40 5c 5c 28 5b 61 | 2d 7a 41 2d 5a 30 2d 39 |"^@\\([a|-zA-Z0-9|
|000009a0| 5d 2b 5c 5c 29 20 2b 28 | 22 20 2e 20 22 40 5c 5c |]+\\) +(|" . "@\\|
|000009b0| 31 28 22 29 0a 09 09 20 | 20 20 20 20 20 29 29 0a |1(")... | )).|
|000009c0| 20 20 20 20 20 20 28 67 | 6f 74 6f 2d 63 68 61 72 | (g|oto-char|
|000009d0| 20 28 70 6f 69 6e 74 2d | 6d 69 6e 29 29 0a 20 20 | (point-|min)). |
|000009e0| 20 20 20 20 28 73 32 6c | 2d 68 61 6e 64 6c 65 2d | (s2l|-handle-|
|000009f0| 63 6f 6d 6d 65 6e 74 73 | 29 0a 20 20 20 20 20 20 |comments|). |
|00000a00| 28 73 32 6c 2d 68 61 6e | 64 6c 65 2d 65 6e 76 69 |(s2l-han|dle-envi|
|00000a10| 72 6f 6e 6d 65 6e 74 73 | 29 0a 20 20 20 20 20 20 |ronments|). |
|00000a20| 28 73 32 6c 2d 68 61 6e | 64 6c 65 2d 64 65 66 75 |(s2l-han|dle-defu|
|00000a30| 6e 73 29 0a 20 20 20 20 | 20 20 28 73 32 6c 2d 64 |ns). | (s2l-d|
|00000a40| 6f 2d 74 69 74 6c 65 70 | 61 67 65 29 0a 20 20 20 |o-titlep|age). |
|00000a50| 20 20 20 28 73 32 6c 2d | 64 6f 2d 65 6e 76 69 72 | (s2l-|do-envir|
|00000a60| 6f 6e 6d 65 6e 74 73 29 | 0a 20 20 20 20 20 20 28 |onments)|. (|
|00000a70| 73 32 6c 2d 64 6f 2d 64 | 65 66 75 6e 73 29 0a 20 |s2l-do-d|efuns). |
|00000a80| 20 20 20 20 20 28 73 32 | 6c 2d 64 6f 2d 61 6c 69 | (s2|l-do-ali|
|00000a90| 73 74 20 73 63 72 69 62 | 65 2d 61 6c 69 73 74 29 |st scrib|e-alist)|
|00000aa0| 0a 20 20 20 20 20 20 28 | 73 32 6c 2d 64 6f 2d 63 |. (|s2l-do-c|
|00000ab0| 6f 6e 73 74 61 6e 74 73 | 29 0a 20 20 20 20 20 20 |onstants|). |
|00000ac0| 3b 3b 20 43 6f 6e 76 65 | 72 74 20 70 61 63 6b 61 |;; Conve|rt packa|
|00000ad0| 67 65 20 74 6f 20 4c 61 | 54 65 58 20 6f 70 74 69 |ge to La|TeX opti|
|00000ae0| 6f 6e 61 6c 20 61 72 67 | 75 6d 65 6e 74 20 66 6f |onal arg|ument fo|
|00000af0| 72 6d 61 74 0a 20 20 20 | 20 20 20 28 73 32 6c 2d |rmat. | (s2l-|
|00000b00| 64 6f 2d 61 6c 69 73 74 | 20 27 28 0a 09 09 20 20 |do-alist| '(... |
|00000b10| 20 20 20 20 28 22 7b 5b | 20 5c 74 5c 6e 5d 2a 5c | ("{[| \t\n]*\|
|00000b20| 5c 5c 5c 5b 70 50 5d 61 | 63 6b 61 67 65 7b 5c 5c |\\\[pP]a|ckage{\\|
|00000b30| 28 5b 5e 7d 5d 2b 5c 5c | 29 7d 5b 20 5c 74 2c 5d |([^}]+\\|)}[ \t,]|
|00000b40| 2a 22 20 2e 20 0a 09 09 | 20 20 20 20 20 20 20 22 |*" . ...| "|
|00000b50| 5b 5c 5c 31 5d 7b 22 29 | 0a 09 09 20 20 20 20 20 |[\\1]{")|... |
|00000b60| 20 3b 3b 20 4a 75 6e 6b | 20 74 68 65 20 65 78 74 | ;; Junk| the ext|
|00000b70| 72 61 20 61 72 67 75 6d | 65 6e 74 20 74 6f 20 64 |ra argum|ent to d|
|00000b80| 65 66 76 61 72 20 2e 0a | 09 09 20 20 20 20 20 20 |efvar ..|.. |
|00000b90| 3b 3b 20 48 61 64 20 74 | 68 6f 75 67 68 74 20 6f |;; Had t|hought o|
|00000ba0| 66 20 75 73 69 6e 67 20 | 69 74 20 66 6f 72 20 64 |f using |it for d|
|00000bb0| 65 66 61 75 6c 74 2e 0a | 09 09 20 20 20 20 20 20 |efault..|.. |
|00000bc0| 28 22 5e 5c 5c 5c 5c 64 | 65 66 63 6f 6e 73 74 5c |("^\\\\d|efconst\|
|00000bd0| 5c 28 2e 2b 5c 5c 29 7b | 7d 22 20 2e 20 22 5c 5c |\(.+\\){|}" . "\\|
|00000be0| 5c 5c 64 65 66 63 6f 6e | 73 74 5c 5c 31 22 29 0a |\\defcon|st\\1").|
|00000bf0| 09 09 20 20 20 20 20 20 | 28 22 5e 5c 5c 5c 5c 64 |.. |("^\\\\d|
|00000c00| 65 66 63 6f 6e 73 74 78 | 5c 5c 28 2e 2b 5c 5c 29 |efconstx|\\(.+\\)|
|00000c10| 7b 7d 22 20 2e 20 22 5c | 5c 5c 5c 64 65 66 63 6f |{}" . "\|\\\defco|
|00000c20| 6e 73 74 78 5c 5c 31 22 | 29 0a 09 09 20 20 20 20 |nstx\\1"|)... |
|00000c30| 20 20 28 22 5e 5c 5c 5c | 5c 64 65 66 76 61 72 5c | ("^\\\|\defvar\|
|00000c40| 5c 28 2e 2b 5c 5c 29 7b | 7d 22 20 2e 20 22 5c 5c |\(.+\\){|}" . "\\|
|00000c50| 5c 5c 64 65 66 76 61 72 | 5c 5c 31 22 29 0a 09 09 |\\defvar|\\1")...|
|00000c60| 20 20 20 20 20 20 28 22 | 5e 5c 5c 5c 5c 64 65 66 | ("|^\\\\def|
|00000c70| 76 61 72 78 5c 5c 28 2e | 2b 5c 5c 29 7b 7d 22 20 |varx\\(.|+\\){}" |
|00000c80| 2e 20 22 5c 5c 5c 5c 64 | 65 66 76 61 72 78 5c 5c |. "\\\\d|efvarx\\|
|00000c90| 31 22 29 29 29 0a 20 20 | 20 20 20 20 3b 3b 20 41 |1"))). | ;; A|
|00000ca0| 73 6b 20 61 62 6f 75 74 | 20 40 40 20 2d 3e 20 40 |sk about| @@ -> @|
|00000cb0| 0a 20 20 20 20 20 20 28 | 67 6f 74 6f 2d 63 68 61 |. (|goto-cha|
|00000cc0| 72 20 28 70 6f 69 6e 74 | 2d 6d 69 6e 29 29 0a 20 |r (point|-min)). |
|00000cd0| 20 20 20 20 20 28 69 66 | 20 20 28 79 65 73 2d 6f | (if| (yes-o|
|00000ce0| 72 2d 6e 6f 2d 70 0a 09 | 20 20 20 20 22 57 6f 75 |r-no-p..| "Wou|
|00000cf0| 6c 64 20 79 6f 75 20 6c | 69 6b 65 20 61 6c 6c 20 |ld you l|ike all |
|00000d00| 6f 63 63 75 72 65 6e 63 | 65 73 20 6f 66 20 60 40 |occurenc|es of `@|
|00000d10| 40 27 20 72 65 70 6c 61 | 63 65 64 20 62 79 20 60 |@' repla|ced by `|
|00000d20| 40 27 3f 20 22 29 0a 09 | 20 20 28 71 75 65 72 79 |@'? ")..| (query|
|00000d30| 2d 72 65 70 6c 61 63 65 | 20 22 40 40 22 20 22 40 |-replace| "@@" "@|
|00000d40| 22 20 6e 69 6c 29 29 0a | 20 20 20 20 20 20 28 67 |" nil)).| (g|
|00000d50| 6f 74 6f 2d 63 68 61 72 | 20 28 70 6f 69 6e 74 2d |oto-char| (point-|
|00000d60| 6d 61 78 29 29 0a 20 20 | 20 20 20 20 28 69 6e 73 |max)). | (ins|
|00000d70| 65 72 74 20 73 63 72 69 | 62 65 2d 74 6f 2d 6c 61 |ert scri|be-to-la|
|00000d80| 74 65 78 2d 74 61 69 6c | 29 0a 20 20 20 20 20 20 |tex-tail|). |
|00000d90| 28 73 32 6c 2d 66 6f 72 | 6d 61 74 2d 73 63 61 6e |(s2l-for|mat-scan|
|00000da0| 29 0a 20 20 20 20 20 20 | 29 0a 20 20 20 20 29 0a |). |). ).|
|00000db0| 20 20 29 0a 0a 28 64 65 | 66 75 6e 20 73 32 6c 2d | )..(de|fun s2l-|
|00000dc0| 66 6f 72 6d 61 74 2d 73 | 63 61 6e 20 28 29 0a 20 |format-s|can (). |
|00000dd0| 20 28 67 6f 74 6f 2d 63 | 68 61 72 20 28 70 6f 69 | (goto-c|har (poi|
|00000de0| 6e 74 2d 6d 69 6e 29 29 | 0a 20 20 28 6c 61 74 65 |nt-min))|. (late|
|00000df0| 78 69 6e 66 6f 2d 69 6e | 73 65 72 74 2d 6e 6f 64 |xinfo-in|sert-nod|
|00000e00| 65 2d 6c 69 6e 65 73 20 | 28 70 6f 69 6e 74 2d 6d |e-lines |(point-m|
|00000e10| 69 6e 29 20 28 70 6f 69 | 6e 74 2d 6d 61 78 29 20 |in) (poi|nt-max) |
|00000e20| 74 29 0a 20 20 28 6d 61 | 72 6b 2d 77 68 6f 6c 65 |t). (ma|rk-whole|
|00000e30| 2d 62 75 66 66 65 72 29 | 0a 20 20 28 6c 61 74 65 |-buffer)|. (late|
|00000e40| 78 69 6e 66 6f 2d 73 65 | 71 75 65 6e 74 69 61 6c |xinfo-se|quential|
|00000e50| 2d 6e 6f 64 65 2d 75 70 | 64 61 74 65 20 74 29 0a |-node-up|date t).|
|00000e60| 20 20 28 6c 61 74 65 78 | 69 6e 66 6f 2d 61 6c 6c | (latex|info-all|
|00000e70| 2d 6d 65 6e 75 73 2d 75 | 70 64 61 74 65 29 0a 3b |-menus-u|pdate).;|
|00000e80| 3b 20 20 28 6c 61 74 65 | 78 69 6e 66 6f 2d 6d 61 |; (late|xinfo-ma|
|00000e90| 73 74 65 72 2d 6d 65 6e | 75 20 6e 69 6c 29 0a 20 |ster-men|u nil). |
|00000ea0| 20 29 0a 0a 28 73 65 74 | 71 20 73 63 72 69 62 65 | )..(set|q scribe|
|00000eb0| 2d 61 6c 69 73 74 0a 20 | 20 20 20 20 20 27 28 0a |-alist. | '(.|
|00000ec0| 09 3b 3b 0a 09 28 22 40 | 6b 77 64 5c 5c 73 28 3a |.;;..("@|kwd\\s(:|
|00000ed0| 5c 5c 28 5b 61 2d 7a 2d | 2d 2d 5d 2b 5c 5c 29 5c |\\([a-z-|--]+\\)\|
|00000ee0| 5c 73 29 22 20 2e 20 22 | 5c 5c 5c 5c 6b 77 64 7b |\s)" . "|\\\\kwd{|
|00000ef0| 5c 5c 31 7d 22 29 0a 09 | 28 22 40 6b 77 64 5c 5c |\\1}")..|("@kwd\\|
|00000f00| 73 28 5c 5c 28 5b 41 2d | 5a 61 2d 7a 2d 2d 2d 5d |s(\\([A-|Za-z---]|
|00000f10| 2b 5c 5c 29 5c 5c 73 29 | 22 20 2e 20 22 5c 5c 5c |+\\)\\s)|" . "\\\|
|00000f20| 5c 6b 77 64 7b 5c 5c 31 | 7d 22 29 0a 09 28 22 40 |\kwd{\\1|}")..("@|
|00000f30| 75 78 5c 5c 73 28 5c 5c | 28 5b 40 61 2d 7a 2d 2d |ux\\s(\\|([@a-z--|
|00000f40| 2d 20 5d 2b 5c 5c 29 5c | 5c 73 29 22 20 2e 20 22 |- ]+\\)\|\s)" . "|
|00000f50| 5c 5c 5c 5c 75 78 7b 5c | 5c 31 7d 22 29 0a 09 28 |\\\\ux{\|\1}")..(|
|00000f60| 22 40 76 61 72 5c 5c 73 | 28 5c 5c 28 5b 2a 61 2d |"@var\\s|(\\([*a-|
|00000f70| 7a 2d 2d 2d 5d 2b 5c 5c | 29 5c 5c 73 29 22 20 2e |z---]+\\|)\\s)" .|
|00000f80| 20 22 5c 5c 5c 5c 76 7b | 5c 5c 31 7d 22 29 0a 09 | "\\\\v{|\\1}")..|
|00000f90| 28 22 40 62 6c 61 6e 6b | 73 70 61 63 65 5c 5c 73 |("@blank|space\\s|
|00000fa0| 28 5c 5c 28 5b 30 2d 39 | 5d 2b 5c 5c 29 5b 20 5c |(\\([0-9|]+\\)[ \|
|00000fb0| 74 5d 2a 6c 69 6e 65 73 | 5c 5c 73 29 22 20 2e 20 |t]*lines|\\s)" . |
|00000fc0| 22 5c 5c 5c 5c 73 70 7b | 5c 5c 31 7d 22 29 0a 09 |"\\\\sp{|\\1}")..|
|00000fd0| 28 22 40 62 6c 61 6e 6b | 73 70 61 63 65 5c 5c 73 |("@blank|space\\s|
|00000fe0| 28 5c 5c 28 5b 30 2d 39 | 2e 5d 2b 5c 5c 29 5b 20 |(\\([0-9|.]+\\)[ |
|00000ff0| 5c 74 5d 2a 69 6e 63 68 | 65 73 5c 5c 73 29 22 20 |\t]*inch|es\\s)" |
|00001000| 2e 20 22 5c 5c 5c 5c 76 | 73 70 61 63 65 7b 5c 5c |. "\\\\v|space{\\|
|00001010| 31 69 6e 7d 22 29 0a 09 | 28 22 40 62 6c 61 6e 6b |1in}")..|("@blank|
|00001020| 73 70 61 63 65 5c 5c 73 | 28 5c 5c 28 5b 61 2d 7a |space\\s|(\\([a-z|
|00001030| 5c 74 20 30 2d 39 2e 5d | 2b 5c 5c 29 5c 5c 73 29 |\t 0-9.]|+\\)\\s)|
|00001040| 22 20 2e 20 22 5c 5c 5c | 5c 76 73 70 61 63 65 7b |" . "\\\|\vspace{|
|00001050| 5c 5c 31 7d 22 29 0a 09 | 28 22 40 6e 65 77 70 61 |\\1}")..|("@newpa|
|00001060| 67 65 5c 5c 73 28 5c 5c | 28 5b 30 2d 39 5d 2b 5c |ge\\s(\\|([0-9]+\|
|00001070| 5c 29 5c 5c 73 29 22 20 | 2e 20 22 5c 5c 5c 5c 63 |\)\\s)" |. "\\\\c|
|00001080| 6c 65 61 72 70 61 67 65 | 22 29 0a 0a 09 3b 3b 20 |learpage|")...;; |
|00001090| 5c 76 61 72 0a 09 28 22 | 40 69 5c 5c 73 28 5c 5c |\var..("|@i\\s(\\|
|000010a0| 28 5b 61 2d 7a 2d 2d 2d | 5d 2b 5c 5c 29 5c 5c 73 |([a-z---|]+\\)\\s|
|000010b0| 29 22 20 2e 20 22 5c 5c | 5c 5c 76 61 72 7b 5c 5c |)" . "\\|\\var{\\|
|000010c0| 31 7d 22 29 0a 09 28 22 | 40 69 5c 22 5c 5c 28 5b |1}")..("|@i\"\\([|
|000010d0| 61 2d 7a 2d 2d 2d 5d 2b | 5c 5c 29 5c 22 22 20 2e |a-z---]+|\\)\"" .|
|000010e0| 20 22 5c 5c 5c 5c 76 61 | 72 7b 5c 5c 31 7d 22 29 | "\\\\va|r{\\1}")|
|000010f0| 0a 09 28 22 40 69 5c 5c | 73 28 5c 5c 28 5b 41 2d |..("@i\\|s(\\([A-|
|00001100| 5a 5d 5b 61 2d 7a 2d 2d | 2d 5d 2b 5c 5c 29 5c 5c |Z][a-z--|-]+\\)\\|
|00001110| 73 29 22 20 2e 20 22 5c | 5c 5c 5c 76 61 72 7b 5c |s)" . "\|\\\var{\|
|00001120| 5c 31 7d 22 29 0a 09 28 | 22 40 69 5c 22 5c 5c 28 |\1}")..(|"@i\"\\(|
|00001130| 5b 41 2d 5a 5d 5b 61 2d | 7a 2d 2d 2d 5d 2b 5c 5c |[A-Z][a-|z---]+\\|
|00001140| 29 5c 22 22 20 2e 20 22 | 5c 5c 5c 5c 76 61 72 7b |)\"" . "|\\\\var{|
|00001150| 5c 5c 31 7d 22 29 0a 09 | 28 22 40 49 5c 5c 73 28 |\\1}")..|("@I\\s(|
|00001160| 5c 5c 28 5b 41 2d 5a 2d | 2d 2d 5d 2b 5c 5c 29 5c |\\([A-Z-|--]+\\)\|
|00001170| 5c 73 29 22 20 2e 20 22 | 5c 5c 5c 5c 76 61 72 7b |\s)" . "|\\\\var{|
|00001180| 5c 5c 31 7d 22 29 0a 09 | 28 22 40 69 5c 5c 73 28 |\\1}")..|("@i\\s(|
|00001190| 3a 5c 5c 28 5b 61 2d 7a | 2d 2d 2d 5d 2b 5c 5c 29 |:\\([a-z|---]+\\)|
|000011a0| 5c 5c 73 29 22 20 2e 20 | 22 5c 5c 5c 5c 6b 77 64 |\\s)" . |"\\\\kwd|
|000011b0| 7b 5c 5c 31 7d 22 29 0a | 09 28 22 40 49 5c 5c 73 |{\\1}").|.("@I\\s|
|000011c0| 28 3a 5c 5c 28 5b 41 2d | 5a 2d 2d 2d 5d 2b 5c 5c |(:\\([A-|Z---]+\\|
|000011d0| 29 5c 5c 73 29 22 20 2e | 20 22 5c 5c 5c 5c 6b 77 |)\\s)" .| "\\\\kw|
|000011e0| 64 7b 5c 5c 31 7d 22 29 | 0a 09 28 22 40 69 5c 5c |d{\\1}")|..("@i\\|
|000011f0| 73 28 5c 5c 28 5b 61 2d | 7a 2d 2d 2d 5d 2b 20 2a |s(\\([a-|z---]+ *|
|00001200| 5b 2d 2d 2d 61 2d 7a 20 | 5d 2b 5c 5c 29 5c 5c 73 |[---a-z |]+\\)\\s|
|00001210| 29 22 20 2e 20 22 5c 5c | 5c 5c 69 7b 5c 5c 31 7d |)" . "\\|\\i{\\1}|
|00001220| 22 29 0a 0a 09 28 22 40 | 66 28 20 29 22 20 2e 20 |")...("@|f( )" . |
|00001230| 22 5c 5c 5c 5c 20 22 29 | 0a 09 3b 3b 20 73 65 61 |"\\\\ ")|..;; sea|
|00001240| 72 63 68 20 6c 69 73 74 | 0a 09 28 22 5c 22 40 66 |rch list|..("\"@f|
|00001250| 5c 5c 73 28 5c 5c 28 5b | 61 2d 7a 5d 5b 61 2d 7a |\\s(\\([|a-z][a-z|
|00001260| 2d 2d 2d 3a 2e 5d 2b 5c | 5c 29 5c 5c 73 29 5c 22 |---:.]+\|\)\\s)\"|
|00001270| 22 20 2e 20 22 5c 5c 5c | 5c 63 6f 64 65 7b 5c 5c |" . "\\\|\code{\\|
|00001280| 31 7d 22 29 0a 09 3b 3b | 20 50 61 63 6b 61 67 65 |1}")..;;| Package|
|00001290| 0a 09 28 22 40 66 5c 5c | 73 28 5c 22 5c 5c 28 5b |..("@f\\|s(\"\\([|
|000012a0| 41 2d 5a 5d 2b 5c 5c 29 | 5c 22 5c 5c 73 29 22 20 |A-Z]+\\)|\"\\s)" |
|000012b0| 2e 20 22 5c 5c 5c 5c 70 | 7b 5c 5c 31 7d 22 29 0a |. "\\\\p|{\\1}").|
|000012c0| 09 3b 3b 20 4d 61 79 62 | 65 20 49 6e 74 65 72 6e |.;; Mayb|e Intern|
|000012d0| 65 74 20 61 64 64 72 65 | 73 73 0a 09 28 22 40 66 |et addre|ss..("@f|
|000012e0| 5c 5c 73 28 5c 22 5c 5c | 28 5b 41 2d 5a 2e 5d 2b |\\s(\"\\|([A-Z.]+|
|000012f0| 5c 5c 29 5c 22 5c 5c 73 | 29 22 20 2e 20 22 5c 5c |\\)\"\\s|)" . "\\|
|00001300| 5c 5c 63 6f 64 65 7b 5c | 5c 31 7d 22 29 0a 09 3b |\\code{\|\1}")..;|
|00001310| 3b 20 48 65 6d 6c 6f 63 | 6b 20 43 6f 6d 6d 61 6e |; Hemloc|k Comman|
|00001320| 64 0a 09 28 22 40 66 5c | 5c 73 28 5c 22 5c 5c 28 |d..("@f\|\s(\"\\(|
|00001330| 5b 41 2d 5a 61 2d 7a 2d | 2d 2d 20 5d 2b 5c 5c 29 |[A-Za-z-|-- ]+\\)|
|00001340| 5c 22 5c 5c 73 29 22 20 | 2e 20 22 5c 5c 5c 5c 46 |\"\\s)" |. "\\\\F|
|00001350| 7b 5c 5c 31 7d 22 29 0a | 09 28 22 40 46 5c 5c 73 |{\\1}").|.("@F\\s|
|00001360| 28 5c 5c 28 5b 41 2d 5a | 61 2d 7a 2d 2d 2d 20 5d |(\\([A-Z|a-z--- ]|
|00001370| 2b 5c 5c 29 5c 5c 73 29 | 22 20 2e 20 22 5c 5c 5c |+\\)\\s)|" . "\\\|
|00001380| 5c 46 7b 5c 5c 31 7d 22 | 29 0a 09 3b 3b 20 66 69 |\F{\\1}"|)..;; fi|
|00001390| 6c 65 73 0a 09 28 22 40 | 66 5c 5c 73 28 5c 22 5c |les..("@|f\\s(\"\|
|000013a0| 5c 28 2f 5b 61 2d 7a 2d | 2d 2d 2e 2f 5d 2b 5c 5c |\(/[a-z-|--./]+\\|
|000013b0| 29 5c 22 5c 5c 73 29 22 | 20 2e 20 22 5c 5c 5c 5c |)\"\\s)"| . "\\\\|
|000013c0| 66 69 6c 65 7b 5c 5c 31 | 7d 22 29 0a 09 28 22 5c |file{\\1|}")..("\|
|000013d0| 22 40 66 5c 5c 73 28 5c | 5c 28 2f 5b 61 2d 7a 2d |"@f\\s(\|\(/[a-z-|
|000013e0| 2d 2d 2e 2f 5d 2b 5c 5c | 29 5c 5c 73 29 5c 22 22 |--./]+\\|)\\s)\""|
|000013f0| 20 2e 20 22 5c 5c 5c 5c | 66 69 6c 65 7b 5c 5c 31 | . "\\\\|file{\\1|
|00001400| 7d 22 29 0a 09 28 22 40 | 66 5c 5c 73 28 5c 5c 28 |}")..("@|f\\s(\\(|
|00001410| 2f 5b 61 2d 7a 2d 2d 2d | 2e 2f 5d 2b 5c 5c 29 5c |/[a-z---|./]+\\)\|
|00001420| 5c 73 29 22 20 2e 20 22 | 5c 5c 5c 5c 66 69 6c 65 |\s)" . "|\\\\file|
|00001430| 7b 5c 5c 31 7d 22 29 0a | 09 28 22 40 66 5c 5c 73 |{\\1}").|.("@f\\s|
|00001440| 28 5c 5c 28 2a 5b 2a 41 | 2d 5a 61 2d 7a 2d 2d 2d |(\\(*[*A|-Za-z---|
|00001450| 5d 2b 2a 5c 5c 29 5c 5c | 73 29 22 20 2e 20 22 5c |]+*\\)\\|s)" . "\|
|00001460| 5c 5c 5c 76 7b 5c 5c 31 | 7d 22 29 0a 0a 09 28 22 |\\\v{\\1|}")...("|
|00001470| 40 66 5c 5c 73 28 5c 5c | 28 5b 61 2d 7a 5d 5b 61 |@f\\s(\\|([a-z][a|
|00001480| 2d 7a 2d 2d 2d 5d 2b 5c | 5c 29 5c 5c 73 29 22 20 |-z---]+\|\)\\s)" |
|00001490| 2e 20 22 5c 5c 5c 5c 66 | 7b 5c 5c 31 7d 22 29 0a |. "\\\\f|{\\1}").|
|000014a0| 09 28 22 40 66 5c 5c 73 | 28 5c 5c 28 5b 41 2d 5a |.("@f\\s|(\\([A-Z|
|000014b0| 5d 5b 61 2d 7a 2d 2d 2d | 5d 2b 5c 5c 29 5c 5c 73 |][a-z---|]+\\)\\s|
|000014c0| 29 22 20 2e 20 22 5c 5c | 5c 5c 66 7b 5c 5c 31 7d |)" . "\\|\\f{\\1}|
|000014d0| 22 29 0a 09 28 22 40 66 | 5c 5c 73 28 5c 5c 28 5b |")..("@f|\\s(\\([|
|000014e0| 41 2d 5a 5d 5b 61 2d 7a | 2d 2d 2d 30 2d 39 5d 2b |A-Z][a-z|---0-9]+|
|000014f0| 5c 5c 29 5c 5c 73 29 22 | 20 2e 20 22 5c 5c 5c 5c |\\)\\s)"| . "\\\\|
|00001500| 66 7b 5c 5c 31 7d 22 29 | 0a 0a 09 28 22 40 66 5c |f{\\1}")|...("@f\|
|00001510| 5c 73 28 5c 5c 28 5b 61 | 2d 7a 5d 5b 61 2d 7a 2d |\s(\\([a|-z][a-z-|
|00001520| 2d 2d 3a 5d 2b 5c 5c 29 | 5c 5c 73 29 22 20 2e 20 |--:]+\\)|\\s)" . |
|00001530| 22 5c 5c 5c 5c 63 6f 64 | 65 7b 5c 5c 31 7d 22 29 |"\\\\cod|e{\\1}")|
|00001540| 0a 09 28 22 40 66 5c 5c | 73 28 5c 5c 28 5b 41 2d |..("@f\\|s(\\([A-|
|00001550| 5a 61 2d 7a 5d 5b 41 2d | 5a 61 2d 7a 2d 2d 2d 3a |Za-z][A-|Za-z---:|
|00001560| 5d 2b 5c 5c 29 5c 5c 73 | 29 22 20 2e 20 22 5c 5c |]+\\)\\s|)" . "\\|
|00001570| 5c 5c 63 6f 64 65 7b 5c | 5c 31 7d 22 29 0a 09 28 |\\code{\|\1}")..(|
|00001580| 22 40 66 5c 5c 73 28 5c | 5c 28 5b 61 2d 7a 5d 5b |"@f\\s(\|\([a-z][|
|00001590| 61 2d 7a 2d 2d 2d 2e 5d | 2b 5c 5c 29 5c 5c 73 29 |a-z---.]|+\\)\\s)|
|000015a0| 22 20 2e 20 22 5c 5c 5c | 5c 66 69 6c 65 7b 5c 5c |" . "\\\|\file{\\|
|000015b0| 31 7d 22 29 0a 0a 09 3b | 3b 63 61 74 63 68 20 61 |1}")...;|;catch a|
|000015c0| 6c 6c 0a 09 28 22 40 66 | 5c 5c 5b 5c 5c 28 5b 5e |ll..("@f|\\[\\([^|
|000015d0| 5d 5d 2b 5c 5c 29 5d 22 | 20 2e 20 22 5c 5c 5c 5c |]]+\\)]"| . "\\\\|
|000015e0| 63 6f 64 65 7b 5c 5c 31 | 7d 22 29 0a 09 28 22 40 |code{\\1|}")..("@|
|000015f0| 66 28 5c 5c 28 5b 5e 29 | 5d 2b 5c 5c 29 29 22 20 |f(\\([^)|]+\\))" |
|00001600| 2e 20 22 5c 5c 5c 5c 63 | 6f 64 65 7b 5c 5c 31 7d |. "\\\\c|ode{\\1}|
|00001610| 22 29 0a 09 28 22 40 66 | 3c 5c 5c 28 5b 5e 3e 5d |")..("@f|<\\([^>]|
|00001620| 2b 5c 5c 29 3e 22 20 2e | 20 22 5c 5c 5c 5c 63 6f |+\\)>" .| "\\\\co|
|00001630| 64 65 7b 5c 5c 31 7d 22 | 29 0a 09 28 22 40 66 7b |de{\\1}"|)..("@f{|
|00001640| 5c 5c 28 5b 5e 7d 5d 2b | 5c 5c 29 7d 22 20 2e 20 |\\([^}]+|\\)}" . |
|00001650| 22 5c 5c 5c 5c 63 6f 64 | 65 7b 5c 5c 31 7d 22 29 |"\\\\cod|e{\\1}")|
|00001660| 0a 0a 09 3b 3b 63 61 74 | 63 68 20 61 6c 6c 0a 09 |...;;cat|ch all..|
|00001670| 28 22 40 69 5c 5c 5b 5c | 5c 28 5b 5e 5d 5d 2b 5c |("@i\\[\|\([^]]+\|
|00001680| 5c 29 5d 22 20 2e 20 22 | 5c 5c 5c 5c 69 7b 5c 5c |\)]" . "|\\\\i{\\|
|00001690| 31 7d 22 29 0a 09 28 22 | 40 49 5c 5c 5b 5c 5c 28 |1}")..("|@I\\[\\(|
|000016a0| 5b 5e 5d 5d 2b 5c 5c 29 | 5d 22 20 2e 20 22 5c 5c |[^]]+\\)|]" . "\\|
|000016b0| 5c 5c 69 7b 5c 5c 31 7d | 22 29 0a 09 28 22 40 69 |\\i{\\1}|")..("@i|
|000016c0| 28 5c 5c 28 5b 5e 29 5d | 2b 5c 5c 29 29 22 20 2e |(\\([^)]|+\\))" .|
|000016d0| 20 22 5c 5c 5c 5c 69 7b | 5c 5c 31 7d 22 29 0a 09 | "\\\\i{|\\1}")..|
|000016e0| 28 22 40 69 3c 5c 5c 28 | 5b 5e 3e 5d 2b 5c 5c 29 |("@i<\\(|[^>]+\\)|
|000016f0| 3e 22 20 2e 20 22 5c 5c | 5c 5c 69 7b 5c 5c 31 7d |>" . "\\|\\i{\\1}|
|00001700| 22 29 0a 09 28 22 40 69 | 7b 5c 5c 28 5b 5e 7d 5d |")..("@i|{\\([^}]|
|00001710| 2b 5c 5c 29 7d 22 20 2e | 20 22 5c 5c 5c 5c 69 7b |+\\)}" .| "\\\\i{|
|00001720| 5c 5c 31 7d 22 29 0a 09 | 28 22 40 69 5c 22 5c 5c |\\1}")..|("@i\"\\|
|00001730| 28 5b 5e 5c 22 5d 2b 5c | 5c 29 5c 22 22 20 2e 20 |([^\"]+\|\)\"" . |
|00001740| 22 5c 5c 5c 5c 69 7b 5c | 5c 31 7d 22 29 0a 0a 09 |"\\\\i{\|\1}")...|
|00001750| 28 22 40 62 5c 5c 73 28 | 5c 5c 28 5b 61 2d 7a 41 |("@b\\s(|\\([a-zA|
|00001760| 2d 5a 3f 5d 5c 5c 29 5c | 5c 73 29 22 20 2e 20 22 |-Z?]\\)\|\s)" . "|
|00001770| 5c 5c 5c 5c 6b 65 79 7b | 5c 5c 31 7d 22 29 0a 09 |\\\\key{|\\1}")..|
|00001780| 28 22 40 62 5c 5c 73 28 | 5c 5c 28 5b 61 2d 7a 2d |("@b\\s(|\\([a-z-|
|00001790| 2d 2d 5d 2b 5c 5c 29 5c | 5c 73 29 22 20 2e 20 22 |--]+\\)\|\s)" . "|
|000017a0| 5c 5c 5c 5c 66 7b 5c 5c | 31 7d 22 29 20 3b 20 6f |\\\\f{\\|1}") ; o|
|000017b0| 72 20 5c 76 0a 09 28 22 | 40 62 5c 5c 73 28 5c 5c |r \v..("|@b\\s(\\|
|000017c0| 28 5b 61 2d 7a 5d 2b 5c | 5c 29 3a 5c 5c 28 5b 61 |([a-z]+\|\):\\([a|
|000017d0| 2d 7a 2d 2d 2d 5d 2b 5c | 5c 29 5c 5c 73 29 22 20 |-z---]+\|\)\\s)" |
|000017e0| 2e 20 22 5c 5c 5c 5c 66 | 7b 5c 5c 31 3a 5c 5c 32 |. "\\\\f|{\\1:\\2|
|000017f0| 7d 22 29 0a 09 28 22 40 | 62 5c 5c 73 28 5c 5c 28 |}")..("@|b\\s(\\(|
|00001800| 5b 61 2d 7a 41 2d 5a 5f | 2e 20 5d 2b 5c 5c 29 5c |[a-zA-Z_|. ]+\\)\|
|00001810| 5c 73 29 22 20 2e 20 22 | 5c 5c 5c 5c 62 7b 5c 5c |\s)" . "|\\\\b{\\|
|00001820| 31 7d 22 29 09 0a 0a 09 | 28 22 40 62 5c 5c 5b 5c |1}")....|("@b\\[\|
|00001830| 5c 28 5b 5e 5d 5d 2b 5c | 5c 29 5d 22 20 2e 20 22 |\([^]]+\|\)]" . "|
|00001840| 5c 5c 5c 5c 62 7b 5c 5c | 31 7d 22 29 0a 09 28 22 |\\\\b{\\|1}")..("|
|00001850| 40 62 28 5c 5c 28 5b 5e | 29 5d 2b 5c 5c 29 29 22 |@b(\\([^|)]+\\))"|
|00001860| 20 2e 20 22 5c 5c 5c 5c | 62 7b 5c 5c 31 7d 22 29 | . "\\\\|b{\\1}")|
|00001870| 0a 09 28 22 40 62 3c 5c | 5c 28 5b 5e 3e 5d 2b 5c |..("@b<\|\([^>]+\|
|00001880| 5c 29 3e 22 20 2e 20 22 | 5c 5c 5c 5c 62 7b 5c 5c |\)>" . "|\\\\b{\\|
|00001890| 31 7d 22 29 0a 09 28 22 | 40 62 7b 5c 5c 28 5b 5e |1}")..("|@b{\\([^|
|000018a0| 7d 5d 2b 5c 5c 29 7d 22 | 20 2e 20 22 5c 5c 5c 5c |}]+\\)}"| . "\\\\|
|000018b0| 62 7b 5c 5c 31 7d 22 29 | 0a 0a 09 28 22 40 77 5c |b{\\1}")|...("@w\|
|000018c0| 5c 5b 5c 5c 28 5b 5e 5d | 5d 2b 5c 5c 29 5d 22 20 |\[\\([^]|]+\\)]" |
|000018d0| 2e 20 22 5c 5c 5c 5c 77 | 7b 5c 5c 31 7d 22 29 0a |. "\\\\w|{\\1}").|
|000018e0| 09 28 22 40 77 28 5c 5c | 28 5b 5e 29 5d 2b 5c 5c |.("@w(\\|([^)]+\\|
|000018f0| 29 29 22 20 2e 20 22 5c | 5c 5c 5c 77 7b 5c 5c 31 |))" . "\|\\\w{\\1|
|00001900| 7d 22 29 0a 09 28 22 40 | 77 3c 5c 5c 28 5b 5e 3e |}")..("@|w<\\([^>|
|00001910| 5d 2b 5c 5c 29 3e 22 20 | 2e 20 22 5c 5c 5c 5c 77 |]+\\)>" |. "\\\\w|
|00001920| 7b 5c 5c 31 7d 22 29 0a | 09 28 22 40 77 7b 5c 5c |{\\1}").|.("@w{\\|
|00001930| 28 5b 5e 7d 5d 2b 5c 5c | 29 7d 22 20 2e 20 22 5c |([^}]+\\|)}" . "\|
|00001940| 5c 5c 5c 77 7b 5c 5c 31 | 7d 22 29 0a 0a 09 3b 3b |\\\w{\\1|}")...;;|
|00001950| 20 42 4e 46 20 73 79 6e | 74 61 78 20 66 6f 72 20 | BNF syn|tax for |
|00001960| 61 72 67 75 6d 65 6e 74 | 73 0a 09 28 22 40 6d 6f |argument|s..("@mo|
|00001970| 70 74 28 5c 5c 28 5b 5e | 29 5d 2b 5c 5c 29 29 22 |pt(\\([^|)]+\\))"|
|00001980| 20 2e 20 22 5c 5c 5c 5c | 6d 6f 70 74 7b 5c 5c 31 | . "\\\\|mopt{\\1|
|00001990| 7d 22 29 0a 09 28 22 40 | 6d 6f 70 74 3c 5c 5c 28 |}")..("@|mopt<\\(|
|000019a0| 5b 5e 3e 5d 2b 5c 5c 29 | 3e 22 20 2e 20 22 5c 5c |[^>]+\\)|>" . "\\|
|000019b0| 5c 5c 6d 6f 70 74 7b 5c | 5c 31 7d 22 29 0a 09 28 |\\mopt{\|\1}")..(|
|000019c0| 22 40 6d 70 6c 75 73 28 | 5c 5c 28 5b 5e 29 5d 2b |"@mplus(|\\([^)]+|
|000019d0| 5c 5c 29 29 22 20 2e 20 | 22 5c 5c 5c 5c 6d 70 6c |\\))" . |"\\\\mpl|
|000019e0| 75 73 7b 5c 5c 31 7d 22 | 29 0a 09 28 22 40 6d 70 |us{\\1}"|)..("@mp|
|000019f0| 6c 75 73 3c 5c 5c 28 5b | 5e 3e 5d 2b 5c 5c 29 3e |lus<\\([|^>]+\\)>|
|00001a00| 22 20 2e 20 22 5c 5c 5c | 5c 6d 70 6c 75 73 7b 5c |" . "\\\|\mplus{\|
|00001a10| 5c 31 7d 22 29 0a 09 28 | 22 40 6d 73 74 61 72 28 |\1}")..(|"@mstar(|
|00001a20| 5c 5c 28 5b 5e 29 5d 2b | 5c 5c 29 29 22 20 2e 20 |\\([^)]+|\\))" . |
|00001a30| 22 5c 5c 5c 5c 6d 73 74 | 61 72 7b 5c 5c 31 7d 22 |"\\\\mst|ar{\\1}"|
|00001a40| 29 0a 09 28 22 40 6d 73 | 74 61 72 3c 5c 5c 28 5b |)..("@ms|tar<\\([|
|00001a50| 5e 3e 5d 2b 5c 5c 29 3e | 22 20 2e 20 22 5c 5c 5c |^>]+\\)>|" . "\\\|
|00001a60| 5c 6d 73 74 61 72 7b 5c | 5c 31 7d 22 29 0a 09 28 |\mstar{\|\1}")..(|
|00001a70| 22 40 6d 6f 72 22 20 2e | 20 22 5c 5c 5c 5c 6d 6f |"@mor" .| "\\\\mo|
|00001a80| 72 22 29 0a 0a 09 28 22 | 40 6d 75 6c 74 69 70 6c |r")...("|@multipl|
|00001a90| 65 5c 5c 5b 5c 5c 28 5b | 5e 5d 5d 2b 5c 5c 29 5d |e\\[\\([|^]]+\\)]|
|00001aa0| 22 20 2e 20 22 5c 5c 5c | 5c 6d 75 6c 74 69 70 6c |" . "\\\|\multipl|
|00001ab0| 65 7b 5c 5c 31 7d 22 29 | 0a 09 28 22 40 6d 75 6c |e{\\1}")|..("@mul|
|00001ac0| 74 69 70 6c 65 28 5c 5c | 28 5b 5e 29 5d 2b 5c 5c |tiple(\\|([^)]+\\|
|00001ad0| 29 29 22 20 2e 20 22 5c | 5c 5c 5c 6d 75 6c 74 69 |))" . "\|\\\multi|
|00001ae0| 70 6c 65 7b 5c 5c 31 7d | 22 29 0a 09 28 22 40 6d |ple{\\1}|")..("@m|
|00001af0| 75 6c 74 69 70 6c 65 3c | 5c 5c 28 5b 5e 3e 5d 2b |ultiple<|\\([^>]+|
|00001b00| 5c 5c 29 3e 22 20 2e 20 | 22 5c 5c 5c 5c 6d 75 6c |\\)>" . |"\\\\mul|
|00001b10| 74 69 70 6c 65 7b 5c 5c | 31 7d 22 29 0a 09 28 22 |tiple{\\|1}")..("|
|00001b20| 40 6d 75 6c 74 69 70 6c | 65 7b 5c 5c 28 5b 5e 7d |@multipl|e{\\([^}|
|00001b30| 5d 2b 5c 5c 29 7d 22 20 | 2e 20 22 5c 5c 5c 5c 6d |]+\\)}" |. "\\\\m|
|00001b40| 75 6c 74 69 70 6c 65 7b | 5c 5c 31 7d 22 29 0a 0a |ultiple{|\\1}")..|
|00001b50| 09 3b 3b 20 73 65 63 74 | 69 6f 6e 20 63 6f 6d 6d |.;; sect|ion comm|
|00001b60| 61 6e 64 73 0a 09 28 22 | 5e 40 5b 6d 4d 5d 79 5b |ands..("|^@[mM]y[|
|00001b70| 63 43 5d 68 61 70 74 65 | 72 5c 5c 73 28 5c 5c 28 |cC]hapte|r\\s(\\(|
|00001b80| 5b 27 3a 5f 61 2d 7a 41 | 2d 5a 20 30 2d 39 2d 2d |[':_a-zA|-Z 0-9--|
|00001b90| 2d 5d 2b 5c 5c 29 5c 5c | 73 29 22 20 2e 20 22 5c |-]+\\)\\|s)" . "\|
|00001ba0| 5c 5c 5c 63 68 61 70 74 | 65 72 7b 5c 5c 31 7d 22 |\\\chapt|er{\\1}"|
|00001bb0| 29 0a 09 28 22 5e 40 5b | 63 43 5d 68 61 70 74 65 |)..("^@[|cC]hapte|
|00001bc0| 72 5c 5c 73 28 5c 5c 28 | 5b 3a 27 5f 61 2d 7a 41 |r\\s(\\(|[:'_a-zA|
|00001bd0| 2d 5a 20 30 2d 39 2d 2d | 2d 5d 2b 5c 5c 29 5c 5c |-Z 0-9--|-]+\\)\\|
|00001be0| 73 29 22 20 2e 20 22 5c | 5c 5c 5c 63 68 61 70 74 |s)" . "\|\\\chapt|
|00001bf0| 65 72 7b 5c 5c 31 7d 22 | 29 0a 09 28 22 5e 40 5b |er{\\1}"|)..("^@[|
|00001c00| 53 73 5d 65 63 74 69 6f | 6e 5c 5c 73 28 5c 5c 28 |Ss]ectio|n\\s(\\(|
|00001c10| 2e 2b 5c 5c 29 5c 5c 73 | 29 5b 20 5c 74 5d 2a 24 |.+\\)\\s|)[ \t]*$|
|00001c20| 22 20 2e 20 22 5c 5c 5c | 5c 73 65 63 74 69 6f 6e |" . "\\\|\section|
|00001c30| 7b 5c 5c 31 7d 22 29 0a | 09 28 22 5e 40 5b 73 53 |{\\1}").|.("^@[sS|
|00001c40| 5d 75 62 73 65 63 74 69 | 6f 6e 5c 5c 73 28 5c 5c |]ubsecti|on\\s(\\|
|00001c50| 28 2e 2b 5c 5c 29 5c 5c | 73 29 5b 20 5c 74 5d 2a |(.+\\)\\|s)[ \t]*|
|00001c60| 24 22 20 2e 20 22 5c 5c | 5c 5c 73 75 62 73 65 63 |$" . "\\|\\subsec|
|00001c70| 74 69 6f 6e 7b 5c 5c 31 | 7d 22 29 0a 09 28 22 5e |tion{\\1|}")..("^|
|00001c80| 40 5b 73 53 5d 75 62 73 | 75 62 73 65 63 74 69 6f |@[sS]ubs|ubsectio|
|00001c90| 6e 5c 5c 73 28 5c 5c 28 | 2e 2b 5c 5c 29 5c 5c 73 |n\\s(\\(|.+\\)\\s|
|00001ca0| 29 5b 20 5c 74 5d 2a 24 | 22 20 2e 20 22 5c 5c 5c |)[ \t]*$|" . "\\\|
|00001cb0| 5c 73 75 62 73 75 62 73 | 65 63 74 69 6f 6e 7b 5c |\subsubs|ection{\|
|00001cc0| 5c 31 7d 22 29 0a 09 28 | 22 5e 40 5b 68 48 5d 65 |\1}")..(|"^@[hH]e|
|00001cd0| 61 64 69 6e 67 5c 5c 73 | 28 5c 5c 28 2e 2b 5c 5c |ading\\s|(\\(.+\\|
|00001ce0| 29 5c 5c 73 29 5b 20 5c | 74 5d 2a 24 22 20 2e 20 |)\\s)[ \|t]*$" . |
|00001cf0| 22 5c 5c 5c 5c 70 61 72 | 61 67 72 61 70 68 7b 5c |"\\\\par|agraph{\|
|00001d00| 5c 31 7d 22 29 0a 0a 09 | 3b 3b 20 49 6e 64 65 78 |\1}")...|;; Index|
|00001d10| 65 73 0a 09 28 22 40 5b | 69 49 5d 6e 64 65 78 5c |es..("@[|iI]ndex\|
|00001d20| 5c 73 28 5c 5c 28 5b 41 | 2d 5a 61 2d 7a 2d 2d 2d |\s(\\([A|-Za-z---|
|00001d30| 20 5d 2b 5c 5c 29 5c 5c | 73 29 22 20 2e 20 22 5c | ]+\\)\\|s)" . "\|
|00001d40| 5c 5c 5c 63 69 6e 64 65 | 78 7b 5c 5c 31 7d 22 29 |\\\cinde|x{\\1}")|
|00001d50| 0a 09 28 22 40 5b 69 49 | 5d 6e 64 65 78 5c 5c 5b |..("@[iI|]ndex\\[|
|00001d60| 5c 5c 28 5b 5c 5c 5c 5c | 41 2d 5a 61 2d 7a 2d 2d |\\([\\\\|A-Za-z--|
|00001d70| 2d 20 28 29 7b 7d 5d 2b | 5c 5c 29 5d 22 20 2e 20 |- (){}]+|\\)]" . |
|00001d80| 22 5c 5c 5c 5c 63 69 6e | 64 65 78 7b 5c 5c 31 7d |"\\\\cin|dex{\\1}|
|00001d90| 22 29 0a 09 28 22 40 5b | 69 49 5d 6e 64 65 78 5c |")..("@[|iI]ndex\|
|00001da0| 5c 73 28 5c 5c 28 5b 41 | 2d 5a 61 2d 7a 2d 2d 2d |\s(\\([A|-Za-z---|
|00001db0| 20 5d 2b 5c 5c 29 2c 5b | 20 5c 74 5d 5c 5c 28 5b | ]+\\),[| \t]\\([|
|00001dc0| 5c 5c 5c 5c 7b 7d 28 29 | 41 2d 5a 61 2d 7a 2d 2d |\\\\{}()|A-Za-z--|
|00001dd0| 2d 20 5d 2b 5c 5c 29 5c | 5c 73 29 22 20 2e 20 22 |- ]+\\)\|\s)" . "|
|00001de0| 5c 5c 5c 5c 63 70 73 75 | 62 69 6e 64 65 78 7b 5c |\\\\cpsu|bindex{\|
|00001df0| 5c 31 7d 7b 5c 5c 32 7d | 22 29 0a 09 28 22 40 5b |\1}{\\2}|")..("@[|
|00001e00| 69 49 5d 6e 64 65 78 5c | 5c 73 28 5c 5c 28 5b 41 |iI]ndex\|\s(\\([A|
|00001e10| 2d 5a 61 2d 7a 30 2d 39 | 28 29 2c 2d 2d 2d 20 5d |-Za-z0-9|(),--- ]|
|00001e20| 2b 5c 5c 29 5c 5c 73 29 | 22 20 2e 20 22 5c 5c 5c |+\\)\\s)|" . "\\\|
|00001e30| 5c 63 69 6e 64 65 78 7b | 5c 5c 31 7d 22 29 0a 09 |\cindex{|\\1}")..|
|00001e40| 28 22 40 66 69 6e 64 65 | 78 5c 5c 73 28 5c 5c 28 |("@finde|x\\s(\\(|
|00001e50| 5b 61 2d 7a 2d 2d 2d 5d | 2b 5c 5c 29 5c 5c 73 29 |[a-z---]|+\\)\\s)|
|00001e60| 22 20 2e 20 22 5c 5c 5c | 5c 66 69 6e 64 65 78 7b |" . "\\\|\findex{|
|00001e70| 5c 5c 31 7d 22 29 0a 0a | 09 28 22 5e 40 69 6e 64 |\\1}")..|.("^@ind|
|00001e80| 65 78 65 6e 74 72 79 5c | 5c 73 28 6b 65 79 3d 5c |exentry\|\s(key=\|
|00001e90| 5c 73 28 5c 5c 28 5b 61 | 2d 7a 2d 2d 2d 5d 2b 5c |\s(\\([a|-z---]+\|
|00001ea0| 5c 29 2e 2a 2c 5c 6e 2e | 2a 5c 6e 2e 2a 5c 5c 73 |\).*,\n.|*\n.*\\s|
|00001eb0| 29 5b 20 5c 74 5d 2a 5c | 6e 22 0a 09 20 2e 20 22 |)[ \t]*\|n".. . "|
|00001ec0| 5c 5c 5c 5c 6b 69 6e 64 | 65 78 7b 5c 5c 31 7d 5c |\\\\kind|ex{\\1}\|
|00001ed0| 6e 22 29 0a 09 28 22 40 | 6c 61 62 65 6c 5c 5c 73 |n")..("@|label\\s|
|00001ee0| 28 5c 5c 28 5b 41 2d 5a | 61 2d 7a 2d 2d 2d 5d 2b |(\\([A-Z|a-z---]+|
|00001ef0| 5c 5c 29 5c 5c 73 29 22 | 20 2e 20 22 5c 5c 5c 5c |\\)\\s)"| . "\\\\|
|00001f00| 6c 61 62 65 6c 7b 5c 5c | 31 7d 22 29 0a 0a 09 28 |label{\\|1}")...(|
|00001f10| 22 53 65 65 5b 20 5c 74 | 5c 6e 5d 2b 73 65 63 74 |"See[ \t|\n]+sect|
|00001f20| 69 6f 6e 5b 20 5c 74 5c | 6e 5d 40 72 65 66 5c 5c |ion[ \t\|n]@ref\\|
|00001f30| 73 28 5c 5c 28 5b 61 2d | 7a 2d 2d 2d 5d 2b 5c 5c |s(\\([a-|z---]+\\|
|00001f40| 29 5c 5c 73 29 22 20 2e | 20 22 5c 5c 5c 5c 78 6c |)\\s)" .| "\\\\xl|
|00001f50| 72 65 66 7b 5c 5c 31 7d | 22 29 0a 09 28 22 73 65 |ref{\\1}|")..("se|
|00001f60| 65 5b 20 5c 74 5c 6e 5d | 2b 73 65 63 74 69 6f 6e |e[ \t\n]|+section|
|00001f70| 5b 20 5c 74 5c 6e 5d 40 | 72 65 66 5c 5c 73 28 5c |[ \t\n]@|ref\\s(\|
|00001f80| 5c 28 5b 61 2d 7a 2d 2d | 2d 5d 2b 5c 5c 29 5c 5c |\([a-z--|-]+\\)\\|
|00001f90| 73 29 22 20 2e 20 22 5c | 5c 5c 5c 70 78 6c 72 65 |s)" . "\|\\\pxlre|
|00001fa0| 66 7b 5c 5c 31 7d 22 29 | 0a 09 28 22 28 73 65 63 |f{\\1}")|..("(sec|
|00001fb0| 74 69 6f 6e 5b 20 5c 74 | 5c 6e 5d 40 72 65 66 5c |tion[ \t|\n]@ref\|
|00001fc0| 5c 73 28 5c 5c 28 5b 61 | 2d 7a 2d 2d 2d 5d 2b 5c |\s(\\([a|-z---]+\|
|00001fd0| 5c 29 5c 5c 73 29 29 22 | 20 2e 20 22 28 5c 5c 5c |\)\\s))"| . "(\\\|
|00001fe0| 5c 70 78 6c 72 65 66 7b | 5c 5c 31 7d 29 22 29 0a |\pxlref{|\\1})").|
|00001ff0| 09 28 22 53 65 65 5b 20 | 5c 74 5c 6e 5d 2b 61 6c |.("See[ |\t\n]+al|
|00002000| 73 6f 5b 20 5c 74 5c 6e | 5d 2b 73 65 63 74 69 6f |so[ \t\n|]+sectio|
|00002010| 6e 5b 20 5c 74 5c 6e 5d | 40 72 65 66 5c 5c 73 28 |n[ \t\n]|@ref\\s(|
|00002020| 5c 5c 28 5b 61 2d 7a 2d | 2d 2d 5d 2b 5c 5c 29 5c |\\([a-z-|--]+\\)\|
|00002030| 5c 73 29 22 20 2e 20 22 | 5c 5c 5c 5c 78 6c 72 65 |\s)" . "|\\\\xlre|
|00002040| 66 7b 5c 5c 31 7d 22 29 | 0a 09 28 22 73 65 65 5b |f{\\1}")|..("see[|
|00002050| 20 5c 74 5c 6e 5d 2b 61 | 6c 73 6f 5b 20 5c 74 5c | \t\n]+a|lso[ \t\|
|00002060| 6e 5d 2b 73 65 63 74 69 | 6f 6e 5b 20 5c 74 5c 6e |n]+secti|on[ \t\n|
|00002070| 5d 40 72 65 66 5c 5c 73 | 28 5c 5c 28 5b 61 2d 7a |]@ref\\s|(\\([a-z|
|00002080| 2d 2d 2d 5d 2b 5c 5c 29 | 5c 5c 73 29 22 20 2e 20 |---]+\\)|\\s)" . |
|00002090| 22 5c 5c 5c 5c 70 78 6c | 72 65 66 7b 5c 5c 31 7d |"\\\\pxl|ref{\\1}|
|000020a0| 22 29 0a 3b 3b 09 28 22 | 53 65 65 5b 20 5c 74 5c |").;;.("|See[ \t\|
|000020b0| 6e 5d 2b 73 65 63 74 69 | 6f 6e 73 5b 20 5c 74 5c |n]+secti|ons[ \t\|
|000020c0| 6e 5d 40 72 65 66 5c 5c | 73 28 5c 5c 28 5b 61 2d |n]@ref\\|s(\\([a-|
|000020d0| 7a 2d 2d 2d 5d 2b 5c 5c | 29 5c 5c 73 29 22 20 2e |z---]+\\|)\\s)" .|
|000020e0| 20 22 5c 5c 5c 5c 78 6c | 72 65 66 7b 5c 5c 31 7d | "\\\\xl|ref{\\1}|
|000020f0| 2c 22 29 0a 3b 3b 09 28 | 22 73 65 65 5b 20 5c 74 |,").;;.(|"see[ \t|
|00002100| 5c 6e 5d 2b 73 65 63 74 | 69 6f 6e 73 5b 20 5c 74 |\n]+sect|ions[ \t|
|00002110| 5c 6e 5d 40 72 65 66 5c | 5c 73 28 5c 5c 28 5b 61 |\n]@ref\|\s(\\([a|
|00002120| 2d 7a 2d 2d 2d 5d 2b 5c | 5c 29 5c 5c 73 29 22 20 |-z---]+\|\)\\s)" |
|00002130| 2e 20 22 5c 5c 5c 5c 70 | 78 6c 72 65 66 7b 5c 5c |. "\\\\p|xlref{\\|
|00002140| 31 7d 2c 22 29 0a 0a 09 | 28 22 40 72 65 66 5c 5c |1},")...|("@ref\\|
|00002150| 73 28 5c 5c 28 5b 41 2d | 5a 61 2d 7a 2d 2d 2d 5d |s(\\([A-|Za-z---]|
|00002160| 2b 5c 5c 29 5c 5c 73 29 | 22 20 2e 20 22 5c 5c 5c |+\\)\\s)|" . "\\\|
|00002170| 5c 72 65 66 7b 5c 5c 31 | 7d 22 29 0a 09 3b 3b 20 |\ref{\\1|}")..;; |
|00002180| 54 68 65 20 70 61 67 65 | 72 65 66 20 70 68 72 61 |The page|ref phra|
|00002190| 73 65 20 77 69 6c 6c 20 | 62 65 20 77 72 6f 6e 67 |se will |be wrong|
|000021a0| 2e 0a 09 28 22 40 70 61 | 67 65 72 65 66 5c 5c 73 |...("@pa|geref\\s|
|000021b0| 28 5c 5c 28 5b 41 2d 5a | 61 2d 7a 2d 2d 2d 5d 2b |(\\([A-Z|a-z---]+|
|000021c0| 5c 5c 29 5c 5c 73 29 22 | 20 2e 20 22 5c 5c 5c 5c |\\)\\s)"| . "\\\\|
|000021d0| 70 61 67 65 72 65 66 7b | 5c 5c 31 7d 22 29 0a 0a |pageref{|\\1}")..|
|000021e0| 09 28 22 40 66 75 6e 72 | 65 66 5c 5c 73 28 5c 5c |.("@funr|ef\\s(\\|
|000021f0| 28 5b 41 2d 5a 61 2d 7a | 2d 2d 2d 5d 2b 5c 5c 29 |([A-Za-z|---]+\\)|
|00002200| 5c 5c 73 29 22 20 2e 20 | 22 5c 5c 5c 5c 66 75 6e |\\s)" . |"\\\\fun|
|00002210| 72 65 66 7b 5c 5c 31 7d | 22 29 0a 09 28 22 40 6d |ref{\\1}|")..("@m|
|00002220| 61 63 72 65 66 5c 5c 73 | 28 5c 5c 28 5b 41 2d 5a |acref\\s|(\\([A-Z|
|00002230| 61 2d 7a 2d 2d 2d 5d 2b | 5c 5c 29 5c 5c 73 29 22 |a-z---]+|\\)\\s)"|
|00002240| 20 2e 20 22 5c 5c 5c 5c | 6d 61 63 72 65 66 7b 5c | . "\\\\|macref{\|
|00002250| 5c 31 7d 22 29 0a 09 28 | 22 40 73 70 65 63 72 65 |\1}")..(|"@specre|
|00002260| 66 5c 5c 73 28 5c 5c 28 | 5b 41 2d 5a 61 2d 7a 2d |f\\s(\\(|[A-Za-z-|
|00002270| 2d 2d 5d 2b 5c 5c 29 5c | 5c 73 29 22 20 2e 20 22 |--]+\\)\|\s)" . "|
|00002280| 5c 5c 5c 5c 73 70 65 63 | 72 65 66 7b 5c 5c 31 7d |\\\\spec|ref{\\1}|
|00002290| 22 29 0a 09 28 22 40 76 | 61 72 72 65 66 5c 5c 73 |")..("@v|arref\\s|
|000022a0| 28 5c 5c 28 5b 41 2d 5a | 61 2d 7a 2d 2d 2d 5d 2b |(\\([A-Z|a-z---]+|
|000022b0| 5c 5c 29 5c 5c 73 29 22 | 20 2e 20 22 5c 5c 5c 5c |\\)\\s)"| . "\\\\|
|000022c0| 76 61 72 72 65 66 7b 5c | 5c 31 7d 22 29 0a 0a 09 |varref{\|\1}")...|
|000022d0| 28 22 40 2d 22 20 2e 20 | 22 5c 5c 5c 5c 2d 22 29 |("@-" . |"\\\\-")|
|000022e0| 0a 09 28 22 40 61 70 70 | 65 6e 64 69 78 22 20 2e |..("@app|endix" .|
|000022f0| 20 22 5c 5c 5c 5c 61 70 | 70 65 6e 64 69 78 22 29 | "\\\\ap|pendix")|
|00002300| 0a 09 28 22 7b 40 20 7d | 22 20 2e 20 22 7b 5c 5c |..("{@ }|" . "{\\|
|00002310| 5c 5c 20 7d 22 29 0a 09 | 29 29 0a 0a 28 73 65 74 |\\ }")..|))..(set|
|00002320| 71 20 73 63 72 69 62 65 | 2d 64 65 6c 65 74 65 2d |q scribe|-delete-|
|00002330| 6c 69 73 74 20 20 27 28 | 0a 09 09 09 20 20 20 20 |list '(|.... |
|00002340| 22 5e 40 4d 61 6b 65 22 | 0a 09 09 09 20 20 20 20 |"^@Make"|.... |
|00002350| 22 5e 40 63 6f 6d 6d 61 | 6e 64 73 74 72 69 6e 67 |"^@comma|ndstring|
|00002360| 22 0a 09 09 09 20 20 20 | 20 22 5e 40 50 61 67 65 |".... | "^@Page|
|00002370| 68 65 61 64 69 6e 67 22 | 0a 09 09 09 20 20 20 20 |heading"|.... |
|00002380| 22 5e 40 50 61 67 65 66 | 6f 6f 74 69 6e 67 22 0a |"^@Pagef|ooting".|
|00002390| 09 09 09 20 20 20 20 22 | 5e 40 44 65 76 69 63 65 |... "|^@Device|
|000023a0| 22 0a 09 09 09 20 20 20 | 20 22 5e 40 55 73 65 22 |".... | "^@Use"|
|000023b0| 0a 09 09 09 20 20 20 20 | 22 5e 40 53 74 79 6c 65 |.... |"^@Style|
|000023c0| 22 0a 09 09 09 20 20 20 | 20 22 5e 40 4c 69 62 72 |".... | "^@Libr|
|000023d0| 61 72 79 66 69 6c 65 22 | 0a 09 09 09 20 20 20 20 |aryfile"|.... |
|000023e0| 22 5e 40 54 61 62 63 6c | 65 61 72 22 0a 09 09 09 |"^@Tabcl|ear"....|
|000023f0| 20 20 20 20 22 5e 40 54 | 65 78 74 66 6f 72 6d 22 | "^@T|extform"|
|00002400| 0a 09 09 09 20 20 20 20 | 22 5e 40 74 61 62 64 69 |.... |"^@tabdi|
|00002410| 76 69 64 65 22 29 29 0a | 0a 28 69 66 20 73 63 72 |vide")).|.(if scr|
|00002420| 69 62 65 2d 66 6f 72 6d | 61 74 2d 73 79 6e 74 61 |ibe-form|at-synta|
|00002430| 78 2d 74 61 62 6c 65 20 | 6e 69 6c 0a 20 20 28 70 |x-table |nil. (p|
|00002440| 72 6f 67 6e 0a 20 20 20 | 20 28 73 65 74 71 20 73 |rogn. | (setq s|
|00002450| 63 72 69 62 65 2d 66 6f | 72 6d 61 74 2d 73 79 6e |cribe-fo|rmat-syn|
|00002460| 74 61 78 2d 74 61 62 6c | 65 20 28 6d 61 6b 65 2d |tax-tabl|e (make-|
|00002470| 73 79 6e 74 61 78 2d 74 | 61 62 6c 65 29 29 0a 20 |syntax-t|able)). |
|00002480| 20 20 20 28 6d 6f 64 69 | 66 79 2d 73 79 6e 74 61 | (modi|fy-synta|
|00002490| 78 2d 65 6e 74 72 79 20 | 3f 5c 22 20 22 5c 22 22 |x-entry |?\" "\""|
|000024a0| 20 73 63 72 69 62 65 2d | 66 6f 72 6d 61 74 2d 73 | scribe-|format-s|
|000024b0| 79 6e 74 61 78 2d 74 61 | 62 6c 65 29 0a 20 20 20 |yntax-ta|ble). |
|000024c0| 20 28 6d 6f 64 69 66 79 | 2d 73 79 6e 74 61 78 2d | (modify|-syntax-|
|000024d0| 65 6e 74 72 79 20 3f 2a | 20 22 77 22 20 73 63 72 |entry ?*| "w" scr|
|000024e0| 69 62 65 2d 66 6f 72 6d | 61 74 2d 73 79 6e 74 61 |ibe-form|at-synta|
|000024f0| 78 2d 74 61 62 6c 65 29 | 0a 20 20 20 20 28 6d 6f |x-table)|. (mo|
|00002500| 64 69 66 79 2d 73 79 6e | 74 61 78 2d 65 6e 74 72 |dify-syn|tax-entr|
|00002510| 79 20 3f 40 20 22 77 22 | 20 73 63 72 69 62 65 2d |y ?@ "w"| scribe-|
|00002520| 66 6f 72 6d 61 74 2d 73 | 79 6e 74 61 78 2d 74 61 |format-s|yntax-ta|
|00002530| 62 6c 65 29 0a 20 20 20 | 20 28 6d 6f 64 69 66 79 |ble). | (modify|
|00002540| 2d 73 79 6e 74 61 78 2d | 65 6e 74 72 79 20 3f 5c |-syntax-|entry ?\|
|00002550| 5c 20 22 5c 5c 22 20 73 | 63 72 69 62 65 2d 66 6f |\ "\\" s|cribe-fo|
|00002560| 72 6d 61 74 2d 73 79 6e | 74 61 78 2d 74 61 62 6c |rmat-syn|tax-tabl|
|00002570| 65 29 0a 20 20 20 20 28 | 6d 6f 64 69 66 79 2d 73 |e). (|modify-s|
|00002580| 79 6e 74 61 78 2d 65 6e | 74 72 79 20 3f 5c 5e 71 |yntax-en|try ?\^q|
|00002590| 20 22 5c 5c 22 20 73 63 | 72 69 62 65 2d 66 6f 72 | "\\" sc|ribe-for|
|000025a0| 6d 61 74 2d 73 79 6e 74 | 61 78 2d 74 61 62 6c 65 |mat-synt|ax-table|
|000025b0| 29 0a 20 20 20 20 28 6d | 6f 64 69 66 79 2d 73 79 |). (m|odify-sy|
|000025c0| 6e 74 61 78 2d 65 6e 74 | 72 79 20 3f 5c 5b 20 22 |ntax-ent|ry ?\[ "|
|000025d0| 28 5d 22 20 73 63 72 69 | 62 65 2d 66 6f 72 6d 61 |(]" scri|be-forma|
|000025e0| 74 2d 73 79 6e 74 61 78 | 2d 74 61 62 6c 65 29 0a |t-syntax|-table).|
|000025f0| 20 20 20 20 28 6d 6f 64 | 69 66 79 2d 73 79 6e 74 | (mod|ify-synt|
|00002600| 61 78 2d 65 6e 74 72 79 | 20 3f 5c 5d 20 22 29 5b |ax-entry| ?\] ")[|
|00002610| 22 20 73 63 72 69 62 65 | 2d 66 6f 72 6d 61 74 2d |" scribe|-format-|
|00002620| 73 79 6e 74 61 78 2d 74 | 61 62 6c 65 29 0a 20 20 |syntax-t|able). |
|00002630| 20 20 28 6d 6f 64 69 66 | 79 2d 73 79 6e 74 61 78 | (modif|y-syntax|
|00002640| 2d 65 6e 74 72 79 20 3f | 5c 28 20 22 28 29 22 20 |-entry ?|\( "()" |
|00002650| 73 63 72 69 62 65 2d 66 | 6f 72 6d 61 74 2d 73 79 |scribe-f|ormat-sy|
|00002660| 6e 74 61 78 2d 74 61 62 | 6c 65 29 0a 20 20 20 20 |ntax-tab|le). |
|00002670| 28 6d 6f 64 69 66 79 2d | 73 79 6e 74 61 78 2d 65 |(modify-|syntax-e|
|00002680| 6e 74 72 79 20 3f 5c 29 | 20 22 29 28 22 20 73 63 |ntry ?\)| ")(" sc|
|00002690| 72 69 62 65 2d 66 6f 72 | 6d 61 74 2d 73 79 6e 74 |ribe-for|mat-synt|
|000026a0| 61 78 2d 74 61 62 6c 65 | 29 0a 20 20 20 20 28 6d |ax-table|). (m|
|000026b0| 6f 64 69 66 79 2d 73 79 | 6e 74 61 78 2d 65 6e 74 |odify-sy|ntax-ent|
|000026c0| 72 79 20 3f 7b 20 22 28 | 7d 22 20 73 63 72 69 62 |ry ?{ "(|}" scrib|
|000026d0| 65 2d 66 6f 72 6d 61 74 | 2d 73 79 6e 74 61 78 2d |e-format|-syntax-|
|000026e0| 74 61 62 6c 65 29 0a 20 | 20 20 20 28 6d 6f 64 69 |table). | (modi|
|000026f0| 66 79 2d 73 79 6e 74 61 | 78 2d 65 6e 74 72 79 20 |fy-synta|x-entry |
|00002700| 3f 7d 20 22 29 7b 22 20 | 73 63 72 69 62 65 2d 66 |?} "){" |scribe-f|
|00002710| 6f 72 6d 61 74 2d 73 79 | 6e 74 61 78 2d 74 61 62 |ormat-sy|ntax-tab|
|00002720| 6c 65 29 0a 20 20 20 20 | 28 6d 6f 64 69 66 79 2d |le). |(modify-|
|00002730| 73 79 6e 74 61 78 2d 65 | 6e 74 72 79 20 3f 3c 20 |syntax-e|ntry ?< |
|00002740| 22 28 3e 22 20 73 63 72 | 69 62 65 2d 66 6f 72 6d |"(>" scr|ibe-form|
|00002750| 61 74 2d 73 79 6e 74 61 | 78 2d 74 61 62 6c 65 29 |at-synta|x-table)|
|00002760| 0a 20 20 20 20 28 6d 6f | 64 69 66 79 2d 73 79 6e |. (mo|dify-syn|
|00002770| 74 61 78 2d 65 6e 74 72 | 79 20 3f 3e 20 22 29 3c |tax-entr|y ?> ")<|
|00002780| 22 20 73 63 72 69 62 65 | 2d 66 6f 72 6d 61 74 2d |" scribe|-format-|
|00002790| 73 79 6e 74 61 78 2d 74 | 61 62 6c 65 29 0a 20 20 |syntax-t|able). |
|000027a0| 20 20 28 6d 6f 64 69 66 | 79 2d 73 79 6e 74 61 78 | (modif|y-syntax|
|000027b0| 2d 65 6e 74 72 79 20 3f | 5c 27 20 22 2e 22 20 73 |-entry ?|\' "." s|
|000027c0| 63 72 69 62 65 2d 66 6f | 72 6d 61 74 2d 73 79 6e |cribe-fo|rmat-syn|
|000027d0| 74 61 78 2d 74 61 62 6c | 65 29 29 29 0a 0a 28 64 |tax-tabl|e)))..(d|
|000027e0| 65 66 75 6e 20 73 32 6c | 2d 64 6f 2d 61 6c 69 73 |efun s2l|-do-alis|
|000027f0| 74 20 28 61 6c 69 73 74 | 29 0a 20 20 28 6c 65 74 |t (alist|). (let|
|00002800| 20 28 28 63 61 73 65 2d | 66 6f 6c 64 2d 73 65 61 | ((case-|fold-sea|
|00002810| 72 63 68 20 6e 69 6c 29 | 29 0a 20 20 20 20 28 73 |rch nil)|). (s|
|00002820| 65 74 2d 73 79 6e 74 61 | 78 2d 74 61 62 6c 65 20 |et-synta|x-table |
|00002830| 73 63 72 69 62 65 2d 66 | 6f 72 6d 61 74 2d 73 79 |scribe-f|ormat-sy|
|00002840| 6e 74 61 78 2d 74 61 62 | 6c 65 29 0a 20 20 20 20 |ntax-tab|le). |
|00002850| 28 77 68 69 6c 65 20 61 | 6c 69 73 74 0a 20 20 20 |(while a|list. |
|00002860| 20 20 20 28 67 6f 74 6f | 2d 63 68 61 72 20 28 70 | (goto|-char (p|
|00002870| 6f 69 6e 74 2d 6d 69 6e | 29 29 0a 20 20 20 20 20 |oint-min|)). |
|00002880| 20 28 71 75 69 65 74 6c | 79 2d 72 65 70 6c 61 63 | (quietl|y-replac|
|00002890| 65 2d 72 65 67 65 78 70 | 20 28 63 61 72 20 28 63 |e-regexp| (car (c|
|000028a0| 61 72 20 61 6c 69 73 74 | 29 29 20 28 63 64 72 20 |ar alist|)) (cdr |
|000028b0| 28 63 61 72 20 61 6c 69 | 73 74 29 29 20 6e 69 6c |(car ali|st)) nil|
|000028c0| 29 0a 20 20 20 20 20 20 | 28 6d 65 73 73 61 67 65 |). |(message|
|000028d0| 20 22 25 73 22 20 28 63 | 61 72 20 28 63 61 72 20 | "%s" (c|ar (car |
|000028e0| 61 6c 69 73 74 29 29 29 | 0a 20 20 20 20 20 20 28 |alist)))|. (|
|000028f0| 73 65 74 71 20 61 6c 69 | 73 74 20 28 63 64 72 20 |setq ali|st (cdr |
|00002900| 61 6c 69 73 74 29 29 29 | 0a 20 20 20 20 29 0a 20 |alist)))|. ). |
|00002910| 20 29 0a 0a 28 64 65 66 | 75 6e 20 73 32 6c 2d 64 | )..(def|un s2l-d|
|00002920| 6f 2d 74 69 74 6c 65 70 | 61 67 65 20 28 29 0a 20 |o-titlep|age (). |
|00002930| 20 28 73 32 6c 2d 64 6f | 2d 61 6c 69 73 74 20 0a | (s2l-do|-alist .|
|00002940| 20 20 20 27 28 0a 20 20 | 20 20 20 3b 3b 20 54 68 | '(. | ;; Th|
|00002950| 65 79 20 77 69 6c 6c 20 | 70 72 6f 62 61 62 6c 79 |ey will |probably|
|00002960| 20 68 61 76 65 20 74 6f | 20 66 69 78 20 74 68 65 | have to| fix the|
|00002970| 20 6c 6f 63 61 74 69 6f | 6e 20 6f 66 20 74 68 65 | locatio|n of the|
|00002980| 20 5c 6d 61 6b 65 74 69 | 74 6c 65 0a 20 20 20 20 | \maketi|tle. |
|00002990| 20 28 22 5c 5c 5c 5c 73 | 65 74 66 69 6c 65 6e 61 | ("\\\\s|etfilena|
|000029a0| 6d 65 7b 5c 5c 28 2e 2b | 5c 5c 29 7d 22 20 2e 20 |me{\\(.+|\\)}" . |
|000029b0| 22 5c 5c 5c 5c 73 65 74 | 66 69 6c 65 6e 61 6d 65 |"\\\\set|filename|
|000029c0| 7b 5c 5c 31 7d 0a 5c 5c | 5c 5c 70 61 67 65 73 74 |{\\1}.\\|\\pagest|
|000029d0| 79 6c 65 7b 65 6d 70 74 | 79 7d 0a 5c 5c 5c 5c 64 |yle{empt|y}.\\\\d|
|000029e0| 61 74 65 7b 5c 5c 5c 5c | 74 6f 64 61 79 7d 0a 5c |ate{\\\\|today}.\|
|000029f0| 5c 5c 5c 6d 61 6b 65 74 | 69 74 6c 65 0a 0a 5c 5c |\\\maket|itle..\\|
|00002a00| 5c 5c 63 6c 65 61 72 70 | 61 67 65 0a 5c 5c 5c 5c |\\clearp|age.\\\\|
|00002a10| 70 61 67 65 73 74 79 6c | 65 7b 68 65 61 64 69 6e |pagestyl|e{headin|
|00002a20| 67 73 7d 0a 5c 5c 5c 5c | 70 61 67 65 6e 75 6d 62 |gs}.\\\\|pagenumb|
|00002a30| 65 72 69 6e 67 7b 72 6f | 6d 61 6e 7d 0a 5c 5c 5c |ering{ro|man}.\\\|
|00002a40| 5c 74 61 62 6c 65 6f 66 | 63 6f 6e 74 65 6e 74 73 |\tableof|contents|
|00002a50| 0a 0a 5c 5c 5c 5c 63 6c | 65 61 72 70 61 67 65 0a |..\\\\cl|earpage.|
|00002a60| 5c 5c 5c 5c 70 61 67 65 | 6e 75 6d 62 65 72 69 6e |\\\\page|numberin|
|00002a70| 67 7b 61 72 61 62 69 63 | 7d 0a 5c 5c 5c 5c 6e 6f |g{arabic|}.\\\\no|
|00002a80| 64 65 20 74 6f 70 2c 20 | 2c 28 64 69 72 29 2c 20 |de top, |,(dir), |
|00002a90| 28 64 69 72 29 0a 22 29 | 0a 20 20 20 20 20 28 22 |(dir).")|. ("|
|00002aa0| 40 62 65 67 69 6e 5c 5c | 5b 54 65 78 74 2c 5b 20 |@begin\\|[Text,[ |
|00002ab0| 5c 74 5d 2a 69 6e 64 65 | 6e 74 5b 20 5c 74 5c 6e |\t]*inde|nt[ \t\n|
|00002ac0| 5d 2a 30 5c 5c 5d 5b 20 | 5c 74 5c 6e 5d 2a 22 20 |]*0\\][ |\t\n]*" |
|00002ad0| 2e 20 22 5c 5c 5c 5c 6e | 6f 69 6e 64 65 6e 74 5c |. "\\\\n|oindent\|
|00002ae0| 6e 22 29 0a 20 20 20 20 | 20 28 22 40 65 6e 64 5c |n"). | ("@end\|
|00002af0| 5c 5b 54 65 78 74 5c 5c | 5d 5b 5c 6e 5d 22 20 2e |\[Text\\|][\n]" .|
|00002b00| 20 22 22 29 0a 20 20 20 | 20 20 29 29 0a 20 20 29 | ""). | )). )|
|00002b10| 0a 0a 28 64 65 66 75 6e | 20 73 32 6c 2d 64 6f 2d |..(defun| s2l-do-|
|00002b20| 65 6e 76 69 72 6f 6e 6d | 65 6e 74 73 20 28 29 0a |environm|ents ().|
|00002b30| 20 20 28 73 32 6c 2d 64 | 6f 2d 61 6c 69 73 74 0a | (s2l-d|o-alist.|
|00002b40| 20 20 20 27 28 0a 20 20 | 20 20 20 3b 3b 20 53 74 | '(. | ;; St|
|00002b50| 61 6e 64 61 72 64 20 65 | 6e 76 69 72 6f 6e 6d 65 |andard e|nvironme|
|00002b60| 6e 74 73 0a 20 20 20 20 | 20 28 22 5e 40 5b 6c 4c |nts. | ("^@[lL|
|00002b70| 5d 69 73 70 22 20 2e 20 | 22 5c 5c 5c 5c 62 65 67 |]isp" . |"\\\\beg|
|00002b80| 69 6e 7b 6c 69 73 70 7d | 22 29 0a 20 20 20 20 20 |in{lisp}|"). |
|00002b90| 28 22 5e 40 5b 65 45 5d | 6e 64 5b 6c 4c 5d 69 73 |("^@[eE]|nd[lL]is|
|00002ba0| 70 22 20 2e 20 22 5c 5c | 5c 5c 65 6e 64 7b 6c 69 |p" . "\\|\\end{li|
|00002bb0| 73 70 7d 22 29 0a 20 20 | 20 20 20 28 22 5e 40 5b |sp}"). | ("^@[|
|00002bc0| 62 42 5d 65 67 69 6e 5c | 5c 73 28 5b 65 45 5d 78 |bB]egin\|\s([eE]x|
|00002bd0| 61 6d 70 6c 65 5c 5c 73 | 29 22 20 2e 20 22 5c 5c |ample\\s|)" . "\\|
|00002be0| 5c 5c 62 65 67 69 6e 7b | 65 78 61 6d 70 6c 65 7d |\\begin{|example}|
|00002bf0| 22 29 0a 20 20 20 20 20 | 28 22 5e 40 5b 65 45 5d |"). |("^@[eE]|
|00002c00| 6e 64 5c 5c 73 28 5b 65 | 45 5d 78 61 6d 70 6c 65 |nd\\s([e|E]xample|
|00002c10| 5c 5c 73 29 22 20 2e 20 | 22 5c 5c 5c 5c 65 6e 64 |\\s)" . |"\\\\end|
|00002c20| 7b 65 78 61 6d 70 6c 65 | 7d 22 29 0a 20 20 20 20 |{example|}"). |
|00002c30| 20 28 22 5e 40 5b 62 42 | 5d 65 67 69 6e 5c 5c 73 | ("^@[bB|]egin\\s|
|00002c40| 28 5b 69 49 5d 5c 5c 73 | 29 22 20 2e 20 22 5c 5c |([iI]\\s|)" . "\\|
|00002c50| 5c 5c 69 7b 22 29 0a 20 | 20 20 20 20 28 22 5e 40 |\\i{"). | ("^@|
|00002c60| 5b 65 45 5d 6e 64 5c 5c | 73 28 5b 69 49 5d 5c 5c |[eE]nd\\|s([iI]\\|
|00002c70| 73 29 22 20 2e 20 22 7d | 22 29 0a 20 20 20 20 20 |s)" . "}|"). |
|00002c80| 28 22 5e 40 5b 62 42 5d | 65 67 69 6e 5c 5c 73 28 |("^@[bB]|egin\\s(|
|00002c90| 5b 76 56 5d 65 72 62 61 | 74 69 6d 5c 5c 73 29 22 |[vV]erba|tim\\s)"|
|00002ca0| 20 2e 20 22 5c 5c 5c 5c | 62 65 67 69 6e 7b 76 65 | . "\\\\|begin{ve|
|00002cb0| 72 62 61 74 69 6d 7d 22 | 29 0a 20 20 20 20 20 28 |rbatim}"|). (|
|00002cc0| 22 5e 40 5b 65 45 5d 6e | 64 5c 5c 73 28 5b 76 56 |"^@[eE]n|d\\s([vV|
|00002cd0| 5d 65 72 62 61 74 69 6d | 5c 5c 73 29 22 20 2e 20 |]erbatim|\\s)" . |
|00002ce0| 22 5c 5c 5c 5c 65 6e 64 | 7b 76 65 72 62 61 74 69 |"\\\\end|{verbati|
|00002cf0| 6d 7d 22 29 0a 20 20 20 | 20 20 28 22 5e 40 5b 62 |m}"). | ("^@[b|
|00002d00| 42 5d 65 67 69 6e 5c 5c | 73 28 5b 71 51 5d 75 6f |B]egin\\|s([qQ]uo|
|00002d10| 74 61 74 69 6f 6e 5c 5c | 73 29 22 20 2e 20 22 5c |tation\\|s)" . "\|
|00002d20| 5c 5c 5c 62 65 67 69 6e | 7b 71 75 6f 74 65 7d 22 |\\\begin|{quote}"|
|00002d30| 29 0a 20 20 20 20 20 28 | 22 5e 40 5b 65 45 5d 6e |). (|"^@[eE]n|
|00002d40| 64 5c 5c 73 28 5b 71 51 | 5d 75 6f 74 61 74 69 6f |d\\s([qQ|]uotatio|
|00002d50| 6e 5c 5c 73 29 22 20 2e | 20 22 5c 5c 5c 5c 65 6e |n\\s)" .| "\\\\en|
|00002d60| 64 7b 71 75 6f 74 65 7d | 22 29 0a 20 20 20 20 20 |d{quote}|"). |
|00002d70| 28 22 5e 40 5b 62 42 5d | 65 67 69 6e 5c 5c 73 28 |("^@[bB]|egin\\s(|
|00002d80| 5b 63 43 5d 65 6e 74 65 | 72 5c 5c 73 29 22 20 2e |[cC]ente|r\\s)" .|
|00002d90| 20 22 5c 5c 5c 5c 62 65 | 67 69 6e 7b 63 65 6e 74 | "\\\\be|gin{cent|
|00002da0| 65 72 7d 22 29 0a 20 20 | 20 20 20 28 22 5e 40 5b |er}"). | ("^@[|
|00002db0| 65 45 5d 6e 64 5c 5c 73 | 28 5b 63 43 5d 65 6e 74 |eE]nd\\s|([cC]ent|
|00002dc0| 65 72 5c 5c 73 29 22 20 | 2e 20 22 5c 5c 5c 5c 65 |er\\s)" |. "\\\\e|
|00002dd0| 6e 64 7b 63 65 6e 74 65 | 72 7d 22 29 0a 20 20 20 |nd{cente|r}"). |
|00002de0| 20 20 28 22 5e 40 5b 62 | 42 5d 65 67 69 6e 5c 5c | ("^@[b|B]egin\\|
|00002df0| 73 28 5b 64 44 5d 69 73 | 70 6c 61 79 5c 5c 73 29 |s([dD]is|play\\s)|
|00002e00| 22 20 2e 20 22 5c 5c 5c | 5c 62 65 67 69 6e 7b 64 |" . "\\\|\begin{d|
|00002e10| 69 73 70 6c 61 79 7d 22 | 29 0a 20 20 20 20 20 28 |isplay}"|). (|
|00002e20| 22 5e 40 5b 65 45 5d 6e | 64 5c 5c 73 28 5b 64 44 |"^@[eE]n|d\\s([dD|
|00002e30| 5d 69 73 70 6c 61 79 5c | 5c 73 29 22 20 2e 20 22 |]isplay\|\s)" . "|
|00002e40| 5c 5c 5c 5c 65 6e 64 7b | 64 69 73 70 6c 61 79 7d |\\\\end{|display}|
|00002e50| 22 29 0a 20 20 20 20 20 | 28 22 5e 5c 5c 28 5b 5e |"). |("^\\([^|
|00002e60| 5c 5c 5c 5c 5d 2b 5c 5c | 29 40 5c 5c 5c 5c 22 20 |\\\\]+\\|)@\\\\" |
|00002e70| 2e 20 22 5c 5c 5c 5c 69 | 74 65 6d 5b 5c 5c 31 5d |. "\\\\i|tem[\\1]|
|00002e80| 5c 74 22 29 0a 20 20 20 | 20 20 28 22 5e 5c 5c 28 |\t"). | ("^\\(|
|00002e90| 5b 5e 5c 5c 5c 5c 5d 2b | 5c 5c 29 5c 6e 40 5c 5c |[^\\\\]+|\\)\n@\\|
|00002ea0| 5c 5c 22 20 2e 20 22 5c | 5c 5c 5c 69 74 65 6d 5b |\\" . "\|\\\item[|
|00002eb0| 5c 5c 31 5d 5c 74 22 29 | 0a 20 20 20 20 20 28 22 |\\1]\t")|. ("|
|00002ec0| 5e 40 5b 62 42 5d 65 67 | 69 6e 5c 5c 73 28 5b 70 |^@[bB]eg|in\\s([p|
|00002ed0| 50 5d 72 6f 67 72 61 6d | 5b 65 45 5d 78 61 6d 70 |P]rogram|[eE]xamp|
|00002ee0| 6c 65 5c 5c 73 29 22 20 | 2e 20 22 5c 5c 5c 5c 62 |le\\s)" |. "\\\\b|
|00002ef0| 65 67 69 6e 7b 76 65 72 | 62 61 74 69 6d 7d 22 29 |egin{ver|batim}")|
|00002f00| 0a 20 20 20 20 20 28 22 | 5e 40 5b 65 45 5d 6e 64 |. ("|^@[eE]nd|
|00002f10| 5c 5c 73 28 5b 70 50 5d | 72 6f 67 72 61 6d 5b 65 |\\s([pP]|rogram[e|
|00002f20| 45 5d 78 61 6d 70 6c 65 | 5c 5c 73 29 22 20 2e 20 |E]xample|\\s)" . |
|00002f30| 22 5c 5c 5c 5c 65 6e 64 | 7b 76 65 72 62 61 74 69 |"\\\\end|{verbati|
|00002f40| 6d 7d 22 29 0a 0a 20 20 | 20 20 20 3b 3b 20 4c 6f |m}").. | ;; Lo|
|00002f50| 77 65 72 2d 63 61 73 65 | 20 65 6e 64 20 63 61 74 |wer-case| end cat|
|00002f60| 63 68 20 61 6c 6c 0a 20 | 20 20 20 20 28 22 5e 40 |ch all. | ("^@|
|00002f70| 5b 65 45 5d 6e 64 5c 5c | 73 28 5c 5c 28 5b 61 2d |[eE]nd\\|s(\\([a-|
|00002f80| 7a 5d 2b 5c 5c 29 5c 5c | 73 29 22 20 2e 20 22 5c |z]+\\)\\|s)" . "\|
|00002f90| 5c 5c 5c 65 6e 64 7b 5c | 5c 31 7d 22 29 0a 20 20 |\\\end{\|\1}"). |
|00002fa0| 20 20 20 28 22 40 5b 65 | 45 5d 6e 64 5b 64 44 5d | ("@[e|E]nd[dD]|
|00002fb0| 65 66 66 75 6e 22 20 22 | 5c 5c 5c 5c 65 6e 64 7b |effun" "|\\\\end{|
|00002fc0| 64 65 66 75 6e 7d 22 29 | 0a 20 20 20 20 20 29 29 |defun}")|. ))|
|00002fd0| 0a 20 20 29 0a 0a 28 64 | 65 66 75 6e 20 73 32 6c |. )..(d|efun s2l|
|00002fe0| 2d 64 6f 2d 64 65 66 75 | 6e 73 20 28 29 0a 20 20 |-do-defu|ns (). |
|00002ff0| 22 4d 75 73 74 20 63 6f | 6d 65 20 61 66 74 65 72 |"Must co|me after|
|00003000| 20 20 20 20 20 20 20 28 | 73 32 6c 2d 68 61 6e 64 | (|s2l-hand|
|00003010| 6c 65 2d 64 65 66 75 6e | 73 29 22 0a 20 20 28 73 |le-defun|s)". (s|
|00003020| 32 6c 2d 64 6f 2d 61 6c | 69 73 74 0a 20 20 20 27 |2l-do-al|ist. '|
|00003030| 28 0a 20 20 20 20 20 3b | 3b 20 40 64 65 66 20 65 |(. ;|; @def e|
|00003040| 6e 76 69 72 6f 6e 6d 65 | 6e 74 73 0a 20 20 20 20 |nvironme|nts. |
|00003050| 20 3b 3b 20 4e 61 6d 65 | 20 69 73 20 72 65 71 75 | ;; Name| is requ|
|00003060| 69 72 65 64 2e 0a 20 20 | 20 20 20 28 22 5e 40 64 |ired.. | ("^@d|
|00003070| 65 66 75 6e 7b 66 75 6e | 20 5c 5c 73 28 5c 5c 28 |efun{fun| \\s(\\(|
|00003080| 5b 2a 61 2d 7a 30 2d 39 | 2b 2d 2d 2d 5d 2b 5c 5c |[*a-z0-9|+---]+\\|
|00003090| 29 5c 5c 73 29 22 20 2e | 20 22 5c 5c 5c 5c 64 65 |)\\s)" .| "\\\\de|
|000030a0| 66 75 6e 7b 5c 5c 31 7d | 7b 22 29 0a 20 20 20 20 |fun{\\1}|{"). |
|000030b0| 20 28 22 5e 40 64 65 66 | 75 6e 31 7b 66 75 6e 20 | ("^@def|un1{fun |
|000030c0| 5c 5c 73 28 5c 5c 28 5b | 2a 61 2d 7a 30 2d 39 2b |\\s(\\([|*a-z0-9+|
|000030d0| 2d 2d 2d 5d 2b 5c 5c 29 | 5c 5c 73 29 22 20 2e 20 |---]+\\)|\\s)" . |
|000030e0| 22 5c 5c 5c 5c 64 65 66 | 75 6e 78 7b 5c 5c 31 7d |"\\\\def|unx{\\1}|
|000030f0| 7b 22 29 0a 0a 20 20 20 | 20 20 28 22 5e 40 64 65 |{").. | ("^@de|
|00003100| 66 6d 61 63 7b 66 75 6e | 20 5c 5c 73 28 5c 5c 28 |fmac{fun| \\s(\\(|
|00003110| 5b 2a 61 2d 7a 30 2d 39 | 2b 2d 2d 2d 5d 2b 5c 5c |[*a-z0-9|+---]+\\|
|00003120| 29 5c 5c 73 29 22 20 2e | 20 22 5c 5c 5c 5c 64 65 |)\\s)" .| "\\\\de|
|00003130| 66 6d 61 63 7b 5c 5c 31 | 7d 7b 22 29 0a 20 20 20 |fmac{\\1|}{"). |
|00003140| 20 20 28 22 5e 40 64 65 | 66 6d 61 63 31 7b 66 75 | ("^@de|fmac1{fu|
|00003150| 6e 20 5c 5c 73 28 5c 5c | 28 5b 2a 61 2d 7a 30 2d |n \\s(\\|([*a-z0-|
|00003160| 39 2b 2d 2d 2d 5d 2b 5c | 5c 29 5c 5c 73 29 22 20 |9+---]+\|\)\\s)" |
|00003170| 2e 20 22 5c 5c 5c 5c 64 | 65 66 6d 61 63 78 7b 5c |. "\\\\d|efmacx{\|
|00003180| 5c 31 7d 7b 22 29 0a 0a | 20 20 20 20 20 28 22 5e |\1}{")..| ("^|
|00003190| 40 64 65 66 73 70 65 63 | 7b 66 75 6e 20 5c 5c 73 |@defspec|{fun \\s|
|000031a0| 28 5c 5c 28 5b 2a 61 2d | 7a 30 2d 39 2b 2d 2d 2d |(\\([*a-|z0-9+---|
|000031b0| 5d 2b 5c 5c 29 5c 5c 73 | 29 22 20 2e 20 22 5c 5c |]+\\)\\s|)" . "\\|
|000031c0| 5c 5c 64 65 66 73 70 65 | 63 7b 5c 5c 31 7d 7b 22 |\\defspe|c{\\1}{"|
|000031d0| 29 0a 20 20 20 20 20 28 | 22 5e 40 64 65 66 73 70 |). (|"^@defsp|
|000031e0| 65 63 31 7b 66 75 6e 20 | 5c 5c 73 28 5c 5c 28 5b |ec1{fun |\\s(\\([|
|000031f0| 2a 61 2d 7a 30 2d 39 2b | 2d 2d 2d 5d 2b 5c 5c 29 |*a-z0-9+|---]+\\)|
|00003200| 5c 5c 73 29 22 20 2e 20 | 22 5c 5c 5c 5c 64 65 66 |\\s)" . |"\\\\def|
|00003210| 73 70 65 63 78 7b 5c 5c | 31 7d 7b 22 29 0a 0a 20 |specx{\\|1}{").. |
|00003220| 20 20 20 20 28 22 5e 40 | 64 65 66 76 61 72 7b 76 | ("^@|defvar{v|
|00003230| 61 72 20 5c 5c 73 28 5c | 5c 28 5b 2a 61 2d 7a 30 |ar \\s(\|\([*a-z0|
|00003240| 2d 39 2b 2d 2d 2d 5d 2b | 5c 5c 29 5c 5c 73 29 22 |-9+---]+|\\)\\s)"|
|00003250| 20 2e 20 22 5c 5c 5c 5c | 64 65 66 76 61 72 7b 5c | . "\\\\|defvar{\|
|00003260| 5c 31 7d 7b 22 29 0a 20 | 20 20 20 20 28 22 5e 40 |\1}{"). | ("^@|
|00003270| 64 65 66 76 61 72 31 7b | 76 61 72 20 5c 5c 73 28 |defvar1{|var \\s(|
|00003280| 5c 5c 28 5b 2a 61 2d 7a | 30 2d 39 2b 2d 2d 2d 5d |\\([*a-z|0-9+---]|
|00003290| 2b 5c 5c 29 5c 5c 73 29 | 22 20 2e 20 22 5c 5c 5c |+\\)\\s)|" . "\\\|
|000032a0| 5c 64 65 66 76 61 72 78 | 7b 5c 5c 31 7d 7b 22 29 |\defvarx|{\\1}{")|
|000032b0| 0a 0a 20 20 20 20 20 28 | 22 5e 40 64 65 66 63 6f |.. (|"^@defco|
|000032c0| 6e 7b 76 61 72 20 5c 5c | 73 28 5c 5c 28 5b 2a 61 |n{var \\|s(\\([*a|
|000032d0| 2d 7a 30 2d 39 2b 2d 2d | 2d 5d 2b 5c 5c 29 5c 5c |-z0-9+--|-]+\\)\\|
|000032e0| 73 29 22 20 2e 20 22 5c | 5c 5c 5c 64 65 66 63 6f |s)" . "\|\\\defco|
|000032f0| 6e 73 74 7b 5c 5c 31 7d | 7b 22 29 0a 20 20 20 20 |nst{\\1}|{"). |
|00003300| 20 28 22 5e 40 64 65 66 | 63 6f 6e 31 7b 76 61 72 | ("^@def|con1{var|
|00003310| 20 5c 5c 73 28 5c 5c 28 | 5b 2a 61 2d 7a 30 2d 39 | \\s(\\(|[*a-z0-9|
|00003320| 2b 2d 2d 2d 5d 2b 5c 5c | 29 5c 5c 73 29 22 20 2e |+---]+\\|)\\s)" .|
|00003330| 20 22 5c 5c 5c 5c 64 65 | 66 63 6f 6e 73 74 78 7b | "\\\\de|fconstx{|
|00003340| 5c 5c 31 7d 7b 22 29 0a | 20 20 20 20 20 28 22 40 |\\1}{").| ("@|
|00003350| 65 6e 64 64 65 66 63 6f | 6e 22 20 2e 20 22 5c 5c |enddefco|n" . "\\|
|00003360| 5c 5c 65 6e 64 64 65 66 | 63 6f 6e 73 74 22 29 0a |\\enddef|const").|
|00003370| 0a 20 20 20 20 20 28 22 | 40 65 6e 64 64 65 66 5c |. ("|@enddef\|
|00003380| 5c 28 5b 61 2d 7a 5d 2b | 5c 5c 29 22 20 2e 20 22 |\([a-z]+|\\)" . "|
|00003390| 5c 5c 5c 5c 65 6e 64 64 | 65 66 5c 5c 31 22 29 0a |\\\\endd|ef\\1").|
|000033a0| 0a 20 20 20 20 20 3b 3b | 20 6b 65 79 73 0a 20 20 |. ;;| keys. |
|000033b0| 20 20 20 28 22 2c 5c 5c | 28 5b 20 5c 74 5c 6e 5d | (",\\|([ \t\n]|
|000033c0| 2b 5c 5c 29 6d 6f 72 65 | 6b 65 79 73 5b 20 5c 74 |+\\)more|keys[ \t|
|000033d0| 5d 2a 22 20 2e 20 22 5c | 5c 31 5c 5c 5c 5c 6d 6f |]*" . "\|\1\\\\mo|
|000033e0| 72 65 6b 65 79 73 22 29 | 0a 20 20 20 20 20 28 22 |rekeys")|. ("|
|000033f0| 2c 5c 5c 28 5b 20 5c 74 | 5c 6e 5d 2b 5c 5c 29 79 |,\\([ \t|\n]+\\)y|
|00003400| 65 74 6d 6f 72 65 6b 65 | 79 73 5b 20 5c 74 5d 2a |etmoreke|ys[ \t]*|
|00003410| 22 20 2e 20 22 5c 5c 31 | 5c 5c 5c 5c 6d 6f 72 65 |" . "\\1|\\\\more|
|00003420| 6b 65 79 73 22 29 0a 0a | 20 20 20 20 20 29 29 0a |keys")..| )).|
|00003430| 20 20 29 0a 0a 0a 28 64 | 65 66 75 6e 20 73 32 6c | )...(d|efun s2l|
|00003440| 2d 64 6f 2d 63 6f 6e 73 | 74 61 6e 74 73 20 28 29 |-do-cons|tants ()|
|00003450| 0a 20 20 28 73 32 6c 2d | 64 6f 2d 61 6c 69 73 74 |. (s2l-|do-alist|
|00003460| 0a 20 20 20 27 28 0a 20 | 20 20 20 20 28 22 40 76 |. '(. | ("@v|
|00003470| 61 6c 75 65 5c 5c 73 28 | 5b 64 44 5d 61 74 65 5c |alue\\s(|[dD]ate\|
|00003480| 5c 73 29 22 20 2e 20 22 | 5c 5c 5c 5c 74 6f 64 61 |\s)" . "|\\\\toda|
|00003490| 79 22 29 0a 20 20 20 20 | 20 3b 3b 20 63 6f 6e 73 |y"). | ;; cons|
|000034a0| 74 61 6e 74 73 0a 20 20 | 20 20 20 3b 3b 20 54 68 |tants. | ;; Th|
|000034b0| 65 73 65 20 61 72 65 20 | 74 6f 74 61 6c 6c 79 20 |ese are |totally |
|000034c0| 43 4d 55 20 4c 69 73 70 | 20 73 70 65 63 69 66 69 |CMU Lisp| specifi|
|000034d0| 63 0a 20 20 20 20 20 28 | 22 40 68 69 6e 67 65 5c |c. (|"@hinge\|
|000034e0| 5c 2e 22 20 2e 20 22 5c | 5c 5c 5c 68 69 6e 67 65 |\." . "\|\\\hinge|
|000034f0| 2e 22 29 0a 20 20 20 20 | 20 28 22 40 74 72 75 65 |."). | ("@true|
|00003500| 5c 5c 2e 22 20 2e 20 22 | 5c 5c 5c 5c 74 72 75 65 |\\." . "|\\\\true|
|00003510| 2e 22 29 0a 20 20 20 20 | 20 28 22 40 66 61 6c 73 |."). | ("@fals|
|00003520| 65 5c 5c 2e 22 20 2e 20 | 22 5c 5c 5c 5c 66 61 6c |e\\." . |"\\\\fal|
|00003530| 73 65 2e 22 29 09 0a 20 | 20 20 20 20 28 22 40 46 |se.").. | ("@F|
|00003540| 41 4c 53 45 5c 5c 2e 22 | 20 2e 20 22 5c 5c 5c 5c |ALSE\\."| . "\\\\|
|00003550| 46 41 4c 53 45 2e 22 29 | 0a 20 20 20 20 20 28 22 |FALSE.")|. ("|
|00003560| 40 68 65 6d 6c 6f 63 6b | 5c 5c 2e 22 20 2e 20 22 |@hemlock|\\." . "|
|00003570| 5c 5c 5c 5c 68 65 6d 6c | 6f 63 6b 2e 22 29 0a 20 |\\\\heml|ock."). |
|00003580| 20 20 20 20 28 22 40 48 | 65 6d 6c 6f 63 6b 5c 5c | ("@H|emlock\\|
|00003590| 2e 22 20 2e 20 22 5c 5c | 5c 5c 48 65 6d 6c 6f 63 |." . "\\|\\Hemloc|
|000035a0| 6b 2e 22 29 0a 20 20 20 | 20 20 28 22 40 63 6d 75 |k."). | ("@cmu|
|000035b0| 63 6c 5c 5c 2e 22 20 2e | 20 22 5c 5c 5c 5c 63 6d |cl\\." .| "\\\\cm|
|000035c0| 75 63 6c 2e 22 29 0a 20 | 20 20 20 20 28 22 40 63 |ucl."). | ("@c|
|000035d0| 6c 74 6c 5c 5c 2e 22 20 | 2e 20 22 5c 5c 5c 5c 63 |ltl\\." |. "\\\\c|
|000035e0| 6c 74 6c 2e 22 29 0a 20 | 20 20 20 20 28 22 40 50 |ltl."). | ("@P|
|000035f0| 79 74 68 6f 6e 5c 5c 2e | 22 20 2e 20 22 5c 5c 5c |ython\\.|" . "\\\|
|00003600| 5c 50 79 74 68 6f 6e 2e | 22 29 0a 20 20 20 20 20 |\Python.|"). |
|00003610| 28 22 40 70 79 74 68 6f | 6e 5c 5c 2e 22 20 2e 20 |("@pytho|n\\." . |
|00003620| 22 5c 5c 5c 5c 70 79 74 | 68 6f 6e 2e 22 29 0a 20 |"\\\\pyt|hon."). |
|00003630| 20 20 20 20 28 22 40 6c | 6c 69 73 70 5c 5c 2e 22 | ("@l|lisp\\."|
|00003640| 20 2e 20 22 5c 5c 5c 5c | 6c 6c 69 73 70 2e 22 29 | . "\\\\|llisp.")|
|00003650| 0a 20 20 20 20 20 28 22 | 40 4c 6c 69 73 70 5c 5c |. ("|@Llisp\\|
|00003660| 2e 22 20 2e 20 22 5c 5c | 5c 5c 4c 6c 69 73 70 2e |." . "\\|\\Llisp.|
|00003670| 22 29 0a 20 20 20 20 20 | 28 22 40 63 6c 69 73 70 |"). |("@clisp|
|00003680| 5c 5c 2e 22 20 2e 20 22 | 5c 5c 5c 5c 63 6c 69 73 |\\." . "|\\\\clis|
|00003690| 70 2e 22 29 0a 20 20 20 | 20 20 28 22 40 72 65 73 |p."). | ("@res|
|000036a0| 74 5c 5c 2e 22 20 2e 20 | 22 5c 5c 5c 5c 26 72 65 |t\\." . |"\\\\&re|
|000036b0| 73 74 2e 22 29 0a 20 20 | 20 20 20 28 22 40 6b 65 |st."). | ("@ke|
|000036c0| 79 5c 5c 2e 22 20 2e 20 | 22 5c 5c 5c 5c 26 6b 65 |y\\." . |"\\\\&ke|
|000036d0| 79 2e 22 29 0a 20 20 20 | 20 20 28 22 40 64 61 73 |y."). | ("@das|
|000036e0| 68 5c 5c 2e 22 20 2e 20 | 22 5c 5c 5c 5c 64 61 73 |h\\." . |"\\\\das|
|000036f0| 68 2e 22 29 0a 20 20 20 | 20 20 28 22 40 6f 70 74 |h."). | ("@opt|
|00003700| 69 6f 6e 61 6c 5c 5c 2e | 22 20 2e 20 22 5c 5c 5c |ional\\.|" . "\\\|
|00003710| 5c 26 6f 70 74 69 6f 6e | 61 6c 2e 22 29 0a 20 20 |\&option|al."). |
|00003720| 20 20 20 28 22 40 6e 69 | 6c 5c 5c 2e 22 20 2e 20 | ("@ni|l\\." . |
|00003730| 22 5c 5c 5c 5c 6e 69 6c | 2e 22 29 0a 20 20 20 20 |"\\\\nil|."). |
|00003740| 20 28 22 40 41 6c 69 65 | 6e 73 5c 5c 2e 22 20 2e | ("@Alie|ns\\." .|
|00003750| 20 22 5c 5c 5c 5c 41 6c | 69 65 6e 73 2e 22 29 0a | "\\\\Al|iens.").|
|00003760| 20 20 20 20 20 28 22 40 | 41 6c 69 65 6e 5c 5c 2e | ("@|Alien\\.|
|00003770| 22 20 2e 20 22 5c 5c 5c | 5c 41 6c 69 65 6e 2e 22 |" . "\\\|\Alien."|
|00003780| 29 0a 20 20 20 20 20 28 | 22 40 61 6c 69 65 6e 5c |). (|"@alien\|
|00003790| 5c 2e 22 20 2e 20 22 5c | 5c 5c 5c 61 6c 69 65 6e |\." . "\|\\\alien|
|000037a0| 2e 22 29 0a 20 20 20 20 | 20 28 22 40 68 69 6e 67 |."). | ("@hing|
|000037b0| 65 2c 22 20 2e 20 22 5c | 5c 5c 5c 68 69 6e 67 65 |e," . "\|\\\hinge|
|000037c0| 2c 22 29 0a 20 20 20 20 | 20 28 22 40 74 72 75 65 |,"). | ("@true|
|000037d0| 2c 22 20 2e 20 22 5c 5c | 5c 5c 74 72 75 65 2c 22 |," . "\\|\\true,"|
|000037e0| 29 0a 20 20 20 20 20 28 | 22 40 66 61 6c 73 65 2c |). (|"@false,|
|000037f0| 22 20 2e 20 22 5c 5c 5c | 5c 66 61 6c 73 65 2c 22 |" . "\\\|\false,"|
|00003800| 29 09 0a 20 20 20 20 20 | 28 22 40 46 41 4c 53 45 |).. |("@FALSE|
|00003810| 2c 22 20 2e 20 22 5c 5c | 5c 5c 46 41 4c 53 45 2c |," . "\\|\\FALSE,|
|00003820| 22 29 0a 20 20 20 20 20 | 28 22 40 68 65 6d 6c 6f |"). |("@hemlo|
|00003830| 63 6b 2c 22 20 2e 20 22 | 5c 5c 5c 5c 68 65 6d 6c |ck," . "|\\\\heml|
|00003840| 6f 63 6b 2c 22 29 0a 20 | 20 20 20 20 28 22 40 48 |ock,"). | ("@H|
|00003850| 65 6d 6c 6f 63 6b 2c 22 | 20 2e 20 22 5c 5c 5c 5c |emlock,"| . "\\\\|
|00003860| 48 65 6d 6c 6f 63 6b 2c | 22 29 0a 20 20 20 20 20 |Hemlock,|"). |
|00003870| 28 22 40 63 6d 75 63 6c | 2c 22 20 2e 20 22 5c 5c |("@cmucl|," . "\\|
|00003880| 5c 5c 63 6d 75 63 6c 2c | 22 29 0a 20 20 20 20 20 |\\cmucl,|"). |
|00003890| 28 22 40 63 6c 74 6c 2c | 22 20 2e 20 22 5c 5c 5c |("@cltl,|" . "\\\|
|000038a0| 5c 63 6c 74 6c 2c 22 29 | 0a 20 20 20 20 20 28 22 |\cltl,")|. ("|
|000038b0| 40 50 79 74 68 6f 6e 2c | 22 20 2e 20 22 5c 5c 5c |@Python,|" . "\\\|
|000038c0| 5c 50 79 74 68 6f 6e 2c | 22 29 0a 20 20 20 20 20 |\Python,|"). |
|000038d0| 28 22 40 70 79 74 68 6f | 6e 2c 22 20 2e 20 22 5c |("@pytho|n," . "\|
|000038e0| 5c 5c 5c 70 79 74 68 6f | 6e 2c 22 29 0a 20 20 20 |\\\pytho|n,"). |
|000038f0| 20 20 28 22 40 6c 6c 69 | 73 70 2c 22 20 2e 20 22 | ("@lli|sp," . "|
|00003900| 5c 5c 5c 5c 6c 6c 69 73 | 70 2c 22 29 0a 20 20 20 |\\\\llis|p,"). |
|00003910| 20 20 28 22 40 4c 6c 69 | 73 70 2c 22 20 2e 20 22 | ("@Lli|sp," . "|
|00003920| 5c 5c 5c 5c 4c 6c 69 73 | 70 2c 22 29 0a 20 20 20 |\\\\Llis|p,"). |
|00003930| 20 20 28 22 40 63 6c 69 | 73 70 2c 22 20 2e 20 22 | ("@cli|sp," . "|
|00003940| 5c 5c 5c 5c 63 6c 69 73 | 70 2c 22 29 0a 20 20 20 |\\\\clis|p,"). |
|00003950| 20 20 28 22 40 72 65 73 | 74 2c 22 20 2e 20 22 5c | ("@res|t," . "\|
|00003960| 5c 5c 5c 26 72 65 73 74 | 2c 22 29 0a 20 20 20 20 |\\\&rest|,"). |
|00003970| 20 28 22 40 6b 65 79 2c | 22 20 2e 20 22 5c 5c 5c | ("@key,|" . "\\\|
|00003980| 5c 26 6b 65 79 2c 22 29 | 0a 20 20 20 20 20 28 22 |\&key,")|. ("|
|00003990| 40 64 61 73 68 2c 22 20 | 2e 20 22 5c 5c 5c 5c 64 |@dash," |. "\\\\d|
|000039a0| 61 73 68 2c 22 29 0a 20 | 20 20 20 20 28 22 40 6f |ash,"). | ("@o|
|000039b0| 70 74 69 6f 6e 61 6c 2c | 22 20 2e 20 22 5c 5c 5c |ptional,|" . "\\\|
|000039c0| 5c 26 6f 70 74 69 6f 6e | 61 6c 2c 22 29 0a 20 20 |\&option|al,"). |
|000039d0| 20 20 20 28 22 40 6e 69 | 6c 2c 22 20 2e 20 22 5c | ("@ni|l," . "\|
|000039e0| 5c 5c 5c 6e 69 6c 2c 22 | 29 0a 20 20 20 20 20 28 |\\\nil,"|). (|
|000039f0| 22 40 41 6c 69 65 6e 73 | 2c 22 20 2e 20 22 5c 5c |"@Aliens|," . "\\|
|00003a00| 5c 5c 41 6c 69 65 6e 73 | 2c 22 29 0a 20 20 20 20 |\\Aliens|,"). |
|00003a10| 20 28 22 40 41 6c 69 65 | 6e 2c 22 20 2e 20 22 5c | ("@Alie|n," . "\|
|00003a20| 5c 5c 5c 41 6c 69 65 6e | 2c 22 29 0a 20 20 20 20 |\\\Alien|,"). |
|00003a30| 20 28 22 40 61 6c 69 65 | 6e 2c 22 20 2e 20 22 5c | ("@alie|n," . "\|
|00003a40| 5c 5c 5c 61 6c 69 65 6e | 2c 22 29 0a 20 20 20 20 |\\\alien|,"). |
|00003a50| 20 28 22 40 68 69 6e 67 | 65 22 20 2e 20 22 5c 5c | ("@hing|e" . "\\|
|00003a60| 5c 5c 68 69 6e 67 65 7b | 7d 22 29 0a 20 20 20 20 |\\hinge{|}"). |
|00003a70| 20 28 22 40 74 72 75 65 | 22 20 2e 20 22 5c 5c 5c | ("@true|" . "\\\|
|00003a80| 5c 74 72 75 65 7b 7d 22 | 29 0a 20 20 20 20 20 28 |\true{}"|). (|
|00003a90| 22 40 66 61 6c 73 65 22 | 20 2e 20 22 5c 5c 5c 5c |"@false"| . "\\\\|
|00003aa0| 66 61 6c 73 65 7b 7d 22 | 29 09 0a 20 20 20 20 20 |false{}"|).. |
|00003ab0| 28 22 40 46 41 4c 53 45 | 22 20 2e 20 22 5c 5c 5c |("@FALSE|" . "\\\|
|00003ac0| 5c 46 41 4c 53 45 7b 7d | 22 29 0a 20 20 20 20 20 |\FALSE{}|"). |
|00003ad0| 28 22 40 68 65 6d 6c 6f | 63 6b 22 20 2e 20 22 5c |("@hemlo|ck" . "\|
|00003ae0| 5c 5c 5c 68 65 6d 6c 6f | 63 6b 7b 7d 22 29 0a 20 |\\\hemlo|ck{}"). |
|00003af0| 20 20 20 20 28 22 40 48 | 65 6d 6c 6f 63 6b 22 20 | ("@H|emlock" |
|00003b00| 2e 20 22 5c 5c 5c 5c 48 | 65 6d 6c 6f 63 6b 7b 7d |. "\\\\H|emlock{}|
|00003b10| 22 29 0a 20 20 20 20 20 | 28 22 40 63 6d 75 63 6c |"). |("@cmucl|
|00003b20| 22 20 2e 20 22 5c 5c 5c | 5c 63 6d 75 63 6c 7b 7d |" . "\\\|\cmucl{}|
|00003b30| 22 29 0a 20 20 20 20 20 | 28 22 40 63 6c 74 6c 22 |"). |("@cltl"|
|00003b40| 20 2e 20 22 5c 5c 5c 5c | 63 6c 74 6c 7b 7d 22 29 | . "\\\\|cltl{}")|
|00003b50| 0a 20 20 20 20 20 28 22 | 40 50 79 74 68 6f 6e 22 |. ("|@Python"|
|00003b60| 20 2e 20 22 5c 5c 5c 5c | 50 79 74 68 6f 6e 7b 7d | . "\\\\|Python{}|
|00003b70| 22 29 0a 20 20 20 20 20 | 28 22 40 70 79 74 68 6f |"). |("@pytho|
|00003b80| 6e 22 20 2e 20 22 5c 5c | 5c 5c 70 79 74 68 6f 6e |n" . "\\|\\python|
|00003b90| 7b 7d 22 29 0a 20 20 20 | 20 20 28 22 40 6c 6c 69 |{}"). | ("@lli|
|00003ba0| 73 70 22 20 2e 20 22 5c | 5c 5c 5c 6c 6c 69 73 70 |sp" . "\|\\\llisp|
|00003bb0| 7b 7d 22 29 0a 20 20 20 | 20 20 28 22 40 4c 6c 69 |{}"). | ("@Lli|
|00003bc0| 73 70 22 20 2e 20 22 5c | 5c 5c 5c 4c 6c 69 73 70 |sp" . "\|\\\Llisp|
|00003bd0| 7b 7d 22 29 0a 20 20 20 | 20 20 28 22 40 63 6c 69 |{}"). | ("@cli|
|00003be0| 73 70 22 20 2e 20 22 5c | 5c 5c 5c 63 6c 69 73 70 |sp" . "\|\\\clisp|
|00003bf0| 7b 7d 22 29 0a 20 20 20 | 20 20 28 22 40 72 65 73 |{}"). | ("@res|
|00003c00| 74 22 20 2e 20 22 5c 5c | 5c 5c 26 72 65 73 74 7b |t" . "\\|\\&rest{|
|00003c10| 7d 22 29 0a 20 20 20 20 | 20 28 22 40 6b 65 79 22 |}"). | ("@key"|
|00003c20| 20 2e 20 22 5c 5c 5c 5c | 26 6b 65 79 7b 7d 22 29 | . "\\\\|&key{}")|
|00003c30| 0a 20 20 20 20 20 28 22 | 40 64 61 73 68 22 20 2e |. ("|@dash" .|
|00003c40| 20 22 5c 5c 5c 5c 64 61 | 73 68 7b 7d 22 29 0a 20 | "\\\\da|sh{}"). |
|00003c50| 20 20 20 20 28 22 40 6f | 70 74 69 6f 6e 61 6c 22 | ("@o|ptional"|
|00003c60| 20 2e 20 22 5c 5c 5c 5c | 26 6f 70 74 69 6f 6e 61 | . "\\\\|&optiona|
|00003c70| 6c 7b 7d 22 29 0a 20 20 | 20 20 20 28 22 40 6e 69 |l{}"). | ("@ni|
|00003c80| 6c 22 20 2e 20 22 5c 5c | 5c 5c 6e 69 6c 7b 7d 22 |l" . "\\|\\nil{}"|
|00003c90| 29 0a 20 20 20 20 20 28 | 22 40 41 6c 69 65 6e 73 |). (|"@Aliens|
|00003ca0| 22 20 2e 20 22 5c 5c 5c | 5c 41 6c 69 65 6e 73 7b |" . "\\\|\Aliens{|
|00003cb0| 7d 22 29 0a 20 20 20 20 | 20 28 22 40 41 6c 69 65 |}"). | ("@Alie|
|00003cc0| 6e 22 20 2e 20 22 5c 5c | 5c 5c 41 6c 69 65 6e 7b |n" . "\\|\\Alien{|
|00003cd0| 7d 22 29 0a 20 20 20 20 | 20 28 22 40 61 6c 69 65 |}"). | ("@alie|
|00003ce0| 6e 22 20 2e 20 22 5c 5c | 5c 5c 61 6c 69 65 6e 7b |n" . "\\|\\alien{|
|00003cf0| 7d 22 29 0a 20 20 20 20 | 20 29 29 29 0a 0a 0a 28 |}"). | )))...(|
|00003d00| 64 65 66 75 6e 20 73 32 | 6c 2d 69 6e 70 75 74 2d |defun s2|l-input-|
|00003d10| 66 69 6c 65 73 20 28 29 | 0a 20 20 28 69 66 20 28 |files ()|. (if (|
|00003d20| 61 6e 64 20 28 73 61 76 | 65 2d 65 78 63 75 72 73 |and (sav|e-excurs|
|00003d30| 69 6f 6e 20 28 72 65 2d | 73 65 61 72 63 68 2d 66 |ion (re-|search-f|
|00003d40| 6f 72 77 61 72 64 20 22 | 5e 40 69 6e 63 6c 75 64 |orward "|^@includ|
|00003d50| 65 22 20 6e 69 6c 20 74 | 29 29 0a 09 20 20 20 28 |e" nil t|)).. (|
|00003d60| 79 65 73 2d 6f 72 2d 6e | 6f 2d 70 0a 09 20 20 20 |yes-or-n|o-p.. |
|00003d70| 20 22 57 6f 75 6c 64 20 | 79 6f 75 20 6c 69 6b 65 | "Would |you like|
|00003d80| 20 74 6f 20 64 6f 20 74 | 68 65 20 40 69 6e 63 6c | to do t|he @incl|
|00003d90| 75 64 65 20 66 69 6c 65 | 73 20 6e 6f 77 2c 20 74 |ude file|s now, t|
|00003da0| 6f 20 64 6f 20 69 74 20 | 61 6c 6c 20 61 74 20 6f |o do it |all at o|
|00003db0| 6e 63 65 3f 22 29 29 0a | 20 20 20 20 20 20 28 77 |nce?")).| (w|
|00003dc0| 68 69 6c 65 20 28 72 65 | 2d 73 65 61 72 63 68 2d |hile (re|-search-|
|00003dd0| 66 6f 72 77 61 72 64 20 | 22 5e 40 69 6e 63 6c 75 |forward |"^@inclu|
|00003de0| 64 65 22 20 6e 69 6c 20 | 74 29 0a 09 28 73 61 76 |de" nil |t)..(sav|
|00003df0| 65 2d 65 78 63 75 72 73 | 69 6f 6e 0a 09 20 20 28 |e-excurs|ion.. (|
|00003e00| 73 6b 69 70 2d 63 68 61 | 72 73 2d 66 6f 72 77 61 |skip-cha|rs-forwa|
|00003e10| 72 64 20 22 20 09 7b 28 | 22 29 0a 09 20 20 28 6c |rd " .{(|").. (l|
|00003e20| 65 74 20 28 28 66 69 6c | 65 2d 6e 61 6d 65 0a 09 |et ((fil|e-name..|
|00003e30| 09 20 28 62 75 66 66 65 | 72 2d 73 75 62 73 74 72 |. (buffe|r-substr|
|00003e40| 69 6e 67 20 0a 09 09 20 | 20 28 70 6f 69 6e 74 29 |ing ... | (point)|
|00003e50| 0a 09 09 20 20 28 70 72 | 6f 67 6e 0a 09 09 20 20 |... (pr|ogn... |
|00003e60| 20 20 28 73 6b 69 70 2d | 63 68 61 72 73 2d 66 6f | (skip-|chars-fo|
|00003e70| 72 77 61 72 64 20 22 5e | 20 09 29 7d 5c 6e 22 29 |rward "^| .)}\n")|
|00003e80| 0a 09 09 20 20 20 20 28 | 70 6f 69 6e 74 29 29 29 |... (|point)))|
|00003e90| 29 29 0a 09 20 20 20 20 | 28 73 65 74 71 20 66 69 |)).. |(setq fi|
|00003ea0| 6c 65 2d 6e 61 6d 65 0a | 09 09 20 20 28 65 78 70 |le-name.|.. (exp|
|00003eb0| 61 6e 64 2d 66 69 6c 65 | 2d 6e 61 6d 65 0a 09 09 |and-file|-name...|
|00003ec0| 20 20 20 28 69 66 20 28 | 66 69 6c 65 2d 72 65 61 | (if (|file-rea|
|00003ed0| 64 61 62 6c 65 2d 70 20 | 28 65 78 70 61 6e 64 2d |dable-p |(expand-|
|00003ee0| 66 69 6c 65 2d 6e 61 6d | 65 20 66 69 6c 65 2d 6e |file-nam|e file-n|
|00003ef0| 61 6d 65 29 29 0a 09 09 | 20 20 20 20 20 20 20 66 |ame))...| f|
|00003f00| 69 6c 65 2d 6e 61 6d 65 | 0a 09 09 20 20 20 20 20 |ile-name|... |
|00003f10| 28 63 6f 6e 63 61 74 20 | 66 69 6c 65 2d 6e 61 6d |(concat |file-nam|
|00003f20| 65 20 22 2e 6d 73 22 29 | 29 29 29 0a 09 20 20 20 |e ".ms")|))).. |
|00003f30| 20 28 62 65 67 69 6e 6e | 69 6e 67 2d 6f 66 2d 6c | (beginn|ing-of-l|
|00003f40| 69 6e 65 20 31 29 0a 09 | 20 20 20 20 28 69 66 20 |ine 1)..| (if |
|00003f50| 28 66 69 6c 65 2d 72 65 | 61 64 61 62 6c 65 2d 70 |(file-re|adable-p|
|00003f60| 20 66 69 6c 65 2d 6e 61 | 6d 65 29 0a 09 09 28 70 | file-na|me)...(p|
|00003f70| 72 6f 67 6e 0a 09 09 20 | 20 28 64 65 6c 65 74 65 |rogn... | (delete|
|00003f80| 2d 72 65 67 69 6f 6e 20 | 28 70 6f 69 6e 74 29 20 |-region |(point) |
|00003f90| 28 70 72 6f 67 6e 20 28 | 66 6f 72 77 61 72 64 2d |(progn (|forward-|
|00003fa0| 6c 69 6e 65 20 31 29 20 | 28 70 6f 69 6e 74 29 29 |line 1) |(point))|
|00003fb0| 29 0a 09 09 20 20 28 6d | 65 73 73 61 67 65 20 22 |)... (m|essage "|
|00003fc0| 49 6e 73 65 72 74 69 6e | 67 20 66 69 6c 65 20 25 |Insertin|g file %|
|00003fd0| 73 2e 2e 2e 22 20 66 69 | 6c 65 2d 6e 61 6d 65 29 |s..." fi|le-name)|
|00003fe0| 20 28 73 69 74 2d 66 6f | 72 20 31 29 0a 09 09 20 | (sit-fo|r 1)... |
|00003ff0| 20 28 69 6e 73 65 72 74 | 20 22 5c 6e 40 63 6f 6d | (insert| "\n@com|
|00004000| 6d 65 6e 74 7b 46 69 6c | 65 3a 22 20 66 69 6c 65 |ment{Fil|e:" file|
|00004010| 2d 6e 61 6d 65 20 22 7d | 5c 6e 5c 6e 22 29 0a 09 |-name "}|\n\n")..|
|00004020| 09 20 20 28 69 6e 73 65 | 72 74 2d 66 69 6c 65 20 |. (inse|rt-file |
|00004030| 66 69 6c 65 2d 6e 61 6d | 65 29 20 0a 09 09 20 20 |file-nam|e) ... |
|00004040| 28 69 6e 73 65 72 74 20 | 22 5c 6e 5c 6e 22 29 09 |(insert |"\n\n").|
|00004050| 3b 20 69 6d 70 6f 72 74 | 61 6e 74 20 66 6f 72 20 |; import|ant for |
|00004060| 61 6c 77 61 79 73 20 72 | 65 66 69 6c 6c 0a 09 09 |always r|efill...|
|00004070| 20 20 28 6d 65 73 73 61 | 67 65 20 22 49 6e 73 65 | (messa|ge "Inse|
|00004080| 72 74 69 6e 67 20 66 69 | 6c 65 20 25 73 2e 2e 2e |rting fi|le %s...|
|00004090| 64 6f 6e 65 22 20 66 69 | 6c 65 2d 6e 61 6d 65 29 |done" fi|le-name)|
|000040a0| 29 0a 09 20 20 20 20 20 | 20 28 65 72 72 6f 72 20 |).. | (error |
|000040b0| 22 49 20 63 61 6e 27 74 | 20 66 69 6e 64 20 74 68 |"I can't| find th|
|000040c0| 65 20 66 69 6c 65 20 25 | 73 22 20 66 69 6c 65 2d |e file %|s" file-|
|000040d0| 6e 61 6d 65 29 29 0a 09 | 20 20 20 20 29 29 29 29 |name))..| ))))|
|000040e0| 29 0a 0a 28 64 65 66 75 | 6e 20 73 32 6c 2d 68 61 |)..(defu|n s2l-ha|
|000040f0| 6e 64 6c 65 2d 63 6f 6d | 6d 65 6e 74 73 20 28 29 |ndle-com|ments ()|
|00004100| 0a 20 20 28 6c 65 74 20 | 28 28 63 61 73 65 2d 66 |. (let |((case-f|
|00004110| 6f 6c 64 2d 73 65 61 72 | 63 68 20 6e 69 6c 29 29 |old-sear|ch nil))|
|00004120| 0a 20 20 20 20 28 73 65 | 74 2d 73 79 6e 74 61 78 |. (se|t-syntax|
|00004130| 2d 74 61 62 6c 65 20 73 | 63 72 69 62 65 2d 66 6f |-table s|cribe-fo|
|00004140| 72 6d 61 74 2d 73 79 6e | 74 61 78 2d 74 61 62 6c |rmat-syn|tax-tabl|
|00004150| 65 29 0a 20 20 20 20 28 | 67 6f 74 6f 2d 63 68 61 |e). (|goto-cha|
|00004160| 72 20 28 70 6f 69 6e 74 | 2d 6d 69 6e 29 29 0a 20 |r (point|-min)). |
|00004170| 20 20 20 28 72 65 70 6c | 61 63 65 2d 72 65 67 65 | (repl|ace-rege|
|00004180| 78 70 20 22 40 5b 62 42 | 5d 65 67 69 6e 5c 5c 73 |xp "@[bB|]egin\\s|
|00004190| 28 5b 63 43 5d 6f 6d 6d | 65 6e 74 5c 5c 73 29 22 |([cC]omm|ent\\s)"|
|000041a0| 20 20 22 5c 5c 5c 5c 62 | 65 67 69 6e 7b 69 67 6e | "\\\\b|egin{ign|
|000041b0| 6f 72 65 7d 22 20 6e 69 | 6c 29 0a 20 20 20 20 28 |ore}" ni|l). (|
|000041c0| 67 6f 74 6f 2d 63 68 61 | 72 20 28 70 6f 69 6e 74 |goto-cha|r (point|
|000041d0| 2d 6d 69 6e 29 29 0a 20 | 20 20 20 28 72 65 70 6c |-min)). | (repl|
|000041e0| 61 63 65 2d 72 65 67 65 | 78 70 20 22 40 5b 65 45 |ace-rege|xp "@[eE|
|000041f0| 5d 6e 64 5c 5c 73 28 5b | 63 43 5d 6f 6d 6d 65 6e |]nd\\s([|cC]ommen|
|00004200| 74 5c 5c 73 29 22 20 20 | 22 5c 5c 5c 5c 65 6e 64 |t\\s)" |"\\\\end|
|00004210| 7b 69 67 6e 6f 72 65 7d | 22 20 6e 69 6c 29 0a 20 |{ignore}|" nil). |
|00004220| 20 20 20 28 67 6f 74 6f | 2d 63 68 61 72 20 28 70 | (goto|-char (p|
|00004230| 6f 69 6e 74 2d 6d 69 6e | 29 29 0a 20 20 20 20 28 |oint-min|)). (|
|00004240| 77 68 69 6c 65 20 28 72 | 65 2d 73 65 61 72 63 68 |while (r|e-search|
|00004250| 2d 66 6f 72 77 61 72 64 | 20 22 40 63 6f 6d 6d 65 |-forward| "@comme|
|00004260| 6e 74 22 20 6e 69 6c 20 | 74 29 0a 20 20 20 20 20 |nt" nil |t). |
|00004270| 20 28 72 65 70 6c 61 63 | 65 2d 6d 61 74 63 68 20 | (replac|e-match |
|00004280| 22 5c 5c 68 69 64 65 22 | 20 74 20 74 29 0a 20 20 |"\\hide"| t t). |
|00004290| 20 20 20 20 28 6c 65 74 | 20 28 28 68 65 72 65 20 | (let| ((here |
|000042a0| 28 70 6f 69 6e 74 29 29 | 29 0a 09 28 66 6f 72 77 |(point))|)..(forw|
|000042b0| 61 72 64 2d 6c 69 73 74 | 20 31 29 0a 09 28 64 65 |ard-list| 1)..(de|
|000042c0| 6c 65 74 65 2d 63 68 61 | 72 20 2d 31 29 0a 09 28 |lete-cha|r -1)..(|
|000042d0| 69 6e 73 65 72 74 20 22 | 7d 22 29 0a 09 3b 3b 20 |insert "|}")..;; |
|000042e0| 73 6f 6d 65 74 69 6d 65 | 73 20 61 66 74 65 72 20 |sometime|s after |
|000042f0| 61 20 63 6f 6d 6d 65 6e | 74 20 69 73 20 73 6f 6d |a commen|t is som|
|00004300| 65 74 68 69 6e 67 20 75 | 73 75 61 6c 6c 79 20 66 |ething u|sually f|
|00004310| 6f 75 6e 64 20 61 74 20 | 62 6f 6c 70 2e 0a 09 28 |ound at |bolp...(|
|00004320| 69 66 20 28 6c 6f 6f 6b | 69 6e 67 2d 61 74 20 22 |if (look|ing-at "|
|00004330| 40 22 29 20 28 69 6e 73 | 65 72 74 20 22 5c 6e 22 |@") (ins|ert "\n"|
|00004340| 29 29 0a 09 28 67 6f 74 | 6f 2d 63 68 61 72 20 68 |))..(got|o-char h|
|00004350| 65 72 65 29 0a 09 28 64 | 65 6c 65 74 65 2d 63 68 |ere)..(d|elete-ch|
|00004360| 61 72 20 31 29 0a 09 28 | 69 6e 73 65 72 74 20 22 |ar 1)..(|insert "|
|00004370| 7b 22 29 29 29 0a 20 20 | 20 20 28 67 6f 74 6f 2d |{"))). | (goto-|
|00004380| 63 68 61 72 20 28 70 6f | 69 6e 74 2d 6d 69 6e 29 |char (po|int-min)|
|00004390| 29 0a 20 20 20 20 28 77 | 68 69 6c 65 20 28 72 65 |). (w|hile (re|
|000043a0| 2d 73 65 61 72 63 68 2d | 66 6f 72 77 61 72 64 20 |-search-|forward |
|000043b0| 22 40 66 6f 6f 74 22 20 | 6e 69 6c 20 74 29 0a 20 |"@foot" |nil t). |
|000043c0| 20 20 20 20 20 28 72 65 | 70 6c 61 63 65 2d 6d 61 | (re|place-ma|
|000043d0| 74 63 68 20 22 5c 5c 66 | 6f 6f 74 6e 6f 74 65 22 |tch "\\f|ootnote"|
|000043e0| 20 74 20 74 29 0a 20 20 | 20 20 20 20 28 6c 65 74 | t t). | (let|
|000043f0| 20 28 28 68 65 72 65 20 | 28 70 6f 69 6e 74 29 29 | ((here |(point))|
|00004400| 29 0a 09 28 66 6f 72 77 | 61 72 64 2d 6c 69 73 74 |)..(forw|ard-list|
|00004410| 20 31 29 0a 09 28 64 65 | 6c 65 74 65 2d 63 68 61 | 1)..(de|lete-cha|
|00004420| 72 20 2d 31 29 0a 09 28 | 69 6e 73 65 72 74 20 22 |r -1)..(|insert "|
|00004430| 7d 22 29 0a 09 28 67 6f | 74 6f 2d 63 68 61 72 20 |}")..(go|to-char |
|00004440| 68 65 72 65 29 0a 09 28 | 64 65 6c 65 74 65 2d 63 |here)..(|delete-c|
|00004450| 68 61 72 20 31 29 0a 09 | 28 69 6e 73 65 72 74 20 |har 1)..|(insert |
|00004460| 22 7b 22 29 29 29 0a 20 | 20 20 20 29 29 0a 0a 28 |"{"))). | ))..(|
|00004470| 64 65 66 75 6e 20 73 32 | 6c 2d 68 61 6e 64 6c 65 |defun s2|l-handle|
|00004480| 2d 64 65 66 75 6e 73 20 | 28 29 0a 20 20 28 6c 65 |-defuns |(). (le|
|00004490| 74 20 28 28 63 61 73 65 | 2d 66 6f 6c 64 2d 73 65 |t ((case|-fold-se|
|000044a0| 61 72 63 68 20 6e 69 6c | 29 29 0a 20 20 20 20 28 |arch nil|)). (|
|000044b0| 73 65 74 2d 73 79 6e 74 | 61 78 2d 74 61 62 6c 65 |set-synt|ax-table|
|000044c0| 20 73 63 72 69 62 65 2d | 66 6f 72 6d 61 74 2d 73 | scribe-|format-s|
|000044d0| 79 6e 74 61 78 2d 74 61 | 62 6c 65 29 0a 20 20 20 |yntax-ta|ble). |
|000044e0| 20 28 67 6f 74 6f 2d 63 | 68 61 72 20 28 70 6f 69 | (goto-c|har (poi|
|000044f0| 6e 74 2d 6d 69 6e 29 29 | 0a 20 20 20 20 28 77 68 |nt-min))|. (wh|
|00004500| 69 6c 65 20 28 72 65 2d | 73 65 61 72 63 68 2d 66 |ile (re-|search-f|
|00004510| 6f 72 77 61 72 64 20 22 | 5e 40 64 65 66 5b 30 2d |orward "|^@def[0-|
|00004520| 39 61 2d 7a 5d 2b 5b 20 | 5c 74 5d 2a 5b 5b 28 3c |9a-z]+[ |\t]*[[(<|
|00004530| 5d 22 20 6e 69 6c 20 74 | 29 0a 20 20 20 20 20 20 |]" nil t|). |
|00004540| 28 66 6f 72 77 61 72 64 | 2d 63 68 61 72 20 2d 31 |(forward|-char -1|
|00004550| 29 0a 20 20 20 20 20 20 | 28 6c 65 74 20 28 28 68 |). |(let ((h|
|00004560| 65 72 65 20 28 70 6f 69 | 6e 74 29 29 0a 09 20 20 |ere (poi|nt)).. |
|00004570| 20 20 28 65 6e 64 20 28 | 73 61 76 65 2d 65 78 63 | (end (|save-exc|
|00004580| 75 72 73 69 6f 6e 20 28 | 66 6f 72 77 61 72 64 2d |ursion (|forward-|
|00004590| 6c 69 73 74 20 31 29 20 | 28 70 6f 69 6e 74 29 29 |list 1) |(point))|
|000045a0| 29 29 0a 09 28 67 6f 74 | 6f 2d 63 68 61 72 20 65 |))..(got|o-char e|
|000045b0| 6e 64 29 20 28 64 65 6c | 65 74 65 2d 63 68 61 72 |nd) (del|ete-char|
|000045c0| 20 2d 31 29 20 28 69 6e | 73 65 72 74 20 22 7d 22 | -1) (in|sert "}"|
|000045d0| 29 0a 09 28 67 6f 74 6f | 2d 63 68 61 72 20 68 65 |)..(goto|-char he|
|000045e0| 72 65 29 20 28 64 65 6c | 65 74 65 2d 63 68 61 72 |re) (del|ete-char|
|000045f0| 20 31 29 28 69 6e 73 65 | 72 74 20 22 7b 22 29 0a | 1)(inse|rt "{").|
|00004600| 09 28 6e 61 72 72 6f 77 | 2d 74 6f 2d 72 65 67 69 |.(narrow|-to-regi|
|00004610| 6f 6e 20 68 65 72 65 20 | 65 6e 64 29 0a 09 28 67 |on here |end)..(g|
|00004620| 6f 74 6f 2d 63 68 61 72 | 20 28 70 6f 69 6e 74 2d |oto-char| (point-|
|00004630| 6d 69 6e 29 29 0a 09 28 | 69 66 20 28 72 65 2d 73 |min))..(|if (re-s|
|00004640| 65 61 72 63 68 2d 66 6f | 72 77 61 72 64 20 22 66 |earch-fo|rward "f|
|00004650| 75 6e 5b 20 5c 74 5d 2b | 5c 22 5c 5c 28 5b 61 2d |un[ \t]+|\"\\([a-|
|00004660| 7a 2d 2d 2d 5d 2b 5c 5c | 29 5c 22 22 20 6e 69 6c |z---]+\\|)\"" nil|
|00004670| 20 74 29 0a 09 20 20 20 | 20 28 72 65 70 6c 61 63 | t).. | (replac|
|00004680| 65 2d 6d 61 74 63 68 20 | 22 66 75 6e 20 7b 5c 5c |e-match |"fun {\\|
|00004690| 31 7d 22 29 29 0a 09 28 | 67 6f 74 6f 2d 63 68 61 |1}"))..(|goto-cha|
|000046a0| 72 20 28 70 6f 69 6e 74 | 2d 6d 69 6e 29 29 0a 09 |r (point|-min))..|
|000046b0| 28 77 68 69 6c 65 20 28 | 72 65 2d 73 65 61 72 63 |(while (|re-searc|
|000046c0| 68 2d 66 6f 72 77 61 72 | 64 20 22 2c 5c 5c 28 5b |h-forwar|d ",\\([|
|000046d0| 20 5c 74 5c 6e 5d 2a 5c | 5c 29 5c 5c 28 5b 70 50 | \t\n]*\|\)\\([pP|
|000046e0| 5d 61 63 6b 61 67 65 5c | 5c 7c 61 72 67 73 5c 5c |]ackage\|\|args\\|
|000046f0| 7c 6b 65 79 73 5c 5c 7c | 6d 6f 72 65 6b 65 79 73 ||keys\\||morekeys|
|00004700| 5c 5c 7c 79 65 74 6d 6f | 72 65 6b 65 79 73 5c 5c |\\|yetmo|rekeys\\|
|00004710| 29 5b 20 5c 74 5d 2a 22 | 20 6e 69 6c 20 74 29 0a |)[ \t]*"| nil t).|
|00004720| 09 20 20 28 72 65 70 6c | 61 63 65 2d 6d 61 74 63 |. (repl|ace-matc|
|00004730| 68 20 22 5c 5c 31 5c 5c | 5c 5c 5c 5c 32 22 29 0a |h "\\1\\|\\\\2").|
|00004740| 09 20 20 28 73 6b 69 70 | 2d 63 68 61 72 73 2d 66 |. (skip|-chars-f|
|00004750| 6f 72 77 61 72 64 20 22 | 20 5c 74 5c 6e 22 29 0a |orward "| \t\n").|
|00004760| 09 20 20 28 6c 65 74 20 | 28 28 68 65 72 65 20 28 |. (let |((here (|
|00004770| 70 6f 69 6e 74 29 29 0a | 09 09 28 65 6e 64 20 28 |point)).|..(end (|
|00004780| 73 61 76 65 2d 65 78 63 | 75 72 73 69 6f 6e 20 0a |save-exc|ursion .|
|00004790| 09 09 20 20 20 20 20 20 | 28 66 6f 72 77 61 72 64 |.. |(forward|
|000047a0| 2d 73 65 78 70 20 31 29 | 20 28 70 6f 69 6e 74 29 |-sexp 1)| (point)|
|000047b0| 29 29 29 0a 09 20 20 20 | 20 28 67 6f 74 6f 2d 63 |))).. | (goto-c|
|000047c0| 68 61 72 20 65 6e 64 29 | 20 28 64 65 6c 65 74 65 |har end)| (delete|
|000047d0| 2d 63 68 61 72 20 2d 31 | 29 20 28 69 6e 73 65 72 |-char -1|) (inser|
|000047e0| 74 20 22 7d 22 29 0a 09 | 20 20 20 20 28 67 6f 74 |t "}")..| (got|
|000047f0| 6f 2d 63 68 61 72 20 68 | 65 72 65 29 20 28 64 65 |o-char h|ere) (de|
|00004800| 6c 65 74 65 2d 63 68 61 | 72 20 31 29 28 69 6e 73 |lete-cha|r 1)(ins|
|00004810| 65 72 74 20 22 7b 22 29 | 29 0a 09 20 20 29 0a 09 |ert "{")|).. )..|
|00004820| 28 67 6f 74 6f 2d 63 68 | 61 72 20 28 70 6f 69 6e |(goto-ch|ar (poin|
|00004830| 74 2d 6d 69 6e 29 29 0a | 09 28 71 75 69 65 74 6c |t-min)).|.(quietl|
|00004840| 79 2d 72 65 70 6c 61 63 | 65 2d 73 74 72 69 6e 67 |y-replac|e-string|
|00004850| 20 22 6b 65 79 73 7b 5b | 22 20 22 6b 65 79 73 7b | "keys{[|" "keys{|
|00004860| 3a 22 20 6e 69 6c 29 0a | 09 28 67 6f 74 6f 2d 63 |:" nil).|.(goto-c|
|00004870| 68 61 72 20 28 70 6f 69 | 6e 74 2d 6d 69 6e 29 29 |har (poi|nt-min))|
|00004880| 0a 09 28 71 75 69 65 74 | 6c 79 2d 72 65 70 6c 61 |..(quiet|ly-repla|
|00004890| 63 65 2d 73 74 72 69 6e | 67 20 22 5d 5b 22 20 22 |ce-strin|g "][" "|
|000048a0| 20 3a 22 20 6e 69 6c 29 | 0a 09 28 67 6f 74 6f 2d | :" nil)|..(goto-|
|000048b0| 63 68 61 72 20 28 70 6f | 69 6e 74 2d 6d 69 6e 29 |char (po|int-min)|
|000048c0| 29 0a 09 28 72 65 70 6c | 61 63 65 2d 72 65 67 65 |)..(repl|ace-rege|
|000048d0| 78 70 20 22 6b 65 79 73 | 7b 3a 5c 5c 28 5b 5e 5d |xp "keys|{:\\([^]|
|000048e0| 5d 2b 5c 5c 29 5d 7d 22 | 20 22 6b 65 79 73 7b 3a |]+\\)]}"| "keys{:|
|000048f0| 5c 5c 31 7d 22 20 6e 69 | 6c 29 0a 09 28 67 6f 74 |\\1}" ni|l)..(got|
|00004900| 6f 2d 63 68 61 72 20 28 | 70 6f 69 6e 74 2d 6d 69 |o-char (|point-mi|
|00004910| 6e 29 29 0a 09 28 71 75 | 69 65 74 6c 79 2d 72 65 |n))..(qu|ietly-re|
|00004920| 70 6c 61 63 65 2d 73 74 | 72 69 6e 67 20 22 6b 65 |place-st|ring "ke|
|00004930| 79 73 7b 3c 22 20 22 6b | 65 79 73 7b 3a 22 20 6e |ys{<" "k|eys{:" n|
|00004940| 69 6c 29 0a 09 28 67 6f | 74 6f 2d 63 68 61 72 20 |il)..(go|to-char |
|00004950| 28 70 6f 69 6e 74 2d 6d | 69 6e 29 29 0a 09 28 71 |(point-m|in))..(q|
|00004960| 75 69 65 74 6c 79 2d 72 | 65 70 6c 61 63 65 2d 73 |uietly-r|eplace-s|
|00004970| 74 72 69 6e 67 20 22 3e | 3c 22 20 22 20 3a 22 20 |tring ">|<" " :" |
|00004980| 6e 69 6c 29 0a 09 28 67 | 6f 74 6f 2d 63 68 61 72 |nil)..(g|oto-char|
|00004990| 20 28 70 6f 69 6e 74 2d | 6d 69 6e 29 29 0a 09 28 | (point-|min))..(|
|000049a0| 72 65 70 6c 61 63 65 2d | 72 65 67 65 78 70 20 22 |replace-|regexp "|
|000049b0| 6b 65 79 73 7b 3a 5c 5c | 28 5b 5e 3e 5d 2b 5c 5c |keys{:\\|([^>]+\\|
|000049c0| 29 3e 7d 22 20 22 6b 65 | 79 73 7b 3a 5c 5c 31 7d |)>}" "ke|ys{:\\1}|
|000049d0| 22 20 6e 69 6c 29 0a 09 | 28 77 69 64 65 6e 29 0a |" nil)..|(widen).|
|000049e0| 09 29 29 0a 20 20 20 20 | 28 67 6f 74 6f 2d 63 68 |.)). |(goto-ch|
|000049f0| 61 72 20 28 70 6f 69 6e | 74 2d 6d 69 6e 29 29 0a |ar (poin|t-min)).|
|00004a00| 20 20 20 20 29 29 0a 0a | 28 64 65 66 75 6e 20 73 | ))..|(defun s|
|00004a10| 32 6c 2d 68 61 6e 64 6c | 65 2d 65 6e 76 69 72 6f |2l-handl|e-enviro|
|00004a20| 6e 6d 65 6e 74 73 20 28 | 29 0a 20 20 28 6c 65 74 |nments (|). (let|
|00004a30| 20 28 28 63 61 73 65 2d | 66 6f 6c 64 2d 73 65 61 | ((case-|fold-sea|
|00004a40| 72 63 68 20 6e 69 6c 29 | 29 0a 20 20 20 20 28 73 |rch nil)|). (s|
|00004a50| 65 74 2d 73 79 6e 74 61 | 78 2d 74 61 62 6c 65 20 |et-synta|x-table |
|00004a60| 73 63 72 69 62 65 2d 66 | 6f 72 6d 61 74 2d 73 79 |scribe-f|ormat-sy|
|00004a70| 6e 74 61 78 2d 74 61 62 | 6c 65 29 0a 20 20 20 20 |ntax-tab|le). |
|00004a80| 28 67 6f 74 6f 2d 63 68 | 61 72 20 28 70 6f 69 6e |(goto-ch|ar (poin|
|00004a90| 74 2d 6d 69 6e 29 29 0a | 20 20 20 20 28 77 68 69 |t-min)).| (whi|
|00004aa0| 6c 65 20 28 72 65 2d 73 | 65 61 72 63 68 2d 66 6f |le (re-s|earch-fo|
|00004ab0| 72 77 61 72 64 20 22 5e | 40 5b 63 43 5d 65 6e 74 |rward "^|@[cC]ent|
|00004ac0| 65 72 22 20 6e 69 6c 20 | 74 29 0a 20 20 20 20 20 |er" nil |t). |
|00004ad0| 20 28 72 65 70 6c 61 63 | 65 2d 6d 61 74 63 68 20 | (replac|e-match |
|00004ae0| 22 5c 5c 62 65 67 69 6e | 7b 63 65 6e 74 65 72 7d |"\\begin|{center}|
|00004af0| 5c 6e 22 20 74 20 74 29 | 0a 20 20 20 20 20 20 28 |\n" t t)|. (|
|00004b00| 6c 65 74 20 28 28 68 65 | 72 65 20 28 70 6f 69 6e |let ((he|re (poin|
|00004b10| 74 29 29 29 0a 09 28 66 | 6f 72 77 61 72 64 2d 6c |t)))..(f|orward-l|
|00004b20| 69 73 74 20 31 29 0a 09 | 28 64 65 6c 65 74 65 2d |ist 1)..|(delete-|
|00004b30| 63 68 61 72 20 2d 31 29 | 0a 09 28 69 6e 73 65 72 |char -1)|..(inser|
|00004b40| 74 20 22 5c 6e 5c 5c 65 | 6e 64 7b 63 65 6e 74 65 |t "\n\\e|nd{cente|
|00004b50| 72 7d 22 29 0a 09 28 67 | 6f 74 6f 2d 63 68 61 72 |r}")..(g|oto-char|
|00004b60| 20 68 65 72 65 29 0a 09 | 28 64 65 6c 65 74 65 2d | here)..|(delete-|
|00004b70| 63 68 61 72 20 31 29 0a | 09 29 29 0a 20 20 20 20 |char 1).|.)). |
|00004b80| 28 73 32 6c 2d 64 6f 2d | 61 6c 69 73 74 20 0a 20 |(s2l-do-|alist . |
|00004b90| 20 20 20 20 27 28 0a 20 | 20 20 20 20 20 20 28 22 | '(. | ("|
|00004ba0| 5e 40 5b 62 42 5d 65 67 | 69 6e 5c 5c 73 28 5b 64 |^@[bB]eg|in\\s([d|
|00004bb0| 44 5d 65 73 63 72 69 70 | 74 69 6f 6e 5c 5c 73 29 |D]escrip|tion\\s)|
|00004bc0| 22 20 2e 20 22 5c 5c 5c | 5c 62 65 67 69 6e 7b 64 |" . "\\\|\begin{d|
|00004bd0| 65 73 63 72 69 70 74 69 | 6f 6e 7d 22 29 0a 20 20 |escripti|on}"). |
|00004be0| 20 20 20 20 20 28 22 5e | 40 5b 65 45 5d 6e 64 5c | ("^|@[eE]nd\|
|00004bf0| 5c 73 28 5b 64 44 5d 65 | 73 63 72 69 70 74 69 6f |\s([dD]e|scriptio|
|00004c00| 6e 5c 5c 73 29 22 20 2e | 20 22 5c 5c 5c 5c 65 6e |n\\s)" .| "\\\\en|
|00004c10| 64 7b 64 65 73 63 72 69 | 70 74 69 6f 6e 7d 22 29 |d{descri|ption}")|
|00004c20| 0a 20 20 20 20 20 20 20 | 28 22 5c 6e 5c 6e 5c 5c |. |("\n\n\\|
|00004c30| 28 2e 2b 5c 5c 29 40 5c | 5c 5c 5c 22 20 2e 20 22 |(.+\\)@\|\\\" . "|
|00004c40| 5c 6e 5c 6e 5c 5c 5c 5c | 69 74 65 6d 5b 5c 5c 31 |\n\n\\\\|item[\\1|
|00004c50| 5d 5c 6e 22 29 0a 20 20 | 20 20 20 20 20 28 22 5c |]\n"). | ("\|
|00004c60| 6e 5c 5c 28 2e 2b 5c 5c | 29 40 5c 5c 5c 5c 22 20 |n\\(.+\\|)@\\\\" |
|00004c70| 2e 20 22 5c 6e 5c 6e 5c | 5c 5c 5c 69 74 65 6d 5b |. "\n\n\|\\\item[|
|00004c80| 5c 5c 31 5d 5c 6e 22 29 | 0a 20 20 20 20 20 20 20 |\\1]\n")|. |
|00004c90| 28 22 5e 5c 5c 5c 5c 62 | 65 67 69 6e 7b 64 65 73 |("^\\\\b|egin{des|
|00004ca0| 63 72 69 70 74 69 6f 6e | 7d 5b 20 5c 74 5d 2a 5c |cription|}[ \t]*\|
|00004cb0| 6e 5c 5c 28 2e 2b 5c 5c | 29 5c 6e 40 5c 5c 5c 5c |n\\(.+\\|)\n@\\\\|
|00004cc0| 22 20 2e 0a 09 22 5c 5c | 5c 5c 62 65 67 69 6e 7b |" ..."\\|\\begin{|
|00004cd0| 64 65 73 63 72 69 70 74 | 69 6f 6e 7d 5c 6e 5c 6e |descript|ion}\n\n|
|00004ce0| 5c 5c 5c 5c 69 74 65 6d | 5b 5c 5c 31 5d 5c 6e 22 |\\\\item|[\\1]\n"|
|00004cf0| 29 0a 20 20 20 20 20 20 | 20 28 22 5c 6e 5c 6e 40 |). | ("\n\n@|
|00004d00| 5c 5c 5c 5c 22 20 2e 20 | 22 5c 6e 5c 6e 5c 5c 5c |\\\\" . |"\n\n\\\|
|00004d10| 5c 69 74 65 6d 5c 6e 22 | 29 0a 20 20 20 20 20 20 |\item\n"|). |
|00004d20| 20 28 22 5c 6e 5c 6e 5c | 5c 28 2e 2b 5c 5c 29 5c | ("\n\n\|\(.+\\)\|
|00004d30| 6e 40 5c 5c 5c 5c 22 20 | 2e 20 22 5c 6e 5c 6e 5c |n@\\\\" |. "\n\n\|
|00004d40| 5c 5c 5c 69 74 65 6d 5b | 5c 5c 31 5d 5c 6e 22 29 |\\\item[|\\1]\n")|
|00004d50| 0a 20 20 20 20 20 20 20 | 28 22 5c 6e 40 5c 5c 5c |. |("\n@\\\|
|00004d60| 5c 22 20 2e 20 22 5c 6e | 5c 6e 5c 5c 5c 5c 69 74 |\" . "\n|\n\\\\it|
|00004d70| 65 6d 5c 6e 22 29 0a 20 | 20 20 20 20 20 20 29 29 |em\n"). | ))|
|00004d80| 0a 20 20 20 20 28 67 6f | 74 6f 2d 63 68 61 72 20 |. (go|to-char |
|00004d90| 28 70 6f 69 6e 74 2d 6d | 69 6e 29 29 0a 20 20 20 |(point-m|in)). |
|00004da0| 20 28 77 68 69 6c 65 20 | 28 72 65 2d 73 65 61 72 | (while |(re-sear|
|00004db0| 63 68 2d 66 6f 72 77 61 | 72 64 20 22 5e 40 5b 62 |ch-forwa|rd "^@[b|
|00004dc0| 42 5d 65 67 69 6e 5c 5c | 73 28 5b 69 49 5d 74 65 |B]egin\\|s([iI]te|
|00004dd0| 6d 69 7a 65 5b 5e 5d 7d | 29 5d 2a 5c 5c 73 29 22 |mize[^]}|)]*\\s)"|
|00004de0| 20 6e 69 6c 20 74 29 0a | 20 20 20 20 20 20 28 72 | nil t).| (r|
|00004df0| 65 70 6c 61 63 65 2d 6d | 61 74 63 68 20 22 5c 5c |eplace-m|atch "\\|
|00004e00| 62 65 67 69 6e 7b 69 74 | 65 6d 69 7a 65 7d 5c 6e |begin{it|emize}\n|
|00004e10| 22 20 74 20 74 29 0a 20 | 20 20 20 20 20 28 66 6f |" t t). | (fo|
|00004e20| 72 77 61 72 64 2d 63 68 | 61 72 20 2d 31 29 0a 20 |rward-ch|ar -1). |
|00004e30| 20 20 20 20 20 28 6c 65 | 74 2a 20 28 28 62 65 67 | (le|t* ((beg|
|00004e40| 20 28 70 6f 69 6e 74 29 | 29 0a 09 20 20 20 20 20 | (point)|).. |
|00004e50| 28 65 6e 64 20 28 73 61 | 76 65 2d 65 78 63 75 72 |(end (sa|ve-excur|
|00004e60| 73 69 6f 6e 20 0a 09 09 | 20 20 20 20 28 72 65 2d |sion ...| (re-|
|00004e70| 73 65 61 72 63 68 2d 66 | 6f 72 77 61 72 64 20 22 |search-f|orward "|
|00004e80| 5e 40 5b 65 45 5d 6e 64 | 5c 5c 73 28 5b 69 49 5d |^@[eE]nd|\\s([iI]|
|00004e90| 74 65 6d 69 7a 65 5c 5c | 73 29 22 20 6e 69 6c 20 |temize\\|s)" nil |
|00004ea0| 6e 69 6c 29 0a 09 09 20 | 20 20 20 28 70 6f 69 6e |nil)... | (poin|
|00004eb0| 74 29 29 29 0a 09 20 20 | 20 20 20 28 6d 69 64 20 |t))).. | (mid |
|00004ec0| 28 73 61 76 65 2d 65 78 | 63 75 72 73 69 6f 6e 0a |(save-ex|cursion.|
|00004ed0| 09 09 20 20 20 20 28 69 | 66 20 28 72 65 2d 73 65 |.. (i|f (re-se|
|00004ee0| 61 72 63 68 2d 66 6f 72 | 77 61 72 64 20 22 5e 40 |arch-for|ward "^@|
|00004ef0| 5b 62 42 5d 65 67 69 6e | 5c 5c 73 28 5c 5c 28 69 |[bB]egin|\\s(\\(i|
|00004f00| 74 65 6d 69 7a 65 5c 5c | 7c 65 6e 75 6d 65 72 61 |temize\\||enumera|
|00004f10| 74 65 5c 5c 7c 64 65 73 | 63 72 69 70 74 69 6f 6e |te\\|des|cription|
|00004f20| 5c 5c 29 5c 5c 73 29 22 | 20 65 6e 64 20 74 29 0a |\\)\\s)"| end t).|
|00004f30| 09 09 09 28 70 6f 69 6e | 74 29 29 29 29 29 0a 09 |...(poin|t)))))..|
|00004f40| 28 69 66 20 28 61 6e 64 | 20 6d 69 64 20 28 3c 20 |(if (and| mid (< |
|00004f50| 6d 69 64 20 65 6e 64 29 | 29 0a 09 20 20 20 20 28 |mid end)|).. (|
|00004f60| 70 72 6f 67 6e 0a 09 20 | 20 20 20 20 20 28 6e 61 |progn.. | (na|
|00004f70| 72 72 6f 77 2d 74 6f 2d | 72 65 67 69 6f 6e 20 62 |rrow-to-|region b|
|00004f80| 65 67 20 6d 69 64 29 0a | 09 20 20 20 20 20 20 28 |eg mid).|. (|
|00004f90| 67 6f 74 6f 2d 63 68 61 | 72 20 28 70 6f 69 6e 74 |goto-cha|r (point|
|00004fa0| 2d 6d 69 6e 29 29 0a 09 | 20 20 20 20 20 20 3b 3b |-min))..| ;;|
|00004fb0| 20 49 66 20 74 68 65 20 | 69 74 65 6d 20 69 73 20 | If the |item is |
|00004fc0| 6a 75 73 74 20 62 65 66 | 6f 72 65 20 61 6e 20 69 |just bef|ore an i|
|00004fd0| 67 6e 6f 72 65 2c 20 70 | 6c 61 63 65 20 69 74 20 |gnore, p|lace it |
|00004fe0| 69 6e 20 74 68 65 20 69 | 67 6e 6f 72 65 0a 09 20 |in the i|gnore.. |
|00004ff0| 20 20 20 20 20 28 77 68 | 69 6c 65 20 28 72 65 2d | (wh|ile (re-|
|00005000| 73 65 61 72 63 68 2d 66 | 6f 72 77 61 72 64 20 22 |search-f|orward "|
|00005010| 5c 6e 5b 20 5c 74 5d 2a | 5c 6e 2e 22 20 6e 69 6c |\n[ \t]*|\n." nil|
|00005020| 20 74 29 0a 09 09 28 66 | 6f 72 77 61 72 64 2d 63 | t)...(f|orward-c|
|00005030| 68 61 72 20 2d 31 29 0a | 09 09 28 69 66 20 28 6c |har -1).|..(if (l|
|00005040| 6f 6f 6b 69 6e 67 2d 61 | 74 20 22 5c 5c 5c 5c 62 |ooking-a|t "\\\\b|
|00005050| 65 67 69 6e 7b 69 67 6e | 6f 72 65 7d 22 29 20 28 |egin{ign|ore}") (|
|00005060| 66 6f 72 77 61 72 64 2d | 6c 69 6e 65 20 31 29 29 |forward-|line 1))|
|00005070| 0a 09 09 28 69 6e 73 65 | 72 74 20 22 5c 5c 69 74 |...(inse|rt "\\it|
|00005080| 65 6d 5c 6e 22 29 29 0a | 09 20 20 20 20 20 20 28 |em\n")).|. (|
|00005090| 77 69 64 65 6e 29 0a 09 | 20 20 20 20 20 20 28 6e |widen)..| (n|
|000050a0| 61 72 72 6f 77 2d 74 6f | 2d 72 65 67 69 6f 6e 20 |arrow-to|-region |
|000050b0| 62 65 67 20 28 73 61 76 | 65 2d 65 78 63 75 72 73 |beg (sav|e-excurs|
|000050c0| 69 6f 6e 20 0a 09 09 09 | 09 20 20 20 20 20 20 28 |ion ....|. (|
|000050d0| 72 65 2d 73 65 61 72 63 | 68 2d 66 6f 72 77 61 72 |re-searc|h-forwar|
|000050e0| 64 20 22 5e 40 5b 65 45 | 5d 6e 64 5c 5c 73 28 5b |d "^@[eE|]nd\\s([|
|000050f0| 69 49 5d 74 65 6d 69 7a | 65 5c 5c 73 29 22 20 6e |iI]temiz|e\\s)" n|
|00005100| 69 6c 20 6e 69 6c 29 0a | 09 09 09 09 20 20 20 20 |il nil).|.... |
|00005110| 20 20 28 70 6f 69 6e 74 | 29 29 29 0a 09 20 20 20 | (point|))).. |
|00005120| 20 20 20 28 73 32 6c 2d | 68 61 6e 64 6c 65 2d 65 | (s2l-|handle-e|
|00005130| 6e 76 69 72 6f 6e 6d 65 | 6e 74 73 29 0a 09 20 20 |nvironme|nts).. |
|00005140| 20 20 20 20 28 77 69 64 | 65 6e 29 0a 09 20 20 20 | (wid|en).. |
|00005150| 20 20 20 28 67 6f 74 6f | 2d 63 68 61 72 20 62 65 | (goto|-char be|
|00005160| 67 29 0a 09 20 20 20 20 | 20 20 28 73 65 74 71 20 |g).. | (setq |
|00005170| 65 6e 64 20 28 73 61 76 | 65 2d 65 78 63 75 72 73 |end (sav|e-excurs|
|00005180| 69 6f 6e 20 0a 09 09 09 | 20 20 28 72 65 2d 73 65 |ion ....| (re-se|
|00005190| 61 72 63 68 2d 66 6f 72 | 77 61 72 64 20 22 5e 40 |arch-for|ward "^@|
|000051a0| 5b 65 45 5d 6e 64 5c 5c | 73 28 5b 69 49 5d 74 65 |[eE]nd\\|s([iI]te|
|000051b0| 6d 69 7a 65 5c 5c 73 29 | 22 20 6e 69 6c 20 6e 69 |mize\\s)|" nil ni|
|000051c0| 6c 29 0a 09 09 09 20 20 | 28 70 6f 69 6e 74 29 29 |l).... |(point))|
|000051d0| 29 0a 09 20 20 20 20 20 | 20 29 0a 09 20 20 28 67 |).. | ).. (g|
|000051e0| 6f 74 6f 2d 63 68 61 72 | 20 20 62 65 67 29 0a 09 |oto-char| beg)..|
|000051f0| 20 20 28 6e 61 72 72 6f | 77 2d 74 6f 2d 72 65 67 | (narro|w-to-reg|
|00005200| 69 6f 6e 20 62 65 67 20 | 28 73 61 76 65 2d 65 78 |ion beg |(save-ex|
|00005210| 63 75 72 73 69 6f 6e 20 | 0a 09 09 09 09 20 20 28 |cursion |..... (|
|00005220| 72 65 2d 73 65 61 72 63 | 68 2d 66 6f 72 77 61 72 |re-searc|h-forwar|
|00005230| 64 20 22 5e 40 5b 65 45 | 5d 6e 64 5c 5c 73 28 5b |d "^@[eE|]nd\\s([|
|00005240| 69 49 5d 74 65 6d 69 7a | 65 5c 5c 73 29 22 20 6e |iI]temiz|e\\s)" n|
|00005250| 69 6c 20 6e 69 6c 29 0a | 09 09 09 09 20 20 28 70 |il nil).|.... (p|
|00005260| 6f 69 6e 74 29 29 29 0a | 09 20 20 28 67 6f 74 6f |oint))).|. (goto|
|00005270| 2d 63 68 61 72 20 28 70 | 6f 69 6e 74 2d 6d 61 78 |-char (p|oint-max|
|00005280| 29 29 0a 09 20 20 28 62 | 65 67 69 6e 6e 69 6e 67 |)).. (b|eginning|
|00005290| 2d 6f 66 2d 6c 69 6e 65 | 20 31 29 0a 09 20 20 28 |-of-line| 1).. (|
|000052a0| 64 65 6c 65 74 65 2d 72 | 65 67 69 6f 6e 20 28 70 |delete-r|egion (p|
|000052b0| 6f 69 6e 74 29 20 28 70 | 6f 69 6e 74 2d 6d 61 78 |oint) (p|oint-max|
|000052c0| 29 29 0a 09 20 20 28 69 | 6e 73 65 72 74 20 22 5c |)).. (i|nsert "\|
|000052d0| 5c 65 6e 64 7b 69 74 65 | 6d 69 7a 65 7d 5c 6e 22 |\end{ite|mize}\n"|
|000052e0| 20 29 0a 09 20 20 28 67 | 6f 74 6f 2d 63 68 61 72 | ).. (g|oto-char|
|000052f0| 20 28 70 6f 69 6e 74 2d | 6d 69 6e 29 29 0a 09 20 | (point-|min)).. |
|00005300| 20 3b 3b 20 49 66 20 74 | 68 65 20 69 74 65 6d 20 | ;; If t|he item |
|00005310| 69 73 20 6a 75 73 74 20 | 62 65 66 6f 72 65 20 61 |is just |before a|
|00005320| 6e 20 69 67 6e 6f 72 65 | 2c 20 70 6c 61 63 65 20 |n ignore|, place |
|00005330| 69 74 20 69 6e 20 74 68 | 65 20 69 67 6e 6f 72 65 |it in th|e ignore|
|00005340| 0a 09 20 20 28 77 68 69 | 6c 65 20 28 72 65 2d 73 |.. (whi|le (re-s|
|00005350| 65 61 72 63 68 2d 66 6f | 72 77 61 72 64 20 22 5c |earch-fo|rward "\|
|00005360| 6e 5b 20 5c 74 5d 2a 5c | 6e 2e 22 20 6e 69 6c 20 |n[ \t]*\|n." nil |
|00005370| 74 29 0a 09 20 20 20 20 | 28 66 6f 72 77 61 72 64 |t).. |(forward|
|00005380| 2d 63 68 61 72 20 2d 31 | 29 0a 09 20 20 20 20 28 |-char -1|).. (|
|00005390| 69 66 20 28 6c 6f 6f 6b | 69 6e 67 2d 61 74 20 22 |if (look|ing-at "|
|000053a0| 5c 5c 5c 5c 62 65 67 69 | 6e 7b 69 67 6e 6f 72 65 |\\\\begi|n{ignore|
|000053b0| 7d 22 29 20 28 66 6f 72 | 77 61 72 64 2d 6c 69 6e |}") (for|ward-lin|
|000053c0| 65 20 31 29 29 0a 09 20 | 20 20 20 28 69 6e 73 65 |e 1)).. | (inse|
|000053d0| 72 74 20 22 5c 5c 69 74 | 65 6d 5c 6e 22 29 29 0a |rt "\\it|em\n")).|
|000053e0| 09 20 20 28 77 69 64 65 | 6e 29 29 0a 09 29 29 0a |. (wide|n))..)).|
|000053f0| 20 20 20 20 28 67 6f 74 | 6f 2d 63 68 61 72 20 28 | (got|o-char (|
|00005400| 70 6f 69 6e 74 2d 6d 69 | 6e 29 29 0a 20 20 20 20 |point-mi|n)). |
|00005410| 28 77 68 69 6c 65 20 28 | 72 65 2d 73 65 61 72 63 |(while (|re-searc|
|00005420| 68 2d 66 6f 72 77 61 72 | 64 20 22 5e 40 5b 62 42 |h-forwar|d "^@[bB|
|00005430| 5d 65 67 69 6e 5c 5c 73 | 28 5b 65 45 5d 6e 75 6d |]egin\\s|([eE]num|
|00005440| 65 72 61 74 65 5b 5e 5d | 7d 29 5d 2a 5c 5c 73 29 |erate[^]|})]*\\s)|
|00005450| 22 20 6e 69 6c 20 74 29 | 0a 20 20 20 20 20 20 28 |" nil t)|. (|
|00005460| 72 65 70 6c 61 63 65 2d | 6d 61 74 63 68 20 22 5c |replace-|match "\|
|00005470| 5c 62 65 67 69 6e 7b 69 | 74 65 6d 69 7a 65 7d 5c |\begin{i|temize}\|
|00005480| 6e 22 20 74 20 74 29 0a | 20 20 20 20 20 20 28 66 |n" t t).| (f|
|00005490| 6f 72 77 61 72 64 2d 63 | 68 61 72 20 2d 31 29 0a |orward-c|har -1).|
|000054a0| 20 20 20 20 20 20 28 6c | 65 74 2a 20 28 28 62 65 | (l|et* ((be|
|000054b0| 67 20 28 70 6f 69 6e 74 | 29 29 0a 09 20 20 20 20 |g (point|)).. |
|000054c0| 20 28 65 6e 64 20 28 73 | 61 76 65 2d 65 78 63 75 | (end (s|ave-excu|
|000054d0| 72 73 69 6f 6e 20 0a 09 | 09 20 20 20 20 28 72 65 |rsion ..|. (re|
|000054e0| 2d 73 65 61 72 63 68 2d | 66 6f 72 77 61 72 64 20 |-search-|forward |
|000054f0| 22 5e 40 5b 65 45 5d 6e | 64 5c 5c 73 28 5b 65 45 |"^@[eE]n|d\\s([eE|
|00005500| 5d 6e 75 6d 65 72 61 74 | 65 5c 5c 73 29 22 20 6e |]numerat|e\\s)" n|
|00005510| 69 6c 20 6e 69 6c 29 0a | 09 09 20 20 20 20 28 70 |il nil).|.. (p|
|00005520| 6f 69 6e 74 29 29 29 0a | 09 20 20 20 20 20 28 6d |oint))).|. (m|
|00005530| 69 64 20 28 73 61 76 65 | 2d 65 78 63 75 72 73 69 |id (save|-excursi|
|00005540| 6f 6e 0a 09 09 20 20 20 | 20 28 69 66 20 28 72 65 |on... | (if (re|
|00005550| 2d 73 65 61 72 63 68 2d | 66 6f 72 77 61 72 64 20 |-search-|forward |
|00005560| 22 5e 40 5b 62 42 5d 65 | 67 69 6e 5c 5c 73 28 5c |"^@[bB]e|gin\\s(\|
|00005570| 5c 28 69 74 65 6d 69 7a | 65 5c 5c 7c 65 6e 75 6d |\(itemiz|e\\|enum|
|00005580| 65 72 61 74 65 5c 5c 29 | 5c 5c 73 29 22 20 65 6e |erate\\)|\\s)" en|
|00005590| 64 20 74 29 0a 09 09 09 | 28 70 6f 69 6e 74 29 29 |d t)....|(point))|
|000055a0| 29 29 29 0a 09 28 69 66 | 20 28 61 6e 64 20 6d 69 |)))..(if| (and mi|
|000055b0| 64 20 28 3c 20 6d 69 64 | 20 65 6e 64 29 29 0a 09 |d (< mid| end))..|
|000055c0| 20 20 20 20 28 70 72 6f | 67 6e 0a 09 20 20 20 20 | (pro|gn.. |
|000055d0| 20 20 28 6e 61 72 72 6f | 77 2d 74 6f 2d 72 65 67 | (narro|w-to-reg|
|000055e0| 69 6f 6e 20 62 65 67 20 | 6d 69 64 29 0a 09 20 20 |ion beg |mid).. |
|000055f0| 20 20 20 20 28 67 6f 74 | 6f 2d 63 68 61 72 20 28 | (got|o-char (|
|00005600| 70 6f 69 6e 74 2d 6d 69 | 6e 29 29 0a 09 20 20 20 |point-mi|n)).. |
|00005610| 20 20 20 3b 3b 20 49 66 | 20 74 68 65 20 69 74 65 | ;; If| the ite|
|00005620| 6d 20 69 73 20 6a 75 73 | 74 20 62 65 66 6f 72 65 |m is jus|t before|
|00005630| 20 61 6e 20 69 67 6e 6f | 72 65 2c 20 70 6c 61 63 | an igno|re, plac|
|00005640| 65 20 69 74 20 69 6e 20 | 74 68 65 20 69 67 6e 6f |e it in |the igno|
|00005650| 72 65 0a 09 20 20 20 20 | 20 20 28 77 68 69 6c 65 |re.. | (while|
|00005660| 20 28 72 65 2d 73 65 61 | 72 63 68 2d 66 6f 72 77 | (re-sea|rch-forw|
|00005670| 61 72 64 20 22 5c 6e 5b | 20 5c 74 5d 2a 5c 6e 2e |ard "\n[| \t]*\n.|
|00005680| 22 20 6e 69 6c 20 74 29 | 0a 09 09 28 66 6f 72 77 |" nil t)|...(forw|
|00005690| 61 72 64 2d 63 68 61 72 | 20 2d 31 29 0a 09 09 28 |ard-char| -1)...(|
|000056a0| 69 66 20 28 6c 6f 6f 6b | 69 6e 67 2d 61 74 20 22 |if (look|ing-at "|
|000056b0| 5c 5c 5c 5c 62 65 67 69 | 6e 7b 69 67 6e 6f 72 65 |\\\\begi|n{ignore|
|000056c0| 7d 22 29 20 28 66 6f 72 | 77 61 72 64 2d 6c 69 6e |}") (for|ward-lin|
|000056d0| 65 20 31 29 29 0a 09 09 | 28 69 6e 73 65 72 74 20 |e 1))...|(insert |
|000056e0| 22 5c 5c 69 74 65 6d 5c | 6e 22 29 29 0a 09 20 20 |"\\item\|n")).. |
|000056f0| 20 20 20 20 28 77 69 64 | 65 6e 29 0a 09 20 20 20 | (wid|en).. |
|00005700| 20 20 20 28 6e 61 72 72 | 6f 77 2d 74 6f 2d 72 65 | (narr|ow-to-re|
|00005710| 67 69 6f 6e 20 62 65 67 | 20 28 73 61 76 65 2d 65 |gion beg| (save-e|
|00005720| 78 63 75 72 73 69 6f 6e | 20 0a 09 09 09 09 20 20 |xcursion| ..... |
|00005730| 20 20 20 20 28 72 65 2d | 73 65 61 72 63 68 2d 66 | (re-|search-f|
|00005740| 6f 72 77 61 72 64 20 22 | 5e 40 5b 65 45 5d 6e 64 |orward "|^@[eE]nd|
|00005750| 5c 5c 73 28 5b 65 45 5d | 6e 75 6d 65 72 61 74 65 |\\s([eE]|numerate|
|00005760| 5c 5c 73 29 22 20 6e 69 | 6c 20 6e 69 6c 29 0a 09 |\\s)" ni|l nil)..|
|00005770| 09 09 09 20 20 20 20 20 | 20 28 70 6f 69 6e 74 29 |... | (point)|
|00005780| 29 29 0a 09 20 20 20 20 | 20 20 28 73 32 6c 2d 68 |)).. | (s2l-h|
|00005790| 61 6e 64 6c 65 2d 65 6e | 76 69 72 6f 6e 6d 65 6e |andle-en|vironmen|
|000057a0| 74 73 29 0a 09 20 20 20 | 20 20 20 28 77 69 64 65 |ts).. | (wide|
|000057b0| 6e 29 0a 09 20 20 20 20 | 20 20 28 67 6f 74 6f 2d |n).. | (goto-|
|000057c0| 63 68 61 72 20 62 65 67 | 29 0a 09 20 20 20 20 20 |char beg|).. |
|000057d0| 20 28 73 65 74 71 20 65 | 6e 64 20 28 73 61 76 65 | (setq e|nd (save|
|000057e0| 2d 65 78 63 75 72 73 69 | 6f 6e 20 0a 09 09 09 20 |-excursi|on .... |
|000057f0| 20 28 72 65 2d 73 65 61 | 72 63 68 2d 66 6f 72 77 | (re-sea|rch-forw|
|00005800| 61 72 64 20 22 5e 40 5b | 65 45 5d 6e 64 5c 5c 73 |ard "^@[|eE]nd\\s|
|00005810| 28 5b 65 45 5d 6e 75 6d | 65 72 61 74 65 5c 5c 73 |([eE]num|erate\\s|
|00005820| 29 22 20 6e 69 6c 20 6e | 69 6c 29 0a 09 09 09 20 |)" nil n|il).... |
|00005830| 20 28 70 6f 69 6e 74 29 | 29 29 0a 09 20 20 20 20 | (point)|)).. |
|00005840| 20 20 29 0a 09 20 20 28 | 67 6f 74 6f 2d 63 68 61 | ).. (|goto-cha|
|00005850| 72 20 20 62 65 67 29 0a | 09 20 20 28 6e 61 72 72 |r beg).|. (narr|
|00005860| 6f 77 2d 74 6f 2d 72 65 | 67 69 6f 6e 20 62 65 67 |ow-to-re|gion beg|
|00005870| 20 28 73 61 76 65 2d 65 | 78 63 75 72 73 69 6f 6e | (save-e|xcursion|
|00005880| 20 0a 09 09 09 09 20 20 | 28 72 65 2d 73 65 61 72 | ..... |(re-sear|
|00005890| 63 68 2d 66 6f 72 77 61 | 72 64 20 22 5e 40 5b 65 |ch-forwa|rd "^@[e|
|000058a0| 45 5d 6e 64 5c 5c 73 28 | 5b 65 45 5d 6e 75 6d 65 |E]nd\\s(|[eE]nume|
|000058b0| 72 61 74 65 5c 5c 73 29 | 22 20 6e 69 6c 20 6e 69 |rate\\s)|" nil ni|
|000058c0| 6c 29 0a 09 09 09 09 20 | 20 28 70 6f 69 6e 74 29 |l)..... | (point)|
|000058d0| 29 29 0a 09 20 20 28 67 | 6f 74 6f 2d 63 68 61 72 |)).. (g|oto-char|
|000058e0| 20 28 70 6f 69 6e 74 2d | 6d 61 78 29 29 0a 09 20 | (point-|max)).. |
|000058f0| 20 28 62 65 67 69 6e 6e | 69 6e 67 2d 6f 66 2d 6c | (beginn|ing-of-l|
|00005900| 69 6e 65 20 31 29 0a 09 | 20 20 28 64 65 6c 65 74 |ine 1)..| (delet|
|00005910| 65 2d 72 65 67 69 6f 6e | 20 28 70 6f 69 6e 74 29 |e-region| (point)|
|00005920| 20 28 70 6f 69 6e 74 2d | 6d 61 78 29 29 0a 09 20 | (point-|max)).. |
|00005930| 20 28 69 6e 73 65 72 74 | 20 22 5c 5c 65 6e 64 7b | (insert| "\\end{|
|00005940| 69 74 65 6d 69 7a 65 7d | 5c 6e 22 20 29 0a 09 20 |itemize}|\n" ).. |
|00005950| 20 28 67 6f 74 6f 2d 63 | 68 61 72 20 28 70 6f 69 | (goto-c|har (poi|
|00005960| 6e 74 2d 6d 69 6e 29 29 | 0a 09 20 20 3b 3b 20 49 |nt-min))|.. ;; I|
|00005970| 66 20 74 68 65 20 69 74 | 65 6d 20 69 73 20 6a 75 |f the it|em is ju|
|00005980| 73 74 20 62 65 66 6f 72 | 65 20 61 6e 20 69 67 6e |st befor|e an ign|
|00005990| 6f 72 65 2c 20 70 6c 61 | 63 65 20 69 74 20 69 6e |ore, pla|ce it in|
|000059a0| 20 74 68 65 20 69 67 6e | 6f 72 65 0a 09 20 20 28 | the ign|ore.. (|
|000059b0| 77 68 69 6c 65 20 28 72 | 65 2d 73 65 61 72 63 68 |while (r|e-search|
|000059c0| 2d 66 6f 72 77 61 72 64 | 20 22 5c 6e 5b 20 5c 74 |-forward| "\n[ \t|
|000059d0| 5d 2a 5c 6e 2e 22 20 6e | 69 6c 20 74 29 0a 09 20 |]*\n." n|il t).. |
|000059e0| 20 20 20 28 66 6f 72 77 | 61 72 64 2d 63 68 61 72 | (forw|ard-char|
|000059f0| 20 2d 31 29 0a 09 20 20 | 20 20 28 69 66 20 28 6c | -1).. | (if (l|
|00005a00| 6f 6f 6b 69 6e 67 2d 61 | 74 20 22 5c 5c 5c 5c 62 |ooking-a|t "\\\\b|
|00005a10| 65 67 69 6e 7b 69 67 6e | 6f 72 65 7d 22 29 20 28 |egin{ign|ore}") (|
|00005a20| 66 6f 72 77 61 72 64 2d | 6c 69 6e 65 20 31 29 29 |forward-|line 1))|
|00005a30| 0a 09 20 20 20 20 28 69 | 6e 73 65 72 74 20 22 5c |.. (i|nsert "\|
|00005a40| 5c 69 74 65 6d 5c 6e 22 | 29 29 0a 09 20 20 28 77 |\item\n"|)).. (w|
|00005a50| 69 64 65 6e 29 29 0a 09 | 29 29 0a 20 20 20 20 28 |iden))..|)). (|
|00005a60| 67 6f 74 6f 2d 63 68 61 | 72 20 28 70 6f 69 6e 74 |goto-cha|r (point|
|00005a70| 2d 6d 69 6e 29 29 0a 20 | 20 20 20 28 77 68 69 6c |-min)). | (whil|
|00005a80| 65 20 28 72 65 2d 73 65 | 61 72 63 68 2d 66 6f 72 |e (re-se|arch-for|
|00005a90| 77 61 72 64 20 22 5e 40 | 5b 62 42 5d 65 67 69 6e |ward "^@|[bB]egin|
|00005aa0| 5c 5c 73 28 5b 66 46 5d | 6f 72 6d 61 74 5c 5c 73 |\\s([fF]|ormat\\s|
|00005ab0| 29 22 20 6e 69 6c 20 74 | 29 0a 20 20 20 20 20 20 |)" nil t|). |
|00005ac0| 3b 3b 20 41 73 73 75 6d | 65 20 32 20 63 6f 6c 75 |;; Assum|e 2 colu|
|00005ad0| 6d 6e 0a 20 20 20 20 20 | 20 28 72 65 70 6c 61 63 |mn. | (replac|
|00005ae0| 65 2d 6d 61 74 63 68 20 | 22 5c 5c 62 65 67 69 6e |e-match |"\\begin|
|00005af0| 7b 74 61 62 6c 65 7d 7b | 7c 7c 6c 7c 6c 7c 7c 7d |{table}{|||l|l||}|
|00005b00| 5c 6e 22 20 74 20 74 29 | 0a 20 20 20 20 20 20 28 |\n" t t)|. (|
|00005b10| 66 6f 72 77 61 72 64 2d | 6c 69 6e 65 20 31 29 0a |forward-|line 1).|
|00005b20| 20 20 20 20 20 20 28 6e | 61 72 72 6f 77 2d 74 6f | (n|arrow-to|
|00005b30| 2d 72 65 67 69 6f 6e 20 | 28 70 6f 69 6e 74 29 20 |-region |(point) |
|00005b40| 0a 09 09 09 28 73 61 76 | 65 2d 65 78 63 75 72 73 |....(sav|e-excurs|
|00005b50| 69 6f 6e 20 0a 09 09 09 | 20 20 28 72 65 2d 73 65 |ion ....| (re-se|
|00005b60| 61 72 63 68 2d 66 6f 72 | 77 61 72 64 20 22 5e 40 |arch-for|ward "^@|
|00005b70| 5b 65 45 5d 6e 64 5c 5c | 73 28 5b 66 46 5d 6f 72 |[eE]nd\\|s([fF]or|
|00005b80| 6d 61 74 5c 5c 73 29 22 | 20 6e 69 6c 20 74 29 0a |mat\\s)"| nil t).|
|00005b90| 09 09 09 20 20 28 62 65 | 67 69 6e 6e 69 6e 67 2d |... (be|ginning-|
|00005ba0| 6f 66 2d 6c 69 6e 65 20 | 31 29 0a 09 09 09 20 20 |of-line |1).... |
|00005bb0| 28 72 65 70 6c 61 63 65 | 2d 6d 61 74 63 68 20 22 |(replace|-match "|
|00005bc0| 5c 5c 65 6e 64 7b 74 61 | 62 6c 65 7d 22 20 74 20 |\\end{ta|ble}" t |
|00005bd0| 74 29 0a 09 09 09 20 20 | 28 62 65 67 69 6e 6e 69 |t).... |(beginni|
|00005be0| 6e 67 2d 6f 66 2d 6c 69 | 6e 65 20 31 29 0a 09 09 |ng-of-li|ne 1)...|
|00005bf0| 09 20 20 28 70 6f 69 6e | 74 29 29 29 0a 20 20 20 |. (poin|t))). |
|00005c00| 20 20 20 3b 3b 20 49 66 | 20 74 68 65 20 69 74 65 | ;; If| the ite|
|00005c10| 6d 20 69 73 20 6a 75 73 | 74 20 62 65 66 6f 72 65 |m is jus|t before|
|00005c20| 20 61 6e 20 69 67 6e 6f | 72 65 2c 20 70 6c 61 63 | an igno|re, plac|
|00005c30| 65 20 69 74 20 69 6e 20 | 74 68 65 20 69 67 6e 6f |e it in |the igno|
|00005c40| 72 65 0a 20 20 20 20 20 | 20 28 67 6f 74 6f 2d 63 |re. | (goto-c|
|00005c50| 68 61 72 20 28 70 6f 69 | 6e 74 2d 6d 69 6e 29 29 |har (poi|nt-min))|
|00005c60| 0a 20 20 20 20 20 20 28 | 77 68 69 6c 65 20 28 72 |. (|while (r|
|00005c70| 65 2d 73 65 61 72 63 68 | 2d 66 6f 72 77 61 72 64 |e-search|-forward|
|00005c80| 20 22 40 5c 5c 5c 5c 22 | 20 6e 69 6c 20 74 29 0a | "@\\\\"| nil t).|
|00005c90| 09 28 72 65 70 6c 61 63 | 65 2d 6d 61 74 63 68 20 |.(replac|e-match |
|00005ca0| 22 5c 74 26 20 22 29 29 | 0a 20 20 20 20 20 20 28 |"\t& "))|. (|
|00005cb0| 67 6f 74 6f 2d 63 68 61 | 72 20 28 70 6f 69 6e 74 |goto-cha|r (point|
|00005cc0| 2d 6d 69 6e 29 29 0a 20 | 20 20 20 20 20 28 71 75 |-min)). | (qu|
|00005cd0| 69 65 74 6c 79 2d 72 65 | 70 6c 61 63 65 2d 72 65 |ietly-re|place-re|
|00005ce0| 67 65 78 70 20 22 24 22 | 20 22 5c 74 5c 5c 5c 5c |gexp "$"| "\t\\\\|
|00005cf0| 5c 5c 5c 5c 22 29 0a 20 | 20 20 20 20 20 28 67 6f |\\\\"). | (go|
|00005d00| 74 6f 2d 63 68 61 72 20 | 28 70 6f 69 6e 74 2d 6d |to-char |(point-m|
|00005d10| 69 6e 29 29 0a 20 20 20 | 20 20 20 28 77 68 69 6c |in)). | (whil|
|00005d20| 65 20 28 72 65 2d 73 65 | 61 72 63 68 2d 66 6f 72 |e (re-se|arch-for|
|00005d30| 77 61 72 64 20 22 5e 5b | 20 5c 74 5d 2a 5c 5c 5c |ward "^[| \t]*\\\|
|00005d40| 5c 5c 5c 5c 5c 24 22 20 | 6e 69 6c 20 74 29 0a 09 |\\\\\$" |nil t)..|
|00005d50| 28 72 65 70 6c 61 63 65 | 2d 6d 61 74 63 68 20 22 |(replace|-match "|
|00005d60| 5c 5c 5c 5c 68 6c 69 6e | 65 22 29 29 0a 20 20 20 |\\\\hlin|e")). |
|00005d70| 20 20 20 28 77 69 64 65 | 6e 29 29 0a 20 20 20 20 | (wide|n)). |
|00005d80| 28 67 6f 74 6f 2d 63 68 | 61 72 20 28 70 6f 69 6e |(goto-ch|ar (poin|
|00005d90| 74 2d 6d 69 6e 29 29 0a | 20 20 20 20 29 0a 20 20 |t-min)).| ). |
|00005da0| 29 0a 0a 0a | |)... | |
+--------+-------------------------+-------------------------+--------+--------+