[gnumeric] tests: add tests for sheet objects.

[Morten Welinder <mortenw src gnome org>]

commit dbb38c8a6fe797cf5ad317b0ba51989bc287596a
Author: Morten Welinder <terra gnome org>
Date:   Thu Feb 5 11:14:31 2015 -0500

    tests: add tests for sheet objects.
    
    So far passive objects only.  That will change.

 samples/object-tests.gnumeric |  Bin 0 -> 2469 bytes
 test/Makefile.am              |    1 +
 test/t6518-objects.pl         |   54 +++++++++++++++++++++++++++++++++++++++++
 3 files changed, 55 insertions(+), 0 deletions(-)
---
diff --git a/samples/object-tests.gnumeric b/samples/object-tests.gnumeric
new file mode 100644
index 0000000..dde0c05
Binary files /dev/null and b/samples/object-tests.gnumeric differ
diff --git a/test/Makefile.am b/test/Makefile.am
index 5ed1d03..2bc08c4 100644
--- a/test/Makefile.am
+++ b/test/Makefile.am
@@ -94,6 +94,7 @@ TESTS =       t1000-statfuns.pl                       \
        t6515-cond-format.pl                    \
        t6516-graph.pl                          \
        t6517-names.pl                          \
+       t6518-objects.pl                        \
        t7000-goal-seek.pl                      \
        t7100-solver-blend.pl                   \
        t7101-solver-afiro.pl                   \
diff --git a/test/t6518-objects.pl b/test/t6518-objects.pl
new file mode 100755
index 0000000..bb40f86
--- /dev/null
+++ b/test/t6518-objects.pl
@@ -0,0 +1,54 @@
+#!/usr/bin/perl -w
+# -----------------------------------------------------------------------------
+
+use strict;
+use lib ($0 =~ m|^(.*/)| ? $1 : ".");
+use GnumericTest;
+
+my $file = "$samples/object-tests.gnumeric";
+$GnumericTest::default_subtests = '*,-biff7';
+
+
+if (&subtest ("gnumeric")) {
+    &message ("Check object gnumeric roundtrip.");
+    &test_roundtrip ($file,
+                    'format' => 'Gnumeric_XmlIO:sax',
+                    'ext' => "gnm");
+}
+
+if (&subtest ("ods")) {
+    &message ("Check object ods roundtrip.");
+    &test_roundtrip ($file,
+                    'format' => 'Gnumeric_OpenCalc:odf',
+                    'ext' => "ods",
+                    'filter2' => 'std:drop_generator',
+                    'ignore_failure' => 1);
+}
+
+if (&subtest ("biff7")) {
+    # We don't save objects, so don't test.
+    &message ("Check object xls/BIFF7 roundtrip.");
+    &test_roundtrip ($file,
+                    'format' => 'Gnumeric_Excel:excel_biff7',
+                    'ext' => "xls",
+                    'resize' => '16384x256',
+                    'filter2' => 'std:drop_codepage');
+}
+
+if (&subtest ("biff8")) {
+    &message ("Check object xls/BIFF8 roundtrip.");
+    &test_roundtrip ($file,
+                    'format' => 'Gnumeric_Excel:excel_biff8',
+                    'ext' => "xls",
+                    'filter2' => 'std:drop_codepage',
+                    'ignore_failure' => 1);
+}
+
+if (&subtest ("xlsx")) {
+    &message ("Check object xlsx roundtrip.");
+    &test_roundtrip ($file,
+                    'format' => 'Gnumeric_Excel:xlsx',
+                    'ext' => "xlsx",
+                    'resize' => '1048576x16384',
+                    'ignore_failure' => 1);
+}