Mercurial > emacs
diff src/lread.c @ 40784:d57f74c55909
(read1): Fix behavior with nested backquoting.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Tue, 06 Nov 2001 18:48:03 +0000 |
| parents | ba7239b8872e |
| children | 816ced6caae8 |
line wrap: on
line diff
--- a/src/lread.c Tue Nov 06 17:14:53 2001 +0000 +++ b/src/lread.c Tue Nov 06 18:48:03 2001 +0000 @@ -2112,9 +2112,9 @@ { Lisp_Object value; - new_backquote_flag = 1; + new_backquote_flag++; value = read0 (readcharfun); - new_backquote_flag = 0; + new_backquote_flag--; return Fcons (Qbackquote, Fcons (value, Qnil)); } @@ -2136,9 +2136,9 @@ comma_type = Qcomma; } - new_backquote_flag = 0; + new_backquote_flag--; value = read0 (readcharfun); - new_backquote_flag = 1; + new_backquote_flag++; return Fcons (comma_type, Fcons (value, Qnil)); } else