From db316c2844cf9b4e7b9261cb44c147600d04c7c9 Mon Sep 17 00:00:00 2001
From: "James K. Lowden" <jklowden@symas.com>
Date: Tue, 28 Jan 2025 15:25:28 -0500
Subject: [PATCH] 1 UAT message
---
gcc/cobol/UAT/testsuite.src/syn_copy.at | 1 -
gcc/cobol/copybook.h | 2 +-
2 files changed, 1 insertion(+), 2 deletions(-)
diff --git a/gcc/cobol/UAT/testsuite.src/syn_copy.at b/gcc/cobol/UAT/testsuite.src/syn_copy.at
index 2fe7026f4dde..d29a4d6e8d57 100644
--- a/gcc/cobol/UAT/testsuite.src/syn_copy.at
+++ b/gcc/cobol/UAT/testsuite.src/syn_copy.at
@@ -285,7 +285,6 @@ AT_CHECK([$COMPILE_ONLY prog.cob], [1], [], [In file included from copy3.CPY:128
copy1.CPY:2:1: error: recursive copybook: 'copy1.CPY' includes itself
2 | COPY copy2.
| ^
-copy1.CPY:2:1: error: copybook 'copy1.CPY' not found
cobol1: error: failed compiling prog.cob
])
AT_CLEANUP
diff --git a/gcc/cobol/copybook.h b/gcc/cobol/copybook.h
index b86dd435d6ff..81a2b27eda1e 100644
--- a/gcc/cobol/copybook.h
+++ b/gcc/cobol/copybook.h
@@ -183,7 +183,7 @@ class copybook_t {
for( auto dir : directories ) {
if( true ) {
- dbgmsg("copybook_t::open( '%s' OF '%s' %s",
+ dbgmsg("copybook_t::open '%s' OF '%s' %s",
book.source.name,
dir? dir: ".",
book.literally.source? ", literally" : "" );
--
GitLab