| 70 |
|
|
| 71 |
|
|
| 72 |
|
MESH * |
| 73 |
< |
getmesh(mname, flags) /* get mesh data */ |
| 73 |
> |
getmesh(mname, flags) /* get new mesh data reference */ |
| 74 |
|
char *mname; |
| 75 |
|
int flags; |
| 76 |
|
{ |
| 80 |
|
flags &= IO_LEGAL; |
| 81 |
|
for (ms = mlist; ms != NULL; ms = ms->next) |
| 82 |
|
if (!strcmp(mname, ms->name)) { |
| 83 |
< |
if ((ms->ldflags & flags) == flags) { |
| 84 |
< |
ms->nref++; |
| 85 |
< |
return(ms); /* loaded */ |
| 86 |
< |
} |
| 87 |
< |
break; /* load the rest */ |
| 83 |
> |
ms->nref++; /* increase reference count */ |
| 84 |
> |
break; |
| 85 |
|
} |
| 86 |
< |
if (ms == NULL) { |
| 86 |
> |
if (ms == NULL) { /* load first time */ |
| 87 |
|
ms = (MESH *)calloc(1, sizeof(MESH)); |
| 88 |
|
if (ms == NULL) |
| 89 |
|
error(SYSTEM, "out of memory in getmesh"); |
| 127 |
|
ins->msh = NULL; |
| 128 |
|
o->os = (char *)ins; |
| 129 |
|
} |
| 130 |
< |
if (ins->msh == NULL || (ins->msh->ldflags & flags) != flags) |
| 130 |
> |
if (ins->msh == NULL) |
| 131 |
|
ins->msh = getmesh(o->oargs.sarg[0], flags); |
| 132 |
+ |
else if ((flags &= ~ins->msh->ldflags)) |
| 133 |
+ |
readmesh(ins->msh, |
| 134 |
+ |
getpath(o->oargs.sarg[0], getrlibpath(), R_OK), |
| 135 |
+ |
flags); |
| 136 |
|
return(ins); |
| 137 |
|
} |
| 138 |
|
|