summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2002-07-12 17:41:00 +0000
committerRichard M. Stallman <rms@gnu.org>2002-07-12 17:41:00 +0000
commitf988b5415433340ac4cf4a67b3f10ce1c4740bf7 (patch)
treeda0a9fde5a1c27cd58d0cfcb1c733b8880bb2e02 /lisp/emacs-lisp
parent56ce04a35198766b37026a546b79963dfc21579c (diff)
downloademacs-f988b5415433340ac4cf4a67b3f10ce1c4740bf7.tar.gz
emacs-f988b5415433340ac4cf4a67b3f10ce1c4740bf7.tar.bz2
emacs-f988b5415433340ac4cf4a67b3f10ce1c4740bf7.zip
(multiple-value-call): Add alias.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/cl.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/cl.el b/lisp/emacs-lisp/cl.el
index 9a5677237a8..6242096df88 100644
--- a/lisp/emacs-lisp/cl.el
+++ b/lisp/emacs-lisp/cl.el
@@ -229,6 +229,8 @@ right when EXPRESSION calls an ordinary Emacs Lisp function that returns just
one value."
(apply function expression))
+(defalias 'multiple-value-call 'apply) ; only works for one arg
+
(defsubst nth-value (n expression)
"Evaluate EXPRESSION to get multiple values and return the Nth one.
This handles multiple values in Common Lisp style, but it does not work