diff src/lread.c @ 85330:0bc184c59770

* xfns.c (Fx_create_frame, Fx_display_list): * window.c (window_fixed_size_p, enlarge_window, shrink_window_lowest_first): * macterm.c (init_font_name_table): * macfns.c (Fx_create_frame, Fx_display_list): * lread.c (close_load_descs): * keyboard.c (read_char_x_menu_prompt): * fns.c (Fmember, Fmemql, Fdelete, Fset_char_table_parent): * coding.c (code_convert_region_unwind): Test the type of an object rather than just !NILP before extracting data from it.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Tue, 16 Oct 2007 16:28:39 +0000
parents b98ea218eb70
children 689fd5665496
line wrap: on
line diff
--- a/src/lread.c	Tue Oct 16 15:49:43 2007 +0000
+++ b/src/lread.c	Tue Oct 16 16:28:39 2007 +0000
@@ -1100,7 +1100,7 @@
 {
 #ifndef WINDOWSNT
   Lisp_Object tail;
-  for (tail = load_descriptor_list; !NILP (tail); tail = XCDR (tail))
+  for (tail = load_descriptor_list; CONSP (tail); tail = XCDR (tail))
     emacs_close (XFASTINT (XCAR (tail)));
 #endif
 }