aboutsummaryrefslogtreecommitdiff
path: root/frontend/classify.icl
diff options
context:
space:
mode:
authorjohnvg2011-04-19 11:37:59 +0000
committerjohnvg2011-04-19 11:37:59 +0000
commitd0ae22e4b794606ef99dc124b8b40a93cc24f9ba (patch)
treee880d814aef67ca23e44808a4b30f054606dbc13 /frontend/classify.icl
parentadd instance declarations with a qualified class name (diff)
use unique array select and update instead of replace
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1930 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/classify.icl')
-rw-r--r--frontend/classify.icl2
1 files changed, 1 insertions, 1 deletions
diff --git a/frontend/classify.icl b/frontend/classify.icl
index d7c18bc..25b8837 100644
--- a/frontend/classify.icl
+++ b/frontend/classify.icl
@@ -1409,7 +1409,7 @@ substitute_dep_counts component_members ai_group_counts
where
build_known :: !*{!RefCounts} -> (!*{*{#Bool}},!*{!RefCounts})
build_known t
- = arrayAndElementsCopy {} (\e->(createArray (size e) False,e)) t
+ = arrayAndElementsCopy (\e->(createArray (size e) False,e)) t
subst_non_zero :: ![(!FunIndex,!ArgIndex)] !FunIndex !ArgIndex !FunIndex !ArgIndex !*{*{#Bool}} !*{!RefCounts}-> *{!RefCounts}
subst_non_zero iter fi ai fm am known rcs