X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=tests%2Flanguage%2Fstats%2Fflip.at;h=cd9ee98cfa306bb48f9a2773d22f7867353a6510;hb=eff2701d5d282bfc0c1b52bd2af985705b11b307;hp=2b7e234b4244f9812061abdc6979f76e50fc7506;hpb=88d8c4b6f2da16263804c7819ebfa1257b32cb11;p=pspp

diff --git a/tests/language/stats/flip.at b/tests/language/stats/flip.at
index 2b7e234b42..cd9ee98cfa 100644
--- a/tests/language/stats/flip.at
+++ b/tests/language/stats/flip.at
@@ -81,3 +81,47 @@ v9      ,9.00,12.00
 v10     ,10.00,13.00
 ])
 AT_CLEANUP
+
+
+
+
+AT_SETUP([FLIP badly formed])
+
+AT_DATA([flip.sps], [dnl
+data list notable /N 1 (a) a b c d 2-9.
+
+flip newnames=n.
+list.
+flip.
+])
+
+AT_CHECK([pspp -O format=csv flip.sps], [1], [ignore])
+
+AT_CLEANUP
+
+
+
+AT_SETUP([FLIP with invalid variable names])
+
+AT_DATA([flip.sps], [dnl
+data list notable list /N (a3) a b c d *.
+begin data.
+""   1  2  3  4
+BY   1  2  3  4
+end data.
+
+flip newnames=n.
+
+list.
+])
+
+AT_CHECK([pspp -O format=csv flip.sps], [0], [dnl
+Table: Data List
+CASE_LBL,v,BY1
+a       ,1.00,1.00
+b       ,2.00,2.00
+c       ,3.00,3.00
+d       ,4.00,4.00
+])
+
+AT_CLEANUP