|
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: m
Length: 9065 (0x2369)
Names: »mlconvert.elc«
└─⟦a05ed705a⟧ Bits:30007078 DKUUG GNU 2/12/89
└─⟦46d41b2d0⟧ »./emacs-18.55.tar.Z«
└─⟦fa971747f⟧
└─⟦this⟧ »dist-18.55/lisp/mlconvert.elc«
0x0000…0020 0a 28 64 65 66 75 6e 20 63 6f 6e 76 65 72 74 2d 6d 6f 63 6b 6c 69 73 70 2d 62 75 66 66 65 72 20 ┆ (defun convert-mocklisp-buffer ┆ 0x0020…0040 6e 69 6c 20 22 5c 0a 43 6f 6e 76 65 72 74 20 62 75 66 66 65 72 20 6f 66 20 4d 6f 63 6b 6c 69 73 ┆nil "\ Convert buffer of Mocklis┆ 0x0040…0060 70 20 63 6f 64 65 20 74 6f 20 72 65 61 6c 20 4c 69 73 70 20 74 68 61 74 20 47 4e 55 20 45 6d 61 ┆p code to real Lisp that GNU Ema┆ 0x0060…0080 63 73 20 63 61 6e 20 72 75 6e 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 ┆cs can run." (interactive) (byte┆ 0x0080…00a0 2d 63 6f 64 65 20 22 c0 88 c1 20 88 c2 c3 c4 20 21 21 88 c5 c6 c7 5c 22 88 c8 c9 21 88 65 62 88 ┆-code " !! \" ! eb ┆ 0x00a0…00c0 ca 20 88 65 62 88 cb cc cd 8f 88 65 62 88 ce 63 88 cf 63 88 d0 20 88 65 62 88 c8 d1 21 87 22 20 ┆ eb eb c c eb ! " ┆ 0x00c0…00e0 5b 6e 69 6c 20 65 6d 61 63 73 2d 6c 69 73 70 2d 6d 6f 64 65 20 73 65 74 2d 73 79 6e 74 61 78 2d ┆[nil emacs-lisp-mode set-syntax-┆ 0x00e0…0100 74 61 62 6c 65 20 63 6f 70 79 2d 73 65 71 75 65 6e 63 65 20 73 79 6e 74 61 78 2d 74 61 62 6c 65 ┆table copy-sequence syntax-table┆ 0x0100…0120 20 6d 6f 64 69 66 79 2d 73 79 6e 74 61 78 2d 65 6e 74 72 79 20 31 32 34 20 22 77 22 20 6d 65 73 ┆ modify-syntax-entry 124 "w" mes┆ 0x0120…0140 73 61 67 65 20 22 43 6f 6e 76 65 72 74 69 6e 67 20 6d 6f 63 6b 6c 69 73 70 20 28 75 67 68 21 29 ┆sage "Converting mocklisp (ugh!)┆ 0x0140…0160 2e 2e 2e 22 20 66 69 78 2d 6d 6c 69 73 70 2d 73 79 6e 74 61 78 20 69 67 6e 6f 72 65 20 28 62 79 ┆..." fix-mlisp-syntax ignore (by┆ 0x0160…0180 74 65 2d 63 6f 64 65 20 22 c0 85 2a 00 60 c3 70 21 1a 19 0a 3c 85 25 00 0a 40 c4 3d 3f 85 25 00 ┆te-code " * ` p! < % @ =? % ┆ 0x0180…01a0 c5 63 88 8a 09 62 88 c6 c7 21 88 c8 63 29 2a 88 82 00 00 87 22 20 5b 74 20 6f 70 74 20 66 6f 72 ┆ c b ! c)* " [t opt for┆ 0x01a0…01c0 6d 20 72 65 61 64 20 64 65 66 75 6e 20 22 29 29 0a 0a 28 6d 6c 2d 66 6f 6f 29 0a 0a 22 20 73 6b ┆m read defun ")) (ml-foo) " sk┆ 0x01c0…01e0 69 70 2d 63 68 61 72 73 2d 66 6f 72 77 61 72 64 20 22 0a 22 20 22 28 64 65 66 75 6e 20 28 6d 6c ┆ip-chars-forward " " "(defun (ml┆ 0x01e0…0200 2d 66 6f 6f 20 0a 20 22 5d 20 34 29 20 28 28 65 6e 64 2d 6f 66 2d 66 69 6c 65 20 28 62 79 74 65 ┆-foo "] 4) ((end-of-file (byte┆ 0x0200…0220 2d 63 6f 64 65 20 22 c0 87 22 20 5b 6e 69 6c 5d 20 31 29 29 29 20 22 3b 3b 3b 20 47 4e 55 20 45 ┆-code " " [nil] 1))) ";;; GNU E┆ 0x0220…0240 6d 61 63 73 20 63 6f 64 65 20 63 6f 6e 76 65 72 74 65 64 20 66 72 6f 6d 20 4d 6f 63 6b 6c 69 73 ┆macs code converted from Mocklis┆ 0x0240…0260 70 0a 22 20 22 28 72 65 71 75 69 72 65 20 27 6d 6c 73 75 70 70 6f 72 74 29 0a 0a 22 20 66 69 78 ┆p " "(require 'mlsupport) " fix┆ 0x0260…0280 2d 6d 6c 69 73 70 2d 73 79 6d 62 6f 6c 73 20 22 43 6f 6e 76 65 72 74 69 6e 67 20 6d 6f 63 6b 6c ┆-mlisp-symbols "Converting mockl┆ 0x0280…02a0 69 73 70 2e 2e 2e 64 6f 6e 65 22 5d 20 31 30 29 29 0a 0a 28 64 65 66 75 6e 20 66 69 78 2d 6d 6c ┆isp...done"] 10)) (defun fix-ml┆ 0x02a0…02c0 69 73 70 2d 73 79 6e 74 61 78 20 6e 69 6c 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 c3 c0 c1 23 ┆isp-syntax nil (byte-code " #┆ 0x02c0…02e0 85 45 00 68 c4 55 83 18 00 c5 c6 21 88 c7 c8 21 82 41 00 c9 c6 21 88 ca 63 88 67 cb 55 86 28 00 ┆ E h U ! ! A ! c g U ( ┆ 0x02e0…0300 67 cc 55 83 31 00 c5 c8 21 82 39 00 cd ce 21 85 39 00 cb 63 88 c5 c8 21 88 c9 c8 21 88 82 00 00 ┆g U 1 ! 9 ! 9 c ! ! ┆ 0x0300…0320 87 22 20 5b 6e 69 6c 20 74 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5b 27 5c ┆ " [nil t re-search-forward "['\┆ 0x0320…0340 22 5d 22 20 33 34 20 66 6f 72 77 61 72 64 2d 63 68 61 72 20 2d 31 20 66 6f 72 77 61 72 64 2d 73 ┆"]" 34 forward-char -1 forward-s┆ 0x0340…0360 65 78 70 20 31 20 64 65 6c 65 74 65 2d 63 68 61 72 20 22 3f 22 20 39 32 20 39 34 20 6c 6f 6f 6b ┆exp 1 delete-char "?" 92 94 look┆ 0x0360…0380 69 6e 67 2d 61 74 20 22 5b 5e 61 2d 7a 41 2d 5a 5d 22 5d 20 31 30 29 29 0a 0a 28 64 65 66 75 6e ┆ing-at "[^a-zA-Z]"] 10)) (defun┆ 0x0380…03a0 20 66 69 78 2d 6d 6c 69 73 70 2d 73 79 6d 62 6f 6c 73 20 6e 69 6c 20 28 62 79 74 65 2d 63 6f 64 ┆ fix-mlisp-symbols nil (byte-cod┆ 0x03a0…03c0 65 20 22 c3 c4 21 88 6d 3f 85 5b 00 67 c5 55 86 12 00 67 c6 55 83 1b 00 c7 c8 21 82 57 00 67 c9 ┆e " ! m? [ g U g U ! W g ┆ 0x03c0…03e0 55 83 27 00 ca c8 21 82 57 00 60 cb 1a 19 c7 c8 21 88 cc cd 09 60 5c 22 21 ce 4e 89 12 88 0a 3f ┆U ' ! W ` ! `\"! N ?┆ 0x03e0…0400 86 56 00 0a 3b 83 4e 00 cf 09 60 5c 22 88 0a 63 82 56 00 8a 09 62 88 d0 0a 21 29 2a 88 82 00 00 ┆ V ; N `\" c V b !)* ┆ 0x0400…0420 87 22 20 5b 74 20 73 74 61 72 74 20 70 72 6f 70 20 73 6b 69 70 2d 63 68 61 72 73 2d 66 6f 72 77 ┆ " [t start prop skip-chars-forw┆ 0x0420…0440 61 72 64 20 22 20 09 0a 28 29 22 20 36 33 20 33 34 20 66 6f 72 77 61 72 64 2d 73 65 78 70 20 31 ┆ard " ()" 63 34 forward-sexp 1┆ 0x0440…0460 20 35 39 20 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 6e 69 6c 20 69 6e 74 65 72 6e 2d 73 6f 66 74 ┆ 59 forward-line nil intern-soft┆ 0x0460…0480 20 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 20 6d 6f 63 6b 6c 69 73 70 20 64 65 6c 65 74 ┆ buffer-substring mocklisp delet┆ 0x0480…04a0 65 2d 72 65 67 69 6f 6e 20 66 75 6e 63 61 6c 6c 5d 20 31 30 29 29 0a 0a 28 64 65 66 75 6e 20 6d ┆e-region funcall] 10)) (defun m┆ 0x04a0…04c0 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 6d 6c 2d 6e 61 6d 65 20 6c 69 73 70 2d 73 74 72 69 6e 67 ┆l-expansion (ml-name lisp-string┆ 0x04c0…04e0 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 08 c3 09 23 87 22 20 5b 6d 6c 2d 6e 61 6d 65 20 6c ┆) (byte-code " # " [ml-name l┆ 0x04e0…0500 69 73 70 2d 73 74 72 69 6e 67 20 70 75 74 20 6d 6f 63 6b 6c 69 73 70 5d 20 34 29 29 0a 0a 28 6d ┆isp-string put mocklisp] 4)) (m┆ 0x0500…0520 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 64 65 66 75 6e 29 20 22 6d 6c 2d 64 65 ┆l-expansion (quote defun) "ml-de┆ 0x0520…0540 66 75 6e 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 69 66 29 20 ┆fun") (ml-expansion (quote if) ┆ 0x0540…0560 22 6d 6c 2d 69 66 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 73 ┆"ml-if") (ml-expansion (quote s┆ 0x0560…0580 65 74 71 29 20 28 71 75 6f 74 65 20 28 6c 61 6d 62 64 61 20 6e 69 6c 20 28 69 66 20 28 6c 6f 6f ┆etq) (quote (lambda nil (if (loo┆ 0x0580…05a0 6b 69 6e 67 2d 61 74 20 22 73 65 74 71 5b 20 09 0a 5d 2b 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 ┆king-at "setq[ ]+buffer-modifi┆ 0x05a0…05c0 65 64 2d 70 22 29 20 28 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 22 73 65 74 2d 62 75 66 66 65 ┆ed-p") (replace-match "set-buffe┆ 0x05c0…05e0 72 2d 6d 6f 64 69 66 69 65 64 2d 70 22 29 29 29 29 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f ┆r-modified-p"))))) (ml-expansio┆ 0x05e0…0600 6e 20 28 71 75 6f 74 65 20 77 68 69 6c 65 29 20 28 71 75 6f 74 65 20 28 6c 61 6d 62 64 61 20 6e ┆n (quote while) (quote (lambda n┆ 0x0600…0620 69 6c 20 28 6c 65 74 20 28 28 65 6e 64 20 28 70 72 6f 67 6e 20 28 66 6f 72 77 61 72 64 2d 73 65 ┆il (let ((end (progn (forward-se┆ 0x0620…0640 78 70 20 32 29 20 28 70 6f 69 6e 74 2d 6d 61 72 6b 65 72 29 29 29 20 28 73 74 61 72 74 20 28 70 ┆xp 2) (point-marker))) (start (p┆ 0x0640…0660 72 6f 67 6e 20 28 66 6f 72 77 61 72 64 2d 73 65 78 70 20 2d 31 29 20 28 70 6f 69 6e 74 29 29 29 ┆rogn (forward-sexp -1) (point)))┆ 0x0660…0680 29 20 28 6c 65 74 20 28 28 63 6f 6e 64 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 20 ┆) (let ((cond (buffer-substring ┆ 0x0680…06a0 73 74 61 72 74 20 65 6e 64 29 29 29 20 28 63 6f 6e 64 20 28 28 65 71 75 61 6c 20 63 6f 6e 64 20 ┆start end))) (cond ((equal cond ┆ 0x06a0…06c0 22 31 22 29 20 28 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 29 20 65 6e 64 29 ┆"1") (delete-region (point) end)┆ 0x06c0…06e0 20 28 69 6e 73 65 72 74 20 22 74 22 29 29 20 28 74 20 28 69 6e 73 65 72 74 20 22 28 6e 6f 74 20 ┆ (insert "t")) (t (insert "(not ┆ 0x06e0…0700 28 7a 65 72 6f 70 20 22 29 20 28 67 6f 74 6f 2d 63 68 61 72 20 65 6e 64 29 20 28 69 6e 73 65 72 ┆(zerop ") (goto-char end) (inser┆ 0x0700…0720 74 20 22 29 29 22 29 29 29 20 28 73 65 74 2d 6d 61 72 6b 65 72 20 65 6e 64 20 6e 69 6c 29 20 28 ┆t "))"))) (set-marker end nil) (┆ 0x0720…0740 67 6f 74 6f 2d 63 68 61 72 20 73 74 61 72 74 29 29 29 29 29 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e ┆goto-char start)))))) (ml-expan┆ 0x0740…0760 73 69 6f 6e 20 28 71 75 6f 74 65 20 61 72 67 29 20 22 6d 6c 2d 61 72 67 22 29 0a 0a 28 6d 6c 2d ┆sion (quote arg) "ml-arg") (ml-┆ 0x0760…0780 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 6e 61 72 67 73 29 20 22 6d 6c 2d 6e 61 72 67 ┆expansion (quote nargs) "ml-narg┆ 0x0780…07a0 73 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 69 6e 74 65 72 61 ┆s") (ml-expansion (quote intera┆ 0x07a0…07c0 63 74 69 76 65 29 20 22 6d 6c 2d 69 6e 74 65 72 61 63 74 69 76 65 22 29 0a 0a 28 6d 6c 2d 65 78 ┆ctive) "ml-interactive") (ml-ex┆ 0x07c0…07e0 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 6d 65 73 73 61 67 65 29 20 22 6d 6c 2d 6d 65 73 73 ┆pansion (quote message) "ml-mess┆ 0x07e0…0800 61 67 65 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 70 72 69 6e ┆age") (ml-expansion (quote prin┆ 0x0800…0820 74 29 20 22 6d 6c 2d 70 72 69 6e 74 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 ┆t) "ml-print") (ml-expansion (q┆ 0x0820…0840 75 6f 74 65 20 73 65 74 29 20 22 6d 6c 2d 73 65 74 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 ┆uote set) "ml-set") (ml-expansi┆ 0x0840…0860 6f 6e 20 28 71 75 6f 74 65 20 73 65 74 2d 64 65 66 61 75 6c 74 29 20 22 6d 6c 2d 73 65 74 2d 64 ┆on (quote set-default) "ml-set-d┆ 0x0860…0880 65 66 61 75 6c 74 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 70 ┆efault") (ml-expansion (quote p┆ 0x0880…08a0 72 6f 76 69 64 65 2d 70 72 65 66 69 78 2d 61 72 67 75 6d 65 6e 74 29 20 22 6d 6c 2d 70 72 6f 76 ┆rovide-prefix-argument) "ml-prov┆ 0x08a0…08c0 69 64 65 2d 70 72 65 66 69 78 2d 61 72 67 75 6d 65 6e 74 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e ┆ide-prefix-argument") (ml-expan┆ 0x08c0…08e0 73 69 6f 6e 20 28 71 75 6f 74 65 20 70 72 65 66 69 78 2d 61 72 67 75 6d 65 6e 74 2d 6c 6f 6f 70 ┆sion (quote prefix-argument-loop┆ 0x08e0…0900 29 20 22 6d 6c 2d 70 72 65 66 69 78 2d 61 72 67 75 6d 65 6e 74 2d 6c 6f 6f 70 22 29 0a 0a 28 6d ┆) "ml-prefix-argument-loop") (m┆ 0x0900…0920 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 70 72 65 66 69 78 2d 61 72 67 75 6d 65 ┆l-expansion (quote prefix-argume┆ 0x0920…0940 6e 74 29 20 22 6d 6c 2d 70 72 65 66 69 78 2d 61 72 67 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 ┆nt) "ml-prefix-arg") (ml-expans┆ 0x0940…0960 69 6f 6e 20 28 71 75 6f 74 65 20 75 73 65 2d 6c 6f 63 61 6c 2d 6d 61 70 29 20 22 6d 6c 2d 75 73 ┆ion (quote use-local-map) "ml-us┆ 0x0960…0980 65 2d 6c 6f 63 61 6c 2d 6d 61 70 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 ┆e-local-map") (ml-expansion (qu┆ 0x0980…09a0 6f 74 65 20 75 73 65 2d 67 6c 6f 62 61 6c 2d 6d 61 70 29 20 22 6d 6c 2d 75 73 65 2d 67 6c 6f 62 ┆ote use-global-map) "ml-use-glob┆ 0x09a0…09c0 61 6c 2d 6d 61 70 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 6d ┆al-map") (ml-expansion (quote m┆ 0x09c0…09e0 6f 64 69 66 79 2d 73 79 6e 74 61 78 2d 65 6e 74 72 79 29 20 22 6d 6c 2d 6d 6f 64 69 66 79 2d 73 ┆odify-syntax-entry) "ml-modify-s┆ 0x09e0…0a00 79 6e 74 61 78 2d 65 6e 74 72 79 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 ┆yntax-entry") (ml-expansion (qu┆ 0x0a00…0a20 6f 74 65 20 65 72 72 6f 72 2d 6d 65 73 73 61 67 65 29 20 22 65 72 72 6f 72 22 29 0a 0a 28 6d 6c ┆ote error-message) "error") (ml┆ 0x0a20…0a40 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 64 6f 74 29 20 22 70 6f 69 6e 74 2d 6d 61 ┆-expansion (quote dot) "point-ma┆ 0x0a40…0a60 72 6b 65 72 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 6d 61 72 ┆rker") (ml-expansion (quote mar┆ 0x0a60…0a80 6b 29 20 22 6d 61 72 6b 2d 6d 61 72 6b 65 72 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e ┆k) "mark-marker") (ml-expansion┆ 0x0a80…0aa0 20 28 71 75 6f 74 65 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 66 69 6c 65 29 20 22 62 65 67 69 ┆ (quote beginning-of-file) "begi┆ 0x0aa0…0ac0 6e 6e 69 6e 67 2d 6f 66 2d 62 75 66 66 65 72 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e ┆nning-of-buffer") (ml-expansion┆ 0x0ac0…0ae0 20 28 71 75 6f 74 65 20 65 6e 64 2d 6f 66 2d 66 69 6c 65 29 20 22 65 6e 64 2d 6f 66 2d 62 75 66 ┆ (quote end-of-file) "end-of-buf┆ 0x0ae0…0b00 66 65 72 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 65 78 63 68 ┆fer") (ml-expansion (quote exch┆ 0x0b00…0b20 61 6e 67 65 2d 64 6f 74 2d 61 6e 64 2d 6d 61 72 6b 29 20 22 65 78 63 68 61 6e 67 65 2d 70 6f 69 ┆ange-dot-and-mark) "exchange-poi┆ 0x0b20…0b40 6e 74 2d 61 6e 64 2d 6d 61 72 6b 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 ┆nt-and-mark") (ml-expansion (qu┆ 0x0b40…0b60 6f 74 65 20 73 65 74 2d 6d 61 72 6b 29 20 22 73 65 74 2d 6d 61 72 6b 2d 63 6f 6d 6d 61 6e 64 22 ┆ote set-mark) "set-mark-command"┆ 0x0b60…0b80 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 61 72 67 75 6d 65 6e 74 ┆) (ml-expansion (quote argument┆ 0x0b80…0ba0 2d 70 72 65 66 69 78 29 20 22 75 6e 69 76 65 72 73 61 6c 2d 61 72 67 22 29 0a 0a 28 6d 6c 2d 65 ┆-prefix) "universal-arg") (ml-e┆ 0x0ba0…0bc0 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 70 72 65 76 69 6f 75 73 2d 70 61 67 65 29 20 22 ┆xpansion (quote previous-page) "┆ 0x0bc0…0be0 6d 6c 2d 70 72 65 76 69 6f 75 73 2d 70 61 67 65 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f ┆ml-previous-page") (ml-expansio┆ 0x0be0…0c00 6e 20 28 71 75 6f 74 65 20 6e 65 78 74 2d 70 61 67 65 29 20 22 6d 6c 2d 6e 65 78 74 2d 70 61 67 ┆n (quote next-page) "ml-next-pag┆ 0x0c00…0c20 65 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 6e 65 78 74 2d 77 ┆e") (ml-expansion (quote next-w┆ 0x0c20…0c40 69 6e 64 6f 77 29 20 22 6d 6c 2d 6e 65 78 74 2d 77 69 6e 64 6f 77 22 29 0a 0a 28 6d 6c 2d 65 78 ┆indow) "ml-next-window") (ml-ex┆ 0x0c40…0c60 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 70 72 65 76 69 6f 75 73 2d 77 69 6e 64 6f 77 29 20 ┆pansion (quote previous-window) ┆ 0x0c60…0c80 22 6d 6c 2d 70 72 65 76 69 6f 75 73 2d 77 69 6e 64 6f 77 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e ┆"ml-previous-window") (ml-expan┆ 0x0c80…0ca0 73 69 6f 6e 20 28 71 75 6f 74 65 20 6e 65 77 6c 69 6e 65 29 20 22 6d 6c 2d 6e 65 77 6c 69 6e 65 ┆sion (quote newline) "ml-newline┆ 0x0ca0…0cc0 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 6e 65 78 74 2d 6c 69 ┆") (ml-expansion (quote next-li┆ 0x0cc0…0ce0 6e 65 29 20 22 6d 6c 2d 6e 65 78 74 2d 6c 69 6e 65 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 ┆ne) "ml-next-line") (ml-expansi┆ 0x0ce0…0d00 6f 6e 20 28 71 75 6f 74 65 20 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 29 20 22 6d 6c 2d 70 72 65 ┆on (quote previous-line) "ml-pre┆ 0x0d00…0d20 76 69 6f 75 73 2d 6c 69 6e 65 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f ┆vious-line") (ml-expansion (quo┆ 0x0d20…0d40 74 65 20 73 65 6c 66 2d 69 6e 73 65 72 74 29 20 22 73 65 6c 66 2d 69 6e 73 65 72 74 2d 63 6f 6d ┆te self-insert) "self-insert-com┆ 0x0d40…0d60 6d 61 6e 64 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 6d 65 74 ┆mand") (ml-expansion (quote met┆ 0x0d60…0d80 61 2d 64 69 67 69 74 29 20 22 64 69 67 69 74 2d 61 72 67 75 6d 65 6e 74 22 29 0a 0a 28 6d 6c 2d ┆a-digit) "digit-argument") (ml-┆ 0x0d80…0da0 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 6d 65 74 61 2d 6d 69 6e 75 73 29 20 22 6e 65 ┆expansion (quote meta-minus) "ne┆ 0x0da0…0dc0 67 61 74 69 76 65 2d 61 72 67 75 6d 65 6e 74 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e ┆gative-argument") (ml-expansion┆ 0x0dc0…0de0 20 28 71 75 6f 74 65 20 6e 65 77 6c 69 6e 65 2d 61 6e 64 2d 69 6e 64 65 6e 74 29 20 22 6d 6c 2d ┆ (quote newline-and-indent) "ml-┆ 0x0de0…0e00 6e 65 77 6c 69 6e 65 2d 61 6e 64 2d 69 6e 64 65 6e 74 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 ┆newline-and-indent") (ml-expans┆ 0x0e00…0e20 69 6f 6e 20 28 71 75 6f 74 65 20 79 61 6e 6b 2d 66 72 6f 6d 2d 6b 69 6c 6c 62 75 66 66 65 72 29 ┆ion (quote yank-from-killbuffer)┆ 0x0e20…0e40 20 22 79 61 6e 6b 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 79 ┆ "yank") (ml-expansion (quote y┆ 0x0e40…0e60 61 6e 6b 2d 62 75 66 66 65 72 29 20 22 69 6e 73 65 72 74 2d 62 75 66 66 65 72 22 29 0a 0a 28 6d ┆ank-buffer) "insert-buffer") (m┆ 0x0e60…0e80 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 63 6f 70 79 2d 72 65 67 69 6f 6e 29 20 ┆l-expansion (quote copy-region) ┆ 0x0e80…0ea0 22 63 6f 70 79 2d 72 65 67 69 6f 6e 2d 61 73 2d 6b 69 6c 6c 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 ┆"copy-region-as-kill") (ml-expa┆ 0x0ea0…0ec0 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 64 65 6c 65 74 65 2d 77 68 69 74 65 2d 73 70 61 63 65 29 ┆nsion (quote delete-white-space)┆ 0x0ec0…0ee0 20 22 64 65 6c 65 74 65 2d 68 6f 72 69 7a 6f 6e 74 61 6c 2d 73 70 61 63 65 22 29 0a 0a 28 6d 6c ┆ "delete-horizontal-space") (ml┆ 0x0ee0…0f00 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 77 69 64 65 6e 2d 72 65 67 69 6f 6e 29 20 ┆-expansion (quote widen-region) ┆ 0x0f00…0f20 22 77 69 64 65 6e 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 66 ┆"widen") (ml-expansion (quote f┆ 0x0f20…0f40 6f 72 77 61 72 64 2d 77 6f 72 64 29 20 28 71 75 6f 74 65 20 28 6c 61 6d 62 64 61 20 6e 69 6c 20 ┆orward-word) (quote (lambda nil ┆ 0x0f40…0f60 28 69 66 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 66 6f 72 77 61 72 64 2d 77 6f 72 64 5b 20 09 ┆(if (looking-at "forward-word[ ┆ 0x0f60…0f80 0a 5d 2a 29 22 29 20 28 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 22 66 6f 72 77 61 72 64 2d 77 ┆ ]*)") (replace-match "forward-w┆ 0x0f80…0fa0 6f 72 64 20 31 29 22 29 29 29 29 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f ┆ord 1)"))))) (ml-expansion (quo┆ 0x0fa0…0fc0 74 65 20 62 61 63 6b 77 61 72 64 2d 77 6f 72 64 29 20 28 71 75 6f 74 65 20 28 6c 61 6d 62 64 61 ┆te backward-word) (quote (lambda┆ 0x0fc0…0fe0 20 6e 69 6c 20 28 69 66 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 62 61 63 6b 77 61 72 64 2d 77 ┆ nil (if (looking-at "backward-w┆ 0x0fe0…1000 6f 72 64 5b 20 09 0a 5d 2a 29 22 29 20 28 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 22 62 61 63 ┆ord[ ]*)") (replace-match "bac┆ 0x1000…1020 6b 77 61 72 64 2d 77 6f 72 64 20 31 29 22 29 29 29 29 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 ┆kward-word 1)"))))) (ml-expansi┆ 0x1020…1040 6f 6e 20 28 71 75 6f 74 65 20 66 6f 72 77 61 72 64 2d 70 61 72 65 6e 29 20 22 66 6f 72 77 61 72 ┆on (quote forward-paren) "forwar┆ 0x1040…1060 64 2d 6c 69 73 74 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 62 ┆d-list") (ml-expansion (quote b┆ 0x1060…1080 61 63 6b 77 61 72 64 2d 70 61 72 65 6e 29 20 22 62 61 63 6b 77 61 72 64 2d 6c 69 73 74 22 29 0a ┆ackward-paren) "backward-list") ┆ 0x1080…10a0 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 73 65 61 72 63 68 2d 72 65 76 ┆ (ml-expansion (quote search-rev┆ 0x10a0…10c0 65 72 73 65 29 20 22 6d 6c 2d 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 22 29 0a 0a 28 6d 6c ┆erse) "ml-search-backward") (ml┆ 0x10c0…10e0 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 72 65 2d 73 65 61 72 63 68 2d 72 65 76 65 ┆-expansion (quote re-search-reve┆ 0x10e0…1100 72 73 65 29 20 22 6d 6c 2d 72 65 2d 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 22 29 0a 0a 28 ┆rse) "ml-re-search-backward") (┆ 0x1100…1120 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 73 65 61 72 63 68 2d 66 6f 72 77 61 ┆ml-expansion (quote search-forwa┆ 0x1120…1140 72 64 29 20 22 6d 6c 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 22 29 0a 0a 28 6d 6c 2d 65 78 ┆rd) "ml-search-forward") (ml-ex┆ 0x1140…1160 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 ┆pansion (quote re-search-forward┆ 0x1160…1180 29 20 22 6d 6c 2d 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 22 29 0a 0a 28 6d 6c 2d 65 ┆) "ml-re-search-forward") (ml-e┆ 0x1180…11a0 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 71 75 6f 74 65 29 20 22 72 65 67 65 78 70 2d 71 ┆xpansion (quote quote) "regexp-q┆ 0x11a0…11c0 75 6f 74 65 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 72 65 2d ┆uote") (ml-expansion (quote re-┆ 0x11c0…11e0 71 75 65 72 79 2d 72 65 70 6c 61 63 65 29 20 22 71 75 65 72 79 2d 72 65 70 6c 61 63 65 2d 72 65 ┆query-replace) "query-replace-re┆ 0x11e0…1200 67 65 78 70 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 72 65 2d ┆gexp") (ml-expansion (quote re-┆ 0x1200…1220 72 65 70 6c 61 63 65 2d 73 74 72 69 6e 67 29 20 22 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 22 ┆replace-string) "replace-regexp"┆ 0x1220…1240 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 67 65 74 2d 74 74 79 2d ┆) (ml-expansion (quote get-tty-┆ 0x1240…1260 63 68 61 72 61 63 74 65 72 29 20 22 72 65 61 64 2d 63 68 61 72 22 29 0a 0a 28 6d 6c 2d 65 78 70 ┆character) "read-char") (ml-exp┆ 0x1260…1280 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 67 65 74 2d 74 74 79 2d 69 6e 70 75 74 29 20 22 72 65 ┆ansion (quote get-tty-input) "re┆ 0x1280…12a0 61 64 2d 69 6e 70 75 74 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 ┆ad-input") (ml-expansion (quote┆ 0x12a0…12c0 20 67 65 74 2d 74 74 79 2d 73 74 72 69 6e 67 29 20 22 72 65 61 64 2d 73 74 72 69 6e 67 22 29 0a ┆ get-tty-string) "read-string") ┆ 0x12c0…12e0 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 67 65 74 2d 74 74 79 2d 62 75 ┆ (ml-expansion (quote get-tty-bu┆ 0x12e0…1300 66 66 65 72 29 20 22 72 65 61 64 2d 62 75 66 66 65 72 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 ┆ffer) "read-buffer") (ml-expans┆ 0x1300…1320 69 6f 6e 20 28 71 75 6f 74 65 20 67 65 74 2d 74 74 79 2d 63 6f 6d 6d 61 6e 64 29 20 22 72 65 61 ┆ion (quote get-tty-command) "rea┆ 0x1320…1340 64 2d 63 6f 6d 6d 61 6e 64 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 ┆d-command") (ml-expansion (quot┆ 0x1340…1360 65 20 67 65 74 2d 74 74 79 2d 76 61 72 69 61 62 6c 65 29 20 22 72 65 61 64 2d 76 61 72 69 61 62 ┆e get-tty-variable) "read-variab┆ 0x1360…1380 6c 65 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 67 65 74 2d 74 ┆le") (ml-expansion (quote get-t┆ 0x1380…13a0 74 79 2d 6e 6f 2d 62 6c 61 6e 6b 73 2d 69 6e 70 75 74 29 20 22 72 65 61 64 2d 6e 6f 2d 62 6c 61 ┆ty-no-blanks-input) "read-no-bla┆ 0x13a0…13c0 6e 6b 73 2d 69 6e 70 75 74 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 ┆nks-input") (ml-expansion (quot┆ 0x13c0…13e0 65 20 67 65 74 2d 74 74 79 2d 6b 65 79 29 20 22 72 65 61 64 2d 6b 65 79 22 29 0a 0a 28 6d 6c 2d ┆e get-tty-key) "read-key") (ml-┆ 0x13e0…1400 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 63 3d 29 20 22 63 68 61 72 2d 65 71 75 61 6c ┆expansion (quote c=) "char-equal┆ 0x1400…1420 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 67 6f 74 6f 2d 63 68 ┆") (ml-expansion (quote goto-ch┆ 0x1420…1440 61 72 61 63 74 65 72 29 20 22 67 6f 74 6f 2d 63 68 61 72 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e ┆aracter) "goto-char") (ml-expan┆ 0x1440…1460 73 69 6f 6e 20 28 71 75 6f 74 65 20 73 75 62 73 74 72 29 20 22 6d 6c 2d 73 75 62 73 74 72 22 29 ┆sion (quote substr) "ml-substr")┆ 0x1460…1480 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 76 61 72 69 61 62 6c 65 2d ┆ (ml-expansion (quote variable-┆ 0x1480…14a0 61 70 72 6f 70 6f 73 29 20 22 61 70 72 6f 70 6f 73 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 ┆apropos) "apropos") (ml-expansi┆ 0x14a0…14c0 6f 6e 20 28 71 75 6f 74 65 20 65 78 65 63 75 74 65 2d 6d 6c 69 73 70 2d 62 75 66 66 65 72 29 20 ┆on (quote execute-mlisp-buffer) ┆ 0x14c0…14e0 22 65 76 61 6c 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 ┆"eval-current-buffer") (ml-expa┆ 0x14e0…1500 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 65 78 65 63 75 74 65 2d 6d 6c 69 73 70 2d 66 69 6c 65 29 ┆nsion (quote execute-mlisp-file)┆ 0x1500…1520 20 22 6c 6f 61 64 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 76 ┆ "load") (ml-expansion (quote v┆ 0x1520…1540 69 73 69 74 2d 66 69 6c 65 29 20 22 66 69 6e 64 2d 66 69 6c 65 22 29 0a 0a 28 6d 6c 2d 65 78 70 ┆isit-file) "find-file") (ml-exp┆ 0x1540…1560 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 72 65 61 64 2d 66 69 6c 65 29 20 22 66 69 6e 64 2d 66 ┆ansion (quote read-file) "find-f┆ 0x1560…1580 69 6c 65 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 77 72 69 74 ┆ile") (ml-expansion (quote writ┆ 0x1580…15a0 65 2d 6d 6f 64 69 66 69 65 64 2d 66 69 6c 65 73 29 20 22 73 61 76 65 2d 73 6f 6d 65 2d 62 75 66 ┆e-modified-files) "save-some-buf┆ 0x15a0…15c0 66 65 72 73 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 62 61 63 ┆fers") (ml-expansion (quote bac┆ 0x15c0…15e0 6b 75 70 2d 62 65 66 6f 72 65 2d 77 72 69 74 69 6e 67 29 20 22 6d 61 6b 65 2d 62 61 63 6b 75 70 ┆kup-before-writing) "make-backup┆ 0x15e0…1600 2d 66 69 6c 65 73 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 77 ┆-files") (ml-expansion (quote w┆ 0x1600…1620 72 69 74 65 2d 66 69 6c 65 2d 65 78 69 74 29 20 22 73 61 76 65 2d 62 75 66 66 65 72 73 2d 6b 69 ┆rite-file-exit) "save-buffers-ki┆ 0x1620…1640 6c 6c 2d 65 6d 61 63 73 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 ┆ll-emacs") (ml-expansion (quote┆ 0x1640…1660 20 77 72 69 74 65 2d 6e 61 6d 65 64 2d 66 69 6c 65 29 20 22 77 72 69 74 65 2d 66 69 6c 65 22 29 ┆ write-named-file) "write-file")┆ 0x1660…1680 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 63 68 61 6e 67 65 2d 66 69 ┆ (ml-expansion (quote change-fi┆ 0x1680…16a0 6c 65 2d 6e 61 6d 65 29 20 22 73 65 74 2d 76 69 73 69 74 65 64 2d 66 69 6c 65 2d 6e 61 6d 65 22 ┆le-name) "set-visited-file-name"┆ 0x16a0…16c0 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 63 68 61 6e 67 65 2d 62 ┆) (ml-expansion (quote change-b┆ 0x16c0…16e0 75 66 66 65 72 2d 6e 61 6d 65 29 20 22 72 65 6e 61 6d 65 2d 62 75 66 66 65 72 22 29 0a 0a 28 6d ┆uffer-name) "rename-buffer") (m┆ 0x16e0…1700 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 62 75 66 66 65 72 2d 65 78 69 73 74 73 ┆l-expansion (quote buffer-exists┆ 0x1700…1720 29 20 22 67 65 74 2d 62 75 66 66 65 72 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 ┆) "get-buffer") (ml-expansion (┆ 0x1720…1740 71 75 6f 74 65 20 64 65 6c 65 74 65 2d 62 75 66 66 65 72 29 20 22 6b 69 6c 6c 2d 62 75 66 66 65 ┆quote delete-buffer) "kill-buffe┆ 0x1740…1760 72 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 75 6e 6c 69 6e 6b ┆r") (ml-expansion (quote unlink┆ 0x1760…1780 2d 66 69 6c 65 29 20 22 64 65 6c 65 74 65 2d 66 69 6c 65 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e ┆-file) "delete-file") (ml-expan┆ 0x1780…17a0 73 69 6f 6e 20 28 71 75 6f 74 65 20 75 6e 6c 69 6e 6b 2d 63 68 65 63 6b 70 6f 69 6e 74 2d 66 69 ┆sion (quote unlink-checkpoint-fi┆ 0x17a0…17c0 6c 65 73 29 20 22 64 65 6c 65 74 65 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 73 22 29 0a 0a ┆les) "delete-auto-save-files") ┆ 0x17c0…17e0 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 66 69 6c 65 2d 65 78 69 73 74 73 ┆(ml-expansion (quote file-exists┆ 0x17e0…1800 29 20 22 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f ┆) "file-exists-p") (ml-expansio┆ 0x1800…1820 6e 20 28 71 75 6f 74 65 20 77 72 69 74 65 2d 63 75 72 72 65 6e 74 2d 66 69 6c 65 29 20 22 73 61 ┆n (quote write-current-file) "sa┆ 0x1820…1840 76 65 2d 62 75 66 66 65 72 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 ┆ve-buffer") (ml-expansion (quot┆ 0x1840…1860 65 20 63 68 61 6e 67 65 2d 64 69 72 65 63 74 6f 72 79 29 20 22 63 64 22 29 0a 0a 28 6d 6c 2d 65 ┆e change-directory) "cd") (ml-e┆ 0x1860…1880 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 74 65 6d 70 2d 75 73 65 2d 62 75 66 66 65 72 29 ┆xpansion (quote temp-use-buffer)┆ 0x1880…18a0 20 22 73 65 74 2d 62 75 66 66 65 72 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 ┆ "set-buffer") (ml-expansion (q┆ 0x18a0…18c0 75 6f 74 65 20 66 61 73 74 2d 66 69 6c 74 65 72 2d 72 65 67 69 6f 6e 29 20 22 66 69 6c 74 65 72 ┆uote fast-filter-region) "filter┆ 0x18c0…18e0 2d 72 65 67 69 6f 6e 22 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 ┆-region") (ml-expansion (quote ┆ 0x18e0…1900 70 65 6e 64 69 6e 67 2d 69 6e 70 75 74 29 20 22 69 6e 70 75 74 2d 70 65 6e 64 69 6e 67 2d 70 22 ┆pending-input) "input-pending-p"┆ 0x1900…1920 29 0a 0a 28 6d 6c 2d 65 78 70 61 6e 73 69 6f 6e 20 28 71 75 6f 74 65 20 65 78 65 63 75 74 65 2d ┆) (ml-expansion (quote execute-┆ […truncated at 200 lines…]