[binutils-gdb] gdb/testsuite: escape '*' character in pattern used by flang

[Andrew Burgess]

https://sourceware.org/git/gitweb.cgi?p=binutils-gdb.git;h=8a222a6b0ffd3b70b511fb067557b9a57a958315

commit 8a222a6b0ffd3b70b511fb067557b9a57a958315
Author: Andrew Burgess <andrew.burgess@embecosm.com>
Date:   Wed Jun 2 09:47:23 2021 +0100

    gdb/testsuite: escape '*' character in pattern used by flang
    
    One of the integer type patterns used by flang included a '*'
    character which was not escaped.
    
    gdb/testsuite/ChangeLog:
    
            * lib/fortran.exp (fortran_int8): Escape '*' in pattern.

Diff:
---
 gdb/testsuite/ChangeLog       | 4 ++++
 gdb/testsuite/lib/fortran.exp | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 016bb722037..3b7169638e7 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2021-06-02  Andrew Burgess  <andrew.burgess@embecosm.com>
+
+	* lib/fortran.exp (fortran_int8): Escape '*' in pattern.
+
 2021-06-01  Tom Tromey  <tromey@adacore.com>
 
 	* Makefile.in (all): Don't print anything.
diff --git a/gdb/testsuite/lib/fortran.exp b/gdb/testsuite/lib/fortran.exp
index 35db863e9c8..f8c442fd09c 100644
--- a/gdb/testsuite/lib/fortran.exp
+++ b/gdb/testsuite/lib/fortran.exp
@@ -49,7 +49,7 @@ proc fortran_int8 {} {
     } elseif {[test_compiler_info {gcc-*}]} {
 	return "integer\\(kind=8\\)"
     } elseif {[test_compiler_info {clang-*}]} {
-	return "integer*8"
+	return "integer\\*8"
     } elseif {[test_compiler_info {icc-*}]} {
 	return "INTEGER\\(8\\)"
     } else {