pintos-os.org Git - pspp/blob - tests/output/output.at

   1 AT_BANNER([output drivers])
   2
   3 m4_define([OUTPUT_UNWRITABLE_DIR],
   4   [AT_SETUP([output $1 to unwritable directory])
   5    mkdir unwritable
   6    chmod u-w unwritable
   7    AT_SKIP_IF([: > unwritable/test])
   8    AT_DATA([unwritable.sps], [dnl
   9 data list /x 1.
  10 begin data.
  11 1
  12 2
  13 3
  14 end data.
  15 frequencies x/histogram.
  16 ])
  17    dnl PSPP will fail to create the output file.  Thus, the exit status is
  18    dnl non zero
  19    AT_CHECK([cd unwritable && pspp -o pspp.$1 ../unwritable.sps], [1],
  20             [ignore], [ignore])
  21    AT_CLEANUP])
  22
  23 OUTPUT_UNWRITABLE_DIR([csv])
  24 OUTPUT_UNWRITABLE_DIR([html])
  25 OUTPUT_UNWRITABLE_DIR([odt])
  26 OUTPUT_UNWRITABLE_DIR([pdf])
  27 OUTPUT_UNWRITABLE_DIR([txt])