diff options
Diffstat (limited to 'frontend')
| -rw-r--r-- | frontend/check.icl | 4 | ||||
| -rw-r--r-- | frontend/checksupport.dcl | 4 | ||||
| -rw-r--r-- | frontend/checksupport.icl | 4 |
3 files changed, 10 insertions, 2 deletions
diff --git a/frontend/check.icl b/frontend/check.icl index c1502e3..0a36f56 100644 --- a/frontend/check.icl +++ b/frontend/check.icl @@ -2169,9 +2169,13 @@ initialDclModule ({mod_name, mod_defs=mod_defs=:{def_funtypes,def_macros}, mod_t , dcls_local_for_import = {local_declaration_for_import decl module_n \\ decl<-all_defs} } , dcl_conversions = No +/* RWS ... , dcl_is_system = case mod_type of MK_System -> True _ -> False +*/ + , dcl_module_kind = mod_type +// ... RWS , dcl_imported_module_numbers = EndNumbers , dcl_is_cashed = False } diff --git a/frontend/checksupport.dcl b/frontend/checksupport.dcl index 322819c..ff4d68f 100644 --- a/frontend/checksupport.dcl +++ b/frontend/checksupport.dcl @@ -105,7 +105,9 @@ cConversionTableSize :== 9 // AA , dcl_sizes :: !{# Int} , dcl_declared :: !Declarations , dcl_conversions :: !Optional ConversionTable - , dcl_is_system :: !Bool +// RWS ... , dcl_is_system :: !Bool + , dcl_module_kind :: !ModuleKind +// ... RWS , dcl_imported_module_numbers :: !NumberSet , dcl_is_cashed :: !Bool } diff --git a/frontend/checksupport.icl b/frontend/checksupport.icl index 0222299..bdb6c16 100644 --- a/frontend/checksupport.icl +++ b/frontend/checksupport.icl @@ -118,7 +118,9 @@ where , dcl_sizes :: !{# Int} , dcl_declared :: !Declarations , dcl_conversions :: !Optional ConversionTable - , dcl_is_system :: !Bool +// RWS ... , dcl_is_system :: !Bool + , dcl_module_kind :: !ModuleKind +// ... RWS , dcl_imported_module_numbers :: !NumberSet , dcl_is_cashed :: !Bool } |