[Guile-commits] GNU Guile branch, master, updated. release_1-9-9-5-g7f10a11

[Andy Wingo]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".

http://git.savannah.gnu.org/cgit/guile.git/commit/?id=7f10a113c5f370071647c23b21b912ecceef3a50

The branch, master has been updated
       via  7f10a113c5f370071647c23b21b912ecceef3a50 (commit)
      from  8a73a6d2943ee081fa0497cd37abcc2f72ca9164 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 7f10a113c5f370071647c23b21b912ecceef3a50
Author: Andy Wingo <address@hidden>
Date:   Fri Mar 19 17:05:46 2010 +0100

    fix srfi-31 check after macroexpand rename
    
    * test-suite/tests/srfi-31.test: ("rec special form"): Fix check.

-----------------------------------------------------------------------

Summary of changes:
 test-suite/tests/srfi-31.test |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/test-suite/tests/srfi-31.test b/test-suite/tests/srfi-31.test
index 6d65ce2..8537d49 100644
--- a/test-suite/tests/srfi-31.test
+++ b/test-suite/tests/srfi-31.test
@@ -1,6 +1,6 @@
 ;;;; srfi-31.test --- Test suite for Guile's SRFI-31 functions. -*- scheme -*-
 ;;;;
-;;;; Copyright (C) 2004, 2006 Free Software Foundation, Inc.
+;;;; Copyright (C) 2004, 2006, 2010 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
@@ -23,8 +23,8 @@
 (with-test-prefix "rec special form"
 
   (pass-if-exception "bogus variable" '(misc-error . ".*")
-    (sc-expand '(rec #:foo)))
-
+    (eval '(rec #:foo) (current-module)))
+  
   (pass-if "rec expressions"
     (let ((ones-list (rec ones (cons 1 (delay ones)))))
       (and (= 1 (car ones-list))


hooks/post-receive
-- 
GNU Guile