X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fexternal-formats%2Fenc-jpn-tbl.lisp;h=cc0d0a7d683b82207d92e5bad0c552d8d49e3527;hb=625c9493a8a7b5186144d21302437cf4f4f3571c;hp=04e3ee4a130e241253529154928c4af9eb5194e0;hpb=0d5ff04e2ced1cbb2979dd1a7fcfd7ba3d6da7c1;p=sbcl.git

diff --git a/src/code/external-formats/enc-jpn-tbl.lisp b/src/code/external-formats/enc-jpn-tbl.lisp
index 04e3ee4..cc0d0a7 100644
--- a/src/code/external-formats/enc-jpn-tbl.lisp
+++ b/src/code/external-formats/enc-jpn-tbl.lisp
@@ -1,6 +1,6 @@
 (in-package "SB!IMPL")
 (define-multibyte-mapper *ucs-to-eucjp-table*
-    '((#xa1 #x8fa2c2)
+     ((#xa1 #x8fa2c2)
       (#xa2 #xa1f1)
       (#xa3 #xa1f2)
       (#xa4 #x8fa2f0)
@@ -13012,7 +13012,7 @@
       (#xffe3 #xa1b1)
       (#xffe5 #xa1ef)))
 (define-multibyte-mapper *eucjp-to-ucs-table*
-    '((#x8ea1 #xff61)
+     ((#x8ea1 #xff61)
       (#x8ea2 #xff62)
       (#x8ea3 #xff63)
       (#x8ea4 #xff64)
@@ -26022,7 +26022,7 @@
       (#x8fede2 #x9fa3)
       (#x8fede3 #x9fa5)))
 (define-multibyte-mapper *ucs-to-sjis-table*
-    '((#xa2 #x8191)
+     ((#xa2 #x8191)
       (#xa3 #x8192)
       (#xa5 #x5c)
       (#xa7 #x8198)
@@ -35304,7 +35304,7 @@
       (#xffe4 #xfa55)
       (#xffe5 #x818f)))
 (define-multibyte-mapper *sjis-to-ucs-table*
-    '((#xa1 #xff61)
+     ((#xa1 #xff61)
       (#xa2 #xff62)
       (#xa3 #xff63)
       (#xa4 #xff64)