85 |
|
{ |
86 |
|
int xflag = xlist[comndx(p->com)]; |
87 |
|
/* 1==expand, 0==pass, -1==discard */ |
88 |
< |
if (xflag != -1) |
88 |
> |
if (xflag != -1) { |
89 |
|
if (xflag == 1) |
90 |
|
switch (p->com) { |
91 |
|
|
126 |
|
segprim(p); |
127 |
|
else |
128 |
|
writep(p, stdout); |
129 |
< |
|
129 |
> |
} |
130 |
|
} |
131 |
|
|
132 |
|
|
247 |
|
if (fname == NULL) |
248 |
|
error(USER, "missing include file name in include"); |
249 |
|
|
250 |
< |
if (code == 2 || (fp = fopen(fname, "r")) == NULL) |
250 |
> |
if (code == 2 || (fp = fopen(fname, "r")) == NULL) { |
251 |
|
if (code != 0) |
252 |
|
fp = mfopen(fname, "r"); |
253 |
|
else { |
254 |
|
sprintf(errmsg, "cannot open user include file \"%s\"", fname); |
255 |
|
error(USER, errmsg); |
256 |
|
} |
257 |
+ |
} |
258 |
|
|
259 |
|
exfile(fp); |
260 |
|
fclose(fp); |