diff options
Diffstat (limited to 'gcc/ada/prj.adb')
| -rw-r--r-- | gcc/ada/prj.adb | 21 |
1 files changed, 0 insertions, 21 deletions
diff --git a/gcc/ada/prj.adb b/gcc/ada/prj.adb index 55fd9f0..ca6758e 100644 --- a/gcc/ada/prj.adb +++ b/gcc/ada/prj.adb @@ -43,9 +43,6 @@ package body Prj is The_Empty_String : String_Id; - Default_Ada_Spec_Suffix : Name_Id := No_Name; - Default_Ada_Impl_Suffix : Name_Id := No_Name; - subtype Known_Casing is Casing_Type range All_Upper_Case .. Mixed_Case; The_Casing_Images : array (Known_Casing) of String_Access := @@ -108,24 +105,6 @@ package body Prj is Flag1 => False, Flag2 => False); - ----------------------------- - -- Ada_Default_Spec_Suffix -- - ----------------------------- - - function Ada_Default_Spec_Suffix return Name_Id is - begin - return Default_Ada_Spec_Suffix; - end Ada_Default_Spec_Suffix; - - ----------------------------- - -- Ada_Default_Impl_Suffix -- - ----------------------------- - - function Ada_Default_Impl_Suffix return Name_Id is - begin - return Default_Ada_Impl_Suffix; - end Ada_Default_Impl_Suffix; - ------------------- -- Empty_Project -- ------------------- |