From 6ac774a9dd1d4b1b842ef390e5ca223bf7b50cb7 Mon Sep 17 00:00:00 2001
From: Adrian Costina <adrian.costina@analog.com>
Date: Wed, 10 Dec 2014 17:53:29 +0200
Subject: [PATCH] fmcjesdadc1: Update altera system_timing script

---
 projects/fmcjesdadc1/a5gt/system_timing.tcl  | 17 +++++++++++++++--
 projects/fmcjesdadc1/a5soc/system_timing.tcl | 17 +++++++++++++++--
 2 files changed, 30 insertions(+), 4 deletions(-)

diff --git a/projects/fmcjesdadc1/a5gt/system_timing.tcl b/projects/fmcjesdadc1/a5gt/system_timing.tcl
index e1f355d44..a62293897 100755
--- a/projects/fmcjesdadc1/a5gt/system_timing.tcl
+++ b/projects/fmcjesdadc1/a5gt/system_timing.tcl
@@ -1,3 +1,16 @@
 
-report_timing -detail path_only -npaths 20 -file timing_impl.log
-  
+set worst_path [get_timing_paths -npaths 1 -setup]
+foreach_in_collection path $worst_path {
+  set slack [get_path_info $path -slack]
+}
+
+if {$slack > 0} {
+  set worst_path [get_timing_paths -npaths 1 -hold]
+  foreach_in_collection path $worst_path {
+    set slack [get_path_info $path -slack]
+  }
+}
+
+if {$slack < 0} {
+  use_this_invalid_command_to_crash
+}
diff --git a/projects/fmcjesdadc1/a5soc/system_timing.tcl b/projects/fmcjesdadc1/a5soc/system_timing.tcl
index e1f355d44..a62293897 100755
--- a/projects/fmcjesdadc1/a5soc/system_timing.tcl
+++ b/projects/fmcjesdadc1/a5soc/system_timing.tcl
@@ -1,3 +1,16 @@
 
-report_timing -detail path_only -npaths 20 -file timing_impl.log
-  
+set worst_path [get_timing_paths -npaths 1 -setup]
+foreach_in_collection path $worst_path {
+  set slack [get_path_info $path -slack]
+}
+
+if {$slack > 0} {
+  set worst_path [get_timing_paths -npaths 1 -hold]
+  foreach_in_collection path $worst_path {
+    set slack [get_path_info $path -slack]
+  }
+}
+
+if {$slack < 0} {
+  use_this_invalid_command_to_crash
+}