ee-324/pwm-controller
1
0
Fork 0
generated from maddiebusig/vivado-template-hog
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix package_ip.tcl SplitSub incorrect results with start word containing

Browse Source 
delimiter
This commit is contained in:
Madeline Busig 2026-07-15 19:17:27 -07:00
parent 1f1fe1dff0
commit 423761f413
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
tcl/package_ip.tcl
View File

@ -16,7 +16,10 @@ proc DictValueOr { dict key default } {
# EX: [SplitSub buz.bar foo] => "" # EX: [SplitSub buz.bar foo] => ""
proc SplitSub { str startword } { proc SplitSub { str startword } {
if { [string first $startword $str] == 0 } { if { [string first $startword $str] == 0 } {
set sepidx [string first "." "$str"] # Start searching for the delimiter after the start word, otherwise
# start words containing a delimiter will yield incorrect results
set start_substr_idx [string length $startword]
set sepidx [string first "." "$str" $start_substr_idx]
if { $sepidx == -1 } { if { $sepidx == -1 } {
return "" return ""