From 82ff54b2bfb3f6e512a07edae6162e606f0c2a8a Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Daniel=20Kochma=C5=84ski?= Date: Wed, 19 Aug 2015 08:17:32 +0200 Subject: [PATCH] cosmetic: wrap lines esthetically MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Daniel Kochmański --- src/tests/bugs/test-ansi.lsp | 15 ++++++++++----- 1 file changed, 10 insertions(+), 5 deletions(-) diff --git a/src/tests/bugs/test-ansi.lsp b/src/tests/bugs/test-ansi.lsp index 52bf9e492..8dd560863 100644 --- a/src/tests/bugs/test-ansi.lsp +++ b/src/tests/bugs/test-ansi.lsp @@ -7,11 +7,16 @@ ;;;;;;;;;;;;;;;;;;;;; (symbol-macrolet ((lookup-table - '(:SYMBOL ("zebra" "Zebra" "ZEBRA" "zebr\\a" "zebr\\A" "ZEBR\\a" "ZEBR\\A" "Zebr\\a" "Zebr\\A") - :UPCASE (|ZEBRA| |ZEBRA| |ZEBRA| |ZEBRa| |ZEBRA| |ZEBRa| |ZEBRA| |ZEBRa| |ZEBRA|) - :DOWNCASE (|zebra| |zebra| |zebra| |zebra| |zebrA| |zebra| |zebrA| |zebra| |zebrA|) - :PRESERVE (|zebra| |Zebra| |ZEBRA| |zebra| |zebrA| |ZEBRa| |ZEBRA| |Zebra| |ZebrA|) - :INVERT (|ZEBRA| |Zebra| |zebra| |ZEBRa| |ZEBRA| |zebra| |zebrA| |Zebra| |ZebrA|)))) + '(:SYMBOL ("zebra" "Zebra" "ZEBRA" "zebr\\a" "zebr\\A" + "ZEBR\\a""ZEBR\\A" "Zebr\\a" "Zebr\\A") + :UPCASE (|ZEBRA| |ZEBRA| |ZEBRA| |ZEBRa| + |ZEBRA| |ZEBRa| |ZEBRA| |ZEBRa| |ZEBRA|) + :DOWNCASE (|zebra| |zebra| |zebra| |zebra| + |zebrA| |zebra| |zebrA| |zebra| |zebrA|) + :PRESERVE (|zebra| |Zebra| |ZEBRA| |zebra| + |zebrA| |ZEBRa| |ZEBRA| |Zebra| |ZebrA|) + :INVERT (|ZEBRA| |Zebra| |zebra| |ZEBRa| + |ZEBRA| |zebra| |zebrA| |Zebra| |ZebrA|)))) (macrolet ((def-readtable-case-test (reader-case) `(deftest ,(concatenate 'string "TEST-ANSI.READTABLE.CASE-"