|
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 - metrics - downloadIndex: s
Length: 37662 (0x931e)
Names: »simple.elc«
└─⟦a05ed705a⟧ Bits:30007078 DKUUG GNU 2/12/89
└─⟦46d41b2d0⟧ »./emacs-18.55.tar.Z«
└─⟦fa971747f⟧
└─⟦this⟧ »dist-18.55/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 68 c5 3d 85 1b 00 c6 ┆(byte-code " ! h = ┆ 0x03a0…03c0 60 60 53 5c 22 88 c7 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 ┆``S\" " [arg nil beginning-of┆ 0x03c0…03e0 2d 6c 69 6e 65 20 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 20 31 30 20 64 65 6c 65 74 65 2d 72 ┆-line forward-line 1 10 delete-r┆ 0x03e0…0400 65 67 69 6f 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 ┆egion fixup-whitespace] 5)) (de┆ 0x0400…0420 66 75 6e 20 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 ┆fun fixup-whitespace nil "\ Fixu┆ 0x0420…0440 70 20 77 68 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 ┆p white space between objects ar┆ 0x0440…0460 6f 75 6e 64 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 ┆ound point. Leave one space or n┆ 0x0460…0480 6f 6e 65 2c 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 ┆one, according to the context." ┆ 0x0480…04a0 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 22 c0 88 ┆(interactive "*") (byte-code " ┆ 0x04a0…04c0 8a c1 20 88 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 ┆ ! ! !) c) " ┆ 0x04c0…04e0 5b 6e 69 6c 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 ┆[nil delete-horizontal-space loo┆ 0x04e0…0500 6b 69 6e 67 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 ┆king-at "^\\|\\s)" forward-char ┆ 0x0500…0520 2d 31 20 22 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 ┆-1 "$\\|\\s(\\|\\s'" 32] 5)) (d┆ 0x0520…0540 65 66 75 6e 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 ┆efun delete-horizontal-space nil┆ 0x0540…0560 20 22 5c 0a 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 ┆ "\ Delete all spaces and tabs a┆ 0x0560…0580 72 6f 75 6e 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 ┆round point." (interactive "*") ┆ 0x0580…05a0 28 62 79 74 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 ┆(byte-code " ! ` ! `\" " [n┆ 0x05a0…05c0 69 6c 20 73 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 ┆il skip-chars-backward " " dele┆ 0x05c0…05e0 74 65 2d 72 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 ┆te-region skip-chars-forward] 5)┆ 0x05e0…0600 29 0a 0a 28 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 ┆) (defun just-one-space nil "\ ┆ 0x0600…0620 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┆ 0x0620…0640 64 20 70 6f 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 ┆d point, leaving one space." (in┆ 0x0640…0660 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 22 c0 88 c1 c2 21 ┆teractive "*") (byte-code " !┆ 0x0660…0680 88 67 c3 55 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 ┆ g U ! c ` ! `\" " [nil┆ 0x0680…06a0 20 73 6b 69 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 ┆ skip-chars-backward " " 32 for┆ 0x06a0…06c0 77 61 72 64 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 ┆ward-char 1 delete-region skip-c┆ 0x06c0…06e0 68 61 72 73 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 ┆hars-forward] 6)) (defun delete┆ 0x06e0…0700 2d 62 6c 61 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 ┆-blank-lines nil "\ On blank lin┆ 0x0700…0720 65 2c 20 64 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 ┆e, delete all surrounding blank ┆ 0x0720…0740 6c 69 6e 65 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 ┆lines, leaving just one. On isol┆ 0x0740…0760 61 74 65 64 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 ┆ated blank line, delete that one┆ 0x0760…0780 2e 0a 4f 6e 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 ┆. On nonblank line, delete all b┆ 0x0780…07a0 6c 61 6e 6b 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 ┆lank lines that follow it." (int┆ 0x07a0…07c0 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 c2 88 c2 c2 19 18 ┆eractive "*") (byte-code " ┆ 0x07c0…07e0 8a c4 20 88 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 ┆ ! ' !? ' o ' ! !┆ 0x07e0…0800 3f 89 11 29 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 ┆? ) N 9 ! ` # L ┆ 0x0800…0820 21 88 60 82 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 ┆! ` M e\" T ? t ! ` ┆ 0x0820…0840 c3 23 83 71 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 ┆ # q ` r d\")* " [thisblank s┆ 0x0840…0860 69 6e 67 6c 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 ┆ingleblank nil t beginning-of-li┆ 0x0860…0880 6e 65 20 6c 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 ┆ne looking-at "[ ]*$" "[ ]* [ ┆ 0x0880…08a0 09 5d 2a 24 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 ┆ ]*$" forward-line -1 1 delete-r┆ 0x08a0…08c0 65 67 69 6f 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 ┆egion re-search-backward "[^ ]┆ 0x08c0…08e0 22 20 65 6e 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 ┆" end-of-line re-search-forward]┆ 0x08e0…0900 20 31 38 29 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 ┆ 18)) (defun back-to-indentatio┆ 0x0900…0920 6e 20 6e 69 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 ┆n nil "\ Move point to the first┆ 0x0920…0940 20 6e 6f 6e 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 ┆ non-whitespace character on thi┆ 0x0940…0960 73 20 6c 69 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 ┆s line." (interactive) (byte-cod┆ 0x0960…0980 65 20 22 c0 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 ┆e " ! ! " [nil beginning-of┆ 0x0980…09a0 2d 6c 69 6e 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 ┆-line 1 skip-chars-forward " "]┆ 0x09a0…09c0 20 33 29 29 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 ┆ 3)) (defun newline-and-indent ┆ 0x09c0…09e0 6e 69 6c 20 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 ┆nil "\ Insert a newline, then in┆ 0x09e0…0a00 64 65 6e 74 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 ┆dent according to major mode. In┆ 0x0a00…0a20 64 65 6e 74 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 ┆dentation is done using the curr┆ 0x0a20…0a40 65 6e 74 20 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 ┆ent indent-line-function. In pro┆ 0x0a40…0a60 67 72 61 6d 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 ┆gramming language modes, this is┆ 0x0a60…0a80 20 74 68 65 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 ┆ the same as TAB. In some text m┆ 0x0a80…0aa0 6f 64 65 73 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 ┆odes, where TAB inserts a tab, t┆ 0x0aa0…0ac0 68 69 73 20 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 ┆his indents to the specified lef┆ 0x0ac0…0ae0 74 2d 6d 61 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 ┆t-margin column." (interactive "┆ 0x0ae0…0b00 2a 22 29 20 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 ┆*") (byte-code " ` ! `\" c ┆ 0x0b00…0b20 20 87 22 20 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 ┆ " [nil delete-region skip-char┆ 0x0b20…0b40 73 2d 62 61 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 ┆s-backward " " 10 indent-accord┆ 0x0b40…0b60 69 6e 67 2d 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 ┆ing-to-mode] 4)) (defun reinden┆ 0x0b60…0b80 74 2d 74 68 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 ┆t-then-newline-and-indent nil "\┆ 0x0b80…0ba0 0a 52 65 69 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 ┆ Reindent current line, insert n┆ 0x0ba0…0bc0 65 77 6c 69 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 ┆ewline, then indent the new line┆ 0x0bc0…0be0 2e 0a 49 6e 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 ┆. Indentation of both lines is d┆ 0x0be0…0c00 6f 6e 65 20 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 ┆one according to the current maj┆ 0x0c00…0c20 6f 72 20 6d 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 ┆or mode, which means that the cu┆ 0x0c20…0c40 72 72 65 6e 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 ┆rrent value of indent-line-funct┆ 0x0c40…0c60 69 6f 6e 20 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 ┆ion is called. In programming la┆ 0x0c60…0c80 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 20 73 61 6d 65 20 61 ┆nguage modes, this is the same a┆ 0x0c80…0ca0 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 2c 20 77 68 65 72 65 ┆s TAB. In some text modes, where┆ 0x0ca0…0cc0 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 69 6e 64 65 6e 74 73 ┆ TAB inserts a tab, this indents┆ 0x0cc0…0ce0 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 72 67 69 6e 20 63 6f ┆ to the specified left-margin co┆ 0x0ce0…0d00 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 28 62 79 74 65 2d 63 ┆lumn." (interactive "*") (byte-c┆ 0x0d00…0d20 6f 64 65 20 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 ┆ode " ` ! `\" ) c " [n┆ 0x0d20…0d40 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 63 6b ┆il delete-region skip-chars-back┆ 0x0d40…0d60 77 61 72 64 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 ┆ward " " indent-according-to-mo┆ 0x0d60…0d80 64 65 20 31 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 ┆de 10] 5)) (defun kill-forward-┆ 0x0d80…0da0 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 00 08 40 89 ┆chars (arg) (byte-code " < @ ┆ 0x0da0…0dc0 10 88 08 c1 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 ┆ = `` \\\" " [arg - -1┆ 0x0dc0…0de0 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 6b 69 6c 6c 2d 62 ┆ kill-region] 4)) (defun kill-b┆ 0x0de0…0e00 61 63 6b 77 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 ┆ackward-chars (arg) (byte-code "┆ 0x0e00…0e20 08 3c 85 09 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 ┆ < @ = `` Z\" " [a┆ 0x0e20…0e40 72 67 20 2d 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 ┆rg - -1 kill-region] 4)) (defun┆ 0x0e40…0e60 20 62 61 63 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 ┆ backward-delete-char-untabify (┆ 0x0e60…0e80 61 72 67 20 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 ┆arg &optional killp) "\ Delete c┆ 0x0e80…0ea0 68 61 72 61 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 ┆haracters backward, changing tab┆ 0x0ea0…0ec0 73 20 69 6e 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 ┆s into spaces. Delete ARG chars,┆ 0x0ec0…0ee0 20 61 6e 64 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 ┆ and kill (save in kill ring) if┆ 0x0ee0…0f00 20 4b 49 4c 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 ┆ KILLP is non-nil. Interactively┆ 0x0f00…0f20 2c 20 41 52 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 ┆, ARG is the prefix arg (default┆ 0x0f20…0f40 20 31 29 0a 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 ┆ 1) and KILLP is t if prefix arg┆ 0x0f40…0f60 20 69 73 20 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 ┆ is was specified." (interactive┆ 0x0f60…0f80 20 22 2a 70 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 ┆ "*p P") (byte-code " V ┆ 0x0f80…0fa0 6f 3f 85 38 00 68 c6 55 85 2b 00 69 1a c7 c8 21 88 0a 69 5a 89 12 88 c9 ca 0a 5c 22 88 cb cc 21 ┆o? 8 h U + i ! iZ \" !┆ 0x0fa0…0fc0 29 88 c7 c8 21 88 08 53 89 10 88 82 05 00 29 29 88 cd 09 0b 5c 22 87 22 20 5b 63 6f 75 6e 74 20 ┆) ! S )) \" " [count ┆ 0x0fc0…0fe0 61 72 67 20 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 ┆arg col killp nil 0 9 forward-ch┆ 0x0fe0…1000 61 72 20 2d 31 20 69 6e 73 65 72 74 2d 63 68 61 72 20 33 32 20 64 65 6c 65 74 65 2d 63 68 61 72 ┆ar -1 insert-char 32 delete-char┆ 0x1000…1020 20 31 20 64 65 6c 65 74 65 2d 62 61 63 6b 77 61 72 64 2d 63 68 61 72 5d 20 37 29 29 0a 0a 28 64 ┆ 1 delete-backward-char] 7)) (d┆ 0x1020…1040 65 66 75 6e 20 7a 61 70 2d 74 6f 2d 63 68 61 72 20 28 61 72 67 20 63 68 61 72 29 20 22 5c 0a 4b ┆efun zap-to-char (arg char) "\ K┆ 0x1040…1060 69 6c 6c 20 75 70 20 74 6f 20 28 62 75 74 20 6e 6f 74 20 69 6e 63 6c 75 64 69 6e 67 29 20 41 52 ┆ill up to (but not including) AR┆ 0x1060…1080 47 27 74 68 20 6f 63 63 75 72 72 65 6e 63 65 20 6f 66 20 43 48 41 52 2e 0a 47 6f 65 73 20 62 61 ┆G'th occurrence of CHAR. Goes ba┆ 0x1080…10a0 63 6b 77 61 72 64 20 69 66 20 41 52 47 20 69 73 20 6e 65 67 61 74 69 76 65 3b 20 67 6f 65 73 20 ┆ckward if ARG is negative; goes ┆ 0x10a0…10c0 74 6f 20 65 6e 64 20 6f 66 20 62 75 66 66 65 72 20 69 66 20 43 48 41 52 20 6e 6f 74 20 66 6f 75 ┆to end of buffer if CHAR not fou┆ 0x10c0…10e0 6e 64 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 2a 70 0a 63 5a 61 70 20 74 6f 20 63 68 ┆nd." (interactive "*p cZap to ch┆ 0x10e0…1100 61 72 3a 20 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c4 60 c5 c6 08 21 c1 c2 0b 24 83 ┆ar: ") (byte-code " ` ! $ ┆ 0x1100…1120 5c 22 00 0b c7 56 83 1a 00 60 53 82 1c 00 60 54 62 88 60 82 2d 00 0b c7 56 83 2c 00 64 82 2d 00 ┆\" V `S `Tb ` - V , d - ┆ 0x1120…1140 65 5c 22 87 22 20 5b 63 68 61 72 20 6e 69 6c 20 74 20 61 72 67 20 6b 69 6c 6c 2d 72 65 67 69 6f ┆e\" " [char nil t arg kill-regio┆ 0x1140…1160 6e 20 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 63 68 61 72 2d 74 6f 2d 73 74 72 69 6e 67 20 ┆n search-forward char-to-string ┆ 0x1160…1180 30 5d 20 38 29 29 0a 0a 28 64 65 66 75 6e 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 62 75 66 66 ┆0] 8)) (defun beginning-of-buff┆ 0x1180…11a0 65 72 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 70 6f 69 6e 74 ┆er (&optional arg) "\ Move point┆ 0x11a0…11c0 20 74 6f 20 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 74 68 65 20 62 75 66 66 65 72 3b ┆ to the beginning of the buffer;┆ 0x11c0…11e0 20 6c 65 61 76 65 20 6d 61 72 6b 20 61 74 20 70 72 65 76 69 6f 75 73 20 70 6f 73 69 74 69 6f 6e ┆ leave mark at previous position┆ 0x11e0…1200 2e 0a 57 69 74 68 20 61 72 67 20 4e 2c 20 70 75 74 20 70 6f 69 6e 74 20 4e 2f 31 30 20 6f 66 20 ┆. With arg N, put point N/10 of ┆ 0x1200…1220 74 68 65 20 77 61 79 20 66 72 6f 6d 20 74 68 65 20 74 72 75 65 20 62 65 67 69 6e 6e 69 6e 67 2e ┆the way from the true beginning.┆ 0x1220…1240 0a 44 6f 6e 27 74 20 75 73 65 20 74 68 69 73 20 69 6e 20 4c 69 73 70 20 70 72 6f 67 72 61 6d 73 ┆ Don't use this in Lisp programs┆ 0x1240…1260 21 0a 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 20 69 73 20 66 61 73 ┆! (goto-char (point-min)) is fas┆ 0x1260…1280 74 65 72 20 61 6e 64 20 64 6f 65 73 20 6e 6f 74 20 73 65 74 20 74 68 65 20 6d 61 72 6b 2e 22 20 ┆ter and does not set the mark." ┆ 0x1280…12a0 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 ┆(interactive "P") (byte-code " ┆ 0x12a0…12c0 c2 20 88 08 83 2c 00 c3 20 c4 56 83 1d 00 c5 c6 08 21 c7 c3 20 c8 5c 22 5c 22 82 29 00 c7 c8 c5 ┆ , V ! \"\" ) ┆ 0x12c0…12e0 c3 20 c6 08 21 5c 22 5c 5c c8 5c 22 82 2d 00 65 62 88 08 85 36 00 c9 ca 21 87 22 20 5b 61 72 67 ┆ !\"\\ \" - eb 6 ! " [arg┆ 0x12e0…1300 20 6e 69 6c 20 70 75 73 68 2d 6d 61 72 6b 20 62 75 66 66 65 72 2d 73 69 7a 65 20 31 30 30 30 30 ┆ nil push-mark buffer-size 10000┆ 0x1300…1320 20 2a 20 70 72 65 66 69 78 2d 6e 75 6d 65 72 69 63 2d 76 61 6c 75 65 20 2f 20 31 30 20 66 6f 72 ┆ * prefix-numeric-value / 10 for┆ 0x1320…1340 77 61 72 64 2d 6c 69 6e 65 20 31 5d 20 31 33 29 29 0a 0a 28 64 65 66 75 6e 20 65 6e 64 2d 6f 66 ┆ward-line 1] 13)) (defun end-of┆ 0x1340…1360 2d 62 75 66 66 65 72 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 ┆-buffer (&optional arg) "\ Move ┆ 0x1360…1380 70 6f 69 6e 74 20 74 6f 20 74 68 65 20 65 6e 64 20 6f 66 20 74 68 65 20 62 75 66 66 65 72 3b 20 ┆point to the end of the buffer; ┆ 0x1380…13a0 6c 65 61 76 65 20 6d 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 ┆leave mark at previous position.┆ 0x13a0…13c0 0a 57 69 74 68 20 61 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 ┆ With arg N, put point N/10 of t┆ 0x13c0…13e0 68 65 20 77 61 79 20 66 72 6f 6d 20 74 68 65 20 74 72 75 65 20 65 6e 64 2e 0a 44 6f 6e 27 74 20 ┆he way from the true end. Don't ┆ 0x13e0…1400 75 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 ┆use this in Lisp programs! (goto┆ 0x1400…1420 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 20 69 73 20 66 61 73 74 65 72 20 61 6e 64 ┆-char (point-max)) is faster and┆ 0x1420…1440 20 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 ┆ does not set the mark." (intera┆ 0x1440…1460 63 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 2e 00 ┆ctive "P") (byte-code " . ┆ 0x1460…1480 c3 20 54 c3 20 c4 56 83 20 00 c5 c6 08 21 c7 c3 20 c8 5c 22 5c 22 82 2a 00 c7 c5 c3 20 c6 08 21 ┆ T V ! \"\" * !┆ 0x1480…14a0 5c 22 c8 5c 22 5a 82 2f 00 64 62 88 08 85 38 00 c9 ca 21 87 22 20 5b 61 72 67 20 6e 69 6c 20 70 ┆\" \"Z / db 8 ! " [arg nil p┆ 0x14a0…14c0 75 73 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 ┆ush-mark buffer-size 10000 * pre┆ 0x14c0…14e0 66 69 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 ┆fix-numeric-value / 10 forward-l┆ 0x14e0…1500 69 6e 65 20 31 5d 20 31 34 29 29 0a 0a 28 64 65 66 75 6e 20 6d 61 72 6b 2d 77 68 6f 6c 65 2d 62 ┆ine 1] 14)) (defun mark-whole-b┆ 0x1500…1520 75 66 66 65 72 20 6e 69 6c 20 22 5c 0a 50 75 74 20 70 6f 69 6e 74 20 61 74 20 62 65 67 69 6e 6e ┆uffer nil "\ Put point at beginn┆ 0x1520…1540 69 6e 67 20 61 6e 64 20 6d 61 72 6b 20 61 74 20 65 6e 64 20 6f 66 20 62 75 66 66 65 72 2e 22 20 ┆ing and mark at end of buffer." ┆ 0x1540…1560 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 c1 60 21 88 ┆(interactive) (byte-code " `! ┆ 0x1560…1580 c1 64 21 88 65 62 87 22 20 5b 6e 69 6c 20 70 75 73 68 2d 6d 61 72 6b 5d 20 33 29 29 0a 0a 28 64 ┆ d! eb " [nil push-mark] 3)) (d┆ 0x1580…15a0 65 66 75 6e 20 63 6f 75 6e 74 2d 6c 69 6e 65 73 2d 72 65 67 69 6f 6e 20 28 73 74 61 72 74 20 65 ┆efun count-lines-region (start e┆ 0x15a0…15c0 6e 64 29 20 22 5c 0a 50 72 69 6e 74 20 6e 75 6d 62 65 72 20 6f 66 20 6c 69 6e 65 73 20 69 6e 20 ┆nd) "\ Print number of lines in ┆ 0x15c0…15e0 74 68 65 20 72 65 67 69 6f 6e 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 72 22 29 20 28 ┆the region." (interactive "r") (┆ 0x15e0…1600 62 79 74 65 2d 63 6f 64 65 20 22 c2 88 c3 c4 c5 08 09 5c 22 5c 22 87 22 20 5b 73 74 61 72 74 20 ┆byte-code " \"\" " [start ┆ 0x1600…1620 65 6e 64 20 6e 69 6c 20 6d 65 73 73 61 67 65 20 22 52 65 67 69 6f 6e 20 68 61 73 20 25 64 20 6c ┆end nil message "Region has %d l┆ 0x1620…1640 69 6e 65 73 22 20 63 6f 75 6e 74 2d 6c 69 6e 65 73 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 77 ┆ines" count-lines] 5)) (defun w┆ 0x1640…1660 68 61 74 2d 6c 69 6e 65 20 6e 69 6c 20 22 5c 0a 50 72 69 6e 74 20 74 68 65 20 63 75 72 72 65 6e ┆hat-line nil "\ Print the curren┆ 0x1660…1680 74 20 6c 69 6e 65 20 6e 75 6d 62 65 72 20 28 69 6e 20 74 68 65 20 62 75 66 66 65 72 29 20 6f 66 ┆t line number (in the buffer) of┆ 0x1680…16a0 20 70 6f 69 6e 74 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 ┆ point." (interactive) (byte-cod┆ 0x16a0…16c0 65 20 22 c0 88 8c c1 20 88 8a c2 20 88 c3 c4 c5 c6 60 5c 22 54 5c 22 29 29 87 22 20 5b 6e 69 6c ┆e " `\"T\")) " [nil┆ 0x16c0…16e0 20 77 69 64 65 6e 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 6d 65 73 73 61 67 65 ┆ widen beginning-of-line message┆ 0x16e0…1700 20 22 4c 69 6e 65 20 25 64 22 20 63 6f 75 6e 74 2d 6c 69 6e 65 73 20 31 5d 20 37 29 29 0a 0a 28 ┆ "Line %d" count-lines 1] 7)) (┆ 0x1700…1720 64 65 66 75 6e 20 63 6f 75 6e 74 2d 6c 69 6e 65 73 20 28 73 74 61 72 74 20 65 6e 64 29 20 22 5c ┆defun count-lines (start end) "\┆ 0x1720…1740 0a 52 65 74 75 72 6e 20 6e 75 6d 62 65 72 20 6f 66 20 6e 65 77 6c 69 6e 65 73 20 62 65 74 77 65 ┆ Return number of newlines betwe┆ 0x1740…1760 65 6e 20 53 54 41 52 54 20 61 6e 64 20 45 4e 44 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 8a ┆en START and END." (byte-code " ┆ 0x1760…1780 8c c2 08 09 5c 22 88 65 62 88 c3 20 c4 c3 20 21 5a 29 29 87 22 20 5b 73 74 61 72 74 20 65 6e 64 ┆ \" eb !Z)) " [start end┆ 0x1780…17a0 20 6e 61 72 72 6f 77 2d 74 6f 2d 72 65 67 69 6f 6e 20 62 75 66 66 65 72 2d 73 69 7a 65 20 66 6f ┆ narrow-to-region buffer-size fo┆ 0x17a0…17c0 72 77 61 72 64 2d 6c 69 6e 65 5d 20 36 29 29 0a 0a 28 64 65 66 75 6e 20 77 68 61 74 2d 63 75 72 ┆rward-line] 6)) (defun what-cur┆ 0x17c0…17e0 73 6f 72 2d 70 6f 73 69 74 69 6f 6e 20 6e 69 6c 20 22 5c 0a 50 72 69 6e 74 20 69 6e 66 6f 20 6f ┆sor-position nil "\ Print info o┆ 0x17e0…1800 6e 20 63 75 72 73 6f 72 20 70 6f 73 69 74 69 6f 6e 20 28 6f 6e 20 73 63 72 65 65 6e 20 61 6e 64 ┆n cursor position (on screen and┆ 0x1800…1820 20 77 69 74 68 69 6e 20 62 75 66 66 65 72 29 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 ┆ within buffer)." (interactive) ┆ 0x1820…1840 28 62 79 74 65 2d 63 6f 64 65 20 22 c8 88 67 18 65 19 64 1a 60 1b c9 20 1c 0c ca 56 83 25 00 cb ┆(byte-code " g e d ` V % ┆ 0x1840…1860 cb 0c cc 5c 22 0b 53 5c 5c cb 0c cd 5c 22 ce 5d 5c 22 82 34 00 cb cb 0c cf 5c 22 d0 cd 0b 53 5c ┆ \" S\\ \" ]\" 4 \" S\┆ 0x1860…1880 22 5c 5c 0c ce 5d 5c 22 1d d1 20 d2 55 83 40 00 d3 82 45 00 d4 d5 d1 20 5c 22 1e 06 69 1e 07 0b ┆"\\ ]\" U @ E \" i ┆ 0x1880…18a0 0a 55 83 7d 00 d6 09 ce 5c 22 86 5c 5c 00 d6 0a 0c 54 5c 22 83 6f 00 d7 d8 0b 0c 0d 09 0a 0e 07 ┆ U } \" \\ T\" o ┆ 0x18a0…18c0 0e 06 26 08 82 7a 00 d7 d9 0b 0c 0d 0e 07 0e 06 26 06 82 af 00 d6 09 ce 5c 22 86 89 00 d6 0a 0c ┆ & z & \" ┆ 0x18c0…18e0 54 5c 22 83 a0 00 d7 da db 08 21 08 0b 0c 0d 09 0a 0e 07 0e 06 26 0a 82 af 00 d7 dc db 08 21 08 ┆T\" ! & ! ┆ 0x18e0…1900 0b 0c 0d 0e 07 0e 06 26 08 2e 08 87 22 20 5b 63 68 61 72 20 62 65 67 20 65 6e 64 20 70 6f 73 20 ┆ & . " [char beg end pos ┆ 0x1900…1920 74 6f 74 61 6c 20 70 65 72 63 65 6e 74 20 68 73 63 72 6f 6c 6c 20 63 6f 6c 20 6e 69 6c 20 62 75 ┆total percent hscroll col nil bu┆ […truncated at 200 lines…]