Possible Bug Visual Fortran XE 12

[mklvml]

module Mod

TYPE derivedtype

procedure(procInterface),POINTER,PASS::f

END TYPE derivedtype

ABSTRACT INTERFACE

subroutine procInterface(A)

import derivedtype

implicit none

class(derivedtype),intent(inout)::A

end subroutine

END INTERFACE

end module Mod

Produces the following error:

error #6404: This name does not have a type, and must have an explicit type.

Why?

[Steven_L_Intel1]

It looks to me as if the "implicit none" is having an effect outside its scope. If you remove that, it compiles. I think this is a bug and will report it. Issue ID is DPD200169057.

[Steven_L_Intel1]

This has been fixed for a future version of the compiler.