aboutsummaryrefslogtreecommitdiff
path: root/backend
diff options
context:
space:
mode:
authorronny2001-09-26 11:54:52 +0000
committerronny2001-09-26 11:54:52 +0000
commit6a9f4e59658d44ec5e551974167fa163a7d0a43b (patch)
tree2c0a26a460a73dd274327c404273cac5f8e395e0 /backend
parentremoved kind correctness checking module (diff)
removed erroneous, unused function
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@804 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'backend')
-rw-r--r--backend/backendconvert.icl7
1 files changed, 0 insertions, 7 deletions
diff --git a/backend/backendconvert.icl b/backend/backendconvert.icl
index 351e34c..17baf60 100644
--- a/backend/backendconvert.icl
+++ b/backend/backendconvert.icl
@@ -1270,13 +1270,6 @@ adjustArrayFunctions array_first_instance_indices/*arrayInstancesRange*/ predefs
= beAdjustArrayFunction mapping.[member_index] index main_dcl_module_n
o` adjustIclArrayInstanceMembers (index+1) next_member_index
- foldStateWithIndexRangeA index
- | index == to
- = identity
- // otherwise
- = function index array.[index]
- o` foldStateWithIndexRangeA (index+1)
-
convertRules :: [(Int, FunDef)] Int Ident *BackEndState -> (BEImpRuleP, *BackEndState)
convertRules rules main_dcl_module_n aliasDummyId be
# (null, be)