[COMMITTED] a68: escape %< and %> in call to sprintf

[Jose E. Marchesi]

Signed-off-by: Jose E. Marchesi <jemarch@gnu.org>

gcc/algol68/ChangeLog

	* a68-parser-brackets.cc (bracket_check_error): Escape %< and
	%> in call to printf.
---
 gcc/algol68/a68-parser-brackets.cc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gcc/algol68/a68-parser-brackets.cc b/gcc/algol68/a68-parser-brackets.cc
index 70efb4cad08..38aa9f3c820 100644
--- a/gcc/algol68/a68-parser-brackets.cc
+++ b/gcc/algol68/a68-parser-brackets.cc
@@ -51,7 +51,7 @@ bracket_check_error (char *txt, int n, const char *bra, const char *ket,
   const char *strop_bra = a68_strop_keyword (bra);
 
   BUFCLR (buf);
-  if (snprintf (buf, SNPRINTF_SIZE, "missing matching %<%s%>",
+  if (snprintf (buf, SNPRINTF_SIZE, "missing matching %%<%s%%>",
 		(n > 0 ? strop_ket : strop_bra)) < 0)
     gcc_unreachable ();
 
-- 
2.39.5