PRINT: Improve error messages.

[pspp] / src / language / expressions / evaluate.c

diff --git a/src/language/expressions/evaluate.c b/src/language/expressions/evaluate.c
index 18e794f271701728b0720d38249b69a360f410ca..edc1b4e7ae838a760f2d60125e18f48fcfd52d0c 100644 (file)
--- a/src/language/expressions/evaluate.c
+++ b/src/language/expressions/evaluate.c
@@ -231,7 +231,7 @@ cmd_debug_evaluate (struct lexer *lexer, struct dataset *dsother UNUSED)
             goto done;
           char *error = fmt_check_output__ (&format);
           if (!error)
-            error = fmt_check_type_compat__ (&format, VAL_NUMERIC);
+            error = fmt_check_type_compat__ (&format, NULL, VAL_NUMERIC);
           if (error)
             {
               lex_next_error (lexer, -1, -1, "%s", error);