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

Compare commits

base: ee-324:1f1fe1dff089dd89cef3165c6466b3a1c2c10884
Branches Tags
ee-324:trunk
ee-324:v0.0.1
..
compare: ee-324:9c435112e80a319d33f72863597baf8bd86c743e
Branches Tags
ee-324:trunk
ee-324:v0.0.1

2 Commits
1f1fe1dff0 ... 9c435112e8

Author SHA1 Message Date
Madeline Busig
9c435112e8 Fix package_ip block configuration searching incorrect scope in config 2026-07-15 19:18:16 -07:00
Madeline Busig
423761f413 Fix package_ip.tcl SplitSub incorrect results with start word containing 
delimiter
 2026-07-15 19:17:27 -07:00
1 changed files with 5 additions and 2 deletions
Show Stats Expand all files Collapse all files

7
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 ""
@ -169,7 +172,7 @@ proc ParseMemoryMapConf {iface_name memmap_conf} {
foreach block_name $blocks { foreach block_name $blocks {
puts "Parsing block $block_name of $memmap_name" puts "Parsing block $block_name of $memmap_name"
set block_conf [GetSubValues $memmap_conf $block_name] set block_conf [GetSubValues $memmap_conf BLOCK.$block_name]
AddMemoryMapBlock $memmap $block_name $block_conf AddMemoryMapBlock $memmap $block_name $block_conf
} }
} }