diff options
Diffstat (limited to 'gcc/ada/osint-c.adb')
-rw-r--r-- | gcc/ada/osint-c.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/osint-c.adb b/gcc/ada/osint-c.adb index 541178da938..d93214cd606 100644 --- a/gcc/ada/osint-c.adb +++ b/gcc/ada/osint-c.adb @@ -43,7 +43,7 @@ package body Osint.C is Suffix : String) return File_Name_Type; -- Common processing for Create_List_File, Create_Repinfo_File and -- Create_Debug_File. Src is the file name used to create the required - -- output file and Suffix is the desired suffic (dg/rep/xxx for debug/ + -- output file and Suffix is the desired suffix (dg/rep/xxx for debug/ -- repinfo/list file where xxx is specified extension. procedure Set_Library_Info_Name; @@ -439,7 +439,7 @@ package body Osint.C is pragma Assert (Dot_Index /= 0); - -- Change exctension to adt + -- Change extension to adt Name_Buffer (Dot_Index) := '.'; Name_Buffer (Dot_Index + 1) := 'a'; |