[uim-commit] r2164 - branches/r5rs/sigscheme/test

[kzk at freedesktop.org]

Author: kzk
Date: 2005-11-18 19:57:08 -0800 (Fri, 18 Nov 2005)
New Revision: 2164

Modified:
   branches/r5rs/sigscheme/test/test-srfi34.scm
Log:
* sigscheme/test/test-srfi34.scm
  - fix call assert-error


Modified: branches/r5rs/sigscheme/test/test-srfi34.scm
===================================================================
--- branches/r5rs/sigscheme/test/test-srfi34.scm	2005-11-19 03:00:01 UTC (rev 2163)
+++ branches/r5rs/sigscheme/test/test-srfi34.scm	2005-11-19 03:57:08 UTC (rev 2164)
@@ -55,7 +55,7 @@
 ;;
 
 ;; no guard or raw exception handler
-(assert-error "raise #1" #f (lambda ()
+(assert-error "raise #1" (lambda ()
                               (raise 'exception)))
 
 ;;