[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: guile 1.8.3 fails to build on sparc
From: |
Ludovic Courtès |
Subject: |
Re: guile 1.8.3 fails to build on sparc |
Date: |
Thu, 07 Feb 2008 23:01:06 +0100 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.1 (gnu/linux) |
Hi,
address@hidden (Ludovic Courtès) writes:
> Rob: Would it be possible for you to try out this patch on one of the
> Debian SPARC machines?
And here's the patch. ;-)
Ludo'.
Index: test-suite/tests/gc.test
===================================================================
RCS file: /cvsroot/guile/guile/guile-core/test-suite/tests/gc.test,v
retrieving revision 1.8
diff -u -r1.8 gc.test
--- test-suite/tests/gc.test 16 Apr 2006 23:27:14 -0000 1.8
+++ test-suite/tests/gc.test 7 Feb 2008 21:42:47 -0000
@@ -65,6 +65,10 @@
"eval-closure" (gc-live-object-stats)))))
(for-each (lambda (x) (make-module)) (iota 1000))
+ (let cleanup ((i 10))
+ (and (> i 0)
+ (begin (cleanup (1- i)) i)))
+
(gc)
(gc) ;; twice: have to kill the weak vectors.
(= last-count (cdr (assoc "eval-closure" (gc-live-object-stats)))))