aboutsummaryrefslogtreecommitdiff
path: root/frontend/overloading.icl
diff options
context:
space:
mode:
authorsjakie2001-10-02 10:10:33 +0000
committersjakie2001-10-02 10:10:33 +0000
commit094a95bee31b84217329eb0e62778600d1e8711b (patch)
tree582360a6c275f3479c61fa8c0f675787256794c6 /frontend/overloading.icl
parentpass file modification times from icl module and dcl modules to backend (diff)
Bug fixes: reference count analysis fixed,
Universally quantified types used in class members git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@811 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/overloading.icl')
-rw-r--r--frontend/overloading.icl2
1 files changed, 1 insertions, 1 deletions
diff --git a/frontend/overloading.icl b/frontend/overloading.icl
index 3218836..e72560f 100644
--- a/frontend/overloading.icl
+++ b/frontend/overloading.icl
@@ -1684,7 +1684,7 @@ where
= equalTypes atype1.at_type atype2.at_type type_var_heap
equalTypeVars {tv_info_ptr} temp_var_id type_var_heap
- #! tv_info = sreadPtr tv_info_ptr type_var_heap
+ # (tv_info, type_var_heap) = readPtr tv_info_ptr type_var_heap
= case tv_info of
TVI_Forward forw_var_number
-> (forw_var_number == temp_var_id, type_var_heap)