tcl/target: add SPDX tag

[fw/openocd] / tcl / target / swj-dp.tcl

diff --git a/tcl/target/swj-dp.tcl b/tcl/target/swj-dp.tcl
index 1d274cb1290cbb73e6efdd64d2ef82b529732ac0..f2b233fb78133fd5e45395fd307674c16a65ed70 100644 (file)
--- a/tcl/target/swj-dp.tcl
+++ b/tcl/target/swj-dp.tcl
@@ -1,3 +1,5 @@
+# SPDX-License-Identifier: GPL-2.0-or-later
+
 # ARM Debug Interface V5 (ADI_V5) utility
 # ... Mostly for SWJ-DP (not SW-DP or JTAG-DP, since
 # SW-DP and JTAG-DP targets don't need to switch based
@@ -24,11 +26,12 @@ if [catch {transport select}] {
 }
 
 proc swj_newdap {chip tag args} {
- if [using_hla] {
-     eval hla newtap $chip $tag $args
- } elseif [using_jtag] {
+ if [using_jtag] {
      eval jtag newtap $chip $tag $args
  } elseif [using_swd] {
      eval swd newdap $chip $tag $args
+ } else {
+     echo "Error: transport '[ transport select ]' not supported by swj_newdap"
+     shutdown
  }
 }