verlan/Verilog_Louis
1
0
Fork 0
forked from tanchou/Verilog
Code Pull Requests Activity

struct

Browse Source
This commit is contained in:
Gamenight77
2025-05-02 15:51:18 +02:00
parent 0faab53c30
commit f5e73d7379
105 changed files with 707398 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
Help/counter2/scripts/gtk_wave_all_signals.tcl Normal file
View File

@@ -0,0 +1,20 @@
puts "Starting TCL script"
#set path test1b_tb
#gtkwave::forceOpenTreeNode $path
set nfacs [ gtkwave::getNumFacs ]
puts "There are $nfacs signals"
set l [list]
for {set i 0} {$i < $nfacs } {incr i} {
set facname [ gtkwave::getFacName $i ]
set numdots [ expr {[llength [split $facname .]] - 1}]
# puts "$numdots"
if {$numdots == 1} {
lappend l "$facname"
puts "Added signal $facname"
}
}
set num_added [ gtkwave::addSignalsFromList $l ]
gtkwave::setZoomRangeTimes [ gtkwave::getMinTime ] [ gtkwave::getMaxTime ]
puts "Start time [ gtkwave::getMinTime ] end time: [ gtkwave::getMaxTime ]"