From 080bac3bac3fe2ffb7c3c57ed8f1f571fa1eb148 Mon Sep 17 00:00:00 2001 From: johnvg Date: Mon, 8 Feb 2010 15:06:03 +0000 Subject: another modification that should have been committed already git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1775 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d --- frontend/trans.icl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'frontend') diff --git a/frontend/trans.icl b/frontend/trans.icl index 2f0a8ea..79ebe83 100644 --- a/frontend/trans.icl +++ b/frontend/trans.icl @@ -1514,7 +1514,7 @@ generateFunction app_symb fd=:{fun_body = TransformedBody {tb_args,tb_rhs},fun_i # (tb_rhs, {cs_var_heap,cs_symbol_heap,cs_opt_type_heaps=Yes ti_type_heaps, cs_cleanup_info}) = copy tb_rhs {ci_handle_aci_free_vars = RemoveAciFreeVars} cs // | False ---> ("unfolded:", tb_rhs) = undef - # var_heap = fold2St store_arg_type_info new_fun_args fresh_arg_types cs_var_heap + # var_heap = fold2St store_arg_type_info new_fun_args fresh_arg_types var_heap with store_arg_type_info {fv_info_ptr} a_type ti_var_heap = setExtendedVarInfo fv_info_ptr (EVI_VarType a_type) ti_var_heap -- cgit v1.2.3