77 *
88 *
99 * IDENTIFICATION
10- * $Header: /cvsroot/pgsql/src/backend/utils/adt/geo_ops.c,v 1.33 1998/06 /1519:29:34 momjian Exp $
10+ * $Header: /cvsroot/pgsql/src/backend/utils/adt/geo_ops.c,v 1.34 1998/08 /1506:45:10 thomas Exp $
1111 *
1212 *-------------------------------------------------------------------------
1313 */
@@ -768,6 +768,7 @@ box_diagonal(BOX *box)
768768 **
769769 ***********************************************************************/
770770
771+ #define LINEDEBUG
771772LINE *
772773line_in (char * str )
773774{
@@ -801,6 +802,7 @@ char *
801802line_out (LINE * line )
802803{
803804char * result ;
805+ LSEG lseg ;
804806
805807if (!PointerIsValid (line ))
806808return (NULL );
@@ -2340,7 +2342,7 @@ close_pl(Point *pt, LINE *line)
23402342 *
23412343 * Some tricky code here, relying on boolean expressions
23422344 *evaluating to only zero or one to use as an array index.
2343- * bug fixes by gthaker@atl.lmco.com; May 1,98
2345+ * bug fixes by gthaker@atl.lmco.com; May 1,1998
23442346 */
23452347Point *
23462348close_ps (Point * pt ,LSEG * lseg )
@@ -2351,9 +2353,10 @@ close_ps(Point *pt, LSEG *lseg)
23512353int xh ,
23522354yh ;
23532355
2354-
2355- /* fprintf(stderr,"close_sp:pt->x %f pt->y %f\nlseg(0).x %f lseg(0).y %f lseg(1).x %f lseg(1).y %f\n", */
2356- /* pt->x, pt->y, lseg->p[0].x, lseg->p[0].y, lseg->p[1].x, lseg->p[1].y); */
2356+ #ifdef GEODEBUG
2357+ printf ("close_sp:pt->x %f pt->y %f\nlseg(0).x %f lseg(0).y %f lseg(1).x %f lseg(1).y %f\n" ,
2358+ pt -> x ,pt -> y ,lseg -> p [0 ].x ,lseg -> p [0 ].y ,lseg -> p [1 ].x ,lseg -> p [1 ].y );
2359+ #endif
23572360
23582361result = NULL ;
23592362xh = lseg -> p [0 ].x < lseg -> p [1 ].x ;
@@ -2411,7 +2414,6 @@ close_ps(Point *pt, LSEG *lseg)
24112414if (pt -> y < (tmp -> A * pt -> x + tmp -> C )) {/* we are below the lower edge */
24122415result = point_copy (& lseg -> p [!yh ]);/* below the lseg, take lower end pt */
24132416/* fprintf(stderr,"below: tmp A %f B %f C %f m %f\n",tmp->A,tmp->B,tmp->C, tmp->m); */
2414-
24152417return result ;
24162418}
24172419tmp = line_construct_pm (& lseg -> p [yh ],invm );/* upper edge of the "band" */
@@ -2430,6 +2432,7 @@ close_ps(Point *pt, LSEG *lseg)
24302432return (result );
24312433}/* close_ps() */
24322434
2435+
24332436/* close_lseg()
24342437 * Closest point to l1 on l2.
24352438 */
