diff options
author | johnvg | 2006-11-23 12:40:06 +0000 |
---|---|---|
committer | johnvg | 2006-11-23 12:40:06 +0000 |
commit | 7e6155bcb838ada5c86b486d8c906bd14282e91d (patch) | |
tree | 4e73a05250a0729ab57d509a59e8087aad33ddb9 /frontend/overloading.icl | |
parent | report an error if an existential type is used (diff) |
fix bug that may occur if a TC class is used in a context of a class, that
is also used in a context of a class
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1628 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/overloading.icl')
-rw-r--r-- | frontend/overloading.icl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/frontend/overloading.icl b/frontend/overloading.icl index 36bb1e6..00c384a 100644 --- a/frontend/overloading.icl +++ b/frontend/overloading.icl @@ -929,7 +929,7 @@ expressionToTypeCodeExpression (TypeCodeExpression texpr) expressionToTypeCodeExpression (ClassVariable var_info_ptr) = TCE_TypeTerm var_info_ptr expressionToTypeCodeExpression (Selection NormalSelector (ClassVariable var_info_ptr) selectors) - = TCE_Selector (init selectors) var_info_ptr + = TCE_Selector selectors var_info_ptr expressionToTypeCodeExpression expr = abort "expressionToTypeCodeExpression (overloading.icl)" |