pintos-os.org Git - pspp/blob - tests/language/data-io/print-space.at

   1 dnl PSPP - a program for statistical analysis.
   2 dnl Copyright (C) 2017 Free Software Foundation, Inc.
   3 dnl
   4 dnl This program is free software: you can redistribute it and/or modify
   5 dnl it under the terms of the GNU General Public License as published by
   6 dnl the Free Software Foundation, either version 3 of the License, or
   7 dnl (at your option) any later version.
   8 dnl
   9 dnl This program is distributed in the hope that it will be useful,
  10 dnl but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 dnl MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12 dnl GNU General Public License for more details.
  13 dnl
  14 dnl You should have received a copy of the GNU General Public License
  15 dnl along with this program.  If not, see <http://www.gnu.org/licenses/>.
  16 dnl AT_BANNER([PRINT SPACE])
  17
  18 AT_SETUP([PRINT SPACE without arguments])
  19 AT_DATA([print-space.sps], [dnl
  20 DATA LIST NOTABLE/x 1.
  21 BEGIN DATA.
  22 1
  23 2
  24 END DATA.
  25 PRINT/x.
  26 PRINT SPACE.
  27 EXECUTE.
  28 ])
  29 AT_CHECK([pspp -O format=csv print-space.sps], [0], [dnl
  30 1 @&t@
  31
  32
  33
  34 2 @&t@
  35
  36
  37 ])
  38 AT_CLEANUP
  39
  40 AT_SETUP([PRINT SPACE with number])
  41 AT_DATA([print-space.sps], [dnl
  42 DATA LIST NOTABLE/x 1.
  43 BEGIN DATA.
  44 1
  45 2
  46 END DATA.
  47 PRINT/x.
  48 PRINT SPACE 2.
  49 EXECUTE.
  50 ])
  51 AT_CHECK([pspp -O format=csv print-space.sps], [0], [dnl
  52 1 @&t@
  53
  54
  55
  56
  57
  58 2 @&t@
  59
  60
  61
  62
  63 ])
  64 AT_CLEANUP
  65
  66 AT_SETUP([PRINT SPACE to file])
  67 AT_CAPTURE_FILE([output.txt])
  68 AT_DATA([print-space.sps], [dnl
  69 DATA LIST NOTABLE/x 1.
  70 BEGIN DATA.
  71 1
  72 2
  73 END DATA.
  74 PRINT OUTFILE='output.txt'/x.
  75 PRINT SPACE OUTFILE='output.txt'.
  76 EXECUTE.
  77 ])
  78 AT_CHECK([pspp -O format=csv print-space.sps])
  79 AT_CHECK([cat output.txt], [0], [dnl
  80  1 @&t@
  81  @&t@
  82  2 @&t@
  83  @&t@
  84 ])
  85 AT_CLEANUP
  86
  87 AT_SETUP([PRINT SPACE to file with number])
  88 AT_CAPTURE_FILE([output.txt])
  89 AT_DATA([print-space.sps], [dnl
  90 DATA LIST NOTABLE/x 1.
  91 BEGIN DATA.
  92 1
  93 2
  94 END DATA.
  95 PRINT OUTFILE='output.txt'/x.
  96 PRINT SPACE OUTFILE='output.txt' 2.
  97 EXECUTE.
  98 ])
  99 AT_CHECK([pspp -O format=csv print-space.sps])
 100 AT_CHECK([cat output.txt], [0], [dnl
 101  1 @&t@
 102  @&t@
 103  @&t@
 104  2 @&t@
 105  @&t@
 106  @&t@
 107 ])
 108 AT_CLEANUP