aboutsummaryrefslogtreecommitdiff
path: root/frontend/syntax.dcl
diff options
context:
space:
mode:
authorjohnvg2006-07-17 12:59:40 +0000
committerjohnvg2006-07-17 12:59:40 +0000
commit768e35f9e2cdc75905b6b56927cf042820480b6a (patch)
treeccb759ab73bad9968dcd12e4808b480591c11de3 /frontend/syntax.dcl
parentsubstitute TA_RootVar when expanding type synonyms (diff)
fix bug in anonymizeAttrVars, the previous algorithm replaced attribute
variables occuring before different type variables by a '.'. git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1604 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/syntax.dcl')
-rw-r--r--frontend/syntax.dcl7
1 files changed, 6 insertions, 1 deletions
diff --git a/frontend/syntax.dcl b/frontend/syntax.dcl
index d7b5a11..bed2d9c 100644
--- a/frontend/syntax.dcl
+++ b/frontend/syntax.dcl
@@ -964,7 +964,12 @@ cNonRecursiveAppl :== False
| AVI_Forward !TempAttrId
| AVI_CorrespondenceNumber !Int /* auxiliary used in module comparedefimp */
| AVI_Used
- | AVI_Count !Int /* auxiliary used in module typesupport */
+ /* auxiliary constructors used in anonymizeAttrVars in module typesupport: */
+ | AVI_CountZero
+ | AVI_CountOne
+ | AVI_CountMany
+ | AVI_CountVar !TypeVarInfoPtr
+ /* */
| AVI_SequenceNumber !Int // RWS
| AVI_Collected // RWS