From 3e48969ab89f83a36c66753a28a0f36119625547 Mon Sep 17 00:00:00 2001
From: Ludovic Courtès
Date: Wed, 7 Jan 2009 01:36:47 +0100
Subject: Fix SRFI-64 to allow the use of `test-assert'.

---
 src/guile/srfi/srfi-64.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/guile/srfi')

diff --git a/src/guile/srfi/srfi-64.scm b/src/guile/srfi/srfi-64.scm
index 56a99a4..3a41b03 100644
--- a/src/guile/srfi/srfi-64.scm
+++ b/src/guile/srfi/srfi-64.scm
@@ -3,7 +3,7 @@
            ;; referred to by the expanded macros.
            %test-begin %test-comp2 %test-comp2body %test-on-test-begin
            %test-evaluate-with-catch %test-on-test-end %test-report-result
-           %test-end
+           %test-end %test-comp1body
 
            test-begin ;; must be listed first, since in Kawa (at least) it is "magic".
            test-end test-assert test-eqv test-eq test-equal
-- 
cgit v1.2.3