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
---
 frontend/overloading.icl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'frontend/overloading.icl')

diff --git a/frontend/overloading.icl b/frontend/overloading.icl
index bdc55d0..0a95fd4 100644
--- a/frontend/overloading.icl
+++ b/frontend/overloading.icl
@@ -1636,7 +1636,8 @@ where
 
 		getSymbol :: !Int !(!(Global !Int) -> !SymbKind) !Int !*UpdateInfo -> (SymbIdent,*UpdateInfo)
 		getSymbol index symb_kind arity ui=:{ui_x}
-			# ({pds_module, pds_def, pds_ident}, ui_x) = ui_x!x_predef_symbols.[index]
+			# ({pds_module, pds_def}, ui_x) = ui_x!x_predef_symbols.[index]
+			# pds_ident = predefined_idents.[index]
 			  symbol = { symb_name = pds_ident, symb_kind = symb_kind { glob_module = pds_module, glob_object = pds_def}, symb_arity = arity }
 			= (symbol, { ui & ui_x = ui_x})
 
-- 
cgit v1.2.3