diff options
Diffstat (limited to 'backend/backendconvert.icl')
-rw-r--r-- | backend/backendconvert.icl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/backend/backendconvert.icl b/backend/backendconvert.icl index aea02aa..9c04f59 100644 --- a/backend/backendconvert.icl +++ b/backend/backendconvert.icl @@ -852,7 +852,7 @@ defineType moduleIndex _ _ typeIndex {td_attribute, td_args, td_rhs=AbstractType = beAbsType (convertTypeLhs moduleIndex typeIndex td_attribute td_args) be defineType moduleIndex _ _ typeIndex {td_attribute, td_args, td_rhs=AbstractSynType _ _} be = beAbsType (convertTypeLhs moduleIndex typeIndex td_attribute td_args) be -defineType moduleIndex constructors _ typeIndex {td_ident, td_attribute, td_args, td_rhs=ExtendableAlgType constructorSymbols} be +defineType moduleIndex constructors _ typeIndex {td_ident, td_attribute, td_args, td_rhs=ExtensibleAlgType constructorSymbols} be # (flatType, be) = convertTypeLhs moduleIndex typeIndex td_attribute td_args be # (constructors, be) = convertConstructors typeIndex td_ident.id_name moduleIndex constructors constructorSymbols be = appBackEnd (BEExtendableAlgebraicType flatType constructors) be |