test !NULL equality

diff --git a/tests/language/control/define.at b/tests/language/control/define.at
index 76685791a1e8f734e6ec05c5a0dfbfec6c88f699..30fd080ba0454b178b65bfb307cfbbd1eb077d95 100644 (file)
--- a/tests/language/control/define.at
+++ b/tests/language/control/define.at
@@ -625,7 +625,9 @@ DEFINE !test(!positional !tokens(1))
 !if (!1 $5 a) !then true !else false !ifend
 !if (!1 $5 A) !then true !else false !ifend
 !if (!1 $6 a) !then true !else false !ifend
-!if (!1 $6 A) !then true !else false !ifend.
+!if (!1 $6 A) !then true !else false !ifend
+!if (!1 $1 !null) !then true !else false !ifend
+!if (!1 $2 !null) !then true !else false !ifend.
 !ENDDEFINE.
 DEBUG EXPAND.
 !test a
@@ -635,13 +637,13 @@ DEBUG EXPAND.
 EOF
     AT_CAPTURE_FILE([define.sps])
     AT_CHECK([pspp --testing-mode define.sps], [0], [dnl
-true false false true false false false true true false true true.
+true false false true false false false true true false true true false true.
 
-false true true false true false false false true true false true.
+false true true false true false false false true true false true false true.
 
-false false true true false false true true false false true true.
+false false true true false false true true false false true true false true.
 
-false false true true true false false true true false false true.
+false false true true true false false true true false false true false true.
 ])
 done
 AT_CLEANUP