13 |
puts "ERROR: $srcdir/$subdir/default_procs.tcl doesn't exist" |
puts "ERROR: $srcdir/$subdir/default_procs.tcl doesn't exist" |
14 |
} |
} |
15 |
|
|
16 |
set file $srcdir/../lib/target.exp |
set file $srcdir/../lib/target.exp |
17 |
if [ file exists $file] { |
if [ file exists $file] { |
18 |
source $file |
source $file |
19 |
} else { |
} else { |
20 |
puts "ERROR: $file doesn't exist" |
puts "ERROR: $file doesn't exist" |
21 |
} |
} |
22 |
# we load framework so we can use stuff like is3way |
# we load framework so we can use stuff like is3way |
23 |
set file $srcdir/../lib/framework.exp |
set file $srcdir/../lib/framework.exp |
24 |
if [ file exists $file] { |
if [ file exists $file] { |
25 |
source $file |
source $file |
26 |
} else { |
} else { |
27 |
puts "ERROR: $file doesn't exist" |
puts "ERROR: $file doesn't exist" |
28 |
} |
} |
29 |
# we load the remote stuff so we can test execute_anywhere |
# we load the remote stuff so we can test execute_anywhere |
30 |
set file $srcdir/../lib/remote.exp |
set file $srcdir/../lib/remote.exp |
31 |
if [ file exists $file] { |
if [ file exists $file] { |
32 |
source $file |
source $file |
33 |
} else { |
} else { |