From c63878b450689f29ae03a04a9767a5d85893ead6 Mon Sep 17 00:00:00 2001
From: ronny
Date: Mon, 25 Jun 2001 16:16:00 +0000
Subject: generate .depend for current dcl module

git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@504 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
---
 frontend/check.icl        | 4 ++++
 frontend/checksupport.dcl | 4 +++-
 frontend/checksupport.icl | 4 +++-
 3 files changed, 10 insertions(+), 2 deletions(-)

(limited to 'frontend')

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
 	}
-- 
cgit v1.2.3