xemacs-packages/ilisp/ChangeLog addition: 2009-08-13 Aidan Kehoe <kehoea(a)parhasard.net&gt; * ilisp-snd.el: Transform #'values calls to #'list calls at compile time if the current XEmacs doesn't support true multiple values. XEmacs Packages source patch: Diff command: cvs -q diff -Nu Files affected: xemacs-packages/ilisp/ilisp-snd.el Index: xemacs-packages/ilisp/ilisp-snd.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/ilisp/ilisp-snd.el,v retrieving revision 1.5 diff -u -r1.5 ilisp-snd.el --- xemacs-packages/ilisp/ilisp-snd.el 2002/06/03 23:37:03 1.5 +++ xemacs-packages/ilisp/ilisp-snd.el 2009/08/13 15:25:36 ＠＠ -19,6 +19,12 ＠＠ ;;; ;;; 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") (defun ilisp-add-set-package-hook () ; Was: add-set-package-hook -- ¿Dónde estará ahora mi sobrino Yoghurtu Nghe, que tuvo que huir precipitadamente de la aldea por culpa de la escasez de rinocerontes? _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches