TITLE and SUBTITLE: Don't treat an unquoted argument as a quoted string.

[pspp] / tests / language / utilities / title.at

diff --git a/tests/language/utilities/title.at b/tests/language/utilities/title.at
index 822b5c509198c0ebaf8fa1fb14f14ebf0ce51e5a..61be72222c7d01a515d7e5ca5c6286b71063f547 100644 (file)
--- a/tests/language/utilities/title.at
+++ b/tests/language/utilities/title.at
@@ -127,3 +127,21 @@ Table: File Label
 Label,This is a test file label
 ])
 AT_CLEANUP
+
+AT_SETUP([TITLE and SUBTITLE])
+for command in TITLE SUBTITLE; do
+    cat >title.sps <<EOF
+$command foo  bar.
+SHOW $command.
+
+$command 'foo bar baz quux'.
+SHOW $command.
+EOF
+    cat >expout <<EOF
+title.sps:2: note: SHOW: $command is foo  bar.
+
+title.sps:5: note: SHOW: $command is foo bar baz quux.
+EOF
+    AT_CHECK([pspp -O format=csv title.sps], [0], [expout])
+done
+AT_CLEANUP