diff options
author | johnvg | 2011-12-07 15:59:27 +0000 |
---|---|---|
committer | johnvg | 2011-12-07 15:59:27 +0000 |
commit | ca794cebe2d4e2d1e32b09ef67899dcafddcf95c (patch) | |
tree | 873fa534765f935801d186a4dd83771c457c4114 /frontend/frontend.icl | |
parent | increase default heap size of the compiler (diff) |
prevent compile crash if dynamics are enabled and a type synonym is cyclic
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@2030 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/frontend.icl')
-rw-r--r-- | frontend/frontend.icl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/frontend/frontend.icl b/frontend/frontend.icl index 19ab547..b604a45 100644 --- a/frontend/frontend.icl +++ b/frontend/frontend.icl @@ -104,8 +104,9 @@ frontEndInterface options mod_ident search_paths cached_dcl_modules cached_dcl_m # hp_var_heap = heaps.hp_var_heap #! n_types_with_type_functions = size ti_common_defs.[main_dcl_module_n].com_type_defs #! n_constructors_with_type_functions = size ti_common_defs.[main_dcl_module_n].com_cons_defs + #! ea_ok = error_admin.ea_ok # (fun_defs, predef_symbols, hp_var_heap, type_heaps) - = if support_dynamics + = if (support_dynamics && ea_ok) (buildTypeFunctions main_dcl_module_n fun_defs ti_common_defs predef_symbols hp_var_heap type_heaps) (fun_defs, predef_symbols, hp_var_heap, type_heaps) # (td_infos, th_vars, error_admin) |