remove unused field dcl_date

Pm/PmFileInfo.dcl

@@ -16,7 +16,6 @@ from PmAbcMagic	import :: ABCCache, :: ABCOptions
 	 ,	seq_stack	:: !Bool			// sequential code & stack info?
 	 ,	version		:: !Int
 	 ,	abcOptions	:: !ABCOptions
-	 ,	dcldate		:: !DATE
 	 ,	icldate		:: !DATE
 	 ,	abcdate		:: !DATE
 	 ,	objdate		:: !DATE

Pm/PmFileInfo.icl

@@ -22,7 +22,6 @@ import PmAbcMagic
 	 ,	seq_stack	:: !Bool			// sequential code & stack info?
 	 ,	version		:: !Int				// abc - version
 	 ,	abcOptions	:: !ABCOptions
-	 ,	dcldate		:: !DATE
 	 ,	icldate		:: !DATE
 	 ,	abcdate		:: !DATE
 	 ,	objdate		:: !DATE
@@ -44,20 +43,18 @@ where
 			= ((abccache,acc, info), files)
 			= GetFileInfo1 tp this_path abccache rest acc files
 	GetFileInfo1 tp path abccache Nil acc files
-		#	dclpath				= MakeDefPathname path
 		#	iclpath				= MakeImpPathname path
 //		#	(abcpath, files)	= MakeABCSystemPathname path files
 		#	abcpath				= MakeABCSystemPathname path
 //		#	(objpath, files)	= MakeObjSystemPathname tp path files
 		#	objpath				= MakeObjSystemPathname tp path
-		#	(dcldate, files)	= FModified dclpath files
 		#	(icldate, files)	= FModified iclpath files
 		#	(abcdate, files)	= FModified abcpath files
 		#	(objdate, files)	= FModified objpath files
 		| not abcdate.exists
 			#	finfo	= { path		= iclpath,
 							abcpath		= abcpath,	objpath		= objpath,
-							dcldate		= dcldate,	icldate		= icldate,
+							icldate		= icldate,
 							abcdate		= abcdate,	objdate		= objdate,
 							sys			= False,	seq_stack	= False,
 							version		= -1,		abcOptions	= DefaultABCOptions }
@@ -67,7 +64,7 @@ where
 									= GetABCCompiledInfo False abcpath abccache files
 				finfo	= { path		= iclpath,
 							abcpath		= abcpath,	objpath		= objpath,
-							dcldate		= dcldate,	icldate		= icldate,
+							icldate		= icldate,
 							abcdate		= abcdate,	objdate		= objdate,
 							sys			= sys,		seq_stack	= seq_stack,
 							version		= version,	abcOptions	= abcOptions }