The input file names of the linker are to be found in a different place.

This commit is contained in:
keie 1984-09-10 16:45:12 +00:00
parent 20100c69c7
commit 1dba1f5328

View file

@ -47,8 +47,8 @@ int runphase(phase) register trf *phase ; {
vprint(" %s%s\n",p_basename, vprint(" %s%s\n",p_basename,
rindex(in.p_path,SUFCHAR) ) ; rindex(in.p_path,SUFCHAR) ) ;
} else { } else {
scanlist(l_first(c_arguments), elem) { scanlist(l_first(phase->t_inputs), elem) {
vprint(" %s",l_content(*elem)) ; vprint(" %s",p_cont(*elem)->p_path);
} }
vprint("\n") ; vprint("\n") ;
} }
@ -91,7 +91,7 @@ int run_exec(phase) trf *phase ; {
} while ( waitchild!=child) ; } while ( waitchild!=child) ;
if ( status ) { if ( status ) {
if ( status&0200 && (status&0177)!=SIGQUIT && if ( status&0200 && (status&0177)!=SIGQUIT &&
!t_flag ) unlink("core") ; t_flag<=1 ) unlink("core") ;
switch ( status&0177 ) { switch ( status&0177 ) {
case 0 : case 0 :
break ; break ;
@ -131,7 +131,7 @@ int run_exec(phase) trf *phase ; {
close(1) ; close(1) ;
if ( creat(out.p_path,0666)!=1 ) { if ( creat(out.p_path,0666)!=1 ) {
close(1); dup(2); close(1); dup(2);
error("cannot open %s",out.p_path) ; error("cannot create %s",out.p_path) ;
exit(1) ; exit(1) ;
} }
} }