OSDN Git Service

* gnat.dg/stack_check3.ad[sb]: Delete in the root directory.
authoruros <uros@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 7 Dec 2012 08:14:50 +0000 (08:14 +0000)
committeruros <uros@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 7 Dec 2012 08:14:50 +0000 (08:14 +0000)
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/gcc-4_7-branch@194294 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/testsuite/stack_check3.adb [deleted file]
gcc/testsuite/stack_check3.ads [deleted file]

diff --git a/gcc/testsuite/stack_check3.adb b/gcc/testsuite/stack_check3.adb
deleted file mode 100644 (file)
index 734ed42..0000000
+++ /dev/null
@@ -1,36 +0,0 @@
--- { dg-do compile }
--- { dg-options "-O -fstack-check" }
-
-package body Stack_Check3 is
-
-  type Int_Arr is array (1 .. 34) of Integer;
-
-  type Rec (D : Boolean := False) is
-    record
-      case D is
-        when True  => IA : Int_Arr;
-        when False => null;
-      end case;
-    end record;
-
-  type Rec_Arr is array (1 .. 256) of Rec;
-
-  protected Prot_Arr is
-    procedure Reset;
-  private
-    A : Rec_Arr;
-  end Prot_Arr;
-
-  protected body Prot_Arr is
-    procedure Reset is
-    begin
-      A := (others => (D => False));
-    end Reset;
-  end Prot_Arr;
-
-  procedure Reset is
-  begin
-    Prot_Arr.Reset;
-  end Reset;
-
-end Stack_Check3;
diff --git a/gcc/testsuite/stack_check3.ads b/gcc/testsuite/stack_check3.ads
deleted file mode 100644 (file)
index 869c418..0000000
+++ /dev/null
@@ -1,5 +0,0 @@
-package Stack_Check3 is
-
-  procedure Reset;
-
-end Stack_Check3;