Mercurial > emacs

changeset 104853:51dc0c10fa2c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix whitespace.
author Juanma Barranquero <lekktu@gmail.com>
date Sat, 05 Sep 2009 00:45:08 +0000
parents e066b8cdbefb
children e8bc169bdced
files src/lread.c
diffstat 1 files changed, 10 insertions(+), 10 deletions(-) [+]
line wrap: on
line diff
--- a/src/lread.c	Fri Sep 04 08:15:28 2009 +0000
+++ b/src/lread.c	Sat Sep 05 00:45:08 2009 +0000
@@ -2042,7 +2042,7 @@
      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 @@
       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 @@
 	      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 @@
 
 	      /* 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 @@
 	      	  data = XCDR (data);
 	      	  Fputhash (key, val, ht);
 	      	}
-	      
+
 	      return ht;
 	    }
 	}
@@ -2652,7 +2652,7 @@
 	      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 @@
   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 @@
     }
 #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