diff options
| author | ronny | 2002-10-15 12:44:28 +0000 |
|---|---|---|
| committer | ronny | 2002-10-15 12:44:28 +0000 |
| commit | eed36ddb28d5957f4f6a0d0c0f3d2be56ca65a35 (patch) | |
| tree | ea77a58918ac71299f080326d7d3eb709d3dbede /frontend | |
| parent | new type code and type code constructor representation (diff) | |
disable arity check to circumvent bug in compiling the module relayout.icl in Windows Object IO
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1235 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 46e3d94..f8c9979 100644 --- a/frontend/trans.icl +++ b/frontend/trans.icl @@ -1148,7 +1148,7 @@ generateFunction app_symb fd=:{fun_body = TransformedBody {tb_args,tb_rhs},fun_i new_fun_arity = length new_fun_args - | SwitchArityChecks (new_fun_arity > 32) False + | False // RWS SwitchArityChecks (new_fun_arity > 32) False # ti = { ti & ti_type_heaps = ti_type_heaps, ti_symbol_heap = ti_symbol_heap, ti_fun_defs = ti_fun_defs , ti_fun_heap = ti_fun_heap, ti_var_heap = ti_var_heap, ti_cons_args = ti_cons_args, ti_type_def_infos = ti_type_def_infos } ti = { ti & ti_error_file = ti.ti_error_file <<< "Possibly missed fusion oppurtunity: Function Arity > 32 " <<< ro.ro_fun_root.symb_name.id_name <<< "\n"} |