7
7
*
8
8
*
9
9
* IDENTIFICATION
10
- * $Header: /cvsroot/pgsql/src/backend/utils/adt/Attic/geo-ops.c,v 1.1.1.1 1996/07/09 06:22:04 scrappy Exp $
10
+ * $Header: /cvsroot/pgsql/src/backend/utils/adt/Attic/geo-ops.c,v 1.2 1996/07/22 21:56:01 scrappy Exp $
11
11
*
12
12
*-------------------------------------------------------------------------
13
13
*/
@@ -717,8 +717,8 @@ long path_inter(PATH *p1, PATH *p2)
717
717
int i ,j ;
718
718
LSEG seg1 ,seg2 ;
719
719
720
- b1 .xh = b1 .yh = b2 .xh = b2 .yh = DBL_MAX ;
721
- b1 .xl = b1 .yl = b2 .xl = b2 .yl = - DBL_MAX ;
720
+ b1 .xh = b1 .yh = b2 .xh = b2 .yh = ( double ) DBL_MAX ;
721
+ b1 .xl = b1 .yl = b2 .xl = b2 .yl = - ( double ) DBL_MAX ;
722
722
for (i = 0 ;i < p1 -> npts ;++ i ) {
723
723
b1 .xh = Max (p1 -> p [i ].x ,b1 .xh );
724
724
b1 .yh = Max (p1 -> p [i ].y ,b1 .yh );
@@ -955,7 +955,7 @@ double *point_slope(Point *pt1, Point *pt2)
955
955
956
956
result = PALLOCTYPE (double );
957
957
if (point_vert (pt1 ,pt2 ))
958
- * result = DBL_MAX ;
958
+ * result = ( double ) DBL_MAX ;
959
959
else
960
960
* result = (pt1 -> y - pt2 -> y ) / (pt1 -> x - pt1 -> x );
961
961
return (result );
@@ -965,7 +965,7 @@ double *point_slope(Point *pt1, Point *pt2)
965
965
double point_sl (Point * pt1 ,Point * pt2 )
966
966
{
967
967
return (point_vert (pt1 ,pt2 )
968
- ?DBL_MAX
968
+ ?( double ) DBL_MAX
969
969
: (pt1 -> y - pt2 -> y ) / (pt1 -> x - pt2 -> x ) );
970
970
}
971
971
@@ -1124,7 +1124,7 @@ double *lseg_distance(LSEG *l1, LSEG *l2)
1124
1124
* result = 0.0 ;
1125
1125
return (result );
1126
1126
}
1127
- * result = DBL_MAX ;
1127
+ * result = ( double ) DBL_MAX ;
1128
1128
d = dist_ps (& l1 -> p [0 ],l2 );
1129
1129
* result = Min (* result ,* d );
1130
1130
PFREE (d );
@@ -1148,7 +1148,7 @@ double lseg_dt(LSEG *l1, LSEG *l2)
1148
1148
1149
1149
if (lseg_intersect (l1 ,l2 ))
1150
1150
return (0.0 );
1151
- result = DBL_MAX ;
1151
+ result = ( double ) DBL_MAX ;
1152
1152
d = dist_ps (& l1 -> p [0 ],l2 );
1153
1153
result = Min (result ,* d );
1154
1154
PFREE (d );
@@ -1231,7 +1231,7 @@ double *dist_ps(Point *pt, LSEG *lseg)
1231
1231
if (lseg -> p [1 ].x == lseg -> p [0 ].x )
1232
1232
m = 0 ;
1233
1233
else if (lseg -> p [1 ].y == lseg -> p [0 ].y )/* slope is infinite */
1234
- m = DBL_MAX ;
1234
+ m = ( double ) DBL_MAX ;
1235
1235
else m = (-1 )* (lseg -> p [1 ].y - lseg -> p [0 ].y ) /
1236
1236
(lseg -> p [1 ].x - lseg -> p [0 ].x );
1237
1237
ln = line_construct_pm (pt ,m );
@@ -1512,8 +1512,8 @@ long on_pl(Point *pt, LINE *line)
1512
1512
*/
1513
1513
long on_ps (Point * pt ,LSEG * lseg )
1514
1514
{
1515
- return (point_dt (pt ,& lseg -> p [0 ])+ point_dt (pt ,& lseg -> p [1 ])
1516
- == point_dt (& lseg -> p [0 ],& lseg -> p [1 ]) );
1515
+ return (FPeq ( point_dt (pt ,& lseg -> p [0 ])+ point_dt (pt ,& lseg -> p [1 ]),
1516
+ point_dt (& lseg -> p [0 ],& lseg -> p [1 ]) ) );
1517
1517
}
1518
1518
1519
1519
long on_pb (Point * pt ,BOX * box )