diff options
| author | johnvg | 2010-02-08 15:08:10 +0000 |
|---|---|---|
| committer | johnvg | 2010-02-08 15:08:10 +0000 |
| commit | 3f07959f471ed5260556e6770e433fd53aa7a99f (patch) | |
| tree | 62fd0b0894ecef253a697bd4e8a2184deec13385 /frontend | |
| parent | another modification that should have been committed already (diff) | |
repair the previous modification
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1776 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend')
| -rw-r--r-- | frontend/trans.icl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/frontend/trans.icl b/frontend/trans.icl index 79ebe83..f4c3240 100644 --- a/frontend/trans.icl +++ b/frontend/trans.icl @@ -1511,7 +1511,7 @@ generateFunction app_symb fd=:{fun_body = TransformedBody {tb_args,tb_rhs},fun_i , cs_cleanup_info = ti_cleanup_info } // | False ---> ("before unfold:", tb_rhs) = undef - # (tb_rhs, {cs_var_heap,cs_symbol_heap,cs_opt_type_heaps=Yes ti_type_heaps, cs_cleanup_info}) + # (tb_rhs, {cs_var_heap=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 var_heap |