diff options
Diffstat (limited to 'gcc/ada/switch-c.adb')
| -rw-r--r-- | gcc/ada/switch-c.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/switch-c.adb b/gcc/ada/switch-c.adb index 937a3a86b6f..ddd4859c2e2 100644 --- a/gcc/ada/switch-c.adb +++ b/gcc/ada/switch-c.adb @@ -278,7 +278,7 @@ package body Switch.C is when 'D' => Ptr := Ptr + 1; - -- Scan option integer line limit value + -- Scan optional integer line limit value if Ptr <= Max and then Switch_Chars (Ptr) in '0' .. '9' then Scan_Nat (Switch_Chars, Max, Ptr, Sprint_Line_Limit, 'D'); @@ -528,7 +528,7 @@ package body Switch.C is Ptr := Ptr + 1; Print_Generated_Code := True; - -- Scan option integer line limit value + -- Scan optional integer line limit value if Ptr <= Max and then Switch_Chars (Ptr) in '0' .. '9' then Scan_Nat (Switch_Chars, Max, Ptr, Sprint_Line_Limit, 'G'); |