[COMMITTED] testsuite: escape literal dots in dg-output blocks

[Jose E. Marchesi]

2024-09-20  Jose E. Marchesi  <jemarch@gnu.org>

        * testsuite/poke.cmd/set-oacutoff-2.pk: Escape dots in regexps.
        * testsuite/poke.pkl/printf-25.pk: Likewise.
        * testsuite/poke.pkl/format-28.pk: Likewise.
        * testsuite/poke.pkl/format-20.pk: Likewise.
        * testsuite/poke.pkl/format-19.pk: Likewise.
        * testsuite/poke.cmd/set-oindent.pk: Likewise.
        * testsuite/poke.cmd/set-odepth-1.pk: Likewise.
---
 ChangeLog                            | 10 ++++++++++
 testsuite/poke.cmd/set-oacutoff-2.pk |  2 +-
 testsuite/poke.cmd/set-odepth-1.pk   |  4 ++--
 testsuite/poke.cmd/set-oindent.pk    |  2 +-
 testsuite/poke.pkl/format-19.pk      |  2 +-
 testsuite/poke.pkl/format-20.pk      |  2 +-
 testsuite/poke.pkl/format-28.pk      |  2 +-
 testsuite/poke.pkl/printf-25.pk      |  2 +-
 8 files changed, 18 insertions(+), 8 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 676fab48..d09c69f7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,13 @@
+2024-09-20  Jose E. Marchesi  <jemarch@gnu.org>
+
+       * testsuite/poke.cmd/set-oacutoff-2.pk: Escape dots in regexps.
+       * testsuite/poke.pkl/printf-25.pk: Likewise.
+       * testsuite/poke.pkl/format-28.pk: Likewise.
+       * testsuite/poke.pkl/format-20.pk: Likewise.
+       * testsuite/poke.pkl/format-19.pk: Likewise.
+       * testsuite/poke.cmd/set-oindent.pk: Likewise.
+       * testsuite/poke.cmd/set-odepth-1.pk: Likewise.
+
 2024-09-20  Jose E. Marchesi  <jemarch@gnu.org>
 
        * poke/poke.c (initialize): Enable pretty-printing, tree output
diff --git a/testsuite/poke.cmd/set-oacutoff-2.pk 
b/testsuite/poke.cmd/set-oacutoff-2.pk
index 58d6b9b7..90ac94df 100644
--- a/testsuite/poke.cmd/set-oacutoff-2.pk
+++ b/testsuite/poke.cmd/set-oacutoff-2.pk
@@ -2,4 +2,4 @@
 
 /* { dg-command { .set oacutoff 3 } } */
 /* { dg-command { [1,2,3,4,5] } } */
-/* { dg-output "\\\[1,2,3,...\\\]" } */
+/* { dg-output "\\\[1,2,3,\.\.\.\\\]" } */
diff --git a/testsuite/poke.cmd/set-odepth-1.pk 
b/testsuite/poke.cmd/set-odepth-1.pk
index 7e7b7cb4..65deb4d0 100644
--- a/testsuite/poke.cmd/set-odepth-1.pk
+++ b/testsuite/poke.cmd/set-odepth-1.pk
@@ -8,10 +8,10 @@
 /* { dg-command { type Foo = struct { byte b; } } } */
 /* { dg-command { type Bar = struct { Foo foo; } } } */
 /* { dg-command { Bar @ 0#B } } */
-/* { dg-output "Bar \{foo=Foo \{...\}\}" } */
+/* { dg-output "Bar \{foo=Foo \{\.\.\.\}\}" } */
 
 /* { dg-command { .set omode tree } } */
 /* { dg-command { Bar @ 0#B } } */
 /* { dg-output "\nBar \{" } */
-/* { dg-output "\n  foo=Foo \{...\}" } */
+/* { dg-output "\n  foo=Foo \{\.\.\.\}" } */
 /* { dg-output "\n\}" } */
