145 |
|
static char * |
146 |
|
ogetstr(char *s) /* get null-terminated string */ |
147 |
|
{ |
148 |
– |
extern char *getstr(); |
149 |
– |
|
148 |
|
if (getstr(s, infp) == NULL) |
149 |
|
octerror(USER, "truncated octree"); |
150 |
|
return(s); |
155 |
|
getfullnode() /* get a set, return fullnode */ |
156 |
|
{ |
157 |
|
OBJECT set[MAXSET+1]; |
158 |
< |
register int i; |
159 |
< |
register long m; |
158 |
> |
int i; |
159 |
> |
long m; |
160 |
|
|
161 |
|
if ((set[0] = ogetint(objsize)) > MAXSET) |
162 |
|
octerror(USER, "bad set in getfullnode"); |
172 |
|
static long |
173 |
|
ogetint(int siz) /* get a siz-byte integer */ |
174 |
|
{ |
175 |
< |
extern long getint(); |
178 |
< |
register long r; |
175 |
> |
long r; |
176 |
|
|
177 |
|
r = getint(siz, infp); |
178 |
|
if (feof(infp)) |
184 |
|
static double |
185 |
|
ogetflt() /* get a floating point number */ |
186 |
|
{ |
190 |
– |
extern double getflt(); |
187 |
|
double r; |
188 |
|
|
189 |
|
r = getflt(infp); |
196 |
|
static OCTREE |
197 |
|
gettree() /* get a pre-ordered octree */ |
198 |
|
{ |
199 |
< |
register OCTREE ot; |
200 |
< |
register int i; |
199 |
> |
OCTREE ot; |
200 |
> |
int i; |
201 |
|
|
202 |
|
switch (getc(infp)) { |
203 |
|
case OT_EMPTY: |
223 |
|
nonsurfintree(OCTREE ot) /* check tree for modifiers */ |
224 |
|
{ |
225 |
|
OBJECT set[MAXSET+1]; |
226 |
< |
register int i; |
226 |
> |
int i; |
227 |
|
|
228 |
|
if (isempty(ot)) |
229 |
|
return(0); |
244 |
|
static void |
245 |
|
skiptree(void) /* skip octree on input */ |
246 |
|
{ |
247 |
< |
register int i; |
247 |
> |
int i; |
248 |
|
|
249 |
|
switch (getc(infp)) { |
250 |
|
case OT_EMPTY: |