More error reporting improvemnts.

[pspp] / tests / language / control / define.at

diff --git a/tests/language/control/define.at b/tests/language/control/define.at
index 92f255fbccc9f0feaaf7e6f21550e34918632564..f1ea2539fb0ee24e0de182a0ada182f384414cbe 100644 (file)
--- a/tests/language/control/define.at
+++ b/tests/language/control/define.at
@@ -527,7 +527,7 @@ PSPP_CHECK_MACRO_EXPANSION([!SUBSTR],
   [DEFINE !s()
 !SUBSTR(banana, 3).
 !SUBSTR(banana, 3, 3).
-!SUBSTR("banana", 3).
+!SUBSTR("banana", 1, 3).
 !SUBSTR(!UNQUOTE("banana"), 3).
 !SUBSTR("banana", 3, 3).
 !SUBSTR(banana, 3, 0).
@@ -538,7 +538,7 @@ PSPP_CHECK_MACRO_EXPANSION([!SUBSTR],
   [error
 nana.
 nan.
-anana.
+.
 nana.
 ana.
 .