tracks/perl6/exercises/acronym/acronym.t in trackler-2.2.1.100 vs tracks/perl6/exercises/acronym/acronym.t in trackler-2.2.1.101
- old
+ new
@@ -2,11 +2,11 @@
use v6;
use Test;
use JSON::Fast;
use lib $?FILE.IO.dirname;
use Acronym;
-plan 6;
+plan 5;
my Version:D $version = v2;
if Acronym.^ver !~~ $version {
warn "\nExercise version mismatch. Further tests may fail!"
@@ -20,14 +20,13 @@
is abbreviate(.<input><phrase>), |.<expected description>;
}
=head2 Canonical Data
=begin code
-
{
"exercise": "acronym",
- "version": "1.2.0",
+ "version": "1.3.0",
"cases": [
{
"description": "Abbreviate a phrase",
"cases": [
{
@@ -53,34 +52,25 @@
"phrase": "First In, First Out"
},
"expected": "FIFO"
},
{
- "description": "all caps words",
+ "description": "all caps word",
"property": "abbreviate",
"input": {
- "phrase": "PHP: Hypertext Preprocessor"
- },
- "expected": "PHP"
- },
- {
- "description": "non-acronym all caps word",
- "property": "abbreviate",
- "input": {
"phrase": "GNU Image Manipulation Program"
},
"expected": "GIMP"
},
{
- "description": "hyphenated",
+ "description": "punctuation without whitespace",
"property": "abbreviate",
"input": {
"phrase": "Complementary metal-oxide semiconductor"
},
"expected": "CMOS"
}
]
}
]
}
-
=end code