X-Git-Url: https://review.openocd.org/gitweb?p=openocd.git;a=blobdiff_plain;f=tcl%2Ffpga%2Fxilinx-xadc.cfg;h=fdaf3a961bbe7bed66b58108d41fbaa58d8d90ce;hp=c451ca2f2d62002c4fb37f04ea695805b22b111d;hb=573a39b36cf133bb7403b12337301a5616112f1a;hpb=f855fdcf0d95ff9ba18a83f9a97d5368844d4f2c diff --git a/tcl/fpga/xilinx-xadc.cfg b/tcl/fpga/xilinx-xadc.cfg index c451ca2f2d..fdaf3a961b 100644 --- a/tcl/fpga/xilinx-xadc.cfg +++ b/tcl/fpga/xilinx-xadc.cfg @@ -1,3 +1,5 @@ +# SPDX-License-Identifier: GPL-2.0-or-later + # Xilinx XADC support for 7 Series FPGAs # # The 7 Series FPGAs contain an on-chip 12 bit ADC that can probe die @@ -16,7 +18,7 @@ proc xadc_cmd {cmd addr data} { READ 0x01 WRITE 0x02 } - return [expr ($cmds($cmd) << 26) | ($addr << 16) | ($data << 0)] + return [expr {($cmds($cmd) << 26) | ($addr << 16) | ($data << 0)}] } # XADC register addresses