Issue 128752
Summary [Flang] Missing diagnostic on duplicate defined I/O
Labels flang:frontend
Assignees
Reporter DanielCChen
    Consider the following code:
```
module m
    type base
        integer id

 contains

        generic :: write (formatted) => write
 procedure, private :: write => writeb
    end type

    abstract interface
        subroutine absWrite (dtv, unit, iotype, v_list, iostat, iomsg)
        import
            class(base), intent(in) :: dtv
 integer, intent(in) :: unit
            character(*), intent(in) :: iotype
            integer, intent(in)  :: v_list(:)
            integer, intent(out) :: iostat
            character(*), intent(inout) :: iomsg
 end subroutine
    end interface

    procedure(absWrite) writeb, writebaseext

    interface write(formatted)
        procedure writebaseext
    end interface
end module

end

```

Both `writeb` and `writebaseext` have identical interface for the same defined I/O for type `base`. This should be diagnosed as duplicate.
_______________________________________________
llvm-bugs mailing list
llvm-bugs@lists.llvm.org
https://lists.llvm.org/cgi-bin/mailman/listinfo/llvm-bugs

Reply via email to