https://gcc.gnu.org/g:31c55fb3309b3d64a95b3581b3af4153b6e1746b
commit r17-4530-g31c55fb3309b3d64a95b3581b3af4153b6e1746b Author: Xavier Del Campo Romero <[email protected]> Date: Fri Sep 18 22:34:55 2026 +0200 cobol: Remove stale include dir logic from gcobc These heuristics were applied from a time MF compatibility was still in its infancy, when the directory tree structure for the copybooks was not decided yet. Nowadays, cobol1.cc already includes the relevant directories to the copybooks, so that they can be made available to the user via COPY. gcc/cobol/ChangeLog: * gcobc: Remove stale logic. Diff: --- gcc/cobol/gcobc | 25 ------------------------- 1 file changed, 25 deletions(-) diff --git a/gcc/cobol/gcobc b/gcc/cobol/gcobc index 6e0741cd61fa..447323b75902 100755 --- a/gcc/cobol/gcobc +++ b/gcc/cobol/gcobc @@ -86,31 +86,6 @@ then copydir="-I$COB_COPY_DIR" fi -# TODO: this file likely needs to query gcobol for its shared path instead -udf_default="${0%/*}/../share/gcobol/udf" -if [ ! -d "$udfdir" ] -then - # the one above is the installed one from the packages this one was previously used - udf_default="${0%/*}/../share/cobol/udf" -fi -udfdir="${GCOBCUDF:-$udf_default}" - -if [ -d "$udfdir" ] -then - for F in "$udfdir"/* - do - if [ -f "$F" ] - then - includes="$includes -include $F " - fi - done -else - if [ "${GCOBCUDF:-none}" != "none" ] - then - echo warning: no such directory: "'$GCOBCUDF'" - fi -fi - exit_status=0 skip_arg= opts="$copydir $includes"
