diff src/coding.c @ 39973:579177964efa

Avoid (most) uses of XCAR/XCDR as lvalues, for flexibility in experimenting with lisp system changes.
author Ken Raeburn <raeburn@raeburn.org>
date Tue, 16 Oct 2001 09:09:51 +0000
parents 6d9fa06012a6
children 48875f4fda90
line wrap: on
line diff
--- a/src/coding.c	Mon Oct 15 20:52:59 2001 +0000
+++ b/src/coding.c	Tue Oct 16 09:09:51 2001 +0000
@@ -6212,7 +6212,7 @@
 	  Lisp_Object eol;
 	  eol = Fget (XCAR (tmp), Qeol_type);
 	  if (VECTORP (eol))
-	    XCAR (tmp) = XVECTOR (eol)->contents[eol_type];
+	    XSETCAR (tmp, XVECTOR (eol)->contents[eol_type]);
 	}
     }
   return (highest ? XCAR (val) : val);