diff options
| author | johnvg | 2005-09-16 13:59:14 +0000 |
|---|---|---|
| committer | johnvg | 2005-09-16 13:59:14 +0000 |
| commit | 0ae58d602fa6d478d88f501ce77663a34c6334e7 (patch) | |
| tree | 01b3c4afcef039e277ad1772615d8d74bd05692d /frontend/unitype.dcl | |
| parent | make function markPatternVariables recursive to report an error (diff) | |
make line number in the
"demanded attribute cannot be offered by shared object" error
message more accurate,
store position in CaseAlt (added field calt_position)
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1544 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/unitype.dcl')
| -rw-r--r-- | frontend/unitype.dcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/frontend/unitype.dcl b/frontend/unitype.dcl index 4b2dee4..12512e2 100644 --- a/frontend/unitype.dcl +++ b/frontend/unitype.dcl @@ -53,7 +53,7 @@ tryToMakeNonUnique :: !Int !*Coercions -> (!Bool, !*Coercions) tryToMakeUnique :: !Int !*Coercions -> (!Bool, !*Coercions) -uniquenessError :: !CoercionPosition !String !*ErrorAdmin -> *ErrorAdmin +uniquenessErrorVar :: !FreeVar !FunctionBody !String !*ErrorAdmin -> *ErrorAdmin liftSubstitution :: !*{! Type} !{# CommonDefs }!{# BOOLVECT } !Int !*TypeHeaps !*TypeDefInfos -> (*{! Type}, !Int, !*TypeHeaps, !*TypeDefInfos) |