DataMuseum.dk Presents historical artifacts from the history of: DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of artifacts from Datamuseum.dk's BitArchive. See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software.

top - download

⟦94c3056d9⟧

    Length: 4198 (0x1066)
    Names: »paragraphs.elc«

Derivation

└─⟦a0efdde77⟧ Bits:30001252 EUUGD11 Tape, 1987 Spring Conference Helsinki
    └─ ⟦this⟧ »EUUGD11/gnu-31mar87/emacs/lisp/paragraphs.elc« 

Hex Dump

0x0000…0020 0a 28 64 65 66 75 6e 20 66 6f 72 77 61 72 64 2d 70 61 72 61 67 72 61 70 68 20 28 26 6f 70 74 69   ┆ (defun forward-paragraph (&opti┆
0x0020…0040 6f 6e 61 6c 20 61 72 67 29 20 22 5c 0a 4d 6f 76 65 20 66 6f 72 77 61 72 64 20 74 6f 20 65 6e 64   ┆onal arg) "\ Move forward to end┆
0x0040…0060 20 6f 66 20 70 61 72 61 67 72 61 70 68 2e 20 20 57 69 74 68 20 61 72 67 2c 20 64 6f 20 69 74 20   ┆ of paragraph.  With arg, do it ┆
0x0060…0080 61 72 67 20 74 69 6d 65 73 2e 0a 41 20 6c 69 6e 65 20 77 68 69 63 68 20 20 70 61 72 61 67 72 61   ┆arg times. A line which  paragra┆
0x0080…00a0 70 68 2d 73 74 61 72 74 20 20 6d 61 74 63 68 65 73 20 65 69 74 68 65 72 20 73 65 70 61 72 61 74   ┆ph-start  matches either separat┆
0x00a0…00c0 65 73 20 70 61 72 61 67 72 61 70 68 73 0a 28 69 66 20 20 70 61 72 61 67 72 61 70 68 2d 73 65 70   ┆es paragraphs (if  paragraph-sep┆
0x00c0…00e0 61 72 61 74 65 20 20 6d 61 74 63 68 65 73 20 69 74 20 61 6c 73 6f 29 20 6f 72 20 69 73 20 74 68   ┆arate  matches it also) or is th┆
0x00e0…0100 65 20 66 69 72 73 74 20 6c 69 6e 65 20 6f 66 20 61 20 70 61 72 61 67 72 61 70 68 2e 0a 41 20 70   ┆e first line of a paragraph. A p┆
0x0100…0120 61 72 61 67 72 61 70 68 20 65 6e 64 20 69 73 20 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66   ┆aragraph end is the beginning of┆
0x0120…0140 20 61 20 6c 69 6e 65 20 77 68 69 63 68 20 69 73 20 6e 6f 74 20 70 61 72 74 20 6f 66 20 74 68 65   ┆ a line which is not part of the┆
0x0140…0160 20 70 61 72 61 67 72 61 70 68 0a 74 6f 20 77 68 69 63 68 20 74 68 65 20 65 6e 64 20 6f 66 20 74   ┆ paragraph to which the end of t┆
0x0160…0180 68 65 20 70 72 65 76 69 6f 75 73 20 6c 69 6e 65 20 62 65 6c 6f 6e 67 73 2c 20 6f 72 20 74 68 65   ┆he previous line belongs, or the┆
0x0180…01a0 20 65 6e 64 20 6f 66 20 74 68 65 20 62 75 66 66 65 72 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76   ┆ end of the buffer." (interactiv┆
0x01a0…01c0 65 20 22 70 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c5 88 08 86 09 00 c7 89 10 88 0a 85 19   ┆e "p") (byte-code "             ┆
0x01c0…01e0 00 c8 0a c9 5c 22 3f 85 19 00 ca 0a 21 19 09 83 26 00 0b cb 09 cc 52 82 27 00 0b 1b 08 cd 57 85   ┆    \"?     !   &     R '     W ┆
0x01e0…0200 c0 00 ce 0b 21 3f 85 3d 00 cf d0 60 53 65 5d c4 23 83 44 00 c5 82 b7 00 d1 d2 21 88 d3 20 88 6f   ┆    !? =   `Se] # D       !    o┆
0x0200…0220 3f 85 53 00 ce 0b 21 85 5d 00 d4 d2 21 88 82 4b 00 88 d5 20 88 0a 85 6a 00 c8 0a c9 5c 22 3f 83   ┆? S   ! ]   !  K       j    \"? ┆
0x0220…0240 8f 00 d3 20 88 6f 3f 85 7f 00 ce 0b 21 3f 85 7f 00 ce 09 21 85 89 00 d4 d2 21 88 82 6d 00 88 6f   ┆     o?     !?     !     !  m  o┆
0x0240…0260 3f 82 95 00 cf 0e 06 c5 c4 23 83 b5 00 ce 0b 21 85 a5 00 d4 c7 21 88 82 98 00 88 60 d6 5a 66 d7   ┆?        #     !     !     ` Zf ┆
0x0260…0280 3d 85 b2 00 d4 d2 21 82 b7 00 65 62 88 08 54 89 10 88 82 28 00 88 08 cd 56 85 5c 22 01 d3 20 88   ┆=     !   eb  T    (    V \"    ┆
0x0280…02a0 6d 3f 85 d2 00 ce 0b 21 d4 c7 21 88 85 de 00 c5 88 82 ca 00 88 0a 85 e8 00 c8 0a c9 5c 22 3f 83   ┆m?     !  !                 \"? ┆
0x02a0…02c0 07 01 6d 3f 85 fa 00 ce 0b 21 3f 85 fa 00 ce 09 21 85 04 01 d4 c7 21 88 82 eb 00 82 19 01 d8 0e   ┆  m?     !?     !     !         ┆
0x02c0…02e0 06 c5 c4 23 83 17 01 d9 cd 21 62 82 19 01 64 62 88 08 53 89 10 88 82 c1 00 2a 87 22 20 5b 61 72   ┆   #     !b   db  S      * " [ar┆
0x02e0…0300 67 20 66 69 6c 6c 2d 70 72 65 66 69 78 2d 72 65 67 65 78 70 20 66 69 6c 6c 2d 70 72 65 66 69 78   ┆g fill-prefix-regexp fill-prefix┆
0x0300…0320 20 70 61 72 61 67 72 61 70 68 2d 73 65 70 61 72 61 74 65 20 74 20 6e 69 6c 20 70 61 72 61 67 72   ┆ paragraph-separate t nil paragr┆
0x0320…0340 61 70 68 2d 73 74 61 72 74 20 31 20 65 71 75 61 6c 20 22 22 20 72 65 67 65 78 70 2d 71 75 6f 74   ┆aph-start 1 equal "" regexp-quot┆
0x0340…0360 65 20 22 5c 5c 7c 5e 22 20 22 5b 20 09 5d 2a 24 22 20 30 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 72   ┆e "\\|^" "[  ]*$" 0 looking-at r┆
0x0360…0380 65 2d 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 20 22 5e 0a 22 20 66 6f 72 77 61 72 64 2d 63   ┆e-search-backward "^ " forward-c┆
0x0380…03a0 68 61 72 20 2d 31 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 66 6f 72 77 61 72 64   ┆har -1 beginning-of-line forward┆
0x03a0…03c0 2d 6c 69 6e 65 20 65 6e 64 2d 6f 66 2d 6c 69 6e 65 20 32 20 31 30 20 72 65 2d 73 65 61 72 63 68   ┆-line end-of-line 2 10 re-search┆
0x03c0…03e0 2d 66 6f 72 77 61 72 64 20 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 5d 20 33 30 29 29 0a 0a   ┆-forward match-beginning] 30))  ┆
0x03e0…0400 28 64 65 66 75 6e 20 62 61 63 6b 77 61 72 64 2d 70 61 72 61 67 72 61 70 68 20 28 26 6f 70 74 69   ┆(defun backward-paragraph (&opti┆
0x0400…0420 6f 6e 61 6c 20 61 72 67 29 20 22 5c 0a 4d 6f 76 65 20 62 61 63 6b 77 61 72 64 20 74 6f 20 73 74   ┆onal arg) "\ Move backward to st┆
0x0420…0440 61 72 74 20 6f 66 20 70 61 72 61 67 72 61 70 68 2e 20 20 57 69 74 68 20 61 72 67 2c 20 64 6f 20   ┆art of paragraph.  With arg, do ┆
0x0440…0460 69 74 20 61 72 67 20 74 69 6d 65 73 2e 0a 41 20 70 61 72 61 67 72 61 70 68 20 73 74 61 72 74 20   ┆it arg times. A paragraph start ┆
0x0460…0480 69 73 20 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 61 20 6c 69 6e 65 20 77 68 69 63 68   ┆is the beginning of a line which┆
0x0480…04a0 20 69 73 20 61 20 66 69 72 73 74 2d 6c 69 6e 65 2d 6f 66 2d 70 61 72 61 67 72 61 70 68 0a 6f 72   ┆ is a first-line-of-paragraph or┆
0x04a0…04c0 20 77 68 69 63 68 20 69 73 20 6f 72 64 69 6e 61 72 79 20 74 65 78 74 20 61 6e 64 20 66 6f 6c 6c   ┆ which is ordinary text and foll┆
0x04c0…04e0 6f 77 73 20 61 20 70 61 72 61 67 72 61 70 68 2d 73 65 70 61 72 61 74 69 6e 67 20 6c 69 6e 65 3b   ┆ows a paragraph-separating line;┆
0x04e0…0500 20 65 78 63 65 70 74 3a 0a 69 66 20 74 68 65 20 66 69 72 73 74 20 72 65 61 6c 20 6c 69 6e 65 20   ┆ except: if the first real line ┆
0x0500…0520 6f 66 20 61 20 70 61 72 61 67 72 61 70 68 20 69 73 20 70 72 65 63 65 64 65 64 20 62 79 20 61 20   ┆of a paragraph is preceded by a ┆
0x0520…0540 62 6c 61 6e 6b 20 6c 69 6e 65 2c 0a 74 68 65 20 70 61 72 61 67 72 61 70 68 20 73 74 61 72 74 73   ┆blank line, the paragraph starts┆
0x0540…0560 20 61 74 20 74 68 61 74 20 62 6c 61 6e 6b 20 6c 69 6e 65 2e 0a 53 65 65 20 66 6f 72 77 61 72 64   ┆ at that blank line. See forward┆
0x0560…0580 2d 70 61 72 61 67 72 61 70 68 20 66 6f 72 20 6d 6f 72 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e   ┆-paragraph for more information.┆
0x0580…05a0 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22   ┆" (interactive "p") (byte-code "┆
0x05a0…05c0 c1 88 08 86 09 00 c2 89 10 88 c3 08 5b 21 87 22 20 5b 61 72 67 20 6e 69 6c 20 31 20 66 6f 72 77   ┆            [! " [arg nil 1 forw┆
0x05c0…05e0 61 72 64 2d 70 61 72 61 67 72 61 70 68 5d 20 32 29 29 0a 0a 28 64 65 66 75 6e 20 6d 61 72 6b 2d   ┆ard-paragraph] 2))  (defun mark-┆
0x05e0…0600 70 61 72 61 67 72 61 70 68 20 6e 69 6c 20 22 5c 0a 50 75 74 20 70 6f 69 6e 74 20 61 74 20 62 65   ┆paragraph nil "\ Put point at be┆
0x0600…0620 67 69 6e 6e 69 6e 67 20 6f 66 20 74 68 69 73 20 70 61 72 61 67 72 61 70 68 2c 20 6d 61 72 6b 20   ┆ginning of this paragraph, mark ┆
0x0620…0640 61 74 20 65 6e 64 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64   ┆at end." (interactive) (byte-cod┆
0x0640…0660 65 20 22 c0 88 c2 c3 21 88 c4 c0 c1 5c 22 88 c5 c3 21 87 22 20 5b 6e 69 6c 20 74 20 66 6f 72 77   ┆e "    !    \"   ! " [nil t forw┆
0x0660…0680 61 72 64 2d 70 61 72 61 67 72 61 70 68 20 31 20 70 75 73 68 2d 6d 61 72 6b 20 62 61 63 6b 77 61   ┆ard-paragraph 1 push-mark backwa┆
0x0680…06a0 72 64 2d 70 61 72 61 67 72 61 70 68 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 6b 69 6c 6c 2d 70   ┆rd-paragraph] 4))  (defun kill-p┆
0x06a0…06c0 61 72 61 67 72 61 70 68 20 28 61 72 67 29 20 22 5c 0a 4b 69 6c 6c 20 74 6f 20 65 6e 64 20 6f 66   ┆aragraph (arg) "\ Kill to end of┆
0x06c0…06e0 20 70 61 72 61 67 72 61 70 68 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 2a 70 22 29 20   ┆ paragraph." (interactive "*p") ┆
0x06e0…0700 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c2 60 c3 08 21 88 60 5c 22 87 22 20 5b 61 72 67 20 6e   ┆(byte-code "   `  ! `\" " [arg n┆
0x0700…0720 69 6c 20 6b 69 6c 6c 2d 72 65 67 69 6f 6e 20 66 6f 72 77 61 72 64 2d 70 61 72 61 67 72 61 70 68   ┆il kill-region forward-paragraph┆
0x0720…0740 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 62 61 63 6b 77 61 72 64 2d 6b 69 6c 6c 2d 70 61 72 61   ┆] 4))  (defun backward-kill-para┆
0x0740…0760 67 72 61 70 68 20 28 61 72 67 29 20 22 5c 0a 4b 69 6c 6c 20 62 61 63 6b 20 74 6f 20 73 74 61 72   ┆graph (arg) "\ Kill back to star┆
0x0760…0780 74 20 6f 66 20 70 61 72 61 67 72 61 70 68 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 2a   ┆t of paragraph." (interactive "*┆
0x0780…07a0 70 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c2 60 c3 08 21 88 60 5c 22 87 22 20 5b 61   ┆p") (byte-code "   `  ! `\" " [a┆
0x07a0…07c0 72 67 20 6e 69 6c 20 6b 69 6c 6c 2d 72 65 67 69 6f 6e 20 62 61 63 6b 77 61 72 64 2d 70 61 72 61   ┆rg nil kill-region backward-para┆
0x07c0…07e0 67 72 61 70 68 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 61 6e 73 70 6f 73 65 2d 70 61 72   ┆graph] 4))  (defun transpose-par┆
0x07e0…0800 61 67 72 61 70 68 73 20 28 61 72 67 29 20 22 5c 0a 49 6e 74 65 72 63 68 61 6e 67 65 20 74 68 69   ┆agraphs (arg) "\ Interchange thi┆
0x0800…0820 73 20 28 6f 72 20 6e 65 78 74 29 20 70 61 72 61 67 72 61 70 68 20 77 69 74 68 20 70 72 65 76 69   ┆s (or next) paragraph with previ┆
0x0820…0840 6f 75 73 20 6f 6e 65 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 2a 70 22 29 20 28 62 79   ┆ous one." (interactive "*p") (by┆
0x0840…0860 74 65 2d 63 6f 64 65 20 22 c1 88 c2 c3 08 5c 22 87 22 20 5b 61 72 67 20 6e 69 6c 20 74 72 61 6e   ┆te-code "     \" " [arg nil tran┆
0x0860…0880 73 70 6f 73 65 2d 73 75 62 72 20 66 6f 72 77 61 72 64 2d 70 61 72 61 67 72 61 70 68 5d 20 33 29   ┆spose-subr forward-paragraph] 3)┆
0x0880…08a0 29 0a 0a 28 64 65 66 75 6e 20 73 74 61 72 74 2d 6f 66 2d 70 61 72 61 67 72 61 70 68 2d 74 65 78   ┆)  (defun start-of-paragraph-tex┆
0x08a0…08c0 74 20 6e 69 6c 20 28 62 79 74 65 2d 63 6f 64 65 20 22 60 c2 19 18 c3 c4 21 88 60 89 11 88 c5 c6   ┆t nil (byte-code "`     ! `     ┆
0x08c0…08e0 21 88 60 08 59 85 21 00 09 62 88 09 65 56 85 21 00 c7 20 2a 87 22 20 5b 6f 70 6f 69 6e 74 20 6e   ┆! ` Y !  b  eV !   * " [opoint n┆
0x08e0…0900 70 6f 69 6e 74 20 6e 69 6c 20 66 6f 72 77 61 72 64 2d 70 61 72 61 67 72 61 70 68 20 2d 31 20 73   ┆point nil forward-paragraph -1 s┆
0x0900…0920 6b 69 70 2d 63 68 61 72 73 2d 66 6f 72 77 61 72 64 20 22 20 09 0a 22 20 73 74 61 72 74 2d 6f 66   ┆kip-chars-forward "   " start-of┆
0x0920…0940 2d 70 61 72 61 67 72 61 70 68 2d 74 65 78 74 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 65 6e 64   ┆-paragraph-text] 4))  (defun end┆
0x0940…0960 2d 6f 66 2d 70 61 72 61 67 72 61 70 68 2d 74 65 78 74 20 6e 69 6c 20 28 62 79 74 65 2d 63 6f 64   ┆-of-paragraph-text nil (byte-cod┆
0x0960…0980 65 20 22 60 18 c1 c2 21 88 68 c3 3d 85 0f 00 c4 c5 21 88 60 08 58 85 5c 22 00 c4 c2 21 88 60 64   ┆e "`   ! h =     ! ` X \"   ! `d┆
0x0980…09a0 57 85 5c 22 00 c6 20 29 87 22 20 5b 6f 70 6f 69 6e 74 20 66 6f 72 77 61 72 64 2d 70 61 72 61 67   ┆W \"   ) " [opoint forward-parag┆
0x09a0…09c0 72 61 70 68 20 31 20 31 30 20 66 6f 72 77 61 72 64 2d 63 68 61 72 20 2d 31 20 65 6e 64 2d 6f 66   ┆raph 1 10 forward-char -1 end-of┆
0x09c0…09e0 2d 70 61 72 61 67 72 61 70 68 2d 74 65 78 74 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72   ┆-paragraph-text] 5))  (defun for┆
0x09e0…0a00 77 61 72 64 2d 73 65 6e 74 65 6e 63 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 20 22 5c   ┆ward-sentence (&optional arg) "\┆
0x0a00…0a20 0a 4d 6f 76 65 20 66 6f 72 77 61 72 64 20 74 6f 20 6e 65 78 74 20 73 65 6e 74 65 6e 63 65 2d 65   ┆ Move forward to next sentence-e┆
0x0a20…0a40 6e 64 2e 20 20 57 69 74 68 20 61 72 67 75 6d 65 6e 74 2c 20 72 65 70 65 61 74 2e 0a 57 69 74 68   ┆nd.  With argument, repeat. With┆
0x0a40…0a60 20 6e 65 67 61 74 69 76 65 20 61 72 67 75 6d 65 6e 74 2c 20 6d 6f 76 65 20 62 61 63 6b 77 61 72   ┆ negative argument, move backwar┆
0x0a60…0a80 64 20 72 65 70 65 61 74 65 64 6c 79 20 74 6f 20 73 65 6e 74 65 6e 63 65 2d 62 65 67 69 6e 6e 69   ┆d repeatedly to sentence-beginni┆
0x0a80…0aa0 6e 67 2e 0a 53 65 6e 74 65 6e 63 65 20 65 6e 64 73 20 61 72 65 20 69 64 65 6e 74 69 66 69 65 64   ┆ng. Sentence ends are identified┆
0x0aa0…0ac0 20 62 79 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 73 65 6e 74 65 6e 63 65 2d 65 6e 64 0a 74 72   ┆ by the value of sentence-end tr┆
0x0ac0…0ae0 65 61 74 65 64 20 61 73 20 61 20 72 65 67 75 6c 61 72 20 65 78 70 72 65 73 73 69 6f 6e 2e 20 20   ┆eated as a regular expression.  ┆
0x0ae0…0b00 41 6c 73 6f 2c 20 65 76 65 72 79 20 70 61 72 61 67 72 61 70 68 20 62 6f 75 6e 64 61 72 79 0a 74   ┆Also, every paragraph boundary t┆
0x0b00…0b20 65 72 6d 69 6e 61 74 65 73 20 73 65 6e 74 65 6e 63 65 73 20 61 73 20 77 65 6c 6c 2e 22 20 28 69   ┆erminates sentences as well." (i┆
0x0b20…0b40 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c5 88 08 86   ┆nteractive "p") (byte-code "    ┆
0x0b40…0b60 09 00 c6 89 10 88 08 c7 57 85 35 00 8a c8 20 88 60 29 19 c9 0a ca 50 09 c3 23 83 29 00 cb c7 21   ┆        W 5     `)    P  # )   !┆
0x0b60…0b80 53 62 82 2b 00 09 62 29 88 08 54 89 10 88 82 0a 00 88 08 c7 56 85 5d 00 8a cc 20 88 60 29 1c cd   ┆Sb +  b)  T         V ]     `)  ┆
0x0b80…0ba0 0a 0c c3 23 83 51 00 ce cf 21 82 53 00 0c 62 29 88 08 53 89 10 88 82 36 00 87 22 20 5b 61 72 67   ┆   # Q   ! S  b)  S    6  " [arg┆
0x0ba0…0bc0 20 70 61 72 2d 62 65 67 20 73 65 6e 74 65 6e 63 65 2d 65 6e 64 20 74 20 70 61 72 2d 65 6e 64 20   ┆ par-beg sentence-end t par-end ┆
0x0bc0…0be0 6e 69 6c 20 31 20 30 20 73 74 61 72 74 2d 6f 66 2d 70 61 72 61 67 72 61 70 68 2d 74 65 78 74 20   ┆nil 1 0 start-of-paragraph-text ┆
0x0be0…0c00 72 65 2d 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 20 22 5b 5e 20 09 0a 5d 22 20 6d 61 74 63   ┆re-search-backward "[^   ]" matc┆
0x0c00…0c20 68 2d 65 6e 64 20 65 6e 64 2d 6f 66 2d 70 61 72 61 67 72 61 70 68 2d 74 65 78 74 20 72 65 2d 73   ┆h-end end-of-paragraph-text re-s┆
0x0c20…0c40 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 73 6b 69 70 2d 63 68 61 72 73 2d 62 61 63 6b 77 61 72   ┆earch-forward skip-chars-backwar┆
0x0c40…0c60 64 20 22 20 09 0a 22 5d 20 39 29 29 0a 0a 28 64 65 66 75 6e 20 62 61 63 6b 77 61 72 64 2d 73 65   ┆d "   "] 9))  (defun backward-se┆
0x0c60…0c80 6e 74 65 6e 63 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 20 22 5c 0a 4d 6f 76 65 20 62   ┆ntence (&optional arg) "\ Move b┆
0x0c80…0ca0 61 63 6b 77 61 72 64 20 74 6f 20 73 74 61 72 74 20 6f 66 20 73 65 6e 74 65 6e 63 65 2e 20 20 57   ┆ackward to start of sentence.  W┆
0x0ca0…0cc0 69 74 68 20 61 72 67 2c 20 64 6f 20 69 74 20 61 72 67 20 74 69 6d 65 73 2e 0a 53 65 65 20 66 6f   ┆ith arg, do it arg times. See fo┆
0x0cc0…0ce0 72 77 61 72 64 2d 73 65 6e 74 65 6e 63 65 20 66 6f 72 20 6d 6f 72 65 20 69 6e 66 6f 72 6d 61 74   ┆rward-sentence for more informat┆
0x0ce0…0d00 69 6f 6e 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 20 28 62 79 74 65 2d 63 6f   ┆ion." (interactive "p") (byte-co┆
0x0d00…0d20 64 65 20 22 c1 88 08 86 09 00 c2 89 10 88 c3 08 5b 21 87 22 20 5b 61 72 67 20 6e 69 6c 20 31 20   ┆de "            [! " [arg nil 1 ┆
0x0d20…0d40 66 6f 72 77 61 72 64 2d 73 65 6e 74 65 6e 63 65 5d 20 32 29 29 0a 0a 28 64 65 66 75 6e 20 6b 69   ┆forward-sentence] 2))  (defun ki┆
0x0d40…0d60 6c 6c 2d 73 65 6e 74 65 6e 63 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 20 22 5c 0a 4b   ┆ll-sentence (&optional arg) "\ K┆
0x0d60…0d80 69 6c 6c 20 66 72 6f 6d 20 70 6f 69 6e 74 20 74 6f 20 65 6e 64 20 6f 66 20 73 65 6e 74 65 6e 63   ┆ill from point to end of sentenc┆
0x0d80…0da0 65 2e 0a 57 69 74 68 20 61 72 67 2c 20 72 65 70 65 61 74 2c 20 6f 72 20 62 61 63 6b 77 61 72 64   ┆e. With arg, repeat, or backward┆
0x0da0…0dc0 20 69 66 20 6e 65 67 61 74 69 76 65 20 61 72 67 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20   ┆ if negative arg." (interactive ┆
0x0dc0…0de0 22 2a 70 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 88 60 18 c3 09 21 88 c4 08 60 5c 22 29   ┆"*p") (byte-code "  `   !   `\")┆
0x0de0…0e00 87 22 20 5b 62 65 67 20 61 72 67 20 6e 69 6c 20 66 6f 72 77 61 72 64 2d 73 65 6e 74 65 6e 63 65   ┆ " [beg arg nil forward-sentence┆
0x0e00…0e20 20 6b 69 6c 6c 2d 72 65 67 69 6f 6e 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 62 61 63 6b 77 61   ┆ kill-region] 4))  (defun backwa┆
0x0e20…0e40 72 64 2d 6b 69 6c 6c 2d 73 65 6e 74 65 6e 63 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29   ┆rd-kill-sentence (&optional arg)┆
0x0e40…0e60 20 22 5c 0a 4b 69 6c 6c 20 62 61 63 6b 20 66 72 6f 6d 20 70 6f 69 6e 74 20 74 6f 20 73 74 61 72   ┆ "\ Kill back from point to star┆
0x0e60…0e80 74 20 6f 66 20 73 65 6e 74 65 6e 63 65 2e 0a 57 69 74 68 20 61 72 67 2c 20 72 65 70 65 61 74 2c   ┆t of sentence. With arg, repeat,┆
0x0e80…0ea0 20 6f 72 20 66 6f 72 77 61 72 64 20 69 66 20 6e 65 67 61 74 69 76 65 20 61 72 67 2e 22 20 28 69   ┆ or forward if negative arg." (i┆
0x0ea0…0ec0 6e 74 65 72 61 63 74 69 76 65 20 22 2a 70 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 88 60   ┆nteractive "*p") (byte-code "  `┆
0x0ec0…0ee0 18 c3 09 21 88 c4 08 60 5c 22 29 87 22 20 5b 62 65 67 20 61 72 67 20 6e 69 6c 20 62 61 63 6b 77   ┆   !   `\") " [beg arg nil backw┆
0x0ee0…0f00 61 72 64 2d 73 65 6e 74 65 6e 63 65 20 6b 69 6c 6c 2d 72 65 67 69 6f 6e 5d 20 34 29 29 0a 0a 28   ┆ard-sentence kill-region] 4))  (┆
0x0f00…0f20 64 65 66 75 6e 20 6d 61 72 6b 2d 65 6e 64 2d 6f 66 2d 73 65 6e 74 65 6e 63 65 20 28 61 72 67 29   ┆defun mark-end-of-sentence (arg)┆
0x0f20…0f40 20 22 5c 0a 50 75 74 20 6d 61 72 6b 20 61 74 20 65 6e 64 20 6f 66 20 73 65 6e 74 65 6e 63 65 2e   ┆ "\ Put mark at end of sentence.┆
0x0f40…0f60 20 20 41 72 67 20 77 6f 72 6b 73 20 61 73 20 69 6e 20 66 6f 72 77 61 72 64 2d 73 65 6e 74 65 6e   ┆  Arg works as in forward-senten┆
0x0f60…0f80 63 65 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 20 28 62 79 74 65 2d 63 6f 64   ┆ce." (interactive "p") (byte-cod┆
0x0f80…0fa0 65 20 22 c1 88 c2 8a c3 08 21 88 60 29 21 87 22 20 5b 61 72 67 20 6e 69 6c 20 70 75 73 68 2d 6d   ┆e "      ! `)! " [arg nil push-m┆
0x0fa0…0fc0 61 72 6b 20 66 6f 72 77 61 72 64 2d 73 65 6e 74 65 6e 63 65 5d 20 33 29 29 0a 0a 28 64 65 66 75   ┆ark forward-sentence] 3))  (defu┆
0x0fc0…0fe0 6e 20 74 72 61 6e 73 70 6f 73 65 2d 73 65 6e 74 65 6e 63 65 73 20 28 61 72 67 29 20 22 5c 0a 49   ┆n transpose-sentences (arg) "\ I┆
0x0fe0…1000 6e 74 65 72 63 68 61 6e 67 65 20 74 68 69 73 20 28 6e 65 78 74 29 20 61 6e 64 20 70 72 65 76 69   ┆nterchange this (next) and previ┆
0x1000…1020 6f 75 73 20 73 65 6e 74 65 6e 63 65 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 2a 70 22   ┆ous sentence." (interactive "*p"┆
0x1020…1040 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c2 c3 08 5c 22 87 22 20 5b 61 72 67 20 6e 69 6c   ┆) (byte-code "     \" " [arg nil┆
0x1040…1060 20 74 72 61 6e 73 70 6f 73 65 2d 73 75 62 72 20 66 6f 72 77 61 72 64 2d 73 65 6e 74 65 6e 63 65   ┆ transpose-subr forward-sentence┆
0x1060…1066 5d 20 33 29 29 0a   ┆] 3)) ┆