6514 |
int c, len, i; |
int c, len, i; |
6515 |
Lisp_Object val, ch; |
Lisp_Object val, ch; |
6516 |
Lisp_Object prev, tail; |
Lisp_Object prev, tail; |
6517 |
|
|
6518 |
while (p < pend) |
while (p < pend) |
6519 |
{ |
{ |
6520 |
c = STRING_CHAR_AND_LENGTH (p, pend - p, len); |
c = STRING_CHAR_AND_LENGTH (p, pend - p, len); |
6635 |
else |
else |
6636 |
/* ... and append generic coding systems. */ |
/* ... and append generic coding systems. */ |
6637 |
val = Fcopy_sequence (XCAR (Vcoding_system_safe_chars)); |
val = Fcopy_sequence (XCAR (Vcoding_system_safe_chars)); |
6638 |
|
|
6639 |
for (; CONSP (safe_codings); safe_codings = XCDR (safe_codings)) |
for (; CONSP (safe_codings); safe_codings = XCDR (safe_codings)) |
6640 |
val = Fcons (XCAR (XCAR (safe_codings)), val); |
val = Fcons (XCAR (XCAR (safe_codings)), val); |
6641 |
safe_codings = val; |
safe_codings = val; |