Use greater-than-or-equal to sign instead of '>='.
[pspp-builds.git] / tests / language / data-io / save.at
1 AT_BANNER([IMPORT and EXPORT])
2
3 AT_SETUP([IMPORT and EXPORT])
4 AT_DATA([import-export.sps], [dnl
5 DATA LIST LIST NOTABLE /X Y.
6 BEGIN DATA.
7 1 2
8 3 .
9 5 6
10 END DATA.
11
12 EXPORT /OUTFILE='wiz.por'.
13 IMPORT /FILE='wiz.por'.
14
15 LIST.
16 ])
17 AT_CHECK([pspp -o pspp.csv import-export.sps])
18 AT_CHECK([cat pspp.csv], [0], [dnl
19 Table: Data List
20 X,Y
21 1.00,2.00
22 3.00,.  @&t@
23 5.00,6.00
24 ])
25 AT_CLEANUP
26
27 AT_BANNER([SAVE])
28
29 # UNSELECTED=DELETE used to cause a crash if there was actually a
30 # filter variable.
31 AT_SETUP([SAVE -- delete unselected])
32 AT_DATA([data.txt], [dnl
33 0 '1 9:30:05' 1/2/2003 "25/8/1995 15:30:00" "'a,b,c'",0
34 , '-0 5:17' 10/31/2010 "9/4/2008 9:29:00" " xxx ",1
35 1.625,'0 12:00',,,xyzzy,1
36 ])
37 AT_DATA([save.pspp], [dnl
38 SET DECIMAL=DOT.
39 DATA LIST LIST NOTABLE FILE="data.txt"
40     /number(F8.3) time(DTIME10) date(ADATE10) datetime(DATETIME20) string(A8)
41      filter(F1.0).
42 MISSING VALUES number(0) time('0 12:00') string('xyzzy').
43 FILTER BY filter.
44 SAVE /OUTFILE="data.sav" /UNSELECTED=DELETE.
45 ])
46 AT_DATA([get.pspp], [dnl
47 GET FILE='data.sav'.
48 LIST.
49 ])
50 AT_CHECK([pspp -O format=csv save.pspp])
51 AT_CHECK([pspp -O format=csv get.pspp], [0], [dnl
52 Table: Data List
53 number,time,date,datetime,string,filter
54 .   ,-0 05:17,10/31/2010,09-APR-2008 09:29:00,xxx    ,1
55 1.625,0 12:00:00,.,.,xyzzy   ,1
56 ])
57 AT_CLEANUP