diff --git a/testsuite/poke.cmd/set-oindent.pk 
b/testsuite/poke.cmd/set-oindent.pk
index cfd15a28..3342ce88 100644
--- a/testsuite/poke.cmd/set-oindent.pk
+++ b/testsuite/poke.cmd/set-oindent.pk
@@ -10,5 +10,5 @@
 /* { dg-command { type Bar = struct { Foo foo; } } } */
 /* { dg-command { Bar @ 0#B } } */
 /* { dg-output "Bar \{" } */
-/* { dg-output "\n    foo=Foo \{...\}" } */
+/* { dg-output "\n    foo=Foo \{\.\.\.\}" } */
 /* { dg-output "\n\}" } */
diff --git a/testsuite/poke.pkl/format-19.pk b/testsuite/poke.pkl/format-19.pk
index 8cc53c5a..3bb8b56f 100644
--- a/testsuite/poke.pkl/format-19.pk
+++ b/testsuite/poke.pkl/format-19.pk
@@ -2,4 +2,4 @@
 
 /* { dg-command {vm_set_oacutoff (4)} } */
 /* { dg-command {format("%v", ["GNU", "poke", "by", "Jose", "Marchesi"])} } */
-/* { dg-output {"\[\\"GNU\\",\\"poke\\",\\"by\\",\\"Jose\\",...]"} } */
+/* { dg-output {"\[\\"GNU\\",\\"poke\\",\\"by\\",\\"Jose\\",\.\.\.]"} } */
diff --git a/testsuite/poke.pkl/format-20.pk b/testsuite/poke.pkl/format-20.pk
index 5acf579c..af86e125 100644
--- a/testsuite/poke.pkl/format-20.pk
+++ b/testsuite/poke.pkl/format-20.pk
@@ -4,4 +4,4 @@
 /* { dg-command {vm_set_omaps (1)} } */
 /* { dg-command {vm_set_oacutoff (3)} } */
 /* { dg-command {format("%v", ["GNU", "poke", "by", "Jose", "Marchesi"])} } */
-/* { dg-output {"\[\\"GNU\\" @ 0UL#B,\\"poke\\" @ 4UL#B,\\"by\\" @ 9UL#B,...] 
@ 0UL#B"} } */
+/* { dg-output {"\[\\"GNU\\" @ 0UL#B,\\"poke\\" @ 4UL#B,\\"by\\" @ 
9UL#B,\.\.\.] @ 0UL#B"} } */
diff --git a/testsuite/poke.pkl/format-28.pk b/testsuite/poke.pkl/format-28.pk
index a96bfddc..2ef4576d 100644
--- a/testsuite/poke.pkl/format-28.pk
+++ b/testsuite/poke.pkl/format-28.pk
@@ -14,4 +14,4 @@ type S = struct
 /* { dg-command {vm_set_obase (10)} } */
 /* { dg-command {vm_set_omaps (1)} } */
 /* { dg-command {format("%1v", S{})} } */
-/* { dg-output {S {ex=E {...} @ 0UL#B} @ 0UL#B} } */
+/* { dg-output {S {ex=E {\.\.\.} @ 0UL#B} @ 0UL#B} } */
diff --git a/testsuite/poke.pkl/printf-25.pk b/testsuite/poke.pkl/printf-25.pk
index 6a5a994a..f3ba3277 100644
--- a/testsuite/poke.pkl/printf-25.pk
+++ b/testsuite/poke.pkl/printf-25.pk
@@ -6,6 +6,6 @@ type StructB = struct { StructA s; long l; };
 printf ("%1Tv\n", StructB { s = StructA { i = 10 },  l = 20L });
 
 /* { dg-output "StructB \{" } */
-/* { dg-output "\n  s=StructA \{...\}," } */
+/* { dg-output "\n  s=StructA \{\.\.\.\}," } */
 /* { dg-output "\n  l=20L" } */
 /* { dg-output "\n\}" } */
-- 
2.30.2