X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Fdata%2Ffile.at;h=e48fe05a65c95e190c9891a008b8b69f84bfc4b3;hb=851edb461d234263f56c36ad5b329cccd8c26c55;hp=4efea3a2cfa94e00655aaa1d657e8f0d5a8358e6;hpb=dedeb96eb744b70baec7b86901a6efa8256d04e3;p=pspp diff --git a/tests/data/file.at b/tests/data/file.at index 4efea3a2cf..e48fe05a65 100644 --- a/tests/data/file.at +++ b/tests/data/file.at @@ -1,3 +1,19 @@ +dnl PSPP - a program for statistical analysis. +dnl Copyright (C) 2017 Free Software Foundation, Inc. +dnl +dnl This program is free software: you can redistribute it and/or modify +dnl it under the terms of the GNU General Public License as published by +dnl the Free Software Foundation, either version 3 of the License, or +dnl (at your option) any later version. +dnl +dnl This program is distributed in the hope that it will be useful, +dnl but WITHOUT ANY WARRANTY; without even the implied warranty of +dnl MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +dnl GNU General Public License for more details. +dnl +dnl You should have received a copy of the GNU General Public License +dnl along with this program. If not, see . +dnl AT_BANNER([files handling]) AT_SETUP([Write error - directory exists]) @@ -68,7 +84,7 @@ AT_CLEANUP AT_SETUP([Write fifo]) dnl The Fifo feature is not available in w32 builds -AT_SKIP_IF([case $host in *-*-mingw*) true ;; *) false ;; esac]) +AT_SKIP_IF([$MINGW]) AT_DATA([file.sps], [dnl DATA LIST NOTABLE/x 1. @@ -79,7 +95,7 @@ SAVE OUTFILE='foobar.sav'. ]) mkfifo foobar.sav -cat foobar.sav > /dev/null & +cat foobar.sav > /dev/null & pid=$! AT_CHECK([pspp -O format=csv file.sps], [0], [ignore]) @@ -91,7 +107,7 @@ AT_CLEANUP AT_SETUP([Reading from pipe]) AT_DATA([pipe.sps], [dnl -data list file='echo "1 2\n 3 4\n 5 6" |' notable list /x * y *. +data list file='printf "1 2\n 3 4\n 5 6\n" |' notable list /x * y *. list. ]) @@ -104,3 +120,21 @@ x,y ]) AT_CLEANUP + + +dnl This was seen to crash pspp +AT_SETUP([Reusing inline file]) + +AT_DATA([inline-reuse.sps], [dnl +get data /type=txt /file=inline /variables=A f7.2 . + +data list notable list /foo. +begin data. +end data. + +data list notable list /foo. +]) + +AT_CHECK([pspp inline-reuse.sps], [0], [ignore]) + +AT_CLEANUP