sanchayanmaity/gem5
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Use perl FindBin package to set path to rundiff to the

Browse source 
directory where tracediff is.

--HG--
extra : convert_revision : f0cc0af264aa624cbacbf3ba42b6b64f90a8e759
This commit is contained in:
Steve Reinhardt 2007-02-06 10:06:11 -08:00
parent 572addee5d
commit 98ef836ca6
1 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
util/tracediff
View file

@ -1,5 +1,5 @@
#! /usr/bin/env perl #! /usr/bin/env perl
# Copyright (c) 2003-2006 The Regents of The University of Michigan # Copyright (c) 2003-2007 The Regents of The University of Michigan
# All rights reserved. # All rights reserved.
# #
# Redistribution and use in source and binary forms, with or without # Redistribution and use in source and binary forms, with or without
@ -60,6 +60,8 @@
# run only). # run only).
# #
use FindBin;
if (@ARGV < 2) { if (@ARGV < 2) {
die "Usage: tracediff \"sim1|sim2\" [common-arg \"arg1|arg2\" ...]\n"; die "Usage: tracediff \"sim1|sim2\" [common-arg \"arg1|arg2\" ...]\n";
} }
@ -101,9 +103,9 @@ mkdir($dir2) or die "Can't create dir $dir2\n";
$cmd1 = "$sim1 -d $dir1 $args1 2>&1 |"; $cmd1 = "$sim1 -d $dir1 $args1 2>&1 |";
$cmd2 = "$sim2 -d $dir2 $args2 2>&1 |"; $cmd2 = "$sim2 -d $dir2 $args2 2>&1 |";
# This only works if you have rundiff in your path. I just edit it # Expect that rundiff is in the same dir as the tracediff script.
# with an explicit path if necessary. # FindBin figures that out for us.
$fullcmd = "rundiff '$cmd1' '$cmd2' 2>&1 > tracediff-$$.out"; $fullcmd = "$FindBin::Bin/rundiff '$cmd1' '$cmd2' 2>&1 > tracediff-$$.out";
print "Executing $fullcmd\n"; print "Executing $fullcmd\n";
system($fullcmd); system($fullcmd);