Create directly copy/pastable test message

For easier debugging
Raku · Apr 19, 2019 · 6357b3c · 6357b3c
1 parent 53953b2
commit 6357b3c
Show file tree

Hide file tree

Showing 9 changed files with 13 additions and 13 deletions.
diff --git a/S32-str/sprintf-b.t b/S32-str/sprintf-b.t
@@ -200,9 +200,9 @@ for @info -> $format, @tests {
 
         for @tests {
             is-deeply sprintf($format, |.value), .key,
-              "sprintf('$format',{.value}) eq '{.key}'";
+              qq/sprintf("$format",{.value.list.join(",")}) eq '{.key}'/;
             is-deeply sprintf($format.uc, |.value), .key.uc,
-              "sprintf('{$format.uc}',{.value}) eq '{.key.uc}'";
+              qq/sprintf("{$format.uc}",{.value.list.join(",")}) eq '{.key.uc}'/;
         }
     }, "Tested '$format'";
 }

diff --git a/S32-str/sprintf-c.t b/S32-str/sprintf-c.t
@@ -69,7 +69,7 @@ for @info -> $format, @tests {
         plan +@tests;
 
         is-deeply sprintf($format, |.value), .key,
-          "sprintf('$format',{.value}) eq '{.key}'"
+          qq/sprintf("$format",{.value.list.join(",")}) eq '{.key}'/
           for @tests;
 
     }, "Tested '$format'";

diff --git a/S32-str/sprintf-d.t b/S32-str/sprintf-d.t
@@ -235,7 +235,7 @@ for @info -> $format, @tests {
         plan +@tests;
 
         is-deeply sprintf($format, |.value), .key,
-          "sprintf('$format',{.value}) eq '{.key}'"
+          qq/sprintf("$format",{.value.list.join(",")}) eq '{.key}'/
           for @tests;
     }, "Tested '$format'";
 }

diff --git a/S32-str/sprintf-e.t b/S32-str/sprintf-e.t
@@ -124,9 +124,9 @@ for @info -> $format, @tests {
 
         for @tests {
             is-deeply sprintf($format, |.value), .key,
-              "sprintf('$format',{.value}) eq '{.key}'";
+              qq/sprintf("$format",{.value.list.join(",")}) eq '{.key}'/;
             is-deeply sprintf($format.uc, |.value), .key.uc,
-              "sprintf('$format.uc()',{.value}) eq '{.key.uc}'";
+              qq/sprintf("{$format.uc}",{.value.list.join(",")}) eq '{.key.uc}'/;
         }
     }, "Tested '$format'";
 }

diff --git a/S32-str/sprintf-f.t b/S32-str/sprintf-f.t
@@ -125,9 +125,9 @@ for @info -> $format, @tests {
 
         for @tests {
             is-deeply sprintf($format, |.value), .key,
-              "sprintf('$format',{.value}) eq '{.key}'";
+              qq/sprintf("$format",{.value.list.join(",")}) eq '{.key}'/;
             is-deeply sprintf($format.uc, |.value), .key.uc,
-              "sprintf('{$format.uc}',{.value}) eq '{.key.uc}'";
+              qq/sprintf("{$format.uc}",{.value.list.join(",")}) eq '{.key.uc}'/;
         }
     }, "Tested '$format'";
 }

diff --git a/S32-str/sprintf-o.t b/S32-str/sprintf-o.t
@@ -205,7 +205,7 @@ for @info -> $format, @tests {
         plan +@tests;
 
         is-deeply sprintf($format, |.value), .key,
-          "sprintf('$format',{.value}0) eq '{.key}'"
+          qq/sprintf("$format",{.value.list.join(",")}) eq '{.key}'/
           for @tests;
     }, "Tested '$format'";
 }

diff --git a/S32-str/sprintf-s.t b/S32-str/sprintf-s.t
@@ -123,7 +123,7 @@ for @info -> $format, @tests {
         plan +@tests;
 
         is-deeply sprintf($format, |.value), .key,
-          "sprintf('$format',{.value}) eq '{.key}'"
+          qq/sprintf("$format",{.value.list.join(",")}) eq '{.key}'/
           for @tests;
     }, "Tested '$format'";
 }

diff --git a/S32-str/sprintf-u.t b/S32-str/sprintf-u.t
@@ -86,7 +86,7 @@ for @info -> $format, @tests {
         plan +@tests;
 
         is-deeply sprintf($format, |.value), .key,
-          "sprintf('$format',{.value}) eq '{.key}'"
+          qq/sprintf("$format",{.value.list.join(",")}) eq '{.key}'/
           for @tests;
     }, "Tested '$format'";
 }

diff --git a/S32-str/sprintf-x.t b/S32-str/sprintf-x.t
@@ -206,9 +206,9 @@ for @info -> $format, @tests {
 
         for @tests {
             is-deeply sprintf($format, |.value), .key,
-              "sprintf('$format',{.value}) eq '{.key}'";
+              qq/sprintf("$format",{.value.list.join(",")}) eq '{.key}'/;
             is-deeply sprintf($format.uc, |.value), .key.uc,
-              "sprintf('{$format.uc}',{.value}) eq '{.key.uc}'";
+              qq/sprintf("{$format.uc}",{.value.list.join(",")}) eq '{.key.uc}'/;
         }
     }, "Tested '$format'";
 }