diff options
| author | sjakie | 2000-08-01 12:13:06 +0000 |
|---|---|---|
| committer | sjakie | 2000-08-01 12:13:06 +0000 |
| commit | 42c46add00b47a55b8482b0f5e6d37594f53daf0 (patch) | |
| tree | e549f75a3d3f084e144af8650bd83a1c7edc4850 | |
| parent | bug fix in merging cases (diff) | |
forgotten te remove debugging statements
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@194 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
| -rw-r--r-- | frontend/transform.icl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/frontend/transform.icl b/frontend/transform.icl index 24cde9f..1b865fb 100644 --- a/frontend/transform.icl +++ b/frontend/transform.icl @@ -692,7 +692,7 @@ where fun_def = { fun_def & fun_body = TransformedBody { tb_args = tb_args, tb_rhs = tb_rhs}, fun_info = { fun_info & fi_calls = fi_calls, fi_local_vars = fi_local_vars }} = ({ fun_and_macro_defs & [fun_index] = fun_def }, modules, es) - ---> ("expand_macros", fun_symb, fi_local_vars) +// ---> ("expand_macros", fun_symb, fi_local_vars) add_called_macros calls macro_defs_and_pi = foldSt add_called_macro calls macro_defs_and_pi @@ -746,7 +746,7 @@ expandMacrosInBody fi_calls {cb_args,cb_rhs} fun_defs mod_index alias_dummy modu = (new_args, new_rhs, local_vars, all_calls, fun_defs, modules, { es & es_error = cos_error, es_var_heap = cos_var_heap, es_symbol_heap = cos_symbol_heap, es_symbol_table = es_symbol_table }) - ---> ("expandMacrosInBody", (cb_args, cb_rhs, '\n'), ("merged_rhs", merged_rhs, '\n'), (new_args, local_vars, new_rhs, '\n')) +// ---> ("expandMacrosInBody", (cb_args, cb_rhs, '\n'), ("merged_rhs", merged_rhs, '\n'), (new_args, local_vars, new_rhs, '\n')) cContainsFreeVars :== True cContainsNoFreeVars :== False |