Improve hash.c comments, error-checking.

[pspp-builds.git] / src / frequencies.q

diff --git a/src/frequencies.q b/src/frequencies.q
index acfeed86d3c65e2327e2b364def9b0778df614d9..983f35daa08c8bd3172312101b4867e2070c1fab 100644 (file)
--- a/src/frequencies.q
+++ b/src/frequencies.q
@@ -14,8 +14,8 @@
 
    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
-   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
-   02111-1307, USA. */
+   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+   02110-1301, USA. */
 
 /*
   TODO:
@@ -627,6 +627,7 @@ postcalc (void *aux UNUSED)
        dump_statistics (v, !dumped_freq_tab);
 
 
+
       if ( chart == GFT_HIST) 
        {
          double d[frq_n_stats];
@@ -654,6 +655,7 @@ postcalc (void *aux UNUSED)
        }
 
 
+
       cleanup_freq_tab (v);
 
     }
@@ -700,7 +702,7 @@ postprocess_freq_tab (struct variable *v)
   hsh_compare_func *compare;
   struct freq_tab *ft;
   size_t count;
-  void **data;
+  void *const *data;
   struct freq *freqs, *f;
   size_t i;
 
@@ -866,7 +868,7 @@ frq_custom_grouped (struct cmd_frequencies *cmd UNUSED)
          {
            nl = ml = 0;
            dl = NULL;
-           while (token == T_NUM)
+           while (lex_integer ())
              {
                if (nl >= ml)
                  {
@@ -1612,6 +1614,7 @@ freq_tab_to_slice_array(const struct freq_tab *frq_tab,
 
 
 
+
 static void
 do_piechart(const struct variable *var, const struct freq_tab *frq_tab)
 {
@@ -1625,6 +1628,7 @@ do_piechart(const struct variable *var, const struct freq_tab *frq_tab)
   free(slices);
 }
 
+
 /* 
    Local Variables:
    mode: c