diff options
Diffstat (limited to 'frontend/syntax.dcl')
| -rw-r--r-- | frontend/syntax.dcl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/frontend/syntax.dcl b/frontend/syntax.dcl index 4a05bb2..b1cf44a 100644 --- a/frontend/syntax.dcl +++ b/frontend/syntax.dcl @@ -545,6 +545,8 @@ cIsALocalVar :== False // MdM VI_CPSLocalExprVar !Int /* MdM - the index of the variable as generated by the theorem prover */ // ... MdM + | VI_Labelled_Empty {#Char} // RWS debugging + | VI_LocalLetVar // RWS, mark Let vars during case transformation :: ExtendedVarInfo = EVI_VarType !AType @@ -702,6 +704,7 @@ cNonRecursiveAppl :== False /* for converting case into function patterns the following auxiliary constuctors are used */ + | EI_Default !Expression !AType !ExprInfoPtr | EI_DefaultFunction !SymbIdent ![Expression] | EI_Extended !ExtendedExprInfo !ExprInfo @@ -709,6 +712,7 @@ cNonRecursiveAppl :== False :: ExtendedExprInfo = EEI_ActiveCase !ActiveCaseInfo + :: ActiveCaseInfo = { aci_params :: ![FreeVar] , aci_opt_unfolder :: !(Optional SymbIdent) |