Merge remote-tracking branch 'origin/master' into sheet

[pspp] / src / language / data-io / list.c

diff --git a/src/language/data-io/list.c b/src/language/data-io/list.c
index e9e0e326c2234b5f823e1d0fc7fa29dac894bd42..55ccc4d2da3e15b843ab1acd4c0aca0232599100 100644 (file)
--- a/src/language/data-io/list.c
+++ b/src/language/data-io/list.c
@@ -85,7 +85,7 @@ list_execute (const struct lst_cmd *lcmd, struct dataset *ds)
   while (casegrouper_get_next_group (grouper, &group))
     {
       struct ccase *ccase;
-      struct table *t;
+      struct table *t = NULL;
 
       ccase = casereader_peek (group, 0);
       if (ccase != NULL)
@@ -128,7 +128,8 @@ list_execute (const struct lst_cmd *lcmd, struct dataset *ds)
 
       casereader_destroy (group);
 
-      table_item_submit (table_item_create (t, "Data List", NULL));
+      if (t)
+       table_item_submit (table_item_create (t, "Data List", NULL));
     }
   ok = casegrouper_destroy (grouper);
   ok = proc_commit (ds) && ok;
@@ -213,7 +214,7 @@ cmd_list (struct lexer *lexer, struct dataset *ds)
           return CMD_FAILURE;
         }
     }
-        
+
 
   /* Verify arguments. */
   if (cmd.first > cmd.last)