| 1 |
< |
/* Copyright (c) 1993 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"; |
| 114 |
|
char *oct1name; /* name of post-mkillum octree */ |
| 115 |
|
time_t oct1date; /* date of post-mkillum octree (>= matdate) */ |
| 116 |
|
|
| 117 |
+ |
int nowarn = 0; /* no warnings */ |
| 118 |
|
int explicate = 0; /* explicate variables */ |
| 119 |
|
int silent = 0; /* do work silently */ |
| 120 |
|
int noaction = 0; /* don't do anything */ |
| 159 |
|
case 'v': |
| 160 |
|
viewselect = argv[++i]; |
| 161 |
|
break; |
| 162 |
+ |
case 'w': |
| 163 |
+ |
nowarn++; |
| 164 |
+ |
break; |
| 165 |
|
default: |
| 166 |
|
goto userr; |
| 167 |
|
} |
| 277 |
|
for (n = strlen(ass); n > 0; n--) |
| 278 |
|
if (!isspace(ass[n-1])) |
| 279 |
|
break; |
| 280 |
< |
if (!n) { |
| 280 |
> |
if (!n && !nowarn) { |
| 281 |
|
fprintf(stderr, "%s: warning - missing value for variable '%s'\n", |
| 282 |
|
progname, varname); |
| 283 |
|
return; |
| 363 |
|
{ |
| 364 |
|
if (vp->nass < 2) |
| 365 |
|
return; |
| 366 |
< |
fprintf(stderr, "%s: warning - multiple assignment of variable '%s'\n", |
| 366 |
> |
if (!nowarn) |
| 367 |
> |
fprintf(stderr, |
| 368 |
> |
"%s: warning - multiple assignment of variable '%s'\n", |
| 369 |
|
progname, vp->name); |
| 370 |
|
do |
| 371 |
|
vp->value += strlen(vp->value)+1; |