Commit 6e1234ef authored by John van Groningen's avatar John van Groningen
Browse files

remove unused types in dynamic patterns in .tcl file

parent 69c8ea07
......@@ -65,14 +65,6 @@ write_tcl_file main_dcl_module_n dcl_mods=:{[main_dcl_module_n] = main_dcl_modul
#! (tcl_file,write_type_info_state)
= write_type_info directly_imported_dcl_modules tcl_file write_type_info_state
// dynamic pattern matches
#! (tcl_file,write_type_info_state)
= write_type_info no_type_symb_ident tcl_file write_type_info_state
with
no_type_symb_ident :: [TypeSymbIdent]
no_type_symb_ident
= []
#! (tcl_file,write_type_info_state)
= write_type_info (help_20_compiler { dcl_name.id_name\\ {dcl_name} <-: dcl_mods }) tcl_file write_type_info_state
with
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment