home *** CD-ROM | disk | FTP | other *** search
Emacs Compiled Lisp | 1995-08-29 | 35.6 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
1%
| dexvert
| Combustion 2 Particle Library (other/combustion2ParticleLibrary)
| ext
| Unsupported |
100%
| file
| Emacs/XEmacs v19 byte-compiled Lisp data
| default
| |
99%
| file
| data
| default
| |
100%
| TrID
| Emacs/XEmacs byte-compiled Lisp (generic)
| default
| |
100%
| xdgMime
| text/x-emacs-lisp
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 63 74 68 6f 6d 70 40 |piled by| cthomp@|
|00000020| 77 69 6c 6c 6f 77 2e 63 | 73 2e 75 69 75 63 2e 65 |willow.c|s.uiuc.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 41 75 67 20 32 39 |du on Tu|e Aug 29|
|00000040| 20 31 34 3a 31 33 3a 34 | 35 20 31 39 39 35 0a 3b | 14:13:4|5 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 78 65 |;; from |file /xe|
|00000060| 6d 61 63 73 2f 78 65 6d | 61 63 73 2d 31 39 2e 31 |macs/xem|acs-19.1|
|00000070| 33 2d 72 65 6c 65 61 73 | 65 2f 65 64 69 74 6f 72 |3-releas|e/editor|
|00000080| 2f 6c 69 73 70 2f 70 61 | 63 6b 61 67 65 73 2f 66 |/lisp/pa|ckages/f|
|00000090| 75 6e 63 2d 6d 65 6e 75 | 2e 65 6c 0a 3b 3b 3b 20 |unc-menu|.el.;;; |
|000000a0| 65 6d 61 63 73 20 76 65 | 72 73 69 6f 6e 20 31 39 |emacs ve|rsion 19|
|000000b0| 2e 31 33 20 58 45 6d 61 | 63 73 20 4c 75 63 69 64 |.13 XEma|cs Lucid|
|000000c0| 2e 0a 3b 3b 3b 20 62 79 | 74 65 63 6f 6d 70 20 76 |..;;; by|tecomp v|
|000000d0| 65 72 73 69 6f 6e 20 32 | 2e 32 35 3b 20 31 2d 53 |ersion 2|.25; 1-S|
|000000e0| 65 70 2d 39 34 2e 0a 3b | 3b 3b 20 6f 70 74 69 6d |ep-94..;|;; optim|
|000000f0| 69 7a 61 74 69 6f 6e 20 | 69 73 20 6f 6e 2e 0a 3b |ization |is on..;|
|00000100| 3b 3b 20 74 68 69 73 20 | 66 69 6c 65 20 75 73 65 |;; this |file use|
|00000110| 73 20 6f 70 63 6f 64 65 | 73 20 77 68 69 63 68 20 |s opcode|s which |
|00000120| 64 6f 20 6e 6f 74 20 65 | 78 69 73 74 20 69 6e 20 |do not e|xist in |
|00000130| 45 6d 61 63 73 20 31 38 | 2e 0a 0a 28 69 66 20 28 |Emacs 18|...(if (|
|00000140| 61 6e 64 20 28 62 6f 75 | 6e 64 70 20 27 65 6d 61 |and (bou|ndp 'ema|
|00000150| 63 73 2d 76 65 72 73 69 | 6f 6e 29 0a 09 20 28 6f |cs-versi|on).. (o|
|00000160| 72 20 28 61 6e 64 20 28 | 62 6f 75 6e 64 70 20 27 |r (and (|boundp '|
|00000170| 65 70 6f 63 68 3a 3a 76 | 65 72 73 69 6f 6e 29 20 |epoch::v|ersion) |
|00000180| 65 70 6f 63 68 3a 3a 76 | 65 72 73 69 6f 6e 29 0a |epoch::v|ersion).|
|00000190| 09 20 20 20 20 20 28 73 | 74 72 69 6e 67 2d 6c 65 |. (s|tring-le|
|000001a0| 73 73 70 20 65 6d 61 63 | 73 2d 76 65 72 73 69 6f |ssp emac|s-versio|
|000001b0| 6e 20 22 31 39 22 29 29 | 29 0a 20 20 20 20 28 65 |n "19"))|). (e|
|000001c0| 72 72 6f 72 20 22 54 68 | 69 73 20 66 69 6c 65 20 |rror "Th|is file |
|000001d0| 77 61 73 20 63 6f 6d 70 | 69 6c 65 64 20 66 6f 72 |was comp|iled for|
|000001e0| 20 45 6d 61 63 73 20 31 | 39 2e 22 29 29 0a 0a 28 | Emacs 1|9."))..(|
|000001f0| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 11 c2 c3 0c |byte-cod|e ".....|
|00000200| 5c 22 15 c2 87 22 20 5b | 22 32 2e 33 32 22 20 66 |\"..." [|"2.32" f|
|00000210| 75 6d 65 2d 76 65 72 73 | 69 6f 6e 20 73 74 72 69 |ume-vers|ion stri|
|00000220| 6e 67 2d 6d 61 74 63 68 | 20 22 58 45 6d 61 63 73 |ng-match| "XEmacs|
|00000230| 5c 5c 7c 4c 75 63 69 64 | 22 20 65 6d 61 63 73 2d |\\|Lucid|" emacs-|
|00000240| 76 65 72 73 69 6f 6e 20 | 66 75 6d 65 2d 72 75 6e |version |fume-run|
|00000250| 6e 69 6e 67 2d 78 65 6d | 61 63 73 5d 20 33 29 0a |ning-xem|acs] 3).|
|00000260| 28 66 73 65 74 20 27 66 | 75 6d 65 2d 64 65 66 76 |(fset 'f|ume-defv|
|00000270| 61 72 2d 6c 6f 63 61 6c | 20 27 28 6d 61 63 72 6f |ar-local| '(macro|
|00000280| 20 2e 20 23 5b 28 76 61 | 72 20 76 61 6c 75 65 20 | . #[(va|r value |
|00000290| 26 6f 70 74 69 6f 6e 61 | 6c 20 64 6f 63 29 20 22 |&optiona|l doc) "|
|000002a0| c0 c1 5c 6e c3 0c 0d 5c | 6e 46 c3 0c 0d 45 46 c6 |..\n...\|nF...EF.|
|000002b0| c7 0c 44 44 c8 c7 0c 44 | c9 42 42 46 87 22 20 5b |..DD...D|.BBF." [|
|000002c0| 70 72 6f 67 6e 20 69 66 | 20 64 6f 63 20 64 65 66 |progn if| doc def|
|000002d0| 76 61 72 20 76 61 72 20 | 76 61 6c 75 65 20 6d 61 |var var |value ma|
|000002e0| 6b 65 2d 76 61 72 69 61 | 62 6c 65 2d 62 75 66 66 |ke-varia|ble-buff|
|000002f0| 65 72 2d 6c 6f 63 61 6c | 20 71 75 6f 74 65 20 70 |er-local| quote p|
|00000300| 75 74 20 28 27 70 65 72 | 6d 61 6e 65 6e 74 2d 6c |ut ('per|manent-l|
|00000310| 6f 63 61 6c 20 74 29 5d | 20 37 20 22 5c 0a 44 65 |ocal t)]| 7 "\.De|
|00000320| 66 69 6e 65 73 20 53 59 | 4d 42 4f 4c 20 61 73 20 |fines SY|MBOL as |
|00000330| 61 6e 20 61 64 76 65 72 | 74 69 73 65 64 20 76 61 |an adver|tised va|
|00000340| 72 69 61 62 6c 65 2e 0a | 50 65 72 66 6f 72 6d 73 |riable..|Performs|
|00000350| 20 61 20 64 65 66 76 61 | 72 2c 20 74 68 65 6e 20 | a defva|r, then |
|00000360| 65 78 65 63 75 74 65 73 | 20 60 6d 61 6b 65 2d 76 |executes| `make-v|
|00000370| 61 72 69 61 62 6c 65 2d | 62 75 66 66 65 72 2d 6c |ariable-|buffer-l|
|00000380| 6f 63 61 6c 27 20 6f 6e | 0a 74 68 65 20 76 61 72 |ocal' on|.the var|
|00000390| 69 61 62 6c 65 2e 20 20 | 41 6c 73 6f 20 73 65 74 |iable. |Also set|
|000003a0| 73 20 74 68 65 20 60 70 | 65 72 6d 61 6e 65 6e 74 |s the `p|ermanent|
|000003b0| 2d 6c 6f 63 61 6c 27 20 | 70 72 6f 70 65 72 74 79 |-local' |property|
|000003c0| 2c 20 73 6f 20 74 68 61 | 74 0a 60 6b 69 6c 6c 2d |, so tha|t.`kill-|
|000003d0| 61 6c 6c 2d 6c 6f 63 61 | 6c 2d 76 61 72 69 61 62 |all-loca|l-variab|
|000003e0| 6c 65 73 27 20 28 63 61 | 6c 6c 65 64 20 62 79 20 |les' (ca|lled by |
|000003f0| 6d 61 6a 6f 72 2d 6d 6f | 64 65 20 73 65 74 74 69 |major-mo|de setti|
|00000400| 6e 67 20 63 6f 6d 6d 61 | 6e 64 73 29 0a 77 6f 6e |ng comma|nds).won|
|00000410| 27 74 20 64 65 73 74 72 | 6f 79 20 66 75 6e 63 2d |'t destr|oy func-|
|00000420| 6d 65 6e 75 20 63 6f 6e | 74 72 6f 6c 20 76 61 72 |menu con|trol var|
|00000430| 69 61 62 6c 65 73 2e 22 | 5d 29 29 0a 28 62 79 74 |iables."|])).(byt|
|00000440| 65 2d 63 6f 64 65 20 22 | c0 c1 21 ac 85 c2 c1 c3 |e-code "|..!.....|
|00000450| 5c 22 88 c0 c4 21 ab 87 | c4 20 c5 3d 3f ae 85 c6 |\"...!..|. .=?...|
|00000460| 4a ad 81 c7 16 08 c0 87 | 22 20 5b 66 62 6f 75 6e |J.......|" [fboun|
|00000470| 64 70 20 73 65 6c 65 63 | 74 65 64 2d 66 72 61 6d |dp selec|ted-fram|
|00000480| 65 20 64 65 66 61 6c 69 | 61 73 20 73 65 6c 65 63 |e defali|as selec|
|00000490| 74 65 64 2d 73 63 72 65 | 65 6e 20 64 65 76 69 63 |ted-scre|en devic|
|000004a0| 65 2d 74 79 70 65 20 74 | 74 79 20 77 69 6e 64 6f |e-type t|ty windo|
|000004b0| 77 2d 73 79 73 74 65 6d | 20 74 20 66 75 6d 65 2d |w-system| t fume-|
|000004c0| 6e 6f 74 2d 74 74 79 5d | 20 33 29 0a 28 64 65 66 |not-tty]| 3).(def|
|000004d0| 76 61 72 20 66 75 6d 65 | 2d 61 75 74 6f 2d 70 6f |var fume|-auto-po|
|000004e0| 73 69 74 69 6f 6e 2d 70 | 6f 70 75 70 20 74 20 22 |sition-p|opup t "|
|000004f0| 5c 0a 2a 53 65 74 20 74 | 6f 20 6e 69 6c 20 69 66 |\.*Set t|o nil if|
|00000500| 20 79 6f 75 20 64 6f 6e | 27 74 20 77 61 6e 74 20 | you don|'t want |
|00000510| 74 68 65 20 6d 65 6e 75 | 20 74 6f 20 61 70 70 65 |the menu| to appe|
|00000520| 61 72 20 69 6e 20 74 68 | 65 20 63 6f 72 6e 65 72 |ar in th|e corner|
|00000530| 20 6f 66 20 74 68 65 20 | 77 69 6e 64 6f 77 0a 69 | of the |window.i|
|00000540| 6e 20 77 68 69 63 68 20 | 63 61 73 65 20 69 74 20 |n which |case it |
|00000550| 77 69 6c 6c 20 74 72 61 | 63 6b 20 74 68 65 20 6d |will tra|ck the m|
|00000560| 6f 75 73 65 20 70 6f 73 | 69 74 69 6f 6e 20 69 6e |ouse pos|ition in|
|00000570| 73 74 65 61 64 2e 22 29 | 0a 28 64 65 66 76 61 72 |stead.")|.(defvar|
|00000580| 20 66 75 6d 65 2d 64 69 | 73 70 6c 61 79 2d 69 6e | fume-di|splay-in|
|00000590| 2d 6d 6f 64 65 6c 69 6e | 65 2d 70 20 74 20 22 5c |-modelin|e-p t "\|
|000005a0| 0a 2a 53 65 74 20 74 6f | 20 6e 69 6c 20 69 66 20 |.*Set to| nil if |
|000005b0| 79 6f 75 20 64 6f 6e 27 | 74 20 77 61 6e 74 20 74 |you don'|t want t|
|000005c0| 68 65 20 66 75 6e 63 74 | 69 6f 6e 20 6e 61 6d 65 |he funct|ion name|
|000005d0| 20 61 70 70 65 61 72 69 | 6e 67 20 69 6e 20 74 68 | appeari|ng in th|
|000005e0| 65 20 6d 6f 64 65 6c 69 | 6e 65 22 29 0a 28 64 65 |e modeli|ne").(de|
|000005f0| 66 76 61 72 20 66 75 6d | 65 2d 62 75 66 66 65 72 |fvar fum|e-buffer|
|00000600| 2d 6e 61 6d 65 20 22 2a | 46 75 6e 63 74 69 6f 6e |-name "*|Function|
|00000610| 20 4c 69 73 74 2a 22 20 | 22 5c 0a 4e 61 6d 65 20 | List*" |"\.Name |
|00000620| 6f 66 20 62 75 66 66 65 | 72 20 75 73 65 64 20 74 |of buffe|r used t|
|00000630| 6f 20 6c 69 73 74 20 66 | 75 6e 63 74 69 6f 6e 73 |o list f|unctions|
|00000640| 20 77 68 65 6e 20 66 75 | 6d 65 2d 6c 69 73 74 2d | when fu|me-list-|
|00000650| 66 75 6e 63 74 69 6f 6e | 73 20 63 61 6c 6c 65 64 |function|s called|
|00000660| 22 29 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |").(byte|-code ".|
|00000670| c1 21 ac 82 c2 11 c3 c1 | c4 c5 23 88 c6 c1 21 88 |.!......|..#...!.|
|00000680| c3 c1 c7 c8 23 87 22 20 | 5b 62 6f 75 6e 64 70 20 |....#." |[boundp |
|00000690| 66 75 6d 65 2d 6d 65 6e | 75 62 61 72 2d 6d 65 6e |fume-men|ubar-men|
|000006a0| 75 2d 6e 61 6d 65 20 22 | 46 75 6e 63 74 69 6f 6e |u-name "|Function|
|000006b0| 73 22 20 70 75 74 20 76 | 61 72 69 61 62 6c 65 2d |s" put v|ariable-|
|000006c0| 64 6f 63 75 6d 65 6e 74 | 61 74 69 6f 6e 20 22 2a |document|ation "*|
|000006d0| 53 65 74 20 74 68 69 73 | 20 74 6f 20 74 68 65 20 |Set this| to the |
|000006e0| 73 74 72 69 6e 67 20 79 | 6f 75 20 77 61 6e 74 20 |string y|ou want |
|000006f0| 74 6f 20 61 70 70 65 61 | 72 20 69 6e 20 74 68 65 |to appea|r in the|
|00000700| 20 6d 65 6e 75 62 61 72 | 22 20 6d 61 6b 65 2d 76 | menubar|" make-v|
|00000710| 61 72 69 61 62 6c 65 2d | 62 75 66 66 65 72 2d 6c |ariable-|buffer-l|
|00000720| 6f 63 61 6c 20 70 65 72 | 6d 61 6e 65 6e 74 2d 6c |ocal per|manent-l|
|00000730| 6f 63 61 6c 20 74 5d 20 | 34 29 0a 28 64 65 66 76 |ocal t] |4).(defv|
|00000740| 61 72 20 66 75 6d 65 2d | 6d 65 6e 75 62 61 72 2d |ar fume-|menubar-|
|00000750| 6d 65 6e 75 2d 6c 6f 63 | 61 74 69 6f 6e 20 22 46 |menu-loc|ation "F|
|00000760| 69 6c 65 22 20 22 5c 0a | 2a 53 65 74 20 74 68 69 |ile" "\.|*Set thi|
|00000770| 73 20 6e 69 6c 20 69 66 | 20 79 6f 75 20 77 61 6e |s nil if| you wan|
|00000780| 74 20 74 68 65 20 6d 65 | 6e 75 20 74 6f 20 61 70 |t the me|nu to ap|
|00000790| 70 65 61 72 20 6c 61 73 | 74 20 6f 6e 20 74 68 65 |pear las|t on the|
|000007a0| 20 6d 65 6e 75 62 61 72 | 2e 0a 4f 74 68 65 72 77 | menubar|..Otherw|
|000007b0| 69 73 65 20 73 65 74 20 | 74 68 69 73 20 74 6f 20 |ise set |this to |
|000007c0| 74 68 65 20 6d 65 6e 75 | 20 79 6f 75 20 77 61 6e |the menu| you wan|
|000007d0| 74 20 5c 22 46 75 6e 63 | 74 69 6f 6e 73 5c 22 20 |t \"Func|tions\" |
|000007e0| 74 6f 20 61 70 70 65 61 | 72 20 69 6e 20 66 72 6f |to appea|r in fro|
|000007f0| 6e 74 20 6f 66 2e 22 29 | 0a 28 64 65 66 76 61 72 |nt of.")|.(defvar|
|00000800| 20 66 75 6d 65 2d 6d 61 | 78 2d 69 74 65 6d 73 20 | fume-ma|x-items |
|00000810| 32 35 20 22 5c 0a 2a 4d | 61 78 69 6d 75 6d 20 6e |25 "\.*M|aximum n|
|00000820| 75 6d 62 65 72 20 6f 66 | 20 65 6c 65 6d 65 6e 74 |umber of| element|
|00000830| 73 20 69 6e 20 61 20 66 | 75 6e 63 74 69 6f 6e 20 |s in a f|unction |
|00000840| 28 73 75 62 29 6d 65 6e | 75 2e 22 29 0a 28 64 65 |(sub)men|u.").(de|
|00000850| 66 76 61 72 20 66 75 6d | 65 2d 66 6e 2d 77 69 6e |fvar fum|e-fn-win|
|00000860| 64 6f 77 2d 70 6f 73 69 | 74 69 6f 6e 20 33 20 22 |dow-posi|tion 3 "|
|00000870| 5c 0a 2a 4e 75 6d 62 65 | 72 20 6f 66 20 6c 69 6e |\.*Numbe|r of lin|
|00000880| 65 73 20 66 72 6f 6d 20 | 74 6f 70 20 6f 66 20 77 |es from |top of w|
|00000890| 69 6e 64 6f 77 20 61 74 | 20 77 68 69 63 68 20 74 |indow at| which t|
|000008a0| 6f 20 73 68 6f 77 20 66 | 75 6e 63 74 69 6f 6e 2e |o show f|unction.|
|000008b0| 22 29 0a 28 64 65 66 76 | 61 72 20 66 75 6d 65 2d |").(defv|ar fume-|
|000008c0| 69 6e 64 65 78 2d 6d 65 | 74 68 6f 64 20 33 20 22 |index-me|thod 3 "|
|000008d0| 5c 0a 2a 53 65 74 20 74 | 68 69 73 20 74 6f 20 74 |\.*Set t|his to t|
|000008e0| 68 65 20 6d 65 74 68 6f | 64 20 6e 75 6d 62 65 72 |he metho|d number|
|000008f0| 20 79 6f 75 20 77 61 6e | 74 20 75 73 65 64 2e 0a | you wan|t used..|
|00000900| 0a 4d 65 74 68 6f 64 73 | 20 63 75 72 72 65 6e 74 |.Methods| current|
|00000910| 6c 79 20 73 75 70 70 6f | 72 74 65 64 3a 0a 30 20 |ly suppo|rted:.0 |
|00000920| 3d 20 69 66 20 79 6f 75 | 20 77 61 6e 74 20 73 75 |= if you| want su|
|00000930| 62 6d 65 6e 75 20 6e 61 | 6d 65 73 20 74 6f 20 62 |bmenu na|mes to b|
|00000940| 65 20 6e 75 6d 62 65 72 | 65 64 0a 31 20 3d 20 69 |e number|ed.1 = i|
|00000950| 66 20 79 6f 75 20 77 61 | 6e 74 20 73 75 62 6d 65 |f you wa|nt subme|
|00000960| 6e 75 20 72 61 6e 67 65 | 20 69 6e 64 69 63 61 74 |nu range| indicat|
|00000970| 65 64 20 62 79 20 66 69 | 72 73 74 20 63 68 61 72 |ed by fi|rst char|
|00000980| 61 63 74 65 72 0a 32 20 | 3d 20 69 66 20 79 6f 75 |acter.2 |= if you|
|00000990| 20 77 61 6e 74 20 73 75 | 62 6d 65 6e 75 20 72 61 | want su|bmenu ra|
|000009a0| 6e 67 65 20 69 6e 64 69 | 63 61 74 65 64 20 62 79 |nge indi|cated by|
|000009b0| 20 66 69 72 73 74 20 31 | 30 20 63 68 61 72 61 63 | first 1|0 charac|
|000009c0| 74 65 72 73 0a 33 20 3d | 20 69 66 20 79 6f 75 20 |ters.3 =| if you |
|000009d0| 77 61 6e 74 20 73 75 62 | 6d 65 6e 75 20 72 61 6e |want sub|menu ran|
|000009e0| 67 65 20 69 6e 64 69 63 | 61 74 65 64 20 62 79 20 |ge indic|ated by |
|000009f0| 61 73 20 6d 61 6e 79 20 | 63 68 61 72 61 63 74 65 |as many |characte|
|00000a00| 72 73 20 61 73 20 6e 65 | 65 64 65 64 22 29 0a 28 |rs as ne|eded").(|
|00000a10| 64 65 66 76 61 72 20 66 | 75 6d 65 2d 73 63 61 6e |defvar f|ume-scan|
|00000a20| 6e 69 6e 67 2d 6d 65 73 | 73 61 67 65 20 22 53 63 |ning-mes|sage "Sc|
|00000a30| 61 6e 6e 69 6e 67 20 62 | 75 66 66 65 72 2e 2e 2e |anning b|uffer...|
|00000a40| 20 28 25 33 64 25 25 29 | 22 20 22 5c 0a 2a 53 65 | (%3d%%)|" "\.*Se|
|00000a50| 74 20 74 6f 20 6e 69 6c | 20 69 66 20 79 6f 75 20 |t to nil| if you |
|00000a60| 64 6f 6e 27 74 20 77 61 | 6e 74 20 70 72 6f 67 72 |don't wa|nt progr|
|00000a70| 65 73 73 20 6d 65 73 73 | 61 67 65 73 20 64 75 72 |ess mess|ages dur|
|00000a80| 69 6e 67 20 6d 61 6e 75 | 61 6c 20 73 63 61 6e 6e |ing manu|al scann|
|00000a90| 69 6e 67 0a 6f 66 20 74 | 68 65 20 62 75 66 66 65 |ing.of t|he buffe|
|00000aa0| 72 2e 22 29 0a 28 64 65 | 66 76 61 72 20 66 75 6d |r.").(de|fvar fum|
|00000ab0| 65 2d 72 65 73 63 61 6e | 6e 69 6e 67 2d 6d 65 73 |e-rescan|ning-mes|
|00000ac0| 73 61 67 65 20 6e 69 6c | 20 22 5c 0a 2a 53 65 74 |sage nil| "\.*Set|
|00000ad0| 20 74 6f 20 6e 6f 6e 2d | 6e 69 6c 20 69 66 20 79 | to non-|nil if y|
|00000ae0| 6f 75 20 77 61 6e 74 20 | 70 72 6f 67 72 65 73 73 |ou want |progress|
|00000af0| 20 6d 65 73 73 61 67 65 | 73 20 64 75 72 69 6e 67 | message|s during|
|00000b00| 20 61 75 74 6f 6d 61 74 | 69 63 20 73 63 61 6e 6e | automat|ic scann|
|00000b10| 69 6e 67 0a 6f 66 20 74 | 68 65 20 62 75 66 66 65 |ing.of t|he buffe|
|00000b20| 72 2e 20 46 6f 72 20 65 | 78 61 6d 70 6c 65 20 5c |r. For e|xample \|
|00000b30| 22 52 65 2d 53 63 61 6e | 6e 69 6e 67 20 62 75 66 |"Re-Scan|ning buf|
|00000b40| 66 65 72 2e 2e 2e 5c 22 | 22 29 0a 28 62 79 74 65 |fer...\"|").(byte|
|00000b50| 2d 63 6f 64 65 20 22 c0 | c1 21 ac 82 c2 11 c3 c1 |-code ".|.!......|
|00000b60| c4 c5 23 88 c6 c1 21 88 | c3 c1 c7 c8 23 88 c0 c9 |..#...!.|....#...|
|00000b70| 21 ac 83 ca 16 09 c3 c9 | c4 cb 23 88 c6 c9 21 88 |!.......|..#...!.|
|00000b80| c3 c9 c7 c8 23 87 22 20 | 5b 62 6f 75 6e 64 70 20 |....#." |[boundp |
|00000b90| 66 75 6d 65 2d 73 6f 72 | 74 2d 66 75 6e 63 74 69 |fume-sor|t-functi|
|00000ba0| 6f 6e 20 66 75 6d 65 2d | 73 6f 72 74 2d 62 79 2d |on fume-|sort-by-|
|00000bb0| 6e 61 6d 65 20 70 75 74 | 20 76 61 72 69 61 62 6c |name put| variabl|
|00000bc0| 65 2d 64 6f 63 75 6d 65 | 6e 74 61 74 69 6f 6e 20 |e-docume|ntation |
|00000bd0| 22 2a 54 68 65 20 66 75 | 6e 63 74 69 6f 6e 20 74 |"*The fu|nction t|
|00000be0| 6f 20 75 73 65 20 66 6f | 72 20 73 6f 72 74 69 6e |o use fo|r sortin|
|00000bf0| 67 20 74 68 65 20 66 75 | 6e 63 74 69 6f 6e 20 6d |g the fu|nction m|
|00000c00| 65 6e 75 2e 5c 6e 5c 6e | 53 65 74 20 74 68 69 73 |enu.\n\n|Set this|
|00000c10| 20 74 6f 20 6e 69 6c 20 | 69 66 20 79 6f 75 20 64 | to nil |if you d|
|00000c20| 6f 6e 27 74 20 77 61 6e | 74 20 61 6e 79 20 73 6f |on't wan|t any so|
|00000c30| 72 74 69 6e 67 20 28 66 | 61 73 74 65 72 29 2e 5c |rting (f|aster).\|
|00000c40| 6e 54 68 65 20 69 74 65 | 6d 73 20 69 6e 20 74 68 |nThe ite|ms in th|
|00000c50| 65 20 6d 65 6e 75 20 61 | 72 65 20 74 68 65 6e 20 |e menu a|re then |
|00000c60| 70 72 65 73 65 6e 74 65 | 64 20 69 6e 20 74 68 65 |presente|d in the|
|00000c70| 20 6f 72 64 65 72 20 74 | 68 65 79 20 77 65 72 65 | order t|hey were|
|00000c80| 20 66 6f 75 6e 64 5c 6e | 69 6e 20 74 68 65 20 62 | found\n|in the b|
|00000c90| 75 66 66 65 72 2e 5c 6e | 5c 6e 54 68 65 20 66 75 |uffer.\n|\nThe fu|
|00000ca0| 6e 63 74 69 6f 6e 20 73 | 68 6f 75 6c 64 20 74 61 |nction s|hould ta|
|00000cb0| 6b 65 20 74 77 6f 20 61 | 72 67 75 6d 65 6e 74 73 |ke two a|rguments|
|00000cc0| 20 61 6e 64 20 72 65 74 | 75 72 6e 20 54 20 69 66 | and ret|urn T if|
|00000cd0| 20 74 68 65 20 66 69 72 | 73 74 5c 6e 65 6c 65 6d | the fir|st\nelem|
|00000ce0| 65 6e 74 20 73 68 6f 75 | 6c 64 20 63 6f 6d 65 20 |ent shou|ld come |
|00000cf0| 62 65 66 6f 72 65 20 74 | 68 65 20 73 65 63 6f 6e |before t|he secon|
|00000d00| 64 2e 20 20 54 68 65 20 | 61 72 67 75 6d 65 6e 74 |d. The |argument|
|00000d10| 73 20 61 72 65 20 63 6f | 6e 73 20 63 65 6c 6c 73 |s are co|ns cells|
|00000d20| 3b 5c 6e 28 4e 41 4d 45 | 20 2e 20 50 4f 53 49 54 |;\n(NAME| . POSIT|
|00000d30| 49 4f 4e 29 2e 20 20 4c | 6f 6f 6b 20 61 74 20 27 |ION). L|ook at '|
|00000d40| 66 75 6d 65 2d 73 6f 72 | 74 2d 62 79 2d 6e 61 6d |fume-sor|t-by-nam|
|00000d50| 65 27 20 66 6f 72 20 61 | 6e 20 65 78 61 6d 70 6c |e' for a|n exampl|
|00000d60| 65 2e 22 20 6d 61 6b 65 | 2d 76 61 72 69 61 62 6c |e." make|-variabl|
|00000d70| 65 2d 62 75 66 66 65 72 | 2d 6c 6f 63 61 6c 20 70 |e-buffer|-local p|
|00000d80| 65 72 6d 61 6e 65 6e 74 | 2d 6c 6f 63 61 6c 20 74 |ermanent|-local t|
|00000d90| 20 66 75 6d 65 2d 72 65 | 73 63 61 6e 2d 62 75 66 | fume-re|scan-buf|
|00000da0| 66 65 72 2d 68 6f 6f 6b | 20 6e 69 6c 20 22 2a 42 |fer-hook| nil "*B|
|00000db0| 75 66 66 65 72 20 6c 6f | 63 61 6c 20 68 6f 6f 6b |uffer lo|cal hook|
|00000dc0| 20 74 6f 20 63 61 6c 6c | 20 61 74 20 74 68 65 20 | to call| at the |
|00000dd0| 65 6e 64 20 6f 66 20 65 | 61 63 68 20 62 75 66 66 |end of e|ach buff|
|00000de0| 65 72 20 72 65 73 63 61 | 6e 22 5d 20 34 29 0a 28 |er resca|n"] 4).(|
|00000df0| 64 65 66 76 61 72 20 66 | 75 6d 65 2d 66 6f 75 6e |defvar f|ume-foun|
|00000e00| 64 2d 66 75 6e 63 74 69 | 6f 6e 2d 68 6f 6f 6b 20 |d-functi|on-hook |
|00000e10| 6e 69 6c 20 22 5c 0a 2a | 48 6f 6f 6b 20 74 6f 20 |nil "\.*|Hook to |
|00000e20| 63 61 6c 6c 20 61 66 74 | 65 72 20 65 76 65 72 79 |call aft|er every|
|00000e30| 20 66 75 6e 63 74 69 6f | 6e 20 6d 61 74 63 68 2e | functio|n match.|
|00000e40| 22 29 0a 28 64 65 66 76 | 61 72 20 66 75 6d 65 2d |").(defv|ar fume-|
|00000e50| 6e 6f 2d 70 72 6f 6d 70 | 74 2d 6f 6e 2d 76 61 6c |no-promp|t-on-val|
|00000e60| 69 64 2d 64 65 66 61 75 | 6c 74 20 6e 69 6c 20 22 |id-defau|lt nil "|
|00000e70| 5c 0a 2a 53 65 74 20 6e | 6f 6e 2d 6e 69 6c 20 69 |\.*Set n|on-nil i|
|00000e80| 66 20 27 66 75 6d 65 2d | 70 72 6f 6d 70 74 2d 66 |f 'fume-|prompt-f|
|00000e90| 75 6e 63 74 69 6f 6e 2d | 67 6f 74 6f 27 20 73 68 |unction-|goto' sh|
|00000ea0| 6f 75 6c 64 20 6a 75 6d | 70 20 77 69 74 68 6f 75 |ould jum|p withou|
|00000eb0| 74 20 70 72 6f 6d 70 74 | 69 6e 67 0a 77 68 65 6e |t prompt|ing.when|
|00000ec0| 20 61 20 76 61 6c 69 64 | 20 64 65 66 61 75 6c 74 | a valid| default|
|00000ed0| 20 65 78 69 73 74 73 2e | 22 29 0a 28 62 79 74 65 | exists.|").(byte|
|00000ee0| 2d 63 6f 64 65 20 22 c0 | c1 21 ac 82 c2 11 c3 c1 |-code ".|.!......|
|00000ef0| c4 c5 23 88 c6 c1 21 88 | c3 c1 c7 c8 23 88 c0 c9 |..#...!.|....#...|
|00000f00| 21 ac 83 c2 16 09 c3 c9 | c4 ca 23 88 c6 c9 21 88 |!.......|..#...!.|
|00000f10| c3 c9 c7 c8 23 88 c0 cb | 21 ac 83 c2 16 0b c3 cb |....#...|!.......|
|00000f20| c4 cc 23 88 c6 cb 21 88 | c3 cb c7 c8 23 88 c0 cd |..#...!.|....#...|
|00000f30| 21 ac 83 c2 16 0d c3 cd | c4 ce 23 88 c6 cd 21 88 |!.......|..#...!.|
|00000f40| c3 cd c7 c8 23 88 c0 cf | 21 ac 83 c2 16 0f c3 cf |....#...|!.......|
|00000f50| c4 d0 23 88 c6 cf 21 88 | c3 cf c7 c8 23 88 c0 d1 |..#...!.|....#...|
|00000f60| 21 ac 83 c2 16 11 c3 d1 | c4 d2 23 88 c6 d1 21 88 |!.......|..#...!.|
|00000f70| c3 d1 c7 c8 23 88 c0 d3 | 21 ac 83 c2 16 13 c3 d3 |....#...|!.......|
|00000f80| c4 d4 23 88 c6 d3 21 88 | c3 d3 c7 c8 23 88 c0 d5 |..#...!.|....#...|
|00000f90| 21 ac 83 d6 16 15 c3 d5 | c4 d7 23 88 c6 d5 21 88 |!.......|..#...!.|
|00000fa0| c3 d5 c7 c8 23 87 22 20 | 5b 62 6f 75 6e 64 70 20 |....#." |[boundp |
|00000fb0| 66 75 6d 65 2d 66 75 6e | 63 6c 69 73 74 20 6e 69 |fume-fun|clist ni|
|00000fc0| 6c 20 70 75 74 20 76 61 | 72 69 61 62 6c 65 2d 64 |l put va|riable-d|
|00000fd0| 6f 63 75 6d 65 6e 74 61 | 74 69 6f 6e 20 22 54 68 |ocumenta|tion "Th|
|00000fe0| 65 20 6c 61 74 65 73 74 | 20 6c 69 73 74 20 6f 66 |e latest| list of|
|00000ff0| 20 66 75 6e 63 74 69 6f | 6e 20 6e 61 6d 65 73 20 | functio|n names |
|00001000| 69 6e 20 74 68 65 20 62 | 75 66 66 65 72 22 20 6d |in the b|uffer" m|
|00001010| 61 6b 65 2d 76 61 72 69 | 61 62 6c 65 2d 62 75 66 |ake-vari|able-buf|
|00001020| 66 65 72 2d 6c 6f 63 61 | 6c 20 70 65 72 6d 61 6e |fer-loca|l perman|
|00001030| 65 6e 74 2d 6c 6f 63 61 | 6c 20 74 20 66 75 6d 65 |ent-loca|l t fume|
|00001040| 2d 66 75 6e 63 74 69 6f | 6e 2d 6e 61 6d 65 2d 72 |-functio|n-name-r|
|00001050| 65 67 65 78 70 20 22 54 | 68 65 20 6b 65 79 77 6f |egexp "T|he keywo|
|00001060| 72 64 73 20 74 6f 20 73 | 68 6f 77 20 69 6e 20 61 |rds to s|how in a|
|00001070| 20 6d 65 6e 75 22 20 66 | 75 6d 65 2d 66 69 6e 64 | menu" f|ume-find|
|00001080| 2d 6e 65 78 74 2d 66 75 | 6e 63 74 69 6f 6e 2d 6e |-next-fu|nction-n|
|00001090| 61 6d 65 2d 6d 65 74 68 | 6f 64 20 22 54 68 65 20 |ame-meth|od "The |
|000010a0| 66 75 6e 63 74 69 6f 6e | 20 74 6f 20 75 73 65 20 |function| to use |
|000010b0| 74 6f 20 66 69 6e 64 20 | 74 68 65 20 6e 65 78 74 |to find |the next|
|000010c0| 20 66 75 6e 63 74 69 6f | 6e 20 6e 61 6d 65 20 69 | functio|n name i|
|000010d0| 6e 20 74 68 65 20 62 75 | 66 66 65 72 22 20 66 75 |n the bu|ffer" fu|
|000010e0| 6d 65 2d 6d 6f 64 65 6c | 69 6e 65 2d 62 75 66 66 |me-model|ine-buff|
|000010f0| 65 72 2d 69 64 65 6e 74 | 69 66 69 63 61 74 69 6f |er-ident|ificatio|
|00001100| 6e 20 22 53 74 6f 72 61 | 67 65 20 66 6f 72 20 74 |n "Stora|ge for t|
|00001110| 68 65 20 6f 72 69 67 69 | 6e 61 6c 20 6d 6f 64 65 |he origi|nal mode|
|00001120| 2d 6c 69 6e 65 2d 62 75 | 66 66 65 72 2d 69 64 65 |-line-bu|ffer-ide|
|00001130| 6e 74 69 66 69 63 61 74 | 69 6f 6e 22 20 66 75 6d |ntificat|ion" fum|
|00001140| 65 2d 6d 6f 64 65 6c 69 | 6e 65 2d 66 75 6e 63 6c |e-modeli|ne-funcl|
|00001150| 69 73 74 20 22 54 68 65 | 20 6c 61 74 65 73 74 20 |ist "The| latest |
|00001160| 6c 69 73 74 20 6f 66 20 | 66 75 6e 63 74 69 6f 6e |list of |function|
|00001170| 20 6e 61 6d 65 73 20 69 | 6e 20 74 68 65 20 62 75 | names i|n the bu|
|00001180| 66 66 65 72 20 74 6f 20 | 64 69 73 70 6c 61 79 20 |ffer to |display |
|00001190| 69 6e 20 74 68 65 20 6d | 6f 64 65 6c 69 6e 65 22 |in the m|odeline"|
|000011a0| 20 66 75 6d 65 2d 66 75 | 6e 63 6c 69 73 74 2d 64 | fume-fu|nclist-d|
|000011b0| 69 72 74 79 2d 70 20 22 | 46 6c 61 67 73 20 77 68 |irty-p "|Flags wh|
|000011c0| 65 74 68 65 72 20 74 68 | 65 20 62 75 66 66 65 72 |ether th|e buffer|
|000011d0| 20 69 73 20 69 6e 20 6e | 65 65 64 20 6f 66 20 61 | is in n|eed of a|
|000011e0| 20 66 72 65 73 68 20 73 | 63 61 6e 22 20 66 75 6d | fresh s|can" fum|
|000011f0| 65 2d 72 65 73 63 61 6e | 2d 69 6e 68 69 62 69 74 |e-rescan|-inhibit|
|00001200| 2d 70 20 22 49 6e 74 65 | 72 6e 61 6c 20 76 61 72 |-p "Inte|rnal var|
|00001210| 69 61 62 6c 65 20 6f 6e | 6c 79 2e 20 44 4f 20 4e |iable on|ly. DO N|
|00001220| 4f 54 20 54 4f 55 43 48 | 2e 22 20 66 75 6d 65 2d |OT TOUCH|." fume-|
|00001230| 72 65 73 63 61 6e 2d 74 | 72 69 67 67 65 72 2d 63 |rescan-t|rigger-c|
|00001240| 6f 75 6e 74 65 72 20 30 | 20 22 55 73 65 64 20 69 |ounter 0| "Used i|
|00001250| 6e 20 6c 61 72 67 65 20 | 62 75 66 66 65 72 73 20 |n large |buffers |
|00001260| 74 6f 20 6f 70 74 69 6d | 69 73 65 20 63 68 65 63 |to optim|ise chec|
|00001270| 6b 69 6e 67 20 66 72 65 | 71 75 65 6e 63 79 22 5d |king fre|quency"]|
|00001280| 20 34 29 0a 28 64 65 66 | 76 61 72 20 66 75 6d 65 | 4).(def|var fume|
|00001290| 2d 72 65 73 63 61 6e 2d | 74 72 69 67 67 65 72 2d |-rescan-|trigger-|
|000012a0| 63 6f 75 6e 74 65 72 2d | 62 75 66 66 65 72 2d 73 |counter-|buffer-s|
|000012b0| 69 7a 65 20 31 30 30 30 | 30 20 22 5c 0a 55 73 65 |ize 1000|0 "\.Use|
|000012c0| 64 20 74 6f 20 74 75 6e | 65 20 74 68 65 20 66 72 |d to tun|e the fr|
|000012d0| 65 71 75 65 6e 63 79 20 | 6f 66 20 61 75 74 6f 6d |equency |of autom|
|000012e0| 61 74 69 63 20 63 68 65 | 63 6b 73 20 6f 6e 20 74 |atic che|cks on t|
|000012f0| 68 65 20 62 75 66 66 65 | 72 2e 0a 54 68 65 20 66 |he buffe|r..The f|
|00001300| 75 6e 63 74 69 6f 6e 20 | 66 75 6d 65 2d 72 65 73 |unction |fume-res|
|00001310| 63 61 6e 2d 62 75 66 66 | 65 72 2d 74 72 69 67 67 |can-buff|er-trigg|
|00001320| 65 72 20 6f 6e 6c 79 20 | 77 6f 72 6b 73 20 77 68 |er only |works wh|
|00001330| 65 6e 65 76 65 72 20 74 | 68 65 20 76 61 6c 75 65 |enever t|he value|
|00001340| 20 6f 66 20 74 68 65 0a | 76 61 72 69 61 62 6c 65 | of the.|variable|
|00001350| 20 66 75 6d 65 2d 72 65 | 73 63 61 6e 2d 74 72 69 | fume-re|scan-tri|
|00001360| 67 67 65 72 2d 63 6f 75 | 6e 74 65 72 20 72 65 61 |gger-cou|nter rea|
|00001370| 63 68 65 73 20 7a 65 72 | 6f 2c 20 77 68 65 72 65 |ches zer|o, where|
|00001380| 75 70 6f 6e 20 69 74 20 | 67 65 74 73 20 72 65 73 |upon it |gets res|
|00001390| 65 74 20 74 6f 0a 62 75 | 66 66 65 72 2d 73 69 7a |et to.bu|ffer-siz|
|000013a0| 65 2f 66 75 6d 65 2d 72 | 65 73 63 61 6e 2d 74 72 |e/fume-r|escan-tr|
|000013b0| 69 67 67 65 72 2d 63 6f | 75 6e 74 65 72 2d 62 75 |igger-co|unter-bu|
|000013c0| 66 66 65 72 2d 73 69 7a | 65 2e 22 29 0a 28 64 65 |ffer-siz|e.").(de|
|000013d0| 66 63 6f 6e 73 74 20 66 | 75 6d 65 2d 66 75 6e 63 |fconst f|ume-func|
|000013e0| 74 69 6f 6e 2d 6e 61 6d | 65 2d 72 65 67 65 78 70 |tion-nam|e-regexp|
|000013f0| 2d 6c 69 73 70 20 28 63 | 6f 6e 63 61 74 20 22 5c |-lisp (c|oncat "\|
|00001400| 5c 28 5e 28 64 65 66 75 | 6e 2b 5c 5c 73 2d 2a 5b |\(^(defu|n+\\s-*[|
|00001410| 23 3a 3f 41 2d 5a 61 2d | 7a 30 2d 39 5f 2b 2d 3e |#:?A-Za-|z0-9_+->|
|00001420| 5d 2b 5c 5c 73 2d 2a 28 | 5c 5c 29 22 20 22 5c 5c |]+\\s-*(|\\)" "\\|
|00001430| 7c 22 20 22 5c 5c 28 5e | 28 64 65 66 73 75 62 73 ||" "\\(^|(defsubs|
|00001440| 74 2b 5c 5c 73 2d 2a 5b | 23 3a 3f 41 2d 5a 61 2d |t+\\s-*[|#:?A-Za-|
|00001450| 7a 30 2d 39 5f 2b 2d 3e | 5d 2b 5c 5c 73 2d 2a 28 |z0-9_+->|]+\\s-*(|
|00001460| 5c 5c 29 22 20 22 5c 5c | 7c 22 20 22 5c 5c 28 5e |\\)" "\\||" "\\(^|
|00001470| 28 64 65 66 6d 61 63 72 | 6f 2b 5c 5c 73 2d 2a 5b |(defmacr|o+\\s-*[|
|00001480| 23 3a 3f 41 2d 5a 61 2d | 7a 30 2d 39 5f 2b 2d 3e |#:?A-Za-|z0-9_+->|
|00001490| 5d 2b 5c 5c 73 2d 2a 28 | 5c 5c 29 22 20 22 5c 5c |]+\\s-*(|\\)" "\\|
|000014a0| 7c 22 20 22 5c 5c 28 5e | 28 64 65 2b 5c 5c 73 2d ||" "\\(^|(de+\\s-|
|000014b0| 2a 5b 23 3a 3f 41 2d 5a | 61 2d 7a 30 2d 39 5f 2b |*[#:?A-Z|a-z0-9_+|
|000014c0| 2d 3e 5d 2b 5c 5c 73 2d | 2a 28 5c 5c 29 22 20 22 |->]+\\s-|*(\\)" "|
|000014d0| 5c 5c 7c 22 20 22 5c 5c | 28 5e 28 64 6d 64 2b 5c |\\|" "\\|(^(dmd+\|
|000014e0| 5c 73 2d 2a 5b 23 3a 3f | 41 2d 5a 61 2d 7a 30 2d |\s-*[#:?|A-Za-z0-|
|000014f0| 39 5f 2b 2d 3e 5d 2b 5c | 5c 73 2d 2a 28 5c 5c 29 |9_+->]+\|\s-*(\\)|
|00001500| 22 29 20 22 5c 0a 45 78 | 70 72 65 73 73 69 6f 6e |") "\.Ex|pression|
|00001510| 20 74 6f 20 67 65 74 20 | 6c 69 73 70 20 66 75 6e | to get |lisp fun|
|00001520| 63 74 69 6f 6e 20 6e 61 | 6d 65 73 22 29 0a 28 64 |ction na|mes").(d|
|00001530| 65 66 63 6f 6e 73 74 20 | 66 75 6d 65 2d 66 75 6e |efconst |fume-fun|
|00001540| 63 74 69 6f 6e 2d 6e 61 | 6d 65 2d 72 65 67 65 78 |ction-na|me-regex|
|00001550| 70 2d 63 20 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |p-c (byt|e-code "|
|00001560| c0 c1 89 c2 c3 b0 05 87 | 22 20 5b 22 5e 5b 61 2d |........|" ["^[a-|
|00001570| 7a 41 2d 5a 30 2d 39 5d | 2b 5c 5c 73 2d 3f 22 20 |zA-Z0-9]|+\\s-?" |
|00001580| 22 5c 5c 28 5b 61 2d 7a | 41 2d 5a 30 2d 39 5f 2a |"\\([a-z|A-Z0-9_*|
|00001590| 5d 2b 5c 5c 73 2d 2b 5c | 5c 29 3f 22 20 22 5c 5c |]+\\s-+\|\)?" "\\|
|000015a0| 28 5b 2a 26 5d 2b 5c 5c | 73 2d 2a 5c 5c 29 3f 22 |([*&]+\\|s-*\\)?"|
|000015b0| 20 22 5c 5c 28 5b 61 2d | 7a 41 2d 5a 30 2d 39 5f | "\\([a-|zA-Z0-9_|
|000015c0| 2a 5d 2b 5c 5c 29 5b 20 | 09 5c 6e 5d 2a 28 22 5d |*]+\\)[ |.\n]*("]|
|000015d0| 20 35 29 20 22 5c 0a 45 | 78 70 72 65 73 73 69 6f | 5) "\.E|xpressio|
|000015e0| 6e 20 74 6f 20 67 65 74 | 20 43 20 66 75 6e 63 74 |n to get| C funct|
|000015f0| 69 6f 6e 20 6e 61 6d 65 | 73 22 29 0a 28 64 65 66 |ion name|s").(def|
|00001600| 63 6f 6e 73 74 20 66 75 | 6d 65 2d 66 75 6e 63 74 |const fu|me-funct|
|00001610| 69 6f 6e 2d 6e 61 6d 65 | 2d 72 65 67 65 78 70 2d |ion-name|-regexp-|
|00001620| 63 2b 2b 20 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |c++ (byt|e-code "|
|00001630| c0 c1 c2 c3 c4 c5 b0 06 | c6 42 87 22 20 5b 22 5e |........|.B." ["^|
|00001640| 5c 5c 28 74 65 6d 70 6c | 61 74 65 5c 5c 73 20 2b |\\(templ|ate\\s +|
|00001650| 3c 5b 5e 3e 5d 2b 3e 5c | 5c 73 20 2b 5c 5c 29 3f |<[^>]+>\|\s +\\)?|
|00001660| 22 20 22 5c 5c 28 5b 61 | 2d 7a 41 2d 5a 30 2d 39 |" "\\([a|-zA-Z0-9|
|00001670| 5f 2a 26 3c 2c 3e 3a 5d | 2b 5c 5c 73 2d 2b 5c 5c |_*&<,>:]|+\\s-+\\|
|00001680| 29 3f 22 20 22 5c 5c 28 | 5b 61 2d 7a 41 2d 5a 30 |)?" "\\(|[a-zA-Z0|
|00001690| 2d 39 5f 2a 26 3c 2c 3e | 5c 22 5d 2b 5c 5c 73 2d |-9_*&<,>|\"]+\\s-|
|000016a0| 2b 5c 5c 29 3f 22 20 22 | 5c 5c 28 5b 61 2d 7a 41 |+\\)?" "|\\([a-zA|
|000016b0| 2d 5a 30 2d 39 5f 2a 26 | 3c 2c 3e 5d 2b 5c 5c 73 |-Z0-9_*&|<,>]+\\s|
|000016c0| 2d 2b 5c 5c 29 3f 22 20 | 22 5c 5c 28 5c 5c 28 5b |-+\\)?" |"\\(\\([|
|000016d0| 61 2d 7a 41 2d 5a 30 2d | 39 5f 7e 3a 3c 2c 3e 2a |a-zA-Z0-|9_~:<,>*|
|000016e0| 5d 5c 5c 7c 5c 5c 28 5c | 5c 73 20 2b 3a 3a 5c 5c |]\\|\\(\|\s +::\\|
|000016f0| 73 20 2b 5c 5c 29 5c 5c | 29 2b 5c 5c 29 22 20 22 |s +\\)\\|)+\\)" "|
|00001700| 5c 5c 28 6f 3f 70 65 72 | 61 74 6f 72 5c 5c 73 20 |\\(o?per|ator\\s |
|00001710| 2a 2e 5b 5e 28 5d 2a 5c | 5c 29 3f 5c 5c 28 5c 5c |*.[^(]*\|\)?\\(\\|
|00001720| 73 2d 5c 5c 7c 5c 6e 5c | 5c 29 2a 28 22 20 35 5d |s-\\|\n\|\)*(" 5]|
|00001730| 20 36 29 20 22 5c 0a 45 | 78 70 72 65 73 73 69 6f | 6) "\.E|xpressio|
|00001740| 6e 20 74 6f 20 67 65 74 | 20 43 2b 2b 20 66 75 6e |n to get| C++ fun|
|00001750| 63 74 69 6f 6e 20 6e 61 | 6d 65 73 22 29 0a 28 64 |ction na|mes").(d|
|00001760| 65 66 63 6f 6e 73 74 20 | 66 75 6d 65 2d 66 75 6e |efconst |fume-fun|
|00001770| 63 74 69 6f 6e 2d 6e 61 | 6d 65 2d 72 65 67 65 78 |ction-na|me-regex|
|00001780| 70 2d 66 6f 72 74 72 61 | 6e 20 28 63 6f 6e 63 61 |p-fortra|n (conca|
|00001790| 74 20 22 5e 20 20 20 20 | 20 20 5c 5c 73 2d 2a 22 |t "^ | \\s-*"|
|000017a0| 20 22 2b 5b 61 2d 7a 41 | 2d 5a 30 2d 39 2a 5d 2a | "+[a-zA|-Z0-9*]*|
|000017b0| 5c 5c 73 2d 2a 22 20 22 | 5c 5c 28 5c 6e 20 20 20 |\\s-*" "|\\(\n |
|000017c0| 20 20 5b 5e 20 30 5d 5c | 5c 73 2d 2a 5c 5c 29 2a | [^ 0]\|\s-*\\)*|
|000017d0| 22 20 22 5c 5c 28 65 6e | 74 72 79 5c 5c 7c 45 4e |" "\\(en|try\\|EN|
|000017e0| 54 52 59 5c 5c 7c 66 75 | 6e 63 74 69 6f 6e 5c 5c |TRY\\|fu|nction\\|
|000017f0| 7c 46 55 4e 43 54 49 4f | 4e 5c 5c 7c 73 75 62 72 ||FUNCTIO|N\\|subr|
|00001800| 6f 75 74 69 6e 65 5c 5c | 7c 53 55 42 52 4f 55 54 |outine\\||SUBROUT|
|00001810| 49 4e 45 5c 5c 29 5c 5c | 73 2d 2a 22 20 22 5c 5c |INE\\)\\|s-*" "\\|
|00001820| 28 5c 6e 20 20 20 20 20 | 5b 5e 20 30 5d 5c 5c 73 |(\n |[^ 0]\\s|
|00001830| 2d 2a 5c 5c 29 2a 22 29 | 20 22 5c 0a 45 78 70 72 |-*\\)*")| "\.Expr|
|00001840| 65 73 73 69 6f 6e 20 74 | 6f 20 67 65 74 20 66 6f |ession t|o get fo|
|00001850| 72 74 72 61 6e 20 66 75 | 6e 63 74 69 6f 6e 20 61 |rtran fu|nction a|
|00001860| 6e 64 20 73 75 62 72 6f | 75 74 69 6e 65 20 6e 61 |nd subro|utine na|
|00001870| 6d 65 73 22 29 0a 28 64 | 65 66 63 6f 6e 73 74 20 |mes").(d|efconst |
|00001880| 66 75 6d 65 2d 66 75 6e | 63 74 69 6f 6e 2d 6e 61 |fume-fun|ction-na|
|00001890| 6d 65 2d 72 65 67 65 78 | 70 2d 6d 6f 64 75 6c 61 |me-regex|p-modula|
|000018a0| 20 22 5e 5c 5c 73 2d 2a | 50 52 4f 43 45 44 55 52 | "^\\s-*|PROCEDUR|
|000018b0| 45 5c 5c 73 2d 2b 5b 41 | 2d 5a 61 2d 7a 30 2d 39 |E\\s-+[A|-Za-z0-9|
|000018c0| 5f 2d 5d 2b 22 20 22 5c | 0a 45 78 70 72 65 73 73 |_-]+" "\|.Express|
|000018d0| 69 6f 6e 20 74 6f 20 67 | 65 74 20 4d 6f 64 75 6c |ion to g|et Modul|
|000018e0| 61 20 66 75 6e 63 74 69 | 6f 6e 20 6e 61 6d 65 73 |a functi|on names|
|000018f0| 22 29 0a 28 64 65 66 63 | 6f 6e 73 74 20 66 75 6d |").(defc|onst fum|
|00001900| 65 2d 66 75 6e 63 74 69 | 6f 6e 2d 6e 61 6d 65 2d |e-functi|on-name-|
|00001910| 72 65 67 65 78 70 2d 62 | 61 63 69 73 20 22 6d 6f |regexp-b|acis "mo|
|00001920| 64 75 6c 65 5f 64 65 66 | 69 6e 65 28 21 5c 5c 7c |dule_def|ine(!\\||
|00001930| 64 65 66 69 6e 65 5f 63 | 6f 6e 73 74 61 6e 74 28 |define_c|onstant(|
|00001940| 21 5c 5c 7c 73 79 73 5f | 73 79 73 64 65 66 69 6e |!\\|sys_|sysdefin|
|00001950| 65 28 21 5c 5c 7c 3c 3c | 64 62 67 69 64 20 2b 5c |e(!\\|<<|dbgid +\|
|00001960| 5c 73 2d 2a 22 20 22 5c | 0a 45 78 70 72 65 73 73 |\s-*" "\|.Express|
|00001970| 69 6f 6e 20 74 6f 20 67 | 65 74 20 42 61 63 69 73 |ion to g|et Bacis|
|00001980| 32 20 66 75 6e 63 74 69 | 6f 6e 20 6e 61 6d 65 73 |2 functi|on names|
|00001990| 22 29 0a 28 64 65 66 76 | 61 72 20 66 75 6d 65 2d |").(defv|ar fume-|
|000019a0| 66 75 6e 63 74 69 6f 6e | 2d 6e 61 6d 65 2d 72 65 |function|-name-re|
|000019b0| 67 65 78 70 2d 6d 61 70 | 6c 65 20 22 5e 5b 20 09 |gexp-map|le "^[ .|
|000019c0| 5d 2a 5b 61 2d 7a 41 2d | 5a 30 2d 39 5f 5d 2b 5b |]*[a-zA-|Z0-9_]+[|
|000019d0| 20 09 5d 2a 3a 3d 5b 20 | 09 5d 2a 70 72 6f 63 5b | .]*:=[ |.]*proc[|
|000019e0| 20 09 5d 2a 28 22 20 22 | 5c 0a 45 78 70 72 65 73 | .]*(" "|\.Expres|
|000019f0| 73 69 6f 6e 20 74 6f 20 | 67 65 74 20 6d 61 70 6c |sion to |get mapl|
|00001a00| 65 20 66 75 6e 63 74 69 | 6f 6e 2f 70 72 6f 63 65 |e functi|on/proce|
|00001a10| 64 75 72 65 20 6e 61 6d | 65 73 22 29 0a 28 64 65 |dure nam|es").(de|
|00001a20| 66 63 6f 6e 73 74 20 66 | 75 6d 65 2d 66 75 6e 63 |fconst f|ume-func|
|00001a30| 74 69 6f 6e 2d 6e 61 6d | 65 2d 72 65 67 65 78 70 |tion-nam|e-regexp|
|00001a40| 2d 74 63 6c 20 28 63 6f | 6e 73 20 22 5e 5c 5c 73 |-tcl (co|ns "^\\s|
|00001a50| 20 2a 70 72 6f 63 5c 5c | 73 20 2b 5c 5c 28 5c 5c | *proc\\|s +\\(\\|
|00001a60| 53 2d 2b 5c 5c 29 5c 5c | 73 20 2a 7b 22 20 31 29 |S-+\\)\\|s *{" 1)|
|00001a70| 20 22 5c 0a 45 78 70 72 | 65 73 73 69 6f 6e 20 74 | "\.Expr|ession t|
|00001a80| 6f 20 67 65 74 20 54 63 | 6c 20 66 75 6e 63 74 69 |o get Tc|l functi|
|00001a90| 6f 6e 20 4e 61 6d 65 73 | 22 29 0a 28 64 65 66 63 |on Names|").(defc|
|00001aa0| 6f 6e 73 74 20 66 75 6d | 65 2d 66 75 6e 63 74 69 |onst fum|e-functi|
|00001ab0| 6f 6e 2d 6e 61 6d 65 2d | 72 65 67 65 78 70 2d 70 |on-name-|regexp-p|
|00001ac0| 65 72 6c 20 22 5e 73 75 | 62 5b 20 09 5d 2b 5c 5c |erl "^su|b[ .]+\\|
|00001ad0| 28 5b 41 2d 5a 61 2d 7a | 30 2d 39 5f 5d 2b 5c 5c |([A-Za-z|0-9_]+\\|
|00001ae0| 29 22 20 22 5c 0a 45 78 | 70 72 65 73 73 69 6f 6e |)" "\.Ex|pression|
|00001af0| 20 74 6f 20 67 65 74 20 | 50 65 72 6c 20 66 75 6e | to get |Perl fun|
|00001b00| 63 74 69 6f 6e 20 4e 61 | 6d 65 73 22 29 0a 28 64 |ction Na|mes").(d|
|00001b10| 65 66 63 6f 6e 73 74 20 | 66 75 6d 65 2d 66 75 6e |efconst |fume-fun|
|00001b20| 63 74 69 6f 6e 2d 6e 61 | 6d 65 2d 72 65 67 65 78 |ction-na|me-regex|
|00001b30| 70 2d 70 79 74 68 6f 6e | 20 22 5e 5c 5c 73 2d 2a |p-python| "^\\s-*|
|00001b40| 5c 5c 28 63 6c 61 73 73 | 5c 5c 7c 64 65 66 5c 5c |\\(class|\\|def\\|
|00001b50| 29 2b 5c 5c 73 2d 2a 5c | 5c 28 5b 41 2d 5a 61 2d |)+\\s-*\|\([A-Za-|
|00001b60| 7a 30 2d 39 5f 5d 2b 5c | 5c 29 5c 5c 73 2d 2a 5b |z0-9_]+\|\)\\s-*[|
|00001b70| 28 3a 5d 22 20 22 5c 0a | 45 78 70 72 65 73 73 69 |(:]" "\.|Expressi|
|00001b80| 6f 6e 20 74 6f 20 67 65 | 74 20 50 79 74 68 6f 6e |on to ge|t Python|
|00001b90| 20 63 6c 61 73 73 20 61 | 6e 64 20 66 75 6e 63 74 | class a|nd funct|
|00001ba0| 69 6f 6e 20 6e 61 6d 65 | 73 22 29 0a 28 64 65 66 |ion name|s").(def|
|00001bb0| 63 6f 6e 73 74 20 66 75 | 6d 65 2d 66 75 6e 63 74 |const fu|me-funct|
|00001bc0| 69 6f 6e 2d 6e 61 6d 65 | 2d 72 65 67 65 78 70 2d |ion-name|-regexp-|
|00001bd0| 70 6f 73 74 73 63 72 69 | 70 74 20 22 5e 2f 5b 5e |postscri|pt "^/[^|
|00001be0| 5d 5b 20 09 7b 7d 3c 3e | 5d 2a 22 20 22 5c 0a 45 |][ .{}<>|]*" "\.E|
|00001bf0| 78 70 72 65 73 73 69 6f | 6e 20 74 6f 20 67 65 74 |xpressio|n to get|
|00001c00| 20 70 6f 73 74 73 63 72 | 69 70 74 20 66 75 6e 63 | postscr|ipt func|
|00001c10| 74 69 6f 6e 20 6e 61 6d | 65 73 22 29 0a 28 64 65 |tion nam|es").(de|
|00001c20| 66 63 6f 6e 73 74 20 66 | 75 6d 65 2d 66 75 6e 63 |fconst f|ume-func|
|00001c30| 74 69 6f 6e 2d 6e 61 6d | 65 2d 72 65 67 65 78 70 |tion-nam|e-regexp|
|00001c40| 2d 70 72 6f 6c 6f 67 20 | 22 5e 5b 61 2d 7a 5d 5b |-prolog |"^[a-z][|
|00001c50| 61 2d 7a 41 2d 5a 30 2d | 39 5f 5d 2b 22 20 22 5c |a-zA-Z0-|9_]+" "\|
|00001c60| 0a 45 78 70 72 65 73 73 | 69 6f 6e 20 74 6f 20 67 |.Express|ion to g|
|00001c70| 65 74 20 70 72 6f 6c 6f | 67 20 66 61 63 74 20 61 |et prolo|g fact a|
|00001c80| 6e 64 20 63 6c 61 75 73 | 65 20 6e 61 6d 65 73 22 |nd claus|e names"|
|00001c90| 29 0a 28 64 65 66 63 6f | 6e 73 74 20 66 75 6d 65 |).(defco|nst fume|
|00001ca0| 2d 66 75 6e 63 74 69 6f | 6e 2d 6e 61 6d 65 2d 72 |-functio|n-name-r|
|00001cb0| 65 67 65 78 70 2d 65 68 | 64 6d 20 28 63 6f 6e 63 |egexp-eh|dm (conc|
|00001cc0| 61 74 20 22 5b 41 2d 5a | 61 2d 7a 30 2d 39 5f 5d |at "[A-Z|a-z0-9_]|
|00001cd0| 2a 3a 5b 20 5d 2a 22 20 | 22 5c 5c 28 5b 46 66 5d |*:[ ]*" |"\\([Ff]|
|00001ce0| 5b 55 75 5d 5b 4e 6e 5d | 5b 43 63 5d 5b 54 74 5d |[Uu][Nn]|[Cc][Tt]|
|00001cf0| 5b 49 69 5d 5b 4f 6f 5d | 5b 4e 6e 5d 5c 5c 7c 22 |[Ii][Oo]|[Nn]\\|"|
|00001d00| 20 22 5b 4c 6c 5d 5b 45 | 65 5d 5b 4d 6d 5d 5b 4d | "[Ll][E|e][Mm][M|
|00001d10| 6d 5d 5b 41 61 5d 5c 5c | 7c 22 20 22 5b 41 61 5d |m][Aa]\\||" "[Aa]|
|00001d20| 5b 58 78 5d 5b 49 69 5d | 5b 4f 6f 5d 5b 4d 6d 5d |[Xx][Ii]|[Oo][Mm]|
|00001d30| 5c 5c 7c 22 20 22 5b 50 | 70 5d 5b 52 72 5d 5b 4f |\\|" "[P|p][Rr][O|
|00001d40| 6f 5d 5b 56 76 5d 5b 45 | 65 5d 5c 5c 7c 22 20 22 |o][Vv][E|e]\\|" "|
|00001d50| 5b 54 74 5d 5b 48 68 5d | 5b 45 65 5d 5b 4f 6f 5d |[Tt][Hh]|[Ee][Oo]|
|00001d60| 5b 52 72 5d 5b 45 65 5d | 5b 4d 6d 5d 22 20 22 5c |[Rr][Ee]|[Mm]" "\|
|00001d70| 5c 29 22 29 20 22 5c 0a | 2a 45 78 70 72 65 73 73 |\)") "\.|*Express|
|00001d80| 69 6f 6e 20 74 6f 20 67 | 65 74 20 45 68 64 6d 20 |ion to g|et Ehdm |
|00001d90| 66 75 6e 63 74 69 6f 6e | 2c 20 74 68 65 6f 72 65 |function|, theore|
|00001da0| 6d 73 2c 20 61 78 69 6f | 6d 73 2c 20 6c 65 6d 6d |ms, axio|ms, lemm|
|00001db0| 61 73 2c 20 61 6e 64 20 | 70 72 6f 6f 66 73 2e 22 |as, and |proofs."|
|00001dc0| 29 0a 28 64 65 66 63 6f | 6e 73 74 20 66 75 6d 65 |).(defco|nst fume|
|00001dd0| 2d 66 75 6e 63 74 69 6f | 6e 2d 6e 61 6d 65 2d 72 |-functio|n-name-r|
|00001de0| 65 67 65 78 70 2d 70 76 | 73 20 28 63 6f 6e 63 61 |egexp-pv|s (conca|
|00001df0| 74 20 22 5c 5c 28 5b 41 | 2d 5a 61 2d 7a 30 2d 39 |t "\\([A|-Za-z0-9|
|00001e00| 5f 5d 2a 3a 5b 20 5d 2a | 22 20 22 5c 5c 28 5b 46 |_]*:[ ]*|" "\\([F|
|00001e10| 66 5d 5b 55 75 5d 5b 4e | 6e 5d 5b 43 63 5d 5b 54 |f][Uu][N|n][Cc][T|
|00001e20| 74 5d 5b 49 69 5d 5b 4f | 6f 5d 5b 4e 6e 5d 5c 5c |t][Ii][O|o][Nn]\\|
|00001e30| 7c 22 20 22 5b 4c 6c 5d | 5b 45 65 5d 5b 4d 6d 5d ||" "[Ll]|[Ee][Mm]|
|00001e40| 5b 4d 6d 5d 5b 41 61 5d | 5c 5c 7c 22 20 22 5b 41 |[Mm][Aa]|\\|" "[A|
|00001e50| 61 5d 5b 58 78 5d 5b 49 | 69 5d 5b 4f 6f 5d 5b 4d |a][Xx][I|i][Oo][M|
|00001e60| 6d 5d 5c 5c 7c 22 20 22 | 5b 54 74 5d 5b 48 68 5d |m]\\|" "|[Tt][Hh]|
|00001e70| 5b 45 65 5d 5b 4f 6f 5d | 5b 52 72 5d 5b 45 65 5d |[Ee][Oo]|[Rr][Ee]|
|00001e80| 5b 4d 6d 5d 5c 5c 7c 22 | 20 22 5b 46 66 5d 5b 4f |[Mm]\\|"| "[Ff][O|
|00001e90| 72 5d 5b 52 72 5d 5b 4d | 6d 5d 5b 55 75 5d 5b 4c |r][Rr][M|m][Uu][L|
|00001ea0| 61 5d 5b 41 61 5d 22 20 | 22 5c 5c 7c 22 20 22 5c |a][Aa]" |"\\|" "\|
|00001eb0| 5c 5b 2e 2a 5c 5c 5d 22 | 20 22 5c 5c 29 5c 5c 29 |\[.*\\]"| "\\)\\)|
|00001ec0| 5c 5c 7c 22 20 22 5b 41 | 2d 5a 61 2d 7a 30 2d 39 |\\|" "[A|-Za-z0-9|
|00001ed0| 5f 5d 2a 28 2e 2a 29 5b | 20 5d 2a 3a 22 29 20 22 |_]*(.*)[| ]*:") "|
|00001ee0| 5c 0a 2a 45 78 70 72 65 | 73 73 69 6f 6e 20 74 6f |\.*Expre|ssion to|
|00001ef0| 20 67 65 74 20 50 56 53 | 20 66 75 6e 63 74 69 6f | get PVS| functio|
|00001f00| 6e 73 2c 20 74 68 65 6f | 72 65 6d 73 2c 20 61 78 |ns, theo|rems, ax|
|00001f10| 69 6f 6d 73 2c 20 6c 65 | 6d 6d 61 73 22 29 0a 28 |ioms, le|mmas").(|
|00001f20| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 c1 21 ac 82 |byte-cod|e "..!..|
|00001f30| c2 11 c3 c1 21 88 c4 c1 | c5 c6 23 88 c0 c7 21 ac |....!...|..#...!.|
|00001f40| 83 c2 16 07 c3 c7 21 88 | c4 c7 c5 c6 23 88 c0 c8 |......!.|....#...|
|00001f50| 21 ac 83 c2 16 08 c3 c8 | 21 88 c4 c8 c5 c6 23 88 |!.......|!.....#.|
|00001f60| c0 c9 21 ac 83 c2 16 09 | c3 c9 21 88 c4 c9 c5 c6 |..!.....|..!.....|
|00001f70| 23 88 ca cb 4d 88 cc cd | 4d 88 ce cf cc 5c 22 88 |#...M...|M....\".|
|00001f80| ce d0 cc 5c 22 88 ce d1 | cc 5c 22 88 ce d2 cc 5c |...\"...|.\"....\|
|00001f90| 22 87 22 20 5b 62 6f 75 | 6e 64 70 20 66 75 6d 65 |"." [bou|ndp fume|
|00001fa0| 2d 74 65 78 2d 63 68 61 | 70 74 65 72 20 30 20 6d |-tex-cha|pter 0 m|
|00001fb0| 61 6b 65 2d 76 61 72 69 | 61 62 6c 65 2d 62 75 66 |ake-vari|able-buf|
|00001fc0| 66 65 72 2d 6c 6f 63 61 | 6c 20 70 75 74 20 70 65 |fer-loca|l put pe|
|00001fd0| 72 6d 61 6e 65 6e 74 2d | 6c 6f 63 61 6c 20 74 20 |rmanent-|local t |
|00001fe0| 66 75 6d 65 2d 74 65 78 | 2d 73 65 63 74 69 6f 6e |fume-tex|-section|
|00001ff0| 20 66 75 6d 65 2d 74 65 | 78 2d 73 75 62 73 65 63 | fume-te|x-subsec|
|00002000| 74 69 6f 6e 20 66 75 6d | 65 2d 74 65 78 2d 73 75 |tion fum|e-tex-su|
|00002010| 62 73 75 62 73 65 63 74 | 69 6f 6e 20 66 75 6d 65 |bsubsect|ion fume|
|00002020| 2d 74 65 78 2d 72 65 73 | 63 61 6e 2d 62 75 66 66 |-tex-res|can-buff|
|00002030| 65 72 2d 68 6f 6f 6b 20 | 23 5b 6e 69 6c 20 22 c0 |er-hook |#[nil ".|
|00002040| 11 c0 12 c0 13 c0 89 14 | 87 22 20 5b 30 20 66 75 |........|." [0 fu|
|00002050| 6d 65 2d 74 65 78 2d 63 | 68 61 70 74 65 72 20 66 |me-tex-c|hapter f|
|00002060| 75 6d 65 2d 74 65 78 2d | 73 65 63 74 69 6f 6e 20 |ume-tex-|section |
|00002070| 66 75 6d 65 2d 74 65 78 | 2d 73 75 62 73 65 63 74 |fume-tex|-subsect|
|00002080| 69 6f 6e 20 66 75 6d 65 | 2d 74 65 78 2d 73 75 62 |ion fume|-tex-sub|
|00002090| 73 75 62 73 65 63 74 69 | 6f 6e 5d 20 32 5d 20 66 |subsecti|on] 2] f|
|000020a0| 75 6d 65 2d 74 77 65 61 | 6b 2d 74 65 78 2d 6d 6f |ume-twea|k-tex-mo|
|000020b0| 64 65 20 23 5b 6e 69 6c | 20 22 c0 11 c2 c3 c4 5c |de #[nil| ".....\|
|000020c0| 22 87 22 20 5b 6e 69 6c | 20 66 75 6d 65 2d 73 6f |"." [nil| fume-so|
|000020d0| 72 74 2d 66 75 6e 63 74 | 69 6f 6e 20 61 64 64 2d |rt-funct|ion add-|
|000020e0| 68 6f 6f 6b 20 66 75 6d | 65 2d 72 65 73 63 61 6e |hook fum|e-rescan|
|000020f0| 2d 62 75 66 66 65 72 2d | 68 6f 6f 6b 20 66 75 6d |-buffer-|hook fum|
|00002100| 65 2d 74 65 78 2d 72 65 | 73 63 61 6e 2d 62 75 66 |e-tex-re|scan-buf|
|00002110| 66 65 72 2d 68 6f 6f 6b | 5d 20 33 5d 20 61 64 64 |fer-hook|] 3] add|
|00002120| 2d 68 6f 6f 6b 20 74 65 | 78 2d 6d 6f 64 65 2d 68 |-hook te|x-mode-h|
|00002130| 6f 6f 6b 20 54 65 58 2d | 6d 6f 64 65 2d 68 6f 6f |ook TeX-|mode-hoo|
|00002140| 6b 20 6c 61 74 65 78 2d | 6d 6f 64 65 2d 68 6f 6f |k latex-|mode-hoo|
|00002150| 6b 20 4c 61 54 65 58 2d | 6d 6f 64 65 2d 68 6f 6f |k LaTeX-|mode-hoo|
|00002160| 6b 5d 20 34 29 0a 28 64 | 65 66 63 6f 6e 73 74 20 |k] 4).(d|efconst |
|00002170| 66 75 6d 65 2d 73 65 63 | 74 69 6f 6e 2d 6e 61 6d |fume-sec|tion-nam|
|00002180| 65 2d 72 65 67 65 78 70 | 2d 6c 61 74 65 78 20 28 |e-regexp|-latex (|
|00002190| 63 6f 6e 63 61 74 20 22 | 5e 5c 5c 73 2d 2a 5c 5c |concat "|^\\s-*\\|
|000021a0| 5c 5c 5c 5c 28 22 20 22 | 5c 5c 28 73 75 62 5c 5c |\\\\(" "|\\(sub\\|
|000021b0| 29 2a 73 65 63 74 69 6f | 6e 5c 5c 7c 63 68 61 70 |)*sectio|n\\|chap|
|000021c0| 74 65 72 5c 5c 29 22 20 | 22 5c 5c 2a 3f 5c 5c 28 |ter\\)" |"\\*?\\(|
|000021d0| 5c 5c 5b 5b 5e 5d 5d 2a | 5c 5c 5d 5c 5c 29 3f 7b |\\[[^]]*|\\]\\)?{|
|000021e0| 5c 5c 28 5b 5e 7d 5d 2a | 5c 5c 29 7d 22 29 20 22 |\\([^}]*|\\)}") "|
|000021f0| 5c 0a 45 78 70 72 65 73 | 73 69 6f 6e 20 74 6f 20 |\.Expres|sion to |
|00002200| 67 65 74 20 6c 61 74 65 | 78 20 73 65 63 74 69 6f |get late|x sectio|
|00002210| 6e 20 6e 61 6d 65 73 22 | 29 0a 28 64 65 66 63 6f |n names"|).(defco|
|00002220| 6e 73 74 20 66 75 6d 65 | 2d 66 75 6e 63 74 69 6f |nst fume|-functio|
|00002230| 6e 2d 6e 61 6d 65 2d 72 | 65 67 65 78 70 2d 6b 73 |n-name-r|egexp-ks|
|00002240| 68 20 28 63 6f 6e 63 61 | 74 20 22 5c 5c 28 5e 5c |h (conca|t "\\(^\|
|00002250| 5c 73 2d 2a 66 75 6e 63 | 74 69 6f 6e 5c 5c 73 2d |\s-*func|tion\\s-|
|00002260| 2b 5b 41 2d 5a 61 2d 7a | 5f 5d 5b 41 2d 5a 61 2d |+[A-Za-z|_][A-Za-|
|00002270| 7a 5f 30 2d 39 5d 2a 5c | 5c 29 22 20 22 5c 5c 7c |z_0-9]*\|\)" "\\||
|00002280| 22 20 22 5c 5c 28 5e 5c | 5c 73 2d 2a 5b 41 2d 5a |" "\\(^\|\s-*[A-Z|
|00002290| 61 2d 7a 5f 5d 5b 41 2d | 5a 61 2d 7a 5f 30 2d 39 |a-z_][A-|Za-z_0-9|
|000022a0| 5d 2a 5c 5c 73 2d 2a 28 | 29 5c 5c 29 22 29 20 22 |]*\\s-*(|)\\)") "|
|000022b0| 5c 0a 45 78 70 72 65 73 | 73 69 6f 6e 20 74 6f 20 |\.Expres|sion to |
|000022c0| 67 65 74 20 6b 73 68 20 | 66 75 6e 63 74 69 6f 6e |get ksh |function|
|000022d0| 20 6e 61 6d 65 73 22 29 | 0a 28 64 65 66 63 6f 6e | names")|.(defcon|
|000022e0| 73 74 20 66 75 6d 65 2d | 66 75 6e 63 74 69 6f 6e |st fume-|function|
|000022f0| 2d 6e 61 6d 65 2d 72 65 | 67 65 78 70 2d 73 63 68 |-name-re|gexp-sch|
|00002300| 65 6d 65 20 22 5e 28 64 | 65 66 69 6e 65 20 5b 20 |eme "^(d|efine [ |
|00002310| 5d 2a 22 20 22 5c 0a 45 | 78 70 72 65 73 73 69 6f |]*" "\.E|xpressio|
|00002320| 6e 20 74 6f 20 67 65 74 | 20 53 63 68 65 6d 65 20 |n to get| Scheme |
|00002330| 66 75 6e 63 74 69 6f 6e | 20 6e 61 6d 65 73 22 29 |function| names")|
|00002340| 0a 28 64 65 66 63 6f 6e | 73 74 20 66 75 6d 65 2d |.(defcon|st fume-|
|00002350| 66 75 6e 63 74 69 6f 6e | 2d 6e 61 6d 65 2d 72 65 |function|-name-re|
|00002360| 67 65 78 70 2d 62 69 62 | 74 65 78 20 22 5e 40 5b |gexp-bib|tex "^@[|
|00002370| 41 2d 5a 61 2d 7a 5d 2a | 5b 28 7b 5d 5c 5c 28 5b |A-Za-z]*|[({]\\([|
|00002380| 41 2d 5a 61 2d 7a 30 2d | 39 3a 3b 26 2d 5d 2a 5c |A-Za-z0-|9:;&-]*\|
|00002390| 5c 29 2c 22 20 22 5c 0a | 45 78 70 72 65 73 73 69 |\)," "\.|Expressi|
|000023a0| 6f 6e 20 74 6f 20 67 65 | 74 20 62 69 62 74 65 78 |on to ge|t bibtex|
|000023b0| 20 63 69 74 61 74 69 6f | 6e 20 68 65 61 64 65 72 | citatio|n header|
|000023c0| 73 2e 22 29 0a 28 64 65 | 66 63 6f 6e 73 74 20 66 |s.").(de|fconst f|
|000023d0| 75 6d 65 2d 66 75 6e 63 | 74 69 6f 6e 2d 6e 61 6d |ume-func|tion-nam|
|000023e0| 65 2d 72 65 67 65 78 70 | 2d 73 67 6d 6c 20 22 3c |e-regexp|-sgml "<|
|000023f0| 21 5c 5c 28 65 6c 65 6d | 65 6e 74 5c 5c 7c 65 6e |!\\(elem|ent\\|en|
|00002400| 74 69 74 79 5c 5c 29 5b | 20 09 5c 6e 5d 2b 25 3f |tity\\)[| .\n]+%?|
|00002410| 5b 20 09 5c 6e 5d 2a 5c | 5c 28 5b 41 2d 5a 61 2d |[ .\n]*\|\([A-Za-|
|00002420| 7a 5d 5b 2d 41 2d 5a 61 | 2d 7a 2e 30 2d 39 5d 2a |z][-A-Za|-z.0-9]*|
|00002430| 5c 5c 29 22 20 22 5c 0a | 45 78 70 72 65 73 73 69 |\\)" "\.|Expressi|
|00002440| 6f 6e 20 74 6f 20 66 69 | 6e 64 20 64 65 63 6c 61 |on to fi|nd decla|
|00002450| 72 61 74 69 6f 6e 20 6f | 66 20 53 47 4d 4c 20 65 |ration o|f SGML e|
|00002460| 6c 65 6d 65 6e 74 20 6f | 72 20 65 6e 74 69 74 79 |lement o|r entity|
|00002470| 22 29 0a 28 64 65 66 63 | 6f 6e 73 74 20 66 75 6d |").(defc|onst fum|
|00002480| 65 2d 66 75 6e 63 74 69 | 6f 6e 2d 6e 61 6d 65 2d |e-functi|on-name-|
|00002490| 72 65 67 65 78 70 2d 61 | 64 61 20 28 63 6f 6e 73 |regexp-a|da (cons|
|000024a0| 20 22 5e 5b 20 09 5d 2a | 5c 5c 28 70 72 6f 63 65 | "^[ .]*|\\(proce|
|000024b0| 64 75 72 65 5c 5c 7c 50 | 52 4f 43 45 44 55 52 45 |dure\\|P|ROCEDURE|
|000024c0| 5c 5c 7c 66 75 6e 63 74 | 69 6f 6e 5c 5c 7c 46 55 |\\|funct|ion\\|FU|
|000024d0| 4e 43 54 49 4f 4e 5c 5c | 29 5b 20 5c 6e 09 5d 2b |NCTION\\|)[ \n.]+|
|000024e0| 5c 5c 28 5b 61 2d 7a 41 | 2d 5a 30 2d 39 5f 5d 2b |\\([a-zA|-Z0-9_]+|
|000024f0| 5c 5c 7c 5c 22 5b 5e 5c | 22 5d 5c 22 5c 5c 29 22 |\\|\"[^\|"]\"\\)"|
|00002500| 20 32 29 20 22 5c 0a 45 | 78 70 72 65 73 73 69 6f | 2) "\.E|xpressio|
|00002510| 6e 20 74 6f 20 66 69 6e | 64 20 64 65 63 6c 61 72 |n to fin|d declar|
|00002520| 61 74 69 6f 6e 20 6f 66 | 20 41 64 61 20 66 75 6e |ation of| Ada fun|
|00002530| 63 74 69 6f 6e 22 29 0a | 28 64 65 66 63 6f 6e 73 |ction").|(defcons|
|00002540| 74 20 66 75 6d 65 2d 66 | 75 6e 63 74 69 6f 6e 2d |t fume-f|unction-|
|00002550| 6e 61 6d 65 2d 72 65 67 | 65 78 70 2d 61 64 61 2d |name-reg|exp-ada-|
|00002560| 69 67 6e 6f 72 65 20 22 | 5b 20 5c 6e 09 5d 2a 5c |ignore "|[ \n.]*\|
|00002570| 5c 28 28 5b 5e 28 29 5d | 2b 29 5b 20 5c 6e 09 5d |\(([^()]|+)[ \n.]|
|00002580| 2a 5c 5c 29 3f 5c 5c 28 | 72 65 74 75 72 6e 5b 20 |*\\)?\\(|return[ |
|00002590| 09 5c 6e 5d 2b 5b 5e 20 | 09 5c 6e 3b 5d 2b 5b 20 |.\n]+[^ |.\n;]+[ |
|000025a0| 5c 6e 09 5d 2a 5c 5c 29 | 3f 5c 5c 28 3b 5c 5c 7c |\n.]*\\)|?\\(;\\||
|000025b0| 69 73 5b 20 5c 6e 09 5d | 2b 6e 65 77 5b 20 5c 6e |is[ \n.]|+new[ \n|
|000025c0| 09 5d 5c 5c 7c 72 65 6e | 61 6d 65 73 5c 5c 29 22 |.]\\|ren|ames\\)"|
|000025d0| 20 22 5c 0a 69 67 6e 6f | 72 65 20 69 66 20 61 64 | "\.igno|re if ad|
|000025e0| 61 20 66 75 6e 63 74 69 | 6f 6e 20 6e 61 6d 65 20 |a functi|on name |
|000025f0| 6d 61 74 63 68 65 73 20 | 74 68 69 73 20 73 74 72 |matches |this str|
|00002600| 69 6e 67 22 29 0a 28 64 | 65 66 63 6f 6e 73 74 20 |ing").(d|efconst |
|00002610| 66 75 6d 65 2d 66 75 6e | 63 74 69 6f 6e 2d 6e 61 |fume-fun|ction-na|
|00002620| 6d 65 2d 72 65 67 65 78 | 70 2d 6d 61 6b 65 20 22 |me-regex|p-make "|
|00002630| 5e 5c 5c 28 5c 5c 28 5c | 5c 24 5c 5c 73 28 5c 5c |^\\(\\(\|\$\\s(\\|
|00002640| 29 3f 5c 5c 28 5c 5c 77 | 5c 5c 7c 5c 5c 2e 5c 5c |)?\\(\\w|\\|\\.\\|
|00002650| 29 2b 5c 5c 28 3a 73 68 | 5c 5c 29 3f 5c 5c 28 5c |)+\\(:sh|\\)?\\(\|
|00002660| 5c 73 29 5c 5c 29 3f 5c | 5c 29 5c 5c 73 20 2a 5c |\s)\\)?\|\)\\s *\|
|00002670| 5c 28 3a 3a 3f 5c 5c 7c | 5c 5c 2b 3f 3d 5c 5c 29 |\(::?\\||\\+?=\\)|
|00002680| 22 20 22 5c 0a 45 78 70 | 72 65 73 73 69 6f 6e 20 |" "\.Exp|ression |
|00002690| 74 6f 20 67 65 74 20 6d | 61 6b 65 66 69 6c 65 20 |to get m|akefile |
|000026a0| 74 61 72 67 65 74 20 6e | 61 6d 65 73 22 29 0a 28 |target n|ames").(|
|000026b0| 61 64 64 2d 68 6f 6f 6b | 20 27 6d 61 6b 65 66 69 |add-hook| 'makefi|
|000026c0| 6c 65 2d 6d 6f 64 65 2d | 68 6f 6f 6b 20 27 66 75 |le-mode-|hook 'fu|
|000026d0| 6d 65 2d 61 64 64 2d 6d | 65 6e 75 62 61 72 2d 65 |me-add-m|enubar-e|
|000026e0| 6e 74 72 79 29 0a 28 64 | 65 66 63 6f 6e 73 74 20 |ntry).(d|efconst |
|000026f0| 66 75 6d 65 2d 66 75 6e | 63 74 69 6f 6e 2d 6e 61 |fume-fun|ction-na|
|00002700| 6d 65 2d 72 65 67 65 78 | 70 2d 64 69 72 65 64 20 |me-regex|p-dired |
|00002710| 22 5e 2e 20 2b 64 2e 2a | 5c 5c 28 4a 61 6e 5c 5c |"^. +d.*|\\(Jan\\|
|00002720| 7c 46 65 62 5c 5c 7c 4d | 61 72 5c 5c 7c 41 70 72 ||Feb\\|M|ar\\|Apr|
|00002730| 5c 5c 7c 4d 61 79 5c 5c | 7c 4a 75 6e 5c 5c 7c 4a |\\|May\\||Jun\\|J|
|00002740| 75 6c 5c 5c 7c 41 75 67 | 5c 5c 7c 53 65 70 5c 5c |ul\\|Aug|\\|Sep\\|
|00002750| 7c 4f 63 74 5c 5c 7c 4e | 6f 76 5c 5c 7c 44 65 63 ||Oct\\|N|ov\\|Dec|
|00002760| 5c 5c 29 20 2b 5b 30 2d | 39 5d 2b 20 2b 5b 30 2d |\\) +[0-|9]+ +[0-|
|00002770| 39 3a 5d 2b 20 5c 5c 28 | 2e 2a 5c 5c 29 24 22 20 |9:]+ \\(|.*\\)$" |
|00002780| 22 5c 0a 45 78 70 72 65 | 73 73 69 6f 6e 20 74 6f |"\.Expre|ssion to|
|00002790| 20 67 65 74 20 64 69 72 | 65 63 74 6f 72 79 20 6e | get dir|ectory n|
|000027a0| 61 6d 65 73 22 29 0a 28 | 64 65 66 63 6f 6e 73 74 |ames").(|defconst|
|000027b0| 20 66 75 6d 65 2d 66 75 | 6e 63 74 69 6f 6e 2d 6e | fume-fu|nction-n|
|000027c0| 61 6d 65 2d 72 65 67 65 | 78 70 2d 70 61 73 63 61 |ame-rege|xp-pasca|
|000027d0| 6c 20 22 5e 5c 5c 28 66 | 75 6e 63 74 69 6f 6e 5c |l "^\\(f|unction\|
|000027e0| 5c 7c 70 72 6f 63 65 64 | 75 72 65 5c 5c 29 5b 20 |\|proced|ure\\)[ |
|000027f0| 09 5d 2b 5c 5c 28 5b 5f | 61 2d 7a 41 2d 5a 5d 5b |.]+\\([_|a-zA-Z][|
|00002800| 5f 61 2d 7a 41 2d 5a 30 | 2d 39 5d 2a 5c 5c 29 22 |_a-zA-Z0|-9]*\\)"|
|00002810| 20 22 5c 0a 45 78 70 72 | 65 73 73 69 6f 6e 20 74 | "\.Expr|ession t|
|00002820| 6f 20 67 65 74 20 66 75 | 6e 63 74 69 6f 6e 2f 70 |o get fu|nction/p|
|00002830| 72 6f 63 65 64 75 72 65 | 20 6e 61 6d 65 73 20 69 |rocedure| names i|
|00002840| 6e 20 70 61 73 63 61 6c | 2e 22 29 0a 28 64 65 66 |n pascal|.").(def|
|00002850| 63 6f 6e 73 74 20 66 75 | 6d 65 2d 66 75 6e 63 74 |const fu|me-funct|
|00002860| 69 6f 6e 2d 6e 61 6d 65 | 2d 72 65 67 65 78 70 2d |ion-name|-regexp-|
|00002870| 66 61 6d 65 20 22 5e 5c | 5c 28 66 75 6e 63 74 69 |fame "^\|\(functi|
|00002880| 6f 6e 5c 5c 7c 70 72 6f | 63 65 64 75 72 65 5c 5c |on\\|pro|cedure\\|
|00002890| 29 5b 20 09 5d 2b 5c 5c | 28 5b 23 5c 5c 24 25 5f |)[ .]+\\|([#\\$%_|
|000028a0| 61 2d 7a 41 2d 5a 5d 5b | 23 5c 5c 24 25 5f 61 2d |a-zA-Z][|#\\$%_a-|
|000028b0| 7a 41 2d 5a 30 2d 39 5d | 2a 5c 5c 29 22 20 22 5c |zA-Z0-9]|*\\)" "\|
|000028c0| 0a 45 78 70 72 65 73 73 | 69 6f 6e 20 74 6f 20 67 |.Express|ion to g|
|000028d0| 65 74 20 66 75 6e 63 74 | 69 6f 6e 2f 70 72 6f 63 |et funct|ion/proc|
|000028e0| 65 64 75 72 65 20 6e 61 | 6d 65 73 20 69 6e 20 66 |edure na|mes in f|
|000028f0| 61 6d 65 2e 22 29 0a 28 | 64 65 66 63 6f 6e 73 74 |ame.").(|defconst|
|00002900| 20 66 75 6d 65 2d 66 75 | 6e 63 74 69 6f 6e 2d 6e | fume-fu|nction-n|
|00002910| 61 6d 65 2d 72 65 67 65 | 78 70 2d 76 65 72 69 6c |ame-rege|xp-veril|
|00002920| 6f 67 20 22 5e 5c 5c 28 | 74 61 73 6b 5c 5c 7c 66 |og "^\\(|task\\|f|
|00002930| 75 6e 63 74 69 6f 6e 5c | 5c 7c 6d 6f 64 75 6c 65 |unction\|\|module|
|00002940| 5c 5c 7c 70 72 69 6d 69 | 74 69 76 65 5c 5c 29 5b |\\|primi|tive\\)[|
|00002950| 20 09 5d 2b 5c 5c 28 5b | 41 2d 5a 61 2d 7a 30 2d | .]+\\([|A-Za-z0-|
|00002960| 39 5f 2b 2d 5d 2a 5c 5c | 29 5b 20 09 5d 2a 28 3f |9_+-]*\\|)[ .]*(?|
|00002970| 22 20 22 5c 0a 45 78 70 | 72 65 73 73 69 6f 6e 20 |" "\.Exp|ression |
|00002980| 74 6f 20 67 65 74 20 76 | 65 72 69 6c 6f 67 20 6d |to get v|erilog m|
|00002990| 6f 64 75 6c 65 20 6e 61 | 6d 65 73 22 29 0a 28 64 |odule na|mes").(d|
|000029a0| 65 66 63 6f 6e 73 74 20 | 66 75 6d 65 2d 66 75 6e |efconst |fume-fun|
|000029b0| 63 74 69 6f 6e 2d 6e 61 | 6d 65 2d 72 65 67 65 78 |ction-na|me-regex|
|000029c0| 70 2d 61 73 6d 20 22 5e | 5c 5c 28 5b 61 2d 7a 41 |p-asm "^|\\([a-zA|
|000029d0| 2d 5a 5f 2e 24 5d 5b 61 | 2d 7a 41 2d 5a 30 2d 39 |-Z_.$][a|-zA-Z0-9|
|000029e0| 5f 2e 24 5d 2a 5c 5c 29 | 5b 20 09 5d 2a 3a 22 20 |_.$]*\\)|[ .]*:" |
|000029f0| 22 5c 0a 45 78 70 72 65 | 73 73 69 6f 6e 20 74 6f |"\.Expre|ssion to|
|00002a00| 20 67 65 74 20 61 73 73 | 65 6d 62 6c 79 20 6c 61 | get ass|embly la|
|00002a10| 62 65 6c 20 6e 61 6d 65 | 73 22 29 0a 28 64 65 66 |bel name|s").(def|
|00002a20| 63 6f 6e 73 74 20 66 75 | 6d 65 2d 66 75 6e 63 74 |const fu|me-funct|
|00002a30| 69 6f 6e 2d 6e 61 6d 65 | 2d 72 65 67 65 78 70 2d |ion-name|-regexp-|
|00002a40| 61 6c 69 73 74 20 27 28 | 28 6c 69 73 70 2d 6d 6f |alist '(|(lisp-mo|
|00002a50| 64 65 20 2e 20 66 75 6d | 65 2d 66 75 6e 63 74 69 |de . fum|e-functi|
|00002a60| 6f 6e 2d 6e 61 6d 65 2d | 72 65 67 65 78 70 2d 6c |on-name-|regexp-l|
|00002a70| 69 73 70 29 20 28 65 6d | 61 63 73 2d 6c 69 73 70 |isp) (em|acs-lisp|
|00002a80| 2d 6d 6f 64 65 20 2e 20 | 66 75 6d 65 2d 66 75 6e |-mode . |fume-fun|
|00002a90| 63 74 69 6f 6e 2d 6e 61 | 6d 65 2d 72 65 67 65 78 |ction-na|me-regex|
|00002aa0| 70 2d 6c 69 73 70 29 20 | 28 6c 69 73 70 2d 69 6e |p-lisp) |(lisp-in|
|00002ab0| 74 65 72 61 63 74 69 6f | 6e 2d 6d 6f 64 65 20 2e |teractio|n-mode .|
|00002ac0| 20 66 75 6d 65 2d 66 75 | 6e 63 74 69 6f 6e 2d 6e | fume-fu|nction-n|
|00002ad0| 61 6d 65 2d 72 65 67 65 | 78 70 2d 6c 69 73 70 29 |ame-rege|xp-lisp)|
|00002ae0| 20 28 63 2d 6d 6f 64 65 | 20 2e 20 66 75 6d 65 2d | (c-mode| . fume-|
|00002af0| 66 75 6e 63 74 69 6f 6e | 2d 6e 61 6d 65 2d 72 65 |function|-name-re|
|00002b00| 67 65 78 70 2d 63 29 20 | 28 65 6c 65 63 2d 63 2d |gexp-c) |(elec-c-|
|00002b10| 6d 6f 64 65 20 2e 20 66 | 75 6d 65 2d 66 75 6e 63 |mode . f|ume-func|
|00002b20| 74 69 6f 6e 2d 6e 61 6d | 65 2d 72 65 67 65 78 70 |tion-nam|e-regexp|
|00002b30| 2d 63 29 20 28 63 2b 2b | 2d 63 2d 6d 6f 64 65 20 |-c) (c++|-c-mode |
|00002b40| 2e 20 66 75 6d 65 2d 66 | 75 6e 63 74 69 6f 6e 2d |. fume-f|unction-|
|00002b50| 6e 61 6d 65 2d 72 65 67 | 65 78 70 2d 63 29 20 28 |name-reg|exp-c) (|
|00002b60| 63 2b 2b 2d 6d 6f 64 65 | 20 2e 20 66 75 6d 65 2d |c++-mode| . fume-|
|00002b70| 66 75 6e 63 74 69 6f 6e | 2d 6e 61 6d 65 2d 72 65 |function|-name-re|
|00002b80| 67 65 78 70 2d 63 2b 2b | 29 20 28 66 6f 72 74 72 |gexp-c++|) (fortr|
|00002b90| 61 6e 2d 6d 6f 64 65 20 | 2e 20 66 75 6d 65 2d 66 |an-mode |. fume-f|
|00002ba0| 75 6e 63 74 69 6f 6e 2d | 6e 61 6d 65 2d 72 65 67 |unction-|name-reg|
|00002bb0| 65 78 70 2d 66 6f 72 74 | 72 61 6e 29 20 28 6d 6f |exp-fort|ran) (mo|
|00002bc0| 64 75 6c 61 2d 32 2d 6d | 6f 64 65 20 2e 20 66 75 |dula-2-m|ode . fu|
|00002bd0| 6d 65 2d 66 75 6e 63 74 | 69 6f 6e 2d 6e 61 6d 65 |me-funct|ion-name|
|00002be0| 2d 72 65 67 65 78 70 2d | 6d 6f 64 75 6c 61 29 20 |-regexp-|modula) |
|00002bf0| 28 6d 6f 64 75 6c 61 2d | 33 2d 6d 6f 64 65 20 2e |(modula-|3-mode .|
|00002c00| 20 66 75 6d 65 2d 66 75 | 6e 63 74 69 6f 6e 2d 6e | fume-fu|nction-n|
|00002c10| 61 6d 65 2d 72 65 67 65 | 78 70 2d 6d 6f 64 75 6c |ame-rege|xp-modul|
|00002c20| 61 29 20 28 62 61 63 69 | 73 2d 6d 6f 64 65 20 2e |a) (baci|s-mode .|
|00002c30| 20 66 75 6d 65 2d 66 75 | 6e 63 74 69 6f 6e 2d 6e | fume-fu|nction-n|
|00002c40| 61 6d 65 2d 72 65 67 65 | 78 70 2d 62 61 63 69 73 |ame-rege|xp-bacis|
|00002c50| 29 20 28 6d 61 70 6c 65 | 2d 6d 6f 64 65 20 2e 20 |) (maple|-mode . |
|00002c60| 66 75 6d 65 2d 66 75 6e | 63 74 69 6f 6e 2d 6e 61 |fume-fun|ction-na|
|00002c70| 6d 65 2d 72 65 67 65 78 | 70 2d 6d 61 70 6c 65 29 |me-regex|p-maple)|
|00002c80| 20 28 70 65 72 6c 2d 6d | 6f 64 65 20 2e 20 66 75 | (perl-m|ode . fu|
|00002c90| 6d 65 2d 66 75 6e 63 74 | 69 6f 6e 2d 6e 61 6d 65 |me-funct|ion-name|
|00002ca0| 2d 72 65 67 65 78 70 2d | 70 65 72 6c 29 20 28 61 |-regexp-|perl) (a|
|00002cb0| 6c 69 63 65 2d 6d 6f 64 | 65 20 2e 20 66 75 6d 65 |lice-mod|e . fume|
|00002cc0| 2d 66 75 6e 63 74 69 6f | 6e 2d 6e 61 6d 65 2d 72 |-functio|n-name-r|
|00002cd0| 65 67 65 78 70 2d 70 79 | 74 68 6f 6e 29 20 28 70 |egexp-py|thon) (p|
|00002ce0| 79 74 68 6f 6e 2d 6d 6f | 64 65 20 2e 20 66 75 6d |ython-mo|de . fum|
|00002cf0| 65 2d 66 75 6e 63 74 69 | 6f 6e 2d 6e 61 6d 65 2d |e-functi|on-name-|
|00002d00| 72 65 67 65 78 70 2d 70 | 79 74 68 6f 6e 29 20 28 |regexp-p|ython) (|
|00002d10| 70 6f 73 74 73 63 72 69 | 70 74 2d 6d 6f 64 65 20 |postscri|pt-mode |
|00002d20| 2e 20 66 75 6d 65 2d 66 | 75 6e 63 74 69 6f 6e 2d |. fume-f|unction-|
|00002d30| 6e 61 6d 65 2d 72 65 67 | 65 78 70 2d 70 6f 73 74 |name-reg|exp-post|
|00002d40| 73 63 72 69 70 74 29 20 | 28 70 72 6f 6c 6f 67 2d |script) |(prolog-|
|00002d50| 6d 6f 64 65 20 2e 20 66 | 75 6d 65 2d 66 75 6e 63 |mode . f|ume-func|
|00002d60| 74 69 6f 6e 2d 6e 61 6d | 65 2d 72 65 67 65 78 70 |tion-nam|e-regexp|
|00002d70| 2d 70 72 6f 6c 6f 67 29 | 20 28 74 63 6c 2d 6d 6f |-prolog)| (tcl-mo|
|00002d80| 64 65 20 2e 20 66 75 6d | 65 2d 66 75 6e 63 74 69 |de . fum|e-functi|
|00002d90| 6f 6e 2d 6e 61 6d 65 2d | 72 65 67 65 78 70 2d 74 |on-name-|regexp-t|
|00002da0| 63 6c 29 20 28 6b 73 68 | 2d 6d 6f 64 65 20 2e 20 |cl) (ksh|-mode . |
|00002db0| 66 75 6d 65 2d 66 75 6e | 63 74 69 6f 6e 2d 6e 61 |fume-fun|ction-na|
|00002dc0| 6d 65 2d 72 65 67 65 78 | 70 2d 6b 73 68 29 20 28 |me-regex|p-ksh) (|
|00002dd0| 6c 61 74 65 78 2d 6d 6f | 64 65 20 2e 20 66 75 6d |latex-mo|de . fum|
|00002de0| 65 2d 73 65 63 74 69 6f | 6e 2d 6e 61 6d 65 2d 72 |e-sectio|n-name-r|
|00002df0| 65 67 65 78 70 2d 6c 61 | 74 65 78 29 20 28 4c 61 |egexp-la|tex) (La|
|00002e00| 54 65 58 2d 6d 6f 64 65 | 20 2e 20 66 75 6d 65 2d |TeX-mode| . fume-|
|00002e10| 73 65 63 74 69 6f 6e 2d | 6e 61 6d 65 2d 72 65 67 |section-|name-reg|
|00002e20| 65 78 70 2d 6c 61 74 65 | 78 29 20 28 73 63 68 65 |exp-late|x) (sche|
|00002e30| 6d 65 2d 6d 6f 64 65 20 | 2e 20 66 75 6d 65 2d 66 |me-mode |. fume-f|
|00002e40| 75 6e 63 74 69 6f 6e 2d | 6e 61 6d 65 2d 72 65 67 |unction-|name-reg|
|00002e50| 65 78 70 2d 73 63 68 65 | 6d 65 29 20 28 62 69 62 |exp-sche|me) (bib|
|00002e60| 74 65 78 2d 6d 6f 64 65 | 20 2e 20 66 75 6d 65 2d |tex-mode| . fume-|
|00002e70| 66 75 6e 63 74 69 6f 6e | 2d 6e 61 6d 65 2d 72 65 |function|-name-re|
|00002e80| 67 65 78 70 2d 62 69 62 | 74 65 78 29 20 28 65 68 |gexp-bib|tex) (eh|
|00002e90| 64 6d 2d 6d 6f 64 65 20 | 2e 20 66 75 6d 65 2d 66 |dm-mode |. fume-f|
|00002ea0| 75 6e 63 74 69 6f 6e 2d | 6e 61 6d 65 2d 72 65 67 |unction-|name-reg|
|00002eb0| 65 78 70 2d 65 68 64 6d | 29 20 28 70 76 73 2d 6d |exp-ehdm|) (pvs-m|
|00002ec0| 6f 64 65 20 2e 20 66 75 | 6d 65 2d 66 75 6e 63 74 |ode . fu|me-funct|
|00002ed0| 69 6f 6e 2d 6e 61 6d 65 | 2d 72 65 67 65 78 70 2d |ion-name|-regexp-|
|00002ee0| 70 76 73 29 20 28 73 67 | 6d 6c 2d 6d 6f 64 65 20 |pvs) (sg|ml-mode |
|00002ef0| 2e 20 66 75 6d 65 2d 66 | 75 6e 63 74 69 6f 6e 2d |. fume-f|unction-|
|00002f00| 6e 61 6d 65 2d 72 65 67 | 65 78 70 2d 73 67 6d 6c |name-reg|exp-sgml|
|00002f10| 29 20 28 61 64 61 2d 6d | 6f 64 65 20 2e 20 66 75 |) (ada-m|ode . fu|
|00002f20| 6d 65 2d 66 75 6e 63 74 | 69 6f 6e 2d 6e 61 6d 65 |me-funct|ion-name|
|00002f30| 2d 72 65 67 65 78 70 2d | 61 64 61 29 20 28 6d 61 |-regexp-|ada) (ma|
|00002f40| 6b 65 66 69 6c 65 2d 6d | 6f 64 65 20 2e 20 66 75 |kefile-m|ode . fu|
|00002f50| 6d 65 2d 66 75 6e 63 74 | 69 6f 6e 2d 6e 61 6d 65 |me-funct|ion-name|
|00002f60| 2d 72 65 67 65 78 70 2d | 6d 61 6b 65 29 20 28 64 |-regexp-|make) (d|
|00002f70| 69 72 65 64 2d 6d 6f 64 | 65 20 2e 20 66 75 6d 65 |ired-mod|e . fume|
|00002f80| 2d 66 75 6e 63 74 69 6f | 6e 2d 6e 61 6d 65 2d 72 |-functio|n-name-r|
|00002f90| 65 67 65 78 70 2d 64 69 | 72 65 64 29 20 28 70 61 |egexp-di|red) (pa|
|00002fa0| 73 63 61 6c 2d 6d 6f 64 | 65 20 2e 20 66 75 6d 65 |scal-mod|e . fume|
|00002fb0| 2d 66 75 6e 63 74 69 6f | 6e 2d 6e 61 6d 65 2d 72 |-functio|n-name-r|
|00002fc0| 65 67 65 78 70 2d 70 61 | 73 63 61 6c 29 20 28 66 |egexp-pa|scal) (f|
|00002fd0| 61 6d 65 2d 6d 6f 64 65 | 20 2e 20 66 75 6d 65 2d |ame-mode| . fume-|
|00002fe0| 66 75 6e 63 74 69 6f 6e | 2d 6e 61 6d 65 2d 72 65 |function|-name-re|
|00002ff0| 67 65 78 70 2d 66 61 6d | 65 29 20 28 76 65 72 69 |gexp-fam|e) (veri|
|00003000| 6c 6f 67 2d 6d 6f 64 65 | 20 2e 20 66 75 6d 65 2d |log-mode| . fume-|
|00003010| 66 75 6e 63 74 69 6f 6e | 2d 6e 61 6d 65 2d 72 65 |function|-name-re|
|00003020| 67 65 78 70 2d 76 65 72 | 69 6c 6f 67 29 20 28 61 |gexp-ver|ilog) (a|
|00003030| 73 6d 2d 6d 6f 64 65 20 | 2e 20 66 75 6d 65 2d 66 |sm-mode |. fume-f|
|00003040| 75 6e 63 74 69 6f 6e 2d | 6e 61 6d 65 2d 72 65 67 |unction-|name-reg|
|00003050| 65 78 70 2d 61 73 6d 29 | 29 20 22 5c 0a 54 68 65 |exp-asm)|) "\.The|
|00003060| 20 63 6f 6e 6e 65 63 74 | 69 6f 6e 20 62 65 74 77 | connect|ion betw|
|00003070| 65 65 6e 20 61 20 6d 6f | 64 65 20 61 6e 64 20 74 |een a mo|de and t|
|00003080| 68 65 20 72 65 67 65 78 | 70 20 74 68 61 74 20 6d |he regex|p that m|
|00003090| 61 74 63 68 65 73 20 66 | 75 6e 63 74 69 6f 6e 20 |atches f|unction |
|000030a0| 6e 61 6d 65 73 2e 22 29 | 0a 28 66 73 65 74 20 27 |names.")|.(fset '|
|000030b0| 66 75 6d 65 2d 66 69 6e | 64 2d 6e 65 78 74 2d 66 |fume-fin|d-next-f|
|000030c0| 75 6e 63 74 69 6f 6e 2d | 6e 61 6d 65 20 23 5b 28 |unction-|name #[(|
|000030d0| 62 75 66 66 65 72 29 20 | 22 08 71 88 c1 5c 6e c3 |buffer) |".q..\n.|
|000030e0| c4 23 ad b9 c5 c6 21 88 | 8a c7 60 c6 5c 22 62 88 |.#....!.|..`.\"b.|
|000030f0| c8 c3 77 88 67 29 89 1e | 09 ca 3d ab 8b 0e 0b cc |..w.g)..|..=.....|
|00003100| 3d ac 85 cd 08 21 aa 95 | c3 1e 0e cf d0 21 88 60 |=....!..|.....!.`|
|00003110| 16 0e cf 20 88 0e 0e 60 | 7b 0e 0e 29 42 29 87 22 |... ...`|{..)B)."|
|00003120| 20 5b 62 75 66 66 65 72 | 20 72 65 2d 73 65 61 72 | [buffer| re-sear|
|00003130| 63 68 2d 66 6f 72 77 61 | 72 64 20 66 75 6d 65 2d |ch-forwa|rd fume-|
|00003140| 66 75 6e 63 74 69 6f 6e | 2d 6e 61 6d 65 2d 72 65 |function|-name-re|
|00003150| 67 65 78 70 20 6e 69 6c | 20 74 20 62 61 63 6b 77 |gexp nil| t backw|
|00003160| 61 72 64 2d 75 70 2d 6c | 69 73 74 20 31 20 73 63 |ard-up-l|ist 1 sc|
|00003170| 61 6e 2d 73 65 78 70 73 | 20 22 5b 20 09 5c 6e 5d |an-sexps| "[ .\n]|
|00003180| 22 20 63 68 61 72 20 35 | 39 20 6d 61 6a 6f 72 2d |" char 5|9 major-|
|00003190| 6d 6f 64 65 20 65 6d 61 | 63 73 2d 6c 69 73 70 2d |mode ema|cs-lisp-|
|000031a0| 6d 6f 64 65 20 66 75 6d | 65 2d 66 69 6e 64 2d 6e |mode fum|e-find-n|
|000031b0| 65 78 74 2d 66 75 6e 63 | 74 69 6f 6e 2d 6e 61 6d |ext-func|tion-nam|
|000031c0| 65 20 62 65 67 20 66 6f | 72 77 61 72 64 2d 73 65 |e beg fo|rward-se|
|000031d0| 78 70 20 2d 31 5d 20 35 | 20 22 5c 0a 53 65 61 72 |xp -1] 5| "\.Sear|
|000031e0| 63 68 65 73 20 66 6f 72 | 20 74 68 65 20 6e 65 78 |ches for| the nex|
|000031f0| 74 20 66 75 6e 63 74 69 | 6f 6e 20 69 6e 20 42 55 |t functi|on in BU|
|00003200| 46 46 45 52 2e 22 5d 29 | 0a 28 66 73 65 74 20 27 |FFER."])|.(fset '|
|00003210| 66 75 6d 65 2d 66 69 6e | 64 2d 6e 65 78 74 2d 73 |fume-fin|d-next-s|
|00003220| 65 78 70 20 23 5b 28 62 | 75 66 66 65 72 29 20 22 |exp #[(b|uffer) "|
|00003230| 08 71 88 c1 5c 6e c3 c4 | 23 ad 90 8a c5 c6 21 88 |.q..\n..|#.....!.|
|00003240| 60 29 89 1e 07 60 7b 0e | 07 29 42 87 22 20 5b 62 |`)...`{.|.)B." [b|
|00003250| 75 66 66 65 72 20 72 65 | 2d 73 65 61 72 63 68 2d |uffer re|-search-|
|00003260| 66 6f 72 77 61 72 64 20 | 66 75 6d 65 2d 66 75 6e |forward |fume-fun|
|00003270| 63 74 69 6f 6e 2d 6e 61 | 6d 65 2d 72 65 67 65 78 |ction-na|me-regex|
|00003280| 70 20 6e 69 6c 20 74 20 | 66 6f 72 77 61 72 64 2d |p nil t |forward-|
|00003290| 73 65 78 70 20 2d 31 20 | 62 65 67 5d 20 35 20 22 |sexp -1 |beg] 5 "|
|000032a0| 5c 0a 53 65 61 72 63 68 | 65 73 20 66 6f 72 20 74 |\.Search|es for t|
|000032b0| 68 65 20 6e 65 78 74 20 | 73 65 78 70 20 74 79 70 |he next |sexp typ|
|000032c0| 65 20 66 75 6e 63 74 69 | 6f 6e 20 69 6e 20 42 55 |e functi|on in BU|
|000032d0| 46 46 45 52 2e 22 5d 29 | 0a 28 62 79 74 65 2d 63 |FFER."])|.(byte-c|
|000032e0| 6f 64 65 20 22 c0 c1 4d | 88 c2 c3 4d 87 22 20 5b |ode "..M|...M." [|
|000032f0| 66 75 6d 65 2d 66 69 6e | 64 2d 6e 65 78 74 2d 65 |fume-fin|d-next-e|
|00003300| 68 64 6d 2d 65 6e 74 69 | 74 79 20 23 5b 28 62 75 |hdm-enti|ty #[(bu|
|00003310| 66 66 65 72 29 20 22 08 | 71 88 c1 5c 6e c3 c4 23 |ffer) ".|q..\n..#|
|00003320| ad 90 c5 94 c5 95 1e 06 | 89 1e 07 0e 06 7b 0e 07 |........|.....{..|
|00003330| 2a 42 87 22 20 5b 62 75 | 66 66 65 72 20 72 65 2d |*B." [bu|ffer re-|
|00003340| 73 65 61 72 63 68 2d 66 | 6f 72 77 61 72 64 20 66 |search-f|orward f|
|00003350| 75 6d 65 2d 66 75 6e 63 | 74 69 6f 6e 2d 6e 61 6d |ume-func|tion-nam|
|00003360| 65 2d 72 65 67 65 78 70 | 20 6e 69 6c 20 74 20 30 |e-regexp| nil t 0|
|00003370| 20 65 6e 64 20 62 65 67 | 5d 20 35 5d 20 66 75 6d | end beg|] 5] fum|
|00003380| 65 2d 66 69 6e 64 2d 6e | 65 78 74 2d 70 76 73 2d |e-find-n|ext-pvs-|
|00003390| 65 6e 74 69 74 79 20 23 | 5b 28 62 75 66 66 65 72 |entity #|[(buffer|
|000033a0| 29 20 22 08 71 88 c1 5c | 6e c3 c4 23 ad a0 c5 94 |) ".q..\|n..#....|
|000033b0| c5 95 1e 06 1e 07 0e 06 | 53 62 88 c8 c9 21 ab 85 |........|Sb...!..|
|000033c0| 0e 06 53 16 06 0e 07 0e | 06 7b 0e 07 2a 42 87 22 |..S.....|.{..*B."|
|000033d0| 20 5b 62 75 66 66 65 72 | 20 72 65 2d 73 65 61 72 | [buffer| re-sear|
|000033e0| 63 68 2d 66 6f 72 77 61 | 72 64 20 66 75 6d 65 2d |ch-forwa|rd fume-|
|000033f0| 66 75 6e 63 74 69 6f 6e | 2d 6e 61 6d 65 2d 72 65 |function|-name-re|
|00003400| 67 65 78 70 20 6e 69 6c | 20 74 20 30 20 65 6e 64 |gexp nil| t 0 end|
|00003410| 20 62 65 67 20 6c 6f 6f | 6b 69 6e 67 2d 61 74 20 | beg loo|king-at |
|00003420| 22 3a 22 5d 20 34 5d 5d | 20 32 29 0a 28 66 73 65 |":"] 4]]| 2).(fse|
|00003430| 74 20 27 66 75 6d 65 2d | 66 69 6e 64 2d 6e 65 78 |t 'fume-|find-nex|
|00003440| 74 2d 63 2d 66 75 6e 63 | 74 69 6f 6e 2d 6e 61 6d |t-c-func|tion-nam|
|00003450| 65 20 23 5b 28 62 75 66 | 66 65 72 29 20 22 08 71 |e #[(buf|fer) ".q|
|00003460| 88 c1 5c 6e c3 c4 23 ad | ee c5 c6 21 88 8a c7 60 |..\n..#.|...!...`|
|00003470| c6 5c 22 62 88 c8 c3 77 | 88 67 29 89 1e 09 ca 3d |.\"b...w|.g)....=|
|00003480| ab 85 cb 08 21 aa d0 c3 | 89 1e 0c 1e 0d ce cf 21 |....!...|.......!|
|00003490| 88 60 16 0d ce 20 88 0e | 0d 60 7b 16 0c d0 d1 0e |.`... ..|.`{.....|
|000034a0| 0c 5c 22 ab a1 c6 76 88 | cf 76 88 60 16 0d c1 d2 |.\"...v.|.v.`....|
|000034b0| c3 c4 23 ab 91 d3 d2 c3 | c4 23 88 d4 d5 0e 0c 0e |..#.....|.#......|
|000034c0| 0d 60 7b 23 16 0c d0 d6 | 0e 0c 5c 22 ab 85 cb 08 |.`{#....|..\"....|
|000034d0| 21 aa 85 0e 0c 0e 0d 42 | 2a 29 87 22 20 5b 62 75 |!......B|*)." [bu|
|000034e0| 66 66 65 72 20 72 65 2d | 73 65 61 72 63 68 2d 66 |ffer re-|search-f|
|000034f0| 6f 72 77 61 72 64 20 66 | 75 6d 65 2d 66 75 6e 63 |orward f|ume-func|
|00003500| 74 69 6f 6e 2d 6e 61 6d | 65 2d 72 65 67 65 78 70 |tion-nam|e-regexp|
|00003510| 20 6e 69 6c 20 74 20 62 | 61 63 6b 77 61 72 64 2d | nil t b|ackward-|
|00003520| 75 70 2d 6c 69 73 74 20 | 31 20 73 63 61 6e 2d 73 |up-list |1 scan-s|
|00003530| 65 78 70 73 20 22 5b 20 | 09 5c 6e 5d 22 20 63 68 |exps "[ |.\n]" ch|
|00003540| 61 72 20 35 39 20 66 75 | 6d 65 2d 66 69 6e 64 2d |ar 59 fu|me-find-|
|00003550| 6e 65 78 74 2d 66 75 6e | 63 74 69 6f 6e 2d 6e 61 |next-fun|ction-na|
|00003560| 6d 65 20 6e 61 6d 65 20 | 62 65 67 20 66 6f 72 77 |me name |beg forw|
|00003570| 61 72 64 2d 73 65 78 70 | 20 2d 31 20 73 74 72 69 |ard-sexp| -1 stri|
|00003580| 6e 67 2d 6d 61 74 63 68 | 20 22 5e 44 45 46 55 4e |ng-match| "^DEFUN|
|00003590| 5c 5c 73 2d 2a 22 20 22 | 5c 22 2c 22 20 72 65 2d |\\s-*" "|\"," re-|
|000035a0| 73 65 61 72 63 68 2d 62 | 61 63 6b 77 61 72 64 20 |search-b|ackward |
|000035b0| 66 6f 72 6d 61 74 20 22 | 25 73 20 25 73 22 20 22 |format "|%s %s" "|
|000035c0| 5e 76 6f 69 64 5c 5c 73 | 2d 2a 22 5d 20 36 20 22 |^void\\s|-*"] 6 "|
|000035d0| 5c 0a 53 65 61 72 63 68 | 65 73 20 66 6f 72 20 74 |\.Search|es for t|
|000035e0| 68 65 20 6e 65 78 74 20 | 43 20 66 75 6e 63 74 69 |he next |C functi|
|000035f0| 6f 6e 20 69 6e 20 42 55 | 46 46 45 52 2e 22 5d 29 |on in BU|FFER."])|
|00003600| 0a 28 66 73 65 74 20 27 | 66 75 6d 65 2d 6d 61 74 |.(fset '|fume-mat|
|00003610| 63 68 2d 66 69 6e 64 2d | 6e 65 78 74 2d 66 75 6e |ch-find-|next-fun|
|00003620| 63 74 69 6f 6e 2d 6e 61 | 6d 65 20 23 5b 28 62 75 |ction-na|me #[(bu|
|00003630| 66 66 65 72 29 20 22 08 | 71 88 c1 c2 1b 1c 0b ab |ffer) ".|q.......|
|00003640| b3 c5 0e 06 40 c1 c2 23 | ab a5 c7 c8 21 88 8a c9 |....@..#|....!...|
|00003650| 60 c8 5c 22 62 88 67 29 | 89 1e 5c 6e cb 3d ac 8e |`.\"b.g)|..\n.=..|
|00003660| 0e 06 41 94 60 7b 0e 06 | 41 94 42 14 c1 13 29 aa |..A.`{..|A.B...).|
|00003670| 4f c1 89 13 ac 4d 0c 2a | 87 22 20 5b 62 75 66 66 |O....M.*|." [buff|
|00003680| 65 72 20 6e 69 6c 20 74 | 20 63 6f 6e 74 69 6e 75 |er nil t| continu|
|00003690| 65 20 72 65 73 75 6c 74 | 20 72 65 2d 73 65 61 72 |e result| re-sear|
|000036a0| 63 68 2d 66 6f 72 77 61 | 72 64 20 66 75 6d 65 2d |ch-forwa|rd fume-|
|000036b0| 66 75 6e 63 74 69 6f 6e | 2d 6e 61 6d 65 2d 72 65 |function|-name-re|
|000036c0| 67 65 78 70 20 62 61 63 | 6b 77 61 72 64 2d 75 70 |gexp bac|kward-up|
|000036d0| 2d 6c 69 73 74 20 31 20 | 73 63 61 6e 2d 73 65 78 |-list 1 |scan-sex|
|000036e0| 70 73 20 63 68 61 72 20 | 35 39 5d 20 35 20 22 5c |ps char |59] 5 "\|
|000036f0| 0a 47 65 6e 65 72 61 6c | 20 6e 65 78 74 20 66 75 |.General| next fu|
|00003700| 6e 63 74 69 6f 6e 20 6e | 61 6d 65 20 69 6e 20 42 |nction n|ame in B|
|00003710| 55 46 46 45 52 20 66 69 | 6e 64 65 72 20 75 73 69 |UFFER fi|nder usi|
|00003720| 6e 67 20 6d 61 74 63 68 | 2e 0a 54 68 65 20 72 65 |ng match|..The re|
|00003730| 67 65 78 70 20 69 73 20 | 61 73 73 75 6d 65 64 20 |gexp is |assumed |
|00003740| 74 6f 20 62 65 20 61 20 | 74 77 6f 20 69 74 65 6d |to be a |two item|
|00003750| 20 6c 69 73 74 20 74 68 | 65 20 63 61 72 20 6f 66 | list th|e car of|
|00003760| 20 77 68 69 63 68 20 69 | 73 20 74 68 65 20 72 65 | which i|s the re|
|00003770| 67 65 78 70 20 74 6f 0a | 75 73 65 2c 20 61 6e 64 |gexp to.|use, and|
|00003780| 20 74 68 65 20 63 64 72 | 20 6f 66 20 77 68 69 63 | the cdr| of whic|
|00003790| 68 20 69 73 20 74 68 65 | 20 6d 61 74 63 68 20 70 |h is the| match p|
|000037a0| 6f 73 69 74 69 6f 6e 20 | 6f 66 20 74 68 65 20 66 |osition |of the f|
|000037b0| 75 6e 63 74 69 6f 6e 20 | 6e 61 6d 65 2e 22 5d 29 |unction |name."])|
|000037c0| 0a 28 66 73 65 74 20 27 | 66 75 6d 65 2d 66 69 6e |.(fset '|fume-fin|
|000037d0| 64 2d 6e 65 78 74 2d 70 | 65 72 6c 2d 66 75 6e 63 |d-next-p|erl-func|
|000037e0| 74 69 6f 6e 2d 6e 61 6d | 65 20 23 5b 28 62 75 66 |tion-nam|e #[(buf|
|000037f0| 66 65 72 29 20 22 c0 09 | 21 87 22 20 5b 66 75 6d |fer) "..|!." [fum|
|00003800| 65 2d 66 69 6e 64 2d 6e | 65 78 74 2d 73 65 78 70 |e-find-n|ext-sexp|
|00003810| 20 62 75 66 66 65 72 5d | 20 32 20 22 5c 0a 53 65 | buffer]| 2 "\.Se|
|00003820| 61 72 63 68 65 73 20 66 | 6f 72 20 74 68 65 20 6e |arches f|or the n|
|00003830| 65 78 74 20 50 65 72 6c | 20 66 75 6e 63 74 69 6f |ext Perl| functio|
|00003840| 6e 20 69 6e 20 42 55 46 | 46 45 52 2e 22 5d 29 0a |n in BUF|FER."]).|
|00003850| 28 66 73 65 74 20 27 66 | 75 6d 65 2d 66 69 6e 64 |(fset 'f|ume-find|
|00003860| 2d 6e 65 78 74 2d 70 79 | 74 68 6f 6e 2d 66 75 6e |-next-py|thon-fun|
|00003870| 63 74 69 6f 6e 2d 6e 61 | 6d 65 20 23 5b 28 62 75 |ction-na|me #[(bu|
|00003880| 66 66 65 72 29 20 22 08 | 71 88 c1 5c 6e c3 c4 23 |ffer) ".|q..\n..#|
|00003890| ad ab 8a c5 94 89 1e 06 | c5 95 7b 1e 07 c8 94 62 |........|..{....b|
|000038a0| 88 c9 ca 21 ab 91 cb cc | c3 c4 23 88 cd 94 cd 95 |...!....|..#.....|
|000038b0| 7b ce 0e 07 51 16 07 0e | 07 0e 06 2b 42 87 22 20 |{...Q...|...+B." |
|000038c0| 5b 62 75 66 66 65 72 20 | 72 65 2d 73 65 61 72 63 |[buffer |re-searc|
|000038d0| 68 2d 66 6f 72 77 61 72 | 64 20 66 75 6d 65 2d 66 |h-forwar|d fume-f|
|000038e0| 75 6e 63 74 69 6f 6e 2d | 6e 61 6d 65 2d 72 65 67 |unction-|name-reg|
|000038f0| 65 78 70 20 6e 69 6c 20 | 74 20 32 20 72 65 74 70 |exp nil |t 2 retp|
|00003900| 6e 74 20 72 65 74 6e 61 | 6d 65 20 30 20 6c 6f 6f |nt retna|me 0 loo|
|00003910| 6b 69 6e 67 2d 61 74 20 | 22 5c 5c 73 2d 2b 64 65 |king-at |"\\s-+de|
|00003920| 66 22 20 72 65 2d 73 65 | 61 72 63 68 2d 62 61 63 |f" re-se|arch-bac|
|00003930| 6b 77 61 72 64 20 22 5e | 63 6c 61 73 73 5c 5c 73 |kward "^|class\\s|
|00003940| 2d 2a 5c 5c 28 5b 41 2d | 5a 61 2d 7a 30 2d 39 5f |-*\\([A-|Za-z0-9_|
|00003950| 5d 2b 5c 5c 29 5c 5c 73 | 2d 2a 5b 28 3a 5d 22 20 |]+\\)\\s|-*[(:]" |
|00003960| 31 20 22 2e 22 5d 20 35 | 20 22 5c 0a 53 65 61 72 |1 "."] 5| "\.Sear|
|00003970| 63 68 65 73 20 66 6f 72 | 20 74 68 65 20 6e 65 78 |ches for| the nex|
|00003980| 74 20 70 79 74 68 6f 6e | 20 66 75 6e 63 74 69 6f |t python| functio|
|00003990| 6e 20 69 6e 20 42 55 46 | 46 45 52 2e 22 5d 29 0a |n in BUF|FER."]).|
|000039a0| 28 66 73 65 74 20 27 66 | 75 6d 65 2d 66 69 6e 64 |(fset 'f|ume-find|
|000039b0| 2d 6e 65 78 74 2d 6d 6f | 64 75 6c 61 2d 66 75 6e |-next-mo|dula-fun|
|000039c0| 63 74 69 6f 6e 2d 6e 61 | 6d 65 20 23 5b 28 62 75 |ction-na|me #[(bu|
|000039d0| 66 66 65 72 29 20 22 c0 | 09 21 87 22 20 5b 66 75 |ffer) ".|.!." [fu|
|000039e0| 6d 65 2d 66 69 6e 64 2d | 6e 65 78 74 2d 73 65 78 |me-find-|next-sex|
|000039f0| 70 20 62 75 66 66 65 72 | 5d 20 32 20 22 5c 0a 53 |p buffer|] 2 "\.S|
|00003a00| 65 61 72 63 68 65 73 20 | 66 6f 72 20 74 68 65 20 |earches |for the |
|00003a10| 6e 65 78 74 20 6d 6f 64 | 75 6c 61 20 66 75 6e 63 |next mod|ula func|
|00003a20| 74 69 6f 6e 20 69 6e 20 | 42 55 46 46 45 52 2e 22 |tion in |BUFFER."|
|00003a30| 5d 29 0a 28 66 73 65 74 | 20 27 66 75 6d 65 2d 66 |]).(fset| 'fume-f|
|00003a40| 69 6e 64 2d 6e 65 78 74 | 2d 64 69 72 65 63 74 6f |ind-next|-directo|
|00003a50| 72 79 2d 6e 61 6d 65 20 | 23 5b 28 62 75 66 66 65 |ry-name |#[(buffe|
|00003a60| 72 29 20 22 08 71 88 c1 | 5c 6e c3 c4 23 ad 90 c5 |r) ".q..|\n..#...|
|00003a70| 94 c5 95 1e 06 89 1e 07 | 0e 06 7b 0e 07 2a 42 87 |........|..{..*B.|
|00003a80| 22 20 5b 62 75 66 66 65 | 72 20 72 65 2d 73 65 61 |" [buffe|r re-sea|
|00003a90| 72 63 68 2d 66 6f 72 77 | 61 72 64 20 66 75 6d 65 |rch-forw|ard fume|
|00003aa0| 2d 66 75 6e 63 74 69 6f | 6e 2d 6e 61 6d 65 2d 72 |-functio|n-name-r|
|00003ab0| 65 67 65 78 70 20 6e 69 | 6c 20 74 20 32 20 65 6e |egexp ni|l t 2 en|
|00003ac0| 64 20 62 65 67 5d 20 35 | 20 22 5c 0a 53 65 61 72 |d beg] 5| "\.Sear|
|00003ad0| 63 68 65 73 20 66 6f 72 | 20 74 68 65 20 6e 65 78 |ches for| the nex|
|00003ae0| 74 20 64 69 72 65 63 74 | 6f 72 79 20 69 6e 20 64 |t direct|ory in d|
|00003af0| 69 72 65 64 20 42 55 46 | 46 45 52 2e 22 5d 29 0a |ired BUF|FER."]).|
|00003b00| 28 66 73 65 74 20 27 66 | 75 6d 65 2d 66 69 6e 64 |(fset 'f|ume-find|
|00003b10| 2d 6e 65 78 74 2d 66 6f | 72 74 72 61 6e 2d 66 75 |-next-fo|rtran-fu|
|00003b20| 6e 63 74 69 6f 6e 2d 6e | 61 6d 65 20 23 5b 28 62 |nction-n|ame #[(b|
|00003b30| 75 66 66 65 72 29 20 22 | 08 71 88 c1 5c 6e c3 c4 |uffer) "|.q..\n..|
|00003b40| 23 ad a8 60 c5 8a c6 7f | 88 60 29 1e 07 1e 08 1e |#..`....|.`).....|
|00003b50| 09 ca c3 78 88 c1 0e 08 | 0e 07 c4 23 ab 89 0e 09 |...x....|...#....|
|00003b60| 60 7b 0e 09 42 aa 83 cb | 08 21 2b 87 22 20 5b 62 |`{..B...|.!+." [b|
|00003b70| 75 66 66 65 72 20 72 65 | 2d 73 65 61 72 63 68 2d |uffer re|-search-|
|00003b80| 66 6f 72 77 61 72 64 20 | 66 75 6d 65 2d 66 75 6e |forward |fume-fun|
|00003b90| 63 74 69 6f 6e 2d 6e 61 | 6d 65 2d 72 65 67 65 78 |ction-na|me-regex|
|00003ba0| 70 20 6e 69 6c 20 74 20 | 22 5c 5c 73 2d 2b 5b 61 |p nil t |"\\s-+[a|
|00003bb0| 2d 7a 41 2d 5a 5d 2b 5b | 5f 61 2d 7a 41 2d 5a 30 |-zA-Z]+[|_a-zA-Z0|
|00003bc0| 2d 39 2a 5d 2a 22 20 31 | 20 65 6f 6c 20 6e 61 6d |-9*]*" 1| eol nam|
|00003bd0| 65 2d 72 65 67 65 78 70 | 20 70 6f 73 20 22 20 09 |e-regexp| pos " .|
|00003be0| 22 20 66 75 6d 65 2d 66 | 69 6e 64 2d 6e 65 78 74 |" fume-f|ind-next|
|00003bf0| 2d 66 6f 72 74 72 61 6e | 2d 66 75 6e 63 74 69 6f |-fortran|-functio|
|00003c00| 6e 2d 6e 61 6d 65 5d 20 | 34 20 22 5c 0a 53 65 61 |n-name] |4 "\.Sea|
|00003c10| 72 63 68 65 73 20 66 6f | 72 20 74 68 65 20 6e 65 |rches fo|r the ne|
|00003c20| 78 74 20 66 6f 72 74 72 | 61 6e 20 66 75 6e 63 74 |xt fortr|an funct|
|00003c30| 69 6f 6e 20 69 6e 20 42 | 55 46 46 45 52 2e 22 5d |ion in B|UFFER."]|
|00003c40| 29 0a 28 66 73 65 74 20 | 27 66 75 6d 65 2d 66 69 |).(fset |'fume-fi|
|00003c50| 6e 64 2d 6e 65 78 74 2d | 70 6f 73 74 73 63 72 69 |nd-next-|postscri|
|00003c60| 70 74 2d 66 75 6e 63 74 | 69 6f 6e 2d 6e 61 6d 65 |pt-funct|ion-name|
|00003c70| 20 23 5b 28 62 75 66 66 | 65 72 29 20 22 08 71 88 | #[(buff|er) ".q.|
|00003c80| c1 5c 6e c3 c4 23 ad 99 | c5 79 88 60 1e 06 c7 20 |.\n..#..|.y.`... |
|00003c90| 88 c8 c9 21 ab 83 c7 20 | 88 0e 06 60 7b 0e 06 29 |...!... |...`{..)|
|00003ca0| 42 87 22 20 5b 62 75 66 | 66 65 72 20 72 65 2d 73 |B." [buf|fer re-s|
|00003cb0| 65 61 72 63 68 2d 66 6f | 72 77 61 72 64 20 66 75 |earch-fo|rward fu|
|00003cc0| 6d 65 2d 66 75 6e 63 74 | 69 6f 6e 2d 6e 61 6d 65 |me-funct|ion-name|
|00003cd0| 2d 72 65 67 65 78 70 20 | 6e 69 6c 20 74 20 30 20 |-regexp |nil t 0 |
|00003ce0| 62 65 67 20 66 6f 72 77 | 61 72 64 2d 73 65 78 70 |beg forw|ard-sexp|
|00003cf0| 20 6c 6f 6f 6b 69 6e 67 | 2d 61 74 20 22 5c 5c 73 | looking|-at "\\s|
|00003d00| 2d 2b 5c 5c 28 2f 5c 5c | 7c 5c 5c 5b 5c 5c 29 22 |-+\\(/\\||\\[\\)"|
|00003d10| 5d 20 34 20 22 5c 0a 53 | 65 61 72 63 68 65 73 20 |] 4 "\.S|earches |
|00003d20| 66 6f 72 20 74 68 65 20 | 6e 65 78 74 20 70 6f 73 |for the |next pos|
|00003d30| 74 73 63 72 69 70 74 20 | 66 75 6e 63 74 69 6f 6e |tscript |function|
|00003d40| 20 69 6e 20 42 55 46 46 | 45 52 2e 22 5d 29 0a 28 | in BUFF|ER."]).(|
|00003d50| 66 73 65 74 20 27 66 75 | 6d 65 2d 66 69 6e 64 2d |fset 'fu|me-find-|
|00003d60| 6e 65 78 74 2d 70 72 6f | 6c 6f 67 2d 66 75 6e 63 |next-pro|log-func|
|00003d70| 74 69 6f 6e 2d 6e 61 6d | 65 20 23 5b 28 62 75 66 |tion-nam|e #[(buf|
|00003d80| 66 65 72 29 20 22 08 71 | 88 c1 5c 6e c3 c4 23 ad |fer) ".q|..\n..#.|
|00003d90| 91 c5 79 88 60 1e 06 c7 | 20 88 0e 06 60 7b 0e 06 |..y.`...| ...`{..|
|00003da0| 29 42 87 22 20 5b 62 75 | 66 66 65 72 20 72 65 2d |)B." [bu|ffer re-|
|00003db0| 73 65 61 72 63 68 2d 66 | 6f 72 77 61 72 64 20 66 |search-f|orward f|
|00003dc0| 75 6d 65 2d 66 75 6e 63 | 74 69 6f 6e 2d 6e 61 6d |ume-func|tion-nam|
|00003dd0| 65 2d 72 65 67 65 78 70 | 20 6e 69 6c 20 74 20 30 |e-regexp| nil t 0|
|00003de0| 20 62 65 67 20 66 6f 72 | 77 61 72 64 2d 73 65 78 | beg for|ward-sex|
|00003df0| 70 5d 20 34 20 22 5c 0a | 53 65 61 72 63 68 65 73 |p] 4 "\.|Searches|
|00003e00| 20 66 6f 72 20 74 68 65 | 20 6e 65 78 74 20 70 72 | for the| next pr|
|00003e10| 6f 6c 6f 67 20 66 61 63 | 74 20 6f 72 20 63 6c 61 |olog fac|t or cla|
|00003e20| 75 73 65 20 69 6e 20 42 | 55 46 46 45 52 2e 22 5d |use in B|UFFER."]|
|00003e30| 29 0a 28 66 73 65 74 20 | 27 66 75 6d 65 2d 66 69 |).(fset |'fume-fi|
|00003e40| 6e 64 2d 6e 65 78 74 2d | 62 61 63 69 73 2d 66 75 |nd-next-|bacis-fu|
|00003e50| 6e 63 74 69 6f 6e 2d 6e | 61 6d 65 20 23 5b 28 62 |nction-n|ame #[(b|
|00003e60| 75 66 66 65 72 29 20 22 | 08 71 88 c1 5c 6e c3 c4 |uffer) "|.q..\n..|
|00003e70| 23 ad a3 60 c3 c5 c6 8f | 1e 07 1e 08 0e 07 ac 85 |#..`....|........|
|00003e80| c9 08 21 aa 90 c1 ca cb | 0e 07 cc 23 c3 c4 23 88 |..!.....|...#..#.|
|00003e90| 0e 07 0e 08 42 2a 87 22 | 20 5b 62 75 66 66 65 72 |....B*."| [buffer|
|00003ea0| 20 72 65 2d 73 65 61 72 | 63 68 2d 66 6f 72 77 61 | re-sear|ch-forwa|
|00003eb0| 72 64 20 66 75 6d 65 2d | 66 75 6e 63 74 69 6f 6e |rd fume-|function|
|00003ec0| 2d 6e 61 6d 65 2d 72 65 | 67 65 78 70 20 6e 69 6c |-name-re|gexp nil|
|00003ed0| 20 74 20 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 | t (byte|-code ".|
|00003ee0| c1 21 4b 20 87 22 20 5b | 69 6e 74 65 72 6e 20 22 |.!K ." [|intern "|
|00003ef0| 66 6f 63 75 73 2d 67 65 | 74 2d 66 75 6e 63 74 69 |focus-ge|t-functi|
|00003f00| 6f 6e 2d 6e 61 6d 65 22 | 5d 20 32 29 20 28 28 65 |on-name"|] 2) ((e|
|00003f10| 72 72 6f 72 29 29 20 6e | 61 6d 65 20 70 6f 73 20 |rror)) n|ame pos |
|00003f20| 66 75 6d 65 2d 66 69 6e | 64 2d 6e 65 78 74 2d 62 |fume-fin|d-next-b|
|00003f30| 61 63 69 73 2d 66 75 6e | 63 74 69 6f 6e 2d 6e 61 |acis-fun|ction-na|
|00003f40| 6d 65 20 66 6f 72 6d 61 | 74 20 22 3c 3c 64 62 67 |me forma|t "<<dbg|
|00003f50| 69 64 20 2b 5c 5c 73 2d | 2a 25 73 25 73 22 20 22 |id +\\s-|*%s%s" "|
|00003f60| 5c 5c 73 2d 2a 3e 3e 22 | 5d 20 35 20 22 5c 0a 53 |\\s-*>>"|] 5 "\.S|
|00003f70| 65 61 72 63 68 65 73 20 | 66 6f 72 20 74 68 65 20 |earches |for the |
|00003f80| 6e 65 78 74 20 42 61 63 | 69 73 32 20 66 75 6e 63 |next Bac|is2 func|
|00003f90| 74 69 6f 6e 20 69 6e 20 | 42 55 46 46 45 52 22 5d |tion in |BUFFER"]|
|00003fa0| 29 0a 28 66 73 65 74 20 | 27 66 75 6d 65 2d 66 69 |).(fset |'fume-fi|
|00003fb0| 6e 64 2d 6e 65 78 74 2d | 6d 61 70 6c 65 2d 66 75 |nd-next-|maple-fu|
|00003fc0| 6e 63 74 69 6f 6e 2d 6e | 61 6d 65 20 23 5b 28 62 |nction-n|ame #[(b|
|00003fd0| 75 66 66 65 72 29 20 22 | 08 71 88 c1 5c 6e c3 c4 |uffer) "|.q..\n..|
|00003fe0| 23 ad 96 c5 c6 21 88 c7 | c8 21 88 60 1e 09 c7 20 |#....!..|.!.`... |
|00003ff0| 88 0e 09 60 7b 0e 09 29 | 42 87 22 20 5b 62 75 66 |...`{..)|B." [buf|
|00004000| 66 65 72 20 72 65 2d 73 | 65 61 72 63 68 2d 66 6f |fer re-s|earch-fo|
|00004010| 72 77 61 72 64 20 66 75 | 6d 65 2d 66 75 6e 63 74 |rward fu|me-funct|
|00004020| 69 6f 6e 2d 6e 61 6d 65 | 2d 72 65 67 65 78 70 20 |ion-name|-regexp |
|00004030| 6e 69 6c 20 74 20 62 61 | 63 6b 77 61 72 64 2d 75 |nil t ba|ckward-u|
|00004040| 70 2d 6c 69 73 74 20 31 | 20 66 6f 72 77 61 72 64 |p-list 1| forward|
|00004050| 2d 73 65 78 70 20 2d 32 | 20 62 65 67 5d 20 34 20 |-sexp -2| beg] 4 |
|00004060| 22 5c 0a 53 65 61 72 63 | 68 65 73 20 66 6f 72 20 |"\.Searc|hes for |
|00004070| 74 68 65 20 6e 65 78 74 | 20 6d 61 70 6c 65 20 66 |the next| maple f|
|00004080| 75 6e 63 74 69 6f 6e 20 | 69 6e 20 42 55 46 46 45 |unction |in BUFFE|
|00004090| 52 22 5d 29 0a 28 66 73 | 65 74 20 27 66 75 6d 65 |R"]).(fs|et 'fume|
|000040a0| 2d 66 69 6e 64 2d 6e 65 | 78 74 2d 6c 61 74 65 78 |-find-ne|xt-latex|
|000040b0| 2d 73 65 63 74 69 6f 6e | 2d 6e 61 6d 65 20 23 5b |-section|-name #[|
|000040c0| 28 62 75 66 66 65 72 29 | 20 22 08 71 88 c1 5c 6e |(buffer)| ".q..\n|
|000040d0| c3 c4 23 85 c8 00 c5 94 | c5 95 7b 1e 06 c7 94 89 |..#.....|..{.....|
|000040e0| 1e 08 c7 95 7b 1e 09 0e | 06 ca 98 ab 9a 0e 0b 54 |....{...|.......T|
|000040f0| 16 0b cc 16 0d cc 16 0e | cc 16 0f 0e 0b d0 0e 09 |........|........|
|00004100| 96 51 16 09 82 c2 00 0e | 06 d1 98 ab a2 0e 0d 54 |.Q......|.......T|
|00004110| 16 0d 0e 0b cc 56 ab 86 | 0e 0b d2 50 aa 81 d3 0e |.....V..|...P....|
|00004120| 0d d0 0e 09 52 16 09 cc | 16 0e cc 16 0f aa de 0e |....R...|........|
|00004130| 06 d4 98 ab a3 0e 0e 54 | 16 0e 0e 0b cc 56 ab 86 |.......T|.....V..|
|00004140| 0e 0b d2 50 aa 81 d3 0e | 0d d2 0e 0e d0 0e 09 b0 |...P....|........|
|00004150| 06 16 09 cc 16 0f aa b5 | 0e 06 d5 98 ab a3 0e 0f |........|........|
|00004160| 54 16 0f 0e 0b cc 56 ab | 86 0e 0b d2 50 aa 81 d3 |T.....V.|....P...|
|00004170| 0e 0d d2 0e 0e d2 0e 0f | d0 0e 09 b0 08 16 09 aa |........|........|
|00004180| 8c 0e 06 d5 98 ab 86 d6 | 0e 09 50 16 09 0e 09 0e |........|..P.....|
|00004190| 08 2b 42 87 22 20 5b 62 | 75 66 66 65 72 20 72 65 |.+B." [b|uffer re|
|000041a0| 2d 73 65 61 72 63 68 2d | 66 6f 72 77 61 72 64 20 |-search-|forward |
|000041b0| 66 75 6d 65 2d 66 75 6e | 63 74 69 6f 6e 2d 6e 61 |fume-fun|ction-na|
|000041c0| 6d 65 2d 72 65 67 65 78 | 70 20 6e 69 6c 20 74 20 |me-regex|p nil t |
|000041d0| 31 20 73 65 63 6e 61 6d | 65 20 34 20 62 65 67 20 |1 secnam|e 4 beg |
|000041e0| 6e 61 6d 65 20 22 63 68 | 61 70 74 65 72 22 20 66 |name "ch|apter" f|
|000041f0| 75 6d 65 2d 74 65 78 2d | 63 68 61 70 74 65 72 20 |ume-tex-|chapter |
|00004200| 30 20 66 75 6d 65 2d 74 | 65 78 2d 73 65 63 74 69 |0 fume-t|ex-secti|
|00004210| 6f 6e 20 66 75 6d 65 2d | 74 65 78 2d 73 75 62 73 |on fume-|tex-subs|
|00004220| 65 63 74 69 6f 6e 20 66 | 75 6d 65 2d 74 65 78 2d |ection f|ume-tex-|
|00004230| 73 75 62 73 75 62 73 65 | 63 74 69 6f 6e 20 22 20 |subsubse|ction " |
|00004240| 22 20 22 73 65 63 74 69 | 6f 6e 22 20 22 2e 22 20 |" "secti|on" "." |
|00004250| 22 22 20 22 73 75 62 73 | 65 63 74 69 6f 6e 22 20 |"" "subs|ection" |
|00004260| 22 73 75 62 73 75 62 73 | 65 63 74 69 6f 6e 22 20 |"subsubs|ection" |
|00004270| 22 20 20 20 22 5d 20 39 | 20 22 5c 0a 53 65 61 72 |" "] 9| "\.Sear|
|00004280| 63 68 65 73 20 66 6f 72 | 20 74 68 65 20 6e 65 78 |ches for| the nex|
|00004290| 74 20 6c 61 74 65 78 20 | 73 65 63 74 69 6f 6e 20 |t latex |section |
|000042a0| 69 6e 20 42 55 46 46 45 | 52 2e 22 5d 29 0a 28 66 |in BUFFE|R."]).(f|
|000042b0| 73 65 74 20 27 66 75 6d | 65 2d 66 69 6e 64 2d 6e |set 'fum|e-find-n|
|000042c0| 65 78 74 2d 6b 73 68 2d | 66 75 6e 63 74 69 6f 6e |ext-ksh-|function|
|000042d0| 2d 6e 61 6d 65 20 23 5b | 28 62 75 66 66 65 72 29 |-name #[|(buffer)|
|000042e0| 20 22 08 71 88 c1 5c 6e | c3 c4 23 ad c4 c3 c5 94 | ".q..\n|..#.....|
|000042f0| 1e 06 1e 07 c8 c9 0e 06 | c4 23 ab 92 c1 ca c3 c4 |........|.#......|
|00004300| 23 88 cb 94 89 16 06 cb | 95 7b 16 07 aa 91 c8 cc |#.......|.{......|
|00004310| 0e 06 c4 23 88 cb 94 89 | 16 06 cb 95 7b 16 07 0e |...#....|....{...|
|00004320| 07 ac 85 cd 08 21 aa 88 | c3 7f 88 0e 07 0e 06 42 |.....!..|.......B|
|00004330| 2a 87 22 20 5b 62 75 66 | 66 65 72 20 72 65 2d 73 |*." [buf|fer re-s|
|00004340| 65 61 72 63 68 2d 66 6f | 72 77 61 72 64 20 66 75 |earch-fo|rward fu|
|00004350| 6d 65 2d 66 75 6e 63 74 | 69 6f 6e 2d 6e 61 6d 65 |me-funct|ion-name|
|00004360| 2d 72 65 67 65 78 70 20 | 6e 69 6c 20 74 20 30 20 |-regexp |nil t 0 |
|00004370| 62 65 67 20 6e 61 6d 65 | 20 72 65 2d 73 65 61 72 |beg name| re-sear|
|00004380| 63 68 2d 62 61 63 6b 77 | 61 72 64 20 22 5c 5c 28 |ch-backw|ard "\\(|
|00004390| 5e 5c 5c 7c 5c 5c 73 2d | 5c 5c 29 66 75 6e 63 74 |^\\|\\s-|\\)funct|
|000043a0| 69 6f 6e 5c 5c 73 2d 22 | 20 22 5c 5c 28 66 75 6e |ion\\s-"| "\\(fun|
|000043b0| 63 74 69 6f 6e 5c 5c 73 | 2d 2b 5c 5c 29 5c 5c 28 |ction\\s|-+\\)\\(|
|000043c0| 5b 41 2d 5a 61 2d 7a 5f | 5d 5b 41 2d 5a 61 2d 7a |[A-Za-z_|][A-Za-z|
|000043d0| 5f 30 2d 39 5d 2a 5c 5c | 29 22 20 32 20 22 5c 5c |_0-9]*\\|)" 2 "\\|
|000043e0| 28 5e 5c 5c 7c 5c 5c 73 | 2d 5c 5c 29 5c 5c 28 5b |(^\\|\\s|-\\)\\([|
|000043f0| 41 2d 5a 61 2d 7a 5f 5d | 5b 41 2d 5a 61 2d 7a 5f |A-Za-z_]|[A-Za-z_|
|00004400| 30 2d 39 5d 2a 5c 5c 29 | 22 20 66 75 6d 65 2d 66 |0-9]*\\)|" fume-f|
|00004410| 69 6e 64 2d 6e 65 78 74 | 2d 6b 73 68 2d 66 75 6e |ind-next|-ksh-fun|
|00004420| 63 74 69 6f 6e 2d 6e 61 | 6d 65 5d 20 35 20 22 5c |ction-na|me] 5 "\|
|00004430| 0a 53 65 61 72 63 68 65 | 73 20 66 6f 72 20 74 68 |.Searche|s for th|
|00004440| 65 20 6b 73 68 20 74 79 | 70 65 20 66 75 6e 63 74 |e ksh ty|pe funct|
|00004450| 69 6f 6e 20 69 6e 20 42 | 55 46 46 45 52 2e 22 5d |ion in B|UFFER."]|
|00004460| 29 0a 28 66 73 65 74 20 | 27 66 75 6d 65 2d 66 69 |).(fset |'fume-fi|
|00004470| 6e 64 2d 6e 65 78 74 2d | 73 63 68 65 6d 65 2d 66 |nd-next-|scheme-f|
|00004480| 75 6e 63 74 69 6f 6e 20 | 23 5b 28 62 75 66 66 65 |unction |#[(buffe|
|00004490| 72 29 20 22 08 71 88 c1 | 5c 6e c3 c4 23 ad 9b c5 |r) ".q..|\n..#...|
|000044a0| c6 21 ab 83 c7 75 88 60 | 8a c8 20 88 60 29 1e 09 |.!...u.`|.. .`)..|
|000044b0| 89 1e 5c 6e 0e 09 7b 0e | 5c 6e 2a 42 87 22 20 5b |..\n..{.|\n*B." [|
|000044c0| 62 75 66 66 65 72 20 72 | 65 2d 73 65 61 72 63 68 |buffer r|e-search|
|000044d0| 2d 66 6f 72 77 61 72 64 | 20 66 75 6d 65 2d 66 75 |-forward| fume-fu|
|000044e0| 6e 63 74 69 6f 6e 2d 6e | 61 6d 65 2d 72 65 67 65 |nction-n|ame-rege|
|000044f0| 78 70 20 6e 69 6c 20 74 | 20 6c 6f 6f 6b 69 6e 67 |xp nil t| looking|
|00004500| 2d 61 74 20 22 28 22 20 | 31 20 66 6f 72 77 61 72 |-at "(" |1 forwar|
|00004510| 64 2d 73 65 78 70 20 65 | 6e 64 20 62 65 67 5d 20 |d-sexp e|nd beg] |
|00004520| 35 20 22 5c 0a 53 65 61 | 72 63 68 65 73 20 66 6f |5 "\.Sea|rches fo|
|00004530| 72 20 74 68 65 20 6e 65 | 78 74 20 53 63 68 65 6d |r the ne|xt Schem|
|00004540| 65 20 66 75 6e 63 74 69 | 6f 6e 20 69 6e 20 42 55 |e functi|on in BU|
|00004550| 46 46 45 52 2e 22 5d 29 | 0a 28 66 73 65 74 20 27 |FFER."])|.(fset '|
|00004560| 66 75 6d 65 2d 66 69 6e | 64 2d 6e 65 78 74 2d 62 |fume-fin|d-next-b|
|00004570| 69 62 74 65 78 2d 63 69 | 74 61 74 69 6f 6e 20 23 |ibtex-ci|tation #|
|00004580| 5b 28 62 75 66 66 65 72 | 29 20 22 08 71 88 c1 5c |[(buffer|) ".q..\|
|00004590| 6e c3 c4 23 ad 90 c5 94 | c5 95 1e 06 89 1e 07 0e |n..#....|........|
|000045a0| 06 7b 0e 07 2a 42 87 22 | 20 5b 62 75 66 66 65 72 |.{..*B."| [buffer|
|000045b0| 20 72 65 2d 73 65 61 72 | 63 68 2d 66 6f 72 77 61 | re-sear|ch-forwa|
|000045c0| 72 64 20 66 75 6d 65 2d | 66 75 6e 63 74 69 6f 6e |rd fume-|function|
|000045d0| 2d 6e 61 6d 65 2d 72 65 | 67 65 78 70 20 6e 69 6c |-name-re|gexp nil|
|000045e0| 20 74 20 31 20 65 6e 64 | 20 62 65 67 5d 20 35 20 | t 1 end| beg] 5 |
|000045f0| 22 5c 0a 53 65 61 72 63 | 68 65 73 20 66 6f 72 20 |"\.Searc|hes for |
|00004600| 74 68 65 20 6e 65 78 74 | 20 42 69 62 54 65 58 20 |the next| BibTeX |
|00004610| 63 69 74 61 74 69 6f 6e | 20 69 6e 20 42 55 46 46 |citation| in BUFF|
|00004620| 45 52 2e 22 5d 29 0a 28 | 66 73 65 74 20 27 66 75 |ER."]).(|fset 'fu|
|00004630| 6d 65 2d 66 69 6e 64 2d | 6e 65 78 74 2d 73 67 6d |me-find-|next-sgm|
|00004640| 6c 2d 65 6c 65 6d 65 6e | 74 2d 6e 61 6d 65 20 23 |l-elemen|t-name #|
|00004650| 5b 28 62 75 66 66 65 72 | 29 20 22 08 71 88 c1 5c |[(buffer|) ".q..\|
|00004660| 6e c3 c4 23 ad b0 c5 94 | c5 95 7b c6 94 c6 94 c6 |n..#....|..{.....|
|00004670| 95 7b 1e 07 1e 08 89 1e | 09 97 ca 98 ab 8a cb cc |.{......|........|
|00004680| 0e 07 cd 23 16 07 aa 88 | cb cc 0e 07 ce 23 16 07 |...#....|.....#..|
|00004690| 0e 07 0e 08 2b 42 87 22 | 20 5b 62 75 66 66 65 72 |....+B."| [buffer|
|000046a0| 20 72 65 2d 73 65 61 72 | 63 68 2d 66 6f 72 77 61 | re-sear|ch-forwa|
|000046b0| 72 64 20 66 75 6d 65 2d | 66 75 6e 63 74 69 6f 6e |rd fume-|function|
|000046c0| 2d 6e 61 6d 65 2d 72 65 | 67 65 78 70 20 6e 69 6c |-name-re|gexp nil|
|000046d0| 20 74 20 31 20 32 20 6e | 61 6d 65 20 62 65 67 20 | t 1 2 n|ame beg |
|000046e0| 74 79 70 65 20 22 65 6c | 65 6d 65 6e 74 22 20 66 |type "el|ement" f|
|000046f0| 6f 72 6d 61 74 20 22 25 | 2d 31 37 73 25 33 73 22 |ormat "%|-17s%3s"|
|00004700| 20 22 45 4c 22 20 22 45 | 4e 54 22 5d 20 35 20 22 | "EL" "E|NT"] 5 "|
|00004710| 5c 0a 53 65 61 72 63 68 | 65 73 20 66 6f 72 20 74 |\.Search|es for t|
|00004720| 68 65 20 6e 65 78 74 20 | 53 47 4d 4c 20 64 65 63 |he next |SGML dec|
|00004730| 6c 61 72 61 74 69 6f 6e | 20 69 6e 20 42 55 46 46 |laration| in BUFF|
|00004740| 45 52 2e 22 5d 29 0a 28 | 66 73 65 74 20 27 66 75 |ER."]).(|fset 'fu|
|00004750| 6d 65 2d 66 69 6e 64 2d | 6e 65 78 74 2d 61 64 61 |me-find-|next-ada|
|00004760| 2d 66 75 6e 63 74 69 6f | 6e 2d 6e 61 6d 65 20 23 |-functio|n-name #|
|00004770| 5b 28 62 75 66 66 65 72 | 29 20 22 08 71 88 c1 5c |[(buffer|) ".q..\|
|00004780| 6e 40 c3 c4 23 ad 9c 5c | 6e 41 94 5c 6e 41 95 1d |n@..#..\|nA.\nA..|
|00004790| 1e 06 c7 0e 08 21 ab 85 | c9 08 21 aa 87 0e 06 0d |.....!..|..!.....|
|000047a0| 7b 0e 06 42 2a 87 22 20 | 5b 62 75 66 66 65 72 20 |{..B*." |[buffer |
|000047b0| 72 65 2d 73 65 61 72 63 | 68 2d 66 6f 72 77 61 72 |re-searc|h-forwar|
|000047c0| 64 20 66 75 6d 65 2d 66 | 75 6e 63 74 69 6f 6e 2d |d fume-f|unction-|
|000047d0| 6e 61 6d 65 2d 72 65 67 | 65 78 70 2d 61 64 61 20 |name-reg|exp-ada |
|000047e0| 6e 69 6c 20 74 20 65 6e | 64 20 62 65 67 20 6c 6f |nil t en|d beg lo|
|000047f0| 6f 6b 69 6e 67 2d 61 74 | 20 66 75 6d 65 2d 66 75 |oking-at| fume-fu|
|00004800| 6e 63 74 69 6f 6e 2d 6e | 61 6d 65 2d 72 65 67 65 |nction-n|ame-rege|
|00004810| 78 70 2d 61 64 61 2d 69 | 67 6e 6f 72 65 20 66 75 |xp-ada-i|gnore fu|
|00004820| 6d 65 2d 66 69 6e 64 2d | 6e 65 78 74 2d 61 64 61 |me-find-|next-ada|
|00004830| 2d 66 75 6e 63 74 69 6f | 6e 2d 6e 61 6d 65 5d 20 |-functio|n-name] |
|00004840| 34 20 22 5c 0a 53 65 61 | 72 63 68 65 73 20 66 6f |4 "\.Sea|rches fo|
|00004850| 72 20 74 68 65 20 6e 65 | 78 74 20 61 64 61 20 66 |r the ne|xt ada f|
|00004860| 75 6e 63 74 69 6f 6e 20 | 69 6e 20 42 55 46 46 45 |unction |in BUFFE|
|00004870| 52 2e 22 5d 29 0a 28 66 | 73 65 74 20 27 66 75 6d |R."]).(f|set 'fum|
|00004880| 65 2d 66 69 6e 64 2d 6e | 65 78 74 2d 66 75 6e 63 |e-find-n|ext-func|
|00004890| 74 69 6f 6e 2d 6e 61 6d | 65 2d 6d 61 6b 65 20 23 |tion-nam|e-make #|
|000048a0| 5b 28 62 75 66 66 65 72 | 29 20 22 08 71 88 c1 5c |[(buffer|) ".q..\|
|000048b0| 6e c3 c4 23 ad 90 c5 94 | c5 95 1e 06 89 1e 07 0e |n..#....|........|
|000048c0| 06 7b 0e 07 2a 42 87 22 | 20 5b 62 75 66 66 65 72 |.{..*B."| [buffer|
|000048d0| 20 72 65 2d 73 65 61 72 | 63 68 2d 66 6f 72 77 61 | re-sear|ch-forwa|
|000048e0| 72 64 20 66 75 6d 65 2d | 66 75 6e 63 74 69 6f 6e |rd fume-|function|
|000048f0| 2d 6e 61 6d 65 2d 72 65 | 67 65 78 70 20 6e 69 6c |-name-re|gexp nil|
|00004900| 20 74 20 31 20 65 6e 64 | 20 62 65 67 5d 20 35 20 | t 1 end| beg] 5 |
|00004910| 22 5c 0a 53 65 61 72 63 | 68 65 73 20 66 6f 72 20 |"\.Searc|hes for |
|00004920| 74 68 65 20 6e 65 78 74 | 20 6d 61 6b 65 20 69 74 |the next| make it|
|00004930| 65 6d 20 69 6e 20 42 55 | 46 46 45 52 2e 22 5d 29 |em in BU|FFER."])|
|00004940| 0a 28 66 73 65 74 20 27 | 66 75 6d 65 2d 66 69 6e |.(fset '|fume-fin|
|00004950| 64 2d 6e 65 78 74 2d 70 | 61 73 63 61 6c 2d 66 75 |d-next-p|ascal-fu|
|00004960| 6e 63 74 69 6f 6e 2d 6e | 61 6d 65 20 23 5b 28 62 |nction-n|ame #[(b|
|00004970| 75 66 66 65 72 29 20 22 | 08 71 88 c1 5c 6e c3 c4 |uffer) "|.q..\n..|
|00004980| 23 ad 90 c5 94 c5 95 1e | 06 89 1e 07 0e 06 7b 0e |#.......|......{.|
|00004990| 07 2a 42 87 22 20 5b 62 | 75 66 66 65 72 20 72 65 |.*B." [b|uffer re|
|000049a0| 2d 73 65 61 72 63 68 2d | 66 6f 72 77 61 72 64 20 |-search-|forward |
|000049b0| 66 75 6d 65 2d 66 75 6e | 63 74 69 6f 6e 2d 6e 61 |fume-fun|ction-na|
|000049c0| 6d 65 2d 72 65 67 65 78 | 70 20 6e 69 6c 20 74 20 |me-regex|p nil t |
|000049d0| 32 20 65 6e 64 20 62 65 | 67 5d 20 35 20 22 5c 0a |2 end be|g] 5 "\.|
|000049e0| 53 65 61 72 63 68 65 73 | 20 66 6f 72 20 74 68 65 |Searches| for the|
|000049f0| 20 6e 65 78 74 20 70 61 | 73 63 61 6c 20 70 72 6f | next pa|scal pro|
|00004a00| 63 65 64 75 72 65 20 69 | 6e 20 42 55 46 46 45 52 |cedure i|n BUFFER|
|00004a10| 2e 22 5d 29 0a 28 66 73 | 65 74 20 27 66 75 6d 65 |."]).(fs|et 'fume|
|00004a20| 2d 66 69 6e 64 2d 6e 65 | 78 74 2d 76 65 72 69 6c |-find-ne|xt-veril|
|00004a30| 6f 67 2d 66 75 6e 63 74 | 69 6f 6e 2d 6e 61 6d 65 |og-funct|ion-name|
|00004a40| 20 23 5b 28 62 75 66 66 | 65 72 29 20 22 08 71 88 | #[(buff|er) ".q.|
|00004a50| c1 5c 6e c3 c4 23 ad 90 | c5 94 c5 95 1e 06 89 1e |.\n..#..|........|
|00004a60| 07 0e 06 7b 0e 07 2a 42 | 87 22 20 5b 62 75 66 66 |...{..*B|." [buff|
|00004a70| 65 72 20 72 65 2d 73 65 | 61 72 63 68 2d 66 6f 72 |er re-se|arch-for|
|00004a80| 77 61 72 64 20 66 75 6d | 65 2d 66 75 6e 63 74 69 |ward fum|e-functi|
|00004a90| 6f 6e 2d 6e 61 6d 65 2d | 72 65 67 65 78 70 20 6e |on-name-|regexp n|
|00004aa0| 69 6c 20 74 20 32 20 65 | 6e 64 20 62 65 67 5d 20 |il t 2 e|nd beg] |
|00004ab0| 35 20 22 5c 0a 53 65 61 | 72 63 68 65 73 20 66 6f |5 "\.Sea|rches fo|
|00004ac0| 72 20 74 68 65 20 6e 65 | 78 74 20 76 65 72 69 6c |r the ne|xt veril|
|00004ad0| 6f 67 20 6d 6f 64 75 6c | 65 20 69 6e 20 42 55 46 |og modul|e in BUF|
|00004ae0| 46 45 52 2e 22 5d 29 0a | 28 66 73 65 74 20 27 66 |FER."]).|(fset 'f|
|00004af0| 75 6d 65 2d 66 69 6e 64 | 2d 6e 65 78 74 2d 61 73 |ume-find|-next-as|
|00004b00| 6d 2d 66 75 6e 63 74 69 | 6f 6e 2d 6e 61 6d 65 20 |m-functi|on-name |
|00004b10| 23 5b 28 62 75 66 66 65 | 72 29 20 22 08 71 88 c1 |#[(buffe|r) ".q..|
|00004b20| 5c 6e c3 c4 23 ad 88 c5 | 94 c5 95 7b c5 94 42 87 |\n..#...|...{..B.|
|00004b30| 22 20 5b 62 75 66 66 65 | 72 20 72 65 2d 73 65 61 |" [buffe|r re-sea|
|00004b40| 72 63 68 2d 66 6f 72 77 | 61 72 64 20 66 75 6d 65 |rch-forw|ard fume|
|00004b50| 2d 66 75 6e 63 74 69 6f | 6e 2d 6e 61 6d 65 2d 72 |-functio|n-name-r|
|00004b60| 65 67 65 78 70 20 6e 69 | 6c 20 74 20 31 5d 20 34 |egexp ni|l t 1] 4|
|00004b70| 20 22 5c 0a 53 65 61 72 | 63 68 65 73 20 66 6f 72 | "\.Sear|ches for|
|00004b80| 20 74 68 65 20 6e 65 78 | 74 20 61 73 73 65 6d 62 | the nex|t assemb|
|00004b90| 6c 65 72 20 66 75 6e 63 | 74 69 6f 6e 20 69 6e 20 |ler func|tion in |
|00004ba0| 42 55 46 46 45 52 2e 22 | 5d 29 0a 28 64 65 66 63 |BUFFER."|]).(defc|
|00004bb0| 6f 6e 73 74 20 66 75 6d | 65 2d 66 69 6e 64 2d 66 |onst fum|e-find-f|
|00004bc0| 75 6e 63 74 69 6f 6e 2d | 6e 61 6d 65 2d 6d 65 74 |unction-|name-met|
|00004bd0| 68 6f 64 2d 61 6c 69 73 | 74 20 27 28 28 61 64 61 |hod-alis|t '((ada|
|00004be0| 2d 6d 6f 64 65 20 2e 20 | 66 75 6d 65 2d 66 69 6e |-mode . |fume-fin|
|00004bf0| 64 2d 6e 65 78 74 2d 61 | 64 61 2d 66 75 6e 63 74 |d-next-a|da-funct|
|00004c00| 69 6f 6e 2d 6e 61 6d 65 | 29 20 28 61 6c 69 63 65 |ion-name|) (alice|
|00004c10| 2d 6d 6f 64 65 20 2e 20 | 66 75 6d 65 2d 66 69 6e |-mode . |fume-fin|
|00004c20| 64 2d 6e 65 78 74 2d 70 | 79 74 68 6f 6e 2d 66 75 |d-next-p|ython-fu|
|00004c30| 6e 63 74 69 6f 6e 2d 6e | 61 6d 65 29 20 28 61 73 |nction-n|ame) (as|
|00004c40| 6d 2d 6d 6f 64 65 20 2e | 20 66 75 6d 65 2d 66 69 |m-mode .| fume-fi|
|00004c50| 6e 64 2d 6e 65 78 74 2d | 61 73 6d 2d 66 75 6e 63 |nd-next-|asm-func|
|00004c60| 74 69 6f 6e 2d 6e 61 6d | 65 29 20 28 62 61 63 69 |tion-nam|e) (baci|
|00004c70| 73 2d 6d 6f 64 65 20 2e | 20 66 75 6d 65 2d 66 69 |s-mode .| fume-fi|
|00004c80| 6e 64 2d 6e 65 78 74 2d | 62 61 63 69 73 2d 66 75 |nd-next-|bacis-fu|
|00004c90| 6e 63 74 69 6f 6e 2d 6e | 61 6d 65 29 20 28 62 69 |nction-n|ame) (bi|
|00004ca0| 62 74 65 78 2d 6d 6f 64 | 65 20 2e 20 66 75 6d 65 |btex-mod|e . fume|
|00004cb0| 2d 66 69 6e 64 2d 6e 65 | 78 74 2d 62 69 62 74 65 |-find-ne|xt-bibte|
|00004cc0| 78 2d 63 69 74 61 74 69 | 6f 6e 29 20 28 63 2b 2b |x-citati|on) (c++|
|00004cd0| 2d 6d 6f 64 65 20 2e 20 | 66 75 6d 65 2d 6d 61 74 |-mode . |fume-mat|
|00004ce0| 63 68 2d 66 69 6e 64 2d | 6e 65 78 74 2d 66 75 6e |ch-find-|next-fun|
|00004cf0| 63 74 69 6f 6e 2d 6e 61 | 6d 65 29 20 28 63 2d 6d |ction-na|me) (c-m|
|00004d00| 6f 64 65 20 2e 20 66 75 | 6d 65 2d 66 69 6e 64 2d |ode . fu|me-find-|
|00004d10| 6e 65 78 74 2d 63 2d 66 | 75 6e 63 74 69 6f 6e 2d |next-c-f|unction-|
|00004d20| 6e 61 6d 65 29 20 28 64 | 69 72 65 64 2d 6d 6f 64 |name) (d|ired-mod|
|00004d30| 65 20 2e 20 66 75 6d 65 | 2d 66 69 6e 64 2d 6e 65 |e . fume|-find-ne|
|00004d40| 78 74 2d 64 69 72 65 63 | 74 6f 72 79 2d 6e 61 6d |xt-direc|tory-nam|
|00004d50| 65 29 20 28 65 68 64 6d | 2d 6d 6f 64 65 20 2e 20 |e) (ehdm|-mode . |
|00004d60| 66 75 6d 65 2d 66 69 6e | 64 2d 6e 65 78 74 2d 65 |fume-fin|d-next-e|
|00004d70| 68 64 6d 2d 65 6e 74 69 | 74 79 29 20 28 66 61 6d |hdm-enti|ty) (fam|
|00004d80| 65 2d 6d 6f 64 65 20 2e | 20 66 75 6d 65 2d 66 69 |e-mode .| fume-fi|
|00004d90| 6e 64 2d 6e 65 78 74 2d | 70 61 73 63 61 6c 2d 66 |nd-next-|pascal-f|
|00004da0| 75 6e 63 74 69 6f 6e 2d | 6e 61 6d 65 29 20 28 66 |unction-|name) (f|
|00004db0| 6f 72 74 72 61 6e 2d 6d | 6f 64 65 20 2e 20 66 75 |ortran-m|ode . fu|
|00004dc0| 6d 65 2d 66 69 6e 64 2d | 6e 65 78 74 2d 66 6f 72 |me-find-|next-for|
|00004dd0| 74 72 61 6e 2d 66 75 6e | 63 74 69 6f 6e 2d 6e 61 |tran-fun|ction-na|
|00004de0| 6d 65 29 20 28 6b 73 68 | 2d 6d 6f 64 65 20 2e 20 |me) (ksh|-mode . |
|00004df0| 66 75 6d 65 2d 66 69 6e | 64 2d 6e 65 78 74 2d 6b |fume-fin|d-next-k|
|00004e00| 73 68 2d 66 75 6e 63 74 | 69 6f 6e 2d 6e 61 6d 65 |sh-funct|ion-name|
|00004e10| 29 20 28 6c 61 74 65 78 | 2d 6d 6f 64 65 20 2e 20 |) (latex|-mode . |
|00004e20| 66 75 6d 65 2d 66 69 6e | 64 2d 6e 65 78 74 2d 6c |fume-fin|d-next-l|
|00004e30| 61 74 65 78 2d 73 65 63 | 74 69 6f 6e 2d 6e 61 6d |atex-sec|tion-nam|
|00004e40| 65 29 20 28 4c 61 54 65 | 58 2d 6d 6f 64 65 20 2e |e) (LaTe|X-mode .|
|00004e50| 20 66 75 6d 65 2d 66 69 | 6e 64 2d 6e 65 78 74 2d | fume-fi|nd-next-|
|00004e60| 6c 61 74 65 78 2d 73 65 | 63 74 69 6f 6e 2d 6e 61 |latex-se|ction-na|
|00004e70| 6d 65 29 20 28 6d 61 6b | 65 66 69 6c 65 2d 6d 6f |me) (mak|efile-mo|
|00004e80| 64 65 20 2e 20 66 75 6d | 65 2d 66 69 6e 64 2d 6e |de . fum|e-find-n|
|00004e90| 65 78 74 2d 66 75 6e 63 | 74 69 6f 6e 2d 6e 61 6d |ext-func|tion-nam|
|00004ea0| 65 2d 6d 61 6b 65 29 20 | 28 6d 61 70 6c 65 2d 6d |e-make) |(maple-m|
|00004eb0| 6f 64 65 20 2e 20 66 75 | 6d 65 2d 66 69 6e 64 2d |ode . fu|me-find-|
|00004ec0| 6e 65 78 74 2d 6d 61 70 | 6c 65 2d 66 75 6e 63 74 |next-map|le-funct|
|00004ed0| 69 6f 6e 2d 6e 61 6d 65 | 29 20 28 6d 6f 64 75 6c |ion-name|) (modul|
|00004ee0| 61 2d 32 2d 6d 6f 64 65 | 20 2e 20 66 75 6d 65 2d |a-2-mode| . fume-|
|00004ef0| 66 69 6e 64 2d 6e 65 78 | 74 2d 6d 6f 64 75 6c 61 |find-nex|t-modula|
|00004f00| 2d 66 75 6e 63 74 69 6f | 6e 2d 6e 61 6d 65 29 20 |-functio|n-name) |
|00004f10| 28 6d 6f 64 75 6c 61 2d | 33 2d 6d 6f 64 65 20 2e |(modula-|3-mode .|
|00004f20| 20 66 75 6d 65 2d 66 69 | 6e 64 2d 6e 65 78 74 2d | fume-fi|nd-next-|
|00004f30| 6d 6f 64 75 6c 61 2d 66 | 75 6e 63 74 69 6f 6e 2d |modula-f|unction-|
|00004f40| 6e 61 6d 65 29 20 28 70 | 61 73 63 61 6c 2d 6d 6f |name) (p|ascal-mo|
|00004f50| 64 65 20 2e 20 66 75 6d | 65 2d 66 69 6e 64 2d 6e |de . fum|e-find-n|
|00004f60| 65 78 74 2d 70 61 73 63 | 61 6c 2d 66 75 6e 63 74 |ext-pasc|al-funct|
|00004f70| 69 6f 6e 2d 6e 61 6d 65 | 29 20 28 70 65 72 6c 2d |ion-name|) (perl-|
|00004f80| 6d 6f 64 65 20 2e 20 66 | 75 6d 65 2d 66 69 6e 64 |mode . f|ume-find|
|00004f90| 2d 6e 65 78 74 2d 70 65 | 72 6c 2d 66 75 6e 63 74 |-next-pe|rl-funct|
|00004fa0| 69 6f 6e 2d 6e 61 6d 65 | 29 20 28 70 6f 73 74 73 |ion-name|) (posts|
|00004fb0| 63 72 69 70 74 2d 6d 6f | 64 65 20 2e 20 66 75 6d |cript-mo|de . fum|
|00004fc0| 65 2d 66 69 6e 64 2d 6e | 65 78 74 2d 70 6f 73 74 |e-find-n|ext-post|
|00004fd0| 73 63 72 69 70 74 2d 66 | 75 6e 63 74 69 6f 6e 2d |script-f|unction-|
|00004fe0| 6e 61 6d 65 29 20 28 70 | 72 6f 6c 6f 67 2d 6d 6f |name) (p|rolog-mo|
|00004ff0| 64 65 20 2e 20 66 75 6d | 65 2d 66 69 6e 64 2d 6e |de . fum|e-find-n|
|00005000| 65 78 74 2d 70 72 6f 6c | 6f 67 2d 66 75 6e 63 74 |ext-prol|og-funct|
|00005010| 69 6f 6e 2d 6e 61 6d 65 | 29 20 28 70 76 73 2d 6d |ion-name|) (pvs-m|
|00005020| 6f 64 65 20 2e 20 66 75 | 6d 65 2d 66 69 6e 64 2d |ode . fu|me-find-|
|00005030| 6e 65 78 74 2d 70 76 73 | 2d 65 6e 74 69 74 79 29 |next-pvs|-entity)|
|00005040| 20 28 70 79 74 68 6f 6e | 2d 6d 6f 64 65 20 2e 20 | (python|-mode . |
|00005050| 66 75 6d 65 2d 66 69 6e | 64 2d 6e 65 78 74 2d 70 |fume-fin|d-next-p|
|00005060| 79 74 68 6f 6e 2d 66 75 | 6e 63 74 69 6f 6e 2d 6e |ython-fu|nction-n|
|00005070| 61 6d 65 29 20 28 73 63 | 68 65 6d 65 2d 6d 6f 64 |ame) (sc|heme-mod|
|00005080| 65 20 2e 20 66 75 6d 65 | 2d 66 69 6e 64 2d 6e 65 |e . fume|-find-ne|
|00005090| 78 74 2d 73 63 68 65 6d | 65 2d 66 75 6e 63 74 69 |xt-schem|e-functi|
|000050a0| 6f 6e 29 20 28 73 67 6d | 6c 2d 6d 6f 64 65 20 2e |on) (sgm|l-mode .|
|000050b0| 20 66 75 6d 65 2d 66 69 | 6e 64 2d 6e 65 78 74 2d | fume-fi|nd-next-|
|000050c0| 73 67 6d 6c 2d 65 6c 65 | 6d 65 6e 74 2d 6e 61 6d |sgml-ele|ment-nam|
|000050d0| 65 29 20 28 74 63 6c 2d | 6d 6f 64 65 20 2e 20 66 |e) (tcl-|mode . f|
|000050e0| 75 6d 65 2d 6d 61 74 63 | 68 2d 66 69 6e 64 2d 6e |ume-matc|h-find-n|
|000050f0| 65 78 74 2d 66 75 6e 63 | 74 69 6f 6e 2d 6e 61 6d |ext-func|tion-nam|
|00005100| 65 29 20 28 76 65 72 69 | 6c 6f 67 2d 6d 6f 64 65 |e) (veri|log-mode|
|00005110| 20 2e 20 66 75 6d 65 2d | 66 69 6e 64 2d 6e 65 78 | . fume-|find-nex|
|00005120| 74 2d 76 65 72 69 6c 6f | 67 2d 66 75 6e 63 74 69 |t-verilo|g-functi|
|00005130| 6f 6e 2d 6e 61 6d 65 29 | 29 20 22 5c 0a 54 68 65 |on-name)|) "\.The|
|00005140| 20 63 6f 6e 6e 65 63 74 | 69 6f 6e 20 62 65 74 77 | connect|ion betw|
|00005150| 65 65 6e 20 61 20 6d 6f | 64 65 20 61 6e 64 20 74 |een a mo|de and t|
|00005160| 68 65 20 64 65 66 75 6e | 20 74 68 61 74 20 66 69 |he defun| that fi|
|00005170| 6e 64 73 20 66 75 6e 63 | 74 69 6f 6e 20 6e 61 6d |nds func|tion nam|
|00005180| 65 73 2e 0a 49 66 20 6e | 6f 20 63 6f 6e 6e 65 63 |es..If n|o connec|
|00005190| 74 69 6f 6e 20 69 73 20 | 69 6e 20 74 68 69 73 20 |tion is |in this |
|000051a0| 61 6c 69 73 74 20 66 6f | 72 20 61 20 67 69 76 65 |alist fo|r a give|
|000051b0| 6e 20 6d 6f 64 65 2c 20 | 61 20 64 65 66 61 75 6c |n mode, |a defaul|
|000051c0| 74 20 6d 65 74 68 6f 64 | 20 69 73 20 75 73 65 64 |t method| is used|
|000051d0| 22 29 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |").(byte|-code ".|
|000051e0| c1 21 ab 87 c2 c3 c1 5c | 22 88 aa 84 c3 c4 4d 88 |.!.....\|".....M.|
|000051f0| c0 87 22 20 5b 66 62 6f | 75 6e 64 70 20 72 65 64 |.." [fbo|undp red|
|00005200| 72 61 77 2d 6d 6f 64 65 | 6c 69 6e 65 20 64 65 66 |raw-mode|line def|
|00005210| 61 6c 69 61 73 20 66 75 | 6d 65 2d 72 65 66 72 65 |alias fu|me-refre|
|00005220| 73 68 2d 6d 6f 64 65 6c | 69 6e 65 20 23 5b 6e 69 |sh-model|ine #[ni|
|00005230| 6c 20 22 c0 c1 20 21 87 | 22 20 5b 73 65 74 2d 62 |l ".. !.|" [set-b|
|00005240| 75 66 66 65 72 2d 6d 6f | 64 69 66 69 65 64 2d 70 |uffer-mo|dified-p|
|00005250| 20 62 75 66 66 65 72 2d | 6d 6f 64 69 66 69 65 64 | buffer-|modified|
|00005260| 2d 70 5d 20 32 5d 5d 20 | 33 29 0a 28 66 73 65 74 |-p] 2]] |3).(fset|
|00005270| 20 27 66 75 6d 65 2d 73 | 65 74 2d 64 65 66 61 75 | 'fume-s|et-defau|
|00005280| 6c 74 73 20 23 5b 6e 69 | 6c 20 22 c0 09 5c 6e 5c |lts #[ni|l "..\n\|
|00005290| 22 a3 4a 89 13 ab 8a c0 | 09 0c 5c 22 a3 ae 81 c5 |".J.....|..\"....|
|000052a0| 16 06 0b 87 22 20 5b 61 | 73 73 6f 63 20 6d 61 6a |...." [a|ssoc maj|
|000052b0| 6f 72 2d 6d 6f 64 65 20 | 66 75 6d 65 2d 66 75 6e |or-mode |fume-fun|
|000052c0| 63 74 69 6f 6e 2d 6e 61 | 6d 65 2d 72 65 67 65 78 |ction-na|me-regex|
|000052d0| 70 2d 61 6c 69 73 74 20 | 66 75 6d 65 2d 66 75 6e |p-alist |fume-fun|
|000052e0| 63 74 69 6f 6e 2d 6e 61 | 6d 65 2d 72 65 67 65 78 |ction-na|me-regex|
|000052f0| 70 20 66 75 6d 65 2d 66 | 69 6e 64 2d 66 75 6e 63 |p fume-f|ind-func|
|00005300| 74 69 6f 6e 2d 6e 61 6d | 65 2d 6d 65 74 68 6f 64 |tion-nam|e-method|
|00005310| 2d 61 6c 69 73 74 20 66 | 75 6d 65 2d 66 69 6e 64 |-alist f|ume-find|
|00005320| 2d 6e 65 78 74 2d 66 75 | 6e 63 74 69 6f 6e 2d 6e |-next-fu|nction-n|
|00005330| 61 6d 65 20 66 75 6d 65 | 2d 66 69 6e 64 2d 6e 65 |ame fume|-find-ne|
|00005340| 78 74 2d 66 75 6e 63 74 | 69 6f 6e 2d 6e 61 6d 65 |xt-funct|ion-name|
|00005350| 2d 6d 65 74 68 6f 64 5d | 20 34 20 22 5c 0a 52 65 |-method]| 4 "\.Re|
|00005360| 74 75 72 6e 73 20 6e 69 | 6c 20 69 66 20 75 6e 73 |turns ni|l if uns|
|00005370| 75 63 63 65 73 73 66 75 | 6c 20 69 6e 20 73 65 74 |uccessfu|l in set|
|00005380| 74 69 6e 67 20 75 70 20 | 62 75 66 66 65 72 2d 6c |ting up |buffer-l|
|00005390| 6f 63 61 6c 20 64 65 66 | 61 75 6c 74 73 2e 0a 4f |ocal def|aults..O|
|000053a0| 74 68 65 72 77 69 73 65 | 20 72 65 74 75 72 6e 73 |therwise| returns|
|000053b0| 20 66 75 6d 65 2d 66 75 | 6e 63 74 69 6f 6e 2d 6e | fume-fu|nction-n|
|000053c0| 61 6d 65 2d 72 65 67 65 | 78 70 22 5d 29 0a 28 62 |ame-rege|xp"]).(b|
|000053d0| 79 74 65 2d 63 6f 64 65 | 20 22 c0 c1 4d 88 c0 c2 |yte-code| "..M...|
|000053e0| 4e c3 3e ac 85 c4 c5 c0 | 5c 22 88 c6 c0 c2 c7 23 |N.>.....|\".....#|
|000053f0| 88 c8 c9 4d 88 c8 c2 4e | c3 3e ac 85 c4 c5 c8 5c |...M...N|.>.....\|
|00005400| 22 88 c6 c8 c2 c7 23 87 | 22 20 5b 66 75 6d 65 2d |".....#.|" [fume-|
|00005410| 61 64 64 2d 6d 65 6e 75 | 62 61 72 2d 65 6e 74 72 |add-menu|bar-entr|
|00005420| 79 20 23 5b 6e 69 6c 20 | 22 c0 8b 87 22 20 5b 28 |y #[nil |"..." [(|
|00005430| 28 66 75 6e 63 74 69 6f | 6e 2d 6d 65 6e 75 20 74 |(functio|n-menu t|
|00005440| 29 29 5d 20 31 20 6e 69 | 6c 20 6e 69 6c 5d 20 62 |))] 1 ni|l nil] b|
|00005450| 79 74 65 2d 6f 70 74 69 | 6d 69 7a 65 72 20 28 6e |yte-opti|mizer (n|
|00005460| 69 6c 20 62 79 74 65 2d | 63 6f 6d 70 69 6c 65 2d |il byte-|compile-|
|00005470| 69 6e 6c 69 6e 65 2d 65 | 78 70 61 6e 64 29 20 65 |inline-e|xpand) e|
|00005480| 72 72 6f 72 20 22 25 73 | 20 61 6c 72 65 61 64 79 |rror "%s| already|
|00005490| 20 68 61 73 20 61 20 62 | 79 74 65 2d 6f 70 74 69 | has a b|yte-opti|
|000054a0| 6d 69 7a 65 72 2c 20 63 | 61 6e 27 74 20 6d 61 6b |mizer, c|an't mak|
|000054b0| 65 20 69 74 20 69 6e 6c | 69 6e 65 22 20 70 75 74 |e it inl|ine" put|
|000054c0| 20 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 69 6e | byte-co|mpile-in|
|000054d0| 6c 69 6e 65 2d 65 78 70 | 61 6e 64 20 66 75 6d 65 |line-exp|and fume|
|000054e0| 2d 72 65 6d 6f 76 65 2d | 6d 65 6e 75 62 61 72 2d |-remove-|menubar-|
|000054f0| 65 6e 74 72 79 20 23 5b | 6e 69 6c 20 22 08 ad 8a |entry #[|nil "...|
|00005500| 09 ad 87 c2 0b 43 21 88 | c4 20 87 22 20 5b 66 75 |.....C!.|. ." [fu|
|00005510| 6d 65 2d 72 75 6e 6e 69 | 6e 67 2d 78 65 6d 61 63 |me-runni|ng-xemac|
|00005520| 73 20 63 75 72 72 65 6e | 74 2d 6d 65 6e 75 62 61 |s curren|t-menuba|
|00005530| 72 20 64 65 6c 65 74 65 | 2d 6d 65 6e 75 2d 69 74 |r delete|-menu-it|
|00005540| 65 6d 20 66 75 6d 65 2d | 6d 65 6e 75 62 61 72 2d |em fume-|menubar-|
|00005550| 6d 65 6e 75 2d 6e 61 6d | 65 20 66 75 6d 65 2d 72 |menu-nam|e fume-r|
|00005560| 65 66 72 65 73 68 2d 6d | 6f 64 65 6c 69 6e 65 5d |efresh-m|odeline]|
|00005570| 20 32 20 6e 69 6c 20 6e | 69 6c 5d 5d 20 34 29 0a | 2 nil n|il]] 4).|
|00005580| 28 66 73 65 74 20 27 66 | 75 6d 65 2d 75 70 64 61 |(fset 'f|ume-upda|
|00005590| 74 65 2d 6d 65 6e 75 62 | 61 72 2d 65 6e 74 72 79 |te-menub|ar-entry|
|000055a0| 20 23 5b 6e 69 6c 20 22 | 08 ad 8b c1 5c 6e 0b 5c | #[nil "|....\n.\|
|000055b0| 22 ad 85 c4 8b ad 81 c5 | 87 22 20 5b 66 75 6d 65 |".......|." [fume|
|000055c0| 2d 72 75 6e 6e 69 6e 67 | 2d 78 65 6d 61 63 73 20 |-running|-xemacs |
|000055d0| 61 73 73 6f 63 20 66 75 | 6d 65 2d 6d 65 6e 75 62 |assoc fu|me-menub|
|000055e0| 61 72 2d 6d 65 6e 75 2d | 6e 61 6d 65 20 63 75 72 |ar-menu-|name cur|
|000055f0| 72 65 6e 74 2d 6d 65 6e | 75 62 61 72 20 28 28 66 |rent-men|ubar ((f|
|00005600| 75 6e 63 74 69 6f 6e 2d | 6d 65 6e 75 20 74 29 29 |unction-|menu t))|
|00005610| 20 74 5d 20 33 20 22 5c | 0a 52 65 74 75 72 6e 73 | t] 3 "\|.Returns|
|00005620| 20 74 20 69 66 20 6d 65 | 6e 75 62 61 72 20 77 61 | t if me|nubar wa|
|00005630| 73 20 75 70 64 61 74 65 | 64 2e 20 4e 69 6c 20 6f |s update|d. Nil o|
|00005640| 74 68 65 72 77 69 73 65 | 22 5d 29 0a 28 62 79 74 |therwise|"]).(byt|
|00005650| 65 2d 63 6f 64 65 20 22 | c0 c1 4e c2 3e ac 85 c3 |e-code "|..N.>...|
|00005660| c4 c0 5c 22 88 c5 c0 c1 | c6 23 87 22 20 5b 66 75 |..\"....|.#." [fu|
|00005670| 6d 65 2d 75 70 64 61 74 | 65 2d 6d 65 6e 75 62 61 |me-updat|e-menuba|
|00005680| 72 2d 65 6e 74 72 79 20 | 62 79 74 65 2d 6f 70 74 |r-entry |byte-opt|
|00005690| 69 6d 69 7a 65 72 20 28 | 6e 69 6c 20 62 79 74 65 |imizer (|nil byte|
|000056a0| 2d 63 6f 6d 70 69 6c 65 | 2d 69 6e 6c 69 6e 65 2d |-compile|-inline-|
|000056b0| 65 78 70 61 6e 64 29 20 | 65 72 72 6f 72 20 22 25 |expand) |error "%|
|000056c0| 73 20 61 6c 72 65 61 64 | 79 20 68 61 73 20 61 20 |s alread|y has a |
|000056d0| 62 79 74 65 2d 6f 70 74 | 69 6d 69 7a 65 72 2c 20 |byte-opt|imizer, |
|000056e0| 63 61 6e 27 74 20 6d 61 | 6b 65 20 69 74 20 69 6e |can't ma|ke it in|
|000056f0| 6c 69 6e 65 22 20 70 75 | 74 20 62 79 74 65 2d 63 |line" pu|t byte-c|
|00005700| 6f 6d 70 69 6c 65 2d 69 | 6e 6c 69 6e 65 2d 65 78 |ompile-i|nline-ex|
|00005710| 70 61 6e 64 5d 20 34 29 | 0a 28 66 73 65 74 20 27 |pand] 4)|.(fset '|
|00005720| 66 75 6d 65 2d 74 72 69 | 6d 2d 73 74 72 69 6e 67 |fume-tri|m-string|
|00005730| 20 23 5b 28 73 74 72 69 | 6e 67 29 20 22 c0 c1 5c | #[(stri|ng) "..\|
|00005740| 6e 5c 22 ab 86 5c 6e c3 | 95 c4 4f 12 c0 c5 5c 6e |n\"..\n.|..O...\n|
|00005750| 5c 22 ab 86 5c 6e c3 89 | 94 4f 12 5c 6e 87 22 20 |\"..\n..|.O.\n." |
|00005760| 5b 73 74 72 69 6e 67 2d | 6d 61 74 63 68 20 22 5e |[string-|match "^|
|00005770| 5b 20 09 5d 2a 22 20 73 | 74 72 69 6e 67 20 30 20 |[ .]*" s|tring 0 |
|00005780| 6e 69 6c 20 22 5b 20 09 | 5d 2a 24 22 5d 20 33 20 |nil "[ .|]*$"] 3 |
|00005790| 22 5c 0a 52 65 74 75 72 | 6e 73 20 53 54 52 49 4e |"\.Retur|ns STRIN|
|000057a0| 47 20 77 69 74 68 20 6c | 65 61 64 69 6e 67 20 61 |G with l|eading a|
|000057b0| 6e 64 20 74 72 61 69 6c | 69 6e 67 20 77 68 69 74 |nd trail|ing whit|
|000057c0| 65 73 70 61 63 65 20 72 | 65 6d 6f 76 65 64 2e 22 |espace r|emoved."|
|000057d0| 5d 29 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |]).(byte|-code ".|
|000057e0| c1 4e c2 3e ac 85 c3 c4 | c0 5c 22 88 c5 c0 c1 c6 |.N.>....|.\".....|
|000057f0| 23 88 c7 c8 21 ac 83 c9 | 16 08 ca cb 4d 88 ca c1 |#...!...|....M...|
|00005800| 4e c2 3e ac 85 c3 c4 ca | 5c 22 88 c5 ca c1 c6 23 |N.>.....|\".....#|
|00005810| 88 cc cd 4d 88 cc c1 4e | c2 3e ac 85 c3 c4 cc 5c |...M...N|.>.....\|
|00005820| 22 88 c5 cc c1 c6 23 88 | ce cf 4d 88 ce c1 4e c2 |".....#.|..M...N.|
|00005830| 3e ac 85 c3 c4 ce 5c 22 | 88 c5 ce c1 c6 23 88 d0 |>.....\"|.....#..|
|00005840| d1 4d 88 c7 d2 21 ac 83 | c9 16 12 c5 d2 d3 d4 23 |.M...!..|.......#|
|00005850| 88 d5 d2 21 88 c5 d2 d6 | d7 23 88 c7 d8 21 ac 83 |...!....|.#...!..|
|00005860| c9 16 18 c5 d8 d3 d9 23 | 88 d5 d8 21 88 c5 d8 d6 |.......#|...!....|
|00005870| d7 23 88 da db 4d 88 dc | dd 21 ab 87 de df dd 5c |.#...M..|.!.....\|
|00005880| 22 88 aa 84 df e0 4d 88 | e1 e2 4d 88 e1 c1 4e c2 |".....M.|..M...N.|
|00005890| 3e ac 85 c3 c4 e1 5c 22 | 88 c5 e1 c1 c6 23 88 e3 |>.....\"|.....#..|
|000058a0| e4 4d 88 e3 c1 4e c2 3e | ac 85 c3 c4 e3 5c 22 88 |.M...N.>|.....\".|
|000058b0| c5 e3 c1 c6 23 88 e5 e6 | 4d 88 e5 c1 4e c2 3e ac |....#...|M...N.>.|
|000058c0| 85 c3 c4 e5 5c 22 88 c5 | e5 c1 c6 23 88 e7 e8 4d |....\"..|...#...M|
|000058d0| 88 e7 c1 4e c2 3e ac 85 | c3 c4 e7 5c 22 88 c5 e7 |...N.>..|...\"...|
|000058e0| c1 c6 23 88 e9 ea 4d 88 | eb ec 4d 88 ed ee 4d 88 |..#...M.|..M...M.|
|000058f0| ef f0 4d 88 f1 f2 4d 87 | 22 20 5b 66 75 6d 65 2d |..M...M.|" [fume-|
|00005900| 74 72 69 6d 2d 73 74 72 | 69 6e 67 20 62 79 74 65 |trim-str|ing byte|
|00005910| 2d 6f 70 74 69 6d 69 7a | 65 72 20 28 6e 69 6c 20 |-optimiz|er (nil |
|00005920| 62 79 74 65 2d 63 6f 6d | 70 69 6c 65 2d 69 6e 6c |byte-com|pile-inl|
|00005930| 69 6e 65 2d 65 78 70 61 | 6e 64 29 20 65 72 72 6f |ine-expa|nd) erro|
|00005940| 72 20 22 25 73 20 61 6c | 72 65 61 64 79 20 68 61 |r "%s al|ready ha|
|00005950| 73 20 61 20 62 79 74 65 | 2d 6f 70 74 69 6d 69 7a |s a byte|-optimiz|
|00005960| 65 72 2c 20 63 61 6e 27 | 74 20 6d 61 6b 65 20 69 |er, can'|t make i|
|00005970| 74 20 69 6e 6c 69 6e 65 | 22 20 70 75 74 20 62 79 |t inline|" put by|
|00005980| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 69 6e 6c 69 6e |te-compi|le-inlin|
|00005990| 65 2d 65 78 70 61 6e 64 | 20 62 6f 75 6e 64 70 20 |e-expand| boundp |
|000059a0| 66 75 6d 65 2d 73 79 6e | 74 61 78 2d 74 61 62 6c |fume-syn|tax-tabl|
|000059b0| 65 20 6e 69 6c 20 66 75 | 6d 65 2d 77 68 61 74 2d |e nil fu|me-what-|
|000059c0| 6c 6f 6f 6b 69 6e 67 2d | 61 74 20 23 5b 6e 69 6c |looking-|at #[nil|
|000059d0| 20 22 c0 c1 c2 20 21 1b | 1c 0d ac 89 c1 20 15 c6 | "... !.|..... ..|
|000059e0| c7 c8 0d 23 88 c9 8e ca | 0d 21 88 8a cb cc 21 ab |...#....|.!....!.|
|000059f0| 85 cd 75 88 aa 76 ce cc | c0 cf 23 ad 9b cd 75 88 |..u..v..|..#...u.|
|00005a00| 60 1e 10 d1 d2 21 88 cb | d3 21 ab 85 cd 75 88 aa |`....!..|.!...u..|
|00005a10| 76 0e 10 60 7b 89 14 29 | 2c 87 22 20 5b 6e 69 6c |v..`{..)|,." [nil|
|00005a20| 20 63 6f 70 79 2d 73 79 | 6e 74 61 78 2d 74 61 62 | copy-sy|ntax-tab|
|00005a30| 6c 65 20 73 79 6e 74 61 | 78 2d 74 61 62 6c 65 20 |le synta|x-table |
|00005a40| 6f 72 69 67 2d 73 79 6e | 74 61 78 2d 74 61 62 6c |orig-syn|tax-tabl|
|00005a50| 65 20 6e 61 6d 65 20 66 | 75 6d 65 2d 73 79 6e 74 |e name f|ume-synt|
|00005a60| 61 78 2d 74 61 62 6c 65 | 20 6d 6f 64 69 66 79 2d |ax-table| modify-|
|00005a70| 73 79 6e 74 61 78 2d 65 | 6e 74 72 79 20 35 38 20 |syntax-e|ntry 58 |
|00005a80| 22 77 22 20 28 28 73 65 | 74 2d 73 79 6e 74 61 78 |"w" ((se|t-syntax|
|00005a90| 2d 74 61 62 6c 65 20 6f | 72 69 67 2d 73 79 6e 74 |-table o|rig-synt|
|00005aa0| 61 78 2d 74 61 62 6c 65 | 29 29 20 73 65 74 2d 73 |ax-table|)) set-s|
|00005ab0| 79 6e 74 61 78 2d 74 61 | 62 6c 65 20 6c 6f 6f 6b |yntax-ta|ble look|
|00005ac0| 69 6e 67 2d 61 74 20 22 | 5c 5c 73 77 5c 5c 7c 5c |ing-at "|\\sw\\|\|
|00005ad0| 5c 73 5f 22 20 31 20 72 | 65 2d 73 65 61 72 63 68 |\s_" 1 r|e-search|
|00005ae0| 2d 62 61 63 6b 77 61 72 | 64 20 74 20 62 65 67 20 |-backwar|d t beg |
|00005af0| 66 6f 72 77 61 72 64 2d | 73 65 78 70 20 2d 31 20 |forward-|sexp -1 |
|00005b00| 22 5c 5c 73 27 22 5d 20 | 34 5d 20 66 75 6d 65 2d |"\\s'"] |4] fume-|
|00005b10| 66 75 6e 63 74 69 6f 6e | 2d 62 65 66 6f 72 65 2d |function|-before-|
|00005b20| 70 6f 69 6e 74 20 23 5b | 6e 69 6c 20 22 08 ac 87 |point #[|nil "...|
|00005b30| c1 20 ac 83 08 ad 8b c2 | 60 1b 1c 8a c5 c6 8d 88 |. ......|`.......|
|00005b40| 0c 2b 87 22 20 5b 66 75 | 6d 65 2d 6d 6f 64 65 6c |.+." [fu|me-model|
|00005b50| 69 6e 65 2d 66 75 6e 63 | 6c 69 73 74 20 66 75 6d |ine-func|list fum|
|00005b60| 65 2d 72 65 73 63 61 6e | 2d 62 75 66 66 65 72 20 |e-rescan|-buffer |
|00005b70| 6e 69 6c 20 70 74 20 72 | 65 73 75 6c 74 20 66 6f |nil pt r|esult fo|
|00005b80| 75 6e 64 20 28 6d 61 70 | 63 61 72 20 23 5b 28 70 |und (map|car #[(p|
|00005b90| 29 20 22 08 41 62 88 c1 | 79 88 5c 6e 60 59 ad 87 |) ".Ab..|y.\n`Y..|
|00005ba0| c3 c4 08 40 89 15 5c 22 | 87 22 20 5b 70 20 30 20 |...@..\"|." [p 0 |
|00005bb0| 70 74 20 74 68 72 6f 77 | 20 66 6f 75 6e 64 20 72 |pt throw| found r|
|00005bc0| 65 73 75 6c 74 5d 20 34 | 5d 20 66 75 6d 65 2d 6d |esult] 4|] fume-m|
|00005bd0| 6f 64 65 6c 69 6e 65 2d | 66 75 6e 63 6c 69 73 74 |odeline-|funclist|
|00005be0| 29 5d 20 32 5d 20 66 75 | 6d 65 2d 6d 61 79 62 65 |)] 2] fu|me-maybe|
|00005bf0| 2d 69 6e 73 74 61 6c 6c | 2d 6d 6f 64 65 6c 69 6e |-install|-modelin|
|00005c00| 65 2d 66 65 61 74 75 72 | 65 20 23 5b 6e 69 6c 20 |e-featur|e #[nil |
|00005c10| 22 c0 20 ad 9b 09 ac 88 | c2 0b 3e ac 83 c4 20 88 |". .....|..>... .|
|00005c20| c5 c3 21 88 c6 c3 c2 5c | 22 88 c7 20 88 c2 20 88 |..!....\|".. .. .|
|00005c30| c8 87 22 20 5b 66 75 6d | 65 2d 73 65 74 2d 64 65 |.." [fum|e-set-de|
|00005c40| 66 61 75 6c 74 73 20 66 | 75 6d 65 2d 6d 6f 64 65 |faults f|ume-mode|
|00005c50| 6c 69 6e 65 2d 66 75 6e | 63 6c 69 73 74 20 66 75 |line-fun|clist fu|
|00005c60| 6d 65 2d 74 69 63 6b 6c | 65 2d 6d 6f 64 65 6c 69 |me-tickl|e-modeli|
|00005c70| 6e 65 20 70 6f 73 74 2d | 63 6f 6d 6d 61 6e 64 2d |ne post-|command-|
|00005c80| 68 6f 6f 6b 20 66 75 6d | 65 2d 72 65 73 63 61 6e |hook fum|e-rescan|
|00005c90| 2d 62 75 66 66 65 72 20 | 6d 61 6b 65 2d 76 61 72 |-buffer |make-var|
|00005ca0| 69 61 62 6c 65 2d 62 75 | 66 66 65 72 2d 6c 6f 63 |iable-bu|ffer-loc|
|00005cb0| 61 6c 20 61 64 64 2d 68 | 6f 6f 6b 20 66 75 6d 65 |al add-h|ook fume|
|00005cc0| 2d 74 69 63 6b 6c 65 2d | 6d 6f 64 65 6c 69 6e 65 |-tickle-|modeline|
|00005cd0| 2d 31 20 74 5d 20 33 5d | 20 66 75 6d 65 2d 74 69 |-1 t] 3]| fume-ti|
|00005ce0| 63 6b 6c 65 2d 6d 6f 64 | 65 6c 69 6e 65 20 23 5b |ckle-mod|eline #[|
|00005cf0| 6e 69 6c 20 22 c0 09 19 | 1a 09 ad 97 0b ac 87 c4 |nil "...|........|
|00005d00| 20 ac 83 0b ad 8d c0 60 | 1d 1e 06 8a c7 c8 8d 88 | ......`|........|
|00005d10| 0e 06 2b 89 12 3f 3f 89 | 11 ab af 0e 09 ca cb cc |..+..??.|........|
|00005d20| 5c 6e 5c 22 1e 0d ce cf | 0e 0d 5c 22 ab 88 0e 0d |\n\"....|..\"....|
|00005d30| d0 95 c0 4f 16 0d ce d1 | 0e 0d 5c 22 ab 88 0e 0d |...O....|..\"....|
|00005d40| d0 89 94 4f 16 0d 0e 0d | 29 d2 51 44 aa 82 0e 13 |...O....|).QD....|
|00005d50| 16 14 2a d5 20 87 22 20 | 5b 6e 69 6c 20 66 75 6d |..*. ." |[nil fum|
|00005d60| 65 2d 64 69 73 70 6c 61 | 79 2d 69 6e 2d 6d 6f 64 |e-displa|y-in-mod|
|00005d70| 65 6c 69 6e 65 2d 70 20 | 66 6e 61 6d 65 20 66 75 |eline-p |fname fu|
|00005d80| 6d 65 2d 6d 6f 64 65 6c | 69 6e 65 2d 66 75 6e 63 |me-model|ine-func|
|00005d90| 6c 69 73 74 20 66 75 6d | 65 2d 72 65 73 63 61 6e |list fum|e-rescan|
|00005da0| 2d 62 75 66 66 65 72 20 | 70 74 20 72 65 73 75 6c |-buffer |pt resul|
|00005db0| 74 20 66 6f 75 6e 64 20 | 28 6d 61 70 63 61 72 20 |t found |(mapcar |
|00005dc0| 23 5b 28 70 29 20 22 08 | 41 62 88 c1 79 88 5c 6e |#[(p) ".|Ab..y.\n|
|00005dd0| 60 59 ad 87 c3 c4 08 40 | 89 15 5c 22 87 22 20 5b |`Y.....@|..\"." [|
|00005de0| 70 20 30 20 70 74 20 74 | 68 72 6f 77 20 66 6f 75 |p 0 pt t|hrow fou|
|00005df0| 6e 64 20 72 65 73 75 6c | 74 5d 20 34 5d 20 66 75 |nd resul|t] 4] fu|
|00005e00| 6d 65 2d 6d 6f 64 65 6c | 69 6e 65 2d 66 75 6e 63 |me-model|ine-func|
|00005e10| 6c 69 73 74 29 20 66 75 | 6d 65 2d 6d 6f 64 65 6c |list) fu|me-model|
|00005e20| 69 6e 65 2d 62 75 66 66 | 65 72 2d 69 64 65 6e 74 |ine-buff|er-ident|
|00005e30| 69 66 69 63 61 74 69 6f | 6e 2d 31 20 22 20 60 22 |ificatio|n-1 " `"|
|00005e40| 20 66 6f 72 6d 61 74 20 | 22 25 73 22 20 73 74 72 | format |"%s" str|
|00005e50| 69 6e 67 20 73 74 72 69 | 6e 67 2d 6d 61 74 63 68 |ing stri|ng-match|
|00005e60| 20 22 5e 5b 20 09 5d 2a | 22 20 30 20 22 5b 20 09 | "^[ .]*|" 0 "[ .|
|00005e70| 5d 2a 24 22 20 22 27 22 | 20 66 75 6d 65 2d 6d 6f |]*$" "'"| fume-mo|
|00005e80| 64 65 6c 69 6e 65 2d 62 | 75 66 66 65 72 2d 69 64 |deline-b|uffer-id|
|00005e90| 65 6e 74 69 66 69 63 61 | 74 69 6f 6e 2d 30 20 6d |entifica|tion-0 m|
|00005ea0| 6f 64 65 2d 6c 69 6e 65 | 2d 62 75 66 66 65 72 2d |ode-line|-buffer-|
|00005eb0| 69 64 65 6e 74 69 66 69 | 63 61 74 69 6f 6e 20 66 |identifi|cation f|
|00005ec0| 75 6d 65 2d 72 65 66 72 | 65 73 68 2d 6d 6f 64 65 |ume-refr|esh-mode|
|00005ed0| 6c 69 6e 65 5d 20 36 5d | 20 66 75 6d 65 2d 6d 6f |line] 6]| fume-mo|
|00005ee0| 64 65 6c 69 6e 65 2d 62 | 75 66 66 65 72 2d 69 64 |deline-b|uffer-id|
|00005ef0| 65 6e 74 69 66 69 63 61 | 74 69 6f 6e 2d 30 20 76 |entifica|tion-0 v|
|00005f00| 61 72 69 61 62 6c 65 2d | 64 6f 63 75 6d 65 6e 74 |ariable-|document|
|00005f10| 61 74 69 6f 6e 20 22 53 | 74 6f 72 61 67 65 20 66 |ation "S|torage f|
|00005f20| 6f 72 20 6f 72 69 67 69 | 6e 61 6c 20 6d 6f 64 65 |or origi|nal mode|
|00005f30| 6c 69 6e 65 2d 62 75 66 | 66 65 72 2d 69 64 65 6e |line-buf|fer-iden|
|00005f40| 74 69 66 69 63 61 74 69 | 6f 6e 22 20 6d 61 6b 65 |tificati|on" make|
|00005f50| 2d 76 61 72 69 61 62 6c | 65 2d 62 75 66 66 65 72 |-variabl|e-buffer|
|00005f60| 2d 6c 6f 63 61 6c 20 70 | 65 72 6d 61 6e 65 6e 74 |-local p|ermanent|
|00005f70| 2d 6c 6f 63 61 6c 20 74 | 20 66 75 6d 65 2d 6d 6f |-local t| fume-mo|
|00005f80| 64 65 6c 69 6e 65 2d 62 | 75 66 66 65 72 2d 69 64 |deline-b|uffer-id|
|00005f90| 65 6e 74 69 66 69 63 61 | 74 69 6f 6e 2d 31 20 22 |entifica|tion-1 "|
|00005fa0| 53 74 6f 72 61 67 65 20 | 66 6f 72 20 6d 75 6e 67 |Storage |for mung|
|00005fb0| 65 64 20 6d 6f 64 65 6c | 69 6e 65 2d 62 75 66 66 |ed model|ine-buff|
|00005fc0| 65 72 2d 69 64 65 6e 74 | 69 66 69 63 61 74 69 6f |er-ident|ificatio|
|00005fd0| 6e 22 20 66 75 6d 65 2d | 74 69 63 6b 6c 65 2d 6d |n" fume-|tickle-m|
|00005fe0| 6f 64 65 6c 69 6e 65 2d | 31 20 23 5b 6e 69 6c 20 |odeline-|1 #[nil |
|00005ff0| 22 08 ac 82 09 10 c2 1b | c4 c5 08 5c 22 29 89 16 |".......|...\")..|
|00006000| 06 87 22 20 5b 66 75 6d | 65 2d 6d 6f 64 65 6c 69 |.." [fum|e-modeli|
|00006010| 6e 65 2d 62 75 66 66 65 | 72 2d 69 64 65 6e 74 69 |ne-buffe|r-identi|
|00006020| 66 69 63 61 74 69 6f 6e | 2d 30 20 6d 6f 64 65 2d |fication|-0 mode-|
|00006030| 6c 69 6e 65 2d 62 75 66 | 66 65 72 2d 69 64 65 6e |line-buf|fer-iden|
|00006040| 74 69 66 69 63 61 74 69 | 6f 6e 20 6e 69 6c 20 6e |tificati|on nil n|
|00006050| 65 77 53 65 71 20 6d 61 | 70 63 61 72 20 23 5b 28 |ewSeq ma|pcar #[(|
|00006060| 6f 6c 64 53 65 71 29 20 | 22 08 3b ab 97 c1 c2 08 |oldSeq) |".;.....|
|00006070| 5c 22 ab 91 c3 08 21 89 | 14 c5 95 53 c6 c7 21 49 |\"....!.|...S..!I|
|00006080| ab 83 0c ae 81 08 87 22 | 20 5b 6f 6c 64 53 65 71 |......."| [oldSeq|
|00006090| 20 73 74 72 69 6e 67 2d | 6d 61 74 63 68 20 22 25 | string-|match "%|
|000060a0| 5b 30 2d 39 5d 2a 66 22 | 20 63 6f 70 79 2d 73 65 |[0-9]*f"| copy-se|
|000060b0| 71 75 65 6e 63 65 20 6e | 65 77 53 65 71 20 30 20 |quence n|ewSeq 0 |
|000060c0| 73 74 72 69 6e 67 2d 74 | 6f 2d 63 68 61 72 20 22 |string-t|o-char "|
|000060d0| 62 22 5d 20 34 5d 20 66 | 75 6d 65 2d 6d 6f 64 65 |b"] 4] f|ume-mode|
|000060e0| 6c 69 6e 65 2d 62 75 66 | 66 65 72 2d 69 64 65 6e |line-buf|fer-iden|
|000060f0| 74 69 66 69 63 61 74 69 | 6f 6e 2d 31 5d 20 33 5d |tificati|on-1] 3]|
|00006100| 20 66 62 6f 75 6e 64 70 | 20 63 6f 70 79 2d 74 72 | fboundp| copy-tr|
|00006110| 65 65 20 64 65 66 61 6c | 69 61 73 20 66 75 6d 65 |ee defal|ias fume|
|00006120| 2d 73 68 61 6c 6c 6f 77 | 2d 63 6f 70 79 2d 6c 69 |-shallow|-copy-li|
|00006130| 73 74 20 23 5b 28 6c 69 | 73 74 29 20 22 c0 c1 5c |st #[(li|st) "..\|
|00006140| 6e 5c 22 87 22 20 5b 6d | 61 70 63 61 72 20 23 5b |n\"." [m|apcar #[|
|00006150| 28 69 29 20 22 08 40 08 | 41 42 87 22 20 5b 69 5d |(i) ".@.|AB." [i]|
|00006160| 20 32 5d 20 6c 69 73 74 | 5d 20 33 5d 20 66 75 6d | 2] list|] 3] fum|
|00006170| 65 2d 73 6f 72 74 2d 62 | 79 2d 6e 61 6d 65 20 23 |e-sort-b|y-name #|
|00006180| 5b 28 69 74 65 6d 31 20 | 69 74 65 6d 32 29 20 22 |[(item1 |item2) "|
|00006190| 08 40 09 40 99 ae 85 08 | 40 09 40 98 87 22 20 5b |.@.@....|@.@.." [|
|000061a0| 69 74 65 6d 31 20 69 74 | 65 6d 32 5d 20 32 5d 20 |item1 it|em2] 2] |
|000061b0| 66 75 6d 65 2d 73 6f 72 | 74 2d 62 79 2d 70 6f 73 |fume-sor|t-by-pos|
|000061c0| 69 74 69 6f 6e 20 23 5b | 28 69 74 65 6d 31 20 69 |ition #[|(item1 i|
|000061d0| 74 65 6d 32 29 20 22 08 | 41 09 41 58 87 22 20 5b |tem2) ".|A.AX." [|
|000061e0| 69 74 65 6d 31 20 69 74 | 65 6d 32 5d 20 32 5d 20 |item1 it|em2] 2] |
|000061f0| 66 75 6d 65 2d 72 65 6c | 61 74 69 76 65 2d 70 6f |fume-rel|ative-po|
|00006200| 73 69 74 69 6f 6e 20 23 | 5b 6e 69 6c 20 22 60 c0 |sition #|[nil "`.|
|00006210| 20 19 1a 09 c3 56 ab 8a | 5c 6e 53 09 c4 a5 c5 5d | ....V..|\nS....]|
|00006220| a5 aa 88 5c 6e 53 c4 5f | 09 c5 5d a5 2a 87 22 20 |...\nS._|..].*." |
|00006230| 5b 62 75 66 66 65 72 2d | 73 69 7a 65 20 74 6f 74 |[buffer-|size tot|
|00006240| 61 6c 20 70 6f 73 20 35 | 30 30 30 30 20 31 30 30 |al pos 5|0000 100|
|00006250| 20 31 5d 20 33 5d 20 66 | 75 6d 65 2d 73 70 6c 69 | 1] 3] f|ume-spli|
|00006260| 74 20 23 5b 28 6c 69 73 | 74 20 6e 29 20 22 c0 c1 |t #[(lis|t n) "..|
|00006270| 89 5c 6e 1b 1c 1d 1e 06 | 0b ab 9f 0e 07 0b 40 0c |.\n.....|......@.|
|00006280| 42 14 0b 41 13 0e 06 54 | 89 16 06 55 ab 6a 0c 9f |B..A...T|...U.j..|
|00006290| 0d 42 15 c1 14 c0 16 06 | aa 5e 0c ab 85 0c 9f 0d |.B......|.^......|
|000062a0| 42 15 0d 9f 2c 87 22 20 | 5b 30 20 6e 69 6c 20 6c |B...,." |[0 nil l|
|000062b0| 69 73 74 20 72 65 6d 61 | 69 6e 20 73 75 62 6c 69 |ist rema|in subli|
|000062c0| 73 74 20 72 65 73 75 6c | 74 20 69 20 6e 5d 20 34 |st resul|t i n] 4|
|000062d0| 5d 20 66 75 6d 65 2d 69 | 6e 64 65 78 2d 73 75 62 |] fume-i|ndex-sub|
|000062e0| 6c 69 73 74 2d 6d 65 74 | 68 6f 64 2d 30 20 23 5b |list-met|hod-0 #[|
|000062f0| 28 73 75 62 6c 69 73 74 | 20 63 6f 75 6e 74 29 20 |(sublist| count) |
|00006300| 22 c0 09 50 87 22 20 5b | 22 46 75 6e 63 74 69 6f |"..P." [|"Functio|
|00006310| 6e 20 73 75 62 6c 69 73 | 74 20 23 22 20 63 6f 75 |n sublis|t #" cou|
|00006320| 6e 74 5d 20 32 5d 20 66 | 75 6d 65 2d 69 6e 64 65 |nt] 2] f|ume-inde|
|00006330| 78 2d 73 75 62 6c 69 73 | 74 2d 6d 65 74 68 6f 64 |x-sublis|t-method|
|00006340| 2d 31 20 23 5b 28 73 75 | 62 6c 69 73 74 20 26 72 |-1 #[(su|blist &r|
|00006350| 65 73 74 20 63 6f 75 6e | 74 29 20 22 08 40 40 c1 |est coun|t) ".@@.|
|00006360| c2 4f 08 47 53 08 38 40 | c1 c2 4f 1b 1c c5 c6 0c |.O.GS.8@|..O.....|
|00006370| 89 0b 98 ab 83 c7 aa 84 | c5 c8 0b 5c 22 23 2a 87 |........|...\"#*.|
|00006380| 22 20 5b 73 75 62 6c 69 | 73 74 20 30 20 31 20 65 |" [subli|st 0 1 e|
|00006390| 20 73 20 66 6f 72 6d 61 | 74 20 22 46 75 6e 63 74 | s forma|t "Funct|
|000063a0| 69 6f 6e 20 73 75 62 6c | 69 73 74 20 28 25 73 25 |ion subl|ist (%s%|
|000063b0| 73 29 22 20 22 3c 3e 22 | 20 22 3c 3e 2d 25 73 3c |s)" "<>"| "<>-%s<|
|000063c0| 3e 22 5d 20 36 20 6e 69 | 6c 20 6e 69 6c 5d 20 66 |>"] 6 ni|l nil] f|
|000063d0| 75 6d 65 2d 69 6e 64 65 | 78 2d 73 75 62 6c 69 73 |ume-inde|x-sublis|
|000063e0| 74 2d 6d 65 74 68 6f 64 | 2d 32 20 23 5b 28 73 75 |t-method|-2 #[(su|
|000063f0| 62 6c 69 73 74 20 26 72 | 65 73 74 20 63 6f 75 6e |blist &r|est coun|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.