* gdb.pascal/hello.exp (binfile): Add ${EXEEXT}.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 43b34ae..4467b6c 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2008-01-31  Pierre Muller  <muller@ics.u-strasbg.fr>
+
+       * gdb.pascal/hello.exp (binfile): Add ${EXEEXT}.
+
 2008-01-30  Luis Machado  <luisgpm@br.ibm.com>
 
        * gdb.arch/powerpc-d128-regs.exp: New testcase expect file.

diff --git a/gdb/testsuite/gdb.pascal/hello.exp b/gdb/testsuite/gdb.pascal/hello.exp
index 776cb87..c2dd0ae 100644 (file)
--- a/gdb/testsuite/gdb.pascal/hello.exp
+++ b/gdb/testsuite/gdb.pascal/hello.exp
@@ -21,7 +21,7 @@ load_lib "pascal.exp"
 
 set testfile "hello"
 set srcfile ${testfile}.pas
-set binfile ${objdir}/${subdir}/${testfile}
+set binfile ${objdir}/${subdir}/${testfile}${EXEEXT}
 
 if {[gdb_compile_pascal "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug ]] != "" } {
   return -1