guile: remove dangling patch
(From OE-Core rev: 8086862e64281f55fc89c39e16b1e339a9174a60) Signed-off-by: Stefan Müller-Klieser <s.mueller-klieser@phytec.de> Signed-off-by: Richard Purdie <richard.purdie@linuxfoundation.org>
This commit is contained in:
parent
8b88df382d
commit
fe5f80bda8
|
@ -1,49 +0,0 @@
|
||||||
Upstream-Status: Inappropriate [opensuse patch]
|
|
||||||
|
|
||||||
Signed-off-by: Nitin A Kamble <nitin.a.kamble@intel.com>
|
|
||||||
|
|
||||||
See http://debbugs.gnu.org/cgi/bugreport.cgi?bug=10096
|
|
||||||
why this test is turned off.
|
|
||||||
Index: guile-2.0.3/test-suite/tests/gc.test
|
|
||||||
===================================================================
|
|
||||||
--- guile-2.0.3.orig/test-suite/tests/gc.test 2011-10-15 09:34:40.000000000 -0700
|
|
||||||
+++ guile-2.0.3/test-suite/tests/gc.test 2012-01-13 21:52:10.282540355 -0800
|
|
||||||
@@ -65,23 +65,23 @@
|
|
||||||
foo)))
|
|
||||||
|
|
||||||
|
|
||||||
-(with-test-prefix "gc"
|
|
||||||
- (pass-if "Unused modules are removed"
|
|
||||||
- (let* ((guard (make-guardian))
|
|
||||||
- (total 1000))
|
|
||||||
-
|
|
||||||
- (for-each (lambda (x) (guard (make-module))) (iota total))
|
|
||||||
+;;(with-test-prefix "gc"
|
|
||||||
+;; (pass-if "Unused modules are removed"
|
|
||||||
+;; (let* ((guard (make-guardian))
|
|
||||||
+;; (total 1000))
|
|
||||||
+;;
|
|
||||||
+;; (for-each (lambda (x) (guard (make-module))) (iota total))
|
|
||||||
|
|
||||||
;; Avoid false references to the modules on the stack.
|
|
||||||
- (stack-cleanup 20)
|
|
||||||
+;; (stack-cleanup 20)
|
|
||||||
|
|
||||||
- (gc)
|
|
||||||
- (gc) ;; twice: have to kill the weak vectors.
|
|
||||||
- (gc) ;; thrice: because the test doesn't succeed with only
|
|
||||||
+;; (gc)
|
|
||||||
+;; (gc) ;; twice: have to kill the weak vectors.
|
|
||||||
+;; (gc) ;; thrice: because the test doesn't succeed with only
|
|
||||||
;; one gc round. not sure why.
|
|
||||||
|
|
||||||
- (= (let lp ((i 0))
|
|
||||||
- (if (guard)
|
|
||||||
- (lp (1+ i))
|
|
||||||
- i))
|
|
||||||
- total))))
|
|
||||||
+;; (= (let lp ((i 0))
|
|
||||||
+;; (if (guard)
|
|
||||||
+;; (lp (1+ i))
|
|
||||||
+;; i))
|
|
||||||
+;; total))))
|
|
Loading…
Reference in New Issue