|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - downloadIndex: ┃ s ┃
Length: 37348 (0x91e4)
Names: »simple.elc«
└─⟦a0efdde77⟧ Bits:30001252 EUUGD11 Tape, 1987 Spring Conference Helsinki
└─ ⟦this⟧ »EUUGD11/gnu-31mar87/emacs/lisp/simple.elc«
0x0000…0020 0a 28 64 65 66 75 6e 20 6f 70 65 6e 2d 6c 69 6e 65 20 28 61 72 67 29 20 22 5c 0a 49 6e 73 65 72 ┆ (defun open-line (arg) "\ Inser┆ 0x0020…0040 74 20 61 20 6e 65 77 6c 69 6e 65 20 61 6e 64 20 6c 65 61 76 65 20 70 6f 69 6e 74 20 62 65 66 6f ┆t a newline and leave point befo┆ 0x0040…0060 72 65 20 69 74 2e 0a 57 69 74 68 20 61 72 67 2c 20 69 6e 73 65 72 74 73 20 74 68 61 74 20 6d 61 ┆re it. With arg, inserts that ma┆ 0x0060…0080 6e 79 20 6e 65 77 6c 69 6e 65 73 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 2a 70 22 29 ┆ny newlines." (interactive "*p")┆ 0x0080…00a0 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 88 6e 85 08 00 6f 3f 18 08 85 10 00 c3 c4 21 88 09 c5 ┆ (byte-code " n o? ! ┆ 0x00a0…00c0 56 85 26 00 c6 63 88 60 53 62 88 09 53 89 11 88 82 11 00 88 08 85 2e 00 c3 c7 21 29 87 22 20 5b ┆V & c `Sb S . !) " [┆ 0x00c0…00e0 66 6c 61 67 20 61 72 67 20 6e 69 6c 20 66 6f 72 77 61 72 64 2d 63 68 61 72 20 2d 31 20 30 20 31 ┆flag arg nil forward-char -1 0 1┆ 0x00e0…0100 30 20 31 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 73 70 6c 69 74 2d 6c 69 6e 65 20 6e 69 6c 20 ┆0 1] 4)) (defun split-line nil ┆ 0x0100…0120 22 5c 0a 53 70 6c 69 74 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 2c 20 6d 6f 76 69 6e 67 20 70 6f ┆"\ Split current line, moving po┆ 0x0120…0140 72 74 69 6f 6e 20 62 65 79 6f 6e 64 20 70 6f 69 6e 74 20 76 65 72 74 69 63 61 6c 6c 79 20 64 6f ┆rtion beyond point vertically do┆ 0x0140…0160 77 6e 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 2a 22 29 20 28 62 79 74 65 2d 63 6f 64 ┆wn." (interactive "*") (byte-cod┆ 0x0160…0180 65 20 22 c2 88 c3 c4 21 88 69 60 19 18 c5 63 88 c6 08 c7 5c 22 88 09 62 2a 87 22 20 5b 63 6f 6c ┆e " ! i` c \" b* " [col┆ 0x0180…01a0 20 70 6f 73 20 6e 69 6c 20 73 6b 69 70 2d 63 68 61 72 73 2d 66 6f 72 77 61 72 64 20 22 20 09 22 ┆ pos nil skip-chars-forward " "┆ 0x01a0…01c0 20 31 30 20 69 6e 64 65 6e 74 2d 74 6f 20 30 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 71 75 6f ┆ 10 indent-to 0] 4)) (defun quo┆ 0x01c0…01e0 74 65 64 2d 69 6e 73 65 72 74 20 28 61 72 67 29 20 22 5c 0a 52 65 61 64 20 6e 65 78 74 20 69 6e ┆ted-insert (arg) "\ Read next in┆ 0x01e0…0200 70 75 74 20 63 68 61 72 61 63 74 65 72 20 61 6e 64 20 69 6e 73 65 72 74 20 69 74 2e 0a 55 73 65 ┆put character and insert it. Use┆ 0x0200…0220 66 75 6c 20 66 6f 72 20 69 6e 73 65 72 74 69 6e 67 20 63 6f 6e 74 72 6f 6c 20 63 68 61 72 61 63 ┆ful for inserting control charac┆ 0x0220…0240 74 65 72 73 2e 0a 59 6f 75 20 6d 61 79 20 61 6c 73 6f 20 74 79 70 65 20 75 70 20 74 6f 20 33 20 ┆ters. You may also type up to 3 ┆ 0x0240…0260 6f 63 74 61 6c 20 64 69 67 69 74 73 2c 20 74 6f 20 69 6e 73 65 72 74 20 61 20 63 68 61 72 61 63 ┆octal digits, to insert a charac┆ 0x0260…0280 74 65 72 20 77 69 74 68 20 74 68 61 74 20 63 6f 64 65 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 ┆ter with that code" (interactive┆ 0x0280…02a0 20 22 2a 70 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 88 c3 20 18 09 c4 56 85 16 00 08 63 ┆ "*p") (byte-code " V c┆ 0x02a0…02c0 88 09 53 89 11 88 82 05 00 29 87 22 20 5b 63 68 61 72 20 61 72 67 20 6e 69 6c 20 72 65 61 64 2d ┆ S ) " [char arg nil read-┆ 0x02c0…02e0 71 75 6f 74 65 64 2d 63 68 61 72 20 30 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 64 65 6c 65 74 ┆quoted-char 0] 4)) (defun delet┆ 0x02e0…0300 65 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 20 22 5c ┆e-indentation (&optional arg) "\┆ 0x0300…0320 0a 4a 6f 69 6e 20 74 68 69 73 20 6c 69 6e 65 20 74 6f 20 70 72 65 76 69 6f 75 73 20 61 6e 64 20 ┆ Join this line to previous and ┆ 0x0320…0340 66 69 78 20 75 70 20 77 68 69 74 65 73 70 61 63 65 20 61 74 20 6a 6f 69 6e 2e 0a 57 69 74 68 20 ┆fix up whitespace at join. With ┆ 0x0340…0360 61 72 67 75 6d 65 6e 74 2c 20 6a 6f 69 6e 20 74 68 69 73 20 6c 69 6e 65 20 74 6f 20 66 6f 6c 6c ┆argument, join this line to foll┆ 0x0360…0380 6f 77 69 6e 67 20 6c 69 6e 65 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 2a 50 22 29 20 ┆owing line." (interactive "*P") ┆ 0x0380…03a0 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c2 20 88 08 85 0c 00 c3 c4 21 88 6f 3f 85 1a 00 c5 60 ┆(byte-code " ! o? `┆ 0x03a0…03c0 60 53 5c 22 88 c6 20 87 22 20 5b 61 72 67 20 6e 69 6c 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d ┆`S\" " [arg nil beginning-of-┆ 0x03c0…03e0 6c 69 6e 65 20 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 20 64 65 6c 65 74 65 2d 72 65 67 69 6f ┆line forward-line 1 delete-regio┆ 0x03e0…0400 6e 20 66 69 78 75 70 2d 77 68 69 74 65 73 70 61 63 65 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 ┆n fixup-whitespace] 5)) (defun ┆ 0x0400…0420 66 69 78 75 70 2d 77 68 69 74 65 73 70 61 63 65 20 6e 69 6c 20 22 5c 0a 46 69 78 75 70 20 77 68 ┆fixup-whitespace nil "\ Fixup wh┆ 0x0420…0440 69 74 65 20 73 70 61 63 65 20 62 65 74 77 65 65 6e 20 6f 62 6a 65 63 74 73 20 61 72 6f 75 6e 64 ┆ite space between objects around┆ 0x0440…0460 20 70 6f 69 6e 74 2e 0a 4c 65 61 76 65 20 6f 6e 65 20 73 70 61 63 65 20 6f 72 20 6e 6f 6e 65 2c ┆ point. Leave one space or none,┆ 0x0460…0480 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 74 68 65 20 63 6f 6e 74 65 78 74 2e 22 20 28 69 6e 74 ┆ according to the context." (int┆ 0x0480…04a0 65 72 61 63 74 69 76 65 20 22 2a 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 8a c1 20 88 ┆eractive "*") (byte-code " ┆ 0x04a0…04c0 c2 c3 21 86 15 00 8a c4 c5 21 88 c2 c6 21 29 83 1c 00 c0 82 1e 00 c7 63 29 87 22 20 5b 6e 69 6c ┆ ! ! !) c) " [nil┆ 0x04c0…04e0 20 64 65 6c 65 74 65 2d 68 6f 72 69 7a 6f 6e 74 61 6c 2d 73 70 61 63 65 20 6c 6f 6f 6b 69 6e 67 ┆ delete-horizontal-space looking┆ 0x04e0…0500 2d 61 74 20 22 5e 5c 5c 7c 5c 5c 73 29 22 20 66 6f 72 77 61 72 64 2d 63 68 61 72 20 2d 31 20 22 ┆-at "^\\|\\s)" forward-char -1 "┆ 0x0500…0520 24 5c 5c 7c 5c 5c 73 28 5c 5c 7c 5c 5c 73 27 22 20 33 32 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e ┆$\\|\\s(\\|\\s'" 32] 5)) (defun┆ 0x0520…0540 20 64 65 6c 65 74 65 2d 68 6f 72 69 7a 6f 6e 74 61 6c 2d 73 70 61 63 65 20 6e 69 6c 20 22 5c 0a ┆ delete-horizontal-space nil "\ ┆ 0x0540…0560 44 65 6c 65 74 65 20 61 6c 6c 20 73 70 61 63 65 73 20 61 6e 64 20 74 61 62 73 20 61 72 6f 75 6e ┆Delete all spaces and tabs aroun┆ 0x0560…0580 64 20 70 6f 69 6e 74 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 2a 22 29 20 28 62 79 74 ┆d point." (interactive "*") (byt┆ 0x0580…05a0 65 2d 63 6f 64 65 20 22 c0 88 c1 c2 21 88 c3 60 c4 c2 21 88 60 5c 22 87 22 20 5b 6e 69 6c 20 73 ┆e-code " ! ` ! `\" " [nil s┆ 0x05a0…05c0 6b 69 70 2d 63 68 61 72 73 2d 62 61 63 6b 77 61 72 64 20 22 20 09 22 20 64 65 6c 65 74 65 2d 72 ┆kip-chars-backward " " delete-r┆ 0x05c0…05e0 65 67 69 6f 6e 20 73 6b 69 70 2d 63 68 61 72 73 2d 66 6f 72 77 61 72 64 5d 20 35 29 29 0a 0a 28 ┆egion skip-chars-forward] 5)) (┆ 0x05e0…0600 64 65 66 75 6e 20 6a 75 73 74 2d 6f 6e 65 2d 73 70 61 63 65 20 6e 69 6c 20 22 5c 0a 44 65 6c 65 ┆defun just-one-space nil "\ Dele┆ 0x0600…0620 74 65 20 61 6c 6c 20 73 70 61 63 65 73 20 61 6e 64 20 74 61 62 73 20 61 72 6f 75 6e 64 20 70 6f ┆te all spaces and tabs around po┆ 0x0620…0640 69 6e 74 2c 20 6c 65 61 76 69 6e 67 20 6f 6e 65 20 73 70 61 63 65 2e 22 20 28 69 6e 74 65 72 61 ┆int, leaving one space." (intera┆ 0x0640…0660 63 74 69 76 65 20 22 2a 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 c1 c2 21 88 67 c3 55 ┆ctive "*") (byte-code " ! g U┆ 0x0660…0680 83 12 00 c4 c5 21 82 14 00 c3 63 88 c6 60 c7 c2 21 88 60 5c 22 87 22 20 5b 6e 69 6c 20 73 6b 69 ┆ ! c ` ! `\" " [nil ski┆ 0x0680…06a0 70 2d 63 68 61 72 73 2d 62 61 63 6b 77 61 72 64 20 22 20 09 22 20 33 32 20 66 6f 72 77 61 72 64 ┆p-chars-backward " " 32 forward┆ 0x06a0…06c0 2d 63 68 61 72 20 31 20 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 73 6b 69 70 2d 63 68 61 72 73 ┆-char 1 delete-region skip-chars┆ 0x06c0…06e0 2d 66 6f 72 77 61 72 64 5d 20 36 29 29 0a 0a 28 64 65 66 75 6e 20 64 65 6c 65 74 65 2d 62 6c 61 ┆-forward] 6)) (defun delete-bla┆ 0x06e0…0700 6e 6b 2d 6c 69 6e 65 73 20 6e 69 6c 20 22 5c 0a 4f 6e 20 62 6c 61 6e 6b 20 6c 69 6e 65 2c 20 64 ┆nk-lines nil "\ On blank line, d┆ 0x0700…0720 65 6c 65 74 65 20 61 6c 6c 20 73 75 72 72 6f 75 6e 64 69 6e 67 20 62 6c 61 6e 6b 20 6c 69 6e 65 ┆elete all surrounding blank line┆ 0x0720…0740 73 2c 20 6c 65 61 76 69 6e 67 20 6a 75 73 74 20 6f 6e 65 2e 0a 4f 6e 20 69 73 6f 6c 61 74 65 64 ┆s, leaving just one. On isolated┆ 0x0740…0760 20 62 6c 61 6e 6b 20 6c 69 6e 65 2c 20 64 65 6c 65 74 65 20 74 68 61 74 20 6f 6e 65 2e 0a 4f 6e ┆ blank line, delete that one. On┆ 0x0760…0780 20 6e 6f 6e 62 6c 61 6e 6b 20 6c 69 6e 65 2c 20 64 65 6c 65 74 65 20 61 6c 6c 20 62 6c 61 6e 6b ┆ nonblank line, delete all blank┆ 0x0780…07a0 20 6c 69 6e 65 73 20 74 68 61 74 20 66 6f 6c 6c 6f 77 20 69 74 2e 22 20 28 69 6e 74 65 72 61 63 ┆ lines that follow it." (interac┆ 0x07a0…07c0 74 69 76 65 20 22 2a 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 88 c2 c2 19 18 8a c4 20 88 ┆tive "*") (byte-code " ┆ 0x07c0…07e0 c5 c6 21 89 10 88 08 85 27 00 c5 c7 21 3f 85 27 00 6f 86 27 00 c8 c9 21 88 c5 c6 21 3f 89 11 29 ┆ ! ' !? ' o ' ! !? )┆ 0x07e0…0800 88 08 85 4e 00 c4 20 88 09 85 39 00 c8 ca 21 88 cb 60 cc cd c2 c3 23 83 4c 00 c8 ca 21 88 60 82 ┆ N 9 ! ` # L ! ` ┆ 0x0800…0820 4d 00 65 5c 22 88 08 85 54 00 09 3f 85 74 00 8a ce 20 88 c8 ca 21 88 cb 60 cf cd c2 c3 23 83 71 ┆M e\" T ? t ! ` # q┆ 0x0820…0840 00 c4 20 88 60 82 72 00 64 5c 22 29 2a 87 22 20 5b 74 68 69 73 62 6c 61 6e 6b 20 73 69 6e 67 6c ┆ ` r d\")* " [thisblank singl┆ 0x0840…0860 65 62 6c 61 6e 6b 20 6e 69 6c 20 74 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 6c ┆eblank nil t beginning-of-line l┆ 0x0860…0880 6f 6f 6b 69 6e 67 2d 61 74 20 22 5b 20 09 5d 2a 24 22 20 22 5b 20 09 5d 2a 0a 5b 20 09 5d 2a 24 ┆ooking-at "[ ]*$" "[ ]* [ ]*$┆ 0x0880…08a0 22 20 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 2d 31 20 31 20 64 65 6c 65 74 65 2d 72 65 67 69 6f ┆" forward-line -1 1 delete-regio┆ 0x08a0…08c0 6e 20 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 65 6e ┆n re-search-backward "[^ ]" en┆ 0x08c0…08e0 64 2d 6f 66 2d 6c 69 6e 65 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 5d 20 31 38 29 ┆d-of-line re-search-forward] 18)┆ 0x08e0…0900 29 0a 0a 28 64 65 66 75 6e 20 62 61 63 6b 2d 74 6f 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 6e 69 ┆) (defun back-to-indentation ni┆ 0x0900…0920 6c 20 22 5c 0a 4d 6f 76 65 20 70 6f 69 6e 74 20 74 6f 20 74 68 65 20 66 69 72 73 74 20 6e 6f 6e ┆l "\ Move point to the first non┆ 0x0920…0940 2d 77 68 69 74 65 73 70 61 63 65 20 63 68 61 72 61 63 74 65 72 20 6f 6e 20 74 68 69 73 20 6c 69 ┆-whitespace character on this li┆ 0x0940…0960 6e 65 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 65 20 22 c0 ┆ne." (interactive) (byte-code " ┆ 0x0960…0980 88 c1 c2 21 88 c3 c4 21 87 22 20 5b 6e 69 6c 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e ┆ ! ! " [nil beginning-of-lin┆ 0x0980…09a0 65 20 31 20 73 6b 69 70 2d 63 68 61 72 73 2d 66 6f 72 77 61 72 64 20 22 20 09 22 5d 20 33 29 29 ┆e 1 skip-chars-forward " "] 3))┆ 0x09a0…09c0 0a 0a 28 64 65 66 75 6e 20 6e 65 77 6c 69 6e 65 2d 61 6e 64 2d 69 6e 64 65 6e 74 20 6e 69 6c 20 ┆ (defun newline-and-indent nil ┆ 0x09c0…09e0 22 5c 0a 49 6e 73 65 72 74 20 61 20 6e 65 77 6c 69 6e 65 2c 20 74 68 65 6e 20 69 6e 64 65 6e 74 ┆"\ Insert a newline, then indent┆ 0x09e0…0a00 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 6d 61 6a 6f 72 20 6d 6f 64 65 2e 0a 49 6e 64 65 6e 74 ┆ according to major mode. Indent┆ 0x0a00…0a20 61 74 69 6f 6e 20 69 73 20 64 6f 6e 65 20 75 73 69 6e 67 20 74 68 65 20 63 75 72 72 65 6e 74 20 ┆ation is done using the current ┆ 0x0a20…0a40 69 6e 64 65 6e 74 2d 6c 69 6e 65 2d 66 75 6e 63 74 69 6f 6e 2e 0a 49 6e 20 70 72 6f 67 72 61 6d ┆indent-line-function. In program┆ 0x0a40…0a60 6d 69 6e 67 20 6c 61 6e 67 75 61 67 65 20 6d 6f 64 65 73 2c 20 74 68 69 73 20 69 73 20 74 68 65 ┆ming language modes, this is the┆ 0x0a60…0a80 20 73 61 6d 65 20 61 73 20 54 41 42 2e 0a 49 6e 20 73 6f 6d 65 20 74 65 78 74 20 6d 6f 64 65 73 ┆ same as TAB. In some text modes┆ 0x0a80…0aa0 2c 20 77 68 65 72 65 20 54 41 42 20 69 6e 73 65 72 74 73 20 61 20 74 61 62 2c 20 74 68 69 73 20 ┆, where TAB inserts a tab, this ┆ 0x0aa0…0ac0 69 6e 64 65 6e 74 73 20 74 6f 20 74 68 65 0a 73 70 65 63 69 66 69 65 64 20 6c 65 66 74 2d 6d 61 ┆indents to the specified left-ma┆ 0x0ac0…0ae0 72 67 69 6e 20 63 6f 6c 75 6d 6e 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 2a 22 29 20 ┆rgin column." (interactive "*") ┆ 0x0ae0…0b00 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 c1 60 c2 c3 21 88 60 5c 22 88 c4 63 88 c5 20 87 22 20 ┆(byte-code " ` ! `\" c " ┆ 0x0b00…0b20 5b 6e 69 6c 20 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 73 6b 69 70 2d 63 68 61 72 73 2d 62 61 ┆[nil delete-region skip-chars-ba┆ 0x0b20…0b40 63 6b 77 61 72 64 20 22 20 09 22 20 31 30 20 69 6e 64 65 6e 74 2d 61 63 63 6f 72 64 69 6e 67 2d ┆ckward " " 10 indent-according-┆ 0x0b40…0b60 74 6f 2d 6d 6f 64 65 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 72 65 69 6e 64 65 6e 74 2d 74 68 ┆to-mode] 4)) (defun reindent-th┆ 0x0b60…0b80 65 6e 2d 6e 65 77 6c 69 6e 65 2d 61 6e 64 2d 69 6e 64 65 6e 74 20 6e 69 6c 20 22 5c 0a 52 65 69 ┆en-newline-and-indent nil "\ Rei┆ 0x0b80…0ba0 6e 64 65 6e 74 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 2c 20 69 6e 73 65 72 74 20 6e 65 77 6c 69 ┆ndent current line, insert newli┆ 0x0ba0…0bc0 6e 65 2c 20 74 68 65 6e 20 69 6e 64 65 6e 74 20 74 68 65 20 6e 65 77 20 6c 69 6e 65 2e 0a 49 6e ┆ne, then indent the new line. In┆ 0x0bc0…0be0 64 65 6e 74 61 74 69 6f 6e 20 6f 66 20 62 6f 74 68 20 6c 69 6e 65 73 20 69 73 20 64 6f 6e 65 20 ┆dentation of both lines is done ┆ 0x0be0…0c00 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 74 68 65 20 63 75 72 72 65 6e 74 20 6d 61 6a 6f 72 20 6d ┆according to the current major m┆ 0x0c00…0c20 6f 64 65 2c 0a 77 68 69 63 68 20 6d 65 61 6e 73 20 74 68 61 74 20 74 68 65 20 63 75 72 72 65 6e ┆ode, which means that the curren┆ 0x0c20…0c40 74 20 76 61 6c 75 65 20 6f 66 20 69 6e 64 65 6e 74 2d 6c 69 6e 65 2d 66 75 6e 63 74 69 6f 6e 20 ┆t value of indent-line-function ┆ 0x0c40…0c60 69 73 20 63 61 6c 6c 65 64 2e 0a 49 6e 20 70 72 6f 67 72 61 6d 6d 69 6e 67 20 6c 61 6e 67 75 61 ┆is called. In programming langua┆ 0x0c60…0c80 67 65 20 6d 6f 64 65 73 2c 20 74 68 69 73 20 69 73 20 74 68 65 20 73 61 6d 65 20 61 73 20 54 41 ┆ge modes, this is the same as TA┆ 0x0c80…0ca0 42 2e 0a 49 6e 20 73 6f 6d 65 20 74 65 78 74 20 6d 6f 64 65 73 2c 20 77 68 65 72 65 20 54 41 42 ┆B. In some text modes, where TAB┆ 0x0ca0…0cc0 20 69 6e 73 65 72 74 73 20 61 20 74 61 62 2c 20 74 68 69 73 20 69 6e 64 65 6e 74 73 20 74 6f 20 ┆ inserts a tab, this indents to ┆ 0x0cc0…0ce0 74 68 65 0a 73 70 65 63 69 66 69 65 64 20 6c 65 66 74 2d 6d 61 72 67 69 6e 20 63 6f 6c 75 6d 6e ┆the specified left-margin column┆ 0x0ce0…0d00 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 2a 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 ┆." (interactive "*") (byte-code ┆ 0x0d00…0d20 22 c0 88 8a c1 60 c2 c3 21 88 60 5c 22 88 c4 20 29 88 c5 63 88 c4 20 87 22 20 5b 6e 69 6c 20 64 ┆" ` ! `\" ) c " [nil d┆ 0x0d20…0d40 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 73 6b 69 70 2d 63 68 61 72 73 2d 62 61 63 6b 77 61 72 64 ┆elete-region skip-chars-backward┆ 0x0d40…0d60 20 22 20 09 22 20 69 6e 64 65 6e 74 2d 61 63 63 6f 72 64 69 6e 67 2d 74 6f 2d 6d 6f 64 65 20 31 ┆ " " indent-according-to-mode 1┆ 0x0d60…0d80 30 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 6b 69 6c 6c 2d 66 6f 72 77 61 72 64 2d 63 68 61 72 ┆0] 5)) (defun kill-forward-char┆ 0x0d80…0da0 73 20 28 61 72 67 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 3c 85 09 00 08 40 89 10 88 08 c1 ┆s (arg) (byte-code " < @ ┆ 0x0da0…0dc0 3d 85 13 00 c2 89 10 88 c3 60 60 08 5c 5c 5c 22 87 22 20 5b 61 72 67 20 2d 20 2d 31 20 6b 69 6c ┆= `` \\\" " [arg - -1 kil┆ 0x0dc0…0de0 6c 2d 72 65 67 69 6f 6e 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 6b 69 6c 6c 2d 62 61 63 6b 77 ┆l-region] 4)) (defun kill-backw┆ 0x0de0…0e00 61 72 64 2d 63 68 61 72 73 20 28 61 72 67 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 3c 85 09 ┆ard-chars (arg) (byte-code " < ┆ 0x0e00…0e20 00 08 40 89 10 88 08 c1 3d 85 13 00 c2 89 10 88 c3 60 60 08 5a 5c 22 87 22 20 5b 61 72 67 20 2d ┆ @ = `` Z\" " [arg -┆ 0x0e20…0e40 20 2d 31 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 ┆ -1 kill-region] 4)) (defun bac┆ 0x0e40…0e60 6b 77 61 72 64 2d 64 65 6c 65 74 65 2d 63 68 61 72 2d 75 6e 74 61 62 69 66 79 20 28 61 72 67 20 ┆kward-delete-char-untabify (arg ┆ 0x0e60…0e80 26 6f 70 74 69 6f 6e 61 6c 20 6b 69 6c 6c 70 29 20 22 5c 0a 44 65 6c 65 74 65 20 63 68 61 72 61 ┆&optional killp) "\ Delete chara┆ 0x0e80…0ea0 63 74 65 72 73 20 62 61 63 6b 77 61 72 64 2c 20 63 68 61 6e 67 69 6e 67 20 74 61 62 73 20 69 6e ┆cters backward, changing tabs in┆ 0x0ea0…0ec0 74 6f 20 73 70 61 63 65 73 2e 0a 44 65 6c 65 74 65 20 41 52 47 20 63 68 61 72 73 2c 20 61 6e 64 ┆to spaces. Delete ARG chars, and┆ 0x0ec0…0ee0 20 6b 69 6c 6c 20 28 73 61 76 65 20 69 6e 20 6b 69 6c 6c 20 72 69 6e 67 29 20 69 66 20 4b 49 4c ┆ kill (save in kill ring) if KIL┆ 0x0ee0…0f00 4c 50 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e 0a 49 6e 74 65 72 61 63 74 69 76 65 6c 79 2c 20 41 52 ┆LP is non-nil. Interactively, AR┆ 0x0f00…0f20 47 20 69 73 20 74 68 65 20 70 72 65 66 69 78 20 61 72 67 20 28 64 65 66 61 75 6c 74 20 31 29 0a ┆G is the prefix arg (default 1) ┆ 0x0f20…0f40 61 6e 64 20 4b 49 4c 4c 50 20 69 73 20 74 20 69 66 20 70 72 65 66 69 78 20 61 72 67 20 69 73 20 ┆and KILLP is t if prefix arg is ┆ 0x0f40…0f60 77 61 73 20 73 70 65 63 69 66 69 65 64 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 2a 70 ┆was specified." (interactive "*p┆ 0x0f60…0f80 0a 50 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c4 88 09 18 8a 08 c5 56 85 0d 00 6f 3f 85 39 ┆ P") (byte-code " V o? 9┆ 0x0f80…0fa0 00 68 c6 55 85 2c 00 69 1a c7 c8 21 88 0a 69 5a 89 12 88 c9 c5 0a 4f 63 88 ca cb 21 29 88 c7 c8 ┆ h U , i ! iZ Oc !) ┆ 0x0fa0…0fc0 21 88 08 53 89 10 88 82 05 00 29 29 88 cc 09 0b 5c 22 87 22 20 5b 63 6f 75 6e 74 20 61 72 67 20 ┆! S )) \" " [count arg ┆ 0x0fc0…0fe0 63 6f 6c 20 6b 69 6c 6c 70 20 6e 69 6c 20 30 20 39 20 66 6f 72 77 61 72 64 2d 63 68 61 72 20 2d ┆col killp nil 0 9 forward-char -┆ 0x0fe0…1000 31 20 22 20 20 20 20 20 20 20 20 22 20 64 65 6c 65 74 65 2d 63 68 61 72 20 31 20 64 65 6c 65 74 ┆1 " " delete-char 1 delet┆ 0x1000…1020 65 2d 62 61 63 6b 77 61 72 64 2d 63 68 61 72 5d 20 36 29 29 0a 0a 28 64 65 66 75 6e 20 7a 61 70 ┆e-backward-char] 6)) (defun zap┆ 0x1020…1040 2d 74 6f 2d 63 68 61 72 20 28 61 72 67 20 63 68 61 72 29 20 22 5c 0a 4b 69 6c 6c 20 75 70 20 74 ┆-to-char (arg char) "\ Kill up t┆ 0x1040…1060 6f 20 28 62 75 74 20 6e 6f 74 20 69 6e 63 6c 75 64 69 6e 67 29 20 41 52 47 27 74 68 20 6f 63 63 ┆o (but not including) ARG'th occ┆ 0x1060…1080 75 72 72 65 6e 63 65 20 6f 66 20 43 48 41 52 2e 0a 47 6f 65 73 20 62 61 63 6b 77 61 72 64 20 69 ┆urrence of CHAR. Goes backward i┆ 0x1080…10a0 66 20 41 52 47 20 69 73 20 6e 65 67 61 74 69 76 65 3b 20 67 6f 65 73 20 74 6f 20 65 6e 64 20 6f ┆f ARG is negative; goes to end o┆ 0x10a0…10c0 66 20 62 75 66 66 65 72 20 69 66 20 43 48 41 52 20 6e 6f 74 20 66 6f 75 6e 64 2e 22 20 28 69 6e ┆f buffer if CHAR not found." (in┆ 0x10c0…10e0 74 65 72 61 63 74 69 76 65 20 22 2a 70 0a 63 5a 61 70 20 74 6f 20 63 68 61 72 3a 20 22 29 20 28 ┆teractive "*p cZap to char: ") (┆ 0x10e0…1100 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c4 60 c5 c6 08 21 c1 c2 0b 24 83 5c 22 00 0b c7 56 83 1a ┆byte-code " ` ! $ \" V ┆ 0x1100…1120 00 60 53 82 1c 00 60 54 62 88 60 82 2d 00 0b c7 56 83 2c 00 64 82 2d 00 65 5c 22 87 22 20 5b 63 ┆ `S `Tb ` - V , d - e\" " [c┆ 0x1120…1140 68 61 72 20 6e 69 6c 20 74 20 61 72 67 20 6b 69 6c 6c 2d 72 65 67 69 6f 6e 20 73 65 61 72 63 68 ┆har nil t arg kill-region search┆ 0x1140…1160 2d 66 6f 72 77 61 72 64 20 63 68 61 72 2d 74 6f 2d 73 74 72 69 6e 67 20 30 5d 20 38 29 29 0a 0a ┆-forward char-to-string 0] 8)) ┆ 0x1160…1180 28 64 65 66 75 6e 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 62 75 66 66 65 72 20 28 26 6f 70 74 ┆(defun beginning-of-buffer (&opt┆ 0x1180…11a0 69 6f 6e 61 6c 20 61 72 67 29 20 22 5c 0a 4d 6f 76 65 20 70 6f 69 6e 74 20 74 6f 20 74 68 65 20 ┆ional arg) "\ Move point to the ┆ 0x11a0…11c0 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 74 68 65 20 62 75 66 66 65 72 3b 20 6c 65 61 76 65 20 6d ┆beginning of the buffer; leave m┆ 0x11c0…11e0 61 72 6b 20 61 74 20 70 72 65 76 69 6f 75 73 20 70 6f 73 69 74 69 6f 6e 2e 0a 57 69 74 68 20 61 ┆ark at previous position. With a┆ 0x11e0…1200 72 67 20 4e 2c 20 70 75 74 20 70 6f 69 6e 74 20 4e 2f 31 30 20 6f 66 20 74 68 65 20 77 61 79 20 ┆rg N, put point N/10 of the way ┆ 0x1200…1220 66 72 6f 6d 20 74 68 65 20 74 72 75 65 20 62 65 67 69 6e 6e 69 6e 67 2e 0a 44 6f 6e 27 74 20 75 ┆from the true beginning. Don't u┆ 0x1220…1240 73 65 20 74 68 69 73 20 69 6e 20 4c 69 73 70 20 70 72 6f 67 72 61 6d 73 21 0a 28 67 6f 74 6f 2d ┆se this in Lisp programs! (goto-┆ 0x1240…1260 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 20 69 73 20 66 61 73 74 65 72 20 61 6e 64 20 ┆char (point-min)) is faster and ┆ 0x1260…1280 64 6f 65 73 20 6e 6f 74 20 73 65 74 20 74 68 65 20 6d 61 72 6b 2e 22 20 28 69 6e 74 65 72 61 63 ┆does not set the mark." (interac┆ 0x1280…12a0 74 69 76 65 20 22 50 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c2 20 88 08 83 2c 00 c3 ┆tive "P") (byte-code " , ┆ 0x12a0…12c0 20 c4 56 83 1d 00 c5 c6 08 21 c7 c3 20 c8 5c 22 5c 22 82 29 00 c7 c8 c5 c3 20 c6 08 21 5c 22 5c ┆ V ! \"\" ) !\"\┆ 0x12c0…12e0 5c c8 5c 22 82 2d 00 65 62 88 08 85 36 00 c9 ca 21 87 22 20 5b 61 72 67 20 6e 69 6c 20 70 75 73 ┆\ \" - eb 6 ! " [arg nil pus┆ 0x12e0…1300 68 2d 6d 61 72 6b 20 62 75 66 66 65 72 2d 73 69 7a 65 20 31 30 30 30 30 20 2a 20 70 72 65 66 69 ┆h-mark buffer-size 10000 * prefi┆ 0x1300…1320 78 2d 6e 75 6d 65 72 69 63 2d 76 61 6c 75 65 20 2f 20 31 30 20 66 6f 72 77 61 72 64 2d 6c 69 6e ┆x-numeric-value / 10 forward-lin┆ 0x1320…1340 65 20 31 5d 20 31 33 29 29 0a 0a 28 64 65 66 75 6e 20 65 6e 64 2d 6f 66 2d 62 75 66 66 65 72 20 ┆e 1] 13)) (defun end-of-buffer ┆ 0x1340…1360 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 20 22 5c 0a 4d 6f 76 65 20 70 6f 69 6e 74 20 74 6f ┆(&optional arg) "\ Move point to┆ 0x1360…1380 20 74 68 65 20 65 6e 64 20 6f 66 20 74 68 65 20 62 75 66 66 65 72 3b 20 6c 65 61 76 65 20 6d 61 ┆ the end of the buffer; leave ma┆ 0x1380…13a0 72 6b 20 61 74 20 70 72 65 76 69 6f 75 73 20 70 6f 73 69 74 69 6f 6e 2e 0a 57 69 74 68 20 61 72 ┆rk at previous position. With ar┆ 0x13a0…13c0 67 20 4e 2c 20 70 75 74 20 70 6f 69 6e 74 20 4e 2f 31 30 20 6f 66 20 74 68 65 20 77 61 79 20 66 ┆g N, put point N/10 of the way f┆ 0x13c0…13e0 72 6f 6d 20 74 68 65 20 74 72 75 65 20 65 6e 64 2e 0a 44 6f 6e 27 74 20 75 73 65 20 74 68 69 73 ┆rom the true end. Don't use this┆ 0x13e0…1400 20 69 6e 20 4c 69 73 70 20 70 72 6f 67 72 61 6d 73 21 0a 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 ┆ in Lisp programs! (goto-char (p┆ 0x1400…1420 6f 69 6e 74 2d 6d 61 78 29 29 20 69 73 20 66 61 73 74 65 72 20 61 6e 64 20 64 6f 65 73 20 6e 6f ┆oint-max)) is faster and does no┆ 0x1420…1440 74 20 73 65 74 20 74 68 65 20 6d 61 72 6b 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 ┆t set the mark." (interactive "P┆ 0x1440…1460 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c2 20 88 08 83 2e 00 c3 20 54 c3 20 c4 56 83 ┆") (byte-code " . T V ┆ 0x1460…1480 20 00 c5 c6 08 21 c7 c3 20 c8 5c 22 5c 22 82 2a 00 c7 c5 c3 20 c6 08 21 5c 22 c8 5c 22 5a 82 2f ┆ ! \"\" * !\" \"Z /┆ 0x1480…14a0 00 64 62 88 08 85 38 00 c9 ca 21 87 22 20 5b 61 72 67 20 6e 69 6c 20 70 75 73 68 2d 6d 61 72 6b ┆ db 8 ! " [arg nil push-mark┆ 0x14a0…14c0 20 62 75 66 66 65 72 2d 73 69 7a 65 20 31 30 30 30 30 20 2a 20 70 72 65 66 69 78 2d 6e 75 6d 65 ┆ buffer-size 10000 * prefix-nume┆ 0x14c0…14e0 72 69 63 2d 76 61 6c 75 65 20 2f 20 31 30 20 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 5d 20 31 ┆ric-value / 10 forward-line 1] 1┆ 0x14e0…1500 34 29 29 0a 0a 28 64 65 66 75 6e 20 6d 61 72 6b 2d 77 68 6f 6c 65 2d 62 75 66 66 65 72 20 6e 69 ┆4)) (defun mark-whole-buffer ni┆ 0x1500…1520 6c 20 22 5c 0a 50 75 74 20 70 6f 69 6e 74 20 61 74 20 62 65 67 69 6e 6e 69 6e 67 20 61 6e 64 20 ┆l "\ Put point at beginning and ┆ 0x1520…1540 6d 61 72 6b 20 61 74 20 65 6e 64 20 6f 66 20 62 75 66 66 65 72 2e 22 20 28 69 6e 74 65 72 61 63 ┆mark at end of buffer." (interac┆ 0x1540…1560 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 c1 60 21 88 c1 64 21 88 65 62 87 22 ┆tive) (byte-code " `! d! eb "┆ 0x1560…1580 20 5b 6e 69 6c 20 70 75 73 68 2d 6d 61 72 6b 5d 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 75 ┆ [nil push-mark] 3)) (defun cou┆ 0x1580…15a0 6e 74 2d 6c 69 6e 65 73 2d 72 65 67 69 6f 6e 20 28 73 74 61 72 74 20 65 6e 64 29 20 22 5c 0a 50 ┆nt-lines-region (start end) "\ P┆ 0x15a0…15c0 72 69 6e 74 20 6e 75 6d 62 65 72 20 6f 66 20 6c 69 6e 65 73 20 69 6e 20 74 68 65 20 72 65 67 69 ┆rint number of lines in the regi┆ 0x15c0…15e0 6f 6e 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 72 22 29 20 28 62 79 74 65 2d 63 6f 64 ┆on." (interactive "r") (byte-cod┆ 0x15e0…1600 65 20 22 c2 88 c3 c4 c5 08 09 5c 22 5c 22 87 22 20 5b 73 74 61 72 74 20 65 6e 64 20 6e 69 6c 20 ┆e " \"\" " [start end nil ┆ 0x1600…1620 6d 65 73 73 61 67 65 20 22 52 65 67 69 6f 6e 20 68 61 73 20 25 64 20 6c 69 6e 65 73 22 20 63 6f ┆message "Region has %d lines" co┆ 0x1620…1640 75 6e 74 2d 6c 69 6e 65 73 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 77 68 61 74 2d 6c 69 6e 65 ┆unt-lines] 5)) (defun what-line┆ 0x1640…1660 20 6e 69 6c 20 22 5c 0a 50 72 69 6e 74 20 74 68 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 6e ┆ nil "\ Print the current line n┆ 0x1660…1680 75 6d 62 65 72 20 28 69 6e 20 74 68 65 20 62 75 66 66 65 72 29 20 6f 66 20 70 6f 69 6e 74 2e 22 ┆umber (in the buffer) of point."┆ 0x1680…16a0 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 8c c1 20 ┆ (interactive) (byte-code " ┆ 0x16a0…16c0 88 8a c2 20 88 c3 c4 c5 c6 60 5c 22 54 5c 22 29 29 87 22 20 5b 6e 69 6c 20 77 69 64 65 6e 20 62 ┆ `\"T\")) " [nil widen b┆ 0x16c0…16e0 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 6d 65 73 73 61 67 65 20 22 4c 69 6e 65 20 25 ┆eginning-of-line message "Line %┆ 0x16e0…1700 64 22 20 63 6f 75 6e 74 2d 6c 69 6e 65 73 20 31 5d 20 37 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f ┆d" count-lines 1] 7)) (defun co┆ 0x1700…1720 75 6e 74 2d 6c 69 6e 65 73 20 28 73 74 61 72 74 20 65 6e 64 29 20 22 5c 0a 52 65 74 75 72 6e 20 ┆unt-lines (start end) "\ Return ┆ 0x1720…1740 6e 75 6d 62 65 72 20 6f 66 20 6e 65 77 6c 69 6e 65 73 20 62 65 74 77 65 65 6e 20 53 54 41 52 54 ┆number of newlines between START┆ 0x1740…1760 20 61 6e 64 20 45 4e 44 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 8a 8c c2 08 09 5c 22 88 65 ┆ and END." (byte-code " \" e┆ 0x1760…1780 62 88 c3 20 c4 c3 20 21 5a 29 29 87 22 20 5b 73 74 61 72 74 20 65 6e 64 20 6e 61 72 72 6f 77 2d ┆b !Z)) " [start end narrow-┆ 0x1780…17a0 74 6f 2d 72 65 67 69 6f 6e 20 62 75 66 66 65 72 2d 73 69 7a 65 20 66 6f 72 77 61 72 64 2d 6c 69 ┆to-region buffer-size forward-li┆ 0x17a0…17c0 6e 65 5d 20 36 29 29 0a 0a 28 64 65 66 75 6e 20 77 68 61 74 2d 63 75 72 73 6f 72 2d 70 6f 73 69 ┆ne] 6)) (defun what-cursor-posi┆ 0x17c0…17e0 74 69 6f 6e 20 6e 69 6c 20 22 5c 0a 50 72 69 6e 74 20 69 6e 66 6f 20 6f 6e 20 63 75 72 73 6f 72 ┆tion nil "\ Print info on cursor┆ 0x17e0…1800 20 70 6f 73 69 74 69 6f 6e 20 28 6f 6e 20 73 63 72 65 65 6e 20 61 6e 64 20 77 69 74 68 69 6e 20 ┆ position (on screen and within ┆ 0x1800…1820 62 75 66 66 65 72 29 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 ┆buffer)." (interactive) (byte-co┆ 0x1820…1840 64 65 20 22 c8 88 67 18 65 19 64 1a 60 1b c9 20 1c 0c ca 56 83 25 00 cb cb 0c cc 5c 22 0b 53 5c ┆de " g e d ` V % \" S\┆ 0x1840…1860 5c cb 0c cd 5c 22 ce 5d 5c 22 82 34 00 cb cb 0c cf 5c 22 d0 cd 0b 53 5c 22 5c 5c 0c ce 5d 5c 22 ┆\ \" ]\" 4 \" S\"\\ ]\"┆ 0x1860…1880 1d d1 20 d2 55 83 40 00 d3 82 45 00 d4 d5 d1 20 5c 22 1e 06 69 1e 07 0b 0a 55 83 7d 00 d6 09 ce ┆ U @ E \" i U } ┆ 0x1880…18a0 5c 22 86 5c 5c 00 d6 0a 0c 54 5c 22 83 6f 00 d7 d8 0b 0c 0d 09 0a 0e 07 0e 06 26 08 82 7a 00 d7 ┆\" \\ T\" o & z ┆ 0x18a0…18c0 d9 0b 0c 0d 0e 07 0e 06 26 06 82 af 00 d6 09 ce 5c 22 86 89 00 d6 0a 0c 54 5c 22 83 a0 00 d7 da ┆ & \" T\" ┆ 0x18c0…18e0 db 08 21 08 0b 0c 0d 09 0a 0e 07 0e 06 26 0a 82 af 00 d7 dc db 08 21 08 0b 0c 0d 0e 07 0e 06 26 ┆ ! & ! &┆ 0x18e0…1900 08 2e 08 87 22 20 5b 63 68 61 72 20 62 65 67 20 65 6e 64 20 70 6f 73 20 74 6f 74 61 6c 20 70 65 ┆ . " [char beg end pos total pe┆ 0x1900…1920 72 63 65 6e 74 20 68 73 63 72 6f 6c 6c 20 63 6f 6c 20 6e 69 6c 20 62 75 66 66 65 72 2d 73 69 7a ┆rcent hscroll col nil buffer-siz┆ […truncated at 200 lines…]