more work on datasets

[pspp] / tests / data / file.at

diff --git a/tests/data/file.at b/tests/data/file.at
index 50a0da9bd14454b5f6569d24513114c8cac5f302..bccdf003c5af250136e2abc4f387769814c8f870 100644 (file)
--- a/tests/data/file.at
+++ b/tests/data/file.at
@@ -41,6 +41,8 @@ error: Creating temporary file to replace directory/foobar.sav: Permission denie
 error: Error opening `directory/foobar.sav' for writing as a system file: Permission denied.
 ])
 
+chmod 700 directory
+
 AT_CLEANUP
 
 
@@ -65,6 +67,9 @@ 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_DATA([file.sps], [dnl
 DATA LIST NOTABLE/x 1.
 BEGIN DATA.
@@ -80,3 +85,22 @@ pid=$!
 AT_CHECK([pspp -O format=csv file.sps], [0], [ignore])
 
 AT_CLEANUP
+
+
+
+AT_SETUP([Reading from pipe])
+
+AT_DATA([pipe.sps], [dnl
+data list file='printf "1 2\n 3 4\n 5 6\n" |' notable list /x * y *.
+list.
+])
+
+AT_CHECK([pspp -O format=csv pipe.sps], [0], [dnl
+Table: Data List
+x,y
+1.00,2.00
+3.00,4.00
+5.00,6.00
+])
+
+AT_CLEANUP