X-Git-Url: https://git.libre-soc.org/?a=blobdiff_plain;f=util%2Ftracediff;h=3633fdb48a8845b0a7f0b6296a8129e33a7b4683;hb=50475e0e2a5634374f95dfb9e076888bb4367bb7;hp=b25efe9b2309160d39c64e273edb40119b385772;hpb=0f98905ecca68474769546a3bad5c346d952819d;p=gem5.git diff --git a/util/tracediff b/util/tracediff index b25efe9b2..3633fdb48 100755 --- a/util/tracediff +++ b/util/tracediff @@ -1,5 +1,5 @@ #! /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. # # Redistribution and use in source and binary forms, with or without @@ -60,6 +60,8 @@ # run only). # +use FindBin; + if (@ARGV < 2) { 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 |"; $cmd2 = "$sim2 -d $dir2 $args2 2>&1 |"; -# This only works if you have rundiff in your path. I just edit it -# with an explicit path if necessary. -$fullcmd = "rundiff '$cmd1' '$cmd2' 2>&1 > tracediff-$$.out"; +# Expect that rundiff is in the same dir as the tracediff script. +# FindBin figures that out for us. +$fullcmd = "$FindBin::Bin/rundiff '$cmd1' '$cmd2' 2>&1 > tracediff-$$.out"; print "Executing $fullcmd\n"; system($fullcmd);