[gcc r15-9224] testsuite, cobol: If libgcobol has a .spec file use it.

[Iain D Sandoe via Gcc-cvs]

https://gcc.gnu.org/g:5b9fd65726afef37ed6a6e39f0ceb7f47160ba07

commit r15-9224-g5b9fd65726afef37ed6a6e39f0ceb7f47160ba07
Author: Iain Sandoe <i...@sandoe.co.uk>
Date:   Sat Mar 15 22:49:16 2025 +0000

    testsuite, cobol: If libgcobol has a .spec file use it.
    
    This conditionally adds a path for libgcobol when that contains
    libgcobol.spec.
    
    gcc/testsuite/ChangeLog:
    
            * lib/cobol.exp: Conditionally add a path for libgcobol.spec.
    
    Signed-off-by: Iain Sandoe <i...@sandoe.co.uk>

Diff:
---
 gcc/testsuite/lib/cobol.exp | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/gcc/testsuite/lib/cobol.exp b/gcc/testsuite/lib/cobol.exp
index cd88bcb66d1c..a0eeb4e64e9a 100644
--- a/gcc/testsuite/lib/cobol.exp
+++ b/gcc/testsuite/lib/cobol.exp
@@ -107,8 +107,11 @@ proc cobol_link_flags { paths } {
     }
 
     if { $gccpath != "" } {
+      if [file exists "${gccpath}/libgcobol/libgcobol.spec"] {
+          append flags "-B${gccpath}/libgcobol "
+      }
       if [file exists "${gccpath}/libgcobol/libgcobol.a"] {
-          append flags "-L${gccpath}/libgcobol"
+          append flags "-L${gccpath}/libgcobol "
       }
       if { [file exists "${gccpath}/libgcobol/.libs/libgcobol.a"] ||
         [file exists "${gccpath}/libgobol/.libs/libgcobol.${shlib_ext}"] } {