MACRO_ID "!macro1"
LPAREN
RPAREN
+STRING ""
SKIP
STRING "var1 var2 var3"
SKIP
PSPP_CHECK_SCAN([-i])
AT_CLEANUP
\f
+AT_SETUP([DEFINE command - no newline after parentheses])
+AT_KEYWORDS([scan])
+AT_DATA([input], [dnl
+define !macro1() var1 var2 var3
+!enddefine.
+])
+AT_DATA([expout-base], [dnl
+ID "define"
+SKIP
+MACRO_ID "!macro1"
+LPAREN
+RPAREN
+STRING " var1 var2 var3"
+SKIP
+MACRO_ID "!enddefine"
+ENDCMD
+-SKIP
+STOP
+])
+PSPP_CHECK_SCAN([-i])
+AT_CLEANUP
+\f
+AT_SETUP([DEFINE command - no newline before !ENDDEFINE])
+AT_KEYWORDS([scan ENDDEFINE])
+AT_DATA([input], [dnl
+define !macro1()
+var1 var2 var3!enddefine.
+])
+AT_DATA([expout-base], [dnl
+ID "define"
+SKIP
+MACRO_ID "!macro1"
+LPAREN
+RPAREN
+STRING ""
+SKIP
+STRING "var1 var2 var3"
+MACRO_ID "!enddefine"
+ENDCMD
+-SKIP
+STOP
+])
+PSPP_CHECK_SCAN([-i])
+AT_CLEANUP
+\f
+AT_SETUP([DEFINE command - all on one line])
+AT_KEYWORDS([scan])
+AT_DATA([input], [dnl
+define !macro1()var1 var2 var3!enddefine.
+])
+AT_DATA([expout-base], [dnl
+ID "define"
+SKIP
+MACRO_ID "!macro1"
+LPAREN
+RPAREN
+STRING "var1 var2 var3"
+MACRO_ID "!enddefine"
+ENDCMD
+-SKIP
+STOP
+])
+PSPP_CHECK_SCAN([-i])
+AT_CLEANUP
+\f
AT_SETUP([DEFINE command - empty])
AT_KEYWORDS([scan])
AT_DATA([input], [dnl
MACRO_ID "!macro1"
LPAREN
RPAREN
+STRING ""
SKIP
MACRO_ID "!enddefine"
ENDCMD
LPAREN
RPAREN
RPAREN
+STRING ""
SKIP
MACRO_ID "!enddefine"
ENDCMD
RPAREN
SKIP
RPAREN
+STRING ""
SKIP
MACRO_ID "!enddefine"
ENDCMD
ID "z"
SKIP
RPAREN
+STRING ""
SKIP
STRING "content 1"
SKIP
MACRO_ID "!macro1"
LPAREN
RPAREN
+STRING ""
SKIP
STRING "content line 1"
SKIP