From 6a9f4e59658d44ec5e551974167fa163a7d0a43b Mon Sep 17 00:00:00 2001
From: ronny
Date: Wed, 26 Sep 2001 11:54:52 +0000
Subject: removed erroneous, unused function

git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@804 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
---
 backend/backendconvert.icl | 7 -------
 1 file changed, 7 deletions(-)

(limited to 'backend')

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)
-- 
cgit v1.2.3