tcl: replace the deprecated commands with "adapter ..."

[fw/openocd] / tcl / board / at91cap7a-stk-sdram.cfg

diff --git a/tcl/board/at91cap7a-stk-sdram.cfg b/tcl/board/at91cap7a-stk-sdram.cfg
index 9bc02e8c0383bd563d1cda73202112c6dbf7bc2c..a0e393f2c9136b58afa60495987b884ce397de84 100644 (file)
--- a/tcl/board/at91cap7a-stk-sdram.cfg
+++ b/tcl/board/at91cap7a-stk-sdram.cfg
@@ -28,7 +28,7 @@ target create $_TARGETNAME arm7tdmi -endian $_ENDIAN -chain-position $_TARGETNAM
 
 $_TARGETNAME configure -event reset-start {
        # start off real slow when we're running off internal RC oscillator
-       adapter_khz 32
+       adapter speed 32
 }
 
 proc peek32 {address} {
@@ -78,7 +78,7 @@ $_TARGETNAME configure -event reset-init {
        echo "Master clock ok."
        
        # Now that we're up and running, crank up speed!
-       global post_reset_khz ; adapter_khz $post_reset_khz
+       global post_reset_khz ; adapter speed $post_reset_khz
        
        echo "Configuring the SDRAM controller..."