88 |
|
/* get modifier */ |
89 |
|
strcpy(sbuf, "EOF"); |
90 |
|
fgetword(sbuf, MAXSTR, fp); |
91 |
+ |
if (strchr(sbuf, '\t')) { |
92 |
+ |
sprintf(errmsg, "(%s): illegal tab in modifier \"%s\"", |
93 |
+ |
name, sbuf); |
94 |
+ |
error(USER, errmsg); |
95 |
+ |
} |
96 |
|
if (!strcmp(sbuf, VOIDID)) |
97 |
|
objp->omod = OVOID; |
98 |
|
else if (!strcmp(sbuf, ALIASMOD)) |
111 |
|
/* get identifier */ |
112 |
|
sbuf[0] = '\0'; |
113 |
|
fgetword(sbuf, MAXSTR, fp); |
114 |
+ |
if (strchr(sbuf, '\t')) { |
115 |
+ |
sprintf(errmsg, "(%s): illegal tab in identifier \"%s\"", |
116 |
+ |
name, sbuf); |
117 |
+ |
error(USER, errmsg); |
118 |
+ |
} |
119 |
|
objp->oname = savqstr(sbuf); |
120 |
|
/* get arguments */ |
121 |
|
if (objp->otype == MOD_ALIAS) { |