Bug#1057476: flang-17: flang-new-17 fails to compile code that gfortran accepts

[Alastair McKinstry]

Package: flang-17
Version: 17.0.6-1
Severity: normal
Tags: upstream

Taking code "mo_cdi.f90" from the package "cdo",
flang-new-17 -c mo_cdi.f90 gives:
"""
error: loc("/home/alastair/git/dh-fortran-mod/tests/flang-17/../mo_cdi.f90":19:16): redefinition of symbol named 'free'
error: Lowering to LLVM IR failed
"""

The code mo_cdi.f90 looks like:
"""
module mo_cdi
  use iso_c_binding
  implicit none
  private

  public ctrim
  public c_len

  interface
    integer(c_size_t) function lib_strlen(charPtr) bind(c, name = "strlen")
      import c_size_t, c_ptr
      type(c_ptr), value :: charPtr
    end function lib_strlen

    subroutine lib_free(ptr) bind(c, name = "free")
      import c_ptr
      type(c_ptr), value, intent(in) :: ptr
    end subroutine lib_free
  end interface
"""



-- System Information:
Debian Release: 12.2
  APT prefers stable-security
  APT policy: (500, 'stable-security'), (500, 'stable')
Architecture: amd64 (x86_64)

Kernel: Linux 6.1.0-13-amd64 (SMP w/4 CPU threads; PREEMPT)
Locale: LANG=en_IE.UTF-8, LC_CTYPE=en_IE.UTF-8 (charmap=UTF-8) (ignored: LC_ALL set to en_IE.UTF-8), LANGUAGE=en_IE:en
Shell: /bin/sh linked to /usr/bin/dash
Init: systemd (via /run/systemd/system)
LSM: AppArmor: enabled