| Index: gdb/testsuite/gdb.ada/tagged_not_init/pck.adb
|
| diff --git a/gdb/testsuite/gdb.ada/null_array/pck.adb b/gdb/testsuite/gdb.ada/tagged_not_init/pck.adb
|
| similarity index 93%
|
| copy from gdb/testsuite/gdb.ada/null_array/pck.adb
|
| copy to gdb/testsuite/gdb.ada/tagged_not_init/pck.adb
|
| index 8f99dc4bdc4dd6c141b8b2acbe0baa1bd861929a..5d6e76069357ff4a3c366c9a6339e306b3aa7b29 100644
|
| --- a/gdb/testsuite/gdb.ada/null_array/pck.adb
|
| +++ b/gdb/testsuite/gdb.ada/tagged_not_init/pck.adb
|
| @@ -1,4 +1,4 @@
|
| --- Copyright 2008-2012 Free Software Foundation, Inc.
|
| +-- Copyright 2012 Free Software Foundation, Inc.
|
| --
|
| -- This program is free software; you can redistribute it and/or modify
|
| -- it under the terms of the GNU General Public License as published by
|
| @@ -14,7 +14,6 @@
|
| -- along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
|
| package body Pck is
|
| -
|
| function Ident (I : Integer) return Integer is
|
| begin
|
| return I;
|
| @@ -24,5 +23,4 @@ package body Pck is
|
| begin
|
| null;
|
| end Do_Nothing;
|
| -
|
| end Pck;
|
|
|