aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/switch-m.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/switch-m.adb')
-rw-r--r--gcc/ada/switch-m.adb4
1 files changed, 1 insertions, 3 deletions
diff --git a/gcc/ada/switch-m.adb b/gcc/ada/switch-m.adb
index 7c7259d..ded1a94 100644
--- a/gcc/ada/switch-m.adb
+++ b/gcc/ada/switch-m.adb
@@ -119,9 +119,7 @@ package body Switch.M is
-- Add a new component in the table.
Switches (Last) := new String'(S);
- Normalized_Switches.Increment_Last;
- Normalized_Switches.Table (Normalized_Switches.Last) :=
- Switches (Last);
+ Normalized_Switches.Append (Switches (Last));
end Add_Switch_Component;
-- Start of processing for Normalize_Compiler_Switches