Browse Source

Evaluate 'script' in the global scope

Scripts sourced via 'script' should evaluate in the global
scope to make it easy to set and reference global variables.

Signed-off-by: Steve Bennett <steveb@workware.net.au>
tags/v0.6.0-rc1
Steve Bennett 12 years ago
committed by Øyvind Harboe
parent
commit
a62d8f2271
1 changed files with 2 additions and 2 deletions
  1. +2
    -2
      src/helper/startup.tcl

+ 2
- 2
src/helper/startup.tcl View File

@@ -53,9 +53,9 @@ proc find {filename} {
add_usage_text find "<file>"
add_help_text find "print full path to file according to OpenOCD search rules"

# Run script
# Find and run a script
proc script {filename} {
source [find $filename]
uplevel #0 source [find $filename]
}
add_help_text script "filename of OpenOCD script (tcl) to run"
add_usage_text script "<file>"


Loading…
Cancel
Save