From 4efa6f31d1fe55e96f04dfc6eb36e474c6832f8e Mon Sep 17 00:00:00 2001
From: Tomasz Michalak <tmichalak@antmicro.com>
Date: Thu, 18 Apr 2019 08:23:58 +0200
Subject: [PATCH] fuzzers: Fix error usage

Signed-off-by: Tomasz Michalak <tmichalak@antmicro.com>
---
 fuzzers/051-pip-imuxlout-bypalts/generate.tcl | 4 ++--
 fuzzers/052-pip-clkin/generate.tcl            | 3 +--
 fuzzers/053-pip-ctrlin/generate.tcl           | 3 +--
 fuzzers/055-pip-gnd/generate.tcl              | 3 +--
 4 files changed, 5 insertions(+), 8 deletions(-)

diff --git a/fuzzers/051-pip-imuxlout-bypalts/generate.tcl b/fuzzers/051-pip-imuxlout-bypalts/generate.tcl
index 64f2865d..786a4b3d 100644
--- a/fuzzers/051-pip-imuxlout-bypalts/generate.tcl
+++ b/fuzzers/051-pip-imuxlout-bypalts/generate.tcl
@@ -48,7 +48,7 @@ proc find_dst_pin {tile dst_wire} {
             return $clb_dst_pin
         }
     }
-    error
+    error "ERROR: Unable to find destination pin for wire $tile/$dst_wire (iterations: $iterations)"
 }
 
 proc find_src_pin {tile src_wire} {
@@ -72,7 +72,7 @@ proc find_src_pin {tile src_wire} {
             return $clb_src_pin
         }
     }
-    error
+    error "ERROR: Unable to find source pin for $tile/$src_wire (iterations: $iterations)"
 }
 
 set fp [open "../../todo.txt" r]
diff --git a/fuzzers/052-pip-clkin/generate.tcl b/fuzzers/052-pip-clkin/generate.tcl
index fbca2ec0..82a59170 100644
--- a/fuzzers/052-pip-clkin/generate.tcl
+++ b/fuzzers/052-pip-clkin/generate.tcl
@@ -90,8 +90,7 @@ for {set idx 0} {$idx < [llength $todo_lines]} {incr idx} {
 
         # sometimes it gets stuck in specific src -> dst locations
         if {$tries >= 3} {
-            puts "WARNING: failed to route net after $tries tries"
-            error
+            error "ERROR: failed to route net after $tries tries"
         }
     }
 }
diff --git a/fuzzers/053-pip-ctrlin/generate.tcl b/fuzzers/053-pip-ctrlin/generate.tcl
index 4e1f3225..ac1a0b4e 100644
--- a/fuzzers/053-pip-ctrlin/generate.tcl
+++ b/fuzzers/053-pip-ctrlin/generate.tcl
@@ -86,8 +86,7 @@ for {set idx 0} {$idx < [llength $todo_lines]} {incr idx} {
 
         # sometimes it gets stuck in specific src -> dst locations
         if {$tries >= 3} {
-            puts "WARNING: failed to route net after $tries tries"
-            error
+            error "ERROR: failed to route net after $tries tries"
         }
     }
 }
diff --git a/fuzzers/055-pip-gnd/generate.tcl b/fuzzers/055-pip-gnd/generate.tcl
index ca5506e9..4cd65159 100644
--- a/fuzzers/055-pip-gnd/generate.tcl
+++ b/fuzzers/055-pip-gnd/generate.tcl
@@ -87,8 +87,7 @@ for {set idx 0} {$idx < [llength $todo_lines]} {incr idx} {
 
         # sometimes it gets stuck in specific src -> dst locations
         if {$tries >= 3} {
-            puts "WARNING: failed to route net after $tries tries"
-            error
+            error "ERROR: failed to route net after $tries tries"
         }
     }
 }