diff options
| author | martijnv | 2002-04-04 07:23:24 +0000 |
|---|---|---|
| committer | martijnv | 2002-04-04 07:23:24 +0000 |
| commit | d294758606fb134af7c60c2b0402bf2e6c25e6af (patch) | |
| tree | 886174aa199574a03f0b329da6f3caad86ee3aec /frontend/convertDynamics.icl | |
| parent | - collection of used type constructors in unify/coerce. There are two sources: (diff) | |
* bug fix to correctly separate types without Clean definition from types which
have a Clean definition.
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1071 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/convertDynamics.icl')
| -rw-r--r-- | frontend/convertDynamics.icl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/frontend/convertDynamics.icl b/frontend/convertDynamics.icl index 02cd2c0..0a86829 100644 --- a/frontend/convertDynamics.icl +++ b/frontend/convertDynamics.icl @@ -67,13 +67,12 @@ F a b = b //write_tcl_file :: !Int {#DclModule} CommonDefs !*File [String] -> (.Bool,.File) //write_tcl_file :: !Int {#DclModule} CommonDefs !*File [String] _ _ !*TypeHeaps !*PredefinedSymbols -> (.Bool,.File,!*TypeHeaps,!*PredefinedSymbols) write_tcl_file main_dcl_module_n dcl_mods=:{[main_dcl_module_n] = main_dcl_module} common_defs tcl_file directly_imported_dcl_modules global_type_instances ci_type_constructor_used_in_dynamic_patterns type_heaps predefined_symbols - # (pre_mod, predefined_symbols) = predefined_symbols![PD_PredefinedModule] # write_type_info_state2 = { WriteTypeInfoState | wtis_type_heaps = type_heaps , wtis_n_type_vars = 0 - , wtis_predefined_module_def = pre_mod.pds_def + , wtis_predefined_module_def = pre_mod.pds_module }; # (j,tcl_file) = fposition tcl_file |