From d418537bcc23d157803b72b429f30ec1bbb1b224 Mon Sep 17 00:00:00 2001
From: James Cherry <cherry@parallaxsw.com>
Date: Tue, 19 Jan 2021 11:16:56 -0700
Subject: [PATCH] sta_error

---
 tcl/Util.tcl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tcl/Util.tcl b/tcl/Util.tcl
index ecc80119..fa9178b1 100644
--- a/tcl/Util.tcl
+++ b/tcl/Util.tcl
@@ -261,7 +261,7 @@ proc sta_warn { msg_id msg } {
   }
 }
 
-proc sta_error { id msg } {
+proc sta_error { msg_id msg } {
   variable sdc_file
   variable sdc_line
   if { [info exists sdc_file] } {
@@ -275,7 +275,7 @@ proc sta_warn_error { msg_id warn_error msg } {
   if { $warn_error == "warn" } {
     sta_warn $msg_id $msg
   } else {
-    sta_error $$msg_id $msg
+    sta_error $msg_id $msg
   }
 }