diff options
| author | Jim Blandy | 1992-03-16 20:39:07 +0000 |
|---|---|---|
| committer | Jim Blandy | 1992-03-16 20:39:07 +0000 |
| commit | 49116ac071969bee7f129bf7ce725c7a5b0b0fc5 (patch) | |
| tree | 60c249f15b04478367256fef95c6fd7557f263b9 /lisp/emulation | |
| parent | 3b4a6e271d44955328c39de1475e42cf0b4cd637 (diff) | |
| download | emacs-49116ac071969bee7f129bf7ce725c7a5b0b0fc5.tar.gz emacs-49116ac071969bee7f129bf7ce725c7a5b0b0fc5.zip | |
*** empty log message ***
Diffstat (limited to 'lisp/emulation')
| -rw-r--r-- | lisp/emulation/mlsupport.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/emulation/mlsupport.el b/lisp/emulation/mlsupport.el index 14e7a3c9557..521b64ce281 100644 --- a/lisp/emulation/mlsupport.el +++ b/lisp/emulation/mlsupport.el | |||
| @@ -18,8 +18,6 @@ | |||
| 18 | ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. | 18 | ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. |
| 19 | 19 | ||
| 20 | 20 | ||
| 21 | (provide 'mlsupport) | ||
| 22 | |||
| 23 | (defmacro ml-defun (&rest defs) | 21 | (defmacro ml-defun (&rest defs) |
| 24 | (list 'ml-defun-1 (list 'quote defs))) | 22 | (list 'ml-defun-1 (list 'quote defs))) |
| 25 | 23 | ||
| @@ -403,3 +401,6 @@ | |||
| 403 | (if (< from 0) (setq from (+ from length))) | 401 | (if (< from 0) (setq from (+ from length))) |
| 404 | (if (< to 0) (setq to (+ to length))) | 402 | (if (< to 0) (setq to (+ to length))) |
| 405 | (substring string from (+ from to)))) | 403 | (substring string from (+ from to)))) |
| 404 | |||
| 405 | (provide 'mlsupport) | ||
| 406 | |||