Mercurial > emacs
comparison 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 |
comparison
equal
deleted
inserted
replaced
| 39972:b2479b43184b | 39973:579177964efa |
|---|---|
| 6210 && eol_type != CODING_EOL_INCONSISTENT) | 6210 && eol_type != CODING_EOL_INCONSISTENT) |
| 6211 { | 6211 { |
| 6212 Lisp_Object eol; | 6212 Lisp_Object eol; |
| 6213 eol = Fget (XCAR (tmp), Qeol_type); | 6213 eol = Fget (XCAR (tmp), Qeol_type); |
| 6214 if (VECTORP (eol)) | 6214 if (VECTORP (eol)) |
| 6215 XCAR (tmp) = XVECTOR (eol)->contents[eol_type]; | 6215 XSETCAR (tmp, XVECTOR (eol)->contents[eol_type]); |
| 6216 } | 6216 } |
| 6217 } | 6217 } |
| 6218 return (highest ? XCAR (val) : val); | 6218 return (highest ? XCAR (val) : val); |
| 6219 } | 6219 } |
| 6220 | 6220 |