module ownership comment

backend/backendconvert.dcl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 definition module backendconvert
 
 from backend import BackEnd

backend/backendconvert.icl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 implementation module backendconvert
 
 import code from library "backend_library"

backend/backendinterface.dcl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 definition module backendinterface
 
 import frontend

backend/backendinterface.icl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 implementation module backendinterface
 
 import StdEnv

backend/backendpreprocess.dcl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 definition module backendpreprocess
 
 import checksupport

backend/backendpreprocess.icl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 implementation module backendpreprocess
 
 // assign sequence numbers to all variables in the syntax tree

backend/backendsupport.dcl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 definition module backendsupport
 
 //1.3

backend/backendsupport.icl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 implementation module backendsupport
 
 import StdArray

frontend/convertcases.dcl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 definition module convertcases
 
 import syntax, transform, trans

frontend/convertcases.icl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 implementation module convertcases
 
 import syntax, transform, checksupport, StdCompare, check, utilities, trans, general //, RWSDebug

frontend/frontend.dcl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 definition module frontend
 
 from scanner import SearchPaths

frontend/frontend.icl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 implementation module frontend
 
 import scanner, parse, postparse, check, type, trans, convertcases, overloading, utilities, convertDynamics,

frontend/mergecases.dcl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 definition module mergecases
 
 import syntax, checksupport

frontend/mergecases.icl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 implementation module mergecases
 
 import syntax, check, StdCompare, utilities; //, RWSDebug

main/Version.dcl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 definition module Version
 
 :: VersionInfo =

main/Version.icl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 implementation module Version
 
 import StdInt, StdClass

main/cocl.icl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 module cocl
 
-import coclmain
 
 import StdEnv
+import coclmain
+
 import frontend
 
-Start :: *World -> *World
+// Start :: *World -> *World
 Start world
-	=	coclMain testArgs world
+	=	(testArgs, coclMain testArgs world)
 	where
 		testArgs
 			=	[
-					// main module			
-					"t.icl"
-					// list all types
+					// main module
+					testDir +++ "t"
+//				,	// unknown option
+//					"-xxx"
+//					// list all types
 				,	"-lat"
 					// generate readable abc code
 				,	"-d"
+					// time profiling
+				,	"-pt"
+					// reuse unique nodes
+				,	"-ou"
 					// redirect out
-				,	"-RO", "messages.txt"	
+//				,	"-RO", "messages.txt"	
 					// redirect errors
-				,	"-RE", "errors.txt"
+//				,	"-RE", "errors.txt"
 					// paths
-				,	"-P", testDir +++ ";" +++ clean20Dir +++ "StdEnv" +++ ";" +++ clean20Dir +++ "IOInterface"
+				,	"-P", testDir +++ ";" +++ io08Dir +++ ";" +++ stdenvDir
+//				,	"-P", paths
 				]
+
+		baseDir
+			=	"d:\\Users\\Ronny\\Develop\\"
 		testDir
-			=	"e:\\Users\\Ronny\\Develop\\Clean Programs\\"
-		clean20Dir
-			=	"e:\\Users\\Ronny\\Develop\\Clean 2.0\\"
+			=	baseDir +++ "Clean Programs\\" +++ "testes\\" 
+
+		coclDir
+			=	baseDir +++ "CleanSystem\\cocl\\"
+
+		cleanSystemDir
+			=	baseDir +++ "CleanSystem\\"
+
+		cleanVersion
+			=	"2.0 repository\\"
+
+		stdenvDir
+			=	cleanSystemDir +++ cleanVersion +++ "\\StdEnv\\"
+
+		io08Dir
+//			=	cleanSystemDir +++ cleanVersion +++ "\\IOInterface\\"
+			=	"d:\\Users\\Ronny\\Profile\\Desktop\\test\\IOInterface 0.8.2\\"
+		paths
+			=	foldl  (\a b -> a +++ ";" +++ b) ""
+				(
+					[	coclDir +++ path
+					\\	path <-
+						[	""
+						,	"compiler"
+						,	"main"
+						,	"main/Windows"
+						,	"backend"
+						,	"backendCModules"
+						,	"ArgEnvWindows"
+						,	"WrapDebug"
+						]
+					]
+				++
+					[	stdenvDir
+					]
+				)

main/coclmain.dcl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 definition module coclmain
 
 /*

main/coclmain.icl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 implementation module coclmain
 
 CoclMainVersion :== 0

main/compile.dcl

+/*
+	module owner: Ronny Wichers Schreur
+*/
 definition module compile
 
 from StdFile import Files