skip all tests after the first

This commit is contained in:
Anurag Soni 2017-10-10 21:36:08 -04:00
parent 3c93d1f54c
commit 528b355c81
No known key found for this signature in database
GPG key ID: 316C46486FAD010B

View file

@ -11,28 +11,36 @@ tests =
[ test "empty string" <| [ test "empty string" <|
\() -> \() ->
Expect.equal True <| isIsogram "" Expect.equal True <| isIsogram ""
, test "isogram with only lower case characters" <| , skip <|
\() -> test "isogram with only lower case characters" <|
Expect.equal True <| isIsogram "isogram" \() ->
, test "word with one duplicated character" <| Expect.equal True <| isIsogram "isogram"
\() -> , skip <|
Expect.equal False <| isIsogram "eleven" test "word with one duplicated character" <|
, test "longest reported english isogram" <| \() ->
\() -> Expect.equal False <| isIsogram "eleven"
Expect.equal True <| isIsogram "subdermatoglyphic" , skip <|
, test "word with duplicated character in mixed case" <| test "longest reported english isogram" <|
\() -> \() ->
Expect.equal False <| isIsogram "Alphabet" Expect.equal True <| isIsogram "subdermatoglyphic"
, test "hypothetical isogrammic word with hyphen" <| , skip <|
\() -> test "word with duplicated character in mixed case" <|
Expect.equal True <| isIsogram "thumbscrew-japingly" \() ->
, test "isogram with duplicated non letter character" <| Expect.equal False <| isIsogram "Alphabet"
\() -> , skip <|
Expect.equal True <| isIsogram "Hjelmqvist-Gryb-Zock-Pfund-Wax" test "hypothetical isogrammic word with hyphen" <|
, test "made-up name that is an isogram" <| \() ->
\() -> Expect.equal True <| isIsogram "thumbscrew-japingly"
Expect.equal True <| isIsogram "Emily Jung Schwartzkopf" , skip <|
, test "duplicated character in the middle" <| test "isogram with duplicated non letter character" <|
\() -> \() ->
Expect.equal False <| isIsogram "accentor" Expect.equal True <| isIsogram "Hjelmqvist-Gryb-Zock-Pfund-Wax"
, skip <|
test "made-up name that is an isogram" <|
\() ->
Expect.equal True <| isIsogram "Emily Jung Schwartzkopf"
, skip <|
test "duplicated character in the middle" <|
\() ->
Expect.equal False <| isIsogram "accentor"
] ]