From 3dcac282ad76ea0e845d340bd2bdcea03d80e73c Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Sat, 19 Mar 2016 15:40:00 +0900 Subject: [PATCH] removing test-error cases that would trigger a compile-time error in chicken --- lib/chibi/term/ansi-test.sld | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lib/chibi/term/ansi-test.sld b/lib/chibi/term/ansi-test.sld index 7476665e..1424f80a 100644 --- a/lib/chibi/term/ansi-test.sld +++ b/lib/chibi/term/ansi-test.sld @@ -38,16 +38,16 @@ ((test-escape-procedure p s) (begin (test-assert (procedure? p)) - (test-error (p #f)) + ;;(test-error (p #f)) (test s (p)))))) (define-syntax test-wrap-procedure (syntax-rules () ((test-wrap-procedure p s) (begin (test-assert (procedure? p)) - (test-error (p)) - (test-error (p #f)) - (test-error (p "" #f)) + ;; (test-error (p)) + ;; (test-error (p #f)) + ;; (test-error (p "" #f)) (test (p "FOO") "FOO" (parameterize ((ansi-escapes-enabled? #f)) (p "FOO")))