castToException Subroutine

public subroutine castToException(obj, cast)

Cast the base class FTObject to the FTException class

Arguments

Type IntentOptional Attributes Name
class(FTObject), POINTER :: obj
class(FTException), POINTER :: cast