diff src/lread.c @ 181:bfd6434d15b3 r20-3b17

Import from CVS: tag r20-3b17
author cvs
date Mon, 13 Aug 2007 09:53:19 +0200
parents 8eaf7971accc
children 3d6bfa290dbd
line wrap: on
line diff
--- a/src/lread.c	Mon Aug 13 09:52:21 2007 +0200
+++ b/src/lread.c	Mon Aug 13 09:53:19 2007 +0200
@@ -1174,10 +1174,10 @@
 -- byte-compilation of a .el file into a .elc file.
 
 `locate-file' will primarily get confused if you add a file that shadows
-(i.e. has the same name as) another file further down in the directory list.
+\(i.e. has the same name as) another file further down in the directory list.
 In this case, you must call `locate-file-clear-hashing'.
 */
-(path))
+       (path))
 {
   Lisp_Object pathtail;
 
@@ -2731,10 +2731,7 @@
   s.terminator = terminator;
   GCPRO2 (s.head, s.tail);
 
-  (void) sequence_reader (readcharfun,
-                          terminator,
-                          &s,
-                          read_list_conser);
+  sequence_reader (readcharfun, terminator, &s, read_list_conser);
 #ifdef COMPILED_FUNCTION_ANNOTATION_HACK
   Vcurrent_compiled_function_annotation = old_compiled_function_annotation;
 #endif
@@ -2819,17 +2816,14 @@
   struct read_list_state s;
   struct gcpro gcpro1, gcpro2;
 
-
   s.head = Qnil;
   s.tail = Qnil;
   s.length = 0;
   s.allow_dotted_lists = 0;
   GCPRO2 (s.head, s.tail);
 
-  (void) sequence_reader (readcharfun,
-                          terminator,
-                          &s,
-                          read_list_conser);
+  sequence_reader (readcharfun, terminator, &s, read_list_conser);
+  
   UNGCPRO;
   tem = s.head;
   len = XINT (Flength (tem));