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

[kzk at freedesktop.org]

Author: kzk
Date: 2005-11-21 12:32:19 -0800 (Mon, 21 Nov 2005)
New Revision: 2209

Modified:
   branches/r5rs/sigscheme/test/test-string.scm
Log:
* sigscheme/test/test-string.scm
  - temporally comment out vertical bar testcase


Modified: branches/r5rs/sigscheme/test/test-string.scm
===================================================================
--- branches/r5rs/sigscheme/test/test-string.scm	2005-11-21 19:52:04 UTC (rev 2208)
+++ branches/r5rs/sigscheme/test/test-string.scm	2005-11-21 20:32:19 UTC (rev 2209)
@@ -194,8 +194,12 @@
 (assert-equal? "R6RS escape sequence" (integer->string 11)       "\v")  ;; 118
 (assert-equal? "R6RS escape sequence" (list->string '(#\vtab))   "\v")  ;; 118
 (assert-equal? "R6RS escape sequence" '(#\vtab)   (string->list "\v"))  ;; 118
-(assert-equal? "R6RS escape sequence" (integer->string 124)      "\|")  ;; 124
 
+; 2005/11/22 Kazuki Ohta <mover at hct.zaq.ne.jp>
+; temporally commented out
+;
+; (assert-equal? "R6RS escape sequence" (integer->string 124)      "\|")  ;; 124
+
 ;; All these conventional escape sequences should cause parse error as defined
 ;; in SRFI-75: "Any other character in a string after a backslash is an
 ;; error".