godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

minor bug fix

Browse Source
This commit is contained in:
ceriel 1987-04-03 20:13:08 +00:00
parent 21fd5d26c2
commit 3ec89028a1
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
util/cpp/domacro.c
View File

@ -173,7 +173,7 @@ skip_block()
*/ */
id = findidf(tk.tk_str); id = findidf(tk.tk_str);
free(tk.tk_str); free(tk.tk_str);
switch(id->id_resmac) { if (id) switch(id->id_resmac) {
case K_IF: case K_IF:
case K_IFDEF: case K_IFDEF:
case K_IFNDEF: case K_IFNDEF:
@ -298,6 +298,7 @@ do_define()
if ((nformals = getparams(formals, parbuf)) == -1) { if ((nformals = getparams(formals, parbuf)) == -1) {
PushBack(); PushBack();
skipline(); skipline();
free(str);
return; /* an error occurred */ return; /* an error occurred */
} }
LoadChar(ch); LoadChar(ch);
@ -306,10 +307,10 @@ do_define()
ch = skipspaces(ch); /* find first character of the text */ ch = skipspaces(ch); /* find first character of the text */
assert(ch != EOI); assert(ch != EOI);
if (class(ch) == STNL) { if (class(ch) == STNL) {
/* Treat `#define something' as `#define something ""' /* Treat `#define something' as `#define something "1"'
*/ */
repl_text = ""; repl_text = "1";
length = 0; length = 1;
} }
else { else {
PushBack(); PushBack();