From 9000a7221ab1ebe40a3d4319182c6da5e98965c2 Mon Sep 17 00:00:00 2001
From: ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Sat, 21 Oct 2017 10:05:33 +0000
Subject: [PATCH] Fix typos

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@253972 138bc75d-0d04-0410-961f-82ee72b054a4
---
 gcc/testsuite/gnat.dg/specs/discr4.ads     | 6 +++---
 gcc/testsuite/gnat.dg/specs/discr4_pkg.ads | 4 ++--
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/gcc/testsuite/gnat.dg/specs/discr4.ads b/gcc/testsuite/gnat.dg/specs/discr4.ads
index ef9f046abcd..a7fc25b9d66 100644
--- a/gcc/testsuite/gnat.dg/specs/discr4.ads
+++ b/gcc/testsuite/gnat.dg/specs/discr4.ads
@@ -1,9 +1,9 @@
 -- { dg-do compile }
 -- { dg-options "-O" }
 
-with Disc4_Pkg; use Disc4_Pkg;
+with Discr4_Pkg; use Discr4_Pkg;
 
-package Disc4 is
+package Discr4 is
 
    type Data is record
       Val : Rec;
@@ -20,4 +20,4 @@ package Disc4 is
 
    C2 : constant Pair := Build (Get (0), Rec_Three);
 
-end Disc4;
+end Discr4;
diff --git a/gcc/testsuite/gnat.dg/specs/discr4_pkg.ads b/gcc/testsuite/gnat.dg/specs/discr4_pkg.ads
index 4b6c573729d..231a8fb77e8 100644
--- a/gcc/testsuite/gnat.dg/specs/discr4_pkg.ads
+++ b/gcc/testsuite/gnat.dg/specs/discr4_pkg.ads
@@ -1,4 +1,4 @@
-package Disc4_Pkg is
+package Discr4_Pkg is
 
    type Enum is (One, Two, Three);
 
@@ -24,4 +24,4 @@ private
 
    function Get (Value : Integer) return Rec is (Two, Value);
 
-end Disc4_Pkg;
+end Discr4_Pkg;
-- 
2.11.4.GIT