ipdbg: fix double free of virtual-ir data

[openocd.git] / tcl / target / zynq_7000.cfg

diff --git a/tcl/target/zynq_7000.cfg b/tcl/target/zynq_7000.cfg
index 593abd79257f90dcf2a607bf687dbac360ae487e..5a88b6e9d5418e2eda47d95509574aca2c0cef88 100644 (file)
--- a/tcl/target/zynq_7000.cfg
+++ b/tcl/target/zynq_7000.cfg
@@ -47,7 +47,7 @@ ${_TARGETNAME}0 configure -event reset-assert-post "cortex_a dbginit"
 ${_TARGETNAME}1 configure -event reset-assert-post "cortex_a dbginit"
 
 pld create zynq_pl.pld virtex2 -chain-position zynq_pl.bs -no_jstart
-virtex2 set_user_codes $zynq_pl.pld 0x02 0x03 0x22 0x23
+virtex2 set_user_codes zynq_pl.pld 0x02 0x03 0x22 0x23
 
 set XC7_JSHUTDOWN 0x0d
 set XC7_JPROGRAM 0x0b
@@ -55,6 +55,7 @@ set XC7_JSTART 0x0c
 set XC7_BYPASS 0x3f
 
 proc zynqpl_program {tap} {
+       echo "DEPRECATED! use 'virtex2 program ...' not 'zynqpl_program'"
        global XC7_JSHUTDOWN XC7_JPROGRAM XC7_JSTART XC7_BYPASS
        irscan $tap $XC7_JSHUTDOWN
        irscan $tap $XC7_JPROGRAM