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

[yamaken at freedesktop.org]

Author: yamaken
Date: 2005-11-07 07:02:50 -0800 (Mon, 07 Nov 2005)
New Revision: 2069

Modified:
   branches/r5rs/sigscheme/test/test-srfi34-2.scm
Log:
* sigscheme/test/test-srfi34-2.scm
  - Remove a garbage


Modified: branches/r5rs/sigscheme/test/test-srfi34-2.scm
===================================================================
--- branches/r5rs/sigscheme/test/test-srfi34-2.scm	2005-11-07 14:51:22 UTC (rev 2068)
+++ branches/r5rs/sigscheme/test/test-srfi34-2.scm	2005-11-07 15:02:50 UTC (rev 2069)
@@ -87,10 +87,6 @@
                         'exception))
                  (+ 1 (raise 'an-error))))
 
-;; the result is not specified by SRFI-34, but we should result #<UNDEF> to
-;; prevent misuse of 'guard' procedure.
-(for-each values '())  ;; to produce #<UNDEF>
-
 (display "test #4")
 (newline)
 ;;PRINTS: something went wrong