From 458c898a50baf00b62c5acccc0c2b1d456ab04a1 Mon Sep 17 00:00:00 2001 From: Stelian Ionescu Date: Tue, 29 Apr 2008 13:42:00 +0200 Subject: [PATCH] Don't run UTF-8 tests on CMUCL. Signed-off-by: Stelian Ionescu --- tests/streams.lisp | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/tests/streams.lisp b/tests/streams.lisp index 794ef34..6878dc9 100644 --- a/tests/streams.lisp +++ b/tests/streams.lisp @@ -97,11 +97,11 @@ ;;; A list of test files where each entry consists of the name ;;; prefix and a list of encodings. (defvar *test-files* - '(("kafka" (:utf-8 :latin-1 #|:cp1252|#)) - ("tilton" (:utf-8 :ascii)) - ("hebrew" (:utf-8 #|:latin-8|#)) - ("russian" (:utf-8 #|:koi8r|#)) - ("unicode_demo" (:utf-8 #|:utf-16 :utf-32|#)))) + '(("kafka" (#-cmu :utf-8 :latin-1 #|:cp1252|#)) + ("tilton" (#-cmu :utf-8 :ascii)) + ("hebrew" (#-cmu :utf-8 #|:latin-8|#)) + ("russian" (#-cmu :utf-8 #|:koi8r|#)) + ("unicode_demo" (#-cmu :utf-8 #|:utf-16 :utf-32|#)))) ;;; For a name suffix FILE-NAME and a symbol SYMBOL denoting an ;;; encoding returns a list of pairs where the car is a full file name -- 2.11.4.GIT