diff options
Diffstat (limited to 'frontend/parse.icl')
| -rw-r--r-- | frontend/parse.icl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/frontend/parse.icl b/frontend/parse.icl index f008f38..57dfa52 100644 --- a/frontend/parse.icl +++ b/frontend/parse.icl @@ -466,7 +466,8 @@ where # (token, pState) = nextToken FunctionContext pState = case token of GenericOpenToken // generic function - # (type, pState) = wantType pState + //# (type, pState) = wantType pState + # (ok, {at_type=type}, pState) = trySimpleType TA_None pState # (ident, pState) = stringToIdent name (IC_GenericCase type) pState # (type_CONS_ident, pState) = stringToIdent "CONS" IC_Type pState # (type_FIELD_ident, pState)= stringToIdent "FIELD" IC_Type pState |