Allow a comma between specifications on PRINT.

[pspp-builds.git] / src / language / data-io / print.c

diff --git a/src/language/data-io/print.c b/src/language/data-io/print.c
index f6ba6e9096afd2373508877d73af314d8e09cd3f..64e1e13f63016366011dd3be89c28f5b535777e2 100644 (file)
--- a/src/language/data-io/print.c
+++ b/src/language/data-io/print.c
@@ -240,6 +240,8 @@ parse_specs (struct pool *tmp_pool, struct print_trns *trns,
                                       which_formats);
       if (!ok)
        return 0;
+
+      lex_match (',');
     }
 
   if (trns->record_cnt != 0 && trns->record_cnt != record)