changed UnGetChar() to ChPushBack() in domacro.c

This commit is contained in:
eck
1990-01-05 09:28:54 +00:00
parent 39119e1ada
commit 33b15ed01a
2 changed files with 6 additions and 5 deletions

View File

@@ -347,7 +347,8 @@ do_define()
/* read the replacement text if there is any */
ch = skipspaces(ch,0); /* find first character of the text */
assert(ch != EOI);
UnGetChar();
/* UngetChar() is not right when replacement starts with a '/' */
ChPushBack(ch);
repl_text = get_text((nformals > 0) ? formals : 0, &length);
macro_def(str2idf(str, 0), repl_text, nformals, length, NOFLAG);
LineNumber++;