a68: fix error format string in Archive_file::initilize_big_archive

Signed-off-by: Jose E. Marchesi <jemarch@gnu.org>
gcc/algol68/ChangeLog

	* a68-imports-archive.cc (Archive_file::initialize_big_archive):
	Fix formatting tag in call to a68_error.

diff --git a/gcc/algol68/a68-imports-archive.cc b/gcc/algol68/a68-imports-archive.cc
index 2fcbdc2b14244959b87ff94c23d86e3a2cd69b29..ab8982268220bc4da8c229063b5d6654c9799948 100644 (file)
--- a/gcc/algol68/a68-imports-archive.cc
+++ b/gcc/algol68/a68-imports-archive.cc
@@ -301,7 +301,7 @@ Archive_file::initialize_big_archive()
       memcpy(buf, flhdr.fl_fstmoff, sizeof(flhdr.fl_fstmoff));
       a68_error (NO_NODE,
                 ("%s: malformed first member offset in archive header"
-                   " (expected decimal, got Z)"),
+                   " (expected decimal, got %qs)"),
                   this->filename_.c_str(), buf);
       delete[] buf;
       return false;