diff options
| author | Zachary T Welch <zw@superlucidity.net> | 2009-11-21 19:41:21 -0800 |
|---|---|---|
| committer | Zachary T Welch <zw@superlucidity.net> | 2009-11-24 21:37:29 -0800 |
| commit | 47cb10217a7bc4b97fa169a821db05f40bc2e51d (patch) | |
| tree | 56db23e62ca72fd997353b12515e492d536b9813 /src/helper/startup.tcl | |
| parent | b6210907ea584095cdede663f695eb8afeecef14 (diff) | |
| download | openocd+libswd-47cb10217a7bc4b97fa169a821db05f40bc2e51d.tar.gz openocd+libswd-47cb10217a7bc4b97fa169a821db05f40bc2e51d.tar.bz2 openocd+libswd-47cb10217a7bc4b97fa169a821db05f40bc2e51d.tar.xz openocd+libswd-47cb10217a7bc4b97fa169a821db05f40bc2e51d.zip | |
improve startup tcl scripts
Fix a couple of layering violations missed in the last round.
Add missing comment headers.
Diffstat (limited to 'src/helper/startup.tcl')
| -rw-r--r-- | src/helper/startup.tcl | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/src/helper/startup.tcl b/src/helper/startup.tcl index fc84943a..845198ad 100644 --- a/src/helper/startup.tcl +++ b/src/helper/startup.tcl @@ -61,10 +61,6 @@ proc unknown {args} { return -code error "Unknown command: $args" } -proc new_target_name { } { - return [target number [expr [target count] - 1 ]] -} - # Try flipping / and \ to find file if the filename does not # match the precise spelling proc find {filename} { |