cleanup

git-svn-id: https://svn.r-project.org/R/trunk@87879 00db46b3-68df-0310-9c12-caf00c1e9a41

Author: ripley

src/main/xspline.c

@@ -47,7 +47,7 @@ static double *ypoints;
 /************* Code begins here *************/
 
 /* R_allocs or mallocs global arrays */
-static Rboolean
+static void // alawys returned true
 add_point(double x, double y, pGEDevDesc dd)
 {
     if (npoints >= max_points) {
@@ -79,14 +79,14 @@ add_point(double x, double y, pGEDevDesc dd)
     }
     /* ignore identical points */
     if (npoints > 0 && xpoints[npoints-1] == x && ypoints[npoints-1] == y)
-	return TRUE;
+	return;
     /*
      * Convert back from 1200ppi to DEVICE coordinates
      */
     xpoints[npoints] = toDeviceX(x / 1200, GE_INCHES, dd);
     ypoints[npoints] = toDeviceY(y / 1200, GE_INCHES, dd);
     npoints = npoints + 1;
-    return TRUE;
+    return;
 }
 
 /*
@@ -451,9 +451,10 @@ spline_last_segment_computing(double step, int k,
       step = step_computing(K, PX, PY, S1, S2, PREC, dd);    \
       spline_segment_computing(step, K, PX, PY, S1, S2, dd)
 
-static Rboolean
+
+static void // always returned true., return value ignored in engine.c
 compute_open_spline(int n, double *x, double *y, double *s,
-		    Rboolean repEnds,
+		    bool repEnds,
 		    double precision,
 		    pGEDevDesc dd)
 {
@@ -511,10 +512,10 @@ compute_open_spline(int n, double *x, double *y, double *s,
       spline_last_segment_computing(step, n - 4, px, py, ps[1], ps[2], dd);
   }
 
-  return TRUE;
+  return;
 }
 
-static Rboolean
+static void // always returned true, return value ignored in engine.c
 compute_closed_spline(int n, double *x, double *y, double *s,
 		      double precision,
 		      pGEDevDesc dd)
@@ -540,5 +541,5 @@ compute_closed_spline(int n, double *x, double *y, double *s,
       NEXT_CONTROL_POINTS(k, n);
   }
 
-  return TRUE;
+  return;
 }