X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Flanguage%2Fdata-io%2Fget-data-spreadsheet.at;h=5d5a064a27d9f5a82ef7c5adfb6645b06a45a8c9;hb=2bc8abedadbc5deec93d5983e432cb47093e89bc;hp=c9060aef5f7a4bf29c0604dab0e2165bca149772;hpb=f758c0c7097e197d7b6fb9bb3c3d9d6e9138e0a7;p=pspp diff --git a/tests/language/data-io/get-data-spreadsheet.at b/tests/language/data-io/get-data-spreadsheet.at index c9060aef5f..5d5a064a27 100644 --- a/tests/language/data-io/get-data-spreadsheet.at +++ b/tests/language/data-io/get-data-spreadsheet.at @@ -3,7 +3,7 @@ m4_define([SPREADSHEET_TEST_PREP],[dnl m4_if($1,[GNM],[dnl AT_CHECK([gzip -c $top_srcdir/tests/language/data-io/Book1.gnm.unzipped > Book1.gnumeric])dnl m4_define([testsheet],[Book1.gnumeric])dnl - AT_SKIP_IF([test n$GNM_SUPPORT != nyes])dnl + AT_SKIP_IF([test n$GNM_READ_SUPPORT != nyes])dnl ]) dnl m4_if($1,[ODS],[dnl AT_CHECK([cp $top_srcdir/tests/language/data-io/test.ods test.ods])dnl @@ -87,8 +87,7 @@ GET DATA /TYPE=$1 /FILE='testsheet' /SHEET=index 3. DISPLAY VARIABLES. LIST. ]) -AT_CHECK([pspp -o pspp.csv get-data.sps]) -AT_CHECK([cat pspp.csv], [0], [dnl +AT_CHECK([pspp -O format=csv get-data.sps], [0], [dnl Variable,Description,,Position name,Format: A8,,1 ,Measure: Nominal,, @@ -103,6 +102,8 @@ height,Format: F8.2,,3 ,Display Alignment: Right,, ,Display Width: 8,, +warning: Cannot convert the value in the spreadsheet cell C4 to format (F8.2): Field contents are not numeric. + Table: Data List name,id,height fred ,.00,23.40 @@ -147,6 +148,22 @@ vone,vtwo,vthree,v4 ]) AT_CLEANUP +dnl This syntax doesn't do anything particularly useful. +dnl It has been seen to cause a few crashes, so we check here that it +dnl doesn't do anthing bad. +AT_SETUP([GET DATA /TYPE=$1 with no options]) +SPREADSHEET_TEST_PREP($1) +AT_DATA([get-data.sps], [dnl +* This sheet is empty +GET DATA /TYPE=$1 /FILE='testsheet'. +DISPLAY DICTIONARY. +LIST. +]) +AT_CHECK([pspp -o pspp.csv get-data.sps], [0], [ignore]) +AT_CLEANUP + + + AT_SETUP([GET DATA /TYPE=$1 with empty sheet]) SPREADSHEET_TEST_PREP($1) AT_DATA([get-data.sps], [dnl @@ -177,6 +194,7 @@ CHECK_SPREADSHEET_READER([GNM]) dnl Check for a bug where gnumeric files were interpreted incorrectly AT_SETUP([GET DATA /TYPE=GNM sheet index bug]) +AT_SKIP_IF([test n$GNM_READ_SUPPORT != nyes]) AT_DATA([minimal3.gnumeric],[dnl @@ -322,6 +340,60 @@ VAR001,VAR002,VAR003 AT_CLEANUP + +dnl Check for a bug where certain gnumeric files failed an assertion +AT_SETUP([GET DATA /TYPE=GNM assert-fail]) +AT_SKIP_IF([test n$GNM_READ_SUPPORT != nyes]) +AT_DATA([read.sps],[dnl +GET DATA + /TYPE=GNM + /FILE='crash.gnumeric' + . +list. +]) + + +AT_DATA([crash.gnumeric],[dnl + + + + + + Sheet1 + + + + Sheet1 + 2 + 4 + + + + + + + one + two + 1 + 2 + 1 + 2 + 1 + 2 + + + + +]) + +AT_CHECK([pspp -O format=csv read.sps], [0], [ignore]) + + +AT_CLEANUP + + + AT_BANNER([GET DATA Spreadsheet /TYPE=ODS]) CHECK_SPREADSHEET_READER([ODS])