Re: [PATCH] profopt.exp and remote testing

[Joern RENNECKE <joern dot rennecke at st dot com>]

Joern Rennecke wrote:

>  My $DEJAGNU has a switch statement that not only handles native and a
> number of simulator targets, but also a remote target.  If I add these 
> procedures,
> I suppose that will break remote tests.

P.S.:  I've tried to put the procedures in the target specific file, and 
they are used
from there, but thgey don't work.  When I back them out there and put 
them into
$DEJAGNU instead, I get the same failure:

ERROR: tcl error sourcing 
/mnt/scratch/nightly/2005-08-16-23290/srcw/gcc/testsuite/g++.dg/bprob/bprob.exp.
ERROR: can't read "file": no such variable
   while executing
"remote_upload host $file $args"
   (procedure "sim_upload" line 2)
   invoked from within
"sim_upload "sh-hms-sim/-m4/-ml" 
/mnt/scratch/nightly/2005-08-16-23290/sh-elf-3/gcc/testsuite/g++-bprob-1.gcda 
g++-bprob-1.gcda"
   ("eval" body line 1)
   invoked from within
"eval ${try}_${proc} \"$dest\" $args"
   (procedure "call_remote" line 57)
   invoked from within
"call_remote "" upload $dest $srcfile $destfile"
   (procedure "remote_upload" line 16)
   invoked from within
"remote_upload target $tmpdir/$base.$ext"
   (procedure "profopt-execute" line 81)
   invoked from within
"profopt-execute $src"
   ("foreach" body line 6)
   invoked from within
"foreach src [lsort [glob -nocomplain $srcdir/$subdir/*.C]] {
       # If we're only testing specific files and this isn't one of 
them, skip it.
    ..."
   ("foreach" body line 2)
   invoked from within
"foreach profile_option $profile_options feedback_option $feedback_options {
   foreach src [lsort [glob -nocomplain $srcdir/$subdir/*.C]] {
       #..."
   (file 
"/mnt/scratch/nightly/2005-08-16-23290/srcw/gcc/testsuite/g++.dg/bprob/bprob.exp" 
line 57)
   invoked from within
"source 
/mnt/scratch/nightly/2005-08-16-23290/srcw/gcc/testsuite/g++.dg/bprob/bprob.exp"
   ("uplevel" body line 1)
   invoked from within
"uplevel #0 source 
/mnt/scratch/nightly/2005-08-16-23290/srcw/gcc/testsuite/g++.dg/bprob/bprob.exp"
   invoked from within
"catch "uplevel #0 source $test_file_name""