aucun Implicite - Type explicite - Interface abstraite - Erreur

Question

Le code Fortran suivant:

module Mod 
    implicit none 

    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 

produit une erreur si compilé avec ifort:

erreur # 6404: Ce nom ne dispose pas d'un type et doit avoir un type explicite. [F]

Pourquoi? Est-ce un bug?

Answer 1

Il s'agit probablement d'un compilateur à court terme. Les compilateurs Cray et IBM peuvent aussi compiler ce module spécifique, comme gfortran 4.6.1. En fonction de ce que vous voulez réaliser, vous pourriez peut-être utiliser des procédures génériques liées au type à la place, mais je ne suis pas sûr, si cela serait mieux supporté par le compilateur Intel.