Added more tests for squeeze

usethesource · Jul 16, 2024 · 97131ac · 97131ac
1 parent 7853970
commit 97131ac
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/src/org/rascalmpl/library/lang/rascal/tests/basic/Strings1.rsc b/src/org/rascalmpl/library/lang/rascal/tests/basic/Strings1.rsc
@@ -259,6 +259,11 @@ test bool tstSqueeze3(str S) {
 }
 
 test bool tstSqueezeUnicode() = squeeze("Hi 🍝🍝World", "🍝") == "Hi 🍝World";
+test bool tstSqueezeCase1() = squeeze("abc", "a-c") == "abc";
+test bool tstSqueezeCase2() = squeeze("aabc", "a-c") == "abc";
+test bool tstSqueezeCase3() = squeeze("aabcc", "a-c") == "abc";
+test bool tstSqueezeCase4() = squeeze("aabbcc", "a-c") == "abc";
+test bool tstSqueezeCase5() = squeeze("aaabc", "a-c") == "abc";
 
 
 test bool tstStartsWith(str S1, str S2) = startsWith(S1+S2, S1);