Allow a comma between specifications on PRINT.

diff --git a/src/language/data-io/ChangeLog b/src/language/data-io/ChangeLog
index d0eff5706e7affdb64b7e454e6a53cc9ca544b52..3f0b362280f094aa40ca2c4d77287158773ad518 100644 (file)
--- a/src/language/data-io/ChangeLog
+++ b/src/language/data-io/ChangeLog
@@ -1,3 +1,7 @@
+Mon Jul 31 10:32:31 2006  Ben Pfaff  <blp@gnu.org>
+
+       * print.c (parse_specs): Allow a comma between specifications.
+
 Sun Jul 16 19:57:10 2006  Ben Pfaff  <blp@gnu.org>
 
        * automake.mk: (src_language_data_io_libdata_io_a_SOURCE) Add

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)