200 |
|
char *name |
201 |
|
) |
202 |
|
{ |
203 |
< |
EPNODE *dp; |
203 |
> |
EPNODE *dp = dlookup(name); |
204 |
|
|
205 |
< |
if ((dp = dlookup(name)) == NULL || dp->v.kid->type != SYM) |
205 |
> |
if (dp == NULL || dp->v.kid->type != SYM) |
206 |
|
return(0); |
207 |
+ |
|
208 |
|
return(dp->type); |
209 |
|
} |
210 |
|
|
211 |
|
|
212 |
|
char * |
213 |
< |
setcontext( /* set a new context path */ |
213 |
> |
calcontext( /* set a new context path */ |
214 |
|
char *ctx |
215 |
|
) |
216 |
|
{ |
251 |
|
int n; |
252 |
|
|
253 |
|
strcpy(oldcontext, context); /* save old context */ |
254 |
< |
setcontext(ctx); /* set new context */ |
254 |
> |
calcontext(ctx); /* set new context */ |
255 |
|
n = strlen(context); /* tack on old */ |
256 |
|
if (n+strlen(oldcontext) > MAXCNTX) { |
257 |
|
strncpy(context+n, oldcontext, MAXCNTX-n); |