From: Sandro Santilli Date: Tue, 5 Oct 2004 21:42:22 +0000 (+0000) Subject: Cleanups for older compilers and PG verisons. X-Git-Tag: pgis_1_0_0RC1~338 X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=cf5f06a1d032bcd1d86e8e0f5d1bc9b53688f8b0;p=postgis Cleanups for older compilers and PG verisons. git-svn-id: http://svn.osgeo.org/postgis/trunk@934 b70326c6-7e19-0410-871a-916f4a2858ee --- diff --git a/lwgeom/lwgeom_debug.c b/lwgeom/lwgeom_debug.c index 1ab7fff7b..071eb7cca 100644 --- a/lwgeom/lwgeom_debug.c +++ b/lwgeom/lwgeom_debug.c @@ -47,11 +47,13 @@ char * lwpoint_summary(LWPOINT *point, int offset) { char *result; - result = lwalloc(128+offset); char pad[offset+1]; + memset(pad, ' ', offset); pad[offset] = '\0'; + result = lwalloc(128+offset); + sprintf(result, "%s%s[%s]\n", pad, lwgeom_typename(TYPE_GETTYPE(point->type)), lwgeom_typeflags(point->type)); @@ -62,11 +64,13 @@ char * lwline_summary(LWLINE *line, int offset) { char *result; - result = lwalloc(128+offset); char pad[offset+1]; + memset(pad, ' ', offset); pad[offset] = '\0'; + result = lwalloc(128+offset); + sprintf(result, "%s%s[%s] with %d points\n", pad, lwgeom_typename(TYPE_GETTYPE(line->type)), lwgeom_typeflags(line->type), diff --git a/lwgeom/lwgeom_ogc.c b/lwgeom/lwgeom_ogc.c index cf59b0935..0980c781b 100644 --- a/lwgeom/lwgeom_ogc.c +++ b/lwgeom/lwgeom_ogc.c @@ -710,7 +710,11 @@ Datum LWGEOM_from_text(PG_FUNCTION_ARGS) PG_LWGEOM *result = NULL; // read user-requested SRID if any +#if USE_VERSION < 73 + if ( fcinfo->nargs > 1 ) +#else if ( PG_NARGS() > 1 ) +#endif { SRID = PG_GETARG_INT32(1); if ( SRID != lwgeom_getSRID(geom) ) @@ -730,15 +734,14 @@ Datum LWGEOM_asText(PG_FUNCTION_ARGS) char *lwgeom; char *result_cstring; int len; + char *result,*loc_wkt; + char *semicolonLoc; init_pg_func(); lwgeom = (char *) PG_DETOAST_DATUM(PG_GETARG_DATUM(0)); result_cstring = unparse_WKT(lwgeom,lwalloc,lwfree); - char *result,*loc_wkt; - char *semicolonLoc; - semicolonLoc = strchr(result_cstring,';'); //loc points to start of wkt diff --git a/lwgeom/lwgeom_spheroid.c b/lwgeom/lwgeom_spheroid.c index 470518d8d..026511fa4 100644 --- a/lwgeom/lwgeom_spheroid.c +++ b/lwgeom/lwgeom_spheroid.c @@ -293,10 +293,12 @@ double lwgeom_pointarray_length_ellipse(POINTARRAY *pts, SPHEROID *sphere) { POINT3DZ frm; POINT3DZ to; + double distellips; + getPoint3dz_p(pts, i, &frm); getPoint3dz_p(pts, i+1, &to); - double distellips = distance_ellipse( + distellips = distance_ellipse( frm.y*M_PI/180.0, frm.x*M_PI/180.0, to.y*M_PI/180.0, to.x*M_PI/180.0, sphere); dist += sqrt(distellips*distellips + (frm.z*frm.z));