From: Juanma Barranquero <lekktu@gmail.com>
Date: Sat, 5 Sep 2009 00:45:08 +0000 (+0000)
Subject: Fix whitespace.
X-Git-Tag: emacs-pretest-23.1.90~1476
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9735b9ce6fcdc1bcad88b8884bc8c9eab9fd1622;p=emacs.git

Fix whitespace.
---

diff --git a/src/lread.c b/src/lread.c
index ee4659ffd47..10bc4ad3c5e 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -2042,7 +2042,7 @@ read_escape (readcharfun, stringp)
      int stringp;
 {
   register int c = READCHAR;
-  /* \u allows up to four hex digits, \U up to eight. Default to the
+  /* \u allows up to four hex digits, \U up to eight.  Default to the
      behavior for \u, and change this value in the case that \U is seen. */
   int unicode_hex_count = 4;
 
@@ -2216,7 +2216,7 @@ read_escape (readcharfun, stringp)
       unicode_hex_count = 8;
     case 'u':
 
-      /* A Unicode escape. We only permit them in strings and characters,
+      /* A Unicode escape.  We only permit them in strings and characters,
 	 not arbitrarily in the source code, as in some other languages.  */
       {
 	unsigned int i = 0;
@@ -2369,15 +2369,15 @@ read1 (readcharfun, pch, first_in_list)
 	      Lisp_Object val = Qnil;
 	      /* The size is 2 * number of allowed keywords to
 		 make-hash-table. */
-	      Lisp_Object params[10]; 
+	      Lisp_Object params[10];
 	      Lisp_Object ht;
 	      Lisp_Object key = Qnil;
 	      int param_count = 0;
-	      
+
 	      if (!EQ (head, Qhash_table))
 		error ("Invalid extended read marker at head of #s list "
 		       "(only hash-table allowed)");
-	      
+
 	      tmp = CDR_SAFE (tmp);
 
 	      /* This is repetitive but fast and simple. */
@@ -2411,7 +2411,7 @@ read1 (readcharfun, pch, first_in_list)
 
 	      /* Now use params to make a new hashtable and fill it. */
 	      ht = Fmake_hash_table (param_count, params);
-	      
+
 	      while (CONSP (data))
 	      	{
 	      	  key = XCAR (data);
@@ -2422,7 +2422,7 @@ read1 (readcharfun, pch, first_in_list)
 	      	  data = XCDR (data);
 	      	  Fputhash (key, val, ht);
 	      	}
-	      
+
 	      return ht;
 	    }
 	}
@@ -2652,7 +2652,7 @@ read1 (readcharfun, pch, first_in_list)
 	      Lisp_Object placeholder;
 	      Lisp_Object cell;
 
-	      placeholder = Fcons(Qnil, Qnil);
+	      placeholder = Fcons (Qnil, Qnil);
 	      cell = Fcons (make_number (n), placeholder);
 	      read_objects = Fcons (cell, read_objects);
 
@@ -3239,7 +3239,7 @@ substitute_in_interval (interval, arg)
   Lisp_Object object      = Fcar (arg);
   Lisp_Object placeholder = Fcdr (arg);
 
-  SUBSTITUTE(interval->plist, interval->plist = true_value);
+  SUBSTITUTE (interval->plist, interval->plist = true_value);
 }
 
 
@@ -4180,7 +4180,7 @@ init_lread ()
     }
 #endif
 
-#if (!(defined(WINDOWSNT) || (defined(HAVE_NS))))
+#if (!(defined (WINDOWSNT) || (defined (HAVE_NS))))
   /* When Emacs is invoked over network shares on NT, PATH_LOADSEARCH is
      almost never correct, thereby causing a warning to be printed out that
      confuses users.  Since PATH_LOADSEARCH is always overridden by the