remove dead code

Pm/PmEnvironment.icl

@@ -101,20 +101,15 @@ saveEnvironments envpath targets env
 where
 	saveEnvironments :: !String [.Target] *a -> *(Maybe .[{#Char}],*a) | FileSystem a
 	saveEnvironments envpath targets env
-//	saveEnvironments envpath [] env = (Nothing,env)
-//	saveEnvironments envpath [target:targets] env
 		# (opened, file, env)		= fopen envpath FWriteText env
-//		# (opened, file, env)		= fopen ((MakeFullPathname envpath target.target_name)+++".env") FWriteText env
 		| not opened
 			=	(Just ["Fatal open environments..."],env)
 		#! options					= WEO targets
-//		#! options					= WEO [target]
 		#! file						= WriteOptionsFile EnvFileVersion options file
 		# (closed,env)				= fclose file env
 		| not closed
 			= (Just ["Fatal close environments..."],env)
 		= (Nothing,env)
-//		= saveEnvironments envpath targets env
 
 /* Variant die in dir zoekt naar alle *.env bestanden?
  * Eerst beginnen met targets in leesbare variant weg te schrijven...

Pm/PmParse.icl

@@ -10,8 +10,7 @@ import UtilNewlinesFile
 
 //import StdDebug
 trace_n _ g :== g
-//from dodebug import trace_n`, instance toString (a,b), instance toString (a,b,c), instance toString (a,b,c,d)
-//trace_n :== trace_n`
+//from dodebug import trace_n`
 
 instance toString Symbol
 where
@@ -314,7 +313,6 @@ FindDefinitionInText imp imports cleanid text files
 
 //FindIdentifiersInInput :: !Bool !String !(List String) !Symbol !Input -> (!Input, !List String, !IdentifierPositionList);
 FindIdentifiersInInput imp cleanid imports sym=:{repr} input positions
-	| trace_n ("FIII",input.linenr,input.charnr,sym) False = undef
 	| repr==FromSymID && imp
 		# (input,sym,imports,positions)	= FindFrom imports input positions
 		= FindIdentifiersInInput imp cleanid imports sym input positions