diff options
Diffstat (limited to 'dev-perl/WordNet-QueryData/files/WordNet-QueryData-1.49-test-counts.patch')
| -rw-r--r-- | dev-perl/WordNet-QueryData/files/WordNet-QueryData-1.49-test-counts.patch | 43 |
1 files changed, 43 insertions, 0 deletions
diff --git a/dev-perl/WordNet-QueryData/files/WordNet-QueryData-1.49-test-counts.patch b/dev-perl/WordNet-QueryData/files/WordNet-QueryData-1.49-test-counts.patch new file mode 100644 index 000000000000..e06c872e0128 --- /dev/null +++ b/dev-perl/WordNet-QueryData/files/WordNet-QueryData-1.49-test-counts.patch @@ -0,0 +1,43 @@ +From fe7f10589ee4da4a834e1f6355bb203de644920e Mon Sep 17 00:00:00 2001 +From: Kent Fredric <kentnl@gentoo.org> +Date: Wed, 21 Mar 2018 22:24:09 +1300 +Subject: Remove tests dependent on specific counts of dictionary terms + +This was never going to be portable against newer wordnet data releases +--- + test.pl | 10 +++------- + 1 file changed, 3 insertions(+), 7 deletions(-) + +diff --git a/test.pl b/test.pl +index 537aa7b..386c66c 100644 +--- a/test.pl ++++ b/test.pl +@@ -5,7 +5,8 @@ + # $Id: test.pl,v 1.40 2007/05/07 01:08:31 jrennie Exp $ + + my $i = 1; +-BEGIN { ++BEGIN { ++ print "1..103\n"; + $| = 1; + } + END { print "not ok 1\n" unless $loaded; } +@@ -162,14 +163,9 @@ $foo[1] == 2 + ? print "ok ", $i++, "\n" : print "not ok ", $i++, "\n"; + ($wn->querySense('acropetal#a#1', 'dmnc'))[0] eq 'botany#n#2' + ? print "ok ", $i++, "\n" : print "not ok ", $i++, "\n"; +-scalar $wn->offset("0#n#1") == 13742358 +- ? print "ok ", $i++, "\n" : print "not ok ", $i++, "\n"; + +-scalar $wn->listAllWords("noun") == 117798 +- ? print "ok ", $i++, "\n" : print "not ok ", $i++, "\n"; +-$wn->offset("child#n#1") == 9917593 +- ? print "ok ", $i++, "\n" : print "not ok ", $i++, "\n"; + my ($foo) = $wn->querySense ("cat#n#1", "glos"); + ($foo eq "feline mammal usually having thick soft fur and no ability to roar: domestic cats; wildcats ") ? print "ok ", $i++, "\n" : print "not ok ", $i++, "\n"; + + } ++print "0..$i\n"; +-- +2.16.2 + |