| 1 |
< |
/* Copyright (c) 1986 Regents of the University of California */ |
| 1 |
> |
/* Copyright (c) 1991 Regents of the University of California */ |
| 2 |
|
|
| 3 |
|
#ifndef lint |
| 4 |
|
static char SCCSid[] = "$SunId$ LBL"; |
| 68 |
|
} else { |
| 69 |
|
if (o->oargs.nfargs != 8) |
| 70 |
|
goto argcerr; |
| 71 |
< |
if (co->ca[6] < 0.0 || co->ca[7] < 0.0) |
| 71 |
> |
if (co->ca[6] < -FTINY || co->ca[7] < -FTINY) |
| 72 |
|
goto raderr; |
| 73 |
+ |
if (co->ca[6] < 0.0) co->ca[6] = 0.0; |
| 74 |
+ |
if (co->ca[7] < 0.0) co->ca[7] = 0.0; |
| 75 |
|
if (fabs(co->ca[7] - co->ca[6]) <= FTINY) |
| 76 |
|
goto raderr; |
| 77 |
|
co->r0 = 6; |
| 106 |
|
co->sl = co->al; |
| 107 |
|
} |
| 108 |
|
co->tm = NULL; |
| 109 |
< |
(CONE *)o->os = co; |
| 109 |
> |
o->os = (char *)co; |
| 110 |
|
} |
| 111 |
|
if (getxf && co->tm == NULL) |
| 112 |
|
conexform(co); |