[RFA] gdb/testsuite/gdb.base/annota1.exp

[David Taylor]

gdb/testsuite/ChangeLog entry:

	* annota1.exp: Move test of isnative to earlier in the file --
 	don't even try compiling the test program if we aren't going
	to run the tests.

Index: gdb/testsuite/gdb.base/annota1.exp
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/testsuite/gdb.base/annota1.exp,v
retrieving revision 1.11
diff -c -r1.11 annota1.exp
*** gdb/testsuite/gdb.base/annota1.exp	2000/06/26 02:07:19	1.11
--- gdb/testsuite/gdb.base/annota1.exp	2001/02/09 21:39:02
***************
*** 25,30 ****
--- 25,40 ----
  }
  
  
+ # are we on a target board? If so, don't run these tests.
+ # note: this is necessary because we cannot use runto_main (which would
+ # work for remote targets too) because of the different prompt we get
+ # when using annotation level 2.
+ #
+ if ![isnative] then {
+     return 0
+ }
+ 
+ 
  #
  # test running programs
  #
***************
*** 37,52 ****
  
  if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-w}] != "" } {
      gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
- }
- 
- 
- # are we on a target board? If so, don't run these tests.
- # note: this is necessary because we cannot use runto_main (which would
- # work for remote targets too) because of the different prompt we get
- # when using annotation level 2.
- #
- if ![isnative] then {
-     return 0
  }
  
  
--- 47,52 ----