/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / gnu / lucid / lemacs-19.6 / lisp / packages / apropos.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 77 7a 40 74 68 61 |piled by| jwz@tha|
|00000020| 6c 69 64 6f 6d 69 64 65 | 20 6f 6e 20 4d 6f 6e 20 |lidomide| on Mon |
|00000030| 46 65 62 20 20 31 20 31 | 39 3a 30 33 3a 34 36 20 |Feb  1 1|9:03:46 |
|00000040| 31 39 39 33 0a 3b 3b 3b | 20 66 72 6f 6d 20 66 69 |1993.;;;| from fi|
|00000050| 6c 65 20 2f 63 61 64 69 | 6c 6c 61 63 31 2f 63 6f |le /cadi|llac1/co|
|00000060| 64 65 2f 62 75 69 6c 64 | 2f 6c 65 6d 61 63 73 2f |de/build|/lemacs/|
|00000070| 6c 69 73 70 2f 70 61 63 | 6b 61 67 65 73 2f 61 70 |lisp/pac|kages/ap|
|00000080| 72 6f 70 6f 73 2e 65 6c | 0a 3b 3b 3b 20 65 6d 61 |ropos.el|.;;; ema|
|00000090| 63 73 20 76 65 72 73 69 | 6f 6e 20 31 39 2e 34 2e |cs versi|on 19.4.|
|000000a0| 31 33 20 4c 75 63 69 64 | 2e 0a 3b 3b 3b 20 62 79 |13 Lucid|..;;; by|
|000000b0| 74 65 63 6f 6d 70 20 76 | 65 72 73 69 6f 6e 20 32 |tecomp v|ersion 2|
|000000c0| 2e 31 30 3b 20 20 31 2d | 66 65 62 2d 39 33 2e 0a |.10;  1-|feb-93..|
|000000d0| 3b 3b 3b 20 6f 70 74 69 | 6d 69 7a 61 74 69 6f 6e |;;; opti|mization|
|000000e0| 20 69 73 20 6f 6e 2e 0a | 3b 3b 3b 20 74 68 69 73 | is on..|;;; this|
|000000f0| 20 66 69 6c 65 20 75 73 | 65 73 20 6f 70 63 6f 64 | file us|es opcod|
|00000100| 65 73 20 77 68 69 63 68 | 20 64 6f 20 6e 6f 74 20 |es which| do not |
|00000110| 65 78 69 73 74 20 69 6e | 20 45 6d 61 63 73 31 38 |exist in| Emacs18|
|00000120| 2e 0a 0a 28 69 66 20 28 | 61 6e 64 20 28 62 6f 75 |...(if (|and (bou|
|00000130| 6e 64 70 20 27 65 6d 61 | 63 73 2d 76 65 72 73 69 |ndp 'ema|cs-versi|
|00000140| 6f 6e 29 0a 09 20 28 6f | 72 20 28 61 6e 64 20 28 |on).. (o|r (and (|
|00000150| 62 6f 75 6e 64 70 20 27 | 65 70 6f 63 68 3a 3a 76 |boundp '|epoch::v|
|00000160| 65 72 73 69 6f 6e 29 20 | 65 70 6f 63 68 3a 3a 76 |ersion) |epoch::v|
|00000170| 65 72 73 69 6f 6e 29 0a | 09 20 20 20 20 20 28 73 |ersion).|.     (s|
|00000180| 74 72 69 6e 67 2d 6c 65 | 73 73 70 20 65 6d 61 63 |tring-le|ssp emac|
|00000190| 73 2d 76 65 72 73 69 6f | 6e 20 22 31 39 22 29 29 |s-versio|n "19"))|
|000001a0| 29 0a 20 20 20 20 28 65 | 72 72 6f 72 20 22 54 68 |).    (e|rror "Th|
|000001b0| 69 73 20 66 69 6c 65 20 | 77 61 73 20 63 6f 6d 70 |is file |was comp|
|000001c0| 69 6c 65 64 20 66 6f 72 | 20 45 6d 61 63 73 31 39 |iled for| Emacs19|
|000001d0| 2e 22 29 29 0a 0a 28 64 | 65 66 76 61 72 20 61 70 |."))..(d|efvar ap|
|000001e0| 72 6f 70 6f 73 2d 64 6f | 2d 61 6c 6c 20 6e 69 6c |ropos-do|-all nil|
|000001f0| 20 22 5c 0a 2a 57 68 65 | 74 68 65 72 20 60 61 70 | "\.*Whe|ther `ap|
|00000200| 72 6f 70 6f 73 27 20 61 | 6e 64 20 60 73 75 70 65 |ropos' a|nd `supe|
|00000210| 72 2d 61 70 72 6f 70 6f | 73 27 20 73 68 6f 75 6c |r-apropo|s' shoul|
|00000220| 64 20 64 6f 20 65 76 65 | 72 79 74 68 69 6e 67 20 |d do eve|rything |
|00000230| 74 68 61 74 20 74 68 65 | 79 20 63 61 6e 2e 0a 4d |that the|y can..M|
|00000240| 61 6b 65 73 20 74 68 65 | 6d 20 72 75 6e 20 32 20 |akes the|m run 2 |
|00000250| 6f 72 20 33 20 74 69 6d | 65 73 20 73 6c 6f 77 65 |or 3 tim|es slowe|
|00000260| 72 2e 20 20 53 65 74 20 | 74 68 69 73 20 6e 6f 6e |r.  Set |this non|
|00000270| 2d 6e 69 6c 20 69 66 20 | 79 6f 75 20 68 61 76 65 |-nil if |you have|
|00000280| 20 61 20 66 61 73 74 0a | 6d 61 63 68 69 6e 65 2e | a fast.|machine.|
|00000290| 22 29 0a 28 66 73 65 74 | 20 27 61 70 72 6f 70 6f |").(fset| 'apropo|
|000002a0| 73 20 23 5b 28 72 65 67 | 65 78 70 20 26 6f 70 74 |s #[(reg|exp &opt|
|000002b0| 69 6f 6e 61 6c 20 64 6f | 2d 61 6c 6c 20 70 72 65 |ional do|-all pre|
|000002c0| 64 29 20 22 08 ae 81 09 | 11 c2 0b 0c 5c 22 1d c6 |d) "....|....\"..|
|000002d0| 0d 21 88 c7 90 c8 0d 0b | c9 09 24 91 88 0d 29 87 |.!......|..$...).|
|000002e0| 22 20 5b 61 70 72 6f 70 | 6f 73 2d 64 6f 2d 61 6c |" [aprop|os-do-al|
|000002f0| 6c 20 64 6f 2d 61 6c 6c | 20 61 70 72 6f 70 6f 73 |l do-all| apropos|
|00000300| 2d 69 6e 74 65 72 6e 61 | 6c 20 72 65 67 65 78 70 |-interna|l regexp|
|00000310| 20 70 72 65 64 20 61 70 | 72 6f 70 6f 73 2d 61 63 | pred ap|ropos-ac|
|00000320| 63 75 6d 75 6c 61 74 65 | 20 61 70 72 6f 70 6f 73 |cumulate| apropos|
|00000330| 2d 67 65 74 2d 64 6f 63 | 20 22 2a 48 65 6c 70 2a |-get-doc| "*Help*|
|00000340| 22 20 61 70 72 6f 70 6f | 73 2d 70 72 69 6e 74 2d |" apropo|s-print-|
|00000350| 6d 61 74 63 68 65 73 20 | 6e 69 6c 5d 20 36 20 22 |matches |nil] 6 "|
|00000360| 5c 0a 53 68 6f 77 20 61 | 6c 6c 20 73 79 6d 62 6f |\.Show a|ll symbo|
|00000370| 6c 73 20 77 68 6f 73 65 | 20 6e 61 6d 65 73 20 63 |ls whose| names c|
|00000380| 6f 6e 74 61 69 6e 20 6d | 61 74 63 68 65 73 20 66 |ontain m|atches f|
|00000390| 6f 72 20 52 45 47 45 58 | 50 2e 0a 49 66 20 6f 70 |or REGEX|P..If op|
|000003a0| 74 69 6f 6e 61 6c 20 61 | 72 67 75 6d 65 6e 74 20 |tional a|rgument |
|000003b0| 44 4f 2d 41 4c 4c 20 69 | 73 20 6e 6f 6e 2d 6e 69 |DO-ALL i|s non-ni|
|000003c0| 6c 2c 20 64 6f 65 73 20 | 6d 6f 72 65 20 28 74 69 |l, does |more (ti|
|000003d0| 6d 65 2d 63 6f 6e 73 75 | 6d 69 6e 67 29 20 77 6f |me-consu|ming) wo|
|000003e0| 72 6b 20 73 75 63 68 20 | 61 73 0a 73 68 6f 77 69 |rk such |as.showi|
|000003f0| 6e 67 20 6b 65 79 20 62 | 69 6e 64 69 6e 67 73 2e |ng key b|indings.|
|00000400| 20 20 4f 70 74 69 6f 6e | 61 6c 20 61 72 67 75 6d |  Option|al argum|
|00000410| 65 6e 74 20 50 52 45 44 | 20 69 73 20 63 61 6c 6c |ent PRED| is call|
|00000420| 65 64 20 77 69 74 68 20 | 65 61 63 68 20 73 79 6d |ed with |each sym|
|00000430| 62 6f 6c 2c 20 61 6e 64 | 0a 69 66 20 69 74 20 72 |bol, and|.if it r|
|00000440| 65 74 75 72 6e 73 20 6e | 69 6c 2c 20 74 68 65 20 |eturns n|il, the |
|00000450| 73 79 6d 62 6f 6c 20 69 | 73 20 6e 6f 74 20 73 68 |symbol i|s not sh|
|00000460| 6f 77 6e 2e 20 20 52 65 | 74 75 72 6e 73 20 6c 69 |own.  Re|turns li|
|00000470| 73 74 20 6f 66 20 73 79 | 6d 62 6f 6c 73 20 61 6e |st of sy|mbols an|
|00000480| 64 0a 64 6f 63 75 6d 65 | 6e 74 61 74 69 6f 6e 20 |d.docume|ntation |
|00000490| 66 6f 75 6e 64 2e 22 20 | 22 73 41 70 72 6f 70 6f |found." |"sApropo|
|000004a0| 73 20 28 72 65 67 65 78 | 70 29 3a 20 5c 6e 50 22 |s (regex|p): \nP"|
|000004b0| 5d 29 0a 28 66 73 65 74 | 20 27 61 70 72 6f 70 6f |]).(fset| 'apropo|
|000004c0| 73 2d 67 65 74 2d 64 6f | 63 20 23 5b 28 6c 69 73 |s-get-do|c #[(lis|
|000004d0| 74 29 20 22 08 c1 89 89 | 1a 1b 1c 89 1d 3a ab b4 |t) "....|.....:..|
|000004e0| 0d 40 12 c6 5c 6e 21 ad | 83 c7 5c 6e 21 14 c8 5c |.@..\n!.|..\n!..\|
|000004f0| 6e c9 5c 22 13 0c ad 87 | 0c ca cb cc 0c 5c 22 4f |n.\"....|.....\"O|
|00000500| 14 0b ad 87 0b ca cb cc | 0b 5c 22 4f 13 0d 5c 6e |........|.\"O..\n|
|00000510| 0c 0b 45 a0 88 0d 41 89 | 15 aa 49 08 2c 87 22 20 |..E...A.|..I.,." |
|00000520| 5b 6c 69 73 74 20 6e 69 | 6c 20 73 79 6d 62 6f 6c |[list ni|l symbol|
|00000530| 20 76 61 72 2d 64 6f 63 | 20 66 6e 2d 64 6f 63 20 | var-doc| fn-doc |
|00000540| 70 20 66 62 6f 75 6e 64 | 70 20 64 6f 63 75 6d 65 |p fbound|p docume|
|00000550| 6e 74 61 74 69 6f 6e 20 | 64 6f 63 75 6d 65 6e 74 |ntation |document|
|00000560| 61 74 69 6f 6e 2d 70 72 | 6f 70 65 72 74 79 20 76 |ation-pr|operty v|
|00000570| 61 72 69 61 62 6c 65 2d | 64 6f 63 75 6d 65 6e 74 |ariable-|document|
|00000580| 61 74 69 6f 6e 20 30 20 | 73 74 72 69 6e 67 2d 6d |ation 0 |string-m|
|00000590| 61 74 63 68 20 22 5c 6e | 22 5d 20 36 5d 29 0a 28 |atch "\n|"] 6]).(|
|000005a0| 66 73 65 74 20 27 73 75 | 70 65 72 2d 61 70 72 6f |fset 'su|per-apro|
|000005b0| 70 6f 73 20 23 5b 28 72 | 65 67 65 78 70 20 26 6f |pos #[(r|egexp &o|
|000005c0| 70 74 69 6f 6e 61 6c 20 | 64 6f 2d 61 6c 6c 29 20 |ptional |do-all) |
|000005d0| 22 08 ae 81 09 11 c2 89 | 89 89 1b 1c 1d 1e 06 c7 |".......|........|
|000005e0| 0e 08 21 16 06 09 ab 84 | c9 ca 21 88 cb 90 cc 0e |..!.....|..!.....|
|000005f0| 06 c2 cd 09 24 91 88 0e | 06 2c 87 22 20 5b 61 70 |....$...|.,." [ap|
|00000600| 72 6f 70 6f 73 2d 64 6f | 2d 61 6c 6c 20 64 6f 2d |ropos-do|-all do-|
|00000610| 61 6c 6c 20 6e 69 6c 20 | 69 74 65 6d 20 76 61 72 |all nil |item var|
|00000620| 2d 64 6f 63 20 66 6e 2d | 64 6f 63 20 61 70 72 6f |-doc fn-|doc apro|
|00000630| 70 6f 73 2d 61 63 63 75 | 6d 75 6c 61 74 65 20 73 |pos-accu|mulate s|
|00000640| 75 70 65 72 2d 61 70 72 | 6f 70 6f 73 2d 63 68 65 |uper-apr|opos-che|
|00000650| 63 6b 2d 64 6f 63 2d 66 | 69 6c 65 20 72 65 67 65 |ck-doc-f|ile rege|
|00000660| 78 70 20 6d 61 70 61 74 | 6f 6d 73 20 73 75 70 65 |xp mapat|oms supe|
|00000670| 72 2d 61 70 72 6f 70 6f | 73 2d 61 63 63 75 6d 75 |r-apropo|s-accumu|
|00000680| 6c 61 74 65 20 22 2a 48 | 65 6c 70 2a 22 20 61 70 |late "*H|elp*" ap|
|00000690| 72 6f 70 6f 73 2d 70 72 | 69 6e 74 2d 6d 61 74 63 |ropos-pr|int-matc|
|000006a0| 68 65 73 20 74 5d 20 36 | 20 22 5c 0a 53 68 6f 77 |hes t] 6| "\.Show|
|000006b0| 20 73 79 6d 62 6f 6c 73 | 20 77 68 6f 73 65 20 6e | symbols| whose n|
|000006c0| 61 6d 65 73 2f 64 6f 63 | 75 6d 65 6e 74 61 74 69 |ames/doc|umentati|
|000006d0| 6f 6e 20 63 6f 6e 74 61 | 69 6e 20 6d 61 74 63 68 |on conta|in match|
|000006e0| 65 73 20 66 6f 72 20 52 | 45 47 45 58 50 2e 0a 49 |es for R|EGEXP..I|
|000006f0| 66 20 6f 70 74 69 6f 6e | 61 6c 20 61 72 67 75 6d |f option|al argum|
|00000700| 65 6e 74 20 44 4f 2d 41 | 4c 4c 20 69 73 20 6e 6f |ent DO-A|LL is no|
|00000710| 6e 2d 6e 69 6c 2c 20 64 | 6f 65 73 20 6d 6f 72 65 |n-nil, d|oes more|
|00000720| 20 28 74 69 6d 65 2d 63 | 6f 6e 73 75 6d 69 6e 67 | (time-c|onsuming|
|00000730| 29 20 77 6f 72 6b 20 73 | 75 63 68 20 61 73 0a 73 |) work s|uch as.s|
|00000740| 68 6f 77 69 6e 67 20 6b | 65 79 20 62 69 6e 64 69 |howing k|ey bindi|
|00000750| 6e 67 73 20 61 6e 64 20 | 64 6f 63 75 6d 65 6e 74 |ngs and |document|
|00000760| 61 74 69 6f 6e 20 74 68 | 61 74 20 69 73 20 6e 6f |ation th|at is no|
|00000770| 74 20 73 74 6f 72 65 64 | 20 69 6e 20 74 68 65 20 |t stored| in the |
|00000780| 64 6f 63 75 6d 65 6e 74 | 61 74 69 6f 6e 0a 66 69 |document|ation.fi|
|00000790| 6c 65 2e 20 20 52 65 74 | 75 72 6e 73 20 6c 69 73 |le.  Ret|urns lis|
|000007a0| 74 20 6f 66 20 73 79 6d | 62 6f 6c 73 20 61 6e 64 |t of sym|bols and|
|000007b0| 20 64 6f 63 75 6d 65 6e | 74 61 74 69 6f 6e 20 66 | documen|tation f|
|000007c0| 6f 75 6e 64 2e 22 20 22 | 73 53 75 70 65 72 20 41 |ound." "|sSuper A|
|000007d0| 70 72 6f 70 6f 73 3a 20 | 5c 6e 50 22 5d 29 0a 28 |propos: |\nP"]).(|
|000007e0| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 c1 4d 88 c2 |byte-cod|e "..M..|
|000007f0| c3 4d 88 c4 c5 4d 88 c6 | c7 4d 88 c8 c9 4d 87 22 |.M...M..|.M...M."|
|00000800| 20 5b 73 75 70 65 72 2d | 61 70 72 6f 70 6f 73 2d | [super-|apropos-|
|00000810| 63 68 65 63 6b 2d 64 6f | 63 2d 66 69 6c 65 20 23 |check-do|c-file #|
|00000820| 5b 28 72 65 67 65 78 70 | 29 20 22 c0 c1 5c 6e 0b |[(regexp|) "..\n.|
|00000830| 5c 22 c4 5c 22 c5 89 89 | 89 1e 06 1e 07 1e 08 1e |\".\"...|........|
|00000840| 09 1e 5c 6e 8a 0e 5c 6e | 71 88 c4 16 0b cc 0e 5c |..\n..\n|q......\|
|00000850| 6e 21 88 65 62 88 cd 0e | 0e c5 c4 23 ab cc cf d0 |n!.eb...|...#....|
|00000860| 21 88 60 54 66 d1 3d ab | 83 d2 aa 81 d3 16 09 d3 |!.`Tf.=.|........|
|00000870| 75 88 d4 0e 5c 6e 21 16 | 08 60 d5 d0 c5 d6 23 ab |u...\n!.|.`....#.|
|00000880| 84 60 53 aa 81 60 7b 16 | 07 0e 08 0e 06 9e 89 16 |.`S..`{.|........|
|00000890| 17 ac 8d 0e 08 c5 89 45 | 89 16 17 0e 06 42 16 06 |.......E|.....B..|
|000008a0| 0e 09 0e 17 9b 0e 07 a0 | 88 aa 2c 29 0e 06 2d 87 |........|..,)..-.|
|000008b0| 22 20 5b 66 69 6e 64 2d | 66 69 6c 65 2d 6e 6f 73 |" [find-|file-nos|
|000008c0| 65 6c 65 63 74 20 65 78 | 70 61 6e 64 2d 66 69 6c |elect ex|pand-fil|
|000008d0| 65 2d 6e 61 6d 65 20 69 | 6e 74 65 72 6e 61 6c 2d |e-name i|nternal-|
|000008e0| 64 6f 63 2d 66 69 6c 65 | 2d 6e 61 6d 65 20 65 78 |doc-file|-name ex|
|000008f0| 65 63 2d 64 69 72 65 63 | 74 6f 72 79 20 74 20 6e |ec-direc|tory t n|
|00000900| 69 6c 20 73 79 6d 2d 6c | 69 73 74 20 64 6f 63 20 |il sym-l|ist doc |
|00000910| 73 79 6d 62 6f 6c 20 74 | 79 70 65 20 64 6f 63 2d |symbol t|ype doc-|
|00000920| 62 75 66 66 65 72 20 62 | 75 66 66 65 72 2d 72 65 |buffer b|uffer-re|
|00000930| 61 64 2d 6f 6e 6c 79 20 | 62 75 72 79 2d 62 75 66 |ad-only |bury-buf|
|00000940| 66 65 72 20 72 65 2d 73 | 65 61 72 63 68 2d 66 6f |fer re-s|earch-fo|
|00000950| 72 77 61 72 64 20 72 65 | 67 65 78 70 20 73 65 61 |rward re|gexp sea|
|00000960| 72 63 68 2d 62 61 63 6b | 77 61 72 64 20 22 1f 22 |rch-back|ward "."|
|00000970| 20 37 30 20 31 20 32 20 | 72 65 61 64 20 73 65 61 | 70 1 2 |read sea|
|00000980| 72 63 68 2d 66 6f 72 77 | 61 72 64 20 6d 6f 76 65 |rch-forw|ard move|
|00000990| 20 69 74 65 6d 5d 20 36 | 5d 20 73 75 70 65 72 2d | item] 6|] super-|
|000009a0| 61 70 72 6f 70 6f 73 2d | 61 63 63 75 6d 75 6c 61 |apropos-|accumula|
|000009b0| 74 65 20 23 5b 28 73 79 | 6d 62 6f 6c 29 20 22 c0 |te #[(sy|mbol) ".|
|000009c0| 09 c2 0b 21 5c 22 ab 9f | c4 0b 21 89 15 41 c6 0b |...!\"..|..!..A..|
|000009d0| 21 ae 83 0d 41 40 a0 88 | 0d 41 41 c7 0b 21 ae 83 |!...A@..|.AA..!..|
|000009e0| c8 0d 38 a0 88 aa af c6 | 0b 21 89 16 09 ab 8f c0 |..8.....|.!......|
|000009f0| 09 0e 09 5c 22 ab 88 c4 | 0b 21 41 0e 09 a0 88 c7 |...\"...|.!A.....|
|00000a00| 0b 21 89 16 5c 6e ab 90 | c0 09 0e 5c 6e 5c 22 ab |.!..\n..|...\n\".|
|00000a10| 89 c4 0b 21 41 41 0e 5c | 6e a0 88 cb 87 22 20 5b |...!AA.\|n...." [|
|00000a20| 73 74 72 69 6e 67 2d 6d | 61 74 63 68 20 72 65 67 |string-m|atch reg|
|00000a30| 65 78 70 20 73 79 6d 62 | 6f 6c 2d 6e 61 6d 65 20 |exp symb|ol-name |
|00000a40| 73 79 6d 62 6f 6c 20 61 | 70 72 6f 70 6f 73 2d 67 |symbol a|propos-g|
|00000a50| 65 74 2d 61 63 63 75 6d | 2d 69 74 65 6d 20 69 74 |et-accum|-item it|
|00000a60| 65 6d 20 73 61 66 65 2d | 64 6f 63 75 6d 65 6e 74 |em safe-|document|
|00000a70| 61 74 69 6f 6e 20 73 61 | 66 65 2d 64 6f 63 75 6d |ation sa|fe-docum|
|00000a80| 65 6e 74 61 74 69 6f 6e | 2d 70 72 6f 70 65 72 74 |entation|-propert|
|00000a90| 79 20 32 20 66 6e 2d 64 | 6f 63 20 76 61 72 2d 64 |y 2 fn-d|oc var-d|
|00000aa0| 6f 63 20 6e 69 6c 5d 20 | 35 5d 20 61 70 72 6f 70 |oc nil] |5] aprop|
|00000ab0| 6f 73 2d 70 72 69 6e 74 | 2d 6d 61 74 63 68 65 73 |os-print|-matches|
|00000ac0| 20 23 5b 28 6d 61 74 63 | 68 65 73 20 26 6f 70 74 | #[(matc|hes &opt|
|00000ad0| 69 6f 6e 61 6c 20 72 65 | 67 65 78 70 20 73 70 61 |ional re|gexp spa|
|00000ae0| 63 69 6e 67 20 64 6f 2d | 61 6c 6c 29 20 22 c0 09 |cing do-|all) "..|
|00000af0| c2 5c 22 89 11 70 c3 89 | 89 1c 1d 1e 06 1e 07 1e |.\"..p..|........|
|00000b00| 08 8a 0e 09 71 88 09 ac | 84 ca cb 21 88 0e 08 3a |....q...|...!...:|
|00000b10| 83 ce 00 0e 08 40 89 16 | 06 40 14 0e 08 41 16 08 |.....@..|.@...A..|
|00000b20| 0e 0c ab 86 6f ac 83 cd | 20 88 ca 0c 21 88 0e 0e |....o...| ...!...|
|00000b30| ab 96 cf 0c 21 ab 91 0d | ac 8e 8a 0e 07 71 88 d0 |....!...|.....q..|
|00000b40| 09 0e 11 5c 22 88 29 d2 | 15 0e 0e ab a6 d3 0e 06 |...\".).|........|
|00000b50| 9b 89 16 14 ac 85 cf 0c | 21 ab 98 d5 d6 d7 5c 22 |........|!.....\"|
|00000b60| 88 0e 14 ab 8b ca d8 d9 | 0e 14 da 23 21 88 aa 84 |........|...#!...|
|00000b70| ca db 21 88 cd 20 88 0e | 06 41 40 89 16 14 ab 93 |..!.. ..|.A@.....|
|00000b80| ca dc 21 88 ca 0e 0e ab | 86 dd 0e 14 21 aa 82 0e |..!.....|....!...|
|00000b90| 14 21 88 6e ac 83 cd 20 | 88 de 0e 06 38 89 16 14 |.!.n... |....8...|
|00000ba0| ab 93 ca df 21 88 ca 0e | 0e ab 86 dd 0e 14 21 aa |....!...|......!.|
|00000bb0| 82 0e 14 21 88 6e 84 1e | 00 cd 20 88 82 1e 00 2e |...!.n..|.. .....|
|00000bc0| 06 d2 87 22 20 5b 73 6f | 72 74 20 6d 61 74 63 68 |..." [so|rt match|
|00000bd0| 65 73 20 23 5b 28 61 20 | 62 29 20 22 08 40 09 40 |es #[(a |b) ".@.@|
|00000be0| 99 87 22 20 5b 61 20 62 | 5d 20 32 5d 20 6e 69 6c |.." [a b|] 2] nil|
|00000bf0| 20 73 79 6d 62 6f 6c 20 | 6b 65 79 73 2d 64 6f 6e | symbol |keys-don|
|00000c00| 65 20 69 74 65 6d 20 6f | 6c 64 2d 62 75 66 66 65 |e item o|ld-buffe|
|00000c10| 72 20 70 20 73 74 61 6e | 64 61 72 64 2d 6f 75 74 |r p stan|dard-out|
|00000c20| 70 75 74 20 70 72 69 6e | 63 20 22 4e 6f 20 6d 61 |put prin|c "No ma|
|00000c30| 74 63 68 65 73 20 66 6f | 75 6e 64 2e 22 20 73 70 |tches fo|und." sp|
|00000c40| 61 63 69 6e 67 20 74 65 | 72 70 72 69 20 64 6f 2d |acing te|rpri do-|
|00000c50| 61 6c 6c 20 63 6f 6d 6d | 61 6e 64 70 20 61 70 72 |all comm|andp apr|
|00000c60| 6f 70 6f 73 2d 6d 61 74 | 63 68 2d 6b 65 79 73 20 |opos-mat|ch-keys |
|00000c70| 72 65 67 65 78 70 20 74 | 20 33 20 74 65 6d 20 69 |regexp t| 3 tem i|
|00000c80| 6e 64 65 6e 74 2d 74 6f | 20 33 30 20 31 20 6d 61 |ndent-to| 30 1 ma|
|00000c90| 70 63 6f 6e 63 61 74 20 | 6b 65 79 2d 64 65 73 63 |pconcat |key-desc|
|00000ca0| 72 69 70 74 69 6f 6e 20 | 22 2c 20 22 20 22 28 6e |ription |", " "(n|
|00000cb0| 6f 74 20 62 6f 75 6e 64 | 20 74 6f 20 61 6e 79 20 |ot bound| to any |
|00000cc0| 6b 65 79 73 29 22 20 22 | 20 20 46 75 6e 63 74 69 |keys)" "|  Functi|
|00000cd0| 6f 6e 3a 20 22 20 73 75 | 62 73 74 69 74 75 74 65 |on: " su|bstitute|
|00000ce0| 2d 63 6f 6d 6d 61 6e 64 | 2d 6b 65 79 73 20 32 20 |-command|-keys 2 |
|00000cf0| 22 20 20 56 61 72 69 61 | 62 6c 65 3a 20 22 5d 20 |"  Varia|ble: "] |
|00000d00| 36 5d 20 61 70 72 6f 70 | 6f 73 2d 6d 61 74 63 68 |6] aprop|os-match|
|00000d10| 2d 6b 65 79 73 20 23 5b | 28 61 6c 69 73 74 20 26 |-keys #[|(alist &|
|00000d20| 6f 70 74 69 6f 6e 61 6c | 20 72 65 67 65 78 70 29 |optional| regexp)|
|00000d30| 20 22 08 c1 20 1a 89 1b | ab 90 0b 40 c4 0b 40 40 | ".. ...|...@..@@|
|00000d40| 5c 6e 5c 22 a4 88 0b 41 | 89 13 ac 70 08 2a 87 22 |\n\"...A|...p.*."|
|00000d50| 20 5b 61 6c 69 73 74 20 | 63 75 72 72 65 6e 74 2d | [alist |current-|
|00000d60| 6c 6f 63 61 6c 2d 6d 61 | 70 20 6c 6d 20 72 65 73 |local-ma|p lm res|
|00000d70| 74 20 77 68 65 72 65 2d | 69 73 2d 69 6e 74 65 72 |t where-|is-inter|
|00000d80| 6e 61 6c 5d 20 35 5d 20 | 61 70 72 6f 70 6f 73 2d |nal] 5] |apropos-|
|00000d90| 67 65 74 2d 61 63 63 75 | 6d 2d 69 74 65 6d 20 23 |get-accu|m-item #|
|00000da0| 5b 28 73 79 6d 62 6f 6c | 29 20 22 08 09 9e ae 8a |[(symbol|) ".....|
|00000db0| 08 c2 89 45 09 42 11 08 | 09 9e 87 22 20 5b 73 79 |...E.B..|..." [sy|
|00000dc0| 6d 62 6f 6c 20 61 70 72 | 6f 70 6f 73 2d 61 63 63 |mbol apr|opos-acc|
|00000dd0| 75 6d 75 6c 61 74 65 20 | 6e 69 6c 5d 20 33 5d 5d |umulate |nil] 3]]|
|00000de0| 20 32 29 0a 28 66 73 65 | 74 20 27 73 61 66 65 2d | 2).(fse|t 'safe-|
|00000df0| 64 6f 63 75 6d 65 6e 74 | 61 74 69 6f 6e 20 23 5b |document|ation #[|
|00000e00| 28 66 75 6e 63 74 69 6f | 6e 29 20 22 08 39 ab 8e |(functio|n) ".9..|
|00000e10| c1 08 21 ab 84 08 4b aa | 81 c2 89 10 aa 6f 08 3a |..!...K.|.....o.:|
|00000e20| 3f 3f ad 9a 08 40 c3 3d | ab 83 08 41 10 08 40 c4 |??...@.=|...A..@.|
|00000e30| 3e 3f 3f ad 89 c5 08 38 | 89 10 3b ad 81 08 87 22 |>??....8|..;...."|
|00000e40| 20 5b 66 75 6e 63 74 69 | 6f 6e 20 66 62 6f 75 6e | [functi|on fboun|
|00000e50| 64 70 20 30 20 6d 61 63 | 72 6f 20 28 6c 61 6d 62 |dp 0 mac|ro (lamb|
|00000e60| 64 61 20 61 75 74 6f 6c | 6f 61 64 29 20 32 5d 20 |da autol|oad) 2] |
|00000e70| 33 20 22 5c 0a 4c 69 6b | 65 20 64 6f 63 75 6d 65 |3 "\.Lik|e docume|
|00000e80| 6e 74 61 74 69 6f 6e 2c | 20 65 78 63 65 70 74 20 |ntation,| except |
|00000e90| 69 74 20 61 76 6f 69 64 | 73 20 63 61 6c 6c 69 6e |it avoid|s callin|
|00000ea0| 67 20 60 67 65 74 5f 64 | 6f 63 5f 73 74 72 69 6e |g `get_d|oc_strin|
|00000eb0| 67 27 2e 0a 57 69 6c 6c | 20 72 65 74 75 72 6e 20 |g'..Will| return |
|00000ec0| 6e 69 6c 20 69 6e 73 74 | 65 61 64 2e 22 5d 29 0a |nil inst|ead."]).|
|00000ed0| 28 66 73 65 74 20 27 73 | 61 66 65 2d 64 6f 63 75 |(fset 's|afe-docu|
|00000ee0| 6d 65 6e 74 61 74 69 6f | 6e 2d 70 72 6f 70 65 72 |mentatio|n-proper|
|00000ef0| 74 79 20 23 5b 28 73 79 | 6d 62 6f 6c 29 20 22 08 |ty #[(sy|mbol) ".|
|00000f00| c1 4e 89 10 a7 3f ad 81 | 08 87 22 20 5b 73 79 6d |.N...?..|.." [sym|
|00000f10| 62 6f 6c 20 76 61 72 69 | 61 62 6c 65 2d 64 6f 63 |bol vari|able-doc|
|00000f20| 75 6d 65 6e 74 61 74 69 | 6f 6e 5d 20 33 20 22 5c |umentati|on] 3 "\|
|00000f30| 0a 4c 69 6b 65 20 64 6f | 63 75 6d 65 6e 74 61 74 |.Like do|cumentat|
|00000f40| 69 6f 6e 2d 70 72 6f 70 | 65 72 74 79 2c 20 65 78 |ion-prop|erty, ex|
|00000f50| 63 65 70 74 20 69 74 20 | 61 76 6f 69 64 73 20 63 |cept it |avoids c|
|00000f60| 61 6c 6c 69 6e 67 20 60 | 67 65 74 5f 64 6f 63 5f |alling `|get_doc_|
|00000f70| 73 74 72 69 6e 67 27 2e | 0a 57 69 6c 6c 20 72 65 |string'.|.Will re|
|00000f80| 74 75 72 6e 20 6e 69 6c | 20 69 6e 73 74 65 61 64 |turn nil| instead|
|00000f90| 2e 22 5d 29 0a          |                         |."]).   |        |
+--------+-------------------------+-------------------------+--------+--------+