Cite tokens when reporting invalid identifiers.

[pspp] / src / language / data-io / inpt-pgm.c

diff --git a/src/language/data-io/inpt-pgm.c b/src/language/data-io/inpt-pgm.c
index b9e2c326feb86374b6e17f7afc70568b38d61e63..46ee3567f027b5341d5e3c8b103516de16b9db70 100644 (file)
--- a/src/language/data-io/inpt-pgm.c
+++ b/src/language/data-io/inpt-pgm.c
@@ -294,7 +294,7 @@ cmd_reread (struct lexer *lexer, struct dataset *ds)
 
          if (e)
            {
-              lex_sbc_only_once ("COLUMN");
+              lex_sbc_only_once (lexer, "COLUMN");
               goto error;
            }