Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
clean-compiler-and-rts
compiler
Commits
56b82608
Commit
56b82608
authored
Apr 04, 2002
by
Martijn Vervoort
Browse files
* bug fix to correctly separate types without Clean definition from types which
have a Clean definition.
parent
af8a9421
Changes
1
Hide whitespace changes
Inline
Side-by-side
frontend/convertDynamics.icl
View file @
56b82608
...
...
@@ -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
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment