X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Flanguage%2Fdictionary%2Frename-variables.at;h=4a887419674eb63b2ca67dc72113a62f03699cd7;hb=eff2701d5d282bfc0c1b52bd2af985705b11b307;hp=f528dcb04692ef36c05c774584fc9decd41be0f9;hpb=0df9cdd3df66caf4353128feff3008289cda8115;p=pspp diff --git a/tests/language/dictionary/rename-variables.at b/tests/language/dictionary/rename-variables.at index f528dcb046..4a88741967 100644 --- a/tests/language/dictionary/rename-variables.at +++ b/tests/language/dictionary/rename-variables.at @@ -19,8 +19,7 @@ LIST. SAVE /OUTFILE='rename.sav'. ]) -AT_CHECK([pspp -o pspp.csv rename-variables.sps]) -AT_CHECK([cat pspp.csv], [0], [dnl +AT_CHECK([pspp -O format=csv rename-variables.sps], [0], [dnl Table: Reading free-form data from INLINE. Variable,Format brakeFluid,F2.0 @@ -45,11 +44,43 @@ applecarts,bananamobiles,xyzzy,foobar AT_CHECK([grep '[bB][rR][aA][kK][eE]' rename.sav], [1], [ignore-nolog]) AT_CLEANUP + +AT_SETUP([RENAME VARIABLES -- multiple sets]) +AT_DATA([rename-variables.sps], [dnl +data list list /a b c d e *. +begin data. +1 2 3 4 5 +end data. + +rename variables (a b=x y) (c d e=z zz zzz). + +list. +]) + +AT_CHECK([pspp -O format=csv rename-variables.sps], [0], [dnl +Table: Reading free-form data from INLINE. +Variable,Format +a,F8.0 +b,F8.0 +c,F8.0 +d,F8.0 +e,F8.0 + +Table: Data List +x,y,z,zz,zzz +1.00,2.00,3.00,4.00,5.00 +]) + +AT_CLEANUP + + AT_SETUP([RENAME VARIABLES -- invalid syntax 1]) + AT_DATA([rename-variables.sps], [dnl DATA LIST LIST /brakeFluid y auxiliary warp (F2.0). RENAME VARIABLES warp auxiliary=foobar xyzzy. ]) + AT_CHECK([pspp -o pspp.csv rename-variables.sps], [1], [dnl rename-variables.sps:2.23-2.31: error: RENAME VARIABLES: Syntax error at `auxiliary': expecting `='. ]) @@ -60,7 +91,28 @@ AT_DATA([rename-variables.sps], [dnl DATA LIST LIST /brakeFluid y auxiliary warp (F2.0). RENAME VARIABLES (brakeFluid=applecarts y=bananamobiles). ]) + AT_CHECK([pspp -o pspp.csv rename-variables.sps], [1], [dnl rename-variables.sps:2: error: RENAME VARIABLES: Differing number of variables in old name list (1) and in new name list (2). ]) AT_CLEANUP + + + + +AT_SETUP([RENAME VARIABLES -- invalid syntax 3]) +AT_DATA([rename-variables.sps], [dnl +DATA LIST NOTABLE LIST /z y p q (F2.0). +BEGIN DATA. +4 3 8 11 +END DATA. + +RENAME VARIABLES z=a y}bqnanamobiles. + +LIST. +]) + +AT_CHECK([pspp -O format=csv rename-variables.sps], [1], [ignore]) + + +AT_CLEANUP