X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Flanguage%2Fexpressions%2Fevaluate.at;h=6740a4a6e4d9ccd76f14f9bbf7e76af864f16192;hb=f121693e24f4f23ee5bfda6e745f35c9c14cfa28;hp=d06270af0f09a0816c9a4d9f1a7578e9fce871cf;hpb=181b7b7bf5637774bbccc2ce019449a4994cfb07;p=pspp-builds.git diff --git a/tests/language/expressions/evaluate.at b/tests/language/expressions/evaluate.at index d06270af..6740a4a6 100644 --- a/tests/language/expressions/evaluate.at +++ b/tests/language/expressions/evaluate.at @@ -1986,3 +1986,52 @@ n,s,nlabel,slabel 6,g,, ]) AT_CLEANUP + +AT_SETUP([variables in expressions]) +AT_DATA([variables.sps], [dnl +DATA LIST NOTABLE/N1 TO N5 1-5. +MISSING VALUES N1 TO N5 (3 THRU 5, 1). +BEGIN DATA. +12345 +6789 +END DATA. + +COMPUTE P1=N1. +COMPUTE P2=N2. +COMPUTE P3=N3. +COMPUTE P4=N4. +COMPUTE P5=N5. + +COMPUTE MC=NMISS(N1 TO N5). +COMPUTE VC=NVALID(N1 TO N5). + +COMPUTE S1=SYSMIS(N1). +COMPUTE S2=SYSMIS(N2). +COMPUTE S3=SYSMIS(N3). +COMPUTE S4=SYSMIS(N4). +COMPUTE S5=SYSMIS(N5). + +COMPUTE M1=MISSING(N1). +COMPUTE M2=MISSING(N2). +COMPUTE M3=MISSING(N3). +COMPUTE M4=MISSING(N4). +COMPUTE M5=MISSING(N5). + +COMPUTE V1=VALUE(N1). +COMPUTE V2=VALUE(N2). +COMPUTE V3=VALUE(N3). +COMPUTE V4=VALUE(N4). +COMPUTE V5=VALUE(N5). + +FORMATS ALL (F1). + +LIST. +]) +AT_CHECK([pspp -o pspp.csv variables.sps]) +AT_CHECK([cat pspp.csv], [0], [dnl +Table: Data List +N1,N2,N3,N4,N5,P1,P2,P3,P4,P5,MC,VC,S1,S2,S3,S4,S5,M1,M2,M3,M4,M5,V1,V2,V3,V4,V5 +1,2,3,4,5,.,2,.,.,.,4,1,0,0,0,0,0,1,0,1,1,1,1,2,3,4,5 +6,7,8,9,.,6,7,8,9,.,1,4,0,0,0,0,1,0,0,0,0,1,6,7,8,9,. +]) +AT_CLEANUP