summaryrefslogtreecommitdiff
path: root/gcc/ada/scos.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/scos.adb')
-rw-r--r--gcc/ada/scos.adb16
1 files changed, 0 insertions, 16 deletions
diff --git a/gcc/ada/scos.adb b/gcc/ada/scos.adb
index a45f3d88467..b7df692de3a 100644
--- a/gcc/ada/scos.adb
+++ b/gcc/ada/scos.adb
@@ -25,22 +25,6 @@
package body SCOs is
- -------------
- -- Add_SCO --
- -------------
-
- procedure Add_SCO
- (From : Source_Location := No_Source_Location;
- To : Source_Location := No_Source_Location;
- C1 : Character := ' ';
- C2 : Character := ' ';
- Last : Boolean := False;
- Pragma_Sloc : Source_Ptr := No_Location)
- is
- begin
- SCO_Table.Append ((From, To, C1, C2, Last, Pragma_Sloc));
- end Add_SCO;
-
----------------
-- Initialize --
----------------