From a7fa0dedad7e94f3b9691c71c11860c124c24fcc Mon Sep 17 00:00:00 2001
From: Pierre Muller <muller@sourceware.org>
Date: Thu, 31 Jan 2008 14:46:21 +0000
Subject: [PATCH] 	* gdb.pascal/hello.exp (binfile): Add ${EXEEXT}.

---
 gdb/testsuite/ChangeLog            | 4 ++++
 gdb/testsuite/gdb.pascal/hello.exp | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 43b34ae7f0a..4467b6cb9b4 100644
--- 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 776cb879e94..c2dd0ae9cd2 100644
--- 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
-- 
2.30.2