| Index: gdb/testsuite/gdb.ada/task_bp/pck.ads
|
| diff --git a/gdb/testsuite/gdb.ada/ptr_typedef/pck.ads b/gdb/testsuite/gdb.ada/task_bp/pck.ads
|
| similarity index 92%
|
| copy from gdb/testsuite/gdb.ada/ptr_typedef/pck.ads
|
| copy to gdb/testsuite/gdb.ada/task_bp/pck.ads
|
| index f99df3d19b74bb87001331f1685dd4bfa8d2b315..f0e3ff1936004602ac0fe68fe07917497302c4f9 100644
|
| --- a/gdb/testsuite/gdb.ada/ptr_typedef/pck.ads
|
| +++ b/gdb/testsuite/gdb.ada/task_bp/pck.ads
|
| @@ -13,7 +13,8 @@
|
| -- 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);
|
| + task Dummy_Task is
|
| + entry Start;
|
| + end Dummy_Task;
|
| end Pck;
|
|
|