tcl: [3/3] prepare for jimtcl 0.81 'expr' syntax change

[fw/openocd] / tcl / chip / atmel / at91 / at91_pmc.cfg

diff --git a/tcl/chip/atmel/at91/at91_pmc.cfg b/tcl/chip/atmel/at91/at91_pmc.cfg
index 0233cb4c16c603c77701871c39fb15091c031005..dd554ce81eee7cf5b56bd24153a8b08e05876a1f 100644 (file)
--- a/tcl/chip/atmel/at91/at91_pmc.cfg
+++ b/tcl/chip/atmel/at91/at91_pmc.cfg
@@ -87,7 +87,7 @@ set                   AT91_PMC_USBS_PLLA              [expr {0 << 0}]
 set                    AT91_PMC_USBS_UPLL              [expr {1 << 0}]
 set            AT91_PMC_OHCIUSBDIV     [expr {0xF <<  8}]              ;# Divider for USB OHCI Clock
 
-;# set AT91_PMC_PCKR(n)        [expr ($AT91_PMC + 0x40 + ((n) * 4))]   ;# Programmable Clock 0-N Registers
+;# set AT91_PMC_PCKR(n)        [expr {$AT91_PMC + 0x40 + ((n) * 4)}]   ;# Programmable Clock 0-N Registers
 set            AT91_PMC_CSSMCK         [expr {0x1 <<  8}]              ;# CSS or Master Clock Selection
 set                    AT91_PMC_CSSMCK_CSS             [expr {0 << 8}]
 set                    AT91_PMC_CSSMCK_MCK             [expr {1 << 8}]