From 09b8e6513db4139d3de775846eb99c82505ab1e4 Mon Sep 17 00:00:00 2001
From: martinw
Date: Mon, 5 Mar 2001 11:38:38 +0000
Subject: bugfix: added missing alternative for SK_LoaclMacroFunction
 (introduced for dcl cashing)

git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@319 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
---
 frontend/overloading.icl | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'frontend')

diff --git a/frontend/overloading.icl b/frontend/overloading.icl
index b27e23a..6fb4c94 100644
--- a/frontend/overloading.icl
+++ b/frontend/overloading.icl
@@ -1212,6 +1212,11 @@ where
 					= fun_index
 					= NoIndex
 				= NoIndex
+		get_recursive_fun_index group_index (SK_LocalMacroFunction glob_object) main_dcl_module_n fun_defs
+			# {fun_info,fun_index} = fun_defs.[glob_object]
+			| fun_info.fi_group_index == group_index
+				= fun_index
+				= NoIndex
 		get_recursive_fun_index group_index _ main_dcl_module_n fun_defs
 			= NoIndex
 
@@ -1600,3 +1605,4 @@ where
 instance <<< TypeCodeInstance
 where
 	(<<<) file {tci_index, tci_contexts} = file <<< tci_index <<< ' ' <<< tci_contexts
+
-- 
cgit v1.2.3