From 3448767f9790c0b97b776bf36bf4419150f51040 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Wed, 26 Jan 2011 13:28:01 -0700 Subject: [PATCH] fix SRFI-14 test --- collects/tests/racket/char-set.rktl | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/collects/tests/racket/char-set.rktl b/collects/tests/racket/char-set.rktl index 9cb119e050..3fd2af59ed 100644 --- a/collects/tests/racket/char-set.rktl +++ b/collects/tests/racket/char-set.rktl @@ -68,7 +68,9 @@ (test #t char-set= (char-set-intersection char-set:graphic char-set:latin-1) - (char-set-intersection (char-set-union char-set:letter char-set:digit char-set:punctuation char-set:symbol) + (char-set-intersection (char-set-union char-set:letter char-set:digit char-set:punctuation char-set:symbol + ;; 1/4, 1/2, and 3/4: + (char-set #\uBC #\uBD #\uBE)) char-set:latin-1)) (test #t char-set= char-set:printing (char-set-union char-set:graphic char-set:whitespace))