| 1 |
< |
/* Copyright (c) 1992 Regents of the University of California */ |
| 1 |
> |
/* Copyright (c) 1994 Regents of the University of California */ |
| 2 |
|
|
| 3 |
|
#ifndef lint |
| 4 |
|
static char SCCSid[] = "$SunId$ LBL"; |
| 173 |
|
char *name; |
| 174 |
|
register FILE *fin; |
| 175 |
|
{ |
| 176 |
+ |
int nobjs = 0; |
| 177 |
|
register int c; |
| 178 |
|
|
| 179 |
|
while ((c = getc(fin)) != EOF) { |
| 189 |
|
} else if (c == '!') { /* command */ |
| 190 |
|
ungetc(c, fin); |
| 191 |
|
xfcomm(name, fin); |
| 192 |
+ |
nobjs++; |
| 193 |
|
} else { /* object */ |
| 194 |
|
ungetc(c, fin); |
| 195 |
|
xfobject(name, fin); |
| 196 |
+ |
nobjs++; |
| 197 |
|
} |
| 198 |
|
} |
| 199 |
+ |
if (nobjs == 0) |
| 200 |
+ |
fprintf(stderr, "%s: (%s): warning - empty file\n", |
| 201 |
+ |
progname, name); |
| 202 |
|
} |
| 203 |
|
|
| 204 |
|
|