DISPLAY MACROS: New command.

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

diff --git a/tests/language/commands/define.at b/tests/language/commands/define.at
index fb66b01378429a2984e717d945d1b5e07ab18513..2e1a7eebad2fe4678d620290d25f403984c0316d 100644 (file)
--- a/tests/language/commands/define.at
+++ b/tests/language/commands/define.at
@@ -2453,4 +2453,29 @@ AT_CHECK([pspp --testing-mode define.sps], [0], [dnl
 
 [[ < y > ]]
 ])
-AT_CLEANUP
\ No newline at end of file
+AT_CLEANUP
+
+AT_SETUP([DISPLAY MACROS])
+AT_DATA([define.sps], [dnl
+DEFINE !b() 0 !ENDDEFINE.
+DEFINE !macro()
+a b c d
+e f g h.
+i j k l
+1,2,3,4.
+5+6+7.
+m(n,o).
+"a" "b" "c" 'a' 'b' 'c'.
+"x "" y".
+!ENDDEFINE.
+DEFINE !a() 1 !ENDDEFINE.
+DISPLAY MACROS.
+])
+AT_CHECK([pspp -O format=csv define.sps], [0], [dnl
+Table: Macros
+Name,Source Location
+!a,define.sps:12
+!b,define.sps:1
+!macro,define.sps:2-11
+])
+AT_CLEANUP