[gnumeric] Tests: add tests for date format guessing.
- From: Morten Welinder <mortenw src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [gnumeric] Tests: add tests for date format guessing.
- Date: Wed, 18 May 2016 15:44:18 +0000 (UTC)
commit f9cf429807737995340021f4a87b9ffebe03764c
Author: Morten Welinder <terra gnome org>
Date: Wed May 18 11:43:55 2016 -0400
Tests: add tests for date format guessing.
samples/csv/date-dmy.csv | 4 ++++
samples/csv/date-mdy.csv | 4 ++++
samples/csv/date-ymd.csv | 2 ++
test/Makefile.am | 3 +++
test/t5910-cvs-date-dmy.pl | 14 ++++++++++++++
test/t5911-cvs-date-mdy.pl | 14 ++++++++++++++
test/t5912-cvs-date-ymd.pl | 14 ++++++++++++++
7 files changed, 55 insertions(+), 0 deletions(-)
---
diff --git a/samples/csv/date-dmy.csv b/samples/csv/date-dmy.csv
new file mode 100644
index 0000000..df0562d
--- /dev/null
+++ b/samples/csv/date-dmy.csv
@@ -0,0 +1,4 @@
+"Date","Comment"
+"1/2/3","No order can be deduced"
+"1/2/2000","Year is last"
+"31/12/2000","DMY"
diff --git a/samples/csv/date-mdy.csv b/samples/csv/date-mdy.csv
new file mode 100644
index 0000000..0cdda68
--- /dev/null
+++ b/samples/csv/date-mdy.csv
@@ -0,0 +1,4 @@
+"Date","Comment"
+"1/2/3","No order can be deduced"
+"1/2/2000","Year is last"
+"12/31/2000","MDY"
diff --git a/samples/csv/date-ymd.csv b/samples/csv/date-ymd.csv
new file mode 100644
index 0000000..b4e5f5b
--- /dev/null
+++ b/samples/csv/date-ymd.csv
@@ -0,0 +1,2 @@
+"Date","Comment"
+"2000/12/31","YMD"
diff --git a/test/Makefile.am b/test/Makefile.am
index 889eff7..79148d4 100644
--- a/test/Makefile.am
+++ b/test/Makefile.am
@@ -64,6 +64,9 @@ TESTS = t1000-statfuns.pl \
t5903-sylk.pl \
t5904-mps.pl \
t5905-guppi.pl \
+ t5910-csv-date-dmy.pl \
+ t5911-csv-date-mdy.pl \
+ t5912-csv-date-ymd.pl \
t6000-statfuns.pl \
t6001-mathfuns.pl \
t6002-objs.pl \
diff --git a/test/t5910-cvs-date-dmy.pl b/test/t5910-cvs-date-dmy.pl
new file mode 100755
index 0000000..fe21165
--- /dev/null
+++ b/test/t5910-cvs-date-dmy.pl
@@ -0,0 +1,14 @@
+#!/usr/bin/perl -w
+# -----------------------------------------------------------------------------
+
+use strict;
+use lib ($0 =~ m|^(.*/)| ? $1 : ".");
+use GnumericTest;
+
+# See test_importer comments for mode definitions.
+my $mode = ((shift @ARGV) || "check");
+
+my $file = "$samples/csv/date-dmy.csv";
+
+&message ("Check the csv importer.");
+&test_importer ($file, "d4eba1eae1afc992dee904df9fe2d2e25ce9f50b", $mode);
diff --git a/test/t5911-cvs-date-mdy.pl b/test/t5911-cvs-date-mdy.pl
new file mode 100755
index 0000000..70130e5
--- /dev/null
+++ b/test/t5911-cvs-date-mdy.pl
@@ -0,0 +1,14 @@
+#!/usr/bin/perl -w
+# -----------------------------------------------------------------------------
+
+use strict;
+use lib ($0 =~ m|^(.*/)| ? $1 : ".");
+use GnumericTest;
+
+# See test_importer comments for mode definitions.
+my $mode = ((shift @ARGV) || "check");
+
+my $file = "$samples/csv/date-mdy.csv";
+
+&message ("Check the csv importer.");
+&test_importer ($file, "55bf9e5f17dc437ea3dce7ee6aef84c203c93729", $mode);
diff --git a/test/t5912-cvs-date-ymd.pl b/test/t5912-cvs-date-ymd.pl
new file mode 100755
index 0000000..67ed57c
--- /dev/null
+++ b/test/t5912-cvs-date-ymd.pl
@@ -0,0 +1,14 @@
+#!/usr/bin/perl -w
+# -----------------------------------------------------------------------------
+
+use strict;
+use lib ($0 =~ m|^(.*/)| ? $1 : ".");
+use GnumericTest;
+
+# See test_importer comments for mode definitions.
+my $mode = ((shift @ARGV) || "check");
+
+my $file = "$samples/csv/date-ymd.csv";
+
+&message ("Check the csv importer.");
+&test_importer ($file, "0dc146dcae097d4eece512d157388ed8bb9467b4", $mode);
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]