/ Otherware / Otherware_1_SB_Development.iso / amiga / utility / misc / e1858src.lha / emacs-18.58 / lisp / fill.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0a 28 64 65 66 75 6e 20 | 73 65 74 2d 66 69 6c 6c |.(defun |set-fill|
|00000010| 2d 70 72 65 66 69 78 20 | 6e 69 6c 20 22 5c 0a 53 |-prefix |nil "\.S|
|00000020| 65 74 20 74 68 65 20 66 | 69 6c 6c 2d 70 72 65 66 |et the f|ill-pref|
|00000030| 69 78 20 74 6f 20 74 68 | 65 20 63 75 72 72 65 6e |ix to th|e curren|
|00000040| 74 20 6c 69 6e 65 20 75 | 70 20 74 6f 20 70 6f 69 |t line u|p to poi|
|00000050| 6e 74 2e 0a 46 69 6c 6c | 69 6e 67 20 65 78 70 65 |nt..Fill|ing expe|
|00000060| 63 74 73 20 6c 69 6e 65 | 73 20 74 6f 20 73 74 61 |cts line|s to sta|
|00000070| 72 74 20 77 69 74 68 20 | 74 68 65 20 66 69 6c 6c |rt with |the fill|
|00000080| 20 70 72 65 66 69 78 0a | 61 6e 64 20 72 65 69 6e | prefix.|and rein|
|00000090| 73 65 72 74 73 20 74 68 | 65 20 66 69 6c 6c 20 70 |serts th|e fill p|
|000000a0| 72 65 66 69 78 20 69 6e | 20 65 61 63 68 20 72 65 |refix in| each re|
|000000b0| 73 75 6c 74 69 6e 67 20 | 6c 69 6e 65 2e 22 20 28 |sulting |line." (|
|000000c0| 69 6e 74 65 72 61 63 74 | 69 76 65 29 20 28 62 79 |interact|ive) (by|
|000000d0| 74 65 2d 63 6f 64 65 20 | 22 c1 88 c2 8a c3 20 88 |te-code |"..... .|
|000000e0| 60 29 60 5c 22 89 10 88 | c4 08 c5 5c 22 85 18 00 |`)`\"...|...\"...|
|000000f0| c1 89 10 88 08 83 24 00 | c6 c7 08 5c 22 82 27 00 |......$.|...\".'.|
|00000100| c6 c8 21 87 22 20 5b 66 | 69 6c 6c 2d 70 72 65 66 |..!." [f|ill-pref|
|00000110| 69 78 20 6e 69 6c 20 62 | 75 66 66 65 72 2d 73 75 |ix nil b|uffer-su|
|00000120| 62 73 74 72 69 6e 67 20 | 62 65 67 69 6e 6e 69 6e |bstring |beginnin|
|00000130| 67 2d 6f 66 2d 6c 69 6e | 65 20 65 71 75 61 6c 20 |g-of-lin|e equal |
|00000140| 22 22 20 6d 65 73 73 61 | 67 65 20 22 66 69 6c 6c |"" messa|ge "fill|
|00000150| 2d 70 72 65 66 69 78 3a | 20 5c 22 25 73 5c 22 22 |-prefix:| \"%s\""|
|00000160| 20 22 66 69 6c 6c 2d 70 | 72 65 66 69 78 20 63 61 | "fill-p|refix ca|
|00000170| 6e 63 65 6c 6c 65 64 22 | 5d 20 36 29 29 0a 0a 28 |ncelled"|] 6))..(|
|00000180| 64 65 66 75 6e 20 66 69 | 6c 6c 2d 72 65 67 69 6f |defun fi|ll-regio|
|00000190| 6e 2d 61 73 2d 70 61 72 | 61 67 72 61 70 68 20 28 |n-as-par|agraph (|
|000001a0| 66 72 6f 6d 20 74 6f 20 | 26 6f 70 74 69 6f 6e 61 |from to |&optiona|
|000001b0| 6c 20 6a 75 73 74 69 66 | 79 2d 66 6c 61 67 29 20 |l justif|y-flag) |
|000001c0| 22 5c 0a 46 69 6c 6c 20 | 72 65 67 69 6f 6e 20 61 |"\.Fill |region a|
|000001d0| 73 20 6f 6e 65 20 70 61 | 72 61 67 72 61 70 68 3a |s one pa|ragraph:|
|000001e0| 20 62 72 65 61 6b 20 6c | 69 6e 65 73 20 74 6f 20 | break l|ines to |
|000001f0| 66 69 74 20 66 69 6c 6c | 2d 63 6f 6c 75 6d 6e 2e |fit fill|-column.|
|00000200| 0a 50 72 65 66 69 78 20 | 61 72 67 20 6d 65 61 6e |.Prefix |arg mean|
|00000210| 73 20 6a 75 73 74 69 66 | 79 20 74 6f 6f 2e 0a 46 |s justif|y too..F|
|00000220| 72 6f 6d 20 70 72 6f 67 | 72 61 6d 2c 20 70 61 73 |rom prog|ram, pas|
|00000230| 73 20 61 72 67 73 20 46 | 52 4f 4d 2c 20 54 4f 20 |s args F|ROM, TO |
|00000240| 61 6e 64 20 4a 55 53 54 | 49 46 59 2d 46 4c 41 47 |and JUST|IFY-FLAG|
|00000250| 2e 22 20 28 69 6e 74 65 | 72 61 63 74 69 76 65 20 |." (inte|ractive |
|00000260| 22 72 0a 50 22 29 20 28 | 62 79 74 65 2d 63 6f 64 |"r.P") (|byte-cod|
|00000270| 65 20 22 c5 88 8c c9 08 | 09 5c 22 88 65 62 88 ca |e ".....|.\".eb..|
|00000280| cb 21 88 c9 60 64 5c 22 | 88 60 89 10 88 0b 85 27 |.!..`d\"|.`.....'|
|00000290| 00 cc 0b cd 5c 22 3f 85 | 27 00 ce 0b 21 1a 0a 85 |....\"?.|'...!...|
|000002a0| 69 00 0b 47 0c 59 85 36 | 00 cf d0 21 88 65 62 88 |i..G.Y.6|...!.eb.|
|000002b0| d1 d2 21 88 6d 3f 85 57 | 00 d3 0a 21 85 4f 00 d4 |..!.m?.W|...!.O..|
|000002c0| 60 d5 d6 21 5c 22 88 d1 | d2 21 88 82 3e 00 88 65 |`..!\"..|.!..>..e|
|000002d0| 62 88 d3 0a 21 85 65 00 | d7 0b 47 21 88 60 89 10 |b...!.e.|..G!.`..|
|000002e0| 29 88 08 62 88 d8 d9 c5 | c6 23 85 7c 00 da 63 88 |)..b....|.#.|..c.|
|000002f0| 82 6e 00 88 db 08 64 dc | da 24 88 08 62 88 ca dd |.n....d.|.$..b...|
|00000300| 21 88 d8 de c5 c6 23 85 | b1 00 d4 df d6 21 8a e0 |!.....#.|.....!..|
|00000310| e1 21 88 68 e2 3e 29 83 | a7 00 e3 82 a8 00 d2 5c |.!.h.>).|.......\|
|00000320| 5c d5 d6 21 5c 22 88 82 | 8b 00 88 64 62 88 e4 20 |\..!\"..|...db.. |
|00000330| 88 e5 63 88 65 62 88 d6 | 1e 07 6d 3f 85 2e 01 e6 |..c.eb..|..m?....|
|00000340| 0c 54 21 88 6d 83 d3 00 | c5 82 f2 00 e0 e7 21 88 |.T!.m...|......!.|
|00000350| e8 0e 07 21 83 e2 00 6e | 82 e6 00 0e 07 69 59 83 |...!...n|.....iY.|
|00000360| ef 00 ca e7 21 82 f2 00 | d7 e9 21 88 e0 ea 21 88 |....!...|..!...!.|
|00000370| dc 63 88 e4 20 88 6d 3f | 85 15 01 0b 85 15 01 cc |.c.. .m?|........|
|00000380| 0b cd 5c 22 3f 85 15 01 | 0b 63 88 69 89 16 07 88 |..\"?...|.c.i....|
|00000390| 0e 08 85 2a 01 6d 3f 85 | 2a 01 d1 e9 21 88 eb 20 |...*.m?.|*...!.. |
|000003a0| 88 d1 d2 21 88 82 c1 00 | 29 29 87 22 20 5b 66 72 |...!....|))." [fr|
|000003b0| 6f 6d 20 74 6f 20 66 70 | 72 65 20 66 69 6c 6c 2d |om to fp|re fill-|
|000003c0| 70 72 65 66 69 78 20 66 | 69 6c 6c 2d 63 6f 6c 75 |prefix f|ill-colu|
|000003d0| 6d 6e 20 6e 69 6c 20 74 | 20 70 72 65 66 69 78 63 |mn nil t| prefixc|
|000003e0| 6f 6c 20 6a 75 73 74 69 | 66 79 2d 66 6c 61 67 20 |ol justi|fy-flag |
|000003f0| 6e 61 72 72 6f 77 2d 74 | 6f 2d 72 65 67 69 6f 6e |narrow-t|o-region|
|00000400| 20 73 6b 69 70 2d 63 68 | 61 72 73 2d 66 6f 72 77 | skip-ch|ars-forw|
|00000410| 61 72 64 20 22 0a 22 20 | 65 71 75 61 6c 20 22 22 |ard "." |equal ""|
|00000420| 20 72 65 67 65 78 70 2d | 71 75 6f 74 65 20 65 72 | regexp-|quote er|
|00000430| 72 6f 72 20 22 66 69 6c | 6c 2d 70 72 65 66 69 78 |ror "fil|l-prefix|
|00000440| 20 74 6f 6f 20 6c 6f 6e | 67 20 66 6f 72 20 73 70 | too lon|g for sp|
|00000450| 65 63 69 66 69 65 64 20 | 77 69 64 74 68 22 20 66 |ecified |width" f|
|00000460| 6f 72 77 61 72 64 2d 6c | 69 6e 65 20 31 20 6c 6f |orward-l|ine 1 lo|
|00000470| 6f 6b 69 6e 67 2d 61 74 | 20 64 65 6c 65 74 65 2d |oking-at| delete-|
|00000480| 72 65 67 69 6f 6e 20 6d | 61 74 63 68 2d 65 6e 64 |region m|atch-end|
|00000490| 20 30 20 66 6f 72 77 61 | 72 64 2d 63 68 61 72 20 | 0 forwa|rd-char |
|000004a0| 72 65 2d 73 65 61 72 63 | 68 2d 66 6f 72 77 61 72 |re-searc|h-forwar|
|000004b0| 64 20 22 5b 2e 3f 21 5d | 5b 5d 29 5c 22 27 5d 2a |d "[.?!]|[])\"']*|
|000004c0| 24 22 20 33 32 20 73 75 | 62 73 74 2d 63 68 61 72 |$" 32 su|bst-char|
|000004d0| 2d 69 6e 2d 72 65 67 69 | 6f 6e 20 31 30 20 22 20 |-in-regi|on 10 " |
|000004e0| 09 22 20 22 20 20 20 2a | 22 20 6d 61 74 63 68 2d |." "   *|" match-|
|000004f0| 62 65 67 69 6e 6e 69 6e | 67 20 73 6b 69 70 2d 63 |beginnin|g skip-c|
|00000500| 68 61 72 73 2d 62 61 63 | 6b 77 61 72 64 20 22 20 |hars-bac|kward " |
|00000510| 5d 29 5c 22 27 22 20 28 | 34 36 20 36 33 20 33 33 |])\"'" (|46 63 33|
|00000520| 29 20 32 20 64 65 6c 65 | 74 65 2d 68 6f 72 69 7a |) 2 dele|te-horiz|
|00000530| 6f 6e 74 61 6c 2d 73 70 | 61 63 65 20 22 20 20 22 |ontal-sp|ace "  "|
|00000540| 20 6d 6f 76 65 2d 74 6f | 2d 63 6f 6c 75 6d 6e 20 | move-to|-column |
|00000550| 22 5e 20 0a 22 20 7a 65 | 72 6f 70 20 2d 31 20 22 |"^ ." ze|rop -1 "|
|00000560| 20 22 20 6a 75 73 74 69 | 66 79 2d 63 75 72 72 65 | " justi|fy-curre|
|00000570| 6e 74 2d 6c 69 6e 65 5d | 20 33 35 29 29 0a 0a 28 |nt-line]| 35))..(|
|00000580| 64 65 66 75 6e 20 66 69 | 6c 6c 2d 70 61 72 61 67 |defun fi|ll-parag|
|00000590| 72 61 70 68 20 28 61 72 | 67 29 20 22 5c 0a 46 69 |raph (ar|g) "\.Fi|
|000005a0| 6c 6c 20 70 61 72 61 67 | 72 61 70 68 20 61 74 20 |ll parag|raph at |
|000005b0| 6f 72 20 61 66 74 65 72 | 20 70 6f 69 6e 74 2e 0a |or after| point..|
|000005c0| 50 72 65 66 69 78 20 61 | 72 67 20 6d 65 61 6e 73 |Prefix a|rg means|
|000005d0| 20 6a 75 73 74 69 66 79 | 20 61 73 20 77 65 6c 6c | justify| as well|
|000005e0| 2e 22 20 28 69 6e 74 65 | 72 61 63 74 69 76 65 20 |." (inte|ractive |
|000005f0| 22 50 22 29 20 28 62 79 | 74 65 2d 63 6f 64 65 20 |"P") (by|te-code |
|00000600| 22 c2 88 8a c3 20 88 6e | 86 0d 00 c4 c5 21 88 60 |".... .n|.....!.`|
|00000610| 18 c6 20 88 c7 60 08 09 | 23 29 29 87 22 20 5b 65 |.. ..`..|#))." [e|
|00000620| 6e 64 20 61 72 67 20 6e | 69 6c 20 66 6f 72 77 61 |nd arg n|il forwa|
|00000630| 72 64 2d 70 61 72 61 67 | 72 61 70 68 20 6e 65 77 |rd-parag|raph new|
|00000640| 6c 69 6e 65 20 31 20 62 | 61 63 6b 77 61 72 64 2d |line 1 b|ackward-|
|00000650| 70 61 72 61 67 72 61 70 | 68 20 66 69 6c 6c 2d 72 |paragrap|h fill-r|
|00000660| 65 67 69 6f 6e 2d 61 73 | 2d 70 61 72 61 67 72 61 |egion-as|-paragra|
|00000670| 70 68 5d 20 37 29 29 0a | 0a 28 64 65 66 75 6e 20 |ph] 7)).|.(defun |
|00000680| 66 69 6c 6c 2d 72 65 67 | 69 6f 6e 20 28 66 72 6f |fill-reg|ion (fro|
|00000690| 6d 20 74 6f 20 26 6f 70 | 74 69 6f 6e 61 6c 20 6a |m to &op|tional j|
|000006a0| 75 73 74 69 66 79 2d 66 | 6c 61 67 29 20 22 5c 0a |ustify-f|lag) "\.|
|000006b0| 46 69 6c 6c 20 65 61 63 | 68 20 6f 66 20 74 68 65 |Fill eac|h of the|
|000006c0| 20 70 61 72 61 67 72 61 | 70 68 73 20 69 6e 20 74 | paragra|phs in t|
|000006d0| 68 65 20 72 65 67 69 6f | 6e 2e 0a 50 72 65 66 69 |he regio|n..Prefi|
|000006e0| 78 20 61 72 67 20 28 6e | 6f 6e 2d 6e 69 6c 20 74 |x arg (n|on-nil t|
|000006f0| 68 69 72 64 20 61 72 67 | 2c 20 69 66 20 63 61 6c |hird arg|, if cal|
|00000700| 6c 65 64 20 66 72 6f 6d | 20 70 72 6f 67 72 61 6d |led from| program|
|00000710| 29 0a 6d 65 61 6e 73 20 | 6a 75 73 74 69 66 79 20 |).means |justify |
|00000720| 61 73 20 77 65 6c 6c 2e | 22 20 28 69 6e 74 65 72 |as well.|" (inter|
|00000730| 61 63 74 69 76 65 20 22 | 72 0a 50 22 29 20 28 62 |active "|r.P") (b|
|00000740| 79 74 65 2d 63 6f 64 65 | 20 22 c5 88 8c c6 08 09 |yte-code| "......|
|00000750| 5c 22 88 65 62 88 6d 3f | 85 31 00 60 c7 c8 21 88 |\".eb.m?|.1.`..!.|
|00000760| 60 1b 1a c7 c9 21 88 60 | 0a 59 83 2a 00 ca 60 0b |`....!.`|.Y.*..`.|
|00000770| 0c 23 82 2c 00 0b 62 2a | 88 82 0b 00 29 87 22 20 |.#.,..b*|....)." |
|00000780| 5b 66 72 6f 6d 20 74 6f | 20 69 6e 69 74 69 61 6c |[from to| initial|
|00000790| 20 65 6e 64 20 6a 75 73 | 74 69 66 79 2d 66 6c 61 | end jus|tify-fla|
|000007a0| 67 20 6e 69 6c 20 6e 61 | 72 72 6f 77 2d 74 6f 2d |g nil na|rrow-to-|
|000007b0| 72 65 67 69 6f 6e 20 66 | 6f 72 77 61 72 64 2d 70 |region f|orward-p|
|000007c0| 61 72 61 67 72 61 70 68 | 20 31 20 2d 31 20 66 69 |aragraph| 1 -1 fi|
|000007d0| 6c 6c 2d 72 65 67 69 6f | 6e 2d 61 73 2d 70 61 72 |ll-regio|n-as-par|
|000007e0| 61 67 72 61 70 68 5d 20 | 38 29 29 0a 0a 28 64 65 |agraph] |8))..(de|
|000007f0| 66 75 6e 20 6a 75 73 74 | 69 66 79 2d 63 75 72 72 |fun just|ify-curr|
|00000800| 65 6e 74 2d 6c 69 6e 65 | 20 6e 69 6c 20 22 5c 0a |ent-line| nil "\.|
|00000810| 41 64 64 20 73 70 61 63 | 65 73 20 74 6f 20 6c 69 |Add spac|es to li|
|00000820| 6e 65 20 70 6f 69 6e 74 | 20 69 73 20 69 6e 2c 20 |ne point| is in, |
|00000830| 73 6f 20 69 74 20 65 6e | 64 73 20 61 74 20 66 69 |so it en|ds at fi|
|00000840| 6c 6c 2d 63 6f 6c 75 6d | 6e 2e 22 20 28 69 6e 74 |ll-colum|n." (int|
|00000850| 65 72 61 63 74 69 76 65 | 29 20 28 62 79 74 65 2d |eractive|) (byte-|
|00000860| 63 6f 64 65 20 22 c6 88 | 8a 8c c6 c6 c6 c6 c6 1c |code "..|........|
|00000870| 1b 1a 19 18 ca 20 88 cb | 0d 47 21 88 cc cd 21 88 |..... ..|.G!...!.|
|00000880| 69 89 13 88 60 89 12 88 | ce 20 88 cf 0a 60 5c 22 |i...`...|. ...`\"|
|00000890| 88 0a 62 88 d0 d1 c6 c7 | 23 85 53 00 d2 d3 d4 21 |..b.....|#.S....!|
|000008a0| 8a d5 d6 21 88 68 d7 3e | 29 83 49 00 d8 82 4a 00 |...!.h.>|).I...J.|
|000008b0| d9 5c 5c da d4 21 5c 22 | 88 82 2d 00 88 0a 62 88 |.\\..!\"|..-...b.|
|000008c0| d0 db c6 c7 23 85 69 00 | cb dc 21 88 dd 63 88 82 |....#.i.|..!..c..|
|000008d0| 57 00 88 64 62 88 de 0e | 08 69 0b 23 89 10 88 d4 |W..db...|.i.#....|
|000008e0| 89 11 88 df e0 c6 c7 23 | 85 8e 00 d5 e0 21 88 09 |.......#|.....!..|
|000008f0| 54 89 11 88 82 7a 00 88 | 09 d4 56 85 10 01 64 62 |T....z..|..V...db|
|00000900| 88 df e0 c6 c7 23 85 af | 00 e1 dd e2 08 09 5c 22 |.....#..|......\"|
|00000910| 5c 22 88 d5 e0 21 88 82 | 98 00 88 e3 08 09 5c 22 |\"...!..|......\"|
|00000920| 89 10 88 e4 09 d4 5c 22 | 89 14 88 08 d4 56 85 e6 |......\"|.....V..|
|00000930| 00 e3 e5 e6 e7 20 5c 22 | 09 5c 22 1e 09 0c 0e 09 |..... \"|.\".....|
|00000940| 48 d4 56 86 e1 00 0c 0e | 09 d9 49 88 08 53 89 10 |H.V.....|..I..S..|
|00000950| 29 88 82 be 00 88 64 62 | 88 d4 1e 09 df e0 c6 c7 |).....db|........|
|00000960| 23 85 0f 01 0c 0e 09 48 | d4 56 85 00 01 e0 63 88 |#......H|.V....c.|
|00000970| 0e 09 54 89 16 09 88 d5 | e0 21 88 82 ed 00 29 2d |..T.....|.!....)-|
|00000980| 29 29 87 22 20 5b 6e 63 | 6f 6c 73 20 6e 77 68 69 |))." [nc|ols nwhi|
|00000990| 74 65 73 20 62 65 67 20 | 69 6e 64 65 6e 74 20 66 |tes beg |indent f|
|000009a0| 6c 61 67 73 20 66 69 6c | 6c 2d 70 72 65 66 69 78 |lags fil|l-prefix|
|000009b0| 20 6e 69 6c 20 74 20 66 | 69 6c 6c 2d 63 6f 6c 75 | nil t f|ill-colu|
|000009c0| 6d 6e 20 77 68 65 72 65 | 20 62 65 67 69 6e 6e 69 |mn where| beginni|
|000009d0| 6e 67 2d 6f 66 2d 6c 69 | 6e 65 20 66 6f 72 77 61 |ng-of-li|ne forwa|
|000009e0| 72 64 2d 63 68 61 72 20 | 73 6b 69 70 2d 63 68 61 |rd-char |skip-cha|
|000009f0| 72 73 2d 66 6f 72 77 61 | 72 64 20 22 20 09 22 20 |rs-forwa|rd " ." |
|00000a00| 65 6e 64 2d 6f 66 2d 6c | 69 6e 65 20 6e 61 72 72 |end-of-l|ine narr|
|00000a10| 6f 77 2d 74 6f 2d 72 65 | 67 69 6f 6e 20 72 65 2d |ow-to-re|gion re-|
|00000a20| 73 65 61 72 63 68 2d 66 | 6f 72 77 61 72 64 20 22 |search-f|orward "|
|00000a30| 20 20 20 2a 22 20 64 65 | 6c 65 74 65 2d 72 65 67 |   *" de|lete-reg|
|00000a40| 69 6f 6e 20 6d 61 74 63 | 68 2d 62 65 67 69 6e 6e |ion matc|h-beginn|
|00000a50| 69 6e 67 20 30 20 73 6b | 69 70 2d 63 68 61 72 73 |ing 0 sk|ip-chars|
|00000a60| 2d 62 61 63 6b 77 61 72 | 64 20 22 20 5d 29 5c 22 |-backwar|d " ])\"|
|00000a70| 27 22 20 28 34 36 20 36 | 33 20 33 33 29 20 32 20 |'" (46 6|3 33) 2 |
|00000a80| 31 20 6d 61 74 63 68 2d | 65 6e 64 20 22 5b 2e 3f |1 match-|end "[.?|
|00000a90| 21 5d 5b 5d 29 5c 22 27 | 5d 2a 0a 22 20 2d 31 20 |!][])\"'|]*." -1 |
|00000aa0| 33 32 20 2d 20 73 65 61 | 72 63 68 2d 62 61 63 6b |32 - sea|rch-back|
|00000ab0| 77 61 72 64 20 22 20 22 | 20 69 6e 73 65 72 74 2d |ward " "| insert-|
|00000ac0| 63 68 61 72 20 2f 20 25 | 20 6d 61 6b 65 2d 73 74 |char / %| make-st|
|00000ad0| 72 69 6e 67 20 6c 6f 67 | 61 6e 64 20 32 36 32 31 |ring log|and 2621|
|00000ae0| 34 33 20 72 61 6e 64 6f | 6d 5d 20 32 38 29 29 0a |43 rando|m] 28)).|
|00000af0| 0a 28 64 65 66 75 6e 20 | 66 69 6c 6c 2d 69 6e 64 |.(defun |fill-ind|
|00000b00| 69 76 69 64 75 61 6c 2d | 70 61 72 61 67 72 61 70 |ividual-|paragrap|
|00000b10| 68 73 20 28 6d 69 6e 20 | 6d 61 78 20 26 6f 70 74 |hs (min |max &opt|
|00000b20| 69 6f 6e 61 6c 20 6a 75 | 73 74 69 66 79 70 20 6d |ional ju|stifyp m|
|00000b30| 61 69 6c 70 29 20 22 5c | 0a 46 69 6c 6c 20 65 61 |ailp) "\|.Fill ea|
|00000b40| 63 68 20 70 61 72 61 67 | 72 61 70 68 20 69 6e 20 |ch parag|raph in |
|00000b50| 72 65 67 69 6f 6e 20 61 | 63 63 6f 72 64 69 6e 67 |region a|ccording|
|00000b60| 20 74 6f 20 69 74 73 20 | 69 6e 64 69 76 69 64 75 | to its |individu|
|00000b70| 61 6c 20 66 69 6c 6c 20 | 70 72 65 66 69 78 2e 0a |al fill |prefix..|
|00000b80| 43 61 6c 6c 69 6e 67 20 | 66 72 6f 6d 20 61 20 70 |Calling |from a p|
|00000b90| 72 6f 67 72 61 6d 2c 20 | 70 61 73 73 20 72 61 6e |rogram, |pass ran|
|00000ba0| 67 65 20 74 6f 20 66 69 | 6c 6c 20 61 73 20 66 69 |ge to fi|ll as fi|
|00000bb0| 72 73 74 20 74 77 6f 20 | 61 72 67 75 6d 65 6e 74 |rst two |argument|
|00000bc0| 73 2e 0a 4f 70 74 69 6f | 6e 61 6c 20 74 68 69 72 |s..Optio|nal thir|
|00000bd0| 64 20 61 6e 64 20 66 6f | 75 72 74 68 20 61 72 67 |d and fo|urth arg|
|00000be0| 75 6d 65 6e 74 73 20 4a | 55 53 54 49 46 59 2d 46 |uments J|USTIFY-F|
|00000bf0| 4c 41 47 20 61 6e 64 20 | 4d 41 49 4c 2d 46 4c 41 |LAG and |MAIL-FLA|
|00000c00| 47 3a 0a 4a 55 53 54 49 | 46 59 2d 46 4c 41 47 20 |G:.JUSTI|FY-FLAG |
|00000c10| 74 6f 20 6a 75 73 74 69 | 66 79 20 70 61 72 61 67 |to justi|fy parag|
|00000c20| 72 61 70 68 73 20 28 70 | 72 65 66 69 78 20 61 72 |raphs (p|refix ar|
|00000c30| 67 29 2c 0a 4d 41 49 4c | 2d 46 4c 41 47 20 66 6f |g),.MAIL|-FLAG fo|
|00000c40| 72 20 61 20 6d 61 69 6c | 20 6d 65 73 73 61 67 65 |r a mail| message|
|00000c50| 2c 20 69 2e 20 65 2e 20 | 64 6f 6e 27 74 20 66 69 |, i. e. |don't fi|
|00000c60| 6c 6c 20 68 65 61 64 65 | 72 20 6c 69 6e 65 73 2e |ll heade|r lines.|
|00000c70| 22 20 28 69 6e 74 65 72 | 61 63 74 69 76 65 20 22 |" (inter|active "|
|00000c80| 72 0a 50 22 29 20 28 62 | 79 74 65 2d 63 6f 64 65 |r.P") (b|yte-code|
|00000c90| 20 22 c9 88 8c 8a 08 62 | 88 ca 20 88 09 85 1b 00 | ".....b|.. .....|
|00000ca0| cb cc 21 85 1b 00 cd ce | 21 88 82 0e 00 88 cf 60 |..!.....|!......`|
|00000cb0| 0a 5c 22 88 d0 d1 21 88 | 6d 3f 85 93 00 ca 20 88 |.\"...!.|m?.... .|
|00000cc0| 60 c9 c9 1d 1c 1b 0c 85 | 3a 00 cb 0d 21 3f 85 4e |`.......|:...!?.N|
|00000cd0| 00 d2 60 8a d0 d3 21 88 | 60 29 5c 22 14 d4 0c 21 |..`...!.|`)\"...!|
|00000ce0| 89 15 88 cd ce 21 88 6d | 3f 85 72 00 cb 0e 06 21 |.....!.m|?.r....!|
|00000cf0| 3f 85 72 00 8a cb 0d 21 | 85 70 00 d5 0c 47 21 88 |?.r....!|.p...G!.|
|00000d00| cb 0e 06 21 3f 29 85 7a | 00 c9 88 82 33 00 88 6e |...!?).z|....3..n|
|00000d10| 1e 07 d6 0b 60 0e 08 23 | 88 0e 07 86 8d 00 d7 d8 |....`..#|........|
|00000d20| 21 29 2b 88 82 21 00 29 | 29 87 22 20 5b 6d 69 6e |!)+..!.)|)." [min|
|00000d30| 20 6d 61 69 6c 70 20 6d | 61 78 20 73 74 61 72 74 | mailp m|ax start|
|00000d40| 20 66 69 6c 6c 2d 70 72 | 65 66 69 78 20 66 69 6c | fill-pr|efix fil|
|00000d50| 6c 2d 70 72 65 66 69 78 | 2d 72 65 67 65 78 70 20 |l-prefix|-regexp |
|00000d60| 70 61 72 61 67 72 61 70 | 68 2d 73 65 70 61 72 61 |paragrap|h-separa|
|00000d70| 74 65 20 68 61 64 2d 6e | 65 77 6c 69 6e 65 20 6a |te had-n|ewline j|
|00000d80| 75 73 74 69 66 79 70 20 | 6e 69 6c 20 62 65 67 69 |ustifyp |nil begi|
|00000d90| 6e 6e 69 6e 67 2d 6f 66 | 2d 6c 69 6e 65 20 6c 6f |nning-of|-line lo|
|00000da0| 6f 6b 69 6e 67 2d 61 74 | 20 22 5b 5e 20 09 0a 5d |oking-at| "[^ ..]|
|00000db0| 2a 3a 22 20 66 6f 72 77 | 61 72 64 2d 6c 69 6e 65 |*:" forw|ard-line|
|00000dc0| 20 31 20 6e 61 72 72 6f | 77 2d 74 6f 2d 72 65 67 | 1 narro|w-to-reg|
|00000dd0| 69 6f 6e 20 73 6b 69 70 | 2d 63 68 61 72 73 2d 66 |ion skip|-chars-f|
|00000de0| 6f 72 77 61 72 64 20 22 | 20 09 0a 22 20 62 75 66 |orward "| .." buf|
|00000df0| 66 65 72 2d 73 75 62 73 | 74 72 69 6e 67 20 22 20 |fer-subs|tring " |
|00000e00| 09 22 20 72 65 67 65 78 | 70 2d 71 75 6f 74 65 20 |." regex|p-quote |
|00000e10| 66 6f 72 77 61 72 64 2d | 63 68 61 72 20 66 69 6c |forward-|char fil|
|00000e20| 6c 2d 72 65 67 69 6f 6e | 2d 61 73 2d 70 61 72 61 |l-region|-as-para|
|00000e30| 67 72 61 70 68 20 64 65 | 6c 65 74 65 2d 63 68 61 |graph de|lete-cha|
|00000e40| 72 20 2d 31 5d 20 32 30 | 29 29 0a                |r -1] 20|)).     |
+--------+-------------------------+-------------------------+--------+--------+