tcl worst_clock_skew -setup|-hold

This commit is contained in:
James Cherry 2021-05-30 17:41:43 -07:00
parent 6a582fddb8
commit 61606d19b3
2 changed files with 19 additions and 1 deletions

View File

@ -1010,6 +1010,24 @@ proc worst_slack1 { cmd args1 } {
return [time_sta_ui $worst_slack]
}
################################################################
define_hidden_cmd_args "worst_clock_skew" {[-setup]|[-hold]}
proc worst_clock_skew { args } {
parse_key_args "worst_clock_skew" args keys {} flags {-setup -hold}
check_argc_eq0 "worst_clock_skew" $args
if { ([info exists flags(-setup)] && [info exists flags(-hold)]) \
|| (![info exists flags(-setup)] && ![info exists flags(-hold)]) } {
sta_error 616 "specify one of -setup and -hold."
} elseif { [info exists flags(-setup)] } {
set setup_hold "setup"
} elseif { [info exists flags(-hold)] } {
set setup_hold "hold"
}
return [time_sta_ui [worst_clk_skew_cmd $setup_hold]]
}
################################################################
#
# Helper functions

View File

@ -4454,7 +4454,7 @@ report_clk_skew(ClockSet *clks,
}
float
find_worst_clk_skew(const SetupHold *setup_hold)
worst_clk_skew_cmd(const SetupHold *setup_hold)
{
cmdLinkedNetwork();
return Sta::sta()->findWorstClkSkew(setup_hold);