[bash]MODULE Application
PRIVATE
TYPE, PUBLIC, ABSTRACT:: t_Application
INTEGER*4:: status = 0
CONTAINS
PROCEDURE, PASS(this):: Initialize
PROCEDURE(Initialize), PASS(this), DEFERRED:: Run
PROCEDURE(Initialize), PASS(this), DEFERRED:: Finalize
END TYPE t_Application
ABSTRACT INTERFACE
FUNCTION Initialize(this)
IMPORT:: t_Application
CLASS(t_Application), INTENT(IN):: &
this
INTEGER*4:: Initialize
END FUNCTION Initialize
END INTERFACE
END MODULE Application[/bash]
If I make the Initialize procedure "DEFERRED", the compiler complains about needing an interface:
Error 1 error #8261: If DEFERRED attribute appears in the type bound procedure definition statement, an interface name must appear. [DEFERRED]
Since I have an interface name declared as an ABSTRACT INTERFACE, I don't see the problem.
If I remove the deferred for the Initialize bound procedure (as is done above), the code compiles.
Why can't I make all the bound procedures deferred?
Best,
Dick Munroe
