diff options
Diffstat (limited to 'meta/recipes-devtools/guile/files/debian/0002-Mark-Unused-modules-are-removed-gc-test-as-unresolve.patch')
| -rw-r--r-- | meta/recipes-devtools/guile/files/debian/0002-Mark-Unused-modules-are-removed-gc-test-as-unresolve.patch | 29 |
1 files changed, 15 insertions, 14 deletions
diff --git a/meta/recipes-devtools/guile/files/debian/0002-Mark-Unused-modules-are-removed-gc-test-as-unresolve.patch b/meta/recipes-devtools/guile/files/debian/0002-Mark-Unused-modules-are-removed-gc-test-as-unresolve.patch index 06c849432b..43238a7d2e 100644 --- a/meta/recipes-devtools/guile/files/debian/0002-Mark-Unused-modules-are-removed-gc-test-as-unresolve.patch +++ b/meta/recipes-devtools/guile/files/debian/0002-Mark-Unused-modules-are-removed-gc-test-as-unresolve.patch @@ -15,24 +15,25 @@ garbage collector. 1 files changed, 6 insertions(+), 5 deletions(-) diff --git a/test-suite/tests/gc.test b/test-suite/tests/gc.test -index 97eeb19..58e4936 100644 +index a969752..8c8e13e 100644 --- a/test-suite/tests/gc.test +++ b/test-suite/tests/gc.test -@@ -80,11 +80,12 @@ - (gc) ;; thrice: because the test doesn't succeed with only +@@ -84,11 +84,13 @@ ;; one gc round. not sure why. -- (= (let lp ((i 0)) -- (if (guard) -- (lp (1+ i)) -- i)) -- total))) -+ (or (= (let lp ((i 0)) -+ (if (guard) -+ (lp (1+ i)) -+ i)) -+ total) -+ (throw 'unresolved)))) + (maybe-gc-flakiness +- (= (let lp ((i 0)) +- (if (guard) +- (lp (1+ i)) +- i)) +- total)))) ++ (or (= (let lp ((i 0)) ++ (if (guard) ++ (lp (1+ i)) ++ i)) ++ total) ++ (throw 'unresolved))))) ++ (pass-if "Lexical vars are collectable" (let ((l (compile |