Ar an deichiú lá de mí Méan Fómhair, scríobh Stephen J. Turnbull:
Michael Sperber writes:
>
> Is anybody able to build the packages with a current XEmacs? Right now,
> I get `max-lisp-eval-depth' problems in pcl-cvs that smell of
> byte-compiler problems.
Here's a (smaller) test case, that somebody a little creative could
probably find a way to automate a bisect. (That somebody might be me,
but not tonight.)
I can compile that test case without problems. Do you both have the latest
versions of bytecomp.elc, cl-macs.elc and, just to be sure,
byte-optimize.elc?
;;; pcl-cvs-die --- byte compile this file to overflow
max-lisp-eval-depth
(defstruct (cvs-flags
(:constructor nil)
(:constructor -cvs-flags-make
(desc defaults &optional qtypedesc hist-sym)))
defaults persist desc qtypedesc hist-sym)
(defmacro cvs-flags-define (sym defaults
&optional desc qtypedesc hist-sym docstring)
`(defconst ,sym
(let ((bound (boundp ',sym)))
(if (and bound (cvs-flags-p ,sym)) ,sym
(let ((defaults ,defaults))
(-cvs-flags-make ,desc
(if bound (cons ,sym (cdr defaults)) defaults)
,qtypedesc ,hist-sym))))
,docstring))
(cvs-flags-define cvs-cvs-flags '(("-f")))
;;; end pcl-cvs-die.el
--
‘Iodine deficiency was endemic in parts of the UK until, through what has been
described as “an unplanned and accidental public health triumph”, iodine was
added to cattle feed to improve milk production in the 1930s.’
(EN Pearce, Lancet, June 2011)
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta