We have lots of these codelets around OpenOCD:
if { [info exists CHIPNAME] } {
set _CHIPNAME $CHIPNAME
} else {
set _CHIPNAME pxa270
}
Does anyone find this the syntax below simpler or just
more obscure?
-expected-id [defaultvalue CPUTAPID 0x12345678]
defaultvalue returns either the _CPUTAPID value or 0x12345678 if
_CPUTAPID is not defined.
proc defaultvalue {name value} {
if { [uplevel "info exists $name"} {
return [uplevel $name]
} else {
return $value
}
}
--
Øyvind Harboe
http://www.zylin.com/zy1000.html
ARM7 ARM9 ARM11 XScale Cortex
JTAG debugger and flash programmer
_______________________________________________
Openocd-development mailing list
Openocd-development@lists.berlios.de
https://lists.berlios.de/mailman/listinfo/openocd-development
