The following is non-standard and the compiler should probably generate a warning/error with '-pedantic -std=f95' MODULE TEST PRIVATE TYPE info_type INTEGER :: value END TYPE info_type TYPE all_type TYPE(info_type) :: info END TYPE PUBLIC :: all_type END MODULE END
Confirmed and marked as minor. For info, Intel compiler says: "Component INFO of PUBLIC type ALL_TYPE cannot have a type that is PRIVATE"
This is fixed in all three branches; In file pr20836.f90:6 TYPE all_type 1 Error: The component 'info' is a PRIVATE type and cannot be a component of 'all_type', which is PUBLIC at (1) This was fixed by my patch of 2005-10-01 - I must have missed this PR. Paul