tests/language/dictionary/split-file.at

   1 AT_BANNER([SPLIT FILE])
   2
   3 AT_SETUP([SPLIT FILE])
   4 AT_DATA([split-file.sps], [dnl
   5 title 'Test SPLIT FILE utility'.
   6
   7 data list notable /X 1 Y 2.
   8 begin data.
   9 12
  10 16
  11 17
  12 19
  13 15
  14 14
  15 27
  16 20
  17 26
  18 25
  19 28
  20 29
  21 24
  22 end data.
  23 split file by x.
  24 list.
  25 ])
  26 AT_CHECK([pspp -o pspp.csv split-file.sps])
  27 AT_CHECK([cat pspp.csv], [0], [dnl
  28 Title: Test SPLIT FILE utility
  29
  30 Variable,Value,Label
  31 X,1,
  32
  33 Table: Data List
  34 X,Y
  35 1,2
  36 1,6
  37 1,7
  38 1,9
  39 1,5
  40 1,4
  41
  42 Variable,Value,Label
  43 X,2,
  44
  45 Table: Data List
  46 X,Y
  47 2,7
  48 2,0
  49 2,6
  50 2,5
  51 2,8
  52 2,9
  53 2,4
  54 ])
  55 AT_CLEANUP