1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60
|
AT_BANNER([NUMERIC])
AT_SETUP([NUMERIC])
AT_DATA([numeric.sps], [dnl
DATA LIST LIST NOTABLE/x y z.
NUMERIC n/k(F5).
DISPLAY DICTIONARY.
])
AT_CHECK([pspp -O format=csv numeric.sps], [0], [dnl
Table: Variables
Name,Position,Measurement Level,Role,Width,Alignment,Print Format,Write Format
x,1,Unknown,Input,8,Right,F8.2,F8.2
y,2,Unknown,Input,8,Right,F8.2,F8.2
z,3,Unknown,Input,8,Right,F8.2,F8.2
n,4,Unknown,Input,8,Right,F8.2,F8.2
k,5,Unknown,Input,8,Right,F5.0,F5.0
])
AT_CLEANUP
AT_SETUP([NUMERIC syntax errors])
AT_DATA([numeric.sps], [dnl
DATA LIST LIST NOTABLE/x y z.
NUMERIC **.
NUMERIC n **.
NUMERIC x.
NUMERIC n (**).
NUMERIC n (F50).
NUMERIC n (A8).
NUMERIC n (F8.0 **).
])
AT_CHECK([pspp -O format=csv numeric.sps], [1], [dnl
"numeric.sps:2.9-2.10: error: NUMERIC: Syntax error expecting variable name.
2 | NUMERIC **.
| ^~"
"numeric.sps:3.11-3.12: error: NUMERIC: Syntax error expecting end of command.
3 | NUMERIC n **.
| ^~"
"numeric.sps:4.9: error: NUMERIC: There is already a variable named x.
4 | NUMERIC x.
| ^"
"numeric.sps:5.12-5.13: error: NUMERIC: Syntax error expecting valid format specifier.
5 | NUMERIC n (**).
| ^~"
"numeric.sps:6.12-6.14: error: NUMERIC: Output format F50.0 specifies width 50, but F requires a width between 1 and 40.
6 | NUMERIC n (F50).
| ^~~"
"numeric.sps:7.12-7.13: error: NUMERIC: Format type A8 may not be used with a numeric variable.
7 | NUMERIC n (A8).
| ^~"
"numeric.sps:8.17-8.18: error: NUMERIC: Syntax error expecting `@:}@'.
8 | NUMERIC n (F8.0 **).
| ^~"
])
AT_CLEANUP
|