diff options
author | Tristan Gingold <gingold@adacore.com> | 2017-01-06 11:50:15 +0000 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2017-01-06 12:50:15 +0100 |
commit | dbf2a2d34ad8a708e01869e30da252a9aff8ef6b (patch) | |
tree | 32c1aa81aefd345059f603496191820a28210721 /gcc/ada/s-tpoben.adb | |
parent | 0789ef6f84d73facdf01b056748e7b43abf3ed17 (diff) | |
download | gcc-dbf2a2d34ad8a708e01869e30da252a9aff8ef6b.zip gcc-dbf2a2d34ad8a708e01869e30da252a9aff8ef6b.tar.gz gcc-dbf2a2d34ad8a708e01869e30da252a9aff8ef6b.tar.bz2 |
exp_ch9.ads, [...] (Build_Entry_Names): Remove (unused).
2017-01-06 Tristan Gingold <gingold@adacore.com>
* exp_ch9.ads, exp_ch9.adb (Build_Entry_Names): Remove (unused).
* rtsfind.ads (RE_Task_Entry_Names_Array, RO_ST_Set_Entry_Names)
(RE_Protected_Entry_Names_Array, RO_PE_Set_Entry_Names): Remove
(unused).
* s-taskin.ads, s-taskin.adb (Set_Entry_Names,
Task_Entry_Names_Array, Task_Entry_Names_Access): Remove.
* s-tpoben.ads, s-tpoben.adb (Set_Entry_Names,
Protected_Entry_Names_Array, Protected_Entry_Names_Access): Remove.
From-SVN: r244142
Diffstat (limited to 'gcc/ada/s-tpoben.adb')
-rw-r--r-- | gcc/ada/s-tpoben.adb | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/gcc/ada/s-tpoben.adb b/gcc/ada/s-tpoben.adb index 79f425e..ddea948 100644 --- a/gcc/ada/s-tpoben.adb +++ b/gcc/ada/s-tpoben.adb @@ -378,18 +378,6 @@ package body System.Tasking.Protected_Objects.Entries is Object.New_Ceiling := Prio; end Set_Ceiling; - --------------------- - -- Set_Entry_Names -- - --------------------- - - procedure Set_Entry_Names - (Object : Protection_Entries_Access; - Names : Protected_Entry_Names_Access) - is - begin - Object.Entry_Names := Names; - end Set_Entry_Names; - -------------------- -- Unlock_Entries -- -------------------- |