From 33c56ca18cd357b1d8b10f26c3c60c5d8f7f2518 Mon Sep 17 00:00:00 2001 From: johnvg Date: Fri, 28 Oct 2005 10:15:49 +0000 Subject: remove output for debugging git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1553 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d --- frontend/trans.icl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'frontend') diff --git a/frontend/trans.icl b/frontend/trans.icl index a3cb10c..e56c8e5 100644 --- a/frontend/trans.icl +++ b/frontend/trans.icl @@ -2457,7 +2457,8 @@ where , let_expr = expr , let_info_ptr = new_info_ptr , let_expr_position = NoPos - },ti) ---> "added strict_let_binds" + },ti) // ---> "added strict_let_binds" + transform_trivial_function :: !.App ![.Expression] ![.Expression] !.ReadOnlyTI !*TransformInfo -> *(!Expression,!*TransformInfo) transform_trivial_function app=:{app_symb} app_args extra_args ro ti # (fun_def,ti_fun_defs,ti_fun_heap) = get_fun_def app_symb.symb_kind ro.ro_main_dcl_module_n ti.ti_fun_defs ti.ti_fun_heap -- cgit v1.2.3