User: aidan
Date: 09/08/13 18:47:40
Modified: packages/xemacs-packages/ilisp ChangeLog ilisp-snd.el
Log:
Transform #'values calls to #'list calls under 21.4, ilisp-snd.el
Revision Changes Path
1.52 +6 -0 XEmacs/packages/xemacs-packages/ilisp/ChangeLog
Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/ilisp/ChangeLog,v
retrieving revision 1.51
retrieving revision 1.52
diff -u -p -r1.51 -r1.52
--- ChangeLog 2006/05/17 08:32:32 1.51
+++ ChangeLog 2009/08/13 16:47:39 1.52
@@ -1,3 +1,9 @@
+2009-08-13 Aidan Kehoe <[email protected]>
+
+ * ilisp-snd.el:
+ Transform #'values calls to #'list calls at compile time if the
+ current XEmacs doesn't support true multiple values.
+
2006-05-17 Norbert Koch <[email protected]>
* Makefile (VERSION): XEmacs package 1.34 released.
1.6 +7 -1 XEmacs/packages/xemacs-packages/ilisp/ilisp-snd.el
Index: ilisp-snd.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/ilisp/ilisp-snd.el,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -p -r1.5 -r1.6
--- ilisp-snd.el 2002/06/03 23:37:03 1.5
+++ ilisp-snd.el 2009/08/13 16:47:39 1.6
@@ -9,7 +9,7 @@
;;; Please refer to the file ACKNOWLEGDEMENTS for an (incomplete) list
;;; of present and past contributors.
;;;
-;;; $Id: ilisp-snd.el,v 1.5 2002/06/03 23:37:03 wbd Exp $
+;;; $Id: ilisp-snd.el,v 1.6 2009/08/13 16:47:39 aidan Exp $
;;;%% Package / Symbol support
@@ -18,6 +18,12 @@
;;; Package hacks by Martin Atzmueller
;;;
;;; 19990824 Marco Antoniotti
+
+;; Have compiled 21.4 code also work on XEmacs binaries with real support
+;; for multiple values, by avoiding runtime calls to #'values:
+(eval-when-compile (when (eq 'list (symbol-function 'values))
+ (define-compiler-macro values (&rest args)
+ `(list ,@args))))
(defvar *ILISP-default-package* "COMMON-LISP-USER")
lmpx.com only provides a reader for public news (NNTP) servers. It is not
affiliated with the servers or forums shown here and is not responsible for
the content of articles, which is written by their respective authors.