diff --git a/src/psyclone/psyir/backend/fortran.py b/src/psyclone/psyir/backend/fortran.py index 3a1514131d..34a705588d 100644 --- a/src/psyclone/psyir/backend/fortran.py +++ b/src/psyclone/psyir/backend/fortran.py @@ -122,6 +122,8 @@ def gen_datatype(datatype, name): ''' if isinstance(datatype, DataTypeSymbol): # Symbol is of derived type + if datatype.is_class: + return f"class({datatype.name})" return f"type({datatype.name})" if (isinstance(datatype, ArrayType) and