| Index: gdb/testsuite/gdb.ada/rdv_wait/pck.ads
|
| diff --git a/gdb/testsuite/gdb.ada/char_enum/pck.ads b/gdb/testsuite/gdb.ada/rdv_wait/pck.ads
|
| similarity index 79%
|
| copy from gdb/testsuite/gdb.ada/char_enum/pck.ads
|
| copy to gdb/testsuite/gdb.ada/rdv_wait/pck.ads
|
| index 89f7a4ad408489fdb1d0dd313649f908b0c82974..8f88c9d386532f3d26e31fbca69266f75a919fb3 100644
|
| --- a/gdb/testsuite/gdb.ada/char_enum/pck.ads
|
| +++ b/gdb/testsuite/gdb.ada/rdv_wait/pck.ads
|
| @@ -1,4 +1,4 @@
|
| --- Copyright 2011-2012 Free Software Foundation, Inc.
|
| +-- Copyright 2012-2013 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
|
| @@ -13,9 +13,10 @@
|
| -- You should have received a copy of the GNU General Public License
|
| -- along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
|
| -with System;
|
| -
|
| package Pck is
|
| - procedure Do_Nothing (A : System.Address);
|
| -end Pck;
|
|
|
| + procedure Break_Me;
|
| + -- A procedure doing nothing, but which is a convenient anchor
|
| + -- for inserting breakpoints.
|
| +
|
| +end Pck;
|
|
|