From 1784265ebe7ddab5ce73c279bfafee18fb0b17b7 Mon Sep 17 00:00:00 2001 From: Mark Simpson Date: Tue, 31 Dec 2024 20:16:16 -0500 Subject: [PATCH] Add missing test to pig-latin --- exercises/practice/pig-latin/.meta/tests.toml | 3 +++ exercises/practice/pig-latin/pig-latin-test.lisp | 4 ++++ 2 files changed, 7 insertions(+) diff --git a/exercises/practice/pig-latin/.meta/tests.toml b/exercises/practice/pig-latin/.meta/tests.toml index 49ce6e11..8fcf49e8 100644 --- a/exercises/practice/pig-latin/.meta/tests.toml +++ b/exercises/practice/pig-latin/.meta/tests.toml @@ -67,3 +67,6 @@ description = "y as second letter in two letter word" [44616581-5ce3-4a81-82d0-40c7ab13d2cf] description = "a whole phrase" + +[e59dbbe8-ccee-4619-a8e9-ce017489bfc0] +description = "word beginning with consonant and vowel containing qu" \ No newline at end of file diff --git a/exercises/practice/pig-latin/pig-latin-test.lisp b/exercises/practice/pig-latin/pig-latin-test.lisp index ea77fd16..674a4018 100644 --- a/exercises/practice/pig-latin/pig-latin-test.lisp +++ b/exercises/practice/pig-latin/pig-latin-test.lisp @@ -39,6 +39,10 @@ (let ((phrase "equal")) (is (string= "equalay" (pig-latin:translate phrase))))) +(test word-beginning-with-consonant-and-vowel-containing-qu + (let ((phrase "liquid")) + (is (string= "iquidlay" (pig-latin:translate phrase))))) + (test word-beginning-with-p (let ((phrase "pig")) (is (string= "igpay" (pig-latin:translate phrase)))))