From 0ecb74af2a773669a267b50e4143cc2528687286 Mon Sep 17 00:00:00 2001 From: ronny Date: Fri, 20 Sep 2002 09:51:25 +0000 Subject: removed SK_GeneratedCaseFunction: it's not necessary any more, because there are no function generated in convertDynamics git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1202 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d --- frontend/convertcases.icl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'frontend/convertcases.icl') diff --git a/frontend/convertcases.icl b/frontend/convertcases.icl index c8822ad..c692a4d 100644 --- a/frontend/convertcases.icl +++ b/frontend/convertcases.icl @@ -1081,7 +1081,7 @@ newFunctionWithType opt_id fun_bodies local_vars fun_type group_index (cs_next_f , fun_lifted = 0 , fun_info = { EmptyFunInfo & fi_group_index = group_index, fi_local_vars = local_vars } } - = ({ symb_name = fun_id, symb_kind = SK_GeneratedCaseFunction fun_def_ptr cs_next_fun_nr }, + = ({ symb_name = fun_id, symb_kind = SK_GeneratedFunction fun_def_ptr cs_next_fun_nr }, (inc cs_next_fun_nr, [fun_def_ptr : cs_new_functions], cs_fun_heap <:= (fun_def_ptr, FI_Function { gf_fun_def = fun_def, gf_instance_info = II_Empty, gf_fun_index = cs_next_fun_nr, gf_cons_args = {cc_size=0, cc_args = [], cc_linear_bits = [], cc_producer = False} }))) -- cgit v1.2.3