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

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 43b34ae7f0af353481510d6a564a07cfce6ff659..4467b6cb9b4996151e44fbf8f3d5c7f15ba49a58 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 776cb879e9435480ec09db2b0a75724b2430e746..c2dd0ae9cd2cae266f667dd5b32722c2b755961a 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