From: Steve Reinhardt <Steve.Reinhardt@amd.com>
Date: Mon, 17 Nov 2008 19:22:16 +0000 (-0800)
Subject: Minor tracediff bug fixes.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=3701794d330e9c86595761989cc8d59bbe8c88b1;p=gem5.git

Minor tracediff bug fixes.
---

diff --git a/util/tracediff b/util/tracediff
index 5f980ea5c..5349c303d 100755
--- a/util/tracediff
+++ b/util/tracediff
@@ -87,8 +87,11 @@ if (@ARGV < 1) {
 
 foreach $arg (@ARGV) {
     $a1 = $a2 = '';
-    @subargs = split('#', $arg, -1);
+    @subargs = split('#', $arg);
     foreach $subarg (@subargs) {
+        if ($subarg eq '') {
+            next;
+        }
         @pair = split('\|', $subarg, -1); # -1 enables null trailing fields
         if (@pair == 1) {
             $a1 .= $subarg;
@@ -97,7 +100,7 @@ foreach $arg (@ARGV) {
             $a1 .= $pair[0];
             $a2 .= $pair[1];
         } else {
-            print 'Parse error: too many |s in ', $arg, '\n';
+            print 'Parse error: too many |s in ', $arg, "\n";
             exit(1);
         }
     }