From d0e49e5993aa362f2dab239dbfda4fbe77c6500f Mon Sep 17 00:00:00 2001
From: johnvg
Date: Fri, 30 Nov 2001 15:07:00 +0000
Subject: store predefined identifiers in CAF

git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@912 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
---
 backend/backendconvert.icl   | 2 +-
 backend/backendinterface.icl | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

(limited to 'backend')

diff --git a/backend/backendconvert.icl b/backend/backendconvert.icl
index b80b0e6..98d92b5 100644
--- a/backend/backendconvert.icl
+++ b/backend/backendconvert.icl
@@ -462,7 +462,7 @@ backEndConvertModulesH predefs {fe_icl =
 	#! backEnd
 		=	adjustStrictListFunctions fe_arrayInstances.ali_list_first_instance_indices fe_arrayInstances.ali_tail_strict_list_first_instance_indices predefs fe_dcls icl_used_module_numbers main_dcl_module_n backEnd;
 	#! (rules, backEnd)
-		=	convertRules [(index, icl_functions.[index]) \\ (_, index) <- functionIndices] main_dcl_module_n predefs.[PD_DummyForStrictAliasFun].pds_ident (backEnd -*-> "convertRules")
+		=	convertRules [(index, icl_functions.[index]) \\ (_, index) <- functionIndices] main_dcl_module_n predefined_idents.[PD_DummyForStrictAliasFun] (backEnd -*-> "convertRules")
 	#! backEnd
 		=	appBackEnd (BEDefineRules rules) (backEnd -*-> "BEDefineRules")
 	#! backEnd
diff --git a/backend/backendinterface.icl b/backend/backendinterface.icl
index da493d2..afb53af 100644
--- a/backend/backendinterface.icl
+++ b/backend/backendinterface.icl
@@ -47,7 +47,7 @@ backEndInterface outputFileName commandLineArgs listTypes typesPath predef_symbo
 	| not compatible
 		=	(False, var_heap, attrHeap, errorFile, files)
 	# varHeap
-		=	backEndPreprocess predef_symbols.[PD_DummyForStrictAliasFun].pds_ident functionIndices fe_icl var_heap
+		=	backEndPreprocess predefined_idents.[PD_DummyForStrictAliasFun] functionIndices fe_icl var_heap
 		with
 			functionIndices
 				=	flatten [[member \\ member <- group.group_members] \\ group <-: fe_components]
-- 
cgit v1.2.3