test/t5901-qpro.pl

   1 #!/usr/bin/perl -w
   2 # -----------------------------------------------------------------------------
   3
   4 use strict;
   5 use lib ($0 =~ m|^(.*/)| ? $1 : ".");
   6 use GnumericTest;
   7
   8 # See test_importer comments for mode definitions.
   9 my $mode = ((shift @ARGV) || "check");
  10
  11 &message ("Check the Quattro Pro importer.");
  12 &test_importer ("$samples/qpro/gantt.wb3", "5913f63dfd3584151505e3231e56a0cd71ba5991", $mode);