use compiler slot number to generate stdout/stderr file name

in StartCodeGenerator

Mac/PmCleanSystem.icl

@@ -473,16 +473,14 @@ StartCodeGenerator cgen` wf genAsmOrCode path slot timeprofile cgo tp ao startup
 	# (cgen,code_generator_full_path,signature) = mangleGenerator cgen` startupdir
 	# objpath			= MakeObjSystemPathname tp path
 	  path_without_suffix	= RemoveSuffix path
-	  out_file_name
-			= out_file_path startupdir 0
-	  errors_file_name
-			= errors_file_path startupdir 0
-	  command				= cgen
-								+++" -id "+++toString slot
-								+++ MakeCodeGenOptionsString genAsmOrCode /*False*/timeprofile cgo
-								+++ " " +++ (quoted_string path_without_suffix)
-								+++ " > " +++ quoted_string out_file_name
-								+++ " \xb3 " +++ quoted_string errors_file_name
+	  out_file_name = out_file_path startupdir slot
+	  errors_file_name = errors_file_path startupdir slot
+	  command		= cgen
+						+++" -id "+++toString slot
+						+++ MakeCodeGenOptionsString genAsmOrCode /*False*/timeprofile cgo
+						+++ " " +++ (quoted_string path_without_suffix)
+						+++ " > " +++ quoted_string out_file_name
+						+++ " \xb3 " +++ quoted_string errors_file_name
 	# (error_code,error_n,compiler_psns,ps) = send_command_to_clean_compiler_without_waiting_for_reply_using_psn code_generator_full_path command slot compiler_psns ps
   	| error_code<>0
 		# ps = wf ["Error: Unable to run code generator: "+++toString error_code] ps
@@ -573,9 +571,7 @@ Link linker` winfun path
 */
 			+++	"'" +++ to_unix_path linker_out_o_path +++ "'"
 			+++	" -framework Carbon"
-			+++	" -o '"
-			+++	to_unix_path path
-			+++	"'"
+			+++	" -o '"+++ to_unix_path path +++ "'"
 //			+++ " -g"	// for debugging syms
 			+++ "-Xlinker -stack_addr -Xlinker 0xc0000000 -Xlinker -stack_size -Xlinker 0x"+++stack_size_aligned_4k_hex_string
 //			+++ if (ss > standard_mosx_stack) (" -stack-size " +++ stack_size_aligned_4k_hex_string) ""		
@@ -702,16 +698,6 @@ to_unix_path p
 	| res <> 0
 		# posix	= toString (takeWhile ((<>) '\0') [c \\ c <-: buffer])
 		= trace_n ("Path",posix) posix
-/*
-to_unix_path p = "/Volumes/"+++ to_unix_path 0 p;
-where
-	to_unix_path i p
-		| i==size p
-			= p
-		| p.[i]==':'
-			= to_unix_path (inc i) (p % (0,i-1)+++"/"+++p % (i+1,size p-1));
-			= to_unix_path (inc i) p;
-*/
 
 fork_execv_waitpid :: !String !String -> (!Int,!Int);
 fork_execv_waitpid s stdout_file_name