summaryrefslogtreecommitdiff
path: root/gcc/ada/mlib-tgt-vms-alpha.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/mlib-tgt-vms-alpha.adb')
-rw-r--r--gcc/ada/mlib-tgt-vms-alpha.adb4
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/ada/mlib-tgt-vms-alpha.adb b/gcc/ada/mlib-tgt-vms-alpha.adb
index 8637014a9c9..b3b71722fb6 100644
--- a/gcc/ada/mlib-tgt-vms-alpha.adb
+++ b/gcc/ada/mlib-tgt-vms-alpha.adb
@@ -438,6 +438,10 @@ package body MLib.Tgt is
when Controlled =>
Last_Argument := Last_Argument + 1;
Arguments (Last_Argument) := new String'("-C");
+
+ when Restricted =>
+ Last_Argument := Last_Argument + 1;
+ Arguments (Last_Argument) := new String'("-R");
end case;
-- Add each relevant object file