Fixed bug #11227 (T-Test not working with alpha independent variable )

[pspp-builds.git] / src / cartesian.c

diff --git a/src/cartesian.c b/src/cartesian.c
index a2396abcf765da48037458e03e14c3f5ed2c7f70..cac18400a4e9e85c6b1dc78bc795b3323b76dd4c 100644 (file)
--- a/src/cartesian.c
+++ b/src/cartesian.c
@@ -27,7 +27,7 @@
 struct dataset
 {
   int n_data;
-  char *label;
+  const char *label;
 };
 
 
@@ -63,44 +63,6 @@ chart_write_xlabel(struct chart *ch, const char *label)
 
 }
 
-/* Set the scale for the abscissa */
-void 
-chart_write_xscale(struct chart *ch, double min, double max, double tick)
-{
-  double x;
-
-  ch->x_max = ceil( max / tick ) * tick ; 
-  ch->x_min = floor ( min / tick ) * tick ;
-
-  ch->abscissa_scale = fabs(ch->data_right - ch->data_left) / 
-    fabs(ch->x_max - ch->x_min);
-
-  for(x = ch->x_min ; x <= ch->x_max; x += tick )
-      draw_tick (ch, TICK_ABSCISSA, (x - ch->x_min) * ch->abscissa_scale, "%g", x);
-
-}
-
-
-/* Set the scale for the ordinate */
-void 
-chart_write_yscale(struct chart *ch, double min, double max, double tick)
-{
-  double y;
-
-  ch->y_max = ceil( max / tick ) * tick ; 
-  ch->y_min = floor ( min / tick ) * tick ;
-
-  ch->ordinate_scale = 
-    fabs(ch->data_top -  ch->data_bottom) / fabs(ch->y_max - ch->y_min) ;
-
-  for(y = ch->y_min ; y <= ch->y_max; y += tick )
-    {
-    draw_tick (ch, TICK_ORDINATE, 
-              (y - ch->y_min) * ch->ordinate_scale, "%g", y);
-    }
-
-}
-
 
 
 /* Write the ordinate label */
@@ -160,7 +122,7 @@ write_legend(struct chart *chart, const char *heading,
 
 /* Plot a data point */
 void
-chart_datum(struct chart *ch, int dataset, double x, double y)
+chart_datum(struct chart *ch, int dataset UNUSED, double x, double y)
 {
   const double x_pos = 
     (x - ch->x_min) * ch->abscissa_scale + ch->data_left ;