MATRIX DATA: Allow slash before initial VARIABLES subcommand.

diff --git a/src/language/commands/matrix-data.c b/src/language/commands/matrix-data.c
index a1c23078854dc8af15d40d9550b783daf4dd421c..8c8c45bc886ea61fa86b794bfa3e390489aef8b4 100644 (file)
--- a/src/language/commands/matrix-data.c
+++ b/src/language/commands/matrix-data.c
@@ -829,6 +829,7 @@ parse_data_without_rowtype (const struct matrix_format *mf,
 static struct dictionary *
 parse_matrix_data_variables (struct lexer *lexer)
 {
+  lex_match (lexer, T_SLASH);
   if (!lex_force_match_id (lexer, "VARIABLES"))
     return NULL;
   lex_match (lexer, T_EQUALS);

diff --git a/tests/language/commands/matrix-data.at b/tests/language/commands/matrix-data.at
index 8159d149c77e1d2328aa558290a915d5ef41589c..1e8e3f84bfd7b7d03c4576aecfd5aece0bec6cd4 100644 (file)
--- a/tests/language/commands/matrix-data.at
+++ b/tests/language/commands/matrix-data.at
@@ -20,7 +20,7 @@ dnl Keep this test in sync with Example 1 in doc/matrices.texi.
 AT_SETUP([MATRIX DATA - LOWER DIAGONAL with ROWTYPE_])
 AT_DATA([matrix-data.sps], [dnl
 MATRIX DATA
-    VARIABLES=ROWTYPE_ var01 TO var08
+    /VARIABLES=ROWTYPE_ var01 TO var08
     /FILE='matrix-data.txt'.
 FORMATS var01 TO var08(F5.2).
 LIST.