X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fearly-format.lisp;h=9cd700960fb390867e943b5ff9363cabe30d6d13;hb=cd1b14acf6f548b28b8a14e554d779f0473122ec;hp=7dbc663a04d36f8c8e45fdff4d8f1eba6a2fd5ab;hpb=0b96758f3645dff3e681d82cc97ddab1faae27ac;p=sbcl.git

diff --git a/src/code/early-format.lisp b/src/code/early-format.lisp
index 7dbc663..9cd7009 100644
--- a/src/code/early-format.lisp
+++ b/src/code/early-format.lisp
@@ -11,11 +11,11 @@
 
 (defparameter *format-whitespace-chars*
   (vector #\space
-	  #\newline
-	  ;; We leave out this non-STANDARD-CHARACTER entry from this table
-	  ;; when we're running in the cross-compilation host, since ANSI
-	  ;; doesn't require the cross-compilation host to know what a tab is.
-	  #-sb-xc-host (code-char tab-char-code)))
+          #\newline
+          ;; We leave out this non-STANDARD-CHARACTER entry from this table
+          ;; when we're running in the cross-compilation host, since ANSI
+          ;; doesn't require the cross-compilation host to know what a tab is.
+          #-sb-xc-host (code-char tab-char-code)))
 
 (defvar *format-directive-expanders*
   (make-array base-char-code-limit :initial-element nil))