Commits

aidan  committed c2be60c

Transform #'values calls to #'list calls under 21.4, edict-edit.el

  • Participants
  • Parent commits a7223ee

Comments (0)

Files changed (2)

+2009-08-13  Aidan Kehoe  <kehoea@parhasard.net>
+
+	* edict-edit.el: 
+	Have compiled 21.4 code also work on XEmacs binaries with real
+	support for multiple values, by avoiding runtime calls to
+	#'values.
+
 2003-10-31  Norbert Koch  <viteno@xemacs.org>
 
 	* Makefile (VERSION): XEmacs package 1.16 released.

File edict-edit.el

 
 (require 'cl)
 
+;; 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))))
+
 ;;; Customizable variables
 
 ;; #### does this tristate make sense with Customize support?