tracks/perl6/exercises/word-count/word-count.t in trackler-2.2.1.71 vs tracks/perl6/exercises/word-count/word-count.t in trackler-2.2.1.72
- old
+ new
@@ -3,13 +3,13 @@
use Test;
use lib my $dir = $?FILE.IO.dirname;
use JSON::Fast;
my Str:D $exercise := 'WordCount';
-my Version:D $version = v1;
+my Version:D $version = v2;
my Str $module //= $exercise;
-plan 12;
+plan 13;
use-ok $module or bail-out;
require ::($module);
if ::($exercise).^ver !~~ $version {
@@ -137,9 +137,18 @@
"can't": 1,
"tell": 1,
"between": 1,
"large": 2,
"and": 1
+ }
+ },
+ {
+ "description": "multiple spaces not detected as a word",
+ "property": "countwords",
+ "input": " multiple whitespaces",
+ "expected": {
+ "multiple": 1,
+ "whitespaces": 1
}
}
]
}