Properly escape marked up text in dictionary views

[pspp-builds.git] / src / data / datasheet.c

diff --git a/src/data/datasheet.c b/src/data/datasheet.c
index 4115cf02dd1935a4562376c78bc75f1d977700fc..da85d963c17dfb166ff93ab1e7882f1ee8105d42 100644 (file)
--- a/src/data/datasheet.c
+++ b/src/data/datasheet.c
@@ -1339,6 +1339,8 @@ check_datasheet_casereader (struct mc *mc, struct casereader *reader,
                         "%g != %g",
                         row, col, row_cnt, column_cnt,
                         case_num_idx (&c, col), array[row][col]);
+
+         case_destroy (&c);
         }
 
       if (casereader_read (reader, &c))
@@ -1374,8 +1376,8 @@ check_datasheet (struct mc *mc, struct datasheet *ds,
     mc_error (mc, "row count (%lu) does not match expected (%zu)",
               (unsigned long int) datasheet_get_row_cnt (ds), row_cnt);
   else if (column_cnt != datasheet_get_column_cnt (ds))
-    mc_error (mc, "column count (%lu) does not match expected (%zu)",
-              (unsigned long int) datasheet_get_column_cnt (ds), column_cnt);
+    mc_error (mc, "column count (%zu) does not match expected (%zu)",
+              datasheet_get_column_cnt (ds), column_cnt);
   else
     {
       size_t row, col;