Hi Raymond --
[I just sent an incomplete version of this mail to the list, this is the
definitive one.]
Ar an cúigiú lá de mí Bealtaine, scríobh Raymond Toy:
I just tried building xemacs on sparc using gcc 4.5.2. Everything
actually compiles ok, but while dumping, I get the following:
Dumping under the name xemacs
./xemacs -no-packages -batch -no-autoloads -l update-elc-2.el -f batch-update-elc-2
/net/gondor/Volumes/share2/src/xemacs/hg/xemacs-21.5/src/../lisp
Loading autoload...
Loading bytecomp...
Loading cl-macs...
[...]
Invalid read syntax: Integer constant overflow in reader, "1073741824",
10gmake[2]: *** [update-elc-2] Error 255
This is my bug, thanks for the report. I’ve just committed the below.
Best,
Aidan
APPROVE COMMIT
NOTE: This patch has been committed.
# HG changeset patch
# User Aidan Kehoe <kehoea(a)parhasard.net>
# Date 1304674634 -3600
# Node ID 4813ff11c6e297815a02fc0601a3b01881f6f6a1
# Parent 01900734203a8d625bb4ec113fd0daad8131d7bb
Correct the definition of #'cl-non-fixnum-number-p on 32-bit machines.
2011-05-06 Aidan Kehoe <kehoea(a)parhasard.net>
* cl-macs.el (most-positive-fixnum-on-32-bit-machines):
Correct this, I had an off-by-one error (because I was developing
on a 64-bit machine). Thanks for the report, Raymond Toy!
diff -r 01900734203a -r 4813ff11c6e2 lisp/ChangeLog
--- a/lisp/ChangeLog Tue May 03 08:13:21 2011 -0400
+++ b/lisp/ChangeLog Fri May 06 10:37:14 2011 +0100
@@ -1,3 +1,9 @@
+2011-05-06 Aidan Kehoe <kehoea(a)parhasard.net>
+
+ * cl-macs.el (most-positive-fixnum-on-32-bit-machines):
+ Correct this, I had an off-by-one error (because I was developing
+ on a 64-bit machine). Thanks for the report, Raymond Toy!
+
2011-05-01 Aidan Kehoe <kehoea(a)parhasard.net>
* buff-menu.el (list-buffers-directory):
diff -r 01900734203a -r 4813ff11c6e2 lisp/cl-macs.el
--- a/lisp/cl-macs.el Tue May 03 08:13:21 2011 -0400
+++ b/lisp/cl-macs.el Fri May 06 10:37:14 2011 +0100
@@ -3227,8 +3227,9 @@
;; range of fixnums as well as their types. XEmacs doesn't support machines
;; with word size less than 32, so it's OK to have that as the minimum.
(macrolet
- ((most-negative-fixnum-on-32-bit-machines () (lognot (1- (lsh 1 30))))
- (most-positive-fixnum-on-32-bit-machines () (lsh 1 30)))
+ ((most-positive-fixnum-on-32-bit-machines () (1- (lsh 1 30)))
+ (most-negative-fixnum-on-32-bit-machines ()
+ (lognot (most-positive-fixnum-on-32-bit-machines))))
(defun cl-non-fixnum-number-p (object)
"Return t if OBJECT is a number not guaranteed to be immediate."
(and (numberp object)
--
“Apart from the nine-banded armadillo, man is the only natural host of
Mycobacterium leprae, although it can be grown in the footpads of mice.”
-- Kumar & Clark, Clinical Medicine, summarising improbable leprosy research
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-patches