mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-15 03:11:54 -07:00
Code Issues Projects Releases Wiki Activity

Don't leave obj files lying around

Browse source 
Copied from Perforce
 Change: 18995
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Richard Tucker 1997-11-13 16:49:34 +00:00
parent 51059da706
commit 5ec718d774
1 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
mps/qa/test/script/compile
View file

@ -126,16 +126,17 @@ sub compile {
}
sub compile_and_link {
local($srcfile, $exefile, $linkfiles) = @_;
local($srcfile, $exefile, $linkfiles, $objfile) = @_;
&compiler_settings;
$linkfiles = " ".$linkfiles;
$linkfiles =~ s/ +/ $obj_dir\//g;
$linkfiles = $linkfiles." ";
$linkfiles =~ s/\.o /$obj_suffix /g;
$objfile = "$obj_dir/tmp_obj$obj_suffix";
$command = "$cc_command $cc_opts $cc_exe$exefile $srcfile ".
"$linkfiles $MPS_LINK_OBJ $cc_link $cc_include $cc_link_opts";
$command = "$cc_command $cc_opts $cc_obj$objfile $cc_exe$exefile ".
"$srcfile $linkfiles $MPS_LINK_OBJ $cc_link $cc_include $cc_link_opts";
if (&mysystem($command)) {
return 0;