diff options
| author | oharboe <oharboe@b42882b7-edfa-0310-969c-e2dbd0fdcd60> | 2008-07-19 10:37:41 +0000 |
|---|---|---|
| committer | oharboe <oharboe@b42882b7-edfa-0310-969c-e2dbd0fdcd60> | 2008-07-19 10:37:41 +0000 |
| commit | 42501f0ef0beb573fcbe904320b9a0fba02dcc3b (patch) | |
| tree | 0eed5bf5f3abcf115f0c90f6921570989d24e681 /src | |
| parent | b78f488d637f17400163534f6e3a3f3e7ba9fdbe (diff) | |
| download | openocd+libswd-42501f0ef0beb573fcbe904320b9a0fba02dcc3b.tar.gz openocd+libswd-42501f0ef0beb573fcbe904320b9a0fba02dcc3b.tar.bz2 openocd+libswd-42501f0ef0beb573fcbe904320b9a0fba02dcc3b.tar.xz openocd+libswd-42501f0ef0beb573fcbe904320b9a0fba02dcc3b.zip | |
throw exception upon syntax error.
git-svn-id: svn://svn.berlios.de/openocd/trunk@838 b42882b7-edfa-0310-969c-e2dbd0fdcd60
Diffstat (limited to 'src')
| -rw-r--r-- | src/helper/startup.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/helper/startup.tcl b/src/helper/startup.tcl index 6e5f577d..2f90911a 100644 --- a/src/helper/startup.tcl +++ b/src/helper/startup.tcl @@ -120,7 +120,7 @@ proc unknown {args} { return [eval "$cmd_name [lrange $args 2 end]"] } # This really is an unknown command. - puts "Unknown command: $args" + return -code error "Unknown command: $args" } |