diff options
Diffstat (limited to 'frontend/parse.icl')
| -rw-r--r-- | frontend/parse.icl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/frontend/parse.icl b/frontend/parse.icl index 8ae7c78..14ec95e 100644 --- a/frontend/parse.icl +++ b/frontend/parse.icl @@ -1655,8 +1655,7 @@ where (name, pState) = wantConstructorName "Type name" pState (ident, pState) = stringToIdent name IC_Type pState // -->> ("Type name",name) (args, pState) = parseList tryAttributedTypeVar pState - (contexts, pState) = optionalContext pState - = (MakeTypeDef ident args (ConsList []) attr contexts pos, annot, pState) + = (MakeTypeDef ident args (ConsList []) attr pos, annot, pState) want_type_rhs :: !Token !ParseContext !ParsedTypeDef !Annotation !ParseState -> (ParsedDefinition, !ParseState) want_type_rhs EqualToken parseContext td=:{td_ident,td_attribute} annot pState |