Указатель процедуры, производный тип

Следующее не компилируется в Intel Fortran XE 2011:

TYPE type1
    procedure(interface1),POINTER::p
END TYPE type1

ABSTRACT INTERFACE 
    integer function interface1(a)
        real,intent(in)::a    
    END function interface1
END INTERFACE

Ошибка:

error #8262: The passed-object dummy argument must be dummy data object with the same declared type as the type being defined.
6
задан Vladimir F 30 July 2017 в 10:49
поделиться