diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 1b47c5e7bbc1b762f81d0d5fccd53d342ebc94fd..6c60fc4a9f7aed7e50347c243cde1e41877bcc64 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2002-09-06  Neil Booth  <neil@daikokuya.co.uk>
+
+	* gcc.dg/cpp/_Pragma4.c: Fix typo.
+
 Fri Sep  6 16:39:37 2002  Nicola Pero  <n.pero@mi.flashnet.it>
 
 	* objc/execute/formal_protocol-6.x: Removed.  This testcase is now
diff --git a/gcc/testsuite/gcc.dg/cpp/_Pragma4.c b/gcc/testsuite/gcc.dg/cpp/_Pragma4.c
index 8d8cea5ab4c95ce5750cd7ae92f93dca07c770b4..a7ac42d4e47c7faf35e27b25c7d9c2e54f622942 100644
--- a/gcc/testsuite/gcc.dg/cpp/_Pragma4.c
+++ b/gcc/testsuite/gcc.dg/cpp/_Pragma4.c
@@ -7,6 +7,6 @@ a b c
 
 /*
    { dg-final { if ![file exists _Pragma4.i] { return }                   } }
-   { dg-final { if { [grep _Pragma4.i "#pragma bat "] != "" } { return }  } }
+   { dg-final { if { [grep _Pragma4.i "#pragma bar "] != "" } { return }  } }
    { dg-final { fail "_Pragma4.c: #pragma appearing on its own line"      } }
 */