record_extension_part ::= "with" record_definition
This rule is called by -> derived_type_definition
-> derived_type_definition