Started to add exit status handling

fractalclone · Mar 24, 2016 · e681beb · e681beb
1 parent 545a814
commit e681beb
Show file tree

Hide file tree

Showing 2 changed files with 12 additions and 0 deletions.
diff --git a/tb/tb.sv b/tb/tb.sv
@@ -4,6 +4,10 @@
 `define REF_CLK_PERIOD   (2*15.25us)  // 32.786 kHz --> FLL reset value --> 50 MHz
 `define CLK_PERIOD       20.00ns      // 25 MHz
 
+`define EXIT_SUCCESS  0
+`define EXIT_FAIL     1
+`define EXIT_ERROR   -1
+
 module tb;
   timeunit      1ns;
   timeprecision 1ps;
@@ -14,6 +18,8 @@ module tb;
   parameter  BAUDRATE      = 781250; // 1562500
   parameter  CLK_USE_FLL   = 0;  // 0 or 1
 
+  int                   exit_status = `EXIT_ERROR; // modelsim exit code, will be overwritten when successfull
+
   string        memload;
   logic         s_clk   = 1'b0;
   logic         s_rst_n = 1'b0;

diff --git a/vsim/tcl_files/config/vsim.tcl b/vsim/tcl_files/config/vsim.tcl
@@ -12,3 +12,9 @@ set cmd "vsim -quiet $TB \
   $VSIM_FLAGS"
 
 eval $cmd
+
+# check exit status in tb and quit the simulation accordingly
+proc run_and_exit {} {
+  run -all
+  quit -code [examine -radix decimal sim:/tb/exit_status]
+}