improved test case for to_title

aman-godara · aman-godara · commit c85eb1a9f2b3 · 2021-05-21T23:33:02.000+05:30
diff --git a/src/tests/string/test_string_functions.f90 b/src/tests/string/test_string_functions.f90
@@ -27,8 +27,8 @@ end subroutine test_to_upper_string
 
     subroutine test_to_title_string
         type(string_type) :: test_string, compare_string
-        test_string = "tO t!TL3 7h1S p#ra$e"
-        compare_string = "To T!Tl3 7h1s P#Ra$E"
+        test_string = "tO_%t!TL3 7h1S p#ra$e"
+        compare_string = "To_%T!Tl3 7h1s P#Ra$E"
 
         call check(to_title(test_string) == compare_string)
 